(* 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[ 380213, 7609] NotebookOptionsPosition[ 374297, 7422] NotebookOutlinePosition[ 374831, 7443] CellTagsIndexPosition[ 374788, 7440] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Kimball", " ", "model", " ", "and", " ", "energy", " ", "derived", " ", "from", " ", "Wolfram", " ", "ChemicalData", " ", "source"}], ",", " ", RowBox[{"ES", " ", "February", " ", "2013"}]}], " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Clear", "[", RowBox[{ "tw", ",", "n2", ",", "n", ",", "nb", ",", "bc", ",", "bh", ",", "u", ",", "u1", ",", "u2", ",", "Vee", ",", "Vne", ",", "Vnn"}], "]"}], ";"}]}]], "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}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ChemicalData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]], "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}], Cell[BoxData[ Graphics3DBox[ {AbsoluteThickness[3], EdgeForm[None], Specularity[ GrayLevel[1], 100], GraphicsComplex3DBox[CompressedData[" 1:eJwtk3lIVFEUxgdttZ2ixTazECNtMJGKXI7puKY4T53GmcmGmXFcxurNjD2n sQwTrYjUSoPqj9SKiCTKwkQqD9lCK0WWRhu2YFKStpFE0b33dOHNcN+9Z/l+ 33mLLFukPB+VShXBHl/2DASFjWsJ0UA4X9O3gV/PCTnqaxF+1rYvqCorhNrr P4JNpwtQ/Je5wM7XYQesNX94FFiWgCq+ZDMsOu8qONCQhXeUa8f9Y7LRxANe 2sAZxTIGAOyIicjtaNICT+83KwjEeWQeFF0pOTQ7Kw1+Zb47dSwrFVjVT1pZ ovr31iCr8mIkNwX2xrKCb0OglKVXD6bjUp4g0gl93hnnEgcswH77vJcMGCUE bAIR75tP+/npKPHE0xLQH40BscN+tB9vh3Et8ww2q4QizCCTvhorPPUwMnuW gdAXqRAXH/1/XTnAy82o0RGfCU7iF25C0c+Ig3R7ZOrDocWfwSxykg1vp67c G1uXiELnRzvxW+dGke9cDj5Js0zVr/YlDh4Z54zSTQ7dlUn3Q5yk5+o26uOS GVMm+izbnaAjHvEeXMiutZfnEj9jMSbxtPlhcDhuX3G/UUOcTrpgJwffq8YH 99mK3EA8Tinkz1gD8fhqpz5WGbGMB7YqpPOiBShvIpxk13sqFRB9jS7Eo0fY GthIvJpLQfTfnIVtoXeL65K7OwWHC17im6TBLoavVrKB6NvrAhE/aSvNxff/ vOMzaP6mhBAHvQNFn9YS2v8yotD13gCCQ+9mbNa0ffszSkv6O0uJx+WdxKnd Rno6Uijvwh3kg95CeStdeGBwe0zEwQyarylbQfCpsqGYjxV24Njuq6x0f79M 9woLoJHzsM6Fv91MoGY98YnJB3/1qyVjRiTk7bY/s5NOXxf5clxL/udugOL+ 32eGmd/x7PXvsHXYwM/dRhg6fSt15Qggc3vmc4NEdc86YKJ4oYYbnGPgYso/ 5ITzYp76Ozn+1hwdRnNDht3QW+FOqH+dQvXK7cA/4xcPdMgx1Fa7SVeAFcr5 95ocTbo3KqSv0kLc3pqAl1nwRYGDnJOkw+U3s/Pe3E4Gca54oCOZdZapJX8a zTQva2So5nFdLuBdP1Rno+CjNqGD+10fTfcDCsmvHjeKeXtiwF14t0lTnkr9 vd+Cr5eMqWiIk8g3pYT879hOOtosxO+xluan1UtzcM9M/ull/AekV1Qm "], { {RGBColor[0.65, 0.7, 0.7], SphereBox[21, 24.], SphereBox[22, 24.], SphereBox[23, 24.], SphereBox[24, 24.], 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.]}, {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.]}, {RGBColor[0.291989, 0.437977, 0.888609], SphereBox[3, 32.], SphereBox[4, 32.]}, {RGBColor[0.800498, 0.201504, 0.192061], SphereBox[2, 31.]}, {RGBColor[0.412698, 0.932689, 0.166398], SphereBox[1, 36.]}, {RGBColor[0.65, 0.7, 0.7], CylinderBox[{41, 21}, 15.], CylinderBox[{42, 22}, 15.], CylinderBox[{43, 23}, 15.], CylinderBox[{44, 24}, 15.], CylinderBox[{45, 25}, 15.], CylinderBox[{46, 26}, 15.], CylinderBox[{47, 27}, 15.], CylinderBox[{48, 28}, 15.], CylinderBox[{49, 29}, 15.], CylinderBox[{50, 30}, 15.], CylinderBox[{51, 31}, 15.], CylinderBox[{52, 32}, 15.], CylinderBox[{53, 33}, 15.]}, {RGBColor[0.4, 0.4, 0.4], CylinderBox[{34, 14}, 15.], CylinderBox[{35, 9}, 15.], CylinderBox[{36, 6}, 15.], CylinderBox[{37, 9}, 15.], CylinderBox[{38, 13}, 15.], CylinderBox[{39, 7}, 15.], CylinderBox[{40, 8}, 15.], CylinderBox[{5, 6}, 15.], CylinderBox[{5, 7}, 15.], CylinderBox[{5, 11}, 15.], CylinderBox[{6, 12}, 15.], CylinderBox[{7, 10}, 15.], CylinderBox[{8, 9}, 15.], CylinderBox[{8, 41}, 15.], CylinderBox[{8, 42}, 15.], CylinderBox[{10, 16}, 15.], CylinderBox[{10, 17}, 15.], CylinderBox[{11, 14}, 15.], CylinderBox[{11, 43}, 15.], CylinderBox[{12, 15}, 15.], CylinderBox[{12, 44}, 15.], CylinderBox[{13, 45}, 15.], CylinderBox[{13, 46}, 15.], CylinderBox[{13, 47}, 15.], CylinderBox[{14, 15}, 15.], CylinderBox[{15, 48}, 15.], CylinderBox[{16, 18}, 15.], CylinderBox[{16, 49}, 15.], CylinderBox[{17, 19}, 15.], CylinderBox[{17, 50}, 15.], CylinderBox[{18, 20}, 15.], CylinderBox[{18, 51}, 15.], CylinderBox[{19, 20}, 15.], CylinderBox[{19, 52}, 15.], CylinderBox[{20, 53}, 15.]}, {RGBColor[0.291989, 0.437977, 0.888609], CylinderBox[{3, 36}, 15.], CylinderBox[{3, 37}, 15.], CylinderBox[{3, 38}, 15.], CylinderBox[{4, 39}, 15.], CylinderBox[{4, 40}, 15.]}, {RGBColor[0.800498, 0.201504, 0.192061], CylinderBox[{2, 35}, 15.]}, {RGBColor[0.412698, 0.932689, 0.166398], CylinderBox[{1, 34}, 15.]}}]}, Boxed->False, ImageSize->305.9124879646499, Lighting->"Neutral", ViewPoint->{1.3, -2.4, -2.}]], "Output", CellChangeTimes->{ 3.569344818559574*^9, 3.56938922315285*^9, 3.5693893815867286`*^9, 3.569389559707842*^9, 3.5693897116989083`*^9, 3.569389784410636*^9, 3.5693899359961023`*^9, 3.569390129779643*^9, 3.5693903415500145`*^9, { 3.5693903926557045`*^9, 3.569390421905756*^9}, 3.5693905782492304`*^9, 3.5693906211025057`*^9, 3.5693907710343695`*^9, 3.569390889454177*^9, 3.569390995097563*^9, 3.569391094625737*^9, 3.569391142237021*^9, 3.56939122142276*^9, 3.5693914601499796`*^9, {3.5693914988848476`*^9, 3.569391515888877*^9}, 3.569392339922327*^9, 3.5694060970122843`*^9, 3.56940626004817*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"t1", "=", RowBox[{"0.01889726", "*", RowBox[{"ChemicalData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "t1", "]"}]}], "Input", CellChangeTimes->{{3.567862912170579*^9, 3.567862949329844*^9}, { 3.5678630095303497`*^9, 3.5678630107471523`*^9}, {3.5679573013548217`*^9, 3.5679573132576427`*^9}, 3.568114367533684*^9, {3.5682782383334675`*^9, 3.5682782435438766`*^9}, {3.568381606879155*^9, 3.5683816154123707`*^9}, 3.5688204675481253`*^9, {3.5688215945097046`*^9, 3.568821600578115*^9}, 3.568873215924739*^9, 3.5689108676002645`*^9, 3.5689997098393545`*^9, 3.5689998170271425`*^9, 3.5689998869308653`*^9, 3.5691460425981283`*^9, { 3.5692345679268913`*^9, 3.5692345778017087`*^9}, {3.5692346191261816`*^9, 3.569234623525389*^9}, {3.5692348865282516`*^9, 3.5692349162463036`*^9}, { 3.569234950394764*^9, 3.569234972609203*^9}, 3.569235038176118*^9, { 3.5692351317918825`*^9, 3.5692352122724237`*^9}, {3.5692354169603834`*^9, 3.5692354469124355`*^9}, {3.569237150310628*^9, 3.5692371574866405`*^9}, 3.569237204505123*^9, 3.5692374658211823`*^9, 3.5692377287596436`*^9, { 3.5692377715661187`*^9, 3.569237804872177*^9}, 3.56923802261736*^9, { 3.5692382720773983`*^9, 3.569238274901003*^9}, {3.5693394646825705`*^9, 3.56933951020345*^9}, 3.5693403424025126`*^9, 3.5693404501831017`*^9, 3.569340738003607*^9, 3.569340852819809*^9, {3.569341165475558*^9, 3.569341165491158*^9}, 3.5693414971477404`*^9, {3.5693417327081537`*^9, 3.5693417367797613`*^9}, 3.5693420227750635`*^9, 3.569342614406103*^9, 3.569343567162176*^9, 3.569343662712344*^9, 3.5693437636133213`*^9, 3.5693440705226603`*^9, 3.569344266225004*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.8002800637399999`", "7.581580711999999`", RowBox[{"-", "4.073682338199999`"}]}, {"3.8523954236`", RowBox[{"-", "3.7271065897999995`"}], "5.5881087545999995`"}, {"4.170625282`", RowBox[{"-", "0.84965860412`"}], "2.48498969`"}, { RowBox[{"-", "1.55594369662`"}], RowBox[{"-", "1.60600253836`"}], "3.1535747487999997`"}, {"0.6095311213`", "1.33276705602`", "0.20872023669999998`"}, {"3.2102665287999996`", "1.10845657982`", "1.03294312886`"}, { RowBox[{"-", "1.3937674112999998`"}], RowBox[{"-", "0.5252493417`"}], "0.9966792869199999`"}, {"0.27293312618`", RowBox[{"-", "1.16885222278`"}], "5.2120532806`"}, {"2.8589664653999995`", RowBox[{"-", "2.0186053131999997`"}], "4.4204470592`"}, { RowBox[{"-", "3.4791745386`"}], RowBox[{"-", "1.1381819698`"}], RowBox[{"-", "0.8341250564`"}]}, { RowBox[{"-", "0.063642192228`"}], "3.3317759106`", RowBox[{"-", "1.3899501647799999`"}]}, {"4.9442791064`", "2.956476327`", "0.26013968115999997`"}, {"6.7227002449999995`", RowBox[{"-", "1.8147983640999998`"}], "1.9547325744`"}, {"1.7049107972`", "5.153471774599999`", RowBox[{"-", "2.1316109279999997`"}]}, {"4.2290178154`", "4.9801839004`", RowBox[{"-", "1.3167610768`"}]}, { RowBox[{"-", "3.0316874218`"}], RowBox[{"-", "0.89057117202`"}], RowBox[{"-", "3.4631118675999994`"}]}, { RowBox[{"-", "5.834529025`"}], RowBox[{"-", "1.9411265471999999`"}], "0.045410115779999996`"}, { RowBox[{"-", "4.9798059552`"}], RowBox[{"-", "1.47462878684`"}], RowBox[{"-", "5.192400130199999`"}]}, { RowBox[{"-", "7.782647558399999`"}], RowBox[{"-", "2.5252408537999997`"}], RowBox[{"-", "1.68378366052`"}]}, { RowBox[{"-", "7.337995030599999`"}], RowBox[{"-", "2.3050877748`"}], RowBox[{"-", "4.2870324036000005`"}]}, {"0.3289068103`", "0.80725315268`", "5.636674712799999`"}, { RowBox[{"-", "0.30090107097999996`"}], RowBox[{"-", "2.2100345569999997`"}], "6.847800106199999`"}, { RowBox[{"-", "1.9673937386`"}], "3.4689700182`", RowBox[{"-", "2.0575336687999997`"}]}, {"6.8631068868`", "2.8270300959999997`", "0.8845807406`"}, {"6.8075489423999995`", RowBox[{"-", "3.7826645341999994`"}], "2.412235239`"}, {"7.145809896399999`", RowBox[{"-", "1.55966645684`"}], RowBox[{"-", "0.0059902424474`"}]}, {"8.0712087186`", RowBox[{"-", "0.8043429746399999`"}], "3.0723165308000002`"}, {"5.5873528642`", "6.365542031`", RowBox[{"-", "1.8862111096399998`"}]}, { RowBox[{"-", "1.2295502218999999`"}], RowBox[{"-", "0.2651285578`"}], RowBox[{"-", "4.1339645975999995`"}]}, { RowBox[{"-", "6.164097239399999`"}], RowBox[{"-", "2.1142254487999996`"}], "2.0327782581999996`"}, { RowBox[{"-", "4.6634658228`"}], RowBox[{"-", "1.28648766628`"}], RowBox[{"-", "7.1805808548`"}]}, { RowBox[{"-", "9.5897925322`"}], RowBox[{"-", "3.1327877628`"}], RowBox[{"-", "1.0102475196`"}]}, { RowBox[{"-", "8.8053672696`"}], RowBox[{"-", "2.773172905`"}], RowBox[{"-", "5.5971794394`"}]} }, 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.5693448185751743`*^9, 3.5693892231684504`*^9, 3.5693893816179285`*^9, 3.5693895597234416`*^9, 3.569389711714508*^9, 3.569389784426236*^9, 3.5693899360273027`*^9, 3.5693901298108425`*^9, 3.569390341581215*^9, { 3.5693903926713047`*^9, 3.569390421921356*^9}, 3.5693905782648306`*^9, 3.569390621118106*^9, 3.569390771065569*^9, 3.569390889469777*^9, 3.5693909951287627`*^9, 3.5693910946413374`*^9, 3.569391142252621*^9, 3.56939122143836*^9, 3.5693914601811795`*^9, {3.569391498900448*^9, 3.5693915159200773`*^9}, 3.5693923399379272`*^9, 3.569406097027884*^9, 3.5694062600637703`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"u", "=", RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.567869377256353*^9, 3.5678694101568108`*^9}, { 3.5678695244894114`*^9, 3.56786953511303*^9}, 3.56786988243204*^9, 3.5678699252853155`*^9, {3.567870069179968*^9, 3.5678700766835814`*^9}, { 3.5678703216664114`*^9, 3.567870325738019*^9}, 3.5679271251072817`*^9, { 3.567942840466694*^9, 3.567942854381918*^9}, {3.567942932272855*^9, 3.567942950509287*^9}, {3.567943087867528*^9, 3.567943093733138*^9}, 3.567943185211699*^9, 3.5679432253505697`*^9, 3.5679433277647495`*^9, { 3.5679434430645523`*^9, 3.5679434440941534`*^9}, {3.568278260766307*^9, 3.5682782624355097`*^9}, 3.5688732159403386`*^9, 3.5689108676158648`*^9, 3.5689997098393545`*^9, 3.5689998170271425`*^9, 3.5689998869464655`*^9, 3.5691460426137285`*^9, 3.569237204520723*^9, 3.5692374658211823`*^9, 3.5692380226329603`*^9, 3.5693403424181123`*^9, 3.569340450198702*^9, 3.569340738003607*^9, 3.5693408528354087`*^9, 3.569341165491158*^9, 3.569341497366141*^9, 3.569342614421703*^9, 3.5693435671777763`*^9, 3.569343662727944*^9, 3.5693437636133213`*^9, 3.5693440707410603`*^9, 3.569344266240604*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"Cl\"\>", ",", "\<\"O\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"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\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.569344818590774*^9, 3.5693892231840506`*^9, 3.5693893816335287`*^9, 3.5693895597390413`*^9, 3.5693897117457085`*^9, 3.569389784457436*^9, 3.5693899360429025`*^9, 3.5693901298264427`*^9, 3.569390341596815*^9, { 3.5693903926869044`*^9, 3.569390421936956*^9}, 3.56939057829603*^9, 3.569390621133706*^9, 3.569390771081169*^9, 3.5693908895009775`*^9, 3.5693909951443624`*^9, 3.5693910946569376`*^9, 3.569391142283821*^9, 3.56939122146956*^9, 3.5693914601967793`*^9, {3.5693914989160476`*^9, 3.5693915159356775`*^9}, 3.5693923399535275`*^9, 3.5694060970434837`*^9, 3.5694062600949707`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"n", "=", RowBox[{"Length", "[", "u", "]"}]}]], "Input", CellChangeTimes->{{3.568277663590458*^9, 3.568277712652544*^9}, 3.5682785838808746`*^9, {3.56880682872497*^9, 3.5688068517038097`*^9}, 3.5688069726508226`*^9}], Cell[BoxData["33"], "Output", CellChangeTimes->{ 3.569344818606374*^9, 3.5693892231996503`*^9, 3.569389381649129*^9, 3.5693895597546415`*^9, 3.5693897117613087`*^9, 3.5693897844730363`*^9, 3.569389936058502*^9, 3.569390129842043*^9, 3.569390341612415*^9, { 3.569390392702504*^9, 3.5693904219525557`*^9}, 3.5693905783116302`*^9, 3.5693906211649055`*^9, 3.5693907710967693`*^9, 3.5693908895165772`*^9, 3.5693909951599627`*^9, 3.5693910946881375`*^9, 3.5693911422994213`*^9, 3.56939122148516*^9, 3.5693914602123795`*^9, {3.5693914989316473`*^9, 3.5693915159512777`*^9}, 3.569392339969127*^9, 3.569406097059084*^9, 3.5694062601105704`*^9}] }, Open ]], 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[{"\<\"Cl\"\>", ",", "\<\"O\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"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\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.569344818621974*^9, 3.5693892232152505`*^9, 3.569389381664729*^9, 3.5693895597702417`*^9, 3.5693897117925086`*^9, 3.569389784504236*^9, 3.5693899360741024`*^9, 3.569390129873243*^9, 3.5693903416280146`*^9, { 3.5693903927181044`*^9, 3.569390421983756*^9}, 3.5693905783272305`*^9, 3.5693906211805058`*^9, 3.5693907711123695`*^9, 3.569390889532177*^9, 3.569390995175563*^9, 3.5693910947037373`*^9, 3.5693911423150215`*^9, 3.56939122150076*^9, 3.5693914602279797`*^9, {3.5693914989628477`*^9, 3.569391515966878*^9}, 3.569392339984727*^9, 3.569406097074684*^9, 3.56940626012617*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"num", "=", 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}], Cell[BoxData[ RowBox[{ RowBox[{"um", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"un", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"num", "[", 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}], 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[{"\<\"Cl\"\>", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "21"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "22"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "23"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "24"}], "}"}], ",", 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"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.5693448186531744`*^9, 3.5693892232464504`*^9, 3.569389381680329*^9, 3.5693895598014417`*^9, 3.5693897118237085`*^9, 3.5693897845354366`*^9, 3.569389936105303*^9, 3.5693901298888426`*^9, 3.569390341659215*^9, { 3.569390392749305*^9, 3.5693904219993563`*^9}, 3.5693905783428307`*^9, 3.569390621196106*^9, 3.569390771143569*^9, 3.569390889547777*^9, 3.569390995206763*^9, 3.5693910947193375`*^9, 3.569391142346221*^9, 3.5693912215163603`*^9, 3.56939146024358*^9, {3.569391498978448*^9, 3.5693915159980774`*^9}, 3.5693923400159273`*^9, 3.569406097105884*^9, 3.5694062601573706`*^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", ",", "1", ",", "3", ",", "4", ",", "2", ",", "21", ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33"}], "}"}]], "Output", CellChangeTimes->{ 3.569344818668774*^9, 3.5693892232620506`*^9, 3.5693893816959286`*^9, 3.5693895598170414`*^9, 3.5693897118393087`*^9, 3.5693897845510364`*^9, 3.5693899361209025`*^9, 3.569390129920043*^9, 3.5693903416748147`*^9, { 3.569390392764905*^9, 3.5693904220305557`*^9}, 3.569390578374031*^9, 3.569390621227306*^9, 3.569390771159169*^9, 3.569390889578977*^9, 3.5693909952223625`*^9, 3.5693910947349377`*^9, 3.569391142361821*^9, 3.5693912215319605`*^9, 3.5693914602591796`*^9, {3.5693914989940476`*^9, 3.5693915160136776`*^9}, 3.5693923400315275`*^9, 3.569406097121484*^9, 3.5694062601729703`*^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.1", ",", 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.22522", ",", 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"}], "}"}]}], "]"}]}]}], "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}}], 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.5`", ",", "0.24`", ",", "0.24`", ",", "0.178`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.1`"}], "}"}]], "Output", CellChangeTimes->{ 3.569344818684374*^9, 3.569389223277651*^9, 3.569389381727129*^9, 3.569389559848242*^9, 3.569389711870509*^9, 3.5693897845822363`*^9, 3.5693899361365023`*^9, 3.5693901299512434`*^9, 3.569390341690415*^9, { 3.569390392796105*^9, 3.569390422046156*^9}, 3.569390578389631*^9, 3.569390621242906*^9, 3.5693907711747694`*^9, 3.5693908895945773`*^9, 3.569390995253563*^9, 3.5693910947661376`*^9, 3.5693911423774214`*^9, 3.5693912215631604`*^9, 3.5693914602903795`*^9, {3.5693914990096474`*^9, 3.5693915160448775`*^9}, 3.5693923400471277`*^9, 3.569406097137084*^9, 3.5694062601885705`*^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.5`", ",", "0.22522`", ",", "0.22522`", ",", "0.178`", ",", "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.569344818684374*^9, 3.569389223277651*^9, 3.569389381727129*^9, 3.569389559848242*^9, 3.569389711870509*^9, 3.5693897845822363`*^9, 3.5693899361365023`*^9, 3.5693901299512434`*^9, 3.569390341690415*^9, { 3.569390392796105*^9, 3.569390422046156*^9}, 3.569390578389631*^9, 3.569390621242906*^9, 3.5693907711747694`*^9, 3.5693908895945773`*^9, 3.569390995253563*^9, 3.5693910947661376`*^9, 3.5693911423774214`*^9, 3.5693912215631604`*^9, 3.5693914602903795`*^9, {3.5693914990096474`*^9, 3.5693915160448775`*^9}, 3.5693923400471277`*^9, 3.569406097137084*^9, 3.5694062602041707`*^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}}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"Cl\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"O\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.569344818699974*^9, 3.5693892232932506`*^9, 3.5693893817427287`*^9, 3.5693895598638415`*^9, 3.5693897119017086`*^9, 3.5693897845978365`*^9, 3.5693899361677027`*^9, 3.569390129966843*^9, 3.569390341721615*^9, { 3.5693903928117046`*^9, 3.569390422061756*^9}, 3.5693905784052305`*^9, 3.569390621258506*^9, 3.5693907712059693`*^9, 3.569390889610177*^9, 3.569390995269163*^9, 3.5693910947817373`*^9, 3.5693911424086213`*^9, 3.56939122157876*^9, 3.5693914603059797`*^9, {3.5693914990252476`*^9, 3.5693915160604773`*^9}, 3.569392340062728*^9, 3.569406097152684*^9, 3.5694062602197704`*^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.`", ",", "17.`", ",", "7.`", ",", "7.`", ",", "8.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output", CellChangeTimes->{ 3.5693448187155743`*^9, 3.5693892233088503`*^9, 3.569389381758329*^9, 3.5693895598794417`*^9, 3.569389711917309*^9, 3.5693897846290364`*^9, 3.569389936183303*^9, 3.569390129998043*^9, 3.569390341737215*^9, { 3.569390392827305*^9, 3.5693904220929565`*^9}, 3.5693905784208307`*^9, 3.569390621289706*^9, 3.569390771221569*^9, 3.5693908896257772`*^9, 3.569390995284763*^9, 3.5693910947973375`*^9, 3.5693911424242215`*^9, 3.5693912215943604`*^9, 3.56939146032158*^9, {3.569391499040848*^9, 3.5693915160760775`*^9}, 3.5693923400939274`*^9, 3.5694060971682844`*^9, 3.5694062602353706`*^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["20"], "Output", CellChangeTimes->{ 3.5693448187311745`*^9, 3.5693892233400507`*^9, 3.5693893817739286`*^9, 3.5693895599106417`*^9, 3.569389711932909*^9, 3.5693897846446366`*^9, 3.569389936198903*^9, 3.5693901300136433`*^9, 3.5693903417528152`*^9, { 3.569390392842905*^9, 3.5693904221085563`*^9}, 3.569390578452031*^9, 3.569390621305306*^9, 3.5693907712371693`*^9, 3.5693908896569777`*^9, 3.569390995300363*^9, 3.569391094828538*^9, 3.5693911424398212`*^9, 3.5693912216099606`*^9, 3.56939146033718*^9, {3.5693914990720477`*^9, 3.5693915160916777`*^9}, 3.5693923401095276`*^9, 3.569406097183884*^9, 3.569406260266571*^9}], Cell[BoxData["13"], "Output", CellChangeTimes->{ 3.5693448187311745`*^9, 3.5693892233400507`*^9, 3.5693893817739286`*^9, 3.5693895599106417`*^9, 3.569389711932909*^9, 3.5693897846446366`*^9, 3.569389936198903*^9, 3.5693901300136433`*^9, 3.5693903417528152`*^9, { 3.569390392842905*^9, 3.5693904221085563`*^9}, 3.569390578452031*^9, 3.569390621305306*^9, 3.5693907712371693`*^9, 3.5693908896569777`*^9, 3.569390995300363*^9, 3.569391094828538*^9, 3.5693911424398212`*^9, 3.5693912216099606`*^9, 3.56939146033718*^9, {3.5693914990720477`*^9, 3.5693915160916777`*^9}, 3.5693923401095276`*^9, 3.569406097183884*^9, 3.569406260266571*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"DeleteFile", "[", " ", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"Extract", "[", RowBox[{"t1", ",", RowBox[{"{", "i", "}"}]}], "]"}]}], "}"}], ">>>", " ", "\"\\""}]}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}], "Input", CellChangeTimes->{{3.567869377256353*^9, 3.5678694101568108`*^9}, { 3.5678695244894114`*^9, 3.56786953511303*^9}, 3.56786988243204*^9, 3.5678699252853155`*^9, {3.567870069179968*^9, 3.5678700766835814`*^9}, { 3.5678703216664114`*^9, 3.567870325738019*^9}, 3.5679271251072817`*^9, { 3.567942840466694*^9, 3.567942854381918*^9}, {3.567942932272855*^9, 3.567942950509287*^9}, 3.5679430681802936`*^9, {3.568278272060727*^9, 3.56827827391713*^9}, 3.5688732159559383`*^9, 3.568910867631465*^9, 3.5689997098549547`*^9, 3.5689998170427427`*^9, 3.5689998869620657`*^9, { 3.569059200815255*^9, 3.5690592031552596`*^9}, 3.5691460426137285`*^9, 3.569237204520723*^9, 3.569237465836782*^9, 3.56923802264856*^9, 3.5693403424181123`*^9, 3.569340450198702*^9, 3.569340738019207*^9, 3.569340852851009*^9, {3.5693411655067577`*^9, 3.5693411655067577`*^9}, 3.5693414976001415`*^9, {3.5693416978420925`*^9, 3.569341705314506*^9}, 3.569342614421703*^9, 3.5693435671777763`*^9, 3.569343662727944*^9, 3.5693437636289215`*^9, 3.5693440709750605`*^9, 3.5693442662562037`*^9}], Cell[BoxData["\<\"C16H13ClN2O\"\>"], "Output", CellChangeTimes->{ 3.5693448187623744`*^9, 3.569389223355651*^9, 3.569389381805129*^9, 3.569389559941842*^9, 3.5693897119641085`*^9, 3.5693897846758366`*^9, 3.5693899362301025`*^9, 3.569390130044843*^9, 3.569390341784015*^9, { 3.5693903928741045`*^9, 3.569390422139756*^9}, 3.5693905784832306`*^9, 3.569390621336506*^9, 3.5693907712683697`*^9, 3.5693908896881776`*^9, 3.569390995331563*^9, 3.569391094859738*^9, 3.5693911424710217`*^9, 3.5693912216411605`*^9, 3.5693914603683796`*^9, {3.5693914991032476`*^9, 3.569391516138478*^9}, 3.5693923401407275`*^9, 3.569406097215084*^9, 3.5694062602977705`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"t", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t1", "[", RowBox[{"[", RowBox[{"num", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]], "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}}], Cell[BoxData[ RowBox[{ RowBox[{"Plot1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", 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[{"Lighter", "[", "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"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5679440895764875`*^9, 3.5679441000441055`*^9}, { 3.5679441319773617`*^9, 3.5679441523041973`*^9}, {3.567944240210352*^9, 3.5679442813476243`*^9}, {3.567944323966899*^9, 3.567944345931738*^9}, { 3.567944397567828*^9, 3.567944456941533*^9}, {3.567944491557994*^9, 3.5679445468444905`*^9}, {3.5679446505690727`*^9, 3.567944683875131*^9}, { 3.567944736244423*^9, 3.5679448177233667`*^9}, {3.567945549707852*^9, 3.5679455499730525`*^9}, {3.5679456039959474`*^9, 3.567945606195551*^9}, { 3.567945704460124*^9, 3.5679457164877453`*^9}, {3.5679457857362666`*^9, 3.5679458050023003`*^9}, {3.567946353670864*^9, 3.5679464127169676`*^9}, { 3.5679466013368993`*^9, 3.5679466311173515`*^9}, {3.5679467590999765`*^9, 3.567946915739851*^9}, {3.5679469466123056`*^9, 3.567946946815106*^9}, { 3.5679471385082426`*^9, 3.5679471497870626`*^9}, {3.5679483907224417`*^9, 3.5679484036080647`*^9}, {3.567948441937332*^9, 3.5679484421869326`*^9}, { 3.567948496740228*^9, 3.56794849772303*^9}, {3.567948847912445*^9, 3.5679488949933276`*^9}, {3.568011728877214*^9, 3.5680117308213253`*^9}, { 3.568011766325356*^9, 3.568011773436763*^9}, {3.5681173314452896`*^9, 3.5681173370612993`*^9}, {3.568117919800323*^9, 3.5681179678952074`*^9}, { 3.56811809459863*^9, 3.568118105409449*^9}, {3.5681181818963833`*^9, 3.5681182389144835`*^9}, {3.568118274888147*^9, 3.5681182883977704`*^9}, { 3.568118518513775*^9, 3.56811852739019*^9}, {3.5681188250543127`*^9, 3.568118862634779*^9}, {3.568118972396572*^9, 3.5681189862493963`*^9}, { 3.568119020694257*^9, 3.568119047136303*^9}, {3.5681190903015785`*^9, 3.568119136930061*^9}, {3.5681191671005135`*^9, 3.568119202808976*^9}, { 3.5681194788046613`*^9, 3.568119487603077*^9}, {3.5681195353235607`*^9, 3.5681195410331707`*^9}, 3.56811959201406*^9, {3.5681196426985493`*^9, 3.568119659702579*^9}, {3.568119726813897*^9, 3.56811974027672*^9}, { 3.5682659184078283`*^9, 3.5682659267694435`*^9}, {3.568265972477524*^9, 3.568266002725977*^9}, 3.568277802649102*^9, {3.568820898608082*^9, 3.568820922429324*^9}, 3.5688217528499823`*^9, 3.568821789307246*^9, { 3.569406212748887*^9, 3.569406252544557*^9}}], Cell[BoxData[ 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"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5679440895764875`*^9, 3.5679441000441055`*^9}, { 3.5679441319773617`*^9, 3.5679441523041973`*^9}, {3.567944240210352*^9, 3.5679442813476243`*^9}, {3.567944323966899*^9, 3.567944345931738*^9}, { 3.567944397567828*^9, 3.567944456941533*^9}, {3.567944491557994*^9, 3.5679445468444905`*^9}, {3.5679446505690727`*^9, 3.567944683875131*^9}, { 3.567944736244423*^9, 3.5679448177233667`*^9}, {3.567945549707852*^9, 3.5679455499730525`*^9}, {3.5679456039959474`*^9, 3.567945606195551*^9}, { 3.567945704460124*^9, 3.5679457164877453`*^9}, {3.5679457857362666`*^9, 3.5679458050023003`*^9}, {3.567946353670864*^9, 3.5679464127169676`*^9}, { 3.5679466013368993`*^9, 3.5679466311173515`*^9}, {3.5679467590999765`*^9, 3.567946915739851*^9}, {3.5679469466123056`*^9, 3.567946946815106*^9}, { 3.5679471385082426`*^9, 3.5679471497870626`*^9}, {3.5679483907224417`*^9, 3.5679484036080647`*^9}, {3.567948441937332*^9, 3.5679484421869326`*^9}, { 3.567948496740228*^9, 3.56794849772303*^9}, {3.567948847912445*^9, 3.5679488949933276`*^9}, {3.568011728877214*^9, 3.5680117308213253`*^9}, { 3.568011766325356*^9, 3.568011773436763*^9}, {3.5681173314452896`*^9, 3.5681173370612993`*^9}, {3.568117919800323*^9, 3.5681179678952074`*^9}, { 3.56811809459863*^9, 3.568118105409449*^9}, {3.5681181818963833`*^9, 3.5681182389144835`*^9}, {3.568118274888147*^9, 3.5681182883977704`*^9}, { 3.568118518513775*^9, 3.56811852739019*^9}, {3.5681188250543127`*^9, 3.568118862634779*^9}, {3.568118972396572*^9, 3.5681189862493963`*^9}, { 3.568119020694257*^9, 3.568119047136303*^9}, {3.5681190903015785`*^9, 3.568119136930061*^9}, {3.5681191671005135`*^9, 3.568119202808976*^9}, { 3.5681194788046613`*^9, 3.568119487603077*^9}, {3.5681195353235607`*^9, 3.5681195410331707`*^9}, 3.56811959201406*^9, {3.5681196426985493`*^9, 3.568119659702579*^9}, {3.568119726813897*^9, 3.56811974027672*^9}, { 3.5681199008322024`*^9, 3.568119920691037*^9}, {3.5681199536070952`*^9, 3.568119958521104*^9}, {3.568120000641178*^9, 3.568120067206495*^9}, { 3.5681211528280015`*^9, 3.5681211643408213`*^9}, 3.5681213201694956`*^9, { 3.568121503313817*^9, 3.568121508961027*^9}, {3.568266015439999*^9, 3.5682660461096525`*^9}, 3.568277806081108*^9, {3.568381589141924*^9, 3.568381589391525*^9}, 3.5688217602599955`*^9, {3.568821800305266*^9, 3.568821801397268*^9}, 3.5693901242572327`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]], "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}], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"Cl\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {341.48, -285.97}], LineBox[{{339.3832108786865, -259.3733237410999}, {337.55, -236.12}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {333.62, -186.27}], LineBox[{{337.55, -236.12}, {335.1961756659848, -206.262966144871}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {316.45, 285.97}], LineBox[{{{330.3750939084076, 268.5785306257772}, {342.65, 243.08950000000002`}}, {{321.36509390840763`, 264.23953062577726`}, { 333.64, 238.75050000000002`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {359.84, 195.87}], LineBox[{{{342.65, 243.08950000000002`}, {355.64344096286845`, 216.10842070167212`}}, {{333.64, 238.75050000000002`}, { 346.63344096286846`, 211.76942070167212`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {297.49, 117.69000000000001`}], LineBox[{{301.9519446944868, 98.1376580803388}, {308.615, 68.94000000000001}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {319.74, 20.19}], LineBox[{{308.615, 68.94000000000001}, {315.2780553055132, 39.74234191966122}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {297.49, 117.69000000000001`}], LineBox[{{309.99452077211026`, 133.36928522796444`}, { 328.66499999999996`, 156.78}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {359.84, 195.87}], LineBox[{{328.66499999999996`, 156.78}, {347.3354792278897, 180.1907147720356}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {297.49, 117.69000000000001`}], LineBox[{{277.9377573600972, 122.15237971830791`}, {248.745, 128.815}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {200., 139.94}], LineBox[{{248.745, 128.815}, {219.55224263990283`, 135.47762028169208`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {522.1899999999999, 117.69000000000001`}], LineBox[{{{522.6030553055132, 97.0251580803388}, {515.9399999999999, 67.82750000000001}}, {{512.8530553055132, 99.25015808033879}, { 506.18999999999994`, 70.05250000000001}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {499.93999999999994`, 20.19}], LineBox[{{{515.9399999999999, 67.82750000000001}, {509.27694469448676`, 38.62984191966122}}, {{506.18999999999994`, 70.05250000000001}, { 499.52694469448676`, 40.85484191966122}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {522.1899999999999, 117.69000000000001`}], LineBox[{{509.6854792278897, 133.36928522796444`}, {491.015, 156.78}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {459.84, 195.87}], LineBox[{{491.015, 156.78}, {472.34452077211023`, 180.1907147720356}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {409.84, -23.200000000000003`}], LineBox[{{{389.60157929832786`, -19.003440962868453`}, { 362.62049999999994`, -6.009999999999999}}, {{ 393.9405792983279, -9.993440962868458}, {366.9595, 2.9999999999999973`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {319.74, 20.19}], LineBox[{{{362.62049999999994`, -6.009999999999999}, { 335.63942070167207`, 6.983440962868448}}, {{366.9595, 2.9999999999999973`}, {339.9784207016721, 15.993440962868442`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {409.84, -23.200000000000003`}], LineBox[{{427.90892070167206`, -14.498440962868457`}, { 454.89, -1.5050000000000008`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {499.93999999999994`, 20.19}], LineBox[{{454.89, -1.5050000000000008`}, {481.87107929832786`, 11.488440962868447`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {409.84, -23.200000000000003`}], LineBox[{{411.6478824686241, -43.17334688978394}, { 414.53499999999997`, -75.07000000000001}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {419.23, -126.94000000000001`}], LineBox[{{414.53499999999997`, -75.07000000000001}, { 417.4221175313758, -106.96665311021607`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {319.74, 20.19}], LineBox[{{302.9977489706576, 9.149164186055296}, { 276.265, -8.479999999999999}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {232.79000000000002`, -37.15}], LineBox[{{276.265, -8.479999999999999}, { 249.5322510293424, -26.10916418605528}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {499.93999999999994`, 20.19}], LineBox[{{515.6192852279644, 7.685479227889733}, { 539.03, -10.984999999999998`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {578.12, -42.16}], LineBox[{{539.03, -10.984999999999998`}, { 562.4407147720356, -29.655479227889728`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {459.84, 195.87}], LineBox[{{439.78499999999997`, 195.87}, {409.84, 195.87}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {359.84, 195.87}], LineBox[{{409.84, 195.87}, {379.895, 195.87}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {459.84, 195.87}], LineBox[{{477.90902651950074`, 204.57133930137076`}, {487.77, 209.32}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {515.7, 222.77}], LineBox[{{487.77, 209.32}, {497.6309734804993, 214.06866069862926`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {459.84, 195.87}], LineBox[{{455.37889105125754`, 215.4225326223344}, {452.94499999999994`, 226.09}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {446.04999999999995`, 256.31}], LineBox[{{452.94499999999994`, 226.09}, {450.51110894874233`, 236.75746737766562`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {578.12, -42.16}], LineBox[{{{594.9613410560738, -30.1777399592981}, { 622.838, -19.235499999999995`}}, {{ 598.6153410560738, -39.4867399592981}, {626.492, -28.5445}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {671.21, -5.62}], LineBox[{{{622.838, -19.235499999999995`}, { 650.7146589439262, -8.293260040701878}}, {{626.492, -28.5445}, { 654.3686589439262, -17.60226004070188}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {578.12, -42.16}], LineBox[{{575.131695088124, -61.99111340176486}, { 570.6700000000001, -91.60000000000001}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {563.22, -141.04000000000002`}], LineBox[{{570.6700000000001, -91.60000000000001}, { 566.208304911876, -121.20888659823515`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {419.23, -126.94000000000001`}], LineBox[{{{405.71298275046155`, -142.6440145241808}, { 379.3915, -160.8855}}, {{399.7799827504616, -134.08301452418078`}, { 373.4585, -152.32450000000003`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {333.62, -186.27}], LineBox[{{{379.3915, -160.8855}, { 353.07001724953847`, -179.12698547581923`}}, {{ 373.4585, -152.32450000000003`}, { 347.1370172495385, -170.56598547581925`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {419.23, -126.94000000000001`}], LineBox[{{437.39829259782965`, -135.43212394396417`}, { 447.31, -140.065}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {475.39, -153.19}], LineBox[{{447.31, -140.065}, { 457.22170740217035`, -144.69787605603582`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {232.79000000000002`, -37.15}], LineBox[{{{239.3303782081496, -56.810922947419385`}, { 241.4765, -88.766}}, {{228.9373782081496, -57.50892294741938}, { 231.08350000000002`, -89.46400000000001}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {239.76999999999998`, -141.08}], LineBox[{{{241.4765, -88.766}, { 243.6226217918504, -120.72107705258064`}}, {{ 231.08350000000002`, -89.46400000000001}, { 233.22962179185038`, -121.41907705258062`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {232.79000000000002`, -37.15}], LineBox[{{214.8219607964767, -28.241992805309955`}, { 205.01500000000001`, -23.38}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {177.24, -9.610000000000001}], LineBox[{{205.01500000000001`, -23.38}, { 195.20803920352333`, -18.518007194690043`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {200., 139.94}], LineBox[{{204.464183741782, 159.49183082270326`}, {206.89999999999998`, 170.16}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {213.79999999999998`, 200.38}], LineBox[{{206.89999999999998`, 170.16}, {209.33581625821796`, 180.82816917729673`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {200., 139.94}], LineBox[{{180.44730734212203`, 144.40040747315365`}, { 169.77499999999998`, 146.835}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {139.54999999999998`, 153.73000000000002`}], LineBox[{{169.77499999999998`, 146.835}, {159.10269265787795`, 149.26959252684637`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {200., 139.94}], LineBox[{{195.5365181669166, 120.38800892681937`}, {193.10000000000002`, 109.715}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {186.20000000000002`, 79.49000000000001}], LineBox[{{193.10000000000002`, 109.715}, {190.66348183308344`, 99.04199107318063}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {333.62, -186.27}], LineBox[{{315.5506344987707, -177.56936465636068`}, { 286.695, -163.675}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {239.76999999999998`, -141.08}], LineBox[{{286.695, -163.675}, { 257.8393655012293, -149.78063534363935`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {239.76999999999998`, -141.08}], LineBox[{{223.15674539511986`, -152.31400179960062`}, { 214.09, -158.445}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {188.41000000000003`, -175.81}], LineBox[{{214.09, -158.445}, { 205.02325460488015`, -164.5759982003994}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {671.21, -5.62}], LineBox[{{686.8892852279645, -18.124520772110287`}, {710.3, -36.795}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {749.39, -67.97}], LineBox[{{710.3, -36.795}, {733.7107147720355, -55.46547922788973}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {671.21, -5.62}], LineBox[{{674.1992044879419, 14.210977825847841`}, {675.83, 25.029999999999998`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {680.45, 55.67999999999999}], LineBox[{{675.83, 25.029999999999998`}, {677.4607955120582, 35.849022174152154`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {563.22, -141.04000000000002`}], LineBox[{{{582.0167852279644, -149.6355207721103}, { 605.4274999999999, -168.30600000000004`}}, {{ 575.7817852279645, -157.4535207721103}, { 599.1925, -176.12400000000002`}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {641.4, -203.39000000000001`}], LineBox[{{{605.4274999999999, -168.30600000000004`}, { 628.8382147720355, -186.97647922788977`}}, {{ 599.1925, -176.12400000000002`}, { 622.6032147720356, -194.79447922788975`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {563.22, -141.04000000000002`}], LineBox[{{544.5509496286851, -148.36595271847338`}, {534.36, -152.365}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {505.5, -163.69}], LineBox[{{534.36, -152.365}, { 524.1690503713149, -156.36404728152664`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {749.39, -67.97}], LineBox[{{{751.345695088124, -88.54611340176487}, { 746.884, -118.15500000000002`}}, {{ 741.4576950881241, -87.05611340176486}, { 736.9960000000001, -116.665}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {734.49, -166.85000000000002`}], LineBox[{{{746.884, -118.15500000000002`}, { 742.4223049118759, -147.76388659823516`}}, {{ 736.9960000000001, -116.665}, { 732.534304911876, -146.27388659823515`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {749.39, -67.97}], LineBox[{{768.0590503713149, -60.64404728152664}, { 778.25, -56.644999999999996`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {807.1099999999999, -45.32}], LineBox[{{778.25, -56.644999999999996`}, { 788.440949628685, -52.64595271847338}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {641.4, -203.39000000000001`}], LineBox[{{660.0683410560738, -196.06223995929813`}, { 687.9449999999999, -185.12}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {734.49, -166.85000000000002`}], LineBox[{{687.9449999999999, -185.12}, { 715.8216589439262, -174.17776004070188`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {641.4, -203.39000000000001`}], LineBox[{{638.4112722388888, -223.22104967897474`}, { 636.78, -234.04500000000002`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {632.16, -264.7}], LineBox[{{636.78, -234.04500000000002`}, { 635.1487277611111, -244.86895032102527`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {734.49, -166.85000000000002`}], LineBox[{{750.1686109516008, -179.35536619329253`}, {758.725, -186.18}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.0425546950081972], FontWeight->Plain], {782.96, -205.51}], LineBox[{{758.725, -186.18}, { 767.2813890483992, -193.0046338067075}}]}}}, {}, {}}, ImageSize->{{0., 234.99169711059437`}, {0., 207.45018266356686`}}, PlotRange->{{119.54999999999998`, 827.1099999999999}, {-316.08000000000004`, 308.5525}}]], "Output", CellChangeTimes->{ 3.5693448188715744`*^9, 3.569389223464851*^9, 3.5693893819143295`*^9, 3.569389560051042*^9, 3.569389712073309*^9, 3.569389784785037*^9, 3.569389936339303*^9, 3.569390130154043*^9, 3.569390341893215*^9, { 3.569390392983305*^9, 3.5693904222333565`*^9}, 3.569390578592431*^9, 3.5693906214457064`*^9, 3.5693907713775697`*^9, 3.5693908897973776`*^9, 3.5693909954407635`*^9, 3.5693910949533377`*^9, 3.5693911425802217`*^9, 3.5693912217503605`*^9, 3.56939146047758*^9, {3.569391499196848*^9, 3.569391516232078*^9}, 3.5693923402499275`*^9, 3.5694060973242846`*^9, 3.569406260406971*^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}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"(*", " ", RowBox[{"Distance", " ", "maTetrx", " ", "Bohr"}], " ", "*)"}], "Text"], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Dij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"sq", "=", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", "j", "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", "j", "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", "j", "]"}], "]"}]}], ")"}], "^", "2"}]}], "]"}]}], ";", " ", RowBox[{"(", RowBox[{ RowBox[{"sq", "<", "3.0"}], " ", "||", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], " ", "&&", " ", RowBox[{"j", "\[Equal]", "10"}], " ", "&&", " ", RowBox[{"i", "\[Equal]", " ", "17"}]}], ")"}]}], ")"}]}], ",", "sq", ",", "0"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "Dij", "]"}]}]}]], "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}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.73742273416399`", "0.`", "0", "0", "0", "0", "0", "0", "0", "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.843643685439039`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.834834943342358`", "0.`", "0", "0", "0", "0", "0", "0", "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.8419102443079702`", "0", "0", "0.`", "0", "0", "0", "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.6466858074398885`", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "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.6493776201250046`", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "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.64507394698702`", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "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.6633826344508456`", "0", "2.6580303246336205`", "0.`", "0", "0", "0", "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.678269493598948`", "0", "0", "0", "0", "0", "0.`", "0", "0", "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.6393175008100815`", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "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.669593042538866`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "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.66954424187838`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "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.6590239875541366`", "2.650110802781595`", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "3.238164779333867`", "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.620103666678618`", "0", "0", "2.61397790499921`", "0", "0", "0", "2.779524056688507`", "0", "0", "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.4179591917750676`", "2.7880503398016687`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.2954981032530974`", "0", "0", "0", "0", "0", "0", "0", "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.021986367144806`", "0", "0", "0", "0", "0", "0", "0", "0", "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.0221310581617957`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.022068225434929`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220244840924764`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.022128891290221`", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220158336956606`", "0", "0", "0", "0", "0", "0", "0", "0", "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.022001260400804`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220199293576466`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0221078943256745`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.021932385413481`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0219621050562258`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220131394458023`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220707782661194`", "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.569344818902775*^9, 3.569389223511651*^9, 3.569389381961129*^9, 3.569389560097842*^9, 3.5693897121045094`*^9, 3.5693897848162365`*^9, 3.569389936386103*^9, 3.5693901302164435`*^9, 3.5693903419244156`*^9, { 3.569390393030105*^9, 3.569390422280156*^9}, 3.5693905786236315`*^9, 3.5693906214769063`*^9, 3.56939077142437*^9, 3.5693908898285775`*^9, 3.569390995487563*^9, 3.5693910950001383`*^9, 3.569391142627022*^9, 3.569391221797161*^9, 3.5693914605243797`*^9, {3.569391499243648*^9, 3.569391516278878*^9}, 3.569392340296728*^9, 3.5694060973554845`*^9, 3.569406260453771*^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", "<", "i"}], ",", 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}}], 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.5`", ",", "0.22522`", ",", "0.22522`", ",", "0.178`", ",", "0.5693`", ",", "0.5693`", ",", "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.5693448189339747`*^9, 3.569389223542851*^9, 3.569389381992329*^9, 3.569389560129042*^9, 3.569389712151309*^9, 3.569389784847437*^9, 3.569389936417303*^9, 3.5693901302632437`*^9, 3.5693903419712152`*^9, { 3.569390393061305*^9, 3.5693904223269567`*^9}, 3.569390578670431*^9, 3.5693906215237064`*^9, 3.5693907714711695`*^9, 3.5693908898753777`*^9, 3.5693909955343637`*^9, 3.569391095046938*^9, 3.5693911426582217`*^9, 3.569391221843961*^9, 3.56939146055558*^9, {3.569391499274848*^9, 3.569391516325678*^9}, 3.569392340327928*^9, 3.5694060974022846`*^9, 3.5694062605161715`*^9}] }, Open ]], Cell[BoxData[{ 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[{ 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}}], 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[{"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[{ 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}], Cell[BoxData[{ 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[{"(*", 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}], 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["62.43777832460386`"], "Output", CellChangeTimes->{ 3.569344819058775*^9, 3.569389223667651*^9, 3.5693893821015296`*^9, 3.569389560238242*^9, 3.5693897122605095`*^9, 3.5693897848786373`*^9, 3.5693899364485035`*^9, 3.5693901303100433`*^9, 3.5693903420024157`*^9, { 3.569390393108105*^9, 3.5693904223581567`*^9}, 3.5693905787016315`*^9, 3.5693906215549064`*^9, 3.56939077150237*^9, 3.569390889906578*^9, 3.569390995565563*^9, 3.5693910950781384`*^9, 3.569391142705022*^9, 3.5693912218751607`*^9, 3.5693914606023803`*^9, {3.569391499321648*^9, 3.5693915163568783`*^9}, 3.569392340374728*^9, 3.569406097433485*^9, 3.569406260547371*^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["722.3622952247845`"], "Output", CellChangeTimes->{ 3.569344819074375*^9, 3.5693892236832514`*^9, 3.5693893821327295`*^9, 3.5693895602694426`*^9, 3.5693897122761097`*^9, 3.569389784909837*^9, 3.569389936479703*^9, 3.5693901303256435`*^9, 3.569390342018016*^9, { 3.569390393123705*^9, 3.569390422373757*^9}, 3.5693905787172313`*^9, 3.569390621570506*^9, 3.56939077151797*^9, 3.5693908899221783`*^9, 3.5693909955811634`*^9, 3.5693910951093383`*^9, 3.569391142720622*^9, 3.569391221890761*^9, 3.56939146061798*^9, {3.5693914993372483`*^9, 3.5693915163724785`*^9}, 3.569392340390328*^9, 3.5694060974490848`*^9, 3.569406260562971*^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["784.8000735493883`"], "Output", CellChangeTimes->{ 3.569344819089975*^9, 3.569389223698851*^9, 3.5693893821483297`*^9, 3.5693895602850423`*^9, 3.56938971229171*^9, 3.569389784925437*^9, 3.569389936495303*^9, 3.5693901303412437`*^9, 3.5693903420336156`*^9, { 3.569390393139305*^9, 3.5693904223893566`*^9}, 3.569390578732831*^9, 3.5693906215861063`*^9, 3.5693907715335703`*^9, 3.569390889937778*^9, 3.5693909955967636`*^9, 3.5693910951249385`*^9, 3.5693911427362223`*^9, 3.569391221906361*^9, 3.56939146063358*^9, {3.569391499352848*^9, 3.569391516403678*^9}, 3.5693923404059277`*^9, 3.5694060974646845`*^9, 3.5694062605785713`*^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["20.389378231402322`"], "Output", CellChangeTimes->{ 3.569344819136775*^9, 3.5693892237300515`*^9, 3.5693893821951294`*^9, 3.569389560316242*^9, 3.5693897123385096`*^9, 3.569389784941037*^9, 3.569389936526503*^9, 3.569390130372444*^9, 3.5693903420492153`*^9, { 3.5693903931549053`*^9, 3.569390422404957*^9}, 3.5693905787640314`*^9, 3.5693906216173067`*^9, 3.56939077154917*^9, 3.569390889968978*^9, 3.569390995612364*^9, 3.569391095140538*^9, 3.5693911427674217`*^9, 3.569391221937561*^9, 3.5693914606491804`*^9, {3.5693914993684483`*^9, 3.569391516419278*^9}, 3.569392340421528*^9, 3.5694060974802847`*^9, 3.5694062606097713`*^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["42.048400093201536`"], "Output", CellChangeTimes->{ 3.569344819152375*^9, 3.5693892237612514`*^9, 3.5693893822107296`*^9, 3.5693895603474426`*^9, 3.56938971235411*^9, 3.5693897849566374`*^9, 3.5693899365421033`*^9, 3.569390130388044*^9, 3.5693903420804157`*^9, { 3.5693903931705055`*^9, 3.5693904224361567`*^9}, 3.5693905787796316`*^9, 3.569390621632907*^9, 3.5693907715647697`*^9, 3.569390889984578*^9, 3.5693909956279635`*^9, 3.5693910951561384`*^9, 3.569391142783022*^9, 3.5693912219531612`*^9, 3.5693914606803803`*^9, {3.5693914993996487`*^9, 3.5693915164348783`*^9}, 3.5693923404527283`*^9, 3.569406097511485*^9, 3.569406260625371*^9}] }, Open ]], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ 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}], Cell[BoxData[ RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Pij", "]"}], ";"}], "*)"}]], "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.5681087223049684`*^9}, 3.568114284401138*^9, 3.5681220092695055`*^9, 3.5693411655535583`*^9, 3.5693418217687106`*^9}], Cell[BoxData[ RowBox[{"(*", " ", RowBox[{"sigma", " ", "bond", " ", "cloud", " ", "radii"}], " ", "*)"}]], "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.5681087223049684`*^9}, {3.5681133837179556`*^9, 3.5681133888191648`*^9}}], Cell[BoxData[ RowBox[{"(*", 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[{"Print", "[", RowBox[{ RowBox[{"u", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], ",", RowBox[{"i", "-", "1"}], ",", "\"\< \>\"", ",", RowBox[{"u", "[", RowBox[{"[", RowBox[{"j", "-", "1"}], "]"}], "]"}], ",", RowBox[{"j", "-", "1"}], ",", "\"\< \>\"", ",", RowBox[{"Extract", "[", RowBox[{"Pij", ",", RowBox[{"{", RowBox[{"i", ",", "j"}], "}"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], "*)"}]], "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}], 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}], 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[{"2", ",", "1", ",", "1.1137113670819951`"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1", ",", "1.1668218427195196`"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "4", ",", "1.162417471671179`"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "3", ",", "1.1659551221539852`"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "1", ",", "1.0683429037199443`"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "2", ",", "1.0696888100625024`"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "7", ",", "1.06753697349351`"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "8", ",", "1.0766913172254229`"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "10", ",", "1.0740151623168104`"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "6", ",", "1.0841347467994742`"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "6", ",", "1.0646587504050409`"}], "}"}], ",", RowBox[{"{", RowBox[{"14", ",", "12", ",", "1.0797965212694332`"}], "}"}], ",", RowBox[{"{", RowBox[{"15", ",", "13", ",", "1.0797721209391902`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "14", ",", "1.0745119937770684`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "15", ",", "1.0700554013907977`"}], "}"}], ",", RowBox[{"{", RowBox[{"17", ",", "10", ",", "1.2415823896669336`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "2", ",", "1.069941833339309`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "5", ",", "1.066878952499605`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "9", ",", "1.1496520283442535`"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "3", ",", "0.9688695958875337`"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "4", ",", "1.1539151699008343`"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "5", ",", "0.9312490516265488`"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "4", ",", "1.1976863671448061`"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "4", ",", "1.1978310581617957`"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "7", ",", "1.197768225434929`"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "8", ",", "1.1977244840924763`"}], "}"}], ",", RowBox[{"{", RowBox[{"25", ",", "9", ",", "1.197828891290221`"}], "}"}], ",", RowBox[{"{", RowBox[{"26", ",", "9", ",", "1.1977158336956606`"}], "}"}], ",", RowBox[{"{", RowBox[{"27", ",", "9", ",", "1.197701260400804`"}], "}"}], ",", RowBox[{"{", RowBox[{"28", ",", "11", ",", "1.1977199293576466`"}], "}"}], ",", RowBox[{"{", RowBox[{"29", ",", "12", ",", "1.1978078943256745`"}], "}"}], ",", RowBox[{"{", RowBox[{"30", ",", "13", ",", "1.1976323854134812`"}], "}"}], ",", RowBox[{"{", RowBox[{"31", ",", "14", ",", "1.1976621050562257`"}], "}"}], ",", RowBox[{"{", RowBox[{"32", ",", "15", ",", "1.1977131394458023`"}], "}"}], ",", RowBox[{"{", RowBox[{"33", ",", "16", ",", "1.1977707782661193`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.569344819214775*^9, 3.5693892238236513`*^9, 3.5693893822887297`*^9, 3.5693895604254427`*^9, 3.56938971243211*^9, 3.569389785003437*^9, 3.5693899365889034`*^9, 3.569390130434844*^9, 3.5693903421116157`*^9, { 3.5693903932173057`*^9, 3.569390422482957*^9}, 3.5693905788264313`*^9, 3.5693906216797066`*^9, 3.56939077161157*^9, 3.569390890031378*^9, 3.5693909956747637`*^9, 3.5693910952185383`*^9, 3.569391142829822*^9, 3.569391222015561*^9, 3.5693914607271805`*^9, {3.5693914994464483`*^9, 3.569391516497278*^9}, 3.569392340499528*^9, 3.5694060975582848`*^9, 3.5694062606721716`*^9}], Cell[BoxData["35"], "Output", CellChangeTimes->{ 3.569344819214775*^9, 3.5693892238236513`*^9, 3.5693893822887297`*^9, 3.5693895604254427`*^9, 3.56938971243211*^9, 3.569389785003437*^9, 3.5693899365889034`*^9, 3.569390130434844*^9, 3.5693903421116157`*^9, { 3.5693903932173057`*^9, 3.569390422482957*^9}, 3.5693905788264313`*^9, 3.5693906216797066`*^9, 3.56939077161157*^9, 3.569390890031378*^9, 3.5693909956747637`*^9, 3.5693910952185383`*^9, 3.569391142829822*^9, 3.569391222015561*^9, 3.5693914607271805`*^9, {3.5693914994464483`*^9, 3.569391516497278*^9}, 3.569392340499528*^9, 3.5694060975582848`*^9, 3.5694062606721716`*^9}], Cell[BoxData["22"], "Output", CellChangeTimes->{ 3.569344819214775*^9, 3.5693892238236513`*^9, 3.5693893822887297`*^9, 3.5693895604254427`*^9, 3.56938971243211*^9, 3.569389785003437*^9, 3.5693899365889034`*^9, 3.569390130434844*^9, 3.5693903421116157`*^9, { 3.5693903932173057`*^9, 3.569390422482957*^9}, 3.5693905788264313`*^9, 3.5693906216797066`*^9, 3.56939077161157*^9, 3.569390890031378*^9, 3.5693909956747637`*^9, 3.5693910952185383`*^9, 3.569391142829822*^9, 3.569391222015561*^9, 3.5693914607271805`*^9, {3.5693914994464483`*^9, 3.569391516497278*^9}, 3.569392340499528*^9, 3.5694060975582848`*^9, 3.5694062606721716`*^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", "[", "Gray", "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", 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}], 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[{"If", "[", RowBox[{ RowBox[{ RowBox[{"wxh", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", 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}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plot9", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{"(*", RowBox[{ RowBox[{"Darker", "[", RowBox[{"Red", ",", "0.8"}], "]"}], ","}], "*)"}], 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[{"Show", "[", RowBox[{"Plot1", ",", "Plot7", ",", "Plot8", ",", "Plot9", ",", RowBox[{"{", RowBox[{ RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "->", "False"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{"Plot1", ",", "Plot2", ",", "Plot9", ",", RowBox[{"{", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], "}"}]}], "]"}]}], "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}}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.6095311213, 1.33276705602, 0.20872023669999998`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{3.2102665287999996`, 1.10845657982, 1.03294312886}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-1.3937674112999998`, -0.5252493417, 0.9966792869199999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.27293312618, -1.16885222278, 5.2120532806}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{2.8589664653999995`, -2.0186053131999997`, 4.4204470592}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.4791745386, -1.1381819698, -0.8341250564}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-0.063642192228, 3.3317759106, -1.3899501647799999`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.9442791064, 2.956476327, 0.26013968115999997`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.7227002449999995`, -1.8147983640999998`, 1.9547325744}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{1.7049107972, 5.153471774599999, -2.1316109279999997`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.2290178154, 4.9801839004, -1.3167610768}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.0316874218, -0.89057117202, -3.4631118675999994`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-5.834529025, -1.9411265471999999`, 0.045410115779999996`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.9798059552, -1.47462878684, -5.192400130199999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-7.782647558399999, -2.5252408537999997`, -1.68378366052}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-7.337995030599999, -2.3050877748, -4.2870324036000005`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{0.8002800637399999, 7.581580711999999, -4.073682338199999}, 0.5]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{4.170625282, -0.84965860412, 2.48498969}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{-1.55594369662, -1.60600253836, 3.1535747487999997`}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{3.8523954236, -3.7271065897999995`, 5.5881087545999995`}, 0.178]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.3289068103, 0.80725315268, 5.636674712799999}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-0.30090107097999996`, -2.2100345569999997`, 6.847800106199999}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-1.9673937386, 3.4689700182, -2.0575336687999997`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.8631068868, 2.8270300959999997`, 0.8845807406}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.8075489423999995`, -3.7826645341999994`, 2.412235239}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{7.145809896399999, -1.55966645684, -0.0059902424474}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{8.0712087186, -0.8043429746399999, 3.0723165308000002`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.5873528642, 6.365542031, -1.8862111096399998`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-1.2295502218999999`, -0.2651285578, -4.1339645975999995`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-6.164097239399999, -2.1142254487999996`, 2.0327782581999996`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.6634658228, -1.28648766628, -7.1805808548}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-9.5897925322, -3.1327877628, -1.0102475196}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-8.8053672696, -2.773172905, -5.5971794394}, 0.1]}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{1.9098988250499995`, 1.22061181792, 0.6208316827799998}, 1.1137113670819951`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-0.392118145, 0.40375885716000004`, 0.6026997618099998}, 1.1668218427195196`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{1.56594979579, -1.5937287679899999`, 4.8162501699}, 1.162417471671179]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-2.4364709749499998`, -0.83171565575, 0.08127711526000014}, 1.1659551221539852`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{0.2729444645360001, 2.3322714833099996`, -0.5906149640399997}, 1.0683429037199443`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{4.0772728176, 2.0324664534099997`, 0.64654140501}, 1.0696888100625024`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{0.8206343024859998, 4.242623842599999, -1.7607805463899997`}, 1.06753697349351]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{4.5866484609, 3.9683301136999996`, -0.5283106978199998}, 1.0766913172254229`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{2.9669643063, 5.0668278375, -1.7241860023999998`}, 1.0740151623168104`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-3.2554309802000003`, -1.01437657091, -2.1486184619999995`}, 1.0841347467994742`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-4.6568517818, -1.5396542585, -0.39435747031}, 1.0646587504050409`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-4.0057466884999995`, -1.18259997943, -4.327755998899999}, 1.0797965212694332`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-6.8085882917, -2.2331837004999997`, -0.8191867723699998}, 1.0797721209391902`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-6.158900492899999, -1.88985828082, -4.7397162669}, 1.0745119937770684`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-7.5603212945, -2.4151643143, -2.98540803206}, 1.0700554013907977`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{1.286817674364471, 6.275670712435789, -3.029177935871306}, 1.2415823896669336`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{3.6959036061837534`, 0.11827105598239307`, 1.7672183628051052`}, 1.069941833339309]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{3.522267474642694, -1.4274732885676042`, 3.4416934305206057`}, 1.066878952499605]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{5.432991215629195, -1.3270581992939643`, 2.2227017366668993`}, 1.1496520283442535`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-1.475854249428736, -1.072281310870421, 2.0884093650297286`}, 0.9688695958875337]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{-0.6512726755367148, -1.3897620472386978`, 4.171820402102359}, 1.1539151699008343`]}}, {RGBColor[ 0.33333333333333337`, 0.33333333333333337`, 0.33333333333333337`], {Opacity[0.4], SphereBox[{3.3723426942250367`, -2.901510864808742, 5.023861880944322}, 0.9312490516265488]}}, {Opacity[0.5], SphereBox[{0.31314714995445925`, 0.2508711668617887, 5.517120503494024}, 1.1976863671448061`]}, {Opacity[0.5], SphereBox[{-0.13934684969220784`, -1.9169056322060367`, 6.3872806635776165`}, 1.1978310581617957`]}, {Opacity[0.5], SphereBox[{-1.4314050208521294`, 3.4303439201909276`, -1.869579927151723}, 1.197768225434929]}, {Opacity[0.5], SphereBox[{6.322861868020217, 2.863475618736276, 0.7087696671259096}, 1.1977244840924763`]}, {Opacity[0.5], SphereBox[{6.783661066786394, -3.2286413878697386`, 2.2834322393106006`}, 1.197828891290221]}, {Opacity[0.5], SphereBox[{7.026683072302996, -1.6314990272791985`, 0.5460526649471784}, 1.1977158336956606`]}, {Opacity[0.5], SphereBox[{7.691532459709684, -1.0888394606142722`, 2.7576577030145004`}, 1.197701260400804]}, {Opacity[0.5], SphereBox[{5.204913437142769, 5.975494251401147, -1.7258823715356233`}, 1.1977199293576466`]}, {Opacity[0.5], SphereBox[{-1.736920135633116, -0.4412143548411046, -3.945094132151191}, 1.1978078943256745`]}, {Opacity[0.5], SphereBox[{-6.071303244006552, -2.0654873181919737`, 1.4732102471023707`}, 1.1976323854134812`]}, {Opacity[0.5], SphereBox[{-4.752533979381655, -1.339460340528922, -6.620792279294869}, 1.1976621050562257`]}, {Opacity[0.5], SphereBox[{-9.080988898082015, -2.9617322693680936`, \ -1.1998823530961125`}, 1.1977131394458023`]}, {Opacity[0.5], SphereBox[{-8.392238795245103, -2.6413867838181484`, -5.22831663029472}, 1.1977707782661193`]}, TubeBox[{{3.2102665287999996`, 1.10845657982, 1.03294312886}, { 0.6095311213, 1.33276705602, 0.20872023669999998`}}, 0.1], TubeBox[{{-1.3937674112999998`, -0.5252493417, 0.9966792869199999}, { 0.6095311213, 1.33276705602, 0.20872023669999998`}}, 0.1], TubeBox[{{2.8589664653999995`, -2.0186053131999997`, 4.4204470592}, { 0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{-3.4791745386, -1.1381819698, -0.8341250564}, \ {-1.3937674112999998`, -0.5252493417, 0.9966792869199999}}, 0.1], TubeBox[{{-0.063642192228, 3.3317759106, -1.3899501647799999`}, { 0.6095311213, 1.33276705602, 0.20872023669999998`}}, 0.1], TubeBox[{{4.9442791064, 2.956476327, 0.26013968115999997`}, { 3.2102665287999996`, 1.10845657982, 1.03294312886}}, 0.1], TubeBox[{{1.7049107972, 5.153471774599999, -2.1316109279999997`}, {-0.063642192228, 3.3317759106, -1.3899501647799999`}}, 0.1], TubeBox[{{4.2290178154, 4.9801839004, -1.3167610768}, {4.9442791064, 2.956476327, 0.26013968115999997`}}, 0.1], TubeBox[{{4.2290178154, 4.9801839004, -1.3167610768}, {1.7049107972, 5.153471774599999, -2.1316109279999997`}}, 0.1], TubeBox[{{-3.0316874218, -0.89057117202, -3.4631118675999994`}, \ {-3.4791745386, -1.1381819698, -0.8341250564}}, 0.1], TubeBox[{{-5.834529025, -1.9411265471999999`, 0.045410115779999996`}, {-3.4791745386, -1.1381819698, -0.8341250564}}, 0.1], TubeBox[{{-4.9798059552, -1.47462878684, -5.192400130199999}, \ {-3.0316874218, -0.89057117202, -3.4631118675999994`}}, 0.1], TubeBox[{{-7.782647558399999, -2.5252408537999997`, -1.68378366052}, \ {-5.834529025, -1.9411265471999999`, 0.045410115779999996`}}, 0.1], TubeBox[{{-7.337995030599999, -2.3050877748, -4.2870324036000005`}, \ {-4.9798059552, -1.47462878684, -5.192400130199999}}, 0.1], TubeBox[{{-7.337995030599999, -2.3050877748, -4.2870324036000005`}, \ {-7.782647558399999, -2.5252408537999997`, -1.68378366052}}, 0.1], TubeBox[{{0.8002800637399999, 7.581580711999999, -4.073682338199999}, { 1.7049107972, 5.153471774599999, -2.1316109279999997`}}, 0.1], TubeBox[{{4.170625282, -0.84965860412, 2.48498969}, {3.2102665287999996`, 1.10845657982, 1.03294312886}}, 0.1], TubeBox[{{4.170625282, -0.84965860412, 2.48498969}, { 2.8589664653999995`, -2.0186053131999997`, 4.4204470592}}, 0.1], TubeBox[{{4.170625282, -0.84965860412, 2.48498969}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{-1.55594369662, -1.60600253836, 3.1535747487999997`}, {-1.3937674112999998`, -0.5252493417, 0.9966792869199999}}, 0.1], TubeBox[{{-1.55594369662, -1.60600253836, 3.1535747487999997`}, { 0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{3.8523954236, -3.7271065897999995`, 5.5881087545999995`}, { 2.8589664653999995`, -2.0186053131999997`, 4.4204470592}}, 0.1], TubeBox[{{0.3289068103, 0.80725315268, 5.636674712799999}, { 0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{-0.30090107097999996`, -2.2100345569999997`, 6.847800106199999}, {0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{-1.9673937386, 3.4689700182, -2.0575336687999997`}, {-0.063642192228, 3.3317759106, -1.3899501647799999`}}, 0.1], TubeBox[{{6.8631068868, 2.8270300959999997`, 0.8845807406}, {4.9442791064, 2.956476327, 0.26013968115999997`}}, 0.1], TubeBox[{{6.8075489423999995`, -3.7826645341999994`, 2.412235239}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{7.145809896399999, -1.55966645684, -0.0059902424474}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{8.0712087186, -0.8043429746399999, 3.0723165308000002`}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{5.5873528642, 6.365542031, -1.8862111096399998`}, {4.2290178154, 4.9801839004, -1.3167610768}}, 0.1], TubeBox[{{-1.2295502218999999`, -0.2651285578, -4.1339645975999995`}, \ {-3.0316874218, -0.89057117202, -3.4631118675999994`}}, 0.1], TubeBox[{{-6.164097239399999, -2.1142254487999996`, 2.0327782581999996`}, {-5.834529025, -1.9411265471999999`, 0.045410115779999996`}}, 0.1], TubeBox[{{-4.6634658228, -1.28648766628, -7.1805808548}, {-4.9798059552, \ -1.47462878684, -5.192400130199999}}, 0.1], TubeBox[{{-9.5897925322, -3.1327877628, -1.0102475196}, \ {-7.782647558399999, -2.5252408537999997`, -1.68378366052}}, 0.1], TubeBox[{{-8.8053672696, -2.773172905, -5.5971794394}, \ {-7.337995030599999, -2.3050877748, -4.2870324036000005`}}, 0.1]}, AspectRatio->Automatic, Boxed->False, ImageSize->{490.0000034438126, Automatic}, SphericalRegion->True, ViewPoint->{-0.794285077175529, -2.930092944541522, -1.4945456006841222`}, ViewVertical->{-0.04246013605796663, -1.3734663870534003`, 0.5493938501491746}]], "Output", CellChangeTimes->{ 3.569344819277175*^9, 3.5693892238860517`*^9, 3.56938938235113*^9, 3.569389560472243*^9, 3.5693897124945097`*^9, 3.569389785065837*^9, 3.5693899366513033`*^9, 3.569390130497244*^9, 3.569390342174016*^9, { 3.5693903932797055`*^9, 3.5693904225453568`*^9}, 3.569390578873232*^9, 3.5693906217265067`*^9, 3.56939077167397*^9, 3.569390890078178*^9, 3.5693909957371635`*^9, 3.5693910952653384`*^9, 3.5693911428922224`*^9, 3.569391222077961*^9, 3.5693914607895803`*^9, {3.5693914994932485`*^9, 3.5693915165440784`*^9}, 3.5693923405619287`*^9, 3.569406097620685*^9, 3.5694062607345715`*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsvPd7W9eZLbwu5UzmJtO+796Zb8YZJx57ksx47kyUxM7EcZzYcVVzkyVb lpusuEVd7ATR2HvvvfcGgAQJkmADSQDsJNjA3ptIdUuylZh3nXNAWva9f8D3 wzyPFg4IQjzn7Hett+z97nPohMsnH5454fLpyRMPvnDxxPlPPj3p/ODz5y7y oz3/DfhvBgEPQni/Dey8bPPfdr3wInzyX+//6/1/vf+v9//1/v+P7+vEw33w VVcgyKcKoapKBCsq/yT9Vice/hL+gWUICdEgJlSHRCItRIfMYB1ygnTIDdQh z5/w5Xs1oeDnMi0+l/6ERjz8vwgLq0BUhA4JkfzvRA5RwJ9LwnUoD9Ohkn+2 in9Wwz+pCSD8+LOPDhVKwpvf8dSi2KXylvRXK8XD3yEyvAwxURrER/OvErlE EVFOVEXpoONZ9DxLHc9SzzM08AyNPEMDL7qBF13Pizbwomt50XpPHapdtSg/ V3ZTOkuFePhrxEWVIyFGg+RYHbKIQqKM0BA1MfwLPFsDz9bEs7XwbG08m4lo 5305wcTXb6ONZ2/l2Zt59iae2cizNnCYai9W4IZ0unLH6ZKiy5ESq0FaHIeJ KI7nEPCoi6tGXWw1GonmGD3aovXoiNLDHF0LC9EVW4M9fK3Gn/NVBwsvzczL 6uQltfP0Jg5rq1oLo0flj8VT/Rnu3/sQ/pn4d+JR4nHiib0PdUgXVCYe/hEp MWW8mCqkx2uRy4spSahGFVETX4v6+Do0xRnQFluPjrgGWGIb0RXfiJ7ERvQl NaI/uREDKQ1EPWEg6viZnr+rQU98tXShvEgLL7AjQItWecUPxdP+992L+wnx n8RvHnsYzzz1EF7Y9xD2HXwIz//uIZikKy0VD99HWkwpMuIqkSlcKa+wJKEW moQ66BMa0JBgRHN8M0xxLTAntKIrsQ29ySb0p5owmGaCLcOE4UwTRjLbMJLV SrQQzfzMyN81YCjNgP4U4cqr0cur7qa1rcFVaFeWPSye/rviFT+490f4t72P 4LGf/zuefPo/8Ozhn2Df+/+Bl079G169+GPiIRw6+RDapCsvEQ8PIj26CFlx 5ciO1/DK9ShONKCKY6hPbOaVt6IlwYT2+A5YkjrRk2JBX5oFgxlWDGdZMZJt xViuFeN5VtjzLYSZ6MREfgfseSZ+3oqxnGbeTSOGMgwYTNVjIFGHPnK6O6QS narifxIv4y94Bw/je7z6H+79Kfb+7DE8/uIv8fTbj+OFM4/jkOxxvBbwnzga 8XO8EfMfOBr+Q8dNFIuHh5AemYfs2BKSRIM83kRhohEViS2oSTShPrEDzQkW tCd0wZLcjZ60HvRn9GIoqw8juf0Yy++HvaAfk4X9mCoiivswXdKLmZIeHrsx XdzFzyz8fSe/Z+INC+YxYijdgCGaZCC2Cr2hZehQFfxAvJy/Es1x/97/hQf2 PoZ/+cUT+Nm+3+KJ957GM86/w36/Z/BKzO9wJP0pvFnwJI6X/hLHS36Ko2k/ bJVuqkg8PIyU0HRkxxQij7zKF26KPCrjDekSO2FItKIpsRumxD5YUvrRkz6I /qwh2HJtGM0fxnjhMCaKRzBVMoKZshHMlg9jjqg+eArzlUOYqxjEfEU/P+/F dFk3JkpoxaJOjPIGh3ObYcushy2lGoOxFby5Ynx1Z/9C/AI/ePQ3eOTZZ/Do Oy/gSed9eDbgAA4kHsCrBftxVPMi3qp/Du+0PE38Csdr937tzv4ZWVG5yIst QwF1KNxVSUI7OWdBbWIPGpP60ZY4CHOyDd3pI+jPHsVQ3hivbBzjxXZMlk5g unwCs5UTmK+awILGjuIjAeg/F4QZTxkWtaPECD+3Ya5qENOV/Zgo78FYKTlb 1AFbXot0d8laDFK13aF539+9uZ8Rv8EPnnwO/3Z0Px499xKe9H8FzyW9hoNF r+G12lfxhukVHO85hHeGXsS7tt/h7Z5fOm6uUDz8COmhqQwH+SiI1aIwvgFF FFBZghXahF6abRBNScNoTx6FNWMcvdkTGMyfxEjhFMZLpjFZNoOZylnMVs1i XjuLRd0sUo8VoyNwBv2BWbjbNoRl/SQxgcWaccxXj2JGN4xJzSDGK8lnmtJW 3AlbvnCTBtiSKmnCArQFpD6we5O/JJ7FD/YdwCMfvopHFa/jybijeLbwTRyo fROvdr6Bo0NH8dbkYbwz/xLeXXgRb0/85hs3mRORhQKGi6LYOhTFtzJUWFCR 0IfqRBvqeXMtyXZ0pk+iO3saA/mzsBXN0QLztMQCpqsWMaddxEL1IpZqlrBc u4jsk90YTV/ErdYFXG0wYtUwhxXDLJbqprFQN4lZvR1T1WOwa4cxSquO0KLD 5Kstt4k+sobWLEVPTNZXN/lr3P+Lffj+66/gXy8cwc9DjuGJrON4RvcO9re/ g1eG3saRmeM4tvomjm8dxtuXD+HY8u++cZN59CpFjGVFsUYUxXWiJL4XlfFD qEkaRWPyFFrTZmDOmkNP3gIGixYxUroMe8UKpqpWMatbxXzNGhb1a1ipW8Nq /RqD/TyW+Lsvulew0biC9cYlrDYuYrlhHosNc5gzzGCaNzuhH8dY9QhGqgYw XN7FwWvnjTbwRqswlJzz1U0+gft/dQD/+M7r+JHXMeyNewePl7yHp40n8GLf Cbw0/T4Or72Ho9fexrFbb+DYZ6/gyPqzjpssEA//gqzgZBREljJ7oSVj23ij XSiJG2ScHYM+eRLG1Dm0ZS7AkruM3sIVDJWsYax8nZTbIPUuYV6/icXaTSwb NrHasImUD0zoStjElZZLuNu7gM3mDWw0r2O9eRUrTStYNC5h3riAGd7wpGEa 46TyqG4Ew1X9sJVZYCskdXNp0YwimGOTHnBkgvc/fgD3nziCh9Rv499T3scv NB/gyfbf49mR32P/0km8fOUEDt9+F0fuHsPrt1/B/qnf4ht3mhuSgaLIKt5p I83aybvt452OQJM4gdrkWRjJP1P2MqwFa+gr2YCtfBPjVVuY1F3GjP4K5uuu Yqn+KlYar2LNeA0FF2YwUXoVt3uuYLP1CrZaL+NS6xbWWzkSLRtYalnDfPMK ZnjHUzSxnXc7StPadPTTlT2wldKshfREueXoTU3bNevPn8P9772OB3zexr9k nMBPa36Px60f4in7R3hu9UPsv/4BDn3+Hl76goK9cgjnznnj3Fl5y9dvNi8k F0URNSiKauENW3nDgyiNH4MmaRp1qQtoylxBe946rEWb6Cu7zAu6inHtNUzV XMds3Q0s1t/EcuNNrDbdRNJH5WgMu84bv4nPbTewZbqBy+3Xsdl+DRvtV7Fq uozltk0stG5glmaealqCneYdNUzCVjMCm5amLTfzhinWIrrd7Oxdl3voEO6X HcODKe/hEd1J/NzyIR63f4h/+/Q5/MfZ5/DTc8/ip6efhttFFdwFXBCgdIL7 OSVzTvezCridlot/rP7rA1AQUoiicHI6sp0D0EMMozRhAtqkOdSlLaEpew3t BZuwllxBX8U1DGtuYLz6M0zV3qIQb2Ox8Tb5egdrLXeQ9Cldde4dXOu6g1uD S7jccQuXO29hs+MmNjpuYI2DscyBWOBAzHIQpltWYW9awGjDDIZrafEaWlxD 11zZykHQ0+XnP7iTa4a8iQeL3sWP3n4O/3ryObz/aCDSjnoh/90D8HRWwYtw guyimi+8929Bdo4fErKzSnidUcDzlByGb9x6MOUcxsgTQZJH9qE4ZpQRaAra 5AXUZaygKfcS2osuw1p2Df2VNzGsu0UZ3sGU4XPMNXxBid7FSstdrLXeRYnq Mib1d3F75C5v+QtcMX+By+bPsWm+gw3zbax1foblTvKFtz9n2sJ02zommpcx ZpzDcP0kb38YtupecoBkr6zDYHGxdOt/DhcXOVxdFYQS7q4q7P+xP6JeUqP0 g/fg7cIbljvzRSHcuuKCmkWD4rwKcgG8dTlv3fu0ArJPvWu/fveFQRUoCqXH DrdwBAbJ/HGUJ8xAm7qEuqw1NOVvor34KqzlN9CvucWru4Px2s8xVf8F5njn S81/wkrrl4g7bWas/hKrnX/CbftdbFn+hMuWP+Ky9S42LV/gkuVzrHEEVsyf YbHzOuY6rmDadAkTrSsYo/FHGqcxbBiFrZbsr2Go0tZjsLTk+46U3dnZi3cu hxtHwJ0j4MER8CKeelgF9bN+KHvvDBQuaigJJ6icffAdqC6qoSZUu1BBSVYo zyuhPKeAgoMiP+Wt/8aABFaiKKSZlKAbCB8iHeykwxw0acuoy95AU8FltJdc g7XiJvq0t3mxHBDDF5hqvIu5pj9ikVRYafsTkp1X0Fe+jau2bVzqm8aW9Utc 7uKgWP+Ira67uGT9AmvWz7FiuYVF8w3MdV7FdPsmJtoYMVoYHptmYGugGuoH OCj09NWsCirKdjy8q4uMgyHnYEgD4ulGkruqISd+97Azzj0eiIJj7lC5+EJN +Dj7cmB8+O4++Lj6wtfFhz+pBThBTdncx/FRQnVeAdU5OZSnvWukcfEUD3vg q6pAgKoSAcpKPCJ+9v+h0J/xIYguM6SL42UjeSZRmjgPTfoKanM2YCy8DFPp NVgqP0Of7jaG9LcxVk/yNJI8zXexSMmsmP6I8rA7mGzexo3JbWyK4/NHXuxl vv41NoWxIta6OFZWehrLTcyZr2G6YwsTpg2MtS5hpJk5k9EOW+Mgx4tjpTdi oKqMNbFULrm5eHGQ5GSNAh5uCmmw3NTwJhSuPlByQN76X8FIeVWNqg+OO8HX 1X8P/Nz8nfjiR/H5unHE3DhirsKIqTiaSlJLAfV5OVRnZdXSULk4bBMUUoXI UC0SWCynEhkhOmQTuUE65DnmYXJ9+ZlahyyFDuleGkjV9N+iwJf0C+SQBnXv DmkJh7RKGFJ6IiM9UVvZVViqbqK3+haGaoUhvY1J4x3MtnyOhbYvEHl+mF5r Gyt927g+dYtDudn1hRO2ur8QxrP7c1wi1rrvYKWL42l1jGfnZWk825Yw3DoH WzPHs4meuJHjWcfx1O6M519xHGUcRznHUSlCGEs5h0fBYVK5+hH+eO6fAxG2 LwiaD85wEAPh5x7oBH/3QJrD3yOQ7wIc8Oev/PgVaYR9KWpfFyV8L8rhc0EO 9VmZNL2FC44pquCQUkSEaxDHwj6VyBamqIiSCB3KwnWoDNNBw1HXcsR1HHFt AOHHz310KFfpUOrNHNVT+7BjwPPJ6SI/6j2QHA79asAr01eh54A3Fm2hlQNu ZsTrqb6JwdrPGKluYaLpFmZabmPedAfJ3pvo1ZO79m1sWO9wwC913eGoc4j/ moN9G5d66Pu7b2G5i96viwNucQx4BwfctAxbGwe8lQPewgE3csDrG9GrLcb3 HHNNwoB7ukoD7uVO8roLA+7LAedgu/lD7RoAHw7y8//M3z0VjvJ3vTjKQQgg nBDgGeSEQM8g+lG+JQL5Cw69hz+H34/whR+JLQ67sxy+F2Qcdi9opXE/7xio 6MhKxEVrkSpM4Al5fow0gachqqN0qKUNDLRBA23QSBsYOf5Gjn8jx7/BT5rE q+X418hpD08dKly1+KedZFPBGOzDRNOfTjeERoieRHHiHI2wgprcTdTTCC1l V9CpuYbu6usYYM410nCTacNNpg+fIeRCDaPWH2E3b2Nr9ks61ltY77qFDY75 JQE9Aj7DBrHWzVyt+wYWrNd37WCnHUbblzHcTkdioh1a6UiazRisr4dVU3i/ eJl/Aw8XT5pBBi9y30vgPc3g7S6ZQekWADVN4OMaBF/3IJI6GB8/Fom8Y37Q fXSUox5CI3jxJcgrhJYI9ArmuyDaJVBEgKdgEcka/tSTH63h5+xNa+xa4qx4 +AfERJQiProKSTHa3YnOckJL6Il6WsZIq7TQKm20ionooGU6aJVOWqfDMelp EiY7hYlOwUJURz19Ua27FhVnK/Cgo6orVNXTMmb6I+YGURMoZigsT1+GLncD BmbDzWVbaK+6Amv1VfTXXWPIuo7xpuuYarmBoIvTMJZtY2F4G2tTW3TfN+nG b2KdFljvEXCDFrnB43WsdjMp7LpGq1zFrOUKpsxbsHeuY7SD7qiDVmlnKGxj btDcgYGGuh1heLp6MQ+Q0wNJXkhGUcgpCMEaKrcgikKwRjD8PEI4uiF4+ZEI xL8aCt0npymMIFkY416QLBTBhHAM8hYMJAtmrikYKNBLME4AjeOHABomgKfw ZxDxc5bRO3k6ps1xxuEXE6JKkRxThbQ4LXLj6JLidagiauKqUc+fm4jW2Gq0 00Cd0TWwxNSgK6baCT202nfRy6/18CvCT938ipX2M0dKdmsL1qGZKjLKtdBf rHRMMf0d8r3raKMOFAX0M3sdR1H8DMqYsGtyWEEXMgSXXoKpahOW6i301l7G UMMVjBqvYqLlGpICr6OraRur09tMQTj+FlYtVMVq13UnGuQa72it5xoFw6Kl +wqWui5j3rKFWfMmzXMJ4+Y1jJoXMdw5DVsHUzdTL4ZaTOipr77f4as9XTxo HhkzE4Uj4ErmUVAoSkLtFgwf9xCHeUI5zmF48V/5fl80dB/KEOwdLhjJiW/C eDXB8jC+C91FkCyEoIZkNJOXYCZ/msmH+lHBn/myn7Mnsxm3KslKp8XDA0iK KkFqbCXS4zTIp3VK46uhTSD1E2rQGK9HS3wt2uPqYI4zoIvoSTCgP9GAgSSm pMkGDKXUEbWwpep5rMZQso6/06EvUSeazxotyaw9SJrIb3CvwPcd5srxqEah vA1Fvr0M76MoiptCSQqjDSvpmoJVNJSuo7VyA526S+iu3cRA/RaGjVtMNjpR mrGNkd5tLM//CfPmK1igTJasVyibK070aFc4QCvdrC2Jpa4t/mqT5rqEGcsG Ji1rGLcsY8SyAJt5CrbOYQyautDf0owOfZVkrv8JL/o3maAmJpTeDMZy+jUF laSkinZM5Usz+XmEwd8rDAFe4dj3iBcu/iYOpScCUPDBm7RRBEKIYHm4E9+E M94LZguhAYPlITTb100WKCpLTWUpqSwZA5C7w1ynxMMPkBJVhPTYcmTGVyGP 5ipL0NNctaijWYwJDWhLaERnvBHWxCb0JjajP7kFQ6ktGE5vwWhGC8YymzGe 1YTxbCOPjUQDxrIMGM2s5XdowtRqDNCEPfzbXTSdhWrr8NegybNs12z5Xi0o VHY7YhO9YPIsyjIXoMtbgqFkBc0Vq2jXrsGqX0efYYMqu0S3w99ptzE1vg37 6CxmO7eYaG2JElqwEl2bTkwGNjlAi9ZL/GiDv1pnSFrDtGUVE1YWRhY6PwtT A7MdQ52DGDBZ0GVsvN8x5e1x0RUyF0ld3gzg3ky95MwEFK6BdH7BUDvM5XuP uQJlEQj0jsDxn8ch41gEas78ASGKSFoqUjyGKmg+EeEE7SbfsRvDlQDRbv60 G70hMxF/hkI/V084jPYH8fBPSInMR0ZsKbJptFxqq5TG0iY2wJBoRBON1JbQ CnOCCd1J7ehL6cBgWgeGMzoxmtWJ8ZxOTOR1YjK/A1PEdEE7pgpMRCt/bsFk XhMmcmnIHANGMmnANMmAvdRed4QW5sAqGq8EDzhYne3SiHyZFYUBDGGRYyhi cV+SPoeq3HnUFi2isWwJbVUrMFevortuFf0Na0iIuI0O0zamZ2k8ZsVTTBCm Ozfo+zacaCLhxbpOywnWmiVmzKu02gomrUsYt7J6s9Jq1hkMmkfR39GH7rZ2 tNXX7fpFZ3dazpsWUxG+hD8tF0ixBUHlLghNspofLeZPBDisFuQdif3/EY2I V2OhP+VFgSmiGAVFwyklhCgjaETJeMEC5PSTcsF4QZLgvPwQ6OHDDJCCc/fa MdynO8so4dnIjClCdlyFqLbihHpoaLDaxFYarh2mxE6YE83oTrGiP60LQ5nd GM3uxnhuDybyezBV2IOZoh7MlnRjjpgv7cJcqZUw8+dOzBa38/dtmC5s5vep yJx6yYipOvQnaNEbpYElsJxOs2DXgDnuHchX96MwdBiFcXYUp0yhPGsG1QVz qC+Zp/oWqb4lmPXLcLswhIK8bfQNbGNi7jZG21YxbqKc2tcw2bmKqc5VJ0av Vdpu2rzCd8siJqi0ccsiRq3zGKbtBmm7fosdvWYbutq70d7c+j2H7WTOHvBm cJFs5yfZjnZT0m4qtxD4CA7SM1yynSySdosU7RYkF2wXCO8XEqH5OGAPrRW1 RzTZX/B1R3ECQkXFCWoL9P5KbYGeVJsHE0JXt8qv2ywzKg859JCCvYroESsT WqBP7EBjogVtiV20Vw+6U3sxkNEHW3Y/RnMHYC8YxGTRIGZKBmmbQSyUExUD WCSWKvuJPqKX6OZnXZgvN2O2jGIsMWGiiF41rxEj2QyE6TUYTNSgN7ICZv8S Vr9Sp8J51m4XWSE7Ey7CFKTrBWEK0vW8Aq7n+PFZOb4tfvV/IO2METmyHuQH 2FjIjaEw0Y7S9Enqcxo1RTNoKJtFc9U82qsX4C27BB0rraGJbQw0LbFgYvXf uoRRFlFjTOD3MJVf4oDaOxcx3rnAHGUBoxbBprMY6qJNrVPotU6gyzIKS+cA 2tssMNQZvudI4GTOXrQtvamLDyHYNlCyLe2qpiZ9BE16CnaNoCYF20bRrlHM TxTRPPdHv05C/olI1J7/kNllqCqa2gxVRvNdlGBtHiMlUyt39Llj6iA6VmpT Rm16MRh6sgpzd3f0T+AT8fBDZERkISemBPlMLwvi6+lUW6GjFutp4+akXnQk 9qMrdRB9mUMYyh7GaP4I7EWjmCoZpe1GMV8xisWqUSxpRrGiHcWqboQYxprO Rgzx/SCWtbS9phfzVd2YrbBgqrwT9pI2jFKvttx62NKrae8q9LIGaffLZ54s XNu3cIH1urMzjcuyxY3wcBFmYoU52T+H7KIKXgIuSPA8J4DfOauA+2n5txwy T7/QgRzVIPJCRpEfa0dhsh0lmROoypuEvngK9RXTOHW2GpGxd9HYuY1BFno9 jfPoa5rHQPM8c895lgi0NTFimndiNTeH7zA9ZfVgpiu2TIvm77FOwkoKmC3j 6GAe1Ma0tb6x9R8doV52UaAA8x8XumUXStuFbtk12EGBMPiK0o4QpR1AWQfK BQpEiwwIoa0P/TQRCW8moPaCB+0dI7IgTBW9RyTBd0UKiOYnJPdM88tpfkHp gvllNL8XKwwPj2+aP5sxNZ/VRSFz0+L4Fsq8E/qEHsq8H21JQzCnDKMnYxSD ueMYKbDT9BOYKp2gGSexUDWJJe0UlnWTWK2exFrNJNb1E9jQ27FRO06MYb2W lNAPY1k/hMXqAczp+jCt6cYEaTBW2o5hca1JoIAOg/Hl6IkodGj427jIgsjZ RTC/YzqS5vciZCIN5C5qGkLhrBbmpyVcEKCCnFTwFnCW9dtpcX7+PkeTSLpL F7J8h5ETbmcxZUd+KumQbUdVwQRqSibxyZlJpBduwzS4je6JKzAbZtDVMINu 4wx6m2bQ10y5t8xgoJVoo+3bp9DfSfmbJ9FtnoDVMoFOuvh2JletnaNobh+E ocn8gMMryS7K4E36CjyQ38MDlVso1B4CDyLu4UHUVzxQCjyIwcGfRcP/5RQm WP6iL4ihLyAPEKp2+AN1pEQGleQPgpVSrA6WO9y+N92+N+O0jGTw9Nwhw8fi 4cfIDEtDHsvNwlg9i4hmFjEd0JAMdTtr5iljsGbY0ZczCVvBNMaKZzBJRyqs l89r5rCkm8NKzRzW9HNYr5vDJcMcNutniRliGpcaprBRT6LU27FiGMNS3Qjm 9TbMkBiT2l6MV3ZhhPFgWPALTMRsqVUYiCtCZ2g2vuVYsnB1LFmIhHAV5qdV YtRUMFdVCPPOwmz9fVCTFypnaY5eLSxiCG++BZU4Vc9vn3OsX5yS4z5Hq1Oq ey8y/MeQFWFHdoIdeWnMCsiNStLeRXENRbXb6GDe3aybQBtp3l5LWxsmYWmg 9hsnWfUyBLQQbeSByQ5rhx3mTjv9gR1t5EMzj8aOcdSbbKg2dn3fMQUmcoKO zNuZnHAOICeCeDMhTNkEToRLvoGhwZ98kDgRjSBFDILIh2AihCy48Gwayj6O RM3590VWOCFMHe0k0oLeQR3lIESERAgGiCAFCUEPESgnIeQkhLeSxPs/CJET noMCJk9FMQ0ojjOhLL4LuoQBGJJG0JJMV5c+ha4cSoFJ03DxPNQvxiP/gB8a jyuo9iWsMHlaq1um0Zdp/CVsNRLGRVwW0LTA9yRI0yw2KK/VRnqShgks1I9h lsSYosewM3CMMmgMkxS2gibYsmpYGZeyIs5jZJS8hPNFT3HRQljFEebivYQ6 k4SQuwpeQukqssFVWJjYhRN8RechrFf4SusV8HFWi0sWwoKO6oK0mCM/LYfn xzLpTPcjyb0PaSRIOgmSEW9HDgly7GMT/GK3Ucm8vtX+J9RV2tGgsaNJZ0cL /WBrnR2mBjoEI9HM961EGz8nQZrbBULYUc9jHX+uaR1GRUP3DxyhS3bBQYyL fhIxXEkMBgylgxg+dBS+dBT+DBgB8v8bMWJx7PFUpL+fiDoXV4EOMUxHwvgq +gt1lOgzRGqoBF8Rzv8qUCMEgQr6CsVX1PD18nQw4yPH5GpaAC0dUYLCqFqy owXFsRZUxPWjOnEYDYyxrWnT6BQaM/IXMVjMfKpsBVHHRtAXtgyrLB0rCeVY Naxjo2Edm43r2Gpax+XmdVxpXsPVllVcaVnB5dZlbDEX22hZwFrzHJbpgBeN U5jjeE7XjWGCrmNM14+RCitsTCFteYwjmXQZyXlOjrVdV2eBHN7SQo2bQpxg 9Xaj/t3oGkgNgRhO4trV3zAH9hVXDITVGQHiNLabMHHqw58FqPmdnbUaFdSO pS0l007vT70klvw9Yl0sSPIbY9FjRypDzNGPFxHB4kHbI2AemlI7qivs0JMl ddW0fi0ZY7CjsZEgSxrJkgayxEDoyRQdjxqiomkY+XrLgztuQ2DHBYEddBsX HW5DZEeYxA7PHXbQbZAZAjsCGUZ22BFMdhx8LBHhR1NRR4aFqmMhUeQvd+kR InoOKZwInkOgR6CSnkMZJNIjQMHRkSt4nl3PIfHj58gOTkNBRBWKohrIjw7y o0dq3EkcQyNLrbaMOZhzl9BbtILB0jWMVm7A42gh8r109ACbzBlmcSldi0vG LXJji3zYwtVWom0T19ou4Rrr5ysm8sa0hkumFay30du0LmCJPJknT2bolCcZ YsZrbBhhaLEx5bQVN4l9LUMZRbDEp4tX6i6sOv3fyEHDq0kCHxZjTtKqnb+7 /x5xjeO7rHV58wLcpSlcf3eJHn783xI9FFBfUEBFauxkorG+NiSQE5943kJc 1Taq+reRm8uMtJApCDlRTk5Uae0Ij65DRGwdohIMiEo0IDLZgIgUA8JS6hCc XAf/pDrk1Q0+5Jislp3zknhwgakleeBNHsgZPhT0EiryQO11Lw8IppSBopcQ 7C2w4D4c/EUoPA9moOpMpMAAJxp+hwYhAlQSDYIFGqjupUEgApQCDXxEGqi9 PL5Og0eRG5yLwvBqFEU2oyjaguKYftJgBPqkSRjTZ9GWvQhLwSp6S9YxVL6J Mc1lTFZfQVjwVZi0V7Hcco0UWMKVvFq6g2s0/zWa/iqutV/F9Y4rxGVc6djC 5Y5NbHZsYJ0V+SrpsMTybZ6p+yypMEUqjNeNYqRmADZNF2xlbbAVGsSmn+7U TFYVXqSANzzdpCl/OY2opEElCvjD1y2AhZOwqhjoRKsH7hGXVv4SQV6BCOK7 IHHGUYC/NKfvcQ8hGIx8mb4Kq46qszJH0Po7/OqBvThOeBGeZ0aQwfKzyHoH CcyuUkkKmV8dlEF18Ak1wDfCAP8oIoaINcAvzgB1vAFyksQzSie2ongy1fU4 o/gnx2Kx51lPEoNsvsCS84I/c4tvkMLhHPxICn+55CCcaM8Y/JnkIFSSgzj5 VCZyP2L4cD8nksJJ5MN3EKwW2BCJIDIiiIwIdDAiwMEIfyVvXy6vupcMv0Be cBGKwhkvIk30C930CUOoShhHbfI0jJkLMOWtwFq0jr6yTdiqLtO3X2MWcB1z hhuIjLiJzrrPsN75GXW/huuljSTBZ7jWcRPXO2/ihvkGrpuv46r5Gi6br2LT fBkbnfQjJMUyv7/QtoxZxpEpEsLO9HO01oZhHf1CJTML/q2hQg3K5CpxJU5Y FJV8AVNKgQhU+Q4R/NyFZWZhvZP8J4I8g4XFN74Ey4L38CWImWQwGSGwIsjT X5qL9qBA3AX3ILBBWIP2Jhu8xGERmPDSA4/D9cHfIeZnz6HwqWdQs+/X0O/b i4/O6/GJRx1OyQ0472PART8DXAMNcAs2wIXMuBhah3MhNWKHjtCcw/pHbM4R ax+mxmeU8DqleHBnHuIc49S5HUIEkhDB5HoolKKXEPKJSJIiioaLFgkhegol bR5ENnxL5MShX6Yi7p001HJkBB8h8eG75EMUf89aReREOAIFTqhCEKAiJ1Qc MSVDqZLhUy5H1dcDRX5QmaNTqkPslCqJHZbaAVNnYcxagil/DdaSS+grvwyb 9hrGam5gikSYa7iNJeMdxEbfYeZ9B5s9d3DDuolbmlYS4Q6uW27jpvUWrltJ EutNXLHewKblGjZIjrXOLSx3XMICiTHLwDHFoGFnBj9qGMWwvp/nscBWwRqk tBqVPn5fI4SwQq4UCUGvILYgBEmr4iSDYy1WWPfbI64lhXiHiHASX/+Br8H8 PEiCbMd1kCCeviJB/BmFhNVyHwZ3+WkPkuNZvPvgYah/+RYyDrwN3bHjMJ08 AstHL6L++E+/UQRJjTo7FZDKRaqA1FLHklQB/RmUJIlUARFCF5fUwfU/HVNs Pn5VCPTTIthHS5+v+TNHd78XA5nsrBre5/3IHSHKCNyhQ2HRqvKUoozPrkNh keqIMoJLEegTJGQbv4yD+vUs6C4w2SR5gkmdHeLsOJNAB3kCSB5/FUdWRb+r 8oWvkvmW3Pub3BHaqkKbyB8LuTOAstgxcmcatenzMOaswFS4AWvpFvoqr8Km u4Ex/WeYqr+NucbPmSh8IXbXxSf8ET2mu7gyeBe3+q7i89p28ugL3Oz6Ate7 Pse17ju40nULW103sWG9jjULo5J5Cwt0LHOMNNNMOuxN0xhtGMdI3SBs1Yww 5KAmNB4V/gHistfOKqVS6Kpwk7oqfEXeBAtL+AJrxIVjiTbSupawRsJ8jK8P 8DUUoazaQuWkk4AdGgkUkvmL0+8Bnj6OtROBQjI88eBePPHAMZx89CMEHDiD nHfPoe7MGVjcP0a/7G2YXV8Qm92kUkktFkoqET5Qu4hZMV/3iLWRrwjpM4FD X9VJjsa3s2LT21+LZvkJQsK0iAjTIZ5IDtUhncja2TIWQPgRPjpkKwlvLVId c88ep2UkGdl8zpfpbYAYtbxJMrm74KTCdknm6y04KYlogpMKUIqOisSRyHb6 xWwUn0pArcfHCFILXknyTIEiIkiuMPirQ4lgIgh+Kvp2FStDkkzz9ZBVEMDi N5i5S6iVHmoIpXHj0CTNoDZjEcbcNZiKLsFCz9SnuQZbzU2M0TNN0TPN0SMt tXyOtba7uNT+JySlfIl+y5e4PvolPh++jruNZtzs+SNu9Nwlw77AFXqvre5b 2CDL1qzCqvllLHZewlzHKqZNi5honsUYi4ORehts+h6yzARteCIqg4Id4vdx 9O1IDSNiswjZ5S+yK1RsSggSVktFZoXvEVdz7kcYX8MUYfwpjEcHyVj/hcqD +TXBTwWSZAG7BHv3Zy8h+GeHkPniCTzxo49x4hkX+B+XIeuMHLXe3ugMcENv yCl0+h2VoqebQCzW22qxwhJ7BIUqi0m1CDepR8vfbafy8nE0DUlptFBhiWk0 I5fitOy7jkm88LByREXqEMvkJ4nIIHL5c6FjT2GZsKcwRIcqck4TyKO/Yz+h SodyOX/vqUOxSxU8T1OaZ33INX/IGBC9GRC9HU5N6RX+Tb45iV7tuw66Eapo HP51JpJPMiB6eYs0CxSg3KFZOBUjEO1b8CPNfNWMGCqWFEyOlEyXv0a1x5Dv p/mq7zHShhLWjlXJs6jNXIIxfx2m4k1YKq6gT3sDQ3o6M8MtTDXewVwzqdZK qpm+wKXOu9gy/xEp6dsYZL15c3Ibd+2f4cu2LlzvJdV6SLXez7FFum303MJa 1w0sW69i0bKFuc51TLcvY6J1DmNNkxhuHIbN0AtNbDa0UUmoCAkWaSan4ZSu /lJfkpujC8YzFAGkWaBMopjQYiEs0zuJS797EKaMIMIRTuwR3/0rX3c4R74p JL4defQw/B59DRnPf4DKEx6oZ3rSEJQM9YduePOQAt4fBiCZwbYyMABN0SqY 4lxQHfQWeeZI112Fik3I1PyFmk1sBBQaAgMEeAjHnbpN6lITa7ed0v4bLZjK MzLHQsRDiIvWID6GbCMyiDyi2LHXVEP2VZN5ejKvjsyrJ/Pq6enq6enq6ekM PlKLmt6xzzT65SiE7Q+HF0Op7CKZx4JNJng5D8nLqQTmkXU+3gLzIkVP56eI EsjnJHLvr3DwV8kIOpYJPf9bgMA2IoCM8yfj/NVhZFsoEUzG0URqf/iQdSql eqfvOTC4CiH0yZFEHK82iTpJpU7SqZN0X4JXm0G/nOxegeCv+8N8pgVFAY5O UpGkE6hMmYM+axmNBetoKxFIeg29DpKO1t/EpPE2ZknSxbY7WG2/Q5KSgBYS kRE2PfNLDA1s47O5bfxp+ha+7OzBtT4HSXsdJBV667pIUutlzJk3SNIVTLTN Y6yFJDWOwtbQB21CLrQxySgPCxHXvuWu/lIvkLvQqhUCP5GgTEpl4fSD4UIj idhQItAzVBEpcDLSCeEMEA/wNUIkajhHUyQpixvvx44i5en3Uf6OJ+pdwtAU mIamxGLGgFLUlxSjpKQQz7/ig9N/CBU7HTLDwlAe70+4cbx8SU5HCeEq1JKB UhnhIbRMBiKQuE+sKb8r1pO7taSjcU+ae1JJdSSTQ/V5byhPezlqyR8hMEiL MBIumib0vJAMuXMGU8AsRvEsBDhnoihO6uTTkLR6YcsyCdtAd9lE0raQsK2k gbBFWegGawuRji38e80ksJF0MDJMJ78eg/hDkfCiq/Siq/RyZWh2l0ir8Nwh bQTU3hEiaX0Fdymw9q+Y90fhwK+C4fJSDsrOx6Lk4of8LIJRl2RVSWT1VYeQ qEFQk7BqRmOV0vcBx/yG4OijecVxRArfZ/Kqcym1Ql5xMa+2lFdaRuKW8UpL SdwywcF78XeuTGS/UX+qNCj0I3kDSN4IG4pJ3gqStyZrBQ0FG2glec2VV9Cj u45BB3knjJ9hpuUWyXuLteRtlg8sNVioX+66g6tMDTOzv4RtZBu3lrbx5cIt bHf34kofg3kvv9tL8vYIjaFCC6JE3imS125awGjrFGzNJK+R5E0ieWOTURoW LC7+K3b6DIUeQ0/BuzIhFgO4QF6hC0poqdnpzuBAhzHq/ADhTHUEBoerdxCB i48dQ9zj76L4TXfUnidv/dPRlFCKplwNjGVV0FZWIL6gnDxTkGOe+NXTrnjp o0Cc5el8g+mUwxWY3NpGcVIpSv18v6p4drNXqQy+T6iBmZEH8zXYK0icGwkU 50f8HVzemRNRMcIrxE5s9XkZwsO14qMBEol0IpuWVbsk0ymnI9A9C8FEhFsW 4ogU8jnDORvZFzLRGFON5ugatEVVoz2iBp1Relgia8TuRis/s0ZXi+8tkdIe eKHb0STwm0zJPB6L1MOR1EoAPEUuM4e6h8ti6JcJwcuHg/035DI5LRccMcFh f+d32cj4OAU1Mjf40U/4ksQ+qlASOIQEDoaKRFaxblGy6JXLVd9zrP3FRVUh gfJLoBRTeMwiChg/SniZFbxEDW9dR1LX8DL1lHItY4eesUOvlNqb9SR1jYsG mnM0173E/k/kyElsH2ap/kwdwm0oip0UiV1NYtcXrKGldBOdlVvo1l3FQO01 ZpHXWbPcILFvsga+iZWOz7BuvoVLVqHOuYXL9LpXe24jO/dPGB7fxu01knvl NrYH+rDZ9xmJ/RlW7yH2rPkSpjpI7PZ5jLRNYbhlFJqUEmiT81AVn8z6LEDs aBE6NEVie0geWewfk0mkDhJa/BQ7xI4SOR1O7BF5/QA+fPRthD32NnJfZcg/ FQKjOh3G2DI0ZdOTlVVDX0XLlrFw9Q5w1ESshzyVeP25/Xjld8/d09ArtSC+ 71GO+PhylCWVodzX92u1mJQxh+LrpXyoo5QXutb2ijM9X5XwOzN/UpvoOwdP 4J397+PtF99FJk2cTxTTzAGuiQjxSEeYRybCPbIQQyS7k01ErlsOCl3yUHox HxXn81F1rgCW6Hp0xTagJ64BvfEN6EuoR1+i0Dhax2Mtf67h59XojpUaRC2k kVnYE/JeNDLfiIDHxUB4Mr3w/BrDmWZ4hTlBxYH/a9Fh+8i/wv4n0hD+bgaq mSX5MPCpVQJCSGgSmwW5UhUIhdIf3gqf3SXZ8xTzBbEtRwkXQujKcWVZKPTk uJ5V/JVjUjI5VoMUxiIBGUSe8HwLXnkFhaDl6OiFXn+KoMHR5y88LsMJzZTC nzHeSo/OaKKXb6KXNzI9qXep8LtXB8eR6VmJAmUTinxZrYUNUQcTKEueg446 MOSvoblkHR2Vm+jSXUZ/7RUMN1zFuPEaplquY950HUsdN7BquYF1601sMuvY Ii733qRD/wy5edQC0+nbl7axvXEH28P91AG/38P/9w0djAs6MFEHbSPQpFEH KTmoiE9Ebqiw7C/1Ugqtr76iDiQNBDo0ECz0TSqidjUgLO+Hq6Nx9OfvwPfR d5Bx4AIqPwxCg3cqGiNLYcyogbG4FoYqPQoq9fx/TKmVIfwb9MRy8lNY8vfy JT9VOPL8Qbz27PO7cxJycYsBwy11+aFXJVISKuk3KlDp5yNpwFE53jsnIRyF +QihDzdUKPa9d+YjgkVNiC1HXv54/9WP8P4rxMu/x4lDJ3DywHsoobUrae1g 13jyPxVRnhmI9qJ398xGqmcesj3yUOBRiFL3YlS6ctxcyujyylHnXCFYG/1J bRhIacVQaitsaUS60JHbTDTx50Z+Xi8+ZKQvSS/qoofn6maEKfwgCnEHlXj6 qcN45ukjeO7po3iecMKLTx/ly2+PMk958TdHRE2oGGXVTA/3PREDr9ezUeEc yXyEohFAJSioBDlVIKcKvOQ+exwiuOjsLTaruIi9Siq4E0KnkudFNbyE6Teh Sek+qU3JsW/U47T8O45Nb2lxGqTHUxcJDAw8Fgg9yXE7j5mpER8zY4zUoyVC j7YwPdrDa9EhQIh9kdWMcdW7OzDaqZ126qXdR4NWr3L43rumfxR53kYUqiys M4WNmXaUJs9AwxqzNn8FxpI1mCo3YNFdQm/tJobqL2PMeBmTLVcwa2IK3nEN y+ZrWLVex0bXdVzqvo5NCmCr9zou911HXsEfMTJDkVyhSLYokrEBCuQqBXIF 8xTIDDOgyU4KpIMCaWf6bhqGJr2YwSIbZfFxjr4YR284sx/fe4KE2PJIcQRT HCFi35vYAwWvn72LxGdOo/g9f+jdk1l/laAhRY+GQgMMlQaUVBmgSK0W06Ew NVN6hmtBJKJAFEKTlNAj54ujL75MHMJrz70gbnr0FrdC+TumVKQdH39Q0EzJ WlSmVUDjp94Vx25f+n+nNsLFyRVh5k6YVhG0InRf7s7byYTdUydf/xS/xMnD n+D3r36Ij14+iY8PvYePD7yNYOcoRHokIcYrDXHURoJXLlK9CpDrVYQir1JU eJZDSz+n99DA4KlFI9OCJlk1Wrxr0OpdjVZ+NpplwVi2GeM5ZrHxeTynHePZ Jn7WipHMZtgyBK0YMJisR/mFaJSejkLamz5IeMlbUAT2EfuffgMHiIMCniJ+ K+AoDv6GePJ1yuM1KHiPJ1/IQvapRGhlZygJVl9KxhplIGQK//t2W3akHcZu rippj62LmlWvWthhDG+hN0dOjXwbcqF967x6d/nC+4xS3F/s9am3oyXsH5AZ V4ksaiTbgYKEatZYNdDG6VEbW4eGGAPzwga0RTeiI8oIc7QR1lgjuuKM6I43 okd4PFF8Pd8bGFlrYaW2rIw7XaFaWAOq0KEohc+9evlb5Hg2okDeiaLAfhRF jaEkcRqVGQuoyVtCQ/EKWivWYNauo0e/gcH6SxgxbmKiZQvTpsuY77iMRfMV rFiuYJUl7Hr3VZa0V4XNk71XWbpt9l1FfsEXGGb5e/saNXP1c2xPDIod/HPW S5i2rGPCvIyxzjmMdNhha7dRL4V00hkojI3i6Pndo5cQUS9+ol4iECj/Si9n 976HiF99jNw31ag6n4Ba/yLUJehhyG1AXVkDyqsaEJFfjwifKEKohFk//O1X clEJHA6R5CKnXLz9cHTfKzjy4kt47fl9u9NCCtedDVJfTQudZQqblUZPllEF nb9KjBsR0rzQQ+K8UKgyXJwREuYiQ5UO0Tgmuz86egofHjmNj46cwkeUzCeH P8anFMypVz7AHw69i2j3BAaPNIokG0myfKTKSpDjXYEi7ypUyJhPUxh1XvQF 3rVoVtahVWWgW6xHp28DzITFtx5mdZ0TJgt6melPFQi95t08WvmJRdwwMJ5r QrUiCxpZGqqoyyrnWFSejUDpRyGIe8mdGjkqauTQ02844SW++Qu8TLm8RBx6 6iheomQOUS6Hfn2YkklH1/k2bCfGwovex1MRCHe5/x7HtIy0+1pBSFvRpYUd tbSw46KWtqI72tr2OFZzVMJqzj09bdL2c0f36/fEp0rlJGiQm8ikMLEa+Yk1 KBN2TVACtZREY2wzWmJa0R7bBnOsCdb4dvQkdqAvuQP9KR0Mpu0YSDURDLwM uv0pzQzCjUw8DeiLrUFfZBV6g8thURdBfa9sfot05xrkeXWy4O5lsT2CovgJ lKczF8tZgKFoEc3ly+jQrKCrZg39hnUMN25gvJn5U+slzLRvYr5zU5yWXLZu UTpbWOu+jPWey8y5BGzhUt8W8nNvw7ZA6dykdK5TOtNDmKNkhE0TdqHx3jwD W+c4htoHUJGej5LkVGREhEodVa7CbjHHfhbmYH4MMf7MwU78+7vw/+kJpL7s jdJPY6FT5qOG1aQ+swH64kZUVDYinscIn2hE+DI3cxwF6YT7SJW3k6icv6Nu mC/RJwYrHbqRUzf7X8WRfS/j8Av7xJkqQTM7M1U+98xUCSHPOYBjmFnD/LUK 1f5KcWZpZ7aK2Xe4OKsasTu7KijHCZ+8cQaP4GO+fnz0ND6lcv5A5Zx+7ROc oXLeefY1xHskI4mKSZEVIpVqyZIzRZLXoFxeB528HnXyRjQqjGjxaYLJrxmd AS2wBrWgO7gFvSGtRAv6gpvRG2DEbMkQZksFDBD9mCnpxVRxD6vXYtT4FkCr yoVWngmtVwrTuVhozoSh9OMAcY3ypaeP7sHLlMx38QpfX/mdhJepqJefOkIJ vY7//N7PcNTRJxH78F6k/HivY97rO9SJTHxSgQerOg9WXV73PK1ASY+kchHg 6yQ+quA74sMKfHd6AMVmP2FddGchS1hkUAhPKNjj2NCXHVuMPObD+ZSOIJsC 1lylCY3QJDRDH9+Gxrh2tMR2oj3OAkuCFd1JXehL6cZAWg+GMnpgy+zBcGY3 RrIEWAkLf+5k7G3HEHPXoRQjhhJqMRhdhf7QElj98qC6tzf7b5HtbkK+qheF wg7yWEaelGlUZc2itmAextIFmKqWYKleZqa2gsGGVYw0rcHeuo4p0zpmOjYo oQ0sWC5hiZFkufsSVgkn5mOX8H2s9vLnng3kZV/H0NI2bn1GCd2khGaHMCXu W2GGZpnCUOcIBtp7UZqWw2FIlDpKBPm4OORDN//KI+/C69/eQ8wLbsj7IAKV HtnQhGqgTW2ArsCIijIjkkuMlEYMI4sPXyJ8Y4TC3tchId8oOIni+XsKR8rS BOkEUzpBQp+R4h7p7H8Zr4rS+fo82W4pJU7ySpua3ENYEuXUojq7CjX+csdc GVPHx6TZBYooTCUgQpzz/eTNM/j0zbP4w7Gz0vGNszh19CzOvH4G5w6fwvnX PsV7zx/BO88dZqApRJq8EumUTZ7CgFLKRaNoQa2SzFCZ0OrXgY7ATpiDzcwt zOgNN6M/0oyByE4MRnVgiLBFmDBfMY6FyjFiFPOVI/zZhsYQDeqDK1EbWE7V l0DnU0AvlAWdVzJ0LlHQngtC0UfCCpkffF39xBW1l595g0P4Cl+/x1fqR8Tr +NWDj+LXP/hPHHzgVzjy4C9R8vyLqH/lKdQe2vt/tL+JzwH4xgMshAcvqF0c iyqE385RXGARW+P4rb/nZz67Cyg+O8+wOCMTz5EZmYv8uFIUMhAVJtYSDShO bEZlggk18Z1oiLeiJa6bSuqFJakfPSkD6EsbxGDmEGxZQxjJGXLCWN4Q3cR4 /iAxQPRjPK8Xo7ndGM6xUGztLACZ2CbVwRZbicGIgm+KKfVcI3PobuQH2lAY NYqiJMajjClU582gvngWLRXz6NAuoEu/iL76JQw1LmO0maVK6yomTauY7ljD nHkN85Y1LHStYYnYw8JmjWJa6lplyraKBesKBpa3cfPWNr787HN8OWfDqHUW RZH5KA3PYMmVAEtzC1KioiBj5Pa+6I8nf3QcZ37MvP/J80g9RsueT0OZXwWz 2npUZhtRXmxEOsUTIrbtxojtu2E+MZKOwkUdCWoKFyF0cQlq+ja/EilqKVTU UqhDS0Gilpxw9MBr+H9ELe3sSJGm5nY2Cd5bdUWIm8yEOWdZRB2K8+pQk6Nh BikTp+ekyedvSZPPauGckRTPGZw6do6/O3XsPP6VgrqI029exNk3LuDc0fO4 8Po5vP/iMZwg3nv+DaR5U0iKWmQrGlGobEGFqh01KjMa1FY0+5EYQT2whPai O6IXfdF9GIjtwxAxHN+LkfgejMZ3YSzOitFYs7gfZUk7iUXtBIvlWhhZMDeE VcPABF8fzDAaWIpqX0lQ1V6JqHYNZ0bsK/Z4BrDA8N9ZNRSObvc+QkSNXz/8 BJ55+Gm8+sizeOcnz6Lm/Q9gPnUc3Wf3s+QXnuIgNBFSSO7CAzXU4m7nnaeX qCkaH2HxxzVAPFfgfeJzS/5l93kl/o7nleysf4ttQOe9xYdm5McWojC+HEVM 2YW9eEUJbYxFndAmdKGOg2CM74cpbgjmJBu6U0fQJ2zYyR7DcO44RvPHMV4w DnvROCaKxzFZPEaMEiPEMOyFgxgt6MdwHmNWthCfKKPkWtjiyzAQla28d1fg 3yLT2Yxc9SDyw0ZQEGdHSeoEqrInUVs4BWPZDNqqZmGunkN33QL6GxYwZFzE SDPDSdsSJtqXMdWxjOnOZcwyQ5sj5qkYJ74u4wcseJb52RJ/t4gp6wJ6V7Zx 7fY27n72Be5SSRWROdBEMQuPjEVxUBA8z8nx4cNvQv2zjxH7shrZnySyUCtm tlnL62pASX4j0oqM8ExuJP2FHqNocbPE15TkKypJlE2MFJG+R+1EifoRtCN0 xoeoQxGkcuhHGUD1HMaRA6/idVE/jgpMnNLb2agZBn+ZtMF2Z5OmUIXtfzwH ymgDygoMqM3ToM7PQzixOpo1w45+BAjaOfXWeZx+i7p5yxmnj7ng7JsuOPeG Cy4cdcbFIxedcGLf23iYMnqLMUiPTMafXMaeEpUFGnU3an360Ojfj7bgQZjD h9AdZUNfzDAG40cwlDiMkaRhjCYPYyzFBjv9rT2lH/akHoyRUSv6OZhijGgj hFq6Maoe9ZF1qA3Xo4axqTqwjBLKR7UyA9WyOFSTx7mfeEFsjuXwSY+CkR4H s9MkLaxjPvnD5/DcI/vx+s8P4P3HD+DjJ/fBqjqLft/3pLZLxwNQhGfRSNKR ZifF59BweH3dghxrT8HSbL1HsPgcmmC6GGENSngMTeDXHkOz01EiPPREjhMv vEkcYyWi3VVRUYIFFXQhNfEDqI+3oYXj05E0hq40O/oyJzGYM0VlTGO0cIYK msFkyQymSmcwLTwltHyamCImMVVmx0TZGMZKRjBSPIhhVpK2HEFNTbClVjMw FUB57252SsmzFzkBI8iLGmdyaUdZhh3avAnUFU/CWDGFNs00zDUz6KqbRV/D HAaN87A1z2O0dQHjpgVMdCxispNSIabNhGUBwi7kBRYek+Z5TFjmYGfwGe2a gZVBaYtBqbt9FOVxBaiKz0RlXAJajv4G+pf3Iv29COS65CA3QIu8eAPysxqQ lt8AdXoj/LwjxC0mgQpmT0FKYUuqqCSHiljKUz8s5X1jRTWFOQJRmIBdIUXy +xEEkzqVJCZhD4HQKnzk4GG8TjEd3vfSPWIK/kpMXmG7O2ODxCmNKFFMwhbY gy9UwCeuHhVFLFryq2Dwddsj6uknOMUYdJoaOnPcGWfecuV7d5w95o5zxIU3 3XDxDVe8v+84Tu5/Fx8ceI9yehcZciOyFCbkKa0oVfdB6zsIg78NzSGj6IgY hzXajt64CQwkTNJFTmIkZRJjaRMYT5+AndabyKBrzRjBVNoQJlP70RHXhnaW Cqb4ViY4LTCy2m6gqAwUVC3jUk2oxhGPchnvUlAjZ+7sKuxoFuj8PaG3WHzC UqCjKUAQ04WfvIyifW/i8K8O472nX8XHz72MU8/vhznqFLYzK5Dw1EHIxCeR +Tim95kjuzqeICRMy4jicXTsEDvT/HvEJwh9WzxzoJf0PCd/T4rIw1d6+gmv ywm/P3CcjrooTnribFG8BSXxfeK+Dn38KIwJ4zAlTcKSNo0e1in9OXOw5S9g lOX+eAnZWraEqfIlzFTSyQtPoBWxgFnNPGYYOCYrpzFeMYlRCmmYdaWtkCLK ZWaXXU8hVWAwKRWKe0X0P5D4iRGZyiFkh4whN9aOghQKKYtCyrfDUGKHsXIS bUwJOmumYK3jZTXMYMA4gyHh4W6tsxhpm8WYiWif4xCMd8zifox1zmDMPMPy Zxo26xQGrJNIiyqDptGO/IRylCYXozQpG3nRMQz9r8Ny+llsz3+JXEbN1CwD /NLroWAlryR7hb5qX2FmgaYNIGspIlFDVJC0y+KHoogECQkQBeQjiSdUPJLo PgIE8Qhts2EUD62221ftj9cPvkYBvYJXXzwIb2d/h4CCxP2DkoAcW8t39xVH OfaTRotz6Adf1cOfKbmmpAGG/EoYfFwcUeklquYc1UMFHXcl3Pnekyryooq8 qCJPXHzTAyeooJMHTuCDgx/w/fvIULRSRRYUqPpQ4WtDtd8oyxk7WsNphuhp dMfRnyXNsgCew3D6HMYy5jGeNYeJbCJnFlM505jOmcRM9jhmsoYxRJZ1JJnR ntSJxk/kaGLZ0Ej2GWKbUEslVUfUoDq0EjVBRagJyESNL0OS3Hd3ETdYfJ5P iOMoPR/Ld+9r0L5xEo1qBRozY/A2s9CT+w/jk4OHUB59CpkBRciVpSH3Iy8k PvXqbqUpLtrtPvnJoSBG+0Cx6gyT1gPERwvxxP/geJSQ45Fc4lOfpK6eAIrz o0Pv4sND74nrYsKTjYtY/ZTG2eiax1BLB9OUOIP21DlYM5kJ5S5hsGAFI0Wr GCtdw0Q5i/xKFvlV6zTVnHYdf4nBD1NxJ7IS87oVzOgoNN0i7Jo5jFIBw+Wj sJUOUFBW2ApaYMtjRMrM3RGT9FCcvUg8Y0G6egRZ4XZkOzZHl2VTTIV21Jba 0VhhR4vWjvaaCZjrJtBVP4mexkn0NVEkzVMYaiGEvpY2wkS0C/MHDKLmCfQT vRY7uoj4iEqkxGqRlVRF0ZQgIy4NHbJz6Fd/hF7lUYwyUol9mSyPvF2EhyUE O8QUJorJj0z2ZygQBaUUent3BRXNUkTctuQjCSjUISQnUUYv83MpEgU7xBSo DkGA0AasCoCfyg+HGYleE9K6i19Ncyh4ehX17END+35TTIp7xSRFxJeO1SMo pRG6skYYCspRr77AcHSa4jkvCektD5w+7sWjDGff8sZ54uIxGZzf8mIoeh8n D54kfo/3D3yATLmZYupFkc8QKv3GoQ+cZDkzi7aoeZjjFtCTuISB1GXY0lcw mslqNWcF9twVTOYtYzKfLMhfxEz+HGaZw4ylDqLzfDZmZYW4GteAu8XdWI4L gzGxA/UJraiLNaImmuVdpA41YWXM9fJQE5iEGh9h1SoM0gOzHhA7IYSOiNf2 HkH0Y6+j7uQZNIYGwpiXguefehOvvfi/6Xrv+CjPK3v8fAZ37E2y323ZjZPs OrvZbLIbxyV2cMGNKtF7NcV0EKhrZjRNbdQLaqj33jUqM+pCBQkQQkigAkL0 Xo1L4t2Y333KOzPY/v1xNbLASHrnnFue595zV2Ot63Ksc3HBO2+uxm59KcJD y4hUFSjQZqNouwHpHy530uiK5BpdZq4kxLS5ZI8evfJGUv8o+b1/zZWewhSB LsmobQs2YMfCzdi+cCt9vgXF8cfITqE0fgw1iZOwJl9Ae+pl9GRexdHcGxgs uInh4ts4U3YH4xV3ca76HiZr7+GC5R7StuZgdG8O/nzIhr+2DOJS421MNdzE ZP11jNddwZlaihs1FP4rR4hRA2Q9GC6h8FRQprBJKIL9D5IOHEVa4CgyiU1Z iWKcvCyXSQ2Mo55CUxOxqbWG/GIdMaphnBg1jv6mcRyjMHO8laxtAic6KeM4 TJ93k/UQe3rp75D1HhnHYXqNiq5FXEItkpOrkJiQj2qdEZ2h/lQpe6Ivcgv8 9uig3kdMYr2mbGyDfBgLTUbyWybW4kVQZm1NwXqFTXEqTqdn+HRGuGIBymss I1kM/Y5iAozeKE4i8oREJEcvfSCWuizC4vkL7eeF/orSAX13k51IbHD5O0Qy OojECrSFm5oRkUHArGhFU1E5mg1uIiJRPrePSLSXyLNvrQ771+qJSDq4ky16 YxU2frwGm2dRbrdgGz512UpEOoYc4xCK6R2pDjmLhogptMZcRlf8VfQlX8dA 2k2czLyFkezbGM0lYOTfwUThbZwrIismAJDrbdxbhDOepbgT2Ya/5J3Et41T eNx3C49H7uFiWR5aU/vQfKgbViaVQwSrj6Mcj1xyfXQR5XoZRKZoDmbRfBrF r4rX/WEVMt5fjeb9vmiJj0FLcZZdDiuEy2GZsPKTBVj+8Tw+qjFjWQURqgqR oeQ7zTUo0eWjbGcAsj9ZJfoEpRwX7xPkxs9u+K0b/ot/W66+5S9E74T6luDS 9kWbsGPRNrId9Pk2FB88QXaaotJZ1CZdgO3QFbSnX0dv9i0co8dzsvge4f8+ RisfYqL6Ic7Vfo7zdZ8jZ2shznqV4KvsLnzTNYbbJy7isu0BLljvYtJ6GxMN 13Gm/hJGLOeJS2MYrh7CcBVFpgqqlUqrcTQtTuesTfkqUuhNSyMapbOhewpK xZThVVCGV1tCgamCqFRNVKLA1EFUOkxU6raNo6eZaEI06m0nIxrlZFqRnW1F FllGjhUp9MoG74Opog2Oq0FgVD5iCJyF5nA0xAVRmqFBQ+wOOZhignq/bNem ZNqfIoLej9EokncKBvo70Yj3Y4tJAD54Yop9io85/QvnTCgLPmxqkvMmUvKG MgqT2T4cYNQbxLCePCLkMZCpxfhKlRCNogghuWNwKIQ4yjLGHlcs2t6K6OxW NFS1ormoDM3+u0UAIt7sJa7sI97sX2vAgXUGuK83YN2HamyZTwHIZRs2z92C 9R+vR7ZuEHmUF5QETaA6dAqNUZfRevAaupJuoi/1NgYy7mEo+z5O5z3AWMFD jBc9xNniB8jdUYa+XWWYCmzHg7RT+EvVJfz18H08PvkVvp34Al9MPcLY2EN0 ZAygLe0YmlOPwHqoCw1JbVRPUCA6WEtvRQkaYrKJr/Eo1XlLSbloHHhtDYoo 42zWGNCSloSKwhwpJ+doQWKKZKuoPlr5iSuWfjjbLmX37rJquBksiA23oCi8 DhWmIlTtDULe3LUqfmDze4U23JSuRLuCnZ1D4Xb+7Fy8hWwHdizZhe2Ld2Ir uZ1iKhfLEs7DknQZttQb6Mi6jd68ezhW+BBDpZ9TVvYFxqq/xETtV5is+xpl W0sxpbPgUfEAvqIC/krzV7ja/AUuNz3CxaYHON90FxO2mxhtvIqRBiqt6igO WSgOWahMqjlMMakOQwWpkOTZLy+yEgPO4BCRJ4UyuswUikNZ4yjJH6eimQhE WV09xSErkaepnjK8Rvp7SVakpliRlmZDWjpZpg2pZIfIEsliM2yISmtA2KEa zJjtj/XbwuCviUZ8eBRy40NRkKiMOb8Ev32BUB8QLeNaqkl0vmy6JgJGyuQC GHF0jDjRnDisT5wRR8WoM41z56dyoDSaz9OYKWcL4ZQRo1uBFG7YdINJTDdA 56+Dhmij3U+0cQ+SM65MQ02EnABei0WL1JGHnDhOHTYFf1BIHywW6hhUiS3e 14a43DZYa9qIN6WEsx2cM3uIL/uIL27rjMQZIzw2GLFsnpFiDPHFdQc2u+xA lncPst27kLGnG6XB51ETfgmNMdfQlnCL6uO76E+/j4HsBziV+zlOFzxC5KZK NGytxEnfNlyOO4X7RZfxRdNDfN3/v/jm9P/iq3Pf4OL4XzCSM4Ieqoi6sk6h M/Mk2og3zen9sKb2oDGFybNRzEmso9hTjob4XDREJ6I8QMNbCU2vrUXVmr1o DgxFc24GB3KEbEsKUyQYtaJVcNXsxWQLsfyTeXYRQXbXx4ToPlxhgUdgPRKi G1Aa3YiaoBLUHjCj0GU9/Vv0voWzYyLWmf4bJ8JI0Rl/oUq2c8lnZLvJ9mDH 4j34bOFOLs5ckXABluSrsKXfQkf2PfQWPMCx4kcYKv8Kp6u+xljtX3C27hvU 0rO6ENyC+5Wn8ejYDVxp+Quutv4Z11rYzogvcbHlEc633MdE8x2M2m7gtPUy RhqpmG8cxXDDCQzXd2O4thEnSzIVsrhLiZf4yDFKpMaRnEpkIaLkEVGKiShl 5USYKkq4YqyIOWilpMuGg0k2xFOeGJ9Cn6cSMdIYMWwIo/8OTmqAJqqYKzPs dZ2isK3FKncz9pOb9wn2f0oON/juMsHPLRhq+iMNnwMKg44Ci0Ht4EiATvAk WK/wRAQZFUKIHD/lU40hctwsRA4ABfMBoO/NVLB2dP6d1W7+fIuFMs7LpWWe OLKIdsjKcE7Kgz97UngQCmNYebXUvR3x+e2w1TK2FKPZ9zNiioHKHCMxxYQD G0xw/9QEz00GbCbXuG7+DqwnpmT4DSBHO4IC3QjKtJSd+Q6hMe4mWpPuoCv1 PvozH+JEziPkratEx+4mjAQP4nLGRdyseYi7nf+HB4Pf4v7ot7g49i1GC69g rOgixgoncTr/DHpyzqCL2NKZfQptWSfQnHGMkHUEjWmHUZ9CGWVKPRoOEfMS 8ynKJCHtwF5E/3E96rd5oykqhn6PXK6rFyE7KxQJxTCdiDChFGFWz1mKVXMW Y8UsF9nY+31Zv09W18HbbEUywaYizgYLlUL19F6XLNzAykYu2UhkUWQ27TJ+ TLaLiLlz8XbsXLqHyLKPostebFu8CyVxkyhPvITalOuwZd5BR+4D9BY+wvHS LzFU8WeMVP8ZY5Zv0LilChejunCrbhL3TtzDpZb/xZXWb8iIMGxCte0rXGz7 AudbKYNruYvR5ps43UTVZBNVOU2UmdlOYth6hAhjw8nybIUsnvzlx0SEccRR REnIHEeqk2hFYKQVQdE2mOm3NceTEVlCEm0IIjPS57qDjayJSUykP4v5ryyH 55IC5IQUwZJR6JBt261oc70Inz2B8NsfLDvaw/jAnL+jm50XMwH+jCicLGz2 KJotrzRI3tBD5cbmjbgpM0dhnB/2cQ19AJR2LI2cROaiKkyyUeGHrF6cTyFU fCDUJHQzTCILUzIx/jlxZIV3OxIL29FkIY4UF8LmtRl7iB/71puwfyNxZBNF k81GbHKlSLJgBzYQP2I8B5HiP4rcgEmUhVxEbRil4aETVLLfQ+SSSlRsaECX 31EMx57HuUIqYRvpze35FtdPPsa5YbJq8oTElakaStOLr2KshJ3GnsdI4Rh6 csfQRRzpzBlGW/ZJNGcNwJbRh8aMbtSnt6E+rRENqVXEkQKUGMORMnMjGg/o YUtMgq2kiDdSRErtyQiDkBkNY02CXBfWjFVzl2H13OXEjyVYMXuB1LoLtWse Bvg5aR5qYzF3bQP8wpuQmtiEarKGiHI00jMvX/qp1LmMlSSRROHfT3By5xJG kr1kbthBto2iSknceZQlXkFt6k3Ysu6hPf8heouIJGVf4WTl1zBsqEbzDgum 4o/iqu0Cbgw+oMjxDS4RQS63MYEAIgkbW2z/Ghfbv8T59s8x0UrPsfU2Rlqu Ybj1gmM/SDORxNqEExV2kvhIBart3lbs9Ldin8kK9yAbvMw2eIeRRdjgGUFf I2MtSiZCuaJDxmfu6dX114EI212EysQi1ByK5Z1+inKddrfOmRy+B0KIHHLU w+eJUQ8YiRwmIgcjSADrVGYsmY5AeoCBhkhpEWKGid5ok5FKDSMFBNnk7q8P lDx86YmRaUVDhIvKOOVXnBiOAwWIE4W37ZoP9lMFKop2r/LCKk07koslMYry UL9/M/ZSwNhHAePAZgocWyi9ct1Kth2Z3keQ5XcS2fpRJBimkBd2BR6zSpG8 oApVO7vRGTCB4ym3carsz+TNvsXZI48xfPwx6g/T59VfkD3COSLE+VrKp2vv 4UzpZYyWXsSZkkmMFEtS5BIpckfQljOE5uwTsGb1oz6TSJHZTmZFQ3o1Ks0p aA6NRKM6GNb0DJQVF4tOiE8kJxyarEKQM4wLcq6aR5yYR5yYtxQr5hAnPBUd UFHZBdh1QJ21/uIwf0MjpRPNyDjUjFoyW3QlbJpwVK7YxLmhcCJM+X7EQxE4 iBPL9gtOUPAojpvinKhJuwlrNuPEA/SUPMKx8q9hXF+Ltr21OJs6iAut5CuO 0yNi8+WUWV0kHlwiHlzu+ApX2DRkx5e40PGF4EQ7caL9Nobbr/P7yeGOCXol TrSxlSNN8lTMW4rQ+HhpuRgba9xz6G0Z6Qk4BNkCWDORN7u4DeDtRcFMQYDd 5BKbPkpDmqEIjVlFQrmP67BJxT43odj3lKL9RrTw2W+GL9HCj2KG2jsCWsKq jh60mPNjZ5ps5OMpTg829GGiVNWkjyRCEiGeoZyJfL6BIE6mM1Dhz2c+Ap+W AdB393eO12SJY7CXONFOZwPs9sehHBDKDqzZRerrdiGUXSu8sWuVBmsM7Ugp JULUESEKs1GzexNmvfo+Fr76Dhb8/k8UGbaSbUOmF5HB9yTWvJULw7uFOLSy BeUew2gKu4rOjEforWJato/R1/0YdZ2PMVL2CGcqqOaueoTxanrniAhniQjn LPeoAL2DM2VEhLIpsrMYKaEMKu80usg6FDLkEBlyjqIhuwf1OUSGbCtqI/LQ djADHYcS0ZiTJxWK/5HpT/LpDMYJZ4Vi7rH1Qp7WrAvB6vkrBBvmLnqSDSxC MDVUJl1mV0MVbFBxAbv/xoJPG6GLbUFmWgvqUlvQFFuJZv8IVK/aZGdDKJOt o+9p1ofKCEFsWLKf2LCHs6E06Sqq027Rz34fbVRvdJd8jtC1xAQPpgM/gomO GxizfYWzVIxPtn6FKUqZLlA0uEgMuEQMuNz5CJc6P8eFzoeY7GArMMipdFKE 6LzOdYOHD0/YF78MN9uUQ2JlqxOjA++/4wpDeqKDwU4HE287CuR7orgeoQ+7 OWI9d6yj4kWY6eOC/9wD/cZilMYWwZpXIJa88Flxh4IG0yjU7/V/Wl6Zeu8P gY97KHw8w+BHkUJDlNASYP2JEjoCrZ6ihd4/kg93GJjR09MzIy7oiAfKgIda H4znJKv99rADskA+Hq71EgdknAhyNDzgiUOyWB4aQlg3JpX6Kl7q/4GX+juX e2LnCj/sXOmPdQHtSCtrQ1N9K5oKMrDs1few/vV3sfmtt7Hpj3/Eklfj4Pdq CqI/rEDGp70o8j2Lyqi7qMv+XzRV/hVN1m9R0UToL3iIwaIHOF10C2fyLmKk 4iFGqx5irOYBxmupSrQwybk7OFd/i/5sCqfLqX6gcu9UKVXbecM4TNaRewqt uUNoyiUG5BIDcntQwK5JYsrRnlJC1Wo+WnNSpSbvP4rTa6O4XxU6m0yX16HJ KxApOltXz6d4MH8ZVrAGCCWk+jCdNskATcwT8UDFRD4FBX7B+5kWbW6E/mAr sjNb0ZDBmvqr0ErfoGbNJgF/g+i2YFUECwTbybYy+MdOoSTpCqqp3G7IuYfW gnuIXkXQV7djMG8MI4cJxlxo5BGV0hQ3WymZbHuEqfZH5Pw/Z31bBPrp9PEB wf8+JjvvYvwwuZHD9CC7KEHqJvh3U4LURfDv7MFQc4MCf097NNDY11AJ+FM0 8GXqiwEEfwb9IK7lwRrkFA0Ps18IPQJ1CFPgo+i76rVYxPuUoj6jBKUJRvpj 2bDA1TrF3i+Tp5T02Ku1D616uAXBk8puL6KBj3c4/AiuaqKBhpImjSZCBa02 gooTLfkTrY4ZMYWiuJr8lp+OinhtEMTw3qfw2xtI6Kcq3kMRRhDHwwz9XFhN Gy2VPMQAuUiORBXPanghGBODHcs8sIPQv2OFFttX+2NjcBvSy1thrWvB6rdm Y/P7s7D9ww/RseoDNC55FQXbjqJYPYXiqAcoyfgaJaXfIIt8fm0SZbypt9BO pWFL3n30lT7AqYoHGK28h4mKGzhLFcCZmnsYrb2LsbrbGCfkTzTQ1xvoTasg 318+iqHSIXTnDRH6h9CeexKteYNoyiP059P3jLXBmmBBe5YFHYXV6CguRkXi k811EYoqtUS/syJ1qMHRS7fKhaF/KZbPXUCVFqHfS6Cf6z1RNhRI6A/SCq0n LmGqf1LkVsW/63/xe6MlWxphSGhFbnYrJQgtaE0gIlBSW7P2U04Adji7g2LA diqli0PP0O9xHqWUDVWm3aB4dgexy2vRou/GkaJzGOi6h8E6em4N5Dls5C2a WYn8EOfaHmCynTIjNhFJoL/QSVUXAX+qkzwIAX+86ybOdF/HSA+V0b0X+PjJ cPcJigNdONFUJ/HvoWTunn6Efw3vHHXgnykOBiJAYj9I0bDxM6t4K9BPuEpI mEaa1gz3xYXICy+HraBM6g4Gie0ObCUHl5UzEBcc6iH6vRonkXUzPAm0XuSy vQm4Pupw+KrD4Kth3XW+2jC2YEFLf64NkT+0OLry3sEUJ4O4ioLGM5SrKHBF EFZ0qGXRwY6vmCKIPOYN0otyXMUL81d5Sf7ZUndsX+aDbcvV+GyVFu++OgsL toRh4dsLsXbmQmyZ5Yrtc+bg2IHV6HebjcfXH6Mo6T5Ssr7EvpjPURB+AaUx V1GTeA2NqTfQmnmTMnjyaBl30FNGbyIDuuU+d/GTNVcxScnNaN1NjNZfx1jD VYw3XMZQxRiGykcI8IOU8JxAJ1l73gBa8o/Dln8MVQcpuUhponS5GR1lNrSW 18KSmT2NY+8pgXeHZK6Ki6X+vUjGjYr/ZeKYIVhJzn7F/CVYOseVHyzovBQN RgF3oekca1ftDVE09CTcn+Ip46+5Zt7SrQ0wJrUiL5dcRHYzWhMrCO5hqF67 gSC+hxfBTF1yC5kf2XKXGsQRxBsD+tFRcgG9hx+gv+YuBuru4mTDPQzbKHVp uoexlnsYb7uLs+13ca6Dnlons9tkt/huWdYNP9ZzDad7r2D4CNv9NEk2iuGe 4xjqPKz0OXrINNxPdkZr+LouI9/paCB8m3wVRc0Q2To6jXe7sWaZMA6+MALf jxBOHxf9zgDznkpUpVQQyHPpa0KXLEwTTH9fgD3Ez+SQF/EU8iJC+vID+Mhz Vj93cXwkBBEihOYSz1EUsCrnrcrdRBQvk4PIa21Z4kZg9cLWZX7YslKLGa+6 YuabS7DwfarpZi3Dp/MX47DGAwMBuzBgWoO6G4+ReaAPWeohZJvGkBt6DkUx F1GZcBn1KVfQnHEVHTnX0FNwHf3F19FSeAdHa+5QyL2LCX5VehNT9RcxWTGK MwTS0cYLGKwYwWAZeeXc45STMDuGVvLIzWR1lAK0ZrShvbgT7VUdqC+woDaX PHN6Br/hwD9LB+1UgTsJ+zLZTtFaxmQ7Q+0yrsvp1xLHYMFCW1hqTAvVxxgn GVmpGMpkqhhcfyuEH7mabJww1qtjEBc6yz6rg+lQC4G3mXLvJrQklqHZGIJ3 fvcaNr/8JoJfmYGsN95GxXt/wLdJGWgsu4LG9ofoLL+J3upbOGq5hYGG2zhp pcqTTd223MZo6y2MtZEPbr9JefhNnrtPUB4+0cUmzq9g9MhlDPdRUtI3RUZ5 +ZERnOo9joGODgW04h7gX+Hr6etYA8j09biYndBwClBkYP1CZbtkGO/yYn0p 4Voh+BnhH8Envzd/kIFUYxV5kSouqhfhH0p/bpYAfhK8zEsH0fcL9NDCuF8j wfsCvHaa4EPg9SXw+noy8IYTkSLk+Scl6gRegzZKxRCs4lXsawjQU/JIoDWR bV7igc1LfbFphQZv/X4h3vnTCsz/aBWWzV2BUm0gWkMN6IvxwZHoz5Cyoxnp e3uQ6XsCWYYRZJsnUBB1HuXxU6g9dBHW9Etozb6Mw/mX0Vt0Bf2lV3G8nIBc wd4OSrCbbuFcM/kJ2xVMNZzF2YpT9OdDOFY6gBo+hsF2edaiLK4VtoRmtGd3 oL20B+01vagrsqKuoAbVOUXISuDQEcB9WjYcx0mpUCEXquKQ/TsCbATXmQ1m /ZDGIOKqCUvnLeJypc7KflxFUi1VJDVC1S9Y0T8WwJX9L1Sh/6eo0SVgzQYn ZVJTOIG3FsbkJuTmWlGf1YDZL8+Bx2+WIuGDlahaugKdGxei+9N3kVx7D7ai q2gru4auyms4UnsdRynuDDRex0nbDZxqpkShhQ3uXeezRqNsa3cHWdcVSiIu kYeVYO2fxKl+Amz/OIaOnMJAd7/RGa/T5U5Ef7Fkz1uOnUisBnKsSq0mrjTK uhOf531cXFmUirxIskX/sxmaDdUoPliDppIqROrDuQJpGFc1ELjlmGXXhOoA yi6E2miQlz8C3DUQiuTPwJuwygpMhlU/L8qqfXiBqaLUIJJ8vF7WmAbe1uXq sgG/xwKXjXB13YAP31mGD95ZjpnvLsf6VRq8QVDduiEEwZ4RyAqKRE2sGU1J OlRGb0PC5nqk7uxChucxZPoP0Z+fQU7EBFX151CVNIm6tPNoyppCW+4FHC64 iJ7ii+gvu4ijFRdxvPoiDtObMWi7jtGWazjbchXnbOdxzjKMyohaWMk6YmrR nVCN7uRKSgjIp1b0oq32CCzFragtakBVfiVKsvLF2b844/wZB2qoE0hDn0CO IjnKeg2Zpq0YmdbsMwnJU0p/mRigXYJS/T0JSq5AqUieigKaIPprIQBoUO4B lfu/MCk7GUyZcQU27DZi4a+oWvlgF1JX7UP9rr3o89mGQfVKVGdfoHhxEc0l l+j3JHpXX0FvLdG7/gqON17BCaLzyWY2FHeZj/QMt1PY72Tl3QWc6pkiUE7i ZN9ZDBJIBwmkg/1jOH5kCD0d3coc3gFZ8vl6eBNaNWJ7J5/WDZRykiH2CQ8F qWbWviu0ZxgQybsxkYCfYMlrMYj2tlCpX4v6vFREUbUbyU1ISTrQyrSggjha g+VewUBPDYzufhKtL8KTclhv8qzeSh1IaFX7ijpw3pwNmDdvI1zmEzznb2Bg VcHFZT3m4f0/LcXMGcvwHiH23RlLMONNd7gQUvd7U9JnjkZKXChSD/pRnCK6 U22VtLUNqW59SFefQIbpFLLDziA/ekyofB6aoPL1LJqyz6EtbxKdhZPoLpnE kfLz6K+cxNHqSRyrOYeuOjaaeAkjzVM4VnUKVRH1sMY2oCO5Ad3pdejNrkFX dilstb2oIpRWFTWhoqAOxbll8tTF7uW4a3O0KSkSklEcrEIbN1z0JJlEP5/J IN5Hvz0GqN3kSQ/v6mBpf4RDCFqrAJZ5aKmaGkv+lB/58KI3WlzL0TdSpP8C OUyFVqXJEEhZ6zq4vnkAvks1SNmlR51WhyNmHwxE7EBZ5jlU555HQ9EUmsqm CK5E75oL6Km7gD5Kl45aL+C47QIfmTnROsW3NQ0ensSJbirqes/iOAX+owTR Y2Tstf/IaXR3HTc5o/THVMqLXYqKP+Wip07aukxXN0QTLtf7in46RfmFMKri s/k/wZ4FJcgKqyN3WsflJKOIm1EGZgKskXawhsh0gAk1USrgy1IBLRVsfviV zKM9yEV40hP3oif+0SfrMGv2esyesx5z5q7HXLJ58zbQE583fz097Lnz12HO /LWY8dYibPjIDRtmuWPVawdxtPEx3tmkxgr61VqI653E9d6aKxSUruKE9RqS dnQjxfM40sifpgcNIytiBAVxp1GWdAbVqaOozxyDLWccLQXjlGeO43DpOLrL x9FTNY4j1WPoqxklO40Oyznkh9WjIsaKhmQqmDKtOJzXgK5CCzqLKlUoK2qh zKa00IqivBpkpOWJwxHu4ezHg4q2qYqD5ll+e6t0NtghY2SQCXB0HO0JEGcx SkeFt9CPVoT9jFKkUpSlMbwsncYKUxXX8vs5V/NzXA2HyuvhIPj7GzDj55vx 4Yca7Ps0GLFUL5eFhqIl3oTW+H0oSJtAWTZbLEdkLj4LW9k5PsbVUTOJLssk euuJ0NZz6G8maz2Lox1kXRPo7+ZboqbxtWHT0NM3hs7uU/y3eQKTrxAm1YRJ nZDN4coRQrmLy0Sy+K4o19kFeIW+aaReSESwGfdFf1DDtJPemNR6NJfV8K9F EzCjGTCN3wfmE2p6PN6zXZFq/Dv/md6BNwHJW2qWfPDxanw4aw0+mr0WH89Z i0+4reFSD0y3xOAh1nFt/NAN83+1Fl5LCpBvLkJdRj42u3pii6sHtrq443DV RfRaiMkNlxC9rgkJe/uR7DuIQ8ZTSDWfQmbUKeQfHEZp8giq0kaoEh9BY+5p NBWcRkvxaconCYDlp9FZOYLDlcP07w2hs2oAWeH1KI63oia9CdZcG1oo32wt bUALPYfCwmayJuTl1yMjs4wf2TlOLsSxnYqfXbwgvBdvJojizQTCgyloCeFo 0ekMT8n0nZ0O+h0IEaeDXk63s0rtqY0SmTv7ftO5CB8rPwPk7WyAvJk10Xcx cnVJMwwEetaqoJJdSzM+0mDNVkpx6V/YNHM7PBaswJL5Hli2wAPLF3pg1SIP rFnsgXVk6xe7k+1Ha7Xol+1sdFpQ1SGWUx3uZtvriOJH6O/IzWUtXSOBznj8 ETRUp2j5UkPyj17flS11CEKHSjFooV4isCi0dp/CmncykGBoRENhI0pTw1SI NkVTUI5WfCU3JbCTn1QE7bTST/ox2VLNr2TmyTY9+Si74XzEWgSdt1HFl8M9 JeTtCYwmrgJiUvG79v/GpzP3YOF/BiFyTxFqkouwiZ7aZnpqW+mpbVvojm0L DqCz+jx6LFPob5hC1MZ2HNx/DAlU2CeahpAcOoSMqCHkxg+hOHkI5WlDqM4a giVvCA0FQ7AWDcFWMkR8O4mW8kE0Vx7H8fYJpFI9lJNkRWlmE6oLmlFX2oT6 Citqyy3Izm9GZl4jUjIrnXpcovg9JbtIUXFkTnviDl/FcfL0DyLlGTl06kvZ jt8BM/w8RauAhtWRT9yJRtlF8Iw6eSdKtaSR/n0hgBfBBfD0xlDoDCHQ6gLk fes/cfW7d17RwfeDQBSud8OKuZ5Y6eKJVQs8sWahJ9Yt8sSGxZ7YSCj8lGrS TUvc8SkhsZkQ2NI0jlZCYCshsKVzHM1d47ARCm0947B289VoQc7o+0eBPr5K MUCoPfMB7FApBBJhF8zlq8P1Qls0Uip+MOECNnDtsaYW+XFWNNFTjwmgnNIU Q6/s6UabWIeECNkEP4OUKCcIhulkTkkeMVhNYdqXqnUvb5lPPs8x6KyoIY68 jFIK32njmIpf7v2K33AHydvuXbMykBlQhEYqgTfTY9u8SMKQSLt98QFsX7if AspZdFN8PdJwDuEb2hFz4DjiNCdxMOAkEkNPIjX6JLLjTyI/eRAl6YMozxpE Zc4gavIHqW4ZRF3JCVjKjqNHNscnhNUikWJ0VnYLCgpbVIhPqaCyOiqxEuHx lDhG5+GTmSswa+ZyfPL+ctFQIlFivzUnFCqnDUwq0WgMJ6Q4oUQfKG4K/xY+ BECfA+xSPgy+SnHIbyAjeX0obiCjoNdF8RtIPYFPT/+kjolwc3k5iumGkKck npXYw6Tl3n3FDdveDEbWSl+sYAnPXC+sdiFb4IV1C72wYRHDnqfA3lLiOOFv 85ID2LTYDXUt46hrG4eF8Kfi69amoYo+L20WoTjIuaf634lCPlSu+QsAen5X szBcqmc4A1D0hEQqwrYEvoWvU6j2sFHtZYO1rIyAx7XXBBA5GKM5DJkPjDQq op6hDlFPLYVkDQFQ7U/A98G/SpVrRdKFK1H4KGeuJtFhwe7VCG8B3kI6Rixh CLarXoTwK2UvBGwpQWVCCeV7SdhCj28LPbotRNut9Mi2kW1fsp+w6MaDSGct BY16whLROOLAAKI0g/T7DSI2dBBJ0YNIix9E1qFB5KYNooCwWJxLuCwYpBRw AK22cbTRo2+jR99GjzuF8kTzwQpERTch/ZAV2enVCI4rgy48l1LbmStVmD9z JTmc+e+vJFuBue8uZ+cIKn5R/SwMEix6DpYwCRbydv4BmK50hVAo9vYIpcyF AEihWKn1NBSttPSWsQs/Fb/ye4pwGy6F2kKZUJvi6JQQ4ytF2jRE68UUQOIX 6FG+ZS1PeFaT81tD4FvDwLfISzi+pQS+ZeT8ljNzx6ZlB/DpUjcUU/gtYkZP It82ZnbG2t/Dbz/DGqV9Hiau96f3Cubzvd/Vx1SUwcMNUkCZGVeViMOm2cWU OlHaUyY0/qZxtL0kcBYgcWaKlGJ/hDODM84o1mqNAme+PvZjSV8vjVQ8EVjT UoGt82U4C+R3twJjwUJYZZq8whKrGFTsEhe/xvq3E5GsLYM1pwybZxMjXbwp 8noRIwluxNCtSwluSwlqS4jZC/eiqUrM+bQT3DoJOkEHjpIfHkRowCDCwwhy MYNIILgdIrilkevLyCbo5Q6gjv5+PcGznqJMPT3kg2lWxGXYEENmDKPXOBsS E6t5Zj2ffJ0LB5nrzFUqLnf5HFzfZYKXy+BPsGDGgKGVwPDTBf9InsJ5UIrn 6aXcpYWLuzTKyn214fwmzcefvu7P7tKC5T30C/ZYwRTM1FzFTCj+ffiKCUGf BKJi4x4mYKaCifzM01hFad0aekRrFnthLeFp3TJPepzrCVHT6KM71i3fj7X0 uMKdQfR3BCKqZ90dIPquaCSXK1Hk5fVy5kVRICYALXhjHzRbm1DEms+qmlSE H9YPzrCk+C0VR9ILhCMqgU2Rwl8ZmMYq4YitmfWXONLoGI5+IX9/bw9fqf4h rkC5u/JVTjCDECC2JqiU9Xuh7GyWPobKq6KFv90A31VlKIqugK2wlHcGsL6A za4+hCVvwhK5ryXMdR3AZ4SlbYv3obaCvH3NOBop/7URLmyEiyYKhwbNAEyB gwgIH0QwYSk8YRDRhKXYtAEUEfZKCHulhKXQBHJTlLmZD9kQRBaYYoNnQCPU 7wehdL2H2MD1Ei96FhB+FhCc7HqQH4j/XkAwYzKqLjOWwdefQYNckjZEsuuf nDy4TGV9pJ4Qee+PXvGDx5/MKF7jK0TAvL4jzsU9eyDvoQvwUoS59EKYaz8X 5gp7Eh6+bgIeXJTKDg+h7mb3MQweFMuYpqiz/i6Dx+K3UhGlbUFtIVlxroqr I/4I0YEOeDCLIoBEOWuKEjxCOTzIL+gCEexPmNfSD0hu5hdKx6mXmhws5XoS G3ZRJeV029vsuI3xE9sI2EY+toeNqPdbLP6fCER7VKGOUmmHaLuYsPzU1Quf LvKmlMBLpATL9pPjcSPA7EVp5Tgq6A2vpDe8ykpGIKki51FBQCkl8w4ehE/E CcTljiOxkGJX6ThSCVjqKCv8YshibfAh86A0XxB6O3a9EYy8lWpUbVkgqhCm Segpm349eWLoydZUL/hwOVw/IHTMXMbbGvV7dTK+v2iXyhEqU4qQN0NGkF1p asPvwpCx1ISarauJOD5myR7mg5+TslZBdlkr1iHD9jEEHKBMdh9RyinP/lsx UcUHEQUs9OQ1jBIWQVoBC7vUrEFKM5sELHYusyAjphXWylYBiR9Lqcw4Dg2p NuuAhUkoM4cxWEitMg4LHXkNrT/0vl4/l7Wnn6cvoYKdIgtVf38ud/LkhrUg ZUeFnzhNDuWmqPr/I7//2D2/ANnmatiKqvlFM5u4CNc+uZyP3c+tp4i0gaLR RgLHxqV7kU5vdia92dmUAOVY6JU8SSYBJZ3skOW09O4vfU9fz56MMX1Kouiq 3wTj0CIjqj/bTO+DSMie4uR9Vr43CjiErh7bhMW6mH4hzyn9+B2lv2AHA4Ov IlwtlzRJ7aQ5vwpF9PxQAsRerp8U4sufC3eo4vL9WftSJLGJi5hIuAiiJDfw gAZPgOIVLr3Fx+w8xJgd6+tnoAjgoGChJJpPdttBYRT+wvVN+rH2taE0qw2N 1TYn8VRnEVUppBoglSAJFeGUk4QZJSoMyuJhIwK1yqMQV2Ba+xWYyQ4Ho33h njwm8wvnixoj8A8cCHZxe7KF/0O/7o5aVKXUwlqQI8S7pXB3+A/sbAyROxuD PLX09vjBkD0KU+7p553eHbXiyPm7I959vq7KO5BTdfYrQYicE4KaLW5OaTh/ VfFPnrMvog7ifdFyEZBDZPHn8mZFeEl/ueXCREaFiQ9LFhUJIHoIVPPP/g/6 +odRqNqkoYcRwbouwlXcbz5vlxviGlq+QkMrhB5mMMeCFoHufspWHaUQV7PV kPspQrEFxHKWTMhlRND7E8lFdUMobpj1MfzWgUllsLvcFTMLERfYjrrSduSm RHDRKIYHx6uiCvoCIgOEkmE4x0IEx4KyfThYz3bNUoTTan6hPAmKGcwz+MvN eOJ8QJ7e+wgYcPkWLn4kZVtYGcGm83/CD/LXv5OBQwYLpRQW+wWpuCxlKxh/ YP0ia7UicgezC3xC4gvKdRd97hA303OCCgjI9EZqAs7+lQG6D8JR9ama3nXz U2wrlEiTn3OIqNk3lTk7bPXPlDsLTgAtv1nz55GS3hAfRZWbvf9hUgIqHLN/ vQu7/hiDgrVBqNm+kgnYqLhznC6uNKS7ZK0NTBoghK2k8lP2pdFv6aUjzGu+ CwW2wJGPTR0IFFJEfPqWpRERCNBIjWUFCnpxS8oa99zWNyGH6erWtHP5IwUG kXY4cKFJDoUIKWoZzgRimSgfg4KUQgoyEEF05CW16p9LT+XnQdWTl5ZgIL2C lFwWB+diOZgCBTOHghAdYdoJEfIAfeHvt8BnXS2K4+vRVGaRauWRfDmYsjGR YSKcz54rmJBNHWyxErkBg7u33Cb3M9lY4v+DKY3isIN8xJKlfW9FoWhtAOp2 rlL2DfNVSyz15Skw1wZzSAsFy9bXYG+xBjTggOZnMpJrOSv87azwl4rtvJhk 0p9UDfNdaUz+0y8SS34Xg+SlkajbvZe+ndBlCWMH1UwM5gXuO7nAkUYohnGF MvZT+DImGOgnIF/q6Rvi3KjwE6j3yv2eUteAi+uwyGHX9hGRQ/EW8/4YT6Dt QHl+B+oqa3hqMY0BQ8XV5aZzwVGBCakvJ8UazayHiW2PNQTxm/YAnU6Gih/J 2z12k2KU2+Ke1K4PlAJpZueNcfSDMfEBFdcC+Fsseo1w6d2AutwG5MT6ixsW RYjbabWhcBZmOTIq7qJD/Ojx+NKb4+3znBIqeAOHvBa3JzRSAJG5LZ7mKsKH 4Vjz31FIXx5Gb84uxlS2eTpcdMw971jAxTXjBGtDFNaSEw8gJ/4v8lFoqYr3 Zw7D2yQfhVhPw7RgTRwQEQIQTFtEHYV5vyWuzItD3Q5/vhiJndYrIj12UREp e2WWPwNryTaT3wshLgR7qyUiPpUHMqFhtYgOt+AgWVKYBYdCLUgJoddgC5ID LEggL2wPqPL2mff1eEk9Gz+hZxNAqORahVxqTdxor59XhYTwDlgqO0RnpoAP V4Zijcm8bGXqhC9IfcIogR8ys4ketMnMlaECDYF8OaxRp1OyDQ1Fe62nhJDU 0DV4y/VWvo71VkzUSMXL6hekdoUQk4gk27mgHFkRjbCVNYrFbQZm0SqOoRe+ 415CJYqCifL0ONX0dvpRqPHxfU5hlqQ3z398vpv/iP0lTPmPQj797xGY/18R iFkYjfqdPjIPYiqALCl+QbSy2Rf6iFqJ5zzcuxB4vRi31f/Mv/UviE8+9AD8 pZMNlEIbZiFD5x0uPQulAgQgBiKzJhrzfmeA5wcJKN8c4qS2Ec1vLRWFjXAJ qDCpsiFAHSS7jwSHJJrWSzyzhXJxMYSeGFZ6WJAbbUEBWXGUBaURFpQRysoJ ZWVm+m9CWBEhLJ/vIbbIlmgqLvYGcLkXjUcIl3vR0ZMzqMMd+mM6EcbmvOkF r+2dyE3rhKWmg4ezp2QHsB1TTGkslFuEVBsjx064CpJiLya94ZeyCtd4qCls 6sUFr5eTc6bvHyD1zYMVkSyp7xOurIsiW/CaEabdNlRk2GAtLZ3GQfUiv+MV KwKU5RrSK9kP+NhtBoUMNYUMX/Vz8k3V2pMoxTM4XbL4ijRCaOAJ/bv5v6X6 c1YcaraZxBtIHiHCXyzC4W+mLkJKh4XZ63ChchTE8+gQH+YdtDB5eOOnEtNa KvP8paPWcXHQYKE8rwiEEqiC/KIEsAhUXPlIS7x/IxGZa2PQsH83XzgSI7eO iBU9Yd8Rb+EZvUaQKoSdcnp7Khv21sqhqbiYGiTGWZB2kKBCVkRWTv9dFSt2 lzHNNGUBrJVgZiWIWQliDQQxS6AFNXIzZbHaImvDv4HPLgP83GQHPRua4iIM YUKcS0KN3QTP+1MWVdidKC/uRFlxgYr360yTClwx/JU8v4l+PYaz57iskNlZ VkhugDVRFNTr9L+UpanWgzw/VRH+ngHyXDnEsRBDqhjbFcAlQVUca0/zo8E1 7+UiKaAJjSVNUgmc3Wq8JFSMpax+pFyhypVG9FI7ge9bIshp6T3XEOTUasm8 X3JH4sjWnlwqI7QXw+3RyKykJPTzub0bj5JNYWh022TP2sQSpijHEianxel2 n+Ynl6b7srYGn5/KH0NLzl0hok5q0vLRdfJlJp8I7suYtEOwRujSmpk2LT0i l1cPImZpAhr2aZkYCn9Y31UP4uDTOcRQzFrnx0Ee3ddbYm+1zKrjYyqRdLAG qfGEvQTCntznWst2g5HZCIsthMU2wmEH4bCTcHg4Uuxy7aRg2hEidrm2EA5t hMN6cnW1foRHr1p5d0tlyu4Arq8gmhScRpg0UiiOiLx5eSOSYjtRU93JG3LM LFSZjTEKIENlFznrdVTxbsdnJAaZTo9DhESvN/6r9Hhad4ZBA5db1FHBoPeW 3GYq9M67jBQVer18qEz897XP4LWhEYWJzbBW2tg9h9gV+aIQopfwi2BmcN5f ZObLJMz+FMq0HH7PSm+jcfI2IowF23MhHsKUPOgJHxyDta/HI2NNDBoPuMv0 8CWBQINEoRMC7aFMq/gcetv9xPJVu9dT4OcZIOFHebJXmIAfQS+QK4tEc/iZ OfyEqqvLq+Hwn3sINTvZLAV7Ti8KxQQFehJ+oTrh+8yUUJhZAKBHEcIehZ+P hN4qCYvkuEqCXY1Y15hIUZOshqyBrIm+1kbw6yTrJgj2EgSPsPWrMRYVjkaz pO0oobGf0NhHaOwlr9jF0EgescVESCQU1tkR+CJ89waJNhmnWSIhFRWBj98I he++TuRldaKqupkFX96MIxrDpgvpG3IzvEGMN4mFy/3XYRJ5IbwTQq8PkPf0 /4+gR27GXUCP1ap6L8c+IKb0yfn9XejJ4wvX1xMR7tuC2vwW5CeHSrncv3li CYKyWSSCr5uTe4DYyKeCPx3hz58KeY36WWe34+WI/3YlX7mXIcgvUpzEa+SP JW/8XH8fy91Oo5ue3/qJm+YYEfT1/38KNmY4r0kN9tP8VAkM7mpJykBOyu+O ZQcqwh2aGOH9/LlAkI5l1tvfS0HBllg0emxnwcLggKAUKFAgyOSgdMrTCOZP I8SfsdFXQnAFf3kZ8ZEFSD1YgfSEamQn1qIoyYJKsjoyG1krQfEwWQ/BsY+g ePRgHQbIBunzQfraSbIh+vOTieJz9vUBtheSQZVtBiZcdrDtooTJJnUtSneV OTYM7RNTF36eYYTJcNkpEwHX90sQGtiJ0tJOJCaYuaCGiqeF0xEkx4W4MZkZ bqKfkC1QNcoFqjp9IF6xH6dS4cew6C7PTSQWFdVZRcLZzAX/HBroDIvbFlYj PaoVjZWt/Mw9Sp69i6tfcQUcaVKwGCUP2Onp69kBOz19PaVgHIt6KsKVUPz/ RHrAY2AAT7v0Sj5vX3IQxZPREPlzcVlpMtdX6eeelwzLbrMEIz+7IQxMt697 i7BrHAm5GFbZiDjIZJspHKu1cKDRz85TnYdAI5uaY2g0chmZaOEMFZEAJzQu fP0QktYkERo1HI1s0UK4IpfBV+MJuQzHOHYofx4cjTp6HnY0LpdJcWJUPtIP lok9hIk1KCYEViXVoT6Z0JNUjw6y7qQG9CVacYzsRIIVJ5OsOJVsxUiKFWdS G3EmrQGjafX0WkdmwelUC/2Zhf4OIZT+veOE0L5YgUy2r7qVLbPbVSxR+Ty8 97L5iidngbata0ZyIuWIVZ28M0fFenNUfJbtBfswELOFruuxcMF6LHBdx1t0 DFzkhbXoBP1KnhOp3QiNBwxSulVMfQkN5Ign0OiQbhXyk/PfIH+xpxVlWa1o qKh+isPwJQnCGDkDHyUEruzbnUL5Oa440ycQ6nSU+vpJEP6dzFENosdGcdLe 0kn7yR9FScJ0EoQyR3D7IAUln0XD6rWDawdFGvmmdH6GaJcsipQSQkKeRQRD wqCWMKjx/6l80zX7KS9w14sHogjfeIU7ICjnlB0QjLNrVbi+cRCBi1NR7xZi F4pWIBimZxoV0XYIikFR8TTM/GnolfJWwV/GwRKx1C+xmnvCquR6wl4DmpNt 6ExuQk9SM/qTWjCQ3IqTyW0YTmnD6bQ2jGa0YTyzDRPZrThLdi6nBeeym+hz G5kVE1mNGMskTKZbMEx4HEwWOOQe0lyLdn2VjNT/ICYmDpjh4xGGd1+LJ+/Y gZzcDhSVVTvNo0XCdf5GLHDZgIUuGwl2zDYI6HFbBxfXtZjvshpz562Aj5v+ VzL78dvrB+1+PVmAXf1UkeA2OUlwBztJcLOTwhXvs/uENtSVtfFDHcoGI/lq FcUD8i0UbAzd6JjL5evFCP4hhiBKKEzkyHXP2RMEjSMMegTbCwCjk7bb93T1 ZZKw5q1DyNiYAKu3H8ee0Aaazt2gQw1Fgk8fZldDMesC6d8j8Gm1+Gfl2JYr wTojT+pD+CoT8tFiQp6PDDtUUlzeNODArAyU7ohDnccWFb+Ie4E+xnDQhUpx FDPFArMhzEFDqhKDdDqJu2VyHjIjthA58WXIS6xCIYvAhLd6wlsz4awzuR29 SR04mnwYJw514VRqF06nd2MsqxsTOd04l9uNybxuTOV34UIBs8O4UNhJ1k6f t+E8ZVGTeYTFXMJgVj1OZ5AvJH94IpFF6VocCatGh77cnim+9/KreOcX7+DD N/Uwh7ShsLTdMbEzdwPmz9vAsccmdhawiR02WfYCfVxPkFtHkFuLefNXc3Vd rbuR312xSwv1PgN89uj+TSkG3PTfURINE0qifkLpKsgukchXo2DuG9uwf2Mz cpPaUV/dyu81pjEYqvhR43QOP64BYowW8JOLUEKcDqqDDEZ+UP2c4v8OaGTw C5Tj4mYHBn9Qjp5csV54mQVvJCJ6ZQqs9P/KXg0BwxeeFOThuUC4jH1i0V4I v3DX/rPCBDd/+LNHwdQiqUD0Z0Pr3mIM2OQnhtaZTk8QVymJ44PrQqchDqtm pCN9UzKsPr4cgCoOwOf5YByDoJlDMJxPcLKNFpyIBk5ExfctlVlSRnQucg4W Iz+hUuzHTrLBQj6uKbkDHcld6EnuIQz24kTqEZxK78eZrH6M5xzF2byjOF9w FBeKjuJS8VFcLunHlVJmfWRHyHrIuunrh3GxuIP+XhsmC5rp/7NiNLsew2nM H9bieFwN+kIr0aotlp330/l8/daX30Tgv/4JaX/4E5b+9j140iOa/5/v45PZ 6zBrzjoxoDNvvRzOeQnz2ADZ/HWYO38t5hAQ2T5XNhfB5iMMTjuQdXIHsmav XjZ//BjqvTox2HrAcdmqp4zMaF+PEC0PwYX+2tw3DlF52Y5K4lp+Rvw0Dsu/ 4fevQq0ghg+A84NKxS3K/SJinpYNgbNRRSMlFP5KE69mv1rA0l2BpSNDEC7p B7YkSFi6vknRYUEaLPsihVbUi1IjROqEGH5YJ8SsDxJ9IP5axTGq9/nTs6Bn tD9IiDRyLQWqGtl0OoMlZYXfdY4KNF3JQYevSkejZ7CKR4/nHYO+hig+QxlC 3Aw2itUQwcZAPldsdkbk68iJzUd+fDkKE6huSGriu0EbCYlthMLu5H70Jx/D QOpxnMoYwOnsExjPG8S5gkFMFZ3ExZKTuFx2ElfLB3GtYhDXK0/getUAblQd JztG/91PX+/D1YpeXCojr1nSicliiuKEzDM5jRjOqMPQoRoMxFXhSEgZ/4lm vPw6Fr48G96/WYSE95ahzHUpmlctQNf6j9G6+jUuujbz49X4gE/pkM1htpoP RnxPg1CaWJNq4puGjcqmYTf7Zu5fKldq+5681xM7O5yEl/2FYiZzl5sWWpAc 1QFLVQcflmVT3lw1g1WLCiTDFKF0rksg5q75pg55dh5oCKDE1vC80ibmxrIG +rEOOCWt3hKSXDNdaok5RWsVz8ie4bDc+3E6infGw6beJ7Q8jFLH43mHsJ4x wq6lJHKGQMoZjPSraeV12nRo9jnrI4bCn42fMX0PrpgQ7aSYwOeJ6Id4hvPU 5e1I+LhmoXKfHMvUx6g4Gp8V87xGMZEZzC8Pgvn4MLuQknhcIsNFVlQW8uNK UBhfg6JEG8oT26lO7qbKpJ885DH0Jg/iWOpJnMwcwumcYYznj+Bc4QimSk4T xk7jSsVpwuBp3Kg+jZs1Iyrcqh0m13O7dgi3LSfpvwZxo3YA12qO4Up1Py5W HsH58m6cpTJ4rLAVp3OtBEsqtw9V4Xh0GbqCCwmSrlj97+uhn/kZ0pfugGXL dnTt24wBz9U46jHPrgGo46JnRicNQJNDA9ArgC8aDaDQxdYjBnmJxiilOcrE RAAJmka5AFu7y1/pBOEXhvuUcdUQKUIexgWWTVKhj/nL2VS7+O3pQGFWJ2oq 6rhP4MJkKn7GPl0IkRscB5wh9hnZULJgqd1PDpxy9heUzM1NZrFOYpmKhr+I mbJs5VmbQ5CcDZGvnJGGtE0Uvf38BTNeEI7aoKh1MPeoLIJS1DrISekNP1P6 BPcQQRVxQj5aHiZGy5kOgl+UQwdBwFHFY8ZL/IfZ9EEWcrYno1HjQegkPy6n 3ZzP1pyHg0OdYfgG8mLyUHiwEsXxjShJaEdVYjcako6iJXkAh5NPoi91BAOZ p3EqZxSjBWOYKBrHVOk4LpVP4GrVBK5XT+Bm7QRuWcZxp57ZGO42MDuDu42n cadhBLfqT+FGPbnPuhO4VHscFwiP58hVjpd24QwF8BGOxVqUfbodfWu3Y2BJ ENb8cR8Mi72Q8Zkv6jx90KP3wImgXTgeuPZ7wntCg5L1XAWyDkr6wKT3XpR3 6QF24z05DJPeRilGaSAs6mFwo6x9t/Yl/kiexgEPHTw89fDyNMCb/pqPh5Gp K9HHp+BL0PUhr+pN8PVy0z8rPZoyycpuITVSU09IrSrQjcLC9woRGdiJqrJO fuc9jd96vyRjmRLPhARByPdQq1wNBXL5/OmKJ92npBgOCX2RYshKV0l8FX1w rsjIcPsjuL59CFFr0qnuCeWZBpdBkJANk478Sb2OYB5XA/V6vGzHrck+Ya5R JsylJILRLokgFdUYbtl85otwpUQzdkM6GliLkpzQFNOZEfwc2HlgmH5dCdnF /OUtZEWkoSCmFMUH6wi2LShL6EJNQj+sSScomp9Cd8oZHM0Yx2DOBEYKzmG8 eBKTZedxseI8rlZP4XrtFG7WTeF2/RRB9DzuWZlN4r7tHNlZ3GuawF3bOG7b RnHTehrXGodxuX4IFywnMEnudKKqD0W7fTGwyxOXvdR4aA7F10lJ6FKnYtlH ftBsMCGZ3pAqerPaI/Toi/NGd/RnBAijXSwvwK4TSVWcj+giNJOxNrJgdj/j F8ybuJipeFPGc/TnAU9qRnoK+LI+U//dGuHJnuOjfZ5eVB/RX/ElU5NpyPtq mTElb60Ha1tmfcJaQrKGsle1G9MH08vbzh/Be6ezXpjytjr2qHz0+nbsWt+C 9KROVFe38wt2Id3N5hxDDPywn11vKlPgiiMKePJ66SV5bqyxJyQhUrdILBEz cpUtJ6ViXax9Mx+LvK5vR0O3KBM1B0R/WqghRip5RD2hARNsv8cXSh5GKlh+ LrOAJwQB+RC6kJ9RVD3Y/ByXm9LySU4+9zt/Rjx0S7NQ48EmOqP4uTFXZKbv ZXKeLjYEymdKiXNkLSKjLIghi4+kpCrCgtQwCzLMFmQGkwWSGem/dRak+dX4 PYn53IgsFMZUoTjOhpKDnSiP74MlcYDqqVPoOHQGvekTOJY9iZP553G6+AIm yi7ifOUlXKq5jKuWy+R+L+N242XctV4mfF/Gg6ZLeNB8CQ9bLuJBywU8aJ3C vZZJ3Gk5h5vN5NabxnDFegYXCftH6J2Z8jXjflQKvskqxLdV1Xjc1IBvO+vw ZacFH87RY+9noYigJ5YbGoHagyGwJmtRFr0NJXs3cqxzcTwfKY7ny9qMzIRx M2+Jo7BNH18SCnnqEGnBUhkvSFz8cs0lI98PK8YjdDC6aWXxPR1eXjr7fKGf HPXSeovpHB0BX8/m2tmrJ8ueWfX2DPRO9Zu/Ur/t0duVup11yL5z0fXR68kU fTpRVNCJ7KxDyp0Cv+liFwtCwz6Sm/1i4Qc07LU6A15SOg0p/dHsC7TrIAkg hgu5OWdlSruWvei8Y2TYNSsThbuT0Kh1f0IEKcTOv7DvKISYfiHPTnykNiC7 z+OTxopiv7w/UdSXFR6YpOzajjnZyNuThHoNa9swGdkMnlGZZqZwYTDIGbwf 42AsQT5OWDJ9nkGWw3p9iApFRINS2eNTTjQoJxqUEw3KiAalaguKvWt8nKnw R+RHFqE4hlx/XBtRoQeV8cdRlziE5uQz6EybwJGsSQzkX8BQ0WWcKbuCs5XX MFV9HZct13G94QZuWW/gbtMN3Gu+QdC/js9bydqu4VH7VTxsv4IH7USR9ku4 034Bt9rO47B7DM75xOFuVB7+nGvBt7XteNzZh8fHjuLbUz34aqQDU0dtGEjJ w4y33LF4cyg8qXyICIvCoYNmJMT4oCilDKWxqSjfv41gHMLXibNGfq6hRxam DuUNgdP4QMOLXHIsXBuCcI3QzQtTO0uPCd28IIJ8gLs/DPs0z0jX7+Otc8zU e4uZetFIy+eZVXyi/ilePLJSMcCDv6p4zfg0rxpZxWjg5xmU6lNSquhz++wO hK8bIcQ99IkbtlUutYiNIH9U2QmVIo0QRb9BoFTj+65ovYkqdaNRXK8Z5PWa Vmf6kZJQ7HUkUkJfKUwK/0U4kUCJBkxtRM8SimXvZiBlSxrh38ivmUMMUT+s QCJEa/5NGaVid4ZywFntFU6/1fcn7A1OE/YL6NskbE5DnUYnJ+zDnSbsg6fJ fzYxrgaH4i04lGDhrxlkuawRifBfFmNBJWG/hkKAJdyC+lALGkLIguhzkwV1 Bvo6u273o1evWlS6VQj9aSyS+M8ITkJBRDmKo60oju1ESVw/quIHKWsfQcuh cRzOmERf7gUMFF7GqZKrGK24gXPVNyl9uYWrDXdww3oHt5vuEP7vkNu/g4dt d/Co4zbZLXzReQuPOm/i4eHraHZPwbjHIdyKKMPX2c341tKPx4dH8PjEGL4d PYM/nx3G1dFBDJd3Ybi4GcN5NVSsFiLTzYd3TSvjPqyD/v3l5TBGVhAPKih0 UensvY8PBpplh3QYGwFjenxPIULLFPnCFFNxGb4X6MtmJyXJIN5Yyfr4uVQU 75/2Zz32yqSmj5StZ7M8Gt62LaXrvR3S9SbGiECqV5/mVSv7jFWrSsWqzHcJ yXpGCz1VrPQ77VR2Zr0Ib6KFj5vQ6Ga0eO8PJuzf2YGM9E6Ultc/MYC/YP5G FRa5bCSeLnLdiEULmG0gk5d8C9bC1XUNXFxW/USJQEoadsCRhilbuRx6xeK8 hkjBIxD9by4zUhC+NhP1rOnP8ENLVByLhvR6kziVmYb9B4TgLbO/5x+f4WUQ yyU/YoICXFhgJWZ/sHIa5tAn0zHn/ZWY895y6OgH0OkiMfedJJhWZaKala9y rltroNCpD5aP7B94i0p6osVu2USSQiJIGRGkighioeDQQASxEUGaKTi0UHBo ZXf+RJA2dsNKry0B9GcUJFooSDSra2F1r/R8kiTZwekojKhBcVQLBYselMQe R1XCKTQmjaI17Ry6si+gP/8yThRfIwDfxFjVbZyrvYuL9fdw1XofN5oeUC70 APfbHuBhxwMixQN8cfg+vui6h9r9ORhxz8aNkCp8SW/0t9Un8bjjHBHjMh6P XcY35ylwTJ7HpO0MxhtP4YzlOEaqejFc1obhonqcyitBvo8yACXauZURkw/n lkMfXoWi1CpUJRWgWuvFRyOFXmWEiotVPoVInZADjNSFM1PRhzB2bfGEamWw lFxl2sKsodtJsfKA2t434SxB8N0lD+Jwhw2nBqpkde3NC2ufQD7kpBTVwbyo NsmqxKFkzwpr7U7NU7I5jqnZexNTPvlTHgL07Sgs6uB6Eky6bf7cDXCdt1Fe RLILyE85TfhlJNFEuYh05ReRqyhIsLLFyMsW3z06/EiieOa7S/DB+8vw4fvL 6b8+oo9/+33lWKkey3gzf0Y0/BZno8I9DhU+2+ypvEmm8kKYJYTcu9wk8ZSd FF70m3p7GlX8gOAZfkDAjgd8KYT67jfA200Pr7068YM9SxmqnjJUIzdWlvmR i5lNtJr7wUp22/DBKvpx59NHl5mruHCCigsnPIP57y7H7BnB2OOSidsBtfgy djsTNVeaATMSapCVZLFbLlGqmKwiQTYdEqVsRKmW6Dq0E6U6I+rRFVGvQjcF n+foYx3/rItYdphC0WEKRYcpBevU16DNp9zDmVVUhQTn8CWMxZHtFH76KPQM ojrhNBqTJ9CWfh7dOZfQX3gNg6U3MFJ5C2M1dzFZd5+qiAe4avscN1s+x922 z3G//REedj6i/LEIR90KcYmC3ufJvfi/stN43HqJUqs7eDx6F/93/jbuXbiJ a4ev4HLHRVxoo0q+ZRzj1hGcqR/ESG0fhinzGC6zojowHEUaRauQaQkFkLcP klqFYsLUP6wGRek1qE4tRa1JyxhlV9WcxsfGfsT1CaN0QqMwyk4xobAV4e8I QGI2xORQ1fRUy5umF+0y+cogmb+v0JRh1X+AIrcgpTyo+uezg9N4/f+CqPp9 g+yHV7zil9r4fJDQnVU+/opilcvLr2I/2fz3gxAX24aC8lbMnrUec4hTc+UF qwuLPK5Eqqe5hCe7YnV1WU80Yhesa+inZpXQM0/UQlp5l+W7S/u8TC49PHXw oB/Ck8DrTeZD8J/13jIKAitYOFBhLqH2J0z5A3PfZ0ZfJuw61w1Mf2bbrCzk 7klGnc6TVw1GY4Rdf4ZtMXJsMHpOcsbAv53CGTWZxtPpKOOZJ44yNG7sEJn7 hOmyNvTmWbHQnREyICYuA6LlrXv0O3uKutCFs47x7wWmJwEX+i2Yub63Ai7v LsMb//QattGjDiI79B+vIv6VVxVRr+zEKuQy9iULy6PPWbtRZWI9LMTExoMN aI5rQHtsIw5T3tYdbUNvlA199NofY8PRWCtZI1kD+mPr0EdZYh9rxqQA2Geu xZHAKnRpy9yd6fgn5AYVoCisAcWUgBdHHkVZ3BBqEkdhTTmHtqwL6M6/gqPF 1zFYfgsj1XcxbrmPyYaHuGR7hGvNX1B18wXudnyJ1l1lGPWtw82YPnxVMIa/ Nl7D4yOf4/HwF/jrOaLq1Oc4NXIft3vv4GYP0bHrGi4fvowLHVOYbD2LiaYz GLUO4XTdUQzXUDZY2YRqcySK9VrHhC+beOcyAE7D3upwqMnxFGaRr8qogCXE iKjXVxPduDAjUTGKIBtliFTRp+H4qZ2Hdr1QhYe+BjnMqYbB3VfKmCuDnAbB P76qwkmqn5dhohQzM5MnEmxfhVksrXiBi1OE8mM4lm1S0POV9ZcXyzj1VH/x YwiVrKVnvvwadr38DsJ/MxM5b7+P6o/fxsrfv4sPP16Lj2exG+b1mE2knDOP aZWux9z5TrfL89bwokxs2nuOeK7c44mqTL/fcZen3aV7RmZonuzgQ4YWH2/l xI+ooeGlHrGExxGGbRdGUgbvvyFYC3jPf5fsneXQEzkNvMBJR8LWNFg0Jqnk FC7FecxQ6wKnyVjm7SXqzB9ilIqft0zjjNJ7CBMe5mnyLiZxU86MbSejClO5 FBQZuwG+9Hi5vgr792TtqpzeGChFN3gG8CfEno+KP53/4Dfxyn3nWy+/iQ/+ 5W0s+NmfkDpjHqrnzULLkhn8u+QklBM1a5BPFC0gY6/FSfVE00aiqRXW+Ca0 HGxGR1wrusiZ9sa1oz+uA8cOduB4fAdOJJIldWAwqZ1eW+m/WzCQ2ISBeCuO H6zH8ZhaHI+oxrHgCvTqiw58J3oGlqDIbENxeBfR9TjK44aJruOwpk6iLfsS uguu4WjJTQxW3MZIzT2M1z3ApPVzXGr6AuVbK9G/rw6T5j7czhjHFzU38HXn l/jmxDf4v7Fv8MX5v+Dc6J/xef8XeNBHUbbvAW4fuYebvbdxrecGLnddxYXO i5hsn8REyxhGm4Yx0nAcw3U9RNkWVIdFo8TkaKcXepViGI2NMjKqcr1Kipg+ ofUoyK5HXXY16iPMyJzDYkgUldzvI5o+ss+i7aaIqIbbldmcRVTNdhFV1lav xeIPZ39v5JYvIeBCRc7MNRPrQ2URGcpHbcOY8WIylB+jhCtbNzRiASgjMz9E 8Q14YvlAgLsWhn1qzHh5Bpb83BXq/1mB5I9Xo2rZKnRsXIIjW2fDuuZVex3J ESlOVEQtyeUJvZiuKdMFUTRCRP34rDhl8ZAA5XWkuPnU7XZaf+YkjebnRCjn 40sVp9Q0rnK0gPjLTMU/ThfKNe+xUEVGfPb3j6SkMQmBazJQ5RNmF8ZS60Lk 95xuL5E54aQylp1wdtIR2bjWCaPc85xuDsdkdHJMYp0bq42fUQ7W7WJJBk5o /vjsh1EB/CzK6BXIBJP4swpU8cf3Ej3AAPtV8YxfvokZv3gfc/7tIyz/zSfY +N8fo3nrRhzdtwI9u2aiIKkKhcm19A8UJddRhChKakRFUhNqiZnWhHa0xHcS mw+jO64bR+J7cDS+F8cTj2Aw+QhOHjqCU6z/KI1qM2499DnrievEUEo7/XkL TiZaMUSV6cmoCgyElqDHmCuFeCSt/wG5plIUhTShOLSHIvEAReER1CRNoDHt PNpyLqO78Dr6S29hsOouJaz3kbKuErbNNTjh34up+HHcLL6Ju7av8LDvr/ji 1F/xYPyvOD/6VxW+7P8av8Sj/q/w+dEv8aD/Ee72P8TtPqpOj9zBtd5buNx9 DRcoEE92nMdE6wRGm0cwYjuB4Qb6bSytqImMRXGg3qH66S0GlNkwfRAbL1VH cD2FUC6pEQUPcwPycxpQn0c1eCwF8OVrVUThGPpgjFZxpc9/EvKzFBu4/Kwi tqgzS/nZIIf8rK8/ln48R0hd8LOgJ6kcIBNzcRYaqkzMq+yHQdO4ysu/CC4r xz+aEKc9DAHyMFSnjM8Th5dg9X9thuGTXchYvRf1O/eg15MJp6/DEa/ZcjeE cg70/9H11vFxnXfW+PnISbm/fbe73Talt9t0u9ttt3GSUrBxwCizJXMcdJyY bcliZmayZDGMGEY8I2ZmGDGTZRmTt9u+Xf++D9yZkdP3j8czkhPfO3PP+dJ9 7jmuBgtDPgBy41sX3Oiisg0MHnpbQ6NtDKy75VsYDB2u43l7DgVLCzuD3NwN 5y9NYB3ZvMlJTmAFr1xEbDDBPpabmd7U19lbwWcqoJmW2as/PoHXqeQ8S8uJ lictRd3OyohjQnlKHM5R4RhXUXXlx3O5rmgYueo1jFyVKfA1uSvjihOfczld dIDDp3ZKk2nNpeMcpTaKPAx7bJn3WG5CH8VC9jUWUq7Qwt2ES+T8h7g3b+HG RXJe/dmrePXZ7dj9q904+uIevP/HPTj3yk50uXyKDucjROB8qIjKqiiqayMr kEVptoDSbml4AzRE4JrQFiJzG1rC29ER2Ymu6E703uxCf1wXBm91YzC+C8MJ tBI7MZLYQe/babXS75vRf6sRAzdrMRBViQGqyvuDctDjl7aJz+ZIcspGhrsG Kk/B56yQIRQwPscxf4IFNGSsoC37Nq6ZRiPxdDx6vUcwEb+M2YJHWKz5v1jt eIzlgcfQDT7G/ZY/42Hrn/GIqPx5O722/x88bCdCd3yBu+1Ufbc/wO32e1hp vYOlltuYb17BTMMCJutmoKsZx3DVEAYqezBQ0YLC0FgUBAYj3cNBT2jjZ3yF zLmfIpAiHs52DMQljzIkJzPZ3lKURYQi/8wpLp7KNCuDuG6l0BQUOr4Bel77 G4mo+ti7y1QtHmU//M5Owem/Z2HBOe0tpJw4p9n4ys9EP7/awoRZTPiA91/E uEre7VCIzcZVh1/YB8fnTRHzp+Owopr12CtX4XjEBrc+tUexjR2a3C3R7XOe Xs2FXOumcZWE3tNcP4vNrDylHyOT52HbQ/hGEVcq2ZWxlaG9FjfU9760Z1MG 07PrxpPJnyuBWbiacGJt4emfRxN9CfANTi8mEWb6xmFOrz/+8EW89f0X4fbs q7j121eR98bvkP/GVhN95jSmm5MsPIwyJ5cjIrrxgMXC1rclv9ykQq2bfqKt GK9yUaqrTIeIPh8LWp/ZwnA8g+aNrf54riJaGymVMf0bE66A87QowpTF2qgb bPMC+7qf4UHzxq/3Itv0BMxfPogP3jiAT9/ehwuEmhq/d6F63xXhr14gfmuR SeV0bkQjisNbUBHWhuqwTjSEdhO/e9Ae1YfumH70xg0Qdwe4x+dw0iBGkgfp WLqUATr3sZQ+Wr18u+ZwMsWAJOpBEyj9xdVhIEaDgYgiDISp0BWQiEvGRH8V CfbZSHclorszoncjM3gI+VHjKL01g6oUSfScdTieLkaWbTlGS/6KifrHmOx8 jIGex1itf4T1xs+x0UzZueVzPGj9gmfrR0TwRx2C5PcZ0Ts+x52Oh1hjRG/b wGLrbcwR0acbFzDBiF47jqHqYQxU9XBz6sJwInpwCJLcbaVgrfIwP1M78eFq J55G8jeKdjx7du8ztwokJlegTFWBiugoyn+nhVKyS9AWzvTv670N/PX521vm b2YXQxyn3o/5HR/Zvls/nt5s/GHo4L2I25LffJjma8fNP/zFMO2HfE7NBmhM iUnc0PHW2ylZvngIES+ZI8v8Msouu0PjFkEISMG+dyiNvueOCPrIuR6eqAp2 RkO4JQq8jj+hV6ro4XoSobkvGeHwh1yHyYtvMRBbarykIpOXlcFsUj9Qox7+ 4J/24sBre7Hv5T36Ibgi/caHdrJMYIxzU1hm4cYDzBYxFWeA/67c5igm4K7X nPAK1a6v/+RV7P3p6zD/+evIOWCOmlMH0fzB20jctVVPOxtJO6Y4Zi8Vx5w4 xd25+rQH15cTkpEehqmhXoFM0O6rUnZsczhjAwqXy3aS6l/jUxG7Gw5Sd8xZ ChK6SZp7mHCOP0Xfq0HViJYJ77X+k89I2G1rT7mLw/Y3B5B78Aw0TpQSqHh5 d7sZPt59EOf27MGs7jHSXagsvpEN1QchiHrdFvmUtEvDuqAlcteF9aMpfBBt 0UPoujmC3lujRFwdhpJ0GE0Zgy5Nh7F0HcYzdJjIGKVFaVY1TD8PQZc+gOG0 XgylUAeb1IKBeCL7zQoifD76I5IvGW8Y+BekORHHXYnjvt1QEcfziOMlt2ah JY7Xq5bQmrOGC5/UIM67GW0tj5Gp+Rtmqu5jofY+VuopQTdS5d38kPrqh7hP /fUDStwPOx6ZEMEf4Vmi+EOi+EOsc4rfxzKn+LqB4g0zGK0jitcOY7CGKF7V Sm3/TeQFB/19nWD+5PqXRdH9pC4102/4yKkS8SmVKM+qREVcLCqunGEU52Lo zM6QMT3ASI96U52uiKLbEc937sORHbv1Gg5cl1KvwWeY0jENGqEl9TMu9MK1 GtiUzmhSF8CFlPw3Gfyc/a05An5rhrQDF1HymTuqnCNRFZaGqqRsVGZmIjMr A6/udMTHZ335Qwi3/AKQHeGJrPAbUAWGIev9I5wADP4iyzDgeUl/TW5DqOwi YmsLH9ttEdSXYkomnPDfxOG39uHQtn2E0704+LrpJo0/pxtGSZWzjoshM4L9 WE81TytluetvgIkdpYJur/7sdbz57Ns48KsdOPX8DhSdperk+lneetRf3cap Z8up57iZ6syqztKgLudu6cVP2osdWw4n+V4RKyH158XFmZVzMZwDk4Bk4wy3 q3ZEeVt5D36zGCujOh/tSOUyN0W9jFKLh5CZ5NsNfYTG4H/yzSlsvuL4m0Mo MPuQgrQLNMmR2L3tGIHHHCf3HMTHe07inZfPwNmpBtEejcT6NmTf0KDwwwRk bPOklD5EAXwELdE6dMSOoyd+Av2Jk8TeKYykThObp4nV05jInMZk1jSmsqdo TdKawETWOMayKCJkDmMoow8DqcT4ZErvCTXE+lJK81nojoi5aMz415HiUIkM 50Zqybsk4ydQTIzXpMyjjhjfkrOKzoI19DEj9fI7GNdsYLp6A/O1d7HccA9r Tfew3nwfG633cZd67vtE6wcdD4jqtDrv4x6tjY77RPl7VO7f45RfoKw+27yK qcZFjDcS5euJ8vVUvtdSP17dgvzIm8gO8eeUd7imCAZ4Scr7GkmDG8nQO4pH EBUPhHftNYhL1aAiR4PKxERUWp0VpbyQoDfhnH+GS/ZyFXqjCt6LKnhPexeY 7yLG79wjbnwYG9PIQR9TnfKyEYM+xndfaQjClFr8HRRxogAiGRvzfR9mvz0G N1oJOz+lC+6CKrsIVAeloTohH9WZ+SjOz0NwSi4f8B15ezcObHsHr592xcdW vrDz9IGTD6E1gFJETA6yg6KQ8+ExIREspgImfMK3RWySshXrKf7n9/hsT1GQ FvsE3bik3pG3D9LajyNvKmzfY1DyvCHyqsinnjzReShDCHkXgBFNRJdnRDGh jyZSVIty7MH/MsW5X+3EwRf34vTLe/Hxa3vQ6G6FLt/zqHY+APdf7tHnWYPA l7uUDPQ0EM/KGyK7bhENE1PLtvbmdyG8KXd5ycjGzkMvLSnPget8csLb4uBr oiGzl8ezNyK6i9QSdeckpybRikuI+nIPV7rSbHGpXaYi+VW4PHcEhcc+gcbT g1LkTXFYqVZogrN738VP8ZHpGajCa3H4bDtcnHoQ59GPAtchVNi0oOaTbJTs DkZb7DS64mfQlzSLQSLecNo8dKoFjGdSf5u9gKmcBUznLmAmdx4zeXOYzmNb VikU5E5iNGcMQ1lUEquI8ukdRHvq3FOomk8qIMonXNyc4BNtKpHu0IgMT6J7 4CByqFtXx82gInkONRkLaMpZRkfBCnqLVzFUvgZd5W1MVVGGrr2DxYY7WGna wFrLBtZb7mKj7S515rQ67prgXsdd/IjYTr+md7c7NrDavoGltjvE9nXB9qYF jDXNYKSR2N5AbK/rwkBNE/Iio5AW5MMfXNWLdBsZAbgrbHeQRgB6oe5gZrcT gn/l4hDHrLWIoc9dmauh4JUGrcN5vQ9AgItBoNufC3QrojniwVDz3fuJ7fsl 2125SomThIOwoRIDQG77o28lJNOl9c8WLpP4I1i9eAKRr3+ErJMOKLcMRZVv KqpiC1GtUqM8X43EnCLZPyjzPyeYbd+DQ29tlyqJBuXMPx3JgWtALrJi8pAb THXQJ6eNZgU+ejnwLXxD2HeF1LOdQeqZ016O8823H6Z1CObvHISZEeWV7TRK 1+rGO1Vxy8CT04vJj/+UqCaPaWNQ6OQhxYj2H/xmP+JeOYDKTy/C/YPPcPKN g/jo7QM4t8MUdRGW+J/2PyPlqi+Sj5+Fz2/2GVFPUYP0llQXUs5ePMLyvklQ bie/a+Ftu1kslIsxSqFQIdMphELNtu2mj7jrCSFIRTlYamLe8DWSfGMSgnSJ 2VL0c/kiFG41R/GpC9D4eEOTdktIg9qKj85ud36y731aH+AsrQ9N34MqtINW H8w+GoWPyzgyvSdR7TODZvd+dN4oRcOxaPSnLmMofQWjqhXK3KuYoFw7lbtK 9F7FTP4qZomIc4Ur9LqEqQIKBwWzGM2jaiBXh4FsYlAWlciqVlq1RH3K8Cnp T9A9zqIYqbZEd/dOZAQMIjt8FIVxUyhLmkF1+hwaKbi05S+iW72MgTI6k0o6 i6o1zNSuYb7+NpYabxPl14ny61hvW8ed9jvYaL9jQiS/g1PY6KRfddBf01pp v43FNvrfWujkqZ6fbF6Arnkaw010so2DGKjvRH9tAzo1pYj2chHi61cNImRc FMbaQHcvByFQZER3adsgvD8CaR25WoWIFC0q8rXQpGdC6371/yHIT3x38uai /OyJW/PdB2BGnD8s+W4YG3jrtdg8pUiqj1JkOIi+wt9JKFqee+EUAn53GimH raG+GIRKtyRoIwtRlVoKTV4pMvNL+NxA9BJGMpfEefOdFG+IE2w2aNCEM8wN tu3Pg6t/PrJjC5AfdgsF599jtxQZ15mYJR8h2IvFx4TsD19K835cz9ugQ8gU AI/uNMOxHUdwlPH/HeL/W3Rszv09es4b97AitSpcF3rJPsJe15bfcWC51ttW /OO2Ww8iy/QUtDdsoI0Khts1awouR3Bm5yF8sHsfEoKvwNE9A5FemUhxUSH1 WghST11CyIuHxN0VuvBCu5mXUyzX+gnB5h/xz8oFPPXLV9yztBPMFzKsSr0h ZKrN39wLszd349AbOzcJ7SkzIVcp/eohG0cvRXDPluv/BuDX2PfcMXhtPYaS M5dR6e+PyvQEfmhvflipSkyH/GT/h7Q+xllaH+/9EKoQaplDBpEbqkNx+BQ+ PDeHSJ9FlEYsoz1qFf0h4xhxq0bP2QTosqiQzt2gHE7FdMEGZgo3MFu0gTn1 HcyrqThWUyAgSk4ULWC0cBZDBZMYzKOmP3cAAzlU1udQjs+uxEBGzkXjZxT/ BUk3GpDmTGT3G0Bm6DDybk6gJHEK2rQZ1GfNoiV/Hl3qBfSXLmK4cglj2mVM 1VCIqVvBQsMqlppWsdKyhtXWNdwmNt9uX8N6+5oJ1e9rOE15fZUa91Wq4uk/ b6Xo1LKM6ZZFTLTMYbRlCkPNdJJNfehraENPbS1aKor1Qur2UkidS89JIXVG dg892aVHCxcTMSZ7sBDUp3XwUy1Ck6tQUVAFbWYuqryteHLngvoK2Z19BNnl 4/Vm1HcdIbIfYmS/7iYEIfUzQumqpid7oL6jMNt6Gi7Pn0bsrmvI/dgX5fbx qAjOgyaxHJXZ5cjPL4c79VXiRoAYEhqbWflIk6Gjuw4Q4amV2L5Ln4WEqYWi 3O6Nt/bmwy2wEDnxRSiMTELRlY9ES2HHNAeFT7A9s4ISmu1+0ojdV894lvFN cHyXOb6FY9RsKow/Sow/Sow3I2LwSYXCdKm37GUtM+sWyTfh9S4KirO8oDi0 9QgCXjiMklOfQuvmhqrEaITH3uTipjvfPIwDOw5w9+FDf9pBn80Bh65mw949 FxFeeUhzyUWGZRQyz1gi+iUzmWl9DZmWvncfW3/9Z+WmBXaKcYEQ72VnonBe mBSIjMuOb06FjPnb9N2+tWuTtCGvH6VCL5eXkzLPXlzikImpCpnZfVtPwPeF Eyj+4DoqA4NQlpEk1HntFHVeCoYUSD/ZfwbnDnyMTw58QuscPt5/lrrlPloj yAslioVTxxy1gPrYZVy5fhtJkXdQm3QXQ6n3MBk/j7ngZoxdT6Ms/hAzRQ+I 4A8wV3wf8yX3aN3FXMk6povXMFG8DJ2aGoCiGQwWjmOggAr7QsryBZTl86uI +AXoSAi9sPnB5LirNUi260Sa1wAygoeRHT2GovhxVKROoiZzCk25M+igMNJb MofB8nmMaqmWqF7EVO0SZuuXMN+4jMWmZSwRm1daaRG7V9uWienLVMWzn9la wlIr/bfE9plWakla5zDWStV86wQGW4bR39yDnoYWtFcTM9V54nHbJ+wTFM18 N8Z6e2GnwVI8fxZRaqr5cTkXJi/DOP8618g/eFqDoMQqlBbSv51dgKpABz3j v2Sh4cQYf4AYv0+MDK99eWTobisZT8ff8ZvTsHjuXYS8fh5pJ92htryJMp8c lN8sR0VGJYryKhGVWSlmB86ylWCvigQsZ7xUHeZ2UO44uvugYDwfF0qXZcl2 Y8nqd3YXwDVIjZxENYpiUqG2OMdp7sc0ztjM8Bk5NRQ+Df5Sb1N/l8DBByd2 H8OJXUeJ+UeJ97S2mxHnj+AYVflH394rrMdvGPTVvWQHa0w8HmDwY35oX1la nKFyN+7Vo9Cct4Q2MABVlAX1xjGcfOJZEpZsD29TqhgXLpG971I+7N0KEOVd iEz3ImRbxyH3IzvEbztmnHB5vt3CpyZPiW6K661z4rNT8sVbnPd6YyP5fOPR 7QfoI1JIe3vPJhVbZ0tjaXepyv0E3023noT/b0+i5OMbFMtDUJyRYlDldvCT Mu9CyvST/e8T58/h3MFP8cnBz3CW3rOWOSt4DHlhUyiJmIc2Zhn1t9bQmnQH Xal3YWf/EFnJj9Ce+zmm87/AUuYqbsd2YcEpC7MljzBX+gjzZQ+xUHYfc2V3 MV26jonSVehKljBcTOwsnsJAMeXQ4n5a7RhQ1xH31ejNuIkLxiIt30GCZRtS 3PqR5j+MjAgd8uJ0KE0agzZjAvU5k2gtmEKnehq9ZRRKKqlxqJrDeM08Juvm +X3zOWrH55sXTbBIjP45FlsXid9sLdD7Bcru88T1ecwSz6faZjHRNg1d2xSG W8fQ3zKAnqZOdNQ3oUFTyU/I6oI9f8jATgqVcEknxndml2IrPJWYZYqX9MlQ PJW4hY5ez1F6Y7gGC1uMH8E3oRrFRUT7vGJUhbnyBM8FS/T2GJ5cIOLIHkrw u/fqKW8YIhhUnz/69bvwfPFD3DrkiOwL4VC7ZlClVoaSZA3UORok5Gi42PNT XOz0h5LqAdKl0k/Q3FEomh3dfUjQnJL74R179BsBBc299YYkwm7BDzvezoZr cAlyk0ugjk1HidUFvaIzmyBsEfbqjOL/JG4JSFOWk3uI4HuOE8GPcYIf58md Snpq5Y+9Q23MW3v4gRT5ey+F3DKbCvMXeSuC347wh/XzR6Ha+wE01k6E4EhU ZKZuki7nkvjWYq+w+VumdIxdcrejq9TAF1+u6QU1HNzVuOlXjBzvYuQ7JKHg M2ek7TyhZ5yvvWydRAsl4toPDerpvI2RRb3SsbCPRuvodvp+39mrV0d31Mvu +3GtYCG7H8hl9w1S1acQ+PtTKDlng/LQCOSlp3F170D80kh+309IVdMxz+3/ gBP83MHztC7gLBFdRYzKCp6gzmsWJVGL0Mauoj5hHa0pd9GVfh99mQ8xmP0I Hu7/DXXuXzBQ/lcsV/4Vd4s38DCtD+u++Zgvf4SF8oeYK7+H6fINTJTdho4a 7OGyBQwSIwfKxmhRV1xG1XxpA5G9FL1ZtzaT/J8Q+VkNEhx6kew9hNQQHbJi dChM0KE8VYfqzDE05I2jtWgCnSWT6CufIqJPY6RqBmM1M5iom8VUwyymG+cw 2zRHX8Nc8xy+Tayeo7p9lq/ZlhlMUxafInaPE7tH26jRaBtHb+swulr60N7Y gcbaevkE1D9wmxNbrj7gLgUMjU2RAvRZXTjhBHGRDK7v4hzMVeMYr4noP9Hb m3jcqkYR4zd1y9pITyOLE0VFw5V4vQ8HdpmKAeE1Q8A/8B+nYPOfpxG64wZS PwhEnk0yCgLUKIzToFClRWq29smpgVDS/qEQc+d9g6C4UDM2Ggw6Egz3UPm8 5xAfFhzeuVtYF1gIzynDoMB3k2j7ztfSiealyEstRUl8JkrtLjORRE7wADko ZD+Z8FuB/yxSO7H9JDH85J4TOLn7BI6ztUswnrH9OJXyx3YwKpjK2lkYEygp VLEp0VcNP8GB54/D58XjKDp1ERp3H2iT4hGfksqnBIJtXpJtHvpdRIxp5m+b 4vCbO+kbdtskjquk1T3nS+DgVYLYIPqI/mUock2D+rIHsva/y8jNdisxhtMH 3M7PxNfh7yuEH91xmD4SW4zl+3H4rZ1cA5UrWxG7mSq0YHig9D8I4mK8e6gl C/7juyg+b4+yiCikp6YbhOgdhBq4wnKeyh0Uhn+Gc4cu0LpIqfwCMXwUmcGT lMbnURK9DG3cGuoTN9BK5XpXxkNi4iMM5j7CCKXwsaIvEOj1BSpLH2Os/n9w t/Fv+D/V9/GX/CE8Ci/EXOUDTFfcxUTFHegqVjFUsYiBilkMVFL5rmF70rro Z+rXS8vQnRN/wViA8ju4ebUDCa6DSKIzSgvXITtWh6IkHSrSdajJ1qEhfwyt 6nF0lk6gt3yC/sVJDFdPYrRmCmN1Uxivn8Zkw7QJphqnidtTTVOYZKt5ChOt kxin6nyU+DzcRlmbVk+bDh0tQ2ht7kVDfSsqKrT6B3StntCUMvZtEDZGm0zP hL7cFml2xTT3grk+abBwnvmBdC4KhEtcNfIZxQvLoL3ph+idZ7DnuVdw+LmX YPabPzCnEC4GanfFBa/9/ATO/+IkPF++iJtHvaC6cgvZHnl8n3JeihbpmVp4 JVXpFctFt8DvAQiR6GCjZaC4vxHFFRdGTnHTwzAnirNZ4P7tOyXmpWGSlfBl 4PsL9BQP1BsmuYSUIS+tDKWJ2ShzvMbngmxrf5CJMLth9/z+Fyf4KUZs05NE 8JNUr580IvhRnNhpRiRn+W4vN6fytN3kAGHC8+fX9KXCyedPIObVUyj/zAaa oFBoMtLYIUw4y74vfSBkJuW7BN34Qz+MY0eJ30fe3mUomS1EyayMxBQXlp2f lsHBpwxxoeXIDy5HiSeFMQsf5Jm/v4UT7Yd6GwpfaQLAK2dOcSHAzuh9fCdF LfpgR3fsx5F3dgstRUZvSz9ub+Km+EzYCp+JPawHe5mofckJpZE3EZWQyuWO TTjBvya1rRWKS68JOqaXgzejtwnn9v+m/C3YnRU8jbzwBZRQga6Jv426pA20 pN1HJ+Xu3uyHGMj7HMOFX1Cz/QUmSr7AZOkXmCn/AnW1jzHT+Rifdz3G31oe 4X/KR/FFfDEmKjcwqlnDkHYZA9o5DFQRF6vYRrRu+pnYXVGOi8aaxv+Im1a9 iPcYQWKwDmlROuTE66BOIWqrKHfn6FBfoEOLmvhYqkN3xRj6NFQSVI1jqGYc I7XjfCOMCXT148RNXeM4dE30u5Yx6rjHMNSqwwBxuZdWJ6221hE0NQ+grqEL FdoGxYqFa21dUSQimHqht1QvFB6GwrgugIuhCWcynrKFONyPjWQ0jbULhZym bXQVsqkf1xSVQ3MrCOZbX8O7v30ZH/zxD3j/9y8gaOtZOP7XBwjd44CEj8OR ZqdCRmApMik5p6VpEJyqFZXCJt13HkK4oDWx+Vkp+i5kjvUGBC5C8N3XWXom 6tU0PWBuekTPZ2U7oKORexUf/RqN+/RuQ/I+g0tYBfIyKlCWkotyV0uDe5Uz 5za1/U9zXrPG/xSx+ZTpKWI2k0BlvP4aMZtYzTtyStu7WH7bZ+ysYcIPRoWo fRA/JGPT9edPIc30LCqs3FAZHYvy7CxpxCcNNhxl+tSbM3rqDQ6O7jjAqW3G +MUdDagut5BFskyhBj17USDv+rgcDn4VuBVegQJaZb70USnNFp38WN7eEJHG hDP8u5Jr4vje3FjDkz4acXsXcXvnQRzZTl34dYMoJZOQVpwUGLf3P3cGYa++ BzVF9+LoOPp3QjinQ/AraXkSLM2eDD4ywkWBcdtHpm5K24cuSXLroCJy50Ys oDhmhci9jrrkO2imwryDyN2T8xD9+Q8xXPQIo+pHGKeOe7LsEaXoR5ipeIjZ yodobnmMpcHH+O+hx3jc8znGtUTuqtsYql7GYA2Ru3aS1rDcj0Lk1pQp5Fbs G2JsBxDnrUM8FeWpVJRnU1FeREV5OZG7ishdR+RuJHK3Erk7yonglURWrQ59 VUTcalq1OgzW02qk90069DfT37Xo0EPE7iJCt9JrE/1c1zyM6oY+lFW1yqeF /sGgdSElx+wtfUSiZsy2lcy2D5COcYLZTDXPm2copvj4E25qIwQXDVKkXi5+ XALMMqIKqkIt3Ow9cPKl7fjw9bfwybY/of7EGyg/shUpVxOQ4l6IFIJPSkIl wql/5mM9GxlRFFp/abTHa4PgLZzT3zNis4HRXLZZ9vae1NubU4Y2Mz2Iw2yc d92wFYhnLsXk/e9414i08TT3D3MOo+JBVYnytAJUeFhzJgdt4XT+HucaozGn 8p7T1GufoiWTNOu9d1PPvZvh/YAwKTMqA3wkj02pLPV84TTyTl5FuVsAKpKS kZSWxf0hAvGHTXw2NitRbgnyuwTEJZYr2VYAvueJLizn8o0nuRzIvSkYl73t pTfFiWLYB2hwK0qDIloVgQWodAhF6fufwpHKZUO+FnnThzuUiEHGMf7ZDksu K3lamAC4GHH50G/eQ/ifPkQhnZs6Jl4vCy+ss35lJP6vOKIYGQA4+nJfjnMH z/Ey/BPi88eMy34GLqtvrqCSEnUt5/JdtGfeR3cuNdsF9zFY9AAjxQ+gK32A ifL7mKy4j6nK+5jW3MOM9i5mib9t3Y/RX9GA8erbGKmhRF27hMG6eQzUE5fr icv1xOXaBvRrShUum/OXHyLSYQg3fXRU8eiQTFzOIi4XUKIuydChkrhcnU/J uoj4WEIJm/jcRnzu0FDiJS531RC3icddDbSIyx3E4zZaLcTdRs5f+v+bRlBR P4CiqnYpwvb/4caTxlR6yUA/zmFXaU7FsjOTCxRypYFCPPfHXMyZq/Y5CeU+ Lj4pvdFe27od7zxvikMv78Xpbab4kK5qw4X30HnNHG1X3sH/PHiMqPgyXKdk t8mqVC+8HmCwKmWZWU7pTBTtd2fpMikL/iD2aIqewlJPmDvYGtp4M9NDOLLn AA7u2iuMByxkprqh0Fjeo9lszCZY/BUePZjpilOYBvlZBPCMIlR62wknwGeE J5aex6f1PD6ucJm66xOmxOM9R3B01369v4sSLNiuIvOt7yKc1Z+fUmsZGIHy jEz9rX5R2jMu/+7v8FjkZZYXmccG5/HOAzBjQ0Hp68JKbacbvsL+i/PJyN7D yGNGWHzQt0vLLlCLWzHE55saaELV0LhGoOKTiwiic1T8Pbi+vTGPdx/mdxv5 QJJysmLm4cLNPAJhzji87Szy6dsvvJloLBhNR/yJfibr4xSs91NgXjLebDkZ VKLPsrtgB8/zVvqjA+eh8h3lPM6JmKfzXUF5whpqUm6jMeMOWrM20Jm7gZ6C u+gvuouhkrsYLb2LsXLWMm9gUrNBzav2DhW501XrmNbexmT1GsZqVjBSt4yh euqmGyklN1K93UjddEMnBuoa0KspkSwWnl7PINRpCFG+OsQQixOJxelUbucS i4uIxWXUSVfmUWYu1KG2mNhcRuykjNxEGbmZGNxM2biZWNxELG4gFtc1MdbS /0Pvy+h36tpBZFW0SwXkb+DGeXdiryex1xs2lkIE0CC95q+wV3gnfUWSWCxP unaeQu7QhOtfPyNV13zwyta9ePsPh3DwjcM4ueMQiq9ZosnhKrrdz6HD9Sis LzjB1sglllfzVqKa19tQG/sMS/L68OEbo/AzvIw3GIYYmYY4K9awwrWBSZEf prx7iEgrDHPceXnpKH27FCc7D8XJzk7aiendFL9KrOXuDHw5hWuRl61BpaoY Gj9HkYOpvFTs7PTUpXXCVFD3OPXMx00pDZseE9TdfcCIuuJYl4i2CbvPoYS6 9tKoeJRk5bJZOn3q7wuvMOcg/T5cbo3jJGm7yZ3EnWij0NZU6Kzr7ZiEN51w 5Qk0pq0J584Wg3mfyIZ06B/AmtgbF6tFUZwW2vBiVHlEQ3P+CmJeeVefDZkr xdHd7GMd5rcRNslpSyOU4//1HiLePoc8utT5scnChkeyli4vP7iwnvh3nnGF 9USAdD/xJaSJy8nvXxFjP9z/GVQ+I1AFTSI7Yg4FN5dRFr+CqpQ11GesoTnr Ntpzb6O7YB196nUMsl3fpesYLV/HWMVtjFXexgS1wZNatlaJqiuYqF2Grm4R ww0LgqrNM7TGaQ1SadtBmbdBeZzsuFRMC6PEHxGmQyzxNJmyrYoq51yqnAsp 2xZT5VxGlXMlZVoNZdoqyrRVlGmriKdVxFNtHbXQxNVSWmp6X0C/y9YOSm3Q bwgbqctSqNByszinkaqVCU+vP+Hii8zb7OjhKzh+5CqtKzhhxt5fpt9d4gKM Lz13AH96xQx73zZH1GU35Du5oZarFVugzv99fmCbi66wpVbbzshc19lGGgUw c129R7x+esbdTqUMrw/vMNmf3xOq0szGhtflfrIulxYBUpWU8fIAq4mvKlYu ntLqz9dQi9uIZG5IqEq59nOlHhezcVoO4VXIy9FCk1UCTYCL3uaPceekTKns 9Thfkpt7qdvdexTHWNe925BWd1DL5/z8GWQeu45iijUlCWlIzsjTZ3F+XPbe WWzZ92cPzDNyfs/gXPV36Mk4coTRk/NEcecwGBe52QjpeSWrGhw6BDe3cG4+ w0+DVaqWQVWIvUUcjdeiKqoUVd43ob1sgfhtp4U1B11l892HYEYVg70iGi5N ik7+mni54zNkU92UeyuFy90bGxWZMNF7E374X4obITweG7xhFBcOpUD6mG0q OUDkdOqCymsIqsBxZIbPID9mASXxi6hMXkJN+jIas1bQmruCjoJVdBetoq94 FYOlqxgqW8VoBdvAuQKdZpnv6xqrWqI8uoixugWMNsxhqGkWg83TGGihkrhl lNYAEbQTPXV1CkFPytlVEJEz9CYRNJGSKZEzLVOHTCJnDpEzn8hZSOQsInKq KYkWEUELiaD5tHKotVVRUk2vHMX/4v/Wr2DBCCl9tayZcugNg3IoE310kqKP x4h9J2idMruK0+ZXccb8Ct7j6zK9v4x3zS7h9JGLOHX4PH7/qjk++8AbvoqO cpgnyiJtEechDLOtP2Ni60YexDee9CA2apGNjNUFLX/ELRG4m5SzdJTiNbah RfbgQvOeREUhNL+fUpMyw1b2uTnwqk+kyk3+cnpTNwELH2bJ4Mf/IGJ8jdPR ntExrwqanFJoQ9z0LoeUGk3oj9PUQXAm7j2FY3sFE48RE9k8W/Hv2kfFXuAf 3kPeWQeo/aNRnJbNCMAPRXGPG9M4KQFAT0SDh5y08WJOYt7yjhjbTcc8FdlW eV5jSuMkpWcU1l1itsuTpWIcJ+X0fRgnmDfJFn2ZKUZ+jI7f5V/4tcAqxBAh CxI1qIohUvrFQXv9BlJ2nIQZkfEIHXrnj7fiPC1HWqd/RUTceQGZdNjsW6mb /FA8uWUiUdKECT+b8Jro3zkLvbjuLWOhH2eiEl35HUe6nB/sO4cM+3ZkePTz abIqdBI50bMoujWHsqR5aNMWUJe5iKacRbTmL6GjcAndxUvoK1nCQNkSvwc0 XElLs4ARLa2aeapm5zDSMEMsnMYgY2ArpcjWMVqCiX2UKqW8wmmp8+QTqUPA LUqVVMbepDL2FpWxiVTGJlMZm0osTKWGNIWYmEjrFq0Y9TD+WVH5JsZZEuOs iHE2xDhbQuGRA5dhfugqjkqmnSamnTFj5r7vm18xwQdEsm/Q20t43+wizhw5 j9OHPsWBrdUwfc8LV62JEt4BiAzxgI/PFeWOMNOEt6a8Z6OIrm5qZEUpzJim mMvLRpa/PsVrlR+Iy6CX3vaR8sOeUvrelR/JVtlFyhyi+P4SI/dGuaeMR3+j 4ZOPkT8T9a6idf0ub1xtw6uRywiWWwZtmAeHvGgXDTmOMevovhM4to/Ytc+c z6JYg3yWmBWz41MUEPQLIxJQqMrnnjtUjik0NuF8+j5/CHUTo6Q3n97+yYkY 5ejCc8xB9hD5FSPnKWNbFb0hXqAe2l4M2KII5Iz2Ne7ajGzILgVoqd+nxjmp EtpYolRAHDQWN/DyL3+DT3/8O/j+2x+R9NvfI++1rXhcmIfMW+nc7YpZuSie Ph6KkLoUU1daDC9H6V/wr9Kk2E9voqIPj3QBk69XIc26DemuvcjwHUZ68BhU kZPIi51GceIMKlJnUZUxi7rsOTTlzaG1YA4dRfPEqXn0ls6hv4xWBZWWGspg 1TMYrCUONUxR9ppEf/ME+timpDYdXYX+tlGKLj0t/Wirb+HAkZntAyl66pw4 CreUEbilDksrwu/j6mUPXKd+2YK+8YP7L+HwwcswO0Q1INWEJ6kePE314Hu0 3je7TPS4TEQhiphfxPtHLuC9w5+hykcNrZca0e+o0GqjxuM/P0aRvRr59D7T ougpSWcmoW195csK+c6bu0YjujDDUw+2L4hpEz8jvl5nP33D+KREvq2do6xF HbiDmPFeLMcnff42uZ3KGYSToYPh+7KMFxVy1mHVyMmrhia/AtoIbz6wZaQ5 RoQ5RqnoKCfMcVrHaJnhteffgjV1MElmFsgjLubHpSMxvUBflVEqEPa1wr9N ORQnjwmfIn5PskYOhqWfo6fepcoFh3fuk54YijuV6KAUaxdh1CWQLEyJxOf1 4r0bO5OnNs07vBmiGXW+Ix1dhJPhOd9KhMVXICepDBWxxTj0412w+fVBxGw7 gsKDh1B3ajfqT78kXYj8pR0Hd3TZYrAh+jkvNoT9h3Q9MLqcQnndkwoKdzg5 OgsZPosmpDp0I9VzEKmBo0gPH0NmzDjy4ydQnDyJivQpVGVOoS5nGo3502gp nEa7ehqdJdPoLptCTwUt7SR6a2jVTaC3cRw9zWPoatGhq1Vngm6izRZ6O4K2 ph5+SJmEnCU5IoNzuBC16b4L2H/gIo4cvISjhy5RArmEU7TepXWGL5YzLqAh SI2mAGHzy8zRfV6g+uOMGmP0fjE6G1XMkNpRjTIiR9H1Ir1qvtSXN1bMd3xC jFgI5j8tRLxl3+YuRfNNuBzx0/TlSTFiI9F8JVdZnbeThm4MK+5yX7Jy82Sz 9aTBA1PsZBJR9g9iq4Oyb9FZ3Be9QbzILqiGtoB4EeVDZRjjhMKHkzAnTpjt O4o3XtiOQy/8CRkfOCDHOxq5ydnSbihI6eglL4L1x/FTtlc4yaGN3rVNzuT4 hilpMiltDT2k3aYNHxiJz6p3Cbvhy7OK4Ib0i5GflxVLQVv4R/4p/9Cb/ZYU /0CRqJUSmE2K3vcsw0u//hOO//IMXN76BInHPkPFuXNos3gf3VaHuM8RM4rh F9NYjV1vURDIBdnFBeVOCPrrKZXY9X739PkUffREqw4kuw4g2XcEySHUpVC9 lBWro+JRh+LUMVRkjKEqaxy1ueNoyJ9AU+E4WorH0VY2jo7KMXRUjaGzVofO eh06GnVob6bFSNHOSdFGfzY3D/CDSX1KJ4mkmJAc3AovQHyEGklSwDZfcW+n 31WFq1FHqzGMSBCiRluwcGbvpGWCLqLINxD+WizarNVYiaW/96f/jmlLe6tR 407/v5Ma5VZFyDyXtUVmD8uLBu18G0s/rgZubL7wpHiwiyO3yyZqfIX+VMSD hQmDAxMPdvJQHAD0OOGWagpOZPWh3/3D0pA9L9ocBCWkQ7Fw4H1GjDGUcYY0 x7IIrUEWMUNTSLVHtB+2bX0de7e+BrPnXsGR517Crhd34sTLO6G65ImskARk pxUY1TgyUktWeEub1WD8Uc8Ivr9QX/NI519u9Om7yYzLw9mVm3062dnC6lMH 7p1he5kyJr+F6i1voUoDGcXaUXroPVn/sHNiFayXrGQVYiih3F0aaLjxAsid Gcjg5Z98gOOvXIWzmTUSP7NDha0N2jyvocvnQ/q2KdpRhe4gUweRxIQz5Cm9 +jozkXFldYArv5zCHMTP4CHDhNed3J+Sk/Dos1rE2/UiwX0ECf7UHlAznxpN 1KBWIj+JmnZq6MuondBk6VCdq0MttRMN1Eo0UkPfTM18c7WciDfo0NQk7mM1 svvRreK1vnkYUu3cUdrWxCre8ZGFXNw5M0qNAlol9F4TWYwa4kRDeDFawkvQ HlaMrpAS9ISVojesBP3hahMMRBRT05J/Kg8TgWpspKvpr9ToChW0aSF6NBI1 6tyo0LIrQO6nGXpR/uuXPLhS/g3ihbWlGC/Y0ddoT5fRgYDrSN+hI5vFOzmw B6icHP25H4mxZK8d1RTMd+Erys05Y4Rc8xBbZ/huOOlIK/OEm37gzuso3mFu 4UHzBxyZwgw4UG+weDW0GirGhqJKaG7649jzr+O937+Kj176Iz784++RbhME VXQa4lIKBef0fsyGOo2xQbEG9xHkY/t16AjfkMfyN9jRyTDtIcO0mzP3FjWR EUU/JLniye9DKiYyChF42jWK1IwMW3gT9xU6HXlLQ9Yxsiw14YXMj3m0Fh2c Gz/Yyz8/jwM77WHzgQdirLxR6O2J2lBH1ISe12d8Oz4X8uduYo6UmZS5kOIo wwIaC2fOtJxkMBNq6F7MUQZflVkh1r4fcZ46xAXqEB8ubumqCPq5BP3CNB1K MnUoJ9hrCPZVBPtqgn0twb6GYF9TR4tgX03ZoJqyQU2LeNU2jUrXDAf+8hPE hWToHetTIosk4otRRksbWYq6yDI0RZSjLbwCnRGV6AmvRH9kJQajKzEcU4mR m5UYja1A+LYQNFmXYTWxlGCfhKGbxfTfqNFHzOkON8C/ybMQtQ75ikXa9ate sKAvzpK+OCsKHDbWwijcjq6ZHfURdvb0ZTrQz2w50nVhsrZbmBuC3rjkq4oC vx4GbKOYl95LlKPdyJSRz8vYlkQPpUjYIreViIGKCY+E/6i3Eb0cXI30gipK 7J44/fIOfPzGdnz29pv47K2X8fjOjISZn1G8lWh3CBSViIlhUP5tfgSDubb0 q3M2nsZ5GRmWuhLbHYx2trqJm+3SnsxgvegnvfNYfekvgS5vDTzFezA3WWK6 KxXJV/QVieIN40z5xcHB2UTGo9dNnfHJp378ZBOC/HF151Fs+9MRvLnNDG9t M8fb245i+7ajJthBb76CnW8c5Q4x2183gyMd0JHikyM7mIMTe9TbgSuK0ylT ePq6HM5GOg4g2kuH6CAdbkZQfL9JpU8CxXd2F4XAXUjgVhO4S4opzhO4ywnc 5VW0KKaXsTsnDaxTLmtkNU5x/ageEDKmC4XWnyI2KAVJYVlIjcijyqqQS43m R5WhNKqcqtxKQrgWzZFVaI+oQXdUDfqiajEYU4fh2DqM3qrDWHwdxhNqMZFY i3TzAowGVeNRnpZ+1tDvK6CLL8NIXAkGbxLaiT1dFPDbA4vQ4l1ASM9RVNuv UEFylSB5nSKTpbUvbtjQYroXVvw51Rt29Gs76t3tPOlKK9se3TZtrjA2AxLl 5+ZmW06BTfhQ6l9kYg+Qy3+TU/FrW3dh+wv7cPjVAzjz1n58snMvzu/ZiW6L I6g+/4o+fnLi2OghxWLnFl5BPMWZozekE1s6AujaGmprXzkEU8oID94RMi/T p2WzZHVB3H82thjj9aDejJE1RF+uIdyUGuKrX6ohnHi/5Al7R1cpmfvPeO09 Z/zuP8/h09d8EXPEEtEH9+AdgvAOvo5iF63dfB3DHuW99GTZ9foRAi0FJUdf Kant9S255z3AoQthvqMID9UhnOqS2HjCcArVKFSTqHIIxwWEY7UOeaVUr1TQ 0tLPFJzzamgRhnPpNbW8l9/wM4GfPzNnCaTuMoQK6HAfNSK91IjyoEXVQqQz LXv1u8bQ/lckhWYgNTwH6ZEFVLoXIy+qAiVRGmiiqlEbWYemyHqCdSPBugn9 Mc0Yim3GaHwLxhJaMJnUgqmUFsykNiNqtxuqrjdgObkRX5TUYCatDtOpNfT3 VZhIqoQuoRxDt6jEiVGjJ6KICv8CtHrloto+Q+8Ly6/lFbmXQBoKilLwicmQ CMFiT8EW/Z4Cd0d2qfluApaDv8Otq17Zuh/vvHQYh940w+ldZvh43yG0uFxF j9dZopbp5gD45WNIe0Zixbc5JcQGpABl38KmOZTrl61KZWahOoo+GrsVe+Oa Udsis7yDUZZXfONY2+LMIMpS/NOiTHP2M7KN85QMYCaW9npbhX3P+cN3rzMy TpzSu7fuIogyODJYmsCUh1pTCrXcrIQZPFC4ZXZBu1459I8ycAcQHAOpVgil UBpFoTSWQmkChdIkgmMywTGZ4JhcTt1hcoXu27LuDaHsHBoiVhi9j6LOLpYK 2AQCZTJBMoXgmEZwTCc4phMc0wmOaQ60bOnvLQvE7TbY8ZefITEoGalhKmRE 5HNYZkVqUBhZjXKCY3VkExojWwiWreiObkd/bAdBqwO6xE6MJ3dhKrWL4NeF uYxOzKs6EXsgH33+HXhY1I6F5GgsZLZgPrMJc6oGTKfXYSKtGrpkDYYSyjAQ W0z1RgG6g/LQ6pn1E2WXCxvJXBUjGWNk6scyPG2yiGLHAo0yleFWhuwqsrHM P21yiXp56yG88dpR7NtxAsf3HkOBmzvqAh3RHHrVgH9pLa9gU1ShIpKKzLyF Y1QZAG0x5OanN+VmZSr6dQmZ64RGS4bGqz7ULPhSs0Blk5VxsxDAmwXm0GZC uZh1WiwbO/BOgTm0+YpU7OT5tNzHYLDOc+Yy5q8+S9/Wm95IPXrZyIxDMeIQ ZhzcD+CKy5csJB2Yz8F5B3kD5yl4JOrgQ+Wqn0oH/yzdP8iYHBFShCjKlMqK phYpntCXTOhLJ/RlBqiRTejLpWCYTy1TgSctd1ouauQ50ZJz6TxLqlmv5B43 RuCzSAlJQUZYLrfFUlHVmhtZi+LIRurhWijfd1C+70RndDd6Y3swFN8LXVIf JlL6MZXej9mMfkJYPxaz+7GU0w/1hVbMJfXiv7U9WMntxlJuJxZzOzCf04bZ rGZMZTZinJA4klqNocQKQiGrevPRFZiFRs806Tr8LQ5Ddv/Y6vqX7x/z4YeM InL4YcLDyI+oXfDn7YIy+3DWtws++OPrx7CdMOhL/0uSnz8KItyRG35dDiAF Dm2Vtlxv7BrAM+omVzTRl1NK1ffmLvJQhpzKZ5DfUrpVytrXCekWdIQbxCdr fe3uD1s7pXYnPNs6sPKPZU8baUjxFeU2whNmEUxu+7Vnr+K93/kj6oA9sk8c FGYUipD9NZbRXbn9ExOu5yaNV6SA/SVHOF5w+DfZOt2khiM2Qi56H0criUCW TiDLIpDlEsAKKLypCWAlBLBSAlg5AaycAFbuqkYZAayMwlspgazMml4tilB8 Of+YAJktf/k5kgLikR6igiqMikpqjzIjapEf0YSyiDZURXajIbIXrdH96I4b wEDCEEaShzGROoKpjBHMZo5gIXuEgDSC5bwR3DRLp4w6jLvqIfx3TRtuFw5g tbAfK4W9WMzvxlx+J6Zz2zGR1YJRCn3DFPYGE8sJbIXoj8hGR1D6/5YzPQvC meUVb75Pgd81tRR3TVl8cKDL4yjjg2IAxOYJYprAMjCbJ3xn00ThlRf3Yfv7 HjjPykAf6lL8BMssFTwr+yFkVuR4FlnRhKfEb+pbX2fj1pebqbKsuGmWJ139 vokrV9xx1ULUyxZUiYqa2Y/VzFQs07Jni4pmey+ZqL+xSV7ZoKIu7Fve/gXV pDs8kX38nAmXUd8irBEs3BQXCAvmuK7ouHNLl2tC1ZkJxLtcdoDzRbufydlU VHA24qkSipcefPyV0JZKSFMR0nIJaQWEtOIgI2tLQloVIa2akFZDibTGTQxJ q+m1ilBXRUm1mlBXbVsEjUWe3BEq4fZvSA1MhCokj/75UoJbNbLDG1EU0Y7y iG7URPajKWoI7bEj6GWKyslMTXkck6oJzGRNYCFnAkv5k1gpmMRa4QTSPmyl vmYcf64dwzq1V7dLRrFWPIKV4iEsqQcwX9SHmYIeTOZ1QkdxboQgN5hWhQHq 7gdu5qE3Ih0N/gnUXQnCKW38DdbGEwZYOGBtPAsHLBTYs2VPy8Gft/M795zC TtNT2GV6kl5PYMeeY9xS8c1nz8Ll8E1kuyXC4pLjFiXlcUh76SFtbQRpZT7m ICEtUt5XN6U8YzjbOHhQ5Sw6UCsLWyMVfCnJLXXAmer+tmfdcPkViq2HbZFp to/AISW5LQ2vQor7a/TeTViH6CXBhWW56xV7OF+y/alMh7EhWUiMKOTT9uQo tQl/802kEXayCDt5hJ2iUGbFQpgh7GgDhIdjrW8x6n1K0OBdTEds9OFGjj7F 3MSRDdvrqThrIEw1uBWhwZEaT5sc8VgAbPjLL3DLKxLpgekEIUJoqBaZYQ3I DWtDcXg3KiP6qV8YRjN14J0JE+hLnqIIM41x1Qyms2cwlztLUWiWotEs1tSz uHkyAlqnSYpQM/hr6xQ2yqZwp2wS62UTWC0bw1LpKBZKhjFLUJos6sVYfhdG slsxqKrHQKqGoqGaCr8MdEQk/kzW2Neox71O5bwl0f2GlaC6NVu2lFjs/LB9 9yls38PWSVon8M7u46xINuF2Z1/BO89aI+RMPPJ9bnFPQO4TesFRP1y9IsdM lK4UfNrYSIzq05WfCZ8zPUXpyk82ez5s1PSszFgGJXVHvZo6M0xwtBRq6kyG 7sh/BSPE1BMFJz8iSEhZ5y1cOv0bXJueaThzi4obCl6c4U5YcbvG3YwJK9aK TzubyaVKz7JUaTGYRiuLwJIfXgJ1WDHKQkqhCS5FdVAZ6gLKiZUVaPKtQAu9 tgZU0PHbAsupdmyjv28LLEVrYDH9nhaBqtWniOrkQrS65qHJPks+FKZHTLJv HFSBOVAFlxNqapEV2oK80C6URPRBS2ippyaj5dYEupKm0Z82S0FiDhPZC5jJ W8RCwRKWi5awWrxEwWUJsWfq0RuziEd1bLXibuU87lTOYb1yBqsV01iumMRC 2ThmCTlTJUMYp7w3kt+BwexmDKhqMJBC5X1iLrpvJv9CVpCX6du9YuWNN7Yf xxs7aO08rjfSsnvCSMuJQGL2CzfEf5qEwoBove8lc6azY3eNzjsoQ7YrVz31 ecdSn3f4rIaPaljuseJ5hw1rPH4ur5WNhY2U3jYo7XP5ba6ZZFABfvvnVJm/ FYSs49ZCplBxNON6wEyB+OtS+ddTQEXKfXtYCgtCd4IJU//9iZzfpkTk8qlW OuFDrGKOkcyIEsJIGWGkDGWhldCEaFATpEV9YBUag6rRElhDmKhBe0gNOkNp hdWgiy3KLF1hVbQ09PtKdIaUozO4BF0Bhej0yUeHRw5anDOObIZKqg/lJvov VEEagksDMkPakR/Wi9KIIVRF6dAQN4G2xBl0p85hIGMRo9nLmMxlyqBrWCxa o7yzhtula7hTvkYV/RRmctfwl85V3Neu4p52BRtVS1ivWsSadh7LmlksVE5j tnwcUwSX8eIBjBR2YzC/jeDSQP8+BZhUKosSU/9dQsXQ3/w9zyQX7kum+CWd +70/Mq8nQx0cLD3cXHiZ6cjh4gj7zxxekDHLTsqtc9Eo/fUW8pcGuXUhBfvR H8IRd9gTRWdOcyXaLVyY8psGCVrrzYrPQvvVGR7XHSg82ML1qhU1A2KimRKW iXRumlTEF/NBy6A+WxVZjlzqdorCtSgLq6ZrXoua4DrUBzWgKbgRrSFNaA9t Qmd4M7ojmtET2YzeqGb0RTfRaqTVQIuIGsX8DqvRE6FBL+GnN7gIvf456PZW odUt+bDxtf93pPmkQeVPRydEqYJakBnchYKwAZRFjqI6ZgKN8dNoS55DT/oi BrNWoKPrPllwG3NF61gqvkMJYwPrFRuI+bAEjcEbuFOzgb/0LONB9R3cr76N jZo1rNesYK2aQkr1Aha1s5irnMJ0xTjGy4YxWtyHocJODOZJv21VCfpTM1AX FQGlIeCO19JeR18U3jCy9GE2QhbCxcedQGDzThiKHJJREuIhPcBcpMs1M4YX hlnUb2xV5GSuW3EwMNlAg4LYk3Lc3no57h3/EQ6fPcEoPGPBZb/9tnBp0m/q VYF9bAUquCKwtYd0BmaIcIKHBUWA69Z6NGRQ+a9iaGCz7cgSWqXIjKxEdkQV CsNrUBpWD01oI6pDmgkJrYSENrSGtqMjvANdER3oiepEX0wn+m92Iu6Nj6Dd 8SEG4yj0xrXTaqUWg3nmsQEiJe9o+n4jqO0IIX4FZaHHP+0JNKR7Z0HlV0bR oJ4Q0UZo6KWzGEJ55BiqY6fQmDiH9tRF9KiWMZSzBl3eOqaKNjBffBfLZfew Vn4f65r7iD9PVazqIb7ofIAHNffwoPYu7tdt4G7dHdypu4212lWs1CxjkRAx V0VlimYS4+WjGC0dxHAxRYNCpjRYh4GccvSrstESH4mf/z/aBDu9V/OX/c8p I+z+xcfwOhKLEs9kFHhelOHY1WC8cl22CFcc4HTB7jmZEewsrAkEdnrVZgcj 1WYuyC01Y4U+ux92/NIX17ZFIu2kB4reO8q1G4VS7re4nJ1eO9bOR+JE4MPT RnGOdqblQKdm+0M5iEsPy4AqIkfCo4QHCFWElneqeeENlByaURHaiioK13XB nWgK6UJrWA/VZb3ojuqljN1HdVo/waAfoXvikHfUA/2X3TCSSNk5sYdWN3de G0wguNyiLzyuEQMxBBE6zkB4AQbo+N2BCYeegIgXnZFvJcFEmKJmB/cTREZQ Hj2B6lszaEpeQHv6MnqzVjGUu46xgg1Mqe9hvvQ+lssfYK3yIda1D1HidR/z mi/w34Nf4EHdAzysv4/79fdwt/4u7tTfwRrBZKVuFYs1i5irnsd0FVW0leMY LR/GcGkvBtQdGCiihJFfif7sXLQmxUCUej+gzsBmk3uHsZ23i/Ab425ArAPw 5OY8ntjz7zaIeD+J+r1k4UL0dx2IRFfgQl2B00Xb38j5qx0dzp54rYgo20u9 X67RRFUx1/JnIi6EE6GQ5g/z38Yg/HAwSj66zDV/Tbji6Lf00ocCL1Jj2EZq DEvtQe6ebGVH/+6NH0isqBhWwnPkyKyCFoVzwkgWJYsC6hNKQzspjHSjNqQX jSF9aAkfQHvkILqih9AbO4z+uBEMxo8QHkYQf7QWfcEjeFA6Al3KMK0hWoPc v2skuRdDSQwzbRiIJ7zEEl5iqK2MzmVGPk9ixYMaXm8tVD5NhJUu5AQPElZ0 KI+ZQk38HJpSltCesYLe7NsYyr+DsaK7mC4hXJQ9oJryIRUMjxD1WQ9aE/6C jY6/4PN+SiwNj/Cw4SHuNzzA3YZ7WG+4i7WGdSzXUzFSt4y52kVMV89iXDuJ 0cpRDJX3Y4AZ55Y0EV406M/LR0tqtMTKP0rXFXt96SfsZaTjJesUFccq6ezC Ur35r7yRdCkdZeEJXH2esoA1u/UvHKykYa0s+dx4F2kHPViuM7A4Cj8PReHK QkjBc7BwKXg/ocMjFX92/TocTrujkfu+69NcZeubQh+Wa9NKXVo7oUsrxLRc aVE8sbanf8oKz8iRV3oQ1XlUfajC6bJQdakKr+IgUYW1ICesA4UEkPJQag9C BlAXMoQmonVb1Cg6Y8bQEzeO/lvjdOEnMJw0gZADaaiw1mEhcwIPtH0YTx/H BK3xdOYCRZE8bQjDqX1U+ndhIInAkkBUjddi4FYxgUZF1UnMQWOwfBdpbhTm POmMvFsouPRQYBlCYcQYym9OozpxHo2py2jPXENvzjqGKKiMUVCZKn2A+fKH VFV+jrWqL5Biu04Vxd/w+dDfCCCf04V50PiIvvR7jQ9xt5FyUyPlqMY7WCbA LNRTBUsNzVTNHMarpjCq1WGwcgADFXTG5VSNlNDZFhaiKS36Z3KSYU1JQZSN jpuw4swVzIVBieJaIIxQ/oEXip++HIpsmyyURd+ELzdF8YIPN0KRZihSSFg4 lTsQZuwoxtjgvyRG7amEtLdw4g2RQTlJ6E8wgWEhNioxYyQP8fFrcYg/GYTS T86x3c0OgRRgFEU0RZ1MqIp763UPvZino60LYc+R/j1rBTuq4CSoQqk6CKOq lboLFdUlqrBWZFJLmUuYUYcMUjIaRnXoKBrCx9ASNYGOmEl0x02hL36G2r8Z DCfPYpR6iNiTbegNn8M96gUmVLOYzGRrmtYUxglPOpUOw6phDKQTdVPpaqS0 YCCZqoHkCvp38ihRxR/cHGhSXQqgcifseArsZAUPoyBiHGWxM4SdBTSmMezc Rk/uHaot7nKn7ikKMnMVD7CkeYiwC+WoiPgbFpof4/Px/0t4+Rz3CTn3mx7h XtNDbNBab7qP1SaqcxoJOw1rXLN4qnYe4zXTGKkew6B2CAPabgxUEnbKqtCv LkB1Shh+Ji+iLQeP/aaKgvUaigUn6zO43YRiwWkjJO9tdseh2C2HgibfF09c /7qRW/aTAKLMcJ1VmAp4vgN7ApM9FTkOVBk7XHc30udRlGr9/65S7Z6tsfA7 FI3is45MX8RkE34UdTspy2Mv5QfsCD/cqYwCkB3hx8ZWj5+gFKhCcglDFHeo Y1WFNtPqRBYlpDxKC8UhI6gMHUdN2CQaI6nniJlFZxz1HQnz6E9awFDKIkbS lhBkloNS2znM5S5TucA8p+gq5FDIz2EmNYSn7GnosicxnEVsVg1JQxoK/xkU /tMpWaVR/ElO34SfXyDFMR8ZrpSo3FupuOmhupfwEzmBsrgZVNHRG9JX0JZF +KF6d7DwDuHnLqao1p2rvI+lqvsIvTyD9pzHuDPwGAsdwxRrHnLc3GumuNPM 3OgecH8qhp+lpjtYaGT4WcZU3TzGagk/NUxxaxCD1T2EIUJ7hRZ9xfnP6otR G9mdKBa+0vVNb0pkcHZkusqs7DT99WfwOpaCMmr9SkMdIdwZviG12r0N5szG 8CFoulvYUqNk9Su5ScHm8nVCEKH2GiGIaWZcEwpPjhY+EkFSFcY6QCBIeQyf CyUG4fqOeGS8H4Cyc+/pFZb8pEEeg5GPXgqVTl2vYEEQspcQsrWFAUPpFIeI 6SEUf0Io/oS00c/sag0iL2QUJaETVORMozZiFs3R82iPXUJXPJWiSSsUQ6gc TVvDaMZtRL/bi85o1pveJuysYTp3Tbid5NEVyVvERN489bnTGM6ZxGD2KK1B 4XKSTXksm+JQFhXIGdlPYCjRNh/pThSDXCkG+dBZBY0gnzBUGjcLLcfQErcV 7yYMDRTdwWjJHUyWb2BWcxcLVXeR4f05Rmse4/4E4ajhPjYoX92lmHOX+Zo1 38Odlnu43XwXK80CQ/OEoRnC0GT9AsbqKbrWUwyqU/zLqOPTaNBdkvszmV5t rt0gHNnxPLLZ6UN0t9ztRjoHchF+WyGCb/obR4SfzUJ5WLbU/ffXu4QKT+Cv SodQz80F6g0KQxZW+LVsdO2v0rGpAbfXg8hLgIg9K85AZGUkLWSkpctlUV5K QMTxKJSdtxYg4rJlBqVNHyMpPvHANtVqTAbdgc7Fns7Fzvb78iqleUdSd6si LBXTqib8UBwK6qTVL65YyDjhaAoayk91UQtojqXMcWsF3Ylr6Esh9qfdwXDG BvyPq1HkQLgpoJaFGUfm3cEMlbAzBbdpsd+vYKJgEbr8OQznTWMobxwDeSO0 KKflUTzKo3iUqyE85aMvNfrA5rtFafZVyHAmHHl305kNIy+SzopwpEmaR136 IlqzVtBFiO0vWsNIyW1MlK9jpnIdAVc6UZn0GPM9j7Ex+Qi3Gzao5tnAnaYN whC9NjPTLGqumu8Qjtax2LSOOcLRdMMyJhoXoGsg1DcQjhqYVQ5zxmpEn6YC reosQx67ZkUgchBazBZuXNdezMueMKTTOyoIUXWz5wOReC2P6rlMpmNDl+yb UlTeTy8k72uvWMZ4CNlIa1bFOlCQs5FA+mfYUfNlf1U6eRgByclS0bYxBlLQ JiCZvhgDp/3xyPvER5HbE7rM35CybwFCLorjyEc69UgcOTjB3c5W3ELfgouX HfVbFr8usZXOsOWfTfiiHBdYS4uySWAP/TxI2NKhIHiSQjFFg8gF1Mcso+XW GjoSbqM7+Q760zYwmHEXI5n3EfbeKFpvPqSr9whT+fc4xmaoapmlzDNbuI7p wjVMFK1AV0g5kRmzFE5hoGCMqlW6akUUp4oogxTWUGusRr/q1iZsfRfJNlqk 2zcjw7Mbmcx8jWpsNdVJlYmzqE2bR3PWIjryltBXuIzhkhWMla9isnINYbar aCt9jLWxx1ipv82brjWqhW4Tjkwou93Gt+n9baw2r2G5aQ0LTVRfN65gqnEZ 400LGG0iFnAbpgEhoFPbgB5NmWzEfgK7a5TkriuNkbscv3lxfyzFG8tYcViI 9Qfi7GsxyHIoQkV8qrBBk/amiqoxw5avsW4hNy0XBa67te2vlXHwZYpPVySs rv597RU3I+kzASu29Z0/w/fRm8lIeC8SFZeuCNk3gauvczz5GMmPsUcHmUqk l6MrPAhTbna2clPFt3CN+sJrRKvrtCyuO8OSFruxaknrBkH+Bp2f5WVal5xg cdHxKwruPAl3vtT8+1Pj78/GMu20+riEeHbQOApCplEaNg9t1BLqY1fREn8b HUl30J16F/3p96hOug/vUxXIdbqPcfWfsd7xAFOFDzBd9AAzRfcxqybsqTcw rV7HhHoNuqJljKjnMaSmur54gjolqtVLqM4qofxYQvlRXYK+nMRNuPtnxFtU INWGcOfeRWc2gJxwHQpvTqE8kfq7tFk0Zs6hPXcBPYTqweIljJYvYaJyGaqI v2C4lXA38z9YpJ5tuWEVK42rJlRMrdJ1W2tepbVCsFuhtLiM+aYlzDQtcuev seY5jDRPYVAaAg00tqOvrg7tmtJnlWjCUEe1jT2vjkUr7sJd2YQBl5DOVwz3 hJI8q19umCZD7aVGRUKsXlM7wEmK53+NK+HqA5peYI+iiC1lIxs7BXS2l+wI eHT0y65CQOWaBJ2loigSsFnHwFj05x+w9/eJ8D2agJILHkLyjmt8CLksRfbO i8tl+Rge9HYi3Dk6yT2MX4Ml1QOWls5iEfWsaFmzdd0FNtddTCjes1u0tlfp xyvO+tuzNhedYHXB8SkJwQwPgqBPnpgM+jZSE0Yp1VfoFmQHTRIEZ1EasQBt zArqb91GS8IddKTcRXfaffQR/AazHiDwwyk0xP2VgsdfMVlIoa/oIUGOIFjM 1v9P2HuG1Xle6cL3hZw+mZPynTMzyWROclKcZltJ7GRcEseWLdvqsjoSKoDo HTZlb/bebHrvVSAQfdN7L6J3JJqQEAJ1ybKdaZlyne9cE33387zv3oCcOd+P xYuwDOJZ97PKu9a61z/hbqt4O/QH3Gr9BCs0TMttDwm3u0y21piwU8PiTU/n NGVY8lwvNJQd2NxY9v+gWDOK8rBZVMQvMnikW82lWy28hd7SdQyZb2Oi9i5m G+9hXoC7gyar6wFykobQVzmMOyvE1uAjPGDa92iEMvrIhv/UR7R6jwm3R5SH tHL3xu7jNmF3a/wuViZo8QTBwjjvx9hVzI9MYHZgAH2tDarV+yZ0vloFf34K /owByjvD8CAL/iwksUlWktg9v3BH5MlqdKS2outCgsoOlwyF7vlLykYYydpq sXyCMTVKjakJQK3O6k2DPZiVehkoRKBP1DNMGir7ohWByco8nIXXhrL3N6nw 3V2KCqcMdHo720j8fUkla0uUFFDRRmV6WVBARYdFIspoQiQRaCnva2QHrVF2 0QoJYpYTTAlRu2iFQwgVSAz14we9r4BjqDe/JogYRAmYUNS5GxDiqrex5HNh 6TDHWF4+MsKLo82JoxdOXEF1yjoa0u+hPfsRei88IRw/xXjxP2C67J9wRS5W +BdEnO5l/PVvWG79Tzy58v9irfnfsNbyr7jdSki2EY5t/4w77fTM7f+AW22f YqX9CZY7HhF695j/0xv30M/10M/10M/1EI6dnZh7Bo7fQIHvAEp0syiLXkQF o7zq7BU0F6ygq4R5cMUtjNasY7LhNq4038ECgb7cSUx138Nq7z2s99/HnYH7 uDt43wb3h/nhwch9upAHo/doApkfj93FnfE7WCMGb06syw1Jkq95YkluSZod HsdYX98PLG8lfQhD3w0YWt4uSRiqnNxWZlO9CsNfhiPdpREdohFG0Jz9hWoF FaIzhezMwh1sYVISwRSTzdAwokn3gur6QzwFAKlt70hJPCFpAzWbaQOTlDE0 bYrVDG5QBqTg8G9LkXn6Ijp9DAq/kcFCQCZo7hLkEKbCcRRNiUAkERiu11tG 0ERxOSjQKJtngwhACT5LH0KASX3tFg4DfYTRT4iJd81IIH4BRh8TDN4mtcBM IRj17rLQDBtL3hpJJEYTiTFEYgyRGLtEw3hTQaIg/6df7s3/GIOFn2Ks5B8w RaM4S6M4R6MY63gH/Ref4t74n3CTBvFWyx+xRhSuE4W324UQiR3ibZZY7yHI /z/BNXrNpZ4HWOy9jcU+xoX9jAv7Gc33jRCdnQc3jyF8l355CsXhiyhNWEZF xgrqLqyg9dIKustvYrBqFWN1tzDVtIYrretY6FjHta7buN5DVPXdwa3+O1gf uIPbgxTmoHcod4f5HLmN24z31sfXicA1rE4qGwCW5AaAG7g6vojZsSsYHxz9 oYrAEO8QGkOjNayXCJTEnAqPmIXXKyZUWcAr/N2Bl9NxMaAVHYWNgm4vRaHH /NIG9IwKiZeyTEOFnj6McbxOfT32VQS7h0LrKbCnchpauIwD1THLP0N8YiPN 4F9KDO59tQD6Q6Wo90hBg7vjBu7EFI3k14pVWH1MUcr4o9Fko2YNwZqN/lml h9YEraX3RW3ctpFdtNsQ5q80bpsk9kzE3guyuUF8FsbQUGniVnppjZ56YlDR rzmc+UhkD4XYi2I2GUPsJdxkPnJbWTyR8xg9BR9jgHnIKLE3KejpiT3D2R4U m/4Dc23MJuf+kzEfY8PWf6a1+yestQu8/aPE3O0O8RbjD1gl7m4wS1juJfb6 ib3LxN4AsTdA7A3QCl6mFeztUrfFqQOM/1NOCF+KXkYJ0yMzzV/DxRW0layg p3IFgzU3MVp/k+C7idnWVcx3MNTsuoXlHoKpbw03+wmsy5SBNdwapAzfYhJ7 C6tjqzR5q7ghKOonFU4WsXJidvI6pscXMDY8jZ6efrW9gNbHi8hjOrdB6hOj UmbFP4O8Dbqsc78tRKWxEx3FtZJeJ9GokleprthCtRNv3fVgifojlKg/VPei GvQHu4cpGy+sFPnK3Lsc4ApKVFlwkixzuMr8+zespGHndlagwPECOv0DlTkx o4K7yLA4OQS+wYITgTCDQh0QrLGWz21kS82XoAvchDuNSe3d3misEf3bNgjn Zy+q3bUWCVP6uXl1TTS/YTzIMC89jO46HpAZZhNzknAGhOG0e9EK9swCe5n3 0Zr7GN0FT3CZ2BsppReuoBeu+keE0eZ1FD7FLUb9y8x7bzD3WGn9B6y20ca1 E28Ccx2fEnef4FbXx1jteUJAMCC8/AhL9ImLg8TeELE3TA88xIBwkHavr2sL 9P4OOR4TuGhcQlH8CorTV1CVR/gVrqC9jPAzr2CgZgUjDSuYaF7BTCsh1LGC +S560G7CqvemfOd//TJlkDK8guvMbZfHV7BEL7uwaSuCoHGYYAQ4ygSk7/LY 86rzl0GXDPuVXFNQ41j3hGk3cSaqfKa+eyvQECu2ApRaeRMlQ02CNHnxFlrR LQw1UdZw36QLwUuWDgqxkEFOoirU7VbGLMnIkWBBnI2cxPobldFVYQLa+1oJ YmxL0OwTxzhOGcCKCNvMHCNGrqNgUgmzQjShStuO2p+7uX9LvMk2UMI0ooHb FBCBXylN3f6RigREIlI+I2R790Zzt+jPNW40d/voYfIKRcSRcFQaOmA2DsEc xvwjilE+lVtFN1tHuLUQbp0FH6HvEoO+0k8wVvEJgs51Iy/s3+WLjbWF/8RS 86dMbUURkTlG+ydY7RDyMW51PiHUPsItldHw+uWHKrE3A75hwm3kpvJiY0RQ jY5grqfdYuqU90R/iyzfGeSHX8dFxqDFzH3N9LMN9LNt5fS1xNvlWrFoZwVj xNsU8TYjNnJ0Enc9CmH/wmU+h/gc4ZNYmyPWrlCmiTdBEiKJEcZvYGB0EV2X p35s6W6yxFYWfs5NW64j1MW30epKvF0vuyLsZD3a0rrRUZSlcOJtRtgGB9Jm vhcR0lM1RNl29f1loDO9moeFnljMO1tGquIVcqKQTTOw6tS1ZXJrz+vJ8NxX gVLXbHT4uyujWyaFT2dj2jlShddGk4cuyLCpd9NSKBHF2UiCK1JYr4AoG9kF /tyzfeA0qvxbP5UtQ5vbwEVzUITaBh7urUP00QyY9QOUKZgjmN7G3UBV8hpq M+6iKfchOgoYyRV9hIHSjzBS8QTBjutoZPR2bfIpGlKXsdD0BEstzBVan+B6 +0e4QVnpIKS6HuFmz0NC6wFWaMGWB+9hiXHUIuMoQS+2OEa7M7YgiTIJL7XN wqi2u2RoriI3cgUXklZQRGRV5jOK27QKopfIukxkDVvo44mqSaJqiqiaJqqm BfMMLdjUqEIbP2ahjadcFrwDI9fQ2j/7ExVRwe6CmMIkaeIEUYskpQiM22B8 1Sr2QlivD16JRKJLK9ryuqTfVGiCvyIJhBRAKaCKVelSYtQ80RKlm/QG/EL+ 3L9CoIvJyl4W/OycHh2lhfHKwkGzibMEB94sR+rZIrTRgX2GtCQsSg3Vv8Hw 67NN4jrZGLq1UTw8gB6VEilEVP3Vyr9oGo8OiraRLUU/45dEc5HSLr4xYiCK /EbZMh7hq0PEh6mo0F5GpW6CXvIqs4PrMCetojrjDhpy6SXzH6CAWCuOXoD3 uQ6kGf8Ng4zKlmmuWtIX0Z7B+565iO6sRfRmL6CPcr3zAWP0+3Ld5vXLd+mj 7uAazdSSxJJ4IyHkOoXR2ZggXx1St/3BpJ52VvQKchiVXWRUVkpAVdNUNdBU tarEFb1NK+inmRqgWxzqJrh6CRqCaWSQnxNQQzRTAwRUH6WH0sk/tw0to6Z7 Gj9TSwnBRFEI424rvckmLnEl3FGQtOvXmcjRdKK1qF3lr1VXO8iXHoKM4QtW BG3mKI6UNAwmvGzpJPaKRqBP7JahJ4X0ZoPBSMw8GTdNPO16owDBh8tQ5ZmK Jh/HzXPANmotQKt2Egvg2PAbGmktLSU2Zce22kEuQSPKbTHW6YJYeuXoQLWT XEqM7CMXIwcxQdFbBg5E2+JGJ7ledpJrdmWiQrxVNV5BZfQ1VIrNNOlrSNPN INs4i/yIKyiKvgovhzVU5D/FDGOqptQ5tKXPoSNjjsiZQ0/WHFFzFf05lLwr uHxhFn0F07g2uE4rtEbUMPAeo4MbF+8PhBA5E4uYJ3LUBtJw9YRToq8jI43I yV1BIWP58lIih7F8PYOpZpqgNpqgDjq2LpqgbpqgHpqgHqKma4AIGRIIWUHL kMKnXdu3bI2RGR9LZhB/hRnEumhGcuAo3J62b1xCsbEHLaVNNpI94SsKy6pB ycdiNrGGRW5hNeCtput6RbUAGmJEMPlo/DfTliZCxx8VSnzo1eFcvV5IIvSG RNjuLEf2+Qto8Q+Sw7laQ5Tl5ZbSWGzpIw2zNhcrkwVq5SwgxkbWYLcpPcYU 0QhiIz7KdnP8WDYTxUpR8LHRbW7pL1awEUVsRPnrYNiTgdLAEZSHzqA8chEJ 3sNI0IwjWTuJTOMU8sKn4XS2jW7/X9HR+hRXFv6ExpRZtKbNoj19lriYJS5m 0Zszg768GfTnT6O/YAr9hZMMoCYwx4BnTqwLUqJdC+flnOS8HJO/vGpQItUE P5HGJIWwyGaMXUBYlNAzVdAzVTVS1RaiBcKigcakXpAtEBrVFDOlvPuGElr8 NQJdTQj2UmhUtFu4gtSdJYSD2x4zquP60FJWpWwWk9vFLNQBCZ/hO7TQBhiN 4X+v/mufpbYJDhYzR4nQapURWW1oohw3EhOy771ehG99zQnPU16hvP41J6s/ kU0/us/0lus1GwUuazuxaBOV+o9X2opFIVUWU+NFm3m8MnTwAzl0IFtChZkI jpadqlFqi3m0gAB/VlSAFmF7L6IkaBrxTpeR4DmMeP9RJAWPIzV0HDlhE3A8 dwsFeU8xPPYUNYlTaEgWMsHobwqdGVPozp5ET+4kevMn0FtAKRpHbzGlZAw9 JaPoLhnBFUFUd1US1V2Z3GBvVK1CjHoJYhjqJhevILNiBXnVK8in/7hItRdS 7RfpQwoYlFxoXXlZrYoEukcgSBCLqE4+VBNvpbR85xUnBNk2oDGtD00l+Qp7 ijKEbyM5cj7/mYAxLEwSk72u5n0+tCG+PGp/XrEAHq9GHQ/SyPEghcdFaPP7 X/OgNoOx46912PtdHxz4vpP8DkpnuHbTjVbmhGR3eED0Z9Qp9yIHUYWi9Xeb UhpXxUZ069jILq/vSeWK6YEN9YobHimbSaVqGZJEBeoYQwQh6mgrYs/1Ic51 CHE+o4gPHOPNHsNJuxZoQ/6I2qanGJn7E6rix2BOHENd8hia08bQkUnJGUNn 3hi6CsbQXUQp5uellPIx/oO6KkYZHneVj2BazV3HxxbV0bIxywt798iN5QYB CmeWoGTY8QqjZqc2Ri09CiWDmIH/ojqbrszAmz5LmfWuOuXxra/F4qdfr8Ab 32nFrh934PAv6mH761wceMnpmQ5r9QrJxtkouYjLREMQrnZaR23utA7m8Yp2 6+d4rOqueUWU3vwfKe2P2nilJ9968qIlSrR/h1PCqAE9HA7YyQm+qBOdiHEc RIzHKGJ8xxAfNIZjdjeRkvUndAw/xaWoMZTHjqGCp17LU29KH0db9ji6eOJt PPF2nng7T7y9jMITb6vk00ytmEcpI8wGhwW1nTr+OaEGShorc32CZB5465U0 JPt1oq6wU06DGy3T4OokuMItF28lbhK8cgr+PwcfPwN8mTr7+qribSkG/hV1 oKf04MW/XcabP32Ava88wvHf3cbpHVMwvBGA0F+7Q/uSAwKfPwG/HxyB5/cP wfn7h3GGn+/7wVHqIY56oGHlv9Gig2je2hhJBSRUsE2ppGoV2SY7RH6kdLtr 4zc63tXpCNmcJlYDh5jg9OE5nP/wDM7tP4bynBaEn+pBpNMIojzGcOB4Mzz8 /wWFNU/RMfsnFESOozh2HOWJ40z/J1GfOcn0fxINF8aZj42j+RKFmG+mBhqp gaYqfk5pqRpFMzXRSC0MBperWphUEx8/n2irT9j7m4vI1nWjprjZQpdAf6DM R1sYh8Sk685dJ+DtY8CraqeqPyN/Wd4PUMqtgf5Mavzo0ihBvkLCaPvCGKoa ofFU3h1862sZ+NZ/v40XfvQfePPlp9j7+6c49v5T2O39R+hdKmFwrELY2WqY TpbDdLQIpoN5CN+dgfCdNIS/j0DEa1qEv+yDsBfPw/DT09D91BaBP7OF989t 4fCCrdSI6KqQgwhyM2SSsrndKpY2YUU7YnZFtC6Ldi+nQ/ZwPkw5dBaOB0+g Ukwx8p4Y7HoQ7jyKA0dvICzpT/TiT5m5TCA7YgL5sRMoSpxEaeokKqgZMzVT lT+JmqJJ1BZTyiZQW0Exj6OuSgjvEu9IFa3SbEwtpsLN6to0zKigPvluKS5G dMFcYpbDxzveF/sw39l1ihDbsctW6aTwF6/Og0QRUZzyNtowpZXC38OAX1rK 4RqlHK4UI5VSuChESkofUYTUUVG75cYTsWZBlMO1XhRPI/NiA771rT/ixy88 xWtvPMX77zEG2v8URw/9Cfv9K2EbVAOHoDq4BjXAS9MIf/8mBPm0QOfVgjD3 VkS4tiLGqRVx9g1IPFOFpJMlSD6aj5SDGUjZE4/knSYkvxWExNc8EP+yA6J/ ZQfTy6egpfi8ctLaza2MAygjATFapSPX5YgjXA47UFVU04cn5cDha9/Zjp0U V4rfyTlkFD+FefQpYvVTSA6fQkbMFHIZFxSkTqEocwrFuVPMBKdQVkQpnkJ5 GaViChWVkyinlFFlcxmdmE9rwXxSHa7GV2E6uswymDylnrAlUvoN5a1vOOGd bzptPnUbeeTbrNVfndSaTmhNx0N/bmNAXOlAeFF1SoFqFTlI818V8URlk9/F IL6Vgd/qRVm4k0U7yq7v70bU6zoE7g/A9jef4s1dT/HeQaXBS+ur2WiC5b9H tlGLNx/qesR9AW2w07bDJbQDPvoOBFEMoZ0I19FZhHQhIagLKQGdSPPtRIZn K7Jd65kvVCD3bBFyT2Yj50gycg5EIvsDLTLe9kba6w5IetUOsa+egOnV4wh+ 9RjOv3oEzkfs4XjIzkaq7luw/86vEfG913Dxl6/C93gYzp8tgKtTBdwonvz2 vny62FcgK2MGuYzjL1ygFM4g/xKlZJpR+DTyKYv5Y1jKG8Zi7mUsZndjMb0F i6m1mE8ux0Rs4eHNVvArUn/f/VoQXv56PN7+dir2/iABh34SgoM/dvrMBLeN rJ1uk4fGc5eiHP7noFenuC0lfC1v4c/VWEBhl9laGdM9Uxl7ltJIqYSptEY+ Ydjzw920cp6ocs5Aa3opdK46JSn7/VZ9ioq332Z9xsnVtZae1Ai1NV5sgY/R JtP4JeMwDf/5iG74RHUjJKYbYZTo6G7ER3YjJbwLGcYuZOu7kBvSgQuaduT7 1qPAowIFzoUoOJeN/JOJuHAkHDl7NejZmUR1/j3e/8578DjBpOM0cxp7ho/n 6f7ORyDRpxIp3pXQOVdAS6Ua+DS5VMDowM/PViAhbxaJTNhvFM1RrlKu4FrR zMZE34UBKpZKzWrGYmYVb+elLQr9KhWaiOe/0YjX/m4Q7/90DId+NQjbV5tw 8rW0rYcuy0ImSeljIwuSX7aWJE3qwYtyuOCSMqil8FDaRK2r/ieWYqul8KSO cmvl67VN3946zk2RVSYLa9AXZKXp3PN2KDwej464YlTlJiuVTled+vrumwjx ZoziG6q0MvgqPVWKYmPVjnVFsXL3t9iBqO4ljtGqXeuWXtFQybWuTxE7RfXK ntVDVLprXDc0iV3QJ3UhkhKX2ImU+A6kx7QjK7INOaYW5IY2MgZqhKNtNNxO xcP/HCMDJ/4M1ySkuici2yMOub5mXPAx46K3GUVeVbjkQXGrQpFLFQqdKA5V uHjGjJuly5RrlCXcKJnHcvEVLF2awmLhKG8tb+uFTkojFVyGqdQcS941qb4Y FqHcT769hjd++gfs+vW/4Mibf8Cpd9dx+r3+rUeuUY+cmhUlvghZ8DPh2HtO DDSccJzPE5TjO8/j6I7zOPSWI4yCLYxXNtQ19HmrdkOVyVy12KNViz16648J V+qJARGSwyfC38Lc8xVE+osij/Lmfd+P9yLlPQM6DAXovHTJWuQJ8wqF3k2r als0rejUTmC1jLZJ08bNmhb9SyHJm1rLZfumjVC16N9MEapOtpHtv8/T/YkG 4ARrE7DLUSe4HHOC10lvOMe3IjCoCMaIFrhSt17nkhHsnIoo9zSkeqUhzycV hb5JKPavQqlfNSp8qmH2rkaVJ8Wd4sY/u/B5nk/7alTSzZfZVmC1/AZW5MTc AhZLrygTc5d4eYv6KG1YvFiNhbz8rfr9Nr719RU8/4P/jdd+9RQf0GcdZlB4 ct9/4uT+WxsHzmc4nxHqgPyp3c44tccZp/c44cxuJ5zl8xyf9h8IOY9z753H 2Z2OOPOOA+zecsDJ39nz0HVqtfwvqGTtny25bAzkR8gZ2/AAWcHbRo1G8X+L koWWSCn7frIPhpcD0OCbg64LZfxrRmLBQrgjink6G2tXLhNt0SAploj4WLqD nmmS3HKZZdO3jVW/IuFQK6hxktJXfPySVLVUtEFRdoxYYiqWA1PRLsedEeAi phuC3MVyvlhtOTzskuBzPg0Gt0wkeGchxy4RhQEZKPVPRZX3RdT41aDOtwYN PjVo8qJ41KDZneLKz134decaNDpQGKbXnaxQRtwql7EkRtzKqfBSWuvSIQot dQkvdJGFqEFJAb8jx96/9fVZfPcnT/Hyq0/xzrtPsW8fdX6Iz/3r6ui7Ov7O K3V6rwvOCNnnIjdJOexzxnmK814K9e9CvbtQ7y7UufP7jnDa6QBH6tzhbXuc e/Mc7F49o47c/+WfrYoI6hylvCb0HWllV9qohqhVkG8r77IDo+D6M2eUnktD V1q5HMMXI/iRDNkUAh09InifTd5Kv7DWS6t2xpqUxgxftS1M7L4Tire0hqkd spa7bSOaw2xkr8Y2qymPlftAY/Vi7b3UvHgnTM3HqP2xTkcYGR9zRqBrLEOR VOg8khiOJCFBS/8aUgl/p3SYPLJwdrsn4rc7oXWHEyqDqdWgajT7laDZMQ9t PrVo965Dh2cdOr0o4nMvfs2T4lGLDiKhjaa9hT678mABlqquYUkMp1XOYNEs eHL6+TmvepnZcs3H1Su3eZz9W9/9RzxP9f9m51O8RfW/ue//oDq7DDX+DnKs nWq3YYrsim/A/oArHPmZM58uFDd+7rFPiAs8iQxPosCTKPDYdR7uHzjA7T0H uL7LVO4tJtq/O4vGwBZU+TZ+z1JI3lTlCBVD9VYalmfKYhpRElNLYYHM4ynb ZF3jb3HwZ0eRdSAWnUwLustKVa6UCDlgHxWwlSPH6BW0qTs1TGkO9FU6VEMl CuI2GgQtfdIhSpeq2iS4zdIsnaJo/4v8mCTvvNS+XE0ax6jaAUEu/MYegvDa M5m/ayiVn6StRGqIGdnBVTSA6XDc7gPjdmfUv+qEIt861AfVo4PpXLe/GX0e hej1q0effz2B1h9Qz+/RF1DHP9fx67Xo9aV4VaPbzYwOx1Jcq11RpspqrmKx lra+lle/pguLVbWYKUy3vDpXAPC9LUcv+Qyss8fhcA2pxqXsGtSm56P69AFq 3Q0OQg66w+mAO1z5dKd48mteFG+K734hrvAlEnxpD3xoB3yIAq8PHOH5nj08 3j0Ht7fPwvnNM/wVW9Di3aiSxf3yzxY0rLNkVgjEKBCwzCYKCWZGKiQkDvt+ fgiRvzWgJbgIXZdq1KKGwrmwQZYiihkW+pxgpdzvwd9frM4R+4d9oj7TK7ql YVks4rQ0Lasr2Taal4WJkI4gRp+klIgMaquoUdnZ4XTUAXp3IsxTvBcxEhXf RQrNQQoRkUVE5PP6FwfVwnm7Bn40C+W/cMX4YTeUeLSgObAVfSGtGNI2YlhT icGQFgyFNGNY20Rp5NfrMRhcjwGiZ0BTg8t+Vej3Kke3c7EyI9ZAp9BIs9DI KK+hF4t1jZivuPDh5rew35fD6ForecFWUAijHM47qYusRU0usZqUKndknxd7 7w96wI1PT4oXxYfiR/EnSAL4dwL2u0NDgAQQIAEEiP9eJ/jtPQ/f3Q7w+cAe Xu+dhcc7ZzDAWLc/tBldAQ0qn9VXmbQH/xdUOpEqlY46tCoGDtUy1zZZ5Pic debZ5wVfVLrmoSu3VrjrkFj81SY2ncjPsOlE+isTmKKRM8RD5JLqDhl6DNnM qXqMjS12CkBkQ6f0GMJabFfBoTTVxcjmOgUZ0QZluYTSWBcnGzoNblEI80iA z6lQOgbmIZRUOoqM4GrkBtfhEm1DeVATqmlCvYmQgu3eGHnPBz2B3egP6kar theDpl6Mh3dj0tiEiQAzxpg0jhs7+GzDqKEFI/omjOjqMMzvOaypwKBPCXo9 CrDYTLvRQrvRMk5hDtDUgvnqi1vQ8QNVE5sLT2HqNVXctWAz23GwHolJ9WjI b0BjtAkuH3rCneJ5yBPeFL9DXvDnU8Onhl8POkiRTw+KG8UVgQdcoDnAgGnf eSLFAX67zxElZ4gSO4xGE/dhTegNqv2OJZ4TxZOADeuh14RvKoXGbCLdittU A0uQNEvEiHhnf/xFe+QdYxSRWIOuigrJshMnMRKrECqob++fYdVhYqNRcWLc tHlHrSmLnkuNMuwley6Dt/Zd2sjW3+3qTi7FmGwUFlU+ctkOpzReRvkz+3CP IT4Y0dCXhHmkIo34SKfVyAlqwMWgZpQGtqEqsBP1xITvdgNSfhGI/jeD0B8y gEHdIPU/hHb9MEaihzETN4wrsT24GtaIqch+TEX0YjKim/jpxHhYC8YN9RjX mTEaXEqsFKLHJxuLgiSng76lfRCLrW2YrytWMTKqTgIG+2lkZUVhJTBaFSLH y1VKi3O0AMJyHHNrxIXsRjTl16JZ5wWvQ97wOewNP0rAIR8EUoIOidm3YH78 b9Dyv2sPe1E8+bkHQg67I/hD4uVDhlkHz9PCOBAvZ2lV7DCV1ILJuCaMhTeg n7bVwo2lgCVUob7QKHQpSsVHmdGyFkwlUGS1Ry2vKWWevS8eR+y7MWgzVqKr vFHlYVI5mHSxKk9X9Aa3TpBJ5dYJFVU2G2u/U7h1NYlc5iCWdwTEqc1sSuU5 7BnARKjLtm1ka8ILyiZFg9jgkaDIpr7J2IBEBSwnCRb3FILEjHS6lszAJuQF teISQVIR2IPawH40aQYQ8AvekZeNaHtVjzlHPUaM4xg3jWMiYoIp8xTGEqZw NWUSCylMIOO6MBtLAMUOYjq6H9NR3QRPGybCGjCuN2M8tAjDIXlY7GIk2j3F JwORjg7M1ZdgC1r+h0KTFmCx7WHqCwSL449msuEEB/qM87QOzh96wVPXhIqC ZrQww2tyOUGk+CHgsD8CKcGHA4gIf2iP+NtAd9RfhFxH/Si+FB9+hcA54omQ IwTNIRcaHSeCxp5G5jRjFVtcSW3CTEIDf+Ma9BDy37YARvKkKKPJ8n2vhVtH DFUFbCJikmBRylICLLFqOUrzKx2qfS6h82IzEsTocqhCThBP0MTrVGI3tfih lKYsRDs0MUEhCmB+i0AXo7KR1jsKwWLbi18stGod29oBadkCIvfOfLYLMoLJ aYRB2SoYYVTI68PF3mcCMDaAFsWNv5abeKYTLHVID2xGdmAHCjQ9KNH0o0oz iHrNCFo0Y+gMmYD272NQ9Xo45o9HYDxiBpNRs5iOmSU4ZnElbhZjKXOYy7yK 5axpzCVO4krCOGbjRzAdN4BJWp7JqDZanHpMhJcRbPkYDE3HYu80hYDp6rCk LKNqmUvnr9r5AAvZSbgaBERJG28vzYobnOhSXAgWVxoNY1wLGi+J9XW5CDii IVACEXwkkEgIJCICEXosEHqK4bgG+hMaPgOgP+5PIWqOEzXHBGpoao64EmBE zIf28D9gh/msZsylNeBKYi0moiqt+0v8/I2UMPgL8QtDgDppG+BL8eHXmH5+ VX3pLRl4mKbqN7E2Gf0Fsp5lbRJV/ZgQWV9Owudx+iUPFJzJQ0d6E5rKS+Uk fLygVhe4+hI/bqJvUgffY8Tgu9bE7yIYeLTqnNwbG/2Pm3auyPK7JkHtgVS3 fqp9kBaeeNOmPkilDk+4qbV4sQ8hlvAUNihWk44w1zSkMyRN1zQjI6ATuQG9 KAwYRBmhVK0ZR2PAFNqDZ9AdegWhb6Tg4puxmGJCNxa+gKnoRVyNX8BC0gLm KPPJ87RBQuYoVzCXMoOrSZOYSRrFVCJhFd+NidhWSg0mYi5hPDITi5cJqX5C qqdzC6J+qvJm6RX+ClULxgDF9Jyl6XFUTY/Th95wOeQLt0P++OBQK1Iy29Ba 0oa2lDiiKQTao3R4x0KImhAYTlBsQ2C0DYbxZDDCTgbxGcg/E122RNYJgSxv /n0PaI8RVUfO09mdwVJ+JxZzWrCQXosrSWaMRBXLf6V/gMFGVnY/Bw0/BlrG aZVRWgIjxE9UPkLUWdpg7zAEMbMN9DSoHAJM9Xz8/wvGnhgFbIFb6Z5iVIow UZbY/ZIdEvckoz2qDh3mZlnHTZCi0D1ZzJmk65E+MGYrZY8cTtaqm3e+Ao2r Sdl7IHo9fOOUJT8q4OTuA3VPmth9oJDFf24LWXyYMUmSxdvI1QfPy8YPCTZ/ /pv9s5DuX4H0gEY+O5Dp34c8/yEU+Y+hQjOFWs0smoOuokM3j17DIvS/z0Xq jhQM7krCePQypuOvYy75OpbSrmMhdRmLactYSr+GxfRFCkGYNoeraTOYSZ3A ZOqIZMudSOqkNFIqMJFwAYuD05KFYLGva6v9+gl0fuK+b/UkCtpou5gxC9t1 /qAXHZ0v0RYAN9oqr8PBOO7djosF7WgvbUFHJB3m8VCiiGIbSmSFEmEUERSe 0vJJsQvhk6g7RdSdpD2zpRe0pS07QTt2nKE109Brl/qxWEDE5TZiIbMK9ntO yUqnjSxSf/7/Z142VBbbxGs03TO16i9YIOetQm5TNcwgJgX8N5NEEXJBm0ii KLsIt+BXwxmXVKKjuF2OxotiSYIUlSVKQk+lqSPsPkvxo4wjW5Yeiv2icv0B 4RakrkeRuxT5s0MlX7zSgWlZgaAsK0sSmw8SqTa5T1G0kXvRfPJbmNMbKKLw WoV0vxak+3Yjy3cQ+b5jKPafRkXAFdRpFpiPLaFLv4w+03UY3ilC5Hs5aNud gVW3DMwkr2I+fRVLWatYzOAzcxXXslZwLfMGP79GlSzgKj3nTOY0pjKJtowh TKT3YSKDYVYGXU5aEcYTE+VYyHzvM57yVyrSDEJjvOgR1iHwM0y3Heglzx8Q Ns2HSPOnlwyEO1HmfVgLvyOh8DJ1oKqkg6dfgza/c7RZRqLISEQZYLIzUgwI P62nhFKIutMK4ox2QTCcohc95QfdSW+E2Loj8Ph5LJXxMhT3EW3tcDpwFs70 nuf22Mp6uijraj9Dzq0OxfpvHor9vCTottTWQz0Vkm6du+ELajeTzlKh8xOb wRX79hmwbWYko22z3x6AwvNFaMtuk0Db9mfoyBQeKSGWaeNoKw1QjKQB0n1B NW1iX2eAZe0BTVqQuoZHyx8r1x5oxdqDJOjkTgKx+IAeiOFYKAGmM9IEGuMQ 7WmCObVK4eRXKanSfdqR4d2PbO8RFPhOosT/KswBC6gPvobW0BvoCruJ/ohb GIpZQ+TuQlTtz8GSQy5m0u8wTrlNMN3GYtY6rmWvUW5hOecmlnJuYCHnGq7m LmA65wqmcqYwmTOKiZwBSheFJi27jEDLECA7vBlf24kvcbMNwhhIfBlUfJ3b c574ohU74M0ozI/4CiS+guF5WEd8hcL/iAGBR4mhlC60VHShs7CImDEROyaE nTYRT5QzYQg/G4aIM0Z+TpydDYXpjA5hZ+hXzwRBf1qD0NO+0J7yRJCtC65V jGOxbAjOh8/TajrA9cOzxNkppVD45yvNSqH5K9Yis8l3o9JvWVxk8DLCIBcX GaB10akB3tc/Ux8UlWCBM6U2qIxAbeAsGe9vt0fyh1loiW9GW3WrLBV9Fmeb 6aYUnMUKnG2iCYoK1Snu/BXZMubPH6ksR4hHIDEWxBQ1SC5GSEQwU9IQwjaE 3y5YCu2euh7TnFQCc4pg8O+gXJZUVWmeXUj3HEC25zgKfGZQ6j8Pc+A1NGhv oM2wiu7wNfRHr2Mo7g6i9leg4MOLmDpVgCsZ9yTl4kL2PeLpDpZzKXnrlFtY unATCxeu48qFJczkz2MqfxYTFyYwkU9DVtBLaeHnVcRZHuaGhrAFYC/yNuus DBah0nVYAMZ8cJ8HAeZLgGkIsCACTEuAhcKH4PI/ysjnmAl7j9A+5xFgVV3o yklDilM6Aj4IhOdbzog4G0EJR8Q5gu2cABsBeVaPsHM6GM4xiDvHtOAs88gz 3giyc8W16mm4HnWhOMOVwZrrYXv+TDvrGplNBW8bWfHeJuvdotYd4Sf+JD5+ URls9VUGW61LihTScIS66p5TXwxIyiBLcdJXKU4K7gyjyosnR+xUfO186SxC 34xDjbYWrWVdshApORXFWlGFDC95K8AkX1CcwhkkeagiJWdQtN6AyFCdumby i/Ci8fQJjIVvUBz8QuLhHxKHAG0c/Bng+WtjnlMn8syJpTAnN1K6KUMqN9UV pLkPE0yTuOhzBaV+i6gKuo6G0JtoC1tDd+Rt9MfcxVD8PUR9WIeko2W4bFuM e6HFmM9+wIDkPpby7uHahbtYziegCtaxVHAL8xdXcOUiY7TCRUwVXsFE4RQm ikYwwUBm4lIHP6dXLLhoaQxTgPSCel2NMmLRW9yCBJILHPZ7McL3o7UIJJBC qNRQAklPIDFPI4gCT0TQi0XghG8Pikp60EUwdScaELBHC+e3XRG0wxUR9pEU AsqegLInmOzpKe0Zl9lrYbAPhu5cAELO+SDotBtcj7vD7bgb3Bj1ux1zghvj MPfDZ+QLdsMm2nkxVChaVJTZ1HDZzBDpHy66GuQHwkyMq35+yzaiMG89jJ70 ga7abWorQ4gkAjI8QwSkQClMZaCSs3WEktN2HQrdytB8octS4VR6Vb6qUnMk W4nM4vQWEiAxERz7GRIgk06Lv7YgJF5sAqArS+qjjFAEi9QcUl1HkO0xTYTM 0dxcQ1XIChoMt9BqWkdX1B30x93DUOIDjKY8QPyJWrTYleOWfznmcx9iIe8B k6UHuFZwD8sXiZJCureiNcwV3cRs0XVMX1rCRPEcJkpmMFE6homyQQpdWkkD xoqKtiLkRXnhdD6bWnssCNntSlPjTYQEMCoPgvNBHX2LnggxwueoiQgJR6Bt JEJO8mTtouAd2YOayh50m5vQpWM0/447fN51R4RDFIUocSBKHMJhcuTddzTA 6KiD3oH5p70GIfa+2P/7nXBnhO52gig5QZSccIHHsfPwPHpu61ICpRYvgBC5 TbY+/AWi+TFao4wDKgNdltKnMm4aTl9t8tVbVlY9pw6SKFVQZejSUgs3aCz0 ZApT1J7tbkg5no+mpHY0VzcrhAUW0gK9GCVPVvofvqxWwTcYokQdNJoAiSZA oo3KQG+kwfg3FmzEVRIfbTAn9FPGFHqnhEVUJ15HtvsMCrwXUKq5jirtTdQb 1tAScRudtBx98fcxmERspD1Egl0Lys9WY8GjCnN5jzCf/5CB5kMsFdKKFNEt XbqDheJ1XC1exUzJCiZLlzFetoDx8lmMV05Qhik9GCtvwGJTw1ZsfF+9QZup tBRjfHa3OzM2Hzju09AVhdAVERuHDMRGGHyJC//jEQg8GYWQU9HQ2cUwbomB KaMXrbW96CkrQ9Ghs3Dd6YHg9zwQ4Uh8OEYi/Dx1e556Ps/Aw5HZnWMIdI6B OPD2B9hHbNjAw9aTQYs742p3W1d4nnCG9zGHjd4YMQoqptvVKeRoyjbBRG8j +yS+wo809oERSm1cBYkEiCAU9xeTfwqpeJin5fXQVxHiQYSoRCbPEtiJwujb L9kj9J0UVBsb0VjRLYuiNrLi9d8krU+sfrNsLpNvpnCKUcdzN2a+rRiJMcMc 206sDFDoXeKuSM6l6sQV1KesSYyUaG7ArLuFOuNtNEfcRUfMffQkPMBAykMM pz1CwtkuZDs0YtylDo+T6jBX8AgLhY9oM4iT4vtYLLmH+RKxiWYN02U3MV5x HWOVSxiruorx6imM1YxgrLpX8i8vtjZtxch2BHvqVN4Fk4IRf4Xt4+wuD3oZ X3oZYmS/wEiogpEjJvgci4D/iUhoTkYjmPjQneaxno3FgUNdSCvsQ3d9H3ou ZuP8+17w/cBT9m1GOAmMUNdOzIucGKA66aE/r4X2PDGy4wPs+f078GDe5XHS i+IBT+LEizjxYQ4me2lEH411WxlvpEbyz9vILoq/RKw6GxobrMiWdQWWbgox J6pR0cIUINxH9TXfQZAslDKbU6voYoY71Er5FQ+XX5pQ6F2F+os9sjkyylI9 1ymF0RiVLUCAxFo+lwVSAZKtjDdRkvEmHN+ygCSShiSa8WzMIGWSwvwojk4l kYYjZR2tjFOLA26gUruGWuMdNEXeQ1vsQ/ryh+hLeYSh9I8wmvmYQWIHetya cC+iEVcFxe8lGpRiOpySB1govY+rZXcxU3Ebk5W3MGa+QVBcw2jtHEbrpimj WOxhJtLdT6A0Y8t00/+SzHZWS6s2BZ/Z5a4AZG8gDYlWBYgRHodVgNhG0Ygo ANGeiZUAMZyLxTG/fhRW9KOngSBJj4DbLi+E7PFCuFMUwRGJMGcm0M5G6J0Z WDprcXDHHuzfsQuep3xoQ05501J7nvKCF/Mn75Pu8KUdEUU5pcVG5ZqXfPMS G7E2ckT0OcTxY1xwjBQCRFlP8MVNGNmYFY0UbOF+Wph8gi37+iyENCEqIY1W ZUTa/6IPkk8VoTatE9XmBmthVC6CDk1SOyzE10RZ9MuyMPp/Z6SJhMloskCj MpzxRyTtRxShEUVoRM1ZoVGXchsthEZXziOUh6yhxngXDZH30UJodBAavamP cTn9MYayCA3XbtR5NOOGrpkxxmNcKX6EuZKHmCt9QFjcx2zFPUyZb2O8ag2j NSuEwzJG6hcw3DCDxf45LPZNYLGX0Ohs2QqNX0oTK7miJPOBYmJPv+9OH+ML +z2BjEG09DF65rZGuB8Jhzd9ix/jDg19S9BpBRqhAhr2NMsUz5h+VNcSHnVt 6An3gN9eL5icCQuXCBhdCA0Xpi0ueugENN7dg320HV52vvCkhBGi4ulNlPgS H37Mr8VwudJ3E2MdKFeGhpW+mzg+40LiZFcFQ8YQsa4sLnijZB5jaa0ItIBD J6nkn7P0fspKKH0ls1otI9Q3XrCH/oNMmMNbZDwli1mWkWwxY7cBjii1AGoj 6+RfUDZ3h1mWzMdZx7FNYRFqOe+HqDASEeGMOiKIiAgiIpKIiF1mVLqK2lQi IvM+unIfo7/gI5gNt1EX8QBNsQ/Qmsiv06P0ZjzCQPYjJHvwFnq3YTagGR8V NmOm+AFmaSRmBRrK72G68i4mqu/Qe6wRCTcx1LCMwcZ5LA4sU65SaCz6L9Ng tG5FxE8R6PaMLWVEaveeG8584MuoNJCRRwgciQhnIsKN3sSLxsKXxiJAIILG IpiI0J0THf9xMDgQGY6xCMu6jNbGy+ipMqPyjD20B7yIhggYXMOhd6VxcjUg xEWL/e/uhbdEgz+jxSimFYws6Nm87XyICC8iwlXpxAqMtbF22ihNWASB7K2J fw7xWuJBLKX4sgREnHUlxebJUyPtRShdUgjD0yDLrj3NJpKX139+Fi4vRyHf rwZVhT1WKqENkpdESSekLI7/nFwYL0qbohZumde1kUuzt0mCFzGNLX7K36rt LJVGJiZhl2E2CZKMrTBoJgw6cx9JGAxdeoKxkk9RH3MPTYRBWyqhIKhvs+9j IO8+0v06UeOeg8dpzZgsucsg8y6myu/QT9zGRNU6xmrXMFx3C4MNK1Q7k5XB VSwOEQZDhMEgYTAwgLmu5iOb+/Ne+IzFPLnTjXbBh3GFhm4jhHFFKM4TAa5E gAdtgg9tgh8RoKFNCGK8qT3LuMKeVtaBsYVjDA7sbUXqJSKgmVJyAb9/6U3s 2v5bap+2hwjQuuqp/X3Y+84eatufNiGAOUMMwhj2hfvy+xMVvnZEwEk3ZT+A bLVSpsljg5U9AcoA7Nep+gRKPBK08dY6dwIlXl1kFq/dDIoIORQbLYZixTiy Ric53p9TQ1CNi1IwOvizACSdKUZ5eheyikqtHBvGZyqT4dJbhKtTwolbpoRN 6gR3mEmsr47+OzXMrwxt5l1nhmoYJxgYPMRck5xiNQRCE4HQQSD0MmocoOUf KX2CifInmDZ/jKaUO2hNv4PO7DvoybuDaPcadMa2MiNtxEjJbYyWUvnlawwW bmG0ehVDtTfRX0cQDN6l8gmEYQJhhEAYIRCGJyUQtgzp/kyW/C20Wid2uOHU Th+c/iCA3iEY9kSA44cGOBMB7sw6vE7QDjDrCGA2GngmCsHnoplZMgNxYCzG LCOUAcIR/8soMF9Gdws9RA6/JxFw5uU3cO6V1xHiGoq9RIC3nR8lAF6nNTD5 xVFi4H3aH76n/eBn502kuW3RvmiRUSbPhfa3KdrXKbKNehdNVglEgUSAXDKi bKuxkfr/nDKMu7lNJjBYTUD+Sg6lHaEc2O4K/a5MlEY0o6y8488wrSTJNdai YPjnyoWW3dKb58T/p6r+0uAGVOp6YQ4dhdlooZRbofrX0JDJWDH3AboLHqD/ 0kMMlTzCWMVjOvvHmKl5jKt1jzFf/xitOWtIjf8/mBx9ik/vP0V/8S1cLlnF QMVN3Oy5j5X+e7g+cBfXBm9jaXidKr+FxVGqf+waZU6ySC88q/7/iUAXMZNI c+ijcF7ZvuMDu50BOL0rGGf36WB/UA8nJp2uVL/HCQYHJxkcnIpEwOlIBJ6N RJB9JEIcIpkkREDL2FDrHAHXmMuorL9MPxqJM6/thPPvd8Dt7d/B8c2/p+P3 kur3Oi3WEHqeCaQF9zqjofoDrOqP2NpGpxAPKMPviVLfSUqRWJcodzkkig9i Y51YFSJaE+LVKrGlNSFWdEltbXoRv70ykPg/YM+PJkr2D7ej8Gfb8fST/73B pSIqLP8Fl4pBr/CpKFufE5/Z+hz9PbVQWR7Ug4qQEVQaZlAZuYDK+OuoSllF XeYdNOcymyy4h94iGnr69uHyBxg3P8BUNX197QPM1T/AfOMDLDY9wFLLfSy3 3sf1diq66x5u9NzFjb47VPptXB9ax7Vhi8JVzptxKn58HgujU5a13pMWpbtG IMhL4aQ69rY3lR6AU+8H4/QeHc7R7zscCpN33u04ozXbcPicCoff6QgEnI2A hgoPdIhAMBUe5BSB3770Nn730i7s+dVeHP/tPtjv2Ae39/fAc/d7cH3/t/D/ kR38fngavj+0g88P7Kgxb378Cnx+eIpfOwm/H52A3/PH4ffjE/D/qS38f0b5 OeUFyouUl07y//HbfpL/bt9fnITPL23h/StbeL1sC0+K+yu2cH3lBJx/fQKO vz6Os5STvzmmEOZrw62k+aInRfz2r33nlzjwnTcQ9L92IOvld1H7zg5073sd bXsVrhY/eiT/P0OhYiMJVD4vKVS0+kR1X7NlZ3Ps91VtX/JrR1ngMCp006ig y6+gy69IXkFVBq96DlPF/NvoKrqNvpI7GKQLH2UUN15Nd15zF7P1d3G14S7m m+5iQbDUt93BUudtXOuh9FHDl9dwbeiWYtVHNzMb3aAsS21fGR63aFsZXX4X GjeF+OLD33rg2FsBsN0ZjFO7dLDbF4pzHxrhyOvtcowW3pbapqa9T4fD9yw1 bh8Of4dwaM5TnMLx+ksf4Le/OIjdrx/G8R1HYL/rMFz2fwi3A7sxmvUfMJ0p h8muEqZTZphOUmyFVCLiRCWiTlQg5kQ5Yk+UIf5EKRJOlCDxRDGST1xCyvFC pB4voOQj/dgFSi4yjmZTMpF5NB2ZR9KQdTgFWYeSkH0oHtkfxiL7QBSyDkQg a18YsvYakLVbh0yarIz3A5C20xttO7Op6fdh970jCH/1JC7ttUOH3UmMuxzG pPu7VhbvDVoVZeuyhqYmkN4lkD4lkKYkMDQOAbroH6kXp9hvkMZ8CmVh8yij Dy9LvI6KNPrx7FU0XlBo2buL19BftobBynWMMjgbr1nHVN06ZhrWcaVpHXOt a5jrWMN89y0s9K5i4TJl8Cbmh1cwN7qCeWp1QWXjXJy8wed1XB27iuOKVqfl 4x34u/MuUquHfueHozuCcOJ9LU7uDYXdQQPOHTbA8agRzifC4HYyDB6nqdmz jLHtTfB1oJynOIXBzzkMr75yFO+/dQJH3rfF6f0n0B+tx2RyAIYSz8FDXwtP fQO89E3w1jfDJ7QFfvpWaPRtCDK0QWtsp8XroL/rYPTTyVSoE9HhnYgJ70Ic JSGiC0mUZEoqJY2STsmM6EQWJZt/Nye8A7mUPFM7pQ0XwijGVuQbWpDPn3kh tBF52nqMFD7F6393inGEC6L3eqPsnC96fL0xHeqCq2G2CgvP3/H+TaAkdA4l kddQQktbmrKCyswV1OYqLOXtRSvoLr2JPsETXbmKEUZNY7WrmGi4ienmm5hp o3Su4EoPpZ8yQKFmroxQxlZwdUKh5Z2z0PNOLGFkcEJVzqzaiOMvrttbGhzZ qcWx3aE4sd+AU4cMOHvUAIcTRjidNMLFjsnVGSM8zoXB04HiaITXeYqTAb+m Afv9jlPYu/sULoYnoCk1Bl05objBW+9xygMeTJY8GDB5MoDyPB0ED/pRjzMB Cge/pakvRF3FGJKksJdIUUt2oeItaoJ4sy5KxP9drh8Rn4ldSWILhHCjjgkd cE/ugHdqO/zS26DJaEVwRgtCMpqgTW9A5hit6fPMGd4NQuRpA4p9w9BlMmAi MQgTyc4qf93fIMe5D4WBs7hkXMKlmOu4lLSC0nSFOVnQdjcJ+triFXSVraCv YgUDVSsYYhA72riC8dYVTHSsYLJ7BVO9lMuUQQrVMcnLMqVSidpI0tptmKIp HB2dkz9Z1ckV+fgxctwGsZ8X5SAvyuG9eux81wMfvOeB3e974tA+DY5RbPdr cIpyaI8HPtwtxB0Hd7nh7V8dQq/HDM77MgGMSkYG9SG3whARbqfc4caoxZ0p jZudBu7Uh9vpQEmx8OxOhGjLXgRVF8puDrkaapvsQNomN0Ql6hVt2Eh9/I3S iyRWIkhRS/f6yM2le8W3/dwHB/ebEOwahxz+P/WJsejONsKcdB5+/obP9I1u 7hl9QZ3OzXEdQIF2gbC7jotxKyik8yrJ4CXiBarlBWriBWotWUEnNdVTvYL+ emqsiRqjpkaoqRFenNE+Ci/O6BCFmhpV6TnHqalx6mmMz4GRRdgqGrqqtrbm ek1B52vGW2+7Ysc7bnhvpzu14469H7jDdl8AHZaIGQ9RJ3+NQ9TKhx84o9C3 CjG/iMSAQwlmYisxT3DM8b5eHVV4Zp1t3eFyygeup/zhSu242AXiPD83iF2C gqg9MMGqnSit0pUYI/iqhWq++Ux3WLLUjvJUNBRvUDrF4g0JSu1b3b8Ua4je VPs2ytq30mj9Bby2z4hznoLNMxnFpxeQfTAAF/fvZsQhmV4CRC1fNl/6KaIs MTHJxstgLyMCPQwK48RfI0+3hAuCQ5XJREHaCi7xSlXwStXwSjVQSS2VK2ir obKopO7mFfS2UWG0bv1U0mVat8tU0mWe1mVBezmmcKcOCeXw2T28dHLzDfoB ctJpjjNbmLBXIFzDcw+sQlJwFTIouZSLlOKgKsY/VagMqIKZf8fMp2G7E2p2 ZOBGQCVWkgpR5FaFvPNmeYHH+ZMcTrjRInrD6ZQfnxrYn/RTyKWtOlIJpi20 5spaBzEprZQGlS2Pz1lX9AntxIv+OqGeL8lFRnHqIiOF0lypJ8cYTLKeHEHl PKcGBIKQZc8vUxG5Kxwlh8/IFkWtSsYSqpCxQG/Z6PGcMugrqUDCBBXIz9W6 Z6ZxGdmxK8jm5cmj9ynMo8mjTszUSS110iCIJamTVuqknTrpoE66qJNO6qST OunixekeWbGRHKTb0EX1iG8s5ORWT1OQ2YyLWS0ozKbwGetXjhSeeyb1kEcp opRSKinVlBr+t3rqp5kSs12LcQZfdyL4dU/+HXfqzoU6dKySDLqXqRv7E97U j59an1MKlAZLt0jQRjfSxroNZQ+nXLmhrt2Q6pGbpWzkwrKvbFT6qZU4pkyx xo0VU9HGCIqiGRM1o4Rq35T7LgS7ymvfT4DHm4nI47Up3rdbZVYJ38SsovZZ CfH+LLGHzjVUpXL9JpL0V5DGu5NOd5RJA3fh4gqKqKNSGrcKGrdq6qiWxq2e Omqkjhrphhpp3BrphpoHFdLPZkoDdXZ6c3z2OvLSaqiQJl7JFhTnULIViqla KqmJcoGKKAxUlGMWiqE08M9NlBb+t1ZK5auJWPMux6O0MjT5U3F+/Hs+Vajy qEL5+UpkM3q2E1MncrpUGSBUdgFs9GAomyg2XR6dqiRr8VTlGTAoyrJuYpLd PEqtPVaqSG3GkMVURU1bd+J8heqxMPSHSaKU/bxIsbxIlbxISmecSpDiL3uY FIIU2Rpn6VoySip+g0qQ8oLaX5tI/5PEK5RB35PLKKHATDXV0i8xQihrWUF5 O9XVReEVMvcq5Jtl3StnN+dBz9NAVqM4q1ES4pVSI2UUM6Wef26hRjpp2noZ 3wykt6CSp18dKK5KNZqENvh5OzWU+IoXho/k4UmUGR9lpqFNS22FUGv8b/XU UI23Gb3Bjercr+hcDt9SdxGs08qWBrXRSnU7ggAgSalrf0GqJW5TXduiklhZ iYg1JoiqmJXLPFZdEBO1sSTGYLBRNSKY7LWBW4lNfvf9RPi+mYCLB/1RxgsU rvKnbBO9QDaI9BdqEf0/EZu6f0zqhgTBZPKS6sgieFvieFuSadHSaNEyeFuy eFuyadUcN5/9j1CSVYey7CZJgVex6dxbs1vRxbPvz2zDEM9+lHHmRGobplPa UB9Qy3OtRVtIDTpCq1H4RhRWvUvxhxwzuoxV6DBQJ5RmXRUmElowFtOMkfAm XNbWKeOSnhvjkqLCIavFPHvJ1aycvY2k/f6CSievSEyosrfKUii2kcQLX5Zd BeLsZWdBmNJZoBSMo9U1KREba1K+spXkPdCyeTtM9mEd/mUaknZFoObwWcl6 IVtt+P9EBUSqdCO8WwFqEwXvTKTcHWDgXTFYqEZwYfMrnRcZolXTvNSjkocs Dlcw2tXycFuy23jAbTzgDh5wJ8bSuzCV1o3ZtB5cTe3BQnoPljJ7cC2rB6m/ 80TvoTx8Gl2HfyotxXJOO65lt2MxqxVzVM5sWgumk5sxFd+E8ch6DOqqEey2 MWYoims6/80zqfFWkCvFNWVBRJR6ytH6pG3yiD+/qWUjQa3Gy6qrjSy7bpO0 2MoqkDBY9h89Sy2gsDqES/qYt7+fAs3vU1ByMAiV+w9Y2xG2yU6VL4mmlU0M 5+rae3+170Dl88jb/KL01yhOK0dFZg2zlgZKM6UF1TycpuwudGZ1oY8HOJTZ h/GMfh7wZVzJGMB8xiAPbxDL2YO4kTuIlbxBZO5g6uBVg3++0IbVgn7cLOjD Sn4Prl/owrXcdixQaVfp1OW0YGIDJqNq4PO2s3U0TzII85CtZBJB6sYf2vjw EGU7QoRObEhIVOvboozJ1EOIShdgZRMOi7eRtcznNtZghMk1GBYmG60ctLUM ZCvTzwZ1RYGFP+X4r7KRuicW9cccLdQZsufDRrR82Mg+j8/LDg9LBX8TX8aW Q/4JKjIqYc7iIdNMiwOuyu5AXXYPWrP60J15GQOZQxjLGMZU+giuZI5iPmsM SznjuJ43zkMc54FO4FbhOJr3XsKT6E78saoD65dGsHZpGGtFg1gtvIyVi324 nt+NpTwedlYz5tPrcSWxBpMxlQh0DUewStb/7PyjUS0O2siC8dfUg1YGZiNV Pl9x0JFyYDZx08CsUigUZcJwuQkiWmyC2KaesEI8ELppttwy7h5lpV5/94eZ CGEAXX5Eh+pDh3musdtkifzLkoTCWgyXrNqRyjmL6qcshmtpw4Nzt5b+ylJL YBZnnVnPs6Y5zupANc+4kWDtyBxBX+YYhjPGMZk+idnMKcznTGMpd4YgnSVg Z3nGszzXWWTuisaMWwv+JX8If6ytxb2yKdwtm8Sd0nGsl4ziVvEwVi7xAlzs xVJ+BxZzmpTxs+RKjMQUI9AtAoGe0QiSyxH+/GCgKUQZUrZBuKzLh1tmTQ3i axFGGnExZvo5OWiqsCdvbEjYptZjxRhwqHUfubJLWo4Bq7N4Sg9CrOT+OPWb C8g8kIDmky4bK+1D4hAfopSgBbmDKDpbxvblyL6oLmksBednj7sitZTHzTiP 99pMQ2ymnagllJt5zF0Zk7icMU3PN4vpzKu4mjOHxbx5XC9YwM3CBdy6tIjb JYs80kWU7i/B3YhB/GvNOB5UzlPmcL/yKu5VzuJ2xTTWyidxs3QM14uHsFTU KydiFnMbsJBpxgxVLv41kgbZK8a6UcBKhazuo5AbBeRxh8njFnOYghHZJI/b JI5bzMU9pxS6eNRGwSxhjLa2l8uTVjZ2W+ZODQGRFsp4hexY1PYo7/80F6Hv 5cB8wojaY8fwnKzpfslaxY2zULYGW6q4gtZYEEprkbu5peEHKE64ALM4Zt5m c0YbpZcyhPqMMbRlTKEn/QoGM+Zpnhcwk72E+QvLuHZxGStF14nSG7hdegN3 y29IxQ84duKf82bw7+0jeFS9TLlGWcKD6gXcrZrDunkWq5VTuF5O61NCE1/U w6NuxeKFWt6UUgwm5Nqofe7iDa3GNw6Bf2YqTB8iJsB0IrbYYEJOkkzIBilU SJgyGaZn4B1qjP6cpa3WX6EY0MszDlcWD4uF1gEKibeFj99SOz3z+kVkH05B 6xl3WTtNUOqnNrJ0/tnjlvWyYBNFlEt1/JYa5Gw97vLEizxuGpA0IpohhTl9 EFXpo2hMn0Y7j7qPxzyccQ0T2WJCY4XHs4rrRbewWnIL62VruFuxhvvmNWQf KcV1wwT+rXYRH9Xewkd1q3hcd5Oyggd113G39hrWa+axWn0F181TWKoYxWLp ABYvdfHYG/l9yzGdnW95ne/nHY0AglqjDkcFPzMcpeNph4YmKbNRn0MoTbVO zkYlyNkoLY/ZOu7lFyxnKfWMvSwTbnLNrkraHany3Sv0DYnY9UI+jLvzUW1n Qp2traU6aTnlLyqzq+KEtdFbK5Ih9IRBgc8ccGXiJXWMpp2H3E8ZQU3aJJrS rqAzfQH9GcsYybqBqbxVXC1Y43Vfx0rJHayV3cWdyru4V3WPeL2HZrtufEy8 /3v3Ep403MWTxtv4qHEdjxvX8LDxJu41EPv117BaO48bNbO4VjWJpcphLJb1 8aDbsFhcw+9/UUHe5+HDEM+PTtGfv72GhytYi4NC+DsGyyJ88JahIOpAH6vO CH9d3VlsEG9PKBsjg+JAlUF0CwO6SnFAfdm/eQm5x9LRZu8pS76y3Es9i5L/ RqVXGUKPkcuKaSR0NMVaPRPeoGfO1JygTpOkELApg5Rx1KbMojltHl3p13A5 cwWjOauYLljHXNEdLBffxc2y+1ivfMB7/xD3ax4h80QRpoNn8MfqNfx73wQ+ bnqAj5vv40nzXTxuvoOHzeu417SK2403sNqwhBt181iuncFS9TgWzQSumcCt oEkuLlYO5nPwts7BqMKr+FXLTfcN2ZiD89sYqn52ej/aOlCdhD2/KIJp/0XU nItEvZ2dGKZWzu1LVloIsVVcnpl1qJVnpjOIM3v2ppvjK2BObFUGLJJHKFM8 tDm0pC2hO/0GBrJXMXZhHTMX72K++B6Wyx7QOD7CetVj3Kv5iLf4IxTb9eBO 6k38a/ddfNzyET5peYxPWh/i49YH+Kj1Hh623sG9lnXcbl7FatN13GhYxHLD VSzVTWKxjmCspS+rbsZCRdm3LQfjw4NhOiTGbix8qUb/Zw7G8sZdu1EBcdxR ivyTmeg47y0QpbxhVw8mNH7rcJx8w86DCWVSoA3+zMHE0qHH83YmDPCAximz qEtZQGvaMnoyb2Iwdx3jBXcwU3QfC6UPcb3iMW6ZP8Ltmie4V/cx0uxK0edz Ff9Y8QD/NrKGT9o+pjzBp+0f4eP2R/io/SEett3HvbY7uN26htWWm7jRvIzl 5nmVZ2sMiw39WKxvw0J15bctkY63ZS+kwj2p94vZshc3Qh3B3ziYZFmK2PtK CSI+vIQ6x2g0nD27MQctx1M3TibG+mabJ6PXP+OGK2NosuI6eTBDlElUJV7l oSzxUG6gJ+sWBi/cxvjFe5gVXc9lj3G98gluVX+M27Wf4F79p0g/14nF+HX8 c+fH+LjtD/ik/VN82vEJhX/u/AiPOx7jYccD3Ou4h/X221htu4UbbTew1LqE xdYrlAksttAlNzHYrKu2HEqwZ7A6qGTaeIvprx6KfLusvsEMSbJUAKxvMM/v LEf+6Wx0uvhZD0WZ11VG3QQBp/JG2fLe0vDsoUTVwRzTTcQMU6ZQlTCH+pRl tKbfRE/OOoby72K8SHR3PqJt+Ag3qj7GrZpPaJc/xb3GP6DWZQ4Pi5/gX8Y+ xpOOf8AnnTyYLh5M1yf4uOsJHnfxmnU9wt3OB1jvuIvVjnVc77iJpY5rWOwQ fEpTWGwf4uHQ9jTW/H/tXd1PW+cZ/41MlSbtIuqym6mt1lxMiiZtvcjFpG1R p11UlaKsqqYqUnaxhSCUtU2XMpqUxAESG4KS0qZJkwCGgrH5NDafsX1sg7Ex 35Bgg/Ex/sA2Bkwg27JNkyZ12e98GEz2JywXr3QkzDnP83ue9znv+5zf+zyv qEzIsnMapUShejhHU5I7BKhmDXOHTC/tpdsZmE78zAjtewZYiqthOX1aOa0l nSu9kmvZnsvjamU8tFeuPL9Ya7/GRZrOiY4qxpPqWQKyQECWMXh7Bc77CXj1 KUw0ZzBn3ESQHhLueoxozw4S1ieoPTOAsatJPBn8G55OJZC1P6FnEBQHQRF2 kBUeY0PIYk3YQNKRQdyRQsRBQBwRLAkhLApSzaAZBB2MKzYCMmB+RY0pUqG+ /Ka6uQaXFepppdxRtr00qpot0tSi+O126P9wH/b3SwrknOlLuz3sq9SMqZSe 05VX1u3Hoq2CWFwlFteIRZWERYAzJozBO1GZ8jfamMZEyzrmTFkEOraw3L2N FcsO4nSMuuJZhOt38GTsH5wZf8Wm4y90COJBHLacO9h0bmPduYW0cxOrwjpi zjQizgSWXStYdC8j6CYWbqkcDrEQBASHel5VP9rm6MFl8lELtbv6c4nLHBa5 7JmExYmft0F3shXWszWwnClU0w1K/TldhZItUxsK4zkkjBoL2is4TSqJhE45 qmUmEgN3YhCIhKeJSBg2MCsjkUWoewsR6zZifdsYvBjFhvXv2JnfwTqnxwa9 YVPyBqKQdW1jgyPjYoxxZrHqWkdUalno5it+JIrFESIxElCruPikKi6YH+p+ Vc0zXThbrtBkP9Kh7Hx+hus5NMr20CiQ8fgOio93Ql9YB/uHJUQhd5igZt9h gvr9KDRfNKNNI6C9nChoZxhFFRT6iYKjLkkUUhg3ZDDLQLHQmcWSmQHDuoXr Z32YupVF1vNPpBkxM/bHWHdIc+Ex/WCLCEiD84Ij5eJryL2OlZE0wp5VLI1G EfQSBS9RGGWw8Hjl8iI+q+k19dvsBSkzck6tDKWWErvySa4+oYJCgZwT+S60 curpppwNOfHLduhOtcLyfg3MRWdwbbeBldJytaL8an3+ZvkQjGVOtF+Weu9S +ZoAuhkY+jgZ7PWrGG5Kwm9IY7otg/lORkvzOhcKG2j5KIRIOyfA3FMkbZtI 81WxJmwi49wswLprg0JlaPU16pwcZkzwrCEymsKydxWLEm1OpshyLvio+6gX AbdDKRz6fXzC7fKFc1W4cP56Xj/QGypVPFcJ6zM5N7GXmbiJ4hO0fFEdbOdK dknBlXJSQouG/Qo3lzpgujhG35/h+zOArtoQrHdW8KAuDndjAj5DEpOmFGY7 01gwr6Hyj0OwX08jLXDWL6whYcvIkS4lcInqzBTQxGtUeI0unhpOI+FJIepN QvTR3cekbooSe4wK+xVSaNDrw4zT9rr6Saz0A93+NkkyB3avZI7Up1LKDEg5 gQo1L3D8WAe0v2uF+YMadBSdllMCGr4C9PnZvR/CUDoGk2YWbboA9zdL6Lkt YuB+FEJjDJ6WOPymBKY6VjHfvYrSwl74Ov6DiSYbIkPUQHrh21NIMJyvCikk XdzjcCSHV5GkC8e9XAyMxRH2xxCSe0WGdxmQQf8MHnq9CkXvIEo+1CnVWmjO 3T25XKWFe/IytUqLRtmQS9xOaTNe9JsO1BfdwzeV5U37lWo8PwrDp7MwXgvA dGOJG7UwrHcjeKCPwNW8Aq9ROssVw3R3DPOWOFpdz7DUzxg8mIAorWBsCUQd CcSEBOKuOOLDHJ4YYl6lL3iEyoQmIv9D9FugUhPDI7lG9Hu0xRsybTG/69sl lbJ4SaUsvnN0CebCh7h88DCsHL0HD+vzvya8hqaSabSUB9BaHYLxcxHdX4no 5zbe/rUItyECb3sEE10RzJgjmLeuYIE7nsWBKEJcji0/4JLMTsGdK4i4uaD3 RBDxcoxx/ZrXbTqo8tuCEr+NCk35JnMNF/6kMvL+zN1laR4br/RyjfyLdyj0 7w8eQdehnyJ++A188+MjOV+bVmndjZ8+QrM2hJabIkxfijDfo681UoNmEcMm Ed4OEePdIqZ7RMz1injULyIwSMkeiFhyUEoXxwjHKIdPlNk+iyozr0Bmfx1Q +V8hTI0/VDvxvETR3kDp996E+0dv4enRt/Ds2K84ftKwXzqpdoFes4jG6jCa a0W0faVQoQaaKKGBGFPC0U5RPuk1aREx08cnqd28HwlKZ+UFj9JZeWFMlHsa PqR0s/lUKIloMx6Ew+3Pk+5NlL7+LoaPnsTTX5/Es+Pv4t9v/6Ih/9P1D3Dn 4znUVSyjQaL/fEH87hK/BnoArW9rVdrcj1Ayn0Xp+zw5JGLKTimdHMOUgpLN ErMZSjY9LvUR30/98Y5z7eueVPhh38apI6fQdawQ8eOF+NdvT+nzCQ4v465W xD0aUU8jGu+L6KIRewnREIWwUwgXhRihEKMUwkfD+Wk4P4Xw03B+CuGjEL5x sUDmthyQmS1uf1i++VI+veUQblWLuE116+gqzXoapYVqt/FpXSIG+RQbn+Lg U5xU1U1V3XyKm6q6aATnmNIvVuBwyD1jw8vK3R+pE7T2logv60TU08QtRoJK B+yi8/XQ+Xpp2n6atp+mHaD8/bxzn0ehGPRxWDyiQgBBQF27XycSn9Mcd+ko ejrK17yTgU5i5J1MvJPJIbWf5KCcrYK4ovy3ItIBVFGrmg7llgnlTzK5RHhx /eL6xfX/8zW+9V/GgQ5E\ \>"]], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.6095311213, 1.33276705602, 0.20872023669999998`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{3.2102665287999996`, 1.10845657982, 1.03294312886}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-1.3937674112999998`, -0.5252493417, 0.9966792869199999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.27293312618, -1.16885222278, 5.2120532806}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{2.8589664653999995`, -2.0186053131999997`, 4.4204470592}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.4791745386, -1.1381819698, -0.8341250564}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-0.063642192228, 3.3317759106, -1.3899501647799999`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.9442791064, 2.956476327, 0.26013968115999997`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.7227002449999995`, -1.8147983640999998`, 1.9547325744}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{1.7049107972, 5.153471774599999, -2.1316109279999997`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.2290178154, 4.9801839004, -1.3167610768}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.0316874218, -0.89057117202, -3.4631118675999994`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-5.834529025, -1.9411265471999999`, 0.045410115779999996`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.9798059552, -1.47462878684, -5.192400130199999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-7.782647558399999, -2.5252408537999997`, -1.68378366052}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-7.337995030599999, -2.3050877748, -4.2870324036000005`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{0.8002800637399999, 7.581580711999999, -4.073682338199999}, 0.5]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{4.170625282, -0.84965860412, 2.48498969}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{-1.55594369662, -1.60600253836, 3.1535747487999997`}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{3.8523954236, -3.7271065897999995`, 5.5881087545999995`}, 0.178]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.3289068103, 0.80725315268, 5.636674712799999}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-0.30090107097999996`, -2.2100345569999997`, 6.847800106199999}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-1.9673937386, 3.4689700182, -2.0575336687999997`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.8631068868, 2.8270300959999997`, 0.8845807406}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.8075489423999995`, -3.7826645341999994`, 2.412235239}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{7.145809896399999, -1.55966645684, -0.0059902424474}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{8.0712087186, -0.8043429746399999, 3.0723165308000002`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.5873528642, 6.365542031, -1.8862111096399998`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-1.2295502218999999`, -0.2651285578, -4.1339645975999995`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-6.164097239399999, -2.1142254487999996`, 2.0327782581999996`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.6634658228, -1.28648766628, -7.1805808548}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-9.5897925322, -3.1327877628, -1.0102475196}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-8.8053672696, -2.773172905, -5.5971794394}, 0.1]}, Text3DBox["1", {0.0095311213, 1.33276705602, 0.20872023669999998`}, {1, 0}], Text3DBox["2", {2.6102665287999995`, 1.10845657982, 1.03294312886}, { 1, 0}], Text3DBox["3", {-1.9937674113, -0.5252493417, 0.9966792869199999}, {1, 0}], Text3DBox["4", {-0.32706687382, -1.16885222278, 5.2120532806}, {1, 0}], Text3DBox["5", {2.2589664653999995`, -2.0186053131999997`, 4.4204470592}, { 1, 0}], Text3DBox["6", {-4.0791745386, -1.1381819698, -0.8341250564}, {1, 0}], Text3DBox["7", {-0.663642192228, 3.3317759106, -1.3899501647799999`}, {1, 0}], Text3DBox["8", {4.3442791064, 2.956476327, 0.26013968115999997`}, {1, 0}], Text3DBox["9", {6.122700245, -1.8147983640999998`, 1.9547325744}, {1, 0}], Text3DBox["10", {1.1049107972, 5.153471774599999, -2.1316109279999997`}, { 1, 0}], Text3DBox["11", {3.6290178153999997`, 4.9801839004, -1.3167610768}, {1, 0}], Text3DBox["12", {-3.6316874218, -0.89057117202, -3.4631118675999994`}, {1, 0}], Text3DBox["13", {-6.434529025, -1.9411265471999999`, 0.045410115779999996`}, {1, 0}], Text3DBox[ "14", {-5.5798059551999994`, -1.47462878684, -5.192400130199999}, {1, 0}], Text3DBox[ "15", {-8.382647558399999, -2.5252408537999997`, -1.68378366052}, {1, 0}], Text3DBox[ "16", {-7.937995030599999, -2.3050877748, -4.2870324036000005`}, {1, 0}], Text3DBox["17", {0.20028006373999996`, 7.581580711999999, -4.073682338199999}, {1, 0}], Text3DBox["18", {3.5706252819999995`, -0.84965860412, 2.48498969}, {1, 0}], Text3DBox["19", {-2.15594369662, -1.60600253836, 3.1535747487999997`}, {1, 0}], Text3DBox["20", {3.2523954236, -3.7271065897999995`, 5.5881087545999995`}, {1, 0}], Text3DBox["21", {-0.27109318969999996`, 0.80725315268, 5.636674712799999}, {1, 0}], Text3DBox["22", {-0.9009010709799999, -2.2100345569999997`, 6.847800106199999}, {1, 0}], Text3DBox["23", {-2.5673937386, 3.4689700182, -2.0575336687999997`}, {1, 0}], Text3DBox["24", {6.2631068868, 2.8270300959999997`, 0.8845807406}, { 1, 0}], Text3DBox["25", {6.2075489424, -3.7826645341999994`, 2.412235239}, {1, 0}], Text3DBox["26", {6.5458098964, -1.55966645684, -0.0059902424474}, {1, 0}], Text3DBox["27", {7.4712087186, -0.8043429746399999, 3.0723165308000002`}, { 1, 0}], Text3DBox["28", {4.9873528642, 6.365542031, -1.8862111096399998`}, {1, 0}], Text3DBox["29", {-1.8295502219, -0.2651285578, -4.1339645975999995`}, {1, 0}], Text3DBox["30", {-6.764097239399999, -2.1142254487999996`, 2.0327782581999996`}, {1, 0}], Text3DBox["31", {-5.2634658228, -1.28648766628, -7.1805808548}, {1, 0}], Text3DBox["32", {-10.1897925322, -3.1327877628, -1.0102475196}, {1, 0}], Text3DBox["33", {-9.4053672696, -2.773172905, -5.5971794394}, {1, 0}], TubeBox[{{3.2102665287999996`, 1.10845657982, 1.03294312886}, { 0.6095311213, 1.33276705602, 0.20872023669999998`}}, 0.1], TubeBox[{{-1.3937674112999998`, -0.5252493417, 0.9966792869199999}, { 0.6095311213, 1.33276705602, 0.20872023669999998`}}, 0.1], TubeBox[{{2.8589664653999995`, -2.0186053131999997`, 4.4204470592}, { 0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{-3.4791745386, -1.1381819698, -0.8341250564}, \ {-1.3937674112999998`, -0.5252493417, 0.9966792869199999}}, 0.1], TubeBox[{{-0.063642192228, 3.3317759106, -1.3899501647799999`}, { 0.6095311213, 1.33276705602, 0.20872023669999998`}}, 0.1], TubeBox[{{4.9442791064, 2.956476327, 0.26013968115999997`}, { 3.2102665287999996`, 1.10845657982, 1.03294312886}}, 0.1], TubeBox[{{1.7049107972, 5.153471774599999, -2.1316109279999997`}, {-0.063642192228, 3.3317759106, -1.3899501647799999`}}, 0.1], TubeBox[{{4.2290178154, 4.9801839004, -1.3167610768}, {4.9442791064, 2.956476327, 0.26013968115999997`}}, 0.1], TubeBox[{{4.2290178154, 4.9801839004, -1.3167610768}, {1.7049107972, 5.153471774599999, -2.1316109279999997`}}, 0.1], TubeBox[{{-3.0316874218, -0.89057117202, -3.4631118675999994`}, \ {-3.4791745386, -1.1381819698, -0.8341250564}}, 0.1], TubeBox[{{-5.834529025, -1.9411265471999999`, 0.045410115779999996`}, {-3.4791745386, -1.1381819698, -0.8341250564}}, 0.1], TubeBox[{{-4.9798059552, -1.47462878684, -5.192400130199999}, \ {-3.0316874218, -0.89057117202, -3.4631118675999994`}}, 0.1], TubeBox[{{-7.782647558399999, -2.5252408537999997`, -1.68378366052}, \ {-5.834529025, -1.9411265471999999`, 0.045410115779999996`}}, 0.1], TubeBox[{{-7.337995030599999, -2.3050877748, -4.2870324036000005`}, \ {-4.9798059552, -1.47462878684, -5.192400130199999}}, 0.1], TubeBox[{{-7.337995030599999, -2.3050877748, -4.2870324036000005`}, \ {-7.782647558399999, -2.5252408537999997`, -1.68378366052}}, 0.1], TubeBox[{{0.8002800637399999, 7.581580711999999, -4.073682338199999}, { 1.7049107972, 5.153471774599999, -2.1316109279999997`}}, 0.1], TubeBox[{{4.170625282, -0.84965860412, 2.48498969}, {3.2102665287999996`, 1.10845657982, 1.03294312886}}, 0.1], TubeBox[{{4.170625282, -0.84965860412, 2.48498969}, { 2.8589664653999995`, -2.0186053131999997`, 4.4204470592}}, 0.1], TubeBox[{{4.170625282, -0.84965860412, 2.48498969}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{-1.55594369662, -1.60600253836, 3.1535747487999997`}, {-1.3937674112999998`, -0.5252493417, 0.9966792869199999}}, 0.1], TubeBox[{{-1.55594369662, -1.60600253836, 3.1535747487999997`}, { 0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{3.8523954236, -3.7271065897999995`, 5.5881087545999995`}, { 2.8589664653999995`, -2.0186053131999997`, 4.4204470592}}, 0.1], TubeBox[{{0.3289068103, 0.80725315268, 5.636674712799999}, { 0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{-0.30090107097999996`, -2.2100345569999997`, 6.847800106199999}, {0.27293312618, -1.16885222278, 5.2120532806}}, 0.1], TubeBox[{{-1.9673937386, 3.4689700182, -2.0575336687999997`}, {-0.063642192228, 3.3317759106, -1.3899501647799999`}}, 0.1], TubeBox[{{6.8631068868, 2.8270300959999997`, 0.8845807406}, {4.9442791064, 2.956476327, 0.26013968115999997`}}, 0.1], TubeBox[{{6.8075489423999995`, -3.7826645341999994`, 2.412235239}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{7.145809896399999, -1.55966645684, -0.0059902424474}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{8.0712087186, -0.8043429746399999, 3.0723165308000002`}, { 6.7227002449999995`, -1.8147983640999998`, 1.9547325744}}, 0.1], TubeBox[{{5.5873528642, 6.365542031, -1.8862111096399998`}, {4.2290178154, 4.9801839004, -1.3167610768}}, 0.1], TubeBox[{{-1.2295502218999999`, -0.2651285578, -4.1339645975999995`}, \ {-3.0316874218, -0.89057117202, -3.4631118675999994`}}, 0.1], TubeBox[{{-6.164097239399999, -2.1142254487999996`, 2.0327782581999996`}, {-5.834529025, -1.9411265471999999`, 0.045410115779999996`}}, 0.1], TubeBox[{{-4.6634658228, -1.28648766628, -7.1805808548}, {-4.9798059552, \ -1.47462878684, -5.192400130199999}}, 0.1], TubeBox[{{-9.5897925322, -3.1327877628, -1.0102475196}, \ {-7.782647558399999, -2.5252408537999997`, -1.68378366052}}, 0.1], TubeBox[{{-8.8053672696, -2.773172905, -5.5971794394}, \ {-7.337995030599999, -2.3050877748, -4.2870324036000005`}}, 0.1]}, AspectRatio->Automatic, ImageSize->{371.1111114054518, Automatic}, ViewPoint->{-0.8078565384262977, -2.8458046058704856`, -1.6427915140175924`}, ViewVertical->{-0.40763028217799346`, -1.255913328594971, 0.5011325940476944}]], "Output", CellChangeTimes->{ 3.569344819277175*^9, 3.5693892238860517`*^9, 3.56938938235113*^9, 3.569389560472243*^9, 3.5693897124945097`*^9, 3.569389785065837*^9, 3.5693899366513033`*^9, 3.569390130497244*^9, 3.569390342174016*^9, { 3.5693903932797055`*^9, 3.5693904225453568`*^9}, 3.569390578873232*^9, 3.5693906217265067`*^9, 3.56939077167397*^9, 3.569390890078178*^9, 3.5693909957371635`*^9, 3.5693910952653384`*^9, 3.5693911428922224`*^9, 3.569391222077961*^9, 3.5693914607895803`*^9, {3.5693914994932485`*^9, 3.5693915165440784`*^9}, 3.5693923405619287`*^9, 3.569406097620685*^9, 3.569406260765772*^9}] }, 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[{"tw", "=", RowBox[{"Join", "[", RowBox[{"tc", ",", "twc", ",", "twh"}], "]"}]}], ";"}], "\[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}}], Cell[BoxData["55"], "Output", CellChangeTimes->{ 3.5693448193083754`*^9, 3.5693892239640517`*^9, 3.56938938239793*^9, 3.569389560519043*^9, 3.56938971252571*^9, 3.5693897850970373`*^9, 3.569389936698104*^9, 3.569390130544044*^9, 3.5693903422208157`*^9, { 3.5693903933265057`*^9, 3.569390422592157*^9}, 3.5693905789200315`*^9, 3.569390621773307*^9, 3.5693907717207704`*^9, 3.569390890124978*^9, 3.569390995768364*^9, 3.5693910953121386`*^9, 3.569391142923422*^9, 3.5693912222027617`*^9, 3.5693914609455805`*^9, {3.5693914995400486`*^9, 3.5693915165908785`*^9}, 3.5693923407023287`*^9, 3.5694060978858857`*^9, 3.5694062607813716`*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.6095311213`", "1.33276705602`", "0.20872023669999998`"}, {"3.2102665287999996`", "1.10845657982`", "1.03294312886`"}, { RowBox[{"-", "1.3937674112999998`"}], RowBox[{"-", "0.5252493417`"}], "0.9966792869199999`"}, {"0.27293312618`", RowBox[{"-", "1.16885222278`"}], "5.2120532806`"}, {"2.8589664653999995`", RowBox[{"-", "2.0186053131999997`"}], "4.4204470592`"}, { RowBox[{"-", "3.4791745386`"}], RowBox[{"-", "1.1381819698`"}], RowBox[{"-", "0.8341250564`"}]}, { RowBox[{"-", "0.063642192228`"}], "3.3317759106`", RowBox[{"-", "1.3899501647799999`"}]}, {"4.9442791064`", "2.956476327`", "0.26013968115999997`"}, {"6.7227002449999995`", RowBox[{"-", "1.8147983640999998`"}], "1.9547325744`"}, {"1.7049107972`", "5.153471774599999`", RowBox[{"-", "2.1316109279999997`"}]}, {"4.2290178154`", "4.9801839004`", RowBox[{"-", "1.3167610768`"}]}, { RowBox[{"-", "3.0316874218`"}], RowBox[{"-", "0.89057117202`"}], RowBox[{"-", "3.4631118675999994`"}]}, { RowBox[{"-", "5.834529025`"}], RowBox[{"-", "1.9411265471999999`"}], "0.045410115779999996`"}, { RowBox[{"-", "4.9798059552`"}], RowBox[{"-", "1.47462878684`"}], RowBox[{"-", "5.192400130199999`"}]}, { RowBox[{"-", "7.782647558399999`"}], RowBox[{"-", "2.5252408537999997`"}], RowBox[{"-", "1.68378366052`"}]}, { RowBox[{"-", "7.337995030599999`"}], RowBox[{"-", "2.3050877748`"}], RowBox[{"-", "4.2870324036000005`"}]}, {"0.8002800637399999`", "7.581580711999999`", RowBox[{"-", "4.073682338199999`"}]}, {"4.170625282`", RowBox[{"-", "0.84965860412`"}], "2.48498969`"}, { RowBox[{"-", "1.55594369662`"}], RowBox[{"-", "1.60600253836`"}], "3.1535747487999997`"}, {"3.8523954236`", RowBox[{"-", "3.7271065897999995`"}], "5.5881087545999995`"}, {"1.9098988250499995`", "1.22061181792`", "0.6208316827799998`"}, { RowBox[{"-", "0.392118145`"}], "0.40375885716000004`", "0.6026997618099998`"}, {"1.56594979579`", RowBox[{"-", "1.5937287679899999`"}], "4.8162501699`"}, { RowBox[{"-", "2.4364709749499998`"}], RowBox[{"-", "0.83171565575`"}], "0.08127711526000014`"}, {"0.2729444645360001`", "2.3322714833099996`", RowBox[{"-", "0.5906149640399997`"}]}, {"4.0772728176`", "2.0324664534099997`", "0.64654140501`"}, {"0.8206343024859998`", "4.242623842599999`", RowBox[{"-", "1.7607805463899997`"}]}, {"4.5866484609`", "3.9683301136999996`", RowBox[{"-", "0.5283106978199998`"}]}, {"2.9669643063`", "5.0668278375`", RowBox[{"-", "1.7241860023999998`"}]}, { RowBox[{"-", "3.2554309802000003`"}], RowBox[{"-", "1.01437657091`"}], RowBox[{"-", "2.1486184619999995`"}]}, { RowBox[{"-", "4.6568517818`"}], RowBox[{"-", "1.5396542585`"}], RowBox[{"-", "0.39435747031`"}]}, { RowBox[{"-", "4.0057466884999995`"}], RowBox[{"-", "1.18259997943`"}], RowBox[{"-", "4.327755998899999`"}]}, { RowBox[{"-", "6.8085882917`"}], RowBox[{"-", "2.2331837004999997`"}], RowBox[{"-", "0.8191867723699998`"}]}, { RowBox[{"-", "6.158900492899999`"}], RowBox[{"-", "1.88985828082`"}], RowBox[{"-", "4.7397162669`"}]}, { RowBox[{"-", "7.5603212945`"}], RowBox[{"-", "2.4151643143`"}], RowBox[{"-", "2.98540803206`"}]}, {"1.286817674364471`", "6.275670712435789`", RowBox[{"-", "3.029177935871306`"}]}, {"3.6959036061837534`", "0.11827105598239307`", "1.7672183628051052`"}, {"3.522267474642694`", RowBox[{"-", "1.4274732885676042`"}], "3.4416934305206057`"}, {"5.432991215629195`", RowBox[{"-", "1.3270581992939643`"}], "2.2227017366668993`"}, { RowBox[{"-", "1.475854249428736`"}], RowBox[{"-", "1.072281310870421`"}], "2.0884093650297286`"}, { RowBox[{"-", "0.6512726755367148`"}], RowBox[{"-", "1.3897620472386978`"}], "4.171820402102359`"}, {"3.3723426942250367`", RowBox[{"-", "2.901510864808742`"}], "5.023861880944322`"}, {"0.31314714995445925`", "0.2508711668617887`", "5.517120503494024`"}, { RowBox[{"-", "0.13934684969220784`"}], RowBox[{"-", "1.9169056322060367`"}], "6.3872806635776165`"}, { RowBox[{"-", "1.4314050208521294`"}], "3.4303439201909276`", RowBox[{"-", "1.869579927151723`"}]}, {"6.322861868020217`", "2.863475618736276`", "0.7087696671259096`"}, {"6.783661066786394`", RowBox[{"-", "3.2286413878697386`"}], "2.2834322393106006`"}, {"7.026683072302996`", RowBox[{"-", "1.6314990272791985`"}], "0.5460526649471784`"}, {"7.691532459709684`", RowBox[{"-", "1.0888394606142722`"}], "2.7576577030145004`"}, {"5.204913437142769`", "5.975494251401147`", RowBox[{"-", "1.7258823715356233`"}]}, { RowBox[{"-", "1.736920135633116`"}], RowBox[{"-", "0.4412143548411046`"}], RowBox[{"-", "3.945094132151191`"}]}, { RowBox[{"-", "6.071303244006552`"}], RowBox[{"-", "2.0654873181919737`"}], "1.4732102471023707`"}, { RowBox[{"-", "4.752533979381655`"}], RowBox[{"-", "1.339460340528922`"}], RowBox[{"-", "6.620792279294869`"}]}, { RowBox[{"-", "9.080988898082015`"}], RowBox[{"-", "2.9617322693680936`"}], RowBox[{"-", "1.1998823530961125`"}]}, { RowBox[{"-", "8.392238795245103`"}], RowBox[{"-", "2.6413867838181484`"}], RowBox[{"-", "5.22831663029472`"}]} }, 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.5693448193083754`*^9, 3.5693892239640517`*^9, 3.56938938239793*^9, 3.569389560519043*^9, 3.56938971252571*^9, 3.5693897850970373`*^9, 3.569389936698104*^9, 3.569390130544044*^9, 3.5693903422208157`*^9, { 3.5693903933265057`*^9, 3.569390422592157*^9}, 3.5693905789200315`*^9, 3.569390621773307*^9, 3.5693907717207704`*^9, 3.569390890124978*^9, 3.569390995768364*^9, 3.5693910953121386`*^9, 3.569391142923422*^9, 3.5693912222027617`*^9, 3.5693914609455805`*^9, {3.5693914995400486`*^9, 3.5693915165908785`*^9}, 3.5693923407023287`*^9, 3.5694060978858857`*^9, 3.5694062607813716`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"dw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "-", RowBox[{"tw", "[", RowBox[{"[", RowBox[{"j", ",", "1"}], "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "-", RowBox[{"tw", "[", RowBox[{"[", RowBox[{"j", ",", "2"}], "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "-", RowBox[{"tw", "[", RowBox[{"[", RowBox[{"j", ",", "3"}], "]"}], "]"}]}], ")"}], "^", "2"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dw", "]"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", " ", RowBox[{"cloud", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}]}]}], "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}], Cell[BoxData[{ RowBox[{ RowBox[{"dc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "-", RowBox[{"t", "[", RowBox[{"[", RowBox[{"j", ",", "1"}], "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "-", RowBox[{"t", "[", RowBox[{"[", RowBox[{"j", ",", "2"}], "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "-", RowBox[{"t", "[", RowBox[{"[", RowBox[{"j", ",", "3"}], "]"}], "]"}]}], ")"}], "^", "2"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{"MatrixForm", "[", "dc", "]"}], "*)"}], " ", RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"nucleus", " ", "distances"}]}], " ", "*)"}]}]}], "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}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"tv1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"z", "[", 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[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv", " ", "=", " ", RowBox[{"Join", "[", RowBox[{"tv1", ",", "tv2", ",", "tv3"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "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}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.6095311213`", "1.33276705602`", "0.20872023669999998`"}, {"3.2102665287999996`", "1.10845657982`", "1.03294312886`"}, { RowBox[{"-", "1.3937674112999998`"}], RowBox[{"-", "0.5252493417`"}], "0.9966792869199999`"}, {"0.27293312618`", RowBox[{"-", "1.16885222278`"}], "5.2120532806`"}, {"2.8589664653999995`", RowBox[{"-", "2.0186053131999997`"}], "4.4204470592`"}, { RowBox[{"-", "3.4791745386`"}], RowBox[{"-", "1.1381819698`"}], RowBox[{"-", "0.8341250564`"}]}, { RowBox[{"-", "0.063642192228`"}], "3.3317759106`", RowBox[{"-", "1.3899501647799999`"}]}, {"4.9442791064`", "2.956476327`", "0.26013968115999997`"}, {"6.7227002449999995`", RowBox[{"-", "1.8147983640999998`"}], "1.9547325744`"}, {"1.7049107972`", "5.153471774599999`", RowBox[{"-", "2.1316109279999997`"}]}, {"4.2290178154`", "4.9801839004`", RowBox[{"-", "1.3167610768`"}]}, { RowBox[{"-", "3.0316874218`"}], RowBox[{"-", "0.89057117202`"}], RowBox[{"-", "3.4631118675999994`"}]}, { RowBox[{"-", "5.834529025`"}], RowBox[{"-", "1.9411265471999999`"}], "0.045410115779999996`"}, { RowBox[{"-", "4.9798059552`"}], RowBox[{"-", "1.47462878684`"}], RowBox[{"-", "5.192400130199999`"}]}, { RowBox[{"-", "7.782647558399999`"}], RowBox[{"-", "2.5252408537999997`"}], RowBox[{"-", "1.68378366052`"}]}, { RowBox[{"-", "7.337995030599999`"}], RowBox[{"-", "2.3050877748`"}], RowBox[{"-", "4.2870324036000005`"}]}, {"0.8002800637399999`", "7.581580711999999`", RowBox[{"-", "4.073682338199999`"}]}, {"4.170625282`", RowBox[{"-", "0.84965860412`"}], "2.48498969`"}, { RowBox[{"-", "1.55594369662`"}], RowBox[{"-", "1.60600253836`"}], "3.1535747487999997`"}, {"3.8523954236`", RowBox[{"-", "3.7271065897999995`"}], "5.5881087545999995`"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0.3289068103`", "0.80725315268`", "5.636674712799999`"}, { RowBox[{"-", "0.30090107097999996`"}], RowBox[{"-", "2.2100345569999997`"}], "6.847800106199999`"}, { RowBox[{"-", "1.9673937386`"}], "3.4689700182`", RowBox[{"-", "2.0575336687999997`"}]}, {"6.8631068868`", "2.8270300959999997`", "0.8845807406`"}, {"6.8075489423999995`", RowBox[{"-", "3.7826645341999994`"}], "2.412235239`"}, {"7.145809896399999`", RowBox[{"-", "1.55966645684`"}], RowBox[{"-", "0.0059902424474`"}]}, {"8.0712087186`", RowBox[{"-", "0.8043429746399999`"}], "3.0723165308000002`"}, {"5.5873528642`", "6.365542031`", RowBox[{"-", "1.8862111096399998`"}]}, { RowBox[{"-", "1.2295502218999999`"}], RowBox[{"-", "0.2651285578`"}], RowBox[{"-", "4.1339645975999995`"}]}, { RowBox[{"-", "6.164097239399999`"}], RowBox[{"-", "2.1142254487999996`"}], "2.0327782581999996`"}, { RowBox[{"-", "4.6634658228`"}], RowBox[{"-", "1.28648766628`"}], RowBox[{"-", "7.1805808548`"}]}, { RowBox[{"-", "9.5897925322`"}], RowBox[{"-", "3.1327877628`"}], RowBox[{"-", "1.0102475196`"}]}, { RowBox[{"-", "8.8053672696`"}], RowBox[{"-", "2.773172905`"}], RowBox[{"-", "5.5971794394`"}]} }, 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.5693448195891757`*^9, 3.569389224010852*^9, 3.56938938244473*^9, 3.569389560565843*^9, 3.56938971257251*^9, 3.5693897851594377`*^9, 3.5693899367449036`*^9, 3.569390130590844*^9, 3.5693903422676163`*^9, { 3.5693903933889055`*^9, 3.569390422638957*^9}, 3.5693905789668317`*^9, 3.569390621820107*^9, 3.5693907717675705`*^9, 3.5693908901717787`*^9, 3.569390995830764*^9, 3.5693910953589387`*^9, 3.5693911429858227`*^9, 3.5693912222651615`*^9, 3.569391460992381*^9, {3.5693914995868487`*^9, 3.5693915166376786`*^9}, 3.569392340749129*^9, 3.569406097932686*^9, 3.5694062608281717`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"dcw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"sq", "=", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "-", RowBox[{"tv", "[", RowBox[{"[", RowBox[{"j", ",", "1"}], "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "-", RowBox[{"tv", "[", RowBox[{"[", RowBox[{"j", ",", "2"}], "]"}], "]"}]}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "-", RowBox[{"tv", "[", RowBox[{"[", RowBox[{"j", ",", "3"}], "]"}], "]"}]}], ")"}], "^", "2"}]}], "]"}]}], ";", RowBox[{"If", "[", RowBox[{ RowBox[{"sq", ">", " ", "0.1"}], ",", StyleBox[ RowBox[{ RowBox[{"-", "2"}], "/", "sq"}], FontColor->RGBColor[1, 0, 0]], ",", "0"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"dcw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", " ", "j"}], ",", RowBox[{ RowBox[{"dcw", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "=", "0.0"}], ",", RowBox[{"dcw", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dcw", "]"}], "*)"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}]}]}], "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}], Cell[CellGroupData[{ Cell[BoxData[ 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"}], "}"}]}], "]"}]}], "]"}]}]], "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.5692132215357027`*^9, 3.5692134269568634`*^9}, { 3.569213527889041*^9, 3.569213567871911*^9}, {3.5692136024727716`*^9, 3.5692136035959735`*^9}, {3.5692136633596783`*^9, 3.5692136641240797`*^9}, {3.5692137511410327`*^9, 3.569213751343833*^9}, { 3.569213815132345*^9, 3.569213856659618*^9}, {3.5692138980308905`*^9, 3.5692139153313212`*^9}, {3.5692139536293883`*^9, 3.5692140116146903`*^9}, {3.569214080816412*^9, 3.5692141084596605`*^9}, { 3.569233762887478*^9, 3.5692337633554783`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "17.`", ",", "7.`", ",", "7.`", ",", "8.`", ",", "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.`"}], "}"}]], "Output", CellChangeTimes->{ 3.569344819635976*^9, 3.569389224057652*^9, 3.5693893824915304`*^9, 3.5693895606126432`*^9, 3.56938971261931*^9, 3.569389785206238*^9, 3.5693899367917037`*^9, 3.5693901306376443`*^9, 3.569390342314416*^9, { 3.5693903934513063`*^9, 3.569390422701357*^9}, 3.569390579013632*^9, 3.569390621866907*^9, 3.56939077181437*^9, 3.5693908902185783`*^9, 3.569390995861964*^9, 3.569391095405739*^9, 3.5693911430326223`*^9, 3.569391222296362*^9, 3.5693914610391808`*^9, {3.569391499633649*^9, 3.5693915166844788`*^9}, 3.569392340795929*^9, 3.569406098010686*^9, 3.569406260874972*^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", "<", RowBox[{"bt", "+", "1"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"4", "/", 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}}], Cell[BoxData["1048.8698951864308`"], "Output", CellChangeTimes->{ 3.5693448196671762`*^9, 3.5693892240732517`*^9, 3.56938938250713*^9, 3.5693895606282434`*^9, 3.56938971265051*^9, 3.5693897852218375`*^9, 3.5693899368229036`*^9, 3.5693901306532445`*^9, 3.569390342330016*^9, { 3.569390393466906*^9, 3.5693904227325573`*^9}, 3.569390579029232*^9, 3.5693906218981075`*^9, 3.5693907718455706`*^9, 3.5693908902497787`*^9, 3.5693909958931637`*^9, 3.569391095436939*^9, 3.5693911430482225`*^9, 3.5693912223275614`*^9, 3.569391461070381*^9, {3.569391499649249*^9, 3.5693915167156787`*^9}, 3.569392340827129*^9, 3.569406098041886*^9, 3.569406260906172*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"sc", "=", "0.24"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"core", " ", "clouds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sc", "/", RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"sw", "=", "0.24"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"bonding", " ", "clouds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "<", RowBox[{"nb", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sw", "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}]}]}]}]}], "]"}], "\[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}}], Cell[BoxData["1128.3120149738672`"], "Output", CellChangeTimes->{ 3.569344819682776*^9, 3.569389224104452*^9, 3.56938938253833*^9, 3.569389560643843*^9, 3.56938971266611*^9, 3.5693897852374372`*^9, 3.569389936838504*^9, 3.5693901306844444`*^9, 3.5693903423456163`*^9, { 3.569390393498106*^9, 3.5693904227481575`*^9}, 3.569390579060432*^9, 3.5693906219137073`*^9, 3.5693907718611703`*^9, 3.5693908902653785`*^9, 3.569390995908764*^9, 3.5693910954525385`*^9, 3.5693911430638227`*^9, 3.5693912223431616`*^9, 3.5693914610859814`*^9, {3.569391499664849*^9, 3.569391516731279*^9}, 3.5693923408427286`*^9, 3.5694060980574856`*^9, 3.569406260921772*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"all", " ", "nuclei", " ", "with", " ", "all", " ", "clouds"}], ",", " ", RowBox[{ RowBox[{"except", " ", "i"}], " ", "=", " ", "j"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Vne", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"cnv", ".", "dcw"}]}], "]"}]}]}]], "Input", CellChangeTimes->{3.569233528637466*^9, 3.5692342309507*^9}], Cell[BoxData[ RowBox[{"-", "2783.608116353159`"}]], "Output", CellChangeTimes->{ 3.5693448196983757`*^9, 3.5693892241200523`*^9, 3.5693893825539303`*^9, 3.5693895607062435`*^9, 3.56938971272851*^9, 3.5693897852686377`*^9, 3.569389936854104*^9, 3.5693901307000446`*^9, 3.569390342361216*^9, { 3.569390393513706*^9, 3.569390422763757*^9}, 3.5693905790760317`*^9, 3.569390621944907*^9, 3.5693907718767705`*^9, 3.569390890280978*^9, 3.569390995924364*^9, 3.5693910954681387`*^9, 3.5693911430794225`*^9, 3.569391222358762*^9, 3.569391461101581*^9, {3.5693914996804485`*^9, 3.5693915167468786`*^9}, 3.569392340858329*^9, 3.569406098073086*^9, 3.569406260937372*^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", "<", RowBox[{"bc", "+", "1"}]}], ",", 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}], Cell[BoxData[ RowBox[{"-", "4336.33566816957`"}]], "Output", CellChangeTimes->{ 3.569344819729576*^9, 3.569389224135652*^9, 3.56938938261633*^9, 3.569389560737443*^9, 3.5693897127597103`*^9, 3.569389785284238*^9, 3.569389936885304*^9, 3.5693901307156444`*^9, 3.569390342392416*^9, { 3.569390393529306*^9, 3.569390422794957*^9}, 3.569390579091632*^9, 3.5693906219605074`*^9, 3.5693907718923707`*^9, 3.5693908902965784`*^9, 3.569390995955564*^9, 3.569391095499339*^9, 3.5693911431106224`*^9, 3.5693912224211617`*^9, 3.5693914611639814`*^9, {3.569391499711649*^9, 3.569391516778079*^9}, 3.5693923409207287`*^9, 3.569406098088686*^9, 3.5694062609685717`*^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", "<", RowBox[{"nb", "+", "1"}]}], ",", 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}}], Cell[BoxData[ RowBox[{"-", "4366.4449860258255`"}]], "Output", CellChangeTimes->{ 3.5693448197451763`*^9, 3.569389224166852*^9, 3.5693893826475306`*^9, 3.569389560753043*^9, 3.5693897127753105`*^9, 3.5693897852998376`*^9, 3.5693899369009037`*^9, 3.5693901307468443`*^9, 3.569390342408016*^9, { 3.5693903935449057`*^9, 3.5693904228105574`*^9}, 3.569390579107232*^9, 3.569390621976107*^9, 3.5693907719235706`*^9, 3.5693908903121786`*^9, 3.5693909959711637`*^9, 3.5693910955149393`*^9, 3.5693911431262226`*^9, 3.569391222436762*^9, 3.569391461179581*^9, {3.569391499727249*^9, 3.5693915167936788`*^9}, 3.569392340936329*^9, 3.569406098119886*^9, 3.569406260984172*^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", "<", RowBox[{"n", "+", "1"}]}], ",", 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}], Cell[BoxData["1577.872569143153`"], "Output", CellChangeTimes->{ 3.569344819776376*^9, 3.569389224182452*^9, 3.5693893826631303`*^9, 3.5693895607686434`*^9, 3.5693897127909107`*^9, 3.5693897853310375`*^9, 3.569389936916504*^9, 3.5693901308092446`*^9, 3.5693903424236164`*^9, { 3.569390393560506*^9, 3.5693904228261576`*^9}, 3.5693905791228323`*^9, 3.569390621991707*^9, 3.569390771939171*^9, 3.5693908903433785`*^9, 3.569390995986764*^9, 3.569391095530539*^9, 3.569391143141823*^9, 3.5693912224679623`*^9, 3.569391461195181*^9, {3.5693914997428493`*^9, 3.5693915168092785`*^9}, 3.569392340951929*^9, 3.5694060981354856`*^9, 3.569406260999772*^9}] }, Open ]], Cell[BoxData[""], "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.5689102484819775`*^9}, {3.568910416821873*^9, 3.568910421314681*^9}, { 3.5689104658527594`*^9, 3.568910491858005*^9}, {3.5689105421368933`*^9, 3.5689105444144974`*^9}, {3.568912692943871*^9, 3.56891270358309*^9}, { 3.569081202041748*^9, 3.5690812220097833`*^9}, {3.569081528363121*^9, 3.5690815341975317`*^9}, {3.5690815797964115`*^9, 3.5690815808572135`*^9}, {3.569087876950272*^9, 3.569087906793124*^9}, { 3.5691451539721675`*^9, 3.5691451954526405`*^9}, 3.56914526334396*^9, { 3.5691715700987234`*^9, 3.5691716005343766`*^9}, 3.5692316175093093`*^9}], Cell[CellGroupData[{ Cell[BoxData[{"Vee", "\[IndentingNewLine]", "Vnn", "\[IndentingNewLine]", \ "Vne", "\[IndentingNewLine]", RowBox[{"Vtot", "=", RowBox[{ "Vne", "+", "Vee", "+", "Vnn"}]}], "\[IndentingNewLine]", "Ttot", "\[IndentingNewLine]", 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}}], Cell[BoxData["1128.3120149738672`"], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}], Cell[BoxData["1577.872569143153`"], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}], Cell[BoxData[ RowBox[{"-", "4366.4449860258255`"}]], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}], Cell[BoxData[ RowBox[{"-", "1660.2604019088055`"}]], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}], Cell[BoxData["784.8000735493883`"], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}], Cell[BoxData["2.1155201915310773`"], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}], Cell[BoxData[ RowBox[{"-", "875.4603283594172`"}]], "Output", CellChangeTimes->{ 3.569344819791976*^9, 3.569389224213652*^9, 3.5693893826943307`*^9, 3.5693895607998433`*^9, 3.56938971282211*^9, 3.5693897853466377`*^9, 3.569389936932104*^9, 3.5693901308248444`*^9, 3.5693903424392166`*^9, { 3.5693903935917063`*^9, 3.569390422841758*^9}, 3.5693905791540318`*^9, 3.5693906220229073`*^9, 3.569390771954771*^9, 3.5693908903589783`*^9, 3.5693909960179644`*^9, 3.569391095546139*^9, 3.5693911431730227`*^9, 3.569391222483562*^9, 3.5693914612263813`*^9, {3.569391499758449*^9, 3.5693915168248787`*^9}, 3.5693923409675293`*^9, 3.569406098151086*^9, 3.569406261062172*^9}] }, Open ]] }, WindowSize->{1294, 939}, WindowMargins->{{Automatic, 52}, {Automatic, 0}}, PrintingCopies->1, PrintingPageRange->{32000, 32000}, PrintingOptions->{"Magnification"->1., "PaperOrientation"->"Portrait", "PaperSize"->{595.2, 841.8}}, Magnification->0.8999999761581421, 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, 1188, 23, 50, "Input"], Cell[CellGroupData[{ Cell[1770, 47, 874, 13, 29, "Input"], Cell[2647, 62, 4952, 83, 287, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7636, 150, 1823, 28, 50, "Input"], Cell[9462, 180, 4553, 112, 505, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[14052, 297, 1293, 19, 29, "Input"], Cell[15348, 318, 1319, 20, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[16704, 343, 251, 5, 26, "Input"], Cell[16958, 350, 669, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[17664, 365, 1560, 29, 26, "Input"], Cell[19227, 396, 1313, 20, 25, "Output"] }, Open ]], Cell[20555, 419, 1390, 22, 26, "Input"], Cell[21948, 443, 1566, 28, 26, "Input"], Cell[CellGroupData[{ Cell[23539, 475, 1234, 18, 26, "Input"], Cell[24776, 495, 2923, 78, 43, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[27736, 578, 697, 14, 26, "Input"], Cell[28436, 594, 1070, 18, 25, "Output"] }, Open ]], Cell[29521, 615, 908, 24, 26, "Input"], Cell[CellGroupData[{ Cell[30454, 643, 4677, 109, 44, "Input"], Cell[35134, 754, 1180, 19, 43, "Output"], Cell[36317, 775, 1186, 19, 43, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[37540, 799, 519, 12, 26, "Input"], Cell[38062, 813, 1318, 20, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[39417, 838, 1401, 38, 26, "Input"], Cell[40821, 878, 1109, 18, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[41967, 901, 827, 23, 80, "Input"], Cell[42797, 926, 667, 10, 25, "Output"], Cell[43467, 938, 667, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[44171, 953, 1921, 38, 98, "Input"], Cell[46095, 993, 683, 10, 25, "Output"] }, Open ]], Cell[46793, 1006, 935, 19, 26, "Input"], Cell[47731, 1027, 3874, 75, 62, "Input"], Cell[51608, 1104, 3240, 56, 26, "Input"], Cell[CellGroupData[{ Cell[54873, 1164, 1139, 17, 26, "Input"], Cell[56015, 1183, 27196, 655, 179, "Output"] }, Open ]], Cell[83226, 1841, 1254, 35, 62, "Input"], Cell[CellGroupData[{ Cell[84505, 1880, 4724, 93, 80, "Input"], Cell[89232, 1975, 7999, 125, 465, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[97268, 2105, 3292, 75, 98, "Input"], Cell[100563, 2182, 1223, 20, 43, "Output"] }, Open ]], Cell[101801, 2205, 1808, 44, 80, "Input"], Cell[103612, 2251, 561, 12, 44, "Input"], Cell[104176, 2265, 2148, 49, 80, "Input"], Cell[106327, 2316, 2230, 52, 62, "Input"], Cell[108560, 2370, 1525, 36, 44, "Input"], Cell[CellGroupData[{ Cell[110110, 2410, 923, 20, 26, "Input"], Cell[111036, 2432, 679, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[111752, 2447, 711, 18, 26, "Input"], Cell[112466, 2467, 676, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[113179, 2482, 507, 10, 26, "Input"], Cell[113689, 2494, 678, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[114404, 2509, 823, 23, 26, "Input"], Cell[115230, 2534, 678, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[115945, 2549, 204, 4, 26, "Input"], Cell[116152, 2555, 688, 10, 25, "Output"] }, Open ]], Cell[116855, 2568, 1971, 35, 80, "Input"], Cell[118829, 2605, 1686, 24, 26, "Input"], Cell[120518, 2631, 1655, 24, 26, "Input"], Cell[122176, 2657, 2877, 57, 62, "Input"], Cell[125056, 2716, 2696, 53, 80, "Input"], Cell[CellGroupData[{ Cell[127777, 2773, 939, 17, 62, "Input"], Cell[128719, 2792, 3769, 83, 77, "Output"], Cell[132491, 2877, 664, 10, 25, "Output"], Cell[133158, 2889, 664, 10, 25, "Output"] }, Open ]], Cell[133837, 2902, 10201, 233, 62, "Input"], Cell[144041, 3137, 6103, 99, 26, "Input"], Cell[150147, 3238, 10215, 234, 62, "Input"], Cell[160365, 3474, 6035, 97, 26, "Input"], Cell[CellGroupData[{ Cell[166425, 3575, 7377, 133, 62, "Input"], Cell[173805, 3710, 127285, 2147, 408, 16163, 325, "CachedBoxData", "BoxData", \ "Output"], Cell[301093, 5859, 13300, 231, 332, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[314430, 6095, 3719, 87, 134, "Input"], Cell[318152, 6184, 666, 10, 25, "Output"], Cell[318821, 6196, 6946, 168, 762, "Output"] }, Open ]], Cell[325782, 6367, 2957, 66, 62, "Input"], Cell[328742, 6435, 2879, 65, 62, "Input"], Cell[CellGroupData[{ Cell[331646, 6504, 3365, 73, 98, "Input"], Cell[335014, 6579, 5036, 134, 762, "Output"] }, Open ]], Cell[340065, 6716, 4847, 108, 80, "Input"], Cell[CellGroupData[{ Cell[344937, 6828, 2891, 52, 26, "Input"], Cell[347831, 6882, 1378, 22, 43, "Output"] }, Open ]], Cell[349224, 6907, 1863, 27, 26, "Input"], Cell[CellGroupData[{ Cell[351112, 6938, 2435, 46, 98, "Input"], Cell[353550, 6986, 681, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[354268, 7001, 1844, 47, 98, "Input"], Cell[356115, 7050, 679, 10, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[356831, 7065, 455, 13, 44, "Input"], Cell[357289, 7080, 694, 11, 25, "Output"] }, Open ]], Cell[357998, 7094, 1381, 21, 26, "Input"], Cell[CellGroupData[{ Cell[359404, 7119, 1709, 32, 44, "Input"], Cell[361116, 7153, 689, 11, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[361842, 7169, 1415, 43, 62, "Input"], Cell[363260, 7214, 700, 11, 25, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[363997, 7230, 2550, 50, 80, "Input"], Cell[366550, 7282, 680, 10, 25, "Output"] }, Open ]], Cell[367245, 7295, 1499, 20, 26, "Input"], Cell[CellGroupData[{ Cell[368769, 7319, 669, 13, 152, "Input"], Cell[369441, 7334, 682, 10, 25, "Output"], Cell[370126, 7346, 681, 10, 25, "Output"], Cell[370810, 7358, 699, 11, 25, "Output"], Cell[371512, 7371, 699, 11, 25, "Output"], Cell[372214, 7384, 681, 10, 25, "Output"], Cell[372898, 7396, 682, 10, 25, "Output"], Cell[373583, 7408, 698, 11, 25, "Output"] }, Open ]] } ] *) (* End of internal cache information *)