(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     42698,        947]
NotebookOptionsPosition[     41191,        917]
NotebookOutlinePosition[     41631,        934]
CellTagsIndexPosition[     41588,        931]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"Next", " ", "Solar", " ", "Maxima"}], " ", "-", " ", 
    RowBox[{"26", "th", " ", "one"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"data", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"1", ",", "1761.5"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"2", ",", "1769.75"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"3", ",", "1778.41"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"4", ",", "1788.16"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"5", ",", "1805.16"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"6", ",", "1816.41"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"7", ",", "1829.92"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"8", ",", "1837.25"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"9", ",", "1848.16"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"10", ",", "1860.16"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"11", ",", "1870.67"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"12", ",", "1884.0"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"13", ",", "1894.08"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"14", ",", "1906.16"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"15", ",", "1917.66"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"16", ",", "1928.41"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"17", ",", "1937.41"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"18", ",", "1947.41"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"19", ",", "1957.0"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"20", ",", "1968.91"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"21", ",", "1980"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"22", ",", "1989.11"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"23", ",", "2000.5"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"24", ",", "2014.33"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"25", ",", "2024.83"}], "}"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"i", ",", " ", 
        RowBox[{
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{
            RowBox[{"i", "+", "1"}], ",", "2"}], "]"}], "]"}], "-", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{"i", ",", "2"}], "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "1", ",", 
        RowBox[{
         RowBox[{"Length", "[", "data", "]"}], "-", "1"}]}], "}"}]}], "]"}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", "=", 
     RowBox[{"ListPlot", "[", 
      RowBox[{"data", ",", 
       RowBox[{"PlotStyle", "\[Rule]", " ", 
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", 
          RowBox[{"Pointsize", "[", "0.02", "]"}]}], "}"}]}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   StyleBox[
    RowBox[{
     RowBox[{"mm", "=", "10"}], " ", ";"}],
    FontColor->RGBColor[1, 0, 0]], 
   RowBox[{"(*", " ", 
    RowBox[{"no", " ", "of", " ", "polynomials"}], " ", "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"mod", "=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{"t", "^", "n"}], ",", 
         RowBox[{"{", 
          RowBox[{"n", ",", "0", ",", "m"}], "}"}]}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"m", ",", "1", ",", "mm"}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ff", "=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"Fit", "[", 
        RowBox[{"data", ",", 
         RowBox[{"mod", "[", 
          RowBox[{"[", "i", "]"}], "]"}], ",", "t"}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", "1", ",", 
         RowBox[{"Length", "[", "mod", "]"}]}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ss", "=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"ff", "[", 
         RowBox[{"[", "i", "]"}], "]"}], "/.", 
        RowBox[{"t", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"26", ",", "27", ",", "28"}], "}"}]}]}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", "1", ",", "mm"}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"Print", "[", 
       RowBox[{
       "\"\<Next Three Maximas (26th, 27th & 28th) are from \>\"", ",", "i", 
        ",", "\"\< order polynomial \>\"", ",", 
        RowBox[{"ss", "[", 
         RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "1", ",", "mm"}], "}"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g2", "=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"Plot", "[", 
        RowBox[{
         RowBox[{"ff", "[", 
          RowBox[{"[", "i", "]"}], "]"}], ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", 
           RowBox[{
            RowBox[{"First", "[", "data", "]"}], "[", 
            RowBox[{"[", "1", "]"}], "]"}], ",", 
           RowBox[{
            RowBox[{"Last", "[", "data", "]"}], "[", 
            RowBox[{"[", "1", "]"}], "]"}]}], "}"}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", " ", 
          RowBox[{"Hue", "[", 
           RowBox[{"1", "/", "i"}], "]"}]}]}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", "1", ",", 
         RowBox[{"Length", "[", "mod", "]"}]}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{"{", 
     RowBox[{"g1", ",", "g2"}], "}"}], "]"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.712923243681839*^9, 3.7129232705561676`*^9}, {
   3.712923309823285*^9, 3.712923410532989*^9}, {3.7129235586395383`*^9, 
   3.712923559070654*^9}, {3.712923608705373*^9, 3.712923853589926*^9}, {
   3.712923908188822*^9, 3.7129240528708787`*^9}, {3.7129240868737707`*^9, 
   3.7129244544844847`*^9}, {3.7129244884443784`*^9, 3.712924501991525*^9}, {
   3.7129245477684584`*^9, 3.712924589840328*^9}, {3.7129246317109585`*^9, 
   3.7129246840424166`*^9}, {3.7129247262344236`*^9, 3.712924729563449*^9}, {
   3.712924816589661*^9, 3.7129248178891773`*^9}, {3.9776582442329884`*^9, 
   3.977658244695976*^9}, {3.9776585807189093`*^9, 3.9776587745732903`*^9}, {
   3.9776588718194637`*^9, 3.9776588743967047`*^9}, {3.977658943608568*^9, 
   3.977658967015291*^9}, {3.9776590032326155`*^9, 3.977659012795205*^9}, {
   3.977659053258766*^9, 3.9776590551949615`*^9}, {3.977659098350932*^9, 
   3.977659101039513*^9}, {3.9776591566350317`*^9, 3.9776591575328016`*^9}, {
   3.977659198753022*^9, 3.977659217554363*^9}, {3.977659258198382*^9, 
   3.9776592589739084`*^9}, {3.9776599458760605`*^9, 3.977659964148974*^9}, {
   3.977660010217908*^9, 3.9776601348292437`*^9}, {3.9776602260606213`*^9, 
   3.9776605582422333`*^9}, {3.9776605919506664`*^9, 3.977660866006102*^9}, {
   3.977660898160058*^9, 3.9776609382290087`*^9}, {3.977660992817973*^9, 
   3.977661020779968*^9}, {3.977661065982793*^9, 3.977661072416171*^9}, {
   3.9776611270093017`*^9, 3.9776611438789277`*^9}, {3.9776613313722644`*^9, 
   3.977661332319872*^9}, {3.977661372294992*^9, 3.977661545857264*^9}, {
   3.9776616158213453`*^9, 3.9776617228901606`*^9}, {3.977661764384611*^9, 
   3.977661767182046*^9}, {3.9776618473792706`*^9, 3.9776618524939327`*^9}, {
   3.9776619510561*^9, 3.977661955247354*^9}, {3.9776625442399893`*^9, 
   3.9776625481652336`*^9}, {3.9776627831419115`*^9, 
   3.9776628863345594`*^9}, {3.977662932784087*^9, 3.977663066476123*^9}, 
   3.977663241334064*^9},ExpressionUUID->"8bcf0580-bf39-4d28-a4a3-\
e1b27c82ebce"],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "1", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2035.9861999999994`", ",", "2047.0147999999995`", ",", 
     "2058.0433999999996`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 1, 
   " order polynomial ", {2035.9861999999994`, 2047.0147999999995`, 
   2058.0433999999996`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.9776630671986785`*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"67ada5b9-53eb-49b2-a578-7f2708087c0b"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "2", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2033.4701565217379`", ",", "2043.9181311036775`", ",", 
     "2054.3230963953906`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 2, 
   " order polynomial ", {2033.4701565217379`, 2043.9181311036775`, 
   2054.3230963953906`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.97766306720793*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"61e7ae33-80d7-4fc2-9e95-fc7f946e1584"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "3", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2033.9579652173911`", ",", "2044.6310822742475`", ",", 
     "2055.302883091788`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 3, 
   " order polynomial ", {2033.9579652173911`, 2044.6310822742475`, 
   2055.302883091788}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.977663067217901*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"04335105-5566-4526-ad5c-8f9db2b5621a"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "4", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2038.5752332015809`", ",", "2052.8000948616595`", ",", 
     "2068.2075551501625`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 4, 
   " order polynomial ", {2038.5752332015809`, 2052.8000948616595`, 
   2068.2075551501625`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.977663067223885*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"f09f9b06-5cff-4726-b7f4-e23031b32917"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "5", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2037.8369375494121`", ",", "2051.2099196108306`", ",", 
     "2065.3237849532197`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 5, 
   " order polynomial ", {2037.8369375494121`, 2051.2099196108306`, 
   2065.3237849532197`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.977663067229869*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"9ad253b6-cda5-4038-a420-45e912a0c887"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "6", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2042.0102810068672`", ",", "2062.1248178841765`", ",", 
     "2087.973982350526`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 6, 
   " order polynomial ", {2042.0102810068672`, 2062.1248178841765`, 
   2087.973982350526}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.977663067235854*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"8df13717-bb0a-4e87-8f16-6a68f24700a9"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "7", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2031.9435716247172`", ",", "2030.3759652174376`", ",", 
     "2012.8608431146022`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 7, 
   " order polynomial ", {2031.9435716247172`, 2030.3759652174376`, 
   2012.8608431146022`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.9776630672418394`*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"2772c7c5-8976-4a84-aab3-4eb8e001081b"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "8", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2033.0120292905922`", ",", "2034.4032287273149`", ",", 
     "2023.682401525497`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 8, 
   " order polynomial ", {2033.0120292905922`, 2034.4032287273149`, 
   2023.682401525497}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.977663067248375*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"03cb6d02-2bdf-4bf4-9bf0-49bb01194b21"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "9", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2045.7448249419103`", ",", "2091.2110862474656`", ",", 
     "2196.3913476641756`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 9, 
   " order polynomial ", {2045.7448249419103`, 2091.2110862474656`, 
   2196.3913476641756`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.9776630672543583`*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"c72deb53-144e-4495-884a-87f049f4eab1"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Next Three Maximas (26th, 27th & 28th) are from \"\>", 
   "\[InvisibleSpace]", "10", 
   "\[InvisibleSpace]", "\<\" order polynomial \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{
    "2014.3468759637326`", ",", "1926.9756608484313`", ",", 
     "1633.6434930143878`"}], "}"}]}],
  SequenceForm[
  "Next Three Maximas (26th, 27th & 28th) are from ", 10, 
   " order polynomial ", {2014.3468759637326`, 1926.9756608484313`, 
   1633.6434930143878`}],
  Editable->False]], "Print",
 CellChangeTimes->{{3.97766299882349*^9, 3.9776630320847893`*^9}, 
   3.9776630672603636`*^9},
 CellLabel->
  "During evaluation of \
In[196]:=",ExpressionUUID->"2b3b7223-b817-45d3-8148-88112be65039"]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{{{}, 
    {RGBColor[0, 0, 1], PointSize[0.012833333333333334`], AbsoluteThickness[
     1.6], PointBox[CompressedData["
1:eJxTTMoPSmViYGCQBGIQDQEf7MFU22wHqACEXg7jczgU2nJdX3wSxheA8D/A
+CIQvskcKF8Cwk+E8WUcPB5WiaybDuMrQOitML4SRP0DGF8FwheYC+WrQfRb
wfgaELoAxtdy2CHX+jpwBoyvA9F/AsbXg/C/wfgGEL7iPCjfEMJ3hfGNIPxc
GN8YQk+B8U0g8odhfFMI/QHGN3MASReIzIfyzSG0E4xvAXFvJYxvCeEvnu8A
AMugWIw=
      "]]}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {Hue[1, 1, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwVz3s0VAkAx/EpW9NatFbSmkPJs1EN43UJ86OHY6PHblFplcdIxWRn8y4n
hlSMLZNz6N65N6mQoY3SC1HSUNRuEztpiG17SEyrOOrIzv7xO9/z+fNnFbnv
R+FMFosVrNv/fZudJmGxtIKAuL5600wS0fYOD+0stQJ/TnhPrM597U/Mg721
Au8OzcRNnR8ZOdeWpGgFfAcNEZlF4nLxq+f891qB5YveGzUSEgcUm3yFg+8F
H8PUTQGHSRiqlk+2t44Jytaq2lLzSPCs/xbJjk4Iprkd3ZoiEiy965L9V6YF
19CYJFSQOHvr99vbqvSw3qvpuaiFRG9D7cifsWw8fN1x3qibhHrbXp44+Rts
GOkbjh8mYRwgjWnBXFzsYU2tm0FhzhBfTVYbw2gBVzpqRsH423qV/yUThBru
SLVbTsFDE3/fr9AUGS9Lef3+FJo/HQpSkWY4N39YGLqVwq5bSmVT1ve4wF0V
s1FEoTiq3Nx0JwclY+W3B7IoLN0yMP5FaIEjJiaMcwkFzdj6LgQuRIhZ/mq9
GgqTowYL8i4sgo3YIO5kK4X2zY11VVVW6M0sHrn5lIL93DnBKeRiJCTyVwhH
KVxNOFRVwFhjdvNjdtcsOZ7YytgbC22QNpJFXzOXw1by2OHnEluM/Op5JdJZ
Dq8N/a4MaYegms/2ZQFy9CXk+Erz7XHkwf1o4XY56jy3Gt494YBWvzKrV2I5
zELuqStylqD/1JGKoVw5MMg6cXs/F4MVqXnZlByn5sca2qU44pWheERTK4eE
3p3rtmcp2kNSONfvyUF3FbcVJCyDYjxH+VOfHBkimdZCvBwpa5k/sj/IMRzh
sGBrJA/W2W1nPb6mcTcjceY+Fyd0mnycqFxIY/t4WTK72gkhuc6mtCut+0cM
etk4Q3kxtcAhkMauJVE82TlnrOC154p30GgOCUv3s+Qjv9Bure9+GvwtQ5Xz
SvnQBOUVtB+jsVeypseH4wKDt1NkN0MjN2bOpxkyF9j6HpiVdplGg0XE9NA8
V/i+njH6rIPGtS+H9bgFrnBLKjrT0k+js27lkNTYDcvCnLqF4zRaF8W05Re6
wehjt/C0AQPJ1c2lA/ru6BTn3dpuxSBs8bPwMKk7pAEBJX95MPhUz+M4sj3g
yDL26Q5ikK735kFRhgdq419674lgYGrjGWHLIuDFv9PQmMwgSRTyQT+VAPO0
erYsnwHHPVppl05ArR4w0OrcPPUL5X+QwHdqU5NgKQN9qXRVWiaBwz0HF7IL
GNBVrSffHCUQpwom0n9jcPc13015igDR9W53VCGDeVFzk3IaCDxqWdbpUszg
Otfih9ImAvotEY+P6xz+L9eysZnAyuYi9TudKzLXtH1oJVDfNPVPeQmDFacP
zo/uJEDd7PzCIRlEat7W+/cRiL0S7/QVzYB9bvJY+HMCZy6XukforIhj70gb
JNBb98S7Sefxz4vZtS8JrKv1CUxhGBwz3xZqNUrA9aJh5PBpBrzBXY4+7wmI
avxiA0sZqCoTp7eMESivThSd19nS80T58QkC5gpN2s4zDO6wmHTFJIFNVcaZ
jTrHKhXrlZ8JFFxYnWtexsDg+A3rF1ME7lWmSpN1vhSqnJieJsCqrJapdP4P
T1lEdA==
        "]]},
      Annotation[#, "Charting`Private`Tag$41911#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 2], 0.5], 1, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwVz2s0lAkAxvGJ2pES0siyRAxyySXDqzAP3YtstotbitzKkjqFZpZcGiqX
xbQV78z7NrspNZxuIh0ii8YptpVqZ0Oa2MJuDRUrZXb2w3P+5/fxsYg6EBSj
wWAwAtT7v6PHeTkMhpLbEm3QZX+URLSN7W/WZkpuidKqO1vt/o4nxgFeSu4d
4/IncrUfLXC5UZam5C7ZdPXPPB6JmnOvB1zHlFxnlqDvFZ/ED1XbfGIUY9zE
8P42MoOETs/yqY7W99ztV9dbzDtOwsnyVZLw5CS3N/ajxpsiEgzN+pzDt1Tc
dAczTuJFEhearrWESjXhoVEzO6SBxPOGG2+745l43pH+VefvJOShCU6HUueh
jKP4mTlMQn99Yew96OJZnvty6QwJrRFXOVmtj/QIIsLAUAR9vdoev+sGyGXX
MjQdRfDoS3zgW8pCe8LE2C4/EZo/Zfr3kIsRM+/YYn6ICHFNMtnd7K/h31h8
b/YBEc7tvWTM2mOCeoF0o9FxERyCX07MxJji4UXjitFyEfreB3Zh4xKsPjvc
43hNhKl3843yr5iDzxO8crwvQsf2xptSqQW2GE7r1fWJYKOrFZBGLsUYYzL5
+rgIdcmZ0iLaErO6F/rGzRXjCVvI3FpqheYkKu1HMzHYOY9td5WxMbfh2LKD
HDFWfvvCjSatseGM7mDvZjH6kwU+hQU2CNw3Etu4R4ybniE6bSW2yG6qGNuW
KsbiHffllYJlsFs7zYsqEAMKRknLYTtYtol5n8+LUW4Yr2OdZg+vtm/MN9eJ
kUPty+Psd8DadSzWwodiUF3n2ouSHRH2QHAnXyFGRpJQaXpoObx5TYYl/4rx
d6StUUiUE140Siz0dSi0ZRzROLDCGYMTPom+lhTCJ35JZVY7w3JoQvSPB6X+
RyhWWrnA2if8rY0/hbhle52EFS5wq3Q214ui0LwjjO9r5opqVZAgJYWCa/DI
5UUSV4xWDD09UUAhIWfdM2+TFeg1oEqNJRTyYrU+zRKugOL1QPCqWxQaTCNV
I4vcEDAns3LOAwq3Z3I17YrcsPGRQ83WFxQ6b64eKdTnICroQ9DajxRazWPb
C0o5SJlM9LqvTSOnbrvkpbY7/Mcd/DrNaIQt7Y0IK3SHn9Bzf5objU+1Tib2
TA/ob8kdrNxAg685/PCnDA/MreGx9ofTYFl5RrIZBFLle5hdB2mkJO34oH2U
QOBQC1kvoGHiHi2z5hOQexulLcyl0fzloMgvnYBX8+XvEtTWLixcw8sicNov
S8s0jwYlbT09fJJAtrfGvswTNNreuHJk5QQi5vvPWZ9PY9Fe3RRBAwHWAtWV
x8U06u1MN0nuEhiXyJMcSmhEjNuZNTYTqNqtdBGoXZm1rv1DK4Hq4O5b7qU0
Vp1PN4zuJPAO8TVlQhpRfaO1fv0EDo88L9h9hgazYupUxACBLyZH19xWu+p7
5m6egkBkatC03lkaE9NLmTf+IlAnrY9tUfuUcehOi3cELmiHurHLaDgp4uy9
xwho5P8xlK52z+UjquD3BFZyhGeeqm3mWXKpeJLAKmbjx7xyGr8yaH7VFAFN
J4cLA2rHy6oCZdMELmU+2+pJ0phffMdy8AsB9ue7MyVqX98pm1SpCKRLFFdG
1P4Poas2HA==
        "]]},
      Annotation[#, "Charting`Private`Tag$41965#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 3], 0.3333333333333333], 1, 1], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJwVz3s0VAkAx/HBbiM9cJJaFnmLMsbzZsv8UkdSsnU2JqzII488Ut6RPEIx
a4zd6N65lyNhh05U2lqVyjBtaSmOldjMbrVkyyuig53943d+5/Pn1/BI7IFQ
ZRaL5anY//8uJzWbxRrnmXKe28wmkQgxt/jdTH+cF/Pi32SvZBJDj3p1PLeO
89a4j96rUbhrNbepPHmcp9GS78FPIXG97O0r24lxnqFrwIFbqSRO1X/nEiqf
4NlVpm9KSyexqsd67lHbFC/u9NcrFrNIcIz/ihEVzPK4h/cnsgQkWCq3sk/e
WOLV2VWHdVWTuHTv6gNfiQo4ngNa87+SGGhpev8snI2xG97VVd0k+n2jOPFJ
K5B1NlyqMUJCc1dR2H2o48qn/CsvF0mojtr2kw2aELSWUhHaFDQ1mntcG9fg
1cYCOnEzBafB6MfbS9ZixDbzwFtXCq3zmXt7yHVwfXbSQ9uXwtF7MtndrK9w
Zf3OHEkshbLgGp21gbr4KK+flOZQ2MQfnlkM1UOTey+HIikMTnk9xW4D+LE9
tAavUpj7sHL9+Z83YHqYL+3roPDo4J1rEokh8sy9VvOHKJirq3omk0aQWmx1
2TVF4WZcpkTAGGMg5L3R++Vi9JqK2PtLTPCD6rj5MgMxTLOfW3xfboqiWNq+
x0EM52//tGdIM1xw7Biz3CvGUFyuS1GhOXZ0+1yaCRTj2pZDq6RCC0Rm3m1O
TBJjnXdHf23uRvgHLu+OLhQDcpbwwUlL1DCy2okKMS5qh68yS7ZCuH3JCYub
YmTTEXkOkZvArsur7X8sBv20rF0QtxmRxp2SrXIxMmJE43rx1ngw/cF08ycx
xoIs1h86wsFDOwLkShrSjATlWDsb8FLlJreNaPjPVCWxG2xwIkfqx3eiFX2E
3NmEi1CDhpi8PTSObgzmiKq5+DhRlh8WRKPV2y9tu74tXNDb1JFAw5Y/WqdV
aYuDjWVuf5ynEZXt1rdN1w7RA2bHjlXQyAtTnVcS2aH/eHSD6DqNFr2gpVEt
e0wKnRYifqPxy+JZFUuBPVqrhC7tQzQ6r+0YLdJ0QKNSiVv3NI22DWHthSUO
qHpdnhKnxiD75sHKYTVHDAqsHl/QZ+Bn9DLAr8gRcby6yWh7BvPNHF0rthNO
F/QFd7ozSFMZefJjhhMmWf4+D/0ZrDXZEmTKIqC1bllkeDyDxBjvabUUAs1C
w6yyswx0HUNkZmkElujhykmFWxeOU67pBG7kptzfm8dArahoZ+oZAu37uSyl
fAa0pK10pICA3pdtaREFDKT/2DrILhLoGhREORcy0ApWT8xtIVCXmWX9Usjg
lqWeR+VdAvuMEnY7ljAImLTUv9NKINRmR0ixwrVn3Nqn2wjs+SK+fKeIwTcV
6dohnQR+kugpN5QyODL4rtl1iEDggvRJ+gUG7Oq5cwGvCGR0nnrdp3D9Mfbh
VDmB4ucai9wyBjOfjdhNbwjMTnVZv1H4nI6vj+EHAlGXrwv2XWTAkR+12jZB
oM+Nf7lW4Z66hCX+FIHPSi/uKJMM9LcIa4pnFb3OyWPNCj9kMWn1cwQqJkpV
NCkG4bJ6L9lnAkKHYp0ohVcW3zb+e4GAjXEkV6pwo49sdmmJgE6fkbuBmMF/
XTo+Lw==
        "]]},
      Annotation[#, "Charting`Private`Tag$42019#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 4], 0.25], 1, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwVz3s0VAkABvDZVBwlRl6ZyPvZNswkl9J86bGbx+olMpJHExLJehSbaKg8
C6tDd+692bKK6ZRH00MPadSoTWl1ZENSetDJSKtwZGf/+M53fv9853zm4Xs3
iWawWCxfVf7voaxUMYulFLjXlaS7Z5DYaWv32MZUKWhgF709rHJv6zNj3xVK
AX/UedtDlZ/Mc64r368U+Bv6hgRnkmgoe9fHG1EK2Br73qUfJvGbdMtKUf+I
IGuobqQli4RWx5LxVvmoILR5u0KYQ4Jr+TquJOer4GPMseLKYhIstWvixMvT
gpn29yO9qkicvX2pOahGDexqDzWLRhIvbtR9ehqlDq+F3hbzHpPoCorhJqTM
Af/iIYHZAAn2TwW77kAbhpd7nhlNkNAY5HWRF9gw8r+u5ciWgK0j6/CsnQ9P
eW8Wx04C157Yh6uK9XEgYDxP5iFB00SGTwdpiA3npmw3+ksQeVuhuHV4AQwS
9rkdiJGgLKLKWD+UA1ndtzdrMiVYHPhq7LvIBJwAXcexMgl6Rv3asH4RTh4v
Fc2/KMH48FyjvGozPP325t3M+xK0+t+sr6kxh/B7+3ByrwS22hq++0kLnH4e
YIsvElyJz6gpZCzxNEu7UT6HwjPrEvWNxVao3twWWmZOwVr8t932cmukfDgk
NnSj4L7h5VKGtIGP3ir+lB+F3vjslQX5tvCRdZdyRRTq3bZptRTZIdQ7dmwi
jYLh1vtd57LtkVLpOlO/iAL6WUXNiQ7QkWagvJLCKYMoLZv9jggUheRXN1IQ
09FHXXYvxu71Zwf1n1Cg28ruFcb/iF9eBX/WeEshPa5EaZKwBAPFK4KjJyl8
DLMz2hbOxY73P9e7aNNoSU+asZfvBCMd/0N5VjSCx86kqF9wQtYDybEgglb9
I/rdrZzhSydtrvWmEWkfwS2pdMaOgZd7qFAaTVuFaatMeVgk43YaJ9LgBQ6e
16vgwaCvr295Do0Y8bpODw4f73kVXdMSGkd3aUz8UMLHau9HPgmXaNwwCZse
1FuKFiLC/nwLjavfj6g5FC5F13hjA9VF41H96sECtgs4QzrhycM05Ga77uUX
u0DEUj5wmsVAfMW/4pXmMrzMijS6u4CB0KI7RFiwDBsMRqKTnBhMyLgcR3VX
aIry/tVdxyBN7cNfpemuiIiT3r0qZKBv5RZmzSLgOlvY3Porg+S4rV80DxCo
6kjVf5HLgLNsp8ImjQCtP//o6jwGTVP7JJ4HCWyCYpZUZc2CgjWpmQRM3Coc
DuYzoGvkv3/IIZAhuKxrVsig5T3PRXGKwGRYZVhUEQO9CO3k7BsEYou7rdTK
GFxzMPGquEXA459ra2NVDvnsYHqziYCzV1Jip8rnMtfd+yInEK3LTNaUM1h+
+qDBzkcE2o9H1/qTDMJ7hmSevQT+tCSaamgG6pXjuSF9BGLWdt4xYBhI96jv
SO0n0PZQ1p6p8tikhXrdWwJrGv0WBp5mkGscFGA+TKBh08nts/5gwO2PdPQY
ISC/PdAer3LH+aTpwFECsw2rtnSrbOpWVHXiKwGhsCy7/gyDuywmTTpO4Kas
g7/oLIMohdRPMUng03NSmavy3BPXLd9MqfYmRxvHVK4NUHydniawJOh1aXgl
g/8AqhA5JA==
        "]]},
      Annotation[#, "Charting`Private`Tag$42073#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 5], 0.2], 1, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwV0Hs0VAkABvDB2pEdpMhEVMMMKSYjubSaL3W0tUlPibwjhemlEmUx2TaM
E9o87p17V1iJjh4bJZUKjQ05lhORyrYSG+NRQrGzf3znO78/v29x0MFtIeos
Fstdlf974EyMlMVSiudvHJgySSCx19LqmcBMKaY0uxIDVe6ubzN2/14pHljd
ZVSkcrOu3Y2caKU4xnY4XJRI4o/sd69Fw0pxZUTF3Q1SEqdKd6wO6RkW51/U
GYtJIqHTajtRXzMq/uw1lPvuHAmh+d+SzHPj4vzDDX59GSRYGnekUbdmxN+0
u4YbFpEoeHDtkXeJBgoHPdoLK0l0Vt0YbAlj44Gavii8iUSHd7jwyInvYNtC
d0nektBfLwt9CD1c1OseiZwgodUv6iCv6sOZiwVZsynozy5vdb0+FwZX5mgW
W1JwfBn5dE2GIZYkPf12vwuF6sn4Ta2kETxbhMG2Oynse6BQ3E+cD97QAt24
cArZwUXGhgEmcOc4mEkSKCzzevNpOsQUnZKsDa45FF6OejRhw0IcEVQdjSmj
MDHE4aZcWYS2QT31xCcU6nfeu1lSshi9uvYv1F5RsNTTco8meXhoN1LbPEah
4lB8SRpjjlGnzc+3c+Ro42eyt2ZYoP2zJRby5OBL/7LyzeHjqol5ZZqTHM5b
Xq1gSAH8g1uW+W+Ro/tQ0mpZqiVmmUacORkix02n3Tq16VZgP3aMsjwlh5Hn
k47LSUvg+0FjnkW6HOhhpT+KskaB0rg7uVCO3HlhOoLopUjhW709dVcOKb3/
rMOBZfCtXzfR8EwOuim7Lu2QDVLHjDsL/5EjTpKpND1iC1eN0B3Dk3L8G2jF
3R0kBKHp4lumS6M27pj6QfvlIErINV/Maez5lH+CfXU5uFlRLfWOtGof0eNs
YYfNBzjj/B9p7FsSLMwstEOTYA69MIBGtadP7BozEfoX8eqvHaUh8uovNsgT
YY7EIHLwFxrhUrfnLib2sIuPHmuhaJwN1ZpUy7SH96WPGfuv0agyDZzpN1iB
3z2r0v+spXF7+mcN6zSVtbVGejtoNN5c2y/Td4C595u1fUM0ahaF1qVmOOAn
TqVbjSYDacXOvDfaK/Hi0lyfCGMGPrwuPx/ZSmxtbO4U2DGYLBeaLGU7wtnM
+ofbbgxiNd43/BrnCO6tVVznPQwMLZwC+SwCNRUPv1WPYnBc4jmmfZKAcJvh
h6JkBiYr9yoEsQQswoxMdVMYVH89TLmeJlDUVOAZpbK2TLYuJoGAzEHSi1QG
dEnNhffnCKyYnnvyhYxBbZ/IQZFLILL8YKReOgODYL3jSVUEtAKkl+OzGNyx
Nt2Yd58A06w7u09lvxFrs3vVBPJzkhM8shlcTnCrG6sh4NXon2iWw2DVb6fn
7W0kUNzdPlWVyyDo5UC5azeBTZvqmqfkDNiFE8l+rwn0tjW3B9MMSiPY/jE9
BJbPmu5/qvKnKR77Ri+B+V8abCiGQbKx967FQwSsPl6wccljIOzZt9RlmEBQ
GedsocqtxcdmvEYJPLap7te5xMDMKb3o/DgBN7V3zd0qP2YxsaUTBPhkwPb1
+QzCFKUeiinVP4m812Uqc85Xmr/9SuBJh/AEt4DB9V2K8ZkZ1Z5HKdwElf8D
Dzk0PA==
        "]]},
      Annotation[#, "Charting`Private`Tag$42127#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 6], 0.16666666666666666`], 1, 1], AbsoluteThickness[1.6],
        Opacity[1.], LineBox[CompressedData["
1:eJwVz3lYjAkcB/BRy7StpEdha4vpljRM0/TmaL7FWlfORNqii1Ya6SlSioyQ
TNuh3eqded/SOTtZKroUYWRybRQZR5sKW1jD2M5H7euP3/N9Pn99vz9O0N6N
oTosFsuLua/59licmMXSCDUnC5znHCMRYmf/l62FRui74jdhAOPOlkemXos1
Qpfi9P1ZjFunLKjMjdUI6131Q8cYX8x508X7qBF6tAGPk0kcKvd2D+3+KHzg
fPCB5AQJg3an4RalVmhfq4w0SyXBteoRZaUMCte2HQqXZ5Jg6daJoy+NC0fO
9IZ0FJEounrh+jaFLl5z+moLa0g8a6j892EYG63eUYLgOyTU28K5UQe+wyTv
ui39L0kY/STZeQ2G6LugVZ4fJKHXz1OT54xAbuhqeWgohdHU6nbPimmwVK8f
fWInheuLiDsemSYwZBfFhLhL0TRyZE07OQOVzm9uP/WRYtdVlerK0e+Rtzog
QRYhRU5wqanJDjNYcWZV3xFL4bj15cBYqDns8j57K0gpXmjX3cfKWQhUGiga
K6QY/jB5ZuofsyHqjWwXtUjRsrmxSqHg4McBu7KYLinsDPW8YklLvD+60a3x
PylqIo8o0mgr5D6ctih/sgyPbLLYGzKtYXK3yqadI4ONuM3eP9cG4anf8ssI
GRau/5tPk7a4Xpnd82mtDJ2Rye6S03bYsVrdWhYsQ5Wbr8HNDHskaqc+14+T
YYbPLXVZ8hysKrEo7EmTAd2sjOvRDmjbfVh3VaEMedPDDGxj5+Jiyv2EoDoZ
xNQvJ1x2O0KwMnto6J4M1P2c5rTIeShYJt8k7JUhUZSlMY9yAmfSMQ+jERne
BdrP9A3i4vImIy//KRRuJsbo7HWej5Mrtpevsabw80DhAfa5+Th69d03FwiK
+Y/oXmi9AMm05HDWGgq75gRzs4oXgKdV8/WCKDT5+MV7WPAwtnue2bsYCryt
/XLjAh7CVtg2+KRSCBcv71hi5oxW1TMBn6ZwYqfeyIQsZ4QlbryWUUmhwTxw
vN+YD4uBoKr4WxRqx47rOqTx4Xjj8fmBpxTuVS3tlxi5YLTq7IwfNBSUs3c2
n850Qee+de91J9IQ12wueKkvQImyVKd5Jg0/y+cBfhIBinx1zpQ60Rip5prN
ZbsiSnTavWYpjXjdvrvZia54FSh3mu9Lw8TaLdCGRWBieVFc7T4a+0U+n/UP
EhiKHQq0OEXDTBCiso0nEBG5XfAr46Yv+6SeCQRMM4q5rFQa+hLJsrgkAtl7
gjO6GVMK5Zm+FALqSzUmcgmNm//wXFR5BJw8izyXZNAwDjbcn9xAwPfAOTdx
Do06B/NVBVcI8KJTtEOMAz45WDQ2EZhQYdwhyqVRlrS8+bOSwMkktZlfHo1F
+QnTQ+4R6Fh8PN9FSiPoxdtqz04C85Kn1H+iabCLh08FdBEYiX3FCc+nUb6H
vT2um+mvGb7Uw3hg1JJd+ZpAg2VS8KMCGqdMt23hfCAQ33P2SX0hDW73rrlL
PhK4nT9Swi+i0S6PGd+qJTApuuvsn4wt3DJK0wcJ+NewrAuLadxg0fHlwwTS
fk+Xm5fQCFOVr1ONErgc4eufw3hyer1V7xdmP/+4cFopjYotqsHxcQKOEzzX
pzH+H3JwQB8=
        "]]},
      Annotation[#, "Charting`Private`Tag$42181#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 7], 0.14285714285714285`], 1, 1], AbsoluteThickness[1.6],
        Opacity[1.], LineBox[CompressedData["
1:eJwV0Hs01PkbB/CRbUcSKTRL7uSaO31RPk/WsrVd9+QeCsklipNYNKtmKTSa
Ievynfl+x6qlRrWkVBQJjf2l+hXt2lDGdlE2xm0awn72j895zuuc55z38/4Y
Rx7+/sASBoMRj99/88NPGRwGYxzVBSXbbT9NQrSF5eN1BuPo8L067zDswa5e
3e0bx5EO82F/IvYTdcf68vRxxFVTFfGwG8revnKSjaOKVpvd/djrPUtsgzVk
yMuj8eQ49q8D3uk/rpeh5kJj16V5JJSZUBoP42SIO2Sg64CdVbvH64BUhuSj
tc8KsKd3LMkvYEygs0fXzlVhJ8mu9tYZTKAuJo9qxt7ntjxxIWQCxYQYBo5h
+7TeI0ufTaDluV7skHwSVvTYKbraJ9GBPJaxXwEJucf6fcalk0iJp90Wg834
Kp+nozSF9FJaenOxJ8JeW0RtmkKvh3u+l2A/f0sGfL4+hfyHvM7tOkMCNafS
YFc9jQwDIxpTuSTYmw4nFefJUQl016nzSLiS4TbpfUmOzDZaRSFsu6d5aRO/
y9HBrdO5R7BtTzhk71b7hEzlPqY92NYvj/M1zn5CLd/cFIj4JJiRrIaCcwok
fFzxxY5iElirdyg49BwiR/T9Z34moTS+8rhz6xwSv/2o71JKgk7blNLwqzkU
p3r2mxRs7WRS1dvkM+LdGrsyhr3q8Ts9xoXPyMF/w18fy0hQK+B4ZV2aR9uW
92stVOD+yrc4R68vok+SWL+9NAmy8y2nFM8WUY+5bKkIW+rbWcCeWEQdustU
/saO7BjZ0r6GAWPT0HtIhP97mXz3oz0MuNkdcPpEJQnL+JqR0kcMWPu6bOZG
FQlFIt+TqveV4I7OA+edNSScb/mtLUSsDIOvrx02qifhRXP9x6exTPh4Mtlr
8wMS+kIS7FPSloN/2D9jsy9J0PTjxtwDDbg8v7FqSE6CynunPvKyJnx52bdj
XlMAmitv9HjXrYY65YtzETYC2DCQ+L/NRdoQbpIwUuItgNbZ7G095BrIePk8
zjBUAAdbJJK7J7+CgkYrXkKyAMqiqnW19+nBn/krU+/lCsA2aGhm4YA+FNV8
uyVBKICByZ2PYIshpG1bu8ejXgCKMTVWwSUj8LM+X10oEUCX/51rYrExhNl9
IKIGBWChobI9nTQBNtUQ0TkhgMYj2eJC2hSUI1wDlZcJode8mLm7yAz62BaW
k/pCMOc8swwrN4e7LvOjgy5C8Nj10oUm18HXxuFM6jshDB7J8eKesYCl8SEB
KvuFcM09eEUH3xLuRBe9iEsXwpqAB301OVZQVY6y9xQKAaQMfttRa4it4Vx8
WiWECp3YFevSbcBWw3alepMQOFTcKdd4Wwi6+TCE/0QI1KOyzsIj64G99UkJ
+VYI7KTicf0UO3gn1q0amBfC6H5LVnCkPbRX/hyMVlHQwU5dctjZAf64NFz6
xoKCvTNVaczLDlBAbdx21ZPC/Qiph5kjsKXp1+t3UHDQKsq++IIjRG9XnJ2O
pKA1IDRzs4ETOP9yPbg8lQKnoPcXtSqdQD3Qo+98HgUJHN8/Nuk5wwoJXz9E
QMGpGJVZpWJnuM3T/af3CgXN+vsX32u5QJbCQ8f9PgU3F3KVrQtdIJ4fWNn0
nILua1+/52q6QntbTytvlIJ2o5jOM0WusNbMwerpEho4jf6VQ6pu0Jr4ZdNe
Fg2hJv3hoVw3YIU6TeY40DB7w17PhrkBfAqvuon9aMhUHnlYwt4Av7GFiYJw
GrTN3PebMwgo66/L3JRGw7GkgCnVHwjYFVbr6MmlQc8tWrIuk4B3Ad1d5dit
88kC7+MEiNawPD9hq3K5PhknCNi3qrS6oZAGStx+biSPgNPfaglteDR0vHNy
lVQQEPurM61ZTINWlMaxnGYCJGKRelMZDbes9bdW3sX71F8Lq8tpCJ+wNrjT
SsDK2erbh7BrTvh2TrUTYMSyKNavoMFTdFwnuhvnv2m5nUXSEDnw4Yb3IAGM
9X0ZDhQNzAuK/PBXBGQn6Y7mYNceYkZkSHG/2CDjF9gzcybM+jc4P+n/vT/R
NOTrhgQaj+H805KgXhEN9tKDNptkBIy7f9FvWUlDz8XUxaBJAogmT8MsbAN3
fjVPju8ZLBo2/oWG+ww6s1aB+8WKo45ix0pqd0rmCODx6yo7sdV4t03/nidA
JdRIyKqioS5QIl9cJCDIMcU/Hvtfo+0flw==
        "]]},
      Annotation[#, "Charting`Private`Tag$42235#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 8], 0.125], 1, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwV0Hk8lfkeB/CDZkh0UOnItWQPkSWeFn7fFNllkiyNGUsSU9GdcG03hCzn
WKfwnPM8RFG2lJSZZN+yVJPqUgwnQ6Q6jvWQzjz3j8/r83r/+fns9Lvww2lR
Go0WSuX//fFKVCKNxkMFn+zUU67iEKCt80xLmYcksxSe5lIe7Xm1w+kgD/Vf
lRAtpvx8s9G9gkgeUmn5Ra2Rsl3t6HrTNR5aKo/Y2Ee59XiG3WQdD02a9ce9
pVyXPzVmPMdD9ofTZL9S3n3gN31P+hy6djhjt3QqDrdGrCL/u3sO8WalXylT
zlcj6H1n59DVd71thynHVLpZnubOoVL5Rak8yovOomnpND4Slbkfdpvy+bma
V7XKfPQlPOJUE+WfzTad++bFR+bGfi2zlI80t+DXX/IR9uT7eqc0HKQHDQQ9
7fMoJeVuvXY6Dsnh747wuPNIe+2QvjVlmkJalrzIAqqcOankT5n/49/a/hYL
6Ma7KxeKKL+ewt2/PlhAU3T9VtUMHIg1iTqDskV0VOtZnjkTh+1EvdCtYxEp
ffGJOEU5CwIcot8vIpmahN54yglJTdwulSWkcEyps59yID1c1jd/CbFMx+aD
WTgYqr8/n5u6jOYMQ6oaMnGojjKbt7qzjGy8F7dMUzb4MzWC/3QZORhNLDCy
cNCP33PZVWoFJchJqkdR1v0rNpueuYKuF7r/yyobBw2cUZeeJ0AqTMeJqRwc
GFucBYnkGrrjniBIuobD9eDiWJPmNRRZ0vJDG2X51gWR92NryPVRpozIdRy2
heGSVmpfUeolh4exlOWefVCk3fyKPDcxyeh8HKTSEy1j7qyjvqkml9RC6j+x
hsRfHwjRpBpjcYrAYa60KUXwUog6S3lv9UgcuDad6XF8IUpd7doYStmvY9qu
fTsNbiwWYwLKRzYuuw640eCPoYDXm4tx2Jgt68cdoMFPK3XVNiU45BTZJEi2
iYAhujHwdxkOpU13W70qxGADL1GxtxaHt4/vff4zSBwO1sRcUenCYcgrxPBi
xCaYKslKkRnDQfYoM7AF6OBh7FyktIKDxIzxEF4lC9XjbUYucmyQlakftKrd
Asy0Wfl7emwwHznXeyhnG2zKHaoasmJD8+plx0F8O6y8cCq09WbDmabu7icJ
CqCzZrkUHsaGfP+yHdt+VgTr+YFHNcls0PcYX/p2WglWiaZgSw4bRuZdBsBO
BSJ6p93Xatkg+CLFSL+jCjLsoBfW3WzoOdF4v6JiJ8QOFWgqjrJBmy7hFImr
QWRgxq0UPhsehl6uYJHq0GXLCn0twYFXmrnirjkaEG1f+vKtEgc0E1/q/Fig
CdylGJ9xUw7sP/aXKYlrQdmEK6PBgQOjoUmWzAxtqNwlb2Duy4H7+zylO7J1
wNxt4lh5JAe2u3cNlSftgtLj8cmFLA4Al5bd+qsuPDQY7GCUcqBQPkhaK1IP
pDQ+0R3/4EAicTZlb7A+/Fvh4kjzcw4QA/mdrNDdYFzbnPFgigNx53N5ShcN
IO/mOf7oOgdmfXUYnn6G0CM3qrBLjoCOuEuiF0z2QExyl36DNgGnlkoixKv2
wOjdBa2wAwS1D+Pu1zCC7xw/fgh2JuDMLn/D3JtGYO69zKr0I6DZ3Tv6kLIx
0K/I3vK4RICxx8ztrcXGwLOYFIanEhCSaPPGQtEE3jQvhFqzCUgJlFgVyTWB
1JAKy9FqAh4r+QpntprCRB77mG8bAY++JYvpskxhWPi78vprAvrvH55hyu6F
zZ5Sj7izBLSrBnZm5OyF+CjrJnUxEhIfnigelzQD2+W+FziDBG+1dz7eTDPw
Ur46z95Dwmq9oaKeuDns+xbUwzpKQrTYdN9vceYw7Dnc5uBDwjaNfb6aNAw8
lJ1YPeEkhJ93X5D8Dwb7n31qHMkgQdEsoFsrGoMn7W7RFkwSmtfD2FaxGGzg
ChQ4lCWZzCNR8RgQo40CbxYJREV73nQqBuUux/f/L5OEjg/Ge7sLMXBm1EQ8
zSFhqz89POkxBl4FBpm5+SQ06CrZFz/BoNXj84vPlH34usqNzRh0hhh8tCsg
oTzepnOhHYPq4UZSSPlAUax8QD8GgUVT35/FSfAb+VhvNYqBzHeJUSYECeI3
BWk+Yxgk2KgK0ilX/iL+UxQXA0l3W9sJyktrauL3JjFYMa5yzyNJSNvhdXLn
F2q/6LgOv4gEQ+4ZPYs5DIarP6vaFZMwePuS0GMeg60bTk+SlJX3ZZdlLWOw
RPLfON4goY1GRlcKMCg6cVCshHJQd6VL9xoGaZnHV1coS2X9rj6xjkFG+PPH
ziUk1J7sXhYKMfjQYW9fSvkfw+1itA==
        "]]},
      Annotation[#, "Charting`Private`Tag$42289#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 9], 0.1111111111111111], 1, 1], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJwVz3s01GkYB/Ap2UFZKaIsW7lGuYyILn7fVCQRm6SSlkKJUnLfHJlKZNwT
fjO/HyEV2aTL2lRiiLbUKa2ulG6MPRkUhmX23T/e857PeZ7n+7zvgoCDvwRO
5XA428j5/+47HsfncKSUYhWt55hMY4+xyWMjPSnFb/AdDyfubH0+z22llOr5
6vmCJX7yo9XVghgp1em358wE8bX8L+94A1KK539+Se0pGr9VejkEdg9QnzSz
d1ql0lBtN5e1iocoSclk2SIBDQv9DwdyUkYoEwX+da8cGlVxtkOOl0aosdC5
KmnE5k9TogcfjFD3DxskNRIvPmaZ6DljlDJ6vbiTl0vDtOtollrGKFWkLPaY
fYaGAa197XSujPo3lHfodR4N7dnuMj47TnV1U12phTQ4CrX8I9flFN8lxOHI
ORoDpXeTZc/klMPZ8Q1Xibudmk8nDMqpsxvL+FLigKZeF7EWB5/GMmLDSmis
VR7xbPPiIKa2LnZfKQ3lLPWA7jYOVn0Yf7HvPI3sIqcklcYp6FLy8E27RKP0
7pWG7RUKOKmU0+BTQ+N13dWvT/dyIa60PJ/eTOPl9v0Wh6Ono+yw5HjPWxrq
zoKge1BDoFTDN/g7DSUJ7yV9WR2VhdWaEjUh1GfeaHesng374LlCylSIZW/D
/lqdrYmMKtcTqY5C1I8lbmyntXBRcccNM18hgu+2tNxJmouB0Y15thFC5O8u
n6f5qw6+VXg7Sk4Jsdjn/fBkoC4aqzL6U1gh3g5taoPLz/BJnrZ5oEYIWf8M
7dOX5iPK/+THlFYhWrfcrqmoWICZSrmhCZ1CGKspucXQCyHLC1GdOSjEzfDE
inRWHx2P181K44rw3DCH65ltgNVhblFTfhLBkP/MZGeBIazLg/xqeSIs9+ha
ytJGiAmu7hK6iNAZfsJBkGaMH5yCFh7aJUKN/TbVpiwTXHR9dTspWgQt7/sv
L5xYhJWx0i/W6SKgm5PVcMQU03uqG+JKRSics1fVKMYM94c7bsXUicBn9iXb
hCzGKL/PPempCExbfnN6+BK092s5tfeKkHAgR6p72BxV9eVhihwG//ibaG8L
sEBcmVOBkgaDpoTIqQetLeH1wKF/0oSB73BJNPeyJcRfyuQDKxjyP7vu5QZW
WNsuT53lziB40W6LnDIrmDxJbwv3Z1DvvSN+tR4Po8XGpRERDHg+kosaxTw8
qfTwWZLMYD/fqWOVjjWurJv+SqGQQXKQ0tiUHGuMpuz2Vr3MoE7XXy7RWIrM
Dz3hkQ0M/pg8qWCavhTha/YfMutg8KhmjUSgbgPLvC/bPL4yEM8Pak7LtkGR
g/8PJxVZ8G9uKX6vYov6tZHTvHRY7Fj4xm+HwBbz/37z4CGPxdgNCx0z7jKA
+Wjjvp5FvELvwzMJy1Av63MZ8WWhaWDvb8ixA0d9pYtrBIuoA97fVGLtkPgu
U2FWCgsd2z0tRvGk/sToczRx/cQhoeNRYvEtTiexikCwNu4YsUPY+0upLJgK
cW5vCvF38xDnNBZNPTyblkKSp+gckpbBQmO3WtSJOjvU2xvou+WxqDXV3VB8
hzje9fMtYr9BU73b9WT+jvJUs7MsLhxzav4mJhZMOKvks1hRdHTOnkckL8HK
4lEBi4C3fTccO0lddC8hUMSCWyZL9XtnB2zO2/mKuDKUuyuum3ho9MImhsXw
+ELu1c9kX3hj6gqWReq87VsX9JO8b6eKtItZWHQHm60aIHkFz5WziNsvRsp9
hkj/ld8lyudY6NlnlWeOkH5ug/YEcSOHja+Ukf71b/ZGl7DY21K5qWWc2HK9
7SDxjMw/9T9OkHn50aSwUhbVW1tG5HLyHkWZey/xf0FGm30=
        "]]},
      Annotation[#, "Charting`Private`Tag$42343#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {Hue[
        NCache[
         Rational[1, 10], 0.1], 1, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwd03k41N8eB/CvmTRStqzl5lqjUZaJkhvfT5J+ktImW9ZK6UdaSNxEM/RD
9krjzMw3SxEKjbQJlbVCQvenkIYSda0TUXGP+8d5zvN6nvN8nvf5fM7R8j2+
+xCNIIh4vOb3r5xwNkGMkpvCurOHYhAc1DdoWakxSmZsLon3jEXQ09ix3HHj
KHnFMoTRiv1a1vQuN2yUZEpotZVeRFB2baCXNTZKtnb3r/eLQ/Dvor3Wh0Rj
JF/sYR13CcH3HbT4BGKcLLcYzvmCHTRW3FGqMU4KP1gO2CUi8F63OHDWbZx0
TxtRJZIQ2FY/RRlt4yRtePXVQ8kIZNqNphtrJkhR4OJLRBqC2NAu21HRBNk4
xSrfiU0si09RkRCTXiMPfvOxxw980vezEpPP3/Im1qcjeDuAnH/dE5NR+pq9
PpcRCH5KlRnlfSetFYJepVxFYKzTF5QeN0VK+Mh0nchEcCd83YRNwRR5zqJc
pgTb6E3cmfEXU2TqlQN3/ou9OtokateSH+SVzsxt/ggB88O5VLnkH6T28yM7
9vIQ6CK1soTL0+RCuqqvmgCBmuKOaTb1k5R/yek7kIXz0h+yT9+bI7vto80D
8xCM5VZdnG6bIwtlP6plYovs6hIix+fIP3SQVD22b+2gfY0qAVXHdi7Vysf9
WTS1q3kvAX5dKuMd2ItSFXxFzQRQ9XUjmwsQpF23uyD9XAK+ptgHWdxGED9m
v8DxjQTkbnSRP4rNtnGMTf4oAboOzr1c7NP9e+KVCBr0B+6S+YXtbOCTpmFF
g2T7tyXP7iBQL4nIZt2nQesudpVrCYLcqpJnboV0mJWv8RAKEXDrvXOcHtGh
LfKvsUHspBZ5jl0jHVK3SNVqliEI+xC8hTVAh4Pi2lXJ2A5zJg2LdBbA2gMc
cdA9PC/r0qYHmQtAefJCp+V9BFBZ+rdKvCTkv/31RPIxAvM6n4dLuJIQdGrq
iS02s1khk5YvCTVl5Qs42Eo9J9yHayWB2zV9mF6BYOC3aU+txEKY+BQQLfkE
57G623f67EIILPmooVqF4H3F3eE3RxjA+XDVMPg5gt3UvWMyZxlAmnhsqMR+
Ef3gy9Y4BmQVz2YuqUHwyK5SVHGLAXs4Qa4F2JmvG9/eHGLAex1UNViLwK2/
tzL8TykYCTkvH9aA4N1iuWTt4EVwPudZQGsTgk63Y8YnzyyGUpmJx/6dCBS2
Jh5+CnJQSIQEZI8hkBpidaLbChDirapoI8sDBfnydptSRVBvclwzx+TB+u7A
l5vSlEHndV/WP7bwoHomans7UoVaxYVbm7x44F/V0FB5YRlIzNCl3oXy4Jpf
3nJlb3VIqb+5pjqBB6tdPk7OHloBakotlv3XedA9sbMZ7P8JMQOtD4uFPJge
WaKWUKAJ4doeJnfqedC474mwsFALAm+9EMa854G+nJRjGNIGI5l215xhHtwP
jipMonTg2Pd9rD0L+NChl87YlaYLZ1R9i5OW8UGP3WZwgKsH5/YklKea8sHS
6YMZhVaCSNevZdieDz3BMdaJl/SBWbDwwlIfPgg3uMrUphpA4Ysbt6zC+aDq
XN+ZH7MKhqU7vkek8gFEROqz00wwldkTXJPHh0yVIzIrwwzh11llY8MqPrAF
Ry+aB6yGAnWv48btfBA0X6tLCl4D/eC+XWmID5FB6aMrThpBdWtiftMsH775
GKi5+hqD0lyiRLaCAGojQ2jH15qAZl9T7jM9AXhM5pxh3DYBp7T0DraFAN/P
QmSpawqjb5adkncQgP8qP+P0G6bgPeP6M9ZLANXO7hGbNFigySn+8fukAFgu
Q7eUslhANKTlhfwlgGNsu/9Yqa8FcPrOfMQTwMXDUjMS6dgztLW5JQKoWOEz
N6RkBtXTwZLqdQJ4MBtLZyaZARy3iPvUKYAm4eahRAVzIIKc2MtGBFCjebju
Upo5RC0tejFAp4B9f1/WR+l1QDR9cX6oSoG7dpeneyI2p9rAwYiCmXJjdUPG
eiA0HDPEthRE0AdfXYnELiot6PegQFl3g48eYQFEu9Ip9TAKrLkxU1I07ILF
Y1HYR2TfJH6jYw8f9fyMXfEj4JGQMe8JeulZCnybeIo2cticGp8tERTcCSXq
PDWwPXejo5EU2DXWM69txLZ4TeNyKAi2VnoaYY0ttTllBpsr9N7vBdiTZt/c
Yyj4xp9mr7TFds6V1oilIO2kYXeZAzb+iNRFCnrUk5Nb3bDVbnRmxFMQGuQs
lj77//OfnFIoUF93sGFlBPZysUiIXf37BM/mHPY2/SMqqRRIJybahkdjB1wn
3mELCmsuD8Zhh1vouadTUPuFZd6QiZ2pJ7H5KgUBJbCon4cdenUHH1s2bEf3
nABb129mEtuFERCzPgf772Kf/AycXy+r42YhdlL7CjqXAiU/udCYCuyinPwr
iIKHzBXbsiqxPXJC+7E9x5kaT6rn602dYPEoyI+2qxPXYO+17nuJ/a/r51QO
NmG7dDmJ+RT0+icMnW+Zr+/A3CiggGPMrUSt2NmnldnYzZVlh9s6sMvPL5Wl
8Hy6v5bb9GCbuYLadQoYN6bjPXuxe0vBBbvoT4ZXuAjbYMwsA3vypzbj7mfs
nrhBhSwK4pe77dcawd7epziDbSzyN7Qam+9HkK1pNgXtt0LmXCawX5X94Y+t
sSE1L2UKe+ONxy3Yzwkqomga+3OzFi0Hv6eGop0NP7FZwm1rsZekPNLp/429
+oepH3bp/oapuTnsLsu2VOz/AcKY954=
        "]]},
      Annotation[#, "Charting`Private`Tag$42397#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 1746.8705555555593`},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  Method->{
   "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "DefaultPlotStyle" -> {
      Directive[
       RGBColor[0.368417, 0.506779, 0.709798], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.880722, 0.611041, 0.142051], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.560181, 0.691569, 0.194885], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.922526, 0.385626, 0.209179], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.528488, 0.470624, 0.701351], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.772079, 0.431554, 0.102387], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.363898, 0.618501, 0.782349], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[1, 0.75, 0], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.647624, 0.37816, 0.614037], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.571589, 0.586483, 0.], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.915, 0.3325, 0.2125], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.736782672705901, 0.358, 0.5030266573755369], 
       AbsoluteThickness[1.6]], 
      Directive[
       RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], 
       AbsoluteThickness[1.6]]}, "DomainPadding" -> Scaled[0.02], 
    "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], 
    "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        Identity[
         Part[#, 1]], 
        Identity[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        Identity[
         Part[#, 1]], 
        Identity[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 25.}, {1746.8705555555593`, 2024.83}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.9776628792944784`*^9, 3.9776629374390945`*^9, {3.977662970532909*^9, 
   3.9776630322895703`*^9}, 3.97766306740362*^9},
 CellLabel->
  "Out[205]=",ExpressionUUID->"0b87c94c-2d8e-4c3c-8327-5dbe4dcb4763"]
}, Open  ]]
},
WindowSize->{960., 478.75},
WindowMargins->{{-4.5, Automatic}, {Automatic, -4.5}},
Magnification:>1.25 Inherited,
FrontEndVersion->"13.2 for Microsoft Windows (64-bit) (January 30, 2023)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"5af55323-f83d-49c6-8139-82bd971457e7"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 7821, 199, 440, "Input",ExpressionUUID->"8bcf0580-bf39-4d28-a4a3-e1b27c82ebce"],
Cell[CellGroupData[{
Cell[8426, 225, 740, 18, 27, "Print",ExpressionUUID->"67ada5b9-53eb-49b2-a578-7f2708087c0b"],
Cell[9169, 245, 737, 18, 27, "Print",ExpressionUUID->"61e7ae33-80d7-4fc2-9e95-fc7f946e1584"],
Cell[9909, 265, 735, 18, 27, "Print",ExpressionUUID->"04335105-5566-4526-ad5c-8f9db2b5621a"],
Cell[10647, 285, 738, 18, 27, "Print",ExpressionUUID->"f09f9b06-5cff-4726-b7f4-e23031b32917"],
Cell[11388, 305, 738, 18, 27, "Print",ExpressionUUID->"9ad253b6-cda5-4038-a420-45e912a0c887"],
Cell[12129, 325, 735, 18, 27, "Print",ExpressionUUID->"8df13717-bb0a-4e87-8f16-6a68f24700a9"],
Cell[12867, 345, 740, 18, 27, "Print",ExpressionUUID->"2772c7c5-8976-4a84-aab3-4eb8e001081b"],
Cell[13610, 365, 735, 18, 27, "Print",ExpressionUUID->"03cb6d02-2bdf-4bf4-9bf0-49bb01194b21"],
Cell[14348, 385, 740, 18, 27, "Print",ExpressionUUID->"c72deb53-144e-4495-884a-87f049f4eab1"],
Cell[15091, 405, 742, 18, 27, "Print",ExpressionUUID->"2b3b7223-b817-45d3-8148-88112be65039"]
}, Open  ]],
Cell[15848, 426, 25327, 488, 289, "Output",ExpressionUUID->"0b87c94c-2d8e-4c3c-8327-5dbe4dcb4763"]
}, Open  ]]
}
]
*)