Cell[CellGroupData[{Cell[BoxData[ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Line", " ", "primitives", " ", "from", " ", "AstronomicalData"}], ",", " ", RowBox[{"preloaded", " ", "for", " ", "speed"}]}], " ", "*)"}]], "Input", CellGroupingRules->{"GroupTogetherGrouping", 10000.}, InitializationCell->True, CellChangeTimes->{ 3.35696210375764*^9, {3.4589925336389027`*^9, 3.458992553932932*^9}, 3.760785382133646*^9}, CellID->631332975], Cell[BoxData[ RowBox[{ RowBox[{"ssgr", "=", RowBox[{"{", RowBox[{ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "0.06761782121772755`", ",", "0.2994171678531523`", ",", "0.018252080756242746`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.10542351866328925`", ",", "0.28898694550788984`", ",", "0.013930065871185027`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.14189590666138763`", ",", "0.2745816007716988`", ",", "0.009405714500011349`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.21453532304953557`", ",", "0.2304973390228023`", ",", RowBox[{"-", "0.0008626083289624241`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.2717803933851312`", ",", "0.17514633939032054`", ",", RowBox[{"-", "0.01063830015037239`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.31546632741104363`", ",", "0.10998977217811223`", ",", RowBox[{"-", "0.01997044793948937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.3333203636469353`", ",", "0.07111554315336327`", ",", RowBox[{"-", "0.024784691867915053`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.3467651731668952`", ",", "0.03037339274868875`", ",", RowBox[{"-", "0.02934681823808115`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.3551851825840056`", ",", RowBox[{"-", "0.008883528630221252`"}], ",", RowBox[{"-", "0.03332641874385628`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.3595249301141721`", ",", RowBox[{"-", "0.048891754345768854`"}], ",", RowBox[{"-", "0.03699288305093057`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.35956699051475344`", ",", RowBox[{"-", "0.09258937645371719`"}], ",", RowBox[{"-", "0.04056625775355473`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.35476140299023584`", ",", RowBox[{"-", "0.13609310128576727`"}], ",", RowBox[{"-", "0.04367885116302907`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.3453870772052713`", ",", RowBox[{"-", "0.17807400310781524`"}], ",", RowBox[{"-", "0.046247707519738376`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.33151584187135713`", ",", RowBox[{"-", "0.2188086900592556`"}], ",", RowBox[{"-", "0.048302014842053494`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.3146738331728443`", ",", RowBox[{"-", "0.2552371163295611`"}], ",", RowBox[{"-", "0.04973188486809386`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.29424974055770226`", ",", RowBox[{"-", "0.2897489660638798`"}], ",", RowBox[{"-", "0.0506764137116526`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.2683113897415625`", ",", RowBox[{"-", "0.3245744636318753`"}], ",", RowBox[{"-", "0.051140435967256564`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.23874954041120816`", ",", RowBox[{"-", "0.3562676974836854`"}], ",", RowBox[{"-", "0.051016010328403374`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.20821174668368342`", ",", RowBox[{"-", "0.3826728076425107`"}], ",", RowBox[{"-", "0.05037003808226407`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.17517969028725966`", ",", RowBox[{"-", "0.40570569125192585`"}], ",", RowBox[{"-", "0.04921966334034501`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.14072818854820068`", ",", RowBox[{"-", "0.4247664640077492`"}], ",", RowBox[{"-", "0.04761453589100351`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.10459620849517824`", ",", RowBox[{"-", "0.44013921802001466`"}], ",", RowBox[{"-", "0.04555390330822816`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.0639386919615471`", ",", RowBox[{"-", "0.45245824549060215`"}], ",", RowBox[{"-", "0.04282844451325973`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.0222630886708908`", ",", RowBox[{"-", "0.4600901148249794`"}], ",", RowBox[{"-", "0.03962666195300796`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.01708270082285085`"}], ",", RowBox[{"-", "0.46289910537684587`"}], ",", RowBox[{"-", "0.036244756869877486`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.05643307133655918`"}], ",", RowBox[{"-", "0.4615130339232573`"}], ",", RowBox[{"-", "0.03251975058065823`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.0985953984266251`"}], ",", RowBox[{"-", "0.4552910087333995`"}], ",", RowBox[{"-", "0.02814161515693748`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.13972073701809282`"}], ",", RowBox[{"-", "0.44423795004686956`"}], ",", RowBox[{"-", "0.023464028814984963`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.17857681201038272`"}], ",", RowBox[{"-", "0.42882406126980027`"}], ",", RowBox[{"-", "0.018638505565486126`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2154476743476056`"}], ",", RowBox[{"-", "0.40908022588243237`"}], ",", RowBox[{"-", "0.013641496497324967`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2773728867785873`"}], ",", RowBox[{"-", "0.36155886598830467`"}], ",", RowBox[{"-", "0.004075814136735748`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.33189927422717014`"}], ",", RowBox[{"-", "0.2963609896764099`"}], ",", "0.006254701536389309`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3685730805839724`"}], ",", RowBox[{"-", "0.22550359533742417`"}], ",", "0.015408921301422723`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.38209188545454587`"}], ",", RowBox[{"-", "0.18419355717660704`"}], ",", "0.020024228223635282`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3909081028438831`"}], ",", RowBox[{"-", "0.14150744152825073`"}], ",", "0.024320314302759098`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.39487863686683417`"}], ",", RowBox[{"-", "0.09879213241850772`"}], ",", "0.028174022950448206`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3941571083652954`"}], ",", RowBox[{"-", "0.05581217916401081`"}], ",", "0.031618687477929036`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3892606425274537`"}], ",", RowBox[{"-", "0.015948478088794446`"}], ",", "0.034425598102858446`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.38034088177045355`"}], ",", "0.02324901107939835`", ",", "0.03680880904298541`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3662374346070426`"}], ",", "0.06450202747621149`", ",", "0.038884143367304794`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3476981770950424`"}], ",", "0.1039487206331598`", ",", "0.040404783261614854`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.32659192024951633`"}], ",", "0.13870479081820036`", ",", "0.04130664906693351`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.30205797115649013`"}], ",", "0.17106313812438917`", ",", "0.04169804131129232`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2749406354510368`"}], ",", "0.20011228744828038`", ",", "0.041581999393587386`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.24507933026525813`"}], ",", "0.22620234689184854`", ",", "0.040972383351344566`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2099519139151075`"}], ",", "0.2508372914886698`", ",", "0.03976055258175679`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.17241073188822867`"}], ",", "0.2713540055523579`", ",", "0.037990769153780704`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.13561505637798785`"}], ",", "0.2865576264280095`", ",", "0.035855403206310865`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.09752911962320157`"}], ",", "0.29778416848398326`", ",", "0.03327673592649864`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.0552772255134729`"}], ",", "0.3053193305920997`", ",", "0.03001415868912296`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.012540695661467344`"}], ",", "0.30794283319710997`", ",", "0.02630588183513804`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.027798060247770012`", ",", "0.3058767996822562`", ",", "0.022434612516657886`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.06761766178117523`", ",", "0.29941720279285194`", ",", "0.018252098244271393`"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "0.47632385388928067`"}], ",", "0.5368288639617756`", ",", RowBox[{"-", "0.032800850635794875`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.4174063594504398`"}], ",", "0.583693712227585`", ",", RowBox[{"-", "0.0354584000886124`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3539262997807406`"}], ",", "0.6241879099106804`", ",", RowBox[{"-", "0.03772892934581562`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.28075297277361233`"}], ",", "0.6603829644270788`", ",", RowBox[{"-", "0.03972472948401711`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.20395984110763155`"}], ",", "0.6881142916308254`", ",", RowBox[{"-", "0.041211357704990736`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.1298513140130581`"}], ",", "0.7060532328296899`", ",", RowBox[{"-", "0.042122966316693246`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.05426352543422702`"}], ",", "0.716104449471161`", ",", RowBox[{"-", "0.042563936530957816`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.020467404356224572`", ",", "0.7181931937036947`", ",", RowBox[{"-", "0.042534624270373265`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.09501438910034088`", ",", "0.7125706707245998`", ",", RowBox[{"-", "0.042048542765654895`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.17474611309279642`", ",", "0.6978241037371735`", ",", RowBox[{"-", "0.04101093699049872`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.25232241689467866`", ",", "0.6742611302109092`", ",", RowBox[{"-", "0.039455086079139806`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.32191665301775474`", ",", "0.6445767698910616`", ",", RowBox[{"-", "0.03755269858294803`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.38802205136817514`", ",", "0.6077953898155145`", ",", RowBox[{"-", "0.035236728610468`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.515939393630456`", ",", "0.5057343155536798`", ",", RowBox[{"-", "0.028924124492063375`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.6159914690865761`", ",", "0.38009627961656645`", ",", RowBox[{"-", "0.02127091167521354`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.6525483391557845`", ",", "0.31459801838940216`", ",", RowBox[{"-", "0.017313073086083063`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.6821033857582814`", ",", "0.24566776549270766`", ",", RowBox[{"-", "0.013166124298221959`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.7058705475531766`", ",", "0.16790853564303`", ",", RowBox[{"-", "0.008507628831023375`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.7207300194847464`", ",", "0.08797418698087084`", ",", RowBox[{"-", "0.0037384397294252317`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.7263946606998091`", ",", "0.012282126024479423`", ",", "0.0007604122082364162`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.7240681860428271`", ",", RowBox[{"-", "0.06358611260688085`"}], ",", "0.005253333026713453`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.7140549952531536`", ",", RowBox[{"-", "0.13732436639001772`"}], ",", "0.009604230530639767`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.6964927796743907`", ",", RowBox[{"-", "0.2096430653782425`"}], ",", "0.013855503222721145`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.669117710182649`", ",", RowBox[{"-", "0.2856107324307181`"}], ",", "0.018302988720996893`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.6334187922682665`", ",", RowBox[{"-", "0.35805382274939346`"}], ",", "0.022524469855940157`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.5461491207618803`", ",", RowBox[{"-", "0.48073881792451656`"}], ",", "0.029618757092561454`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.4250713976606465`", ",", RowBox[{"-", "0.590179661770212`"}], ",", "0.03585861314488754`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.35733998994685956`", ",", RowBox[{"-", "0.6332475369779432`"}], ",", "0.03827300555006393`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.2852444352108283`", ",", RowBox[{"-", "0.6685558162040224`"}], ",", "0.04021844366574573`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.21485670470975854`", ",", RowBox[{"-", "0.6941069565993836`"}], ",", "0.04158895010254815`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.1422002921737039`", ",", RowBox[{"-", "0.712255733613318`"}], ",", "0.042515974068711306`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.06173795214608574`", ",", RowBox[{"-", "0.7233475422544207`"}], ",", "0.043008644622494915`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.019461943114298663`"}], ",", RowBox[{"-", "0.7253641002855539`"}], ",", "0.042961796714350395`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.09501405846906563`"}], ",", RowBox[{"-", "0.7190337408344625`"}], ",", "0.042431692900397805`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.16948654642700073`"}], ",", RowBox[{"-", "0.7048434384491283`"}], ",", "0.04143784135360285`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2480152573585388`"}], ",", RowBox[{"-", "0.6807774610814046`"}], ",", "0.03985021924402937`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.32330308392023377`"}], ",", RowBox[{"-", "0.647977797694492`"}], ",", "0.03775148024891742`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.45802458170225385`"}], ",", RowBox[{"-", "0.5598867319010097`"}], ",", "0.03225311545423397`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5632063481706212`"}], ",", RowBox[{"-", "0.4527333814157009`"}], ",", "0.025685216370369395`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.6494954227432014`"}], ",", RowBox[{"-", "0.31481994039730576`"}], ",", "0.01733248531728543`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.6786485427353507`"}], ",", RowBox[{"-", "0.24457431136846763`"}], ",", "0.013108380864682453`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7002396429806526`"}], ",", RowBox[{"-", "0.17165702838245933`"}], ",", "0.00874138918572089`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7138347010649522`"}], ",", RowBox[{"-", "0.09835790758253093`"}], ",", "0.00436814659407515`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7197865179418483`"}], ",", RowBox[{"-", "0.024049430238432035`"}], ",", RowBox[{"-", "0.000049270994181688926`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7175280400342007`"}], ",", "0.056784604514976356`", ",", RowBox[{"-", "0.004836717884057689`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7062292926215827`"}], ",", "0.13686050765457702`", ",", RowBox[{"-", "0.009560695170801947`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.6876541210883962`"}], ",", "0.21001711959487815`", ",", RowBox[{"-", "0.013859566006877252`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.661531466812403`"}], ",", "0.2808394931131837`", ",", RowBox[{"-", "0.01800459010465904`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.6250296760127636`"}], ",", "0.35406462953227474`", ",", RowBox[{"-", "0.022270787938752357`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5804670879683266`"}], ",", "0.42270015280165807`", ",", RowBox[{"-", "0.026248382021634188`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5314594511387892`"}], ",", "0.48255038393575983`", ",", RowBox[{"-", "0.02969604980114181`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.476324088526454`"}], ",", "0.5368286564921706`", ",", RowBox[{"-", "0.03280083881721749`"}]}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "0.22030871416061942`"}], ",", "0.9582917481710622`", ",", "7.826261300579744`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.11774738801418323`"}], ",", "0.9763056805802667`", ",", "8.155208292194287`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.013868324597625326`"}], ",", "0.9835536272889589`", ",", "8.394258502750983`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.09892849714220592`", ",", "0.9791603675034579`", ",", "8.548872219326508`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.21051212206496694`", ",", "0.9620794187510511`", ",", "8.592829071358942`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.3123499833011215`", ",", "0.9348659024829958`", ",", "8.533457326627835`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.4107580138109861`", ",", "0.8970813414257177`", ",", "8.377767026440433`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.502851083326467`", ",", "0.8501803835049115`", ",", "8.133291518716999`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.5896123987696074`", ",", "0.7940233313229565`", ",", "7.800510639324403`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.7551759547435133`", ",", "0.6433613554225155`", ",", "6.793180024197107`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.875858348382739`", ",", "0.4727540546790887`", ",", "5.538663551676104`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.9256118138793196`", ",", "0.37086937163413236`", ",", "4.7514517881652377`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.9635136753755439`", ",", "0.26400739703967835`", ",", "3.9014451230588825`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.9887231132807905`", ",", "0.15558045740088888`", ",", "3.016415645753915`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ "1.0017267741010645`", ",", "0.045023770815575404`", ",", "2.0923588671583346`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{"1.0027093618508107`", ",", RowBox[{"-", "0.058815266787540565`"}], ",", "1.2053113007481247`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{"0.9929194586531729`", ",", RowBox[{"-", "0.16219567726010867`"}], ",", "3.0383184567526045`*^-8"}], "}"}], ",", RowBox[{"{", RowBox[{"0.9702552203876996`", ",", RowBox[{"-", "0.2724839447256706`"}], ",", RowBox[{"-", "6.787083537615351`*^-8"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.9353377665530912`", ",", RowBox[{"-", "0.3795241837441964`"}], ",", RowBox[{"-", "1.6543301963511845`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.8920698980110044`", ",", RowBox[{"-", "0.4753221189218776`"}], ",", RowBox[{"-", "2.5479628178195375`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.8389856004287117`", ",", RowBox[{"-", "0.5660474773853557`"}], ",", RowBox[{"-", "3.414908948950378`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.7087559509971677`", ",", RowBox[{"-", "0.7254260072858761`"}], ",", RowBox[{"-", "5.000894898015972`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.533878354785597`", ",", RowBox[{"-", "0.8641815877159116`"}], ",", RowBox[{"-", "6.486459631305969`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.44266517984350334`", ",", RowBox[{"-", "0.9148031058569173`"}], ",", RowBox[{"-", "7.075145447953826`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.346674266239847`", ",", RowBox[{"-", "0.9556440922586992`"}], ",", RowBox[{"-", "7.588264736101818`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.238441461861123`", ",", RowBox[{"-", "0.9883539525954779`"}], ",", RowBox[{"-", "8.052653646204464`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.12720738669221654`", ",", RowBox[{"-", "1.0086331688004604`"}], ",", RowBox[{"-", "8.41576741161047`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.01646300083988425`", ",", RowBox[{"-", "1.0161983618699162`"}], ",", RowBox[{"-", "8.669231837593394`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.09443814581958507`"}], ",", RowBox[{"-", "1.0114397226398633`"}], ",", RowBox[{"-", "8.817488029517031`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.19680250719747414`"}], ",", RowBox[{"-", "0.9959451540413485`"}], ",", RowBox[{"-", "8.859311850032813`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2970167833893146`"}], ",", RowBox[{"-", "0.9699475243817495`"}], ",", RowBox[{"-", "8.807579744642589`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.40203096605863237`"}], ",", RowBox[{"-", "0.9302034967922297`"}], ",", RowBox[{"-", "8.646376426086323`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.501928325867834`"}], ",", RowBox[{"-", "0.878934960000791`"}], ",", RowBox[{"-", "8.37781942517631`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5894407613894328`"}], ",", RowBox[{"-", "0.8212521143522891`"}], ",", RowBox[{"-", "8.033259777606806`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.6704357592337051`"}], ",", RowBox[{"-", "0.7547249406185661`"}], ",", RowBox[{"-", "7.60189842874696`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.8194684501865795`"}], ",", RowBox[{"-", "0.5838065362885287`"}], ",", RowBox[{"-", "6.393030323476953`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.8775315846255336`"}], ",", RowBox[{"-", "0.4886133286232981`"}], ",", RowBox[{"-", "5.677248842704307`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9246374509211144`"}], ",", RowBox[{"-", "0.38754746995284506`"}], ",", RowBox[{"-", "4.892533406370748`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9581851914230062`"}], ",", RowBox[{"-", "0.2890746534054339`"}], ",", RowBox[{"-", "4.106906865153824`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9813225731253895`"}], ",", RowBox[{"-", "0.18764960905074335`"}], ",", RowBox[{"-", "3.2782732218609056`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9943580378651911`"}], ",", RowBox[{"-", "0.07562374702756561`"}], ",", RowBox[{"-", "2.3416964812787612`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.994697887341764`"}], ",", "0.03715688439293094`", ",", RowBox[{"-", "1.3770256705427717`*^-7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9835487240245643`"}], ",", "0.14187103396674705`", ",", RowBox[{"-", "4.618149301309817`*^-8"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9614507970242369`"}], ",", "0.2448312787460218`", ",", "4.570422526204131`*^-8"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9293942178247206`"}], ",", "0.3429657940805533`", ",", "1.351567983125311`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.887391508635854`"}], ",", "0.43727112410621805`", ",", "2.2302699949800802`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7643376537403815`"}], ",", "0.6239868618227811`", ",", "4.037997452638606`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.614701186715076`"}], ",", "0.7695103507975749`", ",", "5.538473603158134`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.4223258675409302`"}], ",", "0.8883980239128981`", ",", "6.883813281803527`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.32319083091046374`"}], ",", "0.9287599255510193`", ",", "7.398190068314919`*^-7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.22030913640844801`"}], ",", "0.958291651097316`", ",", "7.826259750218147`*^-7"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1.261784926227776`", ",", RowBox[{"-", "0.560491607587091`"}], ",", RowBox[{"-", "0.042779610795365026`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.1901491426658888`", ",", RowBox[{"-", "0.7013038161342221`"}], ",", RowBox[{"-", "0.0439675813986564`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.1041944472237237`", ",", RowBox[{"-", "0.8338830485125832`"}], ",", RowBox[{"-", "0.044630854879842724`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.995919845051847`", ",", RowBox[{"-", "0.96664568143436`"}], ",", RowBox[{"-", "0.044748949632144396`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.8732944267536132`", ",", RowBox[{"-", "1.086351618264052`"}], ",", RowBox[{"-", "0.044240504224007236`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.7472167694598764`", ",", RowBox[{"-", "1.1849876838707536`"}], ",", RowBox[{"-", "0.04320572165045225`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.6113896506209515`", ",", RowBox[{"-", "1.2698120124965495`"}], ",", RowBox[{"-", "0.041641763887609096`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.47021786788423336`", ",", RowBox[{"-", "1.3386544694376072`"}], ",", RowBox[{"-", "0.03961151442888061`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.3226340903407418`", ",", RowBox[{"-", "1.392579701057338`"}], ",", RowBox[{"-", "0.03711102389708801`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.15712566114476245`", ",", RowBox[{"-", "1.4335424561105843`"}], ",", RowBox[{"-", "0.03389805857130335`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.01199155914169292`"}], ",", RowBox[{"-", "1.4557623236223547`"}], ",", RowBox[{"-", "0.030203656190284575`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.17120383456208776`"}], ",", RowBox[{"-", "1.4593410954657615`"}], ",", RowBox[{"-", "0.026362357749933812`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.3299651225214021`"}], ",", RowBox[{"-", "1.4463104703456144`"}], ",", RowBox[{"-", "0.02218418116777023`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.49949224977535217`"}], ",", RowBox[{"-", "1.4136053891842657`"}], ",", RowBox[{"-", "0.017329003138531692`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.6642692963730423`"}], ",", RowBox[{"-", "1.3619844304539077`"}], ",", RowBox[{"-", "0.012194373877660728`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.8193717080417728`"}], ",", RowBox[{"-", "1.2935439637974584`"}], ",", RowBox[{"-", "0.006945346201219208`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.9659316197071982`"}], ",", RowBox[{"-", "1.2083583595522387`"}], ",", RowBox[{"-", "0.0015556301385626602`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.2103572121880444`"}], ",", RowBox[{"-", "1.008458959003369`"}], ",", "0.008644653892526416`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.422594502551549`"}], ",", RowBox[{"-", "0.7401861453176828`"}], ",", "0.019485617773820647`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.561924487708682`"}], ",", RowBox[{"-", "0.4530307366942994`"}], ",", "0.028928816548547537`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.6074434006924585`"}], ",", RowBox[{"-", "0.3032238845624996`"}], ",", "0.03318697741156898`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.637271445990882`"}], ",", RowBox[{"-", "0.1495833432242475`"}], ",", "0.0371394940015569`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.6515224840317564`"}], ",", "0.019555244879445155`", ",", "0.041033538546251885`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.6467535300460874`"}], ",", "0.1891713137338918`", ",", "0.04446973612740676`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.6251992704680025`"}], ",", "0.34599828684190836`", ",", "0.04722511671850413`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.5873696084763647`"}], ",", "0.4996876402796171`", ",", "0.04951442391259461`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.528463354420323`"}], ",", "0.6607963315340614`", ",", "0.05144073008921187`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.4516739329056825`"}], ",", "0.8141933900615032`", ",", "0.05276558851989705`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.3598414426374033`"}], ",", "0.9553870108163565`", ",", "0.05346475488271401`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.2528514078026736`"}], ",", "1.0855173591840819`", ",", "0.05355930010181209`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.1405708996882358`"}], ",", "1.1954928573985257`", ",", "0.05310146154560319`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.0174560449819414`"}], ",", "1.2932704809344893`", ",", "0.05212157285490488`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.8732138228927341`"}], ",", "1.3843159828496865`", ",", "0.050480957204422826`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7195998103903278`"}], ",", "1.4586335037889169`", ",", "0.04825936013429805`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5694717471733751`"}], ",", "1.512076263120699`", ",", "0.045686177797022484`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.41451524099270665`"}], ",", "1.5495400694468178`", ",", "0.04265946281997941`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.2431342961617169`"}], ",", "1.5716237188891173`", ",", "0.03890652394670707`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.07029424637138115`"}], ",", "1.5741809165933247`", ",", "0.03470860972194453`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.09866265765569537`", ",", "1.557662147128913`", ",", "0.030206565636871685`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.26477636751006206`", ",", "1.5224943603491004`", ",", "0.02538375586796559`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.41535969798632777`", ",", "1.4732541724664128`", ",", "0.02064813887025303`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.5600408229235686`", ",", "1.4086948828966284`", ",", "0.015736763847218994`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.8461339359649128`", ",", "1.219634126619513`", ",", "0.004738622284810761`"}], "}"}], ",", RowBox[{"{", RowBox[{ "1.0688135799029508`", ",", "0.9896843072088504`", ",", RowBox[{"-", "0.005556323412258788`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.2356931577024817`", ",", "0.7241579946052239`", ",", RowBox[{"-", "0.015224046544173482`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.3022754793204876`", ",", "0.5675003027240821`", ",", RowBox[{"-", "0.020143848298822528`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.3508934824146213`", ",", "0.40444913399046795`", ",", RowBox[{"-", "0.024755712106254053`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.3795181319418608`", ",", "0.24832606153945935`", ",", RowBox[{"-", "0.028730637496996343`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.3916525438103062`", ",", "0.09012113460509064`", ",", RowBox[{"-", "0.03234355443610465`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.3860332017498873`", ",", RowBox[{"-", "0.08168825687661507`"}], ",", RowBox[{"-", "0.03580478503978145`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.3609630345283508`", ",", RowBox[{"-", "0.25170863816672906`"}], ",", RowBox[{"-", "0.03875008751388341`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.3196808142092018`", ",", RowBox[{"-", "0.4087729972386995`"}], ",", RowBox[{"-", "0.04102517660326426`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.2617851932424617`", ",", RowBox[{"-", "0.5604910069394358`"}], ",", RowBox[{"-", "0.04277960477960975`"}]}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4.787040275109995`", ",", "1.260762327706996`", ",", RowBox[{"-", "0.1124929891159255`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "4.897406344000807`", ",", "0.7308584999407659`", ",", RowBox[{"-", "0.11275321004881522`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "4.952013036957975`", ",", "0.1923321219348182`", ",", RowBox[{"-", "0.11172842231702956`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.947548102031668`", ",", RowBox[{"-", "0.3944484401860493`"}], ",", RowBox[{"-", "0.10917899593124837`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.876920225628879`", ",", RowBox[{"-", "0.9770186513125054`"}], ",", RowBox[{"-", "0.10516508868776103`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.752023801938129`", ",", RowBox[{"-", "1.5106245457307763`"}], ",", RowBox[{"-", "0.10013995364944864`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.5716080799150225`", ",", RowBox[{"-", "2.028154003139704`"}], ",", RowBox[{"-", "0.09393828925066773`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.0649313479056675`", ",", RowBox[{"-", "2.9744245655424044`"}], ",", RowBox[{"-", "0.07863864327848256`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"3.308588822099914`", ",", RowBox[{"-", "3.8594932756464084`"}], ",", RowBox[{"-", "0.058001935911091276`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"2.441235588278043`", ",", RowBox[{"-", "4.514664258077355`"}], ",", RowBox[{"-", "0.03583824536113639`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.9196266687574868`", ",", RowBox[{"-", "4.789974613430132`"}], ",", RowBox[{"-", "0.023004921377760855`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.3702092203158354`", ",", RowBox[{"-", "5.004528945178013`"}], ",", RowBox[{"-", "0.009802298933102374`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.8105874836315885`", ",", RowBox[{"-", "5.153395711274477`"}], ",", "0.0033546994488964105`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.2379043507437233`", ",", RowBox[{"-", "5.23919653904494`"}], ",", "0.01654101677844723`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.30181108232855824`"}], ",", RowBox[{"-", "5.261431578141157`"}], ",", "0.028723510362708385`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.8408970430283815`"}], ",", RowBox[{"-", "5.227620578682834`"}], ",", "0.04065794945500621`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.4179954648784634`"}], ",", RowBox[{"-", "5.128058251738099`"}], ",", "0.05316940405677023`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.9802031100906436`"}], ",", RowBox[{"-", "4.964296365481015`"}], ",", "0.06507931415937704`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.4853206562547854`"}], ",", RowBox[{"-", "4.7552938342251`"}], ",", "0.07552155152826825`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.965664322447956`"}], ",", RowBox[{"-", "4.494451511805891`"}], ",", "0.08519245559810913`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3.815514789048163`"}], ",", RowBox[{"-", "3.8441122627157407`"}], ",", "0.1015144615021399`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.215291470276156`"}], ",", RowBox[{"-", "3.4222429679968718`"}], ",", "0.10870847885323458`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.565417121500176`"}], ",", RowBox[{"-", "2.9583946438811104`"}], ",", "0.11461507436520237`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.843466378316948`"}], ",", RowBox[{"-", "2.492831259654227`"}], ",", "0.1188999925298077`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.071443476311145`"}], ",", RowBox[{"-", "2.0008308419562133`"}], ",", "0.12195293283572686`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.259139959064695`"}], ",", RowBox[{"-", "1.4438841635925665`"}], ",", "0.12383247685536902`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.382696517678946`"}], ",", RowBox[{"-", "0.8692932282176904`"}], ",", "0.12420162761313898`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.440071089681872`"}], ",", RowBox[{"-", "0.29514918849816096`"}], ",", "0.1230901610233347`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.433397655225491`"}], ",", "0.28184233353889265`", ",", "0.12053212664887013`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.369515661112562`"}], ",", "0.8162505336152124`", ",", "0.11687037158996465`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.250676316754144`"}], ",", "1.341220225912181`", ",", "0.11201696600290217`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.061149262082775`"}], ",", "1.8933963585158058`", ",", "0.10546658047827923`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.810870860794069`"}], ",", "2.420888276737096`", ",", "0.09765839885127633`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.1925358255269085`"}], ",", "3.316888769137858`", ",", "0.08006743969347901`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3.328183808982393`"}], ",", "4.119410054160823`", ",", "0.05735588898589057`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.324935638381607`"}], ",", "4.69821011079205`", ",", "0.032466935734462916`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.8184253915393676`"}], ",", "4.888757917825386`", ",", "0.020325649693089427`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.2948700418499632`"}], ",", "5.025703880364499`", ",", "0.008026303112427332`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7145536158013541`"}], ",", "5.111912313885368`", ",", RowBox[{"-", "0.00533270219242617`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.12824471631595546`"}], ",", "5.1322829447459855`", ",", RowBox[{"-", "0.01855111124210962`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.41799700814881513`", ",", "5.091629689631163`", ",", RowBox[{"-", "0.030617278344551`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "0.9569036251596565`", ",", "4.993800864024573`", ",", RowBox[{"-", "0.04228046905662243`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.4723429303445312`", ",", "4.843434022907333`", ",", RowBox[{"-", "0.05319867910740307`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "1.9694940735671862`", ",", "4.640758622767083`", ",", RowBox[{"-", "0.06348887977495109`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"2.481991734162512`", ",", "4.364256612296458`", ",", RowBox[{"-", "0.07381466780560604`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "2.9603059434478496`", ",", "4.032212171471582`", ",", RowBox[{"-", "0.0831428912278462`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "3.74128353525961`", ",", "3.278755770916409`", ",", RowBox[{"-", "0.09749169387955198`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.093835414888371`", ",", "2.807221548376084`", ",", RowBox[{"-", "0.10342055371978828`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "4.390740133020223`", ",", "2.2988481253650903`", ",", RowBox[{"-", "0.10794913310610066`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "4.616738619243163`", ",", "1.7904328283505577`", ",", RowBox[{"-", "0.11088923131574537`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "4.787039701617718`", ",", "1.2607645055564396`", ",", RowBox[{"-", "0.11249298536068994`"}]}], "}"}]}], "}"}], "]"}]}], "}"}]}], ";"}]], "Input", CellGroupingRules->{"GroupTogetherGrouping", 10000.}, InitializationCell->True, CellChangeTimes->{3.35696210375764*^9, 3.4589924937429132`*^9, 3.7607853821338387`*^9}, CellID->645529090], Cell[BoxData[ RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Lighting", "->", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"GrayLevel", "[", ".5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "White", ",", RowBox[{"ImageScaled", "[", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ",", RowBox[{ RowBox[{ "ColorData", "[", "\"\\"", "]"}], "[", RowBox[{"Rescale", "[", RowBox[{"t", ",", RowBox[{"{", RowBox[{".01", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"5770", ",", "3160"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "t"}], "]"}]}], "}"}], ",", RowBox[{"GrayLevel", "[", ".7", "]"}], ",", "ssgr", ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", "Gray", ",", "Bold"}], "]"}], ",", RowBox[{"{", RowBox[{".2", ",", ".2", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", "White", ",", "Bold"}], "]"}], ",", RowBox[{"{", RowBox[{".5", ",", RowBox[{"-", ".5"}], ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", "Blue", ",", "Bold"}], "]"}], ",", RowBox[{"{", RowBox[{".75", ",", ".75", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", "Red", ",", "Bold"}], "]"}], ",", RowBox[{"{", RowBox[{"1.2", ",", RowBox[{"-", "1.2"}], ",", "0"}], "}"}]}], "]"}], ",", " ", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", "Pink", ",", "Bold"}], "]"}], ",", RowBox[{"{", RowBox[{"4", ",", "4", ",", "0"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"Boxed", "->", "False"}], ",", RowBox[{"ImageSize", "->", RowBox[{"{", RowBox[{"450", ",", "450"}], "}"}]}], ",", RowBox[{"Background", "->", "Black"}], ",", RowBox[{"PlotRange", "->", "5.5"}], ",", RowBox[{"ViewAngle", "->", RowBox[{"\[Pi]", "/", RowBox[{"Rescale", "[", RowBox[{"t", ",", RowBox[{"{", RowBox[{".01", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"50", ",", "10"}], "}"}]}], "]"}]}]}], ",", RowBox[{"SphericalRegion", "->", "True"}]}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"t", ",", "2", ",", "\"\\""}], "}"}], ",", ".01", ",", "2"}], "}"}], ",", RowBox[{"SaveDefinitions", "->", "True"}]}], "]"}]], "Input", CellGroupingRules->{"GroupTogetherGrouping", 10000.}, CellChangeTimes->{ 3.35696210375764*^9, {3.458089098203125*^9, 3.4580891155*^9}, { 3.458089155171875*^9, 3.4580891969375*^9}, {3.458092570640625*^9, 3.458092572484375*^9}, {3.458992477476287*^9, 3.4589925098775263`*^9}, 3.7607853821237383`*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`t$$ = 2, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`t$$], 2, "time"}, 0.01, 2}}, Typeset`size$$ = {450., {223., 227.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`t$2321585$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`t$$ = 2}, "ControllerVariables" :> { Hold[$CellContext`t$$, $CellContext`t$2321585$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Graphics3D[{{Lighting -> {{"Ambient", GrayLevel[0.5]}, {"Directional", White, ImageScaled[{0, 0, 1}]}}, ColorData["BlackBodySpectrum"][ Rescale[$CellContext`t$$, {0.01, 2}, {5770, 3160}]], Sphere[{0, 0, 0}, $CellContext`t$$]}, GrayLevel[0.7], $CellContext`ssgr, Text[ Style["Mercury", "Label", Gray, Bold], {0.2, 0.2, 0}], Text[ Style["Venus", "Label", White, Bold], {0.5, -0.5, 0}], Text[ Style["Earth", "Label", Blue, Bold], {0.75, 0.75, 0}], Text[ Style["Mars", "Label", Red, Bold], {1.2, -1.2, 0}], Text[ Style["Jupiter", "Label", Pink, Bold], {4, 4, 0}]}, Boxed -> False, ImageSize -> {450, 450}, Background -> Black, PlotRange -> 5.5, ViewAngle -> Pi/Rescale[$CellContext`t$$, {0.01, 2}, {50, 10}], SphericalRegion -> True], "Specifications" :> {{{$CellContext`t$$, 2, "time"}, 0.01, 2}}, "Options" :> {}, "DefaultOptions" :> {ControllerLinking -> True}], ImageSizeCache->{495., {268., 274.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`ssgr = { Line[CompressedData[" 1:eJwV1Pk7FAgYwHFHh/KQyl3ZmFw5GiTleveJUo6Vq0NLF1Me6dAoFEWqlTOs 3MYxxA4RS47tRc+MYgxzmEuzohxdJh6W0rL2h+8/8P3ho3v2snewnIyMjPVK 8ivtpHf2kDzrwShzprjCmAtdZ1rP0+oyoOP4ux3r/m0F2xOLWi9jOVAT9qon 4EEydMgeJFCNu2BHhKjxRQYbLC6dLfFwugtJnJ2t7yN6oe12BEd6pw/eps66 qDm7466fvB+LgtiQvla0aBHKADehMOq31/fwszKrJpfIgzvOpJ2uRu2QStbf rHctC7erOUh1/AYhq1WVR9n9DBoilROMzuRiPjExhWTBB82XmqNW2sXwY8mt VEOpCOl7WCX+bXx4NZyw9oFFPCrIWioZq5Rg44KdmCwnAJbqJ8VjClV44QPD rO1rKe4TOTrrywvAOog7L21oxoxXL9q16OW4KWrKJKSRD/rjhTW3Qzux1C1p /eaACuTUOZE42nzo4bFkdXsZaD5cnNpdU4lXT7fvTbUZhA1u0z6fZZmYWG9I W9/2BPtycpoLCTxI0RAos/wGMOaUoUHE9SqcPUKQ/OBxgMX1hpVZuDBGcNk/ U4V3g1cnypuyYTo3b4FL5yFNZd5FdVc1ehvI/HI8jQWiTb5rNfr4KC6TAF2n Gkm6Pi21FT3gZBSl3hQjxANf763S7qlC03v+HYcvMmBL7pSM2rwIR4fahF5W Vch0f55/Rr4LbMn8mlO7hnCgZKpx6vQTtGmjm7MZrRDrSa91MHmDS3PcEwLv SnSJ/+x4OLAORuSYYZvn3mA/Q1G34AsVFUKWs/WY2aDQrNm/LVyCk2kH9WYO lyPRNJy6PfYRMu3bHxEoEvSsG7ClpZbiI6/8yt73NHSyEv4TlihB+6LLXWEV FDQ41O2W7NCCZhtMxm8RJDjKXM01ZBfg0xCF2MDRTlT8TpcLvvQGbYgZXrNr cpDv2jicN8TAmI0tUeKrQ5gWTZIuqGViuWOVWk9mL777a5wbaC5Gn5yc6k1f kzCj6bR1dAcbj3wAZjdBgAkfcU1f/RVUZ2qQ+Q6DWKBdpJY1z8F08vMnD4qi QJPLSWrIFqBfcIqTh4SJRy2vXWhKTQN7hTX3LchCNEvRTq7M7MYL8UHWdnFZ YG4WEFq2SoThGR3kj1u7kGVlX31xIgekYpZi/QERxkn501dcWzB7kUarEBXA /pTo9r/3iZBVT14IyaSh6bKXlg+RAnHFXpHUD0J0FwAwfdNxIXLpnB2lBCzd 9Q7FHRNie4BMSzbrMeQ/U6/NE5bClLcS4fIVAbbsTQzffbcOxJ+Ix4sny8BQ 96346c983JGbRThb0AquvNAU6dNy2C9nyBwZ52HtRXMd1c5OaNjaoK9vQAVn mJj96MtF9f6x/OAxOszdjtYIP0GFc6WkfEoOG0N0NiS6FL4GRdFSoL0rFfy1 rS91BfYjaUKdbTnLhPRlFSW/7+Vw4MWyR+NwDx6bfCduVhqAwpFVXbEny8HY IVIxdSMDXbWHiZIANlRH6tbev1YGNslLSYMnO3HPqZvMuaMcUBn2rCs7WQrh N4hb/ph/jgPSfb5jylxoslP8Rl1XAlMJ2RNuHjRUb5hS93/IhYOhMxoK7UWQ fmOkRlqbiDGU80N+f3Jh6eEz4RdpHkwaUxw1bxSA07n+Q7cyuXBzyPZXrW/Z cCRscVvQim/TLdfp//v2e5JJVs2Kb/8BIEafNQ== "]], Line[CompressedData[" 1:eJwV1Hk41Akcx/GhMMTmWR0kbZIz17PkWnx1udosoY2UzONOYkQSOkwKsx6M KzQrZkxJRZ4Q8s0+jjEU1ThqmAYzv9n18KRa1wqrP97/ff76/PHSplw4HiJL IpEs19uwXl9B7abtyULcnsh9Xm8yDjqk9H+O9Jaj6oc2w56GD7jcVnaB+WgC 7qRfvVyiX4H6RrWpzVVD2LwWN31yaRJE6R69ll6VuOq5xUuw8AahOOiiQFsC nLGvLX0nWDhSVK5/SpOHG4Ueh8hyBOTo7qnnaLDxdU1a5wLzJWZVKHz9VkTA nMOV/Xtz2ei6w6rrPPchps99FHlPEUCJ7G6Y5bExB84eCJ/Lh2A/iXvMMgGV jWcNNLrZeF8wODN6vAn+thPIBL0iIBE3LVJusfGw+jnWljNdEGm8YsXwIYC5 1eMpZY2FtzbrTyvrDQBZUapGZ0igbPAFKd6ChVazZh6uJXzINvdICCwXg1Fl fqKmXSXSLMxj/QdHoN3PwWtz3CQErq5F0JUq0Jve68O4IQIqw6ZlyVQEd39Q 1HFj3kW/Wd4Li4ZJkLXMO3nVewTKjGWalLgFmJCwoPJoXAyi0u3NgXv4kNDK q6Y152KyNy+J904CISn2BUrUfpDX2u8+PJ+J9EgmP6WQgJ0mnAn51E54rNFR Ro26jheHxkJtVKVAK136dPlmA6h2KtDVyqPxX7v5DeWOUrj26pVyoH4GkKbP c/umXCFBPXhT7j4pzJ7Y/cXEpRb51o0jNFo87Fa+OZrxnoCpkKMuI4x27LM/ SKI8TIMqp3e2D90IqFkZSC0Y5CE/u9bQ+SwdGFuPZUVESID6a6891eUtkgyk 3Rvb8uDI+8fJC4fF0FTVnO8/NYQ0Sk4BR7UIYoz+aFJJGgfirS1GdQjRycRx b5APE3Y1fXhwxlIABgYH419OTKBb3OWQzQEVULhcRL8vHIJTi09P5BwSo2aC 5zytuBLIJnqi2ANvYUd9h1F/sARttl4hpxWxgCejUBN1rReSOAO8n6wIfJmq fUf3KBvEqmY3mBZ/wTdH14w+HoEvMk8HcDrYYBDaPaVV9gSqV+rbHuhK0bny Z5adXBV46naK+TMM7A5T6TK1kmK0fsuTbWvr+xlu0PDxJkw/aaHsLSvFgEiW f+lzNnQpyVq01nXipArznVo2gbHUUbvfrdlA7rnXOd/Wj8n+oQMzXAmGX+Im QhgLOm6Tz63V8nHKxvLTL61iZI1vSzL0qYRL1r2+zp5j6OQbmF80NY5WYzqL SWnlEHaqx6tHbgId7DC6YGkUsziWdbbHSkDx8Zc/q7lijGGTM2T1+DhApYSW Yi6YjajqpTRKcEsiRd7Kox9tXGbVc0cywUDYthAQTmD+atpNwWInZk0Hh8hI r0PM6f+ELcPrfz07M7ps8hzpTk5RvuJYaDP1bU0hS3HAmPo5orwYSZG7EpUG FfGBlsPplTkCc9rv6n388RFEPd2ZV90fhxTTCOPoOwR6djjqsWnt4Oz3hJud n4ZCdW3rQzIE1h3Vdh8e50Hx9GR8GIWO4alSxcP7JHjRqHC/89IbcOQ8K+y9 kIfmOub2jiQxyrXurlu9PwRauREu+q8LMchD2mDGmMAABbXPNBUBZAZGaQhE JVjkZevUKDOOCm7nZDQnhJByZcyIFc5EecN7Currjv2mGur+3TF6DYn23bH/ AWDUiC8= "]], Line[CompressedData[" 1:eJwB2QQm+yFib1JlAgAAADMAAAADAAAAdv0rcRMzzL/ye810U6ruP1xidg+1 Qqo+zdi1XLEkvr93uB9p5T3vP2S80kRFXas+QOPGBP9mjL8eL+J0RXnvP4sh UPecKqw+nELew2BTuT8m734fSFXvP0x4xOFsr6w+rB3Xqw/yyj8yGPbGWsnu P/FBjBgv1aw+Ps7LyIr90z9166nla+rtPxNtdBwvoqw+qNb4+ttJ2j/+zujt 47TsP98du3NyHKw+rqa0J1sX4D+yVtt9rTTrP/6QKbhxSqs+qAJB0hre4j/W YAmeo2jpPyZlG26WLKo+uiqLw2Yq6D8UmaGNapbkPwUI0hVMy6Y+I3BHFggH 7D8sevk4mkHeP3Te1/6slaI+seSsqpye7T9CbZDjUrzXP4D1kJju4p8+OZOf oRrV7j8YAAxIf+XQP8pzD7ahLpo+uuOKp56j7z80fjd4D+rDP1KOdKEpPpQ+ m6pkpxIH8D8AGGQOWw2nP1AVuVJKFYw+G63I+BgL8D8ATLfeCB2uv3/oPghr LYA+4EZPB//F7z8VP7H008LEv+itZEXVT2A+hdQKrVQM7z90CdJ/YHDRv2zM 6FwMOHK+C+XBd0nu7T8aPE7NH0rYv/qvyjo8NIa+mIG2K9aL7D/KbvV2rWve v/AR7OVdGZG+7P90VPjY6j8ST2uZDx3ivz37v9bE6pa+VBrM9SCu5j8Fvh6a sDbnvxiE/Wq8x6C+6BU7D4gV4T8+ciElYKfrv+01u47Tw6W+HV+gVaBU3D/y 6L0pEUbtvxKXCfCAvae+LFv3Qukv1j8rvFvropTuvxRF+Q9Fdqm+Lxta9D+F zj8eo+h3mKDvv5A/gUMtBau+iIvT5lRIwD+MipqIXCPwv6+wPNMWPay+uCfO SK3bkD9Xrqc2WULwvwXM6j3QFq2+Pj3KKxktuL/+0Clr2y7wv6QLjR8qlq2+ 34sXFtMwyb/p8yZfyN7vv4UDVUcXuq2+UkvBrlIC07/syAFkzwnvv/45s0Sn ja2+Bd/MFuC62b90HqsfOsTtv/gBokguA62+ZDoR/ssP4L+AdpA1PCDsv/l7 hPl9HKy+Phoj37Lc4r/yPp2Dskfqv4gzw4GE9Kq+REl/sTV05b9E1S3rtCbo v/09oyT7gam+G/c05hU56r/Mm5ELi67iv8pASDySc6W+JI8lHr0U7L+86bTW cEXfvwT6Jzm4DKO+oJ2LR6GW7b+uFEbnk83Yvx+nUnmnaqC+xIuV/XOp7r/e pZ75MoDSv1pVsL2cj5u+wc3MmP5m77/YdP0C5wTIv1qBgs8HAJa+yKmk8sfR 77+SzEjwE1yzv2ZsBgICbo++uA/xqZDU77+M6ZMmOgajP6M41pZse4K+Nah2 LDt5779ohZF91CjCP7BNc9Uiy2i+19Q9djTE7r9PQqCfoVbPP4ABuHeKiWg+ 88FU8Zi97b/YP07NJvPVP+wpQsXzI4I+3dmK4IJl7L8GXmEGQPzbP9KY6jsm 740+a1I9PXR16L9UM5VLs/fjPzBekw86GZs+1B240qGr47+EfdMr1J/oP9I6 sTmDlaI+u/VVE2MH2796LlGxwW3sP3aeoowmGac+FilImCiv1L/4dkK8Zrjt PwWdbzP/0qg+UjDx+xYzzL8jxa9AU6ruP6RRL7i0Qqo+J5+GdA== "]], Line[CompressedData[" 1:eJwV1Pk3FAgcAHBHjohK5SiiGuJlNjkqk92vxlWUWldJ8dhYpdZNhw6lxlPP ndxHzLiqQSRP+qImaiWbXJPIURgazD1eZrZ++PwLny0BoW6BcjIyMlY/yf/U 9kL1tIMZD3rzErXvzo9hzoXcJKspKiZ0/dc7pMIFl2CfJ+vDv+EphYC9szdo 2CfH+7ejahEc89uu76CzsGvB4gdziIY6c1dcMkbmQTMtfa6dzUb3/KAszxka +nE8tytxZiH7jKJNnf8i7lvIWa6h0dDZ5TLBYmYKZiwcqQ18DtrbLkWs1qdh Mu+oUnzqBGQP5QUZ/cnDHnWt52vdqEiq2UZfpT0C/qvZHIMQPopalEf4TmUo LaNGraR9hOm+teWyBwQ4qTLrvkemFPd6LGfU6r6C6PZvu9/OC9Dg5JyOpk8J tpY2f1BKScSuIztC3zkLcZU9Sb3heyF6nDf/JMtiIAVDVsV4CzE4/fZYsyQX N1reVDba3IfDnKIITYIQA/PPmkc2ZmGe9Pixx8JRrGED3aBQgH4eco21L9Lw hRb/ce3+r6jrV76z5i0f6XHS7afEiZjca7LCZS8LLU07tvvU8ZDVVGfaFBGH +zRyz89Ms9FVhpwR6snFsMxYwps4b2RYEm8XneKiT3jCMHXrAoZFKXUfrI+H A0xJJKddgMXz48xc+hRSP7k9XMnLgINx2ollyyLs6b1TEiUZRuUGrnxCUQHE upHTNZ+JUV00YaQQ3IuTCQ7E8eViyDloccfOfAlTPbOU7hq+xORPtsUc+VJ4 GqQ98ODcEsp8nLB3VswE3S6z9d5yVEj93kba6L2EdStZkpe7O+Hh+Yrnz1/R gOxM5vbILCH5aIG0j9APc4ZPhRPECpDo1z78HChG0eDhkbGlUbBRZ/jyvCvh IuvW8r0oEeYRjb3/MPwKm1o/XgrzqoL+NEKEOkmI0aOfXUbVWGBC0D6htaIa QNSiM9PGR9qx9x2UdDY0Xgy53OxXDVtNeKxHqjxMELtGOvkugpm4alL/XDUE jCc7dAAHT6i5bW4x4MJ05ll/PbNqkFMJXL7mtICTbKe/bGp5YD1eznhEr4K/ K2P1fBdn0fHpxgRjIwGsU6MMlg5Wgm3dpd8EilMoFTVtSPUSwhl/2ZDIhgpw 8bfr0bUex4pM87GYXSLImldG4ulySIhZYJ+lMLFhaAuF9VYEuVdOqMYMUOH6 BcfDivrv0ZVTOuNrKIbpa1NHkmdLoXiDXds7SS2u0zL1GNwpBtNQZ7o7owQO PBM28vY3gbtpO2HnnAjCHm1zvcAuhPqgdxnanB648eSL6raTIvD9YKVgIcmB x37NA7b3mOCgcF8YkS6EyE10whvCPbi5+2Qzc3YMDnntp8onCeB3D8fjh/RS Idzky0XKullwqWRrFN3kgmPe8L7u4EiQkp/YD+ssgm5E7rmr1fNQFhRrRWqP wYU0O7MgBhey5yQBh02n4LTYeKGTmIIqSlt6NvfzYDpsQ6DAeBxsBh+8zirO ROU8/mVyAR+W8wcLr44PAbk7qTHFOwdDR7pz4zUEYECi/DB88x4CohnhqSEF WCc0i7ayF0BnZXcLUaMROi3X53imFGO2OMloF1EAR++3Um7N1KP6rXRrWc8H WN/LMI1/zYdWCfmuZFMP/lNPJKoNlGKVZGvJGT0+SM0r9niZMLGxnnrNVpaK ncxn1b9+I1mv6U/6+VsE/bvXr9/+B82YrCU= "]], Line[CompressedData[" 1:eJwB2QQm+yFib1JlAgAAADMAAAADAAAA2e3I4u0lE0ByfFgeFSz0PzY9SC1X zLy/WNNKsPGWE0CC+WddMWPnP/i9rfVk3by/jGZsgdzOE0AAFdfGVp7IPzyk 4t87mry/mHO2DErKE0C0qqOrpD7Zv/FQ75gn87u/oBspYPeBE0AABF+evEPv v5xJmGgZ7Lq/J40MhxICE0A5LcekhCv4v7qE8qHForm/H3XloFNJEkBf5FXO qDkAwJF+LPhWDLi/zfX+XH1CEECbY0sbn8sHwHc4FYGpIbS/cKSWav13CkAS RLACPuAOwMKGrwNusq2/VuIrhqaHA0AKc7MlBA8SwEhRi/djWaK/PHwtdMq2 /j8gaeUa7ygTwNau2yOajpe/XvLegGDs9T8ks108owQUwAgPv0o6E4S/1NOX KVXw6T8IFe3DE50UwMQreI1Qe2s/oJwCV6Zzzj/ADgLw7/QUwASQbNgg8JA/ NPoKbt9Q078hCDm4tAsVwIReiSayaZ0/JoVj6qDo6r+DW3VeFekUwM6ddmYe 0aQ/FXg4Axyw9r/TysyzIYMUwLitJCcFOas/yG3UdOmu/78MkqWBcNsTwB7s 9bUJqbA/IIDVy+/hA8AQeDO/awUTwOoD9WFhVbM/r59eN665B8D/p0J/UfoR wF3pqDosz7U/+u0iniyGDsAiIhTuvcAOwJ0FOQza/Lk/gMb/XXXcEMCuGdTr wGALwAv5eKFR1Ls/UcS1tPxCEsAoDKHPyqoHwHHzBtxpV70/YZZ4prVfE8CG SvWDUfEDwMsAads6cL4/XxOJeihJFMCbPbiZswEAwGpELrJOOL8/HRRF/FsJ FcBret1HJhr3v9jHRjZ8s78/iuWOmOGHFcAsiToIQNHrv91ZtYity78/GGXo /qHCFcA4mAJsuePSvwj6DTjWgr8/IG1NmMy7FcAwYktttAnSP48AE4Yx274/ ZFo/UGJ6FcBOCWdwuR7qPwOr2Xc3670/91zZSrEAFcC/bPBWo3X1PzxhlNUk rbw/vEeD6Z0+FMDVDeP6WUv+Pyyk+Znb/7o/QY9R7lQ+E8BS2D6s+l0DQPb2 Pg0kALk/JsmHHCjFEMCYVZ/6/IgKQNw79bpMf7Q/rD811R6gCsC/vBWhRnoQ QArV2kbAXa0/KDsh23eZAsCDWl6X98oSQKGYXJaBn6A/kAouOUUY/b//ezyO Fo4TQDKdzkI/0JQ/SQ0lpsm39L/rLjYeUhoUQDFZASsYcIA/Jl9ji5/d5r8e oUAkmXIUQFSgQFi+13W/IB07p1JqwL+lAiYudYcUQGB2WwAQ/5K/6Mz0hXbA 2j/hO2Es1F0UQKnAusQiWp+/lIHvWfSe7j9q4wbvpvkTQNIotx/JpaW/nznl dbeO9z8C4iIrrV8TQOLT6XXbPKu/rDC6NwyD/z+TqEUHI5ASQP8HS6bOQLC/ zlx5ex7bA0AAqXSv/3QRQMWvMKCE5bK/gBrq4bSuB0CtAzw6/CAQQJ3utz7a SLW/vAboDybuDUAJQj1O5DoKQEwl2DQ39bi/zJsYZBZgEEDPNjeSMHUGQI7w 9ffEebq/6DlyLh6QEUDQT2d8CmQCQDB/UuyNoru/flEfVIp3EkDzNLfknKX8 P/nN+pU8Y7y/I2hMvO0lE0AJKfVmFyz0P15QJx1XzLy/+JVRYw== "]]}}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellGroupingRules->{"GroupTogetherGrouping", 10000.}, CellChangeTimes->{3.7607853821240673`*^9}, CellID->182836464] }, {4}]]