diff --git a/Ec.nb b/Ec.nb index 2e17512..dfddcd1 100644 --- a/Ec.nb +++ b/Ec.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] -NotebookDataLength[ 9130408, 171542] -NotebookOptionsPosition[ 9094334, 170935] -NotebookOutlinePosition[ 9094727, 170951] -CellTagsIndexPosition[ 9094684, 170948] +NotebookDataLength[ 9139594, 171633] +NotebookOptionsPosition[ 9103517, 171026] +NotebookOutlinePosition[ 9103910, 171042] +CellTagsIndexPosition[ 9103867, 171039] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -30050,10 +30050,13 @@ kAYCZmaQ8Lkc4lCyVfT3aT9zSPgJQsMz2sLhG1v8DJ9IRPiihz8A0gKsMA== 11.507799999999998`}, {4.423439999999999, 12.7469}, {4.73281, 13.462499999999999`}, {8.834380000000001, 23.117199999999997`}}}], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlU21IU1EY3lIqf6ighZBFhfNz6Lbr3e7d3dezgjAhk4pSstLmUjN00AoK LcnqhwomFE4RKTTUMErSoj+SCuVHZdK3BoZZWRmlhGRmtXPPOoN64XB47j3v e97neZ+zfn/xNmeAQqFQepfdu5Z4V8tUStLvHqD2XOhxg9qITuF7b+4V/X84 @@ -30162,10 +30165,12 @@ QJCD+5qjyxk6lCD6JRH81SD7lRF8sD7dIAf+2ID7RurKDtpWk07XuwQ5bDH/ cSjllQokftmDHaJB/pExcpB5/chMyiQYHn49IPfaBsPDD5Z+YOGBnp4A2HgM mg== "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIAaxQYCJAQEYsbAZoWqZyWBTYg4u9wyU25DVAwCn -NwJV - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJbIGYC4sqIFaZni0Mdvu681fVX1NBha0vNhc25oQ5+ FyfG/As2cXixfT3z8xgE30bnyqxnkaEOKbF33Jg9TBzaloefMvIJdbAFGSRr 4vCGd5/BTK9Qh0aWo/2G4iYOWlaTTte7IPi7gNakWiP4Mq8fmUnphDqYGAOB @@ -30183,10 +30188,13 @@ zMChCRQ+YSEOvP7rp6RqGELcZx/iIA0K/wMIvjfI/FQjOJ/bDejxKGOHCQt+ GD7LC3EwAKUvFhNIeG5F8MH5gScUzgfnN8tQh9vA6DEyNYbnR1h+Rc+/AGlT ooU= "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk1lME1EUhltoiiYKBIhEUEApBWygC6Ut+ODfuCAKCIbQmSmILBWiRoiK MaYgsmi0GMFIgIi4oEEMoW5RHwwqGkVEEXCJoiKIogIhvDQS17kMziR6kvvw 3Tn3zP3/c8+izLz1FmeRSCRml5FdTuyKy3SnopLNqKl026NTRMHfOJnVlUb9 @@ -30287,10 +30295,13 @@ AKWs/UQ= 11.507799999999998`}, {4.423439999999999, 12.7469}, {4.73281, 13.462499999999999`}, {8.834380000000001, 23.117199999999997`}}}], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlU21IU1EY3lIqf6ighZBFhfNz6Lbr3e7d3dezgjAhk4pSstLmUjN00AoK LcnqhwomFE4RKTTUMErSoj+SCuVHZdK3BoZZWRmlhGRmtXPPOoN64XB47j3v e97neZ+zfn/xNmeAQqFQepfdu5Z4V8tUStLvHqD2XOhxg9qITuF7b+4V/X84 @@ -30399,10 +30410,12 @@ QJCD+5qjyxk6lCD6JRH81SD7lRF8sD7dIAf+2ID7RurKDtpWk07XuwQ5bDH/ cSjllQokftmDHaJB/pExcpB5/chMyiQYHn49IPfaBsPDD5Z+YOGBnp4A2HgM mg== "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIAaxQYCJAQEYsbAZoWqZyWBTYg4u9wyU25DVAwCn -NwJV - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJbIGYC4sqIFaZni0Mdvu681fVX1NBha0vNhc25oQ5+ FyfG/As2cXixfT3z8xgE30bnyqxnkaEOKbF33Jg9TBzaloefMvIJdbAFGSRr 4vCGd5/BTK9Qh0aWo/2G4iYOWlaTTte7IPi7gNakWiP4Mq8fmUnphDqYGAOB @@ -30420,10 +30433,13 @@ zMChCRQ+YSEOvP7rp6RqGELcZx/iIA0K/wMIvjfI/FQjOJ/bDejxKGOHCQt+ GD7LC3EwAKUvFhNIeG5F8MH5gScUzgfnN8tQh9vA6DEyNYbnR1h+Rc+/AGlT ooU= "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk1lME1EUhltoiiYKBIhEUEApBWygC6Ut+ODfuCAKCIbQmSmILBWiRoiK MaYgsmi0GMFIgIi4oEEMoW5RHwwqGkVEEXCJoiKIogIhvDQS17kMziR6kvvw 3Tn3zP3/c8+izLz1FmeRSCRml5FdTuyKy3SnopLNqKl026NTRMHfOJnVlUb9 @@ -30798,8 +30814,9 @@ WOz7Hw== FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"GrayLevel", "[", "0.5`", "]"}], NumberMarks -> False]], Appearance -> None, BaseStyle -> {}, @@ -30843,8 +30860,9 @@ WOz7Hw== FrameStyle -> GrayLevel[0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"GrayLevel", "[", "0", "]"}], NumberMarks -> False]], Appearance -> None, BaseStyle -> {}, @@ -30888,8 +30906,9 @@ WOz7Hw== FrameStyle -> RGBColor[0., 0., 0.6666666666666666], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> @@ -30934,8 +30953,9 @@ WOz7Hw== FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], NumberMarks -> @@ -31386,10 +31406,12 @@ qbnANkrDc/bK9rTeYS3P7Lzl+XP9YkGQjPVx1XH1mv6fZyv/AeLXxaM= 13.748400000000002`}, {160.22299999999998`, 15.298399999999999`}, {160.22299999999998`, 17.5859}, { 160.22299999999998`, 17.657799999999998`}}}], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIAaxQYCJAQEYkWhmKEZmI6uhRD0uvaSqpwWbGLcB -AJivAkM= - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYC4pkgUJvm4HdxYsy/YBMHm/v+vdPFMPk8/uun pP4wdojd5cnDpI/gmxgDgXWaw59vpQ/mHETwGUAgAcH/vCEge5a7sUOE5ZYT ZVZpDofbloefUjJ2iOk/9FXDIs0hOfaOG/MPI4cFUvp3Vd6lOnjsr5W1OK7h @@ -31420,10 +31442,13 @@ wea+f+/0fVD3fldz4Lq+uMB2G5Q/XQvO36CXt5gxRh/OL9kq+vu0npEDyDiN A+kOJiD3KZs43PlZl7UH6J8XWdrfps81dVAz5Fgj8woaXhLmDgtdt33+y5AB D1+Y+8HhF2rpgB4/AMTFwSo= "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGJVIIaxWZDYzFDMAOUz4BHHxSbGHFxsetpLiV3U8i8x -9uJSAwDiagJx - "], CompressedData[" + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxl1H9IU0EcAPA5LYvUZJFJKZg+t9Jq29szIw2/yxIyRVAylWXmz3uvWBIW FSmVYf4oNkGbkSlWoIKWSPZL0lIz0lpqmqTJQBySKTVFM0To3ebuER7cH5/3 7t297/d7d9tTz8ZmOIpEIge+R/JdzPc+39G/eckIhiWz6s8eKsDkEALZjGub @@ -31442,10 +31467,13 @@ U90LWdD4qC1p0yrbfFrh++AidYr5kGBdBz+Dn2C8XedcWVDj8xDCwK7m+79q jQgM+o2X97bSxNbzc4OBJFzPD4h8j7dJ5gMEBy4l1AV5M3AP16MQwYYI//Pi kZX7hb9/ejsPNrJ5gu330T8CFPge "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk3lIVFEUxscFW1ALiwqSstxGZZqlcWaywm+IogK1VZ00TR1zmPvQQW3F jLRdo2xBKxNslDKk0sogwkqkxRYrKmmBMddKo6IcE7O6d974HtSB+8fvvvu+ e8537pmVmrUq3U0ikbjQpafLla5A5dha31McSo9M2K4Jm4cfIy+2fpxB/mPp @@ -31464,10 +31492,12 @@ AnuOxi0EcqavVmGQXVhDcGfvubiWJi1yj9GGXXT6t0yH0kxqYIOzvhQdIml7 Le9FdsyDgRPYS1Z/5ksOh6knXowz+YjsmDerRmBHfWs0/Dun7LhvKJz3KZvD CNMrCefnqYDDa2qnak84/p3/v8Rzwp4= "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzGSyGaB8BjQ2qWqoZRep5pCqHgCxNwJb - - "], CompressedData[" + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ7IGYCYvY1MlEpq3Mdvuz7uDV9m7zDfxDoznU40L2v yeSwlMMC122f/7ZA5b9JOuw/tdB1WzWCH2655URZGYKfmgYERbkO64V0+NLn ScH56SDaTRrOB9vzXxpunvOEZqE0LwWHGTOBoDXXIZxTrN1YXwli/rRch59v @@ -31508,10 +31538,13 @@ pduSiPCFub8KFL7c4g7o8QMAD4nHQA== GraphicsBox[{ Thickness[0.005059192552868562], StyleBox[{ - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJHIGYC4kaWo/2G2w0cpk/grzLTtnT4su/j1vQyYQy+ xlvefQYnLRz+g0C8pIOB1krhC0ssHOR3LdiXek7Kwe/ixJh/xQj+k8SF10zO m8P5G/XyFjP2mDvEqEbInLORckgDgW1mDiFvL3+ccVDSgc9//ZRUDzOHkuUl @@ -31616,10 +31649,13 @@ W40cVgOVMfyHmh9v5FARscL0LH+Qg+qT5nlnrYwg/lVG8BdPsmL09UDwxT0C WP50IJwP9t+8QAcDrZXCF1hM4OEB1hdsBOeD5VtMHDStJp2u90HoB7v/d4CD Gsi9XCYOGx6+nLrpSICDY9Oj4zN2GzvA0h9YnTuCD0uPABA+Nec= "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk3lIVFEUxscUzSAFE7RSKlxySWdpZpxE6JMgVCazmPueliZq41hmDWhQ 5jKpLah/aCSamBkGGURupBQkFViZO2mRBaa5lVoIMSi55J07vQd14P7xe+/e 797znXN2JZ87qreVSCQ26yt8fW1YXzvDF1J6enlUljlnqwP34clI8Yr+g+4/ @@ -31677,7 +31713,6 @@ uH2v23K7jX5LwPkzwUDcYT9Q+bbVURh8mHqddrGb5/yjHIzBQNIBFp8o9gH5 108.10199999999998`, 11.8656}, {106.01099999999997`, 11.8656}, { 105.64699999999999`, 11.8656}, {105.392, 11.882799999999998`}, { 104.97300000000001`, 11.9203}, {104.97300000000001`, 16.6484}}}], - FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, @@ -31719,10 +31754,14 @@ oeYDpzZC3ftdzcGW6/rigpVQ/nQtOH+DXt5ixhh9OL9kq+jv03pGDiDjYjYn OpiA3Kds4sCvu2nue6B/XmRpf5s+19QhMsX6vv9daHhJmDtcqXipZvgFEb4w 94PDL9TSAT1+ACATwSo= "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzATYDFA+A5HqSWUjm4/LLmLU0ML99NSL -y48A9HoCnw== - "], CompressedData[" + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxdlH1MlVUcx3m5EqDSXS3nEprJfeuKl3ufe5kvk/W9uJlGDsOim5nhOQdB e+Gu0GGjkpJ8uTl1JuS8mkIMaZaNSasgtUyhUCCvqZXuOuzFUAb6R6Kg65zn eJ+zdbbzx+c553ee38v393uUlBeWJMbFxcXz/TzfCXwf/vjh7IsLGeYdeStj @@ -31746,10 +31785,13 @@ XIABm/T3JJX6DVoNXivyd9Ni8FD9wcmnNmTK/uXvtZdXDew8PgWzowWb6/oV 6/2VxgzW68nnBRP+BSwIi4YPMGQ0XZnnitqBnKXfzF+i5uv/5+9/0/lSIA== "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk30s1WEUx69Yi0ST0mIhXJc77kvXdWnW1x81auhtckvycp9fkulOamVo Sy8rtlg1WlJ2CZtWVtNqpbImVF6akmialymxskaZWM9zf9fvt9XZnj8+z+/8 znPO95zjmXx4B7GWSCRW9ITTs4iewpIMp/xEDiVFjtlaeQj0hg0DMSOG/1g2 @@ -31768,10 +31810,12 @@ L4xAweJr1GDuMur//Gz17ramYPSbG2bRL1KHOSZgrqW+JB0qaXt7qkU274M7 JzCdHpvYUA4uV7ptU51ENu+bSSuwub5dWr6OEI5/byaIn3MdhzkWrziI36cI Dr1UTvWZIPy7/38BslPEZA== "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzGSyGaB8BjQ2qWqoZRep5pCqHgCxNwJb - - "], CompressedData[" + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ7IGYC4jyh5gOnCtMdvuz7uDV9m7xDGggEpTsc6N7X ZHJYyoFjjUxUijdU/pukg5ohUMQJwd83X0r/rg2CfwYELNId1gvp8KXPk4Lz 00HmuknD+f/BQBpunvOEZqE0LwUHBhDwSXcI5xRrN9ZXgpgfk+7w8+3rA5aL @@ -32422,7 +32466,6 @@ fuLhy9qphW4Oh9uWh59ahOCD/eNrDOc3shztNxQ3gfAN3SD2TjRxmAkCJ13h /ASQvCeCD/bfBxcHA62VwhdYTODhAQ7uYCM4HyzfYuIAcoaRjwtcP9j9q5wd 1EDu5TJxmPKNLX6GjbODY9Oj4zN2GzvA0h84Hbkj+LD0CAA8iB4f "]], - FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" @@ -32599,6 +32642,7 @@ Ef6D8WH+310CDFGnRAw+TD04fGUSHTxADlJXgYSXcCIkXnci+Cd27ehlE1CH 2UcUNtQlOGiA05eJAyMwuG56JTgcblsefmqREZwPjo8WEwdQ6mp0RejP3gM0 UQHqX2UTePpjAIEHxg6w9Hz6sNPazDoEH5a+ATd6Nk4= "]], + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" @@ -32682,10 +32726,13 @@ qbnANkrDc/bK9rTeYS3P7Lzl+XP9YkGQjPVx1XH1mv6fZyv/AeLXxaM= 13.748400000000002`}, {160.22299999999998`, 15.298399999999999`}, {160.22299999999998`, 17.5859}, { 160.22299999999998`, 17.657799999999998`}}}], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIAaxQYCJAQEYkWhmKEZmI6uhRD0uvaSqpwWbGLcB -AJivAkM= - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYC4pkgUJvm4HdxYsy/YBMHm/v+vdPFMPk8/uun pP4wdojd5cnDpI/gmxgDgXWaw59vpQ/mHETwGUAgAcH/vCEge5a7sUOE5ZYT ZVZpDofbloefUjJ2iOk/9FXDIs0hOfaOG/MPI4cFUvp3Vd6lOnjsr5W1OK7h @@ -32716,10 +32763,14 @@ wea+f+/0fVD3fldz4Lq+uMB2G5Q/XQvO36CXt5gxRh/OL9kq+vu0npEDyDiN A+kOJiD3KZs43PlZl7UH6J8XWdrfps81dVAz5Fgj8woaXhLmDgtdt33+y5AB D1+Y+8HhF2rpgB4/AMTFwSo= "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGJVIIaxWZDYzFDMAOUz4BHHxSbGHFxsetpLiV3U8i8x -9uJSAwDiagJx - "], CompressedData[" + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { + 0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxl1H9IU0EcAPA5LYvUZJFJKZg+t9Jq29szIw2/yxIyRVAylWXmz3uvWBIW FSmVYf4oNkGbkSlWoIKWSPZL0lIz0lpqmqTJQBySKTVFM0To3ebuER7cH5/3 7t297/d7d9tTz8ZmOIpEIge+R/JdzPc+39G/eckIhiWz6s8eKsDkEALZjGub @@ -32738,10 +32789,13 @@ U90LWdD4qC1p0yrbfFrh++AidYr5kGBdBz+Dn2C8XedcWVDj8xDCwK7m+79q jQgM+o2X97bSxNbzc4OBJFzPD4h8j7dJ5gMEBy4l1AV5M3AP16MQwYYI//Pi kZX7hb9/ejsPNrJ5gu330T8CFPge "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk3lIVFEUxscFW1ALiwqSstxGZZqlcWaywm+IogK1VZ00TR1zmPvQQW3F jLRdo2xBKxNslDKk0sogwkqkxRYrKmmBMddKo6IcE7O6d974HtSB+8fvvvu+ e8537pmVmrUq3U0ikbjQpafLla5A5dha31McSo9M2K4Jm4cfIy+2fpxB/mPp @@ -32760,10 +32814,13 @@ AnuOxi0EcqavVmGQXVhDcGfvubiWJi1yj9GGXXT6t0yH0kxqYIOzvhQdIml7 Le9FdsyDgRPYS1Z/5ksOh6knXowz+YjsmDerRmBHfWs0/Dun7LhvKJz3KZvD CNMrCefnqYDDa2qnak84/p3/v8Rzwp4= "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzGSyGaB8BjQ2qWqoZRep5pCqHgCxNwJb - - "], CompressedData[" + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { + 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ7IGYCYvY1MlEpq3Mdvuz7uDV9m7zDfxDoznU40L2v yeSwlMMC122f/7ZA5b9JOuw/tdB1WzWCH2655URZGYKfmgYERbkO64V0+NLn ScH56SDaTRrOB9vzXxpunvOEZqE0LwWHGTOBoDXXIZxTrN1YXwli/rRch59v @@ -32803,10 +32860,13 @@ pduSiPCFub8KFL7c4g7o8QMAD4nHQA== Graphics[{ Thickness[0.005059192552868562], Style[{ - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJHIGYC4kaWo/2G2w0cpk/grzLTtnT4su/j1vQyYQy+ xlvefQYnLRz+g0C8pIOB1krhC0ssHOR3LdiXek7Kwe/ixJh/xQj+k8SF10zO m8P5G/XyFjP2mDvEqEbInLORckgDgW1mDiFvL3+ccVDSgc9//ZRUDzOHkuUl @@ -32915,10 +32975,13 @@ W40cVgOVMfyHmh9v5FARscL0LH+Qg+qT5nlnrYwg/lVG8BdPsmL09UDwxT0C WP50IJwP9t+8QAcDrZXCF1hM4OEB1hdsBOeD5VtMHDStJp2u90HoB7v/d4CD Gsi9XCYOGx6+nLrpSICDY9Oj4zN2GzvA0h9YnTuCD0uPABA+Nec= "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk3lIVFEUxscUzSAFE7RSKlxySWdpZpxE6JMgVCazmPueliZq41hmDWhQ 5jKpLah/aCSamBkGGURupBQkFViZO2mRBaa5lVoIMSi55J07vQd14P7xe+/e 797znXN2JZ87qreVSCQ26yt8fW1YXzvDF1J6enlUljlnqwP34clI8Yr+g+4/ @@ -33020,10 +33083,14 @@ oeYDpzZC3ftdzcGW6/rigpVQ/nQtOH+DXt5ixhh9OL9kq+jv03pGDiDjYjYn OpiA3Kds4sCvu2nue6B/XmRpf5s+19QhMsX6vv9daHhJmDtcqXipZvgFEb4w 94PDL9TSAT1+ACATwSo= "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzATYDFA+A5HqSWUjm4/LLmLU0ML99NSL -y48A9HoCnw== - "], CompressedData[" + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxdlH1MlVUcx3m5EqDSXS3nEprJfeuKl3ufe5kvk/W9uJlGDsOim5nhOQdB e+Gu0GGjkpJ8uTl1JuS8mkIMaZaNSasgtUyhUCCvqZXuOuzFUAb6R6Kg65zn eJ+zdbbzx+c553ee38v393uUlBeWJMbFxcXz/TzfCXwf/vjh7IsLGeYdeStj @@ -33047,10 +33114,13 @@ XIABm/T3JJX6DVoNXivyd9Ni8FD9wcmnNmTK/uXvtZdXDew8PgWzowWb6/oV 6/2VxgzW68nnBRP+BSwIi4YPMGQ0XZnnitqBnKXfzF+i5uv/5+9/0/lSIA== "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk30s1WEUx69Yi0ST0mIhXJc77kvXdWnW1x81auhtckvycp9fkulOamVo Sy8rtlg1WlJ2CZtWVtNqpbImVF6akmialymxskaZWM9zf9fvt9XZnj8+z+/8 znPO95zjmXx4B7GWSCRW9ITTs4iewpIMp/xEDiVFjtlaeQj0hg0DMSOG/1g2 @@ -33069,10 +33139,13 @@ L4xAweJr1GDuMur//Gz17ramYPSbG2bRL1KHOSZgrqW+JB0qaXt7qkU274M7 JzCdHpvYUA4uV7ptU51ENu+bSSuwub5dWr6OEI5/byaIn3MdhzkWrziI36cI Dr1UTvWZIPy7/38BslPEZA== "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzGSyGaB8BjQ2qWqoZRep5pCqHgCxNwJb - - "], CompressedData[" + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { + 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ7IGYC4jyh5gOnCtMdvuz7uDV9m7xDGggEpTsc6N7X ZHJYyoFjjUxUijdU/pukg5ohUMQJwd83X0r/rg2CfwYELNId1gvp8KXPk4Lz 00HmuknD+f/BQBpunvOEZqE0LwUHBhDwSXcI5xRrN9ZXgpgfk+7w8+3rA5aL @@ -33176,6 +33249,7 @@ cU2rSafFHR0Oty0PP7UIwQf7x9cYzm9kOdpvKG4C4V93cOgB2TPRBBIv+Qh+ L9if9nA+2H969g4GWiuFL7CYwMMDHNzBRnA+WL7FxOEGyF9PbeH6wfG10MZB DeReLhOHL6B0dtTawREUL7uNHWDpDxwO7gg+LD0CAIIJIbY= "]], + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, @@ -33620,10 +33694,13 @@ kAYCZmaQ8Lkc4lCyVfT3aT9zSPgJQsMz2sLhG1v8DJ9IRPiihz8A0gKsMA== 3.898439999999999, 11.507799999999998`}, {4.423439999999999, 12.7469}, {4.73281, 13.462499999999999`}, {8.834380000000001, 23.117199999999997`}}}], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlU21IU1EY3lIqf6ighZBFhfNz6Lbr3e7d3dezgjAhk4pSstLmUjN00AoK LcnqhwomFE4RKTTUMErSoj+SCuVHZdK3BoZZWRmlhGRmtXPPOoN64XB47j3v e97neZ+zfn/xNmeAQqFQepfdu5Z4V8tUStLvHqD2XOhxg9qITuF7b+4V/X84 @@ -33732,10 +33809,12 @@ QJCD+5qjyxk6lCD6JRH81SD7lRF8sD7dIAf+2ID7RurKDtpWk07XuwQ5bDH/ cSjllQokftmDHaJB/pExcpB5/chMyiQYHn49IPfaBsPDD5Z+YOGBnp4A2HgM mg== "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIAaxQYCJAQEYsbAZoWqZyWBTYg4u9wyU25DVAwCn -NwJV - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJbIGYC4sqIFaZni0Mdvu681fVX1NBha0vNhc25oQ5+ FyfG/As2cXixfT3z8xgE30bnyqxnkaEOKbF33Jg9TBzaloefMvIJdbAFGSRr 4vCGd5/BTK9Qh0aWo/2G4iYOWlaTTte7IPi7gNakWiP4Mq8fmUnphDqYGAOB @@ -33753,10 +33832,13 @@ zMChCRQ+YSEOvP7rp6RqGELcZx/iIA0K/wMIvjfI/FQjOJ/bDejxKGOHCQt+ GD7LC3EwAKUvFhNIeG5F8MH5gScUzgfnN8tQh9vA6DEyNYbnR1h+Rc+/AGlT ooU= "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk1lME1EUhltoiiYKBIhEUEApBWygC6Ut+ODfuCAKCIbQmSmILBWiRoiK MaYgsmi0GMFIgIi4oEEMoW5RHwwqGkVEEXCJoiKIogIhvDQS17kMziR6kvvw 3Tn3zP3/c8+izLz1FmeRSCRml5FdTuyKy3SnopLNqKl026NTRMHfOJnVlUb9 @@ -33858,10 +33940,13 @@ AKWs/UQ= 3.898439999999999, 11.507799999999998`}, {4.423439999999999, 12.7469}, {4.73281, 13.462499999999999`}, {8.834380000000001, 23.117199999999997`}}}], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlU21IU1EY3lIqf6ighZBFhfNz6Lbr3e7d3dezgjAhk4pSstLmUjN00AoK LcnqhwomFE4RKTTUMErSoj+SCuVHZdK3BoZZWRmlhGRmtXPPOoN64XB47j3v e97neZ+zfn/xNmeAQqFQepfdu5Z4V8tUStLvHqD2XOhxg9qITuF7b+4V/X84 @@ -33970,10 +34055,12 @@ QJCD+5qjyxk6lCD6JRH81SD7lRF8sD7dIAf+2ID7RurKDtpWk07XuwQ5bDH/ cSjllQokftmDHaJB/pExcpB5/chMyiQYHn49IPfaBsPDD5Z+YOGBnp4A2HgM mg== "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGIpIAaxQYCJAQEYsbAZoWqZyWBTYg4u9wyU25DVAwCn -NwJV - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJbIGYC4sqIFaZni0Mdvu681fVX1NBha0vNhc25oQ5+ FyfG/As2cXixfT3z8xgE30bnyqxnkaEOKbF33Jg9TBzaloefMvIJdbAFGSRr 4vCGd5/BTK9Qh0aWo/2G4iYOWlaTTte7IPi7gNakWiP4Mq8fmUnphDqYGAOB @@ -33991,10 +34078,13 @@ zMChCRQ+YSEOvP7rp6RqGELcZx/iIA0K/wMIvjfI/FQjOJ/bDejxKGOHCQt+ GD7LC3EwAKUvFhNIeG5F8MH5gScUzgfnN8tQh9vA6DEyNYbnR1h+Rc+/AGlT ooU= "]], - FilledCurve[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxlk1lME1EUhltoiiYKBIhEUEApBWygC6Ut+ODfuCAKCIbQmSmILBWiRoiK MaYgsmi0GMFIgIi4oEEMoW5RHwwqGkVEEXCJoiKIogIhvDQS17kMziR6kvvw 3Tn3zP3/c8+izLz1FmeRSCRml5FdTuyKy3SnopLNqKl026NTRMHfOJnVlUb9 @@ -34184,7 +34274,7 @@ WOz7Hw== CellLabel-> "Out[151]=",ExpressionUUID->"3ea7570d-27e9-44fe-a3b4-1c25d748a65a"] }, Open ]] -}, Closed]] +}, Open ]] }, Closed]], Cell[CellGroupData[{ @@ -84093,8 +84183,9 @@ W1zuAg== CellChangeTimes->{ 3.815463653673671*^9, {3.815464212007524*^9, 3.8154642393095512`*^9}, 3.816447148405426*^9, 3.816449716306161*^9, {3.820337531194869*^9, - 3.8203375526335917`*^9}, 3.82033931504668*^9, 3.820484477130465*^9}, - CellLabel->"Out[74]=",ExpressionUUID->"9c71a250-4a10-4192-9d20-9dd878212504"] + 3.8203375526335917`*^9}, 3.82033931504668*^9, 3.820484477130465*^9, + 3.829626996430933*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"6f71ff12-e7d5-4b61-92c5-cd524b7ac891"] }, Open ]], Cell[CellGroupData[{ @@ -171046,9 +171137,9 @@ Cell[820163, 15511, 164, 3, 53, "Section",ExpressionUUID->"1be7f2a1-b197-4382-80 Cell[820330, 15516, 1005, 17, 30, "Input",ExpressionUUID->"ac919899-e429-4fad-8190-0d9af4777610"], Cell[CellGroupData[{ Cell[821360, 15537, 13040, 296, 795, "Input",ExpressionUUID->"47699148-65a1-4802-bd3d-b0180405238a"], -Cell[834403, 15835, 2709, 40, 70, "Output",ExpressionUUID->"a33f2e27-437a-490f-b83a-32299cbc3b85"], -Cell[837115, 15877, 2709, 40, 70, "Output",ExpressionUUID->"201cb4a3-ef10-49d6-9cff-11d535969c43"], -Cell[839827, 15919, 251187, 4614, 70, "Output",ExpressionUUID->"1b745d73-ae92-46ba-8ca6-a5f8a999a79d"] +Cell[834403, 15835, 2709, 40, 34, "Output",ExpressionUUID->"a33f2e27-437a-490f-b83a-32299cbc3b85"], +Cell[837115, 15877, 2709, 40, 34, "Output",ExpressionUUID->"201cb4a3-ef10-49d6-9cff-11d535969c43"], +Cell[839827, 15919, 251187, 4614, 598, "Output",ExpressionUUID->"1b745d73-ae92-46ba-8ca6-a5f8a999a79d"] }, Open ]] }, Closed]], Cell[CellGroupData[{ @@ -171084,463 +171175,463 @@ Cell[1287205, 24260, 1024, 16, 46, "Input",ExpressionUUID->"7605ec57-f8cd-417c-9 InitializationCell->True], Cell[CellGroupData[{ Cell[1288254, 24280, 9715, 223, 656, "Input",ExpressionUUID->"6037f872-c988-458c-aee1-b63f5d1c05be"], -Cell[1297972, 24505, 249530, 4706, 70, "Output",ExpressionUUID->"0dd6a306-dfe0-45b5-9622-664934483ed8"] +Cell[1297972, 24505, 249530, 4706, 584, "Output",ExpressionUUID->"0dd6a306-dfe0-45b5-9622-664934483ed8"] }, Open ]], Cell[CellGroupData[{ Cell[1547539, 29216, 12509, 279, 791, "Input",ExpressionUUID->"27832f96-4a3c-4379-8d7f-23d423f8dc3f"], -Cell[1560051, 29497, 2557, 38, 70, "Output",ExpressionUUID->"e8b84de9-924f-4dff-ab59-2068a967a45c"], -Cell[1562611, 29537, 2556, 38, 70, "Output",ExpressionUUID->"2eeba9a3-04c4-428c-a18d-dbb43db684c0"], -Cell[1565170, 29577, 250571, 4607, 70, "Output",ExpressionUUID->"3ea7570d-27e9-44fe-a3b4-1c25d748a65a"] +Cell[1560051, 29497, 2557, 38, 34, "Output",ExpressionUUID->"e8b84de9-924f-4dff-ab59-2068a967a45c"], +Cell[1562611, 29537, 2556, 38, 34, "Output",ExpressionUUID->"2eeba9a3-04c4-428c-a18d-dbb43db684c0"], +Cell[1565170, 29577, 259728, 4697, 609, "Output",ExpressionUUID->"3ea7570d-27e9-44fe-a3b4-1c25d748a65a"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[1824959, 34281, 156, 3, 72, "Title",ExpressionUUID->"0860c22a-77ea-459e-9e4f-ab8d06aad316"], +Cell[CellGroupData[{ +Cell[1825140, 34288, 165, 3, 67, "Section",ExpressionUUID->"86c38d97-2176-4491-bd1b-14fcbf3c9de6"], +Cell[1825308, 34293, 1961, 56, 110, "Input",ExpressionUUID->"0f6df49c-36bc-4f29-a06b-1e01f88c8af7", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[1827294, 34353, 4311, 101, 388, "Input",ExpressionUUID->"e0a2c425-59de-45cd-a91c-54bed5e8d0d7"], +Cell[1831608, 34456, 191526, 3489, 70, "Output",ExpressionUUID->"209c9077-47b9-4b95-8f26-4475fab94d92"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2023171, 37950, 154, 3, 54, "Subsection",ExpressionUUID->"09abf152-a5b7-441a-b5b5-f9ac1c555a3e"], +Cell[CellGroupData[{ +Cell[2023350, 37957, 1358, 35, 74, "Input",ExpressionUUID->"fc3b72f7-0f23-4ab8-b2f7-31cf8d6afb6a"], +Cell[2024711, 37994, 568, 12, 70, "Output",ExpressionUUID->"4e7216cb-65f3-4af2-b21a-4324a2ff0a56"], +Cell[2025282, 38008, 489, 10, 70, "Output",ExpressionUUID->"8c97cead-53e6-4b62-9b4e-38c5a82990ac"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2025808, 38023, 1331, 34, 74, "Input",ExpressionUUID->"7a91f090-8b86-423b-a3b3-e111116f8a39"], +Cell[2027142, 38059, 504, 11, 70, "Output",ExpressionUUID->"47abb38a-bd9f-4d46-9faf-d7091519d270"], +Cell[2027649, 38072, 406, 8, 70, "Output",ExpressionUUID->"d25018f6-af24-43e8-9032-42cd5c459103"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2028092, 38085, 1328, 34, 74, "Input",ExpressionUUID->"42c1fc2d-3b30-4c28-8611-511d1f3a6e37"], +Cell[2029423, 38121, 546, 11, 70, "Output",ExpressionUUID->"2d60e8a0-67c6-41af-9e5d-20361a449f4f"], +Cell[2029972, 38134, 445, 8, 70, "Output",ExpressionUUID->"a4cf1711-a400-4bbd-a735-5f2b6f98145d"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[2030478, 38149, 164, 3, 53, "Section",ExpressionUUID->"e555d041-c954-4d42-975d-189c29eecbf7"], +Cell[2030645, 38154, 1067, 17, 46, "Input",ExpressionUUID->"9a448cf2-47f9-4448-8096-1d364d1591f5", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[2031737, 38175, 9874, 224, 656, "Input",ExpressionUUID->"4e215743-6c82-49dc-a022-65fc6284dc48"], +Cell[2041614, 38401, 249516, 4706, 70, "Output",ExpressionUUID->"1b1af625-ad91-49b6-be17-76bf07bd5fff"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2291167, 43112, 12495, 278, 791, "Input",ExpressionUUID->"ce3abb20-6d2a-4a6d-b26a-69b8dc968e04"], +Cell[2303665, 43392, 2459, 37, 70, "Output",ExpressionUUID->"203d30e0-425e-4c80-a55e-53dd824a1c53"], +Cell[2306127, 43431, 2461, 37, 70, "Output",ExpressionUUID->"04595bb5-a3c0-49ea-b431-52f575ab574e"], +Cell[2308591, 43470, 259488, 4756, 70, "Output",ExpressionUUID->"592dc005-d67c-4ced-9917-ce4f942e7ffc"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[1815802, 34191, 156, 3, 72, "Title",ExpressionUUID->"0860c22a-77ea-459e-9e4f-ab8d06aad316"], +Cell[2568140, 48233, 150, 3, 72, "Title",ExpressionUUID->"d9294d8a-4355-4e8d-bbd5-410646cba2c4"], Cell[CellGroupData[{ -Cell[1815983, 34198, 165, 3, 67, "Section",ExpressionUUID->"86c38d97-2176-4491-bd1b-14fcbf3c9de6"], -Cell[1816151, 34203, 1961, 56, 110, "Input",ExpressionUUID->"0f6df49c-36bc-4f29-a06b-1e01f88c8af7", +Cell[2568315, 48240, 165, 3, 67, "Section",ExpressionUUID->"ba4a26a0-d628-45e2-bb2e-6d6478a5b973"], +Cell[2568483, 48245, 2050, 57, 110, "Input",ExpressionUUID->"f11bb471-abb4-4b35-b78e-924d82295d82", InitializationCell->True], Cell[CellGroupData[{ -Cell[1818137, 34263, 4311, 101, 388, "Input",ExpressionUUID->"e0a2c425-59de-45cd-a91c-54bed5e8d0d7"], -Cell[1822451, 34366, 191526, 3489, 70, "Output",ExpressionUUID->"209c9077-47b9-4b95-8f26-4475fab94d92"] +Cell[2570558, 48306, 4348, 101, 388, "Input",ExpressionUUID->"94359c49-c493-4513-89e0-5d3df8be5780"], +Cell[2574909, 48409, 185383, 3400, 70, "Output",ExpressionUUID->"75623405-5089-4991-9de3-62eb08924b83"] }, Open ]], Cell[CellGroupData[{ -Cell[2014014, 37860, 154, 3, 54, "Subsection",ExpressionUUID->"09abf152-a5b7-441a-b5b5-f9ac1c555a3e"], +Cell[2760329, 51814, 154, 3, 54, "Subsection",ExpressionUUID->"e9c42ce3-0b52-4370-bf57-f8c7c204b085"], Cell[CellGroupData[{ -Cell[2014193, 37867, 1358, 35, 74, "Input",ExpressionUUID->"fc3b72f7-0f23-4ab8-b2f7-31cf8d6afb6a"], -Cell[2015554, 37904, 568, 12, 70, "Output",ExpressionUUID->"4e7216cb-65f3-4af2-b21a-4324a2ff0a56"], -Cell[2016125, 37918, 489, 10, 70, "Output",ExpressionUUID->"8c97cead-53e6-4b62-9b4e-38c5a82990ac"] +Cell[2760508, 51821, 1378, 35, 74, "Input",ExpressionUUID->"68b92834-2cb8-4602-8e77-8c84f6a33562"], +Cell[2761889, 51858, 569, 12, 70, "Output",ExpressionUUID->"d1efad77-9e6c-4bc2-9835-b91f1eab355f"], +Cell[2762461, 51872, 487, 10, 70, "Output",ExpressionUUID->"9b1b3a31-b1c3-4556-8f8b-5850064053ed"] }, Open ]], Cell[CellGroupData[{ -Cell[2016651, 37933, 1331, 34, 74, "Input",ExpressionUUID->"7a91f090-8b86-423b-a3b3-e111116f8a39"], -Cell[2017985, 37969, 504, 11, 70, "Output",ExpressionUUID->"47abb38a-bd9f-4d46-9faf-d7091519d270"], -Cell[2018492, 37982, 406, 8, 70, "Output",ExpressionUUID->"d25018f6-af24-43e8-9032-42cd5c459103"] +Cell[2762985, 51887, 1355, 35, 74, "Input",ExpressionUUID->"4ead6903-964a-4732-82a1-349ed005a7a0"], +Cell[2764343, 51924, 505, 11, 70, "Output",ExpressionUUID->"fc1801ea-98fe-4540-9f99-73c03af65eb5"], +Cell[2764851, 51937, 405, 8, 70, "Output",ExpressionUUID->"51c286b2-b6a3-411e-ad5e-a1f42a5737c7"] }, Open ]], Cell[CellGroupData[{ -Cell[2018935, 37995, 1328, 34, 74, "Input",ExpressionUUID->"42c1fc2d-3b30-4c28-8611-511d1f3a6e37"], -Cell[2020266, 38031, 546, 11, 70, "Output",ExpressionUUID->"2d60e8a0-67c6-41af-9e5d-20361a449f4f"], -Cell[2020815, 38044, 445, 8, 70, "Output",ExpressionUUID->"a4cf1711-a400-4bbd-a735-5f2b6f98145d"] +Cell[2765293, 51950, 1402, 35, 74, "Input",ExpressionUUID->"b7abe509-152d-4b0a-acfa-9f50e03d419a"], +Cell[2766698, 51987, 546, 11, 70, "Output",ExpressionUUID->"e8c2fcba-77b1-42f8-8d3a-f485c2d46c23"], +Cell[2767247, 52000, 441, 8, 70, "Output",ExpressionUUID->"1f448d2d-b416-4b84-9bd7-9fbc685e7e02"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[2021321, 38059, 164, 3, 53, "Section",ExpressionUUID->"e555d041-c954-4d42-975d-189c29eecbf7"], -Cell[2021488, 38064, 1067, 17, 46, "Input",ExpressionUUID->"9a448cf2-47f9-4448-8096-1d364d1591f5", +Cell[2767749, 52015, 164, 3, 53, "Section",ExpressionUUID->"0ce9737a-03fc-4a26-a86f-c789f03e34bc"], +Cell[2767916, 52020, 1061, 17, 46, "Input",ExpressionUUID->"61c14f06-e92a-4f7b-b21e-6037fddcb2e2", InitializationCell->True], Cell[CellGroupData[{ -Cell[2022580, 38085, 9874, 224, 656, "Input",ExpressionUUID->"4e215743-6c82-49dc-a022-65fc6284dc48"], -Cell[2032457, 38311, 249516, 4706, 70, "Output",ExpressionUUID->"1b1af625-ad91-49b6-be17-76bf07bd5fff"] +Cell[2769002, 52041, 9894, 225, 656, "Input",ExpressionUUID->"0bd3f4bb-5b39-421a-a47e-48d789f6f3a3"], +Cell[2778899, 52268, 249400, 4705, 70, "Output",ExpressionUUID->"8b56aa16-d3b0-467d-b998-c887b09e68c5"] }, Open ]], Cell[CellGroupData[{ -Cell[2282010, 43022, 12495, 278, 791, "Input",ExpressionUUID->"ce3abb20-6d2a-4a6d-b26a-69b8dc968e04"], -Cell[2294508, 43302, 2459, 37, 70, "Output",ExpressionUUID->"203d30e0-425e-4c80-a55e-53dd824a1c53"], -Cell[2296970, 43341, 2461, 37, 70, "Output",ExpressionUUID->"04595bb5-a3c0-49ea-b431-52f575ab574e"], -Cell[2299434, 43380, 259488, 4756, 70, "Output",ExpressionUUID->"592dc005-d67c-4ced-9917-ce4f942e7ffc"] +Cell[3028336, 56978, 12515, 279, 791, "Input",ExpressionUUID->"a4c1ef2e-51e2-4f43-adf7-a63283710a92"], +Cell[3040854, 57259, 2458, 37, 70, "Output",ExpressionUUID->"4215c323-dde9-45f0-ab5c-a99f950f31b2"], +Cell[3043315, 57298, 2458, 37, 70, "Output",ExpressionUUID->"cbb16a14-672a-4864-b91f-b759bbf04add"], +Cell[3045776, 57337, 253838, 4661, 70, "Output",ExpressionUUID->"72e696b6-954f-4b4d-969e-588577d48fc5"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[2558983, 48143, 150, 3, 72, "Title",ExpressionUUID->"d9294d8a-4355-4e8d-bbd5-410646cba2c4"], +Cell[3299675, 62005, 154, 3, 72, "Title",ExpressionUUID->"3504afb6-6eb1-48f6-9495-ed3dc6c532d7"], Cell[CellGroupData[{ -Cell[2559158, 48150, 165, 3, 67, "Section",ExpressionUUID->"ba4a26a0-d628-45e2-bb2e-6d6478a5b973"], -Cell[2559326, 48155, 2050, 57, 110, "Input",ExpressionUUID->"f11bb471-abb4-4b35-b78e-924d82295d82", +Cell[3299854, 62012, 165, 3, 67, "Section",ExpressionUUID->"a5f2404f-9967-45e0-8a61-25658fb37a23"], +Cell[3300022, 62017, 2108, 58, 110, "Input",ExpressionUUID->"fec12b1f-939b-432a-89a4-71b4992d614a", InitializationCell->True], Cell[CellGroupData[{ -Cell[2561401, 48216, 4348, 101, 388, "Input",ExpressionUUID->"94359c49-c493-4513-89e0-5d3df8be5780"], -Cell[2565752, 48319, 185383, 3400, 70, "Output",ExpressionUUID->"75623405-5089-4991-9de3-62eb08924b83"] +Cell[3302155, 62079, 4407, 102, 388, "Input",ExpressionUUID->"d902b043-87cb-4f89-be8e-92455177b217"], +Cell[3306565, 62183, 191068, 3486, 70, "Output",ExpressionUUID->"a76fef51-0e65-4d7a-a848-ffec48be13f4"] }, Open ]], Cell[CellGroupData[{ -Cell[2751172, 51724, 154, 3, 54, "Subsection",ExpressionUUID->"e9c42ce3-0b52-4370-bf57-f8c7c204b085"], +Cell[3497670, 65674, 154, 3, 54, "Subsection",ExpressionUUID->"c46e08d4-b6ba-46f0-9c89-b288880426ce"], Cell[CellGroupData[{ -Cell[2751351, 51731, 1378, 35, 74, "Input",ExpressionUUID->"68b92834-2cb8-4602-8e77-8c84f6a33562"], -Cell[2752732, 51768, 569, 12, 70, "Output",ExpressionUUID->"d1efad77-9e6c-4bc2-9835-b91f1eab355f"], -Cell[2753304, 51782, 487, 10, 70, "Output",ExpressionUUID->"9b1b3a31-b1c3-4556-8f8b-5850064053ed"] +Cell[3497849, 65681, 1402, 35, 74, "Input",ExpressionUUID->"11d7747b-9e15-426e-81f8-ba79899ac511"], +Cell[3499254, 65718, 618, 13, 70, "Output",ExpressionUUID->"6501f92a-4687-4245-af92-1133a9994560"], +Cell[3499875, 65733, 540, 11, 70, "Output",ExpressionUUID->"178a87c2-6543-479f-b26c-b2da1b8fd242"] }, Open ]], Cell[CellGroupData[{ -Cell[2753828, 51797, 1355, 35, 74, "Input",ExpressionUUID->"4ead6903-964a-4732-82a1-349ed005a7a0"], -Cell[2755186, 51834, 505, 11, 70, "Output",ExpressionUUID->"fc1801ea-98fe-4540-9f99-73c03af65eb5"], -Cell[2755694, 51847, 405, 8, 70, "Output",ExpressionUUID->"51c286b2-b6a3-411e-ad5e-a1f42a5737c7"] +Cell[3500452, 65749, 1381, 35, 74, "Input",ExpressionUUID->"626d5c14-7754-47d2-bc07-efbaf7f4fd74"], +Cell[3501836, 65786, 547, 11, 70, "Output",ExpressionUUID->"709a2b53-d71e-44aa-9e1d-bab787ed1c40"], +Cell[3502386, 65799, 448, 8, 70, "Output",ExpressionUUID->"8b8c34c0-8f52-4fd8-93a2-ab21f6f4033b"] }, Open ]], Cell[CellGroupData[{ -Cell[2756136, 51860, 1402, 35, 74, "Input",ExpressionUUID->"b7abe509-152d-4b0a-acfa-9f50e03d419a"], -Cell[2757541, 51897, 546, 11, 70, "Output",ExpressionUUID->"e8c2fcba-77b1-42f8-8d3a-f485c2d46c23"], -Cell[2758090, 51910, 441, 8, 70, "Output",ExpressionUUID->"1f448d2d-b416-4b84-9bd7-9fbc685e7e02"] -}, Open ]] -}, Open ]] -}, Closed]], -Cell[CellGroupData[{ -Cell[2758592, 51925, 164, 3, 53, "Section",ExpressionUUID->"0ce9737a-03fc-4a26-a86f-c789f03e34bc"], -Cell[2758759, 51930, 1061, 17, 46, "Input",ExpressionUUID->"61c14f06-e92a-4f7b-b21e-6037fddcb2e2", - InitializationCell->True], -Cell[CellGroupData[{ -Cell[2759845, 51951, 9894, 225, 656, "Input",ExpressionUUID->"0bd3f4bb-5b39-421a-a47e-48d789f6f3a3"], -Cell[2769742, 52178, 249400, 4705, 70, "Output",ExpressionUUID->"8b56aa16-d3b0-467d-b998-c887b09e68c5"] -}, Open ]], -Cell[CellGroupData[{ -Cell[3019179, 56888, 12515, 279, 791, "Input",ExpressionUUID->"a4c1ef2e-51e2-4f43-adf7-a63283710a92"], -Cell[3031697, 57169, 2458, 37, 70, "Output",ExpressionUUID->"4215c323-dde9-45f0-ab5c-a99f950f31b2"], -Cell[3034158, 57208, 2458, 37, 70, "Output",ExpressionUUID->"cbb16a14-672a-4864-b91f-b759bbf04add"], -Cell[3036619, 57247, 253838, 4661, 70, "Output",ExpressionUUID->"72e696b6-954f-4b4d-969e-588577d48fc5"] +Cell[3502871, 65812, 1432, 36, 74, "Input",ExpressionUUID->"7b995c40-5cad-4bf5-9772-3e40edc3fe66"], +Cell[3504306, 65850, 596, 12, 70, "Output",ExpressionUUID->"d5317e13-3324-43fc-a358-7c56499ad6cd"], +Cell[3504905, 65864, 492, 9, 70, "Output",ExpressionUUID->"c05af9ea-9f68-4082-9cd1-33a26ffc09f7"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[3290518, 61915, 154, 3, 72, "Title",ExpressionUUID->"3504afb6-6eb1-48f6-9495-ed3dc6c532d7"], -Cell[CellGroupData[{ -Cell[3290697, 61922, 165, 3, 67, "Section",ExpressionUUID->"a5f2404f-9967-45e0-8a61-25658fb37a23"], -Cell[3290865, 61927, 2108, 58, 110, "Input",ExpressionUUID->"fec12b1f-939b-432a-89a4-71b4992d614a", +Cell[3505458, 65880, 164, 3, 53, "Section",ExpressionUUID->"a49527a9-f9ad-46c4-84b7-e9dc0ea5c2fb"], +Cell[3505625, 65885, 1162, 18, 46, "Input",ExpressionUUID->"836ca7a8-ee93-48d3-b3aa-7908848e38a0", InitializationCell->True], Cell[CellGroupData[{ -Cell[3292998, 61989, 4407, 102, 388, "Input",ExpressionUUID->"d902b043-87cb-4f89-be8e-92455177b217"], -Cell[3297408, 62093, 191068, 3486, 70, "Output",ExpressionUUID->"a76fef51-0e65-4d7a-a848-ffec48be13f4"] +Cell[3506812, 65907, 9875, 224, 656, "Input",ExpressionUUID->"c7c2c020-f87b-4c32-852b-8020e1f92447"], +Cell[3516690, 66133, 248859, 4693, 70, "Output",ExpressionUUID->"a5b43ff8-593d-480c-a457-96201755e289"] }, Open ]], Cell[CellGroupData[{ -Cell[3488513, 65584, 154, 3, 54, "Subsection",ExpressionUUID->"c46e08d4-b6ba-46f0-9c89-b288880426ce"], -Cell[CellGroupData[{ -Cell[3488692, 65591, 1402, 35, 74, "Input",ExpressionUUID->"11d7747b-9e15-426e-81f8-ba79899ac511"], -Cell[3490097, 65628, 618, 13, 70, "Output",ExpressionUUID->"6501f92a-4687-4245-af92-1133a9994560"], -Cell[3490718, 65643, 540, 11, 70, "Output",ExpressionUUID->"178a87c2-6543-479f-b26c-b2da1b8fd242"] -}, Open ]], -Cell[CellGroupData[{ -Cell[3491295, 65659, 1381, 35, 74, "Input",ExpressionUUID->"626d5c14-7754-47d2-bc07-efbaf7f4fd74"], -Cell[3492679, 65696, 547, 11, 70, "Output",ExpressionUUID->"709a2b53-d71e-44aa-9e1d-bab787ed1c40"], -Cell[3493229, 65709, 448, 8, 70, "Output",ExpressionUUID->"8b8c34c0-8f52-4fd8-93a2-ab21f6f4033b"] -}, Open ]], -Cell[CellGroupData[{ -Cell[3493714, 65722, 1432, 36, 74, "Input",ExpressionUUID->"7b995c40-5cad-4bf5-9772-3e40edc3fe66"], -Cell[3495149, 65760, 596, 12, 70, "Output",ExpressionUUID->"d5317e13-3324-43fc-a358-7c56499ad6cd"], -Cell[3495748, 65774, 492, 9, 70, "Output",ExpressionUUID->"c05af9ea-9f68-4082-9cd1-33a26ffc09f7"] +Cell[3765586, 70831, 12599, 279, 791, "Input",ExpressionUUID->"73e59dad-dfbd-4c46-b98b-0cc7611b0d04"], +Cell[3778188, 71112, 2532, 38, 70, "Output",ExpressionUUID->"34d0c153-07f4-4543-89bb-6e19da62f3f1"], +Cell[3780723, 71152, 2534, 38, 70, "Output",ExpressionUUID->"aaaa1220-433e-4566-bdac-286fcc5191a0"], +Cell[3783260, 71192, 258772, 4737, 70, "Output",ExpressionUUID->"174c893e-591f-4ffd-aa1d-82e143673656"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[3496301, 65790, 164, 3, 53, "Section",ExpressionUUID->"a49527a9-f9ad-46c4-84b7-e9dc0ea5c2fb"], -Cell[3496468, 65795, 1162, 18, 46, "Input",ExpressionUUID->"836ca7a8-ee93-48d3-b3aa-7908848e38a0", +Cell[4042093, 75936, 200, 4, 72, "Title",ExpressionUUID->"0d0d68ed-d033-407d-8b39-64222dce8392"], +Cell[CellGroupData[{ +Cell[4042318, 75944, 165, 3, 67, "Section",ExpressionUUID->"837a9e8f-f906-41ee-adc6-0d92540acac3"], +Cell[4042486, 75949, 1980, 56, 110, "Input",ExpressionUUID->"00ce6a41-3340-4211-974d-333201273f2b", InitializationCell->True], Cell[CellGroupData[{ -Cell[3497655, 65817, 9875, 224, 656, "Input",ExpressionUUID->"c7c2c020-f87b-4c32-852b-8020e1f92447"], -Cell[3507533, 66043, 248859, 4693, 70, "Output",ExpressionUUID->"a5b43ff8-593d-480c-a457-96201755e289"] +Cell[4044491, 76009, 4036, 94, 367, "Input",ExpressionUUID->"a68a10ee-e1f4-45f6-af20-3013ef2e0e0c"], +Cell[4048530, 76105, 157769, 2923, 70, "Output",ExpressionUUID->"caf9b833-7f4a-44a0-8796-25d9fb42ad3f"] }, Open ]], Cell[CellGroupData[{ -Cell[3756429, 70741, 12599, 279, 791, "Input",ExpressionUUID->"73e59dad-dfbd-4c46-b98b-0cc7611b0d04"], -Cell[3769031, 71022, 2532, 38, 70, "Output",ExpressionUUID->"34d0c153-07f4-4543-89bb-6e19da62f3f1"], -Cell[3771566, 71062, 2534, 38, 70, "Output",ExpressionUUID->"aaaa1220-433e-4566-bdac-286fcc5191a0"], -Cell[3774103, 71102, 258772, 4737, 70, "Output",ExpressionUUID->"174c893e-591f-4ffd-aa1d-82e143673656"] +Cell[4206336, 79033, 154, 3, 54, "Subsection",ExpressionUUID->"ed1ad587-16f2-416d-bd92-ebf8eeda035b"], +Cell[CellGroupData[{ +Cell[4206515, 79040, 1284, 34, 74, "Input",ExpressionUUID->"6d7742c9-df65-4590-b3f1-0fd9e52bb881"], +Cell[4207802, 79076, 542, 12, 70, "Output",ExpressionUUID->"e0103e74-d6a7-4372-aeda-75269708f732"], +Cell[4208347, 79090, 461, 10, 70, "Output",ExpressionUUID->"9b0c491f-dd96-4e6f-931c-8a86749a6799"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4208845, 79105, 1285, 34, 74, "Input",ExpressionUUID->"4c80c160-37f9-438f-9852-a500b1652816"], +Cell[4210133, 79141, 478, 10, 70, "Output",ExpressionUUID->"28ad590f-2115-48a7-8839-de12586b0e2d"], +Cell[4210614, 79153, 378, 7, 70, "Output",ExpressionUUID->"82d67ce2-51b0-4210-a1e3-cd5af28a06d3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4211029, 79165, 1282, 34, 74, "Input",ExpressionUUID->"384d7e0c-6f6e-475f-8857-b08cec2b998b"], +Cell[4212314, 79201, 503, 11, 70, "Output",ExpressionUUID->"d39e3aae-78f9-4669-add3-a721aada2dac"], +Cell[4212820, 79214, 402, 8, 70, "Output",ExpressionUUID->"0a7d756d-32d4-4601-afd4-e0ccded8c700"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[4032936, 75846, 200, 4, 72, "Title",ExpressionUUID->"0d0d68ed-d033-407d-8b39-64222dce8392"], -Cell[CellGroupData[{ -Cell[4033161, 75854, 165, 3, 67, "Section",ExpressionUUID->"837a9e8f-f906-41ee-adc6-0d92540acac3"], -Cell[4033329, 75859, 1980, 56, 110, "Input",ExpressionUUID->"00ce6a41-3340-4211-974d-333201273f2b", +Cell[4213283, 79229, 164, 3, 53, "Section",ExpressionUUID->"5968a8e7-7690-4c56-89df-d2afe069402b"], +Cell[4213450, 79234, 1110, 17, 46, "Input",ExpressionUUID->"5f273034-8ae0-412b-a617-4d3af97c3373", InitializationCell->True], Cell[CellGroupData[{ -Cell[4035334, 75919, 4036, 94, 367, "Input",ExpressionUUID->"a68a10ee-e1f4-45f6-af20-3013ef2e0e0c"], -Cell[4039373, 76015, 157769, 2923, 70, "Output",ExpressionUUID->"caf9b833-7f4a-44a0-8796-25d9fb42ad3f"] +Cell[4214585, 79255, 9841, 223, 656, "Input",ExpressionUUID->"81163e91-a315-4524-a5a7-51968f875244"], +Cell[4224429, 79480, 249574, 4707, 584, "Output",ExpressionUUID->"6f71ff12-e7d5-4b61-92c5-cd524b7ac891"] }, Open ]], Cell[CellGroupData[{ -Cell[4197179, 78943, 154, 3, 54, "Subsection",ExpressionUUID->"ed1ad587-16f2-416d-bd92-ebf8eeda035b"], -Cell[CellGroupData[{ -Cell[4197358, 78950, 1284, 34, 74, "Input",ExpressionUUID->"6d7742c9-df65-4590-b3f1-0fd9e52bb881"], -Cell[4198645, 78986, 542, 12, 70, "Output",ExpressionUUID->"e0103e74-d6a7-4372-aeda-75269708f732"], -Cell[4199190, 79000, 461, 10, 70, "Output",ExpressionUUID->"9b0c491f-dd96-4e6f-931c-8a86749a6799"] +Cell[4474040, 84192, 12607, 279, 791, "Input",ExpressionUUID->"47444490-0cc7-4eef-b521-259bcb9f1997"], +Cell[4486650, 84473, 2653, 38, 34, "Output",ExpressionUUID->"458fc1b6-79eb-4e4f-80c9-a7b1d6d4ae83"], +Cell[4489306, 84513, 2653, 38, 34, "Output",ExpressionUUID->"3205d82a-a14c-4f8c-afcd-e9a89d220ae6"], +Cell[4491962, 84553, 256229, 4698, 609, "Output",ExpressionUUID->"dd44024f-addb-49e9-82cb-e222cb72f8f5"] +}, Open ]] +}, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[4199688, 79015, 1285, 34, 74, "Input",ExpressionUUID->"4c80c160-37f9-438f-9852-a500b1652816"], -Cell[4200976, 79051, 478, 10, 70, "Output",ExpressionUUID->"28ad590f-2115-48a7-8839-de12586b0e2d"], -Cell[4201457, 79063, 378, 7, 70, "Output",ExpressionUUID->"82d67ce2-51b0-4210-a1e3-cd5af28a06d3"] +Cell[4748252, 89258, 151, 3, 98, "Title",ExpressionUUID->"89ceb3e6-e8ed-48f9-ad54-8f55b765da3d"], +Cell[CellGroupData[{ +Cell[4748428, 89265, 165, 3, 67, "Section",ExpressionUUID->"a672ed73-4892-4c6f-94df-45113bd9185d"], +Cell[4748596, 89270, 2200, 59, 110, "Input",ExpressionUUID->"9d9cd269-5af2-4502-b5cf-01d155493236", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[4750821, 89333, 4446, 102, 388, "Input",ExpressionUUID->"7255c134-ca86-4314-bbf8-b83a11e42c5e"], +Cell[4755270, 89437, 189475, 3464, 70, "Output",ExpressionUUID->"68e88d41-263c-4372-8eae-4cec1e8adfbc"] }, Open ]], Cell[CellGroupData[{ -Cell[4201872, 79075, 1282, 34, 74, "Input",ExpressionUUID->"384d7e0c-6f6e-475f-8857-b08cec2b998b"], -Cell[4203157, 79111, 503, 11, 70, "Output",ExpressionUUID->"d39e3aae-78f9-4669-add3-a721aada2dac"], -Cell[4203663, 79124, 402, 8, 70, "Output",ExpressionUUID->"0a7d756d-32d4-4601-afd4-e0ccded8c700"] +Cell[4944782, 92906, 154, 3, 54, "Subsection",ExpressionUUID->"6843b2aa-bfe0-4330-85ec-c12a4533f092"], +Cell[CellGroupData[{ +Cell[4944961, 92913, 1427, 36, 74, "Input",ExpressionUUID->"c2fd0978-56ec-4bdb-a941-8830e1cddb0d"], +Cell[4946391, 92951, 642, 13, 70, "Output",ExpressionUUID->"4be88d5a-8897-4ff5-98ea-3ad55fc8801a"], +Cell[4947036, 92966, 563, 11, 70, "Output",ExpressionUUID->"63de95ed-d1d6-41a8-9b1a-84a8fa2e31a9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4947636, 92982, 1404, 35, 74, "Input",ExpressionUUID->"35a4401d-efa7-45ac-a9f9-662b80ee42c4"], +Cell[4949043, 93019, 575, 12, 70, "Output",ExpressionUUID->"f355e336-7703-4cf5-8b40-86e169da7205"], +Cell[4949621, 93033, 474, 9, 70, "Output",ExpressionUUID->"da21b9f8-3b3b-479c-92dd-4b978ce9895e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4950132, 93047, 1453, 36, 74, "Input",ExpressionUUID->"d9bc890c-a92c-4bf9-b971-2b0ab8a0ebfa"], +Cell[4951588, 93085, 620, 12, 70, "Output",ExpressionUUID->"3bd28787-964f-4e78-a6ec-37266acd0f48"], +Cell[4952211, 93099, 514, 9, 70, "Output",ExpressionUUID->"24a34fc9-1ce8-4a24-816d-973529872b94"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[4952786, 93115, 164, 3, 53, "Section",ExpressionUUID->"9f8745cf-1727-417a-b067-8d71d31bea6e"], +Cell[4952953, 93120, 1110, 17, 46, "Input",ExpressionUUID->"3f27e47d-c4a5-40f2-a113-0869b7ccf3ba", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[4954088, 93141, 9913, 225, 656, "Input",ExpressionUUID->"ed2df887-1601-4a73-a89e-2de9d5592a72"], +Cell[4964004, 93368, 248378, 4683, 584, "Output",ExpressionUUID->"65e9d525-5e0e-4915-a408-64c63c3416b2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[5212419, 98056, 12680, 281, 791, "Input",ExpressionUUID->"9bb25f27-d1d5-4287-a32d-8f47c4195f11"], +Cell[5225102, 98339, 2610, 39, 34, "Output",ExpressionUUID->"29f895ae-d995-473c-9e60-12bdcffe5b9d"], +Cell[5227715, 98380, 2610, 39, 34, "Output",ExpressionUUID->"033de800-0995-46be-b092-a41647032e10"], +Cell[5230328, 98421, 257173, 4715, 599, "Output",ExpressionUUID->"902ea8d6-dabf-4b33-bfb4-ca7b465fdaa6"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[4204126, 79139, 164, 3, 53, "Section",ExpressionUUID->"5968a8e7-7690-4c56-89df-d2afe069402b"], -Cell[4204293, 79144, 1110, 17, 46, "Input",ExpressionUUID->"5f273034-8ae0-412b-a617-4d3af97c3373", +Cell[5487562, 103143, 202, 4, 72, "Title",ExpressionUUID->"0191a663-bf30-4a43-b8c7-edce09d2361b"], +Cell[CellGroupData[{ +Cell[5487789, 103151, 165, 3, 67, "Section",ExpressionUUID->"17e4dd54-73a6-4cfc-948f-3b2a0a2d0174"], +Cell[5487957, 103156, 2311, 61, 110, "Input",ExpressionUUID->"3f8c9a69-d755-4607-984f-39042c34f390", InitializationCell->True], Cell[CellGroupData[{ -Cell[4205428, 79165, 9841, 223, 656, "Input",ExpressionUUID->"81163e91-a315-4524-a5a7-51968f875244"], -Cell[4215272, 79390, 249548, 4706, 584, "Output",ExpressionUUID->"9c71a250-4a10-4192-9d20-9dd878212504"] +Cell[5490293, 103221, 4461, 103, 388, "Input",ExpressionUUID->"431a5e32-56f2-429f-8483-e92dd0b0e933"], +Cell[5494757, 103326, 195198, 3557, 70, "Output",ExpressionUUID->"74a38473-3715-4e08-abb3-cda80cd4a17c"] }, Open ]], Cell[CellGroupData[{ -Cell[4464857, 84101, 12607, 279, 791, "Input",ExpressionUUID->"47444490-0cc7-4eef-b521-259bcb9f1997"], -Cell[4477467, 84382, 2653, 38, 34, "Output",ExpressionUUID->"458fc1b6-79eb-4e4f-80c9-a7b1d6d4ae83"], -Cell[4480123, 84422, 2653, 38, 34, "Output",ExpressionUUID->"3205d82a-a14c-4f8c-afcd-e9a89d220ae6"], -Cell[4482779, 84462, 256229, 4698, 609, "Output",ExpressionUUID->"dd44024f-addb-49e9-82cb-e222cb72f8f5"] -}, Open ]] -}, Open ]] +Cell[5689992, 106888, 154, 3, 54, "Subsection",ExpressionUUID->"d815ea12-04a1-462c-b37f-a002453aac90"], +Cell[CellGroupData[{ +Cell[5690171, 106895, 1475, 36, 74, "Input",ExpressionUUID->"dfd2825c-abed-47ff-b89d-1d580bdf5592"], +Cell[5691649, 106933, 638, 13, 70, "Output",ExpressionUUID->"9edcd7e9-399d-4a83-a7fc-d182b9b74fa6"], +Cell[5692290, 106948, 557, 11, 70, "Output",ExpressionUUID->"5bd5f58f-a0aa-4408-a063-321a21cf78dd"] }, Open ]], Cell[CellGroupData[{ -Cell[4739069, 89167, 151, 3, 98, "Title",ExpressionUUID->"89ceb3e6-e8ed-48f9-ad54-8f55b765da3d"], -Cell[CellGroupData[{ -Cell[4739245, 89174, 165, 3, 67, "Section",ExpressionUUID->"a672ed73-4892-4c6f-94df-45113bd9185d"], -Cell[4739413, 89179, 2200, 59, 110, "Input",ExpressionUUID->"9d9cd269-5af2-4502-b5cf-01d155493236", - InitializationCell->True], -Cell[CellGroupData[{ -Cell[4741638, 89242, 4446, 102, 388, "Input",ExpressionUUID->"7255c134-ca86-4314-bbf8-b83a11e42c5e"], -Cell[4746087, 89346, 189475, 3464, 70, "Output",ExpressionUUID->"68e88d41-263c-4372-8eae-4cec1e8adfbc"] +Cell[5692884, 106964, 1455, 36, 74, "Input",ExpressionUUID->"ed9510f5-93cb-4fe6-971b-e392ed5691d9"], +Cell[5694342, 107002, 572, 12, 70, "Output",ExpressionUUID->"94596668-d114-4a6f-a304-e166ccb0df78"], +Cell[5694917, 107016, 475, 9, 70, "Output",ExpressionUUID->"77080df1-7104-4f0a-b26a-9266002359d9"] }, Open ]], Cell[CellGroupData[{ -Cell[4935599, 92815, 154, 3, 54, "Subsection",ExpressionUUID->"6843b2aa-bfe0-4330-85ec-c12a4533f092"], -Cell[CellGroupData[{ -Cell[4935778, 92822, 1427, 36, 74, "Input",ExpressionUUID->"c2fd0978-56ec-4bdb-a941-8830e1cddb0d"], -Cell[4937208, 92860, 642, 13, 70, "Output",ExpressionUUID->"4be88d5a-8897-4ff5-98ea-3ad55fc8801a"], -Cell[4937853, 92875, 563, 11, 70, "Output",ExpressionUUID->"63de95ed-d1d6-41a8-9b1a-84a8fa2e31a9"] -}, Open ]], -Cell[CellGroupData[{ -Cell[4938453, 92891, 1404, 35, 74, "Input",ExpressionUUID->"35a4401d-efa7-45ac-a9f9-662b80ee42c4"], -Cell[4939860, 92928, 575, 12, 70, "Output",ExpressionUUID->"f355e336-7703-4cf5-8b40-86e169da7205"], -Cell[4940438, 92942, 474, 9, 70, "Output",ExpressionUUID->"da21b9f8-3b3b-479c-92dd-4b978ce9895e"] -}, Open ]], -Cell[CellGroupData[{ -Cell[4940949, 92956, 1453, 36, 74, "Input",ExpressionUUID->"d9bc890c-a92c-4bf9-b971-2b0ab8a0ebfa"], -Cell[4942405, 92994, 620, 12, 70, "Output",ExpressionUUID->"3bd28787-964f-4e78-a6ec-37266acd0f48"], -Cell[4943028, 93008, 514, 9, 70, "Output",ExpressionUUID->"24a34fc9-1ce8-4a24-816d-973529872b94"] +Cell[5695429, 107030, 1509, 37, 74, "Input",ExpressionUUID->"12f033be-f0a6-4fff-8219-81a8819e3850"], +Cell[5696941, 107069, 615, 12, 70, "Output",ExpressionUUID->"cce9005c-a9af-4e51-886d-8230913f7a04"], +Cell[5697559, 107083, 513, 9, 70, "Output",ExpressionUUID->"877e1f2b-d1bd-4cb1-adcd-e5b13bbbeb6f"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[4943603, 93024, 164, 3, 53, "Section",ExpressionUUID->"9f8745cf-1727-417a-b067-8d71d31bea6e"], -Cell[4943770, 93029, 1110, 17, 46, "Input",ExpressionUUID->"3f27e47d-c4a5-40f2-a113-0869b7ccf3ba", +Cell[5698133, 107099, 164, 3, 53, "Section",ExpressionUUID->"ad009b44-9684-4d7a-816a-3d7e17470d67"], +Cell[5698300, 107104, 1114, 17, 46, "Input",ExpressionUUID->"d6ea828d-3843-4a77-bae6-291e647c3095", InitializationCell->True], Cell[CellGroupData[{ -Cell[4944905, 93050, 9913, 225, 656, "Input",ExpressionUUID->"ed2df887-1601-4a73-a89e-2de9d5592a72"], -Cell[4954821, 93277, 248378, 4683, 584, "Output",ExpressionUUID->"65e9d525-5e0e-4915-a408-64c63c3416b2"] +Cell[5699439, 107125, 9945, 225, 656, "Input",ExpressionUUID->"4ccf548a-8917-462f-b42f-220b1be2489a"], +Cell[5709387, 107352, 248497, 4686, 584, "Output",ExpressionUUID->"3ddea1ac-b90e-4134-bfe4-8330f428af97"] }, Open ]], Cell[CellGroupData[{ -Cell[5203236, 97965, 12680, 281, 791, "Input",ExpressionUUID->"9bb25f27-d1d5-4287-a32d-8f47c4195f11"], -Cell[5215919, 98248, 2610, 39, 34, "Output",ExpressionUUID->"29f895ae-d995-473c-9e60-12bdcffe5b9d"], -Cell[5218532, 98289, 2610, 39, 34, "Output",ExpressionUUID->"033de800-0995-46be-b092-a41647032e10"], -Cell[5221145, 98330, 257173, 4715, 599, "Output",ExpressionUUID->"902ea8d6-dabf-4b33-bfb4-ca7b465fdaa6"] +Cell[5957921, 112043, 12710, 281, 791, "Input",ExpressionUUID->"e0b55947-a80b-4aa6-b592-42b72fb096a0"], +Cell[5970634, 112326, 2610, 39, 34, "Output",ExpressionUUID->"fbe5829b-090e-4bf5-98ea-9c0cbf0a1219"], +Cell[5973247, 112367, 2610, 39, 34, "Output",ExpressionUUID->"17944fa9-7e7c-4d38-b35c-8179cd1f8608"], +Cell[5975860, 112408, 263091, 4808, 609, "Output",ExpressionUUID->"88333388-4fe7-4da2-b14e-1224917a1be6"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[5478379, 103052, 202, 4, 72, "Title",ExpressionUUID->"0191a663-bf30-4a43-b8c7-edce09d2361b"], +Cell[6239012, 117223, 151, 3, 72, "Title",ExpressionUUID->"b573437c-89db-4f4d-a3b8-3ca447533bd8"], Cell[CellGroupData[{ -Cell[5478606, 103060, 165, 3, 67, "Section",ExpressionUUID->"17e4dd54-73a6-4cfc-948f-3b2a0a2d0174"], -Cell[5478774, 103065, 2311, 61, 110, "Input",ExpressionUUID->"3f8c9a69-d755-4607-984f-39042c34f390", +Cell[6239188, 117230, 165, 3, 67, "Section",ExpressionUUID->"4bafd2ed-5d5e-49ff-af2c-b66598cb80d1"], +Cell[6239356, 117235, 2248, 60, 110, "Input",ExpressionUUID->"4e96eaec-94cc-465a-be70-f93c6b2a6381", InitializationCell->True], Cell[CellGroupData[{ -Cell[5481110, 103130, 4461, 103, 388, "Input",ExpressionUUID->"431a5e32-56f2-429f-8483-e92dd0b0e933"], -Cell[5485574, 103235, 195198, 3557, 70, "Output",ExpressionUUID->"74a38473-3715-4e08-abb3-cda80cd4a17c"] +Cell[6241629, 117299, 4457, 102, 388, "Input",ExpressionUUID->"ae76e7e8-1d11-4087-9183-aa7fe88d0cf4"], +Cell[6246089, 117403, 85984, 1535, 70, "Output",ExpressionUUID->"3a99289e-6458-489c-a7c6-a1a4a12c7439"] }, Open ]], Cell[CellGroupData[{ -Cell[5680809, 106797, 154, 3, 54, "Subsection",ExpressionUUID->"d815ea12-04a1-462c-b37f-a002453aac90"], +Cell[6332110, 118943, 154, 3, 54, "Subsection",ExpressionUUID->"9107415c-fdc8-4f7d-89f9-b49684ad3106"], Cell[CellGroupData[{ -Cell[5680988, 106804, 1475, 36, 74, "Input",ExpressionUUID->"dfd2825c-abed-47ff-b89d-1d580bdf5592"], -Cell[5682466, 106842, 638, 13, 70, "Output",ExpressionUUID->"9edcd7e9-399d-4a83-a7fc-d182b9b74fa6"], -Cell[5683107, 106857, 557, 11, 70, "Output",ExpressionUUID->"5bd5f58f-a0aa-4408-a063-321a21cf78dd"] +Cell[6332289, 118950, 1427, 36, 74, "Input",ExpressionUUID->"4600701a-7489-4aeb-8a2c-e1011a80c2b3"], +Cell[6333719, 118988, 663, 13, 70, "Output",ExpressionUUID->"ef4b16c5-7768-4478-8068-a614e3412c03"], +Cell[6334385, 119003, 584, 11, 70, "Output",ExpressionUUID->"9d217b2c-2c26-4bdd-883d-d77f0eaebb22"] }, Open ]], Cell[CellGroupData[{ -Cell[5683701, 106873, 1455, 36, 74, "Input",ExpressionUUID->"ed9510f5-93cb-4fe6-971b-e392ed5691d9"], -Cell[5685159, 106911, 572, 12, 70, "Output",ExpressionUUID->"94596668-d114-4a6f-a304-e166ccb0df78"], -Cell[5685734, 106925, 475, 9, 70, "Output",ExpressionUUID->"77080df1-7104-4f0a-b26a-9266002359d9"] +Cell[6335006, 119019, 1402, 35, 74, "Input",ExpressionUUID->"1c3f2e72-9de5-45ee-a0ca-7a44639c025a"], +Cell[6336411, 119056, 596, 12, 70, "Output",ExpressionUUID->"42d4d23d-7f9e-414f-98ea-bd36b91fb3f8"], +Cell[6337010, 119070, 497, 9, 70, "Output",ExpressionUUID->"d53f70f2-120a-43af-8af0-0f984237d352"] }, Open ]], Cell[CellGroupData[{ -Cell[5686246, 106939, 1509, 37, 74, "Input",ExpressionUUID->"12f033be-f0a6-4fff-8219-81a8819e3850"], -Cell[5687758, 106978, 615, 12, 70, "Output",ExpressionUUID->"cce9005c-a9af-4e51-886d-8230913f7a04"], -Cell[5688376, 106992, 513, 9, 70, "Output",ExpressionUUID->"877e1f2b-d1bd-4cb1-adcd-e5b13bbbeb6f"] +Cell[6337544, 119084, 1453, 36, 74, "Input",ExpressionUUID->"0da9c2ab-13b6-49bf-acbb-14c13d6c25b7"], +Cell[6339000, 119122, 640, 13, 70, "Output",ExpressionUUID->"a14845a1-c90b-48d4-91b9-acd682a39561"], +Cell[6339643, 119137, 540, 10, 70, "Output",ExpressionUUID->"ecd2eaeb-7942-4a84-8126-e847f4a7cbb6"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[5688950, 107008, 164, 3, 53, "Section",ExpressionUUID->"ad009b44-9684-4d7a-816a-3d7e17470d67"], -Cell[5689117, 107013, 1114, 17, 46, "Input",ExpressionUUID->"d6ea828d-3843-4a77-bae6-291e647c3095", +Cell[6340244, 119154, 164, 3, 53, "Section",ExpressionUUID->"0e1e9409-cd66-4922-a1ed-71fe5827c12e"], +Cell[6340411, 119159, 1110, 17, 46, "Input",ExpressionUUID->"2376a51c-3109-42c2-b46f-dfa6fd6a8d97", InitializationCell->True], Cell[CellGroupData[{ -Cell[5690256, 107034, 9945, 225, 656, "Input",ExpressionUUID->"4ccf548a-8917-462f-b42f-220b1be2489a"], -Cell[5700204, 107261, 248497, 4686, 584, "Output",ExpressionUUID->"3ddea1ac-b90e-4134-bfe4-8330f428af97"] +Cell[6341546, 119180, 9913, 225, 656, "Input",ExpressionUUID->"0a40ec25-1d6c-4626-bb9d-b6786a68b999"], +Cell[6351462, 119407, 249038, 4697, 584, "Output",ExpressionUUID->"c0cdc71d-756b-4531-bdc8-7fea7515574f"] }, Open ]], Cell[CellGroupData[{ -Cell[5948738, 111952, 12710, 281, 791, "Input",ExpressionUUID->"e0b55947-a80b-4aa6-b592-42b72fb096a0"], -Cell[5961451, 112235, 2610, 39, 34, "Output",ExpressionUUID->"fbe5829b-090e-4bf5-98ea-9c0cbf0a1219"], -Cell[5964064, 112276, 2610, 39, 34, "Output",ExpressionUUID->"17944fa9-7e7c-4d38-b35c-8179cd1f8608"], -Cell[5966677, 112317, 263091, 4808, 609, "Output",ExpressionUUID->"88333388-4fe7-4da2-b14e-1224917a1be6"] +Cell[6600537, 124109, 12682, 281, 791, "Input",ExpressionUUID->"0b9c50d9-10b4-437b-9896-2735205f54f2"], +Cell[6613222, 124392, 2605, 39, 34, "Output",ExpressionUUID->"3bb06af7-8e97-4a76-b02d-9dcc010053e8"], +Cell[6615830, 124433, 2607, 39, 34, "Output",ExpressionUUID->"10c4b1c6-1c22-4579-88ad-dc1176353f5e"], +Cell[6618440, 124474, 257786, 4725, 609, "Output",ExpressionUUID->"b562baf0-9b3b-4a4d-ba0e-7bbc0be3e1b4"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[6229829, 117132, 151, 3, 72, "Title",ExpressionUUID->"b573437c-89db-4f4d-a3b8-3ca447533bd8"], +Cell[6876287, 129206, 153, 3, 72, "Title",ExpressionUUID->"8a4ffb97-273c-457a-86b2-f36b838038c3"], Cell[CellGroupData[{ -Cell[6230005, 117139, 165, 3, 67, "Section",ExpressionUUID->"4bafd2ed-5d5e-49ff-af2c-b66598cb80d1"], -Cell[6230173, 117144, 2248, 60, 110, "Input",ExpressionUUID->"4e96eaec-94cc-465a-be70-f93c6b2a6381", +Cell[6876465, 129213, 165, 3, 67, "Section",ExpressionUUID->"410ead3f-69f8-455a-b141-b8c6bb31b59e"], +Cell[6876633, 129218, 2313, 61, 110, "Input",ExpressionUUID->"7a81855c-52b6-4da7-96a1-7b16776ec89e", InitializationCell->True], Cell[CellGroupData[{ -Cell[6232446, 117208, 4457, 102, 388, "Input",ExpressionUUID->"ae76e7e8-1d11-4087-9183-aa7fe88d0cf4"], -Cell[6236906, 117312, 85984, 1535, 70, "Output",ExpressionUUID->"3a99289e-6458-489c-a7c6-a1a4a12c7439"] +Cell[6878971, 129283, 4461, 103, 388, "Input",ExpressionUUID->"e513bca1-de00-41f7-9726-aa7ff84e1ab0"], +Cell[6883435, 129388, 194680, 3554, 70, "Output",ExpressionUUID->"5b76b829-9e42-4b23-bab4-b22fa59e1061"] }, Open ]], Cell[CellGroupData[{ -Cell[6322927, 118852, 154, 3, 54, "Subsection",ExpressionUUID->"9107415c-fdc8-4f7d-89f9-b49684ad3106"], +Cell[7078152, 132947, 154, 3, 54, "Subsection",ExpressionUUID->"129935a0-86a7-4051-bdca-a2a54da66afe"], Cell[CellGroupData[{ -Cell[6323106, 118859, 1427, 36, 74, "Input",ExpressionUUID->"4600701a-7489-4aeb-8a2c-e1011a80c2b3"], -Cell[6324536, 118897, 663, 13, 70, "Output",ExpressionUUID->"ef4b16c5-7768-4478-8068-a614e3412c03"], -Cell[6325202, 118912, 584, 11, 70, "Output",ExpressionUUID->"9d217b2c-2c26-4bdd-883d-d77f0eaebb22"] +Cell[7078331, 132954, 1428, 36, 74, "Input",ExpressionUUID->"c7e5d329-77b0-4dd0-88db-00aa2b589947"], +Cell[7079762, 132992, 639, 13, 70, "Output",ExpressionUUID->"c1d8c78f-a876-45d1-b94a-306c6623446a"], +Cell[7080404, 133007, 561, 11, 70, "Output",ExpressionUUID->"534dec4d-c8a8-41b4-b1df-829a5bedcb05"] }, Open ]], Cell[CellGroupData[{ -Cell[6325823, 118928, 1402, 35, 74, "Input",ExpressionUUID->"1c3f2e72-9de5-45ee-a0ca-7a44639c025a"], -Cell[6327228, 118965, 596, 12, 70, "Output",ExpressionUUID->"42d4d23d-7f9e-414f-98ea-bd36b91fb3f8"], -Cell[6327827, 118979, 497, 9, 70, "Output",ExpressionUUID->"d53f70f2-120a-43af-8af0-0f984237d352"] +Cell[7081002, 133023, 1404, 35, 74, "Input",ExpressionUUID->"a70de1ce-8526-4071-a1eb-123213e8a509"], +Cell[7082409, 133060, 572, 12, 70, "Output",ExpressionUUID->"17f5277b-7537-45cc-98ad-0c06c79b498a"], +Cell[7082984, 133074, 474, 9, 70, "Output",ExpressionUUID->"196baea8-6606-49db-8dad-e69cb57a70cd"] }, Open ]], Cell[CellGroupData[{ -Cell[6328361, 118993, 1453, 36, 74, "Input",ExpressionUUID->"0da9c2ab-13b6-49bf-acbb-14c13d6c25b7"], -Cell[6329817, 119031, 640, 13, 70, "Output",ExpressionUUID->"a14845a1-c90b-48d4-91b9-acd682a39561"], -Cell[6330460, 119046, 540, 10, 70, "Output",ExpressionUUID->"ecd2eaeb-7942-4a84-8126-e847f4a7cbb6"] +Cell[7083495, 133088, 1455, 36, 74, "Input",ExpressionUUID->"edc830ee-5ccd-4b26-8a91-1e951afe5bc6"], +Cell[7084953, 133126, 614, 12, 70, "Output",ExpressionUUID->"6803d587-3ecf-4545-95bd-66c4d6c96c51"], +Cell[7085570, 133140, 512, 9, 70, "Output",ExpressionUUID->"e6f4d892-0b71-4ab9-852e-de9fe26d5c8d"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[6331061, 119063, 164, 3, 53, "Section",ExpressionUUID->"0e1e9409-cd66-4922-a1ed-71fe5827c12e"], -Cell[6331228, 119068, 1110, 17, 46, "Input",ExpressionUUID->"2376a51c-3109-42c2-b46f-dfa6fd6a8d97", +Cell[7086143, 133156, 164, 3, 53, "Section",ExpressionUUID->"74affff8-cb32-47ad-9136-4b7cf83078b4"], +Cell[7086310, 133161, 1114, 17, 46, "Input",ExpressionUUID->"71cf73ff-a368-423e-bc37-040c5631d9b5", InitializationCell->True], Cell[CellGroupData[{ -Cell[6332363, 119089, 9913, 225, 656, "Input",ExpressionUUID->"0a40ec25-1d6c-4626-bb9d-b6786a68b999"], -Cell[6342279, 119316, 249038, 4697, 584, "Output",ExpressionUUID->"c0cdc71d-756b-4531-bdc8-7fea7515574f"] +Cell[7087449, 133182, 9994, 226, 656, "Input",ExpressionUUID->"25eb9e52-3fcd-4e11-b9f1-70bc9bbd637c"], +Cell[7097446, 133410, 248499, 4686, 584, "Output",ExpressionUUID->"78a1ec0b-ce27-4198-bd21-0d8bd27cdf86"] }, Open ]], Cell[CellGroupData[{ -Cell[6591354, 124018, 12682, 281, 791, "Input",ExpressionUUID->"0b9c50d9-10b4-437b-9896-2735205f54f2"], -Cell[6604039, 124301, 2605, 39, 34, "Output",ExpressionUUID->"3bb06af7-8e97-4a76-b02d-9dcc010053e8"], -Cell[6606647, 124342, 2607, 39, 34, "Output",ExpressionUUID->"10c4b1c6-1c22-4579-88ad-dc1176353f5e"], -Cell[6609257, 124383, 257786, 4725, 609, "Output",ExpressionUUID->"b562baf0-9b3b-4a4d-ba0e-7bbc0be3e1b4"] +Cell[7345982, 138101, 12758, 281, 791, "Input",ExpressionUUID->"533638be-6594-41e7-8824-a54f785509aa"], +Cell[7358743, 138384, 2609, 39, 34, "Output",ExpressionUUID->"8f507ae3-82a9-42e6-8be8-b6e992a81f33"], +Cell[7361355, 138425, 2608, 39, 34, "Output",ExpressionUUID->"3bb0c585-345a-4161-ab39-6fdac09ed225"], +Cell[7363966, 138466, 262682, 4809, 609, "Output",ExpressionUUID->"e7a6a3fe-3688-459b-9f89-8821ff77e6a0"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[6867104, 129115, 153, 3, 72, "Title",ExpressionUUID->"8a4ffb97-273c-457a-86b2-f36b838038c3"], +Cell[7626709, 143282, 151, 3, 72, "Title",ExpressionUUID->"3aa4c3c7-fc6f-42ef-aa94-929bb1c5aa0a"], Cell[CellGroupData[{ -Cell[6867282, 129122, 165, 3, 67, "Section",ExpressionUUID->"410ead3f-69f8-455a-b141-b8c6bb31b59e"], -Cell[6867450, 129127, 2313, 61, 110, "Input",ExpressionUUID->"7a81855c-52b6-4da7-96a1-7b16776ec89e", +Cell[7626885, 143289, 165, 3, 67, "Section",ExpressionUUID->"b03eb6df-71b5-4406-a539-f8a9bb649f41"], +Cell[7627053, 143294, 2251, 60, 110, "Input",ExpressionUUID->"bb79f009-b78a-42cd-a70b-1c427ab4c78f", InitializationCell->True], Cell[CellGroupData[{ -Cell[6869788, 129192, 4461, 103, 388, "Input",ExpressionUUID->"e513bca1-de00-41f7-9726-aa7ff84e1ab0"], -Cell[6874252, 129297, 194680, 3554, 70, "Output",ExpressionUUID->"5b76b829-9e42-4b23-bab4-b22fa59e1061"] +Cell[7629329, 143358, 4457, 103, 388, "Input",ExpressionUUID->"274b1a81-3d1f-4d79-ba2b-e96aee7f03a2"], +Cell[7633789, 143463, 189652, 3471, 70, "Output",ExpressionUUID->"1338e4c3-b30d-4b55-bedf-b6646bd68e89"] }, Open ]], Cell[CellGroupData[{ -Cell[7068969, 132856, 154, 3, 54, "Subsection",ExpressionUUID->"129935a0-86a7-4051-bdca-a2a54da66afe"], +Cell[7823478, 146939, 154, 3, 54, "Subsection",ExpressionUUID->"405e8c59-70fc-417a-adb3-16717ec9ddcc"], Cell[CellGroupData[{ -Cell[7069148, 132863, 1428, 36, 74, "Input",ExpressionUUID->"c7e5d329-77b0-4dd0-88db-00aa2b589947"], -Cell[7070579, 132901, 639, 13, 70, "Output",ExpressionUUID->"c1d8c78f-a876-45d1-b94a-306c6623446a"], -Cell[7071221, 132916, 561, 11, 70, "Output",ExpressionUUID->"534dec4d-c8a8-41b4-b1df-829a5bedcb05"] +Cell[7823657, 146946, 1430, 36, 74, "Input",ExpressionUUID->"efaa24f1-ad32-4652-afa8-24a855b34924"], +Cell[7825090, 146984, 642, 13, 70, "Output",ExpressionUUID->"87a1d3d7-6c3b-4d92-8d5b-2d951cfff87f"], +Cell[7825735, 146999, 562, 11, 70, "Output",ExpressionUUID->"de8a4633-ede0-4061-b378-e4918c2a6cbb"] }, Open ]], Cell[CellGroupData[{ -Cell[7071819, 132932, 1404, 35, 74, "Input",ExpressionUUID->"a70de1ce-8526-4071-a1eb-123213e8a509"], -Cell[7073226, 132969, 572, 12, 70, "Output",ExpressionUUID->"17f5277b-7537-45cc-98ad-0c06c79b498a"], -Cell[7073801, 132983, 474, 9, 70, "Output",ExpressionUUID->"196baea8-6606-49db-8dad-e69cb57a70cd"] +Cell[7826334, 147015, 1405, 35, 74, "Input",ExpressionUUID->"bd3953bd-1678-4443-b5d6-53b1ca3214af"], +Cell[7827742, 147052, 576, 12, 70, "Output",ExpressionUUID->"c01fcb6f-acf1-4d41-92b7-333682a3f8ab"], +Cell[7828321, 147066, 476, 9, 70, "Output",ExpressionUUID->"50431e47-4cc6-44ce-9099-2244245cb425"] }, Open ]], Cell[CellGroupData[{ -Cell[7074312, 132997, 1455, 36, 74, "Input",ExpressionUUID->"edc830ee-5ccd-4b26-8a91-1e951afe5bc6"], -Cell[7075770, 133035, 614, 12, 70, "Output",ExpressionUUID->"6803d587-3ecf-4545-95bd-66c4d6c96c51"], -Cell[7076387, 133049, 512, 9, 70, "Output",ExpressionUUID->"e6f4d892-0b71-4ab9-852e-de9fe26d5c8d"] +Cell[7828834, 147080, 1454, 36, 74, "Input",ExpressionUUID->"ec71f8b9-3a2f-4d82-9674-291fd3dcb70b"], +Cell[7830291, 147118, 613, 12, 70, "Output",ExpressionUUID->"ae75c011-44eb-4b20-af37-53a4f93bcad6"], +Cell[7830907, 147132, 512, 9, 70, "Output",ExpressionUUID->"13f1ff22-74ce-454f-a4a6-b684932eff34"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[7076960, 133065, 164, 3, 53, "Section",ExpressionUUID->"74affff8-cb32-47ad-9136-4b7cf83078b4"], -Cell[7077127, 133070, 1114, 17, 46, "Input",ExpressionUUID->"71cf73ff-a368-423e-bc37-040c5631d9b5", +Cell[7831480, 147148, 164, 3, 53, "Section",ExpressionUUID->"310e5587-f9ab-4373-b92e-8e87daed147b"], +Cell[7831647, 147153, 1111, 17, 46, "Input",ExpressionUUID->"c7d26c9d-498c-4229-a0df-c36b4ce018c9", InitializationCell->True], Cell[CellGroupData[{ -Cell[7078266, 133091, 9994, 226, 656, "Input",ExpressionUUID->"25eb9e52-3fcd-4e11-b9f1-70bc9bbd637c"], -Cell[7088263, 133319, 248499, 4686, 584, "Output",ExpressionUUID->"78a1ec0b-ce27-4198-bd21-0d8bd27cdf86"] +Cell[7832783, 147174, 10024, 226, 656, "Input",ExpressionUUID->"b4685f60-6ed4-4abc-9b52-a764b50908ea"], +Cell[7842810, 147402, 247831, 4676, 584, "Output",ExpressionUUID->"6a65ef70-1dc8-4aee-8959-6ef2594ec0aa"] }, Open ]], Cell[CellGroupData[{ -Cell[7336799, 138010, 12758, 281, 791, "Input",ExpressionUUID->"533638be-6594-41e7-8824-a54f785509aa"], -Cell[7349560, 138293, 2609, 39, 34, "Output",ExpressionUUID->"8f507ae3-82a9-42e6-8be8-b6e992a81f33"], -Cell[7352172, 138334, 2608, 39, 34, "Output",ExpressionUUID->"3bb0c585-345a-4161-ab39-6fdac09ed225"], -Cell[7354783, 138375, 262682, 4809, 609, "Output",ExpressionUUID->"e7a6a3fe-3688-459b-9f89-8821ff77e6a0"] +Cell[8090678, 152083, 12793, 282, 791, "Input",ExpressionUUID->"a992e33a-fae2-4289-b022-6650221566c3"], +Cell[8103474, 152367, 2584, 38, 34, "Output",ExpressionUUID->"9ad2a64f-9add-474e-95a9-95c631c69c64"], +Cell[8106061, 152407, 2586, 38, 34, "Output",ExpressionUUID->"1f7f871e-4f8c-48f4-8773-90448988ba5a"], +Cell[8108650, 152447, 258053, 4735, 609, "Output",ExpressionUUID->"55998c3e-baf2-43dd-8ee8-3183d357fb3d"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[7617526, 143191, 151, 3, 72, "Title",ExpressionUUID->"3aa4c3c7-fc6f-42ef-aa94-929bb1c5aa0a"], +Cell[8366764, 157189, 151, 3, 72, "Title",ExpressionUUID->"3f1c5daa-9204-4fa2-aff4-6501ee71088b"], Cell[CellGroupData[{ -Cell[7617702, 143198, 165, 3, 67, "Section",ExpressionUUID->"b03eb6df-71b5-4406-a539-f8a9bb649f41"], -Cell[7617870, 143203, 2251, 60, 110, "Input",ExpressionUUID->"bb79f009-b78a-42cd-a70b-1c427ab4c78f", +Cell[8366940, 157196, 165, 3, 67, "Section",ExpressionUUID->"8f74d292-59d5-45cb-a51d-f25b4743cd6f"], +Cell[8367108, 157201, 2201, 59, 110, "Input",ExpressionUUID->"52f42957-7028-4c6a-87b7-6d3cbef3d400", InitializationCell->True], Cell[CellGroupData[{ -Cell[7620146, 143267, 4457, 103, 388, "Input",ExpressionUUID->"274b1a81-3d1f-4d79-ba2b-e96aee7f03a2"], -Cell[7624606, 143372, 189652, 3471, 70, "Output",ExpressionUUID->"1338e4c3-b30d-4b55-bedf-b6646bd68e89"] +Cell[8369334, 157264, 4445, 102, 388, "Input",ExpressionUUID->"2d2e9e09-7384-4679-a741-81624c7ba94e"], +Cell[8373782, 157368, 188400, 3448, 70, "Output",ExpressionUUID->"e0d35a7a-e60a-4825-97ce-f769d2e8819b"] }, Open ]], Cell[CellGroupData[{ -Cell[7814295, 146848, 154, 3, 54, "Subsection",ExpressionUUID->"405e8c59-70fc-417a-adb3-16717ec9ddcc"], +Cell[8562219, 160821, 154, 3, 54, "Subsection",ExpressionUUID->"80951159-85f4-4b2a-b4e4-386ff0b4b2ed"], Cell[CellGroupData[{ -Cell[7814474, 146855, 1430, 36, 74, "Input",ExpressionUUID->"efaa24f1-ad32-4652-afa8-24a855b34924"], -Cell[7815907, 146893, 642, 13, 70, "Output",ExpressionUUID->"87a1d3d7-6c3b-4d92-8d5b-2d951cfff87f"], -Cell[7816552, 146908, 562, 11, 70, "Output",ExpressionUUID->"de8a4633-ede0-4061-b378-e4918c2a6cbb"] +Cell[8562398, 160828, 1427, 36, 74, "Input",ExpressionUUID->"e557ec2c-a2fe-4826-972c-21055ce691c0"], +Cell[8563828, 160866, 643, 13, 70, "Output",ExpressionUUID->"a7a842c5-1d78-4608-9a8b-4b1e7b266de8"], +Cell[8564474, 160881, 563, 11, 70, "Output",ExpressionUUID->"3fb2cead-2830-4ed6-bb75-b0b71c8aef75"] }, Open ]], Cell[CellGroupData[{ -Cell[7817151, 146924, 1405, 35, 74, "Input",ExpressionUUID->"bd3953bd-1678-4443-b5d6-53b1ca3214af"], -Cell[7818559, 146961, 576, 12, 70, "Output",ExpressionUUID->"c01fcb6f-acf1-4d41-92b7-333682a3f8ab"], -Cell[7819138, 146975, 476, 9, 70, "Output",ExpressionUUID->"50431e47-4cc6-44ce-9099-2244245cb425"] +Cell[8565074, 160897, 1404, 35, 74, "Input",ExpressionUUID->"7968e064-d590-43d4-899b-e2830156ec83"], +Cell[8566481, 160934, 578, 12, 70, "Output",ExpressionUUID->"512583a9-9f15-4b99-98cc-16127be0e5b4"], +Cell[8567062, 160948, 478, 9, 70, "Output",ExpressionUUID->"991d6277-e862-4fce-b5d0-67ae11c9a75e"] }, Open ]], Cell[CellGroupData[{ -Cell[7819651, 146989, 1454, 36, 74, "Input",ExpressionUUID->"ec71f8b9-3a2f-4d82-9674-291fd3dcb70b"], -Cell[7821108, 147027, 613, 12, 70, "Output",ExpressionUUID->"ae75c011-44eb-4b20-af37-53a4f93bcad6"], -Cell[7821724, 147041, 512, 9, 70, "Output",ExpressionUUID->"13f1ff22-74ce-454f-a4a6-b684932eff34"] +Cell[8567577, 160962, 1455, 36, 74, "Input",ExpressionUUID->"9a668e93-ff40-4858-83e4-377dc9a38be5"], +Cell[8569035, 161000, 616, 12, 70, "Output",ExpressionUUID->"caf6f46c-9ea7-4b5f-bf09-48cd7f10b6ba"], +Cell[8569654, 161014, 513, 9, 70, "Output",ExpressionUUID->"cf3273dd-945b-4788-8907-a20268750a26"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[7822297, 147057, 164, 3, 53, "Section",ExpressionUUID->"310e5587-f9ab-4373-b92e-8e87daed147b"], -Cell[7822464, 147062, 1111, 17, 46, "Input",ExpressionUUID->"c7d26c9d-498c-4229-a0df-c36b4ce018c9", +Cell[8570228, 161030, 164, 3, 53, "Section",ExpressionUUID->"9d03b122-a5b6-4976-ad57-942073f6d9d0"], +Cell[8570395, 161035, 1108, 17, 46, "Input",ExpressionUUID->"da8e8ffa-0b59-462b-b958-66015726754d", InitializationCell->True], Cell[CellGroupData[{ -Cell[7823600, 147083, 10024, 226, 656, "Input",ExpressionUUID->"b4685f60-6ed4-4abc-9b52-a764b50908ea"], -Cell[7833627, 147311, 247831, 4676, 584, "Output",ExpressionUUID->"6a65ef70-1dc8-4aee-8959-6ef2594ec0aa"] +Cell[8571528, 161056, 10008, 226, 656, "Input",ExpressionUUID->"37b486c6-b366-4dd8-850d-2257dc17743f"], +Cell[8581539, 161284, 248567, 4688, 584, "Output",ExpressionUUID->"1412f3e1-8378-4a55-8b10-803cc92c6d6c"] }, Open ]], Cell[CellGroupData[{ -Cell[8081495, 151992, 12793, 282, 791, "Input",ExpressionUUID->"a992e33a-fae2-4289-b022-6650221566c3"], -Cell[8094291, 152276, 2584, 38, 34, "Output",ExpressionUUID->"9ad2a64f-9add-474e-95a9-95c631c69c64"], -Cell[8096878, 152316, 2586, 38, 34, "Output",ExpressionUUID->"1f7f871e-4f8c-48f4-8773-90448988ba5a"], -Cell[8099467, 152356, 258053, 4735, 609, "Output",ExpressionUUID->"55998c3e-baf2-43dd-8ee8-3183d357fb3d"] -}, Open ]] -}, Closed]] -}, Closed]], -Cell[CellGroupData[{ -Cell[8357581, 157098, 151, 3, 72, "Title",ExpressionUUID->"3f1c5daa-9204-4fa2-aff4-6501ee71088b"], -Cell[CellGroupData[{ -Cell[8357757, 157105, 165, 3, 67, "Section",ExpressionUUID->"8f74d292-59d5-45cb-a51d-f25b4743cd6f"], -Cell[8357925, 157110, 2201, 59, 110, "Input",ExpressionUUID->"52f42957-7028-4c6a-87b7-6d3cbef3d400", - InitializationCell->True], -Cell[CellGroupData[{ -Cell[8360151, 157173, 4445, 102, 388, "Input",ExpressionUUID->"2d2e9e09-7384-4679-a741-81624c7ba94e"], -Cell[8364599, 157277, 188400, 3448, 70, "Output",ExpressionUUID->"e0d35a7a-e60a-4825-97ce-f769d2e8819b"] -}, Open ]], -Cell[CellGroupData[{ -Cell[8553036, 160730, 154, 3, 54, "Subsection",ExpressionUUID->"80951159-85f4-4b2a-b4e4-386ff0b4b2ed"], -Cell[CellGroupData[{ -Cell[8553215, 160737, 1427, 36, 74, "Input",ExpressionUUID->"e557ec2c-a2fe-4826-972c-21055ce691c0"], -Cell[8554645, 160775, 643, 13, 70, "Output",ExpressionUUID->"a7a842c5-1d78-4608-9a8b-4b1e7b266de8"], -Cell[8555291, 160790, 563, 11, 70, "Output",ExpressionUUID->"3fb2cead-2830-4ed6-bb75-b0b71c8aef75"] -}, Open ]], -Cell[CellGroupData[{ -Cell[8555891, 160806, 1404, 35, 74, "Input",ExpressionUUID->"7968e064-d590-43d4-899b-e2830156ec83"], -Cell[8557298, 160843, 578, 12, 70, "Output",ExpressionUUID->"512583a9-9f15-4b99-98cc-16127be0e5b4"], -Cell[8557879, 160857, 478, 9, 70, "Output",ExpressionUUID->"991d6277-e862-4fce-b5d0-67ae11c9a75e"] -}, Open ]], -Cell[CellGroupData[{ -Cell[8558394, 160871, 1455, 36, 74, "Input",ExpressionUUID->"9a668e93-ff40-4858-83e4-377dc9a38be5"], -Cell[8559852, 160909, 616, 12, 70, "Output",ExpressionUUID->"caf6f46c-9ea7-4b5f-bf09-48cd7f10b6ba"], -Cell[8560471, 160923, 513, 9, 70, "Output",ExpressionUUID->"cf3273dd-945b-4788-8907-a20268750a26"] -}, Open ]] -}, Open ]] -}, Closed]], -Cell[CellGroupData[{ -Cell[8561045, 160939, 164, 3, 53, "Section",ExpressionUUID->"9d03b122-a5b6-4976-ad57-942073f6d9d0"], -Cell[8561212, 160944, 1108, 17, 46, "Input",ExpressionUUID->"da8e8ffa-0b59-462b-b958-66015726754d", - InitializationCell->True], -Cell[CellGroupData[{ -Cell[8562345, 160965, 10008, 226, 656, "Input",ExpressionUUID->"37b486c6-b366-4dd8-850d-2257dc17743f"], -Cell[8572356, 161193, 248567, 4688, 584, "Output",ExpressionUUID->"1412f3e1-8378-4a55-8b10-803cc92c6d6c"] -}, Open ]], -Cell[CellGroupData[{ -Cell[8820960, 165886, 12727, 281, 791, "Input",ExpressionUUID->"b2eb0eb1-71cc-4bf9-b757-55c05ed81628"], -Cell[8833690, 166169, 2557, 38, 70, "Output",ExpressionUUID->"994d5951-35bc-43c9-8998-1c5f6da5573e"], -Cell[8836250, 166209, 2558, 38, 70, "Output",ExpressionUUID->"d34e360f-33b4-4b16-a487-90b2a1e9c566"], -Cell[8838811, 166249, 255483, 4681, 70, "Output",ExpressionUUID->"3ac20713-42c9-4b4d-9d2d-78e5a8a5f220"] +Cell[8830143, 165977, 12727, 281, 791, "Input",ExpressionUUID->"b2eb0eb1-71cc-4bf9-b757-55c05ed81628"], +Cell[8842873, 166260, 2557, 38, 70, "Output",ExpressionUUID->"994d5951-35bc-43c9-8998-1c5f6da5573e"], +Cell[8845433, 166300, 2558, 38, 70, "Output",ExpressionUUID->"d34e360f-33b4-4b16-a487-90b2a1e9c566"], +Cell[8847994, 166340, 255483, 4681, 70, "Output",ExpressionUUID->"3ac20713-42c9-4b4d-9d2d-78e5a8a5f220"] }, Open ]] }, Closed]] }, Closed]] diff --git a/Manuscript/Ec.bib b/Manuscript/Ec.bib index 04cc88a..45511a5 100644 --- a/Manuscript/Ec.bib +++ b/Manuscript/Ec.bib @@ -1,13 +1,264 @@ %% This BibTeX bibliography file was created using BibDesk. %% http://bibdesk.sourceforge.net/ -%% Created for Pierre-Francois Loos at 2021-05-10 09:24:00 +0200 +%% Created for Pierre-Francois Loos at 2021-06-18 11:02:22 +0200 %% Saved with string encoding Unicode (UTF-8) +@article{Yao_2021, + author = {Yao, Yuan and Umrigar, C. J.}, + date-added = {2021-06-18 11:02:08 +0200}, + date-modified = {2021-06-18 11:02:21 +0200}, + doi = {10.1021/acs.jctc.1c00385}, + journal = {J. Chem. Theory Comput.}, + number = {0}, + pages = {null}, + title = {Orbital Optimization in Selected Configuration Interaction Methods}, + volume = {0}, + year = {0}, + Bdsk-Url-1 = {https://doi.org/10.1021/acs.jctc.1c00385}} + +@article{Yao_2020, + author = {Yao,Yuan and Giner,Emmanuel and Li,Junhao and Toulouse,Julien and Umrigar,C. J.}, + date-added = {2021-06-18 11:01:38 +0200}, + date-modified = {2021-06-18 11:01:52 +0200}, + doi = {10.1063/5.0018577}, + journal = {J. Chem. Phys.}, + number = {12}, + pages = {124117}, + title = {Almost exact energies for the Gaussian-2 set with the semistochastic heat-bath configuration interaction method}, + volume = {153}, + year = {2020}, + Bdsk-Url-1 = {https://doi.org/10.1063/5.0018577}} + +@article{Hohenberg_1964, + annote = {Hohenberg-Kohn theorem}, + author = {P. Hohenberg and W. Kohn}, + date-added = {2021-06-18 10:04:31 +0200}, + date-modified = {2021-06-18 10:04:31 +0200}, + doi = {10.1103/PhysRev.136.B864}, + journal = {Phys. Rev.}, + pages = {B864--B871}, + title = {Inhomogeneous electron gas}, + volume = {136}, + year = {1964}, + Bdsk-Url-1 = {https://doi.org/10.1103/PhysRev.136.B864}} + +@article{Kohn_1965, + author = {W. Kohn and L. J. Sham}, + date-added = {2021-06-18 10:04:20 +0200}, + date-modified = {2021-06-18 10:04:20 +0200}, + doi = {10.1103/PhysRev.140.A1133}, + journal = {Phys. Rev.}, + pages = {A1133--A1138}, + title = {Self-consistent equations including exchange and correlation effects}, + volume = {140}, + year = {1965}, + Bdsk-Url-1 = {https://doi.org/10.1103/PhysRev.140.A1133}} + +@article{Grimme_2006, + author = {Grimme,Stefan}, + date-added = {2021-06-18 10:02:28 +0200}, + date-modified = {2021-06-18 10:02:42 +0200}, + doi = {10.1063/1.2148954}, + journal = {J. Chem. Phys.}, + number = {3}, + pages = {034108}, + title = {Semiempirical hybrid density functional with perturbative second-order correlation}, + volume = {124}, + year = {2006}, + Bdsk-Url-1 = {https://doi.org/10.1063/1.2148954}} + +@article{Malrieu_2003, + author = {Jean-Paul Malrieu and Celestino Angeli}, + date-added = {2021-06-18 09:15:41 +0200}, + date-modified = {2021-06-18 09:15:41 +0200}, + doi = {10.1080/00268976.2013.788745}, + journal = {Mol. Phys.}, + number = {9-11}, + pages = {1092-1099}, + title = {The M{\o}ller--Plesset perturbation revisited: origin of high-order divergences}, + volume = {111}, + year = {2013}, + Bdsk-Url-1 = {https://doi.org/10.1080/00268976.2013.788745}} + +@article{Lepetit_1988, + author = {Lepetit, M. B. and P{\'e}lissier, M. and Malrieu, J. P.}, + date-added = {2021-06-18 09:15:35 +0200}, + date-modified = {2021-06-18 09:15:35 +0200}, + doi = {10.1063/1.455170}, + journal = {J. Chem. Phys.}, + number = {2}, + pages = {998--1008}, + title = {Origins of the poor convergence of many‐body perturbation theory expansions from unrestricted {Hartree-Fock} zeroth‐order descriptions}, + volume = {89}, + year = {1988}, + Bdsk-Url-1 = {https://doi.org/10.1063/1.455170}} + +@article{Gill_1988, + author = {Gill, Peter M. W. and Pople, John A. and Radom, Leo and Nobes, Ross H.}, + date = {1988-12-15}, + date-added = {2021-06-18 09:15:30 +0200}, + date-modified = {2021-06-18 09:15:30 +0200}, + doi = {10.1063/1.455312}, + journal = {J. Chem. Phys.}, + number = {12}, + pages = {7307--7314}, + title = {Why does unrestricted {M{\o}ller-Plesset} perturbation theory converge so slowly for spin‐contaminated wave functions?}, + volume = {89}, + year = {1988}, + Bdsk-Url-1 = {https://doi.org/10.1063/1.455312}} + +@article{Gill_1988a, + author = {P. M. W. Gill and M. W. Wong and R. H. Nobes and L. Radom}, + date-added = {2021-06-18 09:15:30 +0200}, + date-modified = {2021-06-18 09:15:30 +0200}, + doi = {10.1016/0009-2614(88)80328-2}, + journal = {Chem. Phys. Lett.}, + pages = {541}, + title = {How well can {RMP4} theory treat homolytic fragmentations?}, + volume = {148}, + year = {1988}, + Bdsk-Url-1 = {https://doi.org/10.1016/0009-2614(88)80328-2}} + +@article{Nobes_1987, + author = {R. H. Nobes and J. A. Pople and L. Radom and N. C. Handy and P. J. Knowles}, + date-added = {2021-06-18 09:15:22 +0200}, + date-modified = {2021-06-18 09:15:22 +0200}, + doi = {10.1016/0009-2614(87)80545-6}, + journal = {Chem. Phys. Lett.}, + pages = {481}, + title = {Slow convergence of the {M\oller--Plesset} perturbation series: the dissociation energy of hydrogen cyanide and the electron affinity of the cyano radical}, + volume = {138}, + year = {1987}, + Bdsk-Url-1 = {https://doi.org/10.1016/0009-2614(87)80545-6}} + +@article{Laidig_1987, + author = {William D. Laidig and Paul Saxe and Rodney J. Bartlett}, + date-added = {2021-06-18 09:15:17 +0200}, + date-modified = {2021-06-18 09:15:17 +0200}, + doi = {10.1063/1.452291}, + journal = {J. Chem. Phys.}, + pages = {887}, + title = {The description of \ce{N2} and \ce{F2} potential energy surfaces using multireference coupled cluster theory}, + volume = {86}, + year = {1987}, + Bdsk-Url-1 = {https://doi.org/10.1063/1.452291}} + +@article{Gill_1986, + author = {Gill, Peter M. W. and Radom, Leo}, + date = {1986-11-28}, + date-added = {2021-06-18 09:15:10 +0200}, + date-modified = {2021-06-18 09:15:10 +0200}, + doi = {10.1016/0009-2614(86)80686-8}, + journal = {Chem. Phys. Lett.}, + number = {1}, + pages = {16--22}, + title = {Deceptive convergence in {M{\o}ller-Plesset} perturbation energies}, + volume = {132}, + year = {1986}, + Bdsk-Url-1 = {https://doi.org/10.1016/0009-2614(86)80686-8}} + +@article{Handy_1985, + author = {Handy, N. C. and Knowles, P. J. and Somasundram, K.}, + date-added = {2021-06-18 09:14:55 +0200}, + date-modified = {2021-06-18 09:14:55 +0200}, + doi = {10.1007/BF00698753}, + journal = {Theoret. Chim. Acta}, + number = {1}, + pages = {87--100}, + title = {On the convergence of the {M{\o}ller-Plesset} perturbation series}, + volume = {68}, + year = {1985}, + Bdsk-Url-1 = {https://doi.org/10.1007/BF00698753}} + +@article{Knowles_1985, + author = {P. J. Knowles and K. Somasundram and N. C. Handy and K. Hirao}, + date-added = {2021-06-18 09:14:50 +0200}, + date-modified = {2021-06-18 09:14:50 +0200}, + doi = {10.1016/0009-2614(85)85002-8}, + journal = {Chem. Phys. Lett.}, + pages = {8}, + title = {The Calculation of High-Order Energies in the Many-Body Perturbation Theory Series}, + volume = {113}, + year = {1985}, + Bdsk-Url-1 = {https://doi.org/10.1016/0009-2614(85)85002-8}} + +@article{Laidig_1985, + author = {William D. Laidig and George Fitzgerald and Rodney J. Bartlett}, + date-added = {2021-06-18 09:14:44 +0200}, + date-modified = {2021-06-18 09:14:44 +0200}, + doi = {10.1016/0009-2614(85)80934-9}, + journal = {Chem. Phys. Lett.}, + pages = {151}, + title = {Is Fifth-Order MBPT Enough?}, + volume = {113}, + year = {1985}, + Bdsk-Url-1 = {https://doi.org/10.1016/0009-2614(85)80934-9}} + +@article{Marie_2021, + author = {Antoine Marie and Hugh G. A. Burton and Pierre-Fran{\c c}ois Loos}, + date-added = {2021-06-18 08:52:50 +0200}, + date-modified = {2021-06-18 08:53:45 +0200}, + doi = {10.1088/1361-648X/abe795}, + journal = {J. Phys.: Condens. Matter}, + pages = {283001}, + title = {Perturbation Theory in the Complex Plane: Exceptional Points and Where to Find Them}, + volume = {33}, + year = {2021}, + Bdsk-Url-1 = {https://doi.org/10.1088/1361-648X/abe795}} + +@article{Aroeira_2021, + author = {Aroeira, Gustavo J. R. and Davis, Madeline M. and Turney, Justin M. and Schaefer, Henry F.}, + date-added = {2021-06-18 05:49:33 +0200}, + date-modified = {2021-06-18 05:49:49 +0200}, + doi = {10.1021/acs.jctc.0c00888}, + journal = {J. Chem. Theory Comput.}, + number = {1}, + pages = {182-190}, + title = {Coupled Cluster Externally Corrected by Adaptive Configuration Interaction}, + volume = {17}, + year = {2021}, + Bdsk-Url-1 = {https://doi.org/10.1021/acs.jctc.0c00888}} + +@article{Paldus_2017, + author = {J. Paldus}, + date-added = {2021-06-18 05:44:17 +0200}, + date-modified = {2021-06-18 05:45:05 +0200}, + doi = {10.1007/s10910-016-0688-6}, + journal = {J. Math. Chem}, + pages = {477--502}, + title = {Externally and internally corrected coupled cluster approaches: an overview}, + volume = {55}, + year = {2017}, + Bdsk-Url-1 = {https://doi.org/10.1007/s10910-016-0688-6}} + +@misc{Magoulas_2021, + archiveprefix = {arXiv}, + author = {Ilias Magoulas and Karthik Gururangan and Piotr Piecuch and J. Emiliano Deustua and Jun Shen}, + date-added = {2021-06-18 05:40:59 +0200}, + date-modified = {2021-06-18 05:41:08 +0200}, + eprint = {2102.10143}, + primaryclass = {physics.chem-ph}, + title = {Is Externally Corrected Coupled Cluster Always Better than the Underlying Truncated Configuration Interaction?}, + year = {2021}} + +@article{Lee_2021, + author = {Lee, Seunghoon and Zhai, Huanchen and Sharma, Sandeep and Umrigar, C. J. and Chan, Garnet Kin-Lic}, + date-added = {2021-06-18 05:39:07 +0200}, + date-modified = {2021-06-18 05:39:21 +0200}, + doi = {10.1021/acs.jctc.1c00205}, + journal = {J. Chem. Theory Comput.}, + number = {6}, + pages = {3414-3425}, + title = {Externally Corrected CCSD with Renormalized Perturbative Triples (R-ecCCSD(T)) and the Density Matrix Renormalization Group and Selected Configuration Interaction External Sources}, + volume = {17}, + year = {2021}, + Bdsk-Url-1 = {https://doi.org/10.1021/acs.jctc.1c00205}} + @misc{g09, author = {M. J. Frisch and G. W. Trucks and H. B. Schlegel and G. E. Scuseria and M. A. Robb and J. R. Cheeseman and G. Scalmani and V. Barone and B. Mennucci and G. A. Petersson and H. Nakatsuji and M. Caricato and X. Li and H. P. Hratchian and A. F. Izmaylov and J. Bloino and G. Zheng and J. L. Sonnenberg and M. Hada and M. Ehara and K. Toyota and R. Fukuda and J. Hasegawa and M. Ishida and T. Nakajima and Y. Honda and O. Kitao and H. Nakai and T. Vreven and Montgomery, {Jr.}, J. A. and J. E. Peralta and F. Ogliaro and M. Bearpark and J. J. Heyd and E. Brothers and K. N. Kudin and V. N. Staroverov and R. Kobayashi and J. Normand and K. Raghavachari and A. Rendell and J. C. Burant and S. S. Iyengar and J. Tomasi and M. Cossi and N. Rega and J. M. Millam and M. Klene and J. E. Knox and J. B. Cross and V. Bakken and C. Adamo and J. Jaramillo and R. Gomperts and R. E. Stratmann and O. Yazyev and A. J. Austin and R. Cammi and C. Pomelli and J. W. Ochterski and R. L. Martin and K. Morokuma and V. G. Zakrzewski and G. A. Voth and P. Salvador and J. J. Dannenberg and S. Dapprich and A. D. Daniels and {\"O}. Farkas and J. B. Foresman and J. V. Ortiz and J. Cioslowski and D. J. Fox}, date-added = {2021-05-10 08:40:20 +0200}, @@ -984,18 +1235,6 @@ year = {1982}, Bdsk-Url-1 = {https://doi.org/10.1063/1.443164}} -@article{qp2, - author = {Y. Garniron and K. Gasperich and T. Applencourt and A. Benali and A. Fert{\'e} and J. Paquier and B. Pradines and R. Assaraf and P. Reinhardt and J. Toulouse and P. Barbaresco and N. Renon and G. David and J. P. Malrieu and M. V{\'e}ril and M. Caffarel and P. F. Loos and E. Giner and A. Scemama}, - date-added = {2021-05-06 15:31:25 +0200}, - date-modified = {2021-05-06 15:31:25 +0200}, - doi = {10.1021/acs.jctc.9b00176}, - journal = {J. Chem. Theory Comput.}, - pages = {3591}, - title = {Quantum Package 2.0: A Open-Source Determinant-Driven Suite Of Programs}, - volume = {15}, - year = {2019}, - Bdsk-Url-1 = {https://doi.org/10.1021/acs.jctc.9b00176}} - @article{Rico_1993, abstract = {Several single-reference excited-state methods based on single and double substitutions are considered. Quadratic configuration interaction (QCISD) and coupled-cluster theory (CCSD) are obtained in a time-dependent linear response framework, together with the CISD method. The QCISD and CCSD transition energies are size consistent, and exact for two-electron systems. The relation between the QCISD and CCSD excited-state theories and ground-state gradient expressions is developed and employed. Calculations are reported for singlet and triplet excited states of some small molecules. CCSD and QCISD are qualitatively superior to CISD. Overall, CCSD exhibits noticeably better accuracy than QCISD, and the differences are sometimes much larger than for ground-state problems. A possible explanation is suggested.}, author = {Rudolph J. Rico and Martin Head-Gordon}, @@ -1210,16 +1449,6 @@ year = {2018}, Bdsk-Url-1 = {https://doi.org/10.1103/PhysRevLett.121.113001}} -@misc{Yao_2020, - archiveprefix = {arXiv}, - author = {Yuan Yao and Emmanuel Giner and Junhao Li and Julien Toulouse and C. J. Umrigar}, - date-added = {2021-05-06 15:31:25 +0200}, - date-modified = {2021-05-06 15:31:25 +0200}, - eprint = {2004.10059}, - primaryclass = {physics.chem-ph}, - title = {Almost exact energies for the Gaussian-2 set with the semistochastic heat-bath configuration interaction method}, - year = {2020}} - @article{Zimmerman_2017, author = {Zimmerman, Paul M.}, date-added = {2021-05-06 15:31:25 +0200}, diff --git a/Manuscript/Ec.tex b/Manuscript/Ec.tex index 95a90bf..c602688 100644 --- a/Manuscript/Ec.tex +++ b/Manuscript/Ec.tex @@ -36,16 +36,16 @@ \title{Reference correlation energies in finite Hilbert spaces: five- and six-membered rings} -\author{Micka\"el V\'eril} -\affiliation{\LCPQ} \author{Yann Damour} \affiliation{\LCPQ} -\author{Anthony Scemama} +\author{Micka\"el V\'eril} \affiliation{\LCPQ} \author{Michel Caffarel} \affiliation{\LCPQ} \author{Denis Jacquemin} \affiliation{\CEISAM} +\author{Anthony Scemama} +\affiliation{\LCPQ} \author{Pierre-Fran\c{c}ois Loos} \email{loos@irsamc.ups-tlse.fr} \affiliation{\LCPQ} @@ -57,7 +57,7 @@ In the continuity of our recent work on the benzene molecule [\href{https://doi. This corresponds to Hilbert spaces with sizes ranging from $10^{20}$ (for thiophene) to $10^{36}$ (for benzene). Our estimates are based on localized-orbital-based selected configuration interaction (SCI) calculations performed with the \textit{Configuration Interaction using a Perturbative Selection made Iteratively} (CIPSI) algorithm. The performance and convergence properties of several series of methods are investigated. -In particular, we study the convergence properties of ii) the M{\o}ller-Plesset perturbation series up to fifth-order (MP2, MP3, MP4, and MP5), ii) the iterative approximate single-reference coupled-cluster series CC2, CC3, and CC4, and ii) the single-reference coupled-cluster series CCSD, CCSDT, and CCSDTQ. +In particular, we study the convergence properties of i) the M{\o}ller-Plesset perturbation series up to fifth-order (MP2, MP3, MP4, and MP5), ii) the iterative approximate single-reference coupled-cluster series CC2, CC3, and CC4, and ii) the single-reference coupled-cluster series CCSD, CCSDT, and CCSDTQ. The performance of the ground-state gold standard CCSD(T) is also investigated. \end{abstract} @@ -74,35 +74,42 @@ The nuclei coordinates can then be treated as parameters in the electronic Hamil The second central approximation which makes calculations feasable by a computer is the basis set approximation where one introduces a set of pre-defined basis functions to represent the many-electron wave function of the system. In most molecular calculations, a set of one-electron, atom-centered gaussian basis functions are introduced to expand the so-called one-electron molecular orbitals which are then used to build the many-electron Slater determinants. The third and most relevant approximation in the present context is the ansatz (or form) of the electronic wave function $\Psi$. -For example, in configuration interaction (CI) methods, the wave function is expanded as a linear combination of Slater determinants, while in (single-reference) coupled-cluster (CC) theory, \cite{Cizek_1966,Paldus_1972,Crawford_2000,Bartlett_2007,Shavitt_2009} a reference Slater determinant $\Psi_0$ [usually taken as the Hartree-Fock (HF) wave function] is multiplied by a wave operator defined as the exponentiated excitation operator $\Hat{T} = \sum_{k=1}^n \Hat{T}_k$ (where $n$ is the number of electrons). +For example, in configuration interaction (CI) methods, the wave function is expanded as a linear combination of Slater determinants, while in (single-reference) coupled-cluster (CC) theory, \cite{Cizek_1966,Paldus_1972,Crawford_2000,Piecuch_2002,Bartlett_2007,Shavitt_2009} a reference Slater determinant $\Psi_0$ [usually taken as the Hartree-Fock (HF) wave function] is multiplied by a wave operator defined as the exponentiated excitation operator $\Hat{T} = \sum_{k=1}^n \Hat{T}_k$ (where $n$ is the number of electrons). The truncation of $\Hat{T}$ allows to define a hierarchy of non-variational and size-extensive methods with improved accuracy: CC with singles and doubles (CCSD), \cite{Cizek_1966,Purvis_1982} CC with singles, doubles, and triples (CCSDT), \cite{Noga_1987a,Scuseria_1988} CC with singles, doubles, triples, and quadruples (CCSDTQ), \cite{Oliphant_1991,Kucharski_1992} with corresponding computational scalings of $\order*{N^{6}}$, $\order*{N^{8}}$, and $\order*{N^{10}}$, respectively (where $N$ denotes the number of orbitals). Parallel to the ``complete'' CC series presented above, an alternative series of approximate iterative CC models have been developed by the Aarhus group in the context of CC response theory \cite{Christiansen_1998} where one skips the most expensive terms and avoids the storage of the higher-excitation amplitudes: CC2, \cite{Christiansen_1995a} CC3, \cite{Christiansen_1995b,Koch_1997} and CC4 \cite{Kallay_2005} These iterative methods scale as $\order*{N^{5}}$, $\order*{N^{7}}$, and $\order*{N^{9}}$, respectively, and can be seen as cheaper approximations of CCSD, CCSDT, and CCSDTQ. +Coupled-cluster methods have been particularly successful at computing accurately various properties for small- and medium-sized molecules. +\cite{Kallay_2003,Kallay_2004a,Gauss_2006,Kallay_2006,Gauss_2009} A similar systematic truncation strategy can be applied to CI methods leading to the well-established family of methods known as CISD, CISDT, CISDTQ, \ldots~where one systematically increases the maximum excitation degree of the determinants taken into account. Except for full CI (FCI) where all determinants from the Hilbert space (\ie, with excitation degree up to $N$) are considered, truncated CI methods are variational but lack size-consistency. The non-variationality of truncated CC methods being less of an issue than the size-inconsistency of the truncated CI methods, the formers have naturally overshadowed the latters in the electronic structure landscape. -However, a different strategy has recently made a come back in the context of CI methods. -Indeed, selected CI (SCI) methods where one iteratively selects the energetically relevant determinants from the FCI space has been recently shown to be highly successful to produce reference energies for ground and excited states in small- and medium-size molecules. +However, a different strategy has recently made a come back in the context of CI methods. \cite{Bender_1969,Whitten_1969,Huron_1973} +Indeed, selected CI (SCI) methods, \cite{Booth_2009,Giner_2013,Evangelista_2014,Giner_2015,Holmes_2016,Tubman_2016,Liu_2016,Ohtsuka_2017,Zimmerman_2017,Coe_2018,Garniron_2018} where one iteratively selects the energetically relevant determinants from the FCI space (usually) based on a perturbative criterion, has been recently shown to be highly successful to produce reference energies for ground and excited states in small- and medium-size molecules \cite{Holmes_2017,Li_2018,Li_2020,Loos_2018a,Chien_2018,Loos_2019,Loos_2020b,Loos_2020c,Loos_2020e,Garniron_2019,Eriksen_2020,Yao_2020,Veril_2021} thanks to efficient deterministic, stochastic or hybrid algorithms well suited for massive parallelization. +We refer the interested reader to Refs.~\onlinecite{Loos_2020a,Eriksen_2021} for recent reviews. +SCI methods are based on a simple and natural observation: amongst the very large number of determinants belonging to the FCI space, only a relative small fraction of them significantly contributes to the energy. +Accordingly to this well-known fact, the SCI+PT2 family of methods performs a sparse exploration of the FCI space by selecting iteratively only the most energetically relevant determinants of the variational space and supplementing it with a second-order perturbative correction (PT2). \cite{Huron_1973,Garniron_2017,Sharma_2017,Garniron_2018,Garniron_2019} +Although the formal scaling of such algorithms remain exponential, the prefactor is greatly reduced which explains their current attractiveness in the electronic structure community and much wider applicability than their standard FCI parent. +Note that, very recently, several groups \cite{Aroeira_2021,Lee_2021,Magoulas_2021} have coupled CC and SCI methods via the externally-corrected CC methodology, \cite{Paldus_2017} showing promising performances for weakly and strongly correlated systems. +A rather different strategy in order to reach the holy grail FCI limit is to resort to M{\o}ller-Plesset (MP) perturbation theory, \cite{Moller_1934} +which popularity originates from its black-box nature, size-extensivity, and relatively low computational scaling, making it easily applied in a broad range of molecular systems. +Again, at least in theory, one can obtain the exact energy of the system by ramping up the degree of the perturbative series. \cite{Marie_2021} +The second-order M{\o}ller-Plesset (MP2) method \cite{Moller_1934} [which scales as $\order*{N^{5}}$] has been broadly adopted in quantum chemistry for several decades, and is now included in double-hybrid functionals \cite{Grimme_2006} alongside exact Hartree-Fock exchange within density-functional theory. \cite{Hohenberg_1964,Kohn_1965} +Its higher-order variants [MP3, \cite{Pople_1976} +MP4, \cite{Krishnan_1980} MP5, \cite{Kucharski_1989} and MP6 \cite{He_1996a,He_1996b} which scales as $\order*{N^{6}}$, $\order*{N^{7}}$, and $\order*{N^{8}}$, respectively] have been investigated much more scarcely. +However, it is now widely recognised that the series of MP approximations might show erratic, slow, or divergent behavior that limit its applicability and systematic improvability. \cite{Laidig_1985,Knowles_1985,Handy_1985,Gill_1986,Laidig_1987,Nobes_1987,Gill_1988,Gill_1988a,Lepetit_1988,Malrieu_2003} +Again, MP perturbation theory and CC methods can be coupled. +The CCSD(T) method \cite{Raghavachari_1989} known as the gold-standard of quantum chemistry for weakly correlated systems is probably the most successful example of such coupling. -A rather different strategy in order to reach the holy grail FCI limit is to resort to M{\o}ller-Plesset perturbation theory. \cite{Moller_1934} -Again, at least in theory, one can obtain the exact energy of the system by ramping up the degree of the pertrubative series. -The second-order M{\o}ller-Plesset (MP2) method is very well known but its higher-order -MP3 \cite{Pople_1976} -MP4 \cite{Krishnan_1980} -MP5 \cite{Kucharski_1989} -MP6 \cite{He_1996a,He_1996b} -CCSD(T) \cite{Raghavachari_1989} is the gold-standard - - - -Reviews. \cite{Crawford_2000,Piecuch_2002,Bartlett_2007,Shavitt_2009} - -Coupled-cluster methods have been particularly successful for small- and medium-sized molecules properties -\cite{Kallay_2003,Kallay_2004a,Gauss_2006,Kallay_2006,Gauss_2009} +Motivated by the recent blind test of Eriksen \textit{et al.}\cite{Eriksen_2020}~reporting the performance of a large panel of emerging electronic structure methods [the many-body expansion FCI (MBE-FCI), \cite{Eriksen_2017,Eriksen_2018,Eriksen_2019a,Eriksen_2019b} adaptive sampling CI (ASCI), \cite{Tubman_2016,Tubman_2018,Tubman_2020} iterative CI (iCI), \cite{Liu_2014,Liu_2016,Lei_2017,Zhang_2020} semistochastic heat-bath CI (SHCI), \cite{Holmes_2016,Holmes_2017,Sharma_2017} the full coupled-cluster reduction (FCCR), \cite{Xu_2018,Xu_2020} the density-matrix renormalization group (DMRG) approach, \cite{White_1992,White_1993,Chan_2011} adaptive-shift FCI quantum Monte Carlo (AS-FCIQMC), \cite{Booth_2009,Cleland_2010,Ghanem_2019} and cluster-analysis-driven FCIQMC (CAD-FCIQMC) \cite{Deustua_2017,Deustua_2018}] on the non-relativistic frozen-core correlation energy of the benzene molecule in the standard correlation-consistent double-$\zeta$ Dunning basis set (cc-pVDZ), some of us have recently investigated the performance of the \textit{configuration interaction using a perturbative selection made iteratively} (CIPSI) method \cite{Huron_1973,Giner_2013,Giner_2015,Garniron_2018,Garniron_2019} on the very same system [see also Ref.~\onlinecite{Lee_2020} for a study of the performance of phaseless auxiliary-field quantum Monte Carlo (ph-AFQMC) \cite{Motta_2018}]. +In the continuity of this recent work, we report here a significant extension by estimating the (frozen-core) FCI/cc-pVDZ correlation energy of twelve cyclic molecules (cyclopentadiene, furan, imidazole, pyrrole, thiophene, benzene, pyrazine, pyridazine, pyridine, pyrimidine, tetrazine, and triazine) with the help of the CIPSI method employing energetically-optimized orbitals at the same level of theory. \cite{Yao_2020,Yao_2021} +This set of molecular systems corresponds to Hilbert spaces with sizes ranging from $10^{20}$ (for thiophene) to $10^{36}$ (for benzene). +In addition to CIPSI, the performance and convergence properties of several series of methods are investigated. +In particular, we study the convergence properties of i) the MP perturbation series up to fifth-order (MP2, MP3, MP4, and MP5), ii) the CC2, CC3, and CC4 approximate series, and ii) the ``complete'' CC series up to quadruples (\ie, CCSD, CCSDT, and CCSDTQ). +The performance of the ground-state gold standard CCSD(T) is also investigated. %%% FIG 1 %%% \begin{figure*}