(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 9.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 157, 7] NotebookDataLength[ 828412, 16066] NotebookOptionsPosition[ 819685, 15798] NotebookOutlinePosition[ 820184, 15818] CellTagsIndexPosition[ 820141, 15815] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "Kimball", " ", "model", " ", "and", " ", "energy", " ", "derived", " ", "from", " ", "Wolfram", " ", "ES", " ", "12", " ", "July", " ", "2013"}], " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Clear", "[", RowBox[{ "tw", ",", "n2", ",", "n", ",", "nb", ",", "bc", ",", "bh", ",", "u", ",", "u1", ",", "u2", ",", "Vee", ",", "Vne", ",", "Vnn"}], "]"}], ";", " ", RowBox[{"rad", "=", "57.2957795"}], ";"}]}]], "Input", CellChangeTimes->{{3.568278170270548*^9, 3.568278174310955*^9}, { 3.5682782109554195`*^9, 3.5682782183342323`*^9}, {3.5688220426984916`*^9, 3.5688220506389055`*^9}, {3.568822092353379*^9, 3.568822134660653*^9}, { 3.5688728241768503`*^9, 3.568872825034852*^9}, {3.5688958900531473`*^9, 3.5688958965115585`*^9}, {3.5689027504159966`*^9, 3.568902751695199*^9}, { 3.5689109808408637`*^9, 3.568910992618884*^9}, {3.569134574760273*^9, 3.569134584135889*^9}, 3.56923802266416*^9, {3.56933446475942*^9, 3.569334471239791*^9}, {3.5693395229642725`*^9, 3.569339531606688*^9}, { 3.5694332905109916`*^9, 3.56943330667262*^9}, {3.570297588441428*^9, 3.5702976026530533`*^9}, {3.570558862041448*^9, 3.5705588713234644`*^9}, 3.5705590387585583`*^9, {3.570855141170933*^9, 3.570855146100541*^9}, { 3.5708563212974052`*^9, 3.5708563224362073`*^9}, {3.5708588179101906`*^9, 3.570858820452995*^9}, 3.570949483910489*^9, {3.5719810762355733`*^9, 3.5719810786847773`*^9}, 3.5723256977094345`*^9, 3.572583124905918*^9, { 3.5727976670013523`*^9, 3.572797667157352*^9}, 3.5728672700652885`*^9, { 3.574069429922815*^9, 3.574069433479621*^9}, {3.5741328775223475`*^9, 3.57413289583678*^9}, {3.5741333767544246`*^9, 3.574133378220827*^9}, { 3.574341036190522*^9, 3.574341050277347*^9}, {3.574503184922072*^9, 3.5745032038917055`*^9}, {3.5752201500921936`*^9, 3.575220151324596*^9}, { 3.57526642588752*^9, 3.575266432361531*^9}, {3.5826020511944838`*^9, 3.5826020541740885`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"ChemicalData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"t1", "=", RowBox[{"0.01889726", "*", RowBox[{"ChemicalData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]}], ";"}]}], "Input", CellChangeTimes->{ 3.57029749846047*^9, {3.570297893562364*^9, 3.5702979152152023`*^9}, { 3.5704535321223855`*^9, 3.570453555038826*^9}, {3.570558892227501*^9, 3.5705589112283344`*^9}, {3.5705589864360666`*^9, 3.5705590132681136`*^9}, {3.5705590525489826`*^9, 3.5705590747322216`*^9}, {3.570595322227199*^9, 3.5705953504632483`*^9}, 3.570855059411189*^9, 3.570856566545436*^9, 3.5709425310226765`*^9, 3.5730457924857635`*^9, 3.5738743957366743`*^9, {3.574067876130838*^9, 3.5740678963328733`*^9}, {3.5740679338997397`*^9, 3.5740679382521477`*^9}, 3.5740694160855904`*^9, {3.574335155023285*^9, 3.574335160249294*^9}, { 3.5744825096366043`*^9, 3.574482533177046*^9}, {3.575217073303817*^9, 3.5752170742554183`*^9}, {3.5818289943174543`*^9, 3.5818289943174543`*^9}, {3.5825627541550937`*^9, 3.5825627541550937`*^9}}], Cell[BoxData[ Graphics3DBox[ {AbsoluteThickness[3], EdgeForm[None], Specularity[ GrayLevel[1], 100], GraphicsComplex3DBox[CompressedData[" 1:eJw1VG1Mk1cUbnDJiB/MIFlMh7AZhzKMwMAPhugZThD8gHYMGGPlLaX1LW3t B6UtpYtuRJdFCRqXbQpTnAvRZZItQ7NsiTvrNNEOjVlMNJsfmYlBBH+QOZPF THfvfd7d5M3b3nvOec5znue9L7X7rc40k8m0VjyzxBOsmH3t+Gcu7v90R2bf /AbePWX5PufuOha7gYpXXmOXXM+30Wj1n/GsRgeXjV2InH26hkxyFdm4RK4C J6m8Cp1Qz4pzLqdpsb37uwBfjJw9ai7chHojGue3DiT/1uwswwOnNBJRU5YX fdybJZBSPv4yIE4GXdzSUX67bl4V/Zw6tvFMQT2p/CoPiW5Gqyd1lm3Ojvq5 ++DCZxpzaoHX62WrLHgoyhJm2bTGl8bFam1j+bc114b9hz5S+2vCnCsJfBDB +bMezGO4mKtnxeYsWTYPcUUhUv09CrHid2I7cGZ8/ItIG7jjIHkcL9URf8NH 6rzGwetX2n6oGatnNcc9buCXekjhRf2k5p3soKXF6V9np4w5jWqk5usw5jy1 gxROKEgTj0/O/NZPBl+bke+n+c1Soc2sdNC8tK1d7Hz8KvhlBjCvwW7oFItB t89ddK7ylPvWTDb4WFpQL+WGD5IRUnp82ENfbDzz179jzfTkamwy79tm+GIk jHmZLKRwkiGezBNEhppY2uXo4Q3Q5/JyrtTuXlk8mM+CZUvHO3WkfLG+AX64 nkDfRXZWvAp0Vu2k6/BFTpAOHxLrYgw8foyDly3EUWmvRStI4dyqxtyaouD3 dgR6pfsRn+pipdO4m5QOQ3746XQXdNviBu6NMIlu//hnhdWYW4ikjHPvW6BH ueGbZA98sfg96DFo6JRWi7wmJ+aU4YX+aQn0tXIn9Da/BVyvA3N+6uEeOcCs euT3NfAjUS5Z3MkK36pxq3ileczUpR94kCixs/LDza08bC68uWRkFXQbaQCP bMNH5To/EWFbK0tIwo3rTtokiee6+JMNe70TvSWo395EmX2cOtb9Ltuloe6V oo+6DlbxhTo9SAhHX34TetQY/pzTCd/87iFp64EMG9VL/119mfdIvgd8JD/n /tu1pPictv7/XaHuc9uQvyvA6+SPsji+gww7/DHtgI77HNBvboBKJe77Efjj SAzxd/y8XzXw8KevFlx54/o3ZbiPzoXxPhFGnWYP7hl7EH675sI9dM8DHSxB UnU2uzgHPgPv+3Xo1xkgaW/zQBX6ywuhj9Eo+F2Ko95QJ71wxJb/63AFcMkO 30134h5o78G9YUtgPhONtGX1R69r59voP10omF4= "], { {RGBColor[0.65, 0.7, 0.7], SphereBox[25, 24.], SphereBox[26, 24.], SphereBox[27, 24.], SphereBox[28, 24.], SphereBox[29, 24.], SphereBox[30, 24.], SphereBox[31, 24.], SphereBox[32, 24.], SphereBox[33, 24.], SphereBox[34, 24.], SphereBox[35, 24.], SphereBox[36, 24.], SphereBox[37, 24.], SphereBox[38, 24.]}, {RGBColor[0.4, 0.4, 0.4], SphereBox[5, 34.], SphereBox[6, 34.], SphereBox[7, 34.], SphereBox[8, 34.], SphereBox[9, 34.], SphereBox[10, 34.], SphereBox[11, 34.], SphereBox[12, 34.], SphereBox[13, 34.], SphereBox[14, 34.], SphereBox[15, 34.], SphereBox[16, 34.], SphereBox[17, 34.], SphereBox[18, 34.], SphereBox[19, 34.], SphereBox[20, 34.], SphereBox[21, 34.], SphereBox[22, 34.], SphereBox[23, 34.], SphereBox[24, 34.]}, {RGBColor[0.291989, 0.437977, 0.888609], SphereBox[1, 32.], SphereBox[2, 32.], SphereBox[3, 32.], SphereBox[4, 32.]}, {RGBColor[0.65, 0.7, 0.7], CylinderBox[{41, 26}, 15.], CylinderBox[{44, 27}, 15.], CylinderBox[{49, 25}, 15.], CylinderBox[{50, 28}, 15.], CylinderBox[{51, 29}, 15.], CylinderBox[{52, 30}, 15.], CylinderBox[{53, 31}, 15.], CylinderBox[{54, 32}, 15.], CylinderBox[{55, 33}, 15.], CylinderBox[{56, 34}, 15.], CylinderBox[{57, 35}, 15.], CylinderBox[{58, 36}, 15.], CylinderBox[{59, 37}, 15.], CylinderBox[{60, 38}, 15.]}, {RGBColor[0.4, 0.4, 0.4], CylinderBox[{39, 5}, 15.], CylinderBox[{40, 7}, 15.], CylinderBox[{42, 6}, 15.], CylinderBox[{43, 8}, 15.], CylinderBox[{45, 16}, 15.], CylinderBox[{46, 18}, 15.], CylinderBox[{47, 17}, 15.], CylinderBox[{48, 19}, 15.], CylinderBox[{5, 9}, 15.], CylinderBox[{5, 10}, 15.], CylinderBox[{6, 9}, 15.], CylinderBox[{6, 11}, 15.], CylinderBox[{7, 12}, 15.], CylinderBox[{7, 14}, 15.], CylinderBox[{8, 13}, 15.], CylinderBox[{8, 15}, 15.], CylinderBox[{9, 49}, 15.], CylinderBox[{10, 12}, 15.], CylinderBox[{10, 50}, 15.], CylinderBox[{11, 13}, 15.], CylinderBox[{11, 51}, 15.], CylinderBox[{12, 52}, 15.], CylinderBox[{13, 53}, 15.], CylinderBox[{14, 16}, 15.], CylinderBox[{14, 54}, 15.], CylinderBox[{15, 17}, 15.], CylinderBox[{15, 55}, 15.], CylinderBox[{16, 21}, 15.], CylinderBox[{17, 22}, 15.], CylinderBox[{18, 20}, 15.], CylinderBox[{18, 23}, 15.], CylinderBox[{19, 20}, 15.], CylinderBox[{19, 24}, 15.], CylinderBox[{20, 56}, 15.], CylinderBox[{21, 23}, 15.], CylinderBox[{21, 57}, 15.], CylinderBox[{22, 24}, 15.], CylinderBox[{22, 58}, 15.], CylinderBox[{23, 59}, 15.], CylinderBox[{24, 60}, 15.]}, {RGBColor[0.291989, 0.437977, 0.888609], CylinderBox[{1, 39}, 15.], CylinderBox[{1, 40}, 15.], CylinderBox[{1, 41}, 15.], CylinderBox[{2, 42}, 15.], CylinderBox[{2, 43}, 15.], CylinderBox[{2, 44}, 15.], CylinderBox[{3, 45}, 15.], CylinderBox[{3, 46}, 15.], CylinderBox[{4, 47}, 15.], CylinderBox[{4, 48}, 15.]}}]}, Boxed->False, ImageSize->364.32496338979473`, Lighting->"Neutral", ViewPoint->{1.3, -2.4, -2.}]], "Output", CellChangeTimes->{ 3.5825628291912255`*^9, 3.5825635750753355`*^9, 3.5825636677082987`*^9, 3.582563793007718*^9, 3.5825638472022133`*^9, 3.58256391916514*^9, 3.5825640735898113`*^9, 3.582564139655927*^9, 3.582564290664192*^9, { 3.582564413202408*^9, 3.582564437959651*^9}, 3.582564523167001*^9, 3.58256462515998*^9, 3.582564709836929*^9, 3.5825647988038845`*^9, 3.582599444741905*^9, 3.582599562350512*^9, {3.5825995980589747`*^9, 3.5825996187134113`*^9}, {3.582599725713999*^9, 3.5825997549016504`*^9}, 3.5825999679824247`*^9, 3.582600039071749*^9, 3.5826003648627214`*^9, 3.582600752289402*^9, 3.5826013988949375`*^9, 3.582601713859491*^9, { 3.582601755558364*^9, 3.5826017790520053`*^9}, {3.5826019537255125`*^9, 3.5826019765483522`*^9}, 3.582603452997346*^9, 3.5826081993371477`*^9, 3.5826082912681093`*^9, 3.58261088792447*^9, 3.582610955878189*^9, { 3.5826110029278717`*^9, 3.5826110770124025`*^9}, 3.5826111117692633`*^9, { 3.582611156400942*^9, 3.5826112964267874`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"u", "=", RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{ 3.57029749846047*^9, {3.570297893562364*^9, 3.5702979152152023`*^9}, { 3.5704535321223855`*^9, 3.570453555038826*^9}, {3.570558892227501*^9, 3.5705589112283344`*^9}, {3.5705589864360666`*^9, 3.5705590132681136`*^9}, 3.5705592408949137`*^9, {3.5705593512807074`*^9, 3.5705593890483737`*^9}, { 3.570559442712468*^9, 3.5705594826641383`*^9}, 3.5708550837628317`*^9, 3.570856587480673*^9, 3.5709425310226765`*^9, 3.5730457925169635`*^9, 3.5738743957366743`*^9, 3.5740679502641687`*^9, 3.5740679862378316`*^9, 3.574068238587475*^9, 3.574482553893882*^9, 3.5818289943330545`*^9, 3.5825627541550937`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.5825628292692256`*^9, 3.5825635750909357`*^9, 3.5825636677238984`*^9, 3.5825637930233183`*^9, 3.5825638472178135`*^9, 3.5825639191807404`*^9, 3.5825640736054115`*^9, 3.582564139671527*^9, 3.582564290664192*^9, { 3.5825644132180076`*^9, 3.582564437975251*^9}, 3.582564523182601*^9, 3.58256462517558*^9, 3.5825647098525286`*^9, 3.5825647988038845`*^9, 3.582599444788706*^9, 3.5825995623661118`*^9, {3.5825995980745745`*^9, 3.582599618729011*^9}, {3.582599725729599*^9, 3.58259975491725*^9}, 3.5825999679980245`*^9, 3.582600039087349*^9, 3.5826003648783216`*^9, 3.582600752320602*^9, 3.5826013989105377`*^9, 3.5826017138750906`*^9, { 3.582601755573964*^9, 3.5826017790676055`*^9}, {3.582601953741112*^9, 3.5826019765639524`*^9}, 3.582603452997346*^9, 3.5826081993839483`*^9, 3.5826082912837095`*^9, 3.5826108879556704`*^9, 3.5826109558937893`*^9, { 3.582611002943472*^9, 3.5826110770280023`*^9}, 3.5826111117848635`*^9, { 3.5826111564165416`*^9, 3.5826112964423876`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"n", "=", RowBox[{"Length", "[", "t1", "]"}]}]], "Input", CellChangeTimes->{{3.568278170270548*^9, 3.568278174310955*^9}, { 3.5682782109554195`*^9, 3.5682782183342323`*^9}, {3.5688220426984916`*^9, 3.5688220506389055`*^9}, {3.568822092353379*^9, 3.568822123693834*^9}, 3.568873215924739*^9, 3.5689108676002645`*^9, 3.5689997098237543`*^9, 3.5689998170115423`*^9, 3.568999886915265*^9, 3.5691460425981283`*^9, { 3.5692371678918586`*^9, 3.569237204489523*^9}, 3.569237465805582*^9, 3.56923802261736*^9, 3.5693403424025126`*^9, 3.5693404501675014`*^9, 3.569340737988007*^9, 3.569340852819809*^9, 3.569341165475558*^9, 3.56934149694494*^9, 3.569342614390503*^9, 3.569343567162176*^9, 3.569343662712344*^9, 3.569343763597721*^9, 3.5693440703198595`*^9, 3.569344266209404*^9, 3.5702973471714044`*^9, 3.5702974395391665`*^9, { 3.570297637207114*^9, 3.570297637987115*^9}, 3.570297920051211*^9}], Cell[BoxData["38"], "Output", CellChangeTimes->{ 3.5825628292848253`*^9, 3.582563575106536*^9, 3.582563667739498*^9, 3.5825637930389185`*^9, 3.5825638472334137`*^9, 3.58256391919634*^9, 3.5825640736210113`*^9, 3.582564139687127*^9, 3.5825642906797924`*^9, { 3.5825644132336073`*^9, 3.5825644379908514`*^9}, 3.5825645231982007`*^9, 3.58256462519118*^9, 3.5825647098525286`*^9, 3.5825647988194847`*^9, 3.582599444788706*^9, 3.582599562381712*^9, {3.5825995980901747`*^9, 3.582599618744611*^9}, {3.582599725745199*^9, 3.58259975491725*^9}, 3.5825999679980245`*^9, 3.582600039102949*^9, 3.582600364893922*^9, 3.5826007523362017`*^9, 3.582601398926138*^9, 3.582601713890691*^9, { 3.5826017555895643`*^9, 3.5826017790832057`*^9}, {3.5826019537567124`*^9, 3.5826019765795527`*^9}, 3.5826034530129457`*^9, 3.5826081993839483`*^9, 3.5826082912993093`*^9, 3.58261088797127*^9, 3.5826109559093895`*^9, { 3.582611002959072*^9, 3.582611077043602*^9}, 3.582611111800463*^9, { 3.5826111564321413`*^9, 3.582611296457988*^9}}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"DeleteFile", "[", " ", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"Extract", "[", RowBox[{"t1", ",", RowBox[{"{", "i", "}"}]}], "]"}]}], "}"}], ">>>", " ", "\"\\""}]}], "]"}]}], "Input", CellChangeTimes->{{3.582608138434641*^9, 3.5826081499630613`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"un", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "\"\\"", ",", RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.568807971988578*^9, 3.5688080897687845`*^9}, { 3.5688081769573374`*^9, 3.5688081865669546`*^9}, {3.568808274317109*^9, 3.5688082853151283`*^9}, {3.5688085365847692`*^9, 3.568808578330443*^9}, { 3.568808822704872*^9, 3.5688088761037655`*^9}, {3.56880890727262*^9, 3.568808937365073*^9}, {3.568809097608555*^9, 3.5688091594002633`*^9}, 3.5688092418308077`*^9, {3.5688092753552666`*^9, 3.568809302577315*^9}, { 3.5688096257786827`*^9, 3.568809703201618*^9}, {3.5688097456336927`*^9, 3.568809788268568*^9}, 3.568809850575077*^9, {3.568809946562046*^9, 3.5688099535664577`*^9}, {3.5688100003197403`*^9, 3.568810008556555*^9}, { 3.568810075371472*^9, 3.56881007981748*^9}, {3.568813431920168*^9, 3.568813533086345*^9}, {3.5688135960324554`*^9, 3.5688136045344706`*^9}, { 3.5688136407889347`*^9, 3.568813707494652*^9}, {3.568813812529636*^9, 3.5688138275524626`*^9}, {3.5688140611940727`*^9, 3.568814062738476*^9}, { 3.568814121113778*^9, 3.5688141965555105`*^9}, {3.568814326675339*^9, 3.568814331074547*^9}, 3.568814589473401*^9, 3.5688146762563534`*^9, 3.56881472549004*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.5825628292848253`*^9, 3.5825635751221356`*^9, 3.582563667739498*^9, 3.5825637930389185`*^9, 3.582563847249014*^9, 3.58256391921194*^9, 3.582564073636611*^9, 3.5825641397027273`*^9, 3.5825642906953926`*^9, { 3.5825644132492075`*^9, 3.5825644379908514`*^9}, 3.582564523213801*^9, 3.58256462519118*^9, 3.582564709868129*^9, 3.5825647988194847`*^9, 3.5825994448043056`*^9, 3.582599562397312*^9, {3.582599598105775*^9, 3.582599618760211*^9}, {3.582599725760799*^9, 3.58259975493285*^9}, 3.582599968013624*^9, 3.5826000391185493`*^9, 3.582600364893922*^9, 3.582600752351802*^9, 3.582601398941738*^9, 3.582601713906291*^9, { 3.5826017556051645`*^9, 3.5826017790988054`*^9}, {3.582601953772312*^9, 3.5826019765951524`*^9}, 3.5826034530129457`*^9, 3.582608199415148*^9, 3.582608291330509*^9, 3.5826108879868703`*^9, 3.58261095594059*^9, { 3.5826110029902725`*^9, 3.582611077059202*^9}, 3.582611111831663*^9, { 3.5826111564633417`*^9, 3.5826112964891877`*^9}}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"num1", "=", RowBox[{"Table", "[", RowBox[{"i", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.568807971988578*^9, 3.5688080897687845`*^9}, { 3.5688081769573374`*^9, 3.5688081865669546`*^9}, {3.568808274317109*^9, 3.5688082853151283`*^9}, {3.5688085365847692`*^9, 3.568808578330443*^9}, { 3.568808822704872*^9, 3.5688088761037655`*^9}, {3.56880890727262*^9, 3.568808937365073*^9}, {3.568809097608555*^9, 3.5688091594002633`*^9}, 3.5688092418308077`*^9, {3.5688092753552666`*^9, 3.568809302577315*^9}, { 3.5688096257786827`*^9, 3.568809703201618*^9}, {3.5688097456336927`*^9, 3.568809788268568*^9}, 3.568809850575077*^9, {3.568809946562046*^9, 3.5688099535664577`*^9}, {3.5688100003197403`*^9, 3.568810008556555*^9}, { 3.568810075371472*^9, 3.56881007981748*^9}, {3.568813431920168*^9, 3.568813533086345*^9}, {3.5688135960324554`*^9, 3.5688136045344706`*^9}, { 3.5688136407889347`*^9, 3.568813707494652*^9}, {3.568813812529636*^9, 3.5688138275524626`*^9}, {3.5688140611940727`*^9, 3.568814062738476*^9}, { 3.568814121113778*^9, 3.5688141965555105`*^9}, {3.568814326675339*^9, 3.568814331074547*^9}, 3.568814589473401*^9, {3.5688146762563534`*^9, 3.5688146829331646`*^9}, 3.5688147231032352`*^9, 3.5688216336189733`*^9, 3.5711137970191836`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"um", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"un", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"num1", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.568807971988578*^9, 3.5688080897687845`*^9}, { 3.5688081769573374`*^9, 3.5688081865669546`*^9}, {3.568808274317109*^9, 3.5688082853151283`*^9}, {3.5688085365847692`*^9, 3.568808578330443*^9}, { 3.568808822704872*^9, 3.5688088761037655`*^9}, {3.56880890727262*^9, 3.568808937365073*^9}, {3.568809097608555*^9, 3.5688091594002633`*^9}, 3.5688092418308077`*^9, {3.5688092753552666`*^9, 3.568809302577315*^9}, { 3.5688096257786827`*^9, 3.568809703201618*^9}, {3.5688097456336927`*^9, 3.568809788268568*^9}, 3.568809850575077*^9, {3.568809946562046*^9, 3.5688099535664577`*^9}, {3.5688100003197403`*^9, 3.568810008556555*^9}, { 3.568810075371472*^9, 3.56881007981748*^9}, {3.568813431920168*^9, 3.568813533086345*^9}, {3.5688135960324554`*^9, 3.5688136045344706`*^9}, { 3.5688136407889347`*^9, 3.568813707494652*^9}, {3.568813812529636*^9, 3.5688138275524626`*^9}, {3.5688140611940727`*^9, 3.568814062738476*^9}, { 3.568814121113778*^9, 3.5688141965555105`*^9}, {3.568814326675339*^9, 3.568814331074547*^9}, 3.568814589473401*^9, {3.5688146762563534`*^9, 3.5688146885023746`*^9}, 3.5688147203576307`*^9, 3.56882164316619*^9, 3.57111380070079*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"us", "=", RowBox[{"Sort", "[", "um", "]"}]}]], "Input", CellChangeTimes->{{3.568807971988578*^9, 3.5688080897687845`*^9}, { 3.5688081769573374`*^9, 3.5688081865669546`*^9}, {3.568808274317109*^9, 3.5688082853151283`*^9}, {3.5688085365847692`*^9, 3.568808578330443*^9}, { 3.568808822704872*^9, 3.5688088761037655`*^9}, {3.56880890727262*^9, 3.568808937365073*^9}, {3.568809097608555*^9, 3.5688091594002633`*^9}, 3.5688092418308077`*^9, {3.5688092753552666`*^9, 3.568809302577315*^9}, { 3.5688096257786827`*^9, 3.568809703201618*^9}, {3.5688097456336927`*^9, 3.568809788268568*^9}, 3.568809850575077*^9, {3.568809946562046*^9, 3.5688099535664577`*^9}, {3.5688100003197403`*^9, 3.568810008556555*^9}, { 3.568810075371472*^9, 3.56881007981748*^9}, {3.568813431920168*^9, 3.568813533086345*^9}, {3.5688135960324554`*^9, 3.5688136045344706`*^9}, { 3.5688136407889347`*^9, 3.568813707494652*^9}, {3.568813812529636*^9, 3.5688138275524626`*^9}, {3.5688140611940727`*^9, 3.568814062738476*^9}, { 3.568814121113778*^9, 3.5688141965555105`*^9}, {3.568814326675339*^9, 3.568814331074547*^9}, 3.568814589473401*^9, {3.5688146762563534`*^9, 3.5688146945707855`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "9"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "14"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "16"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "21"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "22"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "23"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "25"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "26"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "27"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "28"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "29"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "30"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "31"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "32"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "33"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "34"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "35"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "36"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "37"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "38"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.5825628293160257`*^9, 3.5825635751377354`*^9, 3.5825636677550983`*^9, 3.5825637930701184`*^9, 3.5825638472646136`*^9, 3.58256391922754*^9, 3.582564073652211*^9, 3.5825641397183275`*^9, 3.5825642907109923`*^9, { 3.5825644132648077`*^9, 3.582564438022051*^9}, 3.5825645232294006`*^9, 3.5825646252223797`*^9, 3.582564709883729*^9, 3.582564798835085*^9, 3.5825994448199053`*^9, 3.582599562428512*^9, {3.582599598121375*^9, 3.582599618775811*^9}, {3.5825997257763987`*^9, 3.5825997549640503`*^9}, 3.5825999680292244`*^9, 3.5826000391341496`*^9, 3.5826003649251213`*^9, 3.582600752367402*^9, 3.582601398957338*^9, 3.582601713921891*^9, { 3.5826017556207647`*^9, 3.5826017791144056`*^9}, {3.5826019537879124`*^9, 3.582601976610752*^9}, 3.5826034530285454`*^9, 3.582608199430748*^9, 3.5826082913617096`*^9, 3.58261088800247*^9, 3.5826109559561896`*^9, { 3.5826110030058722`*^9, 3.5826110770904026`*^9}, 3.5826111118628635`*^9, { 3.582611156494542*^9, 3.5826112965047874`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"num", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.56881016518083*^9, 3.5688102745058217`*^9}, { 3.5688103430679426`*^9, 3.5688103543155622`*^9}, {3.5688124958093233`*^9, 3.568812496386524*^9}, {3.5688126345871673`*^9, 3.568812635491969*^9}, { 3.568812673025635*^9, 3.5688126732128353`*^9}, {3.5688127492161684`*^9, 3.568812848541543*^9}, 3.5688129280080824`*^9, {3.568813062152718*^9, 3.5688131360032477`*^9}, 3.568813172678912*^9, 3.568821701869093*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "5", ",", "6", ",", "7", ",", "8", ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", "22", ",", "23", ",", "24", ",", "1", ",", "2", ",", "3", ",", "4", ",", "25", ",", "26", ",", "27", ",", "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", "35", ",", "36", ",", "37", ",", "38"}], "}"}]], "Output", CellChangeTimes->{ 3.582562829331626*^9, 3.5825635751533356`*^9, 3.5825636677706985`*^9, 3.5825637930701184`*^9, 3.5825638472646136`*^9, 3.58256391924314*^9, 3.5825640736678114`*^9, 3.5825641397183275`*^9, 3.5825642907109923`*^9, { 3.582564413280408*^9, 3.582564438022051*^9}, 3.582564523245001*^9, 3.5825646252223797`*^9, 3.5825647098993287`*^9, 3.582564798850685*^9, 3.5825994448199053`*^9, 3.582599562444112*^9, {3.582599598136975*^9, 3.5825996187914114`*^9}, {3.582599725791999*^9, 3.5825997549640503`*^9}, 3.5825999680448246`*^9, 3.5826000391497498`*^9, 3.5826003649251213`*^9, 3.5826007523830023`*^9, 3.5826013989729376`*^9, 3.582601713937491*^9, { 3.5826017556363645`*^9, 3.582601779130006*^9}, {3.5826019538035126`*^9, 3.5826019766263523`*^9}, 3.5826034530441456`*^9, 3.582608199446348*^9, 3.58260829137731*^9, 3.58261088801807*^9, 3.5826109559717894`*^9, { 3.582611003021472*^9, 3.5826110771060023`*^9}, 3.5826111118784637`*^9, { 3.582611156510142*^9, 3.5826112965203876`*^9}}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "=", "\"\\""}]}], "]"}]}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.568277663590458*^9, 3.568277712652544*^9}, 3.5682785838808746`*^9, {3.56880682872497*^9, 3.568806862015428*^9}, 3.5688069650848093`*^9, 3.568807273668951*^9, 3.5688073087846127`*^9, { 3.568807384553946*^9, 3.5688073893119545`*^9}, {3.56881489654434*^9, 3.5688149048591547`*^9}, {3.568821714349115*^9, 3.568821718951123*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"u1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.255", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.12", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.24", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.178", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.5"}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"u2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.255", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.6", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.21522", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.178", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.4507"}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.5679480369450207`*^9, 3.567948069112277*^9}, { 3.5679486805553513`*^9, 3.5679487948723516`*^9}, 3.567950206581231*^9, { 3.5681216077716007`*^9, 3.5681216839309344`*^9}, {3.568266380090639*^9, 3.5682664108850937`*^9}, {3.568266481350417*^9, 3.56826649971165*^9}, 3.5682795170433135`*^9, {3.5682795636873956`*^9, 3.5682797843809834`*^9}, { 3.568279837187076*^9, 3.5682798459854913`*^9}, {3.568279877201146*^9, 3.568279880711152*^9}, {3.5682799570264864`*^9, 3.5682799599124913`*^9}, { 3.5683770044498715`*^9, 3.5683771523693314`*^9}, 3.5688133425788107`*^9, { 3.568814931192001*^9, 3.5688150075073347`*^9}, {3.5688765350957685`*^9, 3.5688765981198792`*^9}, {3.568876634452343*^9, 3.5688766352167444`*^9}, { 3.568894358551657*^9, 3.5688944054453397`*^9}, {3.568894522929146*^9, 3.5688945259087515`*^9}, {3.5688946101644993`*^9, 3.5688946171221113`*^9}, {3.568894651067771*^9, 3.568894651956972*^9}, 3.5688946827982264`*^9, {3.568894734527918*^9, 3.568894735495119*^9}, { 3.5688947726699843`*^9, 3.568894773496786*^9}, {3.5688948078948464`*^9, 3.568895097914956*^9}, {3.5689558039020233`*^9, 3.568955804619624*^9}, { 3.5689559169086213`*^9, 3.5689559179070234`*^9}, {3.5689559496998787`*^9, 3.568955950589081*^9}, {3.568956090817727*^9, 3.568956118273775*^9}, 3.5689561556982408`*^9, {3.5690814230317364`*^9, 3.5690814238897376`*^9}, { 3.569232478412421*^9, 3.5692324795356236`*^9}, {3.5692325096124763`*^9, 3.5692325115780797`*^9}, {3.5692325933846235`*^9, 3.569232594289425*^9}, { 3.569235467676072*^9, 3.5692354683780737`*^9}, {3.5692358857568064`*^9, 3.5692358867552085`*^9}, {3.569236173312112*^9, 3.569236174060913*^9}, { 3.569344745239445*^9, 3.569344781213108*^9}, {3.5693896312339673`*^9, 3.5693896351495743`*^9}, {3.5693896840088596`*^9, 3.5693896981112843`*^9}, {3.5693897680462074`*^9, 3.5693897743798184`*^9}, 3.570595843597315*^9, 3.5705958765133724`*^9, {3.5706006955110383`*^9, 3.57060069660304*^9}, {3.570600739659116*^9, 3.5706007402207165`*^9}, { 3.5706007784563837`*^9, 3.5706008313872766`*^9}, {3.5706008641161346`*^9, 3.5706008892321787`*^9}, 3.5706010214580107`*^9, {3.5706011135917726`*^9, 3.570601115058175*^9}, {3.5706011509850388`*^9, 3.5706011750714808`*^9}, { 3.5706012352719865`*^9, 3.570601260746831*^9}, 3.570856110868636*^9, 3.570856144034294*^9, 3.5708561753903494`*^9, {3.5708562115824127`*^9, 3.570856236261656*^9}, 3.5708568877188005`*^9, 3.570856960992129*^9, { 3.5708570022854013`*^9, 3.570857003424204*^9}, 3.5708574863854513`*^9, 3.570857676003785*^9, {3.570857720697863*^9, 3.570857774736358*^9}, { 3.570857815015629*^9, 3.570857815265229*^9}, {3.5708578488052883`*^9, 3.5708579513754683`*^9}, {3.5708579844319267`*^9, 3.570858009937971*^9}, { 3.5708583084132957`*^9, 3.570858421435494*^9}, {3.5727961392438684`*^9, 3.57279614016427*^9}, {3.572796215855603*^9, 3.5727962193812094`*^9}, { 3.5731452670909014`*^9, 3.573145275920517*^9}, 3.574340997689655*^9, { 3.58184795912473*^9, 3.5818479592963305`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.24`", ",", "0.24`", ",", "0.24`", ",", "0.24`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`"}], "}"}]], "Output", CellChangeTimes->{ 3.582562829347226*^9, 3.582563575168936*^9, 3.5825636677862988`*^9, 3.5825637931013184`*^9, 3.5825638472802134`*^9, 3.58256391925874*^9, 3.582564073683411*^9, 3.5825641397339272`*^9, 3.582564290726592*^9, { 3.582564413296008*^9, 3.582564438037651*^9}, 3.5825645232762012`*^9, 3.58256462523798*^9, 3.582564709914929*^9, 3.5825647988662853`*^9, 3.5825994448355055`*^9, 3.582599562459712*^9, {3.5825995981525745`*^9, 3.582599618807011*^9}, {3.582599725807599*^9, 3.5825997549952507`*^9}, 3.582599968060425*^9, 3.5826000391653495`*^9, 3.5826003649407215`*^9, 3.5826007523986025`*^9, 3.582601398988538*^9, 3.582601713953091*^9, { 3.582601755651964*^9, 3.5826017791612053`*^9}, {3.5826019538191123`*^9, 3.5826019766419525`*^9}, 3.582603453059746*^9, 3.582608199461948*^9, 3.5826082913929095`*^9, 3.5826108880336704`*^9, 3.5826109559873896`*^9, { 3.582611003037072*^9, 3.582611077121602*^9}, 3.582611111894064*^9, { 3.5826111565257416`*^9, 3.582611296535988*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.21522`", ",", "0.21522`", ",", "0.21522`", ",", "0.21522`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`", ",", "0.6`"}], "}"}]], "Output", CellChangeTimes->{ 3.582562829347226*^9, 3.582563575168936*^9, 3.5825636677862988`*^9, 3.5825637931013184`*^9, 3.5825638472802134`*^9, 3.58256391925874*^9, 3.582564073683411*^9, 3.5825641397339272`*^9, 3.582564290726592*^9, { 3.582564413296008*^9, 3.582564438037651*^9}, 3.5825645232762012`*^9, 3.58256462523798*^9, 3.582564709914929*^9, 3.5825647988662853`*^9, 3.5825994448355055`*^9, 3.582599562459712*^9, {3.5825995981525745`*^9, 3.582599618807011*^9}, {3.582599725807599*^9, 3.5825997549952507`*^9}, 3.582599968060425*^9, 3.5826000391653495`*^9, 3.5826003649407215`*^9, 3.5826007523986025`*^9, 3.582601398988538*^9, 3.582601713953091*^9, { 3.582601755651964*^9, 3.5826017791612053`*^9}, {3.5826019538191123`*^9, 3.5826019766419525`*^9}, 3.582603453059746*^9, 3.582608199461948*^9, 3.5826082913929095`*^9, 3.5826108880336704`*^9, 3.5826109559873896`*^9, { 3.582611003037072*^9, 3.582611077121602*^9}, 3.582611111894064*^9, { 3.5826111565257416`*^9, 3.582611296535988*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"u", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5679472243083935`*^9, 3.567947394894693*^9}, { 3.567947453425996*^9, 3.567947471241227*^9}, {3.5679475415037503`*^9, 3.5679475448733563`*^9}, {3.5679488138107853`*^9, 3.567948820877598*^9}, { 3.568820296244224*^9, 3.5688203477867146`*^9}, {3.574482652579655*^9, 3.574482674872094*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.5825628293784256`*^9, 3.582563575168936*^9, 3.5825636678018985`*^9, 3.5825637931169186`*^9, 3.5825638472958136`*^9, 3.5825639192743397`*^9, 3.582564073699011*^9, 3.5825641397495275`*^9, 3.5825642907421923`*^9, { 3.582564413311608*^9, 3.5825644380532513`*^9}, 3.582564523291801*^9, 3.58256462525358*^9, 3.5825647101333294`*^9, 3.5825647988818855`*^9, 3.5825994448511057`*^9, 3.582599562475312*^9, {3.5825995981681747`*^9, 3.582599618822611*^9}, {3.5825997258231993`*^9, 3.5825997550108504`*^9}, 3.5825999680760245`*^9, 3.5826000391809497`*^9, 3.5826003649563217`*^9, 3.582600752429802*^9, 3.582601399004138*^9, 3.582601713968691*^9, { 3.5826017556675644`*^9, 3.5826017791768055`*^9}, {3.5826019538347125`*^9, 3.5826019766575527`*^9}, 3.5826034530753455`*^9, 3.582608199493148*^9, 3.5826082914085093`*^9, 3.5826108880492706`*^9, 3.58261095600299*^9, { 3.5826110030526724`*^9, 3.5826110771372023`*^9}, 3.5826111119096637`*^9, { 3.582611156541342*^9, 3.582611296551588*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.5679472243083935`*^9, 3.567947394894693*^9}, { 3.567947453425996*^9, 3.567947471241227*^9}, {3.5679475415037503`*^9, 3.5679475448733563`*^9}, {3.5679488138107853`*^9, 3.567948820877598*^9}, { 3.568820296244224*^9, 3.5688203477867146`*^9}, {3.574482652579655*^9, 3.5744826676648817`*^9}, 3.5818289943330545`*^9, 3.5825627541706934`*^9}], Cell[BoxData["\<\"C20H14N4\"\>"], "Output", CellChangeTimes->{ 3.5825628293784256`*^9, 3.582563575184536*^9, 3.582563667817498*^9, 3.582563793132519*^9, 3.582563847311414*^9, 3.58256391928994*^9, 3.582564073714611*^9, 3.582564139765127*^9, 3.5825642907421923`*^9, { 3.582564413311608*^9, 3.5825644380688515`*^9}, 3.5825645233074007`*^9, 3.5825646252691803`*^9, 3.582564710148929*^9, 3.5825647988818855`*^9, 3.582599444866706*^9, 3.582599562475312*^9, {3.582599598183775*^9, 3.582599618838211*^9}, {3.5825997258387995`*^9, 3.5825997550108504`*^9}, 3.5825999680916243`*^9, 3.5826000391965494`*^9, 3.582600364971922*^9, 3.582600752445402*^9, 3.582601399019738*^9, 3.582601713984291*^9, { 3.5826017556831646`*^9, 3.5826017791924057`*^9}, {3.582601953850312*^9, 3.5826019766731524`*^9}, 3.5826034530753455`*^9, 3.582608199508748*^9, 3.5826082914241095`*^9, 3.5826108880492706`*^9, 3.5826109560185895`*^9, { 3.5826110030682726`*^9, 3.5826110771372023`*^9}, 3.5826111119252634`*^9, { 3.582611156556942*^9, 3.582611296567188*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"cn", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "6.0", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "1.0", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "7.0", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "8.0", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "17.0"}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5688224161787477`*^9, 3.5688224173799496`*^9}, { 3.5688224905908785`*^9, 3.568822500434496*^9}, 3.5692358293003073`*^9, 3.5692358676919746`*^9, {3.569344570581538*^9, 3.5693446110324097`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "7.`", ",", "7.`", ",", "7.`", ",", "7.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output", CellChangeTimes->{ 3.582562829394026*^9, 3.5825635752001357`*^9, 3.582563667817498*^9, 3.5825637931481185`*^9, 3.5825638473270135`*^9, 3.58256391930554*^9, 3.5825640737302113`*^9, 3.5825641397807274`*^9, 3.5825642907577925`*^9, { 3.582564413327208*^9, 3.5825644380844517`*^9}, 3.582564523323001*^9, 3.5825646252847805`*^9, 3.582564710148929*^9, 3.5825647988974853`*^9, 3.582599444866706*^9, 3.5825995624909124`*^9, {3.582599598199375*^9, 3.5825996188538113`*^9}, {3.582599725854399*^9, 3.58259975502645*^9}, 3.5825999681072245`*^9, 3.5826000392121496`*^9, 3.5826003649875216`*^9, 3.5826007524610023`*^9, 3.582601399035338*^9, 3.5826017139998913`*^9, { 3.5826017556987643`*^9, 3.582601779208006*^9}, {3.5826019538659124`*^9, 3.582601976688752*^9}, 3.5826034530909452`*^9, 3.5826081995243483`*^9, 3.5826082914397097`*^9, 3.5826108880648704`*^9, 3.5826109560341897`*^9, { 3.5826110030838723`*^9, 3.5826110771528025`*^9}, 3.5826111119408636`*^9, { 3.582611156572542*^9, 3.5826112965827875`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"bc", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "\"\\""}], ",", " ", RowBox[{"bc", "=", RowBox[{"bc", "+", "1"}]}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "bc", "\[IndentingNewLine]", RowBox[{"bh", "=", RowBox[{"n", "-", "bc"}]}]}], "Input", CellChangeTimes->{{3.5688281182607965`*^9, 3.5688281434392405`*^9}, { 3.5691376772313223`*^9, 3.569137733516221*^9}, {3.569234042049968*^9, 3.569234051519184*^9}, 3.5692372799312553`*^9}], Cell[BoxData["24"], "Output", CellChangeTimes->{ 3.582562829409626*^9, 3.582563575215736*^9, 3.5825636678330984`*^9, 3.5825637931481185`*^9, 3.5825638473426137`*^9, 3.5825639193211403`*^9, 3.5825640737458115`*^9, 3.5825641397807274`*^9, 3.5825642907733927`*^9, { 3.582564413342808*^9, 3.5825644381000514`*^9}, 3.582564523338601*^9, 3.5825646252847805`*^9, 3.582564710164529*^9, 3.5825647988974853`*^9, 3.5825994448823056`*^9, 3.5825995625065126`*^9, {3.5825995982149754`*^9, 3.5825996188694115`*^9}, {3.582599725869999*^9, 3.5825997550420504`*^9}, 3.5825999681228247`*^9, 3.5826000392121496`*^9, 3.582600365003122*^9, 3.5826007524766026`*^9, 3.5826013990509377`*^9, 3.5826017140154915`*^9, { 3.582601755714364*^9, 3.5826017792236056`*^9}, {3.5826019538815126`*^9, 3.5826019767043524`*^9}, 3.5826034531065454`*^9, 3.5826081995399485`*^9, 3.58260829145531*^9, 3.58261088808047*^9, 3.5826109560497894`*^9, { 3.5826110030838723`*^9, 3.5826110771684027`*^9}, 3.582611111956464*^9, { 3.582611156588142*^9, 3.5826112965983877`*^9}}], Cell[BoxData["14"], "Output", CellChangeTimes->{ 3.582562829409626*^9, 3.582563575215736*^9, 3.5825636678330984`*^9, 3.5825637931481185`*^9, 3.5825638473426137`*^9, 3.5825639193211403`*^9, 3.5825640737458115`*^9, 3.5825641397807274`*^9, 3.5825642907733927`*^9, { 3.582564413342808*^9, 3.5825644381000514`*^9}, 3.582564523338601*^9, 3.5825646252847805`*^9, 3.582564710164529*^9, 3.5825647988974853`*^9, 3.5825994448823056`*^9, 3.5825995625065126`*^9, {3.5825995982149754`*^9, 3.5825996188694115`*^9}, {3.582599725869999*^9, 3.5825997550420504`*^9}, 3.5825999681228247`*^9, 3.5826000392121496`*^9, 3.582600365003122*^9, 3.5826007524766026`*^9, 3.5826013990509377`*^9, 3.5826017140154915`*^9, { 3.582601755714364*^9, 3.5826017792236056`*^9}, {3.5826019538815126`*^9, 3.5826019767043524`*^9}, 3.5826034531065454`*^9, 3.5826081995399485`*^9, 3.58260829145531*^9, 3.58261088808047*^9, 3.5826109560497894`*^9, { 3.5826110030838723`*^9, 3.5826110771684027`*^9}, 3.582611111956464*^9, { 3.582611156588142*^9, 3.5826112965983877`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"t", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t1", "[", RowBox[{"[", RowBox[{"num", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot1o", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.8", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "White", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Green", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Orange", "]"}], ",", RowBox[{"Darker", "[", "Brown", "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"u1", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"Text", "[", RowBox[{"i", ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "-", "0.6"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "}"}], " ", ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{"Plot1o", ",", "Plot2", ",", RowBox[{"{", RowBox[{ RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ",", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.567869377256353*^9, 3.567869394073182*^9}, { 3.5678694248832364`*^9, 3.5678694526200852`*^9}, {3.5678694891241493`*^9, 3.5678694955045605`*^9}, {3.567869596046737*^9, 3.567869602645549*^9}, 3.56786971175214*^9, {3.5678697908910794`*^9, 3.567869798800293*^9}, { 3.5679434548425727`*^9, 3.5679434621121855`*^9}, 3.568011875875622*^9, 3.56811435956207*^9, {3.5682782821071444`*^9, 3.5682782839479475`*^9}, { 3.5688205455482616`*^9, 3.5688206262784038`*^9}, 3.5688208026055136`*^9, 3.5688732159559383`*^9, 3.568910867631465*^9, {3.5689830694736805`*^9, 3.568983072687286*^9}, {3.5725833074418383`*^9, 3.5725833223398647`*^9}, { 3.572583642982828*^9, 3.572583671421678*^9}, {3.572584036290719*^9, 3.5725840766323895`*^9}, {3.572584986320788*^9, 3.572585000719613*^9}, { 3.572585104865396*^9, 3.5725851158790154`*^9}, 3.5726667135591345`*^9, { 3.5727958552609696`*^9, 3.5727958810478153`*^9}, {3.5727959717619743`*^9, 3.5727959736963778`*^9}, {3.572796004615632*^9, 3.572796064270137*^9}, { 3.5744827068053503`*^9, 3.5744827177409697`*^9}}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-5.049725817200001, -0.91402267168, -2.5171150319999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.5039729483999995`, -3.4179474162, 0.8334447550399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.22233146858, 4.123382132, -3.7660349453999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.7568182872, 0.98713617062, -4.3059296636}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.2769308574, 4.528350413799999, -6.114208473}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-6.8062261342, -4.0861545298, -0.33310200201999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{0.068872953796, 5.500047523, -5.7339956018}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-3.5763064549999997`, -4.5270276056, 3.0061761208}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.6592654263999997`, 4.514555414, -2.9160361906}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-1.2626582214199997`, -3.8586315194, 4.1126106938}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.521839347, -2.296961953, 4.674237261}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.2753591016, 0.6256504840799999, 2.3041429118}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.8012268482, -1.0379886972799999`, 4.2900559652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-0.35109219354, -4.8598083542, 6.5325938094}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.3990331804, 3.4187033066, -0.136744352812}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.9895035328, -3.8988826831999996`, 6.881248256399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.7193417374, 1.86757841128, 1.8664445756799999`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.47241260273999996`, -2.281844145, 3.200250981}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{3.6643676866, 1.4056726851, 0.5243989649999999}, 0.24]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-6.2432767587999995`, 1.28516485808, -5.6723905342}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-0.24194161978, 1.18512276364, -1.53041349836}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.7222193256, -2.5987511952, -3.6539741936}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-3.6331872076, 5.1765264318, -7.494653316}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.0821691294, -5.5542826592, 0.28453604382}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.90209850062, 7.057181747, -6.757093258199999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.7787391088, 5.958872995799999, -3.824805424}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.35412095982, -6.117043062, 7.7888836542}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.8095246668, 4.6271830836, -0.9830354652}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{3.2261402271999997`, -4.2413010344, 8.4684291238}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.435779863199999, 1.59507992208, 2.9366342039999997`}, 0.12]}, Text3DBox["1", {-5.6497258172, -0.91402267168, -2.5171150319999995`}, {1, 0}], Text3DBox["2", {-3.2272860577999998`, 2.5212724291999997`, -4.403250552599999}, {1, 0}], Text3DBox["3", {-5.103972948399999, -3.4179474162, 0.8334447550399999}, {1, 0}], Text3DBox["4", {0.62233146858, 4.123382132, -3.7660349453999995`}, {1, 0}], Text3DBox["5", {-5.356818287199999, 0.98713617062, -4.3059296636}, {1, 0}], Text3DBox[ "6", {-7.735983321199999, -2.5583110587999998`, -2.370661267}, {1, 0}], Text3DBox["7", {-2.8769308574, 4.528350413799999, -6.114208473}, {1, 0}], Text3DBox["8", {-7.4062261342, -4.0861545298, -0.33310200201999995`}, {1, 0}], Text3DBox["9", {-0.531127046204, 5.500047523, -5.7339956018}, {1, 0}], Text3DBox["10", {-4.176306455, -4.5270276056, 3.0061761208}, {1, 0}], Text3DBox["11", {3.0592654263999997`, 4.514555414, -2.9160361906}, {1, 0}], Text3DBox["12", {-1.8626582214199998`, -3.8586315194, 4.1126106938}, {1, 0}], Text3DBox["13", {4.1570072598, 3.1382679681999996`, -0.9369072535399999}, { 1, 0}], Text3DBox["14", {1.9218393469999997`, -2.296961953, 4.674237261}, {1, 0}], Text3DBox["15", {4.675359101600001, 0.6256504840799999, 2.3041429118}, {1, 0}], Text3DBox["16", {4.2012268482, -1.0379886972799999`, 4.2900559652}, { 1, 0}], Text3DBox["17", {-0.95109219354, -4.8598083542, 6.5325938094}, {1, 0}], Text3DBox["18", {6.7990331804, 3.4187033066, -0.136744352812}, {1, 0}], Text3DBox["19", {1.3895035328, -3.8988826831999996`, 6.881248256399999}, {1, 0}], Text3DBox["20", {7.1193417374, 1.86757841128, 1.8664445756799999`}, {1, 0}], Text3DBox[ "21", {-4.0160576902, -1.5166562930799998`, -0.5838308476999999}, {1, 0}], Text3DBox["22", {-1.0944468078999998`, 2.349874281, -2.9232171493999997`}, {1, 0}], Text3DBox["23", {-0.12758739726, -2.281844145, 3.200250981}, {1, 0}], Text3DBox["24", {3.0643676866, 1.4056726851, 0.5243989649999999}, {1, 0}], Text3DBox["25", {-6.843276758799999, 1.28516485808, -5.6723905342}, {1, 0}], Text3DBox[ "26", {-2.38480841248, -0.74092377008, -0.27217723577999997`}, {1, 0}], Text3DBox["27", {-0.84194161978, 1.18512276364, -1.53041349836}, {1, 0}], Text3DBox["28", {-9.322219325599999, -2.5987511952, -3.6539741936}, {1, 0}], Text3DBox["29", {-4.2331872075999994`, 5.1765264318, -7.494653316}, { 1, 0}], Text3DBox["30", {-8.6821691294, -5.5542826592, 0.28453604382}, {1, 0}], Text3DBox["31", {0.30209850062, 7.057181747, -6.757093258199999}, { 1, 0}], Text3DBox["32", {-5.291244794999999, -5.9841953242, 3.9002054913999995`}, {1, 0}], Text3DBox["33", {4.1787391088, 5.958872995799999, -3.824805424}, {1, 0}], Text3DBox["34", {5.7073384702, -1.3744733088399999`, 5.625525329399999}, { 1, 0}], Text3DBox["35", {-1.95412095982, -6.117043062, 7.7888836542}, {1, 0}], Text3DBox["36", {8.2095246668, 4.6271830836, -0.9830354652}, {1, 0}], Text3DBox["37", {2.6261402271999996`, -4.2413010344, 8.4684291238}, {1, 0}], Text3DBox["38", {8.835779863199999, 1.59507992208, 2.9366342039999997`}, {1, 0}]}, AspectRatio->Automatic, AutomaticImageSize->True, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->True, ImageSize->{360., 360.}, SphericalRegion->True, ViewPoint->{ 0.49177599642470665`, -2.8088281002524895`, -1.8217137735035318`}, ViewVertical->{0.4087746726098577, -1.1993554321376567`, 0.38040566298175005`}]], "Output", CellChangeTimes->{ 3.5825628295968266`*^9, 3.582563575262536*^9, 3.5825636678798985`*^9, 3.582563793210519*^9, 3.582563847389414*^9, 3.58256391938354*^9, 3.5825640737926116`*^9, 3.5825641398431273`*^9, 3.582564290820193*^9, { 3.582564413405208*^9, 3.5825644381468515`*^9}, 3.582564523401001*^9, 3.5825646253471804`*^9, 3.5825647102113295`*^9, 3.582564798959885*^9, 3.5825994449603057`*^9, 3.5825995625689125`*^9, {3.582599598277375*^9, 3.582599618916211*^9}, {3.5825997259323993`*^9, 3.58259975510445*^9}, 3.582599968169625*^9, 3.5826000392745495`*^9, 3.582600365049922*^9, 3.582600752523402*^9, 3.582601399113338*^9, 3.582601714062291*^9, { 3.5826017557767644`*^9, 3.582601779270406*^9}, {3.5826019539283123`*^9, 3.582601976751153*^9}, 3.582603453153346*^9, 3.5826081996023483`*^9, 3.5826082914865093`*^9, 3.5826108881272707`*^9, 3.58261095608099*^9, { 3.5826110031306725`*^9, 3.5826110772152023`*^9}, 3.5826111119876633`*^9, { 3.582611156619342*^9, 3.582611296629588*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.567869377256353*^9, 3.567869394073182*^9}, { 3.5678694248832364`*^9, 3.5678694526200852`*^9}, {3.5678694891241493`*^9, 3.5678694955045605`*^9}, {3.567869596046737*^9, 3.567869602645549*^9}, 3.56786971175214*^9, {3.5678697908910794`*^9, 3.567869798800293*^9}, { 3.5679434548425727`*^9, 3.5679434621121855`*^9}, 3.568011875875622*^9, 3.56811435956207*^9, {3.5682782821071444`*^9, 3.5682782839479475`*^9}, { 3.5688205455482616`*^9, 3.5688206262784038`*^9}, 3.5688208026055136`*^9, 3.5688732159559383`*^9, 3.568910867631465*^9, {3.5689830694736805`*^9, 3.568983072687286*^9}, {3.5725833074418383`*^9, 3.5725833223398647`*^9}, { 3.572583642982828*^9, 3.572583671421678*^9}, {3.572584036290719*^9, 3.5725840766323895`*^9}, {3.572584986320788*^9, 3.572585000719613*^9}, { 3.572585104865396*^9, 3.5725851158790154`*^9}, 3.5726667135591345`*^9, { 3.5727958552609696`*^9, 3.5727958810478153`*^9}, {3.5727959717619743`*^9, 3.5727959736963778`*^9}, {3.572796004615632*^9, 3.572796064270137*^9}, { 3.5744827068053503`*^9, 3.5744827177409697`*^9}, 3.5818289943486547`*^9, 3.5825627541706934`*^9}], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {500.52000000000004`, 135.28}], LineBox[{{516.5294093116879, 148.08139504453854`}, {542.2900000000001, 168.68}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {584.0600000000001, 202.07999999999998`}], LineBox[{{542.2900000000001, 168.68}, {568.0505906883121, 189.27860495546145`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {500.52000000000004`, 135.28}], LineBox[{{484.4443948466588, 147.99816891495638`}, {460.42, 167.005}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {420.32, 198.73000000000002`}], LineBox[{{460.42, 167.005}, {436.39560515334125`, 186.0118310850436}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {500.52000000000004`, 135.28}], LineBox[{{500.57289844846093`, 114.7818512213994}, {500.6, 104.28}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {500.68, 73.28}], LineBox[{{500.6, 104.28}, {500.6271015515391, 93.7781487786006}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {654.04, -1.67}], LineBox[{{665.8825931483007, 15.06110543626202}, {682.42, 38.425}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {710.8, 78.52}], LineBox[{{682.42, 38.425}, {698.9574068516993, 61.788894563737976`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {654.04, -1.67}], LineBox[{{667.0168360893947, -17.5375337310017}, {684.095, -38.42}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {714.15, -75.17}], LineBox[{{684.095, -38.42}, {701.1731639106052, -59.30246626899827}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {654.04, -1.67}], LineBox[{{633.5542273993797, -2.3841586316549375`}, {623.06, -2.75}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {592.0799999999999, -3.83}], LineBox[{{623.06, -2.75}, {612.5657726006202, -3.1158413683450625`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {353.52000000000004`, -1.67}], LineBox[{{{337.50025848467186`, 11.981269304631148`}, {321.303, 33.912499999999994`}}, {{345.18425848467183`, 17.65626930463116}, { 328.98699999999997`, 39.587500000000006`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {296.77, 75.17}], LineBox[{{{321.303, 33.912499999999994`}, {305.1057415153282, 55.843730695368826`}}, {{328.98699999999997`, 39.587500000000006`}, { 312.78974151532816`, 61.51873069536884}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {353.52000000000004`, -1.67}], LineBox[{{341.3432838936296, -18.15952656871486}, {325.145, -40.095}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {296.77, -78.52}], LineBox[{{325.145, -40.095}, { 308.94671610637045`, -62.03047343128513}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {503.87000000000006`, -138.62}], LineBox[{{520.2717638416568, -150.91467545232558`}, { 543.965, -168.675}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {584.0600000000001, -198.73000000000002`}], LineBox[{{543.965, -168.675}, { 567.6582361583434, -186.43532454767447`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {503.87000000000006`, -138.62}], LineBox[{{{490.96837016727517`, -155.34940161078205`}, { 466.94300000000004`, -174.35999999999999`}}, {{ 484.62237016727516`, -147.32940161078207`}, { 460.59700000000004`, -166.34}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {423.67, -202.07999999999998`}], LineBox[{{{466.94300000000004`, -174.35999999999999`}, { 442.9176298327249, -193.37059838921792`}}, {{ 460.59700000000004`, -166.34}, { 436.5716298327249, -185.35059838921794`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {584.0600000000001, 202.07999999999998`}], LineBox[{{{605.1379227155236, 200.82293721560524`}, {633.952, 191.8485}}, {{602.1239227155237, 191.14593721560522`}, { 630.9380000000001, 182.17149999999998`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {680.83, 171.94}], LineBox[{{{633.952, 191.8485}, {662.7660772844764, 182.87406278439477`}}, {{630.9380000000001, 182.17149999999998`}, { 659.7520772844765, 173.19706278439475`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {584.0600000000001, 202.07999999999998`}], LineBox[{{577.1445100166767, 221.3764478566924}, {567.3199999999999, 248.79}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {550.5799999999999, 295.5}], LineBox[{{567.3199999999999, 248.79}, {557.4954899833232, 276.20355214330755`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {710.8, 78.52}], LineBox[{{704.5383146313891, 98.0384066444989}, {695.815, 125.22999999999999`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {680.83, 171.94}], LineBox[{{695.815, 125.22999999999999`}, {687.0916853686109, 152.4215933555011}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {710.8, 78.52}], LineBox[{{{731.8969788793468, 77.90582880245844}, {760.6044999999999, 69.97149999999999}}, {{729.2179788793467, 68.21282880245846}, { 757.9254999999998, 60.2785}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {807.7299999999999, 51.73}], LineBox[{{{760.6044999999999, 69.97149999999999}, {789.3120211206532, 62.037171197541525`}}, {{757.9254999999998, 60.2785}, { 786.6330211206531, 52.34417119754153}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {420.32, 198.73000000000002`}], LineBox[{{426.41556278439475`, 218.3009227155236}, {435.39, 247.115}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {450.46, 295.5}], LineBox[{{435.39, 247.115}, {444.3644372156052, 275.9290772844764}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {420.32, 198.73000000000002`}], LineBox[{{{401.9044862773214, 188.42241734569492`}, {373.2795, 180.497}}, {{399.2254862773214, 198.0984173456949}, {370.6005, 190.173}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {323.56, 171.94}], LineBox[{{{373.2795, 180.497}, {344.6545137226786, 172.5715826543051}}, {{370.6005, 190.173}, {341.9755137226786, 182.2475826543051}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {714.15, -75.17}], LineBox[{{{732.517083626824, -64.84941659155142}, { 759.6004999999999, -57.09600000000001}}, {{ 735.1960836268241, -74.20741659155142}, { 762.2795, -66.45400000000001}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {807.7299999999999, -48.38}], LineBox[{{{759.6004999999999, -57.09600000000001}, { 786.6839163731757, -49.34258340844859}}, {{ 762.2795, -66.45400000000001}, { 789.3629163731758, -58.70058340844859}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {714.15, -75.17}], LineBox[{{708.085801426771, -94.75066386157381}, {699.165, -123.555}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {684.1800000000001, -171.94}], LineBox[{{699.165, -123.555}, { 690.244198573229, -152.35933613842616`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {680.83, 171.94}], LineBox[{{695.2614747287247, 186.49710956026908`}, {702.655, 193.95499999999998`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {724.48, 215.97}], LineBox[{{702.655, 193.95499999999998`}, {710.0485252712754, 201.41289043973094`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {550.5799999999999, 295.5}], LineBox[{{{530.0817829654504, 290.494}, {500.52, 290.494}}, {{ 530.0817829654504, 300.506}, {500.52, 300.506}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {450.46, 295.5}], LineBox[{{{500.52, 290.494}, {470.9582170345495, 290.494}}, {{500.52, 300.506}, {470.9582170345495, 300.506}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {550.5799999999999, 295.5}], LineBox[{{562.3770801401002, 312.2632276654452}, {568.42, 320.85}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {586.26, 346.20000000000005`}], LineBox[{{568.42, 320.85}, {574.4629198598997, 329.43677233455486`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {807.7299999999999, 51.73}], LineBox[{{807.7299999999999, 31.231782965450506`}, {807.7299999999999, 1.6749999999999972`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {807.7299999999999, -48.38}], LineBox[{{807.7299999999999, 1.6749999999999972`}, { 807.7299999999999, -27.881782965450512`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {807.7299999999999, 51.73}], LineBox[{{824.0416838692762, 64.14393857501666}, {832.4, 70.505}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {857.07, 89.28}], LineBox[{{832.4, 70.505}, {840.7583161307238, 76.86606142498333}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {450.46, 295.5}], LineBox[{{438.3091634201036, 312.0086059982103}, {432.08500000000004`, 320.46500000000003`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {413.71000000000004`, 345.43}], LineBox[{{432.08500000000004`, 320.46500000000003`}, {425.8608365798965, 328.9213940017897}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {807.7299999999999, -48.38}], LineBox[{{824.0971810892753, -60.72067602631083}, { 832.4849999999999, -67.045}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {857.24, -85.71}], LineBox[{{832.4849999999999, -67.045}, { 840.8728189107246, -73.36932397368922}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {323.56, 171.94}], LineBox[{{318.0909423232532, 152.18484093397595`}, {310.16499999999996`, 123.555}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {296.77, 75.17}], LineBox[{{310.16499999999996`, 123.555}, {302.2390576767467, 94.92515906602405}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {323.56, 171.94}], LineBox[{{309.06557173263644`, 186.43442826736356`}, {301.64, 193.86}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {279.72, 215.78}], LineBox[{{301.64, 193.86}, {294.2144282673636, 201.28557173263644`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {684.1800000000001, -171.94}], LineBox[{{{665.7179108869622, -182.24448753833687`}, { 635.4595000000002, -190.341}}, {{ 663.0389108869621, -172.23248753833687`}, { 632.7805000000001, -180.329}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {584.0600000000001, -198.73000000000002`}], LineBox[{{{635.4595000000002, -190.341}, { 605.201089113038, -198.43751246166315`}}, {{ 632.7805000000001, -180.329}, { 602.522089113038, -188.42551246166315`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {684.1800000000001, -171.94}], LineBox[{{698.389012391438, -186.71433140468494`}, { 705.6700000000001, -194.28500000000003`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {727.1600000000001, -216.63000000000002`}], LineBox[{{705.6700000000001, -194.28500000000003`}, { 712.9509876085622, -201.85566859531508`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {296.77, 75.17}], LineBox[{{277.0148409339759, 69.70094232325324}, {248.385, 61.775000000000006`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {200., 48.38}], LineBox[{{248.385, 61.775000000000006`}, {219.75515906602405`, 53.84905767674677}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {584.0600000000001, -198.73000000000002`}], LineBox[{{577.9662808725001, -218.30149684593994`}, { 568.995, -247.115}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {553.93, -295.5}], LineBox[{{568.995, -247.115}, { 560.0237191274999, -275.9285031540601}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {296.77, -78.52}], LineBox[{{{307.7329723554566, -96.52216436929152}, { 316.50600000000003`, -123.72349999999999`}}, {{ 298.3909723554566, -99.53516436929152}, { 307.16400000000004`, -126.73649999999999`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {326.90000000000003`, -171.94}], LineBox[{{{316.50600000000003`, -123.72349999999999`}, { 325.2790276445434, -150.92483563070846`}}, {{ 307.16400000000004`, -126.73649999999999`}, { 315.9370276445435, -153.9378356307085}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {296.77, -78.52}], LineBox[{{277.0148409339759, -73.05094232325324}, {248.385, -65.125}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {200., -51.73}], LineBox[{{248.385, -65.125}, { 219.75515906602405`, -57.19905767674676}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {423.67, -202.07999999999998`}], LineBox[{{404.09907728447644`, -195.98443721560523`}, { 375.285, -187.01}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {326.90000000000003`, -171.94}], LineBox[{{375.285, -187.01}, { 346.4709227155236, -178.03556278439476`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {423.67, -202.07999999999998`}], LineBox[{{429.9638637851435, -221.58805424048114`}, {438.74, -248.79}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {453.81, -295.5}], LineBox[{{438.74, -248.79}, { 447.51613621485654`, -275.99194575951884`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {326.90000000000003`, -171.94}], LineBox[{{312.48015991639704`, -186.50863458114077`}, { 305.095, -193.97}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {283.29, -216.}], LineBox[{{305.095, -193.97}, { 297.709840083603, -201.43136541885923`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {200., 48.38}], LineBox[{{{205.0055, 27.881782965450512`}, { 205.0055, -1.6749999999999972`}}, {{194.9945, 27.881782965450512`}, { 194.9945, -1.6749999999999972`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {200., -51.73}], LineBox[{{{205.0055, -1.6749999999999972`}, { 205.0055, -31.231782965450506`}}, {{194.9945, -1.6749999999999972`}, { 194.9945, -31.231782965450506`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {200., 48.38}], LineBox[{{183.6867228890489, 60.79184480634584}, {175.32999999999998`, 67.15}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {150.66, 85.92}], LineBox[{{175.32999999999998`, 67.15}, {166.97327711095107`, 73.50815519365416}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {553.93, -295.5}], LineBox[{{{533.4317829654505, -300.506}, {503.87, -300.506}}, {{ 533.4317829654505, -290.494}, {503.87, -290.494}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {453.81, -295.5}], LineBox[{{{503.87, -300.506}, {474.3082170345495, -300.506}}, {{ 503.87, -290.494}, {474.3082170345495, -290.494}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {553.93, -295.5}], LineBox[{{566.0808365798964, -312.0086059982103}, { 572.305, -320.46500000000003`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {590.68, -345.43}], LineBox[{{572.305, -320.46500000000003`}, { 578.5291634201035, -328.9213940017897}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {200., -51.73}], LineBox[{{183.6867228890489, -64.14184480634583}, { 175.32999999999998`, -70.5}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {150.66, -89.27000000000001}], LineBox[{{175.32999999999998`, -70.5}, { 166.97327711095107`, -76.85815519365417}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {453.81, -295.5}], LineBox[{{441.7429162569861, -312.0699243068454}, {435.56, -320.56}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0415179003845522], FontWeight->Plain], {417.31, -345.62}], LineBox[{{435.56, -320.56}, { 429.3770837430139, -329.0500756931546}}]}}}, {}, {}}, ImageSize->{{0., 240.8599641931979}, {0., 240.6934158805998}}, PlotRange->{{130.66, 877.24}, {-376.616434069099, 369.4473255518243}}]], "Output", CellChangeTimes->{ 3.582562829706026*^9, 3.582563575371736*^9, 3.5825636679890985`*^9, 3.582563793397719*^9, 3.582563847561014*^9, 3.5825639195707407`*^9, 3.5825640739018116`*^9, 3.5825641399367275`*^9, 3.582564290929393*^9, { 3.582564413592408*^9, 3.5825644382560515`*^9}, 3.5825645235102015`*^9, 3.5825646254563804`*^9, 3.58256471055453*^9, 3.582564799069085*^9, 3.582599445085106*^9, 3.5825995626781125`*^9, {3.582599598386575*^9, 3.582599619041012*^9}, {3.5825997260415993`*^9, 3.5825997552136507`*^9}, 3.582599968356825*^9, 3.58260003946175*^9, 3.5826003652371225`*^9, 3.5826007526326027`*^9, 3.5826013992225385`*^9, 3.5826017141714916`*^9, { 3.582601755885965*^9, 3.5826017793796062`*^9}, {3.582601954053113*^9, 3.5826019768603525`*^9}, 3.582603453278146*^9, 3.5826081997739487`*^9, 3.58260829159571*^9, 3.5826108882364707`*^9, 3.58261095620579*^9, { 3.582611003239873*^9, 3.582611077324403*^9}, 3.582611112112464*^9, { 3.5826111567285423`*^9, 3.5826112967387877`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"(*", " ", RowBox[{"Distance", " ", "Matrix", " ", "Bohr"}], " ", "*)"}], "Text"], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"dc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"t", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Prepend", "[", RowBox[{"dc", ",", "num1"}], "]"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.5678630319943895`*^9, 3.5678630956269007`*^9}, { 3.5678632280087337`*^9, 3.567863228336334*^9}, {3.5678632621727934`*^9, 3.5678633509213495`*^9}, {3.5678644293824434`*^9, 3.567864451908883*^9}, { 3.567864923404111*^9, 3.56786494544695*^9}, {3.5678650143210707`*^9, 3.5678650845367947`*^9}, {3.567869231084096*^9, 3.5678692412397137`*^9}, 3.5678693168686466`*^9, {3.5678704450470285`*^9, 3.5678704621290584`*^9}, 3.5682783281584253`*^9, 3.5688732159715385`*^9, 3.568910867647065*^9, 3.5689997098549547`*^9, 3.5689998170427427`*^9, 3.5689998869620657`*^9, 3.5691460426137285`*^9, 3.569237204536323*^9, 3.5692374658523817`*^9, 3.56923802264856*^9, 3.5693403424181123`*^9, 3.5693404502143016`*^9, 3.569340738019207*^9, 3.569340852851009*^9, 3.5693411655067577`*^9, 3.5693414978029413`*^9, 3.5693426144373026`*^9, 3.5693435671777763`*^9, 3.569343662743544*^9, 3.569343763644521*^9, 3.569344071177861*^9, 3.569344266271804*^9, 3.570297558707776*^9, {3.5703416079688015`*^9, 3.570341617375618*^9}, {3.5705956885798426`*^9, 3.5705957106070814`*^9}, { 3.5705965150536942`*^9, 3.5705965239457097`*^9}, {3.5720162655168724`*^9, 3.5720163727202606`*^9}, {3.5720166425383344`*^9, 3.572016643427536*^9}, { 3.5723503054303513`*^9, 3.572350361964851*^9}, {3.575215689331786*^9, 3.575215690018187*^9}, {3.575215722871845*^9, 3.5752157627143145`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30", "31", "32", "33", "34", "35", "36", "37", "38"}, {"0.`", "4.607274033538823`", "4.2182622259115785`", "8.140881445048281`", "2.6267960619378927`", "2.660376548215811`", "7.088504631721318`", "4.232921780997537`", "8.81411767796873`", "6.762507998371231`", "10.270108402748502`", "8.183267406141153`", "10.728006790484915`", "10.533597101350574`", "11.498804292953846`", "11.974732271603207`", "10.93360017084407`", "13.394412251141418`", "12.115666371727864`", "13.784120778371985`", "2.601850604489405`", "5.618586040992854`", "8.065557788427299`", "9.516681119759292`", "4.027002996774351`", "3.9660300803543858`", "5.338050239935344`", "4.197376266254417`", "7.992324904749193`", "6.21103646295278`", "10.813959864602195`", "8.186401045006901`", "12.064222802112313`", "13.982042628761286`", "12.121985207214717`", "15.004572147111551`", "14.15072155357843`", "15.680205718423606`"}, {"4.607274033538823`", "0.`", "8.137521969395959`", "4.218098425745567`", "2.6263954255555135`", "7.089565475294576`", "2.660542765695153`", "8.81406491945972`", "4.232405564359804`", "10.270286107180983`", "6.760600060610706`", "10.727780585616133`", "8.180709453490943`", "11.494766635396624`", "10.53728191520397`", "11.976006094416627`", "13.388581102889836`", "10.933230757595844`", "13.77944306427044`", "12.115655145432605`", "5.613821865402494`", "2.601707029184523`", "9.512691321753575`", "8.069151095174883`", "4.026669463712449`", "5.330802882718793`", "3.9658992368671457`", "7.995265381180639`", "4.197497109832173`", "10.814142706853206`", "6.210604172157868`", "12.064422474682805`", "8.18540806500215`", "13.985016839574447`", "14.996318895277032`", "12.121607586402044`", "15.674027459985025`", "14.150946972369228`"}, {"4.2182622259115785`", "8.137521969395959`", "0.`", "10.526985662820993`", "6.773615104742451`", "4.234707625086262`", "10.787643443090014`", "2.666027346933842`", "11.982187872900269`", "2.6098631338163902`", "11.984225852204881`", "4.631765634407074`", "11.484069871678708`", "8.085192260715761`", "10.684052245828981`", "10.207796423156754`", "7.1976163743582`", "13.760908942101418`", "8.886645190059305`", "13.357143924151385`", "2.6090491904142614`", "7.965963574252312`", "5.626447858788822`", "9.491291214128829`", "8.214032847516236`", "3.972746073168461`", "6.703804290761918`", "6.21301969801118`", "11.999186056195507`", "4.203417294709158`", "14.020349739862905`", "4.003213769451074`", "13.992598004170357`", "12.001011509392029`", "8.098445229492262`", "15.661192288560645`", "10.896125329648024`", "14.96230454846677`"}, {"8.140881445048281`", "4.218098425745567`", "10.526985662820993`", "0.`", "6.7733121025873775`", "10.791363107754723`", "4.233527495010329`", "11.984959656850684`", "2.6643091579700764`", "11.988300850210042`", "2.6103949001039`", "11.487418021410528`", "4.633394690894053`", "10.683994281821684`", "8.093714777092533`", "10.215128082185743`", "13.756275933589972`", "7.198608649538811`", "13.353273955126056`", "8.88957920348046`", "7.965620524735369`", "2.608256042915759`", "9.493073347092222`", "5.635362336833467`", "8.2112712249475`", "6.70159711325166`", "3.9718342170231447`", "12.003904555550788`", "6.211905463262445`", "14.022769074877937`", "4.201923269803079`", "13.996597754207508`", "4.002563676403329`", "12.01187391917264`", "15.653132565499478`", "8.09718482762635`", "14.955443325957395`", "10.898569645696204`"}, {"2.6267960619378927`", "2.6263954255555135`", "6.773615104742451`", "6.7733121025873775`", "0.`", "4.68784450280605`", "4.686140441035247`", "6.761783099370199`", "6.759662502796485`", "9.233986210689128`", "9.230653035358804`", "10.322908544596622`", "10.319426173426317`", "12.016969477998275`", "12.019497265442448`", "13.013390275845365`", "13.079402653158557`", "13.078965929874634`", "13.947723403933278`", "13.947327745783161`", "4.681947807811712`", "4.68366946762444`", "9.714619697835905`", "9.717181725148073`", "2.0409789801027958`", "5.300018160632001`", "5.303470561484973`", "5.385911207080397`", "5.383446488532052`", "8.655662536273173`", "8.653149454290837`", "10.767748923320761`", "10.7645948574571`", "15.0541211089781`", "14.433718192599596`", "14.433891662611337`", "15.945169321104508`", "15.945349454933302`"}, {"2.660376548215811`", "7.089565475294576`", "4.234707625086262`", "10.791363107754723`", "4.68784450280605`", "0.`", "9.372582747393828`", "2.568013479824691`", "11.320738263199248`", "6.742219555031377`", "12.917440515516585`", "8.844184323365056`", "13.264610365243437`", "11.957108233821286`", "13.639385101706738`", "13.754036526005395`", "11.428017692074828`", "15.873934301409887`", "13.06405268023108`", "16.06929513451374`", "4.256248852975322`", "8.27681149903147`", "9.433937977576983`", "11.863478526996111`", "5.144963389964366`", "6.028399844917461`", "7.889684662685208`", "2.040752835074739`", "9.917287236823272`", "4.113536942027893`", "13.278149226683945`", "7.55229762145322`", "14.717933619676876`", "15.686407258827863`", "12.219282255616461`", "17.544687413335627`", "15.089464542859325`", "17.889700302028192`"}, {"7.088504631721318`", "2.660542765695153`", "10.787643443090014`", "4.233527495010329`", "4.686140441035247`", "9.372582747393828`", "0.`", "11.320132647480703`", "2.567401920244562`", "12.917804115123257`", "6.742916473584115`", "13.26491783609491`", "8.843814932436473`", "13.638315355442291`", "11.963978870100565`", "13.75983888368162`", "15.867828697793255`", "11.427408895784342`", "16.065572373331772`", "13.065067796316603`", "8.271927992061341`", "4.255047975662746`", "11.861567953299163`", "9.44040535687554`", "5.142504783607779`", "7.8826876065433735`", "6.027398168991202`", "9.919177057239029`", "2.0408800558419538`", "13.277959650148851`", "4.112726154021052`", "14.718390426035086`", "7.554484750816507`", "15.695679581991628`", "17.534878130716717`", "12.216718070851098`", "17.884180080861462`", "15.090043782768092`"}, {"4.232921780997537`", "8.81406491945972`", "2.666027346933842`", "11.984959656850684`", "6.761783099370199`", "2.568013479824691`", "11.320132647480703`", "0.`", "12.974278744616786`", "4.6666399673204975`", "13.79022386203014`", "7.10966056135176`", "13.647901953615012`", "10.737199923323255`", "13.233324186847183`", "12.860710294188216`", "9.455425606857661`", "16.06707315182224`", "11.377468117759664`", "15.851721139158077`", "4.261270728463118`", "9.379217536342948`", "8.289674368164107`", "11.854484764296238`", "7.594470751523617`", "6.0339801622910505`", "8.503513997745772`", "4.112370448060304`", "12.130674006372221`", "2.0408104975730956`", "14.995328462994628`", "5.098685836195121`", "15.725965485738753`", "14.656876589254106`", "9.990826295285393`", "17.8940308189794`", "13.346887105464635`", "17.514861077775176`"}, {"8.81411767796873`", "4.232405564359804`", "11.982187872900269`", "2.6643091579700764`", "6.759662502796485`", "11.320738263199248`", "2.567401920244562`", "12.974278744616786`", "0.`", "13.792032855871383`", "4.6693691273450835`", "13.649670480629876`", "7.111164641436362`", "13.234111689920557`", "10.746111634639139`", "12.869448349383475`", "16.06151301416826`", "9.454758814434488`", "15.84844119918034`", "11.379419815963876`", "9.37566376479169`", "4.259271782477161`", "11.855017679574804`", "8.298131731938323`", "7.5902743730133295`", "8.498077262070574`", "6.0320215416099305`", "12.132614442128467`", "4.112156480682439`", "14.995346811209785`", "2.04099500684431`", "15.727822018960003`", "5.1027803350281795`", "14.670248956753762`", "17.88434982633249`", "9.986616389807466`", "17.50917120936343`", "13.347941348496501`"}, {"6.762507998371231`", "10.270286107180983`", "2.6098631338163902`", "11.988300850210042`", "9.233986210689128`", "6.742219555031377`", "12.917804115123257`", "4.6666399673204975`", "13.792032855871383`", "0.`", "13.006779870995093`", "2.6502677112180617`", "11.989527938996938`", "6.70395428122849`", "10.26620305898466`", "9.165413477026146`", "4.790445884616036`", "13.909373420284695`", "6.810946404130242`", "13.030028480111964`", "4.687874266631078`", "9.588917717607083`", "4.633642177771231`", "9.68418879489436`", "10.780159137113309`", "5.3189893984`", "8.020429917892844`", "8.634597350028214`", "14.29788848877776`", "5.3633362839114955`", "15.797830428204566`", "2.041008029780215`", "15.047365439206066`", "10.699814291755025`", "5.508225565154389`", "15.90981442374139`", "8.72875296972288`", "14.38052248741178`"}, {"10.270108402748502`", "6.760600060610706`", "11.984225852204881`", "2.6103949001039`", "9.230653035358804`", "12.917440515516585`", "6.742916473584115`", "13.79022386203014`", "4.6693691273450835`", "13.006779870995093`", "0.`", "11.989056211487878`", "2.648802675884206`", "10.261713209650017`", "6.7071312930425915`", "9.16856510880912`", "13.901016983489075`", "4.786566390926405`", "13.02155243940457`", "6.809025567870196`", "9.58513920719801`", "4.6839322474934395`", "9.682770608184613`", "4.63700031431962`", "10.774358187837151`", "8.015484488816487`", "5.3126724382083`", "14.298421174268453`", "8.636075835039135`", "15.795140018378959`", "5.368485589292391`", "15.047123934094353`", "2.040866512601262`", "10.707531150721879`", "15.898435083240562`", "5.502212922059818`", "14.36866973933031`", "8.726122101730393`"}, {"8.183267406141153`", "10.727780585616133`", "4.631765634407074`", "11.487418021410528`", "10.322908544596622`", "8.844184323365056`", "13.26491783609491`", "7.10966056135176`", "13.649670480629876`", "2.6502677112180617`", "11.989056211487878`", "0.`", "10.520960338575444`", "4.132391327183536`", "8.13172867976891`", "6.690158061800905`", "2.773017482367205`", "12.084763896007312`", "4.2712445709462985`", "10.88627877930062`", "5.6726131884313675`", "9.414805706365437`", "2.5157761097639444`", "8.053803229935193`", "12.124827884132259`", "5.40547015712643`", "7.637083322961121`", "10.842148823526243`", "14.899062543349851`", "8.002194532613085`", "15.556079677626236`", "4.03959692925117`", "13.995872649987673`", "8.109550087448937`", "4.31552673582643`", "14.121739531232377`", "6.266490378606778`", "12.065755949874827`"}, {"10.728006790484915`", "8.180709453490943`", "11.484069871678708`", "4.633394690894053`", "10.319426173426317`", "13.264610365243437`", "8.843814932436473`", "13.647901953615012`", "7.111164641436362`", "11.989527938996938`", "2.648802675884206`", "10.520960338575444`", "0.`", "8.125431844386537`", "4.13356280073902`", "6.690606818370454`", "12.077058872648161`", "2.774744242600973`", "10.876769821369923`", "4.271868324941012`", "9.412330928284055`", "5.6696350353061575`", "8.053039485348783`", "2.5161803425602707`", "12.118788781392857`", "7.634484057808967`", "5.3996773749354885`", "14.899174171025049`", "10.842227362721014`", "15.553032196056451`", "8.005796142552676`", "13.995944524021192`", "4.036860269804935`", "8.113808113399866`", "14.111913312799782`", "4.317625894726818`", "12.052466341232877`", "6.267109847712514`"}, {"10.533597101350574`", "11.494766635396624`", "8.085192260715761`", "10.683994281821684`", "12.016969477998275`", "11.957108233821286`", "13.638315355442291`", "10.737199923323255`", "13.234111689920557`", "6.70395428122849`", "10.261713209650017`", "4.132391327183536`", "8.125431844386537`", "0.`", "4.662711841885248`", "2.6321505099989175`", "4.274974429602414`", "8.921961283080668`", "2.7785659932312154`", "7.227802384381271`", "7.969615949531051`", "9.40278589950676`", "2.5244829335598817`", "5.677678412255774`", "14.025391244853667`", "6.740584998714461`", "7.6328952732118545`", "13.995679269407026`", "15.550539489052174`", "11.92998787621823`", "14.859302884350761`", "8.13777598325322`", "12.06176329555892`", "4.0107278515791025`", "6.2703357273798845`", "10.930851104434057`", "4.321155642307695`", "8.122181221976268`"}, {"11.498804292953846`", "10.53728191520397`", "10.684052245828981`", "8.093714777092533`", "12.019497265442448`", "13.639385101706738`", "11.963978870100565`", "13.233324186847183`", "10.746111634639139`", "10.26620305898466`", "6.7071312930425915`", "8.13172867976891`", "4.13356280073902`", "4.662711841885248`", "0.`", "2.6336946245027804`", "8.92339676560787`", "4.274232831854041`", "7.226212046182746`", "2.776151280801069`", "9.405880958836828`", "7.97426492816706`", "5.685492921526325`", "2.524126876656368`", "14.026368635864456`", "7.638777128692141`", "6.74221323783485`", "15.550824012142206`", "14.003180951078397`", "14.855771470999564`", "11.941356857514874`", "12.065267116767801`", "8.139649960512505`", "4.012113877766078`", "10.931436463359091`", "6.269619690976725`", "8.116953836377617`", "4.318441800409279`"}, {"11.974732271603207`", "11.976006094416627`", "10.207796423156754`", "10.215128082185743`", "13.013390275845365`", "13.754036526005395`", "13.75983888368162`", "12.860710294188216`", "12.869448349383475`", "9.165413477026146`", "9.16856510880912`", "6.690158061800905`", "6.690606818370454`", "2.6321505099989175`", "2.6336946245027804`", "0.`", "6.795709895262296`", "6.797592398240534`", "4.775435047303177`", "4.778243076312412`", "9.565963648125429`", "9.568337580652292`", "4.633949077202652`", "4.630777726063349`", "15.05418355873958`", "8.017361149780944`", "8.015836671261212`", "15.761573244904941`", "15.76828816316604`", "14.22754346001751`", "14.239890882900527`", "10.710927190727492`", "10.714828725483324`", "2.0408509339138186`", "8.713604023295469`", "8.715854286461568`", "5.495535464839376`", "5.4994438324973975`"}, {"10.93360017084407`", "13.388581102889836`", "7.1976163743582`", "13.756275933589972`", "13.079402653158557`", "11.428017692074828`", "15.867828697793255`", "9.455425606857661`", "16.06151301416826`", "4.790445884616036`", "13.901016983489075`", "2.773017482367205`", "12.077058872648161`", "4.274974429602414`", "8.92339676560787`", "6.795709895262296`", "0.`", "13.155921486225413`", "2.554080347749606`", "11.496198728160925`", "8.43884939429944`", "11.891696057935759`", "4.292850840572179`", "9.564443318412026`", "14.880866156183519`", "8.082429176372232`", "10.077955790346257`", "13.377380783139861`", "17.55744359338892`", "9.964440325001512`", "17.894158888943693`", "5.199099818142431`", "15.831448266767637`", "7.570008752284055`", "2.040825810947553`", "15.179084003854136`", "4.114195117045092`", "12.262926763131373`"}, {"13.394412251141418`", "10.933230757595844`", "13.760908942101418`", "7.198608649538811`", "13.078965929874634`", "15.873934301409887`", "11.427408895784342`", "16.06707315182224`", "9.454758814434488`", "13.909373420284695`", "4.786566390926405`", "12.084763896007312`", "2.774744242600973`", "8.921961283080668`", "4.274232831854041`", "6.797592398240534`", "13.155921486225413`", "0.`", "11.491836058234334`", "2.553693774868441`", "11.896379754000804`", "8.438830040816237`", "9.571303554515929`", "4.293847822217799`", "14.876423811992712`", "10.082846120314992`", "8.08181239736037`", "17.563469099137954`", "13.37679532397252`", "17.89859154436424`", "9.963819810878544`", "15.83939039951431`", "5.1884677445662994`", "7.574304674200735`", "15.177738484841925`", "2.0411071141740136`", "12.25306952014848`", "4.113343536824609`"}, {"12.115666371727864`", "13.77944306427044`", "8.886645190059305`", "13.353273955126056`", "13.947723403933278`", "13.06405268023108`", "16.065572373331772`", "11.377468117759664`", "15.84844119918034`", "6.810946404130242`", "13.02155243940457`", "4.2712445709462985`", "10.876769821369923`", "2.7785659932312154`", "7.226212046182746`", "4.775435047303177`", "2.554080347749606`", "11.491836058234334`", "0.`", "9.551511679373483`", "9.519585113851122`", "11.888839926007524`", "4.297222296506957`", "8.447071119779755`", "15.882281546580945`", "8.68272027819669`", "10.078815026031762`", "15.080525871210266`", "17.906542038767224`", "12.153005854958261`", "17.527753899788923`", "7.6070719069084465`", "14.818055457207844`", "5.156857696832651`", "4.113862203461132`", "13.455610137850616`", "2.040995773394865`", "10.05935566123804`"}, {"13.784120778371985`", "12.115655145432605`", "13.357143924151385`", "8.88957920348046`", "13.947327745783161`", "16.06929513451374`", "13.065067796316603`", "15.851721139158077`", "11.379419815963876`", "13.030028480111964`", "6.809025567870196`", "10.88627877930062`", "4.271868324941012`", "7.227802384381271`", "2.776151280801069`", "4.778243076312412`", "11.496198728160925`", "2.553693774868441`", "9.551511679373483`", "0.`", "11.89344418563475`", "9.52049321272521`", "8.456638159471046`", "4.29619108905606`", "15.87853757848426`", "10.084981752788467`", "8.682535527107143`", "17.90944035223592`", "15.081750700339194`", "17.529238489628593`", "12.156158640948156`", "14.825963453808729`", "7.601063199020878`", "5.160943779533414`", "13.459464700655364`", "4.113812498208811`", "10.054524745940526`", "2.0410098252776234`"}, {"2.601850604489405`", "5.613821865402494`", "2.6090491904142614`", "7.965620524735369`", "4.681947807811712`", "4.256248852975322`", "8.271927992061341`", "4.261270728463118`", "9.37566376479169`", "4.687874266631078`", "9.58513920719801`", "5.6726131884313675`", "9.412330928284055`", "7.969615949531051`", "9.405880958836828`", "9.565963648125429`", "8.43884939429944`", "11.896379754000804`", "9.519585113851122`", "11.89344418563475`", "0.`", "5.381319271001378`", "5.4795062691907175`", "7.739548015930974`", "6.4604031691540715`", "1.8329929424645228`", "4.274417108139989`", "6.225115327651282`", "9.623165144811686`", "6.231298716456194`", "11.413428074629122`", "6.4569024336130525`", "11.5560438269343`", "11.537796714588916`", "9.773304949405341`", "13.688352369108076`", "11.553609510968284`", "13.683797168621064`"}, {"5.618586040992854`", "2.601707029184523`", "7.965963574252312`", "2.608256042915759`", "4.68366946762444`", "8.27681149903147`", "4.255047975662746`", "9.379217536342948`", "4.259271782477161`", "9.588917717607083`", "4.6839322474934395`", "9.414805706365437`", "5.6696350353061575`", "9.40278589950676`", "7.97426492816706`", "9.568337580652292`", "11.891696057935759`", "8.438830040816237`", "11.888839926007524`", "9.52049321272521`", "5.381319271001378`", "0.`", "7.738507261850667`", "5.483913887510812`", "6.460697041288364`", "4.271542846178711`", "1.83311401106704`", "9.629077866772239`", "6.224121006506033`", "11.416606654874043`", "6.229581719171519`", "11.559797838363226`", "6.4532335191288`", "11.541925571938352`", "13.681258442378804`", "9.773143074371513`", "13.676840451573744`", "11.554954528150555`"}, {"8.065557788427299`", "9.512691321753575`", "5.626447858788822`", "9.493073347092222`", "9.714619697835905`", "9.433937977576983`", "11.861567953299163`", "8.289674368164107`", "11.855017679574804`", "4.633642177771231`", "9.682770608184613`", "2.5157761097639444`", "8.053039485348783`", "2.5244829335598817`", "5.685492921526325`", "4.633949077202652`", "4.292850840572179`", "9.571303554515929`", "4.297222296506957`", "8.456638159471046`", "5.4795062691907175`", "7.738507261850667`", "0.`", "5.562961589044249`", "11.685367101037341`", "4.418963683272848`", "5.908413316374825`", "11.472667044773686`", "13.669828798691258`", "9.612029756299004`", "13.65835783980683`", "6.3922373463434505`", "11.653552439702725`", "6.383700915462328`", "6.253041291857481`", "11.607841328394853`", "6.2590884380560485`", "9.769441471901356`"}, {"9.516681119759292`", "8.069151095174883`", "9.491291214128829`", "5.635362336833467`", "9.717181725148073`", "11.863478526996111`", "9.44040535687554`", "11.854484764296238`", "8.298131731938323`", "9.68418879489436`", "4.63700031431962`", "8.053803229935193`", "2.5161803425602707`", "5.677678412255774`", "2.524126876656368`", "4.630777726063349`", "9.564443318412026`", "4.293847822217799`", "8.447071119779755`", "4.29619108905606`", "7.739548015930974`", "5.483913887510812`", "5.562961589044249`", "0.`", "11.686579511997252`", "5.910662411593574`", "4.419292808193026`", "13.671932953186523`", "11.479496717987033`", "13.65575482297667`", "9.622360143388654`", "11.65429014746201`", "6.3944534991875175`", "6.382475734083176`", "11.599535262480734`", "6.2548483722546635`", "9.756432271010741`", "6.25811093397205`"}, {"4.027002996774351`", "4.026669463712449`", "8.214032847516236`", "8.2112712249475`", "2.0409789801027958`", "5.144963389964366`", "5.142504783607779`", "7.594470751523617`", "7.5902743730133295`", "10.780159137113309`", "10.774358187837151`", "12.124827884132259`", "12.118788781392857`", "14.025391244853667`", "14.026368635864456`", "15.05418355873958`", "14.880866156183519`", "14.876423811992712`", "15.882281546580945`", "15.87853757848426`", "6.4604031691540715`", "6.460697041288364`", "11.685367101037341`", "11.686579511997252`", "0.`", "7.290080849533075`", "7.292599374497549`", "5.030304631174951`", "5.027514695019945`", "9.254433626548925`", "9.24927816444949`", "12.119694523613525`", "12.113709270147153`", "17.094868255307755`", "16.121489673540683`", "16.116636359408535`", "17.89341957020986`", "17.889778390067207`"}, {"3.9660300803543858`", "5.330802882718793`", "3.972746073168461`", "6.70159711325166`", "5.300018160632001`", "6.028399844917461`", "7.8826876065433735`", "6.0339801622910505`", "8.498077262070574`", "5.3189893984`", "8.015484488816487`", "5.40547015712643`", "7.634484057808967`", "6.740584998714461`", "7.638777128692141`", "8.017361149780944`", "8.082429176372232`", "10.082846120314992`", "8.68272027819669`", "10.084981752788467`", "1.8329929424645228`", "4.271542846178711`", "4.418963683272848`", "5.910662411593574`", "7.290080849533075`", "0.`", "2.770063479875957`", "7.938245623746162`", "9.518239427085716`", "7.9457602197751145`", "10.492094844835217`", "7.303974716409545`", "10.02938681136251`", "10.033300640181245`", "9.698909886930506`", "11.89797394557522`", "10.665854245919991`", "11.901889991013006`"}, {"5.338050239935344`", "3.9658992368671457`", "6.703804290761918`", "3.9718342170231447`", "5.303470561484973`", "7.889684662685208`", "6.027398168991202`", "8.503513997745772`", "6.0320215416099305`", "8.020429917892844`", "5.3126724382083`", "7.637083322961121`", "5.3996773749354885`", "7.6328952732118545`", "6.74221323783485`", "8.015836671261212`", "10.077955790346257`", "8.08181239736037`", "10.078815026031762`", "8.682535527107143`", "4.274417108139989`", "1.83311401106704`", "5.908413316374825`", "4.419292808193026`", "7.292599374497549`", "2.770063479875957`", "0.`", "9.525876449470852`", "7.937506313788489`", "10.496799259615608`", "7.944059781564137`", "10.03429335835835`", "7.297955916955397`", "10.032550137323344`", "11.891504027971797`", "9.699301206505734`", "11.893297302094593`", "10.666811761208152`"}, {"4.197376266254417`", "7.995265381180639`", "6.21301969801118`", "12.003904555550788`", "5.385911207080397`", "2.040752835074739`", "9.919177057239029`", "4.112370448060304`", "12.132614442128467`", "8.634597350028214`", "14.298421174268453`", "10.842148823526243`", "14.899174171025049`", "13.995679269407026`", "15.550824012142206`", "15.761573244904941`", "13.377380783139861`", "17.563469099137954`", "15.080525871210266`", "17.90944035223592`", "6.225115327651282`", "9.629077866772239`", "11.472667044773686`", "13.671932953186523`", "5.030304631174951`", "7.938245623746162`", "9.525876449470852`", "0.`", "10.055048791338686`", "4.96555066217351`", "13.981912692240757`", "9.207367611331327`", "15.985555784866062`", "17.70580625889936`", "14.057248909824388`", "19.14967590606842`", "17.100114858297108`", "19.76707547998042`"}, {"7.992324904749193`", "4.197497109832173`", "11.999186056195507`", "6.211905463262445`", "5.383446488532052`", "9.917287236823272`", "2.0408800558419538`", "12.130674006372221`", "4.112156480682439`", "14.29788848877776`", "8.636075835039135`", "14.899062543349851`", "10.842227362721014`", "15.550539489052174`", "14.003180951078397`", "15.76828816316604`", "17.55744359338892`", "13.37679532397252`", "17.906542038767224`", "15.081750700339194`", "9.623165144811686`", "6.224121006506033`", "13.669828798691258`", "11.479496717987033`", "5.027514695019945`", "9.518239427085716`", "7.937506313788489`", "10.055048791338686`", "0.`", "13.980682779604443`", "4.964843976263156`", "15.985118179534606`", "9.210882370824324`", "17.716340932598825`", "19.139627927222886`", "14.054324029934829`", "19.762738879536972`", "17.100772459878765`"}, {"6.21103646295278`", "10.814142706853206`", "4.203417294709158`", "14.022769074877937`", "8.655662536273173`", "4.113536942027893`", "13.277959650148851`", "2.0408104975730956`", "14.995346811209785`", "5.3633362839114955`", "15.795140018378959`", "8.002194532613085`", "15.553032196056451`", "11.92998787621823`", "14.855771470999564`", "14.22754346001751`", "9.964440325001512`", "17.89859154436424`", "12.153005854958261`", "17.529238489628593`", "6.231298716456194`", "11.416606654874043`", "9.612029756299004`", "13.65575482297667`", "9.254433626548925`", "7.9457602197751145`", "10.496799259615608`", "4.96555066217351`", "13.980682779604443`", "0.`", "17.010309889703404`", "4.9755661281222014`", "17.743798949120343`", "15.907699447531167`", "10.094481883710746`", "19.763559940123915`", "14.020623637919037`", "19.10564175517724`"}, {"10.813959864602195`", "6.210604172157868`", "14.020349739862905`", "4.201923269803079`", "8.653149454290837`", "13.278149226683945`", "4.112726154021052`", "14.995328462994628`", "2.04099500684431`", "15.797830428204566`", "5.368485589292391`", "15.556079677626236`", "8.005796142552676`", "14.859302884350761`", "11.941356857514874`", "14.239890882900527`", "17.894158888943693`", "9.963819810878544`", "17.527753899788923`", "12.156158640948156`", "11.413428074629122`", "6.229581719171519`", "13.65835783980683`", "9.622360143388654`", "9.24927816444949`", "10.492094844835217`", "7.944059781564137`", "13.981912692240757`", "4.964843976263156`", "17.010309889703404`", "0.`", "17.74657774823371`", "4.983265642181844`", "15.926037460567347`", "19.75439621724271`", "10.088212204083433`", "19.10166000412687`", "14.022361643291406`"}, {"8.186401045006901`", "12.064422474682805`", "4.003213769451074`", "13.996597754207508`", "10.767748923320761`", "7.55229762145322`", "14.718390426035086`", "5.098685836195121`", "15.727822018960003`", "2.041008029780215`", "15.047123934094353`", "4.03959692925117`", "13.995944524021192`", "8.13777598325322`", "12.065267116767801`", "10.710927190727492`", "5.199099818142431`", "15.83939039951431`", "7.6070719069084465`", "14.825963453808729`", "6.4569024336130525`", "11.559797838363226`", "6.3922373463434505`", "11.65429014746201`", "12.119694523613525`", "7.303974716409545`", "10.03429335835835`", "9.207367611331327`", "15.985118179534606`", "4.9755661281222014`", "17.74657774823371`", "0.`", "17.087810558332738`", "12.049692919067626`", "5.1259986214007744`", "17.85267963120414`", "9.30544642941929`", "16.060719429034464`"}, {"12.064222802112313`", "8.18540806500215`", "13.992598004170357`", "4.002563676403329`", "10.7645948574571`", "14.717933619676876`", "7.554484750816507`", "15.725965485738753`", "5.1027803350281795`", "15.047365439206066`", "2.040866512601262`", "13.995872649987673`", "4.036860269804935`", "12.06176329555892`", "8.139649960512505`", "10.714828725483324`", "15.831448266767637`", "5.1884677445662994`", "14.818055457207844`", "7.601063199020878`", "11.5560438269343`", "6.4532335191288`", "11.653552439702725`", "6.3944534991875175`", "12.113709270147153`", "10.02938681136251`", "7.297955916955397`", "15.985555784866062`", "9.210882370824324`", "17.743798949120343`", "4.983265642181844`", "17.087810558332738`", "0.`", "12.059159812362857`", "17.841454404319386`", "5.108452479525944`", "16.049228304835584`", "9.297730068219765`"}, {"13.982042628761286`", "13.985016839574447`", "12.001011509392029`", "12.01187391917264`", "15.0541211089781`", "15.686407258827863`", "15.695679581991628`", "14.656876589254106`", "14.670248956753762`", "10.699814291755025`", "10.707531150721879`", "8.109550087448937`", "8.113808113399866`", "4.0107278515791025`", "4.012113877766078`", "2.0408509339138186`", "7.570008752284055`", "7.574304674200735`", "5.156857696832651`", "5.160943779533414`", "11.537796714588916`", "11.541925571938352`", "6.383700915462328`", "6.382475734083176`", "17.094868255307755`", "10.033300640181245`", "10.032550137323344`", "17.70580625889936`", "17.716340932598825`", "15.907699447531167`", "15.926037460567347`", "12.049692919067626`", "12.059159812362857`", "0.`", "9.266609288348784`", "9.271132131045036`", "5.078837052408724`", "5.0828660640388765`"}, {"12.121985207214717`", "14.996318895277032`", "8.098445229492262`", "15.653132565499478`", "14.433718192599596`", "12.219282255616461`", "17.534878130716717`", "9.990826295285393`", "17.88434982633249`", "5.508225565154389`", "15.898435083240562`", "4.31552673582643`", "14.111913312799782`", "6.2703357273798845`", "10.931436463359091`", "8.713604023295469`", "2.040825810947553`", "15.177738484841925`", "4.113862203461132`", "13.459464700655364`", "9.773304949405341`", "13.681258442378804`", "6.253041291857481`", "11.599535262480734`", "16.121489673540683`", "9.698909886930506`", "11.891504027971797`", "14.057248909824388`", "19.139627927222886`", "10.094481883710746`", "19.75439621724271`", "5.1259986214007744`", "17.841454404319386`", "9.266609288348784`", "0.`", "17.195483503775105`", "4.99589659027093`", "14.122433409973963`"}, {"15.004572147111551`", "12.121607586402044`", "15.661192288560645`", "8.09718482762635`", "14.433891662611337`", "17.544687413335627`", "12.216718070851098`", "17.8940308189794`", "9.986616389807466`", "15.90981442374139`", "5.502212922059818`", "14.121739531232377`", "4.317625894726818`", "10.930851104434057`", "6.269619690976725`", "8.715854286461568`", "15.179084003854136`", "2.0411071141740136`", "13.455610137850616`", "4.113812498208811`", "13.688352369108076`", "9.773143074371513`", "11.607841328394853`", "6.2548483722546635`", "16.116636359408535`", "11.89797394557522`", "9.699301206505734`", "19.14967590606842`", "14.054324029934829`", "19.763559940123915`", "10.088212204083433`", "17.85267963120414`", "5.108452479525944`", "9.271132131045036`", "17.195483503775105`", "0.`", "14.112206603813117`", "4.994963009749323`"}, {"14.15072155357843`", "15.674027459985025`", "10.896125329648024`", "14.955443325957395`", "15.945169321104508`", "15.089464542859325`", "17.884180080861462`", "13.346887105464635`", "17.50917120936343`", "8.72875296972288`", "14.36866973933031`", "6.266490378606778`", "12.052466341232877`", "4.321155642307695`", "8.116953836377617`", "5.495535464839376`", "4.114195117045092`", "12.25306952014848`", "2.040995773394865`", "10.054524745940526`", "11.553609510968284`", "13.676840451573744`", "6.2590884380560485`", "9.756432271010741`", "17.89341957020986`", "10.665854245919991`", "11.893297302094593`", "17.100114858297108`", "19.762738879536972`", "14.020623637919037`", "19.10166000412687`", "9.30544642941929`", "16.049228304835584`", "5.078837052408724`", "4.99589659027093`", "14.112206603813117`", "0.`", "10.159907583874455`"}, {"15.680205718423606`", "14.150946972369228`", "14.96230454846677`", "10.898569645696204`", "15.945349454933302`", "17.889700302028192`", "15.090043782768092`", "17.514861077775176`", "13.347941348496501`", "14.38052248741178`", "8.726122101730393`", "12.065755949874827`", "6.267109847712514`", "8.122181221976268`", "4.318441800409279`", "5.4994438324973975`", "12.262926763131373`", "4.113343536824609`", "10.05935566123804`", "2.0410098252776234`", "13.683797168621064`", "11.554954528150555`", "9.769441471901356`", "6.25811093397205`", "17.889778390067207`", "11.901889991013006`", "10.666811761208152`", "19.76707547998042`", "17.100772459878765`", "19.10564175517724`", "14.022361643291406`", "16.060719429034464`", "9.297730068219765`", "5.0828660640388765`", "14.122433409973963`", "4.994963009749323`", "10.159907583874455`", "0.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.5825628297528267`*^9, 3.582563575418536*^9, 3.5825636680358987`*^9, 3.5825637934289193`*^9, 3.5825638476078143`*^9, 3.582563919617541*^9, 3.582564073933012*^9, 3.582564139983528*^9, 3.582564290976193*^9, { 3.5825644136392083`*^9, 3.5825644382872515`*^9}, 3.5825645235570016`*^9, 3.5825646254875803`*^9, 3.58256471058573*^9, 3.5825647991002855`*^9, 3.5825994451163063`*^9, 3.5825995627093124`*^9, {3.582599598417775*^9, 3.5825996190722113`*^9}, {3.5825997260727997`*^9, 3.582599755244851*^9}, 3.5825999684036255`*^9, 3.58260003949295*^9, 3.582600365268322*^9, 3.582600752679403*^9, 3.5826013992537384`*^9, 3.5826017142182913`*^9, { 3.582601755917165*^9, 3.582601779426406*^9}, {3.582601954084313*^9, 3.582601976907153*^9}, 3.582603453324946*^9, 3.5826081998051486`*^9, 3.58260829164251*^9, 3.582610888283271*^9, 3.58261095623699*^9, { 3.582611003271073*^9, 3.5826110773556027`*^9}, 3.582611112143664*^9, { 3.5826111567753425`*^9, 3.5826112967855883`*^9}}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"x", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"y", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"z", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5678630319943895`*^9, 3.5678630956269007`*^9}, { 3.5678632280087337`*^9, 3.567863228336334*^9}, {3.5678632621727934`*^9, 3.5678633509213495`*^9}, {3.5678644293824434`*^9, 3.567864451908883*^9}, { 3.567864923404111*^9, 3.56786494544695*^9}, {3.5678650143210707`*^9, 3.5678650845367947`*^9}, {3.567869231084096*^9, 3.567869278118179*^9}, { 3.5682778102931156`*^9, 3.5682778156907253`*^9}, 3.571808490989086*^9, { 3.572601938592864*^9, 3.572601945722077*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"connected", " ", RowBox[{"pairs", ":", " ", RowBox[{ RowBox[{"distance", " ", "criteria"}], " ", "<", " ", RowBox[{"3.0", " ", "bohr"}]}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Dij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "<", "2.9"}], "&&", RowBox[{"(", RowBox[{ RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "2.770063479875957`"}], ")"}]}], ")"}], ",", RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Prepend", "[", RowBox[{"Dij", ",", "num1"}], "]"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.567863535157673*^9, 3.5678635412104836`*^9}, { 3.5678638182825704`*^9, 3.567863827283786*^9}, {3.5679503910983553`*^9, 3.5679504266352177`*^9}, {3.5679504653700857`*^9, 3.5679505048069553`*^9}, 3.567950534915008*^9, {3.567951107623214*^9, 3.567951136046464*^9}, 3.567951302545556*^9, {3.5679562986474605`*^9, 3.567956305355472*^9}, { 3.5679563590975666`*^9, 3.567956370688387*^9}, {3.567956414930065*^9, 3.567956430467692*^9}, {3.567956484740187*^9, 3.567956500667815*^9}, { 3.5679565456270943`*^9, 3.5679565868267665`*^9}, {3.5679569267045636`*^9, 3.5679569448941956`*^9}, {3.567956976562251*^9, 3.567957000711094*^9}, { 3.5679570348595533`*^9, 3.5679570632672033`*^9}, {3.5679573263928657`*^9, 3.5679573286548696`*^9}, {3.5679573611029263`*^9, 3.5679573637393312`*^9}, {3.5679592820903006`*^9, 3.567959317127962*^9}, { 3.567959397655304*^9, 3.5679594004945087`*^9}, {3.5679594704762316`*^9, 3.5679594724574347`*^9}, {3.567959655898157*^9, 3.567959673073787*^9}, 3.5681143121223865`*^9, 3.568121866388855*^9, 3.568220668221574*^9, { 3.568220718968463*^9, 3.568220723742071*^9}, {3.568220862051914*^9, 3.5682208641111183`*^9}, {3.568220906761593*^9, 3.5682209083527956`*^9}, { 3.5682209451844606`*^9, 3.5682209651680956`*^9}, {3.568221147782016*^9, 3.5682211695908546`*^9}, {3.568221237279373*^9, 3.568221253612602*^9}, { 3.568221305420293*^9, 3.568221306247094*^9}, {3.5682215161142635`*^9, 3.568221546206716*^9}, 3.56822158247678*^9, {3.568277819185131*^9, 3.5682778284359474`*^9}, 3.56882183684053*^9, {3.5688219650415554`*^9, 3.568821965915157*^9}, {3.5688769979329815`*^9, 3.5688771619984694`*^9}, { 3.568877204212144*^9, 3.5688772091729527`*^9}, {3.568877282493081*^9, 3.5688772843338842`*^9}, {3.568877374112042*^9, 3.568877378074449*^9}, { 3.56887744125456*^9, 3.5688774664954042`*^9}, {3.56887758366721*^9, 3.568877604867647*^9}, {3.568877667220957*^9, 3.5688776710429635`*^9}, { 3.5688778111156096`*^9, 3.56887782262843*^9}, {3.569341165522358*^9, 3.569341165522358*^9}, 3.5693418217375107`*^9, {3.5693429625675144`*^9, 3.5693429673099227`*^9}, {3.569390288837522*^9, 3.5693903143123665`*^9}, { 3.569390381798085*^9, 3.5693904158685455`*^9}, {3.5693905284539433`*^9, 3.569390564349606*^9}, {3.569390610868888*^9, 3.569390611056088*^9}, { 3.569390743671921*^9, 3.569390761487152*^9}, {3.569390843761697*^9, 3.569390861608128*^9}, {3.5693909829451413`*^9, 3.5693909887171516`*^9}, 3.5703416480920715`*^9, {3.5703416810237293`*^9, 3.5703416997437625`*^9}, 3.570341888192094*^9, {3.5705964879252462`*^9, 3.570596509843285*^9}, { 3.5705965495921545`*^9, 3.5705966388087115`*^9}, 3.570968886604662*^9, { 3.5709689930904493`*^9, 3.5709689944320517`*^9}, {3.5709690501397495`*^9, 3.570969050904151*^9}, {3.5709692134876366`*^9, 3.5709692140804377`*^9}, { 3.5709722325921392`*^9, 3.5709722334033403`*^9}, {3.5709723694355793`*^9, 3.570972545481889*^9}, {3.570972790558319*^9, 3.5709728063299465`*^9}, { 3.570972844066413*^9, 3.570972866764453*^9}, {3.5709729633598228`*^9, 3.57097298434186*^9}, {3.5709731454589424`*^9, 3.5709731466289444`*^9}, 3.570973453029083*^9, {3.5709736099653587`*^9, 3.570973638404208*^9}, { 3.571113899355363*^9, 3.571113958604267*^9}, 3.57111399989754*^9, { 3.5711140388820086`*^9, 3.571114044841219*^9}, {3.571115985874628*^9, 3.5711159997742524`*^9}, {3.57313788224113*^9, 3.5731379093851776`*^9}, 3.573137959679666*^9, {3.5743387654349337`*^9, 3.574338770629743*^9}, { 3.5744830510823555`*^9, 3.574483052611158*^9}, {3.5818415427954597`*^9, 3.581841544480263*^9}, {3.58256312776015*^9, 3.5825631287429514`*^9}, { 3.582563787204508*^9, 3.58256378831211*^9}, 3.5825638404162016`*^9, { 3.5825639137987304`*^9, 3.582563914687932*^9}, 3.582564408397599*^9, { 3.5825999344891653`*^9, 3.5825999539892*^9}, {3.5826000326757383`*^9, 3.5826000340173407`*^9}, {3.582600192622819*^9, 3.5826002338224916`*^9}, { 3.5826003404486785`*^9, 3.5826003530223007`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30", "31", "32", "33", "34", "35", "36", "37", "38"}, {"0.`", "0", "0", "0", "2.6267960619378927`", "2.660376548215811`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.601850604489405`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0.`", "0", "0", "2.6263954255555135`", "0", "2.660542765695153`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.601707029184523`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0.`", "0", "0", "0", "0", "2.666027346933842`", "0", "2.6098631338163902`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.6090491904142614`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0.`", "0", "0", "0", "0", "2.6643091579700764`", "0", "2.6103949001039`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.608256042915759`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"2.6267960619378927`", "2.6263954255555135`", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0409789801027958`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"2.660376548215811`", "0", "0", "0", "0", "0.`", "0", "2.568013479824691`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040752835074739`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "2.660542765695153`", "0", "0", "0", "0", "0.`", "0", "2.567401920244562`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0408800558419538`", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "2.666027346933842`", "0", "0", "2.568013479824691`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0408104975730956`", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "2.6643091579700764`", "0", "0", "2.567401920244562`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.04099500684431`", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "2.6098631338163902`", "0", "0", "0", "0", "0", "0", "0.`", "0", "2.6502677112180617`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.041008029780215`", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "2.6103949001039`", "0", "0", "0", "0", "0", "0", "0.`", "0", "2.648802675884206`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040866512601262`", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "2.6502677112180617`", "0", "0.`", "0", "0", "0", "0", "2.773017482367205`", "0", "0", "0", "0", "0", "2.5157761097639444`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.648802675884206`", "0", "0.`", "0", "0", "0", "0", "2.774744242600973`", "0", "0", "0", "0", "0", "2.5161803425602707`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "2.6321505099989175`", "0", "0", "2.7785659932312154`", "0", "0", "0", "2.5244829335598817`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "2.6336946245027804`", "0", "0", "0", "2.776151280801069`", "0", "0", "0", "2.524126876656368`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.6321505099989175`", "2.6336946245027804`", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0408509339138186`", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.773017482367205`", "0", "0", "0", "0", "0.`", "0", "2.554080347749606`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040825810947553`", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.774744242600973`", "0", "0", "0", "0", "0.`", "0", "2.553693774868441`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0411071141740136`", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.7785659932312154`", "0", "0", "2.554080347749606`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040995773394865`", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.776151280801069`", "0", "0", "2.553693774868441`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0410098252776234`"}, {"2.601850604489405`", "0", "2.6090491904142614`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "1.8329929424645228`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "2.601707029184523`", "0", "2.608256042915759`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "1.83311401106704`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.5157761097639444`", "0", "2.5244829335598817`", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.5161803425602707`", "0", "2.524126876656368`", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "2.0409789801027958`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.8329929424645228`", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.83311401106704`", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "2.040752835074739`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "2.0408800558419538`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "2.0408104975730956`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "2.04099500684431`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "2.041008029780215`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040866512601262`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0408509339138186`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040825810947553`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0411071141740136`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.040995773394865`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0410098252776234`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.5825628297996264`*^9, 3.5825635754341364`*^9, 3.5825636680670986`*^9, 3.5825637934601192`*^9, 3.5825638476390142`*^9, 3.582563919648741*^9, 3.5825640739642115`*^9, 3.582564139999128*^9, 3.582564291007393*^9, { 3.5825644136704082`*^9, 3.582564438318452*^9}, 3.5825645235882015`*^9, 3.5825646255187807`*^9, 3.58256471060133*^9, 3.582564799131486*^9, 3.5825994451475058`*^9, 3.582599562740513*^9, {3.5825995984645753`*^9, 3.5825996191034117`*^9}, {3.5825997261039996`*^9, 3.582599755291651*^9}, 3.582599968434825*^9, 3.58260003952415*^9, 3.5826003653151226`*^9, 3.5826007527106028`*^9, 3.5826013992849383`*^9, 3.5826017142494917`*^9, { 3.5826017559483647`*^9, 3.5826017794576063`*^9}, {3.582601954115513*^9, 3.582601976938353*^9}, 3.582603453356146*^9, 3.5826081998519487`*^9, 3.5826082916581097`*^9, 3.5826108883456707`*^9, 3.58261095626819*^9, { 3.582611003317873*^9, 3.5826110773868027`*^9}, 3.582611112174864*^9, { 3.5826111568065424`*^9, 3.5826112968167887`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"count", " ", "C", " ", "atoms"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"nc", "=", "0"}], ";"}], " ", "\n", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"nc", "=", RowBox[{"nc", "+", "1"}]}], ",", "nc"}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"cnt", "=", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", "nc", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pri", "=", "cnt"}], ";", " ", RowBox[{"sec", "=", "cnt"}], ";", RowBox[{"ter", "=", "cnt"}], ";", " ", RowBox[{"qua", "=", "cnt"}], ";"}], "\[IndentingNewLine]", "nc"}]}]], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.5708947833985987`*^9}, {3.572528557136052*^9, 3.57252856181606*^9}, 3.57252899467002*^9, 3.572529147612689*^9, { 3.572529371395082*^9, 3.572529383875104*^9}, {3.572531374906601*^9, 3.5725313995390444`*^9}}], Cell[BoxData["20"], "Output", CellChangeTimes->{ 3.5825628298152266`*^9, 3.582563575449736*^9, 3.582563668082699*^9, 3.5825637934757195`*^9, 3.5825638476546144`*^9, 3.582563919664341*^9, 3.5825640739798117`*^9, 3.5825641400147276`*^9, 3.582564291007393*^9, { 3.5825644136860085`*^9, 3.582564438334052*^9}, 3.5825645236038017`*^9, 3.5825646255187807`*^9, 3.58256471061693*^9, 3.582564799131486*^9, 3.582599445163106*^9, 3.582599562756113*^9, {3.5825995984801755`*^9, 3.582599619119012*^9}, {3.5825997261195993`*^9, 3.582599755307251*^9}, 3.582599968450425*^9, 3.5826000395553503`*^9, 3.5826003653307223`*^9, 3.582600752726203*^9, 3.582601399300538*^9, 3.582601714265092*^9, { 3.5826017559639645`*^9, 3.5826017794732065`*^9}, {3.582601954146713*^9, 3.582601976953953*^9}, 3.582603453371746*^9, 3.582608199867549*^9, 3.58260829167371*^9, 3.582610888361271*^9, 3.58261095628379*^9, { 3.5826110033334727`*^9, 3.582611077418003*^9}, 3.582611112190464*^9, { 3.5826111568221426`*^9, 3.5826112968323884`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "count", " ", "H", " ", "atoms", " ", "bonded", " ", "to", " ", "each", " ", "C", " ", "atom"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "nc"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", " ", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", ",", RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "j", "]"}], "]"}], "=", RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "j", "]"}], "]"}], "+", "1"}]}], ",", "0"}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "cnt"}]}]], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.570894821930666*^9}, 3.5709437180911617`*^9, { 3.57252947817727*^9, 3.572529509876525*^9}, {3.5725312638188057`*^9, 3.572531289964452*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1"}], "}"}]], "Output", CellChangeTimes->{ 3.5825628298308268`*^9, 3.582563575465336*^9, 3.582563668098299*^9, 3.582563793491319*^9, 3.5825638476702147`*^9, 3.5825639196799407`*^9, 3.582564073995412*^9, 3.582564140030328*^9, 3.582564291022993*^9, { 3.5825644137016087`*^9, 3.582564438349652*^9}, 3.5825645236038017`*^9, 3.582564625534381*^9, 3.58256471063253*^9, 3.5825647991470857`*^9, 3.582599445178706*^9, 3.582599562771713*^9, {3.5825995984957757`*^9, 3.5825996191346116`*^9}, {3.5825997261195993`*^9, 3.582599755307251*^9}, 3.5825999684660254`*^9, 3.5826000395553503`*^9, 3.582600365346322*^9, 3.5826007527418027`*^9, 3.582601399300538*^9, 3.5826017142806916`*^9, { 3.5826017559795647`*^9, 3.5826017794888062`*^9}, {3.582601954146713*^9, 3.582601976969553*^9}, 3.5826034533873463`*^9, 3.582608199883149*^9, 3.58260829168931*^9, 3.582610888376871*^9, 3.5826109562993903`*^9, { 3.5826110033490725`*^9, 3.582611077418003*^9}, 3.582611112206064*^9, { 3.5826111568377423`*^9, 3.582611296847988*^9}}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"parse", " ", "into", " ", "prim"}], ",", " ", "sec", ",", " ", "tert", ",", " ", RowBox[{ "and", " ", "quart", " ", "C", " ", "cores", " ", "with", " ", "different", " ", "radii"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"n1", "=", "0"}], ";", " ", RowBox[{"n2", "=", "0"}], ";", " ", RowBox[{"n3", "=", "0"}], ";", " ", RowBox[{"n4", "=", "0"}], ";"}], "\n", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "3"}], ",", RowBox[{ RowBox[{"n1", "=", RowBox[{"n1", "+", "1"}]}], ";", RowBox[{ RowBox[{"pri", "[", RowBox[{"[", "n1", "]"}], "]"}], "=", "i"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "2"}], ",", RowBox[{ RowBox[{"n2", "=", RowBox[{"n2", "+", "1"}]}], ";", RowBox[{ RowBox[{"sec", "[", RowBox[{"[", "n2", "]"}], "]"}], "=", "i"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "1"}], ",", RowBox[{ RowBox[{"n3", "=", RowBox[{"n3", "+", "1"}]}], ";", RowBox[{ RowBox[{"ter", "[", RowBox[{"[", "n3", "]"}], "]"}], "=", "i"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0"}], ",", RowBox[{ RowBox[{"n4", "=", RowBox[{"n4", "+", "1"}]}], ";", RowBox[{ RowBox[{"qua", "[", RowBox[{"[", "n4", "]"}], "]"}], "=", "i"}]}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"pri", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"pri", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2572"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"sec", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"sec", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2556"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"ter", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"ter", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.257"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"qua", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"qua", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.257"}]}], "]"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.5708948169698577`*^9}, {3.570894956839703*^9, 3.5708949736409326`*^9}, {3.5708961320833673`*^9, 3.570896139696181*^9}, 3.570896314088887*^9, {3.5708963602181683`*^9, 3.5708963666609793`*^9}, { 3.570896482038782*^9, 3.570896483645585*^9}, {3.5708965159376416`*^9, 3.570896521194851*^9}, {3.5709435995777535`*^9, 3.5709436285158043`*^9}, { 3.5709436695594764`*^9, 3.5709437026783347`*^9}, {3.57094471360691*^9, 3.5709447144805117`*^9}, {3.571117678992402*^9, 3.571117755775737*^9}, { 3.571117807801828*^9, 3.5711178311706696`*^9}, {3.5711179386236577`*^9, 3.5711179514468803`*^9}, {3.5711180538922606`*^9, 3.5711181329531994`*^9}, {3.571118284803866*^9, 3.5711183600895977`*^9}, 3.571118418542901*^9, {3.5711187358786583`*^9, 3.571118760152301*^9}, { 3.5711189251069903`*^9, 3.571118931175401*^9}, {3.571119065756838*^9, 3.571119069968845*^9}, {3.5711191828038435`*^9, 3.5711191858302484`*^9}, { 3.571119378740187*^9, 3.571119441873498*^9}, {3.571119489453582*^9, 3.5711194938839893`*^9}, {3.571119574255331*^9, 3.571119584660549*^9}, { 3.5711196943599415`*^9, 3.5711197163091803`*^9}, {3.5711198294561787`*^9, 3.5711198460078077`*^9}, {3.5711199544435987`*^9, 3.571119960418409*^9}, { 3.57112005791858*^9, 3.5711200601337843`*^9}, {3.571122132488224*^9, 3.5711221772447023`*^9}, {3.5711222335764017`*^9, 3.571122265696858*^9}, { 3.5711223339157777`*^9, 3.5711223418093915`*^9}, {3.5711223939602833`*^9, 3.5711223957542863`*^9}, {3.571122528292119*^9, 3.571122529087721*^9}, { 3.5711226076026583`*^9, 3.5711226245598884`*^9}, 3.5711226547927413`*^9, { 3.571122698566418*^9, 3.571122702404025*^9}, {3.5711227857393713`*^9, 3.5711228031646023`*^9}, {3.571122843085072*^9, 3.5711228432878723`*^9}, { 3.5711232359405622`*^9, 3.571123255206596*^9}, 3.571123320991912*^9, { 3.5711233774484105`*^9, 3.5711234457765303`*^9}, {3.571123624911645*^9, 3.571123633975261*^9}, {3.571123734751438*^9, 3.5711237424110518`*^9}, { 3.5711242010206575`*^9, 3.5711242671491733`*^9}, {3.5711245724573097`*^9, 3.5711245843601303`*^9}, {3.571124620583394*^9, 3.5711246628750687`*^9}, { 3.571124751951225*^9, 3.5711247552428303`*^9}, {3.5711248069569216`*^9, 3.5711248951750765`*^9}, {3.5711250701761837`*^9, 3.5711251099562535`*^9}, 3.571125196598806*^9, 3.571135972980551*^9, {3.5711360048826065`*^9, 3.571136013634222*^9}, {3.571760985057314*^9, 3.5717610088005557`*^9}, { 3.5717610576442413`*^9, 3.571761063431852*^9}, {3.5725287590472064`*^9, 3.5725287902628613`*^9}, {3.572529030674884*^9, 3.572529042343704*^9}, { 3.572529556645407*^9, 3.5725296188271165`*^9}, {3.572529678793622*^9, 3.5725297125832815`*^9}, 3.572529766184975*^9, 3.5725298594731393`*^9, { 3.572529901374813*^9, 3.5725299376604767`*^9}, {3.572531381084212*^9, 3.5725313843134174`*^9}, {3.572537228892798*^9, 3.572537235429209*^9}, { 3.572537287814101*^9, 3.5725373101221404`*^9}, {3.5725380504682407`*^9, 3.5725382242837462`*^9}, {3.572538261053011*^9, 3.572538276590638*^9}, { 3.5725383120339003`*^9, 3.5725383418611526`*^9}, {3.5725384271465025`*^9, 3.57253845404095*^9}, {3.572538956424232*^9, 3.5725390373103743`*^9}, { 3.572539306644847*^9, 3.5725394512103014`*^9}, {3.5725395463080683`*^9, 3.572539593981752*^9}, {3.5725398474041967`*^9, 3.5725398481529984`*^9}, { 3.572541676133009*^9, 3.572541712605873*^9}, {3.5725419267942495`*^9, 3.572541927823851*^9}, {3.5725420320164337`*^9, 3.572542068317698*^9}, { 3.572542098675351*^9, 3.5725421006877546`*^9}, {3.572542267561248*^9, 3.5725423059217153`*^9}, {3.5726066153250785`*^9, 3.5726066318455076`*^9}, {3.5726084389526815`*^9, 3.5726084422286873`*^9}, {3.5726211211499004`*^9, 3.5726211269999104`*^9}, 3.572624425506504*^9, 3.5726245538167295`*^9, {3.5740888464626713`*^9, 3.5740888580378923`*^9}, {3.5740889171463957`*^9, 3.5740889398288355`*^9}, {3.57408900495895*^9, 3.574089019732176*^9}, { 3.574089077031077*^9, 3.5740890848310905`*^9}, {3.574089123472358*^9, 3.57408913014917*^9}, {3.574089171302042*^9, 3.5740891719572434`*^9}, { 3.5740892687866135`*^9, 3.574089271391818*^9}, {3.574227108071917*^9, 3.574227115525343*^9}, {3.5742271744657145`*^9, 3.5742271817051287`*^9}, { 3.5743410750969906`*^9, 3.5743410822730036`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Eij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nc"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "nc"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"CD", "=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Flatten", "[", "Eij", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#", "\[GreaterEqual]", "2.4"}], " ", "&&", RowBox[{"#", "\[LessEqual]", "2.73"}]}], ")"}], " ", "&"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mean", "[", "CD", "]"}], " ", "\[PlusMinus]", " ", RowBox[{"StandardDeviation", "[", "CD", "]"}]}]}], "Input", CellChangeTimes->{{3.5711447475554733`*^9, 3.5711448173314643`*^9}, { 3.5711448756027975`*^9, 3.57114492740276*^9}, {3.5711449591545763`*^9, 3.5711450128426466`*^9}, 3.571145059034289*^9, {3.571145091643154*^9, 3.5711451544367456`*^9}, {3.5711457670857873`*^9, 3.571145777413378*^9}, { 3.571145816908637*^9, 3.5711458203728347`*^9}, {3.571145995427848*^9, 3.571146043099574*^9}, {3.571146121580063*^9, 3.571146129714528*^9}, { 3.5711468466695356`*^9, 3.571146852041843*^9}, {3.5711478420384674`*^9, 3.571147850085928*^9}, {3.57114788911016*^9, 3.571147906822173*^9}, 3.571148086181432*^9, {3.571148123252552*^9, 3.5711481317480383`*^9}, { 3.571148234499915*^9, 3.57114834630731*^9}, 3.571151990091008*^9, { 3.5712017864539623`*^9, 3.5712018128960094`*^9}, {3.5712024819499846`*^9, 3.5712024821527843`*^9}, {3.571202538780884*^9, 3.5712025389368844`*^9}, { 3.5712028115629635`*^9, 3.5712028346354036`*^9}, {3.574134565351712*^9, 3.574134566646515*^9}, {3.574134676891908*^9, 3.5741346826639185`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "2.6267960619378927`", ",", "2.6263954255555135`", ",", "2.660376548215811`", ",", "2.660542765695153`", ",", "2.666027346933842`", ",", "2.568013479824691`", ",", "2.6643091579700764`", ",", "2.567401920244562`", ",", "2.6098631338163902`", ",", "2.6103949001039`", ",", "2.6502677112180617`", ",", "2.648802675884206`", ",", "2.6321505099989175`", ",", "2.6336946245027804`", ",", "2.554080347749606`", ",", "2.553693774868441`"}], "}"}]], "Output", CellChangeTimes->{ 3.5825628298464265`*^9, 3.582563575480936*^9, 3.582563668113899*^9, 3.582563793522519*^9, 3.5825638476858144`*^9, 3.582563919695541*^9, 3.582564074011012*^9, 3.582564140045928*^9, 3.5825642910385933`*^9, { 3.5825644137328086`*^9, 3.582564438365252*^9}, 3.5825645236350017`*^9, 3.5825646255499806`*^9, 3.58256471064813*^9, 3.5825647991626854`*^9, 3.5825994451943064`*^9, 3.5825995627873125`*^9, {3.5825995985113754`*^9, 3.5825996191658115`*^9}, {3.5825997261351995`*^9, 3.582599755338451*^9}, 3.5825999684972253`*^9, 3.58260003958655*^9, 3.5826003653619223`*^9, 3.582600752757403*^9, 3.5826013993161383`*^9, 3.5826017142962914`*^9, { 3.582601756010765*^9, 3.582601779504406*^9}, {3.5826019541779127`*^9, 3.582601976985153*^9}, 3.5826034534185467`*^9, 3.582608199898749*^9, 3.5826082917049103`*^9, 3.582610888392471*^9, 3.5826109563305902`*^9, { 3.5826110033646727`*^9, 3.582611077449203*^9}, 3.582611112221664*^9, { 3.582611156853342*^9, 3.5826112968635883`*^9}}], Cell[BoxData[ RowBox[{"2.62080064903249`", "\[PlusMinus]", "0.03993296330741594`"}]], "Output", CellChangeTimes->{ 3.5825628298464265`*^9, 3.582563575480936*^9, 3.582563668113899*^9, 3.582563793522519*^9, 3.5825638476858144`*^9, 3.582563919695541*^9, 3.582564074011012*^9, 3.582564140045928*^9, 3.5825642910385933`*^9, { 3.5825644137328086`*^9, 3.582564438365252*^9}, 3.5825645236350017`*^9, 3.5825646255499806`*^9, 3.58256471064813*^9, 3.5825647991626854`*^9, 3.5825994451943064`*^9, 3.5825995627873125`*^9, {3.5825995985113754`*^9, 3.5825996191658115`*^9}, {3.5825997261351995`*^9, 3.582599755338451*^9}, 3.5825999684972253`*^9, 3.58260003958655*^9, 3.5826003653619223`*^9, 3.582600752757403*^9, 3.5826013993161383`*^9, 3.5826017142962914`*^9, { 3.582601756010765*^9, 3.582601779504406*^9}, {3.5826019541779127`*^9, 3.582601976985153*^9}, 3.5826034534185467`*^9, 3.582608199898749*^9, 3.5826082917049103`*^9, 3.582610888392471*^9, 3.5826109563305902`*^9, { 3.5826110033646727`*^9, 3.582611077449203*^9}, 3.582611112221664*^9, { 3.582611156853342*^9, 3.5826112968635883`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"CC", "=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Flatten", "[", "Eij", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"#", "\[GreaterEqual]", "2.73"}], ")"}], " ", "&"}]}], "]"}]}], "\n", RowBox[{ RowBox[{"Mean", "[", "CC", "]"}], " ", "\[PlusMinus]", " ", RowBox[{"StandardDeviation", "[", "CC", "]"}], " "}]}], "Input", CellChangeTimes->{{3.571152083381344*^9, 3.571152103920519*^9}, { 3.571200806148241*^9, 3.571200809159046*^9}, 3.571201865936102*^9, { 3.5712028396274123`*^9, 3.57120285544584*^9}, {3.5741345719505243`*^9, 3.574134573026926*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "2.773017482367205`", ",", "2.774744242600973`", ",", "2.7785659932312154`", ",", "2.776151280801069`"}], "}"}]], "Output", CellChangeTimes->{ 3.582562829924427*^9, 3.5825635754965363`*^9, 3.582563668129499*^9, 3.5825637935381193`*^9, 3.582563847701414*^9, 3.5825639197111406`*^9, 3.5825640740266123`*^9, 3.582564140061528*^9, 3.5825642910541935`*^9, { 3.5825644137484083`*^9, 3.582564438365252*^9}, 3.5825645236350017`*^9, 3.582564625565581*^9, 3.58256471064813*^9, 3.5825647991782856`*^9, 3.582599445209906*^9, 3.5825995628029127`*^9, {3.5825995985269756`*^9, 3.5825996191658115`*^9}, {3.5825997261507998`*^9, 3.582599755338451*^9}, 3.5825999685128255`*^9, 3.58260003960215*^9, 3.5826003653775225`*^9, 3.5826007527730026`*^9, 3.5826013993317385`*^9, 3.5826017143118916`*^9, { 3.582601756010765*^9, 3.582601779520006*^9}, {3.582601954193513*^9, 3.5826019770007534`*^9}, 3.5826034534341464`*^9, 3.5826081999143486`*^9, 3.58260829172051*^9, 3.5826108884080706`*^9, 3.5826109563461905`*^9, { 3.582611003380273*^9, 3.5826110774648027`*^9}, 3.5826111122372637`*^9, { 3.5826111568689423`*^9, 3.5826112968791885`*^9}}], Cell[BoxData[ RowBox[{"2.775619749750116`", "\[PlusMinus]", "0.002345292036428885`"}]], "Output", CellChangeTimes->{ 3.582562829924427*^9, 3.5825635754965363`*^9, 3.582563668129499*^9, 3.5825637935381193`*^9, 3.582563847701414*^9, 3.5825639197111406`*^9, 3.5825640740266123`*^9, 3.582564140061528*^9, 3.5825642910541935`*^9, { 3.5825644137484083`*^9, 3.582564438365252*^9}, 3.5825645236350017`*^9, 3.582564625565581*^9, 3.58256471064813*^9, 3.5825647991782856`*^9, 3.582599445209906*^9, 3.5825995628029127`*^9, {3.5825995985269756`*^9, 3.5825996191658115`*^9}, {3.5825997261507998`*^9, 3.582599755338451*^9}, 3.5825999685128255`*^9, 3.58260003960215*^9, 3.5826003653775225`*^9, 3.5826007527730026`*^9, 3.5826013993317385`*^9, 3.5826017143118916`*^9, { 3.582601756010765*^9, 3.582601779520006*^9}, {3.582601954193513*^9, 3.5826019770007534`*^9}, 3.5826034534341464`*^9, 3.5826081999143486`*^9, 3.58260829172051*^9, 3.5826108884080706`*^9, 3.5826109563461905`*^9, { 3.582611003380273*^9, 3.5826110774648027`*^9}, 3.5826111122372637`*^9, { 3.5826111568689423`*^9, 3.5826112968791885`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Eij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "nc"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"CH", "=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Flatten", "[", "Eij", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#", ">", "0"}], " ", "&&", RowBox[{"#", "\[LessEqual]", "2.1"}]}], ")"}], " ", "&"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mean", "[", "CH", "]"}], " ", "\[PlusMinus]", " ", RowBox[{"StandardDeviation", "[", "CH", "]"}]}]}], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.57089481264865*^9}, {3.570973331551669*^9, 3.570973355887712*^9}, {3.5709734060886*^9, 3.5709734077266035`*^9}, 3.5709737061863275`*^9, {3.5712013634748197`*^9, 3.5712013661736245`*^9}, { 3.571201966837079*^9, 3.571202078205675*^9}, {3.5712022379343557`*^9, 3.5712022402275596`*^9}, {3.571202304764873*^9, 3.5712023101312823`*^9}, 3.571202353748959*^9, {3.5712024254310846`*^9, 3.5712024257586856`*^9}, { 3.57120276994209*^9, 3.5712027833893137`*^9}, {3.574134646315854*^9, 3.574134648952259*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "2.0409789801027958`", ",", "2.040752835074739`", ",", "2.0408800558419538`", ",", "2.0408104975730956`", ",", "2.04099500684431`", ",", "2.041008029780215`", ",", "2.040866512601262`", ",", "2.0408509339138186`", ",", "2.040825810947553`", ",", "2.0411071141740136`", ",", "2.040995773394865`", ",", "2.0410098252776234`"}], "}"}]], "Output", CellChangeTimes->{ 3.582562829924427*^9, 3.5825635755121365`*^9, 3.5825636681450987`*^9, 3.5825637936317196`*^9, 3.5825638478106146`*^9, 3.582563919804741*^9, 3.5825640741046124`*^9, 3.5825641401395283`*^9, 3.5825642911477933`*^9, { 3.5825644137640085`*^9, 3.5825644383808517`*^9}, 3.5825645236506014`*^9, 3.582564625565581*^9, 3.5825647106637297`*^9, 3.5825647991782856`*^9, 3.5825994452255063`*^9, 3.582599562818513*^9, {3.582599598542576*^9, 3.5825996191814117`*^9}, {3.5825997261664*^9, 3.582599755354051*^9}, 3.582599968528425*^9, 3.58260003961775*^9, 3.5826003653931227`*^9, 3.582600752788603*^9, 3.5826013993473387`*^9, 3.5826017143274918`*^9, { 3.5826017560263653`*^9, 3.5826017795356064`*^9}, {3.582601954209113*^9, 3.582601977016353*^9}, 3.582603453449746*^9, 3.582608199929949*^9, 3.58260829172051*^9, 3.582610888423671*^9, 3.5826109563617907`*^9, { 3.582611003395873*^9, 3.582611077480403*^9}, 3.582611112252864*^9, { 3.5826111568845425`*^9, 3.5826112968947887`*^9}}], Cell[BoxData[ RowBox[{"2.0409234479605205`", "\[PlusMinus]", "0.00010598721853113904`"}]], "Output", CellChangeTimes->{ 3.582562829924427*^9, 3.5825635755121365`*^9, 3.5825636681450987`*^9, 3.5825637936317196`*^9, 3.5825638478106146`*^9, 3.582563919804741*^9, 3.5825640741046124`*^9, 3.5825641401395283`*^9, 3.5825642911477933`*^9, { 3.5825644137640085`*^9, 3.5825644383808517`*^9}, 3.5825645236506014`*^9, 3.582564625565581*^9, 3.5825647106637297`*^9, 3.5825647991782856`*^9, 3.5825994452255063`*^9, 3.582599562818513*^9, {3.582599598542576*^9, 3.5825996191814117`*^9}, {3.5825997261664*^9, 3.582599755354051*^9}, 3.582599968528425*^9, 3.58260003961775*^9, 3.5826003653931227`*^9, 3.582600752788603*^9, 3.5826013993473387`*^9, 3.5826017143274918`*^9, { 3.5826017560263653`*^9, 3.5826017795356064`*^9}, {3.582601954209113*^9, 3.582601977016353*^9}, 3.582603453449746*^9, 3.582608199929949*^9, 3.58260829172051*^9, 3.582610888423671*^9, 3.5826109563617907`*^9, { 3.582611003395873*^9, 3.582611077480403*^9}, 3.582611112252864*^9, { 3.5826111568845425`*^9, 3.5826112968947887`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", " ", RowBox[{"j", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", "&&", " ", RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", " ", "\"\\""}]}], ")"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5693"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5541"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5241"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "u2"}], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.57089481264865*^9}, {3.570973331551669*^9, 3.570973355887712*^9}, {3.5709734060886*^9, 3.5709734077266035`*^9}, 3.5709737061863275`*^9, {3.5712013634748197`*^9, 3.5712013661736245`*^9}, { 3.571201966837079*^9, 3.5712020689392586`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.257`", ",", "0.21522`", ",", "0.21522`", ",", "0.21522`", ",", "0.21522`", ",", "0.5693`", ",", "0.5541`", ",", "0.5541`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`", ",", "0.5693`"}], "}"}]], "Output", CellChangeTimes->{ 3.5825628299400268`*^9, 3.5825635755277367`*^9, 3.582563668160699*^9, 3.58256379364732*^9, 3.582563847826215*^9, 3.5825639198359413`*^9, 3.582564074120212*^9, 3.582564140155128*^9, 3.582564291163393*^9, { 3.5825644137796087`*^9, 3.582564438396452*^9}, 3.5825645236662016`*^9, 3.5825646255811806`*^9, 3.58256471067933*^9, 3.582564799193886*^9, 3.5825994452411065`*^9, 3.582599562834113*^9, {3.5825995985581756`*^9, 3.582599619197012*^9}, {3.5825997261819997`*^9, 3.582599755369651*^9}, 3.5825999685440254`*^9, 3.5826000396333504`*^9, 3.5826003654087224`*^9, 3.582600752788603*^9, 3.5826013993629384`*^9, 3.5826017143586917`*^9, { 3.5826017560575647`*^9, 3.5826017795356064`*^9}, {3.5826019542247133`*^9, 3.582601977047553*^9}, 3.5826034534809465`*^9, 3.582608199945549*^9, 3.5826082917361097`*^9, 3.582610888439271*^9, 3.5826109563773904`*^9, { 3.582611003411473*^9, 3.582611077496003*^9}, 3.582611112268464*^9, { 3.5826111569001427`*^9, 3.5826112969103885`*^9}}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "subtract", " ", "core", " ", "radii", " ", "from", " ", "pair", " ", "distances"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Fij", "=", RowBox[{"Dij", "-", "u2"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Fij", "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Gij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Fij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"Fij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Gij", "]"}], ";"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.567958596890297*^9, 3.567958603270708*^9}, { 3.5679587604565845`*^9, 3.5679587707682023`*^9}, {3.5679588272871017`*^9, 3.567958828254304*^9}, {3.567959580066424*^9, 3.5679595814704266`*^9}, { 3.567959624994503*^9, 3.5679596300177116`*^9}, {3.5679597079086485`*^9, 3.567959902877791*^9}, {3.5679599961659546`*^9, 3.5679600446196404`*^9}, { 3.5679609611992497`*^9, 3.567960974006872*^9}, 3.567961975154231*^9, { 3.5679622637079377`*^9, 3.5679622945179915`*^9}, 3.5681142413606625`*^9, 3.568121878697276*^9, {3.5681219332193723`*^9, 3.56812197189184*^9}, { 3.5682778370003624`*^9, 3.5682778397927675`*^9}, {3.569341165522358*^9, 3.569341165537958*^9}, {3.5693418217531104`*^9, 3.5693418217531104`*^9}, { 3.57059671735485*^9, 3.570596744467697*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"Hij", "=", RowBox[{"Transpose", "[", "Gij", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Hij", "]"}], ";"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.5679601758938704`*^9, 3.5679601965327067`*^9}, { 3.567960427147912*^9, 3.567960432217921*^9}, {3.5679605764089737`*^9, 3.5679605968294096`*^9}, {3.5679607389456596`*^9, 3.5679607643581038`*^9}, 3.5681142501278777`*^9, 3.5681218877140923`*^9, 3.569341165537958*^9, 3.5693418217531104`*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Kij", "=", RowBox[{"Hij", "-", "u2"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Kij", "]"}], ";"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Lij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Kij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"Kij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Lij", "]"}], ";"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.5679602339571724`*^9, 3.567960257419614*^9}, { 3.567960343406965*^9, 3.567960353500182*^9}, {3.5679604155258913`*^9, 3.567960421422702*^9}, {3.567960854323462*^9, 3.567960874197897*^9}, { 3.5679611596939983`*^9, 3.567961170270817*^9}, {3.5679614000124207`*^9, 3.567961407016833*^9}, {3.5679615066074076`*^9, 3.567961509649413*^9}, 3.5679616124379935`*^9, 3.5679616766477065`*^9, {3.5679617424486217`*^9, 3.5679617456310277`*^9}, 3.567961801276325*^9, {3.5679618582788253`*^9, 3.5679618970760937`*^9}, {3.5679620279135237`*^9, 3.567962030113127*^9}, 3.567962107894864*^9, {3.567962149468937*^9, 3.5679621572533503`*^9}, 3.5679623389156694`*^9, {3.567962645815009*^9, 3.567962648888214*^9}, { 3.567962691647889*^9, 3.567962693020692*^9}, {3.568048161486014*^9, 3.568048162827616*^9}, 3.5680482096900983`*^9, 3.5681142588638926`*^9, 3.568121899632513*^9, 3.5681219958534822`*^9, {3.568277844675576*^9, 3.5682778463603787`*^9}, {3.569341165537958*^9, 3.569341165537958*^9}, { 3.5693418217531104`*^9, 3.5693418217531104`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"determine", " ", "bond", " ", "cloud", " ", "radii"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Lij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[NotEqual]", "\"\\""}], ",", RowBox[{"0.5", "*", RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}], ",", RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}], "]"}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Qij", "=", "Lij"}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Lij", "]"}], ";"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.5679627617388124`*^9, 3.567962837461345*^9}, { 3.567963118121438*^9, 3.567963118698639*^9}, {3.5679631520670977`*^9, 3.5679631541731014`*^9}, {3.5679631898191643`*^9, 3.5679632154656096`*^9}, {3.5679635823158536`*^9, 3.56796361468591*^9}, { 3.567963691516045*^9, 3.567963693590849*^9}, {3.567963737957327*^9, 3.567963807299449*^9}, {3.568048114904332*^9, 3.5680481161835346`*^9}, 3.5680482221389203`*^9, {3.5680485003498087`*^9, 3.5680485123618298`*^9}, 3.5681142659931054`*^9, 3.5681219084621286`*^9, {3.568277848107582*^9, 3.5682778496519847`*^9}, {3.5683793122399254`*^9, 3.568379313019926*^9}, { 3.568379456758579*^9, 3.56837947986222*^9}, 3.5683796000760307`*^9, { 3.5683796473285136`*^9, 3.5683796831617765`*^9}, {3.568381744939398*^9, 3.5683817743298492`*^9}, {3.56846523720809*^9, 3.568465240218895*^9}, 3.569341165537958*^9, 3.5693418217531104`*^9, {3.5705967846533675`*^9, 3.5705968020785985`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"determine", " ", "kinetic", " ", "energy"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Nij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"2.25", "/", RowBox[{ RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "^", "2"}]}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "Nij", "]"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.5679628944794455`*^9, 3.5679629710755796`*^9}, { 3.567963889963994*^9, 3.567963933800071*^9}, {3.5680478391738477`*^9, 3.5680478414358516`*^9}, 3.568048231171336*^9, {3.5680482823550262`*^9, 3.56804828449223*^9}, 3.5680483349271183`*^9, 3.568114273059918*^9, 3.5681219175101447`*^9, {3.568277851305588*^9, 3.568277857295998*^9}, { 3.5688722635742655`*^9, 3.568872266616271*^9}, 3.5688723032763357`*^9, 3.5688725225503206`*^9, 3.5692365125035076`*^9, {3.5692366381461277`*^9, 3.5692366389105296`*^9}, {3.5692366963654304`*^9, 3.5692366986898346`*^9}, 3.5693411655535583`*^9, 3.5693418217687106`*^9, {3.5705968460394754`*^9, 3.5705968602823005`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Tval", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"Nij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.567963992456174*^9, 3.567964003890994*^9}, { 3.5679640974287586`*^9, 3.5679642038209453`*^9}, {3.56796433180357*^9, 3.567964353487608*^9}, {3.567964403641696*^9, 3.567964453046983*^9}, { 3.5679646160984693`*^9, 3.5679646168316708`*^9}, {3.567964688747797*^9, 3.567964762255126*^9}, {3.568277859480002*^9, 3.568277863598409*^9}, { 3.568379511358675*^9, 3.5683795129030776`*^9}, 3.5688214977895346`*^9, { 3.56882774467134*^9, 3.56882781892747*^9}}], Cell[BoxData["78.19999303770723`"], "Output", CellChangeTimes->{ 3.5825628299712267`*^9, 3.582563575558936*^9, 3.5825636681918993`*^9, 3.5825637936941195`*^9, 3.5825638478574147`*^9, 3.5825639198671412`*^9, 3.582564074151412*^9, 3.582564140186328*^9, 3.5825642911945934`*^9, { 3.582564413810809*^9, 3.582564438427652*^9}, 3.5825645236974015`*^9, 3.582564625612381*^9, 3.5825647107105303`*^9, 3.5825647992250853`*^9, 3.5825994452723064`*^9, 3.5825995628653126`*^9, {3.5825995985893755`*^9, 3.5825996192282124`*^9}, {3.5825997261976*^9, 3.5825997554008512`*^9}, 3.582599968575226*^9, 3.5826000396645503`*^9, 3.5826003654399223`*^9, 3.5826007528198028`*^9, 3.5826013993785386`*^9, 3.5826017143898916`*^9, { 3.582601756073165*^9, 3.5826017795668063`*^9}, {3.5826019542559133`*^9, 3.5826019770787535`*^9}, 3.5826034535121465`*^9, 3.5826081999767485`*^9, 3.58260829176731*^9, 3.582610888470471*^9, 3.5826109564085903`*^9, { 3.5826110034426727`*^9, 3.582611077527203*^9}, 3.5826111122996645`*^9, { 3.5826111569313426`*^9, 3.5826112969415884`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Tcor", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "\"\\""}], ",", RowBox[{"2.25", "/", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "^", "2"}]}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ 3.5688724058309155`*^9, {3.568872452646598*^9, 3.568872478480243*^9}, { 3.5688764461756124`*^9, 3.5688764647552447`*^9}, {3.5692363452556133`*^9, 3.5692363456924143`*^9}, 3.569236415892538*^9, 3.5692365043134933`*^9}], Cell[BoxData["879.906017417974`"], "Output", CellChangeTimes->{ 3.582562829986827*^9, 3.582563575558936*^9, 3.5825636681918993`*^9, 3.5825637936941195`*^9, 3.5825638478730145`*^9, 3.582563919882741*^9, 3.582564074167012*^9, 3.582564140201928*^9, 3.5825642911945934`*^9, { 3.582564413826409*^9, 3.582564438443252*^9}, 3.5825645237130017`*^9, 3.5825646256279807`*^9, 3.5825647107261305`*^9, 3.5825647992406855`*^9, 3.5825994452879066`*^9, 3.582599562880913*^9, {3.5825995985893755`*^9, 3.582599619243812*^9}, {3.5825997262131996`*^9, 3.5825997554164515`*^9}, 3.5825999685908256`*^9, 3.5826000396801505`*^9, 3.5826003654555225`*^9, 3.582600752835403*^9, 3.5826013993941383`*^9, 3.582601714405492*^9, { 3.582601756088765*^9, 3.582601779582406*^9}, {3.582601954271513*^9, 3.582601977094353*^9}, 3.582603453527746*^9, 3.5826081999923487`*^9, 3.58260829176731*^9, 3.582610888470471*^9, 3.5826109564241905`*^9, { 3.582611003458273*^9, 3.582611077527203*^9}, 3.5826111122996645`*^9, { 3.5826111569469423`*^9, 3.5826112969571886`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Ttot", "=", RowBox[{"Tval", "+", "Tcor", " ", RowBox[{"(*", " ", RowBox[{"plus", " ", "\[Pi]", " ", "and", " ", "lone", " ", RowBox[{"pairs", ":", " ", RowBox[{"+", " ", "8.7616"}]}]}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{ 3.5688724058309155`*^9, {3.568872452646598*^9, 3.568872478480243*^9}, { 3.5688764461756124`*^9, 3.568876459248435*^9}, {3.568876733122516*^9, 3.5688767685033784`*^9}, {3.568895188410715*^9, 3.5688952349923964`*^9}}], Cell[BoxData["958.1060104556813`"], "Output", CellChangeTimes->{ 3.582562830002427*^9, 3.5825635755745363`*^9, 3.5825636682074995`*^9, 3.5825637937097197`*^9, 3.5825638478886147`*^9, 3.582563919898341*^9, 3.5825640741826124`*^9, 3.5825641402175283`*^9, 3.5825642912101936`*^9, { 3.5825644138420086`*^9, 3.582564438458852*^9}, 3.5825645237130017`*^9, 3.5825646256279807`*^9, 3.5825647107261305`*^9, 3.5825647992406855`*^9, 3.5825994452879066`*^9, 3.582599562896513*^9, {3.5825995986049757`*^9, 3.582599619259412*^9}, {3.5825997262131996`*^9, 3.582599755432051*^9}, 3.5825999686064253`*^9, 3.58260003969575*^9, 3.5826003654711227`*^9, 3.5826007528510027`*^9, 3.5826013993941383`*^9, 3.582601714421092*^9, { 3.5826017561043653`*^9, 3.582601779582406*^9}, {3.582601954287113*^9, 3.582601977109953*^9}, 3.5826034535433464`*^9, 3.582608200007949*^9, 3.5826082917829103`*^9, 3.582610888486071*^9, 3.5826109564397907`*^9, { 3.582611003473873*^9, 3.5826110775428033`*^9}, 3.582611112315264*^9, { 3.5826111569625425`*^9, 3.5826112969571886`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TvalH", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], " ", "&&", " ", RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", " ", "\"\\""}]}], ")"}], ",", RowBox[{"Nij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ 3.5688724058309155`*^9, {3.568872452646598*^9, 3.568872478480243*^9}, { 3.5688764461756124`*^9, 3.568876459248435*^9}, {3.568876733122516*^9, 3.5688767642445707`*^9}}], Cell[BoxData["22.278157356064465`"], "Output", CellChangeTimes->{ 3.582562830018027*^9, 3.5825635755901365`*^9, 3.582563668223099*^9, 3.58256379372532*^9, 3.582563847904215*^9, 3.5825639199139414`*^9, 3.5825640741826124`*^9, 3.5825641402175283`*^9, 3.5825642912257934`*^9, { 3.582564413857609*^9, 3.582564438458852*^9}, 3.5825645237286015`*^9, 3.582564625643581*^9, 3.5825647107417307`*^9, 3.5825647992562857`*^9, 3.5825994453035064`*^9, 3.582599562912113*^9, {3.582599598620576*^9, 3.582599619275012*^9}, {3.5825997262288*^9, 3.582599755447651*^9}, 3.5825999686220255`*^9, 3.5826000397113504`*^9, 3.582600365486723*^9, 3.582600752866603*^9, 3.5826013994097385`*^9, 3.582601714436692*^9, { 3.5826017561199656`*^9, 3.5826017795980062`*^9}, {3.5826019543027134`*^9, 3.582601977125553*^9}, 3.5826034535589466`*^9, 3.582608200023549*^9, 3.5826082917829103`*^9, 3.5826108885016713`*^9, 3.5826109564553905`*^9, { 3.5826110034894733`*^9, 3.582611077558403*^9}, 3.582611112330864*^9, { 3.5826111569781427`*^9, 3.5826112969727883`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TvalC", "=", RowBox[{"Tval", "-", "TvalH"}]}]], "Input", CellChangeTimes->{{3.5688726088808727`*^9, 3.568872610581275*^9}, { 3.5688726952426243`*^9, 3.5688727146490583`*^9}}], Cell[BoxData["55.92183568164276`"], "Output", CellChangeTimes->{ 3.582562830033627*^9, 3.5825635756057367`*^9, 3.582563668238699*^9, 3.5825637937409196`*^9, 3.582563847919815*^9, 3.582563919929541*^9, 3.582564074198212*^9, 3.5825641402331285`*^9, 3.5825642912257934`*^9, { 3.582564413873209*^9, 3.582564438474452*^9}, 3.5825645237442017`*^9, 3.5825646256591806`*^9, 3.5825647107573304`*^9, 3.5825647992562857`*^9, 3.582599445319106*^9, 3.582599562927713*^9, {3.5825995986361756`*^9, 3.582599619290612*^9}, {3.5825997262444*^9, 3.582599755447651*^9}, 3.5825999686376257`*^9, 3.5826000397269506`*^9, 3.5826003655023227`*^9, 3.582600752866603*^9, 3.5826013994253387`*^9, 3.582601714452292*^9, { 3.5826017561355653`*^9, 3.5826017796136065`*^9}, {3.582601954318313*^9, 3.5826019771411533`*^9}, 3.582603453574547*^9, 3.5826082000391493`*^9, 3.5826082917985106`*^9, 3.582610888517271*^9, 3.58261095647099*^9, { 3.5826110035050735`*^9, 3.582611077574003*^9}, 3.582611112346464*^9, { 3.582611156993743*^9, 3.5826112969883885`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"{", "i", "}"}], ",", RowBox[{"{", RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "}"}], ",", RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.575216940828384*^9, 3.575216956366011*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "\<\"C\"\>", RowBox[{"-", "5.049725817200001`"}], RowBox[{"-", "0.91402267168`"}], RowBox[{"-", "2.5171150319999995`"}]}, {"2", "\<\"C\"\>", RowBox[{"-", "2.6272860577999997`"}], "2.5212724291999997`", RowBox[{"-", "4.403250552599999`"}]}, {"3", "\<\"C\"\>", RowBox[{"-", "4.5039729483999995`"}], RowBox[{"-", "3.4179474162`"}], "0.8334447550399999`"}, {"4", "\<\"C\"\>", "1.22233146858`", "4.123382132`", RowBox[{"-", "3.7660349453999995`"}]}, {"5", "\<\"C\"\>", RowBox[{"-", "4.7568182872`"}], "0.98713617062`", RowBox[{"-", "4.3059296636`"}]}, {"6", "\<\"C\"\>", RowBox[{"-", "7.1359833211999995`"}], RowBox[{"-", "2.5583110587999998`"}], RowBox[{"-", "2.370661267`"}]}, {"7", "\<\"C\"\>", RowBox[{"-", "2.2769308574`"}], "4.528350413799999`", RowBox[{"-", "6.114208473`"}]}, {"8", "\<\"C\"\>", RowBox[{"-", "6.8062261342`"}], RowBox[{"-", "4.0861545298`"}], RowBox[{"-", "0.33310200201999995`"}]}, {"9", "\<\"C\"\>", "0.068872953796`", "5.500047523`", RowBox[{"-", "5.7339956018`"}]}, {"10", "\<\"C\"\>", RowBox[{"-", "3.5763064549999997`"}], RowBox[{"-", "4.5270276056`"}], "3.0061761208`"}, {"11", "\<\"C\"\>", "3.6592654263999997`", "4.514555414`", RowBox[{"-", "2.9160361906`"}]}, {"12", "\<\"C\"\>", RowBox[{"-", "1.2626582214199997`"}], RowBox[{"-", "3.8586315194`"}], "4.1126106938`"}, {"13", "\<\"C\"\>", "4.7570072598`", "3.1382679681999996`", RowBox[{"-", "0.9369072535399999`"}]}, {"14", "\<\"C\"\>", "2.521839347`", RowBox[{"-", "2.296961953`"}], "4.674237261`"}, {"15", "\<\"C\"\>", "5.2753591016`", "0.6256504840799999`", "2.3041429118`"}, {"16", "\<\"C\"\>", "4.8012268482`", RowBox[{"-", "1.0379886972799999`"}], "4.2900559652`"}, {"17", "\<\"C\"\>", RowBox[{"-", "0.35109219354`"}], RowBox[{"-", "4.8598083542`"}], "6.5325938094`"}, {"18", "\<\"C\"\>", "7.3990331804`", "3.4187033066`", RowBox[{"-", "0.136744352812`"}]}, {"19", "\<\"C\"\>", "1.9895035328`", RowBox[{"-", "3.8988826831999996`"}], "6.881248256399999`"}, {"20", "\<\"C\"\>", "7.7193417374`", "1.86757841128`", "1.8664445756799999`"}, {"21", "\<\"N\"\>", RowBox[{"-", "3.4160576902`"}], RowBox[{"-", "1.5166562930799998`"}], RowBox[{"-", "0.5838308476999999`"}]}, {"22", "\<\"N\"\>", RowBox[{"-", "0.49444680789999995`"}], "2.349874281`", RowBox[{"-", "2.9232171493999997`"}]}, {"23", "\<\"N\"\>", "0.47241260273999996`", RowBox[{"-", "2.281844145`"}], "3.200250981`"}, {"24", "\<\"N\"\>", "3.6643676866`", "1.4056726851`", "0.5243989649999999`"}, {"25", "\<\"H\"\>", RowBox[{"-", "6.2432767587999995`"}], "1.28516485808`", RowBox[{"-", "5.6723905342`"}]}, {"26", "\<\"H\"\>", RowBox[{"-", "1.7848084124799999`"}], RowBox[{"-", "0.74092377008`"}], RowBox[{"-", "0.27217723577999997`"}]}, {"27", "\<\"H\"\>", RowBox[{"-", "0.24194161978`"}], "1.18512276364`", RowBox[{"-", "1.53041349836`"}]}, {"28", "\<\"H\"\>", RowBox[{"-", "8.7222193256`"}], RowBox[{"-", "2.5987511952`"}], RowBox[{"-", "3.6539741936`"}]}, {"29", "\<\"H\"\>", RowBox[{"-", "3.6331872076`"}], "5.1765264318`", RowBox[{"-", "7.494653316`"}]}, {"30", "\<\"H\"\>", RowBox[{"-", "8.0821691294`"}], RowBox[{"-", "5.5542826592`"}], "0.28453604382`"}, {"31", "\<\"H\"\>", "0.90209850062`", "7.057181747`", RowBox[{"-", "6.757093258199999`"}]}, {"32", "\<\"H\"\>", RowBox[{"-", "4.691244794999999`"}], RowBox[{"-", "5.9841953242`"}], "3.9002054913999995`"}, {"33", "\<\"H\"\>", "4.7787391088`", "5.958872995799999`", RowBox[{"-", "3.824805424`"}]}, {"34", "\<\"H\"\>", "6.3073384701999995`", RowBox[{"-", "1.3744733088399999`"}], "5.625525329399999`"}, {"35", "\<\"H\"\>", RowBox[{"-", "1.35412095982`"}], RowBox[{"-", "6.117043062`"}], "7.7888836542`"}, {"36", "\<\"H\"\>", "8.8095246668`", "4.6271830836`", RowBox[{"-", "0.9830354652`"}]}, {"37", "\<\"H\"\>", "3.2261402271999997`", RowBox[{"-", "4.2413010344`"}], "8.4684291238`"}, {"38", "\<\"H\"\>", "9.435779863199999`", "1.59507992208`", "2.9366342039999997`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.5825628300492268`*^9, 3.5825635756213365`*^9, 3.582563668238699*^9, 3.5825637937565193`*^9, 3.582563847935415*^9, 3.5825639199451413`*^9, 3.5825640742138124`*^9, 3.5825641402487283`*^9, 3.582564291241393*^9, { 3.5825644138888087`*^9, 3.582564438490052*^9}, 3.582564523759802*^9, 3.5825646256591806`*^9, 3.5825647107573304`*^9, 3.582564799271886*^9, 3.5825994453347063`*^9, 3.5825995629433126`*^9, {3.5825995986517754`*^9, 3.582599619290612*^9}, {3.5825997262444*^9, 3.582599755463251*^9}, 3.582599968653226*^9, 3.5826000397425504`*^9, 3.582600365517923*^9, 3.582600752882203*^9, 3.5826013994253387`*^9, 3.5826017144678917`*^9, { 3.5826017561355653`*^9, 3.5826017796136065`*^9}, {3.582601954333913*^9, 3.5826019771567535`*^9}, 3.5826034536057463`*^9, 3.5826082000547495`*^9, 3.5826082918141103`*^9, 3.582610888517271*^9, 3.5826109564865904`*^9, { 3.5826110035206733`*^9, 3.582611077574003*^9}, 3.582611112346464*^9, { 3.582611156993743*^9, 3.5826112970039883`*^9}}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"Mij", "=", RowBox[{"Prepend", "[", RowBox[{"Qij", ",", "u"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Oij", "=", RowBox[{"Transpose", "[", "Mij", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Pij", "=", RowBox[{"Prepend", "[", RowBox[{"Oij", ",", RowBox[{"Prepend", "[", RowBox[{"u", ",", "\"\< \>\""}], "]"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, 3.572624583643982*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"con", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", "i", "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";", " ", RowBox[{"conj", "=", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", "nc", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "n"}], ",", RowBox[{"j", "++"}], ",", RowBox[{"If", "[", " ", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", ",", RowBox[{ RowBox[{"con", "[", RowBox[{"[", "i", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"con", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "j"}], "}"}]}]}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"conn", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"con", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "identify", " ", "C", " ", "atoms", " ", "at", " ", "double", " ", "bonds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"j", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"conn", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", "4"}], ",", RowBox[{ RowBox[{"j", "=", RowBox[{"j", "+", "1"}]}], ";", RowBox[{ RowBox[{"conj", "[", RowBox[{"[", "j", "]"}], "]"}], "=", "i"}]}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"conj", "=", RowBox[{"Take", "[", RowBox[{"conj", ",", RowBox[{"{", RowBox[{"1", ",", "j"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"nj", "=", RowBox[{"Length", "[", "conj", "]"}]}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"conn", ",", " ", RowBox[{"TableAlignments", "\[Rule]", "Left"}]}], "]"}]}], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, { 3.572624511540655*^9, 3.5726245129758577`*^9}, {3.5726259545431895`*^9, 3.5726259555883913`*^9}, {3.5726268385811424`*^9, 3.5726268436979513`*^9}, {3.5727156260686264`*^9, 3.5727156464110622`*^9}, 3.572767008717453*^9, 3.572767169428935*^9, {3.5727947272385855`*^9, 3.5727947348669987`*^9}, {3.5818319134413815`*^9, 3.5818319360614214`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20"}], "}"}]], "Output", CellChangeTimes->{ 3.582562830064827*^9, 3.582563575636936*^9, 3.5825636682698994`*^9, 3.5825637937877197`*^9, 3.5825638479510145`*^9, 3.582563919960741*^9, 3.582564074229412*^9, 3.5825641402643285`*^9, 3.5825642912569933`*^9, { 3.5825644139200087`*^9, 3.582564438505652*^9}, 3.582564523775402*^9, 3.582564625674781*^9, 3.58256471077293*^9, 3.582564799287486*^9, 3.5825994453503065`*^9, 3.582599562958913*^9, {3.5825995986673756`*^9, 3.5825996193218117`*^9}, {3.58259972626*^9, 3.5825997554788513`*^9}, 3.5825999686844254`*^9, 3.58260003975815*^9, 3.5826003655335226`*^9, 3.5826007528978033`*^9, 3.582601399440939*^9, 3.582601714483492*^9, { 3.582601756166765*^9, 3.5826017796448064`*^9}, {3.5826019543651133`*^9, 3.5826019771879535`*^9}, 3.5826034536213465`*^9, 3.582608200070349*^9, 3.58260829182971*^9, 3.5826108885484715`*^9, 3.582610956517791*^9, { 3.582611003551873*^9, 3.582611077605203*^9}, 3.5826111123776646`*^9, { 3.582611157024943*^9, 3.5826112970195885`*^9}}], Cell[BoxData["20"], "Output", CellChangeTimes->{ 3.582562830064827*^9, 3.582563575636936*^9, 3.5825636682698994`*^9, 3.5825637937877197`*^9, 3.5825638479510145`*^9, 3.582563919960741*^9, 3.582564074229412*^9, 3.5825641402643285`*^9, 3.5825642912569933`*^9, { 3.5825644139200087`*^9, 3.582564438505652*^9}, 3.582564523775402*^9, 3.582564625674781*^9, 3.58256471077293*^9, 3.582564799287486*^9, 3.5825994453503065`*^9, 3.582599562958913*^9, {3.5825995986673756`*^9, 3.5825996193218117`*^9}, {3.58259972626*^9, 3.5825997554788513`*^9}, 3.5825999686844254`*^9, 3.58260003975815*^9, 3.5826003655335226`*^9, 3.5826007528978033`*^9, 3.582601399440939*^9, 3.582601714483492*^9, { 3.582601756166765*^9, 3.5826017796448064`*^9}, {3.5826019543651133`*^9, 3.5826019771879535`*^9}, 3.5826034536213465`*^9, 3.582608200070349*^9, 3.58260829182971*^9, 3.5826108885484715`*^9, 3.582610956517791*^9, { 3.582611003551873*^9, 3.582611077605203*^9}, 3.5826111123776646`*^9, { 3.582611157024943*^9, 3.5826112970195885`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{"{", RowBox[{"1", ",", "5", ",", "6", ",", "21"}], "}"}]}, { RowBox[{"{", RowBox[{"2", ",", "5", ",", "7", ",", "22"}], "}"}]}, { RowBox[{"{", RowBox[{"3", ",", "8", ",", "10", ",", "21"}], "}"}]}, { RowBox[{"{", RowBox[{"4", ",", "9", ",", "11", ",", "22"}], "}"}]}, { RowBox[{"{", RowBox[{"5", ",", "1", ",", "2", ",", "25"}], "}"}]}, { RowBox[{"{", RowBox[{"6", ",", "1", ",", "8", ",", "28"}], "}"}]}, { RowBox[{"{", RowBox[{"7", ",", "2", ",", "9", ",", "29"}], "}"}]}, { RowBox[{"{", RowBox[{"8", ",", "3", ",", "6", ",", "30"}], "}"}]}, { RowBox[{"{", RowBox[{"9", ",", "4", ",", "7", ",", "31"}], "}"}]}, { RowBox[{"{", RowBox[{"10", ",", "3", ",", "12", ",", "32"}], "}"}]}, { RowBox[{"{", RowBox[{"11", ",", "4", ",", "13", ",", "33"}], "}"}]}, { RowBox[{"{", RowBox[{"12", ",", "10", ",", "17", ",", "23"}], "}"}]}, { RowBox[{"{", RowBox[{"13", ",", "11", ",", "18", ",", "24"}], "}"}]}, { RowBox[{"{", RowBox[{"14", ",", "16", ",", "19", ",", "23"}], "}"}]}, { RowBox[{"{", RowBox[{"15", ",", "16", ",", "20", ",", "24"}], "}"}]}, { RowBox[{"{", RowBox[{"16", ",", "14", ",", "15", ",", "34"}], "}"}]}, { RowBox[{"{", RowBox[{"17", ",", "12", ",", "19", ",", "35"}], "}"}]}, { RowBox[{"{", RowBox[{"18", ",", "13", ",", "20", ",", "36"}], "}"}]}, { RowBox[{"{", RowBox[{"19", ",", "14", ",", "17", ",", "37"}], "}"}]}, { RowBox[{"{", RowBox[{"20", ",", "15", ",", "18", ",", "38"}], "}"}]}, { RowBox[{"{", RowBox[{"21", ",", "1", ",", "3", ",", "26"}], "}"}]}, { RowBox[{"{", RowBox[{"22", ",", "2", ",", "4", ",", "27"}], "}"}]}, { RowBox[{"{", RowBox[{"23", ",", "12", ",", "14"}], "}"}]}, { RowBox[{"{", RowBox[{"24", ",", "13", ",", "15"}], "}"}]}, { RowBox[{"{", RowBox[{"25", ",", "5"}], "}"}]}, { RowBox[{"{", RowBox[{"26", ",", "21"}], "}"}]}, { RowBox[{"{", RowBox[{"27", ",", "22"}], "}"}]}, { RowBox[{"{", RowBox[{"28", ",", "6"}], "}"}]}, { RowBox[{"{", RowBox[{"29", ",", "7"}], "}"}]}, { RowBox[{"{", RowBox[{"30", ",", "8"}], "}"}]}, { RowBox[{"{", RowBox[{"31", ",", "9"}], "}"}]}, { RowBox[{"{", RowBox[{"32", ",", "10"}], "}"}]}, { RowBox[{"{", RowBox[{"33", ",", "11"}], "}"}]}, { RowBox[{"{", RowBox[{"34", ",", "16"}], "}"}]}, { RowBox[{"{", RowBox[{"35", ",", "17"}], "}"}]}, { RowBox[{"{", RowBox[{"36", ",", "18"}], "}"}]}, { RowBox[{"{", RowBox[{"37", ",", "19"}], "}"}]}, { RowBox[{"{", RowBox[{"38", ",", "20"}], "}"}]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$, TableAlignments -> Left]]]], "Output", CellChangeTimes->{ 3.582562830064827*^9, 3.582563575636936*^9, 3.5825636682698994`*^9, 3.5825637937877197`*^9, 3.5825638479510145`*^9, 3.582563919960741*^9, 3.582564074229412*^9, 3.5825641402643285`*^9, 3.5825642912569933`*^9, { 3.5825644139200087`*^9, 3.582564438505652*^9}, 3.582564523775402*^9, 3.582564625674781*^9, 3.58256471077293*^9, 3.582564799287486*^9, 3.5825994453503065`*^9, 3.582599562958913*^9, {3.5825995986673756`*^9, 3.5825996193218117`*^9}, {3.58259972626*^9, 3.5825997554788513`*^9}, 3.5825999686844254`*^9, 3.58260003975815*^9, 3.5826003655335226`*^9, 3.5826007528978033`*^9, 3.582601399440939*^9, 3.582601714483492*^9, { 3.582601756166765*^9, 3.5826017796448064`*^9}, {3.5826019543651133`*^9, 3.5826019771879535`*^9}, 3.5826034536213465`*^9, 3.582608200070349*^9, 3.58260829182971*^9, 3.5826108885484715`*^9, 3.582610956517791*^9, { 3.582611003551873*^9, 3.582611077605203*^9}, 3.5826111123776646`*^9, { 3.582611157024943*^9, 3.5826112970195885`*^9}}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{ "c", ",", "v", ",", "p", ",", "Q", ",", "P", ",", "v1", ",", "v2", ",", "nk", ",", "nl"}], "]"}], ";"}], " ", RowBox[{"(*", RowBox[{ RowBox[{"c1", "=", "20"}], ";", " ", RowBox[{"c2", "=", "21"}], ";", " ", RowBox[{"c3", "=", "51"}], ";"}], "*)"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"rpo", "=", "1.4"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"rpi", "=", "1.4"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpo", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"nj", "+", "4"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpu", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"nj", "+", "4"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"P", "=", "3"}], ";", " ", RowBox[{"c", "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{ "--", "--"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]\ }]}]}]}]}]}]}]}]}]}]}]}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", " ", RowBox[{ "construct", " ", "the", " ", "\[Pi]", " ", "clouds", " ", "for", " ", "C", " ", "atoms"}], " ", "*)"}]}]}], "Input", CellChangeTimes->{{3.568108824079547*^9, 3.568109012824279*^9}, { 3.568109558076436*^9, 3.568109588168889*^9}, {3.5681097523435774`*^9, 3.5681097637783976`*^9}, {3.5681100381828794`*^9, 3.5681101616726966`*^9}, {3.5681102015307665`*^9, 3.5681102288464146`*^9}, {3.568110263743676*^9, 3.568110267331682*^9}, { 3.5681103163469687`*^9, 3.5681103268925867`*^9}, {3.5681106443375444`*^9, 3.5681106916368275`*^9}, 3.568110873002746*^9, {3.5681109388660617`*^9, 3.5681110268970165`*^9}, {3.568111092526332*^9, 3.568111123461186*^9}, { 3.5681111884196997`*^9, 3.568111192756508*^9}, {3.5681112268113675`*^9, 3.568111366213212*^9}, {3.568111434946933*^9, 3.568111463354583*^9}, { 3.568111544396725*^9, 3.568111547625931*^9}, {3.5681116856081734`*^9, 3.5681117131422215`*^9}, {3.568111864696488*^9, 3.5681119835998964`*^9}, 3.5681120218355637`*^9, {3.56811206543764*^9, 3.568112066389242*^9}, { 3.568112332369709*^9, 3.5681123404505234`*^9}, {3.568112505935614*^9, 3.56811251481203*^9}, {3.5681125623609133`*^9, 3.568112569006525*^9}, { 3.568112648067464*^9, 3.568112734210815*^9}, {3.568112764443668*^9, 3.5681127697320776`*^9}, {3.5681128018681335`*^9, 3.568112843426607*^9}, { 3.568112884641879*^9, 3.5681128887602863`*^9}, {3.5681129663080225`*^9, 3.5681129699584293`*^9}, {3.568113133789917*^9, 3.568113227936082*^9}, { 3.5681132946885996`*^9, 3.5681133044698167`*^9}, {3.568113502200164*^9, 3.568113507348173*^9}, 3.56811354556824*^9, {3.5681222886191964`*^9, 3.5681222896019983`*^9}, {3.568207424138049*^9, 3.5682074415164795`*^9}, 3.568277923134914*^9, 3.568883508322016*^9, 3.568883588350157*^9, 3.5688836441982546`*^9, {3.5703421313965206`*^9, 3.5703421386505337`*^9}, { 3.570342288098796*^9, 3.5703424924279547`*^9}, 3.5709745658726373`*^9, 3.5709746291463485`*^9, {3.5709747534473667`*^9, 3.5709747617933817`*^9}, { 3.5709749537361183`*^9, 3.570975034747061*^9}, {3.5709751055243855`*^9, 3.5709751213584127`*^9}, {3.5709751694532976`*^9, 3.570975200060551*^9}, { 3.571073358435503*^9, 3.5710734289632273`*^9}, {3.571204792969243*^9, 3.571204820940092*^9}, {3.5712048565705547`*^9, 3.571204860002561*^9}, 3.571204896881026*^9, {3.571204943556308*^9, 3.571204987485985*^9}, 3.5712053579722357`*^9, 3.5712054148187356`*^9, 3.5712055260469313`*^9, { 3.571205631237916*^9, 3.5712056608311677`*^9}, {3.571206377683627*^9, 3.5712064172296963`*^9}, {3.571206525727887*^9, 3.571206547427525*^9}, { 3.5712066764397516`*^9, 3.5712067106974115`*^9}, {3.571206757949895*^9, 3.5712067585114956`*^9}, {3.5712073458681273`*^9, 3.571207357053347*^9}, { 3.5712075532392917`*^9, 3.5712076608170805`*^9}, {3.571208007434089*^9, 3.571208247690111*^9}, {3.571208301057805*^9, 3.5712083308850574`*^9}, { 3.571208811958702*^9, 3.571208871488407*^9}, {3.5712089993618317`*^9, 3.5712089996582317`*^9}, {3.5712091105588264`*^9, 3.571209160744115*^9}, { 3.5712092989135575`*^9, 3.5712093003643603`*^9}, {3.571209369940482*^9, 3.5712093926073227`*^9}, {3.5712094586578383`*^9, 3.5712094836958823`*^9}, {3.5712104228175316`*^9, 3.571210434267952*^9}, 3.571210475358424*^9, 3.5712108629099045`*^9, {3.571210903969177*^9, 3.5712109929361334`*^9}, {3.5712110295961976`*^9, 3.5712110392214146`*^9}, {3.571211240071767*^9, 3.5712112940946617`*^9}, { 3.571211404496056*^9, 3.5712114190976815`*^9}, {3.5712115264882703`*^9, 3.5712115363942876`*^9}, {3.571211575924757*^9, 3.5712116183724318`*^9}, { 3.5712116597281046`*^9, 3.571211695062166*^9}, {3.5712117551222715`*^9, 3.5712117807531166`*^9}, {3.571211826835598*^9, 3.5712118443232284`*^9}, { 3.571211962540236*^9, 3.5712119670174437`*^9}, 3.5712123580321307`*^9, { 3.5712123994658036`*^9, 3.571212411181424*^9}, {3.5712172605092583`*^9, 3.571217297153723*^9}, {3.571223622762637*^9, 3.57122364145147*^9}, { 3.5712237454256525`*^9, 3.571223750745262*^9}, {3.571223964808838*^9, 3.571224009097316*^9}, {3.57122674689975*^9, 3.5712267784742055`*^9}, { 3.5712269848157682`*^9, 3.57122698582977*^9}, {3.5712270624259043`*^9, 3.5712270629563055`*^9}, {3.571227212438168*^9, 3.571227212999769*^9}, { 3.571227409778515*^9, 3.5712274489969835`*^9}, {3.571227502177477*^9, 3.571227514127098*^9}, {3.57122758356282*^9, 3.5712276390521173`*^9}, 3.5712276745889797`*^9, {3.571227712746647*^9, 3.5712277584703274`*^9}, { 3.5712349496076813`*^9, 3.571234988008148*^9}, {3.5712351855668955`*^9, 3.5712353359043593`*^9}, {3.5712355859883986`*^9, 3.571235653661318*^9}, { 3.5712356890109797`*^9, 3.571235702208603*^9}, {3.5712449764989214`*^9, 3.5712449799309273`*^9}, {3.5712450401778336`*^9, 3.571245051456653*^9}, { 3.5712450868687153`*^9, 3.5712450934831266`*^9}, {3.571299135517318*^9, 3.571299166342972*^9}, {3.5713069890574045`*^9, 3.5713071726697273`*^9}, { 3.571307301791154*^9, 3.571307304536759*^9}, {3.571307397731323*^9, 3.571307405702937*^9}, {3.571311846659932*^9, 3.5713118507939396`*^9}, { 3.571317129094411*^9, 3.5713171472216425`*^9}, {3.5713172653138494`*^9, 3.5713172753602676`*^9}, {3.5713216932693615`*^9, 3.5713216983081703`*^9}, {3.5713370477995405`*^9, 3.5713370593279605`*^9}, {3.571404339740199*^9, 3.5714046172178864`*^9}, { 3.571404755449729*^9, 3.571404853246301*^9}, {3.571405069743481*^9, 3.571405208989326*^9}, {3.571405268612631*^9, 3.571405277442246*^9}, { 3.5714053796536255`*^9, 3.5714054114932814`*^9}, {3.571405595448805*^9, 3.5714056194884467`*^9}, {3.5714056687221336`*^9, 3.571405677660949*^9}, 3.5714067334520035`*^9, {3.57140676532286*^9, 3.5714067706580687`*^9}, { 3.571406950729185*^9, 3.571406989495253*^9}, {3.5714071848855963`*^9, 3.571407190579606*^9}, 3.5714072350240846`*^9, {3.571412503236558*^9, 3.5714125080413666`*^9}, {3.571412540879424*^9, 3.571412607787942*^9}, { 3.571412668378448*^9, 3.5714128101202965`*^9}, {3.5714128643147917`*^9, 3.571412873862009*^9}, {3.571412908150869*^9, 3.57141290869687*^9}, { 3.571413012374652*^9, 3.5714130213290677`*^9}, {3.571413054603926*^9, 3.5714130713583555`*^9}, 3.5714133323156137`*^9, {3.571730171730853*^9, 3.571730182494872*^9}, {3.5717303501171665`*^9, 3.5717303600855846`*^9}, { 3.5717305482375145`*^9, 3.5717305527147226`*^9}, {3.571760865342704*^9, 3.5717608700695124`*^9}, {3.57176111957635*^9, 3.5717611228835564`*^9}, 3.571761174316847*^9, {3.5717620076459103`*^9, 3.571762008441512*^9}, { 3.571765525077688*^9, 3.571765573718574*^9}, {3.572601603410675*^9, 3.572601639665139*^9}, {3.57260238631365*^9, 3.5726023989340725`*^9}, 3.5726046985809116`*^9, {3.5726052623971024`*^9, 3.572605269729115*^9}, { 3.572606450370389*^9, 3.5726064833176465`*^9}, {3.5726065169513054`*^9, 3.572606523955718*^9}, {3.5726066452459307`*^9, 3.572606662468361*^9}, { 3.5726068118542233`*^9, 3.5726068309330573`*^9}, {3.5726082044218693`*^9, 3.5726082108178806`*^9}, {3.5726129520308228`*^9, 3.5726129692220526`*^9}, {3.5726130228861475`*^9, 3.5726130532750006`*^9}, {3.572624083881504*^9, 3.572624093631521*^9}, { 3.5726247901883445`*^9, 3.572624801233164*^9}, {3.5726249931759005`*^9, 3.572625014937939*^9}, {3.572626882386019*^9, 3.5726268865668263`*^9}, { 3.5726673740642943`*^9, 3.572667386154316*^9}, {3.572707186162225*^9, 3.5727071892978306`*^9}, {3.5727073766385593`*^9, 3.5727073777617617`*^9}, 3.5727091442464643`*^9, 3.572709305488347*^9, {3.5727105300904984`*^9, 3.5727105312605004`*^9}, 3.5727107350904584`*^9, 3.5727108467086544`*^9, 3.572710916331577*^9, {3.5728420867264705`*^9, 3.5728421164913225`*^9}, { 3.572850453192765*^9, 3.5728504884332275`*^9}, {3.5731485879383316`*^9, 3.5731485959879456`*^9}, {3.5731825263710723`*^9, 3.573182535403488*^9}, { 3.5740881383930283`*^9, 3.5740881415442333`*^9}, {3.574133050043051*^9, 3.5741330901351213`*^9}, {3.574133304276697*^9, 3.5741333056182995`*^9}, { 3.5741334325089226`*^9, 3.5741334353481274`*^9}, {3.574484489607682*^9, 3.574484492602887*^9}, {3.5818294301822195`*^9, 3.5818294332398252`*^9}, { 3.5825636567102785`*^9, 3.582563659299884*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"c", "=", RowBox[{"conn", "[", RowBox[{"[", RowBox[{"conj", "[", RowBox[{"[", "k", "]"}], "]"}], "]"}], "]"}]}], ";", "\n", RowBox[{"c", "=", RowBox[{"Take", "[", RowBox[{"c", ",", "P"}], "]"}]}], ";", "\n", RowBox[{"v", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"x2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"y2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"z2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "3"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"-", "x2"}], ",", RowBox[{"-", "y2"}], ",", RowBox[{"-", "z2"}], ",", "1"}], "}"}]}], "}"}]}], ";", "\n", RowBox[{"p", "=", RowBox[{"v", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"T1", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T1", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"T2", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T2", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"T3", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T3", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Chop", "[", RowBox[{"U", ".", "T"}], "]"}]}], ";", "\n", RowBox[{"mk", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{"ml", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"mk", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "=", "rpo"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ml", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "=", RowBox[{"-", "rpi"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "mk"}], ";", "\[IndentingNewLine]", RowBox[{"U2", "=", "ml"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T3"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"mk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"ml", "=", RowBox[{"U2", ".", "T"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "mk"}], ";", "\[IndentingNewLine]", RowBox[{"U2", "=", "ml"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T2"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"mk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"ml", "=", RowBox[{"U2", ".", "T"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "mk"}], ";", "\[IndentingNewLine]", RowBox[{"U2", "=", "ml"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T1"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"mk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"ml", "=", RowBox[{"U2", ".", "T"}]}], ";", "\n", RowBox[{"Clear", "[", RowBox[{"v", ",", "v1", ",", "v2"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"v", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"mk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"ml", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"Q", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"x2", ",", "y2", ",", "z2", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"v", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"mk", "=", RowBox[{"v1", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"ml", "=", RowBox[{"v2", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mk", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"mk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ml", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"ml", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"tpo", "[", RowBox[{"[", "k", "]"}], "]"}], "=", RowBox[{"mk", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"tpu", "[", RowBox[{"[", "k", "]"}], "]"}], "=", RowBox[{"ml", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], ")"}], ",", RowBox[{"{", RowBox[{"k", ",", "nj"}], "}"}]}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, 3.5731486865617046`*^9, {3.5731490505259438`*^9, 3.573149068278775*^9}, { 3.573149110008848*^9, 3.573149243825884*^9}, {3.5731493138232064`*^9, 3.5731493450700617`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{ "--", "-"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}\ ]}]}]}]}]}]}]}]}]}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "construct", " ", "the", " ", "\[Pi]", " ", "clouds", " ", "for", " ", "four", " ", "N", " ", "atom"}], " ", "*)"}]}]], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.573148680368494*^9}, {3.574133119104372*^9, 3.574133144033216*^9}, { 3.574133281157457*^9, 3.574133289987072*^9}, 3.574484169323519*^9, { 3.581829332635248*^9, 3.581829338001658*^9}, {3.582563172563429*^9, 3.58256317331223*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"k", "=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Clear", "[", "conn", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"conn", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"21", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "2", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "12", ",", "14"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "13", ",", "15"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"rln", "=", "1.246"}], ";"}]}], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.573148784124276*^9}, {3.573148880017645*^9, 3.5731489260377254`*^9}, { 3.573148979499019*^9, 3.5731489938822446`*^9}, {3.5731506972804365`*^9, 3.5731506982476377`*^9}, {3.573150757387342*^9, 3.5731507583389435`*^9}, { 3.57315079601301*^9, 3.5731508056382265`*^9}, {3.573151607464035*^9, 3.5731516101004395`*^9}, {3.5731826853813925`*^9, 3.57318272377306*^9}, 3.573183074758076*^9, {3.573206537871501*^9, 3.5732065516931257`*^9}, 3.574070559848399*^9, {3.574484313920173*^9, 3.574484362093058*^9}, { 3.5818293114972115`*^9, 3.5818293211536283`*^9}, {3.582563185839052*^9, 3.582563222779917*^9}, {3.5826032650014153`*^9, 3.5826032662494173`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"c", "=", RowBox[{"conn", "[", RowBox[{"[", "k", "]"}], "]"}]}], ";", "\n", RowBox[{"v", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"x2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"y2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"z2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "3"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"-", "x2"}], ",", RowBox[{"-", "y2"}], ",", RowBox[{"-", "z2"}], ",", "1"}], "}"}]}], "}"}]}], ";", "\n", RowBox[{"p", "=", RowBox[{"v", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"T1", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T1", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"T2", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T2", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"T3", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T3", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Chop", "[", RowBox[{"U", ".", "T"}], "]"}]}], ";", "\n", RowBox[{"nk", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "=", "rln"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "=", RowBox[{"-", "rln"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "nk"}], ";", "\[IndentingNewLine]", RowBox[{"U2", "=", "nl"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T3"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"nk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", RowBox[{"U2", ".", "T"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "nk"}], ";", "\[IndentingNewLine]", RowBox[{"U2", "=", "nl"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T2"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"nk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", RowBox[{"U2", ".", "T"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "nk"}], ";", "\[IndentingNewLine]", RowBox[{"U2", "=", "nl"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T1"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"nk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", RowBox[{"U2", ".", "T"}]}], ";", "\n", RowBox[{"Clear", "[", RowBox[{"v", ",", "v1", ",", "v2"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"v", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"Q", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"x2", ",", "y2", ",", "z2", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"v", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"nk", "=", RowBox[{"v1", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", RowBox[{"v2", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nk", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"tpo", "[", RowBox[{"[", RowBox[{"nj", "+", "k"}], "]"}], "]"}], "=", RowBox[{"nk", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"tpu", "[", RowBox[{"[", RowBox[{"nj", "+", "k"}], "]"}], "]"}], "=", RowBox[{"nl", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], ")"}], ",", RowBox[{"{", RowBox[{"k", ",", "4"}], "}"}]}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.573148784124276*^9}, {3.573148880017645*^9, 3.5731489260377254`*^9}, { 3.573148979499019*^9, 3.5731489938822446`*^9}, {3.5731506972804365`*^9, 3.5731506982476377`*^9}, {3.573150757387342*^9, 3.5731507583389435`*^9}, { 3.57315079601301*^9, 3.5731508056382265`*^9}, {3.573151607464035*^9, 3.5731516101004395`*^9}, {3.5731826853813925`*^9, 3.57318272377306*^9}, { 3.573183074758076*^9, 3.5731830995309196`*^9}, {3.573183400018647*^9, 3.573183403669054*^9}, {3.5740705690368156`*^9, 3.574070569988417*^9}, { 3.574075420473737*^9, 3.574075431518556*^9}, {3.57448439193591*^9, 3.574484392981112*^9}, 3.581829347424074*^9, {3.582562987999504*^9, 3.582562988857506*^9}, {3.582603230057354*^9, 3.582603238403369*^9}}], Cell[BoxData[ StyleBox[ RowBox[{ RowBox[{"(*", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{ "--", "-"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}\ ]}]}]}]}]}]}]}]}]}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"next", ":", " ", "N21"}], " ", ",", "22", ",", "23", ",", "24", ",", RowBox[{ "four", " ", "doubly", " ", "occ", " ", "LP", " ", "as", " ", "sp2", " ", "ligand"}]}], " ", "*)"}]}], "Text"]], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.57314870088253*^9}, {3.5740711445842266`*^9, 3.5740711934435124`*^9}, { 3.5740712484648085`*^9, 3.574071311114519*^9}, {3.574071353780594*^9, 3.5740714392063437`*^9}, {3.5740717257632475`*^9, 3.574071742283676*^9}, { 3.574071857115478*^9, 3.574071918189585*^9}, {3.5740720907414885`*^9, 3.5740720966694984`*^9}, {3.5740721676028233`*^9, 3.5740721835304513`*^9}, {3.5740722327953377`*^9, 3.574072381432399*^9}, { 3.57407241628286*^9, 3.5740725747635384`*^9}, {3.5740726677709017`*^9, 3.5740726864129343`*^9}, {3.5740729230809503`*^9, 3.574072923455351*^9}, { 3.5740729588050127`*^9, 3.574072990707069*^9}, {3.5740730904380445`*^9, 3.5740730958668537`*^9}, {3.574073130155714*^9, 3.57407314478854*^9}, { 3.574073269853959*^9, 3.5740733111160316`*^9}, {3.5740733441100893`*^9, 3.5740733480412965`*^9}, {3.5740733832037582`*^9, 3.5740734276482363`*^9}, 3.5740740818977857`*^9, 3.574074116810647*^9, {3.574074166481134*^9, 3.5740741666527348`*^9}, {3.57407419825839*^9, 3.5740742105668116`*^9}, { 3.574074252827286*^9, 3.5740742532484865`*^9}, {3.5740743137765927`*^9, 3.5740743140105934`*^9}, {3.574074358345871*^9, 3.5740743585954714`*^9}, 3.5740754073385134`*^9, {3.5741353517646933`*^9, 3.5741353928551655`*^9}, 3.574135465457693*^9, {3.574484765977767*^9, 3.574484862073936*^9}, { 3.5744849882001576`*^9, 3.574485043705055*^9}, {3.5744851789572926`*^9, 3.5744851982389264`*^9}, {3.5744852859110804`*^9, 3.5744852918702908`*^9}, 3.5752146686375933`*^9, {3.575214703316454*^9, 3.575214752674941*^9}, 3.5752147864334*^9, {3.5752148167910533`*^9, 3.575214843825901*^9}, { 3.575214952183691*^9, 3.575214963368911*^9}, {3.581829560567249*^9, 3.5818295701612654`*^9}, {3.5825633126828747`*^9, 3.5825633245700955`*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"k", "=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Clear", "[", RowBox[{ "conn", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "gamm"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpln", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0.0", ",", "0.0", ",", "0.0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"conn", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"12", ",", "23", ",", "14"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "24", ",", "15"}], "}"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"Plota", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", "0", "}"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "2"}], "}"}]}], "]"}]}], ";"}], " "}], "\n", RowBox[{ RowBox[{"Plotc", "=", " ", "Plota"}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"Plotd", " ", "=", "Plota"}], ";"}], " "}], "\n", RowBox[{ RowBox[{ RowBox[{"Plotb0", " ", "=", "Plota"}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Ok", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"gamm", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], ";"}]}], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.57314870088253*^9}, {3.5740711445842266`*^9, 3.5740711934435124`*^9}, { 3.5740712484648085`*^9, 3.574071311114519*^9}, {3.574071353780594*^9, 3.5740714392063437`*^9}, {3.5740717257632475`*^9, 3.574071742283676*^9}, { 3.574071857115478*^9, 3.574071918189585*^9}, {3.5740720907414885`*^9, 3.5740720966694984`*^9}, {3.5740721676028233`*^9, 3.5740721835304513`*^9}, {3.5740722327953377`*^9, 3.574072381432399*^9}, { 3.57407241628286*^9, 3.5740725747635384`*^9}, {3.5740726677709017`*^9, 3.5740726864129343`*^9}, {3.5740729230809503`*^9, 3.574072923455351*^9}, { 3.5740729588050127`*^9, 3.574072990707069*^9}, {3.5740730904380445`*^9, 3.5740730958668537`*^9}, {3.574073130155714*^9, 3.57407314478854*^9}, { 3.574073269853959*^9, 3.5740733111160316`*^9}, {3.5740733441100893`*^9, 3.5740733480412965`*^9}, {3.5740733832037582`*^9, 3.5740734276482363`*^9}, 3.5740740818977857`*^9, 3.574074116810647*^9, {3.574074166481134*^9, 3.5740741666527348`*^9}, {3.57407419825839*^9, 3.5740742105668116`*^9}, { 3.574074252827286*^9, 3.5740742532484865`*^9}, {3.5740743137765927`*^9, 3.5740743140105934`*^9}, {3.574074358345871*^9, 3.5740743585954714`*^9}, 3.5740754073385134`*^9, {3.5741353517646933`*^9, 3.5741353928551655`*^9}, 3.574135465457693*^9, {3.574484765977767*^9, 3.574484862073936*^9}, { 3.5744849882001576`*^9, 3.574485043705055*^9}, {3.5744851789572926`*^9, 3.5744851982389264`*^9}, {3.5744852859110804`*^9, 3.5744852918702908`*^9}, 3.5752146686375933`*^9, {3.575214703316454*^9, 3.575214752674941*^9}, 3.5752147864334*^9, {3.5752148167910533`*^9, 3.575214843825901*^9}, { 3.575214952183691*^9, 3.57521496862612*^9}, {3.575215119337985*^9, 3.5752151197903852`*^9}, {3.575220019863165*^9, 3.5752200639176426`*^9}, { 3.57526155271976*^9, 3.575261571346193*^9}, {3.575261988256925*^9, 3.5752619961505394`*^9}, {3.5752642988861837`*^9, 3.5752643466066675`*^9}, {3.575264476383295*^9, 3.5752645335105953`*^9}, { 3.575264738682156*^9, 3.575264741271761*^9}, {3.5752647907862473`*^9, 3.575264795669056*^9}, {3.5752648505031524`*^9, 3.5752648523439555`*^9}, { 3.575264901437242*^9, 3.5752649099080567`*^9}, {3.5752660077443852`*^9, 3.5752660092263875`*^9}, {3.5818295957765107`*^9, 3.5818296269453654`*^9}, 3.5818296579738197`*^9, 3.581829877559806*^9, 3.5818299406775165`*^9, { 3.582563347268135*^9, 3.5825635011000056`*^9}, {3.5825640438561587`*^9, 3.582564063293793*^9}, {3.582564228841284*^9, 3.5825642526157255`*^9}, { 3.582564371347534*^9, 3.5825643938271737`*^9}, 3.5825644337320433`*^9, { 3.5826032492921877`*^9, 3.5826032507585907`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"c", "=", RowBox[{"conn", "[", RowBox[{"[", "k", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"a1", "=", RowBox[{"dc", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"c", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}], "]"}]}], ";", " ", RowBox[{"a2", "=", RowBox[{"dc", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"c", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], "]"}]}], ";", " ", RowBox[{"d1", "=", RowBox[{"dc", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"c", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Alpha]", "=", RowBox[{"ArcCos", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a1", "^", "2"}], "+", RowBox[{"a2", "^", "2"}], "-", RowBox[{"d1", "^", "2"}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", "*", "a1", "*", "a2"}], ")"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"L", "=", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "+", "rln"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Beta]", "=", RowBox[{"ArcSin", "[", RowBox[{"rln", "/", "L"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]", "=", RowBox[{ RowBox[{"\[Pi]", "/", "2"}], "-", RowBox[{"\[Alpha]", "/", "2"}]}]}], ";", " ", RowBox[{ RowBox[{"gamm", "[", RowBox[{"[", "k", "]"}], "]"}], "=", "\[Gamma]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"k", "\[Equal]", "1"}], " ", "||", " ", RowBox[{"k", "\[Equal]", "3"}]}], ")"}], ",", RowBox[{"\[Gamma]", "=", RowBox[{"\[Pi]", "-", RowBox[{"\[Alpha]", "/", "4"}]}]}], ",", RowBox[{"\[Gamma]", "=", RowBox[{ RowBox[{"3", "*", RowBox[{"\[Pi]", "/", "2"}]}], "+", RowBox[{"\[Alpha]", "/", "2"}]}]}]}], "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"x2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"y2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"z2", "=", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "3"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"-", "x2"}], ",", RowBox[{"-", "y2"}], ",", RowBox[{"-", "z2"}], ",", "1"}], "}"}]}], "}"}]}], ";", "\n", RowBox[{"p", "=", RowBox[{"v", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\n", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"Plota", "[", RowBox[{"[", "k", "]"}], "]"}], " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Plotc", "[", RowBox[{"[", "k", "]"}], "]"}], " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"p", "[", RowBox[{"[", "j", "]"}], "]"}]}], "}"}], ",", "0.02"}], "]"}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"P", "-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"i", "+", "1"}], ",", "P"}], "}"}]}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"T1", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T1", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"T2", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T2", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"T3", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{"T3", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Chop", "[", RowBox[{"U", ".", "T"}], "]"}]}], ";", "\n", RowBox[{"nk", "=", "p"}], ";", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], "=", RowBox[{"L", "*", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}]}], ";", " ", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "=", RowBox[{ RowBox[{"-", "L"}], "*", RowBox[{"Cos", "[", "\[Gamma]", "]"}]}]}], ";", " ", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "=", "0"}], ";", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "2", "]"}], "]"}], "=", RowBox[{ RowBox[{"Ok", "[", RowBox[{"[", "k", "]"}], "]"}], "*", RowBox[{"nk", "[", RowBox[{"[", "2", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Plota", "[", RowBox[{"[", "k", "]"}], "]"}], " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Plotc", "[", RowBox[{"[", "k", "]"}], "]"}], " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"p", "[", RowBox[{"[", "j", "]"}], "]"}]}], "}"}], ",", "0.02"}], "]"}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"P", "-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"i", "+", "1"}], ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Plotd", "[", RowBox[{"[", "k", "]"}], "]"}], "=", RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "rln"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Plotb0", "[", RowBox[{"[", "k", "]"}], "]"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"Text", "[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "nk"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T3"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"nk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\[IndentingNewLine]", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "nk"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T2"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"nk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\n", RowBox[{"U", "=", "p"}], ";", "\n", RowBox[{"U1", "=", "nk"}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T1"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"U", ".", "T"}]}], ";", "\n", RowBox[{"nk", "=", RowBox[{"U1", ".", "T"}]}], ";", "\n", RowBox[{"Clear", "[", RowBox[{"v", ",", "v1", ",", "v2"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"v", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"x2", ",", "y2", ",", "z2", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"v", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"nk", "=", RowBox[{"v1", ".", "Q"}]}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nk", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "P"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"tpln", "[", RowBox[{"[", "k", "]"}], "]"}], "=", RowBox[{"nk", "[", RowBox[{"[", "2", "]"}], "]"}]}]}], ")"}], ",", RowBox[{"{", RowBox[{"k", ",", "2"}], "}"}]}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.57314870088253*^9}, {3.5740711445842266`*^9, 3.5740711934435124`*^9}, { 3.5740712484648085`*^9, 3.574071311114519*^9}, {3.574071353780594*^9, 3.5740714392063437`*^9}, {3.5740717257632475`*^9, 3.574071742283676*^9}, { 3.574071857115478*^9, 3.574071918189585*^9}, {3.5740720907414885`*^9, 3.5740720966694984`*^9}, {3.5740721676028233`*^9, 3.5740721835304513`*^9}, {3.5740722327953377`*^9, 3.574072381432399*^9}, { 3.57407241628286*^9, 3.5740725747635384`*^9}, {3.5740726677709017`*^9, 3.5740726864129343`*^9}, {3.5740729230809503`*^9, 3.574072923455351*^9}, { 3.5740729588050127`*^9, 3.574072990707069*^9}, {3.5740730904380445`*^9, 3.5740730958668537`*^9}, {3.574073130155714*^9, 3.57407314478854*^9}, { 3.574073269853959*^9, 3.5740733111160316`*^9}, {3.5740733441100893`*^9, 3.5740733480412965`*^9}, {3.5740733832037582`*^9, 3.5740734276482363`*^9}, 3.5740740818977857`*^9, 3.574074116810647*^9, {3.574074166481134*^9, 3.5740741666527348`*^9}, {3.57407419825839*^9, 3.5740742105668116`*^9}, { 3.574074252827286*^9, 3.5740742532484865`*^9}, {3.5740743137765927`*^9, 3.5740743140105934`*^9}, {3.574074358345871*^9, 3.5740743585954714`*^9}, 3.5740754073385134`*^9, {3.5741353517646933`*^9, 3.5741353928551655`*^9}, 3.574135465457693*^9, {3.574484765977767*^9, 3.574484862073936*^9}, { 3.5744849882001576`*^9, 3.574485043705055*^9}, {3.5744851789572926`*^9, 3.5744851982389264`*^9}, {3.5744852859110804`*^9, 3.5744852918702908`*^9}, 3.5752146686375933`*^9, {3.575214703316454*^9, 3.575214752674941*^9}, 3.5752147864334*^9, {3.5752148167910533`*^9, 3.575214843825901*^9}, { 3.575214952183691*^9, 3.575214963368911*^9}, {3.5752153437755785`*^9, 3.5752153446023808`*^9}, {3.5752196198004627`*^9, 3.5752196437465043`*^9}, 3.5752196892985845`*^9, {3.5752197843027515`*^9, 3.5752197899967613`*^9}, { 3.5752199889907107`*^9, 3.575220008537545*^9}, {3.575261680795985*^9, 3.5752616868331957`*^9}, {3.575261830057047*^9, 3.5752618478410788`*^9}, { 3.5752619099135876`*^9, 3.5752619409420424`*^9}, {3.575264359975891*^9, 3.575264383391532*^9}, 3.5752645697806597`*^9, 3.5752647035352945`*^9, 3.5752649185816717`*^9, {3.5752649540873346`*^9, 3.5752649605925455`*^9}, { 3.575264995458607*^9, 3.57526500274382*^9}, {3.5752784049084177`*^9, 3.5752784183556414`*^9}, {3.5752784887897654`*^9, 3.5752785288974357`*^9}, 3.5818296394253874`*^9, 3.5818441540684466`*^9, {3.581845121082945*^9, 3.581845122237347*^9}, 3.5825635203192396`*^9, 3.582564263629345*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{" ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Show", "[", RowBox[{ RowBox[{"Plotd", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", RowBox[{"Plota", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", RowBox[{"Plotb0", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", RowBox[{"Plotc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", RowBox[{"{", RowBox[{ RowBox[{"Axes", " ", "->", " ", "Automatic"}], ",", " ", RowBox[{"AxesLabel", " ", "->", " ", RowBox[{"{", RowBox[{"xl", ",", " ", "yl", ",", " ", "zl"}], "}"}]}], ",", " ", "\n", " ", RowBox[{"AspectRatio", " ", "->", " ", "Automatic"}], ",", " ", RowBox[{"Boxed", " ", "->", " ", "False"}], ",", " ", RowBox[{"PlotRange", " ", "->", " ", "Automatic"}], ",", " ", RowBox[{"SphericalRegion", " ", "->", " ", "True"}]}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.57314870088253*^9}, {3.5740711445842266`*^9, 3.5740711934435124`*^9}, { 3.5740712484648085`*^9, 3.574071311114519*^9}, {3.574071353780594*^9, 3.5740714392063437`*^9}, {3.5740717257632475`*^9, 3.574071742283676*^9}, { 3.574071857115478*^9, 3.574071918189585*^9}, {3.5740720907414885`*^9, 3.5740720966694984`*^9}, {3.5740721676028233`*^9, 3.5740721835304513`*^9}, {3.5740722327953377`*^9, 3.574072381432399*^9}, { 3.57407241628286*^9, 3.5740725747635384`*^9}, {3.5740726677709017`*^9, 3.5740726864129343`*^9}, {3.5740729230809503`*^9, 3.574072923455351*^9}, { 3.5740729588050127`*^9, 3.574072990707069*^9}, {3.5740730904380445`*^9, 3.5740730958668537`*^9}, {3.574073130155714*^9, 3.57407314478854*^9}, { 3.574073269853959*^9, 3.5740733111160316`*^9}, {3.5740733441100893`*^9, 3.5740733480412965`*^9}, {3.5740733832037582`*^9, 3.5740734276482363`*^9}, 3.5740740818977857`*^9, 3.574074116810647*^9, {3.574074166481134*^9, 3.5740741666527348`*^9}, {3.57407419825839*^9, 3.5740742105668116`*^9}, { 3.574074252827286*^9, 3.5740742532484865`*^9}, {3.5740743137765927`*^9, 3.5740743140105934`*^9}, {3.574074358345871*^9, 3.5740743585954714`*^9}, 3.5740754073385134`*^9, {3.5741353517646933`*^9, 3.5741353928551655`*^9}, 3.574135465457693*^9, {3.574484765977767*^9, 3.574484862073936*^9}, { 3.5744849882001576`*^9, 3.574485043705055*^9}, {3.5744851789572926`*^9, 3.5744851982389264`*^9}, {3.5744852859110804`*^9, 3.5744852918702908`*^9}, 3.5752146686375933`*^9, {3.575214703316454*^9, 3.575214752674941*^9}, 3.5752147864334*^9, {3.5752148167910533`*^9, 3.5752148246690674`*^9}, 3.575214868926345*^9, 3.575215096047144*^9, 3.581829745037573*^9, 3.5825642689957542`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ Graphics3DBox[{ {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.5], SphereBox[{0.8366081764176215, 1.1980194687696781`, 0}, 1.246]}, {Opacity[0.5], SphereBox[{-2.5157761097639444`, 0, 0}, 0.255]}, {Opacity[0.5], SphereBox[{0, 0, 0}, 0.21522]}, {Opacity[0.5], SphereBox[{0.8694165088279775, -2.3700483151219673`, 0}, 0.255]}, Text3DBox["12", {-2.5157761097639444`, 0, 0}, {1, 0}], Text3DBox["23", {0, 0, 0}, {1, 0}], Text3DBox["14", {0.8694165088279775, -2.3700483151219673`, 0}, {1, 0}], TubeBox[{{-2.5157761097639444`, 0, 0}, {0, 0, 0}}, 0.02], TubeBox[{{-2.5157761097639444`, 0, 0}, { 0.8694165088279775, -2.3700483151219673`, 0}}, 0.02], TubeBox[{{0, 0, 0}, {0.8694165088279775, -2.3700483151219673`, 0}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True], ",", Graphics3DBox[{ {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.5], SphereBox[{-0.8361378353556679, 1.1983477828605258`, 0}, 1.246]}, {Opacity[0.5], SphereBox[{2.5161803425602702`, 0, 0}, 0.255]}, {Opacity[0.5], SphereBox[{0, 0, 0}, 0.21522]}, {Opacity[0.5], SphereBox[{-0.8711540559622368, -2.369030835645576, 0}, 0.255]}, Text3DBox["13", {2.5161803425602702`, 0, 0}, {1, 0}], Text3DBox["24", {0, 0, 0}, {1, 0}], Text3DBox["15", {-0.8711540559622368, -2.369030835645576, 0}, {1, 0}], TubeBox[{{2.5161803425602702`, 0, 0}, {0, 0, 0}}, 0.02], TubeBox[{{ 2.5161803425602702`, 0, 0}, {-0.8711540559622368, -2.369030835645576, 0}}, 0.02], TubeBox[{{0, 0, 0}, {-0.8711540559622368, -2.369030835645576, 0}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True]}], "}"}]], "Output", CellChangeTimes->{ 3.5825628302676277`*^9, 3.582563576276538*^9, 3.5825636686755*^9, 3.5825637942089205`*^9, 3.5825638484034157`*^9, 3.582563920397542*^9, 3.582564074588213*^9, 3.5825641404047284`*^9, 3.5825642913973937`*^9, { 3.5825644140760093`*^9, 3.5825644386616526`*^9}, 3.582564523931402*^9, 3.582564625846381*^9, 3.582564710975731*^9, 3.582564799459086*^9, 3.582599445521907*^9, 3.582599563114913*^9, {3.5825995988233757`*^9, 3.5825996194778123`*^9}, {3.582599726416*^9, 3.5825997556348515`*^9}, 3.582599968809226*^9, 3.5826000399141507`*^9, 3.582600365705123*^9, 3.5826007530538034`*^9, 3.582601399596939*^9, 3.5826017146394925`*^9, { 3.5826017563071656`*^9, 3.582601779785207*^9}, {3.5826019545055137`*^9, 3.5826019773439536`*^9}, 3.582603453761747*^9, 3.5826082002263494`*^9, 3.5826082919389105`*^9, 3.582610888673271*^9, 3.582610956626991*^9, { 3.5826110036610737`*^9, 3.582611077714403*^9}, 3.582611112486864*^9, { 3.582611157149743*^9, 3.582611297144389*^9}}] }, Open ]], Cell[BoxData[{ StyleBox[ RowBox[{ RowBox[{"k", " ", "=", " ", "1"}], ";"}], "Input"], "\n", StyleBox[ RowBox[{ RowBox[{"Clear", "[", RowBox[{"conn", ",", "P"}], "]"}], ";"}], "Input"], "\n", RowBox[{ StyleBox[ RowBox[{"P", " ", "=", " ", "4"}], "Input"], StyleBox[";", "Input"], RowBox[{"rln", "=", "1.246"}], ";", RowBox[{"pn", "=", "0"}], ";"}], "\n", RowBox[{ RowBox[{ StyleBox["tpyrn", "Input"], StyleBox[" ", "Input"], StyleBox["=", "Input"], StyleBox[" ", "Input"], RowBox[{ StyleBox["{", "Input"], StyleBox[ RowBox[{"{", RowBox[{"0.0", ",", " ", "0.0", ",", " ", "0.0"}], "}"}], "Input"], "}"}]}], StyleBox[";", "Input"]}], "\n", StyleBox[ RowBox[{ RowBox[{"conn", " ", "=", " ", RowBox[{"{", RowBox[{"{", RowBox[{"2", ",", "6", ",", "7", ",", "20"}], "}"}], "}"}]}], ";"}], "Input"]}], "Input", CellChangeTimes->{{3.5818443673676214`*^9, 3.5818444580193806`*^9}, { 3.5818445098894715`*^9, 3.581844510466673*^9}, {3.5818445637563663`*^9, 3.5818445673443727`*^9}, {3.5818448617792892`*^9, 3.581844867270499*^9}, 3.581845249689571*^9, {3.58185623892412*^9, 3.581856320290263*^9}, { 3.5818564278056517`*^9, 3.5818564295528555`*^9}, 3.581856562340288*^9, { 3.581856623461196*^9, 3.581856632025611*^9}, {3.5818567525378227`*^9, 3.581856754784227*^9}, {3.5818568288687572`*^9, 3.581856844655985*^9}, { 3.5818577879232416`*^9, 3.581857791604848*^9}, {3.5818586018530717`*^9, 3.5818586056750784`*^9}, {3.581858642896744*^9, 3.5818586480447526`*^9}, { 3.581858716762873*^9, 3.5818587231432843`*^9}, 3.5818590362046347`*^9, { 3.5825635567609034`*^9, 3.5825635607077103`*^9}}], Cell[BoxData[ StyleBox[ RowBox[{"<<", " ", "\"\\""}], "Input"]], "Input", CellChangeTimes->{{3.5818443673676214`*^9, 3.5818444580193806`*^9}, { 3.5818445098894715`*^9, 3.581844510466673*^9}, {3.5818445637563663`*^9, 3.5818445673443727`*^9}, {3.5818448617792892`*^9, 3.581844867270499*^9}, 3.581845249689571*^9, {3.58185623892412*^9, 3.581856320290263*^9}, { 3.5818564278056517`*^9, 3.5818564295528555`*^9}, 3.581856562340288*^9, { 3.581856623461196*^9, 3.581856632025611*^9}, {3.5818567525378227`*^9, 3.581856754784227*^9}, {3.5818568288687572`*^9, 3.581856844655985*^9}, 3.581857802602867*^9, {3.581858309993758*^9, 3.581858314236966*^9}, 3.581859225058566*^9, {3.5818729123401194`*^9, 3.581872917004528*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"DeleteFile", "[", " ", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "2"}], ",", RowBox[{"i", "<", RowBox[{"n", "+", "2"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "2"}], ",", RowBox[{"j", "\[LessEqual]", "i"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Pij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"i", "-", "1"}], ",", RowBox[{"j", "-", "1"}], ",", RowBox[{"Extract", "[", RowBox[{"Pij", ",", RowBox[{"{", RowBox[{"i", ",", "j"}], "}"}]}], "]"}]}], "}"}], ">>>", " ", "\"\\""}]}], "]"}]}], "]"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5681154444347754`*^9, 3.568115497147268*^9}, { 3.568127214924899*^9, 3.568127265796589*^9}, {3.568128215276656*^9, 3.568128238536297*^9}, {3.568130718566253*^9, 3.5681307485339055`*^9}, 3.5681308175952272`*^9, {3.5681308916497574`*^9, 3.5681309458598523`*^9}, { 3.5681309983383446`*^9, 3.5681310118947687`*^9}, {3.5681310723448744`*^9, 3.568131074357278*^9}, {3.5681315215476637`*^9, 3.568131584509374*^9}, { 3.56813162789305*^9, 3.5681316427754765`*^9}, {3.5681317113063965`*^9, 3.568131715268804*^9}, {3.5681323203938665`*^9, 3.5681323260098763`*^9}, { 3.568132387567585*^9, 3.568132440014877*^9}, {3.5681325121026034`*^9, 3.568132590945142*^9}, {3.56813274298981*^9, 3.5681327548302307`*^9}, { 3.568132877867647*^9, 3.568132888335265*^9}, {3.568133052345154*^9, 3.568133072344389*^9}, {3.5681331740533676`*^9, 3.5681331951446047`*^9}, { 3.568133267793932*^9, 3.5681332684803333`*^9}, {3.5681335079111547`*^9, 3.568133536833606*^9}, {3.5681336272201643`*^9, 3.5681336314945717`*^9}, { 3.568133737994359*^9, 3.568133744000369*^9}, {3.568133978515581*^9, 3.5681339917912045`*^9}, {3.5681340324916763`*^9, 3.5681340418204927`*^9}, {3.568134244262048*^9, 3.5681342454944506`*^9}, { 3.5681343354754086`*^9, 3.568134336099409*^9}, {3.5681345828762426`*^9, 3.568134583952645*^9}, {3.5681348406666956`*^9, 3.5681348474683075`*^9}, 3.568134889151581*^9, {3.5681352914606876`*^9, 3.568135296265496*^9}, { 3.568135518877887*^9, 3.568135519595488*^9}, 3.5681357593679094`*^9, { 3.5681787035360527`*^9, 3.568178728449296*^9}, 3.5682779128076954`*^9, { 3.572714864038488*^9, 3.572714889419732*^9}, {3.5727149730514793`*^9, 3.57271500191153*^9}, {3.572715036933592*^9, 3.5727150664176435`*^9}, { 3.572715803191337*^9, 3.572715915183934*^9}, {3.5727159899548655`*^9, 3.572716037722149*^9}, {3.572767087700392*^9, 3.5727670990260115`*^9}, 3.5727756458897667`*^9, {3.5727757435615377`*^9, 3.5727758099084544`*^9}, { 3.575264402142765*^9, 3.575264409568378*^9}, {3.581845542377285*^9, 3.5818455539837055`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"a", "=", RowBox[{ "ReadList", "[", "\"\\"", "]"}]}], "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"Length", "[", "a", "]"}]}], "\[IndentingNewLine]", RowBox[{"cw", "=", RowBox[{"nb", "-", "bh"}]}]}], "Input", CellChangeTimes->{{3.5681343270045934`*^9, 3.568134331481801*^9}, 3.5681343823222904`*^9, {3.5681345934218616`*^9, 3.5681345986322703`*^9}, { 3.568134635479535*^9, 3.5681346521559644`*^9}, {3.5681351451792307`*^9, 3.568135145428831*^9}, {3.5681351781888885`*^9, 3.5681352349417877`*^9}, { 3.568135340163973*^9, 3.568135340335573*^9}, {3.568135523495495*^9, 3.5681355244314966`*^9}, {3.5681357674799232`*^9, 3.5681357771675406`*^9}, {3.568136284433632*^9, 3.5681362987700567`*^9}, { 3.568136395053426*^9, 3.5681363965510283`*^9}, {3.568381170343589*^9, 3.568381179844005*^9}, {3.5689533222924633`*^9, 3.568953376658559*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1.0573980309689464`"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "2", ",", "1.0571977127777568`"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "1", ",", "1.0741882741079054`"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "2", ",", "1.0742713828475765`"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "3", ",", "1.077013673466921`"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "6", ",", "1.0270067399123455`"}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "4", ",", "1.0761545789850382`"}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "7", ",", "1.026700960122281`"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "3", ",", "1.0489315669081951`"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "4", ",", "1.04919745005195`"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "10", ",", "1.0691338556090308`"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "11", ",", "1.068401337942103`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "14", ",", "1.0600752549994588`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "15", ",", "1.0608473122513902`"}], "}"}], ",", RowBox[{"{", RowBox[{"17", ",", "12", ",", "1.1305087411836026`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "13", ",", "1.1313721213004866`"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "14", ",", "1.1332829966156077`"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "17", ",", "1.0200401738748028`"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "15", ",", "1.1320756404005345`"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "18", ",", "1.0198468874342204`"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "1", ",", "1.0658153022447026`"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "3", ",", "1.0694145952071308`"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "2", ",", "1.0657435145922616`"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "4", ",", "1.0690180214578795`"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "12", ",", "1.0227780548819723`"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "14", ",", "1.027131466779941`"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "13", ",", "1.0229801712801354`"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "15", ",", "1.026953438328184`"}], "}"}], ",", RowBox[{"{", RowBox[{"25", ",", "5", ",", "1.2146789801027955`"}], "}"}], ",", RowBox[{"{", RowBox[{"26", ",", "21", ",", "1.0636729424645228`"}], "}"}], ",", RowBox[{"{", RowBox[{"27", ",", "22", ",", "1.06379401106704`"}], "}"}], ",", RowBox[{"{", RowBox[{"28", ",", "6", ",", "1.2144528350747388`"}], "}"}], ",", RowBox[{"{", RowBox[{"29", ",", "7", ",", "1.2145800558419535`"}], "}"}], ",", RowBox[{"{", RowBox[{"30", ",", "8", ",", "1.2145104975730954`"}], "}"}], ",", RowBox[{"{", RowBox[{"31", ",", "9", ",", "1.2146950068443099`"}], "}"}], ",", RowBox[{"{", RowBox[{"32", ",", "10", ",", "1.2147080297802146`"}], "}"}], ",", RowBox[{"{", RowBox[{"33", ",", "11", ",", "1.214566512601262`"}], "}"}], ",", RowBox[{"{", RowBox[{"34", ",", "16", ",", "1.2145509339138183`"}], "}"}], ",", RowBox[{"{", RowBox[{"35", ",", "17", ",", "1.2145258109475527`"}], "}"}], ",", RowBox[{"{", RowBox[{"36", ",", "18", ",", "1.2148071141740133`"}], "}"}], ",", RowBox[{"{", RowBox[{"37", ",", "19", ",", "1.214695773394865`"}], "}"}], ",", RowBox[{"{", RowBox[{"38", ",", "20", ",", "1.2147098252776232`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.5825628304392276`*^9, 3.582563576401338*^9, 3.5825636687379*^9, 3.58256379425572*^9, 3.5825638484346156`*^9, 3.582563920444342*^9, 3.582564074635013*^9, 3.5825641404359283`*^9, 3.582564291444194*^9, { 3.5825644141228094`*^9, 3.5825644386928525`*^9}, 3.582564523962602*^9, 3.582564625893181*^9, 3.5825647110225306`*^9, 3.582564799505886*^9, 3.582599445553107*^9, 3.5825995631617136`*^9, {3.582599598854576*^9, 3.582599619509012*^9}, {3.5825997264472003`*^9, 3.5825997556816516`*^9}, 3.582599969324027*^9, 3.582600039960951*^9, 3.5826003657363234`*^9, 3.582600753100603*^9, 3.5826013996437387`*^9, 3.5826017146862926`*^9, { 3.5826017563539658`*^9, 3.5826017798320065`*^9}, {3.582601954552314*^9, 3.5826019773907537`*^9}, 3.582603453948947*^9, 3.5826082002731495`*^9, 3.58260829198571*^9, 3.582610888720072*^9, 3.582610956673791*^9, { 3.582611003692273*^9, 3.582611077761204*^9}, 3.5826111125336647`*^9, { 3.582611157180943*^9, 3.582611297191189*^9}}], Cell[BoxData["42"], "Output", CellChangeTimes->{ 3.5825628304392276`*^9, 3.582563576401338*^9, 3.5825636687379*^9, 3.58256379425572*^9, 3.5825638484346156`*^9, 3.582563920444342*^9, 3.582564074635013*^9, 3.5825641404359283`*^9, 3.582564291444194*^9, { 3.5825644141228094`*^9, 3.5825644386928525`*^9}, 3.582564523962602*^9, 3.582564625893181*^9, 3.5825647110225306`*^9, 3.582564799505886*^9, 3.582599445553107*^9, 3.5825995631617136`*^9, {3.582599598854576*^9, 3.582599619509012*^9}, {3.5825997264472003`*^9, 3.5825997556816516`*^9}, 3.582599969324027*^9, 3.582600039960951*^9, 3.5826003657363234`*^9, 3.582600753100603*^9, 3.5826013996437387`*^9, 3.5826017146862926`*^9, { 3.5826017563539658`*^9, 3.5826017798320065`*^9}, {3.582601954552314*^9, 3.5826019773907537`*^9}, 3.582603453948947*^9, 3.5826082002731495`*^9, 3.58260829198571*^9, 3.582610888720072*^9, 3.582610956673791*^9, { 3.582611003692273*^9, 3.582611077761204*^9}, 3.5826111125336647`*^9, { 3.582611157180943*^9, 3.582611297191189*^9}}], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.5825628304392276`*^9, 3.582563576401338*^9, 3.5825636687379*^9, 3.58256379425572*^9, 3.5825638484346156`*^9, 3.582563920444342*^9, 3.582564074635013*^9, 3.5825641404359283`*^9, 3.582564291444194*^9, { 3.5825644141228094`*^9, 3.5825644386928525`*^9}, 3.582564523962602*^9, 3.582564625893181*^9, 3.5825647110225306`*^9, 3.582564799505886*^9, 3.582599445553107*^9, 3.5825995631617136`*^9, {3.582599598854576*^9, 3.582599619509012*^9}, {3.5825997264472003`*^9, 3.5825997556816516`*^9}, 3.582599969324027*^9, 3.582600039960951*^9, 3.5826003657363234`*^9, 3.582600753100603*^9, 3.5826013996437387`*^9, 3.5826017146862926`*^9, { 3.5826017563539658`*^9, 3.5826017798320065`*^9}, {3.582601954552314*^9, 3.5826019773907537`*^9}, 3.582603453948947*^9, 3.5826082002731495`*^9, 3.58260829198571*^9, 3.582610888720072*^9, 3.582610956673791*^9, { 3.582611003692273*^9, 3.582611077761204*^9}, 3.5826111125336647`*^9, { 3.582611157180943*^9, 3.582611297191189*^9}}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"wxc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"wyc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], " "}], "\n", RowBox[{ RowBox[{"wzc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.568878075458074*^9}, 3.5688953020257144`*^9, 3.5693395777359695`*^9, {3.569339615191635*^9, 3.569339617079238*^9}, { 3.5693396917877693`*^9, 3.56933969216217*^9}, 3.5693893483274703`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Plot7", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Darker", "[", RowBox[{"Brown", ",", "0.4"}], "]"}], ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"wxc", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzc", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.56887811871695*^9}, {3.568895331556566*^9, 3.5688953367201753`*^9}, 3.568895995276532*^9, {3.5693397032225895`*^9, 3.56933970331619*^9}, 3.569339737137049*^9, 3.569340055299608*^9, 3.569389360947892*^9, {3.570298060155057*^9, 3.570298071589877*^9}, { 3.5704539766451664`*^9, 3.5704539773627677`*^9}, {3.5709509139026003`*^9, 3.570950950500265*^9}, {3.570950995397144*^9, 3.5709510449896307`*^9}, { 3.570974064815357*^9, 3.5709741190878525`*^9}, {3.5709742487084804`*^9, 3.570974273528124*^9}, {3.5713747544125347`*^9, 3.571374762618149*^9}, 3.5713830670175667`*^9}], Cell[BoxData[{ RowBox[{ RowBox[{"wxh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"wyh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"wzh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.5688781280925665`*^9}, 3.568895312524533*^9, 3.5693395940691977`*^9, {3.5693396336776676`*^9, 3.5693396557829065`*^9}, { 3.569340069402033*^9, 3.569340092412073*^9}, {3.569389186383586*^9, 3.5693891947764006`*^9}, {3.569389263291721*^9, 3.569389289686967*^9}, 3.569389336315449*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Plot8", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzh", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"a", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "cw"}], ",", "3"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bh"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.568878147967001*^9}, {3.56889532230575*^9, 3.5688953242557535`*^9}, 3.56889600529175*^9, 3.5688961595292206`*^9, { 3.5693396821781526`*^9, 3.5693396825213532`*^9}, 3.5693893658151007`*^9, { 3.5693895413934093`*^9, 3.5693895427506113`*^9}, {3.5697651043452682`*^9, 3.5697651089940763`*^9}, {3.5704647001766*^9, 3.570464712141821*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"Plot8a", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.3", "]"}], ",", RowBox[{"Lighter", "[", "Yellow", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpo", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rpo"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8b", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.3", "]"}], ",", RowBox[{"Lighter", "[", "Cyan", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rpi"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8c", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.3", "]"}], ",", RowBox[{"Lighter", "[", "Yellow", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpo", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rln"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"nj", "+", "1"}], ",", RowBox[{"nj", "+", "4"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8d", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.3", "]"}], ",", RowBox[{"Lighter", "[", "Cyan", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rln"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"nj", "+", "1"}], ",", RowBox[{"nj", "+", "4"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8e", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpln", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rln"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, {3.571838766139532*^9, 3.571838773908346*^9}, 3.5718388425484667`*^9, {3.571838961763876*^9, 3.571838969236289*^9}, {3.571839027970392*^9, 3.5718390313399982`*^9}, { 3.571839741203645*^9, 3.5718397450100517`*^9}, {3.572538612521628*^9, 3.572538701894185*^9}, {3.572538746213863*^9, 3.572538844837236*^9}, 3.5725397817592816`*^9, {3.5726093687611146`*^9, 3.5726094120667906`*^9}, { 3.5726201406133776`*^9, 3.5726201439517837`*^9}, {3.5726204342214937`*^9, 3.572620455406331*^9}, {3.5726210034788933`*^9, 3.572621009968505*^9}, { 3.5728421659278097`*^9, 3.5728422874676228`*^9}, {3.572844941796685*^9, 3.57284494451109*^9}, {3.572850660423529*^9, 3.5728506878327775`*^9}, 3.5731240021791506`*^9, {3.573124038683215*^9, 3.57312404156922*^9}, 3.5731241655738378`*^9, {3.573150838242284*^9, 3.5731508464166985`*^9}, { 3.5740702979395394`*^9, 3.5740703017771463`*^9}, {3.5740715898714085`*^9, 3.574071671631152*^9}, 3.5740719856597033`*^9, {3.5740752116205697`*^9, 3.5740752571102495`*^9}, {3.574075295283517*^9, 3.5740752956735177`*^9}, { 3.5740753389479933`*^9, 3.574075350632414*^9}, {3.5740757330202856`*^9, 3.574075745749908*^9}, {3.5744844155075517`*^9, 3.5744844203591604`*^9}, { 3.5744848749751587`*^9, 3.574484876160761*^9}, {3.574491080910419*^9, 3.574491088382832*^9}, {3.5818299776495814`*^9, 3.5818300037484274`*^9}, { 3.5818446331296883`*^9, 3.581844641460103*^9}, {3.581845825976983*^9, 3.581845831624193*^9}, {3.5818484182959366`*^9, 3.581848428857155*^9}, { 3.5818727837178936`*^9, 3.581872791751908*^9}, {3.582564493760949*^9, 3.582564516287389*^9}, {3.58260068294728*^9, 3.582600688001689*^9}, { 3.582603294984668*^9, 3.582603388335232*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"Plot9", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Lighter", "[", RowBox[{"Orange", ",", "0.5"}], "]"}], ",", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", "0.1"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"Plot9a", "=", " ", RowBox[{"Graphics3D", "[", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "21", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "21", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "21", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"nk", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"nk", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", "0.06"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Plot9b", "=", " ", RowBox[{"Graphics3D", "[", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "21", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "21", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "21", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"nl", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"nl", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", "0.06"}], "]"}], "]"}]}], ";"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, 3.571838766139532*^9, { 3.571838857446493*^9, 3.5718388645757055`*^9}, 3.5723437133735733`*^9, 3.5723437554312468`*^9, {3.5723449027196617`*^9, 3.572344929582909*^9}, 3.5723450406551046`*^9, {3.57234950163894*^9, 3.5723495196413713`*^9}, { 3.572584520172369*^9, 3.5725845258195786`*^9}, {3.5726224003989472`*^9, 3.57262241340937*^9}, 3.572796748424938*^9, 3.5727968708695536`*^9, { 3.572796971801731*^9, 3.572796995841373*^9}, {3.57279741546651*^9, 3.5727974308793373`*^9}, {3.572842795856916*^9, 3.5728428061217337`*^9}, { 3.5728522627179437`*^9, 3.572852288426789*^9}, {3.5728523495164957`*^9, 3.572852453865079*^9}, {3.5728524960787535`*^9, 3.572852515110787*^9}, { 3.572852550008048*^9, 3.572852634669397*^9}, {3.5728602362372026`*^9, 3.5728602649256525`*^9}, 3.572860311756935*^9, 3.5731241886618786`*^9, 3.5731408095114717`*^9, 3.5731408826443996`*^9, {3.5740716827539716`*^9, 3.5740716897271843`*^9}, 3.574073190995821*^9, {3.5740743978919406`*^9, 3.574074401682747*^9}, {3.5740753037855315`*^9, 3.574075320758362*^9}, 3.5740757790247664`*^9, {3.574341432758819*^9, 3.5743414337884207`*^9}, { 3.57434147314729*^9, 3.5743415190269704`*^9}, 3.574501459301843*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Show", "[", RowBox[{"Plot1o", ",", RowBox[{"(*", RowBox[{"Plot2", ","}], "*)"}], "Plot7", ",", "Plot8", ",", "Plot8a", ",", "Plot8b", ",", "Plot8c", ",", "Plot8d", ",", "Plot8e", ",", "Plot9", ",", RowBox[{"{", RowBox[{ RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "False"}], ",", RowBox[{"(*", " ", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ","}], "*)"}], RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, 3.571838766139532*^9, { 3.571838857446493*^9, 3.5718388645757055`*^9}, 3.5723437133735733`*^9, 3.5723437554312468`*^9, {3.5723449027196617`*^9, 3.572344929582909*^9}, 3.5723450406551046`*^9, {3.57234950163894*^9, 3.5723495196413713`*^9}, { 3.572584520172369*^9, 3.5725845258195786`*^9}, {3.5726224003989472`*^9, 3.57262241340937*^9}, 3.572796748424938*^9, 3.5727968708695536`*^9, { 3.572796971801731*^9, 3.572796995841373*^9}, {3.57279741546651*^9, 3.5727974308793373`*^9}, {3.572842795856916*^9, 3.5728428061217337`*^9}, { 3.5728522627179437`*^9, 3.572852288426789*^9}, {3.5728523495164957`*^9, 3.572852453865079*^9}, {3.5728524960787535`*^9, 3.572852515110787*^9}, { 3.572852550008048*^9, 3.572852634669397*^9}, {3.5728602362372026`*^9, 3.5728602649256525`*^9}, 3.572860311756935*^9, 3.5731241886618786`*^9, 3.5731408095114717`*^9, 3.5731408826443996`*^9, {3.5740716827539716`*^9, 3.5740716897271843`*^9}, 3.574073190995821*^9, {3.5740743978919406`*^9, 3.574074401682747*^9}, {3.5740753037855315`*^9, 3.574075320758362*^9}, 3.5740757790247664`*^9, {3.574341432758819*^9, 3.5743414337884207`*^9}, { 3.57434147314729*^9, 3.5743415190269704`*^9}, 3.574501459301843*^9, { 3.581844653612524*^9, 3.581844658729333*^9}, {3.582600702072914*^9, 3.582600709529727*^9}, {3.582603405854063*^9, 3.582603415292079*^9}}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-5.049725817200001, -0.91402267168, -2.5171150319999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.5039729483999995`, -3.4179474162, 0.8334447550399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.22233146858, 4.123382132, -3.7660349453999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.7568182872, 0.98713617062, -4.3059296636}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.2769308574, 4.528350413799999, -6.114208473}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-6.8062261342, -4.0861545298, -0.33310200201999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{0.068872953796, 5.500047523, -5.7339956018}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-3.5763064549999997`, -4.5270276056, 3.0061761208}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.6592654263999997`, 4.514555414, -2.9160361906}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-1.2626582214199997`, -3.8586315194, 4.1126106938}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.521839347, -2.296961953, 4.674237261}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.2753591016, 0.6256504840799999, 2.3041429118}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.8012268482, -1.0379886972799999`, 4.2900559652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-0.35109219354, -4.8598083542, 6.5325938094}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.3990331804, 3.4187033066, -0.136744352812}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.9895035328, -3.8988826831999996`, 6.881248256399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.7193417374, 1.86757841128, 1.8664445756799999`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.47241260273999996`, -2.281844145, 3.200250981}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{3.6643676866, 1.4056726851, 0.5243989649999999}, 0.24]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-6.2432767587999995`, 1.28516485808, -5.6723905342}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-0.24194161978, 1.18512276364, -1.53041349836}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.7222193256, -2.5987511952, -3.6539741936}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-3.6331872076, 5.1765264318, -7.494653316}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.0821691294, -5.5542826592, 0.28453604382}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.90209850062, 7.057181747, -6.757093258199999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.7787391088, 5.958872995799999, -3.824805424}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.35412095982, -6.117043062, 7.7888836542}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.8095246668, 4.6271830836, -0.9830354652}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{3.2261402271999997`, -4.2413010344, 8.4684291238}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.435779863199999, 1.59507992208, 2.9366342039999997`}, 0.12]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-4.903383559725934, 0.035832993686348846`, -3.4108413605480696`}, 1.0573980309689464`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-3.69124135315091, 1.7547884222564116`, -4.3546271630263265`}, 1.0571977127777568`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-6.0920703728780925`, -1.7355487992041136`, \ -2.4439431995135394`}, 1.0741882741079054`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-2.4522401432112657`, 3.524057034834813, -5.258086426756632}, 1.0742713828475765`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-5.654235989323142, -3.751800335243276, 0.2506089364466607}, 1.077013673466921]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-6.971104727699999, -3.3222327943, -1.3518816345099998`}, 1.0270067399123455`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{0.6460351408693522, 4.811198121176005, -4.749276635349062}, 1.0761545789850382`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-1.104028951802, 5.0141989684, -5.9241020374}, 1.026700960122281]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-4.040495148114557, -3.9720625536771363`, 1.9189779301391865`}, 1.0489315669081951`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{2.439864897567065, 4.318818920852348, -3.3413611887536896`}, 1.04919745005195]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-2.4186093515966904`, -4.192577363039783, 3.559810887605222}, 1.0691338556090308`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{4.208550772548971, 3.8258921025861667`, -1.925724543371081}, 1.068401337942103]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.6606671184348487`, -1.6679536310920864`, 4.482292570291407}, 1.0600752549994588`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{5.038473000423457, -0.20553743155085724`, 3.2963453977562764`}, 1.0608473122513902`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-0.8072039345917748, -4.3588588944188515`, 5.321729562144925}, 1.1305087411836026`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{6.077068050930663, 3.278384570305565, -0.5371141767451537}, 1.1313721213004866`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{2.2558630264289854`, -3.097345790231271, 5.776948460129882}, 1.1332829966156077`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{0.8192056696299999, -4.3793455187, 6.7069210328999995`}, 1.0200401738748028`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{6.496470070272384, 1.2461670916818637`, 2.085451407459246}, 1.1320756404005345`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{7.5591874589, 2.64314085894, 0.8648501114340001}, 1.0198468874342204`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-4.220403081602546, -1.2199463505487425`, -1.535693835177588}, 1.0658153022447026`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-3.951721633398983, -2.4528074248002727`, 0.11400240010233709`}, 1.0694145952071308`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-1.544560917968946, 2.4342630195666533`, -3.6519190242114985`}, 1.0657435145922616`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{0.3508505481846659, 3.2231038168020634`, -3.338198900031561}, 1.0690180214578795`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-0.3814051503803636, -3.0577715794380405`, 3.6492176221153954`}, 1.0227780548819723`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{1.4809788671191666`, -2.289283938192348, 3.9256308172539303`}, 1.027131466779941]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{4.202050333507209, 2.2582744402312254`, -0.19470275417481075`}, 1.0229801712801354`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{4.457168858202979, 1.02180812251635, 1.4002466405609215`}, 1.026953438328184]}, {Opacity[0.5], SphereBox[{-5.828651808650215, 1.2020342950389085`, -5.291237087145195}, 1.2146789801027955`]}, {Opacity[0.5], SphereBox[{-2.2779228178030015`, -0.9754218857227007, \ -0.36638778202066796`}, 1.0636729424645228`]}, {Opacity[0.5], SphereBox[{-0.31826700046696, 1.5371951453209958`, -1.9514197742282606`}, 1.06379401106704]}, {Opacity[0.5], SphereBox[{-8.279713921817553, -2.587469785096421, -3.2959739318551113`}, 1.2144528350747388`]}, {Opacity[0.5], SphereBox[{-3.254861819021332, 4.995718840490981, -7.109580588736914}, 1.2145800558419535`]}, {Opacity[0.5], SphereBox[{-7.726234882672449, -5.144736870866714, 0.11224109535964294`}, 1.2145104975730954`]}, {Opacity[0.5], SphereBox[{0.6696847503579015, 6.622846282802158, -6.47171799082535}, 1.2146950068443099`]}, {Opacity[0.5], SphereBox[{-4.380254153267761, -5.577746368539442, 3.6508331649533523`}, 1.2147080297802146`]}, {Opacity[0.5], SphereBox[{4.466461768045359, 5.555980403735901, -3.571304118853297}, 1.214566512601262]}, {Opacity[0.5], SphereBox[{5.887205214920901, -1.280610162748411, 5.2529931192296875`}, 1.2145509339138183`]}, {Opacity[0.5], SphereBox[{-1.0743203646001276`, -5.766330269506347, 7.43843443662931}, 1.2145258109475527`]}, {Opacity[0.5], SphereBox[{8.416114248683618, 4.290117217595946, -0.7469902684845603}, 1.2148071141740133`]}, {Opacity[0.5], SphereBox[{2.8812020948926986`, -4.145789436640094, 8.025712838156812}, 1.214695773394865]}, {Opacity[0.5], SphereBox[{8.957012826943805, 1.6710880764652727`, 2.638125618760973}, 1.2147098252776232`]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-5.700246205803357, -0.01282703717543554, -1.665839722619272}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-3.2203404604242687`, 3.4023531489469616`, -3.491119399301228}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-3.8345809131185207`, -4.3736573506860745`, 0.05979572335551386}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{0.7481490536885506, 5.055956224600869, -2.835735746637914}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-5.373117585554261, 1.8976031385417127`, -3.439197250930733}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-7.8100469461818465`, -1.6314467007731497`, \ -1.566571289885618}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-2.799954426783565, 5.42248786660917, -5.172420513131535}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-6.130289259142632, -5.0120326183589405`, \ -1.1367556003222303`}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.4553548406906416, 6.399245757536324, -4.797711588001607}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-4.226009334665408, -3.5569642992592145`, 3.778745437978503}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.131438982806225, 3.5697523175375587`, -3.834948178521411}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.6359128160949288, -4.914321630808731, 3.4397744688702376`}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.376960016217313, 4.136539990134114, -0.03191163870599656}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{2.023017171194928, -1.1840539725140822`, 5.361705270361781}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.8736502199831175`, 1.6993793853525787`, 3.107720052466715}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.3445247341839455`, 0.0281429305889227, 5.074139207662704}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.902554379947563, -3.7574194083596963`, 7.1963920235070375`}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{7.770574087958168, 2.380859866774159, -0.9997845305681223}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{1.4382384634129186`, -2.7978460584850664`, 7.54745030856586}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{7.346674395134039, 2.905085029170666, 2.7294040589939597`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-4.399205428596644, -1.8152183061845641`, -3.368390341380727}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.0342316551757307`, 1.6401917094530385`, -5.315381705898771}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-5.173364983681479, -2.4622374817139256`, 1.6070937867244857`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{1.6965138834714495`, 3.19080803939913, -4.696334144162085}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-4.140518988845739, 0.07666920269828748, -5.172662076269266}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-6.461919696218153, -3.4851754168268494`, -3.174751244114382}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-1.7539072880164353`, 3.634212960990828, -7.055996432868463}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-7.482163009257368, -3.1602764412410593`, 0.47055159628223076`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.5931007482826417, 4.600849288463676, -6.6702796155983926`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.9266035753345916`, -5.497090911940786, 2.2336068036214973`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{3.1870918699937745`, 5.459358510462442, -1.9971242026785891`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-1.8894036267450707`, -2.8029414079912685`, 4.785446918729762}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{5.1370545033826875`, 2.139995946265884, -1.8419028683740029`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{3.0206615228050717`, -3.4098699334859175`, 3.9867692516382194`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{5.677067983216883, -0.4480784171925787, 1.5005657711332838`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{5.257928962216054, -2.104120325148922, 3.505972722737295}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.20036999286756285`, -5.9621973000403035`, 5.868795595292961}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{7.027492272841832, 4.456546746425841, 0.7262958249441226}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{2.5407686021870814`, -4.999919307914933, 6.215046204234139}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{8.09200907966596, 0.8300717933893336, 1.00348509236604}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-3.960917166451133, -0.6634214089671405, 0.14255361226060348`}, 1.246]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.9736448327170033, 3.1880449336416516`, -2.1355908356815267`}, 1.246]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.010390892318845601`, -1.3566639387981594`, 3.8810287503280554`}, 1.246]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{3.258073777799869, 2.304238345028641, 1.2859900721361828`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.871198213948867, -2.3698911771928586`, \ -1.3102153076606031`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-0.015248783082997264`, 1.5117036283583485`, -3.710843463118473}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.955216097798846, -3.2070243512018397`, 2.5194732116719436`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{4.070661595400131, 0.5071070251713587, -0.23719214213618267`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.4], SphereBox[{0.31654635466312253`, -1.4744044461734331`, 1.992397209275417}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.4], SphereBox[{2.2950206335293006`, 0.9210563657123858, 0.36565527337796033`}, 1.246]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.7568182872, 0.98713617062, -4.3059296636}, {-5.049725817200001, -0.91402267168, \ -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.7568182872, 0.98713617062, -4.3059296636}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, \ {-5.049725817200001, -0.91402267168, -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-2.2769308574, 4.528350413799999, -6.114208473}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.8062261342, -4.0861545298, -0.33310200201999995`}, \ {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.8062261342, -4.0861545298, -0.33310200201999995`}, \ {-7.1359833211999995`, -2.5583110587999998`, -2.370661267}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.068872953796, 5.500047523, -5.7339956018}, {1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.068872953796, 5.500047523, -5.7339956018}, {-2.2769308574, 4.528350413799999, -6.114208473}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.5763064549999997`, -4.5270276056, 3.0061761208}, {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6592654263999997`, 4.514555414, -2.9160361906}, { 1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.2626582214199997`, -3.8586315194, 4.1126106938}, {-3.5763064549999997`, -4.5270276056, 3.0061761208}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, { 3.6592654263999997`, 4.514555414, -2.9160361906}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.8012268482, -1.0379886972799999`, 4.2900559652}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.8012268482, -1.0379886972799999`, 4.2900559652}, { 5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.35109219354, -4.8598083542, 6.5325938094}, {-1.2626582214199997`, -3.8586315194, 4.1126106938}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.3990331804, 3.4187033066, -0.136744352812}, {4.7570072598, 3.1382679681999996`, -0.9369072535399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{1.9895035328, -3.8988826831999996`, 6.881248256399999}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{1.9895035328, -3.8988826831999996`, 6.881248256399999}, {-0.35109219354, -4.8598083542, 6.5325938094}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.7193417374, 1.86757841128, 1.8664445756799999`}, { 5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.7193417374, 1.86757841128, 1.8664445756799999`}, { 7.3990331804, 3.4187033066, -0.136744352812}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, \ {-5.049725817200001, -0.91402267168, -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, \ {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, { 1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.47241260273999996`, -2.281844145, 3.200250981}, {-1.2626582214199997`, -3.8586315194, 4.1126106938}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.47241260273999996`, -2.281844145, 3.200250981}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6643676866, 1.4056726851, 0.5243989649999999}, {4.7570072598, 3.1382679681999996`, -0.9369072535399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6643676866, 1.4056726851, 0.5243989649999999}, {5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.2432767587999995`, 1.28516485808, -5.6723905342}, {-4.7568182872, 0.98713617062, -4.3059296636}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, \ {-3.4160576902, -1.5166562930799998`, -0.5838308476999999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.24194161978, 1.18512276364, -1.53041349836}, {-0.49444680789999995`, 2.349874281, -2.9232171493999997`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-8.7222193256, -2.5987511952, -3.6539741936}, \ {-7.1359833211999995`, -2.5583110587999998`, -2.370661267}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.6331872076, 5.1765264318, -7.494653316}, {-2.2769308574, 4.528350413799999, -6.114208473}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-8.0821691294, -5.5542826592, 0.28453604382}, {-6.8062261342, -4.0861545298, -0.33310200201999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.90209850062, 7.057181747, -6.757093258199999}, { 0.068872953796, 5.500047523, -5.7339956018}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, {-3.5763064549999997`, -4.5270276056, 3.0061761208}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.7787391088, 5.958872995799999, -3.824805424}, { 3.6592654263999997`, 4.514555414, -2.9160361906}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, { 4.8012268482, -1.0379886972799999`, 4.2900559652}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.35412095982, -6.117043062, 7.7888836542}, {-0.35109219354, -4.8598083542, 6.5325938094}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{8.8095246668, 4.6271830836, -0.9830354652}, {7.3990331804, 3.4187033066, -0.136744352812}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.2261402271999997`, -4.2413010344, 8.4684291238}, { 1.9895035328, -3.8988826831999996`, 6.881248256399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{9.435779863199999, 1.59507992208, 2.9366342039999997`}, { 7.7193417374, 1.86757841128, 1.8664445756799999`}}, 0.1]}}, AspectRatio->Automatic, AutomaticImageSize->True, Boxed->False, ImageSize->{360., 360.}, SphericalRegion->True, ViewPoint->{1.6732279013522338`, -2.318466532699228, -1.8097019994711885`}, ViewVertical->{0.397795732550233, -1.0975799455054391`, 0.3883409872709075}]], "Output", CellChangeTimes->{ 3.582562830501628*^9, 3.5825635764793377`*^9, 3.5825636688159*^9, 3.5825637943337207`*^9, 3.582563848512616*^9, 3.5825639205223427`*^9, 3.5825640746974134`*^9, 3.5825641404983287`*^9, 3.5825642915065937`*^9, { 3.5825644142008095`*^9, 3.5825644387708526`*^9}, 3.5825645240406027`*^9, 3.5825646259711814`*^9, 3.5825647111005306`*^9, 3.582564799583886*^9, 3.5825994456311073`*^9, 3.5825995632397137`*^9, {3.582599598932576*^9, 3.5825996195870123`*^9}, {3.5825997265252004`*^9, 3.582599755744052*^9}, 3.5825999696516275`*^9, 3.582600040163751*^9, 3.582600365829923*^9, 3.582600753163004*^9, 3.5826013997217393`*^9, 3.5826017147486925`*^9, { 3.5826017564163656`*^9, 3.582601779894407*^9}, {3.5826019546147137`*^9, 3.582601977453154*^9}, 3.5826034540581474`*^9, 3.5826082004135494`*^9, 3.5826082920481105`*^9, 3.582610888798072*^9, 3.582610956736191*^9, { 3.5826110037702737`*^9, 3.5826110778236036`*^9}, 3.5826111125960646`*^9, { 3.5826111572433434`*^9, 3.5826112972535887`*^9}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsvOd3XWea3flzeaad2/aacU5tz3hm/G3WrO5SV1epqiSRkhgAIuecc845 gyAIEkTOOedMImcQiciZBLMYFEul6nKH8Xj2BaFepfb8BbO8lh6ei3BxztnP fvfez73vlZFrhI9noGuEr7vrH3wS5hri4+se/gcfB4fpW3/zb8Df8DHUH2B4 /F/h+3/+q/77r76Gfwzf+e+P//vj//8/Ljs7/C3m5g5Ynj9mTfVg7piN2WM2 p494dfoFK+9+tfjs8A949uxz2tvmKbo5QPXNQZpyB2m/MUjX9UG6swbpSVcl 6+u4fo4mjnj78HP+49lz/zZPn33B/YVjOpsWuJPRT0laP0N1i2xPH7M9cVj+ 7kxFZ4d/SFfHLMX5/dTcGaRV1ZM/yNDtQe7lDTKuM0/qrJM5Kp15PHOQsdRB RnXWpeI5/sP51d5fOuJ2Xj9lek6dntOsq+3Qc7qy9ff0nN40VZIqboD5sgU+ 19WWvLuMgrPD/8TL5291GV1UFAzQWKinFg4xVDjMWMEIUwV3mSu4x2LhPe4X 3WW5eITlomHuFwyxqEtd0OnmMwYYj+riq5O3/Nuzv/mPePnicwry+yjTbdWp 2nRrPfr9wVuD3NVljul5E7rMCd3aRPa725vQ7Y3H9bFaPPuuF9w5O/wTPnv+ hvI7nVQV9dNcPExP8T1GiseZLJpivmiG+6WzrFXMsVE1x1bNLNtnNc1W9QQb laM8KBthTVe8ktvPfFIXXz96w78+v/u+zhnKCvqp1J03nd/9YMEw9+6MMJl/ j9n8UebvjLJYMMqSUFgqHGHxzrDuXgjoLhbU5m2d9+uTNxS+u+z8s8M/1WW/ pvJOG7VFfTSV3KOnZIq7JXNMlSyyULbMauUqG7Vr7DSssd+0xmHLGkctq6pl 1RIHTfPsNUyzUzPOlm5h43YfSynt/+oclYGuaaoK+6gpHjxDpVuoDBdNMF40 zUzhLIuiyXLZvJCZ50HV/Bk6G1WzQmSaB+UTrOuS1oXKam4fi4kdQuX1OSfO 7+CfMdI1Tn1RD40lY3SVzjFcep/J0jUWKjZZrd1ms3GH3ZY9Dtv3OOna41H3 Hqc9uzzu2ea0e5NHXet0lEzSVjTGZNkYu5V32brTozub4F+cozTUOSGEeqgr UQNKRukWSsNCaaJ4idmSZe6Xr7JavS6kHrDd8IDdxnX2mtaF2Cp7jcvsNiyy UzenJkyyXaq/f6uXo8ap8zu5fXb4F2wsbdJQ0EFT8ShtJQsM6C7Gy7aYq9hj pe6AmXydpUj4dz3iUe8jHvc/Yrljl/6GddLyJ0nPnyL99iRpeeOk3BglKfsu SVpbSfHd5Me2MDf/UGQynOtf8+LLX3P/+A3Lx2/PamL1lLSsNjKye8nIGqKz dJ6h0mXGS9aZLdvkftU263W7bDXuCc19Dtr2OerY57hTqHbuqrY57tjksHVN d36f3bpZdsvvsa1F+2ph587v3um/ou5WPc0icWvxvLB8wEjpLtOVRyzVPeJB 82MqzQc5SrrLadsuy10nVFSvkKEryhZVcgwl7K+XzJJdOE3mHd257jgt5x6p 0r3UhC4y0/ooadlibfu1NMxwzn/Hsqhz++4Wd+7uUKgqGlEN7xCuBeeT2Ilv wgB+cSMERd8jLPwuFZlLLFUfstZwzFbLQ/baH3HYdcpJzymP+k553PeI3fp1 jutW9fUhxz177Hdusdu6qn7PsVsxzHZBC98+e3XOVW6dHf4tr599RnN+J22F U7QVr9Jbusdo2UNma5+w0vyCrY7PKPJ9wEpUDxWx1WSUL5JducytivsU63Fp +QINJTOUSFOKdbxVPE2WAYrb42TkjqiBfaSltFJQt0RZxzaljRt89vrXf+/s 9P+e5dPX3BnbomBcCKiKx3YoUZWO7nCz4z7+empgSi+ByUIjaYzw+Ami4qaI i50hIXqKlrwNdjufc9jzgpP+l5wOvuTJ8EuejbxgKmyE34rhLwbEi6GHHPQf savVttu+JlRmtLr6OOke+SEi/47tpS1a84eEyCLtRdv0lZ4wVvmMucZXrLa/ ZafnS7rubBEW0ExKbD25OQNUauHViqIN5fdpUjWWL9FYsURDxQJ1FbOUV8yQ VyZkisbJzB8mM7eLW9VjVAzuUN67TXnbBv3DB7JEwzX8L7z8+teCZZ2CiW2K JgWLqkRVNqESTOWCKCa/l+D0btUwoQnDRMVoiUWNkh47Tk7iFNkpc2Qlz1OW IwFqfMzp8Oc8vfsFz0e/YCK2iWc3+/j17ENejj3h0b3nHI08YW/wRBBJpNq1 bBpHJRLNP4TnD2jIqZM9jdNWsCZ4Dugvf8J47SvmW79grfsbJkWYlNJFgjO1 6sPbKY+qpzp/lvrKLZqqtmipVtVs0Vy7SWP9Axrq16irv0+NNClPcptdNkl2 0QA3ygeoGtulUmujsn+bis4NBu4d/N7ZZfzHM4QKJzYonBJCU0JnWshM7VI+ tUfFpGpin8qJA0IyOwjNHhZxhomMHSUufpKUpBmy0ubIzZon//oCRTcWKcpZ 4nrqAiu6/Ofj3zIU28ZJagt/2dHPFxOPeTb1BacTbzke+4z9u0/ZHTSQSeRr l7g09fDZ2tq5pJwj9e9pvtFK2+0Z2u5sCqkT+itfMN7wOfMdv2Kt7zckSlfT qvS00k0SdGn5sf3UZw7RWHMkdI5prT+htemYlhZ93XpAU9seDa1b1GlVlzct klO7wPXKcbKKu6iePqRKt1w1ukvV4BaVcpL17Rf8D2fX8r+dwVU0uU7R9BbF M1pfM7uUzexTrudVKNhVTp1QNfWQO30bhCloRCSNEJkwTlTiHAmpS6RlrpAt IuXliZT5a5QUrlGhqi5cFYRLTJRtsxbXyp+23OWr8V1ezX3H89lveTzzNSdT n3Mw/pLdu6eCTeuvV+TqGObN9tYPEPsPtFzvoi1vQfzaob3wMf3Vrxhv/or5 ru+4Je4kV6yQU75NYekBt25tkxw9RnXKXZrvLNPS9JS2lme0dTyjtespLd2P ae45obHnkIbuHeo61yhuvc8N6eH1ykFq5h9RPXtC9dQR1aN7VA1tCrVVXr39 9kdnl/O/C7RvBdoqxdOb56DtC7QjKmZOqJx5RNX0Y6pmnujPPCW75T4R1+8J MIGmVRedukpC1gbpudvk5O9xq2hPl63ny0ArK3eo0XIouTVLomc1X9WN8+vx NV4v/IUM6s95sfBbnsx/x8PZbzicesPe2DOBd8jukISrb5y3e3v8deSyemjL XRJye7QXP6W/5g1jLd/Q2/KKhFL1TwnkVvEhheUPKa98TE7OJnkpM7TkjIpn R7R1vaK99xVt/Z/ROvCS5sFnNA6e0jBwRF3fNvW9K+QKvZz6UWrvP6N28Qk1 c6fUTB0LvV2qBx9ohS5+j1zR+BIlUw8oEc1KZg8pk85UzJ4KtSdC7BnVc8+p nn9BzeJLctofEJk1QXSKUEtbIyZzi8TcfdLvHJNT/JDbFY8oqj6lvFaIa0nU NhySFd1Cw41uOouHeL30//D6/n/hlerl0l/wdPG3PJz/lsOZL9ibeMHu2EN2 72mlDk3xcHrsh8hdoSWjmzYt/rbb+7SXPKO39i2jbb8iqmCaBGWprBI1r/Qh RRVPKK/WZde91Ep4QKV42iGpb+9/S/ugavgtbSNvaLn7iqa7z2kYOaV++JD6 oQ1uins5zZPUrX5G7bJue+nZX6FXc2+H6oFVHhw8Y/X0uWR+VUSTUYpoZbOP KJ99IuieUTX7QrB9JsheUbv0Wn/nDTe6dohOnhRsy2ewxeYckpT/kIxidViW dbv2GUUNzylvFuQtT8jOGqPq1jCt1YOyJIX+sW94vSLoVC+X/5Kn9/8zjxZ/ w+HcV+xOv2J3UrliXDni7gxvjw/+OnTj9XO0ZQm6vHfQ9dS9FcF2iS6SaFRs cL3omLzSxxRW6hJqPqO68TUl1U+5fnOVprIlOlv1vJEvaJcjNQwLkgHFq74d 1QaVvctU9syS2TRFSt0wKY13uTOyQenkkW7/+Rl8UQWduMXkYeQQyKdeQVz2 jeaKX7IqE5eUWiKV8Ctndd7511QvvhVxP6d25Qvq1r7kRvc+YRK48JT7hKVt EJC8RmjWFnG3D0gvfST4HnGn8Rnl7S9JyZmm8NYETQ1TNCtYtnTIvhq3eb36 l3y2+he8XPlzni4LuiVBt/A1u7Ov2Z2R2E1vi32zvD05/OvQ7Uhz29LntWb3 FLue0iXWpSlwRBctkVi6Iwd8qMDwlMKql5TVvaaqRZff+QX51VoM5Zt0yjGb pGzVfVp/A2LRoI6DB1QPaS0OrQtKeUPbDBmt8oc2hY7mUTLq7+KZXISxbxym vjGYecdzySuCy94RXPNN4JpfBiZ+NzD1u4WpUwbm/gXElk9Tc/9LwfY1JfPP yRhYIaZ+jCCFjaC4OQLi7xOY+kAWKybm7ZFUoIWrFXNdNMgqWudG3gy1jYvU abpp6j+huVfyp0y+NfVW0P0ZL1Z/K+j+VNB9x+Hi1+ypVbvzgm5W0E1M8/pk /69D9/r0c1qSp2nL3lZGO6VDJhGSN0ZU0QqJRfs67Sk3y55ToO+XNL6lov0L apTZ6ge/5nr1LrVN23R0PqBm6BG1ww+pHZGm3D1W7au29D3JXIdMonOKXM2M NzomsYtI5YqbP1ddfDBx8cLK3ZtPA6K57BcvuFIx9UzD1CISc8sYLCzjsbJO wMouCb/0djIH1kjS1JwiNqf3zhGcNklA9BxBiWsEZ+wQlntAzB0t3OIj0isO SSnZJOnGAuUac6s6V6lVuG/UtTYNHgrGdUaHjnmx9huer34n6L7l4f1vOFj6 kr0lLdhFLdi5TbYnJ/j2izffQ/fucInxqge0pq/LJSStt5YIuTlJpBw8oVCk l9/eKH/B7ZrXFDV9Tlnnl1T1fU1R1xNutRyTW38gX92ROwhCOXndPdXoQ+rG 5BCKo+Uj8uaeBW4PLnCrfw7HuGyMvEMx9grG1MMfM1dvzB1d+Tgwig99UjGz jcTM0gBZHJbWiVjbJmPjkIK1YxIm1pE4BOWQ2jtPZt8C2f2LRN2cJih2geCk DUKy9gjLO9JqOSGp/ISMmmPCspe4U7tFefc2xW0Kg+0Ska4NGu8e0TSyza3a cZ6tfsvTlV/xeFmpRKw+uP+W3fuyiCXF3vk11sf/ahr4HrLXj76iJfG+Fuo+ N24uEnRjivA7a0QX75FaIEkte8nN2jfcafmckq6vuN32lNsdpxT0PCa37SHF ncd0DWzTIIbVjD+mdkKyP6nYMbFLnhbqreFlCu4u45x0k2v+0VqEkVqcYZh7 B2Mp2EwCgrjoF8NHXsmCKgILq1ixS3DZpWDrmIaNkwHKGMwdYrFwjMUlPI/r A8vcGNSY2rZMcJzanLxF6PUDwmQN0dK2RIlI8M0NzXEaPzUQ5XftUdS9R2nP FhXdYl3vGg0awPKkd49XvuJ0+Uux7HOOZTn7K5+xu/yUnfsHbM4t8eL04feQ vTt8ovFxm+b0LW5kzxOUPUXYrVWiCndJuvOEdDEsR3p2S3BlNz4hp+WR3PGU /N4nFA0+0aITPBpC2u8py04qLExpAp8WjON75MhJi8YfkN56F5OgeCyC47AK isFWjLL3D8PBLwjLsHA+CUjiglMs5uYRYlaCmCWoHDIEVTrmdnqOUzzWLonY uiViowrR+Js39IDbwxvSsFVCU7aVgY8IL3hEVPkpHtc3iZew5KmVN7uPud1z RGHfHsWaSsr6lXv671Mlvc1tnmZRrT26/4bD5Vfsrbxke+UZW8sPeaCh8v70 zPlLdOeHj6mLXj6b0wLSJwm+sUK4gm9MwUOSS1+QqaEqvf4Zqco8ma2n5HQ+ Jq/vKXcGn2qBPeZ69ykDPSu0KH6VKomWTB+TPbSt3GWorTOILMOSsFbZhMZj HxKLQ3AkTkGh2ERJu4LT+NgxBlPjYKyttfjs07FxTMfCVvrlJIa5JmPrnoK9 ZyoOXqnYe6UIok3uSCNzujYJTd48gymi4JTAghMCbx6QoXZmdj0kp1v2JWvK HzigUDNuiVpXNrRMUc80mdUDdCvw7C4JnuXnPFh5wtrKI1bFqCUtwtNHpz9A 6SKvTr4hPXIcv8QJAjLF6ZtbhBceElv6lBTlihipZkLdCamGs4tAOSJTnsiU f/cJWf2nlLRvMty/QIVkKnN4nzvjm8rx22R1jGIZnoq11N0mQiQJT8IhPB6n sBicRSSb2Dgu+6dwyTUBMyORyyJeRMrEQspu6SBkXfQc91TsvNJx8MnAyTcd J790okr6KND6KdSkntGggSp7H38ZZED8Ahm1hyTrGtM6HpPV84gb/cpIUvZ8 GXfByCZFktG8zknSa7po1TWvLz1hdfmUpeUTFu4fMbe4w4ON3e9feXx3+Iip xWMisqbxTbqvU20RqBgTptQargorOyRGCpnQ/JCUjkdk6LTZyvY37kqixh7r cg5Jz2klMSIdx6AkovIqKZ/bIrqyHesokSJSFZWGXWQKjpGJOEXG4hwZiU18 PJcD0rjkJihMQzEz0fccRCA7mZ+zlNxNz/F8B42jIplzQAYuQRnEFnWcQWN4 YaNEo3tC2RYeAePKPJskq4UxLack6jrTeh+pfXKqoUNyh3e5pfh3c/A+KU33 SKnvpK5rmIXFE2aXjplSTczvs7J59P3LygXnL8quHT6ldGCTcDHHO3kDn5wD ArTGvPI38VNUCa06IrLhhFipdaK4m9KvUw+fkjKi5d91wE+vemFn6YWXgzsu 7j4Exafgfb0Am+g0fqR/0/lP2Een4hidjFNMPM4x0dgkJnApMINLWj825mFY WUTL7GLPWGPlIrZ5ZGDnnYmDbyZOAZlnsLiGZOAcmiYmD2IWoLxh7oW1iSs3 w1MolZKHVJ8Q0fiI6HYpuNZXitZXuiJf9vAOOXc31EZNky0jJDS2y6iHuCto R+aPGZw9YP7B8fnbKOewfMBnn39Nae865ZrwbraeKGSf4pq9i3PuJq4F23gq wfnU7BHUeERo6zGhnUeEtG6TMbyFc3o5PzP1x0LB28fDj2Afb0J93fF0CsTT JQhn92is3ROwcY/Hzj0We49IHD1CsAyI4lOPVC6Z63tXpdgm0diaxuBgnYST fTIuzqm4uqbirt/xlOT4eMTj7xaFn3sEZp7xfGLshYWFJ35uvkSH+BGbW0Z8 g4J8rZgudkd2PCSu55jE/gMSNbXGdiwT3TpNVMswUQ2tmnAV4PsWaZObvP36 u/P3sM4J83NKO1co6z2gfFij3vgrbvZsaxFME1wh9OtWCW9aJ7ptQ392jYx+ +fbEKkXTa/jkVvIL+yBMnQMJiAgjMDaCxMwUPOMy8I7PwiE6F9uom2dHp+gc XGKycItNxUNsuRKcg7mtbt88CRfrdNwcsvBwzcHb8wZ+Prn4++cSGJRLUGgu sUFpJAYlEx+cyIcmfpjYCmq3YEKDg/ALCySlvFIj4xpZ8vD45k38lXb9a3cI bNgkqElps3mRkBY5TdMg/jXNFDRNcLentfR3UfgFa3svKe3eFTE0fI6+JLFi UMttTOoqVWqfIbNb2Vh2F1vbj19eDQH5NaS2DZLU3M8f2wRg4ROKT3wYjlEh +nkelyQfV6OzMIrJ5lpsNqbx2VgkZmKVJFlJSsI2MQajqBSuyZotrOVZdolK MqlYumVj65ODfcANnEJylWxycY3MxT3mBl5x13WOTP7YKpSP3KMwdQ8lMCwY 78hAEisNKKiTM8uUTt2neGKJ1K4lErrvE98zL4JMEifpiG5rZ2CkkoczqslS /vSrl9+/1fc9FC/ffEtp+5ZIcax8+4yksn6Sa++R2jiOa1oVv3SK46Kbpihx 08gnUQEuEbPARMyDErF3jCY6MoGQG6l4CYaK+SW8cm5hFStljJPpxEsGElOw S0rGITkBx+RoHBMV+gKDlFhCsbYIx8oqHHMbSYejIHFLxcpbgc8/HbsgqWqo zCYiDWfJkHNiLomN/fzUJZhPPENxDw/V3/EhvLxGVUdEeQMRZfVqXy+FE7My wCluj42Rd2+I3JFOcvrqWJqq4uG8aqaML09Xv4ei6Hxt9I0fa30cUCbjSCru wTm+nJ9bRfGBfQwXnWK47BanqC+f9NWlBihYiaMWfnH4OEeQnRyrS41VYhmQ sSwQU12PZUzyGRRWCYJDENgkJ2GXopSSHIF9QiDh3sZY2YZgLQgsLcMwtVaX HRIwd0vB0lvw+adhq/VgH5YmU1JJgWOq2mQqGkhLGnnfOQR3r2iCIyKxjlbY U9mrrCMVHMPjMAuNIbS0glvj97h5r48bw61Uj9Qq56qWDFCU89WT1ZLffbP7 fUqad5SSTzTvZfEzk3B+oQHmIzuJmhC4KgRMvOIx91V+CkzANkQ26BVHYnAM kUkJWvkJalY8vlm5WqEDQiARy7gkLBKUJrQOrEUC25RYbJPCcI7wIN71Ij72 tljZR2FuEXI2FJnYx2PmpklAWczST94SpAQSpowma7aPTSejcwT7lJtc1bmv Buo6XKJJFhnsdOcOOr+jFMcxVglHycY+JgariCjMwiIJKCmQzTYrf9XxcEUI LFfzcFEIPPsrInwPwWdvfiPbKuFDsxh+bhzKB0rZF22iuKQoaeQai6lu2UJj sbXip12o0rdzNBHRGoWVFlx0epdYQ8UJhhzctR7M49TUBJUgskhWOk+KwiI+ nBjdfqzbReLcLuBkp9nROhwjjdjGtrEawRPVgiTM/ZKxlCBahyWfJRTz6Gw+ MbwIFByPSZhaES4b1lAUoinBKzxKJDHcuiw6Pk6lkJcQg1OCCBKpOTU8Atdw fx6u1/NwTRCsCoL7/58Q5CTJyU08+OBKJL+8LAUSEz7WWrhsHy0IlKi9Ys+4 byMITD2j8PKOJ0q36Bzz7tZd4mJxjYvBRZdgoUBlJikw1c9NE+MwFQymCdH4 e5sSJQiiBUGs+wVCnIy5ZhrCFctortpqrTklcE0WayrZMdN6swhPwygkhQ9l lZcDYjHScGQaauB6PMY6v5tPPF5ag9/fvkuCZkUpr0tilORDU0GcJMPbHd+P 3yPDy5SHDwTBmiBYLufL5/+NHBzu7eBucRUPC2MuX/Diw4/D+OhqBB+biwl2 gsElBhNP3Z5vLNaBgsM5kmCR0i9Op4/W6WPfQeCqW3VN0PwWF4fTdY3ACakY SxKMxRZvT1PCnC8SLhgixYIoVYz7R7hd/YBLV8O5rDH4ihLDVU/dumK3cXCG up7JT2wD+MRHA46/GKlzm4aIkYLiqmesgle8riMCR53P+XsIkgwVra8jsIsN xd/uEwIu/TF+n/yYTG8TMUJysFLOF89XS34YGO4/fMNlxwAuivcfu8Rz0T6S XwiB98xu8p7lLd63ucFHjhlcVgw099aVeEZiJ18Ii1JDosS9aCXp2HdEcEkw VDQOCXG4XldgyMjFPDgQdzcTAhwvEOQsErhcIMz1AuFuH+Fv9Qs8rvwY248/ 4FPjOC7ZaFBRtLyk3HTFL5WfO4bzkaumYS91xDcGY6FhGqROaAy0ChdBnGMJ CInCNUbN17mdhYRzkuEYjXe4J1HuV0lx/AVBV39C4OX38P/kj5juSuN4tfQ8 MASd7+JZWDhiRfNHj+JFYUY/pWn9DNYtsqWBdGPi8F+eb1x48dWv6Vo94c7Y NinNE3zqqelKxnlFLTESkz+1DuaiZZQ0Vdpqc5v37fN1E/lcdLnBZY0U3tLW AAFnHxGnbCG6xAi8uJgf4ST0/pOmkSRMI+KpbLxNY5488Nov8LL+ED9hF+D8 Ed7Wv8TL4he4m7yPy5U/wkn3Y3f5ClevBXLROoWPnVKF900+cIjmQ7H1okc0 l7wl635islhkbsBNp35fU42V4vrFiDw+isrnQmQ+H4Xd5hO/LFwcvdQrOyId rxBs/CcEGf0xQZd/TLafMfvLJZwD53++Gen588/paJ+nKG+AmluDNKs68wbp zR2kP2eQgWwdM/R1yiBd8QMcThxrnjE890MheUTB+JbsXIOUKqSgmavecRhp rRt82FTKf9XUG6OPbbj2qR1Gl935+FokH9hm86HjTaGch5VbLh7yQtswuUFk HA5C1UGUdJAzWMox/AOcibX6KV13gnmz38pC300S/ayxvfQzbK/8DHuj93E0 /hlO1wz1U1HxPewv/RSbKz/FxztM83qDfL+UD2zilBMiueAarXgSwxWfGC4F JPFB6A3ej8jnT4IFoepKxC0uCtKLOpr7Sj+lZTauEbKQCKwcwjC6FoyzsTnB V98j4PIfsjHff46o3/k+qi7l0+L8PmoKBmlT9alG7gwydnuQSaE7fXOQWaE7 e2OQGcNeKsM2MaE7EjvA8b3DdztSfsLLr76le/2Ywsmtd28uTxneXN7hqtTs muzdxEfi6xCKqZkXZqbuXLtsi5mRHeYmDliaOWBt7sAlY19szMKxccuQBuRh 6i2RDooj0N+FAH9XorzMSHP9UPUBifbvkxdszmd7rbzcbeH5TjOTfTcouxVE VKAlFld/ioXRn2Bl8kuifBy5HeNLd2kma/fqWJts4Oolaz7WQPALA9Dy4Qsy oZ/6X+cnIbf5abiWUcQdfh6kpntcx8pJudLeU6Ork7UjfwdHJx8cNLPZuUVg 6xKOiaWihmkw16744/SpEWOdzd/z1ud8D9iLZ6/p75qlvKCPxqJBulXDqonC IWYLh1ksNOx6G2G1eJh1Q5UMsVY8yKq6sWTYBSduz6QOsFY2zz8+f43H8F5r 4fia4N6ieNrwXqsgn9EUMr0nyBMx8U3GxEkJyNwPcyt/ZUN/Qe+KuamT8qEz VtbO2Njp8WU7Qm1d8HdxltQGYWsTSpSTCSny0VQZSKq8NFXymer2AbE2P9MS fY/n2808Uz3ZaeLRbgNHu/Uc7tSwv1XN9oMKfv3tZ2dXudxazmp3FWvDtayN 1WP70Y+xv/gTnC79XPLry899k/hlQBofBabzsa75U8mviZ0nl3/hiJ+xIz6W tjjbOuFi64irys3OQSOvG7ae4Yr4oZjZBWNqGYS5eTi3b3fxbufa3+XZsy9Y lMC2tyySnz1ASdYgZekDVKQMMFKzwPbkEa8efR72u136nxk07Hcr6qVJyPeW jHC3ZIzp4gkWiydZLZ1mo2Ka7appdmum2a+dUk2wXzPGbvVdtiuGeaCurear Y9cH2Kqee7d36f/Q2viVGrWiRm1QfPY+pZo0s0/FzCGVM8eY+qXJ55K5ZqGB 2CYEC3uFeCdFUJdQrGy81DgPrB08sHVyx8nEhWgvDzzcnAWEE/bioa1dCFHO 10hxv0iympXs/iHJala07fsEGr/H4+0mTrcbOdlpUJPq2d+pZXe7mq2NSr77 9at370D/G55vrbPcVslqXzU95RnYfihtuvATrIw/5YKHxiQfBQi/CIy8gjGx ctKYJQ7ZuHDlojOeRm746rGLgxuujm64Obvi5uKCu6szjvZa4i4BmLvo1pzC sHFWZLWNZmD8iH9+du7f58WLL7iV10eBuF6uqpOmN9883xYrTe+W6vSkqZJU 5xtNv3j4eci7/nl/v9Gva4Lawm6aSobVv3HulcwwUzLP/bJF1ivvs127zH7D CkdNK5y0LPOo9b5qSbXAw5ZZjpsmOagfZadqhA3D6svtM+zy/P3zt+h71vcp nlqn5KyH+5TPHlExe76xYeYxZv4a1d2SMLEVOR0isZQn2rgpv3hEYedu0BAf bKQdFuppoLMf0UFeOHm64+zhiqubEw6ugeplIBHORiSpj4lKbonqZbDpnxBw 7T1Otho52m5gf7uene06trZr2Nis5uBw8HzXyr9h594g9zuquB3tg+0H72F5 6SIfufhzwSuUT30VdD2DMbJ0UQPddB3ila0n16564njFhwhrN1xcvHUt3rh5 eOPu6YWruwcOjq4qZyw8ZS7ScVuZpbXyW2X3BoMTB/yTs3P/Y148f0tv9wIl Eq1yVV3Bu13H3Wpov6xkWDZyT0I2qoaOGWwk492O4zE1dSymn5XiWYLfddTr 7PDP2bi/pT/TQaM0satkmpHSRaZLV1gqX+dB9QY7DVsctmzzsH2bx13bPO3e 5lnPFs97N1TrerzKk677+vkch81T7NbdY7tskPWb3Tyb3vn7551dPX1GyeQK pdNb6qxGdnX1bPPFrGGryjNq5p9jHpSLmeFNS4cYUVkTlXM4FgarleXaChlb N61addXK0pfIgBD8g/1x9PHB2ccLF283HL18z37H1dGFeMlqvCQ1zOp9gkx/ gu+1H7O31cDOVj2bW3Wsb9WyulHNnjr7e993dnSQjtvpmF38gA+dvJVUA7Us DV3VMG3hxlVLTw283uqqr7rqh52DPxaXAwmz98PTzRdXrwCNNP64evuJad44 uHnp6IGjUq695gC7AA3H3glUDW2ps+vq7N75ftO/z2cvPj+zrkpZVrWqSdUp 6+ovGGIkf4jx28NM3Rph5tZd5m6N/Ij5W8O68Pm8IeYN+7elwPOp/UxGdhh2 MQf+bo//JXX5TWf7otuKpxksWWaibIOF8h3Wa/fYbjrgsO2IR13HPOk95vnA MS8Hj3k1dMTr4QPVHoP1Cww0LJCcN0LyzRESc4ZIyOglIamT6IgWVg7esrL3 5u+e7+sqHl+kdOrB+dakh2e7RSoNu0XmXlA9/263iHd2C8aayS7JCi/ZhmAk qzFxDlO/Q9XvUPVbRymvp+wqJjICBw8lAm9fHP18cfb3xsXXHVtvJRlXf4KU bEOsfk6g2U/xV6+rbgewsVHP2kYdyxu1LK5X8+zlg7993uat0SGNhNZ85OSn UBKiFitY2wbyqYLTVUs/LVx/zPW1lUOwwocW8+VgghSsArwCcfYNFs0CsXf3 x8HdV+WDo6da7huKQ3gOdiGZ+KWUUT26T/XQBlU9K7z6/FfnieKf8urFW6oL e6ktHqC2RAosP+sqHmGwaJTRggkm70wye2eaxYIZ7hfNsCJ9NfjiWsmUaoJV /d5qgVKMFvvK9T4WEtoNe74D3vXb83z/7NbSJk13emgtmtRfX2akZIvpigPu 1xwzdWebfptWDpJ7eDrwlBdDz3h19xlvRp/y+dgTRts2yNIZs8tUpVNkyZ0z CsdIy79L2s0hUrN6SUlq53rROMXdOxR37NA78ZCXb777vfP+rz56SumE4YVO Q1w6lhM/kRO/oOp820vN4ltKpg1v0HVpOkxQ/8O46hCBsUskZm5RWHlGaZ1E Yu8TiYVjGCFKqGFRmgi9lP60xp28vHHy8cbR1xs7b61B5wBsrO3wM/sZvuKA t+kfU5znz+JaHXNrtWweDPPNt6/+znn/P/v6V1zyCFL/tbwlLxfdY/nQyItP FI6vmAVwzSoYM/tQmUv4Wdo3bArw0gAWImG3dQ+U0bzrv6NnAM7eSv/e4oUu zdI/BQv/ZMJuNFAzadhEtUf14DqVPYuaAt697/PqxRv5Zxf1JQM0lA7RVHpX qjvOoFbmWNEc04ULzBctcb90mdWKFR5UrbBZvSKPXFbJX6s1wlbNs1Uxw1bp OFtKtpu53Rw1TPIDEvw76m/Wyxvunm0Z7i3eZLT0kNnqR6w0PqUj6ZC7aUcc xTRzFFHNq9HXvB1/zWjnLjmV89zQaUoqZlUaXcqnKCqdoLB4VGQYJ/POPTIk ORmZXSQnNVHery73Khx3qVq36Rs94X88u4b/leJ7s2LCA80pUnx13MCCyplX VM+9FQsUSEZ2SW4fJ6Vz8uz1iCv2URg5R3PNTQ7gGYu1Tyy2mm8c/GOxkx9G xSThHRaFW3AErnIAF3+1QA5g8HhrtcPcXWHVyRNXi4/wlBK4mbzH2FINpy83 +frb13/vfH2UjM2fvTx9VXn4klcyF90S+eCqHxeNA7mkMeOqhcTIJhxTuzCZ kR7r6GAXT5SMwFaG4CCrd1JWc1FWc/ULV4VKAYKxDzFsUEoh6mYjaYWd3JYf 1tzblhIss3H49G+fd+bwZJ3jhw9Yui/HHqrg7mAF9/pVvRWUZsZRnnWHiqwi mtXgztIZBkoWGNUyni5eZaH0AcsVm6xXb7FZty173mavcZv9pm0OmjZVG+wb Pl1Rv8JO7SK7lQrTsvbtWx28mt8+H/PxOH+v/9XTlzTnddImzWkvXKOvZJ+x ilPm65+z1vaa3Z7PqY1f5l5oF4+jq3jTeUC9TnG7aonKs73k8zRWGmpWj6ep L5+krmycmpK7FBTfJVtalXWrl8ycFoo6F6kY2aFiaIfyPpGm07DzftOw8/7s avZ3d2jr6iL4dgWfesdx2Scd5+Q6IorHiNJ8UL3wJVndy6S0T5KmOSKzZwb/ /DauOsZi7BqHiWcC5j6JWPslYmd4w8MzHt/AFCKTU3ALi8U9LBqPsEjcQ8Nx DwnBLUA27aO17hGGpdaxk5MlPtYXGOio/wfnnfrsq2/E3yUyxdGrvqkY++dw LeAWH5tGaLYN5xPN0lesIjGyjeCqfRjXNMeauUTIPhIJ90vA3z9KbhWLS0CM +BqDW6C4GxipCsch4joeiQVk1QyRVdFHZlEHuWV9IswDqgZnz1PJf+Dh6QNG xioYHatkcrSS6XtVzKnmR6pYGK46m7nLEsIoi4+mNDaOsshE6uPu0H9zlEkJ /3zZLstV+zL7Q7Yaj9htPuag9Zij9mOOO4456ThUHejxnoLANrstG+w2LGvk mmG3dJDtO818++wzv98lzkW25h/Qkmf4UNgC7QVb9JeeMF79jIXm16x3fclu /684GfmW5oR5ZhMGyIqv5LaaWFuxSoNErVmi1lxjqGWaJGyNUpyG6nnqNPzV VI5RVj7CdQ2I2QWd5DePUT2xQ9XYDpX3VCJQRc82mQWjpCZk4GJujJWdHVc1 shp7J3HNJ4tr7tkazbMwdc6RqqTilVYn0syKNHNc71sgd2BRI/x1KY2mCcM2 Jr8UrEUW2+AUTFwTCYnNxD8hFTeh6R4Vj0dkrEoEChd5QiX6QTIH+ZN1QCSO 3h4EOl7j988/jbCmrFs6sSbV28MlqRIj35tizh0uWyVhbJuCqWO62BKvzGN4 1yBOqmV4UyYBE8dkAnzTlGsTcRaBXYISpHTxuIXE4RYqBoUn4BCVS2J5Dzea 7pFTN8j1yh6yi1vJvFUjBR7l1Zdf/81z8X10us7YeAXjE5VMqeYmqlgcr2J5 rIrV0SrWRKJ1kajzZgL1SZHUJ8ZrrSdTF5tGU1QGbWGZ9MZWMJ2/yFr9Izab HrPb+oTDjqccdz7lYfdTHvU8ZaNynY2wRl60rHPUfcy+NGK3bYvdJpGodlIS 1MOb1a0fEOgfsT2/Q2vuPdpur4hA+wyUP2ai7jMW2r5gvfdX7A39hoejv+XZ 5J8RrfElLbGDyoRG6ovnaard+hGtUr9/Rkv9tmqLpoYNGhvXaGi8T13DHLV1 4xRV3+NGxRCFXTPUzB1QM61QNrl7xiOX6HxljlhJfRQuZtbY2ztyzTNaXEhV xldfTGP5EWaWCYrPV82UTfR71xySiKsYEHeWuTW0QoqGWVMfTaQ+aZgHpGMV nK5jqjJqFmEp13GOTsU1RuIj13KPSVDF4R4tBYiUhYSJbwGGt2UCMff15eRg 9/fPt6qV3puhbGKD8skjstpWMPK+hbFfIUauN0WbDMWlBC4b6OMsyrgZdC5Z Rpmi6CS6emcSHZaEs2jsEpqMqx67hifiFpGAU2wuvllV3OqcJq9tnNzmEXLr +vFLvoNvfA6f2ntiYWWNi4kxOfFxgjWLzrZMpqcqmZ0SdyarWFGtT1SzMV7N 5lg126PVGobv0JoaRktiHE3R6TSG36Al/Bbd4XcYDC9kOKqAoYg87pets9P2 GQedrzjuec3Dvtc87n+tfPOAe97lPK/c5c9GljlRKj3oO2Wv+5Dd9k0Jlmys 4S47lY38gEQX2Jnfo/XGBG156yLREQOVzxhvfMNCx9es93/H3shvORn/c6rk kHk1qySnjnJH83BDaifNGnBbG05oa1RJE1tbj2hp26eh9QHVTQuUij0lVQOU VnSQVtJNSnkrybXtJFW1kdk4gFNcnpRGLfCI04qOxdRCLHH2wdTwtVUUpmbR mFskYGmdzDUxyMQqWlEyFnO1ztwxAdfEGvKH1im4+4CMtlnMAm+oMrEIzcLI LZnY0AQCUsWiWClcXDqucWJSXLJKz42NwTEmDfuIVCyDDa//BhOdnfkPzy2j 9N4CZePbYtCJ6hnZknVj32JMAsu5aBmvaSeeS45JXHVN1uUb3gZKxcovHVuR 2NrjOhERmTiHpeMSkYZLpEgcJTbFZOCcVERB/wL5vbMkVXbgEJPNFXc/MdNL DuwrRvpiY2qCn9UVIr0+/BHRPh9JiGJ9LjDSnsXatIgzKdKodkWgvfEaDsZq mKnJpiMlmpaoNFpjbtAWc5uumEL640q4m1DGRFI5sykSscRiNmp3Oez9kof9 X3E69JW+3mPcu4S3dzr4dmCcl5OveDjyioOh5+z1P1KA2We3c02CpBzU1MV3 r176/tDJdub2abs+JQ5tiEMnDFQ9Z7z5c+a7fsX6wG/YvfdnLAwpelQvUVah yb36gKzsecqyxmnNkgNW79Le9pS2jic0y1Orm9epaFygomlGxwkqGkaorOvh ZlUXGbVdZDX1klXfjU1oEpfs3bhsaaeA6YSVoy+WyhAX7DQFOcdgJs6Ym8dh KdcwNY8Wp6KxsNXXjob3r5OwNWyFdEsho15Kd29LU/cWWV0LeKRVYB56HSv7 aJKSUnBOuI5DfBZOCWpqgpqaoGYmJOEkqbeLzTl7j9o1KZuEomJyKgr5fH+N f3C+0fizL78Sme5TPrZH+fgjyideUDH5hoiiWYz8S/nEPVfXm8gnTsrubmkY e2Zg5pOhUSgTmyC5sHMmcYFJ+EVn4BSl8+voHJeDc2o5OW2TFA7dJ+RWtRwy AiOfUK5JDU09fTFzd8fc1RljR1sinH5Mgt9HJPob6gKpfhfJ8P2YikRHdqZq 2Z+s5XCilqOJOk4m6zRGJdKh+2uPu05H/G0644vpTSxnJKWK8fRqZrNqWbxe x3JOHfczxcSWEx4Nf8eD+hNG/ap5XTTAr3uHeamB+MnYNzwa/YLDe6/ZH37G 7sAJu32ytp4FdjuGeLu9yV+j0/bMPq2ZolPuphL1CX3VLxlr+YK57l+xOvgd O6N/Srrhk5dVa5RW7VFVe0xd/Sk381apuTlLR9492hsPqW3Wz5o3qTbIUdsq 1e1LOs7p63GqW2RqDT1cb+znZtsggVkFSsHucgc3jO1cZGCOkiNbrHW86BKN sQzNQnJkKTuztlEAMY/CwkZUclBadn5HI8OOWkevNCXiNLKaJyiZ2NbItkNK 44iMMpK4gCRi0tOwFqy28dnYJ2bjkJiBo6hjn3yLq8EJXJGhmQTHEJhzm4Ds G/inJnDYV/xXdFo7fkTp3RXKR/dFp1PVS9HprUbCrwgt6OdTnzuqfC46p3HJ PQMjLwU43ywsAkTn4OuYuqUT5qPriEo80x6H+JsE5ndQMrpByb11XJJvn70t ahaoew1QQNOIaO0bgLWXF5buTrj7XSPO5Y9I9v0lqYEXSQ/4mGz/T7ihyvP9 lIZEZ46n6jmZrufRTD2nqr7MSNEog67EPLqkfz3J5Qym1TCaVceUJv35vCaW bzeznt/Mpmr9Zh0LmuDvBjbxsnSUb4Ye8HT0M15M/ilPJ7/j0cQ3HI19zv69 l+wOn7I7tMfu4Aq7vaO83d/9IZ0+4fXjt7SkTdKWI3UqfEiv6HRP6jTb/Q0r g9/KtQ5Ir5qjoFzDVPUhlbWPlH+e0tj8nOs3lKtLlugumaC2fp2a9l1qO3eo 7d5UravuU6NMXNs5SlHLADdaB0mu6TiTcmNXOZmLN+bOnlIcdymT4e0sO644 +fCJVTKW5rFYSZksrBIws4rVz5VhnUQl1/PN2d5pOPmlafpJIzC1hNKpLXyz y7lg5oX5FRcCnbw0nIUT13SX2LpOXLKrsE7Mxyg05exV9Kv+Gr8DwjDzD8JM +eia2mjk4Y7T+3/I9ZBAjnd2+Hvf0+pItBpeJSSvA8e4ai575nHJIUfXmcIF kyg+NovlkmsOH7nf5JIhh3tlY+QnOgXmYB6Sg6lfJgGiWnNqKv63W7ih1V0q NS0d28A15SZmyuNWhl1DIbGaD6KwU/Z3CAzCMcAXzyBbfIOvkOT+Y+Kdf0KM wwfEWP2SBKsPSLH8gGy7C+R7fkpbiiubhqmtv4y77QU0xIZTI3utjcylOjxf j4tpjC2jPbGSkewGZnQdq8UdbJR2sF3azmpuFWMBmTwrn+KL4R1eTP/fvJz+ Sx3/nGfTv+V06tccT37F/piGdinX7j2Fp7vrotcEbw/3v6eV5zmtmpPGaMt6 oLn/hO6qF4w0v2G6+0vuD31NQe0ymZXL3Cnfo6T6ROb1mNrG5zS0vaS87oS8 Yo1+tat0NS6JQvvU9ar6dlVbqnXq+hep75ukqGOYwsFJwm4WS9QDsVRZefpj 4+GHvZv3u5fGnZ0l9J5csE6QYiWd7fk3NYvC/EydkrAx7Gb3+B06BcqsgpVK QtLI6RznT4w9MTLzxsXOl8hAf7z9fMjrGqJK46lb1h3MI5OxipRZRiYoLMVi FxaBbUiwDEpm6+PGNW83PH75R3h+9FP8jY3J1wD9d89pVVRcxCVnDfgKY1ed 0rliKZMzS+bTazF8ahrDZYt4rlgnctUuiY8t43BKbsD1egdmkUW4Z9fjkFzK zz5xx9HUHTtLd7xDUiib3CSzfQwLxX+rsOR3n4MIM2xKi8UhVKNkaChOIf4E R5oSEHqVGNs/Itjo/yLK8uckWH9Esipdla3KEsUyrH9JZYYfHY15dDfl0RQf KSplUhGWS6Xyd3VkCQ3xFbQmV9OdXku/VOuuVGulrJOVgnpmY9PZv5nLYV2X aPRfeDEjWs3+Jc9nRavZP5MC/obj6V+xP/E5uxPPVTLA8Q1Ra5q3x4c/pNUl RitXaU1b1VB3SEfFMwabXjHR9YZ+wzZ2qVCWMnd++YEms4eU1z9Vzn5JTesz Shr2ZGi75Ndu0966QU/HCvUDRzQMGj6rukf98JZK3xuUcfZMSuyVl5UXrHzD JPCh2PqEYO+jFekTgJOXD84eHhJ9X4XcaK5cizszPTNzQ34yqJQg16hkZ1Ap TdtOAaKTKOXuHoOX2p3sFMXFawqyTkF4+YYQFuBHcLAvgZkZmGqMstZEZ6uy j0l+t33RsO0nMkoVimOYP7aB7li5WOF74cd4f/iHhJgZE6yRKtDIiBOp1u+d f2TQsFvN2dwIFwtjrjiGKUSLZubxXDVNwNg8lUvGUfo6VuadqHyoDOiYLDVW 3jfsRY9WEL+7QdHoJiZ+qXx4xRtXW1983X1w9/QhtrABs5DEsw+RWEVo0vyd D5I4hkfjFBGOT5wXodHmRHp+SITpHxJq/EfEWLxPko2MUZVle5Ek81+qfi4l +znXnT+kpTSBvtbbtCREUxWRRZXGvOqoImrjymkSxdoy6ujJaWDgZiPDtxuV va4zlXyd3YLbHNUUs1leLVr9Bc/n/oIX83/O8/k/4+m81Gv2O45nvmVv+gt2 p2WM06LZlEa/cdHs5OCHNPM5+/xbc8ISrbm7tJU+orf+GaPtL5Wl1kgoniaz bINb5UcUVJ9Sqp9VtrykuOGI4qYDytoPKW47pKh1n86eLXp612kYOaZBglk/ uku9ckT50Dz5AzNktfRLKaI0qEcrS0j4AyIk+uE4n7/07OLrg6sUxMg9movm yZhdi5SKxWCuSGwwQxv3FOwU193ck0SteIK8U0jxiyc9Ipm8zDwuqu0m+vs2 QZF4h4eTFheFu5c/1rEp2KjsYkUx0cwxOvFsl67hUxwu0WG4RAXgHO6Os50R AZ++h//HPybc8hphopKjjQcOUpuR+R2Wj96yfPiGF59/d4acgXKuFka46fcM mySN7EO4puVgZByDsamOJlI0Ez3WjGhiK8o5JGOhfGilfGjjKQrp+n0Siygc e8B7Rj5cMvPFxTVI5umvXOZFlEYKa6+oH2GtofH/xEb/2kmAHaISlP5jdQsR hCbaS9wsCHL8kBjL9wg3eY8Ys5+SavsxaWJdouVH8s6PSLGR0Nl9RKb9B5RG WzPYcZv27GSx7jo1kfnUxpZSl1RFsxjXIcb13Gpi4E4TrUm5jKXnyjcLNBsW s93YymFrq9L6PM/m/7MY91sd//Tsf2VwOvdrjma/YW9OrJsT6+Yesjsr1k1O 8eZk3/d330QtZ7R8l5YMw8d7j+gUsYZbnlJevUZ80QzpJRvklh1xu+rx2Wfb C+ofcbt+n4KWQ0o6T6joeUhJz4nqmK7BPXoGN6gbO6Z2fI9qgZk/MEfF9CrR xfXYBMer4pQ04rBXmHYKicI5JFy2F4KbLM7NX2E2MIJPbZIwuxqC6dUIbMzi ZDMxeNsnEeiVTmhwNuFRuYQlKCAn38RXYd09MZOU1n5+4RGCUVAo5iKcS0QO AYFRBHkGYB8uixThHFXOsYm4xMWrYnCN07ljRPYINwKtL+B57SIOFuZc9dBg 4RnPNQ+VWxyu6krx0A7F/TsU9e6QWjKOkUUQDuY2eFga4yOCWlp7c03Dh7FR LCayUmOzRNl3LNcM9i+NM9ccaakEaS2y2flIY/1StOBSZJ2ZmFkoDbqK/CGR uBm2h0eG6T6T8PWKwMvwrrGH0pmPMIs2LJpEnGJj8UkNJSzOBp8gc8Js3ifW 6idEWyilmf6EZJuPpXdim+4p2e4iaQ4XyXS8SLbzBW75fMJwVwHdBQa25VAb XUhdQjkNabU0XW+kXWzrKWihMTmPkcxbrFQWs9JYynR1HXM1Ney2NbHV0i2W /YanC9+pfs3j+V/xaP5rjua/ZG/hLbuLL9hdMHzG9wE7k+P86os3/IBy/5hX J19TH7dO880D2sqO6W14SHHFCjF3ZmSnq1wvOeamKHdHlLteZfhs7AH5bUcU dZ1Q2veIisFTfkTJ4CP+FgMDstWBFSon92UbmpcmH1A1+4DYsmb9jm1oEglK R5qrlEacwg2f2Y3CNSwct9BgHNw9sNFo/qmVrO5CKB5m8XgrEfn5XMc/5AY+ CrGeEdm4RWXpeSmiguFFTx1FpbKZJcpnlwira+d67yDXIqQzAan4hMTj6xuJ c4TOF5+Ec4IolxB/tuXYNSFMtPPHK8hO53ZRAgviqnswJl6RmEs/LXxUhk81 uMcRmdtMmWhXJto5h+RzRcnxikUcZmbBuJvZ4WjpwjWzSExEOVNRzsgkFiPZ rIlNImZKmBYu0jfDJ+K839HNsEHDzTaEGI8oUlOuc8kngmuBYUprofhez8Y4 LB2T0CylyEys/Q2flkvBSdRz8tUyDYrAN96X4Ghb3HzNibH+CbHWf0Kc1U+J lchFWlzQ1x+TaPcxKY6fkO78Cdmun5Dj9jE33D+mtyaNYaW4mugc6mKLqU+u oiGrnqabzbTfaaFWc/Zgdj6L1aXMNZUzXt/IVGMds401LDRWsdZQzKlo9nj+ Gx4vfK3HX/Fw/gsOF9+++yT+kgaDpSPRbpX1sWG/393bVcqrR7+mLnWHxjtH tFUdE5zZQ+StaYWJVVKLDsmuOCVL38+o2iVHTLvZdkx+10MKxbSSoVPK7j6m 8N5jqnr3uNu7SEfPNHkay6rnt1VbxFe2KYSknv1/C+wUSByUy618FUb85KzO wXiow35+wQQGB2Lqo5BjnSR3SdeckIqtRM1KLmrrk4x9oERKWdpZTHOJEsvk kK6xSZRNz4ttC1TMLiioxZ59luWaQs/l4Ay5dzqe/nEqMS4xAZekeFyTonFN DMUuLlgdDscyIBQTBw9M7TXuOvtplA3B1iUEa7HNWmyzco+l8u4OEeqGsauC mX0kRpZipZmh4nA28Th7kc7EyPDincKccSTGYuL/y9Z7Bsd1ZmmaT1T92J3Y mNidnpno6e3pnu6diP21sREz1VVdJZGid/Am4ZGJNLAJm7CJBBLeEQBBA++9 t4T3JLwHCIAgCTpREimK8iVVdffurz03CdWoK/bH0U0BBJD5fc93zvvee79z XXyENLWQphN/EyQWWRKbtz6FUP9EMkSkZWfkEJmaSVr7EBGldcRUt1A1v4oq UcZHkpldbA4uCbnYmQrwiM0Xn6B4oBTiknWEh0oplXKZ5Ppb252jqZLk4tw+ IkEos/heIU19lUztNXL1dhQEXqMw6BpFwdfoLo1neqiKjrwSmlPKacmsp1US W5vYzhqx4YP5pdyvr2a2rYbx1namOtqY7WzmXlcji111zNeX8HRRoetriS95 uvSO45W3HK0pO/HFJ6y/4HDtIftL67x5+fyn8/bvbwMt5/MXP9KQe0Rz2THh GQOYrt8j4eY6ltIDsqpfkF71kIy6h+QIZvmdxxQJZiWC2e2xFzbESmdeUjj8 lPLmZcL8ovB0Us5OBBMuiiOlXixYUDLqoERctSn4B1kxREoNicvCaM7EKCIl 1JqCITlGMIrA2zkKlUuMbercNal4GEQ3h1lF7IlejkkTvSzJSaYiwCyRkiGJ 8z6V9+6T2zeAu4gylbJlSuqlt8Q1sace0YJadCqhYue05kRBLQFfawJ28u88 A4Px8fHFy9MHDzcf/LzFHvqEiGiTUEfiF6zc72DFcqcLlxBJUmJrXTwNuHgE 4q4KROUWiIdLGE7OKVL35f26KeItAWeV1FPxNu/35Flxl8/t65+MMTiD+MR8 Yqx5BCbJckmwklLdTMXsMpVzy2JFB/BIlPd/gpqnJGxlz4K7JQOVJQvnxCyi EgIwRvmRanea9CsfkHbhN6Q5/Y5451Mk+FzFor5GWoAdWXoHcgMduB7sQFGo PcVhdrSWxDE9UstoeyXNqWW0KpgVtlJpuUVPXhnT9TUMN7dxt62T0Y52JqRu Tve0MNfXxP2+OmZabrDSM8LjxS94vPQ5j5bfCGKfcbD+CQcbLyWOebC2z8b9 pZ/ubAj76dT1yx+pEcTi06cxZt8junCduFt7mCsfk1i2j6X2IWnNj8gSvHKl XhYMPaNw7DlFky8omn5B/tRTAiT/2slwB8oUBfkFEqbWkRJiIjLETKy49/Bk qXnWG2hFYmnSpPZZpRYkJ0nti8GQGCYyRYPWXeSa4OUiNcjN34K7rHxPqTHe 4VaRd1Jv46xiIUWumFPxT82ifGZepmee2Mpa3BKlxonF9JDveSVLfU4R+yqZ zjVG7GpsKsZIQTg5kcup2bgGGPD288PPzx8fb+V2fzUaP/EJfpEE+EeiVUKt nAuVrJdcgqOg9QscPfUyVk4eejx8Q/DyCcbbOwgfQc3eMRV3F8mgLiLz3M1S L1MEL5FpPmZB1kJUeDZxlnxCzdmSidNsaOmUzyEYlc8sUD67QE5XH6qE1PeI 2XYWytKSOu+TJlIzXZZmuplIsz+hRhVhzpeJc71KiqsYAZeLXHc5Q4nTh+Qr RkBqZVagI7nBjlwPdaLI6EhxhKNUqgRmxuqZHa8XL1gh8qyOStNNBjKrGK2p pbexnd6WLgY6Ornb3cFobxuT/S3MDDYxP1jPVPsNRtu6Obj/moOlT9lf+YS9 tY/Z2XgucczO+iM2Vnb5/rvvf8LrfSK7w2cvfqCydpeg1HlCc9aJKNoj8uYu EXe2MVUdktj4GEv7Mdaep2QMPiNz5Bnpo8/Imjji1swObpIlLkrx0AREER0e TWJcNGXltwjLKESdVixDVCQrMRe1FIaAVBneFClYKSLJUkwyfUZx8AYyNOfQ uBhwcoqX1S+SRyymShS5p0gkZZufr0g5vwQJGfrEmibJnNOUTU8TkJWPW4Kg aMNLiltyCj4ivfykKHpaUnGIlr8pP2untKDw1uLtr5ZsEoC/vx4fLz3eKoOg JEpcE4dasPL2EWR8RSJqjNj5R3FNpcNOkLL30IkDEPmlCsDdU36PLCE//yA8 PcNxcRb34moRaZaEg7tkMlexviLHoqJyCVeuFJmkyJsEJ1keAQpasgy0SRaR rvPyGeYpl3CXz+Yu3lIlS0Ml79tTCru3fAaf9GR8pbibEr3JCDhFkhTFWM8z RHtdwuR1jVQ/Bwo09twOuEqV5gJ1fh9RqTlLqf4iRZHOFEc701lhpr02i6rs MCqStFQFWRhILWeysoGOmjbaGzrpEm/ZK95yoKeDu31tjA21Mnm3iZnheu42 ZDPU1cn9ycdsL79ka/U5G+tPWROs1tefsLL6kL29o4ifb74qZuvoUwqbN0mr eoAhdxdDocSNLYLKdgiteYCx8YCY9kdEdh6RNHBA0dQ2Ffe2qFrYJvxGPed9 I9FIgooxx2K0xBJXmEtqk8gucw4+KTn4SqLwt2aisYrHkxqo7KvTigTSWoyo E3QyWudI8/0A92tBOHukihySOmOQURYJ5BEhpMRY8I6XkZY6mikL5/boOHfG J3CIEoEdb8ZVXL6b2SIL3SILXQhMSzlZ6MmciRPhrI5G76TG4CSJSh2MRh2K t4fUPj9JZP4mocgohISjFpI0IsE02jAchDAHqY/O3qESIZKAglEJcZ4+BryE Th+f92TaiQRzFellfyUWD7sEggMyiIhW2liI3DJK8oySBGtKlXqeKkSl2E6o aOW9Znf0UToxQ+nUNM6xIt2EMjdZEe6y4lQyRp7yGbzSkvFOjSM75AzpQlSi 90eYfc9g8j5nk18x4iUTApxIMzhLgnKmXBJUvdGOes1VmnzOUKM+Q6HXR0Q6 /ooUp//Gdcf/m96Q82zU3KGjtJXmqi6aG7poE6I6Ozvo6Wmnf0Dq4t0WRoeb GBusZKA5iz4hrX9wixXxjUurx79gYe2YX3JvRSB78NQG0QlR7w8lVPbtUDX0 mOqJjynq3iLyzn2iq1cwNUg5bN0gvXdVRPoqt6bW5HvNxJS3kdMzKmVxmFM+ okiiFfcfi39iNCXDIxTdnRClk22jyceaLTOchX+arNX0VDTpSQSkmUQlhREe 4UGa9hxW9WmMV/4BlaPMolcGjuLwnQOlhIXJ+o9Kx92UiS7zBsUDo5TcHeXm yBh2EWac4sxiFUXVyGy4W4Q+mQ2FKG+r8v9JuIaHc8VBj6tzBHpXI2F2oqRU YZKfRNH5ROHjH42fJhq1CPgAfQxaMRfawCgbPS7+EbgKVW5SDlWacNueAu+A UHw1wUKfHn8fKaFefjici8T/qlmsrpTbkCwxAFISA4UIWQ0+shp8xcLa7LLk 0oBEi20je0JlPbcnJrg9OYEmpwCXRFkVZrGe8hncUhWiLKhSk4gOdiVf/1vS NKdPaDpLpNd5wj0uEO17jXihKdngglX+XYbRlYJIF25Gu1IaqaI/Tkv41V+T Yv9rCtx+Ta3+QzqjP2S6JonmGw00lnfRWCfR0kmLlL52oalLaOobbmFgqIae tjwpi5m0TOzTPrjJ7NIx08vHTK0cM7H0hNW951E/p+gGQ/NPqOx/JEZbxFGX UFM7TmbzFNntc8RXioZMKOaKjIxDqBWX8DTb/ndPyeDeYtHUvnG0l94guaGO gpFJGlbXaVhZwyLF2Us0preIHu80sYTpYu0yZEQzkoSmGBE74cQG25OqO49V exbj1V8R6XSOQHdX7DzTsZdZsQ/Mwkm5LzMik+TqDq6LViwaGKH47gjXxO45 mMw4xolVkxlykdlR1rVKcpM6NgJjiKfo8SC8/A1CRbho6gQMbvFEukgO9RKC 1HH4aaXC6eMJCIxHGxyPPkQiNFaEXLhUW5Po7Pc7FjyVHQuB0fgGCjGBkr8M Iqa8NKhdfTH6aYkVq+cj+tzFU0hQS37RCwUhkiPDhaQoC74mC/5Cu1po8U1K I7a8mptjY9ycGCNSXjuKiHKWleAk7985RT6LfIbwIDcSAy6JvTsl1u60WD6x fZJrwlTnMXpeJFLtRKzWhaRAVxGtbqQb3cmKdCc3xp38WDdyTN7onD8i0ecc xdozNEd/RFX0KbrKopieaZMq10i95KW6hm5qRZ83ioBqFYraB+ppayuivT2f jpYsqkf3qRnYom3iAYP3j+mbf8SX3/7hp31G7xEqYvPgDZU9h1QNi85uXxWL N4zpZg8uEQVcUJu5IkPiqOwRFvvjofTqiBILZhIrEphEQkgSORkW0ZZppDW2 UL+yQv3yCnVLy4QW3bb16/AU7e2VnoaPIOSTIcOdFiNaORyz7gIWQShehsbo +DtCxcYYXQQnj/MibnRcUWfI3xa7E1tEdusIuZ0j5AtGBf0jeKYUclXeh12s EoKTTINXdBQRQSqStZdRKadifXV4+ksZU4uN9BE0PFLQe1mJ9k4k3MuEv8GM RuyoNiQZXVgyeqMZQ7gIHm20eIFEPAIlxKp6hYhNDIvHT7mkZYjEyzeUIElM 0ZLoIiN0UmrsCXFwwclFEqO3IKARnAPfnwvzijg5ZSyo+wrqnokZpDS3UzQ6 SvH4KEUTo1yNTcNByrZ9cibuMTEE610xqS9JorlEmu6MJKNTpEmZMolQCna7 QKjnFSIEoRhBKCHQjeRQd6zhKjKjPMg2eXA9URJRd7kk31NE+p0hU3+eetMZ bpo+YrCrkKmZdian2xgabKSlrpKq+gaqGiupbrpFbWsJDW2FNEkiqm4pp7hr j8LubcqG9th//hWm9+hEntwqWt6+J9nnmOvi9qPzWjjrZ+GcDO9l5eqeYOOs nAo0njQ4ObFU3rok0uJTiEhN+4UIZitJxBSXCDGL1C4sUn3/PiElFXhI4lGl C3FCjYcQprLGERjpRYIQE6c+h1E+XZjrh4Q4nSfQ/hQGRwm3j9C7nSI+KpCu wV7KOgdIbxomo21EyuYIuvwqzgUJKXqRyoF6InwvYvKXkdZcJlLnINQYUfkF 4SFlyFNtwksdL/LYhJNnGgGaHKJ1aURrzegNFrRGK3pZDQYRL4Zopeyki8QX gaUkD2U3uiQ5XymX7vpYIdBEWISUlsQkQk3h6IP9ifa5RuSVD4mR969xEznu m4azrVFJiq0hikp+r7skave4TLEE6eQPCvlShgtGRskXehJa2rkYKdZD40aY z0XC/S4SJdSYhJpE7XlyAz4kV3uaaNfTBLpeINjLDqO/M1E6V+KEmqQwFSmK FIhWkRGrorEyjfGJDpobiwkWyR1nOM9cporrknzqys3US9SVJVFbmsjwZAuD U000d1fS1FtOc98daoSa1u5CkTUD3Bh9KE5zh91XnxD7c2L+nbIZiYquR+TU r3FenNEZtzgueMVz1V/chk7pAiJTHfY/+sGohRh/Ge4k5dyQKA2DuIlfYJBX ibbzPjX356m6P0fl/Vn0N0pxy8jBNSMdVzGw3vFBskjOE+V/jiCX0xKnJD4g SqMSrXsOtf2H+Dt8wJ3sSHbvNYvRbOVotY0n620822znxXY7L3c70Fz4Hbpr p2XhXcAoQx0lyJg0lzAEqnBX7oIRw64SVePmE4erfBY373g8JAm4Sx30M1wn KiRXFmoqQcY09OLgDKYMDLHpJFX04BGaJq4wDa9IUV1Kp13BKyAkFWNCJkZZ HPpYcZVRoejDtQTL1CVKXYhyOEeMTGmM+wUx/AbbxmKl3jqEZeEYKTU3JhO7 qDSyegX7Pon+YYbv9bO51o01yAP1xQ/RO58lVJBR+l1EBlwkwv8CVtU/ku71 AUke8lk9rhDk5UiIIBMufzcm0J14QcYcIdhEe3AnL5yR0XZGxzsYm+yk/E6y 1FInKkOvUh5nR2a8OznxbuTGu5Ib50x2nAM3stRUVcTSN1VD30QFfeN36B6+ QdPGJzSKA2tY3WP3k09jf94vpIC61nWuemVzXpXMWZdY8eZCi7IbSWmdI+nb 48RT+ynta0LMGGVRmtNkUYquM4iuCxSnEJhqkdfJRBQVU3lvivL7k5TeGxON 3Ya6KJ9riaIo/OzQSgLROJ1G63wKrcuHGCTVhqjd0Xk5yIy70V2ey+pYExsz TWwLMQ8WWzhcaeXRmlCz0cbTzTZShAr1hQ/QXJGE5Crl7GRhag0euBmVZGLE ySNGIt7WpMnNTxKcVggIlFIZlINX8A3R6EWkBluIls+mj89Gn3KTqpldKSlW ISULF/nsKo0FfUweYakFBFqUk+6JaGNj0ZlEd0cHojH6kabsvZSyGiW0Rwst 0TZHdAGT7wWZLaFHr8NPF0BGQTZLC108F+Jf7HTwUuLjHYX+dlKEGL9LH+J3 7RR+9qdRO54mwPm0qLEPSHX/LckqcV2+V4nwcyTQz5lQrSsRkmBMoSqsMZ7c zgln4G4rd0faaWm5SazRgcRod+L09hQbrtEV8xHZQktughv5SiSK/k5yIS/J iZy4K+TEXqK5I5PusTu0TbbStCW0bAot6w/Y/fTPadG72+Os7AFSZXDOMZZL 7kKLbyIOAQotZjyk0HtHWmy0eBmSiI23Eqmcc/4TLRYJEQJpZnTiLeNrayid H+X2/DA3ZwYpnuyhR4poTUk0SZEeeDh+iKeEhwiYXNHHQ/3dPDo6tL2bB7Nj LA40siTErE41sznXwu79Fh5InlGoebjaynjHdXzPfYC/jLC/jLBGRljn9JFo VFfsxSHZeURj727CQSU+3kc8vOakt1uQOL2wXPwj8kRklBAtLihLxFhBSBz+ 5n5MBdNoTJWovGIJ1ZuJMCvXmYtQi8jQnFz11yaIdk6IQhcnPj9Kg1WEmNnr AlHOUk4czhDhdl6czwUifeRrfueJEB0b4vI7W458vN7O8Ua7EC+x1c4ziafb sgJ226i6Ho335Q/xks/j/bPGLwkOyh0FZ4kXDRyvcSReXFSS6N8UES9pklMK M0Lp7mumb7CFm8VJmIwuxIkuThJazOLbM6VMt0adE1rcbLTkJQkpZgmLs4ST hIN8/ZLkmguii1NpXHlA47bQsn1Mw8bez2iJPNkPdLe7XVyLA0EqJ5yd47lg n8QlOV71Ev2ikWoUKOss1GzrSeUbkyxrxUxicirBySICLO9ziuGEFkN6InoJ zxQrt+ZGKJm5K7T0sScj8+lBKx8ftPBsv4lnDxp4slvLwXrl+82YgXx8uMt8 fyP3h5tYnGhmdaaFjfkWthcEGIFlT0Apy47CW9KKj6QVX7tTqB1O465y5ZpY 6WvecTiKgXH2UbYxpeCqEd1gyBItkou3MR/fKOXaVAEe4UUEG5UL9mW4OnYI HHfx920gUr6WlJGHOqXI1qHUV9SovxRXpT+pxqwUWpPY6DD5HVpSfc+Q4C7W OMCTcKcLhAiwwTLBQc5Kcf1Qjr+jKj+SfXnfB8vvIT9ak9iQNLklx22JXVkA ey2M9BcQG+aB+7UPUQkoPs7nCXa3I9lNdJnrOWJ9LouecSBWjFJGgp6K8uu0 djbQ0dOEJTGAyBBHUeFuxEaI4Yp2wyIGKkVMU73xPGWxl8lJEkiSXcmzSKQ6 SwgkVgc5KgVKLL3oP0tBBY27r2jcEUg2RbN8+urPIDG42aP29BY/oZxMDea8 czofuWZxxiePc9oinAQKt+BkPMPFQopvCBX5kqC0jDMrTcskUgUWgUSfrkQS mnQRxKlpRFZWUjjRL4B08FoA+UQAeXHQzNP9Rp48qONop4a3r7fe35Wm55t3 b9laGGd6uJG5iSbuTzezNN/MikCytiSx2oJJr8JDqrvn1VN4CSTOrs6irGJx NuTgos7B3jNFhKYV54BMXANzpF4ql8rzxKIIJHECSUI+VwLr+MBpBXf/I7FH jwmP3yc8ZQCfxHy8EwUocy4+yVn4Ss3xFzWmTklCbYkVUIx4xwaS7C/iUXWa WF9nsTAehHtcRS9KSy9ZUuf0gc2urM+2sHlPAbz1T4A/WJcQSB4IJHs7Lezs trC128zGbpNkhTwqK3LEaqbh7ymCV9as0e6MCF0PmUgjxfnpVNdUUNdUQ2Nb HaXlBZL1RPCGuArcUosEkIQod5IFkORAe8pCLlJjkkxidiNb4MhJFZVidSYn zUmODmRb7UmIuILf1Wv4Xr5MSf8UDbuPqN/civv5eeG/57NvfmR09cC2VV05 z3JNOdcSaMVBK05IlcYHXjf40P8WH+pKOR1UwbXwYpy0mUTFWAlV2ismCShK k78Upbtcsq27nNJXzcuaYYNEnxTPjuTYzw7aeHXYyovDZo4Pmni838DRXi3P nwyf3BZ7mmfHe6ytTTA+1cjkbBPT95qYWZDjUhNhOndUV87i63gFL+8AHAPE nenzcAkpkWyXip3YD0ehwlmocA3NRSV1xdMkZMTlEXqjmeD8DX7r9TlXdV8S mPA1IRlf4Zt8QKGMjFeiqJZkCUs23ikZ+KRa8RPo/VNjhZIoQoweJImBjfE8 TYQoqpgAlehyFUZfR3Ri+OOD3JkbFaInm1mcEaKFjDVRVuvLkgaF6o11eb0p X9tqZnlbUqTE/Y0Gvv/h7Unvl7+lp7KBO5LCSguKKb11m/KKMirrqqgVIkIC LhMkaiMk2BVjmKstZfxUVxKDrnE98CLNYo4zLG5kpkpYXclKc5FwktcOJMW5 oPf3R213DfU1oeLKRaHhIaOPn8T9/NLmf+Wzb3+kb+sZd2b2ibrdjp2YQYeQ FNvpExfxvW7+JtydDThf8eGafSRnXdM5753NWd88zqtL8Yy6Y7vFR7k25G+2 SLW22HoP+ivnWC2SkOOiiRGjGunwGz7ZV2pKK88lbTwRIo4OGjiUtLF30oLq L2zv6Vc8PjwkwNUNrcr9fcvJgBycgoplJvO4psvFTp8r7iEbp7BsXGMKcE8s JqHuLqXTm1TMbfEb/y+5EPROCP2KgMyvSWp6RO39Da73TeCZnI+HzLqHzLqX Vby9pDlva7zUQBOBRhVxYiSDnD8kTDllIbMeHuCOUXR0SZ6Vb758K/TuMTHS yNSkkCrEzs03Mb/QzD0hdn5F/n9V6F1rZOtonOef7p7cofu3vPny99zMKudm RiG3r9/k9q1SSisryLJGE+B3CZ3OmcBAF0JEXUTI+o+R9R8fI6Y3zo1UraiD mHPkmu2xymynyWynpznL0YmEeBcMGo2EmgBHOwLsr6Kxu0hK4XV23rw5me1L tsO/4eNX72yNtjYlBjtWKMsbpjxnWFzBsei8Y968/Ir//YSMvs3H3Jl98Kcu 5qbSdhylUCj94Zz1Sbi6BaFSWnirlF0Y/hK+qJz8cXUJws4hHAfPDFwN+VzQ 3cQ1UrlF3YpHfBoBMdHiePTEB7uQrjtLkvcpIh1/w/P9Fp5KMXkkZBweNPLg QT07O3X88MPnJz2L/isDXd0kZFZxzU/ZI1bIRU02l4Ouc814AzulwV7sLSLL +rgxssKtiTXyB5ZJb7tPePEKqsB5UtIXCMte5vbwkvjwNarnV6ieXSaxrgeV NQ/3tGzc07NtZ9bdLdHiu5VzxIq7eu+sgsVZBandePLo8GQd/0989fVbnjzb 48mLPY5fSnws8WqPr757e5Ln/jN3544pb1igOKOYkuu3KbldRphIBV/vS/gH OBGgdyFQ1npYmBuRMvMxkvXjZeZN6vOkxXmRkOBLmFlPWLKOkEQ9QREaAgMC CNTKUatG6yRO0PGqzL78vmtn49/P+oU/tWH8iv7eFapujtAs0SXRXzLCUPEI w4USBfI6V76WKd9LHeHhn9ow/iX9208onduztayzPYJOIq6s/X2XQEMizkKB uxDg6RmCt1cIfj4heLqqJXzx8lDjftGbOB8dRn8Nfl4GPL3iMPr4ysxf5Bek 6y/IGKXpz2MVEqJFqSudsx7vN/NQ6Zj1oIkd0Z6b7yl4/5b+mq3D11T2HpBT tyYar1KKUAMxt/rJapsjt/se1wcWMNfNEZQ/RmT+EPGFd7EU3yUpuJSOnEry Su6Sf2OI3KK73GqboWp2gYrZe/Ix5zA1NKEpLsIhOQGncK3S/15EwC/xErPU VpPPY5n4v/yp98u7H6jsPLCdTiySgpOWkkqgx0V0PpfwVDvhq3UhQJZ0YKgr uggf1CYD7klxuERFi3kJRx9nxDMhFreYBOyCrFwOUJ5XkYWTv5g+vwgpNPbo nK/KxF4mRmXHs4f7nKzncz/r4TXQu0jV7ZNH9d4ZYURi8vYIc7dGuCczvXhD QmZ6UWlKmD/CbPYIE+kj3DUPczT5mP/w09rafvy+552tq9YB1fcPZY08JKGs G1elOaF3NC4qI87uQbh5BMlRIzOvkZnXyEzL+nfxkresISlIh1bti1pm3N/f gJdvHAEqg8zwRVJlvlNltk0e4sZdf4dRZntvr5ntvZPuSlv1UiM/P3kW7N9S 0fH+bG3qjR7SyoffXytqmSKlfgpD1gjB2UNE5Q6SWDCItXCQ7OJB0sMq6Mqp ouTmILduDUqmHeD2zQFuFA9Q2DLJnbkpbs2McWO6n8KxdlGhTe+bAf/UBfeT zb86WbZK+5nK7se2+19Nljt42l1Co7qIr58D7jLDbgYv7COMXI2JxT4uFqeY KJyCA/H09ybM1xsn72AcPYw4+sTg4JcoxSuLq5osrnikcNkpEZVjAMEuV0ny sbWhPJncs7bD/8Lrz95RebuP+tK7dJXJMi0fYUqO9ySWS0dZl9iSSd+R+AW7 ZUrzsW2ZfFtPQ5n0BeU5ymnDrJUv/cXJZu6BrSOZ423K75/M8cIRtQuPqbv/ hKTyflxCM7jiaOCKkx57N6n6HoKsV6DMoQEfP4PtiqanSid5MZjEcB1qX8Ha Xwlf/NQ6PP1MhPh4k+Arq9ntFBGuH2KUVR3s/BtWFB201cDu0dhf/7SCvviR yq5HFNYtYb09QFrlCCF5Q2JMhwjM6Cc8q4/4vH5SCwbIkuktkFWbGVVLQ04d ZeWDVFQOUFnVT1V1H5XVvZSW9WKVr99UjOxUL/XiSp8JXs8ErWeSRJ5uVJ30 nPxrBqdfUtHzFJP5No7nruB0/hqOl5w5q4vmtCS3M+EWzofES4kxcsUvkMse 4Vyz9bn0x1PwV06KuUi4yvy6KSfIfOK5Jo72mrsZe9ckPFzNRHt5M9PX8dOq PWM7/EfefPYFNbd7bM+B7q0YYbRijNmKCZYrptiomGa3aoaDmhke1k3zqH6a xw2TEhPyeoyj2lFbS7wdme41yeGLUr23qpdOmkL9H7Yn7JXPbUiu3n3fuVJm V+l6WLfwjPqFF9wYWsHOkMIV5yB5q4KnZyhuPmF4+IfiownDLyAUtS4ED1nl CcYIIsMCZTWr0cgMa/y8UHt74uETiqt7OEGuV9/3yZJZDpZZ1jr+mpev9/jm +8//5mQFDU6+4GbTDqmFvUTl9aFP7sdg7SfE2ktMZj/m3CEy8ofJKxqh+OYo 2XHNNBU2U1U7Qk39sIjhIeqa+6lt7qWmsZuiyk6Z4S4Kxzt58aCVZw/en554 tlPLo/XK/3zSpG5w+hM0PrLwzsrEnrvGWW8jHwSmcyoki4/0qZxxN3Jectkl mbyrSlzUESyLUeuhx9k7HFf5WTclvGV03HS4eITg6JeMt/LYIF8xwx5J3Czu ef/Q9V+yIPJpeeFYbMATnN7P9Ucn9VN55nfdrU6aygbokXkeq5xmrnKelcr7 bFcvsl+7xFHjMsctyzxvW+Zl+xIfdyxI3OdlxxwvpEA9laz1qGGM/ZoRtpQW swV32aq6d/K05b876ZG3ffLMU6XL5XOZ75e2x3Yq3YYyWoewD063bbGx94zA 2TdC0lckXgGR+OoiURsi8AkIQ6+OxhwXgyEklMCQYFEkBvSGAPRaP5l/DW5e Rnylhkd7XyFSlItyb8HkQMff/WlFvSIutQttfBeGpH4CkwcwpgwSlzFMSvYY WQUTXC+ZoqR0ivzkTlputlPTNEVd6wQNHWM0dA7T0DVIfUcftxo7Sb3Zymxn nU0Yvj8NVc/T3Rq+fLPF35xMdGFuJY6nr3BWMD6lTeK0PplTOgunXI2clUm+ oIqQlRvBVc9IrtiFEGBnINZdRKpfNK7KBRDfMNxl0t09dBIavNUReMrPe+vE vqgtmNObGZ44+puTlLy6dkx39yolUk9LBdkqqal1kmYbckZoEvXUJOl2qnaF g+nH2P0chP/EeO80LaV9dCod+iruMVu5zErVGts1SnOtLR63bPO8Y4ePu3f4 tHeb1/1bvOnf5M3AuhxXed23xKue+7zonOVYRuywfpRmyYt1aX3Mr734tycs DG7snfTL2xcWZO3fVx5K+kpY+Iy87nnbhcXsrjGM1+uw84iU0iRVXR2DSvu+ V6JvkAl1iAlvbQxRxgTiRKAEhkcQFG6UEC7ChIsQPQaDWpiJEiUgX/NVEx/g ImrV+f2K+CtMpjZ0kT0Y4qRIJ44RYR4jwTqJNXuGnMI5Cm/LW8kaolDefWtZ D7Xt89R3zdHYM0NT3xQNfePU9w6TXdfJ7O0qltNv8UzMwTMxBsfKmabtapEH 77kb6ergim8opzUJnNaaZYEn86GDno+cgjnnHslFVbQwYOKaVyzXXKPwuBpK rJdkcO8wXD1FvnoaUHnp8fFRbtfRovYRYRMgOs1f6VgcQ3RyGbXdW2zvf3pi jv5XNtePKRWRVSZRJfW2QYRWq6TjToGiR6DoFygGBIoBgWLAKvI6eYTB+CGe TDzi6nswTp9onN3VXVpud9FeNsZA+X2mKtZYrNxms/YB+037PG4/5Hn3Qz7p P+L10BFv7z7k3chDvhw94KvRB3Lc5e3INiNN81RXTpIhbyO9aIi0fCmcmb2k Xx+mbPiA0qED7vQf2Bpsvn73h//5BJiIkkqi77QQU9qDSQpS7f1PRA68Flju k9k2JrBMkNczSWHfNI56K05+MjIB8bgbEvAOVu4zSEAdrjRXjCMuPoWoxHiC YkwER0dLCDhRAk6EQBMmoxsci7u/FBs3L2IFmInBzr8/WcgP1vbokLdgNXWg jxgjxDRDRMIs8anzWHMWyClepLBsmYy8CW5kD9NWNUht1zL1siwaBhZpGLxH /cAsDW0yyB2tkisb2CiqYLe3nCcnZ56++Hz7b0/q0vXmbuzDEnEIT+FScAqn /eM55RDMGcdQLjgZuewcwRU3YcY9xrZMnK5EEO0TIagLL1IUvKVcqtUhqEUI aTRBBKgNtobAnroEXNUigkx5pGfVUFw6yOfvvn9vGf69VP6vqLxzl2qRbErU S7RKRu8WhAZk3oYlr4yJI5sQRzYpjmxKtPqU6NypjBGmBaMZs2T+8kW+evIF l3+O0b+jsbiRdrEB3WX3GClflyKzx0rtQ3aaHzNhnWG/fJtXg895M/ycL8ae 89XEc76ZfMa3onG/VR5x2bggKjJfpMe/Jb9Sac84Qc4dqcjilrIK+knP7OJ6 5Yxtf1Sl4FQxeEC5uLDB+ReC04/88ieJ2d2Jv5sT7r6+4mpM708mhWXZGqS5 hIlNN+QSnNNAQmWfcDVDYf8cNwbnbXc9OKmTcFHaNQYn4xWWjG+EckxEF5xK YqoVQ2wigXHCV1wcwVKogmOjhDUjgVHB+AuDngaluIk9djz1UyKa6Z2iS0a5 7eYsJbIIk2JnCTctSKFaJjV3VT7eOtfLN0kvmKMkf5LWmjFqejap618Xntbo G1xkZ2iap4PDPO7v5UFLJxtl9SwXFYlHref58ehJIvpb3nz7e8m7mziEmQWs VIkM7HVmLrhK8XGL5rxTFJecY7jiEiWJKBx79wjs7KMI9YklWGqxX0AEam0E AToljGj1YRKhaAJN+AikrrpEsm+2kV3YQJY4nKaGfn7/+Zv/eCIrP3/9FXVl d6kXn6BEk0THiSm8K4CNl4wydWOU2aIx5iXuF46xUDjKQpGE5KxFyVlLIieX RH3fS+zl22dfnJw44tRJq4fPP3kjaa6HztvT9JWuMl6+974ZbONTepJXmQmc 4HF8Cy+kqL2d+Iyvpj7j25nP+H7uU+Z6dymqvcetuntU1MzSWDEuCniU6vJR 7oiazSsdI/fGIDn5PWQX9ZHfKjKhWUBsmCK3booqpSdo1wFD088Fsg407k7o JIIk3MR7OAUl4BySbjsX7KrOwNklAXuHSBycowWsNNQJpQLaAjfvLnJneIm4 knZclbswQ1PxlNnyibKiCkklPDaTGGsahgQLgYlmghITJQS6BBOB8VHoYuPx jzajCpbfGxAoqT+XP7x7w9+fFPqOkk667swIdRt039yhK3OR/pxFbmetUJC3 TkbxDnllu2JqlrhRME9TzRQVnTvMD27xYHiVV2OLvBib53h0ikfDw2xLRluv 7RAbd4f12bL/ctJOcmjnIZX3tgmQyuhoTMcxPAd7bSp2nnHiTRJx9TbjKNA5 qiJx9oqxVTJnVSwBPokkBsbgrzehMcQQIK+1QdHogqJsTac1oZLTjWlEZpSR X9FN3u028orryM0vp+v2HX58++ak0fQvhbgvaSwforlCcaDKf/9C9M0o/VLK Ru5MMnlrmtmSGe6XzLEksXJrnjWp/Ot35li/PSsxzfqtSdZLxtiUtLeRO8CK KMjvnr+9+K/Be7DyQAZ2WN7BIgOl20xWHLFQ/4yNtlf0Zj5ntPg5e/GtvIi4 yduOB3w79yW/v/eOjvYN7tQv0lJ939ZTtKVmTmKG5uopmirHqbszSPWNTrLz W0jLaSQlvUpcaBNpFRJlTeJKm7DcaCK5oAln/1QuO0q1c/UmROWEUeWMkyxT 5TFAbjorrq5Kk60knJ1kpJVNYO6x4gwTpF4oTWaLyGqepGx0jYqJdfKksrqH peMRmY5XjBx9YzGb0zCmpqMzS6Yzp0gkE2hOkmO86GmRZYmpeMdYBHITKcXF 1FWXcNhbwd+dpLoHS5t03RiwjVHXnT2ZhSeMlj5lpGiX4ZINJss2WajbZqNl l6GMcQ7TevlRyuTLkT0+Gd/h1eQWL6fWeTa1zOOpe+yPTrPWMcmaeK+NxkY+ 2147SXV/b+t7XDm3TpXYzNze+5Lysm1tcOwDMqReJuHolYyd1E97VYy8ft/1 1l0dLxTG4uFlIT4kCX1gLBpZtAHisrWhcba+17qwGDQRFvwis0m91U5h7YBU nS4K7jRTcLOKvIIbHHRU8eMXb076YP8nWx/k5jLlOQIiCyqloFaO0iF2ur98 mpHSOSbv3GdOxmThtijuOyusl62yWbHKdtUqOxK7VSsSS+xULrBTMc9u6TR7 ouf2rvfxpGXmX5F4lamOGTpvSFG5tcZg6T7T1U9ZbH7FVtcbDgfesdz4gon8 ZXbTB3mTUsenGe10dG5TX7tMa90K7fXLtDcosUhbw32aJRXWlA5QUdJGxY1G KoqqKZD1llFQS1ZlA3n1zeTWNJOjPN6uvMl2t94lUSSXnKWoXIvC4OxJtJDo oouydal180qyUahSSS2VYuOuihN1m4inn1ncjUVEewo+QZnkdsxSOb1F9ew2 BV1TBGeX21oQBusTMWdkoDZnEpCcgdYiRCptAi0WiSTUKcrV9mz0aQXcaOug SLkVu7yYJ8MVfHG0+V9OYDxY2qWreJSum6syVIcMlL1gsu418w2vmS17zHTl AffqD1hre8hQzhyPc+/ytneBF+NHfDx1yMuZfZ7N7vJkdoPDqVU2xAKtdEvK 6B6TYZ7gi8MHJzD+nwxtPqBqboPqe8pZyydo05QucEUCY7atsc5ll1ipv7GS GuPF7ySI30kUgZ+Ep15pT5FKdIiVcGOSpD4zAVK7teFJ6CISxMDEozZlk1DU zI2WcYobhymu68dyvRqjOZcrXlpcL5zG48Nfo7G/is7FCb3z+4aXw52dvzg5 sfr1N5/z9PkOdydqGJ2oZWK8lqmxWttmxum7EoM1TPfV0FB4nZqc23QIwx2S mzoqZugrv8dw2RKTUmzn7qyzeGeTVVFyG1U74hx32a3b40H9HgcNuxI7Etsc KD2+69Y4qFnisHKWQ6n/+ze6+Hz5wcklgROY/zda8qRWFc3TVbLNUNkR03Uv WGr7jO3edxwOfcPT8e/5ZPoH7hZvsFUwKR63gerMVlqVjruNm7+ko2mLX9sa 7laXDlMt/qG6vE+OXcJ0CzW3asi71UBuZTNFLcJKU7vw0opfTAp2fiGSKXTY u0o4yesrRnQX7XATI+rul4jKLQEPlcXGsfK8GA8bw8n4aFLwkzrnb7CiDkoj IqWUqtkdauZ3qZVspNx37eATR2VGITEZ6fgkZ+OfkiXcZqBJFRmQnoefsBt8 vZyspi5u9Q1xo7OLotYGrteW8HSiko+XB/kTyIsP6CqclMyqtCJ6xEDFKyYb 3rLY8Q1bvT+w1fElq80vWO14ymD+Ik+Lx8Wzr3A89YRnM495OveQJ/f2eTi9 z/bwPlvDu+yN7XM4scXhyDTvHh2egGwv63FRQN6mev5IYH4m8QqttR2nsDtc dUvhgoB8WZWAnXeSreGsi8aCuy7FtpnEVZNGiKzrmEgLGnE1AZES0Ra00ckE mKyEZVVzq2uWmx1TWMXvKduR7UVw2quDsPcPQuVwFfVHv0Z7Tml670yoi4TA HOrkRJibPW2N+UzNCK0zdcxO13Fvqo6Fn7WOXh6RuFvHVMttKs2xVCUmUBmX SFN2Ld0VSwyVrzFeusVs6S4LpQ9YkQSwUSP+pP6IB42POGh6xMOWRxy1PuJR 65HEocQBhy17HAplh8LYYbXQLHpj/3brn5Pcmtsn07Qg07THUMUx0w2vWOp8 y3b/1zLM3/N08kc+mf0jb+//C/VSANKzeqnN6qY5rYWOqtVf0NVyyG9oqF6k pmqW2ppp6monJEYlBqXWdlNf1UJpRQOF9W3c6uzlVkc3aeW1OPoF4ODpLerK Ezc3T9ydPXB18MPxSigOysVR0QEe7ma8PGWWXGNReQjJvsrJxBR8RTeoDelo gtMl9WQQYMwktbxLSH6AW3g6V1yD8LLTEu1vIDEphRsj97G2jZDaepeUFqmN kgqrpu9TPj5L6fAEtwbuUtLbTXFHE4WNt4XAKh6Plf8J5gWBOV+KV+GWwPyE gcpPmGx6x0Lnd2z2/8jByD/LAvh/RHd+y+TNPZ6LiHs9tM7jiRc8mXouskCO 059KVn7N47nXPJr/lMO5Yw5ndgToWb54fHhyas6RN998K0Ar11f3bO2Hq+de SnxGfuc+emsvl/1zxBklcMnTzFXfFAEx1XY7uZshDY+gdFwC0tFqrCRHp6CO kiGKTkNjUu4oyCIsr4E7/aKpe++hScjCQR+Bgy4UR20QzgEBOKvVuHm4oT/7 G/QCdciV80QI1JEe9pi0l0V+XCAh+CKJQRcZ7MxnWaBenalnfaqezUmJ8Xq2 RiWG6+gpSKHBEkdDQjINspAaojJpjMikx9rJVKlUsfIjlisfi0Y/ZrvhGQ+a n3PQ+oKj9hc87pDx6nzBcddzNm9Ilave5KjzMQ/bDwXsbQ4blzmsm+awppcv Nnc5/3Oor9GaNUhXwbJAvc9Q5TOmmz5lqesdW4Pfcjj2A0+n/8ir+X9mb+Id N0VXlJWvkpc9Tv31cTrzB+m8s0hjrZjZmmXq6peoF4/f0DRPQ/OMxLi8vktj Qzflde2UtHRT2j9EWd+A5I1YXJQTvn5qIdUfbx8ffIRwXyHcx8mDq6IpnC4F 4+GWhLd3mhAej4f4DS9RyL7aNMnNkmuDM9GGSURkoYt632mvdmGPM65huLgq e+DDSAoPIzg4hJt9IzQu7dCwuEX9/XXJ5StUzSxQMam0dZ3k1tAwJf09FHc3 c13yy7P5Go6nK/jD169Pcudf8fbl53TmSJ4u2Ba0j+mv+oyJ5i+53/U9GwM/ ipr9A8eT/8TL2X/iXuVDXlRN8s30Q75c/Wferf0TX6z9kderP/Jq5fc8W/yK RwuvOVx4yuE9QXtqhjdPDv6E9tazl7Lq1qieEcExq/RFfkXN3Btb/9EbA4d4 miq5or3ORS8RH35WrmnEn+kycAnMxF3Z/BeWhZfUtayIeHSmDPzFcvon5BF+ vZWyoTVKB1cIMBfgEiwOIiRabKmy1z4U7yAD3gZ/3DVeBJ37R4IF7+Azv8bk 7UBy6AUsxotYwi6RImENvUxG8GUmOwvYFrR3BO09QXu07Q6jrXforCymItZI maju0uBk6sKzqDPm0RR6nd6IYobiJb9XPWe19iWbja/YbfmUA5EGR52y9Ltf c9zzmqe9rxmK7WI7cZx/qRvnca9g3y3poFPydrvk7NYFDptH2a9t+nO0m0Ue d+Yt010ijl7+zFTzaxa7v2Rz6FsOxn/P8cwfeHXvjzS1K61tN2hs3Kel+RE3 RXbX3bxPT8k0nTcnBelNGlrk+23rNHWsSCzQ2DFHY/sEzW2DVDT3cLOrn8rh MXLqGnETx+6hC8RLaxAprMNPE4C/2t92JVPj5ckV73icrkbi5mCShG3FXcyM p4/FduXHV5+OWrAOkOlTsNZHKz1Jpexq4wnxEo3pEIq/fxQRoTEkR4URFh1B ZnUNjcvbNCwJ2gsbxNe0E19RT2x5K5mtUkRGBO2hXop7Be3WWzxbqBHJUMmX zzdOJMhf0pE+RleuyI+SJ/QJ1mOSsee7vmFt4Dv2Rn8vWfkHns/9yP3aA142 TPLV3D5fCMpfrP3A52u/F6y/5+OVb3m69CVHy59xuCRYL2yzPzN5snwUpD+m ako09MxJd+aZT6iZeStIf0VG/ZSY1znixdp7xtdwSSvaNyDzpEtz9vu778Jz sfewYA5LJjrOQnie2IKOe5SPbFI+vIE2pRh30dgeRpF1RqXTYjTeYeH4hgbj F6LFN9CH2Gu/I/T8b21PY7UEnyYt/BJpEZfleJlMieywy+QL1gWC9XB9Ft1N xdRX5NNQnk+jREOOmaqISCqNiVSGW6kyZlMenEN1UAHNQUX0hN1kPLmN9cY3 bLe85UH7FzyUdPqo50uO+4S9KrFz8e3smZt42rzPjzJOTwY/5aj/pRjtJxz2 POCwa03wnhG0u/8c6X1RbJ05SrY+YECQnhSkF+RXb9z9hv2J76Ro/p6P7//A 9fp5aup2Jfs+pKXlmI62F5Tc3qJGFFJP1SK9ZVOC+gZNXbs092xJrNHcuyTH WVp6xqjoGJQsMUb1+BSJxbfxDAzDKygMn8BQ/AKDRU8EEqDXodWp0ap9sNeY cHaMw9MxClcnEyopuJ5+qXhr0+Xfi9MLleyjTyVQ1HSoqElrQJxkJgu30q5j p4nDOzwB/7A44uJiiIkzUjI8Q3JDB+6Joq7N6fgmpeKXKEskNgFVTALO0WbU adlEFOdR31/Ks6Va20PXv3rxP5CeEX/SlSlR/Iieik8Ybvyc2c53rAx8xc7o Nzyc+pbjue+oTOzkZcsk70Tdv179jjdr3/J67Rs+W/2alysybatvebj6CYcr jwXrDZ5ub5wg7cTW01dUicq2dYiefiHxqQ3p0tGXZDZMk9Vyj5z2JXI6V0ms mcFYMixuoQ6HiFs4xdzGLfYO1wIyiA9IlbELIEEUdMXYDhWj28TdbMI9Qtkm aMEzQlKE2EWfiFh8I6LwCzfibzTgH+JDktOHJLn9Dov+N1iDPyAr8rJtB6my ETnF7yxZ2gvk6i+QrT1Phv9ZmqoEVYlWiTaJplwLNfJ7a6JSKQ9Lpywkm4qQ PGqCr9MUUkR72A16w28J1l3stn/NQde3HPUKa/3fM5U7z3BQDY/zBnjXLkJO 3Mfzka/Eqb/laEiE2+BJS/sBESL9kql7hvhif/vcvxbWD+ae0Z6xJDZxn77K 54w1f8q97resDX3J3vjXPJr9hqHeQ27WrlBTv09902OaW+Rn2j+mvuHgF1TW 7/Jv6G7ZZLBpgfbuLVr692iRP9oiyrJlaEFeT1HePcwvqJ2e5/8iOCUT79Ao fCT8QiME0HACQsPQSq7QBevRB6rx0oVwxT0VH2cpj85iGZWOS17J+HpbCJB8 HSpqMkZKbYIpn6TkQqxi+RIz8ogWMC1tQ7YnLDqLv4+xpFNsjkObYJbJl1Is oXQtVFroaJKUbcJJojBj8YuNxD3GhKPS7NfNjtm2LJ4uCtQfb/zE9NsXX9Oe Iuu/4ICusucM1H/GVMcbFvrfsjHyhag0Sb+zX1FhGeK4cZbP57dFbXzFJ6tf SrzjlbD8fO0Nj9clRa9LylHaeiyu8Onzp/+a6XFxiJOPJBSmP5P4ghu9+2Q1 zgjTC8L0sjC9Rl73JgW92xT17VAysCsqag9L5Ri/vRqIw5VgQj0DbQ2jImPT yW0ZRxWZhqfSnlpY84xSnu6ehG9UPH5RJvyjZBoig1Ab/W0d6LJDfyPq4h+J c//vxCubxb2UjThKq2oJ1RniHT7A4nKKLJ+z3IhU0V5bSKdEl0RTajx10Uqq TpM0nS3pukBStaTyiBJao27RbbpDf1ypKIsyBhJb2W7/nkf9f6Q7pp+5mC6e lk7xae8sr8be8LFIhedjkivGvuTRyBsOh19JiAIZkVQ9LI5xcIx3R/vnfn6t 7CqtKYt0Xn9AT/lTyTwfM9v1GSuDn7MzLgVh5kuyK0YpqV2nqv6QuqYnNImc b2p9Rk3jnu3xH1XiS6s7H9IpBeGuZOfejiVaZHW1SmZoGV2heXiWyqEJ6ucW JRbwUNoKh8fhGx6Lf4QJTUS0CIhIdBFGDMYQDKE6fEJCsfNNed+C81oM3nbx BEpBjdBlERORT2x8kcBajNFynRBLPoakTALNGQQKrDfHZqhfXsfU0INzeD6R 4vvjlFkTuDWWNLQSuuRUdGaLRJKEAJ8UiToxUhZBMAEOZzCc+zVpAY4C9Obf nVxQmqp6QEfWnuisJ/TUvBTZ+Iq5nk9ZHnrN1vgbHkx/TlXhC5HjX/DJ5ktJ 9J/zfPmNxGuerX0mIEti3njJ/sYxu6t7PHpwcFIABOQnArIMV/W4gDwhznBS QJ76gvyWFTIb5/5/QS7uF5AHBeS7uwSn13LK0Yi9Y7isdSNGTQjh+iASSjvw iE7HM0aJNLxilJPmyfiZEvE3xaI2RaGJCUETqSZT/1vyjEqzu18R4/TfSPA8 jdn7HKnekqA9zhHv9BFmCYuE1fkjCnUXaS5JpqehiF6JZhm+WhnqKnGD1ZH5 1EQWUysAN8WW0p5YTq+5giFLJaMplYxLdKTKNGkaWbaO8axhkZeyIF9O/Asf T/wTH0/+gRcTonsnvuFIMDwckyQwLgl64qEc1zkcneLd48M/A3lCZqg9e5fO 248l3byQdPMxi/2fsjn6mn2ZneyKSW7UbFBRf2Rrt97QJsal4YAqUTe1HQ9p 6HlEU/9jynof0Xr3iLt3dxgcXJXXGzRPrFM/Oi9GbInG+6sSK3iKFPCVtOAX JaMZnWDrJauVrKiPicIQZUSt1aH29sXeV8ygg5kgVSph2hyMssRDYq5jiM5F I2ZQeaSQLi4DfUIGBoHYYJFISSNNFHHd0qqtG5NnshW30DQSYs0YoxMFYis6 CeWZNfoUi4Syoy0OfbKAbA4XFelD2JV/JPTSrwm+8A8UmSLeX5L7DzSbN2i7 fkRHxTEDjc8YF0s+3/8xyyOv2Jz4hJbOr5nf+1GUxGuOFj7h0eIrjlY+5nDt BQ82nrEtAG+uP2JFRPx33373J4Yfy2gOb1I9KqM7Jsl44jNqhOGYwh50qY24 ht/mvE8WF7ysXPYRsRRzh4i8Dqx1U9wc3iE4o44PHIy4ekViCIkl3BhDakwi wT4R6DVRIuxEXIg9VBq7+8Sl4Bcnwio+XiIaTVwYxjh3G78pvv+A2eNXxLr8 igSPD7F4XyDF8wLxLmdJkrBIWF3PkuF+hlzhuz7bSH9zCQPNN2mW31UdlUZN dB61MTeoi71NfVw5LeYq4bWGPllndzPrGMuuE1uYwbCxkLXr93jUvsozEWov Jv9fXk4Jw1P/zMvpP/Ji6keOp77jaPJLsc2SkKelkM2IyJjeFJZneHd89K8Y vsbnz76lOUVpTHsk8vcpYyIe5ntfsiqpfKrvIZnl0xRWb1Jad0SlMFwrDN+p 36NCScJdR9T1PqZxUJK0pP2GkWNh9gmTwvBc5yjtd+9RMbFM4+ImTYsiqZfW T3ZGKvtpld4tUvXFhPsHS8L1MxKoNRIeHGFrlKE1Kk32cggQ8+4nElDlm4yX 3iqJ2oqflC6NZBhtXDo6kcF6kcEG5XlKqVaK7o4RWFBia7SnMOwen4a3uMUo +ZuBSQq3VgypqRislvc7Ma1xwn4kmuQwIkJcbO4n/NpvCLv8D0Q5Xma8o+Pk Et+/l7H6nkarOGFxgh3VxzKLx4x1P2V24BmLI89YnXjO5vRztueesyt2ZHfx KTsrT9laO2Zt/ZjltSfcXz7g2+9+f3K92pHKwXWqh8X1jTwnr2VHCkYnZz3S OOti5oK7hcvigu2803DwS8dZk4GrNgN3vRQecyl+kdf5UDKwV3Acmuh4NKY4 vKISbE8n1oelEhCYIs7ZgodfPL4hSfjI99TK01cTYyTCSI67zP/H1XsGxZWn ab5P1G7snY07u3cnYj/s7MZM7N7e2YnYHXunu7pKXniXhkwgk/QkiUkSk947 vBESSFgBAmQAGSSBQDghCTnkHcghZEtSlapL5bt75u6n+5yE6qm5H14lCJDI c37/532ezHPef8TwMTw5v6J9+BWcsl/F7uX3KRJgz9wOd2YcfKygPA6R7DhU 5cShhuq805SEMablsYO7MVIVILlV6LOt7X4hbFMw4O3BgVAfv9aP0ZpBHIt0 YphJfc5bj+sNO3Gp8xim+j/Dg1O/xbMYuf+Il2d+jxdn+PmZH7ByhgSf+YDl +c+xfI5CcI7x4ixt8tw8vnz6cP36+/Vr+1JxZ/Yt9tc8wFDbExzvX8HMyFMs nHiGwYHLiOyZQ33XDbT2PEQ7tadt4DFa+u+h7dAyOo+w+R1/gt4xYjvxFAPT qxSRp+geW8apk5eYkg7R6DqQkWmAXKZHy+ExlNS2Qp7voDn2IUfvoiH2opiO zeIKopTImX38nI3JaC9AsqESudlOKBRrYx5ymO6UhUH6kBC0VmEgHr2Bm+Wl tBJLYeako6svJr9ZHmF7ghBURFhs4emmZNso+cYQk2I4AFPEh/yIhx/biXMp Cu16JpjNsIo+QXm6gPAv4cwSw5a5tlXBf12/Tundsx/QG2XraVnBwZ4VHGMC PnWYx+z4Cs5yCS9MreDSHFE9x7q4gouXV3D+ygrOsGYuPsTX3/6I//sndEev xLaLtdefRLqhCSnqemzLcCGe6CYR3VSim6EMxTbby9QLU3NpCkwRKIoikIsr UGevgyVcidQStrDqZjjbDzC9VkLMNpXEliWml8oyV8eWvDbftXZxTqkFRlse QvYEuHN+CY/yY5qGX8Od9Wt4c7bCSmydRNYrT0AgKwHhnARUKhNRo0pEnToR O/NTcGqoHROsYzvrKbi16HfuwoCrHQO+vRgM7cOBqkGM1B3AAf8eDFtrcaZq FxZ378HFjk7M7B7GFI3Y/MHPsCoILpF9Mf8jns9/j9X57/DkLBPgua+wvPAF li/QDV8gugs3ie8Z/Pjhy5/Q3bruICZ7iGnTYwx3reAk1WTmyAp6ei8h0DKL SPtl7Oh+iNb+p9g18Ag7Bu6j5dAD7CG2HcS2m6dr72na4llie+YpuuYfM2jc hEbDMCw2svsbkJ9rgDlXg7DBgXKTHU4rXQFXYWGwHqZQFdEhdsIFDq5ymFzF MNlphc0mKHKozEonpMQ3y8A+WEB0LUGoK4JUbaLrCkFP3PV0AzqeQrHNuzaH UphB6Q0QW34fvyY1R1HqCKLCSZWNUnGjXpiibuSHbTAEy+ArTEOVfjPskk+J 7q+pOnE8rWKiK0J7yLdG2r+n0NCuktg+iu4hEnuMxI6dWMHk5AqmZlYwPc9H EjuxwL9nXbz7Gl9+/cMvYj+egZsP39D37EKGqhIZ+gYm1yjiCGoiQU0hqOmK IMSqEKRaYd5uCNkm9oyiMOTZVjiMXtQEK1FRvRsd04usK3B17EcWF282K8dF XaaXkjiqkUJw5dRCVUUAeoYNM+NaVerfwJf+/8CT+Us63U/hzv6Ui3JzbB6L S5YAX1YiQjnU4dxkVKuSUadNQYMuGQ36JBzbW4PJkS6M97Zgn7MOA266W28X 9lNb91cOoi+8F3vtO3DY04zZpnac69yLua59ONM9gHNdPbF9DWYOP8fN8fcx OIUNq54R0KdnP+DJ+a9otuh0L9ElXKJLuPyIjzeE+fVxP78RJhkT/S/Rv/MJ hoSOd3AFbZ2X4N4xi8Duy6jquIemvhU09j9CPflsIp87yWfLiSfYQ0lto6S2 zT7DnrlVtM49wp4zt7FZYkGWshwleRbYiyzw0rnW1pCTcB10oXqognVrsUmY k+qny/SRT2EMr8eCfGc+3asGhqxiKHIDkModkLHDZeWTUTMZLROmAAWgcQl3 SrPoWCXMHxLymekU5qT6oeDfq8ioxs/vd5NpOgmby4OiELmspCOIUmbDVtjK FKjJ24pqwxY4pDxrkk/IZhrlRsJHEcN3On6xfmX6m9e/xfXrH7Cbx6iLgPZz HR84SVjpiA5SUvdPE9Lrr/HF17/FX8R+5m9RHRYu1nFRIiNIzY4iVRZBopjS SSpThd1jFAGI1SFK59ok6JxCOnIdj4cugLCnCiaH4IJCsFCe2qcvIZMuPctB el2htTG9nhAUbB+5XIdZfL5yVobdB1e5iF2dXT5tI0J07KG4f0Aw49ewibbA RiLdWUnw56QglJuKSnUqanSpqNenoiEvFU3GVAztdOEjTB3twX9Bv6sOg549 2O/fi/2RAfQG96Kdsn04tBunW5i7untwqvsQpnoPYK5vEGf39WFqYBpTx55j /ugzrMx/zfpAIr/Cyvkv8fjiF3jADLt85TMsLz6LvQizfPk6nt259dPrvdvX sRwffIWenTy0POR7u+/AVjsDV/Nl+HbfRFXPE0Q776GSYauGSNYdeYxGIrmD SDZPrWLHzCrqGH07zt9h4LmDLdllyNBZUVhkg9tdgQqPFXX9fVC6qqD2CqML KqENRqCncTQE/bHxvUa/nWgyKnhMPA0aVBq2w5BjgZiCIlUFIRO2Ay6i+Sol crGJbn6o3ETOLwxc8rE8kApDSl10EsQy1yfctu3nEuDPl4dQ4AzB7rQjL+qB MeJEobMAtcbt8OaLYDEpYVBmQ69QoEBbhHx1ATuhmBE6gy1kCP8jdoz+NS7e +YDLS6wHH/Dq/Y9/ud64nzxYgokKmykvQUZ2EGnyMNJIX2pmAMlSD9Ky/BAp A7FL7mTUwywTddHogzLXB5u1GjZ/Fb0mO4Cdh4PJqG7oJOlz0WuTNNKXRfKE WerCBGIlV7Eq6IOaq0sdqEDEvAWlWZtRJtsOqzQBXgmbtGg7alI3oyHpE9SR ylqmpbA6DZW6dNQY0tFgzECjKR1NBekYavVjerQP08f7MNrWhkHfnti2WHvM Degpb8Lhqk6c3LMXxzoPYnTvMMb7hnB64CBm9w9i/sA+zAyfxeTx55jm6rxx imFz/j0en/sCjy68W3t3Rng5+yr18OpT1jKWLl/DD9988xN9aw9JePvqd2hr fkLyVmCOzKC87hLsu27A3Xkf9rbr8PUtI3jgIcKHHyM6+gRV9JiR8RVUTi6h 5cxN7L1wC72Xb6GspR8JeisMpQ7YfBUwuCrQOj6BlolZNtFqqAIkkL5QGwrH xvwahDG/QQcJLEOetwDlFhkiedsRNWxFjriEp5F+UcOWlB+OzV+UC7un2yLI cjLyVzUjrcSDjApPrGFnMtBmu3lafYxkpFpD8rQR0lcaoZ8NoIy/S67HCb25 CDnGIihZ2boCZOaaiIR/DYs8YZa4sAeHHx3tQ5nrHfenGTl6uQLpmaQppwrp 0jBSpX4kSwTCfBDl8r/ij8rySE1BEJIsFzN4JaxccFobfYVAl5M9gL+Kzk37 29YLmTOwNuta0LM/zJLl4gn5YpP5TU4dGoo/hUvotLkb4cndhPIs4eqDJHiy UlGdnYLm7ES0ZW1Hl2wj2nK2oFUVh3qTGE2FIuwoFpGsfsyc6EdntBizJ/vR XVGP1twQRsp341htFw7v6ceB9sMY7h7B0b5hnBwcwsSBg5ge2o+54X4m6EOM D88wOc60d4IUnX1LCyi87/caS4svsXT1OZauP2U95sdLtOcP1q+mSVh/5W9x 8SuU1cyzE11EceN1lO65h9KOO7B03ICl9zZKB++i9NA9ROj2GiavoX1+EV3n mSMvXEcve/i+KzcoXc2IhhrR0xbGzonYBcJXb7DrWJo7kEuocgmVWpj2yzCh C3tZDspbGbS+IlhKZQgJUqPaQp+yCUalhd2JGqGJIj2/EiJzJSRlUYiY6bx7 DyG12I80iwCWFxJ2GJlb2LLDz7VPyROmkRPcbJ6xTJr7IiNNvFKLXI0GaqFU aijkuVDn6KHJMUKZU4AstRWZdLFSOtCMLAea913Bzfvv12/uE2Hi0hIdRD60 2bkoypLAIFNDJIsyqEUhzqpEsthFTfNSw9j5YzNa2flynDAZw3B6qpFHsnQ2 YXMcLijSlcffN8/j5SIJxrYbyaQcC7OvZX5KOOnK5sJQhLxQBBwI523+/xG2 mbK7CWZpHMqykmFXpsOvzkCtXoRWale3IQV9mnj052zGXuUW9OTGw6dPQ2ny 3yKQ+neoTvlr7OOCGnW0YLKxl911AAPCHYudh3GoZwSH+4dx/MAQxocOYvLw fsp7Pyb7d+LE2CrGJh5j+tgy7p5/hbsXX+LOlee4fXUVd66t4O51oR7h5pW7 +O7bb3+6YCtxvXvefPA5uo4vo3HkMYIHn8C97xasnQuw911C8NACu+V5YnMB rTOX0HbmCqqOnIKj+yAy7REaDGHwsw/OMh8CfjeRiaJ85x5EBg9h4PJVyn4t F2UUSmqWKrY/gBca4qUNlbLLFcNWmIoA8Spfv0VZGMqTJ8mESFqKRNrwRBqe pPwQbLsPourQOJKYmZOKPUgt9yKDnVNKIyfjKcr2CUPuhUEnxI8CkSQpgDYz D2WZCuiUubELC5REREERUshykZuphEqqhJqVpTRDmsuun10Kf90gPNEB7B+6 hGern2Pj+vX1q6vfYGb2NWZZ/wqzM8Kfq0+/jX11rb8Kf0px7fmXPE73sXtm CXuml6DytCKF3T+FRi1FzVIGkSKuQkpmY2w7wAy50HK5XJRcLlof0pUuqFR+ WG1V0FuFkEVzGsPTDz3dgYFoGnweGrowxHZ3bBC11CcMovavDaJme80KuFBa kLmGZ9GncCo3wEXxcyk2o1y6CcXSRJRlp8bwdKtF8OskCBslqC0Qo7lIglZj JvbmZaAnJx6lW/8G/oS/Q1X636Mj+1c4ZU3B/O5WHKjpw+COIfTvHkF/1wj2 945gaHAYRw8N4cTIQYwfHcTp0X6M9TfgKMPp6OmHGD9+F5cZTG9ceoprV1Zw /SrbrvB67vUnuHb1Ib777oeEn5Mpw9v3P6DzyBK62C27Z15ix+EbiPZMonpw GrUjc2g4fhY7Tp1Hy9QChaUZ4nKaFJoRBe2wyhWGrCgAH/1WiEdE2EvIKLz7 IsQJWmFzUyepqUIOyVSQTGXEg9yInYtb2PBRD4+Rizh7y9qsWOkGOPRZsBuy YBJvg0KUzrOnQVHtQYreOIL944gzBhFPW55EIUypCCHdHobIybNE72ay5NHH CYOl85Ct0SI9zQgzI3lZtgI5QskUUGWpoWZps1XQkVRdtjJ2/6Mir4LmqxRV rYOINg0iXDOIgG8fzh8/hdef/QZXeRR3NZ9CZ/ME+nZMYLBxAvtrJzBQNYGp /iu4O//kr9fno6w++xazc6/hcFyEk+VmeVhe+0X2BK/tInLgtfLvyi9ifvo1 nq8DPnqLqW1+CW2sdlbHGdbcEtLyfcgwCtulViBDWgJRugmStALEJ4WwTbSL yaUeaZmEO8fL73FBkulGiTmKEh4WBa2wStgLz06j4RR2EfRC72Pv8fuQG2R/ sXohJtwSL3WbdlgqzMcO+GA2yeDQJiJo2Iy6QsKt2Ej93QSbfBMs0q0oliWj lMnMlpsBt0YMv0HK/pWJygIZqs0y1FkyWVlwG1UoTt2IIE/vLvUmDJRsRX/p RhxptWJo1wD6mw7F4O7rOoz+PgJ+YBjDw4dw9MgBnBgdJMz7cHh/N4aou4cn l3Hs5C1Mz97DpcsruLi4gks8LZepvRevPsbt+0/X795au1NQjpNnnsemaXQL 71WceY1w5ziq+idRMzSN+mNz8PYdRXKhcO+an50yiBx2qVyCpBGyXEkQTkqD 3cuMGiBcQgm35AWCBDwAc8NuGJs6ICXo8kgYWWEfO5cV2kJ5bJJtIZ9xAaXW rEhGGaEujc1VkiOfcjDUVocL44O4PL0f+w4fQZpYxW6qoR/TQq7Niw0/Ls9d G3ysLDYyjxogI9DZWh1kSj2UmYWw5eShQKaCKlsPrcJA+dXDoGKpdchTa1kE vciOikgjGrr2o759P2p3DaKqfhAF5h6EHHvR0zyK4d0TON46gVO7JnCacE8R 7Kk6fkywx8MTGPWewm+efYX/GTum/wZdXffgcpJqFwnmo48VcF78CEEirkCI kIeIeIiAB4Ui5LaKczDWz6HtHMFmdbA6zy6hm5ALVxSmG91IkRiRmJSL+DgF kuKUSGGls+Lj3dia3oSt0p1Ip8EQNnY1GiIorogiiyYox7K22aOKgGuo3BqP DzoCruZpUjA/Frd3I9URRAa1KIOnSng0GWUo1/Dw6hKoNQmoM32KkG4TKni6 BOUup2UtlqXAokiHVSWGk8rtzZMiKMw4LJKhqkSOmlI5GmwKNNPA5Ys3wSrf jN2mbegq24I2y0acPNCEqYlDOLhnP/p2DaO3cwS9BHwfAd9PwIePHsDR44M4 fKgZB46cQP/pxzhw8h4OEfCx2fs4c2ntFeD5RWF7gSdYffWHG2CT1t/ke/v+ t+hk2Okaf4bu2Veo3jdH2R5H9YFJuPceYRP3IbXIAwk1QM4Gp2CDUzuDsdmi CksQ5TQWFaEgChixC0PBj/hHAFtQQOslvOZd2NSKymPDUNfXI9XlQLK1BFrJ ZuiEwbssvWQDCnJFsRFRJq0Mp04cif1iX7//AjcXpjBPwM8TcBu/pty+AaqE jWsDd0VbYc6JgzZfAXGxGRKVltZTD1muAXKCLJGYUECP4Fbkw8jSM2kbtAUw 6kzI17MM+aw8GIR9U2t3YefAMJr7DiJK5c737IPJtg+Osm4cCPfg1M5RnCHg 5wn4RQJ+mYBfoXpfblybFnOuegJzwQlc7bz8l+vq/ezZN2R7AW43+Wb5WAFW yCWod9gpQB4h6lGhCHuUsEdYetckHfcEi4+eCdQdvxGbHbWXoDccm0X0wCgS c4qQmJiDpEQFkhOVSEtWQpSSC2lqLmSpKkhSjdieUY2NqVWQyWtQYqmKvQ6c WcjoV0LYK4SLzvyxMfVqgq6K2TEuBIJey8SRyIaYZAvzjJejUBGPYlUCLAS9 jKBbCXq1/hMm/A0oFW+APSspZk+K5KkoUWagXC1m85WyIWfCTxUPF8tRaZGj ukyOgx1VOD12CB6zAiXZm9FsjsNu2zZ0V+ZiepJpf/IQJicOYpipv7ttGN20 Kd37Cf3IEAaPHcT+Q604uL8OfUdOouvUI/SM3kEPQR+mhTt1YQWnLq5g8f5n +Orb39EoxyBPXr+7+uTsS3SOPkPX5Au0ji0j1H4Ctl2HkJjvRaLRibRiNi8L 3Zhw/U4McCG6BqAsDcLKBljBsCVwXcjHoohQfhTSHZvCHmgiTOh19dg1exTN pw+is9uPvS1l6G4pRdfOEgx0V/00LHhtDOxfxCbiXbtMW+S1IHvLJ1DEbYQq aRN0qZtpchORYipEqkJHs6mDKDsvtvecLMuE7Jxi5GTZYNVY2VeLYNCXwJhn Qb6xBCaTGaaCYpgKC5FnsaJ67yB2Dx9DHbNIaagHFd7dsLn3wG7txG5XN06H +3Bp50ncaJvCbdZHuNtxmsp8t2MyNhopNg6pee3W5ju9l/5i/QXT5wTb4z7/ B6j9rCArzIoQ7ijRrnReQpXzMv/JKsclOsMqQm70nILSf4pRbJLxchK5fhZB rzx0DlVDJxDoO4Bg7yEkywqQnKJCaqqazksDUYYGUrEGcoka2RIVFCx5qhLS NBvSVS1c8wGI6NklBWy+ZgJeRphtzBiUKGHneZm3EjLmHLE7jMqTp1DPsJ+d kRYbdK1L34K8zG0wZm2jVmyDSb419n5UOPdTBBj57DmpjIZJKCTcZsJdqpHA Rrhd+TJ42aCD5iyES7PQXmXGxAnGPMLducMLc+ZW7LEkYZctHtOnD2GKYJ+e PIiJiQMYn9iPE6cHcGC4H517e9C5rwPdjIW9+5uwb6AWLQeY34bvYdeRO9g5 eiu2tcehuSdYfv5V6hrTKet3Mrcz/XWcfI7O6Zeo6pmDvLweCXkeJBqcSC/0 QFrCYMykp+TR+IlnVXkANleIPPvXeBY4jvpQWOlFwfpbPJpoCHIavOBwD/rn BvF8aRBP7/fjyd1eLN/aix+/f4d/G/sd/gqPl5iaEhOgSU2ELiMZRkkKJDod MoqtNJImiBQlyNE4IMsphTzHghxlGbKVFdCpvXDn21FmLIWxoAKmIpa5HKaS MpYFZTW70Hl8AjsGj8IW2Qt7qAMubwtJ24lK2w4ESnfjfOQALlaOYKlnAQ/7 FvC4fwFPBs7hSf98bPzTg95p3OuajM32utY4jnv7Fn7xB4i/htd9lnXhZxBf IsRXEHVfRaXrGgG+jmrXDUJcwz//Nf+8Dr/nIlSBU1B5T30ElfMk0qGxjyHX fhJSyyHYW4cR2XcYlfuOIDWrBKnpBqSL8iASGyHNNEIuZ6JgklDSbGVJ1ZAn q1Gmzkc5jVl2mh4a/l2SLoqUgiqklVQhvayKubkKInsl00kllBVWqPUqPFqf sjx9pBG5cRuQm7QRuSnCtOjN0GRsjg22L8+kG1FsQI0uhT0wFeVkuUCegkKl aG13CEMm7OTYXSSHryQLrVEzWuu9sOWL4CzKhJf22ynZjqGyVHQwR1aVZ/J7 CrFvjx+nJvdj7PQgTkz1Y3RqH6sXw8fbMTjSgp6BBrR1VcLduwR3/z20zC6h ZeYWXnzxPY/WzwD+c7z94ndoH36GjvEXCHadRYLGj3gtAdZRkE1uSCjK8lIv FEwX6tjOPOxZFGibK0g/6kMBvXIB4S0Q4K1iVXqQX8lIHhX2o/NQcsrxYpnw LvXj0f19eHCnB08fj/+f6+w2se0VSDJ5VGQozpHTRVghLWJKV1VAphY2d7Ah M7scWQprbECbSu+AQsvVbQrCX2xHcZEw4scJUxkfmRdN5RXYcWgU3eMzsAuT OqLdcEd6EKD4VgX2ot7TiR2OPRjxdeNm4yiW+ZSfHbqB50PX8WL4Gl4OL8bG WD07SI4H57HcR347TuFm03F8/+rLtbdU/y28rlnyep51gTxeRoi8RtzXye0t VLnvkNm7ArPuexTeWs991MXqHq3sBDPcSagsJ1hjUJcQ3KJRZGl7kG3Yh6wi duY9o6gdPIE0ISNKCiBiQpDIi3gYingY1janzFUVIJM2u0hjRnlhERMDI7A8 G8VpSbAkfYxyeQIqcugUlAmx3Qcc6ng4tXGoYOYzi3+Ne1f/efrznrpy5MRv RE4ya32GvIoAF8uTUMnkUq1JRrUuFRFDOoqyE2FSru1TUWoQ9qmQIShkQ1Ma U1EGKvIJdEHm2px5wuuTx2GkIg2d1mTUEt66ikzUW6Wot4kxNNSE49MEd6YP o9N7cWymC8emO3BsajcOXZjDwJ03rGcYuP1QmASdscZt6voQnLdf/B5tI8+h pkVM0lQhXuVHAoFJNbghKvJCZvHSY3ljWwFp3L41Zim+ZbHZ8T6KLIWWzJrI rPC+pa6SpoOmQlVmgiXtVzg7VouH5HXpbh9u3di7NqLqf9HxSmHKlEGhoSko dsY2+RILG5GohYkV5ZDm2CBXOZGjc0PFPqAx8VfIj8LG73OVupDPX8lk87Bc sDa2oXfqHBr6T8JTs491AL7qIUSrhlEXGcKO8H60hPqw09eBpZ1H8IAG4dXR ZbwZXcbb0ft4e/weP76NV8du4NnhRTw6dAHLA7NY6hzDjabh9YukdOjpukpQ 52OwBtyLFNkbFNk7hPUeYV1GtfsBUX1EUB8R0seo8z5Gve8xivxnoK44BXXp JGsamtJZqIonkaMfhEI/AKW+D7mGXpi8R9BwcAIWfwuPQQmjrwVSRSkyVaWx vX2UOgsyMun8VeWwldmQb+LHOj3yNCpolRr40z8htL+CRbodFtk2WOgESnO2 okTKyC39FN1NZbixeBA3COyNGwdx/dYBHDvaAFn8Bqo3oU3fDr1cDJMiC56c ZERzk1CloVrmpcOrTYLTkEpApbHNv8KE1Zy7HWZtKiwGaQxYZyGVlmobKMlE OGc7DpYmocuWjDorYbVJ0eBgOSVocIvRWqsnqOuwzhLWmTYcnmrBwLW7GLj7 mrWK/jvLOP3kyTqwaeuTvt6+/z3EWR6kaBoQr4ggQSF87EYGCZGa6RLKfYx1 a/tW5QoOwRNEqbAtBt2BkQJrrBTKC31UADUEvaMIFWIeuYyP0bfTHBs5fPNW L77//nP8uz84g2UYxZmQMm8Ji0LCfiYS7r/OFt4asEOiFC4T9FJ6+H/mB6Ap CiK3MIz8/DDq6QYc5Q4YnVw4dc3om7uEvtmLcNcNwls/wjqOYP0YqmvH0Fh7 EjvrjmFP/TDaayn0VMyn3aR1+C6+OLWK9xNPWU/wOQPDZ+PLeH7yLp6Q2gfD F0nsNO53HsWbxbtr16bq6Qy+gt81RVjPrwN7i8DeJ7APUOl+TGBXUON5SlCf sZ4T1udoEMr/HBrHJEEVYJ2HtmwB2tKLyDWNQZl3FLl5R6DOH+aiPAitmTFz 72mEOkYhyuLCZYPJZIOR6Ww8HHzUUhXZfMrKqA80RYYCM/JMJhiNBNegRJlS Cr90M8oYgQuplgXiTSiUCLMkGaUln+DocAMuXqE5unoAF67tx8KN/Th/YxB3 H0/j2NBB6GQy6LLkMORkoShHgmB2AsLKZESotD5dcmxLMruBMFs1KNMmo0CV hCKdBCV5ArTSNWiLBWhliCq24UBpwhq0dkLrzCSsUjR6JGj0idAQILj1Ghyd 62C14/Dsbuy/NIf+e2/Rf/8lH1ewj9DeefcO69Smr9+ZWiATMexYkKJuRIIy itR8D0QlHsgcHsZVD1TC4Hlh8yePG2UBP4qiHuhCPujpbfVhYftZYTfkCriK JQho6Yh4aCyijxEtleDazT58/8Pn66Mg/1eM1hThrv6CILW1lomiGikyR+wy D7HKG9vpTbiUQ0FCVSURnt4olEVR2Bmpm+hXfVWN2Dd/Df1nhbtQaSwbjsAn zE9umkKkcQZ1TbPY0TyD1l2n0d4yhq6WEZzecwwv+ufwevgWfjP1Bl/NMLrO vML76Rd4O7WKl5OP8XR8CQ9Hb2B5+DxpHccKvcUaqh+jt/MSAjQDAfflGKZB 9xKNwGOi+pSYPiemLxkwX6HO95qYfkZE3/B0vIHDfwsaywzxPM/ncZl1Deqi s8SUxtZIzTWdgqbwJLTFozCYR2AJjqLl8DnoS2vpjeiLdK7YrnkSnYPh1IFi SxAW2jOd2crvL0NesRnGIuJaoIXGoEM4ewvK0jfSCIhhVYtgUQiJaiscbNKT 5wYxuTCIiQsDePbZPay+ubf25sx/x6MHyzh+9EhsJ4hiOeWUQcynSsHBBieq 7AU8hDsQKlGS4gQYc2lutRKYDZIYoY5CwQesE6qMw4HyRDTbMmJ7VNUJuw55 pbG9ZAQ6G4MZqA+mo6u7FCNze3BwehfJfMd6zXpBQp+g78590c8l9T9h/PAQ CjLFXD8ZFPNkpm4lFEzh6vxC6PKMyMvLQ4HRgJICA4rUOsbFPFhdFpjdDDhu K81iEUrK9YjkxyGgFy5/3IBSNhzBIRWJPl0bPPw/UTM4Bp23jXmujlzuRKKg 4jkepKsDEOvDkJmiyC6ujF0oraqohtpeDYUpwqTRhCxRG1V/AAW2EfrSOfh2 nIKveQ6B5nOI7lxAfcsCmvecx+72s+jsmsFe9u75vkm8HLqIz0au48OZr/D1 /Jf4MP8eX86/w7u5z/Bq5gVWp57g0fg9LI9eIZczuDdwaA3Jv4ffOU4kzxPF 6zEcw8Qx4n7GVv8K1Z7PUON9Sxw/57H/gsf+PRqFCr5Hkf0ScaRill2FruwW 6x6P5jRyjXPEcY7NYZaqOQO9ZRJ5ZSdhtI1i97FLaDt+CRJa8sw8H+QmPyOn g1EyiBJ3lCrs5r/jhIFtP3bTkKUYeSVG6Ir0cKgSKQUbUUEUHQY51U4GK4P9 00fL+Gki6PLMBK6O9OHa8X040bcbTWEPCrLjqJzxMJC3fI0YxXoJI+ya73QX 03MKF3XkxmG/NRGVDhmXYSaXoLAtjRR1AQnqQmI0hDNQFxXR9sRj7+EA+m/e xr6l16yXrOfoI293Pv/yX/D2HzA+MgSLno5amL4g3KZekgyfOg6OnHSUyqUs EYoVShRqTSjMzsNOuuQqrRhulRRR+YaPEFZsxr+BM0e4VGwTyoS3FCSfwqFI gV2Z8RNuXROL6J5+gLpDV6EPHkSSsQ7JukqahSDSDVFIGExl5mpkldUgx1qL 4oZ9UDiOIy7tNHS58zBoZmAwjqKkuBse5yE43Sdh903DG5hFODKL6qpp1Ned RnPjGFqaDuNI9SEs1hzD1foTtJFP8O357/D1wjf4cuED3p17jyX+Hquzz/Ho 9EMsj90kcuewNHx07a6+P8bz1S8RcJ5G0MUY5LrDeoSw6xkV8DWqPO+I2xeo 9X3Jw/8VcfvwEVn7Gr9AU+hraMrZo0sF2u6wlqAxX4My/xz79QLF8AI0JQvQ USAN5WdgtE4jnzE/0HGO4n4VNVwksvwgksXFVB07HN5obJ90TYUf2goP9FYn 9IzqhgoLf76AJHKt54l5wDeiWPwprCSugsQ9fby83oD+HEuzk7hyeB+unOhH KY1ocXY8NMKuf4zueRTOQtJpIWlWkuYkaR6SFmayGrAnIuKSodKTiSpfJqqD UlSHJKgV9reJiKmeIh4OcuIqQd/SK/Qtv+TjC/Tdf4beOw/FP082f4pvvnmH I8NVcBTHwUfKIpakGGUBWtNQ9ja46TR8ki0IiDYhSOtcG/8JhpSb0Jn9MWrY XqtZVRm/Rli6Cf4Mrq/EDSiRJNMKS2Pv79lz0/EH1k5dRffpB9g7/Rz2lhlk VbRic5YPW2UebJe5ES+zkzlKWcVO1B6aRff8HfxKfB5x2a+oCW9RWP4apY77 6IoO0pkd4wkfg8NzDv4A5S18DnVV89hRy5bbMIH2xmOYYKx5GDiCp5HDeMmY 81ntIbytP4C3jf24X3cEv9k3j+9Oz+LRzAqWT9/F8ikaxNGTa6z9Hc7OPkTA MYeg8xpCzvusFR74V/yv31La3pO1ryht36A+8C1Z+56ofU/QfsAOlrbkEmG6 TdAeQF/2BKqCq1CaLkNVuEjQrhLERQJzhbJ2EfnOcyhwzyDYdhaBrgWYIxOE sxeqLBujfwhaZxWU1nBsy0yN8Hasna7H7oDeXsEqZhcoR3GBNLYZi7BDVxHb I0FbG/r2Z7hHzsbaG+BUUAFlcciVxkOdlczVK0Z+rINKUWbKhI2MuYSribQJ 2OdMQshN3qhkEX8mKslYJRmrIl/RqBiRSAb/myRo0xLRSxXrJWO9ZKz33lN8 /uNvfxrtvfayz3/Gt4Ts/NluXDy/F35zPCotlDNDPNxZW+EiOG7JZvikWxHO 3IpK2VbUyLehKWUDjuo2oVf1CRqzN6IxayMa5EJtQU1OHCKZRDxlG3QpSSjO TEV7te8PnHHFap1tSKOWpepqES8Sppp5kJbjZ3wOIVMr3OAQRY6pEoqiSh7w DuTYLiBB9Z4H9GsYgt/BEP4Ab+s5ttALcO+4DmP1TZQ0Crez34K/7SaiXddQ 13sJO/rOYKRnHlcHruHOoWt4ePgqVo4tMnRcxsvxi7h7/AG+vPUFvl9iCz2z iuVZYaDVFSyNjf/5+sXFZ2cfk7Oz5Osm6wHCzlVy9hk5+wLVZKyGjNX5vydn P6Ih+Fs0hn7H1vSPiAbekbPr5GyZtULOnrOFLiK34DqT802K0C2K0y0YbDeY q64h33MZBb5zMAWm8HHaQUr4MDLT+mA2dqDYWc/lWBm7iU4pXJ3hDMZegNO4 XCwbc6Kbf18BFUUpT7KBMpGJ2xdOrc+3/C84vKsBLto1u4JgSRKglCVCrchg e5CggICZKWLlZkJWJoNfl4geF2WGgAUoYIFAJoIhKUJhBhMC5g+LYC5UQC9K gU6UhEDLbvQQsp77zwnX7yH5+Rs9fxKD6wLhuky4ri70oJKA1RMwn3I7Ktjx nYTLK9zXR42tzNqOWipbg3IbdvFrJ/I3YzBvAz5Ci2Yr/gi71FuxU7UFTcot qKXWVhJER+pWqJIT0NrY/ic/ZYcHS0hRliONTVIkbLMkDyNJzOwg80KkCECq DkFOr6bIjyCXmUFdIpgTtgxJGTz+BWR5v4HY9x1MO9+i+fBl+FoW4dtzB4HO JVT2PUD9/gdoHl7G7iN30cnkuvfYBdwav4nX00t4S4Den/0S3yz+Hh+u/h5f Lv6Id1e+w/0rX2F14R0enXuO5bPLWD6ziPuTp/DPlD0hZQsIOW6z2DWdL0jZ G7aRL0nZ16TsO1L2I43x79AQ+kdS9k+k7P9FlGZNa6aSWR4zDzwjZa+ZG24w ud9mLroLDY2b1noPBscdGJlJTP5rKAxehNg0hQ2im0iR3kKe8S4stkUUh8+g fmgGBdVtyHZyAbp4jIT33IRbUTxclC4/JNYKOP3FmB+uweqFvfjs9ol1yv4z 82E6SlgV2WyROWJINUqkFZiQWm6D2G6H3GVHjscBlY/qaCuFNVAKi88Imy8X bhoyD2XMHaSBK89Gvl6DPAUjsSQVenEyKduDvfdeCIRJf/52+Z/FALt4phNX znXj2sJe3F7oxWiHFQ3FiShlyrGJNsNNwALy7Yiu33bXoIrHDm0c9sg2Y7x4 Kw6YNmJ33nbsydvGx61oNWzFLv0W7NBvQx2/r1K+GbaUTTzT9zE+t7puEv4q RlpeFlNxtgEZqgDpCkNE2lLETmTIhT3JhWt6g8jJC0FZEIbaHGHPiUCd60S4 xE9DEEVF3R7su3gd/awdIxfh27UIb9td+LsfINL/iNbvMXYcfoDW0btoP3Ed XcfPY3X6Pl7O3cPr2Qf4avG3+Prqj/jq2o/48uoPsSE5ry5/wNOLn+PRxRdY XnhA4q7gzumTf4CNHTVgv0DQaNEcT1gvCds7wvYbwvYNaihndYHfErbfE7Z/ QiNBawr/b+yI/G/Cdhe6khVK2kvC9oYe7TZyi+9DZVmm31pm+1uGnknD6LsH U/AmCsNXIGZb3Zj1HimqL2G0vIfZ9grFtXfoNG6i9uBpuNv2E7o9yHJUQW4P IaMijPRyD5pH92Niei9Wr/Rh9fJePDnXtg7bn6KQoBmUuZAYrUgp9LKbVCBJ W4xEdT6SFTqkq3SQaHQMyLlQ5qpRZNIgh0E4p6Sc4czCVl8Eo14Ho0ELI0E1 SNLWYKM78u/ajXeUssyfk/bnuH/zJBbPduHaeYGyHixd6MONmU5EDdtRnr4Z DslWeOVxCLHDV6kSUKdJJEGJ2JmXiHbFNkyUbcOB4k1oZ2RoL4rnYxzaCrdj t4m0FWxDo4l0qjejXi9C79BZ9Izew/jsylr++esYbEbCli9cDZ6tgEjol9lh SAhcKoETEThprrD3dZCRM8QmQ3Ni4bLVumFnBqsPR1HsjVAGwgRrBPsuLGLf whV4d7Eob76eBwjtf4ya4cdoPLYcG7WxZ+wqBo+fxZPZO3g+fxsvZpYpad/h N1e/JWzf4v3Vb/Dmyge8FEbYXH6HB5cpb5eWsHz+Ep5cu/jP8jZDeWMPD9nv sp4g7Hj1z8T5viVxP/yMOMpbWJC3fyJx/wRtMRNByRNKnEDcWz63u1AWL0NV +hBq6yNoHQ+h9yzD6Cdx4VsoiF6BKbqIX6u+RbzpW+aiDzD73sNaeQiyigiy bREomA5ybQHk2r1Q2Z1Q26z8mh0iiwVOVwHlrRqriz14cqF9nbj/RNLKkVIc QKpZqCCJ88R2n0kRa5k8WFId0pRqpGdlIztdFdsdTJpjgEhqRJqoBCkyH5Kk bNxKI/TSDBYJlgpvAqbizPFh2c8v3vyvePXsBhbnO3GdsnaLknZ/oQ8PF/ox 1F+FrsoCBNk/nbLt8OUkIqxKQo02GQ2GZDQbU9BSkIJuzXactm1HB3NpZ0kS OixCEbySeOwxb0crH5tZdYbN6KuyYrA2it6J+4TuLm7df/fHsV/jF8iXZ8Ru cCnMZlzKlkDMHiqRhSEldOKsIIthX+VHloE9oiAIlVm4sdyPfGMAXm8NyoNR OpsQ8n3CLOgQmk+eRu/5i4h0X4Jn9214epbhP/AIlYcfou74fewYu4WW8ctY OE2zduYmVs7ewIuzL9lDP9AGfHH1K9qAz69+ic+uvMfzxc/xZPEzLF+lcbty F/fOn8f3X3+1xty/w/z0IwSsCwja7sSYE1Qu7PocUTJXFWPue9QGhJZK40bT 1hj+Hf+LpsjvePS1livk7jG5exFTuRhzZjJX9oisPKbpegS97wHygveQH7kJ U+VlBPtZg8vYaP6AePN9FBX44CwqR7Y9smbaWBpHMHa9ptbpYlmhcZbx6xYo stNg3P4r9NcU4es3N/9kvaO+/fZHtJ27R9x8SC0JII3opeV7kJpZwP5SiDSJ AakZWiQmq5CYpELCtlzkxOlhzdJDnJ4HaUYeZOl6yFO1EKVZkJJSgYwEI3NI SmyTWC8DxpkT/xK9/4bLs+24Pt+FG+d6cIfYLS/sw9hwAw4P1OD4wUbstObA RZ3z5SYjrElBjSEVDflpaC5MRUtxGnqYHaaccegsS0VnOasiBR0VSWirSMTu 8ni08LG5LAEHWp042l2DoV2VqKusRZm3EWX2Orz74vv1DQf/miIgDN/IQCFF r5j8lWZLUSRXQyIJQkoOMxXh2DspmSrv2u21hQEGBy/UGi9cbCfOUGWMP5Mv SO8jVADW5lbsPXsOLSfPwdlyA66e+/AcWEbo8BKqj99Bw9h1dLLL3py+hvtz 17A8dQvPzr/C68tfkDuhPsdni+/w8uobrF77DI+EGUfXHuPelVt4dPfO+h3i fwx/xVkErbcQtD9GMAbfO0To56p89HP+bwgfPR1TaT0TaUP4h4/QGPmBP+xw PoO26AE77TOahc/4dO5AQfZyyx9Sq8ie+yF0/mUYQndhjN5AftVFNBy9hPbT V1EzdBoZZh4SXQAOizD52UfuQuSMvcC1tve43u1mWaF3lSDXXQJL6icoTPgY BXG/xE5H2X/46T0qstd+/h7aF5agjbYijfxlsFLIXoo0H4kZGiSlCZupqpDB EmeokRLHZptogE2phzRNDRlLnq5GrliFXJEKWRILpOlEPlFD87+VoTdV4A+y n9+18x/x6ul1XJvrwI35vbh5rhd3z+/D1alOal81ju5vwImhZkwcbkGzVQmf ihDq0lBjTEdDYQaazelosWSgLz8RU54EdNjSP0KHPY2erc2Rit32ZLTYEtHq SkV/sxld1QUIazfHrszwSj5B+vYEZGyJQyYf86ViNAUCGB8Zwf+xzqNJnk4W RbGbZUqypCjPYmrKzkSuzInMzAjkuVWQ5PhiPMoNPvJIJjUeVND1eciicAuW MBPf5AvEWDQFqJUBHxqOHUfnmTl4O8/B0XUHjv334D18F+HRm4iMXsBJ8rg4 dRk3xq/izuRdrCx8hmcXWZc+w/PLr9msXmGFHD66/mxtTNHVB7h28Rrd8Tfr PP4tevfcRqD8BgXxAXl8jpDrLXn8ApVeNmE/k2zgA2qDX6Mu9A3Nwrdk8lsi +S3C/jfQFN4hlCvQlr2k3VtCDgVOUUYoaffUbL7awH3ow7eRV3kNZS0XsWfi Mir3n4K0IhS7pyC1kH2BZTZ76f2FS0cC0DFXCDt1G3xulhUGbwnyKrSwCy+7 p3yM4qRfojR1G9r8Pvz79bf63337AzrOM3ct3EfnhSVYO4aRLiij1opEsZ6p mSpI4pKpimksUQYtoEiPjCQtVGkm2DVG5Mp1UMu10GYJpYGOeqKRG6DIqoBM bEFOSi5Kkj/GhaGBfwGmkqv8BK7PdeHmfA9une3D/XP9OHmoHiODtTh2sAlj Iy04fXQPZkfbSZgGIUM6qkwZqC8Wockiwq5yMXr0yZjx0BE6RWh3ZaDNlY7d 7jS0kMjdvnS0RRSIFm5FlK6w0rAF1ZpNzC0boEnaDvm2eMi3rI0ALonNtZag UCzGytISVlZvx6azT073YHq6F+07KmCmCTCr4mDOjUdRTjwsslT+TDp0aUpk SqKQKyohV0eZUzxMxF6Ic+w0ykG4fZUwuYRbuvww8izl+wRK/aTVh/ygF76+ fWg7M4U9ZyZR0nQOZd2LKN9/BbYD89gzNMvnfwFnj13CBdatmUdYOvscD84/ x8MLz/Dw8ioeLK7i/rWnuE1Sr1M5r1y5j+cvXv+3n64Ge/oN/GVX2b2XmFOe Iuh8jbD7HaLez1Hpf4/qwJcE9TcE9Sthq5/wVx+hIfIVO1dR6V2oCx5BY3mG 3JJHyKZ1zGECVtrvI9dzH+oAwwvbtb7yCjy95xAZOAFxaYCUMqfZggwfQaSa hAnWJLXcDS1Xqp6rVNgiXLhTOS9g4+elcNJkBVUbYUn7NUpSfwWHXAR7pgjT I8P4458upvrme3Sev40uYYvKC/dZS6g5dpbyHERCdjHiUtWkVUtaDUhhr04X GSER50NGbRWl5UMjNsORVwR1Tj60CiO0yjzolAbolTroczXIVVuhEK6skBQh OyUbd4e68WRqLPPnxP4pNaMdx/vqcHKgERMDTZgRRo3u8GOwJYLjQztx6vBu TB1rx9yJLpwb78YYe/xufx6qSyRoKJNQYiXo0qdi2sfe7RZjt0eMFq8IrT5m lCY9WoM5PAWVxXHYhKrCbajO34Ia/SbUajehVLwNyrgE5G6Pgyk1BVaZBBUk t1yVigpTPHugCgtn+nD4aCtaumrhNktRodoKa+42WESbUJbBYq4qTd3CI70V umQZElLoOXNIrYZNTskzpPLBYY+iwCnc6cXm5hTu8uLZ8vnWBmsFPcgLuaH0 h9A6ewq75k6h6vgp5DedgWnPGTj2zGCo6wKO77uAiYMLmD2yyGO2ghtzK7h1 jnWBdZmfL67ENs27yDp35SGu3X70i59kdfcD+MvvMd8ILxQ+Q9DNbON5g0rf W1T535HWz1ET/AK1oS9QF/6CvLIiXyDke05ZvQF18QrUFc8hL7qJ7NJbyLHd hsLNVO2/BXX4GjRV57DzxFmofY0Ql/khIayZzC5yO8ElvGICa2afL3S4oA8K e9l7Y085L2RDgcNAi7aFtRnlGZ+gXLQZLlp5F1uYgwn6j9cvXR2785ig3vkD qF0Xlvn5Q8htlUiQmxGXokd8mhGJ6SakZBQig9AJw69lWcUQiYqhlZfDUWCB RsWP1UXQaQqh1wqX9uTDoDVApyuGSkt5zTbDUhLEwmAXlka68XRmDNKf3w/+ D1hcfILjxxbREbGit8qJ/moPDtZ4cbDSjT7a5kG3BwfYNQ5Qk051N+DMWDfO T/Tg4nQfrszuw9RIE0Y6PehvMuOEWYlJfyJa/Jk42ufGsQEPLpztRVulCtXl SaguS0SNhSSa41BLeutJb33eJtgVidAmJ0ObEA9jcgJc2hR4iuPhMycgyPIJ bxKXStHVW4celpuH2JWzBRVpG1GeuAHWxE1wJG7mynAmbGaKcsZvhiVJBFGq l13Kxy7jRqlwK5c9DKWFFq3Cx2jgg85Fgr1e6g2L5Aq3FOeQ3B0z42iaHUfD 3DjqZk7C0TKJ1poL6Nh1AQOdC3Tmi5g+sYIzE6RzZgUL8yu4sMDHiys4S3pn WZMXHuPDt7/Ff//pvbqV7+Ajbn7rQ/jtKwg46QjcLxDxviK6r1EV+AzVwTeo Cb0hum/+Fdl9Q4ktLBGIvc0k9BSK0iXIS64jy3od2a4bUPivQhk+zyQ0A3/v MaQVeyAimRI+PanNT2JphoQXES1ro5vKrQ4uVFJLk28Iu6EjsRHdNtZWeHM2 kdZP4WQy8igksVk2LgaB2SND+KP1cPpweQnHj4xgZ98AksxOJJd4Y4bA2nGY UnsBu2duoWJXLxJkZYhPNiEhrYi2tRiplFZRJq1olnARdBkTehn0CgccxRXQ aEuh07MMFhjyhH3LipBnLIDOKOwx6oBMVYqGpi6u+jY8Pt6Nh4e7YrtmSX4+ 6kWJt29+g7bWMfTsETbWbMVg1IahahdGSPPhYAAHrX4cKPPgUKkHI2VeHK3w Y9QawElPEPND7bhEkhfPDODa2QGc2l+FemarhtS/QW/WX+HojiIsXhjA5YV+ dFRrUGtjBrOmoK4iGXWkup4xv55ENxQJryltZj7bhDyxCAaSbFZuRIixP1Ka gKrSRAToMgJ5W+hUtqKuTIqDffUUi61wpG+ALWkDHEmb4EneDF/KFgSow0Gh +HEwicTHJyFvmx4mdQQFxRFI87zsuL61wXTCNe6kWUst1vq90ASFG78jkJHm 2qlx1LCqTo9h4cYhLN/fj7Pzh7F37wx27l7E4MEVDB9dwejYCk6eXhFeA8MY iT5BPT56dgWPXn74y/Vrb89MvoWXNtRnewKf4ykCrlWEPM8QobZG/S8I8Qsu wurgy4/I8Uv8BWrDL1kvYLLcRG4pi85AWrQAWfkFyJ3nkOWdg77qNGqHJlFU 147UIhcySr0QlXshsXoh+2nSAxUopYD+nc+z1OWAPiLc+O+ErqQAxSYV1Pkm pOmsSFHbka0uhy6HIshUXkDHZknfiqdP6NYe38aH33yOtf11/gceEeeTxFkr F9OTSmBgpRZZkW7m71Dih4hLRlRSSQdRg0S9cK9LO7LLGol2EV1ECZWllOms HBn0scIlbLJcK0RyOhaVB44SOzR5NmhjO6VVQF9QDkNhKfIKzdAUeZCT70Gw rhNNrb1o2tmGKyOdWKEneHi0U/LzQVv/F8aOLWBv2xgG2ydwtGMChxtaMRKx Y7TKjRG6+qPOMI6xNQ2XUm/LPRjjop+kl5zyBvlMZ3xhPtO5xnosnh3EtfP7 UVsigj/t79Am/yWG8/6ebuPvMNZhwXCPE/WONNSx6u2kXyhS3liejEaS22SJ Q5OZ1BZsQj5TWLl+O5z5m2KaHiTNPvUm+HI3IpBLN2Lchjr+3eBOFyLKzXCm fApX6iZ46S6CIrZH8RZEpVv+FaqkW/BniGz7B3SmbECrSgaFsN25OgRJvg9y y9q9WgqHn8lZgICa5o8i0xdBuiOA8Pg4RhaO4N6dA7h9dz9u3B3E1dv9+Ozd Hbx+8zss3vmAG0sf0Dq0gvZjKzh1+Q3urn7A7acf1u/D/CPsbVmBt/wxvPS9 PucqAm6B6FWEfaskepVeK7DKllkVXEVVaBXV4bWqiqzCWErjUHYLWRXXISo6 Q7MwB5X/NMJ9XGuD48hx1CCl0Lk2YII8/zS5JItrNId+SRg7JisNcd1WIznY AhFlO9PiRBZdqFxrQrquHGnqCqSpKmIXpKfKK5AiLUdyeim69+7D+fE+nD3R i/ljPWhviNLBpsDAnJzHymfplTkQFdsgNrshKeEhJctiLddRtg0pcitSY1tb 8XMFHXJ6GZIkXD9yO9KZSiS5jtg9ABk5LpoKP2ylTqhNTmj5fHRFXH9mO4tc lzigtkRREW1Dc/cIdnTsx462LvR378bqKRqOsU589ejGv9jcWoKJ0fPY134S BztO4XjnBKZY4+T6eNiOEyEPjjrCGPNGcNTuwTGbG+M8+VOBAObCQZyrCmGh JoyF2gguVEex0NqA6wv7YZN+TKZ+ib26TzFi+hWGjX+LSa8Y9U7yzNxX78xA gzMdjQ6WPQ2NtlQ0WZOwoyIBzWXb0WDeAmt+IjzmbbCpP4WHDdEm/TWc0g3w sgKskHgDGnXb0WGTI5It8EzmyXJQuhUR2VZUZW1FbQ7XCKtesQW1ol+jk011 WL8VzVmb+f3xVBodsmnLsg0OZBSHkFEWQQZtX4ajEml01rkGNRS6XFy/cQBX b+7HlVuDuHhzAPceT+Hb7z/HL3+S4tPv4S5/Ao99FV6C6ye4QYIb8q3BGyG3 HyFKbsWIkthKVpTURqKr0JfeQRbplZVfQ3bFafh2n0SgayxGbpLRh0Se6ZQS D1LZKTNIrYReSUZqs/x+ZFQ24FPHbsTZm2FQ5COL2ShbqUK2Qsi4WZCJFMgS KyHPMkGqsiKT5EpIbjqbvrG4Hr7wALWsD1aNBPKtv2J9DGW80DFTYq/yqDU6 SEit1EwTQxGQZJaySGsKV0RKEUQpxRCnlkAisSNe7EKS1IGULBfSmU7EVN5M rZcfe1GidqDAEoCqmN3QTG9XQsNjcUFXSmLLK1HVdhi7+sdoZo6huecQ6e3D jnZSO9WD1clurIx3rFO7eX14y+SxeQy0jeJQxxhOdE1gpmsK57tmMF3fiTEG gBOeKMY81ZgK1WLUHcRJXxCnwyHMVYVxvi6Ci00RXGmO4uquKK7tqsRicyUu 7Aihgol2h24z9pVvx6B1G0bsmzDlTMEh/SfoMm1ESzF9hVuEJlK8QygSvcOR gmZ7EvNiPB8/gaswjkd0C8ozfw1bJj/P3Ai/bBNCmZsRZVWxalgteXTfyi2x 0b5B2fa14ajKONSp6F/UVHjNdpK7EW3ij3Ekfyv2F25BI7+/Tr4ZDmlqbIev grRUhA3ZcOakwMEqFm9EEVdGofgTGEUf0/0O4sXbe3j+5i4+WX9z4NnT38JF mXWTVjdp9ZFWP2kNktSQn0VaQ2Q1TI0NkdRQ5P+j6z3D4rzXNM/f5Z6d3pmd q7tntids9zl9dmf22p2+NsyGY/s4SyByKDIUUFQVOWeKUOQkchQ5i5xzRggQ CJBAAZRQtJIt2ZLlY5/u/rrPW2C3T+/uh4e3JKCA+v/+93PfVfU+r0Jvuny0 JSj+OrktR5T2HZJUMo6hZoLUxgnM/Y2cCTBgEWrAUjyDjeinvZCqMqRhbizh i4wqzKWPm5vr0Dn6ye/ugZuHJ04KpSovPFRqPB3VeEmpHeTfHuHyeenlEq5C Is6SldclgSsVq9O+OH9xGs9TH6AWWn0++4AAazNUQZE4hSbiLL3cSSh1Ekod xRPY20hIUwi1lf+zj5b0EYOrKk40NQtrdQY2avk9fcWW64zYuiYS7ZdAmHLe bbjQGqFcw1IqJoPQrBryGseo7pmnsmuaio4xytsHKGsTjW2qY6qvhgcLTUJs A2/uXzl5w+Tx9Rfs+Or513TWDAit44zUzzLfsCy0rrLdsMaWOOXpDCOTKUXM pJewlFfKeHou05l5LOYXsFpcwKXyArarC7hyLo+r9bnsSV3J0HEnWcdecRAF kuNKhdjKuC+oTfqcxgxfmhNVdIuudoZ/Tof/h0Lvx1TEWFCabE9Zsi1lBivK E06Lc/6YKKEqWimhNdFVdNRVXLHrF+RI5buJf3A/RZGHkO/5hWiuGRlu4qI9 z5DjfYYCXwuK/OR+dRaU6c9QoXqfgQDZOZGnKdOdokwCTYm3UCt6HKW8muFo R7jKTnyKG0atK6laF5K1zpIzVSyO9Z3s8D9laeENCXFHJAqhBiE0JUVKCE1N U2hMEz7/GWlCaKpUSsZ9Vi6+PTaT1uzceUdR701iS8eJF7v2hdbI6YB0zAJT MQ+TGCom/YzEz49TKjgji2utC8NRrcHOVYOzrZ5wJx+8VO64OXvjIeUl5e0k xlYg9RU51QiwnmIGPNXRhMedxV2asqWDNG2bSCzMpJ2cMsP31Idov/gQ/Wcf YucTgEuIAmYEzi4xuLgkYidgOtpGoLKLxtlBDKtIqJtzAu4CoYdIaGb1BOm1 0/gk1GGvz8TKPZkofRIRsam4RygXeMgjubyT/LZZagbXqOm/QHXfElU9s1R2 T1JxfpikivMklTVRVXmOzQGR0qVGnu+O/RM4OyrP0ytSOlg3x3T9KhfqL7HV sM1e4y6HbVeZycxixljBQk4VF4prWDpbzlx+CSvFpaxXlHK5tozdhlL2m0vY rzVyO8ebF6WhvG2P4Ul7PBNdeXQ3xtPfEsfOVjfFyvvdDSoB0ZFqaf6t8dZ0 xZjRHf4pnQHv0xD9OVWxArPhU4lokoTVp0xPi0WpxAgIkOmup8h2MyPf3Vzk 0ZxitcDvY065r/KWAkuyPMwETEvy/CQS6q0oCbCiLMiKUo+P6RUzPB5vTp1E xIogqcDTlOu/oFTkOl3uL1ixa/bWJHk7k6pzFTBdMGidSNA48uDOAT89S/v/ NQ/HEL9BcpwclYrZoLHmpkjtu5PX0P85Dx78nXzPWxaX31LX9IJ4Abqh5cV7 LF14y5/w8PHf/TwT6vjUfEvmLt/D2k6NrcoHOxdfSTcarPzCMFP8gPROG98A 6a8aHAReB3cvrCy1aB31xDp54e4iEDv74C3f5yOlcTl+tl/rpkbjHYhaEpom JE2cZ4jpdSw7KzccrLxxOONPgLk5IWa/Q2dxCju1P/YuwQKuqKc4UldXAw6i pir7GAE3TsBNwNXFgLtbMp4eyail36s1WVT071I5uEta1ZikwFyyJbUVSEc+ N7ojtS11mXMjm9QOr1M7uEpG/RzxZeME5w0RmttLcM55QjKbiEup5FyCuOrY ZmoiGri5cnRybs4nJwBfv3yNnuoB+mtnGa27yEL9Zdbrr7LbdJ2b7Te5230o CpvLnGTGpYJ6LpY3sFxay3xRJasV1WzUVrMtHvlKazW7Z6N5WBbGt21RvO2P 4l53Bjc6crgyXs3OprjArS62N7tMEBelOnNWqjhNjgZHyg321CfZ0JFkSY8o cV/S+wLa/y5g/d/EiqrGqE8To7wZ2e00maKgeaKghWpJcz7iHTSWVGgtqBQV rY+wpj7Rm1w/a/L1NpwNFHccLKU5RbtWAE6wpDHakkrlrP4wCypCzakIFpD9 v6DI9wsiveyl91sT7GxDskCcpHMmUSCuKzSevB72L3goACcmrh+PvZFKkUo7 HnuDUWBONw12SheU/xnGWPlc9AapkeuszD45PvdX9pQxFT/LM/hZW+Bu9glW ai1nJF5b+ARhIWppI2pqLwbbXtTTyUWDo3Uw4c4BRIq6ql10+Ljp0Ljr8fPQ o/XUofcSeEUpvQPEjLsHYO/ogUopBw+c7NxxtnHD2cKbWIuP0KtscPYW+C0F fOsggTJJrIREJdtoafPxAmXSMZTuKXh4SjtXSzv3MeKjSSc0qZ6qoav87owO s9M6tHZ6AuV3iRR7Uje+y7kxgXNsi5LuVaIKR4gp6COuoJvEgk5SClow5jeQ mNtAdHoZ3YZmegTOnpgm+hN6GUme4u7ivZMzJU4I/TVdZR30V08yWHuByXOX Wa7bZ7PpgL32Oxx2H3F/4D5X6iZZzK0WWW2RHNXKpXMtLJTWsVpTz6WGBjbP lXIlP4on9Um87k3l+YiQOVDOzf4ibvbmsd+RwfalTi5LzYwVy+opfP6vnE1z odjoQonRmdIMpVSUpNlTnWpDS9qnQtD7nHX6iCK735Jn+z7Zdr/D6H6GbE9L 8r2thChZaq01FXprqgKsqQ6SEpndmGkiT/6/INCOsyF2FAVYUif0jcRbycMi JEfbSMn3RVtREWlBefgZykNOUyoSnORrIy7w+D20SToXEoTQOD/llJeD35w8 F9DYeP3/Na8mPWmDDAE0S5nNpAys+VOy4o9H1WQJo5kiuhnCaXrUBq1VN07E 2oap/j6CVSpCnJxx8Q/HPiIVx6h07L2CcfQKReUZLJBK0hEonV39cbALxke8 Y5xbkOT3AHw9gvGTr9V6B6Hzlf/zDUSvkbTlF20aceXsKiVq6+yixsVJSVzu eNi74WstzcTJFjfZEM42WlFXAdUp0QSnyi4OZ8dEXJ2Vq3ynit81ip1IR+2b gY9fJhqdlH8mAUl1fHzKH+vT/gS6hxLqE0ygXzCF7QsC6w6pNXPEnR0hrmiY +KIBDEW9pBWdJ7OonZyzTeTk15KcXSQJvoHxpGbG4puYNvQyb5xmXmCdjRsX v/rNyfvh+dh0+IyvvnxBT9kAA1ULDNVsMlO7x4WGQy633uPa+YfcHviShyNP eTbxjMWcOi6UdLJe28Xl5vMsVDSxWtfCcn4610pSxANk83w4h8Phaq6N1HF9 pJobI2XcHCrken8WlyYr2NxoZ6Al4VhSFTkVaIsE2mIBtiTTiZIs8QtZjpRm 2lObIWFf9wUJ0q9zvAQq6fd1Lp/R5PghdQJypZvEJK2tyKEtlUG2VIfYUhtq S02YDVvzrcx0F1EYbE9RuAOlEqUGo2zok83wHhVx9vwr+WgrZUNZjICvnKun mOsQiWXiEzQSu3xUlgQpY7TEtM6ND/zNiSV4+PAthqQLAuw6Kf+/s2g2yE3c MM2iEYRzBd5/Ts5PE5cUhKPXyYhY5fHR2+ONYMu9gwOCHFVopb/bK8+GCr32 +njsPcW0ekWILxCpdPYXegOFROVKxaGm3hziHkOSZ5D0+gj8fCPQasLRa8PQ 60PRB0bhppP+LdLrIuVqOmpxc9fg4SopTNKZWuWKr7Oj9O5g3MQUu9qG4GQr 5lUlRtYuAWeVck1vMaNCrockKS+fLNNR7WVEKwkrSAyuzjYJM4twXN1i8POO IUYXTlxAMPH5LcSXTBJfPEFC8ZjcHsFQMoSxtJ+skm7yBKfC4maKztZizCtm xVjFfEqzENvEcmYva/nTXMyZZi1zitXkMb57+I3VLwH+DTcuXaOvbIKBylVG qneZO3eTi0132el8xI2+p9wdecnjia95MfOKzfJeLpT2sH6uTwDv40JNI4sZ qdyoyuWBwHJvuIKrQ/VcHW1lf7yJ/Yk6rk1UcX2sRIDOZWuyhI21NtbXWikU H/AehYLw33I2XQDOFH+Q5URxtqhutiM1+ZYUGz4jxtecKB8rotSigO4WFHjb UCf9vkN7hl7N5/Srf0eHzyfUi6rWhNtzLlLAj7Ll8mI728vtzPeVmM5H6RZf MJpuR2m8I2UJUokOUpLwEpT/s6E0TgywpL6SSHPTK3xqAdhTAPZxsaSqMP3k /N1/R3LSslC79o+jwUzkXiJbKidpk1ypvKQt8pVKVI6bFCRuyvGS/PsSeaLG ymSlHAE5O3adzMiVX0JcmmbEWRtqAtghwoidXhKQZxT2HpHYOAUJwCECcJgA HIGre6QkpCgxsEnE+sYToYlEq41Bp49GFxBtglcrBljlJXKqDsHNWwAVaXZT BwqAery8/FB7SmLz8MDLzQV35fN2Abjby/3bRAnEsTg5JOHinCJgGkWyU/By EX/gmIq/W6aE4UyxTZmkhuUSn1DKF24J2GkS5fdPICAkQdqMgSxDownghFKl JiRljZJWNkxW2SB5ZX0Ulp2nuLSdspJG6vMr2cwRm5nTyGpWGxsFA1wum+Fy yTSXi6bYzp9gK2OE7x+9tvwlxDbcvHRIf+kcAxWbjFZfY77+NuttD9nteSrq +ZJ74694Mv0tL+ff8HDoLstn21mvG2KmsJalzFz2z5Vwu6ecK/2NbA52sz3S xe5EB1cmW7k63cjeVC37k+VcGy/gUn8GF1ebWZXKE4DyRYnzxTIUiAIXZoki Z0tqy1HJ0YGi9DMYJUFFij1QII50NSPO1YJUTxsyfW0lcTlQH2pHT7gNw2Fn GBfwRr1/R6eY14EcDS25IaTY/m9km/1nZoMcGUtzpDLJkaJEUfokKUmHJcqT bGKoi5NsKUpQXgKRjRMjlkQSYZjnaVwFYkNuzgnA/w3NjVcE3tWTSTSXBOBN WaXL5Bh2yDVcEXivCqx7FEjJBjXs8S8pTN6Tuiq1K/+zI5+7bAI7T5Hp+HVy Yi/SWXP1Nyc548LaJeyCYrEPTRYVzsBWl4KtZyy2rlFYO4UJxBE4CrjOonau ypwetaQj9yR0PqkY9HEE6mPQBsajD45HFxJLankXzj7huGkicJdyE4V214Th qQkWHxCAj48WXx81vmoxvgro9oECcTieDjHYmovRtYzHySwBb5tUdM7ZBPsU EhZYTEREOeFxFQRHFxMQW4RfbAlpDdN8Jr+PbWAcTuGphMZ2kBpdR2Z4KQm5 AySKVqaUT5BZMU5uxRiFFSMUVwxSXtFLZUU7IyVN7BY1s1vcxmZhHztlk+zV rnC1ZomrVXPsl0+zVzTKbs4A3z/5+uT9tCck/4qF88v0Fy8xULbNWPVNFhqP WO98ImS+4ObIK44m3/Bk7jteLn3Ptxd+YOfcPCNxhSxklbBdJ/Gss4ELXV1c 7O1nfbiPzbEeLk+eZ2e6g93ZFnZn6rkyU8XVqSK53wTJ1MuN/C/U5PmSk+xI toCcIzYiV5Q4T5Q4L8eRXAE5N/WMeE8rIrytifSwINzptNgKK1LVtmRq7MnT O3BWmW0c5kh9tCPnYx0ZCHdkXPxvh8enpJ8Slbf7L9Sr/gv92v+Lvb4U2e4B ApJyar9smGRJiSmyaVIcBDJ7Cgy2FMaLZ440Izf4M9KSAinpGaF1ZZ2fziNe WbovEC+ZxioZRX3TTSOVrgrI+wLyddMwpXzDgWTpA7nPw/fkzuVDUcqBpLqz KTekrsvP3ZfPXZGft30MdMIaubHLdNRsn/wcO64+ekpB/xT2IeInwrKF7Gxs PBI54xiGtSoKO+cYHF2FFg/J/OoE8QFJePkZcPVOJ1qnTEyTnh5iQCuSHplV w7mhVVzFEbuLVHuIt3DXRcsxEi/p+d66UHx1AeJq/dBovbBxE+d9Sof1B+JZ PpWvMTOgcchA75lPoK6YwOAy9KElct9FeAfm4huSi5/IsTYyB21UNtXj26bT M2ontynoXCEsdwhNdAcGcbexkQ0kGHswVs6SLWTmV81SVDVFWfU4lTXDVNf2 iEXtYr+ym+vVXULyGHs1i9xs2uRG4wbX6y9ys3aJg6ppbpQOcdS79Mc027DY dYH+sxcYKLnCWM0hC80PWD//jCsDX3Mw9i1H09/xZOH3vFz5ke3qbS4b+ljP qORiVR1rHULt4AQr54dZ7h1idXiQtfF+NqZ62JzpYmu2ja25Rrbnarg8cZYL 7fHMLdQxt1jH4ECO2Egb0o1OZEiMyxBXnJmtHB1IF2dsCFVmpVgTLvFNOZ82 UjkRVTQ5xceODK3gHuAozle0NdyJ8ihnqmKdqIl3pi7OhbM+1qYzpus9P6Qn 4CMGIz+kPvD/ZPNiFxsXOznfnMq5Yn9B0EF6g0qwshOsbMmOOkNDSQiddQmc nxqm/dINWld/Ovvlr0hNnBWMV05Q3j0ZuHRT7ucWecqwJcNdQfWeYHskEEul HlGsVJpS96Tuyv/dljqUr7lJYco1+R5BWzEeCRcE6zke3//m16YfZ0/D4hpN KyLnAxeE7Dwhuwgrr1TM7aOwdIwxvc5q75Zkev+ci49kL78UPHXiYrVpaDwM 5OoiiAmJI8JYSt3IBvWjG7jrhX7/BDwClIrDMyAWr8Bo0etQ3Lz8cZUM6O7o gZOLHg+rKLytE/F1ykDjlYe3dx5evvmSAbNlB2Xjoc3Byz8H76AcfMNy8Is4 JlqTUETV2JaQvSVkbxFXIq64dJywvFF8DIMExPURH9slitFNbvUyhdWLlNQu UF43S1XjBDWNg+zXDnOjbpjD+kH2que43X5Nao9bbVc4bN3msHmDw4ZlDmsn uVnVx1db18/8MdgHa/foL1gVsPcE7DsstD5ivecFV4Zec3PiDUez37Pb/YDl jDlu5s/wuneD75ZvcrlpnLXOSTYHxM6MTrHcP8ri0DArY4OsTvWxNtPN+mwH 63PNXJo7x+pgLnM9RibnapmYr2VsoYbyAm/SEqSpGx1IzlSRIlCnZNjjH+pD uN4Zo86MMOW6bMrwadczxHvZkuIr4OscyQlyoiBMnHakM2WxLlTEu1CV6ExX WQS5yvg1r88pFVfdG/4JPVEf0hT9IZtr5wVsaSmrnaystLO41MrsfDNTYoxG J84xMlbNyHA5Q/1nOT8zQvuWgC0O4Ji0PxOdvocxaV7AXjeBnSG6nGUazHRP wL5PfvJDAVsZyvRY4H0iIEsZn7xHifGJ+JUS42OpR1IP5FP3f+a8UCRc8SMF SevC9wLrC0f8I9wbNC3vC+C3BPDL2AWXYBNQxCmJe2cclTPJDdh6pOCgVq5Y Ic5Wl457QDqeQRm4igmJEBdbIC48JrWSuLQq6gU29wADHoHJeAQZsFfHYCcO 3F4VhpscfbyjxHVH4R8cjm9wKO5eyXg6yyZwTsTDJREnlUHMTjou4pjdfCX+ 6bJlc2T/fGKxJjIbv5hsfBMKqRy7JICLr2pbELhHTHAniGlIqJhHnTxBQMIY yQmD5KYNUlA8R1nDBSpblqhpnaOtcVSkeVoAnuJ2q8DbdIl73XekbnH3/AG3 uq5z2KG8WiGANy9yqHx9bcc/gfvG6j36cgXuYoG79i7zrU9Y63nJ7vArbor/ uFB6jcnoQe7WrPBCtuLXqw/4YfsP/GH3D2y1jHOhc1i8xxTroxMsDI0yPzrM 4sQAy9O9rMx2cWGulZWpauZ7M5kYzGNopoZBUfEBgbu5T/JEosCdZElikqi0 lMbbQYK2cmqPMtfiFMkSBQ1qG3HTZ4hT22HQOGD0V5Ed7ER+uDjwaBdKRKnL El2oSXFla6WL8fNFJPh8Ro7uC9qipRI+YXG0iM318xJHT+C+0CFwt5ngnpxp ZGyqjpEJgXtU4B4SuOcE7m2Be2PjhLS/IFVWw5i0ImArU8eui2rfEtU+EtVW Rjl9SUGKMsbpuWmMU3HaC6H4JSXpLyk11Yv35MNz8SMl6U+lFO6VoWRHJsAV f1IovqQgScQ7YfLkRzrQuLApcF+XuiP1kOblp0QUDHHGrxAz11TOuCZj5ZmG rU86Dn4ZOOmzcFGmC4VkEZhWw6enxYGbeaOx9MTLXkOYKLWru3JpgTABNkqU WpRea8QnOB1NhFRMGrqYODmGS5z0FV8TjLv4Hg9VLJ5uytPJEvncZRN5ZQjc meJnjq87qcDtHZGFb1QWmthMfOLzqRhdE8DXSKkZJ1bgjiubIr58nvjKJRKr VgnJWSQoaZq0lHHZ3H2U1S5S1X6Rms4l1loXOGhb4nbHoij1Knc6b/Kg/xH3 +x9w1HePO723uNUtgHftcNipTDacEzXv58eXL3+6HMtPz9pdW75LT+ZF+ov2 GRX5nm19zEWR7+3hr+krfshq8WPZL1d5PHOD5xdf8Hbre77f/j0/7P6eH6/+ nmcr95lrahf5HmZtcpLZkRGmxiRPioTPjLcxMVDJeG8h451G+vpyOD9ZQ5dQ 3jFbTetcFfnnIoiKsxC9sEBl74CLo4M8pA4EuliQ62cuzdWaJCE8QW1FjBCe 6OdAaoB4mBCx5xEuFMSID4l3pTjRldnBMjaF8Mur55noL6bcoKczTsWS8XMG WlPpb02htyVFslx3S7JkuQWR75n5FibEO41NC+GyE0cmhPCRs3TOD9G+c52W jbVfnwSStIQp0hNFuSUWZiQdkJV0RE7SI1HuZ+KsfxoM9Urgfi30vhaKvxGm pTK+oSzjtRxfy/GVHL+Skg2Q/ky+7rGJ8rNiVQpTJFoaNsQmzfDk4eu/Nv1Y R64ePaRx/jJNizdpkgbStPSY5qVnlA/skdM0R0BmN0E5fQSmt2PpfxZ1Yj2R BT1En+2jcvgKxpoxPjTTYXMmAH9HHQFOGqI8/YgOkEgXlEpQZBaeUYW4RysD ejPwiRIrEh0rKhwpFYI2Wou/zh13FzHoJtBFxaVrqNzScPZKx9VXYNcfX7vS MzQTtcRcn+gMfGMzSBDDXDZ8gfKRFWKLhogRixJbNktcxRJxAnlitSTv2ksY ytYJSVsgPXuWkuwRKipn6Oxc5Ub7mij1Gne7L3KrY4eHQy94NPScR8NPuT/0 mDuDR9zqv8Vh3zUOey9LrXDYPcbr69fNf/lyijVdqRfpK9xnuPoO0y2PuNDz lK3hFyx0vWJy6A/c2njLs4vf8vXGG77desvbnbe8233L769+x/dS7/besj+x zmhTAxNtUu3n6GmuoretjL7OIvrbs+lpS6ZppIbG8WrqJ6upnaqiarKSqoXz +MdEYWVph62NvciLA54qFYnCc67GggK9NTn+NsQK41FelsRpHSUqOZEW6kxW pIv4VeE7yY3JvlLWlzqE8U62RKV7m1Kl36uolO+dSjxNqcTHMoOKsmSV3Hak JMnB9JxIXaGe3t48RmfFokwL45NlDIwW0L53l7bda+w/e/qrn04CXryFUSxE euIWGYnXpe4I5w+F86ci4i9FxF8J498Is2+E3bfC8DvZTqUZ78TdlGW+k/ru pN5KfSufUXh/ecK6oujKfFRR85TLsmcWWV++/Uecz23TtCCci4NpWnwi9Zzy /n1yGufJbVkhT3jI77xEwfktinq3KR3YoXzoClWjVwlKbeBjq1DOWIWgV0cQ GRhFfEQk8WliqWNycYsQpxEpzibKiFe0ci1wAz5x8Wjio/GLD8MvTk9UsCMa V3/TOyqUd1aonJNEzLNw8jKaBrW76o6vGOcRmmG6doQ6Wu5PxDy9eYSSwUUy GseJEc6jSyaIETGPrVgRzteE80ukntsiSxknW7NFfPE6GWeXKCscZymhhZvn L3Nb+L3bt8W9vsc8Hn0t9TWPRl9yf/QZd0cec2v4iMOhA6mrUuJaBmfl+1r/ iPPfcENaYE/OHgMVt5loesDS+cdcGvySqxPPOJh9wdHSVzxZ/ZoXG6/4eus1 32y/5s3uN3x3RerqN7yV+vbKa77efcXmxAWm+/ro7aiis62UpuY8mloyqG5J p6S/iqLBKgoGK6lYmqd6XZk0XnflCf+ztOBzuNir8HVxIcjTjTAvd7LUZ0TP rcgPsCUr0IYYbwtiNKLrwnmycJ4mnBeKS5noKzG5orXFdiYHSsiJcZDM6MTZ RCn5/ilxRJ2J5lQK45UpjnJ0pCLZQXi3P37uT6oi14uRuUqGpkvpHc2nff82 rVeu8tX33/OrEyt+YfGOgL7y8ziszMQjspOeiFt5Qb5AXpD6rYD+HUXG738x CuvH94TqH2WflGf9IPV7yrK+N/FeqrCe+Uq+7IV8+RP5tvvC+oHchcTOlAts SJv9GfR7AvqMgD53ICWgzwvo8y+OQW9YILf5H0EvVEDvE9AHdykXMa8U0GvG 9/jILkLsewSBgfGERsbgHx5FiaQpt/BMPBRBjxYxjknHKzbNNLTBJ1FEPTEW TVIEfokBRIY4kuZnhsY9BGeXZBxVSZJN83H0SMXJR4RdJy4m0IhbqBH3CCMe IuiuMXmc7ZujqH+OdLHL0UXDRJVOE12+SHTlKrFVG8TXXia1XiJ781XyO/Yp 6r4mruYSTbGTbIWf55ahg8M6yZM9t3g8/o4n42/5cuJbHk+85sHES+6OP+XW 2CMOx+5wOC4OZlxEfUzs+WDPH4H+57x88B2dqVfpLbnFUP0Rc533udj/kJ2x x1yf+ZI7C894sPKcJ2sveH7pJV9dfsmrna94vaucQfCNfPxXcvslL3de8GxH WsqOckbwQ25dPmRtaYGh4VY2bt5i5/E7dr+UevruPXafveM/syMfn3//D6Zf 5M6hNG7lEpnurvgL68qbKrN8rMjR25AXakd6oBWZwdbkRthQGGNLW0UcM2ON LEw1SwJoYaznLJkxKnLiJI4qw5KTRMMjbRmKteC8wZLqVJWUI1XCunISYUWq PWUpdpSk2XHWYEVlrhsDM8V0XRyjbf+Alt2dX5+8g+DCwl2M8aukJ4hfSTie xJWdpEwW/EoQ/0YQfyt8vqMo/QeKM34Udv8gDP+d8CyV9XfCt1J/kNs/HHOe 9VY+/4183Vfy9U/l+x4K5+LOjXsUpF1kY+XoZ8ZffvuWxilhfEYYn70vnJ8w Lo06p/6E8bYTxrsvE5I/QFh+L5GFfSKgfRL3+lCHl2LuHos2MhH38DgCc87R ML1LUmUPHlHZeEhM9IwT3hOMYnpE0A0i6Mnx+CZHojEEEaakeK0ZabrT0nKV S4rn4uJ7FhdN7nHc1abiHCCsh4i4izt3jsohvKiJ/J4pCvumSGsYJrJolMjS WSLLlomqWCeqSsT73C4pjfKYtl0jt0uid891+s/v05ezRkf0HFtJI9yLaeZ+ qzA++QNfTn3Pk6nveDz1LQ+mXnF36gWHk19yOH2fQ3l8Dmckhk5fEM4HzX/5 Nrs/Z7r2Fl15h/RU32O85YilniM2hh9wZfIhN+YfcXv5Cfcvfsnj9ac83XzK 88vPeLH9jJdS78mtp/wpT4Xrx7uPub8rbO/c49rlG+xuXGb/yu7J6Yz/0TSm tqemlBQPS4x+1mQE2ZIWZE1ZehjVuZEMddcyNlDH1EgD8xONDHbmi2Dbk6GA G6+iUMAtFnCLwmzojrJgOvETagTcmjSlHKk2OlBltKc83Y4yo40QpDyn/YXp JfrWy+u07t9g/8WLX588nW2afhO/Rnr83vFwr4RHAu5zAfdr05jCgjRlTOHv BUAF2r8T/5H59yLMWf8gwlyW9ff/BNx3lGZ9S4mIc3GGpM8MMSHpdzibvk+B cZ2NC/dPesJf0jCxRdOUuI9p5fr2AuzcC8p698muE2CbVgjK7sctsoYzEu+s fDKx9cvGQZ8tEGXjGpSNnVMSOVEFZOSWUz+z+5582OFD6qe3cRVNdo8VZuMl ESaJeUgWXU5Jxjs1Hp/UKHxSAokJtCVFZ4bB9xQBDjY4OEhiVRfjpC1FpS/C RhKlMlDSPiALB0mw6sQSsjomyTk/SV7vJMkNQ0QVTRBeMk9E2SoRFZeIrNom tu4qhuZrpHfcIPv8AV2d17kk3G73HrDUtEdb0jKbmbM8NHbzpHaLJzM/Sv1e It93PJj5lrszX3M4+4zD+YccLtyW2pPbFzmcGvkpTX528pLwrDjrjpK79Isg T3UcSSo84tLYEbvyiF5fuM+t5QfcXX3I/fVHPLr0iMebj3iyJUepR9sPebAr nzddofYeezu32d68xvXrh39+Ym4Ol6fZGWnlynQbe4sdDLVU0d1YSX9HDcO9 55gYqhNxrSc93JrUKMdjPuNO+ExUzLETjaEWTCWdoinZmtp04TNd+MwQPjPF OGTaUp4pfEoVJHxOYsBnpBSX0nz12smT078+Gc2kjMnZJyP+l3C+Ij/1jcD5 TuD84RezDf9eAPwHE54ZcY/le55Sni0Km/2PyloqylqSKakx84UA+pizGeKS M65RkL4hgB6dAOpAw+glGidu0DQpMXDmsUD6XCzy18QVDknnr+a0ayrmHulY qjOwFVoctKJqAqhroJAXnI2bQxzZEvGi4jNNz0ek1vQLo5epm94ir2NKOrxQ mihlEFVNMeKZmozamCAVhVdqKImipgZR0zCnz6Q+NV0VztMzDUfvEhx1pbIZ irD0ycBaK+UvP6e0m/TWSTLFmWT1TJJQN0h44QQRxcuEla4RVrFFeNUu0fX7 JLbcJKX9QIL6DVbab7LefchW3yG7/XfYaP2SkZJ91gtXeFw4wsuySR7P/Z5H c++4P/eGO/OvuLUoqrr8mMMVcQ4r+3J7TQzv2E+EHp+69G9pTD+kvfyI/qYj JrtEUiVBro8fsT1zxN78kfhncdnykN9eO+LO+hF3L8lxS/69fcTNnSP2pbZ3 7rKxdcji6g7fvnnLT3h+/+orNvta2R5vY3euQ+63mY7aCnpaqhk4X8NIfy1l ad4khdiQHOlIuuCZLX0/39T3nSlNdqYiwILxpDN0p1pQk+kkJXhmSe/PFjyz Bc9sG4qzJC8Knj42FnhZmrF++fLPeB5Pcbp4gudd0U9lMOKL48GIJ3gqQ3Ry k7+Rr3kgonOZ+KBLJEolS6UES1KRY2rgBsn+m7J9HvwxnpmCZ+ZdCjMVPNdY /xnP/5art5/TOHqNJjFvTVOPBM9n0hxvYuVXxCmnZNNTchaeRmy807H3zUCl U67unol7UKaYzlQCvdNITcxBE5Up7ctPLOfvCM9t4Nz0htS6CN0YznEnV3lP E1NqTMYzPUEqGp8EPTHK+A63zwkRNEOcPiFW406snzsa7yjsfIux15di61+E uSaD0PxuDPUTJLdMkioiauyeJL1vksD8YUIlmYUVXyKkfJvQ6qtE1F0nrX6P 1vqrTLdcZ7HzJqs9ByKiwsvwW+5M/sjR9I+MVOyxUr7Ko8pJXtXP8GBI2u6C 4Ln0WpAUPFefcHjxrtQ1ub3Oo91N81+eLPpvmDz/lNbKI3qbjxg7L6Z24IgL op8bU0fHYxYWhVJ5xPeFzn0hc2/rZNSC1LrUyuYddm88+DcnMzWuz8+wOdTG 9lQHVxY6mempp6Ouku62atprs0gLtiBeYEyKkDQQpSIr1onceGcKBcYSgbE0 xp6BBEsGUk9TJb26MlsCV46Y0BwxoTm2FEsVCIwhyvn/dhbopWrTU3/z0xNm MavC4p5wdkc4fESWQRnQ+Yrk1OdExj/AK2gDW80U9n5TqDTTOEu5+kyj9Vsm XLdMVvA62UHrkhfXyAy4iFG/hjHkKkVZLzibJRxm3REO98nPuMiTR9/+pJIv X39Pw9AejSO3RC0fUNhxFfvACqw1ZzntZMBcMLQSDG2VCZSadJwk1LsGZIhC ZuDomUJYcA6xooIKgMpVkbVxShmJyD9H7cwqNbMXyO4Zxl68p5NB8lKKAafU JKl4vPzd0Ks+I0D1KYHK1Y8lDkQJhlGC4fHlT93w9ovGSl9MVtcVUhqWiaud IL5xgoS2SZK6JjFIL9fnDKLPm0ZfsIi+aFWy1jrlpdt0Vl1hUHCcajxkoeUO a52PuTbyPQfj33N78nvuTn/P/dl3oqC3ma+5yPWaff5+Yp8nF55xR2L/oaSh w3VRyQ3BcENU8uI6rx/d/0klT508l7976Q311Ue0i+kc6D5iQlRyTlRy6aeB CaKS6xel1o+HJqwIi/NSU2t3ufvk9V+eiNH1pVkujbSzNd1p4q+/qZb2+mqq ciIxBFoQG2hNfJiKlEiViKET2cJefpJyeQNnCiQEtcVZMWb8XERPRXmuitJc B0pyJeTn2JGfbYch2sL0nuBAlTUGDwfiXe1O3tzz17QoE2ijr0ivVqY3PSTR 8ABN7D5OIevYaCexl1LpJnGRcpfbnlJefpN4+0r5TOKjniTIe4ZU3RJ5gRfI DVwhO2BReuAquSm3KMy+LexfITdj5UR8/0cmVu7SMHhIQdMlgfosDv5lWHnl Yu4iwueqXPkgDTuhThk35qw8lRQoTjAkAxfpoXGxuYQnnhAXn45OUo0+MQ2t IYPgglqq5halFqhcmMWnQITMIARL4rFJiMHH4TM0pmuRSinU+boTpnF/j1A/ N/4n+ejKzPjxZUmff/sPbN9/x8WD52T0bRMh4EW2ThAlLTqxdBBj8gjGlDka Uy7QlLlFa8FVzpdeZ6jqgOlGWe3ur9gZfMPe6FtuSHg/nBL9m3nDvdk3HM1/ y9Xhl6yM/sAPD34Qd/eM2+sC3KWnHG6KeRR1OtwU6NY3+OHttyfMnT55RubZ 0z+wc+UNtcJcmzDXO3TEkDA3JsxNSmeeXDoeazAi+jewco+lK0/4+s2P/+6E tWvLs6yPdrAprO0udomEniNZa0GCzoJInSUxwQ4kRjiRGu0kPsyZHOEsz3Rp A2eqoqwYSjenWnxfkXB2NteRQuEsT3QuOd7G9I7sEBdbUtUqkr0cJeTb8+DW zZN1/wtW5h6Lfu6YBjBpkrdwitzARj8rnI3joBsX9z6Oq34CD71yMZ0JfHQT +Gon8POT8p14D633BP8CP89x4vxmKAhdJC9knqygORL1c7I1JChn7cqOe3Ly I/8TL1/9QEPfTbQR9dJL8+XHFAtqOVh7ZWHhYhDUUgW1tGPU/I24BRlFY5Px 02ZiMEiPFcz84o3HmCVJKUOAUlLwNeaR1TdIuWBWvjhN2dIkpctjhDZUCtLu uNt/iqfjp3gJaho3K/x93KRX+/u68ic/X/r2+Nyl42V58+Zrjh7c4MbOHjXh XdRFjVOXtERH3jW6Sm7TVyXK0voVK12vWO99xeXB11wZfc3++GtuTknfnHnF 7VkJzfNfc2/hK66tvOLg0tfizZ5x65KEaEkOh5clSF+WYLK1z6ObN0+GOZ0c /msuXX3Dzk1B9tYbKiSQVI9IGLl/PEbgyr1v/uqkW+2tzLE62snGdBeXF86T HiCN0c9KJNuKKL01caEqkqKcSY1zIT3JhSyBJ8coEEmg6E6zpD7LklxxaTki TOmZ1kQGWeBn9QkhNh+T4GJBnNMZEtzkPr3sWRzu/c3JxKmY6Iu4JC/gmrSK Q/CyeOcxSXmjwswoLvox3IUdtZSPlJ+wpJXSSfkLW/4/Hf3G0fuMEeI7RmHE LPnhU6KvMyT6j5ISNXNyBs9/pK1nCzuXTOzV+dhLN7TyzMbWJxcrtxRs3JMF mFQBJg0n/zTcgkWn1MmEhWUTIxqkkQ6oFVi0SWknE6NS0Kel4JduJKiklNKl KalJSpYnKFoepeViL/cOO6U6mJkooKUpj9GRQW7fPvyzk/f5LDfu0pe2SX/2 NfqLJDVWPWKk/ilTrc9Y6HzOau8LNgZesj3ykivjL9mffMmNmZem57EP559z a0n05cJTbq2Lr7okTe2yaMy2sLBzT+o2B8LDD+/eneAQctIYvvvma5ZEKFZl nQ3+tqSH2JMk0TtEJ+ssDSk23JEEWePkRBfSUlyIy/UnPt0PQ04gyXk6AtOC RKQDsPcON13T1t/FkzBHG2JtPybC+iPCrD4k2OJ9uqsKTnbrX/Piux/IH9k2 jUtxil7AUjOCrXZEdu0ITvoR3GSxvWSxffzH0UhppfSB4wQEjxMYImU6jslR KnCUAP0wIdohCqImJE1Mkxg4zFJ9Mz++ennSAH9DWWYKtg5G7NzysPc5i400 IlvvXLE8cvQUdVCn4OCXIoudimuw8lpeCrFx2YRI09HEpeGnNJ9kZdygLLRR Kt2Ab2Y67sZ00ga7ZZEnOSuLXbA4xPrVLm4fdHLroJ0b11v51ydwf/3gW7qT 1uhN36O38Ba9FZK8zj1irPkxMx1PWOz+ktWBp1wafsr22FN2J56yN/0l12a/ 5PrCE26sPObmxUfcvPSA61v3uaGksN0jDnbviqLcErju/vRGu7CTh/rBvRtE +MlyBNhiCLXHGOlAQpgdUaG2hMW44J8Vii5TKkWPJkJNcKgXESEueKmVs3C8 j2dvOqrxcA3CxSMOZ5dY/OzdibT+nSztB9Qlh7LR12wKe786+Zl1F65Qv3ad wJJVrAMGxWmOYOc3Kpl4TPbwuOzhCdT+k/gGTOEXNIUuZAr/sCkCI8RjRE4Q HDlOcNSY3B4lKGKEwLBhdIGDhOj7SAqdoiy1h7vjjTy+OPnz8gaL19E6e2Hr mI2dx1lZzkJsZYkdfHPF0eYKnqmy1Cmo/FMk/CThK34jITkTdWwqPvHKREnZ uyL4WllabboyUCoZr2zJ/ukZRDTVU7A0Qd7SGKtXuzmQpb15s4P9a2388MNX J5dA+feyvO/oSt6lO+eQ7pK7dItlHGy8z3jbA2a6HrLU95DVwYdsjDxia/wR O9MPuTL3gKtLD9hbvc9VsY9XN6Ukuuwp4XpXqbvsbN346Srv4ScPcZCTg2mo bZiPI+HBdoTHuOKX5I86MQSPcI20VzexcR54+HjiofIjThn75+KFj7M3Gicp lTd+sqx+Dmq8XMJxc4nB0UFyo7UzzWmh7A23stvfwuHiFH910rvG92/TcDKS sHh8Aa/UAWx8JrCTzOKonRbrOCMtfRbvwDl8Q+bQhs3jHzlPQPQcQTFScbME x89ITUnJMsfJEseM4B8xJCj0Shbv48Fiixj2Ju6NN/D69pWTt7b8jZB9U5bY nhBXR3TOPrLM+di4FWLpmskZ1xQs3KXHq8X+qRMkQyXKjk4iJCyTwMR0vOJS TdfuVK6NrkmVSleGLaXgnZWOpyyxa0YGYbLE2Qvj4qJ62L/RJSVS/WDu354E 0ZnqG3Sk3aCz4A6d5ffoPicrq4TSjiNmxJwtSB9dkT56cULC6cwRmxIKtsSc XZZQsCWBYGvLNP/vPbZlWf+Ezcu3ePfuB9OdW/xyYX9FoKMsrJNK/JUz/mpf 08xcxxDpR86+2MriOUg5u3jj5uqNq62WWE8dYe6ykPL/WimdLK5eSqdSSxaQ xfWMxd01BgeHKAmg+RxOtnJjrIX9wWbuLk79h5PH9+V3EhIv7Jqm+DWuHZDR 3kV2Ry/eiZPY+cxLG1yQ9V3EI3AJ75BlNOEraKNW0MeuEBC/TFDiMsHiY0Kk dYckzxNskLU2TMv/T6CPGyYgrofi0noeXmiVNW7m/kwjt8frfnptZmqgV/5i e0JleV08dJjZ+/OJYyYfu5fxiWcJpz2zZDcbZDcr16lLlFyaSpSIszragKuU R3wK6uQ0vNNkmdNluTPF4mVl45qZhWNKOvaSS2d3eti51sX2tQ6ef3Vd9uvx 09x70jpbMg5pLbpHW+URXfVH9LWKse4Sk913xOzwEYuyrsuzR1xYlMAn67q6 JrWhzHKUCCC7dW37+MmGt+9+tPrlespf1t9vmtql9fTGLlw0KDgZSydfbGSN lNN6VbKWrq4+oq8+uNj7EeHmL5tV1k/WVy/l7ybl7k2Au3KUdVYHovaJQeUW RWFhJ01l7RI4WjiYaObGcDNH4jv+/YkmTuwd0LB6hcaLN6me3yWrvY+c9mHy 2scIy54VPVzFxX9Vkv5F1OFr+EavSbJfQ5+wRoBhjaCUi6ZrygSnXSDYuCLH JYLSFsTvzGIoGqKisYPSmkameht4sNJimt5xNFvPH759cfLK1694/t0fqGjt xUyXyGc+0Xwuv/sXqgBO2/rxuXUMH6pK+MijnI98KzilLeGUTx5e2gyiDcr7 0pJwiUzEJTYR1/hEPESfPYxi4NNzUKVlYZ8sWTEinBCHD1i72snTr24ca9W/ 5sWjH6jLlD+/9B5NNZKgZLN2d0pSkgUdkQWdkAWdko06Iws6Kws6Kxt1VhZ0 TknuIsHbN5+dXEXrZCX/wnRtdI2bFzah4gwjJG3qorGUHWbalbKKzrKC7lJe rr4iub4EuASRrPHD38MXfy/f9wj09pEPPt78SwJ8vPD1j0EXlkZpZSdFxZ00 V7Ryd66FW5PNHAyLBC5OHsvPf8/Lt+9oWNkkf2CB2HODhBa3459ZQ2BWgyzm NAUds6SWL0hQXsM1dBPPyE18YjfxS9hEZ9jEP3WLAHGWgemXCMrYkJLFzVgl unCJguZJqs8PUdnWTXljC+0d9Ty4KLt0RXbpUgPfPrjy352s5QtZy9H9R9Rc OEBfWMspvyhOa6I5Za/htKUXZ6zUWEtZWvljYRvNp65n+UxdxMdexVgH1uAW VYx7WIqU7NiIJFxjxHbFpGAdY8Q6IROnsEjCpGnFupsT52n5NydJeGfjG6rK 71ItG7O+7YjWniM6B4/oGRP3JGl4QNLwoKThIVnHoVXZjNee8813f2f7y+X7 jWmgrm96MbbyC9hHGjnt4IWldEFbEVZHFw0urlrZhDrUbnp8PfSS6EIx6IKI 0mgI1OgJ0mql/AjSyb91vlLe+ATHklN6jor6LsqqOykuaaelQpZuvpk7k00c DjXy4+uXJ/Mr/gfu3DogrfAs1sFx2IamYR+Wg21gtukFAlu1IOWWjE9cLVH5 5ynvvUDV4CqJZZskV21KZ99Fk7KLR8IOuowd9JnbZDUql0JYo2lsiYaROeoG p4jJl+/PKcfaN1wSsI74IE+as0NpygzmzaMr/IcT2Rvbf0jt6gFl81sY2jsI r6jFTCsL6uCLmZWymF5YyWLaWqtNQy2cpFyl7JTRauYxuPjmccaviC8Cq+Vv KXgPVUQWf4q/PFy+3r7E2p8iVeMi5Wy6TkBjfurPkxOUYXZbe28YmHtGuXTP alnMc6NH1MmmvPbgjWmoncMfr9743i2hf05+kjLOKx4zBx9ZPT9ZPT2Ozv6y eoF4uAWh9gjCVx2Mp1sECf6RxAQGEagPIihAKjCAoCB/AoN0BIQEEJKSRW1n D9Vt50XKuiiv6aC4uIXLIyJjc03cnVAs5sTxxQT+hJ2Hr/lbKmcPqJo5YESC 9u7Ra3buviYnNRmdmDGVVo99sHSnkExUoflY2YdjYxWGnXUkDnai2Y7in53j CYipILdllnNjl6if2BRf3MUpqwbsbBtxdG3hbMcKLdPrtExd5GynRB1jgeyZ GNyDgnEPjpSSh98/EE+VNVqzD/A7/T6+n/+W0rQ007nOf/kz8j8wdu2haQa/ Usmd7aR1dmKUspClNrPyMC2zpSyzjbX0IyknKVcpdymH02p8LfXEqQPwsfXG 10aQt9KS6GhLptNnZDh9SrzdJ0RLpI91+IJUP2eS/VQsjfVh+GUM+U9cefRU /MWO+Mc94s71cUYvaygCaeHobzp71fFkGrCHRxhqSZK+vhF4eEUT6R9PSmiI JL1wgkLCCAoNJSgsWCJBINGZOTT0D1HfO0BtV6+sY7esYydh8XmEhGfgLg+L +xdSn/2WnLgoJgb6uSMPz/EVaf8Pk5yNXH1I9coBNcsH1EqdWzqgblFq/oD6 uQNyG8ewPGWOtZTNqTNYaEJQBSXjFJyNyiMZG8tQedgiUdnG4OwYj4tzIu7i RT29JD5oM0Vdp8isX+FjqwmsrGdFXeZQ+80RmjpK66zs7MoWkcJ48eyxeIZH oQ4NE38ViE+QFq9g4VVtR5jlhwSavY//qd8S7iie38GR6d7+4z/jv+Lu/X3u /VRH+9y9sy977HiTKwScW71GnTLvXgjIHhjG2NVBRlcnmUKBW0waZyw9hAAv k3Lbyao7yio7y2q72YkrkW3maOYtviyQULXuPckOPrIf/EQ3NYpZsXcl0/Uz 0pw/JdruY6JtPyLe7QwGgeDhnYM/YuBvqV/aEAYUO3KDElEs15hcznjEYO4Q jLVTOA6ukWL+onBXR6P2jZaIFiOPVQz+OgMpkbGma2cHRkQRGBlBQGS4+M9o itt6aBoep2FghNy6Nknq2eL/o8Ushos2BOFmLbHw9AdohQO9+SeEiLVWBlkE yOOobBXlNxtVlFBamqKG70l4PeAj+T0PaBQeGoWHRuEhv3kMGzMzbM3MsTtt jqOwcMo9GHOveGxUcTg5JWFnGY6jwoFDPK4uScJBMp5qZZSPmFKtEV+9UazW EJ+Y74hZuEOA/xGRQVckJwkP2aV4Rgk3UUl4RcXjHRmDT0QEvuGhaML88Q31 I1RjT7LzR4Se+YAQ898eD0N3ciRK/pbSxAQePtpnbqnF9D7upcVWLsy3sjon NSO3p1pZGW9hcbSFR7f3+e71VycjkkRbr0lfPRkzXzSxQHpXO5kCiQJIdkcX gZlFWFh6SjfwFpnwFZnyRWUnHdPBD3fRYBd7H+kOOqL9giSyaPATw6NVyt3H ZGN9nfQkuVmT6a7MZP7YNEk80u4DYr2sST5GJNR0KObKgyc0LG3SeGGfptVD 8nsmyWkbJCirHnPnGJH8KOzcYnHyisPNNx5PnTxUAfH4Bsfj4xlPbngEkYKF f3Qc+uhYYrNzaJ2ao2VilubxaQwl1bgFKZMb5FfX6vDQhuDuE2KaWxIkShok khEkqETLQxslqEQoqNgKQrLtz10UWZA9VC/HBqkmwaVJMGkW+WgWVFoEE60u GDtBxF5KZXYGl9NnMHMLEcwTMTePxMpSGbATZxqw4yrIuLmnCCKSVzRGfHTp aAIy8PZMwMsqEwuXZ3iGfoNnxGtCEl6SH16Ezj8WL3FNXjHJeMckiWOPRxMd jV+UbIfIQLQRGsJ1jqS5fUyM7QfEOJiR4Cp/i/KqkMUnaE+9T3lGKGsSwy6t tLK13Mb2Yhs7C1JzUoLKtqCyNS6fH21lfbCFG8vTvHv1lWmFlJHZZ88PE13X TXR9rwmZ9M5jXLI6lcjYLQmjl7y2Pixt/bG21GJroxfToFydQNq0tGoPtwAc HXRoXEOJCw7Fz1uH1keLzscPnTgHvdoHvacatWsYSe6W8rt/LPU7EZsP2Rxo /GNkSpjYvUbD8o4gc0OW4w6ZzX3kto6S1zpJUuUAHmFFWLrH4+CtzB+QXelv wEsU3DssGQ/vBLJDokiIiUQTk0jGuTbaZ5dpm1mibXqR4BTlEvEheARJsw3w R+3vh7dWjbevGg8fPQnKBRwEmzDBJkYe4jgXlSi0PW6iEC7SMQIEr+q5VcpG hqkYHqZqaJhqkeDqfrndO0ysIQkHczMpURRzC5zNrHAzs8Zc/vQzyhlpZwR5 iwQxEQmoHCQEuSYfz2LyTcdblyHqKKrilkicWzw5ERlkF89iHvIdttFvcIq7 SUhwGkkBUQRJ1PCOS8U3Nhk/5WrGsXHoYiOlQtDF6IgMVJHu+QlJTr8jXmVO uO1nBFl8IMi8T6D5+wSc/i1j7XlcvdDGviBzfUlKkLkhyNyYkdtTbVybaGVv rJUrw60MV+QS5anCw8oMtZcnNuHK2OAUqTSsgpMw18fiGptJXGWT4NJPrmzx gtZhUgqbpA35Y2sXhL0qWLaluAJ3efw9Q6R7BhKiVS6GG46fn6CuDUAvhksv vlyvlYilEaXxDsbf00e27cdECDLKmbr3JkyB1PBLatypn18Tbb9K08ohNdN7 ZDUNkds8Tn7bNIWd8xR3L5NeP05EbjPa5Eoc/VMkjqbiHp5mumBZaXQOyWLB ilt66VhYo2P+Iu2y0iHGHLzCoqQipJeH4h0sflQ8p6+/Bo3OS+jxI8zD1kRO 1Jn3ibM3Ew23x9vCHF87M3QenxOgXG0h0onSlkIqmgupaiykpl7qXCHVNYWE SMcNdP4cjXy9l5UFLmfs8LCwx9wlHAvpPRaWCVhaizexTcbeThGZNDy904WW TBGbNPzcjcQF5pKRWEhSSq6IZTYlAys0L+wSkluDbVA22vBMwsVrB2njRVgM kiwN6BIS0CfGSIWhj1fODlCRqf6UZJePiLD5UHpnuHz8M8KsPzRdACdM/r5s vYqbQs2BUHNLqLkt1NwWau7MylHIuSXkzNTlkeirek/M2gdiFT0/+0CCRRAO 4Uk4RqSaxv1b6eOw1slGkA1sq01GHS2/elkXZ1vHKZGNHp5Yjq2DMj8iHJV7 BC5eEWLPQlE5RRMVlog+UKD5f+h6z+A272zN81ee2Z2ZumF2amtmdmpDzXyZ ujM14YZut9u2ssRMAAwgQBKZmQTAiEAwgDlHMeecxEyKClTO0bKSJVHBkpVs d9vt231v71Ttpz0vSPd13639cPRCBEngPef5P+d5iPc9f1sG5iQBfFKq/D8Z a5KAR8piMtvQJaaSFHWQNPVHPBPp/3Sjh1eXl/gj1FjoOX6Z4qHTZLdvYild xuJbEF+9SopvjZSidXJqjlPcsUnbwnk6li/SvXqJ3qOX6T92mWhLARH79KSF x5Ko0mPPzGP05EV87f3E23OJzxK1I+omUVqYMSMDU1oK5hQr5mTppFYtWQnh lEims4MFOWF7sAq1pybsJcu2V1TyXrKt+8iz7KPYEUXfQB0DfXUM9tYz2F1P rTuZfO0enOq9ZMjPZgYrsRejqCONyhRATVBIAcHhhYSpS4iIFIUb4yNWuCYu plBep4w8ex25rjpScytIyikjKddPqbSB2qmN7T0R8/xEZ5cTmVaDNb2cjGQX yZn5WITjrJ4cbJ5MbC4bjnQ1ZQrCQ/+SFE2weO1Ygs3ZhIjSU5RbeKKDEJ2D 7IoOSlvG6OwZZWF0hEvzwx/w9PgQf8HJvir0Ioj1Qr16EXeJez9EF7SXYEMS YZYsNMrfTIXmQ8VQhIWYiAi2ioWVrhMtnVfvxdc8TePwBi2jx3B4DxMZ60Sl F+GmTCcXIWqLz8Yp3TUx2YlR1IJZPJc5LRNLWrpECpZUq6gO8WCiCmK1cZwZ q+TZZj/PTvaIcezcAU1q4JDMmze/pmv8GEllY6RVzpNVuU6WfxW7e4GczEkK UsfxZEzhs89Q5JyjsGCR2q5TdK9foW/jqtDSAnvEdakPmnHEmXBq9aQYEmme WSde5GKCs0DWg+gfRy5GRzamLHm3mRlYxCJZ0oUcU/Uk2nT4tR/jEumVFfsp 2Ul7yEnZS17KPtzJ+ylMPkCx7QAllv30NHmY6G9ksk+it5E2byq5oSLdDkrR DuwiRyJ3v8S+XZhDYgkSHRMU6iI00keY8mlqbAmRkW7i1YVkWivJz60XS1aD xVGGVQFOXhnJ+aVYvTUkK3sF5ynXrAs15SvX8PqJslcJ5VSQmemREC3ny5XI EhDZKDPuIdUSRajVQZhUIFxCJe5UZc1GI3ZBY3ISZXCQ4a6lqn2MqlYJ4YnK +jH6OsaYaa36JyQe+JD/iFHAo5hnVWyM4E4ZT59JRIJD3ro8VkbNhdrECqWg CU0TO5ROTHgGseL4StvmaR1XpsSeovzwnLx8HhqjMO6hJOm1TpIcHhJFjhrS pRwZOZjkFMyyppWSGDMyiU7Kxex009DVwdW1Xp6dGeDZaaGczS5+//1b1zZ4 UgKH/86tG4/lja9RXjdJZtmErIpF8gVAnrx5POmTFAp4SgQ8ZVkzVAp4anLn qclfoMa1SEXhKp3TF8gq62JvSBLaSBt2UxouWxIeq4Fqi6gei4MEUQUJOS6M ogxM2XlYnNlSLDtWexo2uw1bZiLGtDjKRCH4LKLbTR+TGfcJGZqPsSuXvUoU qD+lJH4v1dZDtDjjmBtsln5wpL8ZI4XyXH7wbgpCduOScIfswSuhbApSGLSb uDAnwaHSr9TFhKh9RIZJv4kpwZ5agz27FktWmYDaL+/Lj1WYxlagDPUrwVpY RZRTWCqvRAAkIV+Pd5WSqFwPKSBLEDbKzPHiFDZNdqdjcInYzEgiUsSmOkqP RiJaIlYiTqMTpjOKGchAq+w0JEioOzxOXdsEda0STRN4Crs4FOogIki8mLCw 8sm2XSJb/LnaaEZlSiVSn749UTM8Wc4jWcS+gp4MosMziYm0o1U50EU50elc lHet0D59jo7Zc3TOnZMFWyHfl4EvO5eETFGpGbKIpAkm2vMxSIcwOJQOIUzq rqG0tZ+mwVEa+7pZm+/i2flBnp3rEzR1893zG+zAKDlwaOXo0kWGulYZ616n oX6KXP8krvIliqR5+R3zlKRN4peoFBjVZM/RkD9Ps2eBFt8SrcXLtJQs01y8 IuKrjQOyIEwWJ2mZ2WTIWyouLCInvSDw57YUSZ3JnLO9T0huAZZcWbu5soZz MqVpJIvUMMmC0FGR+hH5iT8jQ/0hmVGf4Ij6lLyoXbglCiWK1bsCk7MbBU5L Q60sS6xI+JTt3iMEPpF7KVTtpUiiRJpaqRLyOFv5ODMkl+CD+WgOFIgYLCMr o0YYvJw4W/H2psb2EszZJVgENlaBkc1dLI28Eo2zMLCDW2x+MdqCEvQCo8TC YgxFxejlqDS59HyBZoELnU00hlaLShNHVLRe7L7ASEInUIqXSNAI56p1xCdk oDM4aeqcoOmwRLuEwClEIzBSO0WeScMLlryJjMsJ+YjMyH1Em6zEWjMFNgbp WuKdDpoERulowuU1w8W7qrLRanLQSTeLF+GfIL43PaeZw7MX6TxyUeRpLgc+ iaFQl0uuNRlX4xDupiGipCumFDfhbeqhoEGEd/c07RPLtI7N0TwyTuNQP8OT h3l2UaB0UbrZ+R6+f3nzRyglBQ42NpbOMyrInehe40jPOu1107hLJvH5l6jK W6Yu/yiVGdNUZ01TnzNLk/sIrUULHJbnOyuW6apeobtmlcNF0wyktDJY1SXK Op/Y9BxpZ078w0fEq0gryK4gWVa8TZRoqvi1VNEHSVY7ttQskgrsJOWnSSsx k5ondtfw1wKhvyFL/Iszehd50bvxRu/BFy2wiNpLmUSFZi81cfsYq3CwPnaY o+OH8al2UaQRzRS9X7TVfvyx+ylXthCQqNTuo0Q0VsrBFGziw5L00r6Sq4lN qhC+Vy5YFNueXiyrUxmEsHORoqtY2lQR5sIy1A4v0XlFxBQUEesuQuctIr5I bH6JD6O/EJPfQ0hZIxHOUpJVCZjDoolRxYnHiydWQicRHx1PYlQ8BoGUUSBl UiAleWjpmfiA1u4J/gsOd11g71R1iBZ1sBbNIUHkQYsI8iCSY8OJNSdL25KI sBCrkNIhceIhCiE5iY3MESTlCfGJgogTJaF3iYVyYzS4qe4/jjrRxZ79iUR+ GidkbyBTl0BhVS+9wia9AgNlL/nu+dN0zZ2gWNiluGOB4sMzFLZN4m0ZwNPY wkq/tLcrgqZLvXz/6uYOmGw7V0xsLJxmvHORye5VAdMaR3uOcqR1hUIBR7ln hfq8YzS7N6l1LFCXuyCctExbyQqd5asBEPU1rDHQtCYgG2Ayv5tTjSMsdEzT v3xJ2s/wmRuEUtg9TrxoC2UD5e3NlCvQZVeRlF1Ghr2QLAFeli2NtGQraU4D BWl78MT/DXb1z3CI1coTHvLECNfE7MMvICmXqIo+QE3MfmoFKFM1ORyf6uLE TBfFUXsojT2IP06Z/nuQyviDVCt7uSccoFIMaeOhv6ZJ7F6OmHZzfDHhhkpU lgrUtrIAoJT9XuPtApLsIoz5RZhcAiaPD4MAShn8qMkrJMrlI0a+pvUpe2LJ 95f6SBRARVdXcsjjJ1QZ1hiVQnK0WE0xG/GB1paAXiJRwhidgEnCHK18yhyP KSGZf0L7wKSgKVKTSJRKS3SkoChCJ6JHhzZUIkjMdXQcWnMqMREmkRLJxEWm oQlOEdSJOIrMFSTly+tI2xKRlBDvxWAQkJsKSUx0k5nk56NfxhP0aSL6MCs5 iTayDBacrnL6Vi7TK2apUhDnaxVNXDVBbuUYrsohCiqGySkfItvfg93XQn/B AL05/cxV9PH85o9osgYO/xtfv/maicOzTHctMafswdN9gs3u01zoPkux9whV 7g2aXKdpL7pAS+EpQc26oGmDjorjdNcep7/pOINtx2nzjTDqH+W4CIDlgVkG O0VIta19wNCZa0RS1DsREKoJSrj8GNylmKSJJAZ2SC7BJDokPd+DI8dJXkEM +eqPKQr+r6KB/pIcAVOBsvm1RGnMQWlyB6nSHqI27hD1+kM0CGDGK5xszvVy SqIlS0+ZPojy+CAqDcFUG4Op0u+lNvJDuqN+yZgytUYEvC/eQrIkXpNQToRF QJWsgKqYaJsXXaYwVbaPhLztTdUSFfDIYgjLcgv7uFC7vGi80vyKCtEKoHR+ 0VRVZRwsribCaCMyRk94lAFNdKpQijg4TQIpYToSYkwYYsyYJMyxZixaMRs6 afDmDDpG5ugYnaWitY8oYa8PAi3yPxMjj7XCZDq1Hr0ATBNlE1CJso60ijZK Q6fKRCsaSBOSJWyYhzbajU7rJT5eFkeMKzBgzBSRjSM0FZ8sov37k6UJZwl1 2ckypYu2tVHe0EXL9Fly6pbIqz1Cfu0srloxWDUTlNSMUFY9QFlVH57Kbjz+ RhY8Pczm9TPj7GMud4rz3VcKfgqsNDYXNpnuOMJs1zoL3ac41n2ec92Xudp9 lRLXErWeTVq9l+jwX5Med4WWopMcLj9FV+1p+prPMNh+WoA2xXjlDKt9CyyM LDA2uMbo4CrDvcu0DwvwTl/B2zWKvqBMVKyoV3cZBlnOJm9JYBPZ7WsORaH7 8kjxZ5GaJS1ef4Da6I9pUH1IU8hfURv6MyrCf0lZbJCgKpgaXTD1CcE0KgPI TcFMVudwZqFfYoBR6YMVysQ6YwhV5lD5/l00CaqGDHuZyDhIT8YhGm0HabQc oCAxDUPgDs8qIpMqibSK2s4oC2w8pMyP0Do9xOUq8qkUQ1k9oY5CQu0FhOUK wlwe1EU+ogRZMYKs/eUNhJvTiRbbpo41olZGfyu7hsSkY9Nmkh2dhF1lxKy2 YJLGZdElYxWKsiUmYU5y0DmxRJdEXpH0Yq1JkBUbZxTq0sYZBCmJIoniBZl6 orRWwvT5giqhKpXIMGUwUaQz0Pg04dL4IuS5YPFiYlVTY4vJMlbgtZVSnOmn MLdcZGotB3TZ4hacGGw5+HPcDPkPkyeoyq9fpKBeHFj9HEX1M5SJO1MsZk3d MPW1fVTUSCuoaOJMcTNHXf2s5fWx4ZrmhFcZF76ijAvP20aYJXD4OZ9f+Yyp 9ilmO1aY7dxkpesim13XuNh1m5s9d5ipv0Sd9xztxdfprvxMGt9doa1LdFZL G248T3/7edpK5xmvXWR1cJ258TXGxzYZGzsmIUgbWaZnYJH+Uxdxdw2jE47S u0VlCcoSvX6MPkFZcdH27q+lLmwlOeTWyJrO0JCn/4RcrSgp4aYm/X66tLsZ 1PySwbCf0SlqqznuAI3GUJotobTYQpiuy+fc0qBU5vzKIP81gLAKZZsb1cd0 xO1mNPUQQ44QWjNDaEwTdKYG0ZQsSLPtx2G0E5TYKAa/ljCzn5j0cvFxVdK8 q9Hli0jPKUOVU4xzYAJrcw/BziKCxE0HC9JCCjyECdoOeiuIEG6Ljk8hJiE9 MGBeIxwVHWMTZZUsTCRuXJtLttZOvsZGUlwqFkMGVqMg0JxGUaXiXbun1/gr Cvz1xApStYGwbU9HFq5NiDdg0MfLa9gISSxAE6lwloj0Q5lo9tqJ3SsmKMQt TbiUDGnyWcl12LMaSXPUk+qoxZpVgTWzjKLmKdLKBojLqyZfhHq6Y5jy7A7K CzooaFwSCbVIceM8ZY1zVDVOU9c4QWPDCM0N/bTWd+KvbuJKWTMXSjs45evj fPkCFyq2x3qfUcZ6P/uW3J9CLY2TcxvMtM0ze/g4RzrOs95xndOdd7jcc5/b g4842/U5lT6xpaWf0VNzn4GWRwy03qOr7jJ9rVdoLV1hvH6dleETTI2fY2zi PGNTZxibFrhNb8jjFUbG52mbO07N9KK0mmJ00iL1nlISCoUgiqVFloquEc1i 8btILneQVajDbjuEW/chWVG7yZa26BYCq9CH0C7kNWQ4xKRhH7PxHzMT+3MG DbvpsBxkprGAbm8yvuD/RldyOGWhv6DmwEcMJgYx4QynKzuc+kyJrDAaskJp VCCXLnBLE7gl78NhiudgfB2HDFUcEh0W42wkNrdR/J+U3VNPSvMILRce4J3f JCSvkhCXhCyZ8MIaKVkxEQ4PUTZHYLZwTEIWkVEWgVqyQC1NoJYuLUvaWayT BGlbjsR8XPpMHNpUrGJkrOIh6/rn6Jk7Rq+Ep6JFYBdnSOO/ozNKKzSmEG9M JtFkw2A0ESFkFyReb/8+aY2fZhAvHtcUUSQeV4ySuQabrQZLUrWQVQWJSeUY U8oxp1dsQ81eLtpqis6V63StXqdy6DSZZQsCx0Gq8jvxFPTha1qirGmRquZ5 6ppnaWyeprVlnPaWYTpaeimvb+ZWXSvXhdwuVvRzs3md643rXKtb42rlChd9 8/zm+Tfk/BRuvUw2jjHbusZs+1kWDl/j2OHPONv9gGv9j7kz+oxHk1/SV32d 9rK79NY9FgH2lNHuZ/S13Kal5ChjDSdYGj7D+PhlRiavMDpzidG5C4weOSNx Qh6vy9cWaD9ylO7jp4nKFqUgKkwnfVNfVEJCiVh4v8jpMi+msgLSa+yk5Wlx 6z+kQPuxwG0/OdGHcMUE49OG4teFUW0Kpy0pnOG0UKaF0Y4k7GchVtTWgZ/h +eQ/UbHnP9F04C+YUn/IeHIEw7lqGu0R1NojqXNEUu+IkAiTCKXBLpDLlF6a IYovKRirVkVUXBp7pd+ohBE02Q1o8uvRuOqpWr9J9/WXgblBhvoRgVu9+Ehh ZaNVIGBGk5krcMtGIzCKTsgmIipZVFl6YOZ7bIz0N4GaXnpWQkIOepHf2Yl5 0tetFOqsZLuqKeuawyHSuVf0jKe6gzizHZ0SlizCYwW2sUlEhBhEgRmkj9oI S/ASphX7ESXKUSdKN17yaSgN7AsTFy9L2igdxCIdJFngliZwy6zAIlCzii4o bJ+lY/kqjdPntzcpaFwlq3IRW/YY7rxB/NIXK1tWqW1ZobF1mZY2qWH7HJ0d k3R3DtPd0snd1l7uNA/xWesSdztPcqfjOJ+1HeWzplVu1SxyuXRqB23mnZtd 3796w3TjDLMtJ5hru8RS+y1OdNznfO9jrg8/5+7EKx7PvuaaPG4skT5a/4zB wy8Y7X0pxHaGkfrTLAydZ3T0GkMTNxieuc7w3FWG5y8xInZ3ZPGUxDFGF5ao G5qlc+MkFnHxUfmimQuLiJMeqhdyixelk1guJqi8gAy/DXtyKLnRH+JNOLSD uGBBXChFcWH4EyKoNEVSa4ukIUVFW0Yk7akaJh3x5O79a6oO/jXtoX/JcNzP mLX+nM3mFGrSIqi2q6lxqqjNlsgR5OVEUKcQXnZoYJvbBsdBasXMmqLDxfSF kB4fSbrViinFKdVy0D6xqIzxEfN3480PhJEUoSE5KpqUmGhirGLsMvJRW/NQ 651CcHlEaNID21cq+6/FxIqCistDl5BPgrGAREsBCSYPmYm5NFhySN4bRfCn KjT7o4gNS8Sa5iVKYyEqzExEhBjGgGZ3ikHMwZqcgy3dSVhyEaHGUiFQF7rY fEGyaH+dJ7BdljahFJ1JlLEY5T8M/hWkWZxlWEQTeESdH16+TOHhdfIalgM7 ChQ0r2KvXiYtdwZ/vqgz9yj1Yu+aD2/Q3rlGZ88y3X1H6O2bZEEQ94Wo7/uH p3jYc4Yv+i/wsO8c93pOcb9jg3uCwDui9t5evJf9U8SFc/fibVFni8w2nRHU XWe57S4nux5xceA5N8decW/6DU/m3/Ny6Rs2up6K0XzK4dqHVGQfY7D2PLMD VxgavEH/6G0Gpm4xOHuToXlB36J8XWzx4PIZhlZOMLy8Qt3INO1HN/BPzRCZ 40UtiidGdLVW0BZXVoheEKcT9WbPi8Ub/yEu3T45BmFXK4gLwRUbhk8fQakh kkqroCZZRUOamuZMtThNNbNtHjIOfURx1CccFtU3lSwqL+VDFpszWB2voypL fi5bTXWORJ6KmrxICeG93DDqckOocx6gJuUTEgRxCfJ6yfERZFticFqiaa8t 3rniKIzH9x9gU0Vhi44mPNmOKt2NyuJCpcsVtLkIFxeoilK2rswlOi6fWPla nMEtXOMhIUlWVYo4wiQ3ZuGg4F1xGPbGkLg/huRgNebgaJI1qaQn2rEluUhU /kaXVYhR2fI3wy4tMRVtSg6hNj/hcb7A/Ea9XvyLOMwYrSeAtDiTH32ScFvq zhRex/YUXlNeBRUjRykbPCnucmF7xLRwUX7zUdwtx7HmLZKjfPrinqaxcIpW 8YqH+07QNXiU3uEV+obmeCSIezwwy4OeTZ6O3mJr9AaPh6/xcOgSD/rP8KD7 qKBwns+ax/8IaWHcuyg+oFY6aYOgpukWK+0P2OzZ4tLwS25NvuH+7NdsLX7L y9Vf837je3rKb1OUIuJCHOlEzw2mJl4wPfeGwckH9E19Rv+R2/Qv3mRg+RoD K5foXzvHwNomPUurVA1P0bSxRtOxVQxV4tjyvYS7xM15PKi8Ui2vlwi3SxzT PoqN+6SbinhTZpIKt2ULr7niwvElRlJqVlGRpA5ciVEvXqLRrqGv1MbF9WHK lFl32k+oSdjFeMYnDGX+nGMTlZw/PsTyeC1lGeIbcpR5d2oJlUQk1QXhgr5D VGftoTrtU+Kiw9AK0iyC6ixzDE8fP/hnPwGZRR1NWJKTiNRCAVkZEXEFqKTY ocq+ppocMZ8FRAnNxCR60ZoL0dl86FOKSEjzUT2wSpqnnT37LcRHWEkTC5Fr tFCWnY3N7pNG5yU2S+g+Q6hP2R89Mxuj8tmrPYNEiVBbOcHGMuK0+ejiFWAV Eq33Bqb/a81CZ8nSQNP825NwnRLKJNyCKprnz+JtWxaAzQvAVshr3CCv+YQA 7BQlbWfI8BzF61mluXiONnm+U8RR9+gmfeMbTA4v8mR4lUcDx/hSmSknpX4+ eY+tic94NHaDhyMCssHTPOhb4373NO+v33H+FGQh3D1/l5nqo8zWXWKu4TNW Dn/BZt9zLo1+xa2pd9yf/5at5e94tf4b7o4+YTV9jAH3CfqarzM69IqJyfdM zr1jcvGtNM0tUbd36Fm8Te/KDXpXr9C7foG+jdM0zK1QNjRD3YZIAAGZe3pS DFyJqOsSgsUphHqL5bEXc4KGKgFZhfUQBbogAVowebGHBGRBFOjDKRQqK7Go KU9RU5WuoTZLI7JLw9pYPReODnFpY4j+WjvexE/FJMUxVaZjqsNNi09PU5Ge iS4XNdI4fen7KLUHUSpNs0xorNy5n0rHXiozPxWJFSZ0FExTTWngWnBCOXbp CkZPtbCXT8BVEfiriMImQZHZhGq2B+SrhVE0Bl9ghnhsUjHJnlYq+tbpWLhC WmEXu4PFj2pSsKekk5GWRnKyRfyeePN05W92HvTiYeMV1nIoF/llBybQmrPT AltJh9oqpf9Kn4x3o4kTcElv1JoriDWXoFWGd6SL+s0qId4pkVtGbssYjXOn yK6ZxVm3SHbDOjmNJwRYp/C0nhVgnaey8yLZpScpK9+go2qBrgHhgslzwhWb Uv5jPBk/wYupR3w1+4xXs0/5cvYxT2ce8njqcx6KVnowdpEHIyd5ICB8vn6M P0JWMF9/+TXTFRvM1lwWZH0uyHrM5sALLo294dbM19xf+BVbq99zc2SLpcxp XnSe5psV8ZYdj+jveys+8xvG575mfPEd4ytvGVn5kt6lB+JpbtG1Lr5m4xKt q6fxj69QPDxNxdFVygVZZcdXyRZ0HRB0HXCVEGHPFUFtwK6PpcK8j2pll3Sh LmUqvjshFGfMgcBkfI9JFRge7hcpViHUVZ2lYnmklnNrA4KsAS4dG2Si3SU0 F8qAyLslxyc0ZEfQIGiqD0S4SDLxnUJdFY5g/M4gutqyJDLoak2hq8lMXksT 6198wZ/swEoZ+tqzcZXc5ilMvl7CU+oIt9URoi8hSFNASKybML1yB6vAzuon MqWa7EZpRM2L5LcuigxaRm0rJVaaX3JGFolpGTSMLlI7JD48XZqdNEKdw7t9 /WiOC0NurjQ1kWH5mSTkZhKSVCU8JZAVSKnFs8ZII9Sl1BBtLiZGGZuQVkxc loSzNDD/smbqOD6RUdk127PWnA3HyG7aFLidxdN2gZLDl6jsuULtwFVcdWeo qT9Bb9MyPaOnGJ88JebvHM+mHvJ6/o3EV7xeeMnL+ec8m3/C47mHPJy5w4Pp azyYOseDyXXuj47/CKttfxnEpP8Ys1VXBFJ3Wel4wsmBL7k4/pabs99wf/HX XB7cYj7rCFvd5/hm/XO+O/e3/Ob8b3m08SvaOp/TP/FW1PzXjK68Y2T9DcMb rxg6/kLK8ICK6QsUjR6naGwVz/gc3rVVvOtCVusrlJ46jXdlk0hpBbaYGFK0 saTrYvEb9lFpOYTfHEyuTjSXwCM77hC50iFdxhC81nCKUyLwp0cwP1DJ6eU+ zq32sTJWK2peOp14yGrxkC3mUFay93HYEURTbqREhEQ4jRL1OYrekigQFyC6 a3TUy5HVWuYWywPDA9//9rd/stMFbz2RUwlMV70n8YQ+ObXcFmWu+glSfCOk lowTmtxIiDJRz1JFqDIFyFCMRioebS0R4hIyCc+nJKccd1kFlcPLwuFX6Vu/ gqtpGG1mETqnIEvkaHyum8T8/J3JqnZMrhSiM8SyxnqJ1Mrv1RUSa6tBm1wt JFcdGMShETmnEVRpssrIqBFLOH6Uwk4hqJoFsurWsIv9dzafIaflAm5BU3Gn ckXUdWpHbtI4cQtf60Wa2k7T3XyES50rQkhbvF78hjdLX0u84/XyG14tv+LZ 0gseLzzh4bwyMvg2D8TQPTgiZDU9y+/ev3H8FFT/O2O+Y8yUC6jq77IkoDoh oLogoLox+575xsccc18VAXee1+t3+PrM9/zq3Pd8d+F7fnNJ4vL3nFr4irqe RzSPbtE++5z2hafS8R5QOXObirkbVBy5RPncGRpOKmOCuz97yV/QJf8ub73n 3e+2R6nWFJdijo3BFhcr0iqIMtMh6YIhVCaHUSwgclvCcAiocg3KDqDBNLoT OdJXwYmFbk4t99DrN1EqVrJcRHuVAKo2W+yl4QCL2QcYzdlPi4j3FhHvLfnh NCt73eUrXBVCvVt4yx1KtYCvuUTNzGIZ60+e/umPgHokFBUYZSqA2hBAHfuS /uOvGdh8L4AaI8RSyyFtMUFa6VJ6KXqiFNdUQoxFdHWS0IapCHOUS/xDkWjz UqGfBkp6lgRUV+T3XsJW2EisU5x0roCqQEDlEg3vycXgcWD0phGfbxUXmUq4 WihQ7xcQNRKdJj+TWU+so5EYR510ZOl+BfJ7h1bxj67h7pjHUbMkgDpGVsMm 9qZzZLdewtVxlaLeGyJEblEz/hkN03domb1DSddlTpYs8cbdw+vhh7xZ+Y63 q7/i3aoAa/U9r1bf8nz1FY+Xn/3DaN4VoSnxag8WFvn6/q0/AtT/xd1TL5gq ucJM3V0WpfEd63/OubGvuDb7hvnD33J2+nc8OvMVrza/4e2Zb/n63Lf86sKv +O7Sr/j+shwvy/+vfMvGomR76gnlw/coG/9cnOBtSmeuUzp7iaLpUzSde8jh ay+58e4H3v72f/zTnUknXzx4wNKRucClx8WJByk1ST+yhVKRJnI6K4LKjHA6 /XZG28pEeneyPtPJ8SNddBUbAwNBSjMFRwoxOSOpV3CUGsqM/SBzObtpy4+g TYio1RVOi0SzO4xGTwgNnmDqfaFCUmIKpTcWeax/vtPmeiRX25NFBT8bL+g/ 9hpr0RSRqa0cjPFxKLqQkLgiwuOLURlKpP2UorVte7Jo8Wd5Qk6uwGc0/sCV YSZnJVlVw3QLfrpWL2DxNaKxi9zO9aDziIoqzEPnchCXn4rGmUR61C7U4elC SDWoTY2ok+T7BUNRmYIlwZDVPyi4OYW3fwWfyOk88WNZ1avY6zbJaDhLZtNF 7K1Xye+6QWG/VGDkDlWTd6mbuUfj7F3OTT1mpfwyn/tX+KZkgLcTj3m7/j3v 1r/jzVFxaEff80x6zeO1L3mwtrUz9vYmD9bPC45W+PaLOzh++hHkv2PMc4Xp 6rvMtT1mvfcpp0dfcGXmJbeFaU6Icvrs2Ne8OPmWr06/4+25d3x94T3fXHzP t5ckLr/jG4l3l+X5K294cfUVT66+4Mzph0yt3+TUyYs8unV9+0ZH/gN/++07 rh/p5VhfDeP1eZwcbxAAj/LF2THWhjuY7W9ncbSD1clO5vvKKU0Ppyg98g8o qVFQIsatITOMEWW+aN5u2l2RtLklPIIUryClMIwmQUejT5BSHEq9Zz812Z/g Mx7k6f37/NmPUFm8sjPj87HA5QUWzxgqgUmEtT4Ak6CYQsJ0RUQklKAxlm7T jEAlPsWPOrqInMxqsnKVHaK2LyC0ZJdiya0gq3KAztXzdKyexVTaRITTQ2Ru Aeq8HKLy7XLMElpJIEmzi5SY/cRofQLHBiLMjURKv4wUuFhKR+g99ZK+sy9p O/6AWoG1o22etMoVMmpPk1l/kczGa9jbbpLbfRvXoFDL6H0qxh9SK33q4qx4 qfm/5frAV0x5N3lcd5TvBMZvp5/wduM3vNn4jpcb3/Bs4x2Pj73i4fFnP5k4 K2L76DrfPLr7j6Gy0Xmfcf9dppoesdi9xYnhp5yfesZ1EVZ3RDQ/PPqSrROv eHFa+OasiK7zr3l74TXvLkpc+kpgIl+78oqXwiPPrr/g0XVB6LWH3Ltym5vn L/DD99/tCNZ/z5XpXm7MD3BTuftjY5jPT47y8MwYWxfG2RjrYmGwg+WxTrFn IrJTFJsVQYnApMKuCvztsj5HRVOeio6kIFbzD9DvCqHdKzApjAiMSG4pDqOl JJSm4hAaS6U5FewWotlDXnQk2eqIP9txrSvnHghSPqd3+RHmggEirQ2CkhbC 4iukauWECErCBSWR4r2jlGZkFZQkKzvSFBGf4MeVV0VydnEAHdacEmy5JVjz SuR3VZFZ1Uv7+hnaNjYpmZojsbKGsHwX4QUFROQr95JFY1RGbBq0pBtjMRus hCQ2iJcfpXzsJp3HX9ItKOkWlPScf0nvpZciLK+RVX9c1M0FHM23cLbdJafr Ie7+JxSPPKNy8hU9U685PfUND+f+lieLv+X58u+4PfaWpYpzfNl2jB/qR3lz /AdeH/+el8d/xbPj73l08jUPpdVsT30V7XxKVM6JdecfX3U16L7NWO0jpg9v sarM0R4XLM495cbSUz5fE4wde87jk6LCT7/gxdkXvDz/glcXJC4q44mf8+W1 ZwKMpzzeGT30+fWH3Lp8i69evtqZof0f+Oreba7N9HNjUdkodZg7x0e4f3qU x+fGeHZxnGMT3fRXOvApn/olh+NNVwkwVMIfKukyagGGWhSJmpbUYBbyghj3 BtHuU9FWLFGizCYOD8wnbikVDik6SIdP/HpqCAWxKvIFHMdnp3feSwi3Hryh 58gdqnvPEWFULl+oJ9xUE0CHyliF2iAokXajEu2roCPWJpo3RdqOsYiU5Aq8 7rLtK0Z3UGErKJYowuYqwuCtp3x6iebjJ2g6sUHjiVUKZ4bJ6GkivasalfYQ Bl0k5oQYVpeOSMzx+NEDrj/6gbbVl7RvvKTj5Es6T7+k65yg5KLElZeCjpNk NV2QNnMD5+F75PR8QcHAExqHX7IyIkp04tfcmfledOwPPFr6gacrP/Bi/Qc+ m37Nhsibt73H+O3wBl+d+I4vT37L082veXT6DQ+knv8wdPUi9zeP/hE6/g3v nv2OwZKHjDY9YVYZXD28xampLS7Mb3F9ZYvP1re4d3yLhye3eHx6i62zT3l6 YYunl7ekq8jXrgldCDI+l7itTC+6ep979x79+Q5jXBzr59qRQa6vDnHr2Ah3 T243licXxnh+aZymrBDyTAdx2cSOp4kFz1RTZldT5dRQm6sRiarsvhjOZE4w 6+5dAgi1AEJFq1/k7M5U4HZ/CF0lAoqiA3h0atxxKlyxEeRGh//Zzk2v3dO3 peYlRCRWEGmuJdxYI0xRgVrwEG2uJlq5iErBg+J8k4oD01DVWi/ZitRw+THv YMGqYEFwYHNLeH3i2itFclTScOIY9Zvr1G0uU3dyjtoTk8ICQ/zd373nn+2s ketbPzB//WvapP7tZ15yWNihQ+qfVnWC9LrzpDdcJb1FfE7bF4x2vWCz/x0X Rr7h2uSvuD37a+4tfMcXS9/xZPU7kRPf8UL6xZ35V5zuPMeTjkv8duYiL059 LRV6xxfnpfayhh9cFGa4KLU/L8/dvv6jm07auWH83Yu/p6/iMSOtW8wqM6HF wJyc3uKcFP+KFP/GUQGAFP/zUwKCs7L8pfD3pfB3pfB3pE/clLgqcenqI+7c e/Yvf1QUX7/n8tQgVxeHAhvO3j4+yj1FUQgbXF1soi07jCLRlJ6kYIkQfBka Su0aKqToNVJ0ZVvjupxweh0hrMpKbxFf0uJXSbGlfZSE0OrbJ1p1nzDEXrzx +8hRH8AZuZ/cqGDyY7enU/7pjhSfnNkkPLpYzIMy/K2acEM1EYHKV0rVq9Em KVEplS8iOqkIbZo4XBGhLlcFSWJaTMqFvlJ1q7socLGvrdCHzadMDVM+bK7A 3ttH9alViSWqN+eoODbBy+/e/+nOQKDXv/kfXPvyByYX7jNTdI7ZspvM1j7k SPMzVjpfcaL/DedG3nNl8uvAbqifL3zD/eVveCTeY+uoIga+4cXxr7k0+pob yz/w/zz5nufnREv+OAHyshD4lS+2J4tevMz7F89+LHLyzjSrt1/+PV3Vjxls /4fRyhuzssoXtzgvcvSSFPiqFPiaFPi6FPja5e0JVhelyOckTl15wvW7L/7V zoq+c+wol2aHuLI8wrWNUW7Lir6n7KzX6abZIYYjPYwyWbGV9gjKRRKWiSEt c6gDo5WrlW0SPBqa0oNYKApiqPgAzb6DIg/3ig74VOITmj2fUJHxSxwhvyQr +KPAPATlHvjk/T9jorX6x8QGBvypRAlqy2VV1wjT1wRqHK4XE5Eo6lBMxPZ4 bcU0esVYuLGllOEp9JOYs329rblg+3pbi9TUErjgzouxVFZ/USnGujoqZDWX by5Rc/YoR5++4H/ZkVyTnjNMF99gpvoes01bLHZ+yUafrMSR11yYeBOwebfm 33J3Sdnr4i2P1t/yZOMtT4+/4dlJeW7zVzy98k5k00seKaMbpcs+uPpEZJcU 8uodPr9wgeyf3lb2L5mf+YrOri2Gh7aYEXpekhW6Liv0+IY0dKHmU0LNp87J 6r2wPYv46MUtls894tc//P0f5tHckYZ14cgwl1ZHdyo3xpHD7sAlMxViCUsk yqVqiu1ryI2kuUBFu1vUWqGKriJZernBTBaGMFW8mxbvHloLhY8lWgo/pcb+ Md7IT/BGfExuqFRPKpcVtH1XaKc7jQuzA7y6/9mO6fg/SYkOxxKlF19fRnBM GUFxpexTFXAoxkWoziUC3y1L1C1L1E1skgd1vAe7s4yUPB/6bC+J+T6MbiFg b+EfhviZSz3ElZYS5S1GLeTcfPUqnbfuMvD5I97/7u/+UL67J79kwnOdqfJ7 TDc8YvawrMXe5xwfFpM08SWXxGhdF2K9vfSKz1decX9dxLiyqY5Iu8ebL3ly 9ktZf8+ldM94qExfVVrg9ceBqZv3pHy/++Fvfyzf9tjNP+XV699z9dZ3tEn5 +qV8o1K+KSnfrJRv7oQcN7eYljV4+vZr7j3/9b/ZMfKfbW4IF49wYWWUqxtj TLa4RfaEU5sRQaFo61JZWxVSrdpcFQ1SrWaPdEafsvfZQars++lxhzLn30dT 4R5ZZ7vluItqu9gu1acURSohRl0qVhD2S5zK/U1SsQFvOjelY18LzANc54ev 3/3znYlQqdERJKlDOLTXyr5QLwfURRyMElcW7SIszi0d1C2KSgpmdROXpOx8 7SO3oAyruC1dlgu900V8vpuEQi8JPmX/DzHrPh9xJdJF/dXoy2oZuP8lA/ee 8f7vfv/joMXj3Q8ZL77LRO0XTLY+CWx4tDb4lBNjTzkrTufS3DOuLTzn1rI4 nrXn3N14zr2Tz0SASm3OP+W+rId7Qmg/zs+8FxCxX/D4wZMfL1/K2pmucvHu d1x9+J3ote+48fg7Xv/q9zsDEf8tL+5/zqmFEc7K8nFbQilWrkBLixCyi6RQ olQMToXyMblLRa1LllTuPqry9wnp7aMmJ1RM2iFZMrup9e6mPGn7rqcSlRKf 8gElUop/QYkUIz/sI5whHzJSlM695UFpCQPS//u5PtbHb9+/2xku/H8Epugl Bn2M/sCHxB/4iOD9qRwILyIoqoTgaC/hWllC8bKEZBnFWpTqFGBMKqXA68eQ 6cbocJPolGpkuzHkFwoD+rH6K0iUKsSX10vUoZPHnpkVqcb//b/+KBhFxgwW 3GKkQmRK4xOmOraY79sWjicmtjijWF1FPyxLOxHxeFPay22B9mfSXj4Tdrq9 M/Ly1nVFMG4F7nl89MWXO5ctNgYO/5rvv/2aGxeP01HnIt8mhiE1guIMpZOo KM1WUSyILxPEF+ccpEQS7ZdE+yXRxc4geoqDac7ZTXG8hGY3pZJov8QH8u+n 4mX96k8kPqZIJagP+1AKk87jo4M8XB3g3tIAnx/p5/Z4byDZ/9POn4gHWv2B m5DjD/yCBEl24oFfEnownaCIEkJjSiXZ3u0tsiXZWkl2uM5NWlYZ6fnFGO0e TJJkc44kPU8SLhGfJ0uhRIF8PXpJtk6OWn8tqxvr/OudqXbvnv6WPu89BqV5 D7dsMSn8f2RgW6UdE5V26sgWZ5f//0dQXha8f8CVwAzKe198xfe/+W3gN+9g vnmnoa8dmSJNF0GmLYwcZRywkEphdmQgxW7HAVzOfbhy9uEQXDsLwjAnq0lK MJOl1QdmxmojE8hSR2BXyc9GhVEetYuy6E8lJM3RH5Md8SGT5ek8PzHI1rEB 6YYDPFzZnnp3e7znn+7A+cGdNRF4qYEsJ+z/hWT4I4wHPsZ68BNMwREEq5Us +4mMLyHK4BFIe6Th+7DnlYuR92JweDAqEy/yPNLYBdISMdLkNQUlaEtqiJMM m6RjOJMSObEw9W93xs2tjIj3rnvCgKijsV5prsrnkcLQa5LcY8LQJyW5pyW5 ZyS5ZyS5pyW5Zy5vfcCZq0pebz14HfhFSuT+NK//KjBwKEWtIlWjITVOTbpR jcOiJssYjMUUhtYcI+1NJ7DRB+Z8RkQkEKdKJjvehE6TSLw6QcqXKBn+cxIl xzpNCpmxOsq1klut5DXyQ66MVfLq1CAvNgdEXfTzeKOfRyvbo+iebq588Ifc rnL9fB83LvSj3/dzYkIOoVLHog7XsE+dwsFwc2Dez/7IAg7oazlkrGW/3k+s uRKHu5z4LOm4TslxjjdAFQkinOJc0mklt6p8iQI/qQ57YPSb2xD573ZEy7UL v6JNfGWnEPaAdL6xScnv3BYLO4PtV4Qa1oQa1s4qmyeIoJHcrpx/IqLl9+zc k9GyI2KVCU4paklkVBQZMdHYtTHEaNQcUsUTrEkgNGp7wKYmKpFYCVWIDWe8 lTStcj9dIkYJkybxg8Awq/9MotqCNjoHtzYEh+pD3p0f5s3ZIZHilfSVphMr SYpT5gzsluOnP8cQFsLw4RoWRsq4KYkcWx5it8HBXqOTPco8xOB4DobGExoq b0NCrUzVkgiWzviR2s8+62FinQ3EZJYR65DE5vgDd5hq8+Vxfinx6XZMxkSy Qz8iJ3IXXpMalyFye6zmn8hK/o6Z1de0Csd2y8ofEH4dFnCOCjjHJInjogBP 3nzNt7/5/Y9DLFp2ULg6PUOySkOKJgqz3kCQRRnBpeeQOp6QKGUgoiQrOpFo CW20gWiVhSxdMg5dgiTNgFnig8AQ3v8Zi6DSLMlOiM2SJGdT6a4R41LzAQkH lVEeifKvQZqRSbnXXpJnluRZ931C4t6fE6mOYo/RQVZLBybhub3RNkmanoMh Uj9JVHhYAqowZRRZ4vYoMomwT41S6xRSooxExLkwG1KFpCwSZirjdlOh3RVY DDkRCslI0wz7BQXxoWwuzewMH/wnXJZm/uqb3wf+V7idmdYdcaVcAGnUJhKa 6WOvvMQBlWRFs52VCDlfjWQjRiJOuaEgzEiSvBVXomQkxoBFwhqrRCJW+R3W WMmWLoUYbQ56ZY+LIBOZyuArCUe4HEN/QdpBZeLUh4GJU5aP/xsROpNUw/EB hywOUaUHTQ4OxNg4oIzoC0kgRLIRKaGRTMRESEYiDEQeiCfuoE0oIhmj/N8Y LhFmIDUihkrdHir1e6jQi7zQ7yJbpVCEZCXiFzik7z17dJ/Bn2bgU85cuEpI mpfgdC+7I/QiwBVcyEvL2UcEbgEzECuhk0iQM9YLOxUYrKTEJWDRydkLnqzK DKcEyUBCAomGFCLjnKhjs1GrncSFGuUt/JJceRv5komCcOX2+Q+xhuwnyJBM qCWT0CQHYTYJq5MIi5O94UYOBukJlhSEKimQ04+SU42V0EXKezpkxCaUlZVg lQUt1VBCLSHPpaliKE/YI7GbsoRdONXbs6Tskb+gOkU19NOz30X3mZsYSlsJ SnWxK1zOPjJe6EReVX5jhOAhSiI2Wrg4xiSIN6NVJ5NrTMVuMgWmV1mNRqwm JSQDZllBielE62xEqeNkNVllJaUSL3B2icxwSwY8EtnRB4iwphNmTiXClkVE soNIvRWVzorGmi0qOoVPPlETImcfpiwJOftoObNYlZy9vK+w/UY581TSDGZM WmXommBRCcGiWVZwWnQ0fsMefPG7cAQGNnxEpuoXnBks5ddbN34EQMuOyloJ zPi+Tc/5z4nKKWaPxsReaUMH5CWD1WYiNNbAPXsx0duDvOJ1SfI4DadBuffO gsViw2K1YVUe20wU+suVO7S0Ouk5sbFxQihx8ra10tZMOFWH8Iry8klRjBYj 2rRMMe5WIlRaVJFaNBJREVrBepyQi7x+uImDB3SECyAiI6UcahPaKJMcFTAk kZ2UiineiFnCkmD8IIDEf4ElXhlHlyAr0kyBbheZkoUM9S8ZrUoPTGx5dW3p xyw079yNtT0Ne3taZa9komRgiJzmLvZqktkXYeFQpI0wgZwqOpXo2DS0ujRZ 5Olo9emkRyVRlWzCpLyb5FQMSUk0dPUTa1DuHhJKjReBpI9HF6cjXjKSEKUV Go3DF/UJ6YZotBmZxMnzKunEqjANUSodMSpFWMlKl6avl2rER1k5dEABhEV4 1CbL0iY5tknmbELpmWSlpGE0ynIwSRVMZixm5T45i8Dynwtnys/H2aThaUiT VFTao3l2tp9np3vYOtn5R5nYsz1CWjLRe+4z+s7dp7R/lLKBKSoG5rDl17E/ IpUgVRrh0Rlo4rLE4NnRGu3oLXZ0YclUJtvIkvDVttB/ZJX67iHihDDijBZ0 RjM6g5F4IYtEkTwGXRyG2FjMOj3a9DTJlsgf6e5RkdGiS2Jl+UgnUBkD2NGr zCRIKG07MTYVc5LYG6mOWptGtD6NsAMmCiyppKRmYLCkYLIly/codxBaJcyY lcFPFuHR+FQipYpnp6t5dmFQQhl8IFLpdOePoGgKHPZuD2E+pcwmvEnf2bsS DyntnaS8b46KvkWq+lYCw5Q99WNk+tqJTy0iVMARoUvHXdNJWmY1Hp2FfOHI tJRcBhY2KKxpQWdOkXSloLMkE2+WwkjBDEYDJoMeU4IsA5s8l5yEThZRXLQo RFUcUcJOsXLqcVJ8vTqJBGEig5y+MVoiNhlv+WEqmgYxKZPjNTa0wRZKM4V9 hGESkjMxpKRjTBWQpKZIJJGYbCZGXteU6cVX0cTqbB/PLg/x7NIAzy5KOs51 /aNs3HouKvnUFfqUSY1nHkg8wd81TUXPApU9K1T1rlMzcJSGkeM0j5+gbeok HTObdM1t4m8d4eNfqNHu0pAVHIYpTI09I484SwZ6W6ZEhrzTdBJtsnykcEar BZNVVrFZT6iQhE4Ao5MVHRctS0OtdAMhD1mOOrWcoUZ+LlrOLiYDU1yGLIcM LEluEUnHSc8tZ8+uWAGllzQhqGirgDTVQXyanbgUWXap6YG5unnlNfhbemnp G6Gxu5/6jg6eXZVsXFVmGfTx9OI/zkbP8bP0bl6n79RdGpc/wz92DYt/DXPh Elb3AkmuRVI8y6QVrpBXc5TSjuMcnjtD1/wZMtwN7N8n9TyoxxkVJ/1RQ1V0 AragWAxCdTohnBihN2WCg1b+HxcejzZMqDHRKP0yFZX0QX2YkIMIp7ggA9pD ZuKDBUshKSSGpmGIkIyo0kmQzFgNTqHnfLFLBeyRrhL+N2GkBwkRRERS1zNL 3/wJ8qqaqOoeoWdmna7pFQ5PLNA+MkvL0DhNA4M09HZy9bTg47pk45pk4/L/ NxsXaFq4SL6cZWrNGhk1x8goO0qaax67Yyow9cqVMY43a4Ii+b/XvYjXu0hN 7ykyPK3s3q0PLO4sobAcqVODt5iMpGwylfFKtnwMVrfgoQCrNZckkUopyg3k adI3hXRiZRVYIlKwylknRWSREm4nLdxJRoSTLFU2dlEhDo1T1Ecq3oMJ1IYk sfevIoj8UE38Pi254mHTtHH4y+voWzglsUmvZKVnboOumTUOTy0FxqW3jE7R NCL4GO5mbb2bZzclGzf62LryYzYad/zku+++J691hnRlT+fqZezVR8mpPomr /KSc3TCulDEK0ycoyZqkzDFNVfYM1bmzH1CbP8dfiZhoYn+QsJYpDbNVTkyo wF6kbGCaT0yaO3A1cIwsW12WmwR7QWBSkDIZN0Lcblh6PuGJzsDd8Yl6J/Ex EvpCzInF2EylpFj8pCeVkZlSRoHNg8dWQH1+Pfv3GNGESu+QPpMv7TMnUU9Z TRN9S2dpmThJZf8GmdWLZFUewV4+jb10HHvJMPbiHtI8HXhqm7h+VBJys5fX D5f5o4zso3/iKBnlI2RWzuGoWiG36hieYlkVrjU8KeMUpU3gz5yi0jFDbfYs DZKIZpfk3DNPfe4EjbE1dBe1klXgCuimwuZO+tcvoE3JQ68MTspy/eHCaZMz B3O2A0tOBpFuYcPkHIJMuZKGdPTaDKIFJ1q1Mk0nT9qi/Iwy/8TkwWzxCG94 saZ6cXrr0Ri8HFSJ2NGmkCGM7Uk2UlHdQ1GbrOiqKfKrJ3BXjeGrGqGkYoiS 8kFcZaO4/P24Sg6T661lKLef+ap+nt+69WNKGgKHA5xYvkh1/ThZZWM4Ko6Q VyGNxL9BacEaVa4NKpyLlKVPUW2foS5njsaCI7R65zlcvECHf5E6YzOLrm5W 64dprVihefgsfeuXJC7iaRlEZ/eid3gCG2YkZhdgzMnDnJeNJT+LSFleYSJ5 gywu9KIetDF2YiIdgdEwOq2kUi8/I6dvsBSKqvFhSfVhTffhaxyha/ES0Wkl hIr6iRX67iqspTazgvwaZebCDIW1U5TWSJOsGaOqepjaqgHqqnopqhygqKyD wpI6Vgq6OeLsY9m9zrmOSwxsp6Y+cDjECQHdZNcSdXXjOErHyC2bx12+RrFr nYqCDercJ2j2nRKkyPfkzNMkbNJatChpWaK7cokGZz+j3mE2WkYZaDxCb8MS zfVrdBw5T6+kp2ZkCW2WL3AVqz7HS0Ku8tfPAkwuWUhuYZVCP2GOEoKs3sCt 41HCHnFar0hZF3FxHhF+hSSYfNKpijClFGNOl8gslu63SufiZbqXLtOzcllQ Mk9aehcNec0U5nXiq5/DXz9DZd00tXUTNNSO0VQ7REttP02CrLLKLkrLGjjj 6+C4Z5RTxeuc9KxxrfMy/dspqvvx0vo33zDVcYSZrmVmu9dwFo+RXyKkKggq zz1BbcFpmjznaCu5SHvJeRplobUWHeVw2Qbd1ZLCnGH6vBMstM4yfniJ4fYV hiQG2iR9Lev0CJJ61i6gSXGjdUiqcn3E53tJdLkwemSRebOJ8JVLmsoI1+eh UUtDjZPvSSwL3Cuq1RWK0isSmVMs8qMEQ1oppoxSMmURH56/HEhTl6TJ17pO fu0SDr+gJ6dHGLCdsopxqhrmqJVUNTZM0SKrpK1hhI6GAboaeqir76SipoEr 5R1crV7gSs06FyvWOFe8yq2eC/T9NFX/kYm2CWY7lVEeK8x1HSOncApX0Sq+ khNU5Z6l3n2J1uKrdJbfoLf2Nm3Fp2kv26Sz+hTtFUfpcM8w3yJp7llntPs4 oz0bjPauMtKzTEfHKi1jp+iSVFWOLG5Ts3I7sqswsLt5ok96ly+HMG8FwdnV BOuEvjU5xOn8H6A3lPPviRV2jjMVo7OVBi5hS0j3k5jlF5G5Rptk6vDiFbzt x8mtWSa/bpmC+mXMuZN48keoze2gulzoUUDe2jjH4eZpOlsm6W4dpa99gNbW LqobG7ndOMPnbet8JpW90bjO9dpVLpct8fLUw97tZNXuXOv7zev3zLRPMtux KEnbYL7zDOUlK3g8RynxnqYm/zJNhTckQbf5f9s7097GrvOO/5vmRYECLRAU XeKmQJsW+RoF+qJuHNewxzGaunUb27GdemY8m2bVjEb7vpBauK+iuImiKIri IlGUSJGixJEocRUvd4naJiN7HDtw3vZPiW5n+hWaFweXEMRzz/N71kM+h3ei axfy/gTUIylMdIcx0kq3vEmbHHDBJndDKwtAp1iCVumDVkVoKkJTzKBbPAex c4UjgP940I9/vnwPb1y7gzevN+HSzRt4+9ZV/GNTG/7hShdtiy7402bun1q4 g2ijPXXi0rsPcenfmvF2/TdJSOydj1vw/gMJBs1rGLKG0aNfYbqt/xKMAzd7 HbjVN4d7/XP46DKjaZMeQ3fpcoNzEA05MCaagYR+JJswQiHRQTQuQ9ewGHuS RWQlXqTGPdgZdSE+PIcthpFomwXPy6eSl6ktsVQwi8wwi+dJzo8ZxrSxtkXc afKg+d4KA1YMgw/jEHdwb9WXgXJ4D5qxHCalOfTfdULf68G0fBlqeQgaVRAa zQo0Oj80eh+Hi69n0csSe8Dqw7BzGUMuP/6dgeInpPb6jSa8cesG3iK1H1+/ g7//tI+FfSv3RC3c67Ryb9aBd97vwr/8oue8q/bN/3yItz54yEJ1Aj2GVfSZ WLpZgrg96MS1Ljuu08ZuMFje6nPhQb8Hd9tduH3dhpE7Bogp/eioGxMSF2Sy OSioTZXKBLFUC6fUhaIqhIJyFTlFABnZEuktICGaRZz2mZ1afInaazAOaGBm vDGLfLCIQnCINuATxXHnuo+2FkTv3TiGHqcw1r0H2aAAlbgAnaSA3gdeyDt8 sPEuWsUaV7AOtS4C9WQI6qkVqI1+qEweXp0Y086g1ziPftci+hZ86PV48LP2 Xvz45h3WSzfwOkP+q9cf458+6GDCr/8kVxfefK8Lb73XgUv1gwsf9eCdT1gM fNiGd2+NolW9jA59AF28T5vGj88Y4q+S2rWeOVzvc6Op34vmgSW0Dfpx75EH nSz/pQ+NGBe5IFEuQs7NkVLnhEpHu9O48EQTRlUfQ0W3gYI2gpw6iAx9JkWa yVEb7c6AL+mTEy+jM/XTRYdcMA+vwDochXNkG0uiJPruBfGQ8ayrOc6iYA9j vQXIRopQj5cw1LEO0aNFxrEgrFNZGDnU+idQGNahNEagNIegtASgsC5COb2A Qa0d7WobuhcohseNDq8L7V4nPpRM4NXbzXj9wSO8cb8Zr/7rI7z+s8d4471O vPE+UX08iDc/HcGlqyJcuibGgD2NoZkEHlH8x9oltE/6cX/chaud9RZ9B672 LOBanxe3+/1ER6xDq+gRBfGgxQdRxzwU7UZIdCuQ8X2qKT8MVsZqnQ81Y4oj ierUDkpTWxAmN5DRBpFSLSLFXXlCYsLx5s636LrOLz9BIhSDidnFPOCDeXCN oT0G10gCy6NZRGR5NDPCtRPfSEce4wMlyMVljA2k0HV3kZkyDLN2A2ZzGZbp Msz2IkyzeWjrjajWELcOLDBm/JDPetChnkWLzIjHC/NocTvx0O3AUCQKdbIE VSKPm0YWBw/pi29/hFd/yoLj3U689vMevPaLfvz84SSaxnxQBg6hCh5DvUYL WCyg0xzGI8aEyx0WfMaNxafMfFd6vPis1098K2geDKJtZA0942F0DAfR0u6D gjFfI56B2hqDYWYXWusmFqee4MiSx6E1hwNLBmVzAoJpiz4aRUq/ipTWg5TG hm2p8iV6PyS9bZh66LN9fpj71zE9EMeCKI3AhIB1ZQmGniQe39tCXzuNb7CK oZ4sHl6n3fN/jZo4TKZ9mK1VmGcqJFeGca4Ag1PA5HwWOlcSqvkY64JVdE4u oF07jfHNNNSJClTJ+ihzlKAkPUU8jYtvtn6EcT2jqiUHyWyRdUsZMk8V8sV9 KJYPoFo5gDpUgzp8CE3kEBN+AVdYM1zpcNL4vPi0ewlXewO41U+DGw6jdSyC LlkU/aooBpSx84NG+ol5GMxbmHKkMWZax4mtipOZMo5nijiYEVC2ZZC3JpA1 P0GKjpQyLiM1RQPU6vB/8O2uEkGnA+buAMw9G7ANJLAg3kNAWsS6qoq4vsY6 JIn2liRE/RVWvOsYbt9gKn2CScMhjOYaTNMHMNn3ia6CqfkSJhcK0Lv3oPWk ofHtYJgFeq91CV2mORraBTplqj7KUBCffFfA8Ve/+R98mzunGDfkMDFdxMRc GZKFCmTeCuT+Kg2QY7UKVWifRrhPhAdoGnAzWQRxayCCG4NR3B56gvuiLbRO 7LAC3sWwLguJqcg4UkL7WBRSlgFGOUOeaQMJWwmns4c4dRzg2FHBgaOI8qyA vD2DjG0HqelNDhqg1Y2k0fgyvr/BSfkYRu6TzJ2rRBgjviQWRgUEZGWsaw4Q NxwhYz6FrCuHjz9043FThP67w3xagX7q6PyYstF2SE3WMOXch4Gi6t0l6LwC NEtZSL1x9NhC6Lb5mTECUBKdoj5SlfOmFPnueVPKdxvk7DS0MUo6TmOYcFYg dZOcr06O/x4g8VXSD3GsVZhOPbg9sEZam7gzEsf90SRaJVl0KwUM6gsQG0uQ WPleexVqR5Xk1qDVBmAft+B07hRPncc4dR7hyFnDgbOK8lwRwlwOGUcSKccW RxipWR/pWfHrkxrGX0wYr2DqkRPmtiDMXU9ILYWFsTwC8grWtTXEp06QsTzF uiyH+x+40dYchEich0p7Aq3hGHrLMSMH6c0dYdJVI7F96HxlEitA6kujayaK LjuTjt2P4UD9eJuczH4fMhqfdLeEo6+/aTSs/B3sPhq4hRF1toKJ+QoknpeR KYhMSWQ3etznBtY0tIXbI7u4P5bBY3mOW7cCBgwliMwVjNv2IaMhqZwHfF3A iGgRXwxb8LlyBU9dT3HqOsGR6wgHrgOU6icg5vPIuDJILdDQFtaRYhWVcsy8 nFtfgfaeE6YWouq8QOUiqmV5FRGi2jYeYVUiQPfJLPNLCE55DJ0s6HpGMhhT laAw7kNvP4LeeQjdQg1a7wHGqKWB2SQ6Z2LomI1yrKGdqPqXN4lKultHNVeo nwL85nwFF73Cf4uZxSPuWC9QjTdQSReJi6jkKxzBCq51u3GdoevW0DaaWIbf m9hDi5KJQldCv7GKESvvb69BOsfQ56DB0/9CY2mkhxfxzZgJZ9MZnLp/hSP3 Cfbdhyi5q8i5i8h495Dy7XJsIOUNIDlvf4nSD7BL5U89CMHUvsUkkIJzTMCS vHzxqwHGGkTX9hCTHyHvjKO6cIzY9D6ULHe7RlPokaTQq+TQcDB4dzOLd1l2 0TEdRxsptZFS62wILUylE/HK+WnJJ8fPG0dQfojN1BcQ2yokSzJ04QkakIRU pKQiI5UrnW6mxACuDURxaySNu9TYI2WRhVsFvUxAQ9M1jDIKDZLGnHUfVcfn qDm/gF+8hWM5yYzrcex5hkPPU1S9xyj6DpBbLCPtzyG1TH+j5lJLASTc9m+N 52Kz+X3omkKYerzN/JjGrDgHn7yAoLaEDWMFy/pDOOe/huA9QpHGUfHQleut oI4yXMzG7dIEOlUJLnMX7VO7aLPsoGV6mxhieEQfe8TIpItmsXn4/I8aAbH2 q9/CFjqBmPYxSvsY+/bUCSm0GrZwmXnmSl8YV4c3cXM8hTuKLJq1Alon8+gw FTBe7/K3HjL+PmNEeYb9+WdITJWxLF7F15NufKF2o+Y7RYW2WPDXkA2UkVoV OEhhlRQCARQ2116C8OfY8TFAPNiGod7kPCLAJRXg1+QRNhQQsxSxM1NCmplG cJVR4KrL1F+Vlr1PHR7wDvvBEuyODGyuNCyeFEzeBMcOkutxbAXXvtdoWqqd /RbT6ycYYbIS862jVH+vM4tP2gP4ZU8Y/zW4gctU6WeSOG7Kd9GnysI9WcWu +Rhp2zFysycozp2g4qob/wlSXNaOMoovLdt4tsiqaLkGgfVDJkih16j6tQQH hV5dwXFJmHjxQ6s/g+LGJrRtaUwO5jAzLsDNwB7QC4iYBDyZFrDDOjHtzGOP 6VrwFlCgAxWX8yit5lFcE1CICMhFBaQ3Lo7YJDYy2I5s49fPv2x0g/0lap9f dJJvVJ+j9Z4fnS3r6OreQu9gAtrRPSzSAYOaKqKGfWybD5C0HSA7SymYNIqM 3GVaXZVW51Q+w+epr3EaP0SRETcXonGfd5FnOajacIylyorkRQn/9LwXTXEv BXVPDlMiAbMyAR4NpaQRhS0CNlkLbc8JSLgoBTNqdoljRcBeiNcw/1bvvdy4 OCYSp4SxaBrJxN5fNFpyT4pfQH97A4bzltwMZpiC3LICltUFrE3ShUxlxFl0 J+0VZOj5Odp8nt5fpAWV6J31c0vF1SLyawVkI3mk1uuH2ChQNIVkhAVvtQrJ i5/B/gkOi19D2pKFql/AFAOYXUG96Wis9f5FGytah4DYgoAtH1fMynGHpr9D XcWpqy1Ks0lJNjgi0T3sJIuvNEzBPZ6BrjkBff3EFe3fwfjjUREUpw4b89i0 5rE9U0DCUUB6nqt1F5Dz5ZHz5yHwFjneIhsRGk3F9bM1NAfCElJ7kL74wfr3 UCv/BmLW2vJhAXq62TT14aQ+vLS4Za4+yNWHufrIMqXh1BFOHW409gejF48z Lu0//UFDxYpb21C3sRQfyMFCIHNyTsV4ETAIWDNTWELZ4rQ7rosTQUmqOBXg CDUOhXDKnRdUvBnZxfPnX0pf/Ir5j7EROYOYsyvJZIoz26y8E6vABc7qpeH4 iNpHw/E2Gtnrj+iNJg/Oe8L+qtHTdJj/ClIao4Klno7CW7gBcdDlPPoL9QVt F8dXNgggRgBbBLBFAFucK0ahY+eNkXUF1h/OncHzLy8ezi19sUHkD88btoc4 rZRMNWRq4JQmTmmuN2xTeBOXmq2cnXdd/XVDvFrxKzh0+5D2CVCzOjXWD1xQ 9S4jxeKy/PSRVTd1sEiohBemmGtrFzr5DkLR+pIaj5Y+n7Hxeab4/PLd81am 9cwZNvbOsJk7+9G3UNcIlSCk9Epd47nHdt7NybstcMWeen8YIXgJwUt1ecMX zz1eT+x/+9XEyvnlDxCJnWGQi56YpAB07Ek7hfjfx+5+B9bl+hr3qhdy19/U mCHU6KEOJ7i+9BliXOMT4Qxb+TPoLv7lvE/yl797/bvX/39e4/f+G6K8oT4= \ \>"]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Show", "[", RowBox[{"Plot1o", ",", RowBox[{"(*", RowBox[{"Plot2", ","}], "*)"}], RowBox[{"(*", RowBox[{"Plot7", ",", "Plot8", ","}], "*)"}], "Plot8a", ",", "Plot8b", ",", "Plot8c", ",", "Plot8d", ",", "Plot8e", ",", "Plot9", ",", RowBox[{"{", RowBox[{ RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "False"}], ",", RowBox[{"(*", " ", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ","}], "*)"}], RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{ 3.581829050758353*^9, {3.5818446723169565`*^9, 3.581844677995367*^9}, { 3.582600731135765*^9, 3.582600735066972*^9}, 3.582603443777729*^9}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-5.049725817200001, -0.91402267168, -2.5171150319999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.5039729483999995`, -3.4179474162, 0.8334447550399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.22233146858, 4.123382132, -3.7660349453999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.7568182872, 0.98713617062, -4.3059296636}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.2769308574, 4.528350413799999, -6.114208473}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-6.8062261342, -4.0861545298, -0.33310200201999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{0.068872953796, 5.500047523, -5.7339956018}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-3.5763064549999997`, -4.5270276056, 3.0061761208}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.6592654263999997`, 4.514555414, -2.9160361906}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-1.2626582214199997`, -3.8586315194, 4.1126106938}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.521839347, -2.296961953, 4.674237261}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.2753591016, 0.6256504840799999, 2.3041429118}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.8012268482, -1.0379886972799999`, 4.2900559652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-0.35109219354, -4.8598083542, 6.5325938094}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.3990331804, 3.4187033066, -0.136744352812}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.9895035328, -3.8988826831999996`, 6.881248256399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.7193417374, 1.86757841128, 1.8664445756799999`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.47241260273999996`, -2.281844145, 3.200250981}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{3.6643676866, 1.4056726851, 0.5243989649999999}, 0.24]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-6.2432767587999995`, 1.28516485808, -5.6723905342}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-0.24194161978, 1.18512276364, -1.53041349836}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.7222193256, -2.5987511952, -3.6539741936}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-3.6331872076, 5.1765264318, -7.494653316}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.0821691294, -5.5542826592, 0.28453604382}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.90209850062, 7.057181747, -6.757093258199999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.7787391088, 5.958872995799999, -3.824805424}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.35412095982, -6.117043062, 7.7888836542}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.8095246668, 4.6271830836, -0.9830354652}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{3.2261402271999997`, -4.2413010344, 8.4684291238}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.435779863199999, 1.59507992208, 2.9366342039999997`}, 0.12]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-5.700246205803357, -0.01282703717543554, -1.665839722619272}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-3.2203404604242687`, 3.4023531489469616`, -3.491119399301228}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-3.8345809131185207`, -4.3736573506860745`, 0.05979572335551386}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{0.7481490536885506, 5.055956224600869, -2.835735746637914}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-5.373117585554261, 1.8976031385417127`, -3.439197250930733}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-7.8100469461818465`, -1.6314467007731497`, \ -1.566571289885618}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-2.799954426783565, 5.42248786660917, -5.172420513131535}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-6.130289259142632, -5.0120326183589405`, \ -1.1367556003222303`}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.4553548406906416, 6.399245757536324, -4.797711588001607}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-4.226009334665408, -3.5569642992592145`, 3.778745437978503}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.131438982806225, 3.5697523175375587`, -3.834948178521411}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.6359128160949288, -4.914321630808731, 3.4397744688702376`}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.376960016217313, 4.136539990134114, -0.03191163870599656}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{2.023017171194928, -1.1840539725140822`, 5.361705270361781}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.8736502199831175`, 1.6993793853525787`, 3.107720052466715}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{4.3445247341839455`, 0.0281429305889227, 5.074139207662704}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.902554379947563, -3.7574194083596963`, 7.1963920235070375`}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{7.770574087958168, 2.380859866774159, -0.9997845305681223}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{1.4382384634129186`, -2.7978460584850664`, 7.54745030856586}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{7.346674395134039, 2.905085029170666, 2.7294040589939597`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-4.399205428596644, -1.8152183061845641`, -3.368390341380727}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.0342316551757307`, 1.6401917094530385`, -5.315381705898771}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-5.173364983681479, -2.4622374817139256`, 1.6070937867244857`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{1.6965138834714495`, 3.19080803939913, -4.696334144162085}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-4.140518988845739, 0.07666920269828748, -5.172662076269266}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-6.461919696218153, -3.4851754168268494`, -3.174751244114382}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-1.7539072880164353`, 3.634212960990828, -7.055996432868463}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-7.482163009257368, -3.1602764412410593`, 0.47055159628223076`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.5931007482826417, 4.600849288463676, -6.6702796155983926`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.9266035753345916`, -5.497090911940786, 2.2336068036214973`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{3.1870918699937745`, 5.459358510462442, -1.9971242026785891`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-1.8894036267450707`, -2.8029414079912685`, 4.785446918729762}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{5.1370545033826875`, 2.139995946265884, -1.8419028683740029`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{3.0206615228050717`, -3.4098699334859175`, 3.9867692516382194`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{5.677067983216883, -0.4480784171925787, 1.5005657711332838`}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{5.257928962216054, -2.104120325148922, 3.505972722737295}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.20036999286756285`, -5.9621973000403035`, 5.868795595292961}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{7.027492272841832, 4.456546746425841, 0.7262958249441226}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{2.5407686021870814`, -4.999919307914933, 6.215046204234139}, 1.4]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{8.09200907966596, 0.8300717933893336, 1.00348509236604}, 1.4]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-3.960917166451133, -0.6634214089671405, 0.14255361226060348`}, 1.246]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.9736448327170033, 3.1880449336416516`, -2.1355908356815267`}, 1.246]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-0.010390892318845601`, -1.3566639387981594`, 3.8810287503280554`}, 1.246]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{3.258073777799869, 2.304238345028641, 1.2859900721361828`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.871198213948867, -2.3698911771928586`, \ -1.3102153076606031`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-0.015248783082997264`, 1.5117036283583485`, -3.710843463118473}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.955216097798846, -3.2070243512018397`, 2.5194732116719436`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{4.070661595400131, 0.5071070251713587, -0.23719214213618267`}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.4], SphereBox[{0.31654635466312253`, -1.4744044461734331`, 1.992397209275417}, 1.246]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.4], SphereBox[{2.2950206335293006`, 0.9210563657123858, 0.36565527337796033`}, 1.246]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.7568182872, 0.98713617062, -4.3059296636}, {-5.049725817200001, -0.91402267168, \ -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.7568182872, 0.98713617062, -4.3059296636}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, \ {-5.049725817200001, -0.91402267168, -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-2.2769308574, 4.528350413799999, -6.114208473}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.8062261342, -4.0861545298, -0.33310200201999995`}, \ {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.8062261342, -4.0861545298, -0.33310200201999995`}, \ {-7.1359833211999995`, -2.5583110587999998`, -2.370661267}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.068872953796, 5.500047523, -5.7339956018}, {1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.068872953796, 5.500047523, -5.7339956018}, {-2.2769308574, 4.528350413799999, -6.114208473}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.5763064549999997`, -4.5270276056, 3.0061761208}, {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6592654263999997`, 4.514555414, -2.9160361906}, { 1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.2626582214199997`, -3.8586315194, 4.1126106938}, {-3.5763064549999997`, -4.5270276056, 3.0061761208}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, { 3.6592654263999997`, 4.514555414, -2.9160361906}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.8012268482, -1.0379886972799999`, 4.2900559652}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.8012268482, -1.0379886972799999`, 4.2900559652}, { 5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.35109219354, -4.8598083542, 6.5325938094}, {-1.2626582214199997`, -3.8586315194, 4.1126106938}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.3990331804, 3.4187033066, -0.136744352812}, {4.7570072598, 3.1382679681999996`, -0.9369072535399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{1.9895035328, -3.8988826831999996`, 6.881248256399999}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{1.9895035328, -3.8988826831999996`, 6.881248256399999}, {-0.35109219354, -4.8598083542, 6.5325938094}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.7193417374, 1.86757841128, 1.8664445756799999`}, { 5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.7193417374, 1.86757841128, 1.8664445756799999`}, { 7.3990331804, 3.4187033066, -0.136744352812}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, \ {-5.049725817200001, -0.91402267168, -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, \ {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, { 1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.47241260273999996`, -2.281844145, 3.200250981}, {-1.2626582214199997`, -3.8586315194, 4.1126106938}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.47241260273999996`, -2.281844145, 3.200250981}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6643676866, 1.4056726851, 0.5243989649999999}, {4.7570072598, 3.1382679681999996`, -0.9369072535399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6643676866, 1.4056726851, 0.5243989649999999}, {5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.2432767587999995`, 1.28516485808, -5.6723905342}, {-4.7568182872, 0.98713617062, -4.3059296636}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, \ {-3.4160576902, -1.5166562930799998`, -0.5838308476999999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.24194161978, 1.18512276364, -1.53041349836}, {-0.49444680789999995`, 2.349874281, -2.9232171493999997`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-8.7222193256, -2.5987511952, -3.6539741936}, \ {-7.1359833211999995`, -2.5583110587999998`, -2.370661267}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.6331872076, 5.1765264318, -7.494653316}, {-2.2769308574, 4.528350413799999, -6.114208473}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-8.0821691294, -5.5542826592, 0.28453604382}, {-6.8062261342, -4.0861545298, -0.33310200201999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.90209850062, 7.057181747, -6.757093258199999}, { 0.068872953796, 5.500047523, -5.7339956018}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, {-3.5763064549999997`, -4.5270276056, 3.0061761208}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.7787391088, 5.958872995799999, -3.824805424}, { 3.6592654263999997`, 4.514555414, -2.9160361906}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, { 4.8012268482, -1.0379886972799999`, 4.2900559652}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.35412095982, -6.117043062, 7.7888836542}, {-0.35109219354, -4.8598083542, 6.5325938094}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{8.8095246668, 4.6271830836, -0.9830354652}, {7.3990331804, 3.4187033066, -0.136744352812}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.2261402271999997`, -4.2413010344, 8.4684291238}, { 1.9895035328, -3.8988826831999996`, 6.881248256399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{9.435779863199999, 1.59507992208, 2.9366342039999997`}, { 7.7193417374, 1.86757841128, 1.8664445756799999`}}, 0.1]}}, AspectRatio->Automatic, AutomaticImageSize->True, Boxed->False, ImageSize->{360., 360.}, SphericalRegion->True, ViewPoint->{0.8573262300241968, -2.47303115200629, -2.1445532533651246`}, ViewVertical->{0.2896486264547701, -1.1439026692964365`, 0.26843376791309653`}]], "Output", CellChangeTimes->{ 3.582562830532828*^9, 3.582563576510538*^9, 3.5825636688627005`*^9, 3.5825637943649206`*^9, 3.582563848543816*^9, 3.582563920553542*^9, 3.582564074728613*^9, 3.5825641405295286`*^9, 3.582564291537794*^9, { 3.5825644142632093`*^9, 3.5825644388020525`*^9}, 3.582564524071802*^9, 3.5825646260179815`*^9, 3.5825647113813314`*^9, 3.5825647998802867`*^9, 3.582599445662307*^9, 3.582599563255314*^9, {3.5825995989637766`*^9, 3.5825996196182127`*^9}, {3.5825997265564003`*^9, 3.5825997557752514`*^9}, 3.5825999697920275`*^9, 3.5826000403665514`*^9, 3.582600365861123*^9, 3.5826007531942034`*^9, 3.5826013997685394`*^9, 3.5826017147798924`*^9, { 3.5826017564631653`*^9, 3.582601779941207*^9}, {3.5826019546615143`*^9, 3.582601977484354*^9}, 3.5826034541049476`*^9, 3.58260820052275*^9, 3.5826082920949106`*^9, 3.5826108888448715`*^9, 3.582610956767391*^9, { 3.5826110038014736`*^9, 3.5826110778704033`*^9}, 3.5826111126428647`*^9, { 3.582611157290143*^9, 3.582611297284789*^9}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsvPeXZOdxJXinSWlkKFLSaFZn92hnNbvz087IUDMrjTSiJFIUzZAUDUgQ Hmigve9q3+W9zUrvvav03tvKLJ9Zvr2H6UY3GiRAAJR2tHuk4d7vZTbQzZ0/ Qed0ZGZlVed7X8SNGzfeiy+/tfPkvt2Hd57c/9rO3/1qx85j+/a/duJ3v3K0 g2996l8A/2KfsN+FeP0z4NHDz/jvZ/vFg3jnn1//8+t/fi1e66WnT+HG5ddx 2V7Gu+ECNp78VchyHUvjF/Hfi1l8Rnrv01i6eh/LVx9g5coD3H33p9XH/8en cfHi/w2legPv9p7CP6lO/Evp7c9g+cYDhJZvQpnZhipzAeo0LXUBmgSf43yO bEMT2kK0chPNC/eLrQ81tD80YCkheGQI/0/vXvzsxuanpbd/HSu3HkCZ34Kq yA+gaQsXoMvTchegz9J4ID0PoudB9DG+H6YFaN5NrG7f/62fX5Cwy/cdrWMb 2y6QdTmxeb4X/3jqe9ghvfeLuPf+R1AWN6Aq86zL/ECavnxhBwylC1yskedh 5HkYeR5GnoeR52Hkgo1JGhdriNAC29C71vH2g48++7GP7iO4fAOKto9UbR+p n/DRdttHDz7dPsG4YwH5p+T4sT8G7ePn/mu4uHIDAy8MSsH4R9UJRJpXec4b UFe2oa3wvGkGmrFyEcbyRZhKl+gPMx9/mY8XYS7SuBgTF2LKtBfAszD6NrC2 eQ+/Kh3nXzMQ96EstAKhFsEQgSi0AqH7uUDooj8fiAfSp1xcWYPsj76FO65l fHDh4qOlmKSnzyFgLSF0dAjBrnN0Qhaa6jZ0s/zIWZ767CWYZq/AXL0Kc+Ua LNXrsM4KuwFr7QbDZq1d55Kss+J3V2GpXJYWac5zeTw1c3wLpuAGkvnL+CXp eL/dCnFhXQqxmuHVPgozI6znEg2PYvx4fLlEA11keDzG7nWY9wzgrZPH8I+x Lvz0H/7bo6WZ23F/5YQO3Z0yqM6fh652EfraFRhr12DiqZtnb8Iye4sLuA1r /Q6s83d2wLZwh//NtngHdppt4TZs87dgq9+Q1imtsHQZFjrfnNqCObSGte27 vygd7ZfRuP12GwNcVLWFAb2Eg08wsAOm4iUewlygk/hKei7wd3SYwMIjMO98 cQIDzw0iMTCK//7ebd3jIftVNG69hV5XAc8cVWGqTw7dhJrruglFbgtjkUVM RJcxGVvBVLzBI8oSjU/BvnKXh3WsvMVXb8K+/AbsS69L67XN3ZJiaa1chZWn YUltwhxu4v7DDz/dPl5k9TI0lQ1oZoluQkNHaBgIDePsZZj430yEhrlMB1Wu 83iW6g0+zApcWKrEhcBNmRgqXsaEtYxzLw3C2KeAzhBCsngFuicz6957P4Gm tAxddQOH5CkcOWeBrl+JXo0L56wxdFkT6LEn0edIod+ZRr8rw2MO8PGz6Hek yYMbcKzdh2P1bTia92h3uWQue+kNabnWOpfLU7LS69YkIRRa+lT70I3bd7nM dS5zC9oag1e7BEPtagsyRLy5eosrIlxqd1qQmbtDlrBJwJm7TYBbGYMxbx2H uETDkAYmq4vuJFDCa0gVLz3BIZ9BbJWJVlnFdHYJXTMpPHPWjcFeF4xd01xd GgPODIbcOQx78xj15j+F0ZkC/g1fFjDiyWPElcdkaB7O9Ye0B1wwF924x9i+ RQRzsXWilwGxMZesySY2rrwlHfje+x9ylU0GclNKClmuieFoDd2eLE4ZQzhr iOCcMYrzxhhksQamY/zb4pUd9KCAkH2Z/lwS/nyT/nwDr704DM2gAVZ3GNYy /Zq/JEHIIiD07oeax+vNn0vR1ZWWMBzhwaxenLGHcWQ6hJeO+6EadEM7oseI t4gxXwkT/jImA7RghQutYIo2GRavy5jg+xP8mzFmgXn+Dpwb78K59g6jfZ/R vkcHvNlyQPkqbLkNWJKL0hloeWzd7DqGokV08PinbEGcs4XRSWT1WOLotRBZ NiLLTv9LlsGALcNzqUNJtDgadHSDx2i8jSPnHZD3mWG1OgnuDYlJhMOFB6yp dVgiS0+s/teweusN9Lg8OENcnLUH0OWIS5He3R/Dya4ozKMOKGxJTAVnIQvX MM2w7IA8XsfvQJ6oYzrB9+I1hmUWU5Eq/47emCmzPF+Ec/PHhMG79MA79MDb sC8wzclxNlYba64BQ3YOQ+E4TljtXPUMjx9Cpz2KHlsC/VzxIFc65Mhi2JXD iDv/aYy6C0ypEWcBw7YcKfM29nY6MXLeCrvNB0ftsgQI24JwNFmkcqOFtFQT 6fqW+vGF/wd028w4a7bQ1TPoskek5B10EsPuMnb2pDE2GodlxMwFz0ORWKCr F6FML7JYL9H4WrIFKNLzkCfn6AQ6I0In+Ct8XuHi32PS/6i1+CXmADPTTrbW Jmt4bngKp60WLtiD81x0tyOGPhLIgLTgHEYJoTF3EeMzAlI0f+VTxFeFix8n Aif4dpc6jq5TVtgsIcqdLFPtIRHwgLnwNh3AdCMh2Ih9W26TDlhUPy7cfh0b zTjOGdQ4b3Ggi3jrsycwwAMPu0oY99bQqavgtc4MdNMxmJUeqpMVqLMr0DBq mnxjB4t+A78HdZ5v55ehJF0I3yiS9EW0DllgFhZGwrnxvuQD+8p9Kfi6/DoO 6Yx4blyGszYHOh0B9DhjJMmUtO4RJ9OM/p/wVjHppy+DBFaYnxeh8XOno61n WYTcYErh6FELrAaCNJCkv98n2OjzVR6vQWcs85jzb7UBd4lIIN/ceAOqlida FP8b+OD9t2H1y9FpNKDL4kGvLULspTEknQpPwzcPWWgJh2UVnB0rwKYMwxCe Jb7XyBrrlAnrzAddeY35oC2vsk7Qik2o6Bpllq5JLdAlc5D5azAv3oVDnGLz IfTVK6yXAezRmvC8TIMOnQO9jkjbFYShs4xxcfyZGqYChFdYuJZwi9PNCeHq pR18WKRakicXsOugCXpVFNZQgoeahYIM6dz8gIdjBFZ/3PLIIlFYf50eISzK pMNs7Ulv/Cbmi1o4Aip0Gc3oMfvQb41jiKk26hRBoeODizwLrozkvWec/30y jTirio4fp69swlClzW7uoFLbxP8sFUxRvdR0irLQbDmE5yyPzPF5FY5NgY93 MR6rYmAmjJd1ZryoMOGQwkm6S5AAiAkHIemu0RF0YnCBucXFx4m35DJUqRU6 X5UhIFXZBl1xoGcGyskYXBSNajKTPDKP6UAduuJ1uuNDuuMnsDeZlCvMlHmy Uf0m3UGKKC0+ckWrIv4B3rzVxHJZD3dQi26DDX3mAAYsCTJPAeOuFjCmw8s8 FwY7vYYBTwOHz6aQH7QgJjfTDZRNrNjGurBtGGj6mhArW9Szm1ARPMoC/cLU UsS5LoLKvPgWlKVtDAZSOO/x42WDHS+p7Dii9GKQoBy2E5Ti2DMEZUD4URy/ QT80oc6sQp1bY3quQeTnOsF9WpnG6GAULn+R0pw+y/BY9JuCQJoOzjFHH7Tc skZQEiEOwVPzt8lVl2GrNrBx6xaUj7vlN7FY0KBRMcAd0KNHb0c/y/OgOYUR G+nKwxoRWGgjhKdC3aNlp9ChX4LsvB9zIyp0DJtwfNRK0Tl/Eb8P4zw1zRzl G72jqbGpIIiUwjNUAIrUEuQxZn1sDoPhPIZCaZxw+4gSD17WuHFU6Wc0shhl OzvhqZN5F+nFlVZEUmv0CHVTTpzCJtUClUVpE8OM2thxMxxkGVN6VlL9SnpN kebxEiv0KIGQ3oBz66cSWASbOEipDipT+wILd30NG3debzulVUv/Gh+8dw8r RR1WKyZ4/Ab0aB3o14cwZKL/7ZQNpFSROgpqF1WaBEFS1hW3JCm+66QLX//a Hrz0zZ145gf78OzTe6iqMjAuUKbTOzp6R1PfgpoZpaysS3mkyCyz+M5h1BOn bGE1DGdwwhvEy3p6R+vFMWUQI9Y8xpwtrEwHlxhz5l+CuZjZ5PGpJguUesSa 6HOGGLSul6dR19gRyFaYs2xKS1tsezcp4IV3VumdZSmdLORVxwaZZe3HkvSw r1C3L5NR5jew8cYb+DnX3L3ZRLNooGvM8MzQNWq6RkfXGNOt1J4RFL8owVjN w2hZIkSgDNUt/Mm3j+PLXz+EV585iAMv7MWBV/Zi4HQ/jNNOyNVB6TPGWQ7U NbqlytMs0TWkGHlqnhzupq4JU0ZmcWImxFTy4xXdDI4pQhi1MoXdLC8ihUMC MKsEDKkquyXhVce278CABR1DVhx6bQi5MQsqiaDUgmpooqNWkfHEVQFFlsdN NaiIFkhEa6Q0wTJ0TZOuaZJhGpS7S3TNm/8/11xajmJVuKZsgcfDdFLaMaBt uWbUUfzENcSlKkPFy8wW5cZAVv3P3ziIL333CF584RiO7juGU4ePYPT8OVS1 FlQ1RmQ0VhiVUehlQWjHZ6AeckPRa8fUOTPGTunQf1yBs0cnyBAW7Jyw4aUB E84c16D/DJmu04OeXj86B8NEjMgj5lCeSClu44+/sgdf+a/78b2vvYb9T+3G yMnTcM9SwJLlNGQ39WwrhxXMYQXPV5Gha8j4QjYK19hZ/uwUxfZVuqZJ1yxv /o9cs5LR0DUmrJasRI4DPdNW9GsYcX1Scs3EDKMXJtMQlGoeQkMiFTXYQBT8 6fdP4i+/ewgvvtaB3cdPYfepUzivVGEyUoYyVpbEw3hogRqeBYW1Qe5jufRU oKT2UdlZN1jz1CT7bq0deyYdeLXPAkWnDcpON5SivtA1qr4ATN0exA7KEN0/ gcjeEfzNX+3GD76+B6/+4AA6dh/GgX0HMepLM4FJ+u0EVjF0Cp6ngucrp56S pxYl4WgWHcwGXbNB1KxTvq5Ss68I1Lz+865pZLRYLbRdU6JrJg3oV/romjhJ uCBpp6nQHAEptOoy68EKXdOka1bR50nhhed68cyBE3jh+HE8ffwoxuNpGJfo ukW6cIEJOM9ErJPAZ5dxlJLzVLCKk+44TrujOO0Moou1qccfxgsaD54aposG /DgyRhEvz+GcpoQewywGzHVoTQV4qNH8bF++8p3j+OELJ7D71eM4fPgYXjt4 GGfUJrqGzFzfkBJYNUu3sPVUFImYHJM4zRqVZOmuUtWzkbBv0jUb7CHX2NA1 1nD/g/efdM2/QiNNCs6Z6R6b5Bqvh2CWezCkiZIOs6xPonNjvxKbl+SqJkfg sq/XV1ZwXBaA+YweixELjumt4qrIYpMS17DYgH6hAe0C1e8cJUeNVFol8krk jnwNAz43+rxOylkLBuNJDMZCeFHrxHGNFyNE65gIiVQXhX7j/082pFIt9ON+ TRx//L0OfOmZDjz32gkcOcKEphnmyIE07RyTr7bGUJDXeI7yIt2SZ9ln3yRL zbJVpmu2fgTbFjX/5uuwrV+BpdF4pGRabvkSGkm6JUu35OmWogPrsy70Tjox qAphmBESDSs7DCrrGtXBHIX+AuvlIlGzhOOnrcgorYimfKzVKzDRDcaFZRho +vllnuYSqxORNssuqUKZWiRnFaro9zvRO2NjQ22iS2IYiPmx22jFgMqLYV0M o5YcJihvp0QCRhclNSclMlW6jmrxmU4t/uz54/jGzhNQDw5D5bBRJ5D/5ui6 OtVOrUHKJ3VX6BKe63Se4aCelaUr/P1F2LYf0th0b96Gdf0i0pcv/bxX4syj NL2StUpeWaVXfDMuDExTVTCXRkkF4zNFqcWXx2dZt1lo8nMY8LLWHrMi73TB VKowWIsw0gzzizxDYfRefZ7pTo1b5epKDH6xgqliCX0BO3p8FnT5vBiIhtEf 9ULjp1fkLgxrIhg1Z6gtS1LvMx2Zl4S+6Dc17LG0RZHHBCN12Ut77ciqbYhF fdDXCU6ahjmrqlFfV6maysydwpwEUFmuClm2CM38FmwXHsC6/RasmzdgWd/C /Q8/fMIrv4XL9RhWk2SXNL1SoFeqLmzOE+LjbgypIxixEC/uHCYDRZ5hmXip Mm6zODYVoNL0wObxUPvPUekKm2cjUJ/Dv4e2VmflZL9QIdeWqoQJebhYxGQx T6eY0U1l0DnjRF8kAHXcjc05D7RmJ4aUAYwYmEWOAoUMIRqipqccFF2VOssM LixK1250hMEJVQbOcScSzEYdHaFlpmpm6cAqS2iF2VeiQwoteE7lS5jK5aFZ WIf1wj065Q4sm1dhajLjniSVe1dW0YwZ6RV6JG9nOXJiY86NStaDAa66hRUK EW+W/Wqe5FKkV8p4dpcSWoUHhniMjSEbRi6djWJ1Fv8BWj5qqlWKiArdUSaC S5CVuMQSs6KYJkb06PRqcI4E1hv0Il9w8ZgeVLNuDMqYQdooxqwZZhDxGRDX G5i5iTqxwuzNzbMBJQaJgaPKJDp7ffAb7ew7FnhM4pKmZKbKS8IVxGaB2CwQ c4U8JvNpqBaasFx4E5btmzBvXMTavXtPeOSv8MHDe2hEqFviFmYPPVJ2Yr3u xvaiF8EZ0q2cODGKoKVZqDPMoBwbyhA6jhhgNjqgSSShLpR5lmV2hnwuiecS 1PSCslCAnCYrEmNFZkOJeCvGyR8unHEqWXl8yKedjIJLOuYFHlNncGNYyDoe c9zB/ydlLb0aY1FPMnPJC2pmgrrAqkQQvHDSD4N6Bkafj1KuBmWZ3mOWThMY snyZ3mgBc0IcP5+AbvUSzBfuwLx1DclrtzSPN0R/icvVBJoR8kiqxa5r5JGt BTfVnRdh/wyGFDGMCJZ1trxxuM+JsS526+QPRSrHnizPvphGOKpy4jlHzZ0j 0Wd5NhnGJYXxQgKj9MJIIYaeiAOn7BrkYvaW90v0fo3eX/Di8soMBid8GNHE MMZMHXdn2afSm+EivSGylR7JEHfkBHW+SmkTwOTkDAz+EMVsld6n15gasjw9 KPBQzEp4lI6fi8BEL5i2bsK4dglvf/gRnnDFX+DDh2+jESR5xD9JFVfIhZmo B8GEFxMWDw4PRXBkMoFj8gT+67NaqEbMULk8LD5pKqE0xWKGqoiW5s+ZNKkr hSnaRI6AYjBGaMP5OAazEfQl/Uj5NC0gph+5n+wx75HcP5en+6fYCukSTBcu w013+nNUjiJNCbQkUzVVokgt4eBkGOf6PbAoNXQ/f5el2xiGyTxTskAgFOlO hmA0H8V4JQ/j1i0YNq7h7Y/+Tvv4NZQ/x+VyEnarBZNmB87oXDhHeHaZPOgz k/RpZ9nMv0bHf3W3A995yYqXj1NEjcVwQp/GJFvcyUgaU7EUJhO0JFee4pHT 1L1Zrpw2kI2jPx1hUfBiaTNNAMbRDNPrCeF1eqDikghKpMaVxgwWihSHU2FJ jYySNMbohQkfPREkwNgdTcdzmE7k0G2N4NUOOwzTRij9AZZS/k2WXmt7frQg ABjFEIGgWtmGfv26WL3ucQz8uXR3cCI6h9NyO+WgE516F5OfvZjZjX7Gf9BC +qKN0hPf+cEE9u414eVTTjzXE8bzwrpC6LLRz+EURiMpjNATIySMoQRXnkqg N0l1XgigsuLA1lrr7pOEu4ARzSg9kGmlxBpTYos4uEwcXG/OYJFeGGSMh7VJ FjE2WEzHMQ9T0t/y+pTwOjH4nV0GTI+aJcExkWbaZgT06flcnCuPYTBHLUly iF+7xxT4O/3j1Pi/IkLdri5vsYG+gBFvHudVDnTrnOgxUnKZ6AF6YYhekDxg 9WL3MwMwDExjYFyFjukA9owG8VxfWPLGrhEKBH8KfcEkekMJaDJhBGb9KK84 sb1txca6GR99dL99n/p3camYZPaZ0UzaJBwIityQKNKDKystL9xam0E8EsKg mh41iqs2NBc97eVKeayxYAp7RmbQ3WuFWqfHSDKJs7EkDvsTOOSJ4iljHN+b 9uGksw5ldBuNq++gcfkd3Hv403YWtPTEv5Fu6YjLfurKVuvOI/tmcUlswBxG t8aFHr0bvUYvPeLFoHUGw3Yf9p1VYODoJCzyKYw7vSRzms2LMf7NmIEeU7sx MmnHPHnlyrYTF7eJgW07NrZsWFu3CG+0bg/+Wyy6TWiELWiSFpqCFoSOYVJc bDvjWtOLG3TGYsWHWIKOZnIMWMUdABq7pCFfCjt7HdhzwoozYyY8RRHyPVUY T1EzPyX3Yz9Pp9udhzZ9AdokLU6LsgcO0fxb4pb9IyGhfMIjTeni3yS1y1Ck gJFIESeZHaeNHhwaVuPYsBZnZDykwoYBewhDzhCefW4A2iEN1DYbERtk/vpZ THwsrwJDHhYXlj9ibJD/r1KxYX2Tsd+0Y2Xdig8/uv8L0uH/D3zw4D4WvWYs M0lWmCSNYkvdtaiiRZhXGvTMqvCMFzfXZxCJBxBJh6ALRNHjSGKfPor/fMCO p89Z8cq4GfsZwH08dK+LUs0bhj7HIGdp6da9cT29oqdX9GGan5Th2cLq1oNH fZuynTUTyRIGmH/HLaJhYC/FVXVafei2+NFrDqLPFCJmvDg+pEXHqA4dYzoc HNLhxAElbBojptw+jM4wL2coob0hjHgoy1zkfgf5xuxCv46ye8qEpXVip2nF B8yaf9m+jyzcMj9jwWLMhiWW02W6pVEVgoZlfF64RpRygqbhYaZdbXrwa3SR B/WaC9oIM9vrxvePEredckxoVfyZ2PbQHf4IjMUL0niIuIvOfpKO+aUnxkM+ Hh2gaxLFG3j7/kfylmcOtcc9bOcjuPjKGN4yOglq8d7vwErd3GEx4hTxcNbu Riczp9ceRL+NeU0OH7ZRcAizk0UdCZyX2XF60oTdpzSQ9ZlhsxrQ5wzzDMlq frKaP0a4RzAwE0K/O4Beeq2b2rtTY4E5EP+V9ozET+iomteCuagN82kHFvJO LFP5NWddkrNEl7BFZ20v0Wkr1MezTnS77Oimg7pn3HipR4sTJxUwDPaj2+PC EDElxg/Mpct0jrgT/6uw8FG8shRbIwhiZkO4zZSi0Vmm8BaM3jUxR4Ppxz31 afTuuoS7xXv4p6nj+Kcra61hlV+RRpFWbj6knNhiy7/NxuECVAkaP03JT2tc eYjGpXd+Wfrzz+L999+G1q/CKbMOZ2xWnLfTFw4/+h1hDDqiLZ/aKTNJExMu Vg4Pa6Q3s4OaM4PP4dV9aljULsjMVpxVsM8jgPuCaVoKvYEEdX0MXcyT804/ RUgZ1swmLNEG7r/7QXu85rexXkpjNmxDLeFAPevAfNGJpbILK/Rzc86F1QUX cmUHP8OKTvqxk/7tcBjw6qgML+9XQTcoQ9e0Gmd1Mzin9eGc2id12dqUuFEl pmR+BVYxMyPmIMpieuQKLGLkI0d/p7Zhjm7C5FvF/Xc+lD3u4l/A5Tv/gInz dtwb78c/nnoK/+/FtXYa/TruvvdThBs3qSC3WxNahL02357Qag8F6Qh7neDK GI2w1wa2ES3fxL13fvoL7Rom/F8tG3DapMA5mwldDtZNZwADTuLaSRXnoN8d 9DmFrYz1ddqfhzxAtRakUeQeHmH2nbPDSW6cCuQwyJzoFwxiibLnXGezs8ZK dAV2MYwwdxu26g3YxNRFag3myMJn2lz5/sP7WK1lUIrbUM44UGEnPMuiUyem 5+ecOM1TO0Hbp1dgl3oSe5Qy7JuexndfVmG6Tw+Z3Ig+Y5gWQf+jZwMFqy4C RXiRh77TGgWo3WJEbsJauc44MBZiUCGzDUtsAyb/CmPwAaZaQTjcDsLFrTuY PDKJh+M9+Iej38bfbazh0+1W9e57HyLcvC5dun80xqRvjzGJYbVHfPTxqNrj PCRomsVL79tGvHADrQGU/x0/YURqjIglqMI5ixbdNjsZwseIRBkRKkMnWwRX ntEoYtpXYiTKTCy2GVG2GTFavIp959j0yfywB8KQR0uYZqRkAbYYXrY5oTlp SsLZvA/Hyj1G5s1WZCrXYMtvwZpexv0fffDZNkBuXtvEzRubSJOqM0U7BtxG 7FZN4BXZGPaolThqMBE8BAEDv6uL1M9KpZ/SY9gaJzGyfZAsyZ9p4m6eOYEh QwwGZoB9gaCYf12KzKOoWAtXmKVbjMgq0rOX2sE48vH84xvQnJjC++Od+Jmp +1PtmiLGyVSlDYynFtAfKmCINkIbJUrHidZxP22mQP8sCuorXOAD8+S3mYPt 0TsxW8YsMQQZEPemxHfio+slHRaqBky5lOiymtBr82DAEWqlBgMx6aJjvezh AlXijJ1vlF1vvA51ck7cE0zP4TdwoMMJB8uEKZqEKsnuN8G/jVaYPmXIeFK6 /LY0v+NYfacVEDG0UbsJW/kSrHl6YWmLn9IaHrn19l2cJFWeJlWecbjJSSza PJ8+RwSD9hh2n3PiyDEXLGMGUqa4tpXleUwweT+HcU+WUobmykhXCkbZr8o8 VWmCw774FiPxRmuIocJjS1EgV8ZXsH75TUy2wnC03YJfukLMnJ3CR+Nn8TPd Wendxq276KOuP2qy4YSFnRjtPDuyLla2bhMlC7uyXqFBtexNhFFbTvtLpEUu s0JGYN5YmDNiIlIKi5iGjIppyE1SQRxLDMNyzYROowq9VgLR5sewI86lsLuS wkCXBuje8BzUsXlokgsUi4vSbVhdbgkd8hhGh0Jw+6LQ5hahyS5AlRZXtqis 47MMXwUy5pOFoHQ+GiNZFrdn73xyAz83T+ptVS6Rp2Nu0j5p6ZyD1ZslpodV vt/JnoUVa4QuHnNk8fxeF/Rj1C7sTGW+4g7I/EVGQ0pHvhJXCyZn2Pl72Pby z6d9dTjEJIWYHZhnVOqvtyNyCbbMGiMy/ygax9ozZNeuvYVA1xT+fuwkGoPH cNxkxEkrCyKZo8smUpN9EFX9oIUKzeLbwRz04/MYMVO0CTP52ZqwWdP7oAhV ecSrxMFlBuYi6xVNBEQMFfvm0T1qQjZuRDajR49JzwaT7ZUt3C7ReRIMgyDG pMLzzINFKvUlaDMrDECDGU8rNnG0P4KQ3ANrNAVdcUW6zqrOL0HFgCjT8wxG vZVLiUZ7nuXd1rjVYmt8wMbzspaWsX7jNj7b7j5EMGIpLQlTg/OUaV2OmXYw yDZOceMzx+amIF2/e+VkEFPDAeiZk/LQLPOQFiEAIuK5SrKsYDrE3AyUmJ+M EslW7p9nboq5ovvME+bLo2EfVl9rZhkb1+7gV9rjy1eur+Ma7TrtxjXaVdrl tfOtoB1vwycxMwtn9yQU/YOY6umk8HGgh+Kn384g2f3kzCBG6dlxexgT9ggm SP+TriiT2RXB79PZEYyxXxm1BDFsCMCQXydceEL1K1JGWUoXMWJlHVZY0Ttu gtKsZvdnljAg9OqYjTXdxcog7sUFGawoA5VkoDJNNhWrDNYajKU1jPpnMbhH g2WzkSJxEfqKuCUqpm6aUBdWoGJmiWvDylidzqzCsvQWyezHUvY4xD02MdxQ F8MNTWzcev2zbfUyX9bDHtaw6TCi207J4aCcdlIaM5lHGadxZ4mSgwlJLx0c TKKzJwKHws7DzLHAze8gOOaZRMpEGy6xmhTC6SBD52PoGGZ5YAH2lYdSyFpj SbdgL/NMCqvILG/iF9uB+PF7b+PGrXWkcoQ2rZgzo5w1o5oxYzZFS/B1jBY2 oeo34o2L6/jJO2//YrtheP3SG7jqqUs/HX48Lz/7sbb6XsckTvWpoRkcx1TX IFveAEYIzjGS9oQjRoDFScQJTM/QfMkdRFsSf0ByTJAwEpiaiZMdYhICxixh avgt1gjmwfx1klsD/SYHBthwDSitOEzN32ewYYh5PWJNED05THnK7Zwk6SUY 4rQI8RpDvA5jmbqnsolzgz4Ezukx67fBWJNGiqCf3YBWTMKW16Bi7rZmiRZY u+pQpURuinm7h20R8fi0xhusVK3hlQtrcSyTuDuNcnRbLWybfJT2URKkyEkR 5zLjPMt1Ej6EYa+xiD2n4rAqg9CzcGtSy6yiy6KULtGjqtRS6xQYdwWhIGhC 7q/SeyWYZ19vxfvxoasK9Uxh/tPts3mPoW6sJpEvMcwlhrRkQb1owXyB7Wje guWshZ06LUVL8OcYLWzGUoCt7IwJlwpJtq9vf+qRGFlZQ88X7XhPybfX1g4/ XiM/+7GOG3NSx1n1+OF5PToHLdAPKjA1pufSGVp2NTJvGnJfBopAFspQltCO 5PCHVBL8MSKMvwpnCG3+KXEx5YmTD9jJsWTal29DQUUxKMidbfegzoFjI3rs 7jZgyET+sIrr80IqVltJHltiWWwQNSL6G4z+Fvkmg+/v7sMP/uYQlIf7kMxl YKpvSxNUYnpKJ01PbUBNMlDmm1Bmluj+OYkpne1pMmngVpomfzSV8uZnHpv2 W67o0Jhlops06LE60EdqG6QsHCY4xxwCADUmOj8yuMjlshDElvHDQ1Gku7Tw kOd2QJtt8rN0uab0SkPQq1hUlASHGMhTsNrLQ3UmTJUqeLk1byZlPQvG3E2S 9UUigar2vffa1+7+F9y+vYZS2YRKhTCgzVUsbPoYdkJilZBYK1ixnrdiI0tL W7BBSGwQEuuExFrUjDXCYs1vwirl8L3NtY/3WCj+0zdwbUCB+1fv4x9++tPD j8vXL0qYqJf0SKRZqswqansrpZsXL/RSVg57YBrQQmkMQU5BoCD8VaEimbkE TbxEdi7T+DpFE89J/i4hNG2OpUsAJM00SmGSmshcvYxBdxBDrqBUTAbNHhyf MOGlTj3Oyf2sGmnSSVGiV4VUqpeplQQtkBKKGxicqeLPvroHX/vaHrz4jT04 9sJedJzqg2n+QnuAjMCoExhiwkKMSBVXJXpQpBcgZw+io3R1rP9IGke3NwiM leuwLYrBk7faG51+E5dWY2iQGtxBJbqNBvRa6ANrGEPWlDRWMe6sUk7MYTrA CIdZaWINyupVHJuehf2kGSWtAfr8+qegI4/9n9DyUU21rMoJjDZaU3cxnk6o RmCUYSYliAruECOhCyxK8ywFNRal23ekE1pfS2K2akKtaoY3rEAgpESEpxYL KJHyKzEX12OboLhAu5iz4hLtYlaYBRfIGdsEyVbSjO04LWLCls+IRasBuj/5 W7zbfwZ/nxzEf3vvzpHHAfEbqBW0WBT9hVOOLouBqcEsdojyEMeuAZb4kSCs g0Zoqe3V7Bk0bO50yVly+Cw7fFpW3OPU52bxS9JrrZglS5foqCJXL1r0HFef xqSTZWXYG8O/w7CLPqZ27pi24uU+I05MeT7Bg1AD4QXiarmlBKgqjKVNPPty P7705b347tf3YN9zh3B87yHs3nUA48Es8UCimN8iHjahqZEoqsSDGD/Nr0Ah xrUTNeiJR8fGj2AXeFh9ozWjJQ0itYni80w8HVarRniCavSwp+wzz2DAEmPP yI5FTPRJJCHiySoUpfhIrHGlGzg6VcLAPhsWJxXQF7fYdm+x/Ra2CS1NUyRE n5g5XJLGg6cpVpTkQ2kKkzLfsST2+7CCzbGCvf4G5hZCmIlMY9IyhCnLMAXU MDSmERiMIzDrR2HVjsGmHoNDOYaYaRpNquIduFaysx29VrLhatGKK8TKZdaV S5QSl1Im1LX9cH/9S9g++hLej/fhpz+61S4XbenwJWkIdoniaIV82WlQsNOx sdOhZmPRHKeQnXLncXiUmT4Zg23UDIMnDV1qDobsPDXgAoyFeWYwrdR6NhTn oC/MscmskTerrKAVKiaCI5Kn1siijyVjxMduRQw2OsI4oXLgFVapl3qsGDWn pM5qSqAisoDukRAmZOyiXpXBu3MYmbNqfPPbR/DSix3Yv6cDJ/cRGXv2YiKc hnGBAmJ+E7o5ioj6OlRVlo8yU7PAtMwuQp4iKsQ0jUDFOlGxxuZz9Vp7BuuN X23f4LxLdzTpDmnOM6BFj96CPqMgNJ6uheXDXqE2EtQvSIJlIU5pmuIh2buK vvq73+jD0199Dc99YyfOjFik7Xj69tY8jbhoQ3QoCXJFdhUKlhMxVCju7Yvu zNEUfcfbZI3XpXlLRXmZeSnHtHUActsQFLZhqGl6KxFhGYXNRDQYxuHSj8Oj HYdXO4EZzQR86nH4VGPYJAJuzjpws2rHjYod18s2XCNKFq1DCD79FWye+SEu Kw7hdil+7HFQ/AYWi1qsVAzIpnXoMerQb3UxhUPSxeZJFzPcW0KPLo9XOtNQ yZNwjFth9OcJhiWqxWWYeOY7YK5QR5kqS2LGqkwlXxJDR2J8ocY+mMmQYCX2 hNCvtWKAPezITIpcEcNJrROvjNjxzHkdjpN3O/az590px/gxM9T9PhgVcZQ1 PhQpTxOBBL74zEl857VT+MHeU9h75CRGzp9DUakgItZhWBBzVmtEBIl6lmgo s4rzJBVErjxNRLBTcGwSERtsszbY+K5dJSLWsP7m6+3LtX+IK40oVkvt+VYf HcLz7dMTEqYERix5KgpCQtQNMYIbabJTEERBMsht4ds7+/CFv9yLF755ALue 2Y9XntuP85OEhbRTT+zaJCRKYs5UDFOufjJMKYaiw9SYc7dbNa35BobyazjI pq3b2A+VfRBqxxA09mEYbKOw2MZgtxAKZsLASAgYJ+GnBUyTOxDii19DyDCJ kG4SeZscd+pO3K47cGvWTkExhvjL38DFgRdww3IE1xNGXA3r8fBi8xFXHGpX 0DdvNiXabDI5xNC86O8GxN1eG7nCQa7wFCR1rArXMeCoYc9QAVpNBvHeaRiD LImVJizV5g5YWAd/H2Y+mmoNGGdX6BAWAEJFzLWoc3Psy1lFQxkMGB0UFGF0 aQPo6jPg/LFxvLB/HK8ekuHcES00/S7opiPQGElRdjHlxn46PielvJEt4EH2 /X/58nF8Y18H/vbgCah0MVSNduSGxqBPVAiOZmuuapY0UWYAeXx5nsHMiFmJ Rdi3HsK2dY/gYP+9dhmWlcZn2rho5DTEhbE13DtDXKiJC10AgwZx0fGx0ezQ sjSarW7Py+tym/iTr+xnfduPF75/GIdfPIijL+/D6dM9bIO2JAGsZYukLou6 1pokVYhJ0jRxIfZjRcvQiZZs7T7OpNZx0JfGYVJBn6YLWucQdE5iwkFM2EkP tgm4rZOYMU/BTwtZZQjbZIjYZTsQtcuIixgfY9YpxMyTiOjGcDFPmHc8g9ze b+PyxMu47j6OmxSoN7Mm3EgacC2iexIXX8KlRgzNRxkSNEgN4aDZz4YwzhqS Yxktsx2osR0gA5D0hn2L6BjOIT9sJqcPwTor9rHRyN1WynnL3DqRv8a2gG1D napgtkGPLJM8F3FaHsCozIc+KsvRE2qouvUwsC6ZZRacGjFhj5jqJnv0aaIE Tg7DM6L+zDMjF0nQSyzXyzBWViTgmeoNHoc234SM9axfl0LO5kFKoYUhRbVb W2rNlpWp94tsGPPs+DNlad7Xtv0OgfEWbJu32uOHlz/dvh6zfOMdrNx4iJXr tGu0q7Qr7+xoD1c1c9qPJ59zcRN6FCwxGvKJ/hPcTMwIwcDes61BNZl1jJlz +MZfHcLffucodr56Arv3ncLxQx0wdPaj0DUKz5gJMl0C6sqapIcUbKHlYlY+ syiN2criPPPqFs5kLuJAdAXHPBYcMo6jn7jROyk0nGMw2Sdgt03BTYzMWKcR IFmEHApEXArE3ArEPQokJJMj6ZlG0kVzTiFhm4TlwPdRPfIUbipeww3/Cdyq 2XGzYv0EPCk93piLHXkcO9NYpjeaIovYD3WrpokdJrxZbG5gK+kSmqHSusKa YPzYgxnJkqMsvL39rAITVjgGpvDC3h6c4+rFLTrrwhYs1AIm4qjPwPbVmMS5 02ZM9Tign/BTRkVgtyZgdSWh9ySoN8LsB8VeTA+eH3Fg34RHmiSaJJdNB8WF c+KWekebW6DcW2QlW5LIylSj1ZeJHz7Ps1Cn57FXSf6jfHSo3dA5QlBKM4nE TZG4yVcgyxWgoUaxXbgP6/YbsG5eh2VtC+t370reWLn1jrSbWpm/wNaCgiFH y174eARBExPfGtAaP3CZja0h8WJ7SHyaElbtw6CWQsUs9nNVHkPRClFEOj9m gW7nBIpyF7750kl8b89JfH//Cbxw9CTOK93sfePIWmYQVHmgG3RgetyDYVUY 8hz1U4ZMRlKWsRM8yRbnQGwdh8NFdDgVOKQeJHpGYHSOw+SYhNU+DZddjhm7 EgGHCmGXGlGPGvEZDRI+DZJ+NVIBNdJ+YSqkfUqkvXI4j/0Qiyeexuu63bgd OYU7iy7cmqeAeYSkApGUM+JGWttG0UHpqQ9vXl8hH1O2Fc3kYyu6lSr06yla TGGM2qgq3YVWtx4R1+lZatjVGwtrMJc3MUl+Ptlhxve/vhs7//ZVvPjDfdj5 1E4op21Q7x9G9PgQIvSYw5qD01uGPTQLQ6yGiQj1iz+JPiKozxahqs3SEhj1 h/DKhBMvj5kxahIozmHKX4I8UqE2mGUu16BlidFTMRsqC+R8qugay1VdGH+m DfFvj1rL/P8Z2LReGFUWIomlrVCGrECFnMtBPb8G64W7RNJtWDavSJOtjdsP pO1lqvIF6ZsstKUL0l4XfeEC1fr/YHSDaOoasqJrwAa3WQwE29E9oUOfwotB DZshY5air9za3hRawICpgAO7DQieNmDWGkAilZEmE/5qXw9e7JdjJJiGobaK U/55dLjmcMZawzjXodbzfZkf6m4TlIYg288EeqMZHAlVcIB66XgoiiM2JQ5N 98LoGKfJYHbIYSeCPA41fE4NQh4toqyzcb8eyaAe6ZAeGQqVbES3A9mwDp9F NqSB++SzaJ59FnfNe7A9cxRl/zReXyaQFp24+TiYSlTHeT1+fKN5+HEw/RHu XmcPkDO0wMTOqluuZmkQYIpglNQgrulPB2aZVvPS9UJxmchYYsmqsnTVtvBn XzuA73z7qNS4HnmOhf3VfbD2DWFpxof5RAQutiKjLEliVGiYOkVVbjDlFzHq i2DQ5saQk2DyE0wUt6OBEHqcbrw0asSILsr+g9TkZUkNsqWiEFCnqqQIsVm1 xkBT0FbqbH7Zns3W2abX6tTeutk6tLM17NZl0c0KZ9TMwEwNK/OFMVXIYiKf goU4slx4A+atG5AtrqGHHVtfKI+zZMbjlGAnycqn2bmd1jjQZwljguyoiiy2 vklEjG+kWyMcvWTknnGy0bCT+WOHQmlGr8yFAbLIsEFslSvy/1ax9zDr3hEb dPIYgmRh6RpOYYU5QSuL748wVMX2YwMrv57yUEvG1VAenvTXcIL18ayphHFi U62JQDtBpjqvZM47cdSeJ+60OGxTkQmHYaS4MdoV1EIqOBwaePm7gEePiM+A eMCAZMiIdMSIbNSEbMyIHC3PxjofM8B/5nlsdD+P+7b92PIfQ3pGhgTF8sWq BbcJqJsCUHME0yzBxPdulg2424ziCTT9YQtNWaKpIC702aA06llyGWUD0WQj mjwlRrNGNC2IK88UKU3pRkgLTZv4828dxteeOo5drxxHx2E2vSeOY9pkgLvO okihZFzaYpuzKW0n0TD1VJWGpFxliSIG7B4MuSIYJpqGg2xXQuzhgi7snVJh WBmW6GnCmWHDzZ4unIeCYVeliCpxVSdfZbtWFTufq/gDinP+SNPQ1GXW5HIZ xy0pHFPGodYRUWMK1hofRnIxmAWSyEq9hSqeM9nRYbHjlNWBc7ROi0OaPZLm JfVu9GlprJe9ShdGzDFo48uwFFs3AcW9pD4FtZzMib5xJ3oHbTjVJzZTBDCk S6JzPIS9z8owed4Ng47n4ctjKkaGZVJpqfW0xSVpiwszgdj5HSYGf6ZpK4tc wwKZcp6Cvy5tojgxU8QJRx7nzGmMMdGVahcU4xPoHeqgrjwD8+RZGG0KmGxq 1jctnC49vB4y4YwR0YAJibAZqagFmZgFuYQF+aRlBwpJCz6HyPmXcGHgRTxw HcBKqAe5iAaZoAJJ3ySi7mHcbrhxUwBqgexUt9EIplkKppL2STB9HvcEmDKs /DmLtAfK67Wgn2c6pA9TMaUx3gaTQgITV5tne0UtaK6uwVJfx58/fQpf/u5h vLb3BPYe68DOY8fQbbGxrdmEeXmTYNqAYZE9M2uLhu2Zqsp+mapHkatjkGDq E3OcbTANh6jSgk7E8jYMjFLta+LtkXR2gv4MAZUjoPJQpsgVGarpXAmaQkmM KRRLeEnaDKAuEnA0RYH1uZBHVySNXTIqMr0Xpmkiyu6SJpHPpDP4HnnotM2G c3bxjQZEA6lywCruMvukW8rDRp6DgWYMSHcoh9ijD2l9rD9J6Kh+FIEyBjRO DKid6Fe40E9UHT5nwelBD3Y9N4bOl5VQDXigFonpSkMeFaMTdemevbTlIj9P RM2TZheIKmH8maYp8/dUecpirdUhCKXHdU5xTXucAbxmj+BVtq/njVp0Kfsx 3bkL9Y5vIvPqXyPQfQBWhx4utxEzM2aEAhbEwlYko1ak4zZkkzbkU3bk03YU 0zbETu/ElYFX8I73IJaTChQSgqt0rIFUVMFpxH3j2K6ZcXOFcFoSBY/8NE9+ mhOXgnT4+/fvHXocUf8Rd68RUSkiKmuRJvq9bjNzzknPhaStQONiA0pwVrrn oZZ6qGX2UOyd2Fxb6qs4pvDhwGtDeJ7N9dNHjmHv8CisK+tEFAvi8npr46G0 6ZCNdo2NNvs4ZYmIytcxFoxj0MnKQLQMBWMYCjFyQTsiWTPmc14MTfActGKy Xyi4FNUWm/xwhtUiA0UiC2VabK7ISZsrxMaKHdLWit9i15NlFEhrBf6/IvV/ MIz9xiCLOHWtUoPJiXG86PDgqI3Kx8lq5XCj3yFugwcwYgvxeKxw1ggmbFFx 62sHJhxRfAXj9qj0q1Ezk00X5LtpNvuU3KS/Aa2HwHLjXLca3/9aP8b3KKFl EZQxMcUXnUxSAMrCFanQKcSOFYpAcSFM7FrRFOpMCWF8zRquLopd6/y7QoXL IJCYIFPFPHoyCRwN+rDfS0utYp8nhP3KcWj6diM0vBeFgddQ63wB88e/i9LZ l5AaPIpQSOwhsyMVtyOTdCCXdiKfcSLumoB//07c7NqD933HsJxRo5SxEmRm shYLYkzLwsiGLziJQmwKtySOIqCWyFGLBNQCQVbX4707jUNPUtTdKwQUYbma JqBydqxVSN6UAoMa0oW51dSJHU1y6a7uAhurJTZWbKJINWY25OfG/AhQki5F jbAtr8K6TJnLZwvNtMTaSJO2a86xqZklmEjmChJ5qzkvoc8RxKAvhcFAFIPB GQz6LZgV18eXPVggqB5tERi1in2RBMgMoyPudUZSmI4x7RNp8fU3yTT+J0yn 0mx6+LtMEpO5pLRXqLVJIobBfATPq/w4rfLijEyH/qEhdDvt6HV6WzfcHWGq NQLIFqfcTUJGAE97aN7UDkzzoL8NmTeFKY+4pCpuscakutOvZsk2hnBqzIoD uwbRv7MfEydl7GENGGXJFhuNpI2LXuHGAk+bnUW8vfEn/cnmnx1QkYd+j49l iksa2Xf6400/OUyU0jidCOJI0Is9FJP7EqsEVgIywzSMJjKhegx6+QD0A4cQ Hz2E+uherPW/hI3DP8BCxyvIdR7FsRe/hd1f+kN0fOn3MfLXf4SVjufwUeg0 lrMalPMOlBh+AapCysSaSMUeUyMRmWa9HMatJgG1QkCtEFArLHrLBNSCAe+9 0cATiPpX+ODde2hQkK0mxW40W2u7+DhlAKln2Mii48xh0leSvptHlWQeZeel Vt3Iom8iQvbs0aJMAZsox8V87FID34KFj+ZlFselFRY8qi628K1drgsf752T CyIntciydfQzTANs7Pr9LIJePTZrLlxccEuoutFkg0ZRPKRJSrttRxxiByWp kyicCBBdYRrRNSlt+aHiSiUwLjadZD/ZdDKQi6IrGcbZSAg75RYc6JJDNiCD +mQPRtU2jDhjGHcQhU5SoCsL+QyLq5/FNUDqCxWgFBYuQEHRrgiKe3BZ6Ub/ lCuJIbbzh8/rcGznCBSdWpjlJsjVBuw9b0Q/s2GIFDtiTkkbZsQex8kA+4tH G6gSYgMVLV2k7xQs47/HR76f4e+zbGzz/PtCWqLZ8VKcDZ0be70z2B2uY2+s iQ67H0YdRbhRBZNJB7PFSDFuht6shMMwhpnJY8gNn8VK3wlcOrMb+/7LH+D0 Fz+P7i9/Hpqn/xjJk1/FSsGAcsFNSLlQErAiBgRP5VIGpBMaJGJyRMNjuLVK SDVZ+JqEVIOQalBHLRnw4zc/hlTr6WtYYd+4Gmd7l2ntI59x26kHWtsuJVHu ZWaFmFXxWVa9T/r1YX8OnWd4GjNuWCsVWBaWYCF8zEuE2uISjPxZP0/1yR5e U5unfqpDUSaUilWJyidZmQyNa9Q6y+j1+NE344CHqlHso9ustyB1hZC63iBZ lXzoV8UxYCCZWcW9EUKLBDJKWI0Gxd6pJEbiDF0igSFCaiAdR18mht50jFCK 4LTfD3vaAWdEi2MaA3Z2mjE2ZIH+vAwy6pEpcSOHfZyCqaMMUvSzPEm3fGMU /eK+71egjlegErsKI0XIibAeVr3jHRqMnNTDpKDopvwatwq55WVFtOLsoB0D sqgkzoctAlHMBK/YgpXBZIgFOUJUxnjYOAs0C7gsyedUpr0RjdmST0o7EcV+ 0JFSDAeDbuzyxrEn2kBHjGKCfYpRQzTp1USTnmgyweywwuaxw+V3wB92wWwY hVkxjHO7XsKur3wBnd/5AmTPfgGmvX8B5a4/RbnoRanooblRKjiJKEorip9c 2ohMSotEXIlodALzJRVurhJNq0TTKtHUJEEtS2g69ORtkUsf7w9t7TPfqLHi jbkxqKR8MXM1LpFTzBn266pkq1/XsdafUFDoTvjg8M/ANDcvvjBnAf8JpoUF GOfnYaDp5uakndXqKrVoZZa0REkgthKTxcdzKen6j2XrNpVTHF0OCxaTdiwz RZpiCzMpanvehUuLpKmVFqZC0SB0nij6zOK7DJPod9N8CfRTz/dHEuiLJtj7 87MScZyPRzGV8cOSsGOlqkezZkKXWUXdbccJFr1nTrgwOMT07jVDRXpRiDs/ IeYLC7s2zvNOzkGX4rJ0FNBfgZaPmlSNHpjFqXEPTh/WQjvuhY01UumJYZgq acgakybJhk1ODOt0CHqYAjKyI+v1kPgKIjsxJZiV5XOczDoReoxd4+3NlOkk xrKtbaQjrNXDtEHW610eYim0jJ7kFluit2DwEEtqFjudBiYDsWQ2t7HkgCvg gi9Md8U8iCXZ8nQew7Pf+EsceuqLGHv5i5ATSxP7/gtKpRma92MsFYmlQtaK XMaETFqHRJJYik9ivqLGzXViaZ1YWieWVomlhgF//8G9J7Akx1sXVtEIGtFs b7BdZyB9LjYsH+9DT0kcLQu1u/V0GZpcBc/v17IF9sHC1RtqNRiF1esw1MVN zhp0/Fk7y+CIPekkLnmZ9bJUoK7MSfwt7QnfFheArsMsbmfw/9SDNswlHFRN DiyXnK1vCiBJbS+IXXZuXF4iWa3QqA39yQD8mSD8+QB8xQAlSRjuih/Oig/2 8gyWVi344MP7WC7r0Kwa6SE9esx69Fvd0v09sa6dAwl0DyVgGGI+jNhJRGyw EgvQs+3QZ0isVIqG3DKfl6VbOeJrKk93OzHZ44bNlICJ7YGSeTagZutgy9JI jKIui+2YJiNm2ajOZmfQOxmlzEphwNgmVudjxEpUjRFVo6zVo6zVIyTWIdbq wSyJmLW6n7W6NxPFqywQk2kiqXALxuJdGGJ8rSCaNEST3gCziWiy22Almpx+ F2aIpmDMiyjRJG6uPPOtL2DX97+I7p1/DeXBL8Cq7kCRaCoSTUWiqVh0ocBE LuSIpqwJ6YwY4iKaEpNYmCWaNoimDTZ3G0TTuhk3GvpH1wpaT1/FkteIRsSC JmvcGmuckCwaLcWpMkp3JKXt6pO+T/r0Xoah44QFNpsH+mwaOsJER7joZ6vQ 0bR8ramKr44ijRE+CsJnukQVWhJbyFOSMNauXoR5+xZMm1eRvHZTOpP333mA it+GGluQWoZwYqKslF2tbWVzbmwQTluE0hahtMXyvUXS3Vzj79adaDJhlmkL azZsX0lLn/fxiEbVBE9Ii16zuAvta00ZO7KYcpfxck8ap0bysI34ETo+Ab2n RNiweRAX1wpNShljsYm/wXlFFOdO2GFQxuH0FaCNcV3xOuThKiYonfoMcQki g1Y2EzY2ExYLAhEjttsbTQOBAHpUCfSyRvex4Inv9hsgQQ2SoAaDSQySUwdj 5FbW6F5CqYc1upvWyfocbZRgSK/AmLvE87pNuwtT8SEMMhY4FQucljAytGHk drBMuOANuxEgKUWTXsTTM/A4pzE+egIDu5/FQ90e5AmhgjAWuQJhJL5WIk8Y 5fJWZAmjVEaHeEaJSIqkVCeMtqjAtwijTbZ06ya8dTXxJIz+LT54h1nrN7On s6IpGKnqxIU5F/pGA1S8rNOWpKR2HzXnh4ddGO23wcJypM4X2NUKK0JTppWK UJfEJR+qVXa0CrLPNOEzyWZkvMSejDw9XinAtH0bpq0bMKxdxNsf/rS9VenX cfvyJopRG8qUNVUua67sZDY4scTzWVmgLdHYVCw3+F7TiXkqwdmmHRtXsvjJ hw9ad2CfwbK4c19u3XOU7lcbbYxsUNo2JIb2pzxsvgNzGHDO4/hADrEeK+rH +zE2GsTB/iyODmRJFjWMHJpCsGMKJcsMzFFmR2754y9AVEjz6WIn1AL6TRlp tGzAFkA/q6c3bGptVxZkOt8iU38oAJUzjC4SWZedROimzdAC/DmUQCcr87lo jM1IkKTqxeWrrWwwJKk6M0RQlkSUu0tcE0F6D8mIglvNsqanRLJZYaHCdfic zBgX/FE3wgmWtrQXyawXabbFst0H8brqCC74zxNFXuQpkfJEUI4IytHVWRJR Omfi3xNBWSXCmQnM1SmRtomgbSJoy4IbRNCP3l59Ygb1f8MFcsNy2IpGe6P2 BgNWTbrRNxHGoCbREoqiESf9Pv3SJNRTVmj9PrYcWbYaWXo0K13XUeb4M02e I2exZE0VW1d3xth2jBSjGMiHYdy+A4P43ob1K+KbC9oz95/BjatiU9kWMlk7 V+VAsco2ouZAeY62wJ8X7MjO23Dr7ibe+6D9XeyfRyOvZXtgIlCs8ARMpAMn Bs3tS60OMc5aY7e1AHVsBYOeZRw8HYWP1Wvfd3X4zpcd+PY3vXjum2oUJ8x0 AeV4ljQqvqy7+Phss/jaKHaa7LrEt+2NecukkiD6rA7InRosFZ1oVFzStxeJ ndzSLlzS5TbpcpuVtzg7A1eWlTbv5xI8aG460NgUtGnDhx89aA8g/zvo45SV qYswpgmUjADKOzDGL8MwpYRJyc5MZ6SetsDitMHOtsQdpPKIuBCKu0gXbtKG h8H3QNN5AuuTHdgODSBLkGTZmWUJkgxBkiE/pHMWpHJGJHJaxHIKhLPjuHmB 1eoCtc+2TQLKtXXjkceH1z+HeY8ZSzEbVqRvmxHFiiBJedA7HsGApqX+Tslm cHA3dY7SDLk/KH2FhiyR4gqnqfs+w04iKV2pmcqyx6b6G8u3rtQM0frzUaga F6DfvA3dmvSlHp9pb6h4+N4DPHy/9a31v9S+adPM6xh4cS/ZBoVFg7727b8R SwYTTrFNp86We5FtUoPCdo21ZQN/8XQKf/P1ZTz/9BZeeX4dh/bPY0zBujK7 whq6zVq6SRLcaM0u51Zas8vsL8WNF2krXuMtLmQO3RZKGpsGs6yVc3kSHGvl MoO/QpJrkuRWSXKrK3zNWtlgrVxe49+sOTC/Zsf2VUF091t8+a8Rr1+AIUFl krzBuL/F0vcAxsqPoadSNMo0MKtIECbRQ1moVKxUKoKc2EfFnAglXIimXIhl XLBO9aE0sB9vap6ht9M8qV9jnB00O2NtQzJnZrwNiOXViBSmEcyN4sYFJ82O G4z59S0zbl9N4omg/4604Xxuxoq4jxXO65SE0hmtC+d1brzQ7cf3zsfw5YMB 7DviwLkxFzrtaYxRoI1ToE2w+51gZR1PMtCsrKMZ8d0prNaPRFqWbcXKBejW 7yB+7S7uffh3vy0d9g/w1rUVNLMUEIXW/V3PjFm6DSXuyEkBdpWl/SFia4Am wQBnGOD8Bv6vv13Fn377Ab734o+w58i72H36bZw3iu+A3YK+tkmR1Pou3E+G kRchZ7czHS3AIX0j4l3YmzdhW95Gaq6CfNyGQobdZ8GBCivZLImxPufE3AKf l5yoLTMHVkhQK3asXc7i/Q8f4NF3PaxefhOG6AYz+Dqj+wbFw30Yy+8y2peh H1fBKNeS+hldK6PrpKijm93U8zMRO/xxB0JJByKsol6HDO7Tu3BT9RIj6ECC +ZdgRBPsYuLM5FjeiGhBj3BBiWBBhtqiBtcvOnD9gg3Xtq24tPH/cfWeUY5m 13XoXi3ZfnoyJVKW5CfrWXR4y7IsibKfZS1JzENqmMUwebqnc+6ejpW6KwcU qgqFnHPOKGSggMo5oVJX564OM51myAmcQFFhyU9v3w/o4Yx+nEJlAN/Z95y9 73fPObYnp8FO1yodxBiPvsQszik9qNcJj/px0exHC63N4seJHj++/EM9dp30 YmdzEM/35HBAlccpZknpvhI5Uw892y31g0mjXeJMKTTnUlDNb8GwchsrD9/+ Henp/ggPbiyjQnZcKTmk4wuBgDgIQ2lqpjdFtzWv8OYMNPSmPrNEb1akY+aH u2/gz555C9/d9xYO1P0EzzW8j3qb6OS7Tm+uSQ3b9eP0pGg5Kh0irh4ZVabL cK/Rm2v34V6lN5c3sX6/2uX+7bce4+atDdy6vYn5yjDSRNf8+jBuv76JW69v 4MZr679Sq7o2x1ZgGbpKB95l7n5ISfombBNvwagPwazQU5oaYbWaYXMzLDM4 usMO+GJOBIdcdKALsYwLiZw4obIHl5T7seBvQLLgpDmQLNoxxFydKJkRHzEg OqJBqDyAlVUrrl924xqdd4Vh+I1Hq584yfe7uLm9iqUrooW3A2cs1PkW+tDs wfEeFY609+Nw1wBe7dOiTmXB2R5Kjl1ytDbqcbDVhxcuRvB8WwIvtCfo0wzq yMdbE2Qv9OfFZBpNqTQakkkMTG5i+cG7fLbq9u77bz1AJWeu3oEi9AI+Kzo0 HnQbxW53gTplFIPhaamsXtQJGAvLdGAFltFV/PDEEk6cnEdD53XU2W8LXj+9 yuBknlql3F2hA5fpQDqvvEDeMAtVYRLKbAnuDTpw/XW41m7CubKOtfuv8ZVU CW/l8iN6R9TLk4DmuczKjxg0fwzbFL1jCMOk1MNsZBqifLV6yNEJOHfYTu/Y EaDeCiUd9JADFkUbpnsOYN1yCPGcHfG8DbGiFVF6JVIyUCZrERhRITWpxhUm x8sMllubTty6ma9V9OF4jfdu31klEbOh22NDnc2FBjsDolTqLG6me9Bu9aBp wIDT7X043THAxwHsPtqD3tODsA8O7ECnxb8DJ/oDJETH+yM41hvGoT6S1pEI I0cIpcvXPlsrv1/JmGtNE11Sl6V2pRPduhhkFMt9HlE+LApY56BLz9eOKyzB MrKMs5o8dE0uLAaNvFJUWTTL1DJMU0swTC5CN06qM8qAOCJu1XAZFccxmCvC tfkYro3X4Fq/DsdK5bdqpNEU4iqMX4c5c4dilPp6lE6YfJMs5hK0PRoYVHoY TQaY7CaYPVwmATOcIQs8USu8cSv8pNjanibEL+zHNdULCGctCOXNCJG+Bnnx A2U9fFwW7vIg5io2bF4i59hkprqVr1XM4mgtnomqypFRK0O0DXK/DY1OF5pd HrS5RGWZB11OL3qYs2V2H3qtNIsPrQNGNPWq8dKLbTB2qyFXKtCkNaPNUe2T 1WLzo5mx8ILBhwalF5Zg8T/Wzt4vDZF6ZOwftTvTmcSBB8pbE5Ocq4SB4DhU sWmpHFEv7p8V52EivM9osjC1uDEeFHUhVl5yLgN+NE4yi43PQzs2R701QwdM kT6Lw4gjUI9Nw3XpEZ1wB871q8hfv46qB34Pj978EObQFZiHtmHO3eOSuw/z GAPV1CPYZh5Lhz50ah30RgP0NiOMbhMsPvLIID0RNsEdMcMTM0N3Yg/WBnch Ge2CN2+At6iHp6SDq6SFo6xGbs6E1U3R0MiFazcL56oX/0iNIqxWMpgYt2Ka Yl8RsOCiy4FWtxsdHgYINy+628+rEpCaSA04QxigFFM4hYVxUWHDuaODcGn1 6DOY0aq2oFXngCI5CkViBP2xMuzFauG/6DuTHb35H2qrQLSErKRstZaQHpSZ MjsUgVqDTCYVf1kaA6FOTkpnBPSFGRhLszitSsPURY3uc8PMi26eoHMm5uiA WejHZhiLpqqnQYUDxDm+0jD0c+Ic3+twbm7Dsb6FtYcPf7v27lOl2zCFb8Cc 4irI0wfl12AZJ4+bekAfPITG4IdKqYHaoIPaqoeWVNXgMcDsM8AaNMAWNaBz /8uY7N2DvPcs7Dkd7AWyg6IOFnJz35gWS+seLFS1wvnqtT9cKyhdX81gmtd+ dtJGSWxCi8uGdo+LspjX3RtgOOD19oSh8EShdMeg8sah8sV3QO2P889Pt1mh aCUQbHoovFEMuMLos4Uw6E1L5f7VsvotOEpbUlsa29AGXXDjs7UIILV840qu pJxSF8Q1MiS9UXRvFQXookl0EQOhEek2jbirLvaV9YUpnBpMoqc3CjdFr4n4 NtIMY9U767pRCvuR2hb6iNj9LKK/LLbR78OxdReOzRvI3dzG/yW9hn/P638X xugtGJmkTYV7XGf0wRh9MEnGNf06TKT+KnsACp0GCrMWSgf94NFB6+e6iOjQ 1d2IWNtejJr3ozPGr+M6HHdqcIq/1+kzMnz4oU1tITF9+0mTtSfR51DNCRuV NGbGLZibYmBjaGh1mQl+xmQvI403RHoT49VN8OIP8bonoQmkoA2ld0AXSTNz 6KJpvHJAAavKCUvAD3V4CMpggn8So0OiUPlzcM/coEOuwTl+RTp25ciL4UFr WN16+NlaAro6nsVKotqDcVXo55S4xRFGtz4l3TqUbnGES1AmynTGKLTZMZwU pzd6Q3DYzTugL09QoekJe115jOl4lEuguvs8OFqQZLxicgz2rXuwX9qGjbHo 8Qcf/k4tFCWH78EQuU21dY9qi1aiK0bpiol7zDH36Ar+vECalhhGj1kFmZMR 16tBf1CD87ImnGw6iwu957FXr8Zu1SAOqQYgD6WlPuEfb+9mSPJRtHcLi/Zu b9a40cEaY3vtTgVz42YsTFpRoHxoFbrQbacnvPREBP2+BAb9KXohQy9koQvn oI/mYYgXYEzQhgrotkVRf46edHiY3hLQJbLQxNKUsykoA0MYdHMJBYtwz96C a/oGXXIVTuGS3Dps8WU8+vF7v1dzyftvPsaS2JcTdwpq5yzC4iCLIkHqlJEO 0Pf5q/feBkVVZqqEk/II5DIfzJHEDmiLZfwqaS09NkzPlcSNgIK0k9s/mpH6 QBoqW9WtuI2bWH30Zo2xfRYP3/w54X0b+uQ9piD6g/4xjtAnY/QJ/WGeoV/m aYv3pBq8lkgSB+xhPM9s9/19LWi92IJ9nZ3Yr/XgjM4NWaAMmY+vg4pamiuX rQ74E6eTTWRipjDVs3+DKeLxk93JH0oP/yd+8vZjXK/1vrh5Yw25+XUs3vxk 7cWDt372f9Rk00/feYi5UZPUImB5ygYNF2qH08JU4qEPw/QhfeCnPwI5aIMF +m+Y/ivRd2W+IlqGli2jfiAIZa8Pfr8HpuwwjJki9KkCtIkc1NQwqmAag54h 2Ma24J67Dff0TbiEL4c34chUkJu8jM/WOPcWA9BS3IFlsvkVSkGxwarTBtGp TKJb3Eh11m56hat9LE/IgujrdsEYjECVKUg3UAfz+WonzxKdLrWSTUE2koRS 3JMWe2Ibt5G5cQ+/V1tRy1fehS55Fzp6Ty9WF71n4GoyciUZZ+nJhXvoGdnE i3zuHxmDeIY67umXZZC1cGWpNbhATXDRSNPTyNUvDtL6PUzBZUaf+epYxFSt 953g0qFNZEo3aze7vlrbeXFfTOLqARX+xmvEr9Toz1tvV7tj5IetKJdsiKbs MAedOKunGuGz1REzdXzG8yoPmk2EOp9RmjrJZ9PFL/Gd/fgjkbxVSWGRK3aZ CUzccGq369HFtCBj4urziroPeiqQ5ysu0dMjXKWj9PKYVBhmzU3AmqcVJ7Dn uAkOUwSudBqW4hhTgaiKL0MvTjcmC1zB9Hoow0SYhEe0JRAj/KZuVqdgFdZg Ty+gyix+B1ujeSwMObGYd3+0Gxr2hcizU+ikt7sdOb6+ar/OEx0kNp1O6Jhs +5NZDGQ+ttchDo6U0ugqMQKPj8CyyXW3fgfp6/dqfQR/j+B/F/H5R1zjXIf0 sHb8HnRcn4fdefxQ7cUzShd2at04bHRj1wUDGkTzvq42qnRGdxON67VDS1P7 +Pq8Ukv5dnpZpot/dOLbmqnNkIxukP5V8OiN949/3Mu/jJa9m7g/9hj/29yJ v+8/U92S/UK1N8ZKFuURGyZH7Uhl7UxmLjRScl6knmmhtRJmbSaagSYardLx zcoq1PocZamEwST6zBFiqbHbos+c9N/FtJaFEaM0xmZl0o5gnLnWbkGPy0fe EOMyZ/BnbNRIjh+l4yf4vyZhyU3BWpiGrTgNe2kGfYECGpsC8DO0OxkorWX+ TmkSJnE+uiDu5o8wfw8TAFyGQfJvSlPPwutSExrX5HW4ylzuhSWs3Xi96v9/ i0tMd3NJF+YLHiyOeKX7ACPZABVDCm36DDqsGWI0g2Ot9Hm7EyoS3B6qaFk6 g+4sf1ZIo6OYRnsxhe6REZjWuGIrt/Hog5/jv3ysE4glYUE9sd5AotxIk07N kjCfUdhx8IQW5m4Fuq1B9JDG9xhphtAO0tsQU0K3LohuUQCiCqBzwMcAuEjW WOsdmBITKJmMAkxGb7yHYx/39b/E9r2/R3T8OioaFf5BWYcPD3wTf39ptbof +cVqEwxKqclxG+bH7VD47Lhod6OF6bCd1uUQ++uUU+L+P0EoM9OM/JoLv5u+ 76Tv2weIA5mb4Xn+o5Z2ptAlVDbflG4NLo9Wq7crkw4uHAO67A6G0JDU/Ebh E+fvuGgjXMBx+jE1DUt2BrbCLP09R/YzDwdF6gVtBrF6NYaDDtipm2xjs1Sg MzCPkE+WBM8UfcdJc5JlqY3KINO9NAVxnot/mql7jAu/XEF+8VJtMf4m1un4 6YQbM7lqZ83lMZ/USTwQiqJZmybeM3j6RyQmbQ6GUS44ppG2oQxaUxk0i+MY GQKEmk2/fBcrD9/9/Se+/ukjJAtWNJKJNHnduODlEiEjafVw3boDUi3/s3t0 0HUYoB00QG4RbdTjv4Q+a5y+lr40x9BrjKJXH4FMFYIpuQL78FUil8QjUxsk yeRV8/XXasdeitk5ZAe0+EDbhn+sfxbveB3ST55ItllKtnzRhgt2G1qpmdup lbtpMpeXks2LPurmfod3Bwbo8f+AAasXA/R5P9e8nKlFRp/3CJ8rPFA6S9Vh tUnRSnULSqW1VnDq4AJyot2kJ26Ywp1R9HuYev0FMl1eq9gEjEnhY/qwME8f i+KCJTjHaONLOPq8HBODRuRyVC12iuVfg3ViARZxuntEnPgWDfdFYzBxBKoM VbQA+9QNadilW4xonbxGV6/BMTzzn2rp690fv4HRuAvjWQ+mhr0kG16SDR+W Z8QdkhBe+God7M18tUR2QyCD+nAG58nRL6ZGMH37AR6+97f4rzWG9x5dO0uy 2eSySL1AL9K1LaT9bUwHndRd3eTvMmccO0/Y0HfRDr3GTf2bpvaluTI7oHCn SboHXCkCKoV++xD6rQn0mehybYQBb40gvc7Adplu3oBjaJlu3qpue+Dr0sPX ce3WfRjb1HhD34v/r3M/7p9+hqLQgnnm1ELRimaHlZ51oosxRuahZ2kDxJ6C piQdFfFLxUc1H9W1R3Gqf5AIUHC59zPMy01VV8uNcanxmy48h9Y+J7Qah1Rd XcpYmI/M6LH76eKEdBByMCAOQIpTa1Mwpbk88wuwDS/Rvct07wrVZQWnOo04 9t3zWCLDi46OSufV7dNib2qZEu4XBee64Rno8pPQiHO0iZLU4MWz/EAax+sm C3dNbkph4fHb7/7n2g3F7WsbWJ4fRmnYw4jmwQRJ29S0Fyf/dDfe6m3E3XwH xhbdqFT37f9bbV9BdCcS7R2VQSOaPTa604VWr+iAGkInJVmPJ4FelzhmnsbR xgAaz3ng7NVB6S1A6aMR2Cp/9VHpE8c7c6LVCn1M9uGgny1D6NPHyWA26Nsb km/FvFlHiq/+Jz+t7qrg6RrAwq4hXNMN4h8HTuGnnbtQ0rdT1VBfuh3o9rjJ iH1MyQE+S5DCPgy1L0JpG4VOWDBKVcfY9d+hC0VoYUbkEMUPiTH/RESwPq7o XtI2tZ/ygu5qV7vQMeCCVutk1BM31WyM9CHInUnpLL1oMKrhijVwxZqyJJFF 5p3yMhxjFfS4M/jS0/vw3af24sC39+LU83ugDGc/KhcXpeLWqQpMolR8bJFK c16alaEljRN9acxjG/CsPKp2jRLiamYLzolFrN2+819queutd97AjdsbuHl3 A2f+bB/e7W/EP20m/7h2h/LKWobhTOyCUIR7HDW3Rei2WuNguqBPlJq6Cmge HMKB437Y+1xQB8viPHloZAc0DEmf4qeMJCHRJIvil7pZKTonUKwprCmulDJ1 AiML16WrcAnO/DLys5v4Z47bWEmho2UQkyoN/lZ9AZqzp0jKVISPm8LXjwE6 S+mPUcbEoQ0koA8OUUAnYYwmKahSO2CKJ+k4Y4LfSiRgiMWhi8b4+qgoAiEq FzrQ4ZfCcL/or0t+2Eme2KFwo67dyK8dUgNHOaOK6NUrmhZqmU7FgS1Tno7j OrSPVBhi1/DMwXb81V8dwnPfOCQVQ57afxR7dh2s1mnPbsBOB4o9ezOdZxxf hn50AbqSmN7E9ZgZlapvpA4YYoD0wjZcc0Q01+/anTt/UJMRdX9+EO8p6KyN BP6odlPhPsW61OwpKRraWtDG8FRdZMJbGekkoWhJOCD61fGiK32jeH6/D/re ECwU6droBLQxcaBRHKXXxsbpOFFApGbIUfHtqgJ0oJfOc9F59hQv4TxTgeia eVUa/esko3j81ru1vTT8Ve1lfVx/FpIWNLYrMdg7AFNbC3rPt2HAH6HjEtAE k1xhaRiYHkyxLMwJWjJHTZWjtuKjdNvbksnic4x+aSY5voShIb7QOBNflG8n zDQQIJWzkeV50cUI20nldKrdjEYyQJklArldtPjjWwiNQhOfoopi1ssvwlpa hqyXGvOsES8/fQLPfvs4Dr10CmcPnsaZoydw6MhxOOcvwTFP781twEoPmulB 48QKDFx6uvIctMUpaUSOcqgozcV2L9N7S8T1whU4Z+i9u3efeK/x80fwoaoB /7QWrXnv09UmI5MWtNq1aHPZ0S5KzzxxdDGhyShe5K5hem4Eg156wz/ONTaJ V85GoW4JwGEIMDAlZvhhaEa08BtiEhfTc8RgIXpU9OYS/WuUoqUxUaCwJeGe ZKAfuwn36BY9uIT17XvV7i//CtdvreEG7Sbt1icabK7h2Y879zPY4qoU80TF +cZSwYLTai1e7bdA3m+FpUcFY/sAHZtmrMxxJRZgShTJYIcpoUqwZWm5YdE1 pyC68dmLRTIW/jxfgDmXg0lM1EmmoeWS1YQTBAlzv0HcKDPTwX50kyWfkZmw s84oFb7J7emqc8Oj6DJTVvZGcPYwKeAZAq9Oi0nGYVmdAs/sqsOuA/U4fvQ8 6k+exP5jx+Bc2Kg5l0tzdk2aylW9mUbnjsxDS1qkyY9Jo0U8a2IIIunQMp27 eAWOOTr33kdLs/mLx/A3mnr8UyWEP6ytgQd3VrAybqIi59K0G6TzxO2uMDqZ 93rEtApXiVFnlHltnE6aZLzk00Vm8GpXDv0HDBjtHWSKmGe0Eb2VDel5Oll8 LrqLaMUo54To7Dcl1fsrJUdziTN9GIYW4J7YpnGJjq2isLLxL57g7fabtB9D XdySxgu0GXrQrpehSytDj1qG3kEZ/G4tMhETJtJ2jCdpcRvWJ3K4t7X2w09S pl+oTysqE2L4jQ6dpEk9lF/7ZKTl/QFY++wwn++DwRqDmdTSkh4hBkZhz5Om FMfgKI3BSXOUhfH7Zf58mL83XIKZuDDm8tCns8SD2DwcIqV3ormfGcARkvDQ Y3LjlQtmYsKPM2cNOHNEjQt7BzF4zgazLASnMYOgu4BwqAhfehSu4gS++OIZ fPfAOTx/uA7Hz5xFxKTmQid5oNnm1ogFhumZCgzMsVUs8IKX6RwqYUWqUMXC Khd6RdwVJxbml/D43XeeYKH9Kyfwd7o6/MOCt4aF38QjYqEybkYgrpeOA7c7 eHmcMXQ5M9IRXrlzlGyPfvTRn4EZ4oBPyVCrSyzixHMGTHap4RPCO8u0n13e IbWU/ZR0n1+XWWDmn5cmmqpj01IjEaUo66DuN6WXSewEubvOtU+qNDZTO2P4 m1i++2NoGQd0NEVMzOrsgcwqo1KSYcDUC6WhFypdLzTqXgoqWj9N1oO4RYOF pAPzcTvmI9S3ARvub67+q9q7v331NXR8rRXX+7y1gFHDy2/gPlXr0khVtQo1 02bV8QJwfbrF9n4CpxVxNPQOwaIIwdWph17pY6yYYKSYIE4mSfQm4Rqd2kFU T+JP+GYmSZn447FxWEfGYCmJ0cBlGPJFXpQ810eGwVMU5enQqnPhwoANF+v7 8NIhGV56oR/K4yoYWp2wKKMw2chLPPy7oUnIEhOwjZJhT5BhT5FhEwqn+Pfn yA40qgQWXVZEeMHs8xXCZQWW2RVpdN2Tu7/a0TloylPSLCbz9CY864+r9+BX t+FcoQaZn8d/q12t7i+ex98MNkpfPYkbKyPi1KYFAanzlA3t9iA6qGm6HKLY pMR0Pk42MkWqSYeHGaZifN4EoUo5+/IzFnTuuYiOMx3SGM0d0q2b3+cyEu3b VqDL1oYD1wCjik1CGRllqmcI9aXhmX2Ndgtu0kbX5IL0ipbvvsn3JWbFbvE9 TaDP0U09S5DQBu29UNt6oTP3wmCSw6SXw6yVw6KSw6ro5fKn9cgQHBzAhNeI FYKmErWhErRh2WPBB48f1Xr+/zKuLK2i84+/jtjZNfzj+MonwPMZzBcN1em7 Y3apYV2H1YIekm+5O0oamGaqK6DDUcTxHkZAbQoecjgbg4+zPAMnNa57fJZX wz0xy6Tjnpzlu+P3aY6JKdjGJ2EdE50ZxmAUWw/5ErTpIhplTDzNSrQc6Yby DN/dRQXqL6hxuF6Prm4+t2mIBCsPGQm9LjUNY34W5hJ5IbmdnaTbMUn5TWS4 ZmlMGKe0JcRJuoYdNga/UVjnlhhoqM+mF6vz/cZFrT5Xf1mUeI7AOL0B98Yj uMSwUHGCo3KJiJv5g9oFK0dISA5X8PeUce/f2PrD2gHIyohR6tcViDLOWBzE UAgdTP7d9gLD5gj63BNQ+GYYJIiB6BIZrcBOBS36DP7XX+7FD7+yD/u+vQcv //UBqc7dVFyHqbAu9WYSI5/FxHRNelGa4a4i6VDFx6GKkmSEstKmoGeeuWf+ MtfNEvzzGzukQcP/lr8eoxjmhXTJoKKpnYSNoxdG0fvRIoeN8HEY5HDq5HBp aISQS0Eb6IVLLoOzpxsFswobzEkbCRs2CaN1vwUfvvGodvbzX0Cx8wSCX3ke d1qb8VrKh5uvvfMkCH2ttrree+sBFodJu6TOVA5oXUxaTCo9Tgo0sXXmz0pF h7rYKNnmBM4bRqA0DSMzYEeuTwMb36mHK8MzJfoteKYXGIncMyTF03P09Rzs U7OwTU5DHslBpmWC6rShv0ELU7cVTrUHLrMfNup7lc2NBpUVL7dacLYvLJXp DggBKaZOJKkxstT7xRlYiF3b+DzsxIeDz+aYWaAYXKSuWMTJvhwCnhR8/jCj 0AKjzTyMU3O1wYhMWB8r7rQtb1cbvG3chXNNnEFZx9qD+x9FIl/qHcxfel36 qvq9P8DDW0uoSCdEbWjVKtBucqGdpEuqFhCn2OyjRNMkrxkjSYhpKLbMSFQh Q1nF93a14S++cAg/fPoYjv/oMA4/ewh7XzoMc3GD72sDBqJKX1il/qmQQS9J Q37FeHTVELNgnOkrmuO1vAIP2bSbhKshMYzW1AgMU1t8LiPUnm5oPT1CtLhl +B0YCCcz4WS3EULWPrjNffAa++Az9MGvp+lojEx+QsvPlOYj1fH2d2NI04vL GTsuJ224HLdiK2jBEklo2x8+hbmdx/EWU+H7i3Hi5l5Nltag9DXcv7mMZel8 ZbXJWZteK/Xxkzkj6KvtzmkiZang0JSZJsedxTH1KEwDcUz1mzB7nopWYcTu w004cKSJCzLJ4CtCxRLazHGoLAl0NBih63TCqQnB60jAG8gQglmShDgJpF8a 5yPziDZiAezpcuBItwdyW0aaUTHI59YkxsgSJmAUPW3JZ60ML9ZxAdFZ2AlX xwxtdg592WlcNBThdUXhiMRhmprhup2BjuFRw9CoFqcJmGAHCgW4Lz2GS8xe 3bwNx9oV2FcqeFG6Jk/h0a1lVIar16RVTcgYSHqNUXQwGXVbioTMGK/NVBUy kUWqFUJmiJBJr+HPvnoEn3/qGJ797qs4tusMzu59Fef3HEawSQ29IgoD9aa+ uAatuAUuBpWT+ajS/D8pQmaIyzRBxjOyCM/KbTSlZ3A8nMVAeUHq8KL1dEHv 7YHBK4PBw6jjYoJy9sHh6IfbroDXNgi/dRBB8yBCZiXCpkGEzcIU5IcDCBNK ISa3IOESGOzGmEuJazk7rqWtcOz6PoLfeAqXz5/Gu9FBvLs9981PIkX0xlmm UqqU7FIjsza9kezVR6TESPsy9HyRqnuUYXiSFI8eKnKxU5+p+A57+lNwtqjx wtd34pWnX8bOH+3F/u+/jN4LgwgcbMRISy/GjTb4+T+8vApmMmwFbSAzAm2O 6iWWRqfJik5RbygmrLiDOKd1Y1ebQ5pfLPZyFPxbVawMbYqvgX9jJEs2MwmZ GUCsRICVAc02RZvma6MdUecxSMrkZ+AU4lw/McmAQ5SMkkqI8yalYWkgrUsa SHsPDqnabgvZq1drSPlTPOTqqYjVI/owBixo1zK46IkUI5FiJlIcNaQE5n6B lOQq0byGg412fPHrJ/DSzvPYc7geB4/Vo69DjbQ6gGGZEbYLdgx0hSBTUkXm xXByIiU7C2WGdIfXRpkiUijhm3JLOMH0dSyShZGBUk+UVFtL9tL6YHb3w+pS wOkchMehgt+hRtCmRsimQYQWtWsQc2gQt6t38IMKv4qYVYmYRYGoqQ8RnQwh dReGdS0wf+cLGNn911hr2okN5Uk8vjaPb/0zlIgWJXnLR4O/2/QWrhkxYnFI 2gpWiublMb7KFFNDfg5Wscs/uixtAStI6r70V0fx4veP4/jzh3Hquf1o3H0Q A6dOYzkSwEw2Kt3QFw2C9DSzOC03xlRBoqotiLYKJaZAL8lCAD2iVYk3jF4v tVUH9ZyONEeKKfR6uCj1vtamGddEw/RhoqXM+DZKxDBOWIgCywRtkl/z8YAs CYs9DrfbDe3YKNRjvPqimG6kiL5SrooQaUbvbdhFc7fKOh69/34NJV/FwxtM QXmzNPU74DWjTeUkUpiC9ESJqRpP5DWUKGsoEV2sOxwTOPIderPJiO/vq8P3 qPcOtfShyZZCi2uM17UMtYnxUV2AQRaFusEOtS4BBbWiMst4kuXrzObRV5zC iSHGEsbRY4y7xrAJJqYds5ck19sPi2dAar7ldKngcWngd2oRcugQocWcesRd eiTcBgx59EgKc+v4qMMQf3fIqUJCNCu19MNxbi+iL30Ti/UvY2tgPy57WnAz ZcJrU6lPwuQpPLhe62RTqA5Cb9da0WUOotcuutPmpNFHGoJajEsyFUTnasJk jFpmskIhuIYvfecEvvvsGRzafRp1x06j4cxpvHrqGDx0l2txHY6FNdjnKrDO UNeI6dMT89CPzEA7PMHFVMZAdIjsW5SzJgmVMM2Di2YjOpnWeozVQrl+f47p J89szsCWJpsio9YLbcYUYhwhs2KgMI4ROmPVz7sIqQZVEi6rFya/hxCpFcuN 5KCdX5bGOFcHF9+Cbf0KVh8+frlG6CpZcZDXhuGYFW0KO9rVYXRoRS016a5t lOiYxAClkjKyUOtxvoyjRyzwNTgwEw0znsyS9Fdgou2QupL9EWPBMuqZoc45 ptFgHIdcz5XHWKLr8mGwTg+l3sdLHUYTs9EJEv/jyVGc9zlgcvcQFXKpQaTV M0hkqGCnp90kmX4iIeQyIOIyIuY2IeExIekzISXMb0I6QPMbaQakfXqkvDqE lM0IHHseYyeexaZ8P66565hxVNim67dzFtzKGPE3bz38RLb5qgSQ5YxF6kyz SoC0aWy8GgSIrda+ODQizSPSZ2YIkPkaQFYIkFUJIF98rgFPP3cGe/aew9lT Z3CAdrKrG+6lTam5vGNhneJ3FVYhfMWxZwEQ8got86zonCGGH2spNrtcFK1i wJrPgy439bw47EMn95irk8v6pWrKnJS3pVZH2aLU5khXpA3TSgRNuQRdmfGG tr8vhj59BG6jgWqCdH0kA8XkaLWhn5jnLBXkSpOtsbO257DCNSRNgc850Cpn llEEiBDRfiaPHusIX8c4X8cM49qc1Nh69xk3+k57UHTF4clPUfQsMRsu7SBE lvC7BMaiVP2oF9N5mKQ1hVk6fhznyIQbDcPoZVhSq4LQdpswUC9Ds8aBU/YI OslMLW4CQ4QLj+jVp4bNrYWLoPASFEECIuI2I+4xI+GzIBkQh5vTQSs+jUzI imzYgmyoZkEz/G3Hkdz3Xay27sZV41FMOBqZdTqwPerCdkl0D7URJGbcn09+ AhzfwOtXV2pNZuxSFUIbNUiXIQiZNSkNL5PAkfgkOOwfRY9V9IYK+DzB8fyB Ohw5exbHZX3k6OsExzpcNMfiWg0cFeqRGjjEiWDR6KnIoEpweFYfQh4uo0Ma WuNBh1OHdXEaTKR/tegEkoGMAJFTiw2QxCniBEkyR2DlpIZF6lxemqqtLjLC CBtmtCllsbstAL3ZC4vTILUtEoVwfdRp54cSqI9H0Rf3YSxvRzjqgM7lpOYp Ynh2UzpA9+Ctn+G5Wki5Np1CJcUIm3EwQTDp9ItzQXF06rJMHCWS7TH0+5h0 QjNoMRZx4qgbZn0WpvioNElHn2dyLS5I/fkof4fn8e+kz3VF6jJqOnVhiq+b VGSY2qzE0EH6dd6dQ5Pobmf0QaXUY6D9IoJHvo5w6x7YBhulnnxWhhE70eJm CPG7zAh7rIh5bBjy2ZEK2JEOOXYgG3EQNDl+zEftksWNPYic2YnpMy/gmvIw Nt31GCYPHiK7iTm6sVEwETiiUyijSplRZdj4zY9vvnwLiwkLVkQbmaITrQpy SS1ZiWgfJ7p0hspSGbmOCsfIdGMh47aLcweTZCbTK3ATCA0DQwjKfViOEu5L jDI019Kq1PPKviC20SpSNJE2QiZEp9AngCGXzOTgWXsAd+UuesnT2lwuqH1G LJWrh4q0+hjaVYLjZtDtzEgTBOVBspVIBgNxRoghWoqWoWX5vTx/VhSjsNNo iCRwejAIi8WKPqcFTakkLtAuDsVxyiNO27vQaPSgyUDT0TQ0pQcN/R60qBPk 61tITt0Rc1fxo1rEeXiF6XmICyzpwHCAUUfGRTZAxqJmTpIYS5k5aRxN2gxe eYVCVp6AjYtKQyWjJUfV5UQDutkdVMez+Jx0c1dPzGgLYkdxkrghOSmNYbBc bZamGClAUc7ggDeKgxSc+3VudAx2odD+MsYuPoPx099Ceu9XEGo5Cgcx43FZ ECBmIl4Cw+9AMijqEp3IRF3IxVzIx10oCEs4Ee4+jdTB72Gzcy9u205gIdjJ CMT0FNASc4PEnhwzSQ22xxl1xkVnUEadERPe3l7+xscB9B3MRyzV1jF5JzRG OzpUpJmi7kncSBbTT+Oie/mUNNjRXBIHkRakcypORhCxe9ZgLiGs8GM5poNn kaBaYroSxs/tC8sE0BIsYieNq10/MUcATVfbyhVLBNUa3OsP4Fq7A1flGrqD ETj9FlJiD+ZLXqyM+eD3hdGiTKPNkEEHqW6XO4MeH8EUykjtaXsTtGS1B5FM apWRlk6otZBWP0d53qkLwGzQoCvgw1mCapc1hGbR/VPMZySn6WRU6jTS9B6p 5qudIGoVIOrxoI/vzRTfIrW8hJVLb9aO/P4GliIkNgm7VBigUXLh9QbRPpjg /2AUsjLXuEaw95gNsosBWBxxplFRgjkFNa+jmA2jFSMxc1M7pBkDf8yPIjuP S43dlcPVto2iQZqgWYpRceAuhuNCNZMPHUtOo1vdAoOqAfqOg4h2H0KxYx/G m17C5MnvYfjsLqRbXkXU50Qi6EIq7CaAPMjGPcgnPASPBwlbP3yHd2L+yE7c UR/HDe8JTMQ1yJOn5SLkOmGy4KCKIGQUcndW+xVPOaWOoNsTFrxzZwWfQNH3 cP/yKpZiNqxknQi4HEzmPnTpRf9GLmn/MJRRCpkkc1eOAml4BpbR6t6ZY2pe 2jdrtAwjpvKTKjrhXlgkmSHC+Oig2eYXGYIojGaqe2i6Ca65MV7JMtcaCYlo OevauE8U3YazcgV2ou/qresYjbsxkRUDjr1YGPEhnw5CaRvCRX1GOurWRiS1 E0mdRFIHkdSZqHYfak+n0ZpJozEZxbmwFxeGhvBssxcDejHjWofzDuYcCrIn VVe9RFMv0SQnmuREk5xo6mVI6lF70D3oQaecnzNHiZPI5sgWMiO3pWGrfyGu 3Q6Uy6/jX8JovIRzZ6dx7sw0RkqvY2T4ddy+9dNfe0Ict1YZonl9h0TocqKl 04e2vijaNUS7KYcX9mnQdNzBXBeV7hgoYoSSGLYqhq6maRladly6I64WRoGo yo9I/eAV4tz9SLWDygDh1j+akrqdHiPkjqVmUZdegNXSA6tNQdMwrPfBpO6E qeM4hjqPY6L9IJaonZcO/BCTx15B7tyrkJ0/ir2f/xzOfOlP0PSFP4DlW0/h csMR/MTViI3IRQwnXRjmeykkbIxtZkKUAiyiQSKkQMzfXe1qPMPYNSOaPDLx jes/Cbl/IwYSYiFsw3LagSJpQ1ufaKoarfXjy0tTRtUJpv0ne2zU01Zmryf7 a42WAqymBAJ08Q445+fx69INIPvcvNQGyzIzxwAl9tqmoRV7bVLz8zL6xT7b pqhYew3O9VtwrG7BtrhQ2+n+r7h9bQOljBujRQ8mR7yYZSbM5IPodw+hgbBr dGXQRNg1MRNeYCZsijPb0erjSZz1B9EYG0IjhdxxUwC7L5qh6VVgoK0NMjeh ResXx9Zog4TfIOGnJPQGCT2F1YMBM4MWs6IEPwayPnFMWhyPTmzBUp3x+7+k l/kplEdeg8l8CXV1M2igNZ6fQRPtAu3iOdpZfn6G3ztNe3UaY8XXajcov423 33ksnZBfWM6hMGxHiaJH53dCz6BzUunGqwpRl1jG6TYLFPzaY3PDK4pFu8IU gkM42x7E0Z1a6OR+KBwJyAPD6A+XqF+JxjiJxRAtWYYyVZaKnZWZEgZzwxik BBkYLqC/nJcqRETfjb6xFBTTI+iaXsfR1AzRymgxuk3X9hK1FHpWLVFrhM1u gc1hg8mogUsnR6D7FHLN9ZitO431k/tw8E//EGf+/HNo/NLnoPjG/0Bs39dw P9SIWcq1UtqD4ZSb5kQxSepG0pVJGJGKaZGIMtuGZNieF21Jidg5Zts5KwOm 4RsfP5zxG7hUzmIx7sAKM61aZBpFBN2mpCS4BgJFKGNlaFIj1W0+KnrzyCQs Y9UtvkZzFjrTEHxB1w7YZ8UgUNvsDKwzDKUz01KbdePUFHSTzCTj1eoysaz1 s0ywlx7AuXmXWL0Oe2VDGvXwy7VSgLfffgPb25tS14zSmAcjk9WGJIZ4GIZ0 hGsnjPrwKNp4UfuGL8GR9sKZ9cGV9aM0TFXvtOKQzIKWbiPMsm4ozSYMegNQ eoNQeUPQuEMEjcYjznSrPfyeO0Dc+jBAzPaJMVxaN/oNcdhzXENi8HFoXQqN /6/0+nbh9u13YbZcQn09QUprol0kWJtpLbRWgrWVYG0lWNtorQRsyynaq/yd k9N01lWsrOZQHrNjbMyBRNYBudddbSbPtSIxSP0v2OP5bitOnVeivt2GCzIv dh33Ys+pCF7+Vh8UjS5oKcc+6tdFStdHdtgfYeiM0eKke0O0ZAEDGX6fMqi/ mOV1y0qNqeQEq4yhtWekWtbUMbmOw4kpgnqj2sPL0FvtU2khYK0ErE0A1g4n 5ZCXUiwU8CLgNMEq70bjKy9j35f+Ao3f+EvIv/8XML3yBVj3/yVKwi/0Tynj pRG0ooFzinojaUVmyITUkA6JuBKxaC+2FwnYRdH2VPSoZGafNf4zwL77+DFm g3Yspp0oRNzkyyFG2CH02MQk8NxHrbu0mTJ58Yi042gaGZd2G5tEM3RTDB6/ 9ZdgnZ6UKuInyQInmK8pSSaZg8ZHoRytUh3VxHRtS/p1ODa3YV+/AttK5aPJ 00+Gqi5PWbE6bYeearvT7USP14sjnXYo5SYYm9ug9keh9ccZjeLQBxKUeKGE qPoLUxGE4uLIKDT+CLEZxqArQBz60Uf/m5KM+4VqbYE1WPkf0rP+CkZH7qKh gauvgdCjXaQ101oJwzbCr71OjDzvOD/DD0ThD9BBDLYLIw7PH0jjyPNM1ads mJ5wkAY50ch4fZEmCGgrY3Yb6UI76UI743U76UKbKGLqsuL0q3KcPa9Gs8yH p77cg+dfCKCxKVgtz6AE73RkpYHbMp8YY0d8UYrLqcDkcVoyK/WNk+dFOxJR pkNSTPz1jJAqjKSgr1yG9dI9tI1VMJgVzb+uVpt/MShKnS1NOmLQBJvVCrvd Qfy54PUSf0EvYmE/krEAuutO4YWnvoCj3/wC5C99Gcr9X4JC4C8XoBGDOWJQ 9HrOEH/Mz/k08Zci/pJ6xJPEX0KO7eWP9UhdsuHW/BP8PV07WCD6fs1FnVjI uqAc9FOriYOgXEHUklK/r2htGzMjtjGJQTHcpjyKJiNXmDEiCfIdME2MEUBG fjRMjFKCjDKbi7pzppXRKvHpYzqxiLFrogb30h3YN2/AtnoJqw8f/XrtpYgZ hWKm68qkFZUpO0JJ4s9lqx13DeCCIYATzW5Y5GaYOhWEXRrGSPXkpCkuTk9m xEvhx19lcOXSiCahJSjVgRiUHoLRHoTc4JVmWDsEEJNryI1dxZ/Uigwt5gpR OCWh8EINhS20NlpH/Sw66mbRWTe3A111c3iK/pnjZ7PoOi9sBmf3h3Fipwsn XnZh/y4Hdp9z4CI5RCutjTyig5jsYkzutpDSmmoVL7rqkfhuUfHSY8X5s3I8 94MmNO8eQNs5E148FsSuxjxadBm0UuG3Myp0ktt0UeV3k9v08O33UOX3kFL3 iEYqxGMX8dhJPHaU0mgvpaBduQzzxj1kbj3C6s17sOYrsBaIxyLxqCYedaKf IfFoIh7NxKOthkdfDY8RH4ZifvjMA3jx6c9j37e+iO7dX0Xf4S9B0/jcDgmM vyaFxOEc4Zh1o5hxIJexIZMxI5nWI5EiHFPyXzRZrVDorBCOC6YaHL9Rqzld H85jNuHCfJ6LtCOCVlUKHeaM1ORRzkWoiObIXET77oLUOUxLbdJIDWQgNmzp GPSMdXrCTkfTjpWgGROt54TMK5LN5CEfyRKG16o3XcSOulSGfA3Z69u1OPhZ zJcNWBm3oEIptkZJ1uEwMhA40Svq83zEUiCJM9QF3V1BuHoNsLoixF7tkGeK lh6GJV2EOV2AKVWAMZmTKoC10RTUwSEm7hgU9jB0sXE4Ry7Dmd8gFpfx+Cfv oXoM/VcZFbeJwwnicPojLLY2zKG9YQEdDYvorF8i+FbQXS+6HPbUV/ihYQVf 5qfLqD+YwOk9Ppze7cGhvS5891Un/vpVN16+4EIH2W03ESmTRJUPfTaaxY9+ M83Ez40+LhKajkH/VD/O7OqBqVuPdrkV57p82FMfxiuNaVwgIpvpmBZ7TeQF aOGMVM/ULgk8IjZLIyJbCmk0F/jmFy9LjZoqj9+V3mbl+h1Ysiuw5q5K/cos g/Jqd0090WggGk1WZmi7hEYP0RgkGqMRL4biPmZZP/y2AZz6/g8wdOElhOS7 eCGGCcVfx3BeQNErwbGYY3TMEY5ZG9JZwjHL7JwlHDPMzquE4ypF0CqjY8WG B1fTTwTQN2tHRtfK1XKudNCHCz0JtFILiuTQzbfcG6husynoW2UqB1Umj0Zt BAZeOvMQiVmpsANq/oN/DWW5IPVfFTd0BARFt1ozZbTzY3v31o2bsJCzPHrv g19/UkfyzkMsiwG24ojppAOhIdFK1UqZQgd5o1CIOvQA0UU1eqo7Cf1AGI5u DRE4Wj1mSgVqy1ePm1pJHsy5MkzZEmlnEbpkHpq4OO2TIiIZJYN5uCZEMeMl OHMV5GYu/1GNGNy5/TZBOMrUPFVNz41zBOMiwbhCMK6iq2GdQNwkAi9BJqxx C72NWzv44RI5SePhPM7tC6FurwXH9xvww8M6PLNHiWd2q/GjfXqc6HRUm3s4 gxhwhKlWInTloD1K8qzkx0F7hOslgotyGw691A19pwk6tR6N7RpcVPrQPOjF sRY3DrdFUc/k3UD/NDF9XaAAvFATgBeYFZoIyybCslHsPYgpJSv3sPLopzWi /luwpKhqMkzc2W1Y9A5YRYdODaGoIyE0EopWOxwkih6S22DQLUExEfMiOeRF JumD7PmDuKc/g6mECgUm52JOiN4iQfgpfnTzey4aoZizIp0zIZnTIZ4fxMyU EdvrnmqT13VCcdWKdx5WnkCxev/z/8bdrQ1MEorJgB+NsiSa1Vx5gqc4q5t1 vSFmbK6+gSFeAlUIevJ+Y5TiL8+wWaD8YV7oG652TJZKiodTMJGnOKRuDPek FgCWjW2YV6+Kbpyfrq0AqQ/rSHXqo2iQKI6tdjtd6PWIOvqkNPBAE6IMioyg 2zaM0x0pTLb2I9SvZZad+iU4hgUxtZUmyYIouIoUXmKSNPmsNilqavO1Mvo4 3NPbUvm8q7QOR3a+VifwKdgty8TdmBQEmxkAWxoqxN46sXeJ2LtM7F0l9q4R d9cJuRvobbrBCy+/cIOxoPv8Our2BVG/j2pknxs79xrx7F4Dnt+rxwt7tXhx jxrP7dKjVUfgueJQuoagciWhdiepqtSeJIGh8gzhpRepvFoFCLxQmMPoUbnR 3CvGnvtxgdn7Qr8dcqML5lgUPX7Kb0cGZ5mlzzFInCVRORNJS6ftp0T13/t/ W2tZ+f8wccwyaVCVpW/BQsZpVYguHlQnGiYWA9WJ1Qa70w631wl/wIVI2I14 zINkwkOm54F6z0G8Zj7D+OZBnlbICauBjSI4nyfg8jZk8xakCkYMFbSIFQi6 GQO2Nwi6DYJug6Bbs+Lth5Ua5r4tPfw7qc5xJO5GjJir60mhScWob8zgVUMK Z2xpnHOmUedN45kDauiV1G4hX3WTmJG/J5+ulTGnIBvjclu+XMXZ5r1aGftt 4u86sfazz0hP9x+xWNSjIp1ydSAQMaDDaq6eciU4RJ9eFRW8jlLZGCOQklNo 0JbgbLJjvqMLEYoQZ3mOGXUOjpFZ2MXJwRFK95I4SSj6+49TRI1CkyxBLRVy p6RaGPekqOBnzCstYe3ma7XTf5/C2MgNXKwvEXBTtEWCbo1M8BJBdxWdDdfR 3XATPY3bkDXdJuDuEG53CJi+i3e5Zur3MxOQDjYeCOPQITee22fB8/tteGGf DS/Rdu61YtdeEw6fchJcGai9WWh8OaqqPHSB/A5oGYw/gwMnNMS1DS6rn/o+ TlU/BIU1hgFjGObUCpffCAbcVMGOJLKjbuQmPMhNuXH7/ia2ae+8/wZpbbVJ QuXKfVgS67Amr8MSWCSJ7ifW1MSavhrgLBapz77bY4ePKiocciIadUmTZZJD btiP7sNd83FkM25kSfFy1Av5nJPBjEaMZQXGCgxsRebYYQMSwxrEhhW/aD0s eoJu2HGLOKvdXvuu9PDbmJydgUxjwc52P55tj+GF3jh2KuJ4RR3HXnK7Z7hM tYMutNk8OO4l9wqLyQfVUukBMZ9znaSWZtkQoLpHinEHqev3nzR6Wybqq2cU BajMTN92qX5CzrWtEAOggqSM0XEYh6ZgyRA0+Xk0NkeR67Hh1A+68I1vWNAg S8M5tgiHmDUiRoOK4VDlWarxaamkVCuVDpNqijMy+UW4ZxjJJpjfx0R1+EYN VP8advM8mutHCah5CVCtjF7tDTcIqm1GsjsE1D0C6nX0XrhPQD3YQTw9IA/o b36A9tObxNQQmg7QDg4xiNmJKRdeOODFS/sDeHm/H6/s92E3g9xu/kzjIzsO ULSJ5gdhvkVxFDNaxtlOBivKZaeJTCWUlTpjKIm/QTHAxiaqBGfgGqnVJWaX sX799U/XEqQ5sgJL/AqJ7jZMahcsfUyQilqsMpqk3RSny0rlYEcg6EA44kQs 5kQiwaR5Yg+2DQeQTjuREUaJkM06GKczORsJbzpP7BTMSA0zRpWYGMtqzMyZ iBtPtfHwJUqGTTvefrz6BD/frvVaePDOB0hUtqHjKtaPbZGLTaPFWcRfN4Tx o1YbnuvilZIp8UJdD5oG+nFa3Y89ShX2a004oLPhjJNJklFDM3sJplXRZ+Eu 8fMIDz/4OX7zCYjyZGElgqjshFa0dbK4SKEjkLvTBJEY1MKUFpuEMTVDOjsP e3ERpzoy+MKXPXjx23Hs+WEMLz7jw5F6n1RZYaeJ+cTm0QUYGbX0xelqEWua slkc5BxegnuuWrrimlyDvTxZA9HncLEuh5b6KQJohbZFEN0giO4wKr2G7sb7 6Gl6SAA9hvziG+hrfpP2Y/S3/BgDtJZjc0RPDhdoxw7EGZk8RFAILx6I4eUD Ceyi7eb39x6MYN9BEo3uIaKHwTtKaR/nIkmMU8CmceKIBVZtDLYQNXZsFGqi SxXkAvCJAd3kxPY4U/mTQsk1OHKzn65dysrWIyLpEszxmzAFlqguBmCWq2BR kmrpDdK+iN1hZiSywBewIhiyIRKxw2Puhe/kXtwy7kcyaaewtCOVER1FbEiR UqVyFiQLJgxJCNITQVpEy0rcEq2rRVfiLZeEohuMQt/6OLX6bSzfeUzFuAnD +BaME1sw08TsdrWYfWftRru2F6c6B3C0WYHdh1rQ3tJBNdCHU3ITTtPE46u9 JpzsMVKqM6Y73Jidm632d/t9LJPsiRN8lZKTAkIt3Q6V8QLJXWRm/mGow+PQ J6ZhSs/BwuhhH17G0fY5fP7pTTz73A0c2nMZJ/Yv4DjTyWhTN60T8U49zF0e GNud0LfYoG0yQy3OZp1RYeDVfsiPdqPncDM6D5xDyysHMPr5ryD3l19C7M+/ CM/XfoCJF2X433du4j/XOP44HdVcVyKw5tFav0G7hrb62+iof52R6SFB9QZk F36M3otvQd78NkH1DkH1zg4MtL7LCNV0YBgXDpUl270vzMgUJqYSeOlABjuJ tVcO5ompHPYfTuPA0ThebYgy0kwRT3zbQ9PoseVx/LvNyLdp4IoUoRdT+YYm 6YFxYmuU2CpL1fCDnjQMiTmpjFNkbVdpEes37366JpjSlM3myDWpm6FB4YKx exDmfjUspPEWox4WmxF2l4lsykxsWYgtCwwdp+F/dS9uGvYiPmRFImXFUNqC oYyFStGMBJd+vGhEvGRArKxHZESDqXkTbhJTty67az1yHfjJG2vf+rh4/B0M rd6AYWIDxkmifZKQmtqSzhb327uYy3ugdcpgcshgoznsvejc+RJiLUfh7D0P pWIAygFa3wAUvf3Q9VRLiXz9/ViI2TEbtEl7d7/5BGMZU62hJzGm1kqTbGUM 52KonsJf5kWckCplRcW9pbAEe2kFRzsv4fPfeh0vvPImDpx6m8HpTRyuX0Y2 lkIhnkQ0VoQ5PAVzaIKcYRQWXwkWT548lerVGofZFITZ4IRZa4BRIcMHhi58 qO/Ah9o2/EzdircS1/GTkq+Gsc8QY9eJsTG01i3TGLjqbqK9/jVmv0foanyT GHuLGHuX+Pop8fUe8fU+4fUB7UPy+h8zaI0xX1w4NIF/j+f2BvHC/iRBlmfg GsYuAbxDI9h7pIwDx4Zx8GQW+1+NEWDUqroyjjUlcfIVGUJcH+M+L4yiyIT0 T5eaJSWcIdAINgY5lWhvFxCVuMzik7drZaQVrN9+7aMNoodvfACj/zJMomeg dwk6yh0DE4xpUA2TTgOTmWiz66uHlbxGeP0maNtOI3BqL24Y9iCSMCE6REuZ EMsYEcsZES0YECFvChNhobIOmUk9rm95cf2y56Nmvve287WkV9OGv4vk6nVC bB1GqTm1aFK9xYxuhNLZDY27ByaXDHa3DG4XgyctSDPueRaX5TsxrT+GqFWO qFmOiFGOsDjgL2pEBnvhlssQUfSjErdjiQF4azhb65z7+1hK1g4VFgi1QeZC A6FmIdQceUKN+SsyWYPaQhVq5RUcO2HAyy9dwQvH38azZ97Ds3XvQZGk+Jxe h216ja97lVF3BcaxJfRkZ9BIV1wgW2kJFdARn4Cc/6svO4X+9DD6ElFsX1nF Hdo92qXN15CYexM///nf1aD23wm1m2g5P0mIrdKuoq3uNqF2nznyMbqbfoIe wqz34nuE2ofoa/kZ+lt/TpjR2n6OrrPbhNo0Lh6awcXDs4RanFDLM5aVGcvG CbVJ7D4yhX3HJnDg5BgOnS7j4Nk0vrc/hr/4igtf+7wBL3xNg4TChgBzujG3 BEOuWqqqZYhXC7iJ0yqxESjDovD7F2Wqrql1OEcnqoLo94i0nxFp12CM34bB t0wUKaDvVVJrqaDXq2E0a2G2iWNxeri8eqhaTiN4ag+u6l5BIG5AMGFAKEnL 8vM8H4my4LAefjKs5KQRV5gbrxBlVxnLrmy5cWnDiQ8+ePztT94jSK5eZVpc hWlqgzGMWnX6MiW/SQKY3iMGwvfy2eXwefsQokW9/Yh7+uHc+xxu9e/EgvEo 123KJacaSTnlSNrlSFjkiJl6EdbK4Ff0oGxXY5NZfTViw7VS9jdqZOHqVBor okMrZUaAtLJD50OPKQG5g2HNVw1ruuQvsNbnH4dyrwoz9gBa9Zs4Z7mHvqGr cM6QQ01XG4iIyeUCawbyL93ofLW4uTgOVXYYtrmbcFdeh3vlFlxLl2CfmcYf PNmGMM4QU9NoPb9Ou05c3SWmHhBTbxJTbxNTPyWmPoS85W+IqZ8TU3/Ltz3Q 9nd8H11n7zJwzRFT8zhHbD2/N01MlYmpCewkznYRZ7uPzmHfiTkcOD2DQ+cn sOvVHP7nl9P40lMz+MHT4zi0awL79yVhLtAVhQoM+RXoiB0t37ta4Co1BVWC ISw2zNw5Ds+c6FHH9zO7KdV6/kZtI0mAyuC/ST53B3rfClRtg9DIldAq1dAy fOnNDGE2rXTesv/CGQlQlzQvwyOOLyZoKT18GT7m9dU2vwRUfNyIS5d8NC8u EUyXSNvXN5348MPH3/n4Dc/PIrmyJXUAEY3XpYg1fQVapmEdo5SBILIRQB5f PwL+AUT9CsT9YnzyINJ+UfDzAu4pd6JiO45CUIF8YAB5fz9y/JuMR05w9WLI 2ouYgYFe2Y2lmAFbaRs2YjZcL2XxZJ/hwZUKlhNEVcYpnQZsV3nRLU5S2XMY IKpETwEtWYkxO4ceTwn1e/UY1YjTs0k4JlekumjntJiMu1LrNERhNEkqW5tf rh2braFqDMqcaJ/wCO611+BavQnn8gbWHzyooYqRqnQLLedmiSiSrvM3GKnu EVWP0Nn4E6LqXfRcfB+9zT8jqn6Ovta/I6r+npiitf8DUXWPqFogqhZxbP8Y nt+TJ6rGiaoZRqp5omoJu48vYf+pRRw4N49D9dP40YEC/vRrV/Dl7zzASy8/ xLEj9/DS0evSbAtTcQ0GIktHZGkZsdQkC+r0DFSpcWl+hbm0Cs/i6/AsiBrX La6q+X9T2ykSoEqOPqAIugutdwUKgkpJVq8iqPpV5KOaHij0MnScO4bA6T1Y U78IOwHlIKAcSRoB5cjRCKr8jA1rGz6sbQrz0jxYWXfhgw/f+O4nzyc9fOen MFJCmRmdxPAN69Q16MjrDExzJk8fwdQPDwEUDAwiFlBKJ+7SQTVyITUKYQ1i x17CA+0ubDhPcKmWYypq9HJ0EKXwIIaDAlx9yApg2WVImHoQUXXiGpn8lYwN mzErHm+ufuZJc4mIFSvi0GvMgTaFG13SMakM+jzDGAyNQ5OYgp7X8syFAOz9 UaRjcVjHFqVKafvk4g7Yp0RjMhs/iq7eokJJKj0Rxay1omj18ChMM9WiaPf6 PbjWrsO5soa1+69/HE3NZ4mmc0TTuZtoO/8a0fQYHURTl4SmDyCT0MQYxXzX 3/a3UoQaaP+7aow6WEXTif2MUXuKeGHfFNE0j5cPLmHX0RXsOVnBvjMVHKhf wqHGeRxoGsP/fPoBvvjsT/G9PW/j0Ks/we5Td6toou4zFFehI6K0UhmaGJRB NGUmpGEZptE1aRqKe5loWiKa5uZ/64kgu/wOOu1Mv+oIGls6cfFiHVo6GtDa 04iO/kYcPXcGfXUnEVQcQpttEB0uDbr9epgYmvzDZozPu7C05sPSujCv1P36 ys3iX38cPf8JqRXy8rFlood5bfIqNViyWkjrFsgZgJshJxhQIRbUIBnUIhPS IR/R0cU6lInbzKmdeMP4CrY8JzGe1NG0GBvS/P9cvWd0W1l6pvsutcPYc53G vrPuvba7e9bYfxzanu6x2213cLfHHas6VFIplUTlnJhzJkiQyDlnkCCRARIg wEyKUaQoUpEURamUKqtCl9u+a826990HUHVV/3gBkgDJg7Of/YVz9v4+jIRV yA0oMNxXpMhL88RYP2JswWRQgZsZK64nLLgaMuPDNx49CyvX80ksMN5aTDtR 3+FAs6KXvi7GNHEQ3f4c7fooDl2worMhwEOLSzVLxYUoyyhFVKzjl4iO0Azx maE1miY+U9COioV1xEes5cwMw7JA37b6AM4rW3AsXxf1+IvXFshP5jZqz0+i 7gL5uXCLFmmbaaDg5220VBesUTtjpg7GTLJ6MtTwMRn6mPx8jI7qd5gHztAi 0cfRAr38Wob8TGIXU9fdh5ew9+Qy2VhBycVlHKpYxOHqOZxpH0edeR1f3fU+ vnPoKY4z5Yx2+GDuHyc/l6HP0BoNiRZK5GeQfi5FfpLkJy4285GfJfKzxDB9 cR2OSzN/VORn6+4yciM2yi41b5DrzbjQpMTx0+ews6wau2tq8OqFMpyrLEVN 20Uc7mrBUXkLzilaUG3sgcxnYZzkQGrSianLdGe3Mnj/wyc/+fRmkj+i9XkP xtyMdCDmsWs88behs7bB5CA/7m44vUr4/Gr0kZ1IkLz06pEOGZANG5CLGjAS NyJzcR/eNu/DNd+ZHZhI6RlnTCR1GE9oMRYjShGi1K9ANigwkiFhb6UhapI2 K9wasuAGE9U7Ywk8qz8yt/Em5ovaIZVH/qNCceS3CiVThd4XizqDNizEHPDZ nWjoDKJFF0G71LY7g9MNbtScs8POFM8QScOQmYBxmGlgfpLTZWoHzKOTYqkR H41ESz82QcTGiNizpqV0oMSusE9aFLzfgH15HakbNz65Drq18RZqz3Hozy8T tZtFzB6hUTJT76C15j1i9j4x+4CYfbiDnH3ICdvVyGSQqjwormJNSxHVy/sG GU1N4NWSOew6chl7Tq1g37krOEB/WlJJS1VDi2a4RF++BGOaGlrCwfP9SKt9 SFkc/HSL0GUWpI5u6iESJhrADE5CmWYkmRqGdXaDvvt+oQnM0hoGr60XAqnf w9OnjzEyYsX4mI2yY3zUjmjawSDUjQqrB+d0bhyXGXCipRsvHzqHE8fP4lzF RZypreTgnOPjb+BcTSUuNtSjqrMT3c44QnS9j5589NNPk/ZnWGL2acrNwzxC Hzd6E8aBGIx2GSyubtg9SmaYGgQDDMOCBsR7DUj1k6yICbmYGaNJM8ZTZoxU vob37K9hzXcG00NmyogpobQBk6kCcqNRNYZpuYZ6u5BkVB+1N2OmvwebOStu p824HjXho7ceFZbh/hUevPsR5rfeZKxzFdrcGnTDa9BThoy40LEmVV3XJ6n4 GrSRNSxcf1Mqfn9vdRmz/Q7MJ52obfFLu4taTHGUdwdx4gCjT4UflmBYul8j Wp/qGJ0bssykhqkclR+DntKNjDLWGoF65Fmh/wy6soNwrT2Cc+11OK4Wiv3b llfx+IMP/rIYyNecGSF9S6TvOgP6LdQziG+sfAPNVW+TPAbyte+ive5ddNS/ B1nDU8L3lOPV1fgUX0TdiWUauUniN4WX9iRp5MZo5GaJ3iJ2E729569gfzmN XBUdZe0ltHsuFfoRpUVPonm0BmbQ0hbBjNEMc2SksJUucwnqzDTRmyxsjBqk oR7M0seL0jkM4lduM3RcxcrDh39QvLT0PtGbHLdiasJG2TE9bkeX34EqhwfV jsICuLpPLYArKdUxFlCjXdaNsrZulLdSzd1o7HCjscWN+non1I5LMAXXYPKu SjXYP2Pt/pATh9M/x/Rp5DoZ3IROLFd3dMEm9v96NbR0Olo6AyK9JiT6ReE7 C4YZfI+kOEMGeaiMm0bPH8LPNYd4Ni8NW/F1PlooM2ayJonHSeaoY0kt8lEV MgM9SAc6Efe04lJMgU3Oso2sBbdSJmxNxvHgvQ8REZf9R9aky/56ykiZ8mt0 ixRBNGcpgmgepETJ+V+pJD3oDWEm4oTL5EZdRz8aNTHsekEGRQMNg9WN7v4h hioZqBLDUNMYaAZzdEdUlhrOQUPo1JRS2oqUgfzTK93WX5furT/b2528cbtw Q/tvMDJ0F7Vn5wnhOmP/TdSV3UNDxSM0VT1Gcw2zydo30Vb3FgF8m+aPaniH EFKNb6Ot6nXavzFUHh7H0ZIc7R/j/gPT2HlkAbtOLWPPBdo/Ari/ehHH2xg8 Ri9BmyCEKdHJh6IXPdyWgUyRglvpgJbgqTNTDC6ZPWboWTMj0o4F1cgUowSx BJ+B5pVbcFy+IuZQ8SLY57C6nMDMhBWXSCCHkwz+V/T0OlHj8qD208veSGGz qE1o9uBImQ6t5WooVUa0aX65e6NVTsncnBguNDc5oXVfgjl0FebAFSQyt4ph 23eeud2332VsQFZzosXzLRj6aAwtzBwdPbC51XB5dQzbjAgRxFjIglTEKq1I y6XsGB1yYCLrwPSwA4OHj+Ln+oM7MDdiFw82fA2z+QKQUxkjodUjn9AgG1Vi sF+OZEBsGmzEncnCXq/bGTNyTDB0o6uMswp3DozFOweW0TVYhQikjTAqgv1Q BgfQZTOjlalQu5LqaUNrZxs6lWYomH3a5TJMRVzolgew+6UetJwyw8Sz1OkO QxZISq2wu+mPFbFBKBIEM00NZThiQ+jJDqE7K1btD0I2nELHcIIQXpcWGNnX t2Fb25J2jydvb+NL0nn8a1SfnkHN2VXmC7dQW7aFuor7NIMP0Fz9EC01j0jh Y1L4BO31T0jiG+hoeAOyxiek8AnK9k+g4tAIKo+N4sU9Wby8n/kC84adp5aw 6zy9cDlVOYcmxwRUzKQ1sSlac8aiqSmp1qfopFNSF4dRw8+td9L0CfIYQGQK AUQ3P4958bZUaMV5dYsE3kD69kaRvj/FB08fSR065iatlA1z5E/R60Ctm7bM TfJE5TNnYf9QodR4oWvT939WC1mlBhq1ETKdFzINf672oF1FKd0cE6rTibY2 J/S+GVgHyFjvCpLDN/H8pzH8P7F4W/SsmpfsjCW/AVMfT7mF9tChhN2tgcer p082YYCJYTxsQzruQCbl4OR3YjzrwlTOhZkRF3InjuNj8yHMj7s4kRbGnPif fLRjbtSGS3krUTVjgjiOMDMejqsxFOlGsk+GqK8Jd6Ydkl1MutvhNTTA0tcL 40ThToO4FGwdJ34Cy/QYuj0myGizuy3tUJnboTG1Q2fsgEFPaTugV3dAJyrd dbZD0doOeelpdB86gIafNULX5EIrQ0Rpc6A7gXZ/QloL3TmQlFoWdCWoZApd oiv7YBIdmaS0JlpaY7S4vkMyhL8Ga3Gpm9S39YOPvlQ0h1sb7xPGFdScv4Ga Uiaw5fTJFdtorLpHc3gfLbUP0Fr3gDA+IIwPCSPVIPQALZUbKD0wivIjOezZ l8YL+8bwEpOQl08uYOe5RewsXcDBhkl09zGcGxCJp6gULIrOUslxaFLjOKNK olIWhUPtgrY/BkW2UMNFbC5ViG7qCzcgZ04uH59CF8ONiaUJ3L65jHfeesxo ouAdRcnnufFCu5GFSSEblL2ifrALDR7C6Pai2eVFi9OHdocPHXY/ZLaA1Crp hy80o7tKD63GCrmxV8QaxiB+G52GIDr1fI/Gh04VYe0mnDInbPGrsEWuwNZ3 Gan89ec+zeVPscQpbhpcpO9jRjJMP61rg9XSTS7VcLh18HqN6A2aEe63IhG1 YzDhRHbQhZGM2EvlRr+jDaXf+xIav/kl6H/0VzAf/yEWJ9yUi5+OefW4A7Nk c3rEgolh5tpDeppWDTL00alwJ2K9zdhi/p3q60TA0YyAtRH2gV6JSStlo4xi uvtN6La3QcnMWMus20hZ7R3SnTCHtQMuM2WUwUk+HRr+XNkBS1cHVGWlsP7k Rxgv2w1jTQsquuOoEtsNyWajK4FmstnSm0BbP1VszC2aTDan4mhKi/0heQaF z9a8bUvr9M2rd2Eq9Iv92+IKXIvqJqrPXkP1hdtFKDfRUHmHUG6hqeYuodym hbxHMO+JFbj193agvWGbSUrFsWmcp2M+cTCFn+7O4mcHpvDCsTm8cHIOPzs7 hQ5PFp2BYcj7cugZoLmLULE8U1o+J8WWwTwOd0TR3dPHcXNAPjyE5mQf6mJB VMfjqInHUBsLozYSQk9Y9M+1Y4zubSRmw8iA6GKcwntvPv7tIpjXVxIcOjNl xaKAMmihhXSi0eNGk4dQEsxWpx/tzgBkjl502vvQZQ9Bbh3Aj1/shLLWAr3O iR5rRKzKtIZ5brr5mtzcD7mJ79P3oktDSJU+aNw52JNXYY8uw9a/QDjX8KNP 0/kDLN1iJpNmFDkkdkTcgUHHUTfTcds1cLj08PlM6O21IEKLKdaJDKZdGCaZ ozkPJka8OPvcl1H6nb9F1/f/J1yv/g/oXv1bRBXHsTRFQiddmCehswyGp0et mMgz+8ky1x7UIpNUIh3tQjzUgsFIF3q9reh1tyLoaILHVA/r5DrsE9dgzkxC wRmgdtIaumQwuztpzTvhojyuTvidgupOBG2UVYagSYaAXga/2NlRXwrz89/F pdLdGG8/ioy+FfLyTpS2+FCqTUg7E6udCdR6SSsJrQvx63BcapvZPTYH7aV1 aTHTDliubDPEeragKX7rIb7yDEv1HVSdu4mqixuoKdtEbcUm6is30Vi9SSw3 0Vy7STSpuk3+ndb6Tfw5Whs20dq4idLjEzhzKIMjJUN4blcGz5eM48fH8yhT ptDqSDNXYfAQYATby0i2nwrTBsaoBL9OZhjaxXG4sZdBCam0qlHOKL86RjIT UdRTDfEwGsK9GEwytRu0Y55kzsXtUr3UmQEbZvqsWMunpPvWv1m8BvcB7ebi mAlLRHSJiGYyVtS5bLSZDAWJZ4vbjzai2e7sg8wZQpczDLlYB2ePoscew89e VkHT6IDR6IGS51ZJC6Dgs8IR5+ucRTbKEka3gbjqiLbaD9PAPBzJVWK6BHt4 Viy8/+GnKX0eSzfvw5RcZt5wA5bMFowcXatZAZtNS0oNEqV9/DSRiB1J2s9B 2s/hrAej+QKlx7/7d6j61y9D8+I/wLf/q/Dv+hvY9/41lkjg4rQb85NOhiwO zIzb+H4LxoaNyGV0yKRJaULO0LWRakNvgPJR7hb4bLSjk7egj0QLdJJII8NP m7eLIa8cPm83glSfpxv97m6EXZRTjoi9C2EbZe3EgFkGx8GXMXdhJ64p9qG/ qwrTfgNWODp5q5lnagiNvjm0hOZoO6kElZ6Dcmwd5nnayQVqiVRe3i60pOGz fnGLdvMXKGx6/TLMmruoPHebhG6imoTWkNA6EtpQRZHSRlLaREKbSGgz+Wwm nU2ks6lpE+dI6MmDtJmvJPHDPYM425KQCnM2Suuck2j1MK5gKNzRl4KsnwpT UYa7iRRaEmEcppes7fbCplXTwNkKVCZjaOJzU3QA/rAb3oALXr8LPhKmMPBr uxNuK3NAoxNphw0LfiuuDSV+owjojeU4liRAC7uS1HSdDS4HHTqjSxfhdPUS zn7CGSacUekijqjzr3CkCGQaL+3SQ9fqgckcgNozBLV3ECpONJWoqO9Ko8eZ JKgJ2tQYus0E2yDW5Y3DMXSNkF6BI7GA9NTqZwD9HpZuvC519jCnCoCaNJ2w GpWwWbVwCkD9ZvSFCGhULLNzYmjQjeHhAqBpVxeOfeMraHvhn2A8+C04jv8z ek99Hfmy7+Dfm36G18/9K67ZzjOuLgI6SkDzBDRLQAdVSCfldNZl6A+1M5Cg Ah3o87bTLLZA7bdB65TB4O6CiVDafd3w+MVldAVC1IBPwcBViZhXiYQkBZLe HiQJbcIth+3IzzBz5kXcUb+GjKkWvZpW+OXNUo3KVeZxywELbl7bwvzGU2at 20z+t6Ebp6YI4gw1K8ynbk6Yz4WHT6Wl1uKMfbUIZ27oLZSf20A54awknNWE s5Zw1hHOeoLZQDAbCGYDwWwgmA0Es56qo86fW2AkEEdHRwDlbVFU9SQKdQ4I Z6MjQW/KwCNAMRFoGaCiCdRHBnDRb8FFUvNiJXM7rRM6sxaNiRgq+PoBVxjn LT7Umjyoowmr1zN30VLMSRqYj9Qz5KvrLFTKqGUQ7lfTtYWTv1507ksjBsIp tirZkBmiY3eYpQoxouNkKy1mm3Og0GiEFlHuTBE2Qudk2ujKQO3OYvfLWvQ2 mWC2iqhT48/hd/k4zGEchlKUY/VkoCCoPYRZQCqCgG7RIi3L1GxoHc7By3Ck ZkQPhB98GtAvY/E6AWUYYE7ckHaaGVUEVE9A+eEdzk8BGrMjQX8xNEQLOszo s2wvZkpewWJTCZoOfBudx/4Z3Se+Bd3ZbyGrP4c3g3X4d88F/IdpP96V/wR3 lHuxaDyDsRETcsMENKNCb7gVRle5tAO3l1FoXy/ll9GCVkNP/20iaGZC5yCQ 3oCSWZpKuscToeIBDRN9DdJBNQaD6h0Y6lWL/RtBFaLaWowe/ynuqV7DFfsR xO0yRJhQhbTNGCPH11NWqY7qlYAZH35SlvfX8OC9X2Bu6ynmtp/iwdNffKPo yTc3PoJR/zrKiGI5g8tKolhFDKtpI2uIYg0xrBWqF568pkF4cpvzIbbufox3 33zCgG4IvX4fLrbFUEYUK/QJVBHFGkcxwghSjIEr+/pxxm3GhYADVQN9OOvq x9EOZiB6O47ovXjZEEKp6MDGNLlJFGsxi0YSHqnXQKuO0vB7lRstosxGF4PG djcam6laFxym9CcV1R/dWSSPxc1KzA/84cLeddEQqtkZLLIY/6R7SrczQwOZ hcqVo2HMQ+MbQckLauQae8hjH2dx75ho7NA7Ck1wBCpK4WeI7BsmlqKpA7Ek 1j22MCzJlUIvleFVODNzWNnY/kzVwH+GceAyTLEbdOgMORWdsOjozE1E0WGA VzhzohiO2iQUYx4Zkid+gOsVh/AW7dy9wVZmA+dRIzY8NryC4Wgnli55MMcP O9Xfjuu9F/Ck9wzedR/Gu4ZdeNT+I6x27sSo+his/hro7WUIDXTxfwiJVQ31 cKt2EcNuWMiNw68khmraUQ0GerWIiVtFVLpPj6GQHtl+PYYHhHTIhXWIM1xN HvoR7vW8hk3vaQwFepBmEJBgAhW1tKJf14hbWStupOnIohas+E2FNmK/gc07 TzGcu4+LpVMoo8qpiotTO1BxQZTGrzg/BbPuKvKZ+8WFhb/NSfkuf+VdXCSe ZcSzjHiWE89yWkqz/SHyY+/izt2PCxbp7zF/eY3WYwpnlHGcM8RxwRpHKePG Uh+/9/bjAmO68kAvagcijH2jzGKieKEtgBfkfahq6CItJFD0h7N7pYs27dZC q22ZSRQc90obeDtIZIeqcLGmjUS2ksiWZsaLtU60N/WJ+yfS0UhEPusTN8pc 3KpDo92OJrsPLfZ+tDli6HCIDjFDpDFLnHJQuomad4yfYRyawASOfLcNI22q z0EXmhQ08lETEp0qxpneU4GxIpX8dVEg1BmTlhy6Rjbgyl+DU/THyU58hsZv w8DE3RS5Tu+9Cb1cbHokjQYN7A49aWR6HmJ6TkviLn0V0xdpcXQlJOw8rmQ6 McVU/BKTnTmGkQszHiwKXRJiAjTD0HLahVy0g2TWYS1wHvd9J/HYdgAPlS9h o/Z7mGh8AXFLJfr6uxEKMWS0HofLQFJJot2ngocUBoJa9PfqEe01INlrxGDI iMwADWzEhHzUxFSTaX/MiDEqVfEatjr24YmnBPkBLYZDamR6ezBIIpPOdsQs TZju7cYGibyVsuB62Iwn60v4s+JNtDtE0mS6ivJnNVKo6rJiCYpSseKKukiR 0FryWXOOr5+ZglWzWlzt9108eOvfMH+bEUF6G5phRgWj22joG0aVP4zqYATV ffTW1DFPGMetQbx0Ro+uFhXUrS2EQFyM8THvpWw+dFl9kNMjy02UwYsunRdy euROtYCOInQdXS60t7nQxsRDoRjE0hUmMQzfl0SzujxdcYJu2KJHI8PKJluQ sIXRbhfNegfR5RgmbLRlrjHGgRMEjUQFpnCk0oQXv34WioNlaFGK1dEz0A/M QEdp+bW6fxqq0BSpm4AiOCp1Y+rxD6HHm4QxJnqeiMWqN6krcI7QJb/7zmdq H/4hFtefwNR/DabEBjQdHTApeuiS1VJS4/Ea4NI3w/fav2K5/lXcsx3BrWgl prNqjI86SZ0LM0yvZ6dcEmGMrmZc+Es+MpGZcuDSpF26FzUuOh5FWjDWW4Vl 9xlsOI5iS78HG50/xkrFPyOrPYhexQtw2cqZuKjg9GvhC+jRFzRKN47ifWak mVZm6DxyMQtG4ow9E1aMJ5nOJy3oL9+NG4278a7nEBZjXSRQj5EIqetXIRPs lu6Rx10tuBRR4M6IDRtMJ29xNNYHjEVa/gvyuW1UlP9KxYnyKdSX/bLiRCOp a7z4y0ITDVT9s6InpyZxd+Ppn0t/7jtYuU6nE/HCFRfyY5BRjCpok3pRNXk8 KGk04XS1AYYWGXoMJiYJBEtsOSFwPTY/FNYAFBY+m/zoMVMEr5uWTk5L16V1 o5OWrrPbBZmM1q3FDktwGeouLZaGCVvOJm2UazAb0Wjh/7P2oZUZb7uNeZE9 C7k9T5NEE+WepFWbgjowQ9As+Iev7cb3vrwLR/51D3Z9by86dGHmlXPQhUUz jVmoB2ahInRKAVxINMkYkeovi5XRmlC+uFz1NiUaZcxjZWvrMzUTaeKC64z/ bsNgJ55yOSwaJaxWDUzVJ5A48iNcldF5uY9hhs4zk7Ehl7NjjDZ6csyB6QkB lBOz04RLkoPQOSTQZifF6zZMMh0bY1qWH9UjkyPEvfXMfKsQNZ3ArPM41q0H cEnxXeRb/xGDx/4RA82H4dHUIxAw0bSZEWX2nuy3YShiw3DcjpGkHeMpOybS PIZBxqTd57B0+lU8tR3F9WgdJtNmAij6AulpAjXSWrFBcZfc146oswFb43Zs 5q3YGDTjZsKIN28sFnuC/idYzCuEbfIzhSXqi4UlGsvpfZvL+NAiSpy0kLnf QDMfRZmTJlLXSHtXf3oCdtXlPyuux50XUdZ44XqJSEl9DFzEJT1BW4uHkb/b hz1VZrQ26WCoqae5CTLq72VK2gelvQ8qW0jsbbWH8CUobX0ksBc9liC6SaDc QBMozJ3ShU65AxpLGk0tRgYhhfrtoqNfo9GMRvrjZnM/Wunf261DkNlypG0U Pa4JKD0kzX+JYdssvvLlV/Gtv9uHn379AE7+9BAOvHAYZ07WQh9dhC4qqt/P Q0PyVOFLUA5MUzRv/TRvoWFpcbQiEIN7ervQlmVatNVYxJXt7c/Q9keIDjPD 6CdtgTnoO+RQ11bBVvIyRs68gFVlCZadRzAUZoqZpHkaskotp0doqMWKjSlx tXDCTvNmp2O1C1O2gw82Wjdxf3OKoE3wZI+MGTA8osXQsJJTkLAx8huI9MAT bGVWW4s+1Q8RkX8fl7qYkDS/hKWy72PsEC1eyynECVpKVJWLO5BnNj6admJy iFY148SwT4bM7hfwvuIk3oxWYIYneZqp3NSgCRMpA0YTOgxHaN3or1O9Hcyc m7A1VbjtszlswW2+b51W8IvPLhCaLxM0UcWkUDniWQWTRlHFpGIaLeUzUgET Ub5kB9pEPZO2smn8Jh+n0EqzJ2qZSACen0Tj2XE4VYt41vf0odTISdBXuBgi rtbVi85ttHXiQnKb2492lx+VTF33X7BA16yFvkfPOD8MlTMCtTMitawQbQk1 7ijFn1EqpsFKxwBzzH50W/rofIN0vCRRTQp7bGiWmdDcZkA2ZIHfb0CjjnmF wY9m0wBaRblcCwm05ulcx3C+KsBUPoSy51qh/kENXv32afzgW0ex+8encPyl k7i48xAO7ToEfUy06liCNrYITXQequgclBFSGJmSikkqxLX5/iHavnihsYu0 6PU6XDOXceXevc8Q+Id4+Pgj6P036Yq30PTqAXif/1+YYvi2pD6IvP0cgr06 DIQNiMeNSKdNPHNm5Dl8o7QZok/y5BhRG7dimtpBHq34Kz5aPsFvjPjlR3XI 5pibDivg7G1EJNqF/mgP+ujs+oIVCFj3w6Q7zXCuHr3y45hUHMOq/ABut+zE rYof4nLDbkzJz2Jk0IW4uwPGumNo/ulXoPpfX8XjlmP4IEjbmaONpS0W6zOm M/zfxGsspUcurkGG/yfd34l4sBlbdPybE4Ub4RtZ2rxBwxeKy2sspgWSN1oo F1EpCJwmgZdI3yyaK+ZJ4ALayhdF1RK0Ux0VovR4R8UifouPC2ivmOPPZ/m6 oLQI5IUJNJ0dwfbGu0Wz+oe4uRSTuootjRXaQKuDlsKVORfNIE1gm1ts8iVM 7gGcbPahusYFW4MKOp24U5GA1pOE1puCzpeiOdT6kqJMqFfsxo7TYUbpOCPS PsZucx+6CZtc40JjSw9aukzQaQzwe+l0NVY06v1oMoRx6oIRlRccOPKCHJV7 9Wg56Yb5ohv9dS4MdPeh9JQC33nuHJ576QJe3XURpw6eg/nkBbhdQ9DFl6CJ E8TYAlQxghij840SxOh44QZRJAPj8GW45+8XesLME8RZgvj6/WfbYZ9VFMuK 0tXPH8PSnr2YLt2Dye4S+ExtcLrUnDsaBv06RCJ6JOmlBiUSxZUTGjgGr2Mj ZtJITzdq3oEJxnJ/zUcTxseNGJUAZBaaFzZQhWS2G9FwO/OULoSi3RKEQX8F PJYD0q1Gu1sHF8+Q26FExNaGYfVprOlOYKvxJB6W7cH2gR+g5V/+BlX/+Bdo /MZfwPD9LyF94lu4OqxhZs1IM18AcZogTvIQx9L8/yktbagS6YhcupFzd9aF O89s4QhtYZaOd2MBf1pcJVUoXDJMEselKK+OFDaQsCYS11yxjNaKK6RsVSpa ImqVyCrXIKsSuorOqlU+C63wtcvUokTmJ1ReGEPz2WyRxj/Aoug7NWKWks3M oOiFLS59ONHsEg65Fx3u/kJzck+MdCXw0hEXFA1u2DpMZG8QOsbyopSaaAup 781IX+mCQ9AGBulM01CSUoUnQQcbo5kMo8caosNm7qJ2oLXHgha5njlSJcpO NePIT8pRsbMVTYe0kJ13Qd7QD3lniu8dprkc46yYhsw/C03/Ip4/2I5vv3wB P9pzETuPtcDf2YvJZiVcmn6JSHWcRMZJpNShaBqKGImMMRyMkcg8iVx8XWo5 41q4IRW1vvLg/mdM43eQ0dow8I3n8E7NefzvUBuyilJoO3tg1IqQUAW3W4Ng UIP+fi2iUR3B1BNMAzJD9Lgc0dywESM5Kk8KGfqMjhowMipoNCA3okc2r8MQ zWKKZvHGZTvC4Tb0i1t8kW4EhIe27IedGa/NwQzbpZc2f/oDzCX6bCTYgaC9 HQlzI0Z76rChrED5t7+Cru99GZrnvgLPnr+Hec//QH/XUcyPuTDHXGh2hMFC jlTS7I1ljMgP0iwnVRiMyZEYaMXdOVI5QyrFOqExCzZ4zG/fWfjT4trX6rIU YcwXq5nMMRK8TOd8hUCuEchraKu4TtBuoKPqJuG7uQOd1bd2oKv6Jn6bjzeo 6/zROmTVhJZwtlfSjNK0tpVNoPViDm7d7BeKFvKDdx9+0g9NdI5T+4xocFjR JCrriktyrgHIXKK7L7lyp6B0D6JBncSp0j70V6tgVLjJYg6GvjwtpIGB/5eg D+WkWgKa3qzUKUzU5FDQivaIv0E3f6FcherTbTj5k4uoIVeV+y6g/XQrD1vk 3F60yvrRqEig2ZBFs2UE3e4p9PjIVnAO6r4FiUltmIoK17wEPS3jOXkO1p5+ DHR6Ye7wQ52Yk5oDKRO0kjR3UmObBJlMFHZwfbIqfOk6nIuXsfLg9e9/dvHO OkkNlZzF6s7X8B+6Wnyc7mDMdwUaxwIUjT3Q9ihhMKhgs6vh9ogrIkU+Izq6 cB1SScGoHkMZBiVZatggNpDkDbSYw3mmJNRQTod0ToskraXg8t66ByHyEQx3 wh+WwxPugc14snBj0a6F3Wng/zIzRbGiP2RHLOJEKuHCUNqNXMaDhjMHcfoH X0frS9+Eac/X4Tn0VRgP/j3CquPS4qG5MbI56sAMR3oyx/SIcyc/RDbTZDNB ixlpw/YC2Zyl654mm5NWbI6b8A6Duj8p+u6R3E3UlA0RzHFaSwHnMuFcI5zX 0VJxi3BuELhNgndHqnjSSRHOmq0dkNduCUJr70Bes8kf3aZu8g3XJXMqTGg7 zW9b2SiTnHSB0H/Bo80FJrKFHmuiQEe9lemF3VG4ROfsR5szRkKTUpkThTsD lZvkefM4UBqG/bQG+YpGqRqMYWAcRqHwGJ/F92PQDYjmziOkKo+yRicaG5w4 tacDtSVytJ9So6ecgWmDAcoOHWRdCtR1aKX7LTWKEFo0CbTpM2g359FpH+cM EZTOSH3eVKLRTj/TlrBIX0RbpgUGkvOkdR6HZKOo6OSM6YrC2h0o3GxJktAk 05oUE/FUTqqy61p+XFhVvsygcpmULl1+VpTg29LTr+MeEfV/7Yd4s/ws/jeT jI8WA8VbCr+PhbX3oHYtQtFa2LZnMKo/haoWfSEtzaAO0RhxJapJopoeojJU Vr+DDzoGmEk+Joa1iGVVuLZkx/aaB3fW3fCFWuFhoOful8MW6qalrv/k7qLd YaAFNUtlGfqZ18SiDqkYTIZBZS7jRtDWgWPP/yPKX/wmVPv/Ge7jX4OaWpjw kFK3ZEVnx4qU0i6N0bLneRzZIbV0ZzEebSWlbtwRZVMviTq/Vqk69Tvbi88g tZmmUVueI6Az1GVCukZIbxLSTQJ6l4BuE9D7BPR1qYCKKJ8i+HzA35XXPUB3 3evUfX59jz/d5utbZHWD771ZZFUEplNkNYvJ4Zv4fPGe1qe7u/n7aEotDACt LjTbe9HqiEhNO6Rrya4sTWkeKu8otH6CGBzH0f02mI414cdf/Ql+9E8vo7yi ByaxcZWqagugta0XZ0rUaDhugKzUQSMUgLozBKVqgJkQJ4Khl9lNDA0aO1rV BpxpUqGxy43GnhCalXG06gYJaw4dzMG7XJNSh7megOgdJq7kzEIdpruPUNFZ JmCxWfwetPTorYEpnO7IQi0nr3VmeghGGWlyOphHz+BwoQfnyiO4rohl6Jtw rlyDY2npGavfKt5XEG1v5V8/jKUX9uAXqhr8e6oDb9wa/7XiPoGHb/6CISgj 8TYlVEo19AY1LHYNORJX/7QIMiQNhUXZUoamtK7RJJXSIZam6F2jtGKRIS2y jD/vXvXiDjkV5RduUGEy4+iTwdLbCXNqEUaVDFaDuNGo4ZQQFtVEVi1FVkUh QAdZdSKXdWE0x4yg5xxOv/INNO//Ngynvo4Jx7kdmJ9w8wQJoyqhOkpURwo3 wfPFe4zptBwLYzpsL7qxOS8q/NLhz9qwMW3GvZVo0aD+LmpKE6grozFl0lNf fpXh5000ld+hp7+HtsrXyekjcvqY7D0hh2+QR6rujR0EVDzUiwpO3XWPqIcS twVeN/k71/m7V8gqk6WKEab0kc8/s6kbxdZyGXp8xjyNZkaiFq/UAq/VLm55 pNHlzBLTPJSeMY75OLTBKXr1afyAXvvbf7cL+765E3u/sxMH/vUVlH3/MEw7 K9B7shWuJge0iiQ0xgy6rVl0uDLo9NFOCm78zJu8/TCnL6NN56LMaJJr0SCj 7ZX3oqknimZNGq2mbKFxmXMcXd4pdPtpH3sZWYZER95pqMIzUEco0eVblGeI T0FFL9/AqXSomccuWG2xMgKJS/vZuoeGYFm4XdjTJlarr/LrlXWsPH7yWU5/ HeU/9GFbPY//L+XGL5aCeO+treJKpL/A1MgsZAS0m4BqDBoYbQTIrYXLr4WX 2XugX0fXrUMfIe0jpKEEn1PCxRuxQgI2Vr24fdWDG9T6VTdWr7qQyqlh8LXT Lc3APHQXBoWscOuR9tpuE6GoUapBEuq3SDVtkuJO+KCDcDolOCeYCE3TYNpO ncf79rPYDlcIOF2Ec27cKcE5PVZYoTEq4MwJOJkfDXbRzmpxd4l2lB5/c4Fw zhPOS7Sj9xbxx0U4R4bXUVs6REBnUF+2TF1DY/kGmsu3CegDtFU9Rkf1m5DV vIXO2ndEwRfC+a7gkg899e/iP/Pxbeot/uhN6jFff52A3iXQtwthahUz/MpJ GuYkPiFUND8Ube1EnqRTotFoI6V+NFsH0GpL0IgNotNBT+kahdI7Id1Q1PbO MPa8hL//2l584x9KsOe7h3D0h/tx/qUD0JU1IsXf9zO/0vpz6O6bQmd/YeW5 aM6jHMhB0Z8hZUkoAmGp0KBc9G/TW1HV0436FhvqGVc2yMNoUiXRoh9CqyWH dscoc7YxdHGGdAcn+HfpxUOi5y8VnoAyQold93FKxKDJMdR5szipTqOlJwJz px1amQ7K0Qk4rz6UtsM5r96VCHVcWcfjDz/8LKGf49B9gNzMG3j7ycNi7ba/ kKrwRTw2eN1mWOh+NRYtjE4tLF4d7AEdnH1MtfuFyTQxMbLh5mUfbiz7cH3F i2tXvLh6xYMrq24sXXFjYcWJa7dEujkKU+QmJ+sWdF3tsKi7YdWrJBfvchmY IJlIpRmRqIVU2hiE2kmlg1Q6SKUT00yEAi2VeGQuxRuB45ibcO7A7LiDVF0a s2NqzCpdPxgZYY7GGDiTVTAIkeH+sgd3L5NKUQV4kVQukMpZM96+v/jHRe8u VSIqpXcvY/hZtoqGspuEcovh5+torXwsVSGS1bxDwN4jkO8TuA8giPyQ/7q7 4UP0NHxQ1FPqPeptvkqrWv+I771PkO/wdxmVVjOxr56hFR76fDFTfXhz4ZOG eg0aOli9g2wG0WyOoNWaRLs1QyecZ85CpnyTUAdnoOm7BF3/HP7+nw7im986 jFefO44T+07h1MGTaJZpoIjMwZhYgF40q4+LZvWiUgMtWnSc/IxI++oV/bSe fRG4Z+7AnFlAi8GOZg6GssuKulYP6mR9aFDE0KglV6YM54ho3ZaHzDOCLg6k PDhGNsfQE6IY9fZEqNgoeuIU86LuBI85RUs5mEWJKo5qxQD0Cjv9pKPA5Bqt 5toWHFdvI72xVVxrVth28w+4c2MVw0k3c10PpnJeWh0vFid9uDztw8qsD1fm qQUfVpf4fNmL5WUvLnOc55fdmKWmOdb3H61Ify2W24ApdAOm5B0YGdebFIVb Q8JbO5w6+PwGBq8mRCJmJBIW5lhWDNOPjQzbMZ530Eg7EDc24qa2FB979kpL fS9Jsklr1SaZb4+PchqM6DFM4zuY6cHSlAH3VzzY4rFsLjsL5X4Xbbg9Z8Kb 9xf+uHgjWqpOVDqKulJ66tI1crdB7ral6letVW+Qu3fI3Xvk5wNyV6hK1F3/ czL3c7Ewmo+/g57GjyjB4Pt8fo+vkb2GJ3wvo9A6GsXaW/wbjDBr6LWrhxkA rxWN4rcLvfoSom+wmgNNl6mnyzRG0WpOEbwswRPJMg2Nb4rgXYImNMcUZx4/ KenE18T17Z1nUcKUdt/B04xCeWrFhtfkIvRJpihMmDUJUcxhWmqQJBV0iGal 3oOaZB7u2btwzd6EaXgKTXoNUg4baupdqGntRV1XmMeU4PGkOBFoGO10365h dHiH0Ulj2xXMoyuUh7w/B3mYilKxYXTFqRSPO81JMzSIrmwaezuDOKvohZpR rK6pA9b8LBxrd2BfvYnHH330rLrRT4pD8s5bT7BxexVDQ8yAcx6MjXkwOeHF zLQXly5Rc9S8BzMLJJOB2Di1ciODuw+vFJcl/VmhWFPgOoPtTejpW4xdXbAo e5jPqJjLiDvfOvT2GTAQNjGzNyOdsiAzZGVOYmVuQt+atyHb143Z7hP4wLsf KwxtZ+hzp2nhpkmbuD46NkrfO8L4lJl+OtONBzS692h0t55V9V0uFJi+OWcs xIWfx2j2FmovMi4sXSJt10jbJmkTtdYKBYraq98lKe/TFYud0q+j7vwD1J17 SKr+jXT9W+G58WPq5wXiGoW1e4e0vSlZuq76bXTWbUBWt4aO2nm01+QZw65/ vrgeaiFswFKMsPUwPlS50KgjbAbCZkyj3cKBo+eTYPMTmN4CbFrmu81MMw68 2ILzpxvwWqmMKU8axtRlagkGRt/6FGFLMj8WNWmStHQJ4R1Hpf36Utvh/ALc 84Rt/hZcc6swZjOY8tvhUDtQXR9AdXs/arpjqNPE0WBIoclCi8dooM01hHZv Bh2BDGR9FL155wCfI1RsCLLEIGSpNGSDqcLmo2xcKm7cOXYVh3qC6NK6YOrs gnV0GstP3i5uSig0rfstvP3OE9y6s4rNu6u4c28VyTHmqatZbL2+WiymeqUY Jv53LK6+BUOIVixBx9nWCZO8uxDSiSuZzGcCQR1zDQPDOSNSCRMdpxm5IXrC rMh1yUveikT9UbzjOozbkVJ6SgtlpuUiR2NGOvDiNfaskhbWiNcZVm6vMi8X RVSvFCpEb1y2YPt6HJ+B6cIE6i4yGb54HQ2lonDf62iufILK07dx8dgqTpeI bSlTKD04jfKDM4U99FQ1VX/iGlrO34ei6eOiCfsA3ZL5egvyhseEiW6znklH /To66hbRXpvH9tYbn3927+v6EhbDZtR30XIpaLnUhEkbpRsTMGXRyZxUTpgU hElJmNRFmA4etsFTzakdCsOQuCxt0d9BjJbwlwRpEToBU3oe6pQo/EAQkwy7 kqNQJIalRpq26RtwLxKmRcK0sArHpWk8ffIY434HOls8qGwIobIjiuqeOGo1 zMOMSebrSTQ5GOK5U2j1p9EWpPqofiqcQluMP08m0ZZOoHWIeXUmDsNioXKx jW6yY3QVu2V+tGjciLQ24udB57MtLoeKpyM6fB+G8BbU3Q4YOuQwqxSwmpRw igbJPg36GK6Fw3okYgakk0ZkGAnnMvRZWROdEEOuznN43XoM9/1io/Q4bcvv SLf/BBm5ER2tjBqTo1o8ZCZ8n7r7rETqqgMbKyL8M+PnHzwq0kHHlqFjO09T c4F0XLhBc7OF0pNXcXL/JE4dGMfZknFcPCj2c06h6tA0ag+RiMMzaDgk7hA3 8vH/QEPJDOoOzKL1/N1P6JA3vk06mLY2kI4G0tFwDR31i2irzX9yAfrNR1gI maFWadHYxWBKSTLUTAN1PNNMAzvsDGBcE+jxiRSQ/ikkeljP4/BeGl1tAL6B IQZOwoeJNgfCuPx5oZRamv4sTSrSNDFpUpWimUkVCjZospNwLRU6ZrqWbsG5 uCqKNkhH9B7pWB4ZREerH2WNYZTLYqhUJD7bzcBJX+dJoMlPBRNoDvFZtK2L UcmEtIesI5+Hbn5dqmUt9pDtgJVs/Lq0wfGEZgBjdTJ8UH4cHzede+bTDktP X0Q0/xBa9zw0TXIYuntg0ikl2+FxqxEIaNEvurQxzUzG9BhMGkiHAcNDBvoj A0K6Wqxrj+Nd5ysYZWQtous8Ja44ZxllT4/p8fiqTyLjHtPQLVH29KpITe24 tWLF2oL580Uoas6NEYolmodlnObAH98/ihOvDePsgRGaiHFUEIjqQ5Oo42uN hxkVUC1U62HRjqeVP/3PaDk4iZaSCTQcE9fMHkpAdEkbhO9D1iiAoLlomEdr 3XBxecLv41o+AZ/BgAYZU77uAO1FGM0azsfiRYFO1zjkoiNxkKMamsXplij9 ZAi9zji0sbkd0DGU+X3o6GN0KZoRQqBJi07EomrHVKFyx2CxhEJ6GNY5Ub2D MCxvUTfhXFrBysMHnytuI76zvoLm1gAuNEVwsTOOUmVCaiFQSRaqyUKtq7CW upYc1Eq7tcgIOaiNx6XdWpblYulpUdP82V5CKrH5SPoPXe1+hKvleLPmAv5f eSUeLt14drv2iPT0BURHH0HR7oK2rQd6pQJmA+MSuxpej6awIjiklXhIkIe0 uOswWLgzFvO1Y0wmuv29hplYE7J5AxnQ02/o6EsMeCI4WKOFWGPGRQ7urLmw IcrfrtpwfdmKjz58VAw9fxfVZ0dQcXISR3fHcWxfFsf3ZXB6/zAuHMjTV4wR BOa1h8YJwgSaqSoO/LlD0ztw9mCOxuE839JxdBztR8bQxrfW7p9Be+V9svCY HAgWNtDRuIb2hjl4HAtfLO6sEXVoUlYjs28LcSi0HmpUiTtDDDKteWY4Y+gU fYYDokH1NA6e70WPLA5TXx6aGGOS+CUpqNUm+ZxiJkZDoE4/Y4AGYZBZ2iAz oKEc1CMzhXIaV16n7sC5cgPOyyuiosGvF8ncvPsWY99LOEMOzirjOG9I4KIl gTIHRXtQHqD64pBlaaMm13+5F2pZ2qX3OanJzm990tzkmaK9YzCV9eBamQxP ylX4d5qgYpX9o0UKI0Sgp6ZbKsKnUythNqngcBABr7gxqpVuPEUiOsTieubi eqTSesSTCvRVHaKjOIhF30kEemuYq8uQjLZifVSOjTlDYejXaQKKVWpvcviv X7Fh81YSBQv9J8jEb+DITj+O7Yri+N4hnNyXxrn9WZSV5Bgi5OkMRnC8JIP9 JcN46UACO0sS2EXtpvbw+71Cr/HrvXEc3ZciGvy9/bQTVZz/TfSXTbfQ3rSK toZZhsp3/lvRCt5fvYyaOqOU3dbLQqgX2S1jy2ZzFm10Ch3Fqy41dBQlR72c FXFm2flC7cxY4XqgmuGAKkWlJ4pzXly3FuPNRCnDJCST5SCJWlcPpUaSztVN OK9ch/3y8n8qLpZauP4Umug28WG0HF1HQ78o4LcNwwQ1RV3ahnGOzwvCxhuW tvmwLPYWxW49luqDF3Z4FB6v3bjPCGwbby8+xr9/8H5xkI9JT3+M+3deZ7rY A1WXEhqtCiazmhmvKBOg4eBp0cdBHuA8D4Y64PZVw+OrgbP+CG7pj2DNuhuR YBXG+kpxaeACpqmJgfMY6T+HhTEZVuZ0uM4BXmcEsMw844vF/xn2GXH0FR8H N4ITexM4tS+J8/szKD+QpdfP4KcHYnixJI6XD8bx6qE4dlP7qNeo/dQB/vxA SQwH9sewf18Mr+2J4uDuJC4emeLA3uHA3kBbE01ow1Rxde0X+D8TUupYy9Sx Vh5BvZpBF2d0s3UYbU7Oag+Bqu9DbVUfHPYQegbECpfxwkqXeOEaWuFOGTOQ NEcynUf3kBhNppvMFixSVYiHxcoQd6kNOK5ck672/nbxFvv8racIzz6Wdohp 8tvQjlEcUt00xSEV+8N089uI3HiChUdPf6t47e3u4//Ak6f/UdxiJ43ecenp /8HTNx4joDPAotdBrVXDYNbAytFzekXx1Q4YLdUw26thd1bD6aqBsfU0M8Yj uGd+CXMDFzEXvohZaiZ8AZPh8xgdOIfh0Fmke89gOFaFy5dt+OCDx18oLiZZ vxzHwrgZZrkTx3aGcWJPAmf2JXDhtUHs5GD89EAULxyM4eVDMbx6OIY9Rzhw RzhI1AHqILUDh/jqb+HQQQ4a31+yP4K9eyLY+XIEBw7lOHDX0dK4jO277xcX 4/8pGlpChTSsYwA1jJrrtCk0mDh4tixamfO/sFsPZWcIWtH6qH+E+T4V5SDF xUUmfp3MoyuZY87PwRpk5J9hepYdhJkRuvPqg08uNjmki00bsF9Zx+8Vr81L W6TuUvcKevD+L/BKYRROFNfzvPfGE84BJyZjbvT5zAi4e2AzlMFtKYfPXo4+ ZwUi9ouIOy8ibTyFWPMRbFr30kAexSXp7F/EFEdgnCOQ5/zJFkdgyF+Jca8S H3CUP180jKKgw8LoLxfaHn2pDydeTeEwT+NzJ0J4/kAYPy2J4MVDPKWHo9h9 NIZ91H6qhDpIHaIOcygOH41SESqMQ0fCeK0kjN17w3h5Vz8On5qA23Xri8V/ +857z9q+ppHO2DA0aIPebMOxU2ocPKPF2UYfzrQHUEvDWG8exAV5P44etcOs 70V7kBF1aBiyASrCEYhRTLxlCf48yeR5kBoaRHsmDdPCDdEIcodUIebX+HhX GhT76m0sP37zZOG8n/zUec+FnBjs1cGrO4s+y3lEHOeRdF9AxnsR+cBFjAUv YrK3FIbSEqyaDuCy+zUE6ZR6g5UI+MvR6aiDzFYLjaMcJmsN/DYnsh47FgNW PLhyubhm609w/dmqvvFCz6uU343jryTw3Kkgnjs4IJ33nx2M4KXDEbx6JII9 PK+vHYviAFVCHaIOH4/iyEnqVARHT4dxWOhUGPuPh6UuBztLeNJKh5DM3f58 Ma2/c3eZYXShYmA+b8cYNTFsx1TWjukhO+RyN8qYqx47q8eRChOO1FtwWubB S4d0aKx0Q28Lotk/iJbeQbSGGMAwc2mLUFH+LE4l02hNp9CVH4Vx4Rocq6Iy 1HahQtT6dqEZ3dodpDbv41Th7J8qnn1BYszfArvmDDzGc+i18uw7zyPluUBy L2KYZ3+EZ76h/hSMqvNQ6s5AbquC3F7F1LsSMmsF2s1NaNMb0KJ2o0nhRkOX mxbaDZ/Wjq2tx8Vc8Y+wIFYLid53Yk3lmANXxpyQmZ147jSJPxjGjw9E8DMS /zKJ30W69x5N8OwncOB4EodOJHmWUzhyhjqXxNHzyR04ciGO38Th81HsO8Vf Oc5fPUYb0+yEdWCFA3CjeDPqC1I1vdFRK1PdQjW9yVE7ZkYd0kLAeWpx2IGl jEMqO66S+1Db0o/SWg+OlxtxrM6MF19RQdXu4UcPoM6bRIOf6qVCdEADfI5Q cdH/agSG2XXYGbc/qwOyQ8rtPwebVCrpLqxXbuP0p+fAH0ujMEMuRZGX+QnR UbsNDsNZ+K3n0M/RiHouwu8sRaOxBuc7ylDfeQFy1XFGspVoMlaixdiMDqMR cosHXaKFtF605nWjTVnYVtnY5kZdvRMzc3fobwrp84ONBSzmaINGLNIGtsuj TgTDNrQ4HajQ+fD8CTEiMbqCBEckhVePDnJEhjgiGRw4maHByODwuSwHIcOP eKQsQw95pHwIh8sHUVKaxu5zKRytGpBaWndpHTD2TsLWv4THb37wfxcDtZXl 5GcKzc1wSs4TjEWOzPIIAeHIrHJkrmapIQdG/A7U1wQZ1IcZ2HFqHjfh5EEL jEoXTraacNHcjwp3HJW+OKqCcTTTc8hzTOSm1mFjNG1jeGVb2X6WWX9OSqw/ B8uVTTz66GPpoE59emD+VPKV88W2tcJQr07acG3SjtsTDoyGZegwd6LBrECT VYkqTRdO1DSjs70Wzd2NULp8UDophxdKmwcKDo7C5EE3B6eLgyNTFnYYisJk jXVOGHyr0u7C/6vI7MPNRSwNmz5ZvpRN2tAkSnw5nQx0fAxhe7GvNEF/naGl yNJg5bDnWB77To7gAJOug+dHcah0lANCVY7gSNUIDlflUVKZw+6LwyiVJ6Bw MUiyB9BtdksLRe3xyxyk2eIx/A6uriQ/KcQmyrDNUoscpWWO0ipHaY2jdI2j dJ2jdIPzp88v6kz1eV2MMy4wEDteE8MP93tRfoHHqwyiQRmhwkyrRHFu5rQM miwMmqwMmKyMg60cpWd5r2VVzB2R8X5OyoETm4+lozrzab/9BdzfWsS81Nm1 4EtXeKjrPMybE+Sdh2QN8nS5POjkKZN7feihdh1nlCVXS6vwNB6xYtsHLYdK 6+DXNi/UHColh0phdKNbV9gm1dHjQlu7Ez36LEx+DtUbH0EK9Xdg/s6btEMD 81tMD9eYJlKJNSzcfrNYHvXnxY5sX8QjMaZZHuiwDUs5BwL9FjTZLQxePZB5 enmAYShIb5N2EGWtWU68cew6MYG9Zyaw//wkDpRO4mDFJA5VUdX8vpqvVUyg Qp2DJpSCKpiA0heV2oD2OALQ9w3DkV6BPTGP5Rv3/2vxMNZWEhzKX1Y4m+f5 WqKucGivcmivcWhvjIgGSy7Um4ptjo0eNBkoPaX1YNdpE77xkgu7zoXwUm0C +1p5yD3MtDRhaHgaTBxaM4fWPLf9q+nsDimd/ZxUf2bpyVPpoM5+elS/iFn6 isWip77MEV3lhLvOERXustVhYw7HUfF60e3zQeH3QUUdLFND1aGDRSmDnj/X e/wwcGQNnIh6Suf0QsMTrbKLyehGD0e3S4yuwimVvtJ6ZmAOSiP7a8UrWQ/f +znCl7cY6K9BS+kofW4Nhl8pRGoQhUhjfH2A437tTTwkHJ97NuYbHPMhscPJ LnXpaTDr0GK3o93p55j3o9sb45iJ5mxD0AeyMPbl0GEZRQnn6o929uN7P+3D S0yW6g0TqNJNQuYagTGWgz46DM1ABqrQIFTS4gMx7iHow6NwZq/CMbSI9KWr OwqM3t5cZhy8sbmCjQ3qNnVrGbduLDOlKabNd5cw/ytVxi4LKKj1cZ7+UVG2 js5EFF3kJGm2eumAvGiziBYdlOgKQ0AOnVXg+AEVTl804eUyAUccL9Un8VJD CqXKaCH3nWHuO0tx3hsWt4vZ7+VfzX7PfTpR+gO8fmex2LK0UJVimbiu8chu jDthDtg5zZ2Egl66CIU64Ic2EMCZRgtaGoxwyDtEE2d/kAD6g/zI/JJmNwCd j2+kHVC5vFCQDmEO5Xr+MZUTKmcG1sjqJ63txaE8fO8jRJbvQDvKYR9bK/R2 okyjxRKhuWKJ0Mwvy4OaaRJMUb6PiBj61rC49sazUrePbpOQtFnq45SJWEgI gymbm4T0olN0kvNwZnsz0vITfXAEpv4xNJuy+Lt/MuJfvunG89/14IXnrKho DMGSnIApOQ5jYgx6+j9tNA91eBgqUW20LyEtUTHEJuDMX4dzeBnyQD8yORuy ucI+yVFxM5ykTnCiTQxSogKY2MMYIQ3jKWytLxdS2v9Gx2jCIq3Is+pfYtPW Fc5TMSQTQ87CSnA6v1ZaVbETut3ug6y4E7rTSodAcLpMXvz4x3WQV2mhUprR wfjxbL0XJdUBvFIRwivVzGqU/BiERktotLQoWoITuf5YqsFS+mlC/guuLUSx +MmufBtWaMzWGWYa/WaeTTvnm4t+04ueAAc7EIQ2KArihGDkWThfZoWzRwur 3bUDlr4wfU/fAH4CU18/DL0h6AK90PiCUNGsKGhKemhC5AYXOtR22FKi5fcV 0XseD59+JJXt1I9zoCkjJXVoela6c4QiJDYCYsvya9oQK22IlTbEGuf7Inw/ ITH18ve9hZjg0S0SkiQhaTv8PoO0S7LFJqr99aNTFAVy0wZ4h0k748++cf7+ JI6Wp/DVf8zi+9/I4cBzOezdNY6dewKwpKdhpoypKehJizYuqhYWm1cOpKHs 5RwVpfSjY6i3O1Fn1cMe0mJKxMx0CnP09wv09wu0ZYuMyhbT/DpZqMZ1KcKM pt+GiWChg9RvFO3oNcZRBQdt+WRnqWh/fZWo9EecaHaKQnHEhOqgZJS0l5na Ie1m/h10E5madhMO7+mEqV0HhcqCLhUdO5GRMYOSyTgWLU601TugMU7i0eMP UflpPP4G8xlDsQeolfGuCGGcGE8Lj0Ly3AXj0e0PQBnoIxoDRCMMYzAKE7X/ uBXWHhscVhvTizhs4TislCUc4+mOwkjpQ2HoiIs6EILS28vwyo8emssuoxP2 zFXYU1dwUTeMc/oMDBNXpXKapmclNYmIlYjYiIidiNiJiJ2IOIiIg3ZkB+wE 5e9gJyo22hMr7YmFqJhD/BsMHRdGR7EY42dLEBGvSVr31mIJcNaJRl1J9Iiy PL48dMExGEKTMEWm8eKLQXzrn1bwys+2ULL/Hk4fvoGjBzOwDIqON7Mwpmeg F1VViYk6MQo1E35VZBByTplmVwCNDFnExuAmpwm+sF4K3MV5XRGBO8ObVSKy SkRWmVatphjQ89iWo3SDYTsWQow7mJ+vZ5PFq5xfxAfvPcTiJxuQC9tAl4jI Cg28LuAgJh600pO3Ux307J2UnOrm9z1ERUEroyQsSk6N3ftb0XhWDbPKCIWB r+u9kOs4Fmp3ERkXZB1OyLtDMHuXhW2v+PRV1b/C++88xIJEjEWqvHCZn+rq iAtGn4nGxEpjwviBnkPB0VbTrOqCMdKS4MRNwsJgrLa7H8kKGUJaFezRNOyx NGyU9f9v772f5MyuK8GzaFImRpR2GDGh2dmN2Yjd0I7c7gzJlZaip9SkuimS 7RvdDd8AGt4WfKFsVpZJ773PrDSV3lZWZZb3Hq7hCuiCR3fTNClSomZndmPP +zILDZCa/Qv0w60qFIB837v3vHvPfd+792XysKVzjAZZmJNZkoY0DLEkyVuc qIkSNSTkDLDGaBnt4Qns0RfwnioLRW4WtrF681XR7JKIcRExbiLGXb30Wfr0 S/gyPAw+7oEaaARkJLDQr9jjF2FyVDHoNWAh7YTOokezyY12axhyR4rpvCi0 oQ8IVmGMjKDDUsCRvz2HwC4Vdm+/jFe2f4iXd32IHYcfIyUPonCimWF0EJai aPw8AX2hfs1krgIlF0gLeW07OUk71dPOaCwL2BFNWbAi8oahet5AkFwlSK4S JFcJkqv0Je/n+HcEyiX6kxWCRfSPW4w4MOuz42eP6v3hnyoXrreoEvs5i3T1 lZJwJ17IfKQjxIZIlSTuT7et8nNt+3oZ58PQeUTJg84Vxu9j4+syGFrNsFgd 0NRbJqikHh3+Gma0NZbY1e0imxyDPSga6f/85NN4+VPcv8GMWpyNHiBeGEqX Bj2oMmlrd5ql4CM9RZCeIZSEvjdD75KnZylyBZfoUfrRIO+D94ga0x2n4M6W 4c6V4aI4KY5sPxlECZZMgcQvD0MiC10sTcwkSR77oPZF0MUEbp+jjH2WEvYa cjhuLzHJElgR7Scvwz3yPtzD72+AZ+jqBniHr+I/wTdyVfrJy7/zDl+Bd+gy YXRZApGLnsdJ9uLMXZQYUNcZOcpuC84rlGjWU8vmCDpsacbzAlcgPUNwCHsO 2NGyy4LsOQcq4r51+yxeOXYPb525j+Paa9BrExg1e1Ds1MMoGkP0T0JfGmfG MAIV10ZbQLRm9EEWTUMW6YM8EkJnyIFExlLLSijXCZwbBM7NsnsDVome38Uq E72blBtkLdfo0N8na7mcceJikjl7zIGbg7kn9S1SaW/V+qSXlLh4vMz/0+J2 oZ2JYocEmhDNFSJoegmaMDR0dFpfFDpv3wZminGGtEOnDDi62wAXw5DBQ59P 0bhjUIsb5e1hKETDA/occTqoR+uGwcXV37eIfPV9nHzW0dwn/5svikP14hJY AmeATNtrhMxpJ6elk+HoymCCSU6GET5PNlIiKylzRQ+QdVToWCqQ7dJhuqcD J1vUzPiqDBNVOAsVMotB2PMD5IRlmDP9MKaK0CfyBE+WWUNKAs9hWwL73VXs swvw5LFXnyJo3idorhE01+EZvkFw3CRIbhIwqxvgG1sldmziegH6L4PwYQnx Do2PF0tBT0xaMiOSE5IcUO4CDJY+WDrUCDptaNaQGxqj6DCn0eUo4rwygV1v a9B9MgS/Po1oLx8xNQFrnv6uMMdoNA97/xy6+mZwRllExJ5GQBuBnUFf3y/q nwboZIJoC3r5PQp5LIPOWBxdsV50h51IEzvXaeSbVQ9uVTy4Tfmg4nkOa/zh z/mjG7fJZ1bJem/0Ez9FJ32QA1fSDE7Mz1cHs5Kd5gdNtSY8JA/iEvEFfpye 0Gz1eBiU/JKz6SJeFLSWinmYxh8nV0xIfQgM3hSM3jSMvjR27NGjp1FcgeKF 0U/X709BR5av8TL3F30KnDECKFIHkA8aW4wWXoQzzhz+yr0TT2Pne7hPZjgv 5Q4O6X5OgZ1Wi47YcZJFhYidPqgCKS7OvFTya4kMwNZHXCSH+KnDkBmD+Ju/ 3IZNX38VW//6ZezfcZiZ4wgNN0JmOkzlD8FKLJnp1Y2ZMg1TYj5RgK4vi3PO EI440zjgG8EBVxUH7P3YbyGuCstwj67CM3KbmPkAvlHK2BrZ7hwxKNoUKaGk qCk6lxJ6pxIGG8WigM7UA42uG0p1JzRmG3MdPmd2GYpmOfQqI5qVbrTS+O3G FHYwyzy9wwx9ewxWR4Gsns+YmuIYM7AwWFoLlOIcrKU5Znz9s1z8R6xjzDmq 8BmTsDdZoHD3MsYGpZawnSS/ncRxVyKO7jhVFxVtgq24NeTFB4z7a1XfBtwd 8pFI3hv2IRPzIxvl94gPs1nx18QRsbQ6IHDkxPWCA1czdlzps+HmCH3OQL1Y llRioSL6tbvQ7HKgncGqQyI0hCtxoyRu1H7SAWJD7+ey8nF5+XMwBfJo14Zx 4HvnkZdrYQuScNIbGETfnGCO/D9LzGVIH5JQSTiiI7L1Somsm8TTnZknaZ3E MwDS4P41AkhKLZzS9vdAykYAmdDhZLzzhNHjS0i14TpGF1O4DEusAltiiEyG IMmN4avPb8d3v/IO3v3OOzj4wzfx7itvo0WuZvQYp8EZK/tHYSOYzIUhcklm ctlB6NPkosk8TjgCOEpuetA/gYOeUYKoggP0CB1c6Z6RNYLnLoFzj6nSIvRR P2O3mmpRc8loYPZpYKM4PJpaW3wXxSE674nOU0rY9AqpG5++uxNGrRlatRln z3bjfJcLu/aq8O4P2tFxyAGzMg69uwh1eIRJMiNRcpJAJ6XJTcOcpxQo5MJm ejtzmb8fmMIpgv2ckYvInIWv04EepRUd8Sw6k0RQMoPuZByKBJdvlLSFIWmN oLlLyOQSfjiCYtuEqQ5FbqeQZ8jJT+VG/l4fQLvGjzQ92VSSUGJAuFmw4zp5 /YztHMZjPTV2Ud8+1PutaOVCFzcRSD22fX1c8DQ/YaARNvMTGv4C4UPbBUsw 9/YzzbVBv1mGqklLZ8CgEBF3uPfTa3Nh0/NqCCd1IEebM62kS1K5RTwLwkNP 7ikskplMY+nanYZnUXTv6jzmMrba3a0kcb0hE9qYpHY4/OjkJ/R4U9JN8Dqx yRUhaYwPwZYagTM7xqxoHF/9xhYmqluw8wc70PDmNpx64y0ceO11OJQeWn8S 9jLjAX29pTQKU2EYhnwFenIkGUPYSVcvjniLOBScxkHfJJE0goOuAZz2V4mg +/COPYRVXLIikBPQUhNaZkw6OCkeii8gTkTpEBRNLDwUpxZBuwYBi4Z+QgWP VgGnshu2rg6Y29rQsXs3tr1yhs8og/oUibQmSg5UZDZSgSI0DHV0lIk0kZRi 5pSZgDE3wWfm9xKln1IWNziKa/fG0BIfxmlrAXpzDl61F+ZuMzrJg7rSGfSk +p6gaKbggyMUqO2j1BPkbv7cQ1Ew41HUO8v1EE09Jv69IYBOcfOkwo92uQ8p pws38zas+M6hYjiMhbJd2pDszzjQbDcTRSILDtRaYdOBrFfti07Cel+JCCpT bwN0OIPYc1iO7395JzJn1URqkB6hKtXvi+p9Q5R6ZoiRqvd7S1JTL3VAbFAI JIXhGbgKT/8FeOiWXbmRZ1Ckxc8+ZsaVJIoytVtZe5lptZnt6LCLnSNqw5Mm iqitEJ8mWpGqse3pUTKMcRKeSfzVl7fgtRd2Ye+mfQxk+3Fy9x54Ghsx19mN gbOtsHaRMeijsPSP0RojMDC46fODOEW3e9IdoR8aw6HQHA4GZoikCRzyMKg5 skTQY44XogvWwkzEWHv1cPQapA5zAUooZEQkaEDUb0DMZ0Cfh99desQcOsSs WkSIpF4iKaDrgVfVCe27W2D562/DsHEPlA16dCtDaDJkpRKIDs8gugJVqe5G 1NxoEiPS7au6LCU/SqbM7/SpujJRVh6BujyMnnw/WiIB7NalmbZl4SLvtLZ0 k4qQf6YZUpJBGCLe2vYKQ03XP5c7CyGS1Myd1Tb+zsK/k9okBdClpn/pIZo6 fLCr3Bg0N6LUvaNOOlwIha1otglfxLzLJRqqiwvoM1B4CwxH9Cuist5fgYGp pal3CF/+2iZ864sv45UvvIx9z7+Gg1sPShX2otLeRDEy6Ivqem10EBoSXQ0J r7qXPokhT+WLwVshKR1klsK44KZXePSjn+L401s9X8BMnxXzZP8Ludp2SKvR iQ4yqi5xvYA7K3UeFt2ITdEqLFSxLTMGBxfquW3dNI8cr715EG9tO4hN7x7A pt370cxkx093OEiGV3CEEdIRzO12WLrc0Oq4KMngTgXiOMEU4HBkCYd7FyUo HQ5O4ZB/GAfceVgIIQshZA3pYCd83L1G+MJG9PJ7pNeEGCURNCFJSfmN4l5j ZgGbkHYbkHLrkKBjitvV8MpOwbn5ZeTf/j6mT2xCvGE32ne34lSjH2fVaTSJ ahpHP1nFADqDg+iJiIy8ClWqCnVmSDr+JA4vqktDUPUPQdlPuPVX0NIXQXOU YSRdRFO0gAZTCmabHy5lD1QGLfYRTuL6JSmlDpAgUZQUNTMlsSuq9YWYBlHc FBeFTklLhyS2X56GUmePT2px2Xpai1TnXlRdzdLOpt5pQIvVzmcXF+uQyLuS 6CI9UIpGBx46FjpYQ2AIxtAIdh9W4Mv/8TW8+MXXse3bpB4vb8KOl96GVVwO TjEluMQTXC60rY7BRhuvQBMr0zkTkmHan7byDq1SmPxWVwinaSyv3n4WRv8J l4eymIs7MJ8hjES01TshM/ei0xZHj0vASETNQRhjQ4TRKOSMA41HnYgfM2KS K0rL2Hdc6cQprZN5NX1edQ5OyvnoOJoCo9JZRKuvDJ8jjaA2CHebGYojCjS1 2XDIXCGMlnCod4HfpxnfRrHPqIeVELITQpIHInwCYRPCYTNilESvBSlKJsQc PGjZgHzQjM38akI+YESODirLMOc/tQvxN5/H7LE3cYkLeVi3D35VIyJdWrSf sOJkdxJndBk0WvNocRXR7ieaestMqQbQnRigU6GQyHXnxXksfi8OoIvSWaAj ikZIgnKQpynZHE6G02hwxUkifDihN+OQXPEEQYog82uKhqINiCb2vXQUvcyX KCQ0BqJIzyxDL5BEp6QR/SulLoIBdGv90q01nV0eNB5pQ2/3GWm1N4niSouT zjRIotWHTmYoYm9L6WZI8lZw9AzRddyJ0399HLu//C6e/9ImbPzr7XjvpZ04 /upm7HlzC6zpKVhSkzBRDElx0dkYCSsdcZJOKSGuSxW928Q7tyQpxi14R6/z +0VmynNYvr32DIhext2LC5hhEBdX+Aa9VrRoCCIjQWRJoMcpAm2JuT2DJ0Ek KvJ2bTfC3+THBDOC3iJpdnkWrkEKAeQWIKI4K7NwVGZgq0zDUpmCgiRKwSds dw/A7C7Aw4TbR1ftbFJDcbAV5zv9OGzKMaQxzOnbSENJgEJ6yQdJAIoIAFmQ pCtP99qQoxQoRUopbEM/f9/Pv+8XINM3I7H/DUzuewnX5Ftx2bQDJUczQ52M Ye48Zgg+R5MGbc29OG8ZlE69n7XncN5LNAULaIsQUdSgLElJ9UOW4fdcCe25 Igwji7BNX4c8kYI8xXCWTm+ALJvG5wimFF4yRPAWmbJcpoLu2GkmN9YnANJR 9BQDgWT0h5k4hUVhB3OY/x1GfjUSUHq6Jq2IcgSU0sboaPajWzRC1Xhx/owM pw62oRx0olmnkyp0Wy29kNkTONMVxMkTDux4VY5Tm7SQ7XUguluF9FkbMoyM z39nD156aR82vrofh7fsxeGt2wmiaal7rolgMqQnpHvKRCTXMu3WpuiOEgRk Hxl6sgLf+Afwjt+gMKqNLaC4tLTuivbV321NBO2Y7XMh4GSwpUtp0zHQGpmq kqAoGWQ1RFCLKY33thlg6IiR1ubhyDOqlWaYiM2SRlMGZzdI0HmR4JmV7oi2 VZnXEEDGygQMg2MwDAwzEPTjDI3VTKPp7XHmOV54VHqYWs6i8ewuaNr2wq07 R/AYGMBM6A3XbsRLEiiZsB15SjHiQD9BX445MBCzY7BPiA2Jlv0o73gBV5ve wZppF+bdh5H3q5DxdiPpkqHP1oQbRQfiSgbKVjPT2xVYimuQR2boMas45SWY mOqeC+fQyCXY2JeDZnAOGi4K77y4S/UOrJOX0MEsXpZKEFwptGfSlAyOxdPY wvT6CC2/X+aAussAa2Mz1B1KoidM9ETIUaLkeTGYyQk38GsfvwT68Ocw8RcG f5R0OAKt6HpK36S0B6Cw+km5fWiXKXH6RDtamm3Y3dCBQ4dlOLC9DYffaEHT NhU6mWyqz4eh7U5DpS/CRt9q8/VLJQjf39SEb760H3+38QDe3noIkVY1hqgA c3oGpsw0k+ZJEsAJaJkuaTOCEBI+SRKjRIFkdg6+qTXKTXgnr8AzQVI0PPQM erZIb+Omwk4Ugg6c73aiRRWCzBBnIGOi4WHQ0iawZ4sOxo4I3EzUrBkGpoLo LMHkq38K9oFpOIQwTtorQqYIHXrJKr1klUlNhcnOIOMt4dOWLOJIeBaHYxex LziLhsAwztpC6DB1QKZuQFj2DqZPfgeDu7+OjGwPYoZWJAiZTNiBHJ+xGHUS Nk4MiJtjKNWEE3mbDLE3vo3lQ2/gruZd3PCfwFikG/0RHUq9akY4BdJ+OSHU jOW0DjeYNifUepjVUZizaxKEbANrsA+twTGyBufYGlwTFGrOPUOZoyxQltag rUyinfBpJ3za0im0Ej6n4yls8sWx00LuQh50yuLHEaV46+iAvVUJc2MnoZNg kpQkXpKwkKo+B0soRedj6U3BxJ+MYuM/GGeU62MkipF2R6AkisSxvcP7W7D3 teM48N3D2PLqaToYcb+TAapWLxTdMXTpsuiy9pMPVWptK4gaQ3SSVJkOJj4D c3IW5tQs5N4xdLTFMKqxI6bxwMR03ZCbhi5Xq3HUZomeTBUaRnA17eSbfgDf zB0KudD0+/BMLcE9NrLufPbXnc+FcgGTfW6ckznR1BNEqzbGTCODMz0RZlta GGW9cHqSMMbFNuEozAxHluI4rMx5bcx5bcx5bYOTG2ClmzlD1JChUYzVMegr nM0gE51yFU0JUp7oBQk5h2IXcCi+QlnAAasax8wymBTvYVCzEzOKrbjQ/gYu nfwe5nd9G6Oyg+g3dqDP3oPmTS/iwF/8CRq/+edwbvohSt97EXdO7cQn9mNY ibZiKGlBNW6iM9LTQWlQiCiRDXUi6WuRrr5eZWosUuW4lugJiCZxNfRYiR5b lQgiehxiN3OSMk0hctZPF6qJnNZ4HK3JJFpSKUoaOwMJHCT3kXkFcgTvCZP3 9OHd9iCa5AHYZFZY6SvMZMiWUI5o4eqjc7NF8rBGRdaQgzmSgymShSGcgS6U xrFGA5rO6rHvjUY0bm6B/L1OqI4qoT2twbvHunHgjAUyTQjnNDQTo36nrR/d zkHGCbJ+okfbOyE1lzAQPaIvt+jPbSJ6zOlZdDEJVvakkWZ8cauDTJCnmHhO SNeja3NET7YqlVzrimPwzRI9c0TPHNEzR/TMLGHl/r3jTx8yVmIk4IKix4Vz cs5YFcOJNj/2v62EoY2zd8aY3vVLHF2fGoaR+DQxzTUzzTWXRmEp1y4INxMl JoqRYqiO1C6drxA1A1Xoh2bQPbiKQ9FlomYFB/socf4cyuKIy4hDdhWcfj0s jm4EbK2I9ezDlHovrrS+h9uHt+KD7T+A52tfxJEv/DHO/sUfQ/6XfwTDN/8Y HysP4X64GTNpDUYyNgyLqwlSZgwmDSjHtSj2qZCLdDFfa8XqsEu6yXq1ZKPv sWIiyVAS/4DzWYOpRAQNEkHDRBCRYyNy7ESOfZYyT1lcg2JwEs2xOJriSUoK x3sTOGEX90m4IfMEyJjD6GboUoq9/ECGpCSDsyfdyB/vwtjOg1Cc6MDzL2zH 3z6/FSfOKGEjv7JSusxRtLQ6sOeddpzb0YXOg1pozlqhl3mgU/qh0IoTqczF epzYyv/37mk7+WmYCzyJdkOOOTN9jrPCVJ65IpGjod/RRsSVAUQP/Y5BdHYn ckSTOmNmlgx/COcVFXg0CTgUPqmCViqkyo88qa92TBAt8w/hWyByFsTPRM6c hBw8A51/LRXVxqmG0y1BHD3lwsE3uqBvcsNMTtYpevf10o3FSMjpOHRpQoHg NDC9NRaHYegnnBiONjAwDdPpiEvktRWmwINMhQcqUtWPc/Y2TFN3cTC6iIOx JUJnGQcSi4SNGYeZjna4tFKjJrffLN2eEQ7aSMDUSFi6EGs9iVn5afS88C00 f/ULUH77P8L6d1+E780vIdv6DsaZjIznnBjL2jGatWI4Y0YlbcRASodigtDp I3R6W3Fr1I3VoVrH7Zv9VlzLm6TZz177BPrcGgxlQoiOx0zHYxmnMGRZGbKs dDwWOh4L4dMYjlOSCCZ7EQrZ0GK3oc0ldnxCUnfYHn8KKoZ1rdgRDhTRRqfQ 0uhD9AydyLfexBtfeAGvfeUlbP7q97DvO1vR8/IROLeeg48purEzBJOuj6l8 7Wo8hS/Nz4wTDlEmVUzETHEclZnxToMVDbIgmtV0gPos8+QS5A4mh54hKPwj UIXGoQlPQhsjfOJTTM0JoRTDU7p2i7SotdwpK6NNVYaXYdsod9fq76SKrap0 B7J34UMyvAcSy/MuEjqLV9a7cNaRUzta/w0JOTtfO4fDP5BDd8YBPTOHVvLZ Dk8BXcESesKkXn1lBsEByZ1pmcpqi0RRiVKuQFsWtwVXiBS6zYEBKMr8N0OT cNDV+S88hv/iIxyIzONAbAH7+xiiEnM45DTjIFGjtSrh9DI795kQ8FsQIWoS vSQ45MMFEppUQIPtX/2/cOpvvwLFD78C1ztfhmnTX6Cvaw/GC0RN3kEhahiG RnJmVHP163nTRE2iCzMlHW6Ne7A6UmuSvTpIp1M245c/flB7y/1bmLnxCWZv fULAr0FP4NQP0G2QTs99Wzo7V2QysZCxSyeGmkyil5sDbeI+Y3cUneLGOXHd oa9AzJSImQHSl9rxw698bRe++5cbsfUbb2Lvt1/FkRdeQ/tb29GvNKNgc8Iu 3jyICx2iZdpZHCpjchLLQx0h8e2lC2Na6xm8giMyCzafM2F/o5+cog/N2gxa TUWmwANS8X63d5iBchSq8Dg/S1wWQVcSp6z3biMh1uXGpcC0s7sfcnURXqU4 N5OHqlCFbmCG+PgI3qXH8C4TM8trlJvwLIk+g4vrZwfXAdOzaT+CL+6C7ogV akUIZ7RpNJqzaHHWOjrIQwROtIgeTkeRqt1cqcqXoSqWoSxR+svoKffX6tJK /VCT2/hXHhIsjJEXOfyl+zidXcL+6Cz2x+awP5jGQYcZ7XZxTYpGaiHsEbeU 0tVEg1YyYhuyTJwKCSZRKSdObX4ZR77/V2h95euwb/sKdFu+hIK7BRNFJ4WA KdoxxsgzUqjf55wjYLIETLILl0dsuD1BwIzR1Yw4a62DKxb8aHXuX0nT/xbe H8lgPmmXEv0mo9iIc6PNQdLu6iPpTDNJyEsdR7X+WpdUY+8QKckI/vIvNuIb X9mEN7+zDftf244jm7bjwOYtpCwZWFIM3GkGdAZ2Q2oIOma9WqYt2kSRmW+O iBAnBcbgrYrm9pPYfN6MN46QKHTGcF6VRrOhgDaL6EklKraJCD8RERqBkuOq YqNQJyip9R5pFKkTKv+uMILdiiK61Rl4FW7poINviUhYJhJW1iu1mXGv1Lr5 uebnG56OO/8HlJsPoPLDrfiVpZm+PgiVdwWNxkGc1DPs2rJoku7kIzBI1jqI bTkTsc5UQeoV05mjFIqQUzoKBSiZFtlnrhEM9+G7cI9g4OiXRLHiHehmbmAv M9u9sVnsC6Sx32qEXbzBdGika2s9biOCPgGI2tZMlhl0MWHHgLi/JutA4+5X cPSlryN85EVM2o9swGTJgT+oXfJAGSsx7IgGD0XioaBFKUc8pLqwNuPD7Skv VkWD8zHiYdROTFjw49tzqAHii7h/eQFzcTtCLgMNIc6cetBmC6PDwdDryqLH XaBaaEyfuF+t1onUFB3De8d0+PJXt2HjD3bjvc27sXXzTuw/cgq2zASNPQ4z DW6k6JnH6piJ6NJ0vFxPmgQBFksxy7wA78gN6TjSSVsKG0/acbYtgrM9SWap OTTTRbTSRchcFWY7FTpzAiPMEBOjxIehTFLSlCwlN7QBCsaO30NPvoI96jyU THS9Kgu8lWXa/+GnFdziJvgL1+EW3R0fPmp4Ov/5Q6g3H8TYazvwT/ZW/NN8 QPqt0X+dqddtIvEy5L2kPkylz9QvyGsK03FEKXFKkpLOojmdg254DtapK0Qj qc8yY9iKKHLxXlzDf6gVr16uleydyCxiD1PoPd4UlHoF7GYKkyAnnYWHBgky ssSCZiQjFmLCSkzYUJYwYWfEsCOslOO29gQe+/ZIYBDXLUyUbRgvWzFWtmC4 34RKP2lskTQ2p8R8xYS1WYJimqAQ1y9MMrJMEBSjVtEdt14k8A3MRGwIOoxo 1lnQYvJxdUbor5OM8zn0uEpMaRlN/TRqiCs+MgZTjIkeffbLz5/Eq6/vw5ub 92DH4UZYmZZaGfMt2UmYc+IdKQEhTpmSIuqy9BLpMjRJAqyPK5ihS3RV9I69 D0NxBrtErOjO4nRHHKeVaZzV53HeUqKj7kcbx5cxVsnJC7uig+jqI/8gN+yi 5+nKULL8HSloV44xJk8nPjCOY1ZGekMYbpUW7uockSDQsEa5BTcR4Vq+dOLp zZTPwLDlEGbe2oX/292Gf1jw12LuV/Hg8T8wSN5iNvUBE2AStH5yfcZfXeky B58hBCmcgKI0Aw+5v4cEzkP+7yGJ8zB79Cyv1ZqMcnB3vX7TealWNaieuoZd gSl026KwqjthMwhQqGrNf5zi5bWBTsKERMRMQJhRZJY7wHylmmXekiP9UDVi rusUfuHeSjAwPyEQJgasGB+wYGTAjOFyDRDiEtbRAT3uE+Rrc37cniEgRFPv aQJiilRjwiq1+VwHxL1LiwhYTSR9NjTrRXlQFO2WFOS2PDNOKtg9CLWfxFvc eUdAGBnEj8gS6N5lwZTXTY8wTRFtDMWZHXHkYor53yQMhXFmnuKVpzhRWoWW FE2TKsLcPw/fJBfPJAExcZWygtOkdOfN45BbxnGiO4WTmgxOk+A22gt01EW0 +EpoC/WjnXmmLEYhKelgGJL2ntO1/WdRR2ubuk6yIIjCPWxr74XW7IdTqYCz OlMvYhbd5K5j6dGHzxyi+SyuX7nDmHwYS1v24L/42/HTOW/9UPOfEhX/yLz9 FrOktWdQIe1EjdK647W9BGknavbZnSh3vY5UVPNKd8pfqvWBsV/8ALZlEtHS TRjNKVgUnbBqFLDpVUSFBm6HFgGPHtGAgTzCiEyfiTzCjP60BZUMl3/OglFy hWr7Qfy9dw+WUu0bJCj8PsYEGAbNGBowYbAOiBtTLtxbCEgNiaWer6Ip8SwB MUNATBEQd+c/J832a/AYTcz/7GjWBNCijxEPacgseXRK7S0HmYQMQROiXSO0 L7GwZ7cL0TYfE6GYdG7LTByYczPS0RtTYQrGArFQHJdOF+sY1nV05hpxhIi/ 800/rN+ec0vqMOidugD3+DTXyBws0RukH7dJ96eJgypOkMmdppM65yEumAQ1 kc01RQrMuSl9FHH4S+SolXmuSQbnRQodtJsOuntgBTu6e6GzeGHt6ZLqqV10 DoXVO8+c5PwMOv5GgbUGFf5rSIb7k47frmexyeFHkvlNBUKA5rfS/LbhNakE 0jFBoemds89uJUmFqiu1YtV6KSS//hGyNx/iYb0+KhHmgpB3wkKQ2jQ0vZGm t2nhd+sQEabvNSAdMyEfN6E/xQXODHSI+YS47yRxahc+du/Bjb4GyeZjtPko ZZg/VwdIF/r1kp0fLgZqtl/w49Y8bT8vuqvS9nO0/YxVdFfF5+oOcHLxMho7 7WgiC2/SxAiANNrMeXTYSYvdzLhpfBWNryGjbyGv27kvirwlBmtSUIIZmGh8 E52ksTBDo0/TyMwUSxPSVpO2OCK14VLR+M7xW/DNPqzfWHMb3tlrUsc/9+Q0 l9svYQpcg7nvFrnnB7DUl1xHdAad8VlGgll0Z2bRk5uFojAL0xCzgak7v7EJ /PTS66xewC5lLwzkxE46LVHC/UyxwHPobriFXy7dw68+voffrW+aPvj4V9Cn mXcVafoBmp5JvIW5mHX809JI+9yne0A2DmtblkokYRGy9IFo+fOZer2VX9kD S6eCi13FhS4aPWvhI0cM+/SIBw1IRYzIcaGXkuJKJZI+WnqIls5Zm3HXug/3 g7skVz9CK4vv0govG/HBrBePl4J4ICxNWVv0Y3WRll6kpRdEP1MHbs5Y8Muf Pahb+vNYuLaGVlWITD2A88oYrS167BTQbitDTmLW7Rt6krsdbEuj6XwWfiZR oju8PlPbkjYURLt4mvk/0MhT0NLQmhLTPK5yFQ0tduf9cx/CN/ewfhEMDT1/ rdaNb3q6VojHiGsK3iTFYMTN1P1rqb7Tz0XmGK772Pp+rYvJr4sLzUWNu2ho l1hoXGTOeq81qQvf8AUSxV7oTTY8dMh/3dB3H/9nrD6qXQJbo8q/X+sJM/tY uh/USLduEi1+Jj5t8fNUmSNMQvjz/MNPfqvuHmb6LAio1FzKKlg0ai5jLbx2 cRhNjxiXcVJc2is8OA3bnzYzs6Nxadg+zVlc0O3HJ5536B6GaNLPcemKdm4m 6ZqDj5ZDNcMuBWrNkZfovpe9tUa1S2T9C3ZcnxVOvwawhx9/Amt6joZN4mxn FOcUKZwnuRJLVTTNktebZil6x/HGNhf06gJsMUHWaL2s2CXmd/psbXEKGi5d dUnIBDPkMShpVdfkXfgXfgTfAq26IPb/xOs6WnXhKn3uCpfgVP2U/ufrXGoV RlrWxDVkpuu09D+7Cy+5T1rVMV2vIKdaHVxHjqWa66TbfE4Kl58h3boO83kd filvwP+rPV5322fW28Pc+gSzH1Du0I4rj6Edk+54v/8Jv4pWMeJf1bZVanVK 968wNeqzI81szaRQw6qn37XqEGAKH/EbEO810u9yNSZMKKZptKwJ5bwZg+Ke qY59+Il3Byb6GpFP92Aw3YnlUhduVJS4OqDArQkL7i8HcEd0FV7xYXVF9OZk mrZMg9V6c/5B/TGsdGe21EV0W0dwpos205AIG/vRYh9Eu3sIcv8ITjOF3nsw CpcjDy3JsCpNe2QpeUpB2GYCSsZSBW2kKI6ih3ZyTt2jnX4M3+LHlA9rnEi6 UIRxdulqvdHdg5pf+rdSizFDYq221U1XZ6aJLDSRVbi6+na3jSay0UQ2mshW d3XCzYlCcBHXxPfMzVqB/43r95BqVODjc2fxicZap1o99UmLzm4zETvm407M Z93IBixSc3GvQ4+Ql5SHnjBJT5hhzMtxwRQyJiT7ehCPtiN6chceud7DFf8u TPadwnLiBJYY/xZiDZiNHJcuDB0NH8VypRuXp4xYvcCFcoEecMWJG7XOl7Ul /+/wk58+wurtZczMF1Dsd0Kmt6Khy0PpxZGOEI519eFIdx8arQNopkNso0Pc 05RAW0sC9mAeXQnqOk3JUJj4dJPrdheEjKBLXJIxOEdacGcD/Is/wu98unsh 9rGoK+/KTdKT9+FelHoOfrber0FEnMTEY6nnmIGrxUgfaKIPNNMMlon61jHN YKlvHYuS6/W2Y5kbj0ksamDfUHd2ncdSiLXcwH+dvrh+blxRd1qXBnOYjdIG aTcWCh6slL3oj9lQTdkR8jEZCRmpcyNiYQ187vMIeM8jFTqHpOYwVi17cd+z icNciJ+gF71AGyzTBoux45iLHcNU7ChGo0dQDR/CQqUDqxdduLniwJ3ruXof rj/C7Q+WMFh1olp1YagqOni7yGFcyCRcONvhYWTqpQPrwzl1Ckc7w3iv1YtD yghOMynYuM0Bo1ZUYeWYDAwzGaCkKVkhQ+hgFqosz0q8zL/wMeUj+GkB3zId l7R/JPYNSBAv1Prte1auiM5vtX4QNMP9H/0Kszc/gfapHmHGsd/sEWack+IA HlDtv1VX+djKL/HhT34u/anhaZX/e/zs8SNMhZyYibsxl/VgseTFhUEf3h/y 4cZogK4jgJlkE8YjQoXHGVcauEwakO7agznVPnzofAsX+btLlIt9x6n841jm 94X4Mf7bo1wSh6n2QxgJH0A1uB8rExr88u8f/U4d8qKJzvCQ6L3vpIg+/C5M DbkxW3VjvuKWTqSfb3OhmfBv7o6hmWGkWSt28XI4rU1h8xErDh8KwGmPoTE8 gKbYIJrilMQgOkWfzaGLQtOEPOPDv+LXx4T9Iyq9pnDvhfXGbPXNmos3njRn +726I7//01/9Rp+v1poSlfWWLiulPNe5CzMpD2YLXiyVfbhY8WGpZMJ47DyG Q0cxFj6GyehxzFKJC1SQ8BG51j144NyG9wN7JOVdjAsFHqMPOYbFxFHMUqYS hzERP4TR2AEM9e5HxXcCP6fRfrvuKVeWcrWLOEedmHyqnYqomRVlkRepxUvU 4nCfG62tQbTKo2hT0GkQw206cmlDFm/vsqKjpRcWRxiW8nV4pqmeGcrso+fI lR5RFz7p3Rpl8QG1JxyGuLzkXr1DGrVXz2VFS37n8mVDTUGquoIuDBQYnDyY yngxW6RiBnyohBpR9h5FNXAUI6FjmKCCZugw56mkRYrn6A6s2nbhhn+7hKoL ieNYSR5jXnmMDoLKSR/BVIrKSVI58YMYi53CStyBxZAdf//4IWr+63+R+s1M jTqoGKKcMkcFLdYbk0g1o6IEkEq6RiVdL7thVfrQ3h5Fe3cCMsJNRpjJDGm8 vdkEozoEJTP4dmagljKjFqOad/o+lUWZpczxz+SV3sV7tei2clfaCHRfXBOd y9bqnctcVJSTSf+jX/yyrih1XVHDATfG4l5MZH3Iuc8h4ziMovsoBnxHMRQ4 hvHgcUz1EkVhoojKyqgPYMXIjMv9NlHDpZei8tJUYuYYZjNET+YIJjOHMZY6 hGrfASxnNLiSceBSwoHlkE1SVK2pyL950sFldsxBcUr9F5apqIuUK1yXUp0k 1+VNKuvWAIXKuk2RnQ+hQx5HhzKJDipr5xE7jh1ww27yiRt7LUkuPJkpQap1 mdkUoTJNmaHM3fmNbSq31NzKJWnqSZsxpsX5m3eMNU1ppG//E5aqJWSccoT1 h5CwHEHGfhQFamrQewwj/uOYCDZQU4zB4RMId+xFRbkXN1wbsZCiA8vw95nj mM5yTeYIvRzXZ/Yw/3wWV4pa3BSlVkUHrmYduJKw4VY1W4te/yvuPeloQrow 5qgryYlLVNL7RNT1YSqIirpVKwiU6gHvUO5S5uI+dLTGIO+morj8Xvx+D+SN fmjMEcipJrmVYkkwpR0gr6Uypn9z9+bpLmDP1buAOS7dRm71fm0D+Wkt/Tl+ 9tMHiBpPwq8+iJDxMGLWo0g7j6LoOYZB33HijZl6qAGT1NJ07AT8re/hknsb 5iJ7ME0tTWSPYzx3HGPU0gixNJ0/h/sjbtwdcnF6LmKALKZol+6sfz9uxYeX F6TOY7U+Hp82Z1iiii5KKnLjxrB4N031VIVqvLhb9eLekBf3h70b8GDYy5C3 mPKjoz2OhtMBvP26BTq5uF8+uq6lDfySYEqsTU3VjsuIfQ6yQOdifZ9jZe3X Wl0/J21v5VYfSHoxPa2kP8P92/OYH7JgJMcEWHsIPvMRRAinlOs48t4GlP0N 9FYNGI6coBs+gZ5jO1C2vIe4azd6I6cRjjRA6WyAmUoVe6WlPh8KUR8ejNLu w0JR4kV8vewqY8XlhAXvi+4VVNLT3SvWu+JcrytojUq5OySUw88a9uHhiFhQ j0Z9nPrjMZ/006NRL84eseHYTi/03S7IjSlqSeyVipur5fYEA4XMEZfyGXs9 nxH7AlJHrBWxzARVfg6Ljz9tA/yMer6BWanHnri32C5VxY/l9ejzNiJgO4YY VZTyHkeOOCoSQz7fSZxWHmd0OY4u4wF0OE+hy9kKhdMiNdtQ2ILosQTRbQxC rmXctvkwk3F/ekiqYCOV6MYoWd3C8HpXRYfUlkc09nh/2IMbVMltyh2q5b6k Fj8ejflRSgVQSgcgF01MOFanncLxXnipFadPOrDxVBIHujM4oMhAZqNTd9C5 O+nkXXGomWoKEiu6SllrXaWek/ZLnpNSiHUOa3naW38d91fr/e6GbPX2MC4p 5l6m8a7zCSucyVhSAYtXiXaHCh0uFfa0tOFEexv0yvPQ+IJSSzetONUvekw4 anUy4ji6ghrq0nIZKP2wmbyYTFBD/XaGt0ZUHYee6nroklrSXOKY1zjmKrUi agPvUSuL/dRKJlBrf8Jxur31FijuoNQA5UyXDe9uU8HQbUK3KYDD8hi2tSXx WnMG+9XkBtROmyuBVncfzASQeVasJ7HT8Jy05zD/qMYz7U+r5Zt4eGuexM3y 5BrXRVLpC1zs73Oh3+CjTZMB1LqTiY5zfBTR8IKyq8EMq1oDg80KvT8EgzdU b58WhI7G1IiXpiY+vv7T8qGODh/SLifG7dtR0m57qgJfmMKDKxzzetWHW0N+ 3Bn2o0CASKVKYmypGl+0cOD4vtCT7npv7ZCjqcEAs95SqwwwBp6Y4gCZwYG2 KCx8pnjMh6HlK5hlUi8S+wc//xVcT6via5gtGZ9puCf1+2AouMpHmhRq8FIN gaDU80NSQygEHeXN3ToYlQZYzXoY+XgmPp7JQ3FRJUSJ3lZTh7quju6nSmBU zHHLxh0YT6ukovJFjneBfvZ9MtIbHPc21eCKBGrqlwomQk9MoOWfdRxPx/H0 HO+NjR3QycwwmaxQ19XfI9Sv4XgKjtfJObR7YFPZ8ePVOe+zs58rmuqt6T5t QnBp0IsxcmSZx4dOP5+coypCtZlr6821jstdUMnNcGh7YOHTWPg0Fj6NWWiA gDAIQDhr5RsqS60HS7dOVCUa0Hhaho6TZ5lsNEsaX+LsL3L2Vzn7iYJPGrcG vNqsVRRNqBfa+ml/cdLfwDEPnlLh6B4NHGoj9ASfzkqNm+sANPhrpSIqzqHH S627EQmPPDP7f435grnepM0pNWkTsx/Ke9DmdqPD96ndVdLMe5k59sLIJzl0 3ormJivcii7R0M7fiz+hFnphFhgQXQUJU5271pFmvd6gQ2nE+aYOnDvdDkUb 7T7grmvbR6z5YQ9769oOSvZWiY5EFF2oVt9gpJg4cxPH2bG7B93njLBZnTC4 astPu+6ZqO0eU72+QUtNqtycvQPZfmYNT0//G5jPcfqkBqIDmegisFwWvd5E M1DRa5IfEag9ilo8guib1RuBKcSVRTm9R42J5lNwOFywh/pgC8Uotb8zByMw BsLQS01XOBV3gKGF3kBHFcjkOHdehrNnNSjHaPyyV1KBNcTH9AnDB554nN+Y fjAMsz+MdkJ595sy+Dr1sLp9MHk5lqdXqkDTUO0qB8ez+2tn9M1Ug8FDNTjg iCxh8cID99Na+DzmMtRC3v6kFL436kCry8GFX9OCeBqV6ADGmRk4U1Mozhkm YA0msXOjEpWmNqT13Rtgj6RIVWyRJKzhBMwUU28f/0uMazYidaBRiYJ/swnN XZ0420IstNCV6sjzqYRonwvt7poS1hUvaly0okIhVK9QCMaksgSLP46jh9XQ v92InE7J38WJjT76oRjdMsfzRaCmQlRUiNLF1efwURkeKsIBZ2KJipjHww9/ /qwr/CZmU9RElprIOaVybtGRro2eu8PjrbuiMF1QHxdhgo+T4uMwxwpmaLss dr7bA/PuMzjxwg+xc9MBOGI52PuysPZlYIlmYKJyDFSNjmrRUItqqqTbJmpa unBO1oHmThPaGOwiHnu936m73u4xKNWLqTl9Hcc2BOPEAlUrTtsHUthPHL3z NSYXp+RIeWyw9KZhpoiT94ZQUnpWDVWj9keh8oWhpINSOn2kOE6pw4QzMY/8 8JVnVfEtvD+axnyKqsg4EQqKOldLvX0jvQK1q/CLKaSgC2QI9SwBkacaCth/ ogdf/rMX8dqXvo+933wBm775Pex7Zyfs8SJs8QIsFHNfDsZYFnqqRUOVaHrj UDDKtGiUONfZCZmaSFDZcLhdx/huo/qFKugZuPKVAdFjLMFpcXoBTpPjmzn+ D/9uB771Z8/j5T95Hsade2Ho7II1kq8dIQ+LI+QcL5yBNpzieAnJjCqaQCDS FBPtQlfgEq0iUtN49PHPnM9qQ9r5Zpa1kHTivEGLFptoROeBnPjq9sSg8CWl JhR6f57aKMIcKsES7serbzfgG//nq3jtK6/j4Auv4th3f4DjL3wP2c37EdvZ APsBObSHlNAcUEC9rxvKPZ3o2S1D185WyLedh2zzGbRvbEDrG4fw9rvHcejt Aziz+QhOb27AyU2nceKdc5TzaHirCWdeOomm7xzEpq+/i6/+b9/FC3/6Irb9 1Q857g+x7bvfhzXWD0usxNkWYYgWa41TozlohBWoFTWXtWj6Y0pU4Om/SI0s wp2bwdL1u7+mjZ99xOwpZkMpaEaTQY8Wq0MqXu1wEdLuBCGWJlHJ0f0VqY1+ wnEQlkgFr7xzhtp4He/8zTs48PpWHHt7C45vfhsZswN5ix1JiwdGS1p6tW8S XZIMdDY6ulJNiEzDCyOTB6Pcgi5Gj11nO3D6fDc0nQZo+Dut3EEW4Iax3Qtn sxOFw10oHumCY+tpfO9Lr1Erb2DfCxtx5IevYecrr3NZim4MgzDFB2CMl6FP iMP4RWj7CtDGarhU0XN5qjfgGbhCjazAXZqDKz/mfDr3+BYuV3Lw2/Vo0hvR Im6ZtIouFzHmFEmp5FrjLZCrlLkYB6RzpJZoFdvfluH5r2/B1td2YstbO7Bt 03YiXwN7RpRkD8OSGYI5U4EhMwh9pgxdughdMgdtPIVG0T1EE0SDxof3lCa8 JdNgi0yH04x558xhNFniaKUW26055qAFGIQmmZTueU+Gb31jC155cRt2vLQd DRvfwa43N8Iq7ndPDMGUrMKQrECfHJSaIuqSJY5HfMTSUIXj8A6vwlu5Cs/g RWpkAe7+CSzduO14Vhui4MpnMaJJY0Gz0VOrJLT1odORZoZVO0upE2cpQxVq Ywjv7tKi581OeFvUeGfPWWw9cBYn5VrYs2OwUay5UVhyIzDlhmDIie4X/L8Z 2ipdgCaR4fcyZEy7O0y9aKB339ptxOY2HTrsor1bHD3ONCNAfVzfAH1GhQym Snc8jJfeOY3v/N27eOWVXdizeSdyZ47C7M7BIs5upodhTA9BnxZH9QaokX5o kxwzTl9XmIFv9DY1cgPeIWKjugx3ZQrLtz6oa0NbDyiJviQalVY06XzSfYDt lgTT3gyfqsDY1E+fMShpQpxLP7PFgP4eF/LhoHSNuTg4aMtOUAOiJ9Q4ZQyW wki9D0hV6uCgz5WhzRShSmal40G6+ARkxMB2jQlbFVZslpk4puhXlkCXPUML FKDmuFof/2+Q9u4dlpremWOjxC/ThiYdTh7xYFRnRV6vJwZHYcqOwpAdoebF GTVig3jUpjgmNeGbuAfv2Afwjt6kiH5qK/AMz4hiYPyaKjS9KZzrsuM804Am XRStRqa2lqzUCkvhKTM+DaJZn8Z7O+xw9MQRFh2/RFV7WpyfrKnBkqcUxmmA MZiKfKwiH0s0syhUoMuXocmW4Bq9Dt/UXarjNrOnArZrrdiqdGCTzCad0pJJ +zNZmqAIpbt2q7wuyM+gKgxRTjfGz45zjMQ45K5BGDpCGDbZYLfHYCQY9fmR er+/qqQOTbofrpEb8E/eozruwDfOZTJ+jcJlMjqH5bU7v66KhRt3oSP+znUH 0KiKUh0pCQFye4n+cwCNmhS2bDZB3ZGEO0jPwccxiuJ+qsGUnZQOionOKqL9 oLE0DkNpDLrSKGUY2kJVurJNx9/7Z8RBoXvSVaS2wSVsJQXconTjnQ5xF28f x0yhw5IjMkr0VAOkBxVoqAptL6dIVRj6OK4YO8VxaIb32hlB9DkEmceYw/Rq BY5JNOpEYwWBDD6Tf/ox1f+A6qcJpm5RrsM7eQmeiXks37n7G6q4fpcgX4A+ Mo2z3THptVWzUdxdVkKncwC7DzD0N8bg9tD5RURP33GpSZohM0l3MAmjdGaO Io7LSDIGLVWhoSrUVIW+PIXA3Ifwi9MUs/ekizJ9szexz5vEZpUHb3cwoGv6 0KyjwzTnuThL6HINkI5USQ+GidpRBkmqV7RISoiK+ElpbD3NcFJfhVM0sLGF oSEixQkO0WNC3z+DwOxHVD9VMfOgdlZr5jaFqpi+DM8UVXH311DxeSxcvQtr eoHquEySuITTiiTO6XJotpSwZTe96fEQnLYsGQwfjSBVJ8almgDpAlpxL2he XNw3uYFznyANVxMAKmpCWSQoBmYQnP8YgXlqYn79XIm45fEmDvUW8J4zg43t LpxV9BF84khLXroUWe4clPpuK6gJJTWhjoqLujlskkOKS5epCTF0c3AUp3oG 4DMzK/D0SQfRdeU5av7H1MTH8M8+rh1cmqMm5ug456iJWWpihpq495vr48od WJPzsKUuMSJehy52Ea32IWzcocfJvczkDfTpwQq6wiPopufqSYxBSU0oqQlV rvaSX0ksKrg+FKXaC37xgtnFtRBc4CNJ7zapCukwxr3atYaLN9A5MI39gRIO U+On5DGcUaXRqM/TAv1ke4NMiKropCq6Oa6CqlBSFUqqQkVVSIcLqAolxz5m qUCh70dQlDYyugbmf1JTxRzHpQl88w+kQyC+hdvSdYreea6P2WdUoatnqJa+ eQboS1TFNdjzt9DpmsP+bVYYaSm1M4EWfxVtoWHIoiOQx0fQmRxFV5pCp91F b9WVp3CZdnL6Zjro4NJPEFwUKvhRTQ2LfJylh/Au3atf6HcD8oEp7POX0OSd gj19A12eKZzS5nDWzN85BtDqqUJGNXTQTXTSTXTFx9CdpKTH0Z2h5CgMVuLd /kFNGVZzFp4ea00N8z+mCj7i1B9L7+m8i/WzMIvX4Fkk6Zybw6OfffKMFj6P zNB10teL1MQ1kokJbHtdDXVbLxx0jsbSKg1/EbL4NM5zaTTHqmiND6E1RWEA V/TPwThyBc7pOxs4/R/hT6iA2uQDix8hsEQFLD+uvzC8I91k513mwyxdwl5f SWpJbROXuuduwV66S9sv4hSXxjk6iSZfFS2hIbTRl7fHaITECGRJimgwSBan 7Gc+QT+ozt7C0c48POYYuVFv7d26pPhH9YO3HHd5fdwLcFEJzqc18AeYv/iA CcVFtOuG8eb35Og86YHdXYKzep/R5wE84/yoCVKvKeFzCO3ZDyU9BygbONmP NojZii8f4n/g18fwc3D/Mv+H9I75Xv2l/irlGtzLXHDx0ZrO45x8ZhW2AkN6 +T6clYdwDz9CT/oClLmL9LKX6HEuQVu+DO3gZanS00+gP8exP8bvUVGzkGky 8Js88Fcv1Ca9/PCpYhRxhdxVuJcuigKE+rz10rffY3p3AT/4ZhNa9tphVPlh 7+dTDN6Fa/ge3KP3OW+qb/JB7UzszKMNHPoR/mdOnZNbeMSJ10T6efEhJ8x/ ukK5cB/eZ16qr8LNibv4EIurDyVVW2PX6I858fxtDsuVOUhVDz2Ae+QhPGM1 dXunqEAR8ejqJZUz1DzHr4/Fi3w+wyE9eZalD16dnhN9UFf0+pjiHr2rHPPC evKtr1u7c0cbTm3Uw9DuIzVbhq24BvvAHVr7Dq19B+6xuwyoXDnSu1368pn7 9K+Uufti+Pn7+HcEGH+/TFmho7nAf7t+vP/JXWGr0h3h+eur0qjpgVucNqec WJUuYn4yZuVZbXuoba8I8FIF/YMNUjH0b3P2oiRa+DXK4n3s6YzCwZzQ43UT gJ7aabSnNL38+EPX0xD/fcg3HUL29UOINllg8i6R/N0m4SNzocntg2twDq1x 8nx4AswzQZniqhGL2jtzB5/jY5B7zd+pVdcurXHua1T32lNzXqu/2L4NFx/C sXSlft7nc3jw+BcwB64yPV4l37xNqr0mDet4MqzQOYU690zW9L5B0vznaodx GdfWm3CIxaysXMQ5QwQupw22ePrJVWBC587lK3A/He/+PeIGD3wv7MZP7Z34 p9VRpAbuk4beZg7yAenu2j+rAbfQwKTQAmXm06IK72L9TfXKp2+rn1yIdVlc iHUbjgs3xHv92kv1/7F2mjR0E+b4bRL+D2DlkPYyZ1/5tSHH64oXw4oX5LMc Tgz5ay/IdxtyUDh64bJq4BieljTuvHCTQ/7D+sw19YPjZX8/1F/bhMcaGf7z fHC9ybUh8OnZVkkB5ZoCHHwaJ5/GVe9i4f5nuliIA8xu6eC4S5xoqF9CRQPY 6dzEI3y2HlSS9OamCLWc+EBqlWEt1geqPDXQaG3a7smnBuKU3Yv1gVbWpHH4 oVs7gjC6fXCGPNJxgEe/+Mf17WZN/YxT83cieMxg+P/MhutlEv89ktWHMCbW yOvr7RbK9TKJ4Xq7BU7TWT8n75qrHd996kKnDdIL5M88qZCwMXw9/MU/1k7e /CGS5XswRj9gbr8Gc67eDuSpOT4pxOAIrplPR3DVX+NLh4Qv1t5Sy+m8jxjC sBLU12wGeJ+dXMD7Ea5f+RD/9Mtf1FX8B5i78gkMqTWydE6QILZU6t0AOKzt /+8OpJX124+eQ7Z+PFLI79SV9uCjXzE54eem+bn5+glZ4sM2VPts+3ituMAx 8+lnS6dja5+9QVLVZ6VLlhoioyh0FfBfwhn844/urZvMun6k7eNfIS5OFlJx xoFnC9KtTxWkSy9kF8XZdYG89beyj2mLXz1zZPr+R/+IxBg/j+Y2lurn4/nU 1tHa+Xjrr10dJB0aXb8J9zPI3HiE1QufQKN/jI/v/bhugtq7zd/F/R//CrOr nzAUr0HPBzXW7+c08UNN/FBT7d3onHi49feiNUPVHlGc34uTQOipTgNNZaSp TGO1a2vW362un+dev7dGfM76q+dafWB9jddPpa3VTqTN3q2dSvvD+oHiGT7m 7G0K/15Lfeo498TlxxukCu3npNeU60YP1T5V+sO+f/n5X37+l5//Wz/jv/v/ AItDsKA=\ \>"]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Show", "[", RowBox[{"Plot1o", ",", "Plot2", ",", "Plot9", ",", RowBox[{"(*", RowBox[{"Plot9a", ",", "Plot9b", ","}], "*)"}], RowBox[{"{", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, 3.571838766139532*^9, { 3.571838857446493*^9, 3.5718388645757055`*^9}, 3.5723437133735733`*^9, 3.5723437554312468`*^9, {3.5723449027196617`*^9, 3.572344929582909*^9}, 3.5723450406551046`*^9, {3.57234950163894*^9, 3.5723495196413713`*^9}, { 3.572584520172369*^9, 3.5725845258195786`*^9}, {3.5726224003989472`*^9, 3.57262241340937*^9}, 3.572796748424938*^9, 3.5727968708695536`*^9, { 3.572796971801731*^9, 3.572796995841373*^9}, {3.57279741546651*^9, 3.5727974308793373`*^9}, {3.572842795856916*^9, 3.5728428061217337`*^9}, { 3.5728522627179437`*^9, 3.572852288426789*^9}, {3.5728523495164957`*^9, 3.572852453865079*^9}, {3.5728524960787535`*^9, 3.572852515110787*^9}, { 3.572852550008048*^9, 3.572852634669397*^9}, {3.5728602362372026`*^9, 3.5728602649256525`*^9}, 3.572860311756935*^9, 3.5731241886618786`*^9, 3.5731408095114717`*^9, 3.5731408826443996`*^9, {3.5740716827539716`*^9, 3.5740716897271843`*^9}, 3.574073190995821*^9, {3.5740743978919406`*^9, 3.574074401682747*^9}, {3.5740753037855315`*^9, 3.574075320758362*^9}, 3.5740757790247664`*^9, {3.574341432758819*^9, 3.5743414337884207`*^9}, { 3.57434147314729*^9, 3.5743415190269704`*^9}, 3.574501459301843*^9}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-5.049725817200001, -0.91402267168, -2.5171150319999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.5039729483999995`, -3.4179474162, 0.8334447550399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.22233146858, 4.123382132, -3.7660349453999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.7568182872, 0.98713617062, -4.3059296636}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.2769308574, 4.528350413799999, -6.114208473}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-6.8062261342, -4.0861545298, -0.33310200201999995`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{0.068872953796, 5.500047523, -5.7339956018}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-3.5763064549999997`, -4.5270276056, 3.0061761208}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.6592654263999997`, 4.514555414, -2.9160361906}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-1.2626582214199997`, -3.8586315194, 4.1126106938}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.521839347, -2.296961953, 4.674237261}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.2753591016, 0.6256504840799999, 2.3041429118}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{4.8012268482, -1.0379886972799999`, 4.2900559652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-0.35109219354, -4.8598083542, 6.5325938094}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.3990331804, 3.4187033066, -0.136744352812}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{1.9895035328, -3.8988826831999996`, 6.881248256399999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.7193417374, 1.86757841128, 1.8664445756799999`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.47241260273999996`, -2.281844145, 3.200250981}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{3.6643676866, 1.4056726851, 0.5243989649999999}, 0.24]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-6.2432767587999995`, 1.28516485808, -5.6723905342}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-0.24194161978, 1.18512276364, -1.53041349836}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.7222193256, -2.5987511952, -3.6539741936}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-3.6331872076, 5.1765264318, -7.494653316}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-8.0821691294, -5.5542826592, 0.28453604382}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.90209850062, 7.057181747, -6.757093258199999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.7787391088, 5.958872995799999, -3.824805424}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-1.35412095982, -6.117043062, 7.7888836542}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.8095246668, 4.6271830836, -0.9830354652}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{3.2261402271999997`, -4.2413010344, 8.4684291238}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.435779863199999, 1.59507992208, 2.9366342039999997`}, 0.12]}, Text3DBox["1", {-5.6497258172, -0.91402267168, -2.5171150319999995`}, {1, 0}], Text3DBox["2", {-3.2272860577999998`, 2.5212724291999997`, -4.403250552599999}, {1, 0}], Text3DBox["3", {-5.103972948399999, -3.4179474162, 0.8334447550399999}, {1, 0}], Text3DBox["4", {0.62233146858, 4.123382132, -3.7660349453999995`}, {1, 0}], Text3DBox["5", {-5.356818287199999, 0.98713617062, -4.3059296636}, {1, 0}], Text3DBox[ "6", {-7.735983321199999, -2.5583110587999998`, -2.370661267}, {1, 0}], Text3DBox["7", {-2.8769308574, 4.528350413799999, -6.114208473}, {1, 0}], Text3DBox["8", {-7.4062261342, -4.0861545298, -0.33310200201999995`}, {1, 0}], Text3DBox["9", {-0.531127046204, 5.500047523, -5.7339956018}, {1, 0}], Text3DBox["10", {-4.176306455, -4.5270276056, 3.0061761208}, {1, 0}], Text3DBox["11", {3.0592654263999997`, 4.514555414, -2.9160361906}, {1, 0}], Text3DBox["12", {-1.8626582214199998`, -3.8586315194, 4.1126106938}, {1, 0}], Text3DBox["13", {4.1570072598, 3.1382679681999996`, -0.9369072535399999}, { 1, 0}], Text3DBox["14", {1.9218393469999997`, -2.296961953, 4.674237261}, {1, 0}], Text3DBox["15", {4.675359101600001, 0.6256504840799999, 2.3041429118}, {1, 0}], Text3DBox["16", {4.2012268482, -1.0379886972799999`, 4.2900559652}, { 1, 0}], Text3DBox["17", {-0.95109219354, -4.8598083542, 6.5325938094}, {1, 0}], Text3DBox["18", {6.7990331804, 3.4187033066, -0.136744352812}, {1, 0}], Text3DBox["19", {1.3895035328, -3.8988826831999996`, 6.881248256399999}, {1, 0}], Text3DBox["20", {7.1193417374, 1.86757841128, 1.8664445756799999`}, {1, 0}], Text3DBox[ "21", {-4.0160576902, -1.5166562930799998`, -0.5838308476999999}, {1, 0}], Text3DBox["22", {-1.0944468078999998`, 2.349874281, -2.9232171493999997`}, {1, 0}], Text3DBox["23", {-0.12758739726, -2.281844145, 3.200250981}, {1, 0}], Text3DBox["24", {3.0643676866, 1.4056726851, 0.5243989649999999}, {1, 0}], Text3DBox["25", {-6.843276758799999, 1.28516485808, -5.6723905342}, {1, 0}], Text3DBox[ "26", {-2.38480841248, -0.74092377008, -0.27217723577999997`}, {1, 0}], Text3DBox["27", {-0.84194161978, 1.18512276364, -1.53041349836}, {1, 0}], Text3DBox["28", {-9.322219325599999, -2.5987511952, -3.6539741936}, {1, 0}], Text3DBox["29", {-4.2331872075999994`, 5.1765264318, -7.494653316}, { 1, 0}], Text3DBox["30", {-8.6821691294, -5.5542826592, 0.28453604382}, {1, 0}], Text3DBox["31", {0.30209850062, 7.057181747, -6.757093258199999}, { 1, 0}], Text3DBox["32", {-5.291244794999999, -5.9841953242, 3.9002054913999995`}, {1, 0}], Text3DBox["33", {4.1787391088, 5.958872995799999, -3.824805424}, {1, 0}], Text3DBox["34", {5.7073384702, -1.3744733088399999`, 5.625525329399999}, { 1, 0}], Text3DBox["35", {-1.95412095982, -6.117043062, 7.7888836542}, {1, 0}], Text3DBox["36", {8.2095246668, 4.6271830836, -0.9830354652}, {1, 0}], Text3DBox["37", {2.6261402271999996`, -4.2413010344, 8.4684291238}, {1, 0}], Text3DBox["38", {8.835779863199999, 1.59507992208, 2.9366342039999997`}, {1, 0}], {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.7568182872, 0.98713617062, -4.3059296636}, {-5.049725817200001, -0.91402267168, \ -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.7568182872, 0.98713617062, -4.3059296636}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-7.1359833211999995`, -2.5583110587999998`, -2.370661267}, \ {-5.049725817200001, -0.91402267168, -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-2.2769308574, 4.528350413799999, -6.114208473}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.8062261342, -4.0861545298, -0.33310200201999995`}, \ {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.8062261342, -4.0861545298, -0.33310200201999995`}, \ {-7.1359833211999995`, -2.5583110587999998`, -2.370661267}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.068872953796, 5.500047523, -5.7339956018}, {1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.068872953796, 5.500047523, -5.7339956018}, {-2.2769308574, 4.528350413799999, -6.114208473}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.5763064549999997`, -4.5270276056, 3.0061761208}, {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6592654263999997`, 4.514555414, -2.9160361906}, { 1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.2626582214199997`, -3.8586315194, 4.1126106938}, {-3.5763064549999997`, -4.5270276056, 3.0061761208}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.7570072598, 3.1382679681999996`, -0.9369072535399999}, { 3.6592654263999997`, 4.514555414, -2.9160361906}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.8012268482, -1.0379886972799999`, 4.2900559652}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.8012268482, -1.0379886972799999`, 4.2900559652}, { 5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.35109219354, -4.8598083542, 6.5325938094}, {-1.2626582214199997`, -3.8586315194, 4.1126106938}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.3990331804, 3.4187033066, -0.136744352812}, {4.7570072598, 3.1382679681999996`, -0.9369072535399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{1.9895035328, -3.8988826831999996`, 6.881248256399999}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{1.9895035328, -3.8988826831999996`, 6.881248256399999}, {-0.35109219354, -4.8598083542, 6.5325938094}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.7193417374, 1.86757841128, 1.8664445756799999`}, { 5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{7.7193417374, 1.86757841128, 1.8664445756799999`}, { 7.3990331804, 3.4187033066, -0.136744352812}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, \ {-5.049725817200001, -0.91402267168, -2.5171150319999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.4160576902, -1.5166562930799998`, -0.5838308476999999}, \ {-4.5039729483999995`, -3.4179474162, 0.8334447550399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, {-2.6272860577999997`, 2.5212724291999997`, -4.403250552599999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.49444680789999995`, 2.349874281, -2.9232171493999997`}, { 1.22233146858, 4.123382132, -3.7660349453999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.47241260273999996`, -2.281844145, 3.200250981}, {-1.2626582214199997`, -3.8586315194, 4.1126106938}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.47241260273999996`, -2.281844145, 3.200250981}, { 2.521839347, -2.296961953, 4.674237261}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6643676866, 1.4056726851, 0.5243989649999999}, {4.7570072598, 3.1382679681999996`, -0.9369072535399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.6643676866, 1.4056726851, 0.5243989649999999}, {5.2753591016, 0.6256504840799999, 2.3041429118}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-6.2432767587999995`, 1.28516485808, -5.6723905342}, {-4.7568182872, 0.98713617062, -4.3059296636}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.7848084124799999`, -0.74092377008, -0.27217723577999997`}, \ {-3.4160576902, -1.5166562930799998`, -0.5838308476999999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-0.24194161978, 1.18512276364, -1.53041349836}, {-0.49444680789999995`, 2.349874281, -2.9232171493999997`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-8.7222193256, -2.5987511952, -3.6539741936}, \ {-7.1359833211999995`, -2.5583110587999998`, -2.370661267}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-3.6331872076, 5.1765264318, -7.494653316}, {-2.2769308574, 4.528350413799999, -6.114208473}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-8.0821691294, -5.5542826592, 0.28453604382}, {-6.8062261342, -4.0861545298, -0.33310200201999995`}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{0.90209850062, 7.057181747, -6.757093258199999}, { 0.068872953796, 5.500047523, -5.7339956018}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-4.691244794999999, -5.9841953242, 3.9002054913999995`}, {-3.5763064549999997`, -4.5270276056, 3.0061761208}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{4.7787391088, 5.958872995799999, -3.824805424}, { 3.6592654263999997`, 4.514555414, -2.9160361906}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{6.3073384701999995`, -1.3744733088399999`, 5.625525329399999}, { 4.8012268482, -1.0379886972799999`, 4.2900559652}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{-1.35412095982, -6.117043062, 7.7888836542}, {-0.35109219354, -4.8598083542, 6.5325938094}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{8.8095246668, 4.6271830836, -0.9830354652}, {7.3990331804, 3.4187033066, -0.136744352812}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{3.2261402271999997`, -4.2413010344, 8.4684291238}, { 1.9895035328, -3.8988826831999996`, 6.881248256399999}}, 0.1]}, {RGBColor[1., 0.75, 0.5], TubeBox[{{9.435779863199999, 1.59507992208, 2.9366342039999997`}, { 7.7193417374, 1.86757841128, 1.8664445756799999`}}, 0.1]}}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->True, SphericalRegion->True]], "Output", CellChangeTimes->{ 3.582562830564028*^9, 3.582563576557338*^9, 3.5825636688939004`*^9, 3.5825637944117208`*^9, 3.582563848590616*^9, 3.5825639205847425`*^9, 3.5825640747754135`*^9, 3.582564140560729*^9, 3.582564291584594*^9, { 3.58256441431001*^9, 3.582564438833253*^9}, 3.5825645241186028`*^9, 3.5825646260647817`*^9, 3.5825647116153316`*^9, 3.582564800129887*^9, 3.582599445693507*^9, 3.5825995633021135`*^9, {3.582599598994976*^9, 3.5825996196494126`*^9}, {3.5825997266032004`*^9, 3.582599755822052*^9}, 3.582599969948028*^9, 3.582600040397752*^9, 3.5826003659235234`*^9, 3.5826007532410035`*^9, 3.582601399815339*^9, 3.5826017148266926`*^9, { 3.5826017564943657`*^9, 3.5826017799724073`*^9}, {3.5826019546927137`*^9, 3.582601977562354*^9}, 3.5826034541517477`*^9, 3.5826082005539503`*^9, 3.5826082921417108`*^9, 3.582610888876072*^9, 3.5826109567985907`*^9, { 3.5826110038326735`*^9, 3.5826110779016037`*^9}, 3.5826111126740646`*^9, { 3.5826111573213434`*^9, 3.582611297331589*^9}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzlvXdcFcf3N/7+2mPySY8VBPWi0hSlo4DYECtKU4pSFLAg9ootVkAsiAVs WGJQY9TYYldUBLHFFmPX2EuK8ZNoivxmdmcuc5e5K/k+v+ev575c4S6755w5 /ZyZne0aMzKxf1LMyAFxMdb+w2OGJg6IG2HdIXk4OVXxf4D/SaSHNejvJQD/ r4T8KxlA/6Nn/u/+/rvyoyJev36N4uJi3LlzB8nqn14qP6oY/zRlyhTMmjUL 8fHx+P3334eoV/2q/HjH5KqxY8ciPz+fXoUXL14od9A72S0/Kz8qK7fs2LFD uSUrKwv3798nlNC/VVJuo7fk5ubi8uXLSeqdzyQkCciqsJspPgogJyeHnh6s 3vxEgzYjI0P5SdG+w+6kACnVFODGjRvZnQ/10b7LAPObKWr6O6Ebg1QI93Vw v8+g89vpNz588n2gCuGuPg0fsj9v2bIFV69eVb7RgyIhlzAgtwUyKGcpGVxQ nyh/q1oGAh8NvYYpzQ19Wj5jOiVCqsDO0cvpwOi3RBXaNR2iarHb6Hd6q/pN /Z+zmH5LUEFd0SesDruT3kUZI0ITOM6hXWaEPXv2TCFMVGtLCahKArFEeZRv 8SqoC/qEWelAE7WJQftOh7AGmvGoV5YdY38V1BkzhFFs5DKDBFoVdo4SymXS T4V2SoewxjqgRB1joIr0CbNjd1JT55rKoYk6FqdCO6FDmKOgT9z+qkp0LFYF dUyfsGY60ET+M2j5OoS1YLdR30j/Tr9Vo/9XoJcwAIfMkEM9CwHiIrHFahqu 00tjVGj7BWh0QBqS3CXQ3mHnbt68aRxctAptrz5tnhLjri5Rrr4qtN0a2jQ2 1EqAxm2oujBSFgw4tJ2C1+G08SDkKzHHdyXK1UcF9Y2+cftJoL0n0a8oFdpW HcLa6YASlYuB2qxPWAeJRf5H4D+9jH6LVKFt0iEsQAeUaNwMVJ4+YZ0l0N7X qBn9FqFCWy8Qps0nukv8xPvCGLmOhaug1uoT1kNi3O8LxHIdY9BW6xAWLAH1 gUTHequgVuoTFioxzA8lOtZLhbZcQ5iYjvTWASXqGAOVrU9YhATaRxIdC1Oh LREI47kAvYwi7CNxFx8JhHFOMlBZ+oRFS0zpY4mOqZxFpoQw7qfjJKA+kehY iApqnj5h/XWgiTrGoGVoCBMDSCK7jQYPqnf026cCF3mSouoi0vQJGyixSp7q iToWpEKbzQiTRbYkHVCijjFQM8wQxkLuUImNfybwn+tYTxXaNB3CRkisUiSM n2egpugTNkoCrYbExlW3gkk6hI2VgKrJzrEaSfkWqIKaoE/YeIlV1hSGyXWM QRunQ9hECSgxa+c6pjpijDZDGEsJJktsvJaG/3QMDNoIAZqEuM8l0GpL1Kyb Cm2YPm3TJYbJKwpRzbqq0IYI0CSp1CwdaKKmMWiDBTPX0pYmAVVXomZdVFAD 9M18jsQ2LSRmrgZpVivJs4J5OqBE/jNQ/fQJWyCBxsswUdM6qdBidQhbJPEY Fhrm03EyUH31CVsisU1LyTDVJIklZ3LCciSg6klCSUcVVLg+YcvZnWIBUU8z TIqFQeslEKZNV1ZJzJxXraKO+augQvQJWy2BZi3RMTVDZWFAnq6sk9i4tYT5 DFSgPmHrJaZUn/6vlFwMRjcz5FA0G8wB0NRb7VVQnfXJ2SSBxgt8sd5S6wKm YPIk5WsBFM8FGko0q60KqoM+YVsltthQOMcDCIPWToew7RJQvO0galYbFZSf PmG7JJbNoYmapYJhlZ48su0RQHFb1PZD6HkGqpUZwljI3SexbBtJ9GitQvPS IeygDijRrBkod33CDktssZFGx+g3lVVw1SHsqARUY2GMXMd8VFAt9Ak7rgNN 1DEGzUmHsEKJk2gi0TFvFZSjGcJYInBSYpW2Eh1TNQL2OoSd1gEl6hgDZctA ie0PRhTOSkDZCcznCtZSBcWH//jxYzg4OCh/Ps/OifWCnUANVywTEJVw9uxZ xaLpn8+cOfOdxKDtJQrlJUKprED54osvjIgIJJyTgHKQKJSnCKoKVq5ciYsX LyrfBHAcmugb7AUMXKFMoFU1gaaBaGS6aIqcQDEn8TBlOpUbZTz9VkHDYAr2 jASs2KbkGuZuCladPSrBq1evUFEC9rQOWFHbJGBDQ0Ph7+9fpitNwZ6SGGpT iea5qWC5DVMGUJB0yknbCKZgi3XAitqoAcv1SBVeWbDcekVfwJu2oi9wNQ9W 20ClYIskYJ3YObFAczEFKyrXOxKw3HOJVu0kXMd1VgNWVLDqErAnJGCbS/TW 2RQsVzB6vCsBW6ADVsyrdcC+JwF7XDjHxdNCc660Yc6iVyWFAZQR1ByIl9T2 IynkYxLIzhLVbW4KmSoD/QwZMoQK+30J5KM6kEXtNYGsqllqaipevnxp0nXT ghV9GAcraq+TKVhRzbQ9Mwo2X+IZXIRzXHubmQf7sQTsER2wouA0YEXt/UQC lqcsYl3jKtHepqZgRTX7VAL2kMThuGquo4xgYHnKRSmNi1ObgDUkYA9KwKoi M60BqUipzpmAr2zieLhz17akKJoDZh1QNd3JeSIDE4xVjBgppiNHjii+n0hZ hnS/xODNZU8MqXbCtfQW45CpWtEPjQ67du1SjKGmBPs+CXY7fezixJ5pwFZL dkVL+HwppWP/fnWM2t4Mxb9Xgr+xPv7q5vHzqlVUU54ciBZRV0IJr1XEzM2g Twl3h6JaMkoUXlcSOSGjSTynbZ5Qmr6VCLq+Pk3c44k6XA7uiOcsJZTsllBS T58S7nZE0TJKlDsrUJw8GeKBhn6z0sEvOu06+vhrvAW/ZtTcqERnYS2hhJfH ovrV1KdE2zAVKLEyckKGX9v2oPh3SvB/qo9f2zAU8KsaXskYhqjDIr5ChniH BPFH+oitJbfYmyKmV3NHRdLYBhLEvL0hmtn7+ogbvg2xKnvuDwwSrN9IsL6r j7WR5BYJVq5x2oYDxbpNAqKaPlZe7IoWz7ByNojW1ViCdasERGV9rLxEE61L g1XU5CYSrFskICroY23277DaSrB+zXjKQZjBpE2OJZjE1E1b41NMXwlj2bNn j+K7BAyu/w6DvQSDuUUAFBsByVeHiFZgZ4qBR0Vq9w4SDGpv2PzaRPpXPoC3 olPioZKb06yfWLsMY66+BlSScM1DYjQMcQOG+Ndff1WQU+0g/k1bBFPEy/UR 84pVjEB8MY9oNyaITdXRSYJ1qYCVzxiUWRhpylOOtWzOJsWqrR4p1ix9rO// n2NtIcE6Xx/rRwJWXpO4C2C4uDVYRSPRlocU6xx9rLyMEZWHK5Qoa1tTrGI6 6SLBOlsfa00drCLXNVjF8KGtqyjW6QwrZZ8EK8/ARX3lWGnOyynRweomwTpF H6ulDlZx/AxrfWayvCik9RPRKncJ4hR9xDz9EFXWQ0KMBjFvTVBIxEl5SBCP 1UfcUAdx2T61Mc0T7cdLgnWkPtZGOlhF+9FgFe2npQQrX+N2Ii/fqAUqqqrG VQMSaso04f8X5LSSkKOUn2okUWOB8OGl6YHc3bi9Xq0ZLEqvr2hyfTUm7rlD 8hBocMWUiHhszcxuWI6hOUiGwaOfONfVxHRotAvAfYa3uaEJ9iYWSGVLlcq4 dv4ORnhnIcLghfmE+kOZ2cYyUoRRUQKjMhvmzh2/INCmD+FAJ3K0RJDBGTMI rO8LTxnvO1VQgNMFameyZjnY00yHPaJz07BHJI/ny3cv3caTC7cF1PosK2WP 6blKzHT6xxxFYOP+ZKiB6GVohUFkuPsys+uyi8RbSlgrQ9WTd5G39Fuk9Ekn t4aRox053AkIZ6yauwAulnXQycoSoQ0sMLV3MCvIKku5VNEoEuU33rf/NncX buSqOsv9hxh/ZB6TMZD7OTHNL21AKCl1hdJWRGVcv/gA0zw/x1SDB44SnblL ZF1e5soaBlWYTuQt2YNAuwGEMyEIMbRGf2JV3xL4twn82pr7jJRJBfWxVhK4 cPY68hbuRGCTOEV4brUt4F+jPiLr18cA+wZIbloPy6N64zTBV0iOfHLsysxW e+HvSQXBJkmRMy8DPpZ1MTo4CBeImhst5l2FihuE+gsE2sMl2Xi5NgdH/Nxx s7M3nvdpi1fDA/B6eTZePX8MWc0pCs101tQoNNHp12ICEpmkx6wKjPHXzz9H TNBGhNvGYbChCyYRh7CeGDEVrKyfWkUKi3ze5bqesxeBTZMIpyPQ09Ae0UTX swjAmwRgNmFXS8KuMSHBWJ+RYWwvl0+yMlNtjjOEv0vd2+J8a2f8HOWFveEu mNimKaa0aYb8uOHI7zMER8IH4kgI8XKBMTjQKRL72odhT+ue2OXdDdu9OuFr 947Y4Noea1q0xdJmrfH94tU4k74YmweNQmZgOOZ0DcbulGk4npGFAoLvIDn6 E5H7WVkh2KY+optYIcZQS6FPlDP9UDm/mRaMkgV9ULKSGGVeMv7ZOhovd07A vZ1TcO3CKZM1Elr5iyvqdeRfW+KGzHBT5Vw13Hj4GnlrDiKw1Wj0sk9AoqEH xhu8sS4iAcczs2Ud5wrlx6KaT3Xk5e5DSnQmiRTR6EEiRRvLxvCqWRtBlvXQ 19YaMfaW+P5kwQfMHWggm2IoVe+TJwqwfG4GzhKjU8dTR/kb9Rl3FmVjr4cz HnRzw+uhPihJ74yS3Aj88lUiUqP9MLCDM5I6NseGxQux+cuvMDdtARanZ2Il OdamZSIvNRObZ83HtpnzsGNaBnZPTceeSanYN2EWDoydrmg7GdiRpAnIHzAG +f1HIj9mKPIjB+NIr0QcDoqDXx0DulnaoEdDO375thiSl60g8v9yCP7ZMko5 +4DI/8RXU/DXzSP4+cZRXP0+n3c7xNkVWf5nogpqE27BggVKnkAclNZlGq30 He5vvziAlEHZCG06CP1sQjGG+NwZBhcqd+nsTGkkqGT8raoxEKn2WQMXztxA Sr8s+NaywgQrO8xq2ggpLgZMczdgg48LTrbpgKO+7bC3VRts8vTFs3Vr8SR3 NR4uX4l7S5fhNpHc9YXZ+J5Q8R05Tqq2Voq8ovE3RuUpogfeVhYItLZEr4YW mBTaExfJXacT4pWrXsS2xJsp7VGyNBh/5sXh6qYh+P3qHuzbth6JffvC380B PX0cMDk5qhqzI+7vs9d9gWFTpmHUlKnYsOUbHMo/jqLCYgXsOfLzPDk2rNuA 1NR5WEhUJ4ccXk1cENDclTg/N+L8nJVrN6cl4xci3BtXjuLWvVvKOT7vL6vh xNRHY/BUytTg6ZRMHY2IzdlhNSbxC9/dRMqQZQh2GoKYRuEYSfKQaYRMKnF+ H7WqFcyqZNOqqr+uawL/EvHrlwmM3S7OeNzDDX+PaY39A70xuYsLpge6YfvI vvhxaRoeLJqNRwtn4vH8aXiSMQVP0ybh2czxePb5GDybPBLPJgzD09FJeDJ8 AB4n9ceDxBjci41izuZDfOcfgOI2/jjm2x77vNtgi2dr+FrUQ7B1A+J/G2Bw k3oY2bQWLkS2QMncrspdP301AHcPZ+HhlX18LuVkcZGRdJ7I6kX40myLdzXj wyLg29QegS4tlOQ/SJWzLHW0/9+JWWwQ8PkBXb9oirU6i8QXzhOJD1+Gns7D EdW4L4YaOmIKydva17VEG4u6CKpvid4GC0zpHSSVtjqn7KjAplF2vZMz7gS4 4HUyqUDmdsGf6/ogf244JkS2Rh9fB8S2d0T6TJLLFxfi5JmTOHeuGJe+O4Uf zp/CDXLcIZHuHjkekmPV0vn4avlC7FqVhYO5WTi+OgvFuQtxLjdTwffDyvnK z9s5c3B3aTruL07Fw6yZeLRgGrrYNkOcqzOJWY6IbepCckVf5dpNg3sib+IY 5ff3zIiWulUu2sryYMZT0uxFiyB+gomcJweHYvW8uaov5UYs9gNktUpjU+mK 6GpJPNu7pudoSpV7ED3cR5Lw2RUuH1uhO3GvcTbWGNqUHI4WWB7ZC6dYWiJb wcGXthRT8yYp2Bpi4irs/yjJ7olY1Vn+N4EU8bM74p/ccNzaMAC/XlFriuyF WWjlbI+OLe3wJRHYx+xePpIdx47i8MkTOHG6CGfOFhNXcwpeREiBnkRIni0Q 5tsbga4j0NMhgY2/IpKI69lNcO8lRxVBWHQ9kkxY1eTCeoeZR0rEOLjWqQuP Gp+he906iGhkiZlRwXWM1ltBY8fVFMd3KysbP60iCZuPF+5ED8OvB/J5lPX6 d5K0ldNXieUmg/oMRvM6TTGuQXNs9LLHTD9bpLW3J9lqezwfEounCX3wKKYX 7oUH4XZQN1zt3AkX2/vjlF975Pu0wQ4vX/y0bg2e5q7Co2XL8eOSHNxamINz JOjMDQzDxrGTca3wFOckDYutaFisXw/hBkuE1a+NlRF9cKaVs6q7hLA3y0Lx bGM8Xl3ZheePr2vjSWmmWAOniorg3cwe3T0dEeprj0nJkcjbcAR5q0n22GY8 cYXDEWQfjzCbXuhjCEC8wYcI2FUR8O55ixWh0mVYGqG+K+eZivUT4+nLJMJQ YV2i9SDJDh4vy0FMg/oIrGuNOEMDDLStj1EOTbAiMg7HMnMUlT7MzIGq1w/k /g8ZKmoCy4kBr5s7F+cLClT3WbZkPEJuo5/nK3NwwNsT1zu1xvO+/ng9Mghv ZvVFyeIBKFk7An8d3IJXT59odabsolnjzLRYaNvp6Uwt5M7LwriGTrhIhPbf MZ4YQ6JpSrA7Vo6LRfHahThPjitrFuDm6vm4u2ou7q+YQ3iThmdLZ+GnRdPx y4Kp+DVjIl6kjseLGaPxYspw/DphCH4ZMxA/DeuvivoD3A0LxI3uXfB9xwCc a9sBha3bItGmCXrWq4++JLAmNa6HGa4W2BbqQMbdU7nr3uEFePn0mnG+XxwB L9ZOEqVZlrMIZ4hXUM99hAvf30Re3hGkjF2BwNZEcZyHIciuP3oZQtHX4I8E Un4MIYqzjRRa+zLVpxujw9fAs+EMtCXHuswjxgr0IhErbUFcVBIY+vHFz2tW YFPLlij088WVjm2Vs8/6dsGLgcF4NSoCf0+OxZtUIrsFySQlHIlYjxYY4O2K JG8XTO0YjLldR2Jex2TMazMI873jMd8jGvNdIzC/RQjmNuuODMcApNt1QGrj tphh05qEU2/kRiQR9VxOVC/bqHoHyLGHHFcKTxnTVFdij/5W9RBqsEJkY0vM 6xWGqwtVPdvdygM/BJCEONKfFIw9VH5mJaJk9XCUfDUer7dPxZNdM1CwaRpe 3TyOR9eO4+L931TzYFUBVz4xHGmUTywYzShfRZ4uEsqnkoh32Zso31hPpPR0 QWRre0wfGsU8qCWu3LmNg0UnUHimSAn2l0mQv06C+20a6C+ewoHtm7Bu2QJs J4H94JosnFibhTPkoJ+rRHFv5c7DjyszSPqfjic5s/F88UwluMe4tkCIXRP0 adQMnzd1wuCWlnj4vbrKRpF0HTntij/h/Vrqc/hHVY+aCPQdh8DmyUTl4ojK BSPa0AEd6oXD5bMp8G+0HuHN1iHGZS4ursrDhWFDUEDU6Hv/tvgx0B9Pozrj xYAg/DEyHH9PiiFugIhn/hCULBlB6vpxjJpP8Gx7On7cnoFLWzOw/8tU/H69 EP06t0dnomq9fF0Q09YFCT39sXdfIfbvLcTCxXlIGjkHI4ZnYOzQDKQkpWPK gFRMi59lDJZzQsYjI3CMMJbqmN+qH+a798V8l96Y14KobrOu6FyrAVp9ao3u FvURa7DF5Bb1KzAQJZkJpAgeipJN44wR4Py2mfiTaNPT68dx9nw+79mJy5h4 PlN2kZV5pSrtUjI9mkH06Iov0aPxXijcuhyrly/C2pWLWAn3vkINz1V2Hj+m JJDFZ0+SPKIYno2bopu7M4Kdm5NsOwAhxDuMJfDuFp4qXQqkJj0NlQSCfmis oR8ea7ie8J8XLt1C3vrDSBlJ3JD3WNjUWoKWlkuR3cgZ89uvwMSg/Tg4ejap 18fizdqJ+CdvKl5vnoGXW2fjp29INkrke2VbBo5tSscfRL6/Xi/C42tFCvxz F5Q2IHNTlYnpF8HV3hYd3B3Q3ccel86dZFlLbVy4cVu59puDhdh1oBDf7i/C PqIX9JM4MhXJIzMwiujF+OQ5mDQ4HVMTU+FSzwHeNs4IaOhIGOKMFEJzarCT cs/fN4/h5xsFuHzpmHG84kphXm98bCqm0mqeKAWNmt8OnID9gVPwz+3rn75N ASqXWaJPFwSo6dA7ZQIrVYdZhOqrrZ3xcoIX/rz3HStxVPsR0lbepjpVWISW jnboRpKPEA9PMuhgkgl7IZGAIT6XPyjAk0f+hBOVPf0YizhpmKqOxF5fYDoB dbODM7YlzcWAyB+xMfsYnhJ53vmhkIzsBO4+uPOOkVGfSYCZb1pWQ07GArjY OaFTczel8U+FFm/fzDTay2p2+RPaoi5XYAWCeC/NeK5n5WCTmxcJ6e3wU/9g /Dm5P3758iBKHt436e5w2CYCrWKysoNaNm0qEdbaGllAhE4FmUZGcs2PCDKl pSJIbQ9arEG4NItJVrCcZAW5KxYRGD+QxP1zwpE2iCCwVkTEGwRp0iAmSpOX Aubb2fK5rmEE9DlSijyb6ofOnR+jU9fbar37r8TJGwj9I6Lg08IeXUiQ0lQW vPYS515Udn9YxgXtYhnmehdPXOrQFs9je+LPSXEk6g/Hm/WT8AfxzTe3p2J/ /jky6NdvlZrKdf6gCF+3a8vYmRAajPb16qKrZR2E16qLG22J1Ca1wuv751nn 2LTDIEiuKgOfEpGmzPQFk8JtFOHoHaIAVuWQVnkXsfIO75yIeBxu5ozfhnug YNdpLF/7m3Etvni9du7AHFxj/6vwrNKWU3xmWB+lClhLCmFSBRg3SxFrPS5M 2hNbRq47wzvNqgW8hx00v2NSvNCuDZ5Fq3nbm8xhKFk3Ea+IBO9sT8OrGyeI IzleW4JDnQsXugAis6j8jDGVDCCeyLCDtRXCDNYYYF0Hw2xrYKqnRakMTdaC lp2Mozb7PfOeLUmJ5oxNhNV1GZP0REiuqIxS8vjH1AtVK+PrswcvQUGHKPwc 64p/7p7VPidlTmDvCALzt3ZEsxqfon3N2ghpUA8RNhb4vqjAZAcfzkw+AdUv LAheRNc717NEkLUFppDvN1mT8mTiIAXXkz6BeD0uxphg3d+RhtckcN67WmCs aSSCEiMVJ1fguVjbqW7lfRzceARPL9zGVULBEdbSpq1t2uK+TgvarGzcX0KK 2uwcPFuxDD/nLseLtctVJfsPDvm0xEk/b3zXlhQ0Hfxwo1Mb/Ni9HZZ5OCO2 kQGjmjfCcMeGSHGxwiS7RrhltEqZClQjTL1qdLnhBhcsIyqwbcFmLFuQj5Xz 8z8tt0FXMlGBkjJdLL6V4J68M1gYW4RXO0/jvydym5heYGYxRhVGrbNFHbh/ VhdBda1IeWiNgXZWGNLEnpSInoSZqyqQ/1bS/1ZUIFXX8orkv2UE2CHy//BB g7Fn3hLye05lktLkVKQlWQXsJxx/H2OCe8GFeMH2dYg1NbDGEFsrTHS0QHFX X7wa0xdv5pG0fs0EhZRHRDP+vKGkdHyxQdlndd+mGGKKXMUYLkqZpY63Pr7d WIwtISvxiqQMLwf1wO9Dg/F6ZC/8NZaUrhP74J+p0XgznQSJ2STAzCFl7LxB KFk4REWbTUrF5eq8UsnqcShZOwEl6yeiJG8y/tk4FXlDIxDv64Zh7d2RTMrd yW18sdK9N3Id/bHMpiXO0kYgOWRL+LkPVWNAZwQ06IgWtcbA35CObg6Z6NRk BvPR+qrDG5FvcwG8xF/99XOcvPgAv/36k3FliHidyt+y7Ru6aoC29o55ueFZ bz8MdrPHsFZOGNayOdK6jibHKKR1GYn0zuToNIIcw5EeMLwC0jsOI1JM8x+K tA7JSG9PjnZDKjLfl+43GGl+g4xamu4zgFCf7p1Issj0VglIbxmPtJb9Ed2k HTxqkozfsjEmG+ww1dsWczo3Q/7k3hWZvt99cEskWFECbrZi/f7v1UvL4lIH LWOdDbauuY9vch8SHb+Ll9tS8SuJWD+REvbp9jl4uCMD97bPJXnIXFz5Zi6+ 2zoXhV9n4MCGOWqEIqXPi+tq2UPT5UfkuHe1CLeuFOLa94WYNXUCOpHEK7wN LXudMbBbAEbFzsKs3pOwsOtwLPeNQ26LQKyy9cPOiIHKAgyaVtQqdQ0VFf0r HYjRW1RXolmEZRja1c1FpMMGxDmvQ5xXLrJjUxUPS5dy3Cg8xcOJqJfUSYt6 +R8hhRL1iH68zDJPbYBTj3uT6Fq+J9G1MD/8k9KD2GIc3mwejn7+7ujXxhkJ 7VpgYI/2OHCgiIzhwP6iCjio/Edqvdo4RP4/RDsBOXkYMC4Vg8anYUCSasnJ 4+Zg6LgM5ffh4+ZiBDnoZ+TYuRg1Zi5Gk2PMmHkYS36GdOkLl8aupER2xk57 cvR2xshOzbBrbZZxEb1YxpVPuWTPyL5NuXhNs//MC1x69EtpeBa83UcoLijC gNi+6OjhgB6kMk5JVjdn2bDjKHbuKMDA+FRM6jMdGcHjsNR/EFZ6RBBv1RHL G7Ui3ipHEbC6RKWhCUXcawnBSZHSD+T6goQEnPZ1x+Ng4uqTA7A1ehGSOl9F UpcbGNG9AIWxyTgRkYiCntE42jEMh3y7YY9nR2x1aYu1zXxwY8kqAmcZzs5b jK9Gp2B2dHwZbfrwrdpUZrUYzykPESV6Gtoaf08gSrQ0Fm++GkYi0ASSQx5G SIAv2jkTVrVyRGhrO1w+V/Qew0QjkkZ8OkZfBacKTqBlfTv0J5pylmQSnwc6 IdKvCV92+X+mJFWNAzKzWuQT+Wl1CvI9XLhyE1/vLMDcjC8xMm4WZvaegoXd RmBZ637Ide6JVXZtkEXq6NPq8rNPGJkcGo1bswPDUJgyWTl3s2NLvIhri38m dEfJ/EgSGxMV2/xj53isnPYNwrs/RUTQM0T3vofMtEzkpi3ExtRMfDNzHvZ8 PgcHJ81G/rhpOD5iEk4MHovC/sNQGDUQBSGxONYlHIf9emCfVwB2uLXDBqfW 2B87BCcXr8e3Ixbjv9du8wkqrXjYT5mU3Jm90A9dQUZXRBzwcMOTYHWes2SJ qhhPiGK8Jorx09NbRkFkL1mEVcsXMf9UGlA4/NKlFLwoyCNsTCF68GNX4i0G 98X5s0XS9bdlahVu5OJstZlZOtkoP5Jf+jEb/MWrd4kOFmBA/GxM7DtdaYEu 6ZiElV6RyG3aCSsae2NrRIKST/OqqZgtXyhNIT5RUoFr5JqixAQF1ZMQYvhD A1AyM1RF/WUS/v5mNJ7vmojHhbn47cYRfHf+ME4W/QEn1wdo3e4hOnZ5iFHj HqrDUCn+AJmZizFzygzwz3KiN18Svdk6az52T8/A/smpODJ+Bo6NmoKCIeOx JToHdzOL8OuWdeoMfWkWrDCGP/WwaMERJRtfNS+f8a06rtNBsKmCx0G++Hss 0eXFMXizaSie71AT1V+e3qrBRCq2PMvjplNIEZBDVODFzESTZ4U0opc9+lje iPCxccSqJ7HCV8TEM4iJD4+bjRnhU5DZfRSW+cVjlUswcu3bYomNh7Lq4Ecy 9oTQIHSwslDKudD6dXG5UF1RTCe9HyzOxm5PV9wKYHaeoto5/XA7v71D9QUn D64nqddNtkKiNCegH/40Id3RpXQUpr21y7fuYO+xQhw7UUyUrRjfkWPszH3I L3qM+3dusQ2XqipTVi6GeWjbKBvdbDMQ1mgU9ri54lEPXxgb8huT8fOO8QwX YOye/VvphRHJ7SLh/q8d2cbV5WLtqj4ryPL60mcj2PPlsnJEfeynJi4QG9xO xJRAbDAlegbSQyZgccAQrGjZB0kN3NDuE0v0srRCv8bWGOlgiYkOtXCkTQuj fZVkxyr2RT8/Eft6SuyLfi5fPGIyItMitWyqRnNbU7GUcRs+RtM0v2K9Opo2 XA0vmwPo0GgT+jqQQbWcgP3DkxVZ/Er05O8bh/Dbs1sWpuZpsgCa+pi4HoHw +OQTpDVsiDe3TpeH6/zBENac8zblOnEn1BzmEHMY2m82XCzs4V+/KXra2GBi YzvM8GlECogmyE/pQuro8bizczL+unkYj6/l4/7DW9Aujaso6bya56qsQW5O 57wl15lvrlfDyRPX0axhITztbqJD80ukePRQ0tPUTh1wcfdmsVPBnQ1/ZJVP mfrVroOetWoi2qoGZkQGcV6LRbgJr0vLIdpA85MQxxnSLzQKre2d0M3GCamE qLU+zTGmkz2ypiex2PmO6ZY4ZpinXRJttGgZckVHqzDojg0vwNPtF3TwfoRA myhlgivQ4KksNUolTvk6X/3O+yScUezD4ewkfrCzpTV8almhex1rhNW3wgD7 eoi1tcXsyL7KCgj+mKlYXmoYJ+64YJ5xVZQpLS87W6WVSueIF7o1RYSvzQfM RDjP+O6FpTwqV2Lgx8CI7OQ/qzKnTKNzU+cH8G7zEB06P8SY/psJA/uyR1G8 lDV5swgDr/FqEhYmcCiJ/Ps3rIdL1xFsjxmEdS18scerPQrbdcWFoN6Y79OO qIgjqS+bI9TeEVGOHuhp6EaE1J7osi96GVoi0uCGaILzawJjKzkITL6mW0ym Gb8V66hKcX4scJ7nz75GQ+Yp2qmTJ+Fv0wLjCYZiUkefP1NobIlLtqeHuEhX JkdhJfC7KDrz2vgHeuRl7URgo2jCxi4KK3uyp3rovKDa1DQoQyxgbNsWPQir m/sovxe07YzzPcKU3+8MGYz7E0bh4cyJeDh/Ou4vTcPtVfMwPzEOHd08Eebn hRAvV6I4HRHYPgWBLccq64gCmw5CoG0/QkMkehiCCf4uhNVtEWrwQW9iG1EG F8wk9GwpZbX4Ogg+cc1YXVlHmfgMgpjAtpawi9s3zZRHEG4UeTlDfOCUu/xu OjqusFw1kPeQt2gXAhvHEvZ2VR6c6kGA0lJsL1vxQp8q8bSsi/Xq9ISqBnUV Kz7G2sfXFq/ASidv7PRsh+NtOuNcYCiu9o3B7SS1P/Vweory8+bCmbizUu0Z nPkyC3u/WIBHl0/hzuVionBFuPPgDqkGC+Fi0wRtmjsg0NMRvXwdjI3xvK/y kfflEQSGTAYvUgM9RiOw+VAEOgxAYBMyDJtwMoSexOgCiKT8SELijXD7CGxt MxYPF62RbWHBpGPGK8imdmR6XFkQDH0a67irXDDdTe1CA0WVSn3kLd7FHhHq Tg5vRSoOn30C31p1lHV0vW0sEWFTF18vyFTW+Zwjx9VFy5HTzBvbPdriaOsA nOsWjB+ionF70EDcHzsCD6dNwMOMaSRJTcVdIoZr6zJx9kt1YvrxZTXxPHv6 KH58eFfwb5VQXFiEHFLKrV6+GGtXZpkPz+8pv+dtIVLaSI4vDiOwx2QEdpyE QJ9xCHQbiUC63tt3L84s+gG/HjnJl/mV3aKzDHPMOeiPJOeU/Et45k0VSgJh 4SGnUqGISPsY7yjb/1dP1ETeEiISu37wtXSFw8cWaF2jHvpYW2GYXQNMdCIi 82uJKyS+3Ro4APdGD8fDzyfgUcbnhN2zcXfFXFxfuwDfrV+Iw+Qo2LMJPxLN v3LppDCyKiaj5Y4UMC6IfhszKjFNzNt+BHmb8zEz9T427HmE67fvGZfoi7oo 8lr7aKnIXHEuqZPA0jjqJxzkLO1rNmbLzr2PwZED0amuIxbbNsMIZxtMbdcM Mzs7Y2Wf9rixZgEuELYdJUfxvs24R1h3lbCu4MxxbYOnorH/RD//Mf61NCOV 7W7CGCGbEuCxTexrizzoS3iwo8n/Hzyoigz68GszZ7xKaIV9Sa0xpENzDO3U HEvSxxijc9ndY8qVyDQ0P+rSSP0xgydu+0WSpgB2emBIGJyJE2rz6Sf4ck46 f0eF6EujyzliPk27ioyYLof4a4Qf/rs6EmPCWqGXjwPC/Wxx6WwhH7SYJ36g Afe2EYv3shFbsAGJu4uRSzoyK6RPBrYiIS+gRi0k1K2F/o1rY0ZU8Ptmxytv ofJVJnyZ0c22LngzqT1K9s1E9mLiT5ctxhcrF8kWNb1n9Edl9Va8zmQ8avLA c+ZWRhDaB2erKXO/Ixs0Rvd61ohtaI3BjawxyskKSc0ssHnRHN6rE9fe8e12 Fi3IJyn3beWbG3M3msELjqSysuh0aWNnPO5Grp7dGa8PpRm38RdH4iVhrmZ0 dD0JX4eg1n41tJqvrMMtZMngs+XZ2OfpjivtvPEkpC1eJnbGX+NCEdvCASN9 miHJ3QljPBywxKU9VjZpjUySN59S+7jVJRTyLelOFt5GM8MM+DZMI4lwKkZH rlH3sNAku+RSuirjaztn/BbhgZLMHvj90jfGwfPddOgOhS3fPnhxoOrlFkpB cZYN9kRiAo628lAH3rsdfh/cTb0nPRYlSweiZM0IZbnl399Mxstd09HbzwMJ /u6Ia+OOwf4emBX1ORb2HINlHQZilUc4cpsGYEVjH3wTkYhi9dnnKmaZUoUU j3PhVW85ujfOQ0iz9QjxyENK/NqWjGf0qf58J9Wx/bMsFCVPrrD8vVqZBy34 E/j0d4KK80bcj0A1beP2d2J4cmXaephkICey1imF1L3F2Tg7KAHF9MGKTr74 uU8HvBoaqPJnbhxKcgarv2+egL92TFF+v7NrFn48sR6/3aQLMY7j4eM7Sqnp aW+Hru4kL/V2RKSfHaZOHIcdu04gcUAqJvSbhbSIyVgUOBLL2yYg1y0MuY4d lDmiLaw9TKvoChJGKu1SMysQeHZFn24rohOJC3NwImEAkbc35jYfTQrBgwh3 KUJvt6MY1HQoRtgF0D0UPJhsqP9ZSwRwnvjZv4mf/Z342b+e/sDf8lee1W3i /rKyZ1E0AhFjpY2pHxJaDh9h++rj2Bm0CL/PmIk/R/TEm2mRKFnQHyUrhqBk /SiUbEnBnzumKky4uXMWbh7/Qvn99g/Hce/hbZTCqqSs5VuZsxjrVipZqsrE /2DT7uPYvfMEBg9Iw+TYmcjoPRFLug7DitZxWO0chFz7dsi28cKZzBxsSZmm yEM10VomEYb+3MOe+7i/dJly7ryfH+4HB+DFgBD8OSEGb9IHE1sbjZJ1k9Cr 3T2E+T9AzzZ3EdkkGomkSB9OCvTxBleler1VeKoFE0A2W9DFVzHebsfjxAwW katKN3PiQuJ2Kb4GgC+VFsO9jpD4dtlad8p+qhjexdfrH+NI7gO8uXIdr/bP wfPdM3F1x2xl3TZd6nvjynHcZE+VmumNfsx0efPuAmTM+xLDEtIwLXo65oVO wNLOyVjpE00q+O7KNPxig7siF1JnqspqqYQT6o5uEhOgn+PePrjRqT2eR3fH HyMi8c90dWalZOV4vNnwOV5tnYVnO9Jxadsc/Pd6IebPvAQvn4fo0PYpunZ5 gMAuS5XiJMQpCX0aR2EAKfBHkHprAinsD6liYo/WVUO/0CB41KuLjvUsEGRR B3F16uJpdxLWUjvjz0NpHwiiMrejCF//fPDgwTJ7yYh5ikZUYkeGb5IuC7q8 3Cn64SUe//Ybu7KkTAqszs18ggtX72Dr7hOYPy8Po+JTMbPP58gMHoucjoOx yisSq5t1IZHRF/NLI6Nyp9IOJZzoQDjRjfwcHxLMvNZ7ytMmdHXb3tgE7HT3 wsU2fngY2gm/DQzFnymxipHQzxtiJH9tnsGX/98t2IBfiIBuXjmB2/dvqdA+ wOKlv6GFzwMkjXqGcxfU5lDehsNIGbUSPVqNUR4Z79soglTcHTHK0FKZPORy s2VyU5u3lmhvZY0gS0skNaiLaU51MKt1Q/xx6Zv/SPygVm485xQ3gpZtJKYj t0aaLMw0pKsbudXHuo3bsGhpHhISZ2N8/9lIjZyCrB6jsax9InLde2M1DcuN vOFesxY61rZAWAMrRDeuh8RGdTAvvAdWtXDHCWITtzq3x08xgfhjJLWJRJQs HI6SVePxD7GJP7bOJjYxR7EJ+nl0rRCnvztq1CK14nkHeV8SPo9YgR6eoxHm kIgYm14YbOiA0QYvhc/02SLNM418pSDddYf++bSiDDnYFj0QK5u1wmibpmhb sz56W9ugl8GAWFI7j2hqR6JWfWYbZV0d9VHc1Wl3lqbnyyEHsakm22lcVqGU Pj0iFMXqQFUT2rjrGHaRyD+QRJZJcbMwJ3wS4t26wqdWYwRbNkJUg/oY42CN 2a1sMNunId7MSUJJ9miu+HixPQ13iRhEzYe8lJGdU1WyOi5cuqE8PhLon4Ke 7iPR2z4ecTYhGGJohzEGD7qOnYqC91OK2V4VdB8kFURNJa7xpPla1jIsdPBS ft/r2RYn/AKU36+EheNmXCx+TBqIh2OG4fGUsXgyexK62LdAXw839LR3Qqid N3oaWiOCuIsk1kKswiKLLICR0lL2qjFxazbTN8pA3N+IPwxw5MgRrUzN8dGe qZh4Tlyuoroi1Y99RQLUyAFj4EYGEtDEEVGNHLDYwR5pPV0wq6eTMaIw66li VP/SJfifMUFduHgLeeuIiNpNQJDLMITbxaG/IQjJBj+MJTFupSoixIcFozVx p92IWw22qouUkCDmLGyV7jJ9wJDm+1dI8NsVMwhrac/VvQ3yvTvgtH83XOoZ hut9+irDuD9iCB5NVNdtPcmYisdZM5Xf766ah+trM3Fx/UIUfpmFXesW4PHl U2hF5NfZwxkhLZ1JHtkGgU3o/kfh5OiIUGLwtNWziNB55VihNFungtO+aYye k+0OyoTJH5zje1qy5wRKE8bSgNVUkp/w1AalT8nT5rGHoTEC7BzRm64pJ8fq gKbo492ARQODKoy1hxDoNx7BLZIRaRuDBEMg/GpawvPj2uhW2xKRDeshoYkl BtnWwalFWchu2hJbXFvjQMt2KKLTCt2CcDU8Erf798O95MF4OG4Ennw+Dk/S JuPxgul4tDQV91Zk4NYadeOA04TRhwjDFcEQZt9k3daDJ4+q8n0f/cIi4Olo hwB3B/T0dsCkkSPU3YuaJaOHYywiukQgJqIP+sf1QwKR8erpqZS/fNJSDEyc 5WKC3kBkuZr78Yop0oxR8LSxlMFV0K9XJHya2SvzMCvIsdjXkbZpGpiKDPVM gCkxe+MhpIxZqTz0aP9pI3h8ZoPgevUx0rEhJnvaYqZPE+yK6ILHk8bgyayJ eDL3czxaNAsPlqXjTu48pVd9njZOCSe3Eq6q0wan8MPFkyg+d4ITWmp77zC+ 5igP/Z408T+DBw3BsP6TEeqTiJ7NIsro+A32OB/jIV++51I+vvKcWsZXcYKM fowt9uKTygTmXHI8XGKcrntbDOBFjrtFE8y2ccYxv+aYQIrSKd08ML2HG9al xGHfFwtxfM8mpWd641Ixzl8owp37dxiD9PJI/VS2AssSLpwn8SdbVdRAQww5 epQJArIX6sleR/0vuUk/XBClZFckJLhgMl1N6O0s3bC6UqmfV7tzGYR39wOI 3czohOSA5ojzsUecXxN8f7aw9Nms0s6ObBGDlj3VeBKVux8p/RYRf5pI6Opt 1LWYRj5Ic+2DRxt2m7xQgPtNvgOsWBVo2CNmlxGm4YdpKf/wvjbtVycTxpxo 4Wx8J4CWoewnZw9tqC1o5IxHXdX+3fE5Ieju5YBgX3tMHBJZk12ml7SVmGzM JO8DX/iOaNFSulmbqkVhTmnYl7AL/6zJw6vHd/mQxcjC16iVfSOekUNi3sd7 8WJ/XuRLP7qDop2zcUN3jV2YCP4ya2o+DSRMSeuKnw+mKSa8fNkiFvT1baea ju1xl5C3aj+mjLuG7XmP8OLGfW5CZV9Fo8sBEYN5DhBsJEmPpGsGiCX89FV2 Qx0m8GfjaI6/gjDheRDJwDO64f6BdJPBU1np1cCCssFksu7Yxd/w+IVa62nf cEGHKm4EzVOK/+WwLxSeUda3rCbHs9XZDUyNXXA3dLp7TRNn/BJKyvV53VHy 6DK0DTSZ7r9Xxi7FYWt3k6d3OJkfHZ+8FvudfSWXcw7TiJJJjkfZ2cb3xdGe cZ6tM170VlvSJY8vs6kreZOJr5nhe5bINEL2mjo+DDFY1heHYTrLRH72ectI ptEnZ9s4GxsgdN0Fba6/jPRESVZPMpLv2YRY2c17RP2TP2NLPnxRkticaVa+ YdAPW03HhyFOnvBhpEQkYCRdtOHizOrQyphNhrHD3hn/jfbCm8VBeEOG8Z5G ILLW7Ge6fpWLRHQXfLN4MeKajMU0pPTVGQifTz/o4MzmpSojjQxkj6Mzfo9r iTdLg/Hmyfdl1rbKNKuzxMQ5qWL0KwepoiPk+/lQUv0tG2J8vYZYk55uYNTS J3sP0KnW+Fb4JycU/zy5YrLk05zrDhSo5QWrowS9hlpxy2QZtSqj1IWGzevU hO+nn6H3ZzXQx6oWLQUbMKrn0nmU5s54PcAbfy8PU6iurOGxLBsJZijF+Cl7 84WGapkbLUv1O4gPDYKvlRU61rRAPysLDCG100D7ulgQ1UtpLtBQwZ/tpZOr g0KClU2PMkL74ISzM/4c7Is/V/TCX0+uaHMrmVPtJSi39rWSZV8xZJxxE91m tNF6zD9eXxf+1gZ0JMyPb9QQo1o0wXhXO0x2b4TlLb2wp1Ugdnt2wQ73AHzj 0gFft2iLjU5++MLRF7n23shp4kUSJw9siRiAi5nLcJ5E2LOsJUYncegmUnQe dh/bFEqNfh8gPozy0gLdrSwRUbc2BtX7DOfDXfFqVW+8JuKmV5kzpyjBW/Gq RXyjBw+BGsaIeXa0IGbOEvNP7zRX2r0riBe+6d8KF2L9McSnGSZ2dsbYjh6Y 1NkVy/v3wYHJqTiYMguHx83AkdGfI3/kFBwdOhFHkybg2MAxOBY/Csdih+No 3yE4GjEIR8MSkR/UD0e6R+NQ5ygc9O+N/W1CsNe7B3Z7dcVOynLXUpavb+qL 1YTly2xbIp6UQh4f10G3ulYIt7bCCLr3mns9jPBsiKvn8qU2HS2wiHsge4GV 3PFbv51t4uMtKossTNhGpwC3OrniYWBr/D2emGVOAt5sHYWY9m6I9XNCbIcW iA9wwoJZ43GssBiFRcU4RY4z5PiOfL9Ajhmpc7EgIxPZcxdi1dwsrMvIwoY5 C7E5PRNbUxeocvoU+6amGwuAw+MFzg8jnB9COT8WxxJG4XO/ruhgZY+IJo4I dbRHQrfOGBwVgYR+cZgxdQq3un6SIG/3diaJbpozSWy5iU8v5lHv5uaGnyPa 4c203ihZPRB/bh+LBwUrkDZ1JPxa2KN7S1Z7JEexnETdm21vQSEOFxYZmUY/ ItOmM6YtJQwbFBGH4G490D8uDv379UN0YDCGebdDurM7EiWe0lag2/Qd5WyY pu+Z5S/LIwmIapDvlXkmjm4B8G0fdaPDl/0DUJJOrlw/BC93jserG4d4P5ru D0p3LaPfZI8ocR/GVohrs56hyUMR3D0QnT1cEOzWjGRRoQgytMJQErm3El7z sYpJAk9Jy75E3ThWajrbtm1TXoBDkx72fokoFhL4WOnj7cvs1G1nXyd3I9lm rPI7fYTw52uH1Bjzmcl4+O/i1kmS/R+ULQA9mtqjI93GyN2LDKwXehp8lXWX X5GBJUgMWvbQKRvYh0ZGitsJ0B2MKTdfvnypxD7+OMOD7vSZpyCUZMerPrEu i4Ja6rmboR/TnSOrKLvN0E3JAw1+SiJF0/THhafiNYTTW3hzW8zDGOHl3XYk ilFIFxB8SZvNrm74Kbwt3kwloXTVAPy1fQyeF62kj5sYR8OTIO1IxIbLu8Jo UiKmKa8TiDO4IIO2sUxHw22pkeZcmdGYdiToweJ2FEsg6FOIu6LicaaVJ172 64iS1EiUfJGE34ntvL5xiE8RaNIhLj1Ovsoq8LWVdEuZGYR+f/Q1uGI2of8B QcMHIFYEfABiOWmlPwAWKDqb5hxCzfsOvs7di2zPEbgblYxXSV1RMj8GJRuH 4fnOCdiyNEUhu3Y5UqMaxtHMUp4/iCCjoYXTfWE0ornzd7eJHpyN5iOj0vMC Qwx4XcupepXZABPa5uLI5xfw5kAROTLw6uQK3LuivhCVI69hZoBitVDHOMBU Zcl6L4MbJtFeH90FX2L2fICi7xYHKE1rTMPWvxtqJVy89AfWbX6MW7cf4a8/ fuEgRYURK25zdaqVcaRzlGXgoQYPjKOP1xEDFkfKqxCD+ZGWPvDIiRE7Y52N f5XNTMv2kRLLbHPbGDRk5OdlfUPI74lgg5dS+66KnmAkXwyysuWajPyaErK6 CJ5asDXh0QZTks3NLou6VctolrIJYT4Hom5cFIIQ+77Y3HYCHpJM9uXNGzw/ EosS/uIpMebojKmrZEzCcMo+mKZfqlrJwfHG/4XCK+jrvRtF835AScFp/Hrt O6NgKDheQNSXoGeDqMEwiJUVyX46GflY2jP/jwRKeSpXXvlqfWrpSCpizrTr WL/zER49fAZtBKWsf+sI1FcrL1261DipTNeZyhogFTQky3xwwzKOUyR+mMR0 OYGiF65nymJKIE222Iv/opkWUJx0BalMB4hal3ebq+ESg7R+G1GyHoypMDVv ijS2HDhqYyw0Q44YqfhMp+jedMiJZILVCooKsgIF7GBq7Mpvo4Qh8/ec85lA 0S9p8IrOtLfyf3VdP0OvYC5ho0RdOUbRa2gwiswKERhvLpZUloAUUXOZW5pH zdumdLaev+M8SCJzbb5eTQJyk0TdZC/31aAW849AHX/OUfNupSi6rySqVfff oe5SDt/LfbaorV8JaLis+ahFI7M0Rc3fs0G/BZTDY8oeFNmsQS2u1ngLam5Q Hcrh+T6ToP5aomZ1JNeZoK5kUmQS5rdRTptdRlRbApC/lldM3vl1okZoENMP Lf2Yo/Uph3VxIYqz+/xVxKKeyZ570HBcNOxWEmFrsyzuFUUhbhU4zvVMBzV/ /kQM4l461sW9WAMJ6m0Cah7cxCVeXA4a1KJ1uZXDumQ1GH/PtehTavw71M5m rIsyXPs2SBE1f7E3JZUGY/qthoQ7FqaoRetyKod1OUhQiy8z5wnbZ29HTUFz 1A7lYLjsTYg7hXNczWQOQINafIrHVjNqGWrZC6x3ac7R6zh80bQ1qEXjalQO hvOFVGICuFuiZrwNIxoXQ83/JBqXdlthmXF5SFB/K3EpH78NdWWTaVbalqTM r1cOr9ZKAvpbgfFc5h9LBGRCQpkpUotyODZfCfY9GuxitBONoq4p70U7q1MO 3reRoN4r0TjZ0906qMXuhjk76yBBvY+dE+PYh29HLSalskd9tKgDJKj3SzRO ltloUIt2pt2JU2ZnXSSmu19gONe0DyTXMdRcDfhaUvpN7VKYzRkCJQM5IGDl 8et9CWM0WMXllOKUtznTCpKgPihxLLIHMSWoefzSblkk1jyc16ES1IcEMXMN E1/dxM/poK5kBrVoV70lqA8Liszjl6zjVEdEXd3ErnQYzedDxcTssDAwrliy HZxNMFZVoNLHNWUlTrQEzRGJw3hXwgATNFWUdHfmzJlG0HRghM8xEgLzJQpT /e0YqIXQxJrWcDQUMCnKMByVmD/vuYg2yDB8yjSBQp86daoyFgGyKM6jEiFw yKKdMcg8N6e00/yB5ufGJogp5GOSGCF7gwGDzJNTkSOyLmiYBNVxiYirmkcl ThvTQRQUFEgbRKESECc0si61dlOJqfWNcaaA8otKgvFLOcszkV4SNIUSgVcx j0b1B5WNzKOGzp0CBy+6rkIBJZc6By9qLAPPn9LnUmf6xCGLelIk8dtcjKKm MsiWAmRB8mESyCclVlZJch2DzOsxDpUKOVRyeTE7Jwb1iubBWmtYwXYU470z mtpx9ekugXJKkCv3suKjvablMWtHVi3jKuhZLt9AHTSifHXQ8BkC0SD0wJ+W CFlc7cy1UzU040JebgT0Q2IGhyyqxRmm6aKQ6RkGldHLq05R3Tm3RfU9y8Yl WhH/u6gmwoxzRaNkKRO6SYCeY6PhfGXkM3i8Fi87laWOnzoAJkXOMeoHuFD9 dRByYdLAR0YkephK5uaM+NtJRSugZ1jY7ihB950gXOpkKfN0BsdfaCSyja+x 4+DFcMwdKM9XSmFUUqzn+vXr6N+/P9atWyeanNLFr67xFvRDOMfRUOZo0ZTt t1czouFTDLQYEhpNJpZuCoHnDaKh+AvYubqq2N9Rrnn+/LlS7ZnBxtsg9Y2j fE/uYtozPGLg22eWmdWMVSb9Gy/5BLxs5Rlfwi2aEldMaqscqq8EOy/FxEZ0 RQl2yajZTl8tmPJQaXB+8rDoZ3a86gIPGQb64Brnq9rSYK0kU+dDbmmt0XL6 beu/5KaATV14auxTiObmK2DifpdjMqedOuNSBWZ8NFM0Ox92Toz0WyWaSMO3 jGMq9ewx3jIxmWsFv5p+c5dgXMfO8ZcNGd1QBWVoVY0kSNjIdktgP6qY2Jng tmRvPl/KzpXdmL6SSadLQoiMF+q2Nqz9WtnEFrl3+3dUqOcoCoq2ggKlkhEt W96k6ryx4cN9HDVK7t0p6XwsTjoUcEylUUD1r5Ryep7gr6CgrygSANXLGHd0 FQ1TtvjEPAXVTK6jB3e7OtjV1gdT5FKblWjg2wmoapxKZgiNS+QoxgoUoDrN z3Z3LA2SlEh6huHhLlLMU+ZIXB/f00kWXjhagrSnipTvZyoaMNcajlEMyxks AIkuw1wg46an5rusjWYaNgkaGZapgpZxLNWEcTHvKcMWriJrJ+gulR0dl5MO prK9i7cGaPXBDqaqZeKk7OGKqYx5IrK3RCjEqlj8NcqhSb/5wlsxxRnNzomJ XVVhaJs2bVJASbCqgYglTvKEXA+j6HbKGYkHqhgDBGYKObpsXbGKrLT185aA pRT2SqhTn30wPmYiphy2EjyDJIFEG44pPkkcke1J30PFzlucot3xxRliqsFb GmLs4O0LsaOrDdtmAoosdWYUtVVjEkqf9tUUCkZ9o/Aa/ita31GkRL2WXrBr ZJ447jvEP6F06ZKY6HB90KNQ5BxbkvT2WFz6drBgXaLE8oDCoQchiLNeTMBi mDZpV4uz6GgmPGtXzdAjSJekdwWSBA8iWwfFmxNigOePoNJzlFSqFGZCZ3Mj k/Qp4p1s0bXwUkdM4zg5ZV1KpfJE8jRdIviyRVlbjCKkUPiqCHH75lBBqbnr EQgpG+Hnak3sI43iUufDlVLEyHMJ7qxY+7eME+IJEndCQqBfqOIO02glK1r1 kIlh6m1FK0O2REXWS0AmeJA6ZpG9Y8yS9BKJZSr0cI3nprpTWwJavsO9/jiY sa9SMUUwRotemhLC8q3PzCItmyDpxfi1Kja+RE20UkojFSZHJWZ/vPhiu7IK pmo+S2IoS1+UoyZ06CPInF5PRVFZAp/brZjWcH9E7zF1GaY6VM5UQNzTRzBW NddlywrLpFu8VyrWG3q0ijFKpbV6mYlxM5mEmWW0jD4+uyHrZIhOrLzEVdYw zUzJKntAv5SoWKbHYh3FnRwh6H2ztLynLVrflmA01qWDVyhiRUUBUaZwIsSE ksdM2jLg0PhrJSghbLsnsyHbXpcavriZFyP0ThkVPEyWaTCVJ2tw0lpaa+MJ gwCXS0X2st/6Atf4y3G4GMykCEfFuGfqARsIQU9bTfDwwjNMMXfiM2NiCNJW 9LSkAF3CWzYSnxApkj+1Zs1gysoN8xTJK/y39BeKBWpMnoMQ6dJOsrD5Jhkp XGyyrElT/4vk0EuVOdfykMONQfQsVXVoMed6dZoCqmtiMayM2ehtqi16Fh43 xLTyfYmP1SHkitZWhN0ETbekt2HuQNOkMbmGJ5RiQKMBR+tfKUGifxVyj9J9 DdXFEcZ+u8iM2saL+KIPLisasrnrMKXmPbMNKjPhsb4Esbo4Rl0tpDBJVnny Rw25OnN6WPbCGUHR0D+ZQa9Mwpqd6GGExEv+xDfgEv1OUVGRMXF6S1Zg+++w vctGQzFFRUUhOTlZBtXeyDEm1n7GE+I+/1yhmkowOcg0U/1GPmkCWM2NfsYb HTV/NWdsqepf+xtvHMZUWONNle/p6m/f/zvYl0tHI3+fOgN73TyIa0YQ7Frl rwP+3/kd//P/AUQ10g8=\ \>"]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"tc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bc"}], "}"}]}], "]"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"core", " ", "clouds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"twc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzc", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Bond", " ", "c\[ODoubleDot]ouds", " ", "between", " ", "cores"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"twh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzh", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bh"}], "}"}]}], "]"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"H", "-", RowBox[{"bonding", " ", "clouds"}]}], " ", "*)"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ttlo", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"tlo", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "0"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ttlu", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"tlu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "0"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ttpln", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"tpln", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ttpyrn", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"tpyrn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "0"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tw", "=", RowBox[{"Join", "[", RowBox[{ "tc", ",", "twc", ",", "twh", ",", "tpo", ",", "tpu", ",", "ttlo", ",", "ttlu", ",", "ttpln", ",", "ttpyrn"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"bt", "=", RowBox[{"Length", "[", "tw", "]"}]}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "tw", "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", " ", RowBox[{"coordinates", " ", "of", " ", "clouds"}], " ", "*)"}]}]}], "Input", CellChangeTimes->{{3.568895397419882*^9, 3.5688955157148895`*^9}, { 3.568895549629349*^9, 3.5688955855718126`*^9}, {3.568895617317868*^9, 3.568895845234268*^9}, {3.5688960797194805`*^9, 3.5688961015127187`*^9}, { 3.568896219074525*^9, 3.5688962276233397`*^9}, {3.568896262910602*^9, 3.5688962903198504`*^9}, 3.5688964250728865`*^9, 3.568896456912543*^9, { 3.5688981540863237`*^9, 3.5688981869399815`*^9}, {3.5689021233572955`*^9, 3.5689021341525145`*^9}, {3.5689111169043026`*^9, 3.5689111218495116`*^9}, {3.568911235261711*^9, 3.568911242437723*^9}, 3.5689112948850155`*^9, {3.5689116510180407`*^9, 3.568911800419503*^9}, { 3.568911871820829*^9, 3.5689119012892804`*^9}, {3.5689119993042526`*^9, 3.5689120006770554`*^9}, {3.568912144306507*^9, 3.568912165085744*^9}, { 3.5689528310632005`*^9, 3.5689528569592457`*^9}, {3.5689534065794115`*^9, 3.5689534297298517`*^9}, {3.568954496214126*^9, 3.5689545054337425`*^9}, 3.5689569073699613`*^9, {3.56913308739126*^9, 3.5691332012870607`*^9}, { 3.569135511323518*^9, 3.5691355127119203`*^9}, {3.569136204167535*^9, 3.569136290747687*^9}, {3.5691598050571885`*^9, 3.569159843199256*^9}, { 3.5692215417755947`*^9, 3.569221597186892*^9}, {3.5692216819730406`*^9, 3.5692217090546885`*^9}, {3.5692217693019943`*^9, 3.5692218260704937`*^9}, {3.5692219780303607`*^9, 3.569221989433981*^9}, { 3.569222055468897*^9, 3.5692220728005276`*^9}, {3.5693401536421804`*^9, 3.5693401889450426`*^9}, 3.5693411655535583`*^9, {3.569341634303181*^9, 3.569341638733589*^9}, {3.5704549882757435`*^9, 3.5704550487414494`*^9}, { 3.570455928146194*^9, 3.5704559415310173`*^9}, {3.5708553973857827`*^9, 3.5708554057785974`*^9}, {3.5718402591869545`*^9, 3.5718402726497784`*^9}, 3.572328636723397*^9, {3.572328748419593*^9, 3.57232875246*^9}, { 3.5725921859362335`*^9, 3.5725921932682457`*^9}, {3.5725923978158054`*^9, 3.5725924023086133`*^9}, 3.5725926630786715`*^9, {3.5726167873570023`*^9, 3.57261679757502*^9}, 3.572620232450739*^9, {3.5726252144466896`*^9, 3.57262521482109*^9}, {3.572842310446463*^9, 3.5728423195412793`*^9}, 3.572851092419488*^9, {3.572851145927582*^9, 3.5728511735708303`*^9}, { 3.5728512529593697`*^9, 3.572851265595392*^9}, 3.5728513850916023`*^9, 3.573124143499799*^9, {3.574076503349639*^9, 3.5740765293080845`*^9}, { 3.5740766389138765`*^9, 3.57407664084828*^9}, 3.574076909589952*^9, { 3.5818329799060545`*^9, 3.581832997081685*^9}, {3.581833081056632*^9, 3.5818330881078444`*^9}, {3.5818331567167654`*^9, 3.581833337131082*^9}, { 3.581834229374649*^9, 3.581834234054657*^9}, {3.5818343257204185`*^9, 3.5818343369524384`*^9}, {3.5818447011770077`*^9, 3.5818447400054755`*^9}, {3.5825646854072857`*^9, 3.582564702286515*^9}, { 3.5825647877122655`*^9, 3.582564790941471*^9}}], Cell[BoxData["116"], "Output", CellChangeTimes->{ 3.582562830579628*^9, 3.582563576572938*^9, 3.5825636689095*^9, 3.5825637944273205`*^9, 3.582563848606216*^9, 3.5825639206003428`*^9, 3.5825640747910132`*^9, 3.582564140560729*^9, 3.582564291600194*^9, { 3.5825644143256097`*^9, 3.582564438848853*^9}, 3.5825645241342025`*^9, 3.5825646260803814`*^9, 3.582564712145733*^9, 3.5825648002858877`*^9, 3.5825994457091074`*^9, 3.582599563333314*^9, {3.5825995990261765`*^9, 3.582599619696213*^9}, {3.5825997266188*^9, 3.5825997558376517`*^9}, 3.582599969963628*^9, 3.5826000404133515`*^9, 3.582600365939123*^9, 3.5826007532878036`*^9, 3.5826013998309393`*^9, 3.582601714842293*^9, { 3.582601756509966*^9, 3.5826017799880075`*^9}, {3.5826019547395144`*^9, 3.5826019775779543`*^9}, 3.582603454167348*^9, 3.58260820056955*^9, 3.5826082921573105`*^9, 3.582610888907272*^9, 3.582610956829791*^9, { 3.5826110038482733`*^9, 3.582611077917204*^9}, 3.582611112705265*^9, { 3.582611157352543*^9, 3.582611297347189*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"-", "5.049725817200001`"}], RowBox[{"-", "0.91402267168`"}], RowBox[{"-", "2.5171150319999995`"}]}, { RowBox[{"-", "2.6272860577999997`"}], "2.5212724291999997`", RowBox[{"-", "4.403250552599999`"}]}, { RowBox[{"-", "4.5039729483999995`"}], RowBox[{"-", "3.4179474162`"}], "0.8334447550399999`"}, {"1.22233146858`", "4.123382132`", RowBox[{"-", "3.7660349453999995`"}]}, { RowBox[{"-", "4.7568182872`"}], "0.98713617062`", RowBox[{"-", "4.3059296636`"}]}, { RowBox[{"-", "7.1359833211999995`"}], RowBox[{"-", "2.5583110587999998`"}], RowBox[{"-", "2.370661267`"}]}, { RowBox[{"-", "2.2769308574`"}], "4.528350413799999`", RowBox[{"-", "6.114208473`"}]}, { RowBox[{"-", "6.8062261342`"}], RowBox[{"-", "4.0861545298`"}], RowBox[{"-", "0.33310200201999995`"}]}, {"0.068872953796`", "5.500047523`", RowBox[{"-", "5.7339956018`"}]}, { RowBox[{"-", "3.5763064549999997`"}], RowBox[{"-", "4.5270276056`"}], "3.0061761208`"}, {"3.6592654263999997`", "4.514555414`", RowBox[{"-", "2.9160361906`"}]}, { RowBox[{"-", "1.2626582214199997`"}], RowBox[{"-", "3.8586315194`"}], "4.1126106938`"}, {"4.7570072598`", "3.1382679681999996`", RowBox[{"-", "0.9369072535399999`"}]}, {"2.521839347`", RowBox[{"-", "2.296961953`"}], "4.674237261`"}, {"5.2753591016`", "0.6256504840799999`", "2.3041429118`"}, {"4.8012268482`", RowBox[{"-", "1.0379886972799999`"}], "4.2900559652`"}, { RowBox[{"-", "0.35109219354`"}], RowBox[{"-", "4.8598083542`"}], "6.5325938094`"}, {"7.3990331804`", "3.4187033066`", RowBox[{"-", "0.136744352812`"}]}, {"1.9895035328`", RowBox[{"-", "3.8988826831999996`"}], "6.881248256399999`"}, {"7.7193417374`", "1.86757841128`", "1.8664445756799999`"}, { RowBox[{"-", "3.4160576902`"}], RowBox[{"-", "1.5166562930799998`"}], RowBox[{"-", "0.5838308476999999`"}]}, { RowBox[{"-", "0.49444680789999995`"}], "2.349874281`", RowBox[{"-", "2.9232171493999997`"}]}, {"0.47241260273999996`", RowBox[{"-", "2.281844145`"}], "3.200250981`"}, {"3.6643676866`", "1.4056726851`", "0.5243989649999999`"}, { RowBox[{"-", "4.903383559725934`"}], "0.035832993686348846`", RowBox[{"-", "3.4108413605480696`"}]}, { RowBox[{"-", "3.69124135315091`"}], "1.7547884222564116`", RowBox[{"-", "4.3546271630263265`"}]}, { RowBox[{"-", "6.0920703728780925`"}], RowBox[{"-", "1.7355487992041136`"}], RowBox[{"-", "2.4439431995135394`"}]}, { RowBox[{"-", "2.4522401432112657`"}], "3.524057034834813`", RowBox[{"-", "5.258086426756632`"}]}, { RowBox[{"-", "5.654235989323142`"}], RowBox[{"-", "3.751800335243276`"}], "0.2506089364466607`"}, { RowBox[{"-", "6.971104727699999`"}], RowBox[{"-", "3.3222327943`"}], RowBox[{"-", "1.3518816345099998`"}]}, {"0.6460351408693522`", "4.811198121176005`", RowBox[{"-", "4.749276635349062`"}]}, { RowBox[{"-", "1.104028951802`"}], "5.0141989684`", RowBox[{"-", "5.9241020374`"}]}, { RowBox[{"-", "4.040495148114557`"}], RowBox[{"-", "3.9720625536771363`"}], "1.9189779301391865`"}, {"2.439864897567065`", "4.318818920852348`", RowBox[{"-", "3.3413611887536896`"}]}, { RowBox[{"-", "2.4186093515966904`"}], RowBox[{"-", "4.192577363039783`"}], "3.559810887605222`"}, {"4.208550772548971`", "3.8258921025861667`", RowBox[{"-", "1.925724543371081`"}]}, {"3.6606671184348487`", RowBox[{"-", "1.6679536310920864`"}], "4.482292570291407`"}, {"5.038473000423457`", RowBox[{"-", "0.20553743155085724`"}], "3.2963453977562764`"}, { RowBox[{"-", "0.8072039345917748`"}], RowBox[{"-", "4.3588588944188515`"}], "5.321729562144925`"}, {"6.077068050930663`", "3.278384570305565`", RowBox[{"-", "0.5371141767451537`"}]}, {"2.2558630264289854`", RowBox[{"-", "3.097345790231271`"}], "5.776948460129882`"}, {"0.8192056696299999`", RowBox[{"-", "4.3793455187`"}], "6.7069210328999995`"}, {"6.496470070272384`", "1.2461670916818637`", "2.085451407459246`"}, {"7.5591874589`", "2.64314085894`", "0.8648501114340001`"}, { RowBox[{"-", "4.220403081602546`"}], RowBox[{"-", "1.2199463505487425`"}], RowBox[{"-", "1.535693835177588`"}]}, { RowBox[{"-", "3.951721633398983`"}], RowBox[{"-", "2.4528074248002727`"}], "0.11400240010233709`"}, { RowBox[{"-", "1.544560917968946`"}], "2.4342630195666533`", RowBox[{"-", "3.6519190242114985`"}]}, {"0.3508505481846659`", "3.2231038168020634`", RowBox[{"-", "3.338198900031561`"}]}, { RowBox[{"-", "0.3814051503803636`"}], RowBox[{"-", "3.0577715794380405`"}], "3.6492176221153954`"}, {"1.4809788671191666`", RowBox[{"-", "2.289283938192348`"}], "3.9256308172539303`"}, {"4.202050333507209`", "2.2582744402312254`", RowBox[{"-", "0.19470275417481075`"}]}, {"4.457168858202979`", "1.02180812251635`", "1.4002466405609215`"}, { RowBox[{"-", "5.828651808650215`"}], "1.2020342950389085`", RowBox[{"-", "5.291237087145195`"}]}, { RowBox[{"-", "2.2779228178030015`"}], RowBox[{"-", "0.9754218857227007`"}], RowBox[{"-", "0.36638778202066796`"}]}, { RowBox[{"-", "0.31826700046696`"}], "1.5371951453209958`", RowBox[{"-", "1.9514197742282606`"}]}, { RowBox[{"-", "8.279713921817553`"}], RowBox[{"-", "2.587469785096421`"}], RowBox[{"-", "3.2959739318551113`"}]}, { RowBox[{"-", "3.254861819021332`"}], "4.995718840490981`", RowBox[{"-", "7.109580588736914`"}]}, { RowBox[{"-", "7.726234882672449`"}], RowBox[{"-", "5.144736870866714`"}], "0.11224109535964294`"}, {"0.6696847503579015`", "6.622846282802158`", RowBox[{"-", "6.47171799082535`"}]}, { RowBox[{"-", "4.380254153267761`"}], RowBox[{"-", "5.577746368539442`"}], "3.6508331649533523`"}, {"4.466461768045359`", "5.555980403735901`", RowBox[{"-", "3.571304118853297`"}]}, {"5.887205214920901`", RowBox[{"-", "1.280610162748411`"}], "5.2529931192296875`"}, { RowBox[{"-", "1.0743203646001276`"}], RowBox[{"-", "5.766330269506347`"}], "7.43843443662931`"}, {"8.416114248683618`", "4.290117217595946`", RowBox[{"-", "0.7469902684845603`"}]}, {"2.8812020948926986`", RowBox[{"-", "4.145789436640094`"}], "8.025712838156812`"}, {"8.957012826943805`", "1.6710880764652727`", "2.638125618760973`"}, { RowBox[{"-", "5.700246205803357`"}], RowBox[{"-", "0.01282703717543554`"}], RowBox[{"-", "1.665839722619272`"}]}, { RowBox[{"-", "3.2203404604242687`"}], "3.4023531489469616`", RowBox[{"-", "3.491119399301228`"}]}, { RowBox[{"-", "3.8345809131185207`"}], RowBox[{"-", "4.3736573506860745`"}], "0.05979572335551386`"}, {"0.7481490536885506`", "5.055956224600869`", RowBox[{"-", "2.835735746637914`"}]}, { RowBox[{"-", "5.373117585554261`"}], "1.8976031385417127`", RowBox[{"-", "3.439197250930733`"}]}, { RowBox[{"-", "7.8100469461818465`"}], RowBox[{"-", "1.6314467007731497`"}], RowBox[{"-", "1.566571289885618`"}]}, { RowBox[{"-", "2.799954426783565`"}], "5.42248786660917`", RowBox[{"-", "5.172420513131535`"}]}, { RowBox[{"-", "6.130289259142632`"}], RowBox[{"-", "5.0120326183589405`"}], RowBox[{"-", "1.1367556003222303`"}]}, { RowBox[{"-", "0.4553548406906416`"}], "6.399245757536324`", RowBox[{"-", "4.797711588001607`"}]}, { RowBox[{"-", "4.226009334665408`"}], RowBox[{"-", "3.5569642992592145`"}], "3.778745437978503`"}, {"4.131438982806225`", "3.5697523175375587`", RowBox[{"-", "3.834948178521411`"}]}, { RowBox[{"-", "0.6359128160949288`"}], RowBox[{"-", "4.914321630808731`"}], "3.4397744688702376`"}, {"4.376960016217313`", "4.136539990134114`", RowBox[{"-", "0.03191163870599656`"}]}, {"2.023017171194928`", RowBox[{"-", "1.1840539725140822`"}], "5.361705270361781`"}, {"4.8736502199831175`", "1.6993793853525787`", "3.107720052466715`"}, {"4.3445247341839455`", "0.0281429305889227`", "5.074139207662704`"}, { RowBox[{"-", "0.902554379947563`"}], RowBox[{"-", "3.7574194083596963`"}], "7.1963920235070375`"}, {"7.770574087958168`", "2.380859866774159`", RowBox[{"-", "0.9997845305681223`"}]}, {"1.4382384634129186`", RowBox[{"-", "2.7978460584850664`"}], "7.54745030856586`"}, {"7.346674395134039`", "2.905085029170666`", "2.7294040589939597`"}, { RowBox[{"-", "3.960917166451133`"}], RowBox[{"-", "0.6634214089671405`"}], "0.14255361226060348`"}, { RowBox[{"-", "0.9736448327170033`"}], "3.1880449336416516`", RowBox[{"-", "2.1355908356815267`"}]}, { RowBox[{"-", "0.010390892318845601`"}], RowBox[{"-", "1.3566639387981594`"}], "3.8810287503280554`"}, {"3.258073777799869`", "2.304238345028641`", "1.2859900721361828`"}, { RowBox[{"-", "4.399205428596644`"}], RowBox[{"-", "1.8152183061845641`"}], RowBox[{"-", "3.368390341380727`"}]}, { RowBox[{"-", "2.0342316551757307`"}], "1.6401917094530385`", RowBox[{"-", "5.315381705898771`"}]}, { RowBox[{"-", "5.173364983681479`"}], RowBox[{"-", "2.4622374817139256`"}], "1.6070937867244857`"}, {"1.6965138834714495`", "3.19080803939913`", RowBox[{"-", "4.696334144162085`"}]}, { RowBox[{"-", "4.140518988845739`"}], "0.07666920269828748`", RowBox[{"-", "5.172662076269266`"}]}, { RowBox[{"-", "6.461919696218153`"}], RowBox[{"-", "3.4851754168268494`"}], RowBox[{"-", "3.174751244114382`"}]}, { RowBox[{"-", "1.7539072880164353`"}], "3.634212960990828`", RowBox[{"-", "7.055996432868463`"}]}, { RowBox[{"-", "7.482163009257368`"}], RowBox[{"-", "3.1602764412410593`"}], "0.47055159628223076`"}, {"0.5931007482826417`", "4.600849288463676`", RowBox[{"-", "6.6702796155983926`"}]}, { RowBox[{"-", "2.9266035753345916`"}], RowBox[{"-", "5.497090911940786`"}], "2.2336068036214973`"}, {"3.1870918699937745`", "5.459358510462442`", RowBox[{"-", "1.9971242026785891`"}]}, { RowBox[{"-", "1.8894036267450707`"}], RowBox[{"-", "2.8029414079912685`"}], "4.785446918729762`"}, {"5.1370545033826875`", "2.139995946265884`", RowBox[{"-", "1.8419028683740029`"}]}, {"3.0206615228050717`", RowBox[{"-", "3.4098699334859175`"}], "3.9867692516382194`"}, {"5.677067983216883`", RowBox[{"-", "0.4480784171925787`"}], "1.5005657711332838`"}, {"5.257928962216054`", RowBox[{"-", "2.104120325148922`"}], "3.505972722737295`"}, {"0.20036999286756285`", RowBox[{"-", "5.9621973000403035`"}], "5.868795595292961`"}, {"7.027492272841832`", "4.456546746425841`", "0.7262958249441226`"}, {"2.5407686021870814`", RowBox[{"-", "4.999919307914933`"}], "6.215046204234139`"}, {"8.09200907966596`", "0.8300717933893336`", "1.00348509236604`"}, { RowBox[{"-", "2.871198213948867`"}], RowBox[{"-", "2.3698911771928586`"}], RowBox[{"-", "1.3102153076606031`"}]}, { RowBox[{"-", "0.015248783082997264`"}], "1.5117036283583485`", RowBox[{"-", "3.710843463118473`"}]}, {"0.955216097798846`", RowBox[{"-", "3.2070243512018397`"}], "2.5194732116719436`"}, {"4.070661595400131`", "0.5071070251713587`", RowBox[{"-", "0.23719214213618267`"}]}, {"0.31654635466312253`", RowBox[{"-", "1.4744044461734331`"}], "1.992397209275417`"}, {"2.2950206335293006`", "0.9210563657123858`", "0.36565527337796033`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.582562830579628*^9, 3.582563576572938*^9, 3.5825636689095*^9, 3.5825637944273205`*^9, 3.582563848606216*^9, 3.5825639206003428`*^9, 3.5825640747910132`*^9, 3.582564140560729*^9, 3.582564291600194*^9, { 3.5825644143256097`*^9, 3.582564438848853*^9}, 3.5825645241342025`*^9, 3.5825646260803814`*^9, 3.582564712145733*^9, 3.5825648002858877`*^9, 3.5825994457091074`*^9, 3.582599563333314*^9, {3.5825995990261765`*^9, 3.582599619696213*^9}, {3.5825997266188*^9, 3.5825997558376517`*^9}, 3.582599969963628*^9, 3.5826000404133515`*^9, 3.582600365939123*^9, 3.5826007532878036`*^9, 3.5826013998309393`*^9, 3.582601714842293*^9, { 3.582601756509966*^9, 3.5826017799880075`*^9}, {3.5826019547395144`*^9, 3.5826019775779543`*^9}, 3.582603454167348*^9, 3.58260820056955*^9, 3.5826082921573105`*^9, 3.582610888907272*^9, 3.582610956829791*^9, { 3.5826110038482733`*^9, 3.582611077917204*^9}, 3.582611112705265*^9, { 3.582611157352543*^9, 3.582611297347189*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"cloud", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"dw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"tw", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dw", "]"}], "*)"}], "\[IndentingNewLine]", RowBox[{"Length", "[", "dw", "]"}]}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491351943607`*^9}, {3.569149201666077*^9, 3.5691492026956787`*^9}, { 3.5691494320784817`*^9, 3.5691494680989447`*^9}, {3.569152288984131*^9, 3.5691522953957424`*^9}, {3.5691595058486633`*^9, 3.569159537672719*^9}, 3.569237911685565*^9, 3.5693411655535583`*^9, 3.5693418217687106`*^9, { 3.5703410302061863`*^9, 3.570341063621445*^9}, {3.5720164790812473`*^9, 3.572016508424899*^9}, {3.57235540487335*^9, 3.572355408040156*^9}, { 3.572356807768214*^9, 3.5723568154122276`*^9}, {3.572621722359356*^9, 3.572621725962962*^9}, {3.581833392214779*^9, 3.5818333950383835`*^9}, 3.5818342233218384`*^9}], Cell[BoxData["116"], "Output", CellChangeTimes->{ 3.582562830657628*^9, 3.5825635766353383`*^9, 3.5825636690031004`*^9, 3.582563794489721*^9, 3.5825638486686163`*^9, 3.5825639206627426`*^9, 3.5825640748378134`*^9, 3.582564140623129*^9, 3.582564291646994*^9, { 3.5825644144036098`*^9, 3.5825644389268527`*^9}, 3.5825645242278028`*^9, 3.5825646261583815`*^9, 3.582564712254933*^9, 3.582564800363888*^9, 3.5825994457871075`*^9, 3.582599563411314*^9, {3.5825995991197767`*^9, 3.582599619774213*^9}, {3.5825997266968007`*^9, 3.5825997559156523`*^9}, 3.582599972397232*^9, 3.582600040491352*^9, 3.5826003660171237`*^9, 3.5826007533658037`*^9, 3.5826013999089394`*^9, 3.582601714935893*^9, { 3.582601756587966*^9, 3.582601780066007*^9}, {3.582601954817514*^9, 3.5826019776559544`*^9}, 3.5826034542453475`*^9, 3.58260820064755*^9, 3.582608292235311*^9, 3.582610888969672*^9, 3.5826109569233913`*^9, { 3.582611003926274*^9, 3.582611077995204*^9}, 3.582611112767665*^9, { 3.5826111574149437`*^9, 3.582611297425189*^9}}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"nucleus", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dc", "]"}], " ", "*)"}], " "}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.569152599175076*^9}, {3.569159470889002*^9, 3.569159489874235*^9}, {3.569160442895509*^9, 3.5691604484335184`*^9}, 3.569237923385586*^9, 3.569341165569158*^9, 3.5693418217843103`*^9, { 3.570341048161818*^9, 3.570341058286236*^9}, {3.57034131095988*^9, 3.570341315156287*^9}, 3.5703415891395683`*^9, 3.570341976207448*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"tv1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bc"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv3", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"tv4", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"nj", "+", "4"}]}], "}"}]}], "]"}]}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"tv5", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"nj", "+", "4"}]}], "}"}]}], "]"}]}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"tv6", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv", " ", "=", " ", RowBox[{"Join", "[", RowBox[{ "tv1", ",", "tv2", ",", "tv3", ",", "tv4", ",", "tv5", ",", "tv6"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "tv", "]"}], "\[IndentingNewLine]", RowBox[{"Length", "[", "tv", "]"}]}], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699696763124`*^9}, 3.569341165569158*^9, { 3.5693417833614435`*^9, 3.5693417874486504`*^9}, {3.5704552110753345`*^9, 3.5704552378605814`*^9}, {3.5704560776724567`*^9, 3.570456083070066*^9}, { 3.570855427306635*^9, 3.570855434529448*^9}, {3.57184030784344*^9, 3.5718403245666695`*^9}, {3.5723553440956435`*^9, 3.5723553601792717`*^9}, {3.5723567913257856`*^9, 3.572356801543803*^9}, { 3.5723587125159597`*^9, 3.572358735884801*^9}, {3.5726205042656164`*^9, 3.5726205078692226`*^9}, {3.5726209578956137`*^9, 3.5726209632776227`*^9}, {3.5726266468256054`*^9, 3.5726266628780336`*^9}, {3.57284236531176*^9, 3.57284238273699*^9}, { 3.572842728620798*^9, 3.572842734502008*^9}, 3.5731240921601086`*^9, { 3.573206599320009*^9, 3.573206611737631*^9}, {3.5740760016059575`*^9, 3.574076072196081*^9}, {3.574076952755228*^9, 3.574076991786496*^9}, { 3.574077057057011*^9, 3.5740770577434125`*^9}, {3.574080286699484*^9, 3.5740802892578883`*^9}, {3.5744917474371896`*^9, 3.5744917512747965`*^9}, {3.574491794596072*^9, 3.5744917963432755`*^9}, { 3.574492188761965*^9, 3.574492189822767*^9}, {3.5818300933237844`*^9, 3.581830122495836*^9}, 3.581832132980567*^9, {3.5818447887243614`*^9, 3.581844789285962*^9}, {3.5825645559426584`*^9, 3.582564575817093*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"-", "5.049725817200001`"}], RowBox[{"-", "0.91402267168`"}], RowBox[{"-", "2.5171150319999995`"}]}, { RowBox[{"-", "2.6272860577999997`"}], "2.5212724291999997`", RowBox[{"-", "4.403250552599999`"}]}, { RowBox[{"-", "4.5039729483999995`"}], RowBox[{"-", "3.4179474162`"}], "0.8334447550399999`"}, {"1.22233146858`", "4.123382132`", RowBox[{"-", "3.7660349453999995`"}]}, { RowBox[{"-", "4.7568182872`"}], "0.98713617062`", RowBox[{"-", "4.3059296636`"}]}, { RowBox[{"-", "7.1359833211999995`"}], RowBox[{"-", "2.5583110587999998`"}], RowBox[{"-", "2.370661267`"}]}, { RowBox[{"-", "2.2769308574`"}], "4.528350413799999`", RowBox[{"-", "6.114208473`"}]}, { RowBox[{"-", "6.8062261342`"}], RowBox[{"-", "4.0861545298`"}], RowBox[{"-", "0.33310200201999995`"}]}, {"0.068872953796`", "5.500047523`", RowBox[{"-", "5.7339956018`"}]}, { RowBox[{"-", "3.5763064549999997`"}], RowBox[{"-", "4.5270276056`"}], "3.0061761208`"}, {"3.6592654263999997`", "4.514555414`", RowBox[{"-", "2.9160361906`"}]}, { RowBox[{"-", "1.2626582214199997`"}], RowBox[{"-", "3.8586315194`"}], "4.1126106938`"}, {"4.7570072598`", "3.1382679681999996`", RowBox[{"-", "0.9369072535399999`"}]}, {"2.521839347`", RowBox[{"-", "2.296961953`"}], "4.674237261`"}, {"5.2753591016`", "0.6256504840799999`", "2.3041429118`"}, {"4.8012268482`", RowBox[{"-", "1.0379886972799999`"}], "4.2900559652`"}, { RowBox[{"-", "0.35109219354`"}], RowBox[{"-", "4.8598083542`"}], "6.5325938094`"}, {"7.3990331804`", "3.4187033066`", RowBox[{"-", "0.136744352812`"}]}, {"1.9895035328`", RowBox[{"-", "3.8988826831999996`"}], "6.881248256399999`"}, {"7.7193417374`", "1.86757841128`", "1.8664445756799999`"}, { RowBox[{"-", "3.4160576902`"}], RowBox[{"-", "1.5166562930799998`"}], RowBox[{"-", "0.5838308476999999`"}]}, { RowBox[{"-", "0.49444680789999995`"}], "2.349874281`", RowBox[{"-", "2.9232171493999997`"}]}, {"0.47241260273999996`", RowBox[{"-", "2.281844145`"}], "3.200250981`"}, {"3.6643676866`", "1.4056726851`", "0.5243989649999999`"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, { RowBox[{"-", "6.2432767587999995`"}], "1.28516485808`", RowBox[{"-", "5.6723905342`"}]}, { RowBox[{"-", "1.7848084124799999`"}], RowBox[{"-", "0.74092377008`"}], RowBox[{"-", "0.27217723577999997`"}]}, { RowBox[{"-", "0.24194161978`"}], "1.18512276364`", RowBox[{"-", "1.53041349836`"}]}, { RowBox[{"-", "8.7222193256`"}], RowBox[{"-", "2.5987511952`"}], RowBox[{"-", "3.6539741936`"}]}, { RowBox[{"-", "3.6331872076`"}], "5.1765264318`", RowBox[{"-", "7.494653316`"}]}, { RowBox[{"-", "8.0821691294`"}], RowBox[{"-", "5.5542826592`"}], "0.28453604382`"}, {"0.90209850062`", "7.057181747`", RowBox[{"-", "6.757093258199999`"}]}, { RowBox[{"-", "4.691244794999999`"}], RowBox[{"-", "5.9841953242`"}], "3.9002054913999995`"}, {"4.7787391088`", "5.958872995799999`", RowBox[{"-", "3.824805424`"}]}, {"6.3073384701999995`", RowBox[{"-", "1.3744733088399999`"}], "5.625525329399999`"}, { RowBox[{"-", "1.35412095982`"}], RowBox[{"-", "6.117043062`"}], "7.7888836542`"}, {"8.8095246668`", "4.6271830836`", RowBox[{"-", "0.9830354652`"}]}, {"3.2261402271999997`", RowBox[{"-", "4.2413010344`"}], "8.4684291238`"}, {"9.435779863199999`", "1.59507992208`", "2.9366342039999997`"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.5825628306732283`*^9, 3.5825635766509385`*^9, 3.5825636690187006`*^9, 3.582563794505321*^9, 3.582563848684216*^9, 3.582563920678343*^9, 3.5825640748690133`*^9, 3.582564140654329*^9, 3.5825642916937943`*^9, { 3.5825644144192095`*^9, 3.582564438942453*^9}, 3.5825645242434025`*^9, 3.582564626189582*^9, 3.5825647122705326`*^9, 3.5825648003794875`*^9, 3.582599445833907*^9, 3.582599563426914*^9, {3.582599599135377*^9, 3.582599619789813*^9}, {3.5825997267280006`*^9, 3.5825997559468517`*^9}, 3.5825999724596324`*^9, 3.5826000405225515`*^9, 3.5826003660483236`*^9, 3.582600753381404*^9, 3.58260139994014*^9, 3.582601714951493*^9, { 3.582601756634766*^9, 3.5826017801128073`*^9}, {3.582601954833114*^9, 3.5826019776715546`*^9}, 3.5826034542609477`*^9, 3.58260820067875*^9, 3.582608292282111*^9, 3.582610889016472*^9, 3.5826109569389915`*^9, { 3.5826110039574738`*^9, 3.582611078026404*^9}, 3.5826111128144655`*^9, { 3.5826111574617434`*^9, 3.5826112974563894`*^9}}], Cell[BoxData["116"], "Output", CellChangeTimes->{ 3.5825628306732283`*^9, 3.5825635766509385`*^9, 3.5825636690187006`*^9, 3.582563794505321*^9, 3.582563848684216*^9, 3.582563920678343*^9, 3.5825640748690133`*^9, 3.582564140654329*^9, 3.5825642916937943`*^9, { 3.5825644144192095`*^9, 3.582564438942453*^9}, 3.5825645242434025`*^9, 3.582564626189582*^9, 3.5825647122705326`*^9, 3.5825648003794875`*^9, 3.582599445833907*^9, 3.582599563426914*^9, {3.582599599135377*^9, 3.582599619789813*^9}, {3.5825997267280006`*^9, 3.5825997559468517`*^9}, 3.5825999724596324`*^9, 3.5826000405225515`*^9, 3.5826003660483236`*^9, 3.582600753381404*^9, 3.58260139994014*^9, 3.582601714951493*^9, { 3.582601756634766*^9, 3.5826017801128073`*^9}, {3.582601954833114*^9, 3.5826019776715546`*^9}, 3.5826034542609477`*^9, 3.58260820067875*^9, 3.582608292282111*^9, 3.582610889016472*^9, 3.5826109569389915`*^9, { 3.5826110039574738`*^9, 3.582611078026404*^9}, 3.5826111128144655`*^9, { 3.5826111574617434`*^9, 3.5826112974719896`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"ow", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "2.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"bc", "+", "nb"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "0.5"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "nj"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "1.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "2"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "0.5"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "2"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "2.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"lw", "=", RowBox[{"Length", "[", "ow", "]"}]}], "\[IndentingNewLine]", RowBox[{"cnv", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bc"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", RowBox[{"(", RowBox[{"nj", "+", "4"}], ")"}]}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"lc", "=", RowBox[{"Length", "[", "cnv", "]"}]}]}], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699655579047`*^9}, {3.56921753575448*^9, 3.569217541807291*^9}, {3.569217576283351*^9, 3.5692176436130695`*^9}, { 3.5692176921603546`*^9, 3.569217692768756*^9}, {3.5692177389136367`*^9, 3.569217740192839*^9}, {3.5692222042775583`*^9, 3.5692222070231633`*^9}, { 3.569230669979245*^9, 3.5692306709620466`*^9}, {3.5692308816872168`*^9, 3.5692309970650196`*^9}, {3.5692310297158766`*^9, 3.569231090602784*^9}, { 3.5692311251880445`*^9, 3.569231148868886*^9}, 3.56923793753481*^9, 3.569341165569158*^9, 3.5693418217375107`*^9, {3.5703412254249296`*^9, 3.5703412423509593`*^9}, {3.5704553045038986`*^9, 3.570455320681127*^9}, { 3.57045550485505*^9, 3.5704555063370533`*^9}, {3.5704556421508913`*^9, 3.5704556424784923`*^9}, 3.5704557137862177`*^9, {3.5704564711051474`*^9, 3.5704564908079824`*^9}, {3.570456521602436*^9, 3.5704565228348384`*^9}, { 3.5704569127419233`*^9, 3.5704569202767363`*^9}, 3.5704636205455036`*^9, 3.570596993178934*^9, {3.570855461377095*^9, 3.5708554743563175`*^9}, 3.570855611589759*^9, {3.571840408884818*^9, 3.571840415296429*^9}, { 3.571840465559717*^9, 3.571840473905732*^9}, {3.5720165322617407`*^9, 3.5720165635241957`*^9}, {3.5721934404423375`*^9, 3.57219344758715*^9}, 3.572193479551606*^9, {3.5721935303764954`*^9, 3.572193534214102*^9}, { 3.5726206642250977`*^9, 3.5726206651142993`*^9}, {3.572620782223705*^9, 3.572620782738506*^9}, {3.572620924963956*^9, 3.5726209465699935`*^9}, { 3.572842408289835*^9, 3.5728424357302833`*^9}, {3.5728424783807583`*^9, 3.57284247916076*^9}, 3.5728451195121975`*^9, {3.5731249170427575`*^9, 3.573124927962777*^9}, {3.5731450428093076`*^9, 3.5731450615449405`*^9}, { 3.5731451273458557`*^9, 3.573145132259865*^9}, {3.5732066718757367`*^9, 3.5732067228410263`*^9}, {3.573206842321636*^9, 3.5732068742548923`*^9}, { 3.57407070801746*^9, 3.574070708969061*^9}, 3.574070764099558*^9, { 3.574070877886158*^9, 3.5740708814273643`*^9}, {3.5740762086807213`*^9, 3.574076354884178*^9}, {3.574076421558695*^9, 3.5740764298579097`*^9}, { 3.5740771670372047`*^9, 3.5740771716548123`*^9}, 3.574077238048529*^9, { 3.57407728960662*^9, 3.574077313271861*^9}, 3.574077347825922*^9, { 3.5740802177941628`*^9, 3.5740802188549643`*^9}, {3.574080327977156*^9, 3.5740803298647594`*^9}, {3.5740876878174367`*^9, 3.5740877018106613`*^9}, {3.574491842144956*^9, 3.5744918529089746`*^9}, { 3.574492105676219*^9, 3.5744921066122203`*^9}, {3.574492269242506*^9, 3.5744922699601073`*^9}, {3.5744923474766436`*^9, 3.5744923633574715`*^9}, {3.574492409455552*^9, 3.5744924326995935`*^9}, 3.581830146504278*^9, {3.5818302134595957`*^9, 3.58183024448805*^9}, { 3.5818304495660105`*^9, 3.581830461437631*^9}, {3.581841028150556*^9, 3.5818410303969603`*^9}, {3.5818447649967194`*^9, 3.5818447738887353`*^9}, {3.58256459653393*^9, 3.5825646191227694`*^9}, { 3.5826012245334315`*^9, 3.5826013634048758`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}]}], "}"}]], "Output", CellChangeTimes->{ 3.582562830688828*^9, 3.5825635766665382`*^9, 3.582563669034301*^9, 3.5825637945209208`*^9, 3.582563848699816*^9, 3.5825639207095423`*^9, 3.5825640748690133`*^9, 3.582564140669929*^9, 3.5825642917093945`*^9, { 3.58256441445041*^9, 3.582564438973653*^9}, 3.5825645242590027`*^9, 3.582564626205182*^9, 3.582564712286133*^9, 3.5825648003794875`*^9, 3.5825994458495073`*^9, 3.582599563442514*^9, {3.5825995991509767`*^9, 3.582599619805413*^9}, {3.582599726743601*^9, 3.582599755962452*^9}, 3.5825999724908323`*^9, 3.5826000405381517`*^9, 3.582600366063924*^9, 3.582600753397004*^9, 3.5826013999557395`*^9, 3.5826017149670925`*^9, { 3.582601756650366*^9, 3.5826017801284075`*^9}, {3.582601954848714*^9, 3.5826019776871543`*^9}, 3.582603454276548*^9, 3.5826082006943502`*^9, 3.582608292282111*^9, 3.582610889032072*^9, 3.5826109569545913`*^9, { 3.582611003973074*^9, 3.582611078042004*^9}, 3.5826111128300653`*^9, { 3.5826111574773436`*^9, 3.5826112974719896`*^9}}], Cell[BoxData["116"], "Output", CellChangeTimes->{ 3.582562830688828*^9, 3.5825635766665382`*^9, 3.582563669034301*^9, 3.5825637945209208`*^9, 3.582563848699816*^9, 3.5825639207095423`*^9, 3.5825640748690133`*^9, 3.582564140669929*^9, 3.5825642917093945`*^9, { 3.58256441445041*^9, 3.582564438973653*^9}, 3.5825645242590027`*^9, 3.582564626205182*^9, 3.582564712286133*^9, 3.5825648003794875`*^9, 3.5825994458495073`*^9, 3.582599563442514*^9, {3.5825995991509767`*^9, 3.582599619805413*^9}, {3.582599726743601*^9, 3.582599755962452*^9}, 3.5825999724908323`*^9, 3.5826000405381517`*^9, 3.582600366063924*^9, 3.582600753397004*^9, 3.5826013999557395`*^9, 3.5826017149670925`*^9, { 3.582601756650366*^9, 3.5826017801284075`*^9}, {3.582601954848714*^9, 3.5826019776871543`*^9}, 3.582603454276548*^9, 3.5826082006943502`*^9, 3.582608292282111*^9, 3.582610889032072*^9, 3.5826109569545913`*^9, { 3.582611003973074*^9, 3.582611078042004*^9}, 3.5826111128300653`*^9, { 3.5826111574773436`*^9, 3.5826112974875894`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "7.`", ",", "7.`", ",", "7.`", ",", "7.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output", CellChangeTimes->{ 3.582562830688828*^9, 3.5825635766665382`*^9, 3.582563669034301*^9, 3.5825637945209208`*^9, 3.582563848699816*^9, 3.5825639207095423`*^9, 3.5825640748690133`*^9, 3.582564140669929*^9, 3.5825642917093945`*^9, { 3.58256441445041*^9, 3.582564438973653*^9}, 3.5825645242590027`*^9, 3.582564626205182*^9, 3.582564712286133*^9, 3.5825648003794875`*^9, 3.5825994458495073`*^9, 3.582599563442514*^9, {3.5825995991509767`*^9, 3.582599619805413*^9}, {3.582599726743601*^9, 3.582599755962452*^9}, 3.5825999724908323`*^9, 3.5826000405381517`*^9, 3.582600366063924*^9, 3.582600753397004*^9, 3.5826013999557395`*^9, 3.5826017149670925`*^9, { 3.582601756650366*^9, 3.5826017801284075`*^9}, {3.582601954848714*^9, 3.5826019776871543`*^9}, 3.582603454276548*^9, 3.5826082006943502`*^9, 3.582608292282111*^9, 3.582610889032072*^9, 3.5826109569545913`*^9, { 3.582611003973074*^9, 3.582611078042004*^9}, 3.5826111128300653`*^9, { 3.5826111574773436`*^9, 3.5826112974875894`*^9}}], Cell[BoxData["116"], "Output", CellChangeTimes->{ 3.582562830688828*^9, 3.5825635766665382`*^9, 3.582563669034301*^9, 3.5825637945209208`*^9, 3.582563848699816*^9, 3.5825639207095423`*^9, 3.5825640748690133`*^9, 3.582564140669929*^9, 3.5825642917093945`*^9, { 3.58256441445041*^9, 3.582564438973653*^9}, 3.5825645242590027`*^9, 3.582564626205182*^9, 3.582564712286133*^9, 3.5825648003794875`*^9, 3.5825994458495073`*^9, 3.582599563442514*^9, {3.5825995991509767`*^9, 3.582599619805413*^9}, {3.582599726743601*^9, 3.582599755962452*^9}, 3.5825999724908323`*^9, 3.5826000405381517`*^9, 3.582600366063924*^9, 3.582600753397004*^9, 3.5826013999557395`*^9, 3.5826017149670925`*^9, { 3.582601756650366*^9, 3.5826017801284075`*^9}, {3.582601954848714*^9, 3.5826019776871543`*^9}, 3.582603454276548*^9, 3.5826082006943502`*^9, 3.582608292282111*^9, 3.582610889032072*^9, 3.5826109569545913`*^9, { 3.582611003973074*^9, 3.582611078042004*^9}, 3.5826111128300653`*^9, { 3.5826111574773436`*^9, 3.5826112974875894`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"echarg", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "lw"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"pcharg", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"cnv", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "lc"}], "}"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.574087724274701*^9, 3.5740878100592513`*^9}, { 3.5740878506505227`*^9, 3.5740878682629538`*^9}, {3.574087937043474*^9, 3.574087937995076*^9}}], Cell[BoxData[ RowBox[{"-", "162.`"}]], "Output", CellChangeTimes->{ 3.5825628307044277`*^9, 3.5825635766821384`*^9, 3.5825636690499005`*^9, 3.582563794536521*^9, 3.582563848731016*^9, 3.5825639207251425`*^9, 3.5825640749002137`*^9, 3.5825641406855288`*^9, 3.5825642917249947`*^9, { 3.58256441446601*^9, 3.582564438989253*^9}, 3.582564524274603*^9, 3.5825646262363815`*^9, 3.582564712301733*^9, 3.5825648003950877`*^9, 3.5825994458651075`*^9, 3.5825995634581137`*^9, {3.5825995991665764`*^9, 3.5825996198210125`*^9}, {3.582599726759201*^9, 3.582599755978052*^9}, 3.5825999725064325`*^9, 3.582600040553752*^9, 3.5826003660795236`*^9, 3.5826007534126043`*^9, 3.5826013999713397`*^9, 3.5826017149826927`*^9, { 3.582601756665966*^9, 3.582601780144007*^9}, {3.582601954864314*^9, 3.5826019777027545`*^9}, 3.582603454307748*^9, 3.58260820072555*^9, 3.5826082922977114`*^9, 3.5826108890476723`*^9, 3.582610956970191*^9, { 3.582611003988674*^9, 3.582611078057604*^9}, 3.582611112845665*^9, { 3.582611157492944*^9, 3.5826112975031896`*^9}}], Cell[BoxData["162.`"], "Output", CellChangeTimes->{ 3.5825628307044277`*^9, 3.5825635766821384`*^9, 3.5825636690499005`*^9, 3.582563794536521*^9, 3.582563848731016*^9, 3.5825639207251425`*^9, 3.5825640749002137`*^9, 3.5825641406855288`*^9, 3.5825642917249947`*^9, { 3.58256441446601*^9, 3.582564438989253*^9}, 3.582564524274603*^9, 3.5825646262363815`*^9, 3.582564712301733*^9, 3.5825648003950877`*^9, 3.5825994458651075`*^9, 3.5825995634581137`*^9, {3.5825995991665764`*^9, 3.5825996198210125`*^9}, {3.582599726759201*^9, 3.582599755978052*^9}, 3.5825999725064325`*^9, 3.582600040553752*^9, 3.5826003660795236`*^9, 3.5826007534126043`*^9, 3.5826013999713397`*^9, 3.5826017149826927`*^9, { 3.582601756665966*^9, 3.582601780144007*^9}, {3.582601954864314*^9, 3.5826019777027545`*^9}, 3.582603454307748*^9, 3.58260820072555*^9, 3.5826082922977114`*^9, 3.5826108890476723`*^9, 3.582610956970191*^9, { 3.582611003988674*^9, 3.582611078057604*^9}, 3.582611112845665*^9, { 3.582611157492944*^9, 3.5826112975031896`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"dcw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"sq", "=", RowBox[{"Norm", "[", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"tv", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}]}], ";", RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"sq", ">", " ", "0.1"}], " ", "&&", " ", RowBox[{"i", "\[NotEqual]", "j"}]}], ")"}], ",", RowBox[{"1", "/", "sq"}], ",", "0"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Length", "[", "dcw", "]"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dcw", "]"}], "*)"}], " "}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699655579047`*^9}, {3.56921753575448*^9, 3.569217541807291*^9}, {3.569217576283351*^9, 3.5692176436130695`*^9}, { 3.5692176921603546`*^9, 3.569217692768756*^9}, {3.5692177389136367`*^9, 3.569217740192839*^9}, {3.5692222042775583`*^9, 3.5692222070231633`*^9}, { 3.569230669979245*^9, 3.5692306709620466`*^9}, {3.5692308816872168`*^9, 3.5692309970650196`*^9}, {3.5692310297158766`*^9, 3.569231090602784*^9}, { 3.5692311251880445`*^9, 3.569231148868886*^9}, 3.56923793753481*^9, 3.569341165569158*^9, 3.5693418217375107`*^9, {3.5703412254249296`*^9, 3.5703412423509593`*^9}, {3.5704553045038986`*^9, 3.570455320681127*^9}, { 3.57045550485505*^9, 3.5704555063370533`*^9}, {3.5704556421508913`*^9, 3.5704556424784923`*^9}, 3.5704557137862177`*^9, {3.5704564711051474`*^9, 3.5704564908079824`*^9}, {3.570456521602436*^9, 3.5704565228348384`*^9}, { 3.5704569127419233`*^9, 3.5704569202767363`*^9}, 3.5704636205455036`*^9, 3.570596993178934*^9, {3.570855461377095*^9, 3.5708554743563175`*^9}, 3.570855611589759*^9, {3.571840408884818*^9, 3.571840415296429*^9}, { 3.571840465559717*^9, 3.571840473905732*^9}, {3.5720165322617407`*^9, 3.5720165635241957`*^9}, {3.5721934404423375`*^9, 3.57219344758715*^9}, 3.572193479551606*^9, 3.5721935303764954`*^9, {3.5721935661785583`*^9, 3.5721935879405966`*^9}, {3.5721936909943776`*^9, 3.572193697218788*^9}, { 3.5721937395728626`*^9, 3.57219374339487*^9}, {3.5721937963725624`*^9, 3.5721938223154078`*^9}, {3.572193859786674*^9, 3.572193861533877*^9}, 3.5723554650270557`*^9, {3.5723567325136824`*^9, 3.5723567701565485`*^9}, 3.572621740954589*^9}], Cell[BoxData["116"], "Output", CellChangeTimes->{ 3.5825628307980285`*^9, 3.5825635767757387`*^9, 3.5825636693775015`*^9, 3.5825637948329215`*^9, 3.582563849011817*^9, 3.5825639210059433`*^9, 3.582564075181014*^9, 3.5825641409663296`*^9, 3.5825642920057945`*^9, { 3.5825644147936106`*^9, 3.5825644393168535`*^9}, 3.5825645246022034`*^9, 3.5825646265327826`*^9, 3.5825647126449337`*^9, 3.5825648005042877`*^9, 3.582599445958708*^9, 3.582599563551714*^9, {3.5825995992601767`*^9, 3.5825996199146132`*^9}, {3.5825997268684006`*^9, 3.5825997560872526`*^9}, 3.5825999760632386`*^9, 3.582600040662952*^9, 3.5826003661887236`*^9, 3.5826007535062037`*^9, 3.5826014000805397`*^9, 3.582601715091893*^9, { 3.5826017567595663`*^9, 3.582601780237608*^9}, {3.5826019549579144`*^9, 3.5826019777963543`*^9}, 3.582603454401348*^9, 3.5826082008191504`*^9, 3.582608292406911*^9, 3.5826108891568723`*^9, 3.5826109570637913`*^9, { 3.582611004082274*^9, 3.5826110781668043`*^9}, 3.5826111129392653`*^9, { 3.5826111575865436`*^9, 3.5826112975967894`*^9}}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"Vee", "=", "0.0"}], ";", " ", RowBox[{"Vnn", "=", "0.0"}], ";"}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.568910199825492*^9}, 3.568910617609826*^9, {3.56891263539537*^9, 3.568912638842976*^9}, {3.568952611212014*^9, 3.5689526227248344`*^9}, { 3.5689527476498537`*^9, 3.5689527480086546`*^9}, {3.5689530637688093`*^9, 3.5689530642368097`*^9}, {3.569133363948546*^9, 3.569133373698563*^9}, { 3.5691350563331184`*^9, 3.56913505725352*^9}, 3.5691351502452836`*^9, { 3.569135237792637*^9, 3.5691352453118505`*^9}, {3.5691353071659594`*^9, 3.5691353166039753`*^9}, {3.5691447439722476`*^9, 3.5691448093675623`*^9}, {3.569146067386572*^9, 3.569146078244191*^9}, { 3.5691478509845047`*^9, 3.5691478547909117`*^9}, {3.569159874789311*^9, 3.56915988004652*^9}, {3.5691671967299757`*^9, 3.569167196901576*^9}, 3.5691672337020407`*^9, {3.5691672688489027`*^9, 3.5691672717661076`*^9}, 3.569171387282002*^9, 3.5692335989467897`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"all", " ", "clouds", " ", "repulsion"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "bt"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", RowBox[{"i", "+", "1"}]}], ",", RowBox[{"j", "\[LessEqual]", "bt"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "i", "]"}], "]"}], "*", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "j", "]"}], "]"}], "/", RowBox[{"dw", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}]}]}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "Vee"}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.568910199825492*^9}, 3.568910617609826*^9, {3.56891263539537*^9, 3.568912638842976*^9}, {3.568952611212014*^9, 3.5689526227248344`*^9}, { 3.5689527476498537`*^9, 3.5689527480086546`*^9}, {3.5689530637688093`*^9, 3.5689530642368097`*^9}, {3.569133363948546*^9, 3.569133373698563*^9}, { 3.5691350563331184`*^9, 3.56913505725352*^9}, 3.5691351502452836`*^9, { 3.569135237792637*^9, 3.5691352453118505`*^9}, {3.5691353071659594`*^9, 3.5691353166039753`*^9}, {3.5691447439722476`*^9, 3.5691448093675623`*^9}, {3.569146067386572*^9, 3.569146078244191*^9}, { 3.5691478509845047`*^9, 3.5691478969889855`*^9}, {3.569149270524598*^9, 3.569149283675421*^9}, {3.5691523005437512`*^9, 3.5691523013861527`*^9}, { 3.570457123841494*^9, 3.5704571330923104`*^9}, {3.570457176959587*^9, 3.570457191296013*^9}, {3.570463789649801*^9, 3.570463797637015*^9}, { 3.5704639300032473`*^9, 3.5704639472412777`*^9}, {3.570464099403945*^9, 3.5704641196371803`*^9}, {3.570464183737693*^9, 3.5704641855628963`*^9}, { 3.570855532092019*^9, 3.5708555433240385`*^9}, {3.581846907745283*^9, 3.581846916138098*^9}}], Cell[BoxData["2086.488947004687`"], "Output", CellChangeTimes->{ 3.5825628308292284`*^9, 3.5825635768069386`*^9, 3.5825636696739016`*^9, 3.5825637950981216`*^9, 3.582563849277017*^9, 3.5825639212867436`*^9, 3.5825640754462147`*^9, 3.5825641414811306`*^9, 3.5825642925049953`*^9, { 3.5825644153084116`*^9, 3.5825644398316545`*^9}, 3.5825645251170044`*^9, 3.582564627016383*^9, 3.5825647142985363`*^9, 3.582564800535488*^9, 3.5825994459899073`*^9, 3.5825995635829144`*^9, {3.582599599291377*^9, 3.5825996199614134`*^9}, {3.582599726899601*^9, 3.582599756118452*^9}, 3.5825999769524403`*^9, 3.582600040694152*^9, 3.582600366219924*^9, 3.582600753537404*^9, 3.58260140011174*^9, 3.582601715123093*^9, { 3.5826017567907667`*^9, 3.5826017802688074`*^9}, {3.5826019549891143`*^9, 3.582601977843155*^9}, 3.582603454448148*^9, 3.5826082008659506`*^9, 3.5826082924381113`*^9, 3.582610889188072*^9, 3.5826109570949917`*^9, { 3.582611004113474*^9, 3.5826110781980047`*^9}, 3.582611112970465*^9, { 3.5826111576177435`*^9, 3.58261129762799*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "half", " ", "cloud", " ", "with", " ", "other", " ", "common", " ", RowBox[{"halfcloud", ":", " ", RowBox[{"subtract", " ", "WW"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Vee", "=", RowBox[{"Vee", "-", RowBox[{ RowBox[{"(", RowBox[{"nj", "+", "2"}], ")"}], "*", RowBox[{"0.25", "/", RowBox[{"(", RowBox[{"rpo", "+", "rpi"}], ")"}]}]}]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"nj", " ", "C"}], " ", "+", " ", RowBox[{"4", " ", "N"}]}], " ", "*)"}], "\[IndentingNewLine]", "Vee", "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.571840548723463*^9, 3.571840579798718*^9}, { 3.5718477253093*^9, 3.5718477304573092`*^9}, {3.572620810756155*^9, 3.5726208298349886`*^9}, {3.5726208600522413`*^9, 3.5726208972739067`*^9}, {3.57279778559276*^9, 3.57279781975682*^9}, { 3.5732072289995155`*^9, 3.5732072309183187`*^9}, {3.5732072939268293`*^9, 3.573207467867135*^9}, {3.574088506132474*^9, 3.57408851499329*^9}, { 3.5740885486269484`*^9, 3.5740885498593507`*^9}, 3.5740886113234587`*^9, { 3.574502690104803*^9, 3.5745027760297537`*^9}, {3.581841791381897*^9, 3.5818418385563793`*^9}, {3.581846301091418*^9, 3.581846309063032*^9}, { 3.5825996635478897`*^9, 3.582599703093959*^9}, {3.582601392810927*^9, 3.582601393232128*^9}}], Cell[BoxData["2084.524661290401`"], "Output", CellChangeTimes->{ 3.5825628308448286`*^9, 3.5825635768225384`*^9, 3.582563669907902*^9, 3.5825637951761217`*^9, 3.582563849370617*^9, 3.5825639213647437`*^9, 3.5825640754930143`*^9, 3.5825641414811306`*^9, 3.5825642925205956`*^9, { 3.5825644153552113`*^9, 3.5825644398472548`*^9}, 3.5825645251170044`*^9, 3.5825646270319834`*^9, 3.5825647143297367`*^9, 3.582564800535488*^9, 3.5825994460055075`*^9, 3.5825995635985146`*^9, {3.582599599306977*^9, 3.5825996199614134`*^9}, {3.582599726899601*^9, 3.5825997561340523`*^9}, 3.5825999769680405`*^9, 3.582600040709752*^9, 3.582600366235524*^9, 3.5826007535530043`*^9, 3.58260140011174*^9, 3.582601715138693*^9, { 3.5826017568063664`*^9, 3.5826017802844076`*^9}, {3.5826019550047145`*^9, 3.582601977843155*^9}, 3.582603454463748*^9, 3.5826082008815503`*^9, 3.5826082924381113`*^9, 3.5826108892036724`*^9, 3.582610957110592*^9, { 3.582611004129074*^9, 3.5826110781980047`*^9}, 3.5826111129860654`*^9, { 3.5826111576333437`*^9, 3.5826112976435895`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"sc", "=", "0.3767"}], ";", " ", RowBox[{"(*", " ", RowBox[{"core", " ", "clouds"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", "bc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sc", "/", RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}]}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"sw", "=", "0.3767"}], ";", " ", RowBox[{"(*", " ", RowBox[{"bonding", " ", "clouds"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", "nb"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sw", "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}]}]}]}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", "2"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sw", "/", "rln"}]}]}]}]}], "]"}], "\[IndentingNewLine]", "Vee"}], "Input", CellChangeTimes->{{3.5689548890696163`*^9, 3.568955116299615*^9}, { 3.5689552553894596`*^9, 3.5689552575266633`*^9}, {3.5689552936875267`*^9, 3.5689553203323736`*^9}, {3.568955404229321*^9, 3.568955433245372*^9}, 3.5689554882822685`*^9, 3.5689562157115464`*^9, {3.568956283961666*^9, 3.5689562858180695`*^9}, {3.5689566111878405`*^9, 3.5689566291278725`*^9}, {3.5689566695319433`*^9, 3.5689567220104356`*^9}, {3.5690810958835616`*^9, 3.569081104525977*^9}, { 3.5691717160681796`*^9, 3.569171751714242*^9}, {3.5691717855663013`*^9, 3.5691719006789036`*^9}, 3.569234247377528*^9, {3.569235622381544*^9, 3.569235625142749*^9}, {3.5692356799612455`*^9, 3.569235740536152*^9}, { 3.57045575500149*^9, 3.5704557604770994`*^9}, {3.57046440981329*^9, 3.5704644333849316`*^9}, {3.5705963024877205`*^9, 3.5705963300061693`*^9}, {3.5706010463712544`*^9, 3.570601069225295*^9}, { 3.5706012097659416`*^9, 3.5706012109983435`*^9}, {3.570601290948484*^9, 3.570601291619285*^9}, {3.570601333099758*^9, 3.570601444951955*^9}, 3.5706014761208096`*^9, {3.570601526633698*^9, 3.570601615179454*^9}, { 3.5708576202336864`*^9, 3.5708576267544985`*^9}, {3.5708577990100007`*^9, 3.5708578016152053`*^9}, {3.5708580423548284`*^9, 3.570858044429632*^9}, { 3.570858075754487*^9, 3.5708581072821426`*^9}, {3.570858449889944*^9, 3.5708585756105647`*^9}, {3.572795632149378*^9, 3.5727956355657835`*^9}, { 3.5728516649872932`*^9, 3.5728517189321885`*^9}, {3.572851825152775*^9, 3.572851850284419*^9}, {3.5728520019946856`*^9, 3.572852210645052*^9}, 3.573124800838154*^9, {3.5740886250202827`*^9, 3.574088677311575*^9}, { 3.574089214342518*^9, 3.5740892207541294`*^9}, {3.574089308987884*^9, 3.5740893677999873`*^9}, {3.574227207798621*^9, 3.5742272123888836`*^9}, { 3.574341156185933*^9, 3.574341159477539*^9}, {3.5743412228292503`*^9, 3.57434125707131*^9}, {3.5743412876941643`*^9, 3.574341318051818*^9}, { 3.5745028253570404`*^9, 3.5745028335782547`*^9}, {3.5818462519201317`*^9, 3.581846257723342*^9}, {3.5818463776407523`*^9, 3.5818464364528556`*^9}, { 3.581848022850842*^9, 3.581848080399343*^9}, {3.5818481320042334`*^9, 3.581848134890239*^9}, {3.581848170707902*^9, 3.581848224949197*^9}, { 3.5825995894165597`*^9, 3.582599614735404*^9}, {3.5825997489892397`*^9, 3.5825997510796432`*^9}, {3.5826017513619566`*^9, 3.5826017739819965`*^9}, {3.582608274186079*^9, 3.58260827463848*^9}, { 3.582611047746751*^9, 3.5826111074636555`*^9}, {3.5826111517209334`*^9, 3.5826112924019804`*^9}}], Cell[BoxData["2238.651133536753`"], "Output", CellChangeTimes->{ 3.5825628308604283`*^9, 3.5825635768381386`*^9, 3.5825636700015025`*^9, 3.5825637952229223`*^9, 3.5825638494174175`*^9, 3.582563921411544*^9, 3.582564075539815*^9, 3.5825641414967303`*^9, 3.5825642925205956`*^9, { 3.5825644153708115`*^9, 3.5825644398628545`*^9}, 3.582564525132604*^9, 3.582564627047583*^9, 3.5825647143297367`*^9, 3.5825648005510883`*^9, 3.5825994460211077`*^9, 3.5825995636141143`*^9, {3.5825995993225765`*^9, 3.582599619977013*^9}, {3.582599726915201*^9, 3.5825997561340523`*^9}, 3.58259997698364*^9, 3.5826000407253523`*^9, 3.582600366251124*^9, 3.5826007535686045`*^9, 3.5826014001273403`*^9, 3.582601715138693*^9, { 3.582601756821966*^9, 3.582601780300008*^9}, {3.582601955020314*^9, 3.5826019778587546`*^9}, 3.582603454479348*^9, 3.5826082008971505`*^9, 3.5826082924537115`*^9, 3.5826108892036724`*^9, 3.5826109571261916`*^9, { 3.5826110041446743`*^9, 3.5826110782136045`*^9}, 3.582611113001665*^9, { 3.582611157648944*^9, 3.5826112976435895`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"all", " ", "nuclei", " ", "with", " ", "all", " ", "clouds"}], ",", " ", RowBox[{ RowBox[{"except", " ", "i"}], " ", "=", " ", "j"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Vne", "=", RowBox[{"cnv", ".", RowBox[{"(", RowBox[{"ow", ".", "dcw"}], ")"}]}]}]}]], "Input", CellChangeTimes->{ 3.569233528637466*^9, 3.5692342309507*^9, {3.5704557844231415`*^9, 3.570455793127957*^9}}], Cell[BoxData[ RowBox[{"-", "4257.00441491446`"}]], "Output", CellChangeTimes->{ 3.582562830876028*^9, 3.582563576853739*^9, 3.582563672591107*^9, 3.5825637971573257`*^9, 3.5825638513206205`*^9, 3.5825639235019474`*^9, 3.582564077443018*^9, 3.5825641433531337`*^9, 3.582564294532999*^9, { 3.582564418054016*^9, 3.5825644424056587`*^9}, 3.5825645276910086`*^9, 3.582564628092785*^9, 3.5825647178241425`*^9, 3.5825648005510883`*^9, 3.582599446036708*^9, 3.582599563629714*^9, {3.5825995993225765`*^9, 3.5825996199926133`*^9}, {3.5825997269308014`*^9, 3.5825997561496525`*^9}, 3.5825999769992404`*^9, 3.5826000407409525`*^9, 3.582600366266724*^9, 3.5826007535686045`*^9, 3.58260140014294*^9, 3.582601715154293*^9, { 3.5826017568375664`*^9, 3.5826017803156075`*^9}, {3.582601955020314*^9, 3.5826019778743544`*^9}, 3.5826034544949484`*^9, 3.5826082009127502`*^9, 3.5826082924693117`*^9, 3.5826108892192726`*^9, 3.5826109571261916`*^9, { 3.5826110041446743`*^9, 3.582611078229204*^9}, 3.582611113001665*^9, { 3.582611157648944*^9, 3.5826112976591897`*^9}}] }, Open ]], Cell[BoxData[ RowBox[{"(*", " ", RowBox[{ "core", " ", "nuclei", " ", "in", " ", "their", " ", "cloud", " ", "centers"}], " ", "*)"}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.5689102262831383`*^9}, {3.5689126851126575`*^9, 3.5689126875306616`*^9}, {3.5690878255169816`*^9, 3.569087857185037*^9}, { 3.5691452963224173`*^9, 3.569145370484948*^9}, {3.5691454640695124`*^9, 3.5691454653799143`*^9}, {3.5691523784970884`*^9, 3.569152451988817*^9}, { 3.569152629610729*^9, 3.5691526609667845`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "bc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vne", "=", RowBox[{"Vne", "-", RowBox[{"3", "*", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], "/", RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}]}]}], "]"}], "\[IndentingNewLine]", "Vne"}], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.5689102262831383`*^9}, {3.5689126851126575`*^9, 3.5689126875306616`*^9}, {3.5690878255169816`*^9, 3.569087857185037*^9}, { 3.5691452963224173`*^9, 3.569145370484948*^9}, {3.5691454640695124`*^9, 3.5691454653799143`*^9}, {3.5691523784970884`*^9, 3.569152451988817*^9}, { 3.569152629610729*^9, 3.5691526649915915`*^9}, 3.569170044088443*^9, { 3.581846846047175*^9, 3.581846856499193*^9}}], Cell[BoxData[ RowBox[{"-", "6052.475522751996`"}]], "Output", CellChangeTimes->{ 3.5825628308916283`*^9, 3.582563576853739*^9, 3.5825636748063107`*^9, 3.5825637988421288`*^9, 3.5825638529430237`*^9, 3.58256392517115*^9, 3.5825640790186205`*^9, 3.5825641449911366`*^9, 3.5825642962490025`*^9, { 3.58256442039402*^9, 3.582564444854863*^9}, 3.582564529906213*^9, 3.5825646289039865`*^9, 3.5825647211313486`*^9, 3.582564800566688*^9, 3.582599446036708*^9, 3.582599563629714*^9, {3.5825995993381767`*^9, 3.582599620008213*^9}, {3.5825997269308014`*^9, 3.5825997561652527`*^9}, 3.58259997701484*^9, 3.5826000407565527`*^9, 3.582600366282324*^9, 3.5826007535842047`*^9, 3.58260140015854*^9, 3.5826017151698933`*^9, { 3.5826017568375664`*^9, 3.5826017803156075`*^9}, {3.5826019550359144`*^9, 3.5826019778899546`*^9}, 3.582603454510548*^9, 3.5826082009283504`*^9, 3.5826082924849114`*^9, 3.5826108892348723`*^9, 3.5826109571417913`*^9, { 3.5826110041602745`*^9, 3.5826110782448044`*^9}, 3.5826111130172653`*^9, { 3.582611157664544*^9, 3.58261129767479*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "protons", " ", "in", " ", "their", " ", "bonding", " ", "cloud"}], ",", " ", RowBox[{"distance", " ", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], " ", "to", " ", "cloud", " ", "center"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"cw", "+", "1"}]}], ",", RowBox[{"i", "\[LessEqual]", "nb"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vne", "=", RowBox[{"Vne", "-", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ")"}], "^", "2"}]}], ")"}], "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}]}]}]}], "]"}], "\[IndentingNewLine]", "Vne"}]}]], "Input", CellChangeTimes->{{3.5692316245917215`*^9, 3.5692316336397376`*^9}, { 3.5818468618032026`*^9, 3.581846869806017*^9}}], Cell[BoxData[ RowBox[{"-", "6085.074292882405`"}]], "Output", CellChangeTimes->{ 3.5825628309072285`*^9, 3.582563576869339*^9, 3.5825636770059147`*^9, 3.5825638005581317`*^9, 3.5825638545654263`*^9, 3.5825639268403535`*^9, 3.5825640805786233`*^9, 3.5825641466603394`*^9, 3.5825642979338055`*^9, { 3.582564425339229*^9, 3.5825644478812685`*^9}, 3.5825645321058164`*^9, 3.5825646309787903`*^9, 3.582564724313754*^9, 3.582564800566688*^9, 3.5825994460523076`*^9, 3.582599563645314*^9, {3.582599599353777*^9, 3.582599620008213*^9}, {3.582599726946401*^9, 3.5825997561652527`*^9}, 3.5825999770304403`*^9, 3.5826000407721524`*^9, 3.582600366297924*^9, 3.5826007535998044`*^9, 3.58260140015854*^9, 3.5826017151854935`*^9, { 3.5826017568531666`*^9, 3.5826017803312073`*^9}, {3.5826019550515146`*^9, 3.5826019778899546`*^9}, 3.582603454526148*^9, 3.582608200959551*^9, 3.5826082924849114`*^9, 3.582610889250472*^9, 3.5826109571573915`*^9, { 3.5826110041758747`*^9, 3.5826110782448044`*^9}, 3.5826111130328655`*^9, { 3.5826111576801443`*^9, 3.5826112976903896`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", "nucleus"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", RowBox[{"i", "+", "1"}]}], ",", RowBox[{"j", "\[LessEqual]", "n"}], ",", RowBox[{"j", "++"}], ",", RowBox[{"Vnn", "=", RowBox[{"Vnn", "+", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], "*", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "j", "]"}], "]"}], "/", RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}]}]}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "Vnn"}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.5689102262831383`*^9}, {3.5689126851126575`*^9, 3.5689126875306616`*^9}, {3.5690878255169816`*^9, 3.569087857185037*^9}, { 3.5691452963224173`*^9, 3.569145370484948*^9}, {3.5691454640695124`*^9, 3.5691454653799143`*^9}, {3.5691523784970884`*^9, 3.569152451988817*^9}, { 3.569152629610729*^9, 3.5691526609667845`*^9}, 3.5691527650033674`*^9, { 3.5691528050174375`*^9, 3.5691528220994673`*^9}, {3.5691528694611506`*^9, 3.5691529180864363`*^9}, {3.5691531888249116`*^9, 3.569153192974519*^9}, 3.569153245359411*^9, {3.5691532970111017`*^9, 3.5691533046239147`*^9}, { 3.5691708905147295`*^9, 3.56917090235515*^9}, {3.5691714357512875`*^9, 3.569171449775712*^9}, 3.56917197825784*^9, {3.581846875390826*^9, 3.5818468831752405`*^9}}], Cell[BoxData["1868.6059717608046`"], "Output", CellChangeTimes->{ 3.5825628309228287`*^9, 3.5825635768849387`*^9, 3.582563677099515*^9, 3.5825638006361313`*^9, 3.5825638546278267`*^9, 3.582563927058754*^9, 3.5825640805942235`*^9, 3.5825641466759396`*^9, 3.582564297965005*^9, { 3.58256442602563*^9, 3.5825644481620693`*^9}, 3.582564532121416*^9, 3.58256463100999*^9, 3.5825647244853544`*^9, 3.582564800582288*^9, 3.5825994460679073`*^9, 3.5825995636609144`*^9, {3.582599599369377*^9, 3.5825996200238132`*^9}, {3.582599726962001*^9, 3.5825997561808524`*^9}, 3.5825999770460405`*^9, 3.582600040787752*^9, 3.5826003663135242`*^9, 3.582600753615404*^9, 3.58260140017414*^9, 3.582601715201093*^9, { 3.5826017568687663`*^9, 3.5826017803468075`*^9}, {3.582601955067115*^9, 3.582601977905555*^9}, 3.582603454541748*^9, 3.582608200975151*^9, 3.582608292500511*^9, 3.5826108892660723`*^9, 3.5826109571729918`*^9, { 3.5826110041914744`*^9, 3.5826110782604046`*^9}, 3.5826111130484657`*^9, { 3.582611157695744*^9, 3.58261129770599*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ratio", "=", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"Vne", "+", RowBox[{"2", "*", "Vnn"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{"Vee", "-", "Vnn"}], ")"}]}]}]], "Input"], Cell[BoxData["6.344799478238705`"], "Output", CellChangeTimes->{ 3.582562830938429*^9, 3.5825635768849387`*^9, 3.5825636793459187`*^9, 3.582563802289735*^9, 3.5825638562502294`*^9, 3.582563928805957*^9, 3.5825640821542263`*^9, 3.58256414669154*^9, 3.582564297965005*^9, { 3.5825644260568304`*^9, 3.5825644481932693`*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.582564724532154*^9, 3.582564800597888*^9, 3.5825994460835075`*^9, 3.5825995636765146`*^9, {3.582599599369377*^9, 3.5825996200394135`*^9}, {3.582599726977601*^9, 3.582599756196452*^9}, 3.5825999770616407`*^9, 3.5826000408033524`*^9, 3.582600366329124*^9, 3.582600753615404*^9, 3.58260140018974*^9, 3.582601715201093*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.582601977921155*^9}, 3.5826034545573483`*^9, 3.582608200990751*^9, 3.5826082925161114`*^9, 3.5826108892816725`*^9, 3.5826109571729918`*^9, { 3.5826110041914744`*^9, 3.5826110782760043`*^9}, 3.582611113064066*^9, { 3.582611157711344*^9, 3.58261129772159*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{"Vee", "\[IndentingNewLine]", "Vnn", "\[IndentingNewLine]", \ "Vne", "\[IndentingNewLine]", RowBox[{ RowBox[{"Tpi", " ", "=", RowBox[{ RowBox[{"1.67", "*", RowBox[{"(", RowBox[{"nj", "+", "2"}], ")"}], "*", "0.5", "*", "1.125", "*", RowBox[{"(", RowBox[{ RowBox[{"1", "/", RowBox[{"rpo", "^", "2"}]}], "+", RowBox[{"1", "/", RowBox[{"rpi", "^", "2"}]}]}], ")"}]}], " ", "+", RowBox[{"1.67", "*", "2", "*", "1.125", "*", RowBox[{"(", RowBox[{"2", "/", RowBox[{"rln", "^", "2"}]}], ")"}]}]}]}], RowBox[{"(*", " ", RowBox[{"pi", " ", "kin", " ", "e", " ", "added"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Tln", " ", "=", RowBox[{"1.67", "*", "2", "*", "2.25", "*", RowBox[{"(", RowBox[{"1", "/", RowBox[{"rln", "^", "2"}]}], ")"}]}]}], " ", RowBox[{"(*", " ", RowBox[{ "lp", " ", "kin", " ", "e", " ", "of", " ", "2", " ", "N", " ", "added"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"Vtot", "=", RowBox[{"Vne", "+", "Vee", "+", "Vnn"}]}], "\[IndentingNewLine]", RowBox[{"Ttot", "=", RowBox[{"Ttot", "+", "Tpi", "+", "Tln"}]}], "\[IndentingNewLine]", RowBox[{"Vir", " ", "=", RowBox[{ RowBox[{"-", "Vtot"}], "/", "Ttot"}]}], "\[IndentingNewLine]", RowBox[{"Etot", " ", "=", RowBox[{"Ttot", "+", "Vtot"}]}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.5689074950860367`*^9, 3.5689075109980645`*^9}, { 3.568910298074465*^9, 3.5689103015064707`*^9}, {3.568910724064413*^9, 3.5689107693044925`*^9}, {3.568955368910859*^9, 3.568955378629676*^9}, { 3.568955601366867*^9, 3.568955616218093*^9}, {3.5704638504275074`*^9, 3.570463876370353*^9}, {3.570464305074706*^9, 3.5704643133895206`*^9}, { 3.570464352171189*^9, 3.570464353231991*^9}, {3.570712404698539*^9, 3.5707124150569572`*^9}, {3.570809962851386*^9, 3.5708101493809137`*^9}, { 3.5708102160710306`*^9, 3.570810245165082*^9}, {3.5708102767551374`*^9, 3.5708103693413*^9}, {3.570810404207361*^9, 3.5708104232081947`*^9}, { 3.5708104788690925`*^9, 3.5708104825818987`*^9}, {3.5708105169643593`*^9, 3.570810517884761*^9}, {3.570810561767638*^9, 3.5708105625476394`*^9}, { 3.5708106179589367`*^9, 3.570810645648985*^9}, {3.5708552812279787`*^9, 3.570855300572013*^9}, {3.5718406368324184`*^9, 3.5718406454592333`*^9}, 3.57184067742369*^9, {3.572851887958485*^9, 3.5728519643206196`*^9}, 3.573124110349741*^9, 3.5731249811744704`*^9, {3.5732069154233646`*^9, 3.5732069210393744`*^9}, {3.5732069747034683`*^9, 3.57320697542107*^9}, { 3.573207068038432*^9, 3.5732070690212345`*^9}, {3.574088216299565*^9, 3.5740882530844297`*^9}, {3.5740883007893133`*^9, 3.5740884434827642`*^9}, {3.574492507688925*^9, 3.5744925547854075`*^9}, { 3.5745029153379984`*^9, 3.574502916835601*^9}, {3.574502968159691*^9, 3.5745030155993743`*^9}, {3.5745030768762817`*^9, 3.574503080713889*^9}, { 3.581841686674513*^9, 3.5818417371718016`*^9}, {3.581845316005287*^9, 3.5818453173156896`*^9}, {3.5818461745595956`*^9, 3.581846179442404*^9}, { 3.581846777625455*^9, 3.5818467787486567`*^9}, {3.58184699118983*^9, 3.5818469990678434`*^9}, {3.581847819800885*^9, 3.581847823591692*^9}, 3.5818481023641815`*^9, {3.5825993703141747`*^9, 3.58259939025101*^9}, { 3.582599425772272*^9, 3.5825994264586735`*^9}, 3.582599538888071*^9, { 3.5826014692510614`*^9, 3.5826016619269996`*^9}, {3.582601947969102*^9, 3.5826019683115377`*^9}, {3.5826108417483892`*^9, 3.5826108676912346`*^9}, {3.5826109148345175`*^9, 3.582610949294978*^9}, { 3.5826109888722477`*^9, 3.5826110221003056`*^9}}], Cell[BoxData["2238.651133536753`"], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.58261129772159*^9}}], Cell[BoxData["1868.6059717608046`"], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.58261129772159*^9}}], Cell[BoxData[ RowBox[{"-", "6085.074292882405`"}]], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}], Cell[BoxData["25.928540027928864`"], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}], Cell[BoxData["4.840529823847226`"], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}], Cell[BoxData[ RowBox[{"-", "1977.817187584847`"}]], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}], Cell[BoxData["988.8750803074573`"], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}], Cell[BoxData["2.0000677810284304`"], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}], Cell[BoxData[ RowBox[{"-", "988.9421072773897`"}]], "Output", CellChangeTimes->{ 3.5825628309540286`*^9, 3.5825635769005384`*^9, 3.582563679501919*^9, 3.5825638027265353`*^9, 3.5825638563594294`*^9, 3.5825639289931574`*^9, 3.5825640821854267`*^9, 3.58256414669154*^9, 3.582564297980605*^9, { 3.5825644260880303`*^9, 3.582564448224469*^9}, 3.5825645321370163`*^9, 3.58256463102559*^9, 3.5825647245633545`*^9, 3.582564800597888*^9, 3.5825994460991077`*^9, 3.5825995636765146`*^9, {3.5825995993849773`*^9, 3.5825996200394135`*^9}, {3.5825997269932013`*^9, 3.5825997562120523`*^9}, 3.5825999770772405`*^9, 3.5826000408189526`*^9, 3.5826003663447237`*^9, 3.5826007536310043`*^9, 3.58260140018974*^9, 3.582601715216693*^9, { 3.5826017568843665`*^9, 3.5826017803624077`*^9}, {3.5826019550827146`*^9, 3.5826019779367547`*^9}, 3.5826034545729485`*^9, 3.5826082010219507`*^9, 3.5826082925161114`*^9, 3.5826108892972727`*^9, 3.582610957188592*^9, { 3.582611004207074*^9, 3.5826110782916045`*^9}, 3.5826111130796657`*^9, { 3.582611157726944*^9, 3.5826112977371902`*^9}}] }, Open ]] }, WindowSize->{982, 937}, WindowMargins->{{Automatic, 228}, {Automatic, 0}}, PrintingCopies->1, PrintingPageRange->{32000, 32000}, PrintingOptions->{"Magnification"->1., "PaperOrientation"->"Portrait", "PaperSize"->{595.2, 841.8}}, FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (January 25, 2013)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[557, 20, 2049, 33, 72, "Input"], Cell[CellGroupData[{ Cell[2631, 57, 1231, 23, 72, "Input"], Cell[3865, 82, 5676, 94, 393, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[9578, 181, 809, 13, 31, "Input"], Cell[10390, 196, 1814, 26, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[12241, 227, 955, 14, 31, "Input"], Cell[13199, 243, 1060, 15, 31, "Output"] }, Open ]], Cell[14274, 261, 668, 18, 72, "Input"], Cell[CellGroupData[{ Cell[14967, 283, 1560, 29, 31, "Input"], Cell[16530, 314, 1796, 26, 31, "Output"] }, Open ]], Cell[18341, 343, 1419, 23, 31, "Input"], Cell[19763, 368, 1592, 29, 31, "Input"], Cell[CellGroupData[{ Cell[21380, 401, 1234, 18, 31, "Input"], Cell[22617, 421, 3669, 93, 72, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[26323, 519, 697, 14, 31, "Input"], Cell[27023, 535, 1523, 23, 52, "Output"] }, Open ]], Cell[28561, 561, 908, 24, 31, "Input"], Cell[CellGroupData[{ Cell[29494, 589, 5862, 125, 172, "Input"], Cell[35359, 716, 1663, 25, 72, "Output"], Cell[37025, 743, 1661, 25, 72, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[38723, 773, 568, 13, 31, "Input"], Cell[39294, 788, 1816, 26, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[41147, 819, 521, 8, 31, "Input"], Cell[41671, 829, 1073, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[42781, 849, 1401, 38, 92, "Input"], Cell[44185, 889, 1579, 24, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[45801, 918, 827, 23, 92, "Input"], Cell[46631, 943, 1076, 15, 31, "Output"], Cell[47710, 960, 1076, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[48823, 980, 4977, 123, 232, "Input"], Cell[53803, 1105, 10266, 182, 375, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[64106, 1292, 1303, 19, 31, "Input"], Cell[65412, 1313, 32564, 779, 256, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[98013, 2097, 2198, 43, 72, "Input"], Cell[100214, 2142, 37023, 528, 611, "Output"] }, Open ]], Cell[137252, 2673, 1331, 36, 72, "Input"], Cell[CellGroupData[{ Cell[138608, 2713, 5366, 92, 72, "Input"], Cell[143977, 2807, 11556, 172, 611, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[155570, 2984, 2570, 53, 132, "Input"], Cell[158143, 3039, 1051, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[159231, 3059, 2598, 53, 92, "Input"], Cell[161832, 3114, 1291, 20, 31, "Output"] }, Open ]], Cell[163138, 3137, 10233, 208, 232, "Input"], Cell[CellGroupData[{ Cell[173396, 3349, 1990, 42, 72, "Input"], Cell[175389, 3393, 1550, 24, 52, "Output"], Cell[176942, 3419, 1132, 17, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[178111, 3441, 623, 15, 52, "Input"], Cell[178737, 3458, 1209, 19, 31, "Output"], Cell[179949, 3479, 1141, 17, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[181127, 3501, 2789, 54, 72, "Input"], Cell[183919, 3557, 1436, 23, 52, "Output"], Cell[185358, 3582, 1135, 17, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[186530, 3604, 3698, 81, 132, "Input"], Cell[190231, 3687, 1713, 26, 72, "Output"] }, Open ]], Cell[191959, 3716, 2072, 49, 112, "Input"], Cell[194034, 3767, 561, 12, 52, "Input"], Cell[194598, 3781, 2148, 49, 92, "Input"], Cell[196749, 3832, 2452, 56, 112, "Input"], Cell[199204, 3890, 1759, 41, 72, "Input"], Cell[CellGroupData[{ Cell[200988, 3935, 923, 20, 31, "Input"], Cell[201914, 3957, 1091, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[203042, 3977, 711, 18, 31, "Input"], Cell[203756, 3997, 1076, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[204869, 4017, 507, 10, 31, "Input"], Cell[205379, 4029, 1087, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[206503, 4049, 823, 23, 31, "Input"], Cell[207329, 4074, 1078, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[208444, 4094, 204, 4, 31, "Input"], Cell[208651, 4100, 1073, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[209761, 4120, 491, 14, 31, "Input"], Cell[210255, 4136, 6097, 132, 596, "Output"] }, Open ]], Cell[216367, 4271, 1975, 34, 72, "Input"], Cell[CellGroupData[{ Cell[218367, 4309, 4565, 108, 212, "Input"], Cell[222935, 4419, 1299, 20, 31, "Output"], Cell[224237, 4441, 1053, 15, 31, "Output"], Cell[225293, 4458, 4854, 146, 596, "Output"] }, Open ]], Cell[230162, 4607, 10860, 195, 172, "Input"], Cell[241025, 4804, 11008, 295, 1312, "Input"], Cell[252036, 5101, 3726, 75, 52, "Input"], Cell[255765, 5178, 3338, 55, 92, "Input"], Cell[259106, 5235, 13042, 320, 1292, "Input"], Cell[272151, 5557, 5416, 99, 70, "Input"], Cell[277570, 5658, 6490, 124, 212, "Input"], Cell[284063, 5784, 20753, 512, 1312, "Input"], Cell[CellGroupData[{ Cell[304841, 6300, 4863, 78, 72, "Input"], Cell[309707, 6380, 3404, 73, 170, "Output"] }, Open ]], Cell[313126, 6456, 1721, 44, 112, "Input"], Cell[314850, 6502, 782, 12, 31, "Input"], Cell[315635, 6516, 3175, 60, 92, "Input"], Cell[CellGroupData[{ Cell[318835, 6580, 939, 17, 72, "Input"], Cell[319777, 6599, 4777, 102, 192, "Output"], Cell[324557, 6703, 1050, 15, 31, "Output"], Cell[325610, 6720, 1050, 15, 31, "Output"] }, Open ]], Cell[326675, 6738, 10201, 233, 192, "Input"], Cell[336879, 6973, 6427, 103, 92, "Input"], Cell[343309, 7078, 10215, 234, 192, "Input"], Cell[353527, 7314, 5925, 93, 31, "Input"], Cell[359455, 7409, 12345, 216, 112, "Input"], Cell[371803, 7627, 12810, 228, 152, "Input"], Cell[CellGroupData[{ Cell[384638, 7859, 9931, 142, 72, "Input"], Cell[394572, 8003, 147069, 2579, 407, 28172, 630, "CachedBoxData", "BoxData", \ "Output"] }, Open ]], Cell[CellGroupData[{ Cell[541678, 10587, 950, 23, 72, "Input"], Cell[542631, 10612, 120008, 2108, 375, 22153, 504, "CachedBoxData", \ "BoxData", "Output"] }, Open ]], Cell[CellGroupData[{ Cell[662676, 12725, 9646, 136, 72, "Input"], Cell[672325, 12863, 41349, 716, 375, 15952, 300, "CachedBoxData", "BoxData", \ "Output"] }, Open ]], Cell[CellGroupData[{ Cell[713711, 13584, 6124, 142, 232, "Input"], Cell[719838, 13728, 1052, 15, 31, "Output"], Cell[720893, 13745, 13837, 322, 1766, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[734767, 14072, 2575, 48, 92, "Input"], Cell[737345, 14122, 1060, 15, 31, "Output"] }, Open ]], Cell[738420, 14140, 1841, 29, 52, "Input"], Cell[CellGroupData[{ Cell[740286, 14173, 5223, 112, 192, "Input"], Cell[745512, 14287, 7068, 206, 1766, "Output"], Cell[752583, 14495, 1063, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[753683, 14515, 7042, 135, 132, "Input"], Cell[760728, 14652, 4723, 133, 132, "Output"], Cell[765454, 14787, 1060, 15, 31, "Output"], Cell[766517, 14804, 2554, 37, 92, "Output"], Cell[769074, 14843, 1060, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[770171, 14863, 632, 18, 52, "Input"], Cell[770806, 14883, 1082, 16, 31, "Output"], Cell[771891, 14901, 1065, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[772993, 14921, 4670, 80, 92, "Input"], Cell[777666, 15003, 1083, 15, 31, "Output"] }, Open ]], Cell[778764, 15021, 1863, 27, 31, "Input"], Cell[CellGroupData[{ Cell[780652, 15052, 2995, 56, 112, "Input"], Cell[783650, 15110, 1082, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[784769, 15130, 1465, 32, 92, "Input"], Cell[786237, 15164, 1091, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[787365, 15184, 3991, 79, 132, "Input"], Cell[791359, 15265, 1087, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[792483, 15285, 499, 15, 52, "Input"], Cell[792985, 15302, 1101, 16, 31, "Output"] }, Open ]], Cell[794101, 15321, 1381, 21, 31, "Input"], Cell[CellGroupData[{ Cell[795507, 15346, 1745, 32, 52, "Input"], Cell[797255, 15380, 1100, 16, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[798392, 15401, 1450, 43, 72, "Input"], Cell[799845, 15446, 1108, 16, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[800990, 15467, 2584, 50, 92, "Input"], Cell[803577, 15519, 1075, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[804689, 15539, 230, 8, 31, "Input"], Cell[804922, 15549, 1074, 15, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[806033, 15569, 3724, 70, 212, "Input"], Cell[809760, 15641, 1090, 15, 31, "Output"], Cell[810853, 15658, 1091, 15, 31, "Output"], Cell[811947, 15675, 1110, 16, 31, "Output"], Cell[813060, 15693, 1094, 15, 31, "Output"], Cell[814157, 15710, 1093, 15, 31, "Output"], Cell[815253, 15727, 1110, 16, 31, "Output"], Cell[816366, 15745, 1093, 15, 31, "Output"], Cell[817462, 15762, 1094, 15, 31, "Output"], Cell[818559, 15779, 1110, 16, 63, "Output"] }, Open ]] } ] *) (* End of internal cache information *)