(* 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[ 781090, 15281] NotebookOptionsPosition[ 771898, 15002] NotebookOutlinePosition[ 772398, 15022] CellTagsIndexPosition[ 772355, 15019] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Kimball", " ", "model", " ", "and", " ", "energy", " ", "derived", " ", "from", " ", RowBox[{"PDB", "/", "Facio"}]}], ",", " ", RowBox[{"ES", " ", "03", " ", "May", " ", "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, {3.5719810762355733`*^9, 3.5719810786847773`*^9}, 3.5723256977094345`*^9, 3.572583124905918*^9, { 3.5727976670013523`*^9, 3.572797667157352*^9}, 3.5728672700652885`*^9, { 3.5732075583876934`*^9, 3.5732075588400946`*^9}, {3.573221345358634*^9, 3.57322135451585*^9}, {3.573369135900576*^9, 3.5733691365557775`*^9}, { 3.574682961367374*^9, 3.5746829644717793`*^9}, 3.5747440056200757`*^9, { 3.574833269418433*^9, 3.5748332704636354`*^9}, 3.574833303161292*^9, { 3.5750055229593754`*^9, 3.5750055237081766`*^9}, 3.5753452568612485`*^9, { 3.575602814966606*^9, 3.5756028151382065`*^9}, 3.5757279640625825`*^9, { 3.575775139243217*^9, 3.5757751402728186`*^9}, {3.5762939464431095`*^9, 3.5762939465679092`*^9}, {3.576384009529279*^9, 3.5763840168924923`*^9}, { 3.5764687348229947`*^9, 3.576468735977397*^9}, {3.5764742678559866`*^9, 3.5764742780272045`*^9}, {3.5765550827850237`*^9, 3.5765550838770256`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"t1", "=", RowBox[{"1.8897", "*", RowBox[{ "ReadList", "[", "\"\\"", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"u", "=", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], ";"}]}], "Input", CellChangeTimes->{ 3.57029749846047*^9, {3.570297893562364*^9, 3.5702979152152023`*^9}, { 3.5704535321223855`*^9, 3.570453555038826*^9}, {3.570558892227501*^9, 3.5705589112283344`*^9}, {3.5705589864360666`*^9, 3.5705590132681136`*^9}, {3.5705590525489826`*^9, 3.5705590747322216`*^9}, {3.570595322227199*^9, 3.5705953504632483`*^9}, 3.570855059411189*^9, 3.570856566545436*^9, 3.5709425310226765`*^9, 3.5730457924857635`*^9, 3.5746613722339497`*^9, 3.574701612088543*^9, 3.574852285217162*^9, {3.5749355226137695`*^9, 3.5749355538138237`*^9}, { 3.574996024820664*^9, 3.5749960279094696`*^9}, {3.575343895110856*^9, 3.575343895110856*^9}, {3.5753463317811365`*^9, 3.5753463317811365`*^9}, { 3.575346463663768*^9, 3.575346463663768*^9}, {3.575347966055607*^9, 3.575347966055607*^9}, {3.5753753647221766`*^9, 3.5753753647221766`*^9}, { 3.576293874214982*^9, 3.5762938797997923`*^9}, {3.5762995804113493`*^9, 3.57629960363979*^9}, {3.5764204629591084`*^9, 3.576420463161908*^9}, { 3.5764205228788133`*^9, 3.576420522894413*^9}, {3.576420642297023*^9, 3.5764206425154233`*^9}, {3.5764741290469427`*^9, 3.5764741366597557`*^9}, {3.5764997122607417`*^9, 3.5764997185787525`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5.995356705`", ",", "2.188556055`", ",", RowBox[{"-", "0.173379975`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5.0297577989999995`", ",", "1.361188704`", ",", "2.241203097`"}], "}"}], ",", RowBox[{"{", RowBox[{"8.162200106999999`", ",", "1.119496074`", ",", RowBox[{"-", "1.379537691`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"3.821956044`", ",", "3.532265034`", ",", RowBox[{"-", "1.0332879599999998`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"2.591591271`", ",", "2.879978388`", ",", "1.505316123`"}], "}"}], ",", RowBox[{"{", RowBox[{"5.151794625`", ",", RowBox[{"-", "1.994824011`"}], ",", "1.512988305`"}], "}"}], ",", RowBox[{"{", RowBox[{"7.583460584999999`", ",", RowBox[{"-", "1.723311915`"}], ",", RowBox[{"-", "0.990977577`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"10.550138409`", ",", "2.067766431`", ",", RowBox[{"-", "0.123491895`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"3.4165964969999996`", ",", "4.465209924`", ",", RowBox[{"-", "3.063902889`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.296966355`", ",", "1.393823823`", ",", "1.324585215`"}], "}"}], ",", RowBox[{"{", RowBox[{"9.923230433999999`", ",", RowBox[{"-", "3.2676314459999998`"}], ",", RowBox[{"-", "0.226782897`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"6.458408792999999`", ",", RowBox[{"-", "2.8374223439999997`"}], ",", RowBox[{"-", "3.436551729`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"12.483792830999999`", ",", "2.155713069`", ",", RowBox[{"-", "1.735783935`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"10.819250586`", ",", "2.66428803`", ",", "2.058469107`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.058488004`"}], ",", "2.5511138969999996`", ",", "1.4326949519999999`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.35065631`"}], ",", "0.86586054`", ",", "1.0382200769999999`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.264899935`"}], ",", "4.790257221`", ",", "1.819554336`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.592690875`"}], ",", "2.2941524909999997`", ",", "1.078319511`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.823746283`"}], ",", "1.11775755`", ",", "0.516625083`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9.147376305`"}], ",", RowBox[{"-", "1.4973982799999999`"}], ",", "0.225932532`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "10.951246131`"}], ",", "2.629801005`", ",", "0.074000652`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "11.481212496`"}], ",", RowBox[{"-", "2.5464274409999996`"}], ",", RowBox[{"-", "0.423311697`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "13.29725199`"}], ",", "1.614824238`", ",", RowBox[{"-", "0.5760183539999999`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "13.572826940999999`"}], ",", RowBox[{"-", "0.99360426`"}], ",", RowBox[{"-", "0.824135964`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"6.129317538`", ",", "2.061171378`", ",", "3.8194616399999997`"}], "}"}], ",", RowBox[{"{", RowBox[{"8.198746905`", ",", "1.661216373`", ",", RowBox[{"-", "3.3552379379999997`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"2.3924546849999997`", ",", "4.582541397`", ",", "2.629290786`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.328448757`", ",", RowBox[{"-", "0.488619729`"}], ",", "0.900914475`"}], "}"}], ",", RowBox[{"{", RowBox[{"11.433138527999999`", ",", RowBox[{"-", "3.102811812`"}], ",", RowBox[{"-", "1.6837415969999998`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"10.728847338`", ",", RowBox[{"-", "2.628364833`"}], ",", "1.609570872`"}], "}"}], ",", RowBox[{"{", RowBox[{"9.469626846`", ",", RowBox[{"-", "5.314384413`"}], ",", RowBox[{"-", "0.026474697`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"4.729994688`", ",", RowBox[{"-", "1.7991833699999997`"}], ",", RowBox[{"-", "4.047227180999999`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7.845769842`", ",", RowBox[{"-", "2.731391277`"}], ",", RowBox[{"-", "5.016529898999999`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5.936265786`", ",", RowBox[{"-", "4.864598019`"}], ",", RowBox[{"-", "3.2068209`"}]}], "}"}], ",", RowBox[{"{", RowBox[{"13.777216892999999`", ",", "2.766671976`", ",", RowBox[{"-", "0.5858825879999999`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.177162953`"}], ",", RowBox[{"-", "0.055084755`"}], ",", RowBox[{"-", "0.848645373`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.4255262239999995`"}], ",", RowBox[{"-", "0.5413423589999999`"}], ",", "2.603534175`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7.5618991079999995`"}], ",", RowBox[{"-", "2.815634103`"}], ",", "0.50927415`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "10.765677591`"}], ",", "4.698852432`", ",", "0.243242184`"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "11.674774467`"}], ",", RowBox[{"-", "4.611718365`"}], ",", RowBox[{"-", "0.6270969449999999`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "14.927590664999999`"}], ",", "2.871984957`", ",", RowBox[{"-", "0.902086089`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "15.416380467000002`"}], ",", RowBox[{"-", "1.816209567`"}], ",", RowBox[{"-", "1.3421972189999998`"}]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.57655729626611*^9, 3.5765575314989233`*^9, 3.580218412443776*^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["42"], "Output", CellChangeTimes->{3.57655729626611*^9, 3.5765575315145235`*^9, 3.5802184124593763`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"{", "i", "}"}], ",", RowBox[{"{", RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "}"}], ",", RowBox[{"t1", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "n"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.574996055162717*^9, 3.574996080637562*^9}, { 3.5749961872169495`*^9, 3.5749961936753607`*^9}, {3.5749962548738976`*^9, 3.574996268492721*^9}, {3.574996311720397*^9, 3.5749963415788493`*^9}, { 3.57499639316814*^9, 3.5749964813394947`*^9}, {3.5749966279017525`*^9, 3.5749966325037603`*^9}, {3.575738220273323*^9, 3.5757382663558044`*^9}, { 3.5757383024542675`*^9, 3.5757383039050703`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "\<\"N\"\>", "5.995356705`", "2.188556055`", RowBox[{"-", "0.173379975`"}]}, {"2", "\<\"C\"\>", "5.0297577989999995`", "1.361188704`", "2.241203097`"}, {"3", "\<\"C\"\>", "8.162200106999999`", "1.119496074`", RowBox[{"-", "1.379537691`"}]}, {"4", "\<\"C\"\>", "3.821956044`", "3.532265034`", RowBox[{"-", "1.0332879599999998`"}]}, {"5", "\<\"C\"\>", "2.591591271`", "2.879978388`", "1.505316123`"}, {"6", "\<\"S\"\>", "5.151794625`", RowBox[{"-", "1.994824011`"}], "1.512988305`"}, {"7", "\<\"C\"\>", "7.583460584999999`", RowBox[{"-", "1.723311915`"}], RowBox[{"-", "0.990977577`"}]}, {"8", "\<\"C\"\>", "10.550138409`", "2.067766431`", RowBox[{"-", "0.123491895`"}]}, {"9", "\<\"O\"\>", "3.4165964969999996`", "4.465209924`", RowBox[{"-", "3.063902889`"}]}, {"10", "\<\"N\"\>", "0.296966355`", "1.393823823`", "1.324585215`"}, {"11", "\<\"C\"\>", "9.923230433999999`", RowBox[{"-", "3.2676314459999998`"}], RowBox[{"-", "0.226782897`"}]}, {"12", "\<\"C\"\>", "6.458408792999999`", RowBox[{"-", "2.8374223439999997`"}], RowBox[{"-", "3.436551729`"}]}, {"13", "\<\"O\"\>", "12.483792830999999`", "2.155713069`", RowBox[{"-", "1.735783935`"}]}, {"14", "\<\"O\"\>", "10.819250586`", "2.66428803`", "2.058469107`"}, {"15", "\<\"C\"\>", RowBox[{"-", "2.058488004`"}], "2.5511138969999996`", "1.4326949519999999`"}, {"16", "\<\"C\"\>", RowBox[{"-", "4.35065631`"}], "0.86586054`", "1.0382200769999999`"}, {"17", "\<\"O\"\>", RowBox[{"-", "2.264899935`"}], "4.790257221`", "1.819554336`"}, {"18", "\<\"O\"\>", RowBox[{"-", "6.592690875`"}], "2.2941524909999997`", "1.078319511`"}, {"19", "\<\"C\"\>", RowBox[{"-", "8.823746283`"}], "1.11775755`", "0.516625083`"}, {"20", "\<\"C\"\>", RowBox[{"-", "9.147376305`"}], RowBox[{"-", "1.4973982799999999`"}], "0.225932532`"}, {"21", "\<\"C\"\>", RowBox[{"-", "10.951246131`"}], "2.629801005`", "0.074000652`"}, {"22", "\<\"C\"\>", RowBox[{"-", "11.481212496`"}], RowBox[{"-", "2.5464274409999996`"}], RowBox[{"-", "0.423311697`"}]}, {"23", "\<\"C\"\>", RowBox[{"-", "13.29725199`"}], "1.614824238`", RowBox[{"-", "0.5760183539999999`"}]}, {"24", "\<\"C\"\>", RowBox[{"-", "13.572826940999999`"}], RowBox[{"-", "0.99360426`"}], RowBox[{"-", "0.824135964`"}]}, {"25", "\<\"H\"\>", "6.129317538`", "2.061171378`", "3.8194616399999997`"}, {"26", "\<\"H\"\>", "8.198746905`", "1.661216373`", RowBox[{"-", "3.3552379379999997`"}]}, {"27", "\<\"H\"\>", "2.3924546849999997`", "4.582541397`", "2.629290786`"}, {"28", "\<\"H\"\>", "0.328448757`", RowBox[{"-", "0.488619729`"}], "0.900914475`"}, {"29", "\<\"H\"\>", "11.433138527999999`", RowBox[{"-", "3.102811812`"}], RowBox[{"-", "1.6837415969999998`"}]}, {"30", "\<\"H\"\>", "10.728847338`", RowBox[{"-", "2.628364833`"}], "1.609570872`"}, {"31", "\<\"H\"\>", "9.469626846`", RowBox[{"-", "5.314384413`"}], RowBox[{"-", "0.026474697`"}]}, {"32", "\<\"H\"\>", "4.729994688`", RowBox[{"-", "1.7991833699999997`"}], RowBox[{"-", "4.047227180999999`"}]}, {"33", "\<\"H\"\>", "7.845769842`", RowBox[{"-", "2.731391277`"}], RowBox[{"-", "5.016529898999999`"}]}, {"34", "\<\"H\"\>", "5.936265786`", RowBox[{"-", "4.864598019`"}], RowBox[{"-", "3.2068209`"}]}, {"35", "\<\"H\"\>", "13.777216892999999`", "2.766671976`", RowBox[{"-", "0.5858825879999999`"}]}, {"36", "\<\"H\"\>", RowBox[{"-", "4.177162953`"}], RowBox[{"-", "0.055084755`"}], RowBox[{"-", "0.848645373`"}]}, {"37", "\<\"H\"\>", RowBox[{"-", "4.4255262239999995`"}], RowBox[{"-", "0.5413423589999999`"}], "2.603534175`"}, {"38", "\<\"H\"\>", RowBox[{"-", "7.5618991079999995`"}], RowBox[{"-", "2.815634103`"}], "0.50927415`"}, {"39", "\<\"H\"\>", RowBox[{"-", "10.765677591`"}], "4.698852432`", "0.243242184`"}, {"40", "\<\"H\"\>", RowBox[{"-", "11.674774467`"}], RowBox[{"-", "4.611718365`"}], RowBox[{"-", "0.6270969449999999`"}]}, {"41", "\<\"H\"\>", RowBox[{"-", "14.927590664999999`"}], "2.871984957`", RowBox[{"-", "0.902086089`"}]}, {"42", "\<\"H\"\>", RowBox[{"-", "15.416380467000002`"}], RowBox[{"-", "1.816209567`"}], RowBox[{"-", "1.3421972189999998`"}]} }, 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.5765572962817097`*^9, 3.576557531530123*^9, 3.580218412474976*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"num1", "=", RowBox[{"Table", "[", RowBox[{"i", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"dc1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{ RowBox[{"t1", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"t1", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Prepend", "[", RowBox[{"dc1", ",", "num1"}], "]"}], "]"}]}], "Input", CellChangeTimes->{{3.576392526232239*^9, 3.5763925665895095`*^9}, { 3.5763926566016674`*^9, 3.576392657366069*^9}, 3.5763929792570343`*^9, 3.576421025683296*^9, {3.5764210623901606`*^9, 3.5764210642777643`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30", "31", "32", "33", "34", "35", "36", "37", "38", "39", "40", "41", "42"}, {"0.`", "2.7289429074933236`", "2.7005399474240304`", "2.69604636387196`", "3.8576812415886303`", "4.588693031268297`", "4.300377981896372`", "4.55665615609575`", "4.493136962741724`", "5.945347055639776`", "6.723170825519393`", "6.010255069422527`", "6.673978435471225`", "5.336424215896905`", "8.220422097229623`", "10.500356347189218`", "8.88664592992153`", "12.650566947251512`", "14.873753049829972`", "15.589999129252563`", "16.954151171958998`", "18.10836838620189`", "19.305336985416012`", "19.835912856008466`", "3.9971185275380883`", "3.906051153066791`", "5.154321699117669`", "6.358869745075958`", "7.736228880254241`", "6.984810243433064`", "8.269597924911494`", "5.7017452530957256`", "7.147447916115045`", "7.678036075309618`", "7.81420017720463`", "10.438872718566405`", "11.124675211760275`", "14.4674503963527`", "16.953095074216897`", "18.938931514524743`", "20.946785297807864`", "21.814370725735625`"}, {"2.7289429074933236`", "0.`", "4.793784934081997`", "4.110310109035609`", "2.965283757246053`", "3.4362786722600696`", "5.146118332997663`", "6.046952667976354`", "6.354635051926559`", "4.820847253854235`", "7.173772039667836`", "7.204601186686959`", "8.48589023482852`", "5.937144624754228`", "7.232761294914586`", "9.470199944710048`", "8.071451544061912`", "11.717680352450563`", "13.96255719426426`", "14.602190465750322`", "16.177102034002814`", "17.175017994356857`", "18.54401131077588`", "18.99993453859978`", "2.0469263279567294`", "6.43837408157868`", "4.181278864434398`", "5.226898845152021`", "8.737034749749801`", "6.9853502607805495`", "8.33175108679577`", "7.044300173196953`", "8.795102214780117`", "8.322448108739742`", "9.29977619619994`", "9.814294870842092`", "9.651595941157277`", "13.378910654538831`", "16.267379202893963`", "17.97064723964283`", "20.25977615716488`", "20.999552080690965`"}, {"2.7005399474240304`", "4.793784934081997`", "0.`", "4.977857114960592`", "6.515624475810311`", "5.208477454633536`", "2.9270250526496526`", "2.859915566196463`", "6.045795308275036`", "8.321624743896187`", "4.865897584664628`", "4.774035500590515`", "4.458342822083187`", "4.611527965693221`", "10.696758737665478`", "12.746821537987024`", "11.507957789348035`", "15.004255650118981`", "17.091454328170062`", "17.579735670930987`", "19.228042588679962`", "20.005424815812596`", "21.480201992030292`", "21.84456602629581`", "5.661179908927641`", "2.048948026863679`", "7.832837985165291`", "8.315897950967125`", "5.349716072332944`", "5.437730168739412`", "6.703354553101289`", "5.2359613205310795`", "5.3063333690744`", "6.6410187201344755`", "5.905208750053568`", "12.40650504790363`", "13.306919251817881`", "16.31870570246922`", "19.331574188635173`", "20.662007314672152`", "23.161122926404655`", "23.760665474814854`"}, {"2.69604636387196`", "4.110310109035609`", "4.977857114960592`", "0.`", "2.895476823152543`", "6.2290213340923355`", "6.463110369422247`", "6.945568585420163`", "2.2711449799602916`", "4.749531453716677`", "9.171400751108353`", "7.300649089947432`", "8.798625599027556`", "7.698991930656912`", "6.4516161911238195`", "8.842649555519682`", "6.838937725808565`", "10.698442841280833`", "12.967107008667998`", "13.967345162144738`", "14.842103351524289`", "16.47754655920264`", "17.232323070616648`", "17.97514151596722`", "5.5711051227756885`", "5.296090353562447`", "4.069525481516277`", "5.66685508030756`", "10.118173426610172`", "9.625134311332275`", "10.543863849292698`", "6.191341202953814`", "8.443381088634682`", "8.92758983473242`", "9.994674725521806`", "8.768641634924917`", "9.891497166501368`", "13.125070645084158`", "14.689775710836988`", "17.51108543964116`", "18.76162800782517`", "19.970357963699943`"}, {"3.8576812415886303`", "2.965283757246053`", "6.515624475810311`", "2.895476823152543`", "0.`", "5.506214535005482`", "7.234675051334948`", "8.164017171121262`", "4.906256722316769`", "2.7398216287387855`", "9.723487363215616`", "8.488993270426796`", "10.434794753225392`", "8.249053179483605`", "4.662259425611429`", "7.243593783317873`", "5.228137116437614`", "9.21284736797423`", "11.592793611818527`", "12.593713059175606`", "13.620561574233966`", "15.205567774784752`", "16.07444892993337`", "16.78449897044748`", "4.3059518731284125`", "7.520010700325392`", "2.049803703422558`", "4.102995084646739`", "11.141670683361264`", "9.82688406327021`", "10.807466780037513`", "7.5695482741153155`", "10.081088111305993`", "9.662791866674912`", "11.379989936174427`", "7.744143859908947`", "7.883619503897076`", "11.68441133031778`", "13.539489091808253`", "16.2542885756919`", "17.683817037391854`", "18.82683084478537`"}, {"4.588693031268297`", "3.4362786722600696`", "5.208477454633536`", "6.2290213340923355`", "5.506214535005482`", "0.`", "3.5009374883760875`", "6.9516058687668165`", "8.104991300826981`", "5.92349452590155`", "5.235784781797975`", "5.187982178358117`", "9.029932270656117`", "7.356964821569844`", "8.524093739277305`", "9.93506390229729`", "10.056772258161926`", "12.510683276899622`", "14.352583297623214`", "14.365592024209464`", "16.81564044553452`", "16.754415833712905`", "18.914566616903972`", "18.89645584834504`", "4.767228637908537`", "6.808096374102671`", "7.21954457316533`", "5.089985370788277`", "7.134563775120452`", "5.613752677930281`", "5.659779384901769`", "5.579622451207455`", "7.10173512484944`", "5.57921112622885`", "10.073480647770658`", "9.816789266478876`", "9.748177976009917`", "12.779639261285896`", "17.314256590523883`", "17.162794887346127`", "20.801445321992123`", "20.766169943233`"}, {"4.300377981896372`", "5.146118332997663`", "2.9270250526496526`", "6.463110369422247`", "7.234675051334948`", "3.5009374883760875`", "0.`", "4.891419399867331`", "7.743227894668625`", "8.256595207265216`", "2.9057596715932728`", "2.913385747823225`", "6.294031097683011`", "6.246638719062772`", "10.821833354059754`", "12.379200425885925`", "12.13737522923873`", "14.879021503739496`", "16.71947901983614`", "16.77655537420153`", "19.068799746461508`", "19.090875396530784`", "21.149929119798045`", "21.169525532434054`", "6.291038964796367`", "4.174126979674576`", "8.93401764417526`", "7.598612830971856`", "4.1476453823886965`", "4.180362525657853`", "4.16937533157606`", "4.181947601892686`", "4.158136799524254`", "4.182211224354866`", "7.660722844121316`", "11.879204784673796`", "12.591001983373403`", "15.25863176163291`", "19.479691094066695`", "19.477035663899876`", "22.975466990217594`", "23.002710136589084`"}, {"4.55665615609575`", "6.046952667976354`", "2.859915566196463`", "6.945568585420163`", "8.164017171121262`", "6.9516058687668165`", "4.891419399867331`", "0.`", "8.079676498847261`", "10.376833000694882`", "5.373095304022522`", "7.195796942139322`", "2.5191743998983105`", "2.2779844591506855`", "12.713488989976971`", "14.994260092931794`", "13.244341905720662`", "17.186395700207825`", "19.40772203733387`", "20.0206039557999`", "21.509635592111806`", "22.511354905942866`", "23.855983854551297`", "24.326535920604055`", "5.923730517787105`", "4.017276122099319`", "8.969376196773574`", "10.586191853151918`", "5.472563175490079`", "5.008901305115152`", "7.461438779354447`", "8.013929890581222`", "7.367994636332313`", "8.879888242650749`", "3.334113023834149`", "14.897172554942232`", "15.443919549926502`", "18.76949377741424`", "21.48071505269818`", "23.21240805113014`", "25.50230685888312`", "26.283656799567492`"}, {"4.493136962741724`", "6.354635051926559`", "6.045795308275036`", "2.2711449799602916`", "4.906256722316769`", "8.104991300826981`", "7.743227894668625`", "8.079676498847261`", "0.`", "6.198736374717063`", "10.496779062774907`", "7.919591355851951`", "9.450488084672239`", "9.180484850762623`", "7.338917225132973`", "9.492783837428048`", "7.498880711180865`", "11.047955941427581`", "13.185280024571748`", "14.290875629613115`", "14.82059601755405`", "16.67574565569539`", "17.136714949629`", "17.984874670940222`", "7.7793935506589005`", "5.551235760581601`", "5.785765925675096`", "7.056689126274808`", "11.110569036880745`", "11.208442005453225`", "11.895613133578022`", "6.475690296275103`", "8.673027015204939`", "9.665116405768936`", "10.787403337364156`", "9.110741596141034`", "10.894232300076856`", "13.649382756979989`", "14.564638535252735`", "17.778586218972094`", "18.539714677058`", "19.92740631799782`"}, {"5.945347055639776`", "4.820847253854235`", "8.321624743896187`", "4.749531453716677`", "2.7398216287387855`", "5.92349452590155`", "8.256595207265216`", "10.376833000694882`", "6.198736374717063`", "0.`", "10.807445043231263`", "8.86201117365924`", "12.58829115144612`", "10.624082563033689`", "2.6266277368415256`", "4.6862721492332895`", "4.2829794706059126`", "6.952597734248728`", "9.160590111284451`", "9.937897727700499`", "11.384809417546034`", "12.542177669152053`", "13.728215744278652`", "14.23685293983002`", "6.378564215952267`", "9.187512143094487`", "4.032523742633274`", "1.929788010128111`", "12.380795326167439`", "11.184067205298252`", "11.443911966915161`", "7.66181463842279`", "10.686981547453453`", "9.565729632597765`", "13.683996267346188`", "5.18074322088302`", "5.261417561166534`", "8.952431766230328`", "11.596318723326434`", "13.535072165845714`", "15.457365942791045`", "16.258084489375232`"}, {"6.723170825519393`", "7.173772039667836`", "4.865897584664628`", "9.171400751108353`", "9.723487363215616`", "5.235784781797975`", "2.9057596715932728`", "5.373095304022522`", "10.496779062774907`", "10.807445043231263`", "0.`", "4.742645340974192`", "6.184353616183024`", "6.419727214167611`", "13.422862616652045`", "14.91408164464356`", "14.753561865958646`", "17.476051886576638`", "19.267418822943192`", "19.157941385108508`", "21.69363851732095`", "21.41749135472417`", "23.730805778859313`", "23.613401756176792`", "7.691684435330653`", "6.087250217315833`", "11.246997551765821`", "10.052583892479282`", "2.1046891973838546`", "2.1047269569774465`", "2.1059623211152227`", "6.612248618479839`", "5.24833996358183`", "5.227505699566987`", "7.169029362681711`", "14.475091117124796`", "14.877169238280825`", "17.506451287312302`", "22.174686113271417`", "21.643489475740115`", "25.60691768393095`", "25.405642192132056`"}, {"6.010255069422527`", "7.204601186686959`", "4.774035500590515`", "7.300649089947432`", "8.488993270426796`", "5.187982178358117`", "2.913385747823225`", "7.195796942139322`", "7.919591355851951`", "8.86201117365924`", "4.742645340974192`", "0.`", "8.008074996342597`", "8.91521240190209`", "11.193007509679816`", "12.270850632111541`", "12.724160549004768`", "14.732560033648397`", "16.2731471654302`", "16.085707444160814`", "18.582534642517228`", "18.19324889943413`", "20.45217063759697`", "20.284841293122913`", "8.760950377581304`", "4.824224184548011`", "10.410681540749305`", "7.8680935961661085`", "5.281165672923009`", "6.613902306040681`", "5.179903533672399`", "2.1067225714770625`", "2.105313346067062`", "2.105908542853591`", "9.648685905527836`", "11.293982828519841`", "12.657593076074765`", "14.56499400046821`", "19.15738689135394`", "18.43511588502283`", "22.279627928370548`", "21.99853634946827`"}, {"6.673978435471225`", "8.48589023482852`", "4.458342822083187`", "8.798625599027556`", "10.434794753225392`", "9.029932270656117`", "6.294031097683011`", "2.5191743998983105`", "9.450488084672239`", "12.58829115144612`", "6.184353616183024`", "8.008074996342597`", "0.`", "4.174410799510757`", "14.888704851536152`", "17.110157675663757`", "15.398220397693212`", "19.283427451146647`", "21.45138506340395`", "22.025009244386943`", "23.509596567633`", "24.457190948153514`", "25.812785378427947`", "26.26207789959411`", "8.44091510318885`", "4.607469678480459`", "11.259594958541411`", "12.716016043132452`", "5.362710769140267`", "6.0957882050251495`", "8.234639703522303`", "9.005851506941701`", "7.493886856330755`", "9.711788091268186`", "1.8353445720179167`", "16.830391839859033`", "17.664338667079054`", "20.77460815088616`", "23.471727186186722`", "25.113018316157888`", "27.433411065355056`", "28.184228745662224`"}, {"5.336424215896905`", "5.937144624754228`", "4.611527965693221`", "7.698991930656912`", "8.249053179483605`", "7.356964821569844`", "6.246638719062772`", "2.2779844591506855`", "9.180484850762623`", "10.624082563033689`", "6.419727214167611`", "8.91521240190209`", "4.174410799510757`", "0.`", "12.89343060902805`", "15.310170631097225`", "13.257896519624362`", "17.44343426590821`", "19.76401693774465`", "20.477890825130366`", "21.860782961931882`", "23.035221842875025`", "24.2826603758958`", "24.832700901911068`", "5.045821676587869`", "6.0976566203988485`", "8.66120214094635`", "11.015338536703117`", "6.902205440731361`", "5.31242474778299`", "8.356296360116554`", "9.70984765540854`", "9.381394025081121`", "10.40437141559604`", "3.968959943435448`", "15.515757215692918`", "15.58769970540708`", "19.243082280959406`", "21.75646169518652`", "23.79356419632686`", "25.917327398600403`", "26.83184166110577`"}, {"8.220422097229623`", "7.232761294914586`", "10.696758737665478`", "6.4516161911238195`", "4.662259425611429`", "8.524093739277305`", "10.821833354059754`", "12.713488989976971`", "7.338917225132973`", "2.6266277368415256`", "13.422862616652045`", "11.193007509679816`", "14.888704851536152`", "12.89343060902805`", "0.`", "2.87223342493554`", "2.281672389643566`", "4.555283393241532`", "6.975845038699821`", "8.25221568608675`", "8.996298625942918`", "10.872783692591685`", "11.455190238676193`", "12.257173970866742`", "8.542649383445188`", "11.354606419456966`", "5.036807530416956`", "3.9013123553192486`", "14.956705491711752`", "13.797616828799113`", "14.031844915190808`", "9.748750184233591`", "12.945720743633599`", "11.850484324481554`", "15.96529580544264`", "4.060242435086589`", "4.066573510503597`", "7.742236359909249`", "9.046697143487673`", "12.166424043693857`", "13.083117520144647`", "14.325042123950432`"}, {"10.500356347189218`", "9.470199944710048`", "12.746821537987024`", "8.842649555519682`", "7.243593783317873`", "9.93506390229729`", "12.379200425885925`", "14.994260092931794`", "9.492783837428048`", "4.6862721492332895`", "14.91408164464356`", "12.270850632111541`", "17.110157675663757`", "15.310170631097225`", "2.87223342493554`", "0.`", "4.512399826033154`", "2.658635900711725`", "4.510437600495759`", "5.408634394789753`", "6.899926887199643`", "8.038943706320595`", "9.121857628489595`", "9.590329009641284`", "10.908433640351985`", "13.320006955077284`", "7.8622368626694215`", "4.873140040618161`", "16.501139811550278`", "15.489592730550061`", "15.176601370296387`", "10.743484323235466`", "14.083786024644485`", "12.517159997459428`", "18.299469403393477`", "2.106775120346134`", "2.1061893856854197`", "4.913783359880089`", "7.51507250332153`", "9.29622817178887`", "10.938960807329025`", "11.632288583110906`"}, {"8.88664592992153`", "8.071451544061912`", "11.507957789348035`", "6.838937725808565`", "5.228137116437614`", "10.056772258161926`", "12.13737522923873`", "13.244341905720662`", "7.498880711180865`", "4.2829794706059126`", "14.753561865958646`", "12.724160549004768`", "15.398220397693212`", "13.257896519624362`", "2.281672389643566`", "4.512399826033154`", "0.`", "5.050717009422249`", "7.629111605455197`", "9.457416303465134`", "9.119601908073765`", "11.9915723361725`", "11.727528938700637`", "12.973487010311981`", "9.050437875985562`", "12.085415876160182`", "4.731783071785302`", "5.952805933822932`", "16.19289593888954`", "14.963873643874555`", "15.59521479545092`", "11.25914754576942`", "14.336418211499776`", "13.628638849926832`", "16.347187414424692`", "5.852638584562158`", "5.805935276088818`", "9.360802168462133`", "8.646174621920602`", "13.525124255197849`", "13.093159725805446`", "15.05335565580203`"}, {"12.650566947251512`", "11.717680352450563`", "15.004255650118981`", "10.698442841280833`", "9.21284736797423`", "12.510683276899622`", "14.879021503739496`", "17.186395700207825`", "11.047955941427581`", "6.952597734248728`", "17.476051886576638`", "14.732560033648397`", "19.283427451146647`", "17.44343426590821`", "4.555283393241532`", "2.658635900711725`", "5.050717009422249`", "0.`", "2.583991857808899`", "4.65068150460701`", "4.485345049725684`", "7.041573261843203`", "6.9389812214522415`", "7.946759137407998`", "13.016053104948371`", "15.454567977871902`", "9.400801902782906`", "7.461733550646458`", "19.018063279898975`", "18.015246067652356`", "17.80753926380371`", "13.085481868138801`", "16.458202434379434`", "15.052737034161819`", "20.443238142888404`", "3.8816084867132634`", "3.881096937748542`", "5.231930452329495`", "4.888123779143418`", "8.742257786420016`", "8.586410845552233`", "10.030527179766027`"}, {"14.873753049829972`", "13.96255719426426`", "17.091454328170062`", "12.967107008667998`", "11.592793611818527`", "14.352583297623214`", "16.71947901983614`", "19.40772203733387`", "13.185280024571748`", "9.160590111284451`", "19.267418822943192`", "16.2731471654302`", "21.45138506340395`", "19.76401693774465`", "6.975845038699821`", "4.510437600495759`", "7.629111605455197`", "2.583991857808899`", "0.`", "2.651090071183851`", "2.647347238268231`", "4.622970849129701`", "4.631759739375524`", "5.367425451188746`", "15.342518587507604`", "17.465736316605437`", "11.927751155755583`", "9.300043029443023`", "20.808560774643443`", "19.93820154161544`", "19.398837801271522`", "14.595930464597055`", "17.980670693521475`", "16.355750805734655`", "22.68783767642463`", "4.9829970031155`", "5.143164566072725`", "4.130845219221064`", "4.082900435761669`", "6.501027306807737`", "6.507455065131107`", "7.451591029981131`"}, {"15.589999129252563`", "14.602190465750322`", "17.579735670930987`", "13.967345162144738`", "12.593713059175606`", "14.365592024209464`", "16.77655537420153`", "20.0206039557999`", "14.290875629613115`", "9.937897727700499`", "19.157941385108508`", "16.085707444160814`", "22.025009244386943`", "20.477890825130366`", "8.25221568608675`", "5.408634394789753`", "9.457416303465134`", "4.65068150460701`", "2.651090071183851`", "0.`", "4.5067508898782185`", "2.6398431044172974`", "5.248859154717019`", "4.576140906107706`", "16.09205531414914`", "17.99137623634854`", "13.263087749494579`", "9.553245280738949`", "20.73117938466197`", "19.95639763851369`", "19.005943777489964`", "14.52351176027032`", "17.826193284893787`", "15.831553585691337`", "23.331916171436763`", "5.285641563964699`", "5.372420374869708`", "2.081289528090295`", "6.404117547506614`", "4.100535373551395`", "7.333131249926565`", "6.4700142763260775`"}, {"16.954151171958998`", "16.177102034002814`", "19.228042588679962`", "14.842103351524289`", "13.620561574233966`", "16.81564044553452`", "19.068799746461508`", "21.509635592111806`", "14.82059601755405`", "11.384809417546034`", "21.69363851732095`", "18.582534642517228`", "23.509596567633`", "21.860782961931882`", "8.996298625942918`", "6.899926887199643`", "9.119601908073765`", "4.485345049725684`", "2.647347238268231`", "4.5067508898782185`", "0.`", "5.2269996026093954`", "2.637507542391742`", "4.561622632220897`", "17.49564154056932`", "19.478708036606022`", "13.725780639890218`", "11.732001155441594`", "23.173544918411316`", "22.36141177799464`", "21.91191982447201`", "16.807787929080966`", "20.1986062257884`", "18.764803903420276`", "24.737644655109563`", "7.344936360116516`", "7.683730238864332`", "6.4288334692865625`", "2.0842389946362134`", "7.311267597318491`", "4.101550224687491`", "6.45833190961001`"}, {"18.10836838620189`", "17.175017994356857`", "20.005424815812596`", "16.47754655920264`", "15.205567774784752`", "16.754415833712905`", "19.090875396530784`", "22.511354905942866`", "16.67574565569539`", "12.542177669152053`", "21.41749135472417`", "18.19324889943413`", "24.457190948153514`", "23.035221842875025`", "10.872783692591685`", "8.038943706320595`", "11.9915723361725`", "7.041573261843203`", "4.622970849129701`", "2.6398431044172974`", "5.2269996026093954`", "0.`", "4.542833290232012`", "2.6356727625029057`", "18.69122415853024`", "20.337189087314034`", "15.893999486018277`", "12.060524302234374`", "22.95573414099834`", "22.30305098199374`", "21.136620698155784`", "16.628120023002985`", "19.86615492150345`", "17.79017672806631`", "25.81169715281475`", "7.7289609160367645`", "7.935040698559248`", "4.037722875860344`", "7.310975633569599`", "2.0843275329651534`", "6.439405276653649`", "4.106472416324571`"}, {"19.305336985416012`", "18.54401131077588`", "21.480201992030292`", "17.232323070616648`", "16.07444892993337`", "18.914566616903972`", "21.149929119798045`", "23.855983854551297`", "17.136714949629`", "13.728215744278652`", "23.730805778859313`", "20.45217063759697`", "25.812785378427947`", "24.2826603758958`", "11.455190238676193`", "9.121857628489595`", "11.727528938700637`", "6.9389812214522415`", "4.631759739375524`", "5.248859154717019`", "2.637507542391742`", "4.542833290232012`", "0.`", "2.63465427166247`", "19.922627180501532`", "21.67496671785496`", "16.286443668472568`", "13.865984564771555`", "25.200701495318068`", "24.495609865361246`", "23.80434209746505`", "18.673145462336723`", "22.037130127866778`", "20.465391295068244`", "27.09896152643461`", "9.275718062726932`", "9.667788099963568`", "7.328103002253774`", "4.07324031554525`", "6.434662005270578`", "2.08441297165542`", "4.104842082986606`"}, {"19.835912856008466`", "18.99993453859978`", "21.84456602629581`", "17.97514151596722`", "16.78449897044748`", "18.89645584834504`", "21.169525532434054`", "24.326535920604055`", "17.984874670940222`", "14.23685293983002`", "23.613401756176792`", "20.284841293122913`", "26.26207789959411`", "24.832700901911068`", "12.257173970866742`", "9.590329009641284`", "12.973487010311981`", "7.946759137407998`", "5.367425451188746`", "4.576140906107706`", "4.561622632220897`", "2.6356727625029057`", "2.63465427166247`", "0.`", "20.471178519513305`", "22.078405230632498`", "17.260062980858116`", "14.016999480111595`", "25.109480030030877`", "24.477882748661873`", "23.45762309257827`", "18.6018965237032`", "21.894116990082438`", "20.031636958000774`", "27.6083563394115`", "9.44245314247283`", "9.778884078263589`", "6.420983467852426`", "6.436104938107279`", "4.090498410446574`", "4.0968574498559915`", "2.0841680734201313`"}, {"3.9971185275380883`", "2.0469263279567294`", "5.661179908927641`", "5.5711051227756885`", "4.3059518731284125`", "4.767228637908537`", "6.291038964796367`", "5.923730517787105`", "7.7793935506589005`", "6.378564215952267`", "7.691684435330653`", "8.760950377581304`", "8.44091510318885`", "5.045821676587869`", "8.542649383445188`", "10.908433640351985`", "9.050437875985562`", "13.016053104948371`", "15.342518587507604`", "16.09205531414914`", "17.49564154056932`", "18.69122415853024`", "19.922627180501532`", "20.471178519513305`", "0.`", "7.4778884683833`", "4.662398247313763`", "6.976347959931919`", "9.224016768647726`", "6.93044309275099`", "8.963688738879885`", "8.87385126229782`", "10.197529690630331`", "9.86773515307747`", "8.854103760695414`", "11.51057353986514`", "10.938751491447519`", "14.906038580594497`", "17.469618408798663`", "19.526521269662364`", "21.594995130508465`", "22.492085445596263`"}, {"3.906051153066791`", "6.43837408157868`", "2.048948026863679`", "5.296090353562447`", "7.520010700325392`", "6.808096374102671`", "4.174126979674576`", "4.017276122099319`", "5.551235760581601`", "9.187512143094487`", "6.087250217315833`", "4.824224184548011`", "4.607469678480459`", "6.0976566203988485`", "11.354606419456966`", "13.320006955077284`", "12.085415876160182`", "15.454567977871902`", "17.465736316605437`", "17.99137623634854`", "19.478708036606022`", "20.337189087314034`", "21.67496671785496`", "22.078405230632498`", "7.4778884683833`", "0.`", "8.835256266134119`", "9.202077024593986`", "5.99592809633199`", "7.032157680526569`", "7.832930924290907`", "4.948278229518283`", "4.709510139444001`", "6.908480434207983`", "6.32540026810908`", "12.743305719562288`", "14.132604222087567`", "16.833734184958853`", "19.540360500253087`", "21.017833266734108`", "23.287580465987592`", "23.954520761232537`"}, {"5.154321699117669`", "4.181278864434398`", "7.832837985165291`", "4.069525481516277`", "2.049803703422558`", "7.21954457316533`", "8.93401764417526`", "8.969376196773574`", "5.785765925675096`", "4.032523742633274`", "11.246997551765821`", "10.410681540749305`", "11.259594958541411`", "8.66120214094635`", "5.036807530416956`", "7.8622368626694215`", "4.731783071785302`", "9.400801902782906`", "11.927751155755583`", "13.263087749494579`", "13.725780639890218`", "15.893999486018277`", "16.286443668472568`", "17.260062980858116`", "4.662398247313763`", "8.835256266134119`", "0.`", "5.741435387522766`", "12.625405602711323`", "11.069437195533176`", "12.45345721419445`", "9.52713999220334`", "11.903395788956384`", "11.656210356560033`", "11.968606105629277`", "8.761477738447704`", "8.528757929704614`", "12.582393679341402`", "13.373227029430176`", "17.11798497606007`", "17.758958215328025`", "19.335752903475488`"}, {"6.358869745075958`", "5.226898845152021`", "8.315897950967125`", "5.66685508030756`", "4.102995084646739`", "5.089985370788277`", "7.598612830971856`", "10.586191853151918`", "7.056689126274808`", "1.929788010128111`", "10.052583892479282`", "7.8680935961661085`", "12.716016043132452`", "11.015338536703117`", "3.9013123553192486`", "4.873140040618161`", "5.952805933822932`", "7.461733550646458`", "9.300043029443023`", "9.553245280738949`", "11.732001155441594`", "12.060524302234374`", "13.865984564771555`", "14.016999480111595`", "6.976347959931919`", "9.202077024593986`", "5.741435387522766`", "0.`", "11.697375011834849`", "10.641851044003943`", "10.378303922920072`", "6.7509473029832066`", "9.826305940224337`", "8.214029932762609`", "13.916783175974114`", "4.852777464164629`", "5.049947686710839`", "8.235652218961093`", "12.264666309724328`", "12.783275363810658`", "15.72549565943686`", "15.959125669742841`"}, {"7.736228880254241`", "8.737034749749801`", "5.349716072332944`", "10.118173426610172`", "11.141670683361264`", "7.134563775120452`", "4.1476453823886965`", "5.472563175490079`", "11.110569036880745`", "12.380795326167439`", "2.1046891973838546`", "5.281165672923009`", "5.362710769140267`", "6.902205440731361`", "14.956705491711752`", "16.501139811550278`", "16.19289593888954`", "19.018063279898975`", "20.808560774643443`", "20.73117938466197`", "23.173544918411316`", "22.95573414099834`", "25.200701495318068`", "25.109480030030877`", "9.224016768647726`", "5.99592809633199`", "12.625405602711323`", "11.697375011834849`", "0.`", "3.401034112540584`", "3.390127589439662`", "7.226178005024308`", "4.910666468928742`", "5.9698635783529435`", "6.414891871458035`", "15.926943782314913`", "16.62645804193297`", "19.123369051926833`", "23.608614287024967`", "23.181219551412223`", "27.040658744762894`", "26.88249743163474`"}, {"6.984810243433064`", "6.9853502607805495`", "5.437730168739412`", "9.625134311332275`", "9.82688406327021`", "5.613752677930281`", "4.180362525657853`", "5.008901305115152`", "11.208442005453225`", "11.184067205298252`", "2.1047269569774465`", "6.613902306040681`", "6.0957882050251495`", "5.31242474778299`", "13.797616828799113`", "15.489592730550061`", "14.963873643874555`", "18.015246067652356`", "19.93820154161544`", "19.95639763851369`", "22.36141177799464`", "22.30305098199374`", "24.495609865361246`", "24.477882748661873`", "6.93044309275099`", "7.032157680526569`", "11.069437195533176`", "10.641851044003943`", "3.401034112540584`", "0.`", "3.387769551705167`", "8.286925800767099`", "7.226891567164385`", "7.153125645207675`", "6.574115530574571`", "15.324938507622518`", "15.329666138286779`", "18.324768162456845`", "22.75015535893257`", "22.602182287070686`", "26.359345202487017`", "26.323857392382344`"}, {"8.269597924911494`", "8.33175108679577`", "6.703354553101289`", "10.543863849292698`", "10.807466780037513`", "5.659779384901769`", "4.16937533157606`", "7.461438779354447`", "11.895613133578022`", "11.443911966915161`", "2.1059623211152227`", "5.179903533672399`", "8.234639703522303`", "8.356296360116554`", "14.031844915190808`", "15.176601370296387`", "15.59521479545092`", "17.80753926380371`", "19.398837801271522`", "19.005943777489964`", "21.91191982447201`", "21.136620698155784`", "23.80434209746505`", "23.45762309257827`", "8.963688738879885`", "7.832930924290907`", "12.45345721419445`", "10.378303922920072`", "3.390127589439662`", "3.387769551705167`", "0.`", "7.140532326335915`", "5.848881604979726`", "4.775096873518732`", "9.174515876258772`", "14.648244581901398`", "14.925620789594705`", "17.222185002506578`", "22.57886633487239`", "21.164597646659878`", "25.74893320219149`", "25.165089171127025`"}, {"5.7017452530957256`", "7.044300173196953`", "5.2359613205310795`", "6.191341202953814`", "7.5695482741153155`", "5.579622451207455`", "4.181947601892686`", "8.013929890581222`", "6.475690296275103`", "7.66181463842279`", "6.612248618479839`", "2.1067225714770625`", "9.005851506941701`", "9.70984765540854`", "9.748750184233591`", "10.743484323235466`", "11.25914754576942`", "13.085481868138801`", "14.595930464597055`", "14.52351176027032`", "16.807787929080966`", "16.628120023002985`", "18.673145462336723`", "18.6018965237032`", "8.87385126229782`", "4.948278229518283`", "9.52713999220334`", "6.7509473029832066`", "7.226178005024308`", "8.286925800767099`", "7.140532326335915`", "0.`", "3.393613730417655`", "3.3997264080096454`", "10.708882810953352`", "9.623422613755364`", "11.385883970666738`", "13.148594204863281`", "17.342100681124137`", "16.991883208112647`", "20.448285696806835`", "20.327171688966057`"}, {"7.147447916115045`", "8.795102214780117`", "5.3063333690744`", "8.443381088634682`", "10.081088111305993`", "7.10173512484944`", "4.158136799524254`", "7.367994636332313`", "8.673027015204939`", "10.686981547453453`", "5.24833996358183`", "2.105313346067062`", "7.493886856330755`", "9.381394025081121`", "12.945720743633599`", "14.083786024644485`", "14.336418211499776`", "16.458202434379434`", "17.980670693521475`", "17.826193284893787`", "20.1986062257884`", "19.86615492150345`", "22.037130127866778`", "21.894116990082438`", "10.197529690630331`", "4.709510139444001`", "11.903395788956384`", "9.826305940224337`", "4.910666468928742`", "7.226891567164385`", "5.848881604979726`", "3.393613730417655`", "0.`", "3.387008031442542`", "9.221789373395872`", "13.00326078392864`", "14.609804854772207`", "16.368807828136763`", "20.71858343351597`", "20.096129023649308`", "23.810762731739416`", "23.56832440382946`"}, {"7.678036075309618`", "8.322448108739742`", "6.6410187201344755`", "8.92758983473242`", "9.662791866674912`", "5.57921112622885`", "4.182211224354866`", "8.879888242650749`", "9.665116405768936`", "9.565729632597765`", "5.227505699566987`", "2.105908542853591`", "9.711788091268186`", "10.40437141559604`", "11.850484324481554`", "12.517159997459428`", "13.628638849926832`", "15.052737034161819`", "16.355750805734655`", "15.831553585691337`", "18.764803903420276`", "17.79017672806631`", "20.465391295068244`", "20.031636958000774`", "9.86773515307747`", "6.908480434207983`", "11.656210356560033`", "8.214029932762609`", "5.9698635783529435`", "7.153125645207675`", "4.775096873518732`", "3.3997264080096454`", "3.387008031442542`", "0.`", "11.251049445907757`", "11.444380739540467`", "12.641894607130695`", "14.149490134111495`", "19.552939226132366`", "17.80077702225929`", "22.371120327366317`", "21.64959573829932`"}, {"7.81420017720463`", "9.29977619619994`", "5.905208750053568`", "9.994674725521806`", "11.379989936174427`", "10.073480647770658`", "7.660722844121316`", "3.334113023834149`", "10.787403337364156`", "13.683996267346188`", "7.169029362681711`", "9.648685905527836`", "1.8353445720179167`", "3.968959943435448`", "15.96529580544264`", "18.299469403393477`", "16.347187414424692`", "20.443238142888404`", "22.68783767642463`", "23.331916171436763`", "24.737644655109563`", "25.81169715281475`", "27.09896152643461`", "27.6083563394115`", "8.854103760695414`", "6.32540026810908`", "11.968606105629277`", "13.916783175974114`", "6.414891871458035`", "6.574115530574571`", "9.174515876258772`", "10.708882810953352`", "9.221789373395872`", "11.251049445907757`", "0.`", "18.176663912406358`", "18.77379011047481`", "22.084369611663387`", "24.6327919419389`", "26.499928430788252`", "28.706742281558622`", "29.560800765135465`"}, {"10.438872718566405`", "9.814294870842092`", "12.40650504790363`", "8.768641634924917`", "7.744143859908947`", "9.816789266478876`", "11.879204784673796`", "14.897172554942232`", "9.110741596141034`", "5.18074322088302`", "14.475091117124796`", "11.293982828519841`", "16.830391839859033`", "15.515757215692918`", "4.060242435086589`", "2.106775120346134`", "5.852638584562158`", "3.8816084867132634`", "4.9829970031155`", "5.285641563964699`", "7.344936360116516`", "7.7289609160367645`", "9.275718062726932`", "9.44245314247283`", "11.51057353986514`", "12.743305719562288`", "8.761477738447704`", "4.852777464164629`", "15.926943782314913`", "15.324938507622518`", "14.648244581901398`", "9.623422613755364`", "13.00326078392864`", "11.444380739540467`", "18.176663912406358`", "0.`", "3.495092903408882`", "4.5739498218336365`", "8.197601011894465`", "8.776455547463126`", "11.141915858593256`", "11.387061269490754`"}, {"11.124675211760275`", "9.651595941157277`", "13.306919251817881`", "9.891497166501368`", "7.883619503897076`", "9.748177976009917`", "12.591001983373403`", "15.443919549926502`", "10.894232300076856`", "5.261417561166534`", "14.877169238280825`", "12.657593076074765`", "17.664338667079054`", "15.58769970540708`", "4.066573510503597`", "2.1061893856854197`", "5.805935276088818`", "3.881096937748542`", "5.143164566072725`", "5.372420374869708`", "7.683730238864332`", "7.935040698559248`", "9.667788099963568`", "9.778884078263589`", "10.938751491447519`", "14.132604222087567`", "8.528757929704614`", "5.049947686710839`", "16.62645804193297`", "15.329666138286779`", "14.925620789594705`", "11.385883970666738`", "14.609804854772207`", "12.641894607130695`", "18.77379011047481`", "3.495092903408882`", "0.`", "4.403993966461585`", "8.557344160829004`", "8.91944719993182`", "11.585919658121052`", "11.74704046228249`"}, {"14.4674503963527`", "13.378910654538831`", "16.31870570246922`", "13.125070645084158`", "11.68441133031778`", "12.779639261285896`", "15.25863176163291`", "18.76949377741424`", "13.649382756979989`", "8.952431766230328`", "17.506451287312302`", "14.56499400046821`", "20.77460815088616`", "19.243082280959406`", "7.742236359909249`", "4.913783359880089`", "9.360802168462133`", "5.231930452329495`", "4.130845219221064`", "2.081289528090295`", "6.4288334692865625`", "4.037722875860344`", "7.328103002253774`", "6.420983467852426`", "14.906038580594497`", "16.833734184958853`", "12.582393679341402`", "8.235652218961093`", "19.123369051926833`", "18.324768162456845`", "17.222185002506578`", "13.148594204863281`", "16.368807828136763`", "14.149490134111495`", "22.084369611663387`", "4.5739498218336365`", "4.403993966461585`", "0.`", "8.17327825659716`", "4.629578993863802`", "9.412457724142323`", "8.131400436103492`"}, {"16.953095074216897`", "16.267379202893963`", "19.331574188635173`", "14.689775710836988`", "13.539489091808253`", "17.314256590523883`", "19.479691094066695`", "21.48071505269818`", "14.564638535252735`", "11.596318723326434`", "22.174686113271417`", "19.15738689135394`", "23.471727186186722`", "21.75646169518652`", "9.046697143487673`", "7.51507250332153`", "8.646174621920602`", "4.888123779143418`", "4.082900435761669`", "6.404117547506614`", "2.0842389946362134`", "7.310975633569599`", "4.07324031554525`", "6.436104938107279`", "17.469618408798663`", "19.540360500253087`", "13.373227029430176`", "12.264666309724328`", "23.608614287024967`", "22.75015535893257`", "22.57886633487239`", "17.342100681124137`", "20.71858343351597`", "19.552939226132366`", "24.6327919419389`", "8.197601011894465`", "8.557344160829004`", "8.17327825659716`", "0.`", "9.395247516450574`", "4.68729581525192`", "8.160189225271285`"}, {"18.938931514524743`", "17.97064723964283`", "20.662007314672152`", "17.51108543964116`", "16.2542885756919`", "17.162794887346127`", "19.477035663899876`", "23.21240805113014`", "17.778586218972094`", "13.535072165845714`", "21.643489475740115`", "18.43511588502283`", "25.113018316157888`", "23.79356419632686`", "12.166424043693857`", "9.29622817178887`", "13.525124255197849`", "8.742257786420016`", "6.501027306807737`", "4.100535373551395`", "7.311267597318491`", "2.0843275329651534`", "6.434662005270578`", "4.090498410446574`", "19.526521269662364`", "21.017833266734108`", "17.11798497606007`", "12.783275363810658`", "23.181219551412223`", "22.602182287070686`", "21.164597646659878`", "16.991883208112647`", "20.096129023649308`", "17.80077702225929`", "26.499928430788252`", "8.776455547463126`", "8.91944719993182`", "4.629578993863802`", "9.395247516450574`", "0.`", "8.16469519694415`", "4.725024158753718`"}, {"20.946785297807864`", "20.25977615716488`", "23.161122926404655`", "18.76162800782517`", "17.683817037391854`", "20.801445321992123`", "22.975466990217594`", "25.50230685888312`", "18.539714677058`", "15.457365942791045`", "25.60691768393095`", "22.279627928370548`", "27.433411065355056`", "25.917327398600403`", "13.083117520144647`", "10.938960807329025`", "13.093159725805446`", "8.586410845552233`", "6.507455065131107`", "7.333131249926565`", "4.101550224687491`", "6.439405276653649`", "2.08441297165542`", "4.0968574498559915`", "21.594995130508465`", "23.287580465987592`", "17.758958215328025`", "15.72549565943686`", "27.040658744762894`", "26.359345202487017`", "25.74893320219149`", "20.448285696806835`", "23.810762731739416`", "22.371120327366317`", "28.706742281558622`", "11.141915858593256`", "11.585919658121052`", "9.412457724142323`", "4.68729581525192`", "8.16469519694415`", "0.`", "4.734108276344412`"}, {"21.814370725735625`", "20.999552080690965`", "23.760665474814854`", "19.970357963699943`", "18.82683084478537`", "20.766169943233`", "23.002710136589084`", "26.283656799567492`", "19.92740631799782`", "16.258084489375232`", "25.405642192132056`", "21.99853634946827`", "28.184228745662224`", "26.83184166110577`", "14.325042123950432`", "11.632288583110906`", "15.05335565580203`", "10.030527179766027`", "7.451591029981131`", "6.4700142763260775`", "6.45833190961001`", "4.106472416324571`", "4.104842082986606`", "2.0841680734201313`", "22.492085445596263`", "23.954520761232537`", "19.335752903475488`", "15.959125669742841`", "26.88249743163474`", "26.323857392382344`", "25.165089171127025`", "20.327171688966057`", "23.56832440382946`", "21.64959573829932`", "29.560800765135465`", "11.387061269490754`", "11.74704046228249`", "8.131400436103492`", "8.160189225271285`", "4.725024158753718`", "4.734108276344412`", "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.57655729631291*^9, 3.576557531561323*^9, 3.580218412506176*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"cn1", "=", 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]", "\"\\""}], ",", "6.0"}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5763930603303766`*^9, 3.576393117754078*^9}, { 3.5763931548197427`*^9, 3.5763931792961855`*^9}, {3.576393334953259*^9, 3.576393350256886*^9}, {3.5764097379708014`*^9, 3.5764097926644974`*^9}, 3.576421088489007*^9, {3.5764211267246737`*^9, 3.5764211567079268`*^9}, { 3.5764998636278076`*^9, 3.576499879181035*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "7.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "8.`", ",", "7.`", ",", "6.`", ",", "6.`", ",", "8.`", ",", "8.`", ",", "6.`", ",", "6.`", ",", "8.`", ",", "8.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output", CellChangeTimes->{3.5765572963285103`*^9, 3.576557531592523*^9, 3.580218412521776*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Vn", "=", "0.0"}], ";"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", RowBox[{"i", "+", "1"}]}], ",", RowBox[{"j", "\[LessEqual]", "n"}], ",", RowBox[{"j", "++"}], ",", RowBox[{"Vn", "=", RowBox[{"Vn", "+", RowBox[{ RowBox[{"cn1", "[", RowBox[{"[", "i", "]"}], "]"}], "*", RowBox[{ RowBox[{"cn1", "[", RowBox[{"[", "j", "]"}], "]"}], "/", RowBox[{"dc1", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}]}]}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "Vn"}], "Input", CellChangeTimes->{{3.5763930603303766`*^9, 3.576393117754078*^9}, { 3.5763931548197427`*^9, 3.5763931792961855`*^9}, {3.576393334953259*^9, 3.576393350256886*^9}, {3.5764097379708014`*^9, 3.5764097926644974`*^9}, 3.576421088489007*^9, {3.5764211267246737`*^9, 3.576421150280715*^9}}], Cell[BoxData["1939.9351020914073`"], "Output", CellChangeTimes->{3.57655729634411*^9, 3.5765575316081233`*^9, 3.580218412537376*^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[{"\<\"N\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"S\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"O\"\>", ",", "\<\"N\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>", ",", "\<\"Z\"\>"}], "}"}]], "Output", CellChangeTimes->{3.57655729634411*^9, 3.5765575316081233`*^9, 3.5802184125529757`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"um", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"un", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"num1", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.568807971988578*^9, 3.5688080897687845`*^9}, { 3.5688081769573374`*^9, 3.5688081865669546`*^9}, {3.568808274317109*^9, 3.5688082853151283`*^9}, {3.5688085365847692`*^9, 3.568808578330443*^9}, { 3.568808822704872*^9, 3.5688088761037655`*^9}, {3.56880890727262*^9, 3.568808937365073*^9}, {3.568809097608555*^9, 3.5688091594002633`*^9}, 3.5688092418308077`*^9, {3.5688092753552666`*^9, 3.568809302577315*^9}, { 3.5688096257786827`*^9, 3.568809703201618*^9}, {3.5688097456336927`*^9, 3.568809788268568*^9}, 3.568809850575077*^9, {3.568809946562046*^9, 3.5688099535664577`*^9}, {3.5688100003197403`*^9, 3.568810008556555*^9}, { 3.568810075371472*^9, 3.56881007981748*^9}, {3.568813431920168*^9, 3.568813533086345*^9}, {3.5688135960324554`*^9, 3.5688136045344706`*^9}, { 3.5688136407889347`*^9, 3.568813707494652*^9}, {3.568813812529636*^9, 3.5688138275524626`*^9}, {3.5688140611940727`*^9, 3.568814062738476*^9}, { 3.568814121113778*^9, 3.5688141965555105`*^9}, {3.568814326675339*^9, 3.568814331074547*^9}, 3.568814589473401*^9, {3.5688146762563534`*^9, 3.5688146885023746`*^9}, 3.5688147203576307`*^9, 3.56882164316619*^9, 3.57111380070079*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"us", "=", RowBox[{"Sort", "[", "um", "]"}]}]], "Input", CellChangeTimes->{{3.568807971988578*^9, 3.5688080897687845`*^9}, { 3.5688081769573374`*^9, 3.5688081865669546`*^9}, {3.568808274317109*^9, 3.5688082853151283`*^9}, {3.5688085365847692`*^9, 3.568808578330443*^9}, { 3.568808822704872*^9, 3.5688088761037655`*^9}, {3.56880890727262*^9, 3.568808937365073*^9}, {3.568809097608555*^9, 3.5688091594002633`*^9}, 3.5688092418308077`*^9, {3.5688092753552666`*^9, 3.568809302577315*^9}, { 3.5688096257786827`*^9, 3.568809703201618*^9}, {3.5688097456336927`*^9, 3.568809788268568*^9}, 3.568809850575077*^9, {3.568809946562046*^9, 3.5688099535664577`*^9}, {3.5688100003197403`*^9, 3.568810008556555*^9}, { 3.568810075371472*^9, 3.56881007981748*^9}, {3.568813431920168*^9, 3.568813533086345*^9}, {3.5688135960324554`*^9, 3.5688136045344706`*^9}, { 3.5688136407889347`*^9, 3.568813707494652*^9}, {3.568813812529636*^9, 3.5688138275524626`*^9}, {3.5688140611940727`*^9, 3.568814062738476*^9}, { 3.568814121113778*^9, 3.5688141965555105`*^9}, {3.568814326675339*^9, 3.568814331074547*^9}, 3.568814589473401*^9, {3.5688146762563534`*^9, 3.5688146945707855`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "16"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "21"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "22"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "23"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"N\"\>", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "9"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "14"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"S\"\>", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "25"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "26"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "27"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "28"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "29"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "30"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "31"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "32"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "33"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "34"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "35"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "36"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "37"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "38"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "39"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "40"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "41"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Z\"\>", ",", "42"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5765572963597097`*^9, 3.5765575316237235`*^9, 3.5802184125529757`*^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[{ "2", ",", "3", ",", "4", ",", "5", ",", "7", ",", "8", ",", "11", ",", "12", ",", "15", ",", "16", ",", "19", ",", "20", ",", "21", ",", "22", ",", "23", ",", "24", ",", "1", ",", "10", ",", "9", ",", "13", ",", "14", ",", "17", ",", "18", ",", "6", ",", "25", ",", "26", ",", "27", ",", "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", ",", "42"}], "}"}]], "Output", CellChangeTimes->{3.5765572963597097`*^9, 3.576557531639323*^9, 3.580218412568576*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "=", "\"\\""}]}], "]"}]}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.568277663590458*^9, 3.568277712652544*^9}, 3.5682785838808746`*^9, {3.56880682872497*^9, 3.568806862015428*^9}, 3.5688069650848093`*^9, 3.568807273668951*^9, 3.5688073087846127`*^9, { 3.568807384553946*^9, 3.5688073893119545`*^9}, {3.56881489654434*^9, 3.5688149048591547`*^9}, {3.568821714349115*^9, 3.568821718951123*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"u1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.255", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.12", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.24", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.178", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.5"}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"u2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"(*", "0.25618", "*)"}], "0.2572", ",", 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.1786", ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "\[Equal]", "\"\\""}], ",", "0.5244"}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.5679480369450207`*^9, 3.567948069112277*^9}, { 3.5679486805553513`*^9, 3.5679487948723516`*^9}, 3.567950206581231*^9, { 3.5681216077716007`*^9, 3.5681216839309344`*^9}, {3.568266380090639*^9, 3.5682664108850937`*^9}, {3.568266481350417*^9, 3.56826649971165*^9}, 3.5682795170433135`*^9, {3.5682795636873956`*^9, 3.5682797843809834`*^9}, { 3.568279837187076*^9, 3.5682798459854913`*^9}, {3.568279877201146*^9, 3.568279880711152*^9}, {3.5682799570264864`*^9, 3.5682799599124913`*^9}, { 3.5683770044498715`*^9, 3.5683771523693314`*^9}, 3.5688133425788107`*^9, { 3.568814931192001*^9, 3.5688150075073347`*^9}, {3.5688765350957685`*^9, 3.5688765981198792`*^9}, {3.568876634452343*^9, 3.5688766352167444`*^9}, { 3.568894358551657*^9, 3.5688944054453397`*^9}, {3.568894522929146*^9, 3.5688945259087515`*^9}, {3.5688946101644993`*^9, 3.5688946171221113`*^9}, {3.568894651067771*^9, 3.568894651956972*^9}, 3.5688946827982264`*^9, {3.568894734527918*^9, 3.568894735495119*^9}, { 3.5688947726699843`*^9, 3.568894773496786*^9}, {3.5688948078948464`*^9, 3.568895097914956*^9}, {3.5689558039020233`*^9, 3.568955804619624*^9}, { 3.5689559169086213`*^9, 3.5689559179070234`*^9}, {3.5689559496998787`*^9, 3.568955950589081*^9}, {3.568956090817727*^9, 3.568956118273775*^9}, 3.5689561556982408`*^9, {3.5690814230317364`*^9, 3.5690814238897376`*^9}, { 3.569232478412421*^9, 3.5692324795356236`*^9}, {3.5692325096124763`*^9, 3.5692325115780797`*^9}, {3.5692325933846235`*^9, 3.569232594289425*^9}, { 3.569235467676072*^9, 3.5692354683780737`*^9}, {3.5692358857568064`*^9, 3.5692358867552085`*^9}, {3.569236173312112*^9, 3.569236174060913*^9}, { 3.569344745239445*^9, 3.569344781213108*^9}, {3.5693896312339673`*^9, 3.5693896351495743`*^9}, {3.5693896840088596`*^9, 3.5693896981112843`*^9}, {3.5693897680462074`*^9, 3.5693897743798184`*^9}, 3.570595843597315*^9, 3.5705958765133724`*^9, {3.5706006955110383`*^9, 3.57060069660304*^9}, {3.570600739659116*^9, 3.5706007402207165`*^9}, { 3.5706007784563837`*^9, 3.5706008313872766`*^9}, {3.5706008641161346`*^9, 3.5706008892321787`*^9}, 3.5706010214580107`*^9, {3.5706011135917726`*^9, 3.570601115058175*^9}, {3.5706011509850388`*^9, 3.5706011750714808`*^9}, { 3.5706012352719865`*^9, 3.570601260746831*^9}, 3.570856110868636*^9, 3.570856144034294*^9, 3.5708561753903494`*^9, {3.5708562115824127`*^9, 3.570856236261656*^9}, 3.5708568877188005`*^9, 3.570856960992129*^9, { 3.5708570022854013`*^9, 3.570857003424204*^9}, 3.5708574863854513`*^9, 3.570857676003785*^9, {3.570857720697863*^9, 3.570857774736358*^9}, { 3.570857815015629*^9, 3.570857815265229*^9}, {3.5708578488052883`*^9, 3.5708579513754683`*^9}, {3.5708579844319267`*^9, 3.570858009937971*^9}, { 3.5708583084132957`*^9, 3.570858421435494*^9}, {3.5727961392438684`*^9, 3.57279614016427*^9}, {3.572796215855603*^9, 3.5727962193812094`*^9}, { 3.5731452670909014`*^9, 3.573145275920517*^9}, {3.573366168242963*^9, 3.5733661753721757`*^9}, 3.573367679154417*^9, {3.5746744522844534`*^9, 3.574674453220455*^9}, 3.5746820022776895`*^9, {3.574682057033786*^9, 3.574682057704587*^9}, {3.574682089045042*^9, 3.574682170757985*^9}, 3.57468220769885*^9, {3.5746826561216383`*^9, 3.5746827960226836`*^9}, { 3.5747437628680496`*^9, 3.5747437640692515`*^9}, 3.5747437976249104`*^9, { 3.574743832756172*^9, 3.5747439364027543`*^9}, {3.57474397413922*^9, 3.5747439758396235`*^9}, {3.5750084847337775`*^9, 3.575008487276582*^9}, { 3.575008535059466*^9, 3.575008535761467*^9}, {3.5750085659943204`*^9, 3.5750085672267227`*^9}, {3.5750086497820673`*^9, 3.5750086512484703`*^9}, {3.575345710884446*^9, 3.5753457175144577`*^9}, { 3.5757079421584663`*^9, 3.5757079428916674`*^9}, 3.575774946192878*^9, 3.575774992259759*^9, {3.5765001972499933`*^9, 3.5765002150340247`*^9}, { 3.576551849173344*^9, 3.5765518495477448`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.255`", ",", "0.24`", ",", "0.24`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.178`", ",", "0.5`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`", ",", "0.12`"}], "}"}]], "Output", CellChangeTimes->{3.57655729637531*^9, 3.5765575316549234`*^9, 3.580218412584176*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.22522`", ",", "0.22522`", ",", "0.1786`", ",", "0.1786`", ",", "0.1786`", ",", "0.1786`", ",", "0.1786`", ",", "0.5244`", ",", "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`", ",", "0.6`", ",", "0.6`"}], "}"}]], "Output", CellChangeTimes->{3.57655729637531*^9, 3.5765575316549234`*^9, 3.580218412584176*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"u", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"us", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5679472243083935`*^9, 3.567947394894693*^9}, { 3.567947453425996*^9, 3.567947471241227*^9}, {3.5679475415037503`*^9, 3.5679475448733563`*^9}, {3.5679488138107853`*^9, 3.567948820877598*^9}, { 3.568820296244224*^9, 3.5688203477867146`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"C\"\>", ",", "\<\"N\"\>", ",", "\<\"N\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"O\"\>", ",", "\<\"S\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>", ",", "\<\"H\"\>"}], "}"}]], "Output", CellChangeTimes->{3.57655729639091*^9, 3.5765575316705236`*^9, 3.5802184125997763`*^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]", "\"\\""}], ",", "6.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}, 3.5733593979404716`*^9, {3.5765005981082973`*^9, 3.5765006090907173`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "7.`", ",", "7.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "6.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output", CellChangeTimes->{3.57655729639091*^9, 3.576557531686124*^9, 3.580218412615376*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"bc", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "<", RowBox[{"n", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "\"\\""}], ",", " ", RowBox[{"bc", "=", RowBox[{"bc", "+", "1"}]}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "bc", "\[IndentingNewLine]", RowBox[{"bh", "=", RowBox[{"n", "-", "bc"}]}]}], "Input", CellChangeTimes->{{3.5688281182607965`*^9, 3.5688281434392405`*^9}, { 3.5691376772313223`*^9, 3.569137733516221*^9}, {3.569234042049968*^9, 3.569234051519184*^9}, 3.5692372799312553`*^9}], Cell[BoxData["24"], "Output", CellChangeTimes->{3.5765572964065104`*^9, 3.5765575317017236`*^9, 3.580218412615376*^9}], Cell[BoxData["18"], "Output", CellChangeTimes->{3.5765572964065104`*^9, 3.5765575317017236`*^9, 3.580218412615376*^9}] }, Open ]], Cell[BoxData[""], "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}, {3.5749356251839495`*^9, 3.5749356357451677`*^9}, 3.5753438951420565`*^9, 3.5753463317967367`*^9, 3.575346463694968*^9, 3.575347966086807*^9, 3.5753753647377768`*^9, 3.5763887160747457`*^9, 3.576420463583109*^9, {3.576420522910013*^9, 3.576420522910013*^9}, 3.576420642936624*^9, 3.5764741813694344`*^9}], Cell[BoxData[{ RowBox[{ RowBox[{"t", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t1", "[", RowBox[{"[", RowBox[{"num", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 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[{"0.529177", "*", RowBox[{"Extract", "[", RowBox[{"t", ",", RowBox[{"{", "i", "}"}]}], "]"}]}]}], "}"}], ">>>", " ", "\"\\""}]}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.567869377256353*^9, 3.567869394073182*^9}, { 3.5678694248832364`*^9, 3.5678694526200852`*^9}, {3.5678694891241493`*^9, 3.5678694955045605`*^9}, {3.567869596046737*^9, 3.567869602645549*^9}, 3.56786971175214*^9, {3.5678697908910794`*^9, 3.567869798800293*^9}, { 3.5679434548425727`*^9, 3.5679434621121855`*^9}, 3.568011875875622*^9, 3.56811435956207*^9, {3.5682782821071444`*^9, 3.5682782839479475`*^9}, { 3.5688205455482616`*^9, 3.5688206262784038`*^9}, 3.5688208026055136`*^9, 3.5688732159559383`*^9, 3.568910867631465*^9, {3.5689830694736805`*^9, 3.568983072687286*^9}, {3.5725833074418383`*^9, 3.5725833223398647`*^9}, { 3.572583642982828*^9, 3.572583671421678*^9}, {3.572584036290719*^9, 3.5725840766323895`*^9}, {3.572584986320788*^9, 3.572585000719613*^9}, { 3.572585104865396*^9, 3.5725851158790154`*^9}, 3.5726667135591345`*^9, { 3.5727958552609696`*^9, 3.5727958810478153`*^9}, {3.5727959717619743`*^9, 3.5727959736963778`*^9}, {3.572796004615632*^9, 3.572796064270137*^9}, 3.5733691180073442`*^9, {3.5747381333641615`*^9, 3.5747381348149643`*^9}, { 3.5748523465408697`*^9, 3.574852347788872*^9}, {3.5749356592544093`*^9, 3.5749356651044197`*^9}, 3.575562664774312*^9, {3.576409556464483*^9, 3.5764095653564987`*^9}}], Cell["(* Distance Matrix Bohr *)", "Text", CellChangeTimes->{{3.5678630319943895`*^9, 3.5678630956269007`*^9}, { 3.5678632280087337`*^9, 3.567863228336334*^9}, {3.5678632621727934`*^9, 3.5678633509213495`*^9}, {3.5678644293824434`*^9, 3.567864451908883*^9}, { 3.567864923404111*^9, 3.56786494544695*^9}, {3.5678650143210707`*^9, 3.5678650845367947`*^9}, {3.567869231084096*^9, 3.5678692412397137`*^9}, 3.5678693168686466`*^9, {3.5678704450470285`*^9, 3.5678704621290584`*^9}, 3.5682783281584253`*^9, 3.5688732159715385`*^9, 3.568910867647065*^9, 3.5689997098549547`*^9, 3.5689998170427427`*^9, 3.5689998869620657`*^9, 3.5691460426137285`*^9, 3.569237204536323*^9, 3.5692374658523817`*^9, 3.56923802264856*^9, 3.5693403424181123`*^9, 3.5693404502143016`*^9, 3.569340738019207*^9, 3.569340852851009*^9, 3.5693411655067577`*^9, 3.5693414978029413`*^9, 3.5693426144373026`*^9, 3.5693435671777763`*^9, 3.569343662743544*^9, 3.569343763644521*^9, 3.569344071177861*^9, 3.569344266271804*^9, 3.570297558707776*^9, {3.5703416079688015`*^9, 3.570341617375618*^9}, {3.5705956885798426`*^9, 3.5705957106070814`*^9}, { 3.5705965150536942`*^9, 3.5705965239457097`*^9}, {3.5720162655168724`*^9, 3.5720163727202606`*^9}, {3.5720166425383344`*^9, 3.572016643427536*^9}, { 3.5723503054303513`*^9, 3.572350361964851*^9}, 3.573368567997178*^9, { 3.5746565325286493`*^9, 3.574656552839885*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"dc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"t", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{"MatrixForm", "[", RowBox[{"Prepend", "[", RowBox[{"dc", ",", "num1"}], "]"}], "]"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.5678630319943895`*^9, 3.5678630956269007`*^9}, { 3.5678632280087337`*^9, 3.567863228336334*^9}, {3.5678632621727934`*^9, 3.5678633509213495`*^9}, {3.5678644293824434`*^9, 3.567864451908883*^9}, { 3.567864923404111*^9, 3.56786494544695*^9}, {3.5678650143210707`*^9, 3.5678650845367947`*^9}, {3.567869231084096*^9, 3.5678692412397137`*^9}, 3.5678693168686466`*^9, {3.5678704450470285`*^9, 3.5678704621290584`*^9}, 3.5682783281584253`*^9, 3.5688732159715385`*^9, 3.568910867647065*^9, 3.5689997098549547`*^9, 3.5689998170427427`*^9, 3.5689998869620657`*^9, 3.5691460426137285`*^9, 3.569237204536323*^9, 3.5692374658523817`*^9, 3.56923802264856*^9, 3.5693403424181123`*^9, 3.5693404502143016`*^9, 3.569340738019207*^9, 3.569340852851009*^9, 3.5693411655067577`*^9, 3.5693414978029413`*^9, 3.5693426144373026`*^9, 3.5693435671777763`*^9, 3.569343662743544*^9, 3.569343763644521*^9, 3.569344071177861*^9, 3.569344266271804*^9, 3.570297558707776*^9, {3.5703416079688015`*^9, 3.570341617375618*^9}, {3.5705956885798426`*^9, 3.5705957106070814`*^9}, { 3.5705965150536942`*^9, 3.5705965239457097`*^9}, {3.5720162655168724`*^9, 3.5720163727202606`*^9}, {3.5720166425383344`*^9, 3.572016643427536*^9}, { 3.5723503054303513`*^9, 3.572350361964851*^9}, 3.573368567997178*^9, 3.5746565325286493`*^9, {3.5763922487857513`*^9, 3.5763922538713603`*^9}, { 3.576392379716781*^9, 3.5763923872515945`*^9}, {3.5763924903833756`*^9, 3.5763924920213785`*^9}, 3.5763926851029177`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"connected", " ", RowBox[{"pairs", ":", " ", RowBox[{ RowBox[{"distance", " ", "criteria"}], " ", "<", " ", RowBox[{"3.0", " ", "bohr"}]}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Dij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "<", "3.0"}], "||", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "<>", RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}]}], "\[Equal]", "\"\\""}], "&&", " ", RowBox[{ RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "<", "3.6"}]}], ")"}], "||", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "<>", RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}]}], "\[Equal]", "\"\\""}], "&&", " ", RowBox[{ RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "<", "3.6"}]}], ")"}]}], ")"}], ",", RowBox[{"dc", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Prepend", "[", RowBox[{"Dij", ",", "num1"}], "]"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.567863535157673*^9, 3.5678635412104836`*^9}, { 3.5678638182825704`*^9, 3.567863827283786*^9}, {3.5679503910983553`*^9, 3.5679504266352177`*^9}, {3.5679504653700857`*^9, 3.5679505048069553`*^9}, 3.567950534915008*^9, {3.567951107623214*^9, 3.567951136046464*^9}, 3.567951302545556*^9, {3.5679562986474605`*^9, 3.567956305355472*^9}, { 3.5679563590975666`*^9, 3.567956370688387*^9}, {3.567956414930065*^9, 3.567956430467692*^9}, {3.567956484740187*^9, 3.567956500667815*^9}, { 3.5679565456270943`*^9, 3.5679565868267665`*^9}, {3.5679569267045636`*^9, 3.5679569448941956`*^9}, {3.567956976562251*^9, 3.567957000711094*^9}, { 3.5679570348595533`*^9, 3.5679570632672033`*^9}, {3.5679573263928657`*^9, 3.5679573286548696`*^9}, {3.5679573611029263`*^9, 3.5679573637393312`*^9}, {3.5679592820903006`*^9, 3.567959317127962*^9}, { 3.567959397655304*^9, 3.5679594004945087`*^9}, {3.5679594704762316`*^9, 3.5679594724574347`*^9}, {3.567959655898157*^9, 3.567959673073787*^9}, 3.5681143121223865`*^9, 3.568121866388855*^9, 3.568220668221574*^9, { 3.568220718968463*^9, 3.568220723742071*^9}, {3.568220862051914*^9, 3.5682208641111183`*^9}, {3.568220906761593*^9, 3.5682209083527956`*^9}, { 3.5682209451844606`*^9, 3.5682209651680956`*^9}, {3.568221147782016*^9, 3.5682211695908546`*^9}, {3.568221237279373*^9, 3.568221253612602*^9}, { 3.568221305420293*^9, 3.568221306247094*^9}, {3.5682215161142635`*^9, 3.568221546206716*^9}, 3.56822158247678*^9, {3.568277819185131*^9, 3.5682778284359474`*^9}, 3.56882183684053*^9, {3.5688219650415554`*^9, 3.568821965915157*^9}, {3.5688769979329815`*^9, 3.5688771619984694`*^9}, { 3.568877204212144*^9, 3.5688772091729527`*^9}, {3.568877282493081*^9, 3.5688772843338842`*^9}, {3.568877374112042*^9, 3.568877378074449*^9}, { 3.56887744125456*^9, 3.5688774664954042`*^9}, {3.56887758366721*^9, 3.568877604867647*^9}, {3.568877667220957*^9, 3.5688776710429635`*^9}, { 3.5688778111156096`*^9, 3.56887782262843*^9}, {3.569341165522358*^9, 3.569341165522358*^9}, 3.5693418217375107`*^9, {3.5693429625675144`*^9, 3.5693429673099227`*^9}, {3.569390288837522*^9, 3.5693903143123665`*^9}, { 3.569390381798085*^9, 3.5693904158685455`*^9}, {3.5693905284539433`*^9, 3.569390564349606*^9}, {3.569390610868888*^9, 3.569390611056088*^9}, { 3.569390743671921*^9, 3.569390761487152*^9}, {3.569390843761697*^9, 3.569390861608128*^9}, {3.5693909829451413`*^9, 3.5693909887171516`*^9}, 3.5703416480920715`*^9, {3.5703416810237293`*^9, 3.5703416997437625`*^9}, 3.570341888192094*^9, {3.5705964879252462`*^9, 3.570596509843285*^9}, { 3.5705965495921545`*^9, 3.5705966388087115`*^9}, 3.570968886604662*^9, { 3.5709689930904493`*^9, 3.5709689944320517`*^9}, {3.5709690501397495`*^9, 3.570969050904151*^9}, {3.5709692134876366`*^9, 3.5709692140804377`*^9}, { 3.5709722325921392`*^9, 3.5709722334033403`*^9}, {3.5709723694355793`*^9, 3.570972545481889*^9}, {3.570972790558319*^9, 3.5709728063299465`*^9}, { 3.570972844066413*^9, 3.570972866764453*^9}, {3.5709729633598228`*^9, 3.57097298434186*^9}, {3.5709731454589424`*^9, 3.5709731466289444`*^9}, 3.570973453029083*^9, {3.5709736099653587`*^9, 3.570973638404208*^9}, { 3.571113899355363*^9, 3.571113958604267*^9}, 3.57111399989754*^9, { 3.5711140388820086`*^9, 3.571114044841219*^9}, {3.571115985874628*^9, 3.5711159997742524`*^9}, {3.57313788224113*^9, 3.5731379093851776`*^9}, 3.573137959679666*^9, 3.576499957883173*^9, {3.576500722331316*^9, 3.5765007252797213`*^9}, {3.576508830264738*^9, 3.576508844538763*^9}, { 3.57650893355252*^9, 3.576508950400549*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30", "31", "32", "33", "34", "35", "36", "37", "38", "39", "40", "41", "42"}, {"0.`", "0", "0", "2.965283757246053`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.7289429074933236`", "0", "0", "0", "0", "0", "0", "3.4362786722600696`", "2.0469263279567294`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0.`", "0", "0", "2.9270250526496526`", "2.859915566196463`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.7005399474240304`", "0", "0", "0", "0", "0", "0", "0", "0", "2.048948026863679`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0.`", "2.895476823152543`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.69604636387196`", "0", "2.2711449799602916`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"2.965283757246053`", "0", "2.895476823152543`", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.7398216287387855`", "0", "0", "0", "0", "0", "0", "0", "0", "2.049803703422558`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "2.9270250526496526`", "0", "0", "0.`", "0", "2.9057596715932728`", "2.913385747823225`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "3.5009374883760875`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "2.859915566196463`", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.5191743998983105`", "2.2779844591506855`", "0", "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.9057596715932728`", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.1046891973838546`", "2.1047269569774465`", "2.1059623211152227`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "2.913385747823225`", "0", "0", "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.1067225714770625`", "2.105313346067062`", "2.105908542853591`", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0.`", "2.87223342493554`", "0", "0", "0", "0", "0", "0", "0", "2.6266277368415256`", "0", "0", "0", "2.281672389643566`", "0", "0", "0", "0", "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.87223342493554`", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.658635900711725`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.106775120346134`", "2.1061893856854197`", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "2.651090071183851`", "2.647347238268231`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.583991857808899`", "0", "0", "0", "0", "0", "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.651090071183851`", "0.`", "0", "2.6398431044172974`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.081289528090295`", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.647347238268231`", "0", "0.`", "0", "2.637507542391742`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0842389946362134`", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.6398431044172974`", "0", "0.`", "0", "2.6356727625029057`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.0843275329651534`", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.637507542391742`", "0", "0.`", "2.63465427166247`", "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.08441297165542`", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.6356727625029057`", "2.63465427166247`", "0.`", "0", "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.0841680734201313`"}, {"2.7289429074933236`", "2.7005399474240304`", "2.69604636387196`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "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.7398216287387855`", "0", "0", "0", "0", "2.6266277368415256`", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.929788010128111`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "2.2711449799602916`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "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.5191743998983105`", "0", "0", "0", "0", "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.8353445720179167`", "0", "0", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "2.2779844591506855`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "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.281672389643566`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "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.658635900711725`", "2.583991857808899`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"3.4362786722600696`", "0", "0", "0", "3.5009374883760875`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0469263279567294`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.048948026863679`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.049803703422558`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "0", "0", "0", "0", "0", "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.929788010128111`", "0", "0", "0", "0", "0", "0", "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.1046891973838546`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1047269569774465`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1059623211152227`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1067225714770625`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.105313346067062`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.105908542853591`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`", "0", "0", "0", "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.8353445720179167`", "0", "0", "0", "0", "0", "0", "0", "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.106775120346134`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1061893856854197`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.081289528090295`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0842389946362134`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0843275329651534`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.08441297165542`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.0841680734201313`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5765572964533105`*^9, 3.576557531764124*^9, 3.5802184126777763`*^9}] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.5711447475554733`*^9, 3.5711448173314643`*^9}, { 3.5711448756027975`*^9, 3.57114492740276*^9}, {3.5711449591545763`*^9, 3.5711450128426466`*^9}, 3.571145059034289*^9, {3.571145091643154*^9, 3.5711451544367456`*^9}, {3.5711457670857873`*^9, 3.571145777413378*^9}, { 3.571145816908637*^9, 3.5711458203728347`*^9}, {3.571145995427848*^9, 3.571146043099574*^9}, {3.571146121580063*^9, 3.571146129714528*^9}, { 3.5711468466695356`*^9, 3.571146852041843*^9}, {3.5711478420384674`*^9, 3.571147850085928*^9}, {3.57114788911016*^9, 3.571147906822173*^9}, 3.571148086181432*^9, {3.571148123252552*^9, 3.5711481317480383`*^9}, { 3.571148234499915*^9, 3.57114834630731*^9}, 3.571151990091008*^9, { 3.5712017864539623`*^9, 3.5712018128960094`*^9}, {3.5712024819499846`*^9, 3.5712024821527843`*^9}, {3.571202538780884*^9, 3.5712025389368844`*^9}, { 3.5712028115629635`*^9, 3.5712028346354036`*^9}, {3.5746569418109684`*^9, 3.574656960905402*^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", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", "&&", " ", RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", " ", "\"\\""}]}], ")"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.59"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5541"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "j", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0.5241"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "u2"}], "Input", CellChangeTimes->{{3.5688800293771057`*^9, 3.5688801774057655`*^9}, { 3.5688802290574565`*^9, 3.568880330208034*^9}, {3.5688803807053227`*^9, 3.5688804136525807`*^9}, 3.568880491434317*^9, 3.5688805648948464`*^9, { 3.5688806280437574`*^9, 3.568880655234605*^9}, {3.568880712424306*^9, 3.568880716324312*^9}, {3.5688808087544746`*^9, 3.568880827786508*^9}, 3.5688808733385878`*^9, {3.568881358936241*^9, 3.5688813959239063`*^9}, { 3.568881446561595*^9, 3.5688815849182377`*^9}, {3.5688816223739033`*^9, 3.568881642607139*^9}, 3.568881728953291*^9, {3.568881797624612*^9, 3.568881809870633*^9}, 3.568881863612727*^9, {3.568883098916497*^9, 3.5688831014749017`*^9}, {3.56888372124679*^9, 3.568883843239004*^9}, 3.568888211750622*^9, {3.5688882521546926`*^9, 3.5688885232519693`*^9}, { 3.5688885890840845`*^9, 3.5688885895052853`*^9}, {3.568888675773437*^9, 3.5688886914514647`*^9}, {3.568888736285943*^9, 3.5688887717760057`*^9}, { 3.5688888256429005`*^9, 3.5688888541441507`*^9}, {3.568892442649892*^9, 3.5688924499507046`*^9}, {3.568892758441247*^9, 3.5688927597360487`*^9}, { 3.5688928234309607`*^9, 3.5688928379389863`*^9}, {3.5708938149488974`*^9, 3.5708938463361526`*^9}, {3.570893920483083*^9, 3.5708939282050962`*^9}, { 3.570894700000852*^9, 3.57089481264865*^9}, {3.570973331551669*^9, 3.570973355887712*^9}, {3.5709734060886*^9, 3.5709734077266035`*^9}, 3.5709737061863275`*^9, {3.5712013634748197`*^9, 3.5712013661736245`*^9}, { 3.571201966837079*^9, 3.5712020689392586`*^9}, {3.5733681085139713`*^9, 3.573368111025576*^9}, {3.5733681833629026`*^9, 3.573368184579705*^9}, { 3.573368233454591*^9, 3.573368234047392*^9}, 3.576500022607687*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.2572`", ",", "0.22522`", ",", "0.22522`", ",", "0.1786`", ",", "0.1786`", ",", "0.1786`", ",", "0.1786`", ",", "0.1786`", ",", "0.5244`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.5541`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.5241`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`", ",", "0.59`"}], "}"}]], "Output", CellChangeTimes->{3.57655729646891*^9, 3.5765575317797236`*^9, 3.5802184126933765`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "subtract", " ", "core", " ", "radii", " ", "from", " ", "pair", " ", "distances"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Fij", "=", RowBox[{"Dij", "-", "u2"}]}], ";"}], "\[IndentingNewLine]", 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[{"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}, 3.575798260154653*^9, { 3.57579837247485*^9, 3.575798382833268*^9}, 3.575798442113373*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"2.7080837572460528`", "0", "2.638276823152543`", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "2.6698250526496525`", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"0", "2.602715566196463`", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"0", "0", "0", "0", "2.6485596715932727`", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "2.656185747823225`", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "2.61503342493554`", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.393890071183851`", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.3901472382682307`", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\ \>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.3826431044172973`", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.380307542391742`", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.3784727625029056`", "2.37745427166247`", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"2.5037229074933234`", "2.47531994742403`", "2.47082636387196`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "2.5146016287387853`", "0", "0", "0", "0", "2.4014077368415254`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"0", "0", "2.0925449799602918`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "2.3405743998983106`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "2.0993844591506856`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "2.103072389643566`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "2.480035900711725`", "2.4053918578088993`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\ \>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>"}, {"2.9118786722600696`", "0", "0", "0", "2.9765374883760876`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>"}, {"1.4569263279567295`", "0", "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.4589480268636792`", "0", "0", "0", "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.459803703422558`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.375688010128111`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\ \<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", \ "\<\" \"\>", "\<\" \"\>", "\<\" \"\>"}, {"0", "0", "0", "0", "0", "0", "1.5146891973838548`", "0", "0", "0", "0", "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.5147269569774466`", "0", "0", "0", "0", "0", "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.5159623211152229`", "0", "0", "0", "0", "0", "0", "0", "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.5167225714770627`", "0", "0", "0", "0", "0", "0", "0", "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.515313346067062`", "0", "0", "0", "0", "0", "0", "0", "0", "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.515908542853591`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.3112445720179167`", "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.516775120346134`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.5161893856854198`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.4912895280902951`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.4942389946362136`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.4943275329651535`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.4944129716554202`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.4941680734201315`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5765572964845104`*^9, 3.5765575317953234`*^9, 3.5802184127089767`*^9}] }, Open ]], 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[CellGroupData[{ 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[{"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}, {3.5757984551081953`*^9, 3.5757984616914067`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "2.4508837572460527`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.2465229074933233`", "0", "0", "0", "0", "0", "0", "2.6546786722600695`", "1.1997263279567294`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "0", "0", "0", "2.4126250526496524`", "2.345515566196463`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.21811994742403`", "0", "0", "0", "0", "0", "0", "0", "0", "1.201748026863679`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "0", "2.3810768231525428`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.2136263638719598`", "0", "1.8353449799602917`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.2574016287387852`", "0", "0", "0", "0", "0", "0", "0", "0", "1.2026037034225578`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "2.3913596715932726`", "2.398985747823225`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.7193374883760875`", "0", "0", "0", "0", "0", "0", "0", "0", "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.0833743998983105`", "1.8421844591506855`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.2574891973838547`", "1.2575269569774465`", "1.2587623211152228`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "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.2595225714770626`", "1.258113346067062`", "1.258708542853591`", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "2.35783342493554`", "0", "0", "0", "0", "0", "0", "0", "2.1442077368415253`", "0", "0", "0", "1.8458723896435658`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.222835900711725`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.2595751203461338`", "1.2589893856854197`", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "2.136690071183851`", "2.1329472382682306`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "2.148191857808899`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "2.1254431044172972`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.234089528090295`", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "2.123107542391742`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.2370389946362135`", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "2.1212727625029055`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.2371275329651534`", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "2.12025427166247`", "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.23721297165542`", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "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.2369680734201314`"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.150468010128111`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1326445720179166`", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5765572965157104`*^9, 3.576557531826524*^9, 3.580218412740176*^9}] }, Open ]], Cell[CellGroupData[{ 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[{"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}, {3.5757985741520042`*^9, 3.5757985795340137`*^9}, {3.5757996092762227`*^9, 3.5757996144242315`*^9}, {3.575799724856826*^9, 3.575799730145235*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "1.2254418786230263`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.1232614537466616`", "0", "0", "0", "0", "0", "0", "1.3273393361300347`", "1.1997263279567294`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "0", "0", "0", "1.2063125263248262`", "1.1727577830982314`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.109059973712015`", "0", "0", "0", "0", "0", "0", "0", "0", "1.201748026863679`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "0", "1.1905384115762714`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.1068131819359799`", "0", "0.9176724899801458`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1287008143693926`", "0", "0", "0", "0", "0", "0", "0", "0", "1.2026037034225578`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "1.1956798357966363`", "1.1994928739116124`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.3596687441880437`", "0", "0", "0", "0", "0", "0", "0", "0", "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.0416871999491553`", "0.9210922295753428`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.2574891973838547`", "1.2575269569774465`", "1.2587623211152228`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "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.2595225714770626`", "1.258113346067062`", "1.258708542853591`", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "1.17891671246777`", "0", "0", "0", "0", "0", "0", "0", "1.0721038684207627`", "0", "0", "0", "0.9229361948217829`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1114179503558625`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.2595751203461338`", "1.2589893856854197`", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "1.0683450355919255`", "1.0664736191341153`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.0740959289044496`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "1.0627215522086486`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.234089528090295`", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "1.061553771195871`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.2370389946362135`", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "1.0606363812514528`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1.2371275329651534`", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "1.060127135831235`", "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.23721297165542`", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "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.2369680734201314`"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.150468010128111`", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "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.1326445720179166`", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "0", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "0", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0", "0"}, {"\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \ \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "\<\" \"\>", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.57655729653131*^9, 3.5765575318577237`*^9, 3.5802184127713766`*^9}] }, Open ]], Cell[CellGroupData[{ 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"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{"(*", RowBox[{"MatrixForm", "[", "Nij", "]"}], "*)"}], "\[IndentingNewLine]", 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"}], "}"}]}], "]"}]}], "\n", 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"}], "}"}]}], "]"}]}], "\n", RowBox[{"Ttot", "=", RowBox[{"Tval", "+", "Tcor"}]}], " ", RowBox[{"(*", " ", RowBox[{"plus", " ", "\[Pi]", " ", "and", " ", "lone", " ", RowBox[{"pairs", ":", " ", RowBox[{"+", " ", "8.7616"}]}]}], " ", "*)"}], "\n", 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"}], "}"}]}], "]"}]}], "\n", RowBox[{"TvalC", "=", RowBox[{"Tval", "-", "TvalH"}]}]}]}]], "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}, 3.574657067547189*^9}], Cell[BoxData["75.29486744520663`"], "Output", CellChangeTimes->{3.5765572965469103`*^9, 3.5765575318889236`*^9, 3.5802184127869763`*^9}], Cell[BoxData["993.7869534362701`"], "Output", CellChangeTimes->{3.5765572965469103`*^9, 3.5765575318889236`*^9, 3.5802184127869763`*^9}], Cell[BoxData["1069.0818208814767`"], "Output", CellChangeTimes->{3.5765572965469103`*^9, 3.5765575318889236`*^9, 3.5802184127869763`*^9}], Cell[BoxData["26.8523318554844`"], "Output", CellChangeTimes->{3.5765572965469103`*^9, 3.5765575318889236`*^9, 3.580218412802576*^9}], Cell[BoxData["48.44253558972223`"], "Output", CellChangeTimes->{3.5765572965469103`*^9, 3.5765575318889236`*^9, 3.580218412802576*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"Mij", "=", RowBox[{"Prepend", "[", RowBox[{"Qij", ",", "u"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Oij", "=", RowBox[{"Transpose", "[", "Mij", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Pij", "=", RowBox[{"Prepend", "[", RowBox[{"Oij", ",", RowBox[{"Prepend", "[", RowBox[{"u", ",", "\"\< \>\""}], "]"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, 3.572624583643982*^9, {3.574656664645282*^9, 3.5746566773749037`*^9}, { 3.574656980265036*^9, 3.5746569955686626`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Eij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"bc", "-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", RowBox[{"bc", "-", "1"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"CD", "=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Flatten", "[", "Eij", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#", "\[GreaterEqual]", "2.4"}], " ", "&&", RowBox[{"#", "\[LessEqual]", "2.6"}]}], ")"}], " ", "&"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mean", "[", "CD", "]"}], " ", "\[PlusMinus]", " ", RowBox[{"StandardDeviation", "[", "CD", "]"}]}], "\n", RowBox[{"CC", "=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Flatten", "[", "Eij", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"#", "\[GreaterEqual]", "2.6"}], ")"}], " ", "&"}]}], "]"}]}], "\n", RowBox[{ RowBox[{ RowBox[{"Mean", "[", "CC", "]"}], " ", "\[PlusMinus]", " ", RowBox[{"StandardDeviation", "[", "CC", "]"}]}], " "}], "\n", RowBox[{ RowBox[{"Eij", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[GreaterEqual]", "j"}], ",", RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", RowBox[{"bc", "-", "1"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"CH", "=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Flatten", "[", "Eij", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#", ">", "0"}], " ", "&&", RowBox[{"#", "\[LessEqual]", "2.1"}]}], ")"}], " ", "&"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mean", "[", "CH", "]"}], " ", "\[PlusMinus]", " ", RowBox[{"StandardDeviation", "[", "CH", "]"}]}]}], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, 3.572624583643982*^9, {3.574656664645282*^9, 3.5746566773749037`*^9}, { 3.574656980265036*^9, 3.5746569955686626`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"2.5191743998983105`", ",", "2.583991857808899`"}], "}"}]], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.576557531920124*^9, 3.5802184128181763`*^9}], Cell[BoxData[ RowBox[{"2.551583128853605`", "\[PlusMinus]", "0.04583286402785089`"}]], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.576557531920124*^9, 3.5802184128181763`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "2.965283757246053`", ",", "2.895476823152543`", ",", "2.9270250526496526`", ",", "2.859915566196463`", ",", "2.9057596715932728`", ",", "2.913385747823225`", ",", "2.87223342493554`", ",", "2.651090071183851`", ",", "2.647347238268231`", ",", "2.6398431044172974`", ",", "2.637507542391742`", ",", "2.6356727625029057`", ",", "2.63465427166247`", ",", "2.7289429074933236`", ",", "2.7005399474240304`", ",", "2.69604636387196`", ",", "2.7398216287387855`", ",", "2.6266277368415256`", ",", "2.658635900711725`"}], "}"}]], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.576557531920124*^9, 3.5802184128181763`*^9}], Cell[BoxData[ RowBox[{"2.7545162904791893`", "\[PlusMinus]", "0.12414081810516268`"}]], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.576557531920124*^9, 3.5802184128181763`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "2.0469263279567294`", ",", "2.048948026863679`", ",", "2.049803703422558`", ",", "1.929788010128111`", ",", "1.8353445720179167`", ",", "2.081289528090295`", ",", "2.0842389946362134`", ",", "2.0843275329651534`", ",", "2.08441297165542`", ",", "2.0841680734201313`"}], "}"}]], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.576557531920124*^9, 3.5802184128181763`*^9}], Cell[BoxData[ RowBox[{"2.032924774115621`", "\[PlusMinus]", "0.0838677975688498`"}]], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.576557531920124*^9, 3.5802184128181763`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"count", " ", "C", " ", "atoms"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"nc", "=", "0"}], ";"}], " ", "\n", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"nc", "=", RowBox[{"nc", "+", "1"}]}], ",", "nc"}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"cnt", "=", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", "nc", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pri", "=", "cnt"}], ";", " ", RowBox[{"sec", "=", "cnt"}], ";", RowBox[{"ter", "=", "cnt"}], ";", " ", RowBox[{"qua", "=", "cnt"}], ";"}], "\[IndentingNewLine]", "nc"}]}]], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, 3.572624583643982*^9, {3.574656664645282*^9, 3.5746566836773148`*^9}, { 3.5746567220533824`*^9, 3.5746567296193953`*^9}}], Cell[BoxData["16"], "Output", CellChangeTimes->{3.5765572965781107`*^9, 3.5765575319357243`*^9, 3.5802184128337765`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"count", " ", "O", " ", "atoms"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"no", "=", "0"}], ";"}], " ", "\n", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"no", "=", RowBox[{"no", "+", "1"}]}], ",", "no"}], "]"}]}], "]"}], "\[IndentingNewLine]", "no"}]}]], "Input", CellChangeTimes->{{3.5747778571769943`*^9, 3.5747779085322847`*^9}}], Cell[BoxData["5"], "Output", CellChangeTimes->{3.5765572965937104`*^9, 3.576557531951324*^9, 3.5802184128337765`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "count", " ", "H", " ", "atoms", " ", "bonded", " ", "to", " ", "each", " ", "C", " ", "atom"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "nc"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"bc", "+", "1"}]}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", " ", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", ",", RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "j", "]"}], "]"}], "=", RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "j", "]"}], "]"}], "+", "1"}]}], ",", "0"}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "cnt"}]}]], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, 3.572624583643982*^9, {3.574656664645282*^9, 3.5746566836773148`*^9}, { 3.5746567220533824`*^9, 3.5746567296193953`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "1", ",", "0", ",", "1", ",", "0", ",", "0", ",", "3", ",", "3", ",", "0", ",", "2", ",", "0", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1"}], "}"}]], "Output", CellChangeTimes->{3.5765572966093106`*^9, 3.5765575319669237`*^9, 3.5802184128493767`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"parse", " ", "into", " ", "prim"}], ",", " ", "sec", ",", " ", "tert", ",", " ", RowBox[{ "and", " ", "quart", " ", "C", " ", "cores", " ", "with", " ", "different", " ", "radii"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"n1", "=", "0"}], ";", " ", RowBox[{"n2", "=", "0"}], ";", " ", RowBox[{"n3", "=", "0"}], ";", " ", RowBox[{"n4", "=", "0"}], ";", "\n", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "3"}], ",", RowBox[{ RowBox[{"n1", "=", RowBox[{"n1", "+", "1"}]}], ";", RowBox[{ RowBox[{"pri", "[", RowBox[{"[", "n1", "]"}], "]"}], "=", "i"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "2"}], ",", RowBox[{ RowBox[{"n2", "=", RowBox[{"n2", "+", "1"}]}], ";", RowBox[{ RowBox[{"sec", "[", RowBox[{"[", "n2", "]"}], "]"}], "=", "i"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "1"}], ",", RowBox[{ RowBox[{"n3", "=", RowBox[{"n3", "+", "1"}]}], ";", RowBox[{ RowBox[{"ter", "[", RowBox[{"[", "n3", "]"}], "]"}], "=", "i"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"cnt", "[", RowBox[{"[", "i", "]"}], "]"}], "=", "0"}], ",", RowBox[{ RowBox[{"n4", "=", RowBox[{"n4", "+", "1"}]}], ";", RowBox[{ RowBox[{"qua", "[", RowBox[{"[", "n4", "]"}], "]"}], "=", "i"}]}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"pri", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"pri", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.259"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"sec", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"sec", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.258"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"ter", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"ter", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2595"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", " ", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"qua", "[", RowBox[{"[", "i", "]"}], "]"}], "\[NotEqual]", "0"}], ",", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"qua", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "=", "0.2595"}]}], "]"}]}], "]"}]}]}], "*)"}]}]], "Input", CellChangeTimes->{ 3.574656734486604*^9, 3.5746567701950665`*^9, 3.574656840972391*^9, { 3.574674470271285*^9, 3.574674475481694*^9}, {3.574674526181783*^9, 3.574674528927388*^9}, {3.5746746901536713`*^9, 3.5746746947712793`*^9}, 3.5757079587880955`*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"con", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", "i", "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";", " ", RowBox[{"conj", "=", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", "nc", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "n"}], ",", RowBox[{"j", "++"}], ",", RowBox[{"If", "[", " ", RowBox[{ RowBox[{ RowBox[{"Dij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "0"}], " ", ",", RowBox[{ RowBox[{"con", "[", RowBox[{"[", "i", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"con", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "j"}], "}"}]}]}], "]"}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"conn", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"con", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"conn", "[", RowBox[{"[", "10", "]"}], "]"}], "=", RowBox[{"{", RowBox[{"10", ",", "7", ",", "11", ",", "17"}], "}"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "identify", " ", "C", " ", "atoms", " ", "at", " ", "double", " ", "bonds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"j", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "nc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"conn", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", "4"}], " ", "&&", " ", RowBox[{ RowBox[{"u", "[", RowBox[{"[", RowBox[{"conn", "[", RowBox[{"[", RowBox[{"i", ",", "4"}], "]"}], "]"}], "]"}], "]"}], "\[NotEqual]", "\"\\""}]}], ")"}], ",", RowBox[{ RowBox[{"j", "=", RowBox[{"j", "+", "1"}]}], ";", RowBox[{ RowBox[{"conj", "[", RowBox[{"[", "j", "]"}], "]"}], "=", "i"}]}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"conj", "=", RowBox[{"Take", "[", RowBox[{"conj", ",", RowBox[{"{", RowBox[{"1", ",", "j"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"nj", "=", RowBox[{"Length", "[", "conj", "]"}]}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"conn", ",", " ", RowBox[{"TableAlignments", "\[Rule]", "Left"}]}], "]"}]}], "Input", CellChangeTimes->{{3.568045828002715*^9, 3.56804588761042*^9}, 3.5680459828797874`*^9, {3.568046033938677*^9, 3.5680460518787084`*^9}, { 3.568046989190755*^9, 3.5680470284404235`*^9}, {3.568047061028881*^9, 3.568047085567724*^9}, {3.5680471562982483`*^9, 3.568047169199471*^9}, { 3.568047223393966*^9, 3.568047364059413*^9}, {3.568047417286707*^9, 3.5680474225127163`*^9}, {3.5680474583459787`*^9, 3.568047487861231*^9}, { 3.5680475345521126`*^9, 3.5680475468605347`*^9}, {3.5680479168775845`*^9, 3.5680479311516094`*^9}, {3.568048066918648*^9, 3.568048067667449*^9}, { 3.5680483816336*^9, 3.5680483930216208`*^9}, {3.568048424159275*^9, 3.568048450211321*^9}, {3.5680486326224413`*^9, 3.5680486370996494`*^9}, { 3.5680487358166227`*^9, 3.5680487967191296`*^9}, 3.568048834377596*^9, 3.568048984418659*^9, {3.5680490255559316`*^9, 3.5680490790796256`*^9}, { 3.5680491274553103`*^9, 3.5680491280949116`*^9}, {3.5680491782333994`*^9, 3.568049231944294*^9}, {3.568049361533722*^9, 3.5680493691933355`*^9}, { 3.568049422171028*^9, 3.568049427490638*^9}, {3.568049476427923*^9, 3.5680495489368505`*^9}, {3.568049620634577*^9, 3.5680496274361887`*^9}, { 3.5680496655314555`*^9, 3.568049693876705*^9}, 3.568049746573598*^9, { 3.568049846460573*^9, 3.568049932759925*^9}, {3.568050009059659*^9, 3.5680500167348723`*^9}, {3.5680501572755194`*^9, 3.568050179911159*^9}, 3.5681087021497335`*^9, {3.5726244549749556`*^9, 3.5726244687341795`*^9}, { 3.572624511540655*^9, 3.5726245129758577`*^9}, {3.5726259545431895`*^9, 3.5726259555883913`*^9}, {3.5726268385811424`*^9, 3.5726268436979513`*^9}, {3.5727156260686264`*^9, 3.5727156464110622`*^9}, 3.572767008717453*^9, 3.572767169428935*^9, {3.5727947272385855`*^9, 3.5727947348669987`*^9}, {3.5733216830258026`*^9, 3.573321731307887*^9}, 3.5746648213532076`*^9, 3.5747423225955195`*^9, {3.5747806605331182`*^9, 3.5747807483924723`*^9}, {3.5747809586028414`*^9, 3.57478099722851*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"12", ",", "13", ",", "14", ",", "15", ",", "16"}], "}"}]], "Output", CellChangeTimes->{3.5765572966093106`*^9, 3.576557531982524*^9, 3.580218412864977*^9}], Cell[BoxData["5"], "Output", CellChangeTimes->{3.5765572966093106`*^9, 3.576557531982524*^9, 3.580218412864977*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{"{", RowBox[{"1", ",", "4", ",", "17", ",", "24", ",", "25"}], "}"}]}, { RowBox[{"{", RowBox[{"2", ",", "5", ",", "6", ",", "17", ",", "26"}], "}"}]}, { RowBox[{"{", RowBox[{"3", ",", "4", ",", "17", ",", "19"}], "}"}]}, { RowBox[{"{", RowBox[{"4", ",", "1", ",", "3", ",", "18", ",", "27"}], "}"}]}, { RowBox[{"{", RowBox[{"5", ",", "2", ",", "7", ",", "8", ",", "24"}], "}"}]}, { RowBox[{"{", RowBox[{"6", ",", "2", ",", "20", ",", "21"}], "}"}]}, { RowBox[{"{", RowBox[{"7", ",", "5", ",", "29", ",", "30", ",", "31"}], "}"}]}, { RowBox[{"{", RowBox[{"8", ",", "5", ",", "32", ",", "33", ",", "34"}], "}"}]}, { RowBox[{"{", RowBox[{"9", ",", "10", ",", "18", ",", "22"}], "}"}]}, { RowBox[{"{", RowBox[{"10", ",", "9", ",", "23", ",", "36", ",", "37"}], "}"}]}, { RowBox[{"{", RowBox[{"11", ",", "12", ",", "13", ",", "23"}], "}"}]}, { RowBox[{"{", RowBox[{"12", ",", "11", ",", "14", ",", "38"}], "}"}]}, { RowBox[{"{", RowBox[{"13", ",", "11", ",", "15", ",", "39"}], "}"}]}, { RowBox[{"{", RowBox[{"14", ",", "12", ",", "16", ",", "40"}], "}"}]}, { RowBox[{"{", RowBox[{"15", ",", "13", ",", "16", ",", "41"}], "}"}]}, { RowBox[{"{", RowBox[{"16", ",", "14", ",", "15", ",", "42"}], "}"}]}, { RowBox[{"{", RowBox[{"17", ",", "1", ",", "2", ",", "3"}], "}"}]}, { RowBox[{"{", RowBox[{"18", ",", "4", ",", "9", ",", "28"}], "}"}]}, { RowBox[{"{", RowBox[{"19", ",", "3"}], "}"}]}, { RowBox[{"{", RowBox[{"20", ",", "6", ",", "35"}], "}"}]}, { RowBox[{"{", RowBox[{"21", ",", "6"}], "}"}]}, { RowBox[{"{", RowBox[{"22", ",", "9"}], "}"}]}, { RowBox[{"{", RowBox[{"23", ",", "10", ",", "11"}], "}"}]}, { RowBox[{"{", RowBox[{"24", ",", "1", ",", "5"}], "}"}]}, { RowBox[{"{", RowBox[{"25", ",", "1"}], "}"}]}, { RowBox[{"{", RowBox[{"26", ",", "2"}], "}"}]}, { RowBox[{"{", RowBox[{"27", ",", "4"}], "}"}]}, { RowBox[{"{", RowBox[{"28", ",", "18"}], "}"}]}, { RowBox[{"{", RowBox[{"29", ",", "7"}], "}"}]}, { RowBox[{"{", RowBox[{"30", ",", "7"}], "}"}]}, { RowBox[{"{", RowBox[{"31", ",", "7"}], "}"}]}, { RowBox[{"{", RowBox[{"32", ",", "8"}], "}"}]}, { RowBox[{"{", RowBox[{"33", ",", "8"}], "}"}]}, { RowBox[{"{", RowBox[{"34", ",", "8"}], "}"}]}, { RowBox[{"{", RowBox[{"35", ",", "20"}], "}"}]}, { RowBox[{"{", RowBox[{"36", ",", "10"}], "}"}]}, { RowBox[{"{", RowBox[{"37", ",", "10"}], "}"}]}, { RowBox[{"{", RowBox[{"38", ",", "12"}], "}"}]}, { RowBox[{"{", RowBox[{"39", ",", "13"}], "}"}]}, { RowBox[{"{", RowBox[{"40", ",", "14"}], "}"}]}, { RowBox[{"{", RowBox[{"41", ",", "15"}], "}"}]}, { RowBox[{"{", RowBox[{"42", ",", "16"}], "}"}]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$, TableAlignments -> Left]]]], "Output", CellChangeTimes->{3.5765572966093106`*^9, 3.576557531982524*^9, 3.5802184128805766`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"j", "=", "0"}], ";", " ", RowBox[{"h", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"coco", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", "no", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"coch", "=", "coco"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"nc", "+", "1"}]}], ",", " ", RowBox[{"i", "\[LessEqual]", RowBox[{"nc", "+", "no"}]}], ",", " ", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"conn", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", "2"}], ",", RowBox[{ RowBox[{"j", "=", RowBox[{"j", "+", "1"}]}], ";", RowBox[{ RowBox[{"coco", "[", RowBox[{"[", "j", "]"}], "]"}], "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{"conn", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "}"}], ",", RowBox[{"Take", "[", RowBox[{ RowBox[{"conn", "[", RowBox[{"[", RowBox[{"conn", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], ",", "3"}], "]"}]}], "]"}]}]}], ",", RowBox[{ RowBox[{"h", "=", RowBox[{"h", "+", "1"}]}], ";", RowBox[{ RowBox[{"coch", "[", RowBox[{"[", "h", "]"}], "]"}], "=", RowBox[{"conn", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"coco", "=", RowBox[{"Take", "[", RowBox[{"coco", ",", RowBox[{"{", RowBox[{"1", ",", "j"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"coch", "=", RowBox[{"Take", "[", RowBox[{"coch", ",", RowBox[{"{", RowBox[{"1", ",", "h"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"oj", "=", RowBox[{"Length", "[", "coco", "]"}]}], "\[IndentingNewLine]", RowBox[{"hj", "=", RowBox[{"Length", "[", "coch", "]"}]}]}]}]], "Input", CellChangeTimes->{{3.568108824079547*^9, 3.568109012824279*^9}, { 3.568109558076436*^9, 3.568109588168889*^9}, {3.5681097523435774`*^9, 3.5681097637783976`*^9}, {3.5681100381828794`*^9, 3.5681101616726966`*^9}, {3.5681102015307665`*^9, 3.5681102288464146`*^9}, {3.568110263743676*^9, 3.568110267331682*^9}, { 3.5681103163469687`*^9, 3.5681103268925867`*^9}, {3.5681106443375444`*^9, 3.5681106916368275`*^9}, 3.568110873002746*^9, {3.5681109388660617`*^9, 3.5681110268970165`*^9}, {3.568111092526332*^9, 3.568111123461186*^9}, { 3.5681111884196997`*^9, 3.568111192756508*^9}, {3.5681112268113675`*^9, 3.568111366213212*^9}, {3.568111434946933*^9, 3.568111463354583*^9}, { 3.568111544396725*^9, 3.568111547625931*^9}, {3.5681116856081734`*^9, 3.5681117131422215`*^9}, {3.568111864696488*^9, 3.5681119835998964`*^9}, 3.5681120218355637`*^9, {3.56811206543764*^9, 3.568112066389242*^9}, { 3.568112332369709*^9, 3.5681123404505234`*^9}, {3.568112505935614*^9, 3.56811251481203*^9}, {3.5681125623609133`*^9, 3.568112569006525*^9}, { 3.568112648067464*^9, 3.568112734210815*^9}, {3.568112764443668*^9, 3.5681127697320776`*^9}, {3.5681128018681335`*^9, 3.568112843426607*^9}, { 3.568112884641879*^9, 3.5681128887602863`*^9}, {3.5681129663080225`*^9, 3.5681129699584293`*^9}, {3.568113133789917*^9, 3.568113227936082*^9}, { 3.5681132946885996`*^9, 3.5681133044698167`*^9}, {3.568113502200164*^9, 3.568113507348173*^9}, 3.56811354556824*^9, {3.5681222886191964`*^9, 3.5681222896019983`*^9}, {3.568207424138049*^9, 3.5682074415164795`*^9}, 3.568277923134914*^9, 3.568883508322016*^9, 3.568883588350157*^9, 3.5688836441982546`*^9, {3.5703421313965206`*^9, 3.5703421386505337`*^9}, { 3.570342288098796*^9, 3.5703424924279547`*^9}, 3.5709745658726373`*^9, 3.5709746291463485`*^9, {3.5709747534473667`*^9, 3.5709747617933817`*^9}, { 3.5709749537361183`*^9, 3.570975034747061*^9}, {3.5709751055243855`*^9, 3.5709751213584127`*^9}, {3.5709751694532976`*^9, 3.570975200060551*^9}, { 3.571073358435503*^9, 3.5710734289632273`*^9}, {3.571204792969243*^9, 3.571204820940092*^9}, {3.5712048565705547`*^9, 3.571204860002561*^9}, 3.571204896881026*^9, {3.571204943556308*^9, 3.571204987485985*^9}, 3.5712053579722357`*^9, 3.5712054148187356`*^9, 3.5712055260469313`*^9, { 3.571205631237916*^9, 3.5712056608311677`*^9}, {3.571206377683627*^9, 3.5712064172296963`*^9}, {3.571206525727887*^9, 3.571206547427525*^9}, { 3.5712066764397516`*^9, 3.5712067106974115`*^9}, {3.571206757949895*^9, 3.5712067585114956`*^9}, {3.5712073458681273`*^9, 3.571207357053347*^9}, { 3.5712075532392917`*^9, 3.5712076608170805`*^9}, {3.571208007434089*^9, 3.571208247690111*^9}, {3.571208301057805*^9, 3.5712083308850574`*^9}, { 3.571208811958702*^9, 3.571208871488407*^9}, {3.5712089993618317`*^9, 3.5712089996582317`*^9}, {3.5712091105588264`*^9, 3.571209160744115*^9}, { 3.5712092989135575`*^9, 3.5712093003643603`*^9}, {3.571209369940482*^9, 3.5712093926073227`*^9}, {3.5712094586578383`*^9, 3.5712094836958823`*^9}, {3.5712104228175316`*^9, 3.571210434267952*^9}, 3.571210475358424*^9, 3.5712108629099045`*^9, {3.571210903969177*^9, 3.5712109929361334`*^9}, {3.5712110295961976`*^9, 3.5712110392214146`*^9}, {3.571211240071767*^9, 3.5712112940946617`*^9}, { 3.571211404496056*^9, 3.5712114190976815`*^9}, {3.5712115264882703`*^9, 3.5712115363942876`*^9}, {3.571211575924757*^9, 3.5712116183724318`*^9}, { 3.5712116597281046`*^9, 3.571211695062166*^9}, {3.5712117551222715`*^9, 3.5712117807531166`*^9}, {3.571211826835598*^9, 3.5712118443232284`*^9}, { 3.571211962540236*^9, 3.5712119670174437`*^9}, 3.5712123580321307`*^9, { 3.5712123994658036`*^9, 3.571212411181424*^9}, {3.5712172605092583`*^9, 3.571217297153723*^9}, {3.571223622762637*^9, 3.57122364145147*^9}, { 3.5712237454256525`*^9, 3.571223750745262*^9}, {3.571223964808838*^9, 3.571224009097316*^9}, {3.57122674689975*^9, 3.5712267784742055`*^9}, { 3.5712269848157682`*^9, 3.57122698582977*^9}, {3.5712270624259043`*^9, 3.5712270629563055`*^9}, {3.571227212438168*^9, 3.571227212999769*^9}, { 3.571227409778515*^9, 3.5712274489969835`*^9}, {3.571227502177477*^9, 3.571227514127098*^9}, {3.57122758356282*^9, 3.5712276390521173`*^9}, 3.5712276745889797`*^9, {3.571227712746647*^9, 3.5712277584703274`*^9}, { 3.5712349496076813`*^9, 3.571234988008148*^9}, {3.5712351855668955`*^9, 3.5712353359043593`*^9}, {3.5712355859883986`*^9, 3.571235653661318*^9}, { 3.5712356890109797`*^9, 3.571235702208603*^9}, {3.5712449764989214`*^9, 3.5712449799309273`*^9}, {3.5712450401778336`*^9, 3.571245051456653*^9}, { 3.5712450868687153`*^9, 3.5712450934831266`*^9}, {3.571299135517318*^9, 3.571299166342972*^9}, {3.5713069890574045`*^9, 3.5713071726697273`*^9}, { 3.571307301791154*^9, 3.571307304536759*^9}, {3.571307397731323*^9, 3.571307405702937*^9}, {3.571311846659932*^9, 3.5713118507939396`*^9}, { 3.571317129094411*^9, 3.5713171472216425`*^9}, {3.5713172653138494`*^9, 3.5713172753602676`*^9}, {3.5713216932693615`*^9, 3.5713216983081703`*^9}, {3.5713370477995405`*^9, 3.5713370593279605`*^9}, {3.571404339740199*^9, 3.5714046172178864`*^9}, { 3.571404755449729*^9, 3.571404853246301*^9}, {3.571405069743481*^9, 3.571405208989326*^9}, {3.571405268612631*^9, 3.571405277442246*^9}, { 3.5714053796536255`*^9, 3.5714054114932814`*^9}, {3.571405595448805*^9, 3.5714056194884467`*^9}, {3.5714056687221336`*^9, 3.571405677660949*^9}, 3.5714067334520035`*^9, {3.57140676532286*^9, 3.5714067706580687`*^9}, { 3.571406950729185*^9, 3.571406989495253*^9}, {3.5714071848855963`*^9, 3.571407190579606*^9}, 3.5714072350240846`*^9, {3.571412503236558*^9, 3.5714125080413666`*^9}, {3.571412540879424*^9, 3.571412607787942*^9}, { 3.571412668378448*^9, 3.5714128101202965`*^9}, {3.5714128643147917`*^9, 3.571412873862009*^9}, {3.571412908150869*^9, 3.57141290869687*^9}, { 3.571413012374652*^9, 3.5714130213290677`*^9}, {3.571413054603926*^9, 3.5714130713583555`*^9}, 3.5714133323156137`*^9, {3.571730171730853*^9, 3.571730182494872*^9}, {3.5717303501171665`*^9, 3.5717303600855846`*^9}, { 3.5717305482375145`*^9, 3.5717305527147226`*^9}, {3.571760865342704*^9, 3.5717608700695124`*^9}, {3.57176111957635*^9, 3.5717611228835564`*^9}, 3.571761174316847*^9, {3.5717620076459103`*^9, 3.571762008441512*^9}, { 3.571765525077688*^9, 3.571765573718574*^9}, {3.572601603410675*^9, 3.572601639665139*^9}, {3.57260238631365*^9, 3.5726023989340725`*^9}, 3.5726046985809116`*^9, {3.5726052623971024`*^9, 3.572605269729115*^9}, { 3.572606450370389*^9, 3.5726064833176465`*^9}, {3.5726065169513054`*^9, 3.572606523955718*^9}, {3.5726066452459307`*^9, 3.572606662468361*^9}, { 3.5726068118542233`*^9, 3.5726068309330573`*^9}, {3.5726082044218693`*^9, 3.5726082108178806`*^9}, {3.5726129520308228`*^9, 3.5726129692220526`*^9}, {3.5726130228861475`*^9, 3.5726130532750006`*^9}, {3.572624083881504*^9, 3.572624093631521*^9}, { 3.5726247901883445`*^9, 3.572624801233164*^9}, {3.5726249931759005`*^9, 3.572625014937939*^9}, {3.572626882386019*^9, 3.5726268865668263`*^9}, { 3.5726673740642943`*^9, 3.572667386154316*^9}, {3.572707186162225*^9, 3.5727071892978306`*^9}, {3.5727073766385593`*^9, 3.5727073777617617`*^9}, 3.5727091442464643`*^9, 3.572709305488347*^9, {3.5727105300904984`*^9, 3.5727105312605004`*^9}, 3.5727107350904584`*^9, 3.5727108467086544`*^9, 3.572710916331577*^9, {3.5728420867264705`*^9, 3.5728421164913225`*^9}, { 3.572850453192765*^9, 3.5728504884332275`*^9}, {3.5731485879383316`*^9, 3.5731485959879456`*^9}, {3.5731825263710723`*^9, 3.573182535403488*^9}, { 3.5733139065045433`*^9, 3.5733140549856043`*^9}, 3.574655628725462*^9, 3.574657123722888*^9, {3.5746628507577467`*^9, 3.574662854080552*^9}, { 3.5747411461662536`*^9, 3.5747411501130605`*^9}, {3.5747732863761578`*^9, 3.5747733212266192`*^9}, {3.574777246966323*^9, 3.5747777516272087`*^9}, { 3.574778090990205*^9, 3.5747782123584185`*^9}, {3.5747782626217065`*^9, 3.5747782672393146`*^9}, {3.57477829882937*^9, 3.57477835005986*^9}, { 3.5747784095115643`*^9, 3.5747784447520266`*^9}, {3.5747785201625586`*^9, 3.574778535122985*^9}, {3.5747785781478605`*^9, 3.574778578319461*^9}, { 3.5747786106427174`*^9, 3.574778688830055*^9}, {3.5747787248193183`*^9, 3.5747787708393993`*^9}, 3.574778803895857*^9, {3.5747790916071625`*^9, 3.5747790975975733`*^9}, {3.574779153835672*^9, 3.574779165457692*^9}, { 3.5747792016185555`*^9, 3.574779212008174*^9}, {3.5747792458290334`*^9, 3.5747792599314585`*^9}, {3.5747792935339174`*^9, 3.574779301552331*^9}, { 3.574779474915436*^9, 3.574779529047531*^9}, {3.5747795770176153`*^9, 3.574779592914043*^9}, {3.5747796386065235`*^9, 3.574779641742129*^9}, { 3.574779726762278*^9, 3.57477972782308*^9}, 3.5747798402368774`*^9, { 3.5747800908513174`*^9, 3.5747801971811047`*^9}, {3.5747802368675737`*^9, 3.5747802741828394`*^9}, {3.574780331856141*^9, 3.574780343462561*^9}, { 3.574780380434626*^9, 3.5747803867058372`*^9}, {3.5747804240679026`*^9, 3.574780436781925*^9}, {3.574780765302902*^9, 3.574780854581859*^9}, { 3.574785122296955*^9, 3.574785156398615*^9}, {3.574950232276594*^9, 3.574950236582202*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"19", ",", "3", ",", "4", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "6", ",", "2", ",", "20"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5765572966249104`*^9, 3.576557531998124*^9, 3.5802184128961763`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"17", ",", "1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "4", ",", "9", ",", "28"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "6", ",", "35"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5765572966249104`*^9, 3.576557531998124*^9, 3.5802184128961763`*^9}], Cell[BoxData["2"], "Output", CellChangeTimes->{3.5765572966249104`*^9, 3.576557531998124*^9, 3.5802184128961763`*^9}], Cell[BoxData["3"], "Output", CellChangeTimes->{3.5765572966249104`*^9, 3.576557531998124*^9, 3.5802184128961763`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{ "c", ",", "v", ",", "p", ",", "Q", ",", "P", ",", "v1", ",", "v2", ",", "nk", ",", "nl", ",", "i"}], "]"}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"rpo", "=", RowBox[{"{", RowBox[{ "1.2961", ",", "1.0875", ",", "1.0875", ",", "1.2961", ",", "1.0875", ",", "1.2961", ",", "1.2961", ",", "1.2961", ",", "1.2961", ",", "1.2961", ",", "1.2961", ",", "1.2961", ",", "1.2465"}], "}"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"from", " ", RowBox[{"formamide3d", ".", "nb"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"rpi", "=", "rpo"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"P", "=", "3"}], ";", " ", RowBox[{"c", "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], ";"}], " "}]}], "Input", CellChangeTimes->{{3.568108824079547*^9, 3.568109012824279*^9}, { 3.568109558076436*^9, 3.568109588168889*^9}, {3.5681097523435774`*^9, 3.5681097637783976`*^9}, {3.5681100381828794`*^9, 3.5681101616726966`*^9}, {3.5681102015307665`*^9, 3.5681102288464146`*^9}, {3.568110263743676*^9, 3.568110267331682*^9}, { 3.5681103163469687`*^9, 3.5681103268925867`*^9}, {3.5681106443375444`*^9, 3.5681106916368275`*^9}, 3.568110873002746*^9, {3.5681109388660617`*^9, 3.5681110268970165`*^9}, {3.568111092526332*^9, 3.568111123461186*^9}, { 3.5681111884196997`*^9, 3.568111192756508*^9}, {3.5681112268113675`*^9, 3.568111366213212*^9}, {3.568111434946933*^9, 3.568111463354583*^9}, { 3.568111544396725*^9, 3.568111547625931*^9}, {3.5681116856081734`*^9, 3.5681117131422215`*^9}, {3.568111864696488*^9, 3.5681119835998964`*^9}, 3.5681120218355637`*^9, {3.56811206543764*^9, 3.568112066389242*^9}, { 3.568112332369709*^9, 3.5681123404505234`*^9}, {3.568112505935614*^9, 3.56811251481203*^9}, {3.5681125623609133`*^9, 3.568112569006525*^9}, { 3.568112648067464*^9, 3.568112734210815*^9}, {3.568112764443668*^9, 3.5681127697320776`*^9}, {3.5681128018681335`*^9, 3.568112843426607*^9}, { 3.568112884641879*^9, 3.5681128887602863`*^9}, {3.5681129663080225`*^9, 3.5681129699584293`*^9}, {3.568113133789917*^9, 3.568113227936082*^9}, { 3.5681132946885996`*^9, 3.5681133044698167`*^9}, {3.568113502200164*^9, 3.568113507348173*^9}, 3.56811354556824*^9, {3.5681222886191964`*^9, 3.5681222896019983`*^9}, {3.568207424138049*^9, 3.5682074415164795`*^9}, 3.568277923134914*^9, 3.568883508322016*^9, 3.568883588350157*^9, 3.5688836441982546`*^9, {3.5703421313965206`*^9, 3.5703421386505337`*^9}, { 3.570342288098796*^9, 3.5703424924279547`*^9}, 3.5709745658726373`*^9, 3.5709746291463485`*^9, {3.5709747534473667`*^9, 3.5709747617933817`*^9}, { 3.5709749537361183`*^9, 3.570975034747061*^9}, {3.5709751055243855`*^9, 3.5709751213584127`*^9}, {3.5709751694532976`*^9, 3.570975200060551*^9}, { 3.571073358435503*^9, 3.5710734289632273`*^9}, {3.571204792969243*^9, 3.571204820940092*^9}, {3.5712048565705547`*^9, 3.571204860002561*^9}, 3.571204896881026*^9, {3.571204943556308*^9, 3.571204987485985*^9}, 3.5712053579722357`*^9, 3.5712054148187356`*^9, 3.5712055260469313`*^9, { 3.571205631237916*^9, 3.5712056608311677`*^9}, {3.571206377683627*^9, 3.5712064172296963`*^9}, {3.571206525727887*^9, 3.571206547427525*^9}, { 3.5712066764397516`*^9, 3.5712067106974115`*^9}, {3.571206757949895*^9, 3.5712067585114956`*^9}, {3.5712073458681273`*^9, 3.571207357053347*^9}, { 3.5712075532392917`*^9, 3.5712076608170805`*^9}, {3.571208007434089*^9, 3.571208247690111*^9}, {3.571208301057805*^9, 3.5712083308850574`*^9}, { 3.571208811958702*^9, 3.571208871488407*^9}, {3.5712089993618317`*^9, 3.5712089996582317`*^9}, {3.5712091105588264`*^9, 3.571209160744115*^9}, { 3.5712092989135575`*^9, 3.5712093003643603`*^9}, {3.571209369940482*^9, 3.5712093926073227`*^9}, {3.5712094586578383`*^9, 3.5712094836958823`*^9}, {3.5712104228175316`*^9, 3.571210434267952*^9}, 3.571210475358424*^9, 3.5712108629099045`*^9, {3.571210903969177*^9, 3.5712109929361334`*^9}, {3.5712110295961976`*^9, 3.5712110392214146`*^9}, {3.571211240071767*^9, 3.5712112940946617`*^9}, { 3.571211404496056*^9, 3.5712114190976815`*^9}, {3.5712115264882703`*^9, 3.5712115363942876`*^9}, {3.571211575924757*^9, 3.5712116183724318`*^9}, { 3.5712116597281046`*^9, 3.571211695062166*^9}, {3.5712117551222715`*^9, 3.5712117807531166`*^9}, {3.571211826835598*^9, 3.5712118443232284`*^9}, { 3.571211962540236*^9, 3.5712119670174437`*^9}, 3.5712123580321307`*^9, { 3.5712123994658036`*^9, 3.571212411181424*^9}, {3.5712172605092583`*^9, 3.571217297153723*^9}, {3.571223622762637*^9, 3.57122364145147*^9}, { 3.5712237454256525`*^9, 3.571223750745262*^9}, {3.571223964808838*^9, 3.571224009097316*^9}, {3.57122674689975*^9, 3.5712267784742055`*^9}, { 3.5712269848157682`*^9, 3.57122698582977*^9}, {3.5712270624259043`*^9, 3.5712270629563055`*^9}, {3.571227212438168*^9, 3.571227212999769*^9}, { 3.571227409778515*^9, 3.5712274489969835`*^9}, {3.571227502177477*^9, 3.571227514127098*^9}, {3.57122758356282*^9, 3.5712276390521173`*^9}, 3.5712276745889797`*^9, {3.571227712746647*^9, 3.5712277584703274`*^9}, { 3.5712349496076813`*^9, 3.571234988008148*^9}, {3.5712351855668955`*^9, 3.5712353359043593`*^9}, {3.5712355859883986`*^9, 3.571235653661318*^9}, { 3.5712356890109797`*^9, 3.571235702208603*^9}, {3.5712449764989214`*^9, 3.5712449799309273`*^9}, {3.5712450401778336`*^9, 3.571245051456653*^9}, { 3.5712450868687153`*^9, 3.5712450934831266`*^9}, {3.571299135517318*^9, 3.571299166342972*^9}, {3.5713069890574045`*^9, 3.5713071726697273`*^9}, { 3.571307301791154*^9, 3.571307304536759*^9}, {3.571307397731323*^9, 3.571307405702937*^9}, {3.571311846659932*^9, 3.5713118507939396`*^9}, { 3.571317129094411*^9, 3.5713171472216425`*^9}, {3.5713172653138494`*^9, 3.5713172753602676`*^9}, {3.5713216932693615`*^9, 3.5713216983081703`*^9}, {3.5713370477995405`*^9, 3.5713370593279605`*^9}, {3.571404339740199*^9, 3.5714046172178864`*^9}, { 3.571404755449729*^9, 3.571404853246301*^9}, {3.571405069743481*^9, 3.571405208989326*^9}, {3.571405268612631*^9, 3.571405277442246*^9}, { 3.5714053796536255`*^9, 3.5714054114932814`*^9}, {3.571405595448805*^9, 3.5714056194884467`*^9}, {3.5714056687221336`*^9, 3.571405677660949*^9}, 3.5714067334520035`*^9, {3.57140676532286*^9, 3.5714067706580687`*^9}, { 3.571406950729185*^9, 3.571406989495253*^9}, {3.5714071848855963`*^9, 3.571407190579606*^9}, 3.5714072350240846`*^9, {3.571412503236558*^9, 3.5714125080413666`*^9}, {3.571412540879424*^9, 3.571412607787942*^9}, { 3.571412668378448*^9, 3.5714128101202965`*^9}, {3.5714128643147917`*^9, 3.571412873862009*^9}, {3.571412908150869*^9, 3.57141290869687*^9}, { 3.571413012374652*^9, 3.5714130213290677`*^9}, {3.571413054603926*^9, 3.5714130713583555`*^9}, 3.5714133323156137`*^9, {3.571730171730853*^9, 3.571730182494872*^9}, {3.5717303501171665`*^9, 3.5717303600855846`*^9}, { 3.5717305482375145`*^9, 3.5717305527147226`*^9}, {3.571760865342704*^9, 3.5717608700695124`*^9}, {3.57176111957635*^9, 3.5717611228835564`*^9}, 3.571761174316847*^9, {3.5717620076459103`*^9, 3.571762008441512*^9}, { 3.571765525077688*^9, 3.571765573718574*^9}, {3.572601603410675*^9, 3.572601639665139*^9}, {3.57260238631365*^9, 3.5726023989340725`*^9}, 3.5726046985809116`*^9, {3.5726052623971024`*^9, 3.572605269729115*^9}, { 3.572606450370389*^9, 3.5726064833176465`*^9}, {3.5726065169513054`*^9, 3.572606523955718*^9}, {3.5726066452459307`*^9, 3.572606662468361*^9}, { 3.5726068118542233`*^9, 3.5726068309330573`*^9}, {3.5726082044218693`*^9, 3.5726082108178806`*^9}, {3.5726129520308228`*^9, 3.5726129692220526`*^9}, {3.5726130228861475`*^9, 3.5726130532750006`*^9}, {3.572624083881504*^9, 3.572624093631521*^9}, { 3.5726247901883445`*^9, 3.572624801233164*^9}, {3.5726249931759005`*^9, 3.572625014937939*^9}, {3.572626882386019*^9, 3.5726268865668263`*^9}, { 3.5726673740642943`*^9, 3.572667386154316*^9}, {3.572707186162225*^9, 3.5727071892978306`*^9}, {3.5727073766385593`*^9, 3.5727073777617617`*^9}, 3.5727091442464643`*^9, 3.572709305488347*^9, {3.5727105300904984`*^9, 3.5727105312605004`*^9}, 3.5727107350904584`*^9, 3.5727108467086544`*^9, 3.572710916331577*^9, {3.5728420867264705`*^9, 3.5728421164913225`*^9}, { 3.572850453192765*^9, 3.5728504884332275`*^9}, {3.5731485879383316`*^9, 3.5731485959879456`*^9}, {3.5731825263710723`*^9, 3.573182535403488*^9}, { 3.5733139065045433`*^9, 3.5733140549856043`*^9}, 3.574655628725462*^9, 3.574657123722888*^9, {3.5746628507577467`*^9, 3.574662854080552*^9}, { 3.5747411461662536`*^9, 3.5747411501130605`*^9}, {3.5747732863761578`*^9, 3.5747733212266192`*^9}, {3.574777246966323*^9, 3.574777607030555*^9}, { 3.5747831833383493`*^9, 3.5747831840715504`*^9}, {3.5747851902662745`*^9, 3.574785199875891*^9}, 3.5748282451644087`*^9, {3.5748534446735983`*^9, 3.5748534455472*^9}, {3.575721474665098*^9, 3.5757215077995567`*^9}, { 3.575721778631632*^9, 3.575721826414516*^9}, {3.576294041353676*^9, 3.576294052289295*^9}, 3.5763392154557486`*^9, {3.576422866158929*^9, 3.5764228698405356`*^9}, {3.5764229002293887`*^9, 3.576422914331814*^9}, { 3.5764763551552525`*^9, 3.576476409412148*^9}, {3.5764764900798893`*^9, 3.5764764951498985`*^9}, {3.5765131351810226`*^9, 3.5765131724494886`*^9}, {3.5765143816544123`*^9, 3.5765143880972233`*^9}}], Cell["\<\ (*--------------------------------------------------------------------------*) (* next: \[Pi]-clouds for C=C and C=O, half occ each above and below *)\ \>", "Text", CellChangeTimes->{{3.568108824079547*^9, 3.568109012824279*^9}, { 3.568109558076436*^9, 3.568109588168889*^9}, {3.5681097523435774`*^9, 3.5681097637783976`*^9}, {3.5681100381828794`*^9, 3.5681101616726966`*^9}, {3.5681102015307665`*^9, 3.5681102288464146`*^9}, {3.568110263743676*^9, 3.568110267331682*^9}, { 3.5681103163469687`*^9, 3.5681103268925867`*^9}, {3.5681106443375444`*^9, 3.5681106916368275`*^9}, 3.568110873002746*^9, {3.5681109388660617`*^9, 3.5681110268970165`*^9}, {3.568111092526332*^9, 3.568111123461186*^9}, { 3.5681111884196997`*^9, 3.568111192756508*^9}, {3.5681112268113675`*^9, 3.568111366213212*^9}, {3.568111434946933*^9, 3.568111463354583*^9}, { 3.568111544396725*^9, 3.568111547625931*^9}, {3.5681116856081734`*^9, 3.5681117131422215`*^9}, {3.568111864696488*^9, 3.5681119835998964`*^9}, 3.5681120218355637`*^9, {3.56811206543764*^9, 3.568112066389242*^9}, { 3.568112332369709*^9, 3.5681123404505234`*^9}, {3.568112505935614*^9, 3.56811251481203*^9}, {3.5681125623609133`*^9, 3.568112569006525*^9}, { 3.568112648067464*^9, 3.568112734210815*^9}, {3.568112764443668*^9, 3.5681127697320776`*^9}, {3.5681128018681335`*^9, 3.568112843426607*^9}, { 3.568112884641879*^9, 3.5681128887602863`*^9}, {3.5681129663080225`*^9, 3.5681129699584293`*^9}, {3.568113133789917*^9, 3.568113227936082*^9}, { 3.5681132946885996`*^9, 3.5681133044698167`*^9}, {3.568113502200164*^9, 3.568113507348173*^9}, 3.56811354556824*^9, {3.5681222886191964`*^9, 3.5681222896019983`*^9}, {3.568207424138049*^9, 3.5682074415164795`*^9}, 3.568277923134914*^9, 3.568883508322016*^9, 3.568883588350157*^9, 3.5688836441982546`*^9, {3.5703421313965206`*^9, 3.5703421386505337`*^9}, { 3.570342288098796*^9, 3.5703424924279547`*^9}, 3.5709745658726373`*^9, 3.5709746291463485`*^9, {3.5709747534473667`*^9, 3.5709747617933817`*^9}, { 3.5709749537361183`*^9, 3.570975034747061*^9}, {3.5709751055243855`*^9, 3.5709751213584127`*^9}, {3.5709751694532976`*^9, 3.570975200060551*^9}, { 3.571073358435503*^9, 3.5710734289632273`*^9}, {3.571204792969243*^9, 3.571204820940092*^9}, {3.5712048565705547`*^9, 3.571204860002561*^9}, 3.571204896881026*^9, {3.571204943556308*^9, 3.571204987485985*^9}, 3.5712053579722357`*^9, 3.5712054148187356`*^9, 3.5712055260469313`*^9, { 3.571205631237916*^9, 3.5712056608311677`*^9}, {3.571206377683627*^9, 3.5712064172296963`*^9}, {3.571206525727887*^9, 3.571206547427525*^9}, { 3.5712066764397516`*^9, 3.5712067106974115`*^9}, {3.571206757949895*^9, 3.5712067585114956`*^9}, {3.5712073458681273`*^9, 3.571207357053347*^9}, { 3.5712075532392917`*^9, 3.5712076608170805`*^9}, {3.571208007434089*^9, 3.571208247690111*^9}, {3.571208301057805*^9, 3.5712083308850574`*^9}, { 3.571208811958702*^9, 3.571208871488407*^9}, {3.5712089993618317`*^9, 3.5712089996582317`*^9}, {3.5712091105588264`*^9, 3.571209160744115*^9}, { 3.5712092989135575`*^9, 3.5712093003643603`*^9}, {3.571209369940482*^9, 3.5712093926073227`*^9}, {3.5712094586578383`*^9, 3.5712094836958823`*^9}, {3.5712104228175316`*^9, 3.571210434267952*^9}, 3.571210475358424*^9, 3.5712108629099045`*^9, {3.571210903969177*^9, 3.5712109929361334`*^9}, {3.5712110295961976`*^9, 3.5712110392214146`*^9}, {3.571211240071767*^9, 3.5712112940946617`*^9}, { 3.571211404496056*^9, 3.5712114190976815`*^9}, {3.5712115264882703`*^9, 3.5712115363942876`*^9}, {3.571211575924757*^9, 3.5712116183724318`*^9}, { 3.5712116597281046`*^9, 3.571211695062166*^9}, {3.5712117551222715`*^9, 3.5712117807531166`*^9}, {3.571211826835598*^9, 3.5712118443232284`*^9}, { 3.571211962540236*^9, 3.5712119670174437`*^9}, 3.5712123580321307`*^9, { 3.5712123994658036`*^9, 3.571212411181424*^9}, {3.5712172605092583`*^9, 3.571217297153723*^9}, {3.571223622762637*^9, 3.57122364145147*^9}, { 3.5712237454256525`*^9, 3.571223750745262*^9}, {3.571223964808838*^9, 3.571224009097316*^9}, {3.57122674689975*^9, 3.5712267784742055`*^9}, { 3.5712269848157682`*^9, 3.57122698582977*^9}, {3.5712270624259043`*^9, 3.5712270629563055`*^9}, {3.571227212438168*^9, 3.571227212999769*^9}, { 3.571227409778515*^9, 3.5712274489969835`*^9}, {3.571227502177477*^9, 3.571227514127098*^9}, {3.57122758356282*^9, 3.5712276390521173`*^9}, 3.5712276745889797`*^9, {3.571227712746647*^9, 3.5712277584703274`*^9}, { 3.5712349496076813`*^9, 3.571234988008148*^9}, {3.5712351855668955`*^9, 3.5712353359043593`*^9}, {3.5712355859883986`*^9, 3.571235653661318*^9}, { 3.5712356890109797`*^9, 3.571235702208603*^9}, {3.5712449764989214`*^9, 3.5712449799309273`*^9}, {3.5712450401778336`*^9, 3.571245051456653*^9}, { 3.5712450868687153`*^9, 3.5712450934831266`*^9}, {3.571299135517318*^9, 3.571299166342972*^9}, {3.5713069890574045`*^9, 3.5713071726697273`*^9}, { 3.571307301791154*^9, 3.571307304536759*^9}, {3.571307397731323*^9, 3.571307405702937*^9}, {3.571311846659932*^9, 3.5713118507939396`*^9}, { 3.571317129094411*^9, 3.5713171472216425`*^9}, {3.5713172653138494`*^9, 3.5713172753602676`*^9}, {3.5713216932693615`*^9, 3.5713216983081703`*^9}, {3.5713370477995405`*^9, 3.5713370593279605`*^9}, {3.571404339740199*^9, 3.5714046172178864`*^9}, { 3.571404755449729*^9, 3.571404853246301*^9}, {3.571405069743481*^9, 3.571405208989326*^9}, {3.571405268612631*^9, 3.571405277442246*^9}, { 3.5714053796536255`*^9, 3.5714054114932814`*^9}, {3.571405595448805*^9, 3.5714056194884467`*^9}, {3.5714056687221336`*^9, 3.571405677660949*^9}, 3.5714067334520035`*^9, {3.57140676532286*^9, 3.5714067706580687`*^9}, { 3.571406950729185*^9, 3.571406989495253*^9}, {3.5714071848855963`*^9, 3.571407190579606*^9}, 3.5714072350240846`*^9, {3.571412503236558*^9, 3.5714125080413666`*^9}, {3.571412540879424*^9, 3.571412607787942*^9}, { 3.571412668378448*^9, 3.5714128101202965`*^9}, {3.5714128643147917`*^9, 3.571412873862009*^9}, {3.571412908150869*^9, 3.57141290869687*^9}, { 3.571413012374652*^9, 3.5714130213290677`*^9}, {3.571413054603926*^9, 3.5714130713583555`*^9}, 3.5714133323156137`*^9, {3.571730171730853*^9, 3.571730182494872*^9}, {3.5717303501171665`*^9, 3.5717303600855846`*^9}, { 3.5717305482375145`*^9, 3.5717305527147226`*^9}, {3.571760865342704*^9, 3.5717608700695124`*^9}, {3.57176111957635*^9, 3.5717611228835564`*^9}, 3.571761174316847*^9, {3.5717620076459103`*^9, 3.571762008441512*^9}, { 3.571765525077688*^9, 3.571765573718574*^9}, {3.572601603410675*^9, 3.572601639665139*^9}, {3.57260238631365*^9, 3.5726023989340725`*^9}, 3.5726046985809116`*^9, {3.5726052623971024`*^9, 3.572605269729115*^9}, { 3.572606450370389*^9, 3.5726064833176465`*^9}, {3.5726065169513054`*^9, 3.572606523955718*^9}, {3.5726066452459307`*^9, 3.572606662468361*^9}, { 3.5726068118542233`*^9, 3.5726068309330573`*^9}, {3.5726082044218693`*^9, 3.5726082108178806`*^9}, {3.5726129520308228`*^9, 3.5726129692220526`*^9}, {3.5726130228861475`*^9, 3.5726130532750006`*^9}, {3.572624083881504*^9, 3.572624093631521*^9}, { 3.5726247901883445`*^9, 3.572624801233164*^9}, {3.5726249931759005`*^9, 3.572625014937939*^9}, {3.572626882386019*^9, 3.5726268865668263`*^9}, { 3.5726673740642943`*^9, 3.572667386154316*^9}, {3.572707186162225*^9, 3.5727071892978306`*^9}, {3.5727073766385593`*^9, 3.5727073777617617`*^9}, 3.5727091442464643`*^9, 3.572709305488347*^9, {3.5727105300904984`*^9, 3.5727105312605004`*^9}, 3.5727107350904584`*^9, 3.5727108467086544`*^9, 3.572710916331577*^9, {3.5728420867264705`*^9, 3.5728421164913225`*^9}, { 3.572850453192765*^9, 3.5728504884332275`*^9}, {3.5731485879383316`*^9, 3.5731485959879456`*^9}, {3.5731825263710723`*^9, 3.573182535403488*^9}, { 3.5733139065045433`*^9, 3.5733140549856043`*^9}, {3.574655628725462*^9, 3.5746556677099304`*^9}, {3.574782364321311*^9, 3.574782366817315*^9}, { 3.5747823996553726`*^9, 3.5747824011997757`*^9}, {3.574851478943345*^9, 3.574851501984586*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"connc", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"conn", "[", RowBox[{"[", RowBox[{"conj", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", "3"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nj"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"Drop", "[", RowBox[{ RowBox[{"coco", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "oj"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"Drop", "[", RowBox[{ RowBox[{"coco", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "oj"}], "}"}]}], "]"}]}], "]"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"connc", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"9", ",", "10", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "6", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "4", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "2", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "2", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "12", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "11", ",", "14"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "11", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"14", ",", "12", ",", "16"}], "}"}], ",", RowBox[{"{", RowBox[{"15", ",", "13", ",", "16"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "14", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "9", ",", "4"}], "}"}]}], "}"}]}], "\[IndentingNewLine]", RowBox[{"cj", "=", RowBox[{"Length", "[", "connc", "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpo", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", "cj", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpu", "=", "tpo"}], ";"}]}]}]], "Input", CellChangeTimes->{{3.574782409030989*^9, 3.5747824335386324`*^9}, { 3.57478246631429*^9, 3.5747824836615205`*^9}, {3.574782729892353*^9, 3.574782734509961*^9}, {3.5747827728236284`*^9, 3.574782822150915*^9}, { 3.574782939494321*^9, 3.574782974048382*^9}, {3.5747830324548845`*^9, 3.574783065448942*^9}, {3.574783361818263*^9, 3.5747833666074715`*^9}, { 3.574783407073942*^9, 3.574783441097602*^9}, {3.574783484762079*^9, 3.5747834849804792`*^9}, 3.574783557801407*^9, {3.5747836107946997`*^9, 3.5747836636631927`*^9}, {3.574783719464491*^9, 3.574783731414112*^9}, { 3.574783780975399*^9, 3.5747838001946325`*^9}, {3.574783898490405*^9, 3.5747839481764927`*^9}, {3.5747840180958157`*^9, 3.5747840270034313`*^9}, {3.574784153800454*^9, 3.5747841712568846`*^9}, { 3.5747854335799017`*^9, 3.5747854339543023`*^9}, 3.5747867930286894`*^9, { 3.5747868591884055`*^9, 3.574786865865217*^9}, 3.574787046575935*^9, { 3.574787368045699*^9, 3.574787376922115*^9}, 3.5747874778074923`*^9, { 3.5747875111447506`*^9, 3.5747875582880335`*^9}, {3.5747875958996997`*^9, 3.574787678221044*^9}, 3.574787726456329*^9, {3.574787774847614*^9, 3.5747877758148155`*^9}, 3.5747879836695805`*^9, {3.574788032310466*^9, 3.574788047239692*^9}, {3.5747881733035135`*^9, 3.574788204831169*^9}, { 3.574828128133003*^9, 3.5748281291938047`*^9}, {3.57482825168522*^9, 3.574828270452053*^9}, 3.574828314724931*^9, {3.5748306212357817`*^9, 3.574830621703783*^9}, {3.5753559894421577`*^9, 3.575356014137001*^9}, { 3.5753561901365104`*^9, 3.575356206251339*^9}, {3.575375584885363*^9, 3.575375598753787*^9}, {3.5753756763015237`*^9, 3.5753756873931427`*^9}, { 3.575562289422053*^9, 3.575562298189268*^9}, {3.5755628657806654`*^9, 3.5755629193667593`*^9}, {3.575563069579423*^9, 3.5755630812326436`*^9}, 3.5755632175768833`*^9, 3.575563562493489*^9, {3.5755643314188395`*^9, 3.575564336426448*^9}, {3.5755649483375225`*^9, 3.575564954156333*^9}, { 3.5755653205385766`*^9, 3.5755653215213785`*^9}, 3.5762940918509645`*^9, { 3.5762951549460316`*^9, 3.5762951818248787`*^9}, 3.576339112105567*^9, { 3.5764225647507997`*^9, 3.576422689020618*^9}, {3.5764230447168427`*^9, 3.576423123434581*^9}, {3.5764761517776957`*^9, 3.5764763376052217`*^9}, { 3.5765128742705646`*^9, 3.576513007728799*^9}, {3.576514140977189*^9, 3.5765142686790133`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"9", ",", "10", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "6", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "4", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "2", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "2", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "12", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "11", ",", "14"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "11", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"14", ",", "12", ",", "16"}], "}"}], ",", RowBox[{"{", RowBox[{"15", ",", "13", ",", "16"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "14", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "9", ",", "4"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5765572966405106`*^9, 3.5765575320137243`*^9, 3.5802184129117765`*^9}], Cell[BoxData["13"], "Output", CellChangeTimes->{3.5765572966405106`*^9, 3.5765575320137243`*^9, 3.5802184129117765`*^9}] }, Open ]], Cell[BoxData[ RowBox[{"<<", "\"\\""}]], "Input", CellChangeTimes->{{3.575816054798004*^9, 3.5758160989148817`*^9}, 3.5758162991256332`*^9, {3.5764225260159316`*^9, 3.5764225408047576`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"{", "i", "}"}], ",", RowBox[{"{", RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "}"}], ",", RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], "]"}], "\[IndentingNewLine]", 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.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, 3.5731486865617046`*^9, {3.5731490505259438`*^9, 3.573149068278775*^9}, { 3.573149110008848*^9, 3.573149243825884*^9}, {3.5731493138232064`*^9, 3.5731493450700617`*^9}, {3.574658310026972*^9, 3.5746585452285843`*^9}, { 3.574659591943223*^9, 3.5746596938582015`*^9}, {3.574664442038542*^9, 3.574664456640167*^9}, {3.5747841177643905`*^9, 3.574784120931196*^9}, { 3.574788295155328*^9, 3.5747883150453625`*^9}, {3.5748281376022196`*^9, 3.5748281378830204`*^9}, {3.5748343592063475`*^9, 3.574834363948756*^9}, { 3.5753654533402643`*^9, 3.575365496287139*^9}, {3.5753657782732344`*^9, 3.575365826196519*^9}, {3.575365998186821*^9, 3.575366010152042*^9}, { 3.5755611386860313`*^9, 3.575561149793251*^9}, {3.575561180306905*^9, 3.5755612310849943`*^9}, {3.575561285248289*^9, 3.575561409393307*^9}, { 3.575561440016161*^9, 3.5755615497935534`*^9}, {3.5755616124120636`*^9, 3.575561635437704*^9}, {3.575561892338955*^9, 3.575561942820644*^9}, { 3.5755620823160887`*^9, 3.5755621030173254`*^9}, 3.57556213981779*^9, { 3.5755625665409393`*^9, 3.575562567820142*^9}, {3.5755634654301186`*^9, 3.575563469205325*^9}, {3.5755638765688405`*^9, 3.575564008295472*^9}, { 3.575564213810233*^9, 3.5755642215946465`*^9}, 3.575564866094178*^9, 3.57556519149515*^9, {3.575816288424014*^9, 3.5758162902024174`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "\<\"C\"\>", "5.0297577989999995`", "1.361188704`", "2.241203097`"}, {"2", "\<\"C\"\>", "8.162200106999999`", "1.119496074`", RowBox[{"-", "1.379537691`"}]}, {"3", "\<\"C\"\>", "3.821956044`", "3.532265034`", RowBox[{"-", "1.0332879599999998`"}]}, {"4", "\<\"C\"\>", "2.591591271`", "2.879978388`", "1.505316123`"}, {"5", "\<\"C\"\>", "7.583460584999999`", RowBox[{"-", "1.723311915`"}], RowBox[{"-", "0.990977577`"}]}, {"6", "\<\"C\"\>", "10.550138409`", "2.067766431`", RowBox[{"-", "0.123491895`"}]}, {"7", "\<\"C\"\>", "9.923230433999999`", RowBox[{"-", "3.2676314459999998`"}], RowBox[{"-", "0.226782897`"}]}, {"8", "\<\"C\"\>", "6.458408792999999`", RowBox[{"-", "2.8374223439999997`"}], RowBox[{"-", "3.436551729`"}]}, {"9", "\<\"C\"\>", RowBox[{"-", "2.058488004`"}], "2.5511138969999996`", "1.4326949519999999`"}, {"10", "\<\"C\"\>", RowBox[{"-", "4.35065631`"}], "0.86586054`", "1.0382200769999999`"}, {"11", "\<\"C\"\>", RowBox[{"-", "8.823746283`"}], "1.11775755`", "0.516625083`"}, {"12", "\<\"C\"\>", RowBox[{"-", "9.147376305`"}], RowBox[{"-", "1.4973982799999999`"}], "0.225932532`"}, {"13", "\<\"C\"\>", RowBox[{"-", "10.951246131`"}], "2.629801005`", "0.074000652`"}, {"14", "\<\"C\"\>", RowBox[{"-", "11.481212496`"}], RowBox[{"-", "2.5464274409999996`"}], RowBox[{"-", "0.423311697`"}]}, {"15", "\<\"C\"\>", RowBox[{"-", "13.29725199`"}], "1.614824238`", RowBox[{"-", "0.5760183539999999`"}]}, {"16", "\<\"C\"\>", RowBox[{"-", "13.572826940999999`"}], RowBox[{"-", "0.99360426`"}], RowBox[{"-", "0.824135964`"}]}, {"17", "\<\"N\"\>", "5.995356705`", "2.188556055`", RowBox[{"-", "0.173379975`"}]}, {"18", "\<\"N\"\>", "0.296966355`", "1.393823823`", "1.324585215`"}, {"19", "\<\"O\"\>", "3.4165964969999996`", "4.465209924`", RowBox[{"-", "3.063902889`"}]}, {"20", "\<\"O\"\>", "12.483792830999999`", "2.155713069`", RowBox[{"-", "1.735783935`"}]}, {"21", "\<\"O\"\>", "10.819250586`", "2.66428803`", "2.058469107`"}, {"22", "\<\"O\"\>", RowBox[{"-", "2.264899935`"}], "4.790257221`", "1.819554336`"}, {"23", "\<\"O\"\>", RowBox[{"-", "6.592690875`"}], "2.2941524909999997`", "1.078319511`"}, {"24", "\<\"S\"\>", "5.151794625`", RowBox[{"-", "1.994824011`"}], "1.512988305`"}, {"25", "\<\"H\"\>", "6.129317538`", "2.061171378`", "3.8194616399999997`"}, {"26", "\<\"H\"\>", "8.198746905`", "1.661216373`", RowBox[{"-", "3.3552379379999997`"}]}, {"27", "\<\"H\"\>", "2.3924546849999997`", "4.582541397`", "2.629290786`"}, {"28", "\<\"H\"\>", "0.328448757`", RowBox[{"-", "0.488619729`"}], "0.900914475`"}, {"29", "\<\"H\"\>", "11.433138527999999`", RowBox[{"-", "3.102811812`"}], RowBox[{"-", "1.6837415969999998`"}]}, {"30", "\<\"H\"\>", "10.728847338`", RowBox[{"-", "2.628364833`"}], "1.609570872`"}, {"31", "\<\"H\"\>", "9.469626846`", RowBox[{"-", "5.314384413`"}], RowBox[{"-", "0.026474697`"}]}, {"32", "\<\"H\"\>", "4.729994688`", RowBox[{"-", "1.7991833699999997`"}], RowBox[{"-", "4.047227180999999`"}]}, {"33", "\<\"H\"\>", "7.845769842`", RowBox[{"-", "2.731391277`"}], RowBox[{"-", "5.016529898999999`"}]}, {"34", "\<\"H\"\>", "5.936265786`", RowBox[{"-", "4.864598019`"}], RowBox[{"-", "3.2068209`"}]}, {"35", "\<\"H\"\>", "13.777216892999999`", "2.766671976`", RowBox[{"-", "0.5858825879999999`"}]}, {"36", "\<\"H\"\>", RowBox[{"-", "4.177162953`"}], RowBox[{"-", "0.055084755`"}], RowBox[{"-", "0.848645373`"}]}, {"37", "\<\"H\"\>", RowBox[{"-", "4.4255262239999995`"}], RowBox[{"-", "0.5413423589999999`"}], "2.603534175`"}, {"38", "\<\"H\"\>", RowBox[{"-", "7.5618991079999995`"}], RowBox[{"-", "2.815634103`"}], "0.50927415`"}, {"39", "\<\"H\"\>", RowBox[{"-", "10.765677591`"}], "4.698852432`", "0.243242184`"}, {"40", "\<\"H\"\>", RowBox[{"-", "11.674774467`"}], RowBox[{"-", "4.611718365`"}], RowBox[{"-", "0.6270969449999999`"}]}, {"41", "\<\"H\"\>", RowBox[{"-", "14.927590664999999`"}], "2.871984957`", RowBox[{"-", "0.902086089`"}]}, {"42", "\<\"H\"\>", RowBox[{"-", "15.416380467000002`"}], RowBox[{"-", "1.816209567`"}], RowBox[{"-", "1.3421972189999998`"}]} }, 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.5765572966873107`*^9, 3.576557532060524*^9, 3.580218412958577*^9}] }, Open ]], Cell["\<\ (*-------------------------------------------------------------------------*) (* next: O atoms in C=O, two doubly occ LP *)\ \>", "Text", CellChangeTimes->{{3.573213657265206*^9, 3.5732137071540937`*^9}, { 3.57331351711226*^9, 3.5733135247562733`*^9}, 3.5746557964101562`*^9, { 3.5746643799192324`*^9, 3.5746643831328382`*^9}, 3.5746732567499037`*^9, 3.574740785852421*^9, {3.5749559129781585`*^9, 3.574955914444561*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"k", "=", "1"}], ";"}]], "Input", CellChangeTimes->{{3.573211773936298*^9, 3.5732117775243044`*^9}, { 3.573211816539973*^9, 3.573211838910412*^9}, {3.573211886147295*^9, 3.573211954459815*^9}, {3.5732120794628344`*^9, 3.5732121037052774`*^9}, { 3.5732122844003944`*^9, 3.573212301045624*^9}, {3.5732124220394363`*^9, 3.573212444597076*^9}, {3.5732124755943303`*^9, 3.573212478745536*^9}, { 3.5732125394452424`*^9, 3.573212544234451*^9}, {3.5732125998329487`*^9, 3.5732126277257977`*^9}, 3.5732126684106693`*^9, {3.573212699017923*^9, 3.5732129163887043`*^9}, {3.573312183824718*^9, 3.57331218493232*^9}, 3.574657732950758*^9, {3.5746622177086344`*^9, 3.5746622626523137`*^9}, { 3.5746623611664867`*^9, 3.5746624066249666`*^9}, {3.574662510396349*^9, 3.5746625442640085`*^9}, {3.5746628828158026`*^9, 3.5746629097414503`*^9}, 3.574664223185757*^9, {3.5746695839262524`*^9, 3.574669588512661*^9}, { 3.5746696590715847`*^9, 3.574669659258785*^9}, {3.574682369907935*^9, 3.5746823705943365`*^9}, {3.574682413759612*^9, 3.574682423228829*^9}, { 3.574682475629321*^9, 3.57468248066813*^9}, 3.574682520073799*^9, { 3.5747408251956897`*^9, 3.57474083678651*^9}, {3.5747855534349117`*^9, 3.5747855725761456`*^9}, {3.574785769729292*^9, 3.574785777045705*^9}, 3.574786365775139*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Clear", "[", "conn", "]"}], ";"}], "\n", RowBox[{"(*", RowBox[{"conn", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Drop", "[", RowBox[{ RowBox[{"coco", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "oj"}], "}"}]}], "]"}]}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"conn", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "19", ",", "17"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "21", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "22", ",", "18"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"oj", "=", RowBox[{"Length", "[", "conn", "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.573211773936298*^9, 3.5732117775243044`*^9}, { 3.573211816539973*^9, 3.573211838910412*^9}, {3.573211886147295*^9, 3.573211954459815*^9}, {3.5732120794628344`*^9, 3.5732121037052774`*^9}, { 3.5732122844003944`*^9, 3.573212301045624*^9}, {3.5732124220394363`*^9, 3.573212444597076*^9}, {3.5732124755943303`*^9, 3.573212478745536*^9}, { 3.5732125394452424`*^9, 3.573212544234451*^9}, {3.5732125998329487`*^9, 3.5732126277257977`*^9}, 3.5732126684106693`*^9, {3.573212699017923*^9, 3.5732129163887043`*^9}, {3.573312183824718*^9, 3.57331218493232*^9}, 3.574657732950758*^9, {3.5746622177086344`*^9, 3.5746622626523137`*^9}, { 3.5746623611664867`*^9, 3.5746624066249666`*^9}, {3.574662510396349*^9, 3.5746625442640085`*^9}, {3.5746628828158026`*^9, 3.5746629097414503`*^9}, 3.574664223185757*^9, {3.5746695839262524`*^9, 3.574669588512661*^9}, { 3.5746696590715847`*^9, 3.574669659258785*^9}, {3.574682369907935*^9, 3.5746823705943365`*^9}, {3.574682413759612*^9, 3.574682423228829*^9}, { 3.574682475629321*^9, 3.57468248066813*^9}, 3.574682520073799*^9, { 3.5747408251956897`*^9, 3.57474083678651*^9}, {3.5747855534349117`*^9, 3.5747855725761456`*^9}, {3.574785769729292*^9, 3.574785777045705*^9}, { 3.574786365775139*^9, 3.574786374511154*^9}, {3.5753558083414397`*^9, 3.5753558395570946`*^9}, {3.575367002641385*^9, 3.575367023202221*^9}, { 3.5753671931957197`*^9, 3.575367224473775*^9}, {3.575367534103119*^9, 3.575367537769125*^9}, {3.57537552033245*^9, 3.5753755271184616`*^9}, 3.5762941710679035`*^9, {3.57629509713233*^9, 3.576295102124339*^9}, { 3.5763386006742687`*^9, 3.5763386140746927`*^9}, {3.5764232343039756`*^9, 3.576423247579599*^9}, {3.576423531780898*^9, 3.5764236418702917`*^9}, { 3.5764766105589013`*^9, 3.576476644535761*^9}, 3.5764770936293497`*^9, { 3.5765132328995943`*^9, 3.576513276283271*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"rlo", " ", "=", " ", "1.125"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tplo", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", "oj", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tplu", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", "oj", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Okk", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Okl", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"<<", " ", "\"\\"", " ", RowBox[{"(*", RowBox[{"LPOtransformation", ".", "m"}], "*)"}]}]}], "Input", CellChangeTimes->{{3.573211773936298*^9, 3.5732117775243044`*^9}, { 3.573211816539973*^9, 3.573211838910412*^9}, {3.573211886147295*^9, 3.573211954459815*^9}, {3.5732120794628344`*^9, 3.5732121037052774`*^9}, { 3.5732122844003944`*^9, 3.573212301045624*^9}, {3.5732124220394363`*^9, 3.573212444597076*^9}, {3.5732124755943303`*^9, 3.573212478745536*^9}, { 3.5732125394452424`*^9, 3.573212544234451*^9}, {3.5732125998329487`*^9, 3.5732126277257977`*^9}, 3.5732126684106693`*^9, {3.573212699017923*^9, 3.5732129163887043`*^9}, {3.573312183824718*^9, 3.57331218493232*^9}, 3.574657732950758*^9, {3.5746622177086344`*^9, 3.5746622626523137`*^9}, { 3.5746623611664867`*^9, 3.5746624066249666`*^9}, {3.574662510396349*^9, 3.5746625442640085`*^9}, {3.5746628828158026`*^9, 3.5746629097414503`*^9}, 3.574664223185757*^9, {3.5746695839262524`*^9, 3.574669588512661*^9}, { 3.5746696590715847`*^9, 3.574669659258785*^9}, {3.574682369907935*^9, 3.5746823705943365`*^9}, {3.574682413759612*^9, 3.574682423228829*^9}, { 3.574682475629321*^9, 3.57468248066813*^9}, 3.574682520073799*^9, { 3.5747408251956897`*^9, 3.57474083678651*^9}, {3.5747855534349117`*^9, 3.5747855725761456`*^9}, {3.574785769729292*^9, 3.574785777045705*^9}, 3.574786365775139*^9, {3.5753484863633204`*^9, 3.5753485008089457`*^9}, 3.5757146385303354`*^9, {3.575816415969838*^9, 3.575816437934677*^9}, { 3.5762941851547284`*^9, 3.5762941859815297`*^9}, 3.5763386482543526`*^9, { 3.576338932018851*^9, 3.5763389472756777`*^9}, 3.5763389860105457`*^9, { 3.576339036133434*^9, 3.5763390501422586`*^9}, {3.576339313470721*^9, 3.5763393632192087`*^9}, {3.576339401018075*^9, 3.576339405120882*^9}, { 3.57633943825534*^9, 3.5763394406577444`*^9}, {3.576423653024311*^9, 3.576423670355942*^9}, 3.5764239388948135`*^9, {3.5764239883469*^9, 3.5764239920285063`*^9}, {3.5764240465194025`*^9, 3.57642405107461*^9}, 3.5764240849422693`*^9, {3.576476897271805*^9, 3.576476914041834*^9}, 3.576477044816864*^9, {3.576513493030051*^9, 3.576513500346464*^9}, { 3.5765145725363474`*^9, 3.576514592270382*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ Graphics3DBox[{ {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{1.056070694158113, -0.7642562717704067, 0}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{-0.1338236484876723, 1.296712840649559, 0}, 1.125]}, {Opacity[0.5], SphereBox[{-4.906256722316768, 0, 0}, 0.2572]}, {Opacity[0.5], SphereBox[{0, 0, 0}, 0.1786]}, {Opacity[0.5], SphereBox[{-2.9939250932284227`, -3.350327193289203, 0}, 0.22522]}, Text3DBox["4", {-4.906256722316768, 0, 0}, {1, 0}], Text3DBox["19", {0, 0, 0}, {1, 0}], Text3DBox["17", {-2.9939250932284227`, -3.350327193289203, 0}, {1, 0}], TubeBox[{{-4.906256722316768, 0, 0}, {0, 0, 0}}, 0.02], TubeBox[{{-4.906256722316768, 0, 0}, {-2.9939250932284227`, -3.350327193289203, 0}}, 0.02], TubeBox[{{0, 0, 0}, {-2.9939250932284227`, -3.350327193289203, 0}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True], ",", Graphics3DBox[{ {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{1.1331645277625972`, -0.6444463616318816, 0}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{0.008481727716828777, 1.3035724070012138`, 0}, 1.125]}, {Opacity[0.5], SphereBox[{-4.611527965693221, 0, 0}, 0.2572]}, {Opacity[0.5], SphereBox[{0, 0, 0}, 0.1786]}, {Opacity[0.5], SphereBox[{-2.040004432608235, -3.6419894890033375`, 0}, 0.1786]}, Text3DBox["2", {-4.611527965693221, 0, 0}, {1, 0}], Text3DBox["21", {0, 0, 0}, {1, 0}], Text3DBox["20", {-2.040004432608235, -3.6419894890033375`, 0}, {1, 0}], TubeBox[{{-4.611527965693221, 0, 0}, {0, 0, 0}}, 0.02], TubeBox[{{-4.611527965693221, 0, 0}, {-2.040004432608235, -3.6419894890033375`, 0}}, 0.02], TubeBox[{{0, 0, 0}, {-2.040004432608235, -3.6419894890033375`, 0}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True], ",", Graphics3DBox[{ {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{1.152762122403651, -0.6086973378875827, 0}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{0.049240083339846946`, 1.302669710322876, 0}, 1.125]}, {Opacity[0.5], SphereBox[{-4.512399826033154, 0, 0}, 0.2572]}, {Opacity[0.5], SphereBox[{0, 0, 0}, 0.1786]}, {Opacity[0.5], SphereBox[{-1.855389518270618, -3.860238707790391, 0}, 0.22522]}, Text3DBox["10", {-4.512399826033154, 0, 0}, {1, 0}], Text3DBox["22", {0, 0, 0}, {1, 0}], Text3DBox["18", {-1.855389518270618, -3.860238707790391, 0}, {1, 0}], TubeBox[{{-4.512399826033154, 0, 0}, {0, 0, 0}}, 0.02], TubeBox[{{-4.512399826033154, 0, 0}, {-1.855389518270618, -3.860238707790391, 0}}, 0.02], TubeBox[{{0, 0, 0}, {-1.855389518270618, -3.860238707790391, 0}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True]}], "}"}]], "Output", CellChangeTimes->{3.5765572967185106`*^9, 3.5765575323881245`*^9, 3.5802184129897766`*^9}] }, Open ]], Cell["\<\ (*-------------------------------------------------------------------------*) (* next: O or S atoms in C-O-H, C-O-C, C-S-H, C-S-C: two doubly occ LP *)\ \>", "Text", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.57314870088253*^9}, 3.5746558585762653`*^9, {3.574670156150858*^9, 3.5746701578512607`*^9}, {3.5746701931541224`*^9, 3.5746702231061754`*^9}, {3.574670271856261*^9, 3.574670280545476*^9}, { 3.574670327688759*^9, 3.574670328952361*^9}, {3.5746703662988267`*^9, 3.574670379184449*^9}, {3.5746706373025026`*^9, 3.574670676068571*^9}, { 3.574740867627764*^9, 3.574740880248186*^9}, {3.5749502553646355`*^9, 3.574950272103464*^9}, {3.576339630556878*^9, 3.5763396360948877`*^9}, { 3.576515111454894*^9, 3.576515137070139*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", "coch", "]"}], ";"}], "\n", StyleBox[ RowBox[{ RowBox[{"coch", " ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "6", ",", "35"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "10", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "1", ",", "5"}], "}"}]}], "}"}]}], ";"}], "Input"], "\n", RowBox[{"hj", "=", RowBox[{"Length", "[", "coch", "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpso", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", "hj", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tpsu", "=", "tpso"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"rlos", "=", RowBox[{"{", RowBox[{"1.125", ",", "1.125", ",", "1.46"}], "}"}]}], ";"}]}], "Input", CellChangeTimes->{{3.572794697520533*^9, 3.5727947043221455`*^9}, { 3.5727948024151173`*^9, 3.572794803507119*^9}, {3.5727948673580313`*^9, 3.572794869838436*^9}, {3.572795260993526*^9, 3.5727952676703377`*^9}, { 3.5727954366342344`*^9, 3.5727954702834935`*^9}, {3.5727973545484033`*^9, 3.5727973657024226`*^9}, {3.572803225319809*^9, 3.572803264553878*^9}, { 3.57280330550395*^9, 3.5728033127111626`*^9}, 3.5728033508376293`*^9, { 3.572803528365941*^9, 3.5728035301443443`*^9}, {3.572803715051469*^9, 3.572803769604765*^9}, {3.572840261866465*^9, 3.5728402628648667`*^9}, { 3.5728405648813972`*^9, 3.572840578905822*^9}, {3.5728406372187243`*^9, 3.572840716170463*^9}, {3.5728407476825185`*^9, 3.572840785746585*^9}, { 3.5728408298790627`*^9, 3.5728408871311636`*^9}, {3.5728409363336496`*^9, 3.572841070790286*^9}, {3.572841415987692*^9, 3.572841609740032*^9}, 3.5728416910629754`*^9, {3.5728417502806797`*^9, 3.572841879885707*^9}, { 3.572841914564568*^9, 3.5728419300709953`*^9}, {3.572841986199894*^9, 3.572842001659521*^9}, {3.5728426453322515`*^9, 3.5728426487174573`*^9}, { 3.572844776030794*^9, 3.572844786919613*^9}, {3.57284502999924*^9, 3.5728450550060835`*^9}, {3.572845459218394*^9, 3.572845496174859*^9}, { 3.5728455656105804`*^9, 3.572845617574272*^9}, {3.5728456738279705`*^9, 3.572845681440784*^9}, {3.5728457322656736`*^9, 3.572845755291314*^9}, 3.572845978356106*^9, {3.572846145151599*^9, 3.572846189096876*^9}, { 3.572846392926834*^9, 3.5728464086828613`*^9}, 3.572846518881455*^9, 3.5728469699562473`*^9, {3.5728470834620466`*^9, 3.572847089873658*^9}, { 3.572847132180932*^9, 3.5728472650151653`*^9}, 3.5728473515485177`*^9, { 3.572849422046554*^9, 3.572849426554962*^9}, {3.572849678776205*^9, 3.572849686077018*^9}, {3.5728503673146143`*^9, 3.5728503811830387`*^9}, { 3.5728505998798227`*^9, 3.572850604637831*^9}, 3.5730459405924234`*^9, { 3.5731485633994884`*^9, 3.5731485765503116`*^9}, {3.5731486137719765`*^9, 3.57314870088253*^9}, 3.5746558585762653`*^9, {3.574670156150858*^9, 3.5746701578512607`*^9}, {3.5746701931541224`*^9, 3.5746702231061754`*^9}, {3.574670271856261*^9, 3.574670280545476*^9}, { 3.574670327688759*^9, 3.574670328952361*^9}, {3.5746703662988267`*^9, 3.574670446904168*^9}, {3.5746710892508965`*^9, 3.574671127018563*^9}, { 3.574671266124007*^9, 3.574671266124007*^9}, {3.574671949327207*^9, 3.574671952228812*^9}, 3.5746720468897786`*^9, {3.574672142595947*^9, 3.5746721470419545`*^9}, {3.5747408907470045`*^9, 3.574740924458664*^9}, { 3.574741956213276*^9, 3.5747419624688873`*^9}, {3.5748306614370527`*^9, 3.5748307091575365`*^9}, 3.5748307421983943`*^9, 3.574830849354983*^9, { 3.5748316203083367`*^9, 3.574831676156435*^9}, {3.574831733065335*^9, 3.574831738228944*^9}, {3.5748530946245832`*^9, 3.574853097011388*^9}, 3.574853202997974*^9, {3.575001859979342*^9, 3.575001914766638*^9}, { 3.576295600982015*^9, 3.576295607190826*^9}, {3.576295662789324*^9, 3.5762956678281326`*^9}, {3.5764233698526134`*^9, 3.576423438321134*^9}, { 3.5764243001914473`*^9, 3.576424310050665*^9}, {3.5764244238060646`*^9, 3.5764244305452766`*^9}, {3.576425337140869*^9, 3.576425357717305*^9}, { 3.576425430600633*^9, 3.5764254439230566`*^9}, {3.5764674720319767`*^9, 3.576467484418399*^9}, 3.5764766900566406`*^9, {3.5764767539855533`*^9, 3.5764767727679863`*^9}, {3.576513358947816*^9, 3.576513383533459*^9}, { 3.5765148372220125`*^9, 3.576514852338439*^9}, {3.576515146383355*^9, 3.5765151788626127`*^9}, {3.57651600901807*^9, 3.5765160297037067`*^9}, { 3.576551924100276*^9, 3.5765519996980085`*^9}}], Cell[BoxData["3"], "Output", CellChangeTimes->{3.5765572967185106`*^9, 3.5765575324037247`*^9, 3.580218413005377*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"Ok", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.574999421008658*^9, 3.5749994459219017`*^9}, { 3.5749994915051823`*^9, 3.5749996567718725`*^9}, {3.5750076770423594`*^9, 3.5750077104420176`*^9}, {3.575816701185139*^9, 3.5758167353803997`*^9}, 3.5764243304555006`*^9, {3.5764245803055396`*^9, 3.576424583815546*^9}, 3.576424636902439*^9, {3.5764254741559095`*^9, 3.576425484951129*^9}, 3.5764767820032024`*^9, 3.5764769619963183`*^9, {3.576513564478177*^9, 3.5765135655389786`*^9}, 3.5765136104982576`*^9, {3.576514873070875*^9, 3.576514880262488*^9}, {3.576515206630661*^9, 3.576515213416673*^9}, 3.5765161280930796`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"<<", " ", "\"\\""}]], "Input", CellChangeTimes->{{3.574999421008658*^9, 3.5749994459219017`*^9}, { 3.5749994915051823`*^9, 3.5749996567718725`*^9}, {3.5750076770423594`*^9, 3.5750077104420176`*^9}, {3.575816701185139*^9, 3.5758167353803997`*^9}, { 3.5764243868964*^9, 3.576424402527628*^9}, {3.5764245687771196`*^9, 3.5764245694947205`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ Graphics3DBox[{ {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{0.4963622864281748, 0.5782767978976807, 1.153125}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{0.4963622864281748, 0.5782767978976807, -1.153125}, 1.125]}, {Opacity[0.5], SphereBox[{-2.5191743998983105`, 2.5767449386364304`*^-16, -4.6550630847508027`*^-17}, 0.2572]}, {Opacity[0.5], SphereBox[{0., 0., 0.}, 0.1786]}, {Opacity[0.5], SphereBox[{0.27818246736280494`, -1.8141400753215202`, 0.}, 0.5241]}, Text3DBox["6", {-2.5191743998983105`, 2.5767449386364304`*^-16, -4.6550630847508027`*^-17}, {1, 0}], Text3DBox["20", {0., 0., 0.}, {1, 0}], Text3DBox["35", {0.27818246736280494`, -1.8141400753215202`, 0.}, {1, 0}], TubeBox[{{-2.5191743998983105`, 2.5767449386364304`*^-16, -4.6550630847508027`*^-17}, {0., 0., 0.}}, 0.02], TubeBox[{{-2.5191743998983105`, 2.5767449386364304`*^-16, -4.6550630847508027`*^-17}, { 0.27818246736280494`, -1.8141400753215202`, 0.}}, 0.02], TubeBox[{{0., 0., 0.}, {0.27818246736280494`, -1.8141400753215202`, 0.}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True], ",", Graphics3DBox[{ {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{-0.388492983272219, 0.6556315858187828, 1.153125}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{-0.388492983272219, 0.6556315858187828, -1.153125}, 1.125]}, {Opacity[0.5], SphereBox[{ 2.658635900711725, -1.6178882880191005`*^-18, -6.747643003091637*^-18}, 0.2572]}, {Opacity[0.5], SphereBox[{0., 0., 0.}, 0.1786]}, {Opacity[0.5], SphereBox[{-1.24099139946608, -2.2664850027463026`, 0.}, 0.2572]}, Text3DBox["10", { 2.658635900711725, -1.6178882880191005`*^-18, -6.747643003091637*^-18}, \ {1, 0}], Text3DBox["23", {0., 0., 0.}, {1, 0}], Text3DBox["11", {-1.24099139946608, -2.2664850027463026`, 0.}, {1, 0}], TubeBox[{{ 2.658635900711725, -1.6178882880191005`*^-18, -6.747643003091637*^-18}, \ {0., 0., 0.}}, 0.02], TubeBox[{{ 2.658635900711725, -1.6178882880191005`*^-18, -6.747643003091637*^-18}, \ {-1.24099139946608, -2.2664850027463026`, 0.}}, 0.02], TubeBox[{{0., 0., 0.}, {-1.24099139946608, -2.2664850027463026`, 0.}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True], ",", Graphics3DBox[{ {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{0.5647945839238292, -0.6247164700648679, 1.4965}, 1.46]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.5], SphereBox[{0.5647945839238292, -0.6247164700648679, -1.4965}, 1.46]}, {Opacity[0.5], SphereBox[{-3.4362786722600696`, -1.5163823083119587`*^-16, \ -3.1664706439688977`*^-16}, 0.2572]}, {Opacity[0.5], SphereBox[{0., 0., 0.}, 0.5244]}, {Opacity[0.5], SphereBox[{0.35182820092379574`, 3.4832140638427314`, 0.}, 0.2572]}, Text3DBox[ "1", {-3.4362786722600696`, -1.5163823083119587`*^-16, \ -3.1664706439688977`*^-16}, {1, 0}], Text3DBox["24", {0., 0., 0.}, {1, 0}], Text3DBox["5", {0.35182820092379574`, 3.4832140638427314`, 0.}, {1, 0}], TubeBox[{{-3.4362786722600696`, -1.5163823083119587`*^-16, \ -3.1664706439688977`*^-16}, {0., 0., 0.}}, 0.02], TubeBox[{{-3.4362786722600696`, -1.5163823083119587`*^-16, \ -3.1664706439688977`*^-16}, {0.35182820092379574`, 3.4832140638427314`, 0.}}, 0.02], TubeBox[{{0., 0., 0.}, {0.35182820092379574`, 3.4832140638427314`, 0.}}, 0.02]}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->False, PlotRange->Automatic, SphericalRegion->True]}], "}"}]], "Output", CellChangeTimes->{3.576557296749711*^9, 3.576557532434925*^9, 3.5802184130365767`*^9}] }, Open ]], Cell["\<\ (*-------------------------------------------------------------------------*) (*next: N (P) atoms pyramidal doubly occ LP*)\ \>", "Text", CellChangeTimes->{{3.5681154444347754`*^9, 3.568115497147268*^9}, { 3.568127214924899*^9, 3.568127265796589*^9}, {3.568128215276656*^9, 3.568128238536297*^9}, {3.568130718566253*^9, 3.5681307485339055`*^9}, 3.5681308175952272`*^9, {3.5681308916497574`*^9, 3.5681309458598523`*^9}, { 3.5681309983383446`*^9, 3.5681310118947687`*^9}, {3.5681310723448744`*^9, 3.568131074357278*^9}, {3.5681315215476637`*^9, 3.568131584509374*^9}, { 3.56813162789305*^9, 3.5681316427754765`*^9}, {3.5681317113063965`*^9, 3.568131715268804*^9}, {3.5681323203938665`*^9, 3.5681323260098763`*^9}, { 3.568132387567585*^9, 3.568132440014877*^9}, {3.5681325121026034`*^9, 3.568132590945142*^9}, {3.56813274298981*^9, 3.5681327548302307`*^9}, { 3.568132877867647*^9, 3.568132888335265*^9}, {3.568133052345154*^9, 3.568133072344389*^9}, {3.5681331740533676`*^9, 3.5681331951446047`*^9}, { 3.568133267793932*^9, 3.5681332684803333`*^9}, {3.5681335079111547`*^9, 3.568133536833606*^9}, {3.5681336272201643`*^9, 3.5681336314945717`*^9}, { 3.568133737994359*^9, 3.568133744000369*^9}, {3.568133978515581*^9, 3.5681339917912045`*^9}, {3.5681340324916763`*^9, 3.5681340418204927`*^9}, {3.568134244262048*^9, 3.5681342454944506`*^9}, { 3.5681343354754086`*^9, 3.568134336099409*^9}, {3.5681345828762426`*^9, 3.568134583952645*^9}, {3.5681348406666956`*^9, 3.5681348474683075`*^9}, 3.568134889151581*^9, {3.5681352914606876`*^9, 3.568135296265496*^9}, { 3.568135518877887*^9, 3.568135519595488*^9}, 3.5681357593679094`*^9, { 3.5681787035360527`*^9, 3.568178728449296*^9}, 3.5682779128076954`*^9, { 3.572714864038488*^9, 3.572714889419732*^9}, {3.5727149730514793`*^9, 3.57271500191153*^9}, {3.572715036933592*^9, 3.5727150664176435`*^9}, { 3.572715803191337*^9, 3.572715915183934*^9}, {3.5727159899548655`*^9, 3.572716037722149*^9}, {3.572767087700392*^9, 3.5727670990260115`*^9}, 3.5727756458897667`*^9, {3.5727757435615377`*^9, 3.5727758099084544`*^9}, { 3.576426369410282*^9, 3.5764264259759817`*^9}, {3.5764264953649035`*^9, 3.5764265148961377`*^9}, {3.5764768144356594`*^9, 3.576476823967276*^9}, { 3.576513402175492*^9, 3.576513409195504*^9}, {3.5765152705283737`*^9, 3.576515348949711*^9}, {3.57651540523461*^9, 3.576515422878241*^9}}], Cell[BoxData[{ StyleBox[ RowBox[{ RowBox[{"k", " ", "=", " ", "1"}], ";"}], "Input"], "\n", StyleBox[ RowBox[{ RowBox[{"Clear", "[", RowBox[{"conn", ",", "P", ",", "tpln"}], "]"}], ";"}], "Input"], "\n", StyleBox[ RowBox[{ RowBox[{"P", " ", "=", " ", "4"}], ";"}], "Input"], "\n", StyleBox[ RowBox[{ RowBox[{"tpln", " ", "=", " ", RowBox[{"{", RowBox[{"0.0", ",", " ", "0.0", ",", " ", "0.0"}], "}"}]}], ";"}], "Input"], "\n", StyleBox[ RowBox[{ RowBox[{"conn", " ", "=", " ", RowBox[{"{", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "17"}], "}"}], "}"}]}], ";"}], "Input"], "\n", StyleBox[ RowBox[{ RowBox[{"rln", " ", "=", " ", "1.246"}], ";"}], "Input"]}], "Input", CellChangeTimes->{{3.5681154444347754`*^9, 3.568115497147268*^9}, { 3.568127214924899*^9, 3.568127265796589*^9}, {3.568128215276656*^9, 3.568128238536297*^9}, {3.568130718566253*^9, 3.5681307485339055`*^9}, 3.5681308175952272`*^9, {3.5681308916497574`*^9, 3.5681309458598523`*^9}, { 3.5681309983383446`*^9, 3.5681310118947687`*^9}, {3.5681310723448744`*^9, 3.568131074357278*^9}, {3.5681315215476637`*^9, 3.568131584509374*^9}, { 3.56813162789305*^9, 3.5681316427754765`*^9}, {3.5681317113063965`*^9, 3.568131715268804*^9}, {3.5681323203938665`*^9, 3.5681323260098763`*^9}, { 3.568132387567585*^9, 3.568132440014877*^9}, {3.5681325121026034`*^9, 3.568132590945142*^9}, {3.56813274298981*^9, 3.5681327548302307`*^9}, { 3.568132877867647*^9, 3.568132888335265*^9}, {3.568133052345154*^9, 3.568133072344389*^9}, {3.5681331740533676`*^9, 3.5681331951446047`*^9}, { 3.568133267793932*^9, 3.5681332684803333`*^9}, {3.5681335079111547`*^9, 3.568133536833606*^9}, {3.5681336272201643`*^9, 3.5681336314945717`*^9}, { 3.568133737994359*^9, 3.568133744000369*^9}, {3.568133978515581*^9, 3.5681339917912045`*^9}, {3.5681340324916763`*^9, 3.5681340418204927`*^9}, {3.568134244262048*^9, 3.5681342454944506`*^9}, { 3.5681343354754086`*^9, 3.568134336099409*^9}, {3.5681345828762426`*^9, 3.568134583952645*^9}, {3.5681348406666956`*^9, 3.5681348474683075`*^9}, 3.568134889151581*^9, {3.5681352914606876`*^9, 3.568135296265496*^9}, { 3.568135518877887*^9, 3.568135519595488*^9}, 3.5681357593679094`*^9, { 3.5681787035360527`*^9, 3.568178728449296*^9}, 3.5682779128076954`*^9, { 3.572714864038488*^9, 3.572714889419732*^9}, {3.5727149730514793`*^9, 3.57271500191153*^9}, {3.572715036933592*^9, 3.5727150664176435`*^9}, { 3.572715803191337*^9, 3.572715915183934*^9}, {3.5727159899548655`*^9, 3.572716037722149*^9}, {3.572767087700392*^9, 3.5727670990260115`*^9}, 3.5727756458897667`*^9, {3.5727757435615377`*^9, 3.5727758099084544`*^9}, { 3.576426369410282*^9, 3.5764264259759817`*^9}, {3.5764264953649035`*^9, 3.5764265148961377`*^9}, {3.5764768144356594`*^9, 3.576476823967276*^9}, { 3.576513402175492*^9, 3.576513409195504*^9}, {3.5765152705283737`*^9, 3.576515348949711*^9}, 3.57651540523461*^9}], Cell[BoxData[ RowBox[{ RowBox[{ StyleBox["Do", "Input"], StyleBox["[", "Input"], RowBox[{ RowBox[{ StyleBox["(", "Input"], RowBox[{ StyleBox[ RowBox[{"c", " ", "=", " ", RowBox[{"conn", "[", RowBox[{"[", "k", "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"a1", " ", "=", " ", RowBox[{"dc", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", " ", RowBox[{"c", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"a2", " ", "=", " ", RowBox[{"dc", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", " ", RowBox[{"c", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"d1", " ", "=", " ", RowBox[{"dc", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "1", "]"}], "]"}], ",", " ", RowBox[{"c", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"\[Alpha]", " ", "=", " ", RowBox[{"ArcCos", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a1", "^", "2"}], " ", "+", " ", RowBox[{"a2", "^", "2"}], " ", "-", " ", RowBox[{"d1", "^", "2"}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", "*", "a1", "*", "a2"}], ")"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"L", " ", "=", " ", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], " ", "+", " ", "rln"}], ")"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"\[Beta]", " ", "=", " ", RowBox[{"ArcSin", "[", RowBox[{"rln", "/", "L"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"\[Gamma]", " ", "=", " ", RowBox[{ RowBox[{"\[Pi]", "/", "2"}], " ", "-", " ", RowBox[{"\[Alpha]", "/", "2"}]}]}], "Input"], StyleBox[";", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"(*", RowBox[{ RowBox[{"\[Gamma]", "=", RowBox[{ RowBox[{"3", "*", RowBox[{"\[Pi]", "/", "2"}]}], "+", RowBox[{"\[Alpha]", "/", "2"}]}]}], ";"}], "*)"}], "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"v", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], ",", " ", RowBox[{"{", "1", "}"}]}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "P"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"x2", " ", "=", " ", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", " ", "1"}], "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"y2", " ", "=", " ", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", " ", "2"}], "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox[" ", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"z2", " ", "=", " ", RowBox[{"t", "[", RowBox[{"[", RowBox[{ RowBox[{"c", "[", RowBox[{"[", "2", "]"}], "]"}], ",", " ", "3"}], "]"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"Q", " ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", " ", "0", ",", " ", "0", ",", " ", "0"}], "}"}], ",", "\n", " ", RowBox[{"{", RowBox[{"0", ",", " ", "1", ",", " ", "0", ",", " ", "0"}], "}"}], ",", "\n", " ", RowBox[{"{", RowBox[{"0", ",", " ", "0", ",", " ", "1", ",", " ", "0"}], "}"}], ",", "\n", " ", RowBox[{"{", RowBox[{ RowBox[{"-", "x2"}], ",", " ", RowBox[{"-", "y2"}], ",", " ", RowBox[{"-", "z2"}], ",", " ", "1"}], "}"}]}], "}"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"v", ".", "Q"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", "3"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "P"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T1", " ", "=", " ", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", " ", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", " ", "2"}], "]"}], "]"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T", " ", "=", " ", RowBox[{"RotationMatrix", "[", RowBox[{"T1", ",", " ", RowBox[{"{", RowBox[{"1", ",", " ", "0", ",", " ", "0"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"U", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T2", " ", "=", " ", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", " ", "2"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"1", ",", " ", "1"}], "]"}], "]"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T", " ", "=", " ", RowBox[{"RotationMatrix", "[", RowBox[{"T2", ",", " ", RowBox[{"{", RowBox[{"0", ",", " ", "0", ",", " ", "1"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"U", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T3", " ", "=", " ", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", " ", "3"}], "]"}], "]"}], "/", RowBox[{"p", "[", RowBox[{"[", RowBox[{"3", ",", " ", "2"}], "]"}], "]"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T", " ", "=", " ", RowBox[{"RotationMatrix", "[", RowBox[{"T3", ",", " ", RowBox[{"{", RowBox[{"1", ",", " ", "0", ",", " ", "0"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"Chop", "[", RowBox[{"U", ".", "T"}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"nk", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], RowBox[{"(*", StyleBox[ RowBox[{ RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"4", ",", "2"}], "]"}], "]"}], "=", RowBox[{"L", "*", RowBox[{"Cos", "[", "\[Gamma]", "]"}]}]}], ";", " ", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"4", ",", "1"}], "]"}], "]"}], "=", RowBox[{ RowBox[{"-", "L"}], "*", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}]}], ";"}], "Input"], "*)"}], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"4", ",", "3"}], "]"}], "]"}], " ", "=", " ", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", RowBox[{"4", ",", "3"}], "]"}], "]"}], " ", "-", " ", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"c", "[", RowBox[{"[", "4", "]"}], "]"}], "]"}], "]"}], " ", "-", " ", "rln"}]}], "Input"], StyleBox[";", "Input"], StyleBox[" ", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U1", " ", "=", " ", "nk"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T", " ", "=", " ", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T3"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", " ", "0", ",", " ", "0"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"U", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"nk", " ", "=", " ", RowBox[{"U1", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U1", " ", "=", " ", "nk"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T", " ", "=", " ", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T2"}], ",", " ", RowBox[{"{", RowBox[{"0", ",", " ", "0", ",", " ", "1"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"U", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"nk", " ", "=", " ", RowBox[{"U1", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U", " ", "=", " ", "p"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"U1", " ", "=", " ", "nk"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"T", " ", "=", " ", RowBox[{"RotationMatrix", "[", RowBox[{ RowBox[{"-", "T1"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", " ", "0", ",", " ", "0"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"U", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"nk", " ", "=", " ", RowBox[{"U1", ".", "T"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"Clear", "[", RowBox[{"v", ",", " ", "v1", ",", " ", "v2"}], "]"}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"v", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", RowBox[{"{", "1", "}"}]}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "P"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"v1", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", RowBox[{"{", "1", "}"}]}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "P"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"Q", " ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", " ", "0", ",", " ", "0", ",", " ", "0"}], "}"}], ",", "\n", " ", RowBox[{"{", RowBox[{"0", ",", " ", "1", ",", " ", "0", ",", " ", "0"}], "}"}], ",", "\n", " ", RowBox[{"{", RowBox[{"0", ",", " ", "0", ",", " ", "1", ",", " ", "0"}], "}"}], ",", "\n", " ", RowBox[{"{", RowBox[{"x2", ",", " ", "y2", ",", " ", "z2", ",", " ", "1"}], "}"}]}], "}"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"v", ".", "Q"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"nk", " ", "=", " ", RowBox[{"v1", ".", "Q"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"p", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", "3"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "P"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[ RowBox[{ StyleBox[" ", "Input"], " "}]], StyleBox[ RowBox[{"nk", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{ RowBox[{"nk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", "3"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "1", ",", " ", "P"}], "}"}]}], "]"}]}], "Input"], StyleBox[";", "Input"], StyleBox["\n", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"tpln", " ", "=", " ", RowBox[{"nk", "[", RowBox[{"[", "4", "]"}], "]"}]}], "Input"]}], StyleBox[")", "Input"]}], StyleBox[",", "Input"], StyleBox[" ", "Input"], StyleBox[ RowBox[{"{", RowBox[{"k", ",", " ", "1"}], "}"}], "Input"]}], StyleBox["]", "Input"]}], StyleBox[";", "Input"]}]], "Input", CellChangeTimes->{{3.5681154444347754`*^9, 3.568115497147268*^9}, { 3.568127214924899*^9, 3.568127265796589*^9}, {3.568128215276656*^9, 3.568128238536297*^9}, {3.568130718566253*^9, 3.5681307485339055`*^9}, 3.5681308175952272`*^9, {3.5681308916497574`*^9, 3.5681309458598523`*^9}, { 3.5681309983383446`*^9, 3.5681310118947687`*^9}, {3.5681310723448744`*^9, 3.568131074357278*^9}, {3.5681315215476637`*^9, 3.568131584509374*^9}, { 3.56813162789305*^9, 3.5681316427754765`*^9}, {3.5681317113063965`*^9, 3.568131715268804*^9}, {3.5681323203938665`*^9, 3.5681323260098763`*^9}, { 3.568132387567585*^9, 3.568132440014877*^9}, {3.5681325121026034`*^9, 3.568132590945142*^9}, {3.56813274298981*^9, 3.5681327548302307`*^9}, { 3.568132877867647*^9, 3.568132888335265*^9}, {3.568133052345154*^9, 3.568133072344389*^9}, {3.5681331740533676`*^9, 3.5681331951446047`*^9}, { 3.568133267793932*^9, 3.5681332684803333`*^9}, {3.5681335079111547`*^9, 3.568133536833606*^9}, {3.5681336272201643`*^9, 3.5681336314945717`*^9}, { 3.568133737994359*^9, 3.568133744000369*^9}, {3.568133978515581*^9, 3.5681339917912045`*^9}, {3.5681340324916763`*^9, 3.5681340418204927`*^9}, {3.568134244262048*^9, 3.5681342454944506`*^9}, { 3.5681343354754086`*^9, 3.568134336099409*^9}, {3.5681345828762426`*^9, 3.568134583952645*^9}, {3.5681348406666956`*^9, 3.5681348474683075`*^9}, 3.568134889151581*^9, {3.5681352914606876`*^9, 3.568135296265496*^9}, { 3.568135518877887*^9, 3.568135519595488*^9}, 3.5681357593679094`*^9, { 3.5681787035360527`*^9, 3.568178728449296*^9}, 3.5682779128076954`*^9, { 3.572714864038488*^9, 3.572714889419732*^9}, {3.5727149730514793`*^9, 3.57271500191153*^9}, {3.572715036933592*^9, 3.5727150664176435`*^9}, { 3.572715803191337*^9, 3.572715915183934*^9}, {3.5727159899548655`*^9, 3.572716037722149*^9}, {3.572767087700392*^9, 3.5727670990260115`*^9}, 3.5727756458897667`*^9, {3.5727757435615377`*^9, 3.5727758099084544`*^9}, { 3.576426369410282*^9, 3.5764264061171465`*^9}, {3.576426887951993*^9, 3.576426912397236*^9}, 3.576426992581377*^9, {3.5764786301228485`*^9, 3.576478632572053*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"DeleteFile", "[", " ", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "2"}], ",", RowBox[{"i", "<", RowBox[{"n", "+", "2"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "2"}], ",", RowBox[{"j", "\[LessEqual]", "i"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Pij", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ">", "0"}], ",", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"i", "-", "1"}], ",", RowBox[{"j", "-", "1"}], ",", RowBox[{"Extract", "[", RowBox[{"Pij", ",", RowBox[{"{", RowBox[{"i", ",", "j"}], "}"}]}], "]"}]}], "}"}], ">>>", " ", "\"\\""}]}], "]"}]}], "]"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5681154444347754`*^9, 3.568115497147268*^9}, { 3.568127214924899*^9, 3.568127265796589*^9}, {3.568128215276656*^9, 3.568128238536297*^9}, {3.568130718566253*^9, 3.5681307485339055`*^9}, 3.5681308175952272`*^9, {3.5681308916497574`*^9, 3.5681309458598523`*^9}, { 3.5681309983383446`*^9, 3.5681310118947687`*^9}, {3.5681310723448744`*^9, 3.568131074357278*^9}, {3.5681315215476637`*^9, 3.568131584509374*^9}, { 3.56813162789305*^9, 3.5681316427754765`*^9}, {3.5681317113063965`*^9, 3.568131715268804*^9}, {3.5681323203938665`*^9, 3.5681323260098763`*^9}, { 3.568132387567585*^9, 3.568132440014877*^9}, {3.5681325121026034`*^9, 3.568132590945142*^9}, {3.56813274298981*^9, 3.5681327548302307`*^9}, { 3.568132877867647*^9, 3.568132888335265*^9}, {3.568133052345154*^9, 3.568133072344389*^9}, {3.5681331740533676`*^9, 3.5681331951446047`*^9}, { 3.568133267793932*^9, 3.5681332684803333`*^9}, {3.5681335079111547`*^9, 3.568133536833606*^9}, {3.5681336272201643`*^9, 3.5681336314945717`*^9}, { 3.568133737994359*^9, 3.568133744000369*^9}, {3.568133978515581*^9, 3.5681339917912045`*^9}, {3.5681340324916763`*^9, 3.5681340418204927`*^9}, {3.568134244262048*^9, 3.5681342454944506`*^9}, { 3.5681343354754086`*^9, 3.568134336099409*^9}, {3.5681345828762426`*^9, 3.568134583952645*^9}, {3.5681348406666956`*^9, 3.5681348474683075`*^9}, 3.568134889151581*^9, {3.5681352914606876`*^9, 3.568135296265496*^9}, { 3.568135518877887*^9, 3.568135519595488*^9}, 3.5681357593679094`*^9, { 3.5681787035360527`*^9, 3.568178728449296*^9}, 3.5682779128076954`*^9, { 3.572714864038488*^9, 3.572714889419732*^9}, {3.5727149730514793`*^9, 3.57271500191153*^9}, {3.572715036933592*^9, 3.5727150664176435`*^9}, { 3.572715803191337*^9, 3.572715915183934*^9}, {3.5727159899548655`*^9, 3.572716037722149*^9}, {3.572767087700392*^9, 3.5727670990260115`*^9}, 3.5727756458897667`*^9, {3.5727757435615377`*^9, 3.5727758099084544`*^9}, { 3.576426369410282*^9, 3.5764263775534964`*^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[{"4", ",", "1", ",", "1.2254418786230263`"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "3", ",", "1.1905384115762714`"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "2", ",", "1.2063125263248262`"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "2", ",", "1.1727577830982314`"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "5", ",", "1.1956798357966363`"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "5", ",", "1.1994928739116124`"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "9", ",", "1.17891671246777`"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "11", ",", "1.0683450355919255`"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "11", ",", "1.0664736191341153`"}], "}"}], ",", RowBox[{"{", RowBox[{"14", ",", "12", ",", "1.0627215522086486`"}], "}"}], ",", RowBox[{"{", RowBox[{"15", ",", "13", ",", "1.061553771195871`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "14", ",", "1.0606363812514528`"}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", "15", ",", "1.060127135831235`"}], "}"}], ",", RowBox[{"{", RowBox[{"17", ",", "1", ",", "1.1232614537466616`"}], "}"}], ",", RowBox[{"{", RowBox[{"17", ",", "2", ",", "1.109059973712015`"}], "}"}], ",", RowBox[{"{", RowBox[{"17", ",", "3", ",", "1.1068131819359799`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "4", ",", "1.1287008143693926`"}], "}"}], ",", RowBox[{"{", RowBox[{"18", ",", "9", ",", "1.0721038684207627`"}], "}"}], ",", RowBox[{"{", RowBox[{"19", ",", "3", ",", "0.9176724899801458`"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "6", ",", "1.0416871999491553`"}], "}"}], ",", RowBox[{"{", RowBox[{"21", ",", "6", ",", "0.9210922295753428`"}], "}"}], ",", RowBox[{"{", RowBox[{"22", ",", "9", ",", "0.9229361948217829`"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "10", ",", "1.1114179503558625`"}], "}"}], ",", RowBox[{"{", RowBox[{"23", ",", "11", ",", "1.0740959289044496`"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "1", ",", "1.3273393361300347`"}], "}"}], ",", RowBox[{"{", RowBox[{"24", ",", "5", ",", "1.3596687441880437`"}], "}"}], ",", RowBox[{"{", RowBox[{"25", ",", "1", ",", "1.1997263279567294`"}], "}"}], ",", RowBox[{"{", RowBox[{"26", ",", "2", ",", "1.201748026863679`"}], "}"}], ",", RowBox[{"{", RowBox[{"27", ",", "4", ",", "1.2026037034225578`"}], "}"}], ",", RowBox[{"{", RowBox[{"28", ",", "18", ",", "1.150468010128111`"}], "}"}], ",", RowBox[{"{", RowBox[{"29", ",", "7", ",", "1.2574891973838547`"}], "}"}], ",", RowBox[{"{", RowBox[{"30", ",", "7", ",", "1.2575269569774465`"}], "}"}], ",", RowBox[{"{", RowBox[{"31", ",", "7", ",", "1.2587623211152228`"}], "}"}], ",", RowBox[{"{", RowBox[{"32", ",", "8", ",", "1.2595225714770626`"}], "}"}], ",", RowBox[{"{", RowBox[{"33", ",", "8", ",", "1.258113346067062`"}], "}"}], ",", RowBox[{"{", RowBox[{"34", ",", "8", ",", "1.258708542853591`"}], "}"}], ",", RowBox[{"{", RowBox[{"35", ",", "20", ",", "1.1326445720179166`"}], "}"}], ",", RowBox[{"{", RowBox[{"36", ",", "10", ",", "1.2595751203461338`"}], "}"}], ",", RowBox[{"{", RowBox[{"37", ",", "10", ",", "1.2589893856854197`"}], "}"}], ",", RowBox[{"{", RowBox[{"38", ",", "12", ",", "1.234089528090295`"}], "}"}], ",", RowBox[{"{", RowBox[{"39", ",", "13", ",", "1.2370389946362135`"}], "}"}], ",", RowBox[{"{", RowBox[{"40", ",", "14", ",", "1.2371275329651534`"}], "}"}], ",", RowBox[{"{", RowBox[{"41", ",", "15", ",", "1.23721297165542`"}], "}"}], ",", RowBox[{"{", RowBox[{"42", ",", "16", ",", "1.2369680734201314`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.576557296812111*^9, 3.576557532528525*^9, 3.580218413098977*^9}], Cell[BoxData["44"], "Output", CellChangeTimes->{3.576557296812111*^9, 3.576557532528525*^9, 3.580218413098977*^9}], Cell[BoxData["26"], "Output", CellChangeTimes->{3.576557296812111*^9, 3.576557532528525*^9, 3.580218413098977*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Histogram", "[", RowBox[{"data1", ",", RowBox[{"{", RowBox[{"0.92", ",", "1.20", ",", "0.002"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.574935943705309*^9, 3.574935952815725*^9}, 3.574935986464984*^9, {3.5749360234214487`*^9, 3.574936050752697*^9}, { 3.575375124746955*^9, 3.5753751382097783`*^9}, {3.575375905996327*^9, 3.575375926978364*^9}, {3.5753912779750137`*^9, 3.57539131004867*^9}, { 3.575700625296671*^9, 3.575700653704321*^9}, {3.5757278228511343`*^9, 3.5757278405571656`*^9}, 3.5764688597012143`*^9}], Cell[BoxData[ GraphicsBox[ {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], EdgeForm[Opacity[0.5529999999999999]], {}, {RGBColor[0.798413061722744, 0.824719615472648, 0.968322270542458], EdgeForm[Opacity[0.5529999999999999]], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0.92, 0}, {0.922, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{15.5, 18.88571428571413}, {31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0.922, 0}, {0.924, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{17.88571428571413, 21.271428571428487`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.04, 0}, {1.042, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{158.6428571428571, 162.02857142857147`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.06, 0}, {1.062, 3}, "RoundingRadius" -> 0]}, ImageSizeCache->{{182.5, 185.88571428571436`}, {-94.89756747474327, 95.32383874751618}}], StatusArea[#, 3]& , TagBoxNote->"3"], StyleBox["3", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.062, 0}, {1.064, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{184.88571428571436`, 188.2714285714285}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.066, 0}, {1.068, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{189.65714285714284`, 193.0428571428572}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.068, 0}, {1.07, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{192.0428571428572, 195.42857142857133`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.072, 0}, {1.074, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{196.8142857142857, 200.20000000000005`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.074, 0}, {1.076, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{199.20000000000005`, 202.58571428571418`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.106, 0}, {1.108, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{237.37142857142862`, 240.75714285714298`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.108, 0}, {1.11, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{239.75714285714298`, 243.1428571428571}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.11, 0}, {1.112, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{242.1428571428571, 245.52857142857147`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.122, 0}, {1.124, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{256.457142857143, 259.84285714285716`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.1280000000000001`, 0}, {1.1300000000000001`, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{263.61428571428587`, 267.}, {31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.1320000000000001`, 0}, {1.1340000000000001`, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{268.38571428571436`, 271.7714285714287}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.1500000000000001`, 0}, {1.1520000000000001`, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{289.8571428571429, 293.24285714285725`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.1720000000000002`, 0}, {1.174, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{316.10000000000014`, 319.48571428571427`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.178, 0}, {1.1800000000000002`, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{323.25714285714275`, 326.64285714285734`}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.19, 0}, {1.1920000000000002`, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{337.57142857142844`, 340.957142857143}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.194, 0}, {1.1960000000000002`, 1}, "RoundingRadius" -> 0]}, ImageSizeCache->{{342.34285714285693`, 345.7285714285715}, { 31.250036673429705`, 95.32383874751618}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.198, 0}, {1.2, 2}, "RoundingRadius" -> 0]}, ImageSizeCache->{{347.11428571428564`, 350.5}, {-31.823765400656782`, 95.32383874751618}}], StatusArea[#, 2]& , TagBoxNote->"2"], StyleBox["2", { GrayLevel[0]}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0]}], "Tooltip"]& ]}, {}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0.92, 0}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, PlotRange->{{0.92, 1.2}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.1]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.576557296858911*^9, 3.5765575329497256`*^9, 3.580218413176977*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"Plot1o", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.8", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "White", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Yellow", "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", "\"\\""}], ",", RowBox[{"Lighter", "[", "Orange", "]"}], ",", RowBox[{"Darker", "[", "Brown", "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"u1", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"Text", "[", RowBox[{"i", ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "-", "0.6"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "}"}], " ", ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.575562682901544*^9, 3.575562696785568*^9}, { 3.5765090338138957`*^9, 3.5765090422379103`*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"wxc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"wyc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], " "}], "\n", RowBox[{ RowBox[{"wzc", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"2", "*", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.568878075458074*^9}, 3.5688953020257144`*^9, 3.5693395777359695`*^9, {3.569339615191635*^9, 3.569339617079238*^9}, { 3.5693396917877693`*^9, 3.56933969216217*^9}, 3.5693893483274703`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Plot7", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Darker", "[", RowBox[{"Brown", ",", "0.4"}], "]"}], ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyc", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzc", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.56887811871695*^9}, {3.568895331556566*^9, 3.5688953367201753`*^9}, 3.568895995276532*^9, {3.5693397032225895`*^9, 3.56933970331619*^9}, 3.569339737137049*^9, 3.569340055299608*^9, 3.569389360947892*^9, {3.570298060155057*^9, 3.570298071589877*^9}, { 3.5704539766451664`*^9, 3.5704539773627677`*^9}, {3.5709509139026003`*^9, 3.570950950500265*^9}, {3.570950995397144*^9, 3.5709510449896307`*^9}, { 3.570974064815357*^9, 3.5709741190878525`*^9}, {3.5709742487084804`*^9, 3.570974273528124*^9}, {3.5713747544125347`*^9, 3.571374762618149*^9}, 3.5713830670175667`*^9, {3.575602053545355*^9, 3.575602059286165*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"wxh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"wyh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"wzh", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], "+", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ")"}]}], "+", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"cw", "+", "1"}], ",", "nb"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.5688781280925665`*^9}, 3.568895312524533*^9, 3.5693395940691977`*^9, {3.5693396336776676`*^9, 3.5693396557829065`*^9}, { 3.569340069402033*^9, 3.569340092412073*^9}, {3.569389186383586*^9, 3.5693891947764006`*^9}, {3.569389263291721*^9, 3.569389289686967*^9}, 3.569389336315449*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Plot8", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"wxh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wyh", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"wzh", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", RowBox[{"a", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "cw"}], ",", "3"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bh"}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.5683813935175805`*^9}, 3.5684646396646404`*^9, 3.5684646988823442`*^9, 3.568465086387025*^9, {3.5684655859935026`*^9, 3.568465605087936*^9}, 3.568821235038273*^9, 3.5688233741452303`*^9, 3.568823449742963*^9, 3.5688274593312387`*^9, {3.5688284679978104`*^9, 3.5688284689026117`*^9}, {3.5688285131598897`*^9, 3.5688285201487017`*^9}, 3.5688285866360188`*^9, {3.5688292397623663`*^9, 3.568829246688778*^9}, { 3.5688780328231993`*^9, 3.568878147967001*^9}, {3.56889532230575*^9, 3.5688953242557535`*^9}, 3.56889600529175*^9, 3.5688961595292206`*^9, { 3.5693396821781526`*^9, 3.5693396825213532`*^9}, 3.5693893658151007`*^9, { 3.5693895413934093`*^9, 3.5693895427506113`*^9}, {3.5697651043452682`*^9, 3.5697651089940763`*^9}, {3.5704647001766*^9, 3.570464712141821*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"Plot8a", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.3", "]"}], ",", RowBox[{"Lighter", "[", "Cyan", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpo", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"rpo", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8b", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.3", "]"}], ",", RowBox[{"Lighter", "[", "Yellow", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"rpi", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8d", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tplo", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rlo"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "oj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Plot8e", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tplu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rlo"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "oj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"Plot8f", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tplk", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rlo"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "tj"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Plot8g", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpll", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rlo"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "tj"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Plot8h", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tplm", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "rlo"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "tj"}], "}"}]}], "]"}]}], ";"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8i", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpso", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"rlos", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"hj", "-", "1"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8j", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Red", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpsu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"rlos", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"hj", "-", "1"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8ia", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Orange", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpso", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"rlos", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "3", ",", "hj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8ja", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Orange", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{ RowBox[{"tpsu", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"rlos", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "3", ",", "hj"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot8k", "=", RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{"tpln", ",", "rln"}], "]"}]}], "}"}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"Plot8l", "=", RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.4", "]"}], ",", RowBox[{"Lighter", "[", "Blue", "]"}], ",", RowBox[{"Sphere", "[", RowBox[{"tpln1", ",", "rln"}], "]"}]}], "}"}], "]"}]}], ";"}], "*)"}]}]}], "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, {3.571838766139532*^9, 3.571838773908346*^9}, 3.5718388425484667`*^9, {3.571838961763876*^9, 3.571838969236289*^9}, {3.571839027970392*^9, 3.5718390313399982`*^9}, { 3.571839741203645*^9, 3.5718397450100517`*^9}, {3.572538612521628*^9, 3.572538701894185*^9}, {3.572538746213863*^9, 3.572538844837236*^9}, 3.5725397817592816`*^9, {3.5726093687611146`*^9, 3.5726094120667906`*^9}, { 3.5726201406133776`*^9, 3.5726201439517837`*^9}, {3.5726204342214937`*^9, 3.572620455406331*^9}, {3.5726210034788933`*^9, 3.572621009968505*^9}, { 3.5728421659278097`*^9, 3.5728422874676228`*^9}, {3.572844941796685*^9, 3.57284494451109*^9}, {3.572850660423529*^9, 3.5728506878327775`*^9}, 3.5731240021791506`*^9, {3.573124038683215*^9, 3.57312404156922*^9}, 3.5731241655738378`*^9, {3.573150838242284*^9, 3.5731508464166985`*^9}, { 3.5732110436990156`*^9, 3.573211066116255*^9}, {3.573212991206436*^9, 3.573213000894053*^9}, {3.573213104540635*^9, 3.573213182462772*^9}, { 3.5732202689099436`*^9, 3.573220322745638*^9}, {3.573220354086093*^9, 3.5732203696081204`*^9}, {3.573220402914179*^9, 3.573220410448992*^9}, { 3.5746631320730405`*^9, 3.574663233114418*^9}, {3.5746640424906397`*^9, 3.574664047560649*^9}, {3.5746708183720207`*^9, 3.574670838917257*^9}, { 3.5747409576711226`*^9, 3.574740975720354*^9}, {3.5747864634781103`*^9, 3.5747864662861156`*^9}, {3.574786586827527*^9, 3.574786630445204*^9}, { 3.574786972070204*^9, 3.5747869752838097`*^9}, {3.5748281512990437`*^9, 3.5748281556358514`*^9}, 3.5753451622470818`*^9, {3.575351337845529*^9, 3.5753513418547363`*^9}, 3.575351450508927*^9, {3.575365082044012*^9, 3.5753650985644407`*^9}, {3.5753651580941453`*^9, 3.575365163008154*^9}, { 3.5757218899846277`*^9, 3.5757219013726473`*^9}, {3.576343058584899*^9, 3.5763431272094193`*^9}, {3.5764247651346645`*^9, 3.576424811139145*^9}, { 3.576424847502809*^9, 3.576424898436898*^9}, {3.5764249314621563`*^9, 3.576424956937001*^9}, {3.5764265747378426`*^9, 3.576426654325983*^9}, 3.576426739268132*^9, 3.576487854660452*^9, 3.5764878868589087`*^9, 3.5765146408176675`*^9, {3.576552534498148*^9, 3.5765525468065696`*^9}, { 3.5765525769146223`*^9, 3.576552636257127*^9}, {3.576555011492899*^9, 3.5765550217889166`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plot9", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{ RowBox[{"Lighter", "[", RowBox[{"White", ",", "0.5"}], "]"}], ",", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", "0.1"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "nb"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot9a", "=", " ", RowBox[{"Graphics3D", "[", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", RowBox[{"nk", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "0.1"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot9b", "=", " ", RowBox[{"Graphics3D", "[", RowBox[{"Tube", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", RowBox[{"nl", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "0.1"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{"Plot1o", ",", RowBox[{"(*", RowBox[{"Plot2", ","}], "*)"}], "Plot7", ",", "Plot8", ",", "Plot8a", ",", "Plot8b", ",", "Plot8d", ",", "Plot8e", ",", "Plot8i", ",", "Plot8j", ",", "Plot8k", ",", "Plot8ia", ",", "Plot8ja", ",", RowBox[{"(*", RowBox[{"Plot8l", ","}], "*)"}], "Plot9", ",", RowBox[{"{", RowBox[{ RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "False"}], ",", RowBox[{"(*", " ", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ","}], "*)"}], RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, 3.571838766139532*^9, { 3.571838857446493*^9, 3.5718388645757055`*^9}, 3.5723437133735733`*^9, 3.5723437554312468`*^9, {3.5723449027196617`*^9, 3.572344929582909*^9}, 3.5723450406551046`*^9, {3.57234950163894*^9, 3.5723495196413713`*^9}, { 3.572584520172369*^9, 3.5725845258195786`*^9}, {3.5726224003989472`*^9, 3.57262241340937*^9}, 3.572796748424938*^9, 3.5727968708695536`*^9, { 3.572796971801731*^9, 3.572796995841373*^9}, {3.57279741546651*^9, 3.5727974308793373`*^9}, {3.572842795856916*^9, 3.5728428061217337`*^9}, { 3.5728522627179437`*^9, 3.572852288426789*^9}, {3.5728523495164957`*^9, 3.572852453865079*^9}, {3.5728524960787535`*^9, 3.572852515110787*^9}, { 3.572852550008048*^9, 3.572852634669397*^9}, {3.5728602362372026`*^9, 3.5728602649256525`*^9}, 3.572860311756935*^9, 3.5731241886618786`*^9, 3.5731408095114717`*^9, 3.5731408826443996`*^9, {3.573211072949067*^9, 3.5732110779254756`*^9}, {3.5732129727516036`*^9, 3.573212981300419*^9}, { 3.5732130120948725`*^9, 3.57321301629128*^9}, {3.573213384015126*^9, 3.573213388164733*^9}, {3.573220427063021*^9, 3.57322044338065*^9}, { 3.5733208085662665`*^9, 3.5733208285343018`*^9}, {3.57332089027921*^9, 3.5733208917144127`*^9}, {3.5733209483737125`*^9, 3.5733209652997417`*^9}, {3.5733210904587617`*^9, 3.5733211330312366`*^9}, {3.5746581574587035`*^9, 3.5746581598923078`*^9}, {3.5746632559372582`*^9, 3.5746632963569293`*^9}, 3.574669479281269*^9, {3.5746708530664816`*^9, 3.5746708831121345`*^9}, { 3.5746734822639*^9, 3.5746735338531904`*^9}, 3.5747441301394944`*^9, { 3.574950644335537*^9, 3.5749506488751445`*^9}, {3.575001627819734*^9, 3.5750016487549706`*^9}, {3.57534426719551*^9, 3.575344278926731*^9}, { 3.5753450565880966`*^9, 3.575345065324112*^9}, 3.5753451320610294`*^9, 3.575345171575898*^9, 3.575345357543825*^9, {3.5753513717287884`*^9, 3.57535142378608*^9}, {3.5753652394014883`*^9, 3.57536535446729*^9}, 3.5762958623448744`*^9, {3.5763431377082376`*^9, 3.576343150983861*^9}, { 3.576419664175305*^9, 3.5764196724433193`*^9}, {3.5764250192591105`*^9, 3.576425028385127*^9}, {3.576426683451234*^9, 3.5764266901436453`*^9}, { 3.576487894268922*^9, 3.5764878998537316`*^9}, {3.576492481331253*^9, 3.576492484186058*^9}, {3.576492719278471*^9, 3.576492721353275*^9}, 3.5765147187866044`*^9, {3.576552655850761*^9, 3.57655266669278*^9}, { 3.576552755909337*^9, 3.5765527632725496`*^9}}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.0297577989999995`, 1.361188704, 2.241203097}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{8.162200106999999, 1.119496074, -1.379537691}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.821956044, 3.532265034, -1.0332879599999998`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.591591271, 2.879978388, 1.505316123}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.583460584999999, -1.723311915, -0.990977577}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{10.550138409, 2.067766431, -0.123491895}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{9.923230433999999, -3.2676314459999998`, -0.226782897}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{6.458408792999999, -2.8374223439999997`, -3.436551729}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.058488004, 2.5511138969999996`, 1.4326949519999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.35065631, 0.86586054, 1.0382200769999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-8.823746283, 1.11775755, 0.516625083}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-9.147376305, -1.4973982799999999`, 0.225932532}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-10.951246131, 2.629801005, 0.074000652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-11.481212496, -2.5464274409999996`, -0.423311697}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.29725199, 1.614824238, -0.5760183539999999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.572826940999999`, -0.99360426, -0.824135964}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{5.995356705, 2.188556055, -0.173379975}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.296966355, 1.393823823, 1.324585215}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{3.4165964969999996`, 4.465209924, -3.063902889}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{12.483792830999999`, 2.155713069, -1.735783935}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{10.819250586, 2.66428803, 2.058469107}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-2.264899935, 4.790257221, 1.819554336}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-6.592690875, 2.2941524909999997`, 1.078319511}, 0.178]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{5.151794625, -1.994824011, 1.512988305}, 0.5]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.129317538, 2.061171378, 3.8194616399999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.198746905, 1.661216373, -3.3552379379999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{2.3924546849999997`, 4.582541397, 2.629290786}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.328448757, -0.488619729, 0.900914475}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{11.433138527999999`, -3.102811812, -1.6837415969999998`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{10.728847338, -2.628364833, 1.609570872}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.469626846, -5.314384413, -0.026474697}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.729994688, -1.7991833699999997`, -4.047227180999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{7.845769842, -2.731391277, -5.016529898999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{5.936265786, -4.864598019, -3.2068209}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{13.777216892999999`, 2.766671976, -0.5858825879999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.177162953, -0.055084755, -0.848645373}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-7.5618991079999995`, -2.815634103, 0.50927415}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-10.765677591, 4.698852432, 0.243242184}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-11.674774467, -4.611718365, -0.6270969449999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-14.927590664999999`, 2.871984957, -0.902086089}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, 0.12]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.8106745349999995`, 2.1205835459999998`, 1.87325961}, 1.2254418786230263`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.2067736575000003`, 3.2061217109999998`, 0.23601408150000003`}, 1.1905384115762714`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{ 7.872830345999999, -0.30190792050000037`, -1.1852576339999998`}, 1.2063125263248262`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{9.356169258, 1.5936312524999998`, -0.751514793}, 1.1727577830982314`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{8.753345509499999, -2.4954716805, -0.6088802369999999}, 1.1956798357966363`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{7.020934688999999, -2.2803671295, -2.213764653}, 1.1994928739116124`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-3.2045721570000003`, 1.7084872184999997`, 1.2354575144999997`}, 1.17891671246777]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-8.985561294, -0.1898203650000001, 0.3712788075}, 1.0683450355919255`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-9.887496207, 1.8737792775000002`, 0.29531286749999996`}, 1.0664736191341153`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-10.3142944005, -2.0219128604999996`, -0.09868958250000004}, 1.0627215522086486`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-12.1242490605, 2.1223126215, -0.251008851}, 1.061553771195871]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-12.5270197185, -1.7700158504999997`, -0.6237238305}, 1.0606363812514528`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-13.4350394655, 0.3106099889999997, -0.700077159}, 1.060127135831235]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{5.518215093527041, 1.7797202654364053`, 1.0197635246980075`}, 1.1232614537466616`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{7.065948443595247, 1.6603560094106449`, -0.7693171271728978}, 1.109059973712015]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{4.921546611491133, 2.852441131635989, -0.5982339332927235}, 1.1068131819359799`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{1.4308870461703727`, 2.128227689958971, 1.4138958969708257`}, 1.1287008143693926`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-0.8664216341106908, 1.9654236788257873`, 1.3779819488620444`}, 1.0721038684207627`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.6122619097534754`, 4.014881201439789, -2.083733281137886}, 0.9176724899801458]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{11.547131303958865`, 2.1131117482521016`, -0.9547902336225446}, 1.0416871999491553`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{10.689337245835537`, 2.376318476670064, 1.005132000376172}, 0.9210922295753428]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-2.165249251548869, 3.709253029524086, 1.632787990526087}, 0.9229361948217829]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-5.504815384642697, 1.6011195508198317`, 1.0588625444987718`}, 1.1114179503558625`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-7.674286398730381, 1.7238468420402204`, 0.8060151223009737}, 1.0740959289044496`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{5.08603150951553, -0.1863383351771042, 1.9054081591823313`}, 1.3273393361300347`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{6.460422912923847, -1.8487067337161187`, 0.1654510037905086}, 1.3596687441880437`]}, {Opacity[0.5], SphereBox[{5.812383685936266, 1.859410439162376, 3.364549058314899}, 1.1997263279567294`]}, {Opacity[0.5], SphereBox[{8.18822315791745, 1.505226581058213, -2.7863298298161734`}, 1.201748026863679]}, {Opacity[0.5], SphereBox[{2.4497726542981457`, 4.092488533092707, 2.305774417060503}, 1.2026037034225578`]}, {Opacity[0.5], SphereBox[{0.31940921542515005`, 0.0518862575067538, 1.022563047693959}, 1.150468010128111]}, {Opacity[0.5], SphereBox[{11.00987138881036, -3.149015110891292, -1.2753175721755763`}, 1.2574891973838547`]}, {Opacity[0.5], SphereBox[{10.503015682362069`, -2.807564942743281, 1.0948016188585297`}, 1.2575269569774465`]}, {Opacity[0.5], SphereBox[{9.596707047880477, -4.740972325603053, -0.0825924332078426}, 1.2587623211152228`]}, {Opacity[0.5], SphereBox[{5.214047185351383, -2.0899482779919056`, -3.876203942554613}, 1.2595225714770626`]}, {Opacity[0.5], SphereBox[{7.4569711767375955`, -2.761105775151482, -4.573751572419104}, 1.258113346067062]}, {Opacity[0.5], SphereBox[{6.082551518671258, -4.296656143124742, -3.271183234048152}, 1.258708542853591]}, {Opacity[0.5], SphereBox[{13.407867419757007`, 2.5922068820658164`, -0.914247792632984}, 1.1326445720179166`]}, {Opacity[0.5], SphereBox[{-4.225749572255871, 0.20282493778236432`, -0.32023082853874896`}, 1.2595751203461338`]}, {Opacity[0.5], SphereBox[{-4.4045531578739325`, -0.14714717595865612`, 2.1650478147055514`}, 1.2589893856854197`]}, {Opacity[0.5], SphereBox[{-8.011347170657727, -2.441943117160255, 0.428953006610887}, 1.234089528090295]}, {Opacity[0.5], SphereBox[{-10.81820776574568, 4.1131516821956, 0.19533380874314593`}, 1.2370389946362135`]}, {Opacity[0.5], SphereBox[{-11.619983863755635`, -4.0271069611355905`, \ -0.5694124907007485}, 1.2371275329651534`]}, {Opacity[0.5], SphereBox[{-14.466117899607415`, 2.5161414488774567`, -0.8097915359214832}, 1.23721297165542]}, {Opacity[0.5], SphereBox[{-14.894495214936292`, -1.5833410487074426`, \ -1.195541033086732}, 1.2369680734201314`]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.111307231968489, 2.324500258316815, 2.707736754420446}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.1103341973878518`, 4.750077919982203, 2.8952640117611383`}, 1.0875]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{3.801669673761628, 5.4025314095623145`, -2.6691835820970287`}, 1.0875]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{4.295763760894215, 4.625323448936527, -0.5227933381400449}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{11.08556110900108, 1.6409501360788723`, 2.312466174313704}, 1.0875]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{10.867773712578192`, 0.8512062551366048, 0.19109412252782154`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-9.153450827655732, 1.0196553789165608`, 1.7662434596502767`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-9.450890877799326, -1.5994422436285858`, 1.4818549593757557`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-11.266187769157852`, 2.5540370332800455`, 1.3289694942999455`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-11.789518348482872`, -2.6376069088660756`, 0.8322794052161906}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-13.607615158861067`, 1.5281973030591274`, 0.6793882285688768}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-13.878391408100391`, -1.0808460430482023`, 0.43240469898557304`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.2872065443367533, 1.2582108735833877`, 2.563647813921598}, 1.2465]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-2.0056687760315115`, 2.7777275356831836`, 0.1576531495795538}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-2.4194656726121497`, 4.830436522017795, 0.7438446602388609}, 1.0875]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{3.031523320238371, 3.527888438437684, -3.4586221959029695`}, 1.0875]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{3.3481483271057852`, 2.439206619063473, -1.5437825818599547`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{10.552940062998921`, 3.687625923921127, 1.804472039686296}, 1.0875]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{10.23250310542181, 3.284326606863395, -0.4380779125278219}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-8.494041738344269, 1.2158597210834394`, -0.7329932936502767}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-8.843861732200674, -1.395354316371414, -1.0299898953757558`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-10.636304492842147`, 2.705564976719954, -1.1809681902999452`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-11.172906643517127`, -2.4552479731339236`, \ -1.6789027992161907`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-12.986888821138932`, 1.701451172940872, -1.8314249365688768`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-13.267262473899606`, -0.906362476951798, -2.080676626985573}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{0.3067261656632465, 1.5294367724166118`, 0.08552261607840195}, 1.2465]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{4.297271371994769, 4.507760091028999, -4.024097769135669}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{11.974677577233807`, 3.0748108718859744`, 2.5009986813995617`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-1.1928646903822369`, 5.511683480855285, 1.9917679994781001`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{2.2011569199504173`, 4.928725022624076, -2.9788537979463845`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{9.807640466305932, 2.6045649270089077`, 2.878500250738863}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-3.396071408281821, 5.434707203473828, 1.8866980484600495`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{12.246497957853624`, 3.0685954751399853`, -2.746137187945976}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-6.722156544663889, 2.7779016382106163`, 2.366613826345481}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{12.794619398752642`, 0.8941793854411175, -2.2073732160756716`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-6.433159180475445, 3.2941313453821115`, 0.13753857516490164`}, 1.125]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.4], SphereBox[{6.69474313042565, 3.371154632090539, 0.35274503086245224`}, 1.246]}, {RGBColor[1, 0.6666666666666666, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{5.8133487439212335`, -2.8399397032912703`, 2.853473834344274}, 1.46]}, {RGBColor[1, 0.6666666666666666, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{3.662597535275366, -2.4735571287104343`, 0.8045516670690356}, 1.46]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.583460584999999, -1.723311915, -0.990977577}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.550138409, 2.067766431, -0.123491895}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.923230433999999, -3.2676314459999998`, -0.226782897}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.458408792999999, -2.8374223439999997`, -3.436551729}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.35065631, 0.86586054, 1.0382200769999999`}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-9.147376305, -1.4973982799999999`, 0.225932532}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.951246131, 2.629801005, 0.074000652}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.481212496, -2.5464274409999996`, -0.423311697}, \ {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.29725199, 1.614824238, -0.5760183539999999}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{3.4165964969999996`, 4.465209924, -3.063902889}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{12.483792830999999`, 2.155713069, -1.735783935}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.819250586, 2.66428803, 2.058469107}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-2.264899935, 4.790257221, 1.819554336}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.129317538, 2.061171378, 3.8194616399999997`}, { 5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{8.198746905, 1.661216373, -3.3552379379999997`}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.3924546849999997`, 4.582541397, 2.629290786}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.328448757, -0.488619729, 0.900914475}, {0.296966355, 1.393823823, 1.324585215}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{11.433138527999999`, -3.102811812, -1.6837415969999998`}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.728847338, -2.628364833, 1.609570872}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.469626846, -5.314384413, -0.026474697}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{4.729994688, -1.7991833699999997`, -4.047227180999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.845769842, -2.731391277, -5.016529898999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.936265786, -4.864598019, -3.2068209}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{13.777216892999999`, 2.766671976, -0.5858825879999999}, { 12.483792830999999`, 2.155713069, -1.735783935}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.177162953, -0.055084755, -0.848645373}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-7.5618991079999995`, -2.815634103, 0.50927415}, {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.765677591, 4.698852432, 0.243242184}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.674774467, -4.611718365, -0.6270969449999999}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-14.927590664999999`, 2.871984957, -0.902086089}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, \ {-13.572826940999999`, -0.99360426, -0.824135964}}, 0.1]}}, AspectRatio->Automatic, Boxed->False, SphericalRegion->True]], "Output", CellChangeTimes->{3.576557296936911*^9, 3.5765575330277257`*^9, 3.580218413254977*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"Show", "[", RowBox[{"Plot1o", ",", "Plot2", ",", "Plot9", ",", RowBox[{"(*", RowBox[{"Plot9a", ",", "Plot9b", ","}], "*)"}], RowBox[{"{", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ "Plot1o", ",", "Plot2", ",", "Plot7", ",", "Plot8", ",", "Plot9", ",", RowBox[{"{", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ "Plot1o", ",", "Plot2", ",", "Plot8a", ",", "Plot8b", ",", "Plot9", ",", RowBox[{"{", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{"Plot1o", ",", "Plot2", ",", RowBox[{"(*", RowBox[{"Plot8c", ","}], "*)"}], "Plot8d", ",", "Plot8e", ",", "Plot9", ",", "Plot8i", ",", "Plot8j", ",", "Plot8k", ",", "Plot8ia", ",", "Plot8ja", ",", RowBox[{"(*", RowBox[{"Plot8l", ","}], "*)"}], RowBox[{"{", RowBox[{ RowBox[{"Axes", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"xl", ",", "yl", ",", "zl"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", " ", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, 3.571838766139532*^9, { 3.571838857446493*^9, 3.5718388645757055`*^9}, 3.5723437133735733`*^9, 3.5723437554312468`*^9, {3.5723449027196617`*^9, 3.572344929582909*^9}, 3.5723450406551046`*^9, {3.57234950163894*^9, 3.5723495196413713`*^9}, { 3.572584520172369*^9, 3.5725845258195786`*^9}, {3.5726224003989472`*^9, 3.57262241340937*^9}, 3.572796748424938*^9, 3.5727968708695536`*^9, { 3.572796971801731*^9, 3.572796995841373*^9}, {3.57279741546651*^9, 3.5727974308793373`*^9}, {3.572842795856916*^9, 3.5728428061217337`*^9}, { 3.5728522627179437`*^9, 3.572852288426789*^9}, {3.5728523495164957`*^9, 3.572852453865079*^9}, {3.5728524960787535`*^9, 3.572852515110787*^9}, { 3.572852550008048*^9, 3.572852634669397*^9}, {3.5728602362372026`*^9, 3.5728602649256525`*^9}, 3.572860311756935*^9, 3.5731241886618786`*^9, 3.5731408095114717`*^9, 3.5731408826443996`*^9, {3.573211072949067*^9, 3.5732110779254756`*^9}, {3.5732129727516036`*^9, 3.573212981300419*^9}, { 3.5732130120948725`*^9, 3.57321301629128*^9}, {3.573213384015126*^9, 3.573213388164733*^9}, {3.573220427063021*^9, 3.57322044338065*^9}, { 3.5733208085662665`*^9, 3.5733208285343018`*^9}, {3.57332089027921*^9, 3.5733208917144127`*^9}, {3.5733209483737125`*^9, 3.5733209652997417`*^9}, {3.5733210904587617`*^9, 3.5733211330312366`*^9}, {3.5746581574587035`*^9, 3.5746581598923078`*^9}, {3.5746632559372582`*^9, 3.5746632963569293`*^9}, 3.574669479281269*^9, {3.5746708530664816`*^9, 3.5746708831121345`*^9}, { 3.5746734822639*^9, 3.5746735338531904`*^9}, 3.5747441301394944`*^9, { 3.574950644335537*^9, 3.5749506488751445`*^9}, {3.575001627819734*^9, 3.5750016487549706`*^9}, {3.57534426719551*^9, 3.575344278926731*^9}, { 3.5753450565880966`*^9, 3.575345065324112*^9}, 3.5753451320610294`*^9, { 3.575345171575898*^9, 3.575345181091915*^9}, {3.5753713803366737`*^9, 3.5753713843458815`*^9}, {3.5753717979962077`*^9, 3.575371802036615*^9}, { 3.5753718416450844`*^9, 3.5753718456074915`*^9}, {3.5762957927843523`*^9, 3.5762958073859777`*^9}, 3.5763800020834436`*^9, {3.576425043829154*^9, 3.576425050817966*^9}, {3.576426711141282*^9, 3.576426714510888*^9}, 3.5764879169201612`*^9, 3.576514735166633*^9, {3.576552682542408*^9, 3.5765526891724195`*^9}, {3.576552787327792*^9, 3.5765527915397997`*^9}}], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.0297577989999995`, 1.361188704, 2.241203097}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{8.162200106999999, 1.119496074, -1.379537691}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.821956044, 3.532265034, -1.0332879599999998`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.591591271, 2.879978388, 1.505316123}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.583460584999999, -1.723311915, -0.990977577}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{10.550138409, 2.067766431, -0.123491895}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{9.923230433999999, -3.2676314459999998`, -0.226782897}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{6.458408792999999, -2.8374223439999997`, -3.436551729}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.058488004, 2.5511138969999996`, 1.4326949519999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.35065631, 0.86586054, 1.0382200769999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-8.823746283, 1.11775755, 0.516625083}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-9.147376305, -1.4973982799999999`, 0.225932532}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-10.951246131, 2.629801005, 0.074000652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-11.481212496, -2.5464274409999996`, -0.423311697}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.29725199, 1.614824238, -0.5760183539999999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.572826940999999`, -0.99360426, -0.824135964}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{5.995356705, 2.188556055, -0.173379975}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.296966355, 1.393823823, 1.324585215}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{3.4165964969999996`, 4.465209924, -3.063902889}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{12.483792830999999`, 2.155713069, -1.735783935}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{10.819250586, 2.66428803, 2.058469107}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-2.264899935, 4.790257221, 1.819554336}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-6.592690875, 2.2941524909999997`, 1.078319511}, 0.178]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{5.151794625, -1.994824011, 1.512988305}, 0.5]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.129317538, 2.061171378, 3.8194616399999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.198746905, 1.661216373, -3.3552379379999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{2.3924546849999997`, 4.582541397, 2.629290786}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.328448757, -0.488619729, 0.900914475}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{11.433138527999999`, -3.102811812, -1.6837415969999998`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{10.728847338, -2.628364833, 1.609570872}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.469626846, -5.314384413, -0.026474697}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.729994688, -1.7991833699999997`, -4.047227180999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{7.845769842, -2.731391277, -5.016529898999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{5.936265786, -4.864598019, -3.2068209}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{13.777216892999999`, 2.766671976, -0.5858825879999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.177162953, -0.055084755, -0.848645373}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-7.5618991079999995`, -2.815634103, 0.50927415}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-10.765677591, 4.698852432, 0.243242184}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-11.674774467, -4.611718365, -0.6270969449999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-14.927590664999999`, 2.871984957, -0.902086089}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, 0.12]}, Text3DBox["1", {4.429757799, 1.361188704, 2.241203097}, {1, 0}], Text3DBox["2", {7.562200106999999, 1.119496074, -1.379537691}, {1, 0}], Text3DBox["3", {3.221956044, 3.532265034, -1.0332879599999998`}, {1, 0}], Text3DBox["4", {1.9915912709999999`, 2.879978388, 1.505316123}, {1, 0}], Text3DBox["5", {6.9834605849999996`, -1.723311915, -0.990977577}, {1, 0}], Text3DBox["6", {9.950138409000001, 2.067766431, -0.123491895}, {1, 0}], Text3DBox["7", {9.323230434, -3.2676314459999998`, -0.226782897}, {1, 0}], Text3DBox["8", {5.858408793, -2.8374223439999997`, -3.436551729}, {1, 0}], Text3DBox["9", {-2.658488004, 2.5511138969999996`, 1.4326949519999999`}, { 1, 0}], Text3DBox["10", {-4.950656309999999, 0.86586054, 1.0382200769999999`}, {1, 0}], Text3DBox["11", {-9.423746283, 1.11775755, 0.516625083}, {1, 0}], Text3DBox["12", {-9.747376305, -1.4973982799999999`, 0.225932532}, {1, 0}], Text3DBox["13", {-11.551246131, 2.629801005, 0.074000652}, {1, 0}], Text3DBox["14", {-12.081212496, -2.5464274409999996`, -0.423311697}, {1, 0}], Text3DBox["15", {-13.897251989999999`, 1.614824238, -0.5760183539999999}, {1, 0}], Text3DBox["16", {-14.172826940999999`, -0.99360426, -0.824135964}, {1, 0}], Text3DBox["17", {5.395356705, 2.188556055, -0.173379975}, {1, 0}], Text3DBox["18", {-0.30303364499999996`, 1.393823823, 1.324585215}, {1, 0}], Text3DBox["19", {2.8165964969999995`, 4.465209924, -3.063902889}, {1, 0}], Text3DBox["20", {11.883792831, 2.155713069, -1.735783935}, {1, 0}], Text3DBox["21", {10.219250586000001`, 2.66428803, 2.058469107}, {1, 0}], Text3DBox["22", {-2.864899935, 4.790257221, 1.819554336}, {1, 0}], Text3DBox["23", {-7.192690874999999, 2.2941524909999997`, 1.078319511}, {1, 0}], Text3DBox["24", {4.551794625, -1.994824011, 1.512988305}, {1, 0}], Text3DBox["25", {5.529317538, 2.061171378, 3.8194616399999997`}, {1, 0}], Text3DBox["26", {7.5987469050000005`, 1.661216373, -3.3552379379999997`}, { 1, 0}], Text3DBox["27", {1.7924546849999996`, 4.582541397, 2.629290786}, { 1, 0}], Text3DBox["28", {-0.271551243, -0.488619729, 0.900914475}, {1, 0}], Text3DBox["29", {10.833138528, -3.102811812, -1.6837415969999998`}, { 1, 0}], Text3DBox["30", {10.128847338, -2.628364833, 1.609570872}, {1, 0}], Text3DBox["31", {8.869626846000001, -5.314384413, -0.026474697}, {1, 0}], Text3DBox["32", { 4.129994688, -1.7991833699999997`, -4.047227180999999}, {1, 0}], Text3DBox["33", {7.2457698420000005`, -2.731391277, -5.016529898999999}, { 1, 0}], Text3DBox["34", {5.336265786, -4.864598019, -3.2068209}, {1, 0}], Text3DBox["35", {13.177216892999999`, 2.766671976, -0.5858825879999999}, { 1, 0}], Text3DBox[ "36", {-4.7771629529999995`, -0.055084755, -0.848645373}, {1, 0}], Text3DBox["37", {-5.025526223999999, -0.5413423589999999, 2.603534175}, {1, 0}], Text3DBox["38", {-8.161899108, -2.815634103, 0.50927415}, {1, 0}], Text3DBox["39", {-11.365677590999999`, 4.698852432, 0.243242184}, {1, 0}], Text3DBox["40", {-12.274774467, -4.611718365, -0.6270969449999999}, {1, 0}], Text3DBox["41", {-15.527590664999998`, 2.871984957, -0.902086089}, { 1, 0}], Text3DBox[ "42", {-16.016380467, -1.816209567, -1.3421972189999998`}, {1, 0}], {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.583460584999999, -1.723311915, -0.990977577}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.550138409, 2.067766431, -0.123491895}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.923230433999999, -3.2676314459999998`, -0.226782897}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.458408792999999, -2.8374223439999997`, -3.436551729}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.35065631, 0.86586054, 1.0382200769999999`}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-9.147376305, -1.4973982799999999`, 0.225932532}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.951246131, 2.629801005, 0.074000652}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.481212496, -2.5464274409999996`, -0.423311697}, \ {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.29725199, 1.614824238, -0.5760183539999999}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{3.4165964969999996`, 4.465209924, -3.063902889}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{12.483792830999999`, 2.155713069, -1.735783935}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.819250586, 2.66428803, 2.058469107}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-2.264899935, 4.790257221, 1.819554336}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.129317538, 2.061171378, 3.8194616399999997`}, { 5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{8.198746905, 1.661216373, -3.3552379379999997`}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.3924546849999997`, 4.582541397, 2.629290786}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.328448757, -0.488619729, 0.900914475}, {0.296966355, 1.393823823, 1.324585215}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{11.433138527999999`, -3.102811812, -1.6837415969999998`}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.728847338, -2.628364833, 1.609570872}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.469626846, -5.314384413, -0.026474697}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{4.729994688, -1.7991833699999997`, -4.047227180999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.845769842, -2.731391277, -5.016529898999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.936265786, -4.864598019, -3.2068209}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{13.777216892999999`, 2.766671976, -0.5858825879999999}, { 12.483792830999999`, 2.155713069, -1.735783935}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.177162953, -0.055084755, -0.848645373}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-7.5618991079999995`, -2.815634103, 0.50927415}, {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.765677591, 4.698852432, 0.243242184}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.674774467, -4.611718365, -0.6270969449999999}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-14.927590664999999`, 2.871984957, -0.902086089}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, \ {-13.572826940999999`, -0.99360426, -0.824135964}}, 0.1]}}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->True, SphericalRegion->True]], "Output", CellChangeTimes->{3.5765572969837112`*^9, 3.576557533074526*^9, 3.580218413286177*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztfXdcFNca9nMDGhOTm3a9ppmem+SqiUkssWvU2BXssRsRa1QsicYeY29R EQELRRDELnYUQRREEBFBlw6KSFEEBam7850zM2f27DCzrt/3+/678wtxd3b2 nPM+b39P2b7j5kya8Ou4OZPHj/uo+6xxMydNHj/7o59mzCK37P4B/GMS+Rvw EehrAWD/E8h/wmT6P3rnf6//9/r/0+sm9H92VObacHe/EV+Lt8VX9K8V9/l7 4us6qKioQHh4ONasWYPx48fj+vXrqEs/s6ffrPOMVt4WX78ktpKfnw9/f38M GTIE8+bNE1vy8PAQWy0tLcU/9dsqUkh4gb56gb76SPyortg0a5ZedLCkuRfk 1g4fPozZs2fD3d0dryhflpF4JP5jb9El60Q1knfF/9dT8KDdde/eHSdPnhRH v3v3biQmJtrJLV68eBExMTHiY4TQ+hottn7uMTTkSNYYg538FXko4rsXZDYm JSVh7ty5ChvpkOsrcDz/UP5lfSj1OLQo32m3w4cPh4ODA7Kzs0WGEY789Nz9 vqHqlzbM+iUN15fljb6lt6mMRUdHw9XVVfykpKSEsQTdnrtzSUJftKBq+vTp ojRTqiior8vPPH78GKtWrVK+S3tmwHflpFrE30559ZqGVDNCyFffkkfFt85G Sh+ndNN3XTgdfEGHVfQiTTaUB+zs7KwMVg2V3JyJ02YtHaCf0nv0dUNZApYu XYqnT58qzdLv7t+/n2Hxo9RytXVxspdJpGCzhv6t0QH/NRkOuYMKKx0Q1n0k CwG1FikpKeI7cptBy2PRWWqwjJOFtLQ0RRB5WfiEs0GsVXuuSSYPnaQmn8hj 1DKU5LHP5W8y0yIpdm3ed5RaK7YO6ZfyN2/duoXjx49btMaTK7f2kCNX3Rpj +X91m7RXs72D1GqB9TEy+FkH9N1XGp3Yy13x+sgQkXu6b72nOlZ64nXNXm5G ZomFohCut5c6y7FupOpp2Gmtzupx7GCi8q5iKSSRxXrlhmRFwC7RdPW1wWK9 LHdDpZjRxFjJGwU2HF7W3tOwko2kYWxQfaRnVHtZt3ht5K/was4Dwzj2noYZ F+Sg4R1pABtlMVE9Ir7vqSEf9KKAkebb645CEm2DwcBYZOaQnQa1bz8fOF3l nvQsLv2X3O+gYWhelKnlLQljnU1j5CSrjoVksdddrOsUa5oyknZM37XXHai2 TpH3b2swVgcteeBbND7qYF0lf9KwrSxm43grOZ0XlP7Vekf/lYVts/J5ext0 sIeGVXtFQ9/e16c6TqZQx3v0ttJDLT0Sxy1FvIixzuV+uu3WMvotpQavcHjo uRIHDXNYn7PyKicvyZA46qZSJ5etj1rLs/TX7bOuwieVbDLvppLNJtKLi9bH wHwOZRD7MqObt7ssL6JNMDm0t9rxBR1h37x5M6VkhIYxe40TNvoV6Z21Ts5b l7dRVjrh5c16J24KXz/haNJwE2M1DAvrjn6FPk7Bs97dNu1PP9BhJL1I3+M1 +n6FE3J+uExoaTPmqL+p1e7fe4YTkB9z0rVh9iJKGuLPM+Jbq2N427oss6iW Shj71i8aluFNlSzTd82sdtzAuuGeptEJS5J4Wf7Gaidv2mCip1vpicfxG7Xk 8imrhuS2k9vIupmlDOk7DVP0JmdUGQcIhHJ3ezX4Qy/aIelExNhcQBFf1ZU7 OeR9Cv7DT+DxLn98r9ExGz8lkhc72jSh4WtpAHueIaQUSgJtc7kDngFarpwF D2s7rUd+cC4eFT4G+y5vHP/FcWDZsmViV7I2eVsXWdaDPDDx3fc2jo7d85ji hVwPEsGXPEULDYPXQEPcZVOzy7pct1HEx2wlmJKtc3LDzUURqLzzEC01ev23 fI82yZxLY6lXTxsEvb0uwfUs7tG/WzEpODP+MIy3imCqqWKj4S0hGw3PIXk0 7jIGOi6ks+5A6ir3bsYYsKO3Byoj8iDU1LTSGIAkInVq6R9lSGPeLOiKSmcN 7WEicHDmQZTsz0DNk8f4QcMCs0IZjSLVdRJCp5RoySGrdkxE39Nxf6n0ba8B DIsm0pKykO5laW23TtqB7L+JIBSVy6U+SzP2tgaLpIQUm6wjw1DgY/z/yuNR ywq9XpSN2FyHYOT4ZkOIj0BNWvLr8u1g97OInXMepqxHKKt4ojXWdzRUSqpl SAmLbfGW5Vgt8zDOONaBIUPAwRsCHpZUQkiMQ/kBfzkgsxdl78iIQNTEPySy V91GY7TvyvdYNYW++0LqaY11A1BPY7RfKqZAbZTo9ZI85LAsAeF3BFQUlcIY egyVF0OVOIAO2bWbK8rP3UNVeWlbDXP/DudnuOBdHvVKlQHRUFvZJtVKxcWB vyxTfTOlCvuTBCQ/EGDMvY98D0/C9eSX5AH5Td+LB3uSITwpQzuNQb4t00pL KKzqdvToUXGw8kj/4vC1UlewNC7kekX+XgoZWdR9AYXFNRAMiag6HoTiawbm NTc6uyN11VUIheUSZPZQrDXYxZiYSpTytu9Z8R2LGXgvxgr7Dx8+VAwEZyT+ IzW6zIqRoNJDa0mtrRqJV2TYzqUIOJUu4Okj4jEunUbNlXAlpUiNScelaacg pBWjurr8XVUzZiK17c+qn7YiZ2cqKtJSFVJ558QqRrytkSqbWGybreHLZlK+ 9DL8Yk24WSCgJq8QpX4+iNnvi12bNsJ//UZs6/UXqmMeUPfwvrZkipSwXM5r mg+ytybhfmY5KsrKtWhgWThvgz6TaFhgmw2i1DNG91GUQ8K1Hm7lC7hwV8D9 YiNMackImjgWEz5rgmWd2iF45+YPNFiiH6XYw3XyTqSuiUNlbjmeVpWzkIn3 kY007FQdBRqJZ5hn3WIN0QBXkcO6+Gt7BA7eFrBh9u/4o1tnLO3ZGusnDdUn pna0sYnoXOKSKBjvVKK6prqBBiFs2pK3TSxprqeBkVw8masya1px0TBt+uzk r1LTOnvUZjR9vxN6te+HCe26Y9lPLbF22s/yqOqqv8r+fUFugv94PQnyYueE wZReCZPRqIRRfGzxrtwslSY6Wr4qSIi2Qu9s+Zs8TJxxHFlLJBc6ecKhxTEM GF2Mdt2d0blDBzi26wbfYbtRtN79fcsvcD7KHqudtiJi6mkYb5dDMJoayqPi 3eSHGuJXV3/0M20whFL94dVakAe6n4HDt95wGHAfY7YKOJMmfRYTcxW+HiGY 3NUgdWqniD8bSdqtO9jeZy2MGRmyabNHWkwaCYCPoDqeKLNReNsKcXwZ315B SdatX5/f9o1USc3NmGTxtUO3FPy8vAZu0cwq18HN2KdY3v8mUp03o+K24RlW 3B5Bu/NweUcxhBvRMMZGvCHfvk3C/UPDA1AVXULMqfCOBrUfyffowOmcu/Su dk9ydXHK89vLkfJXqMKxa/DsCmwIFZBZIrAQc8nkbHj/fAWFG/dYp7YuUg3l 8L9MEKTBSH4hhLgwGpXycd4eRy+UhxehpPQJ84h8PMKopmTQiwqxmccyrd0U iTIXj9+zTv9Qy6/Ym8WxDlY4+cGh5SkM+OUxpgSYkFYkSOEVq9kXrtlmYT7p xYLEtIcCfGIFFJdUkyA8EsZrEUrZltLr2csdZWcKUPW06j0Net+XzYI6DGzY sKGSW5HhS6KPn7Qtp5bPasCpNj+tKpcuRSFgAqBjTZm6Oo/KxS/uAkIyBY60 UvHR+AneqEpO1hoBQ2g3UZ8EGlJQgbhOBCI9Wf5MQmhzl814fCQXpjIj8558 SMeKdpSRDJV169aJHoWuRpDLRTJCHRTu6lR2tUb6lnUjPkYmRO1F6fWi3Jwh qxJ3HlbKtlK6F+iZLz6T6bxWs9uX5XZTiQh5x8gidCNKFKEXOYBWd1iLhwEk xys1MSfPB1HvyI1VVlaKDo1+xuaoqEFhz8km7/lFia3E0CrBspx6jKIvWiuZ 3lS0j3zw59QcBI28iIcbdkqJwj9lHHZFCbihCEq4KCistf0zAnF/dyqEEpPi B2qXal6tBQL18vfu3VOeU5f16OvnR+RV25wMn3KO0WhGy5Sy8GR8ZwMifjmM J8dOywyoL2ZSXlcFPOIEhX4SGxWJuMhIeE/zxR3XJAgPjYohpSrCYjom5zog MR/HKizUTDASXtEY6uvPjdvL1nFjBofP3NS46TX9b0VhyrCgTxJukRC3ymB4 QzZFOy+bEJ9PZesBYt3XYFbLZhja6DNs7jESlffEcF6BjA+DX7cCGZEpNrXJ c1priZoMVTdFS8zR3TMwmaSojvkrzHEumpSG7UNjkT5+uWav9rLiphQS7b9i QhGRmy1OY/B727ZY49gVZ73d8LH8PT4cfpUjmoYjKqLZPBo1lyxrs1Psrtm/ SthjoIpAVbazUf7+yun3cHzMORIEb1dWUvDEsBjDY/0m/NRvNsb37YffO3fA vJ++w/Fdm7XoeEmmn9Lx4MEDLVrkuS17C+gJUeoR0EuqAsqpcu0Uh17Ms/6t SGMJpnYzIMYpkLjJVC26WI5GLf1CJy90+HgSmjXthx5t+mBcu58Q4PALDNev MPr4ELEuRx/tWYs+NtuhmuMyL1mUqeqnY+RZLYpeWxlVJAhe4ZBAguC/UXHL 8JIsNGr/GOh+mmQIvnAcUgjnXQLcNrui7XeN0b/VCnj3OYH8Ve7QIsuOI4uy 0tvbGxs2bBBNGXNoLD/g551fUtPU27pqMfNLb7ExsyUPSyffge/wKBL0+ihi xOiTOLUfDp1u4uel1fC4ysZMGV6Esa1iETLIF48Pn/xINnt8yMeTpfLTTLHZ RCvNUKyYkx7W6dspf3N0xyScH3cCpcEhsshYVgTo5dDiKAaS+Hf6fhMyioU6 CjlP8HvHSNwYvh6Vtw0fykhQZaLkaHnZd3UGJdPzAWcJ9YfupfRfijk9byNh ghex5sl1FWNIyBqzyYSQdEEekmwRJyTDtUcI7q30kkPr2qabBpdksI3kL9Jb 6klgFtnIg/3RugXbI3ceuKMAGwddJ/HeGqVYI8nKbji0jsBglwpsDhdw54nA DMHw5jE46hiE/JVbwZZ467ga8VMW8rAFkbzfkZeLddQxT9RSy5OYyiTn8mk5 ODAqHN6Tp8Nn4wbcIEFEoPspsx1/wRzj1oH7/AM4PMwPv7a7iuhh26hAKLMy OoNmtVM+VONTPFoXp4OSgW4vS6deQVwmN1D2sz98PBYOHzTDmE8+xYCmLqJC Dl9WbWG0rcUMbLnjiGbOSB02iTAqAau7hSF55DJlslbHbzAF4ekm/7Llr7w4 E+Bl8trYZo94pu5WJJ5pbov3v0T3j9pjYOMhosbOOGBCZrEq7KoVjdWVu55I SL0/car47s+Jqdjb7ygKVrmxVRbWPKXZsZMH2QPsohyjFoE+yJh+eosHXD9t hesjJ4ItPuPX/piBaWUdmLoawPjoutIXERt5GS0/+AKDv+6Acd37Y/HvCzCv e2OUJxk0J3z0ZeNFzCaAPfpjumz4i+H0QwzChuxGxe0UuQ5q6agoKLyjsuee oT6aXgw4iqy6f9oOBZKlr7990gUnmwzBg7b9kOvhz8+DMSwlQyfP6uuCyGaE +NWp+iDWRyKxXKu6L8eIHv0wqmcnTB89AMd9tkGIOY+aq+EWCmZnNhP1sIQg VrZ+FhcG3MXCTpeQOGI1jRbsNUBTe/dnPWMGzbLWy15TgOlzbJI7KSYZC76d i+O9FiJksD+O9vJCzJRtDWWMGWL0ItDIhvRb63geET9+rVbUI84Mdt2KslO5 SLgWhz073eC/2xVel2rEZ2sKCvDIa6eu4LGMN9A9GFu+d0bN+RNydFEfi51T 4Nn7NO6v3GERSmil/FoYqp9RJ6DmMf1TuUdDF2a+qUzsGuCH0ohSXPQ9jIuH szDNuRzuI2/gRLctyNhxki0SYBOKfCn5ZcWCSFE3vpYf1nKsL9CRHlGcEDMq q9qvxqN9mRBKqxT7Tad52CWkxKPisB/nvnhA97ZxhnD5tALOqBaxODkwAIem za0VyKgB1Ap21LV1M4CWIVZGRgYWzF8IV4edeBz6GI9KnzLZvJlUgWXrjZg7 oQQ+wy7jVKcVSPEIZnMyLBSh77SSEhnJJnLwoOc56afMfB7R1Xo7+P7qi1zP WxBKapT1xCHJAs5mCSgvfoKakIN4fDpE8UrmpJSGyXEhtcRy2oR1mNX+CmJ/ /lsMGFhgpIMq61NLq3WUnircHyMX47TraZQ9rVYSxZsGE1ZsMGHJ+EIEDjyJ 2Bk+KIoxsHlI3pmYs1etyV4p35UXcujOg/P7URjiZvGVG3ad5In0tdfw5G7x S2yYCaUIui0g7ZEJppwsmC4fpzMLEqUNLHgdRCQ4prez4kPU0eFCJwM2dj+P qL4zUJKUpRtJmpM/9SRTHRHNTV09cPfgXSxevEQ0FYwpN4kgjJ1QgbVj7+BQ vwDETvPAgxgDS6F5LSYAvaoBpXQP/7FuWs/JDdKpuxvzL8KYXYaq6sr6chMZ jwTsiSMxxONKInLhMF67qEBESaYXDelShk4SX1OSmVD83DkIbnO8sXjuHB6S f8tyRalf18kVhYcfwPhUUPI22kQ9GaHAYyZMdK6A62gDgnt4IGPnGZmuOhZL +6hc0KDbCg6fWschVMYhmCTSEVNPwphcCpOx5p+yMbicIyAmz2z6diydJ9JE Lxrn5ZI4j9MZdWzn4jIP69zOoKy0TAnPKP0rO/6NvKB8CE8FZhVYUCI1h9rL t+pgyZoKuDiXYedwYlG7rEeG5wllwTWbsJNMlNSTSsFlM/aRBiD0oqAQQMLk LxuIPw8evQ/V10voTGh9RX1JZkzJm/XXDniEpkmdpCWiMjhAkgoSTPl17yq+ psEYC9goahYpuITEsvbrkOufS3yNwFwNbZ0+ydsme5kwC6N0uwbLifGZ71QE v8GhCGjzB7L3hmgKg7luIYqYaN3+IbXeSPYlOpknM2Jh3KD3OOxCZcQDlJaV SQrzpmIH6EXDKHrxMwNnEoySohRLdZ5fevfBtJEjxNdcWMZmZwJnHsRd7xwI T8zzonyUYImLlp8hZsYgYPVG4vX6xuLBgUyU3IpTJowYsdTI0ota0wbyZ7w5 tHS4cuHB+tIDJtCsxE3fhXLguXbZgtKTuagsK+OLh3z8VCsGZfUI+tDEaXMw fYYL2H4Wl3bfIY5YbdoUg893+j5kemYTF2uuW9D4gF1aEyjKilW3x7ieVSEP Tfo/LxfM5VO9oRiwqrhK22TE+LXoGh4tUu50RftVKArMIGpQrXRqLSiSosrX FHusfm7i8JHo1KI7xvVzwJSe/bFulBuCRl/GwZ/ccGHqbtwkgLE8Z9c0P6S5 pkMoYqbDTtRBRpA5zHtD/pSpBs9ufrb/LRW8Ch7/UPROVj71inmVdb4iN+Qz zYdkZsQkFNcobsbqDEtdC4XkvNALsm+YP24HfiT53ugBvTCkYxP8tWoXtgaS tGalEe7zHiLAKR6Hevvg4oy9uOV+AneJ5LJ4cfsUbxg2pkB4YI4XmXKaWa81 V2wZa75ltqmW27JkcN60Ds5VuUnXiZ5IWxOLspwSuR3dWpE1cBRrQgOUHGyY not7OSZ4emxDXNxVueWXEHRZwCb/asxbbcLWRY/hNyUFBx0PIajjKtz2IHkT AYrJyZbJO5G45hae5JRLQNnJRsvT05PfaC0KF1ulwofX5N93NOXmNc4Qae3L oo3EyD6chjjx80gMk0VCnJpK63W0Z9VnOOMxred53LwioMbI9le+hJt3BJyK EjBrjYANS5/CZ0Y2Dgw9g4NdNsKwMxTXid69KhO6aeIOxC9PQHlOFZ5WVzG3 xQIBs9RI04Xq6eC3FeRe4DGxw6VLl8SHzdm5pShGyw5PDHmmnIDRUIrwsDBr eOjNfDBz8deU0zjlU4XHT43yNCaBgqQzxwgUU1dWY9VfVdg1J4+YoEgc6r4d YVO9kEigYJHKBmdPxC6KQ+WdGsKiGkYJ7ZJ2Rd+xpVh8oPMeT3hd0W3QiUUW TdK7xM5Gc4RcOXcVx0YFojquBG6ubgohWpm8uszEZgkC3cOxZU4+cnONYHOf BwmhivmYXySZjz6+xHwE4JbHCeTEGJRKicemDWIleO2oVYj6/SqqsmqIDJle V1kS2uUzia6jrOMIDQ1VCI9SsY5SM2vKb/DtvxMVFx+guLhYt3bBU8wklbpt l74XcesakXaT8JYieYTZZlvwhNiCVBwcINmCKY5D0bnRhxjw/meY1bQF0k7F wmgyvclRyYbLb3rgI1LzVmmFxfyqFY7iCJkNWsWs4AOnsfVHEnOcuIeqsqcW sbqee2W8WDktFCEB1SghOa9kn/5poUrsNVX7k0QEXES1L0fbjzvA8dO2mPxt O6x07IEZ7b5kK1l5mX5LJpyth6S8YlVH84osyQgokT61TeyIEKbePPOlDZVv PHOtyor2K/EwIF0MOfSwYI480D0C2+c/QO79Cplbuktnqdp/91krdG76Eya2 6oQ5PzaDc7tP/8XxnZUO2TqM2mfA1Gr9X5YY1J7KtBPBYxiE2BxCvQjvad7I cotHzIXoWvatAacAcwdcQfINAdUmQQcCFqg7Dx2JDl83w8S2Y3HKeTwOeG1R /D+ln3m/Bhz9LCZ4fvrtVS3Tz07pyACjn356PMgTLgOaY5VDc2zp3Rxx3tsx 33kh5k2Zi9/n/KZgwKaBV0+/hAsHalBEctkGijNni6g8tm3D+O8OIW2GF2ru GBhreWf2BqfmtELOnLyyvfS5yK7DkU3Ji4uLQ7D16OcFOSBISYrFtKHfY8Gw Ntj6849YPW4YZk0YjxkTnOA/aigKzkaguqaKrRgNdL+MnUseoeih2Qvx43xR ec6AU0MPQLgcpjzHa/vrnDNnSQRz5rbRz6+aqatB/2GOfg13bS/TTz9e88cE TCN0TyV0/+rshJ2ThyJqalfkzemJqr8d8cBnGttcIxb/hsQhLUkUfnPcwQi/ GZOH1T8Go8wrSCGcDYu3IjQoo8OxXc5rH71gSXCQfI+P2ezN8bRlfkSdwp9L F2Hy+DH4fdQA7BzbG+fn9Ma1xb2RuXQQqv3G4oFvb9x1a4PC8O2K4K+ZcRUR x4worxLkapIdJjY/guxZOy0iE96lMTfHO25zIVBl0ak1p6On7+ppUClNJb9v NRLjUy36rzrCZ9Y/2G87Zg/ujL+G90aAiwPOLR2I2D9H4EnQFDw5NQq5R/vg 7qEuKLm5k9G1z/0KfFY8xqNitnPEDoudzuH8iP0QIs8rONFhBQUFychL7FW5 9PcsCee9+Usc4dSM0QH7qsy4/jyWeWKPAmOeXCcfnAncjdkDesiZGb3qImnf b2BXbvhA3A3vhZJ0L2ZTkq/EKuMyL6xOweKRichIFlBlNDIgAt2vY1PXY6jw CVC2+zH/Rt/Vl7mqc5YTc/fv6gNTn4OXidcuDWDUwRsrmamNIb2oVvISwya/ zvh7Eax6Y9nMweL9MN/RuBi8AI+SFqA0fqx47+71fii+46PMnp7ZshO7Pm4H Q9N2qIiNZSSsnxWPqFMmojVGuRZth6ktj+LeXA/x3dsqfvMRNtUatlaEuXd+ NlY+toRlTHxExO7xEZGHDdGAvcwnaytDwK/YYPHOrP69sWDuUBGak4FjEXl2 ClJTl1ls0/rt0674relYFHYfipI9e9gYF0/wx951pSh5zDZa2mGJUxgixuwj ihWiyBNzonxkysdMKjh4L/lPDTjYBmKrBZR6ujkwj0StyiPMpdqTvv5wmSHJ kf++sQgJ+UWSvcdLkX1vHHiA0q4mYQJdITLOGWUJN8wr4NPx57hkZKcTg1ZT zTAKdE/A9u7HULnHTyli8Y6W7RxUL/in+veuPlavaWC12XpEYUvNoI5KZLTW J9cjXi5RvL/SZxR2nxojvj52eyoKM89LJktQ7eXmG2GBp9uWcLT4dDX6fL4e MedMKCPDYod1zWh1DPnz3DiBsQzGGWjsNEK+1GAFtNc1QNtgO2h8rs3NEChb K+h1OycJZ24eEF8fJ0lWcrYABRPS9dhmzgoa+stM6uLqlXQ0+9QPHT8NxthO kZg+8CgS47IYQMucLiL6lwCYok5DvW2GDompEj+pqdI8PlxhNTBq5Kl9E8vl 8kh0RMWWlLyhIk3ctLAdygvLIDwu4Oi1w2gOF61l8CwRpvHdxGHe+Oq9y3D8 NhUuPz/EWIds7PdNVKQn0D0Ru3sdJSrnq+yKZQ6JN7t8vGMFHL4KwATwLxt0 SW+9AJ/bsrVv+w8/QQQJWU03LinJwshakNS3gERaSugNh++D4NAvBzO/XoPY Pw5i5NBiOPa7Jx/BYIc5bY7hwQJpISuDg/f6L8uMUB1Iq9IjPu57S4UIjfuW ctTqTKXZtIKCxSo7zwgoKqiBkHNLEZLhOojQlRwOzVbA4YdQOAwnArHNhDVL g3Fz9DIIt6Lh7fcE8QmVCiI/f+uP685EK+6kgd+ExVw7m4pns7d0jxSbRWHr 8sSw7U1LjLTOT+ExWqihM9ohoq49+pJ5m9sm7LsswHgnE1VZBpZCDOMQkn2f tDGz2Rbx9cCpZVh5VDodgMqPV/sZqDkYBFNFsXy6C1WfW/DvdwTGi1HKhmze q7OtH3yQo7VwyAo4DTTAmadjUGqvYbIODivb0yfX7SxHZg7pM+UKX9Bk18IR E6X9t9/tsZOtdHqxeeWW54QNeLBkK4TCzK/lAd+MuYv57YLxaPFGZf6O9+Ys KOQjHi1PKm+FYFCy9dP0HZ+hUYGk2MyxQXH4VfJ6Julr2f6xoWw6SGKV/GII j+6Jm4Z++PADdHv3Cwz9ajgcWpyEw+B8jNpkwrEkMxkHiLJFDVyIqqgT0mp9 cwJjsal3eOMNONF9OtI2uytixJtQVk7nkw0Cmdbu5Nct0ap9woq92DK9R6WF UDrDiqAQwGyZLvhWZXIPnalCbCoZUN4deG7cSLD6AgO+bIFhnedi9MJobDkQ pdC+ufU0VPr4QSh/pCzN5lXD2g7h8Y3aY99n/XGvdTc88NjBQ8c0kC3A5sMf dibXc+LHggc+JJpqXctsWbD5naXnJzGjX7iAx4WVMKVfw/Cv+mK1wzBM7d0G v3T6im5nYU5vs9N65Lish5B5TXEFteMAbeRcPumHg4QbT0ZMRomffyMVafQd S9z5uEinuvOmPmjsSFQeNIsgZ5wtCNbVi51Uy+2/0fD9ov9PNSE4hrxOT0L0 yHWI9d2Jbm0aIzH+qhJD0AWap3v9BiH0mJzYWj8+aPPw+djWdRLCe4/Ak4QE fnspCxf483NYgcxM+VuWqPFxFJNkhppCpV5x2g53uaPbuigWxtybLRu6bAk6 7FTQ8P9qSVxTGQk1lFsCa3Dvvgk1ofshVDxmVcDlzSfjqesuCGVFVrnAn1XM ZtVYG/ypQe88A2QJzzoWpLDXzIwf8bmKiF/PwBQajO4aJkr/7DgJykvHw3Fi 4d86cOtaXna2r2pY1k6qS0u8i+29vVC4ertkErhTeOyxyWkftp8SUJ1HEoqC TGb+1hA7kjJhBYTkq7IdqdWnlhFmh3fz8Q5LPdRTAczy0kvFET5YZtuOeHBp 0zTH0qGcaUVaUhmCzphQWvgYQvTxn1SPmr/+ssXX1bnqgv6X8PTYDRTlpD8j gNLa1SsqWl02ooRCuHoaUVFA4r7i+1/JwkxDyRDHFTjqmYrETPK9nGTFKtPP Ajq7wBh8AMaKR59begbxVWNZnfhIiv7xkw86Z8s2tASeBpms7tNIaZ+LpvQg Z2oRkSGgjOanCWGSxeEWLfyrljLpJb7bfs9EkddVVN9PVjiiYZte02Wo9uBu 3RFwiWaJCZeV1ccrWs1Auc9REmoQm+FeTgb/FE/jItlXfCZsRPHK7RAeZMrn 7FhGYS/ahikbCYepJBK0LXrRKFUmgfmSU7eox6/A4/0kJLtt+FFTxSVVVtlj ZmcOeGQjceNFHN+9pZadYZPsapZYMSjMq7gdFpB/3wjjtdNyKfNFrHXagPQZ 7hCyk8Q7VIrP3yBQk/SRGYojJPKN+3kJkY0oDOewZIaCtU8NBdviIB+sU1/1 OH33oYZZIp9zjs0eAcS/PyysRtW5w6jJNHTmDDC91GVydR7AYtvp0+bDZbIL LgbtEZ8xL4pQ+1I7bA8mxvQ+sV0Pc8B+GYHq8IEeS2AKC1UCOvpcYT5J0O9L noc+4952OqoDAogwFrOzkPlJVbbYk+XS1ILSo8po3KoCii+Tf8qBx7JFBpBn qIB7+UaxECbkpPxL8Q9mwj7mbB5/8ROtbMeCXky7xzUWYfNJAJSSrISlh449 REwyASs6VAFqz6SteOy6H8biHIURNxOq4HOBpOo5d8lfMtyIqOXP24Tq7Dj5 MKWXLAIs+sdvymKxqgohPiD9zApCW/dWIp3EJPRESCEvk01222pzYnzPoiA+ SzaAVr2HLQUvpkuBk4ieRZy3GP0O4saL8qpREX5U4jk3L1EHJ64ISCUG8NCK xZj84WfI8N2K0Sq6+Tk2PsRvqA/d51wTbCqPQZdbQsT6LsHDcJ0Y0LsNbISO 0bjf8ybi/7yOp5dDlOWRNlZTtYJUFtpsGHoDwqEDHHTEyV4rw66zAmru3adR 0MfsNt2f1Wm+ODpTZQmDcuKQQZgxxxcu3bpiWefmmN7qM+VcDT7yYYTwBzuo oORjTzblwU/+sXgvu0jAlXRiTzOSkeu2800NA2QOGNLg2D8Fey+Tx42mf3LQ WI/xdYNOtu51Ud9oVO0/Z8H3o2erkECPKruXoRw+4OG0GQ9XS4vNld1DBMqv G36Otp91woRuffBHm5aY2e6LsfLo+NBFfRbu2/qQsXiTzyTN5ovLMFILBIQQ 12+8exdlB7xxNSoS1yIj2fmuKi9o7Whlh7YnMWuPgNvFVeC3+arrIDbW3Fh5 b0aXE3i8R1oizqZQvYlxLsmvhJB1Q/F2Yvlo+FpUxIZLvl+iM9D9rHh6XHOC aOvWDnBo1Q2TfuyJ431/R9kNwxj5MabodNkov5WNXtypZjzdr1miz4fmX8lj UuXxWvs3ku4Ry0OccXVuAQ5MHo5hnzbC8uGDlCml2jbBclMa/Vs44RTGLa/C 2RxWdLdeRLGlosf6P+2ThzyPOBiTQmT4iSLdrIZ/OK0RZ8GUm/qBfHtz2zlE C07QBNU82vqEAyfh0MwNDj3TMXq1EbuuCfDctg2dWjRGv06bsXJAAqIc1lNu KMaCj360onOt0qeKH8xs03fs0OBaFQJ7HlZvv8tYvsIXM7p1w7y2zeDy3WfY +8t8ZBENra/h/5kVuxlTgKFOj+BxvUpzp7a2q7IOP5sJ2ed+B2kbbpL4IEaq DqlOo2O27fhFEwxZBIjsW3D/++L7MvabnDbi3oLdJDy4pUiRNKmxFg5dEjF8 UTXcIgXcLWWY2mPRzEKsGHCT8WSMrKZ8vEX/+J/PE2F83RJ/PrpvLFPM1uLw m3fYvxIqr8Jjwya0/rgpRv/UD7/374vFfbrj/MIUhE4Kw9nBPjjcYwNCZ/rC 4HlKXEieSbjDFtrQAxUdeybirxASQlbKh4vYXt3WW/PMQptA92RELyVIpt6C 1sG0Vt12HQQSv1OaX44hX69B76/WIiE6A/zysjMOf0GICld4S247tL+KobMq sPmCgKzHykmJi2YU4C+RRRvMLKqjhBls6TDNE7QmUORJAn7XBuNsU44sNmFr Ke9viRsjvvngGzj2HYBfurfEuD5tcYXEqwkkL9u8j7gpPwHHPJ/izPp8nF+Q jPMTQ3FmkBcO9ViP8zN9COdOinuVMgjNLDlY+GsyZnoLuFVcA2vbN1Q1dr08 mc3t34y5h+CZhGPJ6c/PsZfRqvlZ9O0QjxkDruPXDkcQ9Nt+5AaEIWvXKSQT Cq5JVPxLdiJ/kZT5qdcRJF6KxUInHzj8cB6DJpZiPYk/M4qFly24l4hIh42U e6Nl7tFkxcXFBQUFBcq6A/P6ZxXP+DSG5xmXgnMFBhplpMKxWxwWHBGw030b /He74cb1aObXzhgERMssZNvMzq7LA7skeXwd52Z4w+BxUiQ8nbCPzu10/vB9 9G8yH2OWVOL0XctK0f9FNMqq6x6jidU7JB15o/NTYVwFqQG+anQFP7arwISR Alx+eQr/DfeRcuwx0vcVIGN3NjK23ELaikgYfgtGwgQfRP/sihDHdbi6aC/u B4Yje7fE0zjZppjbfkkkcxKJbTu//R62dZyMhQPXwKHFEQwc/QhTibRfvCso 2wQod5c7Eu46cty1FzfeUSWLiIigOqrLWD6FaGI2BdLHfBrGsKCWw6H9Obj4 kteFpVLkJVWUbt4zIUTmLL227ZP+DXYvxdm193GeJJ7nJ5zFj+81w6APv8Gw YeHYHleDrQtcnjWzoOIcC3CXO1xDzYGTukzT0Tfp3qdYNCkUP3XKR5dBAvo6 FKFvv/vYd64YF4hnu5ZLQss8okjk70y8gIBL5N8oAZeJVY0LNyHpbCVSgp9I /PYi/N56G2kro8R+Epx9cfXnbTg3YB1iFgfI/D6N1u98gD7vfUKCro5w+N4P joPz4ewpIDSTzW0Rfk7Px5+OSbjsuMnMTykXoSUGam+tRIdabH1T43ERJvbD njyb6Z2F0xIxZasRITnVmvt6JfheMYvEfQHnCN+vEr7vPW9E+2a9MKRtX0zs 148Yno5YOKz7s3hKPmbZ89zu4XgacPHZPFVtTCZyOaj1fixaU4kLBM/oa5Xw 9H2i/LBBYp4JoTJfb+XJUwsvm9kZUiWxM6gQvRp3xqDGHTC0+TSM22iC676o txTu5Mnc+ZtyZ4RsS9mit0OHDqFRo0ZittTQkiO1V+LUDqx5p8lCzpSkLOQl SnULtpifMezXn4/hFxKIH88WNH8c2U7ujV7q1Kjz9y3Rs9lXGNuvB5aM7480 n60wZhqsmVOWF1/wz8eD3TEw5qWofyjQ4lxvupJwaMfzWO1pxKVcQS2HZipf xHnCsVjCmbZNW2NAh+6Y7OCI3/o2xzGvLcrel0W/3scyM/bD5K/S9IlWKfnT hVeuXCmuirbCA1HfuGXr2jNEKwcEI37WSZK+ucK383Kk7DqPBGKxw8gfQ3ze uECMmP0UnlEPZDVsUIuz/MpwdbhHP6c+ci/xka4Bcbh5uwDH3TZiyR/zLGJ0 llUc2nEPd7beIEFGpDwpb09CxTCM7HUdW/YLiMyr+pfKXdnDaegIopffY5zj QLjOGv5vBdNcEdNLjpsppkPkyIIONzWVuHBHR4wbN07tNFWw8qmoVh6pZa9Y oLDL5xF8iSn1DBCw36saJ7YUIWRZJiuoh8/ei+QdZ1lcwJbJxhAH6bVpA+aP 3oihE4qwJbqCXzXxqvwYk3t+TT4dLL2U8ny9WqoxfeY8BB4moMdGQCi4I2b8 qjyIwTp12J8Y/HlLDP/Pp0iMivxIvk2XszkNz8YOmhiUCw2U77FJ5wVzn6Di lgSZ+fQgWR24iyVJC6flYqnjLYlPCYYBqsCGX6TGxOU9Sybx+ekbyni0WCPR 1hCGAgHhxKTHGaQh7d4r4NAuqfZ8bnEazk+5JL4+3HMjLrjsETOkU5t90LHR BxjweQcMGpqDNRcJABXSz0Lz1Ql2OCxfy2Z5KxEyzoy8YrW0QJ+4+4jYjgwy 9tTbKI24qDUdAWtxAElkiCi1fvcLjP9vO8xu3hS/NHlfqfMsdDqMXycXwfeK gIeVgtZeJFbQPHrShKxoQmxuaq3TLXmTXnsIlMH3sIQwOMJxC2VwPxWDeeYy 2j+wZDCfAJsZrLMwQRrea+rbuET4ff229NrXX8DhHeU4TfKqxY4bMOSLthj8 3RQsOSng97FDFbvJ87WulXFbS4HVNQtWZ0gvFHCeJAnGrDsoC/L+QJsafd6+ RHj7N5y/7I61bdriz26tsbJrK1wbvgXxi/cgx/sEbhBL/o4sBzSGWDw5Ar/9 USYGsoTfSi2Vnth5NIi0nZGleWi0vhchzJ2ajcldLiBuUgDKomN7qgDQKshI ht1igw7Lmd/SAIGx+xVrAFkGTMcJrAuX7kDfFu0wppcD/hzVG0v7fqNIKc9W Zq3/H/IsNhdx656Ag1cFVN8rhOnc3kbWBvyWmkaRQ2cnrkfetKkoi9iFGX3a Yu7wPoi4YELiyQqkB+Qje2si0v8gfnu0K5KWBSB3zykkES4z3GjVZnDbI1i6 sQrh2QKLOxdyJll7/UDtewyrNUsyiU8S8KT4iXxsuPXZo88tuctn159rdMMt FKmL2MhotGvyXwxs0xSTh/XAbeILhdgzjAeMbVr7aZ6RVSm7rlJNuEZ/HyyP Ltc4YbWQ8Y7FbZqj72/njLI1s3DFbwV6dmwJhw6NkRQvnQdgIOocTYLV1BwB u88JuBAmIOF0JdJI1J213YCMxWdwc9x2GJYHIW/vWTFBpsmxeW9KJoZ1voh1 3iZczhOUuY9TzPCm6LCOXH04vuitlfzKki+159esrTqrKx7bQV+dTJJWDJTs 80O5wcBMA+2FGjsbZiOYrF5IEVCWT/xcQgSKYg3vWmOFOZ/Y4rRePE+t2m8p klLj8KCCrRisJyZrkSQPSiYsiLhBEjfCgviz1Ug9UIQsz1RWCTw/YBXy94Ui zTOYHsPChrtj00b4bdxI4s2LGN0/Ea5HSEuPjGyihB5Sf2w/NZKZegdiaalR DxtUpok+az5TzJ+5zMHm67xI2p5fUIOasGCY7hjYMiM+E6B/OnVxdpDm4XgB xQVVeHo0CFWp0sFw3PSWhrRxG0Ukn3iI8CR7/GRUh2zF0cgHNCyUYuU3EE6C l9uEHaHXBZwKk0Qq5XAxsnZlImvVJRimeCNi0DoUHgjHtAFD0fODDzH4wy8w ccw97LogiOxlE3ALfyslVqxQtve1cen6DC2g5rqZJdQ8Vi1k83jhhglpuUTj rpMQOT9TvEufo01o4Mjy+F0kHLyfR7gRfpJwI5n9apBKROrJwnbOJwSBnSeh ZNF03Dp4FHsuPsHVgirz2gjCyESC25k4AccIblfPGWE4+oTk750w/tuOGNeK uP1VfrhyJYqtSKSWIvuqEcK9ZKiDaDZmPr78Xh+KlrJC5RQLuJJC0LwYih0r VqjnHVkcuTWwEun3CGL0ty3yMti+dH1zUgdLhsWj/HwqLvnux5IdRkQXCs86 COIEiVraNv4Bg9r/hBmDHbBocDsEe21h5FP9DBb1M0M+GL+e7rSQ7LhbWiLA 53rNuRaUvd6rNmDBX8TxhoUhbu1C+mxDhV/mxfWs5n6vRMANOo90Ox5zu5H4 8uP3sXjoQPNBjvq/ZGqP0LCncHPLxvwtNYjMFxpoQ8MWC0wYNhJdvm2CEf0d 4TK8CxIvHFJS6kW/l6FS1ppeKrHQyq3aWILC51Zsub01W0aP6wgMqULV/Yeo CPFXtuU+K9xgqB08EYm9R27A5cdOmNu8MWZ88wk97EbrRH1r68cWTrqIuasr EZEr6B2oxvJc+uNnnp6uYn5QfuUcw+3YaQF3RHUyyHGPWZ500pb2ltDxWcvX OgrJh5GM9z4h6SijizfjQ+npV+rVQNYRfAWeG/9Gm89bY0LvfpjfqxeW9e6K K3OjcGmUP8703YRLc/YQ13dSnPFLjTGoNyPoOTLmDhZOOImZi8sRdkfgjoxi NHuSBKroYRWErDiYNfMpjsua2cUGCeysD2NjWUp0Qgt2GiH9yiHi1x4VVKLs 6D7q16BeGWQdxtcwa9QufP/fthjUsyfGdWuJCX3bIDFVwNZDJMg/YMI536e4 5JqHK3/eQtS0Mwgb7IkjPVYhyzcMZjvAhbcUun2YOrcU5zLMC6puxlcigK6i uXNbpbLS5suOOoLD65zk+JQCDB9yf2UdMO7HGV5SuM8u+t7jLF27VwPj5VMw 5aQoW+aehSLLqhY6h+HnWWVYHxgNb083BHi54UZcNEOE/hZrXBqbtZYcZNT6 OxbDiPptL9J3nhZrk5ksXKPFiz1w/rUYgQnVeFhawuLlkyT/yswzwZR0QSoT cesStE2FWdFvo60Kba1Auocl2rUDaevLEaSahuWxT/SPpcHsft4TGjkRp5pw BbO7tMLAj97HgiED39AFu/YJywsnRWPUHxXYb2C73t60UPPLaXSHioANBwQE HZSrJG6FuPJXCq7MCMXFYbtxvNda+I9fjJlfjMc4pwL4xZnwqNLI6uXrA6pR SX3mw2xlm+azLAkDntqFEweoXUiXfz3cupj31gf+E+7regnQqxoo0T+mLubh 1sWhk5cRePQGZnbuiNnf/Re/fv0xXbvymmLvuBi4joK3Q6v9GPdnFQ6nCZqT S2wunF6nCU9iyHO3iQbsOkyCvCAjPCYfxqkO03Fhw1nkXbvB4t7bd0n8R380 JS9N2aBjqx9cPOMhyi9ko+JhnhzwWQepvyXGLOal7z7UMd18TPm6zRhTP7UJ bf/TAk69+uG37j2xpMePCJl8CacH++FQz0244OIHg+cZ0U9lxxjYJKIIdOtg TFhXg+BMQb0+XwIEZvd+ZPtRBPSageQhTihPSGBOyes8UbmiCtQkX5FBtf5j ge6eD5GSLZ3i2kxHWHkkBlgCWXuTlfVVF9YKYczR042u337UDIP6DYBTnw7k r41Y4DwaKsDLn3ipnRU4ubEQZxelIWTKJTbvQDHlLhaRX42MFJc2OLQLwWRX E05lV8JaJP890+Iko7jqTsiItwokyymsZWeE8sH6uL2jAzsfQ/1bVmCtEZAe zWs4UuDYNRbO66Ox22ObpVtqgJQCARF0eoCgeSRU+vbBnZUEzQc4u5iieRmn h+wV74fN2gvDjrOIJ2J6R17H0fHD9+HwWQs4dLyE6TtNuPPYfO4PPzJoJwHf yvc27ChCToERlTFnlHN/VV9n/2rZALWY8pMMTN9/toSbT4EYlDpwv6OSxxeV E5bpxZZSzPITkFvG3M/ryviSNRA+QBA+sYkinI6QqZHo/P63GPjBNxjYbjNc SDuh4VGvK52a8y3RTEq4Wv4AvUWStfWICdUFeTDlp3NhqzlG+5oTTysp40hL vPjY1NovNZJvsi0OvNtaOC0JU92MuPGgWqu6bUEr6ZOCdlEGrU2TznBs0xdO JMpfMbgzQny2dLLB/5ohscehE2WIpwlqThIeRF2zJTkcq08+/6uLGp7lHW36 uPi4jqLsCydGYPyqanEJlP4iDe38ccLQEejxXWOM7NEDf4zvj4yDO0hkl6rG Rq8Zhs2fG+JQFBmPvPZdUH4tRq/wzc9ZSWvvFYdR+xAp63GhrZ6dTbxQsFyG 78Go38txNEPQXyOhjZPHNlfs2eWG0+HRSLxLwsykaAgF2bbixEbxxxdDEDl0 PkqGj0dFfNyPKpy0CJ1oiROvD/yKa70IpZGi7vrk2WHdfH84u5TAJypfsrwq o8EquFkPBUTSPQ/pt/E4PLzjc5Fvh7SYJGzrNAr5AQfQSUdG+BB2ij7t6lPa taaEP9LVZu3h0e9euPYQJWWVyqRvcp6A4wnSLoUnQd5tn9+v8EzW49J0fUJt +ZEjVdnbCnnMW7HlCWL9KcyIqrwHMJ7zb2tp6sVXaiHVYpQLP/76tWrq1kKQ L2waO19XY8dPRNEf7CmgE1PBWPIMkGlvc/lBvigOMiEhQXNgTbTNr8VCCd6a fyo/f4q4mscPyDATI1AQa/hDBzpeSOfxo7IX1yrRlmXJaKPR2duKWtZeje9H 8vkHhVUoCw5CZYpBIvmZbnqBpfjxqwDbcPcsf9FdO25lA9l+woS7+UbUXDoJ Y0aai4YUq5VA4qEyX8NvXyMf/6DhKLScgB3Po0uXimDINCHv8gX8qsJCxzH9 KY2CraXg575baQzBvOpNZ30FKxhein+CwifSz6dPtgGNlVID9VXjoGsLW2qY iedY8/qrDQotHZWmTKFSlWIS0UKjdzUj9LpWE65lC6Xj65RIhhfG5hpdv6No g9lkqbvRolD6/WIlz1BJ23caPa20wZBLQqF5LB9LU3jjuNwGA7FdavINVZNU EJppNLmEE3MriaOn1Kr6JDiK8jcarVo754vRvltqUusoNXbYFO+C5tlmm6Qf cFRmu2irHKpNNPzDXBu0S9pEq+yv4fnEjlTjTe4sHT7xAa30k63KYVfs4EFK /n81mpxugypIO2ItzmpliH6l0eRUG8ReOqNa2f2jEvv/cD0xaz/JBrGXTv5W Spo8nKzSzBvNCTYMVFrKX+uIHSr2bDKAV85xton9GanVRhyTGKKfarQ6WkOU 1Pop7fjGBxpM+kSjyeG2iX2Y1OqH2nz6SKPhoTaI/SWp1Y81+PShfI8+Sr9O 3w20zWVKv3ehUMuziqHC2xIHGwYq9a95TkIjjSb72iBQ8mkeWgcLvK/RpC1L 8xKkJj/Xtk3sIDLe6NmyJEw6rkPZe84ziT/impk7W/IL6cwWZWkI7YnZJmZc eEOiN4vGi32a1KT6gCfaZEONJtvaJvbS+hHZYJrFnj5NPm2g0bB6KkTLM92V Wm2igSjvrZjFa2HbWHOlVpuqWqViz9wqb/S+s0HspUlMxV3y5ukNjndM5b+x wS09lJr8RoNPr2s02VjVpJY0lUhNNtO2TVq/FvGlDWIvb3v/ToNJWicff2aD 2EvzD0rtnecQi2x5c/exDaOslppsrgGn1mkI7NcNn+GWpGXxSmjNt6q1Y+Vd 1UC13JJcLxTbbclxijvKQmvW4N+2yb7YupTa4AcNjrFUsvYZu9YVQGxXIhmt VdaK/suyKd4AvmablxKbln+VtI0G0Fp5/Su2DlneS9mWA5o+J9stO42m1T++ qCVs4pPyb3K010D5BY121VvPNc+Qp8/IZ3h0kL/Ft8uMoS3H34htyTtMJL9R X7FbtE0qAdZ0VPy+FHwoNUEGH6VLU67lNfHsAK5Hjx4p0iB+LhkH6fXk/73+ 3+v/veZf4x//BwEYgWU=\ \>"]], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.0297577989999995`, 1.361188704, 2.241203097}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{8.162200106999999, 1.119496074, -1.379537691}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.821956044, 3.532265034, -1.0332879599999998`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.591591271, 2.879978388, 1.505316123}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.583460584999999, -1.723311915, -0.990977577}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{10.550138409, 2.067766431, -0.123491895}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{9.923230433999999, -3.2676314459999998`, -0.226782897}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{6.458408792999999, -2.8374223439999997`, -3.436551729}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.058488004, 2.5511138969999996`, 1.4326949519999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.35065631, 0.86586054, 1.0382200769999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-8.823746283, 1.11775755, 0.516625083}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-9.147376305, -1.4973982799999999`, 0.225932532}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-10.951246131, 2.629801005, 0.074000652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-11.481212496, -2.5464274409999996`, -0.423311697}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.29725199, 1.614824238, -0.5760183539999999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.572826940999999`, -0.99360426, -0.824135964}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{5.995356705, 2.188556055, -0.173379975}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.296966355, 1.393823823, 1.324585215}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{3.4165964969999996`, 4.465209924, -3.063902889}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{12.483792830999999`, 2.155713069, -1.735783935}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{10.819250586, 2.66428803, 2.058469107}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-2.264899935, 4.790257221, 1.819554336}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-6.592690875, 2.2941524909999997`, 1.078319511}, 0.178]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{5.151794625, -1.994824011, 1.512988305}, 0.5]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.129317538, 2.061171378, 3.8194616399999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.198746905, 1.661216373, -3.3552379379999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{2.3924546849999997`, 4.582541397, 2.629290786}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.328448757, -0.488619729, 0.900914475}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{11.433138527999999`, -3.102811812, -1.6837415969999998`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{10.728847338, -2.628364833, 1.609570872}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.469626846, -5.314384413, -0.026474697}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.729994688, -1.7991833699999997`, -4.047227180999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{7.845769842, -2.731391277, -5.016529898999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{5.936265786, -4.864598019, -3.2068209}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{13.777216892999999`, 2.766671976, -0.5858825879999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.177162953, -0.055084755, -0.848645373}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-7.5618991079999995`, -2.815634103, 0.50927415}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-10.765677591, 4.698852432, 0.243242184}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-11.674774467, -4.611718365, -0.6270969449999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-14.927590664999999`, 2.871984957, -0.902086089}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, 0.12]}, Text3DBox["1", {4.429757799, 1.361188704, 2.241203097}, {1, 0}], Text3DBox["2", {7.562200106999999, 1.119496074, -1.379537691}, {1, 0}], Text3DBox["3", {3.221956044, 3.532265034, -1.0332879599999998`}, {1, 0}], Text3DBox["4", {1.9915912709999999`, 2.879978388, 1.505316123}, {1, 0}], Text3DBox["5", {6.9834605849999996`, -1.723311915, -0.990977577}, {1, 0}], Text3DBox["6", {9.950138409000001, 2.067766431, -0.123491895}, {1, 0}], Text3DBox["7", {9.323230434, -3.2676314459999998`, -0.226782897}, {1, 0}], Text3DBox["8", {5.858408793, -2.8374223439999997`, -3.436551729}, {1, 0}], Text3DBox["9", {-2.658488004, 2.5511138969999996`, 1.4326949519999999`}, { 1, 0}], Text3DBox["10", {-4.950656309999999, 0.86586054, 1.0382200769999999`}, {1, 0}], Text3DBox["11", {-9.423746283, 1.11775755, 0.516625083}, {1, 0}], Text3DBox["12", {-9.747376305, -1.4973982799999999`, 0.225932532}, {1, 0}], Text3DBox["13", {-11.551246131, 2.629801005, 0.074000652}, {1, 0}], Text3DBox["14", {-12.081212496, -2.5464274409999996`, -0.423311697}, {1, 0}], Text3DBox["15", {-13.897251989999999`, 1.614824238, -0.5760183539999999}, {1, 0}], Text3DBox["16", {-14.172826940999999`, -0.99360426, -0.824135964}, {1, 0}], Text3DBox["17", {5.395356705, 2.188556055, -0.173379975}, {1, 0}], Text3DBox["18", {-0.30303364499999996`, 1.393823823, 1.324585215}, {1, 0}], Text3DBox["19", {2.8165964969999995`, 4.465209924, -3.063902889}, {1, 0}], Text3DBox["20", {11.883792831, 2.155713069, -1.735783935}, {1, 0}], Text3DBox["21", {10.219250586000001`, 2.66428803, 2.058469107}, {1, 0}], Text3DBox["22", {-2.864899935, 4.790257221, 1.819554336}, {1, 0}], Text3DBox["23", {-7.192690874999999, 2.2941524909999997`, 1.078319511}, {1, 0}], Text3DBox["24", {4.551794625, -1.994824011, 1.512988305}, {1, 0}], Text3DBox["25", {5.529317538, 2.061171378, 3.8194616399999997`}, {1, 0}], Text3DBox["26", {7.5987469050000005`, 1.661216373, -3.3552379379999997`}, { 1, 0}], Text3DBox["27", {1.7924546849999996`, 4.582541397, 2.629290786}, { 1, 0}], Text3DBox["28", {-0.271551243, -0.488619729, 0.900914475}, {1, 0}], Text3DBox["29", {10.833138528, -3.102811812, -1.6837415969999998`}, { 1, 0}], Text3DBox["30", {10.128847338, -2.628364833, 1.609570872}, {1, 0}], Text3DBox["31", {8.869626846000001, -5.314384413, -0.026474697}, {1, 0}], Text3DBox["32", { 4.129994688, -1.7991833699999997`, -4.047227180999999}, {1, 0}], Text3DBox["33", {7.2457698420000005`, -2.731391277, -5.016529898999999}, { 1, 0}], Text3DBox["34", {5.336265786, -4.864598019, -3.2068209}, {1, 0}], Text3DBox["35", {13.177216892999999`, 2.766671976, -0.5858825879999999}, { 1, 0}], Text3DBox[ "36", {-4.7771629529999995`, -0.055084755, -0.848645373}, {1, 0}], Text3DBox["37", {-5.025526223999999, -0.5413423589999999, 2.603534175}, {1, 0}], Text3DBox["38", {-8.161899108, -2.815634103, 0.50927415}, {1, 0}], Text3DBox["39", {-11.365677590999999`, 4.698852432, 0.243242184}, {1, 0}], Text3DBox["40", {-12.274774467, -4.611718365, -0.6270969449999999}, {1, 0}], Text3DBox["41", {-15.527590664999998`, 2.871984957, -0.902086089}, { 1, 0}], Text3DBox[ "42", {-16.016380467, -1.816209567, -1.3421972189999998`}, {1, 0}], {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.8106745349999995`, 2.1205835459999998`, 1.87325961}, 1.2254418786230263`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.2067736575000003`, 3.2061217109999998`, 0.23601408150000003`}, 1.1905384115762714`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{ 7.872830345999999, -0.30190792050000037`, -1.1852576339999998`}, 1.2063125263248262`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{9.356169258, 1.5936312524999998`, -0.751514793}, 1.1727577830982314`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{8.753345509499999, -2.4954716805, -0.6088802369999999}, 1.1956798357966363`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{7.020934688999999, -2.2803671295, -2.213764653}, 1.1994928739116124`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-3.2045721570000003`, 1.7084872184999997`, 1.2354575144999997`}, 1.17891671246777]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-8.985561294, -0.1898203650000001, 0.3712788075}, 1.0683450355919255`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-9.887496207, 1.8737792775000002`, 0.29531286749999996`}, 1.0664736191341153`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-10.3142944005, -2.0219128604999996`, -0.09868958250000004}, 1.0627215522086486`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-12.1242490605, 2.1223126215, -0.251008851}, 1.061553771195871]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-12.5270197185, -1.7700158504999997`, -0.6237238305}, 1.0606363812514528`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-13.4350394655, 0.3106099889999997, -0.700077159}, 1.060127135831235]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{5.518215093527041, 1.7797202654364053`, 1.0197635246980075`}, 1.1232614537466616`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{7.065948443595247, 1.6603560094106449`, -0.7693171271728978}, 1.109059973712015]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{4.921546611491133, 2.852441131635989, -0.5982339332927235}, 1.1068131819359799`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{1.4308870461703727`, 2.128227689958971, 1.4138958969708257`}, 1.1287008143693926`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-0.8664216341106908, 1.9654236788257873`, 1.3779819488620444`}, 1.0721038684207627`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{3.6122619097534754`, 4.014881201439789, -2.083733281137886}, 0.9176724899801458]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{11.547131303958865`, 2.1131117482521016`, -0.9547902336225446}, 1.0416871999491553`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{10.689337245835537`, 2.376318476670064, 1.005132000376172}, 0.9210922295753428]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-2.165249251548869, 3.709253029524086, 1.632787990526087}, 0.9229361948217829]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-5.504815384642697, 1.6011195508198317`, 1.0588625444987718`}, 1.1114179503558625`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{-7.674286398730381, 1.7238468420402204`, 0.8060151223009737}, 1.0740959289044496`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{5.08603150951553, -0.1863383351771042, 1.9054081591823313`}, 1.3273393361300347`]}, {RGBColor[0.36, 0.24, 0.12], Opacity[0.5], SphereBox[{6.460422912923847, -1.8487067337161187`, 0.1654510037905086}, 1.3596687441880437`]}, {Opacity[0.5], SphereBox[{5.812383685936266, 1.859410439162376, 3.364549058314899}, 1.1997263279567294`]}, {Opacity[0.5], SphereBox[{8.18822315791745, 1.505226581058213, -2.7863298298161734`}, 1.201748026863679]}, {Opacity[0.5], SphereBox[{2.4497726542981457`, 4.092488533092707, 2.305774417060503}, 1.2026037034225578`]}, {Opacity[0.5], SphereBox[{0.31940921542515005`, 0.0518862575067538, 1.022563047693959}, 1.150468010128111]}, {Opacity[0.5], SphereBox[{11.00987138881036, -3.149015110891292, -1.2753175721755763`}, 1.2574891973838547`]}, {Opacity[0.5], SphereBox[{10.503015682362069`, -2.807564942743281, 1.0948016188585297`}, 1.2575269569774465`]}, {Opacity[0.5], SphereBox[{9.596707047880477, -4.740972325603053, -0.0825924332078426}, 1.2587623211152228`]}, {Opacity[0.5], SphereBox[{5.214047185351383, -2.0899482779919056`, -3.876203942554613}, 1.2595225714770626`]}, {Opacity[0.5], SphereBox[{7.4569711767375955`, -2.761105775151482, -4.573751572419104}, 1.258113346067062]}, {Opacity[0.5], SphereBox[{6.082551518671258, -4.296656143124742, -3.271183234048152}, 1.258708542853591]}, {Opacity[0.5], SphereBox[{13.407867419757007`, 2.5922068820658164`, -0.914247792632984}, 1.1326445720179166`]}, {Opacity[0.5], SphereBox[{-4.225749572255871, 0.20282493778236432`, -0.32023082853874896`}, 1.2595751203461338`]}, {Opacity[0.5], SphereBox[{-4.4045531578739325`, -0.14714717595865612`, 2.1650478147055514`}, 1.2589893856854197`]}, {Opacity[0.5], SphereBox[{-8.011347170657727, -2.441943117160255, 0.428953006610887}, 1.234089528090295]}, {Opacity[0.5], SphereBox[{-10.81820776574568, 4.1131516821956, 0.19533380874314593`}, 1.2370389946362135`]}, {Opacity[0.5], SphereBox[{-11.619983863755635`, -4.0271069611355905`, \ -0.5694124907007485}, 1.2371275329651534`]}, {Opacity[0.5], SphereBox[{-14.466117899607415`, 2.5161414488774567`, -0.8097915359214832}, 1.23721297165542]}, {Opacity[0.5], SphereBox[{-14.894495214936292`, -1.5833410487074426`, \ -1.195541033086732}, 1.2369680734201314`]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.583460584999999, -1.723311915, -0.990977577}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.550138409, 2.067766431, -0.123491895}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.923230433999999, -3.2676314459999998`, -0.226782897}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.458408792999999, -2.8374223439999997`, -3.436551729}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.35065631, 0.86586054, 1.0382200769999999`}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-9.147376305, -1.4973982799999999`, 0.225932532}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.951246131, 2.629801005, 0.074000652}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.481212496, -2.5464274409999996`, -0.423311697}, \ {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.29725199, 1.614824238, -0.5760183539999999}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{3.4165964969999996`, 4.465209924, -3.063902889}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{12.483792830999999`, 2.155713069, -1.735783935}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.819250586, 2.66428803, 2.058469107}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-2.264899935, 4.790257221, 1.819554336}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.129317538, 2.061171378, 3.8194616399999997`}, { 5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{8.198746905, 1.661216373, -3.3552379379999997`}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.3924546849999997`, 4.582541397, 2.629290786}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.328448757, -0.488619729, 0.900914475}, {0.296966355, 1.393823823, 1.324585215}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{11.433138527999999`, -3.102811812, -1.6837415969999998`}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.728847338, -2.628364833, 1.609570872}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.469626846, -5.314384413, -0.026474697}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{4.729994688, -1.7991833699999997`, -4.047227180999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.845769842, -2.731391277, -5.016529898999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.936265786, -4.864598019, -3.2068209}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{13.777216892999999`, 2.766671976, -0.5858825879999999}, { 12.483792830999999`, 2.155713069, -1.735783935}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.177162953, -0.055084755, -0.848645373}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-7.5618991079999995`, -2.815634103, 0.50927415}, {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.765677591, 4.698852432, 0.243242184}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.674774467, -4.611718365, -0.6270969449999999}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-14.927590664999999`, 2.871984957, -0.902086089}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, \ {-13.572826940999999`, -0.99360426, -0.824135964}}, 0.1]}}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->True, SphericalRegion->True]], "Output", CellChangeTimes->{3.5765572969837112`*^9, 3.576557533074526*^9, 3.5802184135045776`*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsfXdcVVfW9vOaZJJ3kplJZjLpmRQ1lhQTU+yKXVF6sYNIVwRFVKqCiihK 7713uJRL7x1E+qVLEVHsUaNJzMw3M9/ap+CVXJnM7/v3Oz+X99x2ztnrWeVZ a+9zUTGwMTPeb2Bjbmjw4XprgwNm5oaHPlxnZU0vPfc/wP+YkWh/CLb/b0D8 79/079/m7D/2yv/f///7/4/773D7z+Hx48eoqqrC4OAg/sRee47Z22K5T77J 7b848UldXV2sX78e7u7ueP/99/Ho0SO8JhyNt1Xua1ggd4zXuf2Xf3WM/Px8 3L1796nXDA0NuWO+yL7zPDviC88++vWJS57G9qaxvY+5t343cbKzZ89OnGx0 dHSa8DZ7i73U2dkJNzc3JCQksOevPvtkN7iH5596SzzzpG+8J6e0mzdvctdg aWkJW1tbdg3cAH/HfeYF/PDDD9wFPHjwgFMCe+8PE6NZ/F+f+x3ho+zcbFCC YqexJ78X3nN2dsZPP/3EKYEU/gcFh1n0X5+Yt5T/VYgyGxR7lw2SIfx7YfDi hbBn7GLZ954M/r+/htcngT/pGp4XvsIug+HAXzD/FflLkcNi/X99Da9NfQ1/ Ed7OzMxER0fHZONfL2fZnBKem9ibfOBJlv1X7u2X0NbWBn19fe4tHx+fCYMT 9LuOP8E/hYMx8xTNhJkn+zZ9+k1hYNnZ2UhLS8OFCxf4KxG0J1rqWv5of5e7 NPFobGP79LF3hW/29PQgNzdXeMb/L9gg92wNf7SfhZE8y5IiIyPR1dX1noKj iggz3bChsGer+aM+mhoX8XqEg3PPxOu+c+cO/P39nzoD04KLiwt3QcIZHkx9 hhnCN0WPZ8+mCY4w+StMI8JRv/8NweSTZx76SaQTfZCdglSzij/6HQXIydnB XOHAJiYmEwb+ggINrOSPdnNqDXwufFPe136nwA6U+KONPyP3sKOJBjhPwSFf FF4TRso9W8Ef0mPCmwQDFDfOh1WnvnzR25l+GBLs2RfCa8ydBwYGnjo/+4yo IOH8npMCxrOCiPLUvi5CIG+siq7kBeF/eS8XzevdCVXwKRNewoflr0O8xo2/ wQhfnOKiqqurcfHiRbmLeqZhvqdAHR/8d9pbq8Co2bAFo/698BXGesSTixcq H0z+V87QRV7yroJE8G+BhLz7Kxt74SkbE/fXTG1myxVcinjJ7CPBwcHcs3ee zhEKeQD8FLy14hnnZ48E3EoF539ZgUu9/VvO7zvxoeWCTqfiB6LpiJcgH8/E S2DmJ6LxlgI0puRFaJMbO8NfdCwhU4rRnV2gyBCUFFzM/wqWzHQhDoS5OsPm zYkhP2GlctHm3xOJBS3CxTwjCSsrCL4vCV+Rt10xIdPX3n/2yJumtjoVBYH0 lWc5ADcm3lHRMPVx1RUcVyScAul+MjDuuLwrolbBcdnGEKPjaikId3+Qu17R Ul9UbCJ8KkKVcO5nxFnuCHSV2s88GU+0GUUSFPS7Kc9X/hvi6DS5UbDX2TNx tPJx9BXBBuUVLmp06qsonTo+7lAQAF4RviLa3CS7e2HK8z0JAjOnNhY9BWd+ VU4dohE+P+XpfBS/+9HU5zZQcG6xspU31OcnG+ozTve3Z9ivwImNFESV1+SG yj7OLOKbKU/y7n+wXyGgGis42Z8UREJ2UkHHX0953renjlyiCctTAfEa5KPZ K8LlP+Mwot6nvpY3psZ1/xSBra+vb+Jcisqb+ZPt9z8UmAcUnOsvcucS7fcr /rgJUx/tkPBNVnqIUed1BRb5JX+02ElHY4CKBke2cERBDBOPxvTPNnZtwtGi 5CxLUaRizwnapQIm1dV9qK/uR0NlP64M31qgIF79Wbg++ZzJ0q6gFJ7JI2Lq 2KTIsviTvYwrV26jsaEfXh5SBJ2XIsJditgzUsSfliLhBMkxKcrC6iAr7hXc SvEFMguQj3OCroULDJ0aNLGekT/At9z/f4QkvRYBvlKEksT6SJHiJYXEU4qc c1Lk0YXm04Xmn6R9ZxJHKRqD63Dn0q35CiLTGwqsVYhHQVNf4Aoh1Fwbu4Vg 3yyE+UsRRZJEkkkXlkcXVkwXVuaRi0qSaiakzWrSZiVdZCVdYIVjFoaKugU7 fvrKxNaBfEEnBGb/qa9speAv42M3EeGfiahAKeJIUgNyke2fj0K/IpT7lqDa txT1fmW44F+GpoBSXAwswcWAIlzwK8AFn1xcIHU2nMxEW3CZYM1PR7635HyI XQZ79pl8iPm1D7FHsnq+JP8rrl25jii/dMQG5iAuKA+pgUXICSxDkX8lKvxr UBdYhwtB9WgJbUB7eAM6I+rRGVlHUouOiCq0hZahjb7TRrpudkvHg5EbE5Ws /JXyKL/wqxzC0BaumK/aXlQYQsUBLuQ+83vU1fcjNbkevgRl8FkpwsneIgnO SOccdFb0o72kl33yOYGxxgdkIjGoADyVZdufUBHYhLrgFlwMa0NbZDs6YzrQ HdeB3vh29CW0oT+hlfYvoju2EZ1RNZCFlaHTPwct7olTjpCFFrESEC1HGOH5 Z1jNFBGBd7gZuNDYBz9vcjjScww9JpGzpVN0yCIF5LhJIXWVItuFxIls/2g2 egt7cX3sOhL8UrnxpgRVIiOwAXmBzSgLbOdeawrvRlt0L2Tx/ehNGkB/ygAu pfWj0a0Awx75tN+FvtQOdCW1QBbXAFlEKWSBGehPLVDUrHhbgTHyXRecndpd FDUB+Ez5Ca6ScweRc4f6kXOTJPsJzk1KKCIllJJDV5BUMqcmSygnZZSRJZQ6 5SDFMhrJ5H6cAgIvICuwDYWBXagM6eNea40dhixxBL0poxhIv4IhyRW0hrWi 5nAlHme0YDh7CANZA+jJ6IEspY0URSE3shCdwfFTKUC+nSQo4PTUCnhJ+CZj 36IC+Fj5KsWQWwj3z0JUAMUQkjSSHP88FPnmo9ynkGJIEep9itDoy+JGIR87 fPPQ4J2L+vNSsWhLOlWMlIB2ZAf0Ci7wGppix9CedA3dadfRL7mJweybGJHe RNHeTDwiY7hXPYKR/KsYzL2C3pwhyDJJD6lkDImVkMVIcL25eaLdwFI76y6y Z+KkjHzgnMMr4uRvCelzuMAZ5S9BDIWl+KBcpAcWQBpQghL/clRRaKoPqEZT UA1aQmrQHlqDjvBqkip0hFVQSCpF9Zk0FByJ5saZeTAFKX69FNaGURo6xr3W nHgLnal30Cv5Hpdy7mEk7z4KHStxM+ISHtXfwrXi7zFadBtDhTfQlz+GLukl Gr0MsnRyg5QC3OzoVNimkp+OYoGAebYwcmchvE2mIWwTC6aVwvCjfZMRH5iN BIpZqUGlkAZWojiwFlUBjWgIbkJzWDPaI5shi26h+NSC3rhm9MVdpMcL6Imt R6NPPkqdU1HikMwdP9s6DTlBYyiNuIm6+LvcazLJQ/Tl/IjBvJ9Q6dmNAe9+ PKh5iPGyH0ke4UrZAwyV3kV/8XV0FVyGLJciRQ6dM7MUQ+UlCof/loAuG488 soI3zOY1cUxOE5OJ0bVr1ziTWSXk9o7GTiT6ZyApkGmiEpmUiwopclcGtaI+ pAPNETJ0xHSjO74HfUk9GEjuwWBqN4ZSu+ixEwPktmIWKHNMQYlNtFwWeA0t 6T+hK+sx+nP/jqa4m2g40YX71Y9wo+Yxxiv+gfHKx7hS+SOGKx6gv+w2uouv QlZIxlDQThohg0tLEIqdF1Bd04e6GmKOxB4biT2ODd+eyNDy7EzU0mR2JriL oCWHqT1FUW29Uoi5Cb4JFPcoVpLZpFPck1LcKw2SoTa0B01RlB1jL6E7cYiC +zAG04cxLBnG5cwhjGYN4jLFu6FMKiYim1DhUYky1zyUnchB+fFkFJ/IRGnc PdQmP0KL5DGZwz9QG3ML2Yebcb3wEcZr/w+uVv0fjFf/A9eq/46x6p8xXPUQ /RV30V06DlkpxduSTsiKyGszk/4osN0GYroeHjnwpXwWSqE8irFdCuPxlNMS KKclUE4rDa3DzcHb+KsCnia2iuRbevw8Amx/A0/jzIOvwz/lrCLJN5XUV4pk 8raMgA7kUcgsD7mEhshhtMaNQpY8ht60a7gkGcdI9jhGpeMYy72Gq3lXMZZ3 BSO5l9FOTKLSqwZl5ypQdrYU5e55qDgZjZK4B6hJ/RHNmT+T/TymnE12mkbB 5iJ5XOUvuFr9C66R7V2r+RlXasjuqkl9lffQVXEDssoRyCq6SI21GKyvFGq/ P6GJuIG/Tw6lSaoUiB/EU2pMpdQoIV3mkC6lpMu8U1LkUuWQS5VDnh2xyqBa 3B64NVHTKdKnfB57cUJTQrPs8NSa5Wf/5j1V4XLfoy3Zh6XxGtJxG+m3DwVB w6iMuIKYo02Q7CpA24ly9GfewXDOXYzm3cVYwV1cK7yDcQrIV4tuUmC+jh4y 16qAiyjzrieppUxYTlFMQgmiGtWpD9GU9SPC7FmkvI6RC48xVPETLlf9RDr9 CWO1P2Ks7iGu1P6A4Zr76Ku+i64a0m8N6beagnx5NW4M9gl92t9DKqnlaotw khiSFEZBaAx5VFsUkc2WEksvP0eZlnGQF1BBpUUFmW4lmW65XSa+H7wlFGRP z7/9TXiNaUzMkmKjXl5tPK2AtQJCL9cgUZ70TT7ksW0Okn0vIMW3CxL/IRSE XEVV9A3EHr+GHL976Mui3O9djYH4QbTEXsOF8MsUVC+jJWIYAxnjxA3GMFRy E9Uh7Sj3J/LIlE7VXEUAxYWQelSm3qfStBuFZ4fRU/cTeksf4lLFQ/L7H3C5 5geM1j7AaN19evweQ7V30Fd7C111FAvqKBbUdqKzsgIP7twS5gX+gvzMGo7q RFO5lBDI6E4uXSeVTER1yryKUeVdglqSeiqfGv1KiOoUkxQS3clHAxV4jWdy UO+cgfvDNye6UPI0/T0hWIspWCxEWOCYQvsHBO3LZ24GmtAD47T/pFNO5aQ8 Dsle5Uj2biEM+pAZMIrC8BuoivseTSk/ID/iPrISH6Kr/DGuF1MgiaEUG9SH zthxdMVepbLkClqihnEhoh/VwTKOvJeFtKEs4iIqQgpRSkVZctAQouxkaCn9 CR0V99FVSrhW3MNA1fcYrPkew7V3Se6Q/m/hUt0N9DaQ/hvGkBxbjbSYYgS6 p8CHgkQABYlAlxy0UfJqK+sXJn1eQaGkigrEbCoQCRMqEtOp4JNSuVrkV4EK vyrUkDM3BNTiYlAdMbK6aUTBailitIVWozWkAi3EYFqJmbZ6ZOPiqVSuRnz1 mdDw02liL0suBr30bHT4zthLz2q1cD5CR93MfexXU148F9iAZI9qJHu2I8X7 EvGMqyiMuo2qhPvIDxxHYcA1UvcNlMV8j5Kif+F6yz/wsGIY48nd6E24gZ74 a+ik3NASM4S68B4Ue7eiJKQVZZGNKA8rRBHVza5mF1CZ/gMai75Hc8EtKlLJ Fcpvo6fyFsWgW+ivvomBGnLH2nGC6CokCfU4fSIV504QPM4JCHelvESxJo3K nHQqeDMonqcfJ7HPIT5Ui5uXbnFDar8go4pXQhWvlKSQSp8yZAdW0RjqyIUb URt4ERdCWtBCpU57ZBtVt63oimlFdwyxSTK/rpgL9Fo9R6g7g4rR4Z1FtX28 6E2s7SmWPB8oYPovTOhUSBVrJ3LHk2kkRT1lBWsY5GevNivAn4fuKyS7Uzo5 30leNgRJ8DiyQ64j6fwwsn3HUBw0jipKAw1R1ynCkedlPUR3x7/xY9/PeFwm w2jaJXRRSm+nSrAprh+lrEr0b0JRcDXBV4Bg+zxIQu+gjChgdfY1NOSN42LR ONqI0XSUX6O0fA1dVVcphYyhOk+Gc6dScI6g8nFNQcipZMS4JiObUkUepYpC yhBFBF8JwVdMOaKIICyilFxIJTtvl68jlaASt7IAqkaDOnAhlLw7spuobg+6 4nrRk9BLdLcX/RzlpTI9qZNeowqVigBZVC1kIUXo9E/D9YZ20dPkK9UPFTCm 5xWoV5jdW6fAb6B4cvKtqXHVnES4lPn46EboucuIGAwj0XcUkaf7yREJPf9R lARfRXX4NTRGXyfydR2diTfQkHAH9USUbo3+C/8avo9HlYzod6E5iUhaYhdK wwi9kEpIfCVIJ4PPyvsBeckjKJFcRmXOZdTlX8aFolFcLKE8V3YZrUSsInxz 4HU6Bd5uKfAnCaP9mFOJyPbIQgmV0uVeeajyyEONZx7qOMlFLRGsGkK0hnU7 DybwYwks5B7TqEjJDmijsk3GPa8P70dz1CUihkPo4noOIxhIHSH+PYJcs3Tc O5eFkaQm9KX1oYvGIkugPBBTA1l4Hjlh7FQoys8nPXE+ATtusvr5Jxr/TSj+ dWoUdwp5QVbZi+STVYQf87xhhLr2IMKtD0meQ8jyv0wBkDwi4ioaY8bRHHuV d9a53LA7cm9hoOsxfrrzT/x75Bpu59ejnIw3L6yAuFUaOV82UjPGEBs7iPS4 AUhTBlAkuYSynEuoyruE2qJLqCsbQLhPJnxOJ8H3TAoCSMLc0sjh0iH1KkCZ bymqfcpQ71eOC/4VuBhQjuYgksBSkhI0+ReiyScPuQfCIN0bxsMX0EQm0wmp fy+vklfRGj8GWdI19KaOEyO6jsHM6yg8kotxn1Y8qhjFaDb5YdYIuiUDkKUR fSQUZfHlVJyn43rzxT8pqJM/EKCQ129wcPDH/7W7/VkOKJGaMKCEuQ197u1N uEFkKOl4GZJPtSHcuR1+Tu0IJ6ASPQaR5TdCzjKKqogx1EXx7ZGW+FF0pV7h 9odzRtGXOYYLRCwuXf83/vHgF/yzrxepXnHI8AyGxOMM/J1aEeHfjxgy8hQK oZnJ/cjN6EeBtB/FBf3IzmiCz6l4+JJj+Z5JR9CZLMS550PqXcZ1mWsoMzUG NqA5pBFtYY3oiGiELJJJPUktOsOr0R5ajmKHOBQdiUGBZQTvZP58I68s9Apd +zVuvz3pFpHWO+iX3MVg9l3kHC3GiGcnfq69iaslNzCcR1mWqrUeCgSyrH7I 0jsgS60j2PJws6MDivB67xn8QuzzCnH0o/8av1flaKV8z1uYk9ojBMl4u3wk O1+Ez4Eq+Dm2IYQcLf78ADJ8idAHj6A8YhSVUTxeF5OJNEqucvuD+WPoyRpF dzZ5XM4g6lofof/SbWSGUEoKDIK7kS7cdI1hpuuKLap7sWbRWmxcshaqSpuh tU4LqsvW4sgee5w+7A/f0xKSXMR7lqEggLyVAlxtYDMxiVa0hLejI6qDCGsH eqjy7Ytn0oY+1kMnr24LrULpiUyUHU9HqS0fKDPONHOP5RE3UB97h9vvTHtA ld0PGMh+iIwjFeg5241H1Q9wnVLvlaIHuEzM6VLhLfTkU9qVUgGR3U0YUsqT lKI9PkqETr7ZIi7CYpOWIlzyE6Ri4Pzwv8buD0LF9luWAfFAvkxl5V1EH6qA j0U5fG2bEXBChqizvRzllAYOoSR8BBUx5IwJ1wRuswzdxDd6CwjU7GF0SAep tO1GVkQxZawMJAQnIcHHH9vmf4S1X8zGFqWl0F6zEVvWKWMTgam2YjO012rB SHUXHAyd4GRyBsdN/RDinEXnu4gSylDVQZ1oDO0mftGDjtg+dCf0E58YoIw6 gEup/RhM7SMhnpFKGTaklne4U1T9Hc/g9vMd+SmGiui7qE94wAMpoUow+zGK z/WgmYz1XuXPGK/6BWMljzFGVcrl0h9wqeR79BZR2Z1/BbI8csQ84i/SSjKC pAknlG9LfCRA88svv3CreNnSYNL7yxOU4s9ydHPSiuM/TJ3QRO4jvxZpj5AJ JWdq4WVcAu9DF+BLcTPEtQvxHr3I8B+gbDWI0ughbsh16VfRlM37XXPWEBol PahIakER+UBBhgxBPnEI8Y+E+or1Ex1JU201mGupYR8J/9pfcNLcFSf3+uLU 3nC4m8fCxzwJ+eebURc2gItRQ0QghtGVdBl9KaO4lD6KoYxRjGSO4nLmZXoc pvQ0iNaoZlR4VkNs/pedlKDsWATyw28/6XymPUZn5t+JFlOVc7wHN8v+zjXv rpT9A2O0P0YF6eXyHzFYdh+9JbchY53P4kESipeFREyy0xTCxDP7FzmYmBOy cMburxAXlrEw90cF7sQfC7pTI2XBvb0RXfUy+JoX4Py+BngebYWvcwfCz3Yh 0aeHCoA+5EX280aZeAnVKZe4/dLEDuRSjSMlepUr7UZRgQxFuW1wsj2OdV+t hfYXlnBZuAm7VizhPm+hpQ5LkgMkbDtl4oBTZh44ZR4KV/M4nDcnqrhXggjL HKQ61qDSvgZtwb3oTbtOROEGhrJuYCTnBkalN3Al9zrJNQznjqEtVoZK30aU na9AmXs5yt0LUU7cpdi7mjjQD6hP/gktkl+4yJhrTwVK4S+4XPkPjBAqo+Xk RBXkRORQlyt+xKXyH9BbdheyMirpyykilhMBKamlaJ86gY5804lnhb+fQIfx SYYQC5nj4+MTxZYQGl+YYI+Kbl4RINOaBNmkzpTZ0+UfH1tfgte+Wpzd34Jz dh3wO9WJ8PNdSPDrRkZIL3KiesXolxJ8EakxXUjP6IU0rxf5eT2Q5spw+qQv tq1eT7IOq+eawuxrczgvWcV9y0pbAwd1NGBNwjZXk5NUfPuTRJOkwGNvFgL3 5yHKuggumgTc6cvo9qnlemCD2fcwknsPo3n3MFZwD1cLv8dY4R2MFNwkhjeC qoAWlPmwpmMdPVahwpuquYAGlMX/gLrUH5Efeg2Jhyj1SX/GpYpfMFj6M4bL GVg/YbTqR5JHBCZFv8r76Km4A1nVdRICroo1HqmIHxyYAO7XU/2/44BjriYP HBUE8kvZxUJc0d0wAmTqgpPK80bR08TJKL6p8s7kVIhEt3juMdmzDef2NsHV sh1nHGTwdu1GiGcPYgJ6ERskQ7hvK8ICZIiknJKY0YfM7D6k51DFkNmFnIhK 7KA8tWPNBmwnFHeuXieW8sfWbYS1riYOkRzeoskDaHwWrqYhOG2agDOmEnju zUPQgRJEH65A2JEWJAVSSU5F3mWi4ZdDG3C54EfiCz/iavGPuFbyiHgfvVf8 PQaLbqEquB1lYiMzqIF4TDHKPMJQEn8fksArCLEgvpL+IzrrKYUVP8JA2SMM sYZm5UOMVBEHqb5Pj8RDqu6ip/oWZLXkebUEYE0nFUR851gRgK/LxUXmkQpA nGhAiutgeF8Vk5iQ31TlsJvc7BJ4I6yEjok8diJ+yWepYjvXjmSvQcScG4KH Uy9OOHXj7JkenDrZhpOuHTjr2we/6D5EJPUhKrUX4ZT/awquc9MSu9YoY9da ZexkQhjqE4bbFvOedmaJLhzUVXF4qxaOkLDttJEnThtH4LRJMs6aZ8NrfxGC D5Uj2o6qfqcGSFwuIPIckdiCv3Ot+Zup7Wj0o/Do04Jyn2aU+lxAC1X2ndlX 0Jw6jPLgTpQxEMObUR5agnK/GMT5jOCccSNqEx6itfYx2gvuo6uYEhclr4Hy exisvIchAm2o6g6GCLSBmpvoYV3oeqrt6imp1RGBrayUb3E9TdF53JhrKMLt lWfhNsn7+ONTQTZljlO0DsRiwgp4rrIBXVW9ApwdHJTpwePIJwpWkfiAXHAM nuevwjeWuH7KdeRn0HtZ42gh/nyt5ieMk5pr4i9Ab+1GEsp4JHoE5+61G2C4 dh10vtnJHdt9rQaObNPGURIOyj3eOG0YTZCm4YxZLrytShF8pAoxjvWIJyij 7aqQcuICkt0HkCshf2n5F35ovI3x+HpU+hOc/hdRTNDm+9Ygz7cWJUEMRpIo 8sWIEvLHWDjo1aIg/D7qKx/jgvQOWvLvoKP4DrpK76Cn/Db6Km6jv5IgrLqB /hqixnVX0dVAFLJxhKSf/LYF/W2tIpS/Xq39hJpER0fDw8ODS46MwrDP/UmB 8l+eUL4A4IapAVS0cs5CgTlMEygmm9TjoDxNXuk5iDSCMjf6NsqS7qE+4wFa c36ArOAh+koeYrD8EUYqH2G0+iF5yw+4WvcAx42sof8UlJsmKKbutwfgsHQv vNYrC9TvU5zW94WbQQzcDDNwZm8+PA+WIfhoDQJsKhBCZVe0QxUSjlUjx6MF BV4tyIy4iuaWf+PhwC94XNWNtoh6lAY0osC/Djm+lZBS7iwJo5AaTXkwugRJ p9KR7MMa5Y9RkXEdddk3cCHvBloKb6CdSvDOsuvoKh9Hd+U1dFdfRXcdwddw GR0XqMK5MID2Rqoaaptw//u7UITj7xXgyNxRHkdxxk1o/ctR06duqlGAnt0k pCaYCxWHHEonWpDsMYCUoDFkR91ESdJt1GTcRZP0e4o799Bdcg/95fcp5lCi qL6Hy7Xfc7NfepTneJSUobduE/RJ9qzfCOMN62Chthnmm7dD90s7uK/ajRO6 GnDebga3nT5w048lpCSEVAE8rctx3qoYPtYlCDlahmjHcsQ7VyDHswn53k3k XE2QBnSjovwBbo/+C/8cvIM7uXUoDKih1yuQFVAKqX8NSqJqkB0oRUZgKyTZ PyE3YRTFqVdQkTmGWukYGvLHcLFoDC0lRFfLrqCtchRtNSNoqx9CS+MlNBNK zRf60NQgw5XRMVHZv7537EWFTJOt8ngC0q9XBbK0JtwptUoOLPnbXARyaTdB Lp8Ue1iJktBGJB8jcSe+ETBKFnwNhQnXUZl+Aw3Zt9Ccf5uCym10l1FAqbyN gerbGKy5hSHKC7sIJ701cjit3wTDDRthRDhZb9OBzXYd7FPVh8kiWwSs1YHj Dj2c3uZBWEXDbXcG3AinE+a5cLPIhzcxzCDbYkQ6lhBOJUin3Jvr04BCvwaU BJK3BNUjP2EI3UP/xt9v/x3/7OxFfXw5kn2ppPCVQOKTjaKIImTENiMhdAAZ MYPISRpCYfowyrKGUS0dRl3+MBqKqOAsG8KFqkFcqB1AQ/0A2Ww9hcPnUNvQ i/ZOHhRFQD3/G4D6i/AZ+RXPYp9DXJ8pAKakoKXFGCn7Cn2cXwC2BuOXbiPe tgZJrp1I8rmE1LDLkMZdQUnqVVRnXkNj7jiaC6+jvZTFiuvoqaRQXzWOvupr hNA6YiEbOBaya50yIaQMgw0bYK6uIiCkiyM7dLFt0UHYKlnDT1Udp7Td4LY1 grwpDSdNcuBonAVXCyk8rPMQYJuPcMcCxDgXIvVsOWdD+f61KAqsQXFQNUqC q1AaXInqC/fw/b1/4V+37qJDUkRRIA7ZPmGoSpUg3G8Y0f79iA/vh8fZSgSc ryI2XIVwrypIYltQUdSPyrJ+MnN6rOlHeR1JfT/K6PFix9DrQmCTb10xUQQK ASIuTZZfQiS/IkgsAYSIt4x7ePZ9yAKErtzHVqGtYARxTi1ION9L1PoSMqKG kJc4gpL0y6jOHkV93iiaiq6gteQK2stG0VlBUn0ZO1atJUa/Hjsoyu1g2BAu hps34cBWHR4XwuTITl3Y7tLFbiUbnFm3Fz4q5jitFQy3XUmw254AB8pJJ/dm 4tzBbPgelSLEIReRzrlIOlPM4SL1q0QeRbKCwHIUBpeRlKIgtBjS5Hp0X/83 qrIpsoUkQRoaAXcTa9gR6zxokYgjlolwtk6Bq1UK5Tsq3A+lIJCe++1PQZhT LiQpzcglbHKr+5FT1Ye+kZt/FYyepZTU1FRFOExMgCpQ+uKp04zYhBTdhz3j AVBCfkAXYk7IEOtNBhXSj/QY4lPJl1CcMYiKnEHU5A2ioZBcvWQQTRWX0FQ9 gK0r13DF8DZGx0n526iOMtPU4JVPDiEq/+iuLbDU1MeeJY7w36SPU5t9cEI7 Cna6MbDbnYxjZmlws8qA52EJ/O2zEHosC0nnS5HuXcoBkO1fAinVTLlBRcgN KYQ0PB9J/hlk6CmIC85AanACEgPDsV/fHpa7XXDSKgYn98VRWIwnzpgAP6tk hJHio21SEH84BREWJFSUR9lLUZzXhet3Hor3pjyj1p2ugErxa5aEGyj+IzGT 1zm/NHcFjakXEa49iPTpR2xoP1Ji+pGV3E/cuR/F2eSs+eS4xSTlJGQkVgbm 0F21DrqrqYTdsAlGGuqw2KINK9L3QdL3IdL34Z1bOH3b6m2h9GGGg6ttEbjJ BEfX+eGIRjiO7oyDvTEZpkUyzlinwutoGgIc0xDrXoBET369eoZvAST++cgM ziOOn4NE/2zEBhQiJCAdoUFJiAkjarA7EG56zrA3dIHPgWBEHopGFOk9an8s Is1iEbYvAbFk8Km2ach2kiDLXoLy41KUHuWXJ70qxIdn1abM8um1mQrKHEHx 30zdAxILW/kGq5ug+GvDDxF4qhvBpPhwUnxcbD9SU/ohySRPzCWPLCQp7Ye0 oh8uxz2huYKi/8bNMNXShJmONvaR0i0puhwgpVuT0m3IyI+Q0o+S0m31t0Bv pQ1ObDwI3c+WwHpDMGx0o2GzOw52pnFwsUzAWZtEeDumINwtB9Hncvgeh08O kgKyEecnQaR3DiKCixEVV4qocAnCwrJw4rAf9L4Nhu8aJ3juckCQhS9SDsdB cige2dYJyD2YiIIDJFbxqHXLRqN3Puo9uQXZaKDz1B6X4P7QTaFwnLq4FOO6 fDNhhhwS4g38AhJfPaO1I39jJn9jzXI0Et1Jl1yBb1g/guL6EUFqjyG1x0rp kew9sqAPHUN3oL9xE0zU1WGiqQlTHS3s1dXGfrJzK1L5QVL5IVK5DQX1I3q8 2o/q62LnUicofzILml8qwUo5guJQLKwN4mBrHgdnqzicJztnm49zInxc4rj9 gLMSBHgVIjCsFAGhmUToExEcJsXJwz5wMj0J801eOLw4GEnr7BFtGY4c20wU 2Gah2C4bpfbZqHDIQpVDJipt09HkXYzWoDI0BxSjxTcfLeez0XQyja0+eklB /cC0Ll8/vKBA6x8LfEk+ulCNKMT7eb+hLxMuHOHytUeoabuD2s47qJHd5nPB m8hJTIIxkRUTDU2YaGvBlPS8j/S8n8zbivR8kPR8aBev68N6TN+62K+9Gyun fwbVWZ9AY95KmCuHw2JrHPaTrm1I1/YHSN9H4oR4+Q7OeZXifGAe3H1TcNoj Fme8U3Dc0g2Ohsdx3Pg0Tpl6YN+KWPisiEC+tieKiLqWHStDlUsZak+Wof5U KRpPFePCyQJcPFuIrqh6dEbUoCO0Ap2BRejwysRFt8QXfkONJkYF+XbLh0JJ wAKH/L3ATN+Coj/7be0T+R+3iBNacO52jjBS04AxxQ5jMmSzLYKCtz9RsPUu Qcl6THSw7KM5WDfjC6jMnoU1n86C7nJD7NkSCWPDOL6XPQNOnmU47pEFcTPd ZgR7PWs4GjiQnMQxg7NwM/bH6a2RsP5WipT1kag8XIBa10Y0nG1E07lGXDzf iGaPOrSeq0arexk6AmvRE98CWcwFyCKrIQsuRKdvGq7XtytkhkxJAl0X21Hy NfNLwv/1Df1ITqmHp7sU/mekCHYljuUiRV5EHTpK+8T1wPIZUggsc6ZWezr3 9kLs2awOQ7JfQ7JfY11S8VZt7CX7tSAVW+6gML2TZBflSCak3lWzP8aK6Z9j 48zPsXn2J1g280OsnjsTygs2Q32tM6fPHfsTuUc9HWPuUVdpLTQ/n8XtO+of gZOBC+n5PJwNfHGacqG/UTS8tqbi7MpilOtEoPF4FS56ydDqK0ObXyfa/drR 4dtM+mxEm1cl+lK60Z3UAVl8E2RRVegIyUHVaT9FpdCfFOiWpxWv4OKFfvj7 kk59pIjwliLOU8ot2EsnPUtOkZCeMx2lyDqag/6i3teeretPptZ1puAkvR0y nHVwggHpW3fDemxevkTw88+gpbQU+0nXlqRnS9Kz0qyPoDRzFlZ8uBBL3vkA y957h0z7a6yYbYzVSmehY+bFfVNz/qdQF3Sr8flsaH4xm9t30neA0+6zcNzt B5fdoTirHwUfg1iEGyfjxKZKxGiW4eJ+CdoCBtERPIjOkEuQEXftCu4h6UBn UBN6k3vQniRDZWAFsk8mIet4CCo9QtFdXCJWpsysWaxg1SkfQ17lbvDMzayf WIQd5ydFKuk4y0uKXMqohWxFnRsJ2XIJ6bmU9FzmlIOWkGrcHbgpQibP0QU9 T5+atuRwb3+DHlknFQhJ2LB0IRbMmo6FJIs+mYGls2ZgOQnblNj+zOnQWbkE 2quWcM+/fvMdLHr3Yyz/cCaWfHkM67Z4QV1tF1S+nAv1r/i7DVQ/+4TXNel5 +4LveF3rnSR9e5Nth8BFPxruu4k3G6UgxCwV9ef6cUqlFYUGpZCdZAvErqEr cgzdkaPoiRxBV3gf2oLbUOlbjVzPUlSG1aI1kew6pRayxDwM5uc/+Uk6ISx0 0/jELS0hHn6eHnBycGBGPo3LfvzNjYONLej2CcW9xmbutrRIoqJsnXYMSWIA 2blfLqQ+eSjyKkC5RxGqSGo8i1DnWUhC4c4jD/XuuWhwzUaNQyruDd7447Ox EX/lYPLaGLaRD0i5t9+G2zF76GupYjfJHi01GJFoLluEZYTPchIlAZ81s6dj 9SfTsZJhtGghNEm+fuNtLH7vI6yYMQvrVqhAZeliKH8xl8NHTQ4f3qfehuOO o3DcRT6gF0AYRcFFLxHue9LgZ5qFcAsyxJOdKHQdR+DObly0KkRv4AC6om+i I/Iq2kKHSPrRFtEDWfIAenPHIKNaTpbZRUL4ZJSgMyFWQGT6U+3H08ccuEfD nTtgbGDA7Zvs2QOTbVuJK2jAw94eR48coQJdAufpq9H4qQpuLFBCDNVl8UHs FjoCKDAfGf5Us/mVocSnEpU+1aj1qUGjfy0uBtSiOagWLUHVaA6sRLN/GVp9 CigXZaLheMJEU1ye+AuLe//2H1oLwhB4T1qA3q5O7NZWhQHJHm01yhJqxHTU YEao7WUrITTVsJ/EcMMafsTr18BSg15TJ1FTxYY5c7Dg9fex9OOZUJo9E2vn zcGm+QJS8+ZCVUBNhVBT/ZyPXCarlOG4zZHQ84DjzhA47YrFCf1UnDPOhN/e XMQcKEWqXQ2aQh4geO8I0vb1oPskZeLwm+iMuYWehFvoSx6nDHEZPZmj6C24 jq48dkdcH0kroVgJWVqqQGde4q9713aYGBnx59fbSUSD72zu01CbBgsazNuw oOHsI/D2mpjizPIjaFG1Q9SWs/BUP4UopxgkEZlKDajg+rXFfg2o8m1CfUAz moJb0RrWhvbwNnRG0ukjW+jxIjrCG4mE1aAzgJGwdFyv65iYAmboCH4jute7 v609If8Lg1lCk4qBuEdbhUSVAFSFMQHILWXR5pey7Cex1FLnm7Gv4KCWOoka Jwc0majCfP56KH/8GXneTHzz4XsUST/GqvnfQGXRQv5rz0OVYN1EMG4mGFU+ n8O//BYctnnDYXs4IZmAEwYZcDclIrO/GHE2VUi2r0e511U0Bn+PmMM3UGXX hWHPOvSmPERf6j30pd1Cd+oYerKvoq/4FroKyQeLKE8VUu4vYGtaMvhc/skE vdprbgYTY552GG/jQWSGaiEsCrHS5BeIsIFZkZiz6WsNAxzedwA+ujY4YpKO fRuTcVzJBz4q3kh0YLf/s6mwDtQFdqEptAetkX3ojO5DF5VgPfF96I3vJelG V3wn0b8WbgmkLITon3/Cy0Lml2/ECmWICOx/WIJdKJAVBqIhgWioowojEmMd 8kICcC+JhbY6LEkOsIUU2tzU7nM4pKOBufS/Og7RW8bz1yFYwwKOWrr47q23 seD997F8ziwofTobq+d9jvULFkGL0uWWBfOgRggqfzYbmz6fA0MlZTjouMBh iy8ciA7bb08k2iaBu3k+gg5UIu5oLVKcmlDqfRnt8T+jKugHRFpfhcy1CYPx V9CeOI7GSLZKvxk5XtWQeFegMrENFYkNuJDdCFlJHTpzM3nznfsrlmx36ACM tmhwI2abuTYPoyWN0oofKbds5BAn6gTdJjgs3I4k6xM4aLgHdvsskUxR1dGq CNs31eDw+hJ4LItGuokU1UEDaAwfQkv0CDrjLqM7cZTixhUMpI6SXCYZRk8q WVtSNzFNxuyJ1Udl42ZLm/gzovL9ETYDyfATYJ28JnsSVSkRYHU/bgcjgtVY gNSUBrGXBmlBg2ODPKCjSQPUpMFpwkZXU1wNdlhXA0dIDOevhb+yGdKcXWCg tAAbZ3yI794mFvPRR1g+dzZWfjYHayhDrp7/LVSXLoLusu+g9e1n2EzsRZxy tNOJhN2OJBw3yhamHFcgzo5gdW5Eqe8wWhMeoiP5IaSet5F9/DIue1eiwLse hd61yPeuhtS7Clm+lcjwK0a6fw5JEvLD49FVXvTMlRM5qXyFwA+bx3SfgKc4 ZLbZsFUlNM79yptht4BwPXgSJ/fswiGyCVOK125HPPh7E/1a4WzVDQuVXnio NCB+QwpKbSrRFk+xP+kmelNvYiD9FgYlNzGUeQODmePok1xBVzpl9FTK6MlU tSWVYLi4ZCIIi6WsXPb8s4JmzeSbwksFZHNSEinSErIUcU0EZM1FZHUYshoT C2dsthCyR9h/R7dq4nMc2qwKjzWGSHc6CZM1S6D+6XSoz52ODQTv4vffw5LZ s7Fs7hwofU7QMni/+gIbFn0LzRULobNsPqXV2Tiq4ghbdW/u2o7t4td+epHH Bh6q4PaTXOooTw2gOfEeGmKuoci/HVHHh1F7vh8dxAALfKoI5nLk+VciO7AM kqAipPlnIt4rAm72DthragJzU9MJSJ8TdGOsvZkoguoEQTWn8e7X1oQVQcqb 199weAu/3mQ/jfPId9uRePAUzlmZkwrUcVRXDdbqO2BmZE4VGUHr04V0n0Hk +1+Bs9k4TumPIV6vBWWWNWgPGkK/5AEGsx5gOOcBRqT3MCy9g/6cG+jKGiWi NkDSBpmEXDclTURWvoITkH1VDllFt6Sxjf8NtT8QZd1EI1ThRsnyqBmhyox3 vw4/yoMMVRqhjTDKoyTTYLtNi8LBQRVVnFquhzS7kzhtok8l2wxofDpjGjQI 3plQn/MRlL+kcPzN11hMoXnJZ7OwZO4MLJ79EZbO+wLrly+E2srvYLVxL05o +nOXdXI33wQ9Z1kK/0Nl3H68SzUK/LtRFXkZae7VyDxfjVT3esS6DuOalJST 3oQC3xLkEMMMOBUKpyMusLI4AFvrwwimAsLRYBesiPD4ElPlgZ1NBp1Aw93M DdlUW50Ddh8Ba6mjhQO6WrDeoo3DW7VpyNrYr0IgfrMN8VanEEwhznabJo6S 2G5Vx2EVPZjq7sdBC3ukePUhw2cU+UHXURlxFzl+9+Hv8BBhB2+hwLINFx0b 0BdzFcN5P2Ek/xGG8++jP/8OunOvEZcbJiHfza0nkLNFcMWfafwVuM8hPT2d A/XWrVtPTb+xH4Niz3jXfYMbqYkWG6nqU6O1EMyYHy0BzC2b4tfb2G7Xhh2J laoaZaBtSLFxwWlTA0qYmti56Etofj5zGjQ/m0F8TOOz6VCZ/QF2rl0FtQVf Q4k8eNPCr6GltBiaixdD5ZuF2L3DnHeWd+C1IwGuehLu2RnLIvgeKuL2o13K SF8dSDhdhhT3cmRShSClyiA55DIutv+IiHNxcLY5gf17LWFnbY+QcxFIC05G ZlgcxUsfjt9ZUxVmraFCOrfjFfIapBS3TOllM27gGjRwTVgQxFa62jhIEB+i AR+mAVuoEOmYvxUx+08hzNmRUggpYIcWKUJzIrU4WHrB36WEeyb+kE9DwiO0 pPyM8ui/w9fp78h0uYtGx1Z0uzVgpOhnDBc+RH/hPXQX3iSyN8r9aJasiAqu vNynfmdRxJibfXqRHft/5NF+nmtdsolzVhBTgKoUilUpB67KBLBmghlz3kvA HiRgxTFOBvbQ19pItDyO0ONH4UBjtScxWbsUWl/MJC+eDtU5H0J5xrvYMP1t 6BKb2kfHZ5N5fPH+GbGpzTBS1+Oe+RixckbK7TsT63TbxzfYw48XIuJEIWJO FyHRvQQp3qXwc4mE1b6DsDDfD69jfhQXk5AenIXMyBySTJI0pIdF44SJAaVM ddhQvrEh4z2kqYLC5ERu5Caam6hsI1yJ/ZppMVwp/upo87hu1YHNNh3sI0zN 529B5D7C1OX4NNjv1KHSx34nD63dDk0c2WyEfRuceRa21xZJPsPIC7uLipgf uNea0x6jI/MxuqWPkRf1d8R7/gNVnjfR6lqDK4l96C++j66SW5CVEZcv76fH iwRvnsI15q8LNEt8Tf5xmjzYL0z0pMvLy0XAUSFYtDGN3JQQNxNitdlTgUsb 1oS2DSF9hDRwdLsObHfo0FBJI8u0EWPqiCgXRzqdAynhE8pQajBYuRDKn7wP 5ZnvQXXuR9D4Yjo0v/gYequWwGrbk+lEtrGZLbYZLFOm75HVrdnFPXc356cL z+yX4ORengz52WfC/3g2Th8NJKc9iH3mlnC390OYawJSfaXICCYJy0FaRBbS oiRIj8pAakQKQs64M/agQfSEJdAjlECPUHqy0eIXLppoEPCaahzoZlqaRC8J eBq21RYdDnhzFeLXX+og1IyB7gy7nbpPAc+JJuw2a2Lf+hPclQa51MB6vzMy g6+hLJa/h+Rixo9oy/6RwvEjKrkfYaDoISRRj6kevo8H9T/iKlv4V0E+XUXA VxPwVRcx3HwBYokkciqWfdnGsu4bgivLG8Vk7H/31HwEY2EMfzoSn64/IsPf zAc00fBJB/tIB5akgwNbRPh1cGT7E/j3LlZDuL4dIpwcKUZugtHaZdi+5Gts WzIfZhtXYvuCL6A17xNofUny1UxozpsOvdVLnprYNCe9s23PBqWJgHhAiXiw ahycqBLmA+KrOLr3HJEpSyJTFjhu44kAlzSEu2Uh2j0LcV6ZSArIQlIIPYZL kBhJQrAnRGYgKiSWkYppXHJ9jViGBo4K/OmIjgqKUynOqQvQaxL0mnLQs0lv qo7Nl25FgPFJhLq4cKs8psFuF4tW9rvIAzgh7Hdp8Vf6OlwNM5F8fhiu9onw PpmHkth73DuNGffRkv0AHXn3KWzfR2/xPfSXfI+WIqJmbY/QV0mMo4b9iASF 87o+yGou4ObIsIg8Kwwm/7z665PCwQTs/zMR6YVwr+i2Cfk52NDQUG4Gq0xo DnPmoPnEHPYK+Y0zh63MHHQEc9DFUYJx93eb4L/lMAIPHyX4v+HMwHzTKtK3 OhxJPw4kBzQ3yJnDDGh+OR27yBws6Fjb16zAhnlzsP7LOdhIwjbV+XOgSvvK n8/CRqJ4JmtssHeXE0yNLWFqsg8HzE7jhHUOzh/Og+8RigoO6eRzqQg9n44o vwxEB0oQHSph89vTEBkhoaGGhCTD2dyES1UE43YtIj8sFdtu0yDWpQbbLaqU FjZBSunAVINMQoNFAy2YUwqw0NXhTMJwsS6895xA0PETOCos/GEGYaeny5uD HnmHHpmEnhZ3XLYFHihDsvslSkn9Ez/Vl3wbdRl30JR9B615d9BZeBtdRbfR U0KFWNkN9FaOo7vmKmT1ZA4NQyTd6KhtxIO7tyfSgPx63r886X8//WvWkyxA 0V95YBbAis/W1laB3r1KAZHisOgVFAxYJrQgNVhu0Z5Y+2RF1ZrhhtXQnbca 51WtkODqjqOkgiPbNKbBUU+X/aeDDzj07XdpYeeSrwh5IRh8RfmAKN+qz2dj 7RdzqEKbwzU+RfTVF8yDDnE9fQrARnv2wMjIEIa65rDQCMP+7dGwNIyDjWUO nA7nwMWxBO7ORfA6kQ//U1kIOJuBQK90+AewAOIfyqA/fyaQy1f2JBS5iYf9 mWMmXMomE7Dbpk5CUWHrZuQkEfzqxHzUqYDWFFZkEPw7F2rjnJ4L/I658Csy uKVHus8R3rp4i/6n2KhPZEifkNenwlXFghtKslsvMYDL3L7jES/kxg6jKv06 6rKuoyn3OloLxtFeNI7OEuLrFWPorB5FR/0IOhoH0XmBCs3GLvR1yEQE5Vf/ vjWltyv62xvyWPP9le8oAqo8MXfNJ1ibE/67iH/rsJ7XskXYtmgZTm4wp8LJ Haf2GsKehu1A4shEX5dD24ETwluPi4rYufQraM6fCdV5H2El8Xmlz2ZTRc43 sTd8Ow9b1VS4fYbxHn09bN+0HhpL52P9Z5/Teb+F9tK1OGocj6PW5bAk9nfU Jh2ODhk45pINl9O5cHYvhev5EpzxKMSZ8zk4fSYNLnq2sFXT4BI04yQ6eJPL 0vY7eXpmt12DRI0SGf+76iaqqjBRE5aCaGtD5ztNuG4/Di/HEzxP2cmWPbEV OPzyhKOckJ3rk+zWFiLw84g7XI2EE1RseA4gKWhY7BWXpI6iUjKK2pxRNLJl hoWX0Vw6guaqITTXDuJiwwBaCOeWC31orG0TCzH5AnzSr9YrhvgFBRAXC+5s rLaZM2kzDXJZFRXorFSC6qIF2PTtfGxVWgZD5fUwUVaBrZIhoh3OEt0yogi2 RYSYqhTC92UOXQ5ZIcDZ6Wli6+LPsW7WW1gx+29Q+uoLaKtuht7OHULqXgdd QlRt8XyofjMHat/NwZrPKK4v+BYay7+E2aY1OEjW5+VoC9OdjjA19YeZTQb2 E8LWzhk45CrBgdPZsLY+gx27g8kbz8FmkwuclPbD+TtdHN+gAYd1myjC0HWx KMPxMKo5dhLCOynP71DFpe4OuUUoGlD9Wg1Ouk5wt3PhFqEcmLTg57CwEMWG 0LUhdG12UxG7WxOH9NVxqUeG6wP3EGPXjFi3HsT69nNrmE87R8HnbCqK0gZR njmIqtxLqGE/51A+gDricbV1/ahr6OdWL9fUd+PevR8Uwfzu0+DKr2j+nQJw i4ReiyQuFlsI0LXzvsDaL7/kwN29SZl8WZ1LWcZEXi0W6iH8sBtczI1ZzGLp j8b4FQewvb68UArjgpgYyDShtehTbFPbBEMWh6mi1CEjUl65Auu/m0/nm4v1 8+di49dUn387F2spa6/96msYaqyDmcpavsoiYrl9ybcUY1S5a2IxhqXVfZPy ibjG2XiHNUy2u2DfNg/YabrixIZDOL1sB04oqeP4+k1cXLHbRX68ixDeqQqx Kj9n54jN88iI1R3gesRZwUoYHW4ljDVZyyGyZGsa40FC2JoQtiaECzOThWO9 ivFLDxDu2I4I935E+vcjIrANVpZHEeJfhDxJPwpz+1FSRELlWQkhXFLbj9L6 fhTV9OLuvYfyPxYvFuFToPuiHLqMi7F+YR732p+favfvNTKC9vJl2LVuHZeZ TLUFckIjNdysgT3ztyJo/0l4OTtORCwWrWxZMrYjeGdxINtxIOtwIB+lRyvD nTChBGtMskOLEh/RXvVlS7Dmm/lY9OksLKWAvYKS88qvSOZTACfZOH8V3Pbb 4KSJPlFqDaGqUqWA/x10lizgIo0I9F66xP0Cf7Lexq/bZZcnz5/M9A5hYj5s qxtcVW1xdtVuuK7RhPPGjTiqqQwjXS2seP9daH74Nby3nsCZY+7CmhztX63J sRLW5BwgoK1onFa7mWjB181J/A2w7OhhBJ7vQ1BgP4JD2nDgoBPikzuRLu1H ZiFJaT8kFSSV/ahuGxXXEck3zyZhKv+LseJKMBaemYOzajtLaJ49Ywk8966R ipCNKFaZkPIY+9hL+O5ZvAXexs7wPn6cj1U7+VglZiQOY1tCdwW3VvHAnl0w MzEiqmxMZGkXJdV5FIJnYNvqRRPNWEuhT8cascYqG/hG7DYt6C/cjjPGZxHk ZMuRI64zyUqnrax0UsXqmR9SNlHnyZHIj7foTJRMh3Y8SZgMX8aP2MZxZMKD bQcNrLHPwItC9Rmc1HTA3oVGWP3mXGh/MBc23yzBKRUleJ85CwM6hwFhbEQY mxDGZoTxXsJ3H+G7j/DdR6lonz4TLeRlpgiu9L+4cvkhGhvv4HxQL2ydI2FJ 4IaS44bl9CO/cYxbA/oXIW+Kc0/iNMXEX7HgDPKvT2MsX0mLN0TKd1TShXj9 DIx5IqaGvs5OSklqMFZnMGvChMor3e/U4UZp0MPR+VfrUEWoD1NWtjDcDTNj YwFbPdgY6HJpykB5CVS/nYFN30yf1I/lW3Y2rPMstOwsVek7KicQ6HCMo8P2 O0Ry9KQeUv/qM+gsXkSBm0KNgPM+wtmScD6wTViaLIf1UQFnW84ceZyPcjFG i3zPABZ7LLFmiRmU5m7Ezi9WwEVZCQdX87+6m5mUDD06jx5hbcDCGV2jEdVp xpTSTSi1G1PQP3/6GPooBcsvBmQMiD37q4Al61OLExJiofyc4hbJ688G9mUF wCYLwD5jvu4lIV672znAiPzXmAajMl8FxzSP4KztccpmpDghEx3YuYUC0zbs IyBNBSD379EnELfgMM87puEQIfpH6BOmm8hvdxNV4luSrA0r35TjuzL7id4Y LLJCoKMHXM0N+V7czKc5L9U4u5YvhPaiRcT5NYSlz9rc0mdWhVttkzM5uejC wciW5urzkB6mUHqELu7wbg1iSeoI9fDFktnE7r5cBfv1y6Dy1YeQJCchk0SS lITuLhky0lIgSU9BJsk0ZGakyN9PzlIe07D4y8Lyhe20KbETS2H5xsYfFGAX J6TZ/3yn+suQpoSiIikUNfGh3MrPjV8o4/AGK3g4nyNv04c5adxcn6Kr4R66 OgbfbOzfvRMH9bbCmtEKkkP6PL2w3s0oBqFFspN55+IvhKaK0GhiSG6Rb6jo YNdifbiZn4fn4YNc8cLILSuhHeRLmB3qsN2uit1rVxO3J2MjKI3peGbyq6vp WAxOa9artGF1Kt9LY6T2kEhqCUJGe9jIjXfswDfTv4X+PGVYKq+GEZV/xlQW mlDdYKymivP29ixqiWmQxTZRvW/KASfWpr8NOPkC5o8KgIuSA471LcV17Qw4 cc01H4U/QV5aCIW5b+Cl8y0Stb5Frsa3yNswHxlEFc7ZumEvJW1uiRnzOKI6 5no7YbFjyxO6IEcZDug/oQ2WpKz9pKzd6mv4rpim+lNN4gMUEjkASeEGq0i5 mqfh7+RCFQkVT7tI+QzBmRNtEI66UoFiu1MNfs72RNzUYUTuaCRkgadpK10K ibiI21qIqvK2dZAuzd/NkVPCmeP23Do0lUUUSefo4wyVAXs1+TVoFoQlW6bF FmlZEMnIT0yc+K1kBgHzA56ePGk0iJXJfw+m6N9yzWaEyYH5rJvVXxHALCAw D239Bp5bFiFt21JUGS1Do/kK5Jpqw8ncCPvMTGFkYABDslrDLVQ0kNZMWaee 8QPSnAVpzYIA3U+6309as9B/whP2UlGTS1b/pM+n/lTrVyxIzFU1oLfMBn7H vbiK2J4DkyLh608qYb77S0KA7lJDiSQRvZ0y7KGv7plYMq7NgTqZnlo9sTVx zYrAUDkduBOW3EomYT2h6kf68F6lwf1+jxW3/kz9qfVnB6iQ9rWzm7ghViwV mWZFTOWrzf8eU/lfuGUxm2EapABTce2+iOlzE81JRX+McJqQOK3JdY9tXY5w vfUI27sVh82MYG1qjPITBpB5qqHn5OIJlqDPWAKlLkNSq/rq5dBcsxxaa5fT exunwWwX6+6ZEjq7tDZgq9o6ZKbxIS4nWejsyXe65Hr9W5cY4aSFF84esRab utO4Enk2/c/3dlnrw5b1dvWID+upoUjCTx0y0HcT6AaaWtgj8tUtAl9lt1cz eyTALSbZorfbMQFtO2HNmiqHNlvgpPbpdpxYuBNObAZaWMFlwwlbsKaGQ8LM 9CVZpzzoYuwUf1hevmB5ckv5X5/GWb4cfU2BBflNwlnRLdUvTkL3CeLvPoU4 k7zEQPJNbZgbG8GC6E/gwZ2osduKR/GmeFy4G9fSN2AsYRl+usbfOezq5IgN y5fg27mzsPCzWVj8xSws+WI2lsybRa99hG8+/Qgqq5Zgq/JasihD8upXYKiu So6oyq2LnqhXCJt9hA3jsNtX6sJS+yw8j59g/HUaR1xf4ssUfb5UsZ0ok6kE 0tcg+q3GM/g3yRZToKcp2CId0YjYmDExVhNi06aUq0138czVhMKDVJLCfauv q5Nb8GTCocxPs7LFTtuouNv/+R6c0eB/IUhY6cQmLJ/DYV01HKagbqO5GZOz L3smvsZmB9nrE39AVjG6k+MDayV5TVG0ELqvTAL2SeB4foJKWVrsJePexn/o dVxKOAhxGytVxeWi1Qh3VMLyrz7Hd598jAUzP8bCGR9Dc8lCLPhkBhbMnYHv Zn2IpbM/xvJZH2MTfU5//Ro+e7EVxnvJb1+G8uefQ+nj6di1bj3f/SDFG2zW wJbldjjv4gNHc0Oet3I9LsZaX+RQZW0OVoow3nqEEuZh4q2Bpx2EvtpLyEgh fkocdQeVw7uoDNajMtjt1DFkEXC9PbLnBM1JUymAaKtMLGnayy1BZMuZtLBt thFCNmlNVNG2nGhyy9X4iUc1HOUnHUXE5AsY+T/5J78YUrg/YBKg8p2GvygA 9NzUVSgfyT/i0GEfYRsDkqve5DhxUWIkDmko44Ql/2s5JWF70FzogB9lR3C3 gZ+2H6pdjT0bP8EydtfTrOlQ+mQ6VpEse/cdLHjzr/iOZOG7b2P5jA+xds50 rJ89HRvofWNC14ry1zRukfEfYEhcVumj6Vg5YyaUv/qKa3yoLzaFg6U3XGwO ctXm5Gp4GleUvMCVJE83ajuFKPZ7uVVKor/xFTFbi7Vl/m6cX6WPk9vU2YSg Nj8r+DyHm91W4thbVRHkbDtZw0w1fxQsh/0Kp/xfdZT/i8m0/87TuMkXma8r wM1tatzEv8si0mG2iR+R+yml38FaTRkONjxAxSm7UVtkhfFhZ7EGUCKsVhEO awivdbN4PJa+/QaWEFbscenbb2LJW29g1QfvY9OcGVCZPQO6X8+DtTa3VHoa l37+iK2LF0Fp+gyCfCaWzVpByescTh07IdzcqTPRcT0kdFxZT/0Qq21Zy/U5 jrkWCNXHa4KHmVKQY3dOiKsQLLT5ZVXWRLL1V+zE0QUmxAm1JybznvQutCYm do5s3Szqdnh4eCIfiijK3/Lx9rPh+ascPIztMHjEv/X0jBryNcEmRPTYJhJc tgk9Pjmk3kJBXAKsD/C0PiFxJ4rzd3D7dx4eQ7tMjdtfS1CtY25DMCjPmoEN Mz/C8nfewAqCauW7b0Dpvbew8p03sZJgW01upz6XrbWaCYtN65/j1gaz1dDq 2PzFPCyb8TnUljnA5bg3rIx2EynVVtgzZQXQAaFnakU4+RAr/csERipCEfRk iZRYBB0m6A2+NEO0FpuK0eUWybClEuLUjN0OYWpmu4qoYPniQ0xO8i0AASOx rpev9d8UUhHDSK7R6vQbyv3XnuFpAnGVw+jpvMengj8gT8L/IarTEVsRId3G 7RcOmCPyJL92jWG1kVxn05yZUKHHVX97C8JPRq6h3be4D60kEBe8+Tq+fv8t LPzgXawgP1wxczp2Ll8MnUVLMe99Fyh9YAabfV4wN6RqZxKrZBWOIlaZl5ny uggWEUSxwDGXW9bENeK360LzMyP4bTKAK1UwrGK1F+bS5GdZjuxUkfcGMW0p +kGqSWDJlw/iH5OTr+/tJtX38kiJ5cNrv4F68g48h6PRbDM4oIb9TvzyC11N O3jau3L7yoTG5jmfQHXuJ1CeSQnpw3ew5oO3ecQ+fBtrP3gLq95/g3uu9M7r UHrrL1j63ptY/re3KXHNwHryvvUE0tdvfIvv/roYWxfEQH9NMJTmLoLOxg3Y Tdo1VEgEn7QveVW+Isy7EzIaPC21kEeGkp3BGj0cW2EKb+Y6jJ6y9SXPc9UH m3i11VNHsKv9G5PC1BONPV3u/V/GvgMsyixL+33s2Z2d+Xd2Z3dmu6fbnFHb NtvmBAqKkkHFCCYEUVGQJJgRRck5I6GKnHPOSWKRc06iGLp7dmZ2d/5zv+8r LG27p+t5LlWiUsW95z3nPeGe8zMH89UnDsbsF/jqPwWhD7ThP3OkV/rg3Btt dq9KuEv1W/jS/zix+muorFgKNWL2+xfNgeKCmVCcx3sN++lY5Od+PgPycz4n 08UeCjP/CPkv/5Mw9SUOMp1IkNk3dz5BaSd2z9qL/YsPYN+SCzijbIas6HDE RvHsLiEmagYSYqPod02IjZyG9OdSdicS8X6COp9ak/oJ0pyGodoRnP/WCCG6 WtMxbnOh6oN3ENSQFSeSRsNkOfqn0r0/cyIzP3EiJr/A0/4HJ/JHgfZ9ujpf jbtNc3DbYThYPsJj+sXUvpaDxko5KNFx7F84i55ncfuvOP9P2DfvT4SeLwgx X/Dfm/1f2DfzD9hHqmz/fELJ3GVQXLQKJ+Zvw2MFNULPAcgv2IvDa1bA646F cMvyP7hEyHkV1ff5rulotPZ0NFpnjQE81fU4yneDq7zQIsrHItAaXARaqllk LYnUpMuOgP/qwx3/cT/8D3dc2g6dNRiIjSqDJ5tb7JCMoEe07JLhdycJ9fnt GO5+gcO/QEnJ9t38KbMklUUGGp65fuhtGLNbXdoa0N6wBvq69vC/dQ/ntm+A 5jfL6Ihm48Ci2dxRcQptwZefQYnO6nc8kOiklGZ/gX2kzw4uWQvVlauhtXw9 3LYqwUNPk3TjRmgsXwA1ufk4vWOD0Ajq9yQN1nyQmQtQ8tlIPsDM5wtO7TuN O/suwpERcJ7hcQFmIbgsPRxZ8vw7wW7LXuSjA/qZ85n9EajeB35/x02LY5Pi gmhFuvKTzFKckpEujKfJeEh/vpeMONtkFPiWYazzBTR+3uOVZXKJSUXwdA+E keFVGF40hq2ZCyqyG1Gb3y69mPi+YF5FpmBeXdqg5OBaNdw3d4Cj4Tlorl5O Ko5o9eI5dFAzpQdF6o7HkfL8L3FgHt+j+MD8WThAf6e6dC4Or/wa5l/vRuT5 kzCU/xZa3yyG1tcLobliPp3YPHRIGucKgv/Y6ibXr+Ks0G/l4pH3HO+8+lEY bLsE9xOHieNpcRyPZSfcHtrMlDko6Rb/q+BwyPb9lPLnj/SXrEsqHQTHTLo0 UvhrQZyGuNnW8Qhg4xw9kpFIK5Ne59PJldDJlTkno4JOr4JOr4zQVmSfjJy7 yUizSsZk14t9wo/u7XuB4qJ2FBVIp3r9A0P0b9N/bW/vxBVzXLtqCee7/ghz iEMsYTuBcJ3wgOSHTaG6SZ/Ip5RkZeK/BP/84xp5aXpVernH4NB+7tSOqF6F 3/3HuKm6hywTD0lp23pFOl2l+V/Ryc4WeOW/4uBCsmILv4DGsrnQIx4RoqqF uzpKOLx6KXRWL4H2qsXQ/oad9Dzy5SK4bf8VzyT/Lh0I/Vsu6MiC4AZH3gfA tTcYwkPnFEcNL3HBRhspjpjuYR3gZFWlrGP0pw8PV9YxmisjJ1Iq+E+C2hpm 48HdYrnh29GeyUilleeZglKPVFS5p6KOnhu8UiFhyzsFjV7JqKfDr6ZDLyWo 5t9OQkdGyx7hc1VUtMPJMQlejskIpBN6Rv8kzJ6foxlyOxm12c3ISsz79IF/ WDtjet0U5mZ38PiBP4Jc4hDtloxkErkMeudc+vH5Dvy05QI2bfl+MrLox6eb J+Fl1wvebC78ZJW8/gFF6O7azpUoKwuFjYrLNsHy2lOE37bkTCYzn0oLv8I+ UsWKCxjs50F5yTwcIuFQWUTwpqWymNYSWktn4cmWA/DW18GxdXI4skaOTCYT hMXQWbUI5/ds4mqUpZxN6prw4sVe/T/u9XSknIRTn8Ti7FGekB7fdQGOK3RR qHYA7URGpYcpG4qSHrqsE/Yz8jDvI3lgjjL/Uf7IDWMPdI1EqEcCYujM070y UOCVjQqvXNR65aPJNx+tAfnoCM5HV0geukNy6DkLHUHpaPFnspKMKjqh4vsJ eNUzsVOQi2rS+J5sNigdYhg9R5PeSHTmB5KlPkrEs2sB8NR3gctJZwQaBiPX rRDjHRO/F+jep/REfa0Evi7RfOcPWvGkltLdU5DnmoJibvh0KjdaqZpbKdyn Kqe3KyF5KbyViKnuCWlL0Y/L55XXrYHC8qVQIobLK4KZUCN7fWDpfGjKX4Ln A0c4Eo1hMqK4gOSEliLZcGWSj4OLZpKczCT5oP+zhFz7pV9BRe4rqJNSEZ05 BZP9W3F8/TIcXbcMR0heDq9dQvKyCBcUNuPG4UPoamr4kaywNUNGVqTf+yBR T/z45Ip9CFlyBFMK6ngTEPgB8KWuhqysfFCWjOkyDVmHfcEnZGWGICsZMdkI c49FpGc6Ur3ykO9VhArvMm58UktgJTqeVaEnvBL94koMRlbQKqNVgn5RIX0/ F+3PMtHol4patySU3IuW8o4eMhQFhe0yb/97pMSVIIAOOESYPp7gmoikJ7GI sPBDsLELnhk6I9kqGMX2CShhY9jt+BY8GaQQyAb9q+A2/Vwd18jgGN+shDSh 2CsFiZ5pyPTIRIF7Dsrd8vDcIx/1hIBGH4aCPDT75ULim4UG73TUkqasJrVX cT+OTf3k/exFHxTlK69bjT3kyO5dzq5HyHEtJdhDfdUyaNA6RCTu8kUnhNs/ gN63y7B3PpMp8qpIntilrINLZuHQkpmcvtFYPhtaK2YTzZiDYyvnw+PScZz4 djmOMrlaTzpo/VIcXrcEOmsXw1JXDeZHDyErJnymwA1kRUiqiv5ZIHiexywQ Jn8dk3omeBMhkqoKWRYnFZMfFba/l6BPzcyRvqsgSTyu/gthLmKIafviPAuR 5VmJYp/nqPGrQ3NIAzrDJeiLlGAoRoLROAnGEhoxnlBPz7UYia/CQGwZuqOK 0BaWA0kAGSvXWAwUSyDtZDsw8IKzSK5kLnxpBZNFCiPpCCcVEEr8MjO4DPW5 7Z9Pm2WZBs7/ibT4Im74ewgZn8CHYQi08YffNTeEmLgj9XYoyunAa93TUO/B Fr07KZ8a0m0V9E6lZPMKbRNYZ0vpzFBp2J4nAuzxp2nZkz7Y66y4PER4xEPk lY440rwZngUo8ChBuWcZar0r0ehfSeiqQntIFTqfVaIztJyeS9EeXITmgFyS z0zUuySi0k48LYfChYFdSxZh99LFkCc53LdCKofLoLqKv8TBqK7WmuXQ2KIN p3tOcDHWwz5OBskm0trP5JDkT2XZbKitmAONr+dwz0dXLMA15c049u0K6G4k OdzAFum3DaTfSBYNlLbxFTDHVEgOI/6xHH6GjgoJKgLj0RcRN62DZL1FacGX rH/+D4Xww6wmezBFEOIayL2Ods9HskclN9623L8Z9SFtSDgXgx6/KgzHd2Es qQsvUrrwMq2DVjtepLVgPK0JQyn16E2oRkdMGZpIrUn8E8nYhAvRtn/D4MA4 EmJL4UO2L8SN93gShNnNGWSQsojIZJFEphOJSSYSE2eZjObMti+E30mWMLDn 1Gj+7vEjK0+4WPnA1zIACQ9jUeiSyTVOqvcuJP1USNa4EG2BBbTy0BaQQ38m beuThlqPFE5XldyJIfEck3KQn/JxP377aR5L2GUPkVsUeQWpiKK3TiIRzfWo QplXLbLu5qHieizanknQGdGEHlETh+X+yEb0RtahR/wc7eEVaGIdSPwz0OAW g+GyhumIyDm1gziw+hvsFmR2z7KlJLNynwnmWJ1EVZNEVXvtclJzy3HuhDlC nzzBDaUt2EeiqkimeP8SMsfL5kB1xVyofT0XGivnkNpciNMbiJ5tWIIjG1eQ mK6g5+W0luEwieupnWthxW6GHidxPU7iGhshyNWPCi8+VRux7BNU+zfCf5dN FJLv/OVPS+vcaY9BGgGhB/uR9iaPuNcxbuVIc68n57gNVcHdSLCtR/7dTgyG kLMc1YjJ9CG8yhzC6+wBvM7px8ucHkxkd2E4sx19JLKdSTVojimBJJQ23k+E 10MjPNX6DdfoztctAYFkZUXM0tLKIMKfR1JbLHh7Mzgd908oJ31a8ogfNZ5F vnqFV6kQD5nLfUypynO2d8VdE3vutZ99DFnvLHIyilFG8vLcu4JIQBWeKXug 0yoE3WGMNFShl2SjJ5z0e1gxEYV8NAdmk6lNQ51TPJpD8362Xe1P1I/Kiq2Y fkUxWfRYAnyaB+2kVxMq/drgpkWmxL4GXQHl6I3uJhPTjSEC/3A87W487V5c CzpjGtEsroYkrJBEN5l8pGeC2H6Fu1cvY9fiBR+LLanaZdi/YgmUli2C/KI5 2LtkLvbRUqSlvGor7to4I8rOgpPbfSS3SnLkh5KaPURyq/bNXO4u9vE1S3Bs 8xJS1wtm4DAJ77/Q1+W0luHUrnV8AuAkiS6rdDnBie6X0/bsvWX7WkZEpSb9 14JGZtcfWHhHWpTLYnAfyemPZ4h+akwFH6Af7RtGxJN47vXjq9FIcmlAUUA3 nocPoil6FMXPRlGTNIkXcfV4RZr1Te4LvMufwNuCMUwVjOBF/hBG8vrQn92J rnQJWhJp06PySGzjMFxTJ6Tg/5Oo2zgC3eMQStY6ihyQFHJgc0gnFdOqJOtc w6w00blGrzTOkW0keldPcs2sNXMJikl+a/2K//De+s+alilOZh/5EU/h283E ebKm/JUo8qpBtU89GgIb0Uo6LuJUEcaIKvZHNWEwmnGWRgzG1KE/ugbdkZVo iyhFfWAWoh94wuGaNR7dt5ONzX9cisNTfvb4HBFOYRC7ZpLMliHOrR4ZHq0o 8qFtDOqj50FkBw1jiCAzkDCC4aQRjKYMYyx1EMOp/ehP6UFXYgda4hpp6ypJ Zkm+g6LwZmj494LImp/Xx85FC0hsmcgu4UR2j9xibF0wGzsWzsFuEleFxYK4 Lp0LpcVzcGjpPBxVMUHAU2dYaCmSOM+GIonsflK3ysRMVb6ZD52Vi3F66woS +y+htWHFDGiTyP6avi7HyV3rp++ksRtL7PrlDRJZFWEXpEFdnsb9eGe++GmZ nDd9iLKS2FBUD9HjNO61r00+vMwzkcf6ZEWO0ta8QE/yFFqT36Ax6x3e5nbj Xe4wvit+g7clU5gqfokXxRMYLRzGQH4vurLb0MoGRcaTAo1MwWhDgxCR4d3n YOY+eyYgmiSNdajP9cxGqWceZ5wbfArIcWCGuRCdwQXoCs6j5xxyn7PQ6p9O Bpo4JHGECvKJa/0K/l1wUD/2W9iDBanf78wfyS0qQZLHc+R4NqJU6OjWHNqB TlEXAo9mYsQpn7RYN0YTOzFGEjGS2Iae2HqkuEXD/IoZTC5dgbOVHVIeeaFB nPTbjxiT9Hmsn58vKXYugNilhgSyBVlePSgOGEJNGO1m5ATx6zG0p7zERNRz jKa9xHjGJCYyX2AkcxwDGcPoTuul3W7j2xhFF0MiTsJofa2A56/QJmngYuk7 FpBULmLlCkuwaf4cbJo3S0Yq576XSpJILj7DOg2RJJqZuiDS8QFObCI/Sm4O lJbPIQVMUvv1Qhwnbam5cRGUVs6ZAY0NTIke37UBV7WUhfox/vqDND10/YSK qrDNshGXT01J+0goZcOrPyWUjRALMyXiXFsQYf8cIXeLURExQqpuCj3pb7nR cZ2ZP6Ch4C/47ypSi2FleFv2DlNlb/Ci7CVGS8YwUDiIrrwutGZIIEmpoG3N wFiTZDrK2iy0jk2QLr7W/zPBHDI3PpwcXxG58Ynkxud4FqHEs5SbhCzxr0Jr cBW6QqvRG1FFrjupGXLnB8Rl9LoE3eEFZJ2Z95XOadSqxzGY6h0T6PlPBnhl d4G9yo5ME6xyIaLdqpHqLkGedzsqAnpQH9rHtbDriRlC0cN2DLlUYzy2gTRd D3KIEFiZWMLU+DpiXSJRFlqAWvpoEjFB8xkpfb9ngm2b8zEZ+OC5sbiGf3/H UkQ6NSDetRPZvgMoCRlDrWgSrTGv0Z34FnE+b/GikNRB+ijxqbeYyHmN0ZyX GMgeR3fWEFrTuyFJboIkibYuLgPjTY3/JHARdgixtPHcEon+WYAX14BK8xC5 XJuwc+EifDtnFjbMnolv587ClvmzsX3BHOwicZcncd9LS4mUMQsVKMvNozUX 6ju04e7gApcrJ7GXXDOFpTOxb/k86KxZCt3tX0N5zTyc3LcNZ/bvkqmv0+bq 626cltbXqXP1dZnxIkiFXTb58wuEXTa8+LHDLyypNRM/ZkqjDZkB/Uhwa0a0 QzUa4ibRk/EdhnN/oP39Mzpz/oKG0v/D35re4M9pzzFV+Q4vKqYwWvaCHPxh dBX0oCW7GZKMKpL4LIy2NElbtcWTgJ/UVIEerXPsbiSrTWJNMdWl820/Q2Ea SbyrCGLy2KWV3AVebI50HdnzBs5n6SafhdnyoZgmjMRJMBrfiJH4egzH1aA/ ppJsehlaSfolQUShyV1vFecKfXN/XurfTyElvyLcIYQUKd/6ij3SPNtR4NeH ypAhNIpGufZ+fQkvkGHXjpRbrOWjGcwumyGVCE5jNGGAZK4/ox9d5JK2JBH6 Y8nCR5ILGhqF18NDv/4E/WMn8CgN4icVpCKbkeDeg2z/YZSEvUBt1Gu0xr9D d/IPqI39b9Tl/A3vSK9M5NGp5H/Hj8DOe4nunFG0ZvXR7pMKT39OJ5CN8dam GQKJbGlqhJ2tFU6wjsi08/oarGbwLLf/Z9VU4GBthSSRSGDpX3G5OC5NQyfF Wniu//JLrCcIbCAIbJo3G9sIBjsJBnsYDyEo7CdNf0COLaLOy+Zi/9LZuHDO nk70CU7sXAV54iAHVy6B7tavob6FXLr9O9j1qBlcEeKvhXy0tlCCqMWVIJoS Ajwe3oS6IM6y4S5p/EY2uP4z0r9YONraXOKEd3Nos2sQ496BjMBBFInGkenX gWTXWrSlvsRQ3jtMFH2HV6Xfozv3z6gr/h/8T88P+GtxHSYq32Ck/CX6S0fR VdiH5rwWSHKq0ZieheFWCb/ZC7gLJPpC/9uLXNtU1vdWlSvUvCpcNrgiNC9m D3drH+453qOCaGwd97qGMYWwDnSJu0i0uzmWMJbUjYlkFvDoxERKG8ZSWjBE EtabUId2Ev+mCBL9wBTyfch7HBj5lYzkf8Ij+62wKaLHYtKxeRA7PSd93Yx0 Ig6FtDFV4eOkZ8dIH+TD8upNXL54HeKbMQQ6CV7mvsGrvNckhS8xkjuB/hzC f2YPWtNaSc/WkrUrImabgJH6578TjG1Dfi3EdulkXKsgftqKBM8+ZAWOoST8 FWpj3pJx/R5dqX9Gf+afkRr+N4zX/y/eZrdiovB7YnnvMMBGdZIf0po7AElu B+07vU1GLsba+ONnm35a6B7NbnswHcNmaE/XPhupsWrLi6oqMDikgvbGRu6/ cV3oNFSgsX0TtpIwr/3iS6ybOZOEfRY2zp2NzfM4ff+ZAFOOa5OM7ycZP8AY zPotePCAmM1DU+xZ/BWOfrsCqpvloLljrXDnSBvGpy/jqt5lXDplDcOT9rh6 3AqmJy7juq4xrpKQd7RIND4RTZN6H7IhXUHGpYE22aTAUmGfw2yyIX74nEx2 O9ICB1BIKqsqfgKV0QPIIz3ankqOSPFrIip0hBUkz/kjaKp6jb+N/Df+UtOE hqQWPI9vQH1GM5qLSL7zq1CfmYHXE6PcOzyifT7LMvTaKjDSJsGmvb5K6xot U23aZzP65jyYclcrePm+d+4J95zkVoccL348aR0xiFZiEL2xQxhKpI9E/tGL tGFkX0nCG6cETJIuGyeJGs7oRF9qKzqSGtAcSxY8nIhNYAyGq+t+rgTkd1Lh to+F2KGIJK4O0S5NiHZt4CbLmF62JnJthijnLLQnTqIhbAI1T4fxmpjwy4Lv 8aqAtEAh7U4BoT1/DF05A2hlHaHTyGVLJTKTkIIRSe2/CTxGdJe0t101vU0b Nyw4M2gcxRGvUEMcpTnpLTrT36E3+x0Gc98hN/3/8EP7d3hZNIKRotfoL3xF tnMCLQVDkBSSYBNQJNk5yI0NF9qh89eXPu6kTdrkM06VLOWUyWXS4sYqKugg webvZKlgB2nkXcsWYPui+Vj7p69IsGeRYM8mIjObiMwcbJ/PUzAFkuq9tPaR ZCuSZCuuIK2+bDY0Dp4hHCnj0DfzoLZmLnYtnwV9dR1cPmuNqwb2MKVlfd4e d0jT3z9jD7vT9nh43B4PjjxEkImYqGAJpKItG32TivaP2rO8F23Z0NsCQcD7 WeqgrB3PaTk+TEJ9STt8TVPhe60IkS6tSA7oRV7EECriRtCQMoYmEvXcgEq0 pHSjJ7sfNeJqlJGTVx5EjLR6Cn+Z/CteVdUhk82J80lGnHck8qISUZXBDxF4 bMv3TJaKOuvVdE1bjbs+xJois5YNFtxSm65NuK93C/fPuuLBuaDpWEF5yADq RSNoix1HXyK5XKnkemW8RKlzIzJdx/GmdAgv88YwkTuCYRK0/qxukpgWkpxa 1EbkosQrHPEOTz59/+BPCLsXDZ/bCbh/wxdXjCxgbHgdvg9TUBw2QoqYhC/l eyIkfya35b+Rbz+Od2ldJHx/xsviHzBR/I6EcIqE8AW5K8NoySGynE1kOZOg lpKGkeY6qYyH3UyCmA3xdWhFrGc/0oNGURjxAlWxk2hMfoW29FfozqYflTdF P+Idulr+jh9qyHIVT6Kv6AU6i8fQUjIISQnJeFENGnIzuUbj0gtbF4Qm48Za wtU81tOSL5NXYw3GBYXCOomakMK+onoIjtaW0Ni2EbtIzneTnO9etggKy5dg wyxS5DNnY92c2dgwhylwPva5k/zSPSTn8iTjCstprZiLnSTnm8hn3b1qKfaz gN66+Ti9TxlXzt2FmSHJN617F+3xiGT9Kcm6C8m5u549Ag1ckWApRsadZKTf TEaqWRImO1+oy4i7lK386hPBZhL7P/20xPMpPjlUVrTB3TkJ/i7JiKAV45yM BMdkJDskI+pmIpxPpsP1cjEC79Qg1b8DJTH9qE0eRHPmMHme/URq0pHhkY4C /xwUB+aglFZJYDZKK1/hz6//Bz/UNaAwKAFxvhGIdPdClI8XEon6SXsrGzIF z0m9OkwFibc8ogGroxqwPqoxg76oCy7jg9N2eHDGm3vtfDEW+QF9vEMd/QId Ca/Qn0puWcZbtEYMI8hmBMXkqk0WTeAVqb8Jkr6RfOJUGV2oEBEJ8k5FmlsU 0pz8kefmIlP3N/ODys3rRma4YXwL7rYpEBF1SQsYRgGR5qroKTQmvEVH6jv0 ZX6HodzvkfRgBN8TqCZLvqf1HcZL32G4hNRv0Ut0FpBzn99Lqpfcl9xK4nNp eD0+DKnoN+R0QmRTRryxCVEePUgJHEJ+xAjKY8gVTRpHU/oE2rMn0J33An2k ynOy/kJU/38xReLfWzKC9jI2i5rIeVkrGkuqEPj0Id+ym4k9bTErGzUW+upL 7yia6ajPYFqGfVEjFcjMqvS+4sktG6H4jRx3A2W33CLsWbYYe1mEcKkcdi9e jNWzZmEd6flNi+ZxZ7CV5H77UibrTIfPxQ7CyhY5OaxjlfIb1kJ3yy7cPm4C qyM3YKJvA5tLpMON7PGE5N6V5N6L5N6X5D7BImAGSh1YmoGlGIpY1ca9ZOST JFa75/+IqfPxUt4Bkb3hI41i/wwA+Nq3f+fq3JJYnYF7MkS0EmlluPGZjyIC QwnL6z5JRuC5VLhfLIL3jTI8u1WONG8JpC3FEl1TEO8Uh3SPJN7PK/BPJ+cy LyAN2aWThNT/xV/bm/DsqTu879/HBfldUFqznKvtNRD0kQkn//w1NMujmrDW 1cRNXXb9xuaYBv0etrr63JvZ6flzzy6XEhD7mI9fNMa+QkcyeWnp32Es+3t4 XSNnI+GvGCv9AW+YIOa/RGtCJyrDa5AfWIy8YLJQkeWoTSCakZSDWnEYL4ez f7Jq+XlmI1GQYpJPCfG+bqQQDvKJvldET6I+kVRz2hR6sl6To/gGUff78DqT HImSN5gofU04mMJQySv0FZOKLhpFczHhoIhwUFBBHDBZwN0chJoXQXS/AWLX TiT49yLBpwVxHsQznYvJhchEjGMmEshtLo+sI4ZEqqj27/jL+FsMkgprZTPY K7vQWNGMkowcXGe9krSmi9j5elxB9rlO/Idpq2lZHNb4jLOwy7mOo6zhrBlB xpQc0y1zvsDupUz8F/MlHIL4Ky5fBsX5S6H69QoOFuyxnnj9xiVszae1HDvW KUFNRQ/yKxZh07KFMNA5i0sHQvB4tw3uHbeE9+1ABN8KRoTtM8TcDEW2XTwq XbJR7ZqNGrcsWpm00rkqpkqnFFQ+TkLZ3ThieBIpBGSJvPQCjGwfq4/Yzo+L dFdwVYB+rAqQxDbGMxlptPI9SNxZpZ9bCmrpdQOtRloF95LgopcHj+ulCLAt Q8SDMtL9/N0p8VOSRZdE8uPo2TGS+16WbxKy/JLIAU5ESlA84lKakJdZjmdu 3rBS2I4Ti2dDfvFSKK9dyV2iviLMEGDXMi10Bfk/pgmb41qwPa41HcSxO/4E dqcCYX8uCtKSjYpIotfxr9GR8h05d99DdKcPYcH/h8ZycrCThsgTaMLzsEY0 xrWjK2sAXeTgdeb3ERVpgySrhih3Pp7HhP2/nwi7y9aGzxD2to78xgibQqLk 9Yh07UKS/yByiQ2VRZO+TpxAcxrJetYkesl9TXXvJTI2iNGSlwTJSYyWvsBg yQR6SsbQXsqG0PdAUtqExsJStFWVTjcDHu18DdmHA2ufapPI/9ZfIJKUUqwj KR6XFFJAyYgPKUXP6N/xun+Ym2VfV0k8trwRDrdsOU3Ds3u+pRSDggmbxaGj yU0wYH392UVYpnmsjrIe/8z+rqA/q3ON7tmlWNY2bMf8r7Bz0Vw+xynHMCGH fYQH+cVy0Fi+Eoc3roGGMAhJe81qqK3QhMZGCxzTccCFM6Y4+S1fqnR65xZY 6Zvj+vHHOL/rGZx334XILADZbnkociPt5FbMjYaq8ypFo08pmnxL0ORXTKsQ Et981Htno849HXVOxKUfROJ17yjUPhHDlDZblI1hfv7TwJglxMal5ZBhHiTQ XinI8CIH2TMTlZ70tt459HFy0EaEp4PITmdQFrqCMlDhmAGXi8XwsCxD4N0y 8gtLuW0Iso9B+NNYITK6Eon+sYgPjEVUUCz8PEVwdgyGpZ4+rA8o4ao8aarN BjBapQuD5eowXKeC6zuUYbLzAK4eUuV6y9icIEDQunVSC7fZYq9PaMLuyBM8 PBEE+/PRcL6aAj+LbJRHkXZOmEJ72hskOXXAw+mvyCPiXP2sEV3J/VxgZazo FcbL32K4jGnoMXQWDqA5vx2SPHISs/Iw1tHysxFOQsavhX19Zp4H0b1aRDq1 I963F1mhAyiOGkJ1AnlLqaPk3tKPzx1D7rNRDKSNYry4gQzDGK1R9JcOo7ts EK3lrJMuKfKyetQVFuHNy8n/EJRW1KMqbg+tz8fg3tUY7rXnrVj43+dztBFP 4uitWckwLa9YxOZN4AVR0OTQHHi7ZqG0VPLBLARDYZwHN6WFAeGIFAhasBJU 0Gdcc/zfcbMP2L1Vi6NqXM+tPYtmExhmY/cSAsJS3jgoEN9RXLQcOsR3VFev gDSnrLrWFNqqDtA7ZQb9Awo4uXkFjm0kIGyQg9UpE9icscR9w0ew0vPBlV3x CNjtjJxbqSj3qMZz7xrU+9aiKaAWrUG1aA+pRUdIDTqeVaMthBzPoFJI/Asg 8cpAg3McOsTZP+0f/CwOZBNXswR3mC/1jEOUZzrSvXJR6FWIKm82cbUUrYFl 6HpWjt6wMgyIyjAoLsGgqIhe5xNVy8NT41K4WZfhqQWf5HG9HU0+I39SoUJW PdAlHAFu4QghTPjRcngqgsrBYziuoojTSltxeN9eaOzRgfZRB5w9+gRXD9vD Qv0ObJUtpw3CvQNa0xpSqhrvaTng4bEADgtOV1PhY5mJwvBh5AS2Q/SoAo9s pxCf93e05Y6iJb6DXOA6lPqXoMS/GIX+RSgLr0Z1XCM6igkLxazBew0ac3Iw RCTuH1xi+K1AZka7psiffU5C2UrC2EnbWA8/x1L61cvIDypHrEc5isVER4P6 0UYEf7S8FT3Fg2QUyD6V9aG9ogdNHKFpQ11ZLZrr6rkQ+wMWYtdgIXYVLsSu r05LTQV6qipIFIn+RXh76Ywt9jA7Hg1LAx4vTyxj4HaL3/2AxzEIdopBiDst rxi4u+TBM6AePr7P4WCbj4s7r+DSdkVc3LwXZzcrQnezEteL0ITrRchPSGE9 6lifbna/2/qY1gzcJBW1kr4SfFiHV5meZgpLyYUmd4G5DwwyCmQ79i5aCq1V q6C8ah32L9+HAyuNoar0GLq6N3BCcS90N32N4wQXXVbmSpC5uP8AbPRMcefC fTy85AaHS754cEqEm7tzELnXH+X3C1Ef0Izm4Fa0hbahM7wV3RG0s6IW9Iib 0CVqRBsddlNoJTduVeKTRuxGhLeDI/gUsZIWe8lmAT7CjWwWYKbADkYHRhDm KqaDTkWCZwFyvMpR5l2NOn9CcUg9faR6DEQ2YCSmHmNx9RiPr6X1HKPxlRiK LUVfVCGSHIthdEbEndRtczEc7sXC5ZG01/5KeHrE4olzBOwcw2Fh5g39E644 e+ws9JS244zyVpzevZm/kL5sEW3tYq6zoP5JE1zRN4G5vomgSR1xX/8RHh/n hyE4HTDinh/KX4O9hj8esimTF2Lx9Eos3G8kIsgiDjZXe+Ab/3cUxXbQ75WP Ap8CFPsVEH7YykeRXx5yfXOR4ZOFJJ8UFLJAfXE1anMyBfb08zfreE9kLtI9 W+BknQdr00jcM48kPRIJd/Mo+NDyN6N1PQrOBpEQWeegLq4WbUXdaCvtRnN5 JxqJ/tQS/amuaEFsZBweykTupdlB1jabRe4NCUCsaclFVfq+igqSI0SQjpBm KJKONGMPI+3zuHIiCqZG0nP4Gk+Ec3F3ioUHkWk3Opeb9iW45dgME/Mx8nZ/ gIUefe/EbdgcsYGthiVuH7yOe4pGuL9bH/e26uL2Zm2Yb1TD/YNauKekijsK yrDdqwyzffzchZsnZOB0jIeSArkmB1avxtb587Bt1lwoz19MZ60AheUXsH/3 Qxyls9VR2AvtjV/j8Ldf4whB6ci3K2ZwdY9fkJOvi1tnrGFn5IKHRn54avQM HkYiRN9uht2BCiSri1DvSEYmvBed4j70RPWhL7oX/TE96I/tRk9MBzqiW9FM YiwJJzSF5EESmIDx5/VQ/4iJMQdSFknSXMMvQFJWVAZEromIIec/1aMSBV71 qPIn3/FZKzpF7RigjzFKGnwiqQOTKe14ldqGl6nNeJEqwUhKHQYSq9EVW4Zj 27ZzO3nu1FNcsYyGxV3pCa6DzW0v2N64g3Nqp3F4zx2YWTjg3oUTxK40iWlp 8EhaupBs/GKumI91AmRDVsxZX4vjfEsIm1M6uEXr2oVrsL54jfue1RVH3Dnv DDtNQq9eMpwuZcLrSjrcCE2BFumw8/8/JGSMINk5DZnELHN9slHgm00IYisL BX6ZyPXLQIZ/GvkXSYjzEyMlJALlhKSfqoGUVndVVbTCyzUJj6yiyG8g5BB6 /C0jEUpLTK+j6XuxZrSuEcs1jIX4UhTibFJRV0pOQ0U7Vz9fSisyKhV62mrT ycbpOY3coE1VvinMP32Qb2SN65wtrQTOsY78D0uhmRKfq2EjHqUDD40veODq Dd4c2RCNu0VAsn0Si6tXWKA5HDtV/w6l/eNQUhyAlU0Ejh2/BP1TxjA4fRmX 9a/g4rlbuHz5KaxMSJHRcrj6FC6XHeB56SF8De7C/4wNAk7c4H6+v9oZ+Cjp wk1BG492qUJx4XwoLVwA+SVy2PLVTOyYsxzbl+hh95b7UDvlhMMaJ6C2dgXU 138NTQKR9gZG6XQ2rmBfGIRunboCu4sOsDP0phUCx4uR8DKKQ5F3L1Lse+Gs 04icE4lo9WpCd8wY+uLGMBA/iqHEEQwmDqM3sR+d8d1oiW2FJKoOEhFxuQji cUEhH+Q0pHd4pKNAZNN1AoSk1XKy6TppKwj2kMLqV4LHHP5UDLFLNuLcypHh UY9i3zbUhHShRdSLnth+DCcOYCJlEK/SB/A6sx9vsvowld2DyexOjGW2YTCt CT3JtTyCNuDU1u1kmhVxnTFoXS1BZ2njmroWNLda48r1pzBQ3Y+buqq4fYr8 lVOahKotXF8bhiolQtWJPdtxXVcbN9jIouM606hinUjMdIi1K+3AiR3ruO8b HtwNKw1T8nvi8OBSCh4Yky28Hg8/m0RE2icjiZhNvGMied6ELPLdcrzTCV1p ZJfotX8qMgOSkRqYiGg/8pXsnsDS1AwXz579oGsCX8f/WyTHFiHAIwnBHvw9 2MCb0Qgi9ESQTYqhlUiISrWInIF0evHviLsai0xLEeJMCGgXRMiMqUZuWTue idOhr82P/2Rtxaaz9jLJTb5fzz9PZzavafItA6+ocePrZgiBe1Ynd07wYxge 2eOy4NCzBxdCocXpIM6h18Cpb8mjPHQft65aw+DIHWjs94YZgdJIXfmDhu/S aUImxO2uSycJsZ4zJ8/ChPSalfE1XoZ+DydbR3jaPIWftQNMNY7j0IrV3Mjx nfMWYceCVdirehuHlI++H2vNsLRuBTTWr4AmKwzV2rgCX+IkV4Z3AHbnbGB3 wQV2BgF4aCCCo2Ecgs3ziVsM43nIOHJdx+Gj34mSi1noDurCQNIUhpJfYZhV VKROoI8czM7kAbQkCpOtY6shiSGjJIqCpsDZpWHjj9IkX3wIItkoMQ8ilQ9A xP1jvC8lEz1JhNi5CPGutcj2akFpUDfSrItQ59mEvkSi9mkTmMx8gdc5E3ib O47v8sfwJn8EL/MHMZ7Xh6GcTvRmNOP4jj04vn03Tm/fCf3tW2n/tbgpTszG mKirQW3DNRgYO+H2xbO4fGgPThEarI+pEpq0YEO2Sn7xQiLVxAK+XoLjhCYT +v9mdHZswih7nFXcgWM71tP7rIfRIXmOSXBIPU38nRBpre2EW3rR8LhbhNtG oXC+EYbA+zFI9iQm55yIeJdEJLsTqjwTke5Nyy8RSX4x8LB3hY2FDS4ZXYK1 hTVunDvDze51s7b8g+BOpsUVIMQjkRsHHk0r2TMZ2R6pCLrsC5GJCLHXRUi8 IUIaISf3TjTy7kUjlVyVovuRSLOJRBKZrCiyBz5PIzhCNo0ibVXBnqhxb3ld i2u9+BmXPP0tl9e4oc1VDXBZDRP1Q+xTcR8q6f3wPGlmlQsEHOYDAfz3yEEn dWZCtFBnlR6Mj9jj3o2bsOYm0fDNt80Pq+DC/l04Txi9INOg9LIwi46pNHYI rIk+U2vWJ/hpLNzGC21ipyexTJfxq0L5223YMHMetixYhN3kKe1fsRD7CUkH N2zkaJ/y6m9waC2hSJXgNBNnD+yiTeCLWW1OnoTdmbuwO++BB+dDOC/Y0TCJ PIp2lASNoyb0JSTi16T0pxBsPIhq00L0h/djKO0tRtJfYzjjFfrSJ9CZPoJW Nm08mTzgZLJPScTk4+KhJSRcWLuOL774grs2UFZWxkWefwZK72cfSW8ds0dD cQNEj9MR6ViBBBcJcnzJV77ZgJQbXcgwrkOuYQHyDNPR7UEWx+M5Or2r8H3x FN4Wv8Sr4gmMF45gKL8PvTntM0iy5bEep3buhv6ubTx+OGuiTVtlhNPnnWBj cBa3T+vg0oGdOE34ObxhGS7s28rhR3XtKsjLLYYCWaPzpHaP79sNHdaIe8t6 nv2rKZI+VBcwo0OLPz4rwo8516yQju6oKzzu1yLAqQYPTEVwvimi1/mIdssi /CQg2iUW0a5RcLvvgiuXrnCYeXz/KbzdguDnFQo7MzMu2MqSENc1uZ6h0vBX XYUEoeRchHsmcXe0o4gnBZr5ws+QXYR1g9jIHbFXgxFnGs4bpZtiZBGWMm4n oMaerJJdNAofx6HELg4+p22nG1waTGNInc9CcalBPj0ygyVIiGRYshqEI3wd AsuTsF6X0qmM9BHxxMZi+sq9dEouN7KAjRUVJk8yJF1VVYfOWkNyip7ggZXt DC5Q8B/k16hzN1Yt2Ginwwe5PtbSTqDS5q/T40eO8SOdpBMppOONpMkADkin ZC4YnFTFyX3yOLKbZGPObGxbKgfVDSuhsW0PdLbvwdHt8pzcnKDnk9vkSTMe ZAONZ3Atg9i4qKN4oPeASzw/OBuGh+dj4XmjANl+oygJnkRNxGsib+/QFv89 KkK+g8hiHA225RiMHsJI1ncYynqDvqyX6MwcR0v6ICQZZJ4yGiFJLyNQJUmx JOsqSbM4/whLH13B4Z1W/qq42D4bkU+fI9GtBTkBvSiPGEHWsykUhb9FhM9/ IyvoL6gI/A7Se3Udj4vQ+JAP1LFHY3A2dLcr0MYo4OTuPdAnc3KUoHB652Zo bzXA0ZNOMLl6Had3recgdGTDMu7qJ7t6zO7dsalxR7d8gy1z52DzgjnYt34N 1LZ+Cz3lfdN1LOZC/1Y26oT/3pew4KDEN4i8dkoN6fFkF571w4bcJpsrMXho EQPnW+Rw2yXjyR3mI1yF0cVLeHjnKbycghAsBBI9faJxz/ACaWp1oj8ks0cY pA7Bw9ZyusfTyMAIQl35AIv0/V2NPOBv6D29D/EmgUg2DUS6eSAyLQKRZemP NDMvxF92QSqZ4riLD1DpGI3c2wGI0LuNuzpnhdCy2jQlY+nGG4eFzC6tX3GE 7A/0VV1oXsnnVhgd86TPd45RMm7IpRoMNfm+JWxaLT8WQpuwRHRMVQeHN5nC zOgp7phcpc9vw3VT5uNuGtOAYlfAL6geFOZmqX/QVteEfpZ0BIi5MP5D6Kkr HX9nKb0WQcdxg47D9CRfKK66aQ8ObNgJhdWK0Ni4E9qbt+PIdsZe9uAkYek0 YWkG9OjrZ9AnTF06eJAbmMBTxz/iwbkEyD6ei9+iMeY7tCb+gM6UH/Bc9D1i 7rxEi301huOHiCG9RV/OFDqz2ei9YUhyeiDJJY6XXU5AStYWfBvZiDfwMX5k Ez3cVfEZ71HDF6mJHuRB7FCLRI925AT1o0w0hvr4l2hPfYN+wvJY3vd4VfQD arL+yv37gcK/oCz7b9zrtowpdCUNcq/9je7g+IZtOPbtJhxctgIK89nNvr1Q 13aE4WVzaK1nSYLlhJrlMzjY/JHLBeisW0Ikeg4OrGAF/bPIGV2C06QJL3KN nLS4ak82FMmUlTJP9zTjC/rNuOFIbIKBBtwe3pwhaIkL2pa4dE6My5dccNGA /GWDSzA3d4e7WyoCyY54usfAxTMWT2k9tPMgankBtiQ/rObA+hgftzU/wsYt HhRwMxeZ0ekQuUWTM8TPfX1q5AtvI/4ydeTVMCSY8jNgs6yJy9mIUHBLhMLb EUgx80HyNW9kE36yTF2RbeODNFtvxFy6h3B9q+mJ8nw6RoNPx8jkJFk6ZgbL CdMXXTYm1FoILEtpGPuQzGZLey9w4GFjkGXmbxzeqIaju2xhft0Rt4gLEHBo F39PX7X4KNuJD8eSudyywNlDbMICP//lItf2TEsYjqvND51jTf+YNlvF3bGw EOZvmE/P3+C7nwW5u8Gf6PPjmx5QXr8DCl/vgMraXdDZvANHt/HgOUVLj5Y+ gegMt9jrPTi/dx83SIA97h/na7mD7zcg3nOInNkJFIe+4tlU3Fu0JPFlSd0Z 71AX8xaJj1+iw7kaHWHN6M0lS5T3As3kfkgKCESFBKL8cjRkJEFHQBGzMQxF Qq7o81+CIl7e5KftkdQmRdwhRD2uo8/ZgezgQZRFjqM+4SVXLtKX/QZjBW/x svgdXpfxc+nfVX6HN1XvuNdjFa9QU86PZW0uGYDOrgPQld+PzfMXYe/iJdi/ ch1Oah+D6vJZ0Fy/DNqEKqktYve6uTYEtA59M4eo3QKorCObtH0T9q5eQ/4D P4qKm/ZyjJ8pwaB17eT7gSCs3dZloaWqNGAd4OeL82fP8rMpTl+A8VkbGJnH wPR2LMwepOCWaw6ePgnFI/NbtFe3SCf/mkvO2tK6KehlRnLMDh9CelS4cPVt LsKdn0HslgwHUx5HLobP4H+Jt01xZrFIteKv0+bdSUDRvQSU3E9AKfG41Gu+ aDR8hLoHfvR3z5B/NxzJxAkTjJ6QbbLBo4PHcWGLkpCyEbiYkLKxPkYif4yN WGU1Fjr0VZNwz6ou6HPKQIu1p9HcsoEfwaDBT5mVhZXWBh3oKtrBwtIJtuSa 2hASGKhsTmlzzzdPygzU4LqU8vc9E8PFOEt88KwGP1Djfb861lGQQYtUHZ2J GVsf3N7QFPrWkad1RBnBHvEIJZ8ynJabjScOrd9JLjDhasNWHN66B8fIAHFG aac89HbJQ383W4QztnbtxhnFvbA+wscIg6zLIHbsQhzhKiNwDIVhk9z36+Je oSmJL3PqynyFnuxXqEuYQuLTfkylDWKiqAMdBWNoLhqCpIRwVSIhbJVivKfr sAAcxu5mz54tMwx6GlOyqdf/konTyQQceIvM16yF2RCo7GsR59GBzOABlESO ojaB6GXaC3KDXmKk4BUmSqbwqoyvH3lT9Rqvq/jXoxUvMVA2xr1uLWqHx63H OLJrD/auWY0drGXxyiV0oETk1i+F+rplnKnSZmaKIYtdOpeD9salhL3ZhKcF OK2wmXxuFdpDBahv3coNezgnM/6La3zLmt6y8V+0DGhFhgV9ELp2fmyP81ps hivjO+pc0+9pv4Hk01zvDBzvOCLy1g081tfG7VPafBCRfpYtuW02JFfWbFDL MZJV4juZ0eG8UZfjrj/a2VrjFHlzemQVzgjJ0kfW1ixZyv2rhtLnEDlFIfBh PO4a+HI7424UhaArPOQSrVKRYcubuqIHGSi1z0DF4wwUmEdgwNQd/xsRjOfu 5GbZRSDzcQxi7kcj1sYPiRauCL1wEw/UzfBw31nc23wYNrs0cHvvQVjsOcBq OTjkzeCqOb6iX0OTgyCjb1z3ZTb69KgKjDX5maAXNISpUsJwZ/Vv9XBMzQE3 rt+B9QW9D0a8MujdPCUd8fq+D63ZcZUZgjf5yPImbYVM80FC3yWpNmREg05O 2g/8+kcjkq6QW+V024k80UREcBGdNCR7ZCLbPYcQdRoa6/dAe9MuooR7cWzn XpzYvRen9rCBD6flFehXPSVPiJTfTd/fCVtNAwRc41vai590IMZjAKkBI8gL G+W+Vx1HFiOJFVRNoC1zgijgBLpzxpElnkRX21/QXzGMtpJBNLEJzGWdtBrR WFSKty8npchj0Nq2bRuXwP0IebIpJ77o4d+Q6VsH0f0actnbkBbUi0LxIKoT htGUNooueueBggmMlrzARNkL7hO+qpqk9YJ3pTahs7QfLWwyeFE1beApnDx0 CLu+WYFtS+ZAYdVyHN+zA4dZSmGNHGe2NAlYWux28rdydKZLsffrWTiyYzXn GrBIgCm56NfIzU4SixEfHYVTpMb1CBpnCBpnSHFbW5jilo01ByfZ+DWnYsXh OK+uwkOL9dPnXHKiJawzLh0ym1t1g+D16LYjoh/YwE1TlYMXiyhy0KJlxUbm EBu6QWwoMyacj93sRkKU6H1KlSWG2EUozfcjjIzU36dUY7xDSasmwuFqEO6e D+Y2yss4HiHXU7nXybY5XOMY9ih5XICKJwUovBqByfuB+BtpivrAXOQ8TkTG oxik2IkQbukFkfUdhFvcgtjcFlf0rsDk/C1YGz+FvZEDXM7dh+cJK3ipX4Sb gi4clLTIEh7CHcUDnJ9kc0LwkhjRO8aanKtAd8cG8pKEmTOEidMHVLFn5QUc P/oUZjfu8PE7mXCDNee1WnNjDaxkprCacxMrrIQY1xLYW9lAT12TmzB0Xofv +8hYBxsbdVmYLnRFGH55mTBmTPgyop8TEyKCyCMWYs8UWllI8MxDlkcRCt1L EWRYgkDDSJiq6kFzuyJ0diri6B5FHJOnpbAPx/buhe5eBbL0eki55Ylah0jE WvMqTPS4FZFuvVIPr1A8hPLYYTxPHEZDKgl5xjBas4bRnjOMjrwhdBQOoL2k D81lZNQqumi1o7G8AR0NEmgLsYtPtWb/4h/hbDVXIRNqWwOxUyuS/DuRG9GD 8rg++hgDaMsaQnf+MAbYDabSEe7DjleMYqJyhEwY/+feikGuSkZS1oy64nI0 VVfiobUNtsgtwc4VclBg88pXr+dGlxz5dhVpJTmobeCnG6uQHTtIdmzvynnE edTJofgoTmDDB4k/LoeWAdivBHPdyiZECsFfKTViE//M6IAtuK76vF421D6K ezZOiHl8D8FnNGB0YAcM9+/ANU0l+jeknwVqxAYhzxDyFY+Ea55nhUyPkRZ3 MYtXNYtgosHf9LyszieBHhm44s4ZH9w/G8b92ftqCkJv8PeMU+4WIseumHud fS8PhUbheOMahdfJJWiIqEOFex6KXbOQ65yKxIdiRJAJe2Z1FyJbG8TetOFU h+wgw8vnTGBteA03L9+GnZkT3Eyf8jL1BwTrGsNf+RhcDmnDQfUQ7ioqwUz9 ANdUSXnNOmz805+wafYS7PjmCk6cdsJ1i7ufDETwgSFLDmLSwBB/aV2VmxzC n8BGtEokOKlBkNXiJ01x80fpI16k3TckeBmSFbzIkQ9NONrxQwciXCPIgU2k lY1oj2KkuFcgz/05yjzr8Ny7AeGmEvS6ZaI9tBmZT5LgbeoE3xuOtJ4iyzEG bWFVaAop4X5jiUcciu35MQPhD5oQ4dzBb3lwN7IjelEU3Yfy+D5UJ/ehLq0P jZl9aMrpRVN+D5qKuzmz1VDRgfrKdlptqC6txetXU+oyxTJMBj+V7he69PxG xtJJ0788V/wN0nzaEPqoBVFe7Uh/1oHC6E5UJXWTy9eL1pw+dBX0Q/DhBsmG /hED5X2ErV5IH7VlDSgrKMbLyRdc6lFXSR4K69dg29dy2EMY27t2JQ5t2wSt ratxkPClRD6X9s51MFZVwIkta2ZwAYXfkFvBh6RuEMyMTxz9ZHX1vwhhCy7+ q64m8B3B1WCZSDrRc4o7obmOd/d0tsrj1rUbiHZ8CF89ZbKr9NbrlpIrvRqX NffCdHrs9L9wIwfOaL1PGxkTllja6Jq2MCvFjF78M/cbm2nxF2HYw/aoPWkI b2nQ0udaOkItcxF7uxDSXoaJFtl4bhKN18/SMZzVhDr/Rjz3KkWFZxGKPfKQ R3KU4ZyEiNtBeHb7IUT37iL27p3pPKsUUhZsDgc/jJCLS+hgJkwvXsOdy3w9 iYO1I7wtnyDo+gM8M7RGyIlLSD9iha1fLMCWP83CtvmbcOyCMw4Rn1dcKYcD q5bh4Opl5AStxyVNZS5EIY0ZSYMTstfgpS0z4iIjcf+WLU4Q0zh9lNiGrib0 yTF89OAWkvhBS9y/bCyvg9g1EmL3DES6FyPOvRrp7g0o9GhGpW8bme0OiG60 oSuwDb3PatAb1Y2BGLY60R/TgZ6YVnRESdAkeg5JaDG/nb9Cvm85gm0a8Myh DeEe7fy3f4dsMclubCdKEztRmdKJ6oxO1OR2oLawAzUlrNSd1Xu1o4pQVF7e jNev3wptLX5c0S/bi3/WhxD68RUhOQy1T8H/ZiOeObcjNqAdGRHtKIptp49B oM3sRFNuJ9oKutBR1IWu4i6igJ3oKO9ES2UHGrgytFaUFNdiauo1n3pktIxc kguaaji5XxHau7fjqMIOHFPcg1NH9UnZ6eLmwb1c/MCaLNLJbWv5YiRSYtf1 jsPg3FluoKnxqWMQB3j/q0DpHayscZ5lTTTJuhBqrrAcPsnVkW3rob6WGOa6 5XyQZD3fp9Hyyg1EuTyG70VN+v5SYqOLyedbiPOH+L7OiVF8snUaMQSQqwwt /N0xLsc6g7s8w1+C4ZJDOmq4efgC92dLTXfcPS2G46Vk+JhmIexmAcl9CdIe liP8ahnaHpZgMq4ERR6lqPSXoNanius+U+FTgmLvAuR5ZiPDLRXh90Pw7K4b oh1cEWN3l/OApPUJLLU6jRvBA7IRPCDeTH7BeUBXLl6F7ZXLuHfZGPcsPKC8 YT/kF3+DXYuXYNeiOdi1dD72EWb2k0I7yPqyEm5U1izj9s5I8wDZHK3piaxs CP3VU9yteqEB3CLkRKZC7JJAeMinVYUE10ZkurfT79GN6gDS+c8GEH+7D7V+ IxiObsNA3AiGyKkYThzCYOIAehN60BHfjuaYRkjEVZCE50PyLA5jtTWoIU4W cKcFAY7tCCUtHh3YjqQwEsOoduTS/ylMoffJbEdpHq3CdpSUEGiKCA6foaCs DVOv+Xpv5V9gT+b9NBj4rm//gaGud/C524Jgt3bEBLUjTdSO/Dh652QS9Ix2 1Ga3oyGfVhGt0nbU0QepIlyW0HNeiQSvpt5OtxJmgx7PC6kOY1ZZzJLvQrrQ 5PgZ3LZ4CvH9W/A7zlKOrA5TnZtEaHD+HK7pn+DDSseYTVFhbv+vhAyYtBXJ KaFGmo3IZY1Izkhd/wgRzqqocZOVpWXkh+iw1dbyDVGlqcQjXIx+Ga4a3YDY 7Qm8rxyF1uqFUF45G8c2r4ezhdX0jA4DLT6LelW4yyrNoFoe0eB/3LfcTVaW 9LEiz85WihF1TzIvYXhqnAqfGzkItSlEzL1SpNqXI+DBO3QU/AUZHpXIcC3E c/8aPPetRLVfBcp9y1DsU4xcr1zu+q3YIQJhD30Q6+SFKPs7wrhMctu58gMd zn2xkLovp/goAXtwUQIhYG0p48KYnlDB87JybFiwECqbt3G9sXcsnoudy5dC ngy/4splnH1RJpwcpK2bgUNr5YinGWjtn55HZUw/i2GEr6RaCpFDMJF9+qzO pbTqCSNtyPbsQYn/EGpCRtEUMYH2qEkkPX2JScLBUNJLjKRMYjT1BYZSx9CX MoTO5F60JJJ3HVsPSUwpJIS7caHRxnDPd/C61wIfUtOBPu0QhZC6FhNWSDrT CCMZhJGsXFoF9LqYFlmN1KI2TE59jwO/wFIs/Glw8Lj5dwx0v0NCxAD8CPoi AkcigSOD3j6X3r6I3r6E3r6EIFpMb59Pb59FK7mghT7Cu+mqCA4U6vxotQ9A ITjsV8lCXL9sgsuGhjAiIJxjs4jYiFHVA6R+VXDzBN/H9IYuc9gj+B97aHrm 8HQVpyZfxWlM4DAWZg4zh11942ZyHhW5kCx7KH0jR6csBxUChzpZEPbQFhJY OixSSO7UuXM3EOL6FIc3LoGK3BfQXfg5ac6NOKG0e/ra2XQ6lEuF8mkd66P8 JVf2sOEuvGpwWZ2bR47zEqnqQQYwBI+MkuFF6Hhmk4/o+0VIflSMDAdCiUM9 iv2bUOFXSYyjDFV+pajyL0GZXzGKfAuR65OLdJ90xHvGIPSxD2JcPeF10wyG ZB0vEzq4DA5tq6znYSV4HrwisCJs8GOmzGVGUnrYWXN8UoeosDy5llrq5F1o aGEHuZ47lstBntCxjyyJEqFjP+3b/nVsyUGJlp6WEjdNtr1F8gehyFn0mJyR pzkQO1YhyrEJia5dyPYZQGnQGGrDJtEc+Qodsa+R9GQKI2mvMJY0gNH0NxjL mMJwxiT6MsbQmTbIdaHg+5BVQpKQhfGW5ulhA5Wlk3B2a4MH8ZeAcDIk0e0Q J7YjKo1WVjsiSTLFtFp6J6H0CyzF0g/BIJsWWiC85eDg94hLGoRfcDvCI8lu JbQjIZXwSEBIzGlHHL1dZE4bmnteCGnY2bzwq70Xfq7q4/gRGOufJtpzjqM9 544cwY3LVrRdj+FveBRG8ntguGc3DHbtxtkdO2F8SJHzpDNi+L4frIpfj1T0 Ge7elwrnRUvLLk24yZas2HIPV27JXGrW52T/ylVQ3baNO3kFxgtW8XpOdS2P gI8jd0qr5mPnsnnQ3PwNbu7ZhdvEG66sOIijchtxYfM+6G1W5BKb1w8LV1xZ UlOXT8DwV1x5FEifmbd0U5nvnWt5OBgPLsTBg1z5YJscRN7PQ5xdPmLtqpDl XY9Cn1KUeBehzLeIkFCICnYTwy8fBX65yPbLRqp/GhL948iE+SPazQ33rhjC gNB9iXzly0Ie0/S4Ntcoy1w6X5efcsPN1RXyjmacu6DO1WWkxkRM1w8xcJ9R PwlbU3s8OHMSR3Ztx7YVcthJimMPKQ552jZ5Mg571i6FCvmIj8yuCFkOkvyH YogfE2VyqCHJb0Wiey995BGUhrxAbcQUmqPfEi36Dumu79Ca9DdMZk9gNJPd cn9LrtYU+rJeoDNzBC3prC9ZK60aSFLz0FmYPX2Jo3/oe5TWTaJSMonqlkk8 b6PVMYnhye+h+AvU/vKflvRFwn/vG/wOZfX045smUdM6idp2ehbe4teCZCeK Irgs8oXjx3BBX58k+Swunj0D4+NHoaeoiLMK8jDYK49L++RxxeAmIpyfIura WVjv24NLu3fj4q6dOLdjB/S2bkV5cj73U6XNTQxoXWLtY1ghMdc+Ro2rffyM 4+OzhM4OfFeTjXP5YgcuREZ6SolZ8TW8VKuQXlcjva7GQmQk1QfIl/5WjqRc UR0G+7biOqvDPmZHyLyHayo2MFe4DqstZ2C5TgeW2zRgI38IVnsOCM3umPuy kEt9yj4stQNx91wMXExTyanKQOjtDPKKi5HgVo1MjwLkeuSiwDuX9HcuSvzY ykGRfzby/DORGZiOlMAUJAZGoyAhFWEuzkTsNEgUNfkEBsvMf5w+FKolWPpQ 6rGbCizehMSZTTZ9Qrr8wnSMjZUgqOO0jjW87zyEw8n3JQhHFbZDV2EbDFUU uWvRrGzHVOsgOiQNwvSBLxBxj0T6YSHE9nWIfEqazqMf2QFjKA19iVrxGzTH foeOxO/Rk/oDMkP/jreFgxjJ/h6jue8wlPMGfTkv0Zk9hubsfkhIS0py6iDJ KsB4R+sH/uxP3QD55kNxlc0trha8WtmoJstknz+jDwMSS+OjbErYXr7iS14e F0gkjUgkL5NIXtpNivXwOQQ7OyH+lhFuHdxNincnDPZsh/6OrciySYaRoi6n FVjDkUvT3Yx4Z9H8sPoMIsPqmEn8l+fAlofVpmsdWc8c9ti8bCl2EL+UJ+u5 bzUvlftJ1x4gXbt/Aws2kS4madPVNsGOjauh/O1i0uF7Ib90HvbKLcB+hcP0 q1zB+VO2MD7zVEikbsSTPSc/kEIbLhXApwGu7XLCDdUA2OqTJFxLgLt5IjzM sxFGDCPOKRvJzhlId88grpqJXO8M5PnS8ktHLunVLJLGtOAkJATHIz5IjNKs fGQlJkFPVR1nNDTJY9GEwWFWaEC6Vld7umPbtenUGl9wYCIUHPAzXG9yB8Xf VZb2r+DvXV5UPoEbVxwQZmPKCmI+43ok/BOshZw9f1f/EDKjwnnXlP/9P4f4 XgFJJd/4L95zEFkB4ygJe4nnUa8hiXuDtuS36Ep7i7SAP2Oy6i8Yzx7EcN5r DOVNoTd3Eh1542jOH+TbhxWQRObmY6yz5eAv0J9rPhRI2VTASiFG+VMdF2JC QnFOjXSmltRR+xxn5OU/OMmLO7fjMllcM+3D8HZ0RvzD67i2fwsUlnxO31dE tLk78dXNOHNwP3dz6bKWIJTSkjxpoyFGPrW4TMDNo3w2wFCZ6J0cP3779P59 0Ni5DYf37IDyZv4aiuq2dTiltANa23ZCa5M5Lho9ge15fa7i4/+3d6VRUV3Z +nsxyep05uQlLy/pTmKiMUnnxSQdE41RmQfBEYyzCKKCgqgoPgOiBGfFIcZ5 CjLIWMzKPBaTCApVDFXMMsukJnnd673VnbfPPfcWF3LR6r+9uta6i6oL7Nr3 nO98Z+999j5nBwHLb9k8AuZY8VzgcUSbDoI1v0VM7GevLWt4cG+Lx1EEeh5B kPtBnHAJEO6dnL0W35svgvckAonVOWxbHEogDcVuchZ/CMhB8L4Ush0TEXsk CQnsML0fkoU9PFLP0HU+EdcuJSCJATNYRU0Zg/iIRGgqq7lRVKWB05z5cHZw ELJh1hJ1riNjYD3p5Ukg3WBYl6L3BFBPcg49+JG1hhiWcMCwg3i8uiF3nq1x bcSp3Ydxzn3pGMG6eUJITOTFwCzLdzYyyIDgfuHQdsDsFbEzm7BaIbxn29yl XupCHttvie1kENePmiQyha8PIO3yA9Srf0VvcTfacvpwJ6cXTbk90OV1orrg Dt8CrKACVTlZuN/XM8ykVWJOhrZJowP1Q3FBZhSg8sDD63CZNQ8r7Gdh3tfT hSdYbmpOeLUkIrUiIrUiIrUW7ntamGGTrSUR5EIEHTgKr/kWwuk+q97/I7bP moPFk6di8aSpcLO3E+Yib7nPtMThMSFP5wnBWJSy9RhuV5hMNmTXLiZOZgdQ ehtqGV4WvMc15g5wmOqH9V5B2Ll2lbCFhJBJwTKUyHM0f4/wOmGcUJblwU7M WzhUCLRdLHb0E9Kt/clJeg07V9IUKxY8+nruRKB3EA57HYTzpB3YODsEW5eE YKdnEo76p+D0LhUu71Uh9GAcIo/EIeZ4HFQnCZ9nVYgjAzX2kgqRP8YiLDgW Vy5Ho6SkkrfsM4iLiMQKgqrzN45wJYitIdvZbSlf43FfPrS+E7RX8Kx4gOkl EaW8vElaAN8s5NE6Cnm0Hq6HEH4gEPuJdv1ZzpJ8dXgpzynJiA2XHDUJqWHf ZiBi100yW+uEe9cutiMntBPFUd0oj+shJ6wHtdd7oE/vQUbyr7iX14iW7C60 5HaiIb8dteo70BY1Q1NUB03hTTTcqoDVKFQqX9OfzBEq7U0rX+55/yEINRw0 8IYw7OdONcXsr2YImrP0DGdT8vbNbeBuaUvWp41wf72VBbzsbOBpZy3sX2cx cRy2z7SGv+k0LP/QEq4fzIXTh9Zw+8wC67+2wQa72cK2PZJPw7bsESzAxwQ2 /IOAUyfTyULZsiU7oZnwJU9HYAfFL/5yLubNCIDH5iNkwi2B9zx7rDIzg/dc OyG64TXLlmwTVjbI8bme8OlF+NxsCAQvENx3wfrcIaUxv0JvHeFL3LWdlQSs oOlkrg2WfrWBHL1QbHMKw3cbInH4WxVxqgrnCJ+XD6lw5Rjh9KQKYYTNUMJm 8KVYXLwci3P0s6BEK5r1vxPPLI7CMuI+JxqeTtQI+3f7I4EvlEghSQGIsgQ6 L/kqsWATuOLo7qP40ddDzEl9Qkic8xUS51gGBgFRFS5amTwiUZnehHDfUlzd Xy18TjxPzlNIK/Ij21CqakdFYjuqrrWjJq0dkSG/4E7T/6Ke5vD6/FboCptR XdwITUk9XTW4XViGB4MDZuJTPYwmCU1Th+NQHgkbL+JwlPL+34sjie2QcGT7 Ycz8wlTQ/ZtpNlhmYktm50yssbSDuw2vfHezscY6+5lwp9l72vvjYTXNCqvn 2GC9HTHkfB8sX3QQaxz3E9UEYJvNt/A18RQthSnYZTlrmKWwcwVPxNwwx5JX njIYfjh+iBSoLxZ84YA55nvhseUAPByJU8gEXsfMYHMzrCcoriNPbO0MEyyZ 9CWmv/02TN97F+4EQ0+C4cbFQ6uU28USLynWKtUK+ToNVaf48IMGhDHpPGs1 3BeFY/N6Ffy2qrBnhwqHA1U4fpBgeVSFUydUOH2a3hMcj5+LRdDZWNyqbhEd 6RfF8jOeISaVnm1dwsvO2NqIx5oAhB09hANuS4SyMz9DZhiZ5ivmIN2ArRcN LJd2pgahgRrhc/QZPZJ/bEDm1UYUxDShJL4Z5cnNuH2dWCydsJTVhOrcRlSr G6Ap1hOG2Wr2GFSUVKOmip+eMMMIhpsxOrLGyv59tM0jnhX/hu0edPVYAiK/ z+WW2lRbfDPDDsvM7Q1l/8vNLOFia0uGoR3853+LmIM6BPkEYsPCBcg5HYnl 00zpYjnZ9NNqPlYtXIdNTmwDjV2CBH/nQ9izdDcOOvrhsJ0XuRhOwv1As7nY TfC1GDsWFuPHwYogxpZjLcb+AVYTbGFvuR+ua3dgNcHKnTn8zMNiFxkFGwhm nmbkWZmawI0cfuvxE2A9YSJc7GdjPTGM12Iei2HhGhawZK/twlIXC1S+LHze Jss5T43jSY41BLF9O/zhvHQX1ridxgYfFbb5q7BjjwoBBLGAIyrsOk6fjxPD BUcLR46+KsLBdfZsYVnRzWG+oRCLF2rzJQWvb1wQsPMYYvZthS9BS8qG2uZE RvYKnqrx4ogJVDL3pJ+X/rsCwQf4ZBpzQYfkEJ244KtHUYIeN1L0uJmuR0U2 Xfk6lBfqUFbMF3vZDqZabSOmGcddZqMj7M0RAGX+sSRBAiivgphMNkwwIo6m IfJ4saB1ztk6HPI6iRNbefXQZb8LOLJuHwrPZCNpezoi97WiMqMD/Zl30J3R jLY0PS87m24BJ5bpT6TibmlmSM1jLzYN+Li4YpvbZvjT5buOI28/+QhHXALJ RLTAzHEfwZRVXP/xLVi+Mx62Ngfh5OItuEmS/+5Jlxe93yhcZvTeFB4WJlhH /vuyyZMEhDn+2QSLp9JkLoRQHCUz0mc5rzPhcyp7PS7UmwgFWivn4Yd9fo+L TlyNRgNVVBSWE52uJClO7gFw8aRr9TohbaCuRjyi8XFRNluGk15c9tM8FkmP 7yNG4z1XeePSsWM4sXmlEIgUIvD0vaf2+WLo4CYhyM1p/1lcOalDlHyJNF6H vBQdCtJ1UOfQxU6jJvzkEX5y6arQtGKqEdRkNRw48jjgGwrAGfnvL4vwDD8Q hYigHMOT515oRFloG7RkOzbE90prj/rwDoR814HytAHcz+1FPzk3PTkdaM9s xtJpFoQbS7L3LeBCk9JqMsokQ4K9mH3OrPOdK0UTaDyvEadB6bPKGW4LF8H8 g48w/YNPMHUc37ds/uTPMe+jt+BKsHGzsCBSsiBCssRGS3ZZYBOLSlqbwcOa yMlqBgIXL0GC3yk4fj4DCyaZEEnMgYcY49gkpg9vEWuVtjg5CofNS/VJG4gY GMG8I2b7yImA/WTnorOXtALFam02ixE9VgzAonnem4/R0AvEjgXmQiHAJnE9 nh+c9yzir7Tg1BEdLpzVkTuhQ0ykDglxOqSk8HXA1CwdrufpcK2A7tGlb+0T retHEojt6Dh47SHhECnHieNgeIJ/+N44jt7pyLvcirKrXdDG9qIxaRAd1+8j 9UAJLvh1IjvtL+hTD+J+wSD6C/rQk9+N9tw2XNzxPXGJlZBn7Uwd6Go+XWDo bcuk+nIxKWIl4WKltGENSxFnhf/zBaa2//NEWE78GJPefhMzJoyF3acfwOHz j+D8xRS4mZP7amFNPGINL3Jhvcgo87Ild5ZcWA9bMpBsTJF98CLqLqYiadcZ OHxhAscvZmDNQh5TkA61H5brOnTWOQPDuBG2h3Q5z+b11ix1llGTpzyGRqJc HRfBf4s3Nnw9kbD5FfS1GjGj52ncaf0FkbF3cPy8DmeJDC5H6xCSoEM4YSCM MBBKhFDd3Ifu/p/xxUNGsGRczBre8b+t2nj41qGvinOM/BHDAhMQsb9IuHft TAPyrrSjLPIutHEDaEy5j7LgFpzc2o6k5L+hp+gv+En9M+4XPkB/4SC61b1o y+9EU04zlpBZvJR6fwX1vgv1/iZx1wHBPuBL/o8JNevvyqrWHQxV65tXzEbg lm2w+ORzuj6B7WefYuE0aziTd7jmq2lwt2CeoS08beiyJa9wJrPAreFuZ4nC 7yPQGlGExvB81AZnCUc7H1/tA4fpZkI25mpihbXkEbqTR8g8dVYCsoYsz6S4 SHER8fnf9Pp+P3/h3upveCkJC0qxUhJPAtAyi+lwJB3dpnyCyssXRbNwDPIr +1Co7UNRTZ/Ym78b1VQUu2Tu8A6VB3xeerg7/drQPMbHfMjORETs5qZA8tkm 5F7pxI2oXmgTBtBw/R5iDnXiauyvaFP/D+6pf8L9op9wr/gB+orvobuwH20F 3WjMa8UZ/2NYbEKdSR3pbGPODL6heukFgq03NF2+je2yND6pXjo96jqc7ZfA foo55n1thUXTyfadNhPOZrZYY2JKLhW5VzPpsrODG7lWa8m1Kj2diO54Ddrj bqE5pgw66lBtSBY05xNQfjxM8HLjYqIQHxuFBLriBe9WK517Ku8/Hnr5vXBv z05/oV7BhTDgShhwJQwc2rsTfq7rUeSzB/eqqhYqDLygoKBhVr3j6P30vKyf FByCN0YoyNuOvZuCyuwGXP2Oj71E6rLskHaURnejKoFtfdGHkuhOqJPa0Uts O0DjbbCIruJB9Bb3o7OoD61qmrALWlFD9oSPkxsW0Uy8ktpyvWwRSqpfkxag pFJdb3Eq/F4M9YcFhSDi+HUc9w3FzCnWmEf9tdDEHg4ms+BkZY9VNA2vmjkL q+zssXvNJtw4l46+a024m1KPjuQ6tCRqoVeVozqyEBp2vvqFCLSVVuBPYvPI O0jWFo8p9N8S48YO7zfDORvyUNQzRjhqbxlsN6k7uhr6EebHuyP+TD0yr7Si KKodtxM6UXe9C7fIFbgZUYnugru4W3iXRs5d9NPVU9yDjqJutBR2QF/YgurC WmG/QW+nlXBx4EUX6xbxggsvNnMYyjwXGFZdWJknm4iYJl0tbbh6OBoRx7LJ wriB5BMaBAdcw+GNp/DD1rPw9ziP0/4XEOJ7GJ2hNehP7cFgWjcG0jtxN70N nWktaL2mR32yFtWqMmgic6AJjUNXxS1+COuIk7mWPMTpkFpr6fDGlvssT8n+ nRktSv/+zvCvpcZPPctDRjEn9Ugltz4/ohk341uhTbmDsuhqFIXfpLmlA53q DnRRw3YX0fuidrQVtaGxuBV1JY3k5mtxu6AEmrJSITzr5OiAVdTYa4mw3amx 17PaP2psVve3TgzPJqkiDFtoV+bfRMRBos2gAkQfvYWUH+rIGG7GDRqH2sge NKh6EXeK5sGsexgkThpMaMC9rH4MZPeiN6sbnVntaM1oorFahxq2PU0cYT/6 GrqrqnDgESAWjfIVo7frk6Pwktykf0/BlJNammyZsGN1iCdnNjNMj8LYepQn NUIdeQt5ocVozG1Bcz4hpYAudTNaiprRSI2qK22AhpzaiuIqFOWqIZ1vxwg4 ngh4xSJyrpbQtdSBnKooIcwo835eQcShYsQc1Rjci7Lwbmhj+tCYMIh2sijY eXtNRX/FX7Nr8XN6KwZyidHy+tCZ041Wti96egOqr2mgSSmFJiENPTVa7DUC oi6jN+WYEf+utEj4sTjrJpyoxeW9tQgnJy7xR2q7CHLYyG7PDC9DWnA+qjP1 qM3RQ5dHl1qPumI9qkt0QrSJ7XmoVgtp1s+JGLudcxtX96QKLRF9pAbXiOfz gjuEz1rVIFnYD9BOLdKT8TOaM/+CxvK/42/lbXiQR4O5YACd+XfRktuBehbe yqiBJo0GdEoGumu1+G4ExkaaCeKjrZY3zO+HuQsPsRY/E/7gBcSfa8T5g2Sv ntEhnvyYNPJjos7kIT2iHGVkw5aTH3OL/Jhban5oUQk5tAV0Zam16B988IKI 0PAA3gZRR2uQcq6Fg+V51Kfcw520++jKeoC7uQ/QmPMLdJW/4u86cjiTb/OD dagp9Dkt0OYQr2bdpCbIQGedBjuNAIW7/NmfFJ6ddfqIP/tS+PVzaG/5BSeD dLh0jp4xRIfzP+QhNqwcWdfJUc8gh52c99x89mw8d7Ok8g56B356YWjMEfwD S+kh+QFg2Vc6UBLJa511KX3CNjztWQPozhtAb/4A6rMfoO7Wr7iv6yP76y6a Crqgo/GoLaAnzStDZUYq7vV2w9e4jvb47QhglopQfSp2fnFpH47T0+05kocz P5YjKpE8U3q6GPJEojJ1yCboVTXefVmcRtkr3L8UEYc5W2cG30FRJD+Ityal Cw3pNGazafrL7UFXfs9j6FH30Pd3ssNh1Z1oLGxHLVtlKqxGFRF1aVoythvR axuHm1vSqczsVzzG9oTQk1HXqlBS3YfSWjK6q3vFkj++q1f4fq3wM/VyI/Kv 8lqiquQ7qEttQ0NmO1pyaC7Jb0d7AV1qeq9uQ3NRK/TFzTScWQi5Crfyi3B/ oN/nIa6VxB7eXOOnRmjc09MjNv1wb+3VIcIcgwpSKThAI7A1R9FzUMfUoyyh EZVkYtWkN0Of1YwGcrOa8ugqaEJjUSP0pCYv8KhDeVEltLervEeoqmT4bOOq SoWR0r5PFRUVYhBqjOHwAvbpddEvTj5bj8v76xB+SocE4sWMqzTOWQlKEs0V 1/WoSicezNKjhnixhsaGljigknjxphAgrUUu4XmTETz8LVfvaZE3JPXYk9Cv pyhY4G+ITJV4sRnnD3OmiiOmSo3gdQFq0rAkVYcyYqqbxFRlpF0pMVVhMQ/B VWia0dt/z9OItvPnyj2rAMzJCprxOMCzKM3tFWJBl87rEEm8khCtw/UEakMa eVnEK9nEK5nEK2lqHgtS32qGhxFtFcDVeU4BdV8qqPOmRAI3+nCMVDnPsnBj dLhKJBBJqkQSCYRnGEIS7kY0yB6uwfPitzH7TwLTJBnApJOS3hHvtXT9wl1l Gr3rjHjQ/fxrXpCJlL7mcwX7/5ARmh/mIl+U4Yxtc8u+1TD7Dbci9huh6FEu 9WUFgHyqIHL3CNtZSdETXOS/K3TyJwoiA4zQ8hQX+YpCc05UELnjEVoyi+Ec F/mq8rD9L1Eq+2umFPv07SiKyu3bi1zqawrN+ZF4T27O+MjmyYfET3/kUv9T oUX/pCB1JKkqKRrKRb6uMA4+VBDpZZyifOkMbyj0kxT4kM8qo1GGXNFoLvIP yrCfoDABuBmnq4oLflOhq95T4KLVCmbAyHBnIhf5lkI/jVcQ6TzCShpF0RQu 9W2FRh2nIHWFgqKSGyYpmsZFjpU1qgz8Y2XfJBHhUuN0zeSC31VoVEl/Oe8t MsK2yuUixyk0qtTQ8rHv+AhFRVwVcKlSt8jx/6aC1JGV5UqKFnOR7yn00x8V RM4aoegoltoNLnWCMv7fUBA8sjBLSdcKLvUDhX6SKEFOfVbG6VrJpX6o0FUS d8lJxdwIRXnqpYHm5I36moJIIRniMUHik6NpWcdFfqQM/lcVpH5txPTcwKV+ rNCi0rQlp74pRsx6zVzkRIXmlCZXOe9NMkLLNi5SmoflsJdMADmXfGaElp1c 5KcKPfSSgsiPjdDyLhf5mTLmX1CQ+icjFO3nUj9X6KHnZMpLjPe+EYre5yIn KfSQZHLL6W68EVryymNxPWZ4cz6jMNjlKT6jGWR/5SK/VAa80ma5I9M6lBT9 Py51ikJzKtV7vv4IRdkEIkbbv1JoTqXkk/8YRcthezqxv+HhNIO3KEe9FHuQ s52Ud/AIA0IQzYOeBp9Z3l1PKjDJC8aqzHtFjB78Zgg8riD6mX9Aaw5OMXVs eN+NURD9lLFac+cEJgodKC2cyEnwiX9AZc54MBV+PDmsodkdkQhHBk6VrDRB nHjMrZnYdPIxwXjlEWaOIILPvbAQNWIPy/51hK0l/Ck3VGDJZyfpLncuuT7u /3r/r/f/3O/xb/8PFir7Cw==\ \>"]], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.0297577989999995`, 1.361188704, 2.241203097}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{8.162200106999999, 1.119496074, -1.379537691}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.821956044, 3.532265034, -1.0332879599999998`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.591591271, 2.879978388, 1.505316123}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.583460584999999, -1.723311915, -0.990977577}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{10.550138409, 2.067766431, -0.123491895}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{9.923230433999999, -3.2676314459999998`, -0.226782897}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{6.458408792999999, -2.8374223439999997`, -3.436551729}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.058488004, 2.5511138969999996`, 1.4326949519999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.35065631, 0.86586054, 1.0382200769999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-8.823746283, 1.11775755, 0.516625083}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-9.147376305, -1.4973982799999999`, 0.225932532}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-10.951246131, 2.629801005, 0.074000652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-11.481212496, -2.5464274409999996`, -0.423311697}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.29725199, 1.614824238, -0.5760183539999999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.572826940999999`, -0.99360426, -0.824135964}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{5.995356705, 2.188556055, -0.173379975}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.296966355, 1.393823823, 1.324585215}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{3.4165964969999996`, 4.465209924, -3.063902889}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{12.483792830999999`, 2.155713069, -1.735783935}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{10.819250586, 2.66428803, 2.058469107}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-2.264899935, 4.790257221, 1.819554336}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-6.592690875, 2.2941524909999997`, 1.078319511}, 0.178]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{5.151794625, -1.994824011, 1.512988305}, 0.5]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.129317538, 2.061171378, 3.8194616399999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.198746905, 1.661216373, -3.3552379379999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{2.3924546849999997`, 4.582541397, 2.629290786}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.328448757, -0.488619729, 0.900914475}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{11.433138527999999`, -3.102811812, -1.6837415969999998`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{10.728847338, -2.628364833, 1.609570872}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.469626846, -5.314384413, -0.026474697}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.729994688, -1.7991833699999997`, -4.047227180999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{7.845769842, -2.731391277, -5.016529898999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{5.936265786, -4.864598019, -3.2068209}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{13.777216892999999`, 2.766671976, -0.5858825879999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.177162953, -0.055084755, -0.848645373}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-7.5618991079999995`, -2.815634103, 0.50927415}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-10.765677591, 4.698852432, 0.243242184}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-11.674774467, -4.611718365, -0.6270969449999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-14.927590664999999`, 2.871984957, -0.902086089}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, 0.12]}, Text3DBox["1", {4.429757799, 1.361188704, 2.241203097}, {1, 0}], Text3DBox["2", {7.562200106999999, 1.119496074, -1.379537691}, {1, 0}], Text3DBox["3", {3.221956044, 3.532265034, -1.0332879599999998`}, {1, 0}], Text3DBox["4", {1.9915912709999999`, 2.879978388, 1.505316123}, {1, 0}], Text3DBox["5", {6.9834605849999996`, -1.723311915, -0.990977577}, {1, 0}], Text3DBox["6", {9.950138409000001, 2.067766431, -0.123491895}, {1, 0}], Text3DBox["7", {9.323230434, -3.2676314459999998`, -0.226782897}, {1, 0}], Text3DBox["8", {5.858408793, -2.8374223439999997`, -3.436551729}, {1, 0}], Text3DBox["9", {-2.658488004, 2.5511138969999996`, 1.4326949519999999`}, { 1, 0}], Text3DBox["10", {-4.950656309999999, 0.86586054, 1.0382200769999999`}, {1, 0}], Text3DBox["11", {-9.423746283, 1.11775755, 0.516625083}, {1, 0}], Text3DBox["12", {-9.747376305, -1.4973982799999999`, 0.225932532}, {1, 0}], Text3DBox["13", {-11.551246131, 2.629801005, 0.074000652}, {1, 0}], Text3DBox["14", {-12.081212496, -2.5464274409999996`, -0.423311697}, {1, 0}], Text3DBox["15", {-13.897251989999999`, 1.614824238, -0.5760183539999999}, {1, 0}], Text3DBox["16", {-14.172826940999999`, -0.99360426, -0.824135964}, {1, 0}], Text3DBox["17", {5.395356705, 2.188556055, -0.173379975}, {1, 0}], Text3DBox["18", {-0.30303364499999996`, 1.393823823, 1.324585215}, {1, 0}], Text3DBox["19", {2.8165964969999995`, 4.465209924, -3.063902889}, {1, 0}], Text3DBox["20", {11.883792831, 2.155713069, -1.735783935}, {1, 0}], Text3DBox["21", {10.219250586000001`, 2.66428803, 2.058469107}, {1, 0}], Text3DBox["22", {-2.864899935, 4.790257221, 1.819554336}, {1, 0}], Text3DBox["23", {-7.192690874999999, 2.2941524909999997`, 1.078319511}, {1, 0}], Text3DBox["24", {4.551794625, -1.994824011, 1.512988305}, {1, 0}], Text3DBox["25", {5.529317538, 2.061171378, 3.8194616399999997`}, {1, 0}], Text3DBox["26", {7.5987469050000005`, 1.661216373, -3.3552379379999997`}, { 1, 0}], Text3DBox["27", {1.7924546849999996`, 4.582541397, 2.629290786}, { 1, 0}], Text3DBox["28", {-0.271551243, -0.488619729, 0.900914475}, {1, 0}], Text3DBox["29", {10.833138528, -3.102811812, -1.6837415969999998`}, { 1, 0}], Text3DBox["30", {10.128847338, -2.628364833, 1.609570872}, {1, 0}], Text3DBox["31", {8.869626846000001, -5.314384413, -0.026474697}, {1, 0}], Text3DBox["32", { 4.129994688, -1.7991833699999997`, -4.047227180999999}, {1, 0}], Text3DBox["33", {7.2457698420000005`, -2.731391277, -5.016529898999999}, { 1, 0}], Text3DBox["34", {5.336265786, -4.864598019, -3.2068209}, {1, 0}], Text3DBox["35", {13.177216892999999`, 2.766671976, -0.5858825879999999}, { 1, 0}], Text3DBox[ "36", {-4.7771629529999995`, -0.055084755, -0.848645373}, {1, 0}], Text3DBox["37", {-5.025526223999999, -0.5413423589999999, 2.603534175}, {1, 0}], Text3DBox["38", {-8.161899108, -2.815634103, 0.50927415}, {1, 0}], Text3DBox["39", {-11.365677590999999`, 4.698852432, 0.243242184}, {1, 0}], Text3DBox["40", {-12.274774467, -4.611718365, -0.6270969449999999}, {1, 0}], Text3DBox["41", {-15.527590664999998`, 2.871984957, -0.902086089}, { 1, 0}], Text3DBox[ "42", {-16.016380467, -1.816209567, -1.3421972189999998`}, {1, 0}], {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.111307231968489, 2.324500258316815, 2.707736754420446}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-2.1103341973878518`, 4.750077919982203, 2.8952640117611383`}, 1.0875]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{3.801669673761628, 5.4025314095623145`, -2.6691835820970287`}, 1.0875]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{4.295763760894215, 4.625323448936527, -0.5227933381400449}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{11.08556110900108, 1.6409501360788723`, 2.312466174313704}, 1.0875]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{10.867773712578192`, 0.8512062551366048, 0.19109412252782154`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-9.153450827655732, 1.0196553789165608`, 1.7662434596502767`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-9.450890877799326, -1.5994422436285858`, 1.4818549593757557`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-11.266187769157852`, 2.5540370332800455`, 1.3289694942999455`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-11.789518348482872`, -2.6376069088660756`, 0.8322794052161906}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-13.607615158861067`, 1.5281973030591274`, 0.6793882285688768}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{-13.878391408100391`, -1.0808460430482023`, 0.43240469898557304`}, 1.2961]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], 1, 1], Opacity[0.3], SphereBox[{0.2872065443367533, 1.2582108735833877`, 2.563647813921598}, 1.2465]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-2.0056687760315115`, 2.7777275356831836`, 0.1576531495795538}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-2.4194656726121497`, 4.830436522017795, 0.7438446602388609}, 1.0875]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{3.031523320238371, 3.527888438437684, -3.4586221959029695`}, 1.0875]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{3.3481483271057852`, 2.439206619063473, -1.5437825818599547`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{10.552940062998921`, 3.687625923921127, 1.804472039686296}, 1.0875]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{10.23250310542181, 3.284326606863395, -0.4380779125278219}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-8.494041738344269, 1.2158597210834394`, -0.7329932936502767}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-8.843861732200674, -1.395354316371414, -1.0299898953757558`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-10.636304492842147`, 2.705564976719954, -1.1809681902999452`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-11.172906643517127`, -2.4552479731339236`, \ -1.6789027992161907`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-12.986888821138932`, 1.701451172940872, -1.8314249365688768`}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{-13.267262473899606`, -0.906362476951798, -2.080676626985573}, 1.2961]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.3], SphereBox[{0.3067261656632465, 1.5294367724166118`, 0.08552261607840195}, 1.2465]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.583460584999999, -1.723311915, -0.990977577}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.550138409, 2.067766431, -0.123491895}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.923230433999999, -3.2676314459999998`, -0.226782897}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.458408792999999, -2.8374223439999997`, -3.436551729}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.35065631, 0.86586054, 1.0382200769999999`}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-9.147376305, -1.4973982799999999`, 0.225932532}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.951246131, 2.629801005, 0.074000652}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.481212496, -2.5464274409999996`, -0.423311697}, \ {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.29725199, 1.614824238, -0.5760183539999999}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{3.4165964969999996`, 4.465209924, -3.063902889}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{12.483792830999999`, 2.155713069, -1.735783935}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.819250586, 2.66428803, 2.058469107}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-2.264899935, 4.790257221, 1.819554336}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.129317538, 2.061171378, 3.8194616399999997`}, { 5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{8.198746905, 1.661216373, -3.3552379379999997`}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.3924546849999997`, 4.582541397, 2.629290786}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.328448757, -0.488619729, 0.900914475}, {0.296966355, 1.393823823, 1.324585215}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{11.433138527999999`, -3.102811812, -1.6837415969999998`}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.728847338, -2.628364833, 1.609570872}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.469626846, -5.314384413, -0.026474697}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{4.729994688, -1.7991833699999997`, -4.047227180999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.845769842, -2.731391277, -5.016529898999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.936265786, -4.864598019, -3.2068209}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{13.777216892999999`, 2.766671976, -0.5858825879999999}, { 12.483792830999999`, 2.155713069, -1.735783935}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.177162953, -0.055084755, -0.848645373}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-7.5618991079999995`, -2.815634103, 0.50927415}, {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.765677591, 4.698852432, 0.243242184}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.674774467, -4.611718365, -0.6270969449999999}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-14.927590664999999`, 2.871984957, -0.902086089}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, \ {-13.572826940999999`, -0.99360426, -0.824135964}}, 0.1]}}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->True, SphericalRegion->True]], "Output", CellChangeTimes->{3.5765572969837112`*^9, 3.576557533074526*^9, 3.580218413738578*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsvXd8W9eRNvysJBfZ3iR24rjFKc5m8ybvZtPW2bjETtxtyZbiblmWi7pE iSpUo3ql2CWKBSAqCfYONhDsvQAEwN7A3osa1Tu/ObeAlxRIO9/fL346wkW7 55yZZ2aeOWfu5btfu61ZueFrt7XLv/75m1u+3rRm7fKtP3/DdQu9NfffgH9b Q+39n4MdTwDifxP0b2It+4+98/+O/9/xLMe/Zv/NZbh5WfLub7lj7m3uiLUX JZ//gv03j316z7d883Hh82vXrjk+//63/ObH3PE9GBkZQWRkJD7++GMsX74c ly5dwr+zz+ZIxjvimMAcx0fPcB/dz3VaVFTEneDNN99EZmYmhoaGsGDBAnbC f3cyjpf4s45yT/OmfCR2Me0XP+H+v/euztiDRjxX+MmqVavw9NNPw2azSSbx r3f3xCxzYwISfjpPOOOBAwcwODiIgwcPso8X/sv9/Xja9Dw9PR399fT0zBN+ snHjRsdP5ghn37t3r2OIJO5/ve8fcv/fx/XNwMD6Zh3t3LmT9c3N9/5p8mDf eeyxxxAdHc19h3VOMl/wL3f+sGTiIgrZxJkCqeMHuY/nIz4+3jEelUqFtrY2 7pPx8XFR6HhHAlVO7XMdRw9PE+80dYofFxcXw2w2OwbHvkoiFU58Z/aT/EiY XVNTE9LT0yU6miuKh3v1Fn+2m7Ocjfp8bJazsUmLliqc7drs+HEm+Udn6YGd RvQHQg9XhB6k7oJpRFCUiFDW4dQe5uPChQvw8PDgXolgEQcnSuZNvpeLM0hF 6OVngs+SnpFJg0nCmXTe4M96fnbN/VLiPMSxS+cjk8m4V6/zZzsz+9n+U/gl 8wlXrlwRRnw3Dl6T2srUs7EHkzGd7TeznE06U+FsQxI7dWbL7HVDQ4MYeZKT kx2mJJ6V/ZR9jc1aOOvA7LoXJa9Wq9nJuVe/cdLDXOE0M2DgVb6z3tnFe88s nUntd67g1UR4iIqVCu0Vvkcvh58QfiU+OIN5d/bx3C8BCvtYOh6paYnfY/IT jeQffG/e06xzJl/59uwj+d9ZemWzFsEn9OojaF3ag9j7W7O7k+ed9DTfCSj/ /q/N79VZApF4yheF30k9gNg1+x37PhvlUw6d/vIuJd8zRcni8asS03ESicSJ /c3JAO6bHdg/cTLXn/P9nnDy0Uuzq3muRNAsLLJX4qCkHuze72AATwm+bhoG uPHwo4a/Q25/m31cbzjxVA86Af2TjhPOdTJ5fkQwz97X27P0JYX6d+qrcnaw LxR+GRgYiNOnT3OvHnIC9vscfX3fiVRngLwwhHInDlaCvfecONMHhU5EY2EP GvG9zvue5MKT/F3i7NizoO8SiRFOl3x7eztnjIudjOcBJzbAhi+o4h7n4/rR zDIpnB0CojTZ3NmY2KtFwnvSOPDAdzCDec4H90OHqJ7m38qbfUifOHGLYhYm tYC5zrv7E39wytHrr2YH5pJZuhONgGlj9u4CnH/6i1l8sZgULBU6Y1bBrIO9 +oETy5jk4X+etc+fSebrxAq+dOJ5RVMTRSRYwV9n7WemXFKg3t846Yc3eOf5 4MDAAPfaEYJn6pdPKufPmlSKclvuxKOLHo55ffE3ol9raWlxyPsvs45ieqo5 bRQi8WUDYYpmr0SJSN3tI06A/ex0BP9odgS7zHJeEcFsQsJ5o74DJjlmO7lQ wR2JnEHqrn7oRG7/w3cTMTsM/+DEZTlz7aIg7Y3daA3P5l79yclI+OTznrsS ACYjYURhM6iMPRMH/vO/OKKjb57CSIQd4+Q4xBFJXaaYDrOuRJxJ1CEYsfo7 oFkk6X90IGLSF4iRyn+1HB3e1ejtuIDLF8fFAUm9mpiqSpUluC/Fd0Mz+0hE 8x+/o7hEv9lu7kSFKymw8zyuXb/8ZycD/LETY+C7gUwyQBY/RRM4efIkG9GL Mw7m/invsVZvbkHsJzrctBILuXXzf2YZiNR6hIEECwOZIYl7wYnhiNLzf+UE rhj7cfPqFcEWp3pHcbFCcKDcqz9IfMG3Ezm1iw6j2hZMXLgsuK+pPTwqGInI qtkp2LoPO6XQ04kZemIP6unXd81KKt4nhfd8V4ag9TAxwtGr+KsTFyw6NDEp EF22IOvf80PxnSVaSFYP/68wqel6Zo/7hM6VW+LRL0uT2OU8tJrbUbg2HXfa zuHWzWviOKVeVFwQFlawuFf/zZ/ca3af7Ew6v5n2Hm/IEht2XzeGCy1XcTs/ CVcL88SozAAb9k81blSNEWBvPedkoE9ILEdMn3/HdyLmVrO5+3udjPbXDhcz 3aonBXsvWgZuI7HpNlpPT+D2wCAmqgtwu7NVXK0+/rI3LqX24PL4aYjprtRr i+OWGpow7qOzxw8xW5WulP0fQWDTkMBNYr6AkjYaaMXQBMbO38JEcx2upcQ4 GIFsnRqDsgZMjF/BC05G+7hwfikgCRbCgA/NbqN/dSJjbmQPCiPLbZtAVscE rpy9jDtFmbhRVuBYeMiU5aJ+Twmu957hRzEPjjAA8fG08GVpEHpMGBQTsASe IlD+iz/B/tmN/q+zGr04/kjLBBrGJnBraATnlCpM9LRCzFeazG0wLk/C7aZz uHPrxhPTTjM5l6mnFlepZLsSYF6lwLXBIQezYbMU/fVTEhiJ69i8W8Ce7+ZE FgkSaB6dQFH/BIbP38ZEWxNuGuIxbm0RdwmYKSoWyHG9ZJiZ4myJvzh1u9mO rG+S6Cw3cfXMiDh8abgRVzakboZfW8Su2d2Ms1WMhdMMdz6M9beR0jqBy+eu YqIsGxUnPPD6T3+CpT/9T6SsPoabF8cd4JGqxFk4FyXRTBpN/CwK16vGMXzu +g+dTEs8JRuzuFx7r0M+wtLNDuHtGeLpB04k7ADLfdCW3oRteAI3R07D5S// gz0vPocD7zxHoyufZUbOOUH4PzW4WnQW5y5eEPNpaewUT8cGKrKn+U4EJCS5 brO7r4+dz2ue8KuwxAos+cIN6xe/h90v/RXbX/tvpCr9nxQ+nvYr8XmOIBXp x2xm8rdluGwcxY0r1x0kUDq1pwRjY2MTASauFs4yxc2zO7wlDhyKK9ZsLHtW xOCl/9iAP/7hPSx4biHWvvLmXMd3uKMfTf2dBMm8/Z185SQu6Adx58qtH884 mXs5livGN/aOsIJy/8zz2TjDfNgzaZ3P03/gVPh7Viiw+C8ZeP+bi1gfcwey gFN46c//F5/+wwfGr7Iw5hk0FbpTByDG34KwbJxt6OZePSKZ8vGXPHEmhnj3 pTsiJZFG/586cX/3OGQnGNp6wRnM5gjFELzUiZmwx+I/hWHxhyP4OmQCOV0T cwXc1JsvYtMbLbCtCMeN1tZvcefzYIyzQLvcglv6fEwMdYkuMc41BsOadgq/ dxzEQDrNnzlxk84CEv89rJGoUyQ+IrIlDI1lEOIvFzhAyAGOM8/7HYKkLy9+ ow1Ljt6CzHzHobSY0CFHCHY2nHuE/9vrzsFTcx0DFFrudLXjljHOsc6jdQlD b1ATJs7edpBoNnVxpfTnwnvSna95joEJE3516ui5j8RFmhnc6yezO5R7hY8T tEaCeAQWv1iJj7Zcg1/BBLouTIi2dHBdH/erM75Kp3q/T5CAsYEYTucErp67 jFs5yUz3/JIqzSVorRLtXjZcHbyCC9cui0KQ0q+fCqeRxkLRE/OLfMJO2/+v WgFn3muGrOJeUaP1PVjyYgHe/2ocayPvoP3s5OrS139v5r57MdXotPv7Rdvp uoO09gn0nrtDqLDjVlacY1Ga5fSNB6twq+8abty68ZQTmfxEEPD0GTDPp9fr OfkIsnnRAekZFmpnrmqYUUqfO4DmrLZGtAZNyjWE2/jN9QccIKUPdi1oQtMq OW6Qr+bO8pADKXcmkZJNSBnsEiQ2Dz4rg2HdUUxpxjXcvn1bJE9S1iu+J0qC f3W3Cf3yX0bND2aQB3O7ZF9fOvmJM4sQCUas4jSCPq5G54rDwiKsgAi7gIhO hohYR4boueIUyjZk43brNdy5fUfkJFLW9YyTYPCvz5M3y/kz8U7uUyZF5lO+ mvb7mc4pUo+jGwaQuiwPZ31kgjxJ4fWTCr9pTCKFd0pWjtqRuzIVt+opDty+ 81MnkxZrD6Sh4Zl/edLiJsdsqbKoTbYIJcJtqQPTk4xFzBXrzeew5rUWmFbE Umy08wD/3l1upb7ztkTpbZR3xOJFoujvPv1TuBNVulF9kRKOCTEESvcKxLmz UbMHU8szkogwjUo9KEGwE2J6TBx39RUcWlQP+6qTuNbU8qATcYkknOnOwOnu EjIO7cGG3/8RR978B4qi1Y7AJWVovxBGMH2fV0Ar/zHen93zeAkn3r+2B5rP KjHmF+7YT7x7kMSoo8qx+ZAKK95ZiG1/ewH7Fz6PdOXJ2cY3fa9LWJcTxrdo 9vH5CSf23DyAnK8MGPIIhDMhipy93tyKl36xCL975k28/uwCfPP86whZ8Ab0 mgBhQFOX0H7lxJ0JPGChBMbTRyZUrgjLfPM46rblzWbUrNQy6sZbwEN3wXPP ChUWP1eIj1yv4dXFq/H35/6CRX9dgaj39Bj1CBYHKGVr/yH0cP36dceKpqP2 6K4ijBkqrZjlMUtkr8RN/pjQEfh8UIPOVV5CTJh/F3+JkWVg8R9U+OcHw1ip mEBh34QkhziP5X81o/BjNa41t/3cydjFbTs2dmbk7DM2FBZjRI4sTORNYSLf UtAlqoi1k8J7h9b3IW5pMdEmBT8RHhnzsPhvFny6+wZCKicwcOm2GK5jZL3Y 8/dSNHx+HFebWkRfcDdFutfpwAcGBpyVGP1U6iZnhLNS+OXyfzSj5JtkXNRn OWhdjCwbi/8cg/eXnsP6qAl0nptwLLzuW9mG0HeyMHRMAWcDfmqWAZM25ghd TN/VYcfOrJ0PJ0JtzoyT0TiQcBm7FzaieZWMURDOVcwTdPC5x22oahyLayLV /eJZMzI/iMKFZIMj7ZIyj8cl82HBadp8xFyAJadi4iWG0Vnm46yWhT2E6jad 8Mu9a9oQ8okZI36xDr+3Z0UI99UPVl7inrsvzBj+5gmDa2vsRuSaGGz5WyUs n53A9eYWOGMaP5JYCQtITubrcHniJB0ueZ5jFNwRvygvrLrOvFonGJ/KYS33 CD/YszIHy373EZb8/Jf45y9/T8Z/EosXdOPrU3cmp3sXCRCJfIwsH/qFu7Hn nTT4vpmHtqV7HBySzc5oNCIuLk7IyfkZs+jlbMbi0jebgrjT9sA0abMHfy5h e2R2zuFMWZoZY8mDWPHhEjz/5N/wwTN/IK9NUtx8DQHFRC4u3ZXhzQKEe0ks aSh8g2JOXS6OrLYjYVESefvARyft5F6H0YoPdkwgEdMBe6UFNSdDcbq82lFK Jdq6VquFr68vR2QYrpj0xD0PJgZR+SRBDkZzJGL7i8QinLhdZ9nIzBK7F88+ /TO8/Ivf4+P/eRPffLEbx/2VSJb7ONv54EZxnzCVBJJQ7aLVuHO6k7zJONY8 b0LZJ3IymVbHJhebrigZ9mBAmSZ4xjzY7B2Mt9KMfc/8HSW/fQd9z/5t7jTB iZBjExcF94gAZemWmhiqHpguvT/P7h9F580IkLg8op1RevNx6AsPuL62HC4f LYbr0sVw//wV7nvXSvJnxZkIiC//sApdX6x1vB8jG8ChV4rRvPSIYE4PoO/M JVS2j8A/oxYnM+rgFVOKncdDsd51OzZtdoMmMm2ym7sXNJilkgXPFSxEHxiD nb/5CjXvuFE7ANM6GYp0ydPjJSdZccVNlCY/nhl99R9ml228QxfzhNmnyrJQ sj6DcrpLeP2lZ7Fzw1cIjqtCw2lhg4i+eau9xdHPxJSd/7lYT9IbdXWRaITI zCo7tAszMOIhE8b6fVR1DuNkTh1OGCzwSS6Fu28oXDZvx7oNm7H/ZAQCEswI SqpDUDy16FonXuLfHe8JVs4dcyvM72rREt6AuE92YuWq6whY1obUtxWw+scL 61lTd82IfAi843cziEv4VtKMsGNbEK1I/SIGN23jLC8UVyNbxiZQPjyB0xdu YqKhCufDtA597SBZXTjkOuU09eYz+PIv1cj5MBzjyZk8+B9G/7mLOGk043h8 LnadIFFtIVFt3AyP8DScSjNDZqiDjIAoS6Omp0aiC0mo40YaEm6ViO37jtGz LCM0NBQVBdUIfFuF8Zxx1NQ1OWJHXNoENq66gtAlVmS+6odORYaQNc/O5gVZ /lawx9mSdpFRJztwJMRQbgtkkRLXS09j4qa4vHkv8iizKyL6fP3seVxLicbE QIcj+k5mlSxQRgbepSKWXux4uRy1S3wYjeAh/xPOkRkKiuF2xBuu7vuxee8R eJABnzKQXHPrICeYyo11CM2illlPjZdraDq9n8ofywVZDw5fcMBUZCFum3bA 5ZuNGNQP4fKlG2I8q2+6gUM+t7FjxXnoPi6C4eVDOFfdIu5dsVJ9UVSiIUnr 0YVtgl9/h4gtrhIw7yn6jBSHTFpw6tUAXDYM4uqly/eLg+u8g1T7BHrOs4XA NtzKScB5S8t0h8YeLC4rnl01qbuHsXdlKwLfyoFtWyDGbF1TYqzbtu3Y7uGP Y1FpCMg2I6SQkFpQD3leA0JzG6HIaYIiu5mGpsxuFrUZmtEARWo9TkaWC17o Xod31Clj4P2PQMQej0VBbpFYC1DfcgfHfO/g4PIRxL6fhuqNGpw1t4ibNFIK KIhSWprpZC3CKPzy6N+O4WxsFyYu3RAI5UPoHp9AbOMELo5fxZ3yrCmxRion /UurJp3lw/j0OT1idiTiAE1DdPS2plYEGCsQUlRLjWRTWA9ZYSPkBc0IzWuF Iq8Nytx2qHI7oMrroAGp8jvwPTpux6nUWmwPTMPy/Wos36PA8h3BOHoqFZ09 w5yij718AiPxo7gwekF0mg6Ft07g65XX4PNVN5IXRqB6fQhGzS3ivo/U3mmk gok/M3t0yREkFuYShsFQ8s/jt2igfMTSlN1G3dhkuYAYU9gjliRV+tYqh01P y8hcXLbDmzhyf3//HEF/KdZmEpSNBEbCKmokgVEUKLQjtKADivxOKPO6oSro odYLdSG1oj4EGlqwU5GLlR4x+HyvChv8KOJqCnEquQYqwptKXw1NTBEOvuSN waghTFyecLhNRpGm1VWJyWFs2h2sWXUNQV9QbvJmMDqVWY51RWndAwvojI0L ovzZ7KLME0R5anUo2r0smBi7KZz1+2gamUDpoAC2RhMXYthjwycr4Pmnl7jj GTJaIew/iYGz42SF5O8Ka6k1k/DaqHWQALtJgL2EsX4S3gAJbhBBWR3YpSrC 0oOR1CKwS10EH309goztUBf3Q82EnNcFtbEVavKVW120yJPZMHHRsUfH3KK4 wCVqfZ4QL6TBlYvuXtexmfJF9WcmGF7xREtouqPsQvpdodZd3INwJkj2mll2 voBqnxXBqN1VjNu9l3H95jUu551MBQmluXZ+bNdJPOzh9vwL2LBwAXcsESPv c74HvaUBMoqmcmavBD95YRdJsJck2A9lwRBOZXZip7IEnx+MwdJDsXDXlMM3 rXUOtBWnaeba8jFoykehKR2BpmSIkNpHguzE5q2J8PcoQCYpR9y1lHIeON/q ExFZ33wbh8kTun3WheRVFbhSZBYy3Kk0UhDgE9OQOMNimNSB5gqDSiPyWLo+ kyOPd27f+t60QfEGzf9fahqGhzodu/bsh+jlXZ/7A9JDuItThCWOBykAl0Oe X0Pur5VaFx3342RaB7bLSrBkbwyW7I8lAFYiKHcATI7nyRtrK8cRVnUeWmph VefoNbWKM+RzRqEmubruzICfpxmajHqos8vE9IwZtviYbQOp3noNIfHX0d83 LLizu5eEHIkOByc+j3SUP82wOif2KV3lzZawy/RlsbhZw7FL0fRF056+4HFo 9168/KcX8eU7i7DutXex643Xkbg4AbEvHUOzPAtDFAz47p6Cub2LpFzJBeBj xPTX+qbiY/cIfOoeg+3yCpzKIrMvHSdkXiApXiRpXoKvwQ6/LDuOJNuwO6IY u3VFOJpggV96M/z0DXDZkwNf7zposrqgIXeizjfD2tHpECtzRezBXNDk9vDj gjClNcri4uD01WqJWKcXpE9zndmCcbZ3WJBpVCCHWr5BicIMaqlKFCRRZlCQ hnMjgw7qqVusEqkn38kfp6yyTDN/7hvagEj85bdv4ssP3seyt1/G15+swWbP CfgeuAKtaw8SPjEi4RVftCjzYRWKP9k58yy1WOutxMe7Aqkp4BZcgBOp5HXz zkJVOE6AvQh1+SVoKq6QyDuxN6YM+2IrcIDaIWqHY8pxOLoMhyNLcSi8CMvd 0uDl2wJZciu0JT3kSFqhKbLC1tXjWGES5yB1v9JdSpFjTq6NOfMvPPa/7Trs HAGqnR3VyMsLRUGeEqXUqnJUqM5WwWJQwZpOz6QKUxK9H6dAliYKga+ewuUs RkqFWxfMslYzOcJ5+ObviYgKrYNCLYNOHcS7q1+ivnsC+ooJhMRM4NiRG1C6 DSNuWTkS3wyB6p292PHZVuxR6uGfYiPC343QnEFqY+S6z0FVRCoovYzg/DHs i67A/thKHCRLORxvwlFqHqzR6+MxFfCIKsOKHZQM+RL7yB7BMV0BjspTIM+2 kv+pga2nlx+quLwudeSiIYj1BlIf62xBlpeLoIgZs9Y8QQM1llQUF4SitJCk XKCENU+FulwVGkgTTUZqWdRIGw1kGHVpShz7mwfOxXXhjoPoTtUAswCpBpwV fHEBfFUM4k5exvglsfzkmSnnWXUgC25ePdh37DZCdp2F55oibP4yDLs3J+Ho sTz4ahspMzgNRcF5qIov4VhCDQ6QGg7GVeIQif5IAok/gXJjal507EXveZOK lu8y4rhvB7Hlc/COJ9WEZeG4Vg8PVSx8IuJh6+0T15ZETseM+ckZXDpThLP7 XghKEDFqt9u5uyg4S3NzBd5fa9GjvDAUlUUKVJM2agtUaMzXoDVPAzu1dmod wrM9Vw35Uk8MKppxubMP9XEyXBoecCz6zbC5MrmCJyl6Y+leJ46sbEcvmcPV G1fnzHASNlfxJHMEchBbOoHgpG585G7D8u3k4zfasHl5ITZ9kQoPXysOyytx IKqUd0pkDZxlkDo8E0kd1HwSWKvCum0pOOVN1DD/IlmbBd7RefCKNsIzKhWe EXHw1GiQmZ4k7nGwYYlU8QkJj5ZexDK5qn3Xovr3pdrhd3uOHDkCq9XqyKql NVd8sHgE4+cGUFkgQ1VRKMxFpKFCNZoKtGjLD0NHQRi6isLRUxyOXq6FwffT w+ggXn7F3odWCjCtaXI0xoWIuf4MSnpIoLwrX9HDUngHF65enFGf9wlqqG4h EpRmxZGoVrjJe/D+3iF8vXcY63f1YcumemxbW4Bt241w9zCS+CvhSc07sRI7 gpKxel8w1m2JRbh/C9LMVxGQVgO/eGLv8fnUjPCOSyPLiYV3pBrJEUEYrjOL apC6KWmBs1jfMLmqyw30vkmHIMj+Hs5XdHZ2ctGHAYyBK0/Qa0VuMMyFcmpK 2Ao1aCwkWReGo5PJuUSHvjIdBsojMFihw7GP96POvYRj7T3WVNgL1LCTzNvS ZBhrNs2Y63xPAPvB1QlICr6Knv6zd33nAWGsA6NnKYKaIU+lRDKtG3LDkEBT H8XX/oP46vgFuBwexb5trfD5Jgvem1Ow6Kvd+Pt7K7Bo0UqsWroJ0ZnNCMy0 wT+xGP5JhfBLIl+WbIRPUhoZAkk5Ro3yxBC0JAY7dvSYIxL3fkUxi6UUDO0/ EsYnpUGT1Foi7nunbCHn5+eL/o2Px49h/OwATPkhMBcoCHtqGBKPIVm3i2Ln RsRTS5a7Qi+jFrwR3t9sQqmLAbfbLmGsMQs9ZeFoL9GiKVsBvfwodmxymSLF 70tgH6fLxPG13ejvnRA//54A5ZCECsiTKFXSd3IT8ImrwX51Dnd8KLIQqxWt +CZ4EKv8rmKDex1eencbFv1zC77+aju27dgH133HcTK5CCdSCuCvz4N/ag78 Ug3w1evhnRwDr1gV7JkK2NNCCETJ0z0KG+mPBUyIy2fSdR8xN3rUuWeZIu77 ppRDTBO54FUexUCHCeY8OTITDiNMuR7Ryg1IUm1EusoVRvUm5Ko2IV+5CTEH XJH+ZRzH9i3xASiUuUPl446dbhuwxXU94mSHUZ9B/OhMv9D//U7TgDWvZ6KG 3Pat2xM/EGRubuiHLJ6S/CQ7N6F9snTsVxl5mUfkk1spgEd0IcmuCCt8svDX D7bhtaV78c3qnVi/2RUu+4/gpD6fcrA8nEjPwYmMLPhlZFAamwxvfQxSMyhk 5Shhz5KjLSNILNhmo2La5+XAS4yNcKaLC8VVUCm+nW3a/Bv/qUiOmPmIihBX PaWKMAoDMGUFIUnnhij1OsSoNyBZ7Uqk0xX52k0o1m5GmWYL4g67IuwDBQaz 2qE67o6tLqvhum41QtzXIidgO+ylWtiLCWHkts50mgTX8cCs27GHVicjVXEN F67ceUQ0gigLZZN8eebeID32KTK54wNh2TgSkYtjUXnwjCH/HJePhWsP4O9f bsXHa3cj0MsXR8KiSRE5OJlhxInMLPgbKLHNJO+SkQRPfRQNjZSRT0PMJSPI DsFpe9V0R8N8ulgKJ008nRVnPOJIB0TwC5qYM1UL0nqweU60kCVoQR++GXGq tUhQu0Dh9QVO7HwPO977b3i/898IW/YKgtZ/BffPd2HvZnds27IZ4UfXoyzU FRVKV5SGbEDRCRd63gF7OQWA0lCc6TbdRYucbeuKc6s398JnQz8G+u84ADcw fJFU0iAAjj0eI5Vk4IDGQOmVEccisuEZnUNhkjLc+BysPC7HV6srYQjJJFUY OXs4YcjEiax0+GelUaacCu+MRFQU6mAvCYO9iMZKQc6ez6NmvkQfonykd35j qy+MhT7+7eCXVkOIiTYDIjst8238pWk/Rj3FzATFKiSq1kHtvRQuH/w3Dn/w LDw/X4QD3yzF7hVf4eA3X6LQ1QWnm2vQHOWG+qitqI3YAkvYJlSqN6JcvgEl AetQJt8GewWJvtc8b5rkne0Li8Na/2Y26ivJMd0RCzd+gGSys91HIrgZ7jmV jL0yZgxpOKjOwNFwCiKRBuKJBjIE8jgJWVi2owCa48UIioyBf2bGHE7c8ylH ZkLXQ2OMQQexBXsZCb2E7KCE7KA4lDj2KccGnJRbilejSusAhTpafuFGwqOd ivxeiSbZthr3Gffez1BfnYLKQhmSQ1dB6fE51n3xHlxI1OtXrsDulV8hyWUR rOtfx8XD7+Gi/1to8lqMjoRtaE9wQ2PsVtRFbUG1bhOqNCT6ULKCU6vRmOOL M318oc9sSYCY4xxZm45M7XXyPbeFsPck/LxV2O0RB/GxN0SP/YpUHNakUeaa Rpw8nZCeDp/EdKz1SsOaLVkIVETDz0BCZoI2MmGnISw7Ad1VEeioJIGXk8DL yTeWk8DLQgnxQeLiDTNGkUSKTEZa1yje9+MnU6UsLdGSZmxstozIxzv80lzB qbJHaXYgItVHKGCuxdrVK7H2689x8LMFiFzxFkp2vgHz9gU4f+JzXItdgl75 C+j0+T06U3agW0++PWkbGuK2whqzBaYIV1RqXVCpWIMC/2UoK8qcLmcRT/Xm AZzYMoTBwVvCYt+TMKUHIjxUC/ejCXD3ScHuAD0n5oPKVPLfadxOo2cs8e5E ainpeGtjOlYejsWS4ER8HpSAzwMSsCkgBkdORSI1MRLlRhJxZTjsVSTiKnIm leTbSx0ilhJI8RJuKU9/ambRTg8NDtHiP+/imyLg2GPTxnXQyg+RP9mLjf/8 KzYvfhn+X76JlB0LYdj1AboCl+NGlgvOpL+P3uTX0BPzHLrTdqInfQc6Urej KXEbauK3oizCBRmnliB6/1uIcn8VevUJGK1tiK9qx0lDHQIyqKVSS6pFVdMI +kcuiTa3cUEBmqp5f+IQfOopmDNCkRlLESAgDjt99dgdSPgOTcUhwvdRErxH TBo2aVPwaWAiXnZPwod7ErDMLwprQuKxXx4Nr9AoeAZH4lhAJI76RUAuD0eZ kZyJmQRvImdSFiRKkmU2ogMXA6r0DibTMC2989D8GQXP+3vRssVqQHOBEtWU 9Gxa8L/Y+v4b/JeewIBxh8OQewvfQU/uy+jK3IX2VDfUxW1AvmwZkv0+QJzP P5ER/DlKtCuRq90BjeYUTuXVISi3DsHZdQjJ4msJQkjWIUn0XlwdUnLbudAo kqqj64wwRt7A+JWbQmh6EgMtZpgp7zWnqUjwlMQnREIXFYfdwanYp0zDNmUK Pj4Zh48DEvEJCfyNg4n4dH0iDp/QwUcbBV8VNUUkfOSR8AyJhEdQBAme8j0f LcpzyZlUU5zpN4upvJRS/lBwJlJKKdL3ySuTHp2qAmmC9IATFURz7/3+LufK Hux37DFODJxTUV4oNRWq8zQ4vupjbP74bXjveJ/7rDDyGzSU7cO1tm0YrvqI e6+r/B8o136DAtmnyA78hEjncpgSXZHm8R6yt/0DOXteJ+d1GJGK/QjJJ33k 8XUIoawOgWxBQfrh6g9YrUcitehaVNv4e/rFyIoQuH0Ug0PXhRWTH6C/iTKP ZNKNXkn60cBsCIM1V4e6gggUk0c5HK7DBkUseaMoCrRR8IqMxkefJ+Kkuwp+ YbFz4KeJJQfhq46BtyoanspIHA+NwPGQcHicUJJ65Dg9qRopuRQ33KU7TTMU QP5oqn6c3SZHDK4sKuskmY8zsi2cVXJzrAdgzqX556pRnauFUeOFTZ8swIE9 H3Cf5iR8jqLCHRgZPCialDXeBU1kPs0ZOynh2g5L+jbEub+DDPd3UbDxHcQE bEG09gCUGXlQ5DVAmdNIrQkqauxZmU2vsxqgYGUjZE6h8TZolfnYsqgULTUT uHlHvE3F92FKoGQ8SUEqUsOcqYUlJxy1pJ6Q2HAc0ZEPiogi9ZDsI+PgHZGA dz5OxNFNiThFaiPyo0shUfhFJMNXlwRvXQI8w2LhqSZTkhMkT4ZgcOT896ZJ UeqrpER/dv1IdSGyJ/HM4sYuO7NKcG6zVeTOltvxOnsS5mzSWY6GBBKG2nwC nMtX2LSdt63Y+CXIzf2cOx65vBtllne449aMXWgh39dg2AFb5naYMtyg8/gE mtUfInfTPxEddQwxuiMIS0yEMt/OaijmQF3QQcNVF3ZQa4eavZ3bCqWR9Eim tvHTVOTF3sT5y1eFKPoEGvNSYI4j008ml5euRbUxHNGJGhwKYzqLwlEdmVRE IrxIO966VKzdk4Etq4wIIn7rH5UJ/+hM+MVQ9hxDPCuGMoWoZHhFxMNLE4lT kelIL6533P5LSladlWXQ8wx3BZumN2l6Jp5cmp7JJUR+pkR28oLeuQKbG2gz 8Z4wi0RBIbJEH4IE2V4E7v8aB9w+5T47HvEJmQN/nNvqicv1+dxxQ6Y76g27 YDPsJOhvR2HqLh4K9yIm1guxUce5V6xyQ1PcB01J/xxoS/u5S+7Zy14ckFfg rbfkeOHpPfBaV4e+AfEmAk+gMkoOU7wSJj3v9/YpFTioJZ8XFkeJRRJXQ+cZ ngGfcAP2BBjwxVdFCDmcBP+4HPhTiueXQKleghE+lHR4x2XAK0ZPCo2D2tAA dXolBk+fc8hRGpTEy2lZMBKD0hzmub6bmqS5xQ+cqCnISabL1CTNdHmH/DQG Wk0oivNH5IkdOO62FF47liFBvhelKSfRUR7JjaQ45wTyDEe5490nzuPiKL/s aCVTqs7cidrcw2gq8kVOmh/kxzdxnxlPbkZsnB/ior2515qSYWjLRqCtGKWp hlWOkk8Kq6DX5cN44+1wPPuLZLz3u1xsej8PLsuUTHQ/EbTUW1NNmlKgKkmF 8Ag5pX5KHFBH4aAmGUe06TimzSKXlk1mlAufqHws+qIYPnsKyEyM8E0qhG9y AXyS86nlEZfOhhdpSk6uV53TCrXRhozKGoeWpCRZTPyle23fzf9JFfSwEwX9 XGAWp88Mwt5hgcGoQG6WAgUGBb/5nKZEvl4BS3E6Ohstq53oU7rFNrmEPd/x nf1bVuK468eI9N2OooQgVDMXWaBDc0mEo6pioDoaQ5YYjNhihPcITfYa9FQp MFYbjZGaKAzaIpGU4AG552ZerwFbEZtwAnFxvlCXnObeC6s8x1VThJnOz0G4 6RwNddeeWPznE1F4/ld1WPN6P1Z+eAbvv5pBsrYJ1vc46ig9LItRwi80iFJ6 Dek1Dgco9zmkysJRdS48wgrgGVFEqX0x1h0px84tVfCTGXAwKgs7NXrsVKdg f0Q69oWlwiMuH5qifmjIUWvymW5LfyBRqSh46e3mxLxncivs0alalGZAjzjR 4tNCfDtzdgDm6lTk54aiJE+JSo5JKGGl6GQ1qsh3sX1sIuap9FmSEqWxCvTW Wb6ZplVnqyK8Vv9rxiBpSpbxxC1dQxEmDDWk4abiCMqwIynrjkK/ORqDpOFh K2m5JgZ+2mEMDd3GpTwdRknDw6ThljIVadgLcu8tnDazTm1FXFIABVB/aMr4 wpcw0yWEV7N2Gbv2JWHxHzyx+MUKfPhKDCo+3AOfHb14951RbD9GDCe3hK9c eww1pGF3vwBKrnTYE5JIWs6gJCuHNFyIo2ElRFrKcDiiAK4nsvHNuhqEeudg pyoF7qpk7AxNxE5ZPHbR7w4qs3E8vAgyQz25+RZy9yaHXUn9qvT+kOLd10jN T82sV9HGWTRjvIetMzwl2O050mtBnpzbGa8qYKUgStTlKym0q9BMWUdLtgqt pN8WimvNbHecdFzDlBGvQFNOGs4PDeCLGZR8114su/lQmwUtrLVY0NxskV6G MpP+5wpJeHOhnmeIqcQQs7Sw5YWjsSiCstBIdFZGodcUjX6y9kEr6dwWjZL4 dIRms3sgDeNsuQJDtiiYcgORmOANmY8EB8kB0BmLuRIT9tgXWkX6zyT9h2Dx q434cMs1fKO+iJPPueA6MVF1Yic2HSczLGVKqvyZgIMTFB93UZK8i8iNe1Am 9shysV9VhEPhZdgemo6t8hRspeT7g5W18D9iwmGFHnvU1BTJFIfzcZwVEWly cUxpwNHQZHhTXFaXWmDtaofUzMXMYvr9O6Wlz+JdainjeHIqLqSJ94+cnPUJ ATFdHWYU58u5fXpzoQJ1hUo0UWsrUKEjX4VOal3UuoXnTsJLew5hJUvJVVDU JitQHSnHOOFDzItGxwbR2GzhXonXnM6AmXkCPMWqpexsBfKNFDQMShTR6YtY 5RJ1kUcw7Gqw3MUC2KlE/3KvgJ++ejNMsTSdFKJoBj7DqC/UoaU0Au0VUegi X9JLvqTfEo0BwtAgYSgqvg5N3RO43lSAAYoSlXmBSEj0RmzyCQ4rhlNbEJNy ijve4JePj971444XL+zBp4duYblmCK4xdqxfcAADW33RXFYIN4UNJ7Ps0FRS aC41ifiRZZRBbmgkHFRg+8lM7AzOg7uyGG7BqdgSkkzY0WOrIg1fHSxF0IZS yOVpOBKRT8S5Ej7RZfCOLCbynEdcLov8iB7HNTHwoYTJQvh5WKJpMfMRb2wh VhMI5fLSv+8gJqxPTMWQNDN9dBqG2MrBYwK6zpNvKc2TobJQDkuRAvVFSrQU EU4K1egu1KC3SIP+Yg0GSjQYpDZQSq9L1OgrUnO4aqf40kxsoUEfCmukbL5A KNraLag0pcFIuMgjQuHABCMUKUQoiohQNFhenQVhjqs/f4DOToujMIsFtgrq 1MSKs4x8cZYlQ4WqZDkSAg4gYOdaHPj6I/jtcxfR9YBASSqIs5kS6Kdpaj5I 5evQWKwj50TgqoxElykKIqnvs0aR9V/HlbHLREuiUZ53iuiGl8hYDn/+W+zb 6YaPFsqEnzyINTGDWBduxTqtFSsPpyN7wQ7cKUzD2iAT1gRUYI1vCbbJS6Cq MMEBqFQCSUYjtS6EGgZxLLoBO+RZcAvRY1NIEraQQ3LXGLAtuBRuX1chPZiy sfhK+MVVUCujzKyEgFVAADMS6afsLDIGXtpQdOSkOKiCNCsTnZQ0lZ4FOT92 gpwfCyouzQ1GZYEc1YUiatToJLT0FmvRX6rFUFkYRirCyKVUhpELHKnUYrhc ywGop5gcFOmxxRiKJr0c9lz9vQKHOXt2ENk5TNUKvgaPVF2dwzgMcReKb7ZM eiYQMbJRkUgcJkaBnlrLS7MD6T5h8jYrX19WQlG0ki1RUhStYTVmBCYTuYjk gB0IcFuCgC1LoDvignyNJ0ojTsJCLqnZmPqg4KXODw+inCUClFNXZWoEThvO gamFwGSviERHFUU8E4HKzOcu+Tm5KKifwJ26Mthrw+F5dAk2L/s99i97FvtW rcfiF8rx/vILWBZ8ERv1hKRIC9brLHAJt2BDmAVHn12HK0ROAxIrsV5RhXWU Tq4LKcHagHy4+RsxMHSBCyPi5qe+uBbyVOku4Q9xQJOHQxTCDkeV4mhMGY7H lVO6WI5PP0pDuGswgg4oKUSWwT+hhNLKIkor8+GbyNLKVPjEEbIiQ9GSFILL owMOdElpj3hvomk5vxDepAuYIh4fdwIwPuQ9hF4Kb5V5fPlHTSFRGwJYO4Gr pyQMAwSu4YpwjFWF47RZhzPVujk4W60jKz9jprdN9DEBbqBcg24CWzvpuTVL jkYa/EUa/DwBDxZiy4X5PB5MrN6QMSvCA8escnhm1WLkWVUjOZl6Qp4tmdAX R8wqO/W578CM5gu0vY6gV0aBuoLMxcSVEBH0skNh0BxE8O6lCNn5OTKCdqIq xht1+lNoY11ToG4kr1mfSsE9IRT2HAcEu60WlMWqUK7XoIICpTmXkW4KlgTB JgqWreURaKskKFbx25V2SwROxA7j9MgtjBIJP3p4CTZ+9SwOrH4VS1dl4OM9 lNvENWNNhBnrIqrhEmHFBp0VG8NtWPXuQXSs9YCdAuNGDo5muGgJhuoSrAsl SGlLEBppJgie51X9lCMt5ZZbmnogSyI0prRzr4+GlxISiXyHF+BIZBH5PAqK seTH4krx2YJ9UCw9jnyX/Qgl8n2S0uYTlDL7p+TCT5/F1c34JEVDnaCAPV2O lpRABxKlKbN4XyTpwoZ4acU0OEpz5Cckp2IxmMHxhwIcK7KDYCIWbmEYoejY WqhFJ0Gxrzwcw1U6jBEMz5KUz1kjcN4WMQfjtgjS/jkrodMajtHqMAxWadFL kOxgNRkUz9oyZOgsThbY8yOosegJinIKxqGwiISugCd07QKBY0SuK48/7mBb DpTctVB0rU9ToDYxFK25qc9+B1g+KMT/OuqygmI/qyKsypdBH34QAXu/QID7 EhiV+wj9RN4KtMQFyPC4RhZVoKHu1QRHBlEFmtNDybLkxAX0DwqEt8tmQXGs GiV6Lcoyw1BFPM6aH47aIh3qS3S8Q3oKTSaKwBYd0pIzoSuawO2+boQd/gz+ Lh9jw4dv4N2XXsHbz7+A1Toz1hIa1+tscNHVEjLrsNojC4mvbcWdLOLh6Ra4 RtdgYzShNoqhtxzrNQXcoqgi2Yq0/CYhm5qEJmshsdWQJfA34BPLjA6G5VIu SNl1ZAGF1EKCZSG++tATodvCkbs/CPJTYTiZkocTqTk4kZYF//RM+KalwFsf jYosvs7PbgjBlTP9U6ApZuviOrR0NeeJmSEp1vqyU0jLEh0Lm5ws+V8+iF57 FaqyyWdS+LTlU4wnVbUVh6G7LBwD5A5GzBE4Y2EAjaSocKE2kn5zsS6SWgTG awm8NQRkWziGLOHoM2nRxepWKLjbs+VoTgsSlp1+hNrqFJSz4lNCqpWjjQQF MgpGG7sE2thXzFPH/hL+mVHGHvqcpSVthNqmTKKNyeTVclP/OC18T1sonLzg SXIh94NcfWApWWVC+F4c378Enrs/RapqLxpIAx0cZsPQU0QTKQmnXw+UhpM5 DpSG0YC0HEth/LY9jw1GgdYMivCJIbhE0YEH8a9wbngIeQTighQtigjE5dnh ZCM6VBOILWU6TgU2QrCV4k41mfgerxZ09E2gI4ME6KOC7/4DeP39r7H0WDRW hxExDKulcF5PrREbI5pwaPERXPAJRWaJCa5xjXCNb8BGSmY2xtmwIcaMnXFV UBlboMqohTLZBEtjr4DiJx0oNtcNEoobeQSz2qzQTOxXZ+FQWDaOReTAMyoX PjF5cDsSha0bghB0KprQmyMUAhlYWYpQj5UMdUYk7AViPZYcZzpM4rKEcDsA SZSfunY1C4DFqzbEFSuHLu9eveT5/v9BYVSx423W+u0mmLJl3GKWLU+DRlKu nZTaU6HDICF61BpJyI0iBEfhYn0ULrHWEIXLDZG4QO18fQROE7qHCdn95Ie7 KmmSpTRJCv1txmAMtVRxiVA5sY0qIRFqIES3EmI7ChlfJUpLrn6QsY5yorTE a8nJMTo7WMaAznIlJjPmiskXJstYXTJn/NMu+xb/6OFstV/iFYjSGCo+i5Xu UsFJ3fyRXR9hj+sXCPNwR0WOjCKIBi0krQ4yhW7BFAYIukPlOuJP1Cp1HI8a ojZQTsGMiHtXkQABMos2irGNiUG8yn+JjiYbsohx5BDjKCDSW1wYjlI6ZRnF QPYoId5VZA5DoUkD7+jbuD46jtM5eqwILMTK0CqsUlqwRl2LdZoGsoImbIho xtr1GtR/eZCoXSE2JbZiU1ILtWa4JjdhY1IDdukboSnsgTqvHWpjE9TpVihT Su6yBNZSsju413tPJmJvMCvOSsdBdSaOhhlwPNLIpUl+cUb4E6k9kZxFPtxA VpCJEwa+FM5PLIUjJmUvZsWTzP0RSHIDxYUYaZW5WNA/7Qab0wjGXbef5HF/ zxTlisc8M/0NZG4GDHgacNlm4t45Q3lRhm43ooPWIC7EBSnyjchUbkKOZjMK w7agKcsHvWVynKsTTIDgf6WRWhOZAbWLdHy+MRKnyRRGanXoJ3/VTQ6+XXDw bQT9sfYqlOUEcTyAZXU86Sa6UkRxv5iR7nAOLKOVjGHrCIyMes+n/9lrer+K TKRCSyAiflDE13S2ZsjRQH5VXIO4G8zOr2AsI/91saZFiAt3G830Ber7nHsU 8epr9pi+UZhtSEKp4SQOvR6Ni0ExsJHra2AXUJCtdBGN7ivlC/qHWNykbG7U xFoETZU8Dk1/iEhfP4mju4zsq1iwGSNjdcG4fLrfEehPnx5CW3uNJBN7Gu29 NWjvq8GZ8/yfTlz6TgwqWyYw2NpCZKYeKwOrsVJWhzWKBqxTN5OxtGDV8Txo XnLFraQ4BOY0YVNyOzbp2+Gqt1NrI2Npxqn8XmhK2EXQzGDsZDD1UBsqYWnp FJZ8ZhDRY+gf5JfYd3vFY/fJZLKfFK4Q6Yg6DR66dHhHpRMXSodfIjU9tfQ0 LnKwQjtW0ehj0MNUEoUO8gV2Eom9jJBVpmDFdVNWMcW1LfEPDEivOGecyGEF 3Egf+RZbmnanB5FkzYAu/r1nkZVzHRY7JePdrWg8ehj5hNT4gBVICV6L1JAN yAp1RQFZVln4VlRFbkV1tBts1FpTD1LKGUoWFU2WRa2ZNbIuaufJys5QsBmp I9hQoOmhQNNewQIN0aciGSzZgahi15BQ0LGSZdVLcwhmWeSKmVWdqY6YzCOs /PNZ4sinq+k75F/7Ka/tpqjTziwshwh/WghGm013/U2zmWQg1kdlRVcgdmMz rhkLMFNhrHR3YPrlrey74sLC9BDGPueuJMiVYe+B8zg7chsjCRRKClh5sQ7d DtPizWrMTJ6pmpqF0dLTJIH7Oao6SF6lh7xNBytkZ2XJeaxKXIbTdhO/DPU9 eK/wRbebgsjLBZwfvUHMNw8+qR1YGdCI1bJWrFXZsT6sHdsXHcWZA4EwFNso tHTPgWtqN8FqY2oXdmf1IqzqLMIqxrhtYE1JP0WcTmjymqHOscDa3vO4I4JL buHyKPz8I+HumYzdJ1Kwj+LNQUUqjmrTKNakwSsujbuOxjeVnslWfBjLIlvx zkyFtSyGK0ZtZ8WolSSTSlYlSTgpC3Z4SumynVhvJF3wnX6bXCfWIt1IeHpy 3M64mDOMPIzsymruJtS3+/owrPJAysmVyAhaBwPZSJ7SFSXazZx9WGNY/d42 NMZvQzO1FjoeKvDj7GMOrrREEzodNkJRaISi0EANuU4L2UgV2UgFzb1UjnL9 MZgIM+Y8JZe+MKLHpS+lLH3RCekLkT1rJPHPmkia6YUalrXQ2zb6mLKWQaIf PWQiHaUkUsqd7UYZGlMDH3FMf9Zb283H8Q9tuJOY7IC4M3P4nsRc2OOAcKcy MSBNBvJ/R5UhEOYcORIV8VCxna7+QfSQ2baXRKCHXS5GJjBiisJYdRTBn8Rj jaIhnqX/59MxmQdNd5ASjF5yDZ0VQqE4M/18OSXngQJcnuKuCde/cxB3Sgrg EdWCpEpyb53shiwDUOSP4FD8AFYru/D1Gh2qPtqDK+UZ2JDYjw0p1PT9cM8a RlDZeYRXX0SYeRxhJnZXgjFoyoagKe6BpsgOTUEtVDlFwg1BfgxTahDMGQqE KyOx0zMF7gFEueSS2lUygeNkAp4ULjzTqJEZaI0pGKpmO8JRREDIBGhedtIZ V69qJiJSESyuOkuXFkXvI73BqbMrvh+eagHSxWyJBfDKZoSAPcTzObT2LGzV /EpMQkY6Ek0TuDk4ijHtPhhPrUN2yEYUqjahQreFAsNW1Ma7oSlpG1qTt8Oe sh3t9NyeuA09GQc56F+mdpHaeTKA0wL4+4mCceA3kzaraNblcuTHuHNIYUWa LMtpImfZLmY5jHMQEs7ayIgoy7kgyXRY/j5O7SxlOKNkBYNE7XrNFFhY8BFW mlqzgu66YMnxSrwf0a53i1Dur5y+VuQM7WKRKbOG2YPt4zAZCCXZoTQ3FUKC K1HbPkHBs5wsNAK9hP5BQv8IQ781mqw4Gmdrosmio7mM7gzNd9RG36GA2Etk s5MoJkcumHUXE9fKDxINIGZtIC6FJiG1sARyow3b/M+hd5DiUGEWFHljUBWe g7rkAk4974IbEZGIrxzEsdxzOJZHoLdcQ7iVmuUqtcuCEbDbc5yBhhUHlfZT 66DI0ABVQZnDALh64tRQoZ5Yi/CIWJzQJHEXhRwIT8OhqDQcJiNQpuuRkZ8I a2kcTSWaDJoZANsciICdjNtOULBbSV0WBc4MVE/fdmE+Zf60XEO4ct7ZX6L6 wcw28FMnzo96kdxf77fo7jCjLJ/fErRRJpyemIGyhiFcHzmPc/HeyCf8F2t4 x2+LcyN6Tw5fT5hP3Y7OtO3ootZJxx3J2zBc6Mfh/4IE/8MM/zU6dFlp0hYN Z/WtFTLkR+8mnChQnaNGTZ4WTZRctlOu2kuBcojIwRjL8hn2+RRnLpfjPMAl +Gfr6WOC/xDBv494Uie78oAl+JTFtOUFY7it6ofO3f49Avalrn7d6s3IOqae xP49TiPBNDpwj+CnTET/zVkKmI1qWHK0CEwcxvjIdZwlU+6lNGKIHN8oOfrT NhYbGdgfpGlFc1M7Q22MFTsR5+sjXHQR/7FTMLNXCFy6OFjgeT9BmiwNzYT5 ic5GhKQXQJ5VS7i345R+AjeGTyMjpx6qovPY/ZEnBt18MdhQTZi+TtimZrkB nfUGwm3X6Zlhn+H+EsKqL0BrOkuOfxTaCsJ8BbGg8kaoiitEyPc3Eq1LkvM7 9OlaWIzhqMvXobk4koYYRV4nCj1V0ehjlR7maK62q59rUTQlgjxZsp3osd1G 2q+haVkVOD1gfkwCeZHEi/dLli7ii3+wbRbci9cqOLvnu3SfaY4QMBwrP+Tv rQSYRoqubUQ22TpIrm2Y2wI+b5BzZMcUtRU1RHAayce3MYynE94zdtC5ujO2 kyK7UrehI8mNSHwoLhDezxHhGSOADtWRQonwdLFZW9WcoYv3GbJk83hvLg4X CPUjGCJfz4Bwro5sp4HiB7VLjRRLGtkz2QC1s3TeMQL+EMWSPvL5XSatcJ0h AaVQhtH2Kk4ik3+IjD/7/Bk3BdLUQxiUEf9pynPc9n6GHdX7BXdy+uwgt9lf UZmOjHQFMlIVqCpNh1GzF8XxfjAbyAqMWujDMxDBVvh7uzFC1IVRgBHyhMwK ztTEUPCKocnGcBNmVjAqlPz1UebTaZ5+LVHwDx0Tw5O4de089GU1kGfWUWvH npDTqKEgM9RIibPLEeQu3Ik7RUQ9TNcI4Tz6wwn9OptgATb25zbIAqyXeQsw E/WpolzANECtC5qqJqjKKn4mGnhsCMwJSnL8GjL0MNTk6tBYGIHW0ki0l0eh qzKamE00V+s0h6JWFAG5h5DfTTrtsEVwu7/2WppOrQqt1lDHppP0jmMihr9D yecjU1EvXXrlbyn/4hTUs3fqzckwCYs8dZSK8lv3bOEmDEPlYYg0tuHC2DUM 68JhCdiMmoRtaCJm08Y8O6G9y7AD3QZCfiZ7TYjXu9HrAw56P0oefpDS4F6a aQebqU2NNksoOhtTYEojep+p5GZRm6/lntlFkL3CPvkYKf98vYB6hnZKs1m6 XeHni2GjCmcJ+WN0/iFy933kR7qI6XDpE0shSgj1nVXi1dvfXrA2FzGybrR4 N2DCbplyYe7s27mPoqPTguwcBfJylSjKUaI0W4lyoxIVNLWKdCUSPVcg0Xsd Erw3IFfnwV0VoA63oblrAtcaCokBRGOECM9YDcM7tTouGtD/87nj0Voe/73k LjspotmryXFUs0u6FGgtDxbI3MNQrQrgAXGun3unuqUX8jSKBOl2hGb2UmZ6 FpfGrmLdr3+N3f/zX4jU6QnTVwnn1Ij1hJH3n8uhfz79f4Vekw1YeBvQmIn+ Vw9QoyhgpihQUS4UrvwIfXXVMMUoYEqevBSEXanDij6ZIdjJEDoqKRxURXF1 NV2U5XdW8wbQRg6rrS6MmoaOVRgbskj/hpO4unq/ExuYvpLuFPb8XTJfcMC+ tMiIypxg7gootsPfUEj9Fmr5rLI8HCNVOlSEuiMkxY4zYzdw1ZCIFiI4zMm3 pu1AO0G+gyDfaWDPRHQI8uyKtbakLRgyyTgnzJGaOspoaV7ttXT+GiWaLHJc HB9AlZ4cRroI+TAB8hESyFP05yAfg4tNMbjUHIM4nyjkHejAeGYWD3kWRATI d1YT5E1C4lAmw3Bn5V13Wp+5yI5hvhFle0nI9uYpKz8zXUnBE8nHcO7cIPLy 5CjMV6A0n3BOjSUrViL2Ndkq1GZRy1AhO2Ar0jzXQk/Y1/u5Iv3EJtgMIVBn juDiyFWMk8sZJt8/Sr6fzf00h/0zHPZPE7kbEbDfY9WhgwKb3arlgyYF1Z6G ycKmZGJA1q/9JAnI92Bu7oGM3SArtQ37/VPwx5/8Fp+9+Bb2vP0ydr/8exzc 4wmNiTEdhvPLHN7DbZfn0H+XOBMg4m+9QB8R+bechcY6So1MwNoBtaUBNsp3 +KL5R9CQnYbKeCWqKA5UGcJgyQ3nKtsbyQRayATayqlVkCkQ6bOTqtuI1LUQ 722uDUNLPcX7OjW62zPEe6hI10bFP180bWPhiZkx/5/c/z/kznLQfS0igrZw m8A1+Woi0lq0F4ehh7A+SGR6rDoC3bnByPN3hVdEOwZHbuN2aSa6oregiUhN a/oOtGUyUtNGDv4htBLeW9Lc0Jy8GV0F3hgmMjPA3Hs9ufc6LVprqQ+bEu3N qdJFJhb6bYzHl4i85kkitlGcys8S3MfJu18guJsTQ/DPN6wILZ7AeFceB/dR gvsgwb2XwZ0lRxZ+daAiYx8qzWJdoRIF5G4LyLTy9ApkJynQ2WTB2ZHB73KL BfFmGEkujbhRYJiy4OPkQpWHBCM4f25AuEWZAhWFSv52QPkq1LOyoVwVmoWS oVYyhnLNQWSSIWR6uyDjpCsMgZuQG7wZqWHJSKpg6zMtGMkN4SqhRykQzOVk M59z/iM1kRggZ9lDKU0HMUd7DYujxEzJqYz1mx1GIHtpO26mGuFIRoihhCRU Q57cgn++tgy/e+KvePvP72LNc69h/0t/wvGDPmQA4+TgyckT2ZnD4f1BhNnG qZ2nV6xRCmCh1Nc6BjUxYE1NHz23Q22tg7W/X/hzLw+jPicdZQlqlKVpUUFM qJosgFX+1xeRFZTq0FROjZxrE6UyjWTM9TSPenKQ9QSamhoVgXXQsT0sveWN eM+v6XeLY7fBYtGA7TpPswXpxsCvhfcKknwQcPArBBxeIZDtx9FXqaMMLAKn rbzvHSiSoSBoM4541aNj8A4mrIXoTNiBoH3vwyBfgSai9U2E/8a0bWjQb0V9 EsWFjD3oYws45O/byZBbKI41UByzVYfyI38GjQV67vTmDLKBXJ7l2Mnld5v4 btkVLczhnSOWc57sYNfXudiomIDVXju5kVDPbEBHCCAzs2mJsR2FMZ7QFLUC ZUJpJFtTsRDarEIVrJld2pFMdCROgdqctOl/CMHZzpl4d6CAJXWYSIqa5aKe Bzjwl1GaVFEYiqoidlcmpVCkRIBnFUHUOvLUc7nyoAdh8FgDo/d6ZAVsQFaw K/Lkm1As3wy1pgwdvWRuNQbuSoAhLhUeqWHYZ5JhV4MMUQDoJ/x3kQTayWPa KajaKai2EP7FawuDVpzA6BEdJvhLnEX4b3VR8BcGLOjC8/9YhddeeBkfvvA6 fBdFonrBbsRFWcgECOLVZ9kNWcnNP8BD3nqGXp2mZ+I9thGC/RDUtQPUuqGu aYXSUvOMkGieHRhETU4GihI0KCb0l2XxNU7VhH5riQ41hPwaQr6NkG8l5FsI +Ray4Fa7AeMXBn8qyFy6wsma9M/cSP/+nrjm/9i3gf6nqMwIgtkYCiUFXz/3 Lzi0ddJo+kwRFHQjUV/KI9Bbx9ZsA7D1qC+2+6jhG10LlSYLC9/5FKvefwna Q++jhrJZG3F7a8pWWJM3wZS0kfh8OFrJhhvJhmvJ8VssSmbHPPB/g17ihVVx oVwXbPWDPVrLdOgS6hDZBR7MyZ2hAKA5pMMXO68itWmEjICSXWqnGZeq4xdI mysDUZq1C7nJ65GbuAbF6QfI1fIVmg3kapvI1TYL17w0CdWZNSlKVCcQPwkP QWG20elO1vR7dbLvHFhkxs0Eg+M7/FrCQ/ziQL6MKwsxEeKtRUrUs33xQkpp WB2cUBvXy1qRdg76KI96CBbdEWR7rUf2yQ3IFpGv2Iwyalp9O66MXMZophz9 VrbYEzWH+E4UEV52+UIfc/o0+w7yLnYSsp1oQmuNAqODFn5x+2doNLeg5JPj uGkuErNAIa9r4a+IerUBn++/iX3pVxGSN4KVbsfhutsT61YPQ/ZBOcwL9pAR mMgIxgSST80ySuAn0FvI39t44Kvq+qn1UOuEqqYF1sFhIad8CB31VuQkapCb rkWhMRwllOCUFxORJmVXEPLLKWkvs7BGeeWQTfp340SSf9+3I1y6gyX+HYGq dKLyBnI+RjUSQty52Tfky2EuihCy40dwKjoKR4Pk2HHMFyu3eGHlJ5ux4h/v 4vPnF+Kz97Ygeus2ZBMtrUjZgvKUzShJ3ojGGsrlyUarbRo0t2UwO528dzqN pSpFheosDUfhxQ3AXgolAxRKmMcqjQvDh58NIqDqDnqa0wjiPJxH6/g1GntV EAr0G5CfSk2/jiC9mqCkRDM5zzZ2KQWr6KQ2B50E7vvQQb69OVOBFNkx7Ni0 AZtd1iHc6xClTDbBId8/4w7VljdycCmq5BFhMaHBkoKqAkq8yW9XF/H1q83s zluE3i6hSk64RfxgWbi4q2v03wBj0EZky10hD9gLD98jWHlIiQ3qWgREZGPl XgW2eWpwODASaSmRFKDIXdfwyG2rD0NrPQmS4mKXffJ26L7Pb8H1GOKs1y4I QnwCe1ZEcRfxfbL5Gk4WTCChdBghsS0I0XcixEB8PrcPoQX9HHxDPqiAeSGD bwXUJoKpaRBqMzXKU9XWfvLTfVDV9kBZ1w1lfRc9dyDd3iOA5360tdhgt9cg PVsLAynSSLzYWEbBtcGAzv4a6TqhyEbE2/ZOW3l/fCpSpavsfGdP8YlfhpJD ap2Q+Lke2I4DWg137BfL++Kg2CgEx0QhhJq/SoNly9bhH39aiGVvf4w1b32I g8s84eFSCI/PUpD9SST075xAyrKDKDjkhfT9h1GaGiOkDL9Ct60a5XHEDtL5 5ed6Ui9zwJ2V5FYoC+kntC7+exF26yfQ1pRH6GQJFyGY2DZj3H1E7E3Zu1GQ xpC6Hvkp61CZeQitrLqTHF4XNVYE3FfEioCVMGiOY9fWDdjquh6JIUfQkCFz XBBUGyvDxeEBgWrPuJYoRroc3TDGlNWYGBGvpvsPjJ/tR1UeGXwBf+dNKw2D y98JuZ00NXZ304FSvqCNI1bE70YrxWPCYUYgdxzhvx0bPb2x2dsb26jtpPbF tmwkJNXi6yVyvL04ELu8NOQ0InEkIAIyjQ7FhXyYayB+V0v5zcULgw8LBuW7 wg99O1W4098o/JV2JRb/rwEfrriALfE3uD/pJ9bKJmd3IzihHcFpXQjJYncy 7yY492DdqiEEf1CJ6oV7Cc6lUFX1QmWiZiGPayP41jD4dkFBMFbQc2iNHYMX L33gZLlQvI8+u6xn+kr5t+L0flQmEU7TFKg2TOJ08wl/rD52BMd1WvGS7JC4 KMjioiGnFkrHn33mixf+8jY+WvQ+PnrtJXy1wR3b/JPh5pGMjUftCI+aQIry GrL8x5C3r130o4VbeCrA+xv2eAC1RsokktSENC2seWFoIIfEUBvqtQ5uSxOx 5uRtZP9/7X1neFvXle16TnPaJJkkU5I3mbxkkkkyntRJJhlPEqc6tuIqW7bc ZKtSpEiJpHqjKImixF4BkARBFHaQIAGw914AFoC9kxKLerVlpeutc+8FBcmQ wvf+vsfvOwIIkZf3nr3O2mufs88+k/MPSR7yH6TAaN7F8JC02lW9XwJrnX0b 6gjYFvseCawzIludzniWEXC14RT2E6Q7CVJ75gnMNWqx1CanJp9ukjcjjVM0 jdrS4MpTexZE7zMJ6JlHKUqbx1wiVfNEp4LXL2Nh2gGHsmmll8TuasySqvJO Nhkxx0B4QSRfMhA43yV3gkgmu+T0vDdJc1HiKygiGtujFLzGyHj95vdVeOz7 FXhjVT3W/aII+55VYd9raTjgr8XRXZk4FKCG7XgUqo4cxVBjk7IW/rAE0Mqn j+F2RxPyNfV49j/y8fzaS9iadRvNZ27LC1cfR0ntPFKKZ5BKnKoknIqzDGax dfMSUiWcHkZBXjMynMRjL1v/LO2X7p5lV6Tx3zTXNBbffhcv+pjL8z7W0zOX p7h6zzSf93LN15Q7H26ywlFKYFbokGSSVeWJHBP2piYj6GSkjJ4fQ2M2I724 COmWIqwLNuG5fQMIiMlB4N6dCE9kEJibgzijCfuS1DiWkI6oqGOoyA+GuqwX hZW9qCiTj58y5RCwGQRs3EXpe9VGi/Tqvy4d2/zSEByixradKVgXEo0f/XYL Hmfs/dQb08hnjDxD482KJbtesbJJvqXiH+pOQT09fg3hWWXbhgb7XoyRvHrL 1TAlHSEkgyRIlulOYL5Vh0s0/qVueVeT2DUnEowX2sQWJp20hWmiKh1jpRqc H3Yux8h/fbJaTPhNof/4MG5PDihA/Ti6q1PgrEuTUm1ESagBsQLVaMA0Y/cz 7aKMsZz1eFGJWC9LqVlXenPkTv+fOEU7hGdqOeITEUxmDSVa9xCl3/leIR79 UT9eeH4Ab6x14cihLmRTMejT+xEZ14OTEV04ub8F2h01mD7lxMT+agz558L5 qhqNq2PRG1aAc4VtOKOvxqRGOqSOjmvMc3BlWnwsfvKFz+PFv/9fyHo9Cs9+ JwPPPTOPDcm3UTd9+2ElQLPULiC5aBYpBHNqJQFNMGsaZTCnrO5Gz1NhyC9o RhqBnNbH/yOY1SRc6+RZAeI198jVOzrggRj2npH7mvLZmaEeOIrSYcrWKHT3 G0Rm5yEmrxAndNnYGydvTU6zWJFutSH0lBlP7x/CtuJxpNtLoLEWQ1ViRrK5 AAkUCEc0idgfdwr7jh+HXhtLutTCTdk4SLkoSWFGQ4OMhk4V9ME/tVL67PVk N7YmuLEjqhdHD3YiIrgRq77/Bp78xq/x1M+isFPtxsubjqIo34gxAnmcQB4j iEcI4vqKfSgvDURJUSCK83ZDmxCGPSGywy/VRkq7KC4K4IrcrJ5sXO3NxhWR w9gj5yxecBiw2MXoqN2z8SkDkwx9nDkx99sO7kl3G3SeRfVOMsjEpILbH0p1 cZ216cSuXMpM+Ksxkuu0KMEtUgpFpq6UTpgrPbrIpLraL7/PKdWz22WCjcrN JoSzcZBRwrajyXhidSFeWdePHz7Wh5/9pgtrNjWRfHMQbsxDmCEHOwydOJI/ gIgcN07q+tDluo7Mptuwd5BE2ZwtjL/q/4jx8puYKrqMGaNcdm36VA8mDtQQ 4nnoeU2Dxhfi0HekEI/907/g2X/+KlZ/fQOe/fUYXo/4E7Q9tz+qzLQsXLiF 4hYGE2WzSK4mhuvZmmfh54XfnILmh5DaI/jXuXR12au/pIwU7xk18YmngLSZ bLlhw4Z/uD90fZ1d9H5ZA4i3/4TO/HQcSE3BYa0Oxwy5OJldhNhcKxLz7YjP LcHuuFREZxcgUl+Bp3cNwc98BinVdB0V5Ugrs0NtsyKlxIIIYxrC0uNwKDUa B2IicDwmDSMNYi5JZI/LeJ5mlK82iLAoPEOPbyA8TS99HpaoR7K1HQeNNIjJ jR9+4xd48tEX8dIv1yDouefw+hOrEBabjWSNCf1OE/oYjHZ165CpDUDECT8E 79iK4KAAVOTGcezopIrhona7SPG+TABdJeFdo1gWW6XEVr5rbFc4Ji72ihlE I+aJ6aHaFJSn74Hx6JtQha5GSmyEB8OendZZG4bwx8J0ZXlC1ujXLy0wglVL 2S7OGlmnD1D1jDF+niH3zncxYhRpsT0iHzBPelyREXXNJb+Py9cjNl8WDTF5 ohh+IfYn5ODJdZXYSuEVa3YhwmRDnK0D8fYOxNnb2dro1fugqx+Ta79VDkJr 60dGoQOL564ts1v55J0TzzzqLINBmY0YbxI4b70Nq6oXT33vN1j7/d/g1Sf3 wX93JupaOj2lf+Yv3kLX5FXEV80ggbhNbJrF5k1LSF7tIG6PoL6sC6/dMwMm ssC9j2URU7x/FaHvPcjD87348jzRzPAcBjNrlJsT/z4OM9XCgRQ1DqebcCzL LBVjiM0pR2JBFTVQNZKKyhEYqcVTO/qxIe8skms6kVFVw1aNtMpKqMvLEVWg xzGjGuFZKQhLi8MxdQpOJafDnptOganDGYpQ8ZWZq+VA0LMZcDKLTScD+IRa z1BDD3VpB60ygOOaIjz2g5/guV/+GptfeQnxxyIQdVxNstdjX3gEDoVvR+jO rQgN3ojUSD/kJG9DiToI9caD6CmJwlidmqgRyzs5BCqB68rFDZecKyh2+l13 i11SOQR6GlryDsFw8g1oj78Gc3IQGgyH4bbG4uJk9/Loj1wtMmFLvZD7UcyP dTGiJXKrtFKCU59AbgO1ukAu2Xee7HvOmctBkgsl2/aaW2Q4xedql2EVm0+2 yLPgQJIFv93Qhi0ppxFWOoK4nFKoiI2HYGifp6kM7WegbzsNfescslpmoGsU 5e4IXwFdaw/KmgbfcwqW+PLkdPV0dOIH33wUz/70Cex7+Tns/O23MNrX+RmF z8J3XkESIel8Khzv9I+9qnzsPUPlVWtDfHkmqXwlnn7ibrB6T81KVOBV/NdX rvWHcGJNPdwH2lC1OgtFv45GVRAjh7RyOKmBPqBMuqkqG7E/nkpfnYejWgsi DWWIyalCQmEdki0NSLU14qlAB94wXMLRonqq85pG/AhpNQ3QVNciujgPJ/Ky cCwnA0eNGoRpk+SypmmZiElKxWKrHmfbZHRGGbMQbZK3dcVSO8caZL6J1uYg Kp16Wm+FvnmUbQQRfB98NBq7E80ISzBj/+FIbPXzh3/wHoQdj4bNeAilqi2w qgPk7RVp29GQEYyWzBC0Z4mMqjDMt6TJe/hEdp+yielCN7Vp8REUx69HQexb aCk4xEgxngGVClPtys7URg0uMejyoHbfk234XUGDF2o/h+sXF+Cwy3MxYlWy r4aobaTUaRWozZFRS6696MlAldLx8tBYm4X4PB3ixbxMfjF514aXA3PxjL8b AdpFnCxsQVxhBeILyhnZ9z4EY9c5sYjcdRaGriUYOhehJ5LFGVdSycbaUegq +km7HfJ0jddu1vejp9uBH333v/DmC89jqiL/77xQmrjaCefTR++g9O4JKl/l YP5vIOpzGPk+/7up9gbqe37HYXwb2SZ6hLSbqI46+z4lNij41UlM6VuWR3wi KS44zoyABDt2pFZReNVhW6wJoYk5WHe4F6+kXcPh2jPYk2ZCRL4VmtpWqGub kVQpTojJRoTZhKN0euEmLaJyChBvKkSCzoj4dLXYi+lZcY7L4Uc5uUjI8dSR +1ckGM2M/YoQZzAjNrMQqaWt0LWMIspkRWDoHgRsD8Guk1k4rKtEamE7UsnI 4XGZSIs+hPJUP1SoAlAtWDZtB1qJ1y5DKHpMoegz7YSb7Xx7OjVnJnqLw2FN 3Mi2AT2WI1jqzsClATEznC1vtnMq24HaiVli/fKsU+7hO0dzeqWRfgA9nR34 r889Ar9H/gPPf/HzGOb3Hv3gKBXzNcQyw+LeGsMdLDNmm3fkSsl1F4jlS0py kUgrijOpkJBnZAhhJqateHmbGc+HTGC78RxOFXciTpSRLK5FAr2f0XEZRudl mJzi9RJMjoswdl8gqM9B37GILHFoW+MUdDVD0FU50Dcx51Vu04Ov6FN/xJ+H ZxVB66FABZleX++/C+k9RPoxvONSkP7BZRnrqaWmTL/eOfjtk3fD2nvJ4FP3 dOvdYJaneZ5G5ehtdI3L95RIQOca/yLLrL0teC5UllzPB1nwXGApXjlcid+G 5OEX/hl4PLAcT0cu4kDteaRUdSKhvAX7KCaOFtqp19txiir3eHE+ws2M2vJN iDJbydR2/o1iJJlykKRPR6MtjfSqIWz1NE8ekvKKkJxXghSq6WSaKSnPxp+3 Ii67GIejk+EfuB0BO0JxIstCb+DgCGnDsdxCHM/Ox75cp5T7olbnICw8BtXJ fqhJ3YY6TRCaxYYFQwh6cki3eTsJ3x1oSX0LFSdegDXuTfRawhk2ZUpJpjfY rg0pa3FuwrffhLkez04duWT+5dNOD3F5dyketBXgA9iy5kX8+gvfwI5vfRd7 v/dVxK9fswzqrmIVnKUUxGVyxqgH1KL4p8ibFjnz50X6CAn6klsGdrwpnYOd Az7Xgpe22fDinlkE511AlMWBuKJGxJewiaN3Suph7LkOk2i9ol3j+6sE9xWC /RKBfZ5MvYAsRlhZjWPQ1fWh3OHymWXs+Swh9gouuv6AP4+3+zz68f7nnRLq oZeRQKjbfx6KW0Pjryrds3HjRkkAi1DYc1S5r21en7ob8d5TuncQf590UflW f7v8sTjlXny9qanFmuhy6f1Tx7qw9lgfthxhLPx6Cp54S0UlXIw3Uqj7Dxfh hLUbibXdiK1qJ+is2GnIR5i5EGHFZhwSdYIslUiw1CCxuBxJhaVIzs9Hcm4m EvSJSMjWIjE3h58VIYVUr8ovh6qggt/bEZ6oIR8HY+u2QByKTiJnlVC39CC7 dwnatjGcMJfiREEJTuZb6ELMCDH0ks/7oI7WQ38kFPWpgWggTzemb0NT+lZU JrwG26nVKI9+Ae3p6zGctwMTBbtwuTtdzi2VwJ6Lq0O5chKfAvZZkWwpduY4 MqWjQy6d+T8H+0ew6kvfQ8VPN0O79uc49vTj0L65FZMh+XC+nADHIQPmdWXo 0dg/rOB/YZhOvjgdTqtYZtTDVW/ECGX1FAPCOeJfbJg625snVSMTyUJ1FemI N2biYIKBoqQKa8NmsS9vmkKlgdhvRlxJK+KtrUiwtSKZgZ+p9yZMfWz9N5Hd 9w7fvy2NBTEGDCR4fedZZLWJ8sWTyGpyU2m3LFejzc+6iPbK2/jzoMPnKY/3 17XvwyGKpcJdc7hW44QH6LOzszh48KCkXjylee5kqD8A3n/rwwyeX/uYF7It vRNIaZQPvD+UX49NKfKRRVvTHAjIdGFTxjB+8lYynghIw/O7DHj9kB5rj+Rh c6YTO0xOxNQ5EFPvwC4izV+U+S2yI8bOTrU2IEGUzyipRHKxDSlFhUgpzMJe dTwScwyk7EIJ1Sm5NhyLT8c2otl/WxDC4tVINFciqbQOSZZaJNHLZtS7kd1/ EZGWCpyyMJ4sLkO02c7wSNB9Efx5r4nFTqQlZaE1cj3yj72M7CPPoTBiNerV 60njOzBm2Y1Jse+sZBemLLswWbhTom+BbpFf50G2nDrqteemJxMT3Wm4eMbx QGR/5t6eRsbGGAyv2YI/W04iJvg1+D39Y2RrtMhruI22xr9guOIWZnLPYi7R jak9Jeh7LRnusBwsGiowoLHLrPhZXD+/iO78NLkseUUW+usMGG4yYaItG7Nd ZHzKmEUy/lky/rn+XNRUZOBATBp+vdaG1yOmscs0hBM6K04Yy3GqQBSHahMl 5u1t9Ce6jgtSTr/cbiHb9a6EelP/DRjJ/AbKGn23kDLzyGqfopwZRGZTu0cD R0dRtwzNKCHX/ca377IFncO38fs/yZ95AkqPgGltbRXzxu/BuScNwnsB5F+U 3124fE36O6omF9RNA/If/Sr8UloJDye2ZbkRlD2MDaoOKpJkrAolnA9qEWpw YHtmF9ZnOaW6SKndczhV24N9hlL4Jxtx0lKPOMaKiTbCsbQKyaWEcokZqcVZ 2K9JoWg2Yf+xSGwL2iHBNzxWjRRzNdS2Zqg4DFLLmpHM12RbE5LFkKBwjK/s fAhR1lqxJ7ukmlqyCvGF5Yim9j6coMEbRxl/mtuxWF2KziQ/CpIgaVu927xL 3j1ZuvshTFp3i2OQSwnm4p1YbIwliHMlLXKFTSRSLLmUpFCxkaafQO7TYtyh wTvXFh4I5DuHtovVsHq/GFzYHoCbDCLru9qQm6kix6UqnPUdjF28Dcfp25hc uI2suttoauLvVf4e0wUXcDp1BNMHy+Fep8Lw0Xycza7CCGP0oRobupXqkkK/ 1JUbUWjJhqU0G2Fp2TiiyUGZPQflNgbPSRoiuRRvRY9it6kPh5INCFPl4Eh6 AcIyzTicVYRj2WWIL+shT4sdKmxuNtfviOZbfBWIfgfGvusw9FwhmqlfuhbY ZpDVOYzM1s7lkG5Zp4y13QfO/PKcR2e327Fv3z5pfcOXZP7E3ZB972aTH6Ok V94AraYPSWseQkazXJ1oS3w1/JLb4Z8uKsgNYnvuGILNkwixTCO0dBo77TPY UTLL76ewk5jdYRpBWPk8Emv6EG1vxV59KQISDRQXtTJubVWk4RKGoHpsD9uP rYHb4B+wDWGnEpCUzRjSXAcN9Z/G1gJNeRvU5QzuKjqQUtGOZH6fXNaCJGsj IduIaOI4muPhZFE1DmUUYFeiFsGnknEgXoUItQbh6kxYO6Zxe7gPw7kHloE7 TPodK90tMqVtu+nyJ22k4JKdmCgKIWJFmnOuFASeJ/0uilROeUPMnaJAXmV+ vCD7Hsx6Pp8Vm7x/vBnvxu3CGWc9muc9O6M/hKFzt9ExdxvjxKym4s+oJ2Zd 1X/AlPmSEgx/GUPr0xDxfAT2HdZg574U7IzWIlybjePaHDy7dQ9+8fxmrF4f j5+uLcSTuyuw6UQhDsVlICzJgKMaURG1AEd1RQjXFyNMb8FxQyNiiwaJRxmb Jjfx6faBT+cFZTcV8dlNfLZ3LONTaIsOaos/DXQvb3Jdgcpar4jxe3OEH3nk ETF5/Pf3B+qXlQ5zTJ+B5yu9eQTa5nHomih+mqeUDvs+fX8/Ao3D2J4/juAi gpVADSVQd5bPYBfbW4XT2FHKz7M6EZrrxnFLO6KtTQRVM0NBCwITMthhOdgX FcOwjWRKkO6ICEOcVotkUxFSc+xUv9VIK66Hhr+TVtZG43VAzXBSxSbCyuRK 0doRVVSBEyTuvfoSaSAEJmbhEMniZI4V8QXUHIVWpBYUIE6nRlyyCu0T7Knp CYwf3g9X4S4MEqwjElhHbYJmx6y7MEawjltCcLoxGhcJ1AtuWSssEKizYiuL skVnrC8d79xYvL/kxV2VMT4ADWXCANH0p8IIlFVMoH7GI94+jxa+HyVKK7re ln76AAXZUVU3TsQ2IfIIhdY2HTY9GYyffeOnWPWNn+GVVUSfWKHcm441O7Pw 8q487I7JRjgZ9ZiWiGTMfURfxJCgHtG5bYhiS7C4iEYxN2Zy3ySuTG6i0fW2 jMhekft7AVm9jPh6pqFzDkHb3rZcgTkm6k8UANPKGPQ81B2//ZYCIO99qePj 46itrYWWhhWF0u7Bn1jiuBt/T0NV2w5NQx/SmkaQ0TSFTBF8tpyGniL8eMEA tiZ1SfjbZiL+Coi/YuLMOkX8kSzLKYEq+Vo5hdeyJxFoGUeoqQO7jE0SiR1I zkTw4eMI2LkHfjtCcFClokQqJPHlIsKQisQsI5KNxcRfGVSFNUizyESZRpLU EG/q6i6kVncjmS2uvBVHcu0ITtUhIMlE/FlxjJiNpxhIJHkmW+uQQhGRSj2s YgSYatYjX3MEheoUlLs4sM8s4lJ6GFzFxCC16hAxOExHP2QV+2hF7YQQzDRE 4yxdu3DvC16p9eMDOoy6tJget3nIwFes4TnEemp4Ftqnk3FlzwH8riUdCZrL yB/8ozzj/zksXH0b3l9bNNXYmVmDI5RPsamUUusT8OwPnsPq/3wem1etxtaN AXgxJAEv7czEy3tysXZ/EQKjCLjMPBwW50zl1HDkMSoobEZsQRNdURNdUo/A 3A2BORejK2lLxVU5t7zvPLL6qTn7pqDrdUtbKTyYS4y7KnnpP460IUTB14MO ZLgHX95zuV9SRIxzag7qum6kNQwhvXES2sY56JpFIYMlGBnsiWVlvzgHhaQb 2wwjCMqnQy6eIMYmiTHirGJKwteuqknsrJhEUMkQ/BKKsHXfCfhRFAbtPYjD aUYpdjlVakdohhpHC3RILDcht4idrzUiKasYKdmM8AtrZWdMR+7ht6SyVhzN q0BIej5CMvJwJL9MKpgQYyeH2mkRinlPzliKtRqpVrviHMXXh+DUH0I2eS6v 6S/4w9IV3CiMRPz+56E+9Dx/xsWI6CNwWULhLg5BnzmIstEkJVbPiMRqsf9q MAvDA5lw9WV41T+4D7AGL6Mw60+4wj5+a8N5BtC3cfX3f5Y3IX6VwLqhyHQ3 1M1y2JlY3oH94rwJ6rowMtXjv1iDxx59Bi89uRbBr7yILetexNZwgis0HS/t NeHlQ2a8EsZwM6YA0dmVSCxoYMhIbV3UgHi2OL6Py6+DumaYTHaVyGLc3n+Z jbG764K8W8F1mm0Cmb0uLF2/7gFXftYldFTdxh9c3Qi6B1y+8oY+fze4vGdU v+Qhr8pmaOr6kVY/hoyGWcZP5NKWs4ypLkgzaqaey9idMQh/1SACskYRmDuK 7UUEWMk4QuwTCC1nsw0jSFOKLcF7sCUwGFuOJGBjWi0izM1IUNGxlVYiyl6J mIpynLSZEZh6EnHGKAy3GBCfZkBSZjGdaBmdHgPqghoOwWqE6YqxW52DXVQr 4fmiQhmjlLp2JNW24URhBVVeG1s7QdbGaLFVslSyvR4pdhIYxa/KbpY+i83R I8aUi33RydIWiYiMJpiKnAgIPIk1j/8G25/7JhxFO+EoDoWzeAeVfxCmCTCx uXuMjnNI2h6Rhd5+eZuTQl6+MPYBBWm2ijm8upYG7LqNK3+4vYytK9ehauiR NTWxldY8KL3XNo0is3EMMSSgA+pC7EnJwq+eXINf/uK3CGGPxiYmY0d0Egks A2v2GvHi4Xy8dtyKjScrEZFVjSQOyaSiOiQW18nxWxFbYTVJrFLClKGfmq2f cYXrHLLcS9C5F9hmpY0AZeOTnmoyMdF3nKX/CojrC3djy5NcdQdbq6Cu7ICm dhBpdSStenZI8xJJ64JUo8vUc42D7zqjoBvwix+Av3YMAaYxBNFBbi8cxLYU 4mmHwFMItiXlM8poQbClF8FWF7YUOPFqVht0baNQ5xbgpN2GU+VWRFcUI9Ji gDpmKzrMRxCXqkeUimo3JRcHEgzYGZuJXQlZOGYoYeTRgNSqViTXtiKpTrQW JNY24RTJLZoCLtraQmy1IM4ur34lldXT6VbhUJENG/UF0mcJeblIZEvKycXB mGRs2rYb67fE4I3HnsWG/34cL/3mLRzafABlkYGo0AahxRKEYWJrwGVEv8uA HhfJa6JCbFDwOT18/4pe72f0exprnx2h6LiNy3+4/RkFZKW9w1A39kq/oqEW Tm8ak95nilUecZRR0yz01CeHM3JwIN3EIaZDsKoXRdTMcfx+0yEj1u4twFvH yrA+shwbo8qwKcqO5IIqgqxamu8SK0viVOQ4cwXiCjhsa3roEpdIXIsSuDIH zrDNsU1D6xrB0o23PSDzeMc/DLUqoeqDCexLd4PMewZR3rv4JBxjU1BXOJBW zaetnYG2gfBuOQd95yUS2DWYem8QZO8gZ+AmVM2X4Zc0CL/IUmwO2oPN20Lg H1eAIGMrgm2jbMNsg9hhczMa6MX2km6s09XgcDVB3DkGVUkxTthLEWkrhFOc ZNKagdyYDQg7eAiBu04i9Fgqjmmo3HMrkFIiyKiBYSqVVVUjkmqoKeoa2RqQ 3NSNkxyuUZYGRJU2SpFGnL1RslREaQ02miqwMbsUm0zyolVSQS5S8nORSrCl cAyG7g/HD77yMzz70zXY8MQabHtyNaL3d+LAlnqUbbCieY0W1idOoSMqCXVh x5B/+OidHTDvW373/mUsTeKlx50MTm7j0u9ve/IqFq9cg7q+C5rGfqFtZXf9 RUKJ8qPxDMMrsSK+AEPbAiJNpdLpwidzy3CADHukZB4GexeS8+wIjLBifXgF 1p8ox4ZTdmyKLsXBDBt5q5w+sZx8VcbYk03U2WPoI+px6/rPEEqnJRiJ3R9S 6rx7Cr1nL3jKI+brL6GTvvD3/V3YsAK++spfg9KjcI7NQF3eg7TKMaTXUIE2 EtDkK33XFRid16WZdkPPVcSY2xC0+zD8t+/C5rACbKV/DMiheCd3BdE3BklV byn2SwcRVOpCIKEUaO1GQGkzDmdbEFw2iKQOUeHHhmZ9KmY6KWic2egsPQld TAhOxJgQm1GCOPrEhHwqCJHIZK0hB9UisZLsXs1WU4vY6hqYBi8htXEQp4pq KOBqCac6xNrqJFttyKnCRlpkY04xoSSnfUhbVApEUo+aYPooXgsowKOPbsET P1+F537xU7zy0nMcEiX0OCUICqPoM9yArfDPaNS9vXwocNfePG/1/fAyjMbw 4s8bEWO5jYu3bsvVO76CUqcbmnon0hqH2CYpYUXPzhNDi7LSEAf5dZwnu/YR PxU4mVeFU/nViMmvwebEUaQ2LEIjDmXXluHN/eWkpiqsP0ksEUcbos3sIRv9 nQ2xZistQy9gLkV0kQVRDGEy+/m33Mq2C9HcM7BNnFk+DyVWcnpT0ndveIHo fhUUvi6DyLN06D3TK1PV38I5Ogu1rRdpFeMEEeHbSDnXdhGZ7ecRri5G0K5D CAjezUetlwKK3JHfQdV+Dbvzz2BL1iS2Zk8gIH9cZv3HsK3EfVeok9A6iH2m EmzOnYB75hp+V2XBnD0FmlNb0VocCZt2J3QZuTiVyh7Q2RDDURnHkRZXQrKm BoutoA6rrER0VSW0jikYB84hhfovMp89bK7ESUsVjhTLiyzrc9nLefR3OWbs MMnp46qCQqhFKzTj9R02PBs2iEP0x4diY7F1VzDisrMRbWQwkanHSVUWkvXN 4kgTjJy/jRYlJbG8TX6tyv0DWhjZdUVOoStEPru6fFUMGkKyMJEmLap5Fj87 EtOx+scVOJH9FzjOv/t3ykyluoahbr1Qr6JA4gwV7Dz5iR3exAitldqng06g 6zJSKzlC8mpxqqAeUdTjseZGurFGBGVTczdMI62AoU9WBYJOVeHNY5XElw3r o4txTCfmJW2IJi9FEVenikqoECzsJTPSiS2xXUIjmsg4H5+XJhnuFLn3qQ+F E7yGS+7f43cDrcrawoOZ65G7Qec9BSaD7mNwMF5Wk2VUDO0Si904nJCLwNAD CNixCycM1cjqvohsOsCcoVvIGb71PuSO3qKCU3Vdwy7LaWzOHqeoGpXu1q9o EFssbmwp6cMm+r81OTKZHMxvRWisERtjSESFLlQxbl79+BPY8MyPoYt8i1xs QkSsGSfS6AoMVnY3G8XSqRIbRb8dkWV2pNOH6vsWHqImXeCTHM+24UQB/8ti Xz5C8i0GjutzrdhgMiuf/Q2DzhIcp1t98k07Vp+YwF7enrrYgpTiYooSM0d/ PmLzcxhtGRGZqUMGNaK9YUyWSp+8ywb24dvonrqNYQWKJea/oN5wE+2JS+gi lDv8yqD90Xbs+XYMwtL/jO6Lf5Gx9kUsXroMTU0H0hRFm05Fq62nnm5kzNZy Gfr2qzB0XafouE68jbIDGom3ZkQVtiK2uBWJJezA9CHE1F1GVnk31CU1fIoK HEgtw7oItlMl2KXmqM1lh+VbEUkuO1FcghMiv7rETMLuExniqt4ZLL59S7qp j9yDsr+GvHz9Zcln/q7PrWSX35/uxO7Tb98febLP/JvlXz9wQo1t1Ov+QaE4 qrGR5eeJOka21PlivU7MpGQPUYYNs4288xAReBM/4r/St/z4Bo7Vypn2R2un EV43jk3mLrxkqENwgZzNoK4bQHxJB/bEG7FlXyq2vByMDY+twks/eQHrnlqP orAYWFJUCE8oQXiGFUeNVhwjCo9y4B5lR6pbBqFzzCHLydZzGlm9c0io6uTP 0N3RRb5hLMa6bCvW5dDRmPi7OSVIonNJKSzDsTQLntxQixdj57DfNgK1tRwq K7UvXXhSaSniLcUUMYWIpkpLKqlDZqUbGSU96B2a9znR5ZXZ8TAGF+hfJ26j n8C0tt7G9h8Eon7VXsyFJ+KqMevvlKHunJiBpopKt2aYSneabZ4APMew6hKy 2q5S8V5naPU2pcpNpFRNEoCtJDsx39yBWEsnEq0dSGbIvLNwAdqWJaRbG6Am 3as5SlVmM/alFSA4pUTKOD/OIXi0gI2Ed9RiQTidqWX0LByLV//G5+Pcb8rl fZiidks6cgM3hxfwwn3ozrtGxffuBp33jJgcc/7WZ3mXtOxqJBfSFVQKN7CI zDa6gC66gJ7L0hSLyc2Ac5Bt+DoRxzYq2g35ld9nDxOoA1ekR0junIO/pRtb La3wM1chzCYfHp1eP4CMWraaAazbtB+PfftpvPqrNfB7/AUcee0Ujvs3Qb3W irxXShHwLINWv3zsPpCDkMNGypleZLRRjnQw9O5mc7D1snFUnyAVvJJRgFf1 JXjVYMdrhjKEGW2IE5nsFIDhGitWbWrBS0lLOFg+AbWd1FFWDVVZFVLKKBDL KKMZBMeWliDeWkVpPgFd3RAyy3uRbml/0AqVp5unnMPQPPY6XHvDlTnJL8I5 Ts9WQT1cRe9aTfVUQ+A0nGd4RQZrJ9i6CDaHqLL6LrXxLZwSc/YFnQRcF2JK upBg7STgOnAsvx9h5WRIamsVwxtVSRlbEVKLjKivy5SqZHa15KKopgDm2jy0 tmbh8oLzUw+4bY+Mn7/we1x8+/fSd88ow+lBjEaA/eD++JLnyz79wHORxU84 Bs5CbR6BppzSoe4MRxMDBZF24zgPQ+9FGF0XiaXLxNtlDo3s4Sv8Z+QKbzp7 6DIVO9uAvDExoLQH/tYu+Jc0Kd7uExSMA8gk0HR1cnvljQw8+r2f4/nHn8Tq X/wE6/bEITSpBjujarA7op9K613siVxA0MERZQR+ASEBBXepxn3p1The7cAa jRlrtIzHMu3Yl2nFnqQ8BEVmYntkPp7c0o21qgs4Zh9AKoPR1PIGpFYwiK2s QxKjjoQKhv3lVI6kvYymYegJZp3IsatxQVvecT/f4+uzf/IAbIwAKyPAKsY4 buc4rhb5+Bega72CrA4ZYAaymSjnK8qbxpUMICpfBlgsARbPrkuyd3IMtGNr +mnG9+eRwQAoVWLmYiRbjKirz8RCnwmzntpLrkxM9KXj5o3FBwFszQqY6r/u RpL39Oo/PEDXeUqTeArNpuYM0Z9MQVPNHmhk0CsOmu9ahL5niRHCORjd5ynT zxM44qRz09AF/mHx3jQof57SPSfdsr/dQTCxJ0rqpe8zaSRd4zCy2PR8v25X KZ4/6EaEnaHpkVNYf+AkwnXl0FaR0Wj0tCI3etzyFGcZw9xg/Yx0nUDdLDaq ZhGYOo3gxBHsjJYPd3j6cDF+fqgQv9pVgBf2FOIZvj66RYsntqrwK79OvJJ2 BSetfbRQK5Ir2CpbkVTdgsTqZoawjYitohgvryUjTpNG+Kwd9MktU9DVk7lq utE7MXvHTUoAkouP/DOcI/SENuLGTtyUz5GYlogbxlgKbvTd7xA37xI3MjFp 2y+SnDpwytyJaEsX4oibRBvJyd5OgmrB9oKL7CmGmmZixkZRWWpATZ0WZ0QR DE/NIncmhnvSlMyJD94FGi/95Qvu3sTka4uvAogf3w0n7xnVz94HTt7VcB5W JOHCuZt8kEmoyxmf1DH2bZ5DJrtW1z1PSC0QUoswuJYeIq6W6KSNA0vSO4Ob Hw8syCz0fmy1d2GrtY3hQD2BNC5//HEYWqfw1t4SPHNwGPvskzC0T8DQxugh SkeN0QJdwyBtRzyVuZFu7sXiuRtKl3xRukLX1FV0z7Kdvoowjnq/PHmu8pWk Ovz2aCXWhDXhlQNteG5jHn75cgIef8OA1VFjeO6ABfuMHYgr60B8RSfx04k4 ivGYmnZE17QioaEX2a6rtDYDvp5zZA5xZvQMPeEo76kXfdOnv6YYTl1CCWUd lY9qrRFF9S8I4HjO2xTpDp4vDyVHl7RLiWkJbInES4huAHvsEwg3V2N/QRH2 5eqRXJCO0jJRMOXOauc7by/J6RF31tUlZDx9jzm9y9p5php+djca3ps8ed/z nD+uSHNL9RmkWkTpFQKhnkBoodqg+tB1Cw18mmBg65NL5+v7z0Dv4vhzn5ax +2n42brhxwdPqB2R8qnF7i1D+2maeRTP7B3BNss0TN2n2eYYY89ia1w24mxd /LkxUs4IYTAIrb0fdr6/N4d54coNJNf3e6oJqunygjPLsFlVjS3qVryZ6MCq ELLLukSs8tNg7U4tXgxOxQZVJ9moC1GVXThV1YWTAgVNdJO0eM7g28gRGo9a z9h7AQYyir6DT0p06pr7qdvqv6Y4H1VhFzSWYaTZZqhrFpBRfx6ZLZega5fl n94pJ+uJHANjv7wiGGFqkl5PFjOiszQjprQJ+wqasF5fjzWZ3dhT2IYNkcl4 M1WDCK0Jx9JNOKIyIcWgR3tXmTJF+Vc54Jey1T0Bm/cRq598gNX5m7Iz+xUs tYtIKZ2FilbXCKvTdFq66sxOYXk256z0IDrqTl0/P3fP0szy5MsWmwObGfMn 1E4o07vkhI4l+toxPB0qtv8uIaN7Cdk9oi2yLeDNyCxoaGJD5wx/fpKjjaav piSwdmPpwrVlfhQmT2noQ6pYWm2Sl1Yz+LoxIR9bUmrhl9omp0Jq3Vi1Q4fH /RLwTGgaQjOdCEynZzMMIyR3CMntc9BSY0lTGYM32Rg9usVCEu3eR73vpN27 iOROauA2F43boGzh/wKcg4tQFw5CY52k3jiD9Dr6DWqGzDbyf+cl6Z5EvCAS S4x9bC4ZENGlDhzPb8DB/Hq8mVWPtwxsxhq8EGuDf2wxDuw5gZCIKBzXmXCU xg9PM+J4WjHUeQNwus6u8zHc751Z/M3dhveeWfz4gw3/WeW/i+sWkVwyS802 y1CZQ76J/NY6+36FuUWVjyP1fdhskRdLNxZ1k0EnkNks9gGdpZ3PI650Ck8F 9WN97kWkO0W6WU7/Rfwb/73Adh4vh2fARLsbHfP8+TkpxVxXR8avcKB3/Myy rVPrnXKma7NbWubMaJLPLz6aR4eSXA//1E4EpPchUD+I7Tmj2JE3geDCKWw2 zSCkcAbbNQ4EG0YZdy3Szr+TbT30rmTr7IEbEtNLtu45C72Dtu6mrTtd6Dtz Rpmi/QJUOWKSaJz6co4R8zyVFbUln1MnDgbqOi8P9J4Lkl439MnLpOIrrKgd r2XW4HV9Dd4wVmNddiVejDTg9dBkhO4+ieOHjuOonoM7y4jU0g56ugGkl1I9 FbphrRx75Z5xfq/BFO246m5ze8+sfNgLLfcrCCIXzfx7qbpAUdtZSivanTZX NcuDW9OpvHKwqxlkHqqlUQsljc4gdhqZDfPy3DuFkaHrMg4ZlrDReBUp7ZeQ 47omESmN777Ku8lxX8ba43pk91FyssONQke0z0DXJE5V6kNGRcvy7J26sQca ZXB7nKeuaQLH8qgmEhtp+G4EcIAHGkawPVcYfRohxTQ63dSrekpMGj9E14PQ 7CFEN5wT9zAksr6yFcObPIbvPStP4Thp+O5+Gv60YviPwOE6B1W+XHVMw6Ai rf40AThPElwgCcrHnGQ5qH+Evv409L1L0kfbLL3YYu7ChsIWvGIsx6umcrxu KsMrqjysT9bhhJhEL22kOuVj143w0YekvfcZdiqdon4snb/xnqDB10B/5v6W /+AKLO85+GP+0i1JTBXRIkmNslDGt5FE/+5YuIrIsk7GE/JZdRl1FIBisaWV aO8UOwGVVdF+4THFyug7yBUsSg+aK9rAdayNyOYoYwTbxxhDMGqnGO3s7EY3 tNRbjunTUNd3k/ldSt7bJGXiNI0tct/mkFQ+Cr+EZhrcQYMPINA0hu35kwg2 T0vGDi1lo4E2Zk/B3zyFUKMDoTkUBNlDNyR7X2eMzNt0XZHzF8Tyct8cdL1j yHT0YunaVXxD6olPoaRalOWalspyaapl3AvNq22TpY2uS04PzXKeofOT3wfQ yQVYnfBnEBFg7yHOAmy9DMX2lPVKy+P6FqF36NBapvn9FLKIYangQvUwNQ2d CsnzeVnYCWN98H7D/Pm7je091+CrpOs9pYrlNUuvqcIfQmVrJqgV71l7hn0u NvuIQXxF3hjX9zbtRq84INjyXeSSNXOHxetNaB3nsT7BwoF0VdqvYiR0DN1n pK0TuhaKtYYOqBibaeoZWTFmXM414+DRt4iFXpFvtgS/mBb4J7PjtIMINMp2 3UEDhJRM06ZsNtGmEFgyKa0qhJi6EF07TqNekWbYjCQUMUNicJ2XcwZcJJM+ Yqjb8YiCblH1RyphVUb+qp710Iu2lVqmXdYy8mcPw7+4Hf6l3dhKU2619bG5 aFYXtpb2IrlhWtQgWBQ1CDoWYGQTFQkMohYBraxrEAcrMtgkAvpGz/iU5feO vzXeFv3IXRZ9QJHqr9+jf0VTlbZ6zvHIqJ2nH6Zf6rhEi4hjjG5IcUi2W1jx luT/HqIdbxH0wprJLaexLb2alqTedTHi6T1HP0hK7+QIbB9CXEU91IyMNPX0 v/Xj9H3ss0axLZKU38YR3XlR2gscYR6Hf2IfAjKGpJMpg+iHdzB0DC6ZkjNU bSJLdZKv4wgoHsGGnAHsMLVCW9ZDK16QZiYMbv5tKa1ILNkTMX2D6F1c/Hcl UrFQlaQUz0qWVFXLklRRJkgnWWUwctjJcNyvuIMy1Iktpf3YYnXDzzqI3eVj SGo4Q9tdEFvyL4pUzO4L0g5mYzf/cifxKzZ7km909RygQnWWt2HVA+ZePCNr rbcZPySZSpyl5+tHvyX9zJehKm6FxjaItIppUqowGOHbcVkx2Nvyfjxl2AmD CXPljoj2LoOVMezKbpUMZhLw72OnOWkwBw3WNYRwSzkNxri0lsOubgraenZm E2nXQ9mejKneaxx+fcr8wqekdOIdlgl4vkJoqBAbh1wpxXqBiyKmm7Q/Dm1e JY1EFzCwAJ2UniPWxQmMHpfyfH+Lbg7PJMsskhkXp9TQWg0cexwlag44Da20 Ka8Fm8zd2FTci00WN9sgjlJ36NvYBx30y13XRMLNQzDRv9BSTkbjyrZcUU5B FFDIoofIqh9maNiFpctX8Ot7LOXL4b3uban3S4NLWEuJl74rffyfcI4sMLCn CiufktZFZONc4qi4KvOii/7O/bYcLYglqGFy5MhNGukdnKwapXFaZOPQ5xno 8/S9vNse8qJjUDKOpqqPKnKM12bHNYhzWcVGY/5s11V5M7LgXY7Y1MaL8Esa wVYtR4xRPpBepEtKhyGXyLlYO2icHSVufsaOzO7ETht9ajujVFsFdINKwsvA NNL7R7F04x18R5mb7hqju+86i0QaJ5kjOoVOKoXGeSu7DW/lOfBmbh8VM/2w Z0Gyg+GrNEX/Du/xprxxtJes0itvGDX1COuIDaN0rqI0S/MY/TupcHoGv1jB GHrzbst4zj1QDraXLfN1OAZpmSI3NPYJpNecgZYeS9dOl94tZmp4B/1X76zN DF2nZa5Lq4Hi9WTVEHYy8Ja8BnnOIGrY93Fo9PEpnYLbyHEVVCBVItfiNC1D HmrhtTvEVlixPVy2SrZb9oiqlivYkjqOrTp5yATmjyPIPKoMp49ge3Eftluc CLK0I6KRvdksoD+OFH2xlD6S5prC0ts3f6Co786Zq+icvYpTVBNpHOHpYgK3 dolO+aK0IGfovCF1vlF0ft+7FFO3eDt8FXsYpV2716TyDHI5BuGISWKtfeib ncNPVzA0NsoG8KyFeA4DFf/1XWVuWZXHKKh0grfHW2ugAGawIKIfsZFHCGkT e9WzUvE+9v8VfBaRlS6EmuppFbGSwd50sVdd5Nj+MWidfbB2M4IuY+9XTCJD 9LqS4aLv5CM7b8i97npX2kB0x3vJwYAfe97fJI+LwIIRbCuUI8Nt7PltpP9t pe04xp7PcM9ivWEcyY5JaPpnpHqUP1KmQjV2J8e5WDGgsK87y+4Wy1HX5NUC h2e1QHS12MDk2TYqNkpflxCnpw7Sd4vlabr/DgYPp+fw3yvA+xa5ux++p7tF KbbvKN3toENUFzHoLJ8hj7Nrmuf5J+iiusnlPecIdjpfyh7TgDSVP3iBjyPe HypqxUFz67IzzXKL6seM0/pHYB8dh3N0nr5HOQ2omoOo8Ry7nPTWdU3u8r53 JNnnEQwPSZ3+Calrd+Wfxmad3OVb80bgXyB3ub+lj8LJSaHUjpiOEahF5cS+ WZSOL2Hxhmd146OED/2Sjd1dwe6uPccBLK/+6ZcXZ5T96C5plw7v4mH++7bU 3fKeMVJxz7wSq/Wh9/TsD716+36pVgFyb3tKX3offSX39reRkj1KFSUWxakl Gkicoj5PJ8eRY2F5ptvYT9Hqkqe4xWuwvhzHGRzpB3hHg3KiqpayJYOyZYl/ wzk8T0dCSiFdpSk9ncmezuq6Kh2nKkszAlwETsKZeHIahuRpYxFBS9MrphFs ypV7elNRH72lExuK25DimIVldAkLN27JmPsM1OZOpJWMyisZtWfZwRdpXHZc 5zWJxaQ/2XdDmooUfsyzHcXYx1uSjjmQWTGrb5zBUc8PVgBlefPAcv6Id+d+ 27OMcPYmUgrkascaehyhIYX+1jESlLMoKKJ7Tz8kTSF/Fvr+09iht+JoWSsV BuWm5MQ4Clzj6Fk8J8/6nr/Gh+2HxjpOQiKaSNeZVDhZnaR2h5i2pSvov6a4 g+tQKuoIz/AhfnhlWeaEVU8gjFLpcE0fsnsGFLL8KJxDi/wDQxwqMzTegmy8 1ovSH9A7Lt+Z2+sXB0YY+y/zuob+S9L8j146KMLDdKMoGxtXWPTBOTLyJh9l 9+YdL6gQsUdcLZx7FylmOaARvSmSIMV8vJQN4DUzq+uVZ2WD9CU4Ut4i1Y32 eB7r2Oz7FOOk5vRCXTxG5yd4hlzRsiRNbOlFcZ8e0jYfilLmIYnbPyqxu1h2 zuZ3Jjf9rltEXx5mpz/tF1tN3OhdmMdjyiSUKneAA4HsK82Tsi+baax2MXd2 TmbQnvOiwFvveQ53PeMPsVIprpfl9kjMaWj7h0X297dWsJa6S+7Gj/vwZd9S pr8Xzt9CEvswxRNKUKCmsQ8zqIG0FKgZHFpaUc+YJLZenYtIEce6SGr0H87F i56DnB2us1AxLNXYpwkSorCR/dfGm6YM0jsYUoiHUXhaBDkmt+BqEep8iJ/x /9xnFY4W+yjEgQqjyKBb/JliagdFiqpAJGkIU3NIN4gEAfoBEaqIZSkHdbhT tAV552L//F25zlr3FOwTM494TSQ+IJthr9xvnqQc0Z2i38Trt5UH7h69iiSP qCfu1BzFGuJOQ8yJCUJNzyzWRGuR2DmOkjFBTZ6Dqz4i1zy3TENdQRzW8eaa eaPt5JqueekB9L2LtPzS+9hjS7xZA8N5A/tFYtcBD7syXuqXtgH8XLFkCdVI KsN7Vfk9o6F9jqNhTlqh0jnnpNyYTJeSwqsQin1y/hsrwNNBuV8+cV/38bBU 2tLspJ4mjpL415Pb2NgvluGzWBN88MMeIlx6Byk5E0gVpxhInkZZSiPsdF0k QjEB7RRE2HtajAXSYZa0kjZ3FxFm0MnYxmd+qVCVpWZBjovZBeoauUB3ugJm ERNLxbn5+BkuMdWRJhXntk0uLs8efGVl8AiTu+GT93SD+On/9LGy+LCHrs6+ i+T8aaTa5FL34u6WF5IEZfEOdRxuOkJHpxhJLCRpvfKsrRNn5PjuY9I0tRRa EkWpjKDUTbR7mxxWeqaohfRQsTnPXv3KCpZHj8kP9rc++OL7Ph7swx4OIQ8X MwJJsSm10T3TEbybDPJwBsdERo/S9f2iVv+sxCGirHTp2JknPNBhKGbuJnQ4 JJKbFejw1y0jUorcl1e22HdCfoZP+3iG7/lYAPyYZzyPcDyTXFJEOWERpLfc CdI1Dnk8ix4VvVkiiblb79mK6mtqK0q+Hc8GC4Eqz5D5ro9lKU+V2K6Jq+ie vir1RZLSF0nt8jDqXryKheu3sOOvdIgyamPlO/jsfQft3XdwfAUPlShf0lOF 8Z4g9Vs+ZuGP3HOv95nalW9BSfS523jf9HHVQyu4V418yX+855IiwPh3H5fc fx8a9LpJZMiX/JyPHn3ExyV3ryDqzJIv+Xkfl/w35TPvWdHQFchRo3zJ/+lb Q33dx1W3r+BGc+WrfsGHhb7m45LbVnCjBfIl/9mHhTyH1XlngfmtIM4pli95 77lKoju/6uOSm1Zwl3KpXyVF+27S/4rymXdy0Vt/5S4FW8nwUPYbyBby6k/P aTvejPvGfW7U20nLhzUqFWfuttCXfFzSe231AT5PrhC9/KjiJwWaRI9697KH Vl9ewY3KZWiXDeJtpH/2cckXVnajyqFf/+qbm/7JB+M954NFPPfqAVS7fNWv ++hUzxmN3kP+qZX5qi75qt/wgfzP+7jqk/dx4d7I75Ev+W8+OvVzPi7565Xd aL981Ud8XPUffVz13olOX7w8KF/y333Tk+fEe/HT4griu5+uzIfIZ6rgWz5M 5dmh5s1Q905S+bpX+ScV7X+3nT7r45I/WoEPkfeEL3tg7x79jI9Lfn8F1Hxa vuR3fVzSo4a8Se+797lLb9KTj81WhNN7GMpTQcGb9765ghuVJy6WJaW3hTya 2puh/m0FN3pRvuQPfNDTJ3xc8l9XcJfymRHLit67O//GxyX/ZQV3eUO+5A99 c9NHvf6Sh/T+1wrciNzxytTi3d3pmYvyprsv3OdGvalZzv3Hoz4A7+t85c+t jJr/JF/1v330qK9jDP5+BTcq9f3/kK/7Yx/X9VXi6tMru1vp0ko95p/4Zilf +SafXIE3kS4tP7IyNXS32d7v47ofWxlTS5eWkaRMntxtPs++KW9y+bCPW77X r0jXVQrc/dxHRz/k47of+D+4ZTnmVDzHB++6tPhEuez98jvec6cy0+OXStd5 E5f4efGXH+BCpEsoZyj/Wrkj8etivIvm9eekH5VVBR736hcPH0r/L8sZ+f3W ///+/7//f/M9/sf/BiBlMlc=\ \>"]], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{5.0297577989999995`, 1.361188704, 2.241203097}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{8.162200106999999, 1.119496074, -1.379537691}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{3.821956044, 3.532265034, -1.0332879599999998`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{2.591591271, 2.879978388, 1.505316123}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{7.583460584999999, -1.723311915, -0.990977577}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{10.550138409, 2.067766431, -0.123491895}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{9.923230433999999, -3.2676314459999998`, -0.226782897}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{6.458408792999999, -2.8374223439999997`, -3.436551729}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-2.058488004, 2.5511138969999996`, 1.4326949519999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-4.35065631, 0.86586054, 1.0382200769999999`}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-8.823746283, 1.11775755, 0.516625083}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-9.147376305, -1.4973982799999999`, 0.225932532}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-10.951246131, 2.629801005, 0.074000652}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-11.481212496, -2.5464274409999996`, -0.423311697}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.29725199, 1.614824238, -0.5760183539999999}, 0.255]}, {RGBColor[0.4, 0.2666666666666667, 0.13333333333333336`], Opacity[0.8], SphereBox[{-13.572826940999999`, -0.99360426, -0.824135964}, 0.255]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{5.995356705, 2.188556055, -0.173379975}, 0.24]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.8], SphereBox[{0.296966355, 1.393823823, 1.324585215}, 0.24]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{3.4165964969999996`, 4.465209924, -3.063902889}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{12.483792830999999`, 2.155713069, -1.735783935}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{10.819250586, 2.66428803, 2.058469107}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-2.264899935, 4.790257221, 1.819554336}, 0.178]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{-6.592690875, 2.2941524909999997`, 1.078319511}, 0.178]}, {RGBColor[1, 1, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.8], SphereBox[{5.151794625, -1.994824011, 1.512988305}, 0.5]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{6.129317538, 2.061171378, 3.8194616399999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{8.198746905, 1.661216373, -3.3552379379999997`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{2.3924546849999997`, 4.582541397, 2.629290786}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{0.328448757, -0.488619729, 0.900914475}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{11.433138527999999`, -3.102811812, -1.6837415969999998`}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{10.728847338, -2.628364833, 1.609570872}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{9.469626846, -5.314384413, -0.026474697}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{4.729994688, -1.7991833699999997`, -4.047227180999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{7.845769842, -2.731391277, -5.016529898999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{5.936265786, -4.864598019, -3.2068209}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{13.777216892999999`, 2.766671976, -0.5858825879999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.177162953, -0.055084755, -0.848645373}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-7.5618991079999995`, -2.815634103, 0.50927415}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-10.765677591, 4.698852432, 0.243242184}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-11.674774467, -4.611718365, -0.6270969449999999}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-14.927590664999999`, 2.871984957, -0.902086089}, 0.12]}, {RGBColor[1, 1, 1], Opacity[0.8], SphereBox[{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, 0.12]}, Text3DBox["1", {4.429757799, 1.361188704, 2.241203097}, {1, 0}], Text3DBox["2", {7.562200106999999, 1.119496074, -1.379537691}, {1, 0}], Text3DBox["3", {3.221956044, 3.532265034, -1.0332879599999998`}, {1, 0}], Text3DBox["4", {1.9915912709999999`, 2.879978388, 1.505316123}, {1, 0}], Text3DBox["5", {6.9834605849999996`, -1.723311915, -0.990977577}, {1, 0}], Text3DBox["6", {9.950138409000001, 2.067766431, -0.123491895}, {1, 0}], Text3DBox["7", {9.323230434, -3.2676314459999998`, -0.226782897}, {1, 0}], Text3DBox["8", {5.858408793, -2.8374223439999997`, -3.436551729}, {1, 0}], Text3DBox["9", {-2.658488004, 2.5511138969999996`, 1.4326949519999999`}, { 1, 0}], Text3DBox["10", {-4.950656309999999, 0.86586054, 1.0382200769999999`}, {1, 0}], Text3DBox["11", {-9.423746283, 1.11775755, 0.516625083}, {1, 0}], Text3DBox["12", {-9.747376305, -1.4973982799999999`, 0.225932532}, {1, 0}], Text3DBox["13", {-11.551246131, 2.629801005, 0.074000652}, {1, 0}], Text3DBox["14", {-12.081212496, -2.5464274409999996`, -0.423311697}, {1, 0}], Text3DBox["15", {-13.897251989999999`, 1.614824238, -0.5760183539999999}, {1, 0}], Text3DBox["16", {-14.172826940999999`, -0.99360426, -0.824135964}, {1, 0}], Text3DBox["17", {5.395356705, 2.188556055, -0.173379975}, {1, 0}], Text3DBox["18", {-0.30303364499999996`, 1.393823823, 1.324585215}, {1, 0}], Text3DBox["19", {2.8165964969999995`, 4.465209924, -3.063902889}, {1, 0}], Text3DBox["20", {11.883792831, 2.155713069, -1.735783935}, {1, 0}], Text3DBox["21", {10.219250586000001`, 2.66428803, 2.058469107}, {1, 0}], Text3DBox["22", {-2.864899935, 4.790257221, 1.819554336}, {1, 0}], Text3DBox["23", {-7.192690874999999, 2.2941524909999997`, 1.078319511}, {1, 0}], Text3DBox["24", {4.551794625, -1.994824011, 1.512988305}, {1, 0}], Text3DBox["25", {5.529317538, 2.061171378, 3.8194616399999997`}, {1, 0}], Text3DBox["26", {7.5987469050000005`, 1.661216373, -3.3552379379999997`}, { 1, 0}], Text3DBox["27", {1.7924546849999996`, 4.582541397, 2.629290786}, { 1, 0}], Text3DBox["28", {-0.271551243, -0.488619729, 0.900914475}, {1, 0}], Text3DBox["29", {10.833138528, -3.102811812, -1.6837415969999998`}, { 1, 0}], Text3DBox["30", {10.128847338, -2.628364833, 1.609570872}, {1, 0}], Text3DBox["31", {8.869626846000001, -5.314384413, -0.026474697}, {1, 0}], Text3DBox["32", { 4.129994688, -1.7991833699999997`, -4.047227180999999}, {1, 0}], Text3DBox["33", {7.2457698420000005`, -2.731391277, -5.016529898999999}, { 1, 0}], Text3DBox["34", {5.336265786, -4.864598019, -3.2068209}, {1, 0}], Text3DBox["35", {13.177216892999999`, 2.766671976, -0.5858825879999999}, { 1, 0}], Text3DBox[ "36", {-4.7771629529999995`, -0.055084755, -0.848645373}, {1, 0}], Text3DBox["37", {-5.025526223999999, -0.5413423589999999, 2.603534175}, {1, 0}], Text3DBox["38", {-8.161899108, -2.815634103, 0.50927415}, {1, 0}], Text3DBox["39", {-11.365677590999999`, 4.698852432, 0.243242184}, {1, 0}], Text3DBox["40", {-12.274774467, -4.611718365, -0.6270969449999999}, {1, 0}], Text3DBox["41", {-15.527590664999998`, 2.871984957, -0.902086089}, { 1, 0}], Text3DBox[ "42", {-16.016380467, -1.816209567, -1.3421972189999998`}, {1, 0}], {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{4.297271371994769, 4.507760091028999, -4.024097769135669}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{11.974677577233807`, 3.0748108718859744`, 2.5009986813995617`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-1.1928646903822369`, 5.511683480855285, 1.9917679994781001`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{2.2011569199504173`, 4.928725022624076, -2.9788537979463845`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{9.807640466305932, 2.6045649270089077`, 2.878500250738863}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-3.396071408281821, 5.434707203473828, 1.8866980484600495`}, 1.125]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.591591271, 2.879978388, 1.505316123}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.583460584999999, -1.723311915, -0.990977577}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.550138409, 2.067766431, -0.123491895}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.923230433999999, -3.2676314459999998`, -0.226782897}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.458408792999999, -2.8374223439999997`, -3.436551729}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.35065631, 0.86586054, 1.0382200769999999`}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-9.147376305, -1.4973982799999999`, 0.225932532}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.951246131, 2.629801005, 0.074000652}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.481212496, -2.5464274409999996`, -0.423311697}, \ {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.29725199, 1.614824238, -0.5760183539999999}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-13.572826940999999`, -0.99360426, -0.824135964}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.995356705, 2.188556055, -0.173379975}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.296966355, 1.393823823, 1.324585215}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{3.4165964969999996`, 4.465209924, -3.063902889}, {3.821956044, 3.532265034, -1.0332879599999998`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{12.483792830999999`, 2.155713069, -1.735783935}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.819250586, 2.66428803, 2.058469107}, {10.550138409, 2.067766431, -0.123491895}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-2.264899935, 4.790257221, 1.819554336}, {-2.058488004, 2.5511138969999996`, 1.4326949519999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-6.592690875, 2.2941524909999997`, 1.078319511}, {-8.823746283, 1.11775755, 0.516625083}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, {5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.151794625, -1.994824011, 1.512988305}, { 7.583460584999999, -1.723311915, -0.990977577}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{6.129317538, 2.061171378, 3.8194616399999997`}, { 5.0297577989999995`, 1.361188704, 2.241203097}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{8.198746905, 1.661216373, -3.3552379379999997`}, { 8.162200106999999, 1.119496074, -1.379537691}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{2.3924546849999997`, 4.582541397, 2.629290786}, {2.591591271, 2.879978388, 1.505316123}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{0.328448757, -0.488619729, 0.900914475}, {0.296966355, 1.393823823, 1.324585215}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{11.433138527999999`, -3.102811812, -1.6837415969999998`}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{10.728847338, -2.628364833, 1.609570872}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{9.469626846, -5.314384413, -0.026474697}, { 9.923230433999999, -3.2676314459999998`, -0.226782897}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{4.729994688, -1.7991833699999997`, -4.047227180999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{7.845769842, -2.731391277, -5.016529898999999}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{5.936265786, -4.864598019, -3.2068209}, { 6.458408792999999, -2.8374223439999997`, -3.436551729}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{13.777216892999999`, 2.766671976, -0.5858825879999999}, { 12.483792830999999`, 2.155713069, -1.735783935}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.177162953, -0.055084755, -0.848645373}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-4.4255262239999995`, -0.5413423589999999, 2.603534175}, {-4.35065631, 0.86586054, 1.0382200769999999`}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-7.5618991079999995`, -2.815634103, 0.50927415}, {-9.147376305, -1.4973982799999999`, 0.225932532}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-10.765677591, 4.698852432, 0.243242184}, {-10.951246131, 2.629801005, 0.074000652}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-11.674774467, -4.611718365, -0.6270969449999999}, \ {-11.481212496, -2.5464274409999996`, -0.423311697}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-14.927590664999999`, 2.871984957, -0.902086089}, {-13.29725199, 1.614824238, -0.5760183539999999}}, 0.1]}, {RGBColor[1., 1., 1.], TubeBox[{{-15.416380467000002`, -1.816209567, -1.3421972189999998`}, \ {-13.572826940999999`, -0.99360426, -0.824135964}}, 0.1]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{12.246497957853624`, 3.0685954751399853`, -2.746137187945976}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-6.722156544663889, 2.7779016382106163`, 2.366613826345481}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{12.794619398752642`, 0.8941793854411175, -2.2073732160756716`}, 1.125]}, {RGBColor[1, NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{-6.433159180475445, 3.2941313453821115`, 0.13753857516490164`}, 1.125]}, {RGBColor[ NCache[ Rational[1, 3], 0.3333333333333333], NCache[ Rational[1, 3], 0.3333333333333333], 1], Opacity[0.4], SphereBox[{6.69474313042565, 3.371154632090539, 0.35274503086245224`}, 1.246]}, {RGBColor[1, 0.6666666666666666, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{5.8133487439212335`, -2.8399397032912703`, 2.853473834344274}, 1.46]}, {RGBColor[1, 0.6666666666666666, NCache[ Rational[1, 3], 0.3333333333333333]], Opacity[0.4], SphereBox[{3.662597535275366, -2.4735571287104343`, 0.8045516670690356}, 1.46]}}, AspectRatio->Automatic, Axes->Automatic, AxesLabel->{ FormBox["xl", TraditionalForm], FormBox["yl", TraditionalForm], FormBox["zl", TraditionalForm]}, Boxed->True, SphericalRegion->True]], "Output", CellChangeTimes->{3.5765572969837112`*^9, 3.576557533074526*^9, 3.5802184139413786`*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJzsfXd8VNe19XrYuDt2nDi24zjPaS8vidNeHMdJ3G1sgw2I3psqAvXeZka9 V6oQQvQOognUewEkIaHeC70aDJhe5lvnltGVGMnk/29+2po77Z5z9l673nPO HT3PY76N4zwPe6t5b37hNs9lvr2V+5ufO7vxrcf+C/iv+aTxb0IcGwH1n5F/ RnvxT7zz/4////GA4/8R/x4TWPlI8+7vpGPpbelI0Puaz98U/x4Xnw7/nm/+ RDp+HLdu3UJxcTE2btyI2traFwb/2VlTj4aJo2Hi6FfSR09JZzl37hyioqLg 5OQEHx8fLF26FFZWVvjuu++eM/1AGcw5pXVtM+qJB7T+c+n/M1ITopOTJ0/G F198ITorTi19WlJSgg8//BAHDhx4zswpPvyPG31d+v+kiTtqo2xAOhYNP6ac rrm5GampqdL7x44d6xvrf97sq9L/J8w2yybVn6SlpaGxsVF6Jb83XOpFRkaG JAWF6/j6P+7Ay0N3YLgii87OThPvBYmvp6en44033pC+HhQUJH7yn7f/kqZ9 0YjAkzhhUlKS4O0z0sdPi8N+XQsNDZU+uXLlikk8X2lQK4njMdPRj5RWBK9U SAnEKpB6TmGpOJtoSby6evUqIiIiTJ1ubW01sXmURq0G553aqK2trWm4gkQH +BXlJPfMnEQ8xLd4kp8ouAwMDMSNGzdMJ9EOfKR8ptsa1TTTHRVErygD0p5R HaTghzrIL+Wz3hjQP1VA4qzk1WNmEPoTpSO7du1Ce3u79ErLedECf640cE2j eQMtihCG6MvPFRhoz5icnGwampYbX8invaLptxkr8gul38KQVFVVKYCV3xPD VLnwuXy2S0OL+tdmzqbaY9G4+Il4NUI+24Whz/Zb5ZeqhmvPph3pCA3gzZxN 6CQb/72Zsz0xYKTi1Wfy2U4prB5MHKowxWv11Kqu9DFx+EN4FsdKEyfMiEaj jY9phqp27neDtvTEYED4VG4s2mQEFPutPiQ7NGZoSTzxiF15ygw/P5Fbixlg 9AYzhKOG7snTmp6oCFPZr9VktSda1H0sNxyrSEbbqtqjkUO3/s8hWtIi8uP/ bMyfmbEtqu0j1t4z06rKB9ExldMfPSTp4f0krR5/pliagV5AwFo0LezX+8r5 tZbmSYVx2t+Jh8Dr66ZG5cgIiWbG+eHQtmiYZkyqzN4btB8PA14oOo9/Zqbl N+VOJZh6+cGjAV7r6/9txrg9awbwrytaOQBfUofkvqF66Na/MGOq1PBOfFXw S7z6qWk4j5kZs9wPHB66rVFDtKVhqgxzqa0XH6XVCkVSQ3mzrzVNL1myRHr1 vBlcP2GGoXz8wPzbg0e1KBsEfwrox5qxaM8qmNdyThXBIP163sSfvnRBY3PF swKDYkWVB4tUxKdqQDF4555QYxDplUZmw83378eDM6hgaKyogYEIUNX21H5p o7sfmNGKx8135kcmFr0hv5U7dBemmbGFauqmVY3HzDf3f/JBkqnV35gxvZqw buYQzWm143HTCf+mNX8Ptf9LpblBAvDZZqyd2pzooeidYOg/h2zkv82wUDzE r9nIPDONPGdGXdW+qWx9d8hGZUgPHnWLM3DEloMa0b7kRsMQE6TVOPQfQ3bi taHBo9orkcOIt8QrlRta+6daddGw2gkV++J3wvGIV+8M2ZmfDA2tBWYa/pEZ JP99IGR//Aim1WGIk2vZqZx84yCGUZHCW+LjvgKIdKR6Q609eklhhJrEitOQ V0oj6waBpZLh/Z8Zs2TOlqtC7GzqwSKLpTiZvB3/Z6YzP1SaE8LWokrh7dty p1Z/D2yViO5v/2HnkuanoGH5SVxq7IH6W62FfFGRoRZhA6GuWJLUR8O0GnqK V38xYaUv9Vedwb7kHBzxKMC93ks4f+222jmtgXtZeU8IRoW6YjhXDI3pfz0i m4YpnWmoasXumVtwr/4bGO/dfXuIzqjhtRCh0pnlQxvT9wdt+Ml+74lOLPl8 CW7mn8bN61cVnXhMCkkuXrwovfqJGd35q9yLJUPL530zuqPKbIPTJnyzsQMP rn2n2JL+VlnW9IdzSHHqv2rMghmlUlrvK6Y+boYbP1XeS7Bdgc4oGuOLNxUD a64fT0gNqLGGRh5/kbsSr7FLAxlx6tQpiW9/UEak7YViLpWw/jGUby3B+aO9 GiV+HB1VXahwyoKx+zJu37mhdlLrRV41I6I/yyePGRq1wwb8Urz6/QB2yWLT 6NHutbXIcq3BtS3b8KCn7UUNojdPXoe7Rwice/feNWOHX9Ool+qF/iQ3EvkI pl0VpFp8EK/+16TmA7VNPJ5Qht/ZeB2p+27jwpX7MLY24vberbhY1apGa3Gf JOBG1kncu3kD/xyi31pNVPodPrT/eNJMl3+nMGwAEqRBPKWgJKfViP2dRty4 TFtQkom7FUWm3CTVYS3OpbXAePU6VLMjtFVNJF5Dny/S1Cz/KHc4ZGil/ccA Lsqmg49nlJ6tr3qAhvNG3DtzHt8yQjceazel5LHWy9ESfBDG8zchFRkfR5/S q4838LDHelU5uVpr1xSUofQ7cGh1/8eQ6v608uPmc0YUnTDi7LfEQXsL7mbu wNWaVjWdaa3qQOH8fXjQfhn37t16dcCZtAZMe3Y1ZT6ckoGrLVr1NTfKJ/qV 0lVIEeNvyY3oHsGYjFH4lVV3H7tajLh++SaMFbm4d7jYlG4IfVxjsQp3Dp0X +vhT86h7rE9NqAc2q1FkaMeVjExTzKT13a+bMTSyXYOfRjzaKv4AQ6PVAzl/ egari26j5qwRd89dxHcbGSud6MCKhDisj4+D/l0PXNvTixtXvhlY3DCn8/Ir eaDR1ktw0CUP19pu4/79B+p4tB5WPaXWHj1h4opcIIaP8vYgvlYty2pjmVEm fZY78xQaTxuR02PEycv38aCrHVts5mD2L38L/3f/iaK1K994xLGp0UMXnUKB XQbuNXEg9x/8eIixaQBm0lPtKeXCOjyHNgsTzaDHpGtP4NgVI7Y1GBHt6g3f Lz9A+JgPYfv2f/9U+XjAr9TnYQpzBrrENqphxpztuFtDlt4zqnGQ1i+/riiA 1uyqiHxq8FG6DT3KKUOPcktyHt569c8Y8f5Y2Hw8EoEj3oX1e7/qKwA+1v+I P2yqasPWKRtw++AVXFGv5TzfbyiCjuYUImvZamxwM2ALaburATtcSM4GlCxK w4X2biVwfkISqDZOV8A7xKidBzGdSvoxY0Cvn6TpaIPFX5bAYlQ33n3fGu/9 8wOM/ednSJm8Hn1hnKasJ1ubtDGpuFF4Ede++06+xPSCKUxp5AA3eRiw1SMQ uzyCkEHKcg9CjlsQcl2DkOcSiBznQOQ5GZCzUIdLbd1KTtW/vDzc1FdFOx0U DA0S4Kg/nKEY5YFIFN0OsN4Ciw+OYLL3HSSWGHHs6gP2uRKrU5di7kfNKLHc g2t7s4Z0AaoVSPHdjRr7lXhw5pgpJxRtLPtiKb7LPIe7N+7IXuBFlOfmIynA gJ1eBqR7BSLDKwjZHsEoIBW7B6PMLRjlpAqyp9w1EGWkCuKh3FGHuoRUlTva q5LmXJ9S/7XXeJXB4itzFme6GR0VD4t/HMAE62tw2HoPXZeN6jWfhqrr8BnV jGbG1XfYs6H59Ticp3eg98gDPGitwsVVq7WxZPxH8fg2/RQeXL8vs+wlnO/s wgoXT0Q5uGAfWZZJluV5kV0eISj3CMVhUhXpCKlGeg5BNVlZ7RaII656VDsH oDlppco6rdnvK2MpDPvUBPG+WuYbGkUyE+xN6P8TyY48afoxG7SYeA6WyUbk 9RhNMf/WlRegPszJb7jSZnv3bawtuY3KM/SUFy7hwurVuN/TpoawYe9H4MLG HhivPVACwGdQkbwKq1y8EOPoKrEq3ysUJV5hOOgZjirPCNSQ6jwjhqHBK0Jo vVc4KQxHPUNQR/1scNejzsUfpw7kQRWMGlOKh5pkqZdVHqke/crQFnja0B5j uMKSxqpezP4XDdSINkwPu4dkBqXPqJxwPCX95JvYZLPQU6/liFhwRcFtXLxy D8bGKtyvLTeF2JuZnp5OpX2+onLzObRTXzO9dNjjEQDP+QuQK3EzHIc8I1Ht GYWjXlFo8I5Ck080Wnyih6HVJ4ojafGJRJN3OBr59UbPIDSRqw2ufs9r7JY2 slBnPigqLRdp5WtBj/dB5JFY/eOhWT1T4cNA7yseakC8bcNV2PrfQnyhET1X jc+a1PMy5n8mo+BOW4e5xp9Wzr4sR4Hs+Usw1pfhXnebKQxJXbgGvYsaYfzm vpKQP4dMT39ke+nJZb3E5UJCs8IrkniNJodj0OgTg2bfWLSROnxjh6HTL4Yi 7fCLRquvYH4EuR2KJsFpCup8dp4i1Mel6wmawE3ttdYK/Po/xvMPzTBZPJSK 8yyT+pubnKXq+8HWa6b3njEZEX4QPLYBHbZJuNXcKmdh6jyVFgHewjsyeBsq cb+mTAH241g8fyXaI2tw+9RNXL9zU8bvT9CRk0fOCu4GkkKlwL6EmD3sFY0a 7xjU+8SRs3Fo84sjU+PQ5R+HblKPfyyfY9DhT1z7kcW+4WRxCJp4nkZPX3Ne +j9n4w8GqMNA96TU0OeY+ak5HVcDYr19L1ZPO4QL8esUEzYcy3PvoEpC5Dcw 1pXiXlebSavibZPRoD+I+8dv4+69uz9VTFbl8hRke+rJtmBSOFztFiDfIwJV XrE4SrY1+saj1S+BLEogqxLQE5CAXoniSWRnQCxayL4mP9oC3zCilOj0CcB3 TJRU/mmvGP3qP+bfcwoMB0lStFOYxMfi1UBeDnZqNfyOcj2FnLmZ+G5frsLL ZyUYphTfwTcChvWHcf9IGZKZuq1j6hYweSGdcSHTnVt4cP++ErK/gmx3X8Y5 xKBnKCkCbmRmgbCh3nGoIyObych2/0R0BSSiyTkUtda+qCPVW/ugzsoHR6y8 0BoQgyZ/YtGf6u5HLPrqcT4vz5S0auc+/FLjzwdE6SrXBrGQ1iZV7PvJqyYT eA2uX7TgqM0amsC2Z80wTs39lufdRbXIb89fxNHkKEx789dw++PfsGaho0je fmbiix/5ImLAMFIkYhd6MA8IRJVPPOp9EwigRFRa+SFvlBUKSaVfWaGcdPAr S1SMmoeSkXOR/+VsFE+cjxqnADQFEGj+BpzPz1es1MPXcoWyKvyZMDQvIpUh bUk5i5gJR9FjGw1zg1ZzJRkZd7F+5Xp4ffEhQkZ+BNcPfv+GOlg3GiLG/9nu 2sEGodonAZWOocgaaYlcDrLoK2uUkQ5+ZYNKPld9bc1nDpoDLh45B4UjZ6Hg y2konWTJAQf2G6z22rCqXcpgLYYebKwysOCFJ7B1Zgm+iVtpdrCPKacR4epb P/k9PvnHaMx77wsEfPwPOH/4v6bBulKyjOSz3cNJUVjm6Is1zjqUOYQg40tL ZHOg+RxUydc2qCBVkqpJNRzska+t+NqSTJiL4q9mkaajeNRkVEyehfMF+f2u WKiIVyLY0QMGqaZGYrB5eXnqNBXLj1tQarkL1/ZkmWIo7SDVCwcB1imM+nPx 9/+zxr/f+xKj//EJ/D8LQuFkK6gjzXLhSCnGbLcw00hX2nsi/Yu52D9SHmmh EClHd+hrW4rTFkdG26J2tDzaao724NfzUDp6DmkGaQpxboHmqISHLocI7Coj /UrRNHPTejTzHtWrlSJJ8fuqGS209kxS5HDk+X6DljPgZFiMPQWr5UYUHqO/ XbIEa1OXYdbfq5A5YROu7spU0t9X0ZmZj2zmsNmu8sBT7bwQMsNKGniGNHBr DtyGA7flwO1QNdqOA7dDDQdfw8EfGW2Fw2MsUT5mDsrHzuTzFH53HCNFf5zJ zFP92e3bt7Fo0SIJysrYv9RI2UxOonpHAQBVGVTJb029iGWTq3EufqsSPDz9 UOAdYL0aFv86iClet7GkwogT3z0wFTeEDXR7/xBqpiXidkurbOBfw8X2LmQ7 0VvSeGe7RWLRNFsEkxc7yIu9X1pRt61R8JUtBWtLYduhknyoFvwYQzCMIfTH WuPwWEsctJiDCgvyYuwUVEyZzXjOgAY3P1zt6DRdRRQMEfWFNWvWIC4uTqqB q+CQJwMocyQH1fUUhRlhTqewb3Ye04blMjPUGGzclIuYv86IspN3TYXSAOtm xH2Rj9YZ/iYIHE5K47Cp5a7hWPHlDLhY2mDL53Oxixq+f6QNzZkttdeOYrXD wdHzcZhDruSQq8ba4LAFTdw4DnkchzxuBko45BpHb8ZYDBQ8dTifk/e8Eh2q Ixa1PoFxIXNxrUKt+ymjVwb/ydCDX2WS5LewZ0BfZb1FBPRqmiVXRzbD4qM6 TA+6i5Tqvul3oXYd2GGRjvMRSxTX/qpUpjrgEIjtUxyQ/MV0OJMFG0bMwbYv LLHnS2tK3gb5gg1kQRmRX04WVIy1pZRpEjj8snHzUD5+NkrIgsM2LnKo6cNo 3puhppfvM4qiDmSBKDKJyrjKAq3BEwMWk4jMrRGQQdRvbp4ZHq1VeVR9A6EW Dei0TcTN5lZJCeTY7HH0fNunMYApEm+ouoL5/6pC+ZQVVJA2NQK62NaDzRMX YtmIaRKLVn02m2yah+1fWGGfYNMoG+RROQppJYuoEMUWpHF0hmRR4fi5pNko nWHHiCBGDin96Ol9g8kqf9MMQXM8In9UyYpxijRTWAl14uMQLHpPUTdz4bn6 81ST0gxXQlKD/TGEjVwHp7++C/dJE7Fl8RrCaRez9napkbX1d7XRp7ngUw3M /f6lx+IPUxD8SQlaZoaoMdMuKycs+/dkOFjZYMmI2Uj9bA42fD6PpsYKe2hm 9tPXZI22RjZNSg5Blk0uZpGLWdSzopn26NTFoUUbS/ozlvTT4Vxujsm5D8JJ NR7QTtnsw0RfAUiORpQLdU8PuaRFnfC2eohg8k+vvINJb76Nab/5WKrBTbS/ joR8UbTU8PChlOEJRezef7HFtVAXBNp2YM3X+3EuIln2q32dlmtVr8PB2hYJ n83C4o/nIOWzeVj3uSW2jKQVJ0vTydJdY6ywayw9nIUlaS4O2XnjmD6BLGUu pItlNMZ8J4DgDKD+BuhxKuuAdJVSXFMdwErTrDkly1NY1Z8J4iHnSsqF+u+d qydaEGCVWDtoYPMEUpisvPPG7/H5L/+JyW87wnKZEW66hIF55WAQ7SuatyLi r7a4vXkJj7/BnHeqkTtxHa7sOqDELv/d71zqc5Yr8yH3QOk4bZoLltM3xH06 B4vpO1LoO9JGWSL0b18i5g+fIPWdL1Bi50tGJ+E4qVefiE59PFr0cWjSiTw+ CEX2ztg7fQbCXV37MfkFBRraKgU/f9YkdIW7bw/NXbVuqZ11Mzh3n0R1RQX+ /safMZtxsd2EcQicOxoFfnYwnuoye8l+WB9en8KW5H1Y9Y4tHpRkKmHZNXh/ WIG66bEi4pDZ+nBVv2LRcqxw8JSOVzj6IdczBiVML7MWBmPHXB/stvSB1Zsj kf93K1z+eAqOfGHDdo8ZktikYGmTdwRyLV2xfSKN8qTZpOkomm8v2KgmFyIK 1c7AFhHZQ6z869CsVKNt4bvU7qeazqEuvIqzXo4mfTnCvP0x8fP3MdvifWSX HJQGdz9/p7h+PRg01ZqTYOPeD21hrM4xfU9n04bFI3NxKny1MsfnNem3wtSJ h5ujE/znO0jHnvMXIoNZWjF5eIgpeq1fIvSf+mOXZTp1PxA7pu/Fxkl5KB4T gZLJrtg/0RbbR8/CTmZlRQu9UOMbiKbAEDTo9Kb5RNp+mks7FM/zpwEsVBcI iGfGszuGMJUZydk45JKDB13XcehQBVamyPMjeumstzYqhu5x3C4rNP3UOKBY t5WMK/+SjGvKN9WZpr9diT3jtuFc+CJFzj/r5yPEQ+iceJysb2QYrJeO4xZ4 SIws9IpFBXN6/098UOBUjLsdd3E4aiWSZyTAbW4TwixPM7DaicIv/VFto0dL II1pII1pYITExHOFRWoqJJgiHn0LpPCWonbmCkHqms900zhVd9FW1Y4sy524 13ANxvv31Shhdfk91F8w4t65MzAeycO9rlbT1dUQ61g0T5iPe5d6NAnBVTi8 V4nDU5cK9ZTN+s/NckdgfqA1PLxolXQsImhRYlvvYsCiiUyq7POZp91Flnck 1n89FznzPFHpEoIlLqWwsrmNhDld2DMqDYUjfdAUxGgkKAz1gcEvDQhatG5X tV4K1343iKIOKJ9pl7jtVsbcKKY9TVqDO4cuwXjvgfbqQtlpIy5cvUv0VOLb dWswoJTEwxOWCwbAVijraUR8VoS2mYFK0eHJwWIQxdD2P+uPpBA8i8nXtoU6 uM6zxy6bvbjTeAfFYctQTjU+GpCIelKjTlACGum2F7lXYKHtTSTPrMf+EYtw cIYvThUWyQgfJjU63GywonDwf4Y2dZkmhLQi+fNluJF3FpevXH5GiRTzOowo OG7E7UtXcGvPZsk5DPST4tmZ8Qv65qsE21Vi2ci1OB+6/PsCX7mll6WPU6MS EPLeeOjfm4VFVksRxvj54JINKPWNw0G/eFT5x+NIQAJqyJtaetcaQxyOUAur A2Pg7tAND5urWDO1HJkfhaF9xT6TSdOGgsqc/l8NzZYc5ZfRH8bgSvpx3L9+ WwnDn0UD7cKudmGuHuBBbzvu5e54iB8BMj9MDGmouoSkxfdw+di3pkrcIEGX HF+9LjHE3FcK1h7A1hnpuHXkFhb7hWCxky/yvGNR5BuLMr84VPiTWQH0Bww9 Dhpo0sigcpqp8sBI7E8uQVjcA+itLmDzhExUu6zFJUpeO0taNebUSgVCb5ox 9ZpL+SsUV1FbXojMzauxLsqATaStkQZsizBgexiPQwwoXLsazYWF6py9zU4b cW5NO4xUxBeUyFJ4APXxoDwLt0oKpGOBzrj/k1mqFkQ6z8qragfjk1BDmZcv SN8RRRZRjVC/o83NxWyQ9ZO34sahGyhMWI+NrqFwpqFbSUOnlhsKAmJRoI/t i4V49u7CUpOZaGg1Yo71DUTNO4H0MVtQ7bBCTGU0LZYQJX7BNdH2MA133xhg DbUpnOpDkpVxnDnejZytadgYR5bGBWJnbCD2kfbHBCErOgg5UaSIIGSH0dCE BOJAkAH79QZ0FBQqyvA0ku1XojexDmcqO1CXXYTVbgasdzUgfwnFk1WIpsxC GbZ9qYcyO7lOeJyzZ6Rjqz//CWNfeV0D8idNXB5cEubrQqokHlOiRmG5V43f gO/KrsN4V+FuZgnS6Fpc6Kg3eEVgp08MdvvFSO3vZkazSxeFtsIynO/uVcIH 2dxv2XsfNra3sGh2G9Z+uhSn0jJNAfeAxRyKPF5XopTBEkLl27JIXkJjRQG2 xuuxLcGAXQkURTz9YnwQ8uOCURgbjJKYYJRFkSJJEcEoDQ9CSWggCoNJBgPy /PW41NX9I8XgxjOobDZU4M6J77A/cSn2eAThgFSPl+fj5LgIFxKITEc9OvcX Drx4aXI5ishKT8vvtW1fB9c/vyUdR86baBLrUOIYKDJzhS11uohQ0BWj1+Ba 4TWcv3JFNXFZezLg6+mN2twyHM0rk5o/03XM3JVBNTnclmFEfMQdXO34xjRX UzsLWrHf37M7g3ahslpdXabY76Jtq7AzQY9diQbsTSQ7SfkJQSiOD0Y5pXaI Uquk1KpIw1AdHSySJUqwKjIIhyICURFOCjagTK9DbcoqpZdP0bjm4LBrLu4z rC1blopsT3nOUAmp3D14GA66BZNhYtpQKaVY6mRAXVKaNKNq4PwSk40ZpvR5 in2SyTB6v/c+kj6aiV1hKVgaFf+QTAaTm7Ya96RGbktGrsKV3Cu4duO26q7U gFA8zF0fV9/rPX8bp6/IdvgHyicDEwKhM8+Y7Imse9+3t4Wct/4EJRTV7kQd xWTAAYoph1SYGISyBIqJ4qqKD0FNfCiOxoWijs/1fN1Aqudn9RTl0dgg1MQE UnQGVIXpcThIh4bU1BcUQ9Ne1YEc612413gNh5elIc+LuukVjINiepKnPFXp qIeYdBPC52DUUAmraC6rXPU45BiAb9u7zE4NekzxiH/+2R8x9kML2EyfCltr a9jP90aowx6smp2OLSMTkLdgJeqS9z1ShCTLKuGzFbh04DJu3byv5vtiIrMq r75o8zVFGsKTDJhy99AVM41cXhpaLmukj19F6bZU7KNcMhL1OJBkQG5SEIoS CfPEEFQmhOJIQhjqSA2JYWhKDEdzUjhaksLQuojE55akUL4fgkbKsY5+7Gi0 AbUROlQHB+BEQf7zim1t4oi3Tl6LO4cvUz6rkU/ZlHmFotIzDDWe4agnNXnx 1IK8xXMYmvl5PTWvziMQdW48pZO/LKKf9hORGjls37SHonGGnd18zJgyAV4O c6XP0g8asWSLEcHh95DifRFbLKuRTkUpdlyPpuQM0+/NyOs5jbxiPl6Ci3su 4u6NB2rdTPxCTDzvU29z61775zR99UtzcJM1TxHhoBn5OiWGuHC8CxkJAdQn HTIpu2zKrjAphLIjYymv2gQyNpEpbVIEWhZFoG1xBDqWRKBzidhxpXNphIi9 loSjfUkYP6Mck4Qcg9AQa0B9pA41If640tOloOxl2TV8sRw3888xna1CrlcI SimoSgqt1isSjd5RaCW1+0Shk9TlG0limz4RaPUJk6a0NHoGosEtgO2laPgm T34cKAV/x40o3X8dN+7ceUIJebZXGJG46QF8Ix9gScAVbJzfgp0W27DlgzBk +CxFT1mdaem26G74h4k4t+M8HtwwSlJ7TAkphIA1AJIUTSsuNccwV7CXMa00 84RpQcWAEsB6BaoZcX7IpJCyqWA5FFA+laVUElA4aiiY+qRINC1iyLMkCh1L ybRl0ehZLigKvcmCInkcie7lFNyycH4vFM2LQ6h0QWiK06Mhyh8dG1aqMor9 KBZXdh/HhYZW5FDJCsVkREZZNV5M2r2jKYcYdPjGoJsRVy/pmERszo8y8yNO FDk1eRrQ6C4vOZBj5CcfigQNNpuxNeE6rlxTF2g8/1Dk6OC3DEs3dMAtisFA 4A2sderFjsmZ2PFxLFpT81GdvA9asxj0QSxObz4D43WjynvVLAqv+LMBrkm7 8cnzg8tK/UhkF1OmTMH69etNGrt9+3aTuNcq7qStIg9Z8f4Umo4UiDwKrYga dZBCq06MRB0F1rRYCC2aQiE3l5ObK8hJ0vGUGJwgDeP/aPyB70WhZ0UkOpbT rC0ldyXhBVJ49GBRfjicvRdHmXCtZqK1XiRc9HBbmGxtZbK1hclWgUi2igqx zXkVzq9txzdHO5BN95ZDyRZTspWUbJ13DFrEdD0/eULZMdIJZo4nJYrFsYAY dPlT+srsqAoPHVIdnOHv6tZPon1LJ7sQatWB4z1G3LxzU41Dvz/kfxoNvUbs pcldGH4XESF3sMrjLLbNKsPOz5ehcGEaGihw1eFtcUnHyXWnYLzWt6xfXc0j zqkuQVCXVGuWeptAo5V2n/d7XvmlusRMkHrWDdJnLyIjxofxPTWT8X42XV4+ BVxCAR+igGuTqC6LybClVBcKtzuZTEyJw/GVZCjpVGrsMJxOjWVGfSqV8l4Z jd6VVN6USLQm05UtozVdHIz9fvOxxGosUpxmYBuzu10iy2OGd4AZXiYzvCxm eFkMQjOZRiR9PRPbpjqhKDIRe+zdGHSGIIduUUwgrPKKQYOPmJIpJg3GU57x lGsCTukS2A1dPDnazdSplsqb5uwJ7/kL4Eo3uMnZnZBbpgR5z8L6k92oLnyA azev93N7Qp4CBlp5PmOyi+IyY/h9JPt+g83WR5H+1VqUOG9Cc/J+7F68GnaT J2LEz3+GKT/7DcqDDsB41fjiAAfZF+0/ZtpJTY6r1DZe1IrtiX4rAwsKClTR rVMkd+FYJ7JifSk9PaXHlIqBSgGdXWlCJCopuaOLotG0NBbty2PRtSIOvUJy qWQZ6XRa/DCcSYvH73E2LY5HsTiZRs1dRQ1JpUZTghWxPlgxfxxS7MZhFWmt rQUOMBHMYRyaz5SikOlEMdOIEiaCJUwEV4yZib2THZDnE4CNo8diwygLbB4/ G7kekfSP0aim5MT8xXZKTsxbPBGQSMkl4jgFd4Qi2+ziDT/7BXCfby/NgawR 8xf9SX5BaPTxe1zRrEDbbdi55Aa+vXZ/0GzgOSWMGKAV2FZuRC610ot+c5Hu GjYs6MC034zCl6++hRm/fgv+730I/RfvqjMlBe9ramqkVz8zI7ifacX15ENr bTQiM5nUjvJcZMfSpMZR2xjYZ8eHUWYRKEskvCmvuiUxaF4Whw7KqyclXpbX qgTKKwFnVifg7JoEmqdza+LxOx5TA1fH4jipOy0aO7zmIG3BBKwmrSFttJ+A bRTcfj97lFBo5RTaQQrtMDPAStKacTOQOdkeh/11OBhuwI7xFthuMQ7bR4/H li/GMZpntCkmnfoJoSVIgst0N2CJozvCFzghZqEzo9dgdOli0auPQ7uOfQ+g Swig6gcEU3D+pmvbNRXtiLDrwcljRq20XjRvvkxXOo8bcYDy+sv/jMCIP46E 1f99iIBRH8L+n782TWdV/aLgspokDIz2xUPK0KQiwn/194ZasaneUCs6OUf4 BJ1leRQdDWUcVY35WU5cOEUXyTgzGlWLY1BHVWtJjkMnxdabSnxTbKdWJ+LM mkSKKpFei7Qugc8JOLeWKriW3oki3O0zF+sdJpAmYgNp88KJ2Enx7bEfj3z/ BThE0VXFheAIqTaWYZOfF7Im2uKoTo+jtKK1pH1TLLBn0njsmcDfWUzA7q/G o9hBhx1M7BId3CSdWu7kQSsagh7q29nAJBL1z5CAXgPFq49Fs47mQsc4WUfP 7B/QLw61+ywDtaVGfHf95o/Mi0y9kmM3aTre/9PbmPT2J9CN+jfmffgb02RZ rVN7RRGxuf141LzuZeWc2rxOfR7WX4jajQQeMyNEeabDx7IQYxjOUBeyY8OQ GxeBwvgolCfRQC2JRd3yOLSsiEfnSjKGAjxBAZ6i8M5QeOfWCQEm4oKg9RQi 6fS6eJSFu2Cz4wTSRGwibSWlO0zC3oWTkLlgInbYTkCm81zkO83DIb07ynU+ yJxgjUadAc0JInEkJdAWTB+PzGkTsHfaRCyfPROuzLAdbWyw0SUA5d5izghd nn4RThoW4bQgCvEM6WRgAnoUITbpxbX5QOydMQfrvv7KpGsG6+3Ys+IWrl5X 5qxrluMOR3X5IdjOmY0pf41Ho/16NO7bYJrZLoygmieo1x+0S1BVldFepn/Z PEYGyEy7iFRNA0XQnJKSIplZtWhyIMwL2VH0cbRZ2TGKzBIos0UxqF4qZBaP FipdV2oijqUlyjJbS4CvS6LMknB+fRIubBAyoww3JKB5KcNKx/HDGEtOxP9i q9Mk7HScjH2OU5BuMxbJY/6JjePfw97xHyBnwgcoGPcBisaMRLO/Aa0UVTvz x/bF4WhknrjO3gpuFJETaem82dg+cxryJ05A8Yx5aKV/69QloYciO26QxXaK 4jpFvRN5YZ1rIA7MtMeGMVOxYewkZFvZ4kSmOv3gGKIdTuDkiQfmLmObIsfk ZlrsXXhQWmaSlzZPUDefUPc1Eun3wK2pTIL5L5NtHGAgtQuzh5tpZZXi2w5t SEF2JOUURSxHhyMnNpJyikb54lhU06fVJQs5JShySqLxS5LlRPmcI53fkMSe XOD/P1JOicjxn4edThOww3kSaTJ2OE3FHtI+GsbU8f/G+rHvYfeYD5BLIZVP +wC1pBa7L9HsNokpSQT2BfvBx2EB3BbYY53LAuTMm4q8OVOQO3sK8mdOQiH1 rIhGs9YtEG0UVJeewjIkMXGPxpEFASic6cjzz8aOsTNRutCbAQl9WmAYGg1B uNbdLY16wedZqKeHundfWXE2TE4SZS41VJ2E7v19uBIYZZpVLDgnEN5nBIf3 23JW7EYgfJckp4HbGohnRTravFCNLgeW0ETwIu9t8wI6S/KRHUHpMFTLjgqT pFOQKKQTgyohHVq9lpWE5qpE9K5WpLOOVmb9IkWT30LbskCkO45HOhVHPNKd pyLdaToySBunfoBVFh9i8+iPkD76QxTP+gQ18z5Bh/NIZLpOgbcdVWW+LdKD fCmdcCmr72ZGX2w5FQVCMqR8Sqdo1iQUT5+AgsljUesZhfx5ntgz0Q77Jtkh Y5ItDi/wQ7NPJNoD49AcFIOmoEg0Uiqdq+UYK2T+HmSk3cbVG/d/qbBjzl93 oM1xLR6caDWJQRuU/0QRg3anIDXBes2saqjM1+6G8ZQZ5q+U3vsAHcV0O6Fk fjiZHykzP5/ML6NqVJL5R8n8ZrqcDjK/h8w/RrU4SdMlmH9mwyKJ2ec2yiXz PL+52EV3k+48WRHCdOxmZrXXfhLWTf4EKV9/itRRn2DLnNFIsp3JNMgaHvNt kO45FS1BI1DrbIEK21lkngc64vRMC6LQHEO4W01DniAKIncmXdbEUdg18kOs HzUZe6Y7oni+PzPsSLTpE9DGuKGVAmgKjEF9UBQpArWBobja3UPQn0C882mG d/d/ZbJTLdg7MR3GsmKTD9H6FXX/C+20vD5tGtaf59qs6GkzPJfnWf8YF3u6 kBVCVx9KnkeE0XVEIJ/mqJQ8P0ye15LnTeR5G3neRZ73kufHCfiT5PnpDX18 P0O+73IYp6riXqdZ2G4zDsumfK1Y0TeR6jQH6uP4opE4uWQEWgI+Ra39bNTM n4Vqu1mo9bBDD5PjYidL7J1ugS3jvsDWsZ8jY/JXyJ0+GsV29qhhQlvH8KxB ECPqBgP1MjAWNUGMTojzqsBwHC+UizQOI/PQVEXL88Cosrmh6jRCPqK5CQ43 sVkbHqvbMQt3IOo9Io/52eDMfWZQ5v4ABwwMhIMDkR1GxkZHIJf+uJj++NDS ONTQzjeQsa1kbAd9cTctyTGC+fj6pGE4SfP+Fk5tkLG8a+F4GcOO06TnNIc5 MBCvLrY2WGBjjcDpMsb3e1igNHQ6OpbPxumVsvE5tWYUWn0noWnhXDQunIMa uxkonTMB+2eMxtbpX+EAGbxvjvCr05BjRZNvOQH5s0ejwi+OKU8cKnVxqCKT Kw2xOEgcizkFZYERqFktJ9ihCw4ga/0dXLlx7zcKJ6z/lo5ulzSN0egf1Kpx jzaoJZP79hJ4uT+3tanHs5rzCf8g9GCFAuV2RrJZBnI7hJ41ip41LgqFSTGo YMRazeinjtFPE1OOVkY/HeR2N6HcS44fWy9xHScUdm9nNLrIfrZ6td/Hzhqp DvOwx2Em1kwcicUzxkif7A6YiJLoqWhIs1Ig/hpa3Kej1noqKmaORSm/d9By InII211ff46q8Z+jfMrnOGA9DZnWU5Blzc8sxyLXNxYF/rEoCohFoV7MNohB riEa2foIXOrpVSKdU1jkcQ6nT98xua/2jsumgEPNu7cmtyJ76g4YywtNOBZA 3bZtm8Ik2YZrQ9OBm+kPCEd/PLgwnte0oApXvkD+I2QEGJAVJNsU1Y6XMm0X NqWGNqWe0G8i9FtXC2HQtqyVmd++Oh4ZMQbp2IH4NthZKjXl/yb+Z2Of82zs njsGu4jRFbNGS59sCZxM1ZoiHXfuscbx3VOl48Ozx6PedhpaHeei1cUSjU5z UTCLqf/48SiaNh41C6aiKSUc5UFO2Gc7EfutLZgL+iHdLwa7/KORzjS9ZNUm tBSUmtIll9HFaKkx4u4DNah/Bh2dl5Gdcwzu7iXwJHmRvN1IriQXvnYqRt6B Y2qc2VB1FtGf7MXNNVtNNl2NErU6o80VBplIPkA42vxOrZFq87vlyicXu3qw XxeMzNBQZNEu5TC3K6RdKmeeUMnkvIaaUk9NaUpL4DOT7ygDvB0XynJ4Bats mH/bT8EO8m/7whmybXKajfT5U7B73hhkWI1FhrUsg9U6pnbxsmwObZiN5lQb 6bjL1RbdbjbocrNGu6sVmlzmoY7pn6xJw6mo4aRQ6VVTcgDOHs5RwuofoPJQ L1KSShBkk4XczXfx7fVb0iednZewPLkOnp7kO8nHowS+JH/KI8C9ZBgCKJDH EUCR+DuRHIqRv79XnZk0/++7ccJ9pcbMDMeR7ELUko5mFaJOUGZhv/BRDVF/ rIhHW1JhGvFoKqXNHF4YVGp/QlnKGmQwfNgfEY5MqlROYhSKGJeWL4tFxbIY bA7TwdNxIVwX2mNTWADVLRwta+LRujYem61GY5vdRGyzn4qtC6Zj68JZzBRm M/wZg51Up52zxiB96gSpp3uYiee7yq4m18sLLUtl1exxp292tyXZoINia3az ZHo2D6smTZI+rwlzJWKYgacpYksJwJnKnOHKwP7060X44BerMf3v27BjVZ30 bhc1x8urGN5elBbJjxRAyekoNT2lZhBETRoGA0U3HAaKTu/Mzym+tMRadLd9 Y7Jzeus8JiO0cxV5SpT5LM529iB3+Wps9AiU9rrZ6R6E3W5B2Muscq9LIPY4 G7DbUY/2A4WmpE2NeQXrX1JwIFyU6qrUpZ3/uXBfHFS4r6A0dR32BodhX2QE 9jAGSzH4w23hAjgzLVsV5IeyZUy3qIpHVzHYSYtD/WrS2jgUhDpjC23XFrup 1MkZWG83HWlzx2HNtC+xbuoobJ48Hur01moHW9Q72aHZxU557wWcXBmPEwHz 0SsCLw9bdFC4Le7WFKwl7aGs2xVO09C0hoJdHUYKkt67erJTKUe8iCXxpXjr jWx89adGOE0+h3mj6xARsI8SLZak6kvyJ+lIes9SGDzKEEgKci9HsHv5MP4r wxP8X4ogCjuQog50LobBIZcCvqiawy3JtVg0Yi9ur9uolGRewLnObhQlr8Z2 r0DsIO3xDGYUJJb2BiOfVOAajEKXIBRQ1vlOgShwNCBX2c9ILaZoQ2w17deG 2EObXjUg0eY4L5lBkjwN6S2pXrg6IgbO9gvgaG+PJD9f7Imjf2S8XUzzW54c i0MrGHtR1lWUdTXlXE05Z4U4Yf28cVg5cwwWTRqJRZTtytljsYZRxo45s7Df xhL5jAnLF9ig2lHIeT7lPB9tbvNR6+6OI0lJOLvUgF7P+ej2tEMnZd3iQTm7 aeTsQjmvpZzXhlLeQTJoZBGLJQti6eGIv+zH+P9diyCLOtjNuoKJX5+ieAup uMXw8xZiLqOYK2DwOoRAz0oEe1QhxKP6MYR6HqHlDPWsIlXyrUP8qEISebBr IQIdM0167PjOHpzxTla4Lv7/EOcp511eeuwWMpY2ZwpGDmVdKCZauUsTraR5 VocEuQahgvpd7mJAhbMeFQ46fNvebfLg2qKMOXn3zaZ5ub+IzW1hrK3ELZLe G212WuqRrDxsC47AjsgopMdFIyMxBtkUeT5tdyFFXrIyFqWr+Do5DFtCXZAw +yskWnyM5GmjkTpvEtbOn4nNDla017OQbjlXEneeJG5bVDnY0XXOpwu1p7jt qcL2yPeLQPfKRJwMc5HE3eFpi2YPG9S5WyHDZqYsbrfpOBLjhKb1FPfaQBPA tyTvh8VfomHx3mGMt7mGGX5tKB7rh3tlGfh45Gk4LiynvIvg711GeR+kvCsp 7yMI8jyKYM96hHg1INSrEWFeTQjzbkK4RHztXU86ys+OyCCg8ENcc7F2cYUp 5gm0LkLF3C0wHswyzae6QOHv9dJR6AZSILKUbaZKPMU2UyHSNlPVHqHDUOMe SozVuofwKBjVtPXVbgYccRXTgQJwpb2rHwZUzVR3dtVulch05PXBhW+uiBgn vffkkPOS5dbfw1lG9XnrN2JTVCS2EAzpSdHYy9h475IorA31QiQzjYiF07E6 3A0ZjINWzRmHtHmTsWGhNfYEBmCXpxs2z56FnfPmYh+BkEsglBIIhx3tUEsg NLjao4VAaPNgsuzsguKYJJxMISB8bNBOIDQRCEc9CAQ7BQgeBEKsk3RcnuCG nVGyw7f4tAkT3W8hOpux1SUjYv6xELfSmPfduIz8nA4KP09SeH8CIMCrliCo RyCFHuzVQhC0UdgdpM5hiPDppBwjfDtJHaR2hPu0IsynScaEF42CRzFC3A6g p+O8WnvaklyPFV/uwe316xXOMavwDEAm7UCmt7rbWAhKvEJx0CMMVZ7hqPGQ ttBCA6nRS54m1ugZhnppD61g1LsHot5NRy759bP/ao1LvUg58NKYOl9H1AKG AMbLA4AhagFRGmAMNhn9KSXuP93bi6riQuid7OE2dxrcLacgIcAVmxjJbU+J wtaVjNP3b0JWbDiyg0SmGypluukertg4axa2z5uDvdaWyGbKWkxAHCQgjjjP l2PqJyU8lHrrGE8nojfWE63EQiN9QK2npSlGyHGwQHH4QmxymK3E4j/Grloj eq8+kDoZZx2LY07RMPYckV77e+6n/Asp/8OkOui9momDNmKgkxjopoB7Kejj FLqgE4j0OzGM/45zzJF+x0g9Ei4EHsKJhXDPwwjzyENJdqu6Cs713b0477fY 5Hs7cvNpAgKQTXOQI81tCUGxso1atWckRxOJBq8oyj4KLcosszbvSD5HSNMF m6Sdv4Kl/Qsa3QLQuSTFhAVtGqZO6FMnlCi7V5ibvPdaf0hoc+SBFSYBiTAN JAabIvPUI9gTOQp6Axe7u5GpNxASIt8Ox043F6yfORNb58zBLitLHCAcChgX lNFRVDIuqGFcUEcb0UhHIR4tHvOZWMSja2UMWhgL1nlaY830T7F4/L+QMvkj LJ8+DstmLcASO3/ERqRhX4t6+fCH0jysjC898SB/j/ROfk4L/D2yiIVyySbo aAsMxEKQZy8xcQKh3qeIhzMU+llE+J0lAM4Re1H+5/A0ogLO8ugMIv1PSRCJ 8OtGuG8LgVGLcK9SOo29Ml/UKmNtdpG0mEE8VAA3ZvatH5Rl9VOEWJdg6wgX nNu5SXony9OP8NFJe28J+BQQPuU0GZWeUaj1iiZ8otHsHSNNgGsndfoKiiaJ CYuRaJG2NWMw7KXAyMNXbIOh9S5qZqjGgtpkfgi4vGIGLkFm4DJw9rcWLoMt xpArla+jInU14RKMrDBhPSKwdtp0bJo9GzvmzcNeGytkz7dB0UJbVNB6VNKd HHGdj6MMI8Wj0X0+Fc0VBxcnoGORN2q8rJBAmCya9D6WMxRd6hSEZE9nHFge jCtnekwBXODb9ri+eBWM1y8pMGlFgEc+dIwDdJ6NpE4YPI8hyOsUQrzPIdTn AkX/DSHwDeFwibC4LGAScJmjiArg64BvSOcRGSDgIqAi/EoDPQ3th3c2ejrP yiz5rdTtjR5yRWmHB/M/xgUZ7nIWc4BxYoYzycmAg0lpuNgmX7AKm+CI1F98 jd6/f4qD46YgW9oGzyDtOCbm0hURLAcJliOe0ajzikGTj2kLPHT5xqHbLxY9 fvLMyU6/aLRJc+mUvfDEJiK0X+dzck12R5spaGfUa9dJisuSP+2PHG2959UB 4BPI0Q1AjrlZQE89gjH6gZJO7/MLwoGgUGTSyGywtsHaGYxK587BTqt52E8j k2tP5DDJLHdSE8zncMTNDjWkWndb7NWFoD41BkdD5yN+0kdYMuNjpNmNQIrl e9gXPAvN2WtMXpkJR5sNLWV7laLGryF1WSlBI6oDNdB7tPK5h6A5hSDv8wjx uYQw328R7sfIzv8agfEdAULSfYdoia6RrpAIHp0ADm2Mfw/tTAvBc4RgK0BJ bpNiU38nZZbFzCxFVike++gxshhB5JEKGV2KRwmzyxJml0VEUCERVOigR8/+ Anj96nOs/5crbs51Qs1sumMPeivPIGmLtRwip9gjCoeInFqvWDR4x6KFiOnw pf31i0ePfzx6JZJnZoqt/tr81L3qxP4rISQDelakmCoW2gxWncwoJiarFQv1 ovYA9GhLE+om9QI94nQCdJS8utn2IAB6lLVCP1TQeaGrR5J/RmgY0gP8kTp1 BtbOmo3NDGLTGcQK/OTQSRUSPyWO8qK/gy62TOdscMjdBrmujtiXEIu6FAPx NhlVoY5ImPs+0ty+RsXWeO0265s/dsX9jJ24d+uyCh1/t10IcC8nZOpI7YTP ceanZxHsfREhhE2Y3zWE+18nLG6SbhEiJP1NREt0nUT46L/l+xf5Od1WwHHC p51QO8rflaAkr1URx++lfGW32DOTBkNsi3vASzY2xWJFEOmQAp8qJqtVbkGo dAvkKElMWA856bB7hhsWfWyHigk22G9lR/jopZ2Isz3CpWmCxYTOYRqdo95x hILY6jAeHX7yVodim0Mx4fO4RHHoCYhFOyHULHZU8RO784VKUwWbfPzMTVJQ K1TapbOvDY4adRa8WtAyVQwk5Ze2ARuwyPpnfe77cZNjUh5PPoK1elkJqs4T Tbv0odgTFoENLm5ImTYLa+jDNjE33kk07bOzQpY9LRJTpgJHa5n/royK3a1R yHB3tXsAChnuHIp1QGmCI0pS/NGQu17lyVqbeHwbmQzjNz1KpPMc/F33EEIV 0Lk3kDoJoZPMds4RQpcIoauE0HWES/C5jUjdbXor/W1yLZr/+1B0lQi6xI+F AWIwrOvkM6PegDKU5Kv7Xj5LBHUROTrsJ4L2S/uDBjFGkVFzSKxSUjZUluOe Oh79XFqtVCutVmLU4KZn3B+AliS5nJ3t5oNsd7ovpsZi17s8GqASzxhUeosN M+NpWOJpZBLQ6Z+I7gAmB6TjgnQJ0sTTHqKpnUhqFpvI+EfKE079g8TcxSc0 KFI9mFrE1lZVFBSpV0u15bI3FJMlUCQe6mwneXQPR9vqe41Vx5A7Yyku5pQr d4X9/t1hVPfSXN9rek9dhjwQd2pfHj7nM/3OKUj9ra+bAWmjF6MpNllgVra4 TxGuvdihp+ELi8QKSztG1LOROnsu1jPk2mpjKffxaWQ6WyHTleTOoJ0o3eI8 Gynh0ShaFYK8RW6ozdlgMvq76SBrZwTC2HBIGdVzSF3CoNv1IHRujKjcu2jp TjL4Po8gn8uE6DWE+d+QIBpB6xapvyUgekuCKOFpuEGSDV2U/rIE0Qj9SX6N Sbu+AeE6LUR/gUPJq5iF6ZDlLUdWBQyjxSIt8TjCTEzNwqX8witCXqzFyKmJ PrCB2Xi9Zkfrqx1dyHJVIcqg1D2Chk6FaJwMUcKzlfDsUCGqE9OgjusSyV0B UzFfs10nIBoj73Oko6/UBYs5muoFG+1kFjW50yb6hOpP+6NUm9trLNfwfrBQ oaF6oL2bL6E2/wEetB2F8cLxEY+ITNPdxBrPY8/snfiO7ao3wxsqCRykPK0F qjmDui+tFTvX3sN9Jgv3jimbBb6EswRqwZoN2Eq7uphATSRQlxOoqyznYZ2t JTbbW2KbgxW2O1lhh4sltrtZYqv7PCybOxUrnD2wWSwZy9+mXSCc8p4T7m7b AuOtbx9XYoH8rA7ilKbUlabUTeD0lAanVxHKAC6cwVuEjh6ZFKUXxGDOQHAa aEMNV/j6W4KT2YGeQDWcJBGohjqE6UrUVeDtOWqlQC+ZUFEtUtPEI56RqBdV Au8o5b2foENZi9bBFK/NR1QLRIon1jcFosldx5zZF5VLUpBNZ53tJnZTjEAO cVpMnB4WOPVNIE4TZZwGJKFLzGvUJQ3DMQmmx0wwFbtDEaZ6Nq8nTJmLNQYE qDOjtDUI9S4/2ptMqHWox02AfOl7UKvZwF1S1T5vPdQNW8RNRA53GfGgqwXX Soo/MfnwQRCnGqbO+ivYHnQKN4sO9FuUPHQVo68P4rvqZkADvqvqSEaVEZ3H 2XJXreI9foizvb3IobNZqdchwd4esXPnYpHVXCy3m4eUBfOkKRypTjx2mYso q2lYO38u2vK3Y22hEVfO38aDjiqTd1huHYcLAYtgPN9t2vepq/0C/J1LEOBS T+x2MhE5CT3df6DPNwj2u0zMMooMuDKMoL1CxY3UE6KGbxW6TKLbNzB4NAi4 nkFE4AmEB3Yg3HAUobpiueVfIdPD12xlQuxoX+dF76suyyN1iaV5pB7pWa5O tIkkU7Msr8nDH2XCtDK2zHaVIZvrTo/C1OMQIVtDyDYQss2EbLsC2W5pOq4w r2LzrSfRrWd0IHY00xOzBmLWQMwagnG+sPCh6XxCoOq0EO36fXNL3YeA7Rsm sCnwEDWNAbGBuil+53kj8pqMuH/8GK5uXv2JWUijb7ppzGTa5fTtimb1DznV 4uxglTjxEH0UDxWX2nOnHzbixrnruF1/UNnv9AeoqSjD/m0bEefjhqQADyzR kwI9sH1lIpYHRWCFxQLcz8rF/dtX0ND+AHsq2enOBhXrLTSh5eP9cbdiv9LM M/BzKiAWa4jDNoakx4jDMzD4nEOQ7wWE+F9EaMBF2sFviEU9/0XqL1IRIw0X JPBFGs4SfKcJvpOkXlIrwgJrUFx4XJHSW8w0/BSj2b/cUSNqY2L5oI8odcQx YWWG4Scnqsf8Y6UFot1MVtv9otBsQiKdMM9V7e4t7b2V7cIY1DVC2pa3kIaz giisZvx5lChsJApbicJ2IrBTmWvcTQx26xN4TBQaYqXJlE2BkdIc4yZDEM4V FgxcY60FobbuZm4V9Q/7g1Bbi+sDodbiidqKgAb69hVtOmXErmoj7p4+h3uZ 6z8xbx9VVQn4+hDubM/VhLKPXgkWDxWj4qF0ZMjd5ho6jNjP3hnb65RtoR7D SpskXI7dDOPlk6bfJm64g5OnH+BOVd+udAnvOuA2wwHjzcvKaJ9H3oEe+DtW wt+lGf7uPQjwPAG99ykE+p6mITxLAJ4lAM8RgOcQrj9HDJ6FQOIZniHccEoC XljgcYQF9SA0qBOhgS0IMRwxga8zO5cA9Ee2p7IpPdPeIk+5YnLUW9Ta4qS1 jZ1KtURNd8Ua1hNMUnqZ7naSWvwj+3as9aEH96b3XqRsCuwitv6ORB4BWMok 6DAjTGEK6wnAJkaXLaQ2Ou12UodekJjNGz9g87cwNBiC1LxYW4RR77ahXlIU SZB4CCAOdHeCXhwchD83AyZj345laqAge3kl6Op6gA05d3D73GUYS7f3LWTp S8N/aXqv70Y76rL5FK8GXF1fMWRRR70vorlFoQM2QDPdjHDFNRw7yZ62lCs3 pHgMO5nDVM2O4Xv1pv2xlmVQkc6ch/FcNxKtY3HSNVZcbJJP8zJWJjbT/NXD z60d/h7d0Hn10vQdJ/pOEH0niL6TRB9JR5Tp6GP1JxCmJ9oMx4g6gbguhBB1 IUHtCAlsQlHhKQ3y8og2nVJsCXuo2NIs1mUyD+lSCi3HxfpMBnUnJVLvLSGu oajFFnldZpOvPy62dyPTUd4IToobeV6x9WA50VzJ89bwvHVEXwOR18zztQjS C2LuQ9Q10Ow1SpvpMa8i8s4UFmnnwqpBo4o8cbdc9aKlWv57BORpC8q/GnB6 UVBWhVneQz93nlb1SPZDO0gOZo9U69vT2Jd6/4/Gti2Pyoafgye8XZ2GLFCb KwupV1mi0m7i1tmrMF45J/dfcwvK4dhdcB8N3UakR4TA7ue/Qs/qRcrIX0RX 27fwdaiBr0sLfN074O/ZCZ13F7HVjUC/HgT59yA4oAchgnQkfTdC9cRSILEU 2DEMwUEd7EBQUBuVoVsz4D/IsGKq21d9iWRqG41Kir+O4m8x3apEqbzQ6Jwg qbA6plNuWaKmtuJOEgFSaiu1UJG4GgccQ3DANRwHaNQEtIpo1MppJA/TSFaT ann+OhrJep6vnpCqMzBdIayO0pjVEVZHCav2NetNblNbzjG3tfIgOcCAkE5b K/z1oHB6HNktRly7cBPGpnJcrmkddPHVICmzWEuxY/Y+fLtipdLMw2iJDkpH RVghvWClgqhBq9oqoBsI8vyjTIAaD0FdJLPIOgFng9ahL+EZDtvJE2HrsBbO I0Yg8KO/w/nd3yg8e4mwugpvx0b4uLZLsPLzZObr3QG9TwcMvh2EVgehRQro QLCezwYS04JAQUSUgc+r1xyTVfcVdGYRSm59UMp176uS1Pn0v1lLr04DJb0g Wi2Kv1NHKIn0UxfVVyUJ0Ckc/iHKE9dir3MY9tJKZTC7zWbQV0g4lfrG4qCy KqCKlq6asKxmWlDFoKyS1qkyKBpVQZFoYbygVgC1JRcVFObnWv1ocOT8Zgjk bK8x4vKFO7i+dytutbX+0HS+vjObbhLg0ITlO4y4cOFb5W6FD+/er93IUyzH OWxogrGjafgQgOHX1YndIoI6ffo+HhzNU3ZPlCsghZMicL+qWIuZP7/yJt79 5UeY99nX8P3XP+Dy3m+Vas/z6Gy7Bi/HZhrCDngTM77EjD8xoyNmdMSLnngx EC8G4sVAvOiJkWHQBQr7s2r18QEB4A9k0LgSNK4EjVu4VLIoEiULn77SWpsC mh5G3cd00m7Ww3BCSv96aS46Kedmff+SRZNOp2jgCyhOXId053Cku0Vij0c0 Mukxc4mZQmKmhJgpI17KiJdyPXFEvJQSL2WBUahfs9G03ZsIoNRwRo2sB5Tn lCKy6oW0ReTfakAiQnQhGhUkqcVGnD1/D3eL9uF+b6s64WuA7Rqq1BxgvQOz /W8h87hRyesGBYPq5oRR2uvM4bSpG2vLPzFTAvm5ip+t93DnzCUYL51SWnkc 0f90xa1N+2C8ddUEa2kn7kxY/GUl3n8rDO+8a4Exb38K249HYe8Yf1yva31e gVJO5kV40vR4ehBKXoQSIeRHs+NPCPkTQv46EmHkR/LVt6Or+7piHV9hxNLJ OFknJ2wCNu4ybA7S1tQyYmkgbESc3EESJQNRkRUboR8jasTO8z3ETQdx02Lo XzboSUtTXOPzONfei83EzRa3KGyn29rD+P4Ak8ssv1jk0OXl0FZl6wXFkKLQ VVhqdkuDxxXUDNxXWHuT5gHg0ZYb1FuAq6m98lAnIA6IvbFk5330nrkPY1Uu PD/4K8a/+TM0H6p4YQCA+kD18D11xZrXSTPOYknVA1y6/u3rGq81WJ1MjYOW z2qAcec6s9/5hTo44rRc1ESOFCkZxA8Ra80k3XMlHpxoMnVPtnP7CKVYWIxo wczQe1hZZUTK4iV47+0/wNslAYZxzSgblyRgZZqbkJ39DZYtPwF3YsqDmPL0 FSbI01+YoNyCb9DZfUNj859DphPzOedg0/14Crz6Ev864qhJSvyJJTnpH0bw iIppD2Ekqk/tjFaa++X9wcz7C9WF+UezSpG5bBPWMkvc6B2Nrb7R7M02/2j2 pmjVZrQUlEnfVOOK7u5uU3CjvSGPutenqvXaAtarg6Pn98p72utX5va6HKZ0 NyOnAgey6+Dx8b/h8rf/wcI/vinb/gFJmmpJLD4uhW6fEedvqZfRHg0o2rlA wRbVuLdzv+k7r5na67vLhFq0X5ZOJ3mGpqgiA5UHe9WLvMKT7fsqGMbyIpNB Ew/5fr1VmCpuSSTu13vNaLoYX3cH+nEthM8iAR8ZnS+j/UABspgLZbuEylk4 PYYpC2ewWs9gtZloaNVk4J2EgsjC281k4fWGIFNlQ5uGqxUXbQ3olf5yFF9V 5fgHjcxUeDzeZweeRUp8Ij79/TtwHDsGvp9/iQSxj8+8/ThgsQJbPotE55oS aZfAw9Qo1asF2FfAfvF9lJy5ZdrN4/urjU8NWhHy/KIQNzaXqPd5fgQfptbz k/fKFapxb8XCd85G9Qb02xcswfXUdBhvXhUiVgsLk+y+Q1yWUbqVzpNacVq0 oFSIs14R549xKGkNspxCkEUnke0hK3dZv7Q2AY1MldW0tpVibKUYmwPjpLS2 QUlr6ynK04VFqiS1aa0aNpkrqAzQTG3x5A8amGrnKCjcUienrVm0C+/8/t+Y Pm48rEd9ABdLW2wrNGL5ViO2rruPjGVXkRtxEgWe9cibm4EDY5Mp7wiTvA+Z 9qUTs5YPYbrzd9jbpU4Hfnji3mDVvcGqLab9djaew8W0Ktw706ZMvfgPAPA0 PqAdmTKiDg5fHMTCDzZjvds6nFyfi64VGdJOa6WkHyvwk6ZfLVwGY08TFXw5 LN7ehvEzv8HCdUaUnDA+o0GEzqIVJeMWC0TIQe+PcKGtB/scgrHfJQz7qeDZ otjhLaPiEMPBI1JGGq/JSOOoxCIbjUEt04haIqKWiGhlRvq/AwK7Pnc/3LRh trbKMQAO2orGHwbwTIGE5l7r4t6BHRj3ZT3sEyuxLmUZtq5ehvraw6YbyJ/l z9qMqCJtLzTdlEygQ32oGtS5utiEDtX0L2CqOOpXf8OEcZ2ILTPim1v38NIj IOBRaiBqvXdnyikcX1zHwLPMLEqM/fKil/GHN5sw8vP7sJ/zAO5W36Il6yY6 dl1G98Yz6E7pQldcHToMhWhy3oGaOStROjkJu8eE49zOQ4RPHrpSMtDIMZaR 1LhCvWFMSkIc/v36G/D5w2hscloMi7+mYty4k7BeakRet/F5DYwCJBgt6YPR DyUY7XYMxR7XCOxl1JBJGOUTRiU+orgRazYTPUwIHSaEDjMTbWImqjpnbSaq ZoTavVYH+AXtrjsDYSOIflUDG/roD/LhvsmI09fVxaMvSt8X950QeKlulRmz Yov8nLH0CnLDT6DAo44mZR/8/26NMa//ERPeiYIXv+M+Y/LAe+oNPnnze+bn CaPUhfpwkcrWDW04fmsmUG3FxH9uwacjb2DEuNsYNfIc/P0uou2iEaWMMo+e MaKNStHL58IGI3ZUULIHjThEdB8tvK+g6Vt0b1LQFE80BRZJ7dTOTUXZlCQm LRE4l040bchD7HR7fPrTNzH5579mVBoPi8/bMDviHtKO3Dfd9VyGSxtKxmvg 8gLOM5nY7hiGHa6R2MWQIoPJSg7DigLCpZhWp5RQKSVUSplQlBAqxYRKMZPQ 2tUblfu09A8fVIXS1r0GwERbplA9vpaDfZfnNWh5UrJlEjqUdDfAoQELltxH /snbZneRVfcDV98Td3MtVFC1g45q1BgPjH/3a8z4cDQCpo6C64e/MW2POCQ0 Bs1inzMh5whVjr1s/x6X0/9WlcKKTv4gCxHJ96TbrlTW3EbKumtQ71jeqqCn lp+1nlWm1TyDgwpomrNuoWP3t1i0YCmm/vVTTHjrY8y0OwKXxYdw/DvjSxoc +BMHxeOX4js1HnkODZml2EgMbCEGdjIW2Uv5H2BCmelPYkKZyWTygJ4mYvVm fNN97I8D4o2+8P2hO2O8+n3Sf/Ih/dGEG4prGm5qyXHqDswLvoP9x4xmN6Qd PIl4AiviF+HTP/0eMz9+B37zxmGdjn05f/x7xPooq0rUOaAbbGkwSgqkV6/1 h3C/i6INVccx/fPDSKTZqjh376UBndbivvUCoweKPShiJb78x3uYM3Ic9FNH wOqDX5uW0Auh+lm0o2j8MiHUXyqepDa7FEdzypDmFYm1PlFY7xuFvNTNaCoo x7nuY39RQKitW4t3RGSgXbgtBmruOoiyFayaMWgrSxI/NHmA+XsOZ22oxdEF q7Huk1C0r8qXAqqi5H1qTcBn7jpMd/kOaZWXTTszfJ+o1VOnsCMbU5dh+6Y0 HO7kZx2t+K605HuKko+yIkRdxRo96SgepO+UXv1CkUOA9SpYTurAikxmgzeN PzbJXY3FqysO4e+/+x1Gfzzm/7V33fFRV9n++/CJb4VlLays7qL4dNeyYnui uCoIKIIPUTqIrqiIKC2QnsmUQBppNEGkJPTeSUhvJKRCSO+VkE5XQVrmnXt/ 9878MvwmzP79Np/PJcPAnLm/8z31nnvPhcvnY1Ecs93S2oWB6MlB/JGB+KmG dVXf1SCTbK1LB2yQUSfeD9j8d+vstHUm6ug17Dpsxp5NtxD5wyXEL6lHolOu 7PNduSGe9eWXcVxPi6ZRmpLbjslfdGB51k0ELQtiS9AydtG0hl2/v6cw31Vk tmPJR95uaMQvuzc5nMTbyxWtXcrvTOJPZmZg+IBJ+GbgK9izLHSABdUd+H5m GzaTpT133fxHy+fkDpZ9+2+igv7R3HZGdX+DiLhVP+oU34p0hURavYnNrhnj pB+wj++DNk+ltb+hHw/Jk8uFM0xSJrk3/CaiVlzgrxPnZSJu6k7+OmXRdlSs j8Vpgnn/qgi89cSf8cnTgzHh4yr4JbIlls4uZQbrFYJWu3e/QCa/9jrWH2nA 4e27YVw4/67o2WZ+/4IAyfRh9uRJGP34q3Ab/CZmvfAkDq0OtWwQ0M+KxsJF P2Nn3m2cv27uZ5djbCWnDds2kxxmp2neCqG1T8Zi7QlvD+JW8vi1qNwUN02Y Z3V2xt6RjpP9qC5mUX/Lg12BV+ftVuDt1Bl7CdMg3y5vU2ieIhk4JGRg/8br iF52DgmGahg+MGHik4Mw6cWZ8DpoJns12cJodSupP4nHsdU6X7+V2J9cigv1 bTBnRTpyUkGR6762M0dBXDK2OIvjaM4mHFhkwj4nE1JWbcKIJ19B6KujsWHc EPiOHIJ9479F6oQgtO9NoeD5KJpyy/9k8brlMM7Nhc73GpJrzbI+6TKnCb+W XMbtlso7oO3ezyjQuo0+hdZ1p3G5MH+aeEiZObEHlK5UrqhZd490g+ZDGhjK j/XWxtc2pqxsp3iRAl4f43qMeXssvhj1MXynj4LL8GfvOMdtdWzd65/EP4Ho /tJGYlsouzzZDZqVGOVRy7QS14bz14dcTZScKqd8ZEsKdjhs3SfOyBg1Czc3 G7Fy/iQ4TRiJNaHbkZN4G+VHfkbd5jOoD8pGxfxtyJgcio4D6WjYcBQtqsvZ inIrMfmdKPituYW0JksXu30HbqLyBLPTDd2kDNo7MH5Y2Y6kvCu4+vMlfCqe WO2a2RC5sV2A1esqT2t8l2rjRU9yRtkYOvB5TBr6BuZ/Pg6Ra/zZRjk5H3U/ nD/YUS2mnVK15OrC3lNmXGy7gV8P7cGpQwdtfWg/lZHY56rHITd5VMEHJ8Rp mpP8xMxibHp3Huq//g4341chbHkQRg16BnM+eFuw8fc4WtKJ/EYz6s7ydR9k JnWiNPJX1G1tQn1YHqoW7Ubu1OXI0W9BY3gkv6rCeiNMA6a9l4FlO1iA3Cm5 xWIKboWzjttBkH5mCg6qF0PZOyIndSBgUq9kPC3cgI0m8r/LmzLD16/Gtk3H kUtx+m9tl8ncHYEWUN3dham1PMEEzGNjDZpbb+FWahSuVhU+Kox9e3UNn0Ik 33KqgJRFIOUJkGJnemPzm7Nw2eiExuORSMss4hf9nFpkRLaTAYUrNlpkoooy y1M09RoCajt5grTkThQfu8bXH+pXFMrFuQIjidPmYygknKSUrl8Wim1hYZTz pmHGhDKsPUaR71WzXI92ndtMpvUSbjdXigdzyHfPFHxlCPr5+fHiE2sryQS6 X1eo1PnkUxbFs6qg/NYYvl3mKt8uc6WwXKuTd3eXSxE6sj9WdxFocr4Z1U2d MJ8kq9BSq8iVtUSlJa30Xpy7EanuPsixnLXohZ0TXHHig1m4Ea5Hycks7Cq6 iRp3ypP41mATYWlA3kJvnDmWKKKrB1FOFj+b8uIqwjE83oyUZEVMa3a3o2F1 KWq8o1DwxRqULN6FlV/Ow4ePDcCkJ57F7K9aEJFGwe1v1j0Biq2kJ2mtV2Jm G75+JURZne33798f/fr1442GVVCpm7/J5cRBApYtGSQv7TdxPfYgbtVpwnKX S+wdydlk4N10yYz8emJ+6WmYOxrlMVvbcIP9rohLQLSbcoI9kfQq080Xp938 kTBvCX54fzEaZy/AzdgVCAltwbY84vmabWj09Ee9px+qPJaglDAqYhg56fpY hIA4WUHYpBWYkZBCU4m9gVEDh+HL14ZjxuBRWLLIHRGrwyzL98zabefWLhXO 4jGZGsgTLSyaYI+anp7O00EbfqsT8tcFB1IolapjZficBJiba+TWCNmSyQ4D bZdMbQps1nRKdiJk/72OrMrxcnYWphpNqzeK4O7RLtyWHI8SRzjiidOpxOlc 4nSReyA2froVqRE/43JeOgz+7QjPNKN27U60ei9Fsy4QjboA1Hr5oZyd8HZn Nyrp0BKTYC9EkjWQQc8Nxri33sH37DL3KUNxJGKl2M/ATFYLN1m3mivgppJc nU6nxWR17vWGsBAWMSvLg/nc2TssBrNZjIWO1rLsr2nduc+irMWMoySPt840 Y8eXUymC7w+faROtSZnCgz/yD8awMwsUhyXwg4j+OOUWiBKPIH5KZtWSBDi5 tmMtGZG6tbtxTh+MDhqt+iCcJfbXeQeggm3W9VDOKpx29rgb209mZeOdl/6O iR9+iJ8CdChKj7awXW1v3AQZ2U2Y/ZCsP2Kf84MFN8qbr2NPMsnwls3wnjev ixFQ5ai2R1i0/LDWipf9PLMnimo74eu/BXOHv0e55otY+PJTWPPlbK2EoocK Arl3OsHVDxmsE4/7UpQR++Nm+2LyyGysJIda++MenDeE4gKN84YQtBmC0UQw 1OsDUcmuRPFawnfrF7t52oPAcrty/nXsIpvbWV9kYX1Rbgd2bCEzk5kizExP izUNCQmxbAwiTtkIvzpjGSRMyR1p4NIfsGZXKS7XNuB27Ha5P0i9YsDesQPF /f8SCr1xMiMDg/q/gOkjxlLK/RFMH41ElrEIGbMjkTRhDfaM9EXdpkSUUAzT mFuusMV636H8zbYfK+gsQaKLPzLcliKfFCPq28WYOCwRwfvJ4v+4l9AIw0Vj GC7RuECj3RiKJmMw6g1BqNQHWm4ZKvHwxuXq6t42Yck9OJZjRn1rJ27lx3ex QFeZBWqqwAI7ksosr3QBj9oH5VWbj3eX02WQxbrWdoVcwzGLz5Uo2fgDrYV3 +6j8Ad4zt+CNl77BJ2PGY8bI1/H1mLeQV23GIQo6thw0I2rXTaSuv4jMoHoK YrOQ/vkOxI5dhnTXrbBGT7K1FjvunOQSQC45CPmkKuPfjoTv1k6kZ1ej3bAM 543LcNG0DJdoXDARKCYGSogARdwipGO3COkZKHLVJ2znTdzo6KDAoM7igfcd vIUqbpXqMEcl4Fp+UhiOv3RFQ53zvSR00wZMuZYqBVD8yGWco+SyL7ON3qVZ 5JjKJZ/V5s92F113DoJtPZr85QUEpVzF+rWrsT18DQrysmW6UtlBCVe1LEGw n78gfXWbemI4NDoQ9VtTUU5KdNRlBWIXGhG7yI+DcniGM5z+9yj0a28hNecM mgmQduNynKNx0UTDZzmBQu8RME0ETD1pS6VBtatap5ddecood8ytoVmTJ5an upuraylsSkEhjWIaJex3DP09OlnV5qq7RF5au1sZyZjdjXZJ9RjQFU91vqEU QO9sgqB2IxLUezXg2EAxYGsbSV3iYYwlPz1+wJ9JFXYyWP9gsRS2xSO2sfYA pnx7GVvyZN38iS4GLJYt7BKEZZVmbDyovJccfgUZYY3I8jqFE1/tR/wnq6B7 aiQ8BhrgHnoD8ZmNqGNnJwzL0UpQdRBU52lcILjO+yxDG8F1luCqI7gqVBua i7y9IZtBR1DqeOXCNVwvzhTlvl68JVDi2gjeSPiAiw+Jiw+i2SXdi2gspNdO Jhydb0T6inALi9XP0t0hPbd5rWQnL+JmdTm+dkw5n7IP5nMqz6cBptaqgb29 rsErUhEXlw+Xd9/EvIF/xey/90fiwXhpaLy/icLUeT9je2F3JUwlLWF7IY5X mVFAY2tEHXYeMMPjte+Q8p4zstccRsX0GZTWheEM4dZMuLWZFOzOEW4dhFsr 4dZIuNUSbuVyQ7HBBzUbN0rYikpu85OY7DC34pb6IGVtOPZT5nNItOJJcF3M W/Gks56xom9sxsLF/HbulPkmJM41sP7AjsZMUhcPHr6F0t0XKEhuwwwHdFFJ Ti3BDLOrMqF8phv4LBmMFp8fuAO+dWErMPy51zHno7HwHDUKG/8ZjPiZCTg2 Phx7R4Ygdv4mlP10jK9X1eSWy4qa96xETHP+FbtK7Rlki5Xvi6yVEYhxWgLf N6Zj95j5KJr0NYp0oRTOhfEdvI2EJbvOqYVGKx/L0ExYnjGFoNoUhDKxq5fd GNSUlCRPU4SuP4emdkrv2qsFlx5A+tqNOCKa4sTRSGXZLOGZy5bxaLDrugsI 03wap/m13UpbpRPzeA9guWHYlkvsRwJRWXYNpa1mXPz5V3zmmCY+3xVKtTd7 WgWlRjIq90PYTEjF3l7YtDISr7/wNqaNGY0vPxwCg5cv4lJaEbjDjM3bzDiw 7iqig9sQ71UB6X7jF2xWOzm5tseKgtxvfpuOzzyvYW+FLKJq80SZwsPoqKzj J8zCP52H7Z8twP7PF+LIPxchikbWPBM/n91AkUojIXuW/2bokoU1kUP0CUIJ P7Toi5MGkyix3IeTMck4RaOpqo6/s+pQJ262NaOzpVJ870M4sXYDQa1HNKXD CQR3mpuysJTnym779uXNZMpolLuxsYReL0axqw+JgdIDKUdp+3tvN48o1360 okqZbb1oH98Bqo/bW0jrc1cO38dPi0yYUIeFP2Vj07rV2BGx2hJu3SP07BAF T+mE2Oky5bMRHPxrOBbajnhdJeK/Vept+0eFIcFpK8rXxSCP9Lo+txxvPPFn fDygP8a9shJfGK/jYLW5j4bsWWbUr8vbreT5En6MwKox/8SqYROxbthkbBo+ Bdtp7BhGv2kc/vgbJJM81FDqUMtHKGl3CCoI/2KfQBT4UE5uWkK5U53Y69GL 040T7fn30jhIKntEtOc/RObYd04kCtjiw5kCyBbA56prEC2aujATcNxtMbIJ /3w3P97yt5xGlXsAatxZw2N/1Lqz4UfvkazQ/y1yMaLQWY+TC7y6bGNXoyJ+ a5n76SqToAW4MAmv2BeZ/iqRsbfI90BXK9BDFXaxetC490/CGGVG229Wn6QO zu/V8AayhCalJ3y7GfvX/0bS04F4fRX0I00Y+8RrmPzcRHztfwMh+zKts7Au iMkDLcnkVfeRJT4s2pPtHjsDO0ks9pFIHB4+tQeODptK4cThd6fgwNDJiP7o a+SQES4liSgmq5Av7mrKJrt/ua6er14qongP9ooSgPJ1iv1KI4OetkipqqWQ ZKyh+OHXC7/AfKVNTKkvsn9cb+mdkkjWIIMkIo81gHYL5A2AazyWot5zKRpo NHqxEYgzngGo8ySJ8fBFKVuOdjWiaJEOzTEJ1j0V1oztUw1rwRYP1dgN6gq9 OoV9zM7H1XGBvMrnk3fi4EImvuWqtWqrruXIjR5arkPut6qQZVPDOox+/T18 OuJjeE//CMbRA4Ud7os07lINFBqxxWETTjAbS3Y0+qMvCcMpiCZA44ZPRcKI qYgfMQUx9Pej707GgXcmIm2+HlniKF+qMQAX6+qVyutf+bTSRHmUNW1PEE0Q M12Umk4e99DktQnUU6Ty+xZE4Fi+GbeLj+PsirWk5tWiDYmR302fQmBmuQWQ mgfyrs41nkEEZjCBGIwmGs26YLTognBWtxRndAS2lz/KPMlFuPsQqHqKCDxE WHZX3R1sH0CtExy2gZ3W8UJzl6tEKb6ak485q2+j8NxNSwCpdYFk15jLXtjX k19N+o/nn8O4t17H3KmjEPVTMDqTdj4iMJZ+lDVrSyYwMgmMU8wWurLF/SXI n+2JuBHTkPjeNCS/z8ZUJL5PWL83GZHDJ2L/kPH8+F12xHacq61XzPfvcMjV m8+GkU0ishlENpfIsZ9iRtqV1YDK6M8H6TUzvSY4T9iMhs2RuDjyQxQHBlp6 o8aRGz/u6s9vqC90D+Jtl+u8QtCoC0ETjRbvEHalM/15H70m3L1JBgjnMsK5 xFNZMS9x88LnGgjZWte3uwKstpx9bT6ulQbbHk+3B44E1ntWHL5ach0xjVZg 7wa21jK5XHreQPFBfl4OjteacbXjCsy5UWJOinc8Rt4xhjRagYRUjDU8J/Wp IE9YTaPOIwANNMrn6lAwwwmZE2ci/oOpiB45Gemff4/UT2ejdOUGsZnvGWSs Xc89boywy4zmKTcWgfnxtn7sh9Gt4cOPl/aq3JfA679HI2W8C9rGTUfSmPGW PqZxLn5Icw3ESYK6mPWy8gzhHYSavEPRog9DG412fSg6aLTqSQT0wagluCt0 oqWGp7II2Rofh6l3UWmhlEO7Iq61cfeuXUfvsgX0HsTuqMD3nr/gUHXXG2Dl t1kvuLO6U3mQ5ohcGCs5gY6T5Q8JYZS1JCXXWULa5YciYnklD26Y+wrEWXJj zTRa+O8A+jvB6+mHatKKMrJ+xa4G5C/U4XJVjWKcn1ViKN7S2sBb6LMfRrqQ N2oMIDQD+XsNRL6RjwDuKevJUyZ/7YaYafNx6ntX7BjyAQ5N+5a3I0hwCSBU l+KkezCKCdFqr1AyxGFo0lPmTqOdRgflCecMYWg1hKLREIJafRAqvOXSsrKK 2ZYQP8kBHR5hH9E+wijaSZ8ftYHQGvRqq2925XWc/+V6l/fU5d9+4l8iTpjR zloRRO7D9SqRSvdCRWw8Ylxk8XUx+VcWlQRQtKFEJGe8gsh5BaFVxw6ttnsH sXahJO0t3qqSIDdwJpSQsWyNTXhYkM76cR2fsQx4uF91U464sV6GdeQj2U+T FyPNvOOfyZaywIeCHrKbFcI/Hh0zBbuGfswXoy0weoSQolEIzzssLVNgZOuf BgXGDkrzWinM5zAaglEhF6O92b3oBoIxAeNslNMWDKGcSu9Wi8qoS729u4fS 2qFLC0Ctq5nk9rnVe2+gofU2bp2IRueZCmWN44+ojhMdgMgjJZNHyuQRx1KU ewTxfu5nyRO1kg/qILN0jsZ5Mk2smNgmC4k6UUhklyC7G1Dg4mHZixZDEUgs 6aL8UdOWNxwyT9dKg/m5dvJyrSQOTUS3njxdpfB0KZ99iz1DPibFm4t450Ck uwVxtIpVaJ3VL0eLYTnajMv5irUFLUrKagitcr7sSebUQGh5G9CcGI+xDmjd h12huvOSWbsrHQMcgkpNULYkb7liRunZTpjz02Bure0joIpmPY0pl2NlrWQK HLIpMCz0YK32g3kvumbyJsyLyGLjRf5bFBwNouCo81c6YrOCo7uXgOpxUgTS VwpWYl18kcJpi6CEAs56CkrOejPPFGrxUucM7DV9JytkElxVJAalJAZJn83G 7qGf4DCHKoBy1SDkElRFZBsrdctQxxtILaf5LCflWk7xDeFE8Q0hdUYgVcYX OhWkivV6pan23XXqI/tAqQvG9pYsnu4mufi9Bs0HLA7NJmsiGg0XzMiiUKWz soDtIPi9wC9mEQX3zibEkdFJIaOTQ0F9IfG3kvjbICKBDoNSirSWJYnPxhBR llyKSm9ijM7X0mTrIeHfKmPiiDYFls4+iKdoI9UlkALLIBR5CPo82lAiDfYd 5/kgLGk0k4w0EI5VJB9lOqUgvWvIOByZOofmGkCJCMXBhGEBqVs5qVsN67jO 2uwYFBzZynUzwdhE822g+VbRXMsoPyoxKe0vasPDRzmgaePsA6huGmhvAeEf Gp97WMBvAyrUYFW0mRFdzI4o1KJ13cbeQjtjFnrxMkecMzGTQrccUoYiT9Za PpQ3CG8VXoGVK3vwYuV/KeVKo7pcqWpd5eVtxSqeSOv5lX3xzv6UBFjJV7He koRTMzmfNtVXnCfedtBoJvINpCRV5HxKmSx4++LwmM9weMoc3rIkiRxZBsUj eUSr2CuMYg3Ci3XhZeuVfGWaDUXZ6kz0OLypgFyNXsxWo9/vJjyUGd9ENVa/ sySM3WX579jFR2MbrWWDdoMZe9Ju42ZzK25E7+olLaGTF68/sbIlB4esYKEX AyeMg9Mi3DWrgbGypVJLZnUwAoeeus5IVtNgbZldrPMWmtQb56ooDV+o572D 4oijqcTRHOIoR4d1/bSEBtzR9MA5+qIH6SUFfsTUelKmSsK+RE/g6MmfznXG /knf05T9KA0IpJg2iJQpGKcJ6GKabrk+jHd5qDEwOWKtP3qixsiACUapqvtd VcTm4TbAaGnBVDUwPTkwcrVGBca7gtPsU4ySJStwpNvx7tjruFTTzv92vwAk c9UGxDopgCQTINkkzgUESAUxrJ6Y1SQ8s7UwSWExaYtSmAzhBS51YbLQWyeE 42+IWcDAWMzBSBFgFHoqYNeJfoS2nr9NosHr00HC85PZ1FPOzJZ/5vshkvck XIrjNNdsopdHLrSQ5ltCpriMXFw5mcZyQqKM9SEUTePYEf1cky8u1dYNtaMm 6q1f07uaNNmFhfmgEeK9ux0bgPai7ANCWitYY5H5PrzTcRIxPpMeJp8Yz+x0 LTGmkcRKVhbbTSStHSbub3lhMQQ1qmIUKyy2JSVBrmdls86hrIMN8T2ZdSMl vuerXMAZ4cZbjErRuU0VcXE8jaJfiZH8uMHAqSYv24KDC/xx2Hkpb5HAmvZl EO9zWIsE4n0+8T6f+J5PfM9jHdZofjnE9wxyJZfq6sU6Rvcq8EXXPIlhITvY Dtdguq0NssfxB0WCGjnXhBgnX/KyAUgnbp8iD14ia396xcI20WgxLeN1v1a5 VYLYXUWPU8pbuPii0GjCldpamdlUHEsWQPohkYA8QaSZES9hgRNxm4EpDXgP /gX3cYd7xshQVDlc0xJUh0eIR+jD+03tXhCI/c5BiBQ9ylIIxTSa8gnidgZx +4ToT5ZCNPI3bceF2vp/OCDdSiGpywZhuSdsmAajrRGTdVNEX2FFyqNSEDXf lzIGfx5uZHkoYlxKM6wiC8nsYoMhrAf3XffxaluDSXnwcp9AMpL+KKQHr4jY JNZwHsaROSYyusrVCqk8ggnmJEt0rB99GO+uzBp21fOohf0msWXVG+YROU0/ FBDNK7XyTq/7URiTjq0uS7GXVOEw4R7JzlhT4nKMEqJIiqCOkE+pTE4b7ICU Ksm7ZYO7ZB77r5bVm64LdQOFGKav2IKjTv6UYpM34baLvAnZrmLiVTnZLdaB jHWvqxHlKOZJynwovKCHyidGZZObf0Q8EOs3cWSeL6K4LQxEGtHL4fRCOb0y GhX60B6caE8iRZZFtGUtJFN4mpmN8E2y2NpU3YC8+HQUJJxAYSIb6bDlhZYg fafwQu4WVG8fHyLeU9cBXhTidHzlNhxaFMibZKQQIpmkLieFESliNw6wDu5G Vn2h2JVmfcqHGZNAZBj9cLG2rp8gw5ooMJt0RDQSTSVByVKRKiRSxUSqiEgV EqnTJlbIIT9EDCiO2DrMAbDnKQ/Yy+YBWe82GRapl3NeErqbtGo79i1aiqOu wUggvT1Os8pg/ShpVrk0q1wD6/5B79GMjgvdPV8rrndXVH/PggAcINU/RiQS PRgJUnmdQiKbHiqbHiqTSKRzEoHIi9jmiGNzUh5IHuJhMblU/bc1HuhlYeRa qxoQv2Yn9lAQdITYHC2a3iVQJhlPUW0Mueoo0qGq5DRRNOzFdW476dwBMl6R olFevPhMnPhMTsQO9uBd3IO9PMFFmbq67auc+lsaU5d7MJuq6nGaZLuIZLuE ZJudwi9WTuKLA+T34VRcOgrj6X3691I2ktj/S0crTe0tB7jqrkxNlqnVxzQt RZquK3E/3eWB2XKuTqGqdRX7G+I99XrRGjsTVcfyijO39P9Qy/PrKrcrSSrX RN91U4ly6+Md3Q4ZMoM0kodlDkxUuXfU4uPVJF/TIBns2EQDFap9VTipuPqq BuFAB+YaolB9RAOnVzRI+jo2V4VLlls25VERxoGXNZy0vZs31ZtDlItpu1y/ KJn6kgZJvWqi3dQgFbnrci2fSvgHahD20pirzDrlXNcpVG2vbWP/JBvgqH2s m2Nz3ahQ/YsNVSb/f9eg6mxnomqztFkh2V+DqbKhk9oHLnBsotsUqo9rUJX7 1dXGbq7GRG3t5y6F5BM2OAmuPqNBdbbNXO0sKij3k1gaeqqhUvdDlqZvlgNz PaiQlEfF2Rexj7PfT2uQ/MqxiR5RqGp1i5fvqQ3qFw5M9JhC8mkVU1XR4JOq +Uv156llD060p72JxipU/6bB0QEaJKc6MNFEheQzGiSf0CBpW9fS8nopCkm5 aV8dSzyuQXKcDUktH680P7WIuBohqWDqpQ/bOoDWLDMVks9rmydpX9Tm6UMH Jqp8v8UUqdn5mAbJDxyYqHIgBwNtSDLb9KgGyREOzLJQIfmiBjulE1Cbu3cd mKVoyPuSBknpqtTmzpHArkIh+bK2V5YX1asN05sOTLRaofqqBkJ9NUgOustE mV2uV0j+j0q4pUt+WIOk7SkgrVk2KiRf02Dng6r3pKF7yYFZtigkB6nYqRJ4 uUVabehesDNRdZCjLBtaAk81O/uo+CGV/VmVRe4myDmvUB1sQ5XJvFbt5q8O TPSyQvJNDavUW4Pkk45NVOnIa6lV3NF4x4bq4w5M9DeF5Fva/lire/Njjs31 pkL4HQ2otHqedLdRzHLJgEJyiAZOWuffHrbxx3YmKjabcdJDNTirta3NttWk VkjG6SrzwrsadOWyrtr29f4Xpqysd4i1sjsM1j0a1G1vn9by0Jy0okuWRWY1 dnJtU21e773LrIWscdKiK8p74oNqxWDvMMv1n45OUzHKeF+wTs1cRucucRgn IRoUjhRfKcWffVzzK8UBv1GCC0z0JBf4vysqp7z+7t+v//36/89r/Mf/ARaI irw=\ \>"]] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.5681365021632137`*^9, 3.5681365171392403`*^9}, { 3.568136560351316*^9, 3.5681365863097615`*^9}, {3.5681369135895367`*^9, 3.5681369265999594`*^9}, {3.568137821916732*^9, 3.5681378378443604`*^9}, { 3.5682072492149415`*^9, 3.5682072529901485`*^9}, 3.568209802830227*^9, { 3.5682216503836985`*^9, 3.5682217583046885`*^9}, {3.5682217912831464`*^9, 3.568221843465238*^9}, {3.5682219760654707`*^9, 3.5682221133457117`*^9}, { 3.568222159615393*^9, 3.5682221693498106`*^9}, {3.5682222565227633`*^9, 3.5682222578487663`*^9}, 3.5682224736283445`*^9, 3.5682227227607822`*^9, 3.5682227558640404`*^9, {3.568222818810151*^9, 3.5682228486062036`*^9}, { 3.5682230057764797`*^9, 3.5682230079916835`*^9}, {3.568223041952943*^9, 3.5682230548229656`*^9}, 3.5682232619601297`*^9, 3.5682233000709963`*^9, { 3.568223536645412*^9, 3.5682235381118145`*^9}, {3.568223591151908*^9, 3.568223591526308*^9}, {3.5682236491528096`*^9, 3.568223657483224*^9}, { 3.568223713222122*^9, 3.5682237532361927`*^9}, {3.568223800379475*^9, 3.568223827648323*^9}, {3.5682238887380304`*^9, 3.5682238893152313`*^9}, { 3.5682240287170763`*^9, 3.5682240612431335`*^9}, 3.5682241088076167`*^9, { 3.568224198772975*^9, 3.5682242396450467`*^9}, {3.568224282170721*^9, 3.5682243185031853`*^9}, {3.568224437890195*^9, 3.568224439590598*^9}, { 3.568224572253231*^9, 3.5682245867144566`*^9}, {3.5682247081762695`*^9, 3.568224733557514*^9}, {3.56822480520844*^9, 3.5682248433505073`*^9}, { 3.568224884206979*^9, 3.5682248959069996`*^9}, {3.568224982830352*^9, 3.5682250047639904`*^9}, {3.56822503870965*^9, 3.5682250803305235`*^9}, { 3.5682251223413973`*^9, 3.568225141451431*^9}, {3.568225234177994*^9, 3.5682252929588966`*^9}, {3.5682253775890455`*^9, 3.568225482140429*^9}, { 3.56822551694409*^9, 3.5682255297205124`*^9}, {3.568225573197789*^9, 3.5682255809666023`*^9}, 3.568225660698343*^9, 3.5682257301964645`*^9, { 3.568225765078126*^9, 3.5682257828933573`*^9}, {3.568225927026843*^9, 3.568225927416844*^9}, {3.568267062420238*^9, 3.568267081358671*^9}, { 3.568267188328059*^9, 3.5682672830358257`*^9}, {3.5682676367040462`*^9, 3.568267747979042*^9}, 3.5682678404716043`*^9, 3.568267882030078*^9, { 3.5682679252577534`*^9, 3.568267996612279*^9}, {3.5682680488879704`*^9, 3.568268061133992*^9}, {3.568268100914062*^9, 3.5682681150944867`*^9}, { 3.5682681672609787`*^9, 3.5682681709113846`*^9}, {3.568268272904364*^9, 3.5682683182536435`*^9}, {3.5682685202739983`*^9, 3.568268599194537*^9}, { 3.5682686348873997`*^9, 3.568268637773405*^9}, {3.5682686944951043`*^9, 3.568268872273017*^9}, {3.5682689420207396`*^9, 3.568269016947671*^9}, { 3.5682695040741262`*^9, 3.568269601153097*^9}, {3.5682696652380095`*^9, 3.5682696728352227`*^9}, {3.5682697489633565`*^9, 3.5682698308635006`*^9}, {3.568271156491429*^9, 3.568271160063835*^9}, { 3.568271244927984*^9, 3.568271369010602*^9}, {3.5682716250070515`*^9, 3.5682717312276382`*^9}, {3.5682717843301315`*^9, 3.5682718576814604`*^9}, {3.568271940673606*^9, 3.5682720536490045`*^9}, { 3.5682722259669075`*^9, 3.5682723223126764`*^9}, {3.568272370813162*^9, 3.568272411466833*^9}, {3.5682725893539457`*^9, 3.568272622238803*^9}, { 3.5682726936713285`*^9, 3.5682726960113325`*^9}, {3.568272741079812*^9, 3.56827275143823*^9}, {3.5682729218373294`*^9, 3.568272991070251*^9}, { 3.5682734285574193`*^9, 3.5682734302890224`*^9}, {3.5682734898811274`*^9, 3.5682735111595645`*^9}, {3.5682736115925407`*^9, 3.5682736313577757`*^9}, {3.5682738601945777`*^9, 3.568273987272401*^9}, { 3.5682763944346285`*^9, 3.5682764313910933`*^9}, 3.5682765128232365`*^9, { 3.5682766527398825`*^9, 3.568276660976697*^9}, {3.5682774496048822`*^9, 3.568277461663703*^9}, {3.5683784032731285`*^9, 3.568378422991563*^9}, { 3.568378459308427*^9, 3.5683784812420654`*^9}, {3.568378513440522*^9, 3.568378867046343*^9}, {3.568378915468828*^9, 3.56837896203491*^9}, { 3.5683790764299107`*^9, 3.568379270041851*^9}, {3.568380233530743*^9, 3.568380234388745*^9}, 3.5683804214954734`*^9, 3.568380471867962*^9, 3.5683805399464817`*^9, {3.5683812396077104`*^9, 3.568381293537005*^9}, { 3.568381339541486*^9, 3.568381420224828*^9}, {3.5684645223056345`*^9, 3.5684645572340956`*^9}, {3.5684651558539467`*^9, 3.5684651618911576`*^9}, {3.5688209923798466`*^9, 3.568820997683856*^9}, { 3.568821158754139*^9, 3.568821160750942*^9}, 3.56882222404881*^9, { 3.568822649274357*^9, 3.5688226508031597`*^9}, 3.568822723109287*^9, { 3.5693397221142225`*^9, 3.5693397223326235`*^9}, {3.5693899272912874`*^9, 3.5693899274472876`*^9}, {3.5693910617720795`*^9, 3.5693910848757205`*^9}, 3.5693911374166126`*^9, {3.569391214402748*^9, 3.5693912147147484`*^9}, 3.569391451944365*^9, {3.569391487793228*^9, 3.569391507620863*^9}, { 3.5693923162258854`*^9, 3.5693923173958874`*^9}, {3.569406068526634*^9, 3.569406086092265*^9}, 3.569690172138941*^9, 3.569780036185542*^9, { 3.570453906913044*^9, 3.5704539079894457`*^9}, {3.570454575670618*^9, 3.5704545899602437`*^9}, {3.570454765008151*^9, 3.570454772277764*^9}, 3.5708553779481487`*^9, {3.5709431726830034`*^9, 3.570943174555007*^9}, { 3.5709495710522423`*^9, 3.5709495907082767`*^9}, {3.570949647617176*^9, 3.570949673138821*^9}, {3.570950759321929*^9, 3.5709507772775607`*^9}, { 3.5709508127364225`*^9, 3.5709508405200715`*^9}, {3.570991123104905*^9, 3.570991124259307*^9}, {3.5709912161278687`*^9, 3.570991227937089*^9}, { 3.5709912804155817`*^9, 3.570991308776431*^9}, {3.5709914026885962`*^9, 3.5709914215490294`*^9}, {3.570991574429298*^9, 3.5709916038821497`*^9}, 3.570991652445035*^9, 3.570991830004547*^9, 3.570991865276209*^9, { 3.5709919181759014`*^9, 3.5709919260539155`*^9}, {3.570992027251293*^9, 3.570992050058533*^9}, 3.5709920901350036`*^9, 3.570992186979974*^9, { 3.57122255431676*^9, 3.5712225562355638`*^9}, 3.571223175338251*^9, { 3.5713153738729277`*^9, 3.571315375682531*^9}, 3.5713224026962075`*^9, { 3.5713224627875133`*^9, 3.5713224654863176`*^9}, {3.5713224965147724`*^9, 3.571322572268505*^9}, {3.5713226259637995`*^9, 3.5713226549330506`*^9}, { 3.5713308245340652`*^9, 3.571330884469371*^9}, {3.5713309160126257`*^9, 3.5713309422674723`*^9}, 3.571331071326499*^9, {3.5713311246629925`*^9, 3.5713311332274075`*^9}, {3.571331300334901*^9, 3.5713313470881834`*^9}, 3.5713314298931284`*^9, 3.571331594130217*^9, {3.571331632849485*^9, 3.5713316334578857`*^9}, {3.5713316704299507`*^9, 3.5713316709447517`*^9}, {3.571331783327349*^9, 3.571331790019761*^9}, { 3.5713319475956383`*^9, 3.571331948360039*^9}, {3.5713326567416835`*^9, 3.571332681717327*^9}, {3.571332736801024*^9, 3.571332753305853*^9}, { 3.571332796221528*^9, 3.5713328475768185`*^9}, {3.571332914344936*^9, 3.571332924672154*^9}, {3.5713330072586994`*^9, 3.5713330320471425`*^9}, { 3.5713330798612266`*^9, 3.5713330883320417`*^9}, {3.5713331731961904`*^9, 3.571333178266199*^9}, {3.571333407851803*^9, 3.571333426837036*^9}, { 3.571333542292839*^9, 3.571333557705666*^9}, {3.5713336117441607`*^9, 3.5713337055939255`*^9}, {3.5713337750608473`*^9, 3.571333798070888*^9}, { 3.5713366694988756`*^9, 3.5713366834765005`*^9}, {3.5713369716090064`*^9, 3.57133697359021*^9}, {3.57138272164856*^9, 3.571382756233821*^9}, { 3.57138283537276*^9, 3.571382866900415*^9}, {3.5713829070080853`*^9, 3.5713829086616883`*^9}, {3.571382939175342*^9, 3.5713830233374896`*^9}, { 3.5713831045200324`*^9, 3.571383106126835*^9}, {3.571383198260597*^9, 3.5713832448422785`*^9}, 3.5716785972796593`*^9, 3.5718167268987517`*^9, { 3.571838452469782*^9, 3.5718386879053955`*^9}, 3.571838766139532*^9, { 3.571838857446493*^9, 3.5718388645757055`*^9}, 3.5723437133735733`*^9, 3.5723437554312468`*^9, {3.5723449027196617`*^9, 3.572344929582909*^9}, 3.5723450406551046`*^9, {3.57234950163894*^9, 3.5723495196413713`*^9}, { 3.572584520172369*^9, 3.5725845258195786`*^9}, {3.5726224003989472`*^9, 3.57262241340937*^9}, 3.572796748424938*^9, 3.5727968708695536`*^9, { 3.572796971801731*^9, 3.572796995841373*^9}, {3.57279741546651*^9, 3.5727974308793373`*^9}, {3.572842795856916*^9, 3.5728428061217337`*^9}, { 3.5728522627179437`*^9, 3.572852288426789*^9}, {3.5728523495164957`*^9, 3.572852453865079*^9}, {3.5728524960787535`*^9, 3.572852515110787*^9}, { 3.572852550008048*^9, 3.572852634669397*^9}, {3.5728602362372026`*^9, 3.5728602649256525`*^9}, 3.572860311756935*^9, 3.5731241886618786`*^9, 3.5731408095114717`*^9, 3.5731408826443996`*^9, {3.573211072949067*^9, 3.5732110779254756`*^9}, {3.5732129727516036`*^9, 3.573212981300419*^9}, { 3.5732130120948725`*^9, 3.57321301629128*^9}, {3.573213384015126*^9, 3.573213388164733*^9}, {3.573220427063021*^9, 3.57322044338065*^9}, { 3.5733208085662665`*^9, 3.5733208285343018`*^9}, {3.57332089027921*^9, 3.5733208917144127`*^9}, {3.5733209483737125`*^9, 3.5733209652997417`*^9}, {3.5733210904587617`*^9, 3.5733211330312366`*^9}, {3.5746581574587035`*^9, 3.5746581598923078`*^9}, {3.5746632559372582`*^9, 3.5746632963569293`*^9}, 3.574669479281269*^9, {3.5746708530664816`*^9, 3.5746708831121345`*^9}, { 3.5746734822639*^9, 3.5746735338531904`*^9}, 3.5747441301394944`*^9, { 3.574950644335537*^9, 3.5749506488751445`*^9}, {3.575001627819734*^9, 3.5750016487549706`*^9}, {3.57534426719551*^9, 3.575344278926731*^9}, { 3.5753450565880966`*^9, 3.575345065324112*^9}, 3.5753451320610294`*^9, { 3.575345171575898*^9, 3.575345181091915*^9}}], 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", ",", "tpo", ",", "tpu", ",", "tplo", ",", "tplu", ",", "tpso", ",", "tpsu", ",", RowBox[{"{", "tpln", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"bt", "=", RowBox[{"Length", "[", "tw", "]"}]}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "tw", "]"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", " ", RowBox[{"coordinates", " ", "of", " ", "clouds"}], " ", "*)"}]}]}], "Input", CellChangeTimes->{{3.568895397419882*^9, 3.5688955157148895`*^9}, { 3.568895549629349*^9, 3.5688955855718126`*^9}, {3.568895617317868*^9, 3.568895845234268*^9}, {3.5688960797194805`*^9, 3.5688961015127187`*^9}, { 3.568896219074525*^9, 3.5688962276233397`*^9}, {3.568896262910602*^9, 3.5688962903198504`*^9}, 3.5688964250728865`*^9, 3.568896456912543*^9, { 3.5688981540863237`*^9, 3.5688981869399815`*^9}, {3.5689021233572955`*^9, 3.5689021341525145`*^9}, {3.5689111169043026`*^9, 3.5689111218495116`*^9}, {3.568911235261711*^9, 3.568911242437723*^9}, 3.5689112948850155`*^9, {3.5689116510180407`*^9, 3.568911800419503*^9}, { 3.568911871820829*^9, 3.5689119012892804`*^9}, {3.5689119993042526`*^9, 3.5689120006770554`*^9}, {3.568912144306507*^9, 3.568912165085744*^9}, { 3.5689528310632005`*^9, 3.5689528569592457`*^9}, {3.5689534065794115`*^9, 3.5689534297298517`*^9}, {3.568954496214126*^9, 3.5689545054337425`*^9}, 3.5689569073699613`*^9, {3.56913308739126*^9, 3.5691332012870607`*^9}, { 3.569135511323518*^9, 3.5691355127119203`*^9}, {3.569136204167535*^9, 3.569136290747687*^9}, {3.5691598050571885`*^9, 3.569159843199256*^9}, { 3.5692215417755947`*^9, 3.569221597186892*^9}, {3.5692216819730406`*^9, 3.5692217090546885`*^9}, {3.5692217693019943`*^9, 3.5692218260704937`*^9}, {3.5692219780303607`*^9, 3.569221989433981*^9}, { 3.569222055468897*^9, 3.5692220728005276`*^9}, {3.5693401536421804`*^9, 3.5693401889450426`*^9}, 3.5693411655535583`*^9, {3.569341634303181*^9, 3.569341638733589*^9}, {3.5704549882757435`*^9, 3.5704550487414494`*^9}, { 3.570455928146194*^9, 3.5704559415310173`*^9}, {3.5708553973857827`*^9, 3.5708554057785974`*^9}, {3.5718402591869545`*^9, 3.5718402726497784`*^9}, 3.572328636723397*^9, {3.572328748419593*^9, 3.57232875246*^9}, { 3.5725921859362335`*^9, 3.5725921932682457`*^9}, {3.5725923978158054`*^9, 3.5725924023086133`*^9}, 3.5725926630786715`*^9, {3.5726167873570023`*^9, 3.57261679757502*^9}, 3.572620232450739*^9, {3.5726252144466896`*^9, 3.57262521482109*^9}, {3.572842310446463*^9, 3.5728423195412793`*^9}, 3.572851092419488*^9, {3.572851145927582*^9, 3.5728511735708303`*^9}, { 3.5728512529593697`*^9, 3.572851265595392*^9}, 3.5728513850916023`*^9, 3.573124143499799*^9, {3.5733124027399025`*^9, 3.573312472362825*^9}, { 3.5733130968319216`*^9, 3.5733130974091225`*^9}, {3.573316202329376*^9, 3.573316209786189*^9}, 3.573368517265889*^9, 3.5746700189174166`*^9, { 3.574670900474965*^9, 3.5746709256066093`*^9}, 3.5753448801985865`*^9, { 3.575371249764445*^9, 3.5753712595300617`*^9}, {3.5763817420169*^9, 3.576381761454534*^9}, {3.5764272928195043`*^9, 3.5764273073119297`*^9}, { 3.576466419934929*^9, 3.5764664258317394`*^9}, {3.576466640956117*^9, 3.576466645230525*^9}, {3.5764673887122307`*^9, 3.576467398571448*^9}, { 3.576468571568708*^9, 3.576468628415208*^9}, 3.576468667602477*^9, { 3.576487927840181*^9, 3.5764879351565933`*^9}, 3.576552988646146*^9}], Cell[BoxData["107"], "Output", CellChangeTimes->{3.576557297108512*^9, 3.576557533199326*^9, 3.5802184140037785`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"cloud", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"dw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"tw", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dw", "]"}], "*)"}], "\[IndentingNewLine]", RowBox[{"Length", "[", "dw", "]"}]}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491351943607`*^9}, {3.569149201666077*^9, 3.5691492026956787`*^9}, { 3.5691494320784817`*^9, 3.5691494680989447`*^9}, {3.569152288984131*^9, 3.5691522953957424`*^9}, {3.5691595058486633`*^9, 3.569159537672719*^9}, 3.569237911685565*^9, 3.5693411655535583`*^9, 3.5693418217687106`*^9, { 3.5703410302061863`*^9, 3.570341063621445*^9}, {3.5720164790812473`*^9, 3.572016508424899*^9}, {3.57235540487335*^9, 3.572355408040156*^9}, { 3.572356807768214*^9, 3.5723568154122276`*^9}, {3.572621722359356*^9, 3.572621725962962*^9}}], Cell[BoxData["107"], "Output", CellChangeTimes->{3.5765572971553116`*^9, 3.5765575332617264`*^9, 3.580218414066179*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"nucleus", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dc", "]"}], " ", "*)"}], " "}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.569152599175076*^9}, {3.569159470889002*^9, 3.569159489874235*^9}, {3.569160442895509*^9, 3.5691604484335184`*^9}, 3.569237923385586*^9, 3.569341165569158*^9, 3.5693418217843103`*^9, { 3.570341048161818*^9, 3.570341058286236*^9}, {3.57034131095988*^9, 3.570341315156287*^9}, 3.5703415891395683`*^9, 3.570341976207448*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"tv1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bc"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv3", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"tv4", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "cj"}]}], "}"}]}], "]"}]}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv5", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "oj"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv6", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "hj"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tv7", "=", RowBox[{"{", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"tv", " ", "=", " ", RowBox[{"Join", "[", RowBox[{ "tv1", ",", "tv2", ",", "tv3", ",", "tv4", ",", "tv5", ",", "tv6", ",", "tv7"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "tv", "]"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{"Length", "[", "tv", "]"}]}], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699696763124`*^9}, 3.569341165569158*^9, { 3.5693417833614435`*^9, 3.5693417874486504`*^9}, {3.5704552110753345`*^9, 3.5704552378605814`*^9}, {3.5704560776724567`*^9, 3.570456083070066*^9}, { 3.570855427306635*^9, 3.570855434529448*^9}, {3.57184030784344*^9, 3.5718403245666695`*^9}, {3.5723553440956435`*^9, 3.5723553601792717`*^9}, {3.5723567913257856`*^9, 3.572356801543803*^9}, { 3.5723587125159597`*^9, 3.572358735884801*^9}, {3.5726205042656164`*^9, 3.5726205078692226`*^9}, {3.5726209578956137`*^9, 3.5726209632776227`*^9}, {3.5726266468256054`*^9, 3.5726266628780336`*^9}, {3.57284236531176*^9, 3.57284238273699*^9}, { 3.572842728620798*^9, 3.572842734502008*^9}, 3.5731240921601086`*^9, { 3.5733125819686174`*^9, 3.573312582608218*^9}, {3.5733126196738834`*^9, 3.5733126474263325`*^9}, {3.5733131200291624`*^9, 3.5733131288743777`*^9}, 3.573368536719124*^9, {3.5746698693443537`*^9, 3.5746698885011873`*^9}, { 3.574740991757182*^9, 3.5747410134412203`*^9}, {3.5748285231568966`*^9, 3.5748285315497117`*^9}, 3.5749358536151505`*^9, 3.5753449209770584`*^9, 3.5753511874612646`*^9, {3.575371200889559*^9, 3.575371204695966*^9}, { 3.5762943805450716`*^9, 3.5762943822142744`*^9}, {3.5763817883957815`*^9, 3.5763817961489944`*^9}, {3.5763824652185698`*^9, 3.576382522626671*^9}, { 3.5764273345495777`*^9, 3.5764273436131935`*^9}, {3.576427376872452*^9, 3.5764274135325165`*^9}, {3.5764659773933516`*^9, 3.57646599338338*^9}, { 3.576466438639362*^9, 3.5764664431945696`*^9}, {3.576466548510355*^9, 3.5764665530655627`*^9}, {3.5764667751631527`*^9, 3.576466809873214*^9}, 3.576468682001302*^9, {3.57648794456341*^9, 3.576487946747414*^9}, { 3.5765530125609875`*^9, 3.5765530130757885`*^9}}], Cell[BoxData["107"], "Output", CellChangeTimes->{3.576557297170912*^9, 3.5765575332773266`*^9, 3.5802184140817785`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"ow", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "2.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"bc", "+", "nb"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "0.5"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", RowBox[{"(", RowBox[{"cj", "-", "1"}], ")"}]}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "1.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "2.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "oj"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"-", "2.0"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "hj"}]}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"-", "2"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "24", "]"}], "]"}], "=", "0.0"}], ";", " ", "ow"}], "\[IndentingNewLine]", RowBox[{"cnv", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bc"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "cw"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"bc", "+", "1"}], ",", "n"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "cj"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "oj"}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{"0.0", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "*", "hj"}]}], "}"}]}], "]"}], ",", RowBox[{"{", "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.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699655579047`*^9}, {3.56921753575448*^9, 3.569217541807291*^9}, {3.569217576283351*^9, 3.5692176436130695`*^9}, { 3.5692176921603546`*^9, 3.569217692768756*^9}, {3.5692177389136367`*^9, 3.569217740192839*^9}, {3.5692222042775583`*^9, 3.5692222070231633`*^9}, { 3.569230669979245*^9, 3.5692306709620466`*^9}, {3.5692308816872168`*^9, 3.5692309970650196`*^9}, {3.5692310297158766`*^9, 3.569231090602784*^9}, { 3.5692311251880445`*^9, 3.569231148868886*^9}, 3.56923793753481*^9, 3.569341165569158*^9, 3.5693418217375107`*^9, {3.5703412254249296`*^9, 3.5703412423509593`*^9}, {3.5704553045038986`*^9, 3.570455320681127*^9}, { 3.57045550485505*^9, 3.5704555063370533`*^9}, {3.5704556421508913`*^9, 3.5704556424784923`*^9}, 3.5704557137862177`*^9, {3.5704564711051474`*^9, 3.5704564908079824`*^9}, {3.570456521602436*^9, 3.5704565228348384`*^9}, { 3.5704569127419233`*^9, 3.5704569202767363`*^9}, 3.5704636205455036`*^9, 3.570596993178934*^9, {3.570855461377095*^9, 3.5708554743563175`*^9}, 3.570855611589759*^9, {3.571840408884818*^9, 3.571840415296429*^9}, { 3.571840465559717*^9, 3.571840473905732*^9}, {3.5720165322617407`*^9, 3.5720165635241957`*^9}, {3.5721934404423375`*^9, 3.57219344758715*^9}, 3.572193479551606*^9, {3.5721935303764954`*^9, 3.572193534214102*^9}, { 3.5726206642250977`*^9, 3.5726206651142993`*^9}, {3.572620782223705*^9, 3.572620782738506*^9}, {3.572620924963956*^9, 3.5726209465699935`*^9}, { 3.572842408289835*^9, 3.5728424357302833`*^9}, {3.5728424783807583`*^9, 3.57284247916076*^9}, 3.5728451195121975`*^9, {3.5731249170427575`*^9, 3.573124927962777*^9}, {3.5731450428093076`*^9, 3.5731450615449405`*^9}, { 3.5731451273458557`*^9, 3.573145132259865*^9}, {3.573312700185625*^9, 3.573312779979765*^9}, {3.5733131504804153`*^9, 3.5733131516816177`*^9}, { 3.5733132756862354`*^9, 3.5733132772462387`*^9}, {3.5733147916812983`*^9, 3.573314840275384*^9}, {3.5733593507659893`*^9, 3.573359359377204*^9}, { 3.5746698998736076`*^9, 3.574669995361375*^9}, {3.5747410251880407`*^9, 3.574741049430484*^9}, {3.574828384379053*^9, 3.574828403270686*^9}, 3.5748284615211887`*^9, {3.5748284935168447`*^9, 3.5748284944996467`*^9}, { 3.574935858419959*^9, 3.574935862834767*^9}, {3.5753447605151763`*^9, 3.5753447815128136`*^9}, {3.575371294396123*^9, 3.5753713029293385`*^9}, { 3.5753713452678127`*^9, 3.5753713535982275`*^9}, {3.5762944216667438`*^9, 3.5762944709472303`*^9}, {3.5763819290300283`*^9, 3.576381935160839*^9}, { 3.576382364645193*^9, 3.576382415158082*^9}, {3.5764274631562033`*^9, 3.576427662852154*^9}, {3.5764277145194445`*^9, 3.5764277187002525`*^9}, { 3.5764659837581625`*^9, 3.57646598781417*^9}, {3.576487963767044*^9, 3.5764879898814898`*^9}, {3.5765530379890323`*^9, 3.5765530665370827`*^9}, {3.5765538993825455`*^9, 3.5765539074321594`*^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.`"}], ",", "0.`", ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "2.`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "0.5`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", 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.576557297170912*^9, 3.5765575332929263`*^9, 3.5802184140817785`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "6.`", ",", "7.`", ",", "7.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "8.`", ",", "6.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output", CellChangeTimes->{3.576557297170912*^9, 3.5765575332929263`*^9, 3.5802184140817785`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"nucleus", "-", RowBox[{"cloud", " ", "distances"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"dcw", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"sq", "=", RowBox[{"Norm", "[", RowBox[{ RowBox[{"tw", "[", RowBox[{"[", "i", "]"}], "]"}], "-", RowBox[{"tv", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}]}], ";", RowBox[{"If", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"sq", ">", " ", "0.1"}], " ", "&&", " ", RowBox[{"i", "\[NotEqual]", "j"}]}], ")"}], ",", RowBox[{"1", "/", "sq"}], ",", "0"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "bt"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "bt"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Length", "[", "dcw", "]"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MatrixForm", "[", "dcw", "]"}], "*)"}], " "}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, 3.568910195129884*^9, 3.568910620995032*^9, {3.568912393532545*^9, 3.5689124022841606`*^9}, { 3.5691332074958715`*^9, 3.5691332081666727`*^9}, {3.5691352237838125`*^9, 3.5691352313342257`*^9}, {3.5691489965881166`*^9, 3.5691490103317413`*^9}, {3.5691490440122004`*^9, 3.5691491273631463`*^9}, {3.5691523435842266`*^9, 3.56915234531583*^9}, { 3.5691524837816734`*^9, 3.5691526041202846`*^9}, {3.5691595921324143`*^9, 3.5691596901941867`*^9}, {3.569159772406331*^9, 3.5691597832951508`*^9}, { 3.5691598700313025`*^9, 3.569159885147729*^9}, {3.569160485733184*^9, 3.569160486887586*^9}, {3.5691672792073207`*^9, 3.5691672793789206`*^9}, { 3.5691673418102303`*^9, 3.5691674875144863`*^9}, {3.569168259700243*^9, 3.569168260386644*^9}, {3.569168321257951*^9, 3.569168337466379*^9}, { 3.5691685152754917`*^9, 3.569168656096939*^9}, {3.5691687137702403`*^9, 3.569168772566744*^9}, {3.5691697249898825`*^9, 3.569169747063921*^9}, { 3.569169944981469*^9, 3.5691699655579047`*^9}, {3.56921753575448*^9, 3.569217541807291*^9}, {3.569217576283351*^9, 3.5692176436130695`*^9}, { 3.5692176921603546`*^9, 3.569217692768756*^9}, {3.5692177389136367`*^9, 3.569217740192839*^9}, {3.5692222042775583`*^9, 3.5692222070231633`*^9}, { 3.569230669979245*^9, 3.5692306709620466`*^9}, {3.5692308816872168`*^9, 3.5692309970650196`*^9}, {3.5692310297158766`*^9, 3.569231090602784*^9}, { 3.5692311251880445`*^9, 3.569231148868886*^9}, 3.56923793753481*^9, 3.569341165569158*^9, 3.5693418217375107`*^9, {3.5703412254249296`*^9, 3.5703412423509593`*^9}, {3.5704553045038986`*^9, 3.570455320681127*^9}, { 3.57045550485505*^9, 3.5704555063370533`*^9}, {3.5704556421508913`*^9, 3.5704556424784923`*^9}, 3.5704557137862177`*^9, {3.5704564711051474`*^9, 3.5704564908079824`*^9}, {3.570456521602436*^9, 3.5704565228348384`*^9}, { 3.5704569127419233`*^9, 3.5704569202767363`*^9}, 3.5704636205455036`*^9, 3.570596993178934*^9, {3.570855461377095*^9, 3.5708554743563175`*^9}, 3.570855611589759*^9, {3.571840408884818*^9, 3.571840415296429*^9}, { 3.571840465559717*^9, 3.571840473905732*^9}, {3.5720165322617407`*^9, 3.5720165635241957`*^9}, {3.5721934404423375`*^9, 3.57219344758715*^9}, 3.572193479551606*^9, 3.5721935303764954`*^9, {3.5721935661785583`*^9, 3.5721935879405966`*^9}, {3.5721936909943776`*^9, 3.572193697218788*^9}, { 3.5721937395728626`*^9, 3.57219374339487*^9}, {3.5721937963725624`*^9, 3.5721938223154078`*^9}, {3.572193859786674*^9, 3.572193861533877*^9}, 3.5723554650270557`*^9, {3.5723567325136824`*^9, 3.5723567701565485`*^9}, 3.572621740954589*^9}], Cell[BoxData["107"], "Output", CellChangeTimes->{3.5765572972645116`*^9, 3.576557533386526*^9, 3.580218414175379*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"Elcharge", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", "ow", "]"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"Length", "[", "ow", "]"}], "\[IndentingNewLine]", RowBox[{"Nuccharge", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"cnv", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", "cnv", "]"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"Length", "[", "cnv", "]"}], "\[IndentingNewLine]"}], "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, {3.573315125131884*^9, 3.57331521983965*^9}, {3.573315279213355*^9, 3.573315294797782*^9}, { 3.5733153507238803`*^9, 3.5733153551854877`*^9}, {3.5733153963695602`*^9, 3.5733154277724156`*^9}, {3.5733182525629773`*^9, 3.5733182928434477`*^9}}], Cell[BoxData[ RowBox[{"-", "174.`"}]], "Output", CellChangeTimes->{3.5765572972957115`*^9, 3.5765575334021263`*^9, 3.580218414175379*^9}], Cell[BoxData["107"], "Output", CellChangeTimes->{3.5765572972957115`*^9, 3.5765575334021263`*^9, 3.580218414175379*^9}], Cell[BoxData["174.`"], "Output", CellChangeTimes->{3.5765572972957115`*^9, 3.5765575334021263`*^9, 3.580218414175379*^9}], Cell[BoxData["107"], "Output", CellChangeTimes->{3.5765572972957115`*^9, 3.5765575334021263`*^9, 3.580218414175379*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"Vee", "=", "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, {3.573315125131884*^9, 3.57331521983965*^9}, {3.573315279213355*^9, 3.573315294797782*^9}, { 3.5733153507238803`*^9, 3.5733153551854877`*^9}, {3.5733153963695602`*^9, 3.5733154277724156`*^9}, 3.576427744658698*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"all", " ", "clouds", " ", "repulsion"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "bt"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", RowBox[{"i", "+", "1"}]}], ",", RowBox[{"j", "\[LessEqual]", "bt"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "i", "]"}], "]"}], "*", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "j", "]"}], "]"}], "/", RowBox[{"dw", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}]}]}]}]}]}], "]"}]}], "]"}], "\[IndentingNewLine]", "Vee"}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.568910199825492*^9}, 3.568910617609826*^9, {3.56891263539537*^9, 3.568912638842976*^9}, {3.568952611212014*^9, 3.5689526227248344`*^9}, { 3.5689527476498537`*^9, 3.5689527480086546`*^9}, {3.5689530637688093`*^9, 3.5689530642368097`*^9}, {3.569133363948546*^9, 3.569133373698563*^9}, { 3.5691350563331184`*^9, 3.56913505725352*^9}, 3.5691351502452836`*^9, { 3.569135237792637*^9, 3.5691352453118505`*^9}, {3.5691353071659594`*^9, 3.5691353166039753`*^9}, {3.5691447439722476`*^9, 3.5691448093675623`*^9}, {3.569146067386572*^9, 3.569146078244191*^9}, { 3.5691478509845047`*^9, 3.5691478969889855`*^9}, {3.569149270524598*^9, 3.569149283675421*^9}, {3.5691523005437512`*^9, 3.5691523013861527`*^9}, { 3.570457123841494*^9, 3.5704571330923104`*^9}, {3.570457176959587*^9, 3.570457191296013*^9}, {3.570463789649801*^9, 3.570463797637015*^9}, { 3.5704639300032473`*^9, 3.5704639472412777`*^9}, {3.570464099403945*^9, 3.5704641196371803`*^9}, {3.570464183737693*^9, 3.5704641855628963`*^9}, { 3.570855532092019*^9, 3.5708555433240385`*^9}, {3.5764684408872786`*^9, 3.576468450574896*^9}}], Cell[BoxData["2164.966884295259`"], "Output", CellChangeTimes->{3.576557297326912*^9, 3.5765575334333267`*^9, 3.5802184142065787`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "half", " ", "cloud", " ", "with", " ", "other", " ", "common", " ", RowBox[{"halfcloud", ":", " ", RowBox[{"subtract", " ", "WW"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"For", " ", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"nb", "+", "bc", "+", "1"}]}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"nb", "+", "bc", "+", "cj"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "-", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", "i", "]"}], "]"}], "*", RowBox[{ RowBox[{"ow", "[", RowBox[{"[", RowBox[{"i", "+", "cj"}], "]"}], "]"}], "/", RowBox[{"(", RowBox[{ RowBox[{"rpo", "[", RowBox[{"[", RowBox[{"i", "-", "nb", "-", "bc"}], "]"}], "]"}], "+", RowBox[{"rpi", "[", RowBox[{"[", RowBox[{"i", "-", "nb", "-", "bc"}], "]"}], "]"}]}], ")"}]}]}]}]}]}], "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Vee", "=", RowBox[{"Vee", "-", RowBox[{"0.5", "*", "0.25", "*", RowBox[{"Sum", "[", RowBox[{ RowBox[{"1", "/", RowBox[{"rpo", "[", RowBox[{"[", "i", "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "12"}], "}"}]}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.571840548723463*^9, 3.571840579798718*^9}, { 3.5718477253093*^9, 3.5718477304573092`*^9}, {3.572620810756155*^9, 3.5726208298349886`*^9}, {3.5726208600522413`*^9, 3.5726208972739067`*^9}, {3.57279778559276*^9, 3.57279781975682*^9}, 3.5733150956478324`*^9, {3.5733650408599825`*^9, 3.573365073947641*^9}, { 3.573365126847334*^9, 3.573365203209468*^9}, {3.57467280495751*^9, 3.574672834457162*^9}, {3.574672996697447*^9, 3.5746729984914503`*^9}, { 3.574743538820456*^9, 3.574743544140065*^9}, {3.574828627021879*^9, 3.5748286276614804`*^9}, {3.5748512413081284`*^9, 3.57485124786014*^9}, { 3.574851313707855*^9, 3.5748513247994747`*^9}, {3.575602516740883*^9, 3.575602523074494*^9}, {3.575722007593234*^9, 3.575722017748852*^9}, { 3.575722104095004*^9, 3.575722128165846*^9}, {3.575722369123869*^9, 3.575722516668928*^9}, {3.5762945364517455`*^9, 3.5762945416309547`*^9}, 3.5762963089424586`*^9, {3.576382205072513*^9, 3.5763822136993284`*^9}, { 3.5763822439477816`*^9, 3.5763822577538056`*^9}, {3.5764277870751724`*^9, 3.5764278234076357`*^9}, {3.5764278678989143`*^9, 3.5764278932489586`*^9}, {3.576468357442732*^9, 3.576468387613185*^9}, { 3.576488626596608*^9, 3.57648862745461*^9}, {3.576554040344393*^9, 3.5765541044293056`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"sc", "=", "0.3873"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"core", " ", "clouds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", "bc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sc", "/", RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"sw", "=", "0.3873"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"bonding", " ", "clouds"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", "nb"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sw", "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}]}]}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", RowBox[{"2", "*", "oj"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"3", "*", RowBox[{"sw", "/", "rlo"}]}]}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], " ", ",", RowBox[{"i", "\[LessEqual]", "hj"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"2", "*", "3", "*", RowBox[{"sw", "/", RowBox[{"rlos", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Vee", "=", RowBox[{"Vee", "+", RowBox[{"2", "*", "3", "*", RowBox[{"sw", "/", "rln"}]}]}]}], ";"}], "\[IndentingNewLine]", "Vee"}], "Input", CellChangeTimes->{{3.5689548890696163`*^9, 3.568955116299615*^9}, { 3.5689552553894596`*^9, 3.5689552575266633`*^9}, {3.5689552936875267`*^9, 3.5689553203323736`*^9}, {3.568955404229321*^9, 3.568955433245372*^9}, 3.5689554882822685`*^9, 3.5689562157115464`*^9, {3.568956283961666*^9, 3.5689562858180695`*^9}, {3.5689566111878405`*^9, 3.5689566291278725`*^9}, {3.5689566695319433`*^9, 3.5689567220104356`*^9}, {3.5690810958835616`*^9, 3.569081104525977*^9}, { 3.5691717160681796`*^9, 3.569171751714242*^9}, {3.5691717855663013`*^9, 3.5691719006789036`*^9}, 3.569234247377528*^9, {3.569235622381544*^9, 3.569235625142749*^9}, {3.5692356799612455`*^9, 3.569235740536152*^9}, { 3.57045575500149*^9, 3.5704557604770994`*^9}, {3.57046440981329*^9, 3.5704644333849316`*^9}, {3.5705963024877205`*^9, 3.5705963300061693`*^9}, {3.5706010463712544`*^9, 3.570601069225295*^9}, { 3.5706012097659416`*^9, 3.5706012109983435`*^9}, {3.570601290948484*^9, 3.570601291619285*^9}, {3.570601333099758*^9, 3.570601444951955*^9}, 3.5706014761208096`*^9, {3.570601526633698*^9, 3.570601615179454*^9}, { 3.5708576202336864`*^9, 3.5708576267544985`*^9}, {3.5708577990100007`*^9, 3.5708578016152053`*^9}, {3.5708580423548284`*^9, 3.570858044429632*^9}, { 3.570858075754487*^9, 3.5708581072821426`*^9}, {3.570858449889944*^9, 3.5708585756105647`*^9}, {3.572795632149378*^9, 3.5727956355657835`*^9}, { 3.5728516649872932`*^9, 3.5728517189321885`*^9}, {3.572851825152775*^9, 3.572851850284419*^9}, {3.5728520019946856`*^9, 3.572852210645052*^9}, 3.573124800838154*^9, {3.573322145410615*^9, 3.573322167859054*^9}, { 3.573322202803116*^9, 3.573322232630368*^9}, {3.5733683306427617`*^9, 3.5733683367267723`*^9}, {3.5733684056944933`*^9, 3.573368412932906*^9}, { 3.5733695833093615`*^9, 3.5733696100478086`*^9}, {3.5733696433694673`*^9, 3.573369694568757*^9}, {3.5733697316344223`*^9, 3.5733697335688257`*^9}, { 3.573369920425954*^9, 3.5733699263851643`*^9}, {3.57336995814682*^9, 3.573370085162243*^9}, {3.5733701175791*^9, 3.573370122087508*^9}, { 3.5733701577803707`*^9, 3.5733701630219803`*^9}, {3.573370193660434*^9, 3.573370198262442*^9}, {3.5746729482125616`*^9, 3.5746729642181897`*^9}, { 3.5746730450731316`*^9, 3.5746730625763626`*^9}, {3.574674580516679*^9, 3.5746746053675222`*^9}, {3.574674636692377*^9, 3.574674639859183*^9}, { 3.574743595854156*^9, 3.574743647131446*^9}, {3.575008591469165*^9, 3.5750085963519735`*^9}, 3.5753455268821225`*^9, {3.5753457669977446`*^9, 3.5753460420262275`*^9}, {3.5753460769078884`*^9, 3.575346080620695*^9}, { 3.5753461127255516`*^9, 3.575346158121631*^9}, {3.575388932760494*^9, 3.5753889451001163`*^9}, {3.5757144777564526`*^9, 3.575714504058099*^9}, { 3.5757750148485985`*^9, 3.5757750729587007`*^9}, 3.576294512162503*^9, { 3.576294649099543*^9, 3.576294654341152*^9}, {3.5763822868478565`*^9, 3.5763822927602673`*^9}, {3.5764279161029987`*^9, 3.5764279996879454`*^9}, {3.5764675995778008`*^9, 3.576467628266251*^9}, { 3.5764705151409225`*^9, 3.576470527340144*^9}, {3.576488009943125*^9, 3.576488011175527*^9}, {3.5764888110669317`*^9, 3.5764888249197564`*^9}, { 3.5765541652538123`*^9, 3.5765541677342167`*^9}, {3.57655483577419*^9, 3.576554842232601*^9}}], Cell[BoxData["2339.2656204397936`"], "Output", CellChangeTimes->{3.576557297326912*^9, 3.576557533448927*^9, 3.580218414222179*^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[{"-", "4463.682752611403`"}]], "Output", CellChangeTimes->{3.576557297342512*^9, 3.5765575334645267`*^9, 3.580218414222179*^9}] }, Open ]], Cell[BoxData[ RowBox[{"(*", " ", RowBox[{ "core", " ", "nuclei", " ", "in", " ", "their", " ", "cloud", " ", "centers"}], " ", "*)"}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.5689102262831383`*^9}, {3.5689126851126575`*^9, 3.5689126875306616`*^9}, {3.5690878255169816`*^9, 3.569087857185037*^9}, { 3.5691452963224173`*^9, 3.569145370484948*^9}, {3.5691454640695124`*^9, 3.5691454653799143`*^9}, {3.5691523784970884`*^9, 3.569152451988817*^9}, { 3.569152629610729*^9, 3.5691526609667845`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "bc"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vne", "=", RowBox[{"Vne", "-", RowBox[{"3", "*", RowBox[{ RowBox[{"cn", "[", RowBox[{"[", "i", "]"}], "]"}], "/", RowBox[{"u2", "[", RowBox[{"[", "i", "]"}], "]"}]}]}]}]}]}], "]"}], "\[IndentingNewLine]", "Vne"}], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.5689102262831383`*^9}, {3.5689126851126575`*^9, 3.5689126875306616`*^9}, {3.5690878255169816`*^9, 3.569087857185037*^9}, { 3.5691452963224173`*^9, 3.569145370484948*^9}, {3.5691454640695124`*^9, 3.5691454653799143`*^9}, {3.5691523784970884`*^9, 3.569152451988817*^9}, { 3.569152629610729*^9, 3.5691526649915915`*^9}, 3.569170044088443*^9, { 3.5764676569391017`*^9, 3.576467667952721*^9}}], Cell[BoxData[ RowBox[{"-", "6476.135685447455`"}]], "Output", CellChangeTimes->{3.576557297342512*^9, 3.5765575334801264`*^9, 3.5802184142377787`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "protons", " ", "in", " ", "their", " ", "bonding", " ", "cloud"}], ",", " ", RowBox[{"distance", " ", RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], " ", "to", " ", "cloud", " ", "center"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", RowBox[{"cw", "+", "1"}]}], ",", RowBox[{"i", "\[LessEqual]", "nb"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"Vne", "=", RowBox[{"Vne", "-", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"u2", "[", RowBox[{"[", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], "]"}], "]"}], "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ")"}], "^", "2"}]}], ")"}], "/", RowBox[{"a", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}]}]}]}]}], "]"}], "\[IndentingNewLine]", "Vne"}]}]], "Input", CellChangeTimes->{{3.5692316245917215`*^9, 3.5692316336397376`*^9}, { 3.5764676737247314`*^9, 3.576467683724349*^9}}], Cell[BoxData[ RowBox[{"-", "6516.773209136806`"}]], "Output", CellChangeTimes->{3.5765572973581123`*^9, 3.5765575334957266`*^9, 3.580218414253379*^9}] }, Open ]], 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]", RowBox[{ RowBox[{"Vnn", "=", "Vn"}], ";"}]}]], "Input", CellChangeTimes->{{3.5688982251756487`*^9, 3.5688986440675845`*^9}, { 3.5688986873108606`*^9, 3.56889871560931*^9}, {3.5688987970414534`*^9, 3.5688988526711507`*^9}, {3.568898887147211*^9, 3.568898888644814*^9}, { 3.5688989206248703`*^9, 3.568899041759083*^9}, {3.5688990876855636`*^9, 3.568899258349863*^9}, 3.568899300267137*^9, {3.568899351326027*^9, 3.5688993831032825`*^9}, {3.5688994370481772`*^9, 3.568899468217032*^9}, { 3.5688995813016305`*^9, 3.5688997165538683`*^9}, {3.5688998495129013`*^9, 3.568899932364647*^9}, {3.568899967667509*^9, 3.568900024529609*^9}, { 3.5689000794261055`*^9, 3.568900136257005*^9}, {3.5689001767858763`*^9, 3.56890020149632*^9}, {3.568902068726*^9, 3.568902074139209*^9}, 3.56890216040736*^9, 3.568902344113283*^9, {3.5689024237982235`*^9, 3.56890243907065*^9}, 3.5689025770684924`*^9, {3.568910195129884*^9, 3.5689102262831383`*^9}, {3.5689126851126575`*^9, 3.5689126875306616`*^9}, {3.5690878255169816`*^9, 3.569087857185037*^9}, { 3.5691452963224173`*^9, 3.569145370484948*^9}, {3.5691454640695124`*^9, 3.5691454653799143`*^9}, {3.5691523784970884`*^9, 3.569152451988817*^9}, { 3.569152629610729*^9, 3.5691526609667845`*^9}, 3.5691527650033674`*^9, { 3.5691528050174375`*^9, 3.5691528220994673`*^9}, {3.5691528694611506`*^9, 3.5691529180864363`*^9}, {3.5691531888249116`*^9, 3.569153192974519*^9}, 3.569153245359411*^9, {3.5691532970111017`*^9, 3.5691533046239147`*^9}, { 3.5691708905147295`*^9, 3.56917090235515*^9}, {3.5691714357512875`*^9, 3.569171449775712*^9}, 3.56917197825784*^9, {3.5764096561174574`*^9, 3.5764096670530767`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ratio", "=", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"Vne", "+", RowBox[{"2", "*", "Vnn"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{"Vee", "-", "Vnn"}], ")"}]}]}]], "Input"], Cell[BoxData["6.603309498758343`"], "Output", CellChangeTimes->{3.580218414253379*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "now", " ", "add", " ", "the", " ", "energy", " ", "terms", " ", "of", " ", RowBox[{"Cl", "[", "Ne", "]"}], "7"}], "+", " ", RowBox[{"from", " ", "Ne_s24b2", RowBox[{"_atoms", ".", "nb"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ "Vee", "\[IndentingNewLine]", "Vnn", "\[IndentingNewLine]", "Vne", "\[IndentingNewLine]", RowBox[{"Tpi", " ", "=", " ", RowBox[{"2.2", "*", "1.125", "*", RowBox[{"(", RowBox[{ RowBox[{"0.5", "*", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"1", "/", RowBox[{ RowBox[{"rpo", "[", RowBox[{"[", "i", "]"}], "]"}], "^", "2"}]}], "+", RowBox[{"1", "/", RowBox[{ RowBox[{"rpi", "[", RowBox[{"[", "i", "]"}], "]"}], "^", "2"}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "12"}], "}"}]}], "]"}]}], "+", RowBox[{"1", "/", RowBox[{ RowBox[{"rpo", "[", RowBox[{"[", "13", "]"}], "]"}], "^", "2"}]}], "+", RowBox[{"1", "/", RowBox[{ RowBox[{"rpi", "[", RowBox[{"[", "13", "]"}], "]"}], "^", "2"}]}]}], ")"}]}]}], RowBox[{"(*", " ", RowBox[{"pi", " ", "kin", " ", "e", " ", "added"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Tlp", " ", "=", RowBox[{"2.25", "*", RowBox[{"(", RowBox[{ RowBox[{"2", "*", RowBox[{"oj", "/", RowBox[{"rlo", "^", "2"}]}]}], "+", RowBox[{"1", "/", RowBox[{"rln", "^", "2"}]}], "+", RowBox[{"Sum", "[", RowBox[{ RowBox[{"2", "/", RowBox[{ RowBox[{"rlos", "[", RowBox[{"[", "i", "]"}], "]"}], "^", "2"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "hj"}], "}"}]}], "]"}]}], ")"}]}]}], "\[IndentingNewLine]", RowBox[{"Vtot", "=", RowBox[{"Vne", "+", "Vee", "+", "Vnn"}]}], "\[IndentingNewLine]", RowBox[{"Ttot", " ", "=", RowBox[{"Ttot", "+", "Tpi", "+", "Tlp", "+", "388.70111"}]}], "\[IndentingNewLine]", RowBox[{"Vir", " ", "=", RowBox[{ RowBox[{"-", "Vtot"}], "/", RowBox[{"(", RowBox[{"Ttot", "-", "388.70111"}], ")"}]}]}], "\[IndentingNewLine]", RowBox[{"Etot", "=", RowBox[{"Ttot", "+", "Vtot", "-", RowBox[{"2", "*", "388.70111"}]}]}]}]}]], "Input", CellChangeTimes->{{3.5689074950860367`*^9, 3.5689075109980645`*^9}, { 3.568910298074465*^9, 3.5689103015064707`*^9}, {3.568910724064413*^9, 3.5689107693044925`*^9}, {3.568955368910859*^9, 3.568955378629676*^9}, { 3.568955601366867*^9, 3.568955616218093*^9}, {3.5704638504275074`*^9, 3.570463876370353*^9}, {3.570464305074706*^9, 3.5704643133895206`*^9}, { 3.570464352171189*^9, 3.570464353231991*^9}, {3.570712404698539*^9, 3.5707124150569572`*^9}, {3.570809962851386*^9, 3.5708101493809137`*^9}, { 3.5708102160710306`*^9, 3.570810245165082*^9}, {3.5708102767551374`*^9, 3.5708103693413*^9}, {3.570810404207361*^9, 3.5708104232081947`*^9}, { 3.5708104788690925`*^9, 3.5708104825818987`*^9}, {3.5708105169643593`*^9, 3.570810517884761*^9}, {3.570810561767638*^9, 3.5708105625476394`*^9}, { 3.5708106179589367`*^9, 3.570810645648985*^9}, {3.5708552812279787`*^9, 3.570855300572013*^9}, {3.5718406368324184`*^9, 3.5718406454592333`*^9}, 3.57184067742369*^9, {3.572851887958485*^9, 3.5728519643206196`*^9}, 3.573124110349741*^9, 3.5731249811744704`*^9, {3.573321827294856*^9, 3.573321828074857*^9}, {3.5733218842973557`*^9, 3.573322060546466*^9}, { 3.5733223511749763`*^9, 3.573322362562996*^9}, {3.5733662939947844`*^9, 3.573366334227255*^9}, {3.573366373336523*^9, 3.5733663802005353`*^9}, { 3.5733670479305086`*^9, 3.573367141577473*^9}, {3.573367235162038*^9, 3.5733672396704454`*^9}, {3.5733673160013795`*^9, 3.573367336141015*^9}, { 3.57337971917793*^9, 3.573379817005702*^9}, {3.5733798503429604`*^9, 3.5733798602021775`*^9}, 3.574672644355228*^9, {3.5746726806096916`*^9, 3.5746727600450315`*^9}, {3.5747435066375995`*^9, 3.574743512113209*^9}, { 3.574828574792988*^9, 3.57482858761621*^9}, 3.5749358994636307`*^9, { 3.575344595934888*^9, 3.5753446255749397`*^9}, {3.5753719193332205`*^9, 3.575371943029662*^9}, {3.5757146920540295`*^9, 3.575714718901676*^9}, { 3.5757148376958847`*^9, 3.5757148384134865`*^9}, {3.57571486928594*^9, 3.575714870065942*^9}, {3.5757209777730255`*^9, 3.5757209784438267`*^9}, { 3.5757212754683485`*^9, 3.5757213005219927`*^9}, {3.5757222764909067`*^9, 3.5757222942281375`*^9}, {3.5757232810546713`*^9, 3.5757232920370903`*^9}, 3.576294590880241*^9, {3.57638195835808*^9, 3.576381963006888*^9}, { 3.576382027559801*^9, 3.576382030648607*^9}, {3.576382067324271*^9, 3.5763821038283353`*^9}, {3.576383939251156*^9, 3.5763839507795763`*^9}, { 3.576405754238834*^9, 3.5764057825528836`*^9}, {3.5764280841776943`*^9, 3.5764281346905828`*^9}, {3.5764281737998514`*^9, 3.5764282448423767`*^9}, 3.5764677673092957`*^9, {3.5764679353371906`*^9, 3.576467952559621*^9}, { 3.5764679937592936`*^9, 3.576467997050899*^9}, {3.576468063117015*^9, 3.5764681503523684`*^9}, 3.576468201426858*^9, {3.5764696390121837`*^9, 3.5764696436141915`*^9}, {3.57647024053364*^9, 3.576470240970441*^9}, { 3.576488035121569*^9, 3.5764880360419707`*^9}, {3.576488417852641*^9, 3.576488418055442*^9}, {3.576488934369549*^9, 3.57648895226278*^9}, { 3.57655359467601*^9, 3.5765536672541375`*^9}, {3.5765542586823764`*^9, 3.576554337400115*^9}, {3.576554381860193*^9, 3.576554382640194*^9}, { 3.576554482074769*^9, 3.576554548250085*^9}, {3.576554583428147*^9, 3.576554590494959*^9}}], Cell[BoxData["2339.2656204397936`"], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData["1939.9351020914073`"], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData[ RowBox[{"-", "6516.773209136806`"}]], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData["22.723969295409656`"], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData["21.33812846491627`"], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData[ RowBox[{"-", "2237.5724866056053`"}]], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData["1501.8450286418026`"], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData["2.0101376373108777`"], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}], Cell[BoxData[ RowBox[{"-", "1513.1296779638028`"}]], "Output", CellChangeTimes->{3.576557297373712*^9, 3.5765575335737267`*^9, 3.580218414268979*^9}] }, Open ]] }, WindowSize->{1064, 946}, WindowMargins->{{104, Automatic}, {Automatic, 7}}, 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, 2431, 40, 52, "Input"], Cell[CellGroupData[{ Cell[3013, 64, 2321, 38, 72, "Input"], Cell[5337, 104, 5972, 160, 292, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[11346, 269, 955, 14, 31, "Input"], Cell[12304, 285, 121, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[12462, 292, 838, 19, 31, "Input"], Cell[13303, 313, 5298, 121, 656, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[18638, 439, 997, 28, 72, "Input"], Cell[19638, 469, 43818, 609, 671, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[63493, 1083, 1528, 40, 52, "Input"], Cell[65024, 1125, 678, 12, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[65739, 1142, 1125, 29, 92, "Input"], Cell[66867, 1173, 136, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[67040, 1180, 1560, 29, 31, "Input"], Cell[68603, 1211, 941, 14, 31, "Output"] }, Open ]], Cell[69559, 1228, 1592, 29, 31, "Input"], Cell[CellGroupData[{ Cell[71176, 1261, 1234, 18, 31, "Input"], Cell[72413, 1281, 2995, 88, 72, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[75445, 1374, 697, 14, 31, "Input"], Cell[76145, 1390, 624, 11, 52, "Output"] }, Open ]], Cell[76784, 1404, 908, 24, 31, "Input"], Cell[CellGroupData[{ Cell[77717, 1432, 6789, 138, 152, "Input"], Cell[84509, 1572, 786, 13, 72, "Output"], Cell[85298, 1587, 798, 13, 72, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[86133, 1605, 519, 12, 31, "Input"], Cell[86655, 1619, 941, 14, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[87633, 1638, 1477, 39, 52, "Input"], Cell[89113, 1679, 675, 12, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[89825, 1696, 827, 23, 92, "Input"], Cell[90655, 1721, 122, 2, 31, "Output"], Cell[90780, 1725, 122, 2, 31, "Output"] }, Open ]], Cell[90917, 1730, 1556, 21, 31, "Input"], Cell[92476, 1753, 2301, 49, 112, "Input"], Cell[94780, 1804, 1442, 19, 30, "Text"], Cell[96225, 1825, 2177, 41, 52, "Input"], Cell[CellGroupData[{ Cell[98427, 1870, 5756, 109, 112, "Input"], Cell[104186, 1981, 12550, 192, 671, "Output"] }, Open ]], Cell[116751, 2176, 1027, 14, 31, "Input"], Cell[CellGroupData[{ Cell[117803, 2194, 3868, 83, 132, "Input"], Cell[121674, 2279, 822, 13, 72, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[122533, 2297, 2092, 46, 112, "Input"], Cell[124628, 2345, 18276, 272, 656, "Output"] }, Open ]], Cell[142919, 2620, 561, 12, 52, "Input"], Cell[CellGroupData[{ Cell[143505, 2636, 2143, 47, 92, "Input"], Cell[145651, 2685, 18159, 255, 656, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[163847, 2945, 2558, 56, 92, "Input"], Cell[166408, 3003, 18174, 256, 656, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[184619, 3264, 3673, 95, 172, "Input"], Cell[188295, 3361, 140, 2, 31, "Output"], Cell[188438, 3365, 140, 2, 31, "Output"], Cell[188581, 3369, 141, 2, 31, "Output"], Cell[188725, 3373, 137, 2, 31, "Output"], Cell[188865, 3377, 138, 2, 31, "Output"] }, Open ]], Cell[189018, 3382, 2075, 35, 72, "Input"], Cell[CellGroupData[{ Cell[191118, 3421, 3969, 94, 172, "Input"], Cell[195090, 3517, 201, 4, 31, "Output"], Cell[195294, 3523, 193, 4, 31, "Output"], Cell[195490, 3529, 695, 12, 52, "Output"], Cell[196188, 3543, 194, 4, 31, "Output"], Cell[196385, 3549, 439, 9, 31, "Output"], Cell[196827, 3560, 192, 4, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[197056, 3569, 2672, 54, 132, "Input"], Cell[199731, 3625, 124, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[199892, 3632, 739, 22, 92, "Input"], Cell[200634, 3656, 121, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[200792, 3663, 2771, 55, 92, "Input"], Cell[203566, 3720, 319, 7, 31, "Output"] }, Open ]], Cell[203900, 3730, 4989, 137, 232, "Input"], Cell[CellGroupData[{ Cell[208914, 3871, 5267, 128, 232, "Input"], Cell[214184, 4001, 199, 4, 31, "Output"], Cell[214386, 4007, 119, 2, 31, "Output"], Cell[214508, 4011, 4205, 145, 656, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[218750, 4161, 11929, 199, 232, "Input"], Cell[230682, 4362, 308, 8, 31, "Output"], Cell[230993, 4372, 378, 10, 31, "Output"], Cell[231374, 4384, 121, 2, 31, "Output"], Cell[231498, 4388, 121, 2, 31, "Output"] }, Open ]], Cell[231634, 4393, 9749, 147, 132, "Input"], Cell[241386, 4542, 8269, 113, 49, "Text"], Cell[CellGroupData[{ Cell[249680, 4659, 5113, 112, 152, "Input"], Cell[254796, 4773, 1074, 30, 52, "Output"], Cell[255873, 4805, 124, 2, 31, "Output"] }, Open ]], Cell[256012, 4810, 228, 3, 31, "Input"], Cell[CellGroupData[{ Cell[256265, 4817, 3200, 70, 112, "Input"], Cell[259468, 4889, 5298, 121, 656, "Output"] }, Open ]], Cell[264781, 5013, 442, 7, 49, "Text"], Cell[265226, 5022, 1368, 20, 31, "Input"], Cell[266597, 5044, 2841, 56, 92, "Input"], Cell[CellGroupData[{ Cell[269463, 5104, 3548, 73, 132, "Input"], Cell[273014, 5179, 4298, 105, 176, "Output"] }, Open ]], Cell[277327, 5287, 2760, 38, 49, "Text"], Cell[CellGroupData[{ Cell[280112, 5329, 4653, 79, 132, "Input"], Cell[284768, 5410, 121, 2, 31, "Output"] }, Open ]], Cell[284904, 5415, 988, 21, 31, "Input"], Cell[CellGroupData[{ Cell[285917, 5440, 409, 6, 31, "Input"], Cell[286329, 5448, 5051, 122, 175, "Output"] }, Open ]], Cell[291395, 5573, 2461, 34, 49, "Text"], Cell[293859, 5609, 3046, 57, 132, "Input"], Cell[296908, 5668, 20420, 573, 1172, "Input"], Cell[317331, 6243, 3125, 59, 92, "Input"], Cell[CellGroupData[{ Cell[320481, 6306, 939, 17, 72, "Input"], Cell[321423, 6325, 4016, 93, 172, "Output"], Cell[325442, 6420, 118, 2, 31, "Output"], Cell[325563, 6424, 118, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[325718, 6431, 860, 20, 52, "Input"], Cell[326581, 6453, 14400, 447, 242, "Output"] }, Open ]], Cell[340996, 6903, 3196, 86, 172, "Input"], Cell[344195, 6991, 10201, 233, 152, "Input"], Cell[354399, 7226, 6267, 98, 52, "Input"], Cell[360669, 7326, 10215, 234, 132, "Input"], Cell[370887, 7562, 5925, 93, 31, "Input"], Cell[376815, 7657, 17327, 353, 272, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}], Cell[CellGroupData[{ Cell[394167, 8014, 14009, 243, 232, "Input"], Cell[408179, 8259, 27014, 608, 375, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[435230, 8872, 12504, 195, 172, "Input"], Cell[447737, 9069, 37557, 656, 353, 16344, 307, "CachedBoxData", "BoxData", \ "Output"], Cell[485297, 9727, 82523, 1425, 355, 22508, 440, "CachedBoxData", "BoxData", \ "Output"], Cell[567823, 11154, 69927, 1237, 353, 21199, 437, "CachedBoxData", "BoxData", \ "Output"], Cell[637753, 12393, 58448, 1036, 353, 19376, 394, "CachedBoxData", "BoxData", \ "Output"] }, Open ]], Cell[696216, 13432, 9727, 131, 31, "Input"], Cell[CellGroupData[{ Cell[705968, 13567, 5361, 110, 152, "Input"], Cell[711332, 13679, 121, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[711490, 13686, 2499, 47, 92, "Input"], Cell[713992, 13735, 123, 2, 31, "Output"] }, Open ]], Cell[714130, 13740, 1841, 29, 52, "Input"], Cell[CellGroupData[{ Cell[715996, 13773, 5880, 125, 212, "Input"], Cell[721879, 13900, 123, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[722039, 13907, 7279, 142, 112, "Input"], Cell[729321, 14051, 3466, 110, 112, "Output"], Cell[732790, 14163, 1501, 22, 92, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[734328, 14190, 4670, 80, 92, "Input"], Cell[739001, 14272, 121, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[739159, 14279, 2695, 47, 112, "Input"], Cell[741857, 14328, 142, 3, 31, "Output"], Cell[742002, 14333, 123, 2, 31, "Output"], Cell[742128, 14337, 125, 2, 31, "Output"], Cell[742256, 14341, 123, 2, 31, "Output"] }, Open ]], Cell[742394, 14346, 2046, 29, 31, "Input"], Cell[CellGroupData[{ Cell[744465, 14379, 2997, 56, 112, "Input"], Cell[747465, 14437, 138, 2, 31, "Output"] }, Open ]], Cell[747618, 14442, 2903, 65, 92, "Input"], Cell[CellGroupData[{ Cell[750546, 14511, 5308, 109, 172, "Input"], Cell[755857, 14622, 135, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[756029, 14629, 499, 15, 52, "Input"], Cell[756531, 14646, 153, 3, 31, "Output"] }, Open ]], Cell[756699, 14652, 1381, 21, 31, "Input"], Cell[CellGroupData[{ Cell[758105, 14677, 1747, 32, 52, "Input"], Cell[759855, 14711, 155, 3, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[760047, 14719, 1450, 43, 72, "Input"], Cell[761500, 14764, 155, 3, 31, "Output"] }, Open ]], Cell[761670, 14770, 2659, 53, 92, "Input"], Cell[CellGroupData[{ Cell[764354, 14827, 230, 8, 31, "Input"], Cell[764587, 14837, 87, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[764711, 14843, 5862, 117, 232, "Input"], Cell[770576, 14962, 137, 2, 31, "Output"], Cell[770716, 14966, 137, 2, 31, "Output"], Cell[770856, 14970, 153, 3, 31, "Output"], Cell[771012, 14975, 137, 2, 31, "Output"], Cell[771152, 14979, 136, 2, 31, "Output"], Cell[771291, 14983, 154, 3, 31, "Output"], Cell[771448, 14988, 137, 2, 31, "Output"], Cell[771588, 14992, 137, 2, 31, "Output"], Cell[771728, 14996, 154, 3, 63, "Output"] }, Open ]] } ] *) (* End of internal cache information *)