(* 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[ 444128, 8857] NotebookOptionsPosition[ 437341, 8642] NotebookOutlinePosition[ 437842, 8662] CellTagsIndexPosition[ 437799, 8659] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Kimball", " ", "model", " ", "and", " ", "energy", " ", "derived", " ", "from", " ", "Wolfram", " ", "source"}], ",", " ", RowBox[{"ES", " ", "27", " ", "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}, {3.570297588441428*^9, 3.5702976026530533`*^9}, {3.570558862041448*^9, 3.5705588713234644`*^9}, 3.5705590387585583`*^9, {3.570855141170933*^9, 3.570855146100541*^9}, { 3.5708563212974052`*^9, 3.5708563224362073`*^9}, {3.5708588179101906`*^9, 3.570858820452995*^9}, 3.570949483910489*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"ChemicalData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.570856547809803*^9, 3.5708565502590075`*^9}, 3.5708567094884872`*^9, 3.5709425310070767`*^9, 3.5709522701289825`*^9}], Cell[BoxData[ Graphics3DBox[ {AbsoluteThickness[3], EdgeForm[None], Specularity[ GrayLevel[1], 100], GraphicsComplex3DBox[CompressedData[" 1:eJwtVA1QVFUUZozSHDDxh2lMIMGsxhFBIILl50AqIC2wy++CwO6yu7DA/vBW 2A1oo4yISAFTTLJRikZRMCTHmAo9yag0aQIa1TilkhpJOiJZmdB07z17Z968 effdc853vu87d4XWotTPcXNzi2fPI+xpPnX/uc15Ehj42iHBteolRxJaNVgR Pf+Hj4N08PxmfsKAfvWTiv5VdlD2+9ZPflKD7K81erwEVzd4//Td3AwUcQM2 /LZjw/HpV1+muE4b8jDfVgmupG7bbX5HCW581emx08oKNJWCyONfjufPsdVd BIMMTnOMA8MKvkjyGI/C0q+2vPekezKE8NVkQ/F/hw5EvC2f4vaWguijMA44 nL8PZ0L7Hrbi1LiiVypp/TAOWbY5qw/EI4evSFRCY5z6xrCUQnGWVIh5Jedg mNwbWm/XxoaZ07CrMwUWdzwFfzD49bES9f1AC/uXrf15ZVsScNjzG0zg4eeV 7t9456TI82w59e0oRfFtL8LHXt/1UtNMPHI6rY+qUdBZG0n9TOro2yHBX6yt U5l6OHgmObzx6xw6v8EIgj+5FoU+Z8zUd3gVCjxHC7Cp/LeHXSNBpEeBFWuY DNcis0hPZwme2McAu7vqBWRRfF4RRBwbqjrxaSrw49U7NVBfO/yZKswP3bMW rOnzSXXxqSJdV6SjObTuc3hjNlbo16IhPGMZIPisc1D+EA0w9tN/3ZVJui6y 0P9hE/G9LIfqX9TDv06m7KCc4uZKpPu6Sjj9NBNsJBBE/2sspKPRgIIfUxke mhqVa4fXE19LjYSvw/VuVKOMGy1lE/K2lmxXgfBtoJ74HMhFn1yd7MqFBBR5 g80Up3L5/ryN/JlmonpyDek+YCW/bnWQHwbrXPkMuPH49OylCQUK3WccOK97 ea7uYjb5I7mS8hhd+aNNIHx9L598mCsRH2ttYBUJi1HEfWmgeJmO8q63QSjn 6aSWdB0tw3Ge73s7CL3vOKgfHx2maBfmREQl4lJOQJuTcF8opnr/KAmPp4R8 LG5HKUH477qF5jS/Cu3cMI+nEw+OLShwvSnBzWH/yw/aC0Dwf1dN+xNGSOSN hRdT/Qgj4ZTZ8e4BZuT7SlzJB+CDdcDL9/9ZgSJvbyHV3VuEwn9XNcCms8H7 9wRgbp4aPaok3rdZSGdFNvEuU9C+VzksdnbtC78RBLdWBc/rdhbB/sM9Pxb6 puJH7PqZjUrCTbfcQ70MgcRTvh7fNy/air9kI3Oh/+WReBT5AtR4TtxXXshf sztVKObvm0SYYTDkR5Su/vJA3EMLFVDF+QlWwX99Nfd635ZBW59HRfc0AGP9 2NDNDNzd8kT1C8VxmPvWi2OnezxhiAecVWFvWlm7vWUj4S+sBD5ezd5amr8g Bc3JdSvNu74E+FhPSUqI4bboMYIz0jckLSma5sLTSv54WAGXFrwmH5tYTr44 ZALRb0UJivxSMdIgzsa28I2zRvLBuwZkajpLEzNR8L4ni857p9H95aGne0mX j1e5gAHP0LxvN+L/vVnmLw== "], { {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.], SphereBox[34, 24.], SphereBox[35, 24.], SphereBox[36, 24.]}, {RGBColor[0.4, 0.4, 0.4], 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[9, 32.], SphereBox[10, 32.]}, {RGBColor[0.800498, 0.201504, 0.192061], SphereBox[1, 31.], SphereBox[2, 31.], SphereBox[3, 31.], SphereBox[4, 31.], SphereBox[5, 31.], SphereBox[6, 31.], SphereBox[7, 31.], SphereBox[8, 31.]}, {RGBColor[0.65, 0.7, 0.7], CylinderBox[{38, 33}, 15.], CylinderBox[{40, 34}, 15.], CylinderBox[{42, 35}, 15.], CylinderBox[{44, 36}, 15.], CylinderBox[{55, 21}, 15.], CylinderBox[{56, 22}, 15.], CylinderBox[{57, 23}, 15.], CylinderBox[{58, 24}, 15.], CylinderBox[{59, 25}, 15.], CylinderBox[{60, 26}, 15.], CylinderBox[{61, 27}, 15.], CylinderBox[{62, 28}, 15.], CylinderBox[{63, 29}, 15.], CylinderBox[{64, 30}, 15.], CylinderBox[{65, 31}, 15.], CylinderBox[{66, 32}, 15.]}, {RGBColor[0.4, 0.4, 0.4], CylinderBox[{37, 17}, 15.], CylinderBox[{39, 18}, 15.], CylinderBox[{41, 19}, 15.], CylinderBox[{43, 20}, 15.], CylinderBox[{45, 17}, 15.], CylinderBox[{46, 18}, 15.], CylinderBox[{47, 19}, 15.], CylinderBox[{48, 20}, 15.], CylinderBox[{49, 11}, 15.], CylinderBox[{50, 13}, 15.], CylinderBox[{51, 14}, 15.], CylinderBox[{52, 12}, 15.], CylinderBox[{53, 15}, 15.], CylinderBox[{54, 16}, 15.], CylinderBox[{11, 12}, 15.], CylinderBox[{11, 55}, 15.], CylinderBox[{11, 56}, 15.], CylinderBox[{12, 57}, 15.], CylinderBox[{12, 58}, 15.], CylinderBox[{13, 17}, 15.], CylinderBox[{13, 59}, 15.], CylinderBox[{13, 60}, 15.], CylinderBox[{14, 18}, 15.], CylinderBox[{14, 61}, 15.], CylinderBox[{14, 62}, 15.], CylinderBox[{15, 19}, 15.], CylinderBox[{15, 63}, 15.], CylinderBox[{15, 64}, 15.], CylinderBox[{16, 20}, 15.], CylinderBox[{16, 65}, 15.], CylinderBox[{16, 66}, 15.]}, {RGBColor[0.291989, 0.437977, 0.888609], CylinderBox[{9, 49}, 15.], CylinderBox[{9, 50}, 15.], CylinderBox[{9, 51}, 15.], CylinderBox[{10, 52}, 15.], CylinderBox[{10, 53}, 15.], CylinderBox[{10, 54}, 15.]}, {RGBColor[0.800498, 0.201504, 0.192061], CylinderBox[{1, 37}, 15.], CylinderBox[{1, 38}, 15.], CylinderBox[{2, 39}, 15.], CylinderBox[{2, 40}, 15.], CylinderBox[{3, 41}, 15.], CylinderBox[{3, 42}, 15.], CylinderBox[{4, 43}, 15.], CylinderBox[{4, 44}, 15.], CylinderBox[{5, 45}, 15.], CylinderBox[{6, 46}, 15.], CylinderBox[{7, 47}, 15.], CylinderBox[{8, 48}, 15.]}}]}, Boxed->False, ImageSize->328.76038291506984`, Lighting->"Neutral", ViewPoint->{1.3, -2.4, -2.}]], "Output", CellChangeTimes->{3.5709523159930634`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"t1", "=", RowBox[{"0.01889726", "*", RowBox[{"ChemicalData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]}], ";"}], "\n", RowBox[{"MatrixForm", "[", "t1", "]"}]}], "Input", CellChangeTimes->{ 3.57029749846047*^9, {3.570297893562364*^9, 3.5702979152152023`*^9}, { 3.5704535321223855`*^9, 3.570453555038826*^9}, {3.570558892227501*^9, 3.5705589112283344`*^9}, {3.5705589864360666`*^9, 3.5705590132681136`*^9}, {3.5705590525489826`*^9, 3.5705590747322216`*^9}, {3.570595322227199*^9, 3.5705953504632483`*^9}, 3.570855059411189*^9, 3.570856566545436*^9, 3.5709425310226765`*^9, 3.5709522701289825`*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"5.550314234599999`", "5.615320808999999`", RowBox[{"-", "2.6558209203999996`"}]}, {"3.0522854352`", RowBox[{"-", "3.3501062528`"}], "6.9999230491999995`"}, { RowBox[{"-", "8.3595809062`"}], RowBox[{"-", "3.7618775481999998`"}], RowBox[{"-", "1.5140862657199998`"}]}, { RowBox[{"-", "5.9683216258`"}], "1.07684146384`", RowBox[{"-", "5.9395977906`"}]}, {"5.6138090281999995`", "1.4014774933799998`", RowBox[{"-", "3.2503287199999997`"}]}, {"4.0132111062`", RowBox[{"-", "4.253206308199999`"}], "2.974428724`"}, { RowBox[{"-", "7.3304361266`"}], RowBox[{"-", "0.54580956058`"}], "1.0210567523199998`"}, { RowBox[{"-", "5.909173202`"}], "3.1101110508`", RowBox[{"-", "2.2262862006`"}]}, {"4.023226654`", "0.6565852986999999`", "1.6381467776199998`"}, { RowBox[{"-", "2.457588663`"}], RowBox[{"-", "0.66576936706`"}], RowBox[{"-", "0.7049811815599999`"}]}, {"1.3819566237999998`", "1.1507864422199998`", "1.1880707361999998`"}, {"0.105359783404`", RowBox[{"-", "1.2419657217199997`"}], "0.130529043998`"}, {"5.517433002200001`", "2.8687930406`", "0.9670294859799999`"}, {"4.4639107572`", RowBox[{"-", "0.0180325213824`"}], "4.256229869799999`"}, { RowBox[{"-", "4.0020617228`"}], RowBox[{"-", "2.9428702997999996`"}], RowBox[{"-", "0.71758565398`"}]}, { RowBox[{"-", "2.4220618141999997`"}], "0.5004939311`", RowBox[{"-", "3.1624564609999997`"}]}, {"5.5843293026`", "3.2253843368`", RowBox[{"-", "1.87128227424`"}]}, {"3.8204590541999996`", RowBox[{"-", "2.7667478366`"}], "4.652505411999999`"}, { RowBox[{"-", "6.7177869573999995`"}], RowBox[{"-", "2.3202055828`"}], RowBox[{"-", "0.31783301593999996`"}]}, { RowBox[{"-", "4.9490034214`"}], "1.6803443592`", RowBox[{"-", "3.7029180969999995`"}]}, {"0.49168780793999994`", "1.673352373`", "2.9266186562`"}, {"1.1975760579799999`", "2.6577106463999995`", RowBox[{"-", "0.147438312246`"}]}, {"1.1760142843199999`", RowBox[{"-", "1.9178829173999998`"}], RowBox[{"-", "1.4460183351999998`"}]}, {"0.034852216618`", RowBox[{"-", "2.65506503`"}], "1.5750866209999999`"}, {"7.408103865199999`", "2.600262976`", "1.63162722292`"}, {"4.6972919181999995`", "4.5071854826`", "1.8220549119399998`"}, {"3.2998395412`", "1.12489719602`", "5.450914646999999`"}, {"6.4091947016`", "0.29118787934`", "4.7133545892`"}, { RowBox[{"-", "3.388278718`"}], RowBox[{"-", "4.1466257618`"}], "0.78665513928`"}, { RowBox[{"-", "3.7923021368`"}], RowBox[{"-", "3.8746941903999996`"}], RowBox[{"-", "2.4999185253999996`"}]}, { RowBox[{"-", "0.9942604376399999`"}], "1.9316779171999998`", RowBox[{"-", "3.2023296796`"}]}, { RowBox[{"-", "2.0212509296`"}], RowBox[{"-", "0.89996311024`"}], RowBox[{"-", "4.564633153`"}]}, {"5.5478575908`", "5.987218885799999`", RowBox[{"-", "4.43140747`"}]}, {"2.6159477018`", RowBox[{"-", "5.0620090362`"}], "7.4122612623999995`"}, { RowBox[{"-", "10.1372461544`"}], RowBox[{"-", "3.4377895391999997`"}], RowBox[{"-", "1.35376191188`"}]}, { RowBox[{"-", "7.5553135205999995`"}], "1.8009655697799998`", RowBox[{"-", "6.4381075094`"}]} }, 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.5709523160242634`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"u", "=", RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{ 3.57029749846047*^9, {3.570297893562364*^9, 3.5702979152152023`*^9}, { 3.5704535321223855`*^9, 3.570453555038826*^9}, {3.570558892227501*^9, 3.5705589112283344`*^9}, {3.5705589864360666`*^9, 3.5705590132681136`*^9}, 3.5705592408949137`*^9, {3.5705593512807074`*^9, 3.5705593890483737`*^9}, { 3.570559442712468*^9, 3.5705594826641383`*^9}, 3.5708550837628317`*^9, 3.570856587480673*^9, 3.5709425310226765`*^9, 3.5709522701445827`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>"}], "}"}]], "Output", CellChangeTimes->{3.5709523160398636`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"n", "=", RowBox[{"Length", "[", "t1", "]"}]}]], "Input", CellChangeTimes->{{3.568278170270548*^9, 3.568278174310955*^9}, { 3.5682782109554195`*^9, 3.5682782183342323`*^9}, {3.5688220426984916`*^9, 3.5688220506389055`*^9}, {3.568822092353379*^9, 3.568822123693834*^9}, 3.568873215924739*^9, 3.5689108676002645`*^9, 3.5689997098237543`*^9, 3.5689998170115423`*^9, 3.568999886915265*^9, 3.5691460425981283`*^9, { 3.5692371678918586`*^9, 3.569237204489523*^9}, 3.569237465805582*^9, 3.56923802261736*^9, 3.5693403424025126`*^9, 3.5693404501675014`*^9, 3.569340737988007*^9, 3.569340852819809*^9, 3.569341165475558*^9, 3.56934149694494*^9, 3.569342614390503*^9, 3.569343567162176*^9, 3.569343662712344*^9, 3.569343763597721*^9, 3.5693440703198595`*^9, 3.569344266209404*^9, 3.5702973471714044`*^9, 3.5702974395391665`*^9, { 3.570297637207114*^9, 3.570297637987115*^9}, 3.570297920051211*^9}], Cell[BoxData["36"], "Output", CellChangeTimes->{3.570952316055464*^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[{"\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>"}], "}"}]], "Output", CellChangeTimes->{3.5709523160710635`*^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\"\>", ",", "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[{"\<\"N\"\>", ",", "9"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "8"}], "}"}], ",", 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"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "34"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "35"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "36"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5709523160710635`*^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[{ "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "9", ",", "10", ",", "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ",", "21", ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", "35", ",", "36"}], "}"}]], "Output", CellChangeTimes->{3.5709523160866632`*^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.2557", ",", 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}, 3.570595843597315*^9, 3.5705958765133724`*^9, {3.5706006955110383`*^9, 3.57060069660304*^9}, {3.570600739659116*^9, 3.5706007402207165`*^9}, { 3.5706007784563837`*^9, 3.5706008313872766`*^9}, {3.5706008641161346`*^9, 3.5706008892321787`*^9}, 3.5706010214580107`*^9, {3.5706011135917726`*^9, 3.570601115058175*^9}, {3.5706011509850388`*^9, 3.5706011750714808`*^9}, { 3.5706012352719865`*^9, 3.570601260746831*^9}, 3.570856110868636*^9, 3.570856144034294*^9, 3.5708561753903494`*^9, {3.5708562115824127`*^9, 3.570856236261656*^9}, 3.5708568877188005`*^9, 3.570856960992129*^9, { 3.5708570022854013`*^9, 3.570857003424204*^9}, 3.5708574863854513`*^9, 3.570857676003785*^9, {3.570857720697863*^9, 3.570857774736358*^9}, { 3.570857815015629*^9, 3.570857815265229*^9}, {3.5708578488052883`*^9, 3.5708579513754683`*^9}, {3.5708579844319267`*^9, 3.570858009937971*^9}, { 3.5708583084132957`*^9, 3.570858421435494*^9}}], 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.24`", ",", "0.24`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "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`", ",", "0.1`", ",", "0.1`", ",", "0.1`"}], "}"}]], "Output", CellChangeTimes->{3.5709523161022635`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.22522`", ",", "0.22522`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "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`", ",", "0.6`", ",", "0.6`", ",", "0.6`"}], "}"}]], "Output", CellChangeTimes->{3.5709523161022635`*^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\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>"}], "}"}]], "Output", CellChangeTimes->{3.5709523161178637`*^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.`", ",", "7.`", ",", "7.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output", CellChangeTimes->{3.570952316133464*^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.570952316133464*^9}], Cell[BoxData["16"], "Output", CellChangeTimes->{3.5709523161490636`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.5708566311295495`*^9, 3.5708566338907547`*^9}, 3.5709425310382767`*^9, 3.570952270160183*^9}], Cell[BoxData["\<\"(HO2CCH2)2NCH2CH2N(CH2CO2H)2\"\>"], "Output", CellChangeTimes->{3.5709523161490636`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"DeleteFile", "[", " ", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", 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", "}"}]}], "]"}]}], "}"}], ">>>", " ", "\"\\""}]}], "]"}]}], "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, { 3.5702975520309644`*^9, 3.570297552764166*^9}, {3.5705591717487917`*^9, 3.5705591791432047`*^9}}], 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[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Orange", "]"}], ",", 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}, {3.569492717066082*^9, 3.5694927471737347`*^9}, {3.5694931324008117`*^9, 3.5694931369404197`*^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, {3.570559203182847*^9, 3.5705592101248593`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"ChemicalData", "\[NoBreak]", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.570856658569998*^9, 3.5708566598024*^9}, 3.5709425310382767`*^9, 3.570952270160183*^9}], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, 250.}], LineBox[{{358.7524779721897, 239.34614435785815`}, {383.6, 225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, 200.}], LineBox[{{383.6, 225.}, {409.8470374314095, 209.8458213444518}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, 250.}], LineBox[{{340.3, 271.30724250947884`}, {340.3, 281.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, 312.}], LineBox[{{340.3, 281.}, {340.3, 292.308790532001}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {859.91, 250.}], LineBox[{{841.4575220278103, 239.34614435785815`}, {816.61, 225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {773.3100000000001, 200.}], LineBox[{{816.61, 225.}, {790.3629625685905, 209.84582134445182`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {859.91, 250.}], LineBox[{{878.3623061210458, 239.34584671722067`}, {886.7549999999999, 234.5}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {913.5999999999999, 219.}], LineBox[{{886.7549999999999, 234.5}, {896.5471962486223, 228.84609641074138`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {253.69000000000003`, -100.}], LineBox[{{272.1430106192158, -89.34706695576969}, {296.995, -75.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, -50.}], LineBox[{{296.995, -75.}, {323.246545182628, -59.84496872033947}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {253.69000000000003`, -100.}], LineBox[{{235.2376938789542, -89.3458467172207}, { 226.84500000000003`, -84.5}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {200., -69.}], LineBox[{{226.84500000000003`, -84.5}, { 217.0528037513776, -78.84609641074138}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, -250.}], LineBox[{{668.2569893807841, -239.3470669557697}, {643.405, -225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -200.}], LineBox[{{643.405, -225.}, {617.1534548173721, -209.8449687203395}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, -250.}], LineBox[{{686.7099999999999, -271.30724250947884`}, { 686.7099999999999, -281.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, -312.}], LineBox[{{686.7099999999999, -281.}, { 686.7099999999999, -292.308790532001}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, 100.}], LineBox[{{{421.90000000000003`, 121.30724250947885`}, { 421.90000000000003`, 150.}}, {{431.90000000000003`, 121.30724250947885`}, {431.90000000000003`, 150.}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, 200.}], LineBox[{{{421.90000000000003`, 150.}, {421.90000000000003`, 180.30879053200104`}}, {{431.90000000000003`, 150.}, { 431.90000000000003`, 180.30879053200104`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {773.3100000000001, 100.}], LineBox[{{{768.3100000000001, 121.30724250947885`}, {768.3100000000001, 150.}}, {{778.3100000000001, 121.30724250947885`}, {778.3100000000001, 150.}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {773.3100000000001, 200.}], LineBox[{{{768.3100000000001, 150.}, {768.3100000000001, 180.30879053200104`}}, {{778.3100000000001, 150.}, {778.3100000000001, 180.30879053200104`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, 50.}], LineBox[{{{345.3, 28.69275749052115}, {345.3, 0.}}, {{335.3, 28.69275749052115}, {335.3, 0.}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, -50.}], LineBox[{{{345.3, 0.}, {345.3, -30.308790532001034`}}, {{335.3, 0.}, { 335.3, -30.308790532001034`}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"O\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, -250.}], LineBox[{{{529.4524779721896, -235.01614435785814`}, { 554.3, -220.67}}, {{534.4524779721896, -243.67614435785816`}, { 559.3, -229.33}}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -200.}], LineBox[{{{554.3, -220.67}, { 580.5470374314095, -205.51582134445178`}}, {{559.3, -229.33}, { 585.5470374314095, -214.1758213444518}}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 200.}], LineBox[{{600.1, 180.30879053200104`}, {600.1, 150.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 100.}], LineBox[{{600.1, 150.}, {600.1, 119.69120946799896`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 200.}], LineBox[{{583.0470374314095, 209.8458213444518}, {556.8, 225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 250.}], LineBox[{{556.8, 225.}, {530.5529625685905, 240.15417865554818`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 200.}], LineBox[{{617.1534548173721, 209.8449687203395}, {643.405, 225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, 250.}], LineBox[{{643.405, 225.}, {669.6565451826278, 240.1550312796605}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, -50.}], LineBox[{{513.5, -30.308790532001034`}, {513.5, 0.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 50.}], LineBox[{{513.5, 0.}, {513.5, 30.308790532001034`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, -50.}], LineBox[{{496.44703743140946`, -59.84582134445181}, { 470.20000000000005`, -75.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, -100.}], LineBox[{{470.20000000000005`, -75.}, { 443.9529625685906, -90.15417865554821}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"N\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, -50.}], LineBox[{{530.5529625685905, -59.84582134445181}, {556.8, -75.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -100.}], LineBox[{{556.8, -75.}, {583.0470374314095, -90.15417865554821}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 100.}], LineBox[{{583.0470374314095, 90.15417865554821}, {556.8, 75.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 50.}], LineBox[{{556.8, 75.}, {530.5529625685905, 59.84582134445181}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 100.}], LineBox[{{619.4918670154534, 103.4204128358407}, {630.63, 105.38499999999999`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {661.16, 110.77}], LineBox[{{630.63, 105.38499999999999`}, {641.7681329845466, 107.34958716415929`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, 100.}], LineBox[{{606.836218891991, 81.49683580163125}, {610.7049999999999, 70.87}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {621.31, 41.74}], LineBox[{{610.7049999999999, 70.87}, {614.5737811080088, 60.24316419836873}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 50.}], LineBox[{{494.1081329845466, 46.5795871641593}, {482.97, 44.614999999999995`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {452.44, 39.23}], LineBox[{{482.97, 44.614999999999995`}, {471.8318670154534, 42.65041283584068}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 50.}], LineBox[{{506.76658562892817`, 68.50418496503036}, {502.9, 79.13}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {492.3, 108.26}], LineBox[{{502.9, 79.13}, {499.0334143710718, 89.75581503496963}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 250.}], LineBox[{{496.44703743140946`, 240.15417865554818`}, { 470.20000000000005`, 225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, 200.}], LineBox[{{470.20000000000005`, 225.}, {443.9529625685906, 209.8458213444518}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 250.}], LineBox[{{526.1574814022953, 265.0841603963615}, {533.425, 273.745}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {553.35, 297.49}], LineBox[{{533.425, 273.745}, {540.6925185977046, 282.4058396036385}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {513.5, 250.}], LineBox[{{500.84251859770467`, 265.0841603963615}, {493.57500000000005`, 273.745}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {473.65000000000003`, 297.49}], LineBox[{{493.57500000000005`, 273.745}, {486.30748140229537`, 282.4058396036385}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, 250.}], LineBox[{{703.7629625685904, 240.1541786555482}, {730.01, 225.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {773.3100000000001, 200.}], LineBox[{{730.01, 225.}, {756.2570374314096, 209.8458213444518}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, 250.}], LineBox[{{699.3674814022953, 265.0841603963615}, {706.635, 273.745}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {726.5600000000001, 297.49}], LineBox[{{706.635, 273.745}, {713.9025185977047, 282.4058396036385}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {686.7099999999999, 250.}], LineBox[{{674.0506550139032, 265.0825964222212}, {666.78, 273.745}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {646.85, 297.49}], LineBox[{{666.78, 273.745}, {659.5093449860967, 282.40740357777884`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, -100.}], LineBox[{{409.8470374314095, -90.15417865554821}, {383.6, -75.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {340.3, -50.}], LineBox[{{383.6, -75.}, {357.35296256859056`, -59.8458213444518}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, -100.}], LineBox[{{414.2425185977047, -115.08416039636148`}, { 406.975, -123.745}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {387.04999999999995`, -147.49}], LineBox[{{406.975, -123.745}, { 399.7074814022953, -132.40583960363855`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {426.90000000000003`, -100.}], LineBox[{{439.55748140229537`, -115.08416039636148`}, { 446.82500000000005`, -123.745}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {466.75000000000006`, -147.49}], LineBox[{{446.82500000000005`, -123.745}, { 454.0925185977047, -132.40583960363853`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -100.}], LineBox[{{600.1, -119.69120946799896`}, {600.1, -150.}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -200.}], LineBox[{{600.1, -150.}, {600.1, -180.30879053200104`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -100.}], LineBox[{{619.4918670154534, -103.4204128358407}, { 630.63, -105.38499999999999`}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {661.16, -110.77}], LineBox[{{630.63, -105.38499999999999`}, { 641.7681329845466, -107.34958716415929`}}]}}, {GrayLevel[0], AbsoluteThickness[0.55], InsetBox[ StyleBox["\<\"C\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {600.1, -100.}], LineBox[{{606.836218891991, -81.49683580163125}, { 610.7049999999999, -70.87}}], {GrayLevel[0], InsetBox[ StyleBox["\<\"H\"\>", StripOnInput->False, ScriptSizeMultipliers->0.8, ScriptMinSize->8, FontSize->Scaled[0.03898940941613314], FontWeight->Plain], {621.31, -41.74}], LineBox[{{610.7049999999999, -70.87}, { 614.5737811080088, -60.24316419836873}}]}}}, {}, {}}, ImageSize->{{0., 256.4799044086617}, {0., 229.87189537022948`}}, PlotRange->{{180., 933.5999999999999}, {-341.3824189359979, 334.0368142019984}}]], "Output", CellChangeTimes->{3.570952316258264*^9}] }, Open ]], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"(*", " ", RowBox[{"Distance", " ", "Matrix", " ", "Bohr"}], " ", "*)"}], "Text"], "\[IndentingNewLine]", 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"}], "}"}]}], "]"}]}], ";"}]}]], "Input", CellChangeTimes->{{3.5678630319943895`*^9, 3.5678630956269007`*^9}, { 3.5678632280087337`*^9, 3.567863228336334*^9}, {3.5678632621727934`*^9, 3.5678633509213495`*^9}, {3.5678644293824434`*^9, 3.567864451908883*^9}, { 3.567864923404111*^9, 3.56786494544695*^9}, {3.5678650143210707`*^9, 3.5678650845367947`*^9}, {3.567869231084096*^9, 3.5678692412397137`*^9}, 3.5678693168686466`*^9, {3.5678704450470285`*^9, 3.5678704621290584`*^9}, 3.5682783281584253`*^9, 3.5688732159715385`*^9, 3.568910867647065*^9, 3.5689997098549547`*^9, 3.5689998170427427`*^9, 3.5689998869620657`*^9, 3.5691460426137285`*^9, 3.569237204536323*^9, 3.5692374658523817`*^9, 3.56923802264856*^9, 3.5693403424181123`*^9, 3.5693404502143016`*^9, 3.569340738019207*^9, 3.569340852851009*^9, 3.5693411655067577`*^9, 3.5693414978029413`*^9, 3.5693426144373026`*^9, 3.5693435671777763`*^9, 3.569343662743544*^9, 3.569343763644521*^9, 3.569344071177861*^9, 3.569344266271804*^9, 3.570297558707776*^9, {3.5703416079688015`*^9, 3.570341617375618*^9}, {3.5705956885798426`*^9, 3.5705957106070814`*^9}, { 3.5705965150536942`*^9, 3.5705965239457097`*^9}}], 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[{ RowBox[{"(*", " ", RowBox[{"connected", " ", RowBox[{"pairs", ":", " ", RowBox[{ RowBox[{"distance", " ", "criteria"}], " ", "<", " ", RowBox[{"3.0", " ", "bohr"}]}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Dij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "<", "3.0"}], " ", "||", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], " ", "&&", " ", RowBox[{"j", "\[Equal]", "10"}], " ", "&&", " ", RowBox[{"i", "\[Equal]", " ", "17"}]}], ")"}]}], ")"}], ",", RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "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}, 3.5703416480920715`*^9, {3.5703416810237293`*^9, 3.5703416997437625`*^9}, 3.570341888192094*^9, {3.5705964879252462`*^9, 3.570596509843285*^9}, { 3.5705965495921545`*^9, 3.5705966388087115`*^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", "0", "0", "0"}, {"2.910903097269655`", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.861406317833236`", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.850701717744474`", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.814725043633899`", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.8407005648033494`", "0", "0", "0", "0.`", "0", "0", "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.724538600524772`", "0", "2.7526195021218762`", "2.7392828914781155`", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "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.7565892539622454`", "0", "0", "2.7514986031358144`", "2.720407503790453`", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "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.5156419167523403`", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "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.5378666856469354`", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "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.490969141467996`", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "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.5310000786826805`", "0", "0", "0", "0", "0", "0.`", "0", "0", "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.286760662434757`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "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.2500341135526507`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "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.3057419759684574`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "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.268612033260011`", "0", "0", "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.0219304109293827`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0219795173732025`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220451910389357`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220206639175045`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0219878485631435`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0218876503667307`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.022034087673762`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0220558572032257`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.022003252565046`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0221289057713587`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.02200253376133`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.021887426500468`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.814117363829235`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.8141181216961275`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.8140646820523696`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.8142246097719965`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.570952316320664*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"nc", "=", "0"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"parse", " ", "into", " ", "prim"}], ",", " ", "sec", ",", " ", "tert", ",", " ", RowBox[{ "and", " ", "quart", " ", "C", " ", "cores", " ", "with", " ", "different", " ", "radii"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"nc", "=", RowBox[{"nc", "+", "1"}]}], ",", "nc"}], "]"}]}], "]"}], "\n", RowBox[{ RowBox[{"cnt", "=", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nc"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pri", "=", "cnt"}], ";", " ", RowBox[{"sec", "=", "cnt"}], ";", RowBox[{"ter", "=", "cnt"}], ";", " ", RowBox[{"qua", "=", "cnt"}], ";"}], "\[IndentingNewLine]", "nc"}], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.5708947833985987`*^9}}], Cell[BoxData["10"], "Output", CellChangeTimes->{3.5709523163362637`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "<", RowBox[{"nc", "+", "1"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", " ", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", ",", RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "j", "]"}], "]"}], "=", RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "j", "]"}], "]"}], "+", "1"}]}], ",", "0"}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "cnt"}], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.570894821930666*^9}, 3.5709437180911617`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]], "Output", CellChangeTimes->{3.570952316351864*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"n1", "=", "0"}], ";", " ", RowBox[{"n2", "=", "0"}], ";", " ", RowBox[{"n3", "=", "0"}], ";", " ", RowBox[{"n4", "=", "0"}], ";"}], "\n", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"nc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "3"}], ",", RowBox[{ RowBox[{"n1", "=", RowBox[{"n1", "+", "1"}]}], ";", RowBox[{ RowBox[{"pri", "[", RowBox[{"[", "n1", "]"}], "]"}], "=", "i"}]}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "2"}], ",", RowBox[{ RowBox[{"n2", "=", RowBox[{"n2", "+", "1"}]}], ";", RowBox[{ RowBox[{"sec", "[", RowBox[{"[", "n2", "]"}], "]"}], "=", "i"}]}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "1"}], ",", RowBox[{ RowBox[{"n3", "=", RowBox[{"n3", "+", "1"}]}], ";", RowBox[{ RowBox[{"ter", "[", RowBox[{"[", "n3", "]"}], "]"}], "=", "i"}]}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0"}], ",", RowBox[{ RowBox[{"n4", "=", RowBox[{"n4", "+", "1"}]}], ";", RowBox[{ RowBox[{"qua", "[", RowBox[{"[", "n4", "]"}], "]"}], "=", "i"}]}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "<", RowBox[{"nc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"sec", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"sec", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.255"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "<", RowBox[{"nc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"ter", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"ter", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2557"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "<", RowBox[{"nc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"pri", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"pri", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2567"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "<", RowBox[{"nc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"qua", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"qua", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2577"}]}], "]"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.5708948169698577`*^9}, {3.570894956839703*^9, 3.5708949736409326`*^9}, {3.5708961320833673`*^9, 3.570896139696181*^9}, 3.570896314088887*^9, {3.5708963602181683`*^9, 3.5708963666609793`*^9}, { 3.570896482038782*^9, 3.570896483645585*^9}, {3.5708965159376416`*^9, 3.570896521194851*^9}, {3.5709435995777535`*^9, 3.5709436285158043`*^9}, { 3.5709436695594764`*^9, 3.5709437026783347`*^9}, {3.57094471360691*^9, 3.5709447144805117`*^9}}], 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}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.57089481264865*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.2557`", ",", "0.22522`", ",", "0.22522`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "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.5241`", ",", "0.5241`", ",", "0.5241`", ",", "0.5241`"}], "}"}]], "Output", CellChangeTimes->{3.570952316367464*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "subtract", " ", "core", " ", "radii", " ", "from", " ", "pair", " ", "distances"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Fij", "=", RowBox[{"Dij", "-", "u2"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Fij", "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Gij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Fij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"Fij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Gij", "]"}], ";"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.567958596890297*^9, 3.567958603270708*^9}, { 3.5679587604565845`*^9, 3.5679587707682023`*^9}, {3.5679588272871017`*^9, 3.567958828254304*^9}, {3.567959580066424*^9, 3.5679595814704266`*^9}, { 3.567959624994503*^9, 3.5679596300177116`*^9}, {3.5679597079086485`*^9, 3.567959902877791*^9}, {3.5679599961659546`*^9, 3.5679600446196404`*^9}, { 3.5679609611992497`*^9, 3.567960974006872*^9}, 3.567961975154231*^9, { 3.5679622637079377`*^9, 3.5679622945179915`*^9}, 3.5681142413606625`*^9, 3.568121878697276*^9, {3.5681219332193723`*^9, 3.56812197189184*^9}, { 3.5682778370003624`*^9, 3.5682778397927675`*^9}, {3.569341165522358*^9, 3.569341165537958*^9}, {3.5693418217531104`*^9, 3.5693418217531104`*^9}, { 3.57059671735485*^9, 3.570596744467697*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"Hij", "=", RowBox[{"Transpose", "[", "Gij", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Hij", "]"}], ";"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.5679601758938704`*^9, 3.5679601965327067`*^9}, { 3.567960427147912*^9, 3.567960432217921*^9}, {3.5679605764089737`*^9, 3.5679605968294096`*^9}, {3.5679607389456596`*^9, 3.5679607643581038`*^9}, 3.5681142501278777`*^9, 3.5681218877140923`*^9, 3.569341165537958*^9, 3.5693418217531104`*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Kij", "=", RowBox[{"Hij", "-", "u2"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Kij", "]"}], ";"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Lij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Kij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"Kij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Lij", "]"}], ";"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.5679602339571724`*^9, 3.567960257419614*^9}, { 3.567960343406965*^9, 3.567960353500182*^9}, {3.5679604155258913`*^9, 3.567960421422702*^9}, {3.567960854323462*^9, 3.567960874197897*^9}, { 3.5679611596939983`*^9, 3.567961170270817*^9}, {3.5679614000124207`*^9, 3.567961407016833*^9}, {3.5679615066074076`*^9, 3.567961509649413*^9}, 3.5679616124379935`*^9, 3.5679616766477065`*^9, {3.5679617424486217`*^9, 3.5679617456310277`*^9}, 3.567961801276325*^9, {3.5679618582788253`*^9, 3.5679618970760937`*^9}, {3.5679620279135237`*^9, 3.567962030113127*^9}, 3.567962107894864*^9, {3.567962149468937*^9, 3.5679621572533503`*^9}, 3.5679623389156694`*^9, {3.567962645815009*^9, 3.567962648888214*^9}, { 3.567962691647889*^9, 3.567962693020692*^9}, {3.568048161486014*^9, 3.568048162827616*^9}, 3.5680482096900983`*^9, 3.5681142588638926`*^9, 3.568121899632513*^9, 3.5681219958534822`*^9, {3.568277844675576*^9, 3.5682778463603787`*^9}, {3.569341165537958*^9, 3.569341165537958*^9}, { 3.5693418217531104`*^9, 3.5693418217531104`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"determine", " ", "bond", " ", "cloud", " ", "radii"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Lij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[NotEqual]", "\"\\""}], ",", RowBox[{"0.5", "*", RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}], ",", RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}], "]"}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Qij", "=", "Lij"}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MatrixForm", "[", "Lij", "]"}], ";"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.5679627617388124`*^9, 3.567962837461345*^9}, { 3.567963118121438*^9, 3.567963118698639*^9}, {3.5679631520670977`*^9, 3.5679631541731014`*^9}, {3.5679631898191643`*^9, 3.5679632154656096`*^9}, {3.5679635823158536`*^9, 3.56796361468591*^9}, { 3.567963691516045*^9, 3.567963693590849*^9}, {3.567963737957327*^9, 3.567963807299449*^9}, {3.568048114904332*^9, 3.5680481161835346`*^9}, 3.5680482221389203`*^9, {3.5680485003498087`*^9, 3.5680485123618298`*^9}, 3.5681142659931054`*^9, 3.5681219084621286`*^9, {3.568277848107582*^9, 3.5682778496519847`*^9}, {3.5683793122399254`*^9, 3.568379313019926*^9}, { 3.568379456758579*^9, 3.56837947986222*^9}, 3.5683796000760307`*^9, { 3.5683796473285136`*^9, 3.5683796831617765`*^9}, {3.568381744939398*^9, 3.5683817743298492`*^9}, {3.56846523720809*^9, 3.568465240218895*^9}, 3.569341165537958*^9, 3.5693418217531104`*^9, {3.5705967846533675`*^9, 3.5705968020785985`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"determine", " ", "kinetic", " ", "energy"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Nij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{"2.25", "/", RowBox[{ RowBox[{"Lij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "^", "2"}]}], ",", "0"}], "]"}], ",", "\"\< \>\""}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "Nij", "]"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.5679628944794455`*^9, 3.5679629710755796`*^9}, { 3.567963889963994*^9, 3.567963933800071*^9}, {3.5680478391738477`*^9, 3.5680478414358516`*^9}, 3.568048231171336*^9, {3.5680482823550262`*^9, 3.56804828449223*^9}, 3.5680483349271183`*^9, 3.568114273059918*^9, 3.5681219175101447`*^9, {3.568277851305588*^9, 3.568277857295998*^9}, { 3.5688722635742655`*^9, 3.568872266616271*^9}, 3.5688723032763357`*^9, 3.5688725225503206`*^9, 3.5692365125035076`*^9, {3.5692366381461277`*^9, 3.5692366389105296`*^9}, {3.5692366963654304`*^9, 3.5692366986898346`*^9}, 3.5693411655535583`*^9, 3.5693418217687106`*^9, {3.5705968460394754`*^9, 3.5705968602823005`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Tval", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[LessEqual]", "j"}], ",", RowBox[{"Nij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.567963992456174*^9, 3.567964003890994*^9}, { 3.5679640974287586`*^9, 3.5679642038209453`*^9}, {3.56796433180357*^9, 3.567964353487608*^9}, {3.567964403641696*^9, 3.567964453046983*^9}, { 3.5679646160984693`*^9, 3.5679646168316708`*^9}, {3.567964688747797*^9, 3.567964762255126*^9}, {3.568277859480002*^9, 3.568277863598409*^9}, { 3.568379511358675*^9, 3.5683795129030776`*^9}, 3.5688214977895346`*^9, { 3.56882774467134*^9, 3.56882781892747*^9}}], Cell[BoxData["63.72692592066258`"], "Output", CellChangeTimes->{3.570952316398664*^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["1002.0893935086234`"], "Output", CellChangeTimes->{3.570952316414264*^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["1065.816319429286`"], "Output", CellChangeTimes->{3.570952316429864*^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["26.10012005981964`"], "Output", CellChangeTimes->{3.570952316429864*^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["37.626805860842936`"], "Output", CellChangeTimes->{3.570952316445464*^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[CellGroupData[{ Cell[BoxData[ 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, { 3.570340755052903*^9, 3.5703407609185133`*^9}, 3.570342272888769*^9, { 3.5703428806034365`*^9, 3.5703428850182447`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\" \"\>", "\<\"C\"\>", "\<\"C\"\>", "\<\"C\"\>", "\<\"C\"\>", "\<\"C\ \"\>", "\<\"C\"\>", "\<\"C\"\>", "\<\"C\"\>", "\<\"C\"\>", "\<\"C\"\>", \ "\<\"N\"\>", "\<\"N\"\>", "\<\"O\"\>", "\<\"O\"\>", "\<\"O\"\>", "\<\"O\"\>", \ "\<\"O\"\>", "\<\"O\"\>", "\<\"O\"\>", "\<\"O\"\>", "\<\"H\"\>", "\<\"H\"\>", \ "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", \ "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", "\<\"H\"\>", \ "\<\"H\"\>", "\<\"H\"\>"}, {"\<\"C\"\>", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "1.2004515486348275`", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "1.175353158916618`", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "1.170000858872237`", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "0", "1.1520125218169495`", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"C\"\>", "0", "0", "0", "0", "0", "1.1650002824016747`", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"N\"\>", "1.122159300262386`", "0", "1.136199751060938`", "1.1295314457390577`", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"\<\"N\"\>", "0", "1.1381846269811227`", "0", "0", "1.1356393015679072`", "1.1200937518952265`", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "1.0409709583761702`", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0", "1.0520833428234677`", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "1.028634570733998`", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.0486500393413403`", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0.9265303312173785`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0", "0.9081670567763254`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0.9360209879842287`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"O\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.9174560166300054`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "1.1976304109293827`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "1.1976795173732024`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "1.1977451910389356`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "1.1977206639175044`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "1.1976878485631435`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "1.1975876503667306`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "1.197734087673762`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "1.1977558572032256`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "1.197703252565046`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "1.1978289057713587`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "0", "1.1977025337613298`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "0", "1.1975874265004678`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.112017363829235`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.1120181216961276`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.1119646820523696`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>"}, {"\<\"H\"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.1121246097719966`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5709523164610643`*^9}] }, Open ]], 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[CellGroupData[{ Cell[BoxData[ 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[{ RowBox[{ RowBox[{"Pij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], " ", "&&", " ", RowBox[{"(", " ", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], " ", "||", " ", RowBox[{ RowBox[{"u", "[", RowBox[{"[", RowBox[{"j", "-", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}]}], " ", ")"}]}], ")"}], " ", ",", 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, {3.5703421313965206`*^9, 3.5703421386505337`*^9}, { 3.570342288098796*^9, 3.5703424924279547`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "13", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "7", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.0409709583761702`"}], SequenceForm["O", 13, " ", "C", 7, " ", 1.0409709583761702`], Editable->False]], "Print", CellChangeTimes->{3.5709523164766645`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "14", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "8", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.0520833428234677`"}], SequenceForm["O", 14, " ", "C", 8, " ", 1.0520833428234677`], Editable->False]], "Print", CellChangeTimes->{3.5709523164766645`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "15", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "9", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.028634570733998`"}], SequenceForm["O", 15, " ", "C", 9, " ", 1.028634570733998], Editable->False]], "Print", CellChangeTimes->{3.5709523164922647`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "16", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "10", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.0486500393413403`"}], SequenceForm["O", 16, " ", "C", 10, " ", 1.0486500393413403`], Editable->False]], "Print", CellChangeTimes->{3.5709523164922647`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "17", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "7", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "0.9265303312173785`"}], SequenceForm["O", 17, " ", "C", 7, " ", 0.9265303312173785], Editable->False]], "Print", CellChangeTimes->{3.5709523164922647`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "18", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "8", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "0.9081670567763254`"}], SequenceForm["O", 18, " ", "C", 8, " ", 0.9081670567763254], Editable->False]], "Print", CellChangeTimes->{3.5709523164922647`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "19", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "9", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "0.9360209879842287`"}], SequenceForm["O", 19, " ", "C", 9, " ", 0.9360209879842287], Editable->False]], "Print", CellChangeTimes->{3.5709523164922647`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"O\"\>", "\[InvisibleSpace]", "20", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"C\"\>", "\[InvisibleSpace]", "10", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "0.9174560166300054`"}], SequenceForm["O", 20, " ", "C", 10, " ", 0.9174560166300054], Editable->False]], "Print", CellChangeTimes->{3.5709523164922647`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"H\"\>", "\[InvisibleSpace]", "33", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"O\"\>", "\[InvisibleSpace]", "13", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.112017363829235`"}], SequenceForm["H", 33, " ", "O", 13, " ", 1.112017363829235], Editable->False]], "Print", CellChangeTimes->{3.5709523165078645`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"H\"\>", "\[InvisibleSpace]", "34", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"O\"\>", "\[InvisibleSpace]", "14", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.1120181216961276`"}], SequenceForm["H", 34, " ", "O", 14, " ", 1.1120181216961276`], Editable->False]], "Print", CellChangeTimes->{3.5709523165078645`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"H\"\>", "\[InvisibleSpace]", "35", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"O\"\>", "\[InvisibleSpace]", "15", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.1119646820523696`"}], SequenceForm["H", 35, " ", "O", 15, " ", 1.1119646820523696`], Editable->False]], "Print", CellChangeTimes->{3.5709523165078645`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"H\"\>", "\[InvisibleSpace]", "36", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "\<\"O\"\>", "\[InvisibleSpace]", "16", "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", "1.1121246097719966`"}], SequenceForm["H", 36, " ", "O", 16, " ", 1.1121246097719966`], Editable->False]], "Print", CellChangeTimes->{3.5709523165078645`*^9}] }, Open ]] }, Open ]], 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.2004515486348275`"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "3", ",", "1.175353158916618`"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "4", ",", "1.170000858872237`"}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "5", ",", "1.1520125218169495`"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "6", ",", "1.1650002824016747`"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "1", ",", "1.122159300262386`"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "3", ",", "1.136199751060938`"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "4", ",", "1.1295314457390577`"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "2", ",", "1.1381846269811227`"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "5", ",", "1.1356393015679072`"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "6", ",", "1.1200937518952265`"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "7", ",", "1.0409709583761702`"}], "}"}], ",", RowBox[{"{", RowBox[{"14", ",", "8", ",", "1.0520833428234677`"}], "}"}], ",", RowBox[{"{", RowBox[{"15", ",", "9", ",", "1.028634570733998`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "10", ",", "1.0486500393413403`"}], "}"}], ",", RowBox[{"{", RowBox[{"17", ",", "7", ",", "0.9265303312173785`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "8", ",", "0.9081670567763254`"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "9", ",", "0.9360209879842287`"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "10", ",", "0.9174560166300054`"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "1", ",", "1.1976304109293827`"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "1", ",", "1.1976795173732024`"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "2", ",", "1.1977451910389356`"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "2", ",", "1.1977206639175044`"}], "}"}], ",", RowBox[{"{", RowBox[{"25", ",", "3", ",", "1.1976878485631435`"}], "}"}], ",", RowBox[{"{", RowBox[{"26", ",", "3", ",", "1.1975876503667306`"}], "}"}], ",", RowBox[{"{", RowBox[{"27", ",", "4", ",", "1.197734087673762`"}], "}"}], ",", RowBox[{"{", RowBox[{"28", ",", "4", ",", "1.1977558572032256`"}], "}"}], ",", RowBox[{"{", RowBox[{"29", ",", "5", ",", "1.197703252565046`"}], "}"}], ",", RowBox[{"{", RowBox[{"30", ",", "5", ",", "1.1978289057713587`"}], "}"}], ",", RowBox[{"{", RowBox[{"31", ",", "6", ",", "1.1977025337613298`"}], "}"}], ",", RowBox[{"{", RowBox[{"32", ",", "6", ",", "1.1975874265004678`"}], "}"}], ",", RowBox[{"{", RowBox[{"33", ",", "13", ",", "1.112017363829235`"}], "}"}], ",", RowBox[{"{", RowBox[{"34", ",", "14", ",", "1.1120181216961276`"}], "}"}], ",", RowBox[{"{", RowBox[{"35", ",", "15", ",", "1.1119646820523696`"}], "}"}], ",", RowBox[{"{", RowBox[{"36", ",", "16", ",", "1.1121246097719966`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5709523165390644`*^9}], Cell[BoxData["35"], "Output", CellChangeTimes->{3.5709523165390644`*^9}], Cell[BoxData["19"], "Output", CellChangeTimes->{3.5709523165390644`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"wxc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"wyc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], " "}], "\n", RowBox[{ RowBox[{"wzc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.568878075458074*^9}, 3.5688953020257144`*^9, 3.5693395777359695`*^9, {3.569339615191635*^9, 3.569339617079238*^9}, { 3.5693396917877693`*^9, 3.56933969216217*^9}, 3.5693893483274703`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Plot7", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Darker", "[", RowBox[{"Gray", ",", "0.6"}], "]"}], ",", RowBox[{"Opacity", "[", "0.6", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"wxc", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzc", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.56887811871695*^9}, {3.568895331556566*^9, 3.5688953367201753`*^9}, 3.568895995276532*^9, {3.5693397032225895`*^9, 3.56933970331619*^9}, 3.569339737137049*^9, 3.569340055299608*^9, 3.569389360947892*^9, {3.570298060155057*^9, 3.570298071589877*^9}, { 3.5704539766451664`*^9, 3.5704539773627677`*^9}, {3.5709509139026003`*^9, 3.570950950500265*^9}, {3.570950995397144*^9, 3.5709510449896307`*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"wxh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"wyh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"wzh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.5688781280925665`*^9}, 3.568895312524533*^9, 3.5693395940691977`*^9, {3.5693396336776676`*^9, 3.5693396557829065`*^9}, { 3.569340069402033*^9, 3.569340092412073*^9}, {3.569389186383586*^9, 3.5693891947764006`*^9}, {3.569389263291721*^9, 3.569389289686967*^9}, 3.569389336315449*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Plot8", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzh", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"a", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "cw"}], ",", "3"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bh"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.568878147967001*^9}, {3.56889532230575*^9, 3.5688953242557535`*^9}, 3.56889600529175*^9, 3.5688961595292206`*^9, { 3.5693396821781526`*^9, 3.5693396825213532`*^9}, 3.5693893658151007`*^9, { 3.5693895413934093`*^9, 3.5693895427506113`*^9}, {3.5697651043452682`*^9, 3.5697651089940763`*^9}, {3.5704647001766*^9, 3.570464712141821*^9}}], Cell[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.15"}], "]"}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ "Plot1", ",", "Plot2", ",", "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[{ RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.105359783404, -1.2419657217199997`, 0.130529043998}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.517433002200001, 2.8687930406, 0.9670294859799999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.4639107572, -0.0180325213824, 4.256229869799999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.0020617228, -2.9428702997999996`, -0.71758565398}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.5843293026, 3.2253843368, -1.87128227424}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{3.8204590541999996`, -2.7667478366, 4.652505411999999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-6.7177869573999995`, -2.3202055828, -0.31783301593999996`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.9490034214, 1.6803443592, -3.7029180969999995`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{4.023226654, 0.6565852986999999, 1.6381467776199998`}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{-2.457588663, -0.66576936706, -0.7049811815599999}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{5.550314234599999, 5.615320808999999, -2.6558209203999996`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{3.0522854352, -3.3501062528, 6.9999230491999995`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-8.3595809062, -3.7618775481999998`, -1.5140862657199998`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-5.9683216258, 1.07684146384, -5.9395977906}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{5.6138090281999995`, 1.4014774933799998`, -3.2503287199999997`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{4.0132111062, -4.253206308199999, 2.974428724}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-7.3304361266, -0.54580956058, 1.0210567523199998`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-5.909173202, 3.1101110508, -2.2262862006}, 0.178]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.49168780793999994`, 1.673352373, 2.9266186562}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{1.1975760579799999`, 2.6577106463999995`, -0.147438312246}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{ 1.1760142843199999`, -1.9178829173999998`, -1.4460183351999998`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.034852216618, -2.65506503, 1.5750866209999999`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{7.408103865199999, 2.600262976, 1.63162722292}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.6972919181999995`, 4.5071854826, 1.8220549119399998`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{3.2998395412, 1.12489719602, 5.450914646999999}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.4091947016, 0.29118787934, 4.7133545892}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.388278718, -4.1466257618, 0.78665513928}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.7923021368, -3.8746941903999996`, -2.4999185253999996`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-0.9942604376399999, 1.9316779171999998`, -3.2023296796}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-2.0212509296, -0.89996311024, -4.564633153}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.5478575908, 5.987218885799999, -4.43140747}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{2.6159477018, -5.0620090362, 7.4122612623999995`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-10.1372461544, -3.4377895391999997`, -1.35376191188}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-7.5553135205999995`, 1.8009655697799998`, -6.4381075094}, 0.1]}, Text3DBox["1", {0.7819566237999999, 1.1507864422199998`, 1.1880707361999998`}, {1, 0}], Text3DBox["2", {-0.494640216596, -1.2419657217199997`, 0.130529043998}, {1, 0}], Text3DBox["3", {4.917433002200001, 2.8687930406, 0.9670294859799999}, {1, 0}], Text3DBox["4", {3.8639107571999998`, -0.0180325213824, 4.256229869799999}, {1, 0}], Text3DBox[ "5", {-4.602061722799999, -2.9428702997999996`, -0.71758565398}, {1, 0}], Text3DBox["6", {-3.0220618141999998`, 0.5004939311, -3.1624564609999997`}, {1, 0}], Text3DBox["7", {4.9843293026, 3.2253843368, -1.87128227424}, {1, 0}], Text3DBox["8", {3.2204590541999996`, -2.7667478366, 4.652505411999999}, {1, 0}], Text3DBox[ "9", {-7.317786957399999, -2.3202055828, -0.31783301593999996`}, {1, 0}], Text3DBox["10", {-5.549003421399999, 1.6803443592, -3.7029180969999995`}, { 1, 0}], Text3DBox["11", {3.423226654, 0.6565852986999999, 1.6381467776199998`}, {1, 0}], Text3DBox["12", {-3.057588663, -0.66576936706, -0.7049811815599999}, {1, 0}], Text3DBox["13", {4.9503142345999995`, 5.615320808999999, -2.6558209203999996`}, {1, 0}], Text3DBox["14", {2.4522854352, -3.3501062528, 6.9999230491999995`}, {1, 0}], Text3DBox[ "15", {-8.9595809062, -3.7618775481999998`, -1.5140862657199998`}, {1, 0}], Text3DBox["16", {-6.5683216257999995`, 1.07684146384, -5.9395977906}, {1, 0}], Text3DBox["17", {5.0138090282, 1.4014774933799998`, -3.2503287199999997`}, {1, 0}], Text3DBox["18", {3.4132111062, -4.253206308199999, 2.974428724}, {1, 0}], Text3DBox["19", {-7.9304361266, -0.54580956058, 1.0210567523199998`}, {1, 0}], Text3DBox["20", {-6.5091732019999995`, 3.1101110508, -2.2262862006}, {1, 0}], Text3DBox["21", {-0.10831219206000003`, 1.673352373, 2.9266186562}, {1, 0}], Text3DBox["22", {0.5975760579799999, 2.6577106463999995`, -0.147438312246}, {1, 0}], Text3DBox["23", { 0.5760142843199999, -1.9178829173999998`, -1.4460183351999998`}, {1, 0}], Text3DBox["24", {-0.565147783382, -2.65506503, 1.5750866209999999`}, {1, 0}], Text3DBox["25", {6.8081038652, 2.600262976, 1.63162722292}, {1, 0}], Text3DBox["26", {4.0972919182, 4.5071854826, 1.8220549119399998`}, {1, 0}], Text3DBox["27", {2.6998395412, 1.12489719602, 5.450914646999999}, {1, 0}], Text3DBox["28", {5.8091947016, 0.29118787934, 4.7133545892}, {1, 0}], Text3DBox["29", {-3.988278718, -4.1466257618, 0.78665513928}, {1, 0}], Text3DBox[ "30", {-4.3923021368, -3.8746941903999996`, -2.4999185253999996`}, {1, 0}], Text3DBox["31", {-1.59426043764, 1.9316779171999998`, -3.2023296796}, {1, 0}], Text3DBox["32", {-2.6212509296, -0.89996311024, -4.564633153}, {1, 0}], Text3DBox["33", {4.9478575908, 5.987218885799999, -4.43140747}, {1, 0}], Text3DBox["34", {2.0159477018, -5.0620090362, 7.4122612623999995`}, {1, 0}], Text3DBox[ "35", {-10.7372461544, -3.4377895391999997`, -1.35376191188}, {1, 0}], Text3DBox["36", {-8.1553135206, 1.8009655697799998`, -6.4381075094}, {1, 0}], {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{0.7436582036019999, -0.045589639749999966`, 0.6592998900989999}, 1.2004515486348275`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{5.550872969813349, 3.0470450713525117`, -0.4517792189980079}, 1.175353158916618]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{4.142263906633225, -1.392052700554106, 4.454318987461828}, 1.170000858872237]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-5.359586650337278, -2.631615367211082, -0.5177590426298949}, 1.1520125218169495`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-3.685221275741115, 1.0902737769070563`, -3.432620689238677}, 1.1650002824016747`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{2.7170265640436932`, 0.9009849892812214, 1.4155684879835302`}, 1.122159300262386]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{4.7622470791012566`, 1.7507224691120218`, 1.3062184688170908`}, 1.136199751060938]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{4.241173266152303, 0.3229434284421962, 2.932957132998067}, 1.1295314457390577`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-1.1899584690860423`, -0.9507551605959488, \ -0.29173916308428677`}, 1.1381846269811227`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-3.2214671280133915`, -1.7919970821664315`, \ -0.7112152074521317}, 1.1356393015679072`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-2.440019692841835, -0.08902119563377286, \ -1.9202679662665956`}, 1.1200937518952265`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{5.56679646116932, 4.457261256654497, -2.275667521371172}, 1.0409709583761702`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{3.424612941003343, -3.067357172747129, 5.862148811293695}, 1.0520833428234677`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-7.564289907341427, -3.0635263706801967`, -0.9346168124425573}, 1.028634570733998]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-5.474308715227758, 1.369329345041986, -4.855590224872699}, 1.0486500393413403`]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{5.599569999334383, 2.282444383779188, -2.584234251732532}, 0.9265303312173785]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{3.9201632151714185`, -3.5356428662090003`, 3.7844927164841176`}, 0.9081670567763254]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-7.034434214905941, -1.4031103472035986`, 0.37417114326892686`}, 0.9360209879842287]}, {RGBColor[0.2, 0.2, 0.2], Opacity[0.6], SphereBox[{-5.445531227204907, 2.419712471524331, -2.939314815252402}, 0.9174560166300054]}, {Opacity[0.5], SphereBox[{0.7423542176885595, 1.5262173465990125`, 2.43710856945025}, 1.1976304109293827`]}, {Opacity[0.5], SphereBox[{1.2494894701681174`, 2.2334274417144346`, 0.22858196627197291`}, 1.1976795173732024`]}, {Opacity[0.5], SphereBox[{ 0.8745751225877622, -1.7275807118875144`, -1.0021467407593891`}, 1.1977451910389356`]}, {Opacity[0.5], SphereBox[{0.05470362490850768, -2.2572068623959196`, 1.1683713765603463`}, 1.1977206639175044`]}, {Opacity[0.5], SphereBox[{6.875776767848363, 2.6758688535948703`, 1.4445066663306974`}, 1.1976878485631435`]}, {Opacity[0.5], SphereBox[{4.928217864573188, 4.045865677287662, 1.58130663153444}, 1.1975876503667306`]}, {Opacity[0.5], SphereBox[{3.627581663505765, 0.8031074239861635, 5.114553332516713}, 1.197734087673762]}, {Opacity[0.5], SphereBox[{5.861509460560876, 0.20412837823662888`, 4.584653345944352}, 1.1977558572032256`]}, {Opacity[0.5], SphereBox[{-3.561090835977243, -3.807705444215321, 0.3631324359823852}, 1.197703252565046]}, {Opacity[0.5], SphereBox[{-3.8513567954664056`, -3.6123531796936517`, \ -1.9981294946396946`}, 1.1978289057713587`]}, {Opacity[0.5], SphereBox[{-1.3962615776502199`, 1.5287243947970932`, -3.1911032726247557`}, 1.1977025337613298`]}, {Opacity[0.5], SphereBox[{-2.134106686855349, -0.5056383900873976, -4.169824233228811}, 1.1975874265004678`]}, {Opacity[0.5], SphereBox[{5.548567317216411, 5.879777225223276, -3.9184390539538168`}, 1.112017363829235]}, {Opacity[0.5], SphereBox[{2.742005979560397, -4.567439119252648, 7.293136462888009}, 1.1120181216961276`]}, {Opacity[0.5], SphereBox[{-9.6236622861955, -3.5314215508903066`, -1.4000810948059803`}, 1.1119646820523696`]}, {Opacity[0.5], SphereBox[{-7.09685735834498, 1.5917778860285101`, -6.294096154788337}, 1.1121246097719966`]}, TubeBox[{{0.105359783404, -1.2419657217199997`, 0.130529043998}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{5.5843293026, 3.2253843368, -1.87128227424}, {5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{3.8204590541999996`, -2.7667478366, 4.652505411999999}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{-6.7177869573999995`, -2.3202055828, -0.31783301593999996`}, \ {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-4.9490034214, 1.6803443592, -3.7029180969999995`}, {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{4.023226654, 0.6565852986999999, 1.6381467776199998`}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{4.023226654, 0.6565852986999999, 1.6381467776199998`}, { 5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{4.023226654, 0.6565852986999999, 1.6381467776199998`}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{-2.457588663, -0.66576936706, -0.7049811815599999}, { 0.105359783404, -1.2419657217199997`, 0.130529043998}}, 0.15], TubeBox[{{-2.457588663, -0.66576936706, -0.7049811815599999}, \ {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-2.457588663, -0.66576936706, -0.7049811815599999}, \ {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{5.550314234599999, 5.615320808999999, -2.6558209203999996`}, { 5.5843293026, 3.2253843368, -1.87128227424}}, 0.15], TubeBox[{{3.0522854352, -3.3501062528, 6.9999230491999995`}, { 3.8204590541999996`, -2.7667478366, 4.652505411999999}}, 0.15], TubeBox[{{-8.3595809062, -3.7618775481999998`, -1.5140862657199998`}, \ {-6.7177869573999995`, -2.3202055828, -0.31783301593999996`}}, 0.15], TubeBox[{{-5.9683216258, 1.07684146384, -5.9395977906}, {-4.9490034214, 1.6803443592, -3.7029180969999995`}}, 0.15], TubeBox[{{5.6138090281999995`, 1.4014774933799998`, -3.2503287199999997`}, {5.5843293026, 3.2253843368, -1.87128227424}}, 0.15], TubeBox[{{4.0132111062, -4.253206308199999, 2.974428724}, { 3.8204590541999996`, -2.7667478366, 4.652505411999999}}, 0.15], TubeBox[{{-7.3304361266, -0.54580956058, 1.0210567523199998`}, {-6.7177869573999995`, -2.3202055828, \ -0.31783301593999996`}}, 0.15], TubeBox[{{-5.909173202, 3.1101110508, -2.2262862006}, {-4.9490034214, 1.6803443592, -3.7029180969999995`}}, 0.15], TubeBox[{{0.49168780793999994`, 1.673352373, 2.9266186562}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{1.1975760579799999`, 2.6577106463999995`, -0.147438312246}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{ 1.1760142843199999`, -1.9178829173999998`, -1.4460183351999998`}, { 0.105359783404, -1.2419657217199997`, 0.130529043998}}, 0.15], TubeBox[{{0.034852216618, -2.65506503, 1.5750866209999999`}, { 0.105359783404, -1.2419657217199997`, 0.130529043998}}, 0.15], TubeBox[{{7.408103865199999, 2.600262976, 1.63162722292}, { 5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{4.6972919181999995`, 4.5071854826, 1.8220549119399998`}, { 5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{3.2998395412, 1.12489719602, 5.450914646999999}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{6.4091947016, 0.29118787934, 4.7133545892}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{-3.388278718, -4.1466257618, 0.78665513928}, {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-3.7923021368, -3.8746941903999996`, \ -2.4999185253999996`}, {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-0.9942604376399999, 1.9316779171999998`, -3.2023296796}, {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{-2.0212509296, -0.89996311024, -4.564633153}, \ {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{5.5478575908, 5.987218885799999, -4.43140747}, { 5.550314234599999, 5.615320808999999, -2.6558209203999996`}}, 0.15], TubeBox[{{2.6159477018, -5.0620090362, 7.4122612623999995`}, { 3.0522854352, -3.3501062528, 6.9999230491999995`}}, 0.15], TubeBox[{{-10.1372461544, -3.4377895391999997`, -1.35376191188}, \ {-8.3595809062, -3.7618775481999998`, -1.5140862657199998`}}, 0.15], TubeBox[{{-7.5553135205999995`, 1.8009655697799998`, -6.4381075094}, {-5.9683216258, 1.07684146384, -5.9395977906}}, 0.15]}, AspectRatio->Automatic, Boxed->False, ImageSize->{574., Automatic}, SphericalRegion->True, ViewPoint->{-1.4288933630412575`, 2.906270257062557, 0.9807430601182869}, ViewVertical->{-0.021049092393472368`, 1.267057297702239, -0.6194084506071391}]], "Output", CellChangeTimes->{ 3.5709523166014643`*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsvXV8VWe6Nny9oR05I6dz5sycoQVKcSmUUoqFuCtQShW30uLBXZIQPEKE uLvvveO64+6ekIQkuJdS7/S9nrV2QmiZ7/udv9/Zv15rrSyS/Vzrfm59ZNVm 7Z7NG7et3fP5+rVjzezW7tz8+frdY0132PHWiP8DaOkKjIW4/hkYPPzM/+SD vjiI2/++8e8b/77x7xv/vvHvG/++8e8b/w/f2C9d/wEOZ5Jw7owSLoS7kxJe p5XwdlDC1544qYT/MQUCDifDd388cob9/R7p+i84dz4RFy4q4HpRCU/C94IS geeVCDmnRPhZJSL5vVH8zmh+Z8wpnk/wfFSJ2EM8709CyK5YZA77Xjvp+m9w vpgIV2d+rws5Ef5EiLMSEZf4HWwnju0ksJ0ktqFgG0q2oWQbSrahZBsqtqFi G6oDCih3JyJ2WzTSh7WzS7r+H7i7JsPDjdwJXyKYiHAlN7aXQCSzPRXbS2V7 6XymDLaXxfYyKassR54F2G4m5ZXFdrOPKpB1IBnpO+OQNqy9HdL1K/BwjsMV t2R4X1bCx12JACKU11FEPNtOdlVBxXbTnFXIvJSK7IspyCXyLqRCfSFFiwcV ficuCSXUFIGalApIp4AU1MeTkXsgPnVYy9ul69G44hoHn8tJ8PNQSggkwokY MkhwT4XycipS3dKQ6ZqBHJdM5DlnQu2ShUKi2DULJW4CmSi9nEGk85pwTUUJ 2ZZcUqGUdErPKlBin4TCo3HI2h4G1TAe26Tr1+HjGgt/9yQEsO0AT0rcU4Vw zxTEeKQi0SMdKvdMpF/OQpZbDnJd86B2y0eRez5K3NUo81Cj3EuNCqLyihpV 3vlEHqqu5PLnHFR6ZqGC31HJZ6l0UaHyggIVZxJReiIWOXahUA7js1W6Hgs/ 12gEuicgyFNBLgKp5JOGGM8MJHpmQ+WRi3S2n325AHluRSh0L0axZwnKvEpR 4V2KKp9SVPuVoYao9S9FXYBACVHMnwtR66dGjW8earxzUOuVidrLKah1SUL1 uXhUnIoeTmmDOIwQ1ctL0t3/FpcIco9HiEcSQkku1CsdYV4ZiPbKRoJnHpSe BUj3KEK2ewnyL5eh0LMCJV6VKPepQqVvNWr8q1EbUIP6oBo0BFdroTGkGn9E Y2gVmkIq+VM5GoPL0BBUgobAQtSTa4NPDuo901HvloS6C7GodIxQDOP4mXQ9 GXKN9fMQxCfUIxFhnskI90ojshHplYd4rwKyLEGaZxmyPCqQ715FljUo8a5F uW89qvwbUBPUgLrgRjSENqIprBHN4Y1oiRBoQGtkPVGH1oha/lyD5jBSD63g 05SikZQb/fLQeCUdjVTt+otRqHQKRvKv+I4Y4is+8k9/RQS7OcIrF1HkGOtV jGRyTPWsRCb55XnUodCrASU+jSj3b0ZVYAtqgltRH9qKxvA2NEe2oTWqDW3R REwbtNAe00rRdsS0EM38qRGt0fVojqpFY0Q1GsOEqEvQGEC+3mlopMrVu4QN p7pRHLQENS3p7iSJZtjlKOkcSb2M9MyhUAsRQ91LYDcrvWqQ7lWHHI9GqL2a UezbirKANlQGdaAmtBP14V1ojLxKElfRGnMV7bFX0RFHxF9FZ8JVdCV0EZ1E B++1oT2+Fa2xzWiOaUCTIB4udKSYpHPR6JOCRs9o1LoGJg0jvUm6fuk5fQh1 CZUeg/EhihYU5VmEaM9yxHpWI8mzDilejcjybEGeVxsKfTtQGtCFyuCr8DBy RaqlGwps3NEScw2tcX1k1EdpdCb20XdeTe5Dd/I1ohc9RHdyD7qS+TRJXWhL 7EAL2TfFNaExuo4iryDzIqpINlVEQRUJTfr/0IoI1zDIlCeQrpooI+VqxHk2 IJmCTSPVHK9OqH2uoti/B+XBvThhFA1f00gkW/qjePkV1G3wRnvCDXQm3SSt m7iqvIFuolclcB29KQPoUfXjqqoPXcpetCu60ZrchabEdjTGNZO20BRqSWgB NYUa7R+LOk/fxBc6CEyVbodc9EOUWxSi3FXS3SiPEqKaaEA8Razw7EC651Xk eveg0P8aSoP7sdcwGodM03HJMhkRttHIWhaA6tX+6Ey+Q1530a26i56Uu+hN vYtraXeI2+gjetNuoSftBrpSr6MjpR+tql40UfyNSeQfT7HHUMsjqeHhORQ9 Re4fjOHkN0vXUxjCg8g5gSEvg7wLybWCqEe0Ryt9WieVuhsZV64h168fhUHX URZ6E/tM83DIQo1TNlnwXqpC0vsxKFoRjObNIehOeUheD9Gb/hDXiL6MB+jP fIC+zPu4lnEPPRl3cDXjNjrSbqI1dQDNqmtoUtAwkmjJCQ1ojKWqRFPmkbTK kOhfU56KyEshiHJVkHIOQRG71xBNpNzBGNENlVcfMn2uIy/gJopCbqM8/C6q ou7jsE0pji8pwoX3cxH2YQoyP41F9cZwdNhFoDfjCa5lPkFf1pfoJwayec5+ jL7sR+jNeoBu0u8k9bb0m2hJI+2UXjQqOkibqpJQQ5FT1LHU7sgExhkPJLyA d9SlCPJOpbip0pfLiXrybmOsvUrefVBduYFM/9vIC76L4rD7KI98iOqYx6iP /xInllXC4cNSeH6Sj4RVaShcF4cmZlHXsr4hx6/Rn0Pkfo2B3KfEV+jL5fPk fInunEfozL6P9sw7aMm4gea0fjSmUE2UbWhMrid/qnginWCsks7U71/wjkWU C9XDtYjcq4gm8u5ArEcPeQ9A5XMbmQH3kB/6EMURj1Ee/SVq4r5CfeJTnPig Dg6f1ODcynIEr1UjbUMaKr+IR9e+ePTlfE/O32Eg7ztcz+c5/1v0532Na3lP 0UP+XbmP0E7urVm30ZxxHY1plHkqZa6iequqKH8GnMRUNEaFPsdbdievIdzJ E1EXqdrO9Hou1BPXWqKFcu+izPuQSHmn+N1FZtAD5Ic9RnHUV6iI/Ro1Cd+i IflbNCu/g8PKJpxZUw+39RWI2ZSP/C/Ynl0irh1PQn/+T7iu/pH4ge5qQP09 /oRr6m/Rk/8UXXlfoj33IVpz7qIp8yYaM/oIyj2thc9AfUmhH1dkUO6RL+A+ jdyvIOpCEmXPgOhcRv7UFdc2cu+mnvcjwfsWVP73kBnyCHkRT1Ac/TUq4r5F TdL3qFf8QP38EW1pP+HM+hZc2FQPv88roNyaj7KdKeg4lIx+9T8xUPBPXC/g MxT8wOvv0VfwHXrU36Ar/yu05z1GS+59NGbfRmPWANGNxkzqTAa9eTqDvSqL eh/9a+qvItyR1M/RPC/kUfz0JpcaSb+d1HtI/ToSqC6qwAfIDH1M6l+hKOZb lCd8j+rkH1Cv/AFNqT+hNf2fcNrYivObm+GytQ4RO8qQvSsXdfsVuHZKgYHC n7RwvfBH/JmXZF5IqRd8ja6Cr9ChfozWvAdoyr2Nphwyz6HWZJN5FrU9s4w9 QCtNjnmR0MNOUWGYv0edzyf7SrIXzDuo8NcYf24g3vcuVEEPkRH2JXIjn6Io 9huUJwrmFLrqezSl/YjWjJ/QnvUTzm9pg/P2ZlzZVYOEPcUo2p+J1uMKXD9P 9kU/4HrR9zx/h74iUi+i0AufkvqXaM1/iOb8O2jKo8LnkXoe/Xku/WI2DTWD 1BUxL7RRJwr8LGmfI+0LtE/nTol2jOdNibaStNOp47lRT1FIPSlL/A5Viu9Q l0La6T+gJfMH2toP6Mz9AZd2tsFtdyOC9lUi7WABqo6kofu0AjfdSb2YNlpM n0P0FFHPCynxAtJWk7b6LhrVNwjSVtNO80g7lxLPzKZORr3YtzhSx53I+yx5 nyfvSzLvKC+Km7apCH6ItPDHyKFtFsR/g9Kkb1Cp/Aa1qd9SD79Dc+Z3aMv+ Dh30IRftWuG6txXuBxi+Dpcj7yj92ikV+lkR9xd/Tc4C9C1F9C1FtM9CakoB eReSdyF5F5J3AXmrqSl51PHsTFQlR7yA9xRE2dOvONI2najgZ6kmF6kmrlQT 8o4l7+TgBxLv7OgnUMc/RUnSU1Qo6VtSv0Z9+jdoot9uzfmGdvYNOmlzLvvb 4H6oGb5Ha5B8vASlp7LQzvrtFmXeV/IVekueoKf4MXnTJxbSrxTdR1MReReR dxF5F1FNCmmb+awdstNfGOmPx5A2Q6Yj3cmZBqoJKbv0Mru6gRhSTgy6j5Tw h8ii+86Pf4KipCcoV36F6tSvUJf+lAb0FC05T2lcT9FOF9epfgq3I23wPNaI kJNVyHAoRPXpdPQ4K3CXSV5v8SN0Fz8k5QdoJ92WYrrCErqTEmp2SQ8ai2mU Rcyy1EWozUp9EeXQQ0xOTjLy2NN7n66jhtADuvSQ8nVE+95GQtA9qMIeICP6 IfLiHqEw6THKlF+iMpURKP0J6rOe0Ac8QUveE7TlP6GmPoHr0Ra4n2jFFft6 xDiWI5/a13Q+BQMs6LqLH+AqqXYW30NbyR00k25T6U2CUbOUHrCE3ruY3ltd gOrMlOGUP9cUCZFHVYg6wTzKnknJWQYb56vMpwYQ7XMLcYF3oAi7h3QmIzlx D1CQ+BAliocoT3mEqvRHqM18jIacx3RddL75j9FGV9Ze8AiXT1HKDi3wc6pF 8tlSlJ7PRjsToFuUciel2kGaraW30Fx6A01ldHllDDZlzKlKmtBQVIm6/Pyk X1H9D4QdpO0dpQ6foO050fYu0vbc+xDlfR1xAbeQFHobqZF35Qx3JEpV91GR 9gDVzOjEpz6HTpaOtjn/Ac3oAdoKH8D9dBu8zjQh5Fw10i8UoepSBrop2DvM QFtLmDqVXkezYFhOhuXUgTKqbSnrzaIyVOTmYDjNL6TrCYg4lIXII6WIctAo gBsVwKsf0f6MJSE3oYq4hYyY2xInNbPmImbMZWl3UZF+T7pXm30P9bn3aNL3 JBfVUnAXbk6N8DxLJTjfgGjGqFxnNUvsVPT5KijFAUqxHw3l11BPjvXlnagr a0FtSS2qCkuSf0XxTwjZk4JIesoomkHUGeF9u9jpNC3fPsQGDSA57DpSo25I dHISb0KtuKUp0v6KmpzbqGOsasinaeTfQpP6Fi6fY4dfaIHvpTokupTCf9YR 5M7dhDbzTagr70VNeTdqy7uINtSUNaGyuBrFeernSu0t0vU4hO7JRcSRMkQ6 1CPyQhsimf1EsgCJYgESH9IHRUS/xCQz/jpyk69L10WpMtdyZoyVWTdQnXMD Nbk3UJt3A/X511Gvvg73i+To3ISVs/xgP+sc1r8yDn5EJlFFkVWWt6OyrBXl JQ0oKigbPmohD/b8kdSKEH68GhEUWYRzGyI8SM33KqIDe5AQ1itRSI1lMp/Q h5zkfrkk/C+UpPejNLMf5Vn9qMzuR1VOP6pz+1CdR6ivYcmsZCIC770yEW6v vIWSUe/g7qRZ+GHaJJSWtaGktAWFRTW/Hn76I/y2pCHkQDlC6RzCzrcizK0d YV4diPDvRHRwl0RAEd2N1LgeZCT0DDJSsxooYnZanNFLZr0oy2JRmkPkdaNc fVVm9MoUrP2LNkLGGKP5TTP8MM8EP+vo4ud5k5FXVI/0nKLhjOQBut+QUS6C Dlcj2IFWdbEdIZcJ73a55b8jPrwTydFdUMV2IT1BJpitvIo85vj5aVdRkNGF wswuFOV0oiiPYFwuKuwgmwXYONIK4dOXoW3BB/jJaDl+trDBz2baUGWXDR8q lIcsR+HK5lwEHKlB4OkWBJFJoHs7grzJxr8dkcHtiA1rR2JUOxSx7UiJ70Ba UgcyWSJlqTqQk9aB3Mx25Ga3Iy+XyOd1QTtpGOCTN5bD952VqDFYi6+sV+Pn pR/iOyv9lGEUdkrXI+F7uBZ+ji3wZ/N+FIT/FdLwYxcFMb0MJYUIUohpR3J8 O5QshFOU7UhLbUd6BpFF5BBMqNLY/JJZJ/CJUTfs569DmukmdC5Zj7vLPsbw 0Vp5XPof8DxUhSuOzfCm+/F2bYe3F9v35eOz3TA+diQfO4aPHZfYjgQFOaja kZRGHmw3me0msd2EXNGmM9ZY9iHm4s/oy2MTvcTNtuFN7tYMhV+2r4MHzdWD GujBx/TiY/pSygHh7QiObkdoXDvC2VwEm4tkc9Pe1Mb0Gdp4c8YizCBmjrTE gkmb8YG+Hba9b4f9a+xwYN0a6L2rj+Gi3asZ27zgUAFnlxY4e7XhEtty5aN5 8NG8+GhTpy+Uvn/am4vYxiK5DV7P4P1ZI22hM/ULfGJoh53L7XBorcAKLRjO NcQIGL5rAIM58lzHcO90SDMCP2nKfEyathCTp2kTC7FooSF0Cb0FRtAnDIjZ I9+DwfQtWGVsh90f2OHwul04svojGM011IKx1IwxmzGeYwCjd/SfiyEHNdLU XqhPGEhfL6AjmljIJggDwpDNGBHvjFwOkxlbsdbUDvs+ssORdTtxdOX7MJ1n BJP5hjCZZwjTuQIGMGWbJny04VnAAen6L2xDnzAYakt3WHuGEoxhTBgtMMac kR/BYtZ2bDDfjQMf78bRDTtwbMVilpRmC4zEwRAvw4yNm803gNk8Yq4+jGfr IX5Yw/IM0u+khnXYsM5Qw0ZSwwZyo1owYqt/YNsmMFlggjmvroD1O7vwmeUe HFqxB8c27YS5tgnM+e/y2Zg8zPnHL/NoCPMFBjCfrw/zefownaOLuGEU9knX f2WzwyhoG0FX20jz7MakYEKYsn0BM5gQpsTcUWuweO4efG6zD0dW7cPxz3bC YpEZ27ZYZIrfw3KRCa8EjGHJ77PUNoQl27BcoA+L+Xowe1cXsS/QasFFV0Db gDCUuWgbUxwCphIXI7YvczEnF3OYaZtj7pgNeG/BPmxdsh/H1uzH8c07Yalj ocWDuTiY4bc8mhIm5GYEq0XkwzYs2ZYl+QznsmeIi94LuehTzjIXwcOcsCAX C5hqW5CLJcwXWWLu2M1YrrMf25cdxPH1B3Hi8x0jYKVrwSzOStccVnqErhlh SpjASsdYomS1yABW2noUk27Mr3zM36CzQFdmtNBAw0r0lglZmZKVGRmZUzrD GVlqGFlh7mg9zB+3BR/qH8LODw7hxEbiix3sMSs9K0ZSax6t9S1hRVjrWRDm hBmsSdFa1xjWOs/oWSzUjf4VvT+RlkZgwng0whqkZkBahqRkvNCS1KxIzQpm pEVl1bFm2Jw7xhzak7bTLR2G3UdHcOKzIzi5ZbsWOVkLdgZWsDEQDMWZDPXJ UN8cNmRoo2cKGzK00TUiS30yfI6dncalyMLTo2obSOo9yE5PYmdBdpYUniUZ WsFE2xqmi6xhRm7mOjaw0LXBvNcXQ3faLqw0PYo9nxzFic1HcXLrNlKz5VPY GNiIgzU72MZA5mhjYAEbwVFfcDQhBEdDcmQHa+tE/Yrj38lPl9z0CeF+yI9q pkc10ye/QY7P+NmQnw3MdW3Jj9Czxbyxy2EwYw9WWxzDvpXH2MHHcGrr1hGw MbQlPUMb0rM1tOaVFc+kaWgBWwNz2JKirb6phiI7WVf31/RGkIruEDUtidxf eDQnPUtSs6L4rGBMaiakZqpjS3q2Mj29xbAk5o39FMZv78daq+PYv/o4xXec 9D4X4jNaTAWy5dHWyFYDG4mqrRFhaEmQqiGpGpiSKqWpb0S6+hjOc3BaWneB Dnnpyd1MrvqSCM15baHhag0j8jQmT5NFgudi8iT0lpDrEljqL8G8cavpMQ9i ve0JHFx7Aie3keuWTZSCrdESLdgaL6Zbloga28gkjShTI0sNWQ1RA8pTX8hz ESL/JVF9DUkTDVGZpAGFaahtQ6K2JGorC/Q5kkthabCURNfDYt5hbFx6EofX n8TJ7ST6+XoIjkvFQcOWPW+sYWs8jK0RxWrE3jekSA1oQPq6vyb6D4Z3uedl kqaSNAVJfZI0oCQloiRpoiOILoYZCZpTihYakpYG72He+M9gvfAoPlt2Ckc2 nsLJnSS6eZWGpol0WEKhLjahFhCLTYbRNR6kS8EaUbCGpGqg9wKh/p1c2fML BrmaawQqeArIAjUiRxOdJTDVXaLhuhQW5Ch4WhqS64QtWKxzAp8vt8fRz+xx ctdxdrzJexJRoQOmS8lvicRTSzDVkmi+jMXGJGlMmRpTpkaUqaHBvyCpz3yJ vb7gF8JcaDMkTGNBkgRN9ZaS5FKYk5yFhqCV0TLMo79cqn8SWz6yx7HPHXDS 7pgguYxcTN+j05RISlgiQxIshWpizWsK1ETD05g8jQxfSJMpjEyTirmAclwg aFoTgibluGgxaS4hzaUyTf33KEvSNFxGmoSgOXkXlhnZY9snjnRIjqR5VOsZ zT+R2nvDqAoslqmakqqpDX8mVVOK1YR9b0wnZWz4YpFKXE2GcbUa4mqgvZhc l8CI4jQhT1NylLga/ILr1D34wNQB21eQ61Zy3X1EdPb7+DOPy7DYbJnm/N6Q ZG0FzGSqtqbWMlVTUjURVI1eZPZ6TA715/+C6QIbBkpbGFCiQjufY2qwjEwJ w/dhYfQ+5k5irTB9Pz40d8TO1adxYvtpMj0MGxLVGqRr9r5M12wYXbOl/FnQ pXTNSNeMdM2EdKkIpv+C7j8kweoJuvOpp/MthwRrMERXCHbpc3TNKFBzo0G6 y6D91kF8YnUadmudcGKHE07uOUi6ywVlLcFVHKgRgunveTmcp+0znmaMqKbM SUxepAEkyiz3GdFfy9VwiOh7MDH4JdHlmDv5E+jMPowVNk7Yvf4MTuwk9hyQ iZo9R9RWJmo+SJQwJ1FzGw1Rhn0z5nYvJPoqdFkR6M0TRM1kic5/RlRfEGXn G1GaxpSmif4yDdH3ZQUwpkQnr4b+u8ewaskZ7N1AknaC6F62KRGVOt/WXHA1 XybCFMnamr8ny9V8CWzMF2voMhUwZxpAuVqTruUv6A4uJ9Obx1RkHqnOG7Sq QapLYKCRqbGeTNV0kCplai6oTtkAw/knsPq9M9i36QyO7ybV3XYi5pPsn9n+ ckFVBmnbkLENudpQtDaCq8ViwpbQcDVn6mxm+uv05A/Qm8twP5cZE2nqDUp0 oSxRfdI0pESNSNOYFLVgakj5CJZ/wLtTNjMpPYW1y89i/+azOL5HiHQHrNnv 1ubLh8RqYy7sSzD8vcTR2oIcLYZztCGYnZKjpZkJfk3yb9B911AmOVcmqbfA mimoLfQ0JA0ESXa7MWVpQqKkCTONLN+duoXR1QHrPzyLA1+Q514nHN+5hfHI 2mw5U2Vz8TA2NHhrIUALmaA1CVqTnDXJWVOI1iRoZW4GC1Pj5wjKWfxrJMiC Yi6TpXmWMrmFMjk9QY4dbUgJSgRpOCaEKcmZGS/HnKk7GO4dseHjczi45RyO CXLbNrKzlhPvs833JYbWEj+C/LQkhr+BFTlakaMVOVpZWBGWFKDZr4sMym+O MSmayfKjLupRF/UYLPXoM/V1ZfkZkp6RgUzPhPITFOdMtWPQdMKmT8/h0LZz OLrvNJtYDkt6yxESwT+Q4jKCwdVCYKmG1uLnqFmaW8CcvnI4t8GKUXeOKU3b Arq/6Fc98tIf5PUL0b0zfQ9sTM7gs5Xktf08eTmya5YTVE9LmZYkvWUSLUsJ TKhIy5K0LEnLkr1qSYmZm5lheNm4dzDLnGMGXfamLsWlS3HpUly6Qlx6GnEZ CHFpaEmU9mOx+RlsXnUeh3eQ0n57QQcW5CEYWbAHLQXMRQ9aSD1oQVFZkJMF OVmQkwU5mZtb/LrG/wt03jFhDwopkRLDiK62oENopGSgr6FkKFOa/eZBLLE8 i8/XkM7O8ziy/6QoGxmGX+Ij03vTu1mQirk5U0hzsnmZR6Z0ZGNOJuZkYmZu +YKhj//Cotlm0JkrJGP9nGR0KRk9IR2JylLMmmqL2TMPY6n1WXyx7jwO7SKV /cdhShJmpgwHZlI4MCMLM/otMzYvg5kwBWJGGqb0XcaMXcNpyINA/4lF78g0 dEhDh8mfDmno6Mh6M0jjrak0sbePYpntOWxZfx4HSeHQ/qOUhAnzpxEwIQNT CUuFczNn1m/C5vkPjEkmDKCiqeEjUAc1wz+LqBmL2PAiNryIyqqjq3l+pu8z p6zAu+8cw/uLz2HrhnM4YEfb3ncIRibsGjYrmjZhgyaMf8aEFozNRZvGTC6M NG0m/EoFRmA+M4oFhDYTIS0yMGAgGPU/05/xoDosIg8d8pgxZQ3mzT2O5UvP YutGOujddH5798OQibihKbvckAnYyzBk84bMFwyZLxiyeQOmYcNHFndpml4w Xx8LFxgQhpo1a7RbXss5mQbziLmGGDVyBka9NhOjRs2CNulMn7we8+edwAeM ZVs3ncU+xrJ9jGX6xtRcVgMGhL7pYi28+upEKudrPIonXCRDPCgPOnMNhluF vLT5P8iHvBZSJJoRT/GRRuEWGEnXYsTTcL6RFozmGzG3NyJFI1IUw6mvjZxO ijMxbdJGLFhwAsuXOZEeUxi709izaxt0jASl1yRKPGrzaRcROgvIRlfw0hMH fUFOPPV/wGAuM+l3DSRmAg6OCjg5KHDOQYkLp5S4eEKBC8eSgoY9xnZNDNaW BlKfH7QVn8FBW/Ex5tmYT0EN5fEPMJlnJA3Yms6TB2xNSGLJrBQcWvcYuUE/ 43HVz1j4rh4WvjOHf7OQ3/rSs4FafpeeGHbVFwcDISBJSob8nv/Exx+dxCcf 2+NTYg2xgZXSZx/aw+esEn5OSvifViLAUYlAe+IkcVyJoCM8H0yGn/x0GzWD W2fOJcPlvBKehC/hf46/SoScIfhVIfyqYAf5a/yPKeF1KBnfS3/721+NLj8b yTbW6CBNhlWWCWG6wFgaSTamSZjx4cwJMaQssHD0LJgRn4+eDfs35mDBbOoL U8k3R74xpDe6C420pAZeGhqP1wyWy6rzN0n0q1ecwpqVDoQ9Nq6wx+fEtk/t seMTe9hRUHsppAjNBoRosQGBQoqmkGL4dDHH5U0IMYd4b78CEXbx8JaFtU7j V8+fT4DzpWR4OVMYzpq9B0TMJSXiLyqReEGJJAoxmQJMZjPJFGASm0hgE3En lIiiAMMPKb+Rvu71Z4Pk2vII9bOReWNZocToOCE+ZiyozRaawlxA21QaFbfQ lkfHhfwWjp6Pj0cbYeL/jMO0Vydg5qiJmDVmAt5+fTxmjX5jaAB+cKZBSxLf S9Jsw6Dirl91agQ2rnag6/iCx+2r7bF7FYVGYR6gIA9TiEcpxOMU4okP7JHE p0umEBVUDwXNJ5lPmMQnTKamKShEBYWYvCcJMdtjvGQ5rtGUtJcuxsHNmXJ0 VSDQlTIReyuIBEJBpEh7HZTIoFyzKNdsyjWHcs0W+yyc5P0V6ZRpCrstmS0m HlYidr9ik8ZYHZyScIa/eolwY0978E+ukOgV/tkV/pkX/8zzuAKXDyXBfjB6 D40/D46IG2lG501gpOmDwVkC8THXNqf8iUXMiReZaWYJLKVZgoWjF0JvtA3G /c9ETHltMt4cMwWzxk7B7HFTMGf8ZMwdN4G/qy80WnT1y9JkiDAUgY2rjuOz NfY0nc/XOlBW23m0I/atccBB9sgR9shx9sgp9ogDe8SRPeLEHjmz3B7pfNAM IRv2SDp7JJ0Pmk61Tqdap1NG6QeJPclI2R7vKffIKk3lduFsOC47J8DTNRn+ lxUIu8weIRIJFZFOZLmxF9g7+eydAvZOIXunWIC9U8zeKSIKxbYTijyfTHLE DhjqRBr1QbmfFrIraa1G2ucvJEkbhNzYuV78Cj+eg4hQflU4vyaSBiStgOPX RPGBothrkXyYcD5MmHBk+5NxXBNhnp/PEDMHz+YyjIbmd8xlh/QbaRrDgrDU 4VnHQkynwFKX/ywmMMax72ww5u+TMOHVqZg6ZhpmjJ2Ot8dPxzsTpmPepGmY P3Hy4CSW1G1CNwZnsT5fcxJb1jlgq8B6B2wjdvJ6L3GQXXiUOMFuPEXjclzl ACd247lPHXCe3XiRLvwSu9GZhpXrpByBXCrs75DjKMsxlwLIpQByjymQQxec tSceSZ9Fusu9uFI6vUJxRtGmEuBzORnB7gpEiV08HpQ+kc7rLCLPXYUC9mYx e7OUKCcqiEpXNlrFi9+LS1Swk8vYMyXslUL2Rp7oUKpUJqWvskvGO5oYMI95 h5zyyGmPSHq0iUWMtRM0tY3zpSRp25Y7v9OHCCLCiCgqUSyRwHaS2I6Cva9k W0r2vIrtqTTOJYntJrLnE9h23EE+1t5kHNHEr6G5o6HZLDH9YaKZN5Jnsp6f M7IUyT07/z/Z7ax7dFk26smwJnTGaWP03ydizD+mYsLo6Zg69k3MHD+DPnUG Zr06HR+NfBcLRr8p/Cd7/X+kvheziCbE1rUnsZ19vn2DI3YQOwm7DTRd3jtM HKcenFrrCMe1p+G02hHnVjniwsrTuLTiNFw/cYQbcfmT03D/2JFwoAsovKBi fxTSIgoolwKNcRVSLoWUScHxJOQfjEfGtkhcljVhhUYTPC5FwdstHn6XkxBC TYimBiQRqZ4qZHqokOuRggKixD0V5e4pqPRIRY1nGmo9U1HvlaqFhispTMca vFMIJX9S8rYSdZ5K1PBrKqknZc6y6audZNXMOJD8ltT6S8zWDKRkdCgdE+PW v5NyUINhGMxH9agrunP0x0h/PRKul+KHduD5EEHU1gieY9wGd8MpNbvh5AiR SdXJIpHsc3KEyCahbM0OvAwSS6MPSjki7/xT7FUgdmcCDmlKFHluz4AqY6iZ OTMZmtczkqYbLYfm9Mx1rKg4rEl1CT1raYrRWp7J+y/ojNfBGMbeMX+fjDGv TsOE12dg6riZGPfqO5gz0hiGIxdhych5WPHqPElzjIbNPG9fd5K64oBdGxy1 sGujIx3kHh73U32OEMfXn4b9+jNwWueEc2udcGHNWVxafQ6uLK0vEx6rzsGT 8CKuEN4SzpBfmWs6HWSpSxpKXNjXzsKcB/fkEU7JKDmViKIjccjdHeEma9Cn 0mks3XIEfN3ErrxEhHooEMOuT/ZMQZpnOrKpKWqeiz0zUeaRiSqvLNRcyUK9 dxYafbLQ7JeFFv8stAZkoi0gA22BAum8TuU9Ff9NhSZflaRatVSrKvqlMhc5 ihQwIc8+nPSmROM3Q/XD4IIMfcJgoaGUvmiJ7GWElLq8PFQ5iPUehu8aSqs9 Xhu0BpcEeGn2V/qzrTBC+MZ4/qwgUqhV6UQWNSuHPPIoKTU1q0A4vwtKLRSd E35R+EER4NSaAJdLJcumHWYxBUk/QAXblQR55cUEqr2O5Jf0NHmxnmYa7LkJ YyrWs+lYa2k61lLPhmpF6NtSswgDlo3j9aAzwZY+abIUm8a8Nh3jxs7E5PGz qF9zmSdbYT51zJQ69v7I+Vj96oKhlQQ71x2nD7Ifgd3UqNexd+NpHNjohCPE iQ1n4cDq98z6Czi/7gIurr0IlzWX4LbaGR6E11oXeBM+hO86F/ivF3AmLtFf 5KLKI4fnbFS6Z6LCPQMVl9NQ4Upf4qxCJYN75dkkVDgmoPRYDPL2hsJVVrBP pNM4eF0MHdpmKSuYigqWhjSvTORQodSeOSjxzEWFZx6qvfNR76tGk58azQFq tAap0RGsRmeIGl2h+bgaloeusFyec4hs3stEZ2g62oNTqXgqNPvTh/nSd1HZ Ki/Lka3ISYHcIwnylqnfS4qm/WtFk5bJGBHGUtJsIrTOlPny72BKtTMjxFla l6Mp8YypfMZzDP6hGYdwOR+GK25yTPZzl3fYRhCxGo+cwngsYnM2aeW6qaB2 VaFI2IILLZXSFHZRTlTwvpYUln8v/Szcb6km+xKKKdxwvr2cIWTuS8J+jSLK c+8GQ0qop5k0FkoorQvQzLmbijl3aU2ALZXQVlJAK/3FVMDF0lqAReMpm4nL 6OQm4/WR0zBuggFep6MbO/YtTBz/NqaN/BDTRy7DzJHW0KEyWlEZPxy5EOtH LaQSHsXuDafo1Ry0sHeTI92LGDM/sOksFfEMTmw8T0W8hDMbnHGeSua8zg2u a93gvsYdnms9cGW9B3w2eMBvgyf8N3oi8DNPBH3mgaDN7giWcBm1PgWo9VYT +XRFeezpHAa0LFR7pKPGLQU1zD9qLiSiyikO5SejNLr4sUZInucD4e8ayVAT J+liNB1dEp1bGr8lxysPBV5qlHoVovJKEWp8itHgX4LmwFK0BZeiI7QUXeGl 6I4oRU9kCXqjSnAtupgoIgoJNa5F5aMnKpe/k42r4Zn8mzS0BtMJBjCu+ihR 7SkyLgVKziQh93DcZE0c1dYU2DpS/9HpCYX83ZA6mmhgJsDSQaySMl9gLC+U +p1UYouroVKbIVcai3hXWqD2N6mRN+B+IZxhlqmCZvt1MLlEEnGEgnJIZZqQ SeQyVVC7p6GIZl7qloYy93SafhqddxpzgnQpfahj+lAr0givFJ5VUq5Q7S7b XLmrJmcQpYLYmX6K9ncoUaSxkAfQzDSrGww1CweeTSHLi1ishy0QGbYCg0pq pb8EVgZLYG24BNoTmIVO/EhWVKGgo97EG4zG49+YiZlzjPH6G7MwYcJses2P MIMKO5sKa0CFXTxSB/s+2o8jK45g30Z7aqgD9m86TZylpp7H4U0XcHzjJdhv dMWZjZdxnhp5ab0n3NZ5wX2tN7zWe8N7ow/8Nvkg4DNfBG72RfDnvgjZ4otQ ImyrD+GN8K1XePZCQ0Ap9agY9f5FqPMrQJ2PGnXeucyzGEgp2zoWx3UXE1Bz JhoVDuFwGa6yE+HvHI5gt2iEuifTn6QiwTMbKV75yKaaqr2KUeJVikrvctT6 VaAxoBItwZVoD62iqlbhamQVeqOrcC2mCv1xVRiIq8RAfAWux5cTZUQpUcx/ K0JfbAF/Lx/dUTnojGA8p1ttDkpBvZ+I3QpUCbV1SkDWgSh6u8Fx0GdFwQhp nHCEGCSUigLtd/XpwX4We5rF+MdvBpVbcriDztZE1MamVILfUrmN5WWAC+UB DwttsfTOhBADSpba/EUL7WfrAmU1F8sTxZrIv2qcsKeINUxmApjMBNG+QyQd VyGeUFBn5aQmHXkeGSh0z2JanM3EhqGNMUh4ktorOUxucqRt8Fpo9M1m5dHE JKfJL5PI4J00/huF4q2iUFQMjbLOV1Dfy6jvJY7JUB9NgDyjMh+68xdpFsgY PbdAxkDouljBoz24gmdwccxiafWOrOdLJT1fOMEU2hNXYtHkHUN6Pk7oObPO iePfwrjRUzB+NKuYUdOo6yuo65/QOS/DXOq78UgTHPjkEHX9GE6sPkn9dsTB TeeIizi0yRnHNrni1EZ3ONHbnt9wBZc2+MBtvS881vnDa0MAvDcFwm9zIAI+ D0LQF0EI3hqE0G3BCN8ehIgdQVqI3BnI7Dpqpz8id/ihObiKqERTUDkaA8vQ EFgiqX0DQ3ojVb7RKx0NlxVocI5F3flIlJ8OhrOs7h9Jp0nwu8hWXCMQejkR 4VT3WPaMyrMAmVT1PK9yFHtVosJbvNugBo1BtWgJrUN7eD26IuvRE92Aa3EN 6I+vx/XEetxIqsfNpDrcSiYUtUQ1UcWfK3EzmSaQVIr+BHrw+EJ0x+aji6rf Fp7BR0hFIzOJOkntE1FyOvYVTRm8YIH+8IpHHnoXi3UWiFFdUey8PFTuSCWP Zhha3tTyn/Kzaj66GoMwYE1iSC03JsQwoClhJi2INaXKm0pDTpZDw06/hZWO KWGiASOwjlgQaiQtDBVGIqxQLJw1o3UK4/gvDQN/epHBj5aGT7xX6tC9bHqW fCZihR55KPXIl96zUX1FhNsC9qB42UIhk7JCtAQWoJXQQhvTsz/xmM8Amctz Du+zKmAl0ORPQ/FNQR0LymoaiRhwELlimVMSCo/FYbem+pBWkJHrs4VZmtVj TJmNaBzG2r9YOaYvrxyTjWMpFkywxMKJ66A9dTfGjJyKsaNFyjwDEzTGIQxj /OhpxHRMpOFMZEk/c+QqvEUjmTXyfXlTzESNTVySfjq6yR0nN3nBcaM3zm30 xcUN/nBdHwiP9cHw2hgC789C4Pd5KAK3hNEewhGyPRxhO8IRsSsckXbhiLIL Q/TuMMTsDiVCiGBE2wWiNYzaGlZDja1GcwiNJFgYSQk1jaL1yZXfY+GRjEbm ynX0Y88ZxmQEOYch1C0O4e7ibSnZTFsK6M5KmbZUotCrBmXeddLrNOqDGtEc 2oT2iGZ0RbegJ7aFCt6CgcQW3EhupQG04LayBXdUzbiT0oS7AqmNRD1/rsNt VQ1uqqpwXVmBvuQy9CYW42p8ATpi8tAawd4NYc+yrqvzSkLlpTgU2EdSB15c xGncvVTEjXhWxP03jEURN09TxM0VRZzB0NsYFjE3GByllaZe6PVl8zBhXiDM QzNCrhmNpWmwQtcxF/PwuuawlmAmQSyttdYzZe2uayIMR1djLDqG/CtDWCyU V5ebzNHDK5o58ABmh8HusQjxSJBaF28JEZ9kr2xmiXkMu/nyliXPIpR5FjNT LGGmWMowWcqeLGO2WMaMrwztIWXM/sq00BlWSjvrCi8hiokiopB3WdiE5qEt JActQaymA9JZ+Mj2UuuuQLVzMirOJNBWoiEvvbCUFzFKCwNNhwUSsebOWrPK crG8eFF3CW1l6dDixXnjTTB/wmIsmLgJC6fvg7b2KdoJM/uxb9JOZmDShOft ZDxtRLKVUTMwedRM2slqbFm+H3afHJMe/fBKe+l8ctUFBpHL0vXxTd5MmPyY MAXgwsYguGwIgfv6MBpMOLw3R8Dvi0gEbo1C8PYohO6MRtiuGETsjkHUnhhE 741GzL5oxBJx+6IQvy8S8fsjeB2GjsgmtEU2UvPq0RJeh6awajSFVkrvrZFf AJMjv1DFMxGNlyNQcynwkmw3NuI0QvZ1z11hCgIuBCDUJRrh9EqRTAPiPQqg 9ChDhmcVg0wdiq80osK/GbXBrWyxjQza0RnTge74DvQldmIguRM3lJ20lU7c Se3E3bQO3EvvwP2MdjzIaCNaed2Cexm0sfRG3EpnMEqtRX9KNa7RrrqTS9GZ UIS2WDVaIrPRKNlUMuo84lF+IfoPmmDzrFQ1GDInuVQVc78ifxoh1wcLZMgV 60u/rFi1pHL1ZalgFZ8xI8dqBtMNNHHpj9QfYVxmMCXEhgRzabpDHjUX6/6t BaRl9Za0Kgst2OhbiJVZevLi68F17NZ6JgStTHfQygyYuulLVvafmgLc71KI JqGlM2N+FsF8THySaF2pXgXI8irS0HqNiW0FavwqmURUMamoYnJbzeS2Gh3h 1eiKqGaCW82ElWCS2xNdSVQQ5UQZ75fw34uZzBby99VoDc3ld2QxH6epiRzO k5WicyLNLBbqY+HYNWhm8/U024FoZgvMNWtG5aWtg8tan1t3q/8e5o43xbwJ yzB/4udY8OZBLNRxgIGNPfO06f/SxCaMnkETm4lJxJRRb2HK6Lew66Mj2PPp CexdcVqSwJFVF3F8FXO01e6MS77SvdMbgxmXQpmrhcNtQyQ8N0XB+/No+G6J QcC2OATtiEPIrniE745H5J4ERO1NQMz+BMQeSEDcwQTEH4xHApF4KI6I4XU0 lbudDr4V7QwYbdHNVMoGNEXUoTGsispJzxZEU/PPll8DdCUODR4hGjNbMiy9 GZxvl81s+tC94IthCGceFemWgWj3fCR6lCKFppZFU1N7NaHErxVVQe2oC+tE c+RVtMd0M+R041pSDwYUPbih6sXt1F6aUi9NqgcPMomsbjwkHmVfxcPsLjzI pvllt+NuVituZ7XgZmYTrqc3oC+tFj0MZ12KcrQnlqCFJtcUKd5Rk8IEhVWX ezQKz4XKpQqPw0vx4cNDRhLkOlyULKISESWLVI8PQrJIUYb/VZr7NtUU4uIz 9tU3iHHyuggx56gtzzUaS0YndgFZ0OgspBkLMWVlpSvPU4g9LcLaLNneklfG 4RgRRaQRtgYWYr2sgTl+J+3SkLZA6DMp1KP16Yr9Lvoa69P7s2aKJtiVyYow PCYakTS8aOZ8CczzxCeDlaT4FHpWotSrWrqu8a9FfSD9bnA9DaieqXYDOqkc V6Ma0BPTgN7YBlK4FlfPABr+vj0KPziFvvgagp6OFWdvLL1dTBkzkRK0Rxai lYbYHEJDDBTFFLvAMwm1LnE0wijZ/qw09mf8q3XQBoPrtaUl5bQ/2p5Yqz2H tjd3wkeYN3Er5s88igV6DjBc7Ig3XmdNNG46Jo1nrcQaacJoeaZngsb2JoyW bW8SbW/y6FmYMmYWdn1iR/tzpP2dw96VznI+uMqToc4Hjqv8pZ+dGNLOb4xk iIuG+6ZYeG2Og8+WBPhvZ825MwkhdkkI20Px7lNI6wtiDigQe1CJ+EMKJBxW IPGIAklHkokkIhHJR2iLR2LRGd+FjrgOBoU2tNAWm6Kb0BhJGwwftEEWUQGZ tEMF7TCSaYIPLv7/GeHfpXt+Z64g9BIjrksKotxyEXu5GEkelcwf65g/NqPA tw1lgZ2oDu1GQ2Sv9P6tjvg+9CT1o0/Zj+spA7iVNoA7GQO4lzlAgxvQwqOc fur549w+fJl3DY/zevEoj3aZ1417eV24k9uBWzltuJ7dgn7aYi9D4NWUGnQo KtBKO2yiHTZG8GkCFaymY1BOxfzt0FoiXc2aE/0XjhoYD44cCAMcIQ+HiVED aTmKhbaxljRo8FdpvEDs3rNYOIhBWxyHN16doMkuTZhdynP9JtIOOAt56ljH Spo3tBKQJoFspPkfWwNryQ73vzIVSX+bibbXZ+LxxKn4atI4LDa0JDRbkgzN pC00wh5FRLQeskc9mMzT/aP0qFMReCkIYQyGEe50jyx3o1juxjGzT9bYYjbd pPgU01VW+NRL1/VBTWgKaaYtNTM/aqFttdLGWtEb18pMv5UlLcFsP/SD86hc 6Yubu33x9XFnDCSxNE6sYwZTi94EBs34SnTGltHh0y0ySDYxH20MYpf4KmmX Cah1jkbpmVDsHG6Y839pmDayYerIhmmi2UTxzjgzGuYKzJ24E/PePo75ho4w fO80rFefplEyCI6aQEzGhFEaoxylMcpRIii+hUmjnxnljg+3MfcUhnmWhulM w/SQ5HBopR+OrwyA/cpg6eczG6OZe8bCdWM8PDYnwntLEvy2KxCwU4ng3Soa ZQoi9tECDqTCc4kXMt/zRuPaK2ha64XEo6lIOpaK5OMpUBxXEUqChno8CV2J vczWetCWcBUtzACbaKCScUaJN80xFw0rpoFSdsHMQwPjaZwBg4ZpKw+A8fPy sJgYdC4I4ZfY4S6ZNMcCmmM5FB61SPdsQq53G4r8u1Ae0oOaiD40xvTDy+IK vG280au8yRTyJm6m38KdzFu4l30LD3Ju0e5u0f5u4sv8m3iivoEnBdfxZcEA HhX042FBH+6re3FX3YNb+V24QbscoF1ey2xGdwadOdPSNtpkcwIfIppVaCgf IiAe1V6D9vi7oYpM57kBCyPNgIWxljRi8fLzYxaEGK3QkrbSTpXHKhYN7hSV yzAxXvH6yDGSSN54bTwxUboWSzKMGBLFR5rO18zJDs7HCnMU02U2hK2AoQ2W vjIbLn/XQfFEQ9yfZYif5+ni5wVz8O3scVhiZPnMNMXONkPZLG0YJq3FbkEd aUsoBm0y1CUMEZfjWBmoEMVKW3wSWGkrGRfFJ9dLtsMyn2ZW3C3SdVNoO+uT drRHdaArphPdcZ20sU65WkjqxHVWDL4fXULmJz7o2hWNpxdV+DE0Az+F+rPS bka/ohHXFIypSXXoom22x1WilXGzObKI+pVPuxTxMpl2GYNql3BseL6mGaZi C6E7T2Onz+13GbTTJbRTea/L2+PM8c74NZgzYTfmvnMK841Pw3AZbXTtaXy4 9TTGjRpPG51ITCGm0TYHg+dMXr9FO51FO51FO32bdvo2dn24nXa6X5LH3hXu hI90vV9jn6dWhuPcSvl9lpc2JsFtswKeW5Tw2Z4C/52pCLJLQ8jedITvz0Dk wUycWRKByOVZKN9ZiIHTBbjvpkLyiUwoBE5maEF5Kp1VhfJUKn9U4WryALqS +9Ce1MsI002N7kQTXWJjTCNNtYaxtJzmyjw2nOV2KGNoYPigmS7WzMMMj5+D UoU8Qx1yLhKRl6gQLrmIci1B3OVqlowNyPRqRZ5fJ4qDelAR3of9Jj4ItIhC /so4NG6PQOv2ADrhANzKvIe72fdwP/ceHubfw2P1PdroXTwpvIuviu4Qt/Fl Ee246CYeFd3A/cIB3C3sw+2CXtxUd2OAMbUvtx09zG+7mNe2M5a2JFNB4sS7 C/lEISwf/SJQ5BYg68GfnzdbbUPNQIrGbLUHxxk1ywyfH0wxo9Vb65gNDaTI MJXGUeTd1MaDCz/H0WrHvTYZ41+bgsG1Vya0WlPJasVkt7U82a1voyUmGJmw GtoykC7m8YP/MsKV8Taoenspnixaip+NxBtBjPGz4WwsMbaSLHeJkQUWi12e DKgz35iCGW9MwoyxEzBjzDhMHz1WCzpi9a/OPGnuYe6zRb8vacakgi74sfiI QtTlZES5Z9Ci1YjxKBmkn+nVyJK/BUXerRr6Y9AQ2oXmCNYh0d3oiu1hoOxB b2IP+qhZA4peGiz7RNWD8E89ULMpEnftacz+OfgpWY1/5uSw1G/HQEob+lQt 6FE24SoNuyOpFq0JVWhmwG2MEkZNXxtIX+uTgHqPCJRdDNzwAi0cNPAXJnf/ gO5cXY2pazZiLdDsFxy2W2zWG1Y09Q14Z+I+zHnXAfNMaebLnWCzzgkfbufZ 5H124HgpHI8X4XiUJhyPmqEl2flvMXG0xtJp5VNenw27D3fQ0g9h96cOQwuA 964Ixb4VkTi4IkpDdjqcP1PB/YsUXNmWBt+dGQiwy0Tw3iyE7s9GxMEcRB3O wZllFYjfcRW155ljBvfjPrOXh2FxUNrnEjlQOWQTWQSt3j4d3apb6FJeZyLZ j9bka2hJEqbegcb4FjSyDmmMYbrMjKYxihE5MpWCjoXimAPOnFHigpMSzqeV cHVUws2eOKmEO6O8O9Nxh+Gp9L/ohOkIOxeLyIvUIucCuoEKJFyug8qjGZne HcgP6EZJaB8qI6/jpIUaCZvqUX2C3e9ag2ue+bjurMJNhwj07g9F3aZQPC54 hC8LH9L0ieKHeFryAF+V3MeTErqG0rt4VHobD0oY5otv4E7xAG7SHVxnKO/L u4qeHMYZhvD2NNZlLG+bmFI3xlClIlKYHzKdvhKosQDhB3SHxnukklYzoCqP +ZjKYz4LzeSlrmLcR8dcfvmEGPh5SR5Q1RPvKpAwQhrsmSy/tkDPhIn0OKrP BGISwTLrtWmY+Np0TH7tTUwhpEUvujaw0Cx2sTKwldYa2Bgupk0vljbNL5pg jKX/sIXrmx+hRHsl7puswM/WH+HnxYvxo8UiLDVm0m1CNZ7wJmYRb42fTkzF W+Mm0ydMwszXhT94A9NGvS4tPtOSZmJeen4mZq7BCE0nhjLpjnSNo0tgwu1O f+5ejFiWQ+L1xKmejciiT1ezQ4uZh1UEUTVDeyhYRpVolkVxfbia0I9eURpR BQeUA7ihYuekDsB3pRdyVoej+4AK37jTH8QW4Z/ZJfg2Pws3M7pxPb0L/Wkd 6E1tQ3dKCzrpG9qS66m+1Uwq6Rci6ctDs+kXlPQL0ajxCMb/winIjzcPevOM 5O2Ogw5B22ZoV+bMsYsptc/w9uSDmD3vNOabO8HwQzqBDWfw0fYzsKYzENsG RY8+7xBEbi7H/Qn0BBMZ8yfRG0weMxvbl22kR9gFu4+P0SM44dB6T8IPez+N pFeIxYEVCczTk+C0MhnOqxXwWkevsDUDV3Zkwc8uG4F7cxCyPw/hB/MReViN 6KNqnF11DTH2D1EV+JDifYgH6vu4m5jO51Y5qumiU07nE3kEvcTpbIrzDrpS bqFDdQNtrFhbFJrXE4vXKycwV4+vRapzKpGItEuRSD/vh3THC7gitkOcUyLg rBKB9BBBmm0QIfQOIfQOIceUCD3C80EF/O1iT/xybPmlZ3nCdISfS0TUhWxE XSpGtGsVnUMjUjzbkOV7FeqgXpSED6Ay+iYcP73GQuMBaq88YuF2H9cSruE6 i4rbETW4F1SAR14peHQhAjeORqBpWwSeln6Jp2Vf4quyx/iqnE6j/AEeld3H g7J7uFd6B3foJG7RSVwv7Ee/+hp66SCu5rSjg3V3a2oNmhTUrXjW29HpaAiL R6V/sEZZ/oRFC553DoNjU0Z0DMaEiWZ8SgwIW2gGhCXPoCUNT71EH2AJW30B UfjytrgYo3kthznGMsEf9+p4yT2IFGG8cA9UqEnCPTDKTGXRN40JpXj9h7Qc yWDxkHuwMVoi3laBxcZLsGjip1jy6lIceXs1lPob0Gm1AU/fW43vly3H7Imz 8Pakt/D2xJlaPMzA73mcTk8xbchLvPXGROo+M4Yxr0vbSOT9O+Lq7V9NRol3 SOnP0WeJFk43wazBLYuugv7evRyx7rVI9mhEmmer9ErwAnZtaWAPKun36yL6 WRcOoC32OuvFG+hOusmc/iYGVDeZEtzCzbRbuM3SLXpNIOq2KXDvXC5+CCvB T+kV+GdhKe5k9eNWVh9uZPWiP7MH1zKuopvuoovuop2uooWuookpRGMMfX0k a4LQdLqKBNT5hLzQTQxq5m+knz6W9xfTL4j9xfrz5URh/GtzMf31ZcyqvsBb U45g1oLTmGdBn/ARfcFG+oQdZ2BpshxWhOwXntUD49l94+kXxtMvjGct8Mwv zMZkZgk7l22mX9hLv3ASuz85h0PrvIlAIpy+IZF+IRlHV6rguCoFF9ekwmND Gvw2Z8B7Vy789uTj5IoQnF4dhvDDhYg6WoSY48U4u/EWApy/RH7cl+jIf4Lr NIm7CmYIp4uR4lSElDOFSD1TwLMaqjN56Em7j6upd9FB+bel3ECLin2kpDtP 7kKaRyHS3fOQfjmdUCDDNQaZzkHIOuuCkItKhF14tkEhhr4hlr4hlr4h9hRx Qok4+oY4zVL12H0KRO2KxzHZQSyXTm8i0CFA2ocUdYFR5mIZYlxq6RWakXKl A1n+PVCH9KMk8gaqYm/jyOZHiHZ+grLor3A14yn6cr7GjZwnuJ19H/czWM2n dOIJs8ivowrxbWAKnrpF487JKNTujcTTyid4UvklHlc8xsOKh7hffh93yu7i FlOIG/QM/fQMveoeXM3rREd2C1rTqUqqSjQmsR6KY8SJSkZ1cIjsFP74bKvF 4GYvaZDMVBqsNtEMVptp9ldY6FhqSaNkE6R3MNnoy7AVMLDCYgnya2UWG1hI Rbg4v/HqWPqFCRqfMFWTNryJyVSoqfQH08bMpGK+Ja/8oj8YXPUl+4Sl4q0r 0J5oiUWTvsAS20dYOmMFztMvqKw2onzJaiRZkNbsybN4oGf4PY8z6RTeHOYY pmgcA1OH18dq5s/Ehj55/kxciY19JoMvfZuBOePeJt5hCSjeqZ4nvwueZWAc y0CFZwvSPTuR49ONgoBe6VX7VeE3UB91kyn/LbQn3EZX0h30Ku6wLLiLAerk zXR2UMY9eK8NRN76BPQez8E3PqX4MbkaPxXUsDxU407uTdzOuUFFGMBAdh/6 sq6hh76hK70T7fQLraomNFMpmuIr6BfYmWI2MVSJhsBIlHv6YP3/Nn34M3Tp /oa/hmDCf9PUX1uE6WO3YsbUo5ipTRdh5QSDT+giNom0wVG81EGLfuJ9WMFq 0Eu89sxLDGYO40cLL/G27CVeF17iHdgt2wK7Dw7A7iMHHFrjjkNr/YgQeolI 7PtUwXoiBUdWpsN+VQbOr8vE5Y2Z8P08G8HbcnHs0zCcWh2B0/zdsxtZ4x0v RcyJMpzddBvOzk8RE/c1SvK/Rk/5V7inYrZwtowoRaoEeoyzRVCdVaMn4xGu pt9HZ9pdtNFLt6RcR8aVamR4l/NcjAyvfCILmZ4qZHnEI9stFDmX3BF9idZ/ UfP/IhJ7AeklFKwxlKwvlMwglCeV8kjiUV4fFv8/ImKvAgq7JMRsidJsbhny FkH2oYg4Q+U6p5beZB7jUo/Ey61I8e5CVuA1qMOuozTqFqri76I+6QFc3b6G KuFblGV/i2b1d7hW/B1ul36P+2XfMz/4Gk+KH+Drguv4LrcTP6TV4qfEAvwU psQ3XjG47RiFx1VP8JBe437FI9ypeIBb9Bg3Sm+hv/g6eguvoTv/KjqYR7Rm NKIptRqNSgaexFzp5f014eFamr0Vg0vgn710UPYWYgxPeAvpxXJMHcylqS0r hnkr6aVt1vKwuoE1ZkrD6tLrsojFAkZ0G4ZWWEKI6yV0H+NefeO5NGIC3cUk sUaB7mLqmLcwje5i+thZeJOwpLuworuwpquw0bgL8eoj7UmrsWjaXujonoTu klPYlvEzXJp+xuatWzF7ymx6jLfxDkHPQbwluY3Zk2Y8cx3MJ2YJtzFuImPm OOmdibQcMdsursyktEIc35Jm/8Ra8XkTZmPe+Hcxd9xczHljLl2H+F8xMA64 N0Pp0U4Fu4pcv2soDBpAWdhNVEfeRn3MHbTE30NHEsOX4j56VQ9YOTzE9YyH uJX5ELezHiJ2QzTqd2fivkspvo+uxY85jfhnWS3u5d/D3fy7uJ1/GzfzbmEg 7wZjyQB66D6u0nV00HW0praiWdmApiT2anwpXUee/H/ACI1Fla/v/8ZtyFXm p0Pv3Rj/l6mY/N/MCl41wfRpx/HmotOYa0N38SndxeYz0ksj5JerLIcFswqR XVgKn/GqxmewdhzMKiSfwcxiPP3FBGYVk+gvZJ+xjT7jMLOL0zi0mtXGGn8i jH4jhn4jgT4jnT4jC6fW5ODMhly4fJYH7y15CNqmhtPH4Ti1NhqnN8bg3Gex iDpBQztZibOb78LZ5VvEJHyHEvF/Jqj6BvfSmEmcq0TquXKkni9D6gX6jfPF UJ0vRG/mY4bph+ikB8/xa0K2bwMyfWuJKmTSi2f6FCLLJxvZ3qnMFBOQ6xGO PBcvJNJnKOgzVMwuUukz0pgeSPs5Tz/7f4llMMPIYIaRQd+RcVTejJd5gBnK niSkbIvF4V/4jVPhiHBKY6LCJPVCFaJdGpBAzUrx7UZWUB/UDEQlMbdRlXAf 9YqHaE55TC14Ap+IH6FM+xEl6h/QXPYj+qp/wv26n/Ck/id83fAjvqv/Gj/8 X7bOAjyqLN/260v3nTvX77x770x74yFIiCAhRoAEd2h3b3ropoXGHYJ7SIKF uLtUXCrlcXd3J8Hp7qHz1j7nBJj7Xr5v1amqWCW1z2+vtc/e/118C4/zOzGq q8doVhFGidHH4bG4fz0cncdDMVAwgl66jW5TPzoMPWjVdaBZw1aWU4+aDHZO qeycVMwf8WxhMSoUh4WOccN5vrImS1mxIBellMs/LrFf8fdrsaRx/9VY5bJa Gvs3k0b+n5fG/tculrVu8Woz3qzCS1gnBgwWC62U0sfEl8wVlyFHWXHd1/w1 gQ0rTFOQMWO8NZEhTyuUsOG6QZRMg/2UdVJpR8e5++G0/AgWv3sE6786jE++ 2/ccbMmMf+ctqTHViuSQqWFrLqgxQ6HGNBoOmo2JU2A5YSKmvvqqdMVyub0y gd9aujY5NoFfzGyeP8WWmov5k+fBbpIdyWGHcA++p5drkOTZiLRrrci+2QFd QA/yQvpQFD6A8qghVMcOoz6BXVnSbbQl30Fn2h10p99Bb+ZdXPk8BOqvUtDq rsdDvxL2B1V4bKjGLc0IhjTDGNDcQh9Ddk/uALpIjvYcvpfZnWjKbGOObEZt ah27xSpUJJSyD8gjNTSkRjqpEYsSP1/MUq7dHmdzPk1doDyUNdle7A692Ky9 Dov12Hx+T7zFk3Ty3JN7/6i4z7ESORP/NJ0kIQFeX4WJ5msxZ80xuLwvU0Qu LbRRlBYyk2oLLSVMNkkWRIBkwksWMkheJkheFiCxemI+noBk3Gz8uGErfnxj H3Z/cIEguUIxntBQ7P44kiCJw77PkgiSbAJDjeNfaHBuswZeWzS4uVUL93fD cPjzKBz7MhqnNkcj/FARIo8U4+Rfb+G8x6+IiP8NBv1vaCn+FYNpNBunCwkQ wuRMPpUH1VkjIaBHa8YdcnkEuTfrkHOTsfJmJbNBGdJ9injMQ8YNHTJvZBMy qci+FoecK3wnPa5CdZ7wIEjSztCUKIvms04mIfuEvIo3+3iSfCRYzKQ1bP+A HL4LOTQl6v0JyNkVh8yfopQlkgpM/gL/Q6EIcU9F2AmdBJOwC5UKTFqQ4d+J 3JAewmQAhbG3UJo4gio2tLq0e2hmXGnPeYCz58lQ1e/I1f2OcgKlteJ3DNWO 4mH9WM8xGaNVcqn8sY/R1Az8LSoCd26EoPlkEDpoQtr0nWjWtjLlsbtiZKlK L0VlChteEpNvXDKKIuTqT052jiSJyzPFMpc8s6pzuXQdQpBEUGT5gifXIug7 1oiyotLVCHEtwowMWUOirHVdQ3yMiURZ77qa5n+92yo5r7z01HxIJHl1lnSR 2uJ1koQEERSZOcFGJolCkdVuYyT5DA4zd8Fx4RE4bzyClZ8ewTtbjhAdtjQf ttLR1sJWgspsCSljWKERIVKsp4zhhCZkkoyT6eNee7pUwlFeLiEurIp5D/KK iZlwmDob9uZzKTtyhZo8H3YT55MndUjybmaX1Y4cv27ogvqQFzaA4shbKI8Z QXU8Q3biHTQn30N76n10pTORZj7AZTqPqK8SUL5LiyGvEjyKrcZvmno8LiRP tHcxpLuLQd0d9GtH0KO9hS7NIDpyGX7UPWgiUxoyW1Gb3oiqlBq+neVkSiHf Uj2ZwvASkYDSoEBMl95cuYLAWbbyc+w2L1NXzipVBNh9BrDVB4mtRtniQ9jS Q9jGQ9jCg9nCgw7IA3d+O+Mx5wlYlmDCf07H5P+xwqyXSYCZazBj9jpYzxe1 rdbDdeEGpa7VGFiIE1csWyKgMuV/QUVxJq9YY+JrhAqBMpmaIqCynlDZeIAu 5CLBcg27P/SnQgkVnmyfxGPvZ8k49GUaDn2mwfEv9TjzjR4e3xpw/XsDAn4y 4NRHhMrXsQg5yLPvcDEijpbg5JYRnPd8jPAEdtfGx2gp+w2DmUaozhQj+WwR ks8RLOfoUs7xuXOECpGv82uCxr8Bar86ZPtWI8u3HJm+xVQ+7+v5nJrASYf6 RgLU18KQ63UdaedVyDibjOwzycquo8nQnEmB9nQytLyvE7uQas+o8EexYPbJ Slkd3wEd//u6w/HQ7o+Fekfkrmex4gDf/WEIOUqsHBNYKULY+UpEe9Uj6UYL 0gM6oQ7thSFqEAXMNaVJwzzViZWMe2wv99GmZtvTPECf/hEGjb/gatgoUjS/ o6hkFE01o+hvkhdV/N5OS9r+O0bbfsVoyz2M1vfLeCmqwKhej9/TVfgtOgjD 1/1Rc/Im6nObUJNFJ5xZhoo0BujkXLbFVBRFydXRnEXNgfkL/25d7/9e0ytd 4lyw+slSSqWc8iJRRkpc3li7mHIVVVbXua59nhhZI48W/6tseNmkJr1ET/Ky PLw+5TWFJuOsZZqQJDMm2mDmRBszrCJK/oUw2ciT+E3YT/0BDvMPwXGVO1zf d8eGr4/i0617CJLZsLGYTZCIakMCJ//G2zGgECZTZZhIqUYAZQqBMtkclhMn ESavSrM2xAoTM2nOhvXTFSbKKhNHizlwsJhHqNhR8wkVe4LNnkbFHklXWtlt dSKHxkQX3I+88CEURw2jPPYOqhPuol51H80p7CfSH6Ir4xF6sn7Bla+ikUtv 3nqqCA+Ca/Aoswm/FTRhWP+QeoBb+vsY1N9DP4HSqxtBl3YYHQRKa24fmnO6 0JDVjtrMZlSl1aEipRIVqmIGVUaaOBrO6CSUhoYo2yX+Dy6IAhUXEnDpAo3I xURcHytSwa409NzT+j7P5nlR2yeeTTuOYIklWGIIlmhl1C/853jMln72GjqW ZZjw3+wEXiLAX5uD+Yx69hNnS8XPFkvl4ER1OsLFlXARhoVsEXwZ/6KwK1Mp kuUl2a5MfFkhy6s2tCtjZLHFD2u/x653jmPXe5ew+/3rpEsAFU6yRJMsCdjz WQoOfZWBY99kkyBGnP6rCRe/y8OVH/Lguy0PIdvz+LrzEUKrEnakBBHutCtb R3DO+3eEq0ZhyBtFS8XfMJBtQtK5IpKEluU8yXKeluW8eE4PY0AL9AHN0AY0 Ite/Htn+tCwBlcjyL6UK+diAHP9cUieDliYRuTfCofG+jqzzJM3ZdGjOpUN7 PgN6ynA+wwzGCxk8G0wX0mG6mCbJeCGVSobxfBJMZ6nT1MkEmI7FwXgoGrrd 4TufpYsLfPaEI/hwKkLdSRc2pPALVYjyakCST6tElxzSRU+65JMuJYIuqbdR m3GXdLmHttz76NTeR6/hAQaMD3Er7yFuFzzCncJHCE0dhbZYpkt36yhGukbx Sy8p00fK9P4u06V9BKPN3RitqcNoaSFGDVkkTRR+ibyJAa9rKDrphYoM0iWV jjkpBQXRYQpd5Hnmzy7WFqbF9dlqAdKF0zVY4aJcGVmkXDgVVFGujKwTFbLX ufFmvXSzZC3b+/ola7CBEh8yZGbIkKFdkSDzujUhY4NpEmBsMWOSDQlgi5Vk zCoSxm7KMsw3/xr2s/bCwdUdzm+4Y9Xn7njvO3cSZg4JM4dUmSNRRjBmtoWt crSRbIvNVGX8xPwpZWZNZgqaNJmB61Vp9wCxLGepuFEW6FhKC3Scps2l7CQ5 ih06LOzJGcrcgcbFHum+3cgJ7IMudBB5EcMojrmN8vi7qE68j/rkh2hJe4T2 jF/QSbZc/CoG0d+ko2x/PgavV+NBYhMeGdrwa0kDhg2/YNj4CLeoQb71/WRM r/4OusiYDu0QWjX9aM7tQUNOJ2qzWug/G1CZVk3GMACp6EMTZR9aFhEmL+N+ kXiJkgqaiO3EvTyIF8qP98Uyk3DiJoqKJW4SiJukc8q24qflbcXTTshDAGlK SacUoiZ5P79OFDTZJRc0if4+RqnH8z6cRJ3O+auYZG2kso9yjc51Cm7oZUT1 ycUbniKHb+r4FydhwosyaiYQNRNoYia8ImSNCQI1r1PEzJTxttj5xnbsevsE ceOB3e/doIia94maj2KJmkTs/TwVB7/OhPuWHJzeqsHpLfm4sLUAnj8W4sa2 AgTuyEP47jzE7M1H2FGamGNEzfe3ce4qUZMyCn3hKJqrHmNAncf/RQHTjFA+ VBdoYi6IZW2VMAW2whDYAl1gE3IDGvi21yI7sApZgWU8FvGxCepALT+XBY2f CpqbkdBe9UHu+RxoL+RAf1ENI2W6lIt8DzUKLquR78kjVeiZIxW3KBgrbuGR zq9JRcHFZBTyvSk8k4DCEzHIPxoJw75QucoC3pRXqNFdpiH0qMyaMLImWuxc 69OGtECyJqwXOrImL56dn+oWz/sRsua2tEVna+5ddOruocfADs10H0P59zFS 8AB3ih7gbvED3Ct+KJ2yCfpRFNLZNNLR9JI3dwZkBo3eeozRwd/IH7qbrn66 nGaM1pZhtESDUV0CHif7shO9hO6zZ1CmSob/j98prFkozakf25BBbMaw2OEZ F/OEM2uVK7DPXm0hVQRonhOUwbolsgRpxHMbeCuYIyTnu/9+QhtpJi/tjDnt jMV4QRtbhTazYUnNIIFs+Lyd+XuYP/Vn2DschQNTvuuHx7Dpm2P47PtdgjRm Emqeg+20OQTMHMXaCOT8q2RtngBnKjOS+QxYTZlOTYXl5MnKwiV59gqPZtLs lT+KVYHKDJYlcJ5uR82n7Ekde0EdM2LHQRRYneqAdL8e5AT1Qxc2hLxIAodm pjzhHqppZupTHqI5/RHaMn9BV/av8N5MK/29Hs3ny3EnvBEPcjrwqLjdjKT5 lT9umOZV4g27mX7jA3Y599BluI0O/TBadYNo1vSiQd2F2uw2VGcyIGUwIKXR nKay+1BpJHNaGhU+RclGXhdjccUjAVcvJ+IadVMpeRPuIZe8iSN3ksicZDIn jczJYLvOor3JJndyyB31KTEyICrc/BE5x+Q6N6IImVTr5qA87Ji2MwGqH+Js FZfzd2VeRaVZ52crzSpFb4kcV/YjbtS4FyYQO88ix/Ipcl6zwQQiZyKRs8hp PXZs2IZdb9LdvO1B7BA57wYSORHMTkTOx0nPIEeNU99rcerbApz/vhAePxbj 6s+FjHoFCCFyooicuIP5CD9WhBM/3sbZ66MITyNyikVcIHK0RM6FfEocTUQO M9MFPfKDWmCiDEHNjMJEThCRE8zsFFSN7OBy3i+GOjgfucF6aIKy6YCYi3yj oL3mC90lHQweepgu8+d4GlDgZUCRNyWWh141mKHkqp6tteSqjtLyqVwUX1Gj 2DsbxV6ZKPFIQ8lFFUpoUEtORaPIPRymg0Hbn6XOCwjcl0rrpkXYCTk/RZI6 8XQ4KQEdyArtgTa6H6b4QRQlDaI89RZqMofZfY2gJZdNjPa523AHfSZm8/y7 GC68h5Gie7hN3S25L4/u3y29j9dxp/Tek5GZFsJn4NYo7t1+jN/uEDy3fyGE 7mO0f4gAaqfxqcRolR6j+Un4PdOff8xFNpevYfHnSZj2wjQ4vehEOVML4PyS Cxa8tBAuryzEolcXYfFri+H6+mK4jVuMJeNdsXSCtPnTRFEpcfkkVyyf7IoV U2StNBefWzXVlTcWrniJt3Ix1lXTFmP8f0+U7k/48zRM+MsMTHzBEpNfInpe lqcsWlDTiJqZRM50Gp9ZbHDzpqyA3dQtmG99APZLjsP57eNY9eVxvLfVHdYW c4mduWTLXDMJOv8ue51pswkd2e9I2LGQsWNtQexMnQkr8+mYZT4VM4kdMStm tcsKeZ2kjTI5Rp4Rs0bZU2fBjPmUA5wlOcJJkgOcpjvCeRrvWziyyQ1AF34L edG3URRH7iSSO8kPUJ/6CM0MUG1Zj3B2czyi2AuXHilGv28d7qS04n5+Jx6W NRM4v2FYuhpI8JgIHhPBYyJ4TASP8Q46DASPfgjN2n405HajNqcd1dlNqJQ2 MC5HRXoBDY+WvpXgiQmfLDXE13D1UiyuX47HDc9E+FB+z9Q6iiWAEgmfFCqd AMq8mIScC0nslOVKkrpzSdATQoYzQklS4UFxX9Q3kipLnlIKbxFG6sNynaOM HXFI+DrcRvE+csnn1XB0WPMUQi70P/Q9CwWE6HsWEz4CQqLM8/gXzSm2jRcJ oJcIILaLMc8jICT2AFjkvB7b123Frk3HCCEC6C3Gq7cJoHcFgOIIIBX2fpGG g5uzcPRbNb2MBue26XDu+2J4/FQMr+1F8CGAAvfQ7+wzIfpAHuKP5OHENgLI ZxShGaPQlRJAdY9pNfOQSPAkXjSSzwZKj+yr5cgPbkYeZQxuIoAaoQkmgEIa kB1Sw2Ml1KGlyA0pgCbEwM/R4wSlQOcfBc11Xxg985DnlY8C7wIUXS1A8bUC lFwvQClVdqMA5T75KKPKffIok7ReveyGnp/XofSaBmVXclDmlYEyD1raC3Eo OxOB4hMhMBzy/fnvKeS3OxXBB0ihY2LH6kqEe9Yj9kYLkgPakRnaBU1UL4xx fShUDaAsdZCd2BDqc26xcxtGuwjwhhG2v9sYyL+NoYI7JNEd3C6+gzsld2UK 3Sm9ywRzp/SOdFLf4nGw5DZyakdRwfjVNvQYg7d/w4O7j/D4Lkl0+zZGhwYZ x0ij1kr8rVqLgmA/qH7cjJl/sYTlCzZY+vI6aj21AcupFa9sxKpXN2L1a5uw 9nVq3CaspzZM2ISN1KaJG7Fp0ka8OZmashFvTdmAt8034J2p66l1eNdCSAzq vDdtDY2/+Hh/+mpM/C8ZRJP/PB2T/zITU16cBXM2Ngs2tmlsbDPY280d74B5 4x0x7fXZsB43T9oLY57FTsx3Oob5607A7eMT2LjlBL7Yuv0JiGyYiQSJFBz9 hxy7phFD02igLIRkDFlZEENTBYYsiKFJ0l5eaxYqE/QWyjNwnpPWjT4n8chl pj3lKHbDmukkNvDirRMfOwuRR87TBYccoGXQMkXfQRGDVlnSXVQl0/ukPURT xkMy6CE8/6pCzs8mNHlUYTi6GXe0Hbhf1oEhYXhMv9D/5P1CwzKURwQxXvfn PUCPhKC7RNDIUwRpelCr7kB1TjMqs+tQkVWBisxCeiAiKJldZFw4xolmKF+Z HseEFQMfgkjUsxIfAc/UtIr3TJKKrqVdViHTg6/vUjJy6e51F5Jh4NFI5V0U peyYyfm5gkuqZ46iEJtckE0UX5MARTDppIqcCcjZHYuUb8NkIK2CA4HkYL9K ApKDk1z33ZlAWkAguSwilBbTHbmul2q+j3thCsa/YEEgzcB4wmg8Q9j4V6yk zRZcGORcFBiJfSp2bTiKXW9cJJCuE0gCRgxgH8gw2kMYHSCMjhBGJwijs9u0 uLTDgEsKjK7uKoAvYRS034SIA0bEHjbi+M+3ceYmYZQ5Cm0Z40UDYWQkqC4Y kEAIJV7UIetqKWFUShA1wkQZCSEdIaQJJYxC66laRpwq5IaVUUXQhBmhDVFD F5wKfUAMv/8G8q8Uo/BqCYqulaDkRilKfUpRfpPyZXb2KzVDpV8J/g1VfsWo 9C+SVvZX+LKn8WWs9jGi/IYO5ddyUXElExWeyahgd1N+PgwlpwPxdzD6M24w Fgft1TKMiX3oKxB+uQ4x15uR5N+KjNBOqCO7oY/rQUFSH0pS+1GZMUB3PYjG XCZ83RBb3y22xGH05Q9Ll7KHCkcwXDQij9E+j9ultzFSOiJpuFR5+mX0FQ2j u/AWQg38Pzb/DdV9v6Jj+AFu3bmLh3eH8fsIo9lgJ37rqocxJgL36JgtX5uP FZbfYMXMv1JbsHLmt1hl+R3WzPoOa62+w3rrrdhgsxUbbbfijdlb8ebs7/HW HLHB4dtzt9IRvTtvK96T9B3et/sOH1Bm+HD+tzRDH9lvwceS/iq9wk/sv6E2 S/en/MWKHLKhGZqNqa/MoRkSMz7nYcb4ebCbvJSPZ0uPbSbaY+7UrZg3+zDs lp2A0zvyldb3vz+KJdZziZd5ZgJEEofwnxKTBIyEK7IhimwsbCUUWdMVWVnM klA0iyiypCOaMXmiNMNHmgwo791nJu6YSevynpcmBbpYOmChpROPzqSRpbPY K4W3C/iUYNMChUjaiFv8l95GYfwdmUQp91CXfh+NmQ9w8psERPJ0KD5eip6A BtxKb6e/7cTt8iYM0fkMET1m0vieQNEDouiBjKI8ooi+uMN4G60GsSW7gqLc dlTlNqNCTRTlEEVZbKcZWpSnpNKNhWK81AgnPZkOIz58PePg55UgVdcTH3L1 sbEKe6lI90xB1uVUqD3Sob2UDgNl8shA/uVMFF4WdQwz5ETgnUGlo/QKsect lEolo5hUKyTV8i8lSXTKo30ynUqQKo9p90UjbWuIrbLyyX7+Ctg7roa9M6m0 gFQikZwXMswvYKrfgAXKrg/jXphKTcc4AunvdvRxUHb0cZa3Htq57hCBdIEO 6RqhFIDd7xBG78vRbA+j2T7CSHwc/yEXZwijizv08NxtgOf2QlwhjK4zlvkT RiEHDYg6rMexHSM47TeKkGyeRBWjaGh6zHTC6HZBh/iLWkqD5EsmgqieaoAp pB4GgkgnIBRGN0QIqcPrkBtBGIWXQxNeBG24kTmdMApNhS4wBvl0VQXXKlB0 o5IQqkSZbxUBVEXqVElLqKsCq1AdWImaIKEK1ASWS2UOqgJLUBVQLBU0q/QT hfUMqLghipiRSN4qVFyORvnFYBSeuSmXesNbyuXzgJ25CD6Uj9BTZQjzqEXk tUYk+LUgLaQd2REd0MV2IS+xG8UpPShP70VNdh+ddz9atANo1w+yHQ6yPQ4R SEMYIGIGi25hqPgWbpXcYtsdLrllJt39TwwWD6Gf6i0aRHfBIDryB9Bq7EWT sQvRRY9gbLuH2j7arcEB3BrqgiktDZq4SNxZ/A4sJ7mIXWX3MNiscNzHe/ux 0vkAQ8sBOoWDWLfwENYvOoSNiw9hk+thvEG95XYYby+hlh7Gu0sP0/ksO4w/ 4v3lh/EB9aHQikP4iPqY+mSl0MGxbcMnvWCFyS/aEkJzMOW1eTB/3Q4W4+0x fYI9Zkx0gN2MdZgqwMTnbCY7Yu70PZi34DjmbzgJt09PYtO3J/HFt99hia0d 1s51xjzzOZg9ec5zMpBsiKF/4a0ComnWsJ5mBatpszBrmiVmWUzHTEJITBWS phcuFtMO1y5aJU8WslLmF4p5hitIH0eJQguJHhfLBVg6exOWztmEZfPeEGSS Pr/A0lEKbcaYYRTEj6BUdVu6XFmbfpcYuofLW3iK78xDvXc1+uNaMGQggira MWAkchi+hvLkgb+x40D+PfQRQT15Yj77HbQ/wdAA6rXEEM1UlYYYyiWG1MRQ DjGUqaW5pnmJC57wzKQ8f88YeqAEZebeK4j3SkWyVzqpk4Fsz0zkXs6C3iMH JjES6qVGoVcuir1zSZlclLHHlQr1SfV31VQOlU1lSZUQy6+lo+wqc+AVUUI8 Sar3KYpCFpyJR97xWOgPRM6VXsoS2DkyXDuvxnwX0mch6SPEf7/D4tVwnjO2 AZbYo0vBzTObYI3hZsfqfUTOWSLnCnZt9Mfut8Kw+70Y7P4oEbuJm72b5ZXZ x75X4/Q2DS7s0MJjtw7eeyni5uqePPgQNwHETdhhHdx3juCU/yiC1KPIrRxF ffNj9ObnI4aYib2Yi6RLBmReLaTnqSNq6mCk9ESNjJlqYqYGmsga5EZW81gO bSRxE0HchKv5dSnQEDcF12tQ7FODUt9alPvx3Qqok1eGB9WhJrjODLX8of+B WlqoutAaWSHVfLYS1cEVqAqiPQos5rfRC/mJynDi3cigD0oidSJR7uGPv8PN n3FzWzYC9+Uj5HgZQi/UIPJKPeJuNiE5qAWZ4W3QxLTDmNCJwuQulKZ3oyqr B3XqXjRq+uh/+uh/+tnmBtBDevQVDKC/cBADRYNmxMsgZpI8g9K9weIBDFD9 RfzSQn5LQR/a83rRYupBo6kTdcZmVBv4B+vLEVs6gMSkXKgSk5G64FO0rfgU MywWYuY0N7gu2we35Qeog1i64iCWrTqMFasPY+WaI1i99gjWrDuCdeuPYj21 YYM7Nm50x6ZN7nhT6A13vEW9/aY73nnLHe9S7wm97Y733z6KD6gP3z4iTNE7 RxjKPnznMCa9bIvJr87FZBqcKePnw5wmx2KSA6YJxlhvgPlrdpg2wRHWU50x d8YCzLLZBKf3TmLV5pN4/4cjWDLXCW5z7LFmwXIyyg520+fCzmIO5k6ZrYQy wZ5/lthjTfZYT7chd6xk7kybCcup0zDD3FyeZLR4jSDOGrwq5hWJ2YrKFMVV ylrnlTJ9ZjlTC+Ayy4X0eRNL576JZXZvYYX9W3yO/miWo+SVDDG3kJ8wjJKk EVSkjKAm/TaO0ACFf6dBATufDnaZfVntGCrpRE95PV9qPxPXf2OAlBnMkwcB hQby75A+d0if2+g0jZA+w2gZo4+uBzW6DlTqSB9tLSo05SQQu8NsIiNNBXWE j+yB5Lp5AZejpFMyyCte9j7ecmWvePqYZK8spHvlkEJqaDw10F/WwuSpQ4G3 XhokLb1mIH0Mkv+vumk0Q7WvgadKDU+DGj89paO0UkHwal81vySbHXImyq6n ofRqilSEuORSAorPxaHgRDQMB8LgJL20/1S2tVN2BLRTttwb27JwbMs9YXBW n8KudZ7Ytd6XiSuEBieatEmQWToVp35S49yOXFzalQuvfRp47srDFULm2n4j bh7UM2AV4+juEZwMHEVg7ijU1aOoa32MnoJ8RF9UEzQ5DFk6GIKrqRqqFgaS QBdWJwFGHSHgUkuw1CI3ipCJImSiiqCLJGQiCZmwNGT5RaDoZgNK/BpR5t9I WjSRGk2oDmkmXEKb8X9QF9aE+vAmNEhqRENEAx/Xo5ZWqSasBtWhtD4h7EWC S/jt+TJobqr535QrTFRcDUHxpWtygU6l+uSf4bfThKAjpQg5W41QT2asG/VI CmhEOn+nOqqVGasN+UntKE7tZN/UhZqcbtTndqOJ/VervpetqhedeX3ozu/j P6QPvYV9TFF9bJTFvOE9mNPJ9PJzvYRLDzry+H153WjO60SDqR21Jv6hRpJV X4pirQmm7Gx4HDqBSy6fI2vlFzCf5oKp091gt2Y/5q89gPnrDsJ+/WE4bTwM 501H4PLGESx68ygWExhuBMaSd9yx9F13LHvPHSveP4aV1KoPjmH1h8ewhlr7 0TGso9Z/7I4NlBk2fuKOKdjE2zc+PUodwZvUBAJm4mtzMGncPEyaYIfJk+xh PsUBFuYOsJmzHrZzN2DqRCcmoQWYPWMh5lsthJOtvD3ZorkLsHgez3YBGLf1 sOPZbTfLAfMt52P+DKYzQmWeOaGiwMVKwGW6NcEiADMLltNmYKbFNEydPMlM mrY4UcLLumcmMIq5ixJsXFfJi6gJGgGXRYTLQr6UZXPeorV5G8vmv03AvI2F 1gv4PAFj5QBdzNNrmOUpt1CdPoxLW9KQvrcANddqpCoIvWT/YGU7egx30Gu8 Q8RQBEl//m3+y8QI33/w/gg72hF05w0TMLfQZhwiYBjB9f2o03ejWt+OSn0z IVNDyJTR5uShPDsHxWmJSsL6g1QzMMAjAkFjVTmZhEK902R7+bpUDzvdS4Ms Lx3hYiBcjMjzMqHwah6Kr+VLA6AVPgWo8i2E9+IDyFhyAMUrD6AuqAD1VENQ PpVHmfhYlHrXoy5Qi2r/XH5PDspvZhFOaSij9Sm7HI/S8zEoPBkB/aFgOEov cR2cxKxlsVOl2I/RbuXTrSGVvUddFF+zfcVxkuYSdq25wSgVhF1vR2LXhzIw 93ydJh2PbM3EiZ+ycWZ7Di7syoHHXjW8D6jhuceIK/sM8DtYiRv7UnFkzzBO EDcBmlHk1Iyitu0xuoryEXkhGynexAZjjS6oCjoiRxdSw1hUw4hUS9RQEmbq oI1mhIquhCa6jLgphC5Kxo2GEarwZjOK/VtQFtCKiqA2VIW0kR9tqA1rR114 O+oj2tEQKdSGRiGSoDGqBQ1RzaiPbEJtZAOqI+iBwmtQGaowh//rigAduSMK YIhCy1Fkzs3/xZsbW7UMiyUIOlmFkEu1CL9aizjfeqQENyKLP1kT2wwjG2Bh Sht9DRtQVgdq1J2o13Sy5+pCCxtWm7GbHOlGZ36PxJTugp7n0F3Yg3/jbTef Ep/qYnDqQhsx05zXgYa8dtTktaDSVI9SQyWKdEXIy9VBm5mhrI/7E5zmusBZ 7Chsxy7FTtmbnTF7sdMauDqvfVqbbtF6LF8sb3W+0m2jtLRe7G0tdgkWO0Vv ohtYtgn/gPW8Xb984xNtWCH2992wfIMZH67nObB++TpMeEGZr/GqFSa8bo1J 420wZYItHc1sOprZMKeLmW6xANaEzFyrRbC3XQQnaSWfC+UsbcI612oB5lF2 Vs6UowQbO8LGbiZdzXRbzBUXtaZYwZKQsZxuRcdmScBMx/SpFpCnADwvzWVc 56bIda2ZPKNxvdvYHOl11ELSZdGshTJh5pIwdiSM/TtY4fCOTBhrBilrByyY ZQ9T/AAKkwZQljKIfbQvId/RF5wpR0tYIzpzOtBTSndZUo0uwzB6jOLKwTB6 SZLefHnQrk+sW6N68m6RMEPoYH5uMw6gmca2wdiHOkMXnWkbKg1NdKfVqNCx CeYaUZadBVNy7BPCiI9g+pcQz1jFu6Qj3Dt7jDCpXgbSxYhczzzoPQtg8i5E gShDfqMYZT78kb6lqPIvxRm3s0hY5YuKL4PQt9MHw/uOoymsFM1hJVQx7xdR ojJ/PhpD8lAXbERNkB5VARpU+uXIRTav8qzgyyi7EInCU6F/72PExrPz/t8d Xxew4S1kw/uRZNux4gJ2rrrG5BRAHxOOXWKQ5tOksWpGh75Lx7EfM3Dq50yc 25mFS3uzcHl/NrwPZtPX6OlpknFtbwoOES7Hgkfhrx1Fdt0oajoeo7M4H4ZL KiTTtWkCy6EhYLTBhEcoA5IUkuhjGJByCBZ1NMMTwZIbTR8TU8r+pAj6aCPD kxoZwcyP/u0oDexAeVAnDQnfpTDahvAu1EXQOkR2EyLdaIzuNkNTTBe7kaYY nqIxHWhkoqmPaUNddAuqo+kKIutRwV9bEUZvGsrwFGwiY0QhDVEUKYHeJlip Nq5sqUCvur0A/kcrEXSuFsFedYj0qUNCQD3SwuqRHd0IbVwTTKpmFKa2oDSD 6Msi9tREnqYdjWJ9k6EDLcZOtLH3a8/rfI4I6cS/o6Ogk/c6CJMOehd+CWHS lNdGqLSiNo8OOo/GzVSDQkMZ8rT50ObkIjVZ9fzY2zvXjRZVMIU2VTDFYTUW CaYsIFNcyJSFgikbsJxa4fqUKauXSFyRkEJIrSVNBFfWS5t9r1++iSft+hUy YTYIwqzY8JzEldcx/s/T5euhgimvWWPiOBtMFlyZaIupZMrUyeSKuRNmzHCB Dc/luTQu8+e4UAsY6Tdhoesm2JInc3hOz+U5PY9cmWftxKMjZY95s+ZhniXT 0gxrzJkmTwacyVQ0nUyRefIHMXtRmla0fkxiKpGbPFMaL0hgGcPJImJtkbXY /OFdLHN4F8sd34WLDY2MDT2UDU2L9XwY4nqlsf4dXyfg/JYMpOwvRPmNWrSo WsVbhe6qNrRL4/5D6DIOmaHbxBsx4PafzMBi6G2QGBmQMnGHsR+thj400bs2 GHtQa2QjNbai0tiACkMVytk5lGsYX7LSoU6MHKeUj/M7549gj7AnUyjCvNIR RoMS6a1FHDEiPjK8CpDjVQStZzGM3qUouFaGYlG83ZedpF8lqgOqUMuO+8Jy f6S+GYW6H+IwdDwOI1fC0BJZiVZJFVL51ZbIMjRHEi8RxWggWuqIlhpipSqQ nSwNTIVPhly31zOaSAlDwelAZb+Mf8bR4/E4fiIRp6hz1IXjifA4Rh2lDlMH qX0J48ZW+v5//c0YgeQktW3JGexY7o2da29i1xsh2PVeFHZ9nIAx/Bz4lr7l hzQc35aO0zvScW5PBi7ty4DnwQx4H86A1+5kXN2bjoP7huEeMgpf3Sgy60dR 1fkYZbGFMF5JQ8GlXKSdVSP1TC5SzuYi6bwGMRc0yImsQlZUJbKIneyYCuTE lEMdU4bcmBKqkCgyIDsiG4X+XSgO7EZZcA+Z0YuqsF7URLCziOxDfVQ/sUPF 9KMpluGkOa6PjaOFDaslvgdN8SRTHPukODqFmFZUxxBBpJ2EoHC61/BCokjP H0uYhyRLK2pLr3vJNdyVPbH+Czf3lsH/RA0CL9Yh+Godon3rkBRchzSGtJyY eugSGkigRhKoiQRqph9uQZW6FTWaVoZyIkXfhib2as3GNp7eLaY2/Cv9Cx+b aMCIm3p6GIGcqrwmlBM7xaZaFBgrYdAVQ8PeLyM96x8UO+M8l1Zm7lLJygjs uDiskrCzmNhxI3aWjGFnsYId17/DzpidIW3+IHFn3fJNEnVk5kjcIYZoaXgy L98gkWedpHUY95eZ8uVPxdNMJHsm09MI/phPsoUbf+VSVwaoaY6YYemMaVPm Yro5NXUuLOh1Zs50htUsZ7LJGbOtnM0IISf8E+aSBXOs7Wl37DDHag5mz7LB 7JnEz7TpsJw8Be9OFnOJ1jFxPf8UPdIsxnXPK9MYxfTp9UtWS/gxk8DzF7qW xcTMIiJHiO7GluixpZuxcZLQo4/tRl5iD3ZuTkTAd3poz1VIQbxJzS6hTCxm G0CLbgBt+gG0GwbQSZfSaZJRY4auvH52IV2mPj7XJy+AM/Swl2GENnWhnj1N DWNwlakFFUa2NkMFynT5KM7VwJSZNl5BT9DFQIR6RCGMGSXMM5XoyUE4M5Go XpngJer9FtHFlDAjlcHgXYG8a7S4PtXEDqOXfy2qRa37kDrUsyO8vCoUme/H oXG7CsNnEnHHJxLtMXVULdpj5SqzbTFVVCVa2MU3RpWx2y5BLU+AqrA89sMG 9r9KyeLriajw4olwKUjZaOFP0rawYmHXebGwS2wPS13n7/E5nQhfsTH1SXlj 6kB3SlRkIo4CiCP/fYnw282v3RaNV6WfNZNGdzmc/j+uyFmZFO1CLv28xAM7 Vt7AzvWB2Pl2BDNXLHZ9liBRae8WFQ5uTcbRn1JwYnsqzuxOxfm9abh0IA2e h9PgsSsV3nsy4XO0CUdCR+GjH0V6g5iP8hjaa9kwXM9AaUAFSv1LkOFtooxI 9zYg9YqOOSwXKi81kvheJHllI5GK985WhuhfRVFgH0qC+590F9URg6iNGkJ9 9BAaYobQGDuEprghNDOKtyQIDaKVakmkyU3sQ2NCD+rjaZ3iOlAVx+gS04iK 6FqqEhVRdKaRfC8i6YfC5cW6FQG++DsaTYD3Xw3wOVgFv9O1CLhch5DrJJI/ icSmkB5Zh+xYxsTEehiT65GfSppkNKI0i35a3SRdH63RNqNORzHF11MNBh6N FI91QsYmtt5G0qhRMkGlefUoJJFMxlro9ES0phDpWdo/jAUscYXgWSIxXC0U RKLHdeW7uYThaimJtIx4WK4YoZVLRN0yUmnpGJHWLNv0HCnzhpkgkkwg8XiD MEAShcwkBv0L1i5fi3EvWmL8KyQRXdCEcU9JNJkkcmWOW8JfJRyRGSwmi5nI 08znyCQyF2PAM6aKC+LTZzhjlqUTrKwdYStk44DZkuz52A421nNhM8sWVjMt cfCtd3Bo9SrscXbFFgtXASMBnfUYh/VL11NjRKIZWrr2CY4WSi5osYKixcQQ xaC30HYMR0SRrT3tdge2fpWA099kIf5AEc/xOtQmM5/Tp7ZUtqJB04smLTs0 XZ/kcNqEjNIonRnaTb0kUTsNTzvp02roJoW6SKFOGtkO9iqkEHuYchN7FprZ MkMpinV5yMtRI0sVP05ZCiGqboZcDEGYRyxplEwaZZFGWkR4mUijQp4JpUjz Kke2FwOEdzWM19hB8VWW+NWjPKABVcz5taFiJLMZZ1Zfhve6KKg/VaGFZ+XI xVTc9Y/lP74zvon/+M54RkV2mB3x9WiLr0VrXA177iqePRU8k0p5RjEVhOeT SKJOs1raa6XiWhwqvENReNH3X5Uhh9Ono6Tdi8XiMGmB2AV5gZiv2ACekAom oMKocAIqkoCKIqCiCaho+qVoAipKKQsVSUBF7uHX7WSa/Sn2FenHj4ejxKiV T2dPO66VJi8uUGZQf7/wHLa5XcX2Nf7YQd+04/0o7Pg4Fju+iGeXkoC93yXi 0A9JcP9ZhRM7VTjDmHZ+XzIuHkzGhR2puMwYd/NoDkJP5SIitB2pCe3IvKpG rk82tDczUMy8ZIZ0n2JMQ7pvMdJ8i5Dqxz7BLx/JfiYejZQeqb46pN3UIJXf Jz5iPaKlY8QKX+lYEX4LVRHD0v26mBE0xN5GY9xtGqPbaE6gEm+TTSNoTRpG G9WSdAvNSYNoSupHfWIvahPoovnaKuOYiGLppGNpnOjTKkRlM1GEOiqLZor9 RUiggqknO9X+UIgbR2rge7YO/oxtITeIqQBiKpTGiZjKIqZyE+qgV9UhL7UO Ben1KM6sR2l2A8rV/E25DajUsG0J6RpQTVXp+ZyBnzPWo8xUz3xWhyIqj52s nnhS66uQrSlBapbxj2M5bQ5NsKiNNH8lFkilFddgEc2SK82SG83SkkWKYSKa VrgpOU3gaamEJ4lMPEPWLnuD6BGSPdO6FUIbeX+jctwgGaW1hJRA1Bpq9fLV GMfANu4VK4x7XaDKBhMn2GDhwnVYzF8rFvzI5mkOw9scgaspc/A/Eq6mScaJ 2LKYgxmUxQyaqlmOsLR2ILIom/mwtrGDNTE1a9ZsHPhuNw5u/hGHPt+Mw+9/ iMMb1uPgkqX4ebabRKrnJFK9gg2CVZIUTi1dIx0XzlrMtKZwylbmlIsY+RaW abbglAPUUW348ask+Gw1IPN8JcojmlGd24F62qXqnC7UquWrCI1a2iBdN5r1 3WZoMUg3XeKmk/xuMnagkd6ogf63lmSqovctp+8t5dtYaqLB0RchX2uENitL Ge2ZzuTvi7CLkcST2Dw9QyoKHO5pQoRnIWKJJhWxlO5ZzYxWB93Veph8GlHk 14SyAHawwS2oCaXHDheDnu04u+4GbmyMh+6rdLQfzMJtrwzcC05AV2IbupPa pN1LupNa0JnUjPakJrQlNvBEqUcjUVVHTFWz8VdGElGSadISUTwBfJnXbkSh 7Io//kVB6thW2V6Krl+SV5cFXSSXyKlIKpqsiiWj4sUO6+RUEjmlYq5LJqeS aaRUR/jcIX5OKUqVILbK3pmIuG3xCN8arWykPAWODHmOdqvgaC/PsnZUYDW2 3ON7F0/8tOImtq0Pxs80Uz9/GIWfP4vB9q9jsXNLHPZ9H49DPyXg6PZEnNiV iNN7E3F2fxLObk/BhX2ZuOqeg0CGt8iLGiTQIKVeVyPzZjay/NJh5P9JRSOl CqAC+V4EUcGlzEelZlCFlGASkkOKkRpCfgUXIiXIhCS/HIlHhh9yYPo+Xbqf /00s8r+KkO4bPwmF9iP62U9DEfxFKHl0j1y6h1bVXbQm35GKpbQmj6BZdQtN qkHUq/pRm9SD6sROVCS0UTQ7JEtFPD1VPN+qeBMq4tiTxDDghYcpnHpfmR3v ua0Y147WwedcHfzYgILZr0WRU/HkVAo5lUEXnRNPS5VUB0NKHUxpdcjPqENh Vh2KhXLYD6rZeDWUlvd1fE5PLhnINIPCJh5zqSxdDdI05UjMyvunMfskXe4c 49MquNA6LaJ1WrxgjE/COm3EMsEniVGbntinVUvfwGqCSUCKzkmwyUYik0wp mUxrl8t0Wks6rVEItWb5GolOq5avwusvzcK4V2VCjSOhnqwPIqEmTRTxbjam kFDmk2VKTSWdLIRIp2lCFkKzMW3abFhMs8VUS3tMs5qPGVbzSKzZ2P3zERyg Dm47wh5xPw5/ux2Hv/4WRz75DEfeeQtHVq/EHqcl+HK6G+m0XibUsnXPSYh6 QYLTOmGmFCPlYuMqAWqBgNPsBZSzBKcvP0/Asa+zEXmgGAYfdiM0UJV5zGEV zGBZNNs54pJDB+o0BJa2Aw1Uo67DDI166aadZ24DM3q9sRV1zG3VzOOVUh5v RAkdcJEYCjSWI09XCK1aiwlKNaeQ8/5kE22TRwrZlCNVJw67XIDIy6WI86xE smcNMrzqob7aBP2NZuT7tqI4oA3lwXRmoZ2ojaBTi6Jji+7GuU2B8HsrGcYt 2ehyz8Wdazm4H5aEnuRuqkva1KUnpQNdye3o5N/XpmpBi6oZjUkNqEuoZaio QpXgU1QR+cRGH8JAF8gg4R+PCp9gmC5d+aMy/eiytPd6Aq54iEVlYknaX6QF aYF8HEpFElUxRFU8MZVETCXTUqVK5WsSkU5MZdBOZRJTmbRTmWIRGlGVQUuV rtTBSiWuUomSlJ8TkPh9rIKq8XCgr/rfqHJUUPXSS5Pxpd15bF50Bd8QV9+s 88c3bwbgm3cDseWjQGz9NBDbvgzCjs3B2LMlGMd3x+HU3nic35WOM3vT4eGe DZ8zagRfUiPqihoJN3Kg8s0ib1KQpmqg+yhCdFAx/94Ycul5xISVIia8TFJc RLkZEiIq8I9I5G1caAG0Z/pgPNsjIan0bCsqzjYpw2IvovFUCZpP5KPlmA6t R7LQejCFZjcOTTuj0fBTBGp+jEDpT+HQ/hyGlpQRNKXcQn0yo2JyH6pU3ahI 6qDYMpPqKVqqpFKKpjeR0S8+jXEwciz2fSAdXsH5nwpwhZy6Rk75kFOB9FPh jH2xjH1J4XVIja5DZhxZlVgHDT2VLpm8IquMZJWJnMojp/LIqTxyykROGckp PTmlpdRUJh+naWuQpK5ATEbBPytjX462bhKfnKVx7lVYIMW7tfRQ6+ih1sON fFqqMGq5m8ynFWSTuIKleCgyapNko8gpEe4EnV7AWoVNa59h0xqJTcI5rSGb VmMl+bRy2XK8Rhf1GhkldWxKp+bCXz5hvC0mkk+TGPYmTyanyCdzeihz8zlm mDpV3JBM/wVzcsncwgZTLKwxZeosLHjrCN748ig+33oUW7cdxc7tR3Fgx1Ec 5vHwtsM48sNuHNnyI45++RXcP3gf7hvX4tCSJfjRWlTaWL9MOCkySnZRdFDr ltJYzhKAclVSHgE1exHlQjlRdGxTZsHrOxNU56uQx5xURBiVlXSgKL0VJRmt KMtiE8tpQ5W6ja6qDTUaGiStUCusLR2fg62lo5i7NNNBSublSjIvzmM3w3Se b2Is05dCq8lDalqmbJ1egt8JL4SeZ7K7mKBURtZSeURUCaIuVyCeeErxbECm dzNyr7fCcLMdBQGdKAnqQkVoN9NYD+qietEY04fm2D6ceyscQe9mIP8HLXpO 6XHXV4MHUclm6E3tY2/Wl9aLnrQedKd1ozO1C+2pHWz/7WhKbkF9UiNq2C1X k1KVMWzvkQXsjhkhQrJREUQH5R+OkmvXlMJi/yUtW7t2OQHXPROfLF3zF0vX iKmIy/Ka2XixZpZKIarSiKqM8/Ka2RxiSk1HlUtUaYiq56A5IdbNSkvViK0c uqtsYiub7iprP/G1OwFpP8XI6W85HOxWwoGEeumlSXiZVHr5pSl4+eUpeJXH Lxw88LXrdWxe5YfNGwKw+S3q/QD89eMAfP9ZAH76KoAJMBC7twTi8NZQuP8Q jYAjxYjzqMbl01nwuZSNIO9shN3IRMTNNMT65uLa1QL43CyCn38RAkiowJBS BIaWIYhkCokoR1hkBSKoyMhKhIcXI+nqCDJu3EHuTWkRFgr9H0jHmsBHaAiU loeiI2gI3YG96AvowqB/K2751mP4ZhVuXy/G7asmGl8NRi6l4da5BPSfiEKP exhqUwZQldyLSnY2FexgKpLppJJrKSa+ZCY+lY6IyqCbih7D00djfte9Dt5E 01XPOvheY9zzrUNkUB3iwogn2qgU2qh0vvuZRFM2bVQO0ZRLNOUSTblEUy7R pM7l88RTJpVOqah4dQ1isioRmpKvbPnzJ/nChhhAFBc1yCPhmRYy0y1mpnNV PNNShivhmUSuW75E9kxjTFolsWi1GHKSgLRGDHqvIYf+JFFoNSm0ihRaRQoJ Aq1YvhIrSKFlS5diiZsr7PlrHfgrHWnTxLqhceNtMJ4kmkC3NFEadppEFj2H ySTRZHNSyVw8N3mqLawxaao1Jk61woQplljJl7iK2FzNlzh/1VGs/dwdH3/n jm+3uWPHTncc2OWOI0Ik09Ft++D+/c9w/2YLjn36MY69swlHVy/DHsclMomW jZFItksLSCMX6zGrtAjOEomcYU23JqqmBuwvQdb1ehhU7URHJ4pKm5GX0oSC tCYUZzSjNKuZ1HGADTPnbGrOLCfM5XEuj2aYN8vJDHZ8+EfMI5XmKppDNhnI Ip2hErnaYjFKOEEZ8w06dR1h5yIYfVRkEW3SJVGNuZAqR/TlaiR41iPVqxlZ V9ug8emE0b8bBUG9KA3pIyT6URM1gPqYQWlsVYyrnn83DmEf5KBouxF95/Nw L1CPB7Gp6E0fQp9QxiB6MwbQndGPzvQ+tKf3oJVAaiKM6gmjWlUjqmmZKuMq mAuYEaJolyJol8LY+QbHoNT3plKJfTyue8TChyASy9ZueiXCl5KWrilraOPE GtrLSUj2SEKasoY2m3+n+rwKmrNiHW0S9OeSYTgrr5818mjkc0blsVhfqyes dAJWBJSWnkpDP5W7Px7ZO2OQ/Ncwklwmk9jN3MF+kUwlEukV6jXq9ZfNMY76 3NETXy7xwVerA/DVRuptmU7fkE5bFTpt3xyA/VvC4L41Bmd3JuDyQRXSg3na xdbCyzMN2ak8DdPrSKdcRPjrERHIqB2cj4jQQoSHFSEsvASXfMvgFVSBqyGV uBFWieuhpbjsLa8BDfW/j9hguTRGTtQvMqHifyU5/ibdb07+G9qpnpS/YYAa TvkVd1Ie4EHybTxinvuVWe63hHb8FteIX6Or8EtkCUZVWahOoXnie1iZ2o6K 1GZUpNE8pTHjpfH9SzWQUJnMfbFjZPpYGSk8u68YHiSTJ8l09TpDnh/pxD83 nGSKjiJhYuuQSDKpSKYUkimVZEolmVJJptRsPkclkVAJVAzvR2RWIzi17D+U LRnE1Qxnu6dXMlxIhUWkglzWRR6MXioCnJtikJaI6/4CRX+SQLR6TMuFSINl GyUWrZb0lEYrJRqtJo0EkVZgGYm0lJ5Enuj0T7BneBRrh1553QqvMce9TiqN I5HGTbLFeGrCZFueuROm2LKDnTDFGuOnWOH1yZZYzte4YtEGmUauYi7TajeB wyUbeQIs+9gd73/rjm+IpJ+Jov27iaPd7vLyhXE49t1WHPvqCxz/8B0c37gK B13d8K2Vq0wheqK1S2kYGdwW2CgUsnUhiZylydhntuQh6kw1skNboM3iGV/U AU1CPXSqehhT6mX6ECq2En0cJfrMk+ZcOmG+kJXT87DnnT9gPr/MTtE8Mmju DHvYTps3UWFP8CkfsocR7Xwa2SN2AqL/uVSCcI9KqahiomcTUq+0koed0Ph2 w8heszBkAKVhg6iMvIXamGE0xI2gOWEErYm3cf4DFaI+0aF0TwEGPIpwj1Hr IU17X+Zt9GeOoC9rGL1Zt9CTNYSuzEF0ZPajNb0XTWldaGDbrU1pRjWNf2UC jX98GSpiaYSi2bNGsv2Gx6M8MFDZHe45+HhEw9czHn5eIqeJ29cQ+Myy2TjP JCRdTkbKZRUyPFTIupQC9cVUaC+kQkcZLogiXanI4/38i+JafCqVggKPFPko LaFNkpbPmpTls0aaJyNNk+FYAvSH46DZE43Ub0P+orykp/tci617xO0UONkv VjA0RcLQeEpsM/apoxc+X3ITXxBHXxBHXxBHXxFH697xwhvve+HDj69hz+Yo HP0hDmd2J+HSYRUun1AhJa6SkY0ugOdjOlEUTBQF++kRHGBCUFA+goILERRC oxRWgsDwUgSElfFYDj8+l3J9AJk3b0Htf3tstyvPgF/hH/4bImP+9iTCGTIe oyj7d1Sqf0e99ne06n9Ht+F3DBh/x7BpFHeph6bH+NX4N/zN+Bv+pn+Ax4YR jJa3ozqtH1XsUSrTGePYW1ZkkEQZJFEGSZRuJI2yGOeekOhT6fB/cMq9DOc9 6uBBf3SF/siH/sifFAqmPwqjP4qIr0MU41s0o1s0//JogjiSNArnfyCEx4DU WtxUVf5Jmd/haLNUvo6q2CCxHsdlwVP6uI3Rx3WDTJ8lshUSBDKTCPQHxQ5t fKrlQhvMeLOeoJDBs5bAWYPlhM9yWqFly1ZgKa3QH8ZG2Ocx6NgtwYsEz0vj rfDKeGu8MoGaaIWXJ8yC25NZluuwjC9LAo6YaekqAecZ3kwlMDYSHBvh/M4x vPXNMXz10zH8uPMY9u5xx+F97nDnUVpGtH0vjv3wE47/dTOOf/YBTry9DkdX LsH2ea5wtnHhz1kJJ2sCx0ZAZ6G0DdX8CTNR8kkAEq40ID2+HTm6TmTnM/qQ /1Yz7Z8Cx1IGzrxZjhJspAuVlDQH1N7KiSHMgbcCPQ6z5KO9pZMMoRkOmDd9 PhbPWYRFsxeOmZ+QU/4IOxtPCGXSAOmoAkKoDBGMBDGXGwigFqRdbUe2Tze0 /n0wBQ2gMGwIpRHDqIoeQV3sHTQm3EVz4j20qe7hwsfpiP3ChPKDxbh1pRT3 mKQeJKWjP+se+rPvUnfQm30bPTkj6CKIOrIG0UoINWf0oCG9E7WpragW1j6J 1j6RBiihiJaezTY2h0aISSwsVCkU/2fc9IiEn2ectE5NmJ4A70QEeycpK2WT EO+VDJVnKlIvpyGTyvFIh+ZSJnQXM2G4lAWTRxbyPbJReDkbRZ5ZKPbKQolX lhlKvDNFiR1l4WyxVxqVwi9RPVkwm88wl38mAfkn42E6GgPdvsg/KwxyVPb9 fsIgM54FYjMQeUcDJnFqkdh0eLGoo4UvF1/D5jXB+OaNcHzzHvVROP76eTje /swH73x0A599EYBD2xJwYq8KZ4+ocP6kCof3h+PIoTAk8UxM4tnneyMXvr56 +PqbcDMgn2dvIW4EF8MnpAQ3GNiuB5fBO6AQ8Vf6kHJjCBm+w1AH3IYu+B5M YfdREPEAxVEPUBrzkP/tX3DCdxTXo39HePLvUGWNIjt3FEbDKEryf0dN0Sia S0bRWTaK/opRDFeO4k7V77hX/Tt+rX+M0e6HqKG9rcrsRUVmJyrE4EFWA1VF lfA5vpvphFBy3BiEvlDK6h6/VINTtEHnaYMu0wZdIYCuEUA3CCCfOB4Joeu0 Q1d49Iir/h+FXY6zl8OJNsdJsjlr5cV/PKMXCZuzUB4HGoONqF43BpwVQjyj VxIuK5cSLCuXibqoK+luVhIxK+luhFY8A5lldDhLCZklS5fD1c1NAc1/wFns CzfP7elU7vli2uUqLHKUdzR2k2YbPDOdW0y9XCzPgTKT6iQ+J22fODYXSp6D OYXA2fRkjeO6r47hU0JnK6Gza+8xGTYEz7G9R3F8534c3/Yzjm/dghNffYIT H2zCsfXLsHfhYnw0axEsJ5rDesIUzBk/EXPGjcPeV60wGqGGKq0TGcZ2WE63 hxUJYUWLYj0GGkvZ2Yii6GLoTN7RTZkiKjDznAQZRwU2fI6o+UfYzxSwsZd2 rHDjv8WNwHGdvRCLabDGKdQJPRmEsDPiKng2rQ/j1nlR/a4CkZdqSZ0mJHq3 IY2WJ9u3F9rAAZhChlAYPoyyqNuoirmLuvh7aEi8j2bVQ7SlPMSFT3OQsLkQ VUfLMXyjAvdii3BflY6BnAfoV1M599Cnvose9R10kTwdObfQmj2I5qw+NGR0 ozadHaew7cnsLEVtejHmmZhH+jB2xabQ/kTIW1Y8r/TaQUROkLe8MF/utf9d WiKr8spAmmcmcZNF3GRD45ED/aVcmC7nIt9Tg0IvDYq8tSi5okXpVS3KrmnN UH5dw2+vkFbMqqkcPpPNT2Wh7GqGtG6/2DsFxURPMSNc0fkEFJ6OQ757NAz7 w//7f2HHyV7sXypu/yBxZ4FCnIX2rqSOKxaL3QJcJfK48XYJ9cUaOp+3wvDV BxH46pNwfP5RCL75LArbtsRj3/YkHN2vwrGjKpxkANxL8uw7GI79h8MQQ/p4 X1PD20cPb18TvP3y4eVfCE//YqoEF32LEX6xA1GePYi/2o9kQR6/YeQEkjwh CnkiH6Ao+j5KYx+gPP4RqhIfoUb1CHXJD6WaeA2pD2lOH+Jq8COmm1GkikIZ haMoIn2qqkbRUDuKtoZR3Oomhfp/QXXWACr5rlZkkzw5YtiS5Mmhmc0hebJJ nkwa2ZQn5DkuHV6F4xxRCErMp1jzZC6FmAUvEDJ2PVxUoRsrgCkQsmyJ4luW Coxs4JHn9DIhnt/kxwqyYzm1jPxYRn4sJT+WLlsFt6UrsNhtqTKY+C8SO56d si3tsuwgtl5VZirxtUgmZaGYaiQmBDwvLwd5OofSTALHNGnCkgCHk5hZMFeM RC2DC7WQWjRvKZZ+cgwffC+jY/tedxzY746jB9xxfB8Rsucgju/YieM/bqV3 +RzHP3kbx99cgZWzrDBvgjnmT5xEjUPYXCsEzSY+GvNhaWUPyxlj6JCxMVtB hwhEojzx8mfwIV4lyWEmoCHT4x9IDUdpv4qxXW+WSttuLpG24XWbs5DscFEu hyrsOBGKsNMq8kMt7YQWdq5UqpwZcame7GhB4pUOpN3oRrZfP7RBgzCFDqMw 4jbKou+iKvYeahMeoCHpIZpTHqEt9REufKGF6rsS1J6sxrBfNe4llmIgMRn9 ub9Qj6iH1H305t5DF/nRoWbUyhlCc3Y/GsQi6IxOVKe3ojKtkeZalHVlbErO J0O05Ie4XhKlbHfzIm5eCJb+90HK2pBgIkSsQAtR1rfGER9JdCFpnjnI9MxF zmUNtB5KQcCxYoBXjCi5aiQf6LKum1DhY0LVTSEjqnyNkBe8/htv9Xys5fMa VIr13zdyUHY9i9hJ/790nQdcldeW9p/fMbntm/kmc2fmzk0xsVdQQOlwOMBp VLvGmKjR2GOMXYqCYCH23itdQRSQ3rvYRZAiqNiw95R7Z274nr3f9yBm5vP3 W+cANjjvfv7rWefdey1cJk8ukyeXt6bi0sYUnF97HJXhccylb2HiLmHiyX/P 3dWL10nLR+07FkZsfiVO+Of1LgbSRAleOz7y2vPRzK9PGROLqV8dw2R6mxlT TmLe3HQsWZKBkOWZCKOfWRB8DAtDj2Fx2DEsWcmITMSm3UXYtK8CG/nzbTxw FhsOnMe6faIxTxOv+Q0c20aq7GrDqX2PkHHwCXJVqpTFv0bVsTc4m/QGF1JI lVM/oobXu/b0T7iW8RPLW9Hxjtc/50c0M1rymEPy3uBG/hvczH+NWwWvcLPg JfPCS6RXt6OJ5XIDS+W6oickCKlSfA9XS27JDUBXS3itS0iVokr6mnzUvKVK lOoKXO3fbS+n3BsaLkcEeHW01RVUYRiEOWEYWRExqHTy5E98pGMwixAkIQVI ExNpYjAHMPyhJ028DCbl5unHVL5OgYll26OzshG787kyy2Zsk6e69dF7lHoO 5G2St2x/dLc3q0eeO5PEDG8nU8eUa4+xrIjmsiJasgYLWQWFkiirwkmUsEiS JQJrg0KwZtF8rJk7A2umfQGnPgPg2rcvXPv0QO4IbxSOdsLgrp/CeqCgiSvD TdLEzlqhiQN9heMg5e0VOeyJ4TJYKwCiFQCx0cKNIT5zpV/xUQZWcIn+XhmG 4+Ilh+GYRBAuJkdPgkX3FihrEpH4QxahUsIFdpYLjEDZXM9F1oyUnbeQvvcu cg49QGH0Y5TFPWXaeoHzSa9xJeUN6lJ/REM60xRT1s3sv6E1R/SKrkT2gho0 bqzHi9gGvMmsIUD+jkelf8PjUgKllEAp/QkPSsUwgte4U/ISrcXPcYOL7Hrh QzQW3MO1vNuoy2thFc8yKIdlUPZ5gqWcUFHucGgsTWK2JyJup7KvLmFXKhIo bOXAmdLTIn1XMbJ2lREm5YRJJUp3VKFyRzXOiAZ/e87KBn+X9p/HFQrs6qEL BMYFXDtyAfVHL/D/aIg+r0FjzDm6k8aYs2iMruaXqviblfxD5ag9XCoPfNeQ KjWkSg1rrpptJ3F5YxIukNJl4Uc/UIHirk6Q17oKoAiU/J6P3nJIrO4dd2KQ MNHAIKavECVGGF2UqdJysrScLm3kNTbCuaszDF1HYuqkVMycfRrfLsrE9yGZ WBiezqV4DLOCWEyFsJiiZZlNuMwKT8RKgjR8O5PGaprONReRGFWLxHWNEiqJ Wy1QeSyhknP0GQpjX6As4RUqj71GdfJrnKf5vHjqDa6kveG14PXPfIP6LCaV 7DdoynnNEvY1mkU7+PxXhMorCZIbBS8Yz9HCaGbJ21T4FPVFLJCKH6G2hEVS KaFS1sogVMpoPksvEiyESmE+Lr+FyjrVLrzTr1IFiqen2jTXW4GKbJprEBAx EiXvs1whYAgSESYT1W8WbZcNZnFCQU+Q6E0sVYy+6g6xrpIg2k4EEXfX5e5E d3X3j86yeXrEbwiiUoQEcRtq6qCH8CEe79CDwWfxy0CSGB1NMucb8RECZ7LM WbQa80iSoLBVWBkeiTXhEVizYiXWBIfC38sbzv2t4DZgALInfoXy6eMwtEdP DOnRHVYDXGE1UCWIlSCIOwmipR/RkiJaODGcB3nAebCHhgjxIEJsPESDK+Kj Y+6Nmx5+yuwbjRx+8zuuNhLEVaGI2dkTZhLE5KDrqmb1+NUESFQ2F1IpISJ6 WV6RAEnc2oITu1qRvu8ecg4/VAAS/4wZ6iXOczFdphupY3ZqoBu5nvkLbtCN 3Mr9G7bPPovcJXVo2tqIFwkESE6NaLpR+ndmVQGQx2UESBkBUqYCpJQAKSFA ip/ietEjAuQ+fTABUsCKJr9Refsv9wJBUkFnQoCkpcjv/OjWWMTtOI4EupHE jk4beUjcXYjk3cXy88xdFcjdWYXCndWExzlU7DhPeFzAub0XZVO+yweUhny1 R67g2tEr2GNahUzfVWiMvYKmuCu4HncZ1+Mvozn+EuMi4wK/fp5xjn+mGtdi 6FqOVigsOViEq/tycXX3aVzdfgJXNiXi/LpY/It6srZjmCwhooSXgIiGFNGT J55iWiTDW4ZREsRAXgh+aEgPs0YOph/ARxN83Ey8wia4fmrG6P4TMdvzWwSP XYSIaYsROW+hXAVy+pGbFxeBJ0MHX2cdfJy4enrYIDEiF4mR5UhcdR6Ja6++ hci22zhOiJykMzktIfIUBbHPUZLwAhW87mdYwZ5LeSV78F5Ke4Wa069Qm/kK 17JeoT5HDMB6iabcl6xKX2rQnP8CH0hutJAbLTQizYzrLFwbyY76koeoK32A 2rL7DJY75TQm5Sxgy8mQMl7uUl7uonz1yOp6+fQHuLDKcbV0l9Qq3SVlu1tK 2ct7hEb2u30PeoPoeDtChsE4nCUjsfE+HwkAhpcpgMAgFAy+6q3vj9XTFmZl 3Ktly6C6Jcdy4kJuG1TPgVlOXUhwiMKAwHAjMDpbjs7A0DMM/NjAZ8V6fASj k1Fiw+Ro4DOv+6TVmDB/FWYHRWLx8kgsD4tAZFg4/30znK0GwdVqIPLmfYuh vfrAvncf2H3UTy4lqwFutB9uGGzlDjvGEGsthlp7EBwetB6EhdMgHVnpNFhH dijRRa6fLvBzN8kxN29H3bwHPzd9x5gblSOinPER7HDSCXbgE3UXTDztbuIa MSWtjC5EWNwawqOB7kOFx/77yD78CAUxT1DKUqbq+CucZylz+dRr1KbRfWQQ HixlbrBIvpX3M3Z+ew75IdfQsrMJL5Ia8Sb/Ch6W/kJ+lP0CKzwu/xkPyY62 crKjjOwoe4VbpUxQJVxYXFSNRW1MTndQV3iTCUg0TiU78pmQ8riYslk7pyvs iN0Wj4QdyUjcmUp2ZMjLIQ6JJdFspJAZ4lf2zrMo2HkexTsvonzHJZzZfYXc qMGF/VdlD72aw7Wyf544o7rFvAFZfntx9ev9aJu/DbfmRKElsU6DG8dqCYAb x64yatBy7AqaEy+hKeEiGuLP41rcWdQSIVeP0hsdIj72s+Dak058HMcVFlvV 6w7TvLSLuYAkh3AenhppPP4ooSEHzMphkUbaDhEmIsNMZJgJDDGf3uzq00WO q/8DL6QPXD5zhfmzcfjacSYWBS7EyklLETl3KcK/m/HOmCM3ce29mEdIDlLL tReJEU6LuZIZIoIXeQ0v8g8NJEaLJMaxXfdxYt8DpB98hOyjT5Af+wzFCc9k t9zK5Oc4m8Ia9tQLXEx/gSunX6Am8wVqs1/gmpgIkfucNSgj/zma8p+xJn0m MdFc8ITxmLh4jKZi2kpajWulbagTuCgnLiru4Golr3IlkVFBi1lOC1hajiuF eZZj7hvV92VdXAPgou4qUXs/wsOL3PCm9RChZ00jwsAQsPCSZx91xkBGADwM firDHd6eeVD37Ik3OuS+Yo9O+4o91T0yYt+et7Jvz2WoUToKCQix50+Mnmd4 MrycOgGCYRThKJ5pGmUIQDCcDAy9nMotZuqOnBOJb5ZEwNvgA/uBdnCytoGz tTVsxVS8T2xg97EVxnxkjzEfOihGleHFVeNNp2AQFS9XjN1AnTCmGplUuqhp xcxFYJYwMAsYaM3wJyT8taZ359Ro5Fr5HXzdO+UZVtw+zDMmRw9lX+p4xK2M p1/l4lkjGvYz3azn4tmkECJ5922kCUIcISFiVUIkvWKKeY1L9KlX0+lPM5Si tyX3J6yfcxq7vruAorBruLGXhDjZiNdFV2glFCw8LP8Jj8rF849ExBvcYyiI eImWUi6u4sdoKG7DteK7qC3m4inm4ikiIgqZb/KJiNw8prRkxGyJRoJ6dD1x Z7o8uq4gooweuwqnWH+IX7k7L6Fo52WU7ahB5e5aVO+rw/kD13DpUD1qjjSg NrqRFqER63z24KB/BkpnleBmRBmebcvDy93xuEnC3UxuxK3kBkY9gz9XUh1a kmrRfJw12LHLqE+8iDqy4mrsGaVfzGHR8SsbV/eewtVdibi09Sj+2XKGuWNe vScvuQgveektsNBJWJjoL8R0WbMKCx85mdrs6guzm6+oPd18RVdMX5oSX60v 3LsFYJz1FHyr/x6hny9D5EzG/EVigXBJ2PGR2UNrkPxQsgbJ4aYjPUiO3nZI DCsmParpNViYRtFXbmimt2zFsZ33kby3DakHHyKTCyCXC6Awnovg2FNUJD9F VcpTnD31FBfSxKyqZ7iS+YxF5DPUZT/FtVwWIYyGvCdoyKehICmaZDxiPERT 0QMSow0NpfdRX34PdaRFbeVt0oImo6qF0SDPDl+tUKhxIT9LhcYW+fQ+nLWE hgehoSM0PBleos251nsYJaHVs3bRs4bRs5bR+/9ZNdKWAwda2VtNPRQlNtBp O23q7dhEpxw8cB5iIBxo5OwVOEjn4KC8WeFFOHgz9AyDk4+EQxeJh65vwSDC 2SjfrjI6Ewz0+AbmaaveQzBINAK1HgKHwbaIDlkD274DYdXVAX7dh2P4pwaM +dgJ4z50xKgPnQgFpg9Xk+o4RfowczWYuRbMMn/4uvtIIjCdiEkyHyDAQ8yT 8ZHzZJSZMiY5UkYMkvH3MMhBVn5adVyeu1gRigtV6KBVdl3ZIGZFHI0o6bC6 VGmkv4502EgzKvwD6ZB6oA1ZRx4ypTxBSSLTSdJLppOXuJT6ihXsa1xjBdvI 6rU59w3Wz83G3u8voiSyHjcPkg5pDXhdcgltYqgZSfBQhJhuVf4abXLC1Svc Ln+JW2UvSIfnuF7CxURHWlfK9FJKOpSSDiWkQzHpUEg65OVyISYhfksMErcn idPllm0QiTvL5bmpE/QLytc+QN7OqyjeUYfyXddwZl8DwdCIi4eacOXIdYKh GddiW2gCWrA+IBtHpl5FRUQzbu+7gefHG/EqtVKD1pQWarr1JL+ccp3PTbiZ 0ogbKQ1oPlGPpuQ61CfVoI6MqE3gMo6jj4hmGXK4gKVIJkuRZNTsjsGZTfvU wvhPLL7dJSM85LRpCx/0DEPH5GlPkQ68RblhcPFh4eFKGJjd/JhHfcTMejX8 tH5w6cZL2m0CprrOweLhSxAxJZjFRxBWzJ0uloZGzhvqLleGGDMkVoQ/V4O/ uydXgwf0A72QuLwAiSuq6Cou8fLXMTlcR+KWW3w97yJp7z2c4uXP4OXPiXmI gvhHKD72CGVJj1GZ8hhnTj3GubTHuHD6MS6JGQtZj+nxHqM25zHqch/jWh6L jPxH5MND8WZQwQNiUvjDhhIyofQertFFyJ5rla3kAblwhvXmmeuMen5+hWw4 hyulZZZOoymq4xXzDZXOQ4rCRb9WReHKNlnL0Udxy9bRzkCFGxWFDzW/Vbgl 9fPf8WYIhY90HYMxbmMw1n00xmnHdKGkzfzvlLeOKHBeHqOLnhfFCy4D7TGw ty0GDBiCwRS47SAbWPWxQu/P3OHSZxq8ek2ET48xGN7ND2M+8cD4D50ZLm+9 oasQt48ibBFaHwFzXy5kfzGvRQ0xtMWXKBSjWwLVCFAHt2jk6JY/dJK7XpW7 p4S/InXVBHyEhPBMXmPmgVVn6RyvUOINUuJJlPipA/fJ/4fIi32M4sRnqEh6 juoUusVUOsXTL+Vg5YbsV7ie+wrr5uVj/4JLKF1bj9YjTXie0YBX5Rdxn7VA W/krjdT1AD6+xP2KF7jLuF3+HDfLWH+WPkVT2WPUl1HhrDdry6jwMiq8lAov ocKLylGTl40dQWuQsDWWCk9RTmzvyOdypHfZWSWPRZ5gvk+jtLN31rE8qEfJ rkZU0ItUH2jGhUMtuHz0BmpibqIu7hbqE1qZw1uxYXgV9i68jaLtt+VRyRd5 t/G6kOXB7VOtlPid1Fu4y7idehOtqS24eaoZLaeuo+lkAxpOXENd8lXUHr+M qwnnFJnHlODqkVyWDGm0ArQAuw+qEv8z5a2llC0SV9O/nKxoVEdCm+RweW/L /FaG0dWPa8JPylzOcXX3pwHQ+rPM8PPwh3M3Ldy7j8B4m2mYa16I5V+GIHI2 Y+ESuUKU4T628JcDfcwdaSCA6yKAayKAa8Lf3QPeAw1IDOErKeb5rlLfdNh8 g6/wbSTtuYOUA/eQdpiLIboNufFtKDz2ACVJD1B+4iEqTz5EddpDnEt/iAsZ D3Ep8yEF/xBXcx6iNvcBavN4VfPp7GTcx7XCe9LlXSPLr4m+0RWi9dkt1FTx qp9pUYRe3dgh9isVZ3G2qPBdsTvAbYja6MdZbfQjB1MogrfsiTfQ7zvYeKti Zzof8huxO/xG7KwdRrmNwxj3cRT6OHzuMQ7jPcdR7z4y7VoUbySUjYSzgVfQ xdoFgwYa0b+fHQZYi54MAzGgjzV6fOYB637z4NB3NnS9p8LccwKGdR+JMZ8a 8cVHrvjyQ1dBcJho7Mx0dBLhWj+N5PfvqVw/XjU/XjU/dUQKQ6c8a8SgFPHg o5EjUv7IR15Xnap3Dz3DAnOR2j1gdtaqXU3egzM9iDO9iCvDzdmrC9ydxE4i li2fyG1tNj0cGI4Y1N2JppBA2NAg33A8TiCc3H8Pp49wDcQ+QlHiE5QnPcWZ lGe4kPqc5eNz1LJ8rM95gaa8F/hhfiEOLbqM8vUNaI1pwrPsBrysuMDc/lJO sLxf/kJDFDyHG+5VPMPd8mdoLX9KILC6JAway5kjytsUf1hB/ldwSZTTF5ZS acWluJyXiTh5RjqRvEojFHK4XEsYlfIs4vEdl5Gy4yrSd15Dzs5GFO66jtI9 LajcfwPnDt3CxaOtuBLDHBN3B9cS7hIG99CUdA8bR1/GntD78k7v1fT7eECf +qa4DnfS7+GujLuMO/z8Nm6nt+JW+i20pN3A9dRmNJxqwrUUCxUu4WriWVyN Z2EQy8Igmon/yAnU7D/8f9TDPkq+1ykwUGfDKzBQRq2KGfEdw5zpWuUoRAEE y1BnETTDvlrRAsjPI0BskunOFdBrEr5xn4clo4IQMS2UJUEo15C/2AnE1WPD R1/JhQB1zJdCBD2J4MXQwb2vHeKXlSBhOUuDCK6AqGusC1kabLuJxN2tSN5/ B6cO3cXpo3eRHXcPeYn3UHj8PkpO3Ef5yfuoSm0jEcREkzYSoQ2Xsu7jcvZ9 XMm5j5rce3RrIsj5AlHr8fKW3FbuU1SQApU3cYVlwJUzynGvGpKgprqBn1/j 1y/jfNkZdb7KSfnUj96+U79BZn2tu7IfXe6yECBgxlcgoIeTyPiEgIsKAXd7 X0LAFzoHP3iJUEEwyn08xmjHY5xuPAEwnqnZV63GmKbpxY305AZRrBMCLtZO LO61cLHTYQi9f8zZdnzWrT969bJCnz5WGgzotwD/gqF9v4O2zyyYe32NYT3G Yexn/pjwiQ4TP3LHl5+4S/37UPp+Hn4S7f4idP68QP5yEhK5HygGAgzz8usi Z5L8SQ5JCvQySwYEePIa6kh1nV6S3V9ryfbaf7ZslqfwXSh6F1X87gytDG85 5VfH6AJPJ2+CwJM4sCMIhvRwYjgzXPi5Cx1gM47takXK/rtIZ0LIiXmAwkTF +VWlPMG51Cc04k9xNVNUg8/QkPsMUQuKcWTxFVRuasDthCY8zavHi6pzLP+f S9XfrXimIQKe4nf88AnuiAZUjBsEQHP5QzRWPNDAzsYdQzHExnIwxxX2g1zg MMgJ9tYOWPLl91g6MRRLJ63B0skbGTuUA3/bL5IDV3GSZuD0zibk7mxB4Z6b KNvfiipx6I8L+FLMPdTE3UddQhvqmdaamNaamdY2jW/EwchHyI9+hGvZj/C4 4hFeF13GXaa4exkPcC+TwcV9N+M+bmfcw62Mu7hx+jaup99EY1oL6k81ou7k NdQm1+BqEk3MMbqDBBYB8XQHsalkQdyfVCKLIe5vjYG47UBX8MeOictiEqrA gDcXoV5iwJ8L0J8YELI3uweIAkBMR9UGcuUo4dydWOkxFl8MmYV5fkuwYuJy RM5lLFraaS0JHPRXcOBpMZAmhrqMPLy4jDzg2ncI4oOrEB9+EQlrapGwoQkJ XAfxO2kQ9t7CiYOtSD1yGxmkaU7CHeQfu4Oi5LsoTblLHNxFZdpdnCE1z2aI Jv93cSGLr3r2HVzOvSMb417Ov40rRaRxyS26esq//AYuV7TgUlUzLp1RTnxq +NjIl+pydT2/VofzFRdRVlisouCUWrIKObt3OpYiWo5aNocPGeQFe2LAwZYY sDPSDwgM+Ch7PPn3tPZ+0DE8VRR4O/phlMcEjGWM85wgASwx4EoMuIlgSS6D KHAzSAQ421BZQ3U4c/gc6tOq4TzYAS5WjnC2Eu2yXegL5mNgv8Ww67cQ7n2+ han3NLLgK4zpPgoTPjNqMKmrlj+kL0kuaO4vQhcgrlOAuGIBQvgBTOSiIb+Y ESIGFYmm/AIHYkBRoJcFCCZ5Jd8CQVxJHUsALcyu7n9Sb3tZDjWIs1ViU7HY 26cV24p1cluxJ3ngpYa3s9hW7CTuWer5KD6yJxrsiQZ7YsG+p6sGQ3u60eUm 77tNq3gXWTH3kZ9Am3icFjHlIc6mPsLFdNaCmaIWfIJruU+wZlEZopfWoHJb A+4cb8KTwno8r65Ga9kTGvDyJ/zfBA3uiHZ0pMFt0Quq/AGGio1eQ0UnT15R LeEuQunp6WTjCqfBLnAiGRytHLDsy4VYNjEcyyb9gGWTtzB2MQ4wjiJkchxO 7WhExo4W5O66haK9t1F2kGuVXDtPo3sp7gEV+xDXWNk2kG/XTzxBy8kn2DT5 Fo7+8JQG6CkaC57iafVTlgzncD/zCe5nPUEbq937jLtZj3CHRrg1qw03uO6b M26j8TRLj7Rm1KU2oPZkHa6KM8HJdDRJFSQEXUJCBulwHJcO7oalW4aCB8Um 6Fzevl0o2KAjFzy5Kr24Or0ZenJB8oFsMJEMZiZDM7nAooFU+BP8xJR23TA4 9/BFYN8pmO65AEvHhiJiRhiLhuUI8AoUkyDkahPb/ryYgJRpWAxfJeOIxcVs o2CCNYTOE240vzGLKhAXeh5xkVcQ/0M94jY3Im77dcTtbsExmq6UwzeRFn0T Gay+chJbkZ/USky0oiSlFWWprcREKzHRiuqMVpzLbMX57FZcyLmFC3mMgpu4 WHwDF0sYZS24WMGKrrIJF6pEk4rGLrhAOnTBeZYMZ6uuoqK0Gupg2lTLVm7H t1OB5VZuiQYLFvTEgoEOwUiHYCYafChj/vmhChY8LFhw9BMi8EM36Fl16OXr LXgsplT7kAIizJIKeoaTtTvXIc32EC8422tRc/ISP7eHi6CCtTPDVe5pdrFy Z2hZLSyFTb8l5O18GFg1BPSZgjG9PseEHgGY1E2Hrz/T4Us+++sCBRICuyhX aph3IBfJMG/LvA6llb6CCBUP3sSDtw8RQTR4KVdPooFVgkCDHyHvSzRY+mS8 PezkqR52+r3gwm/PGXDBSTCIrR7O3l1gIBTehyOx4EgsOBILjj1d4djLjX/A gY//iozou8iLv4cimsXyE204I1rhpj/ARebUmmxRLj7C6sXliA2uQRU9+50T TXhUfA1Pz1axLniEWwyNHArzHi3CA37+gBfPXahfA3tbLXorTX7VcLIRJ+bc GHyhCQUXQmHR2BlYNmEJln0ViaCJGxA0aQfhsJdxGEGTY7F8ciJWfp2MNV+f RN6e2yii0Sk/zG/1KKvbWOIr4Qlqjz1FfdIzNJ54jusnn2P9+FhsnvkAcVte oOzESzSXvsTzc4zsItzPfsFvuS3nOX/8+zlPcY9xJ+cJWvnj3shuQ3MWy47M 26g/fRN16ax8U1n1yvO5tAwptAzJxYRDNkuJE7h89IAKhfdp2LTSL+jkNVGA oJFI+B0ffXmNVCC4dABBQyIE4p/Jg2HwYVb0FSGmqUseeMGz53h86fAt5gUE YcXkMER8RyYspl+Q768Hcpl1USZUeStTqjQSC30UMFiyjgCDJzOOJzOOzgNH 5hUhelk1YsIvI3ZNHWJZTMZubUQs3Vj83us4frAZKUdbkBbTgoz4G8g+dgN5 STdQeOImik/SqaXeREXaTVSevoGqTHFc+wbO5rbgbD6jsBnniptxtvQ6zpY3 4SwrxGrRfEg0R6tu1OCshEI1q4czBEN5+SUsVaCQpnbZdmOOF7ueLJuzB1vp YEsgDBms57oycEmZCAUzoeDDssGXXsGPUPBToEAg6Bz96ZT9mSH9KQQaKiKB D+J9WT1h8DEfzXCURtWT/xBrEJqD88frcD2/Fi42jp0wQASIGsKadsvKA26M Qf2WwWZAEJz7L4a+/3fw7zcDo/t+hQm9R2FSTyOmdPPElO6efKmHdVwicXN0 GB+Hi9AL7PNRPNA6CCr86R0eBHqb1QtHHoiLRpr7e9AmaLW/V2sG144zR54d FkHJQ28xoJEgEHt1vTt2/mvk4x877oqa1HAmGZx6usC5N/N0b+brPmKyq/jo L3AiI3JYjRceo3dMvodKMYcujbn49H2WkG2oyWlD5JJKxC2/ijN7GnGb1fbD sjo8OluOFtEuspR5tkzEfV49N+kJHGzdNZIJzgoRxEcy+HozXPnHXEkHVxuF DkvGzUbQF8EI+nI1gr7aTELsYhxgCLsQTzocR8TXKVg7NRUbZpxG8cE2lB95 iOqYx7gQ/xRXEp+jLukF6kkBeYAt9TU2TMjB5nnPkbjrDXPcG9yofIOXl16T Bq/RliviFeMl7ue9wL2857iT+xStOY9xM+chmvkjN9Eu1zMf1mW04Gp6I66m 0Tak0jacOourJ8tIiTwSIpVFzFGV4H+G1smNhPD4jWUw/S+WwZ/LNYApK4CE CJSAEHgwe0hEaCQffg8/z+Fw7sklNWA6pnsvxrLPVyBiVjiriXDBBC42G8kH MeFF0kGGP0O1DRZfKpKPl4ELjonH01N+s4fnleNo8AVER1xFNG1D9KZGRG9v RMxupcvr8UNNJEQTUmOvkxDXkXXsOgnRjIITzSg62YyS1GaUpTejPOM6KrKv ozK3CZX5TagqYhQ3oqpUaftTWSHaJTJIh0oR1cqzaKFYUl6zTCFDunq+043K lvsh+aIMGqiDjZUXyaAnGYx0niaSwYeC9mVu94Mrw20oqw57f1LBX1BBI7HQ na+xv/I6u6rhJsIX3u4s6cgG+0E66T5Ob2hGFX+4azlNuF3RILngOshVnrF0 GUQuDPLg1+jUGW5WntDy2abvQtgODIGD1TJ4Wi2E38A5GNV/Cr7o9zkm9fbH VCL9m55e73BBjsbQD5NcGMYsIofwGAJlJ/vhMgLk7wlSDNOTFHrVOXhbnINB JQVdg4cH7aXb+8omGLGx/311a39nTIj/X0DifQkJiQh5q0Qvb5kwJTnr34PZ Wa9uqXbu6UQ2UIzkgwvZ4NyX0U8wwqWvcBDOfVyRl9CKwuO3ZQvZylN3UH1a qSsvMZVGLBN1ai2quXJupzWhraIO96qL0FRyD9dFlN7lv+Vg46Z04nZV/IId ycBwthPv4qhkYLjZusFN0IHeQYBt6dhvSYflCJoQRTpsZexhHCIdYhA6KREr 6Bsip5xC1LR0bJyZKUcR7fouD9WxT3Eh4TmuHH+J2uRXqE95jaZTb9Cc9hM2 TKzElqVvkHzgZya3n9F69me8uvyGNPgJbXk/oi3/DYO0yH+Fe/kvcSf/OVrz nuJm7mO05D5AU8591GffRl3mTVylBK5m0D+kX2GcJylYVKQWkBDpqDkWC8tW fq2TO+mge8c7WMhg8Q5i5XqzjFboEAgjyWBSyWCmb/ZhSe2rGwFfzxEEuh5e vb7CV87z8P3wEIRNXYmI+SuleeDqk0NZxBoM1CsrUI6ZC9QHCO9goQRTUqAl JXnTQ3jrJSH8dMrwooPzq3A49DKOrLqGI+sacWQLg7XbUeaBuAOkxGGl0eqp WKXZauaxRuQkK40MC9QGYcWZjSjJbkRpbiPKCvhcxOcSRhk/JiFKKpSGhaVV 9A6lZ4R3KCEwCstr5begEuK0ilhX4R34Aln312HwQC8SwkBCGEkIMwnhw4Xl y0VFQtiREKSDmz19BumgJVk8CAcd6eLpIkhBd9YNnm5iRA9fe/oGEUPpBoZY eyMpshXFh2/hSsZN3Ki4AefB9iSDizwS6UoquJIgLnQXrrQtbgx3/h0tnz0Y OmFlrENhbx3Cz5fCx3oeRgycgfEDJ2JSv5GY2tuAab28+extmZ2jzLromJ8j xuYM00g0/JPsND9czs/xk1O6LHBQbIRRhQMthE4HX637e5Y72+oOfQsb1M21 0PG5UyWhkVDoIrEg7qia5GZ9cc6nC3xcDfBxUULDz8SfExuoXUkKVxKBdCAj /g1edqPhNXQ0XPszrfencPu6IO/YTZaZt1B6Uikxq0/fJi1uYyVdaUIkSXGo EbcymnCvqlbuT6wvvo0GxltKaAgId4pnhO8YXk13BRFEhZudBRHuAhOK5bHB 0jHfIXh8GIK/WIfgCdsR/OU+BH91BMET4+ghjiNscgoi6R+iZmRg4+xsbJub i13f52PfgiJcSHyJK0mvUXviDepP/YimtJ/RnP4zNky+gq3Lf8bJ6L/jfP7f cefC3/G65kdS4RfS4We0FZAWBaRFAclR8Bp3C16iteA5buY/RUveIzTltqE+ 5y7qslpRm0UfkSX6W9UyLpIYrDLSi0iKDFYb8Qokfq9CwlO+K6xzNnayD+K2 okDEnxVIEBB6AsLAotpIQJi0wxVASEgogPBjOPcahRHWszDDuJQFGAExJwIR i1eSAyO6SEb87i0fuNwChZUgIgL14s1Krjbx22SEXvCBiciba82bScjTXaPe yN6/UExTrcHB1Q04tL4RB4mIQ0TEESIilohIJCKSRe9AIiKNiDh9nJg40Yhs 4iGXeMgjHgqIh8I8BvFQSDwUEg8FpaKHKUP0C6wkGgoqBRry+WlOaZ38z4MU NGSo5mFgL2dY9fOA9QAvWBMLg62NRIMZQ4gFe2LBwdaPJYU/nIkFV5oGNwei wTEAWiLBwzlAI/cv/qvc5uzhKrYy+DJ8YMtCwYZeJCaoFdm77+GcmPFRegd3 z92WNyHEeUcLElxVJDAxD/IWDXvoXTwGKyGb9tl4ETGhJNVyuA0OgmnwIgwf NAefW0/BxAHjMLWfuM04vY/YRTjMMEKOolBCbftuGK4Rvd81slfp/5HGwcKG YSL0FpabJM8DvMgF8txXp+1o3mMBg9gSZ9l1b9kN6emqV88BikM778tdkUa5 18JIJhjlcR1BAhM+ha+bkTQwKs8yDPBjSDrQNbj2EzRwh9cQ0sF+NLwdRsNt gCvc+vP3+5EQSS0oOnEDpaduyFrzDEvx8KCzSFhdh+ojTbiR1Yg7Z1iSF95C LcOBlkBlgxuFImZ5BPqMxjBfpUO2wIRAhBsRwZffVty4kIigi6DbkbFs9DwE f76SnNhATuwgJ/aTE0fJiHgET06ikziJSLqIqFmZ2EgXsW1ePnYvKMT+RcU4 vLQUV5LfoDblR9Sn/oSm9F/QnPE3bJh6HdtX/Z1r+79xseS/ce/KP/D6quDB 39BW+AseFJITheREIblR+AZ3C1+RES9wU5wAyH+MpryHqM+9Tw9KN5FzA7Wi 01Q2a43sS+RFNVlRTE5k0U0k/kGVnEcHI/QKI5zJB2fRpEAxEZ7Mj14Mb9bX evLB4P4bRpAPPp4KIxxZ0up7T8ZE1wWYP3IFwr6JRMSCSKxcvEQAQHTzFhMo xWIUqYoJyyBHI5AXgRZeGAIkKoZJUHAB6rn49AIU3gSFh7rw/sJXUoxEvYr9 qxuxn6TYT1IcICkOkRTR+5U2fsdjSIt40oKUSCUl0kmJDFIiUzTMIiWyaSJy 8pVmWdksM7JKSIasMvFQLvCQSVORVqw4h+DOeOiDmPWHkbApBVZ9dbAa4E1E GDHI2gSbwT6ws/HFUCLCnjWFI/HgRNfgTDy40DW4Oik1iXwb00WEH9xdhQvx ZZix/+tcHPruBk5ueoiyYw+5Vh/g1rk23K28zMLBWVoGt05scCUT3MgDt0EG aAcbiB0bA7GjYz0ienp62zIv24pRfWFcz6HQ2y5FoM33GDt4Br6y/gpTB47A 9H4GzOxrkGgYIfBgHCE7r2skJP6v2nHdMh0isAMTAhGBBvUqqZYvQFg+LyJd p9V0bIrTqoTQ/e+EcJWH+pQzfe+rgDDJHdPyKI6rWR6mMCtnKT6Uu2ItJypc WV249eMrQjK4DXSTVNA7kgwDXeE+0AXuA1z4+87IS76OwhTWmadYY6Y1kwzn 5A3xM9FNaMmhd6iuwaX8FpZxLpIMXSQW3OHvMwYBonm+rxIjfMfCVbgGWxEe 8mCp6HAhfI5CNAOWjSIWxkUQDRuJhV2Mg8RCDLGQiJBJyVgxJRWR00/jh9lZ 2DQ3D9u+L8DuhUXYv6QEh4PKEB1cjtqTnbHwCzZMv4Md6/+BjORfcbn8V7TV Egu1L4gAYqFIxM94UEQsFBELRW9wp4hYKHqJm4XP5U7/pnxiIa8N1/LuoDbv Jo7+cJwRj+ioI4heuxfRa7YiOnItjq5YphYY75MLWnLB6x0uaCQV/kz/4C98 L68duUDfoBdNTNyHkwvDYfIYAbNgQgcXRtI3jMVImzmYaRZvy0QifK5oWbtS MEEcQAw0jHzLBRkKG4aJ++PkgvQSggty1dGwGrjiDFxxeq44Pbng7aG0Hfsr doXVYPeaBuzZ0Ijd2xqxZxexsI8Ggg4xhrVFPHFwjHVFEuuKEyeJhjTWG8RB KvNDGldCGo1DGo1DapHo4MmgeUgtVZ5PFTcu70yB7ohbF4vETWlI3JyPxK3l jLOwGmiANUkwmCSwJQmGsH4YShI4kASONApOrB+cnUT4yeNWLvLZBw+yn+FR zjPsnZKIA9OuIX71U+QdZdGZ/QTN1U9w7/IjPC16JN9SEA7BjQRwk+5AMODf uQ4NDCO0NkZCgGHLa2ZngCfD244osKNVt9HRB4fTuIQxkwbD324RRtvOwYTB UzBl0FhMH+iLWf2NmNHfqJEM+ODtnBjTu3Nihqvtzd8lgVnyOqDD2HloOh3x 1aoUUI74/tM7BBAbpN8eyVP3UL67j1LujxZbq3zQS+6S9hdHJ8TeaHF0QuyC 1RqpdiqyP2OgCFLBSgR9gpWLSgRn1hlOct5QQUoTFi1NR1jwBSSuu4aq2CYm 0Ea0nLuCoUz0Fho42LpKHog3G/xIA0GFQF8RYwlVejU7D43EQRcJBMtJZOXU xydYOuJ7BI8hEMZtIhQIhPGHEDIhlvXEMQRPSsGKqWmInJGJqDk52PgdgTC/ ELsXF2P/0jIFCCFliFtegXrWEI0ZrCUyf8b6WQ+wZ2s7stPaUVPdjgf1vxII jyj+XzSkwC/U6INiWoVi8qCYPCh+rfCg6AWaC58icUMe4tdnI27DaWayU4he n8xIQPS6o4j5YR9iorYhZvVaRIcvY0ZxEKfTPByUt/qUy6l4ZIkIJ4EIA8Ok Wge1R4mzv2IdaBu8aRs6EEE8qIig9yMb/giHXmYYe3+DidpFmD86HGHTVyN8 0WqELVrM5TSKS0u0QRKQ+BcEGke+xQTTU6BBhFpucDkGGrkcjVyORiLCyOVo EIjQC0So7Zj+gi0h1dgeVY8dmxqxg5ZhBy3DbhYX+4804rDobMfCIpbrIz6F BUcqeUHLcJyMOE7LcJyMSMoTvTT5dXLieKHyHJdTt6IzGxwQvy4RiRszyIYi JG6pJBsuIGl7DVJ31CNrVzPy99/EoMHkhC05YUfXMJSsEGHvg5a057h1+gXu Zr1EW85LPMx9icd5L7F32gUcCn6MtL0vWQe/xLXKF7h95TmelzzDs5KnavWg k1wQNYMrXYErmeBGHoz2/hxjGB62JnjY8WINMcFziBHeQ6i+ISzhh3jCX26q Xs6iJhwe9svhO3QZRg6Zhy/spmOyzQRMt2axMGuAUQ5l6SKZ8H8lFSzde4cb O9HAoLi3AIt781Jatbi7aNXjdqwZ/qXjAI0nKWAhwTsn7eThGZ+3JHD3IQh8 5YZqcVDq7bZq5cSERnykkYcmusq9sgIJ7gNYpsh7MsSCtTs/pkFQkeA20AkZ iXSAvOTzl2RhRdBFJGyoR2V8E5NmIxxtHVliKTiwJw7sbcXcP3lbAr4SB2Ph TAyIvWMutgJvrnx8Tx4eN7t0uBiNPOxhh8WBcxAyOgIhYzchZNxuhHwucBCH kK+OI2TySaz4Jh2RM7Pww7e52MiSYStLhl30BvuJgsPBxEEocbCivAMH17N+ wvpvn2H/7nbkZraj7kI7HjW142XNHdyjJ7hfTF8g40e0lfyIeyoPTm4uwYlN xUgSXbY25iN+Yw5iuV5jNqYykhmJjGjyYT+ZQB6sjcKR8GXwdPSCl4OXBp7k Qld42otxFroONmgtTHAiE5y4zJx83jLBJeB/MkGrMkH0PtONlEjw8RoF597j McruO8zyC0XQJALhO8bSCNFzUVYRsvPiSFnZkgjGETIkDbgchxnFm5Ncj7/j o4CBrwIDI2FgEH5BZ9mXsWljAzaTAZv3NmLrwUbsPErPENeIfVwQB7kgDpMB R8iAI2TAUTLgKH3CUXLgCOMwY196LcI7C38Q4n9IJmCzaQxKKP5qHNtyCUnb apG6vQlZe26g4GArSo/eZbp5gPOJj3A5+QnqTj5DY+oLtJx+KafE3MsW95Te 4GH+j9g9rRD7vruHY5t/REHSG1wqeYMbl1/j7uU2PC97iWdlLzrKAiF6UQpY hD/a+wuM1n+BMfrx0NqZ3xX+UIptqF70exTCp2T0oqWMs30E3B3CYXIIwXD7 hfh86BxMspuMaYNHY5aVGXMGmjDNSvgD0wiNRMDH0hS8RUAAX39/9YUXRk0g QDVqKgIsB+ne7qJXDsl4Uvte7+j/7eE5Hzexv1po3tdd3WH9vtxhLXdXe6gh 98sH8vEPnc5VKDtkhS1wH6jcl3WzZn3iZi3mEkgMWLGyIgbEW0pzl+QRAZcQ v0kMsmf5nN9AJjppJAP++TcEEHsUPODEcKbmnVlpuYiwYXFGq2VBl0aC6zPl MIjElw+CR64kBjYTA0TAuMMI+UIgIIkIOMWymQiYlYWouUQAy4OtLA8kApaV 4hDdQPRyIiC8DAkry9GQ+SOasn7EuoWvcehgOwry2nFNNF9sbsfziw2UuyJ5 De5z3fwbH1/jXskrpG0ufYuATUU4tikfCZuJgM1EwOY0BhGwORGxm6KJhX2I Xb+VtmAtDoYtgbejN8ssedOYDPgT9HwUnUO9hyrzAbWOnRlgVhjg5KuRpuBf JQa8KH9v2gHRvsygHaEiYKREgJkIsO/tD1Of6ZikW4oFYyMQNnMNwhevRvCC +RIBGukK/iS7rwoOWEJSQIZCgkDa1ECToIHJX1QaJpLAJEjARWnUw9dbp3Yo +BPW7qpH1P4G/HC4ERtjiASWCltZKmwjBradaMR2lgvbTjau6nwLYTCOROxE QlQKEtfnUfUsATaeo+KvIHlbPVJ3XkfWvpsoOHQHpTH3URX/EOePPcGVE89Q d+oFGtNfoSWD1iz7R9zNFfeJfsL2aUnYPbMZh1f9hNPRv6Aq9xfUn/8Zd+p+ wovyH/G84g2eVbyGq7W7WgKoiqfaXW1MVPuXGG34EmOMEzDW9AU8hvD1H2qG 51ATrxFVb2+Q18pfLxrAiA7+/yJfShfHlXB1ioDeaQUCHJdirMM8fDVkGqba fYGZgwMwx8qE2QwxQ0TWBOoUEY0U/r9hmKmz7BXeBtB8+VP24lUWG+De3Sv/ /zszK/QiDlW8Jw/MdJyK0/pr5J7q9+Wu6gBdp/BUdlf7vT1TgQ/lhmqxf9Ld qkPycKfi3ayV1O9q5YRkkn7m4kIsX3aJC78BpYlNcBjsRL07YshgV0pehLvc pzjU1jKBnDUURe5kKzZWid2iXWTHB5PqUaTY5QFf5dDXJwgaHo6QkRspd0p9 DKU+nlL/MgmhzPZh35xGxKxsrKXUN3zPbL9Ikfq+oBIcCi1hRV6KWCH1iDIc iyzDmtkZWBf8M45Gt6OouB0Nte14fKOdWb5EZvW7Ja81Ut8f4PSWEqQz0rYU U+lFOMFI2lzA1Umlb6HSt2QidmsaI5lBpW+h0jdT6RuE0tdo5F6wLjBQ6AYH b9mtUyMfP5JdOw0Ue69/6w4P/r7H/0j2/kqyZ6L/H0rXKUoX/cWG9vJhov8K o+3nY5b/CgRNXoOw7xnLItTGhQbRbT5AirxzjFREblKFbhIxTAidESC1blF6 gMkolb6/s2x74vDKvUhYe5J1Hyv39RWUregxWkPZNiBtVwuy9rei4Mg9lDJJ VyU+xvmkZ7iS8gJ1qS/RePo1Wojc1pyfcFfc4i34GTtmXsbuoFdI2vtfKEr/ L1w+81+4Ufd3vKz4GS9EVP5E2b6hbLXyvTs31uxKkhaFoquNmRgabfwKY0xf Scl6DPVRZGtvhpc95eEgpOstZStEq7Sepm4HwdUhFG7OkXzRw+HnFIzRjgvw pf0sTBk6CTNsR2LOIBO+HaQql6odbhKhJOxhaq/7QNPbkimALsnfoLBR2/mo mzzZYvgfx9wMMkn7Ss0qihUnWvzlCTch2I5d0J4BYhM0hSm2nonN0FK3w7yU PdAilAaq/6Fo19Ok6lbcDaFtHyS0S91aO8n92FMXFmOZTTTyJ6TCbqCjHMPt YOcEO+pWnDEYQt0OoQUfaiO2Z+jkvUBPGkJHKtaJIXyFST2Uz29bI0jTRdqK j6StWBa4AiEjNlC5u6hcqvZzqnaCUO0pLJ92GlNHxWDmuFh8S+8+f1I8di4t xt6gYhwMLcaRFSWIWVmC+AhawFUlWPNtJX5Y+V+ISWhHSXk7murb8eTmrxrc Ln6Jv8oeb3dLXlCtxYwiKrYIqVsKqdpCqrYASVTssa25iN+ag7htGYxUxG47 waBqtx6lcvchbuMWREet7tio1elZ6Zf5V5j4aHT0hJGWve+/95AtiTtU6+T3 jmo9qVovqtZbqNZDqJaK1Y2iakdhaO/hMPWfhUleQVjw+Sosn7UWYYvXamR7 wPc7OhUL1UrlmmS6pmb/iR93Uu7/V7U+VK0J/kb9/k5b/bqoZ8Hj16QiMYo1 y7pK9Sy4Fe11E1J330DWgTsoOHqfqn2IKiba88lU7UmqNu0VayWqNvsntOb+ jLv5P2PLzALs+PYRjmz6BzKP/wNnSn9FQ82vaL32M15WUrFVIqhaKlfs7lVu zr9VrdCsmy2Dtbv7EB9oWbtL1bJ+93Sgah0U1XpRtUojVmWgfaDgmujiPJD5 crRUrtYlgpXicoxwXoLxTnMx2X4qpg/5HLNt/aRyZ/G/G07lDhOqNQ+TqlVe MT/5igWYFNX6sbbp9tGnnVTr3aFY3W8PpnacQ1MOpfpKxSpnFvx08syCqlhe HcZ7cttoP7lHWRxgGKYeXxC/xB5l8UtuERPnmLxM8iyTgJ2b3OMgdkGJXZKO GG6zGitsYlE8KQ1ufe2gtR4CDxsb2A52o3TdGVrYUa5DKNahNmJfN2Owl3KQ 1uUtZczuFm+gkkahjUa6g65Y7BuCkGHrEDJ8J0JGHaTFjpXqFRW2UO+U0TGY 8Xks5nwZj/mTE7B4agL2BBfiwPIiHAkrQvTKIsRFFiFhdRFWf3cZP6z9b8Ql t6PsTDuuX2fObf1vtBY9l60Zb5c8l3LVULiFTFepWwtwipI9yTixJY+rMxeJ 23IQvz0bcdsp3+2U7w4m3e3xlPIRxG3dg7hNm3E4apW8sSh2UnURXW81sqfc X2VvSrPoTenkiX5/6YF+/yHEa5ItbjoLV/cb4eopXIPHSNkyZ4hMtZOZHRZi 1rBwBE2JwvL5UVixbKUU7ntSs++9zbUmEaIqpFT/KMUawKUXaOZyMHPpmbn0 zGLpKWL1M3pbUqylDpYdXdYq050TN1xiLVwrP07dcxNZBynUaAo1/hGF+hTn T7zAZTriOjrixsw3FCrTKx3x3YKfsGX2DeyK/DuSj/6KorxfcfliO1oa2plS /4aXVb8wVKFW/YgnVSLFKrfFXAcZO4TqauujCtWXQvXpJFQfRaiOFKqDFKp8 NboofcxFt+Q/wJ3ydHdbRcmEYZhrED53no+JjjPwjf2XmGU3XINvB4v3eYdJ ZXZm2f9U56d/7fobB6wo03JK1Fs9Jdr5hKhZPR0qTxTpAsXRASpTOT4gtm8H ijdB+CjOEIgQpweG6cUpAnHSkBL9c4dI5abhzueLOjYNe1GgLhj4UVfoutpg KkM0gbf6S1cM+s/PGN0wsL+zBjaDPLgYbAYpW6yV71jwxEfq09TBE7HxQPiA LgpX1LNQGkmVT/nfKU4gyP8HhARuZ5rdzzo4hjXwMYRMSkEo69+vx8RiOo3y nK/iMe/rBCz6JgG7g/Oxf3kBDoUV4MjKAsREFiB+dQFWfd+AdRv/gcTUdlSc b0dzCwV6+2+4WfQUN4ufMo9KQWqo0nzq8xQ1eXJLrowT1OXxbdlyCmrCjgzE 7zyNuJ2nELszCXE74qjVw1KfsdTnzpUh8g6f2LskWsjqNbKb7F9lN9m3vWQ9 0f/DHhjwnz2kVmW/O9Gxhhr1UDWq69DoCEWjOlWjvUfBPHAOJulDMH/8aoTO oUaXMLH6iZwhksfvO4Z6WDKsqlOuMlnPSbEGmBWxBqjTcgN8WCQJsZrN8Kcf 9v2tWG0Uka5WxbqeYt10Tek5vZdiPXQX+dFtKBFiPf4M51Ke43LqC9SefoWG rDeyV/KtvB+xYdYFbF7yGkd3tyMzrR1nyMp6Op3mK214XqVk1JdnfsbzMxTr GYr1zBtlQ2wnsbqoYnWlWN2GWI7viMO9qljVXuWeDpasKvuJyhbnGtmTuK9U 7TCzEkK3nm4R8HMLxWjXRfjKeQ6mOH6NmUNHY46tCXNZMn9jY3yHawGqaOVL RdEqZ7csR2febrX0/O15TgpWOa+lnOMUp7V8OwQ7TG7y5zfqNUzu5tXIzbxd FMnqlX3Xcqs/s5cq33d02/lcoOtgsRPAkeEAq48/xaAPP8HSbh6w+utnsPmo O+w+6YGhXbvD9uOesOnjDNs+LgxX2PV269SZ4l3MCMGKN0w7UOOhmgB+9wHq aSV8jCXm1Qj238rkuo+2+CiL2USETjpBzaZh8thYTPsiDrMnxuO7KQlYOC0B O4PysG95Hg6E5bHoykN0ZB5iV+chcv5NrNv+K45ntqPyMol+SyTVH9FS9Jie Nw8pm3P5LVGi4iEH/4yUrdlUaxaSqdTjsnGIUGs64nalMU4yjlO5omfpIcRs 24XDGzfK3UVGcRhT3VEkwsfNoJENPP+TH3rL3osy6JcGfNgTA/7aA/2pXdmC TtWsh6pZT+ZUL1WzemrWtpcvXHpPwWjnxZg1PALLpkYhdAE1u0xsqfcTacRf Dk0TQvWnUAOkFQ6QrbsDWI75dwj1N2L18eXvmeFnMh7otKddsbv/ibhwWmCy T4p1XWex3kImxZoX80CKtTJJEeslKdYXFOsrNOe+RtTMbKz/tg27NvyK5GPt KCppx+WrNDaN/+C394y59N8o0h/xgvG8+kc85fPjaorVypOCVcTqMkgRq4sU qy/FajmCazmNb+nPKc40iS6eXTpaiAfIGSaiiXgXKdlAVawa+dgDWvdV8NBG clmGYaTbUnzhMg+TnaZhusN4zB7ij28p3Nm2RuXlEoIl2/xN4uUywKpvL+XU hHPnDGs5gO0Lb/pHeeCPy97oHqCelgiEjypWcZBKiNVfyNSi1ffEFiW5317Z R9tD3XQfIF92n/46jBnggQkDtJjCmD7AHbMGuGHuQFd8z4pV36MfldgdEWTO ICrS7tPeGNqtD5fbQDh/6AKnD1mx9hHhhqF93GHfWwuHXtpOTLG0iiBXPAIk V+QZcaFK/7fSVM99YpnPFoT472Xlyqp1XDxCv0pG6NRUrJiRjqmU50xWq3On 0PdOj8eOoBzsDs3BvhU5OLgyB0cicxC9OgcrF97D+r3tSMolx7k0Wm6342Hr cxzfmIOkTTm8VMmbs/EXSpWq3JIlI3lbJtWZgSQq8xjzaCKVGb8rFXG7qc7d KVRoIiOG3vcgjm7dhb3rojo67co+qfJjKtXdqLTL/As/tDTaVZQ68KMeGMjs OrBDpX4dCvUQCnVXFOotFErna9t7LMzWczHJuBzzJ6xByLc/IHRplFiQo9W0 KprLftCRVi0q9ZcxUlGpj4jhnVQqFOrHr/nCjyr1NRkOdH536SO5KmKWn0LC SlWkP1CkG+vkxycp0oxDd5BL+1uc8AgVSU9wNuUpLqY9x9WMF6jPeonruS+x dnYjNoT/DUcPM5vmtKOKtre2sR1PKt/gKW3us6o31OqZ13yVnlW/xlPG4+pX eHjmFXUqWtoY3tGoCzUqzsOKWSZKxwxLi0zRDc8o5w39ps2/peIWErX8UhD0 B2jdVsLDYxX02pUIdA/GOLcFmOgyC984TsQs+xH0xNTnX5WXyexDZfJlMhrw 6YefyVMLslVFp/NMb9WpHH9Wjj4HKkefPdSjjrrh8hCTvwgvXg6vEUKcI6hG sbVwGMPcR4+RffUY388bkxjfMGb195bf8/c0rIvsvOTHwaywQrnAVuiMCPc2 I8Loi1W8qqv9ArE6kOIfbIchn/VClHE6bD7tgyHd+9PUDaZSPRnuDDcq1x0u H2rhynD/0APuH3lo4NxHnKCxHNq2mAA/D5H4BVnsLGwRaJEn/uSZCj4vNmxA kHk38+oheuFYhH55HKFfn0To9FSsnJ2OVd+dxg8LMrBxcSa2LcvEzpAs7Fme hf3hWTgYkYUjq7IQvvgRNh5qx4nCdlRfa8eNu+1ou/mA1Vcmjm3MxPFNjM2Z SGIc30Khbs2g+T2NA5uicWBztJwREL+b5peCjRWC3c0idXcCYinaozsO8M9s t9zD6iLbl34s25cqO/JMnXbmGd7pc2slRKsKt/9fuyvT2DsEq6RVIdjBvfzg 2vsbjHFdilkjIrH0mx8QvJAlwtIwOSemi+j12kUK9o/K/L9OQvU3j+wQqp86 eVQjZ7Hzb3AV+lGsvhTrwc6+V1FqfFi+Wqxe7FBpClV6mirNibmHooSHKE96 jOqUJ7iQ9gQ1Gc9wLfs5ImaVY82C59i1g5w81Y7CqnZc4Mt+rf4VHlW+YjHK oByfnnnZhfp8yaz6uPoFHpx5oSjUSiiUmXSwGc5SoT5KMwuhUNHnkqEM1hCV vkEZCM2XQSjUT2ZQAa2hyjsvahYVIT9Xn4eJmax8ZTw8VsPLgzbYgzbYfTEm uH6LKc5fY4bDGOTaz0KBzXR8/MF0DGDYMeRdfFYyHh2b/0zvnjkULQrkeUNV p1zhQz/zhlc3XvbueozqQRH21GMiY2ovPWZQlHMG6jGPVn+hnRFL6A6C+O+F sDpczpQVbhiBCH6vq/zHKoTpirWjv0TUuImIGj8ZURO+RtTEqYiaPA1RU6Yj 6psZWDttJgKc3eDn5IyBXfvAplt/DOlphX4fOmPoh+Nh/+EYOHw4Eo4fBlCr rCo+1FOjntB+zB/rE094dvWEl4hP+fFnXvIktSLS9xS37qUIleJUjkcOlGcb lhh2sG49iOBRMdL7hkw+gZBvTmL5zFOImJuGNfPTsX5ROjYvPY1twaexc3kG 9oZlYP/KDByMzMCKpS+wObodKaXUKHF+41477jXfQvyG00jYyNjExLkpHYmb GVsZ29Kxl/rcR33G7zolrW4MtRmz5wQjmXEM0dTo0Z1HcWj7fqxftUo2l1Vu PnVVNsqpW2M6Nsypm+UsbSOFYEXrSKtPerGc6MlQBCv9r9qDUcfMKv0vhWrT 63OYB83DJPMKfP9lFIKYVYOXroXZe7ScB0fbbVDlKmd2+qmTg0fhn8QoPTlJ z888otMcvbdTgsXccr+OueXGg//LO8DiK3GheUgML1fz0X/g2LYmJO+5ibSD t5EdfQ+FCW0oO/4QVSmPcD7tMa5kPEFd1hOsnFODdVH/jSPx7Thd1I6KK+24 cv1XPKh4joeVz/Go6gUenXmOxwwNnlQ/x58p2md4xHhw5hnun3kKZys9nK2N cGa96mxL8arCdRXipWiVDtRm+RadlsJVp7lrxOuh+I3fye9aGGAZb4XLlUYV BKiapQvWRcKkC8Nw7TJ87jYPh42ncEK3E12p0UEfzITLBzPg/R8z4fPhdJgZ Hs4GDGZCcmFC8vpQBx8u+EDG6I+98EVXb0zs7o0pvbwxvZ8es62M+I7f/nzy ZpFzAJYQxUGsakL0Y7HC9DnCfCcgPHAiIkZMRuToqYgc9w1WjZ+B1V/OwupJ c7Dm67lYM3Ue1kz/HmtnLqBhWYSobxcjau4SRH2/FFHzlyFqQRCiFjIWBWHt 4iDZjkicOR3wWX8M7mGFIb0HoQ9FaNPjW9h2mw27rjMw9ONvKNzJcProS7h8 9DncPmEZ/8kweHT1heenBniRM/pu3jCI4M9j6uENY09vWVqLY0h0BAPlYSRx xGCBbhOWmPZj2bBoBI1LQPBXSQiekozgGSlYMeckIuedwtqFqdiwJBWbg9Kw LSQNu8LSsWdlOvZFpiF0xWtsSWjHycp2nG2mD77fjpt1NYhZn4bYDamI3cjq cxM97hbGVsZ2SnTHKTnDK2ZXCqV5Akf3iEjG0b1JOEK5HqZcD+w4gp2bd8r7 TeK+tp9449pPbFvzVfqC/qfS/lf3tv1v5yav1l2p1E+oVBb6Az7upjRLUlOq UKp1T5FKp2O02zLMHLUKS6b9gCCm0mVLlsPkLRRqlgnVTIX6qKERIy81Uqb/ R46qeytRZVyd7/8yzNuHMj2kaDRT7dMcHZSL+OXlSBDDL9ZdJcUacXzPDZw6 yOr06B3kx99DyfH7qExpw7nUB7h0+iFqsx6hPvcx1mxrx7HMduSda8c50vFu 2VPcL3+KtsqnlCeD8nvE0FCQT/kaPap+wq89QduZx7hX9RhOA70pT4OUphPX thOlKTrBuNgzAdgLeZrhLmVplB1kZRN5vTrfXJ1xLgSqWF3hMcaqs86V+eZS tvLjkeqs8xHQaldQp6vgrQvntQpGVOAlfPTBPPT7YA0c/30HvLvugX+vnRjZ fx3GWC3GsL7T0TTiW0wdoMd0YmSmrS/mDA3Ad04jsMB9NBbpxmGx/gssNX2F IN/JCA6cipAR0xA6eiaWj5uNFV/MRdiX8xA+aT7CpyzEym8WI2LGUkTODJJ9 Q1fNDcXqeSuwen4Y7QljUTjWLF6JtUsjsHbZSkQFhSMqmBEShrWh/P1Q/tnQ 5VgVGoqVocHw8fKGXV8rDOg2EIN6DYJdHxv06mHAwEHBsLIKgnX/ZRjcZzFr q4UY2uN7OHSfC6fPZsPl0+lw+3QKtJ9NhK7beHh2GwPv7sNZ/vpRnwaYGGZ6 AZ/erOl667nc6NZ7dnh3cfxkoW4XFvsdwdJR8Vj2xXEsm5SEZdOo1lknEDb3 BFbNT8HaRSexfulJbA45hW2ssXaEncKShVkIXvUztiW341Q1lXqjHc1t7Tgc dRJH1p3E0fWMDScRvYmxhbGNytyewqRJZe46gSM0uoep0C44tCeJBv7g7uPY tzMOu7YdtNxYgnJn6Q9yu1nnpp7yWWfpviZ2nlKz//pOT0ZrFvxCsdafCsV2 V7scBna0NxvUcwLMNvMx0ScM876KwtLvqFTmUw3X6CjaEUs3c6FZs8ghYrDk e+qE2pHKeEnzSL6gPiM0Uqnvd4yl9VW1KmZfH+6s049waFEGYoOo05XnlKbB W+pxfFczTh64gYyjrciNu4OiY3dRceIezqbex8XTbajJeoC6nAdozH+I5sJH OFjSjlslj3C77LHs8nWv4jHuVz5GG7X4QMSZxxo+PGLib+Pj/TMPcbfqAW5X PqBU9XCi/XWyoVRlfxZmUspUStXBpKFWjXy5jV6j3v78YjSvoNVblXYeBx6g ClUR6ci348DHyKpAVARa5tPRY95Qn/PxyQcHYf3vp+H6WTFM/Ssw3KYU4xyy McE5DuOdIvHrviR8b5yI732+xvd+32B+4AwsHDkbi8bMxZLPv8fSLxZg2cTF CJq8FMFTgxAyLQShM5dj+awwrPg2nAt2JcLnRSBcHIBbuAoRi1chcglj6Sqs WsYIikRkMCMkEhGhkQhnhIVGYPnyCAQvX4mloeFYxJgfHIa5y8Iwk+z+ekEo xs4JwSDmzcH9rNG3uxWsetnApq8tevUxYoBLCAY4hmKA/XIMGLIcVrZhGDR4 BWytQzHEKhj2A5bBqf8iuPSZD7fe30HbazZ0PabDs+dUePecCH2v8TD2HgNT 72Esplkx8d/068uc08+AABH9Regx320PFDvWA0uZTpdOT0bInGSEzUtG5IJk RC0+gQ1BJ7Ap5AS2rjiBRQursGzdf2H7yXaknqdAb7bj+oN/YH9UMg78kIyD 60/g0EbG5mQc2sLYxtjBr+9MwsFdSTiwOwn7Kc19e8Rzsnzeu+sYdm4/SoHK N6u7yHeru3TcXBLbTJQ9Jp/IhrtKA15fGZZOiVKkOkWkg4RIP2Va7dodAz7p 1tF/cEBPf7j0molR7kGY8f8Yew+4qq50/f/5oElmcqdk2r2TMplMYoklxkrv 5VClqDEaOx0VBAEpoiDdAkqxIYo0KaI0pYNSxBK7oh5BFLspRlPmzi1z/T9r 7X0Azb2/z9/P5zkbjng47rO+633fvdd63jlJCPfdiDVhGxEWFi17R8sWjRyg 9kPNX/Vk99c3ZO9XR7X3q6Pa91Xp+Sr2Nzk6ilJD1zfagTmvxt5eZbReHv6E gjUdKF5/BgeSL7E6uIay7Js4lNOH2rzbaCi6g7bSAXRW3MOpqvs4W/sAF+se 4ErDQ1xrfgRt6yP0HXuM/uOPcafjMQY6n5BRYdZ+v/sJP7cHBPGh0KnH8usH Jx8Rzke41/0QAycfwGC8NQw/sYPhpxoYSBMlaroKqb49pXm5gbZ6EhRKlcYs 4o+TvaBVwVJW6yqiasWuJ/OLTwebaYsMw332D0R0D97/fRcmv38T5uMewHHa E8w2foT5lrew2OZLLLKpwIvzAwj+IoxFSASCF0cjZFkMQr3WI8w3Fmv8idDy eESuTEBUUAKigxOxNiQRMaFJiAmjwpOwdg2PEUmIjkxCVFQSIqg10UkI5TGE CuTzy4mrD9FdEpKAuXwta31beffJWkqshRfrAG1mWMISttPNKTPKBDbTWJeO nYCPPmBNSkQnjJmKiZTJmBkwGmdOWcB4nBUmmMbiE5M4TDKKw2RDSn8Dps6I x4xpG3jKY2E0OQYmk6Jg9skaWIxfDatxQbAZuxy2Y3yhGeMF+7GL4fjxPDh9 zNM8zhUu4zi2x2ngOt4OwRa58lSHeZQifF45wr2Iqj9RXUlUg4lq6EGkrDmI TVEVSFt7ECFhl7Em/b+RXUtML7BAHXgB7aP/ws6UcuzeSOQ2E8E0aiuVQWVS 2XyemO7acXAEdjKQvoEdfNxOajOyioZfrJa3kkbIi9UjFEStFY2QVmT/Nsyh UEFUt4RTZ2Y66X01hhJRM1Ys4//myEx3IeynrMYixzgELU5FGGPnGn6kNqKD qsCT8cNO9lEX3ZlHSkTtNarsZyuNVH+pNFF19JBoOgxry+wg2jI7irbMjtg/ nM1PsTe4BQXRp1GccBElm3tQknkDB3fdRNW+PtQV9KO55DaOH7yDE4cHcLrm Ls4duYeL9fdxpek+rrU8gLbtAXqPPcSt9oe43fkQd7rI3YmHuCtEBgWH904K PcBdoe77uHPyHvpP3UXfqQHoj7eB/iQ76DOA6pNN/WnkcwaDqZSG+aiH9E22 U7sliD6yuiiqa6zhqGtyb68+p7S5H6vm/B4qle5ysnJU29y/81YD3v/zXSaB /4D51P+Bo8kLzLJ+gfkO/4FFzk+o03jx9AWC/WIR7B+H4IANCF4Rj5BAalUC QoITECy0OhFBVCCJXEEFUL6rk+AZkoTFq5Iwf2WybGsvljm68Y26C8k36s7P bAQpFCTayaOe5JLFoYEtbEimImvYkk5bfZI5w4ISdJpSxtAfNR1jx1pgymQW DHwNk/FmMB1roFA53oqyhgmLCdOJNjBnvW8xyRaTrTdgilU8plnEY7p5Aqab JkDfOAGGRgly+bTpjFiYT4uB5ZQoWH+6BjafrIbdhCDYj18Oh3E+cBq/DM7j F8FlwjzMnDBLfgQhziVYPbscofOpxYLQMtamZYhdUYb4sINIIp0bow8iKEyL sMx/IrueZF4mmXdf4PrDfyArpQzZGxkIN5djR1o5a8qD2EEyd5DM7VkHkU06 RyBrh8Ayk48Z20l6ZsngvWkFSzcJpDCTUi5Luw5KLPVSjET/TUI6iKjE1OFn RqKf/JUR9P2/yf3t4/82E8YfMXKaR8GHkTPUj1EzNBWBwaFKP1IrFVEbsXRB NFD/pWx0LLqSCtnLvqQ8OghxEMsGxyJ0ijbHI2TLdI1scuyIfIXNBrXzbd7q bhSuv4CilB4c2HoDB7ZrUbHnJmr296KhuA+tZbfQcagf3VW3cab2Ds7VDeBi w11cab6La633cKPtHm4ev4e+9nu41Xkf/dTtLurEPWFeycc/8fEuv7+L/pMD uHXqDpm8A+3p27h2+hZmcMjMYNycMYWaSk3TQH+6nXQrFUbGNlYeg//1wdgp uRR0jla6x9vPHswgnIZ1j3dyHJ5JDE1TIot4560OvPuXv7NOewETwxewt3oB d8cXmOv6Al94/BPz3G/i/j9ewJM56pKAOCxigPwiIB6fByRgtn8CXH0SYbc0 UXaTd5A7sWbJO0PONuK9uYiLWDPlpT1XsZKRKbibvLTnZi9u71rOII8GZFBf dDm0NhCuPzak0lZKXKARG0Xegh15tNO3gN0MJVLqj5qBTz7Qx7QxxkxOzcid OUw/NnyFQ1tGQFuYfyI8DoTRgdVkDabCmifYejInQU0i9O0SYWCTCEOrJBhZ JMHELAmmpolyeaWVYSzfVwx/XxQ0U8Ng/2kIHCYFwvETf8nhSqsDCHI5hFWz DyN4fgVCWHmGebEC9SvHuuVl2BRUw6S+mPPUHYTu/B9kN7HSvPoCJ++9wNX7 P6AwoRjbNpZjGzncxgiZQQ63baPI4jZyuJXJbLqQ4I/awq9TM3QcuikXnkcM LhMRGI5Q5mNXGzcl035t0JLPTWe2ZS13O1k78KQON+2c+NePMP6vGkz6YCEc poRgoVMsVjA2hgSlIpQViCUjg5Wl2hTYWjYG1pNdgUfIzp52GkV6kr5fMPYx iDgIuSvioLNzcJUNxq01jgUKeo2qH2de5FkUJFxB0ebrKM66gdLdWhzep8WR Qi0aS26i7WAvOg7fQnf1LZw+0o9z9bdxsfE2LjffwdXWO7jWNgDt8QHcbB9A b8eAHvo6B/iyfV0k7ISi3u7b6D3ZD+2pftwgbT2n+3DldC8unb6J6Zywp39q h+lTKJI3dSonb/NhndUV8vQkeiNeaq4u0vZZSkIwYjBnF4mBnkgJ9CRs78n2 6rqZR2QF7/z1vzDm0xeYwShoZfcCTjNfwGPWC8yeI76+pNzCkfsidL3WXWFj 5qbsh7BQOyVb/hw3F2XNsAKcsjpTACfu9LjZy7WJs4VNrIx/dpI2sdTCSixk NNDoyRWN/8pHO9gyJIrdWrZyE4eVih9Dob4pZowW6BnI5QeG482JmoW01BHY GRM7E2JnyhrATNiLTFKMBSwn8+WtprBCt2bWMQk2fLSZyt8zRZGRcyKMnZJg 7EAENUTQNglm1kmwsEyCJcOmtekG2Bivh51htBzXDtNC4WdbhhUzq7FyTg0C 51cjaEkVQrwOY71/M8L9ihG1vJQ19FmkpGqR3fIClT0vcOL+CzRUX0RZWjHK U2qwNb4UWxNLkZ5Uii0ppdicWoZUhsaETTxmVSBFiHVlfHrJkC/mCHXBh3JL WVxCdhf3k/kob6PZuA+Z3vEob6mJtVqqP6bbcOe7n/ljKu53k94fA1OW2LPN IhkFmfX4pjDzSRlsr2vBz15psTsLVhyT1hyRosuujZ2AUiOh5Fi0JYRCSq9d 0ZibQ8h+JmzsXVA0nMA/YfeKLuTFXEJ+ynUUMPgVMfiV7dGicj8pLCKFpVq0 VdxER2Uvumt6SWEfztbfwvnGW7jYfAtXWvrR09aPa8f6cf04EWvv56+90dGP P+NG5y3cOHEL17v7cO1kH3pko5+bRE+L89TZ0zdw+tR1TCWGUz+1xdTJHECm bjA3c1MwtBjWj9xa6UcuSLRTOFRakr/B7FwJ/4o8ZPi359SjkeH/nXdG6+Hd d0ZzWnj3nVHM3ywxd3Ih8hachzbrPv7Z9g2sSKHG4wWsXX+CBQtVC3k/Ztg2 ZBO1X7m523AK9WTv4dcI4SxlNcSwhftyjSHfm7zXKkIfARTSIWilL1Y6Eb4R coXin+Fqwv8fMbRVIbSTsqYIoIGFBDDJ9hgmfmAo1/4IAE0nWsJsnOkgfCYS Po0C36f2zC3tyZ4DrKY6CP4c+H6spzmw2HSALTm0Y55hJ1ikhrZJvi9XdJu6 JsPMhSKb5mTTgmxakk3xx8YyAbZmsdCYxMDX4wj859XBf9FRBHgeQZjfaQT6 lCE0QFzfqcTGyCpkcTgVcBjlbapCUfphHGCY27e1GLV7mrB1E8MdC8X0LeV6 SGNO+ha28HHTFoFjKVZwZKxg6RIg1maMtYH/GFv4UN6jbeE5yhZLeFxEzedz 8kreWFud/6TwiRpEUHgii3WSfxii0FbnP6n4lY17bwLGvzcO4zlS9nNsXMr+ FisXJiGYdUVwaBxM+Nmb8rMXTWstRNNaK4GXpY2wqbKy5RgVshPPWWs8OCis NQwh9kJuqmbigIJek9oNKCfkDPbFXcX+jTeQLyyydxK9XKKXT/QOEL0yLVor tGiv1KKrRouTR27iTN1NnGvsxYWmXlxsYRRrJVJtvfy1V4/3Mpe92tGLq103 cfXETVzuJmontbh4iridErhJm2x0n7qBru5raO+6iKa2kzBh+m1qMlOiZ2bG icZcTDRqL2+iZ20joz6UsP/6S2FfBH0R8t99l5S9994YDp+/iEfqr++OwQdC PKNig++Ut2fA+J3ZmDfFE4GaAETMXY4XA/14dmEfzGfYkDw72W5TWUzprPT0 NZ1J8lyHmn5bqj19KQcW64MLkWzVNc8jBhdnucpVD4K/kXKloOUMhTorEfCs yNxodcmhPVxM+eOmn8GNEgza6Rg0ZBA0ZBA0tGBuaooU+w7yZ6TyZyGNec3G ixyU7E2wY/DTkD97mJM9i8kO+Nzsc8w3pyzmwmqaI+FzJHzUdEfYCghZhNtN 5++bJiC0lXmynrKZgAzKTFmpvWfC0oX8OSbByiGRwyyBn0cCPBc0wGtZAwKW X4GX5yGs8K9CREgt4qOPYPOGoyz3jmJX2hHkZtQgL7sSe7LKUFHyJVLSa5C8 rQZJ26qRlFEtj4lbqxFLDiOcFyPKeSGinRZQ87HWcR5i7OdSc7CO88I6DvF1 DG7rWOTFWCqLjteaOyDaVINoYztEGSkgrplui/CpNgj91AYh1KpJ1lj5iRWW 85T5ctrynGgBs48mYfxfJmLie0LjoHk3HDM/4KC4/gIvfvjnYK9ogZ6JBfHj mDQjeuYMuBYMtm9zYL3zzhiOvTF4j/qLOL49Gu8K/XkUShXcmuXhA+wKPYfc +OvSKjIvk1PSLuK2l/lmgRa1xK2BuLUQt2PErZO4nThC5Oq0ONOgxZeNWpxr JkatWlxoo45THVQXnztBdfPvidoZYnbqlOI53XlSuMveQFvXFTQcO6OnUm9s 6AIT/s9MGFBEF2xziyHaLK1JHKcU6+GhXSPkQbhGS8AEXn+lPqD08Dc+vo0P +ShsO0UDF9HOadrbLJjen4dlBt4Ic1qO6PnUMk8yYAXz6ZYwH0TNcQg13X4g uRfoFdRkRScaaI8QqCmriux0q4reUHizV2TBws5SX8ea6GQtMHsXzqZzCdrn cCUU7jzaGtpTHPxGdipo1vzekoWXKVKdupAZcVMFzZKgWcOMhZ7JRDtKQ9Ds YfapA8wnOxKy+ZhnMR/zZeeuefjCep6YhKeLlskSNFV201XYptvpylK5uELJ kWermiUvF7mJvUxunNZMYDkrEVYelFsCrFwop3gsXX4DCxZWYYnvEawIqUNE VD3i4hqQktKA9LR6ZGYcRXY2k8zMg8g/fB0x6fVYu7Ue0UL8OmxpJMKXRmAN FbE0HFFLwhC9NBTRS0IRsyQE65YEY93iVYhdHITYRSsRt2gFNiwMQPwCpf5M +MIHifO9kDRvGZI+XyKfS/5sAZLnfIGU2Z8j2WMOkt1mIdnVHUkuM5Hk5IxE B7Fy0Q7OEz/FJ+9Pp6bA5eMyzJmUxxl5M2ZP8oUyRH8BQxNnGJnNJFyjRPpE 0MYooFF/eWeMHt4XD3/ld6/Jmd2CeYo5q3Vh/mTOoqFYAa9FHt7HjjUXkJOg Re4WLfZmKRbOpSzyDjHOVRer1s3SYkuL41VadNQy3h1lnKongE2MWS0Ei9Cd IXRnCN3pTkJG8E4Kg3eC10kJ3+Zj3Ypna2PHVdS2nn1N9bU15uA25v9GieAv t53Xk43n35QRXAAm4NJB9r4KmUBMAGYlLItFa6Q/ie4nsg/K9Lcd4DZ6IfzN fBHtthwxC/0Rs2yRvJhoPcMaH/3xI54Q+6F9PYNt6gVnSpt62YnaUiQO9tYi m3VUVxk4kTMnu6EVfOrmALkO3kJfMKaRq/30RH9qPdnVchScTOcRsvmEbL7s Y28jIDNSIBNv2tbIms9ZQFvSj00zu5EZ1Y+pY8yGQWYxGMlMJzkQMkcJmeiJ Nc9qIbUA820W4AubL/gfdKacYCNFyKQcYDfDHpoZzGSn2w7bafOaBMxVlQDN zUGkFIKyd/joji8WJJGqFCxemIxllPeKWixz2wKvOduwcn4mvEJa4BfRhpXR bVi3qREb0huwYesRpJdrsTy5AUEB67HKPxbBAbFYvTwOoVT4ig1YsyIeESvj EbUyXg/RgfH4K2L4uC4oQSo2KF65+xoYhw2BsYgPXK9AtnItEldGI2llFJJW RCiQLQ9DckAoUgJCkOK/Cql+gUj1XYFUnwCkevkh1dMbqZxnXQ2NMekDE0z6 mxHcp13GPKMzWGjWgAVm2SpkbyjN+UQDYVWmxjYwM7KRzfn05Jrn1xUrZkNl TpcyELIeIe2URrxkp6Re02yVh/ewbc057CRzu8ncHga7PNUTuVz1Q65lPl5H 5hrJXEs1SzwGu+PkrZ2BrrNZsUvvPEYO28kjmesgc8fJXBv5aqYa+HU9nzvS 3oOKpi9/qVq9iVnDyNwVxpZifaSplRtnk/feHaWyNXooN1S5spRMDTYTUYao uEAv3Pdfh9Hbbvh84hKssiZXs5dzYvTjxDhXcZb4DUb/cRRGUR/94SMVL7XR u2gDbfZKo3cRypgxMpTpSb5GKGt4htbHiuskAi++1gw7WQdaqs3fBb5y+yxr QsGZi9kXJGwBrAVhRmKbtEZSJt66mBasGcZ6y+5is9spZK69S8LMSZgVQxc/ YiY/IoSZMIQJwkwlYU6Ya7UI86wpm0WYb0vZLcQXmgUilJGzXyqU6TuxDiRl fF92fH92fJ9ya58aekdKtsbKhbyCsKWLk+C5NAWey1LgzWMAtXJJMlYtTsbq RckImrUJaz5LQ8ycbKTP3YXcpXtQ6J+LdO/tSPfKwuYl6UgOrsIcr/WY6xOL eb5xWOgXhyUBG+BJqnyIkT/xWbEqAYHiHk1IAlavTkBYaCIiwhIRRa0NT0TM miSsp2Ip3c2k+AhlcUMSpTz3eyRHJFDxyuIjKjViA1LXxCE1fD1Sw2KoaKSG RsLVwgaTPrTCpI/M4WH6E2ekb7DYvheL7BtF/5qRsr/da5Ioc1W6dpd6Ikfi OTVUutuJS182ijPRSMWViEhZK85E6h28Y6pZaFbidexI02JnNokiTflMHQ8w dSwXnsFlimfwEUavekavRkavJqaNzYxeLYxeLYxeLaSpmTQ1UvUk6ihV066Y hR5qvfpbdVowHey/o7ToMx/Wf0dBZeSwxhqyuYbiQ/869N82gPW7c7B0qifC 7AOw/vPliF3mrSesHRRbh99hzL+Owpg/jcJoImM+bMWu7Jqu7gLXNVLWWIt7 Da+uexOsCGL+RUYksZTGfDrPsUTGXrl0IteiO6nYOEl0RH8UJ55FK+JibSQc fOwlNjbGAhlr3Cx7gL6DD7F51ilkrBON5h/B4BVkdLiYEhezKUTGegk+t1mC ebZLiMtizLdfzF8zw0VPtnN8XeJio8OFkdKOWelMe2X7p5r46eKRWELrvSwZ vl4pevDzSmHit4KPwVSYZwoi+FfCbmYt4VlHqEImByBxcgRKTWPRNTsRl/2S cGh1DjK9MxDNSi2KlVqkJglh1gnS/lZaYr9ifWswh8nkgkQ4LkuEq3cSZvsn Yd4KhsDAJCxZlcRwp9zgFDc6V4YnYVUEf2+kstwgPDoJEVT0WsIVk4j1YjXQ ugRsoOLXxSORSlq3Acnr4qhYar20VZs0yhaTRlvB3fYFPnd6gZucBAz++rHw IuUQe12JQTpihnq/ibRHuAzY8NHW0FY2g5SOP3rS8OcNeavGbrhIkK3QNEvd QrJ29XpjBhHKJELbc4gRk8D9hVoUlzAhZBQ/yGB0mMGoighVs/KqJUK1RKiW AalW+OwSo0qqgirn96XN17H/6AUo7PxKsqM0nRhqPKFrSqNrX/cyNxx9byo2 CvzK4B1rOH8wH77GPoieSXYWLkec11Jlt7bOYOEPpMkaY/9tFMb+SUFJt/Zn sBc5o46NLupYK1Fn+KI8sSjNabCAcpYJnRnLZXPmTCJZ1JObOUbIXucKRuLG jSXxeZv4MAIZOUpzDmsVIWuxNcrQCr0Hn+DWoa+w5bPTyIj9CkcLvoa+RMiW CFmphdMQQqZTnGE+zRmf2y3DPM1S4rMU8yiRXbhwMFgbuIgGiEqfdCJsZyCi jp2esttLSUT9PJOw3DsFy31S+R5X+KQwBw3hYxifi6RivJKx3jMZGwhQAgFK WpKENZNXYuvkSNRYxOHs3ETcWJ4EbWQcEt0YEWYmId45CRsIUJyG/9aGP28W 94oBpPugAeTgfRB5L2SWci9EvR+iOh8N83/8I9z46OxD2Pg75wUlYmFwIpaF JsA7PAH+jDjLI+MRGLUBq6KVpXR2tvaYOMYWE0dbwoXAfPrXGfhiois8J1jC ++MZQ70Sh3ixVDucWMuZzVb2ShSPdoa6C0oi29EY2IyUUzK/1FdcduyYyamr oztVz9wtmYrZZBZB2cVYk8tYs5+gFDDWFDHWHKjRooSZWwlhKSEsxVQRM7gC YThZf/13alamcKGwofgp/5ITvzWsTF7lwlbtxqJ0ZBkhHQxGw/BdZ3w2bjEC Lf2xfjbr0aUBiPNeKDuyCFMDsdnSUdgZUOPeHoVxpONjQQiDjbluS4i5ko/J hSZW6kKTYYvBHIYvBtMoi6vF0ZRkmEkyWI1Qgg0zGVBEC/A/K1cLDXUdCBxV cwxhkqGRbuQ3D36DvkPfor/yW6TNO4OMuKc4UvQUl1ueyo1VZsIAZKK9SoYT TFQyzKYKOhhLLKbP5ARjOWMmsaBEA0DiYTUIB8Vfb8tUUFw6FEtJXHRbNfhf WOEtUp5A31SexiDfFKyiwqhIKoagxBKSeCqRoKQQlI0EZTMhiZ4chN2To9Fk swFX5yeib2US+qPXY7NHIja5JWEjQUl14b9xpOwJljWhMY9XblHoINHZJKou qU7qBVMBibxXIVc66czBRsjr/u8opZnOIlX1THP7P9yXxn1kj3GjNZhARMaP scTo941hN24pZk34HAsnuhATc4GJjCkv9xK11ZOh/00Jh50qkcZoDJWj0j9Q NM9QJ197I9Y9Yu7lo4EV7PUtYT/DUrdFr1v1ZUzedQMbSUs6w0oGw0o2M7Md FRRDy45Khp0q6cv4B7URt9lgRxLZb0BPYvFLgsH3aGIr36Kt7F4mmpEoDUmk db+JRrUL+AUcTTUwe282Fk7xRKg9I8Y8AuLtjw1en8HZlP9PsbNxpNyU7Khy Mv7PH+lJUH6NsX8epazs5uRmyc/NynIIEbkeS7fm46X1WI7SzlLBw47BQyN7 25vOULYTmREM2f2WaJgLJ00LI0mKbPblqGyjNbLDtXLR0PQp+iqf4Xb1c6Qt IB0bvkftge9xqU1sDLaV1wRMJtizWnGAiUqHiaTDBWbTGPcIhwXRsNCfyRBF PqbxUaHDSpKh0GEj6bCXF9XF6s6AZbEI5DS8ilwE+wmlIIRaQ0VT60lHPJVE QlK8k7GJdGwhHemkY9sS4QkVjPwpa9Fhv4E5TBLucBq/u24tMuYkUknYNjsJ W2fx592TkebKf+tMqkhJqlUCbM09VJMyD+XapkqHuO6i3E6YI69xusi9aTOl j4q4O/aSp6ByjVCGEz1JyZ+HOZQN58R50KXs41EajCMnH7xtjPEf+sNwjA/s xy3B7AlzyYoTvCaYwmfsjOGMDI4/peWFkR2HvpGdyENsR8iM5ZfDnGRUVxkj xVXGwVDIUmKi7je/qwaV4e76r/bYkINe6bEhHfZ1HXjsBxts2OvJLfi/hOFf TKFhtuRl6IvImYHYsCiIn5mfsldQ7BE0F627xNbetyQCTqaKd8b4dz6iGCSo sf/2oXqzV+nNbGWhrLmwUVcKq8ul9cRSYWW10+tyFaLJNDuYTLdXRr2+kKOe GPJ6csx7sLLhyDemmCpZMCBYcMhf5nC/VvEM2sPP0Vf1PW7X/oC0xUyV4n9E belPuHj8Jzw5/5NcxGc8wWHYkHeGCYOBKYe8aPpoxiFvziFvri+HvRz1FgYz ldawHPPWHPPW/P02Ro7y8psNJ7EVnrEI9mX+zrG+2j8VoVQYFeGfgmVOzDQ5 5hM53lOoTRzzWzjmt7L2yGDtkcUxv36yL+KnhKJcfz1Ou8TjtlcS7rEe2MnI sEMqCdup7HnJyJqbjMzPkpExm3JPwTamU2l28T8b8w7/y5gf9NywU4xIBj03 7JVxr6e4fIkB/8f/Xy5fYm4d/64vJnLAG4/xhuP4xZgz4TMsmegI3/FG8Bmj rw50O6Xx00gOcw47VfZGGj054b7GeVMjJ1zZGY5yMlH6xIk+kiIHEfOqkLBm cTSyhCMHv4OBhc66aEAefi0bzJi/BICuN53SXkIOfrW9hIajxl7tzeDAfyss 2YU3s7Op4sps9BdHuI1ZjOUWy7Fu1irELyMB/t6Yaa7sv5tprpGm83aiVjbn zGdmQ1nLbe4T3h3FE0MK3v6INfnfZDNi3ZIHPbH2SE8u+fsXBQFbRSIIiLVH Dpx2jImAMREwkQvsHWEiawYTA1ElmBICUyPR/pzBgDO+GQvu86XMeQ4+w7VD 3+Nm5Q+4VfMj7hz5iVPqSWQk/AM1Zf/AxY7/wONL/+CMbw3j8fYw/oSvO2lo 1jcRCEwTGIh1ngKCDxQMDIYQsDQkBkYKAtai2CcCK5ZEI8Q3EaEc5mH+KXLo h/MYwaMY/j7UcirIaQW2MCSks5rI8N6ILK+N2O65CTuXpSJuagA2T2PVYLIB F+ek4P6KVDxcn6yHPYuTWVbuYVWeQ+1mRbtzYTJ2LKDmJ2P73BRsJwnZronY 5hAnrSk1wppSXAoUBFgrN5BfJcBFo1vDMVK9vDbodCchwL8qyZH05OHE//8w 0Bo/ZvTgXDv+PV988pE/TMd6w5kszJswB8smOsCfLHiPMiACGqW3EcsCI2X0 6UagvdL97Ldy+h3qfDbU/UzxLNJZoKhGRSaWcDISsiAN5sgZTsObfFvmKgk6 a/WX2yvYKvbqerK3wghpT+5oonRW0JPm5L+QIIht48Z/nYXPJ3kjWBPIFCgY 8T4ChiVKb4Xfw9XCXvZXUHa5MTpY2PKf6XiwkvtTJ7z7kXRD+9kSIN3qQyux yIk8/FpZAaRbjUcajEiDEdMgsR/MiGmQkb6QE4zIg7GQoaihTYzEPRITntjT JU9xvuwZLlc8x7XK76Gt/hG3av+OO0f/jnSvTmQk/ieqD/43LnT9Nx5f+S/8 dPkbGH3M1+dnJagw/tQZxgwMxiTCeJoSGGS/T13PT0mF2vdTykleAJO1O4kI ZkAI80sWFOhhTUAK/oBIwrCEAHg7L4e/00oEOgUihNrquxmZPluw3TsdO73S sJvK8U5DwoxgZDMeNFono2fhFjxcnYYnSRtxcbsw3Mnz2sSzvs8zFXsZQ3KX pWDPEmpxCnYvTEEOydg9l/HDIx5ZTrEvLamQV/vUK37OisfLCInEm+rSCsWo daZ65WymtJPzkN430krOUVghEYW3VBicBw2qJo4dq4IwlHiMf98fk0YFwPJj H7gSiAUTP4M3T/Ly8YZ6sr/PCKWvhyo9OQZfk6PQSfb4cBDtvjiEHGSy4aAn zUXeHLQWcRL2IqZD9iLO/L1OxioQhua7FR7uyMNvOVGavdJuQOHBUvKgeand iL2xo2rjrbQbkC7ezIvEJm1hCSwkdrYu0fdHuAuBWLSaQAQSDHF/WvQaeEfd s6JsLXOVW8s0KhlCfLdmVphAMsa/+yE+fvtvP1+hY6mu0FEXx4n1AmKNjp26 Qsdgmi0Mp2sUp+R3YEAihv8xYlreVfQNTjM2nC9/jsuMDdeqfoCWseHWkb/j dt3fkebbgoyk/0ZlxT9xvvufeNjzP/ip5xm+OvbvMBIxYuLPaCBoDBCvqQ1w FZmLbpeGYmOsuFEzSQIhGgeGeK5DqFcc1vgny2woMiCV2oSYgI3wJAV+TkFY 4bQKwU7B2Oa7lSRsIwkZ2OWVSQoykeubib1UkmEE9hgn4ZhjGnq9MvAkKhNf b07Hld1tKPRNR6HfVhT4piGfJO332Yx93puw14t0kIy9jCB7GTP2zEvA7tlx yHaOIRGzdbeLSMMc6aWiGMpId0WC8Hs+KhgMSTjLqCj8LzZQLsNsoMaPHaOM sqGiU0y+499fjqmjlsPmY1/MGr8EiyfOgZ/oozHOWHKgJ4fdSGUmNh2UnIxl yyv8Rva8kk47Zg6DjjsuAgfzYW47ZjocLCkLIvEqCrrQoBiQ2gxa8FvJi/b2 qv2+0nVD54ytdN2QHgWE4BcqBi4w+oBR6aMl8DVbiehZxGDZaiQsX6EHNysn acbvJL9ys3KUmzCZd8udXDPFNhHSMNPCRqWBb9bUAuNIw/97Bc2sl1fQkAb9 qbbQl/sq7OXQ12eQEH9mMFDoGwg5oGnfI/lcV/G3ROIZzh0kEoe/R081kaj9 CX1Hf8Jt1co9I/l/cPjwC5w79T94eJ1I3PgeT47/O76ijFg9GH3iJLEwYtpk pAYJY1JhQiZE91dTBgnRct7MQDBhTibGyctYwUujEea1HuHeGxgRkhHFqBBF HqIDtiCW8iYHAU6hjA5h2OqXhSzfbOzw2Y5d3juQ47sTe/12Yp//TlzceQIp prEotNiMEx5ZuLNiB76O24lvt2Xg2t4uqhMHArJQHJCJ4uWZKArIQIH/VuT7 pWHHvJWMH6nYz8ojb3Ei9s3fgD1z1iN7ZpRcpTCbbDuo/kLDVykobktvygp/ 0GlJ57Y0zBpNOLi4OLoqhksjVcMlR0z4eJyYfPXkzPtrCYVs9cJBJzThg5XQ H70C9h/74TOisZRoBEywR+A4k8EBqCeHoOgAqesDoRuMrEEtnGQDKCnx9Sse NxITUbuKuZd4uDArcTYVeJizsDDbpeBxW90Pb2po+n/63Q/vUKHDw14xjpfv SOdALdBwUdtSGP/NDbMmeGOl7SrEfh6GBB8issJ/hHS6/yMfFS9e6cer2+xo pe5HlpjYsNywkog4mYq2cqYvLZ/TrVxV170oC1ft5bIXKzsPTJtig+lT7TB9 mj2mTXOQFEyb7oBpTKemMq06sucBGvMeK3QcIB1Mnc6xlr5U+Vyhg4VEX92P 6G9gUdH0E7aRjgrScfb0CzzQvsCPN3/CY1Fft/+EryhDTmmGLCwMGTQMp7jA kIQo/ZH5lme4sJghKSohpmTDjApaHI4wzxis8YpFBOmIknRsQbR/GmI4cjf4 ZyDZPwub/baTjB3I9N2F7T67scsnBzl+e5Drvwd5AXtwafdpXM45g42WSSi3 zsCX83fhwepcfJuSi++2Z0O7/xS0+ac4bkoDd3EclgbuRMnKHShemc3cKYxa zSpjFfKZlxV4JSN/STzyFsRiz9y1cgWPRq6VE3HjDUmI7nbPcH8jZ1lLC0be lYRIj6NhfmT/l8fROGZQFsNbIame7RbSt1KDiW/74JMPgmA8OhBO5GTehCXw Yka14hN7BE0wk3w48//kpHqhO+u80DkqndWcRXRGclFtKiQjltKqQlpaiBXk Mos3F9UtZ2Zm8DOZwbvImdkcL0HyG5jLdMrypbc6vCGEzgpaNoQQVtCiIYRo 3SIIeWfQVFa3Sd/0w3n4YloAVjutxoaF4UjwF4x4KR7W1orDvLuN0hzifzev 1sidwcJXyEXAYm7B86G2E38dRqYuytoVudTUTa5eMROsmNuI9eQWtu6YPNka UybbYvIUOz1MnqpRbQ3KM/pwaMeAuo7BGW2FX6GTmJwq+w5ndZjUfI8bR35A b53oLPADMflBYlJe+QJnvnyBe73EpP/veNz+AzGhOoS+fwkVA6JiIFGZKVuJ yz7BxMRYxUTU/avF2kImVRIRP4HIZmob1hKPWP9snrQd2Oi3C2l+OUyo9iDb dy8R2UdE8pAbkIfzu8/h0p7zuJJ7Hj17z2OzbRqqHRhQlu7Fk8h8PE3bj+92 Z6Ov8Bz6is6it+hLHAzORblUDkpX7caBoJ0oCtqOopWZKFy+FUV+m1DonYTC ZXHYvzAGOZ9HDFp16MlQMvIVYx1hLaQRccZZ7jd+2QVMTzLy9kuU6CyGxn08 nsPM4hVCbFVCdN7pDpj09nJ8+rdgmI8JxMxx/vjiE6Ynkz5D4CQNVk00l37k TtLoWPAxUpq6yL4klnLO1pOT9m/+L1+XIb8ICzWFYfqizM/mrMlNdw7n5FeS k/+tBYPVYAsGpWmKRmFET3ZM+c1gB4ZB42UrVxh9aAWbUYuxzDgQEe7hTLXW kJEQxPrOl5y42/K9C7foXw3hIlCxEbHFYRguyiZ64fXuYsGYYmb2unoz0YBV jiF/o5AejMjl5xj/iTlK4upRGt+B0iTFIUb8Kcu8hcMEo4bxQ/xpJRgdBEMa gx96iguV3+FqzTNcP/ocN+ueo6/hOW43f4+tyf9EKcE4ffYF7t56gR9u/zse tT/H4w6qUxyf4VHnMzzo+A76nzJ7Ixz6UynGEKWJNkUojAycZcvc4EVhCF8W jQgZO+IJxiZCsZXKYuzYgTi/3UhijNjkt5f19j5WGfux0zufUBQQikKcz7mE S7mXcWXfZfTkXcFGu2Rss89CvWsurvFnvo0txrOsQtw6cBn9JUKXqIvUBRwM 3Y+K0DyUr96HUsaZAyE5KFq1E4WB2ShcQTj8N6LIJwGFhDZvcaR6U3T2oEOG ct17hIRD7sCXu7yc5L5D3Q5fJ0nFz818HFUzHz3JxO8GB5nipmonr4srjqpD HQU+fScQUz4MgdXHQfCY6I9Fk5bAf/IcrJpsRzIsRZan8095bbBNj+iqJdxT xFFPEvFbPqo86PxTLJRcZd68RMxnqbXg8wQsnBuPLcm1SEukEmqxJa4Wm9bV IHM4IG8TEJ1H85Cpuu49C3tyW5Nh9uTmwlBd1wXBdXgXBGl6bPwR49tYb/hZ BSPmM9LhQwWuIuPCpvnXfJSUSEjcbYfwGNyuJ/fOKhvYZ1qKKGKudoV7FwfW 18lxXppwGqWpFxUGGBwqyED1nvuoz3son2sv+Rrd5d+QgW9xoepbXK55imtH n+JG/XfobfwOt5q/Q3ryf6Gk6gVOnnuBgdsv8P3df8jx/pB61PGUp/lh51OM wYPOb3G34xvMmOSAGaKRvGghPd0ZM2aQB30GDQPyysAQuiQca5atZf60gUpE JKviSFYQUawY1nHsx3PsJ/vmYbNvPhkoRLZPEXb6FePMrisc/1dxMbeH4/8a evZfw/WC69jssBm7nHejdU4BeoNK8F1SGZ7vLsGdsuvUNT3cKe/hkLtTfhX9 ZZdxKLwQ5eEFKAvfjwOh+1AUmovC4F0oXEUMVqajaHkq40Qc40Q0cheHDRrF aCQCAoQ3JQhys7tmaLO7o8PP7HIUt5y3h9xySMCYMR8PxgVLuSRoqKOc4ius 8ytVLfqpyX8JxvTRq2E7fhVmT/LH0slLsHzKbIRMsSUJVtKpRIDgqrMpcR1m U6InHRBkpzlZ4C5emMDnli1O4hDzZFHlvSgRfgsTsXxBAlZ+kYA9G2uxN4Ui DftIw754fk0a9q6vRe7aWrXT+i+RzJ9LoTamkhb+fBp/fit/fivpSd9Ara+B 2ly4X1fKs1ZRfJStfxZerFV6ZIcfnX24+VBLAj3Jz1uDTsTCfdj4o88w59MA BNmHIe6LSCQERCAhaIVwPIe7nZvkyMPOVZqfC5o87FxGSJR+ATe56+7Vfa8s 7S0t4WBm+i9qKla09ghK1h8bvFBVuvkaSjN6lWzLCM2Fj3D8wBOcKP8KZw59 jfNVX+NSzTe4evQbXK//Fjcbv0Vf87c8N/+JItHm4/wL3L7zAs/u/wfut39L jKjOb3j8Bvc7v8b9jq+J0Fe43fEEtzofY9pkUQY5sgRyxPQZTvIiQeD8QIQv WUOE1mGNZwJzrFQilEntRBTzqPVEJ57opBCdLb7F2OZ9ACe29+D0rms4m3Md F/bewOU8LXrybxKfXmiLerHFOQN5rnnoXFCC2+EVeLblEL7fV46BCrGh727F TZ74uxVafn8Ddyqu43DEARyMPICyiCIcWFOAIrJUGEaOVjOcrMpiSElD0Ypk FvPrkO8Tptu6PltuXZ+t3EJ6deu6A/lR/Gzcla3r+JeX/WzUnetKjmIxuBZV B4+eDCC/GzLlJjgKQIof/dQPVkN/bBjsJwZj7qf+8Jy6BCunzcbqqTYIJEQu qoW+rt+Fq/D3cdUbZvXjvTQJvsuS+be+y5LwB/jz+xXUqiWJWE2SwhYlYA0p ivgiHgdIRgmpKCUVpaSilBSVkKISUlRCikoia3jGquQw25JWw9+Qnl5LIjPS arF9Sy12ba5FziYSp9K4j6+Tx9fJ4+vk8XX2raOi+bNrKhE9nLL3SJmZ6oJs o/Q4f8WtXNf4w17tI+A42EfATW4rF27lM4Ws3eWWcrNRi7DAIAihrhHYsDQK CStZ8QT6kCp3QZkesXITDbXtlN4CHnZq2LJzVsLW4P5WB2WPK2mbaWXDc81s zkIl7W3sj6jGgbVtKI3t5gk7j9JNPSjddhNl22/jcM6AtLUW5vPHDjxCV9kj nKp4jLOVT3Ch5itcPvIVeuq/wo3Gr3Gz6WtsSfoHCohb54UXuDXwAk8f/Cfu tn/ND+4e4TInal/xqydE7TEGqNudj9DX9RDaEw9wvfseeroHMGWaBlNn2CNk QQjClohtUnHM3JIR4bON2oFIVvPRPnlY75OPeEaohuyraM2+ho7t19G9S4sz OTdxbm8vLuX14Wr+LVwr7Ie2+DZultxGmttOFHsU4ZRnBe6vrcLzzBr8UHgI dw/fxr3D/bhfKXQLdyv7MHC4F7cPa3Hr0HWURZegJKoYRZGFKFyTh8LwPQpy IduIHUubwHiGrwjkeAa9vEV9+Db1ka861AhjGnfFneadIXcajaP8YCwEbUx6 hkKVZnBAvWStTcpsjWdyYA3Za0/7KAxG48LgPCkY86f4w2faEgRNn4XQaTZ6 ArUR0jDkddVQXnXv4dFvWSICvJL1sNw7GWOx3CsZgZ5JCKbCCF4EkYsicmuJ 3DoGs9gF8ThMTCoZiKqISVUSxSBUxSBUGVuLw0TlMFHJWpiHzPn7kP5ZDrIy iM42YkblbiVShK+A2BURu2JiV8LXKiV2ZXytMr5WKV+rhK9VytcqJb6lETVM HCoRORy9X6kG5NbDDMgd5M0F3VmyVQ3IJXrmnFxEh4ARCnlWiqGDYubwBoxG a2A71gte5qsROScS8UxHEoLCOObEXRvB3ltEzV3CJ+SuUWKdxE/KheiJ7eWi n72Kno3oaW/L32PF32mmJIuzOZxacSDmBErizzFZvILSdC3Ksm/h0O7bqN07 gIb8e2gtvo+O0gc4WfEQZyof4Vz1I1w88hhX6h6jp+ExbjQ9wc3mJ0gvf4Ea FktdvS9w5/gT3GknYu0KZgMdj4jcIx6FddgD9J+4j17ipu2+i+snB3D15G1c OdWHKyevYU9cNnLjc5GbUICc+BKUZh1HafYJ6gwOZl9AZfZlHMnuQVP2DRzL vonOnb04mXMLX+7tx4W827icfwc9hQO4XnwX2pJ76Cu7h/RZ+3BwTjnOBVTj 8Yaj+H7XUfxYUon7VffwoOouHlTfxf3qAdyrvoO71bdxp+oWblX1ordSyzm7 FMXRRC+qAIUR+1AQnoOCMGaMq9OJXzLxi8H+gGDhqTdkS2P3M1uaN/g4zJLG wU21pZkJW3sX1ST8zxw+io/98PCmA87SWCwvdR6CjsApnvauYkgxZ3JjrhgO s4nhcJ0cjAXT/OE3YzFWzfBA2HRbYRiiDLHX5OQufUJUrSRuIxHok4xxCObX oQQv0isJ0QRvHcGLXZqIeIKXyDiXROiOEJSjBKWOoNQRlHrGpzrGpzrGpxzP POQs2489S6iF+5HzRR52f5aLvQRvP6ErJHQHCF0Z491BgneI4AmIq3QQ87Wq +VrVfK0qxszKGB4JcWUEfy6sGmWrKrBmOHzvEj4LZROoiHkqfFbD4WMSYKfG PHsZ89zgaOkOJyu1Q4e1h/DiJiEepM8DrhMCEGAXjpj50Yj3J33BIfDQKJa/ DHoad/HAScyD5L05xBzDnpud0xB3ook8mZtpbc3fZP4rNdzlhTaiKOIEDsR+ yRzhEkrTrqM0sxcVu26hOvc26vbfQXPRXRwrvYeug/dw8vB9fFn9AOeFXebR h7hS/xA9jQ9xvZlhq+Uhelsfoq/tIW4de4j+4+Sr/SHf5O32BzBjNimswO7h Vhc5IGs3ydr1U+TjVL/C2+leHq8iN247cjfkYU98Md9LK5nrpE5R53Aw6zKq snpwNOsGmrN6cWxHP7o4P5zKHcDZvLu4yDniSuF9XDvwANpSvp8yvpeDjzjZ FqFmXiUurzqKr1Ma8f3eRvx0sAoPah7hYe1D6gEe1N7H/dp7uFt7F3dq7qC/ ph+91X3QkrvimFIURhehICofBZG5KIhguAvPYO60kextQEFQqPSgefU2m2JC M3KYCY27kPChcZPeNDNhTeKUK0nKRzJI3fDuEboJ3EhHnQtsSJytiaskTiPH kptC3QcrMWNsBCw/CYf71GAsnuGPAP3FCDFwR/gMWwndCGnOMwIrvRKwiqAJ W50RfEzGBKzm92uoKKK3jujFEbsEYpdE7FKI3UYWapsZ7xqJXTNRaSZ2LUSl lai0EJUCvzwU+O5nwk15U577UUD8Chj38j/nVOq6A+VE7xDRqyR61cSultgd 5evVCYz5WvUCY8a7Osa7Osa7o4x3dYx3dVFUOL8Pq0Ft0GGED0fvbaLHos5Q 7agtT5u6Dl6sv2LMs+UEZadiZ682xpHoieY4RG4QPVuiN2YB5k4LwirnSMQt jkH8CoFeoETOg/m9Ox8J35DsxdFNYuiueQVCOx2E9nxtEfwEhBbMs8X7/lfk h3agKOZLHEi4hAObrqFkmxalO3pxaI8wq+1HQ+FttJbcQXv5ALoODeBU5V18 WXMP54/ew8U6jviG++gRxpjN93Gj5T5utjGitd3XQ+/xezCRPnx97XfR13kX vV0DDHZ3oGWQu0Hwek7fwuXTfdRN6gZ2xaQhN3Y3A18hdseVsspkwMtkLpzJ CSLzIiqyrqKa8NURvubt/Ti+6w669tzF6X33cS7/IS6xFO0pfozrpU+gLX+C voNiA85ebJ1XhvpFtbgW3oinaS3MM1vwXUUlHjJnfiR09AkeHn2M+0cf4d7R B7hz5B76awfQRwi11b24XsVS8XAPCtYWoiCaIyyagS8qmzCmoWBNIgpDI2Fh rbOgGfmSBY21xkNP+s+MHOZA4worzczX1YTJgnO2JROml5nTbaJw5gBS96zJ KMeESWPmxrpQImfhznHkjhkfhkB/XCRsJq/B7OnBWKrvjxWGixBq6Ebs7KB0 WxqBVd4JCCFuq/0EcmIF4FsIJXgR1FpiF0vs4oldkmcyUojdJqaZW4hd+qIk bCV2bcTkGLE7TlTaiV7J8n0jULpiP4dkCR9LllP++1FKAsu8qKX7ULpgD4pm 7UANiTtC4upIXAOJkwSnKvS2kLhWEqcnGX4DLSSvhUGvmfS1kL4W0tfM2qgx 5DDCXsk2DXTU8cQZOgw7cS5D1JkPUqcnkfs1AfAYgs5GNGafBbMxnlhovBqh HtHY4EnogiKZbfpJ5DzslXjHz1Kw9ms+uinE2Stpp6DOTUPqNKIdu6COxNmp xNmSOGsdcXORE1iH/IjTKIq9iGJhc5l+AweYw5XvvolKlktH8/vQWHwLraX9 aK+4jRMsiU4xH5N2l0cHcLF+AJcbB3ClaQA9zYxjrQO4IXRMiHgdpzqIWCd1 op/l3C3p+HV10PFLcf26cPoakduKPev3YHcs4922ForxLuM0dR5lGZdxKPMa arJuoj7rFlp2chbIuYsTex/gzP6HOF/wGJeLWXaWfI0bZd/g5sFv5e6eLfPy sWNBJVq8GtAb04bnzFt/LG0jYk/xqE7oWzyq/xoP677Gg/onuMf8eaCOufDR ++g7MgBtLd9zTS+uVl3HlcoruHL4PPJjGPdidhDBbUQvhditxe6VvtJ+RtwS tLBhXBN3BV+DBSsCS1YDFhohV34/U71g95rKms0w1sQyHg4YPYnZGxwzSmCz k4HNjeNGbN1xJ2liADhaepA8/VFhMJwYBc2UNfhsRgi8DPwRaLQQYUauWKOv QYh3vKQqzE80AhBra3+HcHVDRSQVw7+LI22JpC3FKwWbPFOwhWV1+lKxoSIZ mYuTWaglomPzEXRuPoquTUdRsWo/X+tQcD7+gMPBBfxqPyqog3y+Img/Dq/c j0riV+m3D1Vee3F4cQ7KP9uORiLXvOUIWolc20ZB7xG0q/S2Jwvk+JUejicL 7o6Rw+PksJ38tcfW4Djr8rY1h1C/ogSrh3P3lsqd7SvcOavc8Rwy0tmZD50/ gZ0joVPBY+1rIyoBozFO0Izzg5d1OKI+J3N+6xAfEkGcRPoi3F9ek18L/nRy txcVogDvzSH07Iehx7LdVeOAmXZ2cLG1gZONxW/ku/4cewO7kB99HoUJV6XL ZVHGDRTv0OLgHi2q8rQ4WngTTSW9aC3vQ/uhW+iqvIWT1f04I9wu6/pxvr4f Fxv7cbmJWWNzP662Kn57Pcf6ca39Fno6qa4+9HSLCq4Xl0/pSFM89s4xyJ09 RerWZmD3Ok6O6XUo3dpGsarbxiC37SLKM3pI3Q3UZvahfvsdtOy6i/bcB+jO e4QzBU9wvugrXC75Bj1lT3Hj4HfoPfQMtw6LHUPFyF3ET9e/FbfjO/B8dxd+ rGjHw/pneNTwDI8bvuPxKR42fIMH1L2GrzBQ/wj99Q/QxziuPXoH14/cwtUa La7U9OBK9SVcqTpLArtJ4DESuBH5Ueuxd/VyGLNQNxGydoOpjZC4OG1qM/Nf 1K1cFmoyZKkkQ3pyfLypePiRMyuGM2tSJrZh25GyIdLETlIPBbQ3OWl6wIDZ pPGkaDhOi8B8/WD4GPlhlfECxCyLRaxXvIBqpFysOAVRkq0UxJGvRJ9UpHhv wiavjUj3TMW2ZRuRsXQTspdsxI7FG7GT6k5vxMm0BlSuLkR1aDGqw5inh1Nh /JrH6rACaj9qQvNRE5KPWrJ2NDAPR5fvw1HfXNQu241Dn2fh2JY6tJPTDqpz cx15rcOJzUJH0M3nTkgdQRcZ7GLY6yKHJ8jfiaQanIivRtf6SnREHURjUDFC XsFMn+fRQAlvFhIzpyHMTIcw0zCZlNMUz5vEjGfO2UbF7HUYjZ0L109XIsAh EusWErEVRG116GuCMD0J1QiJlYht7vZuEj1XcYdAt71wOFaaQayUrd5/4ZA4 jf3rLyu2lWk3UJilxYFdWlTs1aI6n1ip1pWtB2/i+KFedA7aV/biy7penK3v w/nGPlxs6sUl4aPXRh2n2pkXdhKhE1pc7CZGJ4e88/Rwho9TcfrUDZw8eQ07 ozJRuvkwi8gGYtVOnSRW54jUZSJ1DYczbqI2i+nszgG05txH+95H6N7/BGcK v8b5A9/iculT9JQ/w42K5+g9/D1uVf2AtEUHUbC0Ed1Bx3E3tRvP807ix+pO YvQDHjd+Tz3H4ybi1fQdHjQ+xb3GrzHQ+BVuNzxCH7HS1t3F9aO30cP/59Uj DGa1DGa154nXKeLVTrQacKXiMC4U5/xevXD9EjiG9or/rKHT/03OsO2l8sO3 nMUBoOzBdqYMx0XBZHI0XGZEYIFhMCKXxmO9dxLifRKxwTtRD5EyPIn17tF+ qVhHxfmmItF3E1J9NmOzdxrSvbYgwzMNWcvSsH3pVuxcmo7dVM6ydJze1kpU SnFkTRk/kaOR5fgj66QyqlRVCeoiiqki1k4FqCdSDavz0bQqD00r96LRbw/q l+1E5RcZ6EprQjd1kjqV3oTTW4UaR/ChAb/kYx1Opx/hX1GMaKdI0unUGpxO qsKpDYdwYm3Zy/T8Fmb6FqSHQcpApUc9kVYmQ/TYSnrUTexWHoMnT0/uzH1D 7ss1GrsEcw1CEOS6FrHL1jMzFPisktDMVsLUb+HhIOzKGJ4chjhyE9khSRrk SLcFUeXI2c4GDtbmBF28YXfkhp/Dvrge5G28gf1btSjYTpByGJ/2MT4VECTh jEeQWg5qceyQFh1Vihlld60Wp45qcaZeccc728JY00YdpzqoLooQfUmIzpxU XPG6hU4r7nhdJ2/geNdlZEcQok1VKN3SRJA6KGaCaRcI0lWWzTcIEWvC7Dto 2HUPrXseoCPvMbrzv8KZom9woeQpLhOgawToBgHqJUD91T8ibSlfz6sVZ8JP 4GH6aTwvOoMfj54gND8SHoLULPQ9v3+GB83f4V7Ttxho+hq3m1jANT6EtuEe rjPj7aljbKpjbDp6lbpAncaVI52EqYkgVeJC6d7fq7OmhYEOIjU5Ubek/xwi YWTgru7R9hgWfsTmFjEK/sJRMAtGE6JhPnUt3PTXINorFbE+mxAvKUlCAmGK FvT4b0KM32bE+W3i81uQ4rMVm6l0723I8MpAlmcmdizLxK5lWcjxzEKuVxb2 UmezOnE06jDqoyvRsLYSjTGVHHuNMYf5/2hcdwhNMRXUQTStLUcTiWqOLEHL miK0huWjLSQPbYF70RqQgyafHTi19RiJPIYzGcfwZeYxPb74MVYd57LaqFac y27hM834MquJf92ALzPqcHbrEZxNq8XZzVU4m3oYZxIO4uT6EgQPNwoZAQND KxgaUPpWeFd16jfXV8kyUGxC5Zll6qfYZA+RpbFUp6bh1hCstwRZZh/7YJF5 GELnrGNKHMvcby3iV/kpZMlHQuUg8j+ZDzqI9FsAJoKVmwTsVbiU7Y4zNRrC ZQ1lRLhhd8RF5CbcwN5NWuzbpsV+Jn3FTPrKCValsJws1qKeYDUJ5zuCdbyS cBGsriMEhFB1E6pThOoUoTpFqE4RqlOdiutdN6E6cVKxmOw4pbjfHedzLZ1X UdNyEgeS81G6sZpgsbzazPJqyxlCdZERqgdl227iUEY/arcPoGH3fbTmPkLH /q/QXfgNzhQ/5aB+Rqiey42CNyp/RG/1T7hV+xPSPI/ikE87Lqw9hSdZZ/G8 9Cx+bOjGo+afCBPBahH6AY9avseDlme41/IUA83for/5K/Q1PYa28QGuN9xF TwOT2IabuNJwjWLCV/8lrtR1EaxmRqgqXCjPU8/hVKb86mw6nCr1c7c0Uo2Z dRbpw6lSP3+5t1vOri87Hxh/shahS0mQ12aStYVkbSZBG5HEVG6t/2YqDbF+ aUjw24oU3wxs8skiVdmkajuyPXeQqp3Y5bkTOd67sNdnF/ZReb67UL+2Bg3r atG0/giaY4+gRSiOxU5rXC1DXmtcDdpiq9G2vgrHmIEdizmE49EHcTyiFO3M /tpX70fHqlwcX7kbzf7ZJKeLBJ3A+e1duLCD2il6mF7c2Ylf8bGD3/Pj2HkM 53e08WdacD67ERcy63FhWw0upDHIb6zAuaRSnNxQtGq4JSOzM2E+Z2QNE8qU MqPMhcGChTRYMDcYMnV8S+VRnyyKr5RsW8ejzZBhtmrbK/yOhvOoM8zWRbpB 23p+DgYfk9cJK+BlG4nI+bGIC4jDhtAoda+xMAx8U1IpeBR2ge5SHvzaQzkK Jh3IpINYMeAgVqSJXci6HcgujHdOdsKzR8l0dkZexO4ELfYQyT0ZxJJIFhHJ smFmlEeJZD2RbPpfjPE6hDEecewkjp3tiileO+PccSLZJswnBYLdikFefUeP srB4Mg4kksaUGhJJGjex7NrEsmvLJdJ4jWGul6XXbdTsuIuGnAdo3fcY7flf k8ZvcYbh7YLYpHjwOXpIo7aKNNb8JDcqpvk0oSagC5fjvsTXu87j+aHz+LGZ Ia7l73jU+pOk8ZGgsZU0tj7HvdbvMNAiaPwafc2ksekhrjfdxbWm27jaxNKx ibli02VcaWT51XCCVLYyb6zG+Yq83+uWEembK4WBgZ10xZMgGirhbdAl3XRY iBMbzlULEj2J4oiXbEj05BB4B2GeUQhjnRTplYZ13luZDG5Fgm8aYUxDsg+f 89uGDX6Z/D4bGxly0gjbNu/dyPLKwQ7PPdjllYs9PrnY67sXeX57ke+/V0LZ FNtA+KgNjWiLZ1J3LKGR/43jCQ1oF4qvR0d8HTrijqI9thad62rQyWjYFV2O LuaPJ8L3o2v1HnQE70SD/zZc3HWab1nsHngLl3PEHoJTUlf2nOSxmzqBSzmd uLyrA5d2HcOlHa24lN2AS5m1uLT1MC5uKcf5jXzd+H1Bw33AfwFjYyvVAdJa 2lYNOgkpjr6K6ehI4VknnbfE0drAWk81gbSY/iqXIyXeRkRaRVxPMC68EazF ViPxFdl+G6b89+Lnhfm2+SDFqiOwiYu0UVRs74c1nxC9Xkiwo40SVcUHafDx F3CdKvYlrUXM4jjErYwlxeFye6hC8e+kJaG7sCV0GKJZoVgQrGygHjISEBuo ibGDI1ykkYDoZ27FPF/Ze5MZdR47krTYtUWL3Zla5O7UIp8YH8hjdC0kyiVE uZwRlgjXEeEGpqpNTOOaiXAzEW5tVdz4WohxM6NqU6fiZVlPlOs6FWe+qmNX R+jwTSC+ycQ3pRWlqcR341kG1cvKvcOtfTiURXx33kPDnodoEfgWEN+ip8T3 mbKrsuJ79FT+gBvMTHsZSDd6V2GrXyvqg07iWvI5fLvvAp7XnGfQ/Dsetgp8 /47HrQymbcS3jfi2qfi2PkV/6zfoa3kCbfMjXG+5j56WO7jSQnxbiG8L8W0+ R4y7iTDxPVqNc4fylMlvujTnVXIne8XMchi6Ou9nG2KrtBpR0BW75aWDkLUy bzu+EkcjvWOwZslGRHhuRZR3Btb5ZGCDbxbx3Y5kHjd5Z8HHMQqpvruZme7B Vu9cYruP2OYR2/3Y47sfe/3ykRdQgPzlBShYkY/muGa0xregLaEVxxLbcDyx Fe1JbWhPPoaO5DZ0Ul3JbXroSmrFb3AioRld8Y3ojKtHF8PtCcbWbiaw3dEH cDIyD91rdqNjdTYuq3sargrtPa+Hnn3nmKj27DtLfUmd4dOkObcbl/ZwXs3p wJVdPIk7GnElqxZXMipweesBnN+cj6Dh7aN+JRwnBx0bzYa5NVqpRmDCXcvG SDE3tTOyGSEdwF6Tznmi04rwnlT8gq0GDZiNjSwlu2JWMNHNDDJESyfLEWJq GCEdYX8r/GD5eVKqAfMHwpJOX2lgMUTykI3+cJKVDhZvKjTz8zT82BNzjcIQ 5L4O6702IC54PeJCg1XLXuFI7yAfhDGFm4zD7tICwdWR9P7M/sARzqTXSWPL TEG58ZeZdA3ZaVpkZ2uxc5cWe/eSXAbeYgbesjItKiqYGzMPrmYeXMPispaB 9wipPUJqj5DaI6S2htRWU1UMwJU8Hjp24zU1RSmK2z+4ZFTnMyqaSr/83GjU M+VtyXsiST3BlPdMqSD1GS4deq6QyiB7s/ZHbPStxvaAY2hefRraLRfwtPAS nteRVNL5kEH2IY+P2oR+wEMdqW3PcKdNIbW35SvZWPN6631cbSOpbSS17QZ1 BVdaSWoLSW3iIKuvVie336k+2jozTdU2Whh1Gg1hqpuUh6yM1O37VoqphWLV PlWiGr6UBaT3Oqz1jcOapduIaha/34n1PjnYwKiZTCw3e+dgtWYtVjjEIthh AzK985HtVYCd3oVEtAh7/YuRt7wY+SuKURhYjILlLAYTjqEt8TiOJ7ejPaUD HSmd6EzpQmdqF7o2dqE7VagTJ6lu/v1J/lx30jGcIM4nEprQzdDbzXz45PoK nFx3AKdi9qE7aidaV28ljFdwLU/oMq7vv6yH6/mXyOr1/RepC7i2/xx68r7E 1X0sx/fyFO7pkPu8r+xswJXtNbiSXY7LGYU4szkXgQqrFeIwUhkD/EpPGRvi r/7lJcdVndvqcHYHHSOlMbHwJhspLSMVhzIbnbuqjeJK/AZG/+kjfPTHDyW4 OnjN1bCuJ2eGkdKo31qVjZHiRcvK31YN8TYGikTL0I/+dRQ+JNMf/nHUoFe/ BXm2Is/Wr7bFsB7y9REbqszGB2ChZSRC58ayniHPq2OwPshXcTRxUEyDReIs dlpJ02DRqdzBQ5FcECzIfmOYtYmz3MUudrALth3J9tvqZr/0LTewjVxn7tZi BxPqPaxx8w5oUcBIXMz6tqSKjDMSl5Prg+S6nFwfbNbqoYxF7giU8PEAMc+r u8pfKF5yEkriq5Xl30ndynEToy5/jfhTkX1HHgXLzWT5OMtXwfLpsu/kxu1L h5+hp+p7XK8R21N/wP9H13mAVZWm2Xo9WDN3eu7Mne6ZrurqimYxkVVyzoqx klplmcucUECCJBEwZwTJOeecc44SDxJUzKGqOk/PdLd3/XtvEKtneJ519jmo COf877++77C/tYP25CNsfy2qXFsxcqULr5J78GNZJx5W/I48C35lhp9U/RaP q36Dh1U/4gF1r4osV77C3coXUFU+xUAVWa66j97qUYosV5PlKrJcyYVYXo47 RTkyyiLQ0+InKDvKKCtXWzCXUF5L110n5e5Kr6LIp5HSODa8lcYhdueT293g IaHsTwXBdetN4hzOz0XDe2csAqgDdqfhbOcHV1s/HHEIoNsm4ObORITuTkL4 3iRE7ktGzIEUxB1KQfzhFCQezEBVQD0xbkBNUCNqg5pQF9yC+rMtaKAaz7Wg iWrm/ZazzWgJbkYz/16ThHct0a4i1mVoOl2EJv9cNPulo9k3Ac3e4WjwuEZy B6VpkaHYQTWo4ga4UFRx/VDF9/HYi0HuqAOxXeiLoStHt6I3is9iBHG+zV0x tIgWnE2sk9BzLVIhOUP5tar4kD4x7aimOLL4MDYwm5YHaymNk/9PObC2It7W ztD6HZGqxo1Tznm1oglLOa/vz6VERNMczCPT0/xdTdokZrz5glK6tJL1aWA1 lfU5LSj3fcwjzPPenYe51JxJqJXE8jcXBKBBT2XHyvHLy9Q/g+2SQ9jOXdp1 sy+891HO7m+lf8vRRPbSjTBoGWJZTsolzcXE/SolimKlEkXhaGfLrUcOBApm KX2epnyF8N6gKd+iKd+mKUfQlCNYSkcS4Ih8QhteIKANyx+a6j3+SYE20Scb yazfZHBZKgcR2nNDSGGpLD5yQh+iMPwxyqJlaOsTBbTfoz3tB3QT2r6cHzGQ +xsM5f8GQfuKEHWQpuLVhvGb3XiVTmgrO1gOE1Ca7SOa7SNC+rhKHH8gtN8T 2u8J7SuMVtKAq15gqPop+mseoa/mPvpqCW0toa0ltDXsdKvY6VaUoac4513p 27chtNYysJMllL4A1omv0uo3ufL0XiszBVqLN1vvVKiUEozgvt2dcJ6SznPx 2H2Oov9ujSK0CfDakQT/HcnYb3cOx+zY/doHwss2CNd3piBkdyrC9qYhYn86 f/wMxB7KQPyRTMQfSiesjagOakZNcCvqzrah/lw7Gs53opFqutCFZqqFauPj tvMdaD3fjpZzbWiWQG5C49l6NAVXE+ByNAcWoZmdTXNAGlpOx6LFNwRDcSPS bMpwApUoNMwlfJcb+b/y/iBUCf0YTOhDf3wP+uJYU8co1EbWkNxyFtAFpDeD 5Mag5dINHJDpzFQ600lcFWQnL4YgPiYTakU00FQ6rZEEFfH6mUKrnE4rwg8d DNkW8ugoZCQf1aRM2hm8bzUVsaYmRQ3+A9R/PUdiecG7s6f8XU1Cd8b0VGgp estahKZLN1ZS3qiVMHhJatwL5okgdRIskUyC36yLNRK98pqQCbZnaa23cAuc 9JyxZxU372/9aME+8D7uIkcAzJCyY2ZI0DopUpPyY34mYeskp2Uok86rlLgM RzgSXXtbW8xWit9T0UNUn/JmjXxuboJXJpJ9SpHsWyfzKLEot61pioEWkMXS qKeoinuBusSXaE55hbb0V+jK/B53ssV87g8YzP8BgQdK6BgNLNzacf92N17m 9OCH2nY8YGs6UfkDvwNB3895+woTVS9xnxonf6PVzzFc8wyDtU/QX0vzrKN5 1pHDOnJYRw75NXpr6mmgZegsyn538tfQUqi87RsODZQ6WOHQfJJD1sDyJVTW 83nfIBknOZQTGN6B65ZjEobuO32JYZC8AN+H+7Z0+GzPnOoMQrZnIGJ7KqK2 pyF0TybC92ch8mA2Yg5nI/ZoDhKOUUeySV4raoM7UHeuC/Xnu9FwoQeNF3rR dLGXq5262Ie2S33yf/P/+LAD0z+aztUQRIJ3tohumk03TUZrYCQafC4RrnHc TRrHSPK4Gm/G+M9HkkcxnHwXqmQVhpIGMZBE7hJ60BtP7uLIXQy3r+hqik1q FAvfCDrlrTAFuSylMPupU4oIRPExmUknOaPCmpWRHDhqK/IYRQT0P8BeCly0 xYafz0YwlUTNkALn3pGStZZ8PG9Salj80VwagaBOxHwufH82Frw3++/9lhiL KFNrKcr0HclvZ8CerNnTc0X9rEau5pCyOf/OWvoXs7F0oSU0Flm9uWDOpD+S ruULd+FzIxccWO8Nz51+8DrqjVNsWqUYmqmgjf+HVfZKTJOIo3FYPxXRtOot wOTADUclcMPezm6Z8uZxrHs6krxKkOxdK7MkTh8/Oyi9g5uqsJQf/ggl0U9Q GfcMtYnP0ZjyAq1pL9CZ+RI92S/Rm/sKAwWvEHioDClHG9ESSC+L7sGLwh58 39CK+xWv8IDF5oOql2oSRP+GieoXfPicOD3HWPUzjNQ8xTBRGqx7jIH6CfTV s69sYF/ZMIjeeq6NujbiVIc7laVK2/2vZMmWspcSs02VftJ00tNYgFpQUja3 8DSJI2lwgs/vrKkiVLpGlQBpx2nCdI66Iv3IHjvDpaPbt1nS8cz2fFykxEf4 zlzE7M5C3HfZiDiYh6jDeYg5mo945wIkHi8gTe2oOduJ2vM9qCdFDRf70XRp gBpE8+UhtFBtlBo6rgzxexEf7Vf6pWPrlR40s45vvtzOv98ifa75YjWRK6MK 0Hohg94Xz6f4ujSFMiqUKvQAY2kPMJp2D3dTxzCcOoqhlGEMpAyhn3z1JvI5 TGA9H8/mMp7bUjwr0bhCskZPi4jCW3C9/3dwiXBdCS4jOVvUXDIyGSwbIzlF 2k5JkZbjTO2wnkRd+vk8VLyrjtGP5+Pl7NkY/Gi2SCNSw9JPFrCWW/rJfGoe lkqgzcUSciaC4RZ/IEcmLnhv1jT/shPx2sIi/4H1rLVkkrJRiphUgdoK9RUs 9vTVl0uF7ZTeFUXuHMz999nQXmwF3cXW0F3CL6W3xIYeraO+ig3lfmy2dMfR L33huYesOXvB7cBO6ZIgIrPDTs7smMx8mky1mczs+D9SZsdkOoHI7HCgk9kT NBsbGyxTXEt8JHgUkbYapYrsko8kLeXauHQ/9/YEiqMeoSLuCWoSn6Ih5Rla 0p6hPfM5urKf407eC/Tlv0DgkTpkuveg82o/HnLrfFHKKrKxEeMVL3CvUswm CrB+jgdE60HVM9xntXiv+gnGap7gLhFT1T/CYMND9Dc8QF/jOHob71IDxK2b uBG12jp0VZT8SpnpMtFl26dnJ6XUS7QppE1FfCuuZWkmu5a1xXrlUisbpq4T 4f6tC/3Ji6QFUhep66QtTKZtRyw8WTmKD/+txTi/rUS6f3t3MWL2FCJxfz4i Dxci+mgRYp2LEX+8GJXcZKrPdqP2XC8p6ydlQ2i8pELT5bskaAQtV0fQSrVT nULXRtBxdVim7dogWq/1o+XaHTRf7UbTVdnQWq7WU1VUCUnMRetlGtn52xhJ fSLNn4ylP8a4UMYjjGVMYCT9PobT70GVNorBtLvoT6X5J5O2ZD6NyXwak5oo VpCJpaQvB72x8ZOkSW/dYNFPK8epo4mhnOgrUydnmE5P8p1M8ZXiq5W4yLU/ n4+DP9dDygeG6J9njD9qGOK1nh61EBqfUjPFUZ3HBTwKzaeI3ydzieAcKa10 yYezsZjoTS9J6ZUzpLp0hpRPLKpS/YX6IiZlkT7BMFi0AkYLKR6NFwot55+p vzdHjQDP4Sqcz9J03n/MlsjTW2KNZdTypTbQVv8SNhpHsM3eEye+9oPnfuq4 +5uLJdgJrRcAihsxXCrA+ycpEkQOBFmjBIK8iUSwsbVbMfVmmHgH5lQTkv07 WST2Ke+U/gfSQ+4h5/YDFEY9RFnsI1QlPEZ98mM08TVuzXyKjuyn6M59Ct9D Vbjg8gD5135Eb/rv2JD9gGet9zBa/gyjFc8wVvlUzEVVPeUPOV71hA3aE4xX PyZmjzBa9xB36WRDRGygUcwj0tGaxqhhqp+4deFOfQt6amvRUlb4vtKqmujS 1JYpmOkrmNHQzBTULGTM1KQ4fT2JMilTYpKyLa5w3+pD0s7S165QISQtnMcY 6Wf33J4iHf2+LUXw1grpfuh3FYjeV47Eg2VIPVyCaOdSxJ0oQ7xLGaqCu1Fz rg+1FwZRf2kYYZujULolCu3bokjJOCm6hzaWCR1Ul6RxdN4Yo+S2uPUm/e7G AJpv9FJydEjLjWaqDq03KqhCtF7PoB/GkK4XasTqOQuk8cxnuJf1FEkHCF8m n8jMB1BljGMgfRR9aXwC01gWpLHKTmXJmMqSMZWWlkpLS8knbCnoiryG/dPe WZFeeLXJkDsDk6nSdTJMSaBlOS0kW0bL/k04tokD8dKH+69skL9gJe7prsJf jB3x2sIGr60MoTlzETRnLZx2VFfjzQIuNpkyEvbJHCyl/wnCFv161tQVF4Rf OvK+o5EcfGyw0ACGi6jFBjCijCXpw2SxQM508QpxJgNRMyFm6u+LolLc/iuB my01geINnWUkbTkpWyFRthWrlh3H7tWn4LbNHx6HaXJs05RrLkh5VA4yabLs 10sJPDOk4JF/lFJHJmMTBGR2AjI7ewOlVIh3rUSiRyObsXYkB8rvZCZz/027 OYassHsoiHyAktgJVMRPoCb5IRrSHqGZ+2db1mN05j6G95EmBAb8J7ITX6O7 +jUe9b7G09E/4m75EzGHqIbRysfEa7SKW65Q9UOM1jzESN0E8XqA4Yb7GGy8 h35p3Jf9lxjNaOY23NQnIdZDxDqqqz+Qvtt/J152MFlOtFas/HsXExeqUFxs 6nouSmS/qBpPfuNGF/MnX+dnKJuL+/Y46Z4XGyz5cx/g0q4ahOytQdSBGsQf qkadawuaXOsR51KJvsRXNC0Zp/MbY3FpcxxytuSh+2gJnvgX4MfzicRhAu03 JojQBLpuPqDuoyvkPjpvyTVC2627aAlRyXvZh2i+1YWWW21oCW1EaUA6Kk8n oPp0JOp8r6JpZyw6d8dgYE8MRg5F48HxaDxxj8Jznxj8LjgKqizuTZnj6Mtg pZ2horgvZbBSzGDzmtFIsQtLLyZaGeiJC51EKkc6vMsn0HRaWqQ8XWypBKmK kGMp4pgQ2RuLWGNHKUl4pakjQbLGyVnrkKf9JcZNNuJvtl/i9ap1eO0kgje0 Zi9mW6M1azHvLeJxoSJ1iadJz9KYpOmjWVMVp6NIE19pbCd+1bjYkPBQS4xg vNQIJksMYUqZLTWA2RIDNZgv0WenZ06mzEmU+eLlIrNejb3dHP7n6r+SO7z5 /0FMtVbDQWsNdEV2rbEr9m3wgdtOrgL2Yx7HDkvRIyKr2952/QwpfOSfpfAR ByV8RNYaKRDBjhRNRSLYORgqJUCMc5k8vXuqHUmne5B0TswOirCKEWSEjiI3 YhyFMWKC9z6qkh6glrV+Y/oEWrIm0JbzEJ15D+F74a+Iy32N+vbXGB5/jbEH /4WhsocYFnOEFWKWkLgIVT3A3RpiU8vKhT2WqmGc+IwRn1F5eleabOJKaCFC zb24Q4Q665rRUFEun634SxjryddiMaE7mRAfE7qTibFytQuBEFsuS/NJhNZL gf8uX+0lPu44ueUMWy4Wf1tvSsvXfWuMvI6NiFAGfLdnS48Ct1bj/O46XN/b gPCDjSh0GUL1yV5E7mejeqAU2Ww0A76IR/BXCTi/OQXXtrSi9PgQVBdG8UPM MH7H9dt24xE6QrjHUF0hclBbmV83KlkLiI+q061Us3S/5kwt6gIrUR9Uisaz BWg+n42WC6louxCH9vOhaA3wx/fnivHbK2X4U0gl/hxeg/+OqcNfExvxOqMe f8tKwUA2S+lsbkLZfAbFvFU27Smb9pTNjiu7Fr1ZrAEzslkXRr3NkeZbDJkp sRhvOLKH7bQ8bpG0OplrufbnttijvhEJ+ltxx3o7fuu0Fa/Xb8Jf1zlBe/YS 8rME2nOEFktUiaO2xBRZkniaD81Jlj5m3ffhTKmOdDSxlwES8CwxhslSSsMY pjyaESZzDWqpISwoNVguJU6WxOkXsCRKlkRp0a/l/k28U6KuvFviQI40Fqxm lXgAG9lrHfpKRAH74+QxL+zbtRn6GjZSooiaoElNxIqoiTwRNld2RMhW0hpq tRRwYGO3Cla2DjCWnkJ1MlSHeI82JPAVTgxSJgGvqZDKzTIrXMzfjqI4bgzl ieOoTrmHOvbJjZn30ZJ9H225D9CR9wD+yX9DXMtr9IrTOUu4M5Y9wGC5kDIV WClPBA5NmwgcaBwlOzI3d6ZNBPa0DKKb/HQ0dKC5pv5jxX7EtYyMaT0mBk4y O1LyOdkxWfvmSjFvrgsA1y/JzdceZCeQ7FwmOyFUhMzMO/DYmoZT27LITS7O 7CqQP/1LXNnXhPhjD5DtMo7b+0qQeKAMWQfL4fd5EgK+SkLw5nSc39KIG/sf o+zc7zGc8Af8pviP+H39U9R4D6DeZwCNvmyPTvehJaB38n9rOddDMrrRfKET zZfa1RS/a71Rj/aQanTcKkdnaCG6QrPQdSseHVcu448Zd/HnnFH8d+E4/lr6 AH+rmsDrukd43fQYr9vbMcDtqz/nHvpyuf1MjkvlsXnKY/OU18DHrOmyc1nr xSrMyCFHC+g9k0nFllPMWEwlFMvBknJ+sghfVdKJzVYpwd3rsHb+VzhtuAP5 drvRt3Ynxjdshuuur8iIBrUUOkJzl0r86MyZxs5s2Yu0ZpGdmWTnU3rQx7Ok AtFosTAbYy5hk6UmYpBdwwRmlDlloWkMSw0hI1hpUjxakyVr9mjWNCVrAmS1 ZAWsiI/V4mVY9MHsKYTE2yBL52/kvz2Cb9grHWWv5Mpeyc1ZJFcbaNqKc+OI z2Q6iI1gx9aOTYLIBfkXKRnE2n61lFPw5eYzCDqbh7PBebhAXQrKw5UzVIAc tnbBN2+59BTP4s5bjhiXFsSd6kJ8QD8Szg0i4Qq5EnN+YcPIjryLfGnCdgTl SaOoTh1DXcYYuRpHM3fC1txxdOSPo4svfk/ROO6UcHcUJ2aWUeXj8rxfNTVt 3q9PvBHBDmly3k8N3bx9h7dD6GoeQEcTO/b6tk+Vt9ONlznCmD5kTJ6M6UPG Ck/SlQTMpl1JgHL5gixt8iJPweTpCnm6JS9hEyKVTCtKh9e2bLKUh4DdhTi7 twSXCM7NfRO4ffQRbvFx1P4KeKxPxqnPU+D3VTrObC5C8JYmnN/aiyvuf0J+ +J/RV/hnvGj+M35/549oCR5B+7kxdNCXOi+NoesKdW0M3ayNO27cRdtNSop3 GkRreB9aI3rQFtWJ9phWdMQ2oDO2Cl2xxeiKyUBn2G38seFP+HPzn/Df7X/C X7v/iL/1/hGvB/6Avw3/Hn9VDWMw7xH68+lDfNZ78/lMFtCHCu9QrOcKWM/l VxIptkgZ8XiLp/elWk7K+Xor0FgOap0MM1aCjBWW3qQYG8z6CoZ6Hvg6/DU2 GX6FrEev0fXDn+C6/TMyRJ7masyQ7vxSQkpn7iRSi4jUdJzmEKdZtB1jYmRC iFhealCa/NYoc8pCywSWmiZEyATWWsZqsCZX78OGtzYkyoY0yTKAzVJ9krWC ZC3DYommWTSjWZjzy7mwZz+0zckLzlv94HLIG67HjkNfm72Xlg30hTStYW3L GsZ2nRz0YWW3lv5mZbcGW7aewbfUVur6xTyEUuEX8hB5Pg/R5/IQQ7hiCVVs IEWooglVlC//zqk83HLPg670hH8qTdBGn+xArG8v4oIHEUfHiqdjJYlxv3AV cpQp2pLEYZSn3EVV2ghqWac3ZI2gOWcErXmjaMsfRUfhKLqKR9FdMoqe0hH0 lI/gTiVVTUeqpepJUwNpmjb2NwMdElXtpKqVVDU1dKGysn6m9K3RoulSRoIq Q4UqEmViOnl9jnUSVeaCqM/3wG3jKZzcfJZUXaXCSFa0BNXJLak4uTWTFpUD n535CPiuCGf3leISN5VrRypxfU8Jbu2rRsyBerh/Rhv7Mg9+m+pw5pseBG8d xfm9T3D55I+Ijv1v1Fb8Bf0df0Hr5cdou/oYHdefoPPmE7rME3SHPkXXbT4O 5+cjHqI9kkVx9H20xnIDiufTlDCEtqQ+tCd3oyOlFZ0p9ehKKUdXUg5Ri8Bv e/8bv+unhv4Lvxn+L/w48md8P/af+P7en6AqeIrBgsfoL5wg1vfQW0SjLyZS xewti1naFTfxc2yRCgroUolvEfXetHTXv092tZFSXVfCniRJqa6kaTLRVc47 /gaGy71gsdYbG3Z4YyfX6NFj7nDZ4qQGnXlafO1052lSGnykIY5qElo/4+00 sGYvYJ0n3lqfiYUffjwFkxpxMmPXb8FbSy1TWGmZESYz2FDKOyW25OwXsCVl tkTLTssIdpqGvE9p6BOtFdRyCa2Fv56JBb+aDyfDE9i1/hSO7fDF8cNeOHFo H1ZoicSMFdo2NMMVWtZYrmkFC1tuy9TWraex2m4vtQc7tp/BrSt5Up5TzOU8 xF/KQxKVclHOc0onVxnkKpNcZZKrDHKVTq5SlSC1RM88xLnlQkd66uci/GgL orx6EH16ADHnhhBzRYW4Gyokh6qQEaFCdrQ8SlucpCJbw6hMG0ZNxjDqs4bR mDOM5rxhtBYMo72IKh5GR9kwOiuoKqqGDNVSyiRgO5lqI1NiiLalZfI4hObm ITQ09qKiumWO9G2tgiGZMiJTRsarlat8rIUJXcrUnFwpV/lw+/IUmToLt03X 4LY5jIqB29eJMlPfZtKmcslTAXkqxtn9Zbh4qAK1ka/IUxV5akDs4Ra4f1GF Uxs74Pf1MM7seILgoz/ivP9/4nLIXxCW9lc0X3+Olpsv0BryPdpCf0B72A/k 53t08et0R79CV/RLWs9zWtAztMU/QWviQ7Qk3Udzyhha+FS1pA+gJaOHaqMa +Licf5aL2uhIdHX9Dc3tf0Vl419wr/BHjBf+gLHC73G38CVUhc8xWPQE/cUP yc599HLL6i1l1VdKnkrJU2kzP0eeigppU0n7p/9O6j32m0bTkiinZ706SCmU UlKyySRPkwnJcgSniAY0mLMdhgbesGAD//lOH+w67INjx9xnSDwtge58LXKk pXAls6U7T3ErAdVcQjWHTjVnPpbSpRZ9/AlhMidK5jDXMqczmcNS2wxW2uaE yRw2PIoPWx7ttOU38u0ImL22KWXCz5nAXktmy1ZLsGVA6ZOv5dD8cCF0P9RF 8TEVXiQ8w+u2Fzh6+CT0tKygJy5qoW2thmW88wH0NC3x9Vee2LUjALt3nkHI NVoSFUnFUUlXiQmxyqCyiVYOkcqnXRUQq0JiVcgasEjJayo8zT/zy0OuEpOW 6UHM3PKQfDxXW/kl1u3j7Yjw7kPUmSFEXVAh+qoKsSF0rTC6ljJbm0+yikhW aYoYVFehevp8bb4KTUUqNJeQkjLSUkFVUaSqtY4iVc2kqqlJuJSYrH1HmatV oaZhAOU1HfOVd8oNDUmUsbgYyBr5YiCkyMRCvhiI2+ek6EtStPH6DKXGc/sm DW5bsuC+LQ/eOwtxmgZUTPOoiHiO2igCtLcOtw60IJY/ofvGQZz6egJ+e79H gOefEHzxL7gQ9zeklvwNo1l/QNOtV2gOe4UWQtMa8QONhBBF/0BgvqdeoS3u JVriX6Ap4TkaEp+iNukRu84JVKaMoyJlBC3JbK5SutFKQ2pNqUNrUinaErIx VvA7AvN7gvM73Cv6LUWAin7AaBEBKiJAxc8xUPIUfaWP0MvutLeMAJUToAoC VNHF+wSojACVFLF9SsFbBL2vZLlOBkraKZl2jlI++mRSsr2Jk5zfKhGkhNhK kZprYTB3N59xX1h97ovPd/ti91FfOB8/CZ352sRHR4032uJGS9xostqT/YkM zVsi8zNX/BJqHpay0lv8yacSO2ZaFuTHAhbaFmTHAtaUjY4lbCmJGW1L2OlY yLbkoGMOTd4SI0lESYcYaRtThkTJEEs/mAWtDz6F3q8/gd6vPsLlT7Twuo8I PexBX1g+em7loetGHjqu5qL9Qg6CnW/jrHMEwq7n4TY/H0HF8n4SlUZ+Mqlc MpRPforITwltqZQMlZMhEQVTQVuqJD+VtKUK2lI5bamMtlRMWyr0Ime0pjxX 8uSci6SDGdCSXouZCHXpwm3fQYQHqhBxUUVeVYghSIm32Vyx9MuKUSGPIBUS pBKCVJauQmUWYSJENYSojhDVE6IGQtRIiBoIUQMhaiBEDYSojhDVseSrbZLn aGsIUTWPlQ2DKK7pXiR9G5/AgC+3dHUQczmHxHWDJ1w/PwvXL69Rt+H6VQxc NyXCdXMaXL/JQurle3xKJpAX8hjFYc8kemqiX0nv1IUcbke0aydi3Z7glPPv 4XvmrwgIe43QrL+x0+mm5bCpz/0dasNeqaE2/BXeRU3E96iJ/B7VVCXvd0U/ R2cMnSfmGdrjnrKCe4TmxAk0Se4ziuZUbhtphCeN8KQRnrRaAlRKh8qiy/wW Y4RGjcj8hr3hvWLCU0x4iglP8UsMlRKeUsJT/piwEJ5KNkmVw+it6qe6eb+F n6+hCxWhPSvuLXZ2wnSFybQ8SDqPYEcJhrYhN7Z8Iu2nZx+LDMjJ3GPBzrz9 MDTzg/WXfvjyOz/sPuaH48fdBDfQXaAjHfWm7mvzvhb0FmhJIOnOf4OR5mx1 aMymBc0iQjNnSuiYExFLyoqOYK1jRXysiI8VsbGSELLn0UFXvu+gawlHXQs4 6lG65nwsZEamTChjaHw0B1ofzsYyasWHn8Lgw0+QbKSPHAttZJprYTCqFP3h 3F7CCtATkoeLbuG45BaJS66RuHgiAlHkJ4FKpTLJUC5VQIaKyVAZGaogQ1Vk qIYM1ZKhuvNvolzqyVE9OaqjF9WKBCX6UZW/nGBWSpZK3EVuYC6yDmZqKVmB N127EOo7hLAgFcKIUTgxig6RR9Kl+Vf6UXYCUSJChUSomAiV5rDqI0KVRKiK CFUToWoiVE2EqolQNau7qnqBCv9eg3gPQky/zpDmX0vqBpFb2cVNSJ6iS/JJ QrJ/AZJPVyE5oAkuGyLh8kUcXL5KhsumdLZB2fDclg/fXUU4Q8cpj3yBapZX DXE/4ObRdoS7dyPJ9w5yAvtQfKEfVVf7UH+zF423ulB3YwINNx/y/mM0hT5B M9uclvCnaIt4ivaoZ+iMpmKEnqKDsLQl8M8TCUzyQ4JyjyIw/JlbMghMRhfV gtZ0ApNawnIuC6OFv1EjMT+KX16Tk3FyMl78CqMlr6Tc66Hy5+gvJy+Vj9FX NYHeavJSTV6qyUsNeamm2VTRbMqLDrxdqUnz7ZNRcgb2U+GNVpOBxSJZ1kzO TJ1iRclKFfF6hvMPwtDCH7Yb/fHVXn/scfYnK64zCIeuGqnQwX9InOgt0JYk lW6CkflkZD4ZYZmmMWcBOZlLRmaRD7YdlKW2Nax0rMmHNfmwhp2uDdmwUX5z t4BMWFNWcFxmhZVCemRlmQXsFprg84XG2LLQCLvUDWH56RKs+Hg+DD+dC2N+ /cL1TqjeaIfazUbIWauFoehyDESW4Ip7BK55ROGaexSuu0fiulsEbpy4jfSb 9APykU8Vk48y8lFJPqqpWjJST0YayUcT1UxGWs6LeLHW83lq0t2foZnG00ho GghMHYGpJixVLNwqWLSVsQ8qOJKpGM2vcOVEC274DyHkrAohl1UIZR8UyT4o ln1QIk0mlSaTkUxK0uTR0nzSUZhHUgq52otJCwv0UtJRVsnH1RQJKVZGS9Wk 4dIZKKgTA2wDChPyLzWOr3KGy5rTcFl7CS7rQuC6PoLOEkdXSaajZJCMHHht Jxm7ScbeYpzbX4pLbGZCDrci8tgYbrl3IdavB+nBvci/2IvSa72oDOlBzbUx knGPlDxAwy3SEfYITbe56iMeozXyCWuxJ6zFHksxlh2xj9Eez8+TihZS0ZT6 AE3p99CUQTL4szZn9qEli2RkNaM1s4Z0lKA5KZM/1wgrrl/QOl5hTKjkJe+/ wAgtZLj8GQYrnqK/8gn6qsUJ+LSSGqJRSzRqiUYt67AaolEt0Ch++8y6rxQ2 3o57E9mUVkqesK3Exk8CTa0UNqwFG0dhaHUadptOY+P+09hzwh8njruQBz3o qusJRMiELu8LyYzoSiIjC+glCzTIx2JoilJMMDJnHhbPEoxYkxEb8mFDD7El I7aw1bUlI7awpxz0bCVKHHl0UjfHxoXm2EbtWWiGQ4vN4KxpCjddU3iyxvQ2 MYavpSlO25rDaakGjMij6bx5MJ4zG80HNqL98BrU7TOBKr4G1z3JhFc0bgp5 RuGWZyRuk5vIk+HIIScFZKTkRj7Kr+ejmpzUXstHw9UCNF3JRws5ab1cgHaq 43I+Oi/nq6HzinSTxw6hg3/eTrVdkjlqPCf7jPCXGt9cVHrksMVK11Z+sXnF vx/XzqtwnT3NdXpIGD0kkqVYbBz9JJF+wuIjjb1MBnuZLJZhOQVc9fSQPHpI Hj0kj5TkVipjnNUqNWmWcwYy+TC5rE/BQn5rfXI2XgzSuTj5wnXNBeoGXNcR ks9i4fpFMtwk+8iB599BUo5L+6oQ5/YA+cEvURv6PeKCupB2sRvZVztRcWWI z9Rd1NwYQ+1NgnLrPhrCHqDxNuuocFpD5EO0Rj3iIm+LecjvpT3+IdpYY7Um T9AyWGdJgIyjKXMETdlDaM7uRUt2J9VEUAhJRgnKouIwzIZE1FUjBGO0hHCU iESUZ7hLz5DGQ6seY0AChN5RS0jqxtBbT0jq2azUE5I6AUkNussKJiFJmRz0 15cH/Y30JanBmHfewyfvzcLMX83DzPfVp5KIZHbkQOC32LFcN42d9WRnPQwX HIehbQDsvw7ApoMB2OsSQHZOqEngvC8hpKeuoCMwUhDSVdeGjroWdAQ6cxV0 5qpj6VyiM3s2LIiMJXGx1hXY2MFqvhXWU5sXWGGHuhX2qlvi8BJL+ZcNy+Bp ZAEfc0v421jjjIMdglY7ImidE4I+X4ugjRsQ9PXnCNz6FZxW6MNkwWKYqavD bME8tHnuQZf3FjQt201aIhFyKhq3vGOpGITyfoRXFGJIT4J7OApvFqD0RiEq bxSg5noh6q8VoelqEVquFEmBRR3XitFFdVMizeHODVZ0Nwtx52YR74tjAY95 6CF5XSSvk87UJmgTjkQLagzORcPpHNScykKpc6ryxtsvcfHcEC4Rn8u3VLgW TrOJZklGg4mmwcTRYBK46SbRYJKViclUZWIylfiIgckUIpRMibHJ2OJ+LWV6 yYi4TM6cyrLCCUdis+ocXJ2uw21NONw2xLLtT1KwyYYHsfHZXYCAPUU4u78E Z78rIjbVCDnagOiTzay6mtGR8hJd6Y+Uk9hfopLVY/X1EdTcpMfcGkd96D00 3L6PxgjiE/kAzVEP0BpNxVEJ99m332cfz0orfVzylMYsgcwwmnIG0JzTg+bc DrTkEJvsalZfxRgqfAFVET2EffzdYqJSQrElEec6DVc8hqrqEQZrHqK/dkIe KJHOgmeP3zBEEZsGYlPPNqWmZnIEOFEZHDT8SfSNKaUmT9WLj/cJznxq4dSZ b7M/WDoNHDn00IGFmMMUOOtlcGzWw0DdFYb2Z+DwbQA2HwrAPtcAuBx3JhnL ZNNRXyZBpCaxs/ItajRF0zKP1MxbJFGjMUt+/2zzPGtsp/YusMahJdZw1rKG 63IreBpbwdvCFn62DghwXIUza9bgzIb1CPzyCwRu2ojALZsRtO1bBO3ahqDv diJo/24EHfwOQYf3IfDofqw2NYfxIg2YLV5CLUBL8HG0fR2Ja7uDcHHFbpzR 2o0wn1gqDpHEJ+ZUDJJoPqke0Ug/GU1kilF7owQN10vRfK0crZTI++q6XkEc RHRCBfpCKtB/qwIDoSz0QsswEFaGwbBSHkv4uBj9oYXou0WEQvLRTYQ6WeS1 XRH45KLlXC6azmSjzjsDJc5J0FPmWYJZl52j41wmMteJTAgb/1A6TjgdJ4KO E0nHiWTXEklsIlibRRKd8AKVTJ7t1Kj3dERMqGO2bOgd2dCvvAa31WFwWxcj Y7IxjZhkEZM8+OzKJyYFCN5fhODdJbi8vxq3nOsR4yEu49GI1DONiPQoRbRX KZ8uNjFXB2RUbtBlQkboQMTlNnEJH0dD5D00RhOJ2HE0x4+z0aBSxtCcNkpE RojIXTTyx2nMGUJTbh+a8rrRnNdOVBrpNNWoS83HYNFTDAkVi3wtolFKNMSl CSoeEZGHGKKjDNBRpCGR+nEZEREU2zh53l+nhMmdmmqFkjglIEokUEzfTJTB V3l+/QN5fk6ZXxcfYmh95nvzpfuz3l+MWb9eKt2f+5Em5n2shQWfaMGOZiOF QEncrJdi7kQItpPNBinuztDxDBy3nsHXh89gv+sZuDgfVSMYy2D2Bp+FQrLx aM2h0cxhnTZXE3pzl1JLqEVYRnSW0XC0Z8/ESWMbeFnYw8d2Ffwc18B/zQb4 r/8Cp7/chIDN3yDg2604s30Hzuzict+zB4H79yPw0EEEHT2CIOdjCDpxHEGu JxB00hVB7icR5OGOQE93OFnawHiJFkyXLqUWIuvIOC4euIXzDsG4ZHUSl433 4rzOdwhn0xvtk4AE7wSkeiUgyzMBuR7xxKaC2FQSmyq0X69G5w26e0iNlB3U F1pLPGoxeLsWQ+E13JtUETX4NwxHVlNVVCU/U0ERpXCidJsYhdGJbhEh1oEC oY7LuWg/n4OWwEzUe6fCQCkX/NnGBMQPIYjIBKeolimjg9MTENTES60mEWEB U+l33LQQu0C4OlyB26pbcFsbhZOfJeDkxlSc/CYTHttycGpnLk7vyYf/jlwE 7i7F5YNVCHWpQ4xXHRL965ASWItwj2JEeRUj2rsYke75Mhs3hlAVMoyaW+Qj jHyEj6IuchT10aNs/GkTibSJZLKQShbSh8mECvWstBpyBtGY10/1Slw05bWR jUb+eSX6C56gv5AVVdFjDBbTJkTunLhQQMUEhqoe0Dbuk4l76Jd4YKXVOCoF J8unm08/H5atTkXppH3EKpOqP017mUx2sJCmScVM6UFp1s1aSnyxligQyRFT dPxqMWb/eskUHfMFHZ9qQ/1TnSk6pCRVJa5w6SwdGCz1hOGqQKzcHoivjwbi gBtfDufDbFkMoT2HSMzVxbI5FI/L5+pgxTxt6Aux3ddX16Q0oL9QiO34okVY vlAd3us3wueLr+G7aSv8tuyA37Zd8N+1F/7fHcDpfYcRcPAoAo4448wxF5w5 4YYzrlz6Jz0R6HEKQZ7eCPTyxplT3jh96hR8T3nB08sLLh6esLaww/LFujDU 0IaxpiZMNBfBZ38UPNcn4/SaCJxdeRkXbf1x2ew4Lq84gAtaB5HinYaMU2nI 9UpDgUcK0ahF8/U6oiEy7xrQc6uRWDSi/3Yjl3wTVJFNxKAJd6MbMSIU04jR mAaMxtZTdXxcS9Xwz4lLVAWGIuk8ESXoDSuSMOlhwdZ1NQcdFzLRGpiGep/J 9MkZb2UGEAMjEbFlIr3WVtMSPAxwzMofLraX4eYQAjenCLitj8PJr5Jx8usM uG/NgteObPh+lyudcRZEJK4cqUSoWzWXfw3iT9eway/AbY9CFqMFiDpVgBif AlpHLsqv9aPixiAqbxGNMBVqwolH1DBqY6j4YdQlDaM+hRikD6EucxB1WQOo z+lHQ14fGvLvoFFSF5ry29CYW49qNiF3Ch6it/Ah+oom0F9MlT1Af8V9duZU NVGoHWcVNfbGHgQKzeJdC3GC+AzpKjW9TV3oqmucDD+Klg4/YxVl/r8EqLyJ WpAHuGdODajZKliI48x3502ZxmzFNOYI0/hEwWKmDhYJzdKZSvFcwscaAgut UzBcHYRVO4Ow5VgQDpwMhMuxA7BapA3HJYZc/nrQZ6tiQMcwXKirBsNFuvg5 vUYXBkt0oL9UiIQs1cQKbuTLliyG9+5D8Nl7FL4HnOF32AV+R0/C/7gH/F28 cNrVGwEnfdUQ4OEHQ5z28oMvdYo66emL4+4+OODqg23HfGC+xJSyhLmGNcx1 rKG5QAc6SwinBv9LLS1oLDKF16F4HPgsD64bMuCzNh6BTuG4YH8F17iwQo2O I0znOLK9c1DglS0ltJaezET7jWZ0hrSgJ7QVfWFtXNRtXNxtXORtuBvTzsXf hrG4NozHC7ViPKEV9xJaqGbeb+LnGjEWX4+RuFrcja2BioAMRpajj3DcER5y Mwc9VzPReTEdrUHJqPKOOfQTLsTE8Axp0Ood6cU2nQyrE3O9lnx158LZ6gJc bG6ykmKzsZbNxheJbDbELxUz4LEjk09yNrxZTe3dlILjOzPgeSAd/scyEHu6 EjdP5iHUIw+3veRLn4qLLkZ4ZLGiykfZ9T6UhwygIpTOEU5EoqjYQVQnUMkD qEml0vtRk9WH2uw+1OX2oi6vRw31+T34BW87SUgLarJr0JX/AN0FVOF93BHX tigVOWr35F91VJOE2lHcqRtBT8Nd9DTexR3pTDtBxB3pfCBx6Zie5l50NbSj vqJCgSJKnqART9X/mdpE5Jm0nxIhWPgHMQz9Zn5MoUKaiVYmSyWzeH/JGypo FvM/kalYOEsXi2brsrHWk8hYPFMPWjOXw0DXB4Zrg+C0i1Q4B+GgoOLoXthq 6mLtCnOsFf3P4hUz6CorYAIDzRXUci5LoWVYoaVH6WA5l6mOxlJ4H/eGzwlf +Lr5w/fkafi6n4aPx2l4USfd/XGCOsQ/++64P7484I9VhqvgJGS0EqsNV/K+ I8yXmlNcI5q2xMEO5sttWDGKgVhLOHIDsdc35XejgbUrc/DF+nzs+qwAxzYU 0jNy2NUk4/LKSITZXEWMmR/il3sgWssTZZ4FqPRkuXOrAz1hItetCwORXRiK 6sJwTDdG47q51Lu57LtxL7Eb9xO7cD+5Cw+SO8W1VZM72Ek8SG6nWnE/qQVj iU0YTWjAcHwdhojGQHQl+ugbvbcL0RuSjTvX0olFCpqD4w9OIWE2NUT/jvQ6 G09VTBZTAXDWfMXZuJlwh7C4jhP2t+G6OgaurKBcN6bA9ZtUuG1L5zENXtvy sI+PnXenw/NQOvxOpCPANQnXT+bgpnsObnnmIOxUNsK9sxHpS3nl0jpyUXKz F6WhvSiL6ENZNBmJoxJ7UZ7Si4q0O6jMuIOqrB5Us9GuzutBjRCRqM3v5rED VblNKEorRXvem9NQu0rG0FU2hu6KUXRXjaC7hqq7i+76YSkXv7uJalbNkM49 nYHulgF0Nt1BC5sJJWo2UkmFEc/S9GiPN1PRlrAyspLNYcZb6R7y8PKH0tCy 9FaqkvDx0/pp0ijmK0ahPoUEj6ynFs9cAa3ZBtBf7g/j9cFw+i4Y3x4PxiH3 IDiY28BWezmsuNbXWDhIpwcbETt9LUMYaNM8JBlghY4+tYJahuXaetDT1oa7 WwBcqePUYXb4e44H4NsjAbBb4QR7ykHfCRstt2Oz1XZ8Y70dW2y3Y6vddjLh pMabVViuIGFDJOxhrutAJOxhZWALG3Ys9iYW/JEtuA+YwpBYRPvGItovAWvX lmLLhkq6Rg08NlQgaG0BbjilI8o+GklWV5Bu5Id0XT9U+xSj+3YPesPvSDFq qpg+3OWaGI3vIw59uJfUx2Xfh4kUKrUPD1N78TBN6A7VQ3VjIo2opHbgXmo7 xlJaMZLUDFViAwbi2aHEVKE3spRo5BONTKKRgo5LCagOCD+goDGJhZCa9JKb 8tZKGs6djDe14Ksq42HDNWDDFWCDIyaX4GwdhhMro3FiXQJcvkyGy+ZUnNia hhNfp8OLtrFvayqO702Dx9F0+Ljw8weiccUtE9fdM3HTMxO3vDIR5p2JcN9M RPhlSLhEEJeisB4UR1DRVDyVRKV0o4Q/bmlmN8qyu1Ge042K3G5UsqmoIh6V 9IwKNhfFWbVoyhlFS94oWgtGpMtHtJfeRXv5XXRUUtXD6Kgdnkq9byci7c3i 6isqNekyLDN4K1+IpbmhczLqPGIqgU5G5O8TOSREYG1kNcWHFFYl0jLEUL+R zIVyKuJKIxt8JGVyvHnrSgOzP9bEHPrGvE9ZUc0kKLN1JEgWsXFY+KkeqysD aM81gubCdTD+LBir9wRj64lg2LItt9UzhJ2ePqx09LDaZi3hMCEUJoTBGPq6 xlihazQ54KdDPrS0dZVH4oOvrN4q2Cxzgu1yJ7Kxmvv8arKxmnv+amy23oFv bHdii91OrDJaTTkJPlgyWVD0CU1CoUvvWO4onbhmY2wHO1N5ptqBz4u9oSkr Nw3E+MYTjhQqi/5Ri6/WNxKQFnhuaMb59TUIXVOM+JUZSLeLQq71JeSbBiHL OBj9LB5EONlw3BD3/SGMsyW+l6zCA9bWE2kqPEobwiPW2I8zKNbZjzMGeOyn CExmLya4qd5Pp78QlBFCoiIkg0lN6EuoQ19sJXqj2G+E56H3Vhr7jUS0XIre L5cHfJUFEhYyF/8ocyENZliTCTEYaCOYEBujLeZIQ7a2BnY4YnwDx+wicXx1 PI5/lozjdI8jXyTh6KYseOzMx74daXDen4aTx+gkLilwPhgF1yNRuHIyDdc8 0nHDKx0hbLRCfdIQ5peG8IBUHjOQR/PMj+hCQUwX8uOpJCqFj9O7UJhJZXeh OKcLpbldXGOleV3iKgG5nfx8I5sPNiM57MvzhtFUOIzm4mHpZLWWaSertdRR xKKFSLTQNVqFa7RJSIgLqTQ29koUKEiEK+9UiJAakyl/5RMmmPhuKhNKitOQ cmqspZgae5EFpQTViPHglULGlMmb4yoTG8z85SI6yBIZjI9kMObSPeYTjAVs KRawuFoyywg6s61YYBGK+cbQWyS2YX4rWmaw0DHlqjaB9TJjrmxDVjPCFUyx jFDoaRtDl2DoaPPfaVGLtbGYnfeSBXJbs3D+QpjpOEr3zXVXyu+bkQ7r5YKQ 1Qoha+BgsIbb/xpsttmFb+x2kYw1MiFi+laDxaQmKyhNR+lrmC9fKV9c3NiB dNhJP6ujsUyIlZ4RYrxjSEgS6cik8qliqhxfrO3A/s+64PVZNy5+1o7b6+uR tL4E2evSUbQ6AuUOF1BqdZHV0F2MJI5gLGkE91JG8SBtFA/TR/EoY5QkjOBx 1gieZI/gaba4Yv3T7GH8Gx5nk5jsQTzMHsCDrH6Mk5bRjG4Mp3VgMLUVA8mC klr0xlaQkiJSko3e0CR03ojBvin/kF96M0q89nQSaQWY/Y+s2EqoWE8O0xrY ywO11GHzMBx1iMWxtck49kUqDn2WhmObcnByZyH8DxXh3IkiuDqn4eC+KBwh MOdcUnHBLRWX3VNx1SsV10+l4qZvCkL8U3DrTApCg3g/IB3ZEZ3IJjDZBCab lWUWgcniTpCT0YU8ApNPYAqECE0+YcnJakFFugpVmezoc1Soy2cHP/3EtEqq mpo8MY0e0kBgGpvoH03SIEJTi7iACpv+xoHJK6OFK2FfU6BM849JUqz/l+AZ RzEGzD1VmgNWIxx2M+DEFfQub20x870lmPVrDcz6UJMGQkbIxTwyMvcj8V4u DeTT5Vi+cCUrLiMsXWAKncVmWKFhBmNtvmZ65rBYZgbL5SaUITTUl/F/0Vi4 DP9Ok9Fj8yuki6WLdSiZkUUL5IrORNsBpmTETEfmw0LPSWFkNWzJhx3dw95A XFORgJjyh1hD1ImHsSxTDSsJDzPNlTDTpZmsWCVdO9baZCVszRy5DfCH5lbg MB0RnwQikk4scqfwiPGrRoJvHb526sXeDQPw+nwIl74aQMSmTqRsqkfepmKU fZmK6g1hqF19FaWrrrFSuof7affxMOM+HmXex5MsKvsenubcw7NcoXE8zxvD M+pJLtHJvYuHucN4wOVwL2cQo+xY72b2YCi9EwPEpC+pEb3x1eiNYxMSzUor Ip19fywaLofuVd6kl8f6zOWRWOV1NxMltUDkZwog8nSskDWBkKZkDWQ47AxF 2Wtv5AAtHLSMxOGVCTiwMhEH1mYSkny47SyCz8EiBB4nKG4F8DucitPHUnHm eCqCXVNxnpBc9CQs3oSFFnztdAquE5Ibwcm4eTYZV84kIj26E2lxXUgjJGmE JI2QpBOSTDpLFkHJzpaP6ZltKKL1lhCSsiwVizAVKgsIDCGpJiQ15RQhqSUk NbXKpRcISY185qYa6iRIaqULocihlAokt5UJOBNlBt906gkTRZYIs7AmJDYK JEqghZCxnBezUsjEXiBiz/9hlak9CaHMxGUcV5vZixs7vIeZ7y/FrA80MYuI zPw1sfmAjclHulAnKovZhBhqr4PJ8vVQX2BCazDDMk0L6OtYwJi4mBIXU+Ki r6uPpcRl6UIhPSxdpKfGG12swRJBCjX5MXeuukKLWOp0At1ViqOslmixWbEG tnQTO7qJveFaCRhHo7XEhZJQsYYpmw9TCZU1MCNd4iJFVqarYGu+CitNRZaH vYyLiTWfDu4pdL5Y72Qik8WmpEhCJdq3mi5Ti0SfOqT5tSDbrw17Ph+B1+ZR XNo6isjtQ0jbzjJiex0qtxai4ZtENG8MQeO6EExkPsSjrEd0i0d4kvOQiFB5 D/E8/yFe5E/gRcEDPC+4j6cF9/CkYByP8scwkU8nylNhLHcQd4mMisgMpHeg L7UFvUn16E1k7RVHV4nJYpOSgLZbYdgz5Sp0EWWEXE26/eepUXIxfCRkIY2U T47HKsAYOqhJtMwkLY5vJsyp/VZR2GuTiP1OOTi2sRCuO4rgdaAIfseKcJJN iufBNPgcSYM/TSaA5hJIZs6SmfNk5qJfKi6RmcuBKbgSnIKr55Jx9UIyEiM7 kBjbhYQEitVYQmoXkshNckaXGlIyRQGWkN5O31Ehl8jkE5kiIlNMZEqJTBmR KS8lQkSmolK+zEF5rbg4EFUvXaVETbpcyQzpgiWl9YPS0+M8HZf/+zYqyu84 BCpWUqdmKzntZPaLmgTKO3xCHKR1s0oWe10zB5FsydvV5rLUxK0a1pjb02lm 0mE+eU+D6Ghjzod6mP/JCiwkKovn0VXUjWBqvB5mZuuxcJEZNDXMWWGZY7mu GfSXmWLxAj1qGZYQlyXEZTFxWUJS1LCYt7+QWFm0iG41X3YWYy178uIo8WJK VoQ9iA9LsmLNtW9DVmwNBC9ryQurMMO1UproWoiRfhtKsOLEf092yJa54Rrp Ejc2EisibsCBesOLEXuhWK8Y8pJGXvLISSlVhSjaSqxPo3RWRbpvC3L8WUqf 6cLBr+7BffsDXNz9EJF77yNt3xCK9nWiZk8NmnfnomN7LDq/vo2GTbdpH0/J yVNyQhU8xYvCJ3hZ9AQvih7jedEjPCt6iCdFE3hUeB8TheO4VzCKMZbod8mM iswMZHWjL70NvWlN6E2pITe0mAT2KrEp6IoI/99wEc3KJCrmU7N6dsTFXk0a Jf8HeQCWsqMmURGrYyWfSnrwYuwwicV+xxwc/aoILtuK4L6vCJ5Hi+C8Jw0u B9jUk5VTZMXHNQ1+7mSGRVigTyqCyMrZ06k4R1YukJUL51JwnqyUcnFHRXcg ih4TRY+JTu5CDHmJJS8xVERyG5JiVUglLBmEJYuw5BCWPMKSzyKskLAU0l+K CEsRYSni1yusEZfvEW/2FksnbRY3yNcGyasemLwCe5hyLoKJgck0F54csJ+s S9+Eu9gbyuEuIiHJ0cRRTVoy/4hVrEmcqNXmiixW8rhyBtZYOOJfsNaC+/sc I5jNNcan72ph1vt67Fj0MX+WAdTnGnL9k5OFlBinN1+vhoXzdPlVRdDKwnns 7ucvw0JisoiYLBLnnCwiI+t5y+Z/kZAOydKG+iL2QXMXwUjDViFF7lFMdd6m xGr5GpIiXGWtRIkdCbEnHw6Uo/FamLBjN9FcBRMd3l++ViJEXHTC2ny1FMLh yB/U0UymxIE1pr2pNQy1BCUswE5l0UXoKD50FJ9aRPk0I863Fcl+7cjw60Bu QDcKg3tQdr4X1Rd74bb7Cc4feIqII0+RdvQ+io8OofZoO1oPVaJ7fyZ6d0eh +9soPCt4STpekIwXJOQ5XhYLPcOLYhJU8hhPSx7hUfEEJoru4z5JGSsYwQiX hSp3AAPZd9CX2YneDDpLmojNorMkF5KUdHRHR3+nJFWYcgmYSaTIm6W5cvkP c8lQpk/fyTPi1pNz4pJW8ilcKebFJUqgwdUhj43rz7SAyext+NzgOA5/no/j 24rhsq8Yrofysf+7NBxhq3/8cJrUvbi7sOVnm+/jmQZfGos/YQlgex8QyGKN sAQSlkDCcuZiMvK5wPO5uEPjOhFKYEJpMCHUrVAVwiNViI5RIS5BhcRkFVLS CA47lgyWqFl8VrIKVcgmLDnsWLLZ4mdVSudvIqeGjpJbK1gRDydT+t5i5d/k wfkpTuQnyGKqf7ObdFqFkzchSCLEhdWX2Uq1STZW4mOysRJrLWWZzjWB1Tw7 rFXfiE3LvmPptZxdvT7mzTGE+jxDLn6yssgIi8jJ/Lm6WECpExUbgrKAoCwg KOoERZ2gqKvzuFCIf09okThqY/5CLUy+12XEusmYXmKis1JJyvsnmLHushCU kBBrEmJDQmwNpygRL6+wEmNayCQgZoZrpdhoK3OWZmZ82QmJAyFxICQObMUc TNmymVhBX1MHsZ4su07lSmcVRXtXUfW0k3bE+7Ej8e9CBgHJDbqDonN9KL/Y j+or/ai/2gfPvS8RfOwVbru8QprrMxS73Ued2wDaXbionUsxeDgFg3tpLd/F 4mXJ99QrvCp9iZelhKb0OZ6XPcPT0id4TFAmSh7ifvF9jBWNYaTwLlT5QxjI 7Udfdrd82eZMJQgrrYS2koWe+LjvlJPu5NfedBog1tJv0m3YpghAzA3tp0ZU rSZHv8WoqjSuukq0KcarsJTOumqKECGDmetht3A/vrVyZ/nlhQOb2LrsLsKu renYtSsde1iCHWAJduRYGpxPpOGEWxrcPEjMKZZmvqnw8k/FqTOp8A5Khc/Z FHiTFG+Skl4pLixDcTmn83g2og2XxemaISpcu61CSJQKt+NUiExS0W5ITIYK CdmkhraSxBosmbaSTFJSyoSNiJM1ZyC1Uj5lUzwjbjIaoUpAr4nIaDGYnm30 diE6iYbdZPVpIhaeAGOGlNPiJGQunqbVFqvYza2xcMIaS6FVBISyWgXTeaZw mLcOny/dji0mh7F7pRsOfHkSc9ifzJ1DWOYbYgFBmT1LF3Nn6xIeiqDMnyek A2vCMo+wzJ9PEZb56kL8O5J0MI+QzF2gyYJIvnyBneU6GNJSjNiPG9FSjLVX cuXTHtjST8JiSVisWHgJWGwMFWCM1ohXey3UicwaGC9j22SwTsoptpRAEWOX 00BhH2ZPWOwJiy1hiXa7jVi+wjFe+VQZok/VUo2swVoR79+DlNO9yDjTi7zg fmmOqPzyAGquDqD+ej8ab/RiKO0lAk78BqEev0HqqR9R5P0Mdd5j6DjVi37P egy75WPkWAJU+xPU8KrsBzrAy/JXeFH+Es/LX+ApeXlU9gQTZY9wv3QCYyX3 MFI8ClXhMAbyB9GfR1PJpankNMthV5ksvdJzcSc5QWZFA2bKPmkusWIlsTJZ br1hxUF+30/SSpkVcmInBlOl4dRVMiumTlwmTnQTcxjM+hbrlztjj5MX3LZ6 sZ2njh2HExfLVvKybXc6duxPx266yl66ygG6yhGWYMfoKs6sYk/QVVxYgrmS F5egFLjSWVzY5rucTUJcqeodZZsPvjyEsyHyKZqXoolLvAo3lVM0bxOTcGIS kStdRgKRNJQoohJVLJ+q6TEdi1/I1mpggbeji2wlK5V7s7eRcJAiv+T4IoGD iFxh+2HhNIMUOOFXMJlnDst59lijvgmb9PZhu7UL9q7zxOGvPeD8nTtOHKaO n8TsuSvwyafa+HSWDmbO1sHsOTqYQx7mztXBXLJgab0OljbrMIdszCEPcxaI xmP2Ah02NbPma8HClEZgJl8MQFxry5YsGCy1JQ/2LHkcJBaMBQssr0z1VsOc LFgoLMjmwTKL5RNZoNZK298aGPFlXQ1jIzkBy0ECgS81YbAnDPbsruwJgx1L K1vCYGVsgWjXCCm3PMajEDGeFYj2qkfUqWY2IHQO3y7CcAeZQX3IO0cYLg2i /Mogaq4Pov7GIBvqlxhK/x53M39AkOsfcMP7D0jy/wMKA36DuoAn6AwYwQCb lxGfKtzzyMS948noO5aElxU/4EXF93he8RJPScSj8meYKH+C+2UPMVb6ACMl 41AV8d8WDqG/oA99+SLFqpViiZVTgd6sfNxJTcakdbzB4U1dpSaB8H/fQsHK gCgYvI2CnbGTNKctnjd2IKbiAvMrzVZDfxaf6wX7sNnCA4e/9MapPd7wc/bm UhHXESUP/4bVXDCruXVuYmOymQ7yLR1kB4nYzTrrOxKxlw6yj43JPlKxjy6y 1z+F682M688Y/6x86350iTN0iWAu/7NsPs4TAZ+fLnGzn6QJ2U1VipNpQlL+ icn/nCgkvll+y5ar8T53+9Xc6WWZzLOA3fz12LBkB74xPopdjh7c7b1wdLsn ju/3xIljnjRED6y1dsAaKxJhac+vYoePPtXCx7O48mdrY+YcbcyiTK3WwtSa u/KnXP7v4ZO52nIiqJGTFLYrZVqL9Hhx5Qtl89dfagMDDTsYsicwYqVkzErJ mIvdhBu/GRe7uXi3SV9Z8FzsNob88rZc7b+GLb+kHV8v8ZrZc+uyNxN6s87t uOnbmXOdm7G14lq35qb/vP4lol0iEXMyAzHubCM8KhHt2cC13sqNv5NrnRt/ QC8yzw4g78LgVCFXH8I1mPYKQ5k/KJ/7EFf8/xPxQX9G/rk/ofb8D+g4/xAD Z4cwFtiCB/4lmGBHOu6SipeVP+B55fd4WvkSjypeYKLiKe6XP8ZY2QRGSu9B xV1/kPtaf9EAegt7qDY5WiqPbUROASulVOxWIo5M9Y2ldW5uMH3Lf7Pdm3M1 iPwBSwN5jtracBVsuMZtxYyokLLGHbjCxSqXMgnEOp/9DVbrOmPnSm+4fMs1 fog64S6tF6516ThDWur/Ii321SymZbEXtXSg5FWx2tKWf9+GsqJdWGCluckl eR17KxVM8LlcnDufh0sX8nCNx5tU6Lk8hJ3Nw+1gKpD3A/IQ4p+H6z55CPbI 47+S35k1NTD//5S9B1iVV741vh5Mpt97p09ij4q9KwLSOXAOh46mziQzk96N LbaY2FtiQylWUKQLSO+9gwLSOfQqdo2ZmTv3pvBfe7/vOWCS//c9n8/zOwdQ efe79lq/397v2XvtUbcFk/+P4k7nauMu/Uok/6VniafqAeRl9ABS6P8nSX8f Ut/WnImCSd5r1st4Yfn7eFWzGe/47sCalz/D+rc/Y5L/FBs//hQfMfxcPBju lIyeIWSg3KyXkwtDw0s4ElA79ay4p1RLT48f8t94dpOTcvrLivmu1ICOGtAz 4btTAx6wWaYMfuzJf/G01dGKAyBrFoqVnCMz2bva8FZcbUWPaO28ZZ/q7MWY Tkf2W/JV+QxDS/5ryX9X8t+Fef5WyW3cKr2N0I3k/2byfyv5v5UzhE/KEfpp NWcK5P/uBsQcaELCF61IOdqGTA5lcwMMKAoySNY3Mc+3XXmAzqQv5ff9aY8w mP4IJ/Z9jQuHv0Hy8W9QeOJfuOZ/Fy3+nAEcbcDAFyW4sS8Zg5/FoYkJcbjg HobyqYP82+jLG0Z37iA6cvphyO5Ba3YHmrNa0ZjVgMbMa4ofVDpnCqmcTl8x 6uBnqg4cqANnefqtadgj90brzaQIfk5yeDDde8LFZowMVAlIawH2BtM9C/DP YDnNHQ7m7+JF+2344Lmd2P72Tqb6nYpVh7PPOEmeJ+Ct4WhZ46WkfY2nmZTB zxQhaERQCBpyQ0MhOJMbzs7wdHJQRbBdfRRw5Egi/I+n4AQj2J+k5/sFxqVj KYg8moJoRgyFcZnCuExhxB5k7OfP96awi1JwcUcKzm1P+YVxVkA07K0UH5+x bgqPe2OpTiSqN5aZdPP5LzbO23iLJDVDw/GDuQauM1fDb/4b+MvK9Xhdvx3v Pb8Ta1/dgQ3v78DG9TuwfvMO/g4/V08WMT9XVRyu7qY6ITOBs6siDpkJHJ4w amPFqNWtYsTuM6Y2qOcdcCBkOV8HK+rCmrpYSV2s5EDIdrmoDUIbXsonEWO1 QZ252HqZyV2/T/KVHW6vhCs14eogHjG6yifNLlIT5ItcdjRcchOLcH49dfFx ArWh6CL0kzKpi9AddbjE8U/0wWYkHG5DynEDMk+2IzewXe5JkLqIf4C2xIfo TFZ00Zf+FQYzvsJQ1lcI3PMvdvC3SAj4DnnB36A6+Cs0B91EV0A7Bk5cw/CR HNw4kICenfEYkmci3UZv/k105w2hI5e6yOlBS04nmnLa0JjTOOrrlFnAOpGB hiSjLiaqfjSOqi5cFFcn1ZdG7os2+gZQFBpZG7xEOhmtpWK/J0UhfQSkl4Av LKf/Ge6L1uNV/U5seGUXdn24i7Vhh2ANRaFhPfbWMCFRFGaqIjTiCYxGPOZV 5EAmaCgFjWCCA1QtbFOtDY4fvYIA/2QEnRi1WQpnRPP7y4wE6iOJ2kihNlKp i7Qjqs0SdZFOXaRSFynURSJ1EceCEf0p///WFOWUuUkKIlZKzXBQ0XCyNk6K hNOI4nGluPSM8bly8h516mGsNHdhwdDDncXiuaUf4K9OW/GWzy588PIurHuL yHy0k8ViJz7atFPoQuvNUaefq5dUiNCHSRsMbxclQXgJVJyc4UFUnlDtN2yW 6igQD0UgNoqfrclKXfpAUyQsHBbztLBc4AarRe4UiAesKQ5ROB4TiJUX79eL 98rg7xKbEzV2QvsuvGOqgMpw4VTIxUE8JXChMn7L4sQxpVAGR0tDxTcwVCJi CGfXnseFjXEcPaVztpCP0G1lCBHq2El1cMQUzWly/JE2JPsbkBHQrjztegbX OWhqSlDE0ZHySBXHIwxkUhzZX2E45ysO/r/C2RPfIebUCLLPjqBSeH6eu4+u s/0YONWMGwGlGGbPD1AkLfvi0VtwS1rYd4iNOnm9aMnrRGMexZFHceTWKp5N 2cL0LAP1yTGmouFgpcwSZcGQadIoDrnx2Uwq47dSF5qVXlIbQhdKjfWRupB7 oU260DJTvoVnbbbi3VW7se3N3di1YTd2rt/AnvU1kyY1VIiLsKvxkUGVuAhi UDD8OQuJC4dSHFl4M3kqxHBTyOHCIRTl4uXsaJTLVqM9i38iTp1MxukASoUR zogJUJxhkk6OOsNkUza5lE0eZZNP8ApYTgoom4JDo85KOZRNxi5KiOUkcTvl s5XlZ2MyfmJ8EGtpr2jHylXVjpuiHeIkS6qYOf3ApcdHuvSYSZ+eX8La3BVO 5qvhNfdNvGi9Aa+6fYZ3ntuND1/djXXv7caG9btZS3bh9TVb+H9WUTe/kupZ paV2tI/rZxQioR3WFo3QjuOTqi+HzXJhBa1a165ULdRVG2hn1UJd2KdbzHeD JeuK1SIPWC3xhDVlY7Oc/4+SsWPYUzbyFGWSwMlGSEcMrpwpGRvKx4NjOBHu ahAOe8Jir2Mdc0F/0SD6iwcwUDKAfkbw+2cQyhnhhY1pCN0kZFOKkO2KbML2 NSCKE434o61SNuksCFlBHVIjdXH30JhwH61JQjdKUenN+BIDWV9iMPsRbuQ+ wnDeI9zKf4Tzx/8X4dRNeugIyi5+g/qL/0D7hVvoDenE0Nka/HdsBb5LzTLp RjjXtxX0ormgC00F1E0BdZNP3eRXSK+zhsx01CZHq7r5Dbtf0GCsbkYLitGI xkktKFI4qmi0FI1OikbQQe8gjnVShPMCXOevwytaDin+sgeffbAHuzbtFpTR iEMyvKUxh68MqsjFh0McH74K7YgYVY6iHh+pHqNyWGxcRLExKWezWhsDj8ex wCTibEAyzglPMkY0I56RzEingrIYuVRQARVURAWVUEGlVFAZFVTOwlNBBVV8 Lnbr82eqr1IRVZTP4pPD4pMhvMm2UI0bUhRWjh9j3UMRWY1axImxqcsP7HvG iIhFR6QYa85QtOYvw2/xB/iL41a87rUb7/15D9a8uQfr1uzB+o93Y83m3dSO zpeaXaX15Vc+8NN5SzVJDWmNGiJYro+nGVGVPZydeHkbVfdPKf7P0qnWRz2H QPVSlz7qflg2V0cR6bGCArJc7Akr1h5rCmilhRAR65alIiL7lcYzjMXJ8gw7 ERwcONq5w4qaIX+oHUc7LS/jgu7CPvQweosYxSJ60VPai/NrYxG6IRWhH+ch ZKuin5BdtQjb34hI6ieO+kmkflKpn4ygdlTH3JF6abxyF63J99Ge+kB+35P5 EP1ZDzGQ8xBDuQ9xI+8hJ+UPcavgIW4XPkTY+REkXhpBUcQIaiL/By0RD3An 9R6+q7iNkYYufFedja7CYbQXDsrNocJlu6mI+imifgqpnwLqJ68ADVlpqE6K estIAKN8rDgeIwkcBQmET43VWPl4SeloKB1FPj6KhQCRd5PP8HylB8cKEsJy xpvwtdqKN333YNPre1hvKJ+PP5HqEXLxU2qOqhlXRTferkI7nLIwnXpLGrgr VHAlFVxVzbg4GTWzSb79Dqf8L+NcwBWEBCYjNIjVhnFZeC0JH5kg4SPDSsIo pG5KqJsyRiW1U+WvuFtco3ZqqJuao8JvSXz1c1zjazWrUdUXio6EhoQnmdBP Jmf7KRuSTaMh+xUOxE/xvVLEox8Vj+rvozN5lPio/j4KTnYzVsF9zht4znID /qrdgTdX78H7f9uDj96lcNbtwdrNe/DW+l1itEbl/MKkHEU94p3q0XmZFKSo h8MEgdk4pQgRNQ+Nk3qk8e+lxbONUTjfM00XhunL5umxfKE7LDhgW8HKY8nK Y0XRWFM0NqJyiUGftZgZiacGFIo9R6d/gj2Ljj0l42Cn57sbf7UW7Xk96Mhn FPSgs7AHXUXd6CpmlHShs6wLZz6MQcg6jhE25CJkczHOf1KF8ztrcZFFJ+Lz ZsRSNAn+baYnXLVxd9BAwbQk34XxIJzuzPvozb6P/pz7GMy9j6G8+xjOZxTc x61CRtF9Fp5vEUvB5MRQNInf4U7VCEY6GcP/xP92XUdn0TAMxRQMBd1cwllM iXqqcnENRVPOopOP69kp6lPcX5hcARW1aFW1UClW7ux9pdA4reRUQ8Npy39I sbjaf18sfiSDH1bMWA3HOR/hJc1OfPjSXmx/by92btqr1pmfsvcUAyhTuCo1 R7yLXvZhc4RuvDmM9yYBvLUkAMNby3m+lrrRUjeuLvB0cVJl87EqmzP+sRyc JeBCYBLCgpIRSanEBbPMMDL4dU5QKgr4XkLplAekolK4WVA6NSdTUceop4Qa RJwUsmnk66/k1/WM6/x5nX+KtGKqVkuSsPkrYBnK5UAuY3MSot6ONVNzud0K R2JqVJDROc5dWe2qmpU8piCO3Symu8F5xsvwXvABXrTbhr977sHbL+3DB2/s w9oP92Hdxn34cPM+qsLvCUrET6k9vxqjGqXu+ArVSNDcTaB5uZpk83NVNcLE eaU0cfaRxuiKKTpV46QcNbB0vjuWsdQsX+IBi6VUDkuNJRVjRcVYWxpNoD0Y 7rCxoUBtbd0xiyJ046/U8UeuaM7uRCvn0G2cKrTld8JQwCjqIDMZpYyydgS9 F4mza5Jxfl0Ozm8qwrltlTi3swYhVMwlKib6SAsuH29G4aUbKI0cRlXsTdTE 30L9ldtoSr6N1tQ7aE+/I23NerLvoi/nLvpz72Iw7y7n9XdxgzFceBc3i4TC bhbfwa8RGTmC4rwR9LWN4F+3R/DdVyPoLlZPlCyhakp7lUMcSqma0gY0logz kMtYavJRm53ytrHErFAnuSbRjJYXIRpHRTQcyXqzxPiw00X4UjW+0qXGjYpx c1RVY/4aPCy24DWvfdj42j7sWLcPOzfvVKqLkMwTqlhMIbTiqwiGaZFjDm+t IhgzKZknHxOMl9aVgnE2FpqN8m0azvpHIzQgHhcDE3FJVUy8qpjM4DTkBaei iKopC0pDZWAargZwjBqQhuuBadJeqYnRHJSOVv7b1lNpaJORitbTKfw+BS38 Pc2MRiruOtUm7MyqjynqEX5/BbuSkb010agaWwt7qsYFDpaKahzkUNdDTgVG VSMsfnywbJoO1tP9oJ31BvwsNuDPmh14zW8f3nmFKnlnHz5ay9i0D29v2Es1 rKI6VomS48fu93Pzk1+tYvi5+SoCclMGb74yONIlkIqA9IqACKIns467xvGX 6jxNiGelcEAXns3sTjtH4dnsBwdnPyxZ4I6lLDdLKZ5lLDfLKZ4VKygiS47d rMS830pMfa1X6jGbrzpYrdSiJs2Auox21Ge1c0bQjqZcRl47ZwyMIkaJgbQ0 oKncgMYKA069n4yzH2Xj7MZCnNlagTM7ruHc3npcONiIiMONyArtR/6lQZQI L82YG7gWN4y6K8NoTLqJlpRbMKTfku5NXdm3KZ3b6Mu9LR8PD4oovI0hxo2i 22YYLrpF2G4U30JU+ggqDCNouzmCnuIbrHtDaC8dRFvZAFrKetBU1qEcdVxW r56/WoqGgjxUZCS+o8LmYEnFWH5PMbLMeMrHJsrcT1GMi52iGqNizKRefgaL Gd6wnfUhnnPcgXdf2Iet71IxH++Hp4ZTXpfVZtK4Zpy0fDIqxky+jlPKjVaE j1SK+MxRKkfHUqNjmdGx03WjqvEwlRllBe4fcPZYBC6cjOVMJoEjs0REUTii zKRQLJnB6RRNBoopivKgTFQFZqMmMIuCyUZDcDbFkE1hZKPtTDbaz2aj42wW Os5nCaPG85ksrJ3n0/l9GjrOpaKd0XYmFS0UU2OwIqBrFFAlR3Vlh5JRvCcZ OVsT1OMgf8d0pCrHksoRgDI5O1E54vmTC2uNlqpZQtXYTf8z9PPex7M22/CK fg9ef34/3n1tPz74YD/WbNiP9zft5+8UmhlHKUjlyKB83MTPpHTcFOmIn4mC /Zh0xiI5VjouTspHSu6wZrOsKeaVDmPszjmAXMhR2qLF7li8xB1LllFCFqxB Ila4Y7mlHhZWInT8WovSKwZUJBlQlWLAVSqnJsOA2iwqKNeA6/kG1BcyihlU zfUy/pyqqaVqAt5JQvAH2Ti1vhCnt5Tj9KdXcWbPdZw/QOV8fh2ZIb3IC+tH ceQAymMGcTVuCLVXhlCfdANNqTfQms6hVQaLRdYwunJuoif3JnrzbqI//yYG ChiFN6meYQxyCDYk4wa/voGBoiH0US49lEsn5dJe1o/Wcg7PytWzVMWxxeXX KZ1qNFA2Nfk57xols8JJSkb0riN719HSXZEMS7CjmOmJImM7RjKUi5bFRefg p0rmp7Aw/xu0Szbhrx4cTfxtPz5bux87tuxlVRA9q+jFy3WVqhlFPX5kpFEr pmAve+t+RC86nVEvxiqj7PCwxunDF3DhRBQuBVxGBEUzOi5LR0ZwFgWTjeLg HAomF9VBeagNzEd9cD6aTheQ/AUwnC2gGArQGVKA7tAC9FwoQO/FfEYeI5eR g56L2YxMdF/IQFcoBRRC8Zxj9TnD8VywYrskpkYVXySjZO8VCueybJ0Qjf0K 3Y+KZuFUHZY94wOnGa/Da8l6PO+0A3/12Y83/kLBvEXBfMRg1nlroxCMjzjt TejlCUUxbqYQIuH0UOjlF/ClXn5MKV46oRQdPLQu0Ls4/ka2bgWsHEY9zect 0GP+Ij0WLGEs1WPhMjcsWq5D4kXlrILMaANyYw0oEOcUXFHPKaAyKqmMKiqj msq4SmVcpTKuFjGojKusJ9Xq1s8KqY4sBH1UiOCPyxH8STWCOeMP3nMNiac7 kR7SjZyLPSiM6EVpdB8qL/fjasIA6hIH0JAyiOY0Dp0yhmDIHEJH9hC6cofk xym9+WR+wRD6RRQOCSWY8WVQWDwUDVAUA+gt7Ud3WR86ynvRVtGDlopuNMmj HA0mxydxyPB1CqMyN+td9SM4eyEMmfbUHrQUtcSDAwdFFI6sI6O1xFcKw0xK 42fQiXOHzfWwmvk+fO0+w1vP7semtymMjw8wtpgJeycz6X72m8eEIcJLy6Ii g+LQifj/E4aeHasI4/hYUazEhePhuHQyGhEBcawgSYjlECuRFSOdQsgJzkNh UAGHXYWoCipCbVAx6k+VoOlMKVrPlqL9fBk6Q8tI9jL0hpWh71Ip+sNLMRBR gsGIYr6LKGQUMPL5dxTJpWx0h2Wi80I6DBRIC6tL42lxhkAyq4qw80tEyZ54 ZGyKgJ2FEMVoJXEQM0CW5QVTOFCZ+iJcZr0PH6steFG7B38jbG8yn7z7HivH ugN4l/AJ0LxFaFePI8lXUxK+fPV1E7FKhJQE5TJGEj7wcfNmEEEZHkROkYWn Titk8UeJ3FIE7WzDKWGTfsyA84EGhJ82IOa8AQmUQXKEAWmUQdZlSiHBgHz1 lIFi42ZOSqAsj7IoGN3MWaqeMiD2qhUwjr6ejhPvF+Dk+nIEbKmSRzDGnjQg /lQ7Us53IvNCF/LCu1EU1YOy2F5UxffiWmIf6pL70CAOLUtnYs8cgCFrAB1i tUnuAGXAyB9ATwG5Xiii3wy9Rf3ksHjmJp63dZf1orO8B+2kfmtlF5orOQEx HgJc2Sgdnq5TAtWFReo+3Kdgb+Go8F901gqF/w4q/+WzdMF/W7HOf7QwuJL9 YtGbznEV+f9nOC3YiD/r9uLDVw7gkw/J/c0HmMRXK/T3ZC/+kq+rpARMoR0j AdLfS9Lfh+9iHZfovidlB3q7sQPd3KQERF5TJbBOHUidPxKKS/6RiAyIQRRn IDGUQHxQFlJYA7JI/XzSviSIgg8qQ01QBepPV6DpbCVaz1ehI7QKXRer0RNW jb7wagxEVmMwqkp9sDIFwzEVjHLTfryh6CL+fSH6I1k3InLRdSkL7awVrSFp /J0cXHEQV+OfSBnEo2hXDGyXOxNdLWWgSGDuJC0WTuZseeqr0C1cBz+7Hfiz 5378/UXS/w3Snsi9u/4AXt94UKyGd10lxpaiivpoV0sJiBCEXy1eVlEQHEH9 QgrAx02hvkJ7TyJG6hM5T1LfQ+cKd63mTxIxR5zY3YrALwwI8jfgbLABF84a EBlqwOVLpH8U6c/sn0baZ3JclM1xUW66AXmkfX4OqU3aF5D2Bcz++RwX5ZH6 OaVigxnlUqpsoTnyZh6OfliK8H1N8pTESP82XA5qQyKvkxbajuxLHSiI7ERx TBfK47pRdaUbNUk9qEvpQX1aL5oyetGSxRSe3Yv2nD605/ahM4+8zu9FVwGj kDwv6uFkuwddpd0cB3Uz5XfBUNFJzneguYrjIEaDevKo9HAqr2WlqkRJXt77 pon3j1DeyvjUm1MIW4X2GqZ8F9JdUp6xzJxDSfN34Gm9Ha/6HcSGNw/i0w0H 8dmWHdLu0mjqJ8ZEsgsF2f/LRHcZOhEK5b3cRHgzvBjsOL3ScV5uenaejh33 PcrbIOxYGCJORCPqZAKiOZGO5dzgSlA+0kn1HFK9iDQvD6TIg6pRd5rzp3PX SNEaUrWW2bsWveF1pHAdBqNrMRRTi+HYWty8rBwEfCvuGm7FX1W/rmIohwLf uFyGgdgS9FMCPVH56CT9DWFZaGEVaDybTOonouZ4PCoPxSJnRzjsliu0nzvR FUsnPQf76e9Av2wzVml248+++/HqK6T82wfw9kcHOPQ5qPq+rYYHc4XIF15K 5hcjSJ04k12kfh+mfR8l9fPdTyrBj5nFx8h/PTOInhrQUwN6AaUCo4eAkRpw c3HG0xJDOxw/bMAJ5uPAUwacY96/yLwfwbwfG8McHWfAFQ59ksX+MQ590oz7 xyiADAoggwJIF1tsmPuTGUkUgnA3j89vxdkPinBhy+hBhuHH2piaDIhjfUni ddJ5nZyIdhREt6PkcgfKEzopgE5cS+5CXWoX6tM5XsnoRnNmN1qyu9GW0w1D LiO/G+35XWgvZBQxSjo5Z+6EobyDY50OEp9Te3lUtUESXx4RKgybSP7qshqU FJaqvuJ/YErSyLTkIIasK8h8S3cl2XOw48Bkb2I+E73GXmG+K5P9UvPnYDtn PZ5z2YN3/3wQWz8g8zeLvhP9JHrvt4/1nyf7z0h7T90o7T3ZX5L27Csv9pWX XqX9aH/5K4xfq/ZW6OFzCD8egagTlxF9Mpmsz0IcB/jJgcXIDCxHHtleEniN Sb4W107Xof7cdTSH1MNwsQGdlxrQE9mI/qhGDMY0ksmNuBnXSJY34k5Cg2T3 nSv1uJt4Xfk6sZZRI78evlKFofhKDMSVo5fs7yL72yPz0MrE33QhDQ1nk1Af FE/mx6L0YASm/nYBpv1+CSwnvgLnOWvgwRzxrG4f/vKcckTmG+8ewJvrDuLV 9Qfh5rwKerLe3UXJGR4qal4CNZnnBfOVoY+PmxJmgv9mkvy/IN19x1DeCKUH PBkeEkY36LWuE40L104YcIxsDyALz4QZEBppQBhTfSQH+jGJZD7ZHke2x5Pt 8WR7PNkez5HOZTI+dtSJXFklaY6zaysRur0eF/e1IuyLNoTx10cF8Vcwyyez mmSwmuTwEgUUVDEHUmUJ7ahM7MDV5A7UpnagLr0DDRkcmWQyY4ulgzkdaMll FJDMRYzidrSWtqOljMTmgKqJ8wrhzie8yOoYwnCpRrVbqiqvR2lJtfpBhHDM d5aO+eJ9pXDMF9b5f4KNpTMm/2EWuT+G98aBDnnvSN6LvVrOdr6S+zLrc4Cz 1PwN6FZswyveB7H2tYPYvu4QPt2yjzOs1ey91ZL540T/jSPlV3Ga7Mmpm5Hw guyeJLunXiG8meynJ9Secpc95a7TPkb4lQjjqCbyeBSiTySS8BmICcjDlYBi pAaUI5tkLwisQVngdVSdakDtOY7rQpvRerEFHeEt6I5sRX9MKwZj23Ajro1E b8PtK60keCvuJbVKYt9Lbsb9lGbl65QG3E2pl1/fTKrFjcRrGLjCEVFCJbpJ /I6YYrQx5TeHZ/M6HPCfYdl5dQ8ur/4Iry4+gNm/t4V24QZ42+/As54k+4v7 8PfX9+O1Dw7gVZJ99TufQufkR8L7ScLrXVTSu4qxoczxRs57y2G+t3xCJDK9 N4nurZfP3Uj2nxE0BURPQihpbgJQB52ry2R1x+4+JvZDYmsKk20Ak/opDubP MqmfZ1IP4agmlKOaC6R6qOocLralBCe3/ERdd3Z2Yw1CdjYj9EAbLhylSvjr oqmc+HOk9gVSm9PkHA6U8gW14wS1Oe2lgqqpoGucJ9SKR7CZpCpV1EAVNVA5 DawZjawRjRwwNXCQ1EBK15PSdZUKlc2kXdITqCalhWVSRUUzSkrr3hRNGidP x3gSNtYa2DLsjWElXCbFAoU/YMrvZzJmY+of5kpjF3vyWnyGb69OYB1tH+f1 YnNfWM7+CL6Ou/HmC4fw8XuHsH0T39euYSetljndTLDbzNhPzDue8sGEh2S1 wmwPvQ9/zB55Uu0TT1O/uHPMfmIsq8cj/MglRB2PQ7R/GpmdwwlRERJPliM9 oBq5gbUoCqxH+akmXD3bguuhbWhimmoLb0dnVAd6YzowcLkTN+I7cYsF805S J+4y7qV04EGqsvLmYVo7w6AM3yfjTloTbqUy45Pcg8l16COxe0jsTpI65b3N KH93IxrfWYvut99HxXt7UfbeTkT+7QQurhmGn9MuvOCzB3/5yz789a39+NuH +/Hy2gNyAbiyAcJX7n5zI6HdVEK7u44h9c8loT11CrG93ESsktQ2klpQ2kxS +qcmUnvI8IC7BFAPN85al6ufs5zeXI9zu1px/hCZy2nrxUDlpElxhmsSmZ5O WmaTlnlM6oWkZQlpWUZaVpCW1aTkVTL9GilZQ0rW5jM4hJHnt5KStZy61pSP nt9ayRCWRMKQSDlxsg0FpfVIyyl7XXUOsBnjsW8mHfbHmZwxxXIjsSZPMw7O pOfvxlBznjRREa4QgppybT2p6TRmff1i87/DackWvORxAB/8/RC2rj2ET7Yc INSrJTXNROIlN1krf8rhMTEXoTOGHzOCCAGuh14sXCJJGd4quJ4mgN2YNVSG Kn6Wtrhw6BQijzDvHksiS7MQc6IAcSdKkXSyCpkBNcgLqEdJcBMqz7SgJoQS vsjKFc65R1Q3umN60BfXi8GEXg4cenEnuZd5tRf3U3vxgPOah+k9kphfcnj3 ZWYXHmZ2Kvk3sx13MpmnM1oxnN6MNFKt4sO9aPpwF3o+2oGbm7fjwY5t+OfB LfjfY59gJPBTXN9xGJXbP0d2yAiWzXbDy3/dg7++vQ8vr9mP1aSyk71Yk61s ThN7FcTmNIWufjL/6l0lXc0kdk/KsiXE7aWGp3xS7yWHGV6kqhdx9JThI9Uu kHQnku5EUi+RdFuhbnMJ3tKIM3uYbz9nXj2usDTSeB6q8RkjWZpDluaTpYXM ySVkaBkZWk6GVoizUDnsqCJDq8jQKtVernLMWahljFKyUvgBFUk3IP6+kka8 YbIjdfrB0Q9jHCnN4Gztwpyp4auLlQiNjMm/mynN46b+gST90wKVqIswdfwi 0yYQJ+bPheYeWDrzA3jY7sSrzx7CurcPYdvHjE2fiCflGpEkRU7QqyGBFkT9 CQsVvyVFZQiaElx3va+Z5OiTj7FUYssUcHIsQ/+ES5+HIuoIc+gx5tDjeYjx L0H8iUqknLyGrJPXOTJoQunpVlSdb0ftxU40hHMiEdXLKt6Hnrh+9CcMsMIr Pjx3UgZxL20QD9IHycZBdfHIE/gqux+PsvvwJWfgD7N7jAuCW9YcRe+6w7i5 7XM82HMI/zryOb4OOoqREKooPAgjsacxkngWI6ln0XD8LK4dCcQIVdrQOQKL pe5YbiGWyIh10d5yXbTAUizulCR1VkiqVfPpKElZi5hOjRpXitCTcngli5Be AdFTr+jdR4BMFN1VhuqJohtRdNVqLdXyHrC9CcH7DDj9BVnKUWsoR60RZ5QT EhPC1Md/LO2ZY2yqCljWi8jOYrKzhPmzlCW9lCW9lOwsITuLSxWrKsFEYbgj rHfEOYnilMT0oia8ro5MTM7zNs4mx/nH7YRVv1RBTYY4VcDViozVyjSqtdRg ym/nqAydb0qlgqFTJyw2rTZfaP4X2CzYxLnHfrz98iFsWsM0uuUQEV4FHRHW yc9r3OTnNW5EWa9VwkwSdBz0Kj3dZRaVBHUntE88Bq2b3j1A4eZbyihFLkaS 9pfij4P8u/BDlxB9mIPYo1mkbCFijpcjwf8qUk/WyUPsCoNbUHauHdWhnai7 1IPGyD60xgyg8/IgehKGMJB4A8PJw7idOoy76TdxP+MmHmbdJD1vkqbD+Cpn GJnvnkbVe6fQ8kEw+tYF4da2QDzcG4h/HQ3C16fOYeTCRYxER2DkSgxG0uMx kpuIkeJkjJSnYqQqDSNX09B4Phq1p0PxtfdfMbLqeWTd/Eau5RcLku1svE1r Kceu43d1WiX5akRU4CnRdJVIyszqbqxLbquUuiRHs0pdEpDqZXgTTC+GJ3Ru 7uSqTj3NYwKOfHIdAQcMCOQ49FSAAec4Dg3jODSKqfQyU2kCh7bJl5UHdhkc 2maRqDkczuaSqHkkah6Jmk+i5gmDqCKRJkcf1gnnG3FwYVqxsPlohLGyj9rA O8NkYDomhSoO5ySoSKWCoU9Im38tU6mONNUJvoovfoMpv3u85Bt5OnXiYsyf 4Y4F5u+Q3p/hZd9DWPPGIWzeIHi6m9lAQVYry71Ozq/cmAnciKmb5Kle8tSN r3qiqpeo6gVPBaDjJKR6CakHAhWSvqvenfgjfwCon3ovkl9HHIpG9BcpiD6S Q7aWIPZYFa741yDtRANyAptRyBRRHtKJqxd7cD2iD03RA2i7PITO+BvoTbzJ EeYt3Ey9jTvpt1nSb+P0q6FIej0UpW+GoOGdEHSvOY+bW87j4e4QZs4L+CY4 ksyMIzOTMJKUjpHMbIwU5GOkrJiMLMNIXQVGGqsw0lKNEcNVjLRX41tDGa6H X0FVaDiy3luL/tUvqffws9Hl8zY+sLcby1a5dN5MgsqecnmMrGZS909KPN0l mqsU5Y8i6iaVryOaOhJU6+YBF62brVqOjh1ohT8HoydZ5k+dUY8IZBKN5NQ/ liU+Pp7c4iA0KUV5lpbKJJpGbqazxKeTm2nkprCrSSmSFjOmZ2lx+a1qOX/c g32cykcHk/e6iYuCikyU1q5kDOn4O+mx78aRqJ7vevHOhDvl9/MwRdb2x9k4 b8ZzsJjFSaxmL15/6RDWv082bv5cbjoQwBE+jcBJwkd9axk6ExvdFDYSOzdi 5yaxczNiN06KW2DnQmH/X9m4UGHjwVhEf57O3JlPRpaRjVeR6H8d6SfE+Qht KDrbgYoL3bh6qQ/XowbQHDsEQ/wwuq7cRF/SLRx9KQxRL4ch+29hqHo1DM3v hKF3QxhufRaOR59H438DEvDd+VR8F0nWXSlgXizFSD7ZVlZD9tVjpL4JI82t ZJ0BI10dGOnpxLd9BvxPbwu+7GnAUHstrtdVoZHsjd34KcrPBT+hfp4qV8Ou NBLRVyWinySihnC6EE4BpiuhNMJpJsBUcPzFKI6sPkSR0InwgZai1rp5wVXn AWet3kFdsvLFkTYcIf38Vc8WecQeR5iXxMMtpsVopsVY0u8y6RfHaXkc6RfH 1BiXqzzYMh2zx58pC79/9Zi3uXQ2txmb/h73M9daawXjtGLUJ4xXZUirYuEt J19cCMvkPyjMmzJ+IWMRppB1c2e8Dodln+B5r0N491XOvtexVm/ZL2HSSNa5 aASzJFSCdZJt4pVCJlY6hpZo6cTnoDpBOJ0knI5ICcKJmwlS+PW2qTIrNFti op6RfpEH4hF9iGX6iyLEHK7E5WM1SDzegIyAFuSebkfx+S5UXOzFtYgB1EcP 4TOfSzi7Ohzxz4cj96UIVL0WgeYPItGzNRo398bj4dFU/PNUNv4dVoivL5fj 25Rr+C6H1CpuZtklreq6MdLUx+Q2SIoNY6T3Jr7tv4F/D3A0OtCPwZ4e1DZ1 ojW1Fs3JVWhKLEFjQi4aL6eS8jGoCD2NJ9Xkp6wj9YYty7Qd+Wavrtx2Ypl2 dl6l4PiExFEYQrlqJZZmEsSf8ZUDTzcRHIjK8GF4w4Vk0+g8XVRiH2DtPcxB ov8l1uPI0QPpQv4Pj5XeMe5/N1ot2oyxcVVdAJxMhNKqTuBaySfFelFHNunM pJfv74SPr+J1bQpXaQY/mUV28lMKueZO88Yi8zVws9+FV547iDXvHMJGTk/W frROrmQnHtBoJLlcxN0bATGFIJUkFoc4glhavdgMpyWzXMkrVzdPnFJI8873 ktjodwtxfsdZRO67guiD2WRVMRNZFeKO1iHpeCMyAtuQJ44CC+1BxaV+XIsc xHbvSESuuozi1y6jYW0sOrYnYvBABm6dyMfdc2V4EHEVj+Lr8c/0Vvw7rxNf l/bi26tD+K7+FkvkPSaqBxjp/pJJ6iH+3f8AD/rvYaDnDmqab2Egvxu9uR3o ym5Fe2YTWtPr0JxWjaZkYUeST1aloT42FuUXT/1U3sQvlXWZrKK2JJOdg1jU 7KcsaiZ4zgTPmdBpRMjk5aIVQLqQRq4MFx3HhwwXnQ/fveGs84Kjq7uHis+u S20mtN43LrtbaT/GtHaUHg4mD+xR72thFKVT7X3FH72NG9ylia1eGtmOk56u /yWNkD2FX7jqi+5hR548LfjxCqwXboKf2368/spBrOPkYMPmA+otrpK3aCZv 8iemW9RolRA36iIWwbqIpeMuboIYQi0uVAuVolqeqNVt2Q9SjHg/9+k5ROxN QvR+jrMOljLdXJWn9Sb5NyMjmCPVsyTGhV5UhPdjo1cC/P2qkLGmAfV7G9B9 shr952sxFNmEWwntuJvBCWr+EB6V3cY/r97Hv+sf4euWf+Gb9n/jm67/xn/3 /Dce9PwT/Z3/QHX9V7hbchu3i29iuHgIQ0UDGCjoRW9+F7pYCtqzmtGaWY/m jGuqh0cByZGB+vg4lIefhrLk/aewtiUz7H1gY1qtS3ZoCJ1GVH0nucrayZVp R+srw0nLtOykFWnZSesFexeFB9nqZxWP+TuLU/lEl/9SNZjU/oins166OYs/ 7qqBHucTfH1SGul5ytDD00GEsG0VFPgP/p0WvovfwuQ/2UNjtR0v+u7HO28c wLr1JMDGT2DPO3Egvx2dxZ2QBDJBOLmIrOlMAjhrRYi7Yr8763hLGp24JcFt Yw+f/v5s8InR2eACROxORtS+PEQfYJ9/fhWxR+qReKIFGafakXeuG8UX+9jn g9jo24Dg928h99BDtIZ8ie742+hPG5b+K7dKH+Ju9b/wsO5/8ajpG3zV+g0e Gr7B7fav0dP6NUqr/wdf8d88Kn2Ah2X3cL/sLu6W8v+V3MJwCX9H8SD6xVa1 gm505bWjPacVrdkNaMqqQWOG6leRwj6/EoeS8GAOBJQ+t7IfXUBn68x+F245 0jFHzI/tXQQS9i4sPxql5uapFcPhsc4dtflyesx8WM+e1ZvsVBWTyJ9I1Dyk 2ZUH+9BD9qyXg7tiuPtHeDnqpT/1ykmLYcP4C+NDxzpE7/xvVswRfPjuPqzd uF+hKjt37ApZe1JVUNaBZHUU4cpq+ThVHbWj/Xp27BOopxC+MxVRe9iR+8vY kdfYkQ1IPNmC9NMdyDvfg+KwflREDGHjqgGc+PRrZJ79mkL6Bt2F36Kv/GsM Xf0Ww3XfYrDhO3Q3fovG+u+QUcTOLPmKnffIDP8o+5Ip8auyh/iS8aDsPu6V 38OdMtH/Sj8Olgyhv6if/diDzrwOGPJa0ZLbgMYc9mM2+zGzUPorXE+MQ2F4 IJqMYrNW3G5V2zXFnfBnYwyZVEMaa8W6U9h2qr62nvzfSo94Sjc+TwePccRf +lWyT0Qv/Ad8Jy3HmknWOGBug3NLV2K4ggDeZvzzrmyAlb0XrB18HqOSmSAT X1QOcfjioiAfOhb1P+LSZ6mI3EXU9xH1Q0bUWyXquUS9SKAeeQPXYm7i0z3f IDriW5TmfIeGyu9QV/0dyvh+M+8h7uR/iXuFhLWI8JYQ7Uelj/B7ov0I/yj/ El+V88eMB+UC9ftE/S5uMrveKL0pUe8rJuqFRL2AqBcQ9fxGNOUZN+4XoSEj A7VJsc1qqx839jJ63OnG+EC6q2h7QCdNUj0f838UfzzHWGEJxzdvR0/FA/GX cJjpQOiXw36SI16Z5IZtc71xcqUvoliSFkwyx8LJM7Bo8jT5QbAZrC2dY8aC Oh8XPyGoOwjqXoJ6gKAebcCVgDakne5ETogCajlBvRo7jOvxNzkEvQVDyl10 pd9FX9Y9DObcw7DwQSt4gLtFD3C/mHmnhAiWKtx9xDAi+pBxv+I+7pLLtxk3 yWeB6oCKajdR7SjqRFthG5oLiGoBuZynbOuuz8zA1eSYSlNmNfuRkdeTxoXe wmTK5Cto9BRUTNQ01nppojZqoKaYp+ntvNQpqDAeUw6m83L0hs10J9iaO0mr MbuZTGIMUUZWTmJ5mrwKz/xpFmaOn425k+ZgwZQ5WDx1DpZNm43l02Zi6tMz YGelfExpb+kMO4b9Cr6vcIp4PKOEbElB+PZ8RO1mN+y/hhhyO4HcTiW3s0O6 UchuKIsaQnXsDdRxktuUdBNtqbfQmX4bvVl3MJBDKPPu4lbBXdwpuod7xUz9 JffwsPQ+y8B9M+J/H7/Fl0T/YQX/iiF64Vb5XQyzF4bKbqG/5AZ6iwfQVdyD 9mJOOorZC0XshUL2QkG53Bx8PSsNFUlRVSraY7E3DnB+auoDo8GRavJlPboB 1mRiZ/RyVPEXxl4rpjqrvfobrJyhIfYa6XVlN1ML+5nucJjF7DFpGSb8cSYm /WkOpo2fh1mT5mP+1PlYPG0+lk2fjxUz5sFyhvi7GSKRW4lDCJ0syQVibwoL J/UYaPXD2XkI21ZALZSzRtdwsF6PeHZACjsgi9O+grA+lEYOoCp2ELUJQ0zn N1hkhtGRcRM9WURPOGLm3cZwwW3cKrqDO8V3cK/kDu6z9j5gBnlYznfGwwq+ M+4x7jBulTOzlN/CIHUgeqCnZACdJT1yX19rSSuaS5jTizkeKyxDQ14earNS kRF9HlU/Qv8fk4SyWGUGKWijeuv80AZB+q0ZXTFsvLBkkjOWTXbG8ikaWEzV YMUzGlhO08B6upZd4o6V5kzcM59lvAS7WX+F/ezXMOmpOaS7NSb+cQ6H2PMw feICzJnKoTa/XvbUPHbZPFjNXMCYB/Px5mbyU9Fx8kRtDXvG2VKeK7yCoz9n C0EA5+VOpnsIHdtNf8KFTfkI/7QCkXvZTV/U4/KJViRx2Jx5vhP5YT0oiexD ZUw/auI5S08aREvKENrTb6A76wb6hGlp3k3cKOAQuPAmbhfdwh0Oje6yrN6j CMbhfrnYpHW/gj9j3C6/iZuMG2X8f6XD6CsdQndZPzrK2EVlHWgpa0FTaT0a S66isagU9fm5qMpMqv5/6p1ZiiOYNKlwMfXOjN+ZY95vZ2LeeCcsYCyc6IzF kzRYMlmDZVNcsHyqHhbPUDDTnoXl9JdgPeOv7JnXYDPzbfbM+7Cb/RHs5mzA pKfnY/J4EQspmLmYPGEBZkxeKI8XtHt6BVY9bYE3nrHA2iUWsJo9H7PGm8vP BEXXuMr1Fa7snCfgskLDcFbCgh3lslw8jHRe6mi6nfNjO+qPOLc+B2FbKxCx qxaRhxoQ49+CK8FtSD/XjtyLXSiK6EZ5TA+uxfVxnNKPppR+tKWT/5mD6BbO snlDnLjewFDhDQwX3cCt4mHcLh02Y0nmy93yYXbU3fIbuMO4xRgu55ymjOOi skH0ljOTlfehvbwbrRViAVUzGsuus6PEOfAlqMnLRnHalf+3jnqKWdx2jB2C FjN+a45Zv50F86eWsqOcsWCiDgsneWLxZD8smfIClk19GcufeY2d9DZWTH+f WWktrGduxMo5W2Cz6BPYLv8Mk0TnTFyIyZMWmmEye+aXmDJlkeyn6ZysLnh6 JazZT97sp79PtsBHCywwe8JMzGY/uVoJg2lXmeBEL4lPx7QrxLsz30XFd10h 1OTKZOe63BEu7CzlxEp1Ke1TCP24HGGf1SLiQCOijrUiLpBJ76wBWaEdKAjv RFl0F6riulF7pQcNyb1oSeuDIbMPndn90gSyL09MIgc5mRzEDU4ubpYwSgdx i51wu2zQjBISO1Ru8fVm2QCFNIBBCqivnKOoCv6aCgqpogstFWJDptihUov6 0grUFRWJHSpX1WHr96bRP9ZFxt2v9its1T34rmoXzaaO5mLGUysxb8JL7KK/ sYvewOIp72LJ1DUs1huwfMZmrJi7DZaLP4OlxS5Y2+zhEHUPbFz3YtJkds+U BZjCbDb1GXbRM5Nmclo0ja/TJ87CjKcXYeHTNlj+tCXc2UWvTLDAh3MssN7W AnMmmMvPhLRWmifE50Hj+CKWMenYPTpLJ+hWMCwc4brMwagdpVvG48yaIlzY VoOwvY0IP9yKmJNtuHKa2gkxIDesHUVRHSi/3IGrCZ2oS+pCY2o3WjKIZWYv OnN60Z3Xx3l9n5zrDXKeMMTx1Y0SRmk/hkWUiegzY4f08W4Gy3vRX9GL3soe dFV2o72yS1lJXtmKxopGNJTXoK60ElUFhcjLSK02TWvHmQZkyuDr98rGVNUp ZAZxn//7hcReg3kT12LB5I1YOGMrFs/9FEsW78SyFXuw3HYvLJz2wlK3F1Ze +2C7eh+cXtqHKc/MJ9TmT0qkf4npfJ1BvM0nzcKip+2wlMVGS1n8mZi/Z26B j1dYYC4lIT74kIcLjxOffDzBF4G4G3F3I+Julo5EnYgvd1DPFVN3Ev0B5zYI F8kGhIk1y8fFgn0Dks+xrFwwID/CgJIYAyri2nEtsQPXUzrQkNZJxLtgyO5G R46YTXejJ78HfRzF9hf1YIDjKDPOGHrGsbj3EOMBpqI+Ur2H2HZVdqK9qgNt Vcqi5YbKFtRXNKC2rAbVJRUoyctvG4unJfG0FHjOx9w/ioPKPDBv0S4ssNiN heTqYqc9WEr8LLz3YuVzxO+VfXB3WgUP51Xw1KyCF+OZSTMIpfk4iafg7yxi qoTAdObE2Vj8tD2WMN04k8vPM95+xhIbl1hi7oRZAlJXeSCnq/JsX1rbi9cn +KqB3kbDv3MWnzDxx9aiMuitHIm3A5OPvXECvUEdjZzbeh2h+1px8UgbIgIM iD9tQAqZnXWJWEcR68sGVCYYcDXRgLqUdjSkE6bMDumw2Z7byRlvJ7oKOjkP Y3DG0CuCY9beEkYpo4w/r+hAN6Ozsp1QtxNqg4RabIioq2xGjTzI95pYF664 1f9Wjs0F1Mo+OD1m/nEJFo9fBvO5XljqvQfWz+9RNoXKfdSq64CTH9ydFajF 5odnJs4wEzibSZz/04TzDInzbInzrEkCa0dibcsSbM0SbIU3Jlth/UIrwixP rzOTx9c9IY95VA6ycx39KEX8WMNwhvtKEY5m8oBp9o6Vw/efRRkhD/qwCuc+ a0bIwTZcOK6sVE4Q+1FI7+xwwh5N2ONIccJenWRAbSqhSjegMdOAlmwD2nLb YRAPjPLbOfVlFDGK29FVwvcyRjn/jkm8vdJggrpRLsMXZ8S24Sohr2ABLimu QrLYS6BCbiG2HroqK/HVPSgznl7KuesyZS+uaR+ushfXjazWM9xNcE8nxArk /HUCc4H4KOpEnDOzWYzZE+cQcQ0zhz0smbG9xlvj1YnWWDvXGpvsrJWnyDLE hw22OrHQc+yHDXauZvKThp/w1RkeNk7wWCmOMHYk+A7idG/lCBCTK0Tghjqc EasVvzDgglgbfoqInzcgNYxEjxxdPFt+ZXThbB0RryfijQSoOYfI5xnQWsAo JKrFjBJGGb8vN8iS2Vw5inINQyyerSTaZSylRSW1yMgt6TCR2+UxlI37HZxU lF3kpjZf06Y2uTqfIfalTJsocseMUV7/mujO5lezJcIziO7MSXMxa+I8ojwX c/i+7GknWIy3g368DWviSnw42wZbrG3k6Vnutm4CSvFi58bcrjyn1455Tq88 q/ew1ahYOzIciLW9es6KalYzFYGbG3F6rwFnDxPkkwSZmSSBmSSFIGcS5DyC XESQjdvcqwlyDUGuzSBopHV9LpNvPkEkwI0EuFGsTCbA9erp37WVyhHHVepy 0FL+rLi8Bfkl9UjNLe9Uk7T9cpfRRfWmBfXqFio7ZSOJcROJzskI7mrSd5oC 7kRzyWBR5chbM77MMWO+mItfMGPMU5GdT2Q5wx2vwfIJrGETbfHiRBu8N8MW my1sx8ln4ONGn3/b69WD/H4un4ALgD3tXRkuBFkDT1snhgqsjb0xXyjmWZNx YmsjgsQasSMGhDBFR55WVjAmEdh0lsPsGGX1YtH3dkhXE9RrBLWGoNYQ1BqC WkPWXiOoVwlqdcXoCsZideViflkbsoobcSWbQw9x+ekEVOye0nPA7Q57zk0F U427E5QV3L4STC3BNAI6bQyY0ycqw7PpTLfEkkOHuYRzngrmfILJ+Slj7qQF WDbBFcs5u3KYaI/nJtnhrWl2+HipHfH0kJiaSUz/E172evnoWQk3+emC8q6g 60V0vYiul70GXnZE147o2tmrwG5RR3YnDxoQxAR8jgn4EhNwTCgZy7qXwrqX wbqXzQScR6YWjt1vKw5PHbPftlwcnkqmlhLU4jJlv6085a5MrGlqQ0phY6+8 nDnslhFICwK5wl3x81a3ODnaecv1xi5y+aGyzUOCKYGcbgJxmhFEZs/pBHEG QTQngDMZs1QQ50wSQC7EsoluBNKFk31H+E62x+tT7bFhkT22OtvLs7G8GJ7S rlU+N/ZydKf4xclg4lG+p6OCphfR9HIgkg4CSWeGI9ElR+1sjZ+6blWH+scI 5Qlm1mBm1hBm1oiLBsSSmwnkZnI8axuHD5kphEUsB2NWzSM388nNAnIzn9zM K1LODMwmnJmMdEYKv08q5PAvt7FfXubnhFCnwGelwGe0fXYSuwmE7bP0hxCL jMfjmQnPYNoEBb7vQzed3JtB2BT4FhC+hZhN2OYw5k5ehHlTFsJikhaWk5ny pjjgb1Md8NF8B2wjj4zn3yjvyiFRws5eHqemAOglDx8kgI4CQNLRkSA6EkQH guhAKtrbqfh9omatw/7KhqhgYhdCXYeTgtGxBlwmBRNIwSRSMJnYpRK7NFIw jdilkoappGFSgXIqljg/6DLxjMxuGVK7xc5CsY+XK12ZBO2FRba9utrVUaGb C9F6ZgL1OkHoVaHZtDE4TSdGM4iROWOmxGkRcVokcDIjUIuFFcdkN6yY4grt VCf8ZaojPpjjiK0cBokn5Wajp6LIB+UixsmD534OLyd35aBGJzeGjl9rGa4M ytaRsnWwNxLtU3XtwgEmwCOcCwSQYKdZVUII0kUSLJwEiyLBoo2HIRGoKOo1 gkQLZ1zk12dSmm+qSU14h9uq3uF26iI1ozWyRl0b9Mz4saCwxhKQaQRkGgER D9VmEAwByKyJiwjKYsyZvJigLJaYzJu6GBZT3LFiqg5OUzV4fpoT3pnphM2c Z4pn2fLzAyfTcRrEZMyBCOJQPif1QASnMeg4iUMRFKtnL0dHFZhd8u1n2Mvk dZiKO8bR4wkmrwAyJ4AVIYDA+CcY7qkPg+U6UiuxIMpbvXFf5cZVa0Hlps1N LBi96QVsqLjlX/OmF3EYtxizJ6s3PWUJY7H0hF8x1ZPhBttpLlg1TYM3Zmiw cakGn7iKkxyER7xyfoKZegqEj3rsyY+fBKF4v3s7G0+BsA1WblqOq5U0PgU2 lh7SLdHGZqzvm7JE4pnx00lu9t8E9t8E3soEpf/E7UznzczgrYjbmTlpsTyL fQ7DeBiIcriFj3T0t55GFU93wd+na7BukQbbBUOdpVGZszcLknRi1iiHYHlr POGjUW9Jevnrx/j5uyom5s7Ccthu7O1sUztSceHyMblw2fNWpo6fwVthj4yf bSbvgePrCQsYC3kXizBjwiKW1MW8iyXyLnS23o+dTSAs2C2necJyuh5uM1zx srkL1sx3wTZbF9EPvuxT4U2u2Et7y/Ax3pA4o0AY5GrUmxnjnay4sYsbsR97 I8rpBBNHFycw0Rhv4JnxcxjzGPPZL+odsPXinO8ZvAPhYjt6IIuPbL3RRN5y ujesprvD2VyHF8xd8d5cV45jXeUNeKsm8tJVzth6aVVqJpv/0x9x+GVOduGo VuOAsa1XDhj5BceOjpj69Cy2fA5jHmM+Y4HJPFIYH2psvJQTNP5DOnvrTM7e vqpBsS+szJlkzPVYPVOLt2Zr8bGFFtvdtNKcWLH2/k/VpNhHjVFzYon7Yyar bLarqdk/bPU4Tikc5SY88bjNTLqR/UFx77N6rNWK36VosggH1e/SUWm2Owln ae6NlTPZ3TN1eHWWDuuW6vCptJtXPC4Fqr6KqfIvR9vsqhrDmswt9aN+fa6i zY4/AvVTSqN/1EDNQ7EbFI62Nt6jjbb/fqM58afYLWf6wHqmJ/Sz3PDKbB3W LNbhE0fdONni/1SM01yM3pw+iifnGJvBHzRZGBdp7H+sxfYrRIs1P+5fJWFW PHhdTLaiyrzZaJDoLh9ViBb7wXoWZ32z3fHibD3eW6DHFlu9tN9V/N1+ZbIS HfWs8v5xfzedbPKpHzT310pzV2gUiwlLo8WEstFecajzVporp/jG5vopzXVi S8SjlZ/CctazsJ7NBDvbE6vn6PHWPD0+ttbjUw+96q71q8fc6H7cXUsvW+vF 1no+3tqdxo9g5PTY9Qf+L4qPurd8GOFip/ofqQ8jhPeR8YGEnCozrGb7wWYO Lz3HHa/Odcd61vxP2cdeqomel6vqgKF93PBFNtfNc9TwRW2uh1aDH7Z3vLQw MLVXbuX2kAZDDqb2+vzItF4iq7RZndpbzVkF6zlMH3M98PI8d6xZ6o5PnN1V kxrhmqmVe+CMZh26UbMOY3O9VH8aT5329JiW7jLS1oKttFBRtTRajCibcp3U VmrY/6KVriqqckqnTuvcOU+2mkMSzOUoaZ4XXpzngfcWeWCLWBIk7UW0wgPD 5K2g8x21FPmet4KnNAXQ4ofNJKDLXeUUXs46Vbcm6QH+vWm8i9H8x0mZfbo5 jT4rsZzzPKznrYLdPG+snu+JtxZ44mMbT3zqxaYqHhBi+xZzmNgQ/5Mf+D8o 2+Hdzoxp3m71U0/75brRCbHc2uwlm2basm+ayxknxqNPGsSGPLFv1Greaqyc T3jme+FVNm0de2K7m6fcUuYnnmvplG2jYiuZh7rR0VPvZSZ3NY8z7Wke83Tx sSbKqeZydappNeb4KBujq4CPab4kmuiqNlFMOY3NtJzHjp5PirKJL7OJHy73 xDYX0UTRuCdNO1s91CZ6SEMBsWNwnLqrVS9bMxbCPfLrJ+U8buwfAaHyGdJ/ Ej5lLqdMhdXelVtG1XbNfx5W81fBeYE3XljohXeXemGzWIYj9jH+XG4Tc9cb Y3SzrXGLqE6nMz4Dl03aK7/+D3nSlvhjZ5oVeCvTJUIl/hhPnHNR4RIbrszk dqtfy/0rlvNX48+LP8CRxW8he8lb6Fn9FrZ7e5m2BOnHtMm4c00vdq65uZ8b 05x9ag+KP8ZdNHbqIRT2alOUvYp+yiFH6p4QV426/4tN8V28Bc8u/gi7Fr+N d349DQcZX6576/H9IGKHAJvipu730rm5n/9BM5RP+2wtlLkSm6Ksn/z16Kzh e1spxMp243YK38Xb4Msrv8+48OvpqPj9dHRznjm6P8BN3R/A4Yibx9iPrcc0 4Y+mTxblMN9KOZJDNottUIzR/dTl9aPLycVSYbGgXFzf99dzceDXS5E9wQL9 5hb4dsESjCye+dhScqZQFxan0B9c/ukfrKyRw3MbtQljFmQ7qAuyxWJV46Js 31/Pxwu/sUXABBdUzNHhATPHiK0GI44r5XplF7FamdXm4vf5OLo3wrQAx0ZZ A25jr6z0FcsnxSWV1b6r4CgvZ43n/+iOoFmrULX8OXzp8BxGKIoRDzc4s7Bd GnOZz+XXv8HBL1Jw8HMlnn9xP1544QBefP4AXnr2AJ7zO2BaXeq7+Cg22Ffh 8KKXUWj3d9xy+ztGfP+CkVU+CB/zew8ozRenkv0Gx4+lwP9oCk4ygtUD+s7y QucOMvYz9qXgndX78T4147s4Fkdeakfxif/B3aIR1Hm9if7Vf0XED7T6BwT4 p8hznowRyDilnn8Wwmte5PUu8XoRvF7koRRE8XpRvF7U3hRsXLweu5aeRPi6 W2iKHMH/1PNXP/gOkT9Io+MQ5J8kD8g5EyD808Xr7+TZUud5vYu8XjivF8nr xfB6l4+kIJ7Xu8L7u8LrJfJ6iby/TxbvRqD9OSS/HI+qj1PQwr8b+cc/EbE+ 8bF726Ve03isyPlAcU3x+gec45UvBIw5z4rXTuB1E3ndZF43lfeapp5jlXEg BZ8ufg/7lhxFpEc4it5OQuunKejiv+s6fgFJbEPCuqTHOm2neu0QXk0cz3Ah SFxbvD6FUHHECa8dyYjl9eN5/SR/5RytdF4/k783i/edzevn8vq5vP6uxZ8g yOoU0l64jLp1KeglDgMnk5G5jf9+C9u4kW3+KBHR78aG/WC4+gQuBCbjIi8e FizDDGH85mmEi4NW2Io4tuIKW5HCSGcPZLIlOWxJHlHIZ0sK2ZIitmQ3WbVv 8SFEai+i5I1EdBCFG/z3w6eikb+T//4zxna2eEsysjdeQdI7MY8p8TMVlTDV Szw8WKAiXifKAywiGDHi4Bf1yKRUtieDyGSrxyUVEJkitqlYOOuLg14Y+5eu R8DyAKQ9H43r61MwyLbeOpOMUrKlhCgVk6HFuxk7k1G4PQn5m+KR9n7UhTHN +tTUrAQ2IQmRwclsVqTASfjQThhtU4A4xikVmSdSkeufiny2qehoKkqOpKPs izRUfJGKSr5XfZ6GgxZ7Ea4NQfFbV9CxMw23+ZvuXkyQh2tUqgfVlLNny/cl o2x3Ekp3XEHR1ssY27DtasMuBcSxJYmICk7id1HEazKi+PtiA1MRz1DalYas ExlsVzoKjqej+FgmSo9kouJwJioZ1UeycJVx0HItjq8MRPILMaj9OB1D/Df3 LmTgwaWLqDkmDgZJ5b9NVQ4C+TwZ1QeTULXvCip2xaHkk+ixCV151DoTF09E ITIwHtFsYjSxi2YDo9m8qKBURAemsYlpSAxIQ+rJDDYxk03MZhOz2cQclB3N RcWRXFQdzcPVY3lsQj7qjufjc5v9uOB6CYVvp6F9Tx7uns7Fw+hs1J8UkYXr vNU63mrN8VTZ7JrDSaj5/AquHWBS2B2Dks8iQn7Q1HHUXCybpDTVjK/JeIav afxZOtHMxJWATDYzG5knc5F7Ig8F/vkoPl7AZhai8mgRqo8V49rxYtT6l7AJ JThkuwmHHU4j4YUkXNtUgEH+3YPwIjyKS0NTcAGagvLRGJSHhsAc1Aew2SfT cZ2Mvn4sEXWH41F7KBbV+yIxtq3b1LaG+0dQnUp7RVuTMJ1fC0gzycgsxAXk IPFkHtJPFiD7RBHy/YtRdLwEZcdK2dYyVB8vxzX/CtSdqCBklWxDJb5wPIAz rjHIfTsPrXsrcPdcBb6MK0frGRGljBK0nC5G0+lCNJ7KR0NQDv9fhjzjouH4 FdQfjUXdF1GoOhj22NBCafMcRJ+MVNt8hZEkj3ES7Y0OyJUuVwknC5lliqmg UtKgDIXHK1B6rBIVR6vY3mpcO3EVdQFXUR94jbhdI4Y1OOJyDjHPZ6ByUyX6 /K/hy8hr+CqlHO3nq2E4X8WoRBvvo/VsGZrPFqPxTCGaTuWiMTgDjVRG48k4 NPhHo+4o6bT3DMYODpVPW+Yi4thF1gG17QGkcYCwoctg5PCeCnD5ZDEzZBnS iGe2fyXy2dbiY1dRfrQGVcdrce1kHWoD6lAfdJ3XrSd+9fjC9RAC9PFIf6sE jXuv49b5ejxKvI5/pOSgM7QOHRdqGTVoD70KQ2gVWkIq0Hy+FE1nif0Ztv8U 20/FNwbGoiEgnFQP+bGmRx1Xm87bjD5JyEmx6JOi2YWIOSHsQypYXqqY2K8i 53gNCo/VofTodVQer8fVkw2oDWzE9aAmNJxqRvOZZrScbcFhfQguPZuLko9r 0XWiBQ+im/FVRhO6wprQzei61IjOsHp0hNWh/WIN2i5cRcuFCjSFlKLxPJt/ Loe3kI7G01d4G1GEJfSHTZ+A6ONhiPYXPmhkC3Nq9IksRgGjBDFEOsG/GsnH ryHjeB1y2dyio40oO96EqpMtuBbYirrgNjScbkPTGQNazhnwuf4IjnomIvGN KtTubcWNkHY8Sm7HP3NqqaCe8DZOhnoiWtAd3oyu8EZ0hF9H26VatIRdRdPF CjSGsqdCC9AYks3bIHPOxfE2LqL6ZPDYCY7ymHw+wr84jehj4hZIGg5sopmT ov3zGMWMcsSSJAlEPOXYdWQda0T+0SaSpgUVJ9pwNaAdtcEduH66E41nu9jx XWgL6cYXXiE461eIvI1NaPPvwf2YbnyV3Y3eyC5GJ3qFWVZUO7qj2tAV1YKO SP67yHq0hNei6dJVNIbxNsIogot5DBLoYiJvKRLXz5z+sVuI/OIMoo/yFo4z JzKVRjMtRx8vZJQxqhB7rAZX2PxUNj/7WDMKjrWh5IQBlQEduBrchdrT3ag/ 24Om871oCe1D28U+HPZNRsxrNajc042+kH58mdqPfxR2oi+6l9GDPt5SX0wn emJ4GzEGdES3oC2qCc2R1E5EDaOaUc4gkSLYE+GpaLx0GQ2h53/sFqK/OIfo I+Q/U2r0MfYAq0g003T0sQre2jVcPlqHxGMNSGPzc462MaW3o/RkJyqDunHt VA/qzvah4Xw/mkMH0HpxEId8Q3Dy2WKkrye5/IdwK+YGHuXewD8K6tEf28/o Q/9l3srlHvRe7kL35Q50xBrQFtOClphGNEXzNqKZvqIrGSRUNEtANHsiMoG3 Efajt/D5eUQfjuZtJCtWKqw20czg0UeqGbWIO1qPpKPNHB3+f+1d2W5b1xVd lYo+tUCLon0oWvSpyG/0HwIECNIkbfOSh7QB6tbO4HmQZEu240GWLIsyJUqi LHG4nERRIsVR1EQNnHk5z5ps1U4QxHASs+vw0jGNqj9QWMCRiQuLd609nX3P PWfvJBaup+G5mcVSfx6rg0WEhsrYHq5QyVXE1TWkxuq48ibTvfe34D1XQVa1 j0PrPr7y7xFyDWVdFRUx9GWUdCUU9QXkdTlkSCM1k0JimmFgJoLYzBaiMzQo zg5RnZefqYlpRiPtxJEULt+nJmZIg0bU5+QQh4KpgT5x4GMb+qtRmK4mYb+W ZuDPwnu7gOBACWuEv0H44ZEaouo6XXEH3W+q0ftWAIaPs8wJDlB9cIjHrkN8 FaT0dTuEzmGoc1RR1ldQNJSQNxSQ0dOH9Bkk9CnE9THEDGFEDTQoIzVhbB0v 19OYZqaOpNCjpiboB70MoL2LHOL46irHJqb7ItD3xflsIMN+PQPnrTy8d4oI Dpaxdq+KTVUNYfUOYmO7dMU9dL9lwuCfInCc3kF8+AkOrF/i8dITlMRxR8Me oe+iatxFxVhH2VhD0VhBzlhCxlhAypBD0igjLiURlaKImqgJM33ixXlmiYHV MHMUBW0X54IeBtPLnHIvM5BeEcfJ1vnvFqZ7o6SQJIU0k+ocnNSAd6CM4FAV a8M1bN7fQXh0jza6h8TEAbrfDmDiowICfY+Rn/oaj1xf48navwn3gLA5pH0O UpFETYo6iqYaclIFGYlhwJRHwpRBzJxC1BJD1EqfsK4rJ2+tyinMqKQ7ksJF UugihW76QQ/9oCfIESKFMB70xvhEmIL5Wgb2m3m4+kvwDVYQvFfDmmoHm+pd hMf4FDq+j4tvG3HtXRrd53vYHPoGNctTHAaf4vFKCSXpIcoSKZjEIA2ToLCD gpkUzFVkzKRgKSBhZXC2yYjOxhG105jsrYOkdvrDrIM0DEcG1fM0pEuMRl2k 0OXloB90b5BGmDQS0PXKMF/Pwn6rANedErx3qwhSA2vUwCY1ENbsM/Ad4OI7 ftz7sAjn5S+RnHyGPde3OAw9Q1E6JNxHKJseomIW4wBlMw3LsoeCZQc5cSjE ymhmKyIuKg7PpTkSSu/2Fz2qHaQwRwo2YzuFf71cIWECeoY+fd7YOjomft4g F8EjQqsij740p+cceRThGqjAO1Qjjzp57GJjbB/b4wc4844BF9+LQnviAME7 z5A3fYf94Pc43Hzc4nFI7ORieYSKhTws+yhZBY9dZG11pGdFw4gS4o48YvMZ RBfoFM62dsIL5DFPHnYJR+lC/EydNZAHJ7bzjEkXlIrXU90tDvQG04087Lcp Z8GBprREU1pV7yFEU9qiHs68u4gbHxRh6foKW5rnqDqfY3/jOfLSIxSogyJ1 UCL+koVmZSUHq8Ihb9tB1l6HPFdFYp4zzAInSmerJfKiaO1Kx15c5eB87ZxH ZE76XxQmT5PCWZrTWZrTuRaFrggeXE7+QGGW3rBAb/CQQmBkFyuksE5n3pzY wxnOBqpj+3DdeoaE8TnqSw3sh58iR/h5ekGB5lOk+ItN6By2PRRtu8g3u9iQ wjzV4CQFFykskoLoTuuJKd01PaTgJgUXn3HmTO0Ujv+w9NY6ZTL+uR7aU3Mt c/oV1UFzuiRUofCQmjyKTR5u8vCP7GB5dAdrml189p4dXR9kyf8JgurnyDka qIca2N2imE179FyKnC7ATM+620H4O/gZCpR/zkF/WKgi5aogsVhGzF0gaJLw vuh4SD34GGC9nCMWna88IJxoU4L4dP84n3U/t0N70q0o4XyoRSCBaRIwkoCt vwDHYAmLw1X4OK8tjdawqqnj0z+v4ubf68wHn2JD10DR30At8j1kiUJm+MmY ScRCvNY6bYdjtoa8OC/kqCK7UEHaVUbKTV/wEL83T8z0Bz/9IUAOAXLwrzW7 aUXdzuH/sqOX667jn9gx+ambFJYUChfDzSbhDwhfz6nZwszCzszCOVyGZ6QC /2gF/3zfhs/+moDq1CGvf4eYvYHSegPVKEOTVIPM4J+2iBqDGWsVP6frMvOw c05zlAmd85qrBNnNHNFL+/ERup/iD7xoBBZTji81m4EtYcPlGD4yJLUt3/4B 2tPr0F7YhrYnxhxJhu5GBqbbWdiY0s3fK2JxpAgvs9Fjfwnh1EcPMdH3DQJT DcieBgrh50wOykhIZSRNFKq5DNlKhLYS0gw2GUcRGTqraOUpu/NIeZmg+0Sz P4FY9GHinBAUp0c4LwQ5LyyFEKbg25+IlRWHNzB6zIXxE0FMnFzH5LltTHbH mHUn8eC6zKfhNCwDnAiGclhg8u8ezcOnKeDEyW9xX9WAd66BFC08n/wWEUOR UyYDuqmAOOempJXDzmyBgVFeIEYXkx93tlldO+FLIx5II/YC67IYokcIJ4Hl MCJL61j3eF7Bq6w1/R6j/1iC5rMQg38Y45fiGL+ShJZZ/8wtGcaBNKxDacyp mAGps/BosvBPZNE72YDB14A/2qBh57DFDCYs5RAxc/Kx5BCbzSI+l0VCVAF3 KVXAE6JbnU+mTDmW5CbOjmYznx8juqpgjRDrZmB15AiYqr95oT6+hrFTYYxd iEPTk8TY1RS0N2gK/TJMgzJsw+KolwzXKFPm8TT8k2kEp9JYmU5jTZfBhiGD TSmNbT4ibtvSiNg55ikyJ0dr33TE16ro3No3LYqUdzRr8HfydwrbhLkZ3H7l RYeynvg7DH+8jPufbkF9Ng51VxKjTF00X8iYEqdCiM8kjiioiFFNjGMyPOIk jlbGEh+KVnQyVsUpEZOyeb65r1u0LluQse3icPOzl6NV3neT2LaWBartJrat 1SQ2VuII+tdfwaYswf4W946FoDoZw8iFJEYup3CfLjTOB7upfuXEimlYtPMg tlEZTo0MN3H5iCvQ2tS/YiY+pkZrrW3R607ipMxCxBTyKU2jxJbo9eXmHvOO 5g7+ToTEPv6VJAL09/aVTmWh+je4e3wb904nMHwpBdUVGSP0Eo0o0D1AWENK kwUrxTXXXg1Z9LKSCM1C0VFMwTkZyxTTMsW0QjGtENIyxbRMMa0Q0sqy3InV JpzgSgpeRk9x83Y4Z1sh884nEQyeS+Fut4yhPhkqWpemX9mJr1MpJW8thDLb 6ie00NrfLAqKeloFRX2E4qdk/LQmv08pJir2NfuDyo77jmax287mhnFXQCmt 0L5orrzG+DVunYyi/6KMOxTLoNhjTRyjxDFBHA+IQ08cEnFYiGP2RYMXUS/S 3qoXSQ25FpVakS7iWPSLzenUjNhg3Qk3b+8kLJs39sprLeUF8y9xgyK4eU3G bWrjrtiTTAPRUBNa3naat9XzthJva+ZtLdaXbTWapQB5W7tH1EpVSlJ2NAtU dsIh7udXjsu0vz1R3kr9Ar3dCVwj1et3eF9q/y4NUkVjHKPmJ6j5KWp+mprX UfN6at5AzRspbiM1Ly0qe3g7moUHO5tlBxutN47tb4mar9fwU/TwHn10yJvk NEBOQ+Q0Qk5qGvsYjV1DThPkNOEQ+4Eptimn+NpJ58uv1bZ9rfI28Cc4QzH1 0LevEvIXhHyLkPsl/vmAWda3/f/mrz++vvD6wusLry+8vvD6wv//BfzoPy5n m5w=\ \>"]], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.105359783404, -1.2419657217199997`, 0.130529043998}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.517433002200001, 2.8687930406, 0.9670294859799999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.4639107572, -0.0180325213824, 4.256229869799999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.0020617228, -2.9428702997999996`, -0.71758565398}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.5843293026, 3.2253843368, -1.87128227424}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{3.8204590541999996`, -2.7667478366, 4.652505411999999}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-6.7177869573999995`, -2.3202055828, -0.31783301593999996`}, 0.255]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-4.9490034214, 1.6803443592, -3.7029180969999995`}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{4.023226654, 0.6565852986999999, 1.6381467776199998`}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], SphereBox[{-2.457588663, -0.66576936706, -0.7049811815599999}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{5.550314234599999, 5.615320808999999, -2.6558209203999996`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{3.0522854352, -3.3501062528, 6.9999230491999995`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-8.3595809062, -3.7618775481999998`, -1.5140862657199998`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-5.9683216258, 1.07684146384, -5.9395977906}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{5.6138090281999995`, 1.4014774933799998`, -3.2503287199999997`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{4.0132111062, -4.253206308199999, 2.974428724}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-7.3304361266, -0.54580956058, 1.0210567523199998`}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], SphereBox[{-5.909173202, 3.1101110508, -2.2262862006}, 0.178]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.49168780793999994`, 1.673352373, 2.9266186562}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{1.1975760579799999`, 2.6577106463999995`, -0.147438312246}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{ 1.1760142843199999`, -1.9178829173999998`, -1.4460183351999998`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{0.034852216618, -2.65506503, 1.5750866209999999`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{7.408103865199999, 2.600262976, 1.63162722292}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{4.6972919181999995`, 4.5071854826, 1.8220549119399998`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{3.2998395412, 1.12489719602, 5.450914646999999}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{6.4091947016, 0.29118787934, 4.7133545892}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.388278718, -4.1466257618, 0.78665513928}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-3.7923021368, -3.8746941903999996`, -2.4999185253999996`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-0.9942604376399999, 1.9316779171999998`, -3.2023296796}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-2.0212509296, -0.89996311024, -4.564633153}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{5.5478575908, 5.987218885799999, -4.43140747}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{2.6159477018, -5.0620090362, 7.4122612623999995`}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-10.1372461544, -3.4377895391999997`, -1.35376191188}, 0.1]}, {RGBColor[0.7333333333333333, 0.6, 0.4666666666666667], SphereBox[{-7.5553135205999995`, 1.8009655697799998`, -6.4381075094}, 0.1]}, Text3DBox["1", {0.7819566237999999, 1.1507864422199998`, 1.1880707361999998`}, {1, 0}], Text3DBox["2", {-0.494640216596, -1.2419657217199997`, 0.130529043998}, {1, 0}], Text3DBox["3", {4.917433002200001, 2.8687930406, 0.9670294859799999}, {1, 0}], Text3DBox["4", {3.8639107571999998`, -0.0180325213824, 4.256229869799999}, {1, 0}], Text3DBox[ "5", {-4.602061722799999, -2.9428702997999996`, -0.71758565398}, {1, 0}], Text3DBox["6", {-3.0220618141999998`, 0.5004939311, -3.1624564609999997`}, {1, 0}], Text3DBox["7", {4.9843293026, 3.2253843368, -1.87128227424}, {1, 0}], Text3DBox["8", {3.2204590541999996`, -2.7667478366, 4.652505411999999}, {1, 0}], Text3DBox[ "9", {-7.317786957399999, -2.3202055828, -0.31783301593999996`}, {1, 0}], Text3DBox["10", {-5.549003421399999, 1.6803443592, -3.7029180969999995`}, { 1, 0}], Text3DBox["11", {3.423226654, 0.6565852986999999, 1.6381467776199998`}, {1, 0}], Text3DBox["12", {-3.057588663, -0.66576936706, -0.7049811815599999}, {1, 0}], Text3DBox["13", {4.9503142345999995`, 5.615320808999999, -2.6558209203999996`}, {1, 0}], Text3DBox["14", {2.4522854352, -3.3501062528, 6.9999230491999995`}, {1, 0}], Text3DBox[ "15", {-8.9595809062, -3.7618775481999998`, -1.5140862657199998`}, {1, 0}], Text3DBox["16", {-6.5683216257999995`, 1.07684146384, -5.9395977906}, {1, 0}], Text3DBox["17", {5.0138090282, 1.4014774933799998`, -3.2503287199999997`}, {1, 0}], Text3DBox["18", {3.4132111062, -4.253206308199999, 2.974428724}, {1, 0}], Text3DBox["19", {-7.9304361266, -0.54580956058, 1.0210567523199998`}, {1, 0}], Text3DBox["20", {-6.5091732019999995`, 3.1101110508, -2.2262862006}, {1, 0}], Text3DBox["21", {-0.10831219206000003`, 1.673352373, 2.9266186562}, {1, 0}], Text3DBox["22", {0.5975760579799999, 2.6577106463999995`, -0.147438312246}, {1, 0}], Text3DBox["23", { 0.5760142843199999, -1.9178829173999998`, -1.4460183351999998`}, {1, 0}], Text3DBox["24", {-0.565147783382, -2.65506503, 1.5750866209999999`}, {1, 0}], Text3DBox["25", {6.8081038652, 2.600262976, 1.63162722292}, {1, 0}], Text3DBox["26", {4.0972919182, 4.5071854826, 1.8220549119399998`}, {1, 0}], Text3DBox["27", {2.6998395412, 1.12489719602, 5.450914646999999}, {1, 0}], Text3DBox["28", {5.8091947016, 0.29118787934, 4.7133545892}, {1, 0}], Text3DBox["29", {-3.988278718, -4.1466257618, 0.78665513928}, {1, 0}], Text3DBox[ "30", {-4.3923021368, -3.8746941903999996`, -2.4999185253999996`}, {1, 0}], Text3DBox["31", {-1.59426043764, 1.9316779171999998`, -3.2023296796}, {1, 0}], Text3DBox["32", {-2.6212509296, -0.89996311024, -4.564633153}, {1, 0}], Text3DBox["33", {4.9478575908, 5.987218885799999, -4.43140747}, {1, 0}], Text3DBox["34", {2.0159477018, -5.0620090362, 7.4122612623999995`}, {1, 0}], Text3DBox[ "35", {-10.7372461544, -3.4377895391999997`, -1.35376191188}, {1, 0}], Text3DBox["36", {-8.1553135206, 1.8009655697799998`, -6.4381075094}, {1, 0}], TubeBox[{{0.105359783404, -1.2419657217199997`, 0.130529043998}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{5.5843293026, 3.2253843368, -1.87128227424}, {5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{3.8204590541999996`, -2.7667478366, 4.652505411999999}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{-6.7177869573999995`, -2.3202055828, -0.31783301593999996`}, \ {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-4.9490034214, 1.6803443592, -3.7029180969999995`}, {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{4.023226654, 0.6565852986999999, 1.6381467776199998`}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{4.023226654, 0.6565852986999999, 1.6381467776199998`}, { 5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{4.023226654, 0.6565852986999999, 1.6381467776199998`}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{-2.457588663, -0.66576936706, -0.7049811815599999}, { 0.105359783404, -1.2419657217199997`, 0.130529043998}}, 0.15], TubeBox[{{-2.457588663, -0.66576936706, -0.7049811815599999}, \ {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-2.457588663, -0.66576936706, -0.7049811815599999}, \ {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{5.550314234599999, 5.615320808999999, -2.6558209203999996`}, { 5.5843293026, 3.2253843368, -1.87128227424}}, 0.15], TubeBox[{{3.0522854352, -3.3501062528, 6.9999230491999995`}, { 3.8204590541999996`, -2.7667478366, 4.652505411999999}}, 0.15], TubeBox[{{-8.3595809062, -3.7618775481999998`, -1.5140862657199998`}, \ {-6.7177869573999995`, -2.3202055828, -0.31783301593999996`}}, 0.15], TubeBox[{{-5.9683216258, 1.07684146384, -5.9395977906}, {-4.9490034214, 1.6803443592, -3.7029180969999995`}}, 0.15], TubeBox[{{5.6138090281999995`, 1.4014774933799998`, -3.2503287199999997`}, {5.5843293026, 3.2253843368, -1.87128227424}}, 0.15], TubeBox[{{4.0132111062, -4.253206308199999, 2.974428724}, { 3.8204590541999996`, -2.7667478366, 4.652505411999999}}, 0.15], TubeBox[{{-7.3304361266, -0.54580956058, 1.0210567523199998`}, {-6.7177869573999995`, -2.3202055828, \ -0.31783301593999996`}}, 0.15], TubeBox[{{-5.909173202, 3.1101110508, -2.2262862006}, {-4.9490034214, 1.6803443592, -3.7029180969999995`}}, 0.15], TubeBox[{{0.49168780793999994`, 1.673352373, 2.9266186562}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{1.1975760579799999`, 2.6577106463999995`, -0.147438312246}, { 1.3819566237999998`, 1.1507864422199998`, 1.1880707361999998`}}, 0.15], TubeBox[{{ 1.1760142843199999`, -1.9178829173999998`, -1.4460183351999998`}, { 0.105359783404, -1.2419657217199997`, 0.130529043998}}, 0.15], TubeBox[{{0.034852216618, -2.65506503, 1.5750866209999999`}, { 0.105359783404, -1.2419657217199997`, 0.130529043998}}, 0.15], TubeBox[{{7.408103865199999, 2.600262976, 1.63162722292}, { 5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{4.6972919181999995`, 4.5071854826, 1.8220549119399998`}, { 5.517433002200001, 2.8687930406, 0.9670294859799999}}, 0.15], TubeBox[{{3.2998395412, 1.12489719602, 5.450914646999999}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{6.4091947016, 0.29118787934, 4.7133545892}, { 4.4639107572, -0.0180325213824, 4.256229869799999}}, 0.15], TubeBox[{{-3.388278718, -4.1466257618, 0.78665513928}, {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-3.7923021368, -3.8746941903999996`, \ -2.4999185253999996`}, {-4.0020617228, -2.9428702997999996`, -0.71758565398}}, 0.15], TubeBox[{{-0.9942604376399999, 1.9316779171999998`, -3.2023296796}, {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{-2.0212509296, -0.89996311024, -4.564633153}, \ {-2.4220618141999997`, 0.5004939311, -3.1624564609999997`}}, 0.15], TubeBox[{{5.5478575908, 5.987218885799999, -4.43140747}, { 5.550314234599999, 5.615320808999999, -2.6558209203999996`}}, 0.15], TubeBox[{{2.6159477018, -5.0620090362, 7.4122612623999995`}, { 3.0522854352, -3.3501062528, 6.9999230491999995`}}, 0.15], TubeBox[{{-10.1372461544, -3.4377895391999997`, -1.35376191188}, \ {-8.3595809062, -3.7618775481999998`, -1.5140862657199998`}}, 0.15], TubeBox[{{-7.5553135205999995`, 1.8009655697799998`, -6.4381075094}, {-5.9683216258, 1.07684146384, -5.9395977906}}, 0.15]}, AspectRatio->Automatic, Boxed->True, ImageSize->{850., Automatic}, SphericalRegion->True, ViewPoint->{-2.619586604699305, 0.5636862075017092, 2.0664036101285506`}, ViewVertical->{-0.3288018467291082, 1.4394659189565921`, 0.3975193915178893}]], "Output", CellChangeTimes->{3.5709523166170645`*^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}, {3.5704549882757435`*^9, 3.5704550487414494`*^9}, { 3.570455928146194*^9, 3.5704559415310173`*^9}, {3.5708553973857827`*^9, 3.5708554057785974`*^9}}], Cell[BoxData["55"], "Output", CellChangeTimes->{3.5709523166326647`*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1.3819566237999998`", "1.1507864422199998`", "1.1880707361999998`"}, {"0.105359783404`", RowBox[{"-", "1.2419657217199997`"}], "0.130529043998`"}, {"5.517433002200001`", "2.8687930406`", "0.9670294859799999`"}, {"4.4639107572`", RowBox[{"-", "0.0180325213824`"}], "4.256229869799999`"}, { RowBox[{"-", "4.0020617228`"}], RowBox[{"-", "2.9428702997999996`"}], RowBox[{"-", "0.71758565398`"}]}, { RowBox[{"-", "2.4220618141999997`"}], "0.5004939311`", RowBox[{"-", "3.1624564609999997`"}]}, {"5.5843293026`", "3.2253843368`", RowBox[{"-", "1.87128227424`"}]}, {"3.8204590541999996`", RowBox[{"-", "2.7667478366`"}], "4.652505411999999`"}, { RowBox[{"-", "6.7177869573999995`"}], RowBox[{"-", "2.3202055828`"}], RowBox[{"-", "0.31783301593999996`"}]}, { RowBox[{"-", "4.9490034214`"}], "1.6803443592`", RowBox[{"-", "3.7029180969999995`"}]}, {"4.023226654`", "0.6565852986999999`", "1.6381467776199998`"}, { RowBox[{"-", "2.457588663`"}], RowBox[{"-", "0.66576936706`"}], RowBox[{"-", "0.7049811815599999`"}]}, {"5.550314234599999`", "5.615320808999999`", RowBox[{"-", "2.6558209203999996`"}]}, {"3.0522854352`", RowBox[{"-", "3.3501062528`"}], "6.9999230491999995`"}, { RowBox[{"-", "8.3595809062`"}], RowBox[{"-", "3.7618775481999998`"}], RowBox[{"-", "1.5140862657199998`"}]}, { RowBox[{"-", "5.9683216258`"}], "1.07684146384`", RowBox[{"-", "5.9395977906`"}]}, {"5.6138090281999995`", "1.4014774933799998`", RowBox[{"-", "3.2503287199999997`"}]}, {"4.0132111062`", RowBox[{"-", "4.253206308199999`"}], "2.974428724`"}, { RowBox[{"-", "7.3304361266`"}], RowBox[{"-", "0.54580956058`"}], "1.0210567523199998`"}, { RowBox[{"-", "5.909173202`"}], "3.1101110508`", RowBox[{"-", "2.2262862006`"}]}, {"0.7436582036019999`", RowBox[{"-", "0.045589639749999966`"}], "0.6592998900989999`"}, {"5.550872969813349`", "3.0470450713525117`", RowBox[{"-", "0.4517792189980079`"}]}, {"4.142263906633225`", RowBox[{"-", "1.392052700554106`"}], "4.454318987461828`"}, { RowBox[{"-", "5.359586650337278`"}], RowBox[{"-", "2.631615367211082`"}], RowBox[{"-", "0.5177590426298949`"}]}, { RowBox[{"-", "3.685221275741115`"}], "1.0902737769070563`", RowBox[{"-", "3.432620689238677`"}]}, {"2.7170265640436932`", "0.9009849892812214`", "1.4155684879835302`"}, {"4.7622470791012566`", "1.7507224691120218`", "1.3062184688170908`"}, {"4.241173266152303`", "0.3229434284421962`", "2.932957132998067`"}, { RowBox[{"-", "1.1899584690860423`"}], RowBox[{"-", "0.9507551605959488`"}], RowBox[{"-", "0.29173916308428677`"}]}, { RowBox[{"-", "3.2214671280133915`"}], RowBox[{"-", "1.7919970821664315`"}], RowBox[{"-", "0.7112152074521317`"}]}, { RowBox[{"-", "2.440019692841835`"}], RowBox[{"-", "0.08902119563377286`"}], RowBox[{"-", "1.9202679662665956`"}]}, {"5.56679646116932`", "4.457261256654497`", RowBox[{"-", "2.275667521371172`"}]}, {"3.424612941003343`", RowBox[{"-", "3.067357172747129`"}], "5.862148811293695`"}, { RowBox[{"-", "7.564289907341427`"}], RowBox[{"-", "3.0635263706801967`"}], RowBox[{"-", "0.9346168124425573`"}]}, { RowBox[{"-", "5.474308715227758`"}], "1.369329345041986`", RowBox[{"-", "4.855590224872699`"}]}, {"5.599569999334383`", "2.282444383779188`", RowBox[{"-", "2.584234251732532`"}]}, {"3.9201632151714185`", RowBox[{"-", "3.5356428662090003`"}], "3.7844927164841176`"}, { RowBox[{"-", "7.034434214905941`"}], RowBox[{"-", "1.4031103472035986`"}], "0.37417114326892686`"}, { RowBox[{"-", "5.445531227204907`"}], "2.419712471524331`", RowBox[{"-", "2.939314815252402`"}]}, {"0.7423542176885595`", "1.5262173465990125`", "2.43710856945025`"}, {"1.2494894701681174`", "2.2334274417144346`", "0.22858196627197291`"}, {"0.8745751225877622`", RowBox[{"-", "1.7275807118875144`"}], RowBox[{"-", "1.0021467407593891`"}]}, {"0.05470362490850768`", RowBox[{"-", "2.2572068623959196`"}], "1.1683713765603463`"}, {"6.875776767848363`", "2.6758688535948703`", "1.4445066663306974`"}, {"4.928217864573188`", "4.045865677287662`", "1.58130663153444`"}, {"3.627581663505765`", "0.8031074239861635`", "5.114553332516713`"}, {"5.861509460560876`", "0.20412837823662888`", "4.584653345944352`"}, { RowBox[{"-", "3.561090835977243`"}], RowBox[{"-", "3.807705444215321`"}], "0.3631324359823852`"}, { RowBox[{"-", "3.8513567954664056`"}], RowBox[{"-", "3.6123531796936517`"}], RowBox[{"-", "1.9981294946396946`"}]}, { RowBox[{"-", "1.3962615776502199`"}], "1.5287243947970932`", RowBox[{"-", "3.1911032726247557`"}]}, { RowBox[{"-", "2.134106686855349`"}], RowBox[{"-", "0.5056383900873976`"}], RowBox[{"-", "4.169824233228811`"}]}, {"5.548567317216411`", "5.879777225223276`", RowBox[{"-", "3.9184390539538168`"}]}, {"2.742005979560397`", RowBox[{"-", "4.567439119252648`"}], "7.293136462888009`"}, { RowBox[{"-", "9.6236622861955`"}], RowBox[{"-", "3.5314215508903066`"}], RowBox[{"-", "1.4000810948059803`"}]}, { RowBox[{"-", "7.09685735834498`"}], "1.5917778860285101`", RowBox[{"-", "6.294096154788337`"}]} }, 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.5709523166326647`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"cloud", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", 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", "]"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491351943607`*^9}, {3.569149201666077*^9, 3.5691492026956787`*^9}, { 3.5691494320784817`*^9, 3.5691494680989447`*^9}, {3.569152288984131*^9, 3.5691522953957424`*^9}, {3.5691595058486633`*^9, 3.569159537672719*^9}, 3.569237911685565*^9, 3.5693411655535583`*^9, 3.5693418217687106`*^9, { 3.5703410302061863`*^9, 3.570341063621445*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"nucleus", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dc", "]"}], " ", "*)"}], " "}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.569152599175076*^9}, {3.569159470889002*^9, 3.569159489874235*^9}, {3.569160442895509*^9, 3.5691604484335184`*^9}, 3.569237923385586*^9, 3.569341165569158*^9, 3.5693418217843103`*^9, { 3.570341048161818*^9, 3.570341058286236*^9}, {3.57034131095988*^9, 3.570341315156287*^9}, 3.5703415891395683`*^9, 3.570341976207448*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"tv1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", 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}, {3.5704552110753345`*^9, 3.5704552378605814`*^9}, {3.5704560776724567`*^9, 3.570456083070066*^9}, { 3.570855427306635*^9, 3.570855434529448*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1.3819566237999998`", "1.1507864422199998`", "1.1880707361999998`"}, {"0.105359783404`", RowBox[{"-", "1.2419657217199997`"}], "0.130529043998`"}, {"5.517433002200001`", "2.8687930406`", "0.9670294859799999`"}, {"4.4639107572`", RowBox[{"-", "0.0180325213824`"}], "4.256229869799999`"}, { RowBox[{"-", "4.0020617228`"}], RowBox[{"-", "2.9428702997999996`"}], RowBox[{"-", "0.71758565398`"}]}, { RowBox[{"-", "2.4220618141999997`"}], "0.5004939311`", RowBox[{"-", "3.1624564609999997`"}]}, {"5.5843293026`", "3.2253843368`", RowBox[{"-", "1.87128227424`"}]}, {"3.8204590541999996`", RowBox[{"-", "2.7667478366`"}], "4.652505411999999`"}, { RowBox[{"-", "6.7177869573999995`"}], RowBox[{"-", "2.3202055828`"}], RowBox[{"-", "0.31783301593999996`"}]}, { RowBox[{"-", "4.9490034214`"}], "1.6803443592`", RowBox[{"-", "3.7029180969999995`"}]}, {"4.023226654`", "0.6565852986999999`", "1.6381467776199998`"}, { RowBox[{"-", "2.457588663`"}], RowBox[{"-", "0.66576936706`"}], RowBox[{"-", "0.7049811815599999`"}]}, {"5.550314234599999`", "5.615320808999999`", RowBox[{"-", "2.6558209203999996`"}]}, {"3.0522854352`", RowBox[{"-", "3.3501062528`"}], "6.9999230491999995`"}, { RowBox[{"-", "8.3595809062`"}], RowBox[{"-", "3.7618775481999998`"}], RowBox[{"-", "1.5140862657199998`"}]}, { RowBox[{"-", "5.9683216258`"}], "1.07684146384`", RowBox[{"-", "5.9395977906`"}]}, {"5.6138090281999995`", "1.4014774933799998`", RowBox[{"-", "3.2503287199999997`"}]}, {"4.0132111062`", RowBox[{"-", "4.253206308199999`"}], "2.974428724`"}, { RowBox[{"-", "7.3304361266`"}], RowBox[{"-", "0.54580956058`"}], "1.0210567523199998`"}, { RowBox[{"-", "5.909173202`"}], "3.1101110508`", RowBox[{"-", "2.2262862006`"}]}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0", "0", "0"}, {"0.49168780793999994`", "1.673352373`", "2.9266186562`"}, {"1.1975760579799999`", "2.6577106463999995`", RowBox[{"-", "0.147438312246`"}]}, {"1.1760142843199999`", RowBox[{"-", "1.9178829173999998`"}], RowBox[{"-", "1.4460183351999998`"}]}, {"0.034852216618`", RowBox[{"-", "2.65506503`"}], "1.5750866209999999`"}, {"7.408103865199999`", "2.600262976`", "1.63162722292`"}, {"4.6972919181999995`", "4.5071854826`", "1.8220549119399998`"}, {"3.2998395412`", "1.12489719602`", "5.450914646999999`"}, {"6.4091947016`", "0.29118787934`", "4.7133545892`"}, { RowBox[{"-", "3.388278718`"}], RowBox[{"-", "4.1466257618`"}], "0.78665513928`"}, { RowBox[{"-", "3.7923021368`"}], RowBox[{"-", "3.8746941903999996`"}], RowBox[{"-", "2.4999185253999996`"}]}, { RowBox[{"-", "0.9942604376399999`"}], "1.9316779171999998`", RowBox[{"-", "3.2023296796`"}]}, { RowBox[{"-", "2.0212509296`"}], RowBox[{"-", "0.89996311024`"}], RowBox[{"-", "4.564633153`"}]}, {"5.5478575908`", "5.987218885799999`", RowBox[{"-", "4.43140747`"}]}, {"2.6159477018`", RowBox[{"-", "5.0620090362`"}], "7.4122612623999995`"}, { RowBox[{"-", "10.1372461544`"}], RowBox[{"-", "3.4377895391999997`"}], RowBox[{"-", "1.35376191188`"}]}, { RowBox[{"-", "7.5553135205999995`"}], "1.8009655697799998`", RowBox[{"-", "6.4381075094`"}]} }, 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.5709523166638646`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{"ow", "=", RowBox[{"Join", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "2.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"bc", "+", "nb"}]}], "}"}]}], "]"}], "]"}]}], RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"cnv", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bc"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}]}], "]"}]}], "]"}]}], "\[IndentingNewLine]", 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[{"1", "/", "sq"}], FontColor->RGBColor[1, 0, 0]], ",", "0"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 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", "]"}], "*)"}], " "}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699655579047`*^9}, {3.56921753575448*^9, 3.569217541807291*^9}, {3.569217576283351*^9, 3.5692176436130695`*^9}, { 3.5692176921603546`*^9, 3.569217692768756*^9}, {3.5692177389136367`*^9, 3.569217740192839*^9}, {3.5692222042775583`*^9, 3.5692222070231633`*^9}, { 3.569230669979245*^9, 3.5692306709620466`*^9}, {3.5692308816872168`*^9, 3.5692309970650196`*^9}, {3.5692310297158766`*^9, 3.569231090602784*^9}, { 3.5692311251880445`*^9, 3.569231148868886*^9}, 3.56923793753481*^9, 3.569341165569158*^9, 3.5693418217375107`*^9, {3.5703412254249296`*^9, 3.5703412423509593`*^9}, {3.5704553045038986`*^9, 3.570455320681127*^9}, { 3.57045550485505*^9, 3.5704555063370533`*^9}, {3.5704556421508913`*^9, 3.5704556424784923`*^9}, 3.5704557137862177`*^9, {3.5704564711051474`*^9, 3.5704564908079824`*^9}, {3.570456521602436*^9, 3.5704565228348384`*^9}, { 3.5704569127419233`*^9, 3.5704569202767363`*^9}, 3.5704636205455036`*^9, 3.570596993178934*^9, {3.570855461377095*^9, 3.5708554743563175`*^9}, 3.570855611589759*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}]}], "}"}]], "Output", CellChangeTimes->{3.5709523166794643`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "7.`", ",", "7.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output", CellChangeTimes->{3.5709523166794643`*^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[{ RowBox[{"ow", "[", RowBox[{"[", "i", "]"}], "]"}], "*", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "j", "]"}], "]"}], "/", RowBox[{"dw", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}]}]}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "Vee"}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.568910199825492*^9}, 3.568910617609826*^9, {3.56891263539537*^9, 3.568912638842976*^9}, {3.568952611212014*^9, 3.5689526227248344`*^9}, { 3.5689527476498537`*^9, 3.5689527480086546`*^9}, {3.5689530637688093`*^9, 3.5689530642368097`*^9}, {3.569133363948546*^9, 3.569133373698563*^9}, { 3.5691350563331184`*^9, 3.56913505725352*^9}, 3.5691351502452836`*^9, { 3.569135237792637*^9, 3.5691352453118505`*^9}, {3.5691353071659594`*^9, 3.5691353166039753`*^9}, {3.5691447439722476`*^9, 3.5691448093675623`*^9}, {3.569146067386572*^9, 3.569146078244191*^9}, { 3.5691478509845047`*^9, 3.5691478969889855`*^9}, {3.569149270524598*^9, 3.569149283675421*^9}, {3.5691523005437512`*^9, 3.5691523013861527`*^9}, { 3.570457123841494*^9, 3.5704571330923104`*^9}, {3.570457176959587*^9, 3.570457191296013*^9}, {3.570463789649801*^9, 3.570463797637015*^9}, { 3.5704639300032473`*^9, 3.5704639472412777`*^9}, {3.570464099403945*^9, 3.5704641196371803`*^9}, {3.570464183737693*^9, 3.5704641855628963`*^9}, { 3.570855532092019*^9, 3.5708555433240385`*^9}}], Cell[BoxData["1040.5813666200506`"], "Output", CellChangeTimes->{3.570952316726265*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"sc", "=", "0.43"}], ";"}], " ", 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.43"}], ";"}], " ", 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}, { 3.57045575500149*^9, 3.5704557604770994`*^9}, {3.57046440981329*^9, 3.5704644333849316`*^9}, {3.5705963024877205`*^9, 3.5705963300061693`*^9}, {3.5706010463712544`*^9, 3.570601069225295*^9}, { 3.5706012097659416`*^9, 3.5706012109983435`*^9}, {3.570601290948484*^9, 3.570601291619285*^9}, {3.570601333099758*^9, 3.570601444951955*^9}, 3.5706014761208096`*^9, {3.570601526633698*^9, 3.570601615179454*^9}, { 3.5708576202336864`*^9, 3.5708576267544985`*^9}, {3.5708577990100007`*^9, 3.5708578016152053`*^9}, {3.5708580423548284`*^9, 3.570858044429632*^9}, { 3.570858075754487*^9, 3.5708581072821426`*^9}, {3.570858449889944*^9, 3.5708585756105647`*^9}}], Cell[BoxData["1201.0085164081452`"], "Output", CellChangeTimes->{3.570952316726265*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"all", " ", "nuclei", " ", "with", " ", "all", " ", "clouds"}], ",", " ", RowBox[{ RowBox[{"except", " ", "i"}], " ", "=", " ", "j"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Vne", "=", RowBox[{"cnv", ".", RowBox[{"(", RowBox[{"ow", ".", "dcw"}], ")"}]}]}]}]], "Input", CellChangeTimes->{ 3.569233528637466*^9, 3.5692342309507*^9, {3.5704557844231415`*^9, 3.570455793127957*^9}}], Cell[BoxData[ RowBox[{"-", "2844.688692920122`"}]], "Output", CellChangeTimes->{3.5709523167418647`*^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[{"-", "4814.934093049459`"}]], "Output", CellChangeTimes->{3.570952316757465*^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[{"-", "4852.720141223172`"}]], "Output", CellChangeTimes->{3.5709523167730646`*^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["1690.8545691864417`"], "Output", CellChangeTimes->{3.5709523167730646`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{"Vee", "\[IndentingNewLine]", "Vnn", "\[IndentingNewLine]", \ "Vne", "\[IndentingNewLine]", RowBox[{"Vtot", "=", RowBox[{ "Vne", "+", "Vee", "+", "Vnn"}]}], "\[IndentingNewLine]", "Ttot", "\[IndentingNewLine]", RowBox[{"Vir", " ", "=", RowBox[{ RowBox[{"-", "Vtot"}], "/", "Ttot"}]}], "\[IndentingNewLine]", RowBox[{"Etot", "=", RowBox[{"Ttot", "+", "Vtot"}]}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.5689074950860367`*^9, 3.5689075109980645`*^9}, { 3.568910298074465*^9, 3.5689103015064707`*^9}, {3.568910724064413*^9, 3.5689107693044925`*^9}, {3.568955368910859*^9, 3.568955378629676*^9}, { 3.568955601366867*^9, 3.568955616218093*^9}, {3.5704638504275074`*^9, 3.570463876370353*^9}, {3.570464305074706*^9, 3.5704643133895206`*^9}, { 3.570464352171189*^9, 3.570464353231991*^9}, {3.570712404698539*^9, 3.5707124150569572`*^9}, {3.570809962851386*^9, 3.5708101493809137`*^9}, { 3.5708102160710306`*^9, 3.570810245165082*^9}, {3.5708102767551374`*^9, 3.5708103693413*^9}, {3.570810404207361*^9, 3.5708104232081947`*^9}, { 3.5708104788690925`*^9, 3.5708104825818987`*^9}, {3.5708105169643593`*^9, 3.570810517884761*^9}, {3.570810561767638*^9, 3.5708105625476394`*^9}, { 3.5708106179589367`*^9, 3.570810645648985*^9}, {3.5708552812279787`*^9, 3.570855300572013*^9}}], Cell[BoxData["1201.0085164081452`"], "Output", CellChangeTimes->{3.570952316788665*^9}], Cell[BoxData["1690.8545691864417`"], "Output", CellChangeTimes->{3.570952316788665*^9}], Cell[BoxData[ RowBox[{"-", "4852.720141223172`"}]], "Output", CellChangeTimes->{3.570952316804265*^9}], Cell[BoxData[ RowBox[{"-", "1960.8570556285847`"}]], "Output", CellChangeTimes->{3.570952316804265*^9}], Cell[BoxData["1065.816319429286`"], "Output", CellChangeTimes->{3.570952316804265*^9}], Cell[BoxData["1.8397701554040449`"], "Output", CellChangeTimes->{3.570952316804265*^9}], Cell[BoxData[ RowBox[{"-", "895.0407361992986`"}]], "Output", CellChangeTimes->{3.570952316804265*^9}] }, Open ]] }, WindowSize->{1409, 939}, WindowMargins->{{Automatic, 40}, {Automatic, -23}}, PrintingCopies->1, PrintingPageRange->{32000, 32000}, PrintingOptions->{"Magnification"->1., "PaperOrientation"->"Portrait", "PaperSize"->{595.2, 841.8}}, FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (January 25, 2013)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[557, 20, 1480, 27, 52, "Input"], Cell[CellGroupData[{ Cell[2062, 51, 302, 6, 52, "Input"], Cell[2367, 59, 5019, 87, 341, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7423, 151, 704, 15, 52, "Input"], Cell[8130, 168, 4103, 103, 566, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[12270, 276, 629, 10, 31, "Input"], Cell[12902, 288, 780, 12, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[13719, 305, 955, 14, 31, "Input"], Cell[14677, 321, 71, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[14785, 327, 1560, 29, 31, "Input"], Cell[16348, 358, 780, 12, 31, "Output"] }, Open ]], Cell[17143, 373, 1390, 22, 31, "Input"], Cell[18536, 397, 1566, 28, 31, "Input"], Cell[CellGroupData[{ Cell[20127, 429, 1234, 18, 31, "Input"], Cell[21364, 449, 2536, 75, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[23937, 529, 697, 14, 31, "Input"], Cell[24637, 545, 507, 9, 31, "Output"] }, Open ]], Cell[25159, 557, 908, 24, 31, "Input"], Cell[CellGroupData[{ Cell[26092, 585, 5635, 122, 52, "Input"], Cell[31730, 709, 633, 11, 52, "Output"], Cell[32366, 722, 650, 11, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[33053, 738, 519, 12, 31, "Input"], Cell[33575, 752, 780, 12, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[34392, 769, 1401, 38, 31, "Input"], Cell[35796, 809, 553, 10, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[36386, 824, 827, 23, 92, "Input"], Cell[37216, 849, 71, 1, 31, "Output"], Cell[37290, 852, 73, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[37400, 858, 302, 6, 52, "Input"], Cell[37705, 866, 107, 1, 31, "Output"] }, Open ]], Cell[37827, 870, 1824, 35, 72, "Input"], Cell[39654, 907, 935, 19, 31, "Input"], Cell[40592, 928, 4271, 83, 92, "Input"], Cell[44866, 1013, 3292, 57, 31, "Input"], Cell[CellGroupData[{ Cell[48183, 1074, 293, 6, 52, "Input"], Cell[48479, 1082, 24619, 606, 245, "Output"] }, Open ]], Cell[73113, 1691, 2567, 59, 52, "Input"], Cell[75683, 1752, 1254, 35, 72, "Input"], Cell[CellGroupData[{ Cell[76962, 1791, 4223, 78, 72, "Input"], Cell[81188, 1871, 8530, 126, 566, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[89755, 2002, 2506, 53, 112, "Input"], Cell[92264, 2057, 73, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[92374, 2063, 2272, 46, 72, "Input"], Cell[94649, 2111, 202, 5, 31, "Output"] }, Open ]], Cell[94866, 2119, 5743, 149, 152, "Input"], Cell[CellGroupData[{ Cell[100634, 2272, 3443, 77, 112, "Input"], Cell[104080, 2351, 690, 11, 52, "Output"] }, Open ]], Cell[104785, 2365, 2072, 49, 112, "Input"], Cell[106860, 2416, 561, 12, 52, "Input"], Cell[107424, 2430, 2148, 49, 92, "Input"], Cell[109575, 2481, 2452, 56, 92, "Input"], Cell[112030, 2539, 1759, 41, 72, "Input"], Cell[CellGroupData[{ Cell[113814, 2584, 923, 20, 31, "Input"], Cell[114740, 2606, 87, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[114864, 2612, 711, 18, 31, "Input"], Cell[115578, 2632, 88, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[115703, 2638, 507, 10, 31, "Input"], Cell[116213, 2650, 87, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[116337, 2656, 823, 23, 31, "Input"], Cell[117163, 2681, 87, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[117287, 2687, 204, 4, 31, "Input"], Cell[117494, 2693, 88, 1, 31, "Output"] }, Open ]], Cell[117597, 2697, 1971, 35, 92, "Input"], Cell[CellGroupData[{ Cell[119593, 2736, 1770, 24, 31, "Input"], Cell[121366, 2762, 14648, 222, 581, "Output"] }, Open ]], Cell[136029, 2987, 1655, 24, 31, "Input"], Cell[CellGroupData[{ Cell[137709, 3015, 3421, 71, 72, "Input"], Cell[CellGroupData[{ Cell[141155, 3090, 409, 8, 23, "Print"], Cell[141567, 3100, 409, 8, 23, "Print"], Cell[141979, 3110, 406, 8, 23, "Print"], Cell[142388, 3120, 411, 8, 23, "Print"], Cell[142802, 3130, 408, 8, 23, "Print"], Cell[143213, 3140, 408, 8, 23, "Print"], Cell[143624, 3150, 408, 8, 23, "Print"], Cell[144035, 3160, 410, 8, 23, "Print"], Cell[144448, 3170, 408, 8, 23, "Print"], Cell[144859, 3180, 411, 8, 23, "Print"], Cell[145273, 3190, 411, 8, 23, "Print"], Cell[145687, 3200, 411, 8, 23, "Print"] }, Open ]] }, Open ]], Cell[146125, 3212, 2696, 53, 92, "Input"], Cell[CellGroupData[{ Cell[148846, 3269, 939, 17, 72, "Input"], Cell[149788, 3288, 3174, 74, 112, "Output"], Cell[152965, 3364, 73, 1, 31, "Output"], Cell[153041, 3367, 73, 1, 31, "Output"] }, Open ]], Cell[153129, 3371, 10201, 233, 72, "Input"], Cell[163333, 3606, 6246, 100, 31, "Input"], Cell[169582, 3708, 10215, 234, 72, "Input"], Cell[179800, 3944, 5925, 93, 31, "Input"], Cell[CellGroupData[{ Cell[185750, 4041, 8003, 144, 92, "Input"], Cell[193756, 4187, 179413, 3002, 589, 18814, 367, "CachedBoxData", "BoxData", \ "Output"], Cell[373172, 7191, 13988, 261, 897, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[387197, 7457, 3879, 89, 152, "Input"], Cell[391079, 7548, 73, 1, 31, "Output"], Cell[391155, 7551, 6305, 151, 851, "Output"] }, Open ]], Cell[397475, 7705, 3049, 67, 72, "Input"], Cell[400527, 7774, 1841, 29, 52, "Input"], Cell[CellGroupData[{ Cell[402393, 7807, 3517, 75, 112, "Input"], Cell[405913, 7884, 4521, 122, 851, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[410471, 8011, 6437, 145, 132, "Input"], Cell[416911, 8158, 1802, 58, 52, "Output"], Cell[418716, 8218, 796, 13, 52, "Output"] }, Open ]], Cell[419527, 8234, 1863, 27, 31, "Input"], Cell[CellGroupData[{ Cell[421415, 8265, 2963, 56, 112, "Input"], Cell[424381, 8323, 88, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[424506, 8329, 2532, 57, 112, "Input"], Cell[427041, 8388, 88, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[427166, 8394, 499, 15, 52, "Input"], Cell[427668, 8411, 106, 2, 31, "Output"] }, Open ]], Cell[427789, 8416, 1381, 21, 31, "Input"], Cell[CellGroupData[{ Cell[429195, 8441, 1709, 32, 52, "Input"], Cell[430907, 8475, 104, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[431048, 8482, 1415, 43, 72, "Input"], Cell[432466, 8527, 106, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[432609, 8534, 2550, 50, 92, "Input"], Cell[435162, 8586, 90, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[435289, 8592, 1351, 23, 172, "Input"], Cell[436643, 8617, 88, 1, 31, "Output"], Cell[436734, 8620, 88, 1, 31, "Output"], Cell[436825, 8623, 104, 2, 31, "Output"], Cell[436932, 8627, 105, 2, 31, "Output"], Cell[437040, 8631, 87, 1, 31, "Output"], Cell[437130, 8634, 88, 1, 31, "Output"], Cell[437221, 8637, 104, 2, 31, "Output"] }, Open ]] } ] *) (* End of internal cache information *)