angular1.nb

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

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

(* CreatedBy='Mathematica 13.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     55270,       1122]
NotebookOptionsPosition[     53569,       1092]
NotebookOutlinePosition[     53967,       1108]
CellTagsIndexPosition[     53924,       1105]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[{
 RowBox[{
  RowBox[{"p", "=", "197.327"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"m", "=", "939"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"r0", "=", "3"}], ";"}]}], "Input",
 CellChangeTimes->{3.8720797481851053`*^9},
 CellLabel->
  "In[139]:=",ExpressionUUID->"9b612f72-e759-4179-a3e9-4083b56adea2"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"j1", "[", "r_", "]"}], ":=", 
   RowBox[{
    FractionBox[
     RowBox[{"Sin", "[", "r", "]"}], "r"], "-", 
    RowBox[{"Cos", "[", "r", "]"}]}]}], ";"}]], "Input",
 CellLabel->
  "In[142]:=",ExpressionUUID->"8bfffee0-f250-468a-9e67-dc88acaf3f9a"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"y1", "[", "r_", "]"}], ":=", 
   RowBox[{
    RowBox[{"Sin", "[", "r", "]"}], "+", 
    FractionBox[
     RowBox[{"Cos", "[", "r", "]"}], "r"]}]}], ";"}]], "Input",
 CellLabel->
  "In[143]:=",ExpressionUUID->"c0e7613d-88ab-4572-bfef-888bb1ed1cdb"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"f1", "[", 
    RowBox[{"r_", ",", "e_", ",", "U_"}], "]"}], ":=", 
   RowBox[{"j1", "[", 
    RowBox[{
     SqrtBox[
      RowBox[{"2", " ", "m", " ", 
       RowBox[{"(", 
        RowBox[{"e", "-", "U"}], ")"}]}]], " ", 
     FractionBox["r", "p"]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8582651658874583`*^9, 3.8582651752248135`*^9}, {
  3.8582652728894043`*^9, 3.85826527302544*^9}},
 CellLabel->
  "In[144]:=",ExpressionUUID->"6da24be6-ac46-4de7-9bb3-1f6846511011"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"F1", "[", 
    RowBox[{"r_", ",", "e_"}], "]"}], ":=", 
   RowBox[{"j1", "[", 
    RowBox[{
     SqrtBox[
      RowBox[{"2", " ", "m", " ", "e"}]], " ", 
     FractionBox["r", "p"]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.858265178521638*^9, 3.858265188744215*^9}, {
  3.8582652690354395`*^9, 3.8582652691664953`*^9}},
 CellLabel->
  "In[145]:=",ExpressionUUID->"9c7cd7d0-b5b1-4b72-a2b0-f700e884ae87"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"G1", "[", 
    RowBox[{"r_", ",", "e_"}], "]"}], ":=", 
   RowBox[{"y1", "[", 
    RowBox[{
     SqrtBox[
      RowBox[{"2", " ", "m", " ", "e"}]], " ", 
     FractionBox["r", "p"]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8582651963161197`*^9, 3.8582651974834166`*^9}, {
  3.858265265613576*^9, 3.8582652658836465`*^9}},
 CellLabel->
  "In[146]:=",ExpressionUUID->"97e249db-26ee-48c6-b8a1-b9508f82fc1c"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"dj1", "[", "r_", "]"}], ":=", 
   RowBox[{
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"Cos", "[", "r", "]"}], " ", "r"}], "-", 
      RowBox[{"Sin", "[", "r", "]"}]}], 
     SuperscriptBox["r", "2"]], "+", 
    RowBox[{"Sin", "[", "r", "]"}]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8582581904149857`*^9, 3.858258247080335*^9}},
 CellLabel->
  "In[147]:=",ExpressionUUID->"8408c1a8-76f9-49fb-b53e-31a64980cf4d"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"dy1", "[", "r_", "]"}], ":=", 
   RowBox[{
    RowBox[{"Cos", "[", "r", "]"}], "+", 
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"-", 
        RowBox[{"Sin", "[", "r", "]"}]}], " ", "r"}], " ", "-", 
      RowBox[{"Cos", "[", "r", "]"}]}], 
     SuperscriptBox["r", "2"]]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8582582557662086`*^9, 3.85825828793134*^9}},
 CellLabel->
  "In[148]:=",ExpressionUUID->"db42c17d-3e03-4134-8999-1f429f6c01b6"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"df1", "[", 
    RowBox[{"r_", ",", "e_", ",", "U_"}], "]"}], ":=", 
   RowBox[{
    FractionBox[
     RowBox[{" ", 
      RowBox[{
       RowBox[{
        RowBox[{"Cos", "[", 
         RowBox[{
          SqrtBox[
           RowBox[{"2", " ", "m", " ", 
            RowBox[{"(", 
             RowBox[{"e", "-", "U"}], ")"}]}]], " ", 
          FractionBox["r", "p"]}], "]"}], " ", "r"}], "-", 
       RowBox[{
        FractionBox["1", 
         FractionBox[
          SqrtBox[
           RowBox[{"2", " ", "m", " ", 
            RowBox[{"(", 
             RowBox[{"e", "-", "U"}], ")"}]}]], "p"]], 
        RowBox[{"Sin", "[", 
         RowBox[{
          SqrtBox[
           RowBox[{"2", " ", "m", " ", 
            RowBox[{"(", 
             RowBox[{"e", "-", "U"}], ")"}]}]], " ", 
          FractionBox["r", "p"]}], "]"}]}]}]}], 
     SuperscriptBox["r", "2"]], "+", 
    RowBox[{
     FractionBox[
      SqrtBox[
       RowBox[{"2", " ", "m", " ", 
        RowBox[{"(", 
         RowBox[{"e", "-", "U"}], ")"}]}]], "p"], "  ", 
     RowBox[{"Sin", "[", 
      RowBox[{
       SqrtBox[
        RowBox[{"2", " ", "m", " ", 
         RowBox[{"(", 
          RowBox[{"e", "-", "U"}], ")"}]}]], " ", 
       FractionBox["r", "p"]}], "]"}]}]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8582583291585464`*^9, 3.8582583398734355`*^9}, {
   3.858326819937047*^9, 3.858326829647437*^9}, {3.8583269521159678`*^9, 
   3.8583269865677056`*^9}, {3.8583270243410044`*^9, 3.858327049137292*^9}, 
   3.858327176329319*^9, 3.8583272513658543`*^9, {3.8583272866630983`*^9, 
   3.8583272871080413`*^9}, {3.8583277737684746`*^9, 3.858327790352742*^9}},
 CellLabel->
  "In[149]:=",ExpressionUUID->"034aace0-c4ee-4776-890d-85681f5e916c"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"dF1", "[", 
    RowBox[{"r_", ",", "e_"}], "]"}], ":=", 
   RowBox[{
    FractionBox[
     RowBox[{" ", 
      RowBox[{
       RowBox[{
        RowBox[{"Cos", "[", 
         RowBox[{
          SqrtBox[
           RowBox[{"2", " ", "m", " ", "e"}]], " ", 
          FractionBox["r", "p"]}], "]"}], " ", "r"}], "-", 
       RowBox[{
        FractionBox["1", 
         FractionBox[
          SqrtBox[
           RowBox[{"2", " ", "m", " ", "e"}]], "p"]], 
        RowBox[{"Sin", "[", 
         RowBox[{
          SqrtBox[
           RowBox[{"2", " ", "m", " ", "e"}]], " ", 
          FractionBox["r", "p"]}], "]"}]}]}]}], 
     RowBox[{" ", 
      SuperscriptBox["r", "2"]}]], "+", 
    RowBox[{
     FractionBox[
      SqrtBox[
       RowBox[{"2", " ", "m", " ", "e"}]], "p"], "  ", 
     RowBox[{"Sin", "[", 
      RowBox[{
       SqrtBox[
        RowBox[{"2", " ", "m", "  ", "e"}]], " ", 
       FractionBox["r", "p"]}], "]"}]}]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8582583607857356`*^9, 3.858258364095352*^9}, 
   3.858258727915249*^9, 3.8582652189038057`*^9, 3.858265258428771*^9, {
   3.858326835530024*^9, 3.8583268420127707`*^9}, {3.8583272028634205`*^9, 
   3.8583272830522127`*^9}, {3.8583277999300785`*^9, 3.858327808702016*^9}},
 CellLabel->
  "In[150]:=",ExpressionUUID->"354c6fbb-a6f4-4a89-81cd-72743beabd14"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"dG1", "[", 
    RowBox[{"r_", ",", "e_"}], "]"}], ":=", 
   RowBox[{
    RowBox[{
     FractionBox[
      SqrtBox[
       RowBox[{"2", " ", "m", "  ", "e"}]], "p"], 
     RowBox[{"Cos", "[", 
      RowBox[{
       FractionBox[
        SqrtBox[
         RowBox[{"2", " ", "m", "  ", "e"}]], "p"], "r"}], "]"}]}], "+", 
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"-", 
        RowBox[{"Sin", "[", 
         RowBox[{
          FractionBox[
           SqrtBox[
            RowBox[{"2", " ", "m", "  ", "e"}]], "p"], " ", "r"}], "]"}]}], 
       " ", "r"}], " ", "-", 
      RowBox[{
       FractionBox["1", 
        FractionBox[
         SqrtBox[
          RowBox[{"2", " ", "m", " ", "e"}]], "p"]], 
       RowBox[{"Cos", "[", 
        RowBox[{
         FractionBox[
          SqrtBox[
           RowBox[{"2", " ", "m", "  ", "e"}]], "p"], " ", "r"}], "]"}]}]}], 
     RowBox[{" ", 
      SuperscriptBox["r", "2"]}]]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.858258376602046*^9, 3.8582583802005854`*^9}, 
   3.858326847507786*^9, {3.8583273062034693`*^9, 3.8583273510870943`*^9}, {
   3.8583278207542763`*^9, 3.858327829520852*^9}},
 CellLabel->
  "In[151]:=",ExpressionUUID->"7e046243-a864-46a1-a5a0-7fd7213b4a06"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]", "[", 
    RowBox[{"e_", ",", "U_"}], "]"}], ":=", 
   RowBox[{"ArcTan", "[", 
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"f1", "[", 
        RowBox[{"r0", ",", "e", ",", "U"}], "]"}], " ", 
       RowBox[{"dF1", "[", 
        RowBox[{"r0", ",", "e"}], "]"}]}], "-", 
      RowBox[{
       RowBox[{"df1", "[", 
        RowBox[{"r0", ",", "e", ",", "U"}], "]"}], " ", 
       RowBox[{"F1", "[", 
        RowBox[{"r0", ",", "e"}], "]"}]}]}], 
     RowBox[{
      RowBox[{
       RowBox[{"df1", "[", 
        RowBox[{"r0", ",", "e", ",", "U"}], "]"}], " ", 
       RowBox[{"G1", "[", 
        RowBox[{"r0", ",", "e"}], "]"}]}], "-", 
      RowBox[{
       RowBox[{"dG1", "[", 
        RowBox[{"r0", ",", "e"}], "]"}], " ", 
       RowBox[{"f1", "[", 
        RowBox[{"r0", ",", "e", ",", "U"}], "]"}]}]}]], "]"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{
  3.85825885963708*^9, {3.858263891931634*^9, 3.8582639038048224`*^9}, {
   3.858264044713843*^9, 3.8582640497808156`*^9}},
 CellLabel->
  "In[152]:=",ExpressionUUID->"5c6e757f-e1ca-45d3-ac1a-4a155d76ed53"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"TotalSec", "[", 
    RowBox[{"k_", ",", "E_", ",", "U_"}], "]"}], ":=", 
   RowBox[{
    FractionBox[
     RowBox[{"2", " ", "\[Pi]"}], 
     RowBox[{
      FractionBox[
       RowBox[{"m", " "}], "p"], 
      FractionBox["E", "p"], " ", "100"}]], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"2", " ", "k"}], "+", "1"}], ")"}], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"Sin", "[", 
       RowBox[{"\[Delta]", "[", 
        RowBox[{"E", ",", "U"}], "]"}], "]"}], ")"}], "2"]}]}], 
  ";"}]], "Input",
 CellLabel->
  "In[153]:=",ExpressionUUID->"af4bd8bf-2657-4c4a-802b-44d2805402ee"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"k4", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"TotalSec", "[", 
      RowBox[{"k4", ",", "ee", ",", 
       RowBox[{"-", "17."}]}], "]"}], ",", 
     RowBox[{"TotalSec", "[", 
      RowBox[{"k4", ",", "ee", ",", 
       RowBox[{"-", "18"}]}], "]"}], ",", 
     RowBox[{"TotalSec", "[", 
      RowBox[{"k4", ",", "ee", ",", 
       RowBox[{"-", "19"}]}], "]"}], ",", 
     RowBox[{"TotalSec", "[", 
      RowBox[{"k4", ",", "ee", ",", 
       RowBox[{"-", "20"}]}], "]"}], ",", 
     RowBox[{"TotalSec", "[", 
      RowBox[{"k4", ",", "ee", ",", 
       RowBox[{"-", "22.8"}]}], "]"}], ",", 
     RowBox[{"TotalSec", "[", 
      RowBox[{"k4", ",", "ee", ",", 
       RowBox[{"-", "23"}]}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"ee", ",", "0", ",", "10"}], "}"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
   RowBox[{"PlotStyle", "->", "sps"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.858259082417744*^9, 3.8582591116170616`*^9}, {
  3.858259460460226*^9, 3.858259759790062*^9}, {3.8582598157512307`*^9, 
  3.858259843278204*^9}, {3.8582599041487236`*^9, 3.8582599262435303`*^9}, {
  3.8582605613511505`*^9, 3.8582606255925746`*^9}, {3.8582606926669703`*^9, 
  3.8582607483188252`*^9}, {3.858260838938895*^9, 3.8582610487779636`*^9}, {
  3.858328163502419*^9, 3.8583282680554805`*^9}, {3.8583298441065702`*^9, 
  3.858329861476742*^9}, {3.858333595724904*^9, 3.858333598163597*^9}, {
  3.871881962525235*^9, 3.871882129041067*^9}, {3.871882162483675*^9, 
  3.8718822140705633`*^9}, {3.8718822559076433`*^9, 3.871882396155951*^9}, {
  3.8720650357632627`*^9, 3.8720650379305897`*^9}, {3.872065086843615*^9, 
  3.872065111388768*^9}, {3.8720659903822393`*^9, 3.8720660048398523`*^9}, {
  3.872066040939918*^9, 3.872066066881962*^9}, {3.872082508049254*^9, 
  3.872082529883059*^9}},ExpressionUUID->"b805c035-89ef-4ad1-bc3c-\
0f1a4f1d45be"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0, 0, 0], AbsoluteThickness[1.6], Opacity[1.], Dashing[None], 
      LineBox[CompressedData["
1:eJwVl3k8Fd8bx++9M1eklCVElrqkL7K0UzxPhEharEmyJi1CRJIIpUKIEqEo
pYRoo5Ite7KVPcp2keyy+83vr3m9Z+ac13M+n89z5sxam3OH7Rk0Gk2XTqP9
/xrnY8OhbHdL/dDWzt7gLA61ojpJfVNJR8iW3H1VXapQfbE4119S8iK8XSvi
z6nQqc4T8TZjaeNV8NFo7uBLmFCPywuRYEreAI9upbSNGgTID9mFLjrchg/H
jhbryPBAG0/8wlxDBKgru7Wb568CqWSubTOzUfAkim65MVUMzqi5n/0ncR/k
rkvkLznNgqz6jsfjmg/gyMlwuvfDDTBzWr91xCEBtppkCTp7KMBDeuuNf1qP
YPmC07Sz5ybY8zVcerIhEZxEP59ic2wDdrRO/rjjY1jGK5gc36sCwXbzFmOz
T6AeOu4LiKpD3ezJyGGJFDgv9NeElasJF0rElYZePYe54r8z/sbaIHKnvmJQ
MxU6A32TdIV0wUYWiQGHdDCf/l29TPQAMGa9vo17Z8DokeNlJQqHoL7DWGxc
6xV8qf/dl9d9GDxTubNHGzLB/H7JFesoE9CL6OEYfZgFRzOs/uiHmsEaz3yj
EcfXULmovsQzzhzyND2Gh2bfwFRbnYDQoiUsafktMyiRDULWIVZJjnbQmPfJ
/Q87G665Pjm4kGcPz5OjCwde5UCksrckU8oBDFwNjvdrfoRzBdaclstPwV2u
nLu9Dp8hXicwN3a7M7z20HM9L5wHUYvlKRN8LvCgf/vqMe88iFj36JDTuAs4
VfM5jGrlQ/XfVv5fZeeB70EpY6ShAFJn62/WffaAWZ63Kc67CsFNIHaz7FdP
6PJLOjj8sBCsPmfsHOigcuHgEz/kWARSenar6kS9wXzzFtW/s19gU6pypLSz
LzwqT3AZkCiDEAkbO+0fgTAe/Ua2PbgMejL+pUQmXgNth4rO2ukycMh8d4/j
/HX4Q/wzzqkrB5/Lw0PnqFztUDNQvXG9Ei4TCTP8acFwi9tuzHu8Evof1KSr
PgiBn00XU52tv8J7Nbv+nNBQCLjwRNxsZxVEKS395IJhUJ0+x5AZ+ga2qm6V
+/ZHAB9wWS5XqIZ9C66n1v+IgJ3rI1Wv21XDhy1uebrWdyB0PGXMq6Ya0poP
tHn6RMKW8O/2Ni9q4Ng599y2+rtwpVxeT/l4HbxrKns3OR4Lz169W/8iqg68
5rGd9/EDqI3WIKQr60BKdOBThnEcSDmYfRRWqQeZPb5DQXnxUE4EKND4v8Op
zVp3rzc/BEG1Fr5vxT/gfd9qcOZ5DCh1Ymjv/A+Q92s/yLz0GBy5RyoKNjfA
jOHrwln2Y/jYxBH49mEDjH5vHRUoewI2Fzb9i/NqhHfNY3+VY55CWvqNljMK
zXAhyegQ2+8F9PP1B+tZN4Owof274rkXIHNBT31DZDPcrL6Ik56p8HAX96PO
6WbYxTHx6YD7S4goCz5h/qUFzuyxyhPzSYcLnbdHdCzagDu82LOZ/QoytYcT
pW+3wQZPD3U15UwYSjloRBS0gWZoWpeJVyacdOZ9lyvzE0IWKy9l8mSB+XyE
99axnyCgoBkpha8hgbvCn1erA0K01ZWKit+CutolC1/LDjhxwGeEEH0HrU5y
W4c8OkB45Ls7l/M7EK691VP5vAMuLI0Ld1zzHsKj9XWDVv6CMV/VzGifbPCX
ruJZbPkFF/d3lQY5fgQHqLn/x7UT1O/YnVVxzgda4mROy61OWLVk4Vhwcj5E
k2tayx93wpmWhk372/KhtOyEeMqPTlD9ZGstol8AG4zmEu1Vu6DIITVnSKEQ
2CdlUn/SuyGbrRMxyPUFTkVczq0O64GNSR4xp4XLgDGR2P45pQcc5rKrLI+V
QYxpKS29oAd4G3kDqhLLoHwNv2bIeA9wqomqSiuWg9zTZyW6Zr3Qopyx8+P+
Cvjzoa66QIIN/r0iuaOJX8Gp+7/O12l9MPAlv1LdrAY6LJs488v6oL/EKSD4
Wg0YNgYpfO3qA9YrvXNyb2pgR0XvxW6RfljIEG8+xl8LxKsnKwWv90P4ndVl
sXW1EO29Vt3j+AD8kPQ7l2FbD/n8q++rrBwEB9EjhZ8LG2BLSGmultwgZB49
9C1xrgGSOTy7DmkPQpmUVl7b1kYInv6heMp7EJh9ihNHUxrBpD2yOIY9CA2X
bccvRzZB//OV47N5f8EixuKsx6UWWLo2QKZ9xzDERbEsGSHtULorXNFHaxgm
rkusCKtsh2tm8dvFDg9D8hKhgG0cHcAIe69z9PQwLG5wd7mp3QEzC38cGuKG
Yd8fdxWesg4YaDV+9o0xAsSXx/cCvv+CymiZ//IqRyCnbJvykmVdELqyQvaR
1RhEKYYtY/1hQ/Z2sTcGTmMg2B2Bs8J90GV5DuYujcGBjoiOOa0+2PmS38j0
3hhwWifeufSwD9i6FpeXV42BW49CrZVpP2j6D367uHMcErYNOt+rHICpiRXu
hwUnYFzmx+WO2r9g02L0maicBI09z+R140fB5UuAzTmZGXivn5/pAdMg3qXN
Mbl5Bvwr7i1ZZTYNFQyu5944A6UfSw6mOk+DNIaM3DgyA2H269pKHk1DU06U
7+NbM6C8zuBFKjEDuzOS45uGZqBLz6x09ssM8MaWNmu+n4XiC0qGcppzkJt9
06e8aBYi8yToseZzcLpRf92hmlmwO+SWP+8yB19W1Tha9s/CkOzMs9iHc3Ax
rGnKc80ceOltP7d5fg5+BfYLpvnOUd+78HvJWfPwynmZobDuPJhKn1itK7AI
lTH8F1+azEMK06jlhtwi9BSJJGjYzYPCDRnH1xqLILL6v4EzV+bB/5e2QLHz
IgTka/nnv5mH8uOMme8Vi2DCdyXr1LoFKJ/J3pGrTsOZrBH+T7ML4LLVyL+u
h4YCP6dUDnMtQp9zUfHvYRoqcNKsegUXYcXxGaWuGRraWvCk8m5ahG+ufNs/
8dCxkpTbc+LkIuglLOgWb6VjvLGd24rvixAZej9Rxo+Ojy6d7lcypeFeJd9j
NcsYqJTHNXX9GA1//jvN8BVgYB75jNluS0PtrLjDa9cwsCOkSzLEmYbKtM6O
nXIMFH94zLTvBg39o0a3Ve9lYEzRgaJHH2k4EvvpkasfA2W5/tZMFdBwzKmb
pRfEwOz9we0Hymj41GaTmMBtBjb+KJ2Z/07D2fOGzlceMFCwb7ey+RANrUR/
Xs16y8CI5Vvi+dbRUd7/vE04m4HrDte+cNxAx/wQyx1hfxn46q5zdp4CHaXr
hG/5jTOwWuJlvdNOOrr55KbvpBHIs2k9d4URHc1oeuo8QgTeNBH29L9ORzWV
TBNFDQJFYt8GNofQMSvwmYOpDoEp7UZ3lCPpaJBUquCqT2DpyfC09od0BEJj
/IoJgRyXlnbvzKHjzcCCyTlHAq8mzB0a/0PH4cDVKldDCTyo9N5FboyOzyQ4
PxREECiefz7cZpqOT8MtmybvEpjzu7+6msnALAMNTtUEAkelmw68FGdg2Akh
+sZ0Am1S3+w/cZCBalEcZpWVBCqpuZyNM2FgGqf1Xr1qAhe+yofUWzDwuJWe
6cc6AmOGkio1HBk4Z6E14d1MYO2miH0SVxno0fh7m0svgbuznXQbsxiYmza1
V2GR0kNP1nFFDgNrzEZjR+kktjZ3B2nnMXBDnenzFySJnnMWpa8rqfH50aw5
LhIzYJ9OeDc1nu6RJSRAok81h0PpAAMH44uX+QuSqG9dcG1xhPJVq9ijU5hE
9lWV4rMLVD2zmO4vRqJksYyWHqX7dt0rPzXWk/jXpNPOT4xA+wdbFk03kPix
Nz7gPYvAiIDZWzayJJpxCRatVyJQ7fKskJkCiWH6pCahS2CAuRIWbyXRsu2z
jeoBAo9P+iwJ2k6ivNOlqy7GBHZ3R0aDComlt0fz263/r3ORTtguEml1HfjR
i0CLr3yy2RokBvTlPvLyI3DylLuf7h4SuWhxDJUgAlnzbVpVWiTybTxS9CaK
QFPnFUZv9pJ4T3O7tNsDAp/XCn0S0iNxjfmqa5uSCIxTeFzjtI9E6es1OukZ
BK7l2bBrdj+Jz+PSn519R/l+L/GV0gESFV6HcMnnElitnMx79CCJO37pVjyr
oHxpuV8depha/z8ZeYdaAhu1dh+INiRxNw9HiHQTganh7f/uGpGot7PAILGH
wMz4ZA43ExKrDj1Mtxqk9ApNDT5sSqLhSZ+VEuMEvmi38V5vRqJFlGptLOXr
6b+5jWlHSOx4IbzZnJPEO9+P2Nuak2hfMHlHeAWJr+JDY5cfJdFpKNM4ag01
b23+Hk0LEkeZ4W8NWSRe3ZbXUEWxx5pzQnyULwFPTI0OHiNxbtN+z2olEkVN
g8pLKPbVlWsKpXx4139Ib6sliUwrLtX96iT2c2Z1RlN880JvDDelqyQzJXmU
Yp6QL7NllG6H/BSTNI5TdSUlWQRROmziw74gioVz/D5pU3UXddcEfaH4QfVx
caYV9f6ppvApitf2ql0pPEH59E9HYB11P3letMPvLLWOC9ySGhTLCswgupFY
uJLnixnF6bKNjxa8SIxo2sp/guItu98yPvmRGONtJ3KK4vemkbaXgkjMHLzQ
b0fxLifXIpXbJPYIa90xoTg/4KD0VBSJKyIfSQHF2rEK194+oHJw+EiaOMXl
r5b1uiWRyG+6GSeo+gxK+3U2P6f0ODvcV0Bx3c/SZyMZlE8/9T5cp9hsIpkr
4x2JKesnCzUpbuUOPOWUS6JIVjz/P0ofq3W2FfJfSAy+35f9iOLuHbvlByqo
+o3cijUpPnVAIiSllqrLt35vG6X/X/v5QYcmEvNi7h10ovi8d4vB+g4S7+Zq
DE5S/k1FZKd39ZCocfKwggfF9Dx3F+txqk+e2rVYUv5f+2FYKzFLzde/6UQx
lY+lg8qbf9KZWHJ3rlaaYgGRv+PmK5ioaJ5+u5LKV7RSpfFqQSY+L1m1wE+x
mM7ztw1rmLiizeWWIZXH9W4nPI1kmXhxKhw+GJO4UbXdMEGJiQ3tOsqjVJ63
0MwU+7cxcebBFa91FGsE6/Zc0WSiqwP/nnNUDiwfyxu9sGDiXhMljg8GVF5P
PVGctGHi2oZIjlyqv84oiXPvdmRiGOtrbo4+iV4fVxT8cGciI1fx2iOqP+/W
jyoybjOxW6MuR1qbxLiY09z7o5j4cKdi0T+q3x9bdfXci2ViS/3ezkJNyvc/
3+M2PmOinExvmN5uqg/IbO4j+UyM92nt56P2D+bWK73pY0xMztP1uU/lftns
v4KZaSaGH5zcxqdI5TDfOV6LxoH8z7ZkB26kcr7fxrhlGcUW37SOUX2zy16r
kGM9B4onlKR+o/rKLYo74ZgZB3pZck6UryKxa+KeCfcnDqyUXcJtO0lg4u7N
59sKOXDTpEOeKNXXx0OqbqeXc2CwRXrdtxECm6WYZYaNHLhtj42mLLUP1Bi6
7nwwxoFvW+Jup3QSmPtKX3Kj7BIU2hzb1fKNwHtn6f0G95agV3iJmsUTAvW6
T12OcOHEP1J3Oqa1CdS+zErd48mJ2+rd9Ac0CdRY1do86cOJ/JlEXDMSqKq1
f8fRYE68bXuOK0uVQNknimOsp5z4oepk0z4FArntx0++aeXEwOQMT9YqAiu7
Lhs16nDh6vWE0P1fDDToCpMTF1+KUy3rNdkXGNhfaONb+pIbV79QfLb8OR0V
eH+IaR5fjhsvZHeFfaXhUpiwbh3jwdNFvT7CnDTUGTT/t854JUqv2vH+yeUF
aCywo5vL8+LX3UN/cnjm4U1QkaXkBC9a3JBV/UCd404w3TuqqvjQh/+jgXHk
DNi6XnqzLIYfr2XfuTh0dRoUHeSq9K0F8KZb7v77N6fgG588t7vKKnxzyeDd
lvB/8CHtaqw8IYieR4jF89mTcIkue7CyTRA1m90bsWMClrZ67XV6LYQ7z/EG
SolMQHfy2sgEb2FcPhyR4nt2HCI3rCazjVfjFy3bmq25YxAWc6LEWlIE5UOt
HbOkxsA88ljVsl4RtJebtvt2dxSm9jyZTsgVRfKB7qe7zFHo7NbwLLi+Btsk
0xLDA0cgUU1Z9Ku1GKbtYP/ZQp3jXwa68zpsFMfe+jdy/SHDcN3Ydh8xIY7e
M7evWa0dhq2tj1Kuf5XADgmm5m2bIYj+L/bl132SGOpqW7Uy9i9cyQuJ3pct
ibY2d3VSKwdhv6jxk3KptZjuy2e7iXsQdjuVHOW9sRYN/FpX61n+gYQ1NlKV
E9Tz5EPTF58PgFTh07sGR9fhdzfBoYNcAxC2sUC2NncdjtGixDa79MOJMbKm
TJaFP8XCnxyq7QObV6OSN26zkNcoPe2SZh+cuWo4pxfOQg6baG2u3X3gbvi6
YdkdFibFmOI99T4ImnAPDbvLwjSVIbPXKn2QpjI9ey+OhVeVH4uOKfbBdP7i
j+QXLMRPBtVX1/RBWO2ykKISFmqlLdHon2BDTNLZk9fKWBj1xvW3/xgbktyq
NPdWsLDuqfcvsRE2vBUMm6moYuG5Bc7Zw9T/Tqs5/8m67yycOKNzP/83G2Q6
V2v+7mQh94eYMxnf2KD02kv8cTcLY3boDBz4ygbVwJZp+14WlWNmyVA5G/Rl
4jL6+lm4R8Q0SqmYDa6nJcVHRqh6XBNuvv3IBu9dftOZYyxklCoNmeWwIXD5
73q3CRY+0+fNmH3Hhuj0pFtTUyxskDqurZHFhkRf0iFnhoVPlR6I9mSw4cUh
ew3vORayW0r0b6ax4fW6YjH1BRZ2rS5vUkhlQ+7Y+unFRRYK9N4sqEthw/8A
ZnRpNA==
       "]]},
     Annotation[#, "Charting`Private`Tag$36917#1"]& ], 
    TagBox[
     {RGBColor[1, 0, 0], AbsoluteThickness[1.6], Opacity[1.], Dashing[Large], 
      LineBox[CompressedData["
1:eJwVlnc8Fd4bx+9Fxr1KKF8Nq6uIUpLKfB6ElBSRaJBkVUJZ8S2F5Cuyssoq
u6RIWWXvnWwZmVf2yLi4v/v767zer3Ne53XO5/mcz3lEzO7q3WQiEAgyRALh
/2P0QzNWaXM/5W2br+he8OJRKmsR1jYUtoY3hpzX7KBRmV7x3VNY2BX0VPT/
G9SfVt4S/OUjqeMJ3LkQcJbrPRGii/yFNgn7Aqmr9WGLBxccmDYPoFu+AB+j
dspSOj/82hKzsdYeDDmXqkhOzSIgmsRxbJX2Evo8Eq9W6IrDbSXHO0tCkaC7
EBPG03UIsn72JyyovQbhKhNT1WNHYfWWds+sZSy41/A7JW6Sgzhij++SejxM
s8lFnbmiDCfrg/b+bX8DWYXxs8kCqjAWoVm8YJ0AMrwNuaO66vDcfP3KPC0R
wuv0vt+vPQUtNKvQGaFUCFBlYrt66jw4VQoenv6UBqmKXCa1tnqwM+Rn7aTa
e5jbUZHPkqsPZhLI/McyAwjrv78w5RkBE+1B44L7R+iaYS2/an8FfvYbCCyo
fwKhlt85H8+agMt7cu5ceyYszmsEncg3g9PBI6xzcVlw7ahqRsF1c9jtUqw/
a/0Z6sVIPoa7LKBIzXlmmpYNvXcEjt6tsga27t9ik0K5cEOg+54amz10FH1z
nBjLBdvXnxO49jtAWlJE6Z9PeXDxmlE6u8E90HHQMRlXKwAvI6/8n7WOEMaR
FzZqWQgSlX+O7D3uBp+dTzvc4y+C1pIYn+T37vB6/PiOefciiPQLdiAefAi2
TTyWc+rF0GPLJXw62QN4XlcxzbaXQMh8SWcL2QtoW76k2imWQl2RZ4vkvBcM
PX57fiaOwcKbarX6veGL5cOYaesy0OudUGet8wFjmaPyU7RyeKYf0V077gdq
SSIDd0wr4NST9uRooj8c2MH1bLKsAkzY1FNCBQNgY4PaOuFfCYuF/J+DZAMh
vibW/o9QNUQ1rMtuTQmGhYhsib7n1RBoaj+QbxwCGpa1gz9WquFidf5H4A6F
CeYlg7yWGug9klQ04/sSTijpyPv61MFiD/e2wbQI8CObz7sv1IHJU/ZhuX8j
obfT9b3d9Xqotdx++/2FKPByShS8pNAAmRLz3mybX0NTxhqT2HQjsHygp/pn
xgIPcFzbLNUEb4J4iq9ciAOFfaHyPuZN0OucJ5/QGAcBC6nzD5qb4HDBiZNd
DfFwNKj1ptm7ZohfWLG8OfYWHtUcOC1t0gIakyX1Ys9TIOXT133vXrZAvDG0
vZBMhR8Rqsx761rAonHom1N9KohaXirgl/sJMtaVEa3876CG2UuKwNsK4qf7
Nawa0oFPqZunsaINOJbENIp7PgGKWkyfWm+DF2nzlGSVTLAmz9aWyLSD6WT6
3qXkTCjoZPX+EtcOedbXm/pdssDM6chS9IMOsOvQVJc4kA0fMny7b0t1QXHP
lknB7hwY5xl/fvp6F7DJEcXSz+WCmNNpZfHQLuDkj/8YW54LcYrk+MGVLhBd
XUnIz86D4OrnFsbl3ZDkLHlhe3IBOA2+mNW88gt6hbhD1a2KIFNj5s3eF78g
s7z5guaHIphOPa/PXPIL0u4vl3ItFoGVHffX72K9ECqkwbbqVQzG68HusvO9
kHqGNcboQwnEkms9udX7IfvYoIyjeDkoK7ld8bjWD6k2zsJebuUM30rKTjv3
w4UPgUF3G8uB/4ffSF1aP0S1e0QPuFZAUIS21rOtA7AqcK3DqLMSPPc2bKF3
D4CXo216Z2kNWEJz5ITDIPRUdedHpjQB4c3fvG6/QVhbtB6Q6m+CCJbdPTUJ
g9C2dun4Sf5mqKq2EExtG4SFw3xyc77NIK6/9uam/BDICs/M2t77AWNWYu97
icMA9/7J9zb5CR612vX1O4fhXNj3HLvYn8Av5TBVIDMMHvurx0b6fsKp+YLD
r24Ow4DtYJizWSuk/quXbVg9DJW7UrmVbNvAJvjf702BI2Ctqjk2GdcBTItv
+gpTR6B/9q5ZD7UDogyrCBklI8BrY5BiKtMJNbt51fwXRkDZpY9ysKoTJJNT
KrUujYKHxn9uo8tdMJHf0lQiNAaX7MQlbzn/Atvh/YOfP1Ahr1fJ1NhpAPqv
dbIXV1PBbLTDPytlAC50PJOqH6KC7FXzm3cZup2oHXUd3jkOXOZ06a2qv4H5
U+JWPp9xoF18VrrOOwgR7iLKziZ/YIqfyltYMwTFvDsi5bZOwlHuXWYU7zE4
6l/1XV1yEnQUrO3kysYgidVlSFdjEh7wSBh8ZabC85W2Qzbuk1ArXfJ23JMK
F/tCK6LGJiGoyCVfynccxtO2LtCKpsDbX6dDIHkCSCJeYn0nZqDRZiHxa/gM
VCkGHXqoPgPb5S8l8+fPwNNLMccF9Gbgh/G3PQm9M8AUmKN5+dYM2P3WbJTb
NwurGxOW7dEzcGNN47Xx11n402OQ0sg0Cyl3ucJVBuagLkJsf1HdLOyN/mpT
rbsIAVtrJeJN5+HuPhlD6aBVyD0ukK1jOw+1nk9ErhStwtC1u7DmNg87/MKT
Xk2vgkI6r75h+DxkbP76w0CHBmNaV/7d3DAPX6puDsRxroGa52Sjq8IC8J1e
Vfvltw7Li1yOenyLsKfIiM9Nk4AUATM6nbII5eNqngEmBNQ5+dk3XXoRdMg1
/jHOBEwMvhTDfnYRxijl0ZnJBNQ7FF/53ZPBMxm+0WxETLc6slNydhHYTHM3
ba8golm3fiFz3V/4t1WvT1meGUmvBu7Yd/6F7OlDQiHnmTHT2HZ338hfCHni
V9BqwYzMXT6uecQliBA2NRUNYcaEjjwZ++NLoCgsn9A9zowjrcIpvW+WGPoP
HDIMY0GbponAXNdlqLp5h9DRtQl5Al1BzGcZItu42mWnNmHeOdap0NBlUNKK
OuhEZEVyo9AZu4xlWNjsty9ajBXf1+ttEhteBo60elF3B1acqslxDT2/Apo0
7RAVJja0L/cyuyu2CuSpsiltdnYUHNJg/SuzCmP/9PQ94GPHWiaONHdcBUt9
zq2+ouy4F/1nfY1WwSL7ark6smNn3kuPBL9VMBfpGFFyYkeVj0kxnYw6ja4W
fvqnhx2nGqxUTddWQbk48TWMseOrSYmREXYaRIcav9VYYMdFiYyDCyI0+NXw
rn+WzIGpiV8LtujTIHeVerlAjgO5X1V1qeXQwLwyNk3wBQd+z/3vYU0ZDWxo
MirHIjnwVof2Ht1mGlCcP3QeeMuB5dubra+N00DG647k1y8c6BrYueyyew2m
VEiqKj0cuC/j1Wu6+BqY7TjVrDvMgS31V/Gp7Br0MadnqExx4EHyb58QnTXo
/TMcWEjnwAHvcb4PHmuw+/7HEFkREgYkvM876r8G3BlNJ1X3k1Ch1PZafuQa
uImvVkpJk/AlYT6xKnMNdpwND01GEmq50Y4ODjHW2+2M33mNhJ/sOC/wa63D
gvytmF0hJKyL4nVNv7gOj1kUj2ZGknCkbGesqvk6SC0crReNI+HOHfv/3H60
DgqJzgkx70noVazuWZy9DtOHthtQS0kY80c79WLpOghvmN4yryZhznb9xj9N
63C7xLGxoIGEk9Zmu/gm1mG7qrIMaycJL/I8yrLZswEhAbq3CBMktFN82kk/
tAHWi6cnbWZI+J+FPz1UaQMMR6cPf14gYWHeqzOFlzagbcq3eHCNhF1Db+z1
LTbg0XyPfQ2BjAtb0sKp9zYgiPwiLZCFjOI3cgZ5X2xAS2etRwGZjKr+hRyp
rzfA4aiq9x4uMl75WnFIOW0DSjpG+qx4yBhEbnWzKt+AZuU+63B+Mr6X7Ylf
/7EBN2UlmT12kbHCZLAyuH8DfvEFVGgJknE1a5b3G20DNMr2v31MIeO23mU5
PQ46XOsdF5/ZS0YpdoLpKB8dJjnqPqE4GW9c2fKe+wgd+tJXU54dIOPDp9t/
JAEd7slSvT2kyBjxcfeywlk6TDQcUbt8mIx1LJInLazooMjkrJwnQ8YRqSM2
NEc6yPrnTijLkpFgJBcY6EmHTq3+y8nHyLjTE7/sDaIDdZdL2fxxMsqma/bk
xdCBa17aRFSOjOfbdZjOv6dDfkifuZw8GW2IF8WHc+nw6pbdFhkFMnpJXtV5
UEkHJ4epUG5FMsYYmN/naqWDwT9u0q0Mznl0KyrhNx1G5LQFHiqRsSXVoUhu
hg4Lh1KDOJXJONXiOtKwToef7aOVHgxmeYSsmZsICF+sV7oYzL3tZKQ7JwFj
RCJNdgEZBVM1D2jyEpDmMiKjymBJ5TOF3DsJ2GhZnnGOwSdadPR6hAnIfCyN
8ySD1a30hpPECPhSlM1LiMF66wYu9lIEVG7TOvebsb9JsBFZUZaAQuUdyc8Z
fFvsagyrIgGtyrZWCjLYtcBUulmVgJIBqiMRjPM/1TUve6VFwI2rH5VpjPuF
jlgaWpwnYHi4H4cGg+Pdbo0fNiRgiuvcI1eGPoeLOJZ9rhJwrf7pp0SGfkUs
KZv6bhBQdB/z1Lf/66ulwXvMhoDuGyk3Sk6Qsd9/SNjfjoDEXwmYxaiH3Y8n
UkNOBGzv4MwKZNSLzieiqPAvAV0k+saMGfUUjLtqSPUloDFV4eKXI2T8MEQz
x0ACNg8rUzWlyai0P8ohPIzxL7yL+ltxiOHfzDZ/9bcE3MvDeiyA4aeosnNl
8QWM+SXuExoM/0lwTDUvlxBwcxzXi1MMf+aefd53rpqAc6/lquREyNjRVrW6
3krA6iWZYOpuMvJRVaSNpwl4Y/3xBU9eMiYd7Ff+tEjA5R1ZfkRuhp8cHmqz
rzHuG7zIbLeFjPq0PMsv7ET8fF/FVJCDjMGbj8bw7CHi0qKqbfk6Cffo/Xhn
LU5E2+8hOjWrjLwJs8stkiJiGJmzuGiJhE1C6T9tFYjItZBE9Jwl4ZYj+8i1
+kR0fM5qc32I8f4v8rt4+hCxrYA4mFLJyJ9XX7y7/IkoFmTV0MnIm9Q+/RDp
UCLOzUpXbhSSsMoq6ENfHBFNSj84780hIasbaVghj4g/LhwfoSaT8Ensmu7C
BBFPcC4V2HqT8PzhHHvJeSJKZgheYX9MQsHie0FmK0S0vpOYHOFOwrzf401N
m5jwqaBQafQ9Es7t7TyXLsiE/lkcD5Suk9DsffZZi/NMqOkWGDEpT0KVXFut
jiwmzPzGytc1xoGEln4seMCM0qQL9vePMvL+voWLvsQmNHpsFlb/HxsOLYZf
JH9jxf3/vaA60zfh6WGbf4Pt2ZFNyiHN0Z4FdYYCJQUFSegq/bfsOw8zjpea
eVSlk9GgynT07TQRpbjbBNRMNqPGQNG2wXYCkmDxes/8FszMNNKiDNBBc9J4
aY/BVtROVmJuomxAR4k50fgAN5qFmN5mjV2D7Gdl14QXuRm515yuZEQDi02O
/Q0NPLioPhFnv3MVbji4ZXNG8WLD+fsCkZwrcMhSskH7+jaUelzJH7hzGRp5
DpAd5bajv4pvd9/+Jcj/8OTVAWY+3G+o/efw5b/gRpQ4X/eLD4XibKzx+SKQ
eh6csv38D+boWp5WaVqA4SSR0Fh3fjxr11TafWABQsV3sOQa7MAnhh8L5X3m
ITDKovK68E483ux0TffvHBiHXm3gHN2JUf2HvWzs5mD5ZOJK7PddmCxcm2k0
OguDw6ouJT67kbLjpf9921l4oyS9q/66AGrvfqSlPTcD6d6O3JYHBXGfopyM
mtcM+BjcOMO8KIhhOivv7grMACPuU33qhdCebz5L0mIaIva/Sq8/I4xeJWmx
r1Km4FGRf8SZXGH8aR/JLzE0CWd3GSTWiIrgWwvDPxmMvlfFtvIyt68I+vSn
hD57OgGxu81E6xZFcHukHM+Drj8gWpocpnN5D1JyPq2uwR8IPFgi8eP7Hgzn
ktQYTx8Hi3mW5moJCvpJ9WXxbB8Hs09zwr4vKDidxWJ+y48Kt59cWDsdREGT
rP6DXL5UcLzwuZ0zhIKhpW66WU+p8GzRMSAwjIJSKy8S1x5T4YPcCi08moIy
TJEPQ1yosFJMb0t6R8GF1oC+5ptUCPzB6V9WSUGP4fXcQKRC1Ns7Vk+rKWiq
dTkAlKnw9n6D2qlaCm5+G5g7pUCFL3yBq7UNFOTMFd+mc5wKPca8Vi2tFNw+
Eda+VYoKYoM71H4PUpDpdp1n0i4qHP78QDBhmII+2cL5xjuoIO/dvXJzlIL6
6yOaXP9QQVss+iN1nIJfFe2vu/JQweGWsODsLAX36G4L1uWggrvi45XMeQq+
2xfowM5GBe/Nv3/eX6Rg3MmG5EIWKkRkvPVbXqbgmoj81kMEKrzxYLHMW6Vg
ibGi2uj6GLzTvanqvkbBrIbUmljaGHzeUyGgvEHB7423ky6tjMH3+X0rjAYc
lXLutnEvjcH/AD+OFG0=
       "]]},
     Annotation[#, "Charting`Private`Tag$36917#2"]& ], 
    TagBox[
     {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], Dashing[Medium],
       LineBox[CompressedData["
1:eJwVlnc01f8fx7lGsu+nkmTfdGUmTaXXO6PsZCcpK4kK3yiyKkSyR4qyQ1mF
QiU0ZO8te12byx2ofvf31/s8z3mf93m+Xo/neb1fEra3jRxwTExMR5mZmP5/
vvSzZVeyDzs9QmxpTnEVV/3eIa5nLu4EwyxBWYk/Bk7/+1n5SFzcC5wTi+vF
RzZP88Z8KOLsfQh5sXbOD7z54GVVuBibeCiwr3FpGwsIg9ySfcQ/x0j4+bNu
uYt9P/zmffV3qycGxgdxqqRuRdj3evvRjc14SKyI7rasOgIuqh43qWLPgc2s
qacp8BQUd45krqknw+1HNiE1Imqw4aw3uOKYAgk/6pNT/jsLqcyDoVTNNAg5
pqBso6kLGk3RUpSedCAq3GA/pmMIM4nnqtecMoHZscFUUMkYntr/sSJvZkHm
8Yx8Lgsz6Ni8HrcslgvPvxVn8DpdBs9a0YNL794Ax6EyQd03V0EotrNhQT0P
FJeIvZHVtmArg1jmHAvhiFs1r5iZI+A2vVvWfIrA0abOTb7TCTpHTEXWNN/B
Wf2dbzQ8XOBeHlf5as97uNeTac2PdwOdmCn21dRiSPKoGrd45g7C96pNVpxK
oIDdjG1V8Q5Uqd9dXtoshYg9ETIziXdh28AYcUGsHBKCGpeqzvtDb9UXj/mZ
cpCqa6pT/hgAb14nfpt7VwFRxbTMkNYHYOBucGVW/TN4psyv50gEgrjFgXwS
9xcYqzPaX3AxCFZVWTdnur5A0VasmXRyMCRsr0iYdvwKPEZm7qsoFEru6rj/
J1gFNg1Vvn4ZTyB59tgesk8VaO5WrafyP4VbrZjjqmY1PNt5pEGeJxKw5F+4
lZ4asDp48DxPbQxs8n7IdT31DTjyNYaqsmJh4kGG4XLqN/Byu9F740kcfHD0
e7Xk9B0OhRjyTDokgKXyYZXFzR8Qstm3YOj4AtRfS4zevPoTjF5ZS8bfTQK5
PXwhC99/glauhZJlRDL8/Uvqmg+vhZTQRMfClleQVp/iNidWBy6PWDh+tqXB
WmKpzPDTOmAvFr3a+jAdzjo2jLfT62CtoRRjP54B8yxU04qOeuCu8oiRKsyE
46oGKqGPGyH37XTFi7ZsCOOyJ/usNUL7lvwX+6wcGOrzynO1aYKFmK951b65
EOiZJWpxshm6Dpz/eOPUW2gt3MIRl1qAi/hD+O9qAWCw3ZpHoRVG7cwPj88X
wsn9cSqP7Vth8OiV/kmPIohYyyV7t7XCd9pumqvPOzgc3eVg+7YNjs02mk/k
FIN/vZyO0pUO6B0N3bsruAxy3n3c/za+AySudgtXKZRDe6Iai1RjByS9vlTk
3F8O+xwtPgue6IRetwX2aZVPUM8SqMC0ows8FXwN7CUqYW2Wl8tbuwvslxrl
t49Xgkj782myfxf8CFgpWs/+Cq6phanT811QM3PNevJlFQioDmAtP7vhcLlT
9tGzNYD2XVvS+tMNARhPxNuSGnDiWmmoUe4B80Gzu7P7vsHnPvagD6k9sH28
62g/53ew9TxEfendCyLpM9v5Fn5AQWHogItCP8y22nhY89XDLDb7VMemH6LP
dnvdjK0HoqfOaem4fmjicBA33dMAqae40sbp/SBDuVBUJdMIMXVPr1n+GACc
2qpwmH0zeI5Hrpyz+g1qv3nPcie3wfuzy+lSkb9h7l6Q3tpCGyzlGpqw1PyG
shPNe5ZQO1x3xX+sJA5BdHyRFHG2HSz/xPgcIQ/B4RD/4BntTkjhaniE1xyB
W86nqyioB06r3rcKsB6Bfutm0TNZPTB4S/bI0t0R6CCIC/3i7AXB9rCpxjcj
IBTQWJbQ1wvRiXraIfyj8H5AtuZhcD88kmrm/TcwCjkPIvO3xIZA0txv+ub6
KFjxZy9bPB+CqhCFqkHeMRCYd6gV2TkMW3MRbhVnxqAGXd1HYR8Bj/fnOz2y
x0A88Ndej+2j4Ahtz+fdx8Fs/mKz06FxYEqnVAyEjUPNsWPFsV7jkMgqPFif
OQ4Bw3fI/tXj8Kvummhu9zjM4cXDM40nQNpkK91BZQK8qJQV9GASZq4T84aY
J8G2SDu3CzcDAQ16TU1Ck1CtKlT20WwGBBXcFz8rT0IS4ZHy7bczoEX+fDDJ
YRLYav3rbM1JkOtrVGpeNwmHbcr+eJXPwo0Y38rWqCmICWN+ppm9ALj19OGv
uVNAIK8GUTkW4YX5L6bCmilYeDO/N8J5EeqFd6iHr03BEVHrMy7KSyCbnVOr
bTENQqEtTEyOyzD/qaO1RmwGovdv7ArcvQq3Jg+MlxSQ4EigvIRj2zqMWPdx
VNeRQChsm/xlAQoY94YoNE2Q4D9CaurvSxQ43jDtNSk0C2qGlw18ZijA8i6L
X+DxLCxGX/Hax0GDRB+J03evzAGV8L7+xdUNqN6x5/kJ/gW42CVgGXf7H3BK
BBKHjy8DHKR+TjBmQ79ORSv6aS4DZTTHVNCfDQVbvDomYrQM4zq6H9PfsCFc
VNm5S87LYNF3Qb+RmR1t/J137Hm5DNG7/jPTLWJHc4OmOS24FUh4OC1Wws2B
GhOJB6oaV6DS7rhZZhknelJyWOlK3wp4u5jm249xIq3WMyf+Tq6A5hPF/j9c
XOj7NivtU/9WQPKB2esSay702TPKqUxpFd7hnnJw4rhRvgk9tyhhFcZVhwe4
gAdF8DfIpF0lw46GrfzhED5Ufkyk1OAWGXLcJ7YN5POhCevbsHWfDCmsnNOe
7XzoZP4OE/NnZJi7r/FMk4cfzWhb+fI0k6E9sOoCzpgf7XQr2PZpgAyBXRFm
K3b8CBKZYq6TyCC/zsmdd4cfJUxlvv7GugaD+nPPHsbzI/VHCy1eJ9dgv0dX
dnYnP7r1BiyJ2muw1z41aHqcH71oi57oNFuD/F9QuLTKj5bFjtIV3ddAgXwm
ypwfj1599pOcylkDefwXDV8tPKKt83kYCaxD48cZ28V8PCKI2P77R1gH4VWX
XfHleGSgURKar7QOWUGSq0w/8CgrxuIVh/46ED9Ob5MewCMjxbTaykfr8Ffp
VlExK4b8zMgXXKLXQcMuNOURL4ZyfTUH96SswxGixbSgIIaYGknLdyrWoZbT
ihQrg6H864eEZFfWQStp07VFD0O9kYGZvX/XoZxyrKbJBEOsH7sVgrkpQDGN
SY+xwpAl2331USIFPs34r7o6YyhYrqkp4ggFIu1TB564Y+idsZjFKXUKJAW2
nnXxwhBH+jeXZ9YURv+zK4KDMaRct4uq4UIBWZsqs6qnGLJednyw6kWBwqD0
pJoYDJWe5k7Qj6eA2q5DjpKvMGQ7YPKVpZECaRcbYyzeY4gzafSmWx8FVI60
n2r8gKH3lreEh6cY2k7lHM8nDLH0P/aqYKaCcHfiX1oNhvKe75SW5qNC/Zis
W+ZPDJlcTOuOF6bC1y/KLaL1GMrsrVB2O0aFc2bt8w9aMaSXeG5sSIMKl4ul
A5w7MLRm3hmlZ0SFQTb911LdGErebQMVV6hgsmOlsagXQ5o9CwvEm1RIEZKz
4xnA0GKCd3K8NxVO213vO/kbQwlm23RZQqhQ+Ncw7dQwhk4LxNFd4xn+qr7K
849iaKpLPGconQrVzm9XP4xhKCI+30yviAq5EgIOShMYOmqqwlbxhQpDrFsb
/pMYGtpZW0xsoIK6pJpsxhSGHnca28b3UkE7Metm0jSGDsaN8LNMUaGB+a2K
0wyDp/HNr65kKhjsj+DiIWEoYMfGzSEmGjxYUrJ8zNDSHcHCerw0sMrhT+tl
6NaYHQ3le2nw9ZHcJeZZDN0zSvUiHqCB320mVhxDi2Py0vFHaeCv5LZ7gHG/
rq28G6dBg9D2Snw4Q7tHnw1yvUADfTPP24IMLXShQ3nImgafqu3yfRl+aviv
jum60CDXNVDrC8Pvjdb5qHIvGlysoH/pYdSDRXkB8TENpqc2nzQx6q04z74Y
F0eDU3ea5FIY/bDli03GpTP85xWI649jiKtFTNe1kAYHnraN9zD6WRKRR//9
mQYTdH0yjGDIyuBEjm49DVYNBBqDhhh5aDJiI07S4NBH08a8fkYewoeL41Zp
wLoQMx/B4Lml52KLY6KDcWxsrSGDt35j0NffQnQYLW9L8mjDECUMu6UrTQej
WrawvmYMvdJNES4/QgfVvb3iYo0M/vVlXnGGdNhy4ydeYOQt4YmmNM6aDp48
XqGnvzH467R333amgwny8OSrwlBk3ZyybjAd/n6JbbpczuD3S3SR+TMd1NaS
LcrfMPg9fpt8u44OA69Zt1peM/idO677u5sOBkHR7U3pDF4/L+SUrdBhIrdz
KOAFhtx+BNreJm5AlrppXmsIhkQnzrJTlDcg/I1ohm8ghhpw29/4oA1oQVbM
ggEYkkLhK6EXNyBa9qG+wF0M9VXEB2SGbcDx4acuavYYOlP0+lXf0gbUnPAN
Sz2JIXzSr371sk2Qu8RkGjqCR5XlT/zqv2/C0nDH1v1+PHLu1ZO80LYJQnlL
lxw68ejHrjYn69lNSCgvPSzyC4+8ovpo94S3oKoso4tYiEejQbMCBQFbsPFh
07P/Ph69c+U2FtT+A28WbmrtxeNR2n3n2YPmTKjTwMpazYkXPUzZurA2z4xq
L0UN+qlxIcODZW6yZGbE4V7UJXSMC4lW/xdtS2dGhqkaiZWyXKhibLa1lQ2H
Xp/beV9kFxdaleo7ny+KQwpyj8uOz3Ai27xS/WuGOCStfq5gIpITnSm/pd1b
jEOtL/SNtk9uR0wdI+izNwtKZNFTXcniQIGkyjTvByzo/an5wvQkDrSd6SXu
RAgL0k7rCbSK5kCY/MXvpfEsyJasc5rkw4GkHredKyxiQcU5CTrXTDiQzska
g/QpFqSyM+ARiZUDxWZkWIUYsSJ9vvnxGedtaP+da/dMZNiQHF/CfVtDdiSv
MmyccpANrYpRWp5osaPDTBaKs0fZUH3dAd5yxI7UnmpP+auzob5+WWWiEjuy
zpQzeWvF0DAXro2xo4TOVUVcJBsak+NlSu9iQ2xH/KcLyWxIwtFQ2u8qG5pY
f2bG9YUdpTfgR1uCWFH6GeX/fn9jR6EuRRe/+rGiK+HNkYX17OiglIZZyV1W
1L+Prc64lx01uZd/L3BiRW3G7ieTyezoQy5b/4Q+K6p8pycuL7MNla5m8l/Y
zYqe3WSeNXi2DW3qcwqwFrAgnckbvjFuHOjifPJiGQmHzvoS8jTucSCJWUrs
5jgOqe0a7Kf4cSAZzhumakM4pKKpf/zSUw70Y6eo8GA7DslkKZIJ2RzIu1Tr
LPqMQ1wOa9dLBzmQVmVESG0kDjVO+Jr0ntuOTo6fCfhwAocMJqJkRUU5kdhh
1RrtRGY0+8024Fc+F9pF5tgMfMqEFPDdIupXeFB2+1qlnBRjP4J1m0EyL/Kn
71LLjfwD5xYsqZKm/OhnaJfZIs8W9NbYM1vK4ZGg9lH72K8bUBry3Vp8HY/M
7+iyXc6hwzU2j5FmxlyYoH+44fyMBnbu90u5X+xALlovllUYc13RUbZZz2Yn
miH6K/qOUKAFk+PyOLELHWgc3DDFM/7VgodJciwCaO/xJ496rdfhPrOMYeNv
AXRIkbfS7e0acA56a90q2Y0yHgZkfNu2BpOvJeJSfASRaEV96Pg9MsRJ72Et
N92DRvnweOfpVYh6ca3WRlwIKXUqm0c7roJl3OVm7mkhJBl+32NueQVoGln0
lMq9SIPVXWDRcwXGJ9Xu1TwWRhp7dr0c4FyBdFWlvU02Iki602fFNmkZ8oM8
8I7yokjqfPcjWcYe+djUTpdlXRQNz9ifkPmwBEcG03IfN4mhjeCyK11ri5B4
ICm/SVccxfS3t/SfWwT/qvBE3XJx5BePz5iJXQD9vaZZ9fsk0IP23wFnZ+fh
zK3aS/hQCUR8z989dGEeUoRt9zWuS6CJhJi+sPdzsO9bdoLBJUnERdTbhyPM
QZR8jUx7pSQKgzO4oRezcI3M2lYnQ0Bt4cYf6VyzYPtuVTw0koAm/k1KTj4h
gctD4y2daAJyuOz5KT+EBB7GJT3csQQkLKqc5hlMgpB1j4ioBAJq6Z0w3v6Q
BAUn6JvPXhKQoRa/ySEvEtCr/3W/fktAima9BTGOJIhq5w7/XktA2P1TOk81
SPAi4+b14DoCWipOs7NWI0HGnWZ1rQYCSljuqz2ISPBBIGqjoZmAvih6u3af
JMGg5Y7rHV0EVO3sjaSUSUAc36M+Nk5AedIJDa0SJDhY4i2aOUlAdCwzNFuM
BCpBA3SHacb7QnbRfiIk0CO+LCLNEtDCnzxf+T0kcHcWF11ZISCpaZ/aCH4S
+Jx6QH9PJqDbDuJtjrwkCOIZ67yzTkA52VOEM9wkSCzMCKPRCCi6MS5zbRsJ
0gNYHSs2CMj7xsX2ZjYSvL3goOazRUB1ahtauSwkKJH8KXL6L8PPNweOQGYS
VJL30xkLKzph94T/yr8Z+B9LPUub
       "]]},
     Annotation[#, "Charting`Private`Tag$36917#3"]& ], 
    TagBox[
     {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], Dashing[Small], 
      LineBox[CompressedData["
1:eJwVVnk4FF4XnhkGIXvC2IdkixallHOEElGJKKLsSyFFCFmTtEiSFomkBSEq
VH4UsmWXtezZmTH29fP9dZ/3ec7znvec+95zj5SNu7E9iUAgmBEJhP+fCYE2
LNvtojR1GFeLVX6rHihplDxqJukMzG+jE08GjmmulRWGSkr6QoO7GEdLKidw
xXzKYm8NgT3+3ncJapKQUHRHgiwZCfIuacGxC0qgNGl3d83xHoQTrAuLfuyG
P1zPV5dbYiBi99czZdcQZFI37F5cegiuiwGm+6MPwYUDXhfnJB5DKelqos9L
Q8hp6k6Z1n4Gy0Zv3Xo6jWHR9Wgn3TERjlUYbC1wNYMXxM7IOd0k+G0dyOMf
ZAk6v+7LzrYkw66uvOEPXOdhKP5w8bRzCnAMFGZYS9vBbbsVS8bSK3DhKl26
4O8IjUtOsTSJt1A9alZiy+YO3j/FVSez38FQvehZi+eXQORBU9W4djoEvn+V
Lv73MtgoINOoYyaIhZsvztX5AGnJr3baPwvm3nnxmYVfg6ZuU7Fp3WwwiYjT
6z0fCD7pHPlTLR9AuyPNQdAgBPRj/rFMvcgBiq2h16u5UBD1KTahO+fC1n2r
F97mh0OR9lXa5NJHCNhvmhJ4PRJi5I01J0s+gUq5WSd7WBTYcSvfnrjzGdQ8
NRaDE+8Aa0ev3LhEPvh5UWstuO5Da9E3r7GhfKjg+/z5OcTAu9T4H6PZBRC2
K8lOPOABGHkaWY9ofwXCdYJuilgcSJrLZwxzfoObfh8yBIIfwdQB5qWh5m+Q
FzVnEEePh7gNBXGDjv/B1pa8TWmLTyH3qr7nZaEiaB2z9sx8kADPRvYIM/yL
IKCLx+31vkRwq+NznNIthoafGuczTycB37NyEr3lO+hHXlgzUHwFS1yf3nrs
/wGMthBW2o5U6A9+eZz24geoXtvCEXHwNXxyDHw+6VwCqZMtKOD3Fs7s3LVv
YqkUiGONR7yM3oN2qlTPxXNlwEau8Lr6OBOUhLlvjpeUwa3Rjswf3lmwujrc
PHbnJ7SGuJ7Kbc2GpMrES6MSFRDRG+Cl+TsXpuM/KnTdroDRo/Jz13I+wiHH
qr6GhQpw/iS2XBH3CcaY5kwLGitB86BOFtkjD9QPGO2LjKiGtA/GTMIeXyGK
w47hP10N3u8bC6aDvsHfNt90j/O/AOq+vKuIL4Qw71fi5ho1EFNxNmTCrQjq
MpdJcpO1IB7hy3ja/R34YIPVxm11ILVFlCv3xg/Q2BK7L8KuDra1a939pVoC
d6ffMvzq66BBncn16P1S2HW/2d4mrR7cJoIzr4eXg5XPuYOdPfWgjjWbXhuu
12U9Kn5KqAGeKr+kO4hUQrsysfVIeAOIFY3ZEr9XwfVKJf3t1o0QrfLi6ZhB
LbzJ/rwl7WEjHCCPXYkWW88Tf5BJtroRFKbfOlY/qgMZR/OvQnubYDFFMMks
th4qmcK2EfibgWd1cyJLZiNMj3Bx+B1pBr3Kn6oL+5tArOHxION6M7z4eoYx
/qsJPF5kvhgca4Y5tavxvAvNIHigg6+27Dd4u0qY5Xq1Aso4TOqt/AZab6iM
glgbOHPQq77vbAHPzG+0jeVt8LWNJfzTixZgPRXcbb61A2y8d8wl+LXCiSCV
kkcCf+F9ZmTHhW3tQN97/EWcSS+M8I3c1j/fDrdFvowm/dcLct76mltj22HB
N/VKvFIfvNjPkdS30A5RR1M22nL2r9/LbYczpR3AVSWquKt/AGqUxjerz3eA
DPvdH1bW/4Aj2rBik2InSKuLJWV0/oOwU1xK9dGdwPypKbH5zyB4992jH7b8
A6ZyeUISS8Pw4RAtWfbeHyixukrTuDkCk2+PmzB9/wM/Sk1G8zaPgpMH7+dC
ub8w9V6glH5gDM6sxPirMf4CV6aLktqbCUjkqArl1e2G+rSnXadX6KB54Jpl
kFU3hH3OsMgxn4JON0W1yavdoD9FS/L9OAVCDVH/qt91Q/bsZVmLywy4H3/0
yE2eHiioXVpuJsxAqGwN11pHDww8k19KsJ8HabPAwYszPRBzavcV67Z5KLq5
raiTqxdulxdEFRstwPLo3UsFWr0gHnLs1SXNRfD6cKzJ63Uv1IldkyrevgyO
UP94zLMPHhUWHqrfRUBC8mxBR1Qf6HLlMBf7ETCeWbSzMqUPLnq9pIQVE7C8
wkH87e8+8OuvZwo7QcStJsvJ9vv6Ye2KuZPNNRIOOcml/yUOQABLyUn6DDO6
xAQU1kX/gzVBxvkXvuxImknu+u/tP7Cw5c4ya2HHJ2blhMzv/0C2c8bzqRoH
Vorya9+ZXses6dRcBgcqvn7z84j5IDxgFjKL8dqIY18a675LDIFdVVO5iS4P
ug3I9+W+Hwbzq6ecXG35sduqja24YhiO+N6IzYnnx5OtN7f96h+GyoYNy0W/
+FG9atB3QGQEWKU9iQJ7BJAp+xWPYMQIsOv4hsySN2G8v5TmVetReOv81inx
niCyz9bZhvqNAuW0/3RYoSAGuAdF3ns4CumqKseaxwTRxqar6XXVKPytz7NK
PrwZlfQSXFv3jEEY821Dp5nN+Lz46P1+4zGQtzFfEZMQQl6N5U+0i2NgK0P9
JqwnhLPKFqQNKWMAX9xbGh8JYTG/8OO9POPAN2pcPaEsjLvulBfqKo5DW+6J
vR4nhDGVxaf/xKFxCM5vZhW7Ioy3F36ruPiPw5fhhr6JT8K46nnD1PvROETF
9l/lbhHGS2Nq10I+jENOoME141lhPNUVW/ZkaBxW0skL6jtEsNxcZyyVaQJ+
3h0OaTMSQY0GBm+O+ATo8go9jXMRQclS47NVJhPg83Bnlk2iCI6845leKpoA
wk/ViB2rImgpUyTM1jkBnlyWWqn8FKxNcAeBuQmI3Zxds3MrBXOja24pKU/C
biOy03MjCsqxB2ap603CsIp8j/85Cj4JVf6tYzsJu55mkn0uUfC6922ps48n
wVJcYrg8moJTkxqHnXMn4WPS65NSiRS0cx694FU7CWvZVoVP0ynY0vskJnhk
EibFmdr25lNQdptsZxmJBsn5C1dWSij4d2R54igPDQyvz4UO1VIw/nUTsVGM
BmeoqYIrbRQ8YZcucFqRBgwuHYsDfRRklwqT61KnQW87PksbpWD5/vsqgbo0
qDqn6V8zRcEb5s/3iBnT4PEV8zuaCxTUuZIGX61o8Fn+8NDKKgVJ0XmHLVxp
sBTE+pmLWRSL0kqPLV6lQb3pn52X2UQx8GeD2eMwGvjdPPVGmVMU9/d1Wavf
X9fTd+wCcovi4uqYY0sCDRR2Lvdn8Ipinsiiu/c7GpQwTYT68Iui925Wn02f
aRDnKlOWLCCKu4wFgnJ/0AD1KTtVNoni1EWpmyfraMBi3mUhuY6zIrdFT3XS
oN1yS7vPerzbK434+8M0IHW5HtNY51Mq1nuhOksDyxg+O5f1fKOdpm9qSXS4
Wn2rjG1dz7t5myw3bjr0qQcqCK/rdRLwyNsoSofTzES95+v1bFENKErfSgeB
zPL2J+v19hvcKjdQo8PZTKckXoIoJjs+qhvRogN9w0NL8hIFz4WmtEYa0eHY
ikuNzwwFOwsKh346rvMJefcMD6374XcVzeEKHW6VtrKO91DQfKp1nhxMB9Bc
Gfdrp2CTPINN5wkd4j4bTGtVUjBGl8Dbl7qOFy2jgoopePz8RuGQHDqci5+o
McmjYHW8nHxRNR04+3KlKlIoeCt313brNjoM9kfedHtCQb06rb2rA3TQ+KWl
n3uPgiWslkf2r9FBOFzeWNGXgl+9o53ztk9BnMu2vdx6FPSLSbhkpjkFeM3W
Zm0fBdXfv/Od1Z+CBzc6xFOU1/0+UBK5y24K1NQ0uwT4KJhhsvA2K24KkkTs
w5paRPCCB8uHYy+noKZ+JfxduQgq3OYvmMicAsvQdtPD+SKY+kO5UqliCqT5
BRv/PBbB5ztsRt4sTcFNi6bTn81F8C5PlULSOQYI/qbtLasRxvw9Yh+N3BjA
HcxdcPmLMPZbucPyNQb8DZ7sIrwRRo0MfhOzRwy4kGLcXhwkjENHLAM21jBA
5coRZr7twqgdOl7rqzEN9ouyHOfuCuH8DLeXseAM6MjcKpDS3YxUMZu1NeoM
eNm1bn+vuhmNdHIjM7bPgLht2RNt0c34Ksb8OZvhDCjy1W6+zRBEY5Wkn4Wh
M/DfX03Z1GRBzHDaIaJIn4FqNqdnAUzr87LD5D+m6lloUQ7lT2oQQPanPRcv
tc0CV8AaKa5IAD+ccRPt+jcLOSH2+Ynv1+dze4RvAXEOshM9SVO3BDCltWDn
pT1zIFcWsvOhjgD+a5Z88zd5Dv4sF9kPfeFHl7qx6HzfeXh4ZEVsvoAP+aJ9
QS5iHnJGd9gnp/FhwTGWidjYeQhiJWjaPONDjloJA4/MeVgZFXKVDuTD9F/G
ZLmBedBfjF9IPsiHE5V5vrHHF8D3vi7rw1pevFQaZuMutwiv9PvaU+Z5ULz/
EMvszkXoowuEfhrjwSrShnf+uAioCdGt3Twoi3fokacXwSX8eKhhBQ+2FTwM
SolahPTgsQvzT3hQKyv1edvkOl/fgixo8SDv0/J27bwlaL8ruX9sOzcW5t8K
rCxZgnsbjq41inGja+tR6RP1SxCe3LapZQM3lm6qd7YaWYIHhw1jtvVyoW90
27yP6DLQZntkxGO5sCd8RPB90DLsD5Pf1LG8EbM9OE8KHVmBtEkTr6xuTqx+
wu+bcWoF3qhsl9Ct4cR/JSKJB+1WAL+8IU1/4UQRYfnRC9dXYLfoUEHiI04M
K9YNLf64Au1p4d3yxznxFN/1HBfpVdi0Kdu7p5QDF3Po/N+WViFp3nMl6zs7
Cvyd32u8YQ2SyJVxe3LYcRsb4dyg4BoM5jFEG1+yo60lVzrvjjVYWfY/rRfO
jtXMijoOTmtgrSMeIXeEHZ+b2l3hbl4Dk6LYPY+bNmDSNdcRVTMCPrKI67ZY
YEPVog3zEWcJWHI9mJcyzoZFzG/IXbYEzHrt0DbUzYbdd/ol73gQ8KmzbU1m
ORuKvzhrNhxJwL7Rb3lD8Wz4pORYSdJXAj6+Zu83pcGGMRt3PeeTJqJGNfvj
X1GsKG3ckOa8lYhfEiTcdgWzYnacR37RNiIGaI0pvvZmxTqJjCY3DSKad5MF
s86zIteOLRxVJkQc2277xFCdFW+dEvIJjSAiZ77ajdeDLBiSuHxieoyIpeqC
36yMWPC4at4lRQYRbVgzp410WVC8+PJ9mwUiCu4xfKi3nwULekfq6sgkbOFQ
azNTYMEp2bZjGeIkrDMK+9fPwoI26R8NHY6T8PDCPsgoJqNWvtuR1hwSunjk
kRMOkJFLX8GZu4CE1M0eLS/UyNjZPnDzUBEJx8ON/dOVyeizbFmeW01Cu/sP
+TrEyJgFBofvD5BQudlyX+wqM0qWyenqb2bCYvGvhIvFzEho7Mavfkyo1s0W
5HGUGcOGC5P8gpkwddMW+yIdZtxASCDtvcmEwfVqRKEDzMinfLrk40Mm7LLh
Vv2rzIyyEfWHM7OYMPrvLYVSbmbU1/hulPyPCc+krg4wmpjwwcuXljeNmVHu
bqpklB0Tbrni4GOiQMadov4vo+PWde3rOpmoSsaTwp57BqNJuItgrjKym4yV
wnsDDkaR8ODtI/+ua5OxtMKKhTWIhFYpSiZplmSklEi7/HQmYVzTlArpHhm1
iRR3SU0SktWuD2YyyCiWpUbcOELE/plHpzi+seAl9Y6cz4ZETNbaefnPDxa0
4PnjkKFHROs7NfcyK1kwP/u5/GttIrbLkCtOtq7HB7VXpO4lYv1JT41nDBbE
dtPBZlkiFmYflVRWYEWCBtPBydV1314kjhg9YkVtzwbn8RwC6g+4BMRcYsN3
gyzHtmwl4KEAarqODxu+TBPK4ZYh4MFNne2zgWyYO7+2uCRBwH26huoWt9lw
9Ox2+T+bCajwSoVBfc2GxeaWKcWsBOSwn3b62MmGEm3WzyXr1qC6P8Ck9fAG
rFa0PmtlugZG/dGK4uLsuKUneDDdbRVGftgElWdwIMvgjnLmiWXYxvtbTNt6
I1rlnVzJCl0Cdpg538ngQqNSLedHZxbh8PiZOWlTHmzduvrt4/4FaP1uRzyj
xIsjpQ4h7Vrz8PFmiZXkDC+KbXOX7r84Bw5kr+6aGj6s4c9IPPhsFmw9r33k
fMKPXTy9nKlDM6DiqFhz9LwAnqk9+/uG7gzU8ilxeO3dhJrM688waRq+vA95
qrT+b3TKZviS+abhGlHhePUfQRydMN7xXxAD2Dv99NxyNyNHfZnev8UpGEiV
ik30F8IethZ7pvApiN0qzJxvur4Xf+bbyOCYgugnDj/PS4qgubuQ87sXdDgT
e7aGc1AEY0j6Maf302Fe59VCYiEFP9psveXRRIO+gYM+3yNEUfHV7NX89T0u
+cB2yq/zYpjUU9XnvpkGGeFevI7K4vjt4OnjZiGTEGFqa8A0I45Sfe72gV0T
oNaZ9DbilwS6r94RtFWbgHj5pxm/DCSxsXW43vjZOFwvuhNvkC+JH2QtvPct
j4EhxfRVpYwUXp1UFQmyGwMtt58WvJFSKGbiuhbaMQqJojYy1TNS+MxCpOKl
wSjI/HgdZ2QhjVHMMjvcK0YgWvm7QkOhNAZakjsuGo6AA4O5vkKBigrxXnmF
lcNgkz0lGXmPikEOn5L3mQzDhZCTy/r3qThnvCdb1XgYvE7mtnA+oOLDf0dW
txwfhpszXnej46gYpTJ2UuDoMLzfu7D0KIGK55MTR+naw7BQvPY7NY2KtLZX
RXk7hyG6gfNOyU8qPn13JukK/zA8eXnR6UYFFQ2UHB09eYfh5ZUabb0qKlL9
jrt4cA/DJ8HoxaoaKs5uC9tykWMYOs/wOzU2U3FqbcnbmWkY5PqEtXv7qCh2
POHCRcYQqOb6iacMUJG9VWvRjT4E+8I7FuwHqdi8g/bDY3IIjsolZA2PUJFi
sJvDa3QIPF0lxel0KrpdXXYM6hsC//3BCx8YVPxvILQptGcIwjf2Nl2ZoeJF
7wz/iK4hiM98GTU/T8VDQTnX73UMQXIQs2PBIhUbdb3bH7QNQdoJ+4P+y+v9
K3vtEd8yBLnSZWKaq1TcuUvjYELzEBQytiysL0zoWEo9ltw4BP8DIdEi/w==

       "]]},
     Annotation[#, "Charting`Private`Tag$36917#4"]& ], 
    TagBox[
     {RGBColor[0, 1, 1], AbsoluteThickness[1.6], Opacity[1.], Dashing[Tiny], 
      LineBox[CompressedData["
1:eJwV12k4FW0YB3BLm/XNUlGIjpKtRSul/5RQkihKQoWQSqVQllQqhEIqlEgL
skUohRBFhOwhO+fgcJxlylbe6dNcvw9zzfPMfd//mUfJ7uz+EwJ8fHwi/Hx8
/66xV+zmrHUI3rbQYbWI3rte3dJ6ReNDiieRPDHhvG1rNGY+F/orKl7G3+43
G/Ub30A8Ive1cMt1nHITr9gyU4zYotClsxWDsOmMZ9DI4a/QYDncmXG6C+7e
WP5afMdP8Sd/p5sjkHxwPcGRa8RpXfczv5dGY38nT6Jbuh1vGrqe8/Qe43jX
lH7S6k5MnjJuZzvFIeHpcufFc7sRz98e9Fv/KdrsboWGW/Vg57fw5b+aE5Cs
td4hKrIXjCjDYt7J52B/+6B16W0fQhz+WHOnXmCZamPr/rJ+1E85R44tTYaG
pE/cw2Q6PL4orGFlvkKvft89a38GFt9rqBzRS8U1/frtzSaDKLS97cRsTENG
/LqPe8WGYKdGCA47ZeCO7vy03o9DEJjyquH5vEZGtDsZ6zSMhi4LeZ5+Jtzm
lMFxNhOXUkXyOM1Z6PzsF262YgRGEQNzOPFvYCRuItr6agRyl4rN2Sez8WXw
hxSxchRFep5jrKkcCFXUFBf+x0KE6v5trNJcqO/4LlzmxYLDf5oho6FvIbbC
dOBWFwtz23pURpbmocMxbWejyRhaigrcmYw8xF9Ij2j2GsOrl1GfhjPfQySl
bV/b8zGYuJkcHdLLh1R87XtH7hgULVXTBkUL8MzBoFpFhg2O7qwpRmMBDDdU
PLLZwsYDofcP6E4f8eqDhoC/LxvZnkZuF2SKYLb9gcLjx2w8Htoky/UpQv/N
P3t837PhWivpxNEvxoZFqzTbOGxIPi4XYDeXwFn5y+3YQxxMiecmn9v6CbYm
n92iXTnou/bMdCz+Ex6YFYdW3OAg1+nKE9bJUhgb8E0w0zmIaz2lf7a6FPmT
ybKcEg4C9x5mjmqVYc+PNcv3NXFgtW69zuhUGVzsf06tmuJA76VS95ljn6HB
SEr/KMqFhux/gSOlnxG8IVa9VJ6Lv38HG5mhX9C3ZLsqsY2Lp1/jzg8vrQA7
tFQj6jIXvKgctc6QCpSZhWdfC+TCwKmyt26iAvl5dUHkAy6Ygr8t3td/hfaV
z853s7jYrGuiExRQhfFeW9nZ/VwEizhwfXhVUC3ZvT1/jIuOH5dTzx3/Bks+
XyOFaS5ueLxQsNxSjZhJjRiWBA+1GdMCKqwabGAJyS3S4UESQrZiq2oxv1XQ
zUOPhy0rInUCHGphMkte/4ExD3d4yVyv77UwW1vNXWrLw/rwxhN2Kd+RNlmn
H3GFB9tLx3a0d3/HUwILNW/xEHB0WOGgTB0abOkGD0N5aNXkb9l9sw5v+5fU
dD7iwe+rhtHao/WY0M4ydc7lISnz7YqU+/VILiDdXuTzUBe1Q3B5VT0CAoyD
80t4UHayzJfRbsD6xE8TPtU8fBW8sYpPqhFLbFdK2vfxwBsSF/Ha3QiOa6JX
yCAP8nXRdK5fI3LaF0c+HOXhXHxGPJ3ZiLhBf+mD4zws1G2TrPnchFAvO6sg
YRKEsiNr158mvIneFt4oTuKkCLuyZF0zSsWuQ0iKRP6POTdz45vhyXp1QXUJ
CTsPrd+xXi1oFjLaaqNGIsSmoH5RZgvSXQ4eIjVJ5Ozc9Tqc3gIJdXvTy2tJ
zJOyPXnT/AcMDM0KDTaTSM8Iaju9qhXPNh0ZFtQnMSQ5FGJ0vBXb78n9aDAk
oeJhtG1lZCtSlxtoPjQiEb9V5GnvRCs62we2sveRiKgIcbQqa0Plt/VcASsS
1RojizaPt6Fo/Xd5J2sSImF7Kxaot0OuLK+30JbEjYPiGt/D2mHqlqBtZE/C
o/cu29D6Jwpcz/o1nSKRZTCWsPzuTzQ3igh0nCHBSjY1Fyz5iekJ0cHWsySc
z0m8LVTpwLoBl/ScCySs/kT4bOB2ICvz42GeF4k4kUp/Cf0uDGxKSs0PILFN
19v6qm0Xgs+UVK8OItHuqr6B5dmFsYMfZ2Juk5CpCx6oekU51kvGKpREeJTx
7sD53fi7Vqf4SgSJNV+nlX6rdqNhkct0zj1qf1Opkyf0uqHUGGU4EElC+KhY
qp5HN/gWh17TekjCf3m1+ExbN7Q28Qf7PCKx7NAV+hmyG0vCRs38HpMoClxV
1C7egxaFD3w+sSSmh++cf7+9B0JcN0/7OBLuWfsa3BN78FPrsOVIAgnpvpnU
viIq5ytYY8XPqPez4PXNA609EDSbUgl/TmL00vxNa8V68WWSKF36koQTvkcz
3XpR/uZtz0wSCb6EX+/bgntR4xxunJRMImqWXPvX572wkfBeavyKRHmFo0Jy
Uy/u3d+qdyuFxDGNEESxerF2c1q2XCqJ8TuZxwLm9UF/rn1tOuWV5tMJJ3T6
YFYXuvNzGrWfXKVS8wN9SO/S/7AnnYSlrGG/3uk+yAZWyXyjHNgRrrLsSR9Y
dvXFnzJIMJxVUjv4+yG396Tp9UwSVyuNv31bTH2X+BVuMCjLrHIbzV/Xj2oX
I5E9WSR2cfPXPDrRD5PkUf3Zb0h0WfSY3b7SD979agkbypfezb1w+WE/HpWO
H8+knOy7P+dQRT8a6DkF+7JJ7OjybDLo6Uci8V9XNOXWHbG/N0z140n59uwu
ysLzGNrSmgMQ5SbFOuSQSHAROyJoMADZh8rlTynrfNPy4dgOgGYjVNNG2SXC
t7A2bABlRzNjDHJJCJAJnR+TB/7NzwVPyjGHyvkySgZwa6Wu6QvKWu9HlJ60
DUDAq1enlvJXOSm9UN4AdhdmbR2nbOe32cFHjI74OIat/FsSk902N0+toGMm
6fErUI7Y6f/SCnSoChevPEpZPTHpy25LOqwsaD3elEuFqhmbz9Pht+VM533K
1qe5Qitv03GNWK6aRplXLaO+6BkdDq4ZX4oph6zdZjwnn45VAiaf6ikrR9qf
IRvoqJdeptxLOf9X4J2+Eer+7RocFmXzw+kZ9XMYMDXcu2GSMvNDfW3JUgYk
XxqQ/O+oeVaYYGduZiBT+4P2XMpy1xSknpox8L1mtbAw5exevfVhLgxo5Yu4
/rOxwUkLP+o/w9cp+vQ8yn1JdzxcHzMg1j5HbBZlH5HshzY5DND3OR78Qz1P
2vXHO+NqBn4np+/jUU6r/ftjC52Bu3PyZxiUDdYpT6nxDcJmo+mZNsod93fL
LZYdRNRWqbhKyh7jrrpCWoP4UXHvUR5l8SORtuNGgzB4Y3jyBeWXBXl+dPtB
vHYOEb9LeZtiZ3yTzyB0HBPDPSi79qv2ZqcPokyY3+hfPbpsf8wrrhjEgX7V
ln/1OtASuOpb3yCaOjL5Jql6bq6kX+5fPAQ5lvu2FMopOx/GsTcMQXVond1V
ygqFBmV/TIewk2Whe4CyYOaL+QsDhiCTErGBQ/WXh5rFxmUJQxhP23eskDLj
2SzrVQVDYFjn2gRSrn5gn2jAHULf1hdDCyhH+Sht8zw6DLfb9/8u+tfPv2rt
/b2GoX6171w9NQ++Z68G3b0/jOQ1qfQQynZ2nQ2JlcO4md0wMUHNl8au2FMt
m5hgeyuZFFDz96TYOLxvPxNBZaeun6QssWU6d+wME83WLnQpyr80jwgIPWci
9u9yS/vXJIqlZKO154+gO5ZzbISa9/Wh5YX66iN4/+hTYjDll3Mu9ZkZjCBZ
+Y3BSsohE02rXXxGMN/5cJw1lR8HOyM/xzBGYCiiqZ1F5c/Qq/m8qaJR+B9a
Uy5N5Ze1cpHsvPZRvHLyiY5JJFETexbSv0ex1fPD7KWUs8Oqb2tosnBkS18B
jco/P48QJZtoFhZvHJaQp/JRWOmGSufmMdTpNxrVUflavjV89RX9Mfju9OTf
S/mW5ZNN8vvHMHVsJuPzE2qew94ZHjk1BppRxN9cKp8n/zKdmmPHMLuy83kw
lefD7RZJNQJspNBNZeZSeV8VpaJaVMWGNz3sqAX1/bgzv1Lt6TEufose+/vG
k0TeJvkcE1cu2jqUG5keVL/bnsW0Nxd694cnlSlvSZMyP/SQC3p/sfa9i1S9
d1v7ilVzsa/LO8PpPAk9/5Gay1t4INaqlLFdqDwm/3Pfv5DEitZfypE2VD3b
zD8KVv3Ca/+q2we2kzhfdsPurMok9rEynC7OJpF5TvSAzO4/cJM7nSb9lYen
3qeG1hziI7p0mXMOBPBwPW7ajMfkJ2JvMjOeGfLAV99F5HsJEtaZh59cmsfD
iouOl8zVZhPmHJWSW5+46CMfHhQpmEP4/H4avMifC6N+F9+I8/OIA0kS76x1
uTDpC1NXUBAmWu1llq+d4GDok93V8jQRInv8j8tUHgerJJrk9Y6KEUa+8B1y
50AY5PF2rjjhr+WwfnAjB4YjVr+XWcwnRt46iupz2WgpceC30pAgvnOCtG5n
spETWGqrSEoQV4LvHm67yKbOGO5d1dWSRIljk2n5Ojbs3bxzRGOkiOQgkctv
f49htZN6tfFxaeLSfJE434Ix1EhqiLhrLyBK5FMSJf3G8CH9+iMNwYXERbmU
F4FUX3jzq5lW/VxIvNXImsedOwbhdq9drtmLCCKJu/dOFAv9L5Ui43xkiOEM
246XaixErpSdlWchS7iMaHnz5YwiLMbxy3HFxcS1gIGw2F2jsIq0qRalLybq
HF/WZXeOYHzni4m4wiXEGQPuE5uzI+jt33GpJECOOBihaciZO4IE3bVLvh2X
JywTrOIto5lIu+ku4aSpQPAdTBbyXsdEgIX9HkFSgRAa/2HLrB3GhvanyQHf
lhKGAqnWl6nzV5Tqo7RvexSJlbvKb56cMwy/otCoPXmKRM49qc2ZT4awd4nF
i6/KSgRzy5iAuc4Qtrt+OSIRpETIi1/cwNcxiDg5O+UqUon4GjIxtNt7EMqf
Eh+YHFlG5GX6ObgqDiJMs0StrnAZcUxE8XVYOQOO3FnfK9RoxIIYN74IKuft
MjmKQXdphKfojhJZaQZOXz8wbRROI0wExKxiJBlwP5DdLHqPRpgruwotkWAg
kHS/E/aARjzRG02XE2cgXXti6mEsjZAzKZNWmsfARPFM08sUGlF/tcJo1TQd
YXWioaVfaITgfn5Lqz46Yp6dcb5VQSMsX+7r+tlDx7OL1Xq7KmmEb4v41ePd
dOQuDJusrKYRdPW22Sc76Gi3knKub6TWN3Bb7XILHSq9sno9vTSCdmx7c2wV
HWuyvRSe91PrjZJoWlZJh87NtokTdBphOItgJlbQYawS+3pwiEYMVmXZZn2m
w+2UogKbTSOG3WuOlBfR4bP12kQWl0acfnpugclHOm6K9TRcJGnExhTHgfoC
OqIyngWPj1PrSTeu7nxPR8LVWU7vJ2nE4QM6/Sfy6EgxO7HDZ5pGQP2SFPMt
HdnLPstv+0sj+kVmH3bLpaOQu2JiZoZGhHztzBnPpuN/v42crA==
       "]]},
     Annotation[#, "Charting`Private`Tag$36917#5"]& ], 
    TagBox[
     {RGBColor[0, 0, 0], AbsoluteThickness[1.6], Opacity[1.], Dashing[None], 
      LineBox[CompressedData["
1:eJwV1nk0Fe8fB3B7i+yllGy3IrRq0+I9USq0kKWfRCEquxIqpVIohJCSNYoi
aSdJluwie4RsN/u9d1z3XpTffP+a8zpnnpk5z3k/788o27qZnBbg4+PT5Ofj
++8af9VWZIP9XZ2pGamCSsuUXSUNSkYWSmfxyaz4yUyNFWa/FdxUUvJFZF7a
Mv2RSxCPfP9qfusNHNPeMvLeJgTxhaGKwkrBGJBaoKuZ9QCa4/Zhs473cJom
N844nYxf4gn/Zloi4b7HySI97hmcd3m5cBQfYmtj1UGHvNd409idOqH3GFMf
F+//7vEeU05GHUzHRES8sXCp0s/DnpqIlZMtKfik+fmZ2KKvaJg+E8VQzMBn
LWenOQoVuFimsH485zn+quuRwsursPR+Y9WoXiYMgsIMViypga06ITjsmA0h
lRuSGdfq4JMpmstqeY2rJo8i3xONmNPeozqqmIu5Chr5jeLtaC387DXyJxcJ
D39qaLe04/nT2OLhnDw0RdfebonrwCHPQzZDevmIxP+E2HKdiJmXF0N3/ILS
mLr0dK9uvPU28Dy/pBBhdAmBkKpuPB7aKkdeKUTkltjSCsXfcK2TdmTt/Qra
XfrkxeLfkH5cLsBsKYLhbp81QdweTIu/z3DfWQyHAKuQtbq96Lv+5AgjqRgF
2dkS5+/04r3j1YTxsyUIYKcGT8r2wVJr0/ax6VKMqTnqflHqR3JlosewYgV8
W0Qk7/8dwETsO/WukAosb4u0UtSmQ9+xqvcHrwJzTURehp6nY0SQY5bXUInu
B6H2mv10bNt1aHtwYDWKo7xPa+T/wV1Re/LKRDXObXp9/8b4H3S2+Wa6n6rB
/MKpwTHlQQRcTFM4tqMWektFDZYHDKIue0ZAdfw7NjX8y7fTGYI05lmLra1D
zsRBgntuCDtWRW0PtK9D00Scd2XMEMImMshL9XU4frUnVXtkCJsimk7bvqiH
avvPuA9hw7hWqWmwwaYBYldPBF56N4L0nA+rXkQ3YL2+vueXlhH8iNUVXFnd
gCGPkHlXeCNY4Xgsf4l2IxryNQMdd4yiUjBgLZ9ME3oXZ2Sa5I5Cdle79Pdv
zTCeK+3yMHEMxAqH8f1/m5E1M1wcmDeGs6LMqiKtFrQ7i1vLNI0hv03k1vuk
FvhWva2fN28cthc3cuIvtWL9v1DnNOdxvMwObnde+xPDeZsu8kszMCQ9FGJw
6iei9G3HpeQZUL1ooKMW9ROrlU0PCaxiIGmnaHIv7yd25J2qD9BmILIixMGy
tB3nQhs6FGwYuNh7j7nP6hdsAoa2iqcx8FqfkbLy3i8sT27lN89iYDzjiKlg
0S+Mzwp3Brxj4Iy71IcC1U4cT/Q2fFjKgOXfyCubyU4kRgzOedbHQKJo1U2p
vd3Q6vVsSlJgQmfXZSt/626of7CevLGSiQ5Xjc3j3t04rKZuY6zJxJIfdweq
n3fjanCW8lttJiJijQ4ESf7GfLPUxtijTNxcWSs+2/4bBvbyDrIBTDii/uGI
Zy8if53IdGxjgi9lMq/9bi+uWCb+WNPJRKyQfEdlai+26y8NofcwUV7hoJDR
3ItPR6SNt4wwoWY6k3J6ex9OBOzR3PuPiT9nVDM7+fsRpWOeoK/Egn+VUU3N
0n4krW57ar6ChSVrPcfytfqx5/5Ceys1FvaT+evjTvejbPjl+QPrWcjwM3ln
UdGPLYJdEllg4VykX0Fd+AB0F2msem3FggA7petLxgB8FEzD1E+y8MiinC+7
aADHDXosHtmxUCkvoxc6MYCAXkeXk+dY0HiWXnbgGB1hKra0YG8WRj411BUp
/oG61aevNuEsuPav7n37chDdQxtPvMhnodu6be7XikFYpB6UcvvCwtHWoLU1
fYNoWj/grVHEwrYqum//0iHE3k99HlbGgmBOmqRs4BCyhWXy+H6wEHtFWcfb
ZhjluhuMnvSzMH+yzu7mpWHsvkAvm6Kz4OfmH3wvehjhqUlSRkMs2Np2NT6r
Gkb8BdFDHWMsaO6Pd2rdOoLlP3mL33FY+Coj91BbchT5Mxc+ms4lsSm0vGCv
xiiiP2qJHZlP4qmIT5+xPuVbsYv0F5AI4TWvO3dlFEsePL6gIknCvCvq26M/
o6jdXVARv5jE0HPJienCMczLMN2TsZLEfOUA1a5tDKwRNGDZ6JAo3xmx7upe
Bn76XJ3KBonbxxK2Ljdh4LDfl3szBAmB8I/7jjsx0BE67HdXj8TUvxHHlngG
hLNtNK/vJzHcYZb+XYAJDyH7nHpjEs+5tq9cJZi4wXrxadSExJmF7h/F5JmQ
XfQzX8SURJ/hnXLDzUz8YojnrzMn0ZFX8KfMkYnXR64ftbYkUR2rurqwmok1
eX09G21J3Hm7aYMNldOG2l5JZTsS++t2a//rZyLp1ct7C+xJlMyxOrBzlon+
Dbui2k+TyL8YfvbjBhbMdO7qW54lkWXKy3gVw4Land2RnW4knN1FXh9+woJJ
IlM+1Z2EeohM3lg2C/8qdPc6elD7W7ymUrOCBR15N/8BTxIJG22H0qdZ+KCj
tbTCi0SYZJV68kkSGnXHAlQuk8jduvzdIVcS7Mexh+sp91m7YYa6Cpiz4vyu
kNiRJWNq8YBE/E+jqlo/En8OWPmJ1ZLQFnKbZ+pPYqHHyzmf2kmYyD+1HaeM
WL7IM4PUe4e8bIOuk4gZSH1aLDSBXyaljm9ukNC7Ofrdd8cExErnCo0FkHB9
DkvVAxPImNEW875F4lF9RF+j+QQkKj90/aXMUNzCW+c5AZGDa5hCgdRz86+q
DKRPYM7Wnq28IBJctoSXiSwbq3U3lfiFkKAtt52dpbGhl/sQ/ZQP7XkbnLWB
jfv3jhQZhJJIizyWMPcgGzax08MSYdR3r0suK7jJxmjBpY0375G4ak4aO0ew
Uevw06Cdcobf3g65RDaE4wxubwgnwVc9yLiQxwbP5en5VspZZzYu1WCyIVjx
/KZkJInWewGprf/YsNu3QtKSstCH5rW3F0yi661/WzJlS+HLer9VJ/EqSHed
5n0Sc1OKnR9YT6L48bydmlEktCoWcfY4T4L/97DQGcrWDMfrLN9JENGFKimU
3+ksiDkYPYmmu1VnpKJJ2LabfhGsnkTOjxqXDsrz4367eLRN4tTizRbzY0i8
tnSV7xqYBPyj8rZQFvwZ6JvHz0HTEVfeHcqZDxeqqUlwMHN+ou01ZdP/JTdH
y3Ow5PAdnTbKqa15Wh5bOVi+qShemcqBUey+ns49HEwU7o3Xozxh0RhuZMLB
wKrH6vaU97aMjqq6cHDRw4ibRHks5tLj6EscXDaz2fWZcoz5HEPBIA6WaXyQ
a6U80KSU3pnCgUirR/K8WCqf0VnmRq844FQ6GCtR3mK2XTjvMwfnZ0uSN1Pu
XFj2RrWKg8YvFVEHKAc2HrWNbuXg7ocsTSvK66O6JQUHONCcTXVyodx61OWL
O8nBd9Wuo36U/WWmXDr5uDDZF0i/S1mt4ba8kTgXJQIlag8p10XKVOUu4yL3
0Qe5NMo+Jkm+qqu5qGdfy8+mrCS9Ri16CxfCmVtkcilX1Oc2C+zhQk+KqfiV
smeE/i13Yy7eEYV9ZZSXGjdodVpzoaSaY1dDuUjyZI+hMxeLQ6sT6imfqxsJ
z/XlQkZlcWwjZelwX6gGckG7HWHcTDnvsMhYVBQXbqbbav6zrcT9xwIpXHA0
hcT+s+h3RUP3bC6aCgal/1v/NiyT9yufi/f1bd11lK0OaacbVnLRePirTzVl
IfFv5rktXBw6HNzxjXJmjYmwaj8XP5YtFi+kbBra9SaKRT0PRhIfKc8YOdsK
8PHQHCrS85Jy6gKepLsYD59WKwWlUj5YfevLr6U8eEW4Cf63f5N3pV0N1Xj4
39MysxDKCYaJ8rmbeQh4x/G/Snms8qNv1BEeuveLnrWhHHNnr5qANQ+l9ZdX
H6KsY/Cj2c2Jh3i3zoodlO9VDGsZ3ubhiJZrjgzlbcE+PR/v8yAlIzbzl8pP
937hiFXJPCwJub6GTnl9ucIYfz4PCvbPDd9Tbg188ditgocfm9/veEzZf982
w1/NPFyO1pe7Trnum3H6RyYPy3r8n+yj7FEaYOumOoU1wteVy6n8K/Tpi0xq
TaH/qZxQOuUqgXnPrxBTCDIcEAikvJIIZQb/j7r/gIKlLuW2vGj/1LtTmD2c
HPGSOo+32yxWaMROYRH7uk8gZS2uXHlOKrU+ze6WDeXQzQkSXz5PAV5/FolR
3v3qaULb+BS0/HI3WlPnfaz2jO7JmSlcb/Q8t55y3Kj6wMDcaezf5FXPT5mt
nr1mQnkaVV4NG1KoPslI+5AvbjoN49+zlm1U30jFlf/U+ziN9Gyj3SoRJApy
71ytLJmGkvVtBp3qL6dWIxXj+mlUsjW6MymXLqo/az00DdkHpQGbKPuGt3F9
5Gfg36Y4u53qw9+3hmRf+s8g0v5a5EqqT3PcFxxdcuAvjjY2v/am+rj6kYxv
lvlfdL/wvKhEeaBkaaKu/V+YtTpcLqf6e6nc6mHna3+hwr1zUJZywNe9N7++
+4v5dl/XZVB9by597c05lX9I+7qiNpOaF1NvmDKfp//B7lXUmo3UPFrYydU2
mTeLOfteCpVSc2rtXL6TdNlZnBgI3mFB2c5KPFNq4ywiN41V+V6ivkdIY4/D
mVlIO4+FffCh8mhmf0GiaRapq/zMZKl5mHzZaWi9BR+x7MWktYMLlZ/CedzA
E3zEgqefto87kygUShfusuMjWovskrwpd4f2KYW68xFhE8migU5UPpJOWAwG
8xHhpkEeSdS8flRyuCQ5n4/wKxthf6bmeaTYpgRpFX5CK29v+LMTJG4kzhhP
jPATgbv/ah0xouZJQzeRf0mQkJp2yr66isSqCw4+purChFZA7k4Ol4U+9gNz
0c8ixIqcia2Hq1gw6D/nF+kxl/AqvWm24wELh/rCNRQU5hOjW1bfXmXLwlCx
rX95lihREaeUZrmOhbVSzcv1bMQI4RsCHTs4TMwH+1QHKU5UKInLaRQxsW/U
kqNiJkkkex7U1QxiorXInt9SU4rQ+rbOY/wQE++CSqyV2FJEYHDidic5JhyE
vbpra6WJ1ymydqe7GLDzvPxuwSMZQk1BaKtJBgPrHDVqjU4tJJ5vF9W7dIGB
79Kaol7aiwgTZdctZ3cw8OnljThNQVniiNBccS8RBi7zqx+p/iVLeOtv4fU+
Gsf8jkv7Xd8uJhy3ma2r1Rinzp1yVOKVJcTmhm3nRUrHEKUmJ5RrJkfU20/N
CTIfQ/gjh7JTSkuJgRBjBQvGKCyjTtQuoC8lsjtFji0OHQV3TxovsWAZofT8
sqmPyih6+3V9igLliSHNayYihSNI2bVhWc2p5cQRC/XwC+YjyLrlJeW4RoE4
LyrZxZsYRqCZnaEgW4EwCHO0OR8zjM0dyRmBNYpE9MY4CbkNw4hdHZdVY6hE
mHN/3UxoGMK1wtBYw1wlYiKyxeWO2xAOLjNLq1yhTGy8sz/+tvgQdruWHZcK
VibEVTTKVN4NIlHedkU1W5m4P7rX3clsECuKn8UcOq5CLPeOStvw9w/C1xSp
/yhQIQIDTvoXP/sDB1KovkKdRtz/oFisa/QHtjkspeB7NOLNPRHeNIcO5xtH
ZwwiaIR4H2/h7Uk6vI6+bVlwn0a43aDpS7LpCGJ7hYXH0Igd7xf/WcGi46U2
b/pBPI3YHndR/fAIHbyvs81PX9CImyEp6c+66Qj/sSC0pIxGhJnuCzxTQcej
Jy5nblfQiGOEzAF2GR1PLtTq7a+iEUeLhZVufKPjvWz4VFUtjeALshJ7XExH
h6XMmYYmGqFTW9Rf95kO1V45vZ5eGhEcMxui85qO9W8vKaT204jdzzhJ1a/o
2H6rnXeaTiOaFotXWmbTYaQa/2pwiEZ4C0Qd986kw9NJSYHJpBGDZuzLOU/p
uLLzOu81SSNcv9RvI9LouCXW03iBTe2Pefn870/oiM1+cpfLpREGDP6xkSQ6
UvyFHPOmaERgr97s5UQ6Xhif1r0yQyNK+uNXiibQ8Vbl23KdfzSi1FXi1KPH
dBSQq3jUDyWxePJBzuo4Ov4PpgWKJg==
       "]]},
     Annotation[#, "Charting`Private`Tag$36917#6"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  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]],
  ImagePadding->All,
  Method->{
   "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], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.8720659847328873`*^9, {3.8720660240572557`*^9, 3.8720660693190823`*^9}, 
   3.8720797720468283`*^9, 3.872082381692892*^9, 3.8720825215436277`*^9},
 CellLabel->
  "Out[159]=",ExpressionUUID->"72d52e93-3940-4f78-b42c-0cf2ed96638e"]
}, Open  ]]
},
WindowSize->{1389.75, 768.75},
WindowMargins->{{0, Automatic}, {0, Automatic}},
FrontEndVersion->"13.0 for Linux x86 (64-bit) (December 2, 2021)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"b0889cd1-0a5c-4e57-be2b-eec56b268622"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 341, 9, 71, "Input",ExpressionUUID->"9b612f72-e759-4179-a3e9-4083b56adea2"],
Cell[902, 31, 294, 9, 46, "Input",ExpressionUUID->"8bfffee0-f250-468a-9e67-dc88acaf3f9a"],
Cell[1199, 42, 294, 9, 45, "Input",ExpressionUUID->"c0e7613d-88ab-4572-bfef-888bb1ed1cdb"],
Cell[1496, 53, 527, 15, 46, "Input",ExpressionUUID->"6da24be6-ac46-4de7-9bb3-1f6846511011"],
Cell[2026, 70, 458, 13, 46, "Input",ExpressionUUID->"9c7cd7d0-b5b1-4b72-a2b0-f700e884ae87"],
Cell[2487, 85, 460, 13, 46, "Input",ExpressionUUID->"97e249db-26ee-48c6-b8a1-b9508f82fc1c"],
Cell[2950, 100, 479, 14, 47, "Input",ExpressionUUID->"8408c1a8-76f9-49fb-b53e-31a64980cf4d"],
Cell[3432, 116, 507, 15, 47, "Input",ExpressionUUID->"db42c17d-3e03-4134-8999-1f429f6c01b6"],
Cell[3942, 133, 1765, 51, 71, "Input",ExpressionUUID->"034aace0-c4ee-4776-890d-85681f5e916c"],
Cell[5710, 186, 1376, 41, 70, "Input",ExpressionUUID->"354c6fbb-a6f4-4a89-81cd-72743beabd14"],
Cell[7089, 229, 1279, 41, 72, "Input",ExpressionUUID->"7e046243-a864-46a1-a5a0-7fd7213b4a06"],
Cell[8371, 272, 1134, 34, 49, "Input",ExpressionUUID->"5c6e757f-e1ca-45d3-ac1a-4a155d76ed53"],
Cell[9508, 308, 654, 22, 56, "Input",ExpressionUUID->"af4bd8bf-2657-4c4a-802b-44d2805402ee"],
Cell[CellGroupData[{
Cell[10187, 334, 1980, 42, 71, "Input",ExpressionUUID->"b805c035-89ef-4ad1-bc3c-0f1a4f1d45be"],
Cell[12170, 378, 41383, 711, 242, "Output",ExpressionUUID->"72d52e93-3940-4f78-b42c-0cf2ed96638e"]
}, Open  ]]
}
]
*)