FAST3D-parabolaTest7.nb

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

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

(* CreatedBy='Mathematica 11.3' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    457089,       8552]
NotebookOptionsPosition[    445110,       8399]
NotebookOutlinePosition[    445474,       8415]
CellTagsIndexPosition[    445431,       8412]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[{
 RowBox[{"Needs", "[", "\"\<NDSolve`FEM`\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetSystemOptions", "[", 
   RowBox[{"\"\<FiniteElementOptions\>\"", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"\"\<DefaultNumberOfElements\>\"", "\[Rule]", "10"}], "}"}]}], 
   "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetSystemOptions", "[", 
   RowBox[{"\"\<FiniteElementOptions\>\"", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"\"\<InterpolationToleranceFactor\>\"", "\[Rule]", "1."}], 
     "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"SetSystemOptions", "[", 
  RowBox[{"\"\<FiniteElementOptions\>\"", "\[Rule]", 
   RowBox[{"{", 
    RowBox[{"\"\<SymbolicProcessing\>\"", "\[Rule]", "100."}], "}"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.7592312870016127`*^9, 3.759231317855836*^9}, {
   3.7592313546623707`*^9, 3.759231380174076*^9}, 3.759232259776616*^9, {
   3.7592323029217033`*^9, 3.759232325208775*^9}, 3.759232385911024*^9, 
   3.759232459586309*^9, {3.759232503878454*^9, 3.759232504156756*^9}, {
   3.75923255782311*^9, 3.759232558139102*^9}},
 CellLabel->"In[2]:=",ExpressionUUID->"509f3a06-88e9-4e4a-971f-f484c01d33d3"],

Cell[BoxData[
 RowBox[{"\<\"FiniteElementOptions\"\>", "\[Rule]", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"\<\"CacheInterpolationElements\"\>", "\[Rule]", "True"}], ",", 
    RowBox[{"\<\"DefaultBounds\"\>", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "1"}], ",", "1"}], "}"}]}], ",", 
    RowBox[{"\<\"DefaultElementMeshOrder\"\>", "\[Rule]", "2"}], ",", 
    RowBox[{"\<\"DefaultExtrapolationHandler\"\>", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Indeterminate", "&"}], ",", 
       RowBox[{"\<\"WarningMessage\"\>", "\[Rule]", "True"}]}], "}"}]}], ",", 
    
    RowBox[{"\<\"DefaultNumberOfElements\"\>", "\[Rule]", "10"}], ",", 
    RowBox[{"\<\"InterpolationToleranceFactor\"\>", "\[Rule]", "1.`"}], ",", 
    RowBox[{"\<\"MinimumElementMeshQuality\"\>", "\[Rule]", "0.`"}], ",", 
    RowBox[{"\<\"SymbolicProcessing\"\>", "\[Rule]", "100.`"}]}], 
   "}"}]}]], "Output",
 CellChangeTimes->{
  3.759231238809537*^9, {3.759231289671607*^9, 3.759231318392024*^9}, {
   3.759231368057869*^9, 3.759231381198244*^9}, 3.75923226061362*^9, {
   3.7592323036147833`*^9, 3.759232325867476*^9}, 3.759232386482686*^9, 
   3.759232461482924*^9, 3.759232505633773*^9, 3.759232558738502*^9, 
   3.7592330475105677`*^9, 3.75924659575353*^9, 3.759247011760198*^9, 
   3.759247241427747*^9, 3.759255627094892*^9, 3.7596186586256037`*^9},
 CellLabel->"Out[5]=",ExpressionUUID->"81fd9c28-f82d-420d-bcf6-89e08f4c05fa"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"hull1", "=", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
       RowBox[{"z", "\[GreaterEqual]", 
        RowBox[{"2.215384615384615`", "\[VeryThinSpace]", "+", 
         RowBox[{"1.159647461884313`", " ", 
          SuperscriptBox["x", "2."]}]}]}], "&&", 
       RowBox[{"0.", "<", "y", "\[LessEqual]", " ", "10."}]}], ")"}], ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hull2", "=", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
       RowBox[{"z", "\[GreaterEqual]", 
        RowBox[{"0.7538461538461538`", "\[VeryThinSpace]", "+", 
         RowBox[{"0.3102990715481003`", " ", 
          SuperscriptBox["x", "2.`"]}]}]}], "&&", 
       RowBox[{
       "10.", "\[LessEqual]", " ", "y", "\[LessEqual]", " ", "20."}]}], ")"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hull3", "=", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
       RowBox[{"z", "\[GreaterEqual]", 
        RowBox[{"0.061538461538461535`", "\[VeryThinSpace]", "+", 
         RowBox[{"0.16809777948184113`", " ", 
          SuperscriptBox["x", "2.`"]}]}]}], "&&", 
       RowBox[{
       "20.", "\[LessEqual]", " ", "y", "\[LessEqual]", " ", "30."}]}], ")"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hull4", "=", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
       RowBox[{"z", "\[GreaterEqual]", 
        RowBox[{"0.13846153846153844`", "\[VeryThinSpace]", "+", 
         RowBox[{"0.11225568226713982`", " ", 
          SuperscriptBox["x", "2.`"]}]}]}], "&&", 
       RowBox[{
       "30.", "\[LessEqual]", " ", "y", "\[LessEqual]", " ", "40."}]}], ")"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hull5", "=", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
       RowBox[{"z", "\[GreaterEqual]", 
        RowBox[{"0.9846153846153846`", "\[VeryThinSpace]", "+", 
         RowBox[{"0.08302998710242387`", " ", 
          SuperscriptBox["x", "2.`"]}]}]}], "&&", 
       RowBox[{
       "40.", "\[LessEqual]", " ", "y", "\[LessEqual]", " ", "50."}]}], ")"}],
      ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hull6", "=", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
       RowBox[{"z", "\[GreaterEqual]", 
        RowBox[{"2.6`", "\[VeryThinSpace]", "+", 
         RowBox[{"0.06526115558326687`", " ", 
          SuperscriptBox["x", "2.`"]}]}]}], "&&", 
       RowBox[{"50.", "\[LessEqual]", " ", "y", "<", "58."}]}], ")"}], ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hullreg", " ", "=", 
   RowBox[{"RegionUnion", "[", 
    RowBox[{
    "hull1", ",", "hull2", ",", "hull3", ",", " ", "hull4", ",", " ", "hull5",
      ",", " ", "hull6"}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"waterdensity", " ", "=", " ", "1."}], "\[IndentingNewLine]", 
 RowBox[{"Volume", "[", "hullreg", "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.7590709082786827`*^9, 3.759070976680941*^9}, {
   3.7590710164343243`*^9, 3.759071086100382*^9}, 3.759188116258915*^9, {
   3.75918816398985*^9, 3.7591882026296964`*^9}, {3.7591882759664655`*^9, 
   3.7591882853554068`*^9}, {3.759188332776496*^9, 3.7591883396282296`*^9}, {
   3.759188374776904*^9, 3.759188376003834*^9}, {3.759188516054896*^9, 
   3.759188527537196*^9}, {3.7591887519323597`*^9, 3.759188765469929*^9}, {
   3.759188800325141*^9, 3.759188816436474*^9}, 3.7591888606400876`*^9, {
   3.759188918694499*^9, 3.759188938406581*^9}, {3.7591889842913303`*^9, 
   3.7591891330553503`*^9}, {3.7591891851592536`*^9, 3.759189211156124*^9}, {
   3.7591899694242325`*^9, 3.759189973666709*^9}, {3.759190973952363*^9, 
   3.759191033811428*^9}, {3.7591914538635054`*^9, 3.759191456949845*^9}, {
   3.7591928346226873`*^9, 3.7591928374629154`*^9}, {3.759192905840386*^9, 
   3.7591929087606525`*^9}, 3.7591929773381405`*^9, {3.7591930843332806`*^9, 
   3.759193084785929*^9}, {3.75919324958808*^9, 3.7591932831106415`*^9}, {
   3.7591933485838013`*^9, 3.759193355292145*^9}, {3.7591934156245823`*^9, 
   3.7591934493357754`*^9}, {3.7591958377415714`*^9, 
   3.7591958855074897`*^9}, {3.7591959261356907`*^9, 3.759195936437623*^9}, {
   3.759195970779643*^9, 3.7591960015091343`*^9}, {3.7591960625351934`*^9, 
   3.759196143677266*^9}, {3.759231202778841*^9, 3.759231219233143*^9}, {
   3.759231257964735*^9, 3.759231272368237*^9}, {3.759231406906158*^9, 
   3.759231487761743*^9}, {3.75923153295437*^9, 3.7592315661025667`*^9}, {
   3.759231600891844*^9, 3.759231601020112*^9}, {3.759231657919354*^9, 
   3.759231665954249*^9}, {3.7592319961869783`*^9, 3.7592320084834127`*^9}, {
   3.7592430216919603`*^9, 3.7592432108054333`*^9}, {3.759246608030121*^9, 
   3.759246685871416*^9}},
 CellLabel->"In[6]:=",ExpressionUUID->"2f6ff26d-771a-4b03-a8f4-d7ffe4270b88"],

Cell[BoxData[
 RowBox[{"ImplicitRegion", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"z", "\[LessEqual]", "10.`"}], "&&", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"z", "\[GreaterEqual]", 
         RowBox[{"2.215384615384615`", "\[VeryThinSpace]", "+", 
          RowBox[{"1.159647461884313`", " ", 
           SuperscriptBox["x", "2.`"]}]}]}], "&&", 
        RowBox[{"y", ">", "0"}], "&&", 
        RowBox[{"y", "\[LessEqual]", "10.`"}]}], ")"}], "||", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"z", "\[GreaterEqual]", 
         RowBox[{"2.6`", "\[VeryThinSpace]", "+", 
          RowBox[{"0.06526115558326687`", " ", 
           SuperscriptBox["x", "2.`"]}]}]}], "&&", 
        RowBox[{"y", "<", "58.`"}], "&&", 
        RowBox[{"y", "\[GreaterEqual]", "50.`"}]}], ")"}], "||", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"z", "\[GreaterEqual]", 
         RowBox[{"0.9846153846153846`", "\[VeryThinSpace]", "+", 
          RowBox[{"0.08302998710242387`", " ", 
           SuperscriptBox["x", "2.`"]}]}]}], "&&", 
        RowBox[{"y", "\[GreaterEqual]", "40.`"}], "&&", 
        RowBox[{"y", "\[LessEqual]", "50.`"}]}], ")"}], "||", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"z", "\[GreaterEqual]", 
         RowBox[{"0.13846153846153844`", "\[VeryThinSpace]", "+", 
          RowBox[{"0.11225568226713982`", " ", 
           SuperscriptBox["x", "2.`"]}]}]}], "&&", 
        RowBox[{"y", "\[GreaterEqual]", "30.`"}], "&&", 
        RowBox[{"y", "\[LessEqual]", "40.`"}]}], ")"}], "||", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"z", "\[GreaterEqual]", 
         RowBox[{"0.061538461538461535`", "\[VeryThinSpace]", "+", 
          RowBox[{"0.16809777948184113`", " ", 
           SuperscriptBox["x", "2.`"]}]}]}], "&&", 
        RowBox[{"y", "\[GreaterEqual]", "20.`"}], "&&", 
        RowBox[{"y", "\[LessEqual]", "30.`"}]}], ")"}], "||", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"z", "\[GreaterEqual]", 
         RowBox[{"0.7538461538461538`", "\[VeryThinSpace]", "+", 
          RowBox[{"0.3102990715481003`", " ", 
           SuperscriptBox["x", "2.`"]}]}]}], "&&", 
        RowBox[{"y", "\[GreaterEqual]", "10.`"}], "&&", 
        RowBox[{"y", "\[LessEqual]", "20.`"}]}], ")"}]}], ")"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]], "Output",
 CellChangeTimes->{{3.759070955384362*^9, 3.759070977652513*^9}, {
   3.759071021266911*^9, 3.75907105987184*^9}, 3.7590710948405046`*^9, 
   3.759071884142231*^9, 3.7590727720663548`*^9, 3.759188120365203*^9, 
   3.759188207894758*^9, 3.759188289719022*^9, 3.7591883455011263`*^9, 
   3.7591883839906178`*^9, 3.759188530724363*^9, {3.759188754722724*^9, 
   3.7591888171367264`*^9}, {3.7591890517720194`*^9, 
   3.7591890797836294`*^9}, {3.759189133713914*^9, 3.759189159968935*^9}, {
   3.7591892115466604`*^9, 3.7591892223785925`*^9}, 3.7591899768159018`*^9, 
   3.7591901754738593`*^9, 3.7591902152142916`*^9, 3.7591903647086954`*^9, 
   3.759190466463532*^9, {3.759191036086466*^9, 3.7591910410587077`*^9}, 
   3.759191100511945*^9, 3.7591914608430557`*^9, 3.759191613308679*^9, 
   3.7591928416955366`*^9, 3.7591929119777985`*^9, 3.759193090535079*^9, {
   3.759193267218831*^9, 3.7591932917473707`*^9}, 3.7591933593193345`*^9, {
   3.7591934166276407`*^9, 3.759193456845788*^9}, 3.7591945536547327`*^9, 
   3.7591948491173277`*^9, 3.7591950772002106`*^9, 3.7591952715910254`*^9, 
   3.759195479261425*^9, {3.7591958472870445`*^9, 3.7591960020553913`*^9}, 
   3.7591960854514437`*^9, 3.759196144367815*^9, 3.759231243787692*^9, {
   3.7592312769900103`*^9, 3.7592313199027443`*^9}, 3.7592313697604237`*^9, 
   3.7592314147513237`*^9, 3.7592314882450323`*^9, 3.759231606674178*^9, 
   3.759231667079802*^9, 3.759231710336154*^9, 3.759232012178594*^9, 
   3.759232512186304*^9, 3.759232560956871*^9, 3.7592330487104273`*^9, 
   3.759243044881804*^9, {3.759243131207652*^9, 3.759243211425343*^9}, 
   3.759246597189707*^9, 3.759246687913784*^9, 3.75924701347337*^9, 
   3.759247244078658*^9, 3.7592556297720203`*^9, 3.759618661353381*^9},
 CellLabel->"Out[12]=",ExpressionUUID->"aa8f3bce-1b06-437f-b193-88ab8a24b6cb"],

Cell[BoxData["1.`"], "Output",
 CellChangeTimes->{{3.759070955384362*^9, 3.759070977652513*^9}, {
   3.759071021266911*^9, 3.75907105987184*^9}, 3.7590710948405046`*^9, 
   3.759071884142231*^9, 3.7590727720663548`*^9, 3.759188120365203*^9, 
   3.759188207894758*^9, 3.759188289719022*^9, 3.7591883455011263`*^9, 
   3.7591883839906178`*^9, 3.759188530724363*^9, {3.759188754722724*^9, 
   3.7591888171367264`*^9}, {3.7591890517720194`*^9, 
   3.7591890797836294`*^9}, {3.759189133713914*^9, 3.759189159968935*^9}, {
   3.7591892115466604`*^9, 3.7591892223785925`*^9}, 3.7591899768159018`*^9, 
   3.7591901754738593`*^9, 3.7591902152142916`*^9, 3.7591903647086954`*^9, 
   3.759190466463532*^9, {3.759191036086466*^9, 3.7591910410587077`*^9}, 
   3.759191100511945*^9, 3.7591914608430557`*^9, 3.759191613308679*^9, 
   3.7591928416955366`*^9, 3.7591929119777985`*^9, 3.759193090535079*^9, {
   3.759193267218831*^9, 3.7591932917473707`*^9}, 3.7591933593193345`*^9, {
   3.7591934166276407`*^9, 3.759193456845788*^9}, 3.7591945536547327`*^9, 
   3.7591948491173277`*^9, 3.7591950772002106`*^9, 3.7591952715910254`*^9, 
   3.759195479261425*^9, {3.7591958472870445`*^9, 3.7591960020553913`*^9}, 
   3.7591960854514437`*^9, 3.759196144367815*^9, 3.759231243787692*^9, {
   3.7592312769900103`*^9, 3.7592313199027443`*^9}, 3.7592313697604237`*^9, 
   3.7592314147513237`*^9, 3.7592314882450323`*^9, 3.759231606674178*^9, 
   3.759231667079802*^9, 3.759231710336154*^9, 3.759232012178594*^9, 
   3.759232512186304*^9, 3.759232560956871*^9, 3.7592330487104273`*^9, 
   3.759243044881804*^9, {3.759243131207652*^9, 3.759243211425343*^9}, 
   3.759246597189707*^9, 3.759246687913784*^9, 3.75924701347337*^9, 
   3.759247244078658*^9, 3.7592556297720203`*^9, 3.75961866135559*^9},
 CellLabel->"Out[13]=",ExpressionUUID->"7d8bc7ac-4222-4910-bbc2-377bebf305bf"],

Cell[BoxData["5286.276962145505`"], "Output",
 CellChangeTimes->{{3.759070955384362*^9, 3.759070977652513*^9}, {
   3.759071021266911*^9, 3.75907105987184*^9}, 3.7590710948405046`*^9, 
   3.759071884142231*^9, 3.7590727720663548`*^9, 3.759188120365203*^9, 
   3.759188207894758*^9, 3.759188289719022*^9, 3.7591883455011263`*^9, 
   3.7591883839906178`*^9, 3.759188530724363*^9, {3.759188754722724*^9, 
   3.7591888171367264`*^9}, {3.7591890517720194`*^9, 
   3.7591890797836294`*^9}, {3.759189133713914*^9, 3.759189159968935*^9}, {
   3.7591892115466604`*^9, 3.7591892223785925`*^9}, 3.7591899768159018`*^9, 
   3.7591901754738593`*^9, 3.7591902152142916`*^9, 3.7591903647086954`*^9, 
   3.759190466463532*^9, {3.759191036086466*^9, 3.7591910410587077`*^9}, 
   3.759191100511945*^9, 3.7591914608430557`*^9, 3.759191613308679*^9, 
   3.7591928416955366`*^9, 3.7591929119777985`*^9, 3.759193090535079*^9, {
   3.759193267218831*^9, 3.7591932917473707`*^9}, 3.7591933593193345`*^9, {
   3.7591934166276407`*^9, 3.759193456845788*^9}, 3.7591945536547327`*^9, 
   3.7591948491173277`*^9, 3.7591950772002106`*^9, 3.7591952715910254`*^9, 
   3.759195479261425*^9, {3.7591958472870445`*^9, 3.7591960020553913`*^9}, 
   3.7591960854514437`*^9, 3.759196144367815*^9, 3.759231243787692*^9, {
   3.7592312769900103`*^9, 3.7592313199027443`*^9}, 3.7592313697604237`*^9, 
   3.7592314147513237`*^9, 3.7592314882450323`*^9, 3.759231606674178*^9, 
   3.759231667079802*^9, 3.759231710336154*^9, 3.759232012178594*^9, 
   3.759232512186304*^9, 3.759232560956871*^9, 3.7592330487104273`*^9, 
   3.759243044881804*^9, {3.759243131207652*^9, 3.759243211425343*^9}, 
   3.759246597189707*^9, 3.759246687913784*^9, 3.75924701347337*^9, 
   3.759247244078658*^9, 3.7592556297720203`*^9, 3.759618661659857*^9},
 CellLabel->"Out[14]=",ExpressionUUID->"ad0a7f51-d224-49bf-a82f-7abba4b44e08"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"Mass", "[", 
   RowBox[{"boatregion_", ",", " ", "boatdensity_"}], "]"}], ":=", 
  "1400."}], "\[IndentingNewLine]", 
 RowBox[{"boatmass", "=", "1000."}], "\[IndentingNewLine]", 
 RowBox[{"boatcom", " ", "=", " ", 
  RowBox[{"{", 
   RowBox[{"0", ",", "34.16", ",", " ", "2.5"}], "}"}]}]}], "Input",
 CellChangeTimes->{{3.75907084715088*^9, 3.7590709012747087`*^9}, 
   3.759071138603026*^9, {3.759071259499156*^9, 3.759071266928605*^9}, {
   3.759071300947072*^9, 3.759071307409132*^9}, 3.759071376767318*^9, {
   3.7591899840798655`*^9, 3.7591899848487515`*^9}, {3.759190121162506*^9, 
   3.759190126490387*^9}, {3.759231845123139*^9, 3.7592318602254477`*^9}, {
   3.759251439590783*^9, 3.759251476239232*^9}, {3.759253306941372*^9, 
   3.759253307045931*^9}, {3.759253448364478*^9, 3.7592534484828157`*^9}, {
   3.759253537476088*^9, 3.7592535375769997`*^9}, {3.759255457258191*^9, 
   3.759255457331435*^9}, {3.7592592631705847`*^9, 3.759259263352057*^9}, {
   3.759262744551395*^9, 3.759262744589581*^9}, {3.7593434501253347`*^9, 
   3.759343503661457*^9}, 3.7593457199445267`*^9, {3.75934639664704*^9, 
   3.759346399249103*^9}, {3.7593472843614893`*^9, 3.759347287275352*^9}, {
   3.759619478431678*^9, 3.759619494941098*^9}},
 CellLabel->
  "In[102]:=",ExpressionUUID->"148f209f-1c4c-4a67-bd1b-e73e94ce68a7"],

Cell[BoxData["1000.`"], "Output",
 CellChangeTimes->{3.759259263929592*^9, 3.7593435060707407`*^9, 
  3.759345720642428*^9, 3.75934640035091*^9, 3.759347288269042*^9, 
  3.759618662637723*^9, 3.759619495736557*^9},
 CellLabel->
  "Out[103]=",ExpressionUUID->"6f662560-c5dd-4e09-b144-1a34a799698b"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "34.16`", ",", "2.5`"}], "}"}]], "Output",
 CellChangeTimes->{3.759259263929592*^9, 3.7593435060707407`*^9, 
  3.759345720642428*^9, 3.75934640035091*^9, 3.759347288269042*^9, 
  3.759618662637723*^9, 3.759619495742299*^9},
 CellLabel->
  "Out[104]=",ExpressionUUID->"778973bd-fab2-41f4-93f8-582b01e60ee0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["1400.`"], "Input",
 CellChangeTimes->{{3.759259253589293*^9, 3.759259253654072*^9}},
 CellLabel->"In[46]:=",ExpressionUUID->"45362d03-ccfa-46ee-833d-2447bb7bda85"],

Cell[BoxData["1400.`"], "Output",
 CellChangeTimes->{
  3.7591901270370865`*^9, 3.7591901842152624`*^9, 3.7591902170444508`*^9, 
   3.7591903679788785`*^9, 3.7591904682806416`*^9, 3.7591910413266835`*^9, 
   3.75919110077754*^9, 3.759191461129629*^9, 3.7591916135899086`*^9, 
   3.7591928435437527`*^9, 3.759192912277458*^9, 3.7591930948705883`*^9, 
   3.75919329235915*^9, 3.759193457457187*^9, 3.7591945543443193`*^9, 
   3.7591948497920103`*^9, 3.7591950778719225`*^9, 3.7591952722982407`*^9, 
   3.759195479933139*^9, 3.759196015161483*^9, 3.7591961520562525`*^9, {
   3.759231845446526*^9, 3.759231861540543*^9}, 3.759233055095726*^9, 
   3.759246692000321*^9, 3.759247016850753*^9, 3.759247245832082*^9, {
   3.759251453654491*^9, 3.759251476764043*^9}, 3.7592533084729443`*^9, 
   3.7592533755081673`*^9, 3.759253449016714*^9, 3.7592535381777782`*^9, 
   3.759255458483305*^9, 3.759255634325502*^9, 3.759259255471898*^9},
 CellLabel->"Out[46]=",ExpressionUUID->"91f981d3-7d8a-4226-94ce-dc3c03bc8bda"]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Waterline3D", "[", 
   RowBox[{"\[Theta]_", ",", " ", "\[Phi]_"}], "]"}], ":=", " ", 
  RowBox[{"Quiet", "[", 
   RowBox[{"ImplicitRegion", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"Piecewise", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"y", ",", " ", 
            RowBox[{"\[Phi]", "\[Equal]", "90"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"x", ",", " ", 
            RowBox[{"\[Theta]", "==", "90"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "z"}], ",", " ", 
            RowBox[{
             RowBox[{"\[Theta]", ">", "90"}], "||", 
             RowBox[{"\[Phi]", ">", "90"}]}]}], "}"}]}], "}"}], ",", "z"}], 
       "]"}], "\[LessEqual]", 
      RowBox[{"Piecewise", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"draft", ",", " ", 
            RowBox[{
             RowBox[{"\[Theta]", "\[Equal]", "90"}], "||", 
             RowBox[{"\[Phi]", "\[Equal]", "90"}]}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{
             RowBox[{"-", "1"}], "*", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{
                RowBox[{"Tan", "[", 
                 RowBox[{"\[Theta]", "*", 
                  RowBox[{"\[Pi]", "/", "180"}]}], "]"}], "*", "x"}], "+", 
               RowBox[{
                RowBox[{"Tan", "[", 
                 RowBox[{"\[Phi]", "*", 
                  RowBox[{"\[Pi]", "/", "180"}]}], "]"}], "*", "y"}], "+", 
               "draft"}], ")"}]}], ",", " ", 
            RowBox[{
             RowBox[{"\[Theta]", ">", "90"}], "||", 
             RowBox[{"\[Phi]", ">", "90"}]}]}], "}"}]}], "}"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"Tan", "[", 
           RowBox[{"\[Theta]", "*", 
            RowBox[{"\[Pi]", "/", "180"}]}], "]"}], "*", "x"}], "+", 
         RowBox[{
          RowBox[{"Tan", "[", 
           RowBox[{"\[Phi]", "*", 
            RowBox[{"\[Pi]", "/", "180"}]}], "]"}], "*", "y"}], "+", 
         "draft"}]}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"x", ",", 
         RowBox[{"-", "15"}], ",", "15"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"y", ",", "0", ",", "60"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"z", ",", "0", ",", "30"}], "}"}]}], "}"}]}], "]"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"CalculateDraft3D", "[", 
   RowBox[{"boatregion_", ",", " ", "\[Theta]_", ",", " ", "\[Phi]_"}], "]"}],
   ":=", 
  RowBox[{"Quiet", "[", 
   RowBox[{
    RowBox[{"FindRoot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"Integrate", "[", 
        RowBox[{"1.", ",", " ", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"x", ",", "y", ",", "z"}], "}"}], "\[Element]", 
          RowBox[{"RegionIntersection", "[", 
           RowBox[{"boatregion", ",", " ", 
            RowBox[{"Waterline3D", "[", 
             RowBox[{"\[Theta]", ",", " ", "\[Phi]"}], "]"}]}], "]"}]}]}], 
        "]"}], "\[Equal]", 
       RowBox[{"boatmass", "/", "1."}]}], ",", 
      RowBox[{"{", 
       RowBox[{"draft", ",", " ", 
        RowBox[{"1", "-", 
         RowBox[{
          RowBox[{"Tan", "[", 
           RowBox[{"\[Theta]", "*", 
            RowBox[{"\[Pi]", "/", "180"}]}], "]"}], "/", "3"}], "-", 
         RowBox[{
          RowBox[{"Tan", "[", 
           RowBox[{"\[Phi]", "*", 
            RowBox[{"\[Pi]", "/", "180"}]}], "]"}], "/", "3"}]}]}], "}"}]}], 
     "]"}], "[", 
    RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"DisplacedWater3D", "[", 
   RowBox[{"boatregion_", ",", " ", "\[Theta]_", ",", " ", "\[Phi]_"}], "]"}],
   ":=", " ", 
  RowBox[{"Quiet", "[", 
   RowBox[{
    RowBox[{"RegionIntersection", "[", 
     RowBox[{"boatregion", ",", " ", 
      RowBox[{"Waterline3D", "[", 
       RowBox[{"\[Theta]", ",", " ", "\[Phi]"}], "]"}]}], "]"}], "/.", 
    RowBox[{"CalculateDraft3D", "[", 
     RowBox[{"boatregion", ",", " ", "\[Theta]", ",", " ", "\[Phi]"}], 
     "]"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"CenterOfBuoyancy3D", "[", 
   RowBox[{"boatregion_", ",", "\[Theta]_", ",", " ", "\[Phi]_"}], "]"}], ":=", 
  RowBox[{"Quiet", "[", 
   RowBox[{"RegionCentroid", "[", 
    RowBox[{"DisplacedWater3D", "[", 
     RowBox[{"boatregion", ",", "  ", "\[Theta]", ",", " ", "\[Phi]"}], "]"}],
     "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"RightingMoment3D", "[", 
   RowBox[{"boatregion_", ",", " ", "\[Theta]_", ",", " ", "\[Phi]_"}], "]"}],
   ":=", 
  RowBox[{"Quiet", "[", 
   RowBox[{"Cross", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"CenterOfBuoyancy3D", "[", 
       RowBox[{"boatregion", ",", " ", "\[Theta]", ",", " ", "\[Phi]"}], 
       "]"}], "-", "boatcom"}], ",", " ", 
     RowBox[{"boatmass", "*", "9.8", "*", "0.001", "*", 
      RowBox[{
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", 
           RowBox[{"Tan", "[", 
            RowBox[{"\[Theta]", "*", 
             RowBox[{"\[Pi]", "/", "180"}]}], "]"}]}], ",", " ", 
          RowBox[{"-", 
           RowBox[{"Tan", "[", 
            RowBox[{"\[Phi]", "*", 
             RowBox[{"\[Pi]", "/", "180"}]}], "]"}]}], ",", "1"}], "}"}], "/", 
        RowBox[{"Piecewise", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "1"}], ",", " ", 
             RowBox[{
              RowBox[{"\[Theta]", ">", "90"}], "||", 
              RowBox[{"\[Phi]", ">", "90"}]}]}], "}"}], "}"}], ",", "1"}], 
         "]"}]}], "/", 
       RowBox[{"Norm", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", 
           RowBox[{"Tan", "[", 
            RowBox[{"\[Theta]", "*", 
             RowBox[{"\[Pi]", "/", "180"}]}], "]"}]}], ",", " ", 
          RowBox[{"-", 
           RowBox[{"Tan", "[", 
            RowBox[{"\[Phi]", "*", 
             RowBox[{"\[Pi]", "/", "180"}]}], "]"}]}], ",", "1"}], "}"}], 
        "]"}]}]}]}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.75907150036087*^9, 3.75907151420553*^9}, {
   3.759071689998314*^9, 3.759071692052773*^9}, {3.759071729200437*^9, 
   3.7590717906234617`*^9}, {3.7590718315538177`*^9, 3.75907184764012*^9}, {
   3.759190139449133*^9, 3.7591901402817287`*^9}, {3.7591945137812686`*^9, 
   3.7591945507377234`*^9}, {3.7591962012005296`*^9, 
   3.7591962031752744`*^9}, {3.7592318052310867`*^9, 3.759231837116363*^9}, {
   3.7592320308419333`*^9, 3.759232031476864*^9}, {3.759232595207486*^9, 
   3.7592326043528748`*^9}, {3.75923265937434*^9, 3.759232662472035*^9}, {
   3.75924696984558*^9, 3.759246985264812*^9}, 3.759253436990367*^9, {
   3.759255578825295*^9, 3.7592555854337683`*^9}},
 CellLabel->
  "In[105]:=",ExpressionUUID->"0440646f-917b-4090-ad63-896091dbb2a8"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"f", "[", 
   RowBox[{"angle1_", ",", " ", "angle2_"}], "]"}], ":=", 
  RowBox[{"N", "[", 
   RowBox[{"RightingMoment3D", "[", 
    RowBox[{"hullreg", ",", " ", "angle1", ",", " ", "angle2"}], "]"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable1", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "0.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "0."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable2", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "2.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "2."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable3", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "4.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "4."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable4", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "6.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "6."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable5", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "8.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "8."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable6", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "10.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "10."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"angleTable7", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Parallelize", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"angle1", ",", " ", "12.", ",", 
          RowBox[{"f", "[", 
           RowBox[{"angle1", ",", "12."}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
       "]"}], "]"}], "]"}]}], ";"}], "//", 
  "AbsoluteTiming"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"angleTable8", "=", 
     RowBox[{"Quiet", "[", 
      RowBox[{"Parallelize", "[", 
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"angle1", ",", " ", "14.", ",", 
           RowBox[{"f", "[", 
            RowBox[{"angle1", ",", "14."}], "]"}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
        "]"}], "]"}], "]"}]}], ";"}], "//", "AbsoluteTiming"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"angleTable9", "=", 
        RowBox[{"Quiet", "[", 
         RowBox[{"Parallelize", "[", 
          RowBox[{"Table", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{"angle1", ",", " ", "16.", ",", 
              RowBox[{"f", "[", 
               RowBox[{"angle1", ",", "16."}], "]"}]}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
           "]"}], "]"}], "]"}]}], ";"}], "//", 
      RowBox[{"AbsoluteTiming", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"angleTable10", "=", 
         RowBox[{"Quiet", "[", 
          RowBox[{"Parallelize", "[", 
           RowBox[{"Table", "[", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"angle1", ",", " ", "18.", ",", 
               RowBox[{"f", "[", 
                RowBox[{"angle1", ",", "18."}], "]"}]}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
            "]"}], "]"}], "]"}]}], ";"}]}]}], "//", 
     RowBox[{"AbsoluteTiming", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"angleTable11", "=", 
        RowBox[{"Quiet", "[", 
         RowBox[{"Parallelize", "[", 
          RowBox[{"Table", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{"angle1", ",", " ", "20.", ",", 
              RowBox[{"f", "[", 
               RowBox[{"angle1", ",", "20."}], "]"}]}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{"angle1", ",", "1.", ",", "176.", ",", "5."}], "}"}]}], 
           "]"}], "]"}], "]"}]}], ";"}]}]}], "//", "AbsoluteTiming"}], 
   "\[IndentingNewLine]", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"data", " ", "=", " ", 
   RowBox[{"Union", "[", 
    RowBox[{
    "angleTable1", ",", " ", "angleTable2", ",", " ", "angleTable3", ",", " ",
      "angleTable4", ",", " ", "angleTable5", ",", " ", "angleTable6", ",", 
     "angleTable7", ",", " ", "angleTable8"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"xdata", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "2"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "3", ",", " ", "1"}], "]"}], "]"}]}], "}"}], 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{"i", ",", " ", "1", ",", " ", 
       RowBox[{"Length", "[", "data", "]"}], ",", "1"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ydata", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "2"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "3", ",", " ", "2"}], "]"}], "]"}]}], "}"}], 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{"i", ",", " ", "1", ",", " ", 
       RowBox[{"Length", "[", "data", "]"}], ",", "1"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"zdata", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "2"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "3", ",", " ", "3"}], "]"}], "]"}]}], "}"}], 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{"i", ",", " ", "1", ",", " ", 
       RowBox[{"Length", "[", "data", "]"}], ",", "1"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normdata", " ", "=", " ", 
   RowBox[{"Quiet", "[", 
    RowBox[{"Parallelize", "[", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{"i", ",", " ", "2"}], "]"}], "]"}], ",", " ", 
         RowBox[{"Quiet", "[", 
          RowBox[{"Norm", "[", 
           RowBox[{"data", "[", 
            RowBox[{"[", 
             RowBox[{"i", ",", " ", "3"}], "]"}], "]"}], "]"}], "]"}]}], 
        "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"i", ",", " ", "1", ",", " ", 
         RowBox[{"Length", "[", "data", "]"}], ",", "1"}], "}"}]}], "]"}], 
     "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Quiet", "[", 
  RowBox[{"ListPlot3D", "[", 
   RowBox[{"normdata", ",", 
    RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
    RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
    RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"ydata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"120", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], "]"}],
    ",", 
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"xdata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"120", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
    "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"xdata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"ydata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.759071972719798*^9, 3.759072000466646*^9}, {
   3.7590728096669416`*^9, 3.7590728370525837`*^9}, {3.759072925626684*^9, 
   3.759073043280994*^9}, {3.7590733389563932`*^9, 3.759073395969692*^9}, {
   3.759073737971199*^9, 3.759073745068993*^9}, {3.759196286946718*^9, 
   3.759196350019063*^9}, {3.7591968986470656`*^9, 3.7591969019949427`*^9}, {
   3.759196953944845*^9, 3.7591969568600082`*^9}, 3.7591970221001887`*^9, {
   3.7591973124142914`*^9, 3.7591973418859725`*^9}, {3.759197599361195*^9, 
   3.759197599533065*^9}, {3.759197840707432*^9, 3.759197840879014*^9}, {
   3.7592327247668533`*^9, 3.75923278672547*^9}, {3.759233074147759*^9, 
   3.759233089106287*^9}, {3.759233164075914*^9, 3.7592331641651173`*^9}, {
   3.7592332034436283`*^9, 3.7592332264305553`*^9}, {3.759233329409387*^9, 
   3.759233330562262*^9}, {3.759233374509461*^9, 3.759233375405281*^9}, {
   3.759235205597747*^9, 3.7592352096624928`*^9}, {3.759246554546398*^9, 
   3.7592465783867483`*^9}, {3.75924720921434*^9, 3.759247230869266*^9}, {
   3.7592486515739813`*^9, 3.759248754141222*^9}, {3.759248788809889*^9, 
   3.759248800420772*^9}, {3.759248841941307*^9, 3.759248904059903*^9}, 
   3.759248974456441*^9, {3.759249700079706*^9, 3.759249784582097*^9}, {
   3.759255657163827*^9, 3.759255662485325*^9}, {3.759344774221476*^9, 
   3.759344784093149*^9}},
 CellLabel->
  "In[110]:=",ExpressionUUID->"b677da27-0834-4a54-b1eb-70a1b1a91310"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"26.017744`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759619545764861*^9},
 CellLabel->
  "Out[111]=",ExpressionUUID->"afa328e4-b6e9-4695-88be-794aa61132cb"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"79.865405`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759619625629786*^9},
 CellLabel->
  "Out[112]=",ExpressionUUID->"6c789a9a-7725-4409-807f-cd9168c1ba7e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"80.896742`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759619706527018*^9},
 CellLabel->
  "Out[113]=",ExpressionUUID->"591eae45-bde0-4acc-857f-d20ed63b6505"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"77.283469`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.7596197838110533`*^9},
 CellLabel->
  "Out[114]=",ExpressionUUID->"1ab89842-f2ef-47c1-b564-55fb006fb92b"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"84.821221`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759619868632723*^9},
 CellLabel->
  "Out[115]=",ExpressionUUID->"528bfcaa-77c7-46bf-ba4d-47ba7cfbe7cd"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"87.141923`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759619955775386*^9},
 CellLabel->
  "Out[116]=",ExpressionUUID->"1c78b3b9-6750-4ba8-92bf-0dab094a1be2"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"84.268924`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759620040045044*^9},
 CellLabel->
  "Out[117]=",ExpressionUUID->"8000754b-a2d0-4d65-a58b-d1ade205ca3e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"86.29026`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759620126336121*^9},
 CellLabel->
  "Out[118]=",ExpressionUUID->"4d1605a7-c8ab-4ac6-8adc-c12f15399789"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126365715*^9},
 CellLabel->
  "(kernel 12)",ExpressionUUID->"44b0fd3a-f8f5-4465-93c5-bf76f375dbd4"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126393525*^9},
 CellLabel->
  "(kernel 11)",ExpressionUUID->"8ed28d46-c70b-4838-ae9a-0a0aa40bfb4e"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201264227047`*^9},
 CellLabel->
  "(kernel 10)",ExpressionUUID->"b6376922-e3f3-4845-a6fb-27fc95dfb493"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126454385*^9},
 CellLabel->
  "(kernel 9)",ExpressionUUID->"95b27476-fa62-488a-8b4b-0785a6fac04a"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126485907*^9},
 CellLabel->
  "(kernel 8)",ExpressionUUID->"30baebfc-bdf8-4dab-8218-b27e007d034a"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126519186*^9},
 CellLabel->
  "(kernel 7)",ExpressionUUID->"0e6b7f63-3a06-4532-abfc-a6facf3516c5"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126554656*^9},
 CellLabel->
  "(kernel 6)",ExpressionUUID->"11cbb9fc-6985-4e5e-807b-a312bc9dba4b"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126591044*^9},
 CellLabel->
  "(kernel 5)",ExpressionUUID->"f26aeb05-1290-4a44-862e-7826d52b80a5"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.75962012662904*^9},
 CellLabel->
  "(kernel 4)",ExpressionUUID->"92327a3d-42d5-4a17-8528-b66d22f05ead"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126667878*^9},
 CellLabel->
  "(kernel 3)",ExpressionUUID->"82be24d6-5caa-4602-b3d7-5aea027061f5"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201267033367`*^9},
 CellLabel->
  "(kernel 2)",ExpressionUUID->"8844f453-6dba-4d14-97fc-b19bdf0810bc"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126739212*^9},
 CellLabel->
  "(kernel 1)",ExpressionUUID->"e5d7449d-5d0d-4ca0-9c02-467562c2138b"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126776429*^9},
 CellLabel->
  "(kernel 12)",ExpressionUUID->"ba88abe3-1c14-4e95-994e-1a88483a0f57"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126814205*^9},
 CellLabel->
  "(kernel 11)",ExpressionUUID->"0ad28544-0fde-4f29-82ee-0138289321f4"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126851293*^9},
 CellLabel->
  "(kernel 10)",ExpressionUUID->"549e3a88-2b12-4c9b-a449-ac94077eae9c"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620126886065*^9},
 CellLabel->
  "(kernel 9)",ExpressionUUID->"7c0de800-93a9-4810-b9d2-82aa6077e683"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201269261312`*^9},
 CellLabel->
  "(kernel 8)",ExpressionUUID->"c08ba466-507a-4c95-a234-31be069b38b1"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201269649467`*^9},
 CellLabel->
  "(kernel 7)",ExpressionUUID->"7c662218-c1e3-42c8-80b0-8c989773a206"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127005973*^9},
 CellLabel->
  "(kernel 6)",ExpressionUUID->"61efa16f-ca33-4312-bff4-3be37bf50ff7"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127048347*^9},
 CellLabel->
  "(kernel 5)",ExpressionUUID->"11735330-883d-4e82-a889-99deca4466ba"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127088928*^9},
 CellLabel->
  "(kernel 4)",ExpressionUUID->"9add45d6-93e8-4e74-bd28-b4a1ba037578"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127130844*^9},
 CellLabel->
  "(kernel 3)",ExpressionUUID->"e0b79f97-e5a9-4060-b281-23f2073092f1"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127172682*^9},
 CellLabel->
  "(kernel 2)",ExpressionUUID->"5fda0e81-315f-4082-8117-8a32fabf5ff7"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127211932*^9},
 CellLabel->
  "(kernel 1)",ExpressionUUID->"2ada5770-ee06-4872-ae65-dd6c0d54e9e1"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127251071*^9},
 CellLabel->
  "(kernel 12)",ExpressionUUID->"f28fe2b8-6ff6-4454-9a5e-df3b05ce0b96"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127291307*^9},
 CellLabel->
  "(kernel 11)",ExpressionUUID->"0057b5c2-2df1-403f-a0a2-cf186eb7c05e"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127333075*^9},
 CellLabel->
  "(kernel 10)",ExpressionUUID->"660ceed5-32cc-4def-ac8a-d681297b1ff2"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127378292*^9},
 CellLabel->
  "(kernel 9)",ExpressionUUID->"a624eb02-9b7e-4157-9e5e-b417a5687e20"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127420959*^9},
 CellLabel->
  "(kernel 8)",ExpressionUUID->"4554fe82-f9a1-4b3d-a1ec-c58e0e5f78e4"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201274728928`*^9},
 CellLabel->
  "(kernel 7)",ExpressionUUID->"10a69463-08cd-47a1-bddf-e62bac1f1609"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.75962012751958*^9},
 CellLabel->
  "(kernel 6)",ExpressionUUID->"32ce72a0-63c0-4716-b7c8-d71661ccd260"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127564539*^9},
 CellLabel->
  "(kernel 5)",ExpressionUUID->"c6da5246-fc97-4cec-9522-00b0e3660e6f"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127608749*^9},
 CellLabel->
  "(kernel 4)",ExpressionUUID->"268ee894-5d8b-4755-843e-02a0432a9abf"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127656007*^9},
 CellLabel->
  "(kernel 3)",ExpressionUUID->"8ab39917-a550-41a0-a622-7ce0f563d318"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201277032022`*^9},
 CellLabel->
  "(kernel 2)",ExpressionUUID->"0253e2b2-371a-4cd7-92b4-cf0c876287b2"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Det", "::", "mindet"}], "MessageName"], " ", ":", 
  "  ", "\<\"Input matrix contains an indeterminate entry.\"\>"}]], "Message",\
 "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127746697*^9},
 CellLabel->
  "(kernel 1)",ExpressionUUID->"9168969e-7aac-4828-bcda-15b767ccef5c"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127796666*^9},
 CellLabel->
  "(kernel 12)",ExpressionUUID->"4b64e80e-fb32-4f4b-856a-30715996d817"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127847637*^9},
 CellLabel->
  "(kernel 11)",ExpressionUUID->"7c0bdb9e-c2cf-4904-a320-67ec52657a26"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201278882113`*^9},
 CellLabel->
  "(kernel 10)",ExpressionUUID->"180492df-4eee-48b5-8fcf-05e034ca7791"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.7596201279335546`*^9},
 CellLabel->
  "(kernel 9)",ExpressionUUID->"48d6f494-19ea-4741-ba81-01dc66ee44ca"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620127986738*^9},
 CellLabel->
  "(kernel 8)",ExpressionUUID->"c5f0847d-a318-4eac-a2d5-e7f232707a39"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128034438*^9},
 CellLabel->
  "(kernel 7)",ExpressionUUID->"c2e05188-7695-40b2-92a4-93177c88a2f4"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128074758*^9},
 CellLabel->
  "(kernel 6)",ExpressionUUID->"2919e7c3-8d34-4cc8-a175-80403d348385"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128119472*^9},
 CellLabel->
  "(kernel 5)",ExpressionUUID->"11da1717-1e68-414d-b6a3-68e2cb37f0f0"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128159223*^9},
 CellLabel->
  "(kernel 4)",ExpressionUUID->"459eeff0-d88a-40f4-844d-42444a6a299c"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128199785*^9},
 CellLabel->
  "(kernel 3)",ExpressionUUID->"8a029b13-0c43-48ff-8428-c236379494b7"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128238637*^9},
 CellLabel->
  "(kernel 2)",ExpressionUUID->"a98db62c-364f-42c4-a5b8-dd77902ed105"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], " ", ":", 
  "  ", "\<\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Det\\\", \
\\\"::\\\", \\\"mindet\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"\>"}]], "Message", "MSG",
 ShowCellLabel->True,
 CellChangeTimes->{3.759620128276908*^9},
 CellLabel->
  "(kernel 1)",ExpressionUUID->"2dbb190b-5ad0-45d0-8802-e3ac2c92ba00"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxl2HtUTlkfB/CTECqdmOGUJqc66uBQUQZJ35LSvZ56uupORI1KFzQzQuQy
DcmQitxv5TLVDMLbZajpzX3kFoohmWnIhCHS21pvJ2v95vmr81mrZ3/3Pnv/
9t6PQcQixdw+DMMMV2EYVUb+tNnIf8UYrq41LzcFcah8mLVr0kxz4iysW3S9
+71xIM6hz2fsAu8qL+I8YhYpxh9/70tcwObnK/ds0Q4iLkJVpX30te0hxCV8
0Zaw+21pGOT25PxDN++rObjElDqiFx3S6LtnAnEWBneXrNeKdiTOQTG1Q6Oy
3Ys4jyrX6xVWRn7EBdSrDjZpnBhEXETtHtOO8adCiEsYKHk+N6yS8xv35h/d
185x6ihT6lhx99K1VdWWxFk0/6XXNXfVLOIcMk+U5Z2JVRDnkeZ64MjddD/i
ArKmLDDQWBdEXMSeYx4Ry1RDiUvQbdBd4/xIzm/Wm79vRlDq6GpT6vgj9IJ2
3ddTibNIuzz8arWbM3EOAQ9i1rlZehPnod91nT0h+BMXYK0wqn31+WziIv4I
qW1/kRRKXIJVNPtyfb/wnmd5XBnGxOzwpBk/mFPHpa7A43mzQZzFU4uO/vV3
XIlziI0xdW9S+BDnMdAw8uqQ/gHEBTQPLK/eUTWbuIjSy6F/Gt0LJS7BXq9r
jZGOnF8eV4ZJfjl/q1qVJXXEKfOsytztibPQ8HneEGDkSZyDyo0rHdbnlMR5
qBzbMm78iwDiAgoMOkyneQUTF1EctXmdoUYYcQnimErGmpPz2/TmD1z1ZYmG
hzV19H+hNltp7EScRXxrkk+2kYI4B+uh9vkHBvoR53H3RNOqtXsDiQtYYeHc
plEYTFwEMyLi42btMOISgq/vvFioIue3680/6llGwwtre+qITre/ZNrXnTgL
11XKi8PuexPnMCQ7zlDs8CPOQ/NN1fqXWkHEBZROq9px4EIwcRGHHDZGLnkb
SlzCuzPSDwE3evqVJudlmI+vJrko9ztRh2nxV8vLP3oSZ/G6uE0zTlIS5/Dw
lvdd1fX+xHlEdDazf1kGERewuC70VeruYOIi2JoRoXNzQolLmJyT/8W5jfJ7
kes3wxzb1G/l1Wtu1FGcfSDvyVoFcRZztI66+A31Jc7Be+TRY+0X/Inz0N7/
QC1cL4i4gP3nTVydZgQTF7HvXUPOzX6hxCVs8MgqujdRHn95XjNMulIttWut
J3WkLlnmYHfQm3h3/Xy7RTckw5c4h4GvQw5rnvInzqN5hFV9U00gcQH7+MVW
o0pnExdx59T2Fx7uIcQlmJ7coX8pU+6XXP8YxtTwofvMq17U8W7A+XnasT7E
WQTHWRqP2eJLnMMw5SPGLMifOI/M0fkxRaMCiQvQrMxCcWMQcRFDczVvZ80L
Ji7hfN0ai+O5cr/kdckw58NfReufVVBHU1l7cmKTD3EWETEty5MX+RLnUKAc
qaKs9yPOIzrzmxOFtgHEBeieVB/+1Y+BxEWsDkjITBsxm7gEh038zepAeb3I
9ZthNnpsOD5/ijd1pMeUjnn9zoc4C3fL+feiR/sS5/Bq+tkVrVZ+xHnUvdEr
cFP4Exfw5azVG0YsDCAuYuvk7BcL0wOJS1gd10fXPq/nfVXI84VhRtqEO861
9aaOK/OPaEdv9SHO4tyexvtH/qMkzkHn+MTbeZm+xHn8c+53VZdAP+IC4iWh
7bboT1yE7rWKiLNvqUuwTtxzYnqtvA/K9ZthMsAkX1H1po6u7XeEohbq3efP
2rt2c371Ic4h+bDzlLxcJXEelSmDvvX38CUuwD5tjXFtM3URlx/klw1O8SMu
gbv38y9LBvT0C3L7DNPv1bokKVtBHYl5y5+d0/MmziKrISrv2n7qHGr79hlz
eJwPcR5fP3V+t6CEuoAk0atDe5KSuIjlRlO3+JVSlxCVtPl+tiTPW3mcGOZN
fWvCug9e1HFsbLTT/UkK4iwwJjPeJ546h51OudV9iqjz+GnNOfcPzdQFLB25
1lBp6E1cRPyur90NQqhLWJTfeiQxV57n8ntjmOZdzeFjnbyoI7GyUE/NijqL
Ox9PxzVI1Dn88lvT0QJ96t31MyGq05mlLqCrZpzrDRXqIgabH5k4od2TuIRd
LcLDwMfyepbrdPd/PF83/ue0fznmffb0c4tx1FmUHBh4+2CJB3EOemUZzTqa
1Hkc1wh/WBLlTlxAp6uaR2KFG3ERdv/Y6obqUpfwbNCCW3oJPfsB5HXMMOWf
7X3t4uNBHe7mxq21hu7Eu8c/4vvhinb6PRw2HrrYdPuMC3Ee6xxr1f+OdyYu
4ILpYy1NfSfiIlKti2pc6xyJS3ALOfm+IKPn3p0m74cM8+WAb87k5rhRx+VB
8TuvXXYhzuKkxaVvn993Is5Bffmyqsp6R+I8XIqHxlhfn0m8+/xcEBfGvptB
XER7zQnXqd/YEZeg3aDur7PT9v/PFfK+zTBrfzT/kHTDhTo+7E30S5OciLN4
mVteY6t0IM5h3hvng2arZxDvHv+KR/rNWrRdAVUnfD+PaJlOXMR3m2evscmk
LuFhm9rT6zfk+6B8vug+f965sc/0tRN1tAfpl2e7OhBnccB8qzJdHp9e55Dy
c6D+Mq3pxHlUPzkydP+ZKcQFqP/z6nTK0qnERZz/4DMiIIjmlKDfyu6rd+p5
j5B/n2CYlNbEuhbNWdQxYdvzFQZ2M4izaEx+W5pfN404h7rOew9LwyyJ85AO
+aY2/MsFLCm70pEi97fXRbgdbijJWUtzStBxNtBxbOtZd2nyOZRhtNtC+r81
d6COwUPepxVyIM4iJ/nILNexFsQ5dJYGvcxQH0+cx+NvHealHpxMXEDGhQUu
0dPsiYvILij4/enfNGf3+blYMPl4sWcfCZPvMQwTsHhNwtJ4e+qYsCvwbVPx
FOLd53/Nqxsq042Jc/i4zX/hqUFmxHksNLS8WjnVlriA2xrlzpHjXYiLSP+j
DxM/l+aUsKnj4XTTO/J+IN+DGablfd8J2+7YUceDlZa35o2aSJyFSbRZpJnL
EOIctn97xiTv2mTiPEKOLnYuL3QkLsAmzMVnr6kXcRFG29uNzuvRnBLmq9ea
r1zfU492fcpf2dJXW2exLXVonK7ZOfPSaOIsDFXD7StNTIhzeGx3a8j0eXbE
eeixWrbF4e7EBVhWmexv/MmHuAjFrKb12scCiEt431nYUtvZs54R0Ztfp+Hy
lsU2oI6FrU/aC5caEGeRPHxHdUHjJOIcqqb56B8rm0WcB+bHxe7MURAXUKGY
MiPXxp+4iEHZ5rnhY2lOCb8MsL2Zv7lnPjV9ynm8faO5XYAxcRari9SjtRS2
xDk0+nl07fbwIM5jQ37KxSLBl7gA3Ld56X01iLiIL05Hl3Va0DwSsk/Gc3sf
9Ix7WmRvzrC/tuxfeWgCcRa7nFbf8kpyJM5B37hkeMVYb+I8orIYdcWFAOIC
PgwLWRw5PpS4iKOVoebfZdE8EtxvPL44Rs7Nz+nN6fmCu3l2mxVxFo+eaLy7
ruVOnIN5eeyfg371Jc6jfalqcYN9MHEB0liF1q+a4cRFaF0ZEWW7j+aREBuf
01C9ryd3xac8SxMM3kXJdabiU57+K8ddGhYWSJzHwZyq/4ZNCyPefY++rFp/
3jKCuIgnyx3y1yfSdiV0JYjPv7fseQ6b25sna29jkeVZJXEOscGbljRUBBPn
oWYWstIzMZy4gOiJqs1z1CKJi7BNGXj/rCptt3tfXtrql58t54vqzWOsHR87
Zbc/cQ5XrrAfRw4KI86jxGPBcAspgrgAo5QfUqOXRxIXUfTb94+TFLRdCe35
Azyf1c7B/wC/ECJ7
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJxNmHlUlVUUxd8DBJmRMaUkJ8g0KZxF0zQhFdTIHCESFRRnJTXFnCsxR1RU
UjQ0UlJKzRHFARxzSEnLBHMkB6REzQnrnMXvW35/7HXvPWefvfe9j8diUStu
ZNQIG4vFUmy1WGxldRF4C1wtlWftOYFqAk+BI3UrHO05s9rQt6Vmh1YVtF3Y
28F3NOl6MeMMzw6uztvD96RfQ+DPjIPATeDO3p6zN5yX0fOiVhWeO/Cgpj4+
zHqSqzr76ngqaglqw3fDz4ez6gcIagoCma2Btzt8XzLVEdQlo7eJo30/4EHN
mxn1eYm6HznqC17Hpzr5atDzZ+YVdGvj60+tJnUv3sgZXV96yqnHvg4Z/OHU
5K4BZPKjX5e5V6kHkO8tQQgZapG7Hty65PTljZTfAM/anI330npDZgPJoefG
giaCtoIwQbjgNXIEkSOQfRD1ADK1FLTCpz5Z38CjIftGzIfg1YA8RpZ68ALJ
ESpojWYIfGOmDhkC0VVeB8G75HhH0F4QzB2C8GmCRwgZNXdTakavKZrBrM3g
tyJ3Y7QaUAulFmSaa8pcIz4fHz7bUHwak09zdkKnJecm3Ec1WgjeFDQXtKFm
9Nrg0Z67h3L/LoII+m+bOOrTGa/28JvDacu+Gefm+Aaj3Rp+MBztd8RDPduR
tS0e7wui6HdEszPZOuDfmX0XNDowr9ww9i1MXmH0WsNvwz0/EPQQ+Mkv1GoC
X2vlz247NN5jH06mPoK++HciayQeEayR+EWh3wV+FHvtd7W8+J6Ece6GXzhz
EfDDTf0I8kay9hNEC7oz241aDzSiyKi5PzTNRXLuyn36mfh92Wu/p8m7K2f1
GyAYiFY03G70e4Hu1FSvvyBOMEbwqWCiIFEwRDAaTh94MegZujHoxuHbD34c
e+1/ZPLuyVnzDRUMYy4a/seC3oJY0Ju5aGZiyDaavL25Sy88+5M7Aa1YZgbh
m4jvAPiJ7LUfDyeWNZ58YwVJzA2EH0s/AZ0haA1kRvUGkyGBcwx9/f7p7y79
zg2npzMpgoWCRdxtLJ6JnIfCH2Hyjues+SYJkpkbBj+B/kgwmNoY3lA/71HU
ta+f/TTBdMEn+CWhl8R5OD3VncD8eDQn4q/9cSbvEZw13wzBTPImwR9JfzwY
RS2JGdWbzJpMvtm82UTuMY39JDT1d4nxvR9E7ng40+Gp5mcm73GcNd8cwVfk
TYY/nv4UMIFaMjOqN5X6FM6zmJlOxtnUJjOTgtcM0z3HwU+hnsLcQnRV73Py
pQoWozET/hT6X4Cp1GYyo/5fUte+/swtF6zAdwb3nQvXmJmL7izWz5hNxT+F
8xy48+DNx0+90gQLqKWibbz1YuYWwJ9PpjWCb9inM7cE7mJ058FfxDsth7OU
3lzOuv9ZcFZQCH8FmisFq5jJECwjbzo+qXgspa61r9HVfOsFG9BbTu4V9NLh
rWR+PlmWUluC1jLun8Zcpsk/HU4ac5p1reB7wTp6a9FLo59BPZOe5vtRsBn9
NeRex9xa9t8yr/xs5rMEq9FcCU8531HPQnMD/Ey805lZhe5q7plBjp2CXXhn
c58cdLPQW0/ujfgad96IZhbrJvib0cpGN5PaFmoZprmNzOn5vOC04JTgBzLk
wNvEfjNZNPd2eDlk2oreT6zm8ybuuZscO5jdTn+bibNfcACvXfAPCnKZz4G7
jfm9gjx6W+Fv5ZzLPhcf1T0qOIb2Tvz20M9Fa4cp2x68djG/m/WgKY+RZQ95
9LwPnTx62+ht4b2y8VOdfMEJQYGl8jtagFY+nHzOmvsXwRnOBWhq/ThaBzgf
pJbPPg/uITj7eYsCanvhHifDEe5wGOxDIw/+Ye5hvHcBdzhEvt8FF8hy1JT7
LB7HOB9n7qRJV/f6c3iaHKfAEVOeQ/DyTW92lr1q6t9Gxt81WivE56ngicBq
rcz3B3NnyKi5f4VbSP0CHK2fM+U7ybkQnYushfBPMKO837jPefoX6Z1CQ+v3
BI8F5YJLzJyHe01QRJYr+BShYWgVoaVrsUn3HOc/0VTtEs6X4BSzV+2bgluC
q6Y7XeBtLlO7SqYr7JVzm7l/BKWCu4IbguusxWS7zv4WM1fxLob3F9lK6F8z
+d1h/hq9O2S4ZdK5wexNsmivDN0S5ovQ+E9gr/+8slbqXGauBJ27+NzD6zaa
ev4bzTLO5XBKmDPqyn8keMhMGe9zHX4pazm1UrxLqd3n/S9z11Jq6qF/A+jf
GvPQfYBPGX09/4vvQ+ZUU78DFfSMutaeggfUHvNG+j6P4ZTzRo+4m/b0+/QE
/iNm7qNj5FDdZ/jqaiszdoLn1CrIor3nZKtgTvVtBO4Cb4GPtdLnJl7aU71n
cPUzdSCzxfribjZwHuDzEL6FmXvk17kqZNOMrgJPgRc+VQWOrDZ4OVkrZ+w4
uzBnz96Bni2zbsy70nPlbIum7p3RdDL5uaHjSL3C9JYezDjxmTig5cjbOZm8
3fH04uxB353/PThT86bvxdmd93enrn39DFy4qy/zHui78HYu8Dzp+cD9HzJH
qJQ=
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0DE0QgEABdCPSKelTyWbv9XGxlZbTdSUrZq0KFs2Nm1sbNnYasvGlo2N
jS2bzSa3cwz3vOUN77yo1akdLwRBsM88F1kixjIrxFklRY4t8myzS5EyB9Rp
cESXHmdccMk1A+4YMuaRCS+88cGUb374nW8xLknIBlkypFlnjZneF5+888oz
Tzww4p5bbriizzmnnNCmySFVKpTYY4cCEZuEJP5/+wMtSyH2
      "],
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwVV3c4VY8bR5JkNI0IUakUiYjSJy0qSWWPEoWQyKjUl1AykpWGCqFEgxBK
Se41Qsm17kC481wSKiqq3/n9dZ7n/eM8533PZy51P3XwuJiIiIiCqIjIDPLZ
Ohx0JE5iAFTJ5S3WL2hIvbLASVhdB2+no/bhSQMYazLWNkqhwbm09eB+gzro
tDVmLZrHA1Op5qaWHQvDjvr/JBybYLR7lVZssQAvbGNuHbHmICr614HYYAbs
Im97v20WYu8MlbVmRwWY9+320pE5LCTccjUurhBCz8Pin+0zAhkpNdKRKXQE
hK4dSC4XwGWWtteDcQGSqIHmBx06YH1h4rW1MQ9VspoUmSo+wldGeIdXtIOz
u+3SrF/9KHv+35b+ShqkEuo70lvq8EHyt8GCRYO4fuOalag/DZW6jS2qT6nY
GNYVzFzBA2GQe96MzkKDqqykvHMzvoe/oag1CPA0JsVTOZKDXa5pOWINDDQl
8BLHmULopsyXWvWfAGmiCVLyM1kwPML/FFcmhJ9Ba3hvOYEnC31uS4TRUciV
kXLPEmC1subaHJ4AEpL1TplrO3BafbB6+2IeUM5S2/uUD3W/tSvl/7SjJvop
S4boBztG1UT+DQ0LHcRf1vTUYTS8Y2TNbjYOPDFf16xCw4G8/tv7QyhQFNG+
b+7CQ9dgRe01hV5M56bRTnZ8gAU9+3L/XwH+5jkpH/nFgfqaiuNXU5l43rV+
8xmRIZQmpcVL1Qqg9sjWQu87EzmzJRrKnwhhzYCCTAuBEeSYvAAdtX6Kfrzj
AvT8JmQZjQJofH1r/ZrSjsP7w/VOfuTi4WBhaFECHznG0npy+R1gnegb7ps1
gLqv1dSJMhqszZWKk9/UIZl2ZnXYDA4sioQ2xV7tWP7kBUXZmwKpA3oF4qU8
nKb2JI8v+QydcvNztsOfoFXGPGzvQGCvSNuCoxVcvP3j7rW6lAUi4vPt89Pk
/fft/S73XYDFfC1RM3Ivn8Xp8nVZQrh5pUUrfSXwrV5XedPnbmzj5flfkhVA
6apxecodATTt3k/Xa7TjVdHCKovzXLwWc1vW7clHhHvzWq+jnbjQ0OK34tkA
Rj86RmvE0dCQPkGxWFQH8YVWEkMlHHxyu1VyNLUTIg0Rt7ubKehol/vipcOH
38LqmKJ//dhzc7zpWUM7Vtmq7FSsJyByrO1H/0UeHpk5SL2NZCHZ28qqgS/E
g7yIMLU1BIhmjz9fJxlIUvmYb6kqRPGyYU3ppwREQ/1jx0e64GEz3fpfDR+1
Pn+TNIMEkE5cRcik0bD6xjh/7j4uLA1jPzof5EN240/nP42dqLHaphdizsar
81uVsISGKw9u5UifoUD3eAY7PpmLbIf6Q19s6SiTXvLK5DgV0/KrelnjfGDd
TolNFYM4nfBbW6GmC2cPvr7nckCINfv3KyVf5ENH61Xu7O0s1A0knnKlCSHt
E/ZwsSeBfYMP79s6MMAoD17u+5zAwetz594PJvD5uGGdx4ou0N69lbuRyodz
p52Rk7MAye+u7Y7YQsMWk7A76/Zzsb/YqMbyEB9P3MoaTaidOHfzYAXjIAfT
XI/2PPcOfEoIHTJJp+C6q3S2ynkerEtcpNtbe3EpoGTdF7NWaOTYOk/1kPxa
teK+WTEHbRbHEj7KMxFSwIxf0iZE+tzcaWVfARSX4Fj0bBamU0NWtrwTQt0/
q3gilYD8ie0sRg8djVd2JzH8CEg+DfNWOkCgOHOrkfyjTvwsuz9uHs9H9bf2
OGl7AYShi0T1dWn4dDL+qM8lLhy0YxaxffhoKXLjfbXshKDN6PKWRC4WntS1
LtxBx6nZH6K/m1MRP9OP+sCfDxuLp29nZwzAXD/otV9vB+x2qJ5pv0XAM+P3
W+paHu5k9OsvvcGC4/vQRg+Sp4ma0g3nCQG8v3EqjxQxURc8VdlF6mQtPN59
IXFiqmP8NyuVjtDb/zXEk3ypefjzetouAtn6wcrPojpxZ3fBdE8hHyUVr1JH
vAQ4HL9P3ciXBrGRncVWX7l4fyGm0iyDDxcFPW9X1w6Iry+iLUvjYZAWdTHo
SB8u3qSu8Nb9BJMX4tc0yf23plYdTEhiQ393oq6uDh30WbYPXiiRuJVWKfZY
zMeUAuuFogsLQ6XxVWu+CXFS2lpshwwBQdXvrH5LJrbc2RTp+H+drEq0cqsg
cIn//FLmWTr8FlsbapG4EVOzWz9oQ8BpbYhS/ItOCKcpHzd852PcO2vuaKIA
O9Ok+w6M0+CazdiwNIWHlJxZi38O8OHVl8p8Ss49uCNVGh58cBQNKgwiB7Dp
U+aP46UdcMtL/LtnDoHIR+5uWgu5CEt5rND/loll3aNFQadJ3bgl5mb9hg83
n4gDmgYsWGjfNH78RYjANfei1qgQcC9bJ9utycSbfCuLknIhFD133JxJ4l3y
8jsblXg61PXCrea9JlBwilewPIyA1fJoW1GTLlhPWi5TOibAwaHx2ULST0Y/
y+T51LQj/1zS+S+2fEjuusIY2iRASdi1BsrHNviJed86sFSA+07JY6eV2Ri7
o9ZUeqIbN0R3mWpeIjDh+Xrb+1k8nNWKmgzMYsG/qmTXHFL3Otx7U3XkBLgW
UrhCTp2FjNjJeeMj5H/ZtP1ShSKBN865K5zXMmEW9Pd0SLUQoU2Pf4rcJVDk
Ie81SaEjSsWK6bCKnEdM360rIfDV11TackY3LvdMpW8YFcCHwW6NnkugcK6i
6MXaDmxVmR1kOc1HgUfNP/VUASJdin4aibZjW/hqBp/062DvogNqhzmYULu6
5kMCA9W7fTeu+kQgLtxQ1oXEl0HQhVLD/1hYuBaOE7lCrKvs0jRUFMDEJHoj
fQkL8XY+389NCuH9wwGZogTmup3xH/Vjolq5f8z5gxB1T2iXHwURSG0/bSSh
z8DqORKK7/KECAgJDc8YIFAfpZR7VJyOk/4TsoezCXjfWWTS7EsgLemX9ZRE
F/SPmbvyXwig6jaSvI/MFfJqaZKL7TtQx34QVqZBIEG2k5u/i4vEGIVbDotY
yCmz7I+cJt+b9qi8nkPyw+df35YTLFzNnHBgpQvx49uKDOu/fGSPKGuvX8Yi
cSBTXzdjCKLMz+MH+wV4fWfv9huNTIgtNHq/b1AI2T8TjuMmBC7kPfu+tJUB
+UMpTpdrhKjOSU/1vUHA7tTEXLt2OgxDWYkD94TIndTu1yJ9bWvdkuxvjG6o
SCfaaBQSsNCqbWAGEHjsea/5p2IXJOR/Og05Ergx9pyy6xUXjKb6iOASFrbo
mUrulxBCpZRuXzfBg6wYQ7bzGImfZgmnr2Ek/nsnjrFb+PBxNz17YB0LfYu2
NZ3iCOFqMTZ6/RqJqxqm4ScR8j1vJAf3/BRCe9H6OO9/Ajx/ufjhzCAmVh+a
bRvRJ8Td4d29W3cSuPgf819tCQMuXtzmfCo5NxvLM04gcPhO9kytcTrCnaLs
pB4LcUHHVzudxIW9l6Zwkz4dS/ZSl/9xIf3jjaIf8ZYLce7kk/nPWdgwp/Cj
dD+BFwcXM68U87BQZmSVXCgL3upqTAHpUyqDHUkpkXxMt+WGN21joWd2pU3g
fSFMUhZ/TV8gwLH25Y9+q7JAgX618iiZP5vD74jlCZBaH9x6bYqJT2lvG5TI
XLF+UTBN8YcAUcFahFcSExKLBn+IEEIskA7W/7iSwJ5cm7p5okzcKth2ldEp
RPm6MoXH5Pd2xV/rtTrNQIb6KfVz28k9Zbtn2JM+kC/ftOLXVdL3lz1QN79H
YGGEv/zYBjJvFhhLqV9nIeyBgsO2bwTKeo8qtrTz4BYuK/Q+yUJW8sJB6R1C
iIeqvVXz5sP05Vk5yd0sHCjK9Y6OE2LlwwKdfD4f33+cmvFuFQsG06dRQRHC
/e8Nw6iDpM44PPmZIMeCorJo26opIWjOir5WlQLkmI2EX59gwttfdPmCf0J4
tjXunvNFgFDjbTmpD5hw1poK+yNHgFO4wGy3KhdagdclJNqY6Nvm6NJnReCe
41vq0AMuDL0+a6aVk34axLyaHk1A/anu0joJHp6oLaE+J3WJ4VdQ1UTq+6zL
J/MyPXnQ/rW5WjeWBelBy8b1QwR+j55K+Efl4WKcqbxUIAtdP7tcTywRYlw+
Lkd3KZnnD/v/OunEwsbzyydH95F5iZJxxiKMD6OZt4bTdrDwYV/koxUXhOin
WYyotpL553nF3jpdFuwGdwVqNgvQ+m+vPjWOA6nltccKOxkY3vHEqYUrQMPd
M+t2UTiYEXpn/V9DJnYkvPW+LELguoKxyNA0BxvWFX+9eosJw4vEM3tl8r9e
PmpYb8jF0n+Lq8/8ZiJaTM/G0pDAXYUFKUMBXFi9uj6rn/S7ydEnw9Jkbnj6
+Z3P3wIuTn4TtJ0m7/NyxGWHpDeBZ0FOrbodXKyeGitWesKCcu7MFKMIAtJL
0m7W/OXCsa1vdcF9Fm4QI5la5wQI4/GDh+hsFAfsZbgW0hFR7cgrPi2ArF3a
3N9NbARNW36lkr4/49HbZkM/AWLur3QTfcOGd13FY7XzdIzUR9u9IHN7vftL
2s9nbHB7dJKOeNBho+R3YeURATyTHZ53Z7OxnDKLGbKXjtfZeQpXHUifUk2a
nZ7KxtL5HV6HSD7+uWLYwzpA6n9Wzg2tS2w8lBmOFSymo+XeK8sFe0m9fqxf
cDmEjT4jbcYyMTqaNnwQi10iwOYP4iHmC9i4dlB1Sb9zN8TuHit1meRjpSzz
w1jNIMRVbjGufOpC+JPTvK1tfDj9dLrzxn8QW3YobfDe2YWtFMN76x7zIf3c
CTkqg/BuZN4+/aoT+xnPg1Zd5iO3qTwlo2kAFWdy92XqdoI/lbFA+wgfx/fs
pz84O4Db/acXCfM6MJ/heDTThA+qv9wSnWUDWHxgjtT8uR0w/6t5oYHMK7My
GPtm1/XD6WhNpeOhdjQlPhKGkH1y/q5DBlUYRPcJ7xH6j06IrQpalhfCx0DJ
qVq1ggHUXPAf/D7RARnH1Y9M9Plg9EzoKcmSuW7rD7udnHZY1a+bv+cnD8O0
u0M/XfsRFedRMBRDQ+b8mPqelzwYzXkpydz1GdqVD5/yFrbh+q9DXgnneBh5
4LkypL4X8tHPhQ66rdisesQ3kOy5XUpj+5zNexCaf2deiFEL+p2Ha/WmuThc
pmFixWDCs5LHcj/6HuWy9vlydnzE2YlUixwfIPX91MvC6A6INtsrD0zx4BmT
aVTq3Y/oqR+i+ndpqO40v828R86lK/NDsvoQc4Vtzfb/BMkqkynfTTyMPrCu
1TnUA6tpSSWhVQti9s8R+czg4uzkhiNrpJl4/U7R9WJTA4g3imbK4VwkXxRh
flhIxxgxfNkRVGwIvSiXtZqLxtYcA4Z0N1Itjk+y5ahoK4uwuk720ooZzKqm
wC6kNpjyxb5TkFm/3m98mgeTgFXf2L79kGOtF7+SQ8M6J2kf8ws8CDi8mpau
XuSq/1hL2d8K1/f6HwvGuXgTeIZjn82Exvil056jjXj55tSx3GNcDN7ljJtT
u9Hto7z88zoq3C/s1zrE5KA+OMP3l2wXMp+8Pr1lkAK1c7uedEZwUDh5bbhv
tAOuyYKgD88ouLAqo6othAO/ZavDDdo6EHutVqhcQMG9+9t07T9wMJQ6+G+I
24nADAGzh0mBRuEuZbMcHq693q1f+7IP/UOynj9jP8E9RcV25hgXx9ONx2Nu
MDHaZfrjS08jgsIMbIvI+4jPcMuXlumGlWO40RfyPsx3813+eXEg4We6LvJB
BzIP1wdsvU+BVtcM060jbDSfN+tKW9YOe7GwcikXCh767bijQvbrdx/0Y2I9
2/Ftv8x1nhcF7rrdanlkb83cpBobmdIJuo7P3iKyt2ooSWnL1XAht4voEASS
+UPq4lj0rXrsCbLSkt7FQ8/36Jai1B4Y2HQf6m9pgeLlKR2eLReu8fdWPUvv
RrDPDe3wlVTsyPz4xWsHBzo+uhd/GXSghjWTJp5IgUvIUJKuBhvaroMr5mvR
MKnvql53l4K4hXDYQs45a93NZMm5zcnzq8vJuVQET+3/+77K/RN4kdy33z/F
6v/7hsjtvvy1mQvz2V2+7EoG4m1fVO9b3kDu/xT56/noDHAvc5MeQO/Ninus
/nZsVMhwnh7ioslilt+ps0zg38JO0/uNYDq0O03ncjBrS9EVbY9OOAR+jXSi
UOBhFskrfjwI9Ub76X27aLi/f+734oVUBFvE/lYp7ceWWsp8q2YachImO+wX
1ENxFbOD18pG9j7q5iwqDfUBvH/v91DQ4nTmqeAqF4FV2/kZ2+nIGteooJC9
b1jPL2kFqQ+NsVuX9coMwDa4Y+NHdjsqQvQEPqsJnF5568seey42WD8tvKjH
QtSNYVXVm1zYmPipGv9HR6FaW/KaUipMq25m7v7CxiejTKXYpe0Iu615KdyZ
gmpJc99Dl/qgoWm8+dqadmQdNlB8HduAdcfM9GUUBrDjrtnxiWKyF1m739d/
VofaUqmH1WwOjpQ69L5b04X8C/cO3uZT0KsmPHG5l4ejLgOJUzL9GDDVsd4m
aEPheIud/JQAhc17bNaPkf16q11c+SUmmm71yv5H9oir7wuPERYCCPRfx/Dm
sUA9kjVreAsX+tsYkZL7uhFvqWPtr0yFFDWYesx8EOd8B9lv3GigGhqtWR9G
haTz8ITjcQYq7u4NtGW0w/jur04V9SZk1DcPX+lgI0rRaeW2dhp2XJlf4ruP
An/r5uGz+jyMBTD2PtHswQr7k0lPR5vRVyeuc+GkANMZ0dvevmWjPGAokRJB
xxrWGrEFoUKoSlb2TVD4EK+Ko0auZ2HFpES+IplL3aMKN725SiAvXEd1+gsd
vGyzOvVRDg6alvQKDnXBo2hFSO4IeeflIts31n/GFmmFlqVi7fiowHvG4NbD
ZcOXH29r+0CZblKyIfmYIrsrd/mJBhTaDIg3LefiukGUVOqfLpgpb3uzTIYK
isrMa+KX+Gi2lqFoNA6Akv5NPFC7E8+u044vGybzvby0RlU9D2LGC/beC2Ah
c4lbngNdCL3HOdkCWwLy46PbhZcYKKFRVhatJeB7/vPZw+sIyJl5h73W78Rc
g4yzUU84CPBmV6uGd+L4tO/0+kZSN2y//tef3oO5JkRc5cl2ZB/+cvJrVCN2
z2FNfbjHRq1k50eTFTTYKqoe369DgWxbTeYbMrdNvhctW2DXC5ervWIB1h8h
/v1iVth8AjJvWu7na3Jh4mkio8Jkwiff4JHYbyFcIsyo736TfZZfEtgewUS6
65NDBz4SuCoSF59B5sQ1hXlaWc5dsNI1nnKM58F+YIP6ZB8fRFPgtz6yP/r1
xHEKg/rgY9uzs0anHdIzUiRWpzTggsu57l4BB1OWN85929yFiW2iZVFCCi4O
1cscf8WHhMvEXX/TQThon3//fawTW3Tvay45J0T67s2hCe9J/pn0H9Mk+SVQ
84tc/VCIJv93/IZeMnd/izzMl6Xj1+TLpQY2ZD5J3rhyFtnHnQXZn240t6F6
8dj8bedJHErvGB+J5mHq1RWX6R4GckVsvyYpDKKkSu+c40kaQuWNvTMKqTgm
a2m9ZhUP8kMD+ao8FgJulfLSQ5tBVTe9/NiGwBzLG9dzi7nglifeaitjYdEn
ha4NXUK8OOtj8NyZwCNpv5d/gxmYz0yZ0twpQCXyIj5XCEB3+pt87Eo75i7x
erRAj4MVz9t6Izt4KHsfWHh+Jx2B7d2lH/n98H3n69DjyYXSmpMZGdf7IRTj
uaRqkP5V66Ml0tSOSgvO18ZzFJxIUb9nFcjHVeKoZ33WAF6f/LFfg9+BpfK3
I3kVQszffEq0bbMAjcZVo70LWRBRvanU94qASlVPWMw5ki82FqHNRl04H9G6
m+nFxeZ0hecmh/mwTBfV+361E9yK976FtwdQ7Gxf/IDc94Hv34qk2D7IeUbl
7traC9deT6nKYA6kN3z6Ycnh4MCLxHfzSJ3xPHIhcCWpM33Zyz8+IHUmLC3C
8G+DEApXbmutiyJ7wwHa3llzGJgTb1o2bMHHiyMmf3U2CMDQqlr/qbwNnhu9
5797OojvD6//6VnJQ22F2NvUAhYuRs0OKDzch7PTClNqxRyy7yjsjOlkw+/m
4bOPOAxkGT0/4V3LRnTdswSZeQLMcfGfPWkthF2T+Z3OCD7MbOluRttZuOaZ
dF+f7HtG0rclzlmQ+t1Q1eAb14ni7rWbJUI52LdH/JPcNzL3PerS+l7YjaAY
JVHnoH64abKzr5I94kX4IY/WgAHwLgfUhkizENtXpkX9x4Y4w/2V2y8eXq/N
TN1c3g1P4YbpVCs2JlQ1smYtFSLx3PoRqTEhDs7y6Ju9gEBAUVTy9Gayh5pW
v8hP58P/QvP+MRcB7r3iBq7YQYOvz/Ir1tRBvIqZ49OznofK8XPBYmdYKLLj
Jqup9iH2Zun91zlkfhkOt7k6n4OVgZ3mssYMbJWNGG/NZOMxp7PUslQAecWS
V51BXWBeK6gqmcMme49WNfPAEP4H3dVdRw==
    "],
   VertexNormals->CompressedData["
1:eJwNV3c81V8YRhHxqygkVIREVJRR8kqhEiqEiIzMQqRhVBLKKHtUNqWsbCGv
vee1N9ce935TyWr87l/nn/P5nOc847znETBzuHqLgY6Ojpuejm4TbR05JG4m
vz8STJiT5fKukJGPl4Pt7Ml5OBQyYJ1skobuiuYZvuoLqHNf+rdVzBh4R0iu
Xbn5GiVShayZ5gg0cUs0+lGeAy4MWqVkqQCkBl/+ljdO4IfbNtXMBfmwR65h
OMQiALNIcQfDSAQqGS14BWYVw3Kxg7CFfSCedeRIGikhMHjyog9hXA7yrJmz
sfmv8MKznr1zcQTOuPdKrjpXQcDjkprRztdIHeHymH1CYMoR498eLrWgkx+X
ZuiQhIPX9Fy61mbwxIaHa7DoFLTH8RVGxGSjEFGsdyKWir8WxXyCd5KATb7w
sH9rNJoMfvT6MUVggshVa/bruXDawcTHTDAKUxx+SNGPEJirrmzY9rQAIqYp
95SeRuGwCld3SjOBD/l988p/lkCQUb+q751oND957+P5AgLFbzXFTXWXA9VF
9tCO8je4I/o+FITTeDDTZ1dRqwYJ2zCufs043L+yasLvRmCgyBMrwfhacI+0
/qnp/BmlHbPDqi5ScFvEgFCsQz+kV4pxKyQVIClzi5SkDYE9ywKdSWk10LEJ
Pjr2fsAUR1uWtzScguL0VFJtLoyZjd7+WP8eLwfv9FbqJdBe6Dx1qr0AyJ+P
k5XPfUDVb3MCW2sINL58hbPkRilknr1/yFI8FdNF+kP3ZRJYNhbfk8dQAQYJ
H4N4clKxd7A7cXsAgYfCfPkOBFZDkiaEPxZORftKt9XAOwRuVTqb9lC7Dpq5
SjQKavKx3SHb7tA2ApU76TP9J5qhqL7L7a5KMe4q4nePjCLwhjyZM51cBl/z
Oc1c2HLwcPvok48dBGYqN4duuZYH1zObms18snFT4kxeSCOB1Gd+D77pFcKh
eL9wzalsXN/HMz1N41n0l65W8n9fQdp5JdbcMRuzHjmvXIsn0Gv48pCaUwXM
oNliYmEGJosmrEt4EJj0wu7s8Msa2HRqNSZjMAVhj2XsX30anx+TExz2NwDX
Zkc6V7tSfCcz4SHhRCCbqxaf3u9K8GRP3B5kisgenP6YKZrAF0u9LHz+XyD7
ky97t+YXDHsUlyBZSuCTc99e+aznwfEYPTYflyIaL5UO7/IJvLuiwSIgVwQe
7Hqki10FKHEwuUcumcAc10yVruQyeFj889kx1xzMLXtxfDmEwH+tG3qMHyqB
7WnOiWnqB/wZxut7xI7AmAe29C0v62A45lHwekE4Xvh2x034FIFWnv8Im8om
0O74s5RtVIn0d+VPW90n0Jt8squOXApG9e9rdKSrkGdF1375KYFj1aEP9C4U
Qp+PpoGVYzmyvLN/1BBD4MaT8YtvqfmQICbN01dQijsUbo850/jk8skxfm5c
DDqb7Re4XhUg27+WAvNIAoXthRWmfpfDynxaO2NYBq5qzVOXfQgkYvzKxZKq
gVdNOs9dOBLLP7sxjl0msFb5S66VWCPsu3PnK/Xic3i5fHhrD80nH41fTn9s
aQV3rj0roFqHjqzm96/R9gf5lGwqqimCkTXG5CyvWhSqehYyeoPA17ISL/jP
FILF3N4tMF6BIwx1ov5+BEJUCbnqZBGwBhqrFguXoMLjzuOmNJzcjosycg5l
sPTvxr/+5mzkG4hTUnxFoLqRxMK0RhVEZxtYyPDFY2TFo9B+FwIbtiWV8m+v
g1CvjIuHI3yB+CDUc1yUpvt/H/fSi7TAPqedQdNlH8HG6SIvWysVt3f/K05i
6oD200KpHFqNWKJeZa97iEADhaujyQtF0EUu199eV4uUZttHvlcJ1Lj3ja9w
+gvMKshN0sWW42PF4AGTFwTO8iS42h0vhTguwZrO+nzMPl55rCSIwF+Gk0rt
GxUQbxnqv2qfjCWXAowZaDp6n+wWDv9RA1cnJ098SHYEg0seVddpfpa1UyxY
rGiAqSh9PyW6dDBYb1rSnaeixN1toR7C7eD06vZsgekXuCQuw0u9S0ULVjfj
l6kkmHj66mmWTQNOndbYBzT8F+S5RnrtSuHiaSOxCFI1vnDd4adjQKBK7KVk
e64yyGdetva1LsUfKltP76XpfkD6EGVbczn83KPjv/VROn7aX/B6nvY+H3Eb
uf7OogaWnaNDzhy2R6fvNy09LWh5vJLs9be9HjpzKp/NJXwA51tGQykiBF6b
lsjfyGqG413P/jD1FYPGwvJ47Wsq8va7ys2UdYB78TP5lr4qOP2ly+LWEgXh
cifLCbUuuChSRzIeqkW2mQfk7bIEnqIP1HZ6WA5c2dT0cpFKHA9V5pQzob3D
WmSFFd8K0PMOo9TR5+MbZtwX7Epg2+W76WEPq4FiyDgQNheEXIokUXUj2twJ
prv1zqQBDAX54jjfJ4Fkx9mWuuMEFgXaUUNmmsDtbf298pJC+N7MPhw6QEXn
Rbe3ym1tsMRxjqNrSzWwJ9vQM3FTkS9SLvKyXifIj68PLnc3wprCYbNzGhTs
PZJYMbjUDQsU9hOfVKrx/mKmQD4t150Hbra/4qmCpXmF0RXJMgyLpfqt6BGo
WSo34jFfDXKObBHCickonz/i1KND4OkJc6q0VwM01DHd7/mYCDZLveE5PATe
t+PZKVTbAveP6v7Hv60IsOxU8rkJKsbuPDNjL9sGqlmd1xXVq8DxbFEWgy0V
V9bbhw9bdQDn/X6/rSpNcE47kah/TEHuPRzjXV+7wNz0Jom3vB1exmRsrolZ
RNvqqw68Cr0gpip+ovpNBZZ7WrkZHSVQ+5oB3Vx4LZxX8WzypM2vIVXfoDPS
BLp67vZN52qEJHjTc2n0MdgMR3J4/aD50+VpuLFiOzQUnJZ9wF0EH/+T4L4S
T8XC5Hve5f4d8Dn67YoR7d5Db268GdWiop2sevOZlA5Yjr6XvnykBaLOne5/
WEjB43EKRjzFJODs/vvoSBAJzvzccJLMWcQb9FqbGSy64d9etp0VBt1wr2fz
zOepBWyrDbkUvtwDre0a6Y+Ui3En6/7NbtwEas1Vnt5yoQnqxNf5Ih68x/zr
nnv6BqnovdT993FeOzBHuH1f25IBW4yXPIXlqThe32KcV9AF0xZSR//er4I7
703EQqoo2Gd+dnqadq7imtvofqVWEP2Zc5ztAgWzBJyelU7RfJvbv3GB1Anv
Y0y4n0UvoswxMvNodReMqRRmdkv0QUmq5BWmwAXcdMdD16K5GwyZIiIqzAeh
npGn5Fj6PDZreXX2GPXAgVIJRWu2ZMz5bbTWQKbi0mWF3RcD22HTj+Itoerv
4SaPd9JtcSpeKJBymRfpBuEXbHX0SwgHNnIT16Qo2Brz3J7uWx9wS9jrRiU2
QdWzQxUXNBdxR9LX15z3B0DTtkPN530nfDZhmEmJX8Dxg5oPXeP7QSogKOXi
ln7oDGEOTC+dx19TmzJUc/sgMW+P/8XGYSBM5Zmz4+ZQ8MlPXgGBPnjYeDv6
aNMYVOgUCI5qzaKllm2JQ3AfxLOeu57+PR12cFwa0j5OxYww+ZYTnV3g+jur
dV2wCuisBRUfbqfgm6Q6rVO085R/P6xz/t0G3Q0m8yc9F1Dsw0Jv5IshuB00
vXZBpxuUll9vBGzM4YnL1lOJaSNgSrzI8brUDwsMD369Ep7D2eXuWivHEeiq
UD3vLzgCF2xv7fv9dwajJU15ZMqGwTpjlYv/2jhcvD7YJ909jYLOfhsz9kOg
zW1Xr/1kAoZef9Orn5zE3TpvHfubhuDFoaLNuSI18Lq3ZE5FfRG5kZ373a9B
KDgx+1v6BAlO7+ceqrCex1hhyRRtuVFgEvJU1z/bD+Vexu2M5bPY6GqfWPN1
FMr0+RJ4K4bBQMy21+PaDEq7yVpw7hgDvyF2neeW41CyFm5WozmFoQnJ0p/1
x+CvZcDtCdcJ8HQ+eHvwxQSqTvLc+U92DFJ3a2SJDk8C6xGTY2neZFzZ6y+m
oz8KH9KYfv40nYaO107WUXljqLJSwNqsMAp/P9UxfSGRgGsgTVeYeRZJryzr
tiyQQZ0r+liuxSCoHFo58LxmEtuaHm7y3zcJJyw19o07jcNMnVUb77EJ7Jd4
pxb/lQw1oaye6WqTYAicSl73xnFg0/WBXYHjQM2fks6Qn4ZSv8qN5pZRnPw8
wPsjZQxeDCa1WLrOgL6LRorWp2G8sl8gTbR5FPb4Dq7Tuc/CgWdHJaRrBvHK
i5GIprsj4OU7aEPZNg+OaY1PSth6ccK3PU1bYBh6XE2+rd4bgkV3Ej2lbgTz
ONKkhCRn4cc5nfzY/WQgm2lpu6l1o/6XoYUf+2chYp5p/5rNFJDKfduWtTqR
OWB0P6V4CgrHfQVfNs1ArLZK0y/nDnRZMNE58HIC3N8PyVK85uDkNl03lpA2
POnlc0UxfhwGbu09G109D0pMYBCZ0oyTOTOL7vRjUH208ir58wKYXuPq6drd
iHs+Bb+X0hgGDufD7AH+i/DtLSNjlgmiwM+XTm96B2Gc1Cl65fk4iBvSFcjH
fcYmP9uh1Zx5iPK3Dn/FOQnTB+h1Y+pyQX2134KjcRZOLZlLURem4a9xFV0h
ORueF0vtj5SdhpGtD2rMVmahOnl65az0Z+BduxfGPj8BgfNBG3+d5mHGEO1f
umaANeMrv2/z4/Cq9D+Jk34LUJho+u3Q2icI+mhnrX1iDCoDEjKOGy6C2WOe
g1e6U+Gh21nbA0+GIcpR9cONiEVo0/RIGmtCsGu9IqSXNAihVgZ8SjrjsG1M
00l/Zw+wmq+H3HsxC255kVwmvWRYbXTJ+Wg1CPmyW2RXiClYCjq9mvFyCsDK
wzJbuB9ybaZ9frJNQqO8ktqb6BkotC/bxyHYC6/LFZv0z5DBXjk2xld2DnL1
BoxKdLshcUmMc+31GNh4Pxi+93QeOF7IhF0K6ASle40pojtHoD64XPqFxwLs
bUtsvTjfAduPP9+xcnsQJq3yWOK9FyDI4kBs/0YXBHTlhV/d3A/Vz0Ns9n0b
Bl3pTxNzpAk4pFEQpXh4EsQrrxWpHx8DmYYsr5WZSaC4cPb7MJDh+0sGOe1/
ZBCOD/un/HkCyKc6UvuixmDNjBrKdXUK/ow+tx/3IcNByzXiyK4ReDgqtz4g
MQO8M32eHPrjICPbWMGnMgh3d//W+Z1O86kZK/9DhjHYxO9kxXC8H0j5pvET
/XOgJRVHJ7t9GEYiZN0X2fpANVOxqOPoPFSLveb3uzMIP9lN34g/7oOmHJ4i
/qA+eMugd721fxZeG5T6Jq+NgnLv2Iyi2CCIxoe68pnPgeulxvfdlEHoU3l3
pshlDJaMK/YzGs+C9Kgz9w3FfpCxj7jQ/YMM3OyBYwybZmD129q+LOVe4FsS
ETrHPwW9qyfNfZWnwI7un0X7gx6YrpSq8WOfgWfzn4SH68hgbvj2pVhkLzyb
EXmSODIL4lq/j+2IGASj0TXmKr1haL5Np7Z1bQaCxO5vYY1xgm6/vSlKUlPg
OzZKkSR3QmAL0cQ1vQCazodt+0/1we32lDsVkT3Afunnf1vYF4G7O6hSuL8L
fj8/ZXJSagjoNK2L9rAugPQk3/0bpp1w6WUjm/L0GFi6/bIOspiDuCeU6CaD
Tgh9q2RgzkrTs8Jd/snFaXCTfKg7bt4DtrEjIdk9MzBocvBmQG0X7L16SUH3
PRk+7uby5XcYhr1GRjE+tkN4eGpOKOztLCQxqdOzu1ZgIxFvfcVnEWfrvX6k
pg6C6/frjyQL26AxxnNpdxIFsGEoSVaKBIXr1491JJOgIEDkW4A/BRwqgl4y
MLXDmcDLR98/6YNDz5vNAp4sgvIX/azzTm0wyNjAJLtrDMKYKVTm7fPA9J/B
LrNIEjytScgU/zMNil2pLiqqnXCz/0Np+45JyHn6Si8ioRP+9Fj+WdaaRlJr
isDNkkngkHq1k1G4Ax99T/p9w4eCCyHKuFDeAY9vORiv6/Wix9pf6dqrFPzx
Rry7VaAGwgWSy/7xNsBjPX3jiDAqrAtVakXta4awe9QgW0orBAaV896/RQX1
PJs7nOYNULkwY6F8oAey9h2+wK9IgdWat4eMTzWBEOYo5BROwI5MlrNmgpOw
dRdJ7/uVEXgyETFUpEXLs6Fd/BvvaZTcXNt49fkEMMU9237TqgVbdBdFP/tQ
UXKSdxhy6uFyT9hw3FQ3uiRf2RH+lfZP9pYSmiuqgF49vfTi3l7koA9hU7lH
wYpd/KquF8rg9prfrEB9FcjoL7ld3EfAsOdnllKlWuhXKz2X0d4Aab4hIaIL
VDjunqlgHFANjH/CO10CeyCNULxvz0mBvJC6S+Gvm+Eeu+DJ+PUxEDjDIGoq
MoRPWLscCo/MgHPF74rOxho0VhtSndtN4OUYuzurE9XQqpz79vRKB0aMks6x
uVNRPv6iTTr1KxgUbZK449CN/W5s+Os7BUm8533oKSUg2fOh6pZxDz6u3jXo
10DB8z9PfstUK4FE82qtsPUyOF9pIBroRMDNa5lpvvMVwLVXr+pPbA3wZph/
YTxDwHL+lOmvn+Vgaiejq/BrDOwfd7Dmj0+B19MNMpl1DA4ILYoykZPQjhyS
lkDrEYL65JJDNk0g+rWd0UilBVkaODYPr1PR/1mynP2hYtgZF3lVsKcDN2v7
x4uEULHha9Y9loNfYGas4tQJhi6MLb/efUiOir/l12/OiBfDJ32Or48yuzCy
6Ny7cVqv4b7FpdbAWQImEpBRyVEEf+7eEXiTQkCB7fdoe82voPHfSzvtzgr4
zSPEF3GfAK292+K5D5bBy/RvvnbMdbhjeP35sfUutKO2+NVkUGDRvErSLrUO
I3W2LSdq0fpCl0mu3LNC0N6lbd/V2YJ7a36o2f6hYrZmcJxiagF82fko4Q59
B2o6L3tr51GxycaLdHmxEGZE7O29J0gYJvuutdiSirjYw7FIVwxMInZ87pmd
GOUrtzqvRMVVlp2eZSEl0ETp2sZyOwdOW3//9L2agGuWXEYOL4uAq+GZuFhW
Msy4CfobnqXCZ6vmMp6kLhhv3cZ817sDs5UPeN1VXsDXf7iP9YUOgd2M3Trv
4Qa8Z9Tqba9CoI+kd9Qn6zy4W6/PKsjXgtTu2oTrrASqVgrtuByVD/dXO0Ji
n7djq9unxbxaKs6qn+kfci0EuyNM5rweJCw2qVB2caHi59Wlf/zqxSDwi3R5
i1UnOqU77w1Wo2KMaRnX2ngpSEjopHNfiMHkf9xFMRME8Lunhdj9zYVvdItS
rfp1wNKm9Hf7pgF4dP3MI6n3i/A39DvBGlqHXUmWvdcuEbjiurf89XQRcKSq
Vqos16OzYb9G6kUCX8kZ/njikAtiU/Wm1+abUc8tkktgB4EbQsGzGXN5cJUa
ovvNux1PFJ5tXKbhr5v1+5t8rRC2zh7xrqLhz7NmHxt1pCLRJvoh7nUJbLS7
BlxS6UQepoaqVEUqfuU/qZp7vBwkeOYeikQPITXLmczSN4cKus+ZEuL7oN7f
r6KmtwZZLem2nHckUIBFokdIORdM6s7c4d/cgG/xrsJOGn6W9YzkEf8cYFWb
HghXakHZtpIYJTYCl063HBZ7lAe7PQ6Hb7xrR9FRLsaXFVTsZgn46EbrmUyi
2+g9bpGQ/vSXv09pPomKNEnLkaL9a8Lf6xRs7cT1lnbG78JU/FXuyrRRUwUT
K4JmPwvHUPSg5qhR8hzW32gMpr4nQa0MWaZsVw3mLn784OBB4EBuZ/qqWDYo
JNFtK5NqwIp/Jz/cUqf14i604u7Ohr5a9xVtnRY8NilQYrCVQFmjncvnyvPg
wGyEDLNPO0r4it+4VkrL49rrsr9viiGNp+lfpjwJc7Y7hTdo0PpvtHLp6JYq
2GH4K4jaRsJWeW9HTioFPfyYr4acaIAl3gWDH02NKPQvw/DTQQJ/GpLE3mgV
AtMvW8PF+hrs3c5pzfWQlq+sDlsy+2dITsq7/ICmO7OniBgDLXeGX4VfZERm
w1EzhWuWMi24cbKhVJ2ZwPONI9NbBAvAZHOK8na9dpzxWrSxz6KinNrYzeCP
CKpqAZ+qyR2oG/NefXkfFZsZopV5DtcDYXGiwdmAhHxNIoqCARSMj8kznNBr
h9C45ymrdjVIF1ds98WdwNr00iSZJ1lQby+wr8amHgOPx44d0SXQ0lfkA8dM
Npg2SvzYrdKMkhE8RrW0HFFECoqb/b/ArTeOkulfW7HjKrei/icqqmZ6Xqzt
rIIo39lN/O/bka+T6+bbaQru2T1QbyPSBluldnKWvGnHnRIa50X+LWJmQUI9
i2k3aF0aFG/2qMI7td4sgcEERrj2BG7LzYTDfG+pzQE1mPR7QSHNiUCZoxLx
pdG5MN+XrZ5dWIfGQjuUTkgTeEmwznjrLYSD/KIsnF31WHTDkKxSQ0UnupXn
D4br4anL9OEq10Z0SzGX0UinoJOl2vWNlU6w0fD578b2BuxtfB92x2AR2zXG
A5/MDYAoKh84WVOOzFbHQrZ8IlBzoOpvkFQWbM+Uk+d3r8SBM+Ly1T4ENuyd
iUhOLITU7FPjp/ir8Nqxc2zj5wh84Hj0X+r1Kgg+dtJtb1oVkhRWE0o+U/GT
z+Yl27utMDfyVMFKvgbn+M1b+dloc9ZWjtHqUx8YPM/gI52pxh69KPrR/gW0
b6yJEu0bhv8BcKP+yg==
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{360.419754395003, 136.70073880551945`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 14.}, {0, 166.30973054582827`}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{0.08495167521933279, -3.376636215837304, 0.20275867126529254`},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759620128335696*^9},
 CellLabel->
  "Out[124]=",ExpressionUUID->"c79de3fe-7ece-4b9f-9eaa-2e38ae6574ab"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJyd1ntszWccBvDWNetkTs3kbN04tYOS6up+m503rOkaRbe1tRKXc9raxtRs
1rhWEdTKlMxcNrRYXGZBN7cqbdiqalgpK0pkOkRJUdcZ1nSe943n/L4z80/5
5Jtznr6e3/f9BXpGv5NYy8fHZ56vj09tH/y56sLfpm6bHf/JgAt55GrljGXL
sqMvkdtU4fmy9YXJV8jt6tG/yR2COwUPEjyYHN+nfx92Yd4mOOfHvzk/nPPD
OT+c87cU8msX5jk/nPPDOT+c88M5P5zzhwr5tQvznB/O+eGcH8754Zwfzvk7
Cfm1C/OcH8754ZwfzvnhnB/O+bsL+bUL85wfzvnhnB/O+eGcH875XUJ+7cI8
54dzfjjnh3N+OOeHc/5eQn7twjznh3N+OOeHc34454dT/tQ3rfMbF+ZtgtsF
dwjuFDxIcD7/cOv8xoV5Pn84nz+czx/O5w/n84fz+UdY5zcuzPP5w/n84Xz+
cD5/OJ8/nM8/0jq/cWGezx/O5w/n84fz+cP5/OF8/v2s8xsX5vn84Xz+cD5/
OJ8/nM8fzvmjhPzahXnOD+f8cM4P5/xwzg+n/PlvW+c3LszbBLcL7hDcKXiQ
4Nz/d63zGxfmuf9w7j+c+w/n/sO5/3DKr6Kt8xsX5m2C2wV3CO4UPEhw7n+M
dX7jwjz3H879h3P/4dx/OPcfzv2Ptc5vXJjn/sO5/3DuP5z7D+f+w7n/71nn
Ny7Mc//h3H849x/O/Ydz/+Hc/zjr/MaFee4/nPsP5/7Duf9w7j+c+z/QOr9x
YZ77D+f+w7n/cO4/nPsP5/4Pss5vXJjn/sO5/3DuP5z7D+f+w7n/g63zGxfm
uf9w7j+c+w/n/sO5/3Du/xDr/MaFee4/nPsP5/7Duf9w7j+c+z/UOr9xYZ77
D+f+w7n/cO4/nPsPp/zDhlnnNy7M2wS3C+4Q3Cl4kODcf7d1fuPCPPcfzv2H
c//h3H849x9O+TO98rvIlbXb1Bvtvkv/6/hRcsqfKeTPFPJnCvkzhfzKY53f
uLJ2m+B2wfn5hfPzC+fnF075zwo5tdsEtwvuEJxyag8SnPdMvHVO7TbB7YI7
BHeq9LiID2a0P0/fy/sETjkdCdY5tdsEtwvuENyp+vcsvVJ75m5yyqmd730h
T76QJ1/Ik2/yhIR8usMW8Bs53+NCnmGJ1nm02wV3CO5UG7N96u1ucJyc9yqc
9+pw6zza7YI7BHeqmyH70wpDi8iDVIfP6sd2vnOSvjdYDU/L2pXa+XKebVad
a+pmlSv4ftGR7BEPXMgZ7JufXmf+NVfGLw3KD2xsqPPnTk/aGjGy6tGc2f8v
T798/4Uh11z0e+Uhb8qonFmLo5toDyo4VhJSfhOf4wMfufSP7X4hbnUjqvGR
NUW3dJ7GGfH+K9xuNWH+3dULqi7CXQ8GXt9/sJv3fTTVeTRu3gTvPd/VUbUv
LMqtMtqeW1r3bn09nza7aHnRNLe692xeRW5FLT1fkDm3buQY73stcENexOQU
t9qT0GV65QZ/7Ylf76mMveNWA7LOHFYLA7T3+L59TnFbjzo6e/2mrRfN/+/C
Y0lNld37ns1avezjzTHy/TX1+o1GYXX9zOdUxS1vudmtmozp2ObqW88pnq+s
2DJzwpeNdZ6JfuNuxOz0+r1cOxYs+T13u1u1Ol3hP2iv+f9Kzykoiqpwq9c3
JJfd7KE/x9Whb506+4u878dTMZdr927uYXe5LiatbxAGN/fOpF6bDm4t8HJ9
T2U0y27duqCZnoen5uXeu3TnRT3//pmydc16edSq8EEBxeVmPmV1ad+14zzq
bPCQi4VtXtHzD31zTvde5FFH5sSdSi0O1PP+yeGjA0s8KuTEh8W3+njfO53r
+Y0PKG3+eJ5qL02OjilONvMLti//aOJDj8rz9Ng4vfOrev7kocAG/VW8alEy
MHvFIv29rm9K995aGWfuC8y7d891p4+NV1/1PLUnKoLfS+NVw5TKWbdb6Dz6
3gm98OfMdSPM/MG441PSIhKU/xd+vqG3zHy3neP95ufGK0/Fjdyhk4z/uC8y
qc/VeLX5UPiYqHYtHv/e6v3ff0pql/XP6N9L3xdhJT3P3c4285c/L1pz+0qC
muaI9T18wnx++07hZyLHJqjYcSPHTCinz6/e52Urn280OJQ+v9qnjlry0655
LfX8oR+auPcdT1SlLx37+df65jy7re23+P7dBOU+0KNd2ZyWj39+9X7eNrhp
t9ElJs+ZnLiMwMJE1TB60KJ5ia295ju5owdsWddKe9eOKd0vJFW7/dvZyzNb
PT5fvW8PZWWtyjln+lB3Q0D5a5O874tpaZNntr0q3Rfe+1Pat0+7t6U9LN0L
0r6S9ra0n6U9/LT7tuaHxX6T9pi0r6S9/U9q7/0j7Rlpv0l7puaHxT6R9sb/
3Q+8B570XPPz+6TnlJ/HJz13//U5kp4X6Tn99+fI+3mU9gZy8n6Q9hjOgfeV
tG9xzrw/pT1c88Niz0v3SM0Pi/tIutek+1e6N2t+WNy/0nuO9D4gvVdI7ydP
es/h9yLpvU56P5TeM6X3sb8BS/Sf6w==
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[
        GraphicsGroup3DBox[{
          Polygon3DBox[{{369, 271, 370}, {363, 252, 364}, {393, 227, 394}, {
           367, 265, 368}, {351, 227, 352}, {380, 259, 381}, {372, 278, 
           373}, {378, 265, 379}, {376, 271, 377}, {394, 227, 395}, {365, 259,
            366}, {362, 252, 363}, {343, 2, 345}, {340, 3, 341}, {382, 252, 
           383}, {341, 3, 342}, {350, 227, 351}}], 
          Polygon3DBox[CompressedData["
1:eJwt0DkPAUEYxvFxNCrVUimUvg4JcRXOJWHXGbe4KdhPrPB/4yl+M5PZfY95
8+2wGMSdc1kkcY0510cPN+yQQgJ7bJDW3RZzeMhggTMG8HFBFZafzeVYItRR
QwEfNHQXKcZXD9bLSvmt5hpvNBVjsRP1Yt+neKCDNp44qPcv9Y/sI53tbow7
uoqx2ED/W84QS70tixJmquXp7U/VauGlmfWU03KfMNRMbDZly+/+M6lw/gFi
kSLW
           "]], 
          Polygon3DBox[{{392, 353, 352, 227, 393}, {383, 252, 362, 361, 
           384}, {395, 227, 350, 349, 396}}]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxdmGmYzlUYxs9btNkl+1iTso0KlWXsQ5ZoLFkiawuhLCNLphTKMEmRXcsg
YZRE2SumkqUsIUUfavSl9EV90tV9X+f3Xt6rD/d1znnOs537Ocv/fWuPmJA1
/roQwtpECNer/UTYImwXagmVhZpCJaEG/ZrILWsg3C3cI9QRagt3CfWENOF2
5NarC6oL1dC5A7/V0U0D9VLkdZm7TagolBZKCsWFYkIJxu7fIpQTyoMqQlX6
t6JbHpnHpfBTEtubsS/O3A1CGWJWZB0NyamRcK/QjPwaIpsijBMmC12FdkIX
9FoLzZm33nhhovCsME14RnhSmCBMF2YIk4Sn8TcO+YvCbPzaf1v4SSPPNMbV
4b8unJdhvhIoiywNviuiVwF+qiYiL1USUVYdv3WocwP8VMS+KnPV6Jt/74nK
xKoEz+WpRSm4Nc830nrcXegkdBQ6CN3od2OuI1xap43QQ+gj9BU6C5lCBrzc
L9wX4r71fquPPAO9Nthk0LbBbzts2xL3YSGLuB3RqY/PJiHu2caMGyO7IyXX
ViGeE++ZhoybMfYa2wsPkmtTIR20QNYAe9t672SHuH86YOccFwtvCLnUsBo1
uwl+y1DXkvBfhrrcRE3KhWtnplpyD1DDOtS+FL5LMS6N79L4K4ldBTivAQ/O
2+fEe7E5PLegbQ5HLYUH4KID3LWiDk3hwbx3p+b34SNZa9ezCz4zmGuJr1bo
J3UnwOHUEM+gz5XPms/cZPqDhBHCYGGIMFToLzxC63E/+g/RH8LYdiOx7cmc
dbLw2wc/9vEYcP9x7B5NiduPse0GCsND3OuPMjdKGBviPTFGeCrEO8X+ewu9
QtwfWXA3APkj+BiJjxHYjiF2X/LsRe796Sc5eBqeJuO7D/47s+ZMfI4hRpbu
kbJC70Rc74CUHEax1mHIPT8aPobSH5KS5/CUXMfi37l1ZQ90Iede8DaY/Hqw
rp6gM7IsuB0EVz5TD+MnE189aTPxMTilBj2R9SaHZNzh5JuFv4EpeZgr3xW+
O/x2+E733f5qiPtylpDDGieyTr8B4+HlCdrkOzIJHdv6LZlAbWaGeGfk4HMu
sRxnvvAc+lPRn4HNaOI9Tjuamnci/87EeJJcbPOS8DJy55XN3HhkC0K8o94M
1962seTvN3A6+sPCtXORXOso9EcTcxjyl4jtvOewvlmscT7zz8PBTGJMg+sp
zGXTzgrX7oVsxl5PLrnnwNdUfL2M3QvIc/A/m3xmE38Gubwe4j09Bzvbz8M+
B8xFlsu87RdiswA/ucjnU0f7fQU/8+DUfI0kzpyUtSxg7DyWCytCPFvm1WfN
b43fd3/b+Y2rFeJdvgL9d4R3hY3CB8IiYr8mrBaWCKvQ8fx7tJvorxPWC2vo
2yafdh3yFSlxXsP/PHJ/Ez48zmPespXEXSssE95C5rnknltFfu8Lbwsb8LUE
X28QIxfZQuzmUZc8/C4i7mK4X854KfNrWcd61p3P2i8LfwpXhENCobBPOCN8
JxwX7tH9+IfaFmr/VvsXdv/Qt+xfxleZu4L8KnL3DwvfCl8KW1nzBvJbQ46r
yCuffrIOrtdHwjZq8A71XsF4Jfbr8fkuflbifykxNsDzWuZXobOX9e+D59XY
tE7EtbRMxBouwt9iYrs+3iNbiL1T+JD17RI+F75g3nqbQ/wmSX6zWOcz9MzL
HmE3fpzL/hB/B+0QCuBhI1zY18ch/j7aRn8TOtvob8G+ANlHxNtGuwvsxv6A
8ClxN7CmAvwUpPBbwBo/pI5bsd9M3M3ktQWeVsLVHtZ5kP5BuDdH34S4R/aS
8x7avax/P7mZm3xirKOey6jpEuqWPId5jPP/l1fS93bWvgdOdrGOrcTcSU7f
CyfI83NyPURuB9HbQc2+gsf9zO9j7gvWvhv/Bcg/hcedzG0nh13YWOZvbX+L
+vuxWCKeN5+tS0JRiGf4J+FX4ecQz+8F4aLwi3CW/iXG7p9G9wfa0/jwOn8U
TiLz/DHhFPOW3a4czqutk4i2F9A7Q+vxUXSPwZHP/hF4KYSn/fDjse+ar5E7
/nlyOAzf3+PnCNyfQHYOng7Db61EtK+RiDrn8HcJni4T6xi5nmdtJ+HZHPt3
kH8H+Jvdv53SaT1uzJzH9VPmbePvpuRvC/f9LXVniG+Wdf0by9/+yd8XrVJi
NWY+HZv65HM3tT+ewvEp8v6JWp5FfhreTyH7DrnfZd9Zfkf81vodmUuOzYjd
lLjp5Jb83eO70HfnUmp4EJ5dqwPU6yg1cW06JeLebK82g/vT92jXRNy7mXxz
+9u7VyK+K35fmqktIRT373zmS9DvQdtNyBbKCQ8hK47f30L0UwQnRdS8SSKe
i0Zqfw9x/1vut+t39kNTdJrgz+erGHn9ia/L6Nt2QCL+P1OZXEqQr7+N/Vtn
IlycTNlbR+DPefrMOJ737Ank5tB7spB5612ghl9T/6/QOc58ETqHsC/E30l8
XmS+CNtC7I+Q11H2Qh774T+3wz7x
           "],
           VertexColors->None], 
          Polygon3DBox[{{283, 11, 4, 284}, {314, 245, 238, 312}, {294, 229, 
           228, 304}, {321, 253, 246, 319}, {319, 246, 245, 318}, {293, 220, 
           219, 292}, {334, 273, 272, 338}, {280, 9, 10, 282}, {281, 10, 11, 
           283}, {300, 228, 220, 293}, {308, 237, 229, 294}, {335, 272, 266, 
           332}, {326, 260, 253, 324}, {330, 266, 260, 328}, {290, 219, 218, 
           288}, {312, 238, 237, 306}, {286, 218, 217, 296}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNkM9KAmEUxb9r0LgYW2j7kBZCEDFIi5AgDBGRFvoIPUA9Ss/Y7JrcaC5m
dJHncn8DLg7nu3/Pud/w/XP90UkpFcKF8CNshUroWUp9YSCMhI1yj+JfenbC
teIrepy7FnP/quXiS2FO7c0i57U+7PXETI6e7+gIGVqus4H/eGf0+9xQKJW7
FU+ZX1jEnr/DR85Oz31z6z0aD3DFbQX3jpjpsdeI3d8ePwehSXGHv5+oTcRf
Flo3Fv5reg1PGfmGXcZ/eG3MHt9X49f/bGnx7yt8tX+/w3vbWxOXxBU6B7T2
vI/CswW/iF+5b2bRX6ObuL+dMfqas/qRnV47ASBHSlQ=
           "],
           VertexColors->None], 
          Polygon3DBox[{{311, 243, 244, 307}, {309, 236, 243, 311}, {325, 258,
            264, 322}, {303, 235, 236, 305}, {329, 264, 270, 327}, {320, 251, 
           258, 323}, {299, 234, 235, 301}, {287, 225, 226, 289}, {298, 226, 
           234, 299}, {333, 270, 276, 331}, {315, 244, 251, 317}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], Line3DBox[{1, 2, 3, 340, 341, 342, 343, 345, 285, 1},
       VertexColors->None], Line3DBox[CompressedData["
1:eJwl0TssgwEUBtC/iWe66NYi0gpSiTQl0pRIq0nTlAjViQ2DsHgsjW666cbG
xsZWGxsbm25sRqPNJk5jOLl3+77cm9g5rB6EgiDYZdjSZXbTQy99DBAlTpI0
WRYpU2GDLfY44oRTzjjnkmtuafHAEy+88c4nX3zzw2+ni05hItRYpUqFNVZY
pkyJIgXy5FhgniwzZJhlgjQpphhnjFHijJDkQ4c2rzzzyD133HDFBU0a1Dlm
n202WWeJAnNMM0mCGBH6OzeUF2WQGEOh/5/8AXn9Jnw=
       "],
       VertexColors->None], 
      Line3DBox[{255, 233, 225, 399, 287, 289, 291, 298, 299, 301, 303, 305, 
       295, 309, 311, 307, 313, 315, 317, 320, 323, 325, 322, 329, 327, 333, 
       331, 337, 276, 275, 274, 255},
       VertexColors->None], 
      Line3DBox[{339, 279, 278, 277, 375, 376, 377, 378, 379, 380, 381, 382, 
       383, 384, 385, 386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 396, 
       397, 398, 297, 346, 347, 348, 349, 350, 351, 352, 353, 354, 355, 356, 
       357, 358, 359, 360, 361, 362, 363, 364, 365, 366, 367, 368, 369, 370, 
       371, 372, 373, 339},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJxTTMoPSmViYGDoZ2RgYAbSj0XXL+pmemI/tY5De1/KZfv/CVVaU9IP2wso
9ti46T+ynx2vli2Zfsk+4JUWx+xJR+w/vbl1/7/vPXuptFzN7caX7dNmR0y2
XHLcniP6zbfI1Jv22+d4F4bevGxvOefnVRmFU6Pio+Kj4qPio+Kj4qPio+Kj
4qPio+Kj4qPio+Kj4qPio+Kj4qPio+IDJi4msWnX1eJr9rf6Vu7exP3Yfo64
+r5bga9xiu86v8m7e9Ur+6XhLzXeXnxprzn3IWun/o0h435SxUfdTx93XjPa
vPNp8BP7O2fSDL+kXrF3LNjndnnq4UHnzp1bTKttWV/bBy3ctCzyzgv7uZtN
etou3xowd9oFHCxnM3plb7fzyDGX7S/tl6wOsfMQvj5g7tnGxrDavPiVPZu3
RyfPzZf2t1bxz47tHjj3GMRYzFp655W97UnNyc5eL+33FV2T+7Hkpv2cnJon
j6c8sz9hcT3tceY9++AgN65Dlhfs/36dE/Qz5oF9yNymOUyPLtlfaCv82JJ1
bNCV26SG20CpHyj3U6ucHFU/tNQPVLoaKuEz1PP7qPio+Kj40O2PjIqPTHEA
Ep5H6g==
     "],
    VertexNormals->CompressedData["
1:eJzt2es/VHkcB3Apq5siRbltxn1fKZcM2upbG1J5oXQhqWUrKbJqukkppHIv
UiHWRK1NIvfCj9IgrEujlmmmOXPmYoxxKUIM2x+w59E+UK/XOU/O6/V+9Hnw
+X7Og6PrE7jjkLycnFz8DDm5mV/f2BHX8xf7eXCZQrFhbLwPq/e8scuuFUMd
ZZV69zsc7gpHCtzoZZDirFm1vqcbTLxd9pvaCGDmyf6cZ0FlYFskMW+tEYHc
fz4DpJNOOumkk0466aSTTjrppJNOOumkk0466d+NJzdpVPh4cZG2c+H2CoTD
Lj5dvYyCf3M5Sf++3G5fH2vr0gqkWLLu4safJEBDUBsYzf3mcm5RYaH0oFz0
qNK1Rb2+B1bQTued9semLY8aLa1ZOTUM6e9do/HrEjGwnF/IVnKm7x77vLJH
5L/cgld48vD1Wj60DB5TGd7VPW15zOVnTT4IvYcmPCeoFNl7sHX3n8wO74Vw
D8fV6zpqkaMn3jXfggmaNDWFDT1SwBQDtONUm9G720yvlKFG+HFdan7m/r5p
y0/0f2q68nxrLmkOGE9rF6DHb/s3nGAzYd/TjDDvT/xvLifppJP+/51on0+4
es03rhKAmaF92qMGOhTYH/KbfVIEXSYbRXnJAlh+fGfiCyYC9nsvymlHEehp
+beoSfkQlEjxdxpBYOxgfiqdK4InMjsXtU18GPoiLfZeWA3L9mPC0t+Jv19b
Gvpj2FdxyDB/8M825WowHtQ84qgoJtylFc9nDWPmArSpy+/UgYR3oBMfoUDF
+GAx0TazYQ8fOWpd+VvJlQUdH++ec7nFh2YzFUbkAA8ttdKrv7WaC4FG4xpa
KnzwmU2zjK7EUEHvivTiTgyONVfbVr3EQUk/qK7Ih4tyMkPTnL7mkkWphjTt
wYF15vbOo0w20lLv0Fm8XQBeJ2tWVmXywH8BTssWs9BA3e7hHw4KwXrENi5Y
kwf0Lbr5hQ+60OD60zdanwjh6DzZVBGVB7LQc1G6Rp3IRI9usWSZCLZ4b9pd
u4YHBjwPj0aXt+jmqskXKZu7ITZogfOfqRiMYbLcE6/bkRV/Z5R3qhiU7BNf
M55zYe1TqfHDzFaUJXO65iESw9TxT5UKnVwwTs/WSZQ2Iwy/b6A8rwfmGA5b
NylgIDwYXGPgxUBKV+rqkaoEki6vz6NpcWFO+MisRaM1iCO6dXUiQgL3mlmJ
Vw9/gOdHnM8b1lejN+PBXd36EviYt5XtdowL3lPaCx0uvUBuaz8H6tn1ACPI
YVSQh4E6tV8hubgKuUcfVVls3wO9WUkBNDYGkZZOihodFeih0DSmpU0MCYf0
PZPieBCiJ6pP6itCt2MC1rn6imGZ8KaLsyMOQTM08vTwfBT3l0G2m3c3FJhG
cMLS+VBoras8/DgHqQeLlx90EEGC904DqVAAg0ValhrsHLQjcjVV0UwA5j7U
QSOpCEKnVIcNb2ShA2dWXvgk4YGzT7DrWoYY3Nv3WfSX5CKbIkqnJe89LPQ1
Un8b2guiykCPltvViD3AlWpavQM7xws7bK5JITY6zqgUMZBuSClTs5UJE9ab
5z4ukxL22X3JKrW+S3fBlvGSKtVlA+1o2Lmfz/dCZ2zqkEfIM8ifExkR7odD
1JltysttxXBXadGO6walcKqpgurLEMEfhXN9WTYC8NUyLXgly4GxZIcht4ti
yN52c4xlj0N84S+imFI6xHJs1wxM9cDQE0Ejk4JBXdvDvBClZUi7nK1fniCB
joZCk5INX/sgkb+c9DAFfb6uk8Je1AvyHyMmSx5xQL0x11i7rxCl0NvGsUkJ
nK3LKH92hwOmx9vMWuPLEZ71/oDpgAQ2Zy24ExrNIewJUa+IekjUW6KeE90F
0R0R3R3Rnc6i//blfjkbWY16eiTFCsAlhGd59jAPiu/ZjDrt5aLZg36fhGM4
MOU76ujdPMgoE3M4NRj68CDErWwBD9xSFdqPx+OEO0O0S0Q7RtSrfwEkdhKL

     "]], GraphicsComplex3DBox[CompressedData["
1:eJzNmGtUlNcVhhEUQoIygaKDhjDCAINKNQipYnVOkAJR8DpgiIgyiLKCuXjD
FBs15tLiCtFoNBaCgcRcSBNa6zWIDstItCRCboKYknpBUQOIVZc3Cp0F7vOt
eb9vw+q/8udb87DX4Zk9Z/Z5D8Otz8/KdHZycqrv5+Tk4kQ/7WYnh592G3Dh
+JqeOobrGW5guJHhJoaPAk5/D/0lZ+rRnzj602v0J47+xNGfOPoHM/6SM/Xo
Txz9iaM/cfQnjv7E0X8M4y85U4/+xNGfOPoTR3/i6E8c/SMZf8mZevQnjv7E
0Z84+hNHf+LoHyX97+ybfyLmpybkTD36E0d/4uhPHP2Joz9x9DdLf4Yz9ehP
HP2Joz9x9CeO/sTRP5rxl5ypR3/i6E8c/YmjP3H0Jw7+62K0/RXO1OsYrme4
geFGhpsYjv2P0/ZXOFOP/SeO/SeO/SeO/SeO/SeO/X9S21/hTD32nzj2nzj2
nzj2nzj2nzj2P0HbX+FMPfafOPafOPafOPafOPafOPZ/mra/wpl67D9x7D9x
7D9x7D9x7D9x9J/B+EvO1KM/cfQnjv7E0Z84+hMH/8qZ2v4KZ+p1DNcz3MBw
I8NNDMf9P1vbX+FMPe5/4rj/ieP+J477nzjuf+LgLyza/gpn6nUM1zPcwHAj
w00Mx/2fpO2vcKYe9z9x3P/Ecf8Tx/1PHPc/cdz/ydJ/T/y35hn7WmzARXZC
YtuVpa3AdSI76/qq9rA24Hrh9lH/m3VXkBvEvdx9uwaXXgUu/YGbGD7KkTs9
Jf0ZztTrGK5nuIHhRoabGA7+IkXbX+FMvY7heoYbGG5kuInh4L/uaW1/hTP1
OobrGW5guJHhJoaDf+VcbX+FM/U6husZbmA47n/iuP+J4/yfp+2vcKHNcf8T
x/1PHPc/cZz/xHH+E8f5n6btr3ChzXH/E8f9TxznP3Gc/8Rx/hPH+T9f21/h
Qpvj/ieuF4YdgxNTXI/D+jj/ieP8J47znzj4L1ig7a9woc11DIfzS3IDw40M
NzEc93+6tr/ChTbH/EMc8w9xzD/Ecf8Tx/1PHPyLGf9ixr+Y8S9m/IsZ/2LG
v5jxL2b8hVXbX+FCm2N+I475jTh+f4nj95c4fn+Jg/8ZlSdwHcP1DDcw3Mhw
E8NxzmRoe0qOeZI45kniOE+I4zwhjvOEOHgaFmp7Sq5juJ7hBoYbGW5iOOZe
xqeS8alkfCoZn0rGp5LxWZCp7SM5zlXiOFeJ41wljnOVOM7VRdo+kuOcJI5z
kjjOSeI4J4krPsOaw8+F7xgkSm78altZ7S/369ptDXlNfy4M9BCn8qrc3Y5d
JW4+FPFJao39vuATvz2+/q4/rWOj38ccmrqmc3+LGXnOSueX2qe0y3VeD7J1
RvsFiGWl4ybM/vmSrL8Rvb9pyarhYrohe/XnLq2ynvqyaPtvTn4S9wusb+9X
RujMwpGKZ82NkaXRTmFi8lnfzX967LysHzN085z3ZowS44PeqC3a2gzrB4tI
o8/5VbuaYf1gkTNt0+3SnfLvmk+M3hG2f1yEsO1I/6Cs9QdZH5q1LSTg9Fjh
O3rjgx3WRlh/jBBd7f94ce9ZWH+MOHFwb2bhkQuy/txdo/F063iR2/Hj0fnu
RbBOpBgQFDk9rPw7WCdSHIvf3f6A8bSsv2Z4NXTjO+Puf070Q/VRomvN5Z+e
O7pd1r/U2S84fmIU1ps35Te2xCYki+2eObnFTUMF8epAH8sdc7LYUH/711cL
Lst1smddChhoVu65xP/z7r5bK2KSRXnKX1yeDnOV3Dvx5Wv5k5X7L/F9zd51
efHJYlDk0Ib8Di/Jpzi3Lfo4TrkXE+9X8V6g/nCyGL28IMTXVcn5e2Jan/lX
UrJImfN+TuHsUFn/bMiA1FNVyeLiE38Nn/dMl+ynIctniVeUcn+n+iDfJp9z
Var3ZVs2eeLarKnKfZzqy1/ZufLAdPv35cYcy9TFwyW37MlrePxosgi3+n0x
qNpTruOxdnb2pKOqPthqcsJi42zqe/2gsl0rGqepuDlsSfiZRHt9/YdpXeOd
lfqGBX4vX5pl96l+rmPIvCBZH/PlbzfnHUkWCY+uPnzk6hBZ3/2wf98vv3K9
f1Kt9Le53dqb++YRVf9t/hMTSlwPq//PkLjblqKbpeJm769jPU5XqP//8M+i
B99wT1Jxc23Z39avPqb6XGy5hhb3bytV/bcNCSs7FOKlut/Z/OLy17n9gbn3
2e+DkyrdfxcxSn1PXFv06qNX1o2Q9W2ztm6Ofz31/mulz+VvXex/9q6Kmz8/
t1ofcXKueH/EQH1wRYisf3j5IwefvZ4q3kl9KCfKpL73WX/e4rsiKcDRx85j
s7/7cmBboKxfYSzwnPmV+p6bZWr6+9ZhqcjNhbVpAW3n08SByJJDpy4Ok7wx
OOXt2yV0r1T62T72RcthHX/vK6+2rc+0PeLoaecJpecTBrjJ88I8d8imrs5x
yr3Mod5+n/rizhzrhluDVTzxydqln32qfN/3e9d2XfhmvnDb+31Bg7dS/8Oy
0rzMD1Try/vO47UJ359b6uW4vp1bIs3RsTZvWR/70JUfQ6vU97KvNogKj3sq
Lu8jx4cfmO780UDH9e3cFjnvfMoJ+X03d9SM9PnMP104Dx3n89hJD1mvSysL
+9Q5XSzsTJ1w/KCn4/r2+0L8QjF/5no3x/Xt/K036/5YH+Eu6138336taLBV
rErI2LkssL+s1xemWJs700XmlIkjctYrczhgS2HZNHOGGHttZP2kAdfkPPTK
WBu+Z3aGuFVh2v1U+r8dzyN7/s8sqQpyXezs6GPn1R/6WRcfc5HrZ7w24YX6
fOv918r8TPO3tLxQruJmy/jcxN9/bRVdk0+t8bxwT/o8bHGtKaqzipZ3Gws2
+ndKnzPplrnfDM4Qz2+razuZe1PWL1++xXozJEOEBQWtDAy/BeepOp9w+afn
qc4bvecWdX7oPYeo80DvuUJ97nP5gTvfe57qPNB7flDnEC4X0fvC/MPlNOob
5jEuN9LngvmQy7f0/jCvcuf+/1vO4fLY/5pDuPzA5QTuHOfyFXeOc+c+l9+4
XMHlHC4vdT808gyXH7j7Dpd/uBzF5TouB3I5k8urXC7qK+dgnuFyApdPuJzT
81Tnk77yA+YELp90PzTyQF/nPp7vfZ3jeF73dS7j+cudsz3vV30+cucgd95x
5xp3XnPnO3ducucvd47T+8I8wOUQ6hvmGS4X0eeC+YrLad0PjbzH5cbuh0b+
7DWvauReLj/3PNV5nrtHcPcFLud3PzTuL9w96L+wJcMX
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[
        GraphicsGroup3DBox[{
          Polygon3DBox[{{461, 204, 462}, {419, 149, 420}, {400, 146, 401}, {
           385, 41, 387}, {398, 145, 399}, {404, 148, 405}, {437, 204, 438}, {
           406, 149, 407}, {423, 147, 424}, {387, 41, 302}, {436, 204, 437}, {
           425, 146, 426}, {462, 204, 463}, {402, 147, 403}, {421, 148, 
           422}, {418, 149, 419}}], Polygon3DBox[CompressedData["
1:eJwt0ssug1EUxfHzibcwMvAwbYw8ggfQqWuZoEri0pKW1CVxD20xQBVN3ao1
QOnz+C9dg19ycs4++6xv5+sfTgyN9IQQBtCLahTCG15xj0t84RNXuMC393R2
iybeUfEd3X3BA67xgRZuXKPaBu5whkF0cO47uvuMR9c0nKnqPZ09oYZ9rJM7
iwO/0XImZSviFz8omdZtlJHHLnawiWWs0msNK35Db9WRwBiWsIhxHCPj+hPW
Oey5Z9491XsbW+oddWv/77CexAJSmHKNaguIIYl5zGHatJ7FDE7dT5njmkXU
nYVmsuGMyprGhGfc8UyK3ks7g7Jk/D3qkWV96H7aO3LGlDMlPcO2/wn9G6Po
84w0qz9gI2Dd
           "]], 
          Polygon3DBox[{{407, 149, 418, 417, 408}, {384, 389, 388, 41, 385}, {
           435, 464, 463, 204, 436}, {438, 204, 461, 460, 439}}]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNlEtLW1EUhe/RkUNnKoiIFEEcFxGqiI9hByJCKUIJLYiUKCL+FGN9m8e1
NjFqHpaaOEjixDhKHCUznemv6NqcL+BgsfY9Z++91t73cocj64vRriAIfgjd
QlpICglh2wXBqzgqXhLuFH8RLwt/FS+Kvwr3ilfEGXFBuBDqwoPQ4KwklIVL
4Sbw9Y+Br60JW2iZ5k/hTfGGuCl+IrctPAsvwPI7ecab4lXn79bEEedrv4s/
43mZnm36ms8m/Zv4bQnfqI3Q7xm9D3oeFo8536PFXYk580JOuCWuMbfdV3ku
cf9PqBBX3+VU2N1v4UQ4E/qk1yMeMn2hX/Go8z7Mz7i4GPh3dINmjf2W4Tvm
bTBrkXdVAGXOzP81/m7xlefOemepKxJX8VsnrqNdZ681tItoNNlbm/4V6gY1
Q694hHd1xfeSQ9++zbhwKpzjwfRDcjp+L9md7e0PuTZPipqQnCzznHFmz4fC
kbBDrtVk6HONzpzz99PO12bpd4Wuxcf0CYlDdJLMkUErRV4cjQRnIecp8pIg
w1meOE1d7l2cps+U/O2LZ533ap5n8HyCrz3hFzu1s13OD9Az7Rj7OCLfvO6T
kyBv0vm7T87X71IXZ//ma975mgHn6w7oE6N3x88pdWnnvU3wb7GZC9wlqF1w
vv6j+D/LQsHp
           "],
           VertexColors->None], Polygon3DBox[CompressedData["
1:eJwtz80KgUEUgOE5srG0UChJkjuQFCU/KSXJRiJJkkTJbdj6dw9WrOzsLC2U
pR1X4T0d9T319s1MMyfWnzWmHudcAF4sxTk+50OQiMNPhxCjo2Jr+i9CV3Gk
VyjSSfnvRYLOi62tUaaHeNFvjOgWrvQNbfqJE31BjU5jS++QocdiZ7+Y0B2x
s3d0xWg/0KPnYns/WNAF7OkDSnRYrHUGnSUrdpfuydEpsbdvUKEbYm87oy5G
W2do0gOxu3VGnfUHcacnrw==
           "],
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNmFtXV1UUxc9GQAT/QKFokpc0L4kKXtAKxAsGBQKigoZkyk0NxRQRFcUb
pmlpH6AP0lP0kvai9pDSGGo6hgqNUYiJVHirNcf+nTHOwxx777XmmmvufTbn
f/St+r3rW+OCINjjgmCUjc8Nw4anhkbDbkOTYYdhm+FTYm2GA4YWeA2GnXDE
/cywy7BP2miobj+xw8w1HjGcMBwyHKdHMzr76dXCutWwF83WCK+ZdRO5Zvod
YK0eJw2nqN8Z8bkf/c+J76Wu03DU0I6GYscMXYaD5E4butE4gtd28qHXVtad
aLSxV/XrgHOQeQfx0EPY/wj1bezhS8N5/LRHeMfQOoW3TmpPReaHOYsOuF3s
4YLhK+qOwu8gfxwcIraHfq142s0Z1nOmDfBV+4XhDGMXXs7T5wyeu+GLcxaN
FnQukD9N7qLhEjonOYtths2BvzvH0O2CfwLtr6lVj8XO6y6ycYWNxYYSfF2g
l/ayPfD3+Cx1F/G2j2fezZmp3zl6neX8uvFSj4bqPjFUG+rYm8Ythk2GrfjP
d95rjo3foHuJWnFqAv8318K5byK2NaLbSM05/NQaPmY/deSl9y09ljmvs85Q
yVmuQ7sabg3+NhPfiFY1NTXEt5DbQN96YvV407wJzUbmzfhfT01Yu506xavY
Qy0a4pTTvwK/H+KlknkJqCC2xrDW8AHjRjRWGz4ylKJXTm4jveqoUbyYsYJ5
Kf7K8LSWeSmaVXhZiZfySP8SNCrQCPe3Hq0yOKrVPV1mWGooxLN6FKG1Ab8r
yBfTp5h1KXpFzKvosxxeIeNyzkn6q9hDGbEivLxLnxXMl4FCYuIVGPKpK8Nj
AevloJD9vE+/fMYi5nnwljLmoVHJmdVQ+x5eq4kpV2V3+nudi/Pecg05YCl+
q+GI+4ON3xl6DFcCv+7BxxLDYnqtwmMBPteQL8Cf9BfQYxE1YW0+8/lwFzDO
RyOPOsV/NFwOvL8eRq1/wtsV9Bey/x7yV3gmuezxOjWK3zBcNfyCj3mGbMNs
euYQW4InreeQV901evyM5nW4+ex/s/O+65zvd5maXHRy2NdVctKdRe+r+LtG
7wXk5rLPbPZwjb4z4c1irfhNuIvh9+L1Oto34en9qne23t16D+kdpPfPr/B7
8TsNj73U/ma4C6+Xc7yNtnAH3i7b/y0bdzgfuwFvIPDfVo8Mb3PW2oe+v+7b
2OK8fz1P3Zd79LpL/QN63Gd9Cx+hrzvM5WEqZzOb+ENys9nXVM5IPmaQv0OP
2/R4gK7q+gz9jI/I/WH4k9oBcr/ju5/8g4hWyJ3HM9LdGaSmn2eiZ6Pf2v8M
iXYegeExnEH89EX0n6CrcYi54n8RG8BvH/OHcAYYh5gP8Wz64Q/C7WP/Y8xH
kiHVec49vDyh17+GvwPvdRAtaT4zjDAOMdfetC9xhiP9htF4afiH+VNq9W2u
31/dU/1exlv9K7hpNh9nGO+8ziO0nlPrnO+rns+okfaLCO8FPR+TE9fBHyav
+Ct40tAdmhL4ezbCGYTPbaxhNNA8pn9jcIY6yzjWL/Cnfon0TKTuCZojcEZT
9xI/qk/gHOLhj3DOSXBVMxOPU9hrHH1fohEPL4a/FHSTyY3Cczq5ZO5BEjXx
5JNBArHn+A73GhfZfxrcMWhprbMby/4n2TzLkEFMudedf+fo715/oxNs/Zoh
Ex/KZ+AzjfuQTp80OBn0m6K4aUzjfCYH/l2gcSZnlWCI6XkaVjr//VsgXXiZ
humBf39kMZ/Lehx91E+xbOLp+MrEe0rEbyr3OMwpPgEvumtvRjxqPTHw+Xec
751t40Lnv+NznX/PTYQ7n33p3aPfA70j9e7cwbu6ycZZnPscPOu3Ve/jGHdY
5ztdo3w47yUbzRn4y8JTJr7znP+dWYL2dDiTyYvXwHPdbuMbuifS4vmoVwqa
6YY0kEmsxPlv/dX4yoCvHuPC+8MYXYsz2pCK3kT0J8DTXsaTS6VfGpwkcjG4
MdaprLOol59J9EyinzT0faDvgFruUia1lc5/g5U7//8R8hiP1gyefQr+4znD
8eTbnX8PtznvJwGeeiaiH2PUWvrJEb1wH4rHkRuLjnr9DzPJuVU=
           "],
           VertexColors->None], Polygon3DBox[CompressedData["
1:eJwt0L1LQmEUgPFzxKmxSR1ELyKWhJ8hokO0OAaGKC2i4iBhERLtbn1pf46T
0dDY5tboeCc3t3oOx+Hh/uCe933vfdPD+/ZdRERiFKUHFQl5bmmKu/SJV3SF
b9Xf/dIE9+kHf1MP36h7TR08pxI+pTP1zAGd4LH6Xhsa4Wv1tXamnZ2hY3xE
SZxXX5ugLC7SC36mOk6pz9o/xXGZXsVnSrhGH3hJLVylN/GZCs6p721nBviL
/vCennCB3sXXnOOB+rfbHdhd2IzN7ugRz9QdHu72Uv3sBV3gprptzwb+B5nf
K6k=
           "],
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], 
      Line3DBox[{284, 2, 3, 4, 5, 6, 7, 8, 16, 24, 32, 40, 48, 56, 64, 72, 80,
        88, 96, 104, 112, 120, 128, 136, 144, 412, 311, 327, 322, 320, 316, 
       315, 303, 309, 308, 307, 306, 305, 304, 313, 137, 129, 121, 113, 105, 
       97, 89, 81, 73, 65, 57, 49, 386, 301, 297, 299, 294, 296, 290, 292, 
       286, 288, 281, 284},
       VertexColors->None], 
      Line3DBox[{9, 1, 397, 280, 287, 285, 291, 289, 295, 293, 298, 300, 33, 
       25, 17, 9},
       VertexColors->None], 
      Line3DBox[{302, 41, 388, 389, 390, 391, 392, 393, 394, 395, 396, 283, 
       376, 377, 378, 379, 380, 381, 382, 383, 384, 385, 387, 302},
       VertexColors->None], 
      Line3DBox[{328, 152, 160, 168, 176, 471, 334, 342, 338, 336, 340, 345, 
       347, 349, 350, 352, 354, 356, 358, 360, 362, 364, 368, 370, 372, 374, 
       366, 233, 225, 217, 209, 201, 193, 185, 177, 169, 161, 153, 427, 312, 
       314, 317, 318, 323, 325, 282, 331, 324, 319, 321, 326, 310, 328},
       VertexColors->None], 
      Line3DBox[{330, 145, 398, 399, 400, 401, 402, 403, 404, 405, 406, 407, 
       408, 409, 410, 411, 329, 413, 414, 415, 416, 417, 418, 419, 420, 421, 
       422, 423, 424, 425, 426, 330},
       VertexColors->None], 
      Line3DBox[{333, 184, 192, 200, 208, 216, 224, 232, 240, 247, 254, 261, 
       267, 273, 279, 278, 277, 276, 275, 274, 255, 449, 375, 373, 371, 369, 
       365, 363, 361, 359, 357, 355, 353, 351, 344, 348, 346, 341, 337, 339, 
       343, 335, 333},
       VertexColors->None], 
      Line3DBox[{332, 428, 429, 430, 431, 432, 433, 434, 435, 436, 437, 438, 
       439, 440, 441, 442, 443, 444, 445, 446, 447, 448, 367, 450, 451, 452, 
       453, 454, 455, 456, 457, 458, 459, 460, 461, 462, 463, 464, 465, 466, 
       467, 468, 469, 470, 332},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJxTTMoPSmViYGC4zsjAwAykOaLffItMvWm/fY53YejNy/aWc35elVE4ZS8m
sWnX1eJr9rf6Vu7exP3Yfo64+r5bga8Hnfio+0fdP5Ld7yGheVn/2RP7KVHc
KUdUnts/eFsxaeL6a4POnaPio+Kj4qPio+Kj4qPio+Kj4hDxRy4Stb2H7tuv
/tLWOpfpsr0tZ8yOLc+P2X9g3qKdHX7PXtPdKa7S6LJ9S+SvzNL5x+1nTZ7B
UvX6jr3dydzKgqTL9rtPqh+dF37CvkCZs/Bq7W177Tf53xdMumyfHlBdukTg
pP31t2unTeG9ZZ/B0NuhefiyfUnca78/p07ibPeOio+Kj4oT3x8cbO6hVv93
sLmT1u4Puxj7dcOTV/ZWW4Jqq01e2vd/2Wr39sHNIeP+wTZ+MtjcOer+wen+
UfFR8VHxwS9O63YRre0druoHm71DRXyox+Ngy1/D1Z1DJf0MtvQ5Wo+Mqh9O
6kfF6VNPDRXxwRb+w1V8sMX7cBUfbPE+Kj6a70bFB484AIu3+Sw=
     "],
    VertexNormals->CompressedData["
1:eJzt2Ws0lekeAHBSQ7rYnElFNJXiHJeKytGUv0sZhUmcLG22wZpuY0qNHGma
2JFLCt3c2Wwll7LdRuxW/uzYRLknt51iX94d9qs0JbqcWet8fs9afTnHWet9
P/4+PM//8vzf513rXeUf6HZgjpKS0lNlJSUVJapnAminnfbZ7/8Y1dmoqluB
If3R3zzoInHfBht/J5/SWRcn7bTTTjvttNNOO+3/dvNKFQ9IlICQzS2zTb2G
tm9tLodzZXDKzUpenSeBqbMnVF162YgG74dqEmQwkpbwR1+/BDqefPX55HU2
avfF5h3/QQbmp6cTOOpSIOwGKwZYbIzzWPt7gLkMWoXBjR5bpHBB3/+p5UY2
lid9s/S6mmzW1YF22mmn/X/lFjaeo58WtyNTllOb4KjAnZYpb7ZqNM+6OGmn
nXbaaaf9/9G7DDKcP4RHouTeO+LOBIkZ/CsndjwvnnVx0v6fvUO1J/yX29WY
2b7lwIoHJM4sOZY+N4/+70D7f9dtm69p2vYTsPBmxoX7jDBgnOwc1TUSQ6uW
040LKyUw6v3S2SGTDWNtKsus5xOU6xxLs7H+Kfc5tu4+aDeVKUMbvTssh6iB
WZcv7bTPZg+bw9Tx9mpBr6IQs8MMEnuyS6XWn+/Nuji/1Km+W3ht6/kMxjn0
D7VbXPyn++ux3p+aKoZ875+YRFgi+rhmOfeSJP7KKzwl0uBBdIGzO9smCddr
D1ysUZCY8pfA0wVOPNik6vz8tXEWqke98RGPkSix27+5LIoHTg4h+X834uIV
XjlD+pJEvxnuzNYxHiRu++1sRVQeCloK1lfJSGS4GRdYG5WAO3lkmaG0AJtu
uHbHiklUzXly/n1wCax1ItJ/HC3G8Yc2E8eHSBy+5LE3RVACjuPuu1h7SxGS
b/tm95P4do6jMdeK+h53dVKuSPOowLG4H4jTnSSWz/3n4/jiUvA79CpelFuO
iYLkuzt6SFztKY5suE+9L1WcVHlR1YGqblR1puoLVR+p6hAeUGcwdVQCpNYz
zQWCclRaZpU0wpVBkGnQxa1CCSwQiWP33MrBhrN9KQE/yyDLWDU8iCGFWwcb
01yMcrDMr8JQsU4G025GYj8PKawd9FPvs8jBZnP9wydHpMBL0skPS5dChEtR
jZUgGy8brGqO5kjBechHVDcohbgUndhtj7KxVCw/FseSggu30d5WTwZ1A6ZC
k0PZmHy1o8BIVwpqvZoZjkwZXNPysOMHZiPR6/GZ0y+Bhg6WfmqSDEQ+/MHT
2tk43Xjr1L1UCYi2+1Q1t8ngdaDv33L1svHR7m7TVKYEYnZvfrJHjYDEXq0l
DA4Ha+MHlAx0JWCr95KYZ02A4zyhS0khBx9+pQ2eIjEE7Fp9ZFkQAZXcxZbx
azgYE3Jmpy1HDIY2O0NybxIwOanz/LIJB7v2y2P4/uIvvt+p1qHalypOqrym
i3U+FXpK4dzetedd17NhDl+U7yiTwsS36V1RkWKIrdRsOxbmiyvy5zsExxMQ
79wtv5AqBu+XS+0li/zQch0we84QIP61oS+8WAwLWZX5vQFe6GH4YblhAAHL
2RpXDwvEcODjAluOuzc2pNS938YkIMM++Fv7HjFYDL+7cf/FPvzw3dSI/S4C
urTefVwtF4N9dHFNdZIHqkxPH51nRcBFh80Fb2fEwHQ5GM1xdUVeG3drtREB
kTFOlUOLJJC3+OjG5G5XTN0mm9Rf/uXfPznPeju2fHyB5dPrKgtFUjR1c2sx
zOuHHc2aonz7FzjkEipPZBH4YnjPZl+lpxARUV6VpjOE8ib/2jBdOeYtVbew
ye2Fxyr5zB+NBvHm8eCEvXfleLXIRMMgrw8UlsmtR/N7MbRyXN/m6Ch+mvfC
e/fIE6i+NvTduT09qNd2N5N9YAwrKifbW77vgmDLXBQUdWJ94/YIbuA4tnXa
FkmF7bCclR2lI+/EGh2hb3rpOG4yG9lkrv0YwngHYdFkJ5oYvRZ/mhjHmfoq
/syVJvhrSeCUa0A7NmU2ZJ4IUODFIa+vH3kJwWrjH2fulDejRVvoqzsjCrwk
LTr8tV497NuwLMByrhB/DslIszIjUSbwYl2MFUCX7XFMO1+LhxdmDQz+QqKX
KgzXKGrBum/BuL6iFqUHHjV0/kbiuZbukB73GtBUjksxyaxD4xUrXZojSbwu
Iu91IB86K08Jo7AOlb1XSG7H/fleUli550AVjO0/JKn3EWAhnz/mdYnER4x8
c9O7v0MmU005c2st8lo8k5MySVR+VqYRmFUJZp6v3M30HuCqXs3g+WEklgmf
qX+0qALdmO6G835NaFGs8cZ+O4kb6tWevw7lf/E9TrUO1b5UcVLlRVUHqrpR
1ZmqL1R9pOo78b1MW0m3GYdXplfdFirQv3DRttFDjcBtXOK+LvkhMooeGrrn
KvAIe9eFhXnNUBW5BixWtuNonOUaYr4Cg1adrI3Qb6U8t1TnnGouqOaIau6o
5pRqrqnOw78Aro/2NQ==
     "]]},
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{363.05964347624905`, 217.04160420983249`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{120, 140}, {0, 15}, {-1, 1}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{0.16846014243133564`, -3.2397575023061873`, -0.9620771833188206},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759620128415511*^9},
 CellLabel->
  "Out[125]=",ExpressionUUID->"67c312c5-d674-4c53-bbe9-f785ce53896f"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxd2HlcTekfB/BTKU2oQ4szljrVqU51ULQoqk/7JmlRKlquhCE0oQyZLCXT
ZJKM8ENjhhiMRMYySMJYYmJismaJslYqw1h+Xi/3XC/f+9d93q/ndZ7Pfbbz
PNdUMTN8kjrDMH3VGEaDkT+tHvK3rsnpioTKIVXEcTL3dvwvHvb43FlcDT2q
adjhR5xDVkt+uP/xMOI8Xm54U5TzOoq4gPqZfn0j2DjiIo4ntR6dXxJPXELl
ja3B/vsSIbcn539rs3NwfM/BVcSxIyU18IdGe1KfRfSa5bd6m/sT59BjesWx
a7VhxHkMrqlxGPoqirgAj1OKNfO14oiLKMyOd9bIiycu4ZfkH6fy2+X8lqr8
CdkN13zfWVcRh/OAB7NLpgwj9Vl4zc2qC/nRnziHFqeGqB1PwojzyHc3i1Tr
iiIuwNg4YHXP57HERWiM25vllhhPXMK2t+W/byuQ89up8gtfaETqLjCvIo4s
w96/Dr/mSOqz0HxmrlEyJoA4h/IvzkzxNQ4nzuOk4z2OaYsiLkBhWLqEPRdL
XMSZMWetG7h44hLWx3z/mAuX88u5GEZt2rIpZtcNqojDMacwvcTJhdRnUa83
uH58VCBxDgMyTxi2KcKJ89CewtTdehBFXMDA42fS/bNjiYsIDbGeE7doAnEJ
z3s0Zd49l6Asu6ryv9qfUOtz/b4HcWT6/YDZX7uR+iyuBzecjdgVRJzDwQU6
IY7bwonzaHEsmjSkNIq4gPhHauNC/okhLmLl5ObV3ZeMJy6BNYq4XbNCHhcP
Vf49z3UNivaaUMfNetOdOlaexFkYLLANC34dTJzDQ3uHrBGF4cR5CMa2Tnue
jiUuYFb5yoKAU+OIi/B0T9o3zCSOuITQtvIO23b5d3mp8h8u1nt62c2OOibY
7Llf1tebOIubxQ75DrGjiHOw2vRlV2NHGHEe4b6LNpnWRhIX8PewLQsGjo4m
LiJwuNm3bRNiiEtoX6G+qPqdcr5l+6jyGyZ+Zx0+wYk6itpNztq2ehNnsbEh
4+nQ8mDiHFZfTx8YeGcMcR47T1XnxoyKIC6gZnF5g/mCscRFdJ+YrN4YFE1c
ApOrpbX/qDxe8v7HMDsunYusm+FCHc76G290XvcmziJl/X/LK22CiHMQ3+Sl
vGkeTZxHwjLPva+yw4gLeGzU7uSsiCAuIr9p78hNHZHEJWzUczrk4KZcR9ny
/sEwhZtD9RsnuVKH3YnHc5899iLOYt4Rk2XC3/7EORh2O74yrDCYOA/XqXv/
6asZSlxAUE+tWW/7hxEX0XVuxArrzHDiEv5Si5rjWiz/Xnn+Msxd+4P3bfRc
qcMs6OLs5cmexFlkZr45onHLhziH6fN3G+VW+xPnMaaiK+Hr9UHEBWQk953R
FRpCXISX3mPFF4dCiX/In/OkXu+aPD/lcWaY3rtu//Bd6nDqMDldXm521Z04
i0trZxxQ1HgS5zBIW/v7ykZv4jy+Ko3fZvvGl7iADZGVc4sNAoiLOLA0t1sf
Poi4hOa09EiXTnl8x6jyN63ZfiA71ZE6lm55etZIHheVs6huO7Jqsb8bcQ55
oRnjJ/QHcR5n7ruXrSvyJC7AZoiJfbm2N3ER1b+suee/wIe4hFfqf03reqTs
hyp5PTHMztW7S06E2VPHGeMs/ZexDsRZCKX7Gpe+ciLOwXbqXLGgZThxHqFD
rO5MrXMlLmDr2j8rlhwcSVyEImLQjJyf3IlLEDY8FBQ+yv5h5HXwoQX1FPfk
fdbUMW+d/iUtnUHEWVywCmg9bWxHnMNCHQ+90E32xHnsLqhof/diKHEBZsMO
TIo1cSAuovLlk17T4Ehcwv5K/sp9hbLfIO9PDJO8S69y/kKeOq5mdJ8erGZG
nMVPHXX3tBeaE+dwp2WLWUaHQJxHv6Dpdf2SLYkLsNwd3cPqvBVxEUv1GqyS
bK2JSzB7Gfy681ubj+Vs+X3OMCbCwmUpRr2o4/DsgfcnVusSZzHr3pcL9jix
xDnUFSy5ZdmzN3Ee79xtwrXuUhewf4StVc2BPsRFNGdIa+sL9YlLWJVdsnHP
VwYfy1XyeYph9gX85TFm/5NjxDFtVMizR2lPibOYNuVFRuugZ8Q5dN/arfPK
I+o8/vtm/x6j7c+JCwh53b1itUMrcRFZJaaHzq6mLmHWg7Tdqf8qnZHfwwwz
3Tqu/2gbwyriuPCiwj2lF3UW/brOM8XPDIhzaGjq03axljoPNtXPodcO6gJ6
jTbOd8mlLkLHrb+hYwJ1CV53Du1cMFTpkM9HDOOSU7xozDsz6ihjBpZeCqXO
4tzw3c4X15sS57D26/5Ddep54jz2NV2Yb1tvQlxAe7x9QdPhgcRFRFz51elU
Un/iEuIG5Db7neE+uurewDAjNR/6PW21oY78JQbOI/paE2dR2lPnnutDS+Ic
Xtdt1YVCIM5j3qDFobGFpsQF5LmenVT2fADxD/cvv/wpTiOMiEuI2dw2PdFI
96NXyefrD/evY0bOqyzsqWNb/JxSt+jBxFkUGNXsSD5iTZzDNxvbtd8UCcR5
/BZfuJC9NJC4gM7CtqUN63oTFxEZGLv6Rnz7sc9dwpGXKb4bfNWVZfl+xjBR
equCf452qCIOu7IB7LNmO+Is/Ic3/oQua+IcLLJiLFO9TYnzmKam5ms1SY+4
gDHvMnNqJ7d5fO4ibOwbSsQZX5KcEgb7m8f2/U3eb+V7GMPY3Ljk3uONUxVx
JM6dobdjrz1xFtsrv2/3nmVFnEPTngfdOrcZEOdhMaul9vTWtx6fu4Dc9NM9
7n5jRvKI2LVlqn7HQzviEnJ6XLE4WC2f0+R7MMMcNRYWWWq5VBFHWkBeRNx8
e+IsinU1jxtomhHnwG80ConR+tPjc+exOTpv+75b5qRdAbbFjfVCHwfiIjKb
7CbOHu9OXMJXBqf3zrZUnosS5f8hGMZp1LAV/ae6VhFH4LGTGj6SHXEWJ8Pf
N1/opk+cQ8ZJL3ct3pg8n4eX5vF5305xIC4gbJfN6MW7QVxEnrpLxHf1fsQ/
nN/yLA6rzZPP00mq/Kse6+SVGY2oIg7vlIrLCTG2xFmcyps7YkVru8fnzqFm
1/N527rJ5x/ZeejkX10UuwjEBXQNT/r3fPcA4iKuDUrzPqC6x8kuoel98dEl
Ocp7Temn/DkO//zv9Ftl/39yFBeU6JlXmBNnEdc8e322uhl5DodHxm/LOueM
JM5jfYWL+eDJ/sQFRCOteU1tKHERHr3Wjs8viyAuwfp2sfRvo/J9DIUq/8ze
2w+f11bm/+QommDaMrerN3EW75xvHTx9fCh5Dofa80sczy/zIc4jctyP6ZvP
jSYuYJG3qe0TtUjiIi4mxgTb/RdN/MP+79diuNxKuZ82fsrpY/Xs5MR5msRZ
vCz8eWXmATfiHNwrDDTcpwYT55HbZ+PlDfJ9XOUC0k5beloEjiMuIqzftfoE
5/HEJTxIMBDjNJXrNnuiKqdNyIqDO3MsibOwtajU73jjQ5xDmI+IYYvDiPMY
/HPTjoiiaOIC/ljHcpg3nriIeEWTUz/1ROISgjWOXbhurZwffLIq579P656O
0nYkzsKgc0Lu5GfBxDl4huinMjljifPIO1IpjNsbR1yAi4mFjhmfSFyEW16u
GL6O5pHwuvXmff1cxcdy1ac8CZsr74wuDSPOoezw7xeGrowhzuNIoq+be24C
cQExd3aZVO9IIi5CXe2G4ZybtF0Jhg4eQk2xsh8TJ6nynG1/v0onYixxDlmB
JhWRCROI8xCqpCsR7knEBZxSW9ix75yCuIiDBe0h407Qdj+si8qbacdD5Xwp
qjwDLv45c+OyccQ5uL7b3jP1fQJxHva2BSZGpgriAlJewCsyfSJxEbrLHzSt
9KXtSrisu6Er8Y9k/B9/+yzJ
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJxNmHlUlVUUxd8DBJmRMaUkJ8g0KZxF0zQhFdTIHCESFRRnJTXFnCsxR1RU
UjQ0UlJKzRHFARxzSEnLBHMkB6REzQnrnMXvW35/7HXvPWefvfe9j8diUStu
ZNQIG4vFUmy1WGxldRF4C1wtlWftOYFqAk+BI3UrHO05s9rQt6Vmh1YVtF3Y
28F3NOl6MeMMzw6uztvD96RfQ+DPjIPATeDO3p6zN5yX0fOiVhWeO/Cgpj4+
zHqSqzr76ngqaglqw3fDz4ez6gcIagoCma2Btzt8XzLVEdQlo7eJo30/4EHN
mxn1eYm6HznqC17Hpzr5atDzZ+YVdGvj60+tJnUv3sgZXV96yqnHvg4Z/OHU
5K4BZPKjX5e5V6kHkO8tQQgZapG7Hty65PTljZTfAM/anI330npDZgPJoefG
giaCtoIwQbjgNXIEkSOQfRD1ADK1FLTCpz5Z38CjIftGzIfg1YA8RpZ68ALJ
ESpojWYIfGOmDhkC0VVeB8G75HhH0F4QzB2C8GmCRwgZNXdTakavKZrBrM3g
tyJ3Y7QaUAulFmSaa8pcIz4fHz7bUHwak09zdkKnJecm3Ec1WgjeFDQXtKFm
9Nrg0Z67h3L/LoII+m+bOOrTGa/28JvDacu+Gefm+Aaj3Rp+MBztd8RDPduR
tS0e7wui6HdEszPZOuDfmX0XNDowr9ww9i1MXmH0WsNvwz0/EPQQ+Mkv1GoC
X2vlz247NN5jH06mPoK++HciayQeEayR+EWh3wV+FHvtd7W8+J6Ece6GXzhz
EfDDTf0I8kay9hNEC7oz241aDzSiyKi5PzTNRXLuyn36mfh92Wu/p8m7K2f1
GyAYiFY03G70e4Hu1FSvvyBOMEbwqWCiIFEwRDAaTh94MegZujHoxuHbD34c
e+1/ZPLuyVnzDRUMYy4a/seC3oJY0Ju5aGZiyDaavL25Sy88+5M7Aa1YZgbh
m4jvAPiJ7LUfDyeWNZ58YwVJzA2EH0s/AZ0haA1kRvUGkyGBcwx9/f7p7y79
zg2npzMpgoWCRdxtLJ6JnIfCH2Hyjues+SYJkpkbBj+B/kgwmNoY3lA/71HU
ta+f/TTBdMEn+CWhl8R5OD3VncD8eDQn4q/9cSbvEZw13wzBTPImwR9JfzwY
RS2JGdWbzJpMvtm82UTuMY39JDT1d4nxvR9E7ng40+Gp5mcm73GcNd8cwVfk
TYY/nv4UMIFaMjOqN5X6FM6zmJlOxtnUJjOTgtcM0z3HwU+hnsLcQnRV73Py
pQoWozET/hT6X4Cp1GYyo/5fUte+/swtF6zAdwb3nQvXmJmL7izWz5hNxT+F
8xy48+DNx0+90gQLqKWibbz1YuYWwJ9PpjWCb9inM7cE7mJ058FfxDsth7OU
3lzOuv9ZcFZQCH8FmisFq5jJECwjbzo+qXgspa61r9HVfOsFG9BbTu4V9NLh
rWR+PlmWUluC1jLun8Zcpsk/HU4ac5p1reB7wTp6a9FLo59BPZOe5vtRsBn9
NeRex9xa9t8yr/xs5rMEq9FcCU8531HPQnMD/Ey805lZhe5q7plBjp2CXXhn
c58cdLPQW0/ujfgad96IZhbrJvib0cpGN5PaFmoZprmNzOn5vOC04JTgBzLk
wNvEfjNZNPd2eDlk2oreT6zm8ybuuZscO5jdTn+bibNfcACvXfAPCnKZz4G7
jfm9gjx6W+Fv5ZzLPhcf1T0qOIb2Tvz20M9Fa4cp2x68djG/m/WgKY+RZQ95
9LwPnTx62+ht4b2y8VOdfMEJQYGl8jtagFY+nHzOmvsXwRnOBWhq/ThaBzgf
pJbPPg/uITj7eYsCanvhHifDEe5wGOxDIw/+Ye5hvHcBdzhEvt8FF8hy1JT7
LB7HOB9n7qRJV/f6c3iaHKfAEVOeQ/DyTW92lr1q6t9Gxt81WivE56ngicBq
rcz3B3NnyKi5f4VbSP0CHK2fM+U7ybkQnYushfBPMKO837jPefoX6Z1CQ+v3
BI8F5YJLzJyHe01QRJYr+BShYWgVoaVrsUn3HOc/0VTtEs6X4BSzV+2bgluC
q6Y7XeBtLlO7SqYr7JVzm7l/BKWCu4IbguusxWS7zv4WM1fxLob3F9lK6F8z
+d1h/hq9O2S4ZdK5wexNsmivDN0S5ovQ+E9gr/+8slbqXGauBJ27+NzD6zaa
ev4bzTLO5XBKmDPqyn8keMhMGe9zHX4pazm1UrxLqd3n/S9z11Jq6qF/A+jf
GvPQfYBPGX09/4vvQ+ZUU78DFfSMutaeggfUHvNG+j6P4ZTzRo+4m/b0+/QE
/iNm7qNj5FDdZ/jqaiszdoLn1CrIor3nZKtgTvVtBO4Cb4GPtdLnJl7aU71n
cPUzdSCzxfribjZwHuDzEL6FmXvk17kqZNOMrgJPgRc+VQWOrDZ4OVkrZ+w4
uzBnz96Bni2zbsy70nPlbIum7p3RdDL5uaHjSL3C9JYezDjxmTig5cjbOZm8
3fH04uxB353/PThT86bvxdmd93enrn39DFy4qy/zHui78HYu8Dzp+cD9HzJH
qJQ=
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0DE0QgEABdCPSKelTyWbv9XGxlZbTdSUrZq0KFs2Nm1sbNnYasvGlo2N
jS2bzSa3cwz3vOUN77yo1akdLwRBsM88F1kixjIrxFklRY4t8myzS5EyB9Rp
cESXHmdccMk1A+4YMuaRCS+88cGUb374nW8xLknIBlkypFlnjZneF5+888oz
Tzww4p5bbriizzmnnNCmySFVKpTYY4cCEZuEJP5/+wMtSyH2
      "],
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwNV3k4VH0YtRUhJSVJFFKJbCGKI5FSCkWKKBFKkhAi0i57tqKovjZKSaSk
xYxdYWYsM2OffZJUypL47l/3ec5zn3vf3+99z3vOWeF90tlXTEREZLGoiIg4
8Yxr6exudOjHAocYKXEuBUHPVfQHI2txctpCtqCIgyv8HJ2GsS5MqP19Y/ew
Bj5KISd/L+Ljv+cxpB9iLMz2OfvN3KoTl1fYP4hzECLeJ2dzVCQP0jPk2Fob
Jmav2Ldt6osQitsNTDafFEBxaJ7LStBRti5n/YEkAaRc9PpHDgvgpf+zZpTV
jokbglKKPQ+ZAgWKtgkfZZ7OfrvftmE0xXPZRCobbCMPRdEZLlyn8TcpqBO3
ne21RNL78WrvgTApGgXfaixeMdbXQteu7q13BQddTw2OydrQQTtgcz3Rohb+
22jBv1X5eDnh+8ZdkYUD51IMFA934oW/2pMkJyEm4pU0hXE8pM+4JP+yZsJe
XSdAsUUIa4lf4ZNBApwTc1PgE/UfWynq9PCGAKOeyqbrfQX4aHTFJvl7OxrP
qBd6uPBw2PhQS8FGPgxTC2a/+dwG5aqWCIlHbNROxI/XSPEQJy5ZvdKiE4WG
Vsa3NgwgbkjylOpjCv6re2SOxBpsHP2nF9nJwSv17O+d/4j7iqscViiuw9Pc
sG5JYz44fXPNxm1ZoL38vqWwpBO8HsmiKHch1v08DI0bPJj9fXD0rCUTYtRk
Bxei/oM5BjqORP0ZO13a322mQ9L//ef/7gkQbeutNxEowGTFwbc6Mh14In4p
qiWIh0dMuZTWbXz0vqjefHOqDfv6jXc49rDhlTH2oX05D/uvGz0JJXVg8/60
XDGbQax+/s3w3mEKmllu1XdiyLAOvX1z0RwupN0mC/ZpMaFK76nUn2zAUd/R
4HI3PuTIu46MpLMQm+8hNmzUBafRiz2hx4XYN3dBcsQLHtQ+1hdvN2UiuHf9
z9dE/fqpIgttTwiwTiVELo/oZ9zzcd2iN0T96s2neBECaIVJq2YZdyAvb8ej
mDwenu21WBB9iI93Qj9qlSMF8/Xyjebu4aDwkjhDjOhPY32+4o3KdgQVyIm9
v8NCePuXEoM1xHtB7zs715GQtSrh7G4HLkZKFaWU3neD23ewbEL9MxK6GhQY
CXzkU78tUpphQXIg2mpC2EXMn2b0jfNCpLoHv15I54FfXjqyR5eJzzuFt2Jb
hTjWORK++rgAf7K/6QXa01F/INv0kkCABXd2Tr1ME+DiYG7G26QOmJuwbAL/
8aBjpKJRns6HxSsJdXtxKnYoyVzoWs2Fpn6t06dSHsLjB+b5d1Px8OXJPXPX
sDGt8W53TC8VR+YskYiIIeGE73Ed6/tcRP3+nVT9oRfzW4uVhpJb0fHUYPH1
Zj6uPPs+3ZTIRrN71cEmBh3qXc4WrGwh8orVFWXE+EgLb1qwTYOJDeNPGkba
hdAMuqkd6CFAnFPewqkQOgzC+mxFXIQolDDf49MgwKpPxgplezrxlG5Wt6qA
D+rM5vtSPD5+Zl7NktajYYCkODLHiYe0eZ/3HTHjw3tj36nqmjaU7Pv6PJnG
hnNw7paqqXa8kDFcNtZLwpK8NVv6Z/GQsbolI/1yPxL8/7473UkBt/FBr5Os
AMNhFwI9FTlQd4mtzScxkLy+SFc7VQibBRvden7xcDdaZGc1MXcZn8YpxSwh
Gg1ST5qYCqCj9nFrAJ2OmjeOV7OKhJjM1E5b0iLA+aW0dkfTLvR9mG3VfkGA
vY5hK8QOCuDuum7oOKUdXPbXQOn9fESsq7TWq+aj1tY7WvYpFRUnjF3WZXNg
uPKc2K2YLgS5b/84VEpGVd6r0ntuPHj8O+SVfGwAf5peV8xPokG9N7bphaoA
BucKFs1YcGDnOrv1xWwmgjpkC9Q8hVBVTVs8nc1D/nWXTHsLJsrCb27hTgjx
U93tgdxfPjY+0qLMnGOg/5na88R6IcKaNx8pjhPgSGCknu48Om43xBwU5AtR
V5Wy/fWwAKzCvpjt/Z1IeffNIztHgO0Dna9JfgKU/xqLeDzejh0TJmNRClx8
0Y0yifRhIrT8UeeJsEbYH0v1WBrPA4MWdVmcPIBZNPdlZzTbwZeQK1w+zcd8
qwNWn8bYcDhTN9mSwsDazf6yB2YJsUBvSbr4by4+uNp7bvFlQt/CM6S6WQjD
Sf+PKkf4mDu2+FykDBOXK6K5gUNCBHmRgxLUBDCRTzmTrsyAuCXjejNxrmJR
+QhR4lz3HofqzJGnI8Zrcf3ap0K8yMwMufRZAIkTepZPNnbhv9vNLWQnLkL0
/66q6uqGmFZVOnXfZ7hkj7htOsdD1Jn5rU8qB1DsFr7eRbEdwyNNey6X8nEh
r3gXzZWN/Qkn/cJi6YjotpekpwjQxdsxtW0ZF35lduo6t5joXy6p3bhBCDcN
m22n9/DQNRW1UHkXoQuuylc+U4UIXyq/UCaYj8qFpbkOUkxERZ4SMv8Ikcz6
oG0vLsD0y8x4V38GKtwi76X0EOcaKWc12AmQZRkfUl9Eh2C8aY2HLxc/Dce2
Uh16kO/6+I+81RcUlgeUWzvysOX6j4wYtwGULu4siAmi4Wr6DoV+Kz4Ov+LP
XPRi4aHXBXF+dye23pcOnjXOR5fKxw2ZQjY+6XEXXYpk4KNoCccrQwDZ4prM
nJVcBF545qyew8Thw8IuayUhuOEV394u5mFsm9zTDx5MZHkOuwVcFUI54ILr
XQ4PquFdElbaTNhJb70lIHh0KUMn804SH3frK+/JijJRSLo5dtaTi6PjmfGV
mj0Y+pv9MWX4M9yXvhC7O4+HvEvSYa/v96NwVmGqtTwVJQdWdj55zoOwfkve
Nq1BRE3XnatrbIehzt6VcRZ8WCaVH7dwY0HpdvncrNZO2NrM7FVt4OPQkn3v
/S+x0c/WSrf/QscjhfXOJAcBcu9kmF27z4GTfF/ntZdMuBwstbpYQugcPdd6
iTsXf2a7KotfJ/pl/dprtrgQv+zOj1aNcGHup5K1+ygTmvL54p4WXBw7a23R
4tkNtR25EpO+zbA7WT2U8IGLe3HxFc3+fXBOiKxJM2mDrtzkFZoqsd+9Ei01
2/rh4uR43eM4FXv9NY1WxvKwPX1KqaBqAHSG/bZHS9qh1BxgF8nlwTyhmXwh
bxDda8/Y9qd3YNJHpMzUgY/16U0FmlEsjM/Z+u3PnC4UxE0/iS7h4w85Q/Kk
MxuPH3X8loigY2kmzWq/jABfFbzVty7kIEi3ceXCjwwMW7FvhItw4a94+ljb
TwZCJiTu/rvRAA//RK8ooi+ye/v+lhB9ef7ZjRlN9GW/o5YvI5+LxNR7Pv5F
vUhtWMt8F9UKzyqqbyCTi6bSMkq5ZD/Cql3tqcw2XFQ44PldkYfV+fwriW/6
4R6TUZC6iYrCsyvqyISO9ou5mnv5DMB7rNbrZjwN8q75134Q+jtku38V798A
areEagdfbkd63WSsLouH1ktzH/tlDqL893Rf5+UOvKEsGJ73jAOulHirlwgd
m5R31Tm+rkFivZxXiZAD6T8r7MuCGWjIeLdamFYP9sW+jh41LmjMFmZsMRO0
D1d41lJNKIlZGm5kx4VNJfVlxs1u1O0/KpvEaEZrz4wZ6wQXmz8/2dkY14Nt
yc0yax58weoE/Y7sDC7Iv5YyVfx7IdKtaTFj2ord1/2v2VdyUTdkPnNkdx/O
mGjc81zWBouDd+q/DXDx6sc6n1VLCT2qEAZ5i1FQH5q7pnIbBxttF0/KBHbC
TXsHTXQFGT3bv62RCeZAZNGGY/v4nbh7yeLPAVMyOr4FLKjI4CCyJNKWFdRF
zN1Hl6osMq5K+S4zKeWgzduXpbaSjrRQxyFjkVoEJ4jrmn8h7kFmQVJmLaHT
1IFNEVZ1OHdF33yMw8Fy3mxO6F4Gxt3zrvTvr8enjevdWFMc6E04J57uYWBd
VZN4XkADohfpLhki9vy7NTy3ZX5MpI88Gy+MakS4nJ6/ZjcbqfExxyoWdkDr
dd/wVhYJeWfDP45+Y6P6/C2OtEMHCskTXn7fSHBVoVyMmWFDd7pN/uzFDkRq
HVnuNUaCv8JhbuV8DmpLN8uJVHaA0nAqW0eUjHcWYqaFKzjwX3yYc2WkA1bU
+IRmaTLGfylJwpCDlg1vP41qdmLuZq88s4VknF812nXcmgPv064UJbdOLNRb
k3p8GRn6Lg2rlzpzoKG3Tv7FNQKX69B21SIjZUlCxrGTbGS5e43/fkeDytmU
JREPSBh5Jj7HLZSN843lzgnNNIhtzFxv+5jwFeISqdaRbJxA8PFF3TS880l8
ML+IBOP5q5k659jY0sStzf9Kg7Ji9CjzGQmbGhOyl1xgI5C5nmnwl4ako8yH
j1+QkKTTGiJzlY1ZS7SW06TbUep80jqilIShO1LLZyWx4TlWpJqi3A6G2gLH
neUkBKeEe8xJZ2NUdjT2uHY7NFsCPLXekJAj4jHrigQb7QFnvcSIPeLzccGt
V/4kOAX8qp8SZ+PLg4e7HQKoKN3yUOIoga8z+mIRQuBal/u3ZvtR4WZ5xnox
gfdX82R5YmxI86UM+3yp+DU9V73ejwTtH7k9BwjcmdIzruFDRdvN2aciCDzi
dfXez6JsbEpZc9bHm4oalZS/qwjcyvK9giWB57yuSco/RIXGrN7rHUdJeNAd
9vqpCBvK/w6PUT2p8Oy/LbhA4DSGkePXPBYqnXdrBmlQMP6Sfu2LLgm6O7te
Zd5mQSF8fv/VlRTcqFnsp0f46tgsHZ8dhN9Wn9izu24VBb8d7zzPIvD4XpkE
2XwWbFurp9ZoU/C42D1aQo/4vgtC6AReyp3oLNGhwO+Pz3gEgcNy39WXBSx4
MeSMD+lRsIvWd2iUwK/N2nQ15y4LR+jLjpoaUiAZcmf5GX3iPh8YaxXcY2Hg
vNJAhDEFgmuvpmQNiDm5O/eFvtsg/lu6LdrRgwLa0ZQYwwCCv/M6Cw1CB3FQ
yqJ9eC8FX69qmDB3ktFN3x63KG0Ql3JCvJ0cKIh59dvtjh4ZJXNLvv99MYjH
FZWtfBsKvLLn57rMI2NE8XFsXscgVHS1mv6ZU1ClEaK4WUDC0aGagDeiLDgm
6dwqIOpvvju4O7+KhGf/nsRIG7Igck3Elq1OwZdMM9c3iSRsDxjhevix8HX8
qkHHQgomNWNvVbuSsEDSpeGx/ABK6M6bvV8S/83c8+RxaQ3UbuZfLT44gJr3
R7zd7hC5mNx0r+JoDVRMLFYmvx6AWLdD76PLFIxVPZpHlqlBrt7oYnm1QZgM
Jyz0Ok70cddaNbH7ZMRtTTYcSh/Etg0Fju07KXAbWTn1SZeMX9rr5i9bwEKM
WkrxrrUUDH/5sGoOwRe50IqMe1ksFPXeaE6ZR8EGyZfim7RJyMiq0RD9xMIi
pzehlzIpENH5KuZsTUKfjVrq2ro+SA06VIqKEfN5PSTNk1ML9e8bRacuEfpq
k2FvRPj+qADZAfHNtXg84F4vvmUA8xr9aF4PKJh5KZtWdr4GpfLOdMvFg5AP
f98VdIKCt6PLIoYKyQiPPSP1c2YQ0YNR95T0Kfije00n8AMJhlnLV/FLWFDt
jDvX4EvB1sbx7ndmJPSMpp3Lm2ah80HpgIMbFVonHt3d50tCpKV+37XdbGyw
PKOv40ZDg/6cH243SLgTLOIh/rYH2ltllDfYUXFs9CZz6fc66EcsHVsy3Ifw
1Nlm/VMUBCtvPFzUVot0+oc3LLMBrFvyJrPuEXFvlOL3PxJqEF5eUG6TPwjv
0bWWGdspWJ3jFLiF0JHnGzOOa1UROf9P0juXaxRo+c1RXGFFguc205suRmxU
HdzYODNNReXt+76OF0ioL4Rq9nM2LM5VmXZfaYfcFHf3rwZi7w0r3enW5+DQ
joWmGcs74bjXWCNYgYy08sNTjZLd4Hg6uYbEUfHgRpNKe2M9Ao96Sowe78Ol
I35OknJU8JOvsS8r1MH82Am51LsD+ES5zDqdSNTv+2polnoN6rb/bOQQPJX2
1hvoIniqra/zL5bgY0V0Ze5hWzbEvksK5TbQAHXSp/QkEoY9vMyTf7HxsTpy
xQfPDnBNdW2zRkg4HeQ1UvQfoV+uykfNv3RhctuDMPqeGhy9n7lJzYaLanId
W/dKN0R8386dW94M/32fVxdUMLC1/mHuHSKPrT3WMhYU2oCIeQNmyql9yGn7
UbRlDrFXPwcrbhKtg5xmUqB+3CD+Smcfr3Ei+DJsF/Paioycxtx5KqpseM9Y
XWFXUqEdqp2GMyT4jr81/yHOgU9kWlwy4dtCLs7M4k2Q8Hmeu8JXNgc/7cbt
DXcxQP0gXhnmUI8dXvvCW8sIP3yp/erjdX04e8/diD/VChZXQ/d8Ig+LuAWO
pxgEX2e+3w+0b0f2vvjsahodXcLcWw8bqSBdKWG+4zWA5qAam2vUD0nDklHB
EAVZxtnwzqjF6R0pZ9OfsNBuEHH65A4Kpu7RhmbWk+Byu75nSxMbT/lbl3v0
taPS+3BrMZ2EgLJLi8lfOThSEqCldoaBPboGtHt36vFGm7Hq608uug61uQ05
9CNnSNlY0Y8CI2Fi59L5fNxYWrR7zx+CT6dc/+vT7gT53DO1bE0BXm43EHtj
z0HYvKvZ5ipMSLkP/dnvS8frvB2nXOhUmOVNtKssbwQ173caR2QAhqY5Bz+X
U+Bq/v1qPrkGafuqfHOM2Virlly/cjYNFS2iQTcvkhDtceDRz4cceGzKmKQx
uyDCvWvRHlSDWZvTTG5+5cL5/kCK7AYiR9Sbc19upECnrXlRjT0f22ZRf3SH
Ev5ZUme3pGgX3DiTc78QOe7C2M2O9USOq1OEggGR41TedXiXJwqhGCVGvvyN
hznmB+C4molIXVq3UxgdchG/is07ifrH9bZJKTVih6CyZO/GQTx9L9H79Qix
/5tCjvtdJuNKQ8E/sWE2DhclCU0JX5S8Zk3EScIXNQ8ePL0phYuBA+6flbb1
YsNrk1eWSq24LDZbT1SHD3JTeW8ssdf3zsZ/5amd0PujmFn4SoCDb9PyBw5x
se77aqmca0xML5oMUBcKEZqX2yt9kw+dXJsgTDMgNqkj+NUqRKLto+vfAgQY
3wK5Fgc6xqIonzMXMJCdeORZXDUVWWv1/52ub0DGBjvl5ucsWGbvFFf1ooBV
9YJ5bQMJkvEVdZaNHBS/uru6oZiOupoq2hb5OgypWltr5fPAU6re/URsELN6
bD7HJLej8IWwW/W6AGSzMOPchUSeGiHsYB4TXWljspD8ik+Ft71ivvBRblT8
XOMHA8EV6eFmlUIYmbpwqv8TQErqhVp3UResk9oM484J8MdMssXygABmHb7x
N+vbof5wlsKkGxsLVH0uiofToCgzFVOeQ/iNgtkJLY+5MHIO2P2jvxdBYV59
tOetxD0auF8b4WNyoF82mEH0Ad8lDD0ZmGpOzBgm8vjW5KfVdkQeX2da/saS
yOM2TyN/bygTosfu+hbxMgFaVmeILI/tQrAKySG1lY+gQIqYqogAd6RsLhhf
pYFysLR8/jcuzlZT/pZJ87G040FpgSYFiacy/xlrcDC8WNfs+O8O7DLNvPJM
hgyx3dXcrDIe/tFOyckbDWJ2rBwjoL8dJuMZa/TMhLDeaVSms5eHikP7bg05
MCFdZr55J0kI2zdHnnGTBeiIX1okxe/C9KnoBwEP+RAxiSjaKuRjq4+GaZo5
DZWNVlj3gwP9HHcLxVweThcUZGvvp4F2auPWxMcsxB5fPSmSw8UJqlV11Bk6
khzlNYLHOeit9VFmVjMQr9S7k7m+AW4Tt7qlpQXYnd7dFipP7K096w/vrmSg
90OuxfuvQpzJVnE/skIAgxXOhdGLGGjk81bLrBTgMe+mPXutAM0l16fbNNrR
r+p1oq2MAzLV70VdHA8SVfwck14a4dfr7CwaBxF4wyA92piL9qUGsyoDmLhq
WRE1/LYfgb3Neyz3cqD1aK1vuKAfs4oiBgashSiOfdc86cvD2prikuTtTEJ/
jm2MjRfiq6a511i/ACr6dk/jH3Xi/kJiwIkc51mUoGxN4SHgp46qhjUVJ4fW
6Nc8GoTrJspyEy0uRnlySlPlTHi5D++XIfUhyvlmlOwkG+9Oz7K/cZF47+ky
ZrdhN2oV+3PaN7Hhom9+YzaLA9st9j+yvgvx4u1apQlFAZRvzxddbcjAPu33
AwYKfJwvMdafvs1HpRfrmc9aKuY8jF6qGMdC3L4zpQsucxF00HqxNoWO41eX
DT+f2w/Zpa6iXrJETk9vyp5nMIhNy+a1KexgQvnDdbtPsmzUndl/W+c9F2uy
niQeTO3CoFmLCuUsC4V8jnSTswBHTdTvBrwQIk8/13FOtQDlc+LCtrp3wfK/
Zl/ebw7M75MWrrvNQ4j1y/SMXTSEHrtlY1w+ANbUcomYdxxcntdfd1ulF4fu
LEqxondDxYyB/V5sdBz00iqz5WBO5z7zuaQuKD5wKnS5zEL1uvUNveoCKCq9
fNt+ugOM5CeVL2VYyFu86j3D6Sv+ByuILGg=
    "],
   VertexNormals->CompressedData["
1:eJwNl3c41m8UxqXSMEokKRRl9ZMSisqhIZTKjCQ7tOxdVoWWWUiUSImMbBnH
3tl7vDbv8n4rmQ2/96/nup5/nvu6z30+5zl7Lex1rFlZWFh2rGFhWcs88/bF
Xfjj9xCnihfJ6d8JjPka4XhmNAOS874lq64LQEelztW9BIHHO9Jm35/OgoBb
vJ775rxQojT/G4VCIM81+8jOvGxI3T/Yx3HNEWu1ueeujzPvt3FbzxblwRAf
raSY4xIK1vN5nukksNO5/rBQwVcwDArfl3vXBgzdEvuCSgi8ekSmq8eyHJqf
a72T330PjOIvtTkkEKgRv1/7imcVeD3msZJvewSZg4VTO/wIZMtOOK15vxb8
vD7JPu1+hiWflg9LMPXvahIV2ciSCUUz69tqgp6jEVsE+dksgRKDC4KiNVnw
191eTsrnERr/fU1cIhOo93kl/f6ZHHglvHykju6JydzbQ4kRAh2n1n0dC8+H
3LIsXUJKCUWdyiPjWwjk+q9FXoq7BCI0DprtjvMAXqoXu0AhgbE2TaHmM+WQ
qpH2UHL4CZwqCeraFk3gpvX/InivVsOfXyQ4oRQFjly3bNq9CewOriy3KK6F
O4bxK/EBcegQYvTkDlOnE/XPYvL1TDB/O9+Ycfg1yurTvw5RCcyKUaPs4/kC
NudS9tQUReJ8u5O71jSBkdkyb0gfckC/9JqGqGIQil6YYVUiERi4uYRFdnMB
OKsZ8kic48bUyPGHl5oJXK5V/881vwTmpgPKbUaCQPg1Zq7kEvjTad3u30cr
IP5b151U09dgf9ZKxzuMwIvT9k+Lqqvhdy+fyQujFLgXaXLX5yaB7auB3MXh
dSB1MN64ZSAZp4d+hLsw/fx03cNOmC0LZqSL1u0xf48PP+RkCzJ1xoSL1ZBi
vsC/a8FtMnXxqGUYLl7BzEkE2zYPSc1csG9NEfllGI62sWP/xAcJLGvdffPh
UAHwlpZ4ufw9BT0cvepn65k5OcaXfqa1FNaufhES3RYNRhalnO/SCczW+uu+
MFIB//JEw50wHdy3bE6b9SBwrwJ1bymtBj5H6Tekcn6Fnvh7vp6HCczo+G7/
6mYDnBV8Zfb2Wgbmnph+bzNKoEz+b5HjIVkQwk5x8ptLwyqRH/oxTD/XdoQY
rbHMBtWox0RW+nvs7F9V5R8m0Ej/svL8sTy4x7NDsHTgJco5F/Vp9hDovJsh
SFMoghjriqyVo49hfdPt7ZpI4Ee3lHyTeYS4/JGzKULp4MTKfq3rBYH3VAfV
LC9Vgf5D9z8GZ8tA7PpluYdyBG69uPT2wnId1HCf8ZtnqYMlZ/ukxWwG5oU4
7W0YaIITNIHDG3blovtA0J4qZn9JHlKxOH/9C0hovGHh5M3G1jdGgZHM+xsy
d4Q+PM2BP99E/SKSUnDemfeyOFPnpu6tIqEF+dD1oVPNTtUP77Zc5Epi5tw/
3P3qtz/FsPDqe9/d4VSIuJPSNJTEzG3K7TTV2QoQrAgQSu4uBd+rcNFHl0Cd
gBPqq841sK3pziqKN8CVnYdjKGkM/FLaGzjo2AhTXePZqNQO/fUpu1+SZtGl
UX4x17gFlhXc0iZdi/BZENuwQQWBwkkJGsWF2VB2997qpeUc9JTUHH/SQOAL
71OCLal5QPkTlkY1S8AxW5Hdzh0E1k6fzTXILAL+pUtxW6ISgatyOt60gMDo
dpr9X+NykElTeP82phQ6Hpwx67lOoPTxv5mKXtXw4aP+yDqHepiMbLI50cPA
+xv1rOtodZAjauCiKdsBp10+bChqncWEo7Pzub+bgVKydwNZoReSSg6vHMig
o9yo4d1G/TaQO2mT7cbzFa1fKF6zYr77a/m9xlRXHqisr4ssVU3HS2NyaMLU
f/1l/vJSYhEk+T7iZi19BJfD3lCtaghUf61XIeFUBvIneQz4mflclzcr/dqV
QE72XRy6TO6JeAhq/XSvB1/HyV83hhkYGnw8tVKrDlg3fZs959cOtlvJFmFc
DLwoXHzm8uNGKBM7ryT0rxeUejU0NsfRUSmq6lubZSvIuSbUSbAPA7uP7a44
KRp+oR4I5tJvB803jbyHkrJx06toNU0mh3c8HJ5dYC+GMT6/7ijTcEyc50jb
V0ngNaFNnNI7EVxfNL+a1vgCxlon9ysy+Sa0Pz9Q/l4lcLVHPPy+WAsbLwl+
vvCdgb2bbhR8PF0Hsbnhgckm7fA033bGiI+BM5IjP38YNMLr/z5ecv7ZA1lK
I36aC3QE5fPn+s9+g9EnN0+IxwzDBo3fDS47acg4ree91NoGygdAVf/4GBxK
jG3/bE7B58Gjz0TlOiCDn1NKxeQtMlhPm5jmE3j7h2zIfGo55F15YqnB8Q56
al5zVDPnyNF/Oorr/1ZCpWmCqZ1qJWRft+HnESNwwBFE/szVwpVsPx1d9nZo
l+qFeqaf/ox/h3wzm+Dz3mfkmic9cNF9ISRp7Swe6HhDqs35Bsek9xrdODgE
xwL55RiRTJ03594dFWwDfZ+XdVLqYxDR4RMzZEVBHmnFnUd/tANZ8F3tWOgE
fOWM9dBxnEFPGwZnqUQntDL4DQ0HwqB5ozJyMDnwk7p7+EVsNSw8GUjcEFkI
rlrzNcsaBI5b5dcXD9TBVoce56OBLWBFlonlVWTgDhaPAJnvzWArbG/BK9QL
W9nu9x3Kp+OLqmRqjEob2D55c4dYOwSJHxes3j6mYXWoTYduWhtMv6lTGEga
BeLWpnSVUQpG3iZ/CI9rBwflW9tW3SbgpF3sX3wyg8r7TlUZcXdC2B1y07DL
FJzWpkQ89pvCIP8mn7g9XTDefv7Gw7psqL+62iGlxOT529ZBEWZ96yq0GFYy
dWB59dgFIS8GMoJ+qhPmrTAuWWfpq9wDfNWuh8Wf0JHtFCnqWGAHeCz/Zrso
PQx0xzu5Yp1UfBXbYWS9rxP21gaE9Q2OAn++4Za5hxQ0XnLx7mvvgCtuD/lN
RSdAMGtxaUPbDI5ZvjjTxd4JLt78UiIOU1C853avTuQU8oqpvVg7ydRvwv9v
aWkamk7r76qqncCMg5Uk7YAumDI5cjj5FnO+SUnUqVoxsL7o/BPKiXbI2z22
XX6qA+Z+/aBcKqWjbaPzB4GhLkjSvpl22XqYOYcHeBVIFKy7xa/sGNYLF9ds
sw1IG4P1IiJsLznIOF0s2Nmwsxfabqg9f1UyATK3NHPrU6fR6PnoCcmlbnjT
4n4i8v4U7EyeNN6qOIXkT0vxBvu6odb+6952mRnoMrBjg1sTKPpbuUyF3AXd
WXlmP2+SoVepZOPftjEM8/bycGTtht9nJtvLVtvhQo1dwk9mv6/9+Haz1oUe
OBnW7totOAQv4GPIS28Kcpi/vxL3egD01lT4/+Eah7L4O5tBexpH7ugJR58d
gtILiaHrXk4CmbR82/foJK5hlfQ7kDUInaJ7S43Vp6E8caOmAGMcA/tLyj6x
DsBM7cPm1S8z8GGQypKbNYanaEH5W936QM8sMqGMQoYUoVNHm81HkVq456n8
iV5Y2tIV0PKbAoy/G9zktYaRnFX70fRAL9zUu9J7OHIQkng4OqU4KJj6I81q
sXQIMte/qXv6awxu3V2YdpeewuvrJWjYPgJiHvD3J9cUmCXyGgSzjePG4mrZ
f8sjMHB19pWF4AzY90pqFKmN4K+n6qpxl0dAhuTA26dGho0Xwi7bCA/jwvpP
fVt6h+F22bZkV20KsFfJhkzwD2J25Pk/+spDUNIU0BV0kApUD7an0hb9GOga
9B/v+wGwVV0s/MNFA64fjWflkrox16zNgNNxACr3JPDvUByHUN34vMbpcQwZ
aLgsdn4cjE/qpZiLT8HajQfbDYRImGW7w98vZxwa3tJ3fmHWdzVtQ7Iw9wBu
X/5bFdw4BsdfuQk73CWDQ6JemrZ1L2akBdIebRoDLrEkTvtACnRmW7BNR3Uh
y/c1thy6o6AQeCaPZESFjNg7f81COnBCas8tUYURWHMw//P8dypcfvfodaFr
O2bWU7ZONw3Dab2AXYddaJBo/bmisaEZOfPlkjeEDYMia6JIH8sUmO7VHdmt
34PdDhY7s22mIO+680uv19Mg4WRz8bJfG3KLe7Dr7ZgCt/2trsnfmXXXEjCP
3teCSa15cesHJmDltHuZ7W8yWNz1Pq51tgkNHf9TS2weB3i93LJYRYEjQkPh
2l31KFhYc3qeMQb2iwGnfI2pcK1qMqdLpQ69l+69izs0BiEzUYM9g1TwrJsY
XlmoQYq2BG+U/yikf3J09zxAg0UubbcbpeUo/uhZzD7zUbiYvj2P2j8FFUcK
5w5OVCBFyHH90Z/T4CN5d+Vp0DSs+eZkqTuXj3mNB49ufjoNR9X7ktN1Z6DV
7eQe4295OJ2VxlArmYJmG5sTvGxk2LnZYOFEeS7qbJTfmbsyCeZ8+3tCEsmg
fXp/pVBDDqZ7Ph+hn52EoA+G86r/UWA8V4ccO5mNKnnBIY7xE0ChFSgWJ1Mg
Zt61KJcrG0EKdjewTICbmOfhX2EUGFrHutpPS8LPHMm5FnITcDV/rQGETYG2
R2K26qsXKLigEu6XOAOROoqUog9T8MHLcYNWnz9+3Lc8UhY6A49iQ+f7B5gc
Ftiw6vLSH2/1P/7gYDoDH71WQt9unobf2wZyB0388ajB/rxbsjNwvsa1zkBh
GqxtzXqPHvbHkzF7drzcOAMOQ1ZkuD4Nct+fK13e4o/+mqJpPWNMPvrr3QoJ
mAYPp3dfOZb9sH570+W9ZdPgqH61faxqCrhbw6TolhtwlMfoHLjOQFBCZBbP
zCSYKF3ifvPcEduON6TnKZHh7M1om0znSfB1r2+T/hGHYrujBlVjyPBL1sjb
Z3QCtNKkIxrWvUVPbe806S0UeMDGrm4sPwH2x6Iu8zx+hweLl/uXwingo6pN
v2E6Dgu1I1f6vr/HN0GNrANSVBCr+CxVrz0GQ6Sz9q0PUnDuyFZHlWEqxFPC
0vetHQXBGqfa+y6fsSfgjuemDzTYHF8j7RjdD9dGHb9NlJZiVlq7FAv/LIh1
zhy4tjwBQQrSwXZvCtD5Tla1TScZfje0W4zhOGgF6elkVFTh6jVLrVUXCmgk
krhTBkbBWH5AyZRRi8kFLOqnoqlgxUeZGA8YAvayrH2XTJvQIbHo00w7DVoH
zmst1HSD327jKzxibchnmxfZ94cOBnXhseonmiDgo1uaoUkHRue9aHebmIU7
UcedEiO/gLup/Nah/V1or2vvI3CeAWMSnCxrTMvRLVP8lcyzQbS5tPtLRjQd
LJttuduOMHneYTezZ20HlgqPzXV+JYOX3ebziXEkOBlkvhjyrR+9BSDk0CIZ
pKsn5p+OdsPJ9zaPOlJJ2FAp1RlBooDW5HJ/kFAtFPhG2tXZjeHFM5Z2z89S
wVXQy7Cx9hnupYrMGlSPY/1Pt8YLVAqcWdYnXQhrwFvWhWu71SfQVyhZTr2I
DJrhJnPad3txPenHqXNbJ7B8JfuR4eg0FGs+edvjQUKOM/FmhW2TGFRwZCKf
GIcfNYf38YcOwV5d5UOCvWNotCJALrsxDT3plr9YdnfCmoFUTW2uaTwAdYok
4SkY4UhS9j9XCs930jwdVcnIOXfZO/rZJPRuWMDcoWy8UstitqpBwdl4ERtJ
9wkw+q6nt62kFT9eyt5/7SwF/e7ZfCYx54riiBmn8NV+/N7vmmZ7n4z2sXNi
PCdGYWBreia75yieluOW3XtuBkU+fLTw3jQMHaM+XiFjY2h3ha/4XuYM9sqt
sVH/3gsH1t17de5YB0SyNM8ICVPwbfm/pyWxTG4LRhxUW1cB6mYvHIpTaOga
+CBYd/MI5GiYRkS7JuGr0sKqzGg62gz7MB4kDsG/ubkIhZZ6jFPC6Vjmv+iX
Gsl4av8AsAv6yEawdWPXQYGSpm80lJs8Fns8pxc4dLs8ko4MIdjli6d/pGKu
0Jm68ZvdUMJrBjvWj6H7nhU3/4sUxO5ni+rmnXDn7bLsyf4xvGZSGLgbKJjX
lsqp49sGdacYSZovqyCo+kTKPJ2O4+pJci9D+2EX7cH339ZxYDNkeJCNk4GS
PgPvr9K7QXzuZKH8Uglepd4+q6bAwH5XYe6M1k4YvndvKtu2BYM3l3u4ls9i
w54EPfY1HXDjY/D2RYEePCnHmNQcp6OJv0+gskMbmPbmfTRaHUTN+IWosWoa
erLd6FCUbgHyIyG5WO9RpHH31McHUvG8zgftUkoTPNex5tA5OoagGzu+UYWK
xZvt91Z21YML5/KkwJUvUKi7RNIJY+CWvHCvJpcOeGY1WC7Il4DFHY5rxP8x
96Plz3U6r1shujxdNJhSiSSJ6/NGzL1PJj/LP9u7Gc6pGNL+cbWh3sy78lB1
Bt47GvNLaUsjsMvmPWmY6saMbENFVddZXCgKlEsRrIcrlvy67asDSLup7Wrj
QsdnWhppeSm18EU/wNPcYQRJdH1rTj0ams6EnDnHqAEhktzeDOdRbO1eMhj9
SUW93KKrfR3VoBvQ8SNyORRkT3VE3zlFYNJ3EmNUq4nJx+AHG95kYagHq12Y
BYFXjqRPCDyvg0teqfcq/1ZjV0pJ8wFBAnOyXnRYXaoBCz9ZidAjbej8c/C8
CtMHhcGCqP7sKtjJM/GL70I3Rm21tWBtm8WvQmkKZzIr4ZrxuiKtpn48s19m
vTyNjoNta30z7lfCYbJui/PUMJrHsnGum6RhQ1ONTuXmKigrOjTAGjCCagtJ
yR+daBiooXbK90clbFHqFuiUD8cHFndZNSKY++ADrf/8qqvBkcful/LXPNz1
3v/25jACq/dIZz7nqYSth3qb9TfV4mWOLfHPVQiMFW4jBDzKoW2UtsTG3oaf
+yI5gooZ+EfwBqlBHOGTO8Fhd78LS9rIZIOtDBzc8tf5mSzCWpvI/Wtj+vDt
2BEf71OzyBW6Xk5atxxm9p1YmUwdwiKuktlXanSsOhzxV9qpAiYULA8b+JGw
7h1GLdfS0OnHhUNG7RVwwMnJWM8kCY+4Fl12LCSwblTircB/5fC4/tBxyXVF
mPA1graaTGDHqR7L/dYlEM64N2r3pBaFnz9/M6XL3NfmHJqULn8FawZvL9+F
VpS+sNmtc4CBxhXL6onKX2FawGrR8lMnynjzZd5UZWA8V9Gfjk/FwCe5r/52
bi/G1Fi+cL8/i5HXGdTl2lJIABmaE30Qy1Kqd/zwpaN7HVXuj2050IpSoWEb
CYO5KF4/yDQkyWmqZdlUwNN/GhGTJ8vxNWPQQDySQN6MIhL7ShF8ZFu7PlKw
HOenP+zhjiPwy4CYY7hrAXx6aB5t7luLAvsOwR1zAv+M/JN/tCMfxEtCI1SN
W9Cp84XukzkGLqdUWZIVCuDBfGG05J5OLN72+Ym3GQMfyYkZW28ugr06od4c
R3sx8JXJy2NvZtF6vSj3+YpiCEqfE29MGEQO1qtmrS/oeCJcMuGXaDkEzm3K
4pQg4fZYXdbefhoqC1doumlXQhjPfg8jnkr0zAkJSWDmRKC966fIwzz4abXN
qetgLTbOZnScuE1gsOSagttXc2CgyI07fOYb6hlel7i2hsCU1hsmQ525cJyo
aBIndaBS9E/dGgcGWiUfib0vXgDrqqfHf9B68IxiZ5hM5iyKH9qaqSJUDPZX
t5jTEwfxWtSMDPUxHeP0qBKbVSogwSvm3EISCe0SpF2SYmi49V5LPwd3DTgK
0TlzlaoxKP92p+p9AuVph6w8iVxQU5e+4LKnFj8F8zTTHQnUS90iUyv9BfpX
tl44nvENVzPpnac3Edjppi1H25EDjzNl//GGdWCzuiz/ig8Dx+2sLlTa5cOd
Y5aZ7J96kM3r5LB3/izu/MTKxR5TAhvJVk+29Qxi9ZS/RagZHemnGy8cZq2G
aOeeABbhEbzlIliqoEjDKNHtO3qDG+CR+raA28HV+EdIOWP8AYHsQaJkkeEs
eLlIImyt6zB6l+R0njVTZ/Z5rom/meDTR38dueUb7jIhjdfxEqhFn0wnjmTD
b6cufjP5DnTelGGT+oSBysMCDHEepp9LDgdibHpwsuxnZsyXWXRScckZsSyH
Ei6rPoXCQVSKKFG0P0THmIThT6O36mHjrU1VinMkbDlW8qW+n4pZHOfEZiZa
AXNG2OVk6vCuL8eigR2BtJU0toujGdBJ+J+c3NqMC6UjhTGiBPaV20pNC2aD
CmUX6yX3dnzJ7s7NF8/AuTO+CULLRbBT3ag08kg3ng/sOZRcO4tx8f1NeWuq
ge/eZ/4y+QFc6PnCniFFxxyNm5rPslvg7TNz36tDQ7gaLVIc/ImKMT6aWqne
XXBx/fH3lYI1aLhPrDvSn8BHsmU7AmfSQVDyl3Lpm3o8sSxX4HmRyatCwcsn
3+bAU75hbceb3zBzd6Zb7SQDm8Z4Gm19EW7LbO8LMWnHRx6PVXYdYGDWkvl2
lrZ6OHytTMg0qBtP2wtaifjRMdVkDSnyRSccrHj25lVhD07IsXTxEVRcvP3e
ZWDTADzNP/54/8lK9PpQmFEQT6D557+LBj4ZwPl0C+WJfQ2e4udrINsSuJLN
7jkZWwALzjxRtf71OGoQVVu9kcDlG//8qTpV8MNb5UfsQDOqnj5vOqXMQLWe
Fnkx5Rbo5RW+UXm1A7elH78pJU3HS3z63V/E++DdWZ09J+M7UUvevWZXOxX9
zfZ8l50cgv8Bd4AZtA==
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{358.36145661258905`, 139.9922025467612},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 14.}, {-27.088493826547687`, 
   165.88683634448407`}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-0.5923381368021469, -3.3262275121632716`, 0.18800550262627075`},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759620128474719*^9},
 CellLabel->
  "Out[126]=",ExpressionUUID->"001d8362-1f9f-4bb8-87f6-2f65cbf8b003"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxl2XtcDfkfx/Gj0sUlkx5pKtWUqUYm3aSb9JZSua5rokKpdVmy/FzyW7oQ
0c9uiWUplpYIpZCWLgeLIoqEkNsSIkVKkvx6PJzGo0/nr/N4Pr6POa+Z+X7n
zJljEhw+KVRJJpPpdpPJlGUdr3r3jnfRpzeFLPV7UUgc+2NTUrKn1BBnUFT9
IL1oRS1xFgZOk/STp9YT58Ct6Vdge/cdcR6xWfcdDc0aiAv4SX3XMyboA3ER
8TVm5zCvsbDj8zr609ZqXZyUoiUnDqMD/l6+j7SJM/jHKMNmmEs/4iyGpuqs
3JLKEudQc/1Hvz+q9YnzSAgu2f60sj9xAYd3rJszPdOIuIiXUf9z+mzEKdxc
6v+4zCYmJbSLo7mmVWlhlClxBuGlp+JxlCfOIiagrSGy2pw4h/HavxTbfxSI
86jRO7z+ltySuIAnG9XKdMJF4iLOu++o0KqwUriN1M9zoUXqqwTqGF9oOH1f
8iDiDORbG8tSSgYTZ3H+Xo3nCw1b4hy8ksLzVm+0I85jjVlD7ahb9sQFLLcP
XtzvwxDiIhrDGv4NTXdQuIPU79Y3u1Y4akMdjj9Wnzx/3Y44gzbjELP42iHE
2/tLbZ8N6e9InEOCn+Oewm7OxHk8f7TcettSF+ICBH5I08UVrsRFCMnjrtZ8
7nAXqX9g052FdQUO1HH/2p92l9Y6EWew7ma60gmRbofF1nozYaTcjTiH85qH
dpyLdSfO4/r0ZT51ASAu4KXywz35BdRFrKjxVXv/rMPdpf6WwhCHmlJX6tjp
eeb0XCt34gxqbCoeTlMaQZzFNhXdQfWGHsQ5NI2OtF9ZRJ2HXthVdWuXkcQF
yCtGLRgVQV1EZYI8MmF9h3tI/QUfF1e8ShpBHb5Pd19pUaXjGUzQcs8YZOFJ
nIVRrsnGwx+oc9Cbq1qUFOpFnMc0t6lf87OoC9j+Kz/Jupy6CP93WbNuFSs8
ylPqZ2c5lJ9760kdGmrmQdmtdHz78f8UGvnp9ijiLKKNr13eHuBNnMOJO3UX
1++lzsNuVfKw6ivUBWj1MJUNukldxN7wjXcKTylc5i31v3XT7997cxfH42rV
+twJPsQZvNT8/UlVHXUW70MqZ3Qb4Uucg1npK7+yRdR5RG9aeHxXHHUBgcPn
nLkRQ12Es1ba2vkBCo/ylfo//ajzz67ELg6nlkVta0xGE2ewOPWtjk8kdRZj
+J29glKot69fG+OwjCzqPJSfFn+ZUEhdwKKp6T32naUu4mvxScN7exUuGyv1
Vz1wqoxs6OIIN4q6MTZ4DHEGoyfkztyeTJ3FmX1yrYL91DlknfPxM/2DOo+0
O5nOGZupC1g942XD5VXURUyMnTTUdpbCo8ZL/Xme5Y2BeV0cR+KS+4R0H0uc
wVXdIaM3WlBn4Z3R3PjOhjqHxhD1uQGDqPOwMvHpvVWHuoADDy3G/ucd7RGx
5m/9aVrFHf6D1J9g23i2rdtY6lgaXpr+vj91Bro61q0httRZHDO8qWviSp1D
RqTRMocuzmPfhaQHSl22IyDpGOdfZEBdRMnoLdXpLYp++USpv0R1/4FfKrs4
ltwuP9i7gjqDqueany2vUGfxdX+/nNYy6hy0UzSuVJVT5+GVnlX3oct4ASqB
LuoNl6mLeGQ6L3ttbse8miz1V/NrPAwduzgeVByuy7OhzuCviBi/cp46i1o+
erizDnUOr4S0U6/UqfP44Y5Zpnd36gKUj8pzXJWpi/Dq2fRDUJtinWKK1N/8
/Mm4JKsujroTD8RogTqD5UfCiw+bUGehtzLzkr0edQ5WLwty/fpQ55F6W7tm
gQp1AdOuNabXN/sSF1F9XNnmdG3HdXKq1L/kleruoqs+1NEj8dBx72LqDNJa
ZvhHXqLOwtPnin/4Bert899Uqa+unDqPrb4/bV6eR12A5Za2mE251EUkqZlt
mHhS4fJpUv/GPea6PYy8qWNM98app7o4gyZzjz8CjamzuH/mgqsyR51DxP45
iQe7OI91p/JeeJtQF7DDNWHDiy7efv0XazNjTTu+Z6dL/SktOVs1rL2ow/Jd
7ThPe+oM9pTorDdzpM4id87s6CMu1Nvv31I/VZW7Uecx8lp22G5QF3A3s7r3
Vw/qIoJa9e8t8FI4/KV+S/935gHqI6njUImBw3qGOgP1vuvWV+pSb+/XmZ9m
yVHnsOC466fDg6jzWDY903iXM3UBbXED5zn6UhfxJuWd3x1/hUfNkPqbii+Y
VmWDOhKfx7w4JKfOYJlx0ZYet6izmMseStd6Q51DyO+jpriojSDOo8Lx0ggv
nroAQ9mlF+Ye1EXkLy70/zxL4fKZUv8cLuIXtSXDqONGVs0tozTqDLT4keLT
WuosJpjXnUxzdyPOYcvJt+75O6nz6H5w8iOLJurt67fA6PHKqcOJizB4vuJV
+kmFywKl/hzD7DmG3o7UkeRk7bQvmTqDHNNNN7qrORFn8UTD+rlqNHUOM1Nv
X1+n6kycx+OH5YdttlEXEOfXGDzHwoW4iAjVoxHV+QpHkNS/qETpQZ9mW+qo
HBa869hiO+IMhr/4b3WEsj1xFpUD5hm8Ok69/f6zYHpZ4tIhxHkEhSVMvOHp
QFyAdSl7P54fSlxEQPjnWdc0FcczapbUbxURlNwwYCB1iNGaDhEBlsQZBJov
vRxVN4g4C7bUWfPtDSviHL6MOn7bpsWaOI/5H/u25lrbEhcwZcpvqb8utyPe
fv8f99Gr6rDi+MyeLfVvV3myh93Vnzo2P+iX15hnTJyBb3POQetmE+IsnDN8
/+P4G0+cw56bAw5q7LQg3j7/zzQvPlplSVxA5s6FGy42WREXgdC7u/oGdDwn
mSP17wyeNn3EvtZC4lCeHLkWPqpkPIOT4l0/2xyGOIvSbn+ND7usS5zDsKpb
KyoLjInzCMjKsDt2dgBxAa9n6s28NMmCuIj3pQaRafsV+/vn937PtoYLSf49
QRyaz7/aWKMb8fb5b3skvvV2uXtnZ5H5dElI4cGvhZ2dg35ZyZ7GoVrkc3mU
fDX4IhunT1zAl9Iyp75xJsRFNK9qvnvqkNk3R7DUf6HHrWT1HA7EERv45WtD
qz5xBj/1MZf3CtUizqJfdMGMN49b3Ds7B7/z/8SpuCue30rO4+K0+nvb6zVJ
j4BSjW5D40fpExfRs3Kc5pkaxX49/t450/n0xNhtZujsDIp+jgxMLzcm3v47
18R+hmygNnEOfxfv1dvg1uTe2Xm89lgdN3mz4rxILmDns5dI+Feb9IiY3JSa
4hds+M2jQqTOT6cbPbv7i+jsDBKbT+w/lWVGnMVLlcmrgq4ZEOeglNg83iNX
jTiPeH/febF21YWdXYCQVxmzT7s36RERfPlnvd85xXrh5kqdH61tBIutiuee
kjN4oz5mwnLtgcRZuAUWR35x5IhzqHVtnL1huCZxHhPc7tYqbyhw7+wCLCKO
r9HiVEhP+33Xz7vVRm9WzH/5954MY+3z284qeuTfe+LDxq7u+ciYOId/syZk
6ej1Is5j8OBlfzMGd9w7uwDVOzEX810U1yX59x6Dod1PR9/X+NYzO1TqST5o
9SS5WXEeJWcxc9br+RcSWeIc7h/ZPnFShgpxHpnZMtWCXrfdO7uAIxODlK+2
KNaR5CKqyoYPSf5T9q1HFib1XBj3l96BhR3/H3Q4i4SjzrKmTDXi7efPbvzr
/NQG987Oo3FwcVyRzRXiAuyXq00b2nyvsLOLCIvblx819E3h/wH++q7f
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJxNmHlUlVUUxd8DBJmRMaUkJ8g0KZxF0zQhFdTIHCESFRRnJTXFnCsxR1RU
UjQ0UlJKzRHFARxzSEnLBHMkB6REzQnrnMXvW35/7HXvPWefvfe9j8diUStu
ZNQIG4vFUmy1WGxldRF4C1wtlWftOYFqAk+BI3UrHO05s9rQt6Vmh1YVtF3Y
28F3NOl6MeMMzw6uztvD96RfQ+DPjIPATeDO3p6zN5yX0fOiVhWeO/Cgpj4+
zHqSqzr76ngqaglqw3fDz4ez6gcIagoCma2Btzt8XzLVEdQlo7eJo30/4EHN
mxn1eYm6HznqC17Hpzr5atDzZ+YVdGvj60+tJnUv3sgZXV96yqnHvg4Z/OHU
5K4BZPKjX5e5V6kHkO8tQQgZapG7Hty65PTljZTfAM/anI330npDZgPJoefG
giaCtoIwQbjgNXIEkSOQfRD1ADK1FLTCpz5Z38CjIftGzIfg1YA8RpZ68ALJ
ESpojWYIfGOmDhkC0VVeB8G75HhH0F4QzB2C8GmCRwgZNXdTakavKZrBrM3g
tyJ3Y7QaUAulFmSaa8pcIz4fHz7bUHwak09zdkKnJecm3Ec1WgjeFDQXtKFm
9Nrg0Z67h3L/LoII+m+bOOrTGa/28JvDacu+Gefm+Aaj3Rp+MBztd8RDPduR
tS0e7wui6HdEszPZOuDfmX0XNDowr9ww9i1MXmH0WsNvwz0/EPQQ+Mkv1GoC
X2vlz247NN5jH06mPoK++HciayQeEayR+EWh3wV+FHvtd7W8+J6Ece6GXzhz
EfDDTf0I8kay9hNEC7oz241aDzSiyKi5PzTNRXLuyn36mfh92Wu/p8m7K2f1
GyAYiFY03G70e4Hu1FSvvyBOMEbwqWCiIFEwRDAaTh94MegZujHoxuHbD34c
e+1/ZPLuyVnzDRUMYy4a/seC3oJY0Ju5aGZiyDaavL25Sy88+5M7Aa1YZgbh
m4jvAPiJ7LUfDyeWNZ58YwVJzA2EH0s/AZ0haA1kRvUGkyGBcwx9/f7p7y79
zg2npzMpgoWCRdxtLJ6JnIfCH2Hyjues+SYJkpkbBj+B/kgwmNoY3lA/71HU
ta+f/TTBdMEn+CWhl8R5OD3VncD8eDQn4q/9cSbvEZw13wzBTPImwR9JfzwY
RS2JGdWbzJpMvtm82UTuMY39JDT1d4nxvR9E7ng40+Gp5mcm73GcNd8cwVfk
TYY/nv4UMIFaMjOqN5X6FM6zmJlOxtnUJjOTgtcM0z3HwU+hnsLcQnRV73Py
pQoWozET/hT6X4Cp1GYyo/5fUte+/swtF6zAdwb3nQvXmJmL7izWz5hNxT+F
8xy48+DNx0+90gQLqKWibbz1YuYWwJ9PpjWCb9inM7cE7mJ058FfxDsth7OU
3lzOuv9ZcFZQCH8FmisFq5jJECwjbzo+qXgspa61r9HVfOsFG9BbTu4V9NLh
rWR+PlmWUluC1jLun8Zcpsk/HU4ac5p1reB7wTp6a9FLo59BPZOe5vtRsBn9
NeRex9xa9t8yr/xs5rMEq9FcCU8531HPQnMD/Ey805lZhe5q7plBjp2CXXhn
c58cdLPQW0/ujfgad96IZhbrJvib0cpGN5PaFmoZprmNzOn5vOC04JTgBzLk
wNvEfjNZNPd2eDlk2oreT6zm8ybuuZscO5jdTn+bibNfcACvXfAPCnKZz4G7
jfm9gjx6W+Fv5ZzLPhcf1T0qOIb2Tvz20M9Fa4cp2x68djG/m/WgKY+RZQ95
9LwPnTx62+ht4b2y8VOdfMEJQYGl8jtagFY+nHzOmvsXwRnOBWhq/ThaBzgf
pJbPPg/uITj7eYsCanvhHifDEe5wGOxDIw/+Ye5hvHcBdzhEvt8FF8hy1JT7
LB7HOB9n7qRJV/f6c3iaHKfAEVOeQ/DyTW92lr1q6t9Gxt81WivE56ngicBq
rcz3B3NnyKi5f4VbSP0CHK2fM+U7ybkQnYushfBPMKO837jPefoX6Z1CQ+v3
BI8F5YJLzJyHe01QRJYr+BShYWgVoaVrsUn3HOc/0VTtEs6X4BSzV+2bgluC
q6Y7XeBtLlO7SqYr7JVzm7l/BKWCu4IbguusxWS7zv4WM1fxLob3F9lK6F8z
+d1h/hq9O2S4ZdK5wexNsmivDN0S5ovQ+E9gr/+8slbqXGauBJ27+NzD6zaa
ev4bzTLO5XBKmDPqyn8keMhMGe9zHX4pazm1UrxLqd3n/S9z11Jq6qF/A+jf
GvPQfYBPGX09/4vvQ+ZUU78DFfSMutaeggfUHvNG+j6P4ZTzRo+4m/b0+/QE
/iNm7qNj5FDdZ/jqaiszdoLn1CrIor3nZKtgTvVtBO4Cb4GPtdLnJl7aU71n
cPUzdSCzxfribjZwHuDzEL6FmXvk17kqZNOMrgJPgRc+VQWOrDZ4OVkrZ+w4
uzBnz96Bni2zbsy70nPlbIum7p3RdDL5uaHjSL3C9JYezDjxmTig5cjbOZm8
3fH04uxB353/PThT86bvxdmd93enrn39DFy4qy/zHui78HYu8Dzp+cD9HzJH
qJQ=
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0DE0QgEABdCPSKelTyWbv9XGxlZbTdSUrZq0KFs2Nm1sbNnYasvGlo2N
jS2bzSa3cwz3vOUN77yo1akdLwRBsM88F1kixjIrxFklRY4t8myzS5EyB9Rp
cESXHmdccMk1A+4YMuaRCS+88cGUb374nW8xLknIBlkypFlnjZneF5+888oz
Tzww4p5bbriizzmnnNCmySFVKpTYY4cCEZuEJP5/+wMtSyH2
      "],
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwVWHk4VO0bRtaKCtEiS4siWypKdKevfCRRkUgqpYRQSiVJEqlkK58kIaIS
JaXF2tiGbDO2mbEOM3NmLJG1Qr/z++tc132e67zPc7/Pe7/3c9RcvA+4iggJ
CSkKCwnNIZ/rw38GIZ2HOalbPom5EuDZuFh2Hafh7Qp9hSM5PJS4FN3a6U7A
9nHc4+u+NJhGC28d/cxDeDUYxd4Ezhd+shUOoyExMusMtYwH20YDu6OXCHAD
qhwmE2jQllxG+VvHw+5VdkKZ/gTuhRz8VfGGhovs4xtrWnkInmOYZHCDgFHW
+2W/C2n4+U06YUE3iRce+ufGLQKzBetvbKqloUmvt0iRx8O0cafk6jAC1QPJ
h9cxafjHcNW+en0+jt1wOiG+kY/4zVE+2ibNsKkYyOrx5sPB91zU6wN8LF3g
3/D6TTN2xi8a/i+Hj6DggqlsXz6ixlW0JVa1wOphSQ9tmA/RqcrKa4/I9/1x
ATpPWpBMp0SK6AjwNrFUXe8DHzkyJxjsea0oEBZ/WeYiQPx62buhDXzwlc0n
F55rxVmsHTn2UIC48IF2IwEfcZfbhnyqWqH8QGCl+1yAhpIPZ5kcPlLbL49l
T7XCr+mM8p80ATqyr5+Y6SbzydNSlhVvw303uZTsXAGW3cpW7/tK5qW2uV3P
sw17fSpEGksEsIt8nJ9E5pmStXkyvLkNsY6cLfvrBcji12054sVHg6SiR5Ip
A9kn9v/51i7AEls38TELPo7XWS6hpzPQI9Mmc5oQYO+usuTzmnzEPvu7NXKa
gR1F+iOHRgXwfiLyqXE+H7ZvfIyW72Mi+fK9I+enBSBGv7xdP0YgT+hvxlg0
E4d6hFeHMQRQWRX34APJ87LFgZxPEQwYsYcE04MCnN7RZ229nA97s95hQ3Um
FmX1txaI9GNZR7mlai+BrSsvpHWVMDHu3cM8Xy3A1GRBTbszgfTRiAMh81nY
Fvnr946rAiQpBv9TS+XhQIu3qdwGFuJ/tymf1xfARDm/seZfHlYmn/w+bsNC
209a6cZxPhKMzK2PtnLRPE8wfMeTBfljq5afreNDaWmEw5ooLmTqh68KBbJA
2J9af6pTAInTC55dI/stapG6bPgcFpxLog0V3AUwWmNaPfaGh/hBxPAMWfj4
8tqW+Ak+igt2lvQzuNjuoOxNeLDg7ZVs+PkGH8ZKK59l/+XgMmOI6pXCQuwX
MceFMny4n98apraMg/KinpIZKhMm5Y4Lv74lkHvwmHutTR9Ed5zX2XmJgTIv
88O9XgQuqHnOqfjWi9I6fwo7pA0v7a4r61sRCNg4L3aJfy/uzGGHsqXaMFR1
12NuNR8+EbzbKne4uLM8bcPUDRaWF4RKbNbl4/Lm19XPTnDQz/3YO72ThYTz
TaMpNwmckhtZtLm/F5LGa5T2U9sQuVz5+RcmD08DL63VucXGlKRPz98zLXjs
cahw6gwP57Df4Pm9HpSYnIqSLm+CtpjcSIUqD/VTfxPHW7pBn7As4vrRsebB
3IvVk1xYWl2MvubUjSViD0wmb9Ew1tLFq+Rx0bXz88o0rW4EmddpyK6h4ZSe
fZrtYQKT+kOeK2J6sXq4aeqOfhvitT7M2Aby4HU9e6rzaw9GRX+tz1Foxrre
/6L9WOS+3j1h2CzRjZH6gNgF7Y14q7U1MOkUFz9rGvJdLTpg7hZ228KwDjmm
pffXreCie/y8l00SC5kGSvvXEdUItByWvDnIgVCtsX3wTSZEaN9dTd5XwXax
IGchnQMR7bBrN3oZiNqWuoZ2tRJNlxmxdnUczL6T2b+1koG7F5VlC00rcTBY
4b9LSVxMrFQdl3veiYNbvk9fvdCAPzoBKydEuDhO2f2xWJiF7oqm7U/eUfF+
48DOyHAO1mm0C4lubYNV6EfL9t1lWK2Z2hi+hoMThfMXVE63YMJr23Yh6TJo
mAuPxg714dSHR9tErFtw8jK/q3SQAlr7Iaeb1D5Ur9T/VsNoxqJJ/4/ZbRSs
82zdbPS5D8rOaedtXzQjYUdd9bl6Cpg2ykOVhX1Y2rJJ6UteM0QW3bkqSqNA
fCgy+ew6DmwMj17pEGvFWJ3SnVSZMhwzM4kTS+9D3eKWFRdON2NgibTFCIWC
+bRJboVRH0zOza8LU2hCAO/9rXthFFD7NvxT9KsXFd7MTL45HZV/JHViXSgQ
uLeNajB6YWjdL0H00KAbsX5A2oaCJqVSv/llvTjy57nvmmc0aE49l5LeRYFO
UX1JcEkviMhy1ngsDbJrf2jM3UmBtm9+l31dL3KUohnvimm461K+kWdBgamr
fX9iby82GswGjojQYbr9T8ysHQWymyad6w/3Iug/S/2sJTTIr/f+E+BKwUNj
0eD1FmwMnSoUNyPvuYfG5uOuV8oQc33HzbvFPWjw3iUUEUKD9dRdxZw55XBa
flA73LcHsyPTeY/iaVggp5ieYFMOz+/lhKJZDxZ5EgpRaTTs+dsx+l9gOd4V
6P/kWffAIo7y81cKDcWDS9+8vFgOwy6nR9LRPVD7IfqjNooGYfUAs6/65bA/
+C2HbtCD9NuuiMukYc2xti3zHpRjLueXCGVnN7LUHI72EzRkPzaWnH+7Airf
ZjY4/NsFe1tzO6YsHaJyJXnz1SthV3OswLynE0sStblWqnSEVsVuzHWohOeD
YqZzYieUFrGmXTToUB7oPBgdUIm6w7ynql4krma34ZouHVVftr2fjK1EGT03
5Jl/J1JOCj9u1qbjQnj9bFpEJbRWxAuYbZ2I/r7dwl2NDpXb9ksnjlZC6QZ1
sUJhB3Q9It0bzOg4kHztW8RgJR4OlsRt3N2O3kYhP8crdBy5EKb37TV5vjRs
7viT+hRqoXXlbAwdgU7CJ+oXUGF+YDLlkTsLW3JyPDQf0VH2V1zcZRkVA7Th
FTr3WKidjH/dGUWuG3ThQa8UFXrXq+4aFLCgHCpq73aXjgq3lGq5kSpUL5ZJ
/THFwujTQ/Fngum4t9ox24FWhdzBttQi63ZIajkWTZA6dXNbpofniyroLvWM
y5BjgSYlfPRZMh032gZnnM2oOJMrbj+8nIkI0/eKu0vpaH80ue8ThYrtytbJ
KzIZWPf1YeedBjreX3iiZjtLhZfCTNT6Owyc1EvPKWqig8/ydAmUqUa5T/je
FU8YOL44+TZodMi/GjlIiFYj4/vNACkOA+prZrxuVtGRaPfcNqiLisRjPpqR
x5jY3BiVeuQTHU8le98HpVAhGbM6IJpg4vrmVwusXtDReLHGS8uJiocNHgoX
1jLxZM/D9pJiOj6L7M/jFFLhnW9wReQ7AypON1tqa+iQ1ZM8ozlARdY7XlFm
KAPhnpmvRsg86fQbKjsXVGM46KfYM1cGrpVb2+9l0CFNl+77pVINySMDEw4k
np9oed6OxLcm/mpWUq3GTr9t236GMXDog/z2iv/X25Pu+oSst7Sx58ZEPQOS
9T6XzMl15fn1lpoCKsSGjYqsdjDxwlFKy7+AjnDr3zH7ST1MDhcX6nzLRLDn
vGNpb0ieF8cIOV2hwtXtyxmimAlz8dv8zNd0SO6hPyv2oWJqmi3W0kfGf10/
XU3ykLV3jWCBMxV+34UK3tcy8afW8WbrSzrKF5/PKztLxfygVJMfFCY0hKek
1cjvHA8KFvroRfKTsVepjox/0nJeoomM57BfHMkn4x1e7S91GmDiKfFdujad
jnyN5NEdjlRQ+oZOVquywPar0uxLomPgx2OHz6Dirb7lQF5rO9IV0gLnudLh
NvS28tmJKuxRVw04NNgOm1+0Nxtc6HigaPT6zaEqXMyUkClZ3IF1EoX6nU7k
fRlk/dRoZxWMX/+tebOnA/IKQef67OhYp2uod2FtFYzsPDacv9iB13NvO5+0
oWNnddYqG9kqrOjoR1lQB3ZXXoug7KNjnuh4ktz8KiRPllM/hHWgQodqzrCi
ozBfaW2UZBW+Pvj72SC+A9cNG/yyLOlYnyxsaiBUhZjLSnK7dLrhN0/x1IEh
GlSuPVSrflyBfcKc6Q6DbjglP5yVHqDh14DGx8XRFYiKSv1yhdQl4eqGkVlS
lwYiAzfbk7q06Xb3N5pNNzrblEMMODTUyc3+bPCrgORZ2xX3T3QjesJFuK6b
htVC72X6XCtQoTa0Qv5iNw5sYt7rZ9HAd7/1c+XBCjgS8yXvh3Uj9Io3g9pC
+obAK1LeqMDbK3cV4hK6wXWSVipvJHXy0JN9mloVuNm1ZfJYKBv526tEV9vQ
EPoykX3RqAyHsx4sfXaXjdfSxX5i1jQYJ8m8WmdQhlR17ZP2kWzorrz6q8KK
htxV7U0nNpSh+t+PW8IfsmE55n3BbS8NLDXtGRWtMlReu/ZycwIbke4qCfw9
ZJ7Sngtd1MtwdZ6vg3MyG1c0m4X3WNCQ4/nQVV21DLznV86IZbChJ+6/LPxf
GuzSTFvdl5ZhP8vQSjubje9j4iYvdtNQcGhtn5ZsGe6tCW3QXdKHbc4nH2uS
feiw0jepx5eC7yNOfu2KfTCff3jhqkw6Uk+YGOeS+DJ2U+RdEv+WYq6smkFH
0Yc9b26RuNJsxfBWEnf3TDRUI8/Fslc32+xI3ETVyUeg0Idhy42sNWQ/h5a+
erGOxDc41BBPSNxlR1y0dhodNRqWItMXKBi5rmm4j8Tnup0YMHxOhwglvLWe
xK/Y7N8mTOKv6onbu1LpOPxFWT6NxGu/SvxQkeLAiHVn7UhqCwLnfNnCmKZg
zR/vgYUSHMy9OsD1SmxBjbhGyps/FPwOCw3QFuOg3kvD3S+uBStXl9Ql/KZg
i6mHr98cDjKKBqznRrfgdPFio5RfFLgMdkwPCHOwK3LIUud+C/YZREWUTlGQ
celxRowQByPTjD28sBYERTFfT09SIHFcbtjtbx9aEh793RrSAgeW8bmDJD4m
kmu6bZbkczZ1fVBQC3YEvh/MmKBAa/qijAvp0+6IEp/3zDLxvYHOLH5FRYpW
59zJWXLdBnWjDj4TZv8Ei24LpqJ1Kt++7w8HZz5rhN9oZcI/7tbS2qNU2KqK
rXCb4qBC00v99Tcmdg3q6wZsoqJ0gPsubpQDltTfjK50JhJFV7xw/lOFnFNM
72LSf346QJhPBjMRpaeyWu1jFfSk5zps4nFg9uifde1HmFgTtr4p0o3Ugcfb
O427OehKCzHeqs/EPnerhF+Lq/CIx4krm+biSKXZjKNHNyImljleJn1HkAMt
dnqCi083C53kHbuxK2RyQv8GDQ8eaBztGOLi7eta7XrTbrxM2jcpQ56PwJmH
uTV9XIifkQ36tKobSvTgkONypD/f1bvSnZxzGiv8FD4Kd2OVcsSq/vpGNFn5
+2+v5cIs715ozpcuZMSksCvDSNx4VeunEi4Gra8rMby7kJawam+kSSOiXLcU
bMnj4isznbJqTRfql6vevDzaAHUXYeMGXQLNTxlr8o1Iv+b8e3dSUiuEllGO
dKkRqLtzozBNqRfi8UEHP3u0IiHX12RyAQGRrMtHRCfYiAqqEnXUbEWOlfKv
3X94+Nslmn6CykbSt9TN9Z0tmG74MPOlj4dcRePFpfHk+ZP3ELpF9tFf3SJH
xVoe9toeV6G4kvgZs00GBi0w7tjaN5XHQ/amMoOCDWz4Pf0gpNHZjF13N37r
SeQhccXQivKZHvg6ZkcahDYj1mrlxH9+fLyySIzrH+LA853ExnvpLKTnb+hw
PcWHTbVh5q1aDpzerE4peMPC16Mdb4Kt+IjRNKLOpHIwGpjIfPqOhcrqw0ue
6/AhpX7o76njHCjri6oSO1go253wkEXO4ZMFWf5hihxIbHsWElfOxLm2xTnC
fAKWpw91b6juA6/B/nneTiYK7ojd+kYhkHQ/JJ5xtQ+KgR4XvnxhoM03M/31
UwLT0m/nvV3bB7M9XFqWLgOiKr6K5f8JoEPLKqAL/3/unEq3W8XCWf+jP8IC
BdC/1htync7Di9Tx0VwdFqjzUdjpLEDF0/cTTo952GQbEDZmzEL1/fcxk1sF
8Bl6n55ox8OC0k6nGCsWsuYMFn9bSM7R1eFl41I8uLlJQfU4C1W++6zE+/iQ
/anMpedz8SUvUWT3RRbEn8hHeOTxca5blHfuOBe5PY1n88JZCHDRco4N5qOK
ukK1X5Sc85KmRNWTWTgc/H4Pt0MAmZct6DLjg/CIttuXzQAxO17SxhEgqv1b
tOMGPl6w5gjC+QwU8DLOLBkWYOqYckTCYj70JhV+DGxmIuiYQr/TtAATxjGS
J8cIhDQ9tnGKZsI4rFM1bU4/3uScHeusJDB+KNqU8pOJlOCZ767fBJhJN8tR
sCEQud1bsGohC8yhsq2LrgvIucntYW0DD54XJ7OO6LLwW+b+ycvbBEiX2bDv
6GEebqqvu8vZy8JPP0VlCScB9ix085Ss5cPs/GzYi+OtENzwOHsvRQCRMXcH
SwEffa0LDl8aaAVhm1llmCPA7cH8C7vL+Qg79LDH+UAbNGNfzcqVCCDYt+9W
0n98OIWt1ZBqaEOTw9GJJroALQdqWtVc+Mi1VYnedZKBO1J0mhqf5Eei0/DS
OpJvG7GP4iJMvL9qXrJ3RoDLkc5pjBECVkHy3fbxTJwM+PHE64cAsg0ixWWp
BMy4H8va/zDxtueT0LAigZqdL618kwkEPz0pr7aJ9F+Tf0tzbxFgnrlZY9FG
4EHv17Rnv8l7aeaZ5MllfBxIEspyVueD6WJWr7ewGa0N1lGRDD4iThwdORfO
x+CLp622Pi3gPhVERpM8eJdq5/7/fxolwFH3OcnDAW1pIveLAJk3krfpvuBD
zmP/1pGMNow+psrK0gQo8dnwgXuaj2vr3w2uOsSAwo4DSSk8AdodN4Te1iJ5
GLyi2DrBwPnU2YUSuhzEzImcM383D9xFd/+1md8C/9QQA3HyXrh8SVMpIpWH
QP9LTu4bm5BQePR65SYebA9ezSvSJOB40iMjL7oRO5UseM5aBHYf7C+Xek2g
dsjXscyBjlMVjv/OruUjKdwm2kObD6Uf+YIdGs1wLvydU7lCgJ3sLJPKLD4e
Szo/mRlsgc+494+jWQKMn32XPvOdDyGdKzIqJm3gZMpfMa4UYH6wT4lxCB/Z
VM6Ok2IMKOVhsG+8B+sKngW6tHKgeXze8xe7OzCqRnMuFOmFf1u8W+g+Ls50
JO1Y2s+ETk/NeHxsH7j7PjRqCvGgofx5Y5ZbK0yFVb0z9nPRnXFvsKWch2UW
1+pGgkif21LYNVrNw+8bISaRV0j9wM3uAy9osN1yP7Zmiqw3sPPrhDwfnYMS
OTa0Jng5/fixhKwrJ1rsnSdZ16Lx8fyvAy1o1T+v2Z0tgKhSxlv9Cj7EO+Sb
G63bEKMvUbBqrAtxq2n3tolycHTmkMq6Q2wcP9Y5HLGFDbfPwj8HxjhY/dE7
FG/bkeYdtLXJog93naRGr3Zx8d2roFJYpg0DzLF/lgdzYXt6R4k1i4c2ZlCi
gzwdNrdouUnrCWiv7dV+8YqA36CpjcthOjbdWXbCzoePoovRIbwDfHwYihsO
ym6GnZz6sO55AXwVpo3+tvKRH3RvV3JYK4I+bJ57+hQTVYTCJ157L0zTPjeb
xfPQLGW7bG17F976RFWbkr5jrcqfqWZPNsSeXC781M2G+UuVlb7gQsK74p69
IamH50qqOv05sBBM6WWe5iEzcDTF1qUZNcfKRE+k8FCdqRYgepJA0NSRpiIH
Gg7628bEdxH4XXNjPiHBx2GnlTOc5004mHdF9UclqWs+QaWWQXwM1/2Zardu
wYoluV+afVvAevDya+68XjxSXFvE3N+P0Tc/376T78DyvdHFbzz6oPGfftpN
aQ6iW43t56qw8flFrlcSn4N38rwwL347xA6Wdjz42YeHQ8U90OSh42PB2dbY
Fkypmb32sODBvEqjymczgUuPpRZ9yW9ExX+3EXqaAPsYq2s9lcBq98SP7DJy
Xiy57f5dj48piw2P/pA6LJ72QfTq1mYcGDeLuHO3Heqn/lkuZt2HJjOp6yuj
OCCqmBdzDdgoK3betozcd5vP5zefzWtHQctykdMqHFSp3BlQ3s5Dv1J8jr1u
C4KVSu8o6vBwbetipbC1ZD9aFnWyYxpBSGh/NVpMYImksNz8Z6Q+y1nIr9al
g/DVGZPOIyC7lth5mNQ3u13Dc3IPNsEs41wuO6ULT/8qZq0f7YOMnKv64HM2
nu7iq9Wd6cUOF9UFNte4uJDOyX0kyUTXBavqI1840HPvrKkO5iEvi+8j1dSE
PL7DDYYeD8zN4hPF6wgsfZb9LO9+I8ZqNhfx63koTR4zUbtGQG3N5MSlHBo2
nd1ab2BIoEMsXD3zLQHb77b3C8/RofXvV564Vy9sdyfwFgVycddfhv38NwNC
UXnq969xEBC0SGyc7J/j74JlG4434zpjQtPsKRfmWmA68Hio+qXXfamVBtqy
XQk6O3jojgixyNAj8CnqSuqHF41QWi66sf8WD/tNhmNLDhIwmJTv8F9Fw7jJ
aZNPH3iQkbXOeXCOQOWMa4AB6Rv/ByT+gtk=
    "],
   VertexNormals->CompressedData["
1:eJwNl3dYDl4Ux5UR0hKyokLRIKGEfH8NUimKtqyshKTsSkuTEu1EhdLUUpK6
KklTpaXl3aO3etEk8nv/us9zn+fec+6553PO+cqfdLE4LTxjxgwZoRkzZgpW
6rmDt734NFxWUNj+UfcZtll/MXjxgYsqhU0ynE46GlgTeYdS3uCx2Yry3QMc
bDhx4KjadibM3Pjpb13fQLuQt7m5go3/+MpyR91YeOTRO+/uo2I031/YHf6Y
hdzIzpYSLzb2S2e0nxgpxMqrKr0yEUxEzJxoCD3Igfdu8TfzHuShVI2mNz+X
Aa/2aKn0CQ4KV4iIzfd4hbdp4iGbeXTMaD/1ytyRi1k/u7Te2uZBxiviM7Gn
wzHBOK3jMB101bNXjiz7gFt9g42YwUWUlKoJV56Bv72j8Sk76vHS0Lvm5iAb
3JGOYR8XJiQ8G+UuNtShPOiAZVI9C7Fb9QM8Bf4+VFFan+ZYi48xiwOs3zHh
Idv++30KG7r/DERNVT5isN4uSvwrAxeCEh0KXTkIDGG7X5tXhR51i7gbSxmQ
XrY9+fgSLn7c/hlSXfoerYrbLzg70+GadeTK9AkuFnm+2PrlfiWm3rlXLhmi
oTIl5M6GfzSIitcN9pe3YV9G9IqOCDa0Agvebk2no2965N++tE4Uhp3OdjFj
QahNhhbJFdh/KPwtYk0nLA++VAwzZCLHKGTPMVkWuo+zw2Ta2wGXhNV/HBnQ
f8TQ7jViw9R2YZ3mvC+o2p7FcfpIx+5Dhq6+Wzn43rQvd9uTZnxPjC5erEnH
0StezeKDHISVdV1YEdUAleWa7S0VNAxPbVkprMnF9ounfV6srwPz0cmcUzE0
bHNJes0Kp4HMvLqlO7sP5eF98nMuMZGYnfb38AY6pOTTai+9/gbLTScffFdg
ICxyp5+LAwNuEQV157v7cbL4ZWGLgcCf1cEG2glM2Nj9Xn5HrA8/RHYXc+Np
yPOefs36yYL6gkUHdh37Cr9wx5xr1jSY59u2aI8I8qp5Zfmd5HZkavTreevR
YHvV/Yx4LgdNZVpKyc+akf2f/5hEFA3FqTFy1jwOdA7vFTmZ/wnDQ0dP6i6n
w7Jj4kT1LhqUlKxilQXneallTYM8GvKPDvjFdNMw7nJdd7qJhouJ5e60MiqM
cxPEpecw4OwcMU9zOw1HT2/1rZKgYm25aK+dBRN1WTSDlFEKSuYlGynVUUBx
27ElooWFTw/PtkVo9qK4tq+u1ZWKibeFFXaVbLx0Dzecu6wDmU9C594+SoP8
+IlOnyMcrLxrKWe1pxE/NtvfuHqejgi3N30rz3NwMcJbaGy4AnqTASLUzQxM
nnznMmcnDdLsqvYnjxnY1nLOyNeSArHfFaaSXBqsDe90apUxMGq1+6JOeT+8
HKv9JhYyIOns++dnviDuVGPnfwH9aEgKu+ftwYT/877Heruo2Dzjq2eEEQWD
3PG3zhQWRjg3ZEs0uuFdqbX3+xoaNDiaY3ECrsNVYypjh1rxVrl0pU0YHYaf
3335VcdG5sD42Hnvanh7ZNUeL2Kg9qzij4/xbMxbKLSo+3IBHhxvIBI3mJB9
bFLQmESDcLmwl+hPJkzXOv5sGO1BVe9InKQbHXu9/xZtlWViRU9S5VbDXjSP
b8oYdWJggUO3TYcyHcqlSibTv/qxWO2lqHghE5uK9xTNy+7HnwPbayS/UDF4
rzto4h4LdPUeX0pYO+Qe6PQ7TtHxQFa2alcRC3E2y74sWt6IQ50a9susmGAu
LVp6OpuFW6esl7Q6l6DH4NjqfXYsNNnSEuq2sVD6PNyG7AqC/Jxf1KK5bGTw
eOqpl+lYpHJHJn43E+KuR4vUuT1YWWRVZvmdjnWbjz2bjqFDNG7DigfrvuGi
k4xZViADik3ZN5dPU0CtWLnnVREV0vpmh4KOM/GvyFxJOr4La9ibHoYL+P3o
Nxi2IoSJqozJc2OSzdg21r8gWY+FZ1nhcyimTLAHVji9fFmFJtrb16UObNwT
cruf9JuBpzKXXE28kxBLPZ3x31oOzr87/5+uOQN/4nI08m++JAYPqj93ZHFQ
nqhUkHSVDqWu+bmPDtBREF8+fNCHgttS7kPtF+ng3oow+HWZioo8kwYXbxpa
x70m63PpGAibsl0X1ov12Tr+3vUMGK2OV5rzj46THgmlRV0tELGxP1hnyYbn
myTvA0V0qG1ND5r9vhqrim6+0U/koCOH82PSlg6TOfVdM9Vew2PBbh1xWy4+
7Yl12T1MwxFK71rLkSfka39l8spPXDgUCptmGdCQaLfH+T23hAwIqw4+WjgA
SacTEz42NKxNOVF0QcDhpMnsh3UcOvbvH1fcwKXimlmHsYlRP55M/EPvBybm
zxvUanpNxczFOkutF3SgzpoX81efg4nSY2XMbYLzv/LkR1Jq4LTHwSLaYgD1
cp7PC2IoaAypTL40owxwFNcaXcXDNeNLmYMbKbixg1brOD8F15cuCNoXxYP2
6LdFKd3fsE98h/zPTXnk4cHscwOZPIzdTeloiOzH6YRx312G5eTzRMkR0s2D
+xR7tp0yBQHuqqUdZn1YpB1VfPMcGxz+db/o6/1Y8q/fX/9YF2IHRAuKHbj4
p/iix29TH67y3c84XK/H77pTI/7PeFCU3IlL1j0oT5KZaLtXhKxXxi8f1Q/i
3NtNEkWRX6EeF/Z90+N0FLeutJw0GsIzVoaRyLouyCarSS+UAgkfmM7MTBlC
ylVhjbYbnXCMX/uvfX8+Gb1te+VFzhAqB//sO/y+HXlFoxg1LCHhPwfrPg4N
Qf/tQrdjal0wbBXS7bD7iuXDm1OiagbgLx36q9C9HbaDF+uCslox16bN/lrG
IPoMnqUNtn7B2mBGS59sOda4zhXR3TwME5UH5S+ftULG4z5vk/s9uK+RjxR7
PIzneR9+dj1sgc/agVS3yTiicfWz4vHKYRi+upfSdKwZnY3aeTTpbMKNk0Mm
dRg5t7oClgc3IenAvXHXA2+IS1bkY7uhYcQEDfkJTdRBZdv5RHZaGWGoTTSW
SvCx3mfYiRFQh1/BqS4N775g1Z+Ql/6vh3CdfRDjCZVwtPMt0Jf8BEX64av7
F/Nh4tvsj4PlCN4kpbOmIh/3ZPdbaOTyMXQ481DSpnLcLNLV9NW/CsqR1/Zl
H/kI3qicKTZRjuSiKyEx1akkR9zO+1UpH1GaF+vc8spxjRHqZpVVTP6I36u4
l8xHp+40bYdoOZQDH60YP/me1FYkXvH146OkwKHzB70Eg1fuPzfKqiSrdt4a
YXnyIYJbC+KK4lHdZbFrXs4HzB+e23c/QmC3b6u2FiOJrAiY6VWZXogz7HLJ
Bgofcw7JrPpyJpf8/rdw1pGkZzhad7NFgctHU3PzI6vz+eSRgciNV89CUT4n
w01kgI9ns8a/Nb/NJcYfowPVl8UTr6l/9q08Ps66f3yrr5RBjudX7rMfyCWr
YkUWn6DzsWw93ZqxKJl4HL7quVb1LeG5zs30bObjDTv8SOj9DGJizJLVmVlK
riQfOL2xho9CuuGnslmV5HFG/BqFjbGQPbE6d1UWH0W9p1T1pT6RZknL4Cjd
u0QiZeOky0U+XjmIlhCjOgLncZ6E9S1iOFqqvMWcL+h3RUsDquuJ8Mq2DFrR
aZzx2V/XtosPK015T6MfDWTxlgcuZZvuk8/HgtZNKfNxbqKJ+jSygWiuSvle
+vmpIE7l/avU+Iijmn4t+FJH0hJ+8c/5ZJIXO6Ujx3T4qLhgPU9pqIGIX6xS
t9yTRtgs40Mn1/DxOqvYd7iqlXTFyY89640ix0OvjUxHDeNVVT+Vp9NG+h/v
/fH5eRJRTA19yrEaxs8dVqFTrm3kxp/F6Q90k8mh2C0h7abDOHhh+9gi8XbS
JXlDZlznGaG/W1rdJ+Ci9KiwmptNO/m6LXYydTqBLA0PNs1TGsZ+LaFz7i7t
pE+O+tT26SNyJ+YpVX/dMLruhsmsFuz75VT99oyPI9EeIowta4dRXcw6pRrS
QSqNzVQNZsYT1p+SyxbfBbyfNRuMy+wmoclPaKtEI4nz5IG6hYsF9cE9pul4
Qg+Z1NuzedvaGOJ4JnqdTe8gXFbrHjir20NU6t7V73uXSN55PqNu+j6IFPvj
ivm93cTwTO/V4PinZKIiuVBDZAhaub5qB7K7icnoz+ZvpxLJsjUra/MWDsGy
StRk/F03yb9V+ozi/4RoX+iQ/Cw+hGUxFkUq9d1k9bT72hWnkoinWqwzb77A
nwNMN3PjHkIPlG/6tTSJ0JND4y8ODSLgwP7Y4/9RiNmQ24LzCCS8YpX3Zg94
+OHidMY6kkL6ShdLm5v7kcybXz4fPMqDpIZN/k13Crmg9znxRXgASd1ypsrB
lYcBQ3441ZRCmpReSPOigsk6+zSmRhAPJTkf+z3kKaTwkFzSlP494uiuMWdN
Cg8+u0cS8qjfiH2VcO9axzDyrsy+Xrmch9zYObtWe34jDz4csraLCSeSMUPN
ZYI6339Y2PjscgoJ/S78q07bl5wUi79bn8rDkRv2ck2naaRxsVCNqrol2Rg1
e/DNxgFMxo90FSbRyEXXychx0ROw/PQ9eHjWAFq9OE+ngmhk+4Og7GqrI2hU
cGP2LB7AwCdbB21XGvG2FvUM9bXCuSK9rzmKA3hIthy7YksjhwyVamwjDuLB
WNWtU1oDuMylJWXq0ohtpustqZ8GSDqx4fYvwwGw1uWPcjbQSJJQ4Mdoijr0
Vwe6ONsMQCrTfv0JNxpZZDJ0ojzKBa9fPh9cum4AqmVH/ZT+0Ml/xClUgesL
6bTDM33/ctBSaOLXu5ZBNCJ/2ntUBUMn9tIi+14OcuskV1RJMoigQrZY+Afi
fGrOsbcCvSF357TQuSk6Offh8AZb6UBsMfBToQvu+WTcX5PSTydxX+uT71GC
UHCOeiZ7ERdncgosvEvoxJhCl33CD8Y+TSOxns1cKN5af8viPp2U+ilIPJEL
RRe/XG/1YS4GzBOWJN+mE4tatlBPTjS2e6qIyB7nYtf6h/8pKTOJ0W2bNhGv
SPDenJ+SnWajJaq0KUePSe4ETSluWBuL7hla20LYbFDn63k8l2US2Yo0sdrZ
CXCU1N3vL8LBBY662hImg2hfUVHd0ZiEIwX6Q/maHDxZO/NDUyKDNNdLRt0K
eA6n8Bv6Ly9zcH+yMGCJGYN8fDSVu04nDQcmGQPPBLpl1osQkXW/6MTXILTW
bUU6GoWrG8pGOGjdH7HZq45O0r+NSxVfzcWteyqlHyS4WKqoL/l7Not0Gcp4
PEQy6n6sa/uizgbFNWR89x8mCdhLS39x/iXU9KV6nmxhYzRh/oK/uUyifv5g
QUzjK/hfE1qs7spG1LupUAtbJjF8WCDlJ12AhmNvJj8WsyGrlap9bppBniUt
mxli/hq9b477d8/gwP928HekMEiQgvocg/dFePy58aG4CQfqMrwR9b0M0uOQ
4XztVjFqbjl8tYvigL3+85PxBQziMHcPXkSVYlb7jrANBRzkW11STAljkUtG
N16qbMvFNb4cxy5BoMet0nl8JxZ52rtlt4VqETg35C8/ymRBZ/P1OSOSLNL/
0lh07qlSnCxg1BfyWCgst9/an8MkQZcTf5roEYgoUnzEt7ExViGeGmzAJDvV
TD7TZ1dAjvuaohHIxtGGEY5YK4OExPpeqJusQJWz8rkkquC9gZV2s6wZZNTZ
3bE1tBKv/E44dwrmw2ufNpQ00ehkm/h07ry31ej6vehzwU0OUsfEZlhQWWSN
wsXro2JvMdxfk66qwIKvU37q8SwWkd8ebzQd9h6FWkEu/Ros3D3QBK//WIQT
I1GtLfUBPyeV1U64spD1z786u5JJbusc/U+O/hGHJ3O1ZlWwcOBixcuqzUxC
mbdrntSmWthsditXVWCjySPv5v1QBmmyW2LmsbAeey0k2miRbFy4nZ63ppFO
rGtW6NYkN0Cz9LVm71IO8oyTlPl8GrkdNKDSMt6MhJ3fM0wEOlPqD8NVToRN
Ro5W3w3cU4n9R8p2fihnojpjm+SityzituFUb0PKR6QlLLq+uokJjfGVrleV
WGR16Ktdm8vqUZzoEXB+Dgs1ko7nhdyYpE5U596yFc0gwzlmUtYsUFS6LSZi
GUSu8wVnWLYVNRqhu/Lfs3DH4bKTYSSdFB0Xe7p17Ase+HYOt+qxoRiNNHMn
GqHoPrhiF9qOMl5TwZVuNiLbQi5P61FJ46YpU45JFwxYK54uFOOgujTLz+cX
i7TkBI5ukf6EaB+NvbuuMJGcud0r8S6LHLzSR/pqGrHmTHJt4C0mlgu5q0pk
Cbi2z1JcktkKzVdGCnaJTATw45Iloxmko9bTcq9iB4TKLz863c2EV+Tfbq3d
dMLWPkFdduYr/h75od+hzkLxzFemV6uppKcoSXb2nx5Eyrka9qewsPfutiVd
qRSisMNx3eO0Xvj2XNrZZ8DGqrpjkn3d38i8saM8+8d9cIhPMWy9yYZrzlLz
udksIrw3ya+lpQnHf8Zf3q7NhPlVr703fjPJh4DemNs7v4DO3bXvtBoTXS+3
Cs9KYxB/b4apWVYX3m6Q+LpwORNFs5W4q37QSLXSPKMFOX1IlFAr0VzKhLzT
spooeSpZ8Gvi67USCpa/k+d47mRiT6eNiFfnN7LmSdaWPAMqTq+xds0tZWLc
5cKfR2395MWs27f14ynYqdo181wcC1JmWyzD/fuI8b9anmsjBayD0gMGdBbU
uuvK0sVYJLs4/ajojS9Y4HvB31uUCYfo6zOHxhlkXXR0sX1EF/Yuk3yW3srA
l9ThyJNUGtG82mfsyv+Gh6yRoNoDDOwIHS63ihP033vOKvRSGgzMEjokBPq5
/8W3Od91+sm0eJV5cRkdRrTT84XXMhDWIl38+mMvWXfZrVbuLh0GpU7PFagM
zOw+dPHIkR7S+coihDVCw7V/8/Mpgn88oGs6dK2mi4wve77dOo2Os322T2yE
WHje+2rri0kGURs08ea6d0HIss5l/1cG3jP50acM6URZ5qRI6/xv+FNk9zxi
HwPVDcvfnXSgkErTAvN3hI5QRorMGwU65E79vJec2kvOXYkVnZXExNWeJarL
ywTvKMIDZ4du8lTzFl90Fgte9+fOOLuKDvX7pmyfn53E9McKh1FZFkaz7UNW
1tKR5ebHKzNoJzIORj7BU0yU+BYpbcphYH5iE31Qu5VMv3mYK3OPhVTjzQsd
GxjIZbkNpZylkfwsZns5viCAGx0gZcOBconYsG02hTi2ZNWLSNMxpOey6H0o
Hentaz8PXu8hStyUJZX5LIhIXndKYFBR9lrP88JoJ4l8b2O/jc7GFquBda3x
VDx0HzJ+eKGNPOY3dcyK58CnfYf4+1Iq9iSPlUf9aCYjCmLtaSwOdHbdnVei
TQM75GCg88lGkuiUvbjsDAf1XX4anXZ0/BELSevTrCdvvb1FakfZYIcuFrJe
ykAn4++qRV59ZPqwp93rDQz43PhUJDKDgYcBp9wNGttJ4ULjWm1hLphXtB5l
CfJ3vj99eqFiC8Hf7W4jBwVzibFu1XUJCk44mpAbCnXE1CNnI3NgANuWTyeI
zqGAITGck+BZTcQzGR8q0wYwQyv9+1g/BRpvstSWqn4kK7VnKIiqc1HLd78R
9IOGYydC2sfbPxG1Q/MrTTPZOOYaPvL9CQN6s0PSOTXd5PSmI/WqwVSI+axv
PKvGhtbt0lh9uQYyPjLzrpEBDxsX3DaQPduPXYE/FzZuriKc51sv81UHofOP
PX3mUy9Uz/Wc10h6RzgM8+Hd6wfhEGTGH7/fh3VHhnuMl74jv1/reOkq8xBC
8MEllAKzO9deyptXkftaO91/vOHA0eb8l+3v6ABteEqUVkOq/6gmOvkI6qmy
WIfHCBNpU6IPK42ek6mN3nXbBfyO+4yoph7iwe9MXpXmlmLyjJdvtaB4EI0a
k3Mznvfg6XnnFbIb0kjWUxWDvUuGkHDuDjf8bjfej62bGb3iMXF9cneaHTuI
Naa0BuOMXgRL9ZAnrlkkr+zgZ5lPA1Bwv5Zz7QIVGc6zWeHShMDRdamTOxsh
z/eHWTkzoVzr/fHx3GriE+VvsjqZgf29PT6LGWxEnInfGvw7H/9Orx/RWzyI
+59Iy7yD/XBZ7BiooliIYLpe2gNjgQ5fGPendc9X+CapRHWW5WB+tYetheQg
lK3N2yi+/eh0e9womeBL5O12LD++mItvZpV/N/YLeDS8RMl7UkIqVxedbBDw
XBQiLzYoIchHtVMtlb8/EPFWBeaUBBV34v2a54QPwLLzfLYqpQNz3eNPWjix
cHTOo79u1XTocO7baf9oQJh++YCUYI6v6Jr1OmK6B7dVmm6qVVbidtfnts8b
uSisuVvfqEbHiMOLCeHfUXhNjx4L/sBAzw9nqTFLDtQ0Wz9ZtZaSCo2U6+vP
fkNvwIMz5hk8mKhv7Olh1ZCBwL2Xi7kdcKw0E7q1dwi9c+Le7HCgoTFHz/hm
by9mSzipTn9jwpS0F4WTFtgHfZNtCOJA9rD2kiOBNDwSPuRi5FGBlZ7ZT1+0
0PF+rnn74zIOFgrPmk69k0j+2v/RVPjbC22bC9Mv/AbhZbtvq077B6JtT+9e
oNGGVe5LZv83MIQPIhdlw6QbSVxMm0P8aD3W6CTkJh8dxv+gtNYN
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{357.26107793392725`, 137.39676477615694`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 14.}, {-56.46256865491101, 
   16.570909988178723`}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-0.3748897795171515, -3.35755433292595, 0.19049030070754328`},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.7592334028077707`*^9, 3.759235241768835*^9, 
  3.759246468304467*^9, 3.759246590194846*^9, 3.759246733316518*^9, 
  3.759247099012374*^9, 3.7592472377982893`*^9, 3.759247281489523*^9, 
  3.759247979162485*^9, 3.7592489209219418`*^9, 3.759249033223909*^9, 
  3.759249688861747*^9, 3.759249815976777*^9, 3.759250612075322*^9, 
  3.759251662967119*^9, 3.759255707007372*^9, 3.759343547648552*^9, 
  3.759345768277549*^9, 3.759346447240469*^9, 3.759347329004874*^9, 
  3.759618708362731*^9, 3.759620128534151*^9},
 CellLabel->
  "Out[127]=",ExpressionUUID->"e3fc2cd4-a90c-4ed9-81b1-9b2429ee501b"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.759249684555028*^9, 
  3.75924968703883*^9}},ExpressionUUID->"6518aa2c-2c20-42f4-a18e-\
f17a5c66258e"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"ydata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"120", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", "0"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], "]"}],
    ",", 
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"xdata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"120", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", "0"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], "]"}],
    ",", 
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"zdata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"120", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", "0"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
    "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"xdata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"ydata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"zdata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.759618613453245*^9, 3.7596186390351954`*^9}, {
  3.759623970336281*^9, 3.759623981807678*^9}},
 CellLabel->
  "In[129]:=",ExpressionUUID->"8e450eb5-90d1-45b1-b28a-cebc9439ad10"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJzt2XlQlPcZB/DFKyROzKIiK3K86AtudOtdJFThiUEjibEeHB4RdznUNqbW
i6gddMWKiGZyFUNtNvUK0BxGaKqdiO7aRk3Hs4lR8WiUoFFMFdOqRHQsIzy/
N3z3fTp1pjP9p/vPJp88Ll9+fnl+74SozDkTctpYLJbiAIulrYVf9Yn8T8t3
rM6al/61F5w2rfR4KlPqwK306cUz736a+3dwG/WImxD6Vmo9uEZaXrfdA09e
B9dpZcXpoeHR/wC30+zA9bXWjH+CO2hNXfQemnXDy1+P85ctDdo7wRPkA6eI
dyaPTP6yC7iVPonYOmBYfDdwG8VuDn7p5c02cI3qDs9M//XFUHCdXs08WFxT
HQZup9+9ucI16cMIcAddcq+Na4zQWjxG5b81f0C+J8fPqaHuTpsX3D3Brfz1
wW2Ca4LrgtsFd4APUPkFF+YxPzvmZ8f87JifHfOzY/4fCvmVC/OYnx3zs2N+
dszPjvnZMX+8kF+5MI/52TE/O+Znx/zsmJ8d8ycK+ZUL85ifHfOzY352zM+O
+dkx/wghv3JhHvOzY352zM+O+dkxPzvkdydxTovgwrxVcJvgmuC64HbB8fyf
Ns9vuDCP58+O58+O58+O58+O58+O559snt9wYR7Pnx3Pnx3Pnx3Pnx3Pnx3P
f4x5fsOFeTx/djx/djx/djx/djx/djz/seb5DRfm8fzZ8fzZ8fzZ8fzZ8fzZ
Mf84Ib9yYR7zs2N+dszPjvnZMT875PeNN89vuDBvFdwmuCa4LrhdcOz/RPP8
hgvz2H927D879p8d+8+O/WeH/JRint9wYd4quE1wTXBdcLvg2P9U8/yGC/PY
f3bsPzv2nx37z479Z8f+p5nnN1yYx/6zY//Zsf/s2H927D879n+SeX7DhXns
Pzv2nx37z479Z8f+s2P/J5vnN1yYx/6zY//Zsf/s2H927D879n+KeX7DhXns
Pzv2nx37z479Z8f+s2P/p5rnN1yYx/6zY//Zsf/s2H927D879n+aeX7DhXns
Pzv2nx37z479Z8f+s2P/M8zzGy7MY//Zsf/s2H927D879p8d+z/dPL/hwjz2
nx37z479Z8f+s2P/2SG/06nyF7c7/7ZtfRg6FZ3pVnWjKhLcSskN20v7N0SB
Q37lmuC64HbBsf8ulb8kM23SkxvveMGp7cRlS2l0B5i30keOk+kDt1vBbXQk
YMvYGftDwDUadvZYbvXuSHCdnq/YOuiDnb3Asf/skH+Dkb/Vy3Ayd6vgNvqw
5udZ3tJ73tauUejRg2/fiA2Cr6vTwXs97lqeCwW3090jR+M6F0aB489vpnl+
w8ncrYLbBNco/U+fFLZLbPn/t8p12ptWf6q4vhPksdORhwNi14wKBXdQx+rn
On1c1/J9nRNyKrcKbhNcE1ynKyOWFE4savl7UW6nktpL9OpXXSCPgybe3OxJ
zwxvdneWeU7lVsFtgmuC67RmcvKslYMuelu7nexV1fkbuzwKeRyUuX9u93Va
y8+Llm2eU7lVcJvgmuC64HbqvXhbXpDWDvI4KGPubx56pqil/z4hj0/I4xPy
+IQ8PiNPhxP5e3fFt+wln5GnR2z7HctPP9ycx5ljnke5TXBNcF1wO703PqPt
gdstP0fKHXT2aMKQtzZYmvNYZpjnUW4TXBNcF9xOgxc+lBbbcMrb2h00o3Dj
LnfsN97aHC0u+WpPytu67InXF4Ty5/mqBgwpP/RsNOTUfZ5Ld7MPDIym7Z1n
1dzcYrirsG5h0ohekF/3TW4sPn4k307JCwt+abl1i38v5Ltzav/lju/05txq
fs+Lf7sRtC0Kvl/dV/uX+IRryVE0t2Zs6Is1Ucqb32OoqiTkm7JHOirf1T+x
aP1K9eeV/+yNrjcud9UovqHPXwMz1O9JfL2OvN9hdXikOjf2tamdTzeMiaCl
hf2PzdzVR/mFH6f2XVQers6TPTg28Acf5fIcv3Sf/e6YZdldnVR77dCSwQlX
1TkMy/o2IyDKeB5gj6w/OeeJx51UsG6558kl7ZUP3hfy/oxE4zmBPeZehbc4
yUmXHnF7LmcEKf9RZsQ17TUnlXb7RULvNeHKX0jJKjnX0Xg+aXWeTc8DYbHX
+m0Y2U3NH855uTJ1ppNsYVcXhW8KMc6hfMWdCT/1fz6hYv3CsaddVL129Otx
m66r30N6vTWv9Zvif//GULtxi9/1f56JSDgUdPXPTjpxMmnPPLfx937uWMbg
wp+4aF/Y+Kdc89qrz1kX8MXub3/lf4/37Vue0/a2/3PR9FGr8j5vdFL8iaG5
20MN9+nu+qASFzW+kr3PnfO9zwneUe1Z4KK0kbOnlgU/ruab311UkLc6MnKM
8TnjttxO6dolk4qLk3yNCaHqc3oML9jfECs/nyxbdOz5BcFB6r/bJw+6kzTE
RW821FcsrjB6uylm2/EOn7moImngS+XLgtX8qvENbQtuGs8tKv8fM744PNX/
Oap+Ra0nxuuie92/mr8prq/yjOLHqs6vzGz5d9g/TTmjk4tKZ2UbPxf335qe
Bwrn7Ohc9GWYmp+/51Rj1rRMGvHxmYBDqyKUV4bcDL920f/5J7DKXVr5h6av
+3vX8Z2dotT8/VfTPb4qof/M3DLDtz/lHHYhMovm9TiwLWhmz9bzTffp4LND
6dTwXsoDvxs18XBJFrV5o8OV4S7DP8ua6igM9L93Zn8XcrcuNJu697EsLtD8
78fHAi5OT+tneIFlzpIr72XT6f6fp61w+99fr0w9n3j9A8N/eyE15czIHNq8
8NGKZ8r875e1ecNTRtcbnr9LL53ydQ5Ny916cqfHf/9r4UufrRwbrVzaV9J+
k/ahtD+lfSvtbXHPC/eRdL9I95F0fzW/+98X0n0k3V/Snpf26v9q/99/+y/s
c+keedC9/aB7uPndf69K+1Dab/92b5vsMWkfSvtK2ucPeg8+6L0m3VP8feE9
8qD3hXR/Naf+z/e8dI/8f89/72Wy55tf/vtc2v//AunXp8s=
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNUksvQ2EQ/abtvaVXaS1Y+wkkLIVENCkVing/UuKd1ivqb7ZWFCvaldtu
sNEbZzJHYnF6pvPNnDl3vm+kVCmWY865PBAHbsS5V/AteAMYQLwJ/gT/AF/A
O/ACvAFpwAP6gCTQ76xHkQF6iCRzO2I9u2IaqqXzrjlX52vuA2iSQ8bPnKl9
U2LxJOub1EkBWWAQqOKsBb4Hb4l52wbPiOnmxKDxrFhvL/s9fpvPnO4IJe4M
Pw/gc/AY8IR4FDxNP+rrjnOr1FQvAXekugnuOsX8EuoSwKLYnnzuMU32WRuj
lz8t1VlFTwZYEdOMsTbOOq05wlkNfAxeE7uXdXAd/OjsG+Z4x3n1DHj01HaW
13sPmNfzE/afgvfE/OzTS8CaA7FvPwR/gzvU6Tr7r7HOiJgriL2xec4NOXuB
+QLnR+zrUkPPImpqbpnzi0CJHtTLEJClxxb129ToMK5zH3rHLb6rkPetuQvw
Jd/uFbgs9i4r1A6oP8z/OnMCaKBmnDur/dt7g7N+ATfpZIo=
           "]], 
          Polygon3DBox[CompressedData["
1:eJwtkUsvQ1EURs+WjrwZmEon5pqQSJBIRLzSS0vSVuvRSIrQ0pTU//DHMKIY
KSOPiRmJtfOdwcpZJ9l377O/m642cvWeEMI4pODCQnjmfIEmXoBhfAiK+BR0
8EfI4BuQgj/uCWcDnoJ6nOOTptoHmMNLpl6DsIMfwx1+Dyf4Jbzh73CFz8R+
PnMaPzXV+v0Mn4fXoBqvbZu+/YJrfAU+8Q9YxLd8H+iFPNTgNugNR/guDOD9
sGfq4b2+YRlfh1/8B9bwVZP7DJ+VxCy8Jovvm3r1wYEJ91Go4mVTFj6zgufi
2zzTTWiZ/oVn4tksmXbpwqwpg07cv44fmnqPwISpxms9owX8BsZiBtvwDzKY
PSQ=
           "]]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNl9lblVUYxb+v/oTKCRTFGRUHUEswDBxKRXNCQ0kzHEoUZ8wBc4oSFFPD
CdNwSsVwAJyHUjLN1ItS7+qyP6O1nv07T+diPXvvd6933O+3zz7d5pdPXfZa
FEXFcRS9rvGycEO4ImQIg4UhQmehp9BF6C10FdLg9BO6s98LTrrQTegr9Bey
hGy4PeCnwe2Fbmf2eqDTE99Z6A0QMuFnwemH3Rwhl9h6wUtjblkqdjsT8xB0
01k7nnHCJGGykKJ6vKmxg8atGr8RdgrrhOVChbBe2CCsigJnG+ulwhphGZwv
hC3C58JKYQnjCvY2wd/I6PVaYXWSbAPrVcjsa7swUZguFAp9OBfnW47/teiv
Zb2SmFaRw3K45XAqiN/chZzBAOqYwXm6J8YIY4V3hfHCBKFAmEZMEzifbPR7
cyYDhTz0rN9J6BiFXvHZvMVZpeMrA3vTyHMkvq1fKpQJC/A3mhjyhfeED4ht
ijBVGCW8jf989gpYj+X8x+BjNLE4pnZR6IVUZI7N/ZLiuOOwnx6HXCx7wzHF
Ia/UOOTchxq4JzsI7YUucbCXFoca9aRmXeGkUZ9u+EwhDtvvGoexYxz6uh+6
3Ykzhdi7EL/7/R1hBL7bsdeeMeEr2U8KtlKxaz+1wtdCVRR6yX20hDNw37hn
5keh1z9l7nG2UALvY+SfCJ/BXYG9BdgwZwY6RchLOPMS9uYI84RZwlzg+Uxh
MXuL8D+HGEqJtwxeEb5KGIvgJvzMRG7bxcQ9m/lH5FCMzD1aSGyJe6QIG96f
DsfrD9kvo4arqcMS4p1OHDOQlSKfS30WoT8JH7OwOZMYE3UtJsb52CrE9lT2
puHb98tGbLyP7bnkvhD+FHKeQyyl2CwijqWcUxln6bvNd82OKNxpvq98v/ie
qRT2CoeEw1G4W33HfhuF/voyCj1WxXwztrYS6y7s1mC3hvUO9r4if9dhBfXy
nVbOfCHryeQ7jnMoo972tQV/viMXo7uGPFezXoy9MmRLyWufUM1Yw/yAsCcK
35BzWkdeO8l7L/62UIsd5FGJ3LxtYCN12ASvkv3q6P/fhmp8V7C/Gb3t6O3E
ZzU1242/Ksbd6DuH/egn9quxsw1blZzrZvKqYF6JjvvHvTaBWo+Kwr3rue9e
90+9cFI4KpwRjgvHkJ9gz73SIByB971QJ5wTLkXh/bKf/Xr0zTmNjXr2GtA5
gZ1T8GzfPfkD8u/QaRZuCreQHcVvAzaOYO8861NwTsKxvbPw9lPTA/h0jHeF
a8JV4S/hhfBUeMbo9SvhufBSWK97/1+NBXH4DfBvQSeNf6BvnULq6vrmae9v
jTlxqOtB/JprnT/x9QL7A+Mgy9T4i8ZHwmNheBw42Rqz4qDfX+M/xGcf7nF/
w7WsX2GzgJjHxKEmZ6lZLbU8QG3qqXGT8JPQKlwQWlj7jK9Qa9frItzz1DvR
K42cQyP8ZsZGuGew14TtVtbH6JcznMlF/Jwj5kvEk7DdhO5V/J5HfjPJpzk/
YtPxX4/CO/si8ibsXcB3I7pe76Ieuxl3USd/u743DiGvg+Medr81MHfP7ePM
91DnWrh12DkM5xT+E315EP4N8rlCHS6T52Xq4Xzy6TH32gVqmajjadYt5NRM
3sfZt/2fo9BrT6LQe+5L363zovBb9LvwQLhPTHXEWUUuzslvt6FR+C/gN4/f
O1mMfv/4XVhD/VxH9/xvwsMofIO/Mh8UhTeb326P8X0f/46vLQpvyMQb8wGc
J9i5gy3bvofNNmR3iNGxDovCm9T+huMvE/lAxuHw/UbMBrnInONgchuALBOd
QdgYQd751LSNOM3xOzqP+TDWtu138Wh0PM/BTj7zkXCHsc6mztbxHT8Rvdwk
3Rw4z6nLM+J5Sl0Gcef47nkJ7xm1S9yFufiw/6vU8i5n4LNIvPX9TvH7pk8c
zq93HH7nR0XhN8dvIL/J/JbpHod3cI843O+Jcx6PrcR/C+fk/weFjMnrscR5
j3jyOFfX9Rb2bhNzK3E3s+dvwv3v3r8Jrw1OGzVyfTLi0GN9uZMfE+tD9p9i
436SnRZ8WO7v6xH7t+C0wGvF1+2kWO8gd2zX0Xd+18hxKOfvfvsP4ATSNg==

           "],
           VertexColors->None], 
          Polygon3DBox[{{308, 214, 213, 307}, {284, 25, 26, 285}, {312, 215, 
           214, 311}, {287, 21, 22, 289}, {315, 223, 215, 312}, {302, 212, 
           204, 299}, {292, 23, 24, 293}, {280, 20, 21, 286}, {295, 202, 201, 
           301}, {297, 203, 202, 296}, {282, 19, 20, 283}, {285, 26, 19, 
           288}, {300, 213, 212, 304}, {314, 224, 223, 322}, {299, 204, 203, 
           298}, {290, 22, 23, 291}, {325, 232, 224, 314}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNkk1SwkAQhWegKglVQaskHoBrcAwXHsAD6AH4L7UELFGxPCCyCrgBWSRh
EV7XfAsXr3q65/Xr15l07x5u7hvOuZ7QFPreubXiQLElXAiXwkG1P+FXaCvv
cGechLPVr7hb0fcl7NSzd0Hjg55PIaYngWsamZAKtQta38K1cMt9Qk9G3kH/
gLcjPishZ+5WiNCN0bbcCY8+9D1RN04EL2VWk7nm+we9DT3W+wynAS/hHMNf
42VHr3ny3Btv4oPeVHGJ1rtwgmcc/8+X7Vqy55AZI/gVPZ79Ivg2sxBefPhG
M8Uxcydo5Ph7w8OSd8l4gwJOzT+Q8t4lNZu3Zc8NHit8LvD3ip+C+5zzntw0
KqLnXMKpeV+rndjB8rniGXeTWVk=
           "],
           VertexColors->None], 
          Polygon3DBox[{{399, 259, 265, 400}, {403, 271, 277, 405}, {386, 235,
            236, 387}, {385, 227, 235, 386}, {380, 225, 226, 381}, {382, 226, 
           227, 383}, {401, 265, 271, 402}, {396, 258, 259, 397}, {395, 251, 
           258, 396}, {389, 236, 243, 390}, {390, 243, 244, 391}, {393, 244, 
           251, 394}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], 
      Line3DBox[{1, 2, 3, 4, 5, 6, 7, 8, 16, 343, 344, 345, 346, 347, 348, 
       349, 350, 351, 352, 353, 354, 355, 356, 294, 17, 9, 1},
       VertexColors->None], Line3DBox[CompressedData["
1:eJwl0CtPQgEYBuDDv+CIKAdwcLwATjdAg7e5aVOL2tDNTYqXpiZp2qRhk6YN
GzRt2ohGIz/DxxGefV963+2NTi8PLhJBEBwy40m6GYpUqLHODnsc0eCcK264
54EnOrzwSo8+H3wx5IdfRtzp22KbFTZZY5UaVZZZYp4KZUrMMUtMkQILfMv9
ZMA7b3R5ps0jLW65pskJx+yzywZ1FomJCDmTP0maDCETpP53Y4ppIrLkyCfG
u/4BVmIgjQ==
       "],
       VertexColors->None], 
      Line3DBox[{217, 209, 358, 359, 360, 361, 362, 363, 364, 365, 366, 367, 
       368, 369, 370, 371, 372, 373, 374, 375, 376, 377, 328, 240, 247, 254, 
       261, 267, 273, 279, 278, 404, 341, 340, 339, 338, 337, 336, 335, 334, 
       333, 332, 331, 330, 329, 324, 327, 326, 316, 321, 320, 318, 313, 310, 
       309, 306, 305, 317, 217},
       VertexColors->None], 
      Line3DBox[{255, 233, 225, 379, 380, 381, 382, 383, 384, 385, 386, 387, 
       388, 389, 390, 391, 392, 393, 394, 395, 396, 397, 398, 399, 400, 401, 
       402, 403, 405, 342, 277, 276, 275, 274, 255},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJzt1ulTk1cUBnCUsomCghJQqFirKA0SFkFj4AErqxUVV5BKy9ZKkbA5aIXW
uDPGoGwWTKEUsILFQRSpaEGJIKYoDsFAEraQvAkEBhcUpGIo/4AfnErVzvvp
zvw+3HnuOXfOvQtCmP7hUzU0NDKnaGhoTqwNj0OifJd3wYadqF/ULsdFIvBO
9jQZVDHJllTrbtTQnNxppgSyjEo32b+UgmsXdP7szW7IYwV22VsJPHBITa7q
7IZ9hD89KVAKGzdeITOLQFMtz5uV2IVgTzfqMpUUBg63MuyaCUSH1ecqgzsQ
aSb4NnxdDw4lyUKWqgnQphsHpbDa4do3x7W4pAcNqf4mP1gpEMi/F8Mqk+Dz
Zyc9Xo324L5DfHmRrwJncE5eoRZDVLHg9AqtfuSNUp9HtPfiTOba/q8FYsTN
XMpsXKECXcs2PnGTEmHMJgMzPwka2SnpCX59CFrRmqFTRGBGV+rQzAoJ4o7y
PRh2vWiZ17CrwUWGg4NSj6aCVux4GqrYY60Ej0XdTAx1I/zmHMsvygSwVbGP
xH+nAKeBUU2P64DcwjbA6/h9SF8y7cWVBNSXI6Pb3UTwOhahRXeuB2vw1JrE
GQSGw+M7S8qEmDv72tiGcR4y9PgBl+7LwS8X7rNXPYTRcf/CfAkPoXuc3Au2
ShGdU3HF4ZdmJDB35ol210F3x8BwQLgIldy1sVtEAqzkjj40t+STTjrppJNO
Oumkk0466aSTTjrppJP+nvqVrWl88SEFzDdbhhl/1Ame41DS6eImuOS0jdz1
JBBVtUatDG+FRPOerXL+baDnhfbJsR7orE+/9IrWjIpw/UJJLe+d5Rc6lk7R
XkDAxynHs9VVCcfgfZsufyZE5o1VLwIGezHo7v3lScM+hNoEDxjXtGCtsy+t
9pEK90Yixg+Z9OH7lpVbIh3EoFzwHB7K6sWpp5ZH7M3keKF9tnoxRQQ9bYbW
kAcBh1nWYW6hrbB4wlZHTdSBvTe3nj1dgiuOdKPUfAFuxm7fPuJz943zm5iW
Vz2MF0LMKb5eri8Dl2JVLd7Y/8Zu4FPPSdFRYESgz1EXKuHy56dUQ6sWjEkl
9pUvVfhj52jNwuFeXDA/sCiFLUZ+raGyOEqJysgwRm2mFANb+CXLhC0oyFly
O7VRhsqjjDrDqmb4jXNVMu/X9/dt5X+dt1FLtKaVS1HwROReW0WAlfdYK4Ta
iXzb5kUuzSo8O7/XOC6iD2MGS/4O2yaCkNM1XsRUwqQzMNGeK0WAQaX1bGkL
rrPGzBmLZVhZaj6osXjiXL89N/39J96k5+eUnafPGiew76rBOZd8JYKsaM+n
0Vtwapyht9BZhYs6c+MjNyiREVST0+YngS73UjCcFehsanRj0NtRRVmzPtqi
cdJzim95rdp1pxMDvmyauE4OtWVFWHKcDDbHdlqa3lChS75f/c2vfVAllFzd
Vt6G1AO7C7Tlvcj7xHR/fI0crKy0piM08aTnfJ17yKLbvM16MVD88atF+b3Q
dRJ7cp0EuEhJoyRo9iO9WmRBk07Mg+L+PcvrJz+n7qNro3unEmDeWb19nZ0S
cz2velFjhDAsCj1xaL0KA3fPxbLr+5Ct8yA926d10vNkx6zmJz+TwqXkq208
IYHc+fM4f3l3YN3h/qQOlgI21jeCHSVKIJliJJ8tmPz6pCzRrD0oQdyPNnp+
pnKk0QNOHEtRwJXyODflcDcU13+OLXUhcICTXrdxg/S9ezdJ/3/4G9/bD2T/
d/UP+VDq8K7ORfrb7TvppJP+38950kn/N/4PfEyMUg==
     "],
    VertexNormals->CompressedData["
1:eJzt1/k3VesfB3CFBi6RZEhuSKUoRYZKn5QrmWdXSlGS6ZYoosylDhlCQilK
UlJuQhmeDOGQMh06OeTss/c+55jHNMnXH/Dth/tDq/td37N/2Wu/1l6f9X6e
vZ7n+WwF1xPWbvP5+PhS5vHx8c/dmcctg0NGMDipqKhTp38Htjq0G+TUcqFG
cZMUp4sFr8npQpvsUrhhvqJyZz8HVFwsnNV0CDD3G8l74VsKukUDm1uq2LBr
ZP0qZz8Sks4xFl9IKoGWK0vfx98g4UlyV+vzEDaYSjyguUwUgdzpDQypRAIS
+adfx1hyIGynaOnihEIoU8N2Cz3BIYR2TTxvmgNFKxaKCJ17DC9yRSmbB1jA
Rzv62OoIFwTG32m/cCwEqZDEt8iJBUcyjHM7bVnAUnU/dUCmFoJ6BpuBjwsp
4qomXAUcZhiT6dnbmuD+3rD6s4Ns4E50DoefIEDifPMqn9eNUHHJwu52Ewmp
mnsunp/Lm7xh7brcI1SoS5W86FBOwLmVtC8vs9mgP2sgbLahDgab9qeI0nHw
vnTzYJEvByIpbP8zi2uAoW6dFiiNw1IZnazDy7nQHzxOeVX2EtrW6Hh7ebHg
ZP6BU99duLDsfI5m+5VqmCn3r14+hEF1NiVUZRaDBaKNg72VHWD04NqKzkQ2
6EQ/faGZx4L33ydmjXK74Gmc26MT5iTw/ddrlOc85znPec5znvOc5zznOc95
znOe85zn/1L3KZC2WvSIRPQ/bke2tr6B4+PpJ3V0CTA/HWIY+IVAXy4yUoO3
twOdu8PITY2Ayfua8wVycSQfhpuZ57+DcpUl9KWyxC/Lr/G+sSJPhETeJXnO
woHtIBnhHRUmTID7tQD+oY84IlOulTglvgMLGbE7eW04kPeGk12ZGML8e4x9
Rz5AFjlxiWqBg3bMcKV9Wh/qiPXawCrDQN88o3PJKAvInA8LRvV60ahojVVJ
BQtsMDeh+atx6GqVKHlWx0D8J/2oqy6wwKTM464iE/9l8yB2dDw26x4DBZ66
LixwmwDP7uWqshUYWBRDgtfB9yhVK2hEWICEqCuL+NzlWaBwxYwdPt6F/hxb
cXByJQlDj5woclQWNPhFDlQY0BDfwX3hl78S0BRRvHZTwa8b1xn/IeOr3h3o
0cibToF0DvjTtom+LGPCnqypypSxFjSpKELLJTmgt+PC4ue6GLAoltFers3o
lscjyYpjHGh4F7mlaz8LPotQcnu0mlBZWNhC6iQbiBjJeQ7SP39c40uGCzLO
v0ILHuK11bn9IKqdNzrV2wcapflq0qp1SE6XT1FYnQsNI/6Bl8YwOORCoX2k
NSA1G6Fqs4dsOOQbPzGa+fNz8h8Y7jaWLkeCxXoh+usHIAhB7YmYPjAMPXNf
waoGpWhv9x8r5YDDn57tOuUsAGz4qzBWj159U73pEU5C6HqRznMTv24fyPES
JOMlENI54ivt4c+GxLumcfZeBKynhtXdWPQKhadEmfyehYMpoztcEmf/9DzK
e//qK8x8jhp/L3Z9TcfhMUVBZHAJB5rUjrZWf6lFom2KxNclTAhNj2xZEN//
0/NoabU12LeVofIt2QHr3D9Az8WEY1YPBsBEfWN3N1mP+qMNT5ZwO+FItfm8
IMOhn54n1NFIU49Wi3Y7sd7/tqUDVvovF9zVPwS1C31Wxkk0o7TUjoPpk02g
pJfxJMt5+F93bv6ve1Zh84OqNAzadrhnTMI7AJdtgquFf/66+Le5SZnAFHMz
gS7TPU4fSuiCLfFRglpz57jmt1Z+qgOOIuUuvBGx7AY0nnbWIuWf78Pl6uJ1
F0cx5LhVqSFFsw+M136VlRPHIXCRv0ZMBRP9Paia+YzOBIfml7qVNax/XF98
tW99kWsfys8KvWEazYJpisS51w7/vM5g6FmKwlo60lPK3iIpwwYtlz32tdsw
GG/2+XqjjUA7Okd2nerpgJN/34pwmcDhaUCqrWdHD9KUoskvsyLAyq9qY2UW
9sP6gqIs/xxuN9rdYD+14CgJnz/qxgWtwMBkn8KTp/feI004k9jymAQd4ZnZ
Iq0f1/mRB/89tC43qwV5zJhecmRzYd+JiQpBet8P369nOjo2WXSi9k3fq9P3
csDaV9T8fgYT3jBn8k81tiEN3JbiksEFuT+SGuvK+gBX0rlwE29GVfFjTcYM
NlQ5HvYM/sSCTZk58klDzYjFuqMsJtwPgmumtF8LMmHmaFCV8sE6JHChvgFJ
DEB2+M4Cf7k+kIqcFlj6qQq1slOiv0UNALW5Oyn62Ado8WlVb4l/jhbmMA6p
jc75HdHroTG9kNyYv27l8FNUm936lfl9AMi6W89fXO8FH/vRTN3bz5CtxqJ3
QlsHYDrf4A7ldh+kaJgulKWVo2ekWuzbVi6cd1vtlByHQZISuyF5uAilxvro
WbpzQYa8amFuxIKYebIFSqwnKOKBco6NCweQWlRvxFy/MaitIDb1KA9tCeKu
OmrIBj8XW+UhkgD1Z3Iasj15yOaiptZC9blnV62xtUNsKJqVmFqTeBftDNh4
fmIAAzfXIMsddVywazuwZaQ4H7kUKdI1MAYIuK+V6gwd/OF3Me7cYZ5kzQWV
qv1n3NupQMlfQ+UGYFDSZHtotSUXvHzTP2/2rQU7zuWzvQQG2LRMWSwfF0rs
amxvHa4H/nvS7bIyLKgzbfprOpcDTsqr2xP5qPCJfvV2nicLTveJbCyw4ICl
m5HE4dhGOCx/cvZyKQv2ud48MjbMBtx7OkAwtAkOKGvFq8jgUKipJmYz108c
L1rqmlD2BvbLTu/Wc8ah/o5phlQ/CV/VzpVPH2uBG2NigbQ6HMKVdwZvO0BC
rF1OhFtaK8TdXzozokAA/Q08NyojYIWQ5C4vszYQHjZXlcomYMyx1t1JhQCJ
MYdJu/g22LqEP1dLiYRBO/kAFRMcJuJ1pewzuqDPlumEKgkwLRfab+bMgqDk
NS++LWGAuUBBQfJuAuTi5mMbH2Lgo1pRqmvIgBBrGevFb3/cj034R/+mvIiN
2Eqfg0NHqWBEToxHAgEp+hX2Is9I1F9lmBpT2AwCuw1mzYwJSA/cPnnViUTH
7pYsi69ogetSxSbSFgS8LXmYdo1KIGxnq4FIQjtMJDsk+5kScJzqmhluRiAi
WSsiax8NZN26xMQPE+A7qHpm5iqO2GIlTyM4XWA0kp/o70bAXsFYzLyXhWYz
pjuDDbpB/o97cR6iBJQ1TwVJtmPI2zOq/ZPbB2CUdt7XvoqDksArW/02JtpT
MLTVem6dq5r1t/0eh4N1k1npw7Y+RMsUl5TtZ0Ls0tzB1hAcri7U/6799gMy
5lzf3J2JgZ3f5V7rNBycTy3j2y/2AU3FCHXvTMeg8snk5yoCh2PvrRiEcy/S
fB3WEOOLQcqbCAHZuXlY+ZhKkR3sQbbsQKMEBQwyF8Rsdi4mwGal718O+gz0
edrdsF6NBZXnNlLWOROgMkFXdqmlo3z17dGP7uIgXvV2nWgDDmF5njq65e9Q
fk1jTdQhHEo/rvnt0v65ftWoqaswvgv1t9+dTNLBgetd0KHWTkDF7rVPpWjt
SL75dO8mOgE1ugEenqoE3BQubthBb0GKmxVTbMZIyLIwu0Xm/rr/NZ7/f3pC
pj378bwqxHcCb6gZb4Mn0lHN9w1+3Lf/B6Cj6w8=
     "]], 
   GraphicsComplex3DBox[CompressedData["
1:eJzN2WtQlNcZB/AVNCpGXQRxBS8LrrpBtGi5RK1yYhLwEkUNroUVuShKBkWt
jklUHLyhjRIdg41Ym5LgCKL1QmwUTJo1FhUleCEyaGIkGkgkIleB1rF2B3zO
O/t/96HyqXm/7Lw/njn758zhPOcMnrHLZsc5aDSavE4ajaOGntogjc1jsIAL
25+TaxnXMa5n3MC4kXEfcPw+yi+dqcf85DgevWN+csxPjvnJMf8weKf80pl6
zE+O+ckxPznmJ8f85JjfV74bujuG9Vo3xALO1GN+csxPjvnJMT855ifH/P7y
vVPC1nivb10t4Ew95ifH/OSYnxzzk2N+csw/Dt5VztRjfnLMT475yTE/OeYn
x/xB8K5yph7zk2N+csxPjvnJMT855p8E7ypn6jE/OeYnx/zkmJ8c85ND/uTX
oE7lTL2WcR3jesYNjBsZx/kPgXeVM/U4/+Q4/+Q4/+Q4/+Q4/+Q4/1OgTuVM
Pc4/Oc4/Oc4/Oc4/Oc4/Oc7/G/CucqYe558c558c558c558c558c538G1Kmc
qcf5J8f5J8f5J8f5J8f5J8f8M23f1c7UY35yzE+O+ckxPznmJ4f8llm272pn
6rWM6xjXM25g3Mg4rv834V3lTD2uf3Jc/+S4/slx/ZPj+ieH/CIM6lTO1GsZ
1zGuZ9zAuJFxXP9zbN/VztTj+ifH9U+O658c1z85rn9yXP8m+X5y8tWgmZ89
+BJcJLwx/WHVimpwrUiIb3i7duRDcJ3oerDzo9IqdL14vOazE26HasANYvq/
u+bu8asFN4qkvZ75l/ag+4jllSuOLW155prfy/xLXjJ7zPDuawEXxQ25Exf1
RNcK96YiTdpDV3CduFnRp+7K1+h6oV0a7NfzMLpB9JwxaPvYFHSjcJrg0dc/
Ct1HTPoh/8i6Mc9chMv8Y7ekbZj5Hy90kaUZmHE9FF0rLr98LPDKnz3BdSL9
Dx5jnG7owfXiZEXx2hE3BoMbRP380akVZwaCG8WbpTkB52M8wH2EeUDKz8GF
ujZPjpD5n42HLuy7lnEd43rx7siNoRG7PMENYtu4S3FZNQPAjaIweHt8wHg3
cB8R/kndkmi3Xm1uMdvPr7iw71rGdYzrxdH5u9Zrrw8EN4hHu+o239znDG4U
YVMi9nw3v/5LW8f9P9J+fsWFfdcyrhNDk8KHLX3VE1wvEjp1en14XG9w3P/J
cf8nx/1/vv38igv7rmVcJypOVHZ+lO0Kjvs/Oe7/5Lj/k+P+H2U/v+LCvmtF
Wq8uZ127eIHj/k+O+z857v/kuP+TQ/7oaPv5FRf2XSsKZj/9ubizCzjkl65n
3MC4kXFc/zH28ysu7Duef8jx/EOO5x9yXP/kuP7JIX8Gk19xkZa6t/eQ3CHg
kD+DyZ/B5M9g8mcw+TOY/CLW9l3+PUoXuyM9769ucgbH8xs5nt/I8e+XHP9+
yfHvlxzylys57buWcR3jesYNjBsZx31mgf2c0vE8SY77CTnuJ+S4n5DjfkIO
OfUL7eeUrmVcx7iecQPjRsbx3MvksTB5LEweC5PHwuSxMHmi4+znkY77Kjnu
q+S4r5LjvkqO++oi+3mk4z5JjvskOe6T5LhPkit5YgsKS6rvuoq5OY3ur1SX
0P9tLGtO95j4U3RP8bug6isRl6vh/0i1QQfuuGa+kFkq68n7hRk/rzn4UNa7
f3x3ZUrXoWLCVNNbjWUXZf0EvzN1cy95ivIfZ5k1dVUwvk5EOdfMuLy9BMbX
iZNJvi6fjFXyrO8apVmR7SMmOpb4frCgAsYZJgL3Hu4eceQCjDNMmPKuV2sP
35f1j6fty1nS3U88WNRimpNdJv1iw/mkEP/fwDzSOL4iJbKkn9Pn9+B7/UVl
QONgj5ob0geUN007v2IsjKPReAf/EO611STeL2tuqE3oL38e+qfiAas2mURN
sPeaxkAlT6hHeYXfRuX+SL7W6YZT0WaTGF8+dFLRIwfpgVsWmdM3KfdK8oLz
jhmdU0wiOHFDet+VztJLf/l7wXeblfsmuTk5+MLjP5rEa3GDQm8dUdbVYH+X
3YeSlXsuPRuWa0odU5T7Kblz00d3jNtM4sMH+xcfz1U8cfeyyD5blXsr+abK
LF8P6/c2n6p8kn1M8YCWLUk9tin3WfJ3ThqL6rYp91nytw6mLNq4MEIUZHbL
rD2m3CO0ZfMW7FsfLvaNPrV63hf/kuvEPOefNcd3KvdE8oV/Ob4z+GC42Bs2
IvDOXSfp+Y8KtNuuKvdH8ld8Up+2VIaL8z9+7xBd4iI9scvRzIRI9b1sQ17e
6OaNZjHy3NmzH6X0l95Q9PLErfHKfZa89cN6/3o7avyeM25KfeuH9V4zckCW
+/4ryvjG9DGH1jer71Pu+QP/2i+EuQdZx7kz6sLonaaX4PsjxRSnpTnH1vaV
44TVf3E5zTKP3mX9He+i+zMXzhP7X30xxLd+qPSp40d5XU2NFE1VB7bHrXK1
zW8d/5sDuQ8tnkNkfeKwoJiGWuUeR774b/GrzDeV+5RNTOv9Ys7i27GB/fvI
8V9M8mru3UO5L9h8r7XeIf/aYv97A5XxXQJWXljF3yOW79taNMuzlxznxl3X
PuOPRImvvh2eW1bY03Z8a/3qjOQWv9J+cpz70/Vdhu+IEiNvXXpnbK7irY/1
fD7o/Yri6IPd5DjVy7omuv0jWvzUKTvO/OELtuNb6193CH4vTecix3lh2p7J
HuXK/YK8cbeH74F0/jxfFzIrsKXRUeXnDr/X/2ge/b4aTYrbUs8RzjFizI6p
2esmK34xP+eb5I9jxKEVWTndPn1quw9bz70n8rw3h51S+5J3t69MM3eT4/S6
3bTyK6dYkTht5uLG2V2kxye4395yL1ZsOb2qPu3rCjmO+9rU5RumLBBuc70L
pn1aZ7s/W8+r46ZEZrlea7b9Xqvvzaw7F9DPUY4fcz1klOFALMyPRuN41rHH
nPRYUfZbi+bK7To5Tm6wJbXHtVixuvbWjlCHJ/J7C3efzv+gMFaMMFYZ6jf9
Iutzqhq+jx68QBTffnJinalJ1Wexn7bfl9X9sf0+q+6D7fdTdb/j+ibX79oe
dX9sv8+q+zh3rqB5wPMDd85p+1SfZ7i+9mvry9z54f/Vf7lzAteXub72a+vL
3Pmh9cNO/+X6eOtHB/py26e6z7bbNzva7zravzraj+z0kXb7jp2+0G4fsbOf
c/sz1y+4/bmj5yLufMKdf7jzUtujPv/8r3NOR88tHT2HPO+5ou15/nNC69OB
vt/2+z5/v+b6Mtd/ufPDfwHQ0LNK
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNUrlOw0AU9IOvoEzFL3ALISGlQQIEEgVp+IAE0XHf9CQkBJsk4MQ2px0B
Thrc0VHyB5R8BfP0BoliNLP7jn07u7m10mJxwHGcPDAIRMAN0ALawDXgkXXd
oVZuABdcV1lXZ+0l0KR2gSvglus641ofMM9l3AdGxXhELEfjNaAMnLPXvtjZ
B+BtsdgOeFMsZwt8KDbXEftU/83aYM9VxL7BBfA6kIPeAIdAX/0APwIf0E/g
SbG7T4DfgB/oFHwqdqcz8C5Qgd4DLwNf0Etid/Tpp08/PXpR4z0LnGcFnLC2
C74HMugHcB54h56lB3/vU6Y3es4L+7yC7/g2Ef0PqQPqJntorwrvrz4Mi+U8
M6/FXNWJY30jxmPud7mfMBYypvOqhxn3Y+b0WZOwT8rYlNh6GjwPfELPicV7
zAn4RiG99Tj/AvO1LqaHCf+Iy5xxMf/HwEVgCLok5qnOOsOzMp6XkPW8Y7H3
OhF7e/0DPbGcmHkB/1iHPVJ68AvmaIJP
           "]], Polygon3DBox[CompressedData["

1:eJwtkbsuBEAUhs8RL0FlX8LdWioFBVFqbCIbFrvFInG/9+5ai7iubOKyCjqd
0hsoPYXvz5niy3zJzDln/plMvjQ232RmbdAMnW5WZb2AfrwIi7AAs7AKh+wd
wRqegxp+DR34DCylGtXW4Ju9H3jCp6E1ndHZBkxBAd7hGX45+wcvaaZmV2AO
9uGMvXNoTzWqrcIklKCFvQyU8UH4wF9hAN+FU4see/gyHFhkWsGH4cuiZghf
98h6DBv4PXxanHnAxz2yKeMo3gtX+CX0yKGON/RG+I2Hv8EtnvfIqswT+GOa
r356O91Zd9cbZ/Fuj976oy6PHuqlO93h23BikXHH40/0N7pTHz6S/kMzlHXT
I5tqtvB/XUpGyA==
           "]], 
          Polygon3DBox[{{365, 372, 371, 25, 366}, {432, 211, 341, 345, 433}, {
           433, 345, 344, 226, 434}, {438, 234, 354, 357, 439}}]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNkbFOAkEQhne0sqSzICQkVj6OT2B8AH0NAQXUiFEhYqiUazht7q7yqM7u
6KSz5C34NvMXV3z5Z3dnZ/6d7V5cnV0ehBBO4RAmFsIafUI/0Q9YQQoZ5DDk
LEFH6Aat4Q8K+IYv5cX8HyjhN3jdUnsV3HB/id6a14/34rrNuoV2zfMr3U+U
E3u8crZFp+i1uc8eegxHxB3z3EQ184aXVG/KFOcNz4XiO/M+95pDqjobvXUr
f9HnCfoGO+K5uddKc5nK58y8Vqz5gPZVd4A+a44v5jONnsfoo/5iotxVw28p
rwv1PVffWh7n2n83Z6fcUv9Q6A3xLf+wBwOSVQs=
           "],
           VertexColors->None], 
          Polygon3DBox[{{376, 1, 9, 280}, {400, 172, 180, 401}, {286, 9, 17, 
           284}, {393, 169, 170, 394}, {413, 218, 225, 414}, {407, 195, 202, 
           408}, {397, 171, 172, 398}, {395, 170, 171, 396}, {410, 210, 218, 
           411}, {408, 202, 210, 409}, {404, 187, 195, 405}, {414, 225, 233, 
           415}, {403, 180, 187, 404}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxdl9tT1VUcxX8bUBTO4ZCIGqiZR8EbkKJ5C9RQSVEkUChJMUW84TVvCd7S
wLxkf05P2kvag0gPic6I1IyozaRSKBQq2XfN/pzxTA9r9t7fy1prX84PfXfz
3so9CUEQ7HNBkGjjFsNnhlrDJsMnhjpDjWEj8zriNdTWGzYYdhr2Gw4w3wXf
ZsPnhh2GrdTGerbCq3G3oYH6nfTWkVe80fCF4SDc9XE1ym+Dp4GeenoU285+
tuHvS8MxdHbgeze1jdRtgnuNoZr9qmZPnF4Da3lqMjTjsRGPh+g5SL1q95I/
SG4v/rbh6bThK3zux+sBeHfRcyhOt5m1cDhOYw9r5c8YzsLfBNcB1pofMeyj
rwlexY8SP0LucFztdmLy+o3hvOE4PpqJn4HvGOsmak7EeTtL7BR6J+lrpv4I
tSfIHSWmvguGi6xj+RruS29gA6PWX6Ojvo8Miw2l+L6ApvpbDK34Pc3eTsLf
Qvw89RfgOwN/C3XHuLfTcJ2C4xzzVuov0bM+8O++lnEL80vUaY8znNeb7ny/
+r41rGOf1Zz9cc7rEvkWPF6Eq5X4Zc6qIvBv/Dv8XcbPp4H/3cqPfiM7yZ2D
YwPa+gasZdR6pvPaU2wsdF5rlvPfjAo0xaX3p/fc6rx2gfN7FleVYTV85fip
Jb6GWDX5atbr6FlLfcx7BfetvpWGFYaPDZWM2uccQ5HhfeLr47TUW8p6laEM
jVr2rNxyPKwitxqtSuq1Xka+Eq4yesvRWUbdcsZy5pV4lKe5hmLDIriq0BPP
YuKL6CtFY6mhhHgxuSL0ihmXM/8Q3yWMZcyXorcMFBFbGXeW0p+Hzgfki1jP
w7v4l3AHJdQtpLYMjbncQzH9xawX0L+QsYR5EfcnLn3z9aYaqVmBR+m/B/ds
atUzC95CcqopgHc28QL05zLPZz2HMR++2DktoF+9M+DJI74k5sve+hWdu/Nv
aAve8+DNx9tMw3zqVF/qfD4P3h8M3xuu4n0KHq+Tu4rufLQLqMk1/Gi4Fnje
PDRz4F3InnKJ5cN1hZ5p+JtO/BqaudRK5yc8KF5pvm/YuMbGdnLXgXpvGtrw
dIOxjVzsHKU1Ga856BcSzyOnup/hb8fnVM6xDR1xVuFHvq4TV72+nfpG6hue
aLkEwzDDHXhv4+8X+HSWE9j3JPTl4xb5WN0tNHKpfwfkEFO+g5onhgeGx3i6
Sa7WfNy1cb3zvJp3Gn4NvL/b6HXCNx1PUXg6qLlHvhO/hdz5LXIdeBuPv2lw
Rcl3UfOHodtw3/DI8Bte7sN9F70u4p3kujmjHDQewNtNTTdr3a/erd7vRHxE
0bkD5z36u9DqYK7YwzjtLta/0y+/dc772eh8zUPi3exN599DTyz+GO5hvI1k
EDKEDa8tN9TGwDCOfY7nTp8bnsL9l6GX+NM47Yes/0S3h7pnaD8i30PvY3L9
9PSg88Lwkl5p/cN8gPoeePqo72PdS+0A/M/ID8Cp9d9o9cPTx/w5edUNUtfP
eT1hbwPw65wc5xQ7L61fcD697O3l/zxq/QqewL3Z5wv4+sj346Gf9b/4GaT3
Nf1JzucUj9h8pCHT+XvT/U2CX3f9Co2h3PlL1gkgkZpBNLUeAn8S+0umdpB8
En16T8MNKfQovtT5b3uJjaMMbxnSeWvyP4I3p/UI+sWTFserWISY9qbfiL5j
7bzTEJ7EF2Jv0klFKx1P4ghbTZr6pG3IMKQaMg2jyMX0UvAmXxlopzEfzjxC
TQbrVPaegv/YeSRTp71NcF57oo1v6yxtnu38t0HfeH0zJhjGBP4bNpY71F2O
DvxvUfFx4tbc+fUY8qrVt24G61H0ROHKDvyZRHgnafgKc1apeE7hjHQ+ozlT
3WG+8/8Oz6M+k3jUkGXxydqL8/+/mKq9c95p7GE8nkbiJxOMI67vpP7eTSOW
SZ32l86esqjTXiL0KR7iTsVd7vzf4DLna6PUz3H+/wCzne9JhyOLfAZ6Uc4y
gndpJHIeSZxNFvVhfKYxhvGQzZgBj7SGwRGCJ0RNmFwytQ3Of/fq3RuusXCF
4EhGM0JsCJxD4NO562+t/o7VOO8/hd4wdSH2lUDuPxo4vQY=
           "],
           VertexColors->None], Polygon3DBox[CompressedData["
1:eJwlkL1ugXEUh88Rk9EilYiqaHyUUtyBRJCQkDBINEHEpOlloOjltAuTrWM3
o9HUzVbPyRmevE/e/M7H/yTGb91FQEQiEIRHFXngG4Uk/gJbfAMlfAAn/Bf6
6pj/QA9PqdeG4R5vwgH/ghoehxBuM+9slnrW/sXwtPqsDyjgOVjjK8jiHfVZ
R2jjIziL7zTEp/CHX2CC59V7WY8nfA5X8cxMPWNZ6/GKf8O/eMayz/CJ76CK
Z9R3WUIRr8Ne/I321nfLiN/QbllRr7UblvGW+u5W08BvNx4pJQ==
           "],
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], 
      Line3DBox[{283, 2, 3, 4, 5, 6, 7, 8, 16, 24, 32, 40, 48, 56, 64, 72, 80,
        88, 96, 104, 112, 120, 128, 136, 144, 391, 303, 309, 308, 307, 306, 
       305, 296, 302, 301, 300, 299, 298, 297, 304, 137, 129, 121, 113, 105, 
       97, 89, 81, 73, 65, 57, 49, 41, 369, 294, 291, 293, 288, 290, 285, 287,
        281, 283},
       VertexColors->None], 
      Line3DBox[{9, 1, 376, 280, 286, 284, 289, 292, 17, 9},
       VertexColors->None], 
      Line3DBox[{33, 25, 371, 372, 373, 374, 375, 282, 361, 362, 363, 364, 
       365, 366, 367, 368, 370, 295, 33},
       VertexColors->None], 
      Line3DBox[{310, 152, 160, 168, 176, 420, 421, 422, 423, 424, 425, 426, 
       427, 428, 429, 430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 
       353, 418, 359, 357, 354, 348, 349, 344, 345, 341, 340, 337, 336, 333, 
       332, 328, 325, 322, 321, 318, 320, 311, 317, 316, 315, 314, 313, 312, 
       319, 161, 153, 145, 377, 378, 379, 380, 381, 382, 383, 384, 385, 386, 
       387, 388, 389, 390, 310},
       VertexColors->None], 
      Line3DBox[{177, 169, 392, 393, 394, 395, 396, 397, 398, 399, 400, 401, 
       402, 403, 404, 405, 406, 407, 408, 409, 410, 411, 412, 413, 414, 415, 
       416, 417, 419, 352, 233, 225, 217, 209, 201, 193, 185, 177},
       VertexColors->None], 
      Line3DBox[{323, 184, 192, 200, 208, 216, 224, 232, 240, 247, 254, 261, 
       267, 273, 279, 278, 277, 276, 275, 274, 255, 441, 360, 358, 356, 355, 
       351, 350, 347, 346, 343, 342, 339, 338, 335, 334, 331, 329, 326, 327, 
       330, 324, 323},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJzt2OlTU1cYBvCgoriM7TAIocUCQQbq0kWsFa08KlamshUdAiq0tkBd0Moq
Cq1AighVQ4UpxhZMyxIFRDBioWwFA5SlRkxINESaBXLlhk0UZAu2/AN8YEaH
6NxPd+Y3Z84895xz3zPvtf762K6gOTQa7U8DGm3u1NNoX++zPUEylGa4hnrL
xHDMGJNYWDXDlM4vl4RL0c7Oq+Av7kSGmV11u1eP3jmVf3bd1yB5/+X0h6iC
zw/co2Kwehf5prAa9S7ndN77+HDDkJREyLGrNRIugZBDrcF20XK9y0k55ZRT
TjnllFNO+evhUpGjLytDiR0DdG+uiwaiTqPjkwwVbD/2mMv/SwmG5JbzBqYG
6aTAPUKpxKmx52XDaiWGElpZskANbklLUJ+phNowkRswX4X+vXXbzoVrILQv
PNSwVwnhgHqH8UoV3lolVOxhaXD9fIy1u5kSZwzG1HQPFZp/th93vaDBOdMl
S/fxFDAsXJGcEqaCKJaTcuQ3DTa6X7OMsFCgvzE/LOWiCp+W6kwbijTg3Bw0
TvzpX+jackRry0jYEv7V/gcI7CQrFbQkOZK21/GOCkic+OjvsokYAu/6bD34
hCUHO0w4+c1dEs/fM4kauUAgNTjQnv29HKtbiyusH5IYf1zmwswjIP1wXCSK
mhq/9Q1FFkmCAwem9W0Cu3u321eHymHO5J8aHCHBVu3iBT0k4Oq8fMQtWI4v
IgZ05gu04Cs4Q46jBNj5uoKTgXL0+1Xln6Rr8SDmbqol/RFkecM6np8cf1zn
pkX9rsAtReidsflitIw+vRI22oCa+AcHbfpUWL2idFXSCREG16cVJEvqoHNp
W25Y0Ym2X1bmXmKJ0BC/nt7jJEC3O2NlQXAXMr9TpFncaMNo2lo+M1sA/mXf
kQWfaNBS7J3T5XwfnEyjX5vM6+DkVVOqMyFg8kEcL/roVG6byoqdZ5pxWByZ
xJwgkJW4xWrZASUcLP7JneSI8OzOj5uElt1T+xXq/z69E6abE7LXBN6ftn98
Ub5u8zKuQ30nhIwvrzRnTb1vUIu4ZLsAxTc8UiwDCOj+S7aK3NIBok+9mG0r
RH9T+QjNg8TxxAcOS3M0sGkq1Ry+KUeEVnr27UYtnJmF5cp4EsS3V/pUi2Uv
PX9k67qi+CVT65zvltiyUY6D2cxttxnNyKq+Kpic14NawYY18zu6wbi4O6fg
XjtG3J9s+9xYjXm+TznjnRrsra0oHzLsmHH/PlO/VvSVzYWFXbDwnLNnMFoM
z3IPWmqwAEaVtnm8+1oUzYk82+xDwmttdUlFrOyF1Z8XlT920fk14VoStPKW
eq6AQKsf129/6Mvvo2eas7JxRUhmmxpHzIviEjaJ4FrZ5bajRzBr9X+m+T+L
q3UqPK9FR5f9hOvAI5xmVJmp7Gbvf8VM8+vb/TtdTrOekJhsFznunYqLqr8k
RgJvePDN1U2vTP5x9YKAkmdaWOdOSN4p7obJQs+I9NF2vctPOeWU67/PtJ7r
2/hXZR7K9fOcU/56f1+ztQ7U/LM7v76dW+oeebXqs76tz+vq+rbvlFNO1QHK
p/P/AaLIm1Y=
     "],
    VertexNormals->CompressedData["
1:eJzt1/k3VXsfB3BSFPVEbsNDlBKuoiIpDR8apQFxJXNSREIRuhlOShlSUkRm
JTqmyNAJHw7nmMqYeTocZzJtUt2kVk//gLUea927lp7H/vG1vuuz3/uzv2t/
vlvG2unkuXl8fHyv+fn4BPimu8Zgzuf8v3FF5RjT2o5nyO4aD3XlEphq4XFh
jWDWrMs5netLRVrFmWXgq93sp7YMArfnTa3bFfLr5J/zOZ/zOZ/zOZ/zOZ/z
X8vN8wSM4D4LqP6J2VqRD3HlZ81Q30QOhJ/cyXudzIIuJxeh420kfCo72Vt8
jwO3ou59au9gQct3wR+uj0jo2B6Q7GzJgdRrX+/FCbNhZFnHq05zEqoZbch1
UOGANs2twmg7G75dtGpV30pCzcdrVz5ayIGLXTZcsGDDjvkhGnpLSXhTZz25
pY8N70iGDiE32HDtZgJl8aQv0pbX6MkUs8Fd26Shr4wFR7xCFYfPCmGn+OnD
4MaB2/FhWeKcATDX0BWLveuC9buq0nM1uHDQPsI288oA+LhX1iuNR6Pc6vBO
rcdc+Khy+k9vBhNOkJUeVM2PQ0/9P8lKS3ngJyiibarGBKcd4XriAQmo/Gay
/UsoD7y19IfPW/bDZ3rvqbaxpxh7u3peh+IgyJWmKVbq90FXz0GnOr8UnFAV
ddHsHoRo3v10WQEGSNIu071c07DlhqPnouQhEI6hKblEtIMZw+Uds6gIs8gN
inyrRkCuibPRbJIJVduV7lyIzcfLjlnltk0/c1Y1WPdhP3y9bXgyo7QMv5md
Pf7DlQdHE3vEUjoYIKLWoWE5SseUfD7tfRGDYLeCx+y/0QULirNkdS1r0Dnx
dSqnYQjqOo4e/0xrBuvVpqfE5epRwi43rO3bMBhVhEZp766BG8+vko3NGzEi
92HDVeYIOIbvupwY9hI8LNVEuza8RycDJ2+Jo6PQp7CEj9+yBK9mykduDu5E
W93VLzMihv/x/Sktdc24mh6MqwfXjRiV9+PbD1erjw3y4MDkHz3H7lehw7kC
gWZtJvpIP9um/ZoLOqHmE/qXWlGwZ3zfYVEmlnzNvmXMYEOpTmBci0cPCh6I
sSqoH8DgfFVmHtH/j+c3HjM0XFZYh891szeYHeSh73XbtJ6PfaDea7VkjUk7
fmh3I9t5cfFS1ISc+G4G9IqmZ4p4MlBrm5iKzGEOSic/t/5zUfc/npP/48SD
7bWVGKWB7KjAYZw81GPK2tABQlLeKg8Em7FZWaKw5t0QqgzsiNqV0zrrvmN1
16+zsu1qMUC4xMOtZATL1sYbivA3zrqcz0vS19/hUbFbweLT6ZZR3JuXRcr+
8+2syzmdn7r24jr1ezk2pRS+3ShFYGHWw0YbXdqsy/mru2Tlll2/z3+NzykP
hn48I1BZq+XshnOFsy7ndF4kKLAgTKoEJ9jJa8WiCaR1yLmEuuXPupxzPudz
/r/nKBt97JvvTWS9+YubPkZgJOWBywFGxqzLOdvczHY8pDspB0OpEfkHWgiU
NB64SSvKmnU5f3XXrn4optXBBZF30YFFoj4g6No4JKkwAGMfdm2p/70WhMSu
GrpGteMLo4ipa6eGIS/0qsejs/3gSVPItX9Uh4WHtrzW/cKF+3Zr7oxY9sHL
dQRX/ef/3asyxmGbBB5Y1rELTqX2wsptt5e30htxO/xha640CK7M+ljGzS5I
yC0isfybcNFX5x0Jo4NgkVFucORSG3Tt2X95+PcWNKltaRC/OASbXmx5pDTW
BB3O2efHrVvRJejA90KxYeCl6Vf2vXyJGsbqVfGBbFRXeVzJjGKDeIp/z4FC
JlhTHOq5wyUY7GO5aOA9FzYEDv6mKZkD7XvP6U9Z96P2t/b9Fb8Nws4ipmPB
SxrmOKyfl03lYdPDT5aWW/tBvjbceHtPOUamu4QVmg7hA8knz4b8emfc5zHt
2n0Gn4txj+b6iQ1dw9jheenfrYEdM67jEn/Bd9y9DK3a5TM+3R1BVtd5VUP/
lr9tP2hkRuqqZNPxQXnfLqU1o7gsM/0vEetGWLEJgh0GS1HLm0/TO3wUC+kT
/Yvu1M+4fph09EjZjXzMXBn7Vk6AQFWv1tsD2u9Ac7N8U4UeBUcYP8g5SgQK
/xESti6pasb1ZSxUWepRRWhJlupaoEsgWaIxKIqgwca7l8xrFyPa9+L99LME
nn5kbqNwpWzG9eU0asO36hagMuOqos0TAntGMt7YlyEQWs4YdasEbRfHdnZd
JtBBCPqLR0tmXF8lYLdnzGgGysi5cW+XE3jJ1Eu/MY4Cap2W/IYn0lDF/iLP
opBAq524jhRb9Le99/R5JhJmpjV4iuyubCdK4OGEl+y9P94A57zRxOUrRbhM
lVJQnkygzaE6iyLSzM/PKsbjBspSZSjTJua2yIfASnqP8HfVgmnXC9x5T7t1
phK3ZSz9uH8PgXrlCxkfPCkznrNhdZspoqI30Npz378yfrqNlPmkx5cMeGpm
b8L1uY8WerHH2ggCvTJfeHQvzYSg1GMGJM1w3LyiM7h4lMBEcadrqUczYYfQ
McaHjbEo7P/RYmCYQGLfabVs/0zQOeSeskMhEcMyc0TZgwSaTyVOaQz/rLPb
y/uVfzJSa1I3F3AIXHpyY+pehSywIi6skmenYuVTvfcBAwSKJzTfmnSbfq5t
Osp9YjOUgSNVmmPOvQQO3jXSf0zNgkAV7ip+v6coQFlYzuAR+O2VrWaB3/Q5
p3uu6fowXd+my+nrUCr7xZEF1OU9YiLUHPy8cmc4M5EDJKUrwRp0FpB6BwJ0
nydgrnf7Y4eLHMjdKOR7RZQNkecqoo4rJGDMmVfyo3IcWGCgMHDGiA0G7WeE
21UTkKoibefKZENRuESKzxM2UNTIxTup8fhIVqb6dhwbjHotuku72ED1kwjY
/TYeCwZ4l4LM2XAksWK/ltTP+/cp0TfZxmN4WEOqgiQblrSJRWubcODASqN9
FKd47G0z+hHXwYLSBnPpyHAO8M5Quq6tiMepiucebyJZ0LzHoqC6jgNTV6wU
k6TisUHnvVKkCQs8ddSadRdyweHzsuWicXFIC+nkk5VkgYbUIHfBXi4slKEf
z3oRhxWCK8C4ewDOH1l3YdUVLpBo/1IPWR+Hvu7XD2rFDcBazYPuSc+4oLdM
khG6KQ4bT/PuUKwHZt05Yc7/P326uTDdeucozb32SQyk65zf9yWGg6ek0s0P
+XdCQU9bw/bvfRj9VS7vRTcbNU+erJFP7gDDarHulP192Hfck3ffnIup/bpq
VnytQPLLKYiS6MXJSusSH0keXlgprKqZ1Ab1AikmNgpdmOLsdk8/n4ck8qal
ssntQFOPqHVMacOgvBFpTcchbF3QZ6bDbIbCh72Hb+i24Kq6/BjSuWGk5U3U
15xogjD1JKSSG5FSsccv0WkExxu1yGx6PVy+uR5U19Tj9yD19dxFo9i71rXE
T7oWLlYsN5CLqMJV5Cp5g6RRXEs6Erg4uRqmTnBW8ElWY++aJwVp9FEMebFk
95BtBQht/XQ9Paca1es8x9OZo+jBJtv9JlUO7ltWOajPp6O9e3TUTmUCp6im
5sEB1GnPD3vbRUakR0uQfe4trdGLwNCa9+4tBsUgwR/0eFNMKSquXnO8+iaB
2E28aUAK5Od50P2xFOeZrWalBRGoObrTIAEKoPW0LavcgoppFMqw6V0CY0VT
VJTyc6HNZCF/jEYJptUYR4THEHiiJ3upU2zetPN6pnP5Pz/zqb8=
     "]], 
   GraphicsComplex3DBox[CompressedData["
1:eJy12XtQVFUcB/CVhy8EN9RYGMoFN1uT8AX5yPT4fkSliCAq8VxNDKy0Ah1H
sdHx2aDj26QtH2ip2QxooySLWpkm6vgCHQNTZ0QzMRUfqLTjzu/cud+zP8hm
uv+s5+PPu1+Pv/u7ZyQkZUq0zcNgMKxoZDB4Guiq7ku/Sg+o+cRv14licGHQ
XeRGxk2Mmxm3MG5lPAxc+778C59XGQY+KAZn6jE/OeanNeYnx/zkmJ8c87eX
64oEr81nIr0c4Ew95ifH/OSYnxzzk2N+cszfWa4vloQNjYxv7ABn6jE/OeYn
x/zkmJ8c85Nj/ki5Los6e975YDjAmXrMT475yTE/OeYnx/zkmL8XrBVn6jE/
OeYnx/zkmJ8c85Nj/r6wVpypx/zkmJ8c85NjfnLMT475+8NacaYe85NjfnLM
T475yTE/OeSfPRDqFGfqjYybGDczbmHcyjju/xBYK87U4/6T4/6T4/6T4/6T
4/6T4/4PgzrFmXrcf3Lcf3Lcf3Lcf3Lcf3Lc/yhYK87U4/6T4/6T4/6T4/6T
4/6T4/6/DXWKM/W4/+S4/+S4/+S4/+S4/+SYf4R+rTpTj/nJMT855ifH/OSY
nxzyO0bq16oz9UbGTYybGbcwbmUc+38UrBVn6rH/ybH/ybH/ybH/ybH/ySG/
iIE6xZl6I+Mmxs2MWxi3Mo79P1q/Vp2px/4nx/4nx/4nx/4nx/4nx/6P1a9V
Z+qx/8mx/8mx/8mx/8mx/8mx/8fAWnGmHvufHPufHPufHPufHPufHPs/HuoU
Z+qx/8mx/8mx/8mx/8mx/8mx/8fq16oz9dj/5Nj/5Nj/5Nj/5Nj/5Nj/4/Rr
1Zl67H9y7H9y7H9y7H9yq5hruza3bb6PQ++U3+JyQ4L+z8tLunDv2P/k2P/k
2P/kFrG8ZUFORk0Q5KH9x5yQX7wL96XU0oV7x/4nx/4nN4trkTGTHp4KgO+l
/cc8VsYh/+xE9/k1F+4d+5/cJOYcOdDPO/Jxsd5p//F7LYxbGYf8SUnu82su
3LuRcZPY7lWe4D2zHdwf8ku3MG5lHPs/2X1+zYV7N4pvQvfFnKmpKda7/H81
uL+ZcQvj2P/kkN/O5Lcz+e1afseQuB4nW78A94H8dia/nclvZ/LbmfwixX1+
zYV7p/7B+5gYNzOOzy85Pr/kkL9Sy5leHT7A8sutYr0bmXoT42bGLYxbGcc5
kypzZlqjH/dp5Q9uZOpNjOM8Icd5Qo7zhBxymtNkzqz0CxVv5geBG5l6E+Nm
xi2MWxmHnA4mj4PJ42DyOJg8DiaPg8mTZHOfR7qJcZyr5DhXyXGukuNcnSDz
fGpbNHNrUSC4Sfh6xjuMQ0LAzeL6uC4F/arbgeOcJMc5Sa7lmXbckLnwYG3f
vG11J2uH18qfF7mu6r4+i8ZGHDZrP0cy5mY239PELNb81j0rO+g21JvE4YSb
oaUH/5KeabjRNmdeR1G2MtsQtuFPqG8vsvrk9Bjmd136nUvzVlbv6ia8J/bL
vj+1Euo7ix9D1gyqO3sZPFL8HepzYusbZ6VnJcZ9kTuipzDA1Srk1YmhEePE
wU7NqpYWd5C/nxkadW9TlnY+JL/1oOpW4Gz1fHjkSu8nl0r5c+/w8EyPI7nt
Fbfklm/usvwVeZ/Bdw77B8SPpzXkTRCXylZ9O29diPSvynMNo4ZTvXoOvPTz
B1uWBr4k/VDO/aBuC9VzZp61bWzXGO2cqbuP8zwW+k5A8Jfhwfo8Tved4Z84
qFeIrK8tyb7s10s7X1Fp5d4BhYnxSSK9dNKC4zHa89VySk75iRLt3Kj7Xuc5
qujXix3Lrjyv/16nF1bN+mHHhmBZfz/Df2He2URRWh67uPexNvp653mm5f6P
thzO95feK2rdoUnn+fPVo5Alc5qHajknbyz5eLVNO3fpcjrPGwXzbet/muwn
7zNjSc7vkaZkEee7afFry33193fWr4lcELcjpbW8T0XGWu+Uqcmi6dXKkYGv
+0t/+uE8D6zakNS+53tN5X1Gp48PneyXIkxLrQnD7nrp7++sj4jYPmFvwnPy
PtN2N6/xqtHOM+Tl0x07a9aliu/6BY5c3vWefF66OTYXZSSniKDwUTd7bmmh
z+N8vy8qiO3eerWv4vP3vVwwa4ynzDP55N39xm6potIvL2je901kvWfwGkvi
7hSqk/WDS8/NnX4mRRw9t79jjumJ/rl2vq/tK27erlrbTN6ncOBsjzl9UkX0
oIzNE6Y+kPVHt23vnFedKva+eDqktshL1j/9cL5Py6/6vP9oQWO9O99fe1rs
DFqfq9UPvTMl5q3RacKesfrD+THe0v1PL9uwsc4mFlbcKBzqofXtH2PT8rce
SxOtxpxYOuNQU+lliydEfVZqE09KBiVPydb+fYOHVSZtvKq+d9IOnHroc9Mm
umd26G8o17xRdN7Xy+rU91GqR+dGizcx7zXnnO+U0Casph2eq9V5Xv/8V+d5
/fNfnef1z391nnPzn5vnrkud/9zcfvrhZg4/61xtaH7inGxo7uF84+bn04//
MK+edf7823ni+vuq86HeeeLmuebmhmt/1Oe33uf9GZ5r7vnlnq//+7l2farP
Lzd/uHnOzUlu3nLz2bVS53xD7yN8fzX0fsT3aUPva3y/13secHOu4M4trr+v
ev7hzlGuSz2n1Xuuc3M+5M6f3HmVO3/+A5P/kpo=
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJwtkLluwkAUAHehogyhoYr8SxSIcAkZEkQQtgj3ESGBOKIECJB/oaOjS5mO
ki+go4N58itGM16t1/vsuH7CCxljniAMr9aYIy7jOZzoBf6AGIxgAI8whB5E
oQ8/cGD/BtfhQr/jNtzoDh7r+sQGz7LexVvY0ztc0nNecEv3yBlTONMz/Ab/
dBVnIU7nsKd7fFzTlrVv+KOXNphH5vrEDbjSTbzS2de4oufLd/Lg0AWdX/5D
0gZ3lTv/Yle7iNPwQGds8I686+AvvYPcJQUR+hnfAaDEMcs=
           "]], 
          Polygon3DBox[CompressedData["
1:eJwtkM1ugVEQQO80NpZaiVh6JRv/FrRFaCVK4jfBgrSi1Mt0Z2dnaWfZJ7Cz
qzNmku/knm9m7ty5N1Vpp98fQggJiEBOQoiyxiCPr+GIH+Abr4m5xur4FP7x
K8zwrphrrIdvvH4PW7wFZ/wP3vCFmGtsiWeA7z5DFvmCk5+3wj99v8Y0V4Vf
7/+Mv4i5nvmK//i/1uzwpvfTHjpLBy4+/4fYnY7ev4EXxN4iCUWxO2qt7pnj
JbFcCsp439/jkXUAY3iCOExgKJbT2AhuYlUzzQ==
           "]], 
          Polygon3DBox[{{388, 368, 367, 227, 389}, {387, 241, 369, 368, 
           388}, {404, 183, 354, 353, 293}}]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNlM1LW1EQxe99SY0xscZF7bogFJRSWtwIuhCDIHXR2voPuC20/547uzLZ
JO1Gk0ViXJgo+PJBYlpiPvAM9yd2cZi5d+aeMzP3vvfm+Ofhj8g5911ICLfC
lXAjpL1zL4Ul4VBYFL4Ir4VlYUXICa/wd4U7ncvLbggl+R9l3won8ldl94S+
/H3OZoQFH7Tm0Zsq/k/4Sw1L5OSwtq4rdilcuOCfCzWhIVSFigt8kZCCd54e
rLeW0BG+EftKTxl0cug89bbM3r3OPAhj4ZPWI9kDNBbRcIL3Ic/4XlD3nJAl
N0Gu9ZdknSaWhcs0hi5oLsCThDtFbzarBPsWn7lnvgiN38zJZmL5E/ccNzuh
nwh/SI7N31N3Co00vXj6nGMGjn6HcE2oY4bmGK6Ivh5Yz7jrKff2hzqt5wF5
Feq3+24T6+B3uMsu2lZzn7OxC++xj98l3/J6vHXbO2Lmn4WC1mdCmbp6cJbY
s9iWD29tk3fYpDarvejCvNvsx/gD6m6Q+1TzLd/aNbXG5LT+24/huqf2Dj2N
4G2i0cJvoTFifgN66KF5A0eXczE59g3VmfWUM3aPv1z4fk+FbXq3GRSJFei5
zNkSXLbO80/Y4R0WyS9w1jjXfbBrsh/4b9j/o0IfDWq+wj9HpwxPGf33PtzP
Ox9yq+RXuBvLqTHTOtpncDTZs9gj0ZnBiA==
           "],
           VertexColors->None], 
          Polygon3DBox[{{334, 262, 256, 333}, {313, 220, 213, 312}, {339, 270,
            269, 338}, {335, 271, 270, 340}, {312, 213, 205, 305}, {332, 249, 
           242, 326}, {301, 198, 191, 299}, {320, 228, 220, 317}, {298, 191, 
           184, 295}, {321, 235, 228, 320}, {337, 269, 268, 341}, {336, 268, 
           262, 334}, {382, 277, 271, 335}, {333, 256, 249, 331}, {306, 205, 
           198, 303}, {329, 242, 235, 323}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNl9l3zVcUx89Vra4qtYRQIVpBDDFUKinRpCIJRVGpRokYmphCtChaQVsx
VE0VQ9sQRdCKGhNrCX0wvKin6pO+8db+Ff1+1/ncte7Dd+1z9nz22b99z31z
2bq5dZ1CCBWJEF4QbRd+F9qEA8IuYb9wRPhJ+FnYJ3wn/MD6e2GnsA397UID
drvgm7cpZW/5Znjb4TvebmGP8LWwQ5grLBDKidNArB0puo7TKBzFz2587sWP
db4l16TtdvTseyH+v0JvK3Qn6z3oHhTOCr8Jl6iFa3KG2CeFY6yb2O+jds79
kHBcOCGcFn5k/QU12QT1vp48t1CnBnzsJ696ctvMWXaQ8zfczT7u5whoxL4e
X9uozRZsPxDmCbOEAUJvoT8YDG+QMFwYgdy8dCFbeEMYiG6OMIT9UOTZrEcL
I9HLQjdXeBv9TPT6Cj2EPsIrQk+ha4g92gneq8KLQmehG+skz/uXhF5CBuew
jzT8WN4dnS5Q74dxlmzO6fO+xXocuWfhL4P8Msl9IHn3oTZDkA1h7zP3o44Z
xOmL3QjijEOehc4AfKRjP5KajcJvDja5yLyeIEwUToXYjyfRHUVtBxEvC/5Q
YvQhTiby5Fnd8+dC7Olz+GvCt2O4p9eG2Ld1IX5H7s0N8CzbCN/96T5dL3wu
fCksFpYLK9DfhJ/12NjPOniW1QrVwqfYVmH/kVAZYh/PF+YIFcIydBciWyR8
DJ2HzRribER/lbA6xPnwibAUWT05+rv7jLzWkZd5NZx3OflvIN8NxKjFz1Z8
rUC3Drsa9FZjXwu/Dr1q5DXYLqEGK1mvIK+V5OUYnhcNxNxILhXUZzb36Xtt
wb4O2zXoryWfVdzZeu7Nd9M3Eb/H1xPR1yxqW0nNne/hEGex559npuele8pz
yTPKM9S95D46CN96jcAzz7PrAHoHkTchP4bMc/cE8Q5hdxTZLyHO29PYnsXe
/dtM7Cb0G9E9jL89xDwE9sI7BP84MbzeTV1cn2SvJ+fxIu6tinrWUqMKalaF
ThV79557cSF0NfqzkVcgc9+Xo7OUe3Kc5fiqwa/vYkmI38Zi7qgamX8H3Dfu
4Xn4n4XefGJV4G8xeVQS33kl+6Kac7l3PKs9p7sCz+bO8Luydu+1cA/T1UP/
ihaLPhd9FuL+OfQ/oV8i+swQHS081HqsaGkiyqeKjhf+1jpP9B/Rp/garv0f
ojmiHaL3hTvoWT8f/WfEzEzEeT1Q9EmIMut5/Rd++yfi78oA0T/hP8H3PeFR
iPzHwoMQvyt/m/7Oisi5FNtHKfZPiXcxxN5137oX3WvN+H9A/k/I6zGxnrAu
oI6FondDrJXPfxdb76dRc9d+qHBL62GJKL+L/3bsbuH3Ifb3iee134znhctQ
7y+E+E7ye+k6fuzjinAV6n0HcW5i34b9ZXhtnL8Zn79SE9fmmHK9JjooEfXu
kHcbNPmebSdeB/fi3G+Q123s2oh3A72bnLsdX/dT7rMDu3vcSzM5tobYz+fY
XyDPiynnvgj/SsqZW8nzCrIbyFpZ3ybmJfbmX6MWV4mZrP1V+I5zFhvncwp5
M7zr+LLOGe7pPHotrC+g30LMy9i24vNdYbwwKcTv2+8tv638/vA7ZHKIb/gP
Q/wdnRriXJkNpsHzrPPs8gybGeJM85t0DjrWfS3EN+HLyErR7U3MXvAsK4PO
Ym0dv238xivHbga+uuB7OrnO4Ew+Wx68cvjWeZ/zzOVMC+BbPgVawvo94R2h
CJRx3nnk53P6XeZ3sd9hnjd+9/md6jdxAbWdiq8ifM/krNPgW15MHlPI3fJC
+JPJuxRZCesydJyHZ3klvsvhFSG3Xk/ySyNeGfX1W9jvxMHUsjv1LKEWM7Fx
f3ju5wtjhTEgD14BZ85FN407te4wdPPRd04TOVsBNR6LvJizJmsxKcX3pJS7
LUyJXchZi7EpwP9keDnY+66yua8x+MpjPw6bXPJ2XXrDK4Cfi6+R5FJCLkWc
IZ/auYbpxBhNDL/PeyAfQ02y2acjdw7+HzGB3Eal5D0eX65Lsn8zyDWNfKaQ
Uzdydx7/A1AyoWA=
           "],
           VertexColors->None], 
          Polygon3DBox[{{351, 41, 34, 288}, {314, 218, 226, 315}, {327, 234, 
           233, 328}, {311, 211, 218, 314}, {307, 203, 211, 309}, {300, 189, 
           196, 302}, {304, 196, 203, 307}, {287, 26, 18, 284}, {285, 18, 10, 
           282}, {291, 175, 182, 294}, {290, 176, 175, 291}, {296, 182, 189, 
           297}, {283, 10, 2, 280}, {288, 34, 26, 286}, {318, 226, 234, 319}},
           
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], Line3DBox[CompressedData["
1:eJwl0CtPggEYBeAP5GI04g1RNgebczAm3jYFNyea1MA0iSYogk2aNmka3LRh
kyaRSDQaiUT+hc9GeHbedM72rt41L+9DQRBUmXeE5QwRosSIM8scCVJkyLFD
iQrnXFGjTotHnnjhlQ+6fPPDu8010qyTIcsGm+QosEWRbfbY54BDjjmhwhlH
THSPGfHHL0MG9OnxxSdvdHimzQMNbrnmglPK7JIny42dFElWWGKZBRZJhKY/
/QdfxB4F
       "],
       VertexColors->None], 
      Line3DBox[{9, 1, 343, 344, 345, 346, 347, 348, 349, 350, 352, 289, 33, 
       25, 17, 9},
       VertexColors->None], 
      Line3DBox[{292, 184, 192, 200, 208, 216, 224, 232, 240, 247, 254, 261, 
       267, 273, 279, 278, 277, 382, 335, 340, 339, 338, 337, 341, 336, 334, 
       333, 331, 332, 326, 329, 323, 324, 321, 320, 317, 316, 313, 312, 305, 
       308, 306, 303, 301, 299, 298, 295, 292},
       VertexColors->None], 
      Line3DBox[{274, 255, 384, 385, 386, 387, 388, 389, 390, 391, 392, 393, 
       394, 395, 396, 397, 398, 399, 400, 401, 402, 403, 404, 293, 353, 354, 
       355, 356, 357, 358, 359, 360, 361, 362, 363, 364, 365, 366, 367, 368, 
       369, 370, 371, 372, 373, 374, 375, 376, 377, 378, 379, 380, 381, 383, 
       342, 276, 275, 274},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJzt1f1LE3EcwPEzS8L9MDB8mCRpTU18KlhWmHzIkSRSpKRZy/2gDLFyqYEI
9mCCFiYhiAq5McUMVGw+VMImIeTGrLmk23Q3Zjj3cOec1Wr2ID35Dywoduxm
358OXhx3b77fu883rvRqgWgbhmEdQRgWvHm9k3DDfERNQARuOhg1aYXa4uAS
fSoFEVFjCsO1eTDdH1COsawgiUx8bspfZZwblbYIQawNjJHfqahZB+zPcTWv
XzIyrtObs9chXx5HQW/XVG5DPwXjieLK8ByccZ3enEiTOm0eCoT8Mr47bAWu
JKUkxb3SM67Tm4s3Ujhr+xzQeS+e1z5KgtuhU4rJwFl/5MiRI0eOHDly5MiR
I0f+b14Z5OlNHnJC7Jme7ZlzK5C+Xh3G4xlhp8D1+byIgAlJXnUhgcNRyTfD
7tiXfuuM7kuQl3NJGFG0OrWWJeiZlsjKW3Gvnf7qd8uf2obbKChqqN01yLIB
a0dBDWDEX3fS3Z/dECpkn7KDS/R1j6CAhMEPczpsxuCzTrr7XXzVoYdtZph6
sJZaIcbhWUtaX0eThnH9WUvZPHWVFQ6cONmee8sBep68u97ju++B7v69nTFc
8qwDiDcLx+tWzTB/7KZq4/pswPT7q9Obt2hup3PsFmAffhzqfm2Hn+e4dXmX
FxnX2WgmyaZVJ3Ca3jd3dVNgyqi7KPthYlzncNFQ9MdsEijDr+XpTAt4Po2r
LFl6xnUi/7PfVej6L8hJSLYoNNL4ZRCWSUofbZ5HkyELGYUhNnhS2Tg6UYXD
5Je3xcqKF3BaItUuqgmoCbKW1GtxCI+RDUy/m2HcObVVne75TPec91WPr+6n
+73+Ws9Afz7T9ovu/v/NmTZX/TW3kSPfSs60/w65f/03utXGbw==
     "],
    VertexNormals->CompressedData["
1:eJzt2ms01OsewPFBsitJiK3LjnbaIpeohk75ddkRopCkKMelRLnl1sVlTheR
kVwiRrWP5DLZlOmCeP5jhpBcMpoUYTDRmHnQjb3DsdZ5e+bdfjF7nfm/+a/1
efFf3+f/rPVbz4tH2zPQ0UeWRCKly5BIcrPv/ZSj5vcNWyAoU0fUE9CKLFV4
5xhCIZD+5zMqce70bXqpDv8BLIti37c6x0cKnEKnC4V8iesU562mC8KH/A5D
Zc/YliyKEBGUIq8P7DcS1ynOLU/vnui0ykOKNNlpPCBCRkaJn+ZFtEpcpzi/
omPZzx8pQ460vZXFNhitXel0VbWrXuI6pS51qUtd6lKXutSlLnWpS13qf63T
tygmN7b1wsRhpcVbij6CAS0nNHK0VuI6OesJ6p7cTlDzb0O3+kbgCdXNxI3M
lrjOJW0BG6/5twOVuKyruVIELiWNhndxjcR1psgcr3TNfgnT1dGvxppEYG6f
3NOtJXmd4jwjPqziRlQDhLeWL2hSwzBuWO3VUkBIXKcyqel8mz0bWlz7/C44
YKCGTNboFUtepzjPNrFVSExjghsnCjcGYRDdtA2cXvL36Zc07/jjQii/qxxk
1BPKlJMw3JTtO3piQPL+Z9r31ua4/gew74jKDt1/Y5hTEGZ9byVT4jqFVAOO
7lQOYp+fPP6mCMOKqLSUAvm/zxyT+n/9dSZnburp98jAg0WK8PkIt227QlfE
t0OVilnu5cBhxOhaX1ka0g3Gdwr0FRw6YY8WdcUGjxH0gZGQ+6y0Df5p51B+
5TFX4tYlaW5o5Zt+Q+sRUuwMNRvywKjENP81t7buL/v+qZ1KT8cceABfLrUP
VQ0D0qPmnbKRvHOa1KUu9f8fz47lbnI7I0SHF/MDbaZYwDOAxmTOaxB3HyBL
ecVvrTJ0cHr80fiYcz96csvLMDp4GOIemntan7uJyn7YRatzFKD6Z9vMdHN7
wS8kenM6NxJNuik2dM8RooQzTqSMibcwY2bAkOvNRwfpn1rk94nQ+C8aE2Y2
HLg6l7Wr8fE9FJar0dzDFKFht10pJQFtkBpF5nkte4jcvdmv5qhjVCTb2206
3QSFDt+POjmWIU3H+fOLLDBy3m6x8zm/Qex6w/Ib1dR/LUd31rzgKTpjtPpa
0pctVXVi57NnnNnVgu19YJ2iqkkL+gikqaBway4b3m4urf8j9T18u1uQ7J8v
gAWqUyFbTdmwoeZg7nT2WxjPEfhceTgCCtS06M1HWGAbeVZ7/BAX9NzWR8z4
CWFzUbXo+tsa2NzobIUOcCDPoydg94wQ9NX3H/jNrAZcHqu8pzS1geo1g0bH
EyJYhwtMtnUzwdHYZTRrbQsk+A0sqagQwengEoXfg5gQRyZZPitpAvf4yAN9
fBHY7Lx+d/5LAlwzjTQv3msEQVL44qJ5GJIXzS9ZtoqAkSP++fSrz8Hy5PA5
JRMMhpNLslf+SEDZUFJVjUotoJ97cas9BvfJh34DCgT4F6UODCxnwU06b9dC
bwz0hmxlej2CF95aAcpVTFjXatVgFIKBFlr4dOgMgvC+XqPp9QRoUbdnvYzC
cABQV/UgAsHtpn2r46pB2GJanHMBQ3GaDndKhwCLnPsNd50qgBViGSuYPf9X
Wn/d70sjoF/Jq5/X/ATCyXtHNVIxOObX629cxIQ1/naGNHIZdNdN4dwMDAsO
Yf/pz0y4XfVIL8C5BPzG9o6QZ720mhk8ya2BtYTd7fNduXBHL6d9PAXD12tW
5gvJbDj6K7eXej0dpVnpu/95BYP8wa10n5RaaA4+lmgV9gg1b1rH0IvFQKSr
8RSaWcAWhIoGLBCKj9nwoG22n8SwH3SnImB/V/zzalUbWi2nv8BTJISl3ICz
HlpN8E6llgh+3Y9uuMZ8pb4eBN2qb3ZE/RtwZZCNTc9+QAb55YdvV/TBcnPu
tncGnVBKushyyxtGsf22Lm89umFFVurTk/FvQCA7931PvgB5MJq1jUM64JiR
vTeSE38/xF7VxqHiyAiSW/b0Tp7LKzCbjHNM28oFa7alQyylAC5Gc5Z4sTCw
imk/bbj+DHr3Tuhe938AOmF9i9Y8wLBzW8bG5e+qIfpmmrFP2ey+3NIW3IjH
kHq/Xf6UOhPIQR1JGklVEJBTuWc1BYOvzf6nBI8Qu7/Oh0wGNRYRIJfZNaZz
HgNjqt/rkjUBfrH541oBTFC13lriG4hhq8fQ9k1+BHyKTvjFdU8NMK3kS2a8
MCSokxk+HALOxc30U+JY4IkTL2XtxzAzumrxt38w4aduO9XtibUwhhdqy23D
4Efnd+/SY0KE9vvSL+b1QJGTkXfTxkDR07/8oyoTZl587nrxsgHSk4sSOuUx
LL2sqcbuYYL9aPTSFs4LmLIumRPCE8GOG68K2Xk14Lbs84Ryx+w8/D7a7HxH
BJqZbTE0JRbUYpmPGTteAYWZFpO7WwQPfz5xhH+cBT7qGZn+Gh0Q2WAX8a9G
IdBk50XmLmfDnkFfLt/kDSitorTo6QvBx6BG93cGGyzs5uouVO4C7/JWd22L
EaCfbAqe96QWRvy/KPd87oGswsP1dB0BzLHrTOyJq4OgZ4nF5DM8sCVMNVqD
hsFS1nTUseM5lDt01s/T6IdLRPd5zx+G4eTXsxExn8WfY/8Dzs1zYg==
     "]]},
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{432.8136637630714, 389.9404421995727},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{120, 140}, {0, 15}, {-10, 0}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{2.0498181098743964`, -1.1645485725474896`, 2.4273591284786273`},
  
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.759344804098008*^9, 3.759618641414569*^9, 
  3.759619420592471*^9, 3.759620128637534*^9, 3.7596239830914793`*^9},
 CellLabel->
  "Out[129]=",ExpressionUUID->"fc1742d9-6ac0-4480-89ca-2e38c19a8e81"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxd2HlcTekfB/BTKU2oQ4szljrVqU51ULQoqk/7JmlRKlquhCE0oQyZLCXT
ZJKM8ENjhhiMRMYySMJYYmJismaJslYqw1h+Xi/3XC/f+9d93q/ndZ7Pfbbz
PNdUMTN8kjrDMH3VGEaDkT+tHvK3rsnpioTKIVXEcTL3dvwvHvb43FlcDT2q
adjhR5xDVkt+uP/xMOI8Xm54U5TzOoq4gPqZfn0j2DjiIo4ntR6dXxJPXELl
ja3B/vsSIbcn539rs3NwfM/BVcSxIyU18IdGe1KfRfSa5bd6m/sT59BjesWx
a7VhxHkMrqlxGPoqirgAj1OKNfO14oiLKMyOd9bIiycu4ZfkH6fy2+X8lqr8
CdkN13zfWVcRh/OAB7NLpgwj9Vl4zc2qC/nRnziHFqeGqB1PwojzyHc3i1Tr
iiIuwNg4YHXP57HERWiM25vllhhPXMK2t+W/byuQ89up8gtfaETqLjCvIo4s
w96/Dr/mSOqz0HxmrlEyJoA4h/IvzkzxNQ4nzuOk4z2OaYsiLkBhWLqEPRdL
XMSZMWetG7h44hLWx3z/mAuX88u5GEZt2rIpZtcNqojDMacwvcTJhdRnUa83
uH58VCBxDgMyTxi2KcKJ89CewtTdehBFXMDA42fS/bNjiYsIDbGeE7doAnEJ
z3s0Zd49l6Asu6ryv9qfUOtz/b4HcWT6/YDZX7uR+iyuBzecjdgVRJzDwQU6
IY7bwonzaHEsmjSkNIq4gPhHauNC/okhLmLl5ObV3ZeMJy6BNYq4XbNCHhcP
Vf49z3UNivaaUMfNetOdOlaexFkYLLANC34dTJzDQ3uHrBGF4cR5CMa2Tnue
jiUuYFb5yoKAU+OIi/B0T9o3zCSOuITQtvIO23b5d3mp8h8u1nt62c2OOibY
7Llf1tebOIubxQ75DrGjiHOw2vRlV2NHGHEe4b6LNpnWRhIX8PewLQsGjo4m
LiJwuNm3bRNiiEtoX6G+qPqdcr5l+6jyGyZ+Zx0+wYk6itpNztq2ehNnsbEh
4+nQ8mDiHFZfTx8YeGcMcR47T1XnxoyKIC6gZnF5g/mCscRFdJ+YrN4YFE1c
ApOrpbX/qDxe8v7HMDsunYusm+FCHc76G290XvcmziJl/X/LK22CiHMQ3+Sl
vGkeTZxHwjLPva+yw4gLeGzU7uSsiCAuIr9p78hNHZHEJWzUczrk4KZcR9ny
/sEwhZtD9RsnuVKH3YnHc5899iLOYt4Rk2XC3/7EORh2O74yrDCYOA/XqXv/
6asZSlxAUE+tWW/7hxEX0XVuxArrzHDiEv5Si5rjWiz/Xnn+Msxd+4P3bfRc
qcMs6OLs5cmexFlkZr45onHLhziH6fN3G+VW+xPnMaaiK+Hr9UHEBWQk953R
FRpCXISX3mPFF4dCiX/In/OkXu+aPD/lcWaY3rtu//Bd6nDqMDldXm521Z04
i0trZxxQ1HgS5zBIW/v7ykZv4jy+Ko3fZvvGl7iADZGVc4sNAoiLOLA0t1sf
Poi4hOa09EiXTnl8x6jyN63ZfiA71ZE6lm55etZIHheVs6huO7Jqsb8bcQ55
oRnjJ/QHcR5n7ruXrSvyJC7AZoiJfbm2N3ER1b+suee/wIe4hFfqf03reqTs
hyp5PTHMztW7S06E2VPHGeMs/ZexDsRZCKX7Gpe+ciLOwXbqXLGgZThxHqFD
rO5MrXMlLmDr2j8rlhwcSVyEImLQjJyf3IlLEDY8FBQ+yv5h5HXwoQX1FPfk
fdbUMW+d/iUtnUHEWVywCmg9bWxHnMNCHQ+90E32xHnsLqhof/diKHEBZsMO
TIo1cSAuovLlk17T4Ehcwv5K/sp9hbLfIO9PDJO8S69y/kKeOq5mdJ8erGZG
nMVPHXX3tBeaE+dwp2WLWUaHQJxHv6Dpdf2SLYkLsNwd3cPqvBVxEUv1GqyS
bK2JSzB7Gfy681ubj+Vs+X3OMCbCwmUpRr2o4/DsgfcnVusSZzHr3pcL9jix
xDnUFSy5ZdmzN3Ee79xtwrXuUhewf4StVc2BPsRFNGdIa+sL9YlLWJVdsnHP
VwYfy1XyeYph9gX85TFm/5NjxDFtVMizR2lPibOYNuVFRuugZ8Q5dN/arfPK
I+o8/vtm/x6j7c+JCwh53b1itUMrcRFZJaaHzq6mLmHWg7Tdqf8qnZHfwwwz
3Tqu/2gbwyriuPCiwj2lF3UW/brOM8XPDIhzaGjq03axljoPNtXPodcO6gJ6
jTbOd8mlLkLHrb+hYwJ1CV53Du1cMFTpkM9HDOOSU7xozDsz6ihjBpZeCqXO
4tzw3c4X15sS57D26/5Ddep54jz2NV2Yb1tvQlxAe7x9QdPhgcRFRFz51elU
Un/iEuIG5Db7neE+uurewDAjNR/6PW21oY78JQbOI/paE2dR2lPnnutDS+Ic
Xtdt1YVCIM5j3qDFobGFpsQF5LmenVT2fADxD/cvv/wpTiOMiEuI2dw2PdFI
96NXyefrD/evY0bOqyzsqWNb/JxSt+jBxFkUGNXsSD5iTZzDNxvbtd8UCcR5
/BZfuJC9NJC4gM7CtqUN63oTFxEZGLv6Rnz7sc9dwpGXKb4bfNWVZfl+xjBR
equCf452qCIOu7IB7LNmO+Is/Ic3/oQua+IcLLJiLFO9TYnzmKam5ms1SY+4
gDHvMnNqJ7d5fO4ibOwbSsQZX5KcEgb7m8f2/U3eb+V7GMPY3Ljk3uONUxVx
JM6dobdjrz1xFtsrv2/3nmVFnEPTngfdOrcZEOdhMaul9vTWtx6fu4Dc9NM9
7n5jRvKI2LVlqn7HQzviEnJ6XLE4WC2f0+R7MMMcNRYWWWq5VBFHWkBeRNx8
e+IsinU1jxtomhHnwG80ConR+tPjc+exOTpv+75b5qRdAbbFjfVCHwfiIjKb
7CbOHu9OXMJXBqf3zrZUnosS5f8hGMZp1LAV/ae6VhFH4LGTGj6SHXEWJ8Pf
N1/opk+cQ8ZJL3ct3pg8n4eX5vF5305xIC4gbJfN6MW7QVxEnrpLxHf1fsQ/
nN/yLA6rzZPP00mq/Kse6+SVGY2oIg7vlIrLCTG2xFmcyps7YkVru8fnzqFm
1/N527rJ5x/ZeejkX10UuwjEBXQNT/r3fPcA4iKuDUrzPqC6x8kuoel98dEl
Ocp7Temn/DkO//zv9Ftl/39yFBeU6JlXmBNnEdc8e322uhl5DodHxm/LOueM
JM5jfYWL+eDJ/sQFRCOteU1tKHERHr3Wjs8viyAuwfp2sfRvo/J9DIUq/8ze
2w+f11bm/+QommDaMrerN3EW75xvHTx9fCh5Dofa80sczy/zIc4jctyP6ZvP
jSYuYJG3qe0TtUjiIi4mxgTb/RdN/MP+79diuNxKuZ82fsrpY/Xs5MR5msRZ
vCz8eWXmATfiHNwrDDTcpwYT55HbZ+PlDfJ9XOUC0k5beloEjiMuIqzftfoE
5/HEJTxIMBDjNJXrNnuiKqdNyIqDO3MsibOwtajU73jjQ5xDmI+IYYvDiPMY
/HPTjoiiaOIC/ljHcpg3nriIeEWTUz/1ROISgjWOXbhurZwffLIq579P656O
0nYkzsKgc0Lu5GfBxDl4huinMjljifPIO1IpjNsbR1yAi4mFjhmfSFyEW16u
GL6O5pHwuvXmff1cxcdy1ac8CZsr74wuDSPOoezw7xeGrowhzuNIoq+be24C
cQExd3aZVO9IIi5CXe2G4ZybtF0Jhg4eQk2xsh8TJ6nynG1/v0onYixxDlmB
JhWRCROI8xCqpCsR7knEBZxSW9ix75yCuIiDBe0h407Qdj+si8qbacdD5Xwp
qjwDLv45c+OyccQ5uL7b3jP1fQJxHva2BSZGpgriAlJewCsyfSJxEbrLHzSt
9KXtSrisu6Er8Y9k/B9/+yzJ
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJxNmHlUlVUUxd8DBJmRMaUkJ8g0KZxF0zQhFdTIHCESFRRnJTXFnCsxR1RU
UjQ0UlJKzRHFARxzSEnLBHMkB6REzQnrnMXvW35/7HXvPWefvfe9j8diUStu
ZNQIG4vFUmy1WGxldRF4C1wtlWftOYFqAk+BI3UrHO05s9rQt6Vmh1YVtF3Y
28F3NOl6MeMMzw6uztvD96RfQ+DPjIPATeDO3p6zN5yX0fOiVhWeO/Cgpj4+
zHqSqzr76ngqaglqw3fDz4ez6gcIagoCma2Btzt8XzLVEdQlo7eJo30/4EHN
mxn1eYm6HznqC17Hpzr5atDzZ+YVdGvj60+tJnUv3sgZXV96yqnHvg4Z/OHU
5K4BZPKjX5e5V6kHkO8tQQgZapG7Hty65PTljZTfAM/anI330npDZgPJoefG
giaCtoIwQbjgNXIEkSOQfRD1ADK1FLTCpz5Z38CjIftGzIfg1YA8RpZ68ALJ
ESpojWYIfGOmDhkC0VVeB8G75HhH0F4QzB2C8GmCRwgZNXdTakavKZrBrM3g
tyJ3Y7QaUAulFmSaa8pcIz4fHz7bUHwak09zdkKnJecm3Ec1WgjeFDQXtKFm
9Nrg0Z67h3L/LoII+m+bOOrTGa/28JvDacu+Gefm+Aaj3Rp+MBztd8RDPduR
tS0e7wui6HdEszPZOuDfmX0XNDowr9ww9i1MXmH0WsNvwz0/EPQQ+Mkv1GoC
X2vlz247NN5jH06mPoK++HciayQeEayR+EWh3wV+FHvtd7W8+J6Ece6GXzhz
EfDDTf0I8kay9hNEC7oz241aDzSiyKi5PzTNRXLuyn36mfh92Wu/p8m7K2f1
GyAYiFY03G70e4Hu1FSvvyBOMEbwqWCiIFEwRDAaTh94MegZujHoxuHbD34c
e+1/ZPLuyVnzDRUMYy4a/seC3oJY0Ju5aGZiyDaavL25Sy88+5M7Aa1YZgbh
m4jvAPiJ7LUfDyeWNZ58YwVJzA2EH0s/AZ0haA1kRvUGkyGBcwx9/f7p7y79
zg2npzMpgoWCRdxtLJ6JnIfCH2Hyjues+SYJkpkbBj+B/kgwmNoY3lA/71HU
ta+f/TTBdMEn+CWhl8R5OD3VncD8eDQn4q/9cSbvEZw13wzBTPImwR9JfzwY
RS2JGdWbzJpMvtm82UTuMY39JDT1d4nxvR9E7ng40+Gp5mcm73GcNd8cwVfk
TYY/nv4UMIFaMjOqN5X6FM6zmJlOxtnUJjOTgtcM0z3HwU+hnsLcQnRV73Py
pQoWozET/hT6X4Cp1GYyo/5fUte+/swtF6zAdwb3nQvXmJmL7izWz5hNxT+F
8xy48+DNx0+90gQLqKWibbz1YuYWwJ9PpjWCb9inM7cE7mJ058FfxDsth7OU
3lzOuv9ZcFZQCH8FmisFq5jJECwjbzo+qXgspa61r9HVfOsFG9BbTu4V9NLh
rWR+PlmWUluC1jLun8Zcpsk/HU4ac5p1reB7wTp6a9FLo59BPZOe5vtRsBn9
NeRex9xa9t8yr/xs5rMEq9FcCU8531HPQnMD/Ey805lZhe5q7plBjp2CXXhn
c58cdLPQW0/ujfgad96IZhbrJvib0cpGN5PaFmoZprmNzOn5vOC04JTgBzLk
wNvEfjNZNPd2eDlk2oreT6zm8ybuuZscO5jdTn+bibNfcACvXfAPCnKZz4G7
jfm9gjx6W+Fv5ZzLPhcf1T0qOIb2Tvz20M9Fa4cp2x68djG/m/WgKY+RZQ95
9LwPnTx62+ht4b2y8VOdfMEJQYGl8jtagFY+nHzOmvsXwRnOBWhq/ThaBzgf
pJbPPg/uITj7eYsCanvhHifDEe5wGOxDIw/+Ye5hvHcBdzhEvt8FF8hy1JT7
LB7HOB9n7qRJV/f6c3iaHKfAEVOeQ/DyTW92lr1q6t9Gxt81WivE56ngicBq
rcz3B3NnyKi5f4VbSP0CHK2fM+U7ybkQnYushfBPMKO837jPefoX6Z1CQ+v3
BI8F5YJLzJyHe01QRJYr+BShYWgVoaVrsUn3HOc/0VTtEs6X4BSzV+2bgluC
q6Y7XeBtLlO7SqYr7JVzm7l/BKWCu4IbguusxWS7zv4WM1fxLob3F9lK6F8z
+d1h/hq9O2S4ZdK5wexNsmivDN0S5ovQ+E9gr/+8slbqXGauBJ27+NzD6zaa
ev4bzTLO5XBKmDPqyn8keMhMGe9zHX4pazm1UrxLqd3n/S9z11Jq6qF/A+jf
GvPQfYBPGX09/4vvQ+ZUU78DFfSMutaeggfUHvNG+j6P4ZTzRo+4m/b0+/QE
/iNm7qNj5FDdZ/jqaiszdoLn1CrIor3nZKtgTvVtBO4Cb4GPtdLnJl7aU71n
cPUzdSCzxfribjZwHuDzEL6FmXvk17kqZNOMrgJPgRc+VQWOrDZ4OVkrZ+w4
uzBnz96Bni2zbsy70nPlbIum7p3RdDL5uaHjSL3C9JYezDjxmTig5cjbOZm8
3fH04uxB353/PThT86bvxdmd93enrn39DFy4qy/zHui78HYu8Dzp+cD9HzJH
qJQ=
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0DE0QgEABdCPSKelTyWbv9XGxlZbTdSUrZq0KFs2Nm1sbNnYasvGlo2N
jS2bzSa3cwz3vOUN77yo1akdLwRBsM88F1kixjIrxFklRY4t8myzS5EyB9Rp
cESXHmdccMk1A+4YMuaRCS+88cGUb374nW8xLknIBlkypFlnjZneF5+888oz
Tzww4p5bbriizzmnnNCmySFVKpTYY4cCEZuEJP5/+wMtSyH2
      "],
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwNV3k4VH0YtRUhJSVJFFKJbCGKI5FSCkWKKBFKkhAi0i57tqKovjZKSaSk
xYxdYWYsM2OffZJUypL47l/3ec5zn3vf3+99z3vOWeF90tlXTEREZLGoiIg4
8Yxr6exudOjHAocYKXEuBUHPVfQHI2txctpCtqCIgyv8HJ2GsS5MqP19Y/ew
Bj5KISd/L+Ljv+cxpB9iLMz2OfvN3KoTl1fYP4hzECLeJ2dzVCQP0jPk2Fob
Jmav2Ldt6osQitsNTDafFEBxaJ7LStBRti5n/YEkAaRc9PpHDgvgpf+zZpTV
jokbglKKPQ+ZAgWKtgkfZZ7OfrvftmE0xXPZRCobbCMPRdEZLlyn8TcpqBO3
ne21RNL78WrvgTApGgXfaixeMdbXQteu7q13BQddTw2OydrQQTtgcz3Rohb+
22jBv1X5eDnh+8ZdkYUD51IMFA934oW/2pMkJyEm4pU0hXE8pM+4JP+yZsJe
XSdAsUUIa4lf4ZNBApwTc1PgE/UfWynq9PCGAKOeyqbrfQX4aHTFJvl7OxrP
qBd6uPBw2PhQS8FGPgxTC2a/+dwG5aqWCIlHbNROxI/XSPEQJy5ZvdKiE4WG
Vsa3NgwgbkjylOpjCv6re2SOxBpsHP2nF9nJwSv17O+d/4j7iqscViiuw9Pc
sG5JYz44fXPNxm1ZoL38vqWwpBO8HsmiKHch1v08DI0bPJj9fXD0rCUTYtRk
Bxei/oM5BjqORP0ZO13a322mQ9L//ef/7gkQbeutNxEowGTFwbc6Mh14In4p
qiWIh0dMuZTWbXz0vqjefHOqDfv6jXc49rDhlTH2oX05D/uvGz0JJXVg8/60
XDGbQax+/s3w3mEKmllu1XdiyLAOvX1z0RwupN0mC/ZpMaFK76nUn2zAUd/R
4HI3PuTIu46MpLMQm+8hNmzUBafRiz2hx4XYN3dBcsQLHtQ+1hdvN2UiuHf9
z9dE/fqpIgttTwiwTiVELo/oZ9zzcd2iN0T96s2neBECaIVJq2YZdyAvb8ej
mDwenu21WBB9iI93Qj9qlSMF8/Xyjebu4aDwkjhDjOhPY32+4o3KdgQVyIm9
v8NCePuXEoM1xHtB7zs715GQtSrh7G4HLkZKFaWU3neD23ewbEL9MxK6GhQY
CXzkU78tUpphQXIg2mpC2EXMn2b0jfNCpLoHv15I54FfXjqyR5eJzzuFt2Jb
hTjWORK++rgAf7K/6QXa01F/INv0kkCABXd2Tr1ME+DiYG7G26QOmJuwbAL/
8aBjpKJRns6HxSsJdXtxKnYoyVzoWs2Fpn6t06dSHsLjB+b5d1Px8OXJPXPX
sDGt8W53TC8VR+YskYiIIeGE73Ed6/tcRP3+nVT9oRfzW4uVhpJb0fHUYPH1
Zj6uPPs+3ZTIRrN71cEmBh3qXc4WrGwh8orVFWXE+EgLb1qwTYOJDeNPGkba
hdAMuqkd6CFAnFPewqkQOgzC+mxFXIQolDDf49MgwKpPxgplezrxlG5Wt6qA
D+rM5vtSPD5+Zl7NktajYYCkODLHiYe0eZ/3HTHjw3tj36nqmjaU7Pv6PJnG
hnNw7paqqXa8kDFcNtZLwpK8NVv6Z/GQsbolI/1yPxL8/7473UkBt/FBr5Os
AMNhFwI9FTlQd4mtzScxkLy+SFc7VQibBRvden7xcDdaZGc1MXcZn8YpxSwh
Gg1ST5qYCqCj9nFrAJ2OmjeOV7OKhJjM1E5b0iLA+aW0dkfTLvR9mG3VfkGA
vY5hK8QOCuDuum7oOKUdXPbXQOn9fESsq7TWq+aj1tY7WvYpFRUnjF3WZXNg
uPKc2K2YLgS5b/84VEpGVd6r0ntuPHj8O+SVfGwAf5peV8xPokG9N7bphaoA
BucKFs1YcGDnOrv1xWwmgjpkC9Q8hVBVTVs8nc1D/nWXTHsLJsrCb27hTgjx
U93tgdxfPjY+0qLMnGOg/5na88R6IcKaNx8pjhPgSGCknu48Om43xBwU5AtR
V5Wy/fWwAKzCvpjt/Z1IeffNIztHgO0Dna9JfgKU/xqLeDzejh0TJmNRClx8
0Y0yifRhIrT8UeeJsEbYH0v1WBrPA4MWdVmcPIBZNPdlZzTbwZeQK1w+zcd8
qwNWn8bYcDhTN9mSwsDazf6yB2YJsUBvSbr4by4+uNp7bvFlQt/CM6S6WQjD
Sf+PKkf4mDu2+FykDBOXK6K5gUNCBHmRgxLUBDCRTzmTrsyAuCXjejNxrmJR
+QhR4lz3HofqzJGnI8Zrcf3ap0K8yMwMufRZAIkTepZPNnbhv9vNLWQnLkL0
/66q6uqGmFZVOnXfZ7hkj7htOsdD1Jn5rU8qB1DsFr7eRbEdwyNNey6X8nEh
r3gXzZWN/Qkn/cJi6YjotpekpwjQxdsxtW0ZF35lduo6t5joXy6p3bhBCDcN
m22n9/DQNRW1UHkXoQuuylc+U4UIXyq/UCaYj8qFpbkOUkxERZ4SMv8Ikcz6
oG0vLsD0y8x4V38GKtwi76X0EOcaKWc12AmQZRkfUl9Eh2C8aY2HLxc/Dce2
Uh16kO/6+I+81RcUlgeUWzvysOX6j4wYtwGULu4siAmi4Wr6DoV+Kz4Ov+LP
XPRi4aHXBXF+dye23pcOnjXOR5fKxw2ZQjY+6XEXXYpk4KNoCccrQwDZ4prM
nJVcBF545qyew8Thw8IuayUhuOEV394u5mFsm9zTDx5MZHkOuwVcFUI54ILr
XQ4PquFdElbaTNhJb70lIHh0KUMn804SH3frK+/JijJRSLo5dtaTi6PjmfGV
mj0Y+pv9MWX4M9yXvhC7O4+HvEvSYa/v96NwVmGqtTwVJQdWdj55zoOwfkve
Nq1BRE3XnatrbIehzt6VcRZ8WCaVH7dwY0HpdvncrNZO2NrM7FVt4OPQkn3v
/S+x0c/WSrf/QscjhfXOJAcBcu9kmF27z4GTfF/ntZdMuBwstbpYQugcPdd6
iTsXf2a7KotfJ/pl/dprtrgQv+zOj1aNcGHup5K1+ygTmvL54p4WXBw7a23R
4tkNtR25EpO+zbA7WT2U8IGLe3HxFc3+fXBOiKxJM2mDrtzkFZoqsd+9Ei01
2/rh4uR43eM4FXv9NY1WxvKwPX1KqaBqAHSG/bZHS9qh1BxgF8nlwTyhmXwh
bxDda8/Y9qd3YNJHpMzUgY/16U0FmlEsjM/Z+u3PnC4UxE0/iS7h4w85Q/Kk
MxuPH3X8loigY2kmzWq/jABfFbzVty7kIEi3ceXCjwwMW7FvhItw4a94+ljb
TwZCJiTu/rvRAA//RK8ooi+ye/v+lhB9ef7ZjRlN9GW/o5YvI5+LxNR7Pv5F
vUhtWMt8F9UKzyqqbyCTi6bSMkq5ZD/Cql3tqcw2XFQ44PldkYfV+fwriW/6
4R6TUZC6iYrCsyvqyISO9ou5mnv5DMB7rNbrZjwN8q75134Q+jtku38V798A
areEagdfbkd63WSsLouH1ktzH/tlDqL893Rf5+UOvKEsGJ73jAOulHirlwgd
m5R31Tm+rkFivZxXiZAD6T8r7MuCGWjIeLdamFYP9sW+jh41LmjMFmZsMRO0
D1d41lJNKIlZGm5kx4VNJfVlxs1u1O0/KpvEaEZrz4wZ6wQXmz8/2dkY14Nt
yc0yax58weoE/Y7sDC7Iv5YyVfx7IdKtaTFj2ord1/2v2VdyUTdkPnNkdx/O
mGjc81zWBouDd+q/DXDx6sc6n1VLCT2qEAZ5i1FQH5q7pnIbBxttF0/KBHbC
TXsHTXQFGT3bv62RCeZAZNGGY/v4nbh7yeLPAVMyOr4FLKjI4CCyJNKWFdRF
zN1Hl6osMq5K+S4zKeWgzduXpbaSjrRQxyFjkVoEJ4jrmn8h7kFmQVJmLaHT
1IFNEVZ1OHdF33yMw8Fy3mxO6F4Gxt3zrvTvr8enjevdWFMc6E04J57uYWBd
VZN4XkADohfpLhki9vy7NTy3ZX5MpI88Gy+MakS4nJ6/ZjcbqfExxyoWdkDr
dd/wVhYJeWfDP45+Y6P6/C2OtEMHCskTXn7fSHBVoVyMmWFDd7pN/uzFDkRq
HVnuNUaCv8JhbuV8DmpLN8uJVHaA0nAqW0eUjHcWYqaFKzjwX3yYc2WkA1bU
+IRmaTLGfylJwpCDlg1vP41qdmLuZq88s4VknF812nXcmgPv064UJbdOLNRb
k3p8GRn6Lg2rlzpzoKG3Tv7FNQKX69B21SIjZUlCxrGTbGS5e43/fkeDytmU
JREPSBh5Jj7HLZSN843lzgnNNIhtzFxv+5jwFeISqdaRbJxA8PFF3TS880l8
ML+IBOP5q5k659jY0sStzf9Kg7Ji9CjzGQmbGhOyl1xgI5C5nmnwl4ako8yH
j1+QkKTTGiJzlY1ZS7SW06TbUep80jqilIShO1LLZyWx4TlWpJqi3A6G2gLH
neUkBKeEe8xJZ2NUdjT2uHY7NFsCPLXekJAj4jHrigQb7QFnvcSIPeLzccGt
V/4kOAX8qp8SZ+PLg4e7HQKoKN3yUOIoga8z+mIRQuBal/u3ZvtR4WZ5xnox
gfdX82R5YmxI86UM+3yp+DU9V73ejwTtH7k9BwjcmdIzruFDRdvN2aciCDzi
dfXez6JsbEpZc9bHm4oalZS/qwjcyvK9giWB57yuSco/RIXGrN7rHUdJeNAd
9vqpCBvK/w6PUT2p8Oy/LbhA4DSGkePXPBYqnXdrBmlQMP6Sfu2LLgm6O7te
Zd5mQSF8fv/VlRTcqFnsp0f46tgsHZ8dhN9Wn9izu24VBb8d7zzPIvD4XpkE
2XwWbFurp9ZoU/C42D1aQo/4vgtC6AReyp3oLNGhwO+Pz3gEgcNy39WXBSx4
MeSMD+lRsIvWd2iUwK/N2nQ15y4LR+jLjpoaUiAZcmf5GX3iPh8YaxXcY2Hg
vNJAhDEFgmuvpmQNiDm5O/eFvtsg/lu6LdrRgwLa0ZQYwwCCv/M6Cw1CB3FQ
yqJ9eC8FX69qmDB3ktFN3x63KG0Ql3JCvJ0cKIh59dvtjh4ZJXNLvv99MYjH
FZWtfBsKvLLn57rMI2NE8XFsXscgVHS1mv6ZU1ClEaK4WUDC0aGagDeiLDgm
6dwqIOpvvju4O7+KhGf/nsRIG7Igck3Elq1OwZdMM9c3iSRsDxjhevix8HX8
qkHHQgomNWNvVbuSsEDSpeGx/ABK6M6bvV8S/83c8+RxaQ3UbuZfLT44gJr3
R7zd7hC5mNx0r+JoDVRMLFYmvx6AWLdD76PLFIxVPZpHlqlBrt7oYnm1QZgM
Jyz0Ok70cddaNbH7ZMRtTTYcSh/Etg0Fju07KXAbWTn1SZeMX9rr5i9bwEKM
WkrxrrUUDH/5sGoOwRe50IqMe1ksFPXeaE6ZR8EGyZfim7RJyMiq0RD9xMIi
pzehlzIpENH5KuZsTUKfjVrq2ro+SA06VIqKEfN5PSTNk1ML9e8bRacuEfpq
k2FvRPj+qADZAfHNtXg84F4vvmUA8xr9aF4PKJh5KZtWdr4GpfLOdMvFg5AP
f98VdIKCt6PLIoYKyQiPPSP1c2YQ0YNR95T0Kfije00n8AMJhlnLV/FLWFDt
jDvX4EvB1sbx7ndmJPSMpp3Lm2ah80HpgIMbFVonHt3d50tCpKV+37XdbGyw
PKOv40ZDg/6cH243SLgTLOIh/rYH2ltllDfYUXFs9CZz6fc66EcsHVsy3Ifw
1Nlm/VMUBCtvPFzUVot0+oc3LLMBrFvyJrPuEXFvlOL3PxJqEF5eUG6TPwjv
0bWWGdspWJ3jFLiF0JHnGzOOa1UROf9P0juXaxRo+c1RXGFFguc205suRmxU
HdzYODNNReXt+76OF0ioL4Rq9nM2LM5VmXZfaYfcFHf3rwZi7w0r3enW5+DQ
joWmGcs74bjXWCNYgYy08sNTjZLd4Hg6uYbEUfHgRpNKe2M9Ao96Sowe78Ol
I35OknJU8JOvsS8r1MH82Am51LsD+ES5zDqdSNTv+2polnoN6rb/bOQQPJX2
1hvoIniqra/zL5bgY0V0Ze5hWzbEvksK5TbQAHXSp/QkEoY9vMyTf7HxsTpy
xQfPDnBNdW2zRkg4HeQ1UvQfoV+uykfNv3RhctuDMPqeGhy9n7lJzYaLanId
W/dKN0R8386dW94M/32fVxdUMLC1/mHuHSKPrT3WMhYU2oCIeQNmyql9yGn7
UbRlDrFXPwcrbhKtg5xmUqB+3CD+Smcfr3Ei+DJsF/Paioycxtx5KqpseM9Y
XWFXUqEdqp2GMyT4jr81/yHOgU9kWlwy4dtCLs7M4k2Q8Hmeu8JXNgc/7cbt
DXcxQP0gXhnmUI8dXvvCW8sIP3yp/erjdX04e8/diD/VChZXQ/d8Ig+LuAWO
pxgEX2e+3w+0b0f2vvjsahodXcLcWw8bqSBdKWG+4zWA5qAam2vUD0nDklHB
EAVZxtnwzqjF6R0pZ9OfsNBuEHH65A4Kpu7RhmbWk+Byu75nSxMbT/lbl3v0
taPS+3BrMZ2EgLJLi8lfOThSEqCldoaBPboGtHt36vFGm7Hq608uug61uQ05
9CNnSNlY0Y8CI2Fi59L5fNxYWrR7zx+CT6dc/+vT7gT53DO1bE0BXm43EHtj
z0HYvKvZ5ipMSLkP/dnvS8frvB2nXOhUmOVNtKssbwQ173caR2QAhqY5Bz+X
U+Bq/v1qPrkGafuqfHOM2Virlly/cjYNFS2iQTcvkhDtceDRz4cceGzKmKQx
uyDCvWvRHlSDWZvTTG5+5cL5/kCK7AYiR9Sbc19upECnrXlRjT0f22ZRf3SH
Ev5ZUme3pGgX3DiTc78QOe7C2M2O9USOq1OEggGR41TedXiXJwqhGCVGvvyN
hznmB+C4molIXVq3UxgdchG/is07ifrH9bZJKTVih6CyZO/GQTx9L9H79Qix
/5tCjvtdJuNKQ8E/sWE2DhclCU0JX5S8Zk3EScIXNQ8ePL0phYuBA+6flbb1
YsNrk1eWSq24LDZbT1SHD3JTeW8ssdf3zsZ/5amd0PujmFn4SoCDb9PyBw5x
se77aqmca0xML5oMUBcKEZqX2yt9kw+dXJsgTDMgNqkj+NUqRKLto+vfAgQY
3wK5Fgc6xqIonzMXMJCdeORZXDUVWWv1/52ub0DGBjvl5ucsWGbvFFf1ooBV
9YJ5bQMJkvEVdZaNHBS/uru6oZiOupoq2hb5OgypWltr5fPAU6re/URsELN6
bD7HJLej8IWwW/W6AGSzMOPchUSeGiHsYB4TXWljspD8ik+Ft71ivvBRblT8
XOMHA8EV6eFmlUIYmbpwqv8TQErqhVp3UResk9oM484J8MdMssXygABmHb7x
N+vbof5wlsKkGxsLVH0uiofToCgzFVOeQ/iNgtkJLY+5MHIO2P2jvxdBYV59
tOetxD0auF8b4WNyoF82mEH0Ad8lDD0ZmGpOzBgm8vjW5KfVdkQeX2da/saS
yOM2TyN/bygTosfu+hbxMgFaVmeILI/tQrAKySG1lY+gQIqYqogAd6RsLhhf
pYFysLR8/jcuzlZT/pZJ87G040FpgSYFiacy/xlrcDC8WNfs+O8O7DLNvPJM
hgyx3dXcrDIe/tFOyckbDWJ2rBwjoL8dJuMZa/TMhLDeaVSms5eHikP7bg05
MCFdZr55J0kI2zdHnnGTBeiIX1okxe/C9KnoBwEP+RAxiSjaKuRjq4+GaZo5
DZWNVlj3gwP9HHcLxVweThcUZGvvp4F2auPWxMcsxB5fPSmSw8UJqlV11Bk6
khzlNYLHOeit9VFmVjMQr9S7k7m+AW4Tt7qlpQXYnd7dFipP7K096w/vrmSg
90OuxfuvQpzJVnE/skIAgxXOhdGLGGjk81bLrBTgMe+mPXutAM0l16fbNNrR
r+p1oq2MAzLV70VdHA8SVfwck14a4dfr7CwaBxF4wyA92piL9qUGsyoDmLhq
WRE1/LYfgb3Neyz3cqD1aK1vuKAfs4oiBgashSiOfdc86cvD2prikuTtTEJ/
jm2MjRfiq6a511i/ACr6dk/jH3Xi/kJiwIkc51mUoGxN4SHgp46qhjUVJ4fW
6Nc8GoTrJspyEy0uRnlySlPlTHi5D++XIfUhyvlmlOwkG+9Oz7K/cZF47+ky
ZrdhN2oV+3PaN7Hhom9+YzaLA9st9j+yvgvx4u1apQlFAZRvzxddbcjAPu33
AwYKfJwvMdafvs1HpRfrmc9aKuY8jF6qGMdC3L4zpQsucxF00HqxNoWO41eX
DT+f2w/Zpa6iXrJETk9vyp5nMIhNy+a1KexgQvnDdbtPsmzUndl/W+c9F2uy
niQeTO3CoFmLCuUsC4V8jnSTswBHTdTvBrwQIk8/13FOtQDlc+LCtrp3wfK/
Zl/ebw7M75MWrrvNQ4j1y/SMXTSEHrtlY1w+ANbUcomYdxxcntdfd1ulF4fu
LEqxondDxYyB/V5sdBz00iqz5WBO5z7zuaQuKD5wKnS5zEL1uvUNveoCKCq9
fNt+ugOM5CeVL2VYyFu86j3D6Sv+ByuILGg=
    "],
   VertexNormals->CompressedData["
1:eJwNl3c41m8UxqXSMEokKRRl9ZMSisqhIZTKjCQ7tOxdVoWWWUiUSImMbBnH
3tl7vDbv8n4rmQ2/96/nup5/nvu6z30+5zl7Lex1rFlZWFh2rGFhWcs88/bF
Xfjj9xCnihfJ6d8JjPka4XhmNAOS874lq64LQEelztW9BIHHO9Jm35/OgoBb
vJ775rxQojT/G4VCIM81+8jOvGxI3T/Yx3HNEWu1ueeujzPvt3FbzxblwRAf
raSY4xIK1vN5nukksNO5/rBQwVcwDArfl3vXBgzdEvuCSgi8ekSmq8eyHJqf
a72T330PjOIvtTkkEKgRv1/7imcVeD3msZJvewSZg4VTO/wIZMtOOK15vxb8
vD7JPu1+hiWflg9LMPXvahIV2ciSCUUz69tqgp6jEVsE+dksgRKDC4KiNVnw
191eTsrnERr/fU1cIhOo93kl/f6ZHHglvHykju6JydzbQ4kRAh2n1n0dC8+H
3LIsXUJKCUWdyiPjWwjk+q9FXoq7BCI0DprtjvMAXqoXu0AhgbE2TaHmM+WQ
qpH2UHL4CZwqCeraFk3gpvX/InivVsOfXyQ4oRQFjly3bNq9CewOriy3KK6F
O4bxK/EBcegQYvTkDlOnE/XPYvL1TDB/O9+Ycfg1yurTvw5RCcyKUaPs4/kC
NudS9tQUReJ8u5O71jSBkdkyb0gfckC/9JqGqGIQil6YYVUiERi4uYRFdnMB
OKsZ8kic48bUyPGHl5oJXK5V/881vwTmpgPKbUaCQPg1Zq7kEvjTad3u30cr
IP5b151U09dgf9ZKxzuMwIvT9k+Lqqvhdy+fyQujFLgXaXLX5yaB7auB3MXh
dSB1MN64ZSAZp4d+hLsw/fx03cNOmC0LZqSL1u0xf48PP+RkCzJ1xoSL1ZBi
vsC/a8FtMnXxqGUYLl7BzEkE2zYPSc1csG9NEfllGI62sWP/xAcJLGvdffPh
UAHwlpZ4ufw9BT0cvepn65k5OcaXfqa1FNaufhES3RYNRhalnO/SCczW+uu+
MFIB//JEw50wHdy3bE6b9SBwrwJ1bymtBj5H6Tekcn6Fnvh7vp6HCczo+G7/
6mYDnBV8Zfb2Wgbmnph+bzNKoEz+b5HjIVkQwk5x8ptLwyqRH/oxTD/XdoQY
rbHMBtWox0RW+nvs7F9V5R8m0Ej/svL8sTy4x7NDsHTgJco5F/Vp9hDovJsh
SFMoghjriqyVo49hfdPt7ZpI4Ee3lHyTeYS4/JGzKULp4MTKfq3rBYH3VAfV
LC9Vgf5D9z8GZ8tA7PpluYdyBG69uPT2wnId1HCf8ZtnqYMlZ/ukxWwG5oU4
7W0YaIITNIHDG3blovtA0J4qZn9JHlKxOH/9C0hovGHh5M3G1jdGgZHM+xsy
d4Q+PM2BP99E/SKSUnDemfeyOFPnpu6tIqEF+dD1oVPNTtUP77Zc5Epi5tw/
3P3qtz/FsPDqe9/d4VSIuJPSNJTEzG3K7TTV2QoQrAgQSu4uBd+rcNFHl0Cd
gBPqq841sK3pziqKN8CVnYdjKGkM/FLaGzjo2AhTXePZqNQO/fUpu1+SZtGl
UX4x17gFlhXc0iZdi/BZENuwQQWBwkkJGsWF2VB2997qpeUc9JTUHH/SQOAL
71OCLal5QPkTlkY1S8AxW5Hdzh0E1k6fzTXILAL+pUtxW6ISgatyOt60gMDo
dpr9X+NykElTeP82phQ6Hpwx67lOoPTxv5mKXtXw4aP+yDqHepiMbLI50cPA
+xv1rOtodZAjauCiKdsBp10+bChqncWEo7Pzub+bgVKydwNZoReSSg6vHMig
o9yo4d1G/TaQO2mT7cbzFa1fKF6zYr77a/m9xlRXHqisr4ssVU3HS2NyaMLU
f/1l/vJSYhEk+T7iZi19BJfD3lCtaghUf61XIeFUBvIneQz4mflclzcr/dqV
QE72XRy6TO6JeAhq/XSvB1/HyV83hhkYGnw8tVKrDlg3fZs959cOtlvJFmFc
DLwoXHzm8uNGKBM7ryT0rxeUejU0NsfRUSmq6lubZSvIuSbUSbAPA7uP7a44
KRp+oR4I5tJvB803jbyHkrJx06toNU0mh3c8HJ5dYC+GMT6/7ijTcEyc50jb
V0ngNaFNnNI7EVxfNL+a1vgCxlon9ysy+Sa0Pz9Q/l4lcLVHPPy+WAsbLwl+
vvCdgb2bbhR8PF0Hsbnhgckm7fA033bGiI+BM5IjP38YNMLr/z5ecv7ZA1lK
I36aC3QE5fPn+s9+g9EnN0+IxwzDBo3fDS47acg4ree91NoGygdAVf/4GBxK
jG3/bE7B58Gjz0TlOiCDn1NKxeQtMlhPm5jmE3j7h2zIfGo55F15YqnB8Q56
al5zVDPnyNF/Oorr/1ZCpWmCqZ1qJWRft+HnESNwwBFE/szVwpVsPx1d9nZo
l+qFeqaf/ox/h3wzm+Dz3mfkmic9cNF9ISRp7Swe6HhDqs35Bsek9xrdODgE
xwL55RiRTJ03594dFWwDfZ+XdVLqYxDR4RMzZEVBHmnFnUd/tANZ8F3tWOgE
fOWM9dBxnEFPGwZnqUQntDL4DQ0HwqB5ozJyMDnwk7p7+EVsNSw8GUjcEFkI
rlrzNcsaBI5b5dcXD9TBVoce56OBLWBFlonlVWTgDhaPAJnvzWArbG/BK9QL
W9nu9x3Kp+OLqmRqjEob2D55c4dYOwSJHxes3j6mYXWoTYduWhtMv6lTGEga
BeLWpnSVUQpG3iZ/CI9rBwflW9tW3SbgpF3sX3wyg8r7TlUZcXdC2B1y07DL
FJzWpkQ89pvCIP8mn7g9XTDefv7Gw7psqL+62iGlxOT529ZBEWZ96yq0GFYy
dWB59dgFIS8GMoJ+qhPmrTAuWWfpq9wDfNWuh8Wf0JHtFCnqWGAHeCz/Zrso
PQx0xzu5Yp1UfBXbYWS9rxP21gaE9Q2OAn++4Za5hxQ0XnLx7mvvgCtuD/lN
RSdAMGtxaUPbDI5ZvjjTxd4JLt78UiIOU1C853avTuQU8oqpvVg7ydRvwv9v
aWkamk7r76qqncCMg5Uk7YAumDI5cjj5FnO+SUnUqVoxsL7o/BPKiXbI2z22
XX6qA+Z+/aBcKqWjbaPzB4GhLkjSvpl22XqYOYcHeBVIFKy7xa/sGNYLF9ds
sw1IG4P1IiJsLznIOF0s2Nmwsxfabqg9f1UyATK3NHPrU6fR6PnoCcmlbnjT
4n4i8v4U7EyeNN6qOIXkT0vxBvu6odb+6952mRnoMrBjg1sTKPpbuUyF3AXd
WXlmP2+SoVepZOPftjEM8/bycGTtht9nJtvLVtvhQo1dwk9mv6/9+Haz1oUe
OBnW7totOAQv4GPIS28Kcpi/vxL3egD01lT4/+Eah7L4O5tBexpH7ugJR58d
gtILiaHrXk4CmbR82/foJK5hlfQ7kDUInaJ7S43Vp6E8caOmAGMcA/tLyj6x
DsBM7cPm1S8z8GGQypKbNYanaEH5W936QM8sMqGMQoYUoVNHm81HkVq456n8
iV5Y2tIV0PKbAoy/G9zktYaRnFX70fRAL9zUu9J7OHIQkng4OqU4KJj6I81q
sXQIMte/qXv6awxu3V2YdpeewuvrJWjYPgJiHvD3J9cUmCXyGgSzjePG4mrZ
f8sjMHB19pWF4AzY90pqFKmN4K+n6qpxl0dAhuTA26dGho0Xwi7bCA/jwvpP
fVt6h+F22bZkV20KsFfJhkzwD2J25Pk/+spDUNIU0BV0kApUD7an0hb9GOga
9B/v+wGwVV0s/MNFA64fjWflkrox16zNgNNxACr3JPDvUByHUN34vMbpcQwZ
aLgsdn4cjE/qpZiLT8HajQfbDYRImGW7w98vZxwa3tJ3fmHWdzVtQ7Iw9wBu
X/5bFdw4BsdfuQk73CWDQ6JemrZ1L2akBdIebRoDLrEkTvtACnRmW7BNR3Uh
y/c1thy6o6AQeCaPZESFjNg7f81COnBCas8tUYURWHMw//P8dypcfvfodaFr
O2bWU7ZONw3Dab2AXYddaJBo/bmisaEZOfPlkjeEDYMia6JIH8sUmO7VHdmt
34PdDhY7s22mIO+680uv19Mg4WRz8bJfG3KLe7Dr7ZgCt/2trsnfmXXXEjCP
3teCSa15cesHJmDltHuZ7W8yWNz1Pq51tgkNHf9TS2weB3i93LJYRYEjQkPh
2l31KFhYc3qeMQb2iwGnfI2pcK1qMqdLpQ69l+69izs0BiEzUYM9g1TwrJsY
XlmoQYq2BG+U/yikf3J09zxAg0UubbcbpeUo/uhZzD7zUbiYvj2P2j8FFUcK
5w5OVCBFyHH90Z/T4CN5d+Vp0DSs+eZkqTuXj3mNB49ufjoNR9X7ktN1Z6DV
7eQe4295OJ2VxlArmYJmG5sTvGxk2LnZYOFEeS7qbJTfmbsyCeZ8+3tCEsmg
fXp/pVBDDqZ7Ph+hn52EoA+G86r/UWA8V4ccO5mNKnnBIY7xE0ChFSgWJ1Mg
Zt61KJcrG0EKdjewTICbmOfhX2EUGFrHutpPS8LPHMm5FnITcDV/rQGETYG2
R2K26qsXKLigEu6XOAOROoqUog9T8MHLcYNWnz9+3Lc8UhY6A49iQ+f7B5gc
Ftiw6vLSH2/1P/7gYDoDH71WQt9unobf2wZyB0388ajB/rxbsjNwvsa1zkBh
GqxtzXqPHvbHkzF7drzcOAMOQ1ZkuD4Nct+fK13e4o/+mqJpPWNMPvrr3QoJ
mAYPp3dfOZb9sH570+W9ZdPgqH61faxqCrhbw6TolhtwlMfoHLjOQFBCZBbP
zCSYKF3ifvPcEduON6TnKZHh7M1om0znSfB1r2+T/hGHYrujBlVjyPBL1sjb
Z3QCtNKkIxrWvUVPbe806S0UeMDGrm4sPwH2x6Iu8zx+hweLl/uXwingo6pN
v2E6Dgu1I1f6vr/HN0GNrANSVBCr+CxVrz0GQ6Sz9q0PUnDuyFZHlWEqxFPC
0vetHQXBGqfa+y6fsSfgjuemDzTYHF8j7RjdD9dGHb9NlJZiVlq7FAv/LIh1
zhy4tjwBQQrSwXZvCtD5Tla1TScZfje0W4zhOGgF6elkVFTh6jVLrVUXCmgk
krhTBkbBWH5AyZRRi8kFLOqnoqlgxUeZGA8YAvayrH2XTJvQIbHo00w7DVoH
zmst1HSD327jKzxibchnmxfZ94cOBnXhseonmiDgo1uaoUkHRue9aHebmIU7
UcedEiO/gLup/Nah/V1or2vvI3CeAWMSnCxrTMvRLVP8lcyzQbS5tPtLRjQd
LJttuduOMHneYTezZ20HlgqPzXV+JYOX3ebziXEkOBlkvhjyrR+9BSDk0CIZ
pKsn5p+OdsPJ9zaPOlJJ2FAp1RlBooDW5HJ/kFAtFPhG2tXZjeHFM5Z2z89S
wVXQy7Cx9hnupYrMGlSPY/1Pt8YLVAqcWdYnXQhrwFvWhWu71SfQVyhZTr2I
DJrhJnPad3txPenHqXNbJ7B8JfuR4eg0FGs+edvjQUKOM/FmhW2TGFRwZCKf
GIcfNYf38YcOwV5d5UOCvWNotCJALrsxDT3plr9YdnfCmoFUTW2uaTwAdYok
4SkY4UhS9j9XCs930jwdVcnIOXfZO/rZJPRuWMDcoWy8UstitqpBwdl4ERtJ
9wkw+q6nt62kFT9eyt5/7SwF/e7ZfCYx54riiBmn8NV+/N7vmmZ7n4z2sXNi
PCdGYWBreia75yieluOW3XtuBkU+fLTw3jQMHaM+XiFjY2h3ha/4XuYM9sqt
sVH/3gsH1t17de5YB0SyNM8ICVPwbfm/pyWxTG4LRhxUW1cB6mYvHIpTaOga
+CBYd/MI5GiYRkS7JuGr0sKqzGg62gz7MB4kDsG/ubkIhZZ6jFPC6Vjmv+iX
Gsl4av8AsAv6yEawdWPXQYGSpm80lJs8Fns8pxc4dLs8ko4MIdjli6d/pGKu
0Jm68ZvdUMJrBjvWj6H7nhU3/4sUxO5ni+rmnXDn7bLsyf4xvGZSGLgbKJjX
lsqp49sGdacYSZovqyCo+kTKPJ2O4+pJci9D+2EX7cH339ZxYDNkeJCNk4GS
PgPvr9K7QXzuZKH8Uglepd4+q6bAwH5XYe6M1k4YvndvKtu2BYM3l3u4ls9i
w54EPfY1HXDjY/D2RYEePCnHmNQcp6OJv0+gskMbmPbmfTRaHUTN+IWosWoa
erLd6FCUbgHyIyG5WO9RpHH31McHUvG8zgftUkoTPNex5tA5OoagGzu+UYWK
xZvt91Z21YML5/KkwJUvUKi7RNIJY+CWvHCvJpcOeGY1WC7Il4DFHY5rxP8x
96Plz3U6r1shujxdNJhSiSSJ6/NGzL1PJj/LP9u7Gc6pGNL+cbWh3sy78lB1
Bt47GvNLaUsjsMvmPWmY6saMbENFVddZXCgKlEsRrIcrlvy67asDSLup7Wrj
QsdnWhppeSm18EU/wNPcYQRJdH1rTj0ams6EnDnHqAEhktzeDOdRbO1eMhj9
SUW93KKrfR3VoBvQ8SNyORRkT3VE3zlFYNJ3EmNUq4nJx+AHG95kYagHq12Y
BYFXjqRPCDyvg0teqfcq/1ZjV0pJ8wFBAnOyXnRYXaoBCz9ZidAjbej8c/C8
CtMHhcGCqP7sKtjJM/GL70I3Rm21tWBtm8WvQmkKZzIr4ZrxuiKtpn48s19m
vTyNjoNta30z7lfCYbJui/PUMJrHsnGum6RhQ1ONTuXmKigrOjTAGjCCagtJ
yR+daBiooXbK90clbFHqFuiUD8cHFndZNSKY++ADrf/8qqvBkcful/LXPNz1
3v/25jACq/dIZz7nqYSth3qb9TfV4mWOLfHPVQiMFW4jBDzKoW2UtsTG3oaf
+yI5gooZ+EfwBqlBHOGTO8Fhd78LS9rIZIOtDBzc8tf5mSzCWpvI/Wtj+vDt
2BEf71OzyBW6Xk5atxxm9p1YmUwdwiKuktlXanSsOhzxV9qpAiYULA8b+JGw
7h1GLdfS0OnHhUNG7RVwwMnJWM8kCY+4Fl12LCSwblTircB/5fC4/tBxyXVF
mPA1graaTGDHqR7L/dYlEM64N2r3pBaFnz9/M6XL3NfmHJqULn8FawZvL9+F
VpS+sNmtc4CBxhXL6onKX2FawGrR8lMnynjzZd5UZWA8V9Gfjk/FwCe5r/52
bi/G1Fi+cL8/i5HXGdTl2lJIABmaE30Qy1Kqd/zwpaN7HVXuj2050IpSoWEb
CYO5KF4/yDQkyWmqZdlUwNN/GhGTJ8vxNWPQQDySQN6MIhL7ShF8ZFu7PlKw
HOenP+zhjiPwy4CYY7hrAXx6aB5t7luLAvsOwR1zAv+M/JN/tCMfxEtCI1SN
W9Cp84XukzkGLqdUWZIVCuDBfGG05J5OLN72+Ym3GQMfyYkZW28ugr06od4c
R3sx8JXJy2NvZtF6vSj3+YpiCEqfE29MGEQO1qtmrS/oeCJcMuGXaDkEzm3K
4pQg4fZYXdbefhoqC1doumlXQhjPfg8jnkr0zAkJSWDmRKC966fIwzz4abXN
qetgLTbOZnScuE1gsOSagttXc2CgyI07fOYb6hlel7i2hsCU1hsmQ525cJyo
aBIndaBS9E/dGgcGWiUfib0vXgDrqqfHf9B68IxiZ5hM5iyKH9qaqSJUDPZX
t5jTEwfxWtSMDPUxHeP0qBKbVSogwSvm3EISCe0SpF2SYmi49V5LPwd3DTgK
0TlzlaoxKP92p+p9AuVph6w8iVxQU5e+4LKnFj8F8zTTHQnUS90iUyv9BfpX
tl44nvENVzPpnac3Edjppi1H25EDjzNl//GGdWCzuiz/ig8Dx+2sLlTa5cOd
Y5aZ7J96kM3r5LB3/izu/MTKxR5TAhvJVk+29Qxi9ZS/RagZHemnGy8cZq2G
aOeeABbhEbzlIliqoEjDKNHtO3qDG+CR+raA28HV+EdIOWP8AYHsQaJkkeEs
eLlIImyt6zB6l+R0njVTZ/Z5rom/meDTR38dueUb7jIhjdfxEqhFn0wnjmTD
b6cufjP5DnTelGGT+oSBysMCDHEepp9LDgdibHpwsuxnZsyXWXRScckZsSyH
Ei6rPoXCQVSKKFG0P0THmIThT6O36mHjrU1VinMkbDlW8qW+n4pZHOfEZiZa
AXNG2OVk6vCuL8eigR2BtJU0toujGdBJ+J+c3NqMC6UjhTGiBPaV20pNC2aD
CmUX6yX3dnzJ7s7NF8/AuTO+CULLRbBT3ag08kg3ng/sOZRcO4tx8f1NeWuq
ge/eZ/4y+QFc6PnCniFFxxyNm5rPslvg7TNz36tDQ7gaLVIc/ImKMT6aWqne
XXBx/fH3lYI1aLhPrDvSn8BHsmU7AmfSQVDyl3Lpm3o8sSxX4HmRyatCwcsn
3+bAU75hbceb3zBzd6Zb7SQDm8Z4Gm19EW7LbO8LMWnHRx6PVXYdYGDWkvl2
lrZ6OHytTMg0qBtP2wtaifjRMdVkDSnyRSccrHj25lVhD07IsXTxEVRcvP3e
ZWDTADzNP/54/8lK9PpQmFEQT6D557+LBj4ZwPl0C+WJfQ2e4udrINsSuJLN
7jkZWwALzjxRtf71OGoQVVu9kcDlG//8qTpV8MNb5UfsQDOqnj5vOqXMQLWe
Fnkx5Rbo5RW+UXm1A7elH78pJU3HS3z63V/E++DdWZ09J+M7UUvevWZXOxX9
zfZ8l50cgv8Bd4AZtA==
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{358.3782997989231, 140.38572682607304`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 14.}, {-27.088493826547687`, 
   165.88683634448407`}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-0.44945244730034584`, -3.353775717391872, \
-0.013451209919699322`},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.759344804098008*^9, 3.759618641414569*^9, 
  3.759619420592471*^9, 3.759620128637534*^9, 3.759623983132362*^9},
 CellLabel->
  "Out[130]=",ExpressionUUID->"6396c984-56d9-4760-923d-df5fa12b4ba1"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxl2XtcDfkfx/Gj0sUlkx5pKtWUqUYm3aSb9JZSua5rokKpdVmy/FzyW7oQ
0c9uiWUplpYIpZCWLgeLIoqEkNsSIkVKkvx6PJzGo0/nr/N4Pr6POa+Z+X7n
zJljEhw+KVRJJpPpdpPJlGUdr3r3jnfRpzeFLPV7UUgc+2NTUrKn1BBnUFT9
IL1oRS1xFgZOk/STp9YT58Ct6Vdge/cdcR6xWfcdDc0aiAv4SX3XMyboA3ER
8TVm5zCvsbDj8zr609ZqXZyUoiUnDqMD/l6+j7SJM/jHKMNmmEs/4iyGpuqs
3JLKEudQc/1Hvz+q9YnzSAgu2f60sj9xAYd3rJszPdOIuIiXUf9z+mzEKdxc
6v+4zCYmJbSLo7mmVWlhlClxBuGlp+JxlCfOIiagrSGy2pw4h/HavxTbfxSI
86jRO7z+ltySuIAnG9XKdMJF4iLOu++o0KqwUriN1M9zoUXqqwTqGF9oOH1f
8iDiDORbG8tSSgYTZ3H+Xo3nCw1b4hy8ksLzVm+0I85jjVlD7ahb9sQFLLcP
XtzvwxDiIhrDGv4NTXdQuIPU79Y3u1Y4akMdjj9Wnzx/3Y44gzbjELP42iHE
2/tLbZ8N6e9InEOCn+Oewm7OxHk8f7TcettSF+ICBH5I08UVrsRFCMnjrtZ8
7nAXqX9g052FdQUO1HH/2p92l9Y6EWew7ma60gmRbofF1nozYaTcjTiH85qH
dpyLdSfO4/r0ZT51ASAu4KXywz35BdRFrKjxVXv/rMPdpf6WwhCHmlJX6tjp
eeb0XCt34gxqbCoeTlMaQZzFNhXdQfWGHsQ5NI2OtF9ZRJ2HXthVdWuXkcQF
yCtGLRgVQV1EZYI8MmF9h3tI/QUfF1e8ShpBHb5Pd19pUaXjGUzQcs8YZOFJ
nIVRrsnGwx+oc9Cbq1qUFOpFnMc0t6lf87OoC9j+Kz/Jupy6CP93WbNuFSs8
ylPqZ2c5lJ9760kdGmrmQdmtdHz78f8UGvnp9ijiLKKNr13eHuBNnMOJO3UX
1++lzsNuVfKw6ivUBWj1MJUNukldxN7wjXcKTylc5i31v3XT7997cxfH42rV
+twJPsQZvNT8/UlVHXUW70MqZ3Qb4Uucg1npK7+yRdR5RG9aeHxXHHUBgcPn
nLkRQ12Es1ba2vkBCo/ylfo//ajzz67ELg6nlkVta0xGE2ewOPWtjk8kdRZj
+J29glKot69fG+OwjCzqPJSfFn+ZUEhdwKKp6T32naUu4mvxScN7exUuGyv1
Vz1wqoxs6OIIN4q6MTZ4DHEGoyfkztyeTJ3FmX1yrYL91DlknfPxM/2DOo+0
O5nOGZupC1g942XD5VXURUyMnTTUdpbCo8ZL/Xme5Y2BeV0cR+KS+4R0H0uc
wVXdIaM3WlBn4Z3R3PjOhjqHxhD1uQGDqPOwMvHpvVWHuoADDy3G/ucd7RGx
5m/9aVrFHf6D1J9g23i2rdtY6lgaXpr+vj91Bro61q0httRZHDO8qWviSp1D
RqTRMocuzmPfhaQHSl22IyDpGOdfZEBdRMnoLdXpLYp++USpv0R1/4FfKrs4
ltwuP9i7gjqDqueany2vUGfxdX+/nNYy6hy0UzSuVJVT5+GVnlX3oct4ASqB
LuoNl6mLeGQ6L3ttbse8miz1V/NrPAwduzgeVByuy7OhzuCviBi/cp46i1o+
erizDnUOr4S0U6/UqfP44Y5Zpnd36gKUj8pzXJWpi/Dq2fRDUJtinWKK1N/8
/Mm4JKsujroTD8RogTqD5UfCiw+bUGehtzLzkr0edQ5WLwty/fpQ55F6W7tm
gQp1AdOuNabXN/sSF1F9XNnmdG3HdXKq1L/kleruoqs+1NEj8dBx72LqDNJa
ZvhHXqLOwtPnin/4Bert899Uqa+unDqPrb4/bV6eR12A5Za2mE251EUkqZlt
mHhS4fJpUv/GPea6PYy8qWNM98app7o4gyZzjz8CjamzuH/mgqsyR51DxP45
iQe7OI91p/JeeJtQF7DDNWHDiy7efv0XazNjTTu+Z6dL/SktOVs1rL2ow/Jd
7ThPe+oM9pTorDdzpM4id87s6CMu1Nvv31I/VZW7Uecx8lp22G5QF3A3s7r3
Vw/qIoJa9e8t8FI4/KV+S/935gHqI6njUImBw3qGOgP1vuvWV+pSb+/XmZ9m
yVHnsOC466fDg6jzWDY903iXM3UBbXED5zn6UhfxJuWd3x1/hUfNkPqbii+Y
VmWDOhKfx7w4JKfOYJlx0ZYet6izmMseStd6Q51DyO+jpriojSDOo8Lx0ggv
nroAQ9mlF+Ye1EXkLy70/zxL4fKZUv8cLuIXtSXDqONGVs0tozTqDLT4keLT
WuosJpjXnUxzdyPOYcvJt+75O6nz6H5w8iOLJurt67fA6PHKqcOJizB4vuJV
+kmFywKl/hzD7DmG3o7UkeRk7bQvmTqDHNNNN7qrORFn8UTD+rlqNHUOM1Nv
X1+n6kycx+OH5YdttlEXEOfXGDzHwoW4iAjVoxHV+QpHkNS/qETpQZ9mW+qo
HBa869hiO+IMhr/4b3WEsj1xFpUD5hm8Ok69/f6zYHpZ4tIhxHkEhSVMvOHp
QFyAdSl7P54fSlxEQPjnWdc0FcczapbUbxURlNwwYCB1iNGaDhEBlsQZBJov
vRxVN4g4C7bUWfPtDSviHL6MOn7bpsWaOI/5H/u25lrbEhcwZcpvqb8utyPe
fv8f99Gr6rDi+MyeLfVvV3myh93Vnzo2P+iX15hnTJyBb3POQetmE+IsnDN8
/+P4G0+cw56bAw5q7LQg3j7/zzQvPlplSVxA5s6FGy42WREXgdC7u/oGdDwn
mSP17wyeNn3EvtZC4lCeHLkWPqpkPIOT4l0/2xyGOIvSbn+ND7usS5zDsKpb
KyoLjInzCMjKsDt2dgBxAa9n6s28NMmCuIj3pQaRafsV+/vn937PtoYLSf49
QRyaz7/aWKMb8fb5b3skvvV2uXtnZ5H5dElI4cGvhZ2dg35ZyZ7GoVrkc3mU
fDX4IhunT1zAl9Iyp75xJsRFNK9qvnvqkNk3R7DUf6HHrWT1HA7EERv45WtD
qz5xBj/1MZf3CtUizqJfdMGMN49b3Ds7B7/z/8SpuCue30rO4+K0+nvb6zVJ
j4BSjW5D40fpExfRs3Kc5pkaxX49/t450/n0xNhtZujsDIp+jgxMLzcm3v47
18R+hmygNnEOfxfv1dvg1uTe2Xm89lgdN3mz4rxILmDns5dI+Feb9IiY3JSa
4hds+M2jQqTOT6cbPbv7i+jsDBKbT+w/lWVGnMVLlcmrgq4ZEOeglNg83iNX
jTiPeH/febF21YWdXYCQVxmzT7s36RERfPlnvd85xXrh5kqdH61tBIutiuee
kjN4oz5mwnLtgcRZuAUWR35x5IhzqHVtnL1huCZxHhPc7tYqbyhw7+wCLCKO
r9HiVEhP+33Xz7vVRm9WzH/5954MY+3z284qeuTfe+LDxq7u+ciYOId/syZk
6ej1Is5j8OBlfzMGd9w7uwDVOzEX810U1yX59x6Dod1PR9/X+NYzO1TqST5o
9SS5WXEeJWcxc9br+RcSWeIc7h/ZPnFShgpxHpnZMtWCXrfdO7uAIxODlK+2
KNaR5CKqyoYPSf5T9q1HFib1XBj3l96BhR3/H3Q4i4SjzrKmTDXi7efPbvzr
/NQG987Oo3FwcVyRzRXiAuyXq00b2nyvsLOLCIvblx819E3h/wH++q7f
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJxNmHlUlVUUxd8DBJmRMaUkJ8g0KZxF0zQhFdTIHCESFRRnJTXFnCsxR1RU
UjQ0UlJKzRHFARxzSEnLBHMkB6REzQnrnMXvW35/7HXvPWefvfe9j8diUStu
ZNQIG4vFUmy1WGxldRF4C1wtlWftOYFqAk+BI3UrHO05s9rQt6Vmh1YVtF3Y
28F3NOl6MeMMzw6uztvD96RfQ+DPjIPATeDO3p6zN5yX0fOiVhWeO/Cgpj4+
zHqSqzr76ngqaglqw3fDz4ez6gcIagoCma2Btzt8XzLVEdQlo7eJo30/4EHN
mxn1eYm6HznqC17Hpzr5atDzZ+YVdGvj60+tJnUv3sgZXV96yqnHvg4Z/OHU
5K4BZPKjX5e5V6kHkO8tQQgZapG7Hty65PTljZTfAM/anI330npDZgPJoefG
giaCtoIwQbjgNXIEkSOQfRD1ADK1FLTCpz5Z38CjIftGzIfg1YA8RpZ68ALJ
ESpojWYIfGOmDhkC0VVeB8G75HhH0F4QzB2C8GmCRwgZNXdTakavKZrBrM3g
tyJ3Y7QaUAulFmSaa8pcIz4fHz7bUHwak09zdkKnJecm3Ec1WgjeFDQXtKFm
9Nrg0Z67h3L/LoII+m+bOOrTGa/28JvDacu+Gefm+Aaj3Rp+MBztd8RDPduR
tS0e7wui6HdEszPZOuDfmX0XNDowr9ww9i1MXmH0WsNvwz0/EPQQ+Mkv1GoC
X2vlz247NN5jH06mPoK++HciayQeEayR+EWh3wV+FHvtd7W8+J6Ece6GXzhz
EfDDTf0I8kay9hNEC7oz241aDzSiyKi5PzTNRXLuyn36mfh92Wu/p8m7K2f1
GyAYiFY03G70e4Hu1FSvvyBOMEbwqWCiIFEwRDAaTh94MegZujHoxuHbD34c
e+1/ZPLuyVnzDRUMYy4a/seC3oJY0Ju5aGZiyDaavL25Sy88+5M7Aa1YZgbh
m4jvAPiJ7LUfDyeWNZ58YwVJzA2EH0s/AZ0haA1kRvUGkyGBcwx9/f7p7y79
zg2npzMpgoWCRdxtLJ6JnIfCH2Hyjues+SYJkpkbBj+B/kgwmNoY3lA/71HU
ta+f/TTBdMEn+CWhl8R5OD3VncD8eDQn4q/9cSbvEZw13wzBTPImwR9JfzwY
RS2JGdWbzJpMvtm82UTuMY39JDT1d4nxvR9E7ng40+Gp5mcm73GcNd8cwVfk
TYY/nv4UMIFaMjOqN5X6FM6zmJlOxtnUJjOTgtcM0z3HwU+hnsLcQnRV73Py
pQoWozET/hT6X4Cp1GYyo/5fUte+/swtF6zAdwb3nQvXmJmL7izWz5hNxT+F
8xy48+DNx0+90gQLqKWibbz1YuYWwJ9PpjWCb9inM7cE7mJ058FfxDsth7OU
3lzOuv9ZcFZQCH8FmisFq5jJECwjbzo+qXgspa61r9HVfOsFG9BbTu4V9NLh
rWR+PlmWUluC1jLun8Zcpsk/HU4ac5p1reB7wTp6a9FLo59BPZOe5vtRsBn9
NeRex9xa9t8yr/xs5rMEq9FcCU8531HPQnMD/Ey805lZhe5q7plBjp2CXXhn
c58cdLPQW0/ujfgad96IZhbrJvib0cpGN5PaFmoZprmNzOn5vOC04JTgBzLk
wNvEfjNZNPd2eDlk2oreT6zm8ybuuZscO5jdTn+bibNfcACvXfAPCnKZz4G7
jfm9gjx6W+Fv5ZzLPhcf1T0qOIb2Tvz20M9Fa4cp2x68djG/m/WgKY+RZQ95
9LwPnTx62+ht4b2y8VOdfMEJQYGl8jtagFY+nHzOmvsXwRnOBWhq/ThaBzgf
pJbPPg/uITj7eYsCanvhHifDEe5wGOxDIw/+Ye5hvHcBdzhEvt8FF8hy1JT7
LB7HOB9n7qRJV/f6c3iaHKfAEVOeQ/DyTW92lr1q6t9Gxt81WivE56ngicBq
rcz3B3NnyKi5f4VbSP0CHK2fM+U7ybkQnYushfBPMKO837jPefoX6Z1CQ+v3
BI8F5YJLzJyHe01QRJYr+BShYWgVoaVrsUn3HOc/0VTtEs6X4BSzV+2bgluC
q6Y7XeBtLlO7SqYr7JVzm7l/BKWCu4IbguusxWS7zv4WM1fxLob3F9lK6F8z
+d1h/hq9O2S4ZdK5wexNsmivDN0S5ovQ+E9gr/+8slbqXGauBJ27+NzD6zaa
ev4bzTLO5XBKmDPqyn8keMhMGe9zHX4pazm1UrxLqd3n/S9z11Jq6qF/A+jf
GvPQfYBPGX09/4vvQ+ZUU78DFfSMutaeggfUHvNG+j6P4ZTzRo+4m/b0+/QE
/iNm7qNj5FDdZ/jqaiszdoLn1CrIor3nZKtgTvVtBO4Cb4GPtdLnJl7aU71n
cPUzdSCzxfribjZwHuDzEL6FmXvk17kqZNOMrgJPgRc+VQWOrDZ4OVkrZ+w4
uzBnz96Bni2zbsy70nPlbIum7p3RdDL5uaHjSL3C9JYezDjxmTig5cjbOZm8
3fH04uxB353/PThT86bvxdmd93enrn39DFy4qy/zHui78HYu8Dzp+cD9HzJH
qJQ=
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0DE0QgEABdCPSKelTyWbv9XGxlZbTdSUrZq0KFs2Nm1sbNnYasvGlo2N
jS2bzSa3cwz3vOUN77yo1akdLwRBsM88F1kixjIrxFklRY4t8myzS5EyB9Rp
cESXHmdccMk1A+4YMuaRCS+88cGUb374nW8xLknIBlkypFlnjZneF5+888oz
Tzww4p5bbriizzmnnNCmySFVKpTYY4cCEZuEJP5/+wMtSyH2
      "],
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwVWHk4VO0bRtaKCtEiS4siWypKdKevfCRRkUgqpYRQSiVJEqlkK58kIaIS
JaXF2tiGbDO2mbEOM3NmLJG1Qr/z++tc132e67zPc7/Pe7/3c9RcvA+4iggJ
CSkKCwnNIZ/rw38GIZ2HOalbPom5EuDZuFh2Hafh7Qp9hSM5PJS4FN3a6U7A
9nHc4+u+NJhGC28d/cxDeDUYxd4Ezhd+shUOoyExMusMtYwH20YDu6OXCHAD
qhwmE2jQllxG+VvHw+5VdkKZ/gTuhRz8VfGGhovs4xtrWnkInmOYZHCDgFHW
+2W/C2n4+U06YUE3iRce+ufGLQKzBetvbKqloUmvt0iRx8O0cafk6jAC1QPJ
h9cxafjHcNW+en0+jt1wOiG+kY/4zVE+2ibNsKkYyOrx5sPB91zU6wN8LF3g
3/D6TTN2xi8a/i+Hj6DggqlsXz6ixlW0JVa1wOphSQ9tmA/RqcrKa4/I9/1x
ATpPWpBMp0SK6AjwNrFUXe8DHzkyJxjsea0oEBZ/WeYiQPx62buhDXzwlc0n
F55rxVmsHTn2UIC48IF2IwEfcZfbhnyqWqH8QGCl+1yAhpIPZ5kcPlLbL49l
T7XCr+mM8p80ATqyr5+Y6SbzydNSlhVvw303uZTsXAGW3cpW7/tK5qW2uV3P
sw17fSpEGksEsIt8nJ9E5pmStXkyvLkNsY6cLfvrBcji12054sVHg6SiR5Ip
A9kn9v/51i7AEls38TELPo7XWS6hpzPQI9Mmc5oQYO+usuTzmnzEPvu7NXKa
gR1F+iOHRgXwfiLyqXE+H7ZvfIyW72Mi+fK9I+enBSBGv7xdP0YgT+hvxlg0
E4d6hFeHMQRQWRX34APJ87LFgZxPEQwYsYcE04MCnN7RZ229nA97s95hQ3Um
FmX1txaI9GNZR7mlai+BrSsvpHWVMDHu3cM8Xy3A1GRBTbszgfTRiAMh81nY
Fvnr946rAiQpBv9TS+XhQIu3qdwGFuJ/tymf1xfARDm/seZfHlYmn/w+bsNC
209a6cZxPhKMzK2PtnLRPE8wfMeTBfljq5afreNDaWmEw5ooLmTqh68KBbJA
2J9af6pTAInTC55dI/stapG6bPgcFpxLog0V3AUwWmNaPfaGh/hBxPAMWfj4
8tqW+Ak+igt2lvQzuNjuoOxNeLDg7ZVs+PkGH8ZKK59l/+XgMmOI6pXCQuwX
MceFMny4n98apraMg/KinpIZKhMm5Y4Lv74lkHvwmHutTR9Ed5zX2XmJgTIv
88O9XgQuqHnOqfjWi9I6fwo7pA0v7a4r61sRCNg4L3aJfy/uzGGHsqXaMFR1
12NuNR8+EbzbKne4uLM8bcPUDRaWF4RKbNbl4/Lm19XPTnDQz/3YO72ThYTz
TaMpNwmckhtZtLm/F5LGa5T2U9sQuVz5+RcmD08DL63VucXGlKRPz98zLXjs
cahw6gwP57Df4Pm9HpSYnIqSLm+CtpjcSIUqD/VTfxPHW7pBn7As4vrRsebB
3IvVk1xYWl2MvubUjSViD0wmb9Ew1tLFq+Rx0bXz88o0rW4EmddpyK6h4ZSe
fZrtYQKT+kOeK2J6sXq4aeqOfhvitT7M2Aby4HU9e6rzaw9GRX+tz1Foxrre
/6L9WOS+3j1h2CzRjZH6gNgF7Y14q7U1MOkUFz9rGvJdLTpg7hZ228KwDjmm
pffXreCie/y8l00SC5kGSvvXEdUItByWvDnIgVCtsX3wTSZEaN9dTd5XwXax
IGchnQMR7bBrN3oZiNqWuoZ2tRJNlxmxdnUczL6T2b+1koG7F5VlC00rcTBY
4b9LSVxMrFQdl3veiYNbvk9fvdCAPzoBKydEuDhO2f2xWJiF7oqm7U/eUfF+
48DOyHAO1mm0C4lubYNV6EfL9t1lWK2Z2hi+hoMThfMXVE63YMJr23Yh6TJo
mAuPxg714dSHR9tErFtw8jK/q3SQAlr7Iaeb1D5Ur9T/VsNoxqJJ/4/ZbRSs
82zdbPS5D8rOaedtXzQjYUdd9bl6Cpg2ykOVhX1Y2rJJ6UteM0QW3bkqSqNA
fCgy+ew6DmwMj17pEGvFWJ3SnVSZMhwzM4kTS+9D3eKWFRdON2NgibTFCIWC
+bRJboVRH0zOza8LU2hCAO/9rXthFFD7NvxT9KsXFd7MTL45HZV/JHViXSgQ
uLeNajB6YWjdL0H00KAbsX5A2oaCJqVSv/llvTjy57nvmmc0aE49l5LeRYFO
UX1JcEkviMhy1ngsDbJrf2jM3UmBtm9+l31dL3KUohnvimm461K+kWdBgamr
fX9iby82GswGjojQYbr9T8ysHQWymyad6w/3Iug/S/2sJTTIr/f+E+BKwUNj
0eD1FmwMnSoUNyPvuYfG5uOuV8oQc33HzbvFPWjw3iUUEUKD9dRdxZw55XBa
flA73LcHsyPTeY/iaVggp5ieYFMOz+/lhKJZDxZ5EgpRaTTs+dsx+l9gOd4V
6P/kWffAIo7y81cKDcWDS9+8vFgOwy6nR9LRPVD7IfqjNooGYfUAs6/65bA/
+C2HbtCD9NuuiMukYc2xti3zHpRjLueXCGVnN7LUHI72EzRkPzaWnH+7Airf
ZjY4/NsFe1tzO6YsHaJyJXnz1SthV3OswLynE0sStblWqnSEVsVuzHWohOeD
YqZzYieUFrGmXTToUB7oPBgdUIm6w7ynql4krma34ZouHVVftr2fjK1EGT03
5Jl/J1JOCj9u1qbjQnj9bFpEJbRWxAuYbZ2I/r7dwl2NDpXb9ksnjlZC6QZ1
sUJhB3Q9It0bzOg4kHztW8RgJR4OlsRt3N2O3kYhP8crdBy5EKb37TV5vjRs
7viT+hRqoXXlbAwdgU7CJ+oXUGF+YDLlkTsLW3JyPDQf0VH2V1zcZRkVA7Th
FTr3WKidjH/dGUWuG3ThQa8UFXrXq+4aFLCgHCpq73aXjgq3lGq5kSpUL5ZJ
/THFwujTQ/Fngum4t9ox24FWhdzBttQi63ZIajkWTZA6dXNbpofniyroLvWM
y5BjgSYlfPRZMh032gZnnM2oOJMrbj+8nIkI0/eKu0vpaH80ue8ThYrtytbJ
KzIZWPf1YeedBjreX3iiZjtLhZfCTNT6Owyc1EvPKWqig8/ydAmUqUa5T/je
FU8YOL44+TZodMi/GjlIiFYj4/vNACkOA+prZrxuVtGRaPfcNqiLisRjPpqR
x5jY3BiVeuQTHU8le98HpVAhGbM6IJpg4vrmVwusXtDReLHGS8uJiocNHgoX
1jLxZM/D9pJiOj6L7M/jFFLhnW9wReQ7AypON1tqa+iQ1ZM8ozlARdY7XlFm
KAPhnpmvRsg86fQbKjsXVGM46KfYM1cGrpVb2+9l0CFNl+77pVINySMDEw4k
np9oed6OxLcm/mpWUq3GTr9t236GMXDog/z2iv/X25Pu+oSst7Sx58ZEPQOS
9T6XzMl15fn1lpoCKsSGjYqsdjDxwlFKy7+AjnDr3zH7ST1MDhcX6nzLRLDn
vGNpb0ieF8cIOV2hwtXtyxmimAlz8dv8zNd0SO6hPyv2oWJqmi3W0kfGf10/
XU3ykLV3jWCBMxV+34UK3tcy8afW8WbrSzrKF5/PKztLxfygVJMfFCY0hKek
1cjvHA8KFvroRfKTsVepjox/0nJeoomM57BfHMkn4x1e7S91GmDiKfFdujad
jnyN5NEdjlRQ+oZOVquywPar0uxLomPgx2OHz6Dirb7lQF5rO9IV0gLnudLh
NvS28tmJKuxRVw04NNgOm1+0Nxtc6HigaPT6zaEqXMyUkClZ3IF1EoX6nU7k
fRlk/dRoZxWMX/+tebOnA/IKQef67OhYp2uod2FtFYzsPDacv9iB13NvO5+0
oWNnddYqG9kqrOjoR1lQB3ZXXoug7KNjnuh4ktz8KiRPllM/hHWgQodqzrCi
ozBfaW2UZBW+Pvj72SC+A9cNG/yyLOlYnyxsaiBUhZjLSnK7dLrhN0/x1IEh
GlSuPVSrflyBfcKc6Q6DbjglP5yVHqDh14DGx8XRFYiKSv1yhdQl4eqGkVlS
lwYiAzfbk7q06Xb3N5pNNzrblEMMODTUyc3+bPCrgORZ2xX3T3QjesJFuK6b
htVC72X6XCtQoTa0Qv5iNw5sYt7rZ9HAd7/1c+XBCjgS8yXvh3Uj9Io3g9pC
+obAK1LeqMDbK3cV4hK6wXWSVipvJHXy0JN9mloVuNm1ZfJYKBv526tEV9vQ
EPoykX3RqAyHsx4sfXaXjdfSxX5i1jQYJ8m8WmdQhlR17ZP2kWzorrz6q8KK
htxV7U0nNpSh+t+PW8IfsmE55n3BbS8NLDXtGRWtMlReu/ZycwIbke4qCfw9
ZJ7Sngtd1MtwdZ6vg3MyG1c0m4X3WNCQ4/nQVV21DLznV86IZbChJ+6/LPxf
GuzSTFvdl5ZhP8vQSjubje9j4iYvdtNQcGhtn5ZsGe6tCW3QXdKHbc4nH2uS
feiw0jepx5eC7yNOfu2KfTCff3jhqkw6Uk+YGOeS+DJ2U+RdEv+WYq6smkFH
0Yc9b26RuNJsxfBWEnf3TDRUI8/Fslc32+xI3ETVyUeg0Idhy42sNWQ/h5a+
erGOxDc41BBPSNxlR1y0dhodNRqWItMXKBi5rmm4j8Tnup0YMHxOhwglvLWe
xK/Y7N8mTOKv6onbu1LpOPxFWT6NxGu/SvxQkeLAiHVn7UhqCwLnfNnCmKZg
zR/vgYUSHMy9OsD1SmxBjbhGyps/FPwOCw3QFuOg3kvD3S+uBStXl9Ql/KZg
i6mHr98cDjKKBqznRrfgdPFio5RfFLgMdkwPCHOwK3LIUud+C/YZREWUTlGQ
celxRowQByPTjD28sBYERTFfT09SIHFcbtjtbx9aEh793RrSAgeW8bmDJD4m
kmu6bZbkczZ1fVBQC3YEvh/MmKBAa/qijAvp0+6IEp/3zDLxvYHOLH5FRYpW
59zJWXLdBnWjDj4TZv8Ei24LpqJ1Kt++7w8HZz5rhN9oZcI/7tbS2qNU2KqK
rXCb4qBC00v99Tcmdg3q6wZsoqJ0gPsubpQDltTfjK50JhJFV7xw/lOFnFNM
72LSf346QJhPBjMRpaeyWu1jFfSk5zps4nFg9uifde1HmFgTtr4p0o3Ugcfb
O427OehKCzHeqs/EPnerhF+Lq/CIx4krm+biSKXZjKNHNyImljleJn1HkAMt
dnqCi083C53kHbuxK2RyQv8GDQ8eaBztGOLi7eta7XrTbrxM2jcpQ56PwJmH
uTV9XIifkQ36tKobSvTgkONypD/f1bvSnZxzGiv8FD4Kd2OVcsSq/vpGNFn5
+2+v5cIs715ozpcuZMSksCvDSNx4VeunEi4Gra8rMby7kJawam+kSSOiXLcU
bMnj4isznbJqTRfql6vevDzaAHUXYeMGXQLNTxlr8o1Iv+b8e3dSUiuEllGO
dKkRqLtzozBNqRfi8UEHP3u0IiHX12RyAQGRrMtHRCfYiAqqEnXUbEWOlfKv
3X94+Nslmn6CykbSt9TN9Z0tmG74MPOlj4dcRePFpfHk+ZP3ELpF9tFf3SJH
xVoe9toeV6G4kvgZs00GBi0w7tjaN5XHQ/amMoOCDWz4Pf0gpNHZjF13N37r
SeQhccXQivKZHvg6ZkcahDYj1mrlxH9+fLyySIzrH+LA853ExnvpLKTnb+hw
PcWHTbVh5q1aDpzerE4peMPC16Mdb4Kt+IjRNKLOpHIwGpjIfPqOhcrqw0ue
6/AhpX7o76njHCjri6oSO1go253wkEXO4ZMFWf5hihxIbHsWElfOxLm2xTnC
fAKWpw91b6juA6/B/nneTiYK7ojd+kYhkHQ/JJ5xtQ+KgR4XvnxhoM03M/31
UwLT0m/nvV3bB7M9XFqWLgOiKr6K5f8JoEPLKqAL/3/unEq3W8XCWf+jP8IC
BdC/1htync7Di9Tx0VwdFqjzUdjpLEDF0/cTTo952GQbEDZmzEL1/fcxk1sF
8Bl6n55ox8OC0k6nGCsWsuYMFn9bSM7R1eFl41I8uLlJQfU4C1W++6zE+/iQ
/anMpedz8SUvUWT3RRbEn8hHeOTxca5blHfuOBe5PY1n88JZCHDRco4N5qOK
ukK1X5Sc85KmRNWTWTgc/H4Pt0MAmZct6DLjg/CIttuXzQAxO17SxhEgqv1b
tOMGPl6w5gjC+QwU8DLOLBkWYOqYckTCYj70JhV+DGxmIuiYQr/TtAATxjGS
J8cIhDQ9tnGKZsI4rFM1bU4/3uScHeusJDB+KNqU8pOJlOCZ767fBJhJN8tR
sCEQud1bsGohC8yhsq2LrgvIucntYW0DD54XJ7OO6LLwW+b+ycvbBEiX2bDv
6GEebqqvu8vZy8JPP0VlCScB9ix085Ss5cPs/GzYi+OtENzwOHsvRQCRMXcH
SwEffa0LDl8aaAVhm1llmCPA7cH8C7vL+Qg79LDH+UAbNGNfzcqVCCDYt+9W
0n98OIWt1ZBqaEOTw9GJJroALQdqWtVc+Mi1VYnedZKBO1J0mhqf5Eei0/DS
OpJvG7GP4iJMvL9qXrJ3RoDLkc5pjBECVkHy3fbxTJwM+PHE64cAsg0ixWWp
BMy4H8va/zDxtueT0LAigZqdL618kwkEPz0pr7aJ9F+Tf0tzbxFgnrlZY9FG
4EHv17Rnv8l7aeaZ5MllfBxIEspyVueD6WJWr7ewGa0N1lGRDD4iThwdORfO
x+CLp622Pi3gPhVERpM8eJdq5/7/fxolwFH3OcnDAW1pIveLAJk3krfpvuBD
zmP/1pGMNow+psrK0gQo8dnwgXuaj2vr3w2uOsSAwo4DSSk8AdodN4Te1iJ5
GLyi2DrBwPnU2YUSuhzEzImcM383D9xFd/+1md8C/9QQA3HyXrh8SVMpIpWH
QP9LTu4bm5BQePR65SYebA9ezSvSJOB40iMjL7oRO5UseM5aBHYf7C+Xek2g
dsjXscyBjlMVjv/OruUjKdwm2kObD6Uf+YIdGs1wLvydU7lCgJ3sLJPKLD4e
Szo/mRlsgc+494+jWQKMn32XPvOdDyGdKzIqJm3gZMpfMa4UYH6wT4lxCB/Z
VM6Ok2IMKOVhsG+8B+sKngW6tHKgeXze8xe7OzCqRnMuFOmFf1u8W+g+Ls50
JO1Y2s+ETk/NeHxsH7j7PjRqCvGgofx5Y5ZbK0yFVb0z9nPRnXFvsKWch2UW
1+pGgkif21LYNVrNw+8bISaRV0j9wM3uAy9osN1yP7Zmiqw3sPPrhDwfnYMS
OTa0Jng5/fixhKwrJ1rsnSdZ16Lx8fyvAy1o1T+v2Z0tgKhSxlv9Cj7EO+Sb
G63bEKMvUbBqrAtxq2n3tolycHTmkMq6Q2wcP9Y5HLGFDbfPwj8HxjhY/dE7
FG/bkeYdtLXJog93naRGr3Zx8d2roFJYpg0DzLF/lgdzYXt6R4k1i4c2ZlCi
gzwdNrdouUnrCWiv7dV+8YqA36CpjcthOjbdWXbCzoePoovRIbwDfHwYihsO
ym6GnZz6sO55AXwVpo3+tvKRH3RvV3JYK4I+bJ57+hQTVYTCJ157L0zTPjeb
xfPQLGW7bG17F976RFWbkr5jrcqfqWZPNsSeXC781M2G+UuVlb7gQsK74p69
IamH50qqOv05sBBM6WWe5iEzcDTF1qUZNcfKRE+k8FCdqRYgepJA0NSRpiIH
Gg7628bEdxH4XXNjPiHBx2GnlTOc5004mHdF9UclqWs+QaWWQXwM1/2Zardu
wYoluV+afVvAevDya+68XjxSXFvE3N+P0Tc/376T78DyvdHFbzz6oPGfftpN
aQ6iW43t56qw8flFrlcSn4N38rwwL347xA6Wdjz42YeHQ8U90OSh42PB2dbY
Fkypmb32sODBvEqjymczgUuPpRZ9yW9ExX+3EXqaAPsYq2s9lcBq98SP7DJy
Xiy57f5dj48piw2P/pA6LJ72QfTq1mYcGDeLuHO3Heqn/lkuZt2HJjOp6yuj
OCCqmBdzDdgoK3betozcd5vP5zefzWtHQctykdMqHFSp3BlQ3s5Dv1J8jr1u
C4KVSu8o6vBwbetipbC1ZD9aFnWyYxpBSGh/NVpMYImksNz8Z6Q+y1nIr9al
g/DVGZPOIyC7lth5mNQ3u13Dc3IPNsEs41wuO6ULT/8qZq0f7YOMnKv64HM2
nu7iq9Wd6cUOF9UFNte4uJDOyX0kyUTXBavqI1840HPvrKkO5iEvi+8j1dSE
PL7DDYYeD8zN4hPF6wgsfZb9LO9+I8ZqNhfx63koTR4zUbtGQG3N5MSlHBo2
nd1ab2BIoEMsXD3zLQHb77b3C8/RofXvV564Vy9sdyfwFgVycddfhv38NwNC
UXnq969xEBC0SGyc7J/j74JlG4434zpjQtPsKRfmWmA68Hio+qXXfamVBtqy
XQk6O3jojgixyNAj8CnqSuqHF41QWi66sf8WD/tNhmNLDhIwmJTv8F9Fw7jJ
aZNPH3iQkbXOeXCOQOWMa4AB6Rv/ByT+gtk=
    "],
   VertexNormals->CompressedData["
1:eJwNl3dYDl4Ux5UR0hKyokLRIKGEfH8NUimKtqyshKTsSkuTEu1EhdLUUpK6
KklTpaXl3aO3etEk8nv/us9zn+fec+6553PO+cqfdLE4LTxjxgwZoRkzZgpW
6rmDt734NFxWUNj+UfcZtll/MXjxgYsqhU0ynE46GlgTeYdS3uCx2Yry3QMc
bDhx4KjadibM3Pjpb13fQLuQt7m5go3/+MpyR91YeOTRO+/uo2I031/YHf6Y
hdzIzpYSLzb2S2e0nxgpxMqrKr0yEUxEzJxoCD3Igfdu8TfzHuShVI2mNz+X
Aa/2aKn0CQ4KV4iIzfd4hbdp4iGbeXTMaD/1ytyRi1k/u7Te2uZBxiviM7Gn
wzHBOK3jMB101bNXjiz7gFt9g42YwUWUlKoJV56Bv72j8Sk76vHS0Lvm5iAb
3JGOYR8XJiQ8G+UuNtShPOiAZVI9C7Fb9QM8Bf4+VFFan+ZYi48xiwOs3zHh
Idv++30KG7r/DERNVT5isN4uSvwrAxeCEh0KXTkIDGG7X5tXhR51i7gbSxmQ
XrY9+fgSLn7c/hlSXfoerYrbLzg70+GadeTK9AkuFnm+2PrlfiWm3rlXLhmi
oTIl5M6GfzSIitcN9pe3YV9G9IqOCDa0Agvebk2no2965N++tE4Uhp3OdjFj
QahNhhbJFdh/KPwtYk0nLA++VAwzZCLHKGTPMVkWuo+zw2Ta2wGXhNV/HBnQ
f8TQ7jViw9R2YZ3mvC+o2p7FcfpIx+5Dhq6+Wzn43rQvd9uTZnxPjC5erEnH
0StezeKDHISVdV1YEdUAleWa7S0VNAxPbVkprMnF9ounfV6srwPz0cmcUzE0
bHNJes0Kp4HMvLqlO7sP5eF98nMuMZGYnfb38AY6pOTTai+9/gbLTScffFdg
ICxyp5+LAwNuEQV157v7cbL4ZWGLgcCf1cEG2glM2Nj9Xn5HrA8/RHYXc+Np
yPOefs36yYL6gkUHdh37Cr9wx5xr1jSY59u2aI8I8qp5Zfmd5HZkavTreevR
YHvV/Yx4LgdNZVpKyc+akf2f/5hEFA3FqTFy1jwOdA7vFTmZ/wnDQ0dP6i6n
w7Jj4kT1LhqUlKxilQXneallTYM8GvKPDvjFdNMw7nJdd7qJhouJ5e60MiqM
cxPEpecw4OwcMU9zOw1HT2/1rZKgYm25aK+dBRN1WTSDlFEKSuYlGynVUUBx
27ElooWFTw/PtkVo9qK4tq+u1ZWKibeFFXaVbLx0Dzecu6wDmU9C594+SoP8
+IlOnyMcrLxrKWe1pxE/NtvfuHqejgi3N30rz3NwMcJbaGy4AnqTASLUzQxM
nnznMmcnDdLsqvYnjxnY1nLOyNeSArHfFaaSXBqsDe90apUxMGq1+6JOeT+8
HKv9JhYyIOns++dnviDuVGPnfwH9aEgKu+ftwYT/877Heruo2Dzjq2eEEQWD
3PG3zhQWRjg3ZEs0uuFdqbX3+xoaNDiaY3ECrsNVYypjh1rxVrl0pU0YHYaf
3335VcdG5sD42Hnvanh7ZNUeL2Kg9qzij4/xbMxbKLSo+3IBHhxvIBI3mJB9
bFLQmESDcLmwl+hPJkzXOv5sGO1BVe9InKQbHXu9/xZtlWViRU9S5VbDXjSP
b8oYdWJggUO3TYcyHcqlSibTv/qxWO2lqHghE5uK9xTNy+7HnwPbayS/UDF4
rzto4h4LdPUeX0pYO+Qe6PQ7TtHxQFa2alcRC3E2y74sWt6IQ50a9susmGAu
LVp6OpuFW6esl7Q6l6DH4NjqfXYsNNnSEuq2sVD6PNyG7AqC/Jxf1KK5bGTw
eOqpl+lYpHJHJn43E+KuR4vUuT1YWWRVZvmdjnWbjz2bjqFDNG7DigfrvuGi
k4xZViADik3ZN5dPU0CtWLnnVREV0vpmh4KOM/GvyFxJOr4La9ibHoYL+P3o
Nxi2IoSJqozJc2OSzdg21r8gWY+FZ1nhcyimTLAHVji9fFmFJtrb16UObNwT
cruf9JuBpzKXXE28kxBLPZ3x31oOzr87/5+uOQN/4nI08m++JAYPqj93ZHFQ
nqhUkHSVDqWu+bmPDtBREF8+fNCHgttS7kPtF+ng3oow+HWZioo8kwYXbxpa
x70m63PpGAibsl0X1ov12Tr+3vUMGK2OV5rzj46THgmlRV0tELGxP1hnyYbn
myTvA0V0qG1ND5r9vhqrim6+0U/koCOH82PSlg6TOfVdM9Vew2PBbh1xWy4+
7Yl12T1MwxFK71rLkSfka39l8spPXDgUCptmGdCQaLfH+T23hAwIqw4+WjgA
SacTEz42NKxNOVF0QcDhpMnsh3UcOvbvH1fcwKXimlmHsYlRP55M/EPvBybm
zxvUanpNxczFOkutF3SgzpoX81efg4nSY2XMbYLzv/LkR1Jq4LTHwSLaYgD1
cp7PC2IoaAypTL40owxwFNcaXcXDNeNLmYMbKbixg1brOD8F15cuCNoXxYP2
6LdFKd3fsE98h/zPTXnk4cHscwOZPIzdTeloiOzH6YRx312G5eTzRMkR0s2D
+xR7tp0yBQHuqqUdZn1YpB1VfPMcGxz+db/o6/1Y8q/fX/9YF2IHRAuKHbj4
p/iix29TH67y3c84XK/H77pTI/7PeFCU3IlL1j0oT5KZaLtXhKxXxi8f1Q/i
3NtNEkWRX6EeF/Z90+N0FLeutJw0GsIzVoaRyLouyCarSS+UAgkfmM7MTBlC
ylVhjbYbnXCMX/uvfX8+Gb1te+VFzhAqB//sO/y+HXlFoxg1LCHhPwfrPg4N
Qf/tQrdjal0wbBXS7bD7iuXDm1OiagbgLx36q9C9HbaDF+uCslox16bN/lrG
IPoMnqUNtn7B2mBGS59sOda4zhXR3TwME5UH5S+ftULG4z5vk/s9uK+RjxR7
PIzneR9+dj1sgc/agVS3yTiicfWz4vHKYRi+upfSdKwZnY3aeTTpbMKNk0Mm
dRg5t7oClgc3IenAvXHXA2+IS1bkY7uhYcQEDfkJTdRBZdv5RHZaGWGoTTSW
SvCx3mfYiRFQh1/BqS4N775g1Z+Ql/6vh3CdfRDjCZVwtPMt0Jf8BEX64av7
F/Nh4tvsj4PlCN4kpbOmIh/3ZPdbaOTyMXQ481DSpnLcLNLV9NW/CsqR1/Zl
H/kI3qicKTZRjuSiKyEx1akkR9zO+1UpH1GaF+vc8spxjRHqZpVVTP6I36u4
l8xHp+40bYdoOZQDH60YP/me1FYkXvH146OkwKHzB70Eg1fuPzfKqiSrdt4a
YXnyIYJbC+KK4lHdZbFrXs4HzB+e23c/QmC3b6u2FiOJrAiY6VWZXogz7HLJ
Bgofcw7JrPpyJpf8/rdw1pGkZzhad7NFgctHU3PzI6vz+eSRgciNV89CUT4n
w01kgI9ns8a/Nb/NJcYfowPVl8UTr6l/9q08Ps66f3yrr5RBjudX7rMfyCWr
YkUWn6DzsWw93ZqxKJl4HL7quVb1LeG5zs30bObjDTv8SOj9DGJizJLVmVlK
riQfOL2xho9CuuGnslmV5HFG/BqFjbGQPbE6d1UWH0W9p1T1pT6RZknL4Cjd
u0QiZeOky0U+XjmIlhCjOgLncZ6E9S1iOFqqvMWcL+h3RUsDquuJ8Mq2DFrR
aZzx2V/XtosPK015T6MfDWTxlgcuZZvuk8/HgtZNKfNxbqKJ+jSygWiuSvle
+vmpIE7l/avU+Iijmn4t+FJH0hJ+8c/5ZJIXO6Ujx3T4qLhgPU9pqIGIX6xS
t9yTRtgs40Mn1/DxOqvYd7iqlXTFyY89640ix0OvjUxHDeNVVT+Vp9NG+h/v
/fH5eRJRTA19yrEaxs8dVqFTrm3kxp/F6Q90k8mh2C0h7abDOHhh+9gi8XbS
JXlDZlznGaG/W1rdJ+Ci9KiwmptNO/m6LXYydTqBLA0PNs1TGsZ+LaFz7i7t
pE+O+tT26SNyJ+YpVX/dMLruhsmsFuz75VT99oyPI9EeIowta4dRXcw6pRrS
QSqNzVQNZsYT1p+SyxbfBbyfNRuMy+wmoclPaKtEI4nz5IG6hYsF9cE9pul4
Qg+Z1NuzedvaGOJ4JnqdTe8gXFbrHjir20NU6t7V73uXSN55PqNu+j6IFPvj
ivm93cTwTO/V4PinZKIiuVBDZAhaub5qB7K7icnoz+ZvpxLJsjUra/MWDsGy
StRk/F03yb9V+ozi/4RoX+iQ/Cw+hGUxFkUq9d1k9bT72hWnkoinWqwzb77A
nwNMN3PjHkIPlG/6tTSJ0JND4y8ODSLgwP7Y4/9RiNmQ24LzCCS8YpX3Zg94
+OHidMY6kkL6ShdLm5v7kcybXz4fPMqDpIZN/k13Crmg9znxRXgASd1ypsrB
lYcBQ3441ZRCmpReSPOigsk6+zSmRhAPJTkf+z3kKaTwkFzSlP494uiuMWdN
Cg8+u0cS8qjfiH2VcO9axzDyrsy+Xrmch9zYObtWe34jDz4csraLCSeSMUPN
ZYI6339Y2PjscgoJ/S78q07bl5wUi79bn8rDkRv2ck2naaRxsVCNqrol2Rg1
e/DNxgFMxo90FSbRyEXXychx0ROw/PQ9eHjWAFq9OE+ngmhk+4Og7GqrI2hU
cGP2LB7AwCdbB21XGvG2FvUM9bXCuSK9rzmKA3hIthy7YksjhwyVamwjDuLB
WNWtU1oDuMylJWXq0ohtpustqZ8GSDqx4fYvwwGw1uWPcjbQSJJQ4Mdoijr0
Vwe6ONsMQCrTfv0JNxpZZDJ0ojzKBa9fPh9cum4AqmVH/ZT+0Ml/xClUgesL
6bTDM33/ctBSaOLXu5ZBNCJ/2ntUBUMn9tIi+14OcuskV1RJMoigQrZY+Afi
fGrOsbcCvSF357TQuSk6Offh8AZb6UBsMfBToQvu+WTcX5PSTydxX+uT71GC
UHCOeiZ7ERdncgosvEvoxJhCl33CD8Y+TSOxns1cKN5af8viPp2U+ilIPJEL
RRe/XG/1YS4GzBOWJN+mE4tatlBPTjS2e6qIyB7nYtf6h/8pKTOJ0W2bNhGv
SPDenJ+SnWajJaq0KUePSe4ETSluWBuL7hla20LYbFDn63k8l2US2Yo0sdrZ
CXCU1N3vL8LBBY662hImg2hfUVHd0ZiEIwX6Q/maHDxZO/NDUyKDNNdLRt0K
eA6n8Bv6Ly9zcH+yMGCJGYN8fDSVu04nDQcmGQPPBLpl1osQkXW/6MTXILTW
bUU6GoWrG8pGOGjdH7HZq45O0r+NSxVfzcWteyqlHyS4WKqoL/l7Not0Gcp4
PEQy6n6sa/uizgbFNWR89x8mCdhLS39x/iXU9KV6nmxhYzRh/oK/uUyifv5g
QUzjK/hfE1qs7spG1LupUAtbJjF8WCDlJ12AhmNvJj8WsyGrlap9bppBniUt
mxli/hq9b477d8/gwP928HekMEiQgvocg/dFePy58aG4CQfqMrwR9b0M0uOQ
4XztVjFqbjl8tYvigL3+85PxBQziMHcPXkSVYlb7jrANBRzkW11STAljkUtG
N16qbMvFNb4cxy5BoMet0nl8JxZ52rtlt4VqETg35C8/ymRBZ/P1OSOSLNL/
0lh07qlSnCxg1BfyWCgst9/an8MkQZcTf5roEYgoUnzEt7ExViGeGmzAJDvV
TD7TZ1dAjvuaohHIxtGGEY5YK4OExPpeqJusQJWz8rkkquC9gZV2s6wZZNTZ
3bE1tBKv/E44dwrmw2ufNpQ00ehkm/h07ry31ej6vehzwU0OUsfEZlhQWWSN
wsXro2JvMdxfk66qwIKvU37q8SwWkd8ebzQd9h6FWkEu/Ros3D3QBK//WIQT
I1GtLfUBPyeV1U64spD1z786u5JJbusc/U+O/hGHJ3O1ZlWwcOBixcuqzUxC
mbdrntSmWthsditXVWCjySPv5v1QBmmyW2LmsbAeey0k2miRbFy4nZ63ppFO
rGtW6NYkN0Cz9LVm71IO8oyTlPl8GrkdNKDSMt6MhJ3fM0wEOlPqD8NVToRN
Ro5W3w3cU4n9R8p2fihnojpjm+SityzituFUb0PKR6QlLLq+uokJjfGVrleV
WGR16Ktdm8vqUZzoEXB+Dgs1ko7nhdyYpE5U596yFc0gwzlmUtYsUFS6LSZi
GUSu8wVnWLYVNRqhu/Lfs3DH4bKTYSSdFB0Xe7p17Ase+HYOt+qxoRiNNHMn
GqHoPrhiF9qOMl5TwZVuNiLbQi5P61FJ46YpU45JFwxYK54uFOOgujTLz+cX
i7TkBI5ukf6EaB+NvbuuMJGcud0r8S6LHLzSR/pqGrHmTHJt4C0mlgu5q0pk
Cbi2z1JcktkKzVdGCnaJTATw45Iloxmko9bTcq9iB4TKLz863c2EV+Tfbq3d
dMLWPkFdduYr/h75od+hzkLxzFemV6uppKcoSXb2nx5Eyrka9qewsPfutiVd
qRSisMNx3eO0Xvj2XNrZZ8DGqrpjkn3d38i8saM8+8d9cIhPMWy9yYZrzlLz
udksIrw3ya+lpQnHf8Zf3q7NhPlVr703fjPJh4DemNs7v4DO3bXvtBoTXS+3
Cs9KYxB/b4apWVYX3m6Q+LpwORNFs5W4q37QSLXSPKMFOX1IlFAr0VzKhLzT
spooeSpZ8Gvi67USCpa/k+d47mRiT6eNiFfnN7LmSdaWPAMqTq+xds0tZWLc
5cKfR2395MWs27f14ynYqdo181wcC1JmWyzD/fuI8b9anmsjBayD0gMGdBbU
uuvK0sVYJLs4/ajojS9Y4HvB31uUCYfo6zOHxhlkXXR0sX1EF/Yuk3yW3srA
l9ThyJNUGtG82mfsyv+Gh6yRoNoDDOwIHS63ihP033vOKvRSGgzMEjokBPq5
/8W3Od91+sm0eJV5cRkdRrTT84XXMhDWIl38+mMvWXfZrVbuLh0GpU7PFagM
zOw+dPHIkR7S+coihDVCw7V/8/Mpgn88oGs6dK2mi4wve77dOo2Os322T2yE
WHje+2rri0kGURs08ea6d0HIss5l/1cG3jP50acM6URZ5qRI6/xv+FNk9zxi
HwPVDcvfnXSgkErTAvN3hI5QRorMGwU65E79vJec2kvOXYkVnZXExNWeJarL
ywTvKMIDZ4du8lTzFl90Fgte9+fOOLuKDvX7pmyfn53E9McKh1FZFkaz7UNW
1tKR5ebHKzNoJzIORj7BU0yU+BYpbcphYH5iE31Qu5VMv3mYK3OPhVTjzQsd
GxjIZbkNpZylkfwsZns5viCAGx0gZcOBconYsG02hTi2ZNWLSNMxpOey6H0o
Hentaz8PXu8hStyUJZX5LIhIXndKYFBR9lrP88JoJ4l8b2O/jc7GFquBda3x
VDx0HzJ+eKGNPOY3dcyK58CnfYf4+1Iq9iSPlUf9aCYjCmLtaSwOdHbdnVei
TQM75GCg88lGkuiUvbjsDAf1XX4anXZ0/BELSevTrCdvvb1FakfZYIcuFrJe
ykAn4++qRV59ZPqwp93rDQz43PhUJDKDgYcBp9wNGttJ4ULjWm1hLphXtB5l
CfJ3vj99eqFiC8Hf7W4jBwVzibFu1XUJCk44mpAbCnXE1CNnI3NgANuWTyeI
zqGAITGck+BZTcQzGR8q0wYwQyv9+1g/BRpvstSWqn4kK7VnKIiqc1HLd78R
9IOGYydC2sfbPxG1Q/MrTTPZOOYaPvL9CQN6s0PSOTXd5PSmI/WqwVSI+axv
PKvGhtbt0lh9uQYyPjLzrpEBDxsX3DaQPduPXYE/FzZuriKc51sv81UHofOP
PX3mUy9Uz/Wc10h6RzgM8+Hd6wfhEGTGH7/fh3VHhnuMl74jv1/reOkq8xBC
8MEllAKzO9deyptXkftaO91/vOHA0eb8l+3v6ABteEqUVkOq/6gmOvkI6qmy
WIfHCBNpU6IPK42ek6mN3nXbBfyO+4yoph7iwe9MXpXmlmLyjJdvtaB4EI0a
k3Mznvfg6XnnFbIb0kjWUxWDvUuGkHDuDjf8bjfej62bGb3iMXF9cneaHTuI
Naa0BuOMXgRL9ZAnrlkkr+zgZ5lPA1Bwv5Zz7QIVGc6zWeHShMDRdamTOxsh
z/eHWTkzoVzr/fHx3GriE+VvsjqZgf29PT6LGWxEnInfGvw7H/9Orx/RWzyI
+59Iy7yD/XBZ7BiooliIYLpe2gNjgQ5fGPendc9X+CapRHWW5WB+tYetheQg
lK3N2yi+/eh0e9womeBL5O12LD++mItvZpV/N/YLeDS8RMl7UkIqVxedbBDw
XBQiLzYoIchHtVMtlb8/EPFWBeaUBBV34v2a54QPwLLzfLYqpQNz3eNPWjix
cHTOo79u1XTocO7baf9oQJh++YCUYI6v6Jr1OmK6B7dVmm6qVVbidtfnts8b
uSisuVvfqEbHiMOLCeHfUXhNjx4L/sBAzw9nqTFLDtQ0Wz9ZtZaSCo2U6+vP
fkNvwIMz5hk8mKhv7Olh1ZCBwL2Xi7kdcKw0E7q1dwi9c+Le7HCgoTFHz/hm
by9mSzipTn9jwpS0F4WTFtgHfZNtCOJA9rD2kiOBNDwSPuRi5FGBlZ7ZT1+0
0PF+rnn74zIOFgrPmk69k0j+2v/RVPjbC22bC9Mv/AbhZbtvq077B6JtT+9e
oNGGVe5LZv83MIQPIhdlw6QbSVxMm0P8aD3W6CTkJh8dxv+gtNYN
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{432.8136637630714, 389.9404421995727},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 14.}, {-56.46256865491101, 
   16.570909988178723`}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{2.0498181098743964`, -1.1645485725474896`, 2.4273591284786273`},
  
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.759344804098008*^9, 3.759618641414569*^9, 
  3.759619420592471*^9, 3.759620128637534*^9, 3.75962398316847*^9},
 CellLabel->
  "Out[131]=",ExpressionUUID->"5c9c1c67-179e-4df1-ad40-f94c9b596b22"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxd2HlcTOsfB/CjjRZ1hNtR4qijTjpKJa2mb4uZlqmmVaX8KhVFRC6udJVd
UUSU7UoYsqvURRrcW8jWlRItrn0vubbWX69XM+PlO//MfN/zvJ7zOc/rec5z
zhkXvcA/VoEgCJ1BBKFIyD7tTrJfCTpflmieq61EDopKfRPU5tc6/ewkdBAZ
91u2v0ROgcjLotxgTAdyGvw357ilmnxFzoB19dN9+Y86kbPQkHcuM6exBzkH
+lSy5dOuPvnxZPnFzVmvCbfvlcjBdYwLe8ijC7Un4bpI8CnhxTD42Sl4r7Ty
7INQPeQ0pEv2eJsnjkPOgM7CML1xZgxyFiYK3+7UjzdCzoGaz+Fbm/uMpbXs
f4JojVA6XG+tJEEOusTyHdV56qg9CTVPfmusf0YjpyA706wtbqkJchqaVcHf
ZNQk5AzUKBd/t8+1RM6CVudtn9y8ycg5MDw4RPu48hRpLeuPIP69zLlbh6pI
kEOnRkbTNQMd1J7s/+a/GX/RBDkFdRkWWVk9lshpUMtqUssptUHOwMvGW1cM
HB2Qs6DyXZgzfhgPOQfsxLITV5VAWlvL8z8QNjzqXxgS5LAzWn+nrroBak/C
9IlPk+geC+QUXI/t/Zxyyw45DSdKphr9dtgJOQMZNzS9tii6IGchly8oLbng
ipwDl7H/HjZ45yat7eX5D3du850WUueEHIrsr33bqGiK2pOQGOFz1HesLXIK
orVXmFQdAOQ0KHY7pyk8ckXOgMduriA0gI+chQNrXztWgTtyDiSrdZxW5XlI
a9l4EEQ+a3ckQGM4dojLPbVEZ50VchLs/cWxo3lOyCnY4WzhEjPbDTkNh7um
nPU5J0DOwJZu44mXojyRs1BltPG94WIhcg6K/dSiJ771ltYu8vy7K3hJJ/KN
sYND5B8FXfH2yEkQpbjFFExyRU7BxeLgfbefCpDTcNPS9pC6rRdyBpbmnc3s
U/VBzoJQ5WhU4GgRcg4qbaxtdz+XeppsnAji6NK/yY4kK+wQ3milMn8LICdh
xVM/k9plfOT9839KrtjjmSdyGiILq+sdHXyQMzD0i7P55O04DwvKqg8SQsr8
kHOQe22CG5HlL61l40QQIytYU6Nge+ywpaxksEuZK3ISmsd+0hOFeSCnQO2q
pmlhmDdyGu6OWalVESxCzkDT6t8MHf/xQ85C0uwL3UwPzsnB4MxqlTEtAdLz
kh2fIBzVgr8WCgE7jPn31CnjxXzkJFxtu2hRluOFnIJr3nk156b6IqfBfNnx
ewoCP+QMhK1tWm78tz9yFrpj12ot/YpzcvAq4zX7/FGgtJatD4KY9aH77mQ/
V+zwJo2yCatzR05CeAtv0vZB3sgpaBHpAGkiQk7DfvVPveXX/JAzMHvEsxPv
hQHIWZjVqpnGz8c5Odg2s6BIlBMkPS/ZuiGI64NaPjYM4WMHbtDjilENnshJ
uP05JCp9pA9yCrRFxSNbF4mQ02BsNepcX6MfcgYUTaP2VPACkLMQta2uISMv
EDkHk0bbiHiXZfll49R/X3e0Z6g/6Y4dPCXZf813FyInwVuTHfbqlQ9yCiy2
Gjve3SVC3n//s673u7HEDzkDDrv4yQ1P/ZGzQEbV6x5TCkTOwVoiL9uDluaX
9df/0TK51elp5IEdRqgnftPcIUROQqvvmZn6c32RU9A0L3ySzX4RchpS1w8e
o7nGDzkDfK3H2g6z/ZGzANl/j1ztEYCcg8UnsmHRBNm8ks07ghh+69B2usoD
O7wNrx3TM0GInITeRctePU/0QU6BoXZnxWgnEXIafo8qeXhR1w85A+EKD85H
12Bn4X26+TwmyR85Bw595YeaR0hrkJ0HQXTqdM1/P8QTO0yJHhtemO6FnITH
raTn8XYh8v7995nzaQjyQU7D99ULH3InfZEzsPNukWH9ChFyFvaU7IrLl52v
3Dm4b/DpXuZJ2TwMkuevjiu4u77PAzss/TUuPmW/J3ISKoq/qFiBF3IKQqcU
Vna1YKch/s6izjGpQuQMhGyqEz/R9UbOgur7luCN5dg5mGLbTvsHS8dHEizP
//ANXXq82AM7OOS5rni3CTsJl5MUOnpjsVOge/LThhoedho0iW+KdjrYGQj9
z2zyxDZ35CzYX6g6s6kKOwcxcwZl2e+VXc9D5Pm95hMhX009sMMdSW0qKcTt
SQhKUkg3ihcgp2BzB611ZRUfOQ3vfuUbzcqbhpyBqS9mUWlH3ZCzQJyf/uvy
UlfkHHRuOHYzo8xloIZQeX5bVU96T6I7dvgldYHqlSd85CRkv/lk+Nh3GnIK
9BcIhiQUuiKn4fVXu2ZJlTNyBqrGi/8MXOKEnIWNbX+5Fik5IOdA4/Ol5IP2
0uevtDB5fssnB3xHpwqww2IHVXGY5zTkJLjkRC8uuOGCvH//3Wm0fkm3E3Ia
0hQ2j1RpsEPOwMkLx7wazayQs3Cmdrh5lA6LvP/5K9wisfC29LlbMkOeP3g/
79PeID52mDa35uxqF1fkJMxI6j2vl+6EnIKVkXtnrfzTBjkNCYOeVaqsM0PO
wP3upOnvzlPIWVgb+2btWLG65GfnQPTuyFzTKaYDTkTI8x8Qmp7b91A2D+UO
x65ZtLm9A+QkFCuaDRW22SKnIK4uYdA6nhlyGnqU9h2o0ddGzsB2rZL0xC+6
KA8LNyY7q4/Ks0TOQYTP5Pikj7wBh5ny/G21guoQWjZv5Q7zwtQvmNU6Iidh
1/IV1mc4S+QU3C0Kv6Kkp4uchjfWgfGddTrouAy0hw/u+Ie2Qs5Cxkrtay/n
AnIOPMbnqOYsFwx42v/k+ReOVS4Q20rX1w+HZgM3vW/5NshJSO81yxE0GiGn
YFXNVWdl657Kn73/+ll6OvFSgzk6LgNFWwVb68U85Cx4vhfbso/4yDno7c7R
2GTuM+CRkfL8/Jjll65GSd9X/HA4Yvlf1/MAS+QkLJs3TD0nYjhyCk4oNUYo
pxqi/mkwyNXI2GBgh5yBXzRsjXoi3ZCzcCjc6CDT5IWcg/Zs5+ycWL8BJ6Lk
+SMypt0oY2XPX3IHs8HlSaE2E5CTUGRwKbD+y5fKn52CpUcu9e8AFqj//utn
TKlo/EpAzsAfVhHh8cPdkbNwc+6ZovRffJFzEB03ckFwmf+A7/+RX0/c9CLx
kfQ9yw8Hr/Jde/JG0chJkAim294boY/6oUBvQfJTgbMNchqEw8TTu8AVOQPX
DQ7ODgryRM7CR+U5LaVRIuQctO7wvHvKKmDAIVqeH8RtdUuype+jfjjYpWSF
tOurISdB7HTcu+cMi/qhYFfE1tOf1zggp+Fb0O9a3x64IWfg8Ga3GY2BXshZ
KF3CL/FaJ0LOQYLCo9baVun4P/6RM6HdzJWp/lj5s5Pgs6qoQqneHLWnYPe4
2KtZT6Yip2HDtv1jD8ZMQ87AwbwL8z9QXshZKL9Xv5Z3xxc5B2ozXxwzF0vn
edosec75rH8Pb7g2chLI9c/zrT9YIKfAXNk9Li6Zh5wGv5o8k+/VbsgZ+HCs
fvK8BA/kLCzK1x3q8lyInIONzSk3d3tI89Mx8pzLEppbvcS6yEnoCNi7p2yG
JfL+dec88smc647IaVhw2WBdyh0X5Ax0N9fmDrbiI2dh4aVh6hqr3ZFzkLfT
oM1ZSzrPJT/ylKx5d//hiUnIKTjYt/ikzVFb5DT4T+qIMe/gIe/fB6+fnJq8
0xk5C394rshcTrgi52BT9qvchR+kHhkrz/MyRb++JMUEOQXkyuI1q75YIKch
NzFYT7DCGjkDyautU3mXbZCzYJpSRpcL7JBzIAmbozze2X7AiTh5nqWxmalH
L45CTsFQxVAJKRiHnIa3MyxKnNsNkTMw/LXnvszT45GzUFD2UkO3yQg5B8ll
f0aWFRpL/g85vDW/
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJxNmHlUlVUUxd8DBJmRMaUkJ8g0KZxF0zQhFdTIHCESFRRnJTXFnCsxR1RU
UjQ0UlJKzRHFARxzSEnLBHMkB6REzQnrnMXvW35/7HXvPWefvfe9j8diUStu
ZNQIG4vFUmy1WGxldRF4C1wtlWftOYFqAk+BI3UrHO05s9rQt6Vmh1YVtF3Y
28F3NOl6MeMMzw6uztvD96RfQ+DPjIPATeDO3p6zN5yX0fOiVhWeO/Cgpj4+
zHqSqzr76ngqaglqw3fDz4ez6gcIagoCma2Btzt8XzLVEdQlo7eJo30/4EHN
mxn1eYm6HznqC17Hpzr5atDzZ+YVdGvj60+tJnUv3sgZXV96yqnHvg4Z/OHU
5K4BZPKjX5e5V6kHkO8tQQgZapG7Hty65PTljZTfAM/anI330npDZgPJoefG
giaCtoIwQbjgNXIEkSOQfRD1ADK1FLTCpz5Z38CjIftGzIfg1YA8RpZ68ALJ
ESpojWYIfGOmDhkC0VVeB8G75HhH0F4QzB2C8GmCRwgZNXdTakavKZrBrM3g
tyJ3Y7QaUAulFmSaa8pcIz4fHz7bUHwak09zdkKnJecm3Ec1WgjeFDQXtKFm
9Nrg0Z67h3L/LoII+m+bOOrTGa/28JvDacu+Gefm+Aaj3Rp+MBztd8RDPduR
tS0e7wui6HdEszPZOuDfmX0XNDowr9ww9i1MXmH0WsNvwz0/EPQQ+Mkv1GoC
X2vlz247NN5jH06mPoK++HciayQeEayR+EWh3wV+FHvtd7W8+J6Ece6GXzhz
EfDDTf0I8kay9hNEC7oz241aDzSiyKi5PzTNRXLuyn36mfh92Wu/p8m7K2f1
GyAYiFY03G70e4Hu1FSvvyBOMEbwqWCiIFEwRDAaTh94MegZujHoxuHbD34c
e+1/ZPLuyVnzDRUMYy4a/seC3oJY0Ju5aGZiyDaavL25Sy88+5M7Aa1YZgbh
m4jvAPiJ7LUfDyeWNZ58YwVJzA2EH0s/AZ0haA1kRvUGkyGBcwx9/f7p7y79
zg2npzMpgoWCRdxtLJ6JnIfCH2Hyjues+SYJkpkbBj+B/kgwmNoY3lA/71HU
ta+f/TTBdMEn+CWhl8R5OD3VncD8eDQn4q/9cSbvEZw13wzBTPImwR9JfzwY
RS2JGdWbzJpMvtm82UTuMY39JDT1d4nxvR9E7ng40+Gp5mcm73GcNd8cwVfk
TYY/nv4UMIFaMjOqN5X6FM6zmJlOxtnUJjOTgtcM0z3HwU+hnsLcQnRV73Py
pQoWozET/hT6X4Cp1GYyo/5fUte+/swtF6zAdwb3nQvXmJmL7izWz5hNxT+F
8xy48+DNx0+90gQLqKWibbz1YuYWwJ9PpjWCb9inM7cE7mJ058FfxDsth7OU
3lzOuv9ZcFZQCH8FmisFq5jJECwjbzo+qXgspa61r9HVfOsFG9BbTu4V9NLh
rWR+PlmWUluC1jLun8Zcpsk/HU4ac5p1reB7wTp6a9FLo59BPZOe5vtRsBn9
NeRex9xa9t8yr/xs5rMEq9FcCU8531HPQnMD/Ey805lZhe5q7plBjp2CXXhn
c58cdLPQW0/ujfgad96IZhbrJvib0cpGN5PaFmoZprmNzOn5vOC04JTgBzLk
wNvEfjNZNPd2eDlk2oreT6zm8ybuuZscO5jdTn+bibNfcACvXfAPCnKZz4G7
jfm9gjx6W+Fv5ZzLPhcf1T0qOIb2Tvz20M9Fa4cp2x68djG/m/WgKY+RZQ95
9LwPnTx62+ht4b2y8VOdfMEJQYGl8jtagFY+nHzOmvsXwRnOBWhq/ThaBzgf
pJbPPg/uITj7eYsCanvhHifDEe5wGOxDIw/+Ye5hvHcBdzhEvt8FF8hy1JT7
LB7HOB9n7qRJV/f6c3iaHKfAEVOeQ/DyTW92lr1q6t9Gxt81WivE56ngicBq
rcz3B3NnyKi5f4VbSP0CHK2fM+U7ybkQnYushfBPMKO837jPefoX6Z1CQ+v3
BI8F5YJLzJyHe01QRJYr+BShYWgVoaVrsUn3HOc/0VTtEs6X4BSzV+2bgluC
q6Y7XeBtLlO7SqYr7JVzm7l/BKWCu4IbguusxWS7zv4WM1fxLob3F9lK6F8z
+d1h/hq9O2S4ZdK5wexNsmivDN0S5ovQ+E9gr/+8slbqXGauBJ27+NzD6zaa
ev4bzTLO5XBKmDPqyn8keMhMGe9zHX4pazm1UrxLqd3n/S9z11Jq6qF/A+jf
GvPQfYBPGX09/4vvQ+ZUU78DFfSMutaeggfUHvNG+j6P4ZTzRo+4m/b0+/QE
/iNm7qNj5FDdZ/jqaiszdoLn1CrIor3nZKtgTvVtBO4Cb4GPtdLnJl7aU71n
cPUzdSCzxfribjZwHuDzEL6FmXvk17kqZNOMrgJPgRc+VQWOrDZ4OVkrZ+w4
uzBnz96Bni2zbsy70nPlbIum7p3RdDL5uaHjSL3C9JYezDjxmTig5cjbOZm8
3fH04uxB353/PThT86bvxdmd93enrn39DFy4qy/zHui78HYu8Dzp+cD9HzJH
qJQ=
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0DE0QgEABdCPSKelTyWbv9XGxlZbTdSUrZq0KFs2Nm1sbNnYasvGlo2N
jS2bzSa3cwz3vOUN77yo1akdLwRBsM88F1kixjIrxFklRY4t8myzS5EyB9Rp
cESXHmdccMk1A+4YMuaRCS+88cGUb374nW8xLknIBlkypFlnjZneF5+888oz
Tzww4p5bbriizzmnnNCmySFVKpTYY4cCEZuEJP5/+wMtSyH2
      "],
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwVmHk4VO8bxi2FJEpIdqWVFl8RWW6pUKnskqiUVrJHUSlEWlCKUkpZitJC
SBFZylpmDGPGMmY/Q0UoLfI7v7/mus71Xu+8732e537uz9H1DXT2kxATE5sn
LiYmSf4e/8Th7HtMwFOw3XC5Ax/Jc15VPrnKRIXuaeOyUgKrqutacg7wcUM4
r60wkYmefcL1UzUE/k3EyHmd5CNvRZVveiwTHm4B4beaCVCuz9X9m0Q+V10V
t/EsE1lXv7uupxJ4VJfnKHuLj8V3rWUoUUwE+Teb99IJFBWMX3B/yEenfe+p
rSeZsPGtrzzUS8ApqartSSEf5+Oapa0jmGCP5bFyWAQsjtXI3nvBR9bBZ8+b
wpnIv3KhueYigQOT+3aqKfIh52FkKrrDxJZfxxDXTeBrh/GSizl8LLkqZSdG
7v/Ibu5onYYI9z8MNYjrCHCQ4ImX72Li6GjmKz13EXw2LQrxuCjAgti8cLY1
E7xsq7fPYkWw2952faxHAHXlgqd7DZgw/FtD1coVoddoRpi7mhBLd5q9dtZk
Ypx184RRtQg2flK28g5CzK+M0Nadw8R/P+QtT1FF2OLrujwkUIgfvHMaoTJM
BFKCHtWEEFh7f89iloCHaza0c5vySX2uXovukxTh7ZWx8i3f+aji5tp+9WOi
Xzd4q+lpEZpqa7YrtwswvSJUecsqJtRFfre38URQW5xoYJAiRHXODnd/MSYy
G/P26vwTIbGGfe/ONyFe/tBecy6LgQ/ezikl30Q4UF7GeaRCYN39hR+nGTHQ
0IyD07nk86tHpjmYEGCLF1z5yuxGidNS3yqmCB+bk3NeORA4Ki5Za5HVjfUb
V67a6E9gYuxT6ziTh53Js7INC5hoL9OZvGIhQsD5k827dwnAWlU977ADE9P3
3LVPEYqQYe5xc+lNIbZWqceM/WNgRnSmrMcXEcxje0NnaxI4E/Xl9n5dBs4a
6d8abReB23HezOwQgcmaw43Wbt24M1EqcbqSPE+YTkF2FoGwJebFb97SEb6u
9KfcUxFuzpArW0jWoybr9YO1NnQona4+dTeb3F8qKkBNRMBc0k3i71AXfrpt
WB1zlsBeYfXgpikemLeeRiRm///93tRYcUmE3xVTlSUiAZ499nYVX8aE1jza
/iWjIrSZPDzpPItAeOD31nIHBgxYBaqt9SKcuKQRpZ1IIDHsyrwXv+kIYycf
7nkows6E/OLpXAKW/yUuez3ZBd8tqsNjwwS6NjgHXLlBQO5s8dqAzE54fmNN
qmwlEHCqRDcTBHxiVhbxj9Bwf7/FS2+6EMckAiaXTiPg7Ln+RdrNDswyidhJ
KSPwI3lL1pODfJiKVzoakH3aueLOtnkTIkhnNwYWvBTCpIKZ8+MnAyWL9Pqu
fBLhcJ2nZFkAAbEpz+O+G7qhOxH+XBAugrNl1MxgBoG4EZ9vjild0NvnJb6V
PMej0Fq7M2YEaDJWXH1XGhoCjVSmHIXIsB5eOa1KCD3NHCPzu1SkOx5iyKUL
YPf5i0+BtxAN9S8dym0puJsX/tRFSgC3GAeGQJl872ViKRJD7eCrixtVLhQh
TfxrQquBAHo5/91O82DCP0g9zUokwo2Dsw1DFhHoL26d5yRL6uwVu3Bdnggp
FK/rd0mfiNK7yPFSoCPpxUNivyyBEIPVr5W0CJyf25n9+nsHVBOPGZs3C6CW
p7SmJFKIvY1etp15FGxaF1W6KpWPH3bbEv4NCPBkU6bnle8UFO5QqgjczcPy
VOVL+p4C7Nmx/3BSHg2uc0buaJ/nopqactx/go8Tb9x0O5O7YJcktT23TQTl
a+esrh8U4k9hqeJ9WSb4N6reW78XwUoi+mdFKoEhrumwFYsOWbk/cv+vt+Bk
9r7aXQS8/wU3BjXRkOXypES5QgD9qcCydtIfDq017rZOoED9wxbbICU+VI07
9EsLBPikN/JFT7YDf6PTClYGcWFjojnz5DAfWuHFGnLlXejvHun8vZwD1W75
ZK+9fETyH/wTpjCwOm/QOM+ajXBVd/vYCR4yv7jIqGf14HutguNrUueUkZre
RXoEDEYVWZxZDNQrz/FvjxYhe9dveak+sk7yz9XJ3SX358xPZNkIUWfkhOJS
IXxm/jY1i6UiJkiWbbiJj6Z7y044VQvw8UDI0b47VEh4Kf2Lc+HilF+yYz2H
j1PH299unuhCboFm2LF7bJhdzv9wfgEfk/lHdhQ3MhHDslH+qzeAIHuxXMsY
HrQcMhMGdVjIvvZ2ek9HP1Yt9Y+pmuRCeHbM5k0oGyteclnFpM7uNx5siE0h
YLuRM5rBoYNysWN+HelTQYRe1Elrcp6cvqA66U/Ddcp07cTlAqQ3uJqMLhLC
rl/9Ru/tdnhr0yZtOrkoGD5T/kpTgL4jYZ9sqJ14sbfs7m8+G18DPSTNbPjw
telycSJ9YLXQ83XaJAsbfA83cQN5UJHY4XH8GAsGbdr62sl9cPxPQm1FBblf
kQftVT4HO6cF2DT8YeL8o5jNhw254Hwp3KExj49n/JW23jdF+Bsx/sFmkMDb
LTu01Fu6IM04t+XBRiGO60o63CkToj9u6En4BSref4q8+aifB73l/n7O1wXw
TI/XDIrpwL/R5lr5Sg6UYyPez8vmw2SfxqzYzd04GpC04VbjADYtLvBNrOOh
7nmxiz21F9WuxVlrjfrRoZI1bNLDxWmHopxkOQ74Sj/so18w4Vxyfe+ULhdy
Dy4He3rzUVBlGyau1I19K6XP6aRzQFv7yd+1U4iiJyWeZqEEZjeKRg66EogJ
bx2nFtNA3dMUH7hHgKs+Ccrd1kKYtlyzsWO143b8yTg1WR62jRjOebZGgBT+
fM6cPZ3YuK4se4kGB1luti8aPck8UJA5Y+FLBoSqocvjZw7AWr/vv6fhPBSt
r7yi6MRCkcP8mi25vWB2bjN9cpEL8arq0qY4LkLNKqav7+qGDG/R/fvvOFj7
a5rotaYQ0l8WL98z2Yknu1yxbikHo6bJ3M+kD7aLb/qtGCAk6yfwZUqLEJar
Z1iMfqbCeeDajH4yD6mdjXEtryXrIUZ+6vElKkzHQ3qjjnDROV6vde4LH6vX
DforfOiC9mLDPrMGNj5uSN34yoiP+7L5Za9DSB84NbJozXcW0s3oJw2O8bCn
dCUxEsNCmfPea/1tvVD/xbFzuMbFhIfI8pQ3F7t2+Yof6u4Gve7kK8VqDn4O
HRa9UBdCU/VlBS20E8yrj9+8nMnBjXlLqhhOg/h+T2XXjscClF72SNQ5JMRg
edqzXYcpIM5Ozhog9YrqChwPPiCArYJgV1wADYtXcdr8v3Jw4fbknolSPoqs
ln3pZdBhwg5IfJ3ORvlkRst8bT4O5kYd+c4g60DfslVRdQBpnl5H2Kd4+OlA
ee5mxoLD5ZAQu+4+ODdkTk9u5KJusVNyxj4OqvXfqTYlMWGyujthYj4XLZvs
r347x4dt57Q5KVvpEAjjLl4O4KBUy3Y9/ToBQ7XI8KvWAlhz+8foq4XIioo0
OpjfjqKpRIsX9jx49CRlHXMUQNpDpaOJQoNGnbNe9gMOhlnNF/fd4GN3oUxK
VVw3bu2VjgxMZcP8evgWRw0+qJsC/8gSTJz9NGvhoqABeNYNSPjf4+Gj+u6e
m4v6Efrd39lqIQs3uEZ7HJV5uL/b8oKDDBtaqd1i25/1oiDtiujdJS4Mfo8b
u0Rx8Xa7uLSiBhN9sWFq4pJcqG+wdssS8SGV+CSjfpCPNB1HLJQVYvElK8qF
JRRI3DvWMi2BrHMblSOy/gK8z1y1Wc2OhvE3t5KlTbgQe5taVdzJh31h/M99
6+h4k6/yX7QEB6nXCy8c2c5H4gJ/l8JBBtpbX/ObJNiYClz9cX4vDxa8evmq
pb0oct+2NEt6gMyBpe/kw3jgGY89DN3JQtjBHKxSYcFcgxXOU+ChWllh8T8d
NpKOu5+9tbkPs94POtUUcnGiTN8wmOBg6HiqBKeOj3jW13bBhACafl/vPT1D
QYJL/KlbBA+ffC+vqCDn+TObzV5Lj3bAuWcTbWQuDwfd+mNnmgkQUfk9RHJz
J57P3WW2dyMX9A7RNoVePurHFqWtU6PjxFZRXXoUB1efGA4pxZFcsJC51aKn
G+cC/Fj3KtgQ86ucn7qSj4nuJIuKy0xsk3dcMUbeV1JAVTQg76vp53R5H3nf
7EvGkgOGA/BLCldMj+dhjc/sWxdlWFjBv7zTq4mPEL8BX9c/ArR+UdU4FkJB
6fpohwJ/PvpkvDZ/InNy5JRd26GNVDDYsqtfKPBx1Xr8ZeYjcn3PoPVHpQ4s
0ClcuKGYB/dpg29zzwrg35ghNcLpwPanQn9jDx7OeLZGMNwFaC834ax/SUNk
6iG3PX+48FPh0JesFOBs4y9llZhOZH2J17p9j4vImqcl0dMFULylFl63rQuu
yqazajZwESutX/exh4+nN9e73FOnQycp+0jsDz5kNeu6ePJC8P2T6kMVKBCZ
yCopzhLAXSVVxFUVQk4hyprX045l/pXabxYKEFOmXfRtgRDyWy5nqhe048KL
+nzntQIIvtdozjYQovJZkOqBm+2oHq12sbAVYPhTj0OTkRABd6pNel60o/vi
qlcubgIc+Qn9O+ZCbPwrk/CotR1vbCa0H5J+MZzJU7y0QYgmGTeFHqIdZyJc
oozDBDjdoFlwZ6sQUlMzeUlSFPDqjRcesxLAnkjZVbmK5I6va2VPPGyHevrW
guZrAmyeGJgM9xJCLdxHim1FgdBwa/N2oQBWI/HG9QlCzC44sdWvhwJqy83T
uhBid4n99vclQgxP2/PUOZqKps+R/0LThfAuWWB3gS3EjZ690pLaHfC+4rP6
1IgQ+UtSJQzmENCpuzVIq+vAi5k7PgZuI+BQVhVEIef+lgVfXM2O0+AhEUTV
fUrgY7dV5GGStxpo0+POaHUiQvtQwJILZH/qLFAhXIWIXKQuyCD711Epfs4Y
yXWHR3ftlnwgxH7v2rXPzKhoiRYL+kDm6X+XAhWfDQtRscXi+k6nDjgE5562
IuffvfbAUM+NBNx7Cn1rT9FQONc1pl+a5IUlh2wDskluunx478P6TphK9XWM
5oigG/JBY84AAWFzTitzOh1a577/rKoSoc/2lMAsk0BGdqiPegMdbTAdTmKI
0Mj1Vv+xgwDx2GzD5hvdqK0p1G9kkRyYrHKsP5bUyVzdMamNAkZHjXoPqWPa
Rm/lWlKnAynzqle4deB8ooTDcC7J3cyf1kXHSe40OBpoNacTZtnnHAmSj6rs
9OdtI0iezpW3MPzWBdEyp4obJNek0OoPviK55kDq1GGlX3T89VH4bjpErm/W
0pinQ6CmsHCdwnwG5k5Vx2V2iKChZL0hPliIzw/+MYalyTmoZJy+huTu21Z3
qya0BGjytZL4RXJ3+3jzAT2SI9wzbHqvVZL1MCCx51EmFTnHBsvfRxL4rpi/
d5MHgTd31r2TqqLB6I6D3StSt29d4dEVpG6jcW+vzZhGhw1Fqq2H5ERTF/OR
EyQnPn31l3fTtRsqQlOnPxKDeHP054IIsn5SZbbZv3jPAF/840tzW/I8w6Ln
uqQ/F7WFBsnZM5EdYnFw+W6Su5x/xRys4mFsufy1YDIPdewOLU8yE4L19LR3
8Q4Ool9Xuix434UF9uEnfvaR+WaGT2qaNAHTWLt1lQ860HMqzsd4F8lTvg0q
81oI3A6LuO/g3YX5DgMvOptE+JLCyo86ReDmmfBvFjrdMJuVTmmSHMR8z3l2
m1hCiIfM5L35yMBxzQ0LlLVInRXe/j26QID/2l5m65C6iYkfdW+dEmLTyY5h
7z//zyNnR4ZuMFBslZIcReaBaCO7qFFVNrbTN89cW0KDhXLFo81BfGzXvx20
ILkXbVIrqHdq2kC1vPH3QTyBxp4h3xFvAi3HRgOraDTkta+au71EBJOU3evP
knwpo9LusjmSjjjTJMe530metfo3ZTmbwGLZE5rPNjLw8vSXlTe2i7BE5+54
eJQADe7KfzZvZKJE/1zeIRUC4o0J17QNePB+fkcrWMgAFhyRVLgtwPN8aZWi
nwO4LekgJYwi88ld9RAmmbNhO1abdbYHC/UWFsnnt4B7ZVqlFJ0LgTN7+ivp
TlyA6Ps3Vi2mlfcb+1uKsKhGLs+gkgB/Poptl3ahWvtBy3WKCHH6AaEJfgQ6
ggspIs9ulA4+2hZP1nNm7uVYipsQ6/6aDL6RJ3l/f8exhlgCmt8CGVrSfGiv
K3+feY8Je3v7qMIfJAc+ib4Q+o4N7RXX+8XaOrFIJjZrWQQf5wq/NZuW98Lw
vaqlxtxPqHZaPn73N5fMM2q5iuGdMOl3Gbw1VovTsvVzLhBs3H/IvCtuQoHd
MkULzc5asONiZpkVilA7YFWk8plApBhNNWMNHWE1UzWrRkRIFB9YnKdIgMdw
nqVgxUBYwODhgkUiCJxeSXusFuDt5sj4UncmRv3fTio8JvPHOt0BG2sungav
TdlA3le0lUEz+MPHbP5kfMZBFmZndZyRyqAgNfyypVkcD9nrZ89ctJSOjyOW
76g2dYjoUKx4xOWAnVVmZi1FxdA6weeb7rW4vfcqXZXZB8ta11wtXSq8700v
ou7+gDW5AylvakV4tV/f/vUVAumaZ3fYDtLhMkdtweGvIuT5/GKy7wsxLfPM
mPNfBnbydv4EuS5sRd7vWFU+DrhGZnhkMtGSfcT4M02AcBy8fT2SjdWmD8pm
uXfiGy168wbwYZnOC194tAcB2iZPQ6Jb0Nez41ZPKRfXXN2edmfRYKrlH6fc
VgtFvR6tgXVs2JRWucoeoMDaL9q350IdAjTVb0f0MuDy7eTt2nwqropXnGra
14h7tg0pxT0iyLsdrNPcQuCRp73h3lySH7qq7qaFivCvm0f1fSdA0FC4abYR
ExE9em7nSN9nGapW+TC4kKxYWaHkw4CXWOxDnaUCSGjNvDY0RHKhRZ5k5AMq
jK0pGofe8DD/Ql2Skns3Dve5VDnua0De2YzX4WZcNO8reuet2IEPHkGdzRdq
IZtRuvbyDxaYYmnFCa8pcGl49kH1Uz1kvIZ+ePp1o+zO1mC3birM7vyiaeg0
wXSOLvvhuAgbxP1mpUsR8HV61269hwExs9bkvVMETI4pXppJ5tQHszcrjB1i
YqjrbCDLm/Rln2B5pSwO5Pc8Mv9oS4ehY5/R0vd8rI87nuMf2Y+l7wcqZ9u2
Y7GYyenVR0neXMSWpdHIvhp6Iya9pg4OQ4GLp0mQ3HXiauuc/VQ827Rrkd2h
WtxVPEOsfcfCtfPN5pofKZhmIJ0xT7oB9k1rkqfvZyDIweczv4yKKPsS/ep7
jbANL/undYNAFh0BPxfzkaL8yrYlnYk5Ksp+dWTfKe6R3PiY7LtfSmpUL7Lv
ToQaSqdf5ONoi++mXYv70FgX8OTql0/482W8b2ArD/XPa65InOiCw04L/5YF
dfD+Y3humgIXGuqjKisuU0G5fMS88Hgt7KpL3q56NoCxI/FpPYkUjH0NtrFQ
qgf7jcuMh0p9SPmPlWBrToVvwpt91jUf8HDsW+lPEHgnIWPygcyfEwkfxgxi
mJgcWvEp960AWkcHKrbYsBERtdVr5W8a3u9uSVCI5qPk5I/aM7RelKc1lhhs
+4Syl15prAAeZi9d9ef0QBcKiygvtE3qMMcppeq4PxfPa/NGLhR3IDqazqp/
WIua1Nki3UIOkkIPufs4kn2bMDbJNq6FDTHebqHExpMhqXaz42Sdm52s+/m0
Dj/Cc/NkJAhUDV9yWinGw6ytyFXMYsBUYv/2rc9Jv33tIcxZwsa30pFxpVYa
nkWFc7sfkpw7GeGwrbYPShnDPoHXPuNKVviizM88BL8zkWvt6IbYrV0bC8l+
777z1GK+Ng99z8xfHxV24vW15tkeM+pIHyL2Pczikv8zz3KDMw3z/cbtHKtr
4XYgw7vAnov1a97rBduQ9/KglAQl1+J4iO+h/+cWq4nI7UhhI2zixGbNM51w
FB6uPSclQMbUulXhiSzsnGH/bzWTgpeevPa15PxSvTqLWna1F2r3az0bq9ug
ZkLn82T5WCynGrfSkAnViDlNzxWawOEbfQv9wIPq7ud81axumCy8WrJsuAEL
96ccmrpN+t5lo7AjaXSY5vQE6A/UYeVu3/KzzkJ0MnrkLsZz8HF6eaWVJh21
44bzS98IkJKQmrfJmo1620zL2h80TGsbqfhD5meNpPFa2oEBHNzmObkvtgPD
kVdqDDQE6Aq2Fq1pZOHHUNKue15UzG7Lelj8k4/LM7kH1u5mYez+L8mgWAra
fo+6HmL9//vKt/sZJLc1WeXo7vzVjh3rwwvyZAj8WHMrMkyeB0+7uxLmpQyU
exoa/P0oxJPAcXnteC6WrfDpbW3thlu+nkwKmVM1RFbJlv9x4cq3Gkpc342c
/ROE7UUhzCPD/F/+4eBevPCoGY/Mb9ONA/dFCvE3UGkUXSRPt+W4JOXTIZK7
Plc7gOQHHbeAH1UcaCzXfxx4ho7/AYbVVDU=
    "],
   VertexNormals->CompressedData["
1:eJwNV3k01F8ctZaKEkpIpBRJSFpEn7IkW2VPKWRNKclasiRtKLKkLGUpFCH7
+sYy9m2sM9axjDHbd4r4Vajf/PXO+Zx3zvu8++79vHt3X79j7sLDxcUlzs3F
xctZzcLsT+Qd6gHvJHls8nYv0heZflDCYsFodVn5CeVCpELs+WEzO4F+CJ5m
dSwyYBemmnr6zRiK+fdzww5zEnpU8nkyOp8GnbrbwxodKejjhge/+6z7keLM
3R/36ylg6m+vduTfPErsjOWVwXegpg2nMserp2E59aCZVz8dbTmh2PWfQiN6
NYazTmwmQ+hqdNyObga69qL813R6DbpXeXoXZXQCSuwGx//qMpElbjKAL6AK
Dbred+7VHQeL//5Kys8VgeTDpjyDB3NIYCDXIjx3Dn70zL76bdWCGk17DB7N
zqOK2r2dbqdmYJ0hs7zLcAxdrIn3aS2joGGC5c51zdMwUXtlK9+mWZTxuosp
mD+FGiiDzgrvpqApx5g+t0hFITaHuD9EjaAJ86BVdjQZ+JVrXUsO0xFTX8Zh
1bMfDY/W4hbUJgG1qrv89mMg0QPSEYjSiUI1uxNGgsfhqqaot0InA03hy2Mz
z3Yix0Jl0XaHMehV3+Q373EFqiZ/aL0LY6HGsM9O1CYiJKeuqCu7NaDt+qrf
i31YaF7bMfjX6WFI6xIO37s6gGocLhRc8Geg/aDe9E2HBCtS1RuX+MjI5mn2
krHhPEpIU869/mkE7he+IUUQZ5HDVkneuuEZdEqDVE76Mwrm8mypj6LzaLvV
5ewMy0lkWMi/+d+RMXiT+P6hgwodhUeWMmW5iegO1Y/+iTwKh81YdoQeOhJN
GYnK7R9EY35yS5oGo2B279wvksFHJJTC85c9iyFVlajFDf69kKTOU545Vo98
5+V6ulMwNHHsi1+7XS98irs0IBdHQEZBXEq/L7EQ5Uw3l11wH9DK1ZHCjxF0
U7HqWYMkA0VnTyn34AfAUCqootlwGslSTMqyAqgosjUoLiVqGFRCCEpX6RTk
aHQwSiJzBm3zLr1TIE+CXTG3Vp+WzqNfx8J2potPoijjTbX+R0egLTjvMSWH
hkZrIqLySkaRafSo6e0rI/BC/uzMHLMYmaVcqM43YqODMhaRomOt8OF4mTHp
cSMqjtskUPULQ6b3s+mlSW1wbEOrukZ4L0p0i7DF1mPIIDXXbqNTF9xNEj2d
5E5EJ0ateQcuMFGlTnftFXkCTP1JqHeMIaM57cAb1xxoaH/2mduKrwZgP+W7
HpfoLDrrXOT5XXIOOQq4WK/xDEPkkWw3qhYVicuvPk7YMI0U3Wrnf6uSQH6L
y3Kc+zw6KfeIwJYko61/pVz/rJJApWFrhlRxLTrh9CU3zIGN9Lwxs/sGTZCo
tehW+KIZPRUQz1LZyEaJEkz5Xh88tEzMd57N6EUOtjueqOtiaPfS8eb0lVYQ
zagOllQaRqGflC3S+5nov/L3uju+dkPLC5LKt6AJ9Cw8HkX50tHJ44SQLrl+
iN5+6dTX69MIq94iS2ulokmhxslCbBDW35DydS6ioPH+eCOdPzMozIkefIRI
hO1HvFy+Ls2hbEF7sYPC0yiXm74b2zUCuxuSo3OuNaHzq35Z4efYSLO9umF3
ej3ExiopPq5sQ77lmwWIHPwJhPXsp9aNIPzly/uwxF60keYZKGvH4Vuw8Nle
+RbYuyvP+PDYIHI5Kin6To6FfBt5tIqJXWB7jiZAqBhFD0tTGHeMGYjs75uj
mNUHyxdbR0PektGDuFN6vxVoqEhScLk8aBAue9tVVjFnUEnDSYHlEgoy/ePO
J/MfEc6uyyuSVaWg2qi3Km9+ziCWdnY1IWkErhQsqfLebEV2Jy6tb5Vho7bX
zytVVnDAF2gfVZbRjj5Obnpwho2hjlZVAfKWRvDrD75gnNGDbt6PWJD3x5Bj
4pCX1fYW6K844tjAP4CoRuqjfz1ZSM6P+NHYoRtCEi8KpDsQ0YvYKF5rCSZS
GymMHX3WB3NSb/PUt40jMyfBZ1dv0lFsytz3ve6DcMTAx6qgbgo9NnwsXnmD
iihWq5BoT4LFvxYZWjPTKCvwATsDo6BHcjIZqsajsElN3n+fXBtSjDtXnLSF
jXadCxO8g68HHoU7syGdbajjtlbU1iUM/fMYJfukNsLrDv2vY0+70Bd9OSuD
aAwpHpP+1biuFW4vVldoVxFQX8xupFvGQqyjFsl8OT1Q9UYlcH/IAMKUTnqP
kZgohyW693JKHyyID4VJmhBRU+5Ef99rBips/yYkGD0ID/h6g51XxtFVRddL
szI0xOjdsKmVSQJdp0mbiupJdJN7wfvuf1RkXvMQ17V7DLRlvhpmQyta6EhI
EBRho8Lm2LojpQ3A0qc8CjrTinxydObH/2HoxJ/EQ+EhTZCQPFi0FNGOPFwZ
wVbvOfy5S1/Py9cOpzSlPI3rupCW2/CeYyssxPt6y8/Asl7YvK7sv3f2vejV
c600JX8WapfOWygb7gMhc4LB+dP9KEJOLP9iKBM1lNYdoBEGQWMCn90wP4xe
nWRUvo+nI9t4S8/3t0ag0LYmO+gsCfG3zuz9mEBDP8c+amUuj4FniWC75c0W
ZBn4tPjxVjbat6oT09fWCHvcuY3eVjUjXeeR6mRO/0P65T7p6s1Q4HRLYptI
M+K9OVGs8wVDtyq+fEzf2QX4LXOd64rwiELSVVI7y9G1gTYZ/4UACy/1j9/w
bEYWlOtyV3kwtNWaW0JZpR8U1B0u6lm2o1aV1NM3LrDQw8tG/SlCQxBSNvpB
S5iAYpV99I61M5BR1LY5PI6jU8Oxm4Kn+tBri9ARye901D0tekLYehziJ1p5
uuxbUORP4I9ew5DYikp2Vgke+m8GlPTl4lGA9U63Z1MY8vJUkPV93wYRt+/E
D1DrUc7yK+B6jqG/1eq4S4xeEH4snSolVo0WvbO+jF/D0AUZXd3ptT647X3F
wPVZCYpVuFsUeQFDz6R+Ls2N94O9ziaWb2oxsvohkLRtkYUiV9/Zm3ANgVDh
yZDHu2pQod8Nq9EVJnrwZDC38PAI7DgQmt8RVYVmzHM/OKYz0XXRmOIj3aMQ
8OGQzo01PFIU7UwopWNIe3h19UJGK+BoDC/42YjU9VrM5HIwFNkjpczq6IYg
/rpdfi11aFHtes6CDIa25G1+rKo0AIzPIuVSsgVo7s02HcYmDMVaydduzhuE
r08/7pn7ewKlXs7yTxfC0DqPjZ9dVgbBp9mRkLUzG9YMNn3+PsVCaw9t1y2X
DsHWsV2/HnkUwe2mjkfZ9pw5wBxqEuMjQYzGcTIftRqk+lrmVfewkLowUTAz
ggSSXvYP3Ug45CNrnPsOwxADs7/B3N0JE2YdfzLsKtF7jULyTV8MGdXwvpZ5
3Qf3Lo4mn1spRu1/UprZlSw0QvFs1FAchjr+2suxIe/QmSGr2NFzLET6xl19
HJFg3q3Odvx+HnzuNPmne4SFzD4Gz+gwSHDY5FBqp3s9LNR17dHAmKiwhtnJ
ZJEgwvbbtdxL7WCeYLtVx4OJyC/ak4+aj8CQ75bntB+9oLk7dRVfxUB2vL8X
MkVH4Xqz+fWMS0XIyOhv9FQnhkI7Ir01enphv4ZQz1fpGGShr3F3uyaGRnpc
FSdWBuDDNpfzjbQsMB4iDmqdZKEMgdTy3HkS9I6e2b9yoBw2LiekRZ9hIjZ3
5sJw4DiErLPTCk6rh0tFGlXMIQb6wfOzycl0AtZJqAp6veyArIhjjSnKHF9m
mbt7ijgBiuKrng0m/WBckdBB4czVX46tsVXhE2D78eLdB6FE+PxPZPNXjp8V
8yp4RHo5CSIhWePPZF+h3x6i9lL/sZB018LdgjtDcIzyaKe1aCkkPYru0d/A
QkPmXK8YDiNw/byxy+aWVjBPG43kXWSgT1KNp9XfjkH+YblLzam9EE3nvWdG
pyPkj3NfuzoBSs6e/RemB4HNfTqwRZuGRtIve5+8RIadjkMCmmgETOgBcdxp
VFS3y9ylcZEM7+e/HgrTmQD/k+lsnk9zKFK2x2algwxOGxrFAtWm4L6ETX3S
egpH3yfJ3nQyLHEt1rl0Z8KjYSx1YxIDbbg7wLNfgQzKu4WbHU+3QJ1PfPKU
KQ3p3Rhd+VoyDSt5f0PkcodAcYPKD55xKgoo9Ki/tmUaAqVVR2/um4SFQ2WL
dgsUxO90YEHv4hSs1ZuHHvSdhiBllsK1bbNoUGd0yruaDG7teP68k7Ogo6Al
/q1+GjlLf7fZfZQMJ414Zw3SKLBxNTRyLmEKudRX7zvsOwm855nnEoXnQeRv
tfPDT+NIyKjlTgn3BLgORXWd1ayHA90Wm9VuzyJV8917mTAP2+63n9d8NADD
2xiGNdsnULL2Uauei3TwuXWDnZ1MhhQlDZOes6NI8IFsV3spFSaOir5P56VA
eqT2Dd/9RM7/UmPSOTsLdls0HvxYoEJHhrRChM4gun/A+knetWlQfT6W/ppK
g4XCZqYKvg/tq9AWsT9LBtwV258aJxmwp5F3/NHXXiQdu7/xxqFxSPm5j+NZ
mVBZ7BKXo9mEvFQsGR6mHP5P0pPqsnpA2vONBTIqQ21p/H7JUxiExosQPr4c
AR1e6YUm4TpYoToFCk8y4Qv9zKEHx2egacfOZ47K1SBELubJukKD3x9UerkP
UuG/ouixrfoVUGDBX64wRoGLElfeSVfRIMxepGlzUSnc9/7wfmhwGgTidTT5
XBngQtaxn4wohp/OOkoLtmRoB26jjggmLF2qelFVUwS6daelvfLG4MwF823x
OCakRfpoTnjgwf0YN2vyFwlkc2V36asQwHG/hNCg2CQsns+bmU6jw/WU8KES
WyIUatlUnX83DcGBH7ZReanQva2FlfKTDKrr6bso5lOQEHReeXxmFtTuh+kF
vZsFVWkP2tvZSchUOuvsET8NPUvHHUodqbB3oE/UVX4c9BxvqLdwcN6fe7aS
GUQDWY260OscXZ2Q2mTx9uIYqNx7dbqUjwHVjVbSrdRhII2bD/knEuE7dhjJ
dtBhynn/406FMfjTSfmvnJMvSj8lamd87oYMLk1Lbpd5ECgPkJPWnoGL0YdG
+w8OgN9Au/rYCRpEJ23BwufJcCj1xUva4ChwPai4U2oyD3f2vH2F/ZoAIZ6r
ZV+Mp8CD6kSgqlHBzUlyf5/1KBx96JGLCc4CTbCcmLVEgUcd62sas4bBsWy7
94L2HPSQTYpzU2fBlhaTeevWAFhdPNMag1HBYWMb14eLMxCxt2NXfAEBnPal
3VF1pYJpn7940fNZeJUc11Ya1wVe1hMh1c86IEhT3WcbngGK2U+OdH0eA+Pw
ruzFfAKcv+fzSm4PEypqbFjYAMeH2/mLnl8cBmd21IbD7xhACXlad6V9EGK9
1GokL4/D/Af91phOOvzslQ0v5uuH3imSxU/OvdsiCktYwzS4RUh+0I/rhWDd
IpHz9dNw7tqCitDQPLDG60+nNnfByaVDRiMGs1AqdyrCZYgKfbf2cYXntcOr
p54W2fMzEM0vFeplNw9/n60LcLneAlunBU5J7G0Hb50nor5uLDj54/etqneD
QBzjKTMX7AWHKZJwy2sWRDfPvzx7tw/0JWUUXnNw6rfkVZDSZIErn+XmbJVe
CM2mql6wIQJBiCterJgJtF5rXU9qJ2hdo6+7OjAK2HJB5A9hJswc9qNMyLaD
k6TwBQXGBJxLTcqwc2CA7z15ei+xBVK1BGPaCWTgttu8VeszHQ6kpPoEfMeD
zc9diWcLyNAhRUwuJdGBKVH9r26iEeIqdB/O3eP4BVmTiE5dDN446uIle3uB
Xqz3LOl5J1CH3iRpmmGgj8R2ql7vgjXKPdUYdwLwpQqVae3AoHH8DPmSeDu4
qCtxRdpx+Kh/S/BhPQtQ+ulNGh9b4PtPB32c1DDs2oLPjrFhAXdxgTa7Fg9E
NVy0SSYJRG8SUNoUE75F2x22O9YE6USh5I0LoyA+F9ax2YUJU2/4f5v8boBg
TAwn+3MUAl80C5zwZsLA3Te1qR/rwSn136VLkc3g1cYbHVqJQUdh2pfMlg7Q
ILONMJ82qKw5YmVah4FVvd73mqZWWJa4Hh0s1A08tjgrn2QMxsXd5rQPNcPC
MndXgj4BOo4Rg4ScMVCSuma7x6IJxAi3NV7d5ORF3BMFCRkMrAvaD2WxG+Cf
OvWt3t1BkFhbbjEgsICyfs8YkOshzNpCLd5wGIxTzhWmhrDgXelavsAOzv9d
Rhr4e3YYFo3DP1tGsMBNfOY4IQIHETZcljsJTZAZ9oD88h8GtO/5e1a4W6Fg
VzxThNoMGlqCaxM8bPBa0oKGajwMXE8r5ddqB9/9OykObAzsnxI3Kb1thHfc
btW2yV3wty6470cnBifOx0yOyzaAeDve1cG7F3is9Hz/fMCgTvFVVe72eujH
zOJDGQRwi3TOCrqLwaraA95UHxzcb8Tx8S73QfgeRNI2xCA/TUJc9TYOSmFt
ac6wD2KXHZwT7TFQ9Yk+Nz+Lg3ur9IE680bAnab5tB9kg2H1n1mGLx4+VYb1
3K1vgkBNuR/LqmxgteWJWX3h7Os36Ngr3AIX7umkvVBgA/MAwdWdVA/Tz32r
Eh+2gVdv5aZOMTZcUalz6snBwSqWc52W1AHFzRb/hNcwuJckK8OzGQf9dadS
VpI6YTL91CkGEwPdeWpPFeAgKnL91fBznSCx+5CoPg2DU6r8rwOO1MPiQkLC
5NM2sNrp8FmYjw3zr3o6be81QMJY/bpi/gY4/zTxVp4xG9Q+S0sZljXCWYkL
IjtnG+DIztkDUWZsSFxauiOj2wCnuDqDCOeboNN2yiOcU8/x/t1wIB8Hax7c
VNU4PJx+3ZFy24gN6R+V8TUdCGbaTK98zsHDrfGuXY8M2PCpVoQCe3GQ/+fy
hgq3JvBSq63gN2GDd03R0Wy1elDH6+DzdBqgIcAk5J45Gxw+qOeFdzaA/yfy
A/HgGrjaGhH8zJENV+sk+zVSmsC22m6eNYIDYkCFwGtO/enU8XNvnjXAScUG
u5zD9RAz9LEh8AYbQri/UBZs6sHvsPH6qPh6uDbwkN3uxYbOt8Z3/m7DgR8P
aOrScBw/8OG4oh8brrNCj+fK40DXQ6D7dEstmCjYfSA+ZMOeW3gtF6V6GHNc
cimRroAmuRnn4+FssDJytWgraQC8nVa7BVchzKdaXpQPY0O0vLZE+XIT3NBu
mwnJewK7820eUjjn6inG8mi3tIDlv15ra7kquPriT79vNBtUIuKgaRQH0xsL
Lzx1RTCm2m0+cp8NgZIHrBXbcMCtZvF+u14NpGnbCy0/Z0MH1d2sxxUHKryM
UhapDNxduTfJxLOBmCYQcFivHvq20LNFcwqgplor9U4SG8S/PXMN/doAipfj
j/FcSQKARVpmDBvyd1DuzfY0wZnWQkE5pSyk5ALJyIkNqldveRhcbYUi3+dS
V0fqkfhAUbb5EAalnoMsOcUuiPsT7jM3Vgm8218UC79kgzvPlP0Nji4i+TZK
5pcXg+d7wxOn3nLe/Vhtp29WPRzdWQLlmz/B5+ciR53S2PA9749qH42DW4rf
mPcxd2Qxsz7qYywbNv2nSQ5hN0GOO6+laWAx8iwPJERx+OB9KyB41rwVbKTW
qecJtCMR/hRDVXcMtkWHbWk42g2lPSKGAY+G0cVClZu2pky4UX+sTv1mH/it
9nY/nSkCs2siOgoZbGBk+xp+kqkHl/BT9lrHMkE/P+CFNqfPxB2llLj0Rugm
M2fy++LQgvpzmj4HZy+aweS513hwMy7FH39chVZnVuZwx9hw0UDerqa7FQ6a
mltLxHcj02nLdIc9GJzhl35E0e2GI/ZFpBrRMbTvZ5d92D4G/H6rilNc7IPl
qoH5g90zKIxIjK/Nm4OCf+0TVwoHQeyl8oDCWipqCPrtRvzM4dXD+Nc5HH2e
/aqYEvb+PRL5F0mqDGZDVMWdaQfTZjCecnH/ZoxQcMGRm9mibMi6xax202iH
xX1Wd39xEVDwH3nSPyILSHhG4ezhHpAIN9lfZTOB3tx/dG5HKB2Cn72JV9vT
D3f2ToV4llPQdyU/cYvOWQj5/n6udHYQLPeJid/Pp6HJd/ETHSkcv959e5vS
0BBcCD5iE5WI0Ka/T3jOyXHmWK3bGQWeNvB+UrgzobkP1WUFp0c6s+B8h9CD
wOVeWF8lE7B8l4xcT79QloukgbcZb3et1ADwhU3q/fo3hzyu7V3T0JsBy6nW
Mu4zQ7Bdce1K+jgdufgLFYk7jkDFQbH5tE9D0Gn3/nXfVyaa+I6zs3hC4PRX
rKdgNgT5Ugre/Ym9KOcuqyOGFwP3zANH9wd3wfksjycfnKcRK8vBRPEdFc63
hU5Mfx0Cnt1EzaX8eeQv/pv/cxoZhlApfil6GGJe0GeDRxnoZcv7gBcJgxDH
tcxSYw+BjPCCmDyw0Ba/tNeEwA44uktqxX/jENgXfHP9Ns5CgbLrvSabcKAn
ebXvqssgBCYNrIu7N4HMHRq5/F3o4GI85iP9vB/sRI5nPrlDQ2ITatWF3uOw
80OO0nozEqzKREsfcWCiq9UvMmsKCbDVyKzyWdkwRLI+rRcJZKGCfcmaV/Sa
4WbJH/I70yH4iE+XSeHk1W+Dg+4VhGo4tbo3KM1mkJMv9OW2KGPIJTAd+21S
CIxrvMcqqQPwP6Mh6xo=
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{432.8136637630714, 389.9404421995727},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 14.}, {-76.80760581287494, 87.01942830449912}},
  
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{2.0498181098743964`, -1.1645485725474896`, 2.4273591284786273`},
  
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.759344804098008*^9, 3.759618641414569*^9, 
  3.759619420592471*^9, 3.759620128637534*^9, 3.759623983198337*^9},
 CellLabel->
  "Out[132]=",ExpressionUUID->"53eda007-01c7-4419-9635-d1b11498580a"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"RightingMoment3D", "[", 
  RowBox[{"hullreg", ",", "0.", ",", "0."}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"RightingMoment3D", "[", 
  RowBox[{"hullreg", ",", "0.", ",", "1."}], 
  "]"}], "\[IndentingNewLine]", "boatcom"}], "Input",
 CellChangeTimes->{{3.759252739536515*^9, 3.759252746461761*^9}, {
  3.759252780565104*^9, 3.7592527914350863`*^9}, {3.759252823336069*^9, 
  3.759252825768495*^9}, {3.759253040485571*^9, 3.759253058277087*^9}, {
  3.7592535553075647`*^9, 3.759253558615101*^9}, {3.759259288334249*^9, 
  3.759259330638883*^9}, {3.7593442512463493`*^9, 3.759344261342238*^9}, {
  3.7593443084107037`*^9, 3.7593443229911222`*^9}},
 CellLabel->"In[99]:=",ExpressionUUID->"d0156ee4-156d-4c69-acbe-33f12542a278"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"-", "15.877919423013802`"}], ",", 
   RowBox[{"-", "2.698286039048978`*^-16"}], ",", "0.`"}], "}"}]], "Output",
 CellChangeTimes->{
  3.759252800344203*^9, 3.759252831946741*^9, 3.759253064078382*^9, 
   3.7592533223571453`*^9, 3.759253403650153*^9, 3.759253470202985*^9, 
   3.759253570821138*^9, 3.759256441734631*^9, {3.7592593174150476`*^9, 
   3.759259343738756*^9}, 3.75934418576471*^9, 3.759344329572978*^9, 
   3.759619460228524*^9},
 CellLabel->"Out[99]=",ExpressionUUID->"64bdf95d-099b-448e-93c6-ab760300279f"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.7276545170198144`", ",", "6.353060665230735`*^-16", ",", 
   "1.1089308640450766`*^-17"}], "}"}]], "Output",
 CellChangeTimes->{
  3.759252800344203*^9, 3.759252831946741*^9, 3.759253064078382*^9, 
   3.7592533223571453`*^9, 3.759253403650153*^9, 3.759253470202985*^9, 
   3.759253570821138*^9, 3.759256441734631*^9, {3.7592593174150476`*^9, 
   3.759259343738756*^9}, 3.75934418576471*^9, 3.759344329572978*^9, 
   3.759619471455022*^9},
 CellLabel->
  "Out[100]=",ExpressionUUID->"6cf3a4f8-0c3b-4372-be41-9f43beb804e3"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "34.16`", ",", "3.5`"}], "}"}]], "Output",
 CellChangeTimes->{
  3.759252800344203*^9, 3.759252831946741*^9, 3.759253064078382*^9, 
   3.7592533223571453`*^9, 3.759253403650153*^9, 3.759253470202985*^9, 
   3.759253570821138*^9, 3.759256441734631*^9, {3.7592593174150476`*^9, 
   3.759259343738756*^9}, 3.75934418576471*^9, 3.759344329572978*^9, 
   3.759619471456366*^9},
 CellLabel->
  "Out[101]=",ExpressionUUID->"6667d546-cca3-444f-abb4-d90cde95e57a"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"data", " ", "=", " ", 
   RowBox[{"Union", "[", 
    RowBox[{
    "angleTable1", ",", " ", "angleTable2", ",", " ", "angleTable3", ",", " ",
      "angleTable4", ",", " ", "angleTable5", ",", " ", "angleTable6", ",", 
     " ", "angleTable7", ",", "angleTable9", ",", " ", "angleTable10", ",", 
     " ", "angleTable11"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.759072300777479*^9, 3.7590723796164923`*^9}, {
   3.759072448653634*^9, 3.759072575094974*^9}, {3.75907261372635*^9, 
   3.7590726553847847`*^9}, {3.75907306361436*^9, 3.759073109871479*^9}, {
   3.759073723711248*^9, 3.759073751605865*^9}, {3.75923323659171*^9, 
   3.759233238543703*^9}, 3.759242752534754*^9},
 CellLabel->
  "In[108]:=",ExpressionUUID->"ee9e9f72-07c4-4e3d-9b16-f66f6d8cb214"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"xdata", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "2"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "3", ",", " ", "1"}], "]"}], "]"}]}], "}"}], 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{"i", ",", " ", "1", ",", " ", 
       RowBox[{"Length", "[", "data", "]"}], ",", "1"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ydata", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "2"}], "]"}], "]"}], ",", " ", 
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "3", ",", " ", "2"}], "]"}], "]"}]}], "}"}], 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{"i", ",", " ", "1", ",", " ", 
       RowBox[{"Length", "[", "data", "]"}], ",", "1"}], "}"}]}], "]"}]}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.759235104264694*^9, 3.7592351062871733`*^9}, {
  3.7592365267181997`*^9, 3.7592365913689947`*^9}, {3.759236661115903*^9, 
  3.759236696407262*^9}, {3.7592423525281982`*^9, 3.7592424124725323`*^9}, {
  3.759242500520648*^9, 3.7592425025182333`*^9}, {3.7592425433490067`*^9, 
  3.7592427673328667`*^9}, {3.7592462345862093`*^9, 3.7592462352795477`*^9}},
 CellLabel->"In[45]:=",ExpressionUUID->"9f5802a1-0245-4914-91ac-3392429e94a3"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"xdata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"xdata", ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "10"}], ",", "10"}], "}"}]}], ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.7590724208331223`*^9, 3.7590724398393517`*^9}, {
  3.759072662985104*^9, 3.75907266342724*^9}, {3.7591917016680717`*^9, 
  3.759191711612427*^9}, {3.759191764131751*^9, 3.759191827839968*^9}, {
  3.759191861312775*^9, 3.7591919015482807`*^9}, {3.7591919321871204`*^9, 
  3.7591919329525895`*^9}, {3.759191985078641*^9, 3.759192023892722*^9}, {
  3.759192061319381*^9, 3.7591921312167177`*^9}, {3.759192614557542*^9, 
  3.7591926186114273`*^9}, {3.7591947683049436`*^9, 3.759194819869439*^9}, {
  3.7592350743362637`*^9, 3.759235094405341*^9}, {3.759242834090728*^9, 
  3.7592428406147423`*^9}, {3.7596240346584797`*^9, 
  3.759624036196426*^9}},ExpressionUUID->"270990cd-b0fa-4642-8be6-\
25faae0e0bf3"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxd2As0VNsfB/BzkfxTOSidm+LIMXqMYhiP0vXLINSIxmNEHpEoSldP6f4n
UnK5on+Pfy91KxU9VJRaYW7qonvTU/IqEeXRvWrSn3/9+c9azhmrn7VmLb/P
2rP3d+2zz94bkxXrlq5UIwjiofKjTnA/vU7cbyUuihcNSwRy5JDuc+PCh4uW
8K2TUPdLUPq9ZHfkFHjJTP+ueL4UOQ0yRW/LrxelyBmoWLM348TC5cB9n8uz
6X9VVzf7W8mRw5W4mmmKBCvUnoSQ3Z8Sg+65I6fg3xvN7W91LkWuzJNRp5dd
LEXOgNsUc68xIi4PT5Xnv5m2PvbdFnLk8H1+9CffAGvUnoTMjtIryVEeyCmI
cFK7uYqSIKeh4mTBBc1qKXIGAvruvWq24/Jwz4EgfrMpDJ/kyZMjh50pQXP9
QmxRexIKNl+80hzpiZwC6UZ5U3CkBDkNt09NMOprkyJnoNUv/+wPg8FsLVTl
UW9+meoaPEmOHHS3NBVl5cxF7UmoGlf5LLlsEXIKpmX7ToqTS5DTkKlj8b6+
VIqcAbtcL7JbwuXhxiEI/pLBlJs7uHWmcljUOLczbdAJtSfhhXONRDFVjJwC
szvdQ9t+lyCnYfqx4JZEQylyBo7mCCuzLYPYmhuHIHaRfO3SpmnYgT+eH7V4
lzNyEq4ljJ8RlSxGTsHj58+LjdwkyGlwoMy+WA74I2dAbJrXKjsayNbcOARR
5UXpPF1uiR3OGb6O2fenCDkJFxvcVzfULkZOwTWD+pKZi5Yip6H4xpZtDTF+
yBl4sM82b+z5gOFa5qLKY5DgZpPUaoMd5lvoZ0coRMhJMK9e9qlOugg5BZYd
6TOffPRGToOZW21bUZoEuXJ+yiTW0lgu50JVHj2tY/Gy9XbY4faotT6OeiLk
JNgHxAcmzfJAToGdUUyN+LgXchoeLZpnezjWBzkD3cY5xU1D7HzKuP4IwsXP
kK78yR47lEVs9wwtWoCchCnUYsHqTDfkFCRsp78ze+2JnIbYyTEldbZeyBn4
WVN06VkkO58E9/wJIkHc3XGnzA473O9Y2y5tdUJOwmt+3uPfr4uQU3CJ0nJN
GrsQOQ3iP4uH/NI8kDPwRNjyriuOe+7cvBLEmgUTDhxLEGIHC2bGIaN185CT
sKHu+JEXBwA5BZMd9d1DTUXIaWj/etDz1D9ckTOwZ3Ojm1ooN8/cPBHEZ2jc
evCsADs0pKX6Ptlmi5yE+lHnBkd7zEVOwf6dRwq2Ds1HTkOI848Dj/YDcgZC
xhaZzznJrgc5t74I4qmlSW3svdnYocktVXEzwwo5Ca3jjfkmhdbIKYgOrnl1
sUqInIbCyYnmL2vskDPw09naXx0uO7A1t28RROWjDd4d4ebYwZiuPVEQOAM5
CT72ug5+nrOQU+BuWiIdsrJAToOLoqhHMW4Ocgb6xSJDozh23wNfVZ4dJTV5
Ly8ZYYcNC0Z5TCgzRq483+O7bPdE0sgpCPXdGFn5FjsNwU804ZdoE+QMfD3w
z7bsDtZl3D6k3BFags5b79PGDnW2pxTVYuwk6B5PPxE0GjsFBzoP5J8rH4Oc
hgCJCxm3CTsDxX3Z1aGzWJdz5wlBnBy4oZ57prscOXiNTrHIn9+FnASN3Ns8
42fvkFPQ/68q46nRb5HTEOjqrVHa346cAfVtoTN1Ut8MO8Gdt8r1Y8c3EPtN
kCOHvHY9V7FYDzkJQNdmttuTyCnQ2V+R/mD2WOQ0PNAI0Xr/cDRyBkjH/Bpj
ifqwA3euEkQnf7dQt98EO2w4b1jg6GWEXPm8Sr8MrN1MIacgQ40fIojVQ06D
ZafcJUqqhZwBZ32exrn6z8PzI1umypMHL77ueD9djhwOtdzPNlxnipyE5pVt
2qcjDJFTUB1ekLm+dTxyGuKrrhU89X+HxmVgvI89HXpYfbiWc/cgZZPLltG5
XbPlyEEt9T/ZG1+bISeh7+rax+7VFHIK5pkdvDrQrSj/1mk48uzMwniBDhqX
gZm+f8wpSpjG1tw9miBua7Q0Puzi/r5QOdzI+eAxMYqHnITJ1T55WttJ5BQ4
HBdoNs0Zg/qnoff8pblb35ohZ+Dz8+4POq3suQAhqjybKnp/jvzDWo4clm95
M2V3G4OchIzU3rPOga3l37ryvIg51idLNEX902AT6q2ZGGuDnIEk4eDq/hj2
vJaFqvJMe3Th1jhtoRw5lNSMSdecZ4KchC9nJTd+09dD/VAg26Qdru4gQE4r
7znXuxxnAXIGpE7fJdRNZ+8DYWGqPBlM+rlbR9k8Iw691LLvm9MMkJPQ33dS
sTeFh/qh4HbmjKyUu47Iabhfl1OVP+iGnIEzH8O7bgqWsHW4Ko9w4uYeWM/m
GXHYGZB3XezKvo8qJyHe28aqtswa9UNBxd7Ta9r9XJDTkPuoNFYh9kKuvD8H
L5nU2MieZydG8pg2Lnzw90YbOXJQz1zyvnCcLmpPwrb3KXVL4+YjpyCg3FTk
XOqJnAaN/WmuU0g8LgPLL49KLIpg90dYocpz/cWZ3mU57P8TRhwaAwaySoCH
2ivfr2bf9a8GRMgpCJSq8VzrvJHT0NMwh3/XNQA5A3cVwtnNpuz71jIy7i7J
wZvllwXISRiS951cUOmBnIIhy+l7+Lm+yGn4oUbUdv98EHIGRLzoaxUf2XUj
i1CN66k/traHNw85CZ1hNSYt+t7IKdDv0LYyS5MipyHcOLnJYDTun4HX9lk2
fFe2piNV4xYO5MWsEjgjJ2F18oIqS18Jcgq2mBuF5yYGI6fhkP4pDW3hCuQM
nJ7YpjshaeVwLR/p/6rD2vj1Wf7IKcgsu5NePjsMOQ3Pz7wxN3eLRM6A1uK9
g/5rVg3XYStV/bv8lZrVsyoQufIcT5LXJ/WFI6dhRnTEg9gxUcgZyL8/NWxx
QzRbR6n6/3F/oWCWOAg5BeV/Mbn+yyKQ01A/87CiibcKOQODhT0GE6/EwP8B
2G7jUA==
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJwBBwT4+yFib1JiAgAAAFIBAAADAAAACwYFCAIHAwIIBwIBAwgJCg8QAwkE
DhMUBAkKCA0OBw0IBQoLFQ8UCgkPCwwGEBUWDRMOBQQKCQ4PCA4JCwoQERYX
CxAREQwLDhQPEA8VERAWFBkaEgwRExkUIRsgMjgzFxIRFhUbGBIXHCEiFBoV
GxUaGh8gGR8aFhscFxYcGiAbHhgdIicoHBshICUmHRwiHyUgMy0yHRgXLScs
ICYhJB4jIx4dKC0uJSsmIyIoFxwdHSIjJissJyEmJiwnMCovLjM0LDEyKiQp
KzEsOTM4KSguIygpKCctLDItKS4vNDk6Li0zMjc4Ly40Pzk+KSQjLyopMTcy
zsrNLzQ1NDM5OD0+Nz04Oj9ANTQ6OD45RT9EO0BBNjA1NTo7OzY1PkNEPDY7
PUM+S0VKPkQ/QTw7Ojk/OzpAQEVGQD9FSk9QRElKQ0lERktMQUBGRkVLQUZH
UUtQR0JBSEJHNTAvSU9KR0ZMV1FWSlBLTFFSQjxBR0xNTUhHTEtRTkhNUldY
TUxSXVdcT1VQUFZRWlRZUlFXTVJTVE5TWF1eVltcU1JYY11iVVtWVlxXWVRT
U05NU1hZWFddUFVWXmNkW2FcaWNoXGJdWV5fX1pZXGFiWVheXl1jYFpfIiEn
ZGlqYWdib2luYmhjX15kX2RlZGNpYmdoZWBfZmBlam9waG1uZ21oZWpra2Zl
aG5pamlvcHV2bGZrdHl6cWxrbnN0bXNua3BxcmxxdW90cG91dnt8fXyCa2pw
d3JxbnRvc3l0d3x9e3V6fXh3cXZ3dnV7en+AfIGCcXB2dHp1eX96d3Z8gXuA
eoB7g359goeIgIWGeHJ3fnh9fHuBf4WAhH6DnJabh4GGiYSDfYKDgoGHiYiO
hYuGiI2Og4KIioSJhoyHjYeMj4qJg4iJiIeNjJGShouMjpOUi5GMgIaBkIqP
iY6PlZCPjo2TlJmakpeYjJKNk42SkZeSj46UmJ6ZlpCVj5SVm5aVlJOZmZOY
mp+gl52YkpiTmJ2elZSaREpFlZqbvbi8nqOknaOeoKWmpKqlm5qgoaanopyh
mpmfoZybnqSfp6KhpKmqoaCmqKKno6mkq6Wqm6ChpZ+kpqusrainsbC1qq+w
qa+qrLGyp6asqrCrrqitsauwpqWrp6yts66tr7q1rayytK6zrKuxrbKzwcDE
ZWRqsbW2oJ+ltrKxuLSztbq2uLO3trq7ubS4vbm4u7e2v8TAs7K3vLe7u7/A
vrm9t7y4wLy7wbzAuq+/r7Wwu7q/wr69vMG9w77CycjMxcLBxcTIxsLFwr3B
yMnFxsPCt7K2x8PGn5mexMXBycbFxsnKy8fKzM3JzcrJyL/MysfGv8jEzsvK
z8vOif+hGQ==
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], 
     Line3DBox[{1, 2, 3, 4, 5, 6, 12, 18, 24, 30, 36, 42, 48, 54, 60, 66, 72, 
      78, 84, 90, 96, 102, 108, 114, 120, 126, 132, 138, 144, 150, 156, 162, 
      168, 174, 180, 185, 190, 195, 199, 203, 207, 206, 205, 204, 191, 175, 
      169, 163, 157, 151, 145, 139, 133, 127, 121, 115, 109, 103, 97, 91, 85, 
      79, 73, 67, 61, 55, 49, 43, 37, 31, 25, 19, 13, 7, 1},
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwNl3k41O0XxkWLImmxVUoU/SolSVHckWRtI6FSCJUWJCRaiIhQiazVK1SW
lxZkS2bsssyYYQwZs5oJr5Ai8fv+8fxzruv7fM91nvM5577XuVw95iYuJibW
ShwJ4thPScyqaDPRW9i1LSWVCp473XZMtwE6WVE685K5mA75FflmPw1id7QN
CypImJcWY1Ul5OOrhcj5vjYLI/QeymctChikI64y0wOop/09Zz7GRb59gsK+
iG7wO9YtdfhHBK2cay6QG4DY67rDj9cwUV0/vj+1QwR1yWvb558VYvzTDall
FxhwnVNKVitlYhgci/wHVPgY3zmjMlqP2pmIN6FvuHjt2H40y5eGwtdSy2/X
klAcFyX5aZSPRgH1kZ01C4/ie9YMuVGw9Hr1bn1xIbz97JAkxkOqpX5aXXo3
VsWVZ9x7JYJTK87uURpAzIMI9WfKTNQn71smJPJxdtikr3tGCPXpnLuHPBkY
+jPepD2/FzQlNYHIiYr0jF4dJYt6kLlDDXatXAR5/nxgMEjDkb/XCmaZJGj/
Kcu9KimAmY5wlV4MC9crLoe/4FNwqUxHx3OpEKsWvNVwWsfD06IoTQN6N775
TLI634gw3Xlim7jaAHIT5hzVXsUE7enGza9oIlxUufliz2khTMvSxL94MXAi
a1CyeWUfEpbI+31SpGJFk2g4cW8dfp7q+eePFA/z9Z8+ncqhg39HTvPGDAln
K/epftwkwI21Dub/jLOgmeM1VF1IBb4WZaltEuJ99OTuQjseHmcYRgRpMbF+
W+IT3UIR5Huz5z/QGoDNj8X1LAUmZvwVF1xgiOCnyFZYYCOE504t365oBhRj
Dyd8mGXBMtLhi3IxBfJ8H62OmhocmFHL1z7LQ0q28qxBUSdqYnrH7LeSETA/
qcvASQDt6ffKWX79kPjBmhfxsgPtk28nlMyEeBnvSDmWyIOarGz2tzQmfP7z
mteQJYJH8E7ROeUB6BRHtj9ezYSWRJ3cQ64I83zjn/foCJH0aOW3/j4G3l/g
7bnYx4buGLk8ZzcFZ+P7dtuzSGifyOyVJ/OQQ9X4PBPJgPrGDdss6mtBevln
wZVEAShbN7qLj/YjIbpg42EfGoSV/h+XWQghvWZpypMUHqS/exxfmsnEWj+N
WYdAEYRnbmm1Nwnw/mlwSTxRt5ltY2kpv0QIetygtH+OEDtCZW2/X+7Ghaw8
E4okF6Iel76nAVSwCuVub/Ak4ZRzRJfJKj4UrfUS5j1hIriowai6vRFUXtGt
2mwBGi9aF5jIsWH8TMr7Tx4Ncw2X/LRUEeJVo6mYnxEPbNgwHkozcf7O2wzh
JhEWCUxXTuoJYBkQ+M7Blglx78klxRwRhpNcm4weDoAe9OCc2hwmTGV0UPWE
i8B1HJXObTRokE1615aSYOM3rLTnIB8qidUnq5N6EDY3P03Q3QyvSrn0d1EC
1CVd/fy+qx+UqOSHgQdpSDxNffO8ZQB/Jq62mD3iwi55Y4Yrm4FrRjnklxVC
PE885HnCm4+HfrfjYsKYSFWzDV54UoTTzKrrNo8FUMxpO5VvyIR29/lQ42Eu
uNS4L2KH6KgNeRL/ZIiEnG0lrOtWfBR8KgyT+NSDeoXvynzFrxBFUJLfWQvw
NeuM5cSxfoRlfzqt6tYBbde1ljFOAwhyzJaLes7Bal+zEWPzLqRK81//2imE
e5XrkI4XD4f9TYfenmRiNOeS2ZFKIczca9sSffjo1Vk2DSLPqmuZ1FCCz8N1
a8NlRuj4Q+EXFy0i4+DLJ/+u3cpH4OvmZR8lejBq2z1yoLAJ73MWVtwUE6B5
bxSu+7Egd9pnUTDBQe3XJScmaQLkFfXYDAaw8djuLCvDjg59eli8VvgAXqTJ
Ji38yYFTs5/qOKMLa2SCXK8sJDjPa7VQk+XBplZh/YpP3bC9GT/5VJeHMh1/
5Gl34t6aJRsL5cngRMf3/5nhIV9otmFK2I3X+l/P+oY0IFCnTmpHFh98x+Hl
du3fsD/73kPHF21g7anoubZHAE2Hs9K56v2oUPntJiHXgQrtrDNqNQK471x2
NMWWDe5iZ09NJTpCOsqt7Qn+Fb9Hv+nZw0Hgnr/zYl90wjbT71asBg+bPYea
Nkt0gqV/8L66DBlOIX9Ltap5sDo24ZR5i4G1uput6wprYW8ivs3ShI/BL9kP
dCJ6oELOmSdf0ozBzpAVx4r5+Gviv/nNrj60Vbxj0Oa1I9vr0IUZaQHKrcyf
daaw0GJbsfjVHCpySVl3VI4KIHtYes4px37sDJk6mu3dAY3nOjVpk1y4eFdm
D3jTIW8ebCY5TsJHyZQBX28eXNY92NA62Allg/bkjbvJ8MpJMgrt4kEhmS4v
M5fYT/t2LXIvrcPuFYW1V7T4qEx69fHu0h7sW+EjntnchFdLu4PHiD4Ojqq5
uDypF7maOxm2tBZ0XaA5jT7nI1Jgn/8r5xuW276fsLjZhpn7W08mfOHClrt0
orqKhiIXhwtbO0jgVpY6WsjwsCbFab/pezrK82Sn62dJyD0uKvF25OFaM3NY
+lUnTmYNpC7fTEa0WDf/9UsedHsfHtEv70Iu+6PuBq0amAYpl58h8h9TYDbp
SXQjcU3OWFVJHW4sr1zgPs1DD984Nby7G3OFjwJbXBsw6Cr3S+kOF6unlLqK
fnRg5oqP6Xg+CUbK8/9ey+FCZ0d/TF0gDXuTtuol1ZGwh3QjwZzOBX2LdsJO
cTr0XttxR/tIqEiMJB8g9qjnxc/a4+F0WOWHT7T9IkFzIEGNspGHk30/BRoL
OjHOyv3RS/SDOccr9/whHjTUVGJmgzvxrXWj8t71ZMR7yV9U1OWC5bIpsnRB
B6wUTHTY90g4oUTXajHnYvCeaauUaQfCzecmy8eRIBg3rNl7mgv3Gok/N0M7
oMuODldNIcF4+WL9o15cpCos3dn6uQOD5313/ckk4fcnV4+REC5qb+W8/Heq
A+r6NXsfFZBgu+ZR0mg8oR/ctpU+30HD7mWFc1uIuXfoAacphscB86hXhsJC
KgJ/05KVTpDwLXX53F4RBwU/i4Z7lajI6x0vVnYkoTp28xr5EQ60NG5fd95E
xXUlBlXuNAk93nJZuwmeXT6cfJ6mT8WU1t+Vc86SED6dH2g8xUFiXmVBlAWx
ryWDTnxzIer/hZShNctBidVqU1VHKgZtNBk5biQc1vnuPDeCg8lK7wp9aQqM
d6y5VbSTBIn9C/KzwjiEXjJ16ybid/8mBa3aTcICwxmFfaEcSPEjzwUtpkBa
PiUgUp+EAION3i13OLgfcevQOhkKCsRCs8UNSMjzVTx/+BYHhuaxnxuIONuS
4xwJEhzlI25X3eRgw4OiM35LKOh7k79FxZh4X5VMY7mTbIyfyTr48CQFQVs+
ix1wJ0PspnqouhMbEQMqVpWOFLT121ptciWDu5ust8eZTXy3yGPYgcgnUE1B
+iwZzGODR46fYyMvY7WCMhEXe0nzGjhFxuK7n6r8PNhQPxzQaW5PgdJanKxw
IOPbc7H4lxfZ6Dtqvcb3BKGf2KiJsCPDqMLzVqROP2LjP1VrvaGArpQdcCqu
BpIaN5KnT/Qjct6GvK7nxP3SDOWgSzUIGGrbbRbUDz6TG3YwgYJDIZGZVQdr
YGwfahHwsh9XrmzWCIymYJcxc1JZtQYu7tvfp9T1w8rQ9NWlEArUxS0Xhv0h
o/8dew95mIibyVuvDKDAQV68g0MlY+SDnuSO9Sw8u1b0dnKE+K+dqvZURi32
hi41uh3OwiIr+XeynRRcPFApfXtfLRibh5rdB1lI5kk56JRTcEdl2O80owat
ZzM9+4/3I2DQptn9BRHXN21Mu1IDxRRlynh1P26K9TzICqWALGe9T1+sBs0l
M6PvdrDRNhvFGCb07vwbi/5ViSHDReOCWrrLN5i9WB02q0VFybrY3MakOkzF
JomtY/fB5MaZTb4zFExdWne4tLMW7s9+/Dr3iYXo03v0sxoomF6/K2hauhbm
Jf1T3Mh+mGeumi54TMG44+2RSb0avL+4JNbKhQ3F4AnHLOIdD+SH+v9yIsN7
e+9/14w5SNE6SIlbQ0HsjqtHlINISL00dvNhVQ86+QmFiuepcJTR0DxxuR5v
eV+MbIm5n/PjWevECipcnjUxNbbWYaWEpg2Fz8L4UbByKyhY3d+qKtFXgxix
7fQb+9hwkHX/N86F6KuQcU/tu2RcO382XSKZg0M1HU2GKyl4KH2QrLGFhH9T
rxoUzeVCpcX3baInFZeiO71bz5Pw6rf68b0XmFiwsGPoxFMq2k8EV8muasC5
E58n/re8D6rtXTOlBO9PjP4r9d1Xh88eG+Uy/Psx5L/s151ECnLfkpR8rWog
Lq6WISB4uTOSI3OJ4GXWzi/utxEJg/PiFSw0uLgSa/JK1EWFBF/vjj9Rh+g1
Mq/+V8uF89/G3fqtNDxQHTSqp5OQUBY1ruraDdebT0bYxVSQ3SosC583ID7j
Ue/joD7Y21rE0KWoeOHGZCpL1aEk0l/W6Sobjk+LwnTsKGhKNymoOEpGun+J
z4wMF8//No8oRVPxNnVOY/YVYm5Yr4ibz+Pi+kPDf1q06LjwllZmM0DCvRSZ
1ytKeVCNjiRrHmKgSzIl7NXRWqw6k1LX/IEBsecHRD0tVAyHPRUX/mrAi+8y
HpMGLIhb+XhuFVEQ/Hm1GzeyFukaGq6Xszh4mec5GWxEgd35DOjuIEF9y1XD
/0q4YDLnXPLIpOFZ/u8t+1tJaK1+HynRyEPsx0NKHnkMiP+8HhUmUwddnw+b
1pfxce+1Qv6tQ30Ick3Vubm6HZInBycc3BgoTrX0Ps6gQi91krZapRFpocGr
18j0Y22KmeHR9xSsTzTZZ1hcgxDtjntumlxUL6ut0BukIvXz8gMjt0l42hFZ
tjmah1eXs0MPGHVh5TGpQ/YHyRDNHPe5/pGPni8/4iO29MF5Mr20eaoNvWu9
zFSGBXC00rs/L4+N+O3rFrbl07G2Vpy/JJiBH5/y/HbSqdAVPTmuvKIRU1Id
u/R12Sgx4u81IXhctTbs+aMoMo6l+qz16uTC5KE8pWseHS1/+TbJhB8p51Tn
lTnwMer5+pydZC/MRj+aGRR9hTGlTJxfL8C//prtxafYuFMeWiZQp+P7tFlj
8REh8vKpyi5viH3r6aGRVMSEX17nMpX53dAcNJfdQKZC3u3x4uqWBoyt/++n
1UsOpiy++JltpyDaoWyTlRYJ/32qt24j/FXfhhvzXe52oUP6CO1SGaGLVhxZ
kq4rwIObV3foKfYjbdHeTMffhN+VLlpbIiOEzl7K5ahVPDTxhg1cmruhVzFE
Uo4RYXmmc+zKEQHihn0v52swMSXb5tazmImA8nS6y0sqJpRTQq3NGzDzhTFT
t4kLRsBxwTiHiriy9DfXbhFcWLwNP27NR/MPb/W9lT3w+1DuYKT2FQGbl/Un
HB9AUaQoe0c0B8/O2C28v5HQ80ZNG75BBIerS8a9zwrwIZ67TWTBxMvck6vG
6CI8izUvKXAQ4rTh6st3AxlIU5Ih6VVz8WG5cXJdNQ2BGSXWUYQeIyWeKwmQ
E0D+xvaZLR9ZSPLYOsvZQUXs/aChTeFChC764xQqxUdVee7E/XQmjhrcr8v7
TwSZZg/jMnkhlF9r7aJod4NNc9pZTxcipFp04u99If5h60ToetIhds7mY4sn
D+GSbfmj3Z0IWcy+MapD6OSO2IBZuQFoqx67sECCgwmvxLgz+zqxtXRemvwz
ETSHPnhcEB9AgRR/REuNidueB46rEv73XWOG5LdeIaZHR33fynSBt3SVT9QR
AX5LJDav0xvA3GUPfBjkdmT97Vvxawkfh77MLvc/zMS7hNat1ZaN4Di8NWKt
F2JFwRGSnSUPQ13/iz+gzMQL6aiZuWwRat3JPsV7iPsDKy5IfGXAS19SxiNg
AO/GXC9epQzgcWSrejuPmAed5r7+bzgormnQvvCMD0ai4LXndQZmpG46Ty4W
IewwZ1nXXAFGFj267uxM9MHq7dtGXxD+1CfTQPRdiDHLNrNZQSdSnH4vGC3k
Ieprlb3sbQHeHYl+zOV3IDAn2j5lAQv8elUDxkIeqlktkrF72XgVfSTehiZC
4SmnbZ0+A0g33jqVtoCJ3GAj7u2KAdgcHFM3mBiA4fgUTYHwg4uy3y25WMpG
1vzwfTcI30aWKmBoP2TCdlA6kDnLwIc/3Crpeg7i9Bkadr8EMHvsVFb+U4Q7
iZtqbOYLYeLlNH/qTDd8PCsfRxC+WiKN77hTcwBKW9khfsntsHdqPe/4jIXK
J5dGeQd4uLr+6jHGpn4oK74rpV2jgxnzpuydFAdPFTQqu49+x/8BBRfXQQ==

    "],
   VertexNormals->CompressedData["
1:eJwNV3k81H0QlqQo5Ygoqo1EUtEh50T3RaHQK4lKJLzlqgghklzlqhQiR+5z
neM+dp27bhHWYh37Q6XiTe/+Mf/MHzPzfeb5PN95SBb2+re4ubi4WjmxkhMP
4iR+JtY8Q7L9MfOd8wR+VC2n/z2cDp2rvOaYu33Qv9JXxmWOQIcd3HSWYAZ4
TaXx+V70RG0evZlXMwRW6P29/pQvGwwagvcmdrnghZh3w7vHCFxvrHLVQScP
Mop9az+zbZC1qvyx+RcCV0T9irvQWQi5WhQbeVUdrLeJpAe2EhhxoSiFu7kE
ArcvTbCkQ9BMctttf07f+I8XVx8wSIcV26PCHqaGoFT+l0q1WQJ5eZTwSEIG
OKQrsnsfBqBnkDBf2BSBeTeZF7SqsyExzI/PmvwU27MFHvuNEpi04a/cUlse
uCe0ukrP3sehZJ+XtT0E3v4oqFK4TIa6sJIdJ4xVcdsxqX65FgJtBHBKTrkU
+F+o3pBe+IBfAnuParMJjFqldHrfp3R4Eb5G83vVexTIVNclcXBYrbOme0w6
EyJo+3+0qkehiuXb+V0sDp5V3JTbW3NgYubrco1IKPabb//8eYRAnuMJW1pV
8qE6dkxQVt8DbbufZXR2EXgx4OTn10FFsPNGFantgDN81aAFuzUSeFXY1CP0
QRnY80uMOLkno9h1J6beBIH2HubxTeoZcP1qq16ScBKuWX1YJHGcg1v5uLIU
VxY8lXeL1twYj0EWJNYsBwcdh4yubnIOBDBiT5ptjUJbOdXx8K8Ebj4s8vQn
kQ/RE0oOzsLnQMeKns5FI3CjUJPurFgJtBdzb9DLjge7O+ekI8kEhmgpbZY8
WAELlbRTzstZSKYJqlQMEihXsbwzY2smPP+QVCHSmom165LX13Hy+CtOUDMl
C36lfB8l9X9CsrJfsSGnr797/+HHdbngHVy3+PVMEE4o5bK4ODy5tu8Vz/Tn
QrA5aEX9fPwj1JjFfnhcQWBXjymVrl8O99y39ye9IIPEi4qZaG8CpwOkXAOe
VUFVndt9+SsF6GNn5HamjUB9gSv6FKUseNGf7LKZlYNbN70vNOsksCk5cC15
IRv4Q3QmEwpiUXOkwnLNAIHCHszVbRIFsHt42t1EIgIc+lSu9XLqeL2TeWw1
UAztvD7PtYbJsGlzWYtrIGf+zOBvOg6VIEx6dpQkUgch8+fCA4UIXB4r87c5
WQu8u/Wui7MKMf2n7WrLBgLv8YtWba7IhvRp0c1CuzLwjeKnvGLO3kX3R9Uv
1+RBjrK3Z/mWB1CY4aI7w5lTgyJ13HmkCLweH1Jbt5QDxly0LwVpBPat8MzP
EkbYTb1ydK68Fp57x18yJxFoRL1sLSddA6bpchG0123w6sLCiwO6bHzns078
2akGqMv0tnLtzMEdFxWJOg7PB9KP8/phHsjX8AsycqOxn1niK8uZZ9vvYmPZ
NUWgzsmvPJcKrX83lksWE8j474Cy4edyCLRhhKiSKqEi2K5SwpJAgcRpuYdS
VRBiQv0iPtsK4gX2yjsd2FhR45M5oFUPKFjgsN+yC7puviSkFGewG9ZZPn9J
heRl4VoDqyQ032TTV8fRge+7zbxidhaBUOUhVUOzMNAbfhKzu5pAhdFHHvVN
5eAkj28InhII8uA30X7C6bulvmaDehUMGqPDWHkjGGu5V4wz2Kg4FjKSfKEW
htS6UM+qEzz0vut+uj2D9ocENl3rpcAHRoEX394vsNPSW0YmeQrLChWV6aRW
4HV+tKLc1w8bp/fwOiGBo03cpRyagmKAl87l8iwgnXX+YR/C0QHl1yt4LlVD
slBnd8f3GmiUWgpq20SgVp+9Zyq9Ft5clvz6k9IOL/8GjlA3stE6UyZV9mwj
CN692Od5sh8C6ImF3swpvPW1WvUGuwXGAmejhkWGYWPDo8PSsSysvWWncux2
O9xS3PtW73ksFMfILBm+IPDBgFL+9221IGlbdttIFOE3y9WlSI6zR7tF+diU
BshO7ksR8myGBCOmDK81G8Xs/1XvqqfApvi5yG8HuoGS1MMdSZ9GPoud/028
aoGus5fcSJFDoDPQECrbx8Jy67qRJKIdHsxftzjLNwqiI7vjhmfGMKHtD15N
p8OKpyK8u5qLgN484aQkSGB2x/go1wQVYs3mCbp9I5ArHfsXr7JRdE/uz73P
WsFTL1DXkbsDkiwzglI0ZzDcka9ZLroNimWic3q3DkAHxXmv8/QkboyeTa9K
pQFrY7hozH0GjAy1w0PJcRTYrnlTZUcniF69rRFKHoMqMTHy2B0GOhYcf+07
2gVpejH0pYp6aI6uzWKKsrH40UuyxhkahCrZ/Juwlg7tXx38dSnTqLvko2bp
0AEe0oznDQt94JTKTqzaPoWlQhZ/+D50QIVl8PAP6jBMxIeadu6dwOD6Qblp
Uhf0WDgVz44w4R/RpkH8zsCdXhWSJLUeGEzUrDINmIBQaX3BN+NfMfyb1RGl
wV44eTbM2HieBmkGAgVR9CkkOXtulzrXC/KyPHsk9PuB3LKJ3m7Pwl87dykq
R/VDIOOca5bZMLCONhcJPBlH6/5IitWWPvBRvneTkjsKfjUZgd+rRlHYRHM/
JPTCQSWG6dvJcVBxwJ2nkoaQGnr0U6ZdHyTEHyh9+YYF7QlN9OJj/Vh/jluc
ztsP+3PMtN25vsAjyqli/aExvDOWyzjlOAxcpNN/1s5x+HbFymffOQYe+seF
bSc/AjKhvNr3eJhgp5/ebe46jDpPg4L2JQ4Brcr3suu9cciVun/FpW8QLSe3
eg00DQJP9JPzssdY8HupSuiKXB96p7NequkNwKXVJ3iOH5mEE/Qh+ZSbXZh5
qFdyteAApGWQPhZeGYHWFN1YbeUBlOBf3PitgQlt0Ycjs4hROCSVarkw3Ikg
EZfKF8EEr6NVmX6/xmD1Beqpm1/pOFCotT9rlgGDn0R/nH0xATZib+Qm59vx
reud2ykuI/CYnvKmtZoFltnbarP42nCF5VEXqwPDoPZ6FrtdJsFcn4d2ebQO
q5+Vx39eNwy6H661F4WOgp3qkdG7ffWocGd0cqJuHLpzO5iRxZy9x8xX/l1X
jglUqxrX/eOgZbw4xTUwBp7W5lefsEuw/ajv9EOpMXDYEH7xQvs4XHr7VdJl
vAg7E/iHOrYxwWSuY2T7hwngypeJuDtfiAsLmqlbj4wCpXil5ZviCSjQaHIM
HUlCrvaFemXtUWAVdxzj42KC41zc5qNF0WhgaHawmjQB1BwnlrwGE6qlmtJr
VHxxrX9wfiMxDgO1Qpq7njCh+7mm6UiBNxLrF8iZeeMwT8ugWJKZUJJlP8hQ
fIo1a+u0H3iMQ2zJXLvxFBP0PppRSiM9UfWlbRHPxXGQ97ngqH+RCZGzdzrn
HK3AoPpZveUgp37wb5NHpaPAO7YydPKsG16/+OH6uusTUPwmY8pImsNPh5GO
ntJEnK6odmd1TMBTq9umTGDAzzrRYPuNSah+JPVTnC8LVj2yOd+mMQK0yvAT
7r7J2AS/bMdhEl7TiQd/RIdBw1Zjj65AKkbwuRYsr5iC93Ju/340HwCx2278
i4+LUMFOwUX66DRsu3p5z1IqA9Qk3eXufKrEh2PGnv59E6D9Pv1ic/owyKdE
X+K+1YwtvrvFNySw4KpB/YNjtAF4+q55i+qfVswe1cpWkp+Cf//t3CG9vhsU
W+ypoNGOG/rVNONeT8N60gvP7EMt4JvpZbH3LA07Jm40BZJnwNBDLGfOKAuE
/ezu6NztRWnLswvz52bAMiOs6HL8EJwzqk46qNWHpqfYv82WxkG1tD7pm0kv
lE5z3ywQH0YRG49dLsxxEBAQYcbptMCkhx5x13YEHzhJ9f+3lgXveuOfUrxS
IcRzVuSMFgP5NznJ+3izoCx1FzznrcLc9AqfgusMvOy6MLdZiAWtRuF3uRto
+CBq0dPoMxODVeP/a45kQtirscs56t3wcsLy3UGlMbS8J5M1y2KAUmdDa9pL
CowD+aPiPha2M3KHciJHIPMtqSF8LgJezUnmDa6bxHJnZQuxsBGgOv1VbNlZ
i9FXupV+/2Fh1nDq+qqxYQiamxMnnnSieaxvssFmFl6VJl0azxgC19L6Os+W
PmS87lLojmHhGVZhYK9dPxidIeyMFikQl7a74cznKeRPunFIdd8AxDSPNmhM
Z0NDftPlLNIMrmpf3iO3uQ8eb5jQrxAhoyv3zyvip2ZQ4NxN46atvVA5NhW+
XN6KbXJSK76mTOOp6T2zhjHdkJu3x9vgUQ/uEjS4HuPG0duDuaKMxk74YG7V
c5raj0rvdvDFGk9hXsF2oz1qNIh/KCrkvKMEjIJZ6s1ibLxqVFJUmNsBbzcZ
n1dIdcc1fFHHVqWy8Tah+u37WRqo9ErdXH+tCtMle+5OOrHxZcMy/YRhO7Rd
pgkl7G/HWK1VxrGlM/jQWk0iR60Nfmp+tJ5X78GLC9t7/BKmUV9T5G+wdAtw
t0TTnWl9yC7+zhI2mMZNd8ExebgR/iV7cheUJ4KXs+sLqY0E6pmG6RSsaIGp
ht5ul+5kdLk0khR7jMB9psokw1cUuL6q4h9Wdw1GaLDUN86z0eRvasazdY0w
YzlVOCrTjmrC4XNvjrFxUfO3NNWP8y+evlgWubMbJdfuGWi5NINP1NvCyBvq
YD2/ltGUVS9GnP+5OPRjGvuU+U53hFTDA1mFypX5DtB8n/bby5NzJ3eIMVe7
14FT5HEBa+0ctDDoL6f7Etgbs5MitLYGgk5NhkeTa1GG4u+hs5dA8Y2DdiuH
q+CQ7HKXVWobHt7jcNAljI1nsk6G8/RWAvt2wKfw9k4c8PcL1qnj3GMSdT5R
+yvB3KIrL6i4G//REGqtvz+DaSV+leyVFdB4c/M/YR6vUd1m6Y1HDoHRneJ/
YswrYcfob9eilHwMtGOX30wk8Ffx9DKxF+GbV5u48nQtFv/TK1ekRyAzQMCk
zbEMOk4HtW7pa8VUo1UN0MhGqTjBkZexpbCVR1EoRbcD80+qyQST2Di80Ngg
P1gKBJ9h2N2NXbiFP2D90c4ZvNNQ0p3eXQJ3fpRyJZnHY5x3Y9kBKoG51BkF
w2clIFCQVr7YVIiOb8NH4vIJlG945CvxhQwyQyYdUk9qsbZsCx+XFcfHlR9Y
8Wg1GXYVjtn/JJpRJvxrjssCG1VUKPodFmTotuCVPrVIw6TPhwU7brFxNP/s
e7UjRTBJ/c2lXdOBYtoR8emSbIzQrdDLiiKDBc+VMy1rkjHLus99HcfPCpa7
hwceKoDzg5b91wrIaLD3qZsb546l+mQpeNvlgUHbaXtKRA0adixS3R8R6Kpn
LFwVmgcf5xmPhc82YY96xkM5cQKtBsL2JZnkw0kLeJrLTcPHTrYDrq/Z+NhZ
gW/6fAE8q1FrUmymo3hFiM3fC2zcJqoWG7O+AB5Eqn3+cpqMOmka1xTrCDSN
Oy+QqJoDIi2k2F/bS3Flwv7E/RwfEZrlkWM9mQ2E+s9F9eJqjLomovDyOYGV
V3YpBK/KAavgFzd6Fag4ozza6M3h1Ru/qlDKlxw4PXqXrqHZjgs7np37U8DG
uuveAVTRPJjRbsod66ehd6jub9GHbAxlXng1cy0PQm6W1dzvL8VteVkmRpy+
eY1LpD2JWeDPvGZrolCN80Zhse9eEXhzRlhkRUsmVPj31kkKUxDXZg1QtQmc
bKD8ub8iG0y4/S3MTNrQ6YZiz8deNh7OZi6XpeZA7qoos7KudgwpGi1simfj
b+djsm+scoF9LVVcbFM5drq8M3YvJHC1tNaMbHQmNLPIeksnq5Cr3yFd6gPH
R1+MHJN5nwayQ4e8TcIakMnIIrqNCDxsFKIs5JYJRm4ZFvnzLVj/nJz49hcb
gz9uQeOqbFjr+4H2i92GjncfLXTXcPjs2khTZOVAOdUvOLWxBDfMT9Jjajh6
8sFqRMg2FYZmFOX9NKuwdmbLWiKW40PLJoXLiFS49ylf9fZSHR4xXcxctiVw
6ccg2TMwHaxV28rnFJpx1I1b8IQogYoemVxVOtkg7O192ietFSu+XbGPZLFR
nhRKY2zPhYckuR8k5wq8Q3luEJvNeVfMc4UN71NA5Z/fSWXvalDEOuVXgD+B
PWOWOt93pIFhb5CznSMFE98lkQrUCXQXuzt23jYbOtRG34r+R8Uh/u6rKVsJ
jNHeNVoYlgcHTL/y+S+RsW5amb2O48eZWtnlVSVJoK6kbFsYV4H+9YMn+jII
5L3hrdSr8RkOJdcJUNRq0fS/9F83XAnUrXPPMMjMgXNjrnqMnBp8/czTV+o+
B+cxd8Px3YVgdmK8SCkiF6etpqwVhghc3Lz/7VPDT7CLcbj3VlEZbj6YxGtX
QmDbA5UP31hpkHLvl+wW2Upcb0FNvRtNoARpz8JH/Xy4Q7xOX5tVgSmnXwWs
4vBK4qrirUaODvwPbnqWrQ==
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{302.510137529662, 218.12546832582447`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 10.}, {-21.612223180509815`, 
   205.53382440785202`}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{0.19687801948030526`, -2.927188585510576, 1.6860622854159641`},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{{3.7591918653549304`*^9, 3.759191902426245*^9}, {
   3.7591919979355392`*^9, 3.7591920245528803`*^9}, {3.7591920706983767`*^9, 
   3.7591920966912985`*^9}, 3.759192132028846*^9, {3.7591927306444807`*^9, 
   3.759192730847558*^9}, 3.759192879257176*^9, 3.759192943160103*^9, 
   3.759193632488619*^9, 3.759194728165352*^9, 3.759194788876601*^9, 
   3.7591948203899374`*^9, 3.7591950227280054`*^9, 3.759195244324439*^9, 
   3.759195440337123*^9, 3.7591956522817574`*^9, 3.7591978127140427`*^9, {
   3.7591980529072046`*^9, 3.7591980680852175`*^9}, {3.759235083678792*^9, 
   3.7592350957542887`*^9}, 3.759242841391944*^9, 3.759246239585266*^9, 
   3.7592479095900497`*^9, 3.759248603008379*^9},
 CellLabel->"Out[69]=",ExpressionUUID->"8f50f33e-3257-4a9e-81bb-401afc2c569f"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJzFmXlUFFcWxpFmExcKQSnGhQYbclQSwAiuwJWAQBAUGxcWWRpwiY64IG7J
DMYgykASxw1DFDQqIplkxA09Gpoxo5JxRcCjBmRAUFEE4qigQKYP3e/V6Vv1
iHPOzJn+557743Lr60e9990q7FVJsxINDQwMFvYxMJAZkE+rt4HeR6FGHHQc
9DnH4DyDyxlcgTj5fayHckY91sOjiDnWg+tIdGLooZxRj/UQjq9DONbjhHIS
XRl6KGfUYz2EYz2EYz2uKCfRneqRVdek+UXZqBFn1GM9hGM9hGM97igncRLV
4zyje9OZjeQ+o5xRj/UQjvUQjvVMQjmJ3lTPZs653/mfHTBn1GM9hGM9hGM9
3ign0YfqYXBGPdZDONZDONbjg3JdTPWV1iNwRj3H4DyDyxkcr4+/tB6BM+rx
+hCO14dwvD7+KCc6A6X1CJxRj9eHcLw+hOP1CdTPaZwurUfgjHq8PoTj9SEc
r890lBOdIdJ6BM6ox+tDOF4fwvH6hOjnlM9k6KGcUY/1EI71EI71zNTPSVSH
SusROKOeY3CeweUMju8fpbQegTPq8f1DOL5/CMf3jxLlughhVM/G4muHa74b
gTkkTzUOtP7BDnEOspY3eWxNkCPOQ0zY6oRLDzGXQ1S5CXy+yB5xBXTu+mP9
tkYdT51N9fjXRha8v70f5nDb45vnZcGYc2C5LyMv0hRzHnY93nX0SIk54nKY
q/Tlfp+CuQJOvthWFjNGx9VzqJ79HadluYeelCAOIaab3j3q2YQ4B0a555zs
Kh4hzkP7jst2wxc9RFwO4X4zjc63NyCuANmGmNEWaQ+03GAe1XNpvPOQ4NnW
asThcMMgv+DgQYhzAPLKrIYJHOI8WOy8kHH1vf6Iy+GqUbRZ83VTxBXATTl6
zU4p03IIp3oeO6e7W7bbYw7JBUMLp4SMQFzz9zr/pmPZGh5xHjINnaPHLh2E
uBxcH6t9F8wzQ1wBPlZORkfuvNSuT2oE1aP7uRpxyK79advQpJGIc1CdWN/v
YPxQxHkoiyvMWlE3EHE5LL98vPDWnEfougoYGDpBHvOVTJurI6X1CBykOQcv
ipbdDCjjEedhsuPuoo4nz0v0uRxyKg75Lx9rga6rgNFh/3A5scpBl8+X1iNw
kOYc/K4s9LDZJxziPEzcN9bkZxdz1B+fP/NRTs6faGk9AgdpzkFmWmu+T3hd
iT7nYefivS9S149E/ZEeyrF/xUjrETgUXzPPMJlsjzgHb/KVp0utBqE+2L8I
x/4Vo5+TGBsrrUfg0MpH2FZvGYI48gvKeQaXMzj2rzhpPQKHz+YePhXsp9uP
lGP/Ihz7F+H4/olDuS7mMfQIHGRZM5r/OsAS1SM9eQw9eQw9eQw9oJLWI3BG
PcfgPIPj+1mln5NYy7gu5RyD8wwuZ3C8j+Klr0s5nvcIx/uFcLxf4vVzEuUJ
0telnGNwnsHlDI7nTEZ/NaO/mtFfzegfmyjdn3K8rwnH+zpRP6dxgXR/yvE+
JRzv0wUoV4B9fZrLju+twNku/+ugr++R917q/kGn+kad/NVbFdB0Ofl0B3of
1urdf6hN38sLa2g94cb8Z+aeD4T6JZ7vzAlaq4C16VUfVu68Reszvw2NnL5n
GDQ/GbJ/1sF21J+HaSln09/59S7qz4P82VdDeEehv6F1zsv7uS4wYc/O9TkT
j9P6te4Okxdxo6DI3rmgwe0l6u8Ee0uVubc2lqP+ThCatzhkYOArWj+gY8O0
KW5jYb1zapVNexvq4wrhJ6OtTT45hvq4wrHa+9EHXP9F670y/Nf8yWsCBNUb
V5msa6T8bGzk4/HWbrp+5EP6uEPxYeOiB9NaaP0/b1UuPnvfC84VbX3me7MA
6ZkE6TuyM/ZvrUPcGwbvurJlu80hysd1+13qWiS8/yH83mJHi6oGJaRHVC/p
P1XnlxrOXw/zsChUQuOlvi2lZc20z6pbXuH7Toifj0rHfLxn+hUlxHgkKNsv
G1Ne5vnc16pK/NxUF7T9Yc5m8fNXKESsXtoifp4a0x3VbPhaCU1eVr7NJbaU
H8ts8pkkE55rCD9yb+q6YPMwCEmOrasoFHjAlf21llbC8w6Js7uuxX1XEw6F
RxuNLtjT98Hq5rvdLX//IgLWD226Mm5pN+VmOS89E/cK8zbhsnUj5pn8JMy3
hPcEzVz6xbynnaYnOmmf8pXckg0pkXDqSOxK07/I9Os1c+Pk2zYGbWMEfsb9
eELA8SgYOdz81etKgc+oiXD/w4wocC9P2VI+zgF9v/lw/2D7R46nDGn9ja1t
dRtHRUP2yVl3H9r1oTz/zY6DVyqiROu5ZnhF46E7kaiv0N8vwetvnKEd5ebV
suofssRzY3yS7c1xb+aD8qMv/+xfbKvfRzMH+oLd9wuKxXNmelx2wGs34X74
JtOoweZADHzb0tbgvltYz+quxRcrA4X5U6+/Zq47V+UY5Z3Uqb9/NTxsU3qH
7ftWtD7zxpe7nXzE89tC0weD3DJjwa3YLVc16pV+H82cVmA/9sGyqWK+zOyq
vcv1gbRPadO5uY1JsRC2+dHEV4sE3vhsdcCkgDgoXCL7tC2rDZ0zcfB0fsqZ
Ph/8IuLRDa9N03PNaJ+c2IaWUwlx0Don5fqJZmE/FqxOPtoqU0F+y43xDiaP
aJ+A6A+jzzuqdHXIrzXzVeOPqgZT6yf619Xw7BVm+RcP0fsQajxWXbiboQLj
0bs7LV8K539XhWvKpxPjIWhLvOP0A+j/LZp5qdPlvWu1a+v0+2t45C/yZ4Fl
dN/B4Cflc64nqODiBy33CldW0/rUYYOTis6q4HPbpeOHZAj+ciAnLaRrgwoG
JK9wf9p9m9b/eGdY/QvTeHB+9+NhXd3PRX6Hfa13fxT7VO9+J/ad3v1L7C+9
+5TYR1h+pI1iH+ndd97eX3r3O7GfsvydrBv2cda8Qf4ueK5gzT/aKJ5zWD71
v/ZHli//v/yR5Xcs3+wJEn7H8lOWb/63/FEb394HtSrEfsTyNe33FfsLy6d6
goRf9OovEud/r34hcW6zzn/ttxGfw6zzlnXOs85b1vzAmltYc4g2iueN35or
8PzwW3PC284DPeE/8HdtfHu/7gkSPturX0v4JssfWT7I8ut/A0rNshM=
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNk8lKQ0EQRV8bBAUFcedKxHHtPPyFoOKEZnDWJE6JSYxkgiSC2SQL3bhy
5X/5A6IoutBb9BFcHG51dVV1dfV7A5HEYrwtCIIVERJFkRMFURN3oiHKooTv
VlREXYy6IBiWjknfyHsV+yIuDtizmBcxL3tHuiCNiGfZUXyH4ojcE/JNz7GP
iEnCpUiJY7H7b9/OTIhT9sxv9WP/ztjF1+COTdGuPu6lP+Ib/5fokP9R2ind
EA+yN6Uh4tvxWQ1br2ndkq5Lt8ST7G2bgeiXPUKe1bS8LmK6pT3MpFcaxrY5
NajfYu41el9y/j2WnZ+RzepCfIqq+CC2yn3KrOvUatLDKj1b73vM3d5hUOs+
6ZDz71+kVorv5Jp3SHBuEtt8aXHGO9heRmTpMYMvL66IPSU/xTdk39I760vO
O6R+krNz9HRDnTzYXol7Vrh3Hl+Z/SLrNGdcE3tDTI5zs9Q+I3bW+W9pDj2g
r0jgZ2dzC2NHyC9Qb9z5vQnn86LEx7DNN+l83pR02nn/jPPzytJTiXeoMQ/L
+/tHkswyzowT9LHPGXaPY2LK3DfPOsUd08zD/L/7/3dp
          "]], 
         Polygon3DBox[CompressedData["
1:eJwt0blOQlEQxvEZtJAEGxMNGlGucSkUIXGXt9DEJa4gUmqtlVREEmmw0MbK
ysfxSSSuwUL/k5nil/Pds94zJ6lebl2kRCRBP9ZU5Iy2hnXyH+0DOlC+d9Ai
32KXXMcYtjGMcbwyVqLNYRKLKCCPIzwy/oRjco/2Dk38iK+xtUVMYNb2oH8G
c+RpjEr0kRMsYB5T+KK/gRt8iJ9ZiDk2dwVV8TuukjfU73qOTXKX9hpXeEdZ
fayON3zHv9oZdtYe423ae+yr18Rq046xGkaQtX2QVr+71bSPvISK+D8tx52L
UTOr3SCeo14D5AP1s6yGh+pv0oka/uI05r+gEmdm443srT6jNnbHbryB7W1r
TshD6mvtO0P+B6VtNTM=
          "]], 
         Polygon3DBox[{{355, 170, 272, 278, 356}, {290, 299, 298, 25, 291}}]}],
       Lighting->"Neutral"]}, 
     {GrayLevel[1], EdgeForm[None], 
      StyleBox[
       GraphicsGroup3DBox[{
         Polygon3DBox[{{327, 146, 328}, {322, 134, 323}, {338, 175, 340}, {
          337, 175, 338}, {336, 175, 337}, {145, 151, 146}, {317, 127, 318}, {
          208, 7, 214}, {212, 13, 218}, {321, 134, 322}, {334, 169, 335}, {
          318, 127, 319}, {140, 145, 146}, {332, 163, 333}, {340, 175, 276}, {
          139, 145, 140}, {324, 140, 325}, {134, 139, 140}, {216, 19, 221}, {
          330, 157, 331}, {133, 139, 134}, {326, 146, 327}, {221, 19, 224}},
          VertexColors->None], 
         Polygon3DBox[{{320, 133, 134, 321}, {329, 151, 157, 330}, {325, 140, 
          146, 326}, {305, 1, 7, 208}, {218, 13, 19, 216}, {319, 127, 133, 
          320}, {214, 7, 13, 212}, {328, 146, 151, 329}, {331, 157, 163, 
          332}, {333, 163, 169, 334}, {335, 169, 175, 336}, {323, 134, 140, 
          324}},
          VertexColors->None]}],
       Lighting->{{"Ambient", 
          GrayLevel[0.8]}}]}, 
     {GrayLevel[1], EdgeForm[None], 
      StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNlulP1EcYx+en1nbRIJjWbUAajqYriqigtXiAR8Gr6i5VwYpH/APaP6W+
aV9YktImoolgBC8QEFCRescY0zQ2bapJr7T1tUlj/H4znw374pOdeZ5nnmtm
frNVx79o/3xWCOF3MVtcEaNiSHwq9ojdYh9jyz5jflBsE1vEZuzasfF4O3rz
CTL/7hI50Sk6xGFs2tDvFFnsOrA9gC5HDNu2YrOdHLahy7Hub3z/JVaLRtEk
VjBfAyuR7cHXbmpoJ0fHPiS6qHkf+v3IDzDvRN9J3CPousjnG/G1+ArfHdhm
sctRU4v4WKwVG8VHYh3yTeS8Gtl6fi1vZl0LeTj+UXGMPTuKr43Y5uhfFj+b
2MfNjNuwb6Zvawpimg+R5Ws+wto29mIvPcqGmb1vZ76fmg/Thy78rSyI00Qt
zncreeyiRzuZb6XmDazP19FKHmmxWFSIMlEpykVGVIkPQtz7enq6ir43wFp6
0EI+zcgta2RNE/k696X4q8NuuViGX8tqxRLi1aPPn8tG/NZh34BNPs4S7OsZ
Z5g75vv4rmVcQ2112NWwppb8ljJuxEcD9stYYx/vse6M+F6cFtX0LUNPq7Gp
wb4Cv/XEqcRvFXEy+LftuwU+MuTn/VrEnnWHeF98b57h63mI9+ck8rlJHM/R
7yv9fin+R/+t6MH+BLoK4qbxfQK945WTp8+Tz1crNbv27/Bln6fwsRA/Pch6
yekksgr8ur5fQzx/v1HfO8RbTMxq4nQTK43/Uubd+HaMs6JPzEtiPkVJzNf3
LcteVNNP33nf/YPUtYPaBsQlcVn0i0Fxgfkg+oviHPIryK2fEjfFD+gG0Vt3
VYyE+H5cRD9U4GMY+RB2+XWXWOvxKHLrb4nb4o7rFfO95yHe+x3U9JMoFk9F
Cb11j1PIFyDz79viLeQparhNTY51nfEb7isxfZ58dl4iS+Grn33I9+s8dXiP
TrFPk9Qzge9rYgyG0N1Afh3GWDdOnyfI7Qb6EXo1jm4U2RT6SfwN42sU2Rj+
ppiPFPhwL31+fDZK6V+afpXRv9PU1gcD1O4+nEE/jx55H84ht/4C837yGKb+
SeLfZH1fQV/PEmOA8Xn2ZQ4x/gvxfP8r7orpEM9JMXl7j/4J8V3y/5ty6igj
zxJqNfORTdPn/Lnz+bjH+Ba9G0funEMSz4a/PVXEqCSPadaUhJkzuCjM3PsN
SXybX4T4bvoN8/vld8vvnN/LLcit/5m6fgnxjfOb5G+Uvws9IX4nFlJLvq4S
Yi5I4pksTma+Zb2s6S3Yu7n0+AE9dR1PQrwzP4b4HzHFHrgv9+nNbGxSjGcx
Tydx30qTuCbF3hXRE+dXxHfszST6u4PPB4zv0+9xYj7C/2PxkDxt+2eI/yP+
EK8BqksQ9w==
          "],
          VertexColors->None], Polygon3DBox[CompressedData["
1:eJwt0LsOQUEQgOFdESQSIoSgoZGIt9G6RqPjUWg0GpVKo9FoPINCRAhxiful
Vkj8k53iy8zumd05O9lGu9jyGGPi8OKLDrr4IWmNmRDHSJCnMTVuT769iDVU
8USevQIxhxOirEfEIcLkH2Jdz7xxQRklPBCyrnaAIPla9hDAAmftVcEdN83l
jqv2lN4ZHLDUs/LGOfZIIYYN/Nb16sNHftSzUrPDVmvlH1YyI+tqe3IneRMz
42Yis4lYN6uRvl1qejpTQ/4HcK0riw==
          "],
          VertexColors->None]}],
       Lighting->{{"Ambient", 
          GrayLevel[0.8]}}]}, {}, {}}, 
    {GrayLevel[0], 
     Line3DBox[{211, 2, 3, 4, 5, 6, 12, 18, 24, 30, 36, 42, 48, 54, 60, 66, 
      72, 78, 84, 90, 96, 316, 239, 238, 237, 236, 230, 234, 233, 232, 231, 
      235, 91, 85, 79, 73, 67, 61, 55, 49, 43, 297, 228, 226, 227, 223, 225, 
      220, 222, 217, 219, 213, 215, 209, 211},
      VertexColors->None], 
     Line3DBox[{7, 1, 305, 208, 214, 212, 218, 216, 221, 224, 19, 13, 7},
      VertexColors->None], 
     Line3DBox[{31, 25, 298, 299, 300, 301, 302, 303, 304, 210, 284, 285, 286,
       287, 288, 289, 290, 291, 292, 293, 294, 295, 296, 229, 37, 31},
      VertexColors->None], 
     Line3DBox[{240, 102, 108, 114, 120, 126, 132, 138, 341, 342, 343, 344, 
      345, 346, 347, 348, 349, 350, 351, 352, 353, 354, 355, 356, 357, 358, 
      277, 339, 282, 280, 278, 272, 274, 268, 269, 264, 265, 259, 261, 255, 
      257, 251, 250, 248, 247, 246, 244, 242, 245, 241, 243, 121, 115, 109, 
      103, 97, 306, 307, 308, 309, 310, 311, 312, 313, 314, 315, 240},
      VertexColors->None], 
     Line3DBox[{133, 127, 317, 318, 319, 320, 321, 322, 323, 324, 325, 326, 
      327, 328, 329, 330, 331, 332, 333, 334, 335, 336, 337, 338, 340, 276, 
      175, 169, 163, 157, 151, 145, 139, 133},
      VertexColors->None], 
     Line3DBox[{253, 144, 150, 156, 162, 168, 174, 180, 185, 190, 195, 199, 
      203, 207, 206, 205, 204, 191, 359, 283, 281, 279, 273, 275, 271, 270, 
      267, 266, 263, 262, 260, 258, 256, 254, 252, 249, 253},
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJztl3sw1WkYx0+OtqZUu61rqU4lqmUSXZZR35I2dDghJdLGhNalTRe5blpC
SlIphKIYNlEUitwr18hxHBzhOOf8+B1UtG5lWTv7tz/aYTGdv96Zz7zzzGfm
fb/PPM9y61+NbcQoFIrdDAqFOnrOtujsO2BTj4zI3c6m9UxoRA6y5GmlkJZN
fcY6WYuGy4lZqXN5iJRRymkw6phwLvKZXj6K4UW6hw0E0GRIxWa5s5FTnVIV
t7Jo0nwK3FPz6YNCeL9YfbX1cTvYLt0GDv0Nk+YTaexU2fK2HgmcndaUfB7O
mmhed5FpnzQfERdxERdxEf+X20qwd9kqtsLCyInB7RRApcdyxYe6RpxNHClh
OnBx+cOIc0yUAE8U89Q7NjajAMIZfndbkHXNRzdAX4CXiRbvnkpxkbzfJk79
eTN0IhgatQN8hCWonJQLbEXRfdvyfM0mnBJ3WPUggY/KTWuz3fp5UHU7oxWR
1wijnOjdWuZ8vH599TjVUgBWm3F/6AkhbO955WbWkbjlFZqnHsjGPDdl+qez
Qqge8FZNbCaxgRvwpCmWDTEqr/1KkBCtzdopaQSJgGAzXSKLjRv7zynZ3hKi
q00ztqmLxHdcVw0rFhsX/TqcEu8IETAwrJXSSeKmxnsqV8AGP+HH03axQgx3
pAX0t5EQrzFxetvDxrGF4fFa3iRs9S513qYQMFM9d0s9hoMwf03apwASQ6et
iu5/S8B/WI2mE8UBZWGmS34ICRPfpIwSGoFrbmIb9oRzkKvvuSwsgsTBnM9l
1PUEMt3SrUxDOZj1tD3d5y6J3GRbwyPbCSw5FLjCKIQDtXVZ8wOTSDxWHerq
NSJgH53K3hbEAeF8qjFKKEDxAPXhtuMNKL7NaBELKYa3D2uflCEB50Ft3/SC
RvSNqKitVK6AzccQRmcaAR8XqrjFymasyMv2Te2ugu12c10d+TaoRL7e7FHS
gvknaBVrDzIhP0fOtSy0DYFaOuc93nFhWJ67eL8jC4z3Nf5ei9pxPl1PPVOC
B+JSyqKXe9iovrhYPyylGQK/cwpLZjJhyCT86d0vIauyfKl5AQ91cp+Ui8Or
sVHNYZn0jkJUVljmucwXQGGremx1Wi0uL1+l0TpSCLXe0jPKugSOBu/mHrnd
CNkoR74kUQ76iELPLL82eGgG/e5ezsUpgwdXStVY2EstfyMpTiK+SpYSLi6A
vJKG1qW4hjHnw+FQj3nSihzM6GSfXR/NhNiFPy3mbilBTV9ulOZRPuyzTQO1
4mswW8GCZh1TiJSHAxJLGwiYHutJr6S2gB7ND5CqeYPe7CT98usk/Hrbbvys
SCCJMujTfZODX5irgpxKhGjYmeBr8BsJ4as69adS9WP6jMV/2Nj3064hPpLt
I6xM3GuxNZ9Iu9hbCP75mvrD60goaNwxGrYSoODzhabIHRw425VZPcod/fc+
e4O/8SRBL9vBTt5Wi4gbitrfy3FA82DMsxbjo1HZjn6yi/hin+OGXXm8eAKW
1eFrXVhNcKR//uB8rwoDhsYV9NG8uGT88QTtJKL19uVJj+ZlvOb5Med8xivu
7Gf/vDvlebY9gfTE1M0q/hwEO5apOYvXwa1WqaXsEA/vJJ28pdnkuPnYFWiz
/Ida4HLm/tDHjGrUuq55NqfkBShZi/TqS9shQ5PrUvqrHa5m5nHJXjUTvu8Y
LDCKMfMUwHSZmPyWBXVIyX9lfmDrxO8dY/nkr+7eFC9BQu3xGktJGQG6HpU/
YhZN/N4xls9eZpzJwGheFEs8U4LWkzikMdO8ZzPrq9tPRVzEpwL/0lx8bfen
Sx0R/39yMV34uM11oj4zvnPyNKkvuj81+9J051OtT05WP5zufKq9i4hPLz7V
/rOI/zf+N92Mh2w=
    "],
   VertexNormals->CompressedData["
1:eJztmHs0lPsax6VdiZIKYUdJdilEtSuFp8S2K5XIJbmFUESlkEsIRSldXBKK
CqWM+52eMSb3e+5CxoyZMcMbFaXS6f+z5qzTWmevWut4//ysZ/3e73N5f99n
vbI2rgbH+fn4+Bxm8fHN5uP1vIUZPsP/G/6xrEXXfToDC1pEtpL7CFQkT8uT
ZNJ/mp6yCp+zCsZ5GORi4rOnicBDC40NalQzfpqeJoWDVhLsfCRNOs+zrSJQ
QVCMIkXO/OX6OMNn+Ayf4f9v/MADi+bCW3TYr7aN7tRdicqO9GFWBRO6s1sZ
0UUM0IobL/u24AWm1DpQPVWYsNN0isPXOwQqJ6zNLo4WY/POYO4F6SFwXhSp
v7+ZCQNx/cs9mIXY8ljwTesKBhiPtdJWPmDB1vzVUU7j+fh2QiNVZhsdGopm
294rYkGJZt25W7QU/Ng0UblxFx3YRa275/Mx4NxYotTOwhg0PGy5uVyWBbVZ
59kK6gwol65Lo24NRqGQ8Nxqggm9LxdrrLnIgI5QDXNaXiASwhMF6TlMGG8h
1dgWMKA4w7VvUOkSUoUqdrn5MSGheKzZlMOAg48sa0qi/VHtunPhb/pMUAja
f85AnwHRbx3bxs45gGH55Urbvu/nh3864lVCh7lDs28N7/VBK/0HVgusWFB0
j8QxkaPDldO01s6SJOSSy33ZrSy45GBvzoBBmKgQC3cVTcEd21KTE4PZMMfr
pF6TOg1ayiJ1fIOfYB18dGbCMES8Ity+ig2AurO64oGFqRg13zNvehYH7q/1
OfPIuhfE7X0Ep7wLcb3Leg+5nVxYYWak+Dl1ELYv913rmFyGF4ZM/UO6WbDr
fpp+fdoAKDyNOcR/vB4bgtdJLHrMhqOGlW67W3ohIK7+d7WvjZhB18xUVeDA
mTNtq+SEO0CpwbUW1JtxUc92jcQILgjLXvPP/LMBgtMDbJT3tmAr61hdWMEI
HPYTzxozyYAlV1wctZy6UM5278T4vhFwJN0uNHr4BjaZlKds1uxGS93RT5af
maBRUpny7kgXFHH57fIkBnDpSb81HgwmLFy4lJGo1QDDfgcJJ2caup2X7vki
xIa4roeXagJS4ab/26V7NAdRcNl5haBANpSkroHQuRTMSiMH5VkNopHnxJjU
YjY0mkQ68Ve1oNvdKX+TZwwMV3v4pT6awXPOC9qqGp9fr4FGKHiktIGNjMHs
N1nRNAiPla2KHIuCu2PLc/oWDGO++0Yb8ds0qD3/TalB/iXGGHeofvrKxoyB
VGHK0ADcGBuTIC62oXVC8BNDKTaayckeYpLegGdJZYV/QzcORrSv74hn4x52
fliXS88Pf48XFrEMyEsL0JN/0lhCdwSF99mZ1sl0QdkQJ3L6RSM2rZWe1f+U
i7pcxbeH4zugMEcx0NCrE/8QMbSK9+Gg/OZsscHqNoizduj8u7YHt8Stmp9g
ysG4vJUmittbfljPxi5pO2ELCpKWdzoNnx/Fq1XTr3QON0O3UcvixyrNeF9z
jmlCyQhePLFdMmt70z9+X5nPIR9ld1AxSp29Q3R8FA9/SyVdXlAN9+04+fTV
zbhsSeTYvd2jWK35Sa72SuX/7L3norUXntiVhTaGPS9eBRP4Ol6+ZrEQFW7o
DkfGFLzE1TUhflrKBEqK9rnMHqD843XYRP/kWfg0F8NcRl/YJRE4VsSdJpTx
p/nIVO7zF1N1+XguNpKWmEvg2iqvYMnXBT9NT0CfbY9FXgEaKF/y8UECiaCM
9YEuOb+c/87wGT7D/52fTZScTKJexnzX3dby4wQ+Vnvx6tuWtF9O5wz/z1xW
x4b2JagQa9uG57HKCHxELg1hHs/65XT+05zU+NehoNBh2Bz6oU/6QiYeeLlS
Lha/75PyfDZTcp1w1rcAE6foeDdbKax9lA4Xb9tZGBC10GoU5iQmyUEPTnqh
olA/2J1JSn2Y3A/7dZ4acPjfYIHpvsXM0iHI/QgiJy6+gGs7fVrLMjjI+na2
I3BtP/ymlL9XzasFZI8Vbg2jslBERu3xdQEaHOFfuMOcmgz6Q045+Xxc1Jfs
W13S0Qf2t5bwu6wIR6P6GPJz7xHMjciR1X7dCSfcOu/kJ6VgRElTGkNhFOcr
RI2SFdp45huR5558Jj4bpbS5fctyRpF0q3P/abNmWHCl3XNqbT6Gr5v2pnwc
RfazFVf0BBr+Z3X+Um130T8nA93NxE/3nyTQ52ii7pK2Cp7x/vLBv6utKcY/
CyWu39xAoHvkRIzBX9U845cKaUWp3o3D6SnB9oOpBK4/UVH+RJr3vjfJSWm/
6RGBXwfNXhpEEXjNSWDWX0bUH85Lv3H84fGIZFSRtSqlUAmU1ZUSFowsgb/d
tUzE+R5jkcO9vZZFBKokVx3b/fLH90CVD6w/m3c9R6q2SqRpC4GDjvWe76fz
4FZI/G5j71QMtauc+6iOwOrbQ+rS1oU/fH63vd7kCoN09A016/67m0DLENvS
9EHe98CEPMOUf1E6xhk2ue5tJ3C0+I6Ew70f399onrCvbV0Z/ubnmK2aQGBX
zFV15ztZIL7aSNw3swAFSOMZVpUEDkz4936U4f1fWrWzz+F6dzHq9hypPVZC
YJnYodIGC97xq2rpGkWCZJS35A7i9zn5vLI7WUKSd768/K47TUXq1oUgDGTF
u677zvWMKFrRemlAtqPbZwfdxqPSfSNrxwicH7Fto8axNDhKiER6qMXgMxfm
zRaCwNhOmmNpZBp8Kt/TtuZLAk5u7qHEjhBYfn9elH11GsSYuVwdjXyM1g+6
XNZzvuu02OedvpIEwZ/JVyOsn2KA+cpz9kwCtVebRD1wJ8F5UQaXY5OGdRXe
gRcGCZz93KEVJkmgF6L4pe1kJtoWm1P9ewkMT1pm/OR8Osh8AvnkgmxstPCX
cuogcJ+h2ldx8Qzw4ZTGXc3Nw2idqg0lDQSaRIZKVLpmgFx/1UH+3/Nxzdbc
gz61BJJeLUldfioTWCdvGB4Xy0PvmzU35b/PYfzUfJ12J971dJ93KjZbPgPT
+/O/rhsg0CLitcLz07zz4lUHXnXjVWdefeHVR176v7EbxlQLaSBtEOSgxm7H
99Ju9QJ7mPDBVYrqF0wHFRdN+3cG9cgSEYh978KE01XybcZ+DBgMlnx/5k4t
GlqGOjSkDcHbE++26OkPgU5JEzFbshZvWMlto7MZoO6TIcf8nQk5s0Mt0u2q
0cFJ7FTsZgZ4VEx4+FOY0FPBIJe8q8IKaYFmIoAO2ZMum2QdWWAouO+Ool4l
JjGcCsZ7BqE3gJLI5bJg3TTV5QO9AmkyZyW+7RiEYm2hP7rc2ECRYdcs1XmJ
AqpHMmjJNNC09FsY28sGGcudbFEmFbM2NDp+kKT9cn49w39Nzus+5xVf7K6+
4PnhHlx+VWTuPWEuZm6yoq7cXwfd/HkRjcM9eCy77bqwDwc/D0yoiSg1g7Kn
bHjLrC607DDtV1rGRe0Ev97comZ4uiU5ZO+jVuTP8rQU0B/BJyl19OnQBkjy
vVfP596KWs9cDrCjRlDZxo8y7FkDU0U+d+ctaUXRudzd73tHkC5j38gyrwCv
u8scKQrNmPuIZPXVcRSrm2WebN1BBa2N5t5iHrX4LmQyQH9kFPNWJb+TEKbA
7cYm0V1QgUbmzn+80iBQrj1I9NQlMkzuPxq2zpqMIcQe90NBBHo99K6ndZeC
kEzUcLYHGa+dVt6+6QaBYWFwJ5hRBD3rbbVD6WR0ojwdVY8gcE+O12U7Zj5o
dllc8fclY23264fS8QRWVTrkrJmTB9Iinc7tCWScZXDsvVAigQ6Bb9UdludA
j70rx+ZuIbLO2NeIft/nBR3tQtOSePspL9/8UX/8F8ONqcg=
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{302.510137529662, 218.12546832582447`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{0, 176.}, {0, 10.}, {-10, 10}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{0.19687801948030526`, -2.927188585510576, 1.6860622854159641`},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{{3.7591918653549304`*^9, 3.759191902426245*^9}, {
   3.7591919979355392`*^9, 3.7591920245528803`*^9}, {3.7591920706983767`*^9, 
   3.7591920966912985`*^9}, 3.759192132028846*^9, {3.7591927306444807`*^9, 
   3.759192730847558*^9}, 3.759192879257176*^9, 3.759192943160103*^9, 
   3.759193632488619*^9, 3.759194728165352*^9, 3.759194788876601*^9, 
   3.7591948203899374`*^9, 3.7591950227280054`*^9, 3.759195244324439*^9, 
   3.759195440337123*^9, 3.7591956522817574`*^9, 3.7591978127140427`*^9, {
   3.7591980529072046`*^9, 3.7591980680852175`*^9}, {3.759235083678792*^9, 
   3.7592350957542887`*^9}, 3.759242841391944*^9, 3.759246239585266*^9, 
   3.7592479095900497`*^9, 3.759248603059058*^9},
 CellLabel->"Out[70]=",ExpressionUUID->"76cc5aa5-679a-495b-836a-7e01e75f962c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"heeldata", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"angleTable2", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"Norm", "[", 
        RowBox[{"angleTable2", "[", 
         RowBox[{"[", 
          RowBox[{"i", ",", " ", "3"}], "]"}], "]"}], "]"}]}], "}"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"i", ",", " ", "1", ",", " ", 
       RowBox[{"Length", "[", "angleTable2", "]"}], ",", "1"}], "}"}]}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"bestFit", "=", 
   RowBox[{"Fit", "[", 
    RowBox[{"heeldata", ",", 
     RowBox[{"{", 
      RowBox[{"1", ",", "x", ",", 
       RowBox[{"x", "^", "2"}], ",", 
       RowBox[{"x", "^", "3"}], ",", 
       RowBox[{"x", "^", "4"}], ",", 
       RowBox[{"x", "^", "5"}], ",", 
       RowBox[{"x", "^", "6"}], ",", 
       RowBox[{"x", "^", "7"}], ",", 
       RowBox[{"x", "^", "8"}], ",", 
       RowBox[{"x", "^", "9"}], ",", 
       RowBox[{"x", "^", "10"}]}], "}"}], ",", "x"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Plot", "[", 
   RowBox[{"bestFit", ",", 
    RowBox[{"{", 
     RowBox[{"x", ",", "0", ",", "180"}], "}"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ListPlot", "[", "heeldata", "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{"%", ",", "%%"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"root", "=", 
   RowBox[{"FindRoot", "[", 
    RowBox[{"bestFit", ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "30"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"maxTorque", "=", 
  RowBox[{"FindMinimum", "[", 
   RowBox[{"bestFit", ",", 
    RowBox[{"{", 
     RowBox[{"x", ",", "0"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"avs", "=", 
  RowBox[{
   RowBox[{"root", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "2"}], "]"}], "]"}], "*", 
   "5"}]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{
  3.7586435575490294`*^9, {3.75864396505441*^9, 3.7586439781773634`*^9}, {
   3.758644049306178*^9, 3.758644075301672*^9}, {3.7586441123565817`*^9, 
   3.758644130931915*^9}, {3.7586442894939203`*^9, 3.758644329034229*^9}, {
   3.758644384713863*^9, 3.758644406018221*^9}, {3.7586445538913865`*^9, 
   3.758644754092163*^9}, {3.7586447869253273`*^9, 3.7586447892551823`*^9}, {
   3.758644884951273*^9, 3.758644955119653*^9}, {3.7586449928766856`*^9, 
   3.758645073332575*^9}, {3.758645105530493*^9, 3.758645235716374*^9}, {
   3.758646220589179*^9, 3.7586462574735727`*^9}, {3.7586545446317587`*^9, 
   3.7586545524405227`*^9}, 3.758654640429271*^9, {3.7586550521343117`*^9, 
   3.758655175375614*^9}, 3.7596240472665987`*^9, {3.759624101249344*^9, 
   3.759624132430669*^9}, {3.759624172329842*^9, 3.759624184935665*^9}, {
   3.7596242750028143`*^9, 3.7596242932757273`*^9}, {3.7596243468103437`*^9, 
   3.759624348976309*^9}, {3.759624406669154*^9, 3.759624443283757*^9}},
 CellLabel->
  "In[187]:=",ExpressionUUID->"77a5c266-0ffb-4f89-b667-0ec832626888"],

Cell[BoxData[
 GraphicsBox[{{{}, {{}, 
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxTTMoPSmViYGBQBGIQDQEf7Bn/eCwwczV0gPAlHDLzV/CwLDKC8tUcGm+d
vdh8zBTKN3B4FX9U8HSNFZRv6nD2f9T62TEOUL6VQ0HobOtdfi5Qvr0D23v2
mFA1TyjfySGzxeWsPosfhN/g4qC/Ka9+/78AqLy7w6bJy2Y/7QiCyns6VFdU
uTktD4bK+zj85DiSLpgbApX3c3iw63NZyQMYP8ChJWeL1tefUP6BQIfzGasE
M6dB+QzBDv9n3lRZ8wJqnkOIQ8ns+pd7ZaD8hlCHddqZnnfNoPYfCHMoObha
ht06EKo/wiFd5LmoiS7UvQ6RDn6Gam9OKsH8E+Vwjqtw3sVz3lD90Q5/FpeE
N+jA/B/r8Dlabv9kHzeo/jgHo+nvGhWdnKH64x34hH43rJaAhmdCgoPRgqgf
DzZZQvUnOtxrMr2ermoM4S9IdODZeXye61lNqHlJDtlvnn5eXakI4T9Iclj/
ud/QKVINan6yQ8LbKUubVkDjVyHFIeC9xLU9060dACpvlVA=
       
       "]]}, {}}, {}, {}, {}, {}}, {{}, {}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 161.}, {0, 83.90558879489441}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.759624043377006*^9, 3.759624047850861*^9}, {
   3.759624174457636*^9, 3.759624193428005*^9}, 3.7596242942527723`*^9, 
   3.75962435131691*^9, {3.759624417733624*^9, 3.759624446143512*^9}},
 CellLabel->
  "Out[191]=",ExpressionUUID->"1cfe550a-1717-493f-92ed-a5c89dae808f"],

Cell[BoxData[
 TemplateBox[{
  "FindRoot","nlnum",
   "\"The function value \\!\\(\\*RowBox[{\\\"{\\\", \
RowBox[{RowBox[{\\\"2.4636747821537564`*^-6\\\", \\\" \\\", \
RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"-\\\", \
\\\"2.540459847828173`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"70512.75832592178`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"854969.8507601283`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"379556.5713780622`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"7.849036881071242`*^-8\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{RowBox[{\\\"-\\\", \\\"1.030413417256914`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"40347.6045389474`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"338706.881583742`\\\", \\\" \\\
\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"155331.07135355688`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", \
RowBox[{\\\"0.000013634627504805514`\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"1.7853649208234537`*^7\\\", \\\"-\\\", \
RowBox[{\\\"39710.12140171012`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"619272.0846690714`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"270792.29870553553`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"4.412501853207682`*^-7\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"2.1775799005672768`*^7\\\", \\\"-\\\", \
RowBox[{\\\"72668.79976894484`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"720683.0610058876`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"325055.75957420527`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}]}], \\\"}\\\"}]\\) is not a list of \
numbers with dimensions \\!\\(\\*RowBox[{\\\"{\\\", \\\"1\\\", \\\"}\\\"}]\\) \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"30.`\\\", \\\"}\\\"}]\\).\"",2,192,184,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446164003*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"a02e4e1b-c68c-4e6a-9947-4f06ff444216"],

Cell[BoxData[
 TemplateBox[{
  "FindRoot","nlnum",
   "\"The function value \\!\\(\\*RowBox[{\\\"{\\\", \
RowBox[{RowBox[{\\\"2.4636747821537564`*^-6\\\", \\\" \\\", \
RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"-\\\", \
\\\"2.540459847828173`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"70512.75832592178`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"854969.8507601283`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"379556.5713780622`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"7.849036881071242`*^-8\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{RowBox[{\\\"-\\\", \\\"1.030413417256914`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"40347.6045389474`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"338706.881583742`\\\", \\\" \\\
\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"155331.07135355688`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", \
RowBox[{\\\"0.000013634627504805514`\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"1.7853649208234537`*^7\\\", \\\"-\\\", \
RowBox[{\\\"39710.12140171012`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"619272.0846690714`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"270792.29870553553`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"4.412501853207682`*^-7\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"2.1775799005672768`*^7\\\", \\\"-\\\", \
RowBox[{\\\"72668.79976894484`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"720683.0610058876`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"325055.75957420527`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}]}], \\\"}\\\"}]\\) is not a list of \
numbers with dimensions \\!\\(\\*RowBox[{\\\"{\\\", \\\"1\\\", \\\"}\\\"}]\\) \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"30.`\\\", \\\"}\\\"}]\\).\"",2,192,185,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.7596244461727657`*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"e98554a3-d9cc-43d7-a6ff-86249c094c6a"],

Cell[BoxData[
 TemplateBox[{
  "FindMinimum","nrnum",
   "\"The function value \\!\\(\\*RowBox[{RowBox[{\\\"0.`\\\", \\\"\
\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.16666666666666666`\\\", \\\" \
\\\", RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"117.45799397692478`\\\", \\\"\
\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.02322536294858477`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"1.`\\\", \\\" \\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"]}]]}], \\\"-\\\", \
RowBox[{\\\"0.5687157998229143`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"1.`\\\", \\\" \\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"]}]]}], \\\"+\\\", \
RowBox[{\\\"0.23049170186542844`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"1.`\\\", \\\" \\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"]}]]}]}], \\\")\\\"}]}]}]\\) is not a real number \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"0.`\\\", \\\"}\\\"}]\\).\"",2,193,186,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446178537*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"7936694b-bafe-441f-bf05-af1cecd4f06f"],

Cell[BoxData[
 TemplateBox[{
  "FindMinimum","nrnum",
   "\"The function value \\!\\(\\*RowBox[{RowBox[{\\\"0.`\\\", \\\"\
\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.16666666666666666`\\\", \\\" \
\\\", RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"117.45799397692478`\\\", \\\"\
\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.02322536294858477`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"1.`\\\", \\\" \\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"]}]]}], \\\"-\\\", \
RowBox[{\\\"0.5687157998229143`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"1.`\\\", \\\" \\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"]}]]}], \\\"+\\\", \
RowBox[{\\\"0.23049170186542844`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"1.`\\\", \\\" \\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"], \\\"+\\\", SuperscriptBox[RowBox[{\\\"Abs\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}], \\\"2\\\"]}]]}]}], \\\")\\\"}]}]}]\\) is not a real number \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"0.`\\\", \\\"}\\\"}]\\).\"",2,193,187,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.7596244461790524`*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"435b4543-6a4b-48cd-9490-7890ef5d8d8e"],

Cell[BoxData[
 RowBox[{"FindMinimum", "[", 
  RowBox[{"bestFit", ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0"}], "}"}]}], "]"}]], "Output",
 CellChangeTimes->{{3.759624043377006*^9, 3.759624047850861*^9}, {
   3.759624174457636*^9, 3.759624193428005*^9}, 3.7596242942527723`*^9, 
   3.75962435131691*^9, {3.759624417733624*^9, 3.759624446184214*^9}},
 CellLabel->
  "Out[193]=",ExpressionUUID->"393ae2ab-ca82-440a-9634-b69e4c171732"],

Cell[BoxData[
 TemplateBox[{
  "FindRoot","nlnum",
   "\"The function value \\!\\(\\*RowBox[{\\\"{\\\", \
RowBox[{RowBox[{\\\"2.4636747821537564`*^-6\\\", \\\" \\\", \
RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"-\\\", \
\\\"2.540459847828173`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"70512.75832592178`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"854969.8507601283`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"379556.5713780622`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"7.849036881071242`*^-8\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{RowBox[{\\\"-\\\", \\\"1.030413417256914`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"40347.6045389474`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"338706.881583742`\\\", \\\" \\\
\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"155331.07135355688`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", \
RowBox[{\\\"0.000013634627504805514`\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"1.7853649208234537`*^7\\\", \\\"-\\\", \
RowBox[{\\\"39710.12140171012`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"619272.0846690714`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"270792.29870553553`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"4.412501853207682`*^-7\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"2.1775799005672768`*^7\\\", \\\"-\\\", \
RowBox[{\\\"72668.79976894484`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"720683.0610058876`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"325055.75957420527`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}]}], \\\"}\\\"}]\\) is not a list of \
numbers with dimensions \\!\\(\\*RowBox[{\\\"{\\\", \\\"1\\\", \\\"}\\\"}]\\) \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"30.`\\\", \\\"}\\\"}]\\).\"",2,194,188,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.7596244461848516`*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"6209d3f2-f85f-4c81-a6c0-d8bcd2c4b511"],

Cell[BoxData[
 TemplateBox[{
  "Part","partd",
   "\"Part specification \\!\\(\\*RowBox[{RowBox[{\\\"FindRoot\\\", \
\\\"[\\\", RowBox[{\\\"bestFit\\\", \\\",\\\", RowBox[{\\\"{\\\", \
RowBox[{\\\"x\\\", \\\",\\\", \\\"30\\\"}], \\\"}\\\"}]}], \\\"]\\\"}], \\\"\
\[LeftDoubleBracket]\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"2\\\"}], \\\"\
\[RightDoubleBracket]\\\"}]\\) is longer than depth of object.\"",2,194,189,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446191628*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"95cb9001-2af6-4794-b60d-f812e3f82f70"],

Cell[BoxData[
 TemplateBox[{
  "FindRoot","nlnum",
   "\"The function value \\!\\(\\*RowBox[{\\\"{\\\", \
RowBox[{RowBox[{\\\"2.4636747821537564`*^-6\\\", \\\" \\\", \
RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"-\\\", \
\\\"2.540459847828173`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"70512.75832592178`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"854969.8507601283`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"379556.5713780622`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"7.849036881071242`*^-8\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{RowBox[{\\\"-\\\", \\\"1.030413417256914`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"40347.6045389474`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"338706.881583742`\\\", \\\" \\\
\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"155331.07135355688`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", \
RowBox[{\\\"0.000013634627504805514`\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"1.7853649208234537`*^7\\\", \\\"-\\\", \
RowBox[{\\\"39710.12140171012`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"619272.0846690714`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"270792.29870553553`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"4.412501853207682`*^-7\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"2.1775799005672768`*^7\\\", \\\"-\\\", \
RowBox[{\\\"72668.79976894484`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"720683.0610058876`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"325055.75957420527`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}]}], \\\"}\\\"}]\\) is not a list of \
numbers with dimensions \\!\\(\\*RowBox[{\\\"{\\\", \\\"1\\\", \\\"}\\\"}]\\) \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"30.`\\\", \\\"}\\\"}]\\).\"",2,194,190,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.75962444619635*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"6858c8c6-7cb4-4b83-8b5f-405f573814b6"],

Cell[BoxData[
 TemplateBox[{
  "Part","partd",
   "\"Part specification \\!\\(\\*RowBox[{RowBox[{\\\"FindRoot\\\", \
\\\"[\\\", RowBox[{\\\"bestFit\\\", \\\",\\\", RowBox[{\\\"{\\\", \
RowBox[{\\\"x\\\", \\\",\\\", \\\"30\\\"}], \\\"}\\\"}]}], \\\"]\\\"}], \\\"\
\[LeftDoubleBracket]\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"2\\\"}], \\\"\
\[RightDoubleBracket]\\\"}]\\) is longer than depth of object.\"",2,194,191,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446203083*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"3c4fbd22-541c-4cb7-8d74-f4721fa72dc5"],

Cell[BoxData[
 TemplateBox[{
  "FindRoot","nlnum",
   "\"The function value \\!\\(\\*RowBox[{\\\"{\\\", \
RowBox[{RowBox[{\\\"2.4636747821537564`*^-6\\\", \\\" \\\", \
RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"-\\\", \
\\\"2.540459847828173`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"70512.75832592178`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"854969.8507601283`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"379556.5713780622`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"7.849036881071242`*^-8\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{RowBox[{\\\"-\\\", \\\"1.030413417256914`*^7\\\"}], \\\"+\\\", \
RowBox[{\\\"40347.6045389474`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"+\\\", RowBox[{\\\"338706.881583742`\\\", \\\" \\\
\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"-\\\", \
RowBox[{\\\"155331.07135355688`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", \
RowBox[{\\\"0.000013634627504805514`\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"1.7853649208234537`*^7\\\", \\\"-\\\", \
RowBox[{\\\"39710.12140171012`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"619272.0846690714`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"270792.29870553553`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}], \\\"+\\\", \
RowBox[{\\\"4.412501853207682`*^-7\\\", \\\" \\\", RowBox[{\\\"(\\\", \
RowBox[{\\\"2.1775799005672768`*^7\\\", \\\"-\\\", \
RowBox[{\\\"72668.79976894484`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}], \\\"-\\\", RowBox[{\\\"720683.0610058876`\\\", \\\" \
\\\", SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\
\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \
\\\"+\\\", RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \
\\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", \
RowBox[{\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \
\\\"\[RightSkeleton]\\\"}], \\\"]\\\"}]}]]}], \\\"+\\\", \
RowBox[{\\\"325055.75957420527`\\\", \\\" \\\", \
SqrtBox[RowBox[{RowBox[{\\\"Times\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\
\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\
\\\"Power\\\", \\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\
\[RightSkeleton]\\\"}], \\\"]\\\"}], \\\"+\\\", RowBox[{\\\"Power\\\", \
\\\"[\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"2\\\", \\\"\[RightSkeleton]\\\
\"}], \\\"]\\\"}]}]]}]}], \\\")\\\"}]}]}], \\\"}\\\"}]\\) is not a list of \
numbers with dimensions \\!\\(\\*RowBox[{\\\"{\\\", \\\"1\\\", \\\"}\\\"}]\\) \
at \\!\\(\\*RowBox[{\\\"{\\\", \\\"x\\\", \\\"}\\\"}]\\) = \
\\!\\(\\*RowBox[{\\\"{\\\", \\\"30.`\\\", \\\"}\\\"}]\\).\"",2,194,192,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446207657*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"fd595d2c-e825-4dc5-9595-16635c2aee44"],

Cell[BoxData[
 TemplateBox[{
  "General","stop",
   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"FindRoot\\\", \
\\\"::\\\", \\\"nlnum\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"",2,194,193,25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.7596244462142687`*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"6a4b5a90-1302-4676-b355-884952d0315d"],

Cell[BoxData[
 TemplateBox[{
  "Part","partd",
   "\"Part specification \\!\\(\\*RowBox[{RowBox[{\\\"FindRoot\\\", \
\\\"[\\\", RowBox[{\\\"bestFit\\\", \\\",\\\", RowBox[{\\\"{\\\", \
RowBox[{\\\"x\\\", \\\",\\\", \\\"30\\\"}], \\\"}\\\"}]}], \\\"]\\\"}], \\\"\
\[LeftDoubleBracket]\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"2\\\"}], \\\"\
\[RightDoubleBracket]\\\"}]\\) is longer than depth of object.\"",2,194,194,
   25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446218664*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"866a939d-fb01-4a5f-97e5-76a92a7fe9a8"],

Cell[BoxData[
 TemplateBox[{
  "General","stop",
   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Part\\\", \\\"::\\\", \
\\\"partd\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \
calculation.\"",2,194,195,25820593487724305869,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{
  3.7596243513418407`*^9, {3.759624417737844*^9, 3.759624446222995*^9}},
 CellLabel->
  "During evaluation of \
In[187]:=",ExpressionUUID->"1fe8a2e5-7fd5-4e24-bd40-8418e5481b34"],

Cell[BoxData[
 RowBox[{"5", " ", 
  RowBox[{
   RowBox[{"FindRoot", "[", 
    RowBox[{"bestFit", ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "30"}], "}"}]}], "]"}], "\[LeftDoubleBracket]", 
   RowBox[{"1", ",", "2"}], "\[RightDoubleBracket]"}]}]], "Output",
 CellChangeTimes->{{3.759624043377006*^9, 3.759624047850861*^9}, {
   3.759624174457636*^9, 3.759624193428005*^9}, 3.7596242942527723`*^9, 
   3.75962435131691*^9, {3.759624417733624*^9, 3.759624446227495*^9}},
 CellLabel->
  "Out[194]=",ExpressionUUID->"d4126cf9-7ae1-4f1e-b5a2-e5792b2c49d1"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{
  3.7591981263216987`*^9},ExpressionUUID->"ac3f5c0e-5ae3-466b-a608-\
695a01b955a2"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.7591981269934*^9, 
  3.7591981270090322`*^9}},ExpressionUUID->"9746a387-c41c-4313-a403-\
49059d9aa502"],

Cell[BoxData[
 RowBox[{
  RowBox[{"data2", "=", " ", 
   RowBox[{"Union", "[", 
    RowBox[{
    "angleTable1", ",", " ", "angleTable2", ",", " ", "angleTable3", ",", " ",
      "angleTable4", ",", " ", "angleTable5", ",", " ", "angleTable6", ",", 
     " ", "angleTable7", ",", "angleTable9", ",", " ", "angleTable10", ",", 
     " ", "angleTable11", ",", " ", "angleTable12", ",", " ", "angleTable13", 
     ",", " ", "angleTable14", ",", " ", "angleTable15", ",", " ", 
     "angleTable16"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.7591981643976774`*^9, 3.7591981707450066`*^9}},
 CellLabel->
  "In[237]:=",ExpressionUUID->"28ac1d7e-b785-4f17-8f2a-6ba070ad1a4f"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"ydata", ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot3D", "[", 
  RowBox[{"ydata", ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "10"}], ",", "10"}], "}"}]}], ",", 
   RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
   RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.759198166620533*^9, 3.7591981674733343`*^9}, {
  3.759242846744261*^9, 3.7592428527996387`*^9}},
 CellLabel->"In[71]:=",ExpressionUUID->"2c22b76c-93c3-4c0f-8f7c-3ff57cac1d81"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJxl2AtUjPkfx/Gxbi3aHmQ9nf9qn/STRKkwXRQfJFS6TOmC7iuyyj2kGNfy
t7pfXLsIbbY/0cW6lFiXrFVUZEsSKqEsm8qftJ2zM49zvs05c848r3Pm+7zn
mWdmnt9o+a2ULflKIpGU9dz7SpS3v6YrH3n4Lm/QvtE6nTjO79w/Ilf6ijgH
B+cITX/WRJxHtXfk1l80nhEXcMGAC7crrSXOkLknpASSB+LzlT2aaSn1utXf
gjjCZ+kEXhinTpzD4XebBgZpDCXOY99RLc8rwhDiAnT1rQ7ZVPQnzqBu5XWm
/4duRY+O2JPqq9eRFcRAHHEFwoGMV1rEOURHWJstMdAkzkO19eWNvP08cQF7
soKaLEqHEWcYWFV3u8/nQYptQ7EnffS0juyQCdSxSmbIVxToEudgHviyM3gf
I86jKHbNH8tDBOICTq73qP0unSfOoF84VTV8rbJzithzIaeracNmI+qYGNPX
r7hanzgHlTtRFqkyXeI8TmzndCrGaxMX0Kkq/W9sH03iDC9a7i0cUq3sNBd7
4i8XbI5MnkQdZ1/lx9RbGxLnEHt0/6OZy/WI8xheFHW1/N4Y4gICfX5Pla8c
TZyhOXT8+e6flMdzutjDznxMk2pOpg6jbHWNkFeGxDnMyG80dtHUJ84j52DB
6MzD44gL0G43OJ2sOZY4Q1uRbdO9J8r+mWIPF1ERNDJvMnUEd415nj7bmDiH
M6YvNufGGhLnoTInvkEiNyAuIG3F4b6XLk4gzpByaZzri68ULrcSe7ZOtLTz
WiyljoDaW01LEycT55Dre9sv3GsScR7WGp3CZ3dj4gI0jk8rLDpjRJxhcFyf
qS9DlOftHLEnOiOhsfKGKXXkJrKLTVtNiHPosHJ7E3BcSpyH7Nezux68m0K8
p2f/RRu1GOoMnXu7WHiowuXzxJ47VYu2Fb+bSh0PDeObW9Soc7gzwX3tY2dz
4jwMNmw7l1JoRlzAgMAAuWcEdQYrg+oX2mkKl9iJPXt+ymq5ljydOtS1YgLO
DKfOQfXgtOvhkdOI8zhl6ZbyPxXqAt47rq55edOSOIOvNDZxTqnC5fZij1VS
vknopRnU8b7kurvLIeocfisSBj8Np87jWYsw09adugDp4wNRV8ypM4zVenm5
1FDpjmLPuLqayrLSWdShGV+R8CaPOodC3xPeDZnUeUTPKctf9DN1AcYllVr9
ejnDY7VcbkeawoudxJ4fneY7jvkwmzpST33qr/6COofmg60DHzymziOcHxjv
3MsFLCrWYulN1Bm62aqoER8VLnEWe/LqmnNUDOdSx4hY84wGHeocwjzjXI9q
UeeRGr8raZNAXcClN9avTmhTZ7h6PbNx4XiFw+XL8Tl2N+/bpTbU0axm67rR
nzqHZzazrY19qfNYPmSfr50PdQF6Ke5tZb2coXzwPulNP4XLF4g9BgelgaNi
7ajDvyls2g8x1DnMfbOlui6aOo/22JL4mF4uIO9mu8mGXs4wKMFfLVHpxa5i
T/fHgTna6fbUEWzz/dbnadQ5OOqGpMT3ch6GXGSwUS8XoJOYpV2USp1Bpd28
xEzpEnexx//+0h/nwpE6ti6oeBRlQb3netVVvW6lKXUe5Rq/dXZPoi5g/n82
djlOpM7wtnThsTV6CoeH2FMY07H68wgn6ji37MSe4arUOQyr+Dt4TV/qPCoz
ht5y+0DnC0hallzY3kqdIaoytD70ucLlC8WeJ1tOf322zIk6qrryJY3F1Dnc
jCzo9zCHOo9HITfuvkmlLsBF5dTqbVHUGU4dqL11N0zhxYvEniOzLHe2Bcqo
o5M1BiS5UOegljcjocqCOo/WYIvdVtrUBdSbJITZqFBn2Jw5MtDitfL7yFPs
ibN3yJHVy6ijoKjxQ9g16hxazp4sn5ZBncd7KTtguYW6AM2VpsPbF1BniDy3
YcNVPYXDS+wpMeq3d5OxM3V46O8e1TGEOofOq3+6FdfROTx+T1/nvesX6j3n
88bkxD9WUWcwnds6TmKocLm32DNsem7oqIXO1NH5OvA7ez3qHIK+cltb1kLn
8Ig5PdbN8Th1AW0RLI6TUWfIGf/o1+Iuxfvl4yP27N67bdM1F2fqiNznWxXC
U+dwLjs7wbpERpxH2oSJSRoB1AVsPlLzNENCncHJ7KG3LE15/viKPVmpNwcE
azpTR1xW6LNj5TLiHD5cHrNuRyB1Hk9jXI/Vt9H5ApYdXZ9lIafOsLN9hHzN
IIWnfempS1liLDkro46gv26/jZNR5zA1Oi4/4T6dw8PsvJ/VZwfqAiK/iZZm
X3EkzjAg2WSkp/h96Cf2WCZV7Jyp/Dx+caxaYPbnikQn4hycro3M+KRCnceR
TQ1H7i6l8wUMtj/vu2CZA3EG2Q4n6LTN/3f7yZf9xhw/VtOZ7EicQ4VFtlfl
cwfiPeviGi0tM3d74gI+BnefdMizI97zu/CJW+c11Pbfbbm/uF972yS2N9Ke
OAeJY+Bd9JlPnEdW7K6/+82lcwS4hZY4da6bR5zh//cXJ9akKNYPwg/ifiOH
eOTPkNgS73m9600CTwTMI87D9Nnh1dIwOkfAccPdHjUrZxNn6LfxZ4Ootcrr
zC/zc7ZX1bdetiLesw56PdU75fpM4gLeNvju1s0EcYbK/VmXarYrrvN9lojz
P0kuBp47TZ3HoRXNq7d8Y05cQIRLucHyiVLiDLWd12ak+Sj/HwgQ59u0JXou
naJPnMfXqh2z9izWJS6gJr8W8aMY8Z515bbvjRq9tPAPlvPZnA==
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[GraphicsGroup3DBox[Polygon3DBox[CompressedData["
1:eJwBBwT4+yFib1JiAgAAAFIBAAADAAAACwYFCAIHAwIIBwIBAwgJCg8QAwkE
DhMUBAkKCA0OBw0IBQoLFQ8UCgkPCwwGEBUWDRMOBQQKCQ4PCA4JCwoQERYX
CxAREQwLDhQPEA8VERAWFBkaEgwRExkUIRsgMjgzFxIRFhUbGBIXHCEiFBoV
GxUaGh8gGR8aFhscFxYcGiAbHhgdIicoHBshICUmHRwiHyUgMy0yHRgXLScs
ICYhJB4jIx4dKC0uJSsmIyIoFxwdHSIjJissJyEmJiwnMCovLjM0LDEyKiQp
KzEsOTM4KSguIygpKCctLDItKS4vNDk6Li0zMjc4Ly40Pzk+KSQjLyopMTcy
zsrNLzQ1NDM5OD0+Nz04Oj9ANTQ6OD45RT9EO0BBNjA1NTo7OzY1PkNEPDY7
PUM+S0VKPkQ/QTw7Ojk/OzpAQEVGQD9FSk9QRElKQ0lERktMQUBGRkVLQUZH
UUtQR0JBSEJHNTAvSU9KR0ZMV1FWSlBLTFFSQjxBR0xNTUhHTEtRTkhNUldY
TUxSXVdcT1VQUFZRWlRZUlFXTVJTVE5TWF1eVltcU1JYY11iVVtWVlxXWVRT
U05NU1hZWFddUFVWXmNkW2FcaWNoXGJdWV5fX1pZXGFiWVheXl1jYFpfIiEn
ZGlqYWdib2luYmhjX15kX2RlZGNpYmdoZWBfZmBlam9waG1uZ21oZWpra2Zl
aG5pamlvcHV2bGZrdHl6cWxrbnN0bXNua3BxcmxxdW90cG91dnt8fXyCa2pw
d3JxbnRvc3l0d3x9e3V6fXh3cXZ3dnV7en+AfIGCcXB2dHp1eX96d3Z8gXuA
eoB7g359goeIgIWGeHJ3fnh9fHuBf4WAhH6DnJabh4GGiYSDfYKDgoGHiYiO
hYuGiI2Og4KIioSJhoyHjYeMj4qJg4iJiIeNjJGShouMjpOUi5GMgIaBkIqP
iY6PlZCPjo2TlJmakpeYjJKNk42SkZeSj46UmJ6ZlpCVj5SVm5aVlJOZmZOY
mp+gl52YkpiTmJ2elZSaREpFlZqbvbi8nqOknaOeoKWmpKqlm5qgoaanopyh
mpmfoZybnqSfp6KhpKmqoaCmqKKno6mkq6Wqm6ChpZ+kpqusrainsbC1qq+w
qa+qrLGyp6asqrCrrqitsauwpqWrp6yts66tr7q1rayytK6zrKuxrbKzwcDE
ZWRqsbW2oJ+ltrKxuLSztbq2uLO3trq7ubS4vbm4u7e2v8TAs7K3vLe7u7/A
vrm9t7y4wLy7wbzAuq+/r7Wwu7q/wr69vMG9w77CycjMxcLBxcTIxsLFwr3B
yMnFxsPCt7K2x8PGn5mexMXBycbFxsnKy8fKzM3JzcrJyL/MysfGv8jEzsvK
z8vOif+hGQ==
         "]]],
       Lighting->"Neutral"]}, {}, {}, {}, {}}, 
    {GrayLevel[0], 
     Line3DBox[{1, 2, 3, 4, 5, 6, 12, 18, 24, 30, 36, 42, 48, 54, 60, 66, 72, 
      78, 84, 90, 96, 102, 108, 114, 120, 126, 132, 138, 144, 150, 156, 162, 
      168, 174, 180, 185, 190, 195, 199, 203, 207, 206, 205, 204, 191, 175, 
      169, 163, 157, 151, 145, 139, 133, 127, 121, 115, 109, 103, 97, 91, 85, 
      79, 73, 67, 61, 55, 49, 43, 37, 31, 25, 19, 13, 7, 1},
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJwVl3k4lG0bxq0lVOotIfUmiUJlSZKckQhJpKJeJVlKIhVSlqIkopR9qdBO
okirbca+z2CYGRpmHy2ilCV9z/fH88/vuI/7vo/nPq/zOi81jwAnLwkxMbF2
4pMkPk3jsfD8Y3SIidH/dpZTkeoxte30vUasLp06RN9IR5i+fS39IxVPhMGH
s143IrHJfFOEOB0HDq05WE2mQvgubblKZyM2ZLZVRLf2ofZBzvysZiqM3Raf
8Rkm1mfl+FxP68OI6uotbyhUPKM/aSyf1QSZQ5/HXb36UJ5tF7ivj4rN2RPd
qiuaYIaa/CDJQXiJKQWseE1BV+bepNk1tQjMCypdEcrCieJ/e1LpFKTOvdsy
a3cd6nL8DiqUf0Ls1jkaalJU7L4Z9+fKlzqIzbxKa4wYwFb2NSUbXSpC5z+K
ux5fj+PdFr+TTfqxfogWI+lCRaH/E5+09Q2Q+zTqv3keE0FPrrpkRFLhmpAy
eae+Aa4FXhurBtn4vCPNat4fCpQzQ+58cybBOlDJ7nUaG6Onzl/9tZACe5F4
Ve9aEsxlnbeFhA1BdE3tWZUTcU8t7sowSzLO/7YU2+A2CLIo80PoXQr8BxaX
GPvUotdpaYu9AQtfN7wOmPlMActWfqg4uQ69x2dHuFkOwLFaY9O0IRVtyinZ
yk/rEZD7OvxXGweh4aZbFYa7oUjuiG5kkJBo31Vk5c5BxRfb6CUJXVD1pVYy
s0nwValU9eWyceOUx+N8GSou8A2rpA6QMLn61rvsOWwcmpq7/4YuBRw3neL8
MhKG28oCWIcHMRJ4p2o2cc8wT4m50V61kJqWe7hAjYVMidn8lu8UbAsbNdF4
XIfoXUtcGhK5sJZZ9uS4XS+6TshVue0hQ3lUOn32bw4OL74ZyPHrgVFV01G1
MRKkDvhEvHHmwKyOnJx4vAtXUb/ELpWEPQLP3rwPbKSTV30ou0bBGd8/Nj0g
obi3/2DQ2SHQj207v2IfBVy9gKYMezKGUnYaOPoOwsrPjSyZRUGwxcDsb661
kOkWp0lPclFypqhubwsdSkdvvnxg3Yh/2uILy625YE6TbtCO0zDsNMfRfwUZ
p6dMisJvc7A85rYlQ7sbUdN7I46/JSF3XUcdRZaDL+k2VqIIKko2GfXu9CPh
uYmk7vAjNjo09xTJbadgsjK1OtyABMuJoyMvFrJxrvfuL01tCgRRw1HnCkl4
V6yiTl7Eg5aLe6SWHwMVH2v+Flxpwqj5Tt3np7hoLZcOZrBo0G3eFCphRIbt
qeW/dg1xkBz5VEZPqwdbVWrW1vNI+CfzcUn9BQ7s1I98ZLO68GFHEeNLAQk+
vs2d+nocWD6ulsFvKpbuX56kHEXCx42uUQnyHJTqMxQ8rlDR8ocbY3mKhO6f
2X9j9HlwDCGfmrWcCenoVw9Duc2w/s94yZfXXAQlKB7Zu6UPTzsLAZ06RGh9
PjThwoVXpP+U9z0a3kQMP9m6lowLnXm6inJc2Ab9UNF42oM/Dtofxv+QwDuu
se1rDwdtqzsMzKR6UDv8IHIPiwS6/pW6nGoOClyNTtKruhFSuzBXv4vQQ1v4
rboYHq6/0Dkdu3gAjxY4jem1tMNPVn9lgA4PvOGb37ImGKg+9I+FWU4zPO8e
WfbyKxfn1lx6kBtLR7rt159u1Q24lKKN2ndc3NJ8pWnv1Af1j6GCTtc6eDlK
+9/M4OJu48LtlPheaC0/Y63WQYbGx60qtAQu1Kur3t+w6gUzU9LcbicZI1G7
XVPE+ZBOdSVXEH7zteWZkUQF4UMFQ8HPqnhYZ5moFx3wCeHLvBVNtnaC/Oy7
unUKD19nDyQY+g1AnHNs9zzTDmhmHVKgBPJw+eCKfLv0fryMTkxuoLah411a
i+FhHuL4GroL1fthZly2xHK4FQ5bXXZ8duXBUCq69fycfjSeuuIY/qYVN5Ud
bsmW8wHaFbK+0RB0k+1evOZ2o6FTwfLhJT7a3B/eYlYNop4k9FL7txvxkkkl
8Xv5WNSR+eTOkUFULHdvv3ihC3Wa2ldS9fnYoWdWuk5+ECvknU+fZ1HBv94e
36HJx7O05aZ/hlmo+2Jtk3OfiunW0bH3OnxMnFB/UDzJQvnBT0vqiD7QPimn
35wqwOD5dSl0JQ4iooSiJMU+vLENfbQ8RIDyTtfCa11smDiv+PYtrxemP34/
/rBPgBS3yVVXb7Cx9vGcMYU1vdAXW05bvEmAx4oB7d62bNDPyYWsfUuD7Ivx
6QRNAQ6eXnyFp8XGlFMiKeQSDTvDt6QsWiPAS/KMgp4OG5mT9a/nxNBg915Y
5RUmxLYv273uTHAh+Fax7mseA4klEqdmBwgxPScDMoNc3N7drTP2hIEE815o
HhNCYvGyUpNmLsx+LFTaVcSAj7bV8Zm9Qrxz6K72esFFPc8v/t8yBtxfKLRU
WwnBfDN+0i+ZC6d2CYPxdAbGTjhYTpsLoX7kbbBaHBcrggs/xl1jIE3H64G1
kwiH/x1PRRQfH58t67hnwYCpcZtyr7UI/gvndSsG8GH66nqFkzUDvWG57SkW
IhQv0l4V4MXHq16b0WIbBvbIr7teS/Bn28pq6gjeEyUVlEVwMQXLTXkEX9Dk
I7pK8GX67v8VENxbPexcFkSwHy2J+nWED/n36Ztk7BjYdqR7qdtfEbZvNJfa
/lmAzRJHRG8f0zGHtdFWQnwYv9P2pbXxBXC3jFT784qOIoNb//EIbrM8Xs6L
K0Dwg39kct/REbBn6Nsowe2E+TMWBA/d31MzQ3D7Xfpucwk+naSYVUzsc1ah
sMChlI5jtzk7dIlzN1l5xpGJcy8VjLnve0QH/fgHanmDCBVyI0mbLwkxN+Zn
hb9CH4JbdttnNIrgx14zjxYuRETsC9u/hK5ireR1lzaJMB3Z5BVCvLNKjIpt
vUof3PXkGzYRvFnZ7/sags9qUYjMXtqHR3abjgqJfVyWc0xmCE7WFag7KxP7
W0/baBPcUDvum1ikEG0bd+xt/qcP5rpJWzQ2iHBhToev3WshzgxIdXTOp6G8
xeWwnIEIjtqOv5rLhZCukqZoLabheP6Kwn5DEdRu56V+fCNE0ZqIymglGpJq
fXpTNoqwyGyz9LK3QkR7GM30KNMw6r7/tA7Bu6akfXjEetp0U/cigmcr7LDM
IPb3blKPWExwqZ55+usUadjmqXHY/pwAu1irLjt0CPDo5NL87QNUSPgnlQ0S
XGH8+eFsgtecuzzo/IkKnwiTWrsgAXq83+ylEtxALtdMiajrjL9N1vEEr5ra
b/qD4AMZJJMEglsiLv0ewSn/rSfNEFyqOuLRS4IX+Z4svkZwy8GxI6MEn2dr
kxND8MJMCWNSKg+xn/JWhnD48OanjczlUaBUn+67II2HeV6TjRkED/1Z8/ww
l4I5wesuBRH8q6/jqjqCL9q7xi2CQwHz1mHxbwRvYFZMTxE8dccxWX82kYNU
fZ6Hp/Mgo3rLaAuXDy+XZKt1QxT4ygeGqGXwEBa2qCWa4HcKotdVsijISIiN
uriDA7rH/N4b/TxsGPF9WrmkFx9HJWJe7ebAdMz6Zd4gDzYy1RaKkr24UaWe
wnPh4GqMfKsmjwfTuicGJp9poE1IsgePcVC0Xeeh9DAPd0cuHsih0lBk/XVP
aAAHfr8OPNca4cEoO+1WHuFLnjsrJ65e5KC7Uuxp5E8emnIvy+XepaHZbexi
ouEQjANXe2mOcSF0MTu08S0TP6Jfpty3HYJYspPlt2kuXP9+lqq4xsSRUo+c
II8hMEb8fkfM5kExY4+MsxMT+fcYQSEXh2C1zX3qzkIeXJ2UaNYqTJDjpK9r
pgxhp6uZ4fgyHjLMSzXLWAzYrx+YUH4xBNf7uj1Ba3gQSMu+S3jEQLB7T0bO
LBZ0/7P5HTCHyDtJ5gx/syHItlovfW3IAk+jNO6mKhePx/puWPIH4df36cZb
bxaqPO/rOehx4TAtelsSOwjL00uaPLNY0Cxm9GsRuSl2i0eAssYgJssq/pR0
smDxJfXbCzcuUuuGmnwrWPh7NqCoVWYQi87uKbhxjgtq4brijftZSPn+0Flt
FxOrtPcRHZyD3/dPVq8kfNdTQfmYRScT+5mJ7cVuHKhiPXm7PRcWrMnvBl79
qDFUGnUP4yCRKi57jMgNNfvJ9XFSA1CRSDTyzyHykafE4g9rOZA8O775buEA
Mkrm+tlVcaBQ8vosJZ4N8kuzyycOfcLDlRHuCRwOvHdRqxJ5QzgfqeZ50rMP
+hbbn7Q9ZiOZ5tOxK06AtpKwsIVKdOxI07i7sJWN0qNmqoEsPs65dphs4NOx
1WXNmMxvNnzvz1K4q8qH6niGfUUrAzt0lb8xNDkYdtnSmWvBQzap0vFVAxN5
Kr/2iA5x4GypcPTQPi5kZj0x6u/uh/fs/suVdzjI0DurPbCfg1tSFrHtvjTw
a2e/+mLGxtHo2LEDx0WIErDSopx7IU7OeuoTwIZqsnSWR7wQx7Q2aRv598Hm
TXV+z1M2Zt4uK5W9LIBOwLXm+4R/r24umdr/hY2UOA+Wmz0f0U+FJuFqTIQ1
SMzaspmDNRFn35wldErxHWVvLOtHXurKaxM3OPDUWVL1MYgDRaWX77rP9oCe
+PT9Szk2spdoVtAdh5F+gSXxOocGQ83bd8Ns2LjdWDG4yZjoW3vVzO8SPq21
tmNLATEPZQ85KjKpAuwIcVpuT6ej7MJU9n8/2XC/t8mhVYuPI1tGdSdZTGgx
h0PGiHnlhPdnFx8zLnriyT5WXwdwdydvTNjKQcyXB/kV9mws847ZoJnSg1Va
88SziXydOTOx66D+MEoLjSf65Xsht/m9ebw7Gy2VfQ7/tgsxcLnubKgYHTxh
xVXdBmI++/6rqWqcj/TRqd2rPZmIkm6mzbPmYNovV/JUKRd+TBNVG+YAJioC
C9c1EXVfnMuoOsyGabx6jV4moetbjeFPrbiobudKHdYchMsH7tRLPg037GIT
u13YGInPStg+KsTJzZWzWJV9eJsarln/jo3YvytyugwEKH1hWDO4mwkx7uwL
Dwn9i15deB/bQOSIgYC1NzQ+wXuyQe5oHwe+GRcdwpTZ0Ns4pakxw8KqnZVl
K05zkXewZLObLwtnOsedVjoOYTqh5EznXy7uf81+phXKhIXz1gfm8XRciPyp
+YvDhmWibtL1s4Rui0a4rf1MOD38PWFL/OfNJ6VcfMy5CJ4+KX1L8Anj62c1
dIlzEXeg2lzl6BCeBw6uDUgexOL3uYsvFHHhuP9koUv2ABa0Rl2GNBsVZn4T
eQ48VN65Mv8Cl47KVP897wk/vPdDY1ca4YdXDKmRawg/vPP53EA7UY/ey9a/
2UfUY8yqf67k/78e2ZKl6h9YEChXZVc4cxFTo/tMl89CstGbu5XOQ7D/eyry
pDgPrSU1PfMCmdi2gh/4gM3G5WTxpXovefi5YW+OzFgvypQfp26/z0X6All/
kxA+jr/wuHR1XjfWX55vxDrAh8aaPzu+mgpw88ig/0FKJ6wWbLt1zo+N+U60
zCPhPLxpjstbM9OHue+NBAazuNAfULr2g8jFpW9ny3T49MD0/YeSGcL3FXbO
azorL4DA49ccylIKBrTIsktdBGjSDzZ+VS2AEtbH731GhRK14NO7x0KEmNl9
yiLy5pVeQ7X4RT0IfVsw36CMByY7Te3Hdz4q04t9enKJOSLugUGIigB/LlQ/
qckVwHiEY9RoTMXDj79qRi8KIdsRZPzZRYiAY/8NcUndSDJ7buX1VIT1rnk7
5nQTuUVYkDqxuhcVehLHXveI0KceqrbvoBCBJkGMD+f7MHmTcex0mRDnCi4d
fR0sRI7q0P1m3R6MJoY+rnsmwudNCQG7OoWI+xIeuF2vF0Vbs/fNpYswMott
YOsoBMtk95LcpD74PN+5IHRShIizccNzyok8Ys9bxBmnw/NQ2I9QXRHktebO
LTLjY9IjWkd/L9F3EsjTV1+JIFm/u6PeUICW8+UXexQZkL/fKenMF8JPbWUS
5yMPZtYvDRvOMJCeL8ce/yuAyEkhqXyKgzPs1vtXUukQGadtm1EUIFml7a8O
oTtnU95LcUsanp0vM65SEyBBVufOUVU2Cs8EP7Y+SYOU0fGbAgs+Fks+2lW8
ZRA7e+S/VmztwmlZ++N9xHtXKZ4wX8/qx7vpzAx3j3YEKDJKl3/jQrTfO38t
UTcbgg9beNU14M53qfXjRJ+o7ZLoy9zQgxPu6/1sBSTEFDqu69/HQdTumd/a
fl0w7Tl54XsqMdeLoijRvWy02d6qo3+iIH6lw8UXDsR6qk64rA+h94f5ouFF
FHCfb5FQPEDC/wA0UPSh
    "],
   VertexNormals->CompressedData["
1:eJwNV3c81W8UllmSjMKvzNJAKSMKOUVGVEYiK1KZkRERlUpmpMxI2TJaiERe
IxmRPa6L7vre4d4ro6KE3/3j/PN8Pu/5vOc9z3Pe5yi4XbO+ws3FxdXLCR5O
qAlQL0TyU9GF2I9+dnmFMExtW03eTwPBCGupMTYF+as+59284RPM/Lm0d3qG
BvuitzVFCpORzeLrS2OyzXAw4wLXdnsGlA115NR3EdBfF+nm0o0tYPzFV1Zz
chpOLhqKsSUm0C6+N6W5l1uBN7R/m7cdC3IxA/1NrBH0ap/VrV9tHZC+7Lrm
rcMGnmqBMAluDJm812CnD3yBmFsVuubXaXDvQ7DclDsZCVrwvFxH6AOjmwxr
Hm46uMoMGHzXIiKe+PSloysD8NDeR7YdGKCQVZDF9p9EOZp46Yb/hqCWzDr3
IGUanhfINWx8OYqOdV7Dl+GHYNuqVimMMeGRrBXXTNEA2spb6vzoAQ5EL+Rw
Kw0yoWa80Y3EJiHnJQWxuO1joPCzoITcSwURRllH1GsCmvcWGogSnILT4WWV
Jt+o0Fuw9onXZQJlZVj7frYnQGxx5VmjxzSgB0Xm7ZQdRUdOViTlSxKBf1zk
aFQwHfyWrRniD/vRHYdjrX/PEmHrjIpkmB8DeNhiqhMDX1GPlJqyD4UIi12V
G7WyGPApLCj1YtcUEtYaiCqnE8G6q9K6NwMDg7UijRQNHEqY0YWUTApYpIWa
KnFhEOfavjQxNoheXd5zUagWAx8vX+uEMxhcuqWMU1//DYm/E844IU2FyOzl
0qtEDP4ziddLR50o9rRk0ZkSCsiN9fE7p9LA4HS+jNqhbpQnu/OvhisJbKn7
RmR1GfDQ5us2sugwErij3UvHUYFuMsjD10YGq7LfAv9We9DyXdy77QN0ID3f
Z8BoIkGp9aTJebEvyHM84ZYZPwMyLIsEvJXJ8PDcKw3f9DY0cViarlxOA+6H
kSXGOAoU7w9+u6zZg/x21EZ7N5Oh9ZnauL8kHUo2GgZW/B5Ank8vSzTjpwCf
EmY+fXEaJFme26IFW1HOFiHZvqvTcIvlkpzqSQQmXOMKza9Dmd5h4he7pkE3
9ruCmyYRdhQu5vLXN6Mx/vgYBzEG3K/qrghyI4Nc08XYk1HdaCN+pae7BwPH
vMKKBxZUkPI802ufOYQcq53ZERcI4HVS6Xrvbc65s7j3rjE4dGQwQaEyYwT0
A+x1FbYywfrbmXsRgW+Q1P1tz4pUmCB5Kfu9dhcBVNnp/yIeNSLJaMRIK2bA
oSM0ohYigWhlDoN0owd5H/apV5CnQqvf8eIvDAwarnh8rpIZRqYNjp6FoiRo
uZfqYnOIDsuR0juGJfBop0hrSsuhMUB/K1Okzk/D2j0cL21oCmXtarJW/NkN
t2vVo0IkmTCnfCC67mMLkvxtpCJ2mgGJyVlexvxkUELxN+a39KHu/fOd4YpU
+CTqo+/wEgPlUzl6XGsjSLN9T90nIhE0U8IfDUzTQPVwkkQ5zwR6tGHEjknB
Q1B5RP9RZQa4unj2cR8gIAt/ukZXQB/8YV1TvOQwDSpL6dz3PInonv7TEZPx
Jgg4Ivj4adQ0dJZd1H3/bgDheVmHwqIwUNPSU7RrxaA7e2to9fAYaiw02vjr
CREgLkvI8A0NJoSD/ET+TaJ37Lct7xzwMLMqlrbwiQ7hFjGyHt0EtE2NRHpe
MQSPr4obt6kzwK3231cDWxJSwY7Z9QW1we4wzaJP5QyI1dX84KtLRgXj424v
HlcCD1fZoHsoA2wi9349OTSObt6gyu9aIEDnI77ssEwaiBy6PUBq/47U7wqv
wxZx0EKT5ptMpENgX1x0VwgRJQUInTOVHYK5jpX0nXg63Oen+x3LJ6HXF8In
cO7d0ND8+s0/Dt8Z8ZWS4QVk5M+93PtyVy30xxTpW/7H0TW3sVWpDAVFHmhM
No+/DxWLkRFxJDpcrZoXutpHQCouDWrzL8ZAzE6hNdWUDl4rbbtjOHUl+8lO
HOkbgBvqi22vbtLBhRC3eW03GYXtDNs7k9kLj6Y0p9wv0eGZgnzLGYyMSgo+
Mj8ZfIYjp9jxrQl0+P5pXZm+JwU1t19+IfAsH25tmtb485wO2Yp6xJ5ECpqb
F0ppj32Gprbqo+R7dOgMc9d+O01C8fWS7OTLvTD9ezf/rXQ6MJhBvI87yeg/
KkOZV7sT+iWTVRPP08Hx61alPbcpiOtf44fT8u3gs40vWY9Mg09s0ivBzRjS
52b8G+pGEH733HxaKw02LAomkvQx9Pl+a4hPVD4cX1Rr6KLSoIZne6qcLYY8
hQUK9gf7wAEeVYmDOBowbvoYBC6REYnxwayauxm0DZHxywI6BOfsrOG6RUHp
Dfmzqj/qgZh3YWbOhg5DvCenYgQwJNE1pmWx5yNc4+EtfY3RgOuK2KWKVAyZ
syISIuyqoULk+IHUWzTo6CH902Fj6JyF8I3Je/mQ6zBYaWBCA48A8fhfolS0
perZteshWfC4M+Cr6F4aGJ4kWcymUNDUhwa5msT3MG+r9CrekQ7pVsfMfuAo
aOI8mzl/6Q14/Q6c6lKjg0K1cQDXQQyZFSm/XxPKBwmBJ/bnf9Lgw+VolaFH
GOLvmT3HI5kIAw6tttyFNCiVEbW+PoAhY74rMSWKd2ATv07ZBQ8aOMccZPhQ
MLRkkauvtCEAXc8c1v9qS4Nyx/joFREMedmrucwKvoYY3+vRBTx0qHNKqUvR
xVDJlgSu2MJ8ULXO3JbPoIG1uEdQizWG7GUl3qQpxoJb32f/23garL6R6FNw
wtAR6WNXjUfvoA4RK924Qc6/xr1r1PYGhoruBh6UVM5CYg7kva21NJgrlNOy
8OXc5xav8MuFYvSw0izhXB0N0sTdC9kGGGLyejRFZeZBASbqSOHw4dV3TYvb
9hjqWqMm2r5JBdPdSTIrnPx/qIkDq94Ysj7cU/7wz224q8N7Wv0LDc7vMN2U
54Ghy78jhy2KQtEZyvEhu05Ov+IOOdFPYYjnzWjVweZUNNFxW1znOw1S0lhu
6toYIqYtC5jYPkb5XqSnhxZo8FXsrNMRZQxxpVzwWnRMhj5i3E7cKg38FlIz
vqhgyJLnxRfcp7twMhxXHsLBbQTSIsw5eW5Sq+v51/mD9z/DuGxOvyouynv8
dxhDIr4RrtdTLVGZZbDUH05+ZUP58cz9GGoSM6/w5w9DI70ttM0rNGjaJzD+
WBJDqs/1Y8K0/NHN2d3RSSIcPXLVeOLbKKhNTsbY5eZ1yAneXrjfjg5bDzi8
vFVJQQL3nTZrH78MLmI17s0edDjStsNDsZaCqpq4/P0M7GBpP3fQEEfvBz2L
BD5wcP16yUbHN1qQz81+ac/BSamDZ+SrKehDXIJvQIspqk0SJF9xp8PuXX45
oqkUZLI9ZWJpUh1OCYjNB9+lQ7PQkYSZv2Q0o3X1arWqDYSFE8tZq3TQbI3k
6a8jIwMdRTG8VxBsvhz18Cxn3prxWyb/ziWjk/wih5RcgyE140z0ayMGGBrq
yuGiyMi94ffpyXU3gC+tcr27IwNmfL8WjF0ho3DJSutg+1AI2fH2oHwQAzKF
HwVe5fiuWOubvU4FMSBh2bH2qpsBcheblOtLSEi5d6I7ICoZGo7f8c5eZQAh
hPVP/BgJbfG6Rm48lQ0f9+Q8ijOahkLN/ally0Qk6rx8ikjNgfX5FgljQdMc
v6qf5lNJRNewc9728y9gvCR2JLRwGmYFzxS+ukJEFurT2YebcmHN+elvh5Fp
yBFtfj84TkBmylzlhJVi6JnVDBtWYoLS83u67yWISFgj0GjN/iVI9WvnyPMw
oYBfbnw6iYDwe92Ujf6+gXbTibmzFkwoJf6o5lMlIKvEEF4cvANJix/75aKZ
wF0l8eHXw++oeNFkM1WxEnbpFQm8Q0zQZKf/dqyeQk/2rVk8qasEXye+qqK/
TNhTHFp433ISVRUOUuzGa8An8U+i1WkW+Lgl3/xsPYVGG9fl2ibUQOzF9P6l
DSyw71Vff/vXBBLMNbOd8KqHroTwkngbFkhsMzfNm8MjndpnT6XqP8GT4zeF
jjxkgUbge9ldvePo4pVuH60ABGtNKhYnuliQtMPI2ygZhxSjHTJcbJqgS3Nx
aNMmNoQ2W6gMxI6ixedpiYf9WqFL1CN0xJENuQu7Z9UCcajT1jGk/mozWPII
x4RtYIOAjbVaXNUo2qGHC5fP/QzXnRXP7zNmw2Pa8zvPzEfQht1dkQ9Gv4CV
OZPqEciGlUc3Uypzh1BMZLtcx8sOMNAW1E54yQa7aVdqPsc/fJlr/GOm0gWC
Llx5hRgb8kfo4vSAXnT6USfNRagXxL7J4a3Wz4CfjOnJfo9BRKycaKNndUCR
iZ7K1CQbDH6enLt7qB8dvmRxlDbbDeRgmYzeX2zAW10kBt3/hrRTpdcfDe8D
PbneTIFFTl38B0K4yjrR4+PKGI/eADiP77z0eZUN5O/KxdoTrUj52OXiPR2D
YHlxVjqMfwZUmDt2hBTXoitaojkBx0bBOF/2X04ZG3pCg1RZlzrQTf5qszL3
PphT0enZdHYGFh5Y+iqLtiL9xz0ZnWcHoXYlR+epwgyYl252FxqtR55+XlZb
Mkdg0dXueEoDG0rPsYfX575CNzT5Pzb64YCw0DYeeIYN9cffXuvwcYPrgcbW
IcN4EF2oOPimjwUxfdvznh18B0aFpxYzl6YglX/P9jYmE4KGlRwsxN+iQlyr
zwPaEHyesBpN2T8D/v3YsqxhMvoy5VzGWz0GgxZVEeuj2GCc0VumLZgLP5yz
/e0dJsEgUn9U1IcFD2+u/HedWgPcEusreO8RYLZqITTAkAkiW7Lp9KAWmBPw
xn3VJ4KjNaOmJ2ka7MQI5ZaKHeB+7JVN1iARBE9XzdgSGfAltdSlPb8S+psI
8rQMHOjYLe1v1GPD8b60ZMW6RgjROZvXc2QKvN6vG8mYY8IhzSoFpnIb5HjX
Hzw+RwS/ndurQ38zoDHjqOj+1S5w226lOXyQDE6hcatFVXRw7znxsqmrF3iH
eUSLF0lQo9ARaRRFh9GS7u0/zg/AXJfHDb3DHH/8tyTakkSDzYef9yo7dYHF
LPt37f4pEJIuZ1v5M4FHquwPM6wXai23mee/I0KxbUp8YxgDpO6/bN1zpx+k
XbdKW++kQLYA7/x9jn94+msiWdJ/EGAWT3kcTYH8LSu5ZxKooKejtaF6ZBjq
vcq6n52hQIX+0P3sg1R4H9tzwNtpDHIZ8beqGBx8y2Xhaz8oQH5r4+BJHuLs
nZ6l2upE0Bd/cdWc4xuFHLHnGwJGIGTap+FYOBnoWXwqxW1UmO1yFKyWGgXn
rBdj1UoYqD7pDmsTxGDLGXOVxLoxsKOZBf98isHlnhq7jTIUyNGKnBiQxcPT
uiAp/W4Mbsg6S9RsI0P7mIbJi12TUJvyGntlx9kfpQ5cX6ggQt6y5vF9mWTw
pcSk1OkOwKHD9usfPKXBTp9MLKMLD6eSWDInjSmc+S+zI+oWBaK4Kw9sFJ8A
ofpjA+PjGJwI3xFS/pYE44qR27NVJ8HcrvxDajUVLP2l/yqrEaFx4N2xzOUp
4LluOKM0QQVfY0tNQxUCLG4SdkxSJMAz9Xc+PoI0iHJkjyTdmYJ59pVm3CgR
DpnZ2TfzkyBQsGKs5R4ZRjYGD53YR4DkQjUfFEEFu6zHJzbzE6BFuc074iQB
wi3p495GNNjXwA4JCJsEs53nIr+NEUBpt2EhlyYN8q1bXQ57TcBGt4qsISci
hJ7V2mumTINLk9g3WSM8JJv2Oq+yqJCy0e0oz5ZReOHYOJ8tTQaph63BJvIk
yE1954K5USHaIa/8GwEPlBV1g6/DRDBZZbUP7KDBF1Fqhoj8OBwNO+2npkcC
qXOTzYOiNLCvVYzPOIqDcrtTPqadJMAyY+XciFSoPaFRkmQ+BtLt8Zs0q5jg
JG2XfC29FXZzO37uuTcFkaym6HoBCrAii1c2lGCwqZTF86NvDPhe8NVHF5Dh
fWg3xYPzDn4JR/9wC46CuwZ9yraLDOoHflWK3qaCa7K/xXLECHiq3P20050C
rnW90ksLGIy4rE/7y+FZvfwATf03DbJtHE+RG4kQcD7niaXuKJyP5zHVwGNg
fG1hKY9FgUTb8LInQ0PwdYWrfe8XDJyMWe3bf1JA7WuN8HnhYUgsOrFGoVDh
p8nClQwbMuiQuW2e3hiBffOnDC2bWTAl0lPdwugDx5Kl5lrvESj+h4Wnc/hu
vkf7tFEGEbyMKz9yRw+C4bl5YbFfdJCWOUrgmyVAkniW4ivXYfCKbuyYN52G
OlO/Z69D8RBzSnBCfcMYGLDLblw5MMPRYZq+0OZqOD96Hh9dNAQf7lp6n52Z
hqrAsjHaDB7aevbydTgNAS0tuZnvMBMoDdtui8mMgfvSx5CnYaNwLvLKi6Zh
JoxOdP7TmeyHXG8Ny7vrx+F/vT4VnA==
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{346.3677003431182, 248.21994681720588`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{1., 176.}, {0., 10.}, {0, 77.40804927353409}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-0.1031306676211053, -2.9697668266121373`, 1.618594779724097},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.7591983571936693`*^9, 3.759242854150345*^9, 
  3.759246242589052*^9, 3.7592479301026783`*^9, 3.7592486233072577`*^9},
 CellLabel->"Out[71]=",ExpressionUUID->"53c090f7-b1f6-4574-863b-df303382817b"],

Cell[BoxData[
 Graphics3DBox[GraphicsComplex3DBox[CompressedData["
1:eJzV2H9oVWUYB/C7bAycq2Nt81yR67nzuGmXLXPdlW6xZzpyxlpzU3GT/XYD
R2uQZpiMXGR2o9C7KIytdVVQU4zMGmkzloKIhREjhcHKfm2lzn5A6P5IC3af
9+V87/sE/dlAXt+Pj+d8ed/v8Q+DzZ1VrXf4fL7Jf35N8/HPb8X8u5qm9p/m
nb1eDE4nXtyTcbzgKrhFT1TvDLS44+A2jTS8/PwR/w/gDp3Ms7rKL4yCu3Qw
suUc+S6qv895ArH+7xaMZBI4dS3P3nhyYTq4RX1/bE3p8M8Et+m1fcG6z5wZ
4A4tyC3tfWw4Gdyl9NL6Y8mTt+N5slUe/nNw6hlw3tp/NQhu0a6djy5pzQuA
25R2/crZD/fY4A5F3u0YL7pwD7hLKZe+/Tzp1vT4fpGQRzmZ3RLcpk+jT3/R
vsUBd+jwMzWjc/ba4C7lnipM69rEOcNCHuVkdszDbtOBF6zs4dA8cIduphW8
Ek0KgLv088RXtTNGOOdSIY9yMjvmYbcFd2hj4/l3tndmgbv0y3OhE7df5fMs
FvIoJ7NjHnbMw+4I7sK6TMijXJjHPOyYhx3zLIN9fN1eas6jXZi3BLcFdwTH
81lhzqNdmMfzYcfzYcfzWQF7zrnSnEe7MI/nw47nw47ns9K7V2u5OY92YR7P
hx3Phx3Ppxz2nLPCnEe7MI/nw47nw47nU+HdK68U8igX5jEPO+ZhxzyV3j2v
Q6vMebQL85bgtuCO4NifanMe7cI89ocd+8OO/amGfXyl1eY82oV5S3BbcEdw
7M8acx7twjz2hx37w479WePdq3tca86jXZjH/rBjf9ixP2u9e7WuM+fRLsxj
f9ixP+zYn3Ww53usMefRLsxjf9ixP+zYnxrvXt1jrTmPdmEe+8OO/WHH/tR6
9+oe15vzaBfmsT/s2B927M96716tdeY82oV57A879ocd+1MHe77HenMe7cI8
9ocd+8OO/an37tU9NpjzaBfmsT/s2B927E+Dd89rY6M5j3Zh3hLcFtwRHPvT
ZM6jXZjH/rBjf9ixP02wj68xIU9MyBMT8sSEPDEhT0zIQ83mPNqFeewzO/aZ
Hfvc7N3zell4r3JLcFtwR3D8jlrM71WO3ws7fi/s+L20ePe8OhvM71VuCW4L
7giO/84Lzx8Snj8kPH9IeH5jq/n5yvG7ZsfvutW7V2ub+fnK8Ttlx++0Te1T
u+c+MFYfpIIrh/KnvTmfKv98u3TX4o/U/3sN/Lgk/+Dq+2nf93deujei39s/
t2zi15s59NSD/s789yfV/GC0pi/vpfnxOf5xqbt3sKzv7oXskCeb3M3Oexmj
X6vn7M55Y8MNf4hm53wT2nwxRc2PjR7rSPsrL+Ec9icNnr6LFlPe+SfPVbSl
w/MXUeWpUOaB9JnKj1f1btvUE6ayjL2xoxmzYD5Mg2cmPu4eyFS+/PWqVdHd
BQnnPDgc6a88/DB1XI6EP8iaDc9ZSs+W9IQfenyO8qQvs5KnzyqkW+NN0UhJ
QPm1G7/v2HGkML7X95XbHkp1YkV0qHT0TPlYUPnR+1JKPil6BN7n0og/aaj6
mtyf1NNbt/lD+vnSfUl9mFoT70vqg3Tv//V+pR5OrYn3++99SLxfqQ//l3uf
WhPvV+rD302Zb+8=
   "], {{
     {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
       GrayLevel[1], 3], 
      StyleBox[
       GraphicsGroup3DBox[{
         Polygon3DBox[{{11, 6, 5}, {8, 14, 9}, {210, 14, 213}, {11, 10, 16}, {
          5, 4, 10}, {215, 15, 214}, {5, 10, 11}, {17, 16, 22}, {248, 207, 
          227}, {10, 15, 16}, {9, 14, 15}, {10, 9, 15}, {3, 8, 9}, {8, 2, 
          7}, {18, 12, 17}, {220, 28, 218}, {4, 9, 10}, {11, 16, 17}, {7, 2, 
          1}, {3, 9, 4}, {11, 12, 6}, {17, 12, 11}, {3, 2, 8}, {216, 22, 
          217}, {24, 18, 23}, {23, 18, 17}, {23, 28, 29}, {30, 24, 29}, {35, 
          30, 29}, {23, 22, 28}, {36, 30, 35}, {247, 36, 225}, {17, 22, 23}, {
          29, 24, 23}, {223, 35, 222}, {224, 35, 223}, {218, 28, 219}, {212, 
          14, 210}}], 
         Polygon3DBox[{{225, 36, 35, 224}, {219, 28, 22, 216}, {214, 15, 14, 
          212}, {213, 14, 8, 208}, {208, 8, 7, 211}, {217, 22, 16, 209}, {222,
           35, 29, 221}, {221, 29, 28, 220}, {209, 16, 15, 215}}]}],
       Lighting->"Neutral"]}, {}, 
     {GrayLevel[1], EdgeForm[None], 
      StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJwBlQNq/CFib1JiAgAAACwBAAADAAAAm5aVGR8aFBoV6xXsLScsICYhIRsg
ExkUGh8g6RTqGxUaJyEm8iLzICUmIico8SLyHyUgGiAbLjM0KCctQUZHJSsm
fXh3R0JBSEJHJissKC0u7BXtIiEnKzEsOTM4LDEyLDItJiwnMy0yKSguaG1u
KS4vLi0zMTcyPzk+MjgzLy40MCovNTAvMjc4NDk6LzQ1Nz04VlxXOzY1OD45
NTo7NDM5NTQ6LyopPDY7RElKQTw7PUM+S0VKPkQ/OzpAPkNEQEVGO0BBQD9F
QjxBQ0lERktMUUtQQUBGOjk/REpFNjA1Z21oZWRqSU9KV1FWSlBLR0ZMU05N
TUhHSk9QTFFSR0xNT1VQXVdcUlFXUFZRTVJTTEtRTUxSTkhNVE5TW2FcVVtW
U1JYY11iRkVLU1hZVltcWF1eWVRTWFddXmNkWVheXGFiXGJdaWNoWlRZWV5f
am9wUFVWX1pZYmhjX2Rlb2luZGlqamlvX15kZGNpYWdiYmdoaG5pZWprcHV2
cWxrZmBlZWBfa2ZlUldYdHl6dnt8bnRva3BxcmxxYFpfXl1ja2pwd3JxbXNu
dW90cXB27hvvc3l0cXZ3bGZrcG91eHJ3OD0+RT9Ee3V6eoB7gXuAfYKDh4GG
iYSDfnh9d3Z8eX96en+AfXyChH6DiIeNfHuBg359d3x9gIaBjpOUjJGSi5GM
ioSJhYuGg4KIo6mkqKKnxMXBqa+qf4WAhouMiI2OiYiOj4qJjJKNjYeMhoyH
goGHpKmqgIWGgoeIkIqPlJmajo2TkZeSj46UFBkanqOkj5SVnJabkpeYkpiT
lJOZmp+glpCVmJ2emZOYl52YlZCPxsPCnqSfopyhn5mempmfnaOeoKWmiY6P
g4iJoZybm6ChlZqbk42SpZ+koJ+lmJ6ZpquslZSam5qgp6KhOj9AxcLBxsLF
wcDEq6WqoaanpqWrrainoaCmrLGysbC1pKqlfIGCp6ytsauwqq+ws66trqit
p6asrKuxqrCrrayyubS4rbKzuLSzr7q1t7K2dnV7dHp1trKxuLO3sbW2r7Ww
u7e2vbm4tK6zvLe7trq7s7K3tbq2xcTIu7/At7y4vMG9yMnFysfGycbFu7q/
uq+/5Q3mwbzAwLy7w77Cx8PGwr3Bv8TAvrm9wr695g3nbnN0zcrJy8fK9Sn2
zM3JzsvKv8jEycjMyL/MzsrNxsnKvbi8qX6l5w==
          "],
          VertexColors->None], 
         Polygon3DBox[{{243, 34, 40, 244}, {239, 27, 33, 240}, {249, 203, 206,
           228}, {246, 41, 42, 226}, {244, 40, 41, 245}, {240, 33, 34, 241}, {
          234, 20, 21, 235}, {237, 21, 27, 238}, {232, 19, 20, 233}, {231, 13,
           19, 232}},
          VertexColors->None]}],
       Lighting->{{"Ambient", 
          GrayLevel[0.8]}}]}, {}, {}}, 
    {GrayLevel[0], 
     Line3DBox[{1, 2, 3, 4, 5, 6, 12, 18, 24, 30, 36, 247, 225, 224, 223, 222,
       221, 220, 218, 219, 216, 217, 209, 215, 214, 212, 210, 213, 208, 211, 
      7, 1},
      VertexColors->None], 
     Line3DBox[{19, 13, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239,
       240, 241, 242, 243, 244, 245, 246, 226, 42, 48, 54, 60, 66, 72, 78, 84,
       90, 96, 102, 108, 114, 120, 126, 132, 138, 144, 150, 156, 162, 168, 
      174, 180, 185, 190, 195, 199, 203, 249, 228, 206, 205, 204, 191, 175, 
      169, 163, 157, 151, 145, 139, 133, 127, 121, 115, 109, 103, 97, 91, 85, 
      79, 73, 67, 61, 55, 49, 43, 37, 31, 25, 19},
      VertexColors->None], Line3DBox[{227, 207, 248, 227},
      VertexColors->None]}},
   VertexColors->CompressedData["
1:eJzt0elL03EAx/GVSZJHlqWLnF2mFFI5K1OsTyl5pGVmw9UKuhTMI7VGiJVJ
4tHhSjBjLbvNOQ0VyisGNdNpibmx6TZb8/jNzaOVzaWVkf+AD4KKHnwffJ68
Hr3hs+LYqX2xs2k02uT0rKYX9DUx66hQh44vEW+07TIox+ZFeDOasTvvtT+H
+gCBeVXw3J8yML592UJXNqPInvcsI0gLS0rfxJJNcshcanuuCFtQfnay+smj
Hpw4Umd6nSDHuWqeAzdDCo/N1jztuBo2vB3hVx/JcSe3NC6V1QobzojlQKwK
tYLwVJZKDj/BpMJ1eRvWs5eFP7QZRo9vXrqH3ICX9vGFqhE1BpxOFDtajNh1
RCke69Yjp5yZtTpRg6ePy1bGlRjw6Q4/KnDNAOqahA9ZTBU6Il8dz143iPrk
ZUVzaL1Ymmq+GCOVg+teuWjwI4XEkP3e2nw1+KuSuzslUoj919veLh1AHDvb
/kyCAhyRVUtXkwQMek2D4rQSmgJhY41tP4pcPMXqqGGE7bxfx67qhbaak+nQ
QKGrzNIoZWpxuc531tp1BuyRdAq/igwItdywWnhYjrd9xcya90Pw6mjfnRhi
hM+PFw5tFSqM7XFMDzxpRFPF8/LgbgrNL4c/0UUaXGp1Wzxi1mP77QV0Y7QO
3Ov1aZY02Yw9v+vufgFTFfspVPK9XBtZg4i2TfYx1SqwsSppW3/PENyFbJEg
zIhnockFktLpn256lHwPMiIpzyszpYDCrlk5+YoCzR/rOff5gukWX4PIJTYT
YEz/MLeFPZWmRza9+OBUlAG59fmmXLEBnsxA3vy7cnSP5vDju4YgFgVoT7GN
UO9cfM98XvXHemZyHddu7zVnHQo1+gw7RwrxpaPBEcv7UOVmejfsSmHDWa3O
eusgHtg5OlEblX+9hzhx4sSJEydOnDhx4sSJEyf+750WEiqpcO5HSaaFdihG
j/H+Vv8Esfq/6yROnPjf81/xaTg2
    "],
   VertexNormals->CompressedData["
1:eJzt2OtP02cUB/DSVhSYCswWRChWt0UuOroiThEPIkIYA7SArM4iCGysCuIm
hotAiUUQFXWQgmzcZKwUlU2Cw226hyIol3Ert5a22NobpbSYJQ6hXuYfMF6Y
mCxLfic5bz5vzjc559WhHjnOSMLjcLiF10143bTl2liOpRbFFv2WGlP3A4xp
u15e3qwD69MMR7FRjdK2VBNXW90D00LCphmTDjzPOrVzVqlQ1HxzgpgiBK/y
WNw6ph6aRrurfu9VoMXDzkKBTQcEPUiheMtnIGR+j72RLEPvL/tJUJt4H4gZ
w07smFmo1QTsWjk7jm567s952tUNPHPcK/YOIxBal2eS8RoUfJtu5IkeQGHO
Dd/QkzrIv5PuOvWFCllHEBotFEMQlKVnEPDTEOciCnjko0SEYt4zvxciuMA8
SnkIeqBW1lca0+SoylvqfHftKLSpZqMLSmegut71rk3jBPLvOS5tko6C00sf
AYgNcImyH2dqECESUcC6VCABu9gqvNuIAXD/Wk/AVt/UzW1WoDn2OyKu9RRE
ZDe1BA9oYaj+1T3iYRmqKGekdDIVcO7Hlsi9V3Qw/Q2nbiNlAm0PuVFyzUEJ
lpO2ftz0aUg1M/TvXhhGeQf97y9GKoFk8nDITNUDwWi/RSbqQ/2ONPejaiXM
97bY+FTql8zzpn4kx13y0YoBtObWqvJAZy3kfWcWHFNqYG1w8U4e6kFFYQ4N
4Xw1uIqHLFllOggIu+ZC2/onqqNsXKTHPYYDWs9xiu/by1MYfZOewutCjz92
nna/roPF8xx+kEQN/M3pP5u9+1HqhrazbKEKOr+nTaY5TAPfZs/XN/4WoeSr
iWShdAqkpZmhM/Ezby3PUk5KDh9kVowiVivLeDpWAV+FuJ0czNUDJ1JyO65Q
ggJHzlNbysdh5wmmL5W09P1gjjnmmGOOOeaYY4455phjjjnm/18/xkmqaR8z
gEnW83yHfBjc2PR9+SsmQdY4eKricxU65LWRXrJyHASd97zvPNNCa3WIqd1t
HM1ZmDeFnlLBuCGSGybVQtl6lz00bwV69FlUfoVRAUkTZ8QNvRqgbi/Oyu1S
o7qeKGGw5SDEd4SHjdrroJ1mdTC5T45KnVYl7J5VQkab37oKowbe272111uq
RG0pnTXgI4MMA+NcaZ4WPmgrOskhSpEIN3li24vHkNm9Jptk0sAGB4L8CleM
LPryks2+KmhMvM4bPqGFgSk7lPWoF424o3R8uQ6kT+N//fSiGpqdPAzIaRgF
JVSyrtpoYSSprPDcJQ2EH2Ee9HK9j4jZzpPCtGlIV/kURjuqIZh+3sOqvgO5
CISiIgs9uJMK2FfYKsio7ac0n3mAQDrhm+GvA3kxPpvvr4FtX35SwxX1oSek
q1ZDiRo45PMhw7pDCzHz8f3rCcOo6a+5X1pnVXDZg0sgX9SB0Ddrn2vfKErh
kz2pk0rA23RErXs9PzD3lm17jBhtLjH98TxSBsk135bteq6HCGvLmGe2UnRA
Qpc6243BwgiZupe49N9mqf3+V/eG+dv16Ho1a2KZHFnqj2v0uiHIf7h2O93P
8MZ7/wdsUjY8
    "]],
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{346.3677003431182, 248.21994681720588`},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{0, 176.}, {0, 10.}, {-10, 10}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-0.1031306676211053, -2.9697668266121373`, 1.618594779724097},
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{3.7591983571936693`*^9, 3.759242854150345*^9, 
  3.759246242589052*^9, 3.7592479301026783`*^9, 3.75924862335065*^9},
 CellLabel->"Out[72]=",ExpressionUUID->"937ee853-0972-4309-8628-ad7a8a166d56"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"ydata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"100", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", "10"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], "]"}],
    ",", 
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"xdata", ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"100", ",", "140"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "15"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", "10"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", 
     RowBox[{"InterpolationOrder", "\[Rule]", "3"}], ",", 
     RowBox[{"ColorFunction", "\[Rule]", "\"\<SouthwestColors\>\""}]}], 
    "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.7591983637575884`*^9, 3.759198383695616*^9}, {
  3.75924286504251*^9, 3.7592428731529627`*^9}, {3.759246055065296*^9, 
  3.7592461387648*^9}, {3.7592462560386467`*^9, 3.759246268250976*^9}, {
  3.759249581592154*^9, 3.7592495843071527`*^9}},
 CellLabel->
  "In[113]:=",ExpressionUUID->"f14093f4-371a-439d-9152-ceeb7fba5e04"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJy12H9UjXccB/BbWCvFU0mP0npuXaUo6cgY6iM/UiyVCv0uYjkTmynSTX5M
HT+mbViHRjO/jcasjh8dd51hzFSMHUyT5sfVzA79QMU6636/z+lzn885cw7+
eTyvPj3P+37O9/Pte646ZV5EqqlKpVKbqFRdVOzfPwHsf/cX1vrOd7twEjm4
Z+Tscne7glyAr2yFXo1uNchFCJ72bEyCqg65BD9khQd6m99FroFZYUUL9x27
f5L9PsvztPLQNzERzdhhemhVn8EmJrrOLsDQQ7XVgWZmyEWwu2tq4/nAErkE
aVk7StNyrJFrIHR/3TZ1YC+Du/E8VgELU7arzLBDydLWkqXZAnIBWruUffGT
VW/kIlg/Webgme2IXILYvI3HLuZJyDWwNnh0rtrS1eA+PE9mydIA7+9tsINN
aL89LR4OyAV4VD6w7U1vNXL+uZFLhGuQ+/E8yaqq0EHv9cUOrfUWVoXBrsgF
4jk4D3OchznO8w7PQzhRj/Mwx3mY4zzMcZ4AIg93oh7nYY7zMMd5mOM8gUQe
7kQ9zsMc52GO8zBHeXLHKueRnagXCBcJlwjH/QlSziM7UY/7wxz3hznuD3Pc
n2DlPLIT9bg/zHF/mOP+MMf9maScR3aiHveHOe4Pc9wf5rg/ocp5ZCfqcX+Y
4/4wx/1hjvOEEXm4E/U4D3OchznOwxzl0YUr55GdqBcIFwmXCMfrZ4pyHtmJ
erx+mOP1wxyvH+YoD0Qq55GdqBcIFwmXCMfrJ0o5j+xEPV4/zPH6YY7XD3O8
fqJ5nuasIW0bI5yww8C07V5rI7ELMHelhZv5VOztefpFnzWPwS7B4W7+IWvj
sWtgglWlWJBscNU0nsejtqeJU4U5dthdUpKfNMwCuQCFA+psFhzFLkLKBy+u
ngjsjlyCvoGPDjRXY9dA9KCWOsdUw3kSpvM8p8Tn9ssFw7lWdrgycbf+Qlk9
cgHSHw8tdLS8i1yEWyGVazaNvIVcgsvWQSeqTl9DroFRvzdeTvGu7vDcGJ4n
R9PLs8HPDpDDcO316MhJvZALMP7XbY9vRNoiFyG3NCDEJdoGuQT+Y3/ZtCrK
GrkG5mpXNGRPNaxHXSzPsyJ8i3rycFfscPvog4yHBS7IBUjLeOF8+JoauQiu
8fXa7o7YJXANt12yLEpCroHMzNk/7+rjbLiP53nYz5GDsguEi4RLhGs6XyFB
OY/sRL1AuEi4RDjKk5uonEd2ol4gXCRcIhzlSUpSziM7US8QLhIuEY7yqJKV
88hO1OP1wxyvH+Z4/SSje8O1mMhTTOQpJvIUE3mKiTzFRB5IUc4jO1GP1zNz
vJ6Z4/Wc0vmeXW8S7+UuEC4SLhGO52iG8nu543lhjueFOZ6XGZ3v2VWaqfxe
7gLhIuES4ei9OuL5OuL5OuL5OuL5SanKz+eO55o5nutUfq/drz0eUGT4O6Ka
xZ/vu7OpYtxeV+Qi2J+f6rGzxAm5BP29D+kzx9sh14D37uVbc870BJc9w0wP
pnvjnLoJiUeGeGi94PR38+aNM3Xg3nH1gbYtMz+/t9eO+0OTfV3fvzEY90G3
ojW0pKmrJ/68uqwpx50rP3GHtP2hjxcnuXLfsSNGu7GHe+e+tHv53PRsO/Xb
cHD0KG1G4iP2/Zyu69bPCkaky9/ndM7pB5JUfsfT3pR7zYcHjncLGc7qVcyv
pX39dK4+CjwaSvtDvPy5wt9IPmfV7s4DJjVtzWnk711vfbPCQW987n1y+/rQ
kHavurO5R8gJC+5N0Q8Px+iNz8Nnygo1ae0e5vDn6pKDLtyPTLkEFfeMz9sF
NafuLNMbn5/rz04oWNTu0es2zGyNc+L+5W/n6tbrjc/Vc1Zprq/QG5+rd43R
LW3xiAOryc9nl07nfYCzoy9P7v0oFvK72Vb/2PaMfz+qG7ho+kfN8nmJ+b75
I5enWcaB3ade3/7lZcndZvCGsL/t4nAfYEFz7Kkz8+OgIHRB/rvn1Nyv2Qet
8bshn9OYh8w58kfLMPYceb7sVfZPhkyMg22+l1JtP+7LPX/DoMboZFYvz93m
kxnbRxTE8Xt2XdaYmBDUmgraMqHW/2ZP7kW+q/L8ilKhsKbuYkSb/HzTgNqw
t1pSIefqiYYl/vLnOl+UUOx13ngfWNzXp9JsiDzvna7t+0BVpr2p9xgX7qvL
15WZtxnvMz4rp3XR5xnvJ9QcUXNHzSm1D1D7Rsf1/+8PHVfjOaXmmtoHqLmm
5uh1zzW1n7yq+aX2DWquqTl63XNN7Sevan6pfeNl55qar5eda2p/oOb0v4vC
vFP7w79fYQch
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJw1kslSQkEMRbsRBHwy4wIcSn/JlWv3AiKDiiA4MPhrTn/hWOrKhUOpN9XH
xXl5nU5u0une2K5v1mLOuS0xJyIxLxLiRIzERMzEmThlbf6x6BNn/gtiZqzN
PxVP5DzinxKTElY7Kb5EQXyLuEiLBXpK41v1zl3LrvmwZ/4c+aYjt1vX51L2
3db6r9qe7IdsUXyKN+q/0kNGZKmVQtfOMaBf2y8RY/NZZEb2n6fvPL0siR/s
LzmWW4YqewV0IurGqB1x7jx9ZNG9deFcN2JZ57mSXZGt+DD3Z9PGb/sJdCI0
yugUqWv1O6InjlwYXpWZpcj5v4Mc/RwRP2IuA+5/hH8oDrG23qVGl7cw4e73
RRN/i5y2qIk9fKZx7sIbG5BjtQ7EMTmH/A/pbUSdDno9cvap1SWuz14bjS45
ttfAb+uUZlG3OcjO+9Bf0of3luG++uSd0MeYPh74vxcvnPsO/To1Fn2YUcaH
N5HjntrEtOitySxbnN96XvBBK5LdYW7WX5x1wgetigv3WiO/jlaDM9o7iXPP
x8x8iN4BOSV0TO8PrwRbNw==
           "]], 
          Polygon3DBox[{{230, 136, 135, 234}, {255, 21, 26, 256}, {231, 134, 
           133, 236}, {263, 110, 111, 264}, {269, 113, 114, 229}, {261, 109, 
           110, 262}, {267, 112, 113, 268}, {233, 135, 134, 232}, {250, 18, 
           17, 251}, {238, 137, 136, 237}, {284, 204, 205, 285}, {265, 111, 
           112, 266}, {253, 16, 21, 254}, {252, 17, 16, 253}, {235, 138, 137, 
           239}, {258, 26, 25, 218}, {287, 206, 203, 288}, {286, 205, 206, 
           287}}]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNlFlTWkEQhcf4nkeTKjdA4wqoGJWLEUhEMLK4oKCJcA24xKX0n/jbsllW
KommkvyQnK77UcXDKWa6T58+PTOXcOtm5/qJc+5W6BXeCK+E10JNeC8cCjvC
tlAX9oWG0BR2hYpQFUpCEV6VGuM+7XHuSr+/hT00a/TICnlhi5zFy9RWWa8L
BWKd/ltwO70qcCvwy6BEXYF1mb55YgXWlnsrbAobYJM+JfqYzqQwKozgZRsf
65xdR2+NsygQt545dNfwbHMcoFGk1wa/RfJ1zrrGPdSp2UVjRpjCV4O88d7B
OQD73Ne50BY+Cj6xYzRG0WmRb3NXH9A8ZN1i3aJnjrMz70f09smfofVI7wf8
NOH48C22ik6OPmdo2D3scS72jk6FSyEqzAkJ4YQ5LoQJYVyIMY/t44InzAtJ
ZmugH0UjhkYbryfM49PziFie+7F3MY2HKJ5O4TTROWZ/Qd7visXx85LYObwR
PE+COPccEcLMZnc1BHce7wn2Eepf4G+MuPEH2U/jeRC+5UPUjBEfIBciFqbP
OLXD8ENw++FE4JiHBeZLsY8xj+k/F5654Nuw/5xldLo1wvQ2Xh/53p6g9z01
WTSG0DTttAveUQZOCl4fPjt9+vFv92nfpb3hT/A+03cAzRUXvNE0WKWH3bW9
pTaz2n14zLRI/2XWdh5J6j32KfLf8fMVrxk8ZfnNw/W6chk8fMGzeV/Cq/X5
xgx37Ffo/ccFb+0H5xvlvFNoWs9fLvh2f7rgbSWZLYOHNPElcjPMv8Adx+Db
fpa8/U6x/ueCb+Iv+zj1i/Csbg79BDkPj/8BhYB6BQ==
           "],
           VertexColors->None], 
          Polygon3DBox[{{227, 107, 106, 226}, {215, 31, 32, 216}, {216, 32, 
           27, 217}, {220, 104, 103, 225}, {211, 27, 22, 210}, {224, 108, 107,
            228}, {209, 22, 23, 212}, {222, 105, 104, 221}, {219, 106, 105, 
           223}, {213, 23, 24, 214}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNlElSAkEQRbv1AM7D1it5BNeGHgQHsEUZVEAEFBkEFBDEARGF46hhuPRn
9CPsxYuqyjkrq3ttY3t9a8pxnE0xLZ7Fg+iKU5EVZ2D7C7HkOs6e1mWtSa0J
kRY74kDsipK4FjWw/Y14IcdAFJGZroBPWTREhX0NmzvhEdtyREVY7ItDEaeO
iDjGJiPyxJ5z/frmXV9nNjExo3NI6yw9ecTbI5edQ8TdgQjxF1zfZlFrVWuH
Osv0Uhct1iZ3d0XfjYA+yf1lIE3d5+Ik0EeOu8oSx+JdYlfgXAzY5TiXsSsw
R7NLoU9xzuNTotY6d1/B12K0xS211+i1iayCvIxvg3x5YhaoM8PsEoG+J7VY
T1VqLpGjzh0cBexzxE0xd+vpVTyKvuO/3SfHf2dd5mLnXzEWn6JHP/bWh/ib
77cYiS/kI3xWXP+trbp+3x16/0FvsWPUEidui/xd9k3kL+TvU3MP2QM1W60D
9qa7p9ZH9j3yV7G9ZwZtaJCvRcw2uSZ5zOeDHNaTvXV782/ITHdAP57z/41F
6c1Dl2AGaXz7xDfdKXcRxTfBDMPIMsx18v+IE+sY3xh+Hrok/uZbpPcb1jv2
A+qwGt6Z6WSGQ3QfnN+Q9dmP8Rkypw5z+wOx3NZy
           "],
           VertexColors->None], 
          Polygon3DBox[{{274, 140, 141, 275}, {280, 143, 144, 240}, {243, 201,
            200, 247}, {276, 141, 142, 277}, {278, 142, 143, 279}, {242, 202, 
           201, 244}, {247, 200, 191, 241}, {272, 139, 140, 273}, {289, 199, 
           202, 246}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], 
      Line3DBox[{1, 2, 3, 4, 5, 6, 12, 18, 249, 250, 251, 252, 253, 254, 255, 
       256, 257, 258, 218, 25, 19, 13, 7, 1},
       VertexColors->None], 
      Line3DBox[{214, 24, 30, 36, 42, 48, 54, 60, 66, 72, 78, 84, 90, 96, 102,
        108, 270, 224, 228, 227, 226, 219, 223, 222, 221, 220, 225, 103, 97, 
       91, 85, 79, 73, 67, 61, 55, 49, 43, 37, 31, 259, 215, 216, 217, 211, 
       210, 208, 209, 212, 213, 214},
       VertexColors->None], 
      Line3DBox[{229, 114, 120, 126, 132, 138, 281, 235, 239, 238, 237, 230, 
       234, 233, 232, 231, 236, 133, 127, 121, 115, 109, 260, 261, 262, 263, 
       264, 265, 266, 267, 268, 269, 229},
       VertexColors->None], 
      Line3DBox[{240, 144, 150, 156, 162, 168, 174, 180, 185, 190, 195, 199, 
       289, 246, 248, 242, 244, 243, 247, 241, 191, 175, 169, 163, 157, 151, 
       145, 139, 271, 272, 273, 274, 275, 276, 277, 278, 279, 280, 240},
       VertexColors->None], 
      Line3DBox[{245, 203, 207, 206, 205, 204, 282, 283, 284, 285, 286, 287, 
       288, 245},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJzt1/tXjAkYB/AxLqEsuigHW7mEXCK5NC7foXKLIjqkZMo1bVklRpKUELY0
TCjbRWJ1KmoRksWIFKneGV3eMap3Zt6ZKRq6UEy78y/s7ayz5/3pOefzw/M8
PzzPOc9j7b/LYyubxWJZ92KxeuvjqTBO5DydGtUONmtHKZUoPRdXo9lBQnz+
7hgurUb23scmD4uVaOE9GF8VQsJNOCeKV6HG4uDxP5mdVuLcOalXn0gSj9f6
juu+pcaklEv5yzYrsc0lppUVR6Jg+0RH5UU1eOy8KZipBLFrd47rWRJ7tDct
P8SqEVjhgeGGSuQPEOkyUkkcyZy6cqROBedxhWkJHXJUiSbxh5+qB5+/Z6TF
JhVspDLfm+kUih9vMOa41mLnISvrrhwamewrPeFWTeicPH9mx0MJ3hS17x48
kAZfLjxmcqYB5k4hCq62Gv1l9Z6/hOn7e+w7gXP9DaLSrZTOvV7h+KIowdL3
CjjvVMhsj9ajJ2b2q/D7pQh2vG1anEtjTbJ7nvXoJhhvtBU8FEng11HUprui
xOx314qNX8uQFFTjOCirEllauZ1PkgJtBrNMC/i1KJEMEE7PfoLblSUlz/zl
qCdPhrKFYlw46Dl9WaoII/iGAw2Mm5Dbi9VWEVyNGxnt3g43nuBJkntq6nop
PBYfdS8PI3AzY+yj9xmleGpjJJjFUaJu+lVBh6sU2YFLpydxX+DMZipHkyvH
nTZuSmK0BLaN5Q9/LxVheX/riKwhjQgyESRfKahG7I+pZtdvlqC/d0un19Y6
FF503e1ZR8DxYpdkpFXZn3b/qJfH102V45hLVMusVgJsw0N1+6P0dYfzNjon
k+Btj77SGE/ANSHJbiH7+T9Wl3HGGWecccYZ//d8owW5xambwhBLa2H8cgLn
DVKkMn8RTuWnVBFdFD6m7aucsoxA1eZRu9L0vjTGa8VivduOGuUbvIRA+4Yb
X9z0PuPd5KMpnynYfdUFebgQuH+ERb/zE6FjiUBBfKKQrbF2JhcReCFcFRih
98tDYk+0dlLw8bnqMoBLQNdakdzN03uAeCjXh0a79Z3wDSGNuGByvGtRshj2
FdHsc240xIkBX5vWNoIS2M7cskOMbccyY7tAY5bl0AA7h0ZEBq2yqrITo2+/
BWNq7WmERkvLPxrp8xSGb9E1EkihOEvGjaNR0yPb11vegANDM7aUnyZwOtEh
y9icRqBy/seOuw0wYqfd8ZtPgL7dd9HLNg3CB804XJatQnOR61BFVz0iI0rH
+tdq4L3vhiaUr79blSEp8/uRiB4wpdCrSIPg4swYGycVFDIhd5UJiYCjDZdC
ftbAgTd8HddIBdv9b22eWZEwiCs47H5Ig86r3zU3i2msyJth7jWVROSgws8R
fho0TVuwd1IqjUjO+uKnc0mwe+/KdBfSyOs2yxX5qPDEt2z2EadqUIpbnLBW
GmEvHHL3n1QhTFKuPa2uhtpysOiDmwpyn/Dutvsq3LpOxodeIDD3YOTBefkq
jPY/+0NTqwo5gS1mh93EUC1PCuGaqqEdvKlu2hg1ZIN+e0n1kWDnAvcDi/eq
Yf9l0q9fPPX/QY3pi5C7EqwJaIoyK63FsLfpct4xCplOnx+M/F6NnvKkZxse
1WPaDiu5nZaCkUUSfzOXhn2tznGeXIqyirz96X5yrE0WlHjMVWB9Yly+95i3
uHdrz/OWWjl+d9A6xo+gEMrpt9rkXgMifO9up9YoMPCpstq0uQECdgL7kbIR
hf1SpDmVCszjFiQKt7/BMIuCe5LQ16iPv1ZUYEjhovn4B/WrmxlnnHHGGf+f
e3pl9oWMtDeY8+Fr6qHjcnSyjkjHnpCDq+mZYMGvwcqET+bXF1KQe7bdKfXW
IGFiUFbsgyZ49Q9zdp2mRLwzq1sXQ+KrdqK7Np5G6RoZb6+XCuFxMo9ns6vR
1/ZySOslNdo5H6WWQWpU2pfNuW34+pu76xj/b/1b2wvG/5p/a3PFOLPXjP99
/wPXAwgT
     "],
    VertexNormals->CompressedData["
1:eJzt2Hs0lekeB3DSVEMlRU3SBZWKLlRsoq+hSCJkossQTbGjdFxzHxlpGNQM
hhS5zSgJ5ZJL3tybbYSQ3Pfe77t5X3vcYropzv7n/Hfmj7PWzDlz1vL886z1
We/zPL/1ey/r93sVHd2szswRExNTFBcTkxDNH2ItzuXZPsPDiNjJYPdsJFab
elpKjiK7epr5Ra0VFgbbMqMqKpHgXm5StmsELl/2V/Q6dGKBMF/PraIKa04E
ewtmfoO3nAfn5fx+HHOK8v0itRIuusZSxulCmMevaVCf4CF9cljFjnqCKFlv
rc9UhjBeYq6SE0FiiXPrgMz5atRcNotp6aMR+taZPRbTAp0NyvY37X/Fa76Y
zanxYfCcDhmeDG3HQd7hwuK4VkgukZR/8PVvuHD89IjD/m4YN7CaxPpbkTxl
Ozy8QwipFS6cfBYXhwO/aDIaeA4jzOtSGmJwI21y61ZvPmTYKcVkTgumTQZD
hAk0dj1KHA30J6GqGnVIbWcbrFViDA0ODmLnJzc848qfQxh7MNJCtQfJ64MC
+jYLsaKmxeXUxhc4ad3LYR3kokX+ffFHLQbmLgOt6Vrd2JHGChdqcXHE/dDo
k+lBdOnFudUJ+mFc2TRYurAfnMJ4z+6PA8h8/9hIUoYP+58TXBqZHoSztxiW
yg+g1d39RqAEifoCYdSBkz3gvNyTMeEngHhR4QvW922I/UAkym4jcb9e1zja
axA5xezej64dyKt0yrDJpXB95nz0flcB3DY9vqtV343yg0ZKebYUOuV4+79y
pSD2b8fYf+yHNH3C5kp34Ke+YMs1vgOgPFaSLZkk2sS2y0z4dYJ92dB5wmIQ
dxcXBf6jnfennTvrsz7rsz7rsz7rf51fjxgThkpSxCM1+/nLOEcQsJSi3F7R
eDJlSa2TpoiENSzG96o7Dk8pc2+P0HjIjB499ZYkPLTW6A0s8IT52teWnWIM
1qZqa1b0kcQezgGV0F1eiD11fre2HIN3PM72H6tIYu1elqKBrDdiZ5Ka2aoM
7C1s5KwTSKJtxWW7qLQwGIl/qzhuymDD6nMF7+0pwk5a6lJ1bzR2RCbqpmbT
mFSWOmp/kCJ0fVVXhCgnot4kTMe1jEbcuZhCnWUUcXlVQWTKuiSQki9nHg/S
cDge263fSRI6rvslImNvQqe8MytdFM+ZnT/MTb9FEuerDCaFUbfg9o10i9w+
Bv4Xrz4V9yEJk52SbKO+dBSwtYvO2TEo37Nyx+bbFDE2056XVZwJzxevFmac
p3E0IU5z0p8ivquX8n2+6B5yblUvSAqjsdtu6kY1iyIGum0Evfk5sC0XaGiK
4iyw706beEUSvzuXSnll3ccS/YqNQaI8X5ROPiB1jyQcNiRyxOfnIvx92Fz5
LQz0Kn4n8i+RREsp+2mF3wNcMM69/cqEQXvqMd+jpRShcEnbtYP1EMuVbpx+
bEBDweGNh8UVishIWS7dO1WEh3ZncxsdaAwfexCzSosibpp2vuGceYSxsfao
Hck0RgsV6BU8kjCYMD3ibVSCM0qdzrZcGvH6qmukw0iiN5sv8f5hCY5nxjyS
VWEwT0NCTWILScTm9a/0/rQCkTZtTbnHGNTX62d23qQIqQchqQ1J5QgvG9rY
oUkjVW86cb41RXiktE6m3H+CggjFklcnaKz6JSSONUIS3rtP1LspVKHwunqJ
YwoNPbNyvw5R/s30ZRdfYFXjSeE1x7VjNEzUdd+0jfKJM5fkT+yVq4GCzPnn
pmYMDgWZyVgc5hPsC221+x/XI9FK3s/tGvO3e79mfdZnfdZn/b/j41Mv4mtk
+Lgb+7Kec5XEwSAjGdk6Hr7kn96bbyJEwZbebfUudbh/3/XunqB++CZMdWR8
IoDfRMTISlsSzwZUfptu74Hu6+Zl/UspdNe8UmLieFjsaOh5MouHMkfp1oC5
FMLd5DWc+d3IKE72byn88/63/L/4UFBdgPu9lyCX7zgUsGsQtV0Lrbif8/92
cf7VPpiqoXFXVPemRddtNdl6DA3+mlVsUZ1Z1Rs3uN2JJFY+ML7qVFYH2USZ
D0QjjW6z7MJpG4oIT0u6xiurgoTcvMwifRqB++OtAjZTxAaduPORl6ohtUCH
q25HY++Lbv+PQySh+yqn7NZQDaxWNyjbBNGobYieMc4nCU2TtxMhfrUIGF9a
tDKThqqs7XDCUj6RrU2HdKb+gkmFBnWHZAatLB8pj+sUIXfrm6CKFgJWo/EF
ITtomMv+uDpUkSQWm6nHdW+qh84+z4tffqTRNsfYMZ/DJ95P7zu72vgpSjnv
RpZuE9XPtdKf1frwie/bktusbzxFs8SBfUpn/3d1l3Wox6Ny5V7Ue0mKz5ca
hMkclfCjldw/bf+QGdnHEb18rMtNtn13pA9vTNnChBEKgdlyYTVcPq4tMw4x
Hu3B5i/SNb51FmBxqlBiaR8PbcuMG9elcCHhfjFr9UMKz86dPKtVwEWj1HS0
QhgPnz3MYbqGKVzOzdZ/kt6PcAPxTbqidTfqOrjulgJcj7fO/ly8D7Uz03pT
4ySk1p6MWDufguStIlOBQQ9MA/C6tEGAZ1l7TMzy+HCNmZabUuzGnMjIrxPs
BqGwwne78noeRvy+ulBZ0IUlftHaM6L7reHol35bmQsZR7PBZx9eYiZ5wj5U
S9QnmEe8rav747xN+313to0iid1Jlkkn/Rxws9n/QugSBs8PXWnWHiCJohoX
llaKDep9/GbOSTNQXK6pkTxIEu9KrCLN11vC/uc8Q8vFDL6Xb8yYQ5ME8+1t
ai/HCouCq7aIi1ypYVGJk8idb1t4ca4cQPNGi978RQw0l9g0/yra54oXXaj+
xBQLe7aVq4mu3/7TnKMaIu+NS3bdOqmLDr1FG7NEPu4Z9zpWQBKVRk6s7juf
405XlfGYKB4Zn1+JNyRJmHuwVZI3rkPBUN9NlgyDpT86tVqK+iA/dVqxkquG
SGdFQ6tls33Ev3ynv/i7iW94xAzBHY9TbUKL1yKjCNH3JG4YNYJaLv5R3Pd8
0V2GSNhqYvHS+jnudKY4PmCEmHj2Rnz772WEYUzYqqSQPnQsDM7SkB/AT/pm
Ks1KJNh5x/cKP+lCs9jm9rRPBfhgt77oB1UK7Wpp0R9cu2B6r+7OHmkKbE7T
moijFGx8muxaOnpgkXt6ffAoieDA/svDhiRivxKYlb3ux/LYwCHfRi58Tu0t
IOYNILhgxSa5uX/8PP8Tho+3Tw==
     "]], GraphicsComplex3DBox[CompressedData["
1:eJzVmHlUFFcWxhtRA8PWLIZCVArogTgyUUeJipG+ogiiKMoSEdCmEUGMRh0Z
yQmiLAEXNDFMMuMQBIlgTFyCQdxjgzIYcQgQxrgbkYTVBeICaEj6SL9Xp27X
Y/CcmXMm/c899+f11serV++7VY7qt+ZHD5DJZMsMZDJDGfk9UMpEP4UGcdBx
EHM5g3MMzjO4AnHy/7Eeyhn1WA+HIuZYD64j0YWhh3JGPdZDOL4O4ViPC8pJ
HMPQQzmjHushHOshHOsZg3IS3akewxs33/UOt9UgzqjHegjHegjHetxRTqIH
1eM2tyf1eDLZZ5Qz6rEewrEewrEeD5STqKR60uVuJqevO2HOqMd6CMd6CMd6
lCgn0YvqYXBGPdZDONZDONbjhXJd3DhdWo/AGfVyBucYnGdwvD4+0noEzqjH
60M4Xh/C8fr4oJzonCmtR+CMerw+hOP1IRyvz0xxTuNsaT0CZ9Tj9SEcrw/h
eH1mo5zonCOtR+CMerw+hOP1IRyvzxxxTnkAQw/ljHqsh3Csh3CsJ0Cck6iZ
J61H4Ix6OYNzDM4zON4/gdJ6BM6ox/uHcLx/CMf7JxDlughBVE/ysarCmwdH
YA4r5K9vaNrFIy6HuuWX1xxvcEScg2mt3bljRzojjvRQjvdPMNXj833YvnFZ
JpjDxbfdVg/aY4q4HFxNz3cXFpshzsHTKUEHD5abI85D1tYDDl9+Z4G4Avw+
zbcrjNettyaE6tndddQwt6D1DOIQcnfK56/8FXM5FGeNcu5IxpyDWxvaijtW
Ys6DavP6PIcwzBVQWr9l0JszdFy2gOqpmOD2sn+wjQZxmBbydluJvzXicvA2
VaaFeFghzkF7Yew1e3tLxHl4nHH1nZxbFogrYJ1Ko3RaZdbLIZTqaXbLcLfs
dMQc7of/fenvLXnE5WC5ZH9VLj8McQ5su0xTitpsEedhUs1N8M2wRlwBmhvv
t8lu6/RsXEj16P4dc5Dmcrh8KefU/hAecQ7OBYbU/DnKFnEeMoYG/MMmyARx
BYywaK2PcW3T3ccwaT0CB2mu3T9dRZet9jkgzsGQ44nlxrvMEefhl/IfV6w6
eV0p5go4uaf1kGqntS6PkNYjcJDmcnCs/WVa6A8c4hx0jL3t11F0WinmPITH
3audf38oui4+fxZJ6xE4SHM5zG0qSLodYoQ4B97HyqofOHCoPz5/Folzev4s
ltYjcJDmcti9cW1lyeSnSjHH/kU49q/F4pxElUpaj8DhwImnDRdqhiEuhz+W
ZKxun8SjPkgP5TyDY/+KlNYjcDAe8s9Xi1uMEMf+RTj2L8Kxf0WiXBfzGHoE
DllHrswcONEQ1SM9eQw9eQw9eQw9oJbWI3Dwyc69NsfXCdUjPZRzDI73s1qc
k/i9cF1pLmdwjsF5BsfPUZT0dSnH8x7h+HkhHD8vUeKcRH6J9HUplzM4x+A8
g+M5k9Ffw+ivYfTXMPqroqX7U46fa8Lxcx0tzmlcKt2fcvycEo6f06UoV8CC
xll5ozutIWbC0J7syivku5fG4uyeY0VPDMD1b/WDCgZ3ou9hD5Rw8Xrokvjr
tJ5wm9b2ZZcmC/Um3pmZdlkK8Mx81nnMs5bWu1TO/cp+73D4wz27ZXkPH6P+
HDQnOrqum34F9efA6dR0//JNT2h91dqjk0sLR8OBT5rWLrxSROttTFZeXv/e
SHD5yyTOI/sh6u8Cr1S+Hzxofg3q7wKDA9/r/ObCI1qf8kGi59qYP0Hm5kPG
XA7+LjgGotJGPQqM+AL1GQNZ6/Irkho6aP2Rb3c3lKgnwpZq+1HmnzVQfkIV
1jzBZqyuH/mRPu4Aq7Vjj9ddWv9zksXXm+s94cMB47eV79iL9HjAx547D04M
vo24EqaUz9ppnv8J5eN7vCt+jhW+/xBet3XH9uVWQdDoP9K4xNkSCF+9OEGV
diIQtg7j7QMPt9A+8Z/ZOhfU6r8f7TBLTS5tC4RRDqaB6SMHUr6xx6ooYbDw
nkJ4/aysxux0/feveKcP0xVuwvsL4dMuPrY6PzoI7tuuDLwYg8/hINhUnL4m
LmA45dUpr//wqV8QDLh3yLLipAPlAyqjEu/46b8HPVudc80rJghMVZOnRqQ4
U54el9lqEqv/ftR5YEuRcVUoXJUFF9RVttP9MLjstcnrZ+vPtxWOyermsIXg
0fzGjHv/MqDcKPvxlOgcYW4n/HnQzrHr58WduXNyAK0favQoLtYxDNIqOwq7
774EonrtnNm1zXiewzKBu61o9rsbGg4D2/mpp/yNxPXaObCqYVXZsK5BlH9r
uNc/80YEWH+jnDe6jd5Hjfkii8TP3wnXWwfSZ2787jciGx3FXDvXZcaPdmi0
N6R97I+azW9PWgzWBamHN5kJ65N6K/pS7jphXsV9rI+n+BtF2FN+ZLP7W3vd
VODa8u4qjx1WlA93P5+wK0V/PvS5klCddkuYS0X9tfPe1ASbk+ZG+vNkQmZp
/qGlQ2h9/oymOcs2qCBg/1cDTx/tEp8D2jktuCXW7vAFfT6m1GFBUoew/7un
RdndThPmQ8Lrzj4pS1FGwpdGprHK2T+hcyYSzozblv5mtz4/W/vdlu6q39E+
PzZZhqf7RsK5I7FjI87Q+w5qs5DlH/dEQsCaCvm/XVvEfbRz1L4vEk/P9L2r
x5+tPPxq0gS6T+Blk5yA4glqiLA9HLKoTjgHsgcbNlluV0NtmcH4rJo62iei
pMbdY3oUPKwt+fq10HbxeaWdl0xiJzrlVd4RX1fLvcuro81Shf7VBs5XV81X
63KBN3/0wXZZjBrsgqy8Csbdon1WrPUbYVCmhiZfW69Jsm563Y8uxNXLNqih
3WjeuW3jBN9pPJ9UamAVBa62Nj+5yR6hc1Xf7/r2TX3/6tsH9f2ob1/T952+
/UvfX1g+1Rv1/aVvP+q/7/Ttg/o+y/J9sm7Y31lzCLkveN5gzUW9UX/+YfnX
/9o3WX79W/FNlt/9t/z0efg/8s1e1f33wV79+n7E8rXnQcJ3+vQpCR/p03ck
fKFPH5E4z1nnM8svWOfzi84hLzpX/Kc5Ac8DrDmE3Jf++j65L/318efhBXy5
9+/tv5+yfJPljyx//xVbIZ4+
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNk0svg1EQhs/BgoSEpZVIFF27E36ExMIlLi3aurSUFr1Iekn6kaiFbmzY
WFn5U34BiWvCe3KeJl08eadz5szMmfk6GEktJtuMMUuiXRyLA7EPR/h6rTHP
0j5pUnoqUsTsEec0gd+dX4ic8fEn+FxcRmTFIf4kv/OiIM5EmrouX1TERUTE
sMfUx5Z0HI1xfivqokGtFPUyLX3FqelyT1h/b9L6mgfUvSKPy9elswdph3TV
+txr0m7xJLvH5WA+UemU9T1PS9fFo+wN6bZ4kb0jHRUh2WGpEXeSP+Nj742v
53jC52recRbm7quYt34HC9Ih0S87JH1n9m/Udjk2pZ28xb1pWAzIHpHOuP5k
z1rfn+tzF1+C3RbZT1lUxaWo8LskauJX3Igf5ndD3+7uObtdtn6uK9bPuUqe
IrkqxBXw5dlfDl+JuBjfUJydZbl3hl1g3znuf3L3g97PyV+nxwZ7D1p2f40v
Qp0oM3JzmbO+Rp6825w355XiGywzmwBfgu8vTv/N/8cF/VborzmzNG8KmGe9
Ze4Bbz/izdfM84qYoOVNNe5nmYfr+xv/l/gHG/J2Bw==
           "]], 
          Polygon3DBox[CompressedData["
1:eJwt0bsuRFEUxvG1RURBQkEi4jJkUDBIxlzi8hAKcY85JAShRqWSSERBMw3N
VCrP4lHcbwn/L2sVv+xvzuy19jr75LLjxaMmMxtCM1aT2TXrLdbIfXgiT7P2
B+UpDGA9+d46NsgVbJN3UCVv4Z7cQI38x3qDK/zqTJ7dRX1L8h7KqtmMM3TW
JAbxE7UX+NbcPJvAOIaT96jHGUZewAHxEM8YVU/WPMaip3oXkEMePeZ7Rsgl
ZObvVCbPYd+85zx5GZfmd7ZCLqJmXjNDnk1+F6pR7VfMfo5P8zML8Q56lzee
neEUr9jVPOjFHjrxEPfZRm5PnnWHreSXqD3Bu+aO/Y/6JtFDvZbQhe7k/2lP
R/Jv1IjfGfkjZtVMmu0fMhQ30Q==
           "]], 
          Polygon3DBox[{{291, 300, 299, 25, 292}, {358, 176, 278, 281, 
           359}}]}],
        Lighting->"Neutral"]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJwtjzsOQWEQRv+hUKnoVHbi/RZcRG8BLIHmamjuba5GpVLZikJEJBJLcSYz
xcn3Zd5TXW+jTS6EUIE8HOAIJ4jda2whIdzRpVgugRTeUIIv1Mjt0Do693rt
m8ENH6Fd7++hQzjjR2J7Et/bFtvZQZuwx7fQlc8si92hXmMPtAAvaHi99j3R
Inz8Pr3z5/t079hrY/8xg0uwXF/sv4HYXZn/m7rXmgm5Kzr1v3WOzvsDuO8o
PQ==
           "],
           VertexColors->None], 
          Polygon3DBox[{{321, 127, 128, 322}, {324, 128, 134, 325}, {334, 157,
            163, 335}, {218, 13, 19, 216}, {333, 152, 157, 334}, {214, 7, 13, 
           212}, {326, 134, 140, 327}, {338, 169, 175, 339}, {330, 146, 152, 
           331}, {328, 140, 146, 329}, {336, 163, 169, 337}, {306, 1, 7, 208}},
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, 
      {GrayLevel[1], EdgeForm[None], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJxNlllPFFEQhbtZlAHCAC4QWcIWEdl0EJB1UFYHUEAQUAFjgo/6V3yBB/DB
MRFMZEwEFGSRbVhExBhjjNFoXOIW4/IDNFalv0n64eTeW3XOqarbA92pF6+0
XQ4yDOOTIFhwQXBW0Cc4LegSdAPd97J2CnqI98LXfTu6M4Lz8HR/jnM/Nfqo
047uEvF+9G3U6UCrHvWCJkEzuR5qK7eVWqo9CacFXSvcTnpoRqNct2nV/iP4
Du8bnCZ46tdg8+zAt52c+pwi3oKukbpt1O2yzdyNVwMzFQpKBWWCOkEt+hP4
evAM+NXDa8LjOLF69scENeg9nOvIe/Bswa+RvXKq4FWjraH3Vuatg98Et5ZY
Gf1XATc59SwnX0ZOY5V4u+mnBd9GdB7mKLfxq9FUsK8kX2SrX4JnGXG91xyB
S5ArOIpOeTcE1wReeIcE+XAq4BUR13wxcc0fERTgk8+5kLWEXlxwCzi7mV/5
eXAP4+sCxWiyBBmCdOofRJfPXvM75Xc7JGuorIOyXhUMkDtAjRLqBzzz8HCT
0xmDTEtnmla+gN6GDct3AF0uuWz6zqGXDLxziLtsd1FKL5noa6mtz3E/mkx8
c9F6eS7DzJ+Gh/YxRPy64KZgRDDKs/SSGyKfji6LWtnUC+i95HOZT+dIttVM
pbcxwV3BuCCJXDpIJubFU/u5RT/al9O0+owyrZkGqe+19a7rbeqMMJeefXgp
J4UZUuk3k1kCetXege/jfj3c9yh5jX/A66NgSbAo8DNTJvcxRn2deYq57wsm
qOEDY7bcOPwJ9qqbFkwSm0Q7Ae8eOh/8Cc4zglmg+wX2U+Qf4KXecYJE7n8a
D+XNsc5SZwbtPPpp9tM27hznh3Dm0S9wR0twdL/LtO4nVtZlNMrX30I8/SwT
W+J+V9mvwF8mtmzzXkKzKVgXrIEVeOvsNfaIVT02OK8CP7E1W51FauhMj/HS
Os8E+u5/bvPV+DY83W8JnpDb4E62bOdAfpPYNnuNPcVnG52fXvS5JRjW73kB
Hz93F8+zDRWECyIM67epXP0biBLsFjjhxsJPwjeN/D7BHsFeVq0XwzkOxBJ7
IQgTvESXYuNH0kMc2kSQSq13aN4TS0Cvmmg8fhvWd80voPuf1I+EE85M0cBJ
3zGctfYPw/re+Sz4aljfMl8Eb5j5LbwEetTvOYcghH52cK+vuMfX1HCidxB3
wguhr3ByGg/mvaPvnyj+v0WYln8kNSLQBGYJPIcw/B30FkTsn2G9v/7qXZrW
3228aXHCbDM48E3AU+/9P2d3CXM=
           "],
           VertexColors->None], Polygon3DBox[CompressedData["
1:eJwt0LsOAUEUxvEZl0RISBBko6BR8DZat0RCouFVNBrVNiqVQqPxDAoRIQQb
d8ILiP9kTvHL+WZn5+yZzTd75a5PKZVCAC80UMcTZ8k13HGTXMUVYa2USx3C
T95Rk4hijTda0tP0vsjZCh7IcmZGncIhF1EiF+AhqG3vAXzkOMbkEWLkiLbZ
lVk8OZvDERlte0+QJp9kz8Fenpk90zNB1tp+q48fOqznys5oZl1RQ2YWLHCQ
XubOW2zk7uadJb5oyz/44A/Eyywt
           "],
           VertexColors->None]}],
        Lighting->{{"Ambient", 
           GrayLevel[0.8]}}]}, {}, {}}, 
     {GrayLevel[0], 
      Line3DBox[{211, 2, 3, 4, 5, 6, 12, 18, 24, 30, 36, 42, 48, 54, 60, 66, 
       72, 78, 84, 90, 96, 102, 319, 241, 240, 239, 238, 237, 236, 230, 234, 
       233, 232, 231, 235, 91, 85, 79, 73, 67, 61, 55, 49, 43, 298, 228, 226, 
       227, 223, 225, 220, 222, 217, 219, 213, 215, 209, 211},
       VertexColors->None], 
      Line3DBox[{7, 1, 306, 208, 214, 212, 218, 216, 221, 224, 19, 13, 7},
       VertexColors->None], 
      Line3DBox[{31, 25, 299, 300, 301, 302, 303, 304, 305, 210, 285, 286, 
       287, 288, 289, 290, 291, 292, 293, 294, 295, 296, 297, 229, 37, 31},
       VertexColors->None], 
      Line3DBox[{103, 97, 307, 308, 309, 310, 311, 312, 313, 314, 315, 316, 
       317, 318, 242, 108, 114, 120, 126, 132, 138, 344, 345, 346, 347, 348, 
       349, 350, 351, 352, 353, 354, 355, 356, 357, 358, 359, 360, 277, 342, 
       283, 281, 278, 272, 273, 268, 269, 264, 265, 260, 262, 256, 255, 252, 
       251, 250, 249, 248, 247, 245, 244, 243, 246, 121, 115, 109, 103},
       VertexColors->None], 
      Line3DBox[{133, 127, 320, 321, 322, 323, 324, 325, 326, 327, 328, 329, 
       330, 331, 332, 333, 334, 335, 336, 337, 338, 339, 340, 341, 343, 276, 
       175, 169, 163, 157, 151, 145, 139, 133},
       VertexColors->None], 
      Line3DBox[{253, 144, 150, 156, 162, 168, 174, 180, 185, 190, 195, 199, 
       203, 207, 206, 205, 204, 191, 361, 284, 282, 280, 279, 275, 274, 271, 
       270, 267, 266, 259, 263, 261, 258, 257, 254, 253},
       VertexColors->None]}},
    VertexColors->CompressedData["
1:eJzt2H8wlHkcB/BFqU5dlwubQ+W3fqAY4cq7phTlR/au/KyTbZdKYgt3ItSh
cyqaUzpLpYjpijP5UUZoJaHEYrHUsvZZz+bKj5Aaze3M/W3mzNSh27+emdfz
zPd5P9/v8/3M53mW+xyhMeQpFMoBOQpFQXqc69k34s5oQxF7R9CuNi6s2GPN
GstqoErNv9d8tAXtZ3NK8pWEYKsZ3G93efnJXZZnZuXRv1Rp5+0ogrWzSkZJ
GA/3G3OfZepUTlmeB2H5FQ5jEkQ9NDzffacXvJABx0Oj7VOWh007XC/obEM2
39aHUiFE5HfWv4Wo9U5ZHpnLXOYyl/k/zpzP28bU74any2Hnrj4RVg/u0e5v
7UDbwT5W/w4B4oq4rLX6IlxN2W3jVtKFGhXumE6V9Pw5jrePZw88jAI/VLmK
oMhKzQ1624oCh7GXfklCxHeO/kzvn3ydbxbTRpNZEjCvR5QVt5JIjUguN4vn
4djNUqehDRJs7CrKYpWSyMm0TYARD7RB0Rv3eRJQzC95r8kgMR46GO5V3YIW
ip7ojyYS/SadQlEsibEvlizd5duCB0oM5frLJDyzBdrRh0isDr/1emh2C/zp
V4yvHSShH+PxasiZBL1V8Y389WYEKF/KWh9Fgmmf0HeZQsDNNDrV7Cof/HXU
tTlSry6lm/vKEVCwDC6Rl7qNoYWfejSJa09DF6yTJ1AUH1VRf4UPD1WNyESp
24yv4y9UIBA8juTfpe51gH1X6SQJ4wM06qDUdw6zqXSp7x8r902QuvpQsevz
WQQqPc8YGEmdCDrWkSYRofqtQt7GwHZUX3YWyCdVo9uQgnmaBNj2LLfkND6q
qRbWBUQNttc3jBa4EHjFiQzaL13XwuNDqTquT3DP/4nqjdMEzFK+titf9hz+
43o0Vnc9NGKXeYkrCNS+iNQgQ17gaaGlb+KWBmxRpj48PS7NF6JplXlYALlA
XSP5rEY0/vrN9pTcFxDFRutqzubCiUvEOQxUYe6HO511j7tRHuO7ea9NI8JV
1ptZjnAQk5hYtMGmB8LEazeOL2/C+N3IzFO/cJD/w/Br+9UiuPOcNtup8PB+
/qoVfosqcXuD+iZFZenz64YUPvTkQ5ffEb9yfw0WdKahdJCAJNB9Bd1RgHPa
j9QVmY0T9ocT+a0cFYb23m74x4/uK/NohIWCaqgxvRJlGpb8RztEcApNccwL
5mFQsjujVLsSFyyLT5msEaNg8cDL8TldUBlJSDBs5cJ0bJFEJYKEVjjjWcs7
EVwOne9Iz+BPOk+620DcDQMhNPNsda7qSedNa6HT+oscDNTOIrIFBGap5Z/1
UhNAEMt50PGuAV/9mXiEHiPBKHUkYrFAjLCDK0+wV0rfN6ax1UnzXtS5NWzd
lNuLoZqo+go/7qTz7AusXaA00oM9W7MvsJkt6Mo23k4Z5MD60bYEo80SRPMN
vE8wxahlnPEPsOdj91CSB82nB/Y7v7z4vYTAmiv+dRo83qT7+YncJN2k3TxW
jC1n07z5dV2wsgqKDjBrxhGrpauWLCSgV2e0yy1bDIedScMaqk0f7ftiInev
SzaV+0sCQztf8q0miXTh42Kh1sfrtye6b1+rQbNAtQe3BeTxOZlcWFbfNNU5
ykEW1Ss6QCiAk/1P6UoMEcrMw9oFbMEnz2M2MPve8mAx4sILAxWzuzCeq1VF
HZ78/H+sPBbf+i0qrJXAljbcpPUjicALA89K9dumLE+HaKmGYyofqyR5rgzN
Hqi9b/hAYxHTrh+Qucynw3+b/9v1M2UcmU/PffS5+qeen5le32bKvE3V+NOt
rsrqsKx+/pf1UOafx7rLXLbvZP7v/W91s5Jd
     "],
    VertexNormals->CompressedData["
1:eJztmPk3lWsbx82ScWki1U4q5UQDEsklORIaDjpHpQwZmylNklKhwVGZQpQp
mYeQhGvbpmibtyl227z3xvaQNNg5vd4/YL/rtdY5q9Y6nh8/6173872v636u
73c9ivanzR0F+Pj4XPn5+AT5eD2jMMtn+f/DjT2UZF0yMrC0tLWVr5fApYkm
XoaKaT9MT39NhVJxQw4azbNJdG8hcPWAJoWxN/2H6SltotemqedhTmnqd1Yd
gbTLkXH+gZk/XR9n+Syf5bP838bDDM56K3/oBc+52ZZVK5sxP6CEtiZ9AMTH
0zq0cvvh3qVhxp6AWoxSUnU/qDsA6+WN3gVrMSE6aYR2xJ6Kmiud5gy19UGC
YVnK7jMssD1dPCrgVI0cep2DWVDvjPU8MS54sl+qHyR14mIdqIX4smvLkmtN
TFgxIaRQMq3n5j3au6tTWXhmLE+nwIkJLZU7H0a5DcCL5RRnikEWSowtzZTO
HQCzuIUFX+SY4Gu2QzHqUSY2ZR4gv5EYABkxbfeIdCZkLvi1fPG3DDSrrE8J
P9kPRq895GTvMWFXuwrdPCgancoFLKoS+kFCRsZmC6cPsi/GvMgjP0D/+b/Y
damzYPfR98vPkfuAXVjkoakegcodLXcdrVigM/reytCvD1S0rytk2UbiwIcj
ojb+LLB88yDexqAPbnYllGxPeozlVCkp4RIWSJ757XvUaC8cF+FsnZKJxuEL
kzkJAmwIM+FbKnS3B+wjSx9/GX+GNR4rF5nPHQQc7ZT1E+kDMzkjSqFhFhLL
Gnty6Czgl7y+ujanB9zoviL7ZUqQsbLJdv1jNkhKf9fe/b4LiDWRNKKMgvSO
D3WTbwZBZO1ph+hddOAUPv8eeLMMHa/O/xL4bQjYn82lbfjbQMGgva5ZpwLX
yXLz3ZU4cC0iSnaEXAMvDVMvF29swED9YKlINgeSy1ihqnndoP66/9sqvkb0
O2I6b2wBG8z2iDZ+mEuHaOvBifNx7bgm6/dd2RfZ4FR2TNzhFA3u3Dj4cVSr
EyU1hG4Ptf73XAMW3rplICyp0pNg8B7JN17ssSwagiNy4nuiBYOxd9Sv3tGV
gVeEQpVjGENg13X7XTf3DT58q57X2tKDkX0JV9ny7Bnft6kRv5evFXNgg6uB
Ed2fiRf0j2or3+4HeR+Hzt1xRWhzLqZvrJuJ0Wr3uIZf+6DfXtPvjXQTygqk
RoscZOK4GzS8yuoFUgT77PaYdjwb5O017sLCjZ0mExN6XTPWw350Trdi/gus
zJdQ/fLrMBomqHJzwuig4VjnE1pci9ZOD5MU3g7haVOTkNriDjggfME7IbgN
vTmbNkcmDeJVXeMtHR7tkL/5UJGXSScG5Vs51WYPYprtKCNqfvOM9Rxn7Fgh
oElB5Y/iEmVzR7D3hP4Hi3k0oGyQy26Lb8ClBsxXYns5GDKwkGua2giVxoKN
t6XasX6B7kehtcNYFT2VFK7Z8LfNq/GQx+pGQeXYX7bnvebrESyiRpdeOUGF
fNJJQeOuBny29nZKKt8IZu7102i+Wf2Pz89kUhD1FKUCryblqa+VIDDV1slY
V7z8H3/vMfPzf/jX5KHcO25NRDCB4h3q2St0SkDFjdX6dW4leuyMl7fSItD5
oNdNUzXyP67nwef5n+pWvMKlWXZ/KiQTuHB4n1fY0tc/zNdoF3UypRcU4LtP
+2mv8whsDsiZ6JbO+2F6/AtWbT80PU8erKkhR2UR6BYbVuWq8+KnywOzfJb/
DNz9RN7x0H230LH21ZzOcQJL2Ifcwg6k/HQ6Z/n/5l9Mt9A1Kl9iLP2O6bJq
AlVVTGNvrcz66XT+bJxkmXXyfBIbOhV8MtA/HmnCTxeOyvZCr/C69rxLHeBz
NaubX6UbpbeQ+EL1mUCL4H+/KaAFWgU2x9FaurFBCRMnJFnwm9OwgMzjBrjs
0qxNKuvBrvzFQj22LIBmqc+DIt1wR63EaemvrUgarI8hLrAgXFevXTi5HBTJ
8ucIGyYeaA0X2LauH1Ktxe24+3LhY6xlyXbdQTTpIzXGLO+BT8Umfl5OPnA4
vvX5C/dhVG8yvP3OjA59Kdd3iic/xVRn6jcxTw5GatU+e1vTBq4nzm0MU83G
wQWe5jtMR7Diye37B5fQYHLTQl+dd3loP8DnezB9BMt8BRIidsw8N2694tis
XPQafSWLqGVTI+jv9zyoLZcKVeSjj0hFRSh4P2odaw2Bsf5NHlulq/62fmnM
PaZ98Usuzslo1+6/TuCcqa+Gp71Kea6Xmpwj7qBIRo6Ftvc3EwKdzPbT2w/w
zo1/idaVKrUn4j4Xtyej+QSadWU4a59HuKFmGXt+Kh5dnXzuH0kh0CIrS5wa
UjJj/acCu0I/f03DvbfqynOnv1PnyWAXEv8reLSEwZ8sl4pn3vpG2pcSeBUY
2k8LZp7rOizK7sQFZ2KBjc4hBo1A80fzwy9Y5oAf2KQkXsxEpxB71nAdgXTq
SbrRjr8vp5HmyzztOUxBKYa5W9MDAk0GFu9eNjcHEpvV4xYJFqBUStBnDzKB
Qy3aSuOW2TPen3GJ63P+ShE6q9oZxb8gkLKqy1E0mvc+epcczjbIl+B2rtqp
iGgCFy17pTd2iXcO5OWDzsmMKEnRG0gJ8OjtnubNdh5heSdToEzLb9Fqwweo
dUrOkn+a88syjkpfT4HqXT61Cm5h+HlLjlLHGIFSKj7VCtkpsORZT590zBNc
dFfjEIcgUKGQaurRkwI0v0lSvmIcpj6xWtnMIbA/bXjLqHoqhKWnZH2PSsRI
u8MD9wYJHBe9fMz0Zip0/ZUn1rc3BYM1yueoMQl8u6912fpvqaATYCUSpZGJ
ynHKudxuAr0nKYba7mlwannm+TWW2Wh+3MGytJPA7fQJ/W6FdBDQJ98/R8rF
36eW3NVqJjBxia8Hi5IOyaejA6pdc5Fj9tw+tZFAUz36hQnDTLAwCTyw3zkH
v0kvtjjbNH2u9+tGAtby9pcEk9Bm8tZ0nEymfOL2EbhW1k3f3Jv3uXjVgVfd
eNWZV1949ZGX/kGF58c/kLphtfH9HYLPujBvXZvKPLN+eMRs36lW3wtaOdeo
9QvaMH+jFFlIagAiQmO81UX74Zrk25di5S1oELz5cceOfrhSfcJEQWwANix3
wTcbWrDCb1Ghql0faKumVDfxMUE6+vL99GEaKmidmxcf0wuTDkvIQ+XTPrNb
YkjFhYbPDg49DGzuAX9BId0nd1hw32pfu6ZWE6o0yxobre6BDo2D8RRFNqT+
dq9aoLQRL5IzRg65d8P2JPl9DjJscOku1qR8qsQqy8tD4V96QCe7/nOsNQt+
UbJPE76M2C2TyK9r0weBx2VEvrxhgWatvNj7DcVo6Snt3dnTC5LaejbXlNnw
bO9QlehkEXoYfWTInpj5/8ZZ/u/kvHyB13qNI17Otvyd+PjIuGfHkyG0LarZ
/Zd8PWzLIvkKSHdiQ77O5pTHQ+hWc/jWCrl62Om4SlScvx1dfCSCFIOG0axH
b91UFBV0NFNL0zk09Gzw9/MJ4SAju32pvmwVMCK5ekJfG9BzTPHUhQ0jWClT
+F0sqAL8tVB4TwUVLe7ckM2qGEHXG6SkbXPKYFhfCrgXqCjGOfxNrnsE9ZWs
0bS2BDYZK1bo/kHFwLXHRr0+jeAY6fi82IUI/OeYldvsKnF9bXn9WgMC07yv
00ICCyFXccHTU1UlaODrWlN3i8D4cGpzzeQr4Br/UbTXugSfkvQtrO4T6K45
77Ba+0vI3YrPFnuX4D5znyC7EALZg1ydpIxcuLusg37+LzJaX5ORuB5FIOnw
Ms/knTnwoEXdcjCXjB/DubtPxxG4WrppbHVnNgRpPrd1ms5ppG2RuuOvCLR5
FPqndVQ2Tz+dqW/+B+HchVQ=
     "]]},
  Axes->True,
  AxesLabel->{None, None, None},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{371.3484154551529, 377.0090957830508},
  ImageSizeRaw->Automatic,
  Lighting->"Neutral",
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], "RotationControl" -> "Globe"},
  PlotRange->{{100, 140}, {0, 15}, {-10, 10}},
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.02]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-0.16108356639520974`, -0.49738344384499245`, 
   3.3431514764405055`},
  ViewVertical->{0., 0., -1.}]], "Output",
 CellChangeTimes->{
  3.759198384634552*^9, 3.759246174605579*^9, {3.7592462500121527`*^9, 
   3.759246269105761*^9}, {3.7592495775019093`*^9, 3.7592495852676477`*^9}},
 CellLabel->
  "Out[113]=",ExpressionUUID->"7bdc9074-e9c2-4685-b712-2d1b83dc1493"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"ZeroCurvePoints", "[", "data_", "]"}], ":=", " ", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"dat", " ", "=", " ", "data"}], "}"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"row", " ", "=", " ", 
      RowBox[{"Count", "[", "angleTable1", "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"phiOfTheta", " ", "=", " ", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"For", "[", 
      RowBox[{
       RowBox[{"i", " ", "=", " ", "1"}], ",", " ", 
       RowBox[{"i", "<", 
        RowBox[{"row", "+", "1"}]}], ",", " ", 
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"For", "[", 
         RowBox[{
          RowBox[{"j", " ", "=", " ", "1"}], ",", " ", 
          RowBox[{"j", "<", 
           RowBox[{
            RowBox[{"Count", "[", "dat", "]"}], "/", "row"}]}], ",", " ", 
          RowBox[{"j", "++"}], ",", " ", "\[IndentingNewLine]", 
          RowBox[{
           RowBox[{"point", " ", "=", 
            RowBox[{"dat", "[", 
             RowBox[{"[", 
              RowBox[{"i", "+", 
               RowBox[{"row", "*", "j"}]}], "]"}], "]"}]}], ";", 
           "\[IndentingNewLine]", 
           RowBox[{"up", " ", "=", 
            RowBox[{"dat", "[", 
             RowBox[{"[", 
              RowBox[{"i", "+", 
               RowBox[{"row", "*", 
                RowBox[{"(", 
                 RowBox[{"j", "-", "1"}], ")"}]}]}], "]"}], "]"}]}], ";", 
           "\[IndentingNewLine]", 
           RowBox[{"If", "[", 
            RowBox[{
             RowBox[{
              RowBox[{
               RowBox[{"point", "[", 
                RowBox[{"[", "3", "]"}], "]"}], "*", 
               RowBox[{"down", "[", 
                RowBox[{"[", "3", "]"}], "]"}]}], "\[LessEqual]", " ", "0"}], 
             ",", 
             RowBox[{"Append", "[", 
              RowBox[{"phiOfTheta", ",", 
               RowBox[{"point", "[", 
                RowBox[{"[", 
                 RowBox[{"{", 
                  RowBox[{"1", ",", "2"}], "}"}], "]"}], "]"}]}], "]"}], " ", 
             ",", "Null"}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], 
        ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", 
     "phiOfTheta"}]}], "\[IndentingNewLine]", "]"}]}]], "Input",
 CellChangeTimes->CompressedData["
1:eJxTTMoPSmViYGAQAWIQrdVYxmjA9Mbx1sIfQiC65uNuORAdWs6tCqLVv9WZ
g+jrZ6+6g+iqS8oRIPqb5q4EEM1d/SMdRNs8u5wFoj/c/JEHoiWv+RWC6B3T
PpaB6Juvd1WBzX8jUQ+iI8LKwfT3tedaQPS2n65TQfSMreyzQHS2h+gysLkx
P1eC6HWTdu0E0af+6F8C0aueR4Fps+8vb4LopoSMWyB638Klj0G0xaKDb0H0
4r09DIZAeu//Oi4QPXFluSCIvvxtoQSI9vI3kQXRRq8MlUD0PINMbRAdz8Wk
D6LfeH6yB9HfWp87gOhF7rp+INrl6NYwEA0ANceNqQ==
  "],
 CellLabel->
  "In[218]:=",ExpressionUUID->"76e533e4-b987-48da-958a-8a15895059db"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ZeroCurvePoints", "[", "xdata", "]"}]], "Input",
 CellChangeTimes->{
  3.7592455196535378`*^9, 3.75924569982253*^9, {3.759245736862788*^9, 
   3.759245757892667*^9}, {3.7592458417100058`*^9, 3.759245845234518*^9}},
 CellLabel->
  "In[217]:=",ExpressionUUID->"5aea5c8e-16d2-4d37-a573-98ee0dbbff17"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "0"}], "}"}]], "Output",
 CellChangeTimes->{{3.759245692379068*^9, 3.7592457041178217`*^9}, 
   3.759245758302456*^9, 3.759245845773831*^9, 3.759245942848734*^9},
 CellLabel->
  "Out[217]=",ExpressionUUID->"677c7bf7-748b-413e-bc42-b2a236a9ef17"]
}, Open  ]],

Cell["\<\
Point of intersection of the planes is AVS!!!!!! ~140 for this boat\
\>", "Text",
 CellChangeTimes->{{3.7591986167167983`*^9, 3.7591986293529205`*^9}, {
  3.7591987123929033`*^9, 
  3.75919871856668*^9}},ExpressionUUID->"b614b16c-01da-45b3-9f4e-\
84d121e544fb"]
},
WindowSize->{1853, 1025},
WindowMargins->{{0, Automatic}, {0, Automatic}},
Magnification:>0.9 Inherited,
FrontEndVersion->"11.3 for Linux x86 (64-bit) (March 6, 2018)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 1187, 24, 96, "Input",ExpressionUUID->"509f3a06-88e9-4e4a-971f-f484c01d33d3"],
Cell[1770, 48, 1447, 28, 56, "Output",ExpressionUUID->"81fd9c28-f82d-420d-bcf6-89e08f4c05fa"]
}, Open  ]],
Cell[CellGroupData[{
Cell[3254, 81, 5775, 133, 295, "Input",ExpressionUUID->"2f6ff26d-771a-4b03-a8f4-d7ffe4270b88"],
Cell[9032, 216, 4199, 81, 72, "Output",ExpressionUUID->"aa8f3bce-1b06-437f-b193-88ab8a24b6cb"],
Cell[13234, 299, 1850, 25, 33, "Output",ExpressionUUID->"7d8bc7ac-4222-4910-bbc2-377bebf305bf"],
Cell[15087, 326, 1866, 25, 33, "Output",ExpressionUUID->"ad0a7f51-d224-49bf-a82f-7abba4b44e08"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16990, 356, 1352, 23, 74, "Input",ExpressionUUID->"148f209f-1c4c-4a67-bd1b-e73e94ce68a7"],
Cell[18345, 381, 297, 5, 33, "Output",ExpressionUUID->"6f662560-c5dd-4e09-b144-1a34a799698b"],
Cell[18645, 388, 355, 7, 33, "Output",ExpressionUUID->"778973bd-fab2-41f4-93f8-582b01e60ee0"]
}, Open  ]],
Cell[CellGroupData[{
Cell[19037, 400, 177, 2, 29, "Input",ExpressionUUID->"45362d03-ccfa-46ee-833d-2447bb7bda85"],
Cell[19217, 404, 1007, 14, 33, "Output",ExpressionUUID->"91f981d3-7d8a-4226-94ce-dc3c03bc8bda"]
}, Open  ]],
Cell[20239, 421, 6973, 183, 206, "Input",ExpressionUUID->"0440646f-917b-4090-ad63-896091dbb2a8"],
Cell[CellGroupData[{
Cell[27237, 608, 12833, 340, 536, "Input",ExpressionUUID->"b677da27-0834-4a54-b1eb-70a1b1a91310"],
Cell[40073, 950, 699, 12, 33, "Output",ExpressionUUID->"afa328e4-b6e9-4695-88be-794aa61132cb"],
Cell[40775, 964, 699, 12, 33, "Output",ExpressionUUID->"6c789a9a-7725-4409-807f-cd9168c1ba7e"],
Cell[41477, 978, 699, 12, 33, "Output",ExpressionUUID->"591eae45-bde0-4acc-857f-d20ed63b6505"],
Cell[42179, 992, 701, 12, 33, "Output",ExpressionUUID->"1ab89842-f2ef-47c1-b564-55fb006fb92b"],
Cell[42883, 1006, 699, 12, 33, "Output",ExpressionUUID->"528bfcaa-77c7-46bf-ba4d-47ba7cfbe7cd"],
Cell[43585, 1020, 699, 12, 33, "Output",ExpressionUUID->"1c78b3b9-6750-4ba8-92bf-0dab094a1be2"],
Cell[44287, 1034, 699, 12, 33, "Output",ExpressionUUID->"8000754b-a2d0-4d65-a58b-d1ade205ca3e"],
Cell[44989, 1048, 698, 12, 33, "Output",ExpressionUUID->"4d1605a7-c8ab-4ac6-8adc-c12f15399789"],
Cell[45690, 1062, 335, 9, 21, "Message",ExpressionUUID->"44b0fd3a-f8f5-4465-93c5-bf76f375dbd4"],
Cell[46028, 1073, 335, 9, 21, "Message",ExpressionUUID->"8ed28d46-c70b-4838-ae9a-0a0aa40bfb4e"],
Cell[46366, 1084, 337, 9, 21, "Message",ExpressionUUID->"b6376922-e3f3-4845-a6fb-27fc95dfb493"],
Cell[46706, 1095, 334, 9, 21, "Message",ExpressionUUID->"95b27476-fa62-488a-8b4b-0785a6fac04a"],
Cell[47043, 1106, 334, 9, 21, "Message",ExpressionUUID->"30baebfc-bdf8-4dab-8218-b27e007d034a"],
Cell[47380, 1117, 334, 9, 21, "Message",ExpressionUUID->"0e6b7f63-3a06-4532-abfc-a6facf3516c5"],
Cell[47717, 1128, 334, 9, 21, "Message",ExpressionUUID->"11cbb9fc-6985-4e5e-807b-a312bc9dba4b"],
Cell[48054, 1139, 334, 9, 21, "Message",ExpressionUUID->"f26aeb05-1290-4a44-862e-7826d52b80a5"],
Cell[48391, 1150, 333, 9, 21, "Message",ExpressionUUID->"92327a3d-42d5-4a17-8528-b66d22f05ead"],
Cell[48727, 1161, 334, 9, 21, "Message",ExpressionUUID->"82be24d6-5caa-4602-b3d7-5aea027061f5"],
Cell[49064, 1172, 336, 9, 21, "Message",ExpressionUUID->"8844f453-6dba-4d14-97fc-b19bdf0810bc"],
Cell[49403, 1183, 334, 9, 21, "Message",ExpressionUUID->"e5d7449d-5d0d-4ca0-9c02-467562c2138b"],
Cell[49740, 1194, 335, 9, 21, "Message",ExpressionUUID->"ba88abe3-1c14-4e95-994e-1a88483a0f57"],
Cell[50078, 1205, 335, 9, 21, "Message",ExpressionUUID->"0ad28544-0fde-4f29-82ee-0138289321f4"],
Cell[50416, 1216, 335, 9, 21, "Message",ExpressionUUID->"549e3a88-2b12-4c9b-a449-ac94077eae9c"],
Cell[50754, 1227, 334, 9, 21, "Message",ExpressionUUID->"7c0de800-93a9-4810-b9d2-82aa6077e683"],
Cell[51091, 1238, 336, 9, 21, "Message",ExpressionUUID->"c08ba466-507a-4c95-a234-31be069b38b1"],
Cell[51430, 1249, 336, 9, 21, "Message",ExpressionUUID->"7c662218-c1e3-42c8-80b0-8c989773a206"],
Cell[51769, 1260, 334, 9, 21, "Message",ExpressionUUID->"61efa16f-ca33-4312-bff4-3be37bf50ff7"],
Cell[52106, 1271, 334, 9, 21, "Message",ExpressionUUID->"11735330-883d-4e82-a889-99deca4466ba"],
Cell[52443, 1282, 334, 9, 21, "Message",ExpressionUUID->"9add45d6-93e8-4e74-bd28-b4a1ba037578"],
Cell[52780, 1293, 334, 9, 21, "Message",ExpressionUUID->"e0b79f97-e5a9-4060-b281-23f2073092f1"],
Cell[53117, 1304, 334, 9, 21, "Message",ExpressionUUID->"5fda0e81-315f-4082-8117-8a32fabf5ff7"],
Cell[53454, 1315, 334, 9, 21, "Message",ExpressionUUID->"2ada5770-ee06-4872-ae65-dd6c0d54e9e1"],
Cell[53791, 1326, 335, 9, 21, "Message",ExpressionUUID->"f28fe2b8-6ff6-4454-9a5e-df3b05ce0b96"],
Cell[54129, 1337, 335, 9, 21, "Message",ExpressionUUID->"0057b5c2-2df1-403f-a0a2-cf186eb7c05e"],
Cell[54467, 1348, 335, 9, 21, "Message",ExpressionUUID->"660ceed5-32cc-4def-ac8a-d681297b1ff2"],
Cell[54805, 1359, 334, 9, 21, "Message",ExpressionUUID->"a624eb02-9b7e-4157-9e5e-b417a5687e20"],
Cell[55142, 1370, 334, 9, 21, "Message",ExpressionUUID->"4554fe82-f9a1-4b3d-a1ec-c58e0e5f78e4"],
Cell[55479, 1381, 336, 9, 21, "Message",ExpressionUUID->"10a69463-08cd-47a1-bddf-e62bac1f1609"],
Cell[55818, 1392, 333, 9, 21, "Message",ExpressionUUID->"32ce72a0-63c0-4716-b7c8-d71661ccd260"],
Cell[56154, 1403, 334, 9, 21, "Message",ExpressionUUID->"c6da5246-fc97-4cec-9522-00b0e3660e6f"],
Cell[56491, 1414, 334, 9, 21, "Message",ExpressionUUID->"268ee894-5d8b-4755-843e-02a0432a9abf"],
Cell[56828, 1425, 334, 9, 21, "Message",ExpressionUUID->"8ab39917-a550-41a0-a622-7ce0f563d318"],
Cell[57165, 1436, 336, 9, 21, "Message",ExpressionUUID->"0253e2b2-371a-4cd7-92b4-cf0c876287b2"],
Cell[57504, 1447, 334, 9, 21, "Message",ExpressionUUID->"9168969e-7aac-4828-bcda-15b767ccef5c"],
Cell[57841, 1458, 448, 10, 21, "Message",ExpressionUUID->"4b64e80e-fb32-4f4b-856a-30715996d817"],
Cell[58292, 1470, 448, 10, 21, "Message",ExpressionUUID->"7c0bdb9e-c2cf-4904-a320-67ec52657a26"],
Cell[58743, 1482, 450, 10, 21, "Message",ExpressionUUID->"180492df-4eee-48b5-8fcf-05e034ca7791"],
Cell[59196, 1494, 449, 10, 21, "Message",ExpressionUUID->"48d6f494-19ea-4741-ba81-01dc66ee44ca"],
Cell[59648, 1506, 447, 10, 21, "Message",ExpressionUUID->"c5f0847d-a318-4eac-a2d5-e7f232707a39"],
Cell[60098, 1518, 447, 10, 21, "Message",ExpressionUUID->"c2e05188-7695-40b2-92a4-93177c88a2f4"],
Cell[60548, 1530, 447, 10, 21, "Message",ExpressionUUID->"2919e7c3-8d34-4cc8-a175-80403d348385"],
Cell[60998, 1542, 447, 10, 21, "Message",ExpressionUUID->"11da1717-1e68-414d-b6a3-68e2cb37f0f0"],
Cell[61448, 1554, 447, 10, 21, "Message",ExpressionUUID->"459eeff0-d88a-40f4-844d-42444a6a299c"],
Cell[61898, 1566, 447, 10, 21, "Message",ExpressionUUID->"8a029b13-0c43-48ff-8428-c236379494b7"],
Cell[62348, 1578, 447, 10, 21, "Message",ExpressionUUID->"a98db62c-364f-42c4-a5b8-dd77902ed105"],
Cell[62798, 1590, 447, 10, 21, "Message",ExpressionUUID->"2dbb190b-5ad0-45d0-8802-e3ac2c92ba00"],
Cell[63248, 1602, 25792, 441, 139, "Output",ExpressionUUID->"c79de3fe-7ece-4b9f-9eaa-2e38ae6574ab"],
Cell[89043, 2045, 26356, 472, 211, "Output",ExpressionUUID->"67c312c5-d674-4c53-bbe9-f785ce53896f"],
Cell[115402, 2519, 25887, 443, 142, "Output",ExpressionUUID->"001d8362-1f9f-4bb8-87f6-2f65cbf8b003"],
Cell[141292, 2964, 25704, 439, 140, "Output",ExpressionUUID->"e3fc2cd4-a90c-4ed9-81b1-9b2429ee501b"]
}, Open  ]],
Cell[167011, 3406, 151, 3, 29, "Input",ExpressionUUID->"6518aa2c-2c20-42f4-a18e-f17a5c66258e"],
Cell[CellGroupData[{
Cell[167187, 3413, 2780, 72, 140, "Input",ExpressionUUID->"8e450eb5-90d1-45b1-b28a-cebc9439ad10"],
Cell[169970, 3487, 43979, 778, 367, "Output",ExpressionUUID->"fc1742d9-6ac0-4480-89ca-2e38c19a8e81"],
Cell[213952, 4267, 25493, 438, 142, "Output",ExpressionUUID->"6396c984-56d9-4760-923d-df5fa12b4ba1"],
Cell[239448, 4707, 25306, 434, 367, "Output",ExpressionUUID->"5c9c1c67-179e-4df1-ad40-f94c9b596b22"],
Cell[264757, 5143, 25476, 438, 367, "Output",ExpressionUUID->"53eda007-01c7-4419-9635-d1b11498580a"]
}, Open  ]],
Cell[CellGroupData[{
Cell[290270, 5586, 752, 12, 74, "Input",ExpressionUUID->"d0156ee4-156d-4c69-acbe-33f12542a278"],
Cell[291025, 5600, 572, 11, 41, "Output",ExpressionUUID->"64bdf95d-099b-448e-93c6-ab760300279f"],
Cell[291600, 5613, 566, 12, 41, "Output",ExpressionUUID->"6cf3a4f8-0c3b-4372-be41-9f43beb804e3"],
Cell[292169, 5627, 504, 10, 33, "Output",ExpressionUUID->"6667d546-cca3-444f-abb4-d90cde95e57a"]
}, Open  ]],
Cell[292688, 5640, 801, 15, 29, "Input",ExpressionUUID->"ee9e9f72-07c4-4e3d-9b16-f66f6d8cb214"],
Cell[293492, 5657, 1786, 46, 52, "Input",ExpressionUUID->"9f5802a1-0245-4914-91ac-3392429e94a3"],
Cell[CellGroupData[{
Cell[295303, 5707, 1371, 27, 52, "Input",ExpressionUUID->"270990cd-b0fa-4642-8be6-25faae0e0bf3"],
Cell[296677, 5736, 19659, 338, 212, "Output",ExpressionUUID->"8f50f33e-3257-4a9e-81bb-401afc2c569f"],
Cell[316339, 6076, 16432, 291, 212, "Output",ExpressionUUID->"76cc5aa5-679a-495b-836a-7e01e75f962c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[332808, 6372, 3125, 78, 206, "Input",ExpressionUUID->"77a5c266-0ffb-4f89-b667-0ec832626888"],
Cell[335936, 6452, 2001, 48, 221, "Output",ExpressionUUID->"1cfe550a-1717-493f-92ed-a5c89dae808f"],
Cell[337940, 6502, 6978, 103, 138, "Message",ExpressionUUID->"a02e4e1b-c68c-4e6a-9947-4f06ff444216"],
Cell[344921, 6607, 6980, 103, 138, "Message",ExpressionUUID->"e98554a3-d9cc-43d7-a6ff-86249c094c6a"],
Cell[351904, 6712, 2429, 38, 55, "Message",ExpressionUUID->"7936694b-bafe-441f-bf05-af1cecd4f06f"],
Cell[354336, 6752, 2431, 38, 55, "Message",ExpressionUUID->"435b4543-6a4b-48cd-9490-7890ef5d8d8e"],
Cell[356770, 6792, 437, 9, 33, "Output",ExpressionUUID->"393ae2ab-ca82-440a-9634-b69e4c171732"],
Cell[357210, 6803, 6980, 103, 138, "Message",ExpressionUUID->"6209d3f2-f85f-4c81-a6c0-d8bcd2c4b511"],
Cell[364193, 6908, 688, 14, 21, "Message",ExpressionUUID->"95cb9001-2af6-4794-b60d-f812e3f82f70"],
Cell[364884, 6924, 6977, 103, 138, "Message",ExpressionUUID->"6858c8c6-7cb4-4b83-8b5f-405f573814b6"],
Cell[371864, 7029, 688, 14, 21, "Message",ExpressionUUID->"3c4fbd22-541c-4cb7-8d74-f4721fa72dc5"],
Cell[372555, 7045, 6978, 103, 138, "Message",ExpressionUUID->"fd595d2c-e825-4dc5-9595-16635c2aee44"],
Cell[379536, 7150, 503, 11, 21, "Message",ExpressionUUID->"6a4b5a90-1302-4676-b355-884952d0315d"],
Cell[380042, 7163, 688, 14, 21, "Message",ExpressionUUID->"866a939d-fb01-4a5f-97e5-76a92a7fe9a8"],
Cell[380733, 7179, 497, 11, 21, "Message",ExpressionUUID->"1fe8a2e5-7fd5-4e24-bd40-8418e5481b34"],
Cell[381233, 7192, 556, 12, 33, "Output",ExpressionUUID->"d4126cf9-7ae1-4f1e-b5a2-e5792b2c49d1"]
}, Open  ]],
Cell[381804, 7207, 130, 3, 29, "Input",ExpressionUUID->"ac3f5c0e-5ae3-466b-a608-695a01b955a2"],
Cell[381937, 7212, 152, 3, 29, "Input",ExpressionUUID->"9746a387-c41c-4313-a403-49059d9aa502"],
Cell[382092, 7217, 674, 13, 29, "Input",ExpressionUUID->"28ac1d7e-b785-4f17-8f2a-6ba070ad1a4f"],
Cell[CellGroupData[{
Cell[382791, 7234, 844, 19, 52, "Input",ExpressionUUID->"2c22b76c-93c3-4c0f-8f7c-3ff57cac1d81"],
Cell[383638, 7255, 18828, 324, 239, "Output",ExpressionUUID->"53c090f7-b1f6-4574-863b-df303382817b"],
Cell[402469, 7581, 8914, 164, 239, "Output",ExpressionUUID->"937ee853-0972-4309-8628-ad7a8a166d56"]
}, Open  ]],
Cell[CellGroupData[{
Cell[411420, 7750, 1566, 40, 52, "Input",ExpressionUUID->"f14093f4-371a-439d-9152-ceeb7fba5e04"],
Cell[412989, 7792, 28314, 504, 355, "Output",ExpressionUUID->"7bdc9074-e9c2-4685-b712-2d1b83dc1493"]
}, Open  ]],
Cell[441318, 8299, 2859, 71, 272, "Input",ExpressionUUID->"76e533e4-b987-48da-958a-8a15895059db"],
Cell[CellGroupData[{
Cell[444202, 8374, 321, 6, 29, "Input",ExpressionUUID->"5aea5c8e-16d2-4d37-a573-98ee0dbbff17"],
Cell[444526, 8382, 294, 6, 33, "Output",ExpressionUUID->"677c7bf7-748b-413e-bc42-b2a236a9ef17"]
}, Open  ]],
Cell[444835, 8391, 271, 6, 32, "Text",ExpressionUUID->"b614b16c-01da-45b3-9f4e-84d121e544fb"]
}
]
*)