SEI without vd.nb

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

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

(* CreatedBy='Mathematica 9.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[    624614,      11691]
NotebookOptionsPosition[    622221,      11623]
NotebookOutlinePosition[    622599,      11639]
CellTagsIndexPosition[    622556,      11636]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"-", "\[Beta]"}], " ", "*", " ", 
    RowBox[{"s", "[", "t", "]"}], "*", " ", 
    FractionBox[
     RowBox[{"i", "[", "t", "]"}], "n"]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"eq2", "=", 
   RowBox[{
    RowBox[{"\[Beta]", "*", 
     RowBox[{"s", "[", "t", "]"}], "*", 
     FractionBox[
      RowBox[{"i", "[", "t", "]"}], "n"]}], "-", 
    RowBox[{"\[Epsilon]", "*", 
     RowBox[{"e", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"\[Epsilon]", "*", 
    RowBox[{"e", "[", "t", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Epsilon]", "=", "0.5"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "1.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ezero", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"izero", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"R0", "*", "szero"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"e", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"e", "[", "0", "]"}], "\[Equal]", "ezero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "e", ",", "i"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"a", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<S\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Blue"}]}]}], "]"}]}], "      ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot1a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"a", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Blue"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot2", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"b", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"E", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Orange"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], " ", ";"}], "\n",
   "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot3", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"c", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShowLegend", "[", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot1a", " ", ",", "plot2a", ",", "plot3a"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Blue", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<S(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<E(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}]}], "}"}], ",", 
      RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
      RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
      RowBox[{"LegendSize", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "}"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plotall", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "tf"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.05"}], ",", "1.1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLegend", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<S(t)\>\"", ",", "\"\<E(t)\>\"", ",", "\"\<I(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Orange"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
     RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
     RowBox[{"LegendPosition", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0"}], "}"}]}], ",", 
     RowBox[{"LegendSize", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0.3"}], "}"}]}], ",", 
     RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
     RowBox[{"GridLinesStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Gray", ",", "Dotted"}], "]"}]}], ",", 
     RowBox[{"Frame", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"True", ",", "True", ",", "True", ",", "True"}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"\"\<Density \>\"", ",", "\"\<\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"\"\<time \>\"", "[", "t", "]"}], ",", "\"\<\>\""}], 
         "}"}]}], "}"}]}]}], "]"}]}], "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"plotP", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"Evaluate", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x1", "[", "t", "]"}], ",", 
            RowBox[{"x2", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"S", "[", "t", "]"}], ",", 
           RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
      "\[IndentingNewLine]", "plotQ"}], "=", 
     RowBox[{
      RowBox[{
       RowBox[{"ParametricPlot", "[", 
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"x2", "[", "t", "]"}], ",", 
             RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
         ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"\"\<E\>\"", "[", "t", "]"}], ",", 
            RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], "\n", 
       "plotR"}], "=", 
      RowBox[{
       RowBox[{
        RowBox[{"ParametricPlot", "[", 
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"x1", "[", "t", "]"}], ",", 
              RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
          RowBox[{"AxesLabel", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"S", "[", "t", "]"}], ",", 
             RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
        "\[IndentingNewLine]", 
        RowBox[{"h1", "[", "t_", "]"}]}], ":=", 
       RowBox[{
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x1", "[", "t", "]"}], "/.", "sol"}], "]"}], "\n", 
         RowBox[{"h2", "[", "t_", "]"}]}], ":=", 
        RowBox[{
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"x2", "[", "t", "]"}], "/.", "sol"}], "]"}], 
          "\[IndentingNewLine]", 
          RowBox[{"h3", "[", "t_", "]"}]}], ":=", 
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x3", "[", "t", "]"}], "/.", "sol"}], "]"}]}]}]}]}]}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.5638355904558997`*^9, 3.563835704468421*^9}, {
   3.563835950077469*^9, 3.56383606512805*^9}, {3.56383613822723*^9, 
   3.563836367357336*^9}, {3.563836441114555*^9, 3.563836444201731*^9}, {
   3.563836535058928*^9, 3.563836589524043*^9}, {3.5638366644783306`*^9, 
   3.563836665858409*^9}, 3.563836695909128*^9, {3.563836848841875*^9, 
   3.5638368525680885`*^9}, {3.5638372255084195`*^9, 3.563837265661716*^9}, {
   3.5638383151507435`*^9, 3.5638383180759106`*^9}, 3.563838362903475*^9, {
   3.5638384377487555`*^9, 3.563838575206618*^9}, {3.5638386112096767`*^9, 
   3.563838657701336*^9}, 3.5638386889021206`*^9, {3.5638388049467583`*^9, 
   3.5638388069938755`*^9}, {3.5638388495773106`*^9, 
   3.5638389667440124`*^9}, {3.563839052506918*^9, 3.563839071571008*^9}, {
   3.563839147339342*^9, 3.563839232596218*^9}, {3.563839314060878*^9, 
   3.56383942477421*^9}, {3.5638394696337757`*^9, 3.563839480051372*^9}, {
   3.5638395362795877`*^9, 3.5638395453271055`*^9}, {3.5638395986821575`*^9, 
   3.5638396665290375`*^9}, {3.563839704558213*^9, 3.5638397404972687`*^9}, {
   3.5638398239280405`*^9, 3.5638399312031765`*^9}, {3.563840014577945*^9, 
   3.5638400676949835`*^9}, {3.5638401105414343`*^9, 
   3.5638401221330967`*^9}, {3.5638401613373394`*^9, 3.563840168990777*^9}, {
   3.5638402066729326`*^9, 3.5638402331264453`*^9}, {3.563840302771429*^9, 
   3.563840436440074*^9}, {3.563840514500539*^9, 3.563840531504512*^9}, {
   3.5638405784992*^9, 3.5638405821144066`*^9}, {3.563840618338478*^9, 
   3.5638406387506456`*^9}, {3.5638407249235744`*^9, 
   3.5638408190029554`*^9}, {3.563840856229085*^9, 3.5638408646885686`*^9}, {
   3.5638410103198986`*^9, 3.5638410835630875`*^9}, {3.563904889849905*^9, 
   3.5639048947221837`*^9}, 3.563905146271571*^9, {3.563905177983385*^9, 
   3.56390518226363*^9}, {3.56390525411874*^9, 3.563905299470334*^9}, {
   3.563905472683241*^9, 3.563905489465201*^9}, {3.563905647569244*^9, 
   3.5639056597809424`*^9}, 3.563905703646451*^9, {3.563905742419669*^9, 
   3.5639057793877835`*^9}, {3.563905869972965*^9, 3.563905882011653*^9}, {
   3.563905928065287*^9, 3.5639059436801805`*^9}, {3.563906210805459*^9, 
   3.563906215908751*^9}, {3.563906296232345*^9, 3.5639063025807085`*^9}, {
   3.563906365490307*^9, 3.5639063658563275`*^9}, {3.563906424897704*^9, 
   3.563906433242182*^9}, {3.563906471104347*^9, 3.5639064759836264`*^9}, {
   3.5639065288356495`*^9, 3.563906529453685*^9}, {3.5639068329810457`*^9, 
   3.5639068636147976`*^9}, {3.563906895527623*^9, 3.563906897037709*^9}, {
   3.563907110560922*^9, 3.5639071121890154`*^9}, {3.563907274969326*^9, 
   3.56390743274035*^9}, {3.5639074760618277`*^9, 3.5639074793070135`*^9}, {
   3.5639075838239913`*^9, 3.5639075917484446`*^9}, {3.5639076912791376`*^9, 
   3.563907827329919*^9}, {3.56390786003179*^9, 3.56390792333441*^9}, {
   3.563908035557829*^9, 3.5639080787833014`*^9}, 3.5639084082481456`*^9, {
   3.563908463246291*^9, 3.563908492127943*^9}, 3.563908626086605*^9, {
   3.563908825166992*^9, 3.5639088270190983`*^9}, {3.563909238651642*^9, 
   3.563909240037721*^9}, {3.563909322232423*^9, 3.5639093344691224`*^9}, {
   3.563909382587875*^9, 3.563909606090658*^9}, {3.5639097046552963`*^9, 
   3.563909707405453*^9}, {3.5639097449105988`*^9, 3.563909747819765*^9}, {
   3.5639097912782507`*^9, 3.5639098366698465`*^9}, {3.5639098902499113`*^9, 
   3.563909890652934*^9}, {3.563909925842947*^9, 3.563909927602048*^9}, {
   3.5639099589818425`*^9, 3.563909959344863*^9}, {3.5639099995731645`*^9, 
   3.563910046916872*^9}, {3.563910148071658*^9, 3.5639101691978664`*^9}, 
   3.5639102340005727`*^9, {3.5639102721207533`*^9, 3.563910351650302*^9}, {
   3.563910421532299*^9, 3.563910510495387*^9}, {3.5639105664275866`*^9, 
   3.5639105760811386`*^9}, {3.5639106580418262`*^9, 
   3.5639106824562225`*^9}, {3.5639107247046394`*^9, 3.563910728398851*^9}, {
   3.563910840744276*^9, 3.563910862496521*^9}, {3.563910926792198*^9, 
   3.5639109604401226`*^9}, {3.563911036075449*^9, 3.563911037511531*^9}, {
   3.563911431340057*^9, 3.563911437320399*^9}, {3.5639114789257784`*^9, 
   3.563911493954638*^9}, {3.563911525254428*^9, 3.5639115374281244`*^9}, {
   3.5639115750762777`*^9, 3.5639115880030174`*^9}, 3.5639116582250338`*^9, {
   3.5639116984503345`*^9, 3.56391176008786*^9}, {3.5639119457344785`*^9, 
   3.563911983828657*^9}, {3.5639125210403843`*^9, 3.5639125490409856`*^9}, {
   3.5639125979987855`*^9, 3.5639126611083956`*^9}, {3.5639128670021715`*^9, 
   3.563912872138466*^9}, {3.5639130702837987`*^9, 3.5639131278820934`*^9}, {
   3.5639132526262283`*^9, 3.563913434192613*^9}, {3.5639134979902625`*^9, 
   3.5639135222086477`*^9}, {3.563913559982808*^9, 3.563913587937407*^9}, {
   3.563913643129564*^9, 3.5639136454726977`*^9}, {3.563913893811902*^9, 
   3.5639139485590334`*^9}, {3.5639139840870657`*^9, 3.563914064888687*^9}, {
   3.5639141429901543`*^9, 3.5639142000144157`*^9}, {3.563914269810408*^9, 
   3.5639142840542226`*^9}, {3.5639143487949257`*^9, 3.563914404738125*^9}, 
   3.563914455294017*^9, {3.56391451899066*^9, 3.5639146165662413`*^9}, {
   3.5639146469249773`*^9, 3.56391465099021*^9}, {3.563914684638135*^9, 
   3.5639146860572157`*^9}, {3.56391471638395*^9, 3.5639148044359865`*^9}, {
   3.5639148449423037`*^9, 3.5639148622662945`*^9}, {3.5639150099297404`*^9, 
   3.563915010347764*^9}, {3.5639151494727216`*^9, 3.5639152487053976`*^9}, {
   3.563915326603853*^9, 3.563915346531993*^9}, {3.5639157813918657`*^9, 
   3.563915788211255*^9}, {3.5639160749616566`*^9, 3.563916084421198*^9}, {
   3.563916863145738*^9, 3.563916867956013*^9}, {3.563916974604113*^9, 
   3.563916998251466*^9}, {3.5639170471642637`*^9, 3.5639170731837516`*^9}, {
   3.563917169124239*^9, 3.5639171692732477`*^9}, {3.563917225221448*^9, 
   3.563917281815685*^9}, {3.5639173866606817`*^9, 3.56391743454642*^9}, 
   3.5639174785899396`*^9, {3.563917530621916*^9, 3.563917555013311*^9}, {
   3.563917726810137*^9, 3.5639177280732093`*^9}, {3.563917953474101*^9, 
   3.5639180072371764`*^9}, {3.563918038582969*^9, 3.5639180432792377`*^9}, {
   3.563918079533312*^9, 3.5639182234085407`*^9}, {3.563918264612898*^9, 
   3.563918265321938*^9}, {3.563918306125272*^9, 3.5639183204030886`*^9}, {
   3.5639183512768545`*^9, 3.563918397598504*^9}, {3.5639186015911713`*^9, 
   3.5639186261025734`*^9}, {3.5639188701865344`*^9, 3.563918974285488*^9}, {
   3.564081080539436*^9, 3.5640811343645144`*^9}, {3.564880574348827*^9, 
   3.5648805849744344`*^9}, {3.5648807151418796`*^9, 3.564880717960041*^9}, {
   3.5648808318375545`*^9, 3.564880834966733*^9}, {3.564880887672748*^9, 
   3.5648809435619445`*^9}, {3.564881002612322*^9, 3.5648810078276205`*^9}, {
   3.564881058793535*^9, 3.5648810605646367`*^9}, {3.564882586727928*^9, 
   3.56488258833002*^9}, {3.5648826193637953`*^9, 3.564882626198186*^9}, 
   3.5648828797036858`*^9, {3.5668460139647665`*^9, 3.566846039283215*^9}, {
   3.5679698042792788`*^9, 3.567970064740176*^9}, {3.5679725677883425`*^9, 
   3.5679725728876343`*^9}, {3.5679726662889767`*^9, 
   3.5679726673010345`*^9}, {3.567973103120962*^9, 3.5679731107233963`*^9}, {
   3.567973168371694*^9, 3.5679732075859365`*^9}, {3.56797329802411*^9, 
   3.567973310597829*^9}, {3.567973369819216*^9, 3.5679733855401154`*^9}, {
   3.5679734907991357`*^9, 3.5679735486114426`*^9}, {3.5679735856015577`*^9, 
   3.56797358965279*^9}, {3.5679736388876057`*^9, 3.5679737353241215`*^9}, {
   3.567973792365384*^9, 3.5679737986407433`*^9}, {3.567973868360731*^9, 
   3.567973898430451*^9}, {3.5680504360721536`*^9, 3.5680504883531437`*^9}, {
   3.5680607069186125`*^9, 3.568060711435871*^9}, 3.5680610124290867`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYMgLhB8sPfay+73LP2/PYx/lteMkyVW
wAHGd+p3PbDcXwLOT9X/xWvIqwDn+2qmfhRzV4HzN12pLT1poQHnWwtprWep
14Hz039Pmrs0wgDOzz/23Hi9rxGc3xXFpvo3xwTOTz5enWaYYQbnH2SXDMyO
tIDzDQUbpr0ssYLzEz7b6vjl2MD5C+cdlfneawfnb+6zun0pyAHOL9llGzDX
xxHO339q6afOaCc4P9Pdcm9mhDOcP2eF4dbsLBc4f+LnvY0F5a5w/rNVpWUZ
RW5w/hG3STOamtzhfEb/W4/6GzzgfAbHbYwLKj3h/A7x776X2r3g/IKo5EPf
m73h/IeNJin2U33gfJHJM291LvSF85cJaFUen+2HCK8ieVf11f5w/jyFBTK2
IQFw/t6aXwwZFxB8RW/2P8rhgXD+lvOa3TevIPg9x/4ZKMQGwfmTi19mJdxB
8GtE5fiVIoPh/JWarKdKHiD4bF8YJQ/GhcD5yw021s17juBrJq3y+5sbCuff
9ty5KfQ1gn9pcZWufXEYnP9jc6CN0icE//+Ooq1teeFwvreBm2vNVwT/eKx+
ZnZxBJy/bkPB9///EfxTE28Xvkh/D88PVuwBG7buRMgvufH+VreeEpwfM3vT
jm49RPpN83rbfNHVGs7f8Wfy8m49JzjfNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwABISLJ
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.563907743722137*^9, 3.5639078278869505`*^9}, {
   3.5639080456444063`*^9, 3.563908068814731*^9}, 3.5639092803370266`*^9, 
   3.563909335186164*^9, 3.5639094029360385`*^9, 3.56390971049263*^9, 
   3.563909749079837*^9, {3.5639098123254547`*^9, 3.5639098377149067`*^9}, 
   3.5639098916179895`*^9, 3.563909928651108*^9, 3.563909965829234*^9, {
   3.5639100040284195`*^9, 3.5639100474399023`*^9}, 3.563910170080917*^9, 
   3.563910234553604*^9, {3.5639102991392984`*^9, 3.5639103100339217`*^9}, {
   3.563910341497721*^9, 3.56391035249035*^9}, 3.563910511748459*^9, 
   3.5639106061168566`*^9, 3.5639106878185296`*^9, 3.563910729665923*^9, 
   3.563910863025551*^9, {3.563910934545642*^9, 3.563910960864147*^9}, 
   3.5639110379775577`*^9, 3.563911537787145*^9, 3.5639115894200983`*^9, 
   3.5639117246958356`*^9, 3.563911761100918*^9, 3.5639119843426867`*^9, 
   3.563912211125658*^9, {3.563912529924892*^9, 3.5639125493760047`*^9}, 
   3.5639126092434287`*^9, {3.5639126440754213`*^9, 3.5639126625094757`*^9}, 
   3.563912872509487*^9, 3.5639130811724215`*^9, {3.5639131157043967`*^9, 
   3.563913128323118*^9}, 3.5639132671220574`*^9, {3.5639133687378693`*^9, 
   3.563913402407795*^9}, 3.5639134348966537`*^9, 3.5639135233977156`*^9, 
   3.563913588700451*^9, {3.563913895987026*^9, 3.563913950531146*^9}, {
   3.5639139857501607`*^9, 3.563914065325712*^9}, 3.5639141818083744`*^9, {
   3.5639143601525755`*^9, 3.5639144051621494`*^9}, 3.5639144584932003`*^9, {
   3.563914534931572*^9, 3.563914569290537*^9}, {3.5639146018774014`*^9, 
   3.5639146181243305`*^9}, 3.563914651813257*^9, 3.563914686855262*^9, 
   3.563914760507474*^9, 3.563914805281035*^9, 3.5639148637143774`*^9, 
   3.563915011097807*^9, {3.56391515416799*^9, 3.563915198166507*^9}, 
   3.5639152508375196`*^9, {3.5639153349503307`*^9, 3.563915347030021*^9}, 
   3.5639157549233513`*^9, 3.563915788829291*^9, 3.5639160863333073`*^9, 
   3.563916868753059*^9, 3.5639169986804905`*^9, {3.5639170479373074`*^9, 
   3.5639170745758314`*^9}, 3.5639171704213133`*^9, 3.5639172535280666`*^9, 
   3.563917287052984*^9, 3.563917356772972*^9, {3.5639173969422693`*^9, 
   3.5639174355164757`*^9}, 3.5639174804400454`*^9, {3.5639175399804506`*^9, 
   3.563917556994424*^9}, 3.563917730804365*^9, 3.5639179553532085`*^9, 
   3.5639180099273305`*^9, 3.5639180436702604`*^9, {3.5639181216007175`*^9, 
   3.5639181384016786`*^9}, {3.5639181818291626`*^9, 3.5639182241065807`*^9}, 
   3.5639182667080173`*^9, {3.5639183076863613`*^9, 3.563918321791168*^9}, {
   3.5639183526039305`*^9, 3.563918398455553*^9}, 3.5639186339480224`*^9, 
   3.5639189806868544`*^9, {3.5640810852497053`*^9, 3.5640811022256765`*^9}, 
   3.564880589386687*^9, 3.564880723247343*^9, 3.564880838900958*^9, 
   3.564880894806156*^9, {3.5648809309232216`*^9, 3.564880944199981*^9}, 
   3.5648810094037104`*^9, 3.5648810620227203`*^9, 3.5648825895480895`*^9, 
   3.564882628456315*^9, {3.56684602100817*^9, 3.566846040084261*^9}, 
   3.5679700749027576`*^9, {3.5679731049130645`*^9, 3.5679731116814513`*^9}, 
   3.5679733129589643`*^9, 3.567973387035201*^9, 3.567973549585498*^9, 
   3.5679735906388464`*^9, {3.5679736451589646`*^9, 3.5679737366251965`*^9}, 
   3.567973799844812*^9, 3.567973899445509*^9, 3.568050463474721*^9, 
   3.56805050087586*^9, {3.568061000551407*^9, 3.568061013047122*^9}}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxF1Hkw1GEYB/BVstW0E11ojGNT2UZrt4y0brWILLYVKo3I7k8IaxW1STSi
XQnTNXLlKia0pdBsWuOILpY/ajUTzeToUqjNsVQzeZ535p13PvN93+ev53nN
QmO44YtIJFLA3/3vpGZrSguNFY6k/8tTTuYMCeadFvySYrNMO1jXecGu2eyn
lT4G4HCraQqTYgr2poX/WOduDpb1nUnotLUA263aUqt91hIsmMktKA9kgGPa
h7fXem8DXzygs1ETZQ0O6zjNZxI2YAXZ0C8yyBbM1Eu5OipigUMmHCw5Ufbg
ksI2I3WWI/j+JVa/kusMFjU5+BbsdQE3d5WPZx50BUe475RHBO4C37zNrI88
thucMyE/F3uSDR6qSjhBCN3ArW6511NT3cFaPqoP2SkeYJLLQ63ipD3gDH21
t/KCJzj2QFiLOs0LPHjO+qjTlb3gNXk3VJkl3uAK3S1JHfkcsEJowt5c7QMu
NC02cuD5guXiaRLRjTbzIs9uCPADP3hNk7ztQ0vb5ximwVxwXvzosZB3aPFa
45XUoH3gO7QlXaIBtM6klqHiMA9cybiXXDiMpoVWcTTR/uD+PY0y/89oZemp
rU7x+8G/7/vZU8fR8w3C+vTjAWAvhhtb/BPdEWwVERkfCK6pi1XPz6O7cvrj
RgRjMA8ssm9dfSPmnay0xi+C95CnyJqll69iPnlwoFf1Dv1MqvT4KXgN980z
1NOa85hfYxq4ejxH+6XfDo/+hm5nxAl0iGZ4/0u4WmYtxpwwsp5KbkFT41qN
yj6iU/KlNTZqtCKxpsyCqIV6h4kSSvdJzHv0Wnjrn6AlfG6i0yB65PL65cpx
tH7FHDd/Bv1oKc0kmiiC+qvCiMcFCZinr8hcNPIY7XzEcBPlPfqmZPBR0Xf0
i+I2UsQUOrR6R/lLDbrszZhKQqeCD+XLGiR0/E/4nl/Teth24IbZvEoJ3RXs
wGNm0ZtwXluqXwl72Dhv7oujAkU9OD/8u9pFEjr2u0VQr16wCPv3k/at8/Qm
7Mc/CJY5UQ==
   "], {{{}, {}, 
     {RGBColor[1, 0, 0], 
      LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 10, 
       11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82, 24, 25,
        26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 37, 38, 39, 
       40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66, 61, 57, 54, 52,
        73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 76, 70, 77, 50}]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"E\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.563907743722137*^9, 3.5639078278869505`*^9}, {
   3.5639080456444063`*^9, 3.563908068814731*^9}, 3.5639092803370266`*^9, 
   3.563909335186164*^9, 3.5639094029360385`*^9, 3.56390971049263*^9, 
   3.563909749079837*^9, {3.5639098123254547`*^9, 3.5639098377149067`*^9}, 
   3.5639098916179895`*^9, 3.563909928651108*^9, 3.563909965829234*^9, {
   3.5639100040284195`*^9, 3.5639100474399023`*^9}, 3.563910170080917*^9, 
   3.563910234553604*^9, {3.5639102991392984`*^9, 3.5639103100339217`*^9}, {
   3.563910341497721*^9, 3.56391035249035*^9}, 3.563910511748459*^9, 
   3.5639106061168566`*^9, 3.5639106878185296`*^9, 3.563910729665923*^9, 
   3.563910863025551*^9, {3.563910934545642*^9, 3.563910960864147*^9}, 
   3.5639110379775577`*^9, 3.563911537787145*^9, 3.5639115894200983`*^9, 
   3.5639117246958356`*^9, 3.563911761100918*^9, 3.5639119843426867`*^9, 
   3.563912211125658*^9, {3.563912529924892*^9, 3.5639125493760047`*^9}, 
   3.5639126092434287`*^9, {3.5639126440754213`*^9, 3.5639126625094757`*^9}, 
   3.563912872509487*^9, 3.5639130811724215`*^9, {3.5639131157043967`*^9, 
   3.563913128323118*^9}, 3.5639132671220574`*^9, {3.5639133687378693`*^9, 
   3.563913402407795*^9}, 3.5639134348966537`*^9, 3.5639135233977156`*^9, 
   3.563913588700451*^9, {3.563913895987026*^9, 3.563913950531146*^9}, {
   3.5639139857501607`*^9, 3.563914065325712*^9}, 3.5639141818083744`*^9, {
   3.5639143601525755`*^9, 3.5639144051621494`*^9}, 3.5639144584932003`*^9, {
   3.563914534931572*^9, 3.563914569290537*^9}, {3.5639146018774014`*^9, 
   3.5639146181243305`*^9}, 3.563914651813257*^9, 3.563914686855262*^9, 
   3.563914760507474*^9, 3.563914805281035*^9, 3.5639148637143774`*^9, 
   3.563915011097807*^9, {3.56391515416799*^9, 3.563915198166507*^9}, 
   3.5639152508375196`*^9, {3.5639153349503307`*^9, 3.563915347030021*^9}, 
   3.5639157549233513`*^9, 3.563915788829291*^9, 3.5639160863333073`*^9, 
   3.563916868753059*^9, 3.5639169986804905`*^9, {3.5639170479373074`*^9, 
   3.5639170745758314`*^9}, 3.5639171704213133`*^9, 3.5639172535280666`*^9, 
   3.563917287052984*^9, 3.563917356772972*^9, {3.5639173969422693`*^9, 
   3.5639174355164757`*^9}, 3.5639174804400454`*^9, {3.5639175399804506`*^9, 
   3.563917556994424*^9}, 3.563917730804365*^9, 3.5639179553532085`*^9, 
   3.5639180099273305`*^9, 3.5639180436702604`*^9, {3.5639181216007175`*^9, 
   3.5639181384016786`*^9}, {3.5639181818291626`*^9, 3.5639182241065807`*^9}, 
   3.5639182667080173`*^9, {3.5639183076863613`*^9, 3.563918321791168*^9}, {
   3.5639183526039305`*^9, 3.563918398455553*^9}, 3.5639186339480224`*^9, 
   3.5639189806868544`*^9, {3.5640810852497053`*^9, 3.5640811022256765`*^9}, 
   3.564880589386687*^9, 3.564880723247343*^9, 3.564880838900958*^9, 
   3.564880894806156*^9, {3.5648809309232216`*^9, 3.564880944199981*^9}, 
   3.5648810094037104`*^9, 3.5648810620227203`*^9, 3.5648825895480895`*^9, 
   3.564882628456315*^9, {3.56684602100817*^9, 3.566846040084261*^9}, 
   3.5679700749027576`*^9, {3.5679731049130645`*^9, 3.5679731116814513`*^9}, 
   3.5679733129589643`*^9, 3.567973387035201*^9, 3.567973549585498*^9, 
   3.5679735906388464`*^9, {3.5679736451589646`*^9, 3.5679737366251965`*^9}, 
   3.567973799844812*^9, 3.567973899445509*^9, 3.568050463474721*^9, 
   3.56805050087586*^9, {3.568061000551407*^9, 3.5680610130721235`*^9}}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxF1Hkw1GEYB/BVstW0E11ojGNT2UZrt4y0brWILLYVKo3I7k8IaxW1STSi
XQnTNXLlKia0pdBsWuOILpY/ajUTzeToUqjNsVQzeZ535p13PvN93+ev53nN
QmO44YtIJFLA3/3vpGZrSguNFY6k/8tTTuYMCeadFvySYrNMO1jXecGu2eyn
lT4G4HCraQqTYgr2poX/WOduDpb1nUnotLUA263aUqt91hIsmMktKA9kgGPa
h7fXem8DXzygs1ETZQ0O6zjNZxI2YAXZ0C8yyBbM1Eu5OipigUMmHCw5Ufbg
ksI2I3WWI/j+JVa/kusMFjU5+BbsdQE3d5WPZx50BUe475RHBO4C37zNrI88
thucMyE/F3uSDR6qSjhBCN3ArW6511NT3cFaPqoP2SkeYJLLQ63ipD3gDH21
t/KCJzj2QFiLOs0LPHjO+qjTlb3gNXk3VJkl3uAK3S1JHfkcsEJowt5c7QMu
NC02cuD5guXiaRLRjTbzIs9uCPADP3hNk7ztQ0vb5ximwVxwXvzosZB3aPFa
45XUoH3gO7QlXaIBtM6klqHiMA9cybiXXDiMpoVWcTTR/uD+PY0y/89oZemp
rU7x+8G/7/vZU8fR8w3C+vTjAWAvhhtb/BPdEWwVERkfCK6pi1XPz6O7cvrj
RgRjMA8ssm9dfSPmnay0xi+C95CnyJqll69iPnlwoFf1Dv1MqvT4KXgN980z
1NOa85hfYxq4ejxH+6XfDo/+hm5nxAl0iGZ4/0u4WmYtxpwwsp5KbkFT41qN
yj6iU/KlNTZqtCKxpsyCqIV6h4kSSvdJzHv0Wnjrn6AlfG6i0yB65PL65cpx
tH7FHDd/Bv1oKc0kmiiC+qvCiMcFCZinr8hcNPIY7XzEcBPlPfqmZPBR0Xf0
i+I2UsQUOrR6R/lLDbrszZhKQqeCD+XLGiR0/E/4nl/Teth24IbZvEoJ3RXs
wGNm0ZtwXluqXwl72Dhv7oujAkU9OD/8u9pFEjr2u0VQr16wCPv3k/at8/Qm
7Mc/CJY5UQ==
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], 
      LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 10, 
       11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82, 24, 25,
        26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 37, 38, 39, 
       40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66, 61, 57, 54, 52,
        73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 76, 70, 77, 50}]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.563907743722137*^9, 3.5639078278869505`*^9}, {
   3.5639080456444063`*^9, 3.563908068814731*^9}, 3.5639092803370266`*^9, 
   3.563909335186164*^9, 3.5639094029360385`*^9, 3.56390971049263*^9, 
   3.563909749079837*^9, {3.5639098123254547`*^9, 3.5639098377149067`*^9}, 
   3.5639098916179895`*^9, 3.563909928651108*^9, 3.563909965829234*^9, {
   3.5639100040284195`*^9, 3.5639100474399023`*^9}, 3.563910170080917*^9, 
   3.563910234553604*^9, {3.5639102991392984`*^9, 3.5639103100339217`*^9}, {
   3.563910341497721*^9, 3.56391035249035*^9}, 3.563910511748459*^9, 
   3.5639106061168566`*^9, 3.5639106878185296`*^9, 3.563910729665923*^9, 
   3.563910863025551*^9, {3.563910934545642*^9, 3.563910960864147*^9}, 
   3.5639110379775577`*^9, 3.563911537787145*^9, 3.5639115894200983`*^9, 
   3.5639117246958356`*^9, 3.563911761100918*^9, 3.5639119843426867`*^9, 
   3.563912211125658*^9, {3.563912529924892*^9, 3.5639125493760047`*^9}, 
   3.5639126092434287`*^9, {3.5639126440754213`*^9, 3.5639126625094757`*^9}, 
   3.563912872509487*^9, 3.5639130811724215`*^9, {3.5639131157043967`*^9, 
   3.563913128323118*^9}, 3.5639132671220574`*^9, {3.5639133687378693`*^9, 
   3.563913402407795*^9}, 3.5639134348966537`*^9, 3.5639135233977156`*^9, 
   3.563913588700451*^9, {3.563913895987026*^9, 3.563913950531146*^9}, {
   3.5639139857501607`*^9, 3.563914065325712*^9}, 3.5639141818083744`*^9, {
   3.5639143601525755`*^9, 3.5639144051621494`*^9}, 3.5639144584932003`*^9, {
   3.563914534931572*^9, 3.563914569290537*^9}, {3.5639146018774014`*^9, 
   3.5639146181243305`*^9}, 3.563914651813257*^9, 3.563914686855262*^9, 
   3.563914760507474*^9, 3.563914805281035*^9, 3.5639148637143774`*^9, 
   3.563915011097807*^9, {3.56391515416799*^9, 3.563915198166507*^9}, 
   3.5639152508375196`*^9, {3.5639153349503307`*^9, 3.563915347030021*^9}, 
   3.5639157549233513`*^9, 3.563915788829291*^9, 3.5639160863333073`*^9, 
   3.563916868753059*^9, 3.5639169986804905`*^9, {3.5639170479373074`*^9, 
   3.5639170745758314`*^9}, 3.5639171704213133`*^9, 3.5639172535280666`*^9, 
   3.563917287052984*^9, 3.563917356772972*^9, {3.5639173969422693`*^9, 
   3.5639174355164757`*^9}, 3.5639174804400454`*^9, {3.5639175399804506`*^9, 
   3.563917556994424*^9}, 3.563917730804365*^9, 3.5639179553532085`*^9, 
   3.5639180099273305`*^9, 3.5639180436702604`*^9, {3.5639181216007175`*^9, 
   3.5639181384016786`*^9}, {3.5639181818291626`*^9, 3.5639182241065807`*^9}, 
   3.5639182667080173`*^9, {3.5639183076863613`*^9, 3.563918321791168*^9}, {
   3.5639183526039305`*^9, 3.563918398455553*^9}, 3.5639186339480224`*^9, 
   3.5639189806868544`*^9, {3.5640810852497053`*^9, 3.5640811022256765`*^9}, 
   3.564880589386687*^9, 3.564880723247343*^9, 3.564880838900958*^9, 
   3.564880894806156*^9, {3.5648809309232216`*^9, 3.564880944199981*^9}, 
   3.5648810094037104`*^9, 3.5648810620227203`*^9, 3.5648825895480895`*^9, 
   3.564882628456315*^9, {3.56684602100817*^9, 3.566846040084261*^9}, 
   3.5679700749027576`*^9, {3.5679731049130645`*^9, 3.5679731116814513`*^9}, 
   3.5679733129589643`*^9, 3.567973387035201*^9, 3.567973549585498*^9, 
   3.5679735906388464`*^9, {3.5679736451589646`*^9, 3.5679737366251965`*^9}, 
   3.567973799844812*^9, 3.567973899445509*^9, 3.568050463474721*^9, 
   3.56805050087586*^9, {3.568061000551407*^9, 3.5680610130791235`*^9}}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYMgLhB8sPfay+73LP2/PYx/lteMkyVW
wAHGd+p3PbDcXwLOT9X/xWvIqwDn+2qmfhRzV4HzN12pLT1poQHnWwtprWep
14Hz039Pmrs0wgDOzz/23Hi9rxGc3xXFpvo3xwTOTz5enWaYYQbnH2SXDMyO
tIDzDQUbpr0ssYLzEz7b6vjl2MD5C+cdlfneawfnb+6zun0pyAHOL9llGzDX
xxHO339q6afOaCc4P9Pdcm9mhDOcP2eF4dbsLBc4f+LnvY0F5a5w/rNVpWUZ
RW5w/hG3STOamtzhfEb/W4/6GzzgfAbHbYwLKj3h/A7x776X2r3g/IKo5EPf
m73h/IeNJin2U33gfJHJM291LvSF85cJaFUen+2HCK8ieVf11f5w/jyFBTK2
IQFw/t6aXwwZFxB8RW/2P8rhgXD+lvOa3TevIPg9x/4ZKMQGwfmTi19mJdxB
8GtE5fiVIoPh/JWarKdKHiD4bF8YJQ/GhcD5yw021s17juBrJq3y+5sbCuff
9ty5KfQ1gn9pcZWufXEYnP9jc6CN0icE//+Ooq1teeFwvreBm2vNVwT/eKx+
ZnZxBJy/bkPB9///EfxTE28Xvkh/D88PVuwBG7buRMgvufH+VreeEpwfM3vT
jm49RPpN83rbfNHVGs7f8Wfy8m49JzjfNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwABISLJ
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxF1Hkw1GEYB/BVstW0E11ojGNT2UZrt4y0brWILLYVKo3I7k8IaxW1STSi
XQnTNXLlKia0pdBsWuOILpY/ajUTzeToUqjNsVQzeZ535p13PvN93+ev53nN
QmO44YtIJFLA3/3vpGZrSguNFY6k/8tTTuYMCeadFvySYrNMO1jXecGu2eyn
lT4G4HCraQqTYgr2poX/WOduDpb1nUnotLUA263aUqt91hIsmMktKA9kgGPa
h7fXem8DXzygs1ETZQ0O6zjNZxI2YAXZ0C8yyBbM1Eu5OipigUMmHCw5Ufbg
ksI2I3WWI/j+JVa/kusMFjU5+BbsdQE3d5WPZx50BUe475RHBO4C37zNrI88
thucMyE/F3uSDR6qSjhBCN3ArW6511NT3cFaPqoP2SkeYJLLQ63ipD3gDH21
t/KCJzj2QFiLOs0LPHjO+qjTlb3gNXk3VJkl3uAK3S1JHfkcsEJowt5c7QMu
NC02cuD5guXiaRLRjTbzIs9uCPADP3hNk7ztQ0vb5ximwVxwXvzosZB3aPFa
45XUoH3gO7QlXaIBtM6klqHiMA9cybiXXDiMpoVWcTTR/uD+PY0y/89oZemp
rU7x+8G/7/vZU8fR8w3C+vTjAWAvhhtb/BPdEWwVERkfCK6pi1XPz6O7cvrj
RgRjMA8ssm9dfSPmnay0xi+C95CnyJqll69iPnlwoFf1Dv1MqvT4KXgN980z
1NOa85hfYxq4ejxH+6XfDo/+hm5nxAl0iGZ4/0u4WmYtxpwwsp5KbkFT41qN
yj6iU/KlNTZqtCKxpsyCqIV6h4kSSvdJzHv0Wnjrn6AlfG6i0yB65PL65cpx
tH7FHDd/Bv1oKc0kmiiC+qvCiMcFCZinr8hcNPIY7XzEcBPlPfqmZPBR0Xf0
i+I2UsQUOrR6R/lLDbrszZhKQqeCD+XLGiR0/E/4nl/Teth24IbZvEoJ3RXs
wGNm0ZtwXluqXwl72Dhv7oujAkU9OD/8u9pFEjr2u0VQr16wCPv3k/at8/Qm
7Mc/CJY5UQ==
       "], {{{}, {}, 
         {RGBColor[1, 0, 0], 
          LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 
           10, 11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82,
            24, 25, 26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 
           37, 38, 39, 40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66,
            61, 57, 54, 52, 73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 
           76, 70, 77, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
          PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxF1Hkw1GEYB/BVstW0E11ojGNT2UZrt4y0brWILLYVKo3I7k8IaxW1STSi
XQnTNXLlKia0pdBsWuOILpY/ajUTzeToUqjNsVQzeZ535p13PvN93+ev53nN
QmO44YtIJFLA3/3vpGZrSguNFY6k/8tTTuYMCeadFvySYrNMO1jXecGu2eyn
lT4G4HCraQqTYgr2poX/WOduDpb1nUnotLUA263aUqt91hIsmMktKA9kgGPa
h7fXem8DXzygs1ETZQ0O6zjNZxI2YAXZ0C8yyBbM1Eu5OipigUMmHCw5Ufbg
ksI2I3WWI/j+JVa/kusMFjU5+BbsdQE3d5WPZx50BUe475RHBO4C37zNrI88
thucMyE/F3uSDR6qSjhBCN3ArW6511NT3cFaPqoP2SkeYJLLQ63ipD3gDH21
t/KCJzj2QFiLOs0LPHjO+qjTlb3gNXk3VJkl3uAK3S1JHfkcsEJowt5c7QMu
NC02cuD5guXiaRLRjTbzIs9uCPADP3hNk7ztQ0vb5ximwVxwXvzosZB3aPFa
45XUoH3gO7QlXaIBtM6klqHiMA9cybiXXDiMpoVWcTTR/uD+PY0y/89oZemp
rU7x+8G/7/vZU8fR8w3C+vTjAWAvhhtb/BPdEWwVERkfCK6pi1XPz6O7cvrj
RgRjMA8ssm9dfSPmnay0xi+C95CnyJqll69iPnlwoFf1Dv1MqvT4KXgN980z
1NOa85hfYxq4ejxH+6XfDo/+hm5nxAl0iGZ4/0u4WmYtxpwwsp5KbkFT41qN
yj6iU/KlNTZqtCKxpsyCqIV6h4kSSvdJzHv0Wnjrn6AlfG6i0yB65PL65cpx
tH7FHDd/Bv1oKc0kmiiC+qvCiMcFCZinr8hcNPIY7XzEcBPlPfqmZPBR0Xf0
i+I2UsQUOrR6R/lLDbrszZhKQqeCD+XLGiR0/E/4nl/Teth24IbZvEoJ3RXs
wGNm0ZtwXluqXwl72Dhv7oujAkU9OD/8u9pFEjr2u0VQr16wCPv3k/at8/Qm
7Mc/CJY5UQ==
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], 
          LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 
           10, 11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82,
            24, 25, 26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 
           37, 38, 39, 40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66,
            61, 57, 54, 52, 73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 
           76, 70, 77, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.,
          
          PlotRange->{{-0.1, 3.1}, {-0.1, 
           3.1}}], {-1.2, -0.8180339887498949}, {
         Left, Bottom}, {0.5, 0.5}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{{3.563907743722137*^9, 3.5639078278869505`*^9}, {
   3.5639080456444063`*^9, 3.563908068814731*^9}, 3.5639092803370266`*^9, 
   3.563909335186164*^9, 3.5639094029360385`*^9, 3.56390971049263*^9, 
   3.563909749079837*^9, {3.5639098123254547`*^9, 3.5639098377149067`*^9}, 
   3.5639098916179895`*^9, 3.563909928651108*^9, 3.563909965829234*^9, {
   3.5639100040284195`*^9, 3.5639100474399023`*^9}, 3.563910170080917*^9, 
   3.563910234553604*^9, {3.5639102991392984`*^9, 3.5639103100339217`*^9}, {
   3.563910341497721*^9, 3.56391035249035*^9}, 3.563910511748459*^9, 
   3.5639106061168566`*^9, 3.5639106878185296`*^9, 3.563910729665923*^9, 
   3.563910863025551*^9, {3.563910934545642*^9, 3.563910960864147*^9}, 
   3.5639110379775577`*^9, 3.563911537787145*^9, 3.5639115894200983`*^9, 
   3.5639117246958356`*^9, 3.563911761100918*^9, 3.5639119843426867`*^9, 
   3.563912211125658*^9, {3.563912529924892*^9, 3.5639125493760047`*^9}, 
   3.5639126092434287`*^9, {3.5639126440754213`*^9, 3.5639126625094757`*^9}, 
   3.563912872509487*^9, 3.5639130811724215`*^9, {3.5639131157043967`*^9, 
   3.563913128323118*^9}, 3.5639132671220574`*^9, {3.5639133687378693`*^9, 
   3.563913402407795*^9}, 3.5639134348966537`*^9, 3.5639135233977156`*^9, 
   3.563913588700451*^9, {3.563913895987026*^9, 3.563913950531146*^9}, {
   3.5639139857501607`*^9, 3.563914065325712*^9}, 3.5639141818083744`*^9, {
   3.5639143601525755`*^9, 3.5639144051621494`*^9}, 3.5639144584932003`*^9, {
   3.563914534931572*^9, 3.563914569290537*^9}, {3.5639146018774014`*^9, 
   3.5639146181243305`*^9}, 3.563914651813257*^9, 3.563914686855262*^9, 
   3.563914760507474*^9, 3.563914805281035*^9, 3.5639148637143774`*^9, 
   3.563915011097807*^9, {3.56391515416799*^9, 3.563915198166507*^9}, 
   3.5639152508375196`*^9, {3.5639153349503307`*^9, 3.563915347030021*^9}, 
   3.5639157549233513`*^9, 3.563915788829291*^9, 3.5639160863333073`*^9, 
   3.563916868753059*^9, 3.5639169986804905`*^9, {3.5639170479373074`*^9, 
   3.5639170745758314`*^9}, 3.5639171704213133`*^9, 3.5639172535280666`*^9, 
   3.563917287052984*^9, 3.563917356772972*^9, {3.5639173969422693`*^9, 
   3.5639174355164757`*^9}, 3.5639174804400454`*^9, {3.5639175399804506`*^9, 
   3.563917556994424*^9}, 3.563917730804365*^9, 3.5639179553532085`*^9, 
   3.5639180099273305`*^9, 3.5639180436702604`*^9, {3.5639181216007175`*^9, 
   3.5639181384016786`*^9}, {3.5639181818291626`*^9, 3.5639182241065807`*^9}, 
   3.5639182667080173`*^9, {3.5639183076863613`*^9, 3.563918321791168*^9}, {
   3.5639183526039305`*^9, 3.563918398455553*^9}, 3.5639186339480224`*^9, 
   3.5639189806868544`*^9, {3.5640810852497053`*^9, 3.5640811022256765`*^9}, 
   3.564880589386687*^9, 3.564880723247343*^9, 3.564880838900958*^9, 
   3.564880894806156*^9, {3.5648809309232216`*^9, 3.564880944199981*^9}, 
   3.5648810094037104`*^9, 3.5648810620227203`*^9, 3.5648825895480895`*^9, 
   3.564882628456315*^9, {3.56684602100817*^9, 3.566846040084261*^9}, 
   3.5679700749027576`*^9, {3.5679731049130645`*^9, 3.5679731116814513`*^9}, 
   3.5679733129589643`*^9, 3.567973387035201*^9, 3.567973549585498*^9, 
   3.5679735906388464`*^9, {3.5679736451589646`*^9, 3.5679737366251965`*^9}, 
   3.567973799844812*^9, 3.567973899445509*^9, 3.568050463474721*^9, 
   3.56805050087586*^9, {3.568061000551407*^9, 3.568061013726161*^9}}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2DGDwwf7UxNuFL9Lf28P4XnvZ/Z6l
/4fzz/KacbLECjjA+E79rgeW+0vA+an6v3gNeRXgfF/N1I9i7ipw/qYrtaUn
LTTgfGshrfUs9TpwfvrvSXOXRhjA+fnHnhuv9zWC87ui2FT/5pjA+cnHq9MM
M8zg/IPskoHZkRZwvqFgw7SXJVZwfsJnWx2/HBs4f+G8ozLfe+3g/M19Vrcv
BTnA+SW7bAPm+jjC+ftPLf3UGe0E52e6W+7NjHCG8+esMNyaneUC50/8vLex
oNwVzn+2qrQso8gNzj/iNmlGU5M7nM/of+tRf4MHnM/guI1xQaUnnN8h/t33
UrsXnF8QlXzoe7M3nP+w0STFfqoPnC8yeeatzoW+cP4yAa3K47P9EOFVJO+q
vtofzp+nsEDGNiQAzt9b84sh4wKCr+jN/kc5PBDO33Jes/vmFQS/59g/A4XY
IDh/cvHLrIQ7CH6NqBy/UmQwnL9Sk/VUyQMEn+0Lo+TBuBA4f7nBxrp5zxF8
zaRVfn9zQ+H82547N4W+RvAvLa7StS8Og/N/bA60UfqE4P/fUbS1LS8czvc2
cHOt+YrgH4/Vz8wujoDzrdgDNmzdieCv21Dw/f9/BB8A8gTzyg==
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJxNz30s1HEcB/Afk6vWLfTgYTcPl8qZ5q5u0oVDnec77iJPY6Jzv/MQDqEu
eWhKrjwt1XCYx9jQSZJdOvMQZXT5J2xoy8NqPXjoQueqLZ9v7+29915/vi0i
E3h8bQzD2H/6d8mF6lqpqcIJ+5eunRSzeLyKuW1FemudFd4GHqQmCXTxXvAr
idJjTTAGHmbkdn8WzIBHiqeSFgVfwV5yAmdeoAGPEu126YTpOW/btZD1stHX
CMy33SDSiOZgNoX//aC7JVg2cS112N4KfNrAuk3nug1YsFlSWR9EBScMLpxo
Yx8H3w7RPayOo4Ojhq5G03A7sIJgzI0NtgfT9LPKllIY4IgVRxtOnAO4RjpA
Ut1xAnfcZUwpec7glOeOfpU+LuDekfrl/FBXsND9lFwYdAZc0UTrjI05Cy5e
kWcnprHA882pl3GRG7jfreRBTo47WMt38kNhlgcYc3mqVZ3hCb5lqGIrb3qB
E0Oi+lS53uC5bPpF5j0f8P7Sh5P5NWxwg551xlA5B6wQmbGOtviCpebVJEd/
P7BcvIHh48gW3oRfhwK54CdjlIL3E8iSwS2qeRgPXJq8FBMxjSw+YLqXHHwO
/IiyYyRlFll3VctYEe4PbqQ+zpQuIFMimznq+ADwlGe3LOATsrL2yjFm8nnw
zw6uA3kZWfNM1Jl3KRDsTXVjideQh8JshbHJQWCDKLynMhU5HK8hjqch/xDt
k9HFyJa3VBvqG8hZsl5JURkyg+DX3tmNnLcnX3uxB/mtfp+/yQtknERfz+xD
vk8zcvV4jbwaOvtuchrZ+YLxEeIMckE0L505h0xO6ifVfUTm5jXx478gVxTM
dVV9Q14sMtmtXP7vT7mk1U6F/KZ6ABOuIxs2bPHKN5EjW07Wj6qRW9sTVRoN
8m8O/xY3
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJxNz30s1HEcB/Afk6vWLfTgYTcPl8qZ5q5u0oVDnec77iJPY6Jzv/MQDqEu
eWhKrjwt1XCYx9jQSZJdOvMQZXT5J2xoy8NqPXjoQueqLZ9v7+29915/vi0i
E3h8bQzD2H/6d8mF6lqpqcIJ+5eunRSzeLyKuW1FemudFd4GHqQmCXTxXvAr
idJjTTAGHmbkdn8WzIBHiqeSFgVfwV5yAmdeoAGPEu126YTpOW/btZD1stHX
CMy33SDSiOZgNoX//aC7JVg2cS112N4KfNrAuk3nug1YsFlSWR9EBScMLpxo
Yx8H3w7RPayOo4Ojhq5G03A7sIJgzI0NtgfT9LPKllIY4IgVRxtOnAO4RjpA
Ut1xAnfcZUwpec7glOeOfpU+LuDekfrl/FBXsND9lFwYdAZc0UTrjI05Cy5e
kWcnprHA882pl3GRG7jfreRBTo47WMt38kNhlgcYc3mqVZ3hCb5lqGIrb3qB
E0Oi+lS53uC5bPpF5j0f8P7Sh5P5NWxwg551xlA5B6wQmbGOtviCpebVJEd/
P7BcvIHh48gW3oRfhwK54CdjlIL3E8iSwS2qeRgPXJq8FBMxjSw+YLqXHHwO
/IiyYyRlFll3VctYEe4PbqQ+zpQuIFMimznq+ADwlGe3LOATsrL2yjFm8nnw
zw6uA3kZWfNM1Jl3KRDsTXVjideQh8JshbHJQWCDKLynMhU5HK8hjqch/xDt
k9HFyJa3VBvqG8hZsl5JURkyg+DX3tmNnLcnX3uxB/mtfp+/yQtknERfz+xD
vk8zcvV4jbwaOvtuchrZ+YLxEeIMckE0L505h0xO6ifVfUTm5jXx478gVxTM
dVV9Q14sMtmtXP7vT7mk1U6F/KZ6ABOuIxs2bPHKN5EjW07Wj6qRW9sTVRoN
8m8O/xY3
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], 
   GeometricTransformationBox[GraphicsGroupBox[{
      {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
      {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
       GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
          GraphicsBox[{{{InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0.5, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"E(t)\"\>", 
               NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[0, 0, 1], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"S(t)\"\>", 
               NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
               Automatic, {1, 0}]}}, {}},
           AspectRatio->1.5,
           FormatType->TraditionalForm,
           PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {
          Left, Bottom}, {0.2, 0.3}]}]}}], {{0.31623381710543597`, 
    0.07905845427635905}}], InsetBox[
    StyleBox[Cell["\[Beta] \[NotEqual] 0 && \[CurlyEpsilon] \[NotEqual] 0",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     Magnification->1.4999996423721313`,
     Background->GrayLevel[1.]], {0.12659264108772428`, 0.331917680543242}, {
    Left, Top}, {0.37646882988742436`, 0.07152907767861055}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.752225}, {0.666667, 51.360434}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.568061050203247*^9, 3.56806105252538*^9}, {
  3.569078187716493*^9, 3.5690782397064667`*^9}, {3.5690782794387393`*^9, 
  3.569078338077093*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"-", "\[Beta]"}], " ", "*", " ", 
    RowBox[{"s", "[", "t", "]"}], "*", " ", 
    FractionBox[
     RowBox[{"i", "[", "t", "]"}], "n"]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"eq2", "=", 
   RowBox[{
    RowBox[{"\[Beta]", "*", 
     RowBox[{"s", "[", "t", "]"}], "*", 
     FractionBox[
      RowBox[{"i", "[", "t", "]"}], "n"]}], "-", 
    RowBox[{"\[Epsilon]", "*", 
     RowBox[{"e", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"\[Epsilon]", "*", 
    RowBox[{"e", "[", "t", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Epsilon]", "=", "0.5"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", "=", 
   RowBox[{"N", "[", 
    FractionBox["\[Beta]", "\[Epsilon]"], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.99"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ezero", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"izero", "=", "0.01"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"e", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"e", "[", "0", "]"}], "\[Equal]", "ezero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "e", ",", "i"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"a", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<S\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Blue"}]}]}], "]"}]}], "      ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot1a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"a", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Blue"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot2", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"b", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"E", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Orange"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], " ", ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{"plot3", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"c", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShowLegend", "[", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot1a", " ", ",", "plot2a", ",", "plot3a"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Blue", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<S(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<E(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}]}], "}"}], ",", 
      RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
      RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
      RowBox[{"LegendSize", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "}"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plotall", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "tf"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.05"}], ",", "1.1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLegend", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<S(t)\>\"", ",", "\"\<E(t)\>\"", ",", "\"\<I(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Orange"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
     RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
     RowBox[{"LegendPosition", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0"}], "}"}]}], ",", 
     RowBox[{"LegendSize", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0.3"}], "}"}]}], ",", 
     RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
     RowBox[{"GridLinesStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Gray", ",", "Dotted"}], "]"}]}], ",", 
     RowBox[{"Frame", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"True", ",", "True", ",", "True", ",", "True"}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"\"\<Density \>\"", ",", "\"\<\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"\"\<time \>\"", "[", "t", "]"}], ",", "\"\<\>\""}], 
         "}"}]}], "}"}]}]}], "]"}]}], "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"plotP", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"Evaluate", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x1", "[", "t", "]"}], ",", 
            RowBox[{"x2", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"S", "[", "t", "]"}], ",", 
           RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
      "\[IndentingNewLine]", "plotQ"}], "=", 
     RowBox[{
      RowBox[{
       RowBox[{"ParametricPlot", "[", 
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"x2", "[", "t", "]"}], ",", 
             RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
         ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"\"\<E\>\"", "[", "t", "]"}], ",", 
            RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], "\n", 
       "plotR"}], "=", 
      RowBox[{
       RowBox[{
        RowBox[{"ParametricPlot", "[", 
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"x1", "[", "t", "]"}], ",", 
              RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
          RowBox[{"AxesLabel", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"S", "[", "t", "]"}], ",", 
             RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
        "\[IndentingNewLine]", 
        RowBox[{"h1", "[", "t_", "]"}]}], ":=", 
       RowBox[{
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x1", "[", "t", "]"}], "/.", "sol"}], "]"}], "\n", 
         RowBox[{"h2", "[", "t_", "]"}]}], ":=", 
        RowBox[{
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"x2", "[", "t", "]"}], "/.", "sol"}], "]"}], 
          "\[IndentingNewLine]", 
          RowBox[{"h3", "[", "t_", "]"}]}], ":=", 
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x3", "[", "t", "]"}], "/.", "sol"}], "]"}]}]}]}]}]}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.5638355904558997`*^9, 3.563835704468421*^9}, {
   3.563835950077469*^9, 3.56383606512805*^9}, {3.56383613822723*^9, 
   3.563836367357336*^9}, {3.563836441114555*^9, 3.563836444201731*^9}, {
   3.563836535058928*^9, 3.563836589524043*^9}, {3.5638366644783306`*^9, 
   3.563836665858409*^9}, 3.563836695909128*^9, {3.563836848841875*^9, 
   3.5638368525680885`*^9}, {3.5638372255084195`*^9, 3.563837265661716*^9}, {
   3.5638383151507435`*^9, 3.5638383180759106`*^9}, 3.563838362903475*^9, {
   3.5638384377487555`*^9, 3.563838575206618*^9}, {3.5638386112096767`*^9, 
   3.563838657701336*^9}, 3.5638386889021206`*^9, {3.5638388049467583`*^9, 
   3.5638388069938755`*^9}, {3.5638388495773106`*^9, 
   3.5638389667440124`*^9}, {3.563839052506918*^9, 3.563839071571008*^9}, {
   3.563839147339342*^9, 3.563839232596218*^9}, {3.563839314060878*^9, 
   3.56383942477421*^9}, {3.5638394696337757`*^9, 3.563839480051372*^9}, {
   3.5638395362795877`*^9, 3.5638395453271055`*^9}, {3.5638395986821575`*^9, 
   3.5638396665290375`*^9}, {3.563839704558213*^9, 3.5638397404972687`*^9}, {
   3.5638398239280405`*^9, 3.5638399312031765`*^9}, {3.563840014577945*^9, 
   3.5638400676949835`*^9}, {3.5638401105414343`*^9, 
   3.5638401221330967`*^9}, {3.5638401613373394`*^9, 3.563840168990777*^9}, {
   3.5638402066729326`*^9, 3.5638402331264453`*^9}, {3.563840302771429*^9, 
   3.563840436440074*^9}, {3.563840514500539*^9, 3.563840531504512*^9}, {
   3.5638405784992*^9, 3.5638405821144066`*^9}, {3.563840618338478*^9, 
   3.5638406387506456`*^9}, {3.5638407249235744`*^9, 
   3.5638408190029554`*^9}, {3.563840856229085*^9, 3.5638408646885686`*^9}, {
   3.5638410103198986`*^9, 3.5638410835630875`*^9}, {3.563904889849905*^9, 
   3.5639048947221837`*^9}, 3.563905146271571*^9, {3.563905177983385*^9, 
   3.56390518226363*^9}, {3.56390525411874*^9, 3.563905299470334*^9}, {
   3.563905472683241*^9, 3.563905489465201*^9}, {3.563905647569244*^9, 
   3.5639056597809424`*^9}, 3.563905703646451*^9, {3.563905742419669*^9, 
   3.5639057793877835`*^9}, {3.563905869972965*^9, 3.563905882011653*^9}, {
   3.563905928065287*^9, 3.5639059436801805`*^9}, {3.563906210805459*^9, 
   3.563906215908751*^9}, {3.563906296232345*^9, 3.5639063025807085`*^9}, {
   3.563906365490307*^9, 3.5639063658563275`*^9}, {3.563906424897704*^9, 
   3.563906433242182*^9}, {3.563906471104347*^9, 3.5639064759836264`*^9}, {
   3.5639065288356495`*^9, 3.563906529453685*^9}, {3.5639068329810457`*^9, 
   3.5639068636147976`*^9}, {3.563906895527623*^9, 3.563906897037709*^9}, {
   3.563907110560922*^9, 3.5639071121890154`*^9}, {3.563907274969326*^9, 
   3.56390743274035*^9}, {3.5639074760618277`*^9, 3.5639074793070135`*^9}, {
   3.5639075838239913`*^9, 3.5639075917484446`*^9}, {3.5639076912791376`*^9, 
   3.563907827329919*^9}, {3.56390786003179*^9, 3.56390792333441*^9}, {
   3.563908035557829*^9, 3.5639080787833014`*^9}, 3.5639084082481456`*^9, {
   3.563908463246291*^9, 3.563908492127943*^9}, 3.563908626086605*^9, {
   3.563908825166992*^9, 3.5639088270190983`*^9}, {3.563909238651642*^9, 
   3.563909240037721*^9}, {3.563909322232423*^9, 3.5639093344691224`*^9}, {
   3.563909382587875*^9, 3.563909606090658*^9}, {3.5639097046552963`*^9, 
   3.563909707405453*^9}, {3.5639097449105988`*^9, 3.563909747819765*^9}, {
   3.5639097912782507`*^9, 3.5639098366698465`*^9}, {3.5639098902499113`*^9, 
   3.563909890652934*^9}, {3.563909925842947*^9, 3.563909927602048*^9}, {
   3.5639099589818425`*^9, 3.563909959344863*^9}, {3.5639099995731645`*^9, 
   3.563910046916872*^9}, {3.563910148071658*^9, 3.5639101691978664`*^9}, 
   3.5639102340005727`*^9, {3.5639102721207533`*^9, 3.563910351650302*^9}, {
   3.563910421532299*^9, 3.563910510495387*^9}, {3.5639105664275866`*^9, 
   3.5639105760811386`*^9}, {3.5639106580418262`*^9, 
   3.5639106824562225`*^9}, {3.5639107247046394`*^9, 3.563910728398851*^9}, {
   3.563910840744276*^9, 3.563910862496521*^9}, {3.563910926792198*^9, 
   3.5639109604401226`*^9}, {3.563911036075449*^9, 3.563911037511531*^9}, {
   3.563911431340057*^9, 3.563911437320399*^9}, {3.5639114789257784`*^9, 
   3.563911493954638*^9}, {3.563911525254428*^9, 3.5639115374281244`*^9}, {
   3.5639115750762777`*^9, 3.5639115880030174`*^9}, 3.5639116582250338`*^9, {
   3.5639116984503345`*^9, 3.56391176008786*^9}, {3.5639119457344785`*^9, 
   3.563911983828657*^9}, {3.5639125210403843`*^9, 3.5639125490409856`*^9}, {
   3.5639125979987855`*^9, 3.5639126611083956`*^9}, {3.5639128670021715`*^9, 
   3.563912872138466*^9}, {3.5639130702837987`*^9, 3.5639131278820934`*^9}, {
   3.5639132526262283`*^9, 3.563913434192613*^9}, {3.5639134979902625`*^9, 
   3.5639135222086477`*^9}, {3.563913559982808*^9, 3.563913587937407*^9}, {
   3.563913643129564*^9, 3.5639136454726977`*^9}, {3.563913893811902*^9, 
   3.5639139485590334`*^9}, {3.5639139840870657`*^9, 3.563914064888687*^9}, {
   3.5639141429901543`*^9, 3.5639142000144157`*^9}, {3.563914269810408*^9, 
   3.5639142840542226`*^9}, {3.5639143487949257`*^9, 3.563914404738125*^9}, 
   3.563914455294017*^9, {3.56391451899066*^9, 3.5639146165662413`*^9}, {
   3.5639146469249773`*^9, 3.56391465099021*^9}, {3.563914684638135*^9, 
   3.5639146860572157`*^9}, {3.56391471638395*^9, 3.5639148044359865`*^9}, {
   3.5639148449423037`*^9, 3.5639148622662945`*^9}, {3.5639150099297404`*^9, 
   3.563915010347764*^9}, {3.5639151494727216`*^9, 3.5639152487053976`*^9}, {
   3.563915326603853*^9, 3.563915346531993*^9}, {3.5639157813918657`*^9, 
   3.563915788211255*^9}, {3.5639160749616566`*^9, 3.563916084421198*^9}, {
   3.563916863145738*^9, 3.563916867956013*^9}, {3.563916974604113*^9, 
   3.563916998251466*^9}, {3.5639170471642637`*^9, 3.5639170731837516`*^9}, {
   3.563917169124239*^9, 3.5639171692732477`*^9}, {3.563917225221448*^9, 
   3.563917281815685*^9}, {3.5639173866606817`*^9, 3.56391743454642*^9}, 
   3.5639174785899396`*^9, {3.563917530621916*^9, 3.563917555013311*^9}, {
   3.563917726810137*^9, 3.5639177280732093`*^9}, {3.563917953474101*^9, 
   3.5639180072371764`*^9}, {3.563918038582969*^9, 3.5639180432792377`*^9}, {
   3.563918079533312*^9, 3.5639182234085407`*^9}, {3.563918264612898*^9, 
   3.563918265321938*^9}, {3.563918306125272*^9, 3.5639183204030886`*^9}, {
   3.5639183512768545`*^9, 3.563918397598504*^9}, {3.5639186015911713`*^9, 
   3.5639186261025734`*^9}, {3.5639188701865344`*^9, 3.563918974285488*^9}, {
   3.564081080539436*^9, 3.5640811343645144`*^9}, {3.564880574348827*^9, 
   3.5648805849744344`*^9}, {3.5648807151418796`*^9, 3.564880717960041*^9}, {
   3.5648808318375545`*^9, 3.564880834966733*^9}, {3.564880887672748*^9, 
   3.5648809435619445`*^9}, {3.564881002612322*^9, 3.5648810078276205`*^9}, {
   3.564881058793535*^9, 3.5648810605646367`*^9}, {3.564882586727928*^9, 
   3.56488258833002*^9}, {3.5648826193637953`*^9, 3.564882626198186*^9}, 
   3.5648828797036858`*^9, {3.5668460139647665`*^9, 3.566846039283215*^9}, {
   3.5679698042792788`*^9, 3.567970064740176*^9}, {3.56797010256534*^9, 
   3.5679701033263836`*^9}, {3.568061384082344*^9, 3.568061403272442*^9}}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwUl3c8le8fxu3MkqxECdl7j/M8z8c+jnUOEkISQrKzskJWkpVkK1mpL0LC
YyVJGWlQIQkhI0Il49fvr/vf+/W6r/t6X+/jzj4WrjRUVFTedFRU/z+Fbuzc
LTzaiZ5+reTP+XAFI+H7zGbP72E/2gaqH3KuYP1sqkx0DuxQRv5526B9CdO5
od9Rbs4LfHGvj6ewf8dc5bbYFNgEQcp8Nemx5CxmKuG6ym0oAn0sevtfJI9h
dW8jLr1QFwcLuQtmww9fYlockv/RRUkDFkp3eTS4Fjv/N6Pgno08vBXJP9O8
k4b59HxT+s9UEdzTpsgWuT5Ysh3DiR0vZXjJF2/YgBCxc88vuym4q8LBdBXa
x4oiWOe+w5QLtupQc03UkVmeGlM4GJ09H6gJare+hVMnf0CdfiLSZl4EsDrW
6zMh14CWFD7j/3Udhan09zIOm6noo1TNT8MWAG+4Tr9QVD+PBjYj5AITbZBb
Jfq+i9JF2/vurSWd1gHNpDTaiPv8qIehBu5howuMUfmcZ/b9RvIrFBoueOrB
bu99PaLtGyT9J37FN1gfrLJ/XqlgvIPMVl0Kcvc3AOfqzypko0Kk2yAjJybG
EKq1mYVqo64g1OYfp25EE6HhXZtE1vRpnEq7kbo41AiMlPoIyin2SCLPL9Ph
BBII+nXr7m3KIr5257p+xRqD8U15RrZviviXK8ou2E0T2La5Vr9rIYdzZt7+
mFRiCgx3di7cniLhZeySoc/zzEB+hU10HjPEO/2P6YvdN4dGx7siLJtH8ULB
Yn7Eigzwyur3S11RHA/fonIfIsOgYq9Gl6Q0ftx437bwKQqcduy4Iurxs7V+
UOLah7cUOD61/GJF7QchpWdXXtDBAgKq9nlsP3/Xmhkw7+k0ZgHS8fe848/k
toZzHT0gZGsJFfxP+B49aSdUStD3BU5awvtVE1EOx8cEhnXqw52OVgDpdUdk
aHxby+VrIwu/WUFL6onptP6yVgnnKrOdiyeh2A2X6xqxIXwyelJ38vtJmD0x
pmGBZhCG74bJYAHWsOs00fK0Opvw+xGFILRmDUzxNOJxy4WEvSb/hnjvU3C/
4IM2/aVSgrG8gX74xinIOCZZ7fb+DuG5g5zHhQAbOM+8Tlaeyic8rPH9tbdn
AzcEg9xoo28S+tI/+c2dX8FOxl6g2ndhBRPceZy/o8oIrFRn1itSlrHEAXz6
pDUnXFL3aJMvXcQYfvEv06nww1Cl7M7CjznMtvq/PWFJIaAZz9fsCZzCqKL8
lH5goqB2SIzE3/IWC/ppyfHttCS878oottTuwOLoxDfEcmThQTGbQnxNCfbd
CXeXtFSAhO++rJARjYWzB0tbOyhBtBxJuPDdaWyTvVP/lqcKJH+ss/KRUsUy
zvedHnBSg0Z92zjsHgcWmvIqQPK8BlAVKV26cXcJJdKc+ZLnqwWbbHJDJQbP
UaoXV0qFIhC4Pco//onvDkrnWOAxcBsD9f6GjOk3YWiWSCtX0yDA9luvP9na
J9HcLr+SQ2+1IfZ8gktmozzKmbQy8ueDDty4hTD/Ps2M0oSoPPH8ogse8j8H
w4VnEO6B4CPLP/Sg65n0y6t/WhDC4OHwxXV9qDlu3r1+NQ959zs24dKWASQO
n0wb/pWNTJEakSRqIvBf+uSYGC+NUxGJazw7RGj13ih/iKgietXvxZ5QkUCy
6tmNdoo1sq0uwzhDbwz0koPfz2io4uLLxpl5rCYQPajmrP2XFw9jPl/kcsQU
VpPEzneVaOPjr79UVhw1A7pfusI9rGZ4fafImWBhc7jxZmTG4IgSvrd468wc
JxlobSPYt1z48Ydm/akWGWQQpN9c7ViUwVe+Ru8+O0QB4rox851vvLjn9Zyn
uzcp0GZiy1eWMEcQNOac2Oa1ABHqaM9g6rcEdoF10458C5CfIfDqS/e1JnbT
Ip18ljAic8IZm39EyChK93qZbwns82oX9v9sJ4ymxq7mHrOCtGH78sm8MoJ1
xoeXcnetYCL3ckvOdGmr5j5yTcMTG/hTsuDtRcohvNCMfbJ4/jP2jB9bf3N9
BZtaGj8bskELv9600eeMLGOSy382q205IPXm77wWdAkT0VU4Za3DB9FmRg6P
ORewz0tv46uOHIcx2gntApdpTNTqQkas7gnIsDIgmmSOYpzTc7o2JAlg8y9t
vRn8DHNikbDIviYDXr8CPLjZKjEJWXHauXfycIikwH19MAELuiBXE/NOET49
mXYCGleso+GcSt93ZcjiZlOddQMsjEf4S9S0KuD7/PUMAo5gAn3+U6RJdeC1
F8kvyNhEW5NWWrrWNOGeJa+CIfIalZ844960ToAfDYb/XWq6j1pEKjydOoSB
qr3YyeKzcWip7eUQ/XSAyNrrdF2XzqAJbSMhNmn/8kkre/FNoga6UEma6czV
gcNqZ0OWvQ6hjWfUtBbydUHQWX7gw80VxLbFaq76gR5c/yhKAy69iNuX75Gy
jfpwKoJ3o8QuF5l4vb3r3WgAD2kpt4Ti8pE3RJHv9F2GkFGt+20qzQOJNk5f
eNNGBEHtsUP7U4zwO0E9WdK4EYSue1WIOTggOuIc9z/1kCB8Zic9YlYYNykd
qTLqNQZ3mTNixZeEcNmefmqLUROQo2Se/DWtjofUITqHJ01hOyjskclFU1zG
Q8yr6LMZ3JALH4zEUdypTIwmfMEcqJ2OB2Qf58PLHje+Mwwgwx9aQ6PJR5K4
dQ2+x71GhnSfhYtlNiK4weLgmfQgCkQfmJqZeVFO8GQrUv6+SYE7jY+u8yl+
Iwz4hWI/wi2g5NUl1//G3rbuz998k/bXAroS6JxEvEoICR9H8M0wS/i53M7o
lNdBAPvu8X1UVjA28d5D8FYtQfbpRf/f0VZw/7mkScne7dbouvaUtGwbOCsh
xZ/vm0vgfRqmu3T9F9ZUlOHnoLuCObBmjMSEsMJIjF1zlPwyNvPwyvCuBTck
SMk3xH//js1VMV59JHYU0D6qZPa737APlcFv7QliYNjxU+fosdfYKE375KWL
UrC23iXLdqgJq9wRzXlSKgdJBvSST8pzsAeZFgNeQwrQCK+OfVsJwmIb2iok
ZpTAebulU+WcBSbtddTaZV4FGm6mY59WZLCqx37v+cfV4KlFcjSdBRP2zkyU
nnlZA+a33QpyAr+ib8MGGC4ta0G4E8Wc3q0dHXp0dzKFHoXEhP0fs0tuoR8L
6RjHDwAI3+3ya6vwQ+NWtusk92vD5cyZXqlBE7S6h6VvgEcHkmi/s1hMnkBR
96w+hcO6YOJ6XW7jLTVqnqak9v2EHrBrvpZ+wzaOvJ3MNZNT1of9nn0Js8EP
kYO4YWiVkgGsv7N7fcy+AHl1jIU9HDWEtK3bbLdcbiBrJsQ0Vm0i+OAzWa1P
bfFovb0/p7WMYCXL+4NTiyUy+2W2WV+PBCY2H152T5OQRiOi67KeMWxu2IXy
hqjjdOodl5fIJhBnJuPy5dlx/LkZFRLsaAqB3Rqquw8McJ3VqwfVHcyg/8zy
iQhZE1yTT8jC/Lw5PB5oFWNxEsMHGPjbMpTJkL8a1FBadRxvnPlq6FBLBl9d
hYfTfbJ4Io/eTqAKBZ7KRo1T6THjN2TPink1UICSXNR47NMPwvvEpIT9WhbA
OjQvp+/b2GrR622f1moBZ40mR5y+NLfSLLGXrWpYwoDPHx1t3xaCT6cOvSz2
rx+fmdw98C6TsH568s3HMRs4ZXUgJOtWNqE3ZZi4cX4Qe5WZHiFQuILpzfp2
N7ylhoP5p0yqfy1j2zs80TanD0LSzHEd6pglTMmjhWWPeBgYiqeX/W8tYHdS
z/ddzBIEnaNRCvamM1gzOqdt+kwEIpjpJxivf8TO2T8aS+sUhxyn67e7A3qx
gdTKaFN6GWDTebm6XfoA681yGDK4JQ/2t9k+dYekYGs5LGs56YrAcvGnys3n
HtgJRpUH56qVgTsqZytqVRfz9hm8a1OmChZLHSUPygSxlblnhz/lq4PAH+f/
CJ/+okH9ahLvH2nCEVnGj/f/vkV758xIsTUE0H0dGbx+vBYNS/27sjiEQnHD
g8+Jkkmo9PpHCVZ/gIqmL5x0gufQyNbk6TBvbdilnPuZnoKhVpq/v5+4rAOT
fh87dG/xoGmW6tuVYbpw5VYpzhn0E9lSeGrGmqIHJUWxkjq/B5DwBavowWx9
iPzKGlpTUIA4o0+aL2QZgEefZmPB5395NPykrXfHEIrnl3abx4MQ6G+YrS0i
wuK6ZdLbU9b469OosVueESwRyx/b8TkiM0Vx29blJGAnSZY4zKwSHKMKGgXL
jKH00FM2wxxJnFGE+lFvowmcc2lb02dVxnvuXEh93WEKf5tPdyrYm+ALrRX+
j3AzKLUWO2slp4unpdy9+7rPHPaYFn6LxhzBhbykQrvOkUHcIJM6Lk0cT+a2
j8a+kKEjYfJE+KQ4Xp/3/cFHNwoYru1L/mo82XrDe/rM1AwFOtaZ0t5kLRKG
9vkW/f5uAcQcjqMPboYSaH6HubF6WoLSq/ytdK8OwnrXtCX6wxKaZXOU2DLq
CbmfHj8b87GCajtW7iS9G60iib+2duJsoMw+hTfsTh5hV1+57UfxT6whRbDk
x6kVrI3uhGbHKWY41S/Iuem0jDW2FZ2usuKCriyc+qvxIvZrKEPDXlYAhko8
DCzM5zCvrPVY0TZRKBX53bHydRgTu5wU+nBaEharA/S52Vox7ivlPb5H5UBM
/uGoYVYBZrKVkPcyXQF4RjxuDmZfxqi+5i5gJUpg8LXoDbnEGktvW+nfqVSB
aaf2/b/VFLHCA0dvbxSqAYdT6NbD5v1Y+cVQQm6VBiQJveC6TDuHprZxByb+
pwXxt1/regg8Rd3bMrpOdSIgEojG40gBOmb6htA9hsGAEZrn9vwSypps77K6
DHCyd5/7kSgKere7TWV1Qxt0cj12DjNLoZW/tV/f/KMD764sraL/0aPiccq/
q2j1YGg64/nBiC/IpVNMDakc+iBcN9Zbm1OPiPbUhBlzGoD8J6q/v1LyEXLK
85ch/IbwkXg4qZqUiSwY782SjhOBPaf8+6llCg49wpsa/EZw6krytNRJEsL1
3NEvSogE7sJNbXfoLBDbzuZGjxPGkPbuQl29hTrOfSg+oVvWBJxYL4VPDB/B
i6uVlpcIpnDekG/fNTU9PO3LI4cfiBn49WVejgkyxX9dvGtzTt8czp0dfXfy
nQw+++dDKi5CBr07cgeUvI/hirk230dKyHD+xAz1uSeyeGvEVESBCAU2ZS22
a1M48O3x8EsN9yhg//s4wlS6TPg7P1BHL2kBb1M4c3iQZkKtv8LJimoLWCP3
C24EP219ZpPsZytpCWUxKoz2R5oIIuLnLrvIWQHvqf0HW9SLCbcUeHWIL21g
+WpXErfTLcKtW2bnV65/wwRpBypnwlewKxukPU1uBhD/qnv8QP0yZjvx6SK1
zSGYzbu+79f6IsYlUH7ngdYRCF3eKvyTMI89u3D0/rE3//ZePQdC3dqFrSVU
CH8+KAspEft0yrnvYcnP11SSOBVAuP/dzMEvsdgfxNLb67ASXPF8oc1/5Cx2
+lwGLi+lAoOX/xvL+q2JxbcHHS0XUoPIrvVz34q4MeP7x+43C2uAutn7I2ak
NZTGoNzsPwUtmCycUH9n+QrNeeMbv6SOQKFf+y3bC2WolPf57FFrDPj4D+28
uRKN8rcfeR5ZA/BRzPK/ujFbNK1DhE21Thscu/szS6qU0ajDBRMOzTrALKu0
SKBhR8cuqIZJtusC70yCrV37PNKkN3vFdFAPdKbV72w3diGU0ZiI6+/0wbVS
X4bbMBexcwVd/9F/ebMR+jChmot8NLqY9fyLIfzepnoVH2iJdLzwWt4YJ4Lv
EPHvSo04HpBuNrE2YQSewPWhydYOKaopsnWaJUHadQtD9IkCrvniYJH/gjH8
mCu17356BJfsOrDptGcKXQ7VcrdpzXBfrjLXa9TmEKH4ML7YVh3nnTwpf4j+
n38os1Nvx/PhkrQ6iv0xZBBany/zSZLGhUjHopZpKJDhPaXYd1wQHyXUHyTG
U0A1LbvZbG6coF9ty7S+zwI897/kvjw8+c93IxglWCyB2zFmUC7nAUEBOnvn
w/5izOQtASaZFWz70F6g/u39MCJAc+751hKWnLxuiGxKwYDBW66g1HrsKPJG
+QqXPLQxOq05RGZh+2UEqPcfUATmHEEvFdYAjCFxyu2QhDLQMt78YzFuivUe
Np3oE1eF3AeWnsm3xLHGM88O6R1RB8cXm2R8jA6jlX/TH6qgCZsWFtrq8Z9R
PrX422dlCHBSMStXru8Jql5Zv9tphELUsutBn6OZaE920eopBYCVBW46wTwv
dNuqgNpFRhuaX07f9Ks3RBt7bRyrNXTgv4d084dqj6NvR2af9qvrghLittOo
v4ME5SsGSRH1IIdAd7zq1wii6Ck9N3hSH4bCnTm1dcuR7UcTwUyW//bVQQdD
r58FyJZpusaAExGIYjmVQ1wOeEfXx50IOyPQO7DnsMFpizze9qZjdSNBX2IP
846KNnJo+N2hABdjUL6WD9cqVfE1+y0f7gATeIUF1CY/EsOXf7y6RhVtCrpV
9FjSMhFfp7J5FhVuBkNo2QFXIRIe2VNsrJVkDoqSuvixciG88ZDj0nk9MgQG
t/f6/PMFTQWf0qkOMtSbWg283ZbBrWrvhZsYUIDV+7d4pgw1LhSl/0HoGQWs
VU5U5nGtEmrF9Ox5TCxAMBiRo3k/0LomUH0u5JUFlN1CN7SP1rRS4itcLy7b
gFpl9bHpjZuEHnm/8wzu7dgoeXFYoGwFC3RuvmTVTQV996U6kxhWsGn6cj3Z
MXZw8n6ubl+yhGmGU7lZvuKFYgZqfZl3CxjdZ3mvQbIgPP1YvXYFn8Ho6ssO
K8aLwAPuZbqya5+w5BxeCZkIcVDwrmPLZerD4obmeSS6pOHocjYeeLgG4yX+
Vt0MlodthjaaSf4bWM1/fzhKfRThkDyT0MY1L8ymVsCjJkUZdA9ULfzd1sfc
807Q6yeoAhKdue+ttRBmE+KjInxZHex5gmT/ru6iViufPp/J0oQkGR57ddER
lNPboMU9lQDXVXfG+dgeoanZTgz+/6HAoebReuX7NdS3MznGxxmAaZX2+rtD
rmiolgtfioM26IsO0txI0kaTacxXTl3QAfvpKesYaj40vL9pLMlDF+xUJFa8
CzcQ44tb1ITLesDxeSSOZP0aYfBhohZM0Idv9wbQx+rFSGngLV7PWAPYHdlg
qlEsRIjPVS+eyzCEI1OZvgJN4Yjg/t5pwTQihHhRPaSqtMXdzcJEY5ONwOb+
5ft1+Q5I4yfkXtYtEjDiya6T148h37yiCaw3jeEA3eOJK/vl8fXhXBa6MhNY
CYrftHihgC/lxtTL1JpCXte8Avm+Md7rNn8JrzYDjSu503bm+nhF1NnA7WZz
0Gad6Rhd58edemb69k6ToXgv35n1ohheanS/480oGdIOc61J1EvingF/rPYc
KfDWRdwz5cdCq9CxhA2H8X8+KXku92/LMqEOl74qPW0BYy+VzlVPxLS2x7/S
vHXWEhbpctSdFDoIZpvrqbZzlqB4fEJqeLeBMPTNfsXsvBWEC2hZ9SzEtm76
H6pTDreBHwIF175DPsF/X/pl/6pVLHscOV5+dgVbifb+7mjIBLo3/Oydgpex
oh5Zweh3nJAymYrQhi5iu19HMmtq+aHL7liJf8kc1sj06DRLlChkPfgt6dX/
BjN7vPyMVCwJtg82xwTU27D+rm8OJp9kIfrXIWpH2WIs/4EQzWV/BVi7SRp2
RCOxtj+JLMZRSmBremAg8rAt1n1+NImUrALaEojUHq8ylqMVuPUlSg2GN1nu
MSyxY+w7QjZTiRrQdtaTofXBAnphslmSI00L6qxc02l5n6H1uslKSBECOzVf
aSr1itEfJ9UtjVowaKrdkmWRCUHJp1hxq88AoSvnKhOIlmihbs4FmhltGL67
4ZpzQBad6Mh5+3xeB/ZPvPhWObcP5dqtH01e0wV/UYHd7ypfkZ4McG+j1oeQ
r+1hxfuakFqS6988OgMgbta99GPPRzK67kkEs/zj19XDi2VHbyJuL+04PA8S
oexN5g3WSkNccJ/qegWrESRDcuDtbR2k+kmuSf5BEiyUqua8U7JCJHcCzpRz
GYO4wiGfxDg1vIjKg61GwARAdzXsT9th/PrpfgMJaVMwM/6qIb6igzd+6Is1
kTWD7Zq9gMfvTfH3PNOnLyqbQ0vIs7v4lDzu/1P91zA/GYYuHGShfyGAv69R
aFPgp8CZat9Nrjwu/FFDMv/HAgrw1aYoL+58J6Tm+hGvHLcAOktnx6azfYTJ
5xmU+lIL+OOlY8XQ2tNatt/w1HUhS1CzFfvw+mgjIfJ0QGOUmBWEdXndDvO4
S3DnV/4T2WUDXjX6k9avbxEi+Rin1oq/YvtiFiHo6gpW55dV84GeHjpeVV8j
9ixjOrOeiiOjHKA8oWVQy7eE8csvblO384H3CuORwsF5bLE89ldLqgQ8aJkq
v3+wG6t8MdfcPCADywbSc927ZdjHsOv56hvyEHOtSrCj6yrWZKV9I/iXInSF
6vXFbThjqayXQyNYVCBW5MFbunYEi/7+KiqTVg18uYg3v3znxeo1X/TQ0GiA
Z40ucyllHf183pheg0MLnIv0PurDIDpt4/5rmBsB1P6pG+9KBYoGvap2UMGg
wGPTheNkDOqU8vLYVDHAbbA034m3R1OwXR3DEm3owba2Vf6oovVffn65UaUD
myHdNyl3DqIvZhrtmB/qAgENWV2LXEQYowVUItr0QMtJM9M18BkyZq+2O/5M
H0yj6i9Rvt9G8vOOlvg+N4AEktCrJ5fzEOsXve2zrw2hPujXI84jZ5Fi5qhF
lwEijEkfc+ZTwnDmuOQnBwaM4ArNvusmQvaI76INTeF7EijuRds6R0njTxvX
RRw/GEPH5rWKhqhjuFn7rPvNH2Yg77Nxz9lVC3d32I5lvkyGj5tT5RVVUjgh
wrs9ZosMvYjV0E0pIfwGZ1eTVyQFJjw5j7sFvyaM2m8X+uxRgPKforrW4WmC
9KzGsj2tJcxxaXHyd5UTSqmPxl+I+4Nl19jU+6ivYNJpRNHpRDZgEjPab8W9
jNX22GZ9qJWCxbCuW7E6jdhayyzVxDc5yGfU/eIQno05Tj4+j68ogBNjhUfl
t0Csu3Ao4eg+ZThaH/9LO4OMbXWp5PIwqUJhN8sFspAUVnPtyCX5bTVAFvlj
ev8yYF7t4fOdBzQhVZKNkTr2C/rLRpL8nY0Aga6KixyXWtE42WqfcjEU0q45
NXXDTXSIbzg8VxCATui60MNeHxSETO2eC2jDyAa5DxEiobWGilm4+L+9a/3p
58f7wihTMfJ8T1wXDk7erggUp0KduR9Zs6jpQTR7TkmR70ck9t65vD09fUDK
KHGhaVVIvHrmb1tdA+j77hbS+bAACepfdFkiE6HfY6hWfuc0Xky79HeRZARD
u5ojcoXWiNlK1WfxkyQY8sL6K48aINNsN1prrIyB2n9123xQDb9MGt+gdjYB
vrWdxavRIvjHIrdpLR9TqJTrWvB4b4gf+eP9/ZOXGRRGMMXx6hjj9r5fzPRD
zOGnnaknzaAIrsOGn4wgkEH39Z7sUqcQHnJNYvPYEzKImJBpuGNkce/p9dZJ
hAIOe8xDtLH0+Ki1ZbQhToG5B9bH+o6uEvRGZ1czdC1Akb7683jHs1ahADan
uG4LOHv0+juzUw2tQn7d/KUzNoAoW6tmaGcTeEw95v2IMsD6zWWiW/c+FvKl
y+NWozxMQ5LvHnMyphwj8Pr6I0UwcinddDQ4j605mqxyv1IGiVdXPmly62CB
uqE6Xs9UQSZtVJNCOIrF2/LvZrSpQ+amklfkoT/o7fuZ/iZvNMFHPY7nEP0b
NPzcqQ8FwwQosY34bP/6IeoWn/3h/BoKudQ7LKUV8eicqNTriisA/pe9xUps
zqIxSO1DjyhtMJKbXR8/S0CP/YPcz2Qd8FI9KxF5ngu9++Hxkb5rurBjEmNv
F7+KVG1eyxvL1wOSyYZNzPWXyKpr8V5kmT5wrKtscmfnIYKMn+wv3jOA0tiH
mofJBQi5N4r7RJ0h6KSt7b2/7oc4pdyd0/mP+O//PWk5sErBNT1ofI2qjeAn
i+lZaXpHhNPlpeXhxyRQzlPzzTc/hL9Lb5ZXeWwMQ5IDDccOiOJFVVbul4ZM
4ejYzq+fayY46yF3n8oBM2Bm7FoNUtTGQ27PDJd9NIcAxQt8pCw+fPqgn9jV
C2R4MC5aU1opgft+ZYX782Qwjw0iMlaJ4jtPxxkavSmg1FyjPmz3snUb1+5z
W6aAizC7QQfLAoEKE5HhkJACKuOy87+pmjEn7LzczbNyIEm8HPmBNg/bNlhS
5q9V+Nf1uu9GxUMxnVfVL5SfKsHQmpdkhJsV5si1j6P2hQosW9LQ3omVx0q/
PldjalODdb5a330zLBg6MSho8UoDXM8ldgYWzKC1+f747oAWnKA29o+16ET5
NfIo/l8RcLMprK8g5qK9+t6i2C4GJ45Gr7gWBKC9rdUsqbsARLpbPzs7zNEK
/Zm9zww6MH0he1TGUhwNlP/ef45JF57XvxCrqKJFCcz1PC859UCIWH09bfIz
IsI/TH1GWB/cy8yDeqtqkXzt7T9bwgbgPaRukfA3H/F+dbdFSuHfewmNWgR6
WONOVw/+7pMygunWHYphFhlJvEq9X1rlH795PjRM31XHr5+4S/0BMwGnBWcS
17FjuMd8vlqWqRm4ZVXxjM+b4Lzdzidtrc2Bo42zUcpJErejuixaIU0G4wtE
Fa97gvgdUibCJEOBnj+5ei2BB3ADBp+BtAcU2JaJj+vX/UFw15AWSFa0ACrD
Xy28j3wImmKupme1lMDxqlHQ9TFHTLy5knqapALSDYvZ/IHqWEqmIN6srQZ2
K6TLv5M4sakjQTf89TWgOAwfvx/0Az0hQptzgqIFPr1Vp589eIGamIVyMZ5G
oIGnt05etBTldaOJtgzBILpM+uelzgh0dPWC95EOgMkOUpCH3yn0prbxiMhT
bRhY8k3cvqmIkigGn6T6dKAtXMxOfT8burLacJs0pAuX2VgQT7NvyHmm/wYE
JvXgnd/9cAn1DqTHcmCbMKMPjg7vpqOXchFeOeeZgHkDKJemtKU35CCOfQc9
KlYN4a3w5kJwgBYyVshB+37FCIyVXO85OdogA4GzNUKbJLDmb+CdPaOM136S
PZzw1xhsVivM0osO4xkXXJ2vcJjD2XGXdOyWCr5YkTB5I5kMRRrGx8uNZfDj
rmWewqkUOJGRdfi20jShLTQm11FWEYwLLHWHbf0wot+6PqOxMqy1P3jiOUfC
sn1dhCKJqvBI++ZOupEo1qrkU3dKUx1IAsdzCldosNxiiToFS02gWepR6zoz
hiJcU1MjJgTgP2iUVnzmMboojF8fu4DCvBWluEEpHW3luOjGpQOQOv9QJ/Op
B9qUsFRBhWiDDbmNUyVaH202ihLPI+mAdy1jYtr7Y2jhgbSOPKIuKHu/Sfgb
u4VMyW4oF7vpA7uQbhv5QiniJyf5q8nZADyJCCooWYhEDqjs/8+XCFMbhPB8
Ngd88krv3n5PI7j4Uvbd5v7TiCCzksRKEAmmUyRCehLVEZ1s/gsqgcZwU9te
r49BBff04VmQjDOBYh4HYRpLKZxaR0npWZopWEhYjSX9NML7GbWLhFPMwHbd
u4y3n4gX8zsRFXLN4T3tESe/KUF8+329xb1eMvy4Kr2UoSqDa0ZaE5rMKJC1
RbPwN3Kr9WhwSU+elQUEFY4Kch9+0xqdl/JQ9ZcNDIkO/JBouEnoDHlYKu7+
HzbOnVlyuGoFSxE8MyBMoILKEs/rdWwr2GjSsujtfHagfXcqIbJmCWujF87c
uc4LkXFLumI/FzDlBC6ESk4QTngq0Yavz2AVy1evlrqJQJgcd6gsyxhWqGps
/tdOHBahIJf8sQ9zWk36ml0sDUGUF/Plz2qwjhL9BVN3edilNvcn6aRh7C2+
dysdFWF2lO1UAJM3tkrP8fx9uDJ8IBdEO3IbYm61QyotwaqQqSI9y4IJY6yg
p2voqQ40F8USesyoMB0q2ZbSOE3g/LH0qZg8ijbLdwWcjiBAlynVKT6eejSH
LzO9vhAFi3Mr+I7bdZSjYkq2xA4g8Fhlit8xN3Rzi9zAeVIbttyaTzNE6qCl
bls/fM/pwFzN199KZkdQf+Y/r/446cJcz6+3L19sIuvM2Z/e+OuBlYSwrLfF
MGJSe06bGKUPcfH6OUuHSpBnN+IN58MMwHp+2iVVvxBhSJimCUg2hGsD8Sb9
76OQNNnX52wSibDgvBMdMW+H1xvyZh2MMYLiqgAYEHVAikJzQx/dIAEr4x93
VFIMqf7qt3clxRjYGXfDZFIUcM+qb49LCkxgTSp9tapeHqfiSX1+utIUnPIL
3vQZGeOPW5KCdUrNwLzttoAj2QBXDu0YO/jIHBRtxUT2fRXAo352BRy1IYM7
T4bL2KgoLv91eLLgLRkkrPvKW8KkcIMz0RUHT1PglZzcarD9j9Y7vCwhBpMW
0PTRdiz9aXrrUbONUnsHS+DlVj9hy9xB2D4QIX1+2hISH1BCsZpGwveLcnSM
56xAkJz39wZbeKujewnbULANMMe/3EPT8wnS7pid0n8/sOGkQbuzbisYI3ZI
T7adEdQ5OlfEYpaxLFIQzfebnLDZ7m0wkrqIxVzc6rAL4IfLi/siYl/MYaf1
Mp5HnBEFR1dppFv3LeZ88vgib6QkKPnWop627VjF1wSJ5ieyMPWhW/Lm92JM
b59vw7CzAhCRPGdiZRQmQE+VT/ZWghwm6Z173naYQ+urb75hKnBW9WcsfkQF
u0k5JmXjqwblO4doR54exLq7f7kyhGgAQbrlTMvRRdRulZXhVLQWvPlK1rou
3oPaMTAsyqUiwH5nkOIhUYJuffCcuFaFwVg5k4RcSCi6hrh4xI8AsPYTvDtR
K5Sf9irDtTFtILy4bttXJ4f+EdF7P/lFB5Ap57tP+ZhQVq2N3q15Xfjcb6CS
eWIa8ZYf07b+owfDMwpaXD+eIJsp7Vrd2/qw/IJWeO1VHlI/nmWzSWMIIMme
nc2cjYhcY6wIZSKC0EpRyv3PGJ4mhgVM0hnB7ouK+lYCivyuU2+WZCLBfh5C
zU+9k8ihvCGlHjZjWL7t3ZC5rIq7BNsNneAygVHNhmO5CodxOiW+nz3CplBG
8/LaHFEHf+YV57AmZQ7Mnndnnm4q4Oq+7vfHeclw7b6fH+wXwJ1JthN/eShg
mZBy6ZIGDz6ypnMIE7AAi78txMCbQ4QQ/6fmzcUW/3gib5Pu3dt6y+MEqfyo
JZCHg0z1WRoIUpf+Wl4XtoJWrgb5Opp7hNcHu6z42mwgofzM9g/WHMLqJ5ei
wKovmCJh6nNV0grWJ6fBVBlBB2UGgfWsg8uYqmcdp85tDphyyPP8Lr2EFT/Z
L1kdzQfL09ypl9fmMSqDRoFkLwkwHrklc7urG4tbSIwXfyADB6/fHaWjrsBi
3n40T5uRB8HyR/3JT+MxHqemYxGzirDUpYEabZzDxM76jNz9qwybn3WJiwQM
i6AOqWFaVwXbWU2ebjE+zJ2m8K3oqjqQk/RUEz030IGQgskIGi3Qs7gzkucx
hCYfmf7vGT0CyRuJEcGkKpS4tatWLIKB96GolYNWsShNgPCrQ7cBPiyZTShu
OKDMewvjgznaoNP7dZ+dujo6qF/0teKODmQPPp/YuMKBdgj9IoXd0wVpjjLN
td0lpEbgyX6uRj2QRqZEy2d6kONF6ShDmz5omMuduMSUi+CNbEMrbQagPfAo
KHxfPsKZFHRy84UhiCysydsruSLsUokX8nuI0ETjUi0Wo4dbR4iLFT4zgleN
zN84h+0R2+SG960DJBCwYCFWnhfHE2Vmv70ZMobJMdIB+j1BHOVM8OSbMwOG
Z17fG/Yh+Avu7M8mm2RwqTNtKUWEcU8qI9aoMApIb3VdtfvVTTje0O8h85cC
OrOxSeHVMwQBbd4vQXsW0Pz2C4NVeSnB0fmVi3TSbyxRuEtkA1nB9MyWIh9R
scGGMvtmlvAy1u2S0lx+QwrieJXJkmKPsYGx+FfGPXKgzEZ9RCrlFsagSX+E
a1IByvmlmFZnLmEiVYa8IptKwKdT29wdSMEyeSR/I39UoODzgjk5Whp7UNJz
r2xRDVBmCZryY4yYYALl18yuBhh4lccjl6bQWY9wKfldLfD3+hvuOI2jkqti
4rncKJBVd+mn3LPRd/YXurR4Ae4SD6jVdPiiU4z3GP5wacMi05x3sK8xKrvv
mJyBoA70Tj5TutkmgorQzffyHteF5EOZ2g1/qFAby58Gl2X1oFFBfj7/ySdE
Wncv8BZBH+40/Lkncb4aeRW2pB6jZQCjhV+j5BIKEOXruVvbRCKE+e2JpdOd
xtlFNsNEdI3++QZr9brKSSR3jmj62IQE2dqMV5niiUj//e9pgybGYFUs/NRS
SR2HzoGmYFsTOMqE9rofEsbJwY/SPriZwoVbR4LZ9Qxx2Uthu0yuZuB0RpQt
rc0YN352hdznYw7z6j8WaJhFccbkRaZEdTL4md8hWykL4X8j+MerNCgQGNvd
3P9uH16v8/GN7RMK+L6I2thmWCVcl29qJWMW0Hn/6mx+WUdrswDqmNxhAQz7
wj4e5mhqveZmEYJ9sYGJxPx+iwvZhLWLTA2fRWXgZcby50XvakxQi11gpUwe
1B+3hthoXcMyr2edzbyjCN+zi3J/R7pjKY/AHGlVhh+svbbHdnUwP1uRgKkG
VZCjP/L6YssxTPP4KsvjB+oQu3XtJLX3FprYOmOa/lQTilHNDJWtN6iQ6Jv0
tE4CjBstmbphNagv8wuXqi8oPAxFklWnEtBkttiIj6EA5XryEguqzijVToHR
WpA2ZC5bLYctIqjme5MF1lgd+GzSz+AWwo3mcv9m0YzVBc4+Sqd78BpikSV2
KTBLDyTyVDUUNPsR1YotrLxQH7oInmJnovMRbeG+a4v5BiA94I17FBUg+xNl
qpWrDIFtnk8hVCQQGaquPh9WToR3AaVqJwyt8Hjn4vGRu0bQOdNnc1TIEdmm
FhdX/48EHawad6ws9lpzGat/Vj00hsbP9Tf2lMXxOlGny3d7/+2F44sef6tM
8L/nGf1ke8zgQVDPiUopHZwWMxu6e54MKwGahyuOSuA74cpOl2bIcFXlRtb3
12L46H8udr2eFBhz6LS9OPq+lXPc2nKSQQqe3yCeUqFtwbSc9v2lATlguk/H
Yqqfj5UWa84FlCjApW9xzxZswrCSEWE7zTolkO2/O1ocfhL77fHXZ+SJCrCr
8TtF2ChgJX/83aMeqsFeUpUUnyEbtnavVDaoRQNu3+jKce2dRYsfdOfotmtB
lernLj3FLrTrLzez6zACSZcqkzeb8tDhF8W1V5YwcFdof3fyfiDqeZeuqX0T
ANO0WK+vIqOi9MO57rvaQIpfuB59TwJNzcoeDKfWBYcg/1+VZXSoouH6Pi1W
PehpGjZrqJ1EXj25+GmTTx/sigsTWg4+Qr7EWmsK8xvAs8yiK7vP8hHpFApF
S4IIO5rTd6nIVvjQPb5gGhEjyJ+10owdNEUs8rO6zdT+8bS19PRFSwE83LWC
1KVvBhRl5dApFVOc8TDtqQlTc0iZ6QjuYJHGBSOqPtaJkyFOLLWHV0oQl5tu
dngjTgGfV7POYvwH8br0nW+GshYw58fzu3ikipCrODbuJqkE6oeF6fQwJ6xr
f+EZZi0VmGi8PBH+UANLqny5JK+oBneqFP5eTuXCsr+SCrKVNeCFrEOGjd0q
yqlyMsBTWwvkq7/eDfndh66xb/RvGSFwpIQ/BtO+hwotKLNkn8cg8sRnI9ZT
UWjY6FM+0yaAG6/z09yKbFAOanX/B83aIJT0edXhthLq0rA6ptelAw5O3rSJ
0fvRWdnNpObnunDb1DfnVsQcwl5OqmgY0QP5mMqfXD6dCGu2OOI6rg8O2uwu
zPm5iAaJwvlz0gDS5x+l9UTcRviT23cfzxvC8Owhq9keI0Q8p8bX5ZsRmEtc
/qTiaIs0cuhe1V4mQXe3xIdlUSU8yEJwbHvNGMip/7XLR/PhVzroXRiYzaFz
uj8wYEUV3ybLtKkkU4BUJ1cjWveF4PZm0LTxqCLE7JJ4eWX9sfLwC+/ZNJVh
39kXMzy2JpjcM5voUnVV2Kv7dNvcQwx7YsT3tV9SHYQNfperT/77Le677Sd1
NGFhZkTAcW4clRZVbuNHCHC7355G9XoTmjGrbjBoh0Jd1/a8l1AG2mnFUN2o
AYCk9sqyn7iA2nnrn1RU0YZIulPRYZkGqDqT11NhHR0YncbWPzwXRJ8EaHXV
gy6EeGVOr3z6iyS/Stuv7qgPme94Z4t67yGNfnFqX+wMQPj7oMBV9kKEkPr1
bps7EfwWU3leqzjg5DuvIw2cjWAqOCkv9bgd4kX7OjvCmwQPZW4QNT0RRFI5
FLPyMoZXw6Gkvm8quOws44PiyyYQkp+/FBQkgYccjv7snGgKP5I2k3IDjPDJ
OJM6SpwZ0Af15WVHGuE3/KhIjenmoM3UItjZdBx/zhNpH0OiwNeuvDMdlrut
c2l8zMNrNtBiHnLj6Nt//in9X8evVH1ImRP4zrxciMTaVswvXDMA2xCOEw3/
7l+z1OY6f4sIIWvPawSEbXD+k2NN6xlG4KsyFfFlyQEZQL4MXSoigck3Cx2J
3IOI0GZqaHaBMeT3tX0J0JTBP/4T4L0mU3jueEtnksEE54+nYf3WZQ7BmZlx
JEl+nKcmtphpnAwbkdgni/cS+I0Ef+olZwqgzjDpHTzTenSjNFWUWR/MTH+c
nccaES9GlpYAVgNoLLNvCyDnIxUsD8LtDhMh0S8mwMDUDNc5w3MtUcAY8JVW
XvSvGv4xKZikKWoC8l/OsLsU8+GzXbp2cwRzcMu5wFiFy+HZfON4Q78+3GCr
mFWlykUuR8v5rw4aQExI/q2Pk7lIDtMRyZEPhnDn3p1J3jQ7pC150fjKeyPI
HjmbO2B6Gkk025aJmiDBrSC5c2+55fFdjNZ57osxyDNxJRleFMDrxbVc7WIo
UDGS/mpgZYTwcV9v53lTfXjGI2ik/KkC0d5Ub1IwNoD3rdPN74YLkCY2bHDc
hghuZTaKeQ/s//ng1/AGCyPISr/BLzV/Ctn2UZxLtzeG757domwmajhjxLnR
B4FmUEdnatDfRMIvHtE27Yg2h9b+pxeNHwrjW1FcYu8MLYDmZy+fRmRfa7Ww
Qbv1Q33IYvKdGZnIRfYWv8ssPzCAwYU/MtWr+ciyjwtNS70RXG2ReR331AFh
P/LiYnu7MQz8IA5InBDBU2SNThqOmgJJxUBsWMkUD49UFX8upQ+8lkwXc8/V
IDWsmyf4NYhQbRr7u07TBu99WIueI5qAV0+6/8Xbgrj1xXQRt5Nm8F65mkMi
wwQvZnZ5k/PHEDo+tHwJYOVGZt4njdHukuBP5jq9iIsKvuiCWB+kM4EOJvqy
haOHcYPQYzwHMyjAbcZrpRg2S9BMtz3N6KMPes5f8i2l7iLSS4ONaZ4GUHv7
7cBZrBDp2J8YUhRChFzdOyOKBfa479n26BE/I5hmWmGWHT+N2P5uz+YON4be
EV3ZawzKeM3zdoPqO+awVmeh6y8siPOU7Vrk/bWB9Xx9Lb7bNwmPGSWOXXQv
wtI/vj/IU72CKew5b3D/2MMwzTdHVA+uYMPGHDkD4eywJ3S7eenxEhZNqq8c
9uaFkP1SWovU3zGTTwn3eI8KgqpYdkPtgVls69qllnFrEegM3g3YIo1hFVdd
nKeMxOGAKx/TYb2X2AC13Yv+G9JANVrtvytQi2WZLT4NdZKHt43sAixFaVgH
VF+QtlaE1lTeUvdBbwyVZ92cD1SGE++z2bUrDDEXgqjZpo8qyNBYvvR8LIzN
3pUlfTirDm+Cei8s41RYM+OI+PNwTRD9nH37/PdRlI2DauhtIAFso/iab5bU
o/n20iMns1EoTo89zSedijrn7advtgaYPWDkz1/lhjbYPaf5QP7Xl1EugRo7
Omgd75BfxBkdSPBZZ27ZOoIuix9+VmuvC+WyhSzg9gvp/XCut8hbD7J/SFuH
vx1GvIfTztpf1oecCq7LfNdKkBm3lv6weEPwopYM0W2IRnrbTgoHxhFhMOVe
boPPadxO71vfaIQR9Ao8WuWZsEeyenu/dl0jgUj3yyu+tFLI/qKFSUKiMezr
bHymhCriotz7U31vm0C1/yezjzLy//rU9jddsRmwV7wbMukzwJXf6Q7z2VLA
nY2Tum58tZXPIMzPcsIClJVOqCQwZrf21zLZYactgUT8Q3g3104Y5tf+e3HK
Enqjl58U7XtM+F2TkzrtZAU2NFymNOxBrRzn3FsKLtlA4V+N6rIn+YTEnOwX
mQo/sJy7sw8b3VcwzkLXH1yXGcEjwVTUL2EZS2XNDRAM4oQ64fuKmbcXMb26
ayNyVvwwhsc4mIzPYQ+/XNlpNBcFx7X0o5Sot5hXqebenpckGNyJv8+01I5x
r586sFohC2LiV89xmJZgvPXcN3btFABN/DZ/XjEae5Ws5fLGVQnKGazLPx47
jVXN9nDH+atA+xF6z+USFSxrLFA3010NLIWPrMgrcWCF4lNeOT4a8LX8tu3t
iUX09Z+GgNAQLRiyDE4ab+hBH3zTJVZeRaDIqet7THEJuneETkTmDgYxY+W/
/giHoboKaVjRG4D3P26Vx7RZoZ+c/1qaj2qD8YVdr2gDeZRh5PCppXEd0DRy
O+f7hAlNsOXqrJvRBZX7Zz0f3plGdPYqZYU29IDmTbto1Y9m5PDDxdOjv/XB
5ISn5NfKPETvAuuPhl0D2BSQYGK5ko3QXvjsf4WeCC4i9jyPrdXw3sdPFbep
/vGV3aYyUV8TKfxv3+oqHQki7Nm/fX15EmFc2C14x2QMR5DCui+3VPH2Qnhx
85gpqJgU3PXa0MYJt6wm6sXModhEcWwlXhEX57m4PMlFgcareovX9/Pi3c8/
meGFFjB4WcmYzuRFK/utLN16fktod83/zRleT6CJaRfKOm4FTdZIK2XwHiGe
NYlmrsUGVC6T+wKkcgj3CYciVf6bxDSV6Hs7rq1g71OvNaRp0IHf/jxH2zfL
mLz0+6vBoRzg7wwlkypLmPNuEVw5ywfDE8s3H9AuYMw3B+X9TktAtqZ5+U3+
Z9jalo3XmXwZaD8Zc3DwagVmfeWKROu4PEQJfZwSICZgPTM/v+2NK8IG+5dc
zjAXLPCaB8Pjn8og5X6zLIgasPCU/l69RVUoxuhz417yYTpuiZ+a5tSBi2aO
ULy9gepfMTAr3tIEDLNvFx4eQse3j7NiOwQQ3j0csX+vCjUl5ERo82PAez/e
geFDLGrpZn5H+iZAYdqb88cfOaK9jmelsrK0QfpFXM3pCXV07FegS0OhDljd
pBzZ2eBAtbR5dBVLdIGX5vp/wc+XkbjF+L+TtXrAqn4hWv3uc0Svo82Rr1kf
Ivi4PaqkchEzvavn/2s2gOY14H1kmI+su5sK7j4zBNGSH6XBtucRYgurVFPX
P/6U5zmv0hji26G/HFw7jSCIbmhLmd8BMfvwFV71kWBf1q1ObWVRfGHO8UXq
K2OgepxdavLoON6Invo+9tUMPNYnH5+YRPC0r5UrCutk6KWTFabvE8ZtglhV
E0MoIP0htoZJtoWQ7Z3wMXbHApqUbNiH2O4SWjKE36aw/MZU7wROVMMKRn6A
SeW1soLS/OctTsllbODRvf7USClwCj5wSTH/MUZYsq6LaZCDZwXa9AG8OdjH
2fvrMKoAC4GFcd4eQdhbudjJsiUlOHOqi+XSAgWb1BYRo6yqwBwLqeidigxW
Lc3f9mVaDaqGh+u3GhmxrQWt3eBNDRh9TuIi/JxCHfxP3LbY1ILVrdqx13fa
0Ihh17hD+1FQeNDy+zDtLXR0R82VlRNA9G/nFy0lP1Rpe2jsIIc2hGmyHn8s
YIIuud0MZ+bXgWbbmK9JpidQhcY2oxMCujCswbnJ7kaNvvU7hClJ6sGLonlL
WecxhIqj/+w5dX3YvzT4AD//AFnO47PNVjOAL/NnzvD4FyCHLvo9o9MnwuLD
vCiZi3Y4sT7sX7iMwPh21JX2MCsEZnjiIokkeNR9o/FyoxFyJ9wwV/GkCTS5
0sbmugvhrF8/uFU4mwLaUPoy5I8B3rVCeZ1ywRwuGZBlc2tF8S6S/NINNQqs
iGk99WNiwu80Few4P6ZAYO/VzYKfPwgMAdYO19ssYC30qJxk8JNWOHtYlO2z
Ddx5P98uciWb4BT5IZebWwaQxrmMTMYH2Pq3xk2+InnQKDETcBm9hukcGpLg
zlWE+5ZRTZrHPbDRcc1Icr0yDFwUO2YTpIv5TodeE3ioCgeaDSt2QBDjvPqJ
w+ieOnT8iQpTE/qL7nWntjxq0YS71yhVp0Pfopf2HVxmekKABW6LSPH/atBL
Js5Vxh9Q2G9/+OeVuET0E9V/lj8vAbAippHcVc5ouz3nrUZ/bRg+EbrS+QRF
DROFLhyO0oH89AN3WBh4UC4VXrq1SF0I8+90o9lYQ0TPbZyFND2YWLipt8M9
gNi+EHNqydWH090y1WWMBchwjbZwdY4BHLQ+ZHy+swBZOk8XTCgzBEdOH5Ge
8EsII6Igln2XCMOlT+9J2JzEf5CtMwzvk4AqODyrKWqsdfupyDvXKmOIr+SL
mnCUwP0zRld/dJrBD+77ldLVOni3EdHX7isZ+p6ktFrbi+M9J8TjXrtTgCj8
+4DtvU+tR6V93Z5vSAL3lOykXEILVuE7MqkhJwcb1g1LB7/nYyGmXzqLbitA
w8Nb9Yc3wzCywxkhvFIJSuUX6o+wWWN6WRuFC7UqINsrxv65RwErjuuNbi5T
A099PPveLhv2iumGCuMjDXiQFiw0fu4bytN4kcHtsRY8ITvvni3rQrnGrdwm
XiDQetrAoSUkHx1h0fwlNIOBTfdC7nW1S2hLtnzq6BrA+SxTLP8QBZ12Ic5J
b2lDj9vfV+4nJdF8Ay9y0o4OSG9Yrp6SoEcfuHJS/dynBxZnzCmc3F+Q4kSt
3i5ufYAznWcUXz9C6O7F2qnxGsDfWfaNhcp8hMVLnF/3BBF2qVbmFMUtcUbV
ItWjgkZAkF1nvcJtgtSfYitjUvrnf1ZThzKT+PFo3TcjxUbm4KnYJte+KI1v
1gxcbBKlgMRG6rm04YP4e8StX1TaAuQ93avEXjwikJp4yuaPK0HC9IOUV/ed
sP0aOakCSipQdtY59ipFE0tUPs7gJakGr5/VsFzj4sZ8DVVKxaU1gHkwv7xj
aBW9huxOpmhowZpW3Hua0peo/pqiZKA2Av4p2+1n395DRaUHyGpnMGDzmXst
wxWNvny58sO1HiDrA1fVEYIt+trpYbtfozZQxY8Zagoqo/7/a7hM/KHA/zgs
0bZLiqWUo2gtgya3ifmOT5h7xvUrRjPm5UpYFZYOVEI7GyVHEoMplLB2Z+jm
u62hHEUhswi1IpoKiV1tm37+h/fr/TzPvrYg39/dIelYfKY7rKWEcNenxbd4
wKhZg4qe4Ws0nqhfcLLPE1L67+lMrZMj4q3dQUcHqTBY+cOXL3HFqPPP9tr6
YRpIagg0p+Ei9CnqQse9CTp4fSe1rtvkg7rPn6iyeskEqTTg8snhQFQTEjfj
o2SBxhXR3bpDdnhR2T/eru4NUgnxlWe5M3ZJPWQ+tt4OznVWuE+I4938VavK
cmwdoHcm6ECDPtctZcbvt1s2ThBxKnUxd8nc7fbTg59WbyXB9vxGwoJAzc3i
0dSDyR0uMLeKE5h3fZRSQRyxcnMkg/XHRZdGwh3KRNuhcoYfBYb7i4PvlOVR
Whd6vUSOAIHWTQ4HRn6g1IbEWbFtd4JNqkzmYEqn/BM5tm4KuUOFQJ4y4GJC
eWCm7dFM9oC/m+RROdn/IaFY+GnlHirctTxIpqVdRYN5soAFfxp8TQyIilQt
Qz/b+VNChUxwfAVGFpJApKNyqcszmgVZ7zeZK966IeP0quqwSDaYZmZW5XGc
cM7lk9n8wxzQrSHp3ci1wPanrt6wzeCCpunL41JbJla69zZGpnqB2dUK2+29
TLyq5EnnkbPe8HztCumYtSnOHs+N2cfwhSMKqZ3IQgWXZP11SzLLA9+6oSPX
xgvI49zhFxpZy/3e7Z3Dr5Yg3cnNJ2tENPggk1tc2FqGpo55mKmfZ4BSUjvf
OM3D8jNrXU+JWQBj7ZbXjuqjDNlXfN8iNggvpucXVhDxaEqhdHrIB/onK2/a
MSxxymdHq7+DfSEpS3erjeVU01xLfPKcOhXmbMcMZJtvoWwC6ZloNQ0Wj7Un
j9mUINGbdHqoHgOEnY7GHUZsLHz37bMakjcYBiXkPhTa4Duu34x2dFChOmnL
N2EzRUhTq+pr2UMaUN8YtWyzEaPDr9/Pj/bToTzxw+4eXyEKFzWmMXqZ8ELc
Tqts4qOUUsuL2UPLPTKdNt4QRsTBn5I9KkbYsDjhlGEbZYzLy5ayw1J9wV9d
od7d8pT8q6LgV3smFSqDlVes66tR+IaIASqdBk/SI3xcl/+48J1e8cQuBuRK
UH6MUIAjf4wk93gxoU8ZUpxPD0A6rq//ao31gtDnK2e1v7DwOFW7Oy3FG3Ds
KkmU63e42/PH59E1VNhof5+53kGMcpLC7tdV02DpjzzqA9NSFK/Y6Z3UyIYn
vz8T3tMxwz5cNb18cyqoPiY0kFfK0Lm3j2a3OjJg72MFbRM/AFtGW24x9uSA
VIE0ddZtwSeULmWXFuiQg4JIGk42aMjsNu3bf1lgu6tsR8mUA9YKNmc8jaZC
Q0vL26q2CiSZFnpUJTDA8bo++8CoAF977wEf9i/z/2xWzuJRPvKiT6t8f4QN
1/d5i/MyHfCjS/dVoj7yYINzzI7WqwVkQo6TiUM6Ff5nkz5oUnEJ8co4leQz
DDDlPRh+47sHa7GZQayfmPB4UIMQEBGEqLW2I3FrGBB6tqRt3YwHNuaUd9zU
ZsNFgPlE5IyXjoUbzzVT4YRBOEF1vghJUwNnFR1MSNYw2t92XIC+j9+/amM/
G2JH3WVFvC14d13L9gUOAwzUtbMnT/Oxrqhrc345FQo4cuWgWgmSFvjNW1+m
wU077porR0sRiWuvM1vPhrQF3umkTeaY+0vST/bbGKBFExk2713m6QuDl/mu
HLjWyppcY2OM5S26BnZzLBC9JVWs6LTH530CNnQJaUBjtoXLjcqQvg73nmUE
E1itAwMWJXuQ0wSr3zOWDYy90QS7ZEc899DGzyqHBkSriSXNf0tRh5VC5mfE
gLzxJrpc7IMTPv5WermHCl+R2BpdRsWoJCMzddur5X0+v866mGWIB7dFqikE
DPA6bnKuSSnAp1U3StzrqSA77NTBv1CMeqw383URA9RKR/ZRVgfiWRE/fn4F
G/4IXhGi1eeIXxBldYUpDLCoHDRRMgWY1OPS3JjIhB07Az0LSQIUWut8pesz
D7bTuInEMwVkpVp5BvGuPzhO/vnyIEtMrhyYGcoimkKRrlOcZsyYG9ple5a4
7Pt5fZ9vDHmVIHltd3wPlQ1GJotje2JJmL4yhpfQ4w1Kes+pQ8YG2CKwTzso
YRecqU3uFgrymm7/l1+VRXQH2R32ceMlU4pAXH87i2gHPxu2yC8ExLlF1KlJ
soh+gJvHnP041eQI1rv0HqorNBJ47DfiTsr/ARY0kb4=
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwl13f8TnUUwPEfKaVJJdkjoRKyZbRLFNl77032Hgll7xGREJW9ydaQlMje
W6GyV+l9Xv1xnPP5nHuf5/nde7/ne2Wq17pcq0QJCQmtkiQkRC57V0JC/sQJ
CS+DubimGM314YZz/+K84n2uJteM240HiIXcVG4+l1EoE97jCihewfNwLTGG
68uN4O7gfKI9V4trzu3BA8Uibhq3gMskYEI5/xTkXsXzcW0xluvHjYw/QOSX
OnC1uRZ4Lx4k/IkJ5flC/Gv8AlxHjOM+4EZxiUQBriNXh2uJ9+GPxN2iAl+Y
f51fiOuKgqKRD79HrqhfRP8N/UW4nigkOvF1+bjY+/HHIqmoxL/Iv8kvxvXF
eK4/NzquoSjMdebqca3xAXwS78Pn8WC8GH+GF+LM4l6uMleUewsvwdvwOrwd
N8AT8Id4TFxbUYTrwtXn2uCD+BTejy/gIXgJno4X4SziPq4KV4wriZfin/F6
/CtuiCfiAXgsTiJe5LpyDbi2+BA+jQ/gP/FQvBR/jhfjp8SDcX25tHFP1ckc
UxUXx2/rL8O/4A14B26EJ+GBeBy+W9zCF3FSUVS/G26obqd3GJ/BB/FfeBhe
hmfgJTireMj3JuXScffrV1OXUJfSW4634414J26MP8GD8Hh8j7iNL+F7RTH9
7riR+n29I/gsPoT/xsPxcjwTL8VPi4d9/71ceu4B/erql9Sl9VbgX/Em/Btu
gifjj/AEnFT8gy/j+0Rx/R64sbq93lH8Oz6ML+IReAWehZfhbOIR338fl4F7
UL+G+mX1O3or8Q68Ge/CTfEU/DGeGM9jzA58BScTJfR74ibqDnrH8B/4CL6E
R+KV+Au8HGcXyeO+cxm5h2I2qV9Rv6u3Cu/E3+LduBn+FA/Gk+I5jVmDryb+
f9bdL7/kmF5cU3VH/eP4HD6KL+NReBWejVfgHCJFnMtl4h6OeaZ+VV1GbzX+
DX+H9+DmeCoegj/ByRL9P4Suxf2LGQt76zdTd9I7gc/jY/gKHo1X4zl4JX5G
POr8B7jM3CMx/9SvqcvqfYN34e/xXtwCT8ND8WR8f8w351+P+xczWb+PfnN1
Z72T+AI+jq/iMfgb/CVehZ8Vjzn/QS4Llzzmp/p19Xt6a/Bu/APeh1viz/Aw
PAU/EPPM+Tfi/sUM1++r30LdRe8U/hOfwNfwWLwGf4VX4+fE485/iHuKSxHz
V/2GupzeWrwHb8H7cSs8HQ/Hn8YMiTnn/Jtx72IP0O+n31LdVe80/gufxNfx
OLwWf42/ifvp3JxySvlhPiv/aMx49Zvq8nrr8F78Iz6AW+PP8Qg8NWZIzEDn
34r7F/uI/gf6rdTd9M7gv/EpfAOPx+vwXLwGPy+ecP4j3NPcY7FnqN9SV9Bb
j/fhrfggboNn4JF4WsyQmIXOvx33L/Yp/f76rdXd9c7ii/g0vokn4PV4Hl6L
c8U94BpwJbmKeAPej3/Ch3BbPBOPwp/F3Ij55zv/iXsWe53+h/pt1D3iudbL
hn/nL8ln+Ft8cf5lPJHfIM/n1/H5+Xw4tzqVOrk6WzxP6pLqlI5vKL8dex9X
KfYqOV3MZ70D8rZ4ZrnDsR/JReN9QW6nP0s9OuYanh7XPO47VyO+K2ap/G/c
+/h8xw/Qa6vuGWtELzv+g78sn+Vv85PwRrwAr8cFHJcf51E/qU6hrhznxn6m
fsLxpdSVY//j03PV5E38QfXP8czjI/pF5WLc+3qN1V+ox+h/HvcLP49TxAxW
34lnRpR07EC+nbqX3rnYr0SqeJfhS/NV+M34EP4FH8Xt8Ww8Fs/AuX1mLvxo
zNh4wVI/HrNN/XrcA2pQ/LbYJ7nesY7lHFx1+bz+lbj38fzGM6JfQn6FqyNP
1t+kXhgzDm/QLygX4GrJL8RMVOeI9YxLqevJT8a1UL8TfyuuGnu4nCH2CL3D
8na9Y3wHPAePwzNjxolS8c7Htef64Av4atxX/C+egjfjRXgjLuSzC+K86tTq
x9RV5GdijculcX05tfOaqN+N+4yrOT5j7Bmxf3PH47nHHfGX8vjY3xw3i88j
547rG3tJvK/Hsx77f7xPqjuo++r9GXuf+JZbzG3i8ok0znmce5ZLo99UXUZd
Pd4v9DLF3sEfkXfwJ/hO+Cs8AX+BX3Bcnvje2E/UidWV5CdiP5HfwHXld5w3
OP6O+H24X6xz/Bd/Rz01rgO/RH9zXD+9/HJaLqW6qvxczKf4LJzW8c3kslyN
eB/hM8dewx+Vd8b85U7qFZNLcJ31vo75EfszN1svbzwzXM34zbEfqFPFTIp7
4vhO6g9iHeO/8TX5XMy5eLbjnUF+lZsGv5OXct/Gehbp4jO5nFw6/ebq99Q1
9bbgLqKMGBK/je/PX4w9UnzPLeO+i+dbpPdZqbjnufT65eRaMcdib4n3DHwK
v4S7xrpVl425Kl+K9wj9RLEm9KfHu6T6e73CPrcwV0idIdaJOpdeBse0UJdX
19bbio/hXfg07obn4kl4Tsys2M+dn4R7Mmap/lB1F/UAvZxx//Bl/rp8gU8c
Mwn/gFeof3BcEccVwYVjHcT6iLkez7yc0bEV1HViBsb+Es+sY87g7urUcjm5
q2MGqq/E+4P6rphN8f4ob4nvEJlwRVxXvS3eU9Rn1T1incXaiHUbz1Cs89i/
xI+xN8S64zPjSnI9nN1vyBozmDsu7+F/53viefgT/FU8y6ICN4zrxg3C1/CN
WAc4iZiFt+BV6q0xy+O3+vw03AtcFv2WsTeo6+vl0Hs65jF/Qt7L/8H3wvPx
ZPx1rHfH5cXpYr+X08ReJVeMucZdl++ONR1/J79a/VOsnbjWsb/L2+Vzcm95
iv7ceC5FJdwdf6y+ob4ZawW3jP+jybPjvVHeFtdPr3isO5yV7yMqi+F8D26w
3s2Yv2Irt4b7OfaAmElcq5ijXEP8K+4rFnCfcvPiGRZVuBFcT24IvhX3VGQT
rWOW8I34HbifqCqyizaxp+o11tsZ72GimhjJ9+KH8rdj/okcom3sWXwT/reY
R/7e/nJ18Yx4Vjwncsb7R+y7ci6RW+QR7eIdwvlNnb8r1qqoIUbxvflh/D8x
s8RP3Frul1jjIrPPS8vli1mlLqNuELPMsf8BKgEf2Q==
       "]]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{1125, 1126, 1127, 1128, 1129, 1130, 1131, 1132, 1133, 
       1134}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.56797010396942*^9, 3.568061405028542*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwUl2c8198bxhEiFLIqlZD1s3f4fj63vef3a4WSrGQTklUKIXslM8lIhSSV
I2QTshIpCqlssse//6Pz4Dw45/W6r+u639cZOw8TBwoyMjJxKjKy/5/c8bsF
OacaMLKmAtLv88aYDjpoMO20j7/t6v2U730X/8AgS0tpwwhGc2PBpzXycJV4
9foiQw4wnDOOe+BYgTuIbTFIMHBBiEjaETKzelxf0GGJTZMXJM8SKYcS2/HK
geBr7fICMFV830ZvuBNXZBZ6ThkqDOk6E1yVF5twp+2k7EILcVDQn27ry36J
e7T8lHquLwlRul6b3usFePR56rO7rtLALibb//BwPH659YajhLMsNBcvx6k6
B+ANB48ZX7WUh22OW5YtdJdxCaawtF++CmBzPZA56KAubrtCEDZwVQLJ9weP
PnOUxvNzmjnX72HAeM9zfBE48RdxCqN9JgAlWtfK3k8fwH3fEIyy9ZRBKsCj
SZtuHnvXUbh810oF7LIVyVLGBrArmufQFQtVUDMZuW/C8Q7LKpZ4edVFDVrW
aFxE7AqxxBV009NfHTR+OX6vz76HTZde83P21oBVd5MfLZJ+WJNGUsatW5oQ
GM7X5w+2GLnhyPf4MC04nqXIeXFYCyNTribPu64N3R9Dgrt9pbAo9nX9vkgd
mH4lwKkhxol5nr/cuB6uCzTcx7nn31JhEzel7fFUPQhjnGjOPfKcwJJ8f+Ru
vj5QZal0IfVd9JhR6HrrAwPoW97iWifsoAbv0+r8TwzBtpEjlfR7DuVw5XES
SEbwyu/uTDrrCkJBW2TOvUYwmb5NgWHL6IzuwR0ec2MoJzdnSEj4gqp6BGM+
DxjDm58Odv81DaDYlj1xLhsToITnHpde9aFkn18utl9M4DU3r7vzqTcoiPXU
EW5LIkx+NXs+FZGOSgSpOnzHibCpaBbNupKCqFfJjzVcIIG71p3hnStFqEi8
IiTnJwmY9OierDUXIUG7UoNdN1PoSutyLjsfi0a1X1ea/jEFzxtnrJ+E6aG+
gkAR3McMMk/yyZUw+hA2XhgrcS+bgZAst2bzhbuE/RrvlxHu5jAfwcEdbpxK
0BXXUA/6aw6qMj4uVuSphFYbsStXfSzgTuIP+rm6BMKzcs/1/X0LuFA1sMBG
jCF0JI56zTgt4Bkbjx2ulwTiXLuvsnZlaYDwN/jr6lQKHtWNJk3NWIBSv9qR
8kgxTr3OOU8pwwlqjfs3j+nX4JZlz/d5hLhhjucrrSQ042ShXlKLOB84lM53
Sf/pxP1WiMw/rYSAw/PbpZ807fhtSoG//BmicEVd60tzUR3+xxY5CxElYH9a
NN5g5CkexOgvbGYjBbaieQL1Z+/ja4wN6ukuMlCdcHKn9l44nuTUYdVtKwd2
cdvK+vHu+PXYLh8hp3PwW4V6O7bGDNeiuDjxwFMRbN1V9u5nA07WfvMRdzAB
+NoVox5TCuCUF7KvdN/H4fNhPNy6mRFP4a1lrekBqBWolozy3cAyG73yjw4o
A1J3fu9XNYGx3F34tPlZBR5FUYccvt6OUQTIvHaZUAULLqVPckqVGFu3/4n5
RTX4GstFw3/uPqbUcyxodlUdiF4/if2rN7HBjfDIa1saID5Nkb454YJ916km
3CXXghefS72bT5MwMi2tZfZdLWA590mK+jCOqZUN8b8m04Fq5UJaL3d+bEde
hGaKShcsRoM7Mm8yYQLzuskP6PUg88h4ghjnGiHwkFOu/Ql9kC1fOPL9zyIa
+zhRUnzKAPY69D4NVZPVVTXwXvTnMQTOkAZzyZ9LaH82/eIMixEw+Ie9L7Ja
RM8MPsSZJBlBrfqgbvPtVbTwI2yv+agxsLXp4iyPppHLvYz3e6nGMLcWZyXB
OoS4dFm+7nCYQKTK7w43hkHEeHJVvz7LBC5GGXDw9raiqKYDhIbjRKg+m1J+
9G0JSspNdO3MIoI8a6vWRa97aDgufCnzNAlW/J7NED/lIbOkz51iBSQou7at
+ULuCXJufzr9QcgUIsKyWYLpsxDFUEVYSZkp3D7zrKir0B8NrR3z1BEzA8qc
kOc/su0IU/9NV5VXmsGupPM41WIIIUj2ewBJ3ByeSZ7KfGyZRCj0tQ4mrzSH
5Wub7YePphFoWxU++Uhb/NNvh/vfg8kEhYNG5S9fW8CN8tPHRP67R2hXCH89
6/QN3xl7uZ+T64p/nxu7FPD3ALh4/CjPD0rAheY318osmcGNFcfYhgpwXlUJ
czOV4yDPnesfV1iFf5sbiCg9cQZ+deG2TJ2NOB/palK46llQ2Rhb4D/QibNM
zqha6AjC5QD74OL6DtyWTtAkLUYE1qqfLAQPNuCCogIHZgbFoZYkLV5IV4n7
XRUrvzUoCU1Dmid2W3Px+peXZTr+SMPll20XKsqi8EB2nonQSVloMlgo2DPx
wU92eH/XGZeHAK5kXVt3G7z27sLbxmUF0KiPjBeSVMfFv150rllVgscXp/vW
DcRwkxCJ99+P4nBB9Y7bYhMr/sjyRoB6IoArezuzmNQ+Fln3KcAiQRna5G2x
Ksaf2O8SnamGTBWgKvNbVNfvxaovyin+zlIFYYGL+X7drzDLt6SZsqdqoOL1
nizbPQ9znPgTIlqtDnGSB0S+LUdgXz/u7LlXa4CfcY9kt6oX1q/F+4eqUROm
w9hkpB5bYmG6ib/767QgKWhc5nahKvbQryVFGGkD26bl0VunRDEVAeYnoy06
UH5X0Pe9OBum9+hTqXabLpxP3n993ocME235QG4yrAf0GwPH1/fHUUAlQeXY
uD7oSeeeGBcnqxO5wu+a+80AXDjZ9exY1pDtY36KoN+GoGShSsZfPI8ev6oe
1PQxAtPjR2yvcq4is3K0z7ZsBHuHQ8J1L80hjdmei4l+xuA9S7vQ6TuMXBhy
pf+sGUPImyPbNqsDqNvrOr4YZAKtoWURZMvd6HDWWn/CtgnU5ltO1mZXosiR
T2gtkAjFPIen5VsSEFg3jR0kI8FhfoGnFROZSPS9m/dGGAn0TA8KeG+VIJrg
55KytKZwRcv2l2nlQ8TG+cyJeM8U3F2CGO6eDkcWeVeYjBjMICEd1Skq6xO+
OIkvrSeZgWm6aE43KYCg8Pf+eUUmc3jVusaHquMJfWlOx9QSzMErtOPsp41U
QukNOLzBYgGH4oOHb3CkEMIq38UmpFlA858YnyKueALH+0DVuXvruPrhEtmj
EI7b0Cd9uhVAD0b0iQtdIpn41LObfXsmbPD8w/BbWeqn+EwpzZ0X/KcgU27/
kappLd7vEh2QLc8Dub6sr3ITWvHPJf4D1kr8EP+O/9a4dBc+TPFu/Jrbf3BY
SPas+OcWvGSXL+P1IzH46vbTuHL2Nf402aTbtVcCEqeaJe1Di/Hwl3XFglNS
sFpDalL6kIwLu54ys/8lA9FJD0OuzYbgpa+8hjjH5ODp00/9LDzO+KABH9Wh
+XPQEd+8rhZpjA8EdlNfm1eEzBXbh7GHFPDeFwXjsVQYhLqdzty+yo2P5FDS
jB0BmAz3fec3RIvfXtipFDqsDBuZyR+7hVawsha6jm52Ffgts/Trqugohjmn
dEgcU4WhHLHsd9PvMcMEKbk/Z9XA9u28w9DSE2xgPNNATFodFgpDThNtkzEm
pHm9VEoDhDiP9/OzBGFdp+kYgzBNiIo6ztK4ao8t62kl0CtrQc0Rh5yjlYZY
mNr+ppWiNnDppLrJRMhj0xPTb9TVdOBdsNxRCm5urFpby2FeTRe4+HMM+7Pp
MEr5+htzRnoADSRdlcppQqsBGcH/gj6oLZHX8f9dRypLd5jkbQzg4LPtpmEm
sjqF49wmhk6GINCle/4+cQF1U3PWJUkbgWvQZAVHzRKqnvqhaVNhBD+Zkugr
91dQFLvarq/MP737U7HQv5hA8aKX+F1fGgOhXnFNmGwQDUXdjTysaAKElYFf
JSEDyKTN3Tqh1gRcnsk5nvvegCjmGB8vnSOC2Hf+p9I2+SjHXvdEXh0RGHyW
L+i7JSCPBhUqUZwErjVjc9S6j1DIJfWzTs0ksCEbesReWIraWMsyHfRMAWi7
LIoupqD5+Jf39ztNQeBK0beNVGdE0u/oVjM2A46Qi8G91q6E+YUHAVf6zKDj
v8nEy+/DCXX+QuluhubwpeC1gNXZFEKAifFEXb85ROQZlPnVpBKcmWXyFogW
cFgj6mrEj0TCqtV4/8gXC+hLiva1GIghtMX2af116sHZgkZ9BRgu4GrTnk0v
B8jhdPa4VPnRe/jOLnuYhRUTPO+2/WK/lY9LXXlLt691DNayOyWHNirxh3FO
HW4pXODV7vYsJq4Bf4PNKOs388JoaQnDL8sO/LL1iy8JDQJwofKFS5xdJ94d
VxKmTyUC6cyxBpkn3uNtKTa9GunioCpwY86m5QW+nEG3nJEoCYOXHVTi+/Px
szQyTy+XScMJ6C8WrYjB3T16Ciwey0J3ZLJqac01fGGm+dholjy0POedVq6z
xf0+yAkOvVAAhTtm4R8XNPG2GQOd8HIlKKFEkSzfJPDAuO2F2V4MLMMMXSg/
cODCqyOC9N4A23HL0bU55HhIbfRkoLsytHLkih8n/sZICht/zt5QgWEZ82J3
rz4sgSi/UxKoCtkM7VrXpd9iWxLvDehj1cC9tfyvb91DLOg3KawnTR0e3j27
J3okGrPDXr+5mqIB82P385vTfbAuzVFltYea8Fs9f7n/pzUGH15OV+RqwZC0
t3HPEQ3soxWm6/hAGx4U5KKhkxLYVO7tHbMiHbj0RyeLmvoYdiE0u5rrsS6Y
+buUCB87gNHwkr9oq9YD8Q8m47f3u1HLw6txH+v14UX7M1N7pn30u7bY+wUy
gF5BLxMOqk2UEFtQ8LHDEDJ4fyjcZ5lH3K7/XW+8bASc93seTBStoGg26zB8
wgjKLQQJZKWLqOrBn6cjjsawF0uXfkRtBMW7T178PmUMpRUmmyeHBpAIp5I8
jZsJKBKlRQ4bfkS9Bz1zN/6YQPdVYx1GnmpEsRHoSO9ChM/eNEwnbiaj1cZJ
IrZIBBq1b68tG9NR5uir5i8eJBg13g/qHyhGw2blFi4bJJC9HvBz7GIh4sKF
rYqDTUF2+7mGWWAkOn6N6bvJjimEsRzsNaxmJny6Yxp/ItwM8mILJM4kXSPc
H7jW+YzcHBbL4+UfPo4lzPC7OTmEmkOPX+11039+2DJ9L6hAZQFuX01sOZNT
CLxR61u7ty1gh2VG+wt3AmFPXbpuMW8F17nwX5O4dhheR3lWod78EDhg9KxJ
Lul4dV2uVSmJFaor+QyzvUrx9d6kc9aiJ0ErjPRxXf0NnkZ3sta2ghsG/TXD
Ej1acNeU1XC+Oj649IhKoIy3C+e/cff6s0khKKF/EyG924qz3Sxq8TwlBqeu
56pEYbW43lbkg85ECRAQ5vttxfQEJ/uR+RvPl4K/Dz8mDBPT8MS6hQ+7JTJQ
t8L9297+Jp5z5NT9vzlyQH5plLJQ8Cpe5HZdKbP0HGQF13Op/iXicXVsvlHP
FeHy+CUHqqsE3LkuqdG8gQBmhz0IHLRn8S/6/UpNX3CQcJU66+TJgNNHW9sv
zQN8TBW2C3v8FytoqpNZ+qsMinlL+Ueov2ElG8ofUzdVILfIzrE9vAUTuC29
UXpADTTeMfQx/HmOXTOnfRnHrA531+2mRE6kYXwt5YG6LBqw2diXPvYuFDOK
be0M4NQEorCnCDQ5Yb9196d1zmiBFNPiq/URYwxaeNbOcWpDgObNh/7Jihhr
6wWvUG4duHCAoTgrhxezbHhTfeWsLtxHxj0sXEcwtqMRkU2ieiC0E40fqlok
5JVJzc8p6YPWMcL8uYerKGHihc0iwQDkNvkYpmLI6tbdCiwuqxvC7UXzkrWE
RTS9+TkO8RpBA1tIzE3KJSSZafHnU74RCPndjRm2X0W1wd+Ds3mN4cVxxTXn
tR9oZyzo2stCY2il/ZNxzXkQbf/qrqQSMoG0nP0LTJMDqMJbwrS4zAQaUw11
lauaULNFtJelEBFUP7/4/VqkEHHcmn//8ikR3CWqBpOI/54WuHzDXowEq2oI
FaY+RL+vxwfoVpFAv5gy4z/xJyhjoaz+vqIpvFngsKk6kIE2KqXukWpNgVf+
46OQTC/Eyu2dqwlmUC9jo/on1Ynwm6GB7V6jGSwe7vg2FHCTcNKcmmYCNwdy
Ifj+kJRMiPthJjbeaA7nK27/+rScSqiZffVWQs0CSh8GcO77JRHSJThUtDot
4PPb6+dCnWMJN//q7CuwUQPdnSX/zYwk3PLrqBu5xVEgNq6w0n0pxJOvzH9/
3XAWkrpnmRbuduLNV089Od0vCMbL229vr7Xj0a3LMndZJECaI+/Mmls5vkkg
ursekwLBmgcU1DpZuNXlJCT+nwyQ7pXSdG7cwSPe+Z0q4pYDUoMkeb6YF677
5PSTNzzngLvGMCfziyVOoVFk8FxCEW7cl/7j0KSCZ/R7RszJE0Ar+2kByfU/
/D93p7RhMxyCpGeE008cxTnfnWgNKQdQtHpuYJe7jSXU8zLIViqD96SC/j2Z
SSz0WPZXmzcqoB56S+nXxy7sy1XZQKF3qsD40xSzGKrCatSmb+r3/OP/Tzc6
xTuzMOPhW8H3BtWhlhB5s0HrNnbeAVS9hzWAKXlKpMHNHRvRdktpndCEOwc9
Dn2uMcPq213n/45pQVB8Z8JioDLmk2jwdfmr9r/+QSYfmiiE5ZbnWtpO6/zb
x00FQc+PYiTnTKPRTT0oZKHbfP/6FxJqPLJmu68PwwvLbnTpZHWerI8dYsgN
gXjvfobt6xXEMW4qfpTKCH7oRukdSlhAQgdUJD/cMoIwdKHB7Moq4tY5HTpP
YQwsPukGnU2/0LBSFZNWhDF09NeWJLF8QupllrSrB03g0WKGziD9IPJordYY
jjWB8yoXSQfOdSJd8WAaQToivBHIVzzC9BzRI2nWiRgiTL5eO4d7xqHGUp7T
LEkkyB37r1W1sxTJFzyjpzhuCh2KVtSHIQ/Rb4r57mX9y2tOp81XYSEovbMB
9E/94/txLcz+9nnCuDYdceChGVz4fecmuN0gjLLW/Wrl+tdvL2/5UEkmEmqp
7Dq5880hsXX9NRNbGmHsS+QpnmILuOOq6HibNY6wc3TfV/3+YdB6TtNeKpuN
M3asS4+84wGK3pL2H9ltuMa7Ld7kN/xAZvqaV+tEF35Y5CT54SOS4C24fQu4
H+PUUd8djwpKw8Gymj+iMYl42zH9rx0CsgCN1VVJgTfw6ovNR9VOyINW0TPX
EC8H/IB4/4frEgpQ0U+M/tRmgB+Xi7h/SUQJZIUfTDXTy+HyJVV7DdoY6Av5
N/w9w4W3pOUumUsAuGyLVYk+pcZ3SNnk9iLKMLL7Qn15fRGrbrO4UHZOBawd
Y3+Y937CBj5Nv/8grwqDpfWe5OkNmF+WpN9/WmoQdH940+JaMSbpIjzTY6oO
GrPtTRZrCdjOi6/+tEQNsJp/ZHlnOgDTemFACrX9xxdb5LqhPnbYln7iuW5b
LUi7F37rB7MeVt84sht8XhsKzJ420o7JYK923CnpHXWg+pJ2msrSaexo3+BR
H3tdUF8ZZ/UKosHmF7tiyML0oeRyX+Gvz1tolcyiOTTIAEbPRTuXRO2hkJY8
XcW7hjBcP0NVpD2Pqo9emHNSMwKD01YuK1eXkYKEx6Pv9UbA8oXKykd3BZEq
CoP0NP7x9mCqd9jDb4g7VP0zd7MxKHf/OXi2+19+8qtZs+uZwIyoo8GZzn60
fLLsckCXCQwJ17wffFqH8JvpI3e1iZBTJ+bndiML8WoWe0f3ECGZChZOOCSh
N+e549cNSHAXt/4k/6cQMWtvf7w1RIKXNHtW3yNK0IbiE18JG1MQZTofqHg8
EU26yj0uHTUFmrIfp/ruXUArH/1G1L+bQVPLRNTipQjChQwDvq0L5iC49UNb
vDuFYNegm5w9aQ5KLvSPVx1TCcYRxQ5u8xaQcS7ZP+1aDKFF3MuJ2vkdrhCc
7XNjygD3tXtzjdREBiY2S4xRijH4JFWRmugXRngYfr/y1ol8XCGIzJHYxQH/
saiyuAhX4pTfxF17jLjgTITrUtxSPU5Z9fiYZAQvxJjytQRu/svTDA5BkWAB
aPMhSvEXdOK3e3+xCzYKw1wl54x43XucQ2tDds1fHFaUx0yjn1Xh5c83mR95
SILpBFvo268PcYuKk1fKY6VhxU+ZUol0D3d+cJZKPVIWFM9IFL6k9sctAjxk
eG7IQ62+slfJ6CWctDD67WKKAphVeFm98tDGWdw13jrHKYEeWV4oziGFx6XZ
Uns/x6BzM0QmKeA47tkQfcvDDmBB2H7q22sK/Lqi/fFYG2WY+GDIfu30LBZN
YbhgflUFhLLTS/az+7GgDzVf7l5RhfHDjeplrAjTddsiV7qhBlTxtwYoqB5h
1B605FyR6uBj8f2pWFsM9sg3ncMlXAPGHThoHL74Ylqtsm6XkzRhePJGG1Z8
AeM63DbJlaAFnP27B/edNDFng0C+8GhtGClhstYASax6lFCYkq4DZmoqH/kS
jmM/XcOU6FN1wXpL5oSDIyW22pdJR/lYDxYlzzjl5b9Cc5m3qkQq9OFsTEGt
u8IeanP8dQ2VGcDEX1EV/RdbqDj0ku/OG0OQEwiL3lucQ7YtUx37Vkag3NY9
PHRpBT3SflLfP2wEESoplb7hS8jFZ5O0f8EYBGqeMTVbjiLu05F/bcaMAR2o
zLneMYCsvbKlWRxM4N2f+JIMxj5UiYTvCE+aQMDjjPPZTDXoXUSXQvolItBZ
P7NosEhFBmurcZYzRDAxcTUVMUxDvT+tFwycSJDo1z7Myl+M6t+XX6VcJEGv
lGuycclj9Mjoz0DfNVPwU7n/TOLzXRR40UFnYMUUbO/5l1mznkMDLM4XRG6Y
gR29h1+kji9Bq+lH+MymGci8YiyS244m+C56HF7zMwfZuIyd6bupBO73t+Ws
ds1h9EBa4kJnCmHN+2ildJAFVDz3TfrtkUDwPph4w7t0CT977Cylf24wvhDm
/ueCJi0ssFk++saVhue2iHKFDbKAaAPrAxmFEnzvx6fk8gpOeNt7ji5D4zW+
YTVt0+jGDVWX90lmn5vxatoXVnShfHDryOQ2NUMXbvBqvlknTwhUU0L7rkW0
4R8af9rojYqCCQd/fbgnwrOeclPc8JYA5+5D7z+5l+F1m1F0uqFSMJ7Gw7RS
mY43OQ3f1YmWAceI43TqXrfwDEXfrYlQOShADEG/elxxxl1ui+9R5+BI1dEn
Cbqm+NXxN0LMCYoQsfD4nbEajlepRksRcgnQb3ElQy2QD180lSdqv8VhVVHD
KsD1CG5kTo9I3wDSar/aP6BYx3JUM65STP3zQ5tI1JWkcexrfcZA6y8VEHiS
//HpcivGulc1HL2sChovMmUmDldgLUngXEeuDvdNfke8ykrHKnQcth9QasCw
hPRo6PcwLKmxUNCfThPuTksEmGpfwRw7zzO7MGmB4P7YyaFlE4zroOxqMb02
IPLci6yqBKzsdaZeFpMOhHRC7umds5jQrs/FIlZdWFx78ajpFiOWS3aFofyk
HrRlfNX4z2mFcM/qg4agsD7kvjbi6elbRtWfO8L1RA3gprSJ23YpWd0Q+6SV
m7QhkJmrKNmLLCHvFfn1Pk4juF84e4H12SLyXGUmsGYawVslDaXhoFU0VC5R
J8FpDEOMy+vO+BR68TKacyTbGM6y31m49HIQxWV6ad08YwJ25Xopp/cH0Hhr
knHVIxPYv3lRqVm+BT0+rGl+j5sI4/Odzkesi9AgI2RAIRFqs4sSj5feQyFW
PtWh/CTg9qzZHarOR1wR0g/RExLsLONFTqpPUJj1034pKVNg88+5f3r7Pgpu
WqYOrTIF678+LB6RvsiPvuVgu5wZ2Dr3Y9I8DoSZrP6pnDdmUHt7QHPEI4zQ
peFbf1zeHHL6BfWSvyQRjpdZDnm+MYeM+CTsCnUaYdzyeruJkgXQDC4xLL9L
IjhzSm+GNFrA/mw7l09TLKHSK6X8MxUVhPgP5AneScRVpl0kPw0zw01bLdsH
/Y/wL1/L3uTcOgsPThBFj+h24rNF4etv4wThJFc5mNl24COB97Lk/4rD6e8P
DYTPVeA1JOV4/3VJ6KHlMiTtZuNx9DeuB9PJgPgFeVNh7Ug87E9XaPIBOSj3
mOILPOeNVym0t1BQnIPSW8YXJtOs8G9OulTnmBXhtPAR8i9LqvikhfN6HxsB
+MNTL2nqi+CYX1eZjQwOlz5vTks6sOC2sZ2nv+cBsDEslV+y2sVi8T0VzXxl
2DhbepwjfQqrmliZiC9VgZZ73HW6Rd1Y+1T1+UPPVGEoK/9kqXo1RhN2Uia4
Tg1YTs1cP9qUg32xltsba1aHE6XZdAnxd7CsB6fyPVs1YF4vXMhP2hMza297
N/1REz6cd9Tf5bXA8g6Fztp3a0GjY3y2w10V7NDt6NdHurXB/ZXFjIyGMOY5
a0GRM6QDS2H7YXlTLJgyu3QJ2y89mGl+NrXnPoWM3/BxogV9MF/C5264ktUZ
vJt2Tl00gAMyZGsbA6tI68UVCeMtQ+DVZREbY15AzjY74YduGEHgDWKTt9Yq
Ugp2f3drywieXr7kTh3+B8WzNNa4hhjDd54WvopXn9Cw9U6Ox74xkDH9Oe5L
MYhyODlUJ2+bwN4jXTY9ug9IePrcvPUBIuRSH/4ZRFWBOnQjfl0NJ8KaOFL6
XR2PNqrbtCLukkCYi/Dbzb0UcTE+P53FZArsHclsy175KPHQwpxAqilwxzDT
nzxzE228ZC3pZjWDAL95lwt1JMLX4ZPc05lmsNtVxUg9eJ0QTSX8kPyYOTz+
1tlWE5tAeNZaMGiZawG0vBWGLulxBOEELb7JKAZwvUWKYit5gHsfbxhSDOKB
429VWo8eb8MTpF/v+N/gB87QV116Il34hfFXTmhBAoTrmxUu6BThTTm9kacO
SkPKrNEu/aMkfKtRJpOdVhauqrpLzfIF4+UxJ66J78gB81J0AdQ74q7vgn41
HFGAlPOHntC6GeHrFkJGfxiUwDgMhJnD5PHbomUeRfwYvDjW+UidcAbvPd4X
lMkFcNB52CdPmgYHbv3zrSeVISrrOX83zTJWoSmZggRUoNJw9Aur12eMNo/Q
ui+gCu5igTXvXzZidmwvzOjk1GDt1bSf/9lSLLzw8oN9NXXYXSWmVXInYRHy
yRuWqhogxrYunOIWiEX/Eq4MNtSElZwIdcvSy5jfh1n7OaN//MzZcGx6UB/L
OzC3PaujDV0k5TI5ATnMYKH0m4CpDmD1qdd+U5zBJhnia8tJuvCnnkyHmvwQ
NpLrOKnooQ8OvqF6W9c20YlN9z+jrgZAZlbFkn51H1l7ThioBxgCB1U+e/mr
eaTCgEyDlYygwaBAvpB5GQXECK6dfm0Ee7w2+UfLV5D75GrtOMEYoj48Gw2t
HkfDZsQwTWQMjBLKR9QmBpDa8PRSkqoJaJhWc3eKDSBuHwbb200moEnpwDiX
XI+45Ej1SJkI7b3bSjyeuWhicFODtZUIsRdK9O6REhFLnGQHsyYJMrxjX949
VYi0TPO2Vz+QoE9dI+i8YCkaL34S2UkyBaEbT+dCKpLQlZC104P9phAV4ZMy
23IZLdreLTEfMQO6lLzYOwfvEA5H1X6VMjeHgZNSjFkhKYS5uwYKol/M4dGr
o4JXkv7xg1cT56MpC9geVaQYy44heLYLujhTnoWbcSNqeZUduBKXQcIqlSDE
2q9e+cnWiUdYcu4l1clDT6zgoz/2F/H7T5K99foVQPUp7d7VCA086LL55+w+
JRh9dZdj6rU47hiR9tlpGYM0ptPnrZXY8Rm+/z4W3wTY2Lf+rZNCht8iVDy7
EqoMY1s5ITyPZrDT3vkzK9EqMN3M3vPF7CNW8PnViY4YVUj/Ii1b6/0aK12L
efAl619+Vb+W/Rabjy055O2HPFYH2mDx/jrvKIyLZtTarVADuD4NPZ+x98YU
rlB4apdpA/87gYehDOIYi30n8dgrHeB+qhI8lcCO5ZaSnK/16kPcZKNaZPs+
oj/q7FHSbQB2PFPV8tfXUcD9qb7HI4ZgkvqfVITJPJpk8uK/c9UIyhoOXw6a
XkGeP+jhyS8j8Pf5fK7SdgHtvh+jrnY3hq2hLcMS/c9oByl3OM4bg6FH0bPB
yQG01zKiuONrAn656Q2/PXvRgvGL100rJiA0G3aF0qQKqV0RTLrpTQSqRLlp
0Z1EZN/DnOUSQILHT4a5Vb1K0MiaSj1tjBl0+1hp0/z2I/yePHj0Gq05hERv
e5oqxhFsLrrUD0SaQ/bUVqfY2L/5npYtU97lA15T0tsdiS4c+9rDZdJ1DjZP
c2VrVJngFVneaK9b8d/92bDHTxVxznMPjL1/EKAq46SK/3MevE3dnQ/fw+GU
rSWjWwod3lZbRhe3B0CezLm6dWEVK1af2v9GrQI2Ux3bJw+NYb7ifz5cplWF
FpPXRzeEmjGlQ1XsnSxqoL2+MXB57CnGy9lHfpFHHRznmEavVqZgWco7m1s8
GmBHdlgPRoKxw2a/3AJFNKH4Fap+beKI2d5h2uj4TxvUDoXsCO+fw0IGuNPs
pHTA/Rct74wpD1a1ez+1Ul8f3pEiZTos1tCVX1lyKfoGkHIxkIHGkqyOo8nO
1NLMEHpctm/pMy6iVTznfmaJEbh2nLkarbiKHuokE2hF/vn3p0LcTut3pEHt
0Z3w1Bh0zxoceiw8iJzPCZ+MljSB5Wg7J7I3A2jy4YeYs5JEIP9cHndftABZ
rWQtCFUTQfpJojg4xqMqt98Gn2tJsOW47U+/U4p88n2PCjWZQn2xnjHFazc0
G/JM80aHGVAV2BYrp9wiuDtlGBZpmgP1pVn/M43JhAMnSFGGneZAF6ax+3Y4
ldCisRPNNGABDwifOEQ4Ygk6q2J0g2R8IMHdsnb1XSdO2bHRQ3nEAJT9nFYp
ysnqkq462N1kNoRc9S/su++WUez0WusuvRHwZTUtRx5eRLPFkePx0UbQUfMi
ajR4FZ1xeOzCE2cMBSY3hErvDqHK7WqfAEYTkPsU0IIxDSJD0R9glkIEMuT2
bab8HorNCfmbn0kCsot3OMmPPEH0y1edZsstoGeqz/Xjg3uEHW0l/Web/FBQ
PP5ueq8TJ1eRkmpO0Ifzah/isk/voA80yrk8sf/4NeWT5MfruyiP01ZLItMQ
PuCsc+rU82hnqMqksM0I4o4cuZrau4wUQsyUagyMwS5/lPwq5Vd0tUhOcq/L
GIzn25JomwfQKf/8lgckE/i1q1pyxaAfXegcWTU1JgKF38tq0uf7yLHGLGf/
ExECBqNIMg+S0Rcls2LGbyS4dPx5fu3bYvSseNyt3tEcTtibL11mSSUMbWjN
0s+Zg7DNc9NA2VRC2IPYZ7LrFiDXJR9tax1DaAh49kjA+TkeFmH+ufE8jsdy
XezmUSIDtlAHK13TaHz47jzf/SxGQB9Gtx8/z8PrqHiSd+9xgMC5gwXP2ypw
6UhWApkYF1z5XqSZXFCPF8/fufPIkRek29lpI1va8RxZXcPt8wJwybq2SeTf
fG2X7v5IyxOG5xsbP08eacLr89V/6zuLg/LGr196Z1/ijG89C0ouSMLzu6Uh
F64U4EtUzK1DQdJQz/OK3ls0Dnes6JV56y8LtknRkdtV/jg9qKlqusjDSCnT
SwMvO1yFTPTto9sKsCXZNRkpr4O/EW/0sQpWgj1Pt5TqWik843hyYlUOBnr3
ZK1oLE/gzMXfRfPPA3hoeKUcNDiAr20ZvWQxVQbNProqA6Y57JHj1qLnZRXg
InPit1QcwLwPbXZt2qrCPgP91HPmOmz1UNpov7cayCeQ46XljzC9isvKWqHq
EF0cI+f4PBZrjo/Q/BWoARpbJ4ts7lzDqCMnKXyiNcHn+TOPnISLWILox8sW
UVqg7+1ILXhSC6vS5EhhuqUNDz47W2sOS2K51zOvv4jXgdbM9WQ2mxNY2Q+v
/ZuxumChymhTw0CFuZT+fJWfrfePD5eTVVMSEBl7XKtViT64V0op1L7fRa/e
3vVXeWQAj/+80A4N3UbS1+u/ML0wBPM8xcSJX3ModKXR55SFEXCMuQq6KK0g
8R9949kDRrCSkBaZOrmENC6GFTNZGYPn4ZjAP4uj6Kq/Rf2Jz8ZgbRWZEN4y
gFZPdEsev2QCf3uHeuSc+tBDDroAjXETEKV8bSbG8hqdMvj7yNqGCJue+7da
7dPQzpFgYadJIsSNiX5nyElFf9zEKGkuk2BRgzLTtKMISW+JX/v455+ep1Z8
uAhFyPFzB9OMlyn4PpsxjGSNQaWk+L2UBVMQj7CnirqkhojWS+qy/mYgnGdG
dajMh8BVe9yWas0Mhgs+i7YKRhPekJYu1XmbQ03Af92b7qmE6usOdVc3zcFz
Os+C/WcK4YJzPkOvvwU0cJzkl05PIAg74+elni/i7F4L17jPBuE0+FE10Xc0
kHdrXDX3ZiqeouNH8SeVBWJazWePFxTjt9y26s/7cMKTx18Mj7XX4AKUnaIr
utyQNcPUyHavGbdSS2oNvsgHhR1aWba7nbid6ZlZjhAhSKWfZ01pa8OLf0QK
vnktCoxPi6bu0NXhagc9X/bZSUD/l/rcXu6n+Ekqsiwjdyko3DwgMnglA7ep
7frpGSgDvc3OK2G7t/BU49P/WXjKQS+Rs/5SmRve1LTuQB1wDuh1PpRw75vi
55foqc3DFMHqu++HrZOAn6emnhWLI8BoJEuDhBI/vvXZ5WtMKQ7PNPnxDEVG
fJlgfyXiE0C3EX3N+5p1jPPAHeqYL8rgzC3SQ31mAtvkVRsan1CBBSs+huHK
Noxe8W/b1i9V2PGxjPn7sAJzF/+ibLapBn8P0RR5OmVga7HvFJt21OHNe1ud
iis3saqxFIs1Ck3IC+Z4KnPUBeONoSm+TqsFTCZPk59EELEEftxnnFIbWj58
cuQ5i2EblfJvhGh1YGCRPuJZJR929EGvVAuDLmQeualQRsaE2fuf7z3LqgeH
7inVRzasEiiljq+08OhD1PL2BanvS6jDdCgtkM8A3kWFtWi+IKtrdr1ts/yf
IYROivrfiVhC8p7OT8Y4jOC39PVO7duLKP7M4pRUmhH4Pta1QrdWkZ2O5ddt
dmO4M/Bfjdz8FIrLZ/KcvW8Mgt8pv/Z+H0SfllWO4if/8fElufA3BwdRgPd7
wzd5JuDWNUt7lKIVpV85q1N0igjWpmTH7O8UI+lhZwrqfCJ0nI3tEQ69h/67
tk28x0OClfKEsKOa+Wg1SWSMTMwUWJilR8LJHiDQ71NNKTcFet6sNC1GP/SY
fPHtXSkzIOW3yqn9uExwnLT+UFRtBuX9O1ToRyjhEfYkS07aHEQuWlkEZyUR
fBnPG12Wt4Cyb+R5bJNJhI9MjaTjdRYQmCPKdmctltAhdo62JJgSjsx+aore
T8BlXSpZVO4zQ1ZnGMtN4iP85rFYPqbLZ+Fk1Cs+WYFOnEyj+mS0qyA8S1me
q0nswG8NjBgmTIkDq8yOTlh+Bc5uW3M6eFoS1mwoXZ59y8H5L3l8Ktj+l98N
i02BG5F4MHlAOe2qLHR59WbIN3njzhQ5A3xL8nBkhFPja4g13h2QPR5MoQh7
xReS0+LV8OgTk8+bqQhAgmGq79qiuNbWnlweLw4+tPW90sysOIUPT9fR+wBi
Cz/tXqjuYYf2f4/1ZCj/++8Z6lajaaxHPfdH8UMVmLGcyj+c3YPVc6/rBBaq
QmwjP28D9Sus/OTrw6zVarBISZvi0ZWLnclNxKjr1IHR71VMISECQ9UMvQt1
GsDwjWn812tPjOWun+lauyZEEYvo175bYIz/RV3NatGCz9oaNe9YVTGzYAH+
nGZt6I0/PjYoIoJZRr8cqu3Wga38IfakKFasZj7MtGpcD8q/dRoOK/5A9rKS
Yn9+6gMNvtHfYkRWh7FEuhyfMYAaSZn6Y55/0UBZ233HZUPoY3hsQjs6jyKj
PwsL+huBSZZ44zupVdTOlvZNb80I2B9G4Gzus8iFTJs+NNAYEuJKsr4zD6Mz
Lz9cEdk2hgD69qC32wNItlVL+XeYCXwTyU1l3vmATipzTPjtm0CZ7N8G/u4K
JHD0OVEi9B+vb2tvlWkmoKOEBzb4HRKEnXv8QEauFKVoiAleYTCFcNHjc/qM
DxEpuVsISzSFZ2eoxu5y3kICT3CbeCYzgJZXmfhbY4INVxHtQpoZxPRVsB5l
vk6w27ULOcVqDk7JXGeSZBII7EhC4m+mBfx0Knv532gcQc1gLuQFGQMEqPOm
yf7KxB82Fha5nucB7ZAgngNDrbi0R4bzbyt+4D7f5eMg2YVTK1CdYB2XgMiD
HAT8RxHOW6rJwbsmBTwDdB33ZJPxZHahDcKmDFRfeFziSx2CP81vKXw8Kwe4
oOUYq4cTzhVpvD61dw6izOyPTawb4dNXgv4T31MEtj3rVZLKOVxoiV8gkw2D
L7lCP072ncEHra82KnIAMLSq2fFQ0OLfaQqpN1mVoYRyue1++jImevC0mAaX
CvinjeUz6Y1gvJS/2jjOqMIoR9S137rvMQviisYNUTUYX9fZXzj4BBNW3fdN
V1KHnpC0Ns53SVhX4Jz8LUUNMA9+5jCndAN7Qsk5saOhCfRPDPpO6Ntj0vcy
t3a0tKBA2zHkU70Bxsi7Fsirqg2rwx3dG/1yWOaMlv4rPR04d5fM70v8GezD
kz8JPXq6sFSf2+fQdQgz8n+R8NlRH3JEpGbYX28g0WuBe7QOBpD9iEZ5rmsf
6TbfNOrwMARDJXOxl/vziCZ6ljZK3gjqWPS6vKaWUHoNdS720ggCWHxNPUZW
0HYw51jpOWOoprX53SExgapURvotXxtDWPHyBPfCALonXlNrhJuAyIeKtz2W
A+jNSexCdL0JmHeZvfgh34CYkiRffCIQwbV68Y7knTwE2dwVI41EUOc4ApGj
Caix6I0TlyoJ2GJFtKNfPkKXR70Zn7X/06ORrfrS1VJE+vZfYoaRKcg/EjAs
vZOMhA8OWf/uMYUMTNVKhdcReRQzJ9oOmYHBHba9d3a3CdOhK2+MiOYA/DMr
MsQUguR8z721T+bwl7tvjPtxKiHG0SQAn7CA8bW2z5dexRBYKWmHRiZ5gS5x
SF41sgM3qgurbvwhACMnY+ZYsU5c4cwS3aun8vCbjmv4nKwtHlU7pZ/4XgF0
KC9n2ctr4tx8/YkJDUqwOXL7BaOOBO55qN2+dAID46YdP09yDjyaITx45DoA
8QfhcxA7OU62m6297KcMh1pJN5gDfmEKQ3q/6cNVYC/q3rG1iY9YJtsGnUK4
KijX78x0Gr7BTFL4r/mmqEFKRJHVWZ6HmGzxFl6Uow6n6ZiH7Ql3MWWejpjZ
LA24/Jtr5NSONxZhlzf2qUAbuD7cPu2cLI7tkAsIyD/XgfUZGqEhLQ6sks/2
RkGbPjT15adf8tpH2040XqItBlC+0ZclorCBKJPVFGv7DCGaUcnUQ3weHcAN
egucjGBGuueteNsK2g2Str02ZQTVN68jTYlFNPzc/nybizFQH55ZOtz8GWmw
HU3l/W0MpWnjKYpjAyjNi06BwssEeF2+0jz90YvGyxLLvi6YwLCwHPm07EtU
IG6yo+FOBFxBYP1uVRIKNZ0q5/ElwYjXl3OksyXIAusqYo40g9+pUysTin6E
xi/YQiKVOdSx3WkT9b1HePj+z9HscHPgWmFkXehMJbRasnJUjfHBexb5I/nC
Xfhy4SNRv7fnYEuh75a4CRHPe9qUofpOEb7Hb3csRynhjdtshxz6CEBDND7h
ZsmL97XnVdycw0G0+E1qVAg97lJAWfNuDUB85NIrjOwvxkfVl+m8pwy1dVkJ
Pw98xeJS0nqCyFXhpM7t2aqBZkxSc/WgIr0aJN6esG359gzreu02unZcHTQl
Rj8OXk7FJsLNFHg4NWBKPc38VHsIJuY1nLXJqwl6tKnsdLROWG/hcX8KXm1Q
ssya/dmsgHV8qD+wJKQDabaF6cXrPJjQ4LSykbo+yBJppyvD/qIgh2KdRnUD
6PoxeGLDl6yO5tgB86/6/+Z30UJHVX8RHXW7ofK60AhceiSpPUxWkdjkG5t+
gX/7YqaxfcnqBzqz/PdMQYkxUJ70zY7QGkSVibs/NUVNgOvkSyeGjwNoYPdJ
CC5KhPNOvyrPCzxCb940Wy5WEGEyPO6CYm8c6lmpvZxUQwK7EizF/PgTJCtE
MsLrTUGpyeC/dhlPdLVFTux2ixkwX9+ZF6S8RdC42PNfk6o5NA65xDyPTSZo
hQ6OsreaQ5s8r1TqdCpBVCl6uqzHAizVNqQHsFjCvOgRf82JsyCv/1b4W2En
zq5B+UPyoAGUMBz601hIVneznsqe+pAh+P/nuHdTfgWZXOYLoqE1gpaItsW3
AwuIbsj+7rMII/AbKmqTv7aKdoxE6mSijWFDVeGIdNcQevaX7smJhH/5hC3+
PUMWh4p4jQ9ZpZGgVmCxzH6xFPn+3GyMLLOAI+T/9aZ9ukfIv33iNdcIP4w8
Df9re7gLDzgW9s0uSh9uP2WIzQvbRuO39SqNbxtAwhF6li7qPRTvRaZTnWgI
k6o/dge459EJyqTt903/8laeb/Ab4wpqZQ+xvqVjDIx3pa/RdX9FGsl1dxjb
jSFC/g/u0zaAnHu8Ey2N/vnloqDdn/h+ZMD3+qeHPhE+NN4oVeJ6gJpDQ2ma
+4mQQF4R9WI7Ca03CqD2ERJk6ShZ3+YrQRF57DpjdubwplTY3Ws5hcBp04EP
zpiDtcQlXhPDVILf1hTFxVwBEL3DLaJ6uxMfOeWfv1+jDzXrhCuVJXuIM4KC
/mejIbxNDa80359DyvdpuCcuGgGW/C2o+s4Kio/0Jp+zMwbLkqO0kx0jaLjl
pVDehDFk9HpJN/cMoKYWV9nDV0wg7O9rVu0XH5Htu4Lejw5ECJs7WXneLgWJ
xs6/EblhDoeynvWbPUwlMPX0L2Tk8IH9jFXfmeNdeIHNO89TsgZw+FW62Xg2
Wd10o+r5GSVDqNwM5HkwuoiMW2VS1rKNIOfyX99571U03H6gvTXfGGrhUsuT
2EGkppIX/P6sCaSdri4krQwgP2120RslRPDjiEuSW7qHyPgfZ/9osQDmvMfP
mVNjCfKPPhgIPzwLbnt0oo+vduIYdoI2fl0fDkjrLc+Fk9VddNFwYtw0ADHN
9StdKqtIW/z06J8QIxhlLp61Pr+KqgQUHc7fMgaSecX7PbtPKI7yv4GKAybQ
+4o8GKcZRFdv24Q+jvzXD5LpiyUo4tGY+JrUh3skCFG99e5Lbin6s/k5geoB
P0xLzoyln+3CaYIvDz/1NYAR5cfHY/f3kNsJZf36MEPIdOen57kxjywv6OmT
IyO4lRPs5x/2L59duoRlGozhJeX1KvOhAbQVyso/qGkCBjfcW4hkA+jW4Y9f
DDuJUJN8g/rnp0Qk0vNhWrHv3749jv1lGStBsgl3KNitzGF/lo48vSiF8OaG
bAPNbwsQ08iwn4qMIcSKaptqDuuDycyFc5/pyepmcyNcEr8bwsN5A+rowHnU
PJkc4uhhBP6ZdezZFKtoOp9MoNaPCCNNixcTzRMRx/aMK32sOYxwtzfxzKYS
QibNoIeTH8Q35IWQdBdu5pbI62hqAHamv10PyJPVCXo0EgcuGEKea1ju+xcL
aJC5YfHGUyNQaoyAA1yr6B9MB4ZUGIP3hw7WByyD6PTEeZMuWRNAn5KpHuYM
oJ3/fO84vCGC7Zn7/BaHEtD9n+wKXA0kwE4szdMNlqK66j7pyB5zqLdScLdo
TyXYGLuL+Q1bQP2TTqvC1RhC4WujXDsuPvh4ME83ZqgTX9Sfqx1iMwB35gmW
Ny/J6j7cKJXzijOCqHeVkezhq0jj+ml2piRjeFL6UaJWbwgtOr4ZSsggQl/v
j82HN+8hL46y8ZkcEmS8yW8Y4XuCzI/YTCgeE4BDOqf3xmY78fLWdxplDw0h
ayeoK2llDn0p+VQS0WUED98uPnSNXkYJb8u//uk1Bp/MIdnn7wfQ4Kne7TEL
E3i5odxJpO5HjdXhyeY/SMBUST+sp1GMXtEInnZzzsXjudhb2tLFcIl9u79s
i/s4oYjEF/XjLt6ny5zRHcQIcvUd7vcD8/AwnaqSPncO8KquG/NMr8D1RiML
OU5xwfzW06m3QfX4Vsy1t2NmvHDclYHXoawdL75jb/ddWwBYBHiLj3d14t3k
59s/xAvD+pbxJV+5JjzFYPb9dVtxmDUzReaXXuL1UHZV2EwSWPj+5G8+L8Ax
cfq1X77SUE7O09eWHYfbK/EZrHnIgrm7q+guQwA+XSCq8/mSPKx0ab6YQ3b4
G5pPAq1BCrDzyO21Qq4OzsBM1jvgqwRfTgmy7DNK41nWwp9M0zAgnnHxONR1
Ard7cJjqzb+6En47u6v3/gH85flWis9GyvB+uWhM9d4cVsnR6xV8UQUEvrPa
DscMYPMCx5orrFWBu7Te3DmlDmv7fLkt110NKMI1jj6lKcTc+xIuWd9Qh+lD
/TTPz97DzE7ufS3204BoiySJ26PXsCnHtx8CIzTh5jEC1+gBW6ytzpTH97YW
/Lp2OY4iUAs7r/azYzhYGx7vjApsnZXCUtrafjTG6IBPue3FiOYT2OHc3+NK
UbpwM8qvdOEyFcbHdjjO874e1Cdk+pE/SyMcGjz60btQH+joqU0e3dlFotOW
G5R5BqAnMl3pMb6NDkdLtImYGcHWhTjV/wRX0Nrz6cVbfUYQGX6rxJR5GUkP
qvYdtzSGw2Ic3qX4FwRe0xInL5pA8odTD9kT+tBxjUAv4lcTcMyzuWOa8Rp9
qKA9j1sR4Tk5NRP9Shrq41TedvtOhECOOy9aNFPRRnlG3KQtCXgdzO0zMouQ
O+vS5qtfJBAjraxO3ypCbdkK5csepqC3IuezWx2DVAwfWVybM4WwUZHVMSct
xExW/VrhmhloJT4U2bbxIdDLy3YfXTWDX0PvBwLf3yV8oa6MeehpDg+LFV0S
bFMJZIOD5L7r//zKxONntppCYL7s/Db7mgUYKSbFHHiSQIjKSGtPlljELcj6
Ym863cBZchwWWW/QQOFt+iOWUql4HH2mD5cfCzgF9L59blGMq1XGfBIjcUIb
jTbfr+gaHCwI6XSK3KCTy/H2lWMz/mzi5m61IR9Efa2fyVztxF0fKezvuwpB
+tdf0RszbTjbqvmRpWJR8KeTSw21rMM5qtji985LgFbISMKpkKd4V7Sifb+D
FMhHKnbyt2bgpdMtbLe9ZWDt1KLRSfVwPOWLr2qysxxMnKSzpj7pjucIfHfN
8DgHCt1rNceszPCPmy99rgcowlAyDauhDeBPf6pqldwhQN0Rp5j0XH58/wQl
r8hDHGpeLmz9DmXEVSUS8Nx+ALF6trEF1g1s1G6baDisDPop39bOuExg1J+O
mc+NqcDN7/dnRVnbsUhL1obKKVWwVwugnJ+vwFT2S0S5/6rBA/LJZaeeDOzY
s9n/VXDm/1C/XRifLIUo2SvfbGWJZCeaz+fYl5g9pFQUKpElKkkUJXvWCQmR
LJEsSe6pJBUqy5CkEkIKYWxleTz/wXnd5zrXud4/nPtg97w5bPjYbdRQGoaZ
eQr+qVq2gDf6Xqr/LpzCuD2/+YXxWsE+8trZ+HY69ubxS61FgjVElGXp1DIx
LKts3eQkjw2wk3DGz41KGN/o8u1O/n2w4fKeu/WwCWvU6ijvE7YFsX9G4p3e
M8RnWfA2RcYOPrjZ17A8JhFb9FD2TXkSlNhk9+Wv+u3eNMbXSiUybHKNNhyu
mkSZ6qG8AxIUiDiZPtd65g/aVnPY0DSZApIz9WGG4RykLOk13idOheMa10VN
rIZQsGTnrZk0KhBYdoeP/OtEi1nF8/9tpUFXlE/qb4FO1PD6Mwll0eAaNefo
lROvkXBasmmlNB0EtsQnP9hWiLiuPJNPlmPAuUCSssbGHKReOuYyrLYfHs5F
UUsiMlDOJpP+rNL90Fo47OjzKRBhizwSpzTtge9MRT7J+BhRMVLOuKTSHiKe
+0R9PXGZmFDbKGCh5QAW1S+KTl1MJLI8m5I89RzhhNIL542zicRrgje4Rp46
Qt6vo0KRwrHErrjoqoQ9PJB0o97qBUrANdS6Is5dEIGVc2u8A8XycHb1xUM2
9B2QWRE1wBFvxgVSPmj4HlQBmS8WtqGFTbh9WJhK3RcNYL5xy3bsKscbf0wP
r3zRAuaoP0Wcfgc/G31y7eNpHZiw2rAyS43Eg2PevTH7rQdbj3F/klrvj5u4
R36uGTEAoZHF6KKZQ7h5mAUp+68hVH8L3m3aZ4Z/WZQTxJf2gqCKzCPHZnXc
bi/zkrE0DobBTjbdp8Rxujs5Vy0F4O6VR3qRtcvYm8MuqsnJxvDJist3qmwI
6507e7wqywTkk/OnTgi1YkbGkqZaOaZQSxCTbDj5GAv/fe1fX7kZ5AUS9PtU
sjGz56zDW2rNQVtCv9s57RpGMovwKKu1AI26phm7ZR+Mc8JOdvmVJSQrPBH9
bXoAs3oqqFpTbwUmC9VFOs6m2OKFOWe3F9bgkCjgI5C/CyN9GoCWJhuYyaS8
4+oVx/ydClSv9tqCtJ7F/YVt/cib89iAa9AOzEwPJjsaE1jVmMOv3gES2ATX
dIq/mEHpKvN2vuNkaBa3e8p5Po4k5KzCDAIocKjqirmHMgclDBROaHIokGPY
yl009Bs5BgrqRZ6nQsOeMrRo0o0sXPTIggtUUBTsbpeeX81r0i4wFkID7o6Y
j8cC36NU7+s9V5doUKKSkCCq+wh1B77kE7tEh0MZtkPZ4QlINpRnZOtVBlTs
1HYJ21yE3rtMPCCv3w8at7Tvfj6ai6ocsLdW8at8JixbJnb7Cnqez3h8ZqM9
/PkOh+c1KETpBs9L08n2kHnaeNfzR+eJpAshv9VEHcCVZBbfw5dAbHk8/7We
ucpDUwJrKpfiiJQHuGpGnSDw/bN9xolKx2slpIQjrBUgmHnWNajiNX5NMDJL
wVYJ2lXlXs5qt+A9Q8Uc6NaE1jGHjBGN+zh799W+e2Pa0HYi8ZNzWBLeZ7xd
iTqpC13Vetvvng/BS9SkWd8H9UE9Rfqd1xsP/O+o0fK52T0gxNFVXsGouLPf
jlu0WSNQfmyqX5a/B7/U7hYuugGDbgEq5eQ2ebx7Sd9NUAwgsd0y7ownP669
2Nq7ScQYCpiE//L7prAx95RgAWkTuGx814tc14NpVrOsd/xnCmrL7UaI+RJj
+4ri2jvNIKC7Jn3iYjFGEHnncszAHD4eONktuTEJG8/YciBV3wJ6X70LiCu4
iO1NTDpfZ7KqN5nkYFr2cUzUy/cVj7kVxF74q1diQMasKoMMAbeGXOK5iL1q
Bhj8kAwPsbIBgRCuNqtuOaz+7+Z/X632gd66pHYnnfWY4MAn9/uudoB1HP28
7DCPDLQJfHIuJGD4WPrfWVhB9RPUthhPMpTeXpjcrjyBPK14jsfqUYCIedi/
fj+JFMkB03YVFFDS5z1QPjaN6m00xuL1qeAkHxRT5Psd5dbcXnJ9vOqHB63n
sDk2etQrm7ubSAMPlbT0L6fZaK2/vXMsiwa+8R79a2JfoKhnOSWDRnRwjTIL
YU9kowmCvjt6vpqvq9VM+O8mIGZliJ6SMQMmaU/5A0PzkM+23vSo1wzwk1x/
u/RGEYr7+0v8Mmk/CM9TpcYmk1Bss/k/zrv9QLHkun3dyQOp237kcWPbw72F
RF0PkXBi+78NKkeoDnDZ63hd2t5k4v7shMc9nQ7wLIZoFlSWQjyRM79erHM7
/NHK62H7NOFOQulvC9uVIaPyTEchpRkXi/gsYp1vAAopjRoVF47iKw1xTyue
GgJ7ZF3TySRLPGDdpnH+J3uhcPKH6kySJh5g61q07xMGt9Vd9nu4S+GfCWX0
6QAAnvk4iVtOa/Bnh8TSqv2MoZHP+V7Z4E/MMlLec/NlE5iSFvLZrtKOietK
8UyFmIK40MmhnS9qMcVjMy6QYAbyvJ8fKvvkYgfeKh19mm4OlJgZd7f8G1j7
Q2OFEqYFSETq7zxu7Y+pHTkjdueONVgeCSra0K2B/aHYJ1oW24Crb9CpxntS
WN3gj/DahlU92NyuPWiygvwSuyf/vCCtvqc/r0vWPGraeHai8T0Z9DKqp6rl
xlFiZ932CjcKxHvbKFjWTKMGaysfpwEKiBUf2lzo/Qc17lAObztBhV0y5x2Y
3D3oVP3FIO4RKjw0ay5nfmKj/kaFPbxnaLDTd0bYYksbcuwh3Ps1trofNf+k
CJdUIVqye7nKaTrE80sYmUkloRgmyYjgxwBD13yN3KX7SKo/YatkhD2ct5Dh
CRoKIJY6Ojlnc6/yn/eIl96GWOKWOR7S2DtF2HV1OHVBuQVv4Y/X5avYA37v
d3KJ3KXjktVea90fG0FNssuSzMJeXPwLw/3rWyIU3l5jduPhdvzjesM5+R84
uJZRKBdnBfGnqRpx3VMAKo6LDog2gw0etxpR+2sM9Y7Fz39e/YplWpym3Fgy
gcpfK643VRuxB25ihOl1ZpC6tSLb8ngZlh1p9KZewhz46IGfn7FSMJ78q076
UhbgvfRfW5jpZez5MlnniawlMGX7VfndPTA+vTt622StwXexU71T1QjzaYo3
rFG0gZASXC3YZjv2A4SkZIztwD63ehwXmUHXFNQZn4xJMLzlXZ9QGIEVatrx
MduaDKixeIPJaj9yuUdT39ylgPnZ+QqNQxw0+/C9V40iFU4r3Jhyuj+ANpx4
sq+kgAqB8VEv5h06URfR/Z2iGg0mt3GW139mI1vVredt1ejQu0voVlJhHjq5
rWdDRxkd3tzQDiuJi0O9eorj3tUM+F35O8l2lT/Txl+OW7P2Q0II26x8yAft
PLWYG9lgD013l46NojCi1ufRW+3GDrDhaY7ikk8SsV+Pmhz0zhEsTJiTNvQY
IrQsl4S27YA0r8k+LWYzLssT9duamwQc0bvcM1kE1vxo5+AbXjLsvNPe239u
GlXJYV1C61b5Xf1R2s/yCZR+uuMLCqdAyKyd3oMzHDTa+GcYi6RCnZbynvyJ
LuR8QPbociwd7lkEcfHqxKFKj9pk/WQGeFjHD2R/LULK/c999hc5gsAlS1ub
2VgiR279xIEmJbiloaCrJN6Ca0fcq9IMt4MVhZ95e9T/oVGT9qcnQknwo3iv
sbT1Mlqb2dp0PpYMTXNxWhM646gonUDpqKdAL4Gw9EV9GsUN3jztYUWFTD8O
97DeNxRz8XOgAYkGL5j7bfeVdqBGuvL34H10aMh6ssGiOQOdHUhCBW10cLZ7
PWZSloh41iZa3utmQMY/zdJFh0LkJ61d8+uoA5QqHbPK6Esm4hujTz4ZWvW3
uL1tNgdTiKHWK+IWccrQ4/dVUji5GR/sXSySqLKDvnJKJsF/GfVzaT2fZJEh
Sj2h02puDLXuPhf4x5kCwrZfX/71n0bBS7qqs0epoDk27UXe9Bkt+W0TvvyN
CtnXFLGFFjYSlo7Q3eRBgzO9bzKa+tuQsEJNROUxOiyfas/83pOMqFjZ4KYL
DtAcWdjqlZpCPH765Y72OEW4lCGlPCTagpdsNQ/S1SKBq/RCK18+gXV4TPRz
kQEZRIXbB9K4J1Gfc94IbyYFThmYubmf56BG/PVU6x0qFCX2k/yzO9HJcb5j
uQo0WNwekpu3wEaKD1QHnAvoIKYpYKjVFIsq5bz2lTc4QtVbM4JnSQwxyhiF
uyXuAKki+bq7B5txq8VskXvTdiAhn32SdZ7A6kqWGGnnkGDQ2vvo6ygO6m6M
3f0vmAI+UQzPl1QOys1ajjsWSgW5D8F3omM+ooqHSU8S1tBg+6aV+Yu8nWjL
iK/OjQg6tHe8+U/RMR6N+h9hFUYzgHmNdLL/ehHC0t42YtFK0Ken//aVSgsu
YvTze4MPCS695j86qreCBs03vb8STAbLFy2ENcxxNMKpzRF+SoEZ72Mif5jT
aLQv3h57RoWOriAZ/9X5lFELEaw0p0Gi7lVavRQbafn9uKn1lg7nuj4YzSXf
RIYi+r5SrQzIS2gI8OUpQvKCOT47DjgAobJrv3tSMjH19/vDh9l2YORq45Q1
tYIeSVdvy/xKhuLpxdoPbuOIcZGrI8CLAl+y9iexOdMohVf8S9ZZOpy2ubtw
puAmag2zCOQTUoIpN/7zD1fz2FFVSfVL1FW+iml2V7EmsLJvJbJTnciQYquA
JY1MoOOFu82jiykgFOZ6x1mdgxwTivOul1HhsUDHCRXZTmQW+1K/WIcGQbOa
I99K2KgkPtLQqoYOtisSQxdq49G9nWENiywG3GfRG+/9LEIitrpfTLsc4V0A
dxr32hjivD10ZggrgvEI+mLd3Iz/Xe/fOCZCAscjok98KgisQyKbY0JjKDDa
NvlxJJSDdCb6YUsCFRprMeLVU10ou+l9tH8qHYJP0VLtU/5/zyHu+SqTAcFm
BbuathajohJbyQB+ZejSfjKkPduMK0/Fv/bOIkNGmBb58b8xdBosllOaKACv
nG3w0in0t8nge509DR61ejXoqnagDwu//9P5zoBUFd485yv3EV9B7k2zM4rA
jCH8DudtwZ+nUWKP7SQB3cTKqbaMwCJEh93czqSAjpvuT6vVeh9Z9Ow6KkOD
96Ya195zdyKn8yU72L/soHSwtVj5yKo/Tp/q3nyBAkk9X4fOYBy0yOcWTlqi
gvce9pjGChtdKEvPIoXRYVsMUYS0MQH1t93XKvdUgvWq1iw1jRacnV7+Yd1Z
Mkj5hmsSe8ZRY4tEEeUpFUS+rrndNsxGJ8LJH32NaXDpkITJOXM2smfyX2tr
ZkC3n23Hx32r+pYQv17eRYbNagUjj2Ecna3b0R80pggEZ+ru3N0tuF+BvHGx
NQmWhTPjczwIrPAuwfHCAgqsJC4nxlmu9iNYa/5WMRW6hn1FpQw7UeyPZK6T
GjTYIakTJ9jIRgIO5XlClXTYXqFNkpOKR/UP6Z+qahkwb+v73kywGG2IDPm0
df1qfkm/MuNXTGAF47M6dyIp0HBC6wbnAgct35ybMUikQ5POa845dixK/z58
OYTJgB6TV47XCcWINKx6dfinEqR2WHFm1rbgUpYab6dTyGDozXt9n+g4sufv
cOhtJIMxb1yBLP84qtxiZ/5iYNUPj0QEstvZiKU5+ORIqSKIlHoeeiLTgqff
2eOxzpAEOS8iP1xOIbDqNV7jw3coUPdWJtjzNAfJpuozB5VosG3bUKLibzZ6
/YPrArOYDueHcy4KysQhndCUlXP/VudzMMuRL47Aqr318FpvKAUkZMUOGLpy
0CnH+vF2XhosXxnMqBLoRHWy1k0vb9DhEc/c0/HKOMQ8NOrUUqQEBmLdui9l
W/DZPz4tS+Fk2NrV6sjvMo6EZ/i41V5SQfgPb9VoGxupWXoIpKopwd2zxany
ui14cN52akAFFbpzV+am+TtRTF5pmelLBgiY2SjpsIrQULxHxbMtJMi0Vf3U
W01gYT+MBlwSKMAVW3ffNZyDjLnvyZWm08HsasJoWUAsOt5pYi+Yw4DEyF9C
//9fwOD2xKuf98jQd0EsvHlsDOV1T/REq8tD4U4ezb02r3AiQzNWfZW/c9xk
aJFrfbH64vd+beb74FiS2ozYtfWYu83Y1TZzIwj9uOOAipgJfijjUU20uhZ8
yzXbZLM+H69ZTCqIVjeB6HFzXf3+bmyUJzdcvdYeLn18UDfsEkpUPtCxyfks
Aw4wPH+SVAqR+wOeO9HqNPAX2hFc9oGNLLlPO55tI8ObhbHJYtVx9D8dqFdq

   "], {{{}, {}, 
     {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl12UAVtUSRuFPaRQsSlTSoFNAQEUlJAUBKelWWtpAkO7uDmkVUEJCuhUJ
UWkwKBsUi7jPeH8M511rZsNXZ59N9uadana8LZFIFEqWSMR1a5JEot/ticQb
YBduqYqqX/lV/HL+TzxRwcQ2/h3hTX43bqWyJE0kznGnuFzqce43cx9y7+G/
8CT1vLnUfHK+Ji8mtvujP34L78GtVVZz33CnudyqGHfF3Efc+/hvPFkZS+zg
B/B9+L24jSqurvKr+Q/4f/AU5S0ndvID+bf5fbitKqEe0/xdb43eCr1/uamq
on/kDj4FX4tPzu3Cg3BfvB93MlOUK8i9grPhb+Uz+p/JE/TyyIvkDvIrej/I
q+UnzP/hupa7xq00t9N1BHef13RdfziugZPiqua+wctwVjxNvxK+E990Tal/
1HUGflC/tr9vBe6B78Jd9X/DG+I9WbvbdTDXz9xGvj/+lO8sPy4X0nsVZ8ff
yWfN5VUluWv667hV+AaerlKqPfwQ/p14/7idKqX+5D/mP+Rv4hkqldrLD+X7
8wdwe5XDv/c9d47Lp0pzf5lbz32Eb+GZqrK5NHwq/qV4bd5jan4fN4wbwH2O
O6icZs/H58flV09yf5vbwK2Om0HNcqliLi2fmq/D3cHtx8PxQHwQd1QPm7vA
fcsVUE9x/5jbyK3Bt6nZXFVzd/F38HW5O7lP8Qg8CB+K35B6xNxF7juuoHqa
+9fcJm4tvl3N4aqZu5u/k6/HpeE+wyPxYHwYdzFTjCvMdcaP4kvy9/qFVBnu
uv4n3Lq4F9UIMy9y1bi5+i/ge3AaXF8/LXcAj8JD8BH8mpniXBGuS9xH+LJ8
Xr+wyuP7eIa/YWYz/zGXVI00V5N7gZunXx3fi9PiBvp3cZ/j0Xgo/gJ3NVOC
K8q9hnPhH+QL+kXUs9xN/S3cepxMjTJTi6vOzdevge+LewG/rH83dxCPwcPw
UdzNzBPc41xXnBv/KF/UL6qe427pb+U2xJ6gRpupzdXgFui/iNPhu3FD/Xu4
Q3gsHo6/xN3NlOSKcd1wHvyTfCn2UFU28f9Nbhu3EadQY/BL1rzIvatdE6fH
9+BG+vdyh/E4PAJ/hXuYKcUV57rjvPhn+XLsrapc/PS57dwmnFKNxXWsqckt
1K+FM+B7cT7faWMz9/FHuPHcSPw17mmuNFeC64Hz4V9iv9MvrsrHc4TbwX2C
U6lxuK41tbhF+rVxxtj/cBP9dNwXeAIehY/hXmaejP2T64nz41/lH/VLqApc
Em4ntxmnVuNxPWtqc4v1X8KZcDrcVD89dxRPxKPxcdzbzFNcSa4XLoB/k3/S
f0I9H18Rt4vbEnuFmoDrW/MSt0S/Dr4fp8fN9DNwX+JJeAw+gV838zRXiuuN
C+Ir8s+x16qK8fzidnNbYw9RE3EDa+pwS/Xr4sw4A26un5H7Ck/GY/FJ/IaZ
Mlxp7vW4h3yXhbir+BczpVQlPjm3h9sW+4uahF+2ri63TL8efgBnxC30M3Ff
4yl4HD4V/5YqbO537tfYw1VlLgW3l9see4paztXnHrQ+E9+Su587hqfi8fg0
flMVMfdHPMNi/1ZV4pnD7eN2xL6hJuOG1taL84d+A/wQvh+30s/MHcfT8AR8
Jv5uM89wT8ZZBBfF1+Qrsa+rqvGs4vZzO2PfUFNwI2vqx7lE/2WcBWfGrfUf
4E7g6XgiPovfMvMs91ScWfDj+E/5auz3qhqXmvuU2xX7hvog9iDfU0M+q7UP
6LXhH+RP4hl4Ej6H3459W91h9jN+d+wJcQbgHlKnzM/kJ3Pf4L6qmNm/uN/j
uaCqc3dyB7g9cZ+rqbixtQ24lfqNcLY4Y+C2+itxT9wNZ9E/Lc+Sp+ht0huA
v+X7yM/JT+udlhfG+ZMvLv/N/RPfb5wDXCfG7yGeH3gx7hjPUPxq3Od4Dc6B
a1ifBn/O/xm/LfO7XEfGva2fDk/DTXAy/HI8s/HyOONa21jOLj/EfynPjDOa
NavkXnJ3Pqu5M/Jseared/FZ65flysRZB5fA/8jX4swhT9J7Vl4id5Lb6b1o
Li0+KO/T2y2Pir1Bni43lRvGGUB+L87Q5pvIOeRb8fvS+8p1Vrze+Cys+xD3
jmcN7hG/WbwRP4qzWT+Hm2buE35gPCv47+O7T/r//weU45LE52zuDLcI99d/
Qv43PtN45qmluLNee66m/l34kLw/9jT1EdeUyxlnU74dl507i+fi6Xiz/iB8
nu8nl4/PSO+svFgewJeUr3P/xu/SmoOuk+P+9RrL4mW4S5x/cIfYi/FanBPX
sv5ufJj/K+4j83tcR8dnrJ8Rz8DNcHLcKM5E+H282tpm8sNyNv5reXa833hv
8utyz7hX5U3x2zN/znUeN8PMBfyOXgXuOW4gLoVvyH/Hc1bV5u7hjnCfxb6p
ZuLm1jTm1ug3x4/g7LiD/mr8Bu6Fc+p/I8+XZ+pt0RuML/L95eflsnqDcGl8
M+4pc4fkKXrlY7+VX5M7xvNFXhfPKvP3yl9wB8zslcfEZy7PklvIKXxeTfTP
4w/iM8JrrWuBH02S+O8/WDn0j+E5OAuO/2y+KfeO573rw8YWyLP4reaGxJnC
3CV+AK6Iy+kPxk/iW/L1+B2aP+w6NfZX8xVwJ7065u7jj8ZnHHsAv891bDwH
zWXGs3FLXBCnVE3NXuBWcOusbyk/Jt+ml1PvOJ6LO1m7Rn5Lfj32R3mz/Ig1
37q+y802s40fii/zA+VK8TnrDcFPJU389x/d63FWUHVhOu5L/YPxjFAfc624
XPH58J25R7nv8EI8B/+AB5mpzFXghuKn8W34RpwPVD0uPfeV/qF4Pqg5uJWZ
Ztx6/dY4d7wH3EV/Le6D38CP6X8vL5Ln6m3XG4Z/5AfLVeTn9c7JS+RhfBn5
9ngN8Vuz5ojrtHhG+Swr4fdwV5wGd44zBv443ieuH2cG7rC5/fy4OE/wD+G5
uDVOhZubuYhX4g3WtJHzxP7Gn5Dnya9Zs05+W36Tz2XuvLxYnqf3Ex4eZwGV
wdwx/gifRW3k2nJ5zT/Gd+VycxfwEjwf/4yHmKnKFfCaKvIjuGe4JLE3m/lC
ni5Xlt+Xu8lpzXaJ8w9eH597PH/iPGsmq5rHt+FT8y3MXcKr4t7Hm8y9gvPh
23Eu/ZN4fjxn43cj95Xf4v+Qt8h5rLnoupRbYOYXPFI9q5807lG+Ct9QzMgd
x0dxtng+cK9y+c3l5rtzeblLeBl+F/+KR6nnzCWLe4avyjfiMnEn4hka+76a
j9uaaclt1m+HC8RrxD3083GX8XK8EP+GR6uy5pLHe+ar8Y25+7mT8ezDOWLf
4/KrH8y9xy/iruCh5qpxlbgxuBxOEc83/IKZJlxm7hTO7zP9msupFnCvmGvF
bzXTHhfEeXFP/QLcj/h9vBhfxcPMvBDfNzcWl8cpcVJc3UxT7gHudOyJ+GH1
Ln7VTGtum36HeAbjfPiUvCD2eXPr5X5yH76guZ/kD+Qlejv0huPf+equVfil
ruNwDf1mcb51fUS149vof+i6ne9obWE5P9dbfwN+B7+NC+n/LK+Iv0/vDzw+
nkfqQXNn4n6LvSleA1dY/WJ+Jb+Mu4YnqApmU/HJ4rwT51fcPe5R3CLOofhs
/Jb1PpXHx30nL5Tby231LssfyTvNF4l7Ln5/sQ+b6ysX4f8HNsePFA==
       "]]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{1319, 1320, 1321, 1322, 1323, 1324, 1325, 1326, 1327, 
       1328}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"E\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.56797010396942*^9, 3.568061405076545*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwlmXc4l18YxhGiVLKVJJSR7L3Ow9cXEQlllBIZoYwoRMieWSEJpX5GREJG
hERKCBkZRfb6GiEyfu/LP1yf63K5zrnP89z3c857zMJR34qCjIxMGPuB/+Z+
sJGRylmj/OLyK41BzwCkVblbd9RmC/1XgTx7CqLR133StJRm9KBNMzN0+2MG
Un1ArM48ywbf549Z7mIuQVYia/vE9nFB+8Pnn45t1SMdAat5Fg1eeHw1lqSd
24kKO7zdGmX5Ya5x01CWcwgpMAjmU/oIgTCnjS1b2Tiy+Rf75IWxKAifH203
qptGjvVjEvk64lBEw3ZvNn0WhZlSH99wkIQy4tXdJd4kZNlw11rMVhrOjTnr
TH8loZrd7OfsTWRBk8rbI3+ahMQO+iZMuMrDxLO1i2KrJGS+qCSk66AINN9U
Apw2SOhp6keOlUhlqApO8zqyRUJvouR72/QBTA+X6RRg7FqupPfkjAoIq3eS
BjF+//nFQuhFVfiToRe9hPF1DbnK68YE2HrykWMd45QssWJ7OzUo8mrP3sQ4
ZrHSz+kOEUZ6g0O3MB7Ncbtt66IOYz6P2nGuU49Nun9fA/hV35NwJj/7Y+iB
rybwLjeu4kymUkKe7nEahoxiNnAOYV3RaQvWgm5/zi2cnUwta1f8tSGFIXub
B/0kr6GHZ2CRfnObmeIe/Qh9qgMsp49gpzuH/qMX9Gh4rAu9wLHNNS5HiXwv
z8Kzpf3bnMqVzqFkqAcaLIzbXOm1RmbbqgcciGGbj2nvXucxOgeSvLu3uahF
ILyn4xysiFJtc0T9piiXmT705lFuc9ytCTvzPn0Yfkq+zV7MnAe4TQyA5TLZ
NmcLUH12/WUADQY7TP2HnL3msiGcqdjhTNHX91LHDOFU1Q4LWOTobtw4D4Wy
O9x7uqzw/NR5iNi1w20ZnqfQrQvQ2bO1vf+/b84pci9cAK/kHd4qdSkOumkE
9ud3WFtUnei1ZATTRjvcYCZy3f6WMZB57vCrAqeVrS1jeBm7w59jep3HbbBz
eKUt7j8RjLg23qZsSNPAadpnD6cDHqGQ5srh8xeYIOVkSSEpLw9Rr3DMUkpx
QPwdolYDczUyyc3f4hHkhl2SXYGmt1sRmY+zxBw6AXGJV8+ePtuPbi8aMIxd
FAS4ZYmc80ZQACX/El+SMBCOWA9uHphCU+aVtoIGYvBTp5eF4dcM8qK/I3TB
TAJcTLJFxvhJaJm+hphoJwWXF3lTd+WTUKzN54vN5jKQMVgT0vuLhDwimm4J
2sjBf7sXmYP+kJAmxZXBx04KYPCvq6HtH1ZvjX7Pub2VwL5qIu7eJglRXn5y
vfkRgl4O1zQPbP/xvO+YS1sA6Ft06VowTq51fsrYoQLH7VxOz+L1FkrqWu1R
hcQ5/aerGFO4S5XZDRIgftCydANjluY7h2fn1CBYU0Ia11Oxhd1r+g8RPDpP
luL8/a9/sNuaOmToHhnBeUirRCmUXBNojs4tbfeDpuYC64Ym2ClyruOsltvJ
V0amBe/3hW7ivC57imaEShsmlm5tnxf/rHbcY7ozcPVT+zZ77rFJu3ZYBxhm
6bfrpf/bYHYWpy7YOx/bqeca3it3eM6C+fjBbd6aTrwyzqQHLJd2/v6V7tco
/Vg9eB3ItM2k376bHxnPgZ3+3m22i0z6sPnwHCgF7vQDlzbTwDqbPhgQdpj+
yB+d6hR9oFqj2OaQul1KNYcMoOPrTv3GpsU4fEkxgH75He6O8p9PPmoIJUE7
fCG254tIhiFU9OywbWPe6FfB8yDitMMUna99s3PPwzPWHe5cZnfSErkApjM7
9TtycrSooPACsNbusJf0kLuhqBEI3tjhF66XvMkLjeDy2R2mbZDvuiVpDG9t
dlh+t15BcZkxaIfvcKO8f9m0zU9kaaQtetgyEA3N9F91X9oFGQdVE82i45Hg
7OpyrgkDvI6RoRBVzkK8BDGjC6qHoOA6S2pJUTn6OdMRlHP4GKTzaCZ5PPuC
Thjax/oTjoNW/uf3R6d6ENPwOMFYSwCufvR2npv/jcz3CugnhJ+ChjbvIy2r
E0hAmH/X+HdRUCpIP65zZQbdthcpuP9dHKL66jorp2dRdbGl1OcpSRg0WfGV
eISdPyvPoM+wNDRvBNre6yahI59dhrR+yQL3ZmrO4XkSehdKqqhdkId7gaWd
OWskJDpwxbb0jyKk3f5nSIv1g/49sQ9DjAjuMiwHncP2/9zkrjsxBuDa6mho
DcbBVV3uxtEqIJR5aHoc48lsrZGaZFXQSq/pXsG45IqMwmQKARYfHqTG+8Gk
wnA8N08N+lnoV/G8sB6cuidcQgSnAonnuL4D39Y3b5aog4vPnX6c2zV5p6hq
NeBrk9AizmwfPAkzkStoeFf+tejxcGRGF9t1350OapM4PyrUpqGRV35tm/os
MKQY+/cVVyEaz6EJfMPHCVIK3lQcpz+gdrsw9yeyPGDHJrE73qEddVO8/+V2
4yT8YPmhp68xhrI3TiSVPRcBunGX6ZMbUygvTr/ZoVUMeGjjZwW0ZpF/cVWW
wIgEyHit37tmTEJCDpwXrk1IQWWNLqtmNQnlvHXu5OiXgeMnDmXcGcP6W/cE
1Z5ZOfjiMzXOv0JCHZ7N1G6zCjBP+7KmfJ2EWt9k/IqgUgbxTDn/bkzvH6mU
NP0HAAiB7feTsP0GkNYLBferwM8Y4YwejHPr935uZlWFX1QONgsYK9vGfxZj
J0BPHQ31P4zPRkvITB1XgwKGDsD17fiVrCsiSQQfn3/XcP0OVmp45Eiog/PH
zgacm47upfdS1gD96j1TOC+c0YymU9GExWDGvzh/imjTXLJpQc5PtiL+lQQg
tVGnuuIOctAT4biY6huL1jdYfY0vHoR33b7kwSMvkMT1ir1bmuzw5eqBC7Ha
pehZlM3nG/FccL/yYfguxUZUrjyuovORFxi4TjymUO9Glpfe9EXX8ANUkJTt
9/xGzVHZvjpUp0BKA540Xp5An+LNWtUTReHBtWHhc8wzaCFp70JSjDgYlGTc
3vo0i47TSOVZ5kpCH93lEeUIErrp2JJh/J809L9LhYB2EiKNf2TvTZGFQK/0
3XtIJHT7q4xA5xt5OK/UGLmKzUefxnW1/AsU4bqH6GoNNh95Rv0jTbcqw1ao
uIQctn+hPz8E6FwA2FtnnMswvvcubNjzpgpwKP3JGsHYUP7v1PG7qlAwH16/
jHG0gex6ticBSiZPP8LnozWxD7p0EWoQuUDfgZ+H16Shb0sCERiNahNxfS2U
y8rt49WhNLClG+dNomTVXPoi5kuvF/8rD0VVlMflq432wFuWH9Yvb6egkqq0
izmGzBBB5qvFbluAVlpj5S4JH4FY2fyN8rQalLD3yDvz19wgM/vmw8uxb4jv
bqjHq2FBkNydwUzvM4pY/DLrnThFwChttDQifAqdWQt+/CVGDCIaxZ+9Y51F
ZL+TJ9FTCVh8diCOXhWb56pIXzeypUAl5fwNvlISSj3A+WgpVQaK5ZHTxWES
yrzhoZicIweLoX9MZ5ZIKKqKxTUkXwE+U6x26WD1bVsVW2tUowRdilEBr7D6
7tNpV6zrQ7D0pIMhDNsvXdila/OzANN5KKcD44y6Kqn5JRW4Gqlxdw7j7L8q
3x6uqoLVRMnlNTzfAiT/5uxSg/oXSuS4nm5GtMVRDEQo3eA5i+t3or7AU5tJ
Ha6a+1TjrBfR8MWdQwNuH1cYxzkxUdeGFDmGyJnrjOfdgpDfktaWPAs1DDPH
XuEeSUAmA703yI0ZQdZH3DmgIwcxH8l8lqdwGN6eDn+VaVCJFoKzeH4eFIa7
d8htBcMmUVjDglQokxjUvJD88+7ZDFpVMrjpwC4B34yz38TTkdBFy9hK0ZNS
0PVepabyOQkFvb/NmcktA+2etVVTfdg89vLoy3IeOXBJZ+KcWcDmB/VM3Xwx
BUgZfvBNA5tPktqdgmZkleD5SbIODUy/kzdtErovIKjTRIPW2H443h9uuFeA
+QWtTtEnvP6qefdJF6pAxOX+himMfdifDJiVq8J8KtWXvxj32Ut7Cr4nQIfs
YSvcj0vVRv10WtRg4MtTdlyfc933vSO/E6Gcr+8VzqZWQHDpVgfGGzGDOGM7
/TTh+Q9lfFw0CXONQuuMW67ER/th4rOJvWTpU8SUZnna4BwrNPlbZw7vKkKc
Su2SfsyiQPlARlfDahrtP3WEfP8BcZCm+xvx4c4sog4ZsmYUkATT778lRByw
fmTXGfjMLw2KM6Srfg14fnxkVDssCx77UvcrTJLQLtH2rx5i8nBJi3y38l8S
OiQT9OjqKUVQNdk4dRjrX9nsos2a08qw7ligsYHpVZ+QNm8kBiB1IEf4BT4v
GT4hv3YKyytj4T0DeD59Mr6cK6cKS+ulLH9wv+wa/fBVlgAX2aiScT+9nSJ+
+6SmGgS5prrj9SZuJzTecp4IaR+13bfnrzcDd2gN1CGbSrwZZ803uoY+5hog
ezRiBud6UWcbatv3SGDhdaREWABytSh3M6wjA/7ug227YmLQMFWmmnAfPVxM
IFWXNT9H8l5k1gZNbPC5pOjDScG3iPKnqEOLHhe07v9FuM72CVEW/ccuHsQL
4VWbiSl3ulBYEpvAKW9+8Amuym+JH0IBrROsArVC4LVEFCbum0Bsmn+ll++I
wrMrclIVM9OoIH+V4bmjOLwNmdYPKZ5Fxq+PXC+IkISUs39aRQKxfn18nIoY
LA1+vG58X1tJyNjdUYrnrizUXk1yGZ3B/I7U+/NKvDz4L9H5JGH+yXRTvcI2
ShHkCxwSkjH9oxLMqV3ylYFep/rLSfy+VhN239ECoDfeYVcxxh4K1w5FmKnA
RAB/32+MwyjOkozsVeHwUVFR3D+9vpb2hV4ngKX8UTPcP7VvrJEr3lWDcL7M
97j+1I605FzBRChRGojG9X3umshm568O+mrqnTi77I6565Izj3j23xb2qg9B
JN+bU5c1aOEFmdtXpsVklFYvzOX7nQn+Sq2HJ0jlo83fXXEFrzkgNnfEbaKz
Gv29OGpWe4MbcqPTNv2EviHdt7MftdKx+wmxpuUy6yj6WjtmdqZXGDz6JzJp
z06hlDxuirsuYjBZKVj/cH0GVa2G7NX2kYC03gNZvVLYfdemO1QrTAqUhGe/
vH2D9bOC69qgjwwMNOq+yhoiIfoNbuOhEDkocZwNRZh/2v8qF2SIVoAPJxpE
GDD/LCKESSilKYH0hL1RIlbPc+dlDU5XILjvVXfkPu5vRnSVhj8BbBZ4579h
nEpIsqcYUQHivWJ7Ej5PVSd1NEyowsT4HwrcP5k3i7rDFghgkkE/gPd/fSzY
VpEToVmVlYDr91rL6t9jSnWg4XJ7h/O9QzRDC+m/EbGcyf7Yr0BU6Bxf0ENF
BdZzMRN1rx8i1VE78a5uBhB+t6qg55eNOESn18nfH4Lh02wRqhsVKLtxvLy8
+RRkxAxG6hEm0Q/PyBTZJVEIW81ya/GbQaWGKg/urIiDVMW77qMbsyiK7q6H
914p+BlCf5MnjYR8p5p84nbJQG/Yi9yPPzA95BvrKSjkoLA2ZHIv5pc/bbSp
5BgUIJU4W/oPm1+HjW1X2liUQMo8KUUA00v5dlOumRSCxHtMkZew/ZhHfDk6
lA7geHRV/iPGEWhTVeOpCkRX0VhPYlw0uDj4IEcVhjfSzuN+2ThSYrrnFQH0
lYRlcL1ofI9IeVepAf3uH7S4Pn2XZDb7P2Lz61x19nY9knMG2QesInUW2cYM
7kgkFK15YjhkH8joErok6tPR+n8L+wTaWGDPuBlFLd0btFAxSjYwJgI9/Vc6
LcSn0eVfb20qSVg9Gfg2hl2dRXWprcGcuyVBuZj9ToIFNk/USiWz0kpDqUss
BVkdCRWEH3YTXZeBRAf51t/jJOTw3mui5oA8VLsI/H2LzZsrxoJ6U/sUwfIQ
m+M0Vk8BwrmOmXzKEBiZ5jeF6dN6qM0rmQvA7X7xvjRs/cCtY9pwRAX4jvWO
9eL1oCEeX8mvCv0G8uqL+P0oXalhi58ANE66+rg/WrC8ubBXRg3k9R6b4f3p
/8Ly8ZYaEVDt+E1cjyDZuL8mBHXgn+T5gnMCLL9ajOxCQ8kSLsVbAYjRjo+R
dYQCGJej1yV841CQCcdmbJUsfGUQszw8R0KPXsa5nGmXh6/zt4cMsfP1sjTq
edKmCF+4NDpHMb+xDkrosVlQhm+pnrVE7P+Pnzj5LcsPwKz47pNKjO8rvX51
3UcFUoh6xmMYH3V5Or4Ypgpel0YN8PtJRs/bw5/DCeDtEPgN95uc5fDHfSlq
ICRwcgzfz7xV+ta9/4jwj08yFV8/F03vpRsv1IFNTaoX5/CALjLHxCVkRVOs
sfoxDKk25TZKfpAAteoAjWgdrP4GWrj0m+TA4pUiil7G9ExxqdxsVoB3nA+W
A7Hz4JB7fM7ltxLcTVKXrsPO4xPx5gm0iaBogT44Bp+/3+XujdoEUB1jl+/C
OIs4svWTWhVkWuw95vH3OtGpr5a0BLDTWyzC+1txTxHrFyY1uNrGzo2vn5ej
jfwKDxEa7O1M8fWmqKyvrvGoQ0CiVh3OBUwPp6c8p9B07kjZME8wqnF/9Zzf
Nh9lRTgG1NwLQBFcV5p5FMlAf+/qc5qjMag7dPbEoxR6oBr6L8pJ8zmqouKJ
24hkg65nEUrYDRdJBjMrkYlwwaZr2EuvsAaUNRsY+NyaFyanzCiiDnahVGnt
s/9M+SEnScA23WQImc+H/k5IF4KniZ9C/H+Po+qnxEkdW1EY1hQ9oNYzjegr
nDKyL4tD6Omq5+YvZ9E8FUNDp5cksK8Lpfv6Yef/ulWq4o40MIaIs1m0YPMk
qBE07GThzTfR2zpYXqmSCVc8D5CHlcslxVZYXpWL1t666K0I9nxao4FY/SQd
iospSlUGHZFjtbyYHgxZQ8JPTQEyFWtfF2K8vKZXzHReBYw+H5wcwvvbem3O
yVIVMtfcB/H3UJc9q02r5gSodvRSwuvnz56E3nYXNfgmPl2E63/mtaWKpg8R
+s6rROJ6C9kiU4n8OSTcfvwg2/kQRIMY1YTf08AF6Y0PFnLJKF7rNsXUQyYg
l3uX6+T4Ct2/sVZteosD3q7NW1q5VSN+yi/Ci9rccF3Q0LyptRVZnD82zXZP
EFp1XxXmDY2grN/BAuVlwlDxLnXuu8gUUtvtVNxmIQbFFcpWvrMz6AgVWYre
TQk4qfVol6cICZm9axpz8pSCewN+AdavSejhuaMnjZ1kgOZLsM/HQSy/6las
qN3lILmMdHb4DzYPztNRG/kqwIyBwMoCNp+aUlNPi0QpQbyJjmA4Vr9rPXYD
4TkIbmTpzHnj90mla9eDugAEREwCWvF5dVcgdXgf5i+Um334+9kqr1rnr0FV
eBoz0oa/n9EpLH1amyDAGn/kF9xvb4r2qVxYVYMqxRpFXL/liPcKdetEsL1k
XI7zfO+1NNecQaR5rH3DPTUQfRaRo832poTjKC13gPMhkrYrZFJ9xABiFxpV
PvVnofSy/YK5voeAMVisXMOoAgVMhgTx552CxynzrCOck+h+x4+z0SOiUJlz
/UuN0wxiNS896j0qDtoZzoR9S7OI76pjV8Y/SfCQtLwjnUJC3uTuBbR/pEHl
RZ7efz3Y/ESR2nFiXhaoApsqHs6TULP7k1/eFArgoxg50o75V9jh4fyPVErw
RFC2kh3TS3NtUyadF4GCOO0xI/z98BZPE+MjgPL01OsfMN6zNdnfkqQCibNi
uRMYtxDTfmc9U4VvGvxseD5Vc69oeb4gwP0+2qO4XgVHyvYzl6gBqTGBHNfn
WFqMMnUVEe49osnE+bJF0zWh0L9or1Wu1Yv7EUhNd+beG7J9MBo5acCsn47m
BOXn4mJZINVdg9XsYSFq7gtq0q4Xga98E88Y2KYRtTzVYeZfYqAtwCFIdmEW
8eZosPEuS0C5pr5IjBkJxbEK/lValYLoosyDJ2tJKO9p/Yv/pmVAODXIXhTL
J67gcysjm3LA3yCV7Izl0+h1r5OimwpQ8fz733bMDwXn+fiTWZSBq/KH4BCm
z/dL9rUKbAB3WOa/P8bfR2leUK8yq4Cc3lzjD4yFdx8VUedShVLiy278PYSX
cuIT2zEC1N6tEcLzydhgUf2usBpI8dw6i/ejEGHLNVGRCKoGVHa4Ht4f8gVW
0tvRozUp07muACTE32Q/eokCRm02Bsw3Y5H8sfm9b/NkoUvy+GQ8iYRC3o3o
xHyQBw7Oqgk+7Dy5T7THRNcowtOP68UdmJ847Wm8ljOoDJM3FuMRPt/u8/f+
4QHQXfD9QQXGZBtPTi/cVgGNJZGAUfx9sfPMJJ2/KuwSPbcfz6Nklr975f2x
fI0fLMb9RD+ez801Xg0KL9b34+uXzlpDmalESAihfbz9HjwS+FMk5Q/6JOc5
cF0pDD3t4jGVL5SAXZYtzqMaWP+9eC58u0IODm0aHwUsf9Lz6pII7xWg1ZH5
vB2md+0/lj1WbUrwIME6vAzTu60x/TU2loHlRlBfJPb/7TIoS98vA1RIn1r5
jt+vqdqSbTdV4NlP53X8fh4Vn9DiRU4AUUHfMDx/xDX+7Fagw/QeXziIr7ep
7Ebv8iEiSJAGDPH18nbOZ98ImEBkNTI3SI1BKCGWqLwe2YCuB5okUjwJQHtM
XvI6J46gd00LZf/4glBBpaLknGcv0vlO6uMVDkRvaQSO3rBNQ1pbojZ9dwOQ
2JbFEsvcFoq5dtPFfSwatWkzJDV70cP3AxljYdTPka9WUXbbTTao/D6uecqk
BJ3pDX7BxskF0rarBG+1BrQW7lbRf4EXRNvWVtsGOlFW4DWLodP8UHypgHFR
YQg1k5s2fn0gBMqj59ktm8dRvO70Bw9zUbBtccjva55G1ZBrL3RBHPZJKW2I
/jeLlEXplidcJQF0bzWl+pDQNcUTusuO0jDrvByV1YzVe4awVs9VWdhHG3do
axrLI5ou/gYveajvelKhjeXTPgay1g5XRYj9MKl9F6unlEtCXecTlEH+8PqJ
Y/i89Xg/VfkFAPrXDPdfY1xs2kDRo6cCf9rXb+D5VMjW6ux9RRVY1yTK8Hya
5Wf/+PoSAfz41U7h9fSpx/JT2k3sPltnn4+fT0hSQmOc2BxiPzTrE8cZgphS
reaY79KAXJQq3/2BR9g8nnyL6zYTWJ/xZj+y/xVSKwzvEjHkAN6A1mUTYjUC
Y6XEvQrcQGsa+NkuoxU5PJff2nIQhH1FHZlcn0YQyx+jA/NZwrCniWts8+gU
YitiebBpKgYrZVp3DMdmUFOYwrV2KwmodtfvkBbC5q/RepYAFyno25w9I1NA
QvF9roQ4Wxmg8uIwP4flUSr/kEOSoxysCYbFF2N59G21+JaHuwLcufhhcwjL
o7wxgmZ2oBJ8PeQzHYDV89ZhSt5TzxBESJo33cX2SxCLRmntAO6UNY3495xe
i38GZ7tVgE7uexyeR9Rd7EYz/apw8IpOOZ5HwSbMNYUjBKhI2VeL+6vqVrYw
95Ia6Fj4yeH1/FKR8Z5U/i9Ex2y2tekTiDqjwouj5ShBO6v3N0NXPBIV6gy8
48EAHeZ/vX0is5DFZhr4XT0EN7MqqmOpKtDCmrHDlZRTULR3xMmRbhJd8PMT
eNcvCuYDNq5MtjOofmRxbKtfHJJ8BmFmbha5hl+nfrsoCfeOmda/Tcbm4Yiv
n9SmpWGvgIALI5Y/qtYhvaXjsvA22EPMBMsfop+6bvqaPDCpcAe9x/yqf/0Y
HdpQBKll/+SDmD46ikneKhwI8uN6TAyx/RhYn30m9BDgF3nC3Vq8Xi5fPRkf
rwJ+H+bP4PnTt+J6rThVFao63/zF/UpBhZUg/pQAacVZDLg+AdNB/369VoMK
xksbeH1VxPJ0ROz9i5TpJ20HJCOQXh46+fgdHWiSTBek2NPR5LTZ1UYXFqh9
KL2eb1qIFGcuFN4vFgE+u7uShXum0Y/Rl3+gWwyk1VQecerNog4R/1//zUhA
WHhe55YpCf1S4eU7Ny8FM0/MLinUkFCuEEfV4LAMHKbXLOkYw+aRSYXNO8vY
/bpFJFIHyxszl+OP9Jex+aW3yq0B8z/vNqsAxv3KwHNS/2o/pkf3howVHRMA
y9lekWRs/RLrrX0HGVRAxPiVDJ43M9YPvfZwqEKYk386njdiJVWnjx8hQA1b
ODueNx3OjEhCUA2kv4tr4vsnY/h61VKWCOV2gTZ4vcwF0I2553xDXX0Nyo/q
A5BsMCdbMxsFGEbWv9ysikVMgb0Mp1/IgrWaOY0eljdbdVEVbyrkoTvr5zg9
dn5uuw/O0pYpgvMtN/svmD+4nbHI0e7B1q/zxk4Rr2eyfINFNwDlB/P3yzF+
f4kpscRFBa4c82DF80YjhNue3UcVEhKLJ/H3FmYpNsqFewTgKyvKxP3hhOXS
VYjG7j+kpW58/U+Z+3WjOf+gVAs/nrP/QpGe2RXuymwJ4FBiZiUnYv5O+0CK
5o0ccHw6xsiK5QtryQ1q67cKINJhI34J05e539B6oFEJlodfMBZh+nbtlV/h
HkHgm5HxLxyvjwTRqO4FrN78/p3D82X4mua40JoKsDZavcPzJUXdQS90QxV6
yBtc8XzJs2IiW9ytBj2OObT4+tJDFD7VshBhJWi3/vb3I+n0EOHQcXT42Udb
0bQg5MW8VbqV/gEdaN9dVhgbgOrKTHaJpwyjHzPfG07vCkI8Po/mnQN60DXe
HvZDLIEoTnr40r6otygqzSIm3B/LIwoDB7fE76hXjP7Kv8kAlH8g4sNfzy+o
5TPlN47sAKSxy8HY9dtZoLY4sP39kd+k/aCZqyGM1+18j3zeTfoRLswN31x8
DrHfb0W1L5tdvhG1YfJ31Pb3ROs8yrRwYX2gZdr5XjpJ+SxAGDN4u8qd741K
hmKRwuXq8Exiavt7mLXWjP83ogJM2J7QdMX87tLjwtJwYXGIcnqTdztiFpWu
x2WGC6uCo39RJH5f/x8r4Hwz
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], LineBox[CompressedData["
1:eJwl1WW0VVUYBdBHp9KNwKO7Q5FGuqQb6Q67aBBs6e7u7ka6u5ROQaVDSnTu
wY/Jt9Y5e487zr7nPiJb96jTPUpERETeqBERYW70Tx0y6n/o6c11emZzhB7b
nKZnMt82I80NZlv3rpu9SUIG19ebW11PJ6+Va1NIP2p25JU8nyTuL9Ir0Ev/
xxxKVk7obkdskutyUx5JHBen6+/QTr9h9iEpv+qFOSZ34j95Ab15qg8jGyf1
aGyW63FLHkV7/tD7koxtehGOy53DIbHQ6MMzeTjZOaVHZ4tcnz/l0XTgpt6P
5GzXi3JC7kIUFul9icFWvQF/yWPoSDGyeeaTrnclKotd60dMftUb8rc8lk68
TSy2ud6I2/I4OvMOp1zrRjSW6P3D98t2vTF35PF04ZbenxTs0ItzWg4vT3SW
6gN4Lo8gB6fD98QOuQl35Ql05U99ACnZqb/LGbkHMVimD+SFPJKcnNHzOIO4
5k69KffkiXTjL30gqdill+A3+UNislxPav9iuSLf6C/NUeTiNz0eu+Rm3Jcn
0Z2/w3pSs1svye/yR8RihT6If+XR5OZ3PT675eY8kCfTg9v6INKwRy/FWflj
YrNSH8wreQx5OKu/wR65BQ/lKcT1TDP04uFZ9TvmYNKyVy/NOfkT4rBKT2bP
ErkS3+r/mWPJyzn9TfbKH/BInhrOxp6Z+rvhufW7YS9vsU/P7X4Z87z+KXFZ
rSd3falcme8iXv+gx8n5OK8mYJ/cksfytHBu1szSS4Qz0e+FvaRjv16WC/Jn
xGONnsKeZXIVvg8/U328nJ8LekL2y614Ik8P52nNbL1kOB/9fthLeg7o5bgo
f0581uop7VkuV+WH8Dj6BLkAF/VEHJBb8488I5ynNXP0UuFs9AdhLxk4qJfn
kvwFb7BOT2XPCrkaP+rR9IlyQS7piTkot+GpPDOcpTVz9dLhbPSHYS+RHNLf
47L8JW+yXk9tz0q5Oj/p0fVJcqEor/9fuOxaEg7pbXkmzwrn6d48vUw4H/1R
2E9GDusVuCJ/RQI26GnsWSXX4Gc9hj5ZLsyV8PvksNyO5/LscJ7WzNfLhvPR
H4e9ZOKIXpGr8tckZKOe1p7Vck1+0WPqU+QiXA3vP0fk9ryQ54TztGaBXi6c
j/4k7CUzR/VKXJN7kohN+lv2rJFrMUSPpU+Vi3ItvPt0kF+ac1kolw9nIg8x
s3BMrkwvOTGb5ffNoWYx83p4t8PfFuaF7zA8q5nLZx03q7CFYdwI7yc9qcrw
8B5RLXzPVA/fATXIbn9as2Z4DmqRLnw26alNBrJYV8eMpC4ZqUcm6pOZBuSw
LovZkKw0IhuNw2fRJKwJ96xrauakWXgOmpObFuThg3DfurxmS/LRivy0pgBt
KMj/zKUGig==
       "]]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{549, 550, 551, 552, 553, 554, 555, 556, 557, 558}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.56797010396942*^9, 3.568061405114547*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJwUl3c8le8fxu3MkqxECdl7j/M8z8c+jnUOEkISQrKzskJWkpVkK1mpL0LC
YyVJGWlQIQkhI0Il49fvr/vf+/W6r/t6X+/jzj4WrjRUVFTedFRU/z+Fbuzc
LTzaiZ5+reTP+XAFI+H7zGbP72E/2gaqH3KuYP1sqkx0DuxQRv5526B9CdO5
od9Rbs4LfHGvj6ewf8dc5bbYFNgEQcp8Nemx5CxmKuG6ym0oAn0sevtfJI9h
dW8jLr1QFwcLuQtmww9fYlockv/RRUkDFkp3eTS4Fjv/N6Pgno08vBXJP9O8
k4b59HxT+s9UEdzTpsgWuT5Ysh3DiR0vZXjJF2/YgBCxc88vuym4q8LBdBXa
x4oiWOe+w5QLtupQc03UkVmeGlM4GJ09H6gJare+hVMnf0CdfiLSZl4EsDrW
6zMh14CWFD7j/3Udhan09zIOm6noo1TNT8MWAG+4Tr9QVD+PBjYj5AITbZBb
Jfq+i9JF2/vurSWd1gHNpDTaiPv8qIehBu5howuMUfmcZ/b9RvIrFBoueOrB
bu99PaLtGyT9J37FN1gfrLJ/XqlgvIPMVl0Kcvc3AOfqzypko0Kk2yAjJybG
EKq1mYVqo64g1OYfp25EE6HhXZtE1vRpnEq7kbo41AiMlPoIyin2SCLPL9Ph
BBII+nXr7m3KIr5257p+xRqD8U15RrZviviXK8ou2E0T2La5Vr9rIYdzZt7+
mFRiCgx3di7cniLhZeySoc/zzEB+hU10HjPEO/2P6YvdN4dGx7siLJtH8ULB
Yn7Eigzwyur3S11RHA/fonIfIsOgYq9Gl6Q0ftx437bwKQqcduy4Iurxs7V+
UOLah7cUOD61/GJF7QchpWdXXtDBAgKq9nlsP3/Xmhkw7+k0ZgHS8fe848/k
toZzHT0gZGsJFfxP+B49aSdUStD3BU5awvtVE1EOx8cEhnXqw52OVgDpdUdk
aHxby+VrIwu/WUFL6onptP6yVgnnKrOdiyeh2A2X6xqxIXwyelJ38vtJmD0x
pmGBZhCG74bJYAHWsOs00fK0Opvw+xGFILRmDUzxNOJxy4WEvSb/hnjvU3C/
4IM2/aVSgrG8gX74xinIOCZZ7fb+DuG5g5zHhQAbOM+8Tlaeyic8rPH9tbdn
AzcEg9xoo28S+tI/+c2dX8FOxl6g2ndhBRPceZy/o8oIrFRn1itSlrHEAXz6
pDUnXFL3aJMvXcQYfvEv06nww1Cl7M7CjznMtvq/PWFJIaAZz9fsCZzCqKL8
lH5goqB2SIzE3/IWC/ppyfHttCS878oottTuwOLoxDfEcmThQTGbQnxNCfbd
CXeXtFSAhO++rJARjYWzB0tbOyhBtBxJuPDdaWyTvVP/lqcKJH+ss/KRUsUy
zvedHnBSg0Z92zjsHgcWmvIqQPK8BlAVKV26cXcJJdKc+ZLnqwWbbHJDJQbP
UaoXV0qFIhC4Pco//onvDkrnWOAxcBsD9f6GjOk3YWiWSCtX0yDA9luvP9na
J9HcLr+SQ2+1IfZ8gktmozzKmbQy8ueDDty4hTD/Ps2M0oSoPPH8ogse8j8H
w4VnEO6B4CPLP/Sg65n0y6t/WhDC4OHwxXV9qDlu3r1+NQ959zs24dKWASQO
n0wb/pWNTJEakSRqIvBf+uSYGC+NUxGJazw7RGj13ih/iKgietXvxZ5QkUCy
6tmNdoo1sq0uwzhDbwz0koPfz2io4uLLxpl5rCYQPajmrP2XFw9jPl/kcsQU
VpPEzneVaOPjr79UVhw1A7pfusI9rGZ4fafImWBhc7jxZmTG4IgSvrd468wc
JxlobSPYt1z48Ydm/akWGWQQpN9c7ViUwVe+Ru8+O0QB4rox851vvLjn9Zyn
uzcp0GZiy1eWMEcQNOac2Oa1ABHqaM9g6rcEdoF10458C5CfIfDqS/e1JnbT
Ip18ljAic8IZm39EyChK93qZbwns82oX9v9sJ4ymxq7mHrOCtGH78sm8MoJ1
xoeXcnetYCL3ckvOdGmr5j5yTcMTG/hTsuDtRcohvNCMfbJ4/jP2jB9bf3N9
BZtaGj8bskELv9600eeMLGOSy382q205IPXm77wWdAkT0VU4Za3DB9FmRg6P
ORewz0tv46uOHIcx2gntApdpTNTqQkas7gnIsDIgmmSOYpzTc7o2JAlg8y9t
vRn8DHNikbDIviYDXr8CPLjZKjEJWXHauXfycIikwH19MAELuiBXE/NOET49
mXYCGleso+GcSt93ZcjiZlOddQMsjEf4S9S0KuD7/PUMAo5gAn3+U6RJdeC1
F8kvyNhEW5NWWrrWNOGeJa+CIfIalZ844960ToAfDYb/XWq6j1pEKjydOoSB
qr3YyeKzcWip7eUQ/XSAyNrrdF2XzqAJbSMhNmn/8kkre/FNoga6UEma6czV
gcNqZ0OWvQ6hjWfUtBbydUHQWX7gw80VxLbFaq76gR5c/yhKAy69iNuX75Gy
jfpwKoJ3o8QuF5l4vb3r3WgAD2kpt4Ti8pE3RJHv9F2GkFGt+20qzQOJNk5f
eNNGBEHtsUP7U4zwO0E9WdK4EYSue1WIOTggOuIc9z/1kCB8Zic9YlYYNykd
qTLqNQZ3mTNixZeEcNmefmqLUROQo2Se/DWtjofUITqHJ01hOyjskclFU1zG
Q8yr6LMZ3JALH4zEUdypTIwmfMEcqJ2OB2Qf58PLHje+Mwwgwx9aQ6PJR5K4
dQ2+x71GhnSfhYtlNiK4weLgmfQgCkQfmJqZeVFO8GQrUv6+SYE7jY+u8yl+
Iwz4hWI/wi2g5NUl1//G3rbuz998k/bXAroS6JxEvEoICR9H8M0wS/i53M7o
lNdBAPvu8X1UVjA28d5D8FYtQfbpRf/f0VZw/7mkScne7dbouvaUtGwbOCsh
xZ/vm0vgfRqmu3T9F9ZUlOHnoLuCObBmjMSEsMJIjF1zlPwyNvPwyvCuBTck
SMk3xH//js1VMV59JHYU0D6qZPa737APlcFv7QliYNjxU+fosdfYKE375KWL
UrC23iXLdqgJq9wRzXlSKgdJBvSST8pzsAeZFgNeQwrQCK+OfVsJwmIb2iok
ZpTAebulU+WcBSbtddTaZV4FGm6mY59WZLCqx37v+cfV4KlFcjSdBRP2zkyU
nnlZA+a33QpyAr+ib8MGGC4ta0G4E8Wc3q0dHXp0dzKFHoXEhP0fs0tuoR8L
6RjHDwAI3+3ya6vwQ+NWtusk92vD5cyZXqlBE7S6h6VvgEcHkmi/s1hMnkBR
96w+hcO6YOJ6XW7jLTVqnqak9v2EHrBrvpZ+wzaOvJ3MNZNT1of9nn0Js8EP
kYO4YWiVkgGsv7N7fcy+AHl1jIU9HDWEtK3bbLdcbiBrJsQ0Vm0i+OAzWa1P
bfFovb0/p7WMYCXL+4NTiyUy+2W2WV+PBCY2H152T5OQRiOi67KeMWxu2IXy
hqjjdOodl5fIJhBnJuPy5dlx/LkZFRLsaAqB3Rqquw8McJ3VqwfVHcyg/8zy
iQhZE1yTT8jC/Lw5PB5oFWNxEsMHGPjbMpTJkL8a1FBadRxvnPlq6FBLBl9d
hYfTfbJ4Io/eTqAKBZ7KRo1T6THjN2TPink1UICSXNR47NMPwvvEpIT9WhbA
OjQvp+/b2GrR622f1moBZ40mR5y+NLfSLLGXrWpYwoDPHx1t3xaCT6cOvSz2
rx+fmdw98C6TsH568s3HMRs4ZXUgJOtWNqE3ZZi4cX4Qe5WZHiFQuILpzfp2
N7ylhoP5p0yqfy1j2zs80TanD0LSzHEd6pglTMmjhWWPeBgYiqeX/W8tYHdS
z/ddzBIEnaNRCvamM1gzOqdt+kwEIpjpJxivf8TO2T8aS+sUhxyn67e7A3qx
gdTKaFN6GWDTebm6XfoA681yGDK4JQ/2t9k+dYekYGs5LGs56YrAcvGnys3n
HtgJRpUH56qVgTsqZytqVRfz9hm8a1OmChZLHSUPygSxlblnhz/lq4PAH+f/
CJ/+okH9ahLvH2nCEVnGj/f/vkV758xIsTUE0H0dGbx+vBYNS/27sjiEQnHD
g8+Jkkmo9PpHCVZ/gIqmL5x0gufQyNbk6TBvbdilnPuZnoKhVpq/v5+4rAOT
fh87dG/xoGmW6tuVYbpw5VYpzhn0E9lSeGrGmqIHJUWxkjq/B5DwBavowWx9
iPzKGlpTUIA4o0+aL2QZgEefZmPB5395NPykrXfHEIrnl3abx4MQ6G+YrS0i
wuK6ZdLbU9b469OosVueESwRyx/b8TkiM0Vx29blJGAnSZY4zKwSHKMKGgXL
jKH00FM2wxxJnFGE+lFvowmcc2lb02dVxnvuXEh93WEKf5tPdyrYm+ALrRX+
j3AzKLUWO2slp4unpdy9+7rPHPaYFn6LxhzBhbykQrvOkUHcIJM6Lk0cT+a2
j8a+kKEjYfJE+KQ4Xp/3/cFHNwoYru1L/mo82XrDe/rM1AwFOtaZ0t5kLRKG
9vkW/f5uAcQcjqMPboYSaH6HubF6WoLSq/ytdK8OwnrXtCX6wxKaZXOU2DLq
CbmfHj8b87GCajtW7iS9G60iib+2duJsoMw+hTfsTh5hV1+57UfxT6whRbDk
x6kVrI3uhGbHKWY41S/Iuem0jDW2FZ2usuKCriyc+qvxIvZrKEPDXlYAhko8
DCzM5zCvrPVY0TZRKBX53bHydRgTu5wU+nBaEharA/S52Vox7ivlPb5H5UBM
/uGoYVYBZrKVkPcyXQF4RjxuDmZfxqi+5i5gJUpg8LXoDbnEGktvW+nfqVSB
aaf2/b/VFLHCA0dvbxSqAYdT6NbD5v1Y+cVQQm6VBiQJveC6TDuHprZxByb+
pwXxt1/regg8Rd3bMrpOdSIgEojG40gBOmb6htA9hsGAEZrn9vwSypps77K6
DHCyd5/7kSgKere7TWV1Qxt0cj12DjNLoZW/tV/f/KMD764sraL/0aPiccq/
q2j1YGg64/nBiC/IpVNMDakc+iBcN9Zbm1OPiPbUhBlzGoD8J6q/v1LyEXLK
85ch/IbwkXg4qZqUiSwY782SjhOBPaf8+6llCg49wpsa/EZw6krytNRJEsL1
3NEvSogE7sJNbXfoLBDbzuZGjxPGkPbuQl29hTrOfSg+oVvWBJxYL4VPDB/B
i6uVlpcIpnDekG/fNTU9PO3LI4cfiBn49WVejgkyxX9dvGtzTt8czp0dfXfy
nQw+++dDKi5CBr07cgeUvI/hirk230dKyHD+xAz1uSeyeGvEVESBCAU2ZS22
a1M48O3x8EsN9yhg//s4wlS6TPg7P1BHL2kBb1M4c3iQZkKtv8LJimoLWCP3
C24EP219ZpPsZytpCWUxKoz2R5oIIuLnLrvIWQHvqf0HW9SLCbcUeHWIL21g
+WpXErfTLcKtW2bnV65/wwRpBypnwlewKxukPU1uBhD/qnv8QP0yZjvx6SK1
zSGYzbu+79f6IsYlUH7ngdYRCF3eKvyTMI89u3D0/rE3//ZePQdC3dqFrSVU
CH8+KAspEft0yrnvYcnP11SSOBVAuP/dzMEvsdgfxNLb67ASXPF8oc1/5Cx2
+lwGLi+lAoOX/xvL+q2JxbcHHS0XUoPIrvVz34q4MeP7x+43C2uAutn7I2ak
NZTGoNzsPwUtmCycUH9n+QrNeeMbv6SOQKFf+y3bC2WolPf57FFrDPj4D+28
uRKN8rcfeR5ZA/BRzPK/ujFbNK1DhE21Thscu/szS6qU0ajDBRMOzTrALKu0
SKBhR8cuqIZJtusC70yCrV37PNKkN3vFdFAPdKbV72w3diGU0ZiI6+/0wbVS
X4bbMBexcwVd/9F/ebMR+jChmot8NLqY9fyLIfzepnoVH2iJdLzwWt4YJ4Lv
EPHvSo04HpBuNrE2YQSewPWhydYOKaopsnWaJUHadQtD9IkCrvniYJH/gjH8
mCu17356BJfsOrDptGcKXQ7VcrdpzXBfrjLXa9TmEKH4ML7YVh3nnTwpf4j+
n38os1Nvx/PhkrQ6iv0xZBBany/zSZLGhUjHopZpKJDhPaXYd1wQHyXUHyTG
U0A1LbvZbG6coF9ty7S+zwI897/kvjw8+c93IxglWCyB2zFmUC7nAUEBOnvn
w/5izOQtASaZFWz70F6g/u39MCJAc+751hKWnLxuiGxKwYDBW66g1HrsKPJG
+QqXPLQxOq05RGZh+2UEqPcfUATmHEEvFdYAjCFxyu2QhDLQMt78YzFuivUe
Np3oE1eF3AeWnsm3xLHGM88O6R1RB8cXm2R8jA6jlX/TH6qgCZsWFtrq8Z9R
PrX422dlCHBSMStXru8Jql5Zv9tphELUsutBn6OZaE920eopBYCVBW46wTwv
dNuqgNpFRhuaX07f9Ks3RBt7bRyrNXTgv4d084dqj6NvR2af9qvrghLittOo
v4ME5SsGSRH1IIdAd7zq1wii6Ck9N3hSH4bCnTm1dcuR7UcTwUyW//bVQQdD
r58FyJZpusaAExGIYjmVQ1wOeEfXx50IOyPQO7DnsMFpizze9qZjdSNBX2IP
846KNnJo+N2hABdjUL6WD9cqVfE1+y0f7gATeIUF1CY/EsOXf7y6RhVtCrpV
9FjSMhFfp7J5FhVuBkNo2QFXIRIe2VNsrJVkDoqSuvixciG88ZDj0nk9MgQG
t/f6/PMFTQWf0qkOMtSbWg283ZbBrWrvhZsYUIDV+7d4pgw1LhSl/0HoGQWs
VU5U5nGtEmrF9Ox5TCxAMBiRo3k/0LomUH0u5JUFlN1CN7SP1rRS4itcLy7b
gFpl9bHpjZuEHnm/8wzu7dgoeXFYoGwFC3RuvmTVTQV996U6kxhWsGn6cj3Z
MXZw8n6ubl+yhGmGU7lZvuKFYgZqfZl3CxjdZ3mvQbIgPP1YvXYFn8Ho6ssO
K8aLwAPuZbqya5+w5BxeCZkIcVDwrmPLZerD4obmeSS6pOHocjYeeLgG4yX+
Vt0MlodthjaaSf4bWM1/fzhKfRThkDyT0MY1L8ymVsCjJkUZdA9ULfzd1sfc
807Q6yeoAhKdue+ttRBmE+KjInxZHex5gmT/ru6iViufPp/J0oQkGR57ddER
lNPboMU9lQDXVXfG+dgeoanZTgz+/6HAoebReuX7NdS3MznGxxmAaZX2+rtD
rmiolgtfioM26IsO0txI0kaTacxXTl3QAfvpKesYaj40vL9pLMlDF+xUJFa8
CzcQ44tb1ITLesDxeSSOZP0aYfBhohZM0Idv9wbQx+rFSGngLV7PWAPYHdlg
qlEsRIjPVS+eyzCEI1OZvgJN4Yjg/t5pwTQihHhRPaSqtMXdzcJEY5ONwOb+
5ft1+Q5I4yfkXtYtEjDiya6T148h37yiCaw3jeEA3eOJK/vl8fXhXBa6MhNY
CYrftHihgC/lxtTL1JpCXte8Avm+Md7rNn8JrzYDjSu503bm+nhF1NnA7WZz
0Gad6Rhd58edemb69k6ToXgv35n1ohheanS/480oGdIOc61J1EvingF/rPYc
KfDWRdwz5cdCq9CxhA2H8X8+KXku92/LMqEOl74qPW0BYy+VzlVPxLS2x7/S
vHXWEhbpctSdFDoIZpvrqbZzlqB4fEJqeLeBMPTNfsXsvBWEC2hZ9SzEtm76
H6pTDreBHwIF175DPsF/X/pl/6pVLHscOV5+dgVbifb+7mjIBLo3/Oydgpex
oh5Zweh3nJAymYrQhi5iu19HMmtq+aHL7liJf8kc1sj06DRLlChkPfgt6dX/
BjN7vPyMVCwJtg82xwTU27D+rm8OJp9kIfrXIWpH2WIs/4EQzWV/BVi7SRp2
RCOxtj+JLMZRSmBremAg8rAt1n1+NImUrALaEojUHq8ylqMVuPUlSg2GN1nu
MSyxY+w7QjZTiRrQdtaTofXBAnphslmSI00L6qxc02l5n6H1uslKSBECOzVf
aSr1itEfJ9UtjVowaKrdkmWRCUHJp1hxq88AoSvnKhOIlmihbs4FmhltGL67
4ZpzQBad6Mh5+3xeB/ZPvPhWObcP5dqtH01e0wV/UYHd7ypfkZ4McG+j1oeQ
r+1hxfuakFqS6988OgMgbta99GPPRzK67kkEs/zj19XDi2VHbyJuL+04PA8S
oexN5g3WSkNccJ/qegWrESRDcuDtbR2k+kmuSf5BEiyUqua8U7JCJHcCzpRz
GYO4wiGfxDg1vIjKg61GwARAdzXsT9th/PrpfgMJaVMwM/6qIb6igzd+6Is1
kTWD7Zq9gMfvTfH3PNOnLyqbQ0vIs7v4lDzu/1P91zA/GYYuHGShfyGAv69R
aFPgp8CZat9Nrjwu/FFDMv/HAgrw1aYoL+58J6Tm+hGvHLcAOktnx6azfYTJ
5xmU+lIL+OOlY8XQ2tNatt/w1HUhS1CzFfvw+mgjIfJ0QGOUmBWEdXndDvO4
S3DnV/4T2WUDXjX6k9avbxEi+Rin1oq/YvtiFiHo6gpW55dV84GeHjpeVV8j
9ixjOrOeiiOjHKA8oWVQy7eE8csvblO384H3CuORwsF5bLE89ldLqgQ8aJkq
v3+wG6t8MdfcPCADywbSc927ZdjHsOv56hvyEHOtSrCj6yrWZKV9I/iXInSF
6vXFbThjqayXQyNYVCBW5MFbunYEi/7+KiqTVg18uYg3v3znxeo1X/TQ0GiA
Z40ucyllHf183pheg0MLnIv0PurDIDpt4/5rmBsB1P6pG+9KBYoGvap2UMGg
wGPTheNkDOqU8vLYVDHAbbA034m3R1OwXR3DEm3owba2Vf6oovVffn65UaUD
myHdNyl3DqIvZhrtmB/qAgENWV2LXEQYowVUItr0QMtJM9M18BkyZq+2O/5M
H0yj6i9Rvt9G8vOOlvg+N4AEktCrJ5fzEOsXve2zrw2hPujXI84jZ5Fi5qhF
lwEijEkfc+ZTwnDmuOQnBwaM4ArNvusmQvaI76INTeF7EijuRds6R0njTxvX
RRw/GEPH5rWKhqhjuFn7rPvNH2Yg77Nxz9lVC3d32I5lvkyGj5tT5RVVUjgh
wrs9ZosMvYjV0E0pIfwGZ1eTVyQFJjw5j7sFvyaM2m8X+uxRgPKforrW4WmC
9KzGsj2tJcxxaXHyd5UTSqmPxl+I+4Nl19jU+6ivYNJpRNHpRDZgEjPab8W9
jNX22GZ9qJWCxbCuW7E6jdhayyzVxDc5yGfU/eIQno05Tj4+j68ogBNjhUfl
t0Csu3Ao4eg+ZThaH/9LO4OMbXWp5PIwqUJhN8sFspAUVnPtyCX5bTVAFvlj
ev8yYF7t4fOdBzQhVZKNkTr2C/rLRpL8nY0Aga6KixyXWtE42WqfcjEU0q45
NXXDTXSIbzg8VxCATui60MNeHxSETO2eC2jDyAa5DxEiobWGilm4+L+9a/3p
58f7wihTMfJ8T1wXDk7erggUp0KduR9Zs6jpQTR7TkmR70ck9t65vD09fUDK
KHGhaVVIvHrmb1tdA+j77hbS+bAACepfdFkiE6HfY6hWfuc0Xky79HeRZARD
u5ojcoXWiNlK1WfxkyQY8sL6K48aINNsN1prrIyB2n9123xQDb9MGt+gdjYB
vrWdxavRIvjHIrdpLR9TqJTrWvB4b4gf+eP9/ZOXGRRGMMXx6hjj9r5fzPRD
zOGnnaknzaAIrsOGn4wgkEH39Z7sUqcQHnJNYvPYEzKImJBpuGNkce/p9dZJ
hAIOe8xDtLH0+Ki1ZbQhToG5B9bH+o6uEvRGZ1czdC1Akb7683jHs1ahADan
uG4LOHv0+juzUw2tQn7d/KUzNoAoW6tmaGcTeEw95v2IMsD6zWWiW/c+FvKl
y+NWozxMQ5LvHnMyphwj8Pr6I0UwcinddDQ4j605mqxyv1IGiVdXPmly62CB
uqE6Xs9UQSZtVJNCOIrF2/LvZrSpQ+amklfkoT/o7fuZ/iZvNMFHPY7nEP0b
NPzcqQ8FwwQosY34bP/6IeoWn/3h/BoKudQ7LKUV8eicqNTriisA/pe9xUps
zqIxSO1DjyhtMJKbXR8/S0CP/YPcz2Qd8FI9KxF5ngu9++Hxkb5rurBjEmNv
F7+KVG1eyxvL1wOSyYZNzPWXyKpr8V5kmT5wrKtscmfnIYKMn+wv3jOA0tiH
mofJBQi5N4r7RJ0h6KSt7b2/7oc4pdyd0/mP+O//PWk5sErBNT1ofI2qjeAn
i+lZaXpHhNPlpeXhxyRQzlPzzTc/hL9Lb5ZXeWwMQ5IDDccOiOJFVVbul4ZM
4ejYzq+fayY46yF3n8oBM2Bm7FoNUtTGQ27PDJd9NIcAxQt8pCw+fPqgn9jV
C2R4MC5aU1opgft+ZYX782Qwjw0iMlaJ4jtPxxkavSmg1FyjPmz3snUb1+5z
W6aAizC7QQfLAoEKE5HhkJACKuOy87+pmjEn7LzczbNyIEm8HPmBNg/bNlhS
5q9V+Nf1uu9GxUMxnVfVL5SfKsHQmpdkhJsV5si1j6P2hQosW9LQ3omVx0q/
PldjalODdb5a330zLBg6MSho8UoDXM8ldgYWzKC1+f747oAWnKA29o+16ET5
NfIo/l8RcLMprK8g5qK9+t6i2C4GJ45Gr7gWBKC9rdUsqbsARLpbPzs7zNEK
/Zm9zww6MH0he1TGUhwNlP/ef45JF57XvxCrqKJFCcz1PC859UCIWH09bfIz
IsI/TH1GWB/cy8yDeqtqkXzt7T9bwgbgPaRukfA3H/F+dbdFSuHfewmNWgR6
WONOVw/+7pMygunWHYphFhlJvEq9X1rlH795PjRM31XHr5+4S/0BMwGnBWcS
17FjuMd8vlqWqRm4ZVXxjM+b4Lzdzidtrc2Bo42zUcpJErejuixaIU0G4wtE
Fa97gvgdUibCJEOBnj+5ei2BB3ADBp+BtAcU2JaJj+vX/UFw15AWSFa0ACrD
Xy28j3wImmKupme1lMDxqlHQ9TFHTLy5knqapALSDYvZ/IHqWEqmIN6srQZ2
K6TLv5M4sakjQTf89TWgOAwfvx/0Az0hQptzgqIFPr1Vp589eIGamIVyMZ5G
oIGnt05etBTldaOJtgzBILpM+uelzgh0dPWC95EOgMkOUpCH3yn0prbxiMhT
bRhY8k3cvqmIkigGn6T6dKAtXMxOfT8burLacJs0pAuX2VgQT7NvyHmm/wYE
JvXgnd/9cAn1DqTHcmCbMKMPjg7vpqOXchFeOeeZgHkDKJemtKU35CCOfQc9
KlYN4a3w5kJwgBYyVshB+37FCIyVXO85OdogA4GzNUKbJLDmb+CdPaOM136S
PZzw1xhsVivM0osO4xkXXJ2vcJjD2XGXdOyWCr5YkTB5I5kMRRrGx8uNZfDj
rmWewqkUOJGRdfi20jShLTQm11FWEYwLLHWHbf0wot+6PqOxMqy1P3jiOUfC
sn1dhCKJqvBI++ZOupEo1qrkU3dKUx1IAsdzCldosNxiiToFS02gWepR6zoz
hiJcU1MjJgTgP2iUVnzmMboojF8fu4DCvBWluEEpHW3luOjGpQOQOv9QJ/Op
B9qUsFRBhWiDDbmNUyVaH202ihLPI+mAdy1jYtr7Y2jhgbSOPKIuKHu/Sfgb
u4VMyW4oF7vpA7uQbhv5QiniJyf5q8nZADyJCCooWYhEDqjs/8+XCFMbhPB8
Ngd88krv3n5PI7j4Uvbd5v7TiCCzksRKEAmmUyRCehLVEZ1s/gsqgcZwU9te
r49BBff04VmQjDOBYh4HYRpLKZxaR0npWZopWEhYjSX9NML7GbWLhFPMwHbd
u4y3n4gX8zsRFXLN4T3tESe/KUF8+329xb1eMvy4Kr2UoSqDa0ZaE5rMKJC1
RbPwN3Kr9WhwSU+elQUEFY4Kch9+0xqdl/JQ9ZcNDIkO/JBouEnoDHlYKu7+
HzbOnVlyuGoFSxE8MyBMoILKEs/rdWwr2GjSsujtfHagfXcqIbJmCWujF87c
uc4LkXFLumI/FzDlBC6ESk4QTngq0Yavz2AVy1evlrqJQJgcd6gsyxhWqGps
/tdOHBahIJf8sQ9zWk36ml0sDUGUF/Plz2qwjhL9BVN3edilNvcn6aRh7C2+
dysdFWF2lO1UAJM3tkrP8fx9uDJ8IBdEO3IbYm61QyotwaqQqSI9y4IJY6yg
p2voqQ40F8USesyoMB0q2ZbSOE3g/LH0qZg8ijbLdwWcjiBAlynVKT6eejSH
LzO9vhAFi3Mr+I7bdZSjYkq2xA4g8Fhlit8xN3Rzi9zAeVIbttyaTzNE6qCl
bls/fM/pwFzN199KZkdQf+Y/r/446cJcz6+3L19sIuvM2Z/e+OuBlYSwrLfF
MGJSe06bGKUPcfH6OUuHSpBnN+IN58MMwHp+2iVVvxBhSJimCUg2hGsD8Sb9
76OQNNnX52wSibDgvBMdMW+H1xvyZh2MMYLiqgAYEHVAikJzQx/dIAEr4x93
VFIMqf7qt3clxRjYGXfDZFIUcM+qb49LCkxgTSp9tapeHqfiSX1+utIUnPIL
3vQZGeOPW5KCdUrNwLzttoAj2QBXDu0YO/jIHBRtxUT2fRXAo352BRy1IYM7
T4bL2KgoLv91eLLgLRkkrPvKW8KkcIMz0RUHT1PglZzcarD9j9Y7vCwhBpMW
0PTRdiz9aXrrUbONUnsHS+DlVj9hy9xB2D4QIX1+2hISH1BCsZpGwveLcnSM
56xAkJz39wZbeKujewnbULANMMe/3EPT8wnS7pid0n8/sOGkQbuzbisYI3ZI
T7adEdQ5OlfEYpaxLFIQzfebnLDZ7m0wkrqIxVzc6rAL4IfLi/siYl/MYaf1
Mp5HnBEFR1dppFv3LeZ88vgib6QkKPnWop627VjF1wSJ5ieyMPWhW/Lm92JM
b59vw7CzAhCRPGdiZRQmQE+VT/ZWghwm6Z173naYQ+urb75hKnBW9WcsfkQF
u0k5JmXjqwblO4doR54exLq7f7kyhGgAQbrlTMvRRdRulZXhVLQWvPlK1rou
3oPaMTAsyqUiwH5nkOIhUYJuffCcuFaFwVg5k4RcSCi6hrh4xI8AsPYTvDtR
K5Sf9irDtTFtILy4bttXJ4f+EdF7P/lFB5Ap57tP+ZhQVq2N3q15Xfjcb6CS
eWIa8ZYf07b+owfDMwpaXD+eIJsp7Vrd2/qw/IJWeO1VHlI/nmWzSWMIIMme
nc2cjYhcY6wIZSKC0EpRyv3PGJ4mhgVM0hnB7ouK+lYCivyuU2+WZCLBfh5C
zU+9k8ihvCGlHjZjWL7t3ZC5rIq7BNsNneAygVHNhmO5CodxOiW+nz3CplBG
8/LaHFEHf+YV57AmZQ7Mnndnnm4q4Oq+7vfHeclw7b6fH+wXwJ1JthN/eShg
mZBy6ZIGDz6ypnMIE7AAi78txMCbQ4QQ/6fmzcUW/3gib5Pu3dt6y+MEqfyo
JZCHg0z1WRoIUpf+Wl4XtoJWrgb5Opp7hNcHu6z42mwgofzM9g/WHMLqJ5ei
wKovmCJh6nNV0grWJ6fBVBlBB2UGgfWsg8uYqmcdp85tDphyyPP8Lr2EFT/Z
L1kdzQfL09ypl9fmMSqDRoFkLwkwHrklc7urG4tbSIwXfyADB6/fHaWjrsBi
3n40T5uRB8HyR/3JT+MxHqemYxGzirDUpYEabZzDxM76jNz9qwybn3WJiwQM
i6AOqWFaVwXbWU2ebjE+zJ2m8K3oqjqQk/RUEz030IGQgskIGi3Qs7gzkucx
hCYfmf7vGT0CyRuJEcGkKpS4tatWLIKB96GolYNWsShNgPCrQ7cBPiyZTShu
OKDMewvjgznaoNP7dZ+dujo6qF/0teKODmQPPp/YuMKBdgj9IoXd0wVpjjLN
td0lpEbgyX6uRj2QRqZEy2d6kONF6ShDmz5omMuduMSUi+CNbEMrbQagPfAo
KHxfPsKZFHRy84UhiCysydsruSLsUokX8nuI0ETjUi0Wo4dbR4iLFT4zgleN
zN84h+0R2+SG960DJBCwYCFWnhfHE2Vmv70ZMobJMdIB+j1BHOVM8OSbMwOG
Z17fG/Yh+Avu7M8mm2RwqTNtKUWEcU8qI9aoMApIb3VdtfvVTTje0O8h85cC
OrOxSeHVMwQBbd4vQXsW0Pz2C4NVeSnB0fmVi3TSbyxRuEtkA1nB9MyWIh9R
scGGMvtmlvAy1u2S0lx+QwrieJXJkmKPsYGx+FfGPXKgzEZ9RCrlFsagSX+E
a1IByvmlmFZnLmEiVYa8IptKwKdT29wdSMEyeSR/I39UoODzgjk5Whp7UNJz
r2xRDVBmCZryY4yYYALl18yuBhh4lccjl6bQWY9wKfldLfD3+hvuOI2jkqti
4rncKJBVd+mn3LPRd/YXurR4Ae4SD6jVdPiiU4z3GP5wacMi05x3sK8xKrvv
mJyBoA70Tj5TutkmgorQzffyHteF5EOZ2g1/qFAby58Gl2X1oFFBfj7/ySdE
Wncv8BZBH+40/Lkncb4aeRW2pB6jZQCjhV+j5BIKEOXruVvbRCKE+e2JpdOd
xtlFNsNEdI3++QZr9brKSSR3jmj62IQE2dqMV5niiUj//e9pgybGYFUs/NRS
SR2HzoGmYFsTOMqE9rofEsbJwY/SPriZwoVbR4LZ9Qxx2Uthu0yuZuB0RpQt
rc0YN352hdznYw7z6j8WaJhFccbkRaZEdTL4md8hWykL4X8j+MerNCgQGNvd
3P9uH16v8/GN7RMK+L6I2thmWCVcl29qJWMW0Hn/6mx+WUdrswDqmNxhAQz7
wj4e5mhqveZmEYJ9sYGJxPx+iwvZhLWLTA2fRWXgZcby50XvakxQi11gpUwe
1B+3hthoXcMyr2edzbyjCN+zi3J/R7pjKY/AHGlVhh+svbbHdnUwP1uRgKkG
VZCjP/L6YssxTPP4KsvjB+oQu3XtJLX3FprYOmOa/lQTilHNDJWtN6iQ6Jv0
tE4CjBstmbphNagv8wuXqi8oPAxFklWnEtBkttiIj6EA5XryEguqzijVToHR
WpA2ZC5bLYctIqjme5MF1lgd+GzSz+AWwo3mcv9m0YzVBc4+Sqd78BpikSV2
KTBLDyTyVDUUNPsR1YotrLxQH7oInmJnovMRbeG+a4v5BiA94I17FBUg+xNl
qpWrDIFtnk8hVCQQGaquPh9WToR3AaVqJwyt8Hjn4vGRu0bQOdNnc1TIEdmm
FhdX/48EHawad6ws9lpzGat/Vj00hsbP9Tf2lMXxOlGny3d7/+2F44sef6tM
8L/nGf1ke8zgQVDPiUopHZwWMxu6e54MKwGahyuOSuA74cpOl2bIcFXlRtb3
12L46H8udr2eFBhz6LS9OPq+lXPc2nKSQQqe3yCeUqFtwbSc9v2lATlguk/H
Yqqfj5UWa84FlCjApW9xzxZswrCSEWE7zTolkO2/O1ocfhL77fHXZ+SJCrCr
8TtF2ChgJX/83aMeqsFeUpUUnyEbtnavVDaoRQNu3+jKce2dRYsfdOfotmtB
lernLj3FLrTrLzez6zACSZcqkzeb8tDhF8W1V5YwcFdof3fyfiDqeZeuqX0T
ANO0WK+vIqOi9MO57rvaQIpfuB59TwJNzcoeDKfWBYcg/1+VZXSoouH6Pi1W
PehpGjZrqJ1EXj25+GmTTx/sigsTWg4+Qr7EWmsK8xvAs8yiK7vP8hHpFApF
S4IIO5rTd6nIVvjQPb5gGhEjyJ+10owdNEUs8rO6zdT+8bS19PRFSwE83LWC
1KVvBhRl5dApFVOc8TDtqQlTc0iZ6QjuYJHGBSOqPtaJkyFOLLWHV0oQl5tu
dngjTgGfV7POYvwH8br0nW+GshYw58fzu3ikipCrODbuJqkE6oeF6fQwJ6xr
f+EZZi0VmGi8PBH+UANLqny5JK+oBneqFP5eTuXCsr+SCrKVNeCFrEOGjd0q
yqlyMsBTWwvkq7/eDfndh66xb/RvGSFwpIQ/BtO+hwotKLNkn8cg8sRnI9ZT
UWjY6FM+0yaAG6/z09yKbFAOanX/B83aIJT0edXhthLq0rA6ptelAw5O3rSJ
0fvRWdnNpObnunDb1DfnVsQcwl5OqmgY0QP5mMqfXD6dCGu2OOI6rg8O2uwu
zPm5iAaJwvlz0gDS5x+l9UTcRviT23cfzxvC8Owhq9keI0Q8p8bX5ZsRmEtc
/qTiaIs0cuhe1V4mQXe3xIdlUSU8yEJwbHvNGMip/7XLR/PhVzroXRiYzaFz
uj8wYEUV3ybLtKkkU4BUJ1cjWveF4PZm0LTxqCLE7JJ4eWX9sfLwC+/ZNJVh
39kXMzy2JpjcM5voUnVV2Kv7dNvcQwx7YsT3tV9SHYQNfperT/77Le677Sd1
NGFhZkTAcW4clRZVbuNHCHC7355G9XoTmjGrbjBoh0Jd1/a8l1AG2mnFUN2o
AYCk9sqyn7iA2nnrn1RU0YZIulPRYZkGqDqT11NhHR0YncbWPzwXRJ8EaHXV
gy6EeGVOr3z6iyS/Stuv7qgPme94Z4t67yGNfnFqX+wMQPj7oMBV9kKEkPr1
bps7EfwWU3leqzjg5DuvIw2cjWAqOCkv9bgd4kX7OjvCmwQPZW4QNT0RRFI5
FLPyMoZXw6Gkvm8quOws44PiyyYQkp+/FBQkgYccjv7snGgKP5I2k3IDjPDJ
OJM6SpwZ0Af15WVHGuE3/KhIjenmoM3UItjZdBx/zhNpH0OiwNeuvDMdlrut
c2l8zMNrNtBiHnLj6Nt//in9X8evVH1ImRP4zrxciMTaVswvXDMA2xCOEw3/
7l+z1OY6f4sIIWvPawSEbXD+k2NN6xlG4KsyFfFlyQEZQL4MXSoigck3Cx2J
3IOI0GZqaHaBMeT3tX0J0JTBP/4T4L0mU3jueEtnksEE54+nYf3WZQ7BmZlx
JEl+nKcmtphpnAwbkdgni/cS+I0Ef+olZwqgzjDpHTzTenSjNFWUWR/MTH+c
nccaES9GlpYAVgNoLLNvCyDnIxUsD8LtDhMh0S8mwMDUDNc5w3MtUcAY8JVW
XvSvGv4xKZikKWoC8l/OsLsU8+GzXbp2cwRzcMu5wFiFy+HZfON4Q78+3GCr
mFWlykUuR8v5rw4aQExI/q2Pk7lIDtMRyZEPhnDn3p1J3jQ7pC150fjKeyPI
HjmbO2B6Gkk025aJmiDBrSC5c2+55fFdjNZ57osxyDNxJRleFMDrxbVc7WIo
UDGS/mpgZYTwcV9v53lTfXjGI2ik/KkC0d5Ub1IwNoD3rdPN74YLkCY2bHDc
hghuZTaKeQ/s//ng1/AGCyPISr/BLzV/Ctn2UZxLtzeG757domwmajhjxLnR
B4FmUEdnatDfRMIvHtE27Yg2h9b+pxeNHwrjW1FcYu8MLYDmZy+fRmRfa7Ww
Qbv1Q33IYvKdGZnIRfYWv8ssPzCAwYU/MtWr+ciyjwtNS70RXG2ReR331AFh
P/LiYnu7MQz8IA5InBDBU2SNThqOmgJJxUBsWMkUD49UFX8upQ+8lkwXc8/V
IDWsmyf4NYhQbRr7u07TBu99WIueI5qAV0+6/8Xbgrj1xXQRt5Nm8F65mkMi
wwQvZnZ5k/PHEDo+tHwJYOVGZt4njdHukuBP5jq9iIsKvuiCWB+kM4EOJvqy
haOHcYPQYzwHMyjAbcZrpRg2S9BMtz3N6KMPes5f8i2l7iLSS4ONaZ4GUHv7
7cBZrBDp2J8YUhRChFzdOyOKBfa479n26BE/I5hmWmGWHT+N2P5uz+YON4be
EV3ZawzKeM3zdoPqO+awVmeh6y8siPOU7Vrk/bWB9Xx9Lb7bNwmPGSWOXXQv
wtI/vj/IU72CKew5b3D/2MMwzTdHVA+uYMPGHDkD4eywJ3S7eenxEhZNqq8c
9uaFkP1SWovU3zGTTwn3eI8KgqpYdkPtgVls69qllnFrEegM3g3YIo1hFVdd
nKeMxOGAKx/TYb2X2AC13Yv+G9JANVrtvytQi2WZLT4NdZKHt43sAixFaVgH
VF+QtlaE1lTeUvdBbwyVZ92cD1SGE++z2bUrDDEXgqjZpo8qyNBYvvR8LIzN
3pUlfTirDm+Cei8s41RYM+OI+PNwTRD9nH37/PdRlI2DauhtIAFso/iab5bU
o/n20iMns1EoTo89zSedijrn7advtgaYPWDkz1/lhjbYPaf5QP7Xl1EugRo7
Omgd75BfxBkdSPBZZ27ZOoIuix9+VmuvC+WyhSzg9gvp/XCut8hbD7J/SFuH
vx1GvIfTztpf1oecCq7LfNdKkBm3lv6weEPwopYM0W2IRnrbTgoHxhFhMOVe
boPPadxO71vfaIQR9Ao8WuWZsEeyenu/dl0jgUj3yyu+tFLI/qKFSUKiMezr
bHymhCriotz7U31vm0C1/yezjzLy//rU9jddsRmwV7wbMukzwJXf6Q7z2VLA
nY2Tum58tZXPIMzPcsIClJVOqCQwZrf21zLZYactgUT8Q3g3104Y5tf+e3HK
Enqjl58U7XtM+F2TkzrtZAU2NFymNOxBrRzn3FsKLtlA4V+N6rIn+YTEnOwX
mQo/sJy7sw8b3VcwzkLXH1yXGcEjwVTUL2EZS2XNDRAM4oQ64fuKmbcXMb26
ayNyVvwwhsc4mIzPYQ+/XNlpNBcFx7X0o5Sot5hXqebenpckGNyJv8+01I5x
r586sFohC2LiV89xmJZgvPXcN3btFABN/DZ/XjEae5Ws5fLGVQnKGazLPx47
jVXN9nDH+atA+xF6z+USFSxrLFA3010NLIWPrMgrcWCF4lNeOT4a8LX8tu3t
iUX09Z+GgNAQLRiyDE4ab+hBH3zTJVZeRaDIqet7THEJuneETkTmDgYxY+W/
/giHoboKaVjRG4D3P26Vx7RZoZ+c/1qaj2qD8YVdr2gDeZRh5PCppXEd0DRy
O+f7hAlNsOXqrJvRBZX7Zz0f3plGdPYqZYU29IDmTbto1Y9m5PDDxdOjv/XB
5ISn5NfKPETvAuuPhl0D2BSQYGK5ko3QXvjsf4WeCC4i9jyPrdXw3sdPFbep
/vGV3aYyUV8TKfxv3+oqHQki7Nm/fX15EmFc2C14x2QMR5DCui+3VPH2Qnhx
85gpqJgU3PXa0MYJt6wm6sXModhEcWwlXhEX57m4PMlFgcareovX9/Pi3c8/
meGFFjB4WcmYzuRFK/utLN16fktod83/zRleT6CJaRfKOm4FTdZIK2XwHiGe
NYlmrsUGVC6T+wKkcgj3CYciVf6bxDSV6Hs7rq1g71OvNaRp0IHf/jxH2zfL
mLz0+6vBoRzg7wwlkypLmPNuEVw5ywfDE8s3H9AuYMw3B+X9TktAtqZ5+U3+
Z9jalo3XmXwZaD8Zc3DwagVmfeWKROu4PEQJfZwSICZgPTM/v+2NK8IG+5dc
zjAXLPCaB8Pjn8og5X6zLIgasPCU/l69RVUoxuhz417yYTpuiZ+a5tSBi2aO
ULy9gepfMTAr3tIEDLNvFx4eQse3j7NiOwQQ3j0csX+vCjUl5ERo82PAez/e
geFDLGrpZn5H+iZAYdqb88cfOaK9jmelsrK0QfpFXM3pCXV07FegS0OhDljd
pBzZ2eBAtbR5dBVLdIGX5vp/wc+XkbjF+L+TtXrAqn4hWv3uc0Svo82Rr1kf
Ivi4PaqkchEzvavn/2s2gOY14H1kmI+su5sK7j4zBNGSH6XBtucRYgurVFPX
P/6U5zmv0hji26G/HFw7jSCIbmhLmd8BMfvwFV71kWBf1q1ObWVRfGHO8UXq
K2OgepxdavLoON6Invo+9tUMPNYnH5+YRPC0r5UrCutk6KWTFabvE8ZtglhV
E0MoIP0htoZJtoWQ7Z3wMXbHApqUbNiH2O4SWjKE36aw/MZU7wROVMMKRn6A
SeW1soLS/OctTsllbODRvf7USClwCj5wSTH/MUZYsq6LaZCDZwXa9AG8OdjH
2fvrMKoAC4GFcd4eQdhbudjJsiUlOHOqi+XSAgWb1BYRo6yqwBwLqeidigxW
Lc3f9mVaDaqGh+u3GhmxrQWt3eBNDRh9TuIi/JxCHfxP3LbY1ILVrdqx13fa
0Ihh17hD+1FQeNDy+zDtLXR0R82VlRNA9G/nFy0lP1Rpe2jsIIc2hGmyHn8s
YIIuud0MZ+bXgWbbmK9JpidQhcY2oxMCujCswbnJ7kaNvvU7hClJ6sGLonlL
WecxhIqj/+w5dX3YvzT4AD//AFnO47PNVjOAL/NnzvD4FyCHLvo9o9MnwuLD
vCiZi3Y4sT7sX7iMwPh21JX2MCsEZnjiIokkeNR9o/FyoxFyJ9wwV/GkCTS5
0sbmugvhrF8/uFU4mwLaUPoy5I8B3rVCeZ1ywRwuGZBlc2tF8S6S/NINNQqs
iGk99WNiwu80Few4P6ZAYO/VzYKfPwgMAdYO19ssYC30qJxk8JNWOHtYlO2z
Ddx5P98uciWb4BT5IZebWwaQxrmMTMYH2Pq3xk2+InnQKDETcBm9hukcGpLg
zlWE+5ZRTZrHPbDRcc1Icr0yDFwUO2YTpIv5TodeE3ioCgeaDSt2QBDjvPqJ
w+ieOnT8iQpTE/qL7nWntjxq0YS71yhVp0Pfopf2HVxmekKABW6LSPH/atBL
Js5Vxh9Q2G9/+OeVuET0E9V/lj8vAbAippHcVc5ouz3nrUZ/bRg+EbrS+QRF
DROFLhyO0oH89AN3WBh4UC4VXrq1SF0I8+90o9lYQ0TPbZyFND2YWLipt8M9
gNi+EHNqydWH090y1WWMBchwjbZwdY4BHLQ+ZHy+swBZOk8XTCgzBEdOH5Ge
8EsII6Igln2XCMOlT+9J2JzEf5CtMwzvk4AqODyrKWqsdfupyDvXKmOIr+SL
mnCUwP0zRld/dJrBD+77ldLVOni3EdHX7isZ+p6ktFrbi+M9J8TjXrtTgCj8
+4DtvU+tR6V93Z5vSAL3lOykXEILVuE7MqkhJwcb1g1LB7/nYyGmXzqLbitA
w8Nb9Yc3wzCywxkhvFIJSuUX6o+wWWN6WRuFC7UqINsrxv65RwErjuuNbi5T
A099PPveLhv2iumGCuMjDXiQFiw0fu4bytN4kcHtsRY8ITvvni3rQrnGrdwm
XiDQetrAoSUkHx1h0fwlNIOBTfdC7nW1S2hLtnzq6BrA+SxTLP8QBZ12Ic5J
b2lDj9vfV+4nJdF8Ay9y0o4OSG9Yrp6SoEcfuHJS/dynBxZnzCmc3F+Q4kSt
3i5ufYAznWcUXz9C6O7F2qnxGsDfWfaNhcp8hMVLnF/3BBF2qVbmFMUtcUbV
ItWjgkZAkF1nvcJtgtSfYitjUvrnf1ZThzKT+PFo3TcjxUbm4KnYJte+KI1v
1gxcbBKlgMRG6rm04YP4e8StX1TaAuQ93avEXjwikJp4yuaPK0HC9IOUV/ed
sP0aOakCSipQdtY59ipFE0tUPs7gJakGr5/VsFzj4sZ8DVVKxaU1gHkwv7xj
aBW9huxOpmhowZpW3Hua0peo/pqiZKA2Av4p2+1n395DRaUHyGpnMGDzmXst
wxWNvny58sO1HiDrA1fVEYIt+trpYbtfozZQxY8Zagoqo/7/a7hM/KHA/zgs
0bZLiqWUo2gtgya3ifmOT5h7xvUrRjPm5UpYFZYOVEI7GyVHEoMplLB2Z+jm
u62hHEUhswi1IpoKiV1tm37+h/fr/TzPvrYg39/dIelYfKY7rKWEcNenxbd4
wKhZg4qe4Ws0nqhfcLLPE1L67+lMrZMj4q3dQUcHqTBY+cOXL3HFqPPP9tr6
YRpIagg0p+Ei9CnqQse9CTp4fSe1rtvkg7rPn6iyeskEqTTg8snhQFQTEjfj
o2SBxhXR3bpDdnhR2T/eru4NUgnxlWe5M3ZJPWQ+tt4OznVWuE+I4938VavK
cmwdoHcm6ECDPtctZcbvt1s2ThBxKnUxd8nc7fbTg59WbyXB9vxGwoJAzc3i
0dSDyR0uMLeKE5h3fZRSQRyxcnMkg/XHRZdGwh3KRNuhcoYfBYb7i4PvlOVR
Whd6vUSOAIHWTQ4HRn6g1IbEWbFtd4JNqkzmYEqn/BM5tm4KuUOFQJ4y4GJC
eWCm7dFM9oC/m+RROdn/IaFY+GnlHirctTxIpqVdRYN5soAFfxp8TQyIilQt
Qz/b+VNChUxwfAVGFpJApKNyqcszmgVZ7zeZK966IeP0quqwSDaYZmZW5XGc
cM7lk9n8wxzQrSHp3ci1wPanrt6wzeCCpunL41JbJla69zZGpnqB2dUK2+29
TLyq5EnnkbPe8HztCumYtSnOHs+N2cfwhSMKqZ3IQgWXZP11SzLLA9+6oSPX
xgvI49zhFxpZy/3e7Z3Dr5Yg3cnNJ2tENPggk1tc2FqGpo55mKmfZ4BSUjvf
OM3D8jNrXU+JWQBj7ZbXjuqjDNlXfN8iNggvpucXVhDxaEqhdHrIB/onK2/a
MSxxymdHq7+DfSEpS3erjeVU01xLfPKcOhXmbMcMZJtvoWwC6ZloNQ0Wj7Un
j9mUINGbdHqoHgOEnY7GHUZsLHz37bMakjcYBiXkPhTa4Duu34x2dFChOmnL
N2EzRUhTq+pr2UMaUN8YtWyzEaPDr9/Pj/bToTzxw+4eXyEKFzWmMXqZ8ELc
Tqts4qOUUsuL2UPLPTKdNt4QRsTBn5I9KkbYsDjhlGEbZYzLy5ayw1J9wV9d
od7d8pT8q6LgV3smFSqDlVes66tR+IaIASqdBk/SI3xcl/+48J1e8cQuBuRK
UH6MUIAjf4wk93gxoU8ZUpxPD0A6rq//ao31gtDnK2e1v7DwOFW7Oy3FG3Ds
KkmU63e42/PH59E1VNhof5+53kGMcpLC7tdV02DpjzzqA9NSFK/Y6Z3UyIYn
vz8T3tMxwz5cNb18cyqoPiY0kFfK0Lm3j2a3OjJg72MFbRM/AFtGW24x9uSA
VIE0ddZtwSeULmWXFuiQg4JIGk42aMjsNu3bf1lgu6tsR8mUA9YKNmc8jaZC
Q0vL26q2CiSZFnpUJTDA8bo++8CoAF977wEf9i/z/2xWzuJRPvKiT6t8f4QN
1/d5i/MyHfCjS/dVoj7yYINzzI7WqwVkQo6TiUM6Ff5nkz5oUnEJ8co4leQz
DDDlPRh+47sHa7GZQayfmPB4UIMQEBGEqLW2I3FrGBB6tqRt3YwHNuaUd9zU
ZsNFgPlE5IyXjoUbzzVT4YRBOEF1vghJUwNnFR1MSNYw2t92XIC+j9+/amM/
G2JH3WVFvC14d13L9gUOAwzUtbMnT/Oxrqhrc345FQo4cuWgWgmSFvjNW1+m
wU077porR0sRiWuvM1vPhrQF3umkTeaY+0vST/bbGKBFExk2713m6QuDl/mu
HLjWyppcY2OM5S26BnZzLBC9JVWs6LTH530CNnQJaUBjtoXLjcqQvg73nmUE
E1itAwMWJXuQ0wSr3zOWDYy90QS7ZEc899DGzyqHBkSriSXNf0tRh5VC5mfE
gLzxJrpc7IMTPv5WermHCl+R2BpdRsWoJCMzddur5X0+v866mGWIB7dFqikE
DPA6bnKuSSnAp1U3StzrqSA77NTBv1CMeqw383URA9RKR/ZRVgfiWRE/fn4F
G/4IXhGi1eeIXxBldYUpDLCoHDRRMgWY1OPS3JjIhB07Az0LSQIUWut8pesz
D7bTuInEMwVkpVp5BvGuPzhO/vnyIEtMrhyYGcoimkKRrlOcZsyYG9ple5a4
7Pt5fZ9vDHmVIHltd3wPlQ1GJotje2JJmL4yhpfQ4w1Kes+pQ8YG2CKwTzso
YRecqU3uFgrymm7/l1+VRXQH2R32ceMlU4pAXH87i2gHPxu2yC8ExLlF1KlJ
soh+gJvHnP041eQI1rv0HqorNBJ47DfiTsr/ARY0kb4=
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwl13f8TnUUwPEfKaVJJdkjoRKyZbRLFNl77032Hgll7xGREJW9ydaQlMje
W6GyV+l9Xv1xnPP5nHuf5/nde7/ne2Wq17pcq0QJCQmtkiQkRC57V0JC/sQJ
CS+DubimGM314YZz/+K84n2uJteM240HiIXcVG4+l1EoE97jCihewfNwLTGG
68uN4O7gfKI9V4trzu3BA8Uibhq3gMskYEI5/xTkXsXzcW0xluvHjYw/QOSX
OnC1uRZ4Lx4k/IkJ5flC/Gv8AlxHjOM+4EZxiUQBriNXh2uJ9+GPxN2iAl+Y
f51fiOuKgqKRD79HrqhfRP8N/UW4nigkOvF1+bjY+/HHIqmoxL/Iv8kvxvXF
eK4/NzquoSjMdebqca3xAXwS78Pn8WC8GH+GF+LM4l6uMleUewsvwdvwOrwd
N8AT8Id4TFxbUYTrwtXn2uCD+BTejy/gIXgJno4X4SziPq4KV4wriZfin/F6
/CtuiCfiAXgsTiJe5LpyDbi2+BA+jQ/gP/FQvBR/jhfjp8SDcX25tHFP1ckc
UxUXx2/rL8O/4A14B26EJ+GBeBy+W9zCF3FSUVS/G26obqd3GJ/BB/FfeBhe
hmfgJTireMj3JuXScffrV1OXUJfSW4634414J26MP8GD8Hh8j7iNL+F7RTH9
7riR+n29I/gsPoT/xsPxcjwTL8VPi4d9/71ceu4B/erql9Sl9VbgX/Em/Btu
gifjj/AEnFT8gy/j+0Rx/R64sbq93lH8Oz6ML+IReAWehZfhbOIR338fl4F7
UL+G+mX1O3or8Q68Ge/CTfEU/DGeGM9jzA58BScTJfR74ibqDnrH8B/4CL6E
R+KV+Au8HGcXyeO+cxm5h2I2qV9Rv6u3Cu/E3+LduBn+FA/Gk+I5jVmDryb+
f9bdL7/kmF5cU3VH/eP4HD6KL+NReBWejVfgHCJFnMtl4h6OeaZ+VV1GbzX+
DX+H9+DmeCoegj/ByRL9P4Suxf2LGQt76zdTd9I7gc/jY/gKHo1X4zl4JX5G
POr8B7jM3CMx/9SvqcvqfYN34e/xXtwCT8ND8WR8f8w351+P+xczWb+PfnN1
Z72T+AI+jq/iMfgb/CVehZ8Vjzn/QS4Llzzmp/p19Xt6a/Bu/APeh1viz/Aw
PAU/EPPM+Tfi/sUM1++r30LdRe8U/hOfwNfwWLwGf4VX4+fE485/iHuKSxHz
V/2GupzeWrwHb8H7cSs8HQ/Hn8YMiTnn/Jtx72IP0O+n31LdVe80/gufxNfx
OLwWf42/ifvp3JxySvlhPiv/aMx49Zvq8nrr8F78Iz6AW+PP8Qg8NWZIzEDn
34r7F/uI/gf6rdTd9M7gv/EpfAOPx+vwXLwGPy+ecP4j3NPcY7FnqN9SV9Bb
j/fhrfggboNn4JF4WsyQmIXOvx33L/Yp/f76rdXd9c7ii/g0vokn4PV4Hl6L
c8U94BpwJbmKeAPej3/Ch3BbPBOPwp/F3Ij55zv/iXsWe53+h/pt1D3iudbL
hn/nL8ln+Ft8cf5lPJHfIM/n1/H5+Xw4tzqVOrk6WzxP6pLqlI5vKL8dex9X
KfYqOV3MZ70D8rZ4ZrnDsR/JReN9QW6nP0s9OuYanh7XPO47VyO+K2ap/G/c
+/h8xw/Qa6vuGWtELzv+g78sn+Vv85PwRrwAr8cFHJcf51E/qU6hrhznxn6m
fsLxpdSVY//j03PV5E38QfXP8czjI/pF5WLc+3qN1V+ox+h/HvcLP49TxAxW
34lnRpR07EC+nbqX3rnYr0SqeJfhS/NV+M34EP4FH8Xt8Ww8Fs/AuX1mLvxo
zNh4wVI/HrNN/XrcA2pQ/LbYJ7nesY7lHFx1+bz+lbj38fzGM6JfQn6FqyNP
1t+kXhgzDm/QLygX4GrJL8RMVOeI9YxLqevJT8a1UL8TfyuuGnu4nCH2CL3D
8na9Y3wHPAePwzNjxolS8c7Htef64Av4atxX/C+egjfjRXgjLuSzC+K86tTq
x9RV5GdijculcX05tfOaqN+N+4yrOT5j7Bmxf3PH47nHHfGX8vjY3xw3i88j
547rG3tJvK/Hsx77f7xPqjuo++r9GXuf+JZbzG3i8ok0znmce5ZLo99UXUZd
Pd4v9DLF3sEfkXfwJ/hO+Cs8AX+BX3Bcnvje2E/UidWV5CdiP5HfwHXld5w3
OP6O+H24X6xz/Bd/Rz01rgO/RH9zXD+9/HJaLqW6qvxczKf4LJzW8c3kslyN
eB/hM8dewx+Vd8b85U7qFZNLcJ31vo75EfszN1svbzwzXM34zbEfqFPFTIp7
4vhO6g9iHeO/8TX5XMy5eLbjnUF+lZsGv5OXct/Gehbp4jO5nFw6/ebq99Q1
9bbgLqKMGBK/je/PX4w9UnzPLeO+i+dbpPdZqbjnufT65eRaMcdib4n3DHwK
v4S7xrpVl425Kl+K9wj9RLEm9KfHu6T6e73CPrcwV0idIdaJOpdeBse0UJdX
19bbio/hXfg07obn4kl4Tsys2M+dn4R7Mmap/lB1F/UAvZxx//Bl/rp8gU8c
Mwn/gFeof3BcEccVwYVjHcT6iLkez7yc0bEV1HViBsb+Es+sY87g7urUcjm5
q2MGqq/E+4P6rphN8f4ob4nvEJlwRVxXvS3eU9Rn1T1incXaiHUbz1Cs89i/
xI+xN8S64zPjSnI9nN1vyBozmDsu7+F/53viefgT/FU8y6ICN4zrxg3C1/CN
WAc4iZiFt+BV6q0xy+O3+vw03AtcFv2WsTeo6+vl0Hs65jF/Qt7L/8H3wvPx
ZPx1rHfH5cXpYr+X08ReJVeMucZdl++ONR1/J79a/VOsnbjWsb/L2+Vzcm95
iv7ceC5FJdwdf6y+ob4ZawW3jP+jybPjvVHeFtdPr3isO5yV7yMqi+F8D26w
3s2Yv2Irt4b7OfaAmElcq5ijXEP8K+4rFnCfcvPiGRZVuBFcT24IvhX3VGQT
rWOW8I34HbifqCqyizaxp+o11tsZ72GimhjJ9+KH8rdj/okcom3sWXwT/reY
R/7e/nJ18Yx4Vjwncsb7R+y7ci6RW+QR7eIdwvlNnb8r1qqoIUbxvflh/D8x
s8RP3Frul1jjIrPPS8vli1mlLqNuELPMsf8BKgEf2Q==
           "]]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{1125, 1126, 1127, 1128, 1129, 1130, 1131, 1132, 1133, 
           1134}]}, {}, {}}}], GraphicsComplexBox[CompressedData["
1:eJwUl2c8198bxhEiFLIqlZD1s3f4fj63vef3a4WSrGQTklUKIXslM8lIhSSV
I2QTshIpCqlssse//6Pz4Dw45/W6r+u639cZOw8TBwoyMjJxKjKy/5/c8bsF
OacaMLKmAtLv88aYDjpoMO20j7/t6v2U730X/8AgS0tpwwhGc2PBpzXycJV4
9foiQw4wnDOOe+BYgTuIbTFIMHBBiEjaETKzelxf0GGJTZMXJM8SKYcS2/HK
geBr7fICMFV830ZvuBNXZBZ6ThkqDOk6E1yVF5twp+2k7EILcVDQn27ry36J
e7T8lHquLwlRul6b3usFePR56rO7rtLALibb//BwPH659YajhLMsNBcvx6k6
B+ANB48ZX7WUh22OW5YtdJdxCaawtF++CmBzPZA56KAubrtCEDZwVQLJ9weP
PnOUxvNzmjnX72HAeM9zfBE48RdxCqN9JgAlWtfK3k8fwH3fEIyy9ZRBKsCj
SZtuHnvXUbh810oF7LIVyVLGBrArmufQFQtVUDMZuW/C8Q7LKpZ4edVFDVrW
aFxE7AqxxBV009NfHTR+OX6vz76HTZde83P21oBVd5MfLZJ+WJNGUsatW5oQ
GM7X5w+2GLnhyPf4MC04nqXIeXFYCyNTribPu64N3R9Dgrt9pbAo9nX9vkgd
mH4lwKkhxol5nr/cuB6uCzTcx7nn31JhEzel7fFUPQhjnGjOPfKcwJJ8f+Ru
vj5QZal0IfVd9JhR6HrrAwPoW97iWifsoAbv0+r8TwzBtpEjlfR7DuVw5XES
SEbwyu/uTDrrCkJBW2TOvUYwmb5NgWHL6IzuwR0ec2MoJzdnSEj4gqp6BGM+
DxjDm58Odv81DaDYlj1xLhsToITnHpde9aFkn18utl9M4DU3r7vzqTcoiPXU
EW5LIkx+NXs+FZGOSgSpOnzHibCpaBbNupKCqFfJjzVcIIG71p3hnStFqEi8
IiTnJwmY9OierDUXIUG7UoNdN1PoSutyLjsfi0a1X1ea/jEFzxtnrJ+E6aG+
gkAR3McMMk/yyZUw+hA2XhgrcS+bgZAst2bzhbuE/RrvlxHu5jAfwcEdbpxK
0BXXUA/6aw6qMj4uVuSphFYbsStXfSzgTuIP+rm6BMKzcs/1/X0LuFA1sMBG
jCF0JI56zTgt4Bkbjx2ulwTiXLuvsnZlaYDwN/jr6lQKHtWNJk3NWIBSv9qR
8kgxTr3OOU8pwwlqjfs3j+nX4JZlz/d5hLhhjucrrSQ042ShXlKLOB84lM53
Sf/pxP1WiMw/rYSAw/PbpZ807fhtSoG//BmicEVd60tzUR3+xxY5CxElYH9a
NN5g5CkexOgvbGYjBbaieQL1Z+/ja4wN6ukuMlCdcHKn9l44nuTUYdVtKwd2
cdvK+vHu+PXYLh8hp3PwW4V6O7bGDNeiuDjxwFMRbN1V9u5nA07WfvMRdzAB
+NoVox5TCuCUF7KvdN/H4fNhPNy6mRFP4a1lrekBqBWolozy3cAyG73yjw4o
A1J3fu9XNYGx3F34tPlZBR5FUYccvt6OUQTIvHaZUAULLqVPckqVGFu3/4n5
RTX4GstFw3/uPqbUcyxodlUdiF4/if2rN7HBjfDIa1saID5Nkb454YJ916km
3CXXghefS72bT5MwMi2tZfZdLWA590mK+jCOqZUN8b8m04Fq5UJaL3d+bEde
hGaKShcsRoM7Mm8yYQLzuskP6PUg88h4ghjnGiHwkFOu/Ql9kC1fOPL9zyIa
+zhRUnzKAPY69D4NVZPVVTXwXvTnMQTOkAZzyZ9LaH82/eIMixEw+Ie9L7Ja
RM8MPsSZJBlBrfqgbvPtVbTwI2yv+agxsLXp4iyPppHLvYz3e6nGMLcWZyXB
OoS4dFm+7nCYQKTK7w43hkHEeHJVvz7LBC5GGXDw9raiqKYDhIbjRKg+m1J+
9G0JSspNdO3MIoI8a6vWRa97aDgufCnzNAlW/J7NED/lIbOkz51iBSQou7at
+ULuCXJufzr9QcgUIsKyWYLpsxDFUEVYSZkp3D7zrKir0B8NrR3z1BEzA8qc
kOc/su0IU/9NV5VXmsGupPM41WIIIUj2ewBJ3ByeSZ7KfGyZRCj0tQ4mrzSH
5Wub7YePphFoWxU++Uhb/NNvh/vfg8kEhYNG5S9fW8CN8tPHRP67R2hXCH89
6/QN3xl7uZ+T64p/nxu7FPD3ALh4/CjPD0rAheY318osmcGNFcfYhgpwXlUJ
czOV4yDPnesfV1iFf5sbiCg9cQZ+deG2TJ2NOB/palK46llQ2Rhb4D/QibNM
zqha6AjC5QD74OL6DtyWTtAkLUYE1qqfLAQPNuCCogIHZgbFoZYkLV5IV4n7
XRUrvzUoCU1Dmid2W3Px+peXZTr+SMPll20XKsqi8EB2nonQSVloMlgo2DPx
wU92eH/XGZeHAK5kXVt3G7z27sLbxmUF0KiPjBeSVMfFv150rllVgscXp/vW
DcRwkxCJ99+P4nBB9Y7bYhMr/sjyRoB6IoArezuzmNQ+Fln3KcAiQRna5G2x
Ksaf2O8SnamGTBWgKvNbVNfvxaovyin+zlIFYYGL+X7drzDLt6SZsqdqoOL1
nizbPQ9znPgTIlqtDnGSB0S+LUdgXz/u7LlXa4CfcY9kt6oX1q/F+4eqUROm
w9hkpB5bYmG6ib/767QgKWhc5nahKvbQryVFGGkD26bl0VunRDEVAeYnoy06
UH5X0Pe9OBum9+hTqXabLpxP3n993ocME235QG4yrAf0GwPH1/fHUUAlQeXY
uD7oSeeeGBcnqxO5wu+a+80AXDjZ9exY1pDtY36KoN+GoGShSsZfPI8ev6oe
1PQxAtPjR2yvcq4is3K0z7ZsBHuHQ8J1L80hjdmei4l+xuA9S7vQ6TuMXBhy
pf+sGUPImyPbNqsDqNvrOr4YZAKtoWURZMvd6HDWWn/CtgnU5ltO1mZXosiR
T2gtkAjFPIen5VsSEFg3jR0kI8FhfoGnFROZSPS9m/dGGAn0TA8KeG+VIJrg
55KytKZwRcv2l2nlQ8TG+cyJeM8U3F2CGO6eDkcWeVeYjBjMICEd1Skq6xO+
OIkvrSeZgWm6aE43KYCg8Pf+eUUmc3jVusaHquMJfWlOx9QSzMErtOPsp41U
QukNOLzBYgGH4oOHb3CkEMIq38UmpFlA858YnyKueALH+0DVuXvruPrhEtmj
EI7b0Cd9uhVAD0b0iQtdIpn41LObfXsmbPD8w/BbWeqn+EwpzZ0X/KcgU27/
kappLd7vEh2QLc8Dub6sr3ITWvHPJf4D1kr8EP+O/9a4dBc+TPFu/Jrbf3BY
SPas+OcWvGSXL+P1IzH46vbTuHL2Nf402aTbtVcCEqeaJe1Di/Hwl3XFglNS
sFpDalL6kIwLu54ys/8lA9FJD0OuzYbgpa+8hjjH5ODp00/9LDzO+KABH9Wh
+XPQEd+8rhZpjA8EdlNfm1eEzBXbh7GHFPDeFwXjsVQYhLqdzty+yo2P5FDS
jB0BmAz3fec3RIvfXtipFDqsDBuZyR+7hVawsha6jm52Ffgts/Trqugohjmn
dEgcU4WhHLHsd9PvMcMEKbk/Z9XA9u28w9DSE2xgPNNATFodFgpDThNtkzEm
pHm9VEoDhDiP9/OzBGFdp+kYgzBNiIo6ztK4ao8t62kl0CtrQc0Rh5yjlYZY
mNr+ppWiNnDppLrJRMhj0xPTb9TVdOBdsNxRCm5urFpby2FeTRe4+HMM+7Pp
MEr5+htzRnoADSRdlcppQqsBGcH/gj6oLZHX8f9dRypLd5jkbQzg4LPtpmEm
sjqF49wmhk6GINCle/4+cQF1U3PWJUkbgWvQZAVHzRKqnvqhaVNhBD+Zkugr
91dQFLvarq/MP737U7HQv5hA8aKX+F1fGgOhXnFNmGwQDUXdjTysaAKElYFf
JSEDyKTN3Tqh1gRcnsk5nvvegCjmGB8vnSOC2Hf+p9I2+SjHXvdEXh0RGHyW
L+i7JSCPBhUqUZwErjVjc9S6j1DIJfWzTs0ksCEbesReWIraWMsyHfRMAWi7
LIoupqD5+Jf39ztNQeBK0beNVGdE0u/oVjM2A46Qi8G91q6E+YUHAVf6zKDj
v8nEy+/DCXX+QuluhubwpeC1gNXZFEKAifFEXb85ROQZlPnVpBKcmWXyFogW
cFgj6mrEj0TCqtV4/8gXC+hLiva1GIghtMX2af116sHZgkZ9BRgu4GrTnk0v
B8jhdPa4VPnRe/jOLnuYhRUTPO+2/WK/lY9LXXlLt691DNayOyWHNirxh3FO
HW4pXODV7vYsJq4Bf4PNKOs388JoaQnDL8sO/LL1iy8JDQJwofKFS5xdJ94d
VxKmTyUC6cyxBpkn3uNtKTa9GunioCpwY86m5QW+nEG3nJEoCYOXHVTi+/Px
szQyTy+XScMJ6C8WrYjB3T16Ciwey0J3ZLJqac01fGGm+dholjy0POedVq6z
xf0+yAkOvVAAhTtm4R8XNPG2GQOd8HIlKKFEkSzfJPDAuO2F2V4MLMMMXSg/
cODCqyOC9N4A23HL0bU55HhIbfRkoLsytHLkih8n/sZICht/zt5QgWEZ82J3
rz4sgSi/UxKoCtkM7VrXpd9iWxLvDehj1cC9tfyvb91DLOg3KawnTR0e3j27
J3okGrPDXr+5mqIB82P385vTfbAuzVFltYea8Fs9f7n/pzUGH15OV+RqwZC0
t3HPEQ3soxWm6/hAGx4U5KKhkxLYVO7tHbMiHbj0RyeLmvoYdiE0u5rrsS6Y
+buUCB87gNHwkr9oq9YD8Q8m47f3u1HLw6txH+v14UX7M1N7pn30u7bY+wUy
gF5BLxMOqk2UEFtQ8LHDEDJ4fyjcZ5lH3K7/XW+8bASc93seTBStoGg26zB8
wgjKLQQJZKWLqOrBn6cjjsawF0uXfkRtBMW7T178PmUMpRUmmyeHBpAIp5I8
jZsJKBKlRQ4bfkS9Bz1zN/6YQPdVYx1GnmpEsRHoSO9ChM/eNEwnbiaj1cZJ
IrZIBBq1b68tG9NR5uir5i8eJBg13g/qHyhGw2blFi4bJJC9HvBz7GIh4sKF
rYqDTUF2+7mGWWAkOn6N6bvJjimEsRzsNaxmJny6Yxp/ItwM8mILJM4kXSPc
H7jW+YzcHBbL4+UfPo4lzPC7OTmEmkOPX+11039+2DJ9L6hAZQFuX01sOZNT
CLxR61u7ty1gh2VG+wt3AmFPXbpuMW8F17nwX5O4dhheR3lWod78EDhg9KxJ
Lul4dV2uVSmJFaor+QyzvUrx9d6kc9aiJ0ErjPRxXf0NnkZ3sta2ghsG/TXD
Ej1acNeU1XC+Oj649IhKoIy3C+e/cff6s0khKKF/EyG924qz3Sxq8TwlBqeu
56pEYbW43lbkg85ECRAQ5vttxfQEJ/uR+RvPl4K/Dz8mDBPT8MS6hQ+7JTJQ
t8L9297+Jp5z5NT9vzlyQH5plLJQ8Cpe5HZdKbP0HGQF13Op/iXicXVsvlHP
FeHy+CUHqqsE3LkuqdG8gQBmhz0IHLRn8S/6/UpNX3CQcJU66+TJgNNHW9sv
zQN8TBW2C3v8FytoqpNZ+qsMinlL+Ueov2ElG8ofUzdVILfIzrE9vAUTuC29
UXpADTTeMfQx/HmOXTOnfRnHrA531+2mRE6kYXwt5YG6LBqw2diXPvYuFDOK
be0M4NQEorCnCDQ5Yb9196d1zmiBFNPiq/URYwxaeNbOcWpDgObNh/7Jihhr
6wWvUG4duHCAoTgrhxezbHhTfeWsLtxHxj0sXEcwtqMRkU2ieiC0E40fqlok
5JVJzc8p6YPWMcL8uYerKGHihc0iwQDkNvkYpmLI6tbdCiwuqxvC7UXzkrWE
RTS9+TkO8RpBA1tIzE3KJSSZafHnU74RCPndjRm2X0W1wd+Ds3mN4cVxxTXn
tR9oZyzo2stCY2il/ZNxzXkQbf/qrqQSMoG0nP0LTJMDqMJbwrS4zAQaUw11
lauaULNFtJelEBFUP7/4/VqkEHHcmn//8ikR3CWqBpOI/54WuHzDXowEq2oI
FaY+RL+vxwfoVpFAv5gy4z/xJyhjoaz+vqIpvFngsKk6kIE2KqXukWpNgVf+
46OQTC/Eyu2dqwlmUC9jo/on1Ynwm6GB7V6jGSwe7vg2FHCTcNKcmmYCNwdy
Ifj+kJRMiPthJjbeaA7nK27/+rScSqiZffVWQs0CSh8GcO77JRHSJThUtDot
4PPb6+dCnWMJN//q7CuwUQPdnSX/zYwk3PLrqBu5xVEgNq6w0n0pxJOvzH9/
3XAWkrpnmRbuduLNV089Od0vCMbL229vr7Xj0a3LMndZJECaI+/Mmls5vkkg
ursekwLBmgcU1DpZuNXlJCT+nwyQ7pXSdG7cwSPe+Z0q4pYDUoMkeb6YF677
5PSTNzzngLvGMCfziyVOoVFk8FxCEW7cl/7j0KSCZ/R7RszJE0Ar+2kByfU/
/D93p7RhMxyCpGeE008cxTnfnWgNKQdQtHpuYJe7jSXU8zLIViqD96SC/j2Z
SSz0WPZXmzcqoB56S+nXxy7sy1XZQKF3qsD40xSzGKrCatSmb+r3/OP/Tzc6
xTuzMOPhW8H3BtWhlhB5s0HrNnbeAVS9hzWAKXlKpMHNHRvRdktpndCEOwc9
Dn2uMcPq213n/45pQVB8Z8JioDLmk2jwdfmr9r/+QSYfmiiE5ZbnWtpO6/zb
x00FQc+PYiTnTKPRTT0oZKHbfP/6FxJqPLJmu68PwwvLbnTpZHWerI8dYsgN
gXjvfobt6xXEMW4qfpTKCH7oRukdSlhAQgdUJD/cMoIwdKHB7Moq4tY5HTpP
YQwsPukGnU2/0LBSFZNWhDF09NeWJLF8QupllrSrB03g0WKGziD9IPJordYY
jjWB8yoXSQfOdSJd8WAaQToivBHIVzzC9BzRI2nWiRgiTL5eO4d7xqHGUp7T
LEkkyB37r1W1sxTJFzyjpzhuCh2KVtSHIQ/Rb4r57mX9y2tOp81XYSEovbMB
9E/94/txLcz+9nnCuDYdceChGVz4fecmuN0gjLLW/Wrl+tdvL2/5UEkmEmqp
7Dq5880hsXX9NRNbGmHsS+QpnmILuOOq6HibNY6wc3TfV/3+YdB6TtNeKpuN
M3asS4+84wGK3pL2H9ltuMa7Ld7kN/xAZvqaV+tEF35Y5CT54SOS4C24fQu4
H+PUUd8djwpKw8Gymj+iMYl42zH9rx0CsgCN1VVJgTfw6ovNR9VOyINW0TPX
EC8H/IB4/4frEgpQ0U+M/tRmgB+Xi7h/SUQJZIUfTDXTy+HyJVV7DdoY6Av5
N/w9w4W3pOUumUsAuGyLVYk+pcZ3SNnk9iLKMLL7Qn15fRGrbrO4UHZOBawd
Y3+Y937CBj5Nv/8grwqDpfWe5OkNmF+WpN9/WmoQdH940+JaMSbpIjzTY6oO
GrPtTRZrCdjOi6/+tEQNsJp/ZHlnOgDTemFACrX9xxdb5LqhPnbYln7iuW5b
LUi7F37rB7MeVt84sht8XhsKzJ420o7JYK923CnpHXWg+pJ2msrSaexo3+BR
H3tdUF8ZZ/UKosHmF7tiyML0oeRyX+Gvz1tolcyiOTTIAEbPRTuXRO2hkJY8
XcW7hjBcP0NVpD2Pqo9emHNSMwKD01YuK1eXkYKEx6Pv9UbA8oXKykd3BZEq
CoP0NP7x9mCqd9jDb4g7VP0zd7MxKHf/OXi2+19+8qtZs+uZwIyoo8GZzn60
fLLsckCXCQwJ17wffFqH8JvpI3e1iZBTJ+bndiML8WoWe0f3ECGZChZOOCSh
N+e549cNSHAXt/4k/6cQMWtvf7w1RIKXNHtW3yNK0IbiE18JG1MQZTofqHg8
EU26yj0uHTUFmrIfp/ruXUArH/1G1L+bQVPLRNTipQjChQwDvq0L5iC49UNb
vDuFYNegm5w9aQ5KLvSPVx1TCcYRxQ5u8xaQcS7ZP+1aDKFF3MuJ2vkdrhCc
7XNjygD3tXtzjdREBiY2S4xRijH4JFWRmugXRngYfr/y1ol8XCGIzJHYxQH/
saiyuAhX4pTfxF17jLjgTITrUtxSPU5Z9fiYZAQvxJjytQRu/svTDA5BkWAB
aPMhSvEXdOK3e3+xCzYKw1wl54x43XucQ2tDds1fHFaUx0yjn1Xh5c83mR95
SILpBFvo268PcYuKk1fKY6VhxU+ZUol0D3d+cJZKPVIWFM9IFL6k9sctAjxk
eG7IQ62+slfJ6CWctDD67WKKAphVeFm98tDGWdw13jrHKYEeWV4oziGFx6XZ
Uns/x6BzM0QmKeA47tkQfcvDDmBB2H7q22sK/Lqi/fFYG2WY+GDIfu30LBZN
YbhgflUFhLLTS/az+7GgDzVf7l5RhfHDjeplrAjTddsiV7qhBlTxtwYoqB5h
1B605FyR6uBj8f2pWFsM9sg3ncMlXAPGHThoHL74Ylqtsm6XkzRhePJGG1Z8
AeM63DbJlaAFnP27B/edNDFng0C+8GhtGClhstYASax6lFCYkq4DZmoqH/kS
jmM/XcOU6FN1wXpL5oSDIyW22pdJR/lYDxYlzzjl5b9Cc5m3qkQq9OFsTEGt
u8IeanP8dQ2VGcDEX1EV/RdbqDj0ku/OG0OQEwiL3lucQ7YtUx37Vkag3NY9
PHRpBT3SflLfP2wEESoplb7hS8jFZ5O0f8EYBGqeMTVbjiLu05F/bcaMAR2o
zLneMYCsvbKlWRxM4N2f+JIMxj5UiYTvCE+aQMDjjPPZTDXoXUSXQvolItBZ
P7NosEhFBmurcZYzRDAxcTUVMUxDvT+tFwycSJDo1z7Myl+M6t+XX6VcJEGv
lGuycclj9Mjoz0DfNVPwU7n/TOLzXRR40UFnYMUUbO/5l1mznkMDLM4XRG6Y
gR29h1+kji9Bq+lH+MymGci8YiyS244m+C56HF7zMwfZuIyd6bupBO73t+Ws
ds1h9EBa4kJnCmHN+2ildJAFVDz3TfrtkUDwPph4w7t0CT977Cylf24wvhDm
/ueCJi0ssFk++saVhue2iHKFDbKAaAPrAxmFEnzvx6fk8gpOeNt7ji5D4zW+
YTVt0+jGDVWX90lmn5vxatoXVnShfHDryOQ2NUMXbvBqvlknTwhUU0L7rkW0
4R8af9rojYqCCQd/fbgnwrOeclPc8JYA5+5D7z+5l+F1m1F0uqFSMJ7Gw7RS
mY43OQ3f1YmWAceI43TqXrfwDEXfrYlQOShADEG/elxxxl1ui+9R5+BI1dEn
Cbqm+NXxN0LMCYoQsfD4nbEajlepRksRcgnQb3ElQy2QD180lSdqv8VhVVHD
KsD1CG5kTo9I3wDSar/aP6BYx3JUM65STP3zQ5tI1JWkcexrfcZA6y8VEHiS
//HpcivGulc1HL2sChovMmUmDldgLUngXEeuDvdNfke8ykrHKnQcth9QasCw
hPRo6PcwLKmxUNCfThPuTksEmGpfwRw7zzO7MGmB4P7YyaFlE4zroOxqMb02
IPLci6yqBKzsdaZeFpMOhHRC7umds5jQrs/FIlZdWFx78ajpFiOWS3aFofyk
HrRlfNX4z2mFcM/qg4agsD7kvjbi6elbRtWfO8L1RA3gprSJ23YpWd0Q+6SV
m7QhkJmrKNmLLCHvFfn1Pk4juF84e4H12SLyXGUmsGYawVslDaXhoFU0VC5R
J8FpDEOMy+vO+BR68TKacyTbGM6y31m49HIQxWV6ad08YwJ25Xopp/cH0Hhr
knHVIxPYv3lRqVm+BT0+rGl+j5sI4/Odzkesi9AgI2RAIRFqs4sSj5feQyFW
PtWh/CTg9qzZHarOR1wR0g/RExLsLONFTqpPUJj1034pKVNg88+5f3r7Pgpu
WqYOrTIF678+LB6RvsiPvuVgu5wZ2Dr3Y9I8DoSZrP6pnDdmUHt7QHPEI4zQ
peFbf1zeHHL6BfWSvyQRjpdZDnm+MYeM+CTsCnUaYdzyeruJkgXQDC4xLL9L
IjhzSm+GNFrA/mw7l09TLKHSK6X8MxUVhPgP5AneScRVpl0kPw0zw01bLdsH
/Y/wL1/L3uTcOgsPThBFj+h24rNF4etv4wThJFc5mNl24COB97Lk/4rD6e8P
DYTPVeA1JOV4/3VJ6KHlMiTtZuNx9DeuB9PJgPgFeVNh7Ug87E9XaPIBOSj3
mOILPOeNVym0t1BQnIPSW8YXJtOs8G9OulTnmBXhtPAR8i9LqvikhfN6HxsB
+MNTL2nqi+CYX1eZjQwOlz5vTks6sOC2sZ2nv+cBsDEslV+y2sVi8T0VzXxl
2DhbepwjfQqrmliZiC9VgZZ73HW6Rd1Y+1T1+UPPVGEoK/9kqXo1RhN2Uia4
Tg1YTs1cP9qUg32xltsba1aHE6XZdAnxd7CsB6fyPVs1YF4vXMhP2hMza297
N/1REz6cd9Tf5bXA8g6Fztp3a0GjY3y2w10V7NDt6NdHurXB/ZXFjIyGMOY5
a0GRM6QDS2H7YXlTLJgyu3QJ2y89mGl+NrXnPoWM3/BxogV9MF/C5264ktUZ
vJt2Tl00gAMyZGsbA6tI68UVCeMtQ+DVZREbY15AzjY74YduGEHgDWKTt9Yq
Ugp2f3drywieXr7kTh3+B8WzNNa4hhjDd54WvopXn9Cw9U6Ox74xkDH9Oe5L
MYhyODlUJ2+bwN4jXTY9ug9IePrcvPUBIuRSH/4ZRFWBOnQjfl0NJ8KaOFL6
XR2PNqrbtCLukkCYi/Dbzb0UcTE+P53FZArsHclsy175KPHQwpxAqilwxzDT
nzxzE228ZC3pZjWDAL95lwt1JMLX4ZPc05lmsNtVxUg9eJ0QTSX8kPyYOTz+
1tlWE5tAeNZaMGiZawG0vBWGLulxBOEELb7JKAZwvUWKYit5gHsfbxhSDOKB
429VWo8eb8MTpF/v+N/gB87QV116Il34hfFXTmhBAoTrmxUu6BThTTm9kacO
SkPKrNEu/aMkfKtRJpOdVhauqrpLzfIF4+UxJ66J78gB81J0AdQ74q7vgn41
HFGAlPOHntC6GeHrFkJGfxiUwDgMhJnD5PHbomUeRfwYvDjW+UidcAbvPd4X
lMkFcNB52CdPmgYHbv3zrSeVISrrOX83zTJWoSmZggRUoNJw9Aur12eMNo/Q
ui+gCu5igTXvXzZidmwvzOjk1GDt1bSf/9lSLLzw8oN9NXXYXSWmVXInYRHy
yRuWqhogxrYunOIWiEX/Eq4MNtSElZwIdcvSy5jfh1n7OaN//MzZcGx6UB/L
OzC3PaujDV0k5TI5ATnMYKH0m4CpDmD1qdd+U5zBJhnia8tJuvCnnkyHmvwQ
NpLrOKnooQ8OvqF6W9c20YlN9z+jrgZAZlbFkn51H1l7ThioBxgCB1U+e/mr
eaTCgEyDlYygwaBAvpB5GQXECK6dfm0Ee7w2+UfLV5D75GrtOMEYoj48Gw2t
HkfDZsQwTWQMjBLKR9QmBpDa8PRSkqoJaJhWc3eKDSBuHwbb200moEnpwDiX
XI+45Ej1SJkI7b3bSjyeuWhicFODtZUIsRdK9O6REhFLnGQHsyYJMrxjX949
VYi0TPO2Vz+QoE9dI+i8YCkaL34S2UkyBaEbT+dCKpLQlZC104P9phAV4ZMy
23IZLdreLTEfMQO6lLzYOwfvEA5H1X6VMjeHgZNSjFkhKYS5uwYKol/M4dGr
o4JXkv7xg1cT56MpC9geVaQYy44heLYLujhTnoWbcSNqeZUduBKXQcIqlSDE
2q9e+cnWiUdYcu4l1clDT6zgoz/2F/H7T5K99foVQPUp7d7VCA086LL55+w+
JRh9dZdj6rU47hiR9tlpGYM0ptPnrZXY8Rm+/z4W3wTY2Lf+rZNCht8iVDy7
EqoMY1s5ITyPZrDT3vkzK9EqMN3M3vPF7CNW8PnViY4YVUj/Ii1b6/0aK12L
efAl619+Vb+W/Rabjy055O2HPFYH2mDx/jrvKIyLZtTarVADuD4NPZ+x98YU
rlB4apdpA/87gYehDOIYi30n8dgrHeB+qhI8lcCO5ZaSnK/16kPcZKNaZPs+
oj/q7FHSbQB2PFPV8tfXUcD9qb7HI4ZgkvqfVITJPJpk8uK/c9UIyhoOXw6a
XkGeP+jhyS8j8Pf5fK7SdgHtvh+jrnY3hq2hLcMS/c9oByl3OM4bg6FH0bPB
yQG01zKiuONrAn656Q2/PXvRgvGL100rJiA0G3aF0qQKqV0RTLrpTQSqRLlp
0Z1EZN/DnOUSQILHT4a5Vb1K0MiaSj1tjBl0+1hp0/z2I/yePHj0Gq05hERv
e5oqxhFsLrrUD0SaQ/bUVqfY2L/5npYtU97lA15T0tsdiS4c+9rDZdJ1DjZP
c2VrVJngFVneaK9b8d/92bDHTxVxznMPjL1/EKAq46SK/3MevE3dnQ/fw+GU
rSWjWwod3lZbRhe3B0CezLm6dWEVK1af2v9GrQI2Ux3bJw+NYb7ifz5cplWF
FpPXRzeEmjGlQ1XsnSxqoL2+MXB57CnGy9lHfpFHHRznmEavVqZgWco7m1s8
GmBHdlgPRoKxw2a/3AJFNKH4Fap+beKI2d5h2uj4TxvUDoXsCO+fw0IGuNPs
pHTA/Rct74wpD1a1ez+1Ul8f3pEiZTos1tCVX1lyKfoGkHIxkIHGkqyOo8nO
1NLMEHpctm/pMy6iVTznfmaJEbh2nLkarbiKHuokE2hF/vn3p0LcTut3pEHt
0Z3w1Bh0zxoceiw8iJzPCZ+MljSB5Wg7J7I3A2jy4YeYs5JEIP9cHndftABZ
rWQtCFUTQfpJojg4xqMqt98Gn2tJsOW47U+/U4p88n2PCjWZQn2xnjHFazc0
G/JM80aHGVAV2BYrp9wiuDtlGBZpmgP1pVn/M43JhAMnSFGGneZAF6ax+3Y4
ldCisRPNNGABDwifOEQ4Ygk6q2J0g2R8IMHdsnb1XSdO2bHRQ3nEAJT9nFYp
ysnqkq462N1kNoRc9S/su++WUez0WusuvRHwZTUtRx5eRLPFkePx0UbQUfMi
ajR4FZ1xeOzCE2cMBSY3hErvDqHK7WqfAEYTkPsU0IIxDSJD0R9glkIEMuT2
bab8HorNCfmbn0kCsot3OMmPPEH0y1edZsstoGeqz/Xjg3uEHW0l/Web/FBQ
PP5ueq8TJ1eRkmpO0Ifzah/isk/voA80yrk8sf/4NeWT5MfruyiP01ZLItMQ
PuCsc+rU82hnqMqksM0I4o4cuZrau4wUQsyUagyMwS5/lPwq5Vd0tUhOcq/L
GIzn25JomwfQKf/8lgckE/i1q1pyxaAfXegcWTU1JgKF38tq0uf7yLHGLGf/
ExECBqNIMg+S0Rcls2LGbyS4dPx5fu3bYvSseNyt3tEcTtibL11mSSUMbWjN
0s+Zg7DNc9NA2VRC2IPYZ7LrFiDXJR9tax1DaAh49kjA+TkeFmH+ufE8jsdy
XezmUSIDtlAHK13TaHz47jzf/SxGQB9Gtx8/z8PrqHiSd+9xgMC5gwXP2ypw
6UhWApkYF1z5XqSZXFCPF8/fufPIkRek29lpI1va8RxZXcPt8wJwybq2SeTf
fG2X7v5IyxOG5xsbP08eacLr89V/6zuLg/LGr196Z1/ijG89C0ouSMLzu6Uh
F64U4EtUzK1DQdJQz/OK3ls0Dnes6JV56y8LtknRkdtV/jg9qKlqusjDSCnT
SwMvO1yFTPTto9sKsCXZNRkpr4O/EW/0sQpWgj1Pt5TqWik843hyYlUOBnr3
ZK1oLE/gzMXfRfPPA3hoeKUcNDiAr20ZvWQxVQbNProqA6Y57JHj1qLnZRXg
InPit1QcwLwPbXZt2qrCPgP91HPmOmz1UNpov7cayCeQ46XljzC9isvKWqHq
EF0cI+f4PBZrjo/Q/BWoARpbJ4ts7lzDqCMnKXyiNcHn+TOPnISLWILox8sW
UVqg7+1ILXhSC6vS5EhhuqUNDz47W2sOS2K51zOvv4jXgdbM9WQ2mxNY2Q+v
/ZuxumChymhTw0CFuZT+fJWfrfePD5eTVVMSEBl7XKtViT64V0op1L7fRa/e
3vVXeWQAj/+80A4N3UbS1+u/ML0wBPM8xcSJX3ModKXR55SFEXCMuQq6KK0g
8R9949kDRrCSkBaZOrmENC6GFTNZGYPn4ZjAP4uj6Kq/Rf2Jz8ZgbRWZEN4y
gFZPdEsev2QCf3uHeuSc+tBDDroAjXETEKV8bSbG8hqdMvj7yNqGCJue+7da
7dPQzpFgYadJIsSNiX5nyElFf9zEKGkuk2BRgzLTtKMISW+JX/v455+ep1Z8
uAhFyPFzB9OMlyn4PpsxjGSNQaWk+L2UBVMQj7CnirqkhojWS+qy/mYgnGdG
dajMh8BVe9yWas0Mhgs+i7YKRhPekJYu1XmbQ03Af92b7qmE6usOdVc3zcFz
Os+C/WcK4YJzPkOvvwU0cJzkl05PIAg74+elni/i7F4L17jPBuE0+FE10Xc0
kHdrXDX3ZiqeouNH8SeVBWJazWePFxTjt9y26s/7cMKTx18Mj7XX4AKUnaIr
utyQNcPUyHavGbdSS2oNvsgHhR1aWba7nbid6ZlZjhAhSKWfZ01pa8OLf0QK
vnktCoxPi6bu0NXhagc9X/bZSUD/l/rcXu6n+Ekqsiwjdyko3DwgMnglA7ep
7frpGSgDvc3OK2G7t/BU49P/WXjKQS+Rs/5SmRve1LTuQB1wDuh1PpRw75vi
55foqc3DFMHqu++HrZOAn6emnhWLI8BoJEuDhBI/vvXZ5WtMKQ7PNPnxDEVG
fJlgfyXiE0C3EX3N+5p1jPPAHeqYL8rgzC3SQ31mAtvkVRsan1CBBSs+huHK
Noxe8W/b1i9V2PGxjPn7sAJzF/+ibLapBn8P0RR5OmVga7HvFJt21OHNe1ud
iis3saqxFIs1Ck3IC+Z4KnPUBeONoSm+TqsFTCZPk59EELEEftxnnFIbWj58
cuQ5i2EblfJvhGh1YGCRPuJZJR929EGvVAuDLmQeualQRsaE2fuf7z3LqgeH
7inVRzasEiiljq+08OhD1PL2BanvS6jDdCgtkM8A3kWFtWi+IKtrdr1ts/yf
IYROivrfiVhC8p7OT8Y4jOC39PVO7duLKP7M4pRUmhH4Pta1QrdWkZ2O5ddt
dmO4M/Bfjdz8FIrLZ/KcvW8Mgt8pv/Z+H0SfllWO4if/8fElufA3BwdRgPd7
wzd5JuDWNUt7lKIVpV85q1N0igjWpmTH7O8UI+lhZwrqfCJ0nI3tEQ69h/67
tk28x0OClfKEsKOa+Wg1SWSMTMwUWJilR8LJHiDQ71NNKTcFet6sNC1GP/SY
fPHtXSkzIOW3yqn9uExwnLT+UFRtBuX9O1ToRyjhEfYkS07aHEQuWlkEZyUR
fBnPG12Wt4Cyb+R5bJNJhI9MjaTjdRYQmCPKdmctltAhdo62JJgSjsx+aore
T8BlXSpZVO4zQ1ZnGMtN4iP85rFYPqbLZ+Fk1Cs+WYFOnEyj+mS0qyA8S1me
q0nswG8NjBgmTIkDq8yOTlh+Bc5uW3M6eFoS1mwoXZ59y8H5L3l8Ktj+l98N
i02BG5F4MHlAOe2qLHR59WbIN3njzhQ5A3xL8nBkhFPja4g13h2QPR5MoQh7
xReS0+LV8OgTk8+bqQhAgmGq79qiuNbWnlweLw4+tPW90sysOIUPT9fR+wBi
Cz/tXqjuYYf2f4/1ZCj/++8Z6lajaaxHPfdH8UMVmLGcyj+c3YPVc6/rBBaq
QmwjP28D9Sus/OTrw6zVarBISZvi0ZWLnclNxKjr1IHR71VMISECQ9UMvQt1
GsDwjWn812tPjOWun+lauyZEEYvo175bYIz/RV3NatGCz9oaNe9YVTGzYAH+
nGZt6I0/PjYoIoJZRr8cqu3Wga38IfakKFasZj7MtGpcD8q/dRoOK/5A9rKS
Yn9+6gMNvtHfYkRWh7FEuhyfMYAaSZn6Y55/0UBZ233HZUPoY3hsQjs6jyKj
PwsL+huBSZZ44zupVdTOlvZNb80I2B9G4Gzus8iFTJs+NNAYEuJKsr4zD6Mz
Lz9cEdk2hgD69qC32wNItlVL+XeYCXwTyU1l3vmATipzTPjtm0CZ7N8G/u4K
JHD0OVEi9B+vb2tvlWkmoKOEBzb4HRKEnXv8QEauFKVoiAleYTCFcNHjc/qM
DxEpuVsISzSFZ2eoxu5y3kICT3CbeCYzgJZXmfhbY4INVxHtQpoZxPRVsB5l
vk6w27ULOcVqDk7JXGeSZBII7EhC4m+mBfx0Knv532gcQc1gLuQFGQMEqPOm
yf7KxB82Fha5nucB7ZAgngNDrbi0R4bzbyt+4D7f5eMg2YVTK1CdYB2XgMiD
HAT8RxHOW6rJwbsmBTwDdB33ZJPxZHahDcKmDFRfeFziSx2CP81vKXw8Kwe4
oOUYq4cTzhVpvD61dw6izOyPTawb4dNXgv4T31MEtj3rVZLKOVxoiV8gkw2D
L7lCP072ncEHra82KnIAMLSq2fFQ0OLfaQqpN1mVoYRyue1++jImevC0mAaX
CvinjeUz6Y1gvJS/2jjOqMIoR9S137rvMQviisYNUTUYX9fZXzj4BBNW3fdN
V1KHnpC0Ns53SVhX4Jz8LUUNMA9+5jCndAN7Qsk5saOhCfRPDPpO6Ntj0vcy
t3a0tKBA2zHkU70Bxsi7Fsirqg2rwx3dG/1yWOaMlv4rPR04d5fM70v8GezD
kz8JPXq6sFSf2+fQdQgz8n+R8NlRH3JEpGbYX28g0WuBe7QOBpD9iEZ5rmsf
6TbfNOrwMARDJXOxl/vziCZ6ljZK3gjqWPS6vKaWUHoNdS720ggCWHxNPUZW
0HYw51jpOWOoprX53SExgapURvotXxtDWPHyBPfCALonXlNrhJuAyIeKtz2W
A+jNSexCdL0JmHeZvfgh34CYkiRffCIQwbV68Y7knTwE2dwVI41EUOc4ApGj
Caix6I0TlyoJ2GJFtKNfPkKXR70Zn7X/06ORrfrS1VJE+vZfYoaRKcg/EjAs
vZOMhA8OWf/uMYUMTNVKhdcReRQzJ9oOmYHBHba9d3a3CdOhK2+MiOYA/DMr
MsQUguR8z721T+bwl7tvjPtxKiHG0SQAn7CA8bW2z5dexRBYKWmHRiZ5gS5x
SF41sgM3qgurbvwhACMnY+ZYsU5c4cwS3aun8vCbjmv4nKwtHlU7pZ/4XgF0
KC9n2ctr4tx8/YkJDUqwOXL7BaOOBO55qN2+dAID46YdP09yDjyaITx45DoA
8QfhcxA7OU62m6297KcMh1pJN5gDfmEKQ3q/6cNVYC/q3rG1iY9YJtsGnUK4
KijX78x0Gr7BTFL4r/mmqEFKRJHVWZ6HmGzxFl6Uow6n6ZiH7Ql3MWWejpjZ
LA24/Jtr5NSONxZhlzf2qUAbuD7cPu2cLI7tkAsIyD/XgfUZGqEhLQ6sks/2
RkGbPjT15adf8tpH2040XqItBlC+0ZclorCBKJPVFGv7DCGaUcnUQ3weHcAN
egucjGBGuueteNsK2g2Str02ZQTVN68jTYlFNPzc/nybizFQH55ZOtz8GWmw
HU3l/W0MpWnjKYpjAyjNi06BwssEeF2+0jz90YvGyxLLvi6YwLCwHPm07EtU
IG6yo+FOBFxBYP1uVRIKNZ0q5/ElwYjXl3OksyXIAusqYo40g9+pUysTin6E
xi/YQiKVOdSx3WkT9b1HePj+z9HscHPgWmFkXehMJbRasnJUjfHBexb5I/nC
Xfhy4SNRv7fnYEuh75a4CRHPe9qUofpOEb7Hb3csRynhjdtshxz6CEBDND7h
ZsmL97XnVdycw0G0+E1qVAg97lJAWfNuDUB85NIrjOwvxkfVl+m8pwy1dVkJ
Pw98xeJS0nqCyFXhpM7t2aqBZkxSc/WgIr0aJN6esG359gzreu02unZcHTQl
Rj8OXk7FJsLNFHg4NWBKPc38VHsIJuY1nLXJqwl6tKnsdLROWG/hcX8KXm1Q
ssya/dmsgHV8qD+wJKQDabaF6cXrPJjQ4LSykbo+yBJppyvD/qIgh2KdRnUD
6PoxeGLDl6yO5tgB86/6/+Z30UJHVX8RHXW7ofK60AhceiSpPUxWkdjkG5t+
gX/7YqaxfcnqBzqz/PdMQYkxUJ70zY7QGkSVibs/NUVNgOvkSyeGjwNoYPdJ
CC5KhPNOvyrPCzxCb940Wy5WEGEyPO6CYm8c6lmpvZxUQwK7EizF/PgTJCtE
MsLrTUGpyeC/dhlPdLVFTux2ixkwX9+ZF6S8RdC42PNfk6o5NA65xDyPTSZo
hQ6OsreaQ5s8r1TqdCpBVCl6uqzHAizVNqQHsFjCvOgRf82JsyCv/1b4W2En
zq5B+UPyoAGUMBz601hIVneznsqe+pAh+P/nuHdTfgWZXOYLoqE1gpaItsW3
AwuIbsj+7rMII/AbKmqTv7aKdoxE6mSijWFDVeGIdNcQevaX7smJhH/5hC3+
PUMWh4p4jQ9ZpZGgVmCxzH6xFPn+3GyMLLOAI+T/9aZ9ukfIv33iNdcIP4w8
Df9re7gLDzgW9s0uSh9uP2WIzQvbRuO39SqNbxtAwhF6li7qPRTvRaZTnWgI
k6o/dge459EJyqTt903/8laeb/Ab4wpqZQ+xvqVjDIx3pa/RdX9FGsl1dxjb
jSFC/g/u0zaAnHu8Ey2N/vnloqDdn/h+ZMD3+qeHPhE+NN4oVeJ6gJpDQ2ma
+4mQQF4R9WI7Ca03CqD2ERJk6ShZ3+YrQRF57DpjdubwplTY3Ws5hcBp04EP
zpiDtcQlXhPDVILf1hTFxVwBEL3DLaJ6uxMfOeWfv1+jDzXrhCuVJXuIM4KC
/mejIbxNDa80359DyvdpuCcuGgGW/C2o+s4Kio/0Jp+zMwbLkqO0kx0jaLjl
pVDehDFk9HpJN/cMoKYWV9nDV0wg7O9rVu0XH5Htu4Lejw5ECJs7WXneLgWJ
xs6/EblhDoeynvWbPUwlMPX0L2Tk8IH9jFXfmeNdeIHNO89TsgZw+FW62Xg2
Wd10o+r5GSVDqNwM5HkwuoiMW2VS1rKNIOfyX99571U03H6gvTXfGGrhUsuT
2EGkppIX/P6sCaSdri4krQwgP2120RslRPDjiEuSW7qHyPgfZ/9osQDmvMfP
mVNjCfKPPhgIPzwLbnt0oo+vduIYdoI2fl0fDkjrLc+Fk9VddNFwYtw0ADHN
9StdKqtIW/z06J8QIxhlLp61Pr+KqgQUHc7fMgaSecX7PbtPKI7yv4GKAybQ
+4o8GKcZRFdv24Q+jvzXD5LpiyUo4tGY+JrUh3skCFG99e5Lbin6s/k5geoB
P0xLzoyln+3CaYIvDz/1NYAR5cfHY/f3kNsJZf36MEPIdOen57kxjywv6OmT
IyO4lRPs5x/2L59duoRlGozhJeX1KvOhAbQVyso/qGkCBjfcW4hkA+jW4Y9f
DDuJUJN8g/rnp0Qk0vNhWrHv3749jv1lGStBsgl3KNitzGF/lo48vSiF8OaG
bAPNbwsQ08iwn4qMIcSKaptqDuuDycyFc5/pyepmcyNcEr8bwsN5A+rowHnU
PJkc4uhhBP6ZdezZFKtoOp9MoNaPCCNNixcTzRMRx/aMK32sOYxwtzfxzKYS
QibNoIeTH8Q35IWQdBdu5pbI62hqAHamv10PyJPVCXo0EgcuGEKea1ju+xcL
aJC5YfHGUyNQaoyAA1yr6B9MB4ZUGIP3hw7WByyD6PTEeZMuWRNAn5KpHuYM
oJ3/fO84vCGC7Zn7/BaHEtD9n+wKXA0kwE4szdMNlqK66j7pyB5zqLdScLdo
TyXYGLuL+Q1bQP2TTqvC1RhC4WujXDsuPvh4ME83ZqgTX9Sfqx1iMwB35gmW
Ny/J6j7cKJXzijOCqHeVkezhq0jj+ml2piRjeFL6UaJWbwgtOr4ZSsggQl/v
j82HN+8hL46y8ZkcEmS8yW8Y4XuCzI/YTCgeE4BDOqf3xmY78fLWdxplDw0h
ayeoK2llDn0p+VQS0WUED98uPnSNXkYJb8u//uk1Bp/MIdnn7wfQ4Kne7TEL
E3i5odxJpO5HjdXhyeY/SMBUST+sp1GMXtEInnZzzsXjudhb2tLFcIl9u79s
i/s4oYjEF/XjLt6ny5zRHcQIcvUd7vcD8/AwnaqSPncO8KquG/NMr8D1RiML
OU5xwfzW06m3QfX4Vsy1t2NmvHDclYHXoawdL75jb/ddWwBYBHiLj3d14t3k
59s/xAvD+pbxJV+5JjzFYPb9dVtxmDUzReaXXuL1UHZV2EwSWPj+5G8+L8Ax
cfq1X77SUE7O09eWHYfbK/EZrHnIgrm7q+guQwA+XSCq8/mSPKx0ab6YQ3b4
G5pPAq1BCrDzyO21Qq4OzsBM1jvgqwRfTgmy7DNK41nWwp9M0zAgnnHxONR1
Ard7cJjqzb+6En47u6v3/gH85flWis9GyvB+uWhM9d4cVsnR6xV8UQUEvrPa
DscMYPMCx5orrFWBu7Te3DmlDmv7fLkt110NKMI1jj6lKcTc+xIuWd9Qh+lD
/TTPz97DzE7ufS3204BoiySJ26PXsCnHtx8CIzTh5jEC1+gBW6ytzpTH97YW
/Lp2OY4iUAs7r/azYzhYGx7vjApsnZXCUtrafjTG6IBPue3FiOYT2OHc3+NK
UbpwM8qvdOEyFcbHdjjO874e1Cdk+pE/SyMcGjz60btQH+joqU0e3dlFotOW
G5R5BqAnMl3pMb6NDkdLtImYGcHWhTjV/wRX0Nrz6cVbfUYQGX6rxJR5GUkP
qvYdtzSGw2Ic3qX4FwRe0xInL5pA8odTD9kT+tBxjUAv4lcTcMyzuWOa8Rp9
qKA9j1sR4Tk5NRP9Shrq41TedvtOhECOOy9aNFPRRnlG3KQtCXgdzO0zMouQ
O+vS5qtfJBAjraxO3ypCbdkK5csepqC3IuezWx2DVAwfWVybM4WwUZHVMSct
xExW/VrhmhloJT4U2bbxIdDLy3YfXTWDX0PvBwLf3yV8oa6MeehpDg+LFV0S
bFMJZIOD5L7r//zKxONntppCYL7s/Db7mgUYKSbFHHiSQIjKSGtPlljELcj6
Ym863cBZchwWWW/QQOFt+iOWUql4HH2mD5cfCzgF9L59blGMq1XGfBIjcUIb
jTbfr+gaHCwI6XSK3KCTy/H2lWMz/mzi5m61IR9Efa2fyVztxF0fKezvuwpB
+tdf0RszbTjbqvmRpWJR8KeTSw21rMM5qtji985LgFbISMKpkKd4V7Sifb+D
FMhHKnbyt2bgpdMtbLe9ZWDt1KLRSfVwPOWLr2qysxxMnKSzpj7pjucIfHfN
8DgHCt1rNceszPCPmy99rgcowlAyDauhDeBPf6pqldwhQN0Rp5j0XH58/wQl
r8hDHGpeLmz9DmXEVSUS8Nx+ALF6trEF1g1s1G6baDisDPop39bOuExg1J+O
mc+NqcDN7/dnRVnbsUhL1obKKVWwVwugnJ+vwFT2S0S5/6rBA/LJZaeeDOzY
s9n/VXDm/1C/XRifLIUo2SvfbGWJZCeaz+fYl5g9pFQUKpElKkkUJXvWCQmR
LJEsSe6pJBUqy5CkEkIKYWxleTz/wXnd5zrXud4/nPtg97w5bPjYbdRQGoaZ
eQr+qVq2gDf6Xqr/LpzCuD2/+YXxWsE+8trZ+HY69ubxS61FgjVElGXp1DIx
LKts3eQkjw2wk3DGz41KGN/o8u1O/n2w4fKeu/WwCWvU6ijvE7YFsX9G4p3e
M8RnWfA2RcYOPrjZ17A8JhFb9FD2TXkSlNhk9+Wv+u3eNMbXSiUybHKNNhyu
mkSZ6qG8AxIUiDiZPtd65g/aVnPY0DSZApIz9WGG4RykLOk13idOheMa10VN
rIZQsGTnrZk0KhBYdoeP/OtEi1nF8/9tpUFXlE/qb4FO1PD6Mwll0eAaNefo
lROvkXBasmmlNB0EtsQnP9hWiLiuPJNPlmPAuUCSssbGHKReOuYyrLYfHs5F
UUsiMlDOJpP+rNL90Fo47OjzKRBhizwSpzTtge9MRT7J+BhRMVLOuKTSHiKe
+0R9PXGZmFDbKGCh5QAW1S+KTl1MJLI8m5I89RzhhNIL542zicRrgje4Rp46
Qt6vo0KRwrHErrjoqoQ9PJB0o97qBUrANdS6Is5dEIGVc2u8A8XycHb1xUM2
9B2QWRE1wBFvxgVSPmj4HlQBmS8WtqGFTbh9WJhK3RcNYL5xy3bsKscbf0wP
r3zRAuaoP0Wcfgc/G31y7eNpHZiw2rAyS43Eg2PevTH7rQdbj3F/klrvj5u4
R36uGTEAoZHF6KKZQ7h5mAUp+68hVH8L3m3aZ4Z/WZQTxJf2gqCKzCPHZnXc
bi/zkrE0DobBTjbdp8Rxujs5Vy0F4O6VR3qRtcvYm8MuqsnJxvDJist3qmwI
6507e7wqywTkk/OnTgi1YkbGkqZaOaZQSxCTbDj5GAv/fe1fX7kZ5AUS9PtU
sjGz56zDW2rNQVtCv9s57RpGMovwKKu1AI26phm7ZR+Mc8JOdvmVJSQrPBH9
bXoAs3oqqFpTbwUmC9VFOs6m2OKFOWe3F9bgkCjgI5C/CyN9GoCWJhuYyaS8
4+oVx/ydClSv9tqCtJ7F/YVt/cib89iAa9AOzEwPJjsaE1jVmMOv3gES2ATX
dIq/mEHpKvN2vuNkaBa3e8p5Po4k5KzCDAIocKjqirmHMgclDBROaHIokGPY
yl009Bs5BgrqRZ6nQsOeMrRo0o0sXPTIggtUUBTsbpeeX81r0i4wFkID7o6Y
j8cC36NU7+s9V5doUKKSkCCq+wh1B77kE7tEh0MZtkPZ4QlINpRnZOtVBlTs
1HYJ21yE3rtMPCCv3w8at7Tvfj6ai6ocsLdW8at8JixbJnb7Cnqez3h8ZqM9
/PkOh+c1KETpBs9L08n2kHnaeNfzR+eJpAshv9VEHcCVZBbfw5dAbHk8/7We
ucpDUwJrKpfiiJQHuGpGnSDw/bN9xolKx2slpIQjrBUgmHnWNajiNX5NMDJL
wVYJ2lXlXs5qt+A9Q8Uc6NaE1jGHjBGN+zh799W+e2Pa0HYi8ZNzWBLeZ7xd
iTqpC13Vetvvng/BS9SkWd8H9UE9Rfqd1xsP/O+o0fK52T0gxNFVXsGouLPf
jlu0WSNQfmyqX5a/B7/U7hYuugGDbgEq5eQ2ebx7Sd9NUAwgsd0y7ownP669
2Nq7ScQYCpiE//L7prAx95RgAWkTuGx814tc14NpVrOsd/xnCmrL7UaI+RJj
+4ri2jvNIKC7Jn3iYjFGEHnncszAHD4eONktuTEJG8/YciBV3wJ6X70LiCu4
iO1NTDpfZ7KqN5nkYFr2cUzUy/cVj7kVxF74q1diQMasKoMMAbeGXOK5iL1q
Bhj8kAwPsbIBgRCuNqtuOaz+7+Z/X632gd66pHYnnfWY4MAn9/uudoB1HP28
7DCPDLQJfHIuJGD4WPrfWVhB9RPUthhPMpTeXpjcrjyBPK14jsfqUYCIedi/
fj+JFMkB03YVFFDS5z1QPjaN6m00xuL1qeAkHxRT5Psd5dbcXnJ9vOqHB63n
sDk2etQrm7ubSAMPlbT0L6fZaK2/vXMsiwa+8R79a2JfoKhnOSWDRnRwjTIL
YU9kowmCvjt6vpqvq9VM+O8mIGZliJ6SMQMmaU/5A0PzkM+23vSo1wzwk1x/
u/RGEYr7+0v8Mmk/CM9TpcYmk1Bss/k/zrv9QLHkun3dyQOp237kcWPbw72F
RF0PkXBi+78NKkeoDnDZ63hd2t5k4v7shMc9nQ7wLIZoFlSWQjyRM79erHM7
/NHK62H7NOFOQulvC9uVIaPyTEchpRkXi/gsYp1vAAopjRoVF47iKw1xTyue
GgJ7ZF3TySRLPGDdpnH+J3uhcPKH6kySJh5g61q07xMGt9Vd9nu4S+GfCWX0
6QAAnvk4iVtOa/Bnh8TSqv2MoZHP+V7Z4E/MMlLec/NlE5iSFvLZrtKOietK
8UyFmIK40MmhnS9qMcVjMy6QYAbyvJ8fKvvkYgfeKh19mm4OlJgZd7f8G1j7
Q2OFEqYFSETq7zxu7Y+pHTkjdueONVgeCSra0K2B/aHYJ1oW24Crb9CpxntS
WN3gj/DahlU92NyuPWiygvwSuyf/vCCtvqc/r0vWPGraeHai8T0Z9DKqp6rl
xlFiZ932CjcKxHvbKFjWTKMGaysfpwEKiBUf2lzo/Qc17lAObztBhV0y5x2Y
3D3oVP3FIO4RKjw0ay5nfmKj/kaFPbxnaLDTd0bYYksbcuwh3Ps1trofNf+k
CJdUIVqye7nKaTrE80sYmUkloRgmyYjgxwBD13yN3KX7SKo/YatkhD2ct5Dh
CRoKIJY6Ojlnc6/yn/eIl96GWOKWOR7S2DtF2HV1OHVBuQVv4Y/X5avYA37v
d3KJ3KXjktVea90fG0FNssuSzMJeXPwLw/3rWyIU3l5jduPhdvzjesM5+R84
uJZRKBdnBfGnqRpx3VMAKo6LDog2gw0etxpR+2sM9Y7Fz39e/YplWpym3Fgy
gcpfK643VRuxB25ihOl1ZpC6tSLb8ngZlh1p9KZewhz46IGfn7FSMJ78q076
UhbgvfRfW5jpZez5MlnniawlMGX7VfndPTA+vTt622StwXexU71T1QjzaYo3
rFG0gZASXC3YZjv2A4SkZIztwD63ehwXmUHXFNQZn4xJMLzlXZ9QGIEVatrx
MduaDKixeIPJaj9yuUdT39ylgPnZ+QqNQxw0+/C9V40iFU4r3Jhyuj+ANpx4
sq+kgAqB8VEv5h06URfR/Z2iGg0mt3GW139mI1vVredt1ejQu0voVlJhHjq5
rWdDRxkd3tzQDiuJi0O9eorj3tUM+F35O8l2lT/Txl+OW7P2Q0II26x8yAft
PLWYG9lgD013l46NojCi1ufRW+3GDrDhaY7ikk8SsV+Pmhz0zhEsTJiTNvQY
IrQsl4S27YA0r8k+LWYzLssT9duamwQc0bvcM1kE1vxo5+AbXjLsvNPe239u
GlXJYV1C61b5Xf1R2s/yCZR+uuMLCqdAyKyd3oMzHDTa+GcYi6RCnZbynvyJ
LuR8QPbociwd7lkEcfHqxKFKj9pk/WQGeFjHD2R/LULK/c999hc5gsAlS1ub
2VgiR279xIEmJbiloaCrJN6Ca0fcq9IMt4MVhZ95e9T/oVGT9qcnQknwo3iv
sbT1Mlqb2dp0PpYMTXNxWhM646gonUDpqKdAL4Gw9EV9GsUN3jztYUWFTD8O
97DeNxRz8XOgAYkGL5j7bfeVdqBGuvL34H10aMh6ssGiOQOdHUhCBW10cLZ7
PWZSloh41iZa3utmQMY/zdJFh0LkJ61d8+uoA5QqHbPK6Esm4hujTz4ZWvW3
uL1tNgdTiKHWK+IWccrQ4/dVUji5GR/sXSySqLKDvnJKJsF/GfVzaT2fZJEh
Sj2h02puDLXuPhf4x5kCwrZfX/71n0bBS7qqs0epoDk27UXe9Bkt+W0TvvyN
CtnXFLGFFjYSlo7Q3eRBgzO9bzKa+tuQsEJNROUxOiyfas/83pOMqFjZ4KYL
DtAcWdjqlZpCPH765Y72OEW4lCGlPCTagpdsNQ/S1SKBq/RCK18+gXV4TPRz
kQEZRIXbB9K4J1Gfc94IbyYFThmYubmf56BG/PVU6x0qFCX2k/yzO9HJcb5j
uQo0WNwekpu3wEaKD1QHnAvoIKYpYKjVFIsq5bz2lTc4QtVbM4JnSQwxyhiF
uyXuAKki+bq7B5txq8VskXvTdiAhn32SdZ7A6kqWGGnnkGDQ2vvo6ygO6m6M
3f0vmAI+UQzPl1QOys1ajjsWSgW5D8F3omM+ooqHSU8S1tBg+6aV+Yu8nWjL
iK/OjQg6tHe8+U/RMR6N+h9hFUYzgHmNdLL/ehHC0t42YtFK0Ken//aVSgsu
YvTze4MPCS695j86qreCBs03vb8STAbLFy2ENcxxNMKpzRF+SoEZ72Mif5jT
aLQv3h57RoWOriAZ/9X5lFELEaw0p0Gi7lVavRQbafn9uKn1lg7nuj4YzSXf
RIYi+r5SrQzIS2gI8OUpQvKCOT47DjgAobJrv3tSMjH19/vDh9l2YORq45Q1
tYIeSVdvy/xKhuLpxdoPbuOIcZGrI8CLAl+y9iexOdMohVf8S9ZZOpy2ubtw
puAmag2zCOQTUoIpN/7zD1fz2FFVSfVL1FW+iml2V7EmsLJvJbJTnciQYquA
JY1MoOOFu82jiykgFOZ6x1mdgxwTivOul1HhsUDHCRXZTmQW+1K/WIcGQbOa
I99K2KgkPtLQqoYOtisSQxdq49G9nWENiywG3GfRG+/9LEIitrpfTLsc4V0A
dxr32hjivD10ZggrgvEI+mLd3Iz/Xe/fOCZCAscjok98KgisQyKbY0JjKDDa
NvlxJJSDdCb6YUsCFRprMeLVU10ou+l9tH8qHYJP0VLtU/5/zyHu+SqTAcFm
BbuathajohJbyQB+ZejSfjKkPduMK0/Fv/bOIkNGmBb58b8xdBosllOaKACv
nG3w0in0t8nge509DR61ejXoqnagDwu//9P5zoBUFd485yv3EV9B7k2zM4rA
jCH8DudtwZ+nUWKP7SQB3cTKqbaMwCJEh93czqSAjpvuT6vVeh9Z9Ow6KkOD
96Ya195zdyKn8yU72L/soHSwtVj5yKo/Tp/q3nyBAkk9X4fOYBy0yOcWTlqi
gvce9pjGChtdKEvPIoXRYVsMUYS0MQH1t93XKvdUgvWq1iw1jRacnV7+Yd1Z
Mkj5hmsSe8ZRY4tEEeUpFUS+rrndNsxGJ8LJH32NaXDpkITJOXM2smfyX2tr
ZkC3n23Hx32r+pYQv17eRYbNagUjj2Ecna3b0R80pggEZ+ru3N0tuF+BvHGx
NQmWhTPjczwIrPAuwfHCAgqsJC4nxlmu9iNYa/5WMRW6hn1FpQw7UeyPZK6T
GjTYIakTJ9jIRgIO5XlClXTYXqFNkpOKR/UP6Z+qahkwb+v73kywGG2IDPm0
df1qfkm/MuNXTGAF47M6dyIp0HBC6wbnAgct35ybMUikQ5POa845dixK/z58
OYTJgB6TV47XCcWINKx6dfinEqR2WHFm1rbgUpYab6dTyGDozXt9n+g4sufv
cOhtJIMxb1yBLP84qtxiZ/5iYNUPj0QEstvZiKU5+ORIqSKIlHoeeiLTgqff
2eOxzpAEOS8iP1xOIbDqNV7jw3coUPdWJtjzNAfJpuozB5VosG3bUKLibzZ6
/YPrArOYDueHcy4KysQhndCUlXP/VudzMMuRL47Aqr318FpvKAUkZMUOGLpy
0CnH+vF2XhosXxnMqBLoRHWy1k0vb9DhEc/c0/HKOMQ8NOrUUqQEBmLdui9l
W/DZPz4tS+Fk2NrV6sjvMo6EZ/i41V5SQfgPb9VoGxupWXoIpKopwd2zxany
ui14cN52akAFFbpzV+am+TtRTF5pmelLBgiY2SjpsIrQULxHxbMtJMi0Vf3U
W01gYT+MBlwSKMAVW3ffNZyDjLnvyZWm08HsasJoWUAsOt5pYi+Yw4DEyF9C
//9fwOD2xKuf98jQd0EsvHlsDOV1T/REq8tD4U4ezb02r3AiQzNWfZW/c9xk
aJFrfbH64vd+beb74FiS2ozYtfWYu83Y1TZzIwj9uOOAipgJfijjUU20uhZ8
yzXbZLM+H69ZTCqIVjeB6HFzXf3+bmyUJzdcvdYeLn18UDfsEkpUPtCxyfks
Aw4wPH+SVAqR+wOeO9HqNPAX2hFc9oGNLLlPO55tI8ObhbHJYtVx9D8dqFdq

       "], {{{}, {}, 
         {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl12UAVtUSRuFPaRQsSlTSoFNAQEUlJAUBKelWWtpAkO7uDmkVUEJCuhUJ
UWkwKBsUi7jPeH8M511rZsNXZ59N9uadana8LZFIFEqWSMR1a5JEot/ticQb
YBduqYqqX/lV/HL+TzxRwcQ2/h3hTX43bqWyJE0kznGnuFzqce43cx9y7+G/
8CT1vLnUfHK+Ji8mtvujP34L78GtVVZz33CnudyqGHfF3Efc+/hvPFkZS+zg
B/B9+L24jSqurvKr+Q/4f/AU5S0ndvID+bf5fbitKqEe0/xdb43eCr1/uamq
on/kDj4FX4tPzu3Cg3BfvB93MlOUK8i9grPhb+Uz+p/JE/TyyIvkDvIrej/I
q+UnzP/hupa7xq00t9N1BHef13RdfziugZPiqua+wctwVjxNvxK+E990Tal/
1HUGflC/tr9vBe6B78Jd9X/DG+I9WbvbdTDXz9xGvj/+lO8sPy4X0nsVZ8ff
yWfN5VUluWv667hV+AaerlKqPfwQ/p14/7idKqX+5D/mP+Rv4hkqldrLD+X7
8wdwe5XDv/c9d47Lp0pzf5lbz32Eb+GZqrK5NHwq/qV4bd5jan4fN4wbwH2O
O6icZs/H58flV09yf5vbwK2Om0HNcqliLi2fmq/D3cHtx8PxQHwQd1QPm7vA
fcsVUE9x/5jbyK3Bt6nZXFVzd/F38HW5O7lP8Qg8CB+K35B6xNxF7juuoHqa
+9fcJm4tvl3N4aqZu5u/k6/HpeE+wyPxYHwYdzFTjCvMdcaP4kvy9/qFVBnu
uv4n3Lq4F9UIMy9y1bi5+i/ge3AaXF8/LXcAj8JD8BH8mpniXBGuS9xH+LJ8
Xr+wyuP7eIa/YWYz/zGXVI00V5N7gZunXx3fi9PiBvp3cZ/j0Xgo/gJ3NVOC
K8q9hnPhH+QL+kXUs9xN/S3cepxMjTJTi6vOzdevge+LewG/rH83dxCPwcPw
UdzNzBPc41xXnBv/KF/UL6qe427pb+U2xJ6gRpupzdXgFui/iNPhu3FD/Xu4
Q3gsHo6/xN3NlOSKcd1wHvyTfCn2UFU28f9Nbhu3EadQY/BL1rzIvatdE6fH
9+BG+vdyh/E4PAJ/hXuYKcUV57rjvPhn+XLsrapc/PS57dwmnFKNxXWsqckt
1K+FM+B7cT7faWMz9/FHuPHcSPw17mmuNFeC64Hz4V9iv9MvrsrHc4TbwX2C
U6lxuK41tbhF+rVxxtj/cBP9dNwXeAIehY/hXmaejP2T64nz41/lH/VLqApc
Em4ntxmnVuNxPWtqc4v1X8KZcDrcVD89dxRPxKPxcdzbzFNcSa4XLoB/k3/S
f0I9H18Rt4vbEnuFmoDrW/MSt0S/Dr4fp8fN9DNwX+JJeAw+gV838zRXiuuN
C+Ir8s+x16qK8fzidnNbYw9RE3EDa+pwS/Xr4sw4A26un5H7Ck/GY/FJ/IaZ
Mlxp7vW4h3yXhbir+BczpVQlPjm3h9sW+4uahF+2ri63TL8efgBnxC30M3Ff
4yl4HD4V/5YqbO537tfYw1VlLgW3l9see4paztXnHrQ+E9+Su587hqfi8fg0
flMVMfdHPMNi/1ZV4pnD7eN2xL6hJuOG1taL84d+A/wQvh+30s/MHcfT8AR8
Jv5uM89wT8ZZBBfF1+Qrsa+rqvGs4vZzO2PfUFNwI2vqx7lE/2WcBWfGrfUf
4E7g6XgiPovfMvMs91ScWfDj+E/5auz3qhqXmvuU2xX7hvog9iDfU0M+q7UP
6LXhH+RP4hl4Ej6H3459W91h9jN+d+wJcQbgHlKnzM/kJ3Pf4L6qmNm/uN/j
uaCqc3dyB7g9cZ+rqbixtQ24lfqNcLY4Y+C2+itxT9wNZ9E/Lc+Sp+ht0huA
v+X7yM/JT+udlhfG+ZMvLv/N/RPfb5wDXCfG7yGeH3gx7hjPUPxq3Od4Dc6B
a1ifBn/O/xm/LfO7XEfGva2fDk/DTXAy/HI8s/HyOONa21jOLj/EfynPjDOa
NavkXnJ3Pqu5M/Jseared/FZ65flysRZB5fA/8jX4swhT9J7Vl4id5Lb6b1o
Li0+KO/T2y2Pir1Bni43lRvGGUB+L87Q5pvIOeRb8fvS+8p1Vrze+Cys+xD3
jmcN7hG/WbwRP4qzWT+Hm2buE35gPCv47+O7T/r//weU45LE52zuDLcI99d/
Qv43PtN45qmluLNee66m/l34kLw/9jT1EdeUyxlnU74dl507i+fi6Xiz/iB8
nu8nl4/PSO+svFgewJeUr3P/xu/SmoOuk+P+9RrL4mW4S5x/cIfYi/FanBPX
sv5ufJj/K+4j83tcR8dnrJ8Rz8DNcHLcKM5E+H282tpm8sNyNv5reXa833hv
8utyz7hX5U3x2zN/znUeN8PMBfyOXgXuOW4gLoVvyH/Hc1bV5u7hjnCfxb6p
ZuLm1jTm1ug3x4/g7LiD/mr8Bu6Fc+p/I8+XZ+pt0RuML/L95eflsnqDcGl8
M+4pc4fkKXrlY7+VX5M7xvNFXhfPKvP3yl9wB8zslcfEZy7PklvIKXxeTfTP
4w/iM8JrrWuBH02S+O8/WDn0j+E5OAuO/2y+KfeO573rw8YWyLP4reaGxJnC
3CV+AK6Iy+kPxk/iW/L1+B2aP+w6NfZX8xVwJ7065u7jj8ZnHHsAv891bDwH
zWXGs3FLXBCnVE3NXuBWcOusbyk/Jt+ml1PvOJ6LO1m7Rn5Lfj32R3mz/Ig1
37q+y802s40fii/zA+VK8TnrDcFPJU389x/d63FWUHVhOu5L/YPxjFAfc624
XPH58J25R7nv8EI8B/+AB5mpzFXghuKn8W34RpwPVD0uPfeV/qF4Pqg5uJWZ
Ztx6/dY4d7wH3EV/Le6D38CP6X8vL5Ln6m3XG4Z/5AfLVeTn9c7JS+RhfBn5
9ngN8Vuz5ojrtHhG+Swr4fdwV5wGd44zBv443ieuH2cG7rC5/fy4OE/wD+G5
uDVOhZubuYhX4g3WtJHzxP7Gn5Dnya9Zs05+W36Tz2XuvLxYnqf3Ex4eZwGV
wdwx/gifRW3k2nJ5zT/Gd+VycxfwEjwf/4yHmKnKFfCaKvIjuGe4JLE3m/lC
ni5Xlt+Xu8lpzXaJ8w9eH597PH/iPGsmq5rHt+FT8y3MXcKr4t7Hm8y9gvPh
23Eu/ZN4fjxn43cj95Xf4v+Qt8h5rLnoupRbYOYXPFI9q5807lG+Ct9QzMgd
x0dxtng+cK9y+c3l5rtzeblLeBl+F/+KR6nnzCWLe4avyjfiMnEn4hka+76a
j9uaaclt1m+HC8RrxD3083GX8XK8EP+GR6uy5pLHe+ar8Y25+7mT8ezDOWLf
4/KrH8y9xy/iruCh5qpxlbgxuBxOEc83/IKZJlxm7hTO7zP9msupFnCvmGvF
bzXTHhfEeXFP/QLcj/h9vBhfxcPMvBDfNzcWl8cpcVJc3UxT7gHudOyJ+GH1
Ln7VTGtum36HeAbjfPiUvCD2eXPr5X5yH76guZ/kD+Qlejv0huPf+equVfil
ruNwDf1mcb51fUS149vof+i6ne9obWE5P9dbfwN+B7+NC+n/LK+Iv0/vDzw+
nkfqQXNn4n6LvSleA1dY/WJ+Jb+Mu4YnqApmU/HJ4rwT51fcPe5R3CLOofhs
/Jb1PpXHx30nL5Tby231LssfyTvNF4l7Ln5/sQ+b6ysX4f8HNsePFA==
           "]]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
          PointBox[{1319, 1320, 1321, 1322, 1323, 1324, 1325, 1326, 1327, 
           1328}]}, {}, {}}}], GraphicsComplexBox[CompressedData["
1:eJwlmXc4l18YxhGiVLKVJJSR7L3Ow9cXEQlllBIZoYwoRMieWSEJpX5GREJG
hERKCBkZRfb6GiEyfu/LP1yf63K5zrnP89z3c857zMJR34qCjIxMGPuB/+Z+
sJGRylmj/OLyK41BzwCkVblbd9RmC/1XgTx7CqLR133StJRm9KBNMzN0+2MG
Un1ArM48ywbf549Z7mIuQVYia/vE9nFB+8Pnn45t1SMdAat5Fg1eeHw1lqSd
24kKO7zdGmX5Ya5x01CWcwgpMAjmU/oIgTCnjS1b2Tiy+Rf75IWxKAifH203
qptGjvVjEvk64lBEw3ZvNn0WhZlSH99wkIQy4tXdJd4kZNlw11rMVhrOjTnr
TH8loZrd7OfsTWRBk8rbI3+ahMQO+iZMuMrDxLO1i2KrJGS+qCSk66AINN9U
Apw2SOhp6keOlUhlqApO8zqyRUJvouR72/QBTA+X6RRg7FqupPfkjAoIq3eS
BjF+//nFQuhFVfiToRe9hPF1DbnK68YE2HrykWMd45QssWJ7OzUo8mrP3sQ4
ZrHSz+kOEUZ6g0O3MB7Ncbtt66IOYz6P2nGuU49Nun9fA/hV35NwJj/7Y+iB
rybwLjeu4kymUkKe7nEahoxiNnAOYV3RaQvWgm5/zi2cnUwta1f8tSGFIXub
B/0kr6GHZ2CRfnObmeIe/Qh9qgMsp49gpzuH/qMX9Gh4rAu9wLHNNS5HiXwv
z8Kzpf3bnMqVzqFkqAcaLIzbXOm1RmbbqgcciGGbj2nvXucxOgeSvLu3uahF
ILyn4xysiFJtc0T9piiXmT705lFuc9ytCTvzPn0Yfkq+zV7MnAe4TQyA5TLZ
NmcLUH12/WUADQY7TP2HnL3msiGcqdjhTNHX91LHDOFU1Q4LWOTobtw4D4Wy
O9x7uqzw/NR5iNi1w20ZnqfQrQvQ2bO1vf+/b84pci9cAK/kHd4qdSkOumkE
9ud3WFtUnei1ZATTRjvcYCZy3f6WMZB57vCrAqeVrS1jeBm7w59jep3HbbBz
eKUt7j8RjLg23qZsSNPAadpnD6cDHqGQ5srh8xeYIOVkSSEpLw9Rr3DMUkpx
QPwdolYDczUyyc3f4hHkhl2SXYGmt1sRmY+zxBw6AXGJV8+ePtuPbi8aMIxd
FAS4ZYmc80ZQACX/El+SMBCOWA9uHphCU+aVtoIGYvBTp5eF4dcM8qK/I3TB
TAJcTLJFxvhJaJm+hphoJwWXF3lTd+WTUKzN54vN5jKQMVgT0vuLhDwimm4J
2sjBf7sXmYP+kJAmxZXBx04KYPCvq6HtH1ZvjX7Pub2VwL5qIu7eJglRXn5y
vfkRgl4O1zQPbP/xvO+YS1sA6Ft06VowTq51fsrYoQLH7VxOz+L1FkrqWu1R
hcQ5/aerGFO4S5XZDRIgftCydANjluY7h2fn1CBYU0Ia11Oxhd1r+g8RPDpP
luL8/a9/sNuaOmToHhnBeUirRCmUXBNojs4tbfeDpuYC64Ym2ClyruOsltvJ
V0amBe/3hW7ivC57imaEShsmlm5tnxf/rHbcY7ozcPVT+zZ77rFJu3ZYBxhm
6bfrpf/bYHYWpy7YOx/bqeca3it3eM6C+fjBbd6aTrwyzqQHLJd2/v6V7tco
/Vg9eB3ItM2k376bHxnPgZ3+3m22i0z6sPnwHCgF7vQDlzbTwDqbPhgQdpj+
yB+d6hR9oFqj2OaQul1KNYcMoOPrTv3GpsU4fEkxgH75He6O8p9PPmoIJUE7
fCG254tIhiFU9OywbWPe6FfB8yDitMMUna99s3PPwzPWHe5cZnfSErkApjM7
9TtycrSooPACsNbusJf0kLuhqBEI3tjhF66XvMkLjeDy2R2mbZDvuiVpDG9t
dlh+t15BcZkxaIfvcKO8f9m0zU9kaaQtetgyEA3N9F91X9oFGQdVE82i45Hg
7OpyrgkDvI6RoRBVzkK8BDGjC6qHoOA6S2pJUTn6OdMRlHP4GKTzaCZ5PPuC
Thjax/oTjoNW/uf3R6d6ENPwOMFYSwCufvR2npv/jcz3CugnhJ+ChjbvIy2r
E0hAmH/X+HdRUCpIP65zZQbdthcpuP9dHKL66jorp2dRdbGl1OcpSRg0WfGV
eISdPyvPoM+wNDRvBNre6yahI59dhrR+yQL3ZmrO4XkSehdKqqhdkId7gaWd
OWskJDpwxbb0jyKk3f5nSIv1g/49sQ9DjAjuMiwHncP2/9zkrjsxBuDa6mho
DcbBVV3uxtEqIJR5aHoc48lsrZGaZFXQSq/pXsG45IqMwmQKARYfHqTG+8Gk
wnA8N08N+lnoV/G8sB6cuidcQgSnAonnuL4D39Y3b5aog4vPnX6c2zV5p6hq
NeBrk9AizmwfPAkzkStoeFf+tejxcGRGF9t1350OapM4PyrUpqGRV35tm/os
MKQY+/cVVyEaz6EJfMPHCVIK3lQcpz+gdrsw9yeyPGDHJrE73qEddVO8/+V2
4yT8YPmhp68xhrI3TiSVPRcBunGX6ZMbUygvTr/ZoVUMeGjjZwW0ZpF/cVWW
wIgEyHit37tmTEJCDpwXrk1IQWWNLqtmNQnlvHXu5OiXgeMnDmXcGcP6W/cE
1Z5ZOfjiMzXOv0JCHZ7N1G6zCjBP+7KmfJ2EWt9k/IqgUgbxTDn/bkzvH6mU
NP0HAAiB7feTsP0GkNYLBferwM8Y4YwejHPr935uZlWFX1QONgsYK9vGfxZj
J0BPHQ31P4zPRkvITB1XgwKGDsD17fiVrCsiSQQfn3/XcP0OVmp45Eiog/PH
zgacm47upfdS1gD96j1TOC+c0YymU9GExWDGvzh/imjTXLJpQc5PtiL+lQQg
tVGnuuIOctAT4biY6huL1jdYfY0vHoR33b7kwSMvkMT1ir1bmuzw5eqBC7Ha
pehZlM3nG/FccL/yYfguxUZUrjyuovORFxi4TjymUO9Glpfe9EXX8ANUkJTt
9/xGzVHZvjpUp0BKA540Xp5An+LNWtUTReHBtWHhc8wzaCFp70JSjDgYlGTc
3vo0i47TSOVZ5kpCH93lEeUIErrp2JJh/J809L9LhYB2EiKNf2TvTZGFQK/0
3XtIJHT7q4xA5xt5OK/UGLmKzUefxnW1/AsU4bqH6GoNNh95Rv0jTbcqw1ao
uIQctn+hPz8E6FwA2FtnnMswvvcubNjzpgpwKP3JGsHYUP7v1PG7qlAwH16/
jHG0gex6ticBSiZPP8LnozWxD7p0EWoQuUDfgZ+H16Shb0sCERiNahNxfS2U
y8rt49WhNLClG+dNomTVXPoi5kuvF/8rD0VVlMflq432wFuWH9Yvb6egkqq0
izmGzBBB5qvFbluAVlpj5S4JH4FY2fyN8rQalLD3yDvz19wgM/vmw8uxb4jv
bqjHq2FBkNydwUzvM4pY/DLrnThFwChttDQifAqdWQt+/CVGDCIaxZ+9Y51F
ZL+TJ9FTCVh8diCOXhWb56pIXzeypUAl5fwNvlISSj3A+WgpVQaK5ZHTxWES
yrzhoZicIweLoX9MZ5ZIKKqKxTUkXwE+U6x26WD1bVsVW2tUowRdilEBr7D6
7tNpV6zrQ7D0pIMhDNsvXdila/OzANN5KKcD44y6Kqn5JRW4Gqlxdw7j7L8q
3x6uqoLVRMnlNTzfAiT/5uxSg/oXSuS4nm5GtMVRDEQo3eA5i+t3or7AU5tJ
Ha6a+1TjrBfR8MWdQwNuH1cYxzkxUdeGFDmGyJnrjOfdgpDfktaWPAs1DDPH
XuEeSUAmA703yI0ZQdZH3DmgIwcxH8l8lqdwGN6eDn+VaVCJFoKzeH4eFIa7
d8htBcMmUVjDglQokxjUvJD88+7ZDFpVMrjpwC4B34yz38TTkdBFy9hK0ZNS
0PVepabyOQkFvb/NmcktA+2etVVTfdg89vLoy3IeOXBJZ+KcWcDmB/VM3Xwx
BUgZfvBNA5tPktqdgmZkleD5SbIODUy/kzdtErovIKjTRIPW2H443h9uuFeA
+QWtTtEnvP6qefdJF6pAxOX+himMfdifDJiVq8J8KtWXvxj32Ut7Cr4nQIfs
YSvcj0vVRv10WtRg4MtTdlyfc933vSO/E6Gcr+8VzqZWQHDpVgfGGzGDOGM7
/TTh+Q9lfFw0CXONQuuMW67ER/th4rOJvWTpU8SUZnna4BwrNPlbZw7vKkKc
Su2SfsyiQPlARlfDahrtP3WEfP8BcZCm+xvx4c4sog4ZsmYUkATT778lRByw
fmTXGfjMLw2KM6Srfg14fnxkVDssCx77UvcrTJLQLtH2rx5i8nBJi3y38l8S
OiQT9OjqKUVQNdk4dRjrX9nsos2a08qw7ligsYHpVZ+QNm8kBiB1IEf4BT4v
GT4hv3YKyytj4T0DeD59Mr6cK6cKS+ulLH9wv+wa/fBVlgAX2aiScT+9nSJ+
+6SmGgS5prrj9SZuJzTecp4IaR+13bfnrzcDd2gN1CGbSrwZZ803uoY+5hog
ezRiBud6UWcbatv3SGDhdaREWABytSh3M6wjA/7ug227YmLQMFWmmnAfPVxM
IFWXNT9H8l5k1gZNbPC5pOjDScG3iPKnqEOLHhe07v9FuM72CVEW/ccuHsQL
4VWbiSl3ulBYEpvAKW9+8Amuym+JH0IBrROsArVC4LVEFCbum0Bsmn+ll++I
wrMrclIVM9OoIH+V4bmjOLwNmdYPKZ5Fxq+PXC+IkISUs39aRQKxfn18nIoY
LA1+vG58X1tJyNjdUYrnrizUXk1yGZ3B/I7U+/NKvDz4L9H5JGH+yXRTvcI2
ShHkCxwSkjH9oxLMqV3ylYFep/rLSfy+VhN239ECoDfeYVcxxh4K1w5FmKnA
RAB/32+MwyjOkozsVeHwUVFR3D+9vpb2hV4ngKX8UTPcP7VvrJEr3lWDcL7M
97j+1I605FzBRChRGojG9X3umshm568O+mrqnTi77I6565Izj3j23xb2qg9B
JN+bU5c1aOEFmdtXpsVklFYvzOX7nQn+Sq2HJ0jlo83fXXEFrzkgNnfEbaKz
Gv29OGpWe4MbcqPTNv2EviHdt7MftdKx+wmxpuUy6yj6WjtmdqZXGDz6JzJp
z06hlDxuirsuYjBZKVj/cH0GVa2G7NX2kYC03gNZvVLYfdemO1QrTAqUhGe/
vH2D9bOC69qgjwwMNOq+yhoiIfoNbuOhEDkocZwNRZh/2v8qF2SIVoAPJxpE
GDD/LCKESSilKYH0hL1RIlbPc+dlDU5XILjvVXfkPu5vRnSVhj8BbBZ4579h
nEpIsqcYUQHivWJ7Ej5PVSd1NEyowsT4HwrcP5k3i7rDFghgkkE/gPd/fSzY
VpEToVmVlYDr91rL6t9jSnWg4XJ7h/O9QzRDC+m/EbGcyf7Yr0BU6Bxf0ENF
BdZzMRN1rx8i1VE78a5uBhB+t6qg55eNOESn18nfH4Lh02wRqhsVKLtxvLy8
+RRkxAxG6hEm0Q/PyBTZJVEIW81ya/GbQaWGKg/urIiDVMW77qMbsyiK7q6H
914p+BlCf5MnjYR8p5p84nbJQG/Yi9yPPzA95BvrKSjkoLA2ZHIv5pc/bbSp
5BgUIJU4W/oPm1+HjW1X2liUQMo8KUUA00v5dlOumRSCxHtMkZew/ZhHfDk6
lA7geHRV/iPGEWhTVeOpCkRX0VhPYlw0uDj4IEcVhjfSzuN+2ThSYrrnFQH0
lYRlcL1ofI9IeVepAf3uH7S4Pn2XZDb7P2Lz61x19nY9knMG2QesInUW2cYM
7kgkFK15YjhkH8joErok6tPR+n8L+wTaWGDPuBlFLd0btFAxSjYwJgI9/Vc6
LcSn0eVfb20qSVg9Gfg2hl2dRXWprcGcuyVBuZj9ToIFNk/USiWz0kpDqUss
BVkdCRWEH3YTXZeBRAf51t/jJOTw3mui5oA8VLsI/H2LzZsrxoJ6U/sUwfIQ
m+M0Vk8BwrmOmXzKEBiZ5jeF6dN6qM0rmQvA7X7xvjRs/cCtY9pwRAX4jvWO
9eL1oCEeX8mvCv0G8uqL+P0oXalhi58ANE66+rg/WrC8ubBXRg3k9R6b4f3p
/8Ly8ZYaEVDt+E1cjyDZuL8mBHXgn+T5gnMCLL9ajOxCQ8kSLsVbAYjRjo+R
dYQCGJej1yV841CQCcdmbJUsfGUQszw8R0KPXsa5nGmXh6/zt4cMsfP1sjTq
edKmCF+4NDpHMb+xDkrosVlQhm+pnrVE7P+Pnzj5LcsPwKz47pNKjO8rvX51
3UcFUoh6xmMYH3V5Or4Ypgpel0YN8PtJRs/bw5/DCeDtEPgN95uc5fDHfSlq
ICRwcgzfz7xV+ta9/4jwj08yFV8/F03vpRsv1IFNTaoX5/CALjLHxCVkRVOs
sfoxDKk25TZKfpAAteoAjWgdrP4GWrj0m+TA4pUiil7G9ExxqdxsVoB3nA+W
A7Hz4JB7fM7ltxLcTVKXrsPO4xPx5gm0iaBogT44Bp+/3+XujdoEUB1jl+/C
OIs4svWTWhVkWuw95vH3OtGpr5a0BLDTWyzC+1txTxHrFyY1uNrGzo2vn5ej
jfwKDxEa7O1M8fWmqKyvrvGoQ0CiVh3OBUwPp6c8p9B07kjZME8wqnF/9Zzf
Nh9lRTgG1NwLQBFcV5p5FMlAf+/qc5qjMag7dPbEoxR6oBr6L8pJ8zmqouKJ
24hkg65nEUrYDRdJBjMrkYlwwaZr2EuvsAaUNRsY+NyaFyanzCiiDnahVGnt
s/9M+SEnScA23WQImc+H/k5IF4KniZ9C/H+Po+qnxEkdW1EY1hQ9oNYzjegr
nDKyL4tD6Omq5+YvZ9E8FUNDp5cksK8Lpfv6Yef/ulWq4o40MIaIs1m0YPMk
qBE07GThzTfR2zpYXqmSCVc8D5CHlcslxVZYXpWL1t666K0I9nxao4FY/SQd
iospSlUGHZFjtbyYHgxZQ8JPTQEyFWtfF2K8vKZXzHReBYw+H5wcwvvbem3O
yVIVMtfcB/H3UJc9q02r5gSodvRSwuvnz56E3nYXNfgmPl2E63/mtaWKpg8R
+s6rROJ6C9kiU4n8OSTcfvwg2/kQRIMY1YTf08AF6Y0PFnLJKF7rNsXUQyYg
l3uX6+T4Ct2/sVZteosD3q7NW1q5VSN+yi/Ci9rccF3Q0LyptRVZnD82zXZP
EFp1XxXmDY2grN/BAuVlwlDxLnXuu8gUUtvtVNxmIQbFFcpWvrMz6AgVWYre
TQk4qfVol6cICZm9axpz8pSCewN+AdavSejhuaMnjZ1kgOZLsM/HQSy/6las
qN3lILmMdHb4DzYPztNRG/kqwIyBwMoCNp+aUlNPi0QpQbyJjmA4Vr9rPXYD
4TkIbmTpzHnj90mla9eDugAEREwCWvF5dVcgdXgf5i+Um334+9kqr1rnr0FV
eBoz0oa/n9EpLH1amyDAGn/kF9xvb4r2qVxYVYMqxRpFXL/liPcKdetEsL1k
XI7zfO+1NNecQaR5rH3DPTUQfRaRo832poTjKC13gPMhkrYrZFJ9xABiFxpV
PvVnofSy/YK5voeAMVisXMOoAgVMhgTx552CxynzrCOck+h+x4+z0SOiUJlz
/UuN0wxiNS896j0qDtoZzoR9S7OI76pjV8Y/SfCQtLwjnUJC3uTuBbR/pEHl
RZ7efz3Y/ESR2nFiXhaoApsqHs6TULP7k1/eFArgoxg50o75V9jh4fyPVErw
RFC2kh3TS3NtUyadF4GCOO0xI/z98BZPE+MjgPL01OsfMN6zNdnfkqQCibNi
uRMYtxDTfmc9U4VvGvxseD5Vc69oeb4gwP0+2qO4XgVHyvYzl6gBqTGBHNfn
WFqMMnUVEe49osnE+bJF0zWh0L9or1Wu1Yv7EUhNd+beG7J9MBo5acCsn47m
BOXn4mJZINVdg9XsYSFq7gtq0q4Xga98E88Y2KYRtTzVYeZfYqAtwCFIdmEW
8eZosPEuS0C5pr5IjBkJxbEK/lValYLoosyDJ2tJKO9p/Yv/pmVAODXIXhTL
J67gcysjm3LA3yCV7Izl0+h1r5OimwpQ8fz733bMDwXn+fiTWZSBq/KH4BCm
z/dL9rUKbAB3WOa/P8bfR2leUK8yq4Cc3lzjD4yFdx8VUedShVLiy278PYSX
cuIT2zEC1N6tEcLzydhgUf2usBpI8dw6i/ejEGHLNVGRCKoGVHa4Ht4f8gVW
0tvRozUp07muACTE32Q/eokCRm02Bsw3Y5H8sfm9b/NkoUvy+GQ8iYRC3o3o
xHyQBw7Oqgk+7Dy5T7THRNcowtOP68UdmJ847Wm8ljOoDJM3FuMRPt/u8/f+
4QHQXfD9QQXGZBtPTi/cVgGNJZGAUfx9sfPMJJ2/KuwSPbcfz6Nklr975f2x
fI0fLMb9RD+ez801Xg0KL9b34+uXzlpDmalESAihfbz9HjwS+FMk5Q/6JOc5
cF0pDD3t4jGVL5SAXZYtzqMaWP+9eC58u0IODm0aHwUsf9Lz6pII7xWg1ZH5
vB2md+0/lj1WbUrwIME6vAzTu60x/TU2loHlRlBfJPb/7TIoS98vA1RIn1r5
jt+vqdqSbTdV4NlP53X8fh4Vn9DiRU4AUUHfMDx/xDX+7Fagw/QeXziIr7ep
7Ebv8iEiSJAGDPH18nbOZ98ImEBkNTI3SI1BKCGWqLwe2YCuB5okUjwJQHtM
XvI6J46gd00LZf/4glBBpaLknGcv0vlO6uMVDkRvaQSO3rBNQ1pbojZ9dwOQ
2JbFEsvcFoq5dtPFfSwatWkzJDV70cP3AxljYdTPka9WUXbbTTao/D6uecqk
BJ3pDX7BxskF0rarBG+1BrQW7lbRf4EXRNvWVtsGOlFW4DWLodP8UHypgHFR
YQg1k5s2fn0gBMqj59ktm8dRvO70Bw9zUbBtccjva55G1ZBrL3RBHPZJKW2I
/jeLlEXplidcJQF0bzWl+pDQNcUTusuO0jDrvByV1YzVe4awVs9VWdhHG3do
axrLI5ou/gYveajvelKhjeXTPgay1g5XRYj9MKl9F6unlEtCXecTlEH+8PqJ
Y/i89Xg/VfkFAPrXDPdfY1xs2kDRo6cCf9rXb+D5VMjW6ux9RRVY1yTK8Hya
5Wf/+PoSAfz41U7h9fSpx/JT2k3sPltnn4+fT0hSQmOc2BxiPzTrE8cZgphS
reaY79KAXJQq3/2BR9g8nnyL6zYTWJ/xZj+y/xVSKwzvEjHkAN6A1mUTYjUC
Y6XEvQrcQGsa+NkuoxU5PJff2nIQhH1FHZlcn0YQyx+jA/NZwrCniWts8+gU
YitiebBpKgYrZVp3DMdmUFOYwrV2KwmodtfvkBbC5q/RepYAFyno25w9I1NA
QvF9roQ4Wxmg8uIwP4flUSr/kEOSoxysCYbFF2N59G21+JaHuwLcufhhcwjL
o7wxgmZ2oBJ8PeQzHYDV89ZhSt5TzxBESJo33cX2SxCLRmntAO6UNY3495xe
i38GZ7tVgE7uexyeR9Rd7EYz/apw8IpOOZ5HwSbMNYUjBKhI2VeL+6vqVrYw
95Ia6Fj4yeH1/FKR8Z5U/i9Ex2y2tekTiDqjwouj5ShBO6v3N0NXPBIV6gy8
48EAHeZ/vX0is5DFZhr4XT0EN7MqqmOpKtDCmrHDlZRTULR3xMmRbhJd8PMT
eNcvCuYDNq5MtjOofmRxbKtfHJJ8BmFmbha5hl+nfrsoCfeOmda/Tcbm4Yiv
n9SmpWGvgIALI5Y/qtYhvaXjsvA22EPMBMsfop+6bvqaPDCpcAe9x/yqf/0Y
HdpQBKll/+SDmD46ikneKhwI8uN6TAyx/RhYn30m9BDgF3nC3Vq8Xi5fPRkf
rwJ+H+bP4PnTt+J6rThVFao63/zF/UpBhZUg/pQAacVZDLg+AdNB/369VoMK
xksbeH1VxPJ0ROz9i5TpJ20HJCOQXh46+fgdHWiSTBek2NPR5LTZ1UYXFqh9
KL2eb1qIFGcuFN4vFgE+u7uShXum0Y/Rl3+gWwyk1VQecerNog4R/1//zUhA
WHhe55YpCf1S4eU7Ny8FM0/MLinUkFCuEEfV4LAMHKbXLOkYw+aRSYXNO8vY
/bpFJFIHyxszl+OP9Jex+aW3yq0B8z/vNqsAxv3KwHNS/2o/pkf3howVHRMA
y9lekWRs/RLrrX0HGVRAxPiVDJ43M9YPvfZwqEKYk386njdiJVWnjx8hQA1b
ODueNx3OjEhCUA2kv4tr4vsnY/h61VKWCOV2gTZ4vcwF0I2553xDXX0Nyo/q
A5BsMCdbMxsFGEbWv9ysikVMgb0Mp1/IgrWaOY0eljdbdVEVbyrkoTvr5zg9
dn5uuw/O0pYpgvMtN/svmD+4nbHI0e7B1q/zxk4Rr2eyfINFNwDlB/P3yzF+
f4kpscRFBa4c82DF80YjhNue3UcVEhKLJ/H3FmYpNsqFewTgKyvKxP3hhOXS
VYjG7j+kpW58/U+Z+3WjOf+gVAs/nrP/QpGe2RXuymwJ4FBiZiUnYv5O+0CK
5o0ccHw6xsiK5QtryQ1q67cKINJhI34J05e539B6oFEJlodfMBZh+nbtlV/h
HkHgm5HxLxyvjwTRqO4FrN78/p3D82X4mua40JoKsDZavcPzJUXdQS90QxV6
yBtc8XzJs2IiW9ytBj2OObT4+tJDFD7VshBhJWi3/vb3I+n0EOHQcXT42Udb
0bQg5MW8VbqV/gEdaN9dVhgbgOrKTHaJpwyjHzPfG07vCkI8Po/mnQN60DXe
HvZDLIEoTnr40r6otygqzSIm3B/LIwoDB7fE76hXjP7Kv8kAlH8g4sNfzy+o
5TPlN47sAKSxy8HY9dtZoLY4sP39kd+k/aCZqyGM1+18j3zeTfoRLswN31x8
DrHfb0W1L5tdvhG1YfJ31Pb3ROs8yrRwYX2gZdr5XjpJ+SxAGDN4u8qd741K
hmKRwuXq8Exiavt7mLXWjP83ogJM2J7QdMX87tLjwtJwYXGIcnqTdztiFpWu
x2WGC6uCo39RJH5f/x8r4Hwz
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], LineBox[CompressedData["
1:eJwl1WW0VVUYBdBHp9KNwKO7Q5FGuqQb6Q67aBBs6e7u7ka6u5ROQaVDSnTu
wY/Jt9Y5e487zr7nPiJb96jTPUpERETeqBERYW70Tx0y6n/o6c11emZzhB7b
nKZnMt82I80NZlv3rpu9SUIG19ebW11PJ6+Va1NIP2p25JU8nyTuL9Ir0Ev/
xxxKVk7obkdskutyUx5JHBen6+/QTr9h9iEpv+qFOSZ34j95Ab15qg8jGyf1
aGyW63FLHkV7/tD7koxtehGOy53DIbHQ6MMzeTjZOaVHZ4tcnz/l0XTgpt6P
5GzXi3JC7kIUFul9icFWvQF/yWPoSDGyeeaTrnclKotd60dMftUb8rc8lk68
TSy2ud6I2/I4OvMOp1zrRjSW6P3D98t2vTF35PF04ZbenxTs0ItzWg4vT3SW
6gN4Lo8gB6fD98QOuQl35Ql05U99ACnZqb/LGbkHMVimD+SFPJKcnNHzOIO4
5k69KffkiXTjL30gqdill+A3+UNislxPav9iuSLf6C/NUeTiNz0eu+Rm3Jcn
0Z2/w3pSs1svye/yR8RihT6If+XR5OZ3PT675eY8kCfTg9v6INKwRy/FWflj
YrNSH8wreQx5OKu/wR65BQ/lKcT1TDP04uFZ9TvmYNKyVy/NOfkT4rBKT2bP
ErkS3+r/mWPJyzn9TfbKH/BInhrOxp6Z+rvhufW7YS9vsU/P7X4Z87z+KXFZ
rSd3falcme8iXv+gx8n5OK8mYJ/cksfytHBu1szSS4Qz0e+FvaRjv16WC/Jn
xGONnsKeZXIVvg8/U328nJ8LekL2y614Ik8P52nNbL1kOB/9fthLeg7o5bgo
f0581uop7VkuV+WH8Dj6BLkAF/VEHJBb8488I5ynNXP0UuFs9AdhLxk4qJfn
kvwFb7BOT2XPCrkaP+rR9IlyQS7piTkot+GpPDOcpTVz9dLhbPSHYS+RHNLf
47L8JW+yXk9tz0q5Oj/p0fVJcqEor/9fuOxaEg7pbXkmzwrn6d48vUw4H/1R
2E9GDusVuCJ/RQI26GnsWSXX4Gc9hj5ZLsyV8PvksNyO5/LscJ7WzNfLhvPR
H4e9ZOKIXpGr8tckZKOe1p7Vck1+0WPqU+QiXA3vP0fk9ryQ54TztGaBXi6c
j/4k7CUzR/VKXJN7kohN+lv2rJFrMUSPpU+Vi3ItvPt0kF+ac1kolw9nIg8x
s3BMrkwvOTGb5ffNoWYx83p4t8PfFuaF7zA8q5nLZx03q7CFYdwI7yc9qcrw
8B5RLXzPVA/fATXIbn9as2Z4DmqRLnw26alNBrJYV8eMpC4ZqUcm6pOZBuSw
LovZkKw0IhuNw2fRJKwJ96xrauakWXgOmpObFuThg3DfurxmS/LRivy0pgBt
KMj/zKUGig==
           "]]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{549, 550, 551, 552, 553, 554, 555, 556, 557, 
           558}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.,
          
          PlotRange->{{-0.1, 3.1}, {-0.1, 
           3.1}}], {-1.2, -0.8180339887498949}, {
         Left, Bottom}, {0.5, 0.5}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{3.56797010396942*^9, 3.568061405763584*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJwUV3c4Vv8btjNLdkYJ2Xuvc85jvV6v9ZJkJ9lJSERklowkJHtEVvSlUOFY
SSgjDRQlK2REqGT8/P46130943Pf9/N8rutzjrtctHSjoqCgcKWhoPj/V+j2
TnH+0XbU/q1SAMejFewpvcSxC54F2J1PHw9zV61g7VcelYh7/oeNc6UVHalc
wbrk/T3oPFuxEfLikEDpCtadNETc8BjA3qTdCRfIX8F6NGOeL3p8xV7yY+vv
bq1gD7XZr6n8N4FpKtF2tyWuYKufXQsCK79hitqTXyvjV7BrvPSTa4VT2IHo
RQi6voLdu2fmsXLrOyZI3V8xE7aC9d757D/nsYKdijlPceD8CnYzM6MnTeEn
llk8+6jBcwWT9sTslP77iQ3FD9iddV/BAg7cuRpQuYpljCPHy86uYLsGyi0/
C39h9UmCRT9Pr2A8L0L1lm79xp4VpPo76q1gTanC75OY/mCq9wO/VMEK5uTy
xlU6/g92U7hDZANZwUooj944H/sXy6ixqbuovoIpQHv3fOg/jJG8JcAgs4KR
8ANmsx572M+W/qpHHPvxPZcNrp97GKb5jk/18AqWJHimX1ibAiqKvG89ZlnB
Al0aL1t1UkDvQ6n2eLoVTH/Wr7P+PSUczj1tUvV7GZtcGj97ZYMafr9roc0c
XsY+JifWp2jQgP/BHCfbd8tYr5wGQ0U4DZQSAuuYB5axx/7pNaO0tND2piqR
2LWMRW2Q9jS56EB8Su/4obplTHDnae6OKj0wU5xZL09axjjy3X5yXqUHrzhT
Uf+4ZYweY9eXbaUHdbb2FbHoZWwl0veHkyED6N32d3AOXsZaaE5otp1mhNN9
ghybzsuYI3PqcPQVZhiOtmuMkF/GyNWYVE4zMyjNf93ikFzG9M2Wrj2hYIEN
ZdbNdOFlTDqFKDp9kwUYxIwOWnEtY9vse4EGWQdhWIDq3KutJayPRZWBxpEV
Ssm/sgitS9iQMVtmfxgr7AllNS49XcJG4pdFs3JZgfrD6bhrNUvYNG2ZvuwY
Kzj7vlJ3KFrCtne4I23sD0P8zHFdyuglTHL572aVLRsk3/2T04QuYfLSH68H
h7BBgAsUTagsYarejzl0s9hg0jHH+4f0EqY76604PMIGyl+0CLW8S5jtl88X
KG3YYTbn1oHf64vYzX58+pQ1B1xW92qRL1nEkpmzLwkGccBj4YeKaVmLWDop
iOrHXQ7YbPUlDCcvYgVdsoKRHzggaSIZoQ5ZxBpaCuwrrTihIx2nnDJexGYe
RQ3tWnJBnJR8/Y0fPzDd2wZtZeY8wBv79ngS6w8sklRXMeTLA1cOSmktUv7A
WmiF03Zu8cC12CU9sV8LmGYYhfvJNzxQSEdpIPNhAVPyamLaIx4BusLp5YB7
C5iInsJpa11eiDQzcnzKsYC57BZA1FleGPqyfLeaegErfH5QsiqSF5anuZKv
rs1j/PKL25StvOC7Qs+XPzCPcQqU3a/W4oOQ5a38v3HzGN1v/mUaFX4YrJDd
Wfg5h+k/ThyWs+KHMTza0WR8Dou+sNVmd4kfri4eCI/pmcN2p4bTamr5ocPu
WFFA0Rz2ezBVw0FWAAaLvAiW5nPYXCX99SdiRwHtpUhgLf6OucltsSiwCIKU
+Wr8U8lZzORz3AOeo4KgKpZRX3toFlOO40Qo5AThhLcSddj6DEbzVd5ngCwI
Lz5VrUXhM9j9ZI/eC+mCoHs0QsHBdAb7uvT+RiXfcRij/qKT5zqN2Vb9tycs
KQRU47maXYGTmKmE2yqXoQj0Mukf7EkYw7YSLzeNW4tAe/DupS3SGFa+fP16
ibsIhMpxhcgyjWE0daVHFG+IQDXXMk1p4mesEZ3TMX0pAuGMtF/ob33CRK3O
p8bonYBUKwLRJG0Eo4jwV/qJiYIauxiJv+k99uhb1E6DuSg4rd05ahHxHrPX
T30VfmYfu0kjnXrvsQaGJ/ZMEaKQXv1H0qfvHeaTvh4j2iIKJSJ/2lamhrDR
iuD3DtpiYNj2S/fosbfY4/fhl3vUxcFS7rzZ0KPXWPl1V5dJI3E45MbLcET/
NZavamz+z04cFiEvm/ypF0vI5JGQCRcHBd/HLNkMvdg5hydjKe3ikOl8K6vz
UjfGMT2nZ0OSAJaAkua7wS8xxrsD8v72EpChaV52l/8lRkFoEEjwkQDj4Xsy
WR2d2GJZzO+mZAmobpose3i4E3t5/ujDY+/26+vYEMrmDizo10m27/aS8LEj
tfCkThvmU6K5t+cjCYT7Nx4yLLViLqeOL/JckwQlv1rU27YVM3u6/JJUKAm2
1ZtjAuotmNjV+JBH05KwWHXJgIulGTsq7ef+akMSuCZlJ+TimjCOceuTE3RS
8Oo28bQKdRNGgYnIsElIAYVxqccfikZshKp14vIFKVhb75BlYX+G9T950Jd8
TQqcgw9dVsx9inW6JjWW3ZaCWB5lsqTYU6y2yzZ9tFYKFkM77sXoNmAJCeuG
yKYU9BPecwYl12FabJL/0URIAxZCc3UkuBbrp7Tr6bstDRQjVQG7ArWY82r8
VEahNARZ9MyXvazBYgfnuSU6pOHocgYeeKQG60+uiDSllQEW3der2yXVmPO1
0WwuLhlAGuZS0+irsbULDPVfRWXgdery10XfKozb1GvenygDzN9dv3TqPcSc
mSQsMxJlwOf3JS8ulgpsbcvG50yuDLSeij48cL0ci124eUO8WgYO3yoeoaEs
xyp65hob+2VgmSA917lbiq3FlQt/PSwLSeEHdMu4HmCxNOIbYpmyUF3IonCj
pgjjWj99aLVcFsTEr59jMy3CyqfiJBqfy8LkaKfk3R+FWF/Hd0eTz7IQ+Zud
0km2EOOKKuvyOyoHYvKPRgzT87Byv+EJDTk52LCuXzr8IxfTcj7wjwrkgOEh
DZOpQS7mjHnI3T0rB5LEq9dGqXOwih3RzOclchBPoJV8XpaJaS9ZP46ul4OX
eTq0l3gysf6xG2+Mu+RAmYWSTyrpHrbWNEvx5bsc5NLrfXMMy8COIu+Uozjl
oYXeec3xWjrm8S8174GNPLwXyT3TuJOCpZstvghx3scNrAJMBSlYW5HBgqmn
POxSmgeQdFMwHuIf1c1gedima6Ga4L+Ndac7DhLuyYNDFsvnzitJ2Pr3hk3e
AnnQKDITcB1JxAS1WAVWSuVB/WnzFRutROzKtw6vew3yMA3xfnuMCZiErDj1
3Ad5YCcpcN0aiMOso6IkmsflIULo06QAMQ6Lfv/JPGVGHgTLnvQlvLiBfQq9
lau+IQ/RiZWCbR3XsYRXayrxHAog3Pdh5vC3GOyHM+4peVIB4n74MUNqJMZT
x3V7104B0Jvf5z0UIzH9A371Qy4KQERyXIgVEVhutRDV1QAFWLtLGnJCr2Em
W3E5r+8oAPew192BjKvYFdNv7QVZClD/6F7dkc1QrKRQc+5SkQJc/h77csEm
FNsmLCnz1yrsv730PoyIh2DVaZb9PoMK0ABvjn1fCcI+zT5chxEFWAjMj/X1
CsLoNGn5OCcUoIxfimF15jLmNPHUA19RAGf6cq+K74HYQRkByoOHFIExU9BH
hfkSphkZJDbJpQi3e4t1Z3ICMPd3A6YNRxUhepfEwyMbgLWERGc7ySqCcd5J
vSFbf+xi13el/0wVwTNlkmyZfRFrg6rz0taK0JzMU+I54IuxNvkVVzgpwuwI
y+lLDL5YzX9/2UouKgK7PIPQRqIPtpbJtJZ5RxGYLvxSufvKC9NlH5TgylaE
hycjnmke98LSbqWfTbuvCD8yCrL/XPPElKMF3t56oghGriWbTgQPLOi8XE30
B0X4/HzaGajcsK6ZX9/3xhVhg/VbNkeoK8bt/OxY+KwiLHVooEYb57BnVjq3
g38rQkeIfm/shgv2Fznp63NECaK8e3T4+c5ipGfcpfPHlSBuujrpzUNnLFtx
bNxdUgnUjwjT6O/fDk0xN9OzWkrgdN0o6NaYExbGGixt7agEkXIk4fwP9tib
BC3Xd25KUEZnXfbpmD0mQEuRS/ZVgkwG6Z0HvnZYy9+bTMYRSmBreqj/2hFb
jGIqewErUgLCVME7cpE1RnY8I4RXKEGJ/EIdH4s1VjQsbKf5WAlk+4pHCsNO
YbpvqnqUXyjB4JqPZLi7FRZT31IuMaMELttN7SrnLLH3cjETpUtKcOZ0B9Pl
BQtMpNKQR2RTCXh1axs7Ay2wzvzBuKMHlOFo3Y3fOqlkjO7mpDu7hDJQ09/9
azluillTleWnKCjD0Iqj7xMeU6ws7PxHFk1lOHC2Z4bb1gQj+q8b0Bsrw1pr
9XPvORKWYEd3YsdHGV7z3jCsR4gYKs+8OR+oDCc+ZrDqlBtiq7Rsrz6GKcMo
OS/SicsQs6kV8KpJUga9Q5UL/7YNsBP0KtXnqpSBKyJzK2JVDxsZ17xGrlOG
/gtix2yC9LCkJ2CONCvDT+Zu22O7utiak8kq1xtlkHgT9VmTSxdrqz+n0vtD
GdK5WFRn3QELTPSie/pLGaQ875YGUQImdvbicPE/Zdj8qkdc1Mb234NXQ8KZ
VCBGpPo9TSuC2Z9LxeWlVGDg6n9j6X80sYMamckCSipQetYl5rqFJtZxMP8M
o5YKfGm4+iXskQYm3lhBOU1SAen6xQz+QHVsk7Xd4J63CiR8emx1UUoVq5zt
4ooNUIFWPlrv5SIVzLH5zXe/UBU4q/orBudTwTo9RuJJCSqgI4FI7fEoY3da
Vvp2KlRg2rn14B81RUw/fSN/oVYFZLvFWL92KWB/vP5dHH6uAqxq/M7hNgqY
E+cBttoeFVg+SUV9P0Yek/Y5au06rwL1d+9gn1dksAkdETGLVRWYYyIVfFCR
wdK4Jf8gf1Ug7+uCOTlSGtvqUMnmZlCF/E6m82QhKaz7iOmXXnFVyK4+6Z1w
TxwLW7H876m8Krhfj/xzZ1cMk3tpE1mirgp7jz9nmXuJYRl+rkLXiKrwROfu
zh0jUezcq6vuCp6qcPiOCvVTRRHMVVvUbPOiKshQnXzt/VQYc68dVGkKVoU0
FelZJkwY88w5QWsQpwpIZNqB99ZCmO/FgWKbUlWwXGorqi4VxPymQxIFHqnC
oUbD8h0QxPxtRS5N1quCHC3f2wtNx7BAvRBdn5f7/VNGNC20j2Kh3MLfIqZV
AT8QoE+4xIeFJfV16y+qQiFGmx37mhcLp7xSw7CuCrazmtydYrxY5I83EWnU
auDHSbz77QcPdqM16GiZkBpc61g/972AC7upfJzOR1IN3r6sYUrk5MLiK14v
ySuqwf1KhX9XkzmxpDRBvFFHDexWSFf/xHNgqR699v3OatBgYBuLPWDD0scC
9dI81eCkMN+KvBIbdtfimJSNnxqU7bBTD784jGVqBW59i1CDoU2mB3RLrFj+
oaNZG/lqwOYcsvWo8SBWGNsd2ViqBt4GeMaDXRas6G+AZ8QjNdiLr5TiNWTB
SqZeqTG0qME6b63fgRkmrPKp/0f+cTV4YZkQSWPJgFVJ87d8m1aDyqGhuq0G
eqy6qOtB6aIaoIwSVGXH6LGaRL7L8ttqgCzyR3f/o8Mazrxk1+dTB6eeTTI+
RoM9e3/xH72wOsilNUlsONBgz414p/ok1UGY8KdMfYIaa1a6+Pi0pjqQBI5n
5q9QYe0Hjlict1WHmkRRJ0Z5Smy2WJY0elYd3gV1n1/GKTBm0Ncz9FYHqgti
cV1mFJjNlYsqwlfVwYE7SPbf6i66MvfyyOdcdRD46/Kf9ud/KMf1z2xGD9Sh
7W9EqJrQP1Tz+CrT02p1iNlKPEXpu4XesOXfTW1Rh7RNJZ9r7H9Rgd6ASdKE
OvA4iOTmpW6iuu43Pz+bUwdOqjntwu0N1JMq/73oqjqQ4/VVb3pvoHWaPV1U
VBrgXaPHWGKxjho/PPawUVgD1M0+8pmR1lA/Q5UScWkNYBzILWsbXEUzpkh5
Gcoa0CPrmGpjt4pO8gXdDjDQgMJQfPxh0E80JOnNJUkPDaAoULp8u3gJzRef
9Mm8qAFTZVm2WV8W0c7O3250VzRAW7rpTNPRRZR1R8hm8qYGtJz1pmuuXkDL
LoRoZ1dqQLxQD+dV6jn0DcNtFfonGlCdEiw0fu47uvagRDaoSQOybndkunXP
ouiXAUHLNxrgdu5me2DeDPrBTJSWcVkD5rfd8zIDp9CtBa3d4E0NGHlF4tT+
NYkKxln8ntnVAIJP2Q3k8iTq0xo2335IE5IlWegpY76h1PLv+kIUNGHT0lJH
/cZXVPzNXNd3DU1YozOxTa37gpp57rae0tWEhZlhAae5cTS7UOKxwklNoFrq
Uus4M4YqHI7MmA/UBLV738MoE0bRRvph8VdhmiD6NSPL48cIqksh21QSqwkc
P5c+F5JHUKuVz1/PpGtCvAy3g7roMBrUpybx8Ykm8MnSf3r47z2615nc9KRJ
E4oTLSrtQ96jN5tnTO+80IRCVDNVZesdmvUwLcDknSZcVI/lZqd9hzbHrzR1
rGnCg5M8CobIW9QgimBWuKUJGObQKjw0iPZfyZsIp9ICfcv7wzleg+hXD2Na
DTYtcCnQ/2QAAygVoczsPwUtmMj/ov7h5Bs0EdmdSNLQgjWt2I9UJa9RDpVT
l7x1tEC+aqr4yp9e9IQIdeYJCy242F1p/7K6ByVSnfmW46cFmyxyg0WEV+jb
v/WXQq5oweDJ4Pjx+i7UbpWZ7nSkFrybImvdEu9Cz080SrKlaMFjK7c71Dwv
0eQWrsCb/2nBjay3el4CL1Duhgt07k+14DnZZfdsaQdaWN2ZqdeqBZWqXzv0
FTvQ2twAfLdfC05QGgfEWLaj70P76S4va0GYs4U5rXsr6hhwIstyUwtWt2rH
3t5vQWe9wqTkd7UgwOdfmNM0jv62kST/YNGGQDfFRbbLzSiv2o2sszLacEox
PVuu9zlaLDsuhalog/TfP5pNEs9RaVHlFn5EG7L6HKhUbz1DEc7JyWETbeA/
bJRSeOYp6vwLkTbz0QarY90Xv8jVoyxsFIPvA7XBNoK38W5RHdoo33HJPlwb
OkwpTvNy16EcvoQmz2RtuKW6M87L8gTtnjMjxdRog97ba8Hrx2vRywcOLzM8
14YFLstr4v/VoEKi7+6ktGvDuNGSqTtWg4adOz2aN6QNRbbhXx3ePkLlv5zx
fLauDT/rDf+7/OwhOr59nBnb0Qbh3SPhB/cq0QS+6f9e0iKQsHEzPJhUiU7b
eP4e4kIAdXjhzrNSjma+87uxpI5Avn/rPdvzpajBmqJkoA4CAUnbrWffP0DX
WDf6towQ4Cvij8Z0HqAmZiGc9PYI1HN3P5YXLUEpeqJKhMIRyBrhH//Mex+t
/q5HrLiOQIFzx4/owiLUjo5uUS4ZAdb7AxZeEkVonV6CElKAwE7NFFWFfiHq
2ZLacbodAZFA9AaO5KGc41buX3oQaLYnODZdyUU7/nExug0hEH+5ImHzWQ7K
r5FjETCFgLtNfl05MRsdfFI8kUSLws24g58yiu6h4UNusewHUVCobvpzhPoe
KrkqJp7NhQJZdZd20jMDjZWtulgmhkJKovOzTriLqlfU7bYboRCx7Hb44tE0
dOZV0H2iJQpjH7Kdn+enoqmz6oQBOxQed2zP+wiloovC+K2x8yjMW1kU1ivd
QYvyX/L/voXC5J2PMo6byWiug/TwqQwUCu/E2PNKJ6OZvGl36vJRsDy3gu+4
30KTM5zpAv5DgU3NqznqRyIamvxvZXFwP7+++utNyXj0solLpfEoCgcdjvyK
ir2J+jH2uFZ+Q+FRCJKgOhmHut/IGPVYQyGbcoeppPwGanlN4cUkOwaqDmKn
Cs/GoqbameE6/BjwPLzhSDcagxK3dtUKRTDwZY9YOWwVg6JBb6ocVTDI89p0
ZTsVjUr5emSMWGPAy8++8y4qEhWV7ierncGA5eLcWxnOSFRoQZkpwwODaye+
GjGfjkB53KkiT17BILJU+tfl9nCUxinPqz8LA/W++tTpd6HoHh+NiMx9DKLH
yn7/FQ5Ft0a9vyRWYjBWxiAhdyUE/XlK/aRREwbPardkmWSuoGOm77Q7xzDo
N0Jz3F9dRoeZNH8LzWBg07mQfUvtMjrUU1gbtYSBp0Lrh1MPA9FuA19RbBeD
E0cjV9zyLqGf8mnoxw8BCBd3+LeU+6MjO2puzBwAov/av2kp+aMfHM53aPEA
FBMPqdW0+aGDvENh2YIANEK3hB51X0S7MgpWTysArCxw0Qjm+KCdG0NmcSoA
ttLNyr7j59F2K7qqBg0AJLlblvXEebSZ7YI7py5A8vwj3bQXXuiTZM3PQ5YA
7zjtexTVPVCXnIO0jdYAs4eMAvgr3VG28knZIjuAwGMVSf7H3FG/9oToiy4A
DKvUtz6wu6HS658kmAMAyp9946ARPId+pvjv5K/LAMyI6TWuShc0gSUm/FMI
QJm+vMSCqgs6Jyr1tjwKIOCqr1iRzVm0xPbqFYM7ANdqb9F0XD6DnnQ3vy99
FyA/5Z3H8SdOKNUl4TfsWQCjS2ZfFDccUeek18cmCwGy4KT5zg0HlL+V79W1
GoBPYif/ezxmi75+vfLTrQ4gfZSzkk/bFg0decFr+gzg9tvcFPcCG3Rk9bwv
XxvARBspyMv/NJou0sz5bABg+73P3wydU6ieQgpW8A7g4897ZdEtVuga4up1
Y3hfT5+2bztqhZJPM+NWXwFCVs5VxBFPoswJDq6rywCnug948kVYoE0Z8skj
awAe6aZYLrsF6l1M86x1EwDTtFyvqySj3c1VTMm7AESae7/a28zR2JXtx5IH
deBq2ky31IAJqrQ9OHaYTQdCNZmPPxUwQSfpH9D95dSBRYY532A/YxSETO1e
CejA8Aa5FxEiodtWeZSuMjrQ+Hr6rn+dIfrwrL+UsYIOyEfW1ioLGaJ2vgan
FFV04BrN6cjQNAL6LG6pnALRARtyC4dKpAEa2IiQ80x0QG6V6PchQg+tt3tF
NUrez49wDdTY0UU3t8j1HKd0YMu90Z7umi4aouXKm+SoAwaiA1S343XQa80J
06G+OrBrce7XnSQMbXXguNcQoANDJ0JW2p+jKMVOntFakA6kLVsthy4iaDRS
+8grQgeM5GbXx89qo3Etw1dsUnQghlr2wrubGmi301mp9HQdkO6JrbH/oo4y
7i2MD2TqgG731AE7dXU0CdvVNSzSgS5sa1vlryqa0ibCovpYB5w6+9KKKpXR
t86PWv0bdIDixpihpqAyykapHlDdqANC8V9XHbOU0Ls6xsMiL3Sgf8nv5vZd
RTS7w7+I/f3++R5xrmkN8uhnl38nzUd0wPj8rk8kQR7lp75OlzimA9o9t2x7
H8uh+XqZ56lm9vUVb7hlHpJFiztbVFY39vlle+0cYZRCp12Jc9Jb+/zc/73x
PCWJitIOZXvu6gDpxsKtyAcSaLnBzN5XOl2YPp8xInNSHK3qYurt59aFeOof
TJYTJ9Al97thjPy60GgbPRVvegKVPXBMjiCoC90TL5XutoigtYaK6bi4LjBa
f/716aEw2tBt41SloQv/PaKZZ689jv72nGSdQ3Sh2KEjbETzOKrO4PNCWFcX
Rqax9dFXgmijUYR4DkkXfGvpb6Z8PIa29j5Yi7fXBc34FOrwh/zoY55B//Az
uhB3cZ2xaYsPLXHf+ul3Thfmaqb+KJnxoQlU5iunz+uCw/SkdTQlL2ql+efH
iau6MOH/qU3vHjdqeFPo/JEIXci9c+g+Ex03qvnRZIE5Rhe+mvTRuV/hQo8F
FM39StAFH9WzEtc8ONGFCtJMe7YuHFE7e2XZhx0d+x3oWp+vC1Z3Lfh2NtjQ
AYOCqfL7upAx8OrLRhQbWvft17fblbqweaXzrsX9w2jEkbwvjo37fsgqLWpT
saIBHq8cLVp0ITQ8YP+UQ6hr/eqYfocuODr7Ut+MPIiSLAifpXp1oSVMzE79
IAvKEb8y/HdUF27fQxj/2DOidMNHTi+N7/th5H7O7zkD+ldE/+PEN11AJl2K
X/AyoF/aMt+/mteFg196vlfMHUAr/ui8vftXFz5ELa2i/9GiuQQfcvyOLkhv
nFw9LUGLJqdnDIRR6oFjUMDvilIaNFD+R985Bj14VdcjVl5JjaKe6b0KR/TA
xO2W3MZ7SlShocXohIAeDGlwbLK6U6IiNPPdPMf1IIE9Taf+LwXKUIi82hPX
g8MTWeWB4hTo++HZF33qeqCEuO80GOwgXScO67Vr68Fmc4dXSvI28vySVkcd
6MEVn7Tplc//kPxDKW05RD1Q9n0X9y9mC/Ey1MC9bPSAPiKX48yBP8iy+JGX
tQ56UCabzwTuv5EAxr9v/jrrwVzX7/evezaRsL5nY/FeemCnIrHim7+BpJxU
364I1YOoeyU4R9AvhFOFh2btmh6EBrS7U22sIdlcf5g0Y/SAo9ei3TN4DSke
fcrXm6gHOybRDnY3VpGGM2paC7l6IOgi3z96dwXR0uHWUyzSAx6qW/8Fv1pG
2oR+k0If6IE0W6nm2u4S0jPTYMf4SA+00Sura9cWkbHzqqGSrfv5M3G2dq3z
yFlTruiAF3rw5cQTCk7+eWRWdjO+8ZUeZJn6Zd4Ln0NWVuuzSIN6cJWFCfE2
+45QXVF57v1ND7zkfw2ECc8gcbac7Y9n9EDl4VnvR/enEWatje6teT342kdQ
STsxjXDu1o0krOlBgKjA7g+VKUQ8VvlPJbU+DE6nvjoc/g2pduOg+HVAHyzP
mFtwcH1DFA3XD2gx60PXsyGz+toJRJuxjvs1hz4IEatupUx8RcxTlNR+nNAH
Vs230u9YxpH3/uyYkqQ+9BTMn5R1GUNsTv4iXJXVhwYF+fnc558RF64n1kxq
+hDJmllU4PcJCcpVDJIi6kOmNs3xyt/DSG65Qv15b33Y7X6oT7R9h3SPnusu
8NWHjJ/S1mHvh5B1xozP7wL0wUpCWNbXcggxvrBFqX1VH9i+DseSrN8iWwov
zJiT9KGoIEZS908/Inpu4yyk6MOXhbv6O1z9iGW62OXAdH2QyFHVUNDsQyo3
E3PGcvWBZLJhE33rNWLbZDVXVa0Ptz6JUoFrNxK7eOPfRK0+MKufj1QvfoXU
CDw/yNmgD9LIpGjZTBdCHymgEt6iD1rOmmlugS+RZ/qzUaYD+qA7rX5/u6ED
mb7MczfqnT6EfWhlm2PtQFjLSOX1w/ogH13xi/NiO+LB8F+/wIQ+fPB/GCah
3oZw9QfzLf/Uh46X0q+v/21CdPcqZIU29IHqXato5c9GxFd+TMf6rz4MzSho
cf58jnSlgmcLpQFcmWoNLTzwDFl7EXB1jdYA1hQm+WqPPUWObpQkizIagJnp
z7PzWANy+TRDfTKbAQg/HuuuzaxDCm9qdXdwGQCcaT+j+PYJ8ub5hc+bvAZg
V5gf13T4CSLCP0R5RtgAPEvNg7oraxGyKQ1nmpgBUA1IPNGmrkXCrqmKv5Iy
AJ6TDBeyz9Ug7yeyzeSUDeCgd2/cbPAjhIKt7+w59X28NFCNe1Qj0np7gfe0
DeB+/d8HEh5VSMyDczl7+gaAlFrEhqRUIo8+3n2kZGQAJc4LD6QfVyCfDnS3
e5gawEtuQSPlz+WIorf03MApAxgMc+HQ0StDnHKc/lHbGUCj5EVtQnQpkvAm
5aC6kwGkfeCZLeh+gEzKbigXuhsAq5BeC/l8CXLQWYz43tsAnrx4sVj2qhjR
vGNrT3/RAPRdvuWelCpG7vzCo/yCDcAq41dUOf19xHco5azDVQPILOe8yptY
hJjUntMhRhhA7A2DzCX2IkQiRfW4cowBnJSPGT1eXIjQXWSgFIwzgO8P+tGn
6oXItOnYBFPivv/95in2FQVIu/R/bb+TDSBpTuAH43I+ErZgFTmQYQDXpphD
avLyENseMeembAOw75SpKqXPQ1TLt7CyfAPo0PYWOxOZi3DE9R1Lu28Ad006
FkZpcpFVt8K9a6UGwLaussmVkYP061/66l1pAEeUXhpxKecgVcKEVutHBpDO
4Dcz/CUbiac6UqD72ABqg1V77DOyEfdvP67JNhjA6XCejSK7bES/rcWJt9EA
wnm5vCqlspHjBXdQuhYD0DCXO3GZIRvZDXc9utZuABF8rhJU61nImIPa7vhL
AzCNqLts8SMLea7F+KWnxwAqQgUZz61kIRm843h9nwHcZimfVaXIRgL//pdX
9NYADqgbM/UJZCMWI9Hhtz4YgFuFgQyXYTYi+/SUY8ioAYyWnN/b889GmDPE
EbdxA3DUYXVlzM1Guk72b2vPGICT44fpyKVsRHvgSNjiugHUHDfvXL+egxx5
tGg/8scATE54S05V5CCbSa1andsGsNxDLbz2JgepJbn9y6EhAHHz8Wt/1lwk
WUL9cxw9Af6Ed1+dlM9FfOiZmi4xE6Ch1KHlEjkXEe2qCTXmIID8Z4p/v5Ny
EZoHMXZqPAT4N8u6sVCRi3yLsdYU5ifAy7SCqN2XuUiuzvbfLWEC+A6qW8b9
y0UO44YhlUoEWP9g9/aYQx6ynMNrm6FGgG/zZ85wB+Qhb0KX1KO1CDCSPxUh
F5eH3FBP+2OrR4DeH+5X2h/lIa7c7iMGhgQYjHEna7XnITqb6s8UjAnwsXm6
8cNQHrL95Esww8n9/ocdDX1+5SGjqbWnN6wJwCB72suTKh9p8I9V+2ZHAOEf
AwLXWfORdPJp7j4nAhCMXrl2COQj/nKSv5+5EMCbiKCCkvmI9NJAQ4o3AWqz
3vefxfKR2crLQZ4BBHCp+qpCNspHXt6+YTgfSgDr+WnXZIN8pCTwHo93DAF2
hzcYahTzEY7vx6Iq4wjwq7ZDPEM4H4mxLZ9fSCSA7RW2E/X756+9lreUSiGA
rNTMLvNWHuKCPm88n04Ar17NhryvechQjY5wVSYBDluzG3v8X69wb+JiLgGk
+31xr4I8pOau5bp00f58FE1ZHoTkIYL0nx0uPCBAScwjzSPkPCQl9NzL6op9
Pm2pBl1Cecje4g+Z5WoCDCz8lalazUW+vN3e9W0gwCNqi3tCsbmImf51j/8a
CdC4BjxPDHMRvIFlcKWFADr9T4LCDuzPM+dokd8rAsSRhN48v5qDMB8sY6h9
TQCDHwIvZORzkKuRcgGrAwSIvpJ779NENmLnBnoBI/v7YiM0+kU1G+kd7n74
eIwABZUSBNWxLESDZMHxa4IAd+afpHSFZyE8ci4zl+YJUCZt0XKnPhP58Ccm
7vIWAW4OnUoZ+p2B6J9n/lm/S4BNAQkGpqgMpG483WaTyhBAkjUjgzEDSe14
IBHMZAh/rh9ZLD16FyEnvXp9hd8QPhGPxFeR0pA3x5hYw1BDSNnKYrnnehvp
JKRmRkcbQpUOo1BtRBQy497UF3rDEHwoJa/o1UcidHHTVJcSDCGx/4ZJ38cI
hPhK9cK5VEPgm0zzE3gWhrwx/Kyjf98QCueXdhvHg5AlD5pg7VJDcOK4KNIV
dhk5eFOmSrnSEFjmeRVCRAIRcncE14nHhqCbsrb38ZY/8o4o8oO2wxBSq/S+
T6Z4IeuepoK7Lw1BtOhnSbCtB8IRH3Rqs8cQRBbW5B2U3BDrnu7W2beGUBf0
+wkH31kkeH51/csHQ7h/+deptxZOSCYDn+Tw6D5+cH+CJ8UO+WR0If3Vt30/
tine3Ag8ifzzyuhpnTEEM5Ea6WpeMsKf0Lr7dN4QhmbZrWa7jBCn3sNe5auG
8F54cyH4khYSsaCZX7ix7xfiqM6kKo8UMrq+y/xrCG2jTd8uMXMhk6QGJJ6S
CPyXPzvdvCGNU5//GhBFSwRXEQfup9ZquEgifXkIAxGEVgqSHn7FcIOHCuP+
LERwuZX7inVFD3d/bcfmfZgIpe/SbjNXGOJxP2IMXTiJ4NSrcrRHwBgvZ6oO
sztChJv+0ZcIpmZ4j9THWksBIqRONxt25JDxBeO9WdJxIrBmlv04vWyBM/mI
8+udIMIuxcqcovhJXDrJwkJLggg7mtPFFGQr3LQq9IaSDBEOEuL4291O4b5v
ipukFIggLzRiGehljd9efPNTWIUIbgMfCbz2p/Ea5s0T/BpEqDKN+fNY0wZ/
K33MngMhAk3euAdKb4uvmRBTmHWIcBGfSW9+YYuzX/B/SWNAhMVHOREyF+xw
5VvZW9tEIoT674ndobHHT1W/kNswIQIf7eHk7/H2eFDfousSmQh9XoO18jv2
+L0lzuwZKyLcKUDSfJwc8Gcs2MC4DRHcS20Uc6od8FEZT5qPDkQwu3b8dvOC
A75lekej35kIRLHMikFOR1w7eaq4xZMI/ovJ3G9VHPFr/SoH//MjwuSGdlgu
iyNesOykVxZIBJU6HmPfLw5428GbVwquECFb7/6wYp4DPiFbW30vjAjiJaPH
F4wccErzT5O3I4lQ/6FFIn3aHu9uOSUcGEuEgaQH2fUX7fEU2bfnbG4SYcFl
JzJ83g63yTcp0U7an7dN19gPCztc8GD3tGAKcf9/heIRRYUtPheud4I2fT+/
4OF607INXrPU4jZ/bz++9qpGQNgGh7762dqCff/WT8a/P22N0yMKYhnFRBgq
efFAwuYUPlhV5RFaRoQPl0rUThha4c5JxXO6/+3P7+LzpkOrFnik8Z2Fdy1E
ENQZYz+YZIQTm5ilnnXsz68sx2WVyhBnlbp5PreLCM+oXKvEovXxQsaIRdd+
IoxJH3PhVcLwth6f5Y1xIvgNEv+t1IjjFETiGvcOEZp9N8oeIapI99MXitsU
RjDJalNx00ATSRHDLk3QGMFuT3ldszaKCB5QXS9nNoIESAjM2tZFoEt4U4Pf
CE5HJUxLnSIh9KoFqkcFjUBbdp05issEGXzAG0wlYgS5s1aaMQOmiPP1w396
pYxgunnHwjCdjETq7/211zKClXTfUeemkwixLlQTMCMwzoqIag21QlhFNkNF
9IzAVZi5al3lFFJIvfRvkWQEg7uaw3L51ojnJU/tt2ZG8G7hbHaa4WlEfmoq
rN7SCNLv3OaXmj+NtHV82gm3MwL9Q3uOGxy2yE1Fa9TFyQhUZkFAvMAWId9/
e43gsq83OD4n+bgdwsNm2irpbgSkzpER8Vw7ZCKqe++gtxFceC37YfOgPVK+
qge/Luzzu5WY8ifEHvE72xo57L+vh2GFUXbcHlF/q9nedNkINHRs9e+pOyAU
Og2UhSFGYKTUq62c5IDY6X/vHQk3gm6BJ6vcXxyQOkOe9MPRRlBYeQn6RR2R
g8ZGjqQbRjAwyiRx2t0R8TQLFY1JMAKbh1cfPs51RPhPjT1bTzUCP5XJ8G9L
jshbe9TYPccIlohlT+14nZAbLoXjw8VG0D7Ta3NUyAnR9KLyM6oygl9Mpmel
aZ2Q5YuuVE11RnC9SeZt7AtH5H5QV7o0bgQh6z7lYo6OyHbIb0e3diMIohnc
UuZ3RKzDxcXyXxrBmwbG7xxDDkhNpO3Pjz1GcJVJ4MKraw4IY2zC80P9RhBF
deCWiZAD4hrXFE0cMoKJnG5CSbM90pKwaBz10Qgyhs9m95vaI5fumH1Z+2IE
3sA5+szWDulPjyiTmjKCmprTRVFjtoh4Zo2f63cjMJe4+lnFyRYZy2ej/riy
77eS2wNnJxtEv+qj2HMKEkhWvrzdamGN5P93YHWVhgThDqzfp16fQv48Vm+U
ZCDBQW7tml/6p5Cq59kmuYdJsFCimvlByQrhfOXkHyFEAk/hZy33aSyR2W+z
jQb6JDCxGX3dOU1CYIY79hqRBE86bzdcbTBCsueIpk9NSJChQ3+d4QYRMVup
/Cp+igSDPlhfxVEC8nTbl4bZnQS9N7sYd1R0EDaKwj59bxIkrvKKfVzEEB/q
txnhviR4JHObqOmNIIKMShIrQSSYTpK40nVTHbnJ/dt0KI4Egv6denubskh6
d/dURyIJRDpfR/lRSyEFIdkhT26TgJn+rycqKYY0fEYepN8jAT2e4DZx6xjS
kXRI63oOCWCyW7I8hAfpR74NXi7Y1/PdUlci+zAyUxC7bV1GAlaSZJHjzKr2
T7J1quFDElAEh6U/ixhr3qYUF1f/jwRtzBr3rSz3mjlcX5888pQEyjlqfrnm
7LiuONvDz10kCJvZuRM+K4ybjU7Bm14SHEi/166jLIrbJtR/bO4ngYAlE7HC
Qxz3W7Shyv9IAsW9SFuXCGk8LE8yM/nTvp7l6Okn52Txm2bbMhFfSHAvSO7c
ey55vKCmwNZ5lgQptywN0ecKeOVZ/xXyAgmYHsQ1Vgcp4g1setd1lknQ2Skx
uiyqhHe84OBTXCNB3KJ6MWWvEt4fOFsjtEkCa/56ntkzyvinE88I7FskULDK
18idU8ZnPsaPUe+S4G/aOq2Iqwr+M84+YJ3SGNqcKc8efKeCb6vL0M/QGgOt
5MCPMxqqOP3Cbt4HBmPgQ/Iff7unirPnDCp1sRjDcpZvfdqyKn7U5H5Pw2Fj
yARYv4yo4ZI7l86UcRqDuAL7xZuxarjuGe7EmwLGgK8086D/1HDb9sYGrxPG
kPLh/OM6S3X85nXKg9Iq+/nco/XTxep4gxHRbVnfGDY37EJ4rqjjfQ9/pAyY
GINVofCLk0rq+DTL7eYaK2OgDFjdNh9Qw7cvKs7dcTCGH96doiwmajj70Af2
S67GoJyYC4kV+/xiyirOeRqDUEJCWaqJKi6pHIJZ+RjDm6EQUu93FVx1hvRB
388YiG7eEopXVXDdDP7zKoHGcFfHQb+XTgU3M1ymEL1iDHUe5jmpCcq47Z/W
DK4wY+ge1pNNpFPG/ezOdfyOMQbju/L0LN8V8YMFCxPaN43hQHvDSyVUEa+a
8t+LSjIGVvrdUJkkBfy7T6Q2811jOETz9EvUQXk8tvaAvUWWMThlxqTdK5bF
hTaTQzLyjCG3t+XbJU0Z3Ckir0Gw1BhK2F+wGGZK4tsvRD64VRrDjQreiC9O
Eng2fdWvykfG0PC17vaesjiubqrE9vOxMURv2MSH8orhH+40yqs8NYZByf76
Y4dE8YCPOuahTfu45bNTK9sJnJWv50JrqzH0/yT2S5wQwU1KhiuNuo3BU+aM
WOFlIXxhzqkn+Y0xUDzNKDF5chy/KTP7/d2gMUyMkQ7R7gniogEX6I58MAa/
L7q1WTaC+IuGdRGn0f192kwsr484hjv/u6pXPG4Mf2ZUYxW8juK7GLXL3Ddj
kGfgjDe8IIDnxiZEyszux7/WkTIT+XHNnsMFAQvG8HOuxKHzBR8eZCk4tr1m
DOTk/1rlI3nx2s+yR+L+GYPNarnZnYIj+KIrYn2YxgTaGGhLF44ewcWXjdNy
mE0gckDNRecfD+4abDd4gtMERjTrj2UrHMELKLxYagRMAPRWQ/+2HME/xQeT
NEVNQP7bGVbXQl6ci/1GXKesCTgzXw77MsSH151mKWVQMoErVpPsafH8uGVu
eqeZ2n6/5hL7CycF8J8TfFNpWiZQ3kn6ziJ/FL91ophyFNuvX3AhcR47hkt6
Swoe1TeBmo8IMxurIN79qBY9RzQBn647AReyBHEa9barS2QTiDWTcf328jh+
P8wwW/GUCTxzo47J9hTCob3/WbCtCRxlQLs92YXxq6TxDUoXE+Bd21m8HimC
rzlsXeS6ZAJvsEu1CU/E8JSiqGT7YBPgqFTnrL8jjsvO0lcXXt3nn5u7FBQk
gXtf5F6QjDWBQm5HYaqTUvi3KGVX7K4JbNsk1u1ayuGiXAeT/bJMoCrgs9kn
GXncu/L706I8E1iTurNaWSePrw9lM9GUmsBK0I1Nyx4FnF6E8kl3gwmcc21Z
M2BWxmW7+igtR0xAziLt1O9pdTyU0aPAlc8UVuPFPDqKdPDWfOi5e8wUVEzy
in02dHAaJd5fXcKmUEr1OnGOqIvfsu8jSEibgpnxlIb4ii5eWKW0vKRtCh6G
vAcS1fTxV2YUSLCTKQR2aqjuVhNw5qlR93IXU0DrS15f+UvAycFPUkbdTeH8
Pb5gVn1D/FOB+7TWRVOokOtY8PpoiC//fJNIEWkKepW0WPwyEVe6XlqvEGsK
zEJT12oUjPArRyK/utw0hZ/xm/HZl4xwSl0lpZcppmApYTUW/8sI50jL+hRf
ZAp093fOZ02ScAru5Ff2FabgnJv3rtfIGF/Kjq6TqTWFnI55BfJDY/zT0eCi
vWem8Mrpnu4EnQnedf988ts2U/jXaN+u4GCCPxZ1vlrcvV9/fNHrX6UJXlBp
5Xl50BSOju38/rVmgifJGp0yHDEFkgpBbEjJFL/yGNE9MmEK20GhT0wumOKS
HYc2nfdMocOxSi6L2gwff/utovyoGdD81hPuYjbDG0Z7Y0xkzWC7Zu/S04+m
eMq3J44/ETPw7027Gh1kioe5lZM6DMzAQlk5ZFLFFPeaz1VLNzUD9/RK7vF5
E9z6wh0R91Nm8FG5ik0i1QTXXb1+WN3RDPrOLJ8IlzXBZS+H7jK4mYHzGVGW
lBZjnO+v74/PPmaQH84Qy6NrjLNpzX/r9DMDl6/UPw/vkXD68HMj1YFm8JjG
lND3jISvU9i8jAgzg0G09JCbEAlf0B1q8ow0gxOlxQpyQ0b4RKzJY4tYM6AN
6s3JuGaE99HrFAgnmYHtum8pTx8RL2WVDHmVYwbyKyyi85jh/r7b/qEpNAPW
8g+DJr0E/GlTfLBuiRmYt2QJOJEJeLf7/GW8ygw0orKn7cwN8IXm8oAnuBmU
WIudtZLTwwNSR1Z/tpvBT66HFdJVuvg/D3p/2S4zqA7qOlEhpYszs3terOg3
A0b6jtUgRR1cxkvMp+CrGdyWCxu4hqN4A3r6x9iUGXitTzw9MYHgKEecN++c
GdC99PlRfwDBzVpnPe/+3Od7ceOBi5sW7sdZ6pZIaQ7hio9uFNqq438WPkx3
05pDTYHsrP59NTyqjdaVjtEc2qf7Ai+tqOKp591cotjM4ey46x3sngpe1y5y
JljYHG6/G54h8Cnh2vesvtSJmUOhieLYyg1F/KVPrOOalDkwehfPvNhUwD9y
T9tfUDaHpisvi/FJedxpif1zpbo58DsG3nntJI/PdujZzWmbg3vmefpKXA7/
faHY5pyBOZw7O/Lh1AcZPFLv3XChkTl4K7bItS5K4/RHqE9/MTWHpJm24DYm
aZyn0+WUrbU5sLVwNEg5S+KavEKW5h7m8LS/WYzJWQzvWLF4m3TeHC4TyLLZ
taK48csocu9Fc5hX/7lAxSiKO/h9MzO4Yg6/7Ey9qQZE8GmDw/3RYeaA+9EV
eGmJ4Bf4dEzbIs2hue/FBeNHwvi1rkJjrXhzUJTUw4+VCeF0uYO9V26Zw9dD
lDWT0kL4bX8KUsMdc9BhaBJsf3YcL+R3Jipkm8NHaj5n/0lBvOZVK6Hqvjms
PbbUCxAWxNsDjhmIPTSHBqdiEabNo7hySNvY4Sf7/W3FRA5MCeDlEWcDtxv3
+zHPtI2s8+P8N6iYv3eYQ3BaWixJkh9PSSoufttrDnsMC39Eo/nwK1kzQ6Wf
zOGS4nleUjov7lwqRhW2YA6UzscvZRznxXkmTsmz05KBWpmVcvsGL763eO/M
HMc+tg1n3XLlx9X9PB+O85Ah8aG/PxwUwAN+qf8e4ifD4PnDTLQ9Avjs39Fk
XIQM+vflDin5HsMFwys/PRYnQ6xYchePlCBuR3FVtFyaDMbniSo+DwTxfjr+
llRlMuSuBtWXVB7H6RMWGW6qk8Hf/D7ZSlkI12XBT4Vrk0Hv7Z7sUrsQ3sDu
tOShT4bA4Nbui/vv3XzBQn7EigzwxurPaz1RPOJXx6WjNmTw5E51HRsRxZ27
Znr37MlQuJfrwnxBDBfykQrpOEcGcUIaZWyKOE6NmQ0We5Bh5ZLmkfKjEvj0
YX+x6+fJUD0uWlNSIYGXPm34YHiJDH+pDY0mnkjino7bMYxXyfBpc7KsvFIK
l6TWVeyLJoPQ+nzpxXhpfLE8buJ2AhkKNIyPlxnL4I/M+pItU8kgSLu52rYo
gytm2/wYLiKDx4kZynPPZfGGmSlDx1oy+OkpPJrulcWvJEpsHntOBhETMhVX
tCyuqXCxZLKNDHWmVv3vt2Xw7Y91lg+6yfDzuvRSqqoMjodtUXgOkmFAsVuj
Q1Ial58amsh7TwYJ696yplApvMToYdu7ETKkHOFck6iTxL+E3atZ/kSGD99L
GhSJkjh3TUwhwzgZNq5hny0/SuAJXA6R2DcytMVNnAibEMc7jYh+dlNk6H2e
1GztII7vhCk7X54hw3WV2+k/3orhflPM8HCeDOYxQUT6SlHcugbf41ojw52L
CxdKbUTwlKmKFYV1MnTTyArT9grjPVwZX002yeD62LSpBBHGtcN9W6O39uOI
1eBdKSFciHQsYpnKAlJ9JxV7jwviK1ORuy/ZLYC4bsx4/zsPLs59YXmC0wIa
rusv3jrIg7uQbL/847aAk3FJly9rcOMfaxRaFPgt4EyV3yZnDifeHD4Znidi
AZuyltu1SWz4Zk3/hWeiFiCxkXwuZegwLjfd6PhO3AIuvpl1EeM/jN8npSEM
MhbQ9TdbvynwEH6TW38nUMUCXshGjFPoM+IdJPml22oWsCKm9cKfgQH/F84/
XqlhAYExnY19Hw7gvtPrzROIBTjuMQ5Sx9DiVrUPwkwIFsDs+0c8TYYST56+
4+NBtIArH2sU48Qp8Ffc1xyiSRYw1ZFzpu3kbrPmNWvtZ2YWkL5FtfDv2lbz
ceMD28KnLcDeqS1K1OtXs/IHvSFeWwvwZOGgfDy+2kw4E1l+2N4C3sjJrQY7
/Gz2vvTXas/JAt67insn/VxoDttRkdp0toDQRA5hecm55ttxAZRLLhaAusCE
b/BMc13Oj+pP7hZguHYgYcp4ornrhHjsW899v4X/HLJ98Ll55D9Xu25vCxhz
bLe9MPKxeefFOF2DrwUoNdaoD9m9biYsDpy5E2QBkYcmZ2Z6yrRtgphVb16x
AOnRmBoG2SZtbwoj5ojQfbzVcd3ud6f2bY6OZz7XLOCLN8dx9+C32vfzd5PP
RVqANe1H2v4X77XrxLXc7KItoHz4zpv+lWHtEe26w8QbFqCaktFoNjeuvU2W
aVFJsADSY7ka0cfftI+7lXoLJ1vAidT0I1lK09qEkGPch1MtgMuMx0oxdFbb
+1bmi927FtBiYstbGjen/aQ+gf9TngXw1iYpL+780N4eD7tc/8ACHP4cRxhK
lrUJdBf7U6otYFvmRmyf3k/t27JnxXzqLcAioaDh2Oef2vef5e24PN2fd/f1
zbxfP7XrdD+9s31uAX49ERvbdKvaI9YnIw1xC5irtj7We3RVWyjCYFTo5b4+
lRMVOZyr2nUDEomj7y3g+ORyz4raT22hY3EbjuP7/kmey/7XtKx923f6zOSM
BbStM6S8S1/U3sZ1et2XLcBVmJXQxrSg7c1SoPxj0wLuNzy5xav4Xft4fZ+X
zD8L0J2NiQ+rmtEecdjOv7i3z/c/RXWtI9PaBlW2DOsHLMH74Guuq0MT2oLG
HF+2eSxBhDLSO5jyvfbwmi47JmAJlv+aiIF3B7WTs/2JUcctgeaki9Ozs73a
/+b7H9NKWsL7JI5MbqRR+yPi3icq/b+GqzUcyjyOtlOhQrIRYpJNUjKKkvrF
T0U3xPu+8apJUzZRyGVJsmW7oCKXGjMxiWh0mVqXFOZfI5dULkmhJNGjonat
iiLJ+nwuz/lwPpxDocUe36smDwuhIHnk/VpzCruDZwxmtlwFXxszg5OLKRy3
9ptcp3AfNMediFVfQaFqQw/PIegWSbAoJq52FN67dvydRFpG1jx/9yllNYWL
J8pevyqrIt8Pa5k0raWQ8+WBns2hRyTfZA1/hhOFhvtX8jjN9WRsvt5PZygM
z3huqK37lMTf/2lhuI3C0KvKfj+qm0h98AG7vigKs2rDdv3d9oxoGPQ7l0nG
8r4FHQezR6Sy+qXLnQwKHx+03DjB6SGJCKnYVJpJjf03CzY58AHpqE5xu5lD
4ZD/KkaJ3Cf5IYs2X5ZR+Nm1znBgfwWhHgTykwiFO9Z3tAg6S4lSqPu2hLtj
+AEub/7+ElJqYOt1soxCJeXIVl3NYmIUqiY4VjnG5yY0uXgUkc8GMu+IWgql
ItsBe24eORPas0fQRqFZzKXAmO1pRM8xMphup9DK0nhJrEoquagzJcKxg8Li
Vs+25IpkUnDH7LhZF4VtNZbesvYjpEE56MLgRwrXiTW514UHQF3y9WnSMIXl
sRMEc/yzIDUwtvXoyJjektVoUMsGA3udzvBRCkufdSoxuTlg9s6mlz+exm6t
FdP1y3Nho8WfKqZTaNT2OvKYJ74OcZXjV97To7FlofFOu55C0BCdXX1Tn0bF
Lsng9KibIPIz3pDLpdG1MdzZYUoRSNXXeiQY0WjtafLiCfcWVLEngz3n0yg9
skSFP7MYOP9qSD/Z0Fi/b2iVfZAcorS4U408abysX6JXWKKAuvxJW+y20rhh
3RA0dSuA6zKQw99Go472MmPPyWWgiKldLtpB4z8TxMsEi8qAMxjpo7qHRsta
yfdk/zKIbW258zWSxi+9ChVBehmkXEj2r5HQqNFjvVf9iwKumE589EcHjc2f
nOZqet2GRn374YA3ND6I7i25oHwbfkz902x3F41x190O2OXdApev/ac9u2lc
PLt9QePPIugv76Jt+2gsNRdbqqXcBORXvlIex2Bbe7OfoSgfnp8++iltFoNJ
jfzcjnQpcI4ojM7OZrDYfSVxe3wJFoQN0wm/MUi0iiwKOJfg0NbQW4dNGIws
9z8X6ZcNc+Z5H/ydx6COh/o0+bJM2Hdv1URzuzG/KqfsqU1nQKn/F917Xgxi
csHMhZwgMpgnPt0lYJDlaDlzNMLJxwDeBBVvBg1d04cT1aJIw3v+fy67GYwy
WMHc/3CUpL28XdW2j0HZFlXtE2sSiXlFQMhgNIPXquc7ZY2eI+4pL2p42Qy2
px2Ui7tySK5F/qGM9wzKTxt3JdVJienOqy4jAZsx0+cOr7yFhZfrSwo2f9yM
74zbbCjbFGjMjlxoF+qOPwXt8gpZKgwWuoHRZ3ecFMOZd6w3A0aLQ4piAj3w
2vkX9hPDcsb65ugQNeCBKbPmy3yaL0L1Np7f3lAWd0/ud7V6IwFNb1/5+TAW
M4ZtZNISCXj5Zqk17GdxckzNqG2yBL6G/FpgFcVin8H5Ux9RAnPivn0fOcai
lB+vE3kxHaILFPFJqSzuMF2gLwlKg+XKrnlFJSwOZX0I9N8ghhjVE5xuOYtL
Dro+Cl0ghifTyhm9uyzG5m7/0acqBl99q6FD5Sz65zl0uD8RgWiRzqp1NSz2
Hi8/oS0QQf/WjqetbSx6MFMjzopSAXfozlV7zeLF5h7FnL9S4ZQPFWHXyWJ7
nKSO2psKRsGV+jlvWVxp5b40xT4V3GIu7wroZdH6imxW14AQJKc6b1/oY9Ht
emvE5S4hdCfpTW78zKJ8U0Qi95kQotPjbyz9xmLD3Po+0yIh1GZWjfMbYnGG
tb9NpVQIM6Q/qfRhFvslDiv0zglh5zXrS3UjLPIcncPM44VwIy/o2+goi4mG
4T7jo4XwP9/NRkM=
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJwUV3k4VV8XvoQIRcZKJbOSzLOzl3nm3ktCKcmUzBWSMUIqhJCMSSElQ6Ic
IfOUTIn0oxBlnmff/f46z3rWXu9+11rv2nufE7buZHtqAoEgREsg/P/LF7Od
nX6sBiPUZZv9tSJh7+lFj7s6ZaAYXq6GpqQzqMb3zXMRp0IUHH7ue60VQg0S
no50Tp+QUkDa9dtjxqjpQZfusuMXxOk/eEOE+SJqVgqtmHL8D20NvdtNz3BB
LY8GPSccZ1Hy2gv7W3l+KDI5sTlecg5ZELoehDjeRmJOyEq6cA5xec7e5BP0
R157H932yp9HgocEaXwyAtCOlkzVXOYi0r94qk5CLxhxf/bTmH64irT258mx
QSjSx/cajzvuoo9tnd+yvO4hyV3bZc65XaT60kwo8vc99ID3Uge/CgE4g+zP
G5yNQjdsP9w0qyMA2XqeJVL5PtIc96h710MFx9OGpd+yPUS/pocu+y7vAWf3
32+z/GNRX/T9d7GKNBB/r1a3Bo9FLWcUGfICaODA1Le6qN1YVOyZ8PY7LS0E
+vRkit59hEKW9XeVOOmA8e68z3pyHOLdfp+6LUcPqssBP5fGEhB7uv0cx216
yAljOmAp/RjRIzZN8U/0kHlnWCMj5DGaDXb7d1GHAWY5LZ//x5uIqmgElarP
7QN7jIkjzjkJWTPFfbvjywREpkezbadTEPE1OvW0kgnoNw0/LUWlIE3j6cAS
AjP4agkkyk2mILFYXaHRSGZwuWMWyZn3FG2x7d7QerIfdAvpm/Pl0lA7sxwD
jTULEKeHAo5rZ6Iug4PJHf4sIF/d4vbELxP135sRepLKAnj74OaLwkw0SvtS
U/wHCzwLfVJ850gW2trmCrY4zwqFHTY/7Day0MmZ9ZUCy4PgyoEwzr5sJCHW
d9fn1kHY9aFy82Z/juSci9nVnxyE1NZg9hDT50h93FnqW/9BCLHRtXna/RxZ
/hx0pbJgA9PaRQ7GHzkosgMfPWvODjRGZQ40B3JRNFPKdV5vdnD07fxYaJGL
EvS9qf89Zof7jeemDmfnoowGcd7gXnYQr+F4KquUh8qqMs7nm3FAWbGQSZpn
Php7E9K1Q+aEwvb+j3J0r5F6jFb1SxNuMJkmRT91KELB+qV5XW7c4FlWNeSR
VISqaPnjtx9yg4ji3uzCpiKk5E9wMG3jhlPsGuzOYsVI+upHxl3dQ7CS1irV
t1aMBDQkz5mrHwYFvgyf6JxSRLfKM0MjywOatbshh4zKkWbx/W9nzHigiV5P
aDKqHN1x3ai2us4Dr178MDnUXI52fn+Lf1vEAx87FRmTtSvQamec4gXxo6Ab
bPZ1VesDmsinv1sifAxS5Hefa5ytRPZnNpglmXkh8HTiAYJ5NTIcjMjhPsYL
Mxuvxz76VyOZCA5VwhleuPrrpU58djWi+U/C5QuRF06Eu8xHz1ejZ9GOLa4J
vODZ7PrmfnQN+m+6Jzz/yAmYbEM2rK21yLKgcJf/JB9M8/9kkIJ6BBaqSYzK
fKCfwf3xvUM9EqFpFV804IPUCdZazof1aO38uHWtKx+UXtk1M/9ejxIZj1ba
FPFBr49O8CP3BtTtHOWbpsAPGTc43mfENqIPnNwsd/X4wT/5hq1fSSN6Vpvz
0sWKH/QC/fn39DUir8M1fcr+/HD4o3oj2+EmxNKyKjPwiR+oO/Oaf6c1ISNR
+3lOHQGQEjSl6XvUjDbu3/w4ZC4Ah12YBewLmlHuzN27zx0EQKaZiyGioRnR
lL44JBUuAPfPCjX4rTejD9iEmlG9AAzm5zFPWrYgp6w1RvZeAZiTej7Q49GC
OGgY+gZGBYDxUZ+CRkQL8mgWdXaiEYSQ6AHNzOIWJGR2LS5UQxDU14Zmhfe0
op6y2xf0TQUhtSTq9xJHKwo59ECI9YogHI18LyQn0op+/Cz4kH5HEJ4eMRU/
YNCKotTwMPs4QeDO56vMPt+KFJ63G4s9EwTXHUbxF9daUfzVmV8VNYIQ1zHF
OnuvFUHbTkHwV0FIcp0flkpuRTPiB3x0RgRBweij2H85rUh/6QxjL0EIJPka
Vq59akVr5tD7lEUI1CbwIb3WVpRTQcyw5RWCr3szDe73tSJCkKf0HBIC+/yZ
Npl/rejNSMh2mYkQRP6snkhZakXnNeMaAy4JQU6LbqrNdiuif/nskaa7ECQ/
IEyF0bahMoaS84xBQnDnwOgmHXMbsnP5LNgVLQQBT7lFxtnaEOuX7tnkdCGw
mzjfdeJwG6qSHK249EYIDr65dqHieBtySVgKFaoSgsvPaUUKBNrQ4VUa4+l2
ITgd+idxXaQNNVpycJcOCcFndoUDWWJt6Eal4C+/aSEgWJPOPDvThviOyxWo
bQuBwFmzj1uSbagzRNubnlkYFuwZfN9Kt6HAUXP4wiMMEmsKJ3GZNiSm47gv
UUwYsm+8SuSTbUPf83x6LqgIQ8wn4TvDFH84U2Q6v6EwdJ068XmFEi/jnuz0
97ww8Fm1XbeXakO/vuZKFV0TBsZTelViEm0oVqZiy+e2MPAEvW8zPN2GsKTm
Buy+MAzLyTfXi7ahf+vfY2mfCsO41MRQkmAbSr7w16otXxgU2PtlP/O2Ie1P
GwLxH4SBcLZCQPdIG1o6wThr2SIMTyT4ZYU52lBW2JEK3gFhGHgdumyzvw0Z
/zkV+mdSGBK7dZeW6drQlp6K0Zt1Sj65w5/Gd1pRfoEh100GEeiTrhiXXmlF
5w5YjygfEoF9+sd3hqZaUXFPwM1mBREYy31ibdjfinLv2tn+0hMBdhGB3MNt
rShdzsBk00oELl+orDtN0U9UMrfo6QARaLpuKi2c3YqC9XY5tKNFYMDrJxdL
Qivy3hijvpQhAuJ3+U5rhLWiKxdKfsTWiMDF4hLnaNtWZMWc0pzXJQJPS927
84itiFgVXFb7mxJ/9P40B9aKVHiNY5doReGB3dLVP5ytiH10QsNCXxSu+NoF
5Fa3oH2Pv0h4nheF40PahsF5LYigXXY0ykUU3iQsTJc/akFTL0NXP0aLwlHe
t2Bu04Lqrx17dbxbFEgLmx/DVpqR96LpwT/nTwK3x3+X/9A3I5fnSru7Lich
6edk1NpEE7I9e2KKO/AkPGaa4UhoakLG72fq9TNPgkZCUNfN8CYkfPverTej
JyGP6UO4zHYj6qf+NHzT9RTsPyknKPG9ASkfPFlIEyQGSfojvMWX6lAHlVVz
e4wYrG6QLt+Qr0M28/d+J2aKQeHa2p+jB+pQWOckl2itGEwX80xIVH1GHdF5
wUa0pyHp4APjlCOfkQ2jKDnx/mlYKXs1G9Bbg8JoRJaFk8Xhqpbuj/qXVYhz
6dyB+Vxx8GGUfxxkWYVyf0eIfqgQB5bXL8fuMlah9to/1oaD4kDmFq4O9cAR
Z8jLBo9jZ+DYrQz1SKwS5W0LJVc8PwM/Xf+QiqcqkONmXFqOhQQoGY03daW9
QwnGU59v2UjAlPlZ/Nzld6g6S+uvkZMEqK1NThoKvkPcumtyKz4SsKg2dDbq
TSlqSrDu1E6SAA2R29PWDSVIVFxkz0SvBFSayUjkMBYj85AQ0cohCUhuss+0
6CtCd3oGTGLHJIBDdks/OKsIDfg9TFVYloDjv54ZiykWoajGBdl77JIgw515
YsX1LfpngzudNJWE3XHxGOOB14i7lDNmx0oSdAMHYo8Fvkaaez3eddlKQveP
6oxOvtco9TUf9W0vSXDq2Pf5m1sBMtyIeNr6SBJExIT+nmd9hV7HkztcOiXh
0Vi9lF1QLhoYf7UE/ZLQOX3u6YRELqJToj3CMSwJEXu5VdHvl+ji8HtHfFYS
xKrrlS7qv0T7Tx+l2n9ACrxEN+8A3wvk3vBHutBICiINPNe9VrNRNRRcEzOX
Anahf1nrhdmI5aNHdt5FKSi8lx948Wo2elu4fvC5uxScHeEM+vjzGVpIZlxI
fiQFvVfs1WO6s5D3tTNv7/RKQV2fzpHtxgzUMLb4Z3dICpL/XidymGYgLpvy
4wHjUrBiTeP85r90VG6mFuOzKgVfGHhNzLbT0LqqqZvLIWkQLX9KTaefivxZ
fMTMraXBRjxTpFrwCWqLUrbrtpcGhQjlVuHGZHSUlpBKdJOGnPU9p3uvJqOq
9UhGgyBpGE7kZ10sTkKE3yl/UZY0LD/7GttvmohC31Xlio5Jw1K5WZ1Kezzq
ORM6/GJaGr46xX23DolHAvk63AIr0sDfw9jyUC4e1aV3RhzbKwMJU8Rtpudx
iC7ylwObqAzsLSj/J37/EYqyohPcdpEBrjNy3c/2xyBMgmll8oYMvKXi72pK
i0bztAcb+/xloJr/PZOXeDSyKDp69e0DGVj0VqNRMXuIBOllX18pkIEj0J0r
XnQfVb+7ItvyTwauvGu6WFQQiW7cv0r3flEGZnX3766QIpHwZfdv2ZsUvJq5
Or+1CMp78vatAEZZkLiocFZMLwKdvxKHS5ySBbOH+fSta3fRCkuNVpKzLJTF
Ht2qfBiK8scbOMO8ZGHl2BzxqFYosq5s++PhJwud9U6Lwdt3UJ1j/z39KFlw
CD/MqOV5Bz2qmm3fzpOFqkW+v3Z2IUjM5Zi53aQsRMU9C7w5FYiG1QSESfOy
0FcmJ5DtG4jiuU6uqa5T9rv4Iu8GXSDaqJVN4WKQg2sabtJTQgGo6ZDRzxYR
OYDastI4v9voSuNtB0knOajPXYjWcPJFdipCxivucnDOzUV8m9kXORR1yn70
kQObuKiIzVIf5PRUkFYrQg6UT0jmvKPzQW7uX7ItXshBR0S8Rn75TeTHxT8S
NCoHdcaz2Tvk68j/QXuT5pQcHLmy5zs343UUQOX7lmFJDto8O5MV6rxQ8L+2
oPg98vDWfUzIT9ELhX/yPvaSTx7MaqSoss54ojjHlvMdNvJgG72pZhTjhhJ+
3NCId5KHkaOMF+iOuqHHpOOnLDzkodOUp/pygStKVr6xMRIkD9k4s//kFxeU
fuDYk+V0eaC6PEiTI3oN5b/37OMZkofXr791s/M7oQIxnqqRUXkQf8zT7trk
iF5nNeS8mJIHJGo5xOHuiN7eP3JTYkseDs5HZUO1Ayq7VM+meUQBdF++cQn0
tEc1ew+RrlkqwCb3HcsGxitoPFtc//tlBVhs0ymZxm0RE2hq6DgrwEA+6ztj
T1tk4esuy39bASqN1DzzBi+j2Yn6Q4OpCtBQKDCuVmWD2O8OHtTLUQD+xw0S
JbdskNKJecb3rxXgLyNvv6KcDQq35NmJq1KALw9En/+zu4SOtnj90h9WAF/e
eAMbN2uk7hA5WD6hAMwTW/fzly8gJ+r0HqF5BTgwwKP9M/ACKlVqbqCmVoT8
O6SLo4nnkcGr468+8CsCX7lJesoPS3TrQdv1k46K8FedbvNBuTlKF/nlkuyu
CEodK+WHzpujurpVezpfRWDSb8/j2z2LWLb5LH5FKsKBUrZXsQZn0UvXWyop
+YqQGlDNq7FsitoYYmTpSxTBq+Mk9cFsU7SQ81zc+6MibCh13ZEgmyLs5xde
cpsirB/nTdMuJaNeYyHafTOK0BJTv6oZQUIbf5V3fFYUgXlJVmQXIyHeCNLq
2I4iRJrbHRpZJSKXT/6TNQeUIMFq3ysGVyLaI9HdfktSCYq6TaO+NRkjSdbg
xMkbSmB9y++g/14D9IH+m0ijvxJsPXetUMrQR+oE8Y/Pw5RgQ6ptNEJBH5nN
Dv53KUEJzIs8z79310Pe7fKifSVKoHTXPPTrrA7arYv+WPJRCXom9rZcjddB
kZVjRo8+K4E+zZVUOwUd9ORVvJdhtxJovGbYuRaujSrvzX6sXVAC7eqImJNS
WkgrRNs4c0MJyv7zP6MxrIk6fNOGA6iVYSf3YnxijCb6z9GAVvGgMhwXO0D1
Y14DUWu/NC6UVIbbT2T+2depI13qSyNPPZTBxk1950kaoK/r767f8lWGvnh6
DhNrQFbzTHTngpXh/K8b7RtHAV0b/nDyYKwyhM+++ETSRCi6ivNGZKEyXBm+
bE97TRVxlbnSObxXhvKEy9vH11VQ5uu6ZI1PyvArZrNlIVIFFaV64TsdypT3
sWDwi9fKqMevg+7mjDKkLNo8e7BPCVl7CT4hryiDyHsN+cIcRTR+1f+UxI4y
cO5cWDJTV0SrFieJ/5hVgBQMYgeDFdBh+fAnl0+rgJzY07F6Jnlks6gqZuyi
AlKf97K9cZBBzAcJnT03VODHMVH2XRYZ9EGi9vr5ABXY8XBNKKuURuxu2h+d
olXAkJAZhLilUdOEsX7oWxXIo8Ej2P+TRDf3ss4wVFDs+bFTy/GSiE+o+1Fs
jQqsD4SVsOhLIv8r576ndanA4Pt73GMVEkji5yWn8iUVeHFpvGvV+Awa2jrB
hLZVgEn0eLFFqziKOjJaWE+rCmbQT/tLTxyNWjitdnGqgnDo48s6RqdRcrdH
+LSCKuimvc42czmFCM0hz/kCVEGoWTnyBY0Iev1HQzfvripUHXC8n5QhjKzo
6KbORKvCYAR7jaSKMCrViJJWzVCFbouryZp+QsipKq72XI0qmO93V+VmEEQc
Q2YOP5tVIS+NSvPeWwFUu8m5z75LFehNSUdcLQUQj+JTktdvVShNPqruU8iP
Okuyhx/QYhDkejxl8xofCuiyD2Pbj0H/PhLx6jE+dHJeWCSFE4MfGSd/H+06
gcLEC9xfCmNQcqj1uZbqCaSQV7pTo4eB0UmfmuUTvCgrvZ5n9SEGLA89hueA
B6VeEPt2NhED0xPO7vvajqDkw/GPStMxMHwod57e8giKTrSh8yrEoHU9UDbO
9zDyi96cnerEwDLYxJmmnRvdNLTNN/iOQZr45bOODtzIY1+zXf4IBqS6LW8P
Km7kEJ743XEBg0TW41YXVLgQOVDy8y82BBc17rrO1XEgI5XkADUeBEr+Vvr9
zhxId2NHPlMAwXWG6k6ZgxwI824rsJZFcPn7+riUPTs65eaY2G+OwF9mQizp
CBuiuZh2teMJgu/7UeiFeha0e4RG4PQzBOXvZjf+BrGgje/OP+/nI3ijI0y5
S1jQ3FkFU72PCJaUtc/7uhxAP4y6Vep+IJB0kRZ09GBG3xiVVvnGENgWEom3
V5hQV3NmUcg0AvHcD48jA5lQk5abENpBcMzGksU1gRENpNPQDx0AGA298cm7
jwH1b8vbM7EDxHXpRLtfY0C9F67VKnMDMDdq2vJTM6DOw13+KbwAe536r2fK
0KOGxIz5c5IAzptnSsVf06GSaKXBLjJAnu7Ngs/je5Dt0/20H8wBQsPS2jqf
7EEHc3+JZ1kBuGt7Juw13oM8aqLuuNsCzIrZjf1XQY3ElgZEmbwANqMXoirT
qdAgodB08SYAzVo05xMrKhTFHBowcAvA9Lfqd38uKjQhdOprbgjA2u6Fv/oJ
BPTc8rav1iMAF67mg2ekdzFTB5NnYo8Bsu8Uy0V+2MGor/O3sT0BODP7x7ZE
YwezedB6/FcmACfz/NvL57cxnk9HGgPfAiifLzS2zdjEEgQqOcq/AFSKlElF
3ljDNCRjUUY3Jb6ac2iWYw1bULW7Gv4NoIPIVP65fBUjnmPCzf4DSKz8afeU
ehVjirpgNz8D8PWxmG3wi2XsY6JEdP8CgKjF1jmcvIw5Z9OUf1oBkBi4/B4j
LGNNlQWM0TsAVPE8SxsXl7Cw2a3ik/vVYC0l/mvHyUVMeqvzB+tBNXiZTDia
M7yA/aLPoVvnUKOcNwtNT5IoQuUzsmo8qgaRqYXCHfQL2JZZGpXdaTUY2C7R
Wlidw258UCWmGaqBtK97nR7jDPbOqpH6O1ENPi+8HNJ4OI2tbBDfsZ9VA50u
xlJj1mnslrLd4QfWajDSbsJ18/gUFlgZNernpgaN3BkSh03/Yp8usCeVealB
A731i8LRSYywnaa34K0G+xrNbh/0ncTuqBa9uRqkBkMb6YH8zyewiKpvvhax
atCkYIOVsvzBmi5ePpWQoAbfdak9FwrHsX27f4e+JKvB0cgTdI3EcewB2lHX
yaLkL5h/mDtpDIutFmCWK1YDr1Elo4eyo1hKrWcWW48a4FpOn71LR7BB201T
k341MEr4b+WE8wjGs+cu3f0fauDEd/oL3YkRLF0j+Rr1GCWfptORV+OGsey6
Ktn5ZTVQzpzPOkD3HzZqpzshtqEGtRavqidDf2JCtF0pTjtqUFmVGvtnz08s
V2ts9z86dbAea9k8um8IK2hgbOngUoe/svOT18QHsWmHx/77eNQhSC3b1aRy
ABPfe/yMNq86+CQOZbEaDmBFOlIJuIg6FJsM/uDw/I6VNVlcLFBUhwsOD36f
6/yGfWrJWbh3Xh1s05QJCUM9WDF3p2fAJXUQ+cVh03+/B3vusDHncUUdeAmO
wpbKPVgUtcnsuWvqcDItKW83rRszU1r7J3hbHfplz+W6eXZhOpF81w4FqcMC
D7OHgGgXptRn+JcpVB12Ih8eWhn5ih33yppYjFKH8XquLz/Mv2J/8/THalLU
gbbAe07LqBP7sXrD7l26OvAl5Cw4MXdiX7Qyfuc+U4cJy7Gs/WlfsNKRxZGY
fHVoeMhXZfCyAws6lPbT+oM6aAXdUZn82oax35v9tv5dHZ5H0gXuv9WM0X07
dG56SB1Cfj2ZEudoxtYFNPuGR9Rh9rwQc39xE/azOrmncZKS76usr68XGrG8
NbWvj9fVIeOlrUNzaAOWqu1CvLetDqX/dm0fnWrAohMSv/hTacBR/bCp0p56
7IbEv/YrDBrQQK5gWztZj2FOCS2ShzSgL/1M2qfxz5hkWZWe4FENENvpUsaT
P2MCNJNN3Cc0YJA78uZfg88YQ6Zq466IBrid8Sv//K4W6/k2/rldQQN686s9
qJJqsKs6ivhVCw3QJA88IXN/wmZEDtUXXdAAvvzqc04JVZjXvvW2dRsN2GVm
Gis8WIX5t5f/uHdVA4b312oVcOBYrKnCVp6fBqQxN+vekvmIcchy0ywEagAH
89XxkzUfsBTONUalUA1Qq96aaDX5gGV/f3+k5b4GJP2Qkav0qsDKLskr/02l
8Be5lOXd8R5TVuPSkMrSgA8Edq66q++xar5Vfb8cDXhQKyxQQ/ceax4rs9r3
hpJ/atbRfK0y7Mc1Ob+TnzSA5c9ZzKKvFKP2la1wHtEAC16Vb/IqxViEJUdN
8ZgG2Gn60szMFGFMystNG5MasHXd8v7ysyKMY6e0P2pBA7RLUmRH9hdhImEy
a/l7NEH7E3MX879C7LU9O2FxryYkHinJ1LErxKR0lvYqM2nCo7ARm4b/3mAq
+0q5Wtk1QW91refK0GvMJFZa/p+gJth8nLHvm3+F9XiyIemTmnCzvzxl9vYr
zMJ0Ufu2uCYMr+rvzu59hdlylpgzymvCyvtxbx/BfMw7Vcr7lK4m+D/pX7e4
mYul5kq+u+asCQ0r9M6nbXOwpu9XmjLcNIE6VJvtNX0OtrQvcbDbSxMUYqlQ
/tvnmIHrBpXKbU2gjbnTQ037HNuQ/GzM9EAT3BrfLt+oeoYJXVm+DLGawEc7
+FbE4xlGThC+eSNBExLCX54X5H+G5a/cf/ojVRPYyyrk/nuQhVl+NJsoeK0J
6p6fCWlumVjYVPjmcJEmPPcmyA+LZmJvj1bs5yjThDkahgT3tgyMPviobEAV
Jf7YxC22unSsXHM8xOgLJf7b7VaJ1lSMs8PnyMycJvx8wEsvrPgEU9/NE+db
1oSnVKMLjl+SMTeJH2rm65qwvI/+pYdjMtYQB05VVFrwhPw3/H1qEnbzHMO7
6INacG/Vduz0kUQsM1K5qZZTi/Je8x78VPUYa6twHVw5rAU6koNfe688xgR4
uqgu8WuBwzTr4LXiBKxnOMX4jIwWzOYEHje1iccIB9svX1HQgm+WV/u5DsRj
Yhq7N5JUtOBLYGITz6c4LDTnytNdTS3YXjJNLOaLw6ScxSa+nNUC7anmOouV
WOzRIh7i4UOxJx1+Vac9xNy6Yi9fuK0F4/u66QsFH2KGRVfUdIO0ICr3vrxD
4QOMzp2BijdCC65b/Hp9puk+5v/XLPhLohY8uye4I34gCrNsFrb5mKIFxAfL
DvY59zC53A30Ml0LjjMe7LdTvYfN22fuBr7QAoYAie4qr0jMYeRfoHiZFkRL
7Tn930I4pllddfHwBy2Q5pTvt04Kx05kPMLoqrSAxfv9/RzVcOzHBfmdoXot
OJKfxhgbcxcj9d8JeNirBZWqESE1umGYypdD/lNLWmDq+ce0eykEO/Rm6nz/
mhbs/9avXPcmBFt58Em5bksLPny20S+6GoIV6dtvPqXRhn5JmcGgX8GYUMNb
PwN2bViv7Uoa+hSE0eSEWslza4Pb9tGvIRpB2EiouRI/jzaMaSWeO9YciKWq
ba1v8GuDLWG/IQwEYKy4zq18aW04yXO4W5jdH5t5etgyUV4bftS334x+eRtr
85tWuKOsDecC3thPq9zGwhXi1yw1tOEM56pYgqsftlXy04fBVBvOzzy3vDvu
i43n3/R28tKGJTfy7wYpb8z86M7PXG9tiLKIkwwbvInVx4TrTPppg/bG0ZfW
d29iz28kcTuHasOwPTe9/Y8bmC1W8eFagjbMDD3Jqk+6jnW9VeMvSNYGzkj5
k3Z61zE1/pb7U6nacOUv78CxLS+Ml37wgmuONvB+6yucsPPCfn7d2nEr0wZv
0hepDg1PzFjzrmPhB22QqGxZNtrxwPAy5s7ZKm1g/o91eLLCA0t9eizLo5Gy
n2HoSW8ZD8zKHjS8+rWBNX7sdI2rG9a7Fhpxc4MSP06dtD7ijGleY5p7t6MN
TfKupzZvOWOlQwkWK9Q6kBnA/VqWzRmLq80R9WHUgXvjkr5n9a5ixAeNrb48
OmAq5nEa6hyx6h0TmQpeHUjm/XWKwcERO+PZn7ouoAOGDI+5GBkcsf3mk65+
p3Ug9z1eVkF2wNqOM7L4YzoQGXmYvXbJDlOJi/etVNeBhOMJ/uRMO+wVDc/I
lrYOML0y7jpiZIdFTYoVB5jowGJ6uJZl/hVMt8TYLMhGB/5uUBkEXbfF6rTj
ku/c0QG/UKEuH7DBxhw+tvuF60DIIVXewT02GF3EKPX1KB24XvjGPT32Eqbb
KOd6JU4H+kdvN2G5F7E2nUE1zWcUPK2she4/F7BuXYF/tLU6MB7MKSv9whJb
cjLi3amn8OOvYJvSsKTc395nV5op/E1fMq38ssDMm5s+jX/VgXYrB6NtAQts
QM81oXFEB+7udd/3vdwc+6VfpnqPShdKvud71R83w/Zc+88rhFYXDEzoVmK6
TDGB+/S5txh0gZX8Ov5VuCnm0Gp10JlVF0R3h472LZCxvwa74/ondEGade79
6gAJWzDUjWVS04XyA/bpbMUmGJurZz2Nli48vLUhV6Bggsk8TNnY0tWFbD2H
wG/Vxph3+5TdNFEXEnlqDo33GmEbRo8UO2wo9sPQO78PGmJUJgO/YoJ14XCq
Ms+lfl2sqeos/40wXZi8eSWa2k8XixX/esUiUheMvBzoRI/qYrz7m0Z5Y3WB
p3t7766jDgbt78aLMnShT8aL9OWANhZs8Ohvd5UuxPkPy4blaGC6H5lOldfq
gvp6Wb6MtQbGciryWmqDLnzX0y7/xKGBZe4LmrLr0IVah5g0+3vqWHWzy8zy
kC74x7TGzvmpYQRd3QWubV1gV/wmTbcfYU3vP0ttEfTgbmG6zIdkDIsVRteH
afSgof2bA78ghvHulVvKZdIDnCrjEoeGKgYN/CuKPHrgqxPyzCdeGaOXy5A7
xqsHnlu94r2nlLHOnMM+1AJ6oGKZOvWnXgmzucu61nJKDzT3BW6J7SpiwZq7
6+eV9YBX/7GrbLgCplvqpwRID56p+txVEVPAWARW/AQ09GCpv6VjrVsey9wz
vTmlrwdtZmoF8iLyWHXtwHaAlR5km7+uZRiSxQhqZVSZt/Sg42tgQMcNacxK
809Lf4AevNgaFNkQlMZKdbgTWO/owdPvThd0+qUwJ2M/odAoPRjIY72gDVLY
1/OYgcNTij87A+87KomJXXJnz8jQA51Lfvn7+yWwcNvMoW/ZFL7tYced4iUw
pavUHnoFeiD8SeRZELME9sy7IUEM1wPOdUu2O8fEsa1bq9b2NXpwLm6fx76c
05h5gIhwer0edMYcHuo9fRrbFxZVcaBDD9zeW0zIaoth1x8Z/1z4qUf5XyEo
BD06iWkW9AlXEPShTC2HwdNNGEsv3Ds/T6MPPfHIbPKAMLZWrPDhJAPFnmMK
f1MshBVUpBimsupDYCtkHN8SxDgaL3oG8enDxT3MuanpAphHS4xSuRDFX4DE
/PUFsJb26j3zJ/Uh0SYnKXeVHwvs4Uu0ldYHt0kGgYmz/Nj4yPgHLU19+BQg
z0bNx4fBGFdYoK4+7Auk/qrbfwJLmdA1em+oD4r3CN4/Yk5gxrP5/4mc1Qes
+vHNv9QnsPdbbjRMDhT+l/US1eePY5Fcq0ZdEfow/l6ER/sMD5bQ1PS79r4+
XH9rcym8/giWcSvlVkmMPjSmrMZzWh/BygZVcxKS9MFcU/2rUOxhbCwjbMv8
pT5c/qefSkd3CJsjmsfpvNIHW08/54YX3NgWlYiIQqE+rE7Qn+zT5cbY7VpN
D73XB77X6gFjsVyYusjBV4MN+vD2nuiNzxKcmPH339DWog/LqcR26h8cmGXU
u77KDn3YyOrjiovkwDymLKjT+/RhPng3OHOMHct4m2FpM64PXXF12f6FbNiW
wmn6MVoDsBgMaEkJYcXo/+6k9TIYwP4gxexaYMXYnnZKNzAbQMqBEKUCAit2
cvv6pZccBjC3UvK87g4LZlnzoeyqoAE8wUlf2HkPYGV6uvYzmgbAK5xu0p3G
iNVuHNr8qWsAcnvju6xkGLH2V/9ivxgawHx1Rpd92z5slDmm8q2ZAfyrJujT
Ue3D2Lp62a7bGYDW4jCHpz895mF1pXY11ADo+Q7zzXykxfZn/B1WiTSAkEjv
/NkrtFjBb8/dkAcU/hos1uXMtNgfl2AVpscGcGFD9oi9Aw12MSitjPeFAZj7
OOeJHdqDGT7/lq/XZABW8bsVVtcJmMiMQfxTJkNKfsOxZ3hWVBukuouGWQyB
fVOZo9dtWdXOx6pTkMMQ9j1UqY6oWVLNIFxlfnvUEJqSf2qfclxU5WQLj6gT
N4STW1FoX+mcKo1C9e1poiFAjZmBevG46kiIjB16bAjBLCP1GQcKVYU490d7
PDGE6tgUb6o3iarO+X/eZ6UZAoF1IV4jIRZf6kphpHlhCHNSJxwzs97j9AJU
JU1lhiDRTh4O2+3AxRvaqcj9hsC01nN4dXcYv2718lToD0PgkdPOXT/2Cy+f
CT5bOmwIb/9rNelX/o2rccnkcU4awkT9m7EdtzHczCmFOLhuCDnsjOufKyZx
v32OGXZHjEDu7eyBX//m8E/p0Pz4uBF8sTcvr3Kcx2mkDy828BtB5MLmRelf
8/jD8+3aomJGkFFB5P/StYBnFkjPTKsYge4h1RnFZ0v4GDBzH1czAvNnZTPo
4DJ+sndcjahFwTdlGC8OXsZLt588LjYygk9mEbItFit4ozFB1eeiEWjOU1UJ
L6/iTL+/O+TaGgHWbTO4c24NJ/qUxH53MIL009ITXBVr+ECGw6iyuxHY3wgy
3Li5js/Mtd0nBBtB3pWunMnvG7j03RfvJMOMYJd/8rmi+Cbueyj4P9tIIwh7
zfwgM3gTp1KXlq6PNQIrzfbotONbOHv8k4F7WUZAm6rehmtt4/t62b565RgB
IxMd+fndbZzAFd14Ps8I3IqllSo/b+PTKXdKTxcZgeD97Eo3pR189MdWPuc7
IxguIqYSru/gA8d8snbLjaB8VfVqcd4O3vDsWvTXaiMoaX5z1o51F68cHQv7
UEfJTz/tw3n1XbxYyOZ2dpMR1HVlJV323MUz8s2cbnYaQfRorWZE8y6eONVx
8WKPESjb6lulL+ziD8T1zur0GwF54qLidyZClW+xqvqhYSMwlMk4MixBqHJb
eq9APUqpp8b5BAs1QpWdnNSZf3+MgB6tdTcQCVVWvgWCPf+M4M1o5yuRS4Qq
0gchHnzWCM7No+nbLoQq3a3Mgy8WjYCTL/NqlS+hCsOOMMSsGsEeGcOF6VBC
lUzw412fTQqf0XQL+mhC1cnaAys2u0bQP7vgyphEqOKliZrS22MMS2zZe5bT
CVVc2jS/pfYaQx7zvn+1OYSq/ZGB348wGgNLyp1lr1eEKpqWtS80B4xBzdtx
ifotoWqD8XrD9EFjsLjEVuFRQqiaM5qu7OM0BreDI+wf3hGqxmMcSz4dNoZU
w1Pff5QRqoa+juTlHjOGnRbDb30Uu4ftQuYjPmMo0M8czqGsbznbl+gnZAyf
IoMbdCh41UnEh1dOGoOpuq7Vh0JCVdn3llBDcWMIkSG7buYTqgqOaPnJShmD
Lc96Jz2Fb7b1J49jcsaw/32S+XAaoSolQ9Fxr5IxZNVEfgl6TKiKHSmxnlM1
Bvl1Ieax+4SqcH5xs+9qxvDncPswcwihyt8+V79WyxjafvceWbtBqPJ6yaf2
So/ClyU1JsuRUHV1MlU+wcgYEi75MdNbEqpsTnGJB5Ao/B+0OojqEarMXR8J
OJyl8Dn712WPAqFKff4uq4K1Mex9s1nXz0qoUpAm0J+4bAxmHjrXM9Z3cfGb
fjsM9saQ9pxebbptFz+y7vZv0MUYCOal7EnXdvGDypMjdR7GENDIYPNXbhen
D7jS//qGMQyovTj8YHcHXyJY1Af5G8OgYpRTXuQO/le966NTsDGMvVJR49Hb
wYfDDItJYcYQe4CJvY1uB2+nV8vgf0CpX8I3qa+3tvEXLCdvNT41hq6FDd5V
1S1cfNxyjSbTGAxPjxe7D2/i7z/e81F/bgwv/pXoBQVt4k0OkzfxAmMYWRZX
NyrZwP9W5nqV4MbQKepJ5qZdx73i+ufnaih6WbtOezl9Dd90pPcUbzCGt2td
qaeV1nAmNif3vA5KffjHyhRureKnrwq7ZPxnDM48XIa27Ct4GXbu34/fxqDv
X97LUbOMY+wRzocnjKFcSrb6kMcybvxp3OnxnDHskSWsrPUs4X0JnBNdS8Yw
qudm0xi1hF9y1nZkWTeGMzqrV9vUl3APjhf296lMwPThk2SbikV87W/vaBOt
CZzM6Prxy4fys15Na0e3zwR8TjnshCgs4nHX7G1DDppAhtYPru1PC3hpjcAl
H34T4AmsOSf1Zx5XSTL7WSpsAqy295X+vJvH613CrBdOmUDQqLjP3fB5vI9r
9LyrjAkQzqmr2J2exy9Osw3mK5gAG0vX76Q98/h4rYbVhIoJFK/78T8dnMNX
XbMtrmiZQNjcubyV2Dk8WKP7W6aeCeANr/aru83h9If2nPtpZAJRlyz0NYzm
cO4627OW5ibwxXnzjhHLHJ75JK4n0coEHhvyY/ETs7ioe61pz0UTyHQJzvhc
MosrHeYjmziagEibgdUT01m8dpb09cE1E3iTtj4vIDKLG9SHEFvcTcBE5dyZ
d7szeE9K0Ze9N0yA2zNMUnVgBr/gMWKs5UuxabO43r6fwUe1WDvu+JuATk0b
gSp5Bnc9omZUHWwCKW7CTPy3Z/CVOY+27TATONLXacFweQYPbMg0UL5nAv3V
E7Qv9WZwutTOFt+HJtCyGi01KzODx3gS9MsemcCoxu/tHr4ZnFtHonnxsQko
udFGGLDN4Jk8NrqSKSbQjjimtehmcJGFmEa3dBN4GiJl8n5zGn/b+Em74JkJ
pG75t8UtTuMKabP1ky9MYPgWe1jr9DRe43VcS/iVCdjUcj82+zuNy9yq/sFa
YgLnMpUfjUxO47lBl29sfTABeZHgqJ25afwXtVT1fBWl3uKxvbqr0zhPODXT
n1oT+Pg4tPjc7jRuztB97keDCajRRr/kZZjBYx9kZ39tMYFkgd9KT9hn8JYD
N2YbOkxA7mnZQtmJGZwmXlO5souCx6Jy1l1iBsc4OSKK+kzgkNjLifcwg/s+
Get6MWAC5MenpMPJM3gxT9mx1J8m8Gpx68MX+xl8KiPc+dEvE3g2Y0wX5TeD
27wQpvb/awIqFhoE4dwZPEV0zchzxgRaOYw+LlVT+lfQ9MRhwQS6mF+QGQZn
cN2Sq5KkDRMQMGA/M3RwFucePivBRkuE3waRhvtiZ/F3J7A+5r1EUBEvTpos
msXJV4T86RmI0BDeNPexZxZ/ML7SuM1EBKHUuoWI/XP47lTSpQl2IjD7BH9+
eX4OTxUPpv3NSYS7V1NWO93ncAUPp1dD3ET4K3OrVS9sDvdaVFjt4iHCk5yp
ixxv5vDx9e/RuAARajgD74fQzOMddDxVcTJEcPEfLeIun8ev6dLYPZQjgirm
aN7YMY/TR00xRCoQoYrdsM1zbB5XZ8bPBqhQ4o2zFXIOLuBlbBenHTWJYHz8
vPPitQU8nTeTR9WMCO+9700kcSzi+6Mkm06bE2HjYrTGKdFFPGix9voxCyJw
D7mIOqss4jYNYy2754mg1tTR33d5Ee884+M9Z00EFsOfnzeuL+JqT+j5Ri4R
AYv/z7/s7iLO53LqVu0VIvA8+fJ05CXlvOitFCixJ0KMmz6/TvkivgcZd2Y7
EmFC5stHiaZFfJTVU/juNSIU1Oy/4j++iJvdpu6+6UqEofSz8T1Li3j9aHyg
gzsRfFKquNKol/AX78t6da4T4ezhAzbXeJZwzhO6IQo3iXDh3R0tR5ElPCLq
u5ioDxHIqRK1n6SX8LVF5/5Dt4gQP/Bz3B1bwp2st0L33SaC323TOi/dJby/
4eGZTX8ieESZXftMWsL1JI4P/gskwuDB3KkLVkv4hydvw38EE4GTl91SyXYJ
P7lHXar9DhGC8Ys15leX8BSX7iE8jAiBK0Zyr92XcMY+u3tvwong3feySeHm
Eu6PVmQyIolQ5yR1b+nWEj6VGzEcE0WElvKSyMGAJfzCwUMPgh9Q9PB1/ttE
8BLefjtf3jOaCJGfiiO4QpdwbEz59+VYIlA/rMy1DVvC3xi3R5PjiFCp1WtQ
T7GPlV9U0kggAtdybYgSxY45MTcmnUiEGy8MzuN3lnDC/ZBHAslEkLGXndSl
4HssHVTlSCHCRxVtlX7/JXzY+vkEbSoRnBU07R18l3BSo2zCShoR0q8s35jx
WsJrJRrRnwzKfs3H/a+5LOFSKRb/vmUR4aT3vfv9dkv4sz1/E5uyiaB1Y61E
4sISzuZ6W70ih4L3RYrOnbyEh/UxzeS9JMJu3E5ctM4SvoTSn6TkUfTccuJa
lPISbpd3Ruv+K8q8hNhmWIsv4b0Ha+Zuv6bMW2047OFdwsvGfutYFxHhD2sc
U/HuIi5kcnPRqIQIwvK0lkXTi3hSOV0G9o4Ivuw3zroPLOK+90VXjlcQYUfA
Oovt7SI+sfQhi+UjEZbdrhycS17ELS8aGlHhRLiTHuDtE7yIK0m6P/9VTQT2
H7Tnrxss4vkpBGJ3LRF+EAjbQ+KL+BGauM3PdZT5UhDq/Y9lEd/qKyXnNBEh
+sCBa487F3AX0N553EIEqLfWR28W8B953/LC24jw7OPcM5eoBRz33yA4dRJh
NGmTGsMW8JXC8bk7XUSICL2Td5YynxK/u4bTeoiwGJsY8Xh0Hn+u96q6u58I
4eoJxTdC5/EozgvBaIQIby1EVQn5c3idnq6H1W8K31cXDuVR7r9tfxmbm2NE
KAu5hetIzuEev5ng1SRlXq5/Vyy2mcXN3+K7nAuUeuwPDDW4PI3H/s6blVwi
QpZS55788Sm8mTPxP8MVin6ehSNOtylcJcDt050NIry+ctmNLvQfzqd/PGiG
mgTs15OMW+sm8dnfwTv1bCTgbDJA7M/HcREu15lhDhLYSUSwqeuO47b6lj83
uUhwt+dUufzMGN73VrJKkocEfSwLq05oDK8M+BWQJkCCksPKK04rv/GVtx2u
5UIkcOG/t2CV+xs/M/rBuluEBL4Ttc3z53/jz/TjVRlOk4Dlj1L0VuMvPJJL
c/uGLAkCfWjZmUpG8Fp9iekYeRJY8fk9yPccwTcDeIbyFUlQxmD9t0VyBHcb
XaocViVBZPubwaCyYdysKMffUJsS3/vYK/jZf3j06CMXR10SpHot7fkj9x/e
yBV44Y4+Zb97MjcZO37iSoHmKuXGJLDNGqS6RvMTP2Gwd4v/HAneUp1jjo39
gcv0anQdtiTB/jPcXvnoB659KTiX9TwJPPbf9/s3N4g7X183271IApHyN6z1
loO4/7bsqRUbEkhOL7qasA7iMRFeVNO2JLDMY2MYbRnAS5/+ez3gQIKdB4xJ
BzQH8AZBkbCvTiQ4fdz3XPKeAby/0M6qyZkEdPsn5vfXf8e3Pw/RlbmRYKNv
wyTP6DuuPfXl0iNvEnhNMcy23ujHLbyZ5CJ9SVCnWIhvqffjzgQ9piA/EsRG
56X+OtiPx7DXlrsEkuAXf4NQ0ftv+LP0negrwSQ48cU/4/6Db3ipiLK91R0S
mJ0r+rxj+w3vVyll1Q0nQUt3ZV4c+zf8b8PcHyySBJVSIoo5s334FvF0lWwU
CdY0lA7ItPXhJ+xfOPNHkyCbfPtk/r0+XGb2FxyOJUHDB0w11LkP1751nIs1
jgSv8r9KVhr24c4Pkz/vPCbB9Er0eUmOPtyfq/fJchIJCFVGFy9t9uLRWawe
U09IIPqL5mfnr1685F0Uz0AaCQS57s5efteLN6DGhc4MEuTH/TK+ntmL9zfv
aW7MovCDyw2vHvTiW0P+N9/lkKCR4V/yTadefL9ThUHBSxJ4x0TVrJ3rxU8s
LJ/IziMBzdEbaeG6vbiMv9Tak1cU/f7xZONW6sW16dw7Yl+TwEDQeN8LsV7c
IvbV84hCErzf1+0kytuLUx7jfoFFlPq3t3A8Ze/F/Z8LkG6WkKD/2e7qIkMv
HiN+WdjlHQlUq5VXxAi9+LPytG3b95T8zuutYqs9eKn6QLdlBQmCcxdG+GZ7
8IY2znziRxIc/EmV9vVPD95vbhqsg1P0Kal2QHOkB/87HGOOfSJBd5/f8euD
Pfi2c5uYbA0J3tHcKj3X14OzLNPvEftMWT9H++7v1x6cL0jrO189CdQ6/u0V
7OjBteOr7rI0kyBc4R+63tSDX3spL7XTRgLSTFMcQ30PHvvx7c9/nSS4ntIn
V/iZwu+L6P3vPST48Mfe9lQdZb2PRfWR7yS4cD4iNrSBgn88Ytl6iAT4nuL0
Wy0UPl7HWIL+I0FmuBC23kbh3/DuZOYICZI7PWXqv1DwDhtp1fym+C/d9e7p
6sFj3EYv/Rqj9K+IvH6Uwt+59rbfngnKvGm2FiV/p/DlZHss8JfiTxxOUB7q
wbdwtRaHGRKYuL980ztKWc+cIfNvhTLfHw5sWi9R1l+WM2FaJ4EQU38Xz1oP
fuJd+9XTm5TzhanZ/+MmJZ7ePsx4mwRuij3TErsUfhe20t13Kf1g/Xf4BjVF
X2/jK2KpyCDAurt2m5aiP5pTPUV7yND5nioA0VP6bVE700VLhp07o0/f7evF
tQosGZb2kuH5XLJ+L1MvXrxZdt2XhQzy33wbMNZenNeA/ecWNxki1P+2uDJT
9Jj+au3oETL0RXkkTlHivy2os6GjZNC+LB/6YS8lXnvgtM1xMnRoSIR37KHs
n+KpG3KCDLZvDROOU/henaG/8oyfDFsCgc+er/fgmuqZAZ8FyZB4vCzHbLEH
502UTx4VJsOxY+NxQlM9+OZkRzHtSYo/ffciK6VefaoO7UJiZJg/trTDSNFP
8aPtPzriZOA9+s6RmaKXh2MJ1FclyJT5kolmovTXSVHsaJQUGRaibB0JHyj7
Pfws/0qGDH4rkhP/FfTgx0esyG1yZMC/xdM+S6fgR96L2K9MBtXFnsm8QAr+
D95nZ1TJ4CialDLkQsGXKK8kIjKcbi/6+MWSgh9m8s1TjQwBFzjVfbQo+P3j
83EalHqcLeNrPUPBFwtkKtUiQ5xsKLmWuwffCOIQ7tUhg/FttwZTQg9eJKx5
gcuQDBPiDsYnWrvxB7cHvRWMyVCTfNbQ4E037vTF65ElkQz9l0Rt/8V048d8
shqempFhclsj76pxN77RojBSaU6G4k7XOtlT3Xjvsc7NIQsyvFtTazWlo+A1
7EjwWpOBBgrdL7/vwsFzXPLoJTLEtx97xhXbhS8d6ZA6fJkMy519X+Qdu/AL
nmky7PZk+PQvJi+ZpQtn4bkry+pIBvcfTU9bfn3F6xpc5PZfJUPwcgWHXslX
/DSPigK9KxmUTWVO7zf5iv9q4FekdSfDSc9lFu3DX/FET0Ylak+KHp1/0r/+
3YnvNAwob90gg3dGUs1fj068w/MWmvMnQ2NQQThhoQO/w3MZpgPJsKf7wbcr
3h24XKOu2t9gMvx3OuPxwa12PJ2HW2M0jKLf5wachoztuHtjmXb/AzJYqV8y
26PYirMcXTKqTiXDpUhjboHORryucdAYTydDOCnL5o5TI+7r9dnkQyYZXNum
GNioG/HhxjhS6XMy7IZcUqlXaMCLvCTP5haQofaxiYFaaR1ObnK7EFtJBuc3
8g6Kv2pwuuvm1g+ryOAZ4/iL6mEN/uEodjGqmgzn2sxLfivU4HzXmW3C6sig
Q2PPMh1fjS8cLbji20aZF7Hyz72vq/D465PONj/IUMEn4OZ07AN+WNvP0/Qn
GRwyre+eTa7An3Ez+moPk0GcpsL8DHsFXoyL3RUbJYPvi2SrNNZyvHOvR8ba
P8p8XSPps/CX4RYDhBf/pin5Sc49Zil4hw8XPCr4OUvRi5g81bjcO3yWVFJR
t0jpx1TwVRpyKb4/daU7dpMMlVmWo5VpxXiiW8RA6DYZCkRjY9lki/Gjatwj
3rsUW265RrijCBcbV5y5sMcUMuj2//GnLcINJALoRRlN4YNIlvIB1kI8sm6P
as1hUygTTHjL9jEPZ0lK0CjlMYV9h2MSXh/Lw5OuCuq/PGYKF84SDtndzcVf
7Nc595DPFIZnWp0OXHiJ11tEeVqeNAWN7yV/K07n4IanjvgaipnCj9PMT+Lz
nuM9268CkbgpWDlOFluJPMdHn7XfF5QyBarvb6OfiGfj1NMsL+YVTeHML+HX
MtZZeNSnrIJRZVOwjdIM7JnNxFnjpEq+qZqCS9ncXam7mTivvFk1rmYKzZ2b
KvweGTgKSRq4p2cK6VVnvF1vp+INpiIj/gamUJdesV+79SluLFTxx93IFNpr
b+er8D7FL7YOLJ0lmQK197sys+9PcH+OYwf4LE1h9Kd54Vh4Et5exGCFzptC
IRUdK9NiIn7MePn5BWtTWPfYvdNol4h/Cm9TSrpsCowX3ljUWDzGWfjL75Ze
MYUd567UkYEE3OZTdudXe1MInj5abGWbgFOv+TkwOZvCdy961iMh8Tg5waFI
1MUUYhg4lTW54/FsCfKWtpspICWR1XulcbjmVdG4EC9ToH0kPy6+9Qh/TMsx
lH6Dkr9+9rr7y0f4eBZBpNLbFAbq5i49OvcIjxj4hq/4mUIu//5xhYZYvN/7
Mz17AKVfTw3HM8NicRG2QlPJIArept5GgU4sfqswJd04xBSOPVA9aHwgFm8x
CJ+8FmoKKxK4yt+yGPzwhKfMvbum0NXddFTIIga/FmYd9CLCFFrimXIlqWPw
Sl69ls/3TKGYZvXjTGk0zoTL/K/iKo2nuuuiVDRJCGlGczIU0UOHXQmVSPc/
lSGlTEXmSKFkvpfrulcSHiTDJUNJpY4kJVTKnKFJSSpDJKKn974fz2/vvc5a
a6/z4Si8jxH5d3fsHyOPWGx7UNn+Pw4Lsk3OTJPQicWFP+fmL+GK+BsO/VQR
i8X/xf/6uZUnwtOpGT3dzMGWGj1A8Vkght3e9hVzcHrdixjvRBacdT2QSAk4
eMixvJWbJOLzsmci8zwHb5+erVKYzALjUG5/kS8H8/6NP1mfwoKtCjVmhz05
WKfdeZpkhgh/NbthYzAHt8hAElxjwf3UnPjFQg5ec12txzaHBfKb5uhvruNg
v90LNQLzWOCnFMvTG+bgmk/TApLyWeD/OSNQakUsVrow8OjWdRa4bypt4bFi
scvyDummIhY8jdI+XxAbi8vLHx8cKhHpD421M3gZi+fQJVnzSlmw6qa2hYpS
HLYeSRncUMYCnfx4LXCMwwVxkfpmd1hg/lexN6A8Dk+p+YQdL2eBvcrltcwc
Lk47tndJegUL5nn/sNvnxsWDYnqOuFJUL9u4Y/ZVLoZU1ZKOKhbsUpoPEZ1c
/L5lwkShhgVsuzxzDhGPN3t9it9cy4LTrQ0Gv/jx+IL0qy7LehbcSQiU/NwW
j1eZ5npFN7AgQQIGlxznYZ+eBJzzigW2+2q+7yji4cfBwbMeN7GAK14SeXOS
hx3vUGl/20R+tEQSW64k4Lz1EnU+70TvwYCKVhjh48al2yfdPrDgjFLYzSem
Ajw1/9xGp48siO3W+DAvTYAtxkZjD/ax4MCBk6S6ZSIerfrIMhxiwSzjt3cP
Vl3CYFPdPVOMAOm1666XvE/G7bGhw8krCBjxK+xjtaXjaRceqPJVCDjtZ7FO
a34GVvOdZHFWiurF3JAFphk4yNq7LHgtAaoed/60lmXgVescAo9pEjBqjPE1
QSY+9XCHhIYRASfvdH+X3JuFk0qDdNduJ2D4wL3ZfiFZuCqn3El5JwGKbPXd
0beysHzs5jo5UwKSvNi3opZfw+WHVON+WRAQZWTTtvXrNSw5Kr7ooR0B7mZh
7VMuOXi8OCn2oz0Bq47Tx5KSc/BXN80ZsxwIGDKZkUzW5eCXn20GLZwIiPer
bVdYm4uTO28/7jpFQKfV37NNzbmYnWRhIOZFgP7Ra1qZf3JxMPmpeKUPAR2e
Xf8Qq/PwsQa5FFd/ArLz21V3euZhjUduXuMhBJiTM9d5/c7DyiEz+paEEnBz
g/aR84uEeAG6YmsURkDIP9lXtugJ8XjZU7PwKAI2KqN+N3ch7vc+XJEXI9IX
buHyIUKIu7XGtJ9zCAjaeeFB179CXCVcuUKeR8C/3Wo1O+uFuNSpnK/HJ8Bp
d1xP+hshzlllNcc6kYD764YKjg0JcfL7z8FBSSK+Ox4zEWL5mJ0W9DMjmQCx
w2FLxefni/ajcOJxCgFnjXPU65bkY0+lgnd9aaL7yzMedqzJx8dadlBSGQTw
Ir/OU9PKxxTvdb3mVQIKfCdNb+rlY+VwnUycT8DUD6Mcp535uD8gzn9vKQH7
cmck/b+/S3fNgHsZAd9KvyWYi/AaRu478O4QcDTPkE8vzsdVxazXt8oJGDf3
fGEslY9L3fotXt8n4Lfj5GmpKSHO3nC+eqqCgNwK1pPsL0J8+fNCfeWHBBgu
GR6Y2yLE7KzCop2PCJhjvGetToUQBx3ZtdrpMQG2Yq1ZC68JscfyruToGgK8
Fs5NLYwSYodOL5nCWpH/++13DZ8QYippdviregLavcyb2vYKsRmZPjn6nIDG
XSZnD60XYn05PU+llwRkcat9PWcIsXrD816DRtH8YsOf8t15WG735KsLrQTc
mvWf9YfwPDxDkmea3U7AlclNhVN0Hv5VtQ7XdhCQsmebzcU1ebhrG5Ur85aA
I4uLMu7fy8UNE9+W6bwnIHG9RJbthVxcVRaaQPcQIHtDqt3cJBfnaJUEpX0W
nc3n5o89zsHuCsMTt78QoEmMjPZeyME6v7V8X30V4X0a8VZGObjyUfGJGUME
vNQ+mWCVly36HxYzruME6Ab4f+4+fA3POle0WXc2CS5m9l/IG5n4xZHB65Zz
SdC6rH210z4T800017vMIyFUY/H3fTKZWFmmaEWKLAkL6xIUf3hm4K1XC6Wm
LSahzsBaUhrSsXPt9d7nG0gID0mVPyeVgjUKvx/5vJGE4l/RVgVhV/AoT71b
TJMEeTmdjlCxKzjE5nqTtjYJiqfTLq+YvIyTBgsqLxuQUD6oZFs6PQk/VShI
Pm5OAsx+xuQc5uPY318Vgi1IkBm3Uvo+nICJt2rxSftJ2Jq1zlIYloDf5eZH
1BMkbAi8/j2ohIfHDfJ9NtmSoCF76IzB4ni8/qjQ4o8bCc8SnzkXHGLjp6n6
xT9OkWA+ouf9pywGO76uk+3zJMGnsM8yQiEGZ+3/2tzoS4LfjsuFm15HYWWj
jda550jQnSwyoc5EYMWlhU4sDgnurmfnRa0Ixbdow1qzOBK2ySgXyadewETC
iw2G8SQUqkh0Ry29gOPnDH5fJyBBNUZOapnKeSw1oenzXwoJIUudJm6HBOFp
rSUheQUkXFQpzHl27TTOkN3xIa2QhJd5nxmP134Y9jXu5BeTILUqJdFMxg+f
q/4hGVxKgs1Pb/lTET54/IY2h7hPwqqtr7KCkj3xpYFHA7srSOAGNRuX9Hpg
3Q3EfqNKEb9qC7XaLR7YO8NnwYZqEipzza2m3XXDA3G3Lv+tJ2GdS87bcYEz
5tTvEuWfhP2m01IjDjnhjTNbbfobSEgy3Gm9Y5UjdgkaW9HSREJkuDf/2xMH
/PGkXrawk4RZBT3LGzl2uHP33RvkVxI8AlVs8kPM8Q7LLMb3u0hvp/pot5MZ
FhJx//EHRXkLPyYRecQYnzl8fE/zCAn2nNMFNgr/4MW+sh8OTIn65We+tCyT
Q0y6i+z+eRRwL+EKg+37UOU14vap+RQMvQe7ca39aF2+kW2cLAXw5Hay0T0r
NH5LIe+FAgX+fgOudhUEulT/EPYtF82/MzM8dvEQah1b5LFHk4IZaUFFPalH
keHUDEXXTRTMOnXzmsV2B5QtPnQvSpsCIqNGz7jHAflJPZlZq0eBvXOToc7K
40hB1etfU6Cgcovtzq8CJ0Tsq3thbEWBUtDhcy9tTqLGq2fUjbwpSF62Ri9P
xhvJiZXd1felwCw+U33S1huxbIZ36Z6mYGM6JTGnwBs1yzvbqQdScFTqlF/E
Hh/UFkbGLQmlIJ19dZMKzxcpfeAuWRgm0mOyYsaZXl/EGD7LkYugoF/waeS9
gR/qGNtROTuGghfe1rtn9fuhLiet4V88CshLGmkvCH+0tPrEuRE+BSknt6tX
3vBHtso5swcTKYhpLFFYIBeA3rQvU+1NpuDPs1IZyZYA9G73XFZzJgV2/WHn
wS0QfVLrLS2+Iapvdn4nMRSE1kSqbC8opSCs0iP6jXMwcvxo8zynjILipikJ
3BOM+lKaPqWVU3D/YrNpx6kQ1D/voSKnSrQv6bq3rf7n0QbXqczIagrqrv5x
6Mfn0YknepoXn1AgFzA1sH7GBfQtqNA0sI4Ciav2udv5F9DA4BV/l0ZRv9rH
eIdHoUjDvG3G8WYKsid4W5zkLqJTuXLx9q0UWIQp/vfg6EU0ZB+VR3dQMJef
zg6bGYZGXvl17PpAQfWT95FDR8LR+E2rbao/KNigq2r62C4KSW3VfbFglIIv
rY+azzyKQsr3F9tLjFHQfvW1Rs36aGRW3RPaN0HBltsyOXqT0ehys299oTgN
Q8VxWzOz2aiQOWSbPp2GDvc+N11pDqrqMhyMl6ChQjHsqYYPB/V/nLnAdzYN
QdGTHqRBLNL/efmQgSwNt2vG1uCyOGQREPRt4wIajloYx3XM4qKjf44GLVeg
wSlBWYW3hYuiJTZmii+iIftt/dM7bC7qVKj4UqNMww+H394Sm+PRWd0P/oQW
DYWblydnH+QhbvmTOSabaTApeyh0DeShLMP8FD0dGtQPWzPnUnjomYlP5eKt
NKQ1rTdP6OKhZbTkrPdGNIhvgA+ZRALa3Nl/uXE7DdL3Mtb88UhAJocb1Kp3
0lDV6hpTxE5A7k5JljmmNEge+XZapSoBVZzecMnNkoauq3fXWa/mo8ZJ6fWH
rWgIdjt2/9I2PuoNHinfz6IB1vaNbGHxkXTk/TfaNA3Ny7RlUoL4SFUqw2P1
QRrESltJxwQ+0uWGTVtoTcPfb3PFL+XwkV2SxZrfdjSs/92zW+sFH3kt1b7z
1V6kd62D2ZV3fBSevnBP91EayoUb3T1/8FFh7ju3Skcalhyjhx3kBejvHa9b
4e40DIQrqYZaCVCX5I2YTA8aMnMNXLn2AlRODB+p8KLhjr/aiwl3AfIZOiU9
5keDbmzSVG+UAFkZFn2UDaChPjLvpVuiAGmwB8rVA2mYk1LYRGUKUN9aN6fj
wTQ0+N0PIO8IUOajrwtSQ2lQHpFRGKwXINvDrpXNETSkfvpdr9ktQEqTfSel
2KK8qNZWr/wmQI2JTouMuTR4BtetbhsXoPsSR+tVM2iIr/l1V1YxEV3zsTkn
fkO0b9+JWukFiWhxwcFWj3IakuJ4hi6SiSi2h9J8V0XDoZKLX9p+CJBZcEvn
whoanm5dpS3oFaDpS4hIy3oa5oaY/LnXLkAVZY06EQ00VFrruzO1AuR/wOp9
RRMN4ekWBX4i/mQ693ZHCw0P2Mj4TJEAbR5o4Iy10fBTtbFbNVuAvkdZ6Gt0
0ZB1e8F6F54AHX24NyH1Iw3bXKWyRx0FyGh+jMvdXtH+Y7e92mMtQEtt64xa
+miw2XRk1QFLAWodN/sm9Z2GjbZF5BldAdqrZbLr7E8adm7xdrUWFyCxlhZx
n18ifrIr/ahRPioLOF5xYoIGj950ZuFnUV4eXdSz/kND5/TE+MF6PvpNPlqv
L8GA25sD9ktF+REGgvS4PANz4s61Byrx0ewa/TZvHQaMq+rcf84U5fVEXcIJ
XQac1z60nT/GQz4yh/Y7bGWg4K14uuJHHnp3MKD2wDYGZrUMz/vxgIfufLt9
b5MxA8JM/6V//XjIWW5L+iCLAWmTyBPhPfGoxlbT5YQ3A2HxPVLfK7hIzsH5
XqovA/sNeDHT87nIzjlj3svTDDxUWrZW5xIXjXktuKFzloGSIh9e/ykuWhX5
6/efiwxMyfft7lLlopAbD9jcRAYef43xzlGOQ89uj7+pSmJg/o854qV/YtFC
vGnTz2QGPjsV3FLrjEWFNVdbDv7LwOxVJZaul2JRd1fE8pW5Ij4nDRwvKsSi
dR8qPUihyI9zpuZ7xjjI5/NEVUSBCE9c7WViGwdJ/Tjh9K2YgYZPjSdfXeEg
/Zn7i2/dZSCweMUidTUOCpeKmtZ3j4Gsr/bzImU46JVsFbG4goEzaRqKYWNs
5LxUZyKoihG911pl72o2KlVx21tSzcCtWmOxEwVsJLY2O7XnCQNy6dlFcgI2
urRJaYdZPQOv7wX8E+zMRh90rfhnnjNgsiNpeA+LjTS2RfcWNDBw0Hhcp9mQ
jZ6YTEXLNjNwBbUpqSuxkZz5lu6drQw8951+abokG9lauWv6tTNQmV9vfW00
Bo1av2vq6GKgkRftwzTHoBjHA/5G7xl4N/b09ZHbMUjVs3pp1icGJjsNpnWn
xqDyQN2Hs/oZ0DRJOvYpIgZZhecedxtgIOmfhNOJvjEo5Aq7UPcXA3rPtkbb
28SgwmKPX3//MmBX2jyoyIpB/wOSzQ9c
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwl13c8Vl8YAHAUUSrZShLKSPZe5+F9X0QklFFKZEQDUYiQPbNCEkr9QsoI
GRGSUULIyCiy12tkZvzu5Z97P9/POffc5zz3Offec9Tilr4VFQUFBR92wM88
D9fTkrkqVV5eeqvR7+6H3tMKHrlhm4K0NsVseu75oUrXty8EbLNRetgtv8r7
fihGZvDi3oj3KCLFIirU1w/ViDna0Nh+RIJzueGSIX7Ig2WzaDP1E9rfuqs4
L9oPxUWTVNbCa9E1f5N4qqd+KHt/2Kdl96+o6cvO75wZfqgurEVzwaYJOT7d
DPtX6Idm/OhHXDO/o46eWpXHNX7I81O24FJqK3q8Km060+GHdlMZXHeJ/4G6
xRku/xvHxofFt/PhHWggUdKpYNMP8Xo9nnX060JX+bo4DrL6o5wyJakZ926k
84Pcwyfij+oVfIsnbX4hSyNtsUOW/ui1EtN96ezfiJ7FbHPDyx/Ndl9Ncc7s
R5pHW9ddk/3R/YO0A3OpfxCphNn+6G9/VF1sskMiaRD9nPpRe2pHANpt8prP
MX4IfWiYK/7HH4Di43VtyOEjiJKl2njWJQD1yaQGiQSPokPPP9uKpQQgvvbZ
jBt+Y4iiUvYGuT4A5TA/mpxwn0CTWUPFg7yB6EtUt+OoDRkFvdWW8B0LREEJ
cfUx4jOI4+C0VwxXEBK2RaaS2TNIpPXYAfZzQchpV9Q9p8xZxLvvjohHTRDa
IEmVz6TOo5fOufP/lQSjZyy9upFcf1GyhQ/vmX/BiDjk/0s06S+qk3fvu6Yc
gkL9OihuxS8gK9oCjZXPIYj9kzthKnwJDe7Ivho5GopKo3nbwvYsIxWGcds+
qTB0yaLhqnDwMtpjlWX18kEYekHJFWDvt4LUWeXq03jCkThU1o25/0Npn+dN
QpwjkFbZLt1hm030Xyly78qJROKbFgusM5so6upNJ9eRSBTGfbmRV4kC9Pes
vKA9EoWcLUpcDKspQKDzQMuOqChEHHaoLmijBD1RzgvJ3tFILpCLvZGdCgzD
a15vlEcjYYEG++GLVDBss95nvhGNmOz4mdiGqIBpMXJN0jsGDUz1XnFd2AFp
B9TizSJjUXtEaEGk/E7QTu/+w9gRi76IytNleO6EYyglq4/rEcpzjM3poqYG
65mosercR8hnQWtTgZUGBlmiL/MMxSHu9fdJ6zK0cIru+aNJv8eIOdlqhuUe
LchHqPE/6HuMaBETUeQjLZyXWf9kIZ+IyN43Jy5p0MFLCpdvzPOJqHznMYUK
o93wnvWn9es7SciMPrrjgSs9VCVwfVasSkF6b9CJJx/oQZNsOifNkYqIulP3
31HsheHwcQMW/VQkHKl5fDBoL8jqEjoka1LRGtOmM+nxPhj7YmIvVfQMfdsr
Q7fTjAG0aacG7nxOQy3ajAmNHgzwY3/aSAjNC9QZPH38cRIDUA/8F+Gg+QIN
Ur8iivQwwIU4ckVx4wu0ts7mbXzhAHzo9KYMHHqJhKZXFrNMGCE3SpZKTCUd
iQm3+991Y4Q282VPr/B0JGOXx6z2mBHEz9er1vWmI7VhO4mOTkYQ+bCiqOeT
gUz6um9QGjOBnJeEo19bJgpqLBs8d54Zkk4U5pHfvEER9Im3ue8wg/VpT47D
+96iWK07VBOPmIFS/kOWw623KKVGhNv7BzMsS6+Fxklno8LylAuZhiwQRuGt
xWGbg4be+rRs6LPCgFL08lvuPDQ+aXal3okVqh7JrGWb5qEZIYWZmGhWSHbV
YDN7lIfW/pvbK9jCCrtHzaiq6N8h5hTLUwZn2aDB1/rV4I58pPaQVPHqDDv8
mD1quYOlEHlr5We03GSHsh+jmidNClE5NW/Mejg7dDwPU2ZNLkQKHhTWBg3s
8KUw/9MJofdI8lrpnk1NDvh6Zf/5aO0ixEcQNzqvdhByrmG980uQxUYK+Fw5
CDfTSyuiqUtRavE+oSzvg8AUKF6iYVSKOMUm1yg/HoTBU+xhauuliOXwq+dv
FA/B+1Ohb18ZlCGaJc7pndKcEHuXpFXLUoGIeaEdooacwOfXvGhCqkAPbqxW
mN7mhPers5ZWLhVo409HTE4uJ0RnDbmMtVegpeZo+YsihyFaLnu9JKUSjWbS
+r/j5wJpRU9qzlOfkJXo6l7xvdzQ+uhF3dHNGnS6O/AlOxc3yNiuEDyJtUgq
kEWZQpQbNpxDXnuE1KKdv8SuN+lxQ/O+34Rr7HXoeYTNlxux3PCg7FHoDqV6
9GuqLSDz0FFI5dVMcHv+FZlkZW/yCvHADqkOf9M7zQiMleP3KPIAnan/F7u0
ZiSw86vIvDYPXBMyNG9obkbLF4bNqm7wQFZkyoaP8HcUt+fwB/NcHpCdfvfp
9ch31GoX4vpUjhfs2CV3xV5vRTqCVrOsGnzw5Eo0WTurHa2GupT2nucDsZbV
lZa+dpQ+7e//wpoPxifMqCIOdKCd+f9xSATwQWj5RnzS3Q5UojKqqvOZDxi5
jz+hUu9Exw3to30Jx0Ar+8vHIxNdiMLLUXIGHYeY+CtnTp3pRXltni71cgIw
U79hKMc1gNL9r1oMnBKAgos5TPOKAyhZRvvMP1MByEwQtE01GUAhCeyCJz0F
wCuwPLspdgBZXnzXE1kpAFBKVrHf/QcxD44SjLUE4cpnT8eZ2T/ozrwB48gF
IYDblsjxzRC6/kJhc/O6EOzNb3vFXTeELM4dnWS/LwTNum/z3gwMId3305+1
UrH+pMqmS2zDiP9esNvbQSGQ2pXGwuA1jDqpPv52uXECfrL+1NPXGEGKjELZ
O72EQYTLxpa9eBQ1UprWf3soDCrD5zgsG0eR+Wzwn7hUYXgWXxfk+2cU+TWP
sQlWCYPHAkmEtHcMNUZkeOtQnwRpDXhaf2kMme8R1I8LPQm1LZ6Hm1bG0Nyq
8fXLSSchf8+Qwy36ceQ3HhQg8OYkPEmaZRviGkcZ9aMlJY0nIS2qP1yPMI7m
AtN5fx0QgXt3KW2FQrD+OwUW+BNEgHDYun9j/wRi/Wu0fzZdBHY3cI9sHJlA
6X8CBUuKRaD0Q/LMD9EJ9K1qxOx0twi49Y69ojuD9fd5VePAJQpGKcNFYaET
KGP9eELxC1GgH3WaPLE+gZSmzuc9KBAFfrt7Unm7J1FjT0CDdo0ofOMfe87I
PonmSocp+kZEoav3cruFxCTiUm6V8mERg50PZXU1rCaRzb/opy+NxUDk3HCr
UfUkitWd/ORmLga2TdezexonUcUz0riOrRgMaortJ3ZNInbNZZnFu2Lw/LK8
dOnUJKqLNWtWjxeDh1cHRc6yTCFBEYEdoz/EQDkn9ZjO5Sl03sdH8EOvGJj3
2Tgz206hB20/z0QOiUFZ5rWvlQ5T6Kd7eJLcghiErKS7NPlMoZDaOelgZuwr
/FLq74fnU2jCvMxWyEAcful0szL+nkLs+awPN0zFYalY667hyBQi7nIoaLEQ
h4JSFSvv6SmU9IaH6p6TOIyXCdU8WptCp1cDn3yNEoeweonnH9im0ZsY/cbr
zeLASxc7Lag1jX4Ov/4LneIgQ1R9zKU3jWgUqA+x/BYHbUFOIYrz0+jS7/c2
ZWRsPAPv+pAr02jfycOU+/ZLgAz9ctinu9PoVs2IZLaOBOTTst+fTp1GFZBl
L3xeAvZKK6+L/TeNGEod0jIuSUDwqfIX5q+nUU72CuOLWxLwPmhSP6hgGs0l
7JlLiJIAg8K0O5t10+iOvWjOgx8SENFT3V42OY1qhuZHNnslIMGrH6ZmphGb
edERz2EJ0E5zJOxdmEZFhqoP7y5JgHTph84j69NoRdng5nUOSfhunPEulp6M
PBjuCp83kwQnkwzREQEyaghRvNpqJQkVrvptMsJkdJiaIknvpiSc0Hq8w12U
jMpXgvZoe0lCSvf+9G5pMqL4kziOnknC/PP9MQxqZKRndpmnLEMSOJVZ2ChJ
ZPSsg9dUIU8Sdlg2OQ5rkJFaQ1a91CdJIFb4aUTqkJFvQXm64JAkyHqs3b9q
TEZtor6//5uShJDQN+2bpmTEl6nBzrcoCSWa+qJRZmRUndwcyLVLClQKOO7G
WZARTdCANZOgFJj++CMpep2MQkxpjq1fl4Ji0pVdhZ5kpCJGvzjmLAWge7sh
2YuMZqkZa9s9pIBjTTjV24eMjHMPX8sJk4KkM3+bRf3J6Bit9BvLLCnoob80
pBJGRhUFltJfJqSg32TJW/IxGTmHXqN5Py8F94+a1rxPJCP+K7c60v5JgZuU
5V2ZJDL2vb/n5rlHGn4FMdzkTSGjC5bRZWInpKHjo2pl2QsyWmSoJMXbScOl
eb7kHdlklDlcw+rnJA09G9OnZXPIyOxDw4iDuzTc7/Pxs87F5mvTGawVIg3K
ItNf378jo6hy8rf1DGlQTTp3g7+IjISvc52/OiYNZZW6bJoVZPRblY//7Kw0
TD01u6hYSUYxbELLyivSEJn/6sCJKjJarZJOZKOTgSKnaCqKajKq49Dp+yIg
A0pT5Cs+tWRkWXvPWtxWBs6OOOpMfiOjq0rHdRdvycC042JEeiMZWec2S5fe
lQGmIAl2iyYysn1yjJoUKAM+fC7835rJ6OatpjTj/2Sg90My+LWSkTsbb7/X
oAw0rvvb3u/E6i3sWx1xUgb2CAo6MXWRkSelaw7dXxlQfflG7z/M3hMNXjE7
ZKE75GXW559kFPDxDtcrHlloda8qn+gho2ibLxcazWUhrb8yqPs3GcX2OBNi
bGWB2oPT/Gw/GT06e+SEsYMs0H4N9PqMOUHRebXfSxb66nXfpg+QUfJ+rscL
ybJQoIAcLgxi+X/v2M7ZKwvHjh9MuztCRlnCnOX9g7JwiEGzsA3zm2c1L/+b
lAWR5AB7sVEyygk95CK2Jgvx1xWa/2AuvPyZiXhIDtz2Ju9THCejyl0cZ+1N
5ECT2tMte5KMhtNEtLquyMFeupiDm5jpgUjQsJODd9/F7uhMYfXnekua954c
VF1JcBrGTB79zNGdJAf+Hqm7dpPJiNm/m/HUSzmwJprT6mFWODq75/0bOeiQ
OjYeiznAhHMjulwOvjGKWx6awdbrF6cBrd9ywLORnHloFltv1kHdRaNy8D7Q
TdwEsy1VctvxWTmg9m8ofYQ5X6G+hopKHvKqgsb3zJGR9usjr0t45cEplZlr
CrNbWMNtIRt5+G/XPEvAXyx/AgPXE27Jw6pQSGwB5urqJSsaV3lILCafGcTM
sM5jPBAkD4W3poPRAhm9uuGmlJgpD/PBf02nMDfQPZSmfScPnHVHmdgWyWju
5QuRO6XycHDD+AhgVulr4tZvkAeLt0ooEvMP3ePUu6fl4avXxKjAEla/44ob
dxex8ZtEw3UwcweeXRrakAeBWulER8zXP3qMVe5XgAonweX3mHeItX5zE1eA
i1qUu1SWyUj8gHfcmLMCjD1fvSC+QkYltB0CtR4KUNPxtFQbsxqFSOkLPwVY
ulRYYIXZkNz963KsAvgu0HslYL7zTVaw/Z0CnFOuD1/BvFkdUfquVAE603+N
Mqxi+9oPQzpRnxSAk6t8jB/z49cxTqdbFeDb7J0BQ8wfgsmlVXMKcN+/qD0T
M8lHXTd1VQGYVXkCPmJudH3625NKEbyUwodaMf+y0aaWZ1SEZNJ00T/MVOqv
dLPFFSFp8OF3jX9kpEl1uf+JgyIY/OuobcH8faXgtpurIty98GljALPpLD2N
kbciTBkILs1htv9dIsQYqQifjteKMq5h76tyVuegbEX4QrXSoYOZrfAGjfV7
RRBts5G4iDn1TXUC4aMiNN9iOWeHOTfJqWyjURE+cD1c9Mfc5t5I4zKtCLN0
rytLMJs5HXusv4jdr7vcpRbz8DWPE2IbilD64sdyK+YlYyG9ib1KYHmQ/dYk
5oOyAY+vnFQCNZP1k4fWych8XllY97oS0H5X9XPAvJeRornNWQmiP41r38Nc
IlZ1+4KnEtjzaw37Y2a+qV5qG6EECjnX4xIx143qavnmKME1N7GVSswuuw5M
0xUrgeNtF/uvmHmOt0ZFVirBs89rBW2YPSyNup62KMFXbo32YcxifZdti/4q
Qcqdf4Z0G2TUu3aUHq0rgfSib+IBzCGHBrM/UyvDUyG5Mg7Mg8a2Sy2syiBt
npAkiDmh1SFgSk4ZXpygaNPATFHv84LHUxnsy8di7mN+M0LQzPBXhm8HvSb9
MJvS0EyKRihDrImOUCjmfEKIpHKKMsiM2RvFY7Ytj64yqlSGDqUIv7eYWXoN
rfvqlWFx8CVTPuaqf6y7rVqU4WGcdWgxZk75J2ed/ijDvQR1mWrMze/SfodR
q4DEK3nfTsyeLVZ+TPtUgPeE/pVezEKz/AKJrCrAXfZTaACzn0jWrVf8KuAf
nuIzgVkuI3+j8pQKrN3K0VjH/Cz5M+dSuAqUB6Z4HN4ko6SLwh3n4lRA4dDa
8aOYEw7GROUnq4CO6NEqPswRceY0TtkqwKBT8fUEZveIf+TJZhXYDJaQlMfs
ctoiU7sLi0fnnZ0SZofd9Vcz+1Vg/MZ8LMJsHRDXZTOnAt+T3atImPXvi38a
YEJwj3Ex4CxmHaUET1VOBNkxXSaGmDVXN2RT+RAoStAdNcKscqchy0waQfx9
5vCLmE/ctInrPI+gWhP1W2PeeenptcbHCLo5nVPcMG8e2sl38jmCMCnzhnuY
V7vs+kIzEdxI15nxxDxzTs7gVCmCBx7Vhx9g7tFpVaruQbDwtI0xBHPHHoUl
niEE3mlp/0Ixt9Sn5mK/rWC5HtATjrmOdPM42kCQP8cQGIX5Z/JO2t79AAT/
1gcJmDvXZa3omQFYz3SLJmL+cdG+SpEd4C7r7I8nmJsPtngkcgO4PCjYm4K5
Ji5l1kgcQHp/pshLzO8iFLpb9AFMDxXr5GC2eLKPuuQ8AEMu44NczIzpAyLP
TAFeKVXl5uH5rgx5cMsCoDv2+o4CzMJ/fwrSOwFwNE85FmPupsg2mHcBUHk4
+6AEc8heX8+fbgCdOT8elmIePX7ie7oPgFnBvadlmF+Y3HMlRQFcXRkOrsRs
YH3mufAjgN+UcfeqMFPd5m1gegxQkpp87RNm87CvRwZSAW4dWVH4jJnz46Ha
+zlYPuh08uswx/J9YClqwuJv0qVvwkwQj0QprQCuOyvrcc8pX70W0AEgKGri
14xZz4i+zPAXgM0c3+x3zPQhF6/OTgNMvkGZbZhL48QiOueweHz+nf2B2S5t
Z9HHRWx7KnNyCXfdh6w9ERsAaiMcCh2Y/chreUL7VOFXlEhaF2bJteaeA4yq
IGr8VvYn5gHalzQrLKogrzdTjxt4dExrD6sC/9HukW7Ma4ZPKa+eVAVhY5Hd
fZidS5T1np5WBRH1dnI/5gLTWqouPVX427p2YwDz4qpeAfM5VTD6cmAct5vi
1YNhZqow5ifQ8wfz/Q8hg+43VbH/67/pQ5g/XmSOL3RShctH3diGMVOsPz01
d0cVNBZE/XA/UM59e81LFZJIesYjmAPLO1yNI7F4Xh2cHMXne+nKidhYVfD5
NHt6DPPuzfHepgRViJ8Wz8IdhjbUNJ6pQmQ5rfU45sgKvr0yeaoQdqm3dgJz
YpXjM6Y2VThm53RqGq8Xi38GZzpVgV7+Rwxuzh3+NKE9WD52bvTgTiYk2FMN
qQLpfoE9GXNadbn07IIqXAnXuDeDefCq5qjwqiqw1Vt9wH2cuiXRdkMVnv9y
XMOdThra/EWjBrJN9m6zmLNq9nxpZFOD39TXbeYwT1k/8tjNqQYhDr6puEV2
HRFV51aDItLrTty5GhKxZQJq0GugoD6PubDO+FKWvBosrBWx/sXz+eXlXPAF
Nfibphe5gDmPvdnR87IasK1KFuN+Yb0642CpBq9WXftxh1CdIRvZq8GhI2Ji
i5gNFZYnjt1Tg5zZ0BrcGkE89hxeahAXXzCOW6H99Di9rxrsEDu7bwnzEadn
o/MhauBxcdgA93iG1lBlohpopVZ24u5Zcr5akKwG5e3vlnE3kVL+pD9Xg+8a
AuzLmPP75/sfZqrB4HrKOdxeHE/7zErUYDaZ+itu5mByx0qXGsTP6D9bwUzT
wWE01asGBy7rlOBe4SO2/+5Xg2dRQy24+yoS2mrH1GBs9C/VKuaMZdXvj1bU
wGqs8BLuJPXresHratBFWeuMOyI2rsmDkgBiQt4huJ3FJr5Z0hHATm8+H7eK
bewXcQ4CdFXT0vzDLF5YfurYYQJUsody4ObbOVbHfpQAVfcqhXHTpSrXbgoQ
gNZBVx93W8fwp29yBLjATp2I+5qGfNk1YwJsPv3MuYZ5WoDjc+5FAvgIEE/i
dtq90rBiToCKWx7KuD2+FfUEXyOApcIRM9yRBnJrGe4EKBw/9Rg3izT7zrn7
BOAvzn+FO5F1eY+CL3b/2P4C3Gld7w99CSWA53X/77gLL8sqjicRYP7RAZp1
zIqqbASJZwRIKUhnxF3Bs6Tl/pIAD3rojuCuHyo03f2WAPrKIrK4e+xl3IU+
EqBN7pAVbipX6WK7fgLE9lsW4Q40YanMGyJAadLeKtz0igt1q2MEWBUI/4qb
ZSO/M2SOACZpDH24BfykljN3EKHmpTLlBuY3VswU87uI0HUrkw63hMbfXYr0
RJAenTuAW2l3PttXZiJcaeHgwX0mUlJ24hgRchjbAHebIxOSFCKCzA8JTdzG
BvPq90Sw63lvn8Ftwfru/B5ZIijoPTHDfSdJ4s4JTSIEOCe74k5KFy+wtyNC
vkdrBu66Lsu6lJtYe7V9Nu6/u+O6W52I8F1iMh+39o1VSqV7RAjlf/UR96r4
J136MCKEzzG04T5uuXAFIokgTF7oxK0fy+/iHEuEvAs1vbgzF0Of9CRh7YIn
RnCblBqOZr0hQi8rwwpuv8mAf79ziVDKdHEdd87h4n0shUQg18dRbmKm9T4s
7VlOBIZdP+lwFxGHfXSaiND39RkHbtbGu4emZ4gQqCkpg1ttM0OEZ4EIOhY+
8rhvivWonl8hQrlSpRLummiwLackQaMaGwG3ixFdQQQjCYrWec/gTg1SrKti
JcFSwC593A3FN7oXD5JAktxniJuPs4XyMi8Jau3tTHG3/U7UFZUigZfXv6u4
KRi/XbGUI0GJnb8NbmHCpnO8EgnUDKjtcPu+tHyySSQBqhq9iVvCTni06RwJ
Uj5ru+KOmi/zcbhLgqHuwGDcp3MtVTW9SNBzTjUcN80tOkruQBIUKvdF4vYY
N/RuiiMBk1FVPG6Z9FX0KpkEcUF0T3DPWqVu3v+PBP/4pZJxW/dP3BcpJIFD
juQL3EdTolRoyklw/zHtK9w9F2U3ej9j7TMVGbjPdj7wDP+BzYe/5y1upSYO
j8m/JHBrP1GEezHso2L1GglsLxqX4M7Vsvr3ZKc60HK7fMB9vCbHXZtZHa6Y
e1XgTlJdW1nlVQe/eK1q3AfKNNwyJdXB8XN7Le4AuZhlE4I6CIzzfsW99q7v
Lp2BOmRQSzTiHs50uWPrpA4jXo9bcb9wjme381UHfaJ6O24LleIS+1h1KPJv
6sTNTdt98cZLdWAnSnfj7vu+tnGzUB2cvO724ja1AoJTpzow3Yjqx/1j2TfQ
ZVUd0nQPD+HWC6v96sqpAXeOKY5u1cORPQweKhqgX7F7ArfmO11DL3MNkDsS
NoW7Wj064cEDDRBQ+0jG3arJN0FdpQHfGoTncQ9oFSoHU2oC7ZGZBdxzpzUj
6VU1YT6QaRk35ZmfAw+9NYFvsX5lq540NefY1jXBTolrbcuqhZSpbqdgwChq
HTcxq52/mEILPu4N3sAdxLak0xKoBZ2+XJtb+ZM7STtErQ1jC7e37GBqWbXk
qw1JjBlbFpjWjnlCfxqu1LVuud9H6ip6dBrmGTa27L7bJuXqIR1gnGagoKCY
Qcwxj38GP9MB1lOHt9z7vT8jnUsX7B2Pbvk/BiG32ie60A2cW86v5Lt8l/cM
mI8e2HKl0xES/+sz8Hxh35Y3J+MvjzLrAevF7fGTuVM5lQ31QIOVactvdb9F
6EfrQa4/85bLPFYpbJv1gBMxbpn8x3vjM9NZsNPfs+Wj2rvWeI3OghTfri3b
hSd82nh0FpT9qbfjaRIM7Wo7C0ti2+bWZu5bY9cHA8K2w2o2xLjN9KH7zc4t
Mxz+q1ORpA/Uq1Rbjrk9Zmfeow+Dzyi3HFS9Q7nyoAG0faPYsgcL134eEwNg
vbTt6JSo61+TDKBXYdsZgtRfnH8bQK3BtjsjfGcTjxhCYcC2af5SclReMoTT
pds+H931VTTNEEq7tv1KLPd+8oghnCzftm39m+FvQudA1GHbghaZuus3zkGe
3Lap2nO9M7LOwXO2bXefKs47N3EOwnZsu32Rw0FL9DyYYtWLP++WNPeT6PZ5
aO/a9tCJ4fycvPPAVrXt5XdnlXjmzoNH4rY9ZAZcDcWMQOjGtjeLnAoCbhqB
/bltv3S+6EmZZwSXzmxbW0yd5LFgBJNG26arVei4LWUM7222XWsmes3+tjFQ
uG9bYZdeTkGxMWiHbvttjsPS5qYxvI7e9v8MGy7l
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], 
   GeometricTransformationBox[GraphicsGroupBox[{
      {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
      {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
       GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
          GraphicsBox[{{{InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0.5, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"E(t)\"\>", 
               NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[0, 0, 1], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"S(t)\"\>", 
               NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
               Automatic, {1, 0}]}}, {}},
           AspectRatio->1.5,
           FormatType->TraditionalForm,
           PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {Left, Bottom}, 
          {0.2, 0.3}]}]}}], {{0.31246912880656175`, 0.08658783087410749}}], 
   InsetBox[
    StyleBox[Cell["\[Beta] \[NotEqual] 0 && \[CurlyEpsilon] \[NotEqual] 0",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     Magnification->1.4999996423721313`,
     Background->GrayLevel[
      1.]], {0.11529857619110206`, 0.34321174543986555`}, {
    Left, Top}, {0.3877628947840467, 0.06399970108086207}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.752225}, {0.666667, 51.360434}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.5680614219795113`*^9, 3.568061426529772*^9}, {
  3.5690784544127474`*^9, 3.569078508954867*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"-", "\[Beta]"}], " ", "*", " ", 
    RowBox[{"s", "[", "t", "]"}], "*", " ", 
    FractionBox[
     RowBox[{"i", "[", "t", "]"}], "n"]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"eq2", "=", 
   RowBox[{
    RowBox[{"\[Beta]", "*", 
     RowBox[{"s", "[", "t", "]"}], "*", 
     FractionBox[
      RowBox[{"i", "[", "t", "]"}], "n"]}], "-", 
    RowBox[{"\[Epsilon]", "*", 
     RowBox[{"e", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"\[Epsilon]", "*", 
    RowBox[{"e", "[", "t", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Epsilon]", "=", "0.5"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", "=", 
   RowBox[{"N", "[", 
    FractionBox["\[Beta]", "\[Epsilon]"], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.75"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ezero", "=", "0.24"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"izero", "=", "0.01"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"e", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"e", "[", "0", "]"}], "\[Equal]", "ezero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "e", ",", "i"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"a", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<S\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Blue"}]}]}], "]"}]}], "      ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot1a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"a", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Blue"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot2", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"b", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"E", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Orange"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], " ", ";"}], 
  "\[IndentingNewLine]", "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot3", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"c", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShowLegend", "[", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot1a", " ", ",", "plot2a", ",", "plot3a"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Blue", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<S(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<E(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}]}], "}"}], ",", 
      RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
      RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
      RowBox[{"LegendSize", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "}"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plotall", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "tf"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.05"}], ",", "1.1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLegend", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<S(t)\>\"", ",", "\"\<E(t)\>\"", ",", "\"\<I(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Orange"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
     RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
     RowBox[{"LegendPosition", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0"}], "}"}]}], ",", 
     RowBox[{"LegendSize", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0.3"}], "}"}]}], ",", 
     RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
     RowBox[{"GridLinesStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Gray", ",", "Dotted"}], "]"}]}], ",", 
     RowBox[{"Frame", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"True", ",", "True", ",", "True", ",", "True"}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"\"\<Density \>\"", ",", "\"\<\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"\"\<time \>\"", "[", "t", "]"}], ",", "\"\<\>\""}], 
         "}"}]}], "}"}]}]}], "]"}]}], "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"plotP", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"Evaluate", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x1", "[", "t", "]"}], ",", 
            RowBox[{"x2", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"S", "[", "t", "]"}], ",", 
           RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
      "\[IndentingNewLine]", "plotQ"}], "=", 
     RowBox[{
      RowBox[{
       RowBox[{"ParametricPlot", "[", 
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"x2", "[", "t", "]"}], ",", 
             RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
         ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"\"\<E\>\"", "[", "t", "]"}], ",", 
            RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], "\n", 
       "plotR"}], "=", 
      RowBox[{
       RowBox[{
        RowBox[{"ParametricPlot", "[", 
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"x1", "[", "t", "]"}], ",", 
              RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
          RowBox[{"AxesLabel", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"S", "[", "t", "]"}], ",", 
             RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
        "\[IndentingNewLine]", 
        RowBox[{"h1", "[", "t_", "]"}]}], ":=", 
       RowBox[{
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x1", "[", "t", "]"}], "/.", "sol"}], "]"}], "\n", 
         RowBox[{"h2", "[", "t_", "]"}]}], ":=", 
        RowBox[{
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"x2", "[", "t", "]"}], "/.", "sol"}], "]"}], 
          "\[IndentingNewLine]", 
          RowBox[{"h3", "[", "t_", "]"}]}], ":=", 
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x3", "[", "t", "]"}], "/.", "sol"}], "]"}]}]}]}]}]}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.5638355904558997`*^9, 3.563835704468421*^9}, {
   3.563835950077469*^9, 3.56383606512805*^9}, {3.56383613822723*^9, 
   3.563836367357336*^9}, {3.563836441114555*^9, 3.563836444201731*^9}, {
   3.563836535058928*^9, 3.563836589524043*^9}, {3.5638366644783306`*^9, 
   3.563836665858409*^9}, 3.563836695909128*^9, {3.563836848841875*^9, 
   3.5638368525680885`*^9}, {3.5638372255084195`*^9, 3.563837265661716*^9}, {
   3.5638383151507435`*^9, 3.5638383180759106`*^9}, 3.563838362903475*^9, {
   3.5638384377487555`*^9, 3.563838575206618*^9}, {3.5638386112096767`*^9, 
   3.563838657701336*^9}, 3.5638386889021206`*^9, {3.5638388049467583`*^9, 
   3.5638388069938755`*^9}, {3.5638388495773106`*^9, 
   3.5638389667440124`*^9}, {3.563839052506918*^9, 3.563839071571008*^9}, {
   3.563839147339342*^9, 3.563839232596218*^9}, {3.563839314060878*^9, 
   3.56383942477421*^9}, {3.5638394696337757`*^9, 3.563839480051372*^9}, {
   3.5638395362795877`*^9, 3.5638395453271055`*^9}, {3.5638395986821575`*^9, 
   3.5638396665290375`*^9}, {3.563839704558213*^9, 3.5638397404972687`*^9}, {
   3.5638398239280405`*^9, 3.5638399312031765`*^9}, {3.563840014577945*^9, 
   3.5638400676949835`*^9}, {3.5638401105414343`*^9, 
   3.5638401221330967`*^9}, {3.5638401613373394`*^9, 3.563840168990777*^9}, {
   3.5638402066729326`*^9, 3.5638402331264453`*^9}, {3.563840302771429*^9, 
   3.563840436440074*^9}, {3.563840514500539*^9, 3.563840531504512*^9}, {
   3.5638405784992*^9, 3.5638405821144066`*^9}, {3.563840618338478*^9, 
   3.5638406387506456`*^9}, {3.5638407249235744`*^9, 
   3.5638408190029554`*^9}, {3.563840856229085*^9, 3.5638408646885686`*^9}, {
   3.5638410103198986`*^9, 3.5638410835630875`*^9}, {3.563904889849905*^9, 
   3.5639048947221837`*^9}, 3.563905146271571*^9, {3.563905177983385*^9, 
   3.56390518226363*^9}, {3.56390525411874*^9, 3.563905299470334*^9}, {
   3.563905472683241*^9, 3.563905489465201*^9}, {3.563905647569244*^9, 
   3.5639056597809424`*^9}, 3.563905703646451*^9, {3.563905742419669*^9, 
   3.5639057793877835`*^9}, {3.563905869972965*^9, 3.563905882011653*^9}, {
   3.563905928065287*^9, 3.5639059436801805`*^9}, {3.563906210805459*^9, 
   3.563906215908751*^9}, {3.563906296232345*^9, 3.5639063025807085`*^9}, {
   3.563906365490307*^9, 3.5639063658563275`*^9}, {3.563906424897704*^9, 
   3.563906433242182*^9}, {3.563906471104347*^9, 3.5639064759836264`*^9}, {
   3.5639065288356495`*^9, 3.563906529453685*^9}, {3.5639068329810457`*^9, 
   3.5639068636147976`*^9}, {3.563906895527623*^9, 3.563906897037709*^9}, {
   3.563907110560922*^9, 3.5639071121890154`*^9}, {3.563907274969326*^9, 
   3.56390743274035*^9}, {3.5639074760618277`*^9, 3.5639074793070135`*^9}, {
   3.5639075838239913`*^9, 3.5639075917484446`*^9}, {3.5639076912791376`*^9, 
   3.563907827329919*^9}, {3.56390786003179*^9, 3.56390792333441*^9}, {
   3.563908035557829*^9, 3.5639080787833014`*^9}, 3.5639084082481456`*^9, {
   3.563908463246291*^9, 3.563908492127943*^9}, 3.563908626086605*^9, {
   3.563908825166992*^9, 3.5639088270190983`*^9}, {3.563909238651642*^9, 
   3.563909240037721*^9}, {3.563909322232423*^9, 3.5639093344691224`*^9}, {
   3.563909382587875*^9, 3.563909606090658*^9}, {3.5639097046552963`*^9, 
   3.563909707405453*^9}, {3.5639097449105988`*^9, 3.563909747819765*^9}, {
   3.5639097912782507`*^9, 3.5639098366698465`*^9}, {3.5639098902499113`*^9, 
   3.563909890652934*^9}, {3.563909925842947*^9, 3.563909927602048*^9}, {
   3.5639099589818425`*^9, 3.563909959344863*^9}, {3.5639099995731645`*^9, 
   3.563910046916872*^9}, {3.563910148071658*^9, 3.5639101691978664`*^9}, 
   3.5639102340005727`*^9, {3.5639102721207533`*^9, 3.563910351650302*^9}, {
   3.563910421532299*^9, 3.563910510495387*^9}, {3.5639105664275866`*^9, 
   3.5639105760811386`*^9}, {3.5639106580418262`*^9, 
   3.5639106824562225`*^9}, {3.5639107247046394`*^9, 3.563910728398851*^9}, {
   3.563910840744276*^9, 3.563910862496521*^9}, {3.563910926792198*^9, 
   3.5639109604401226`*^9}, {3.563911036075449*^9, 3.563911037511531*^9}, {
   3.563911431340057*^9, 3.563911437320399*^9}, {3.5639114789257784`*^9, 
   3.563911493954638*^9}, {3.563911525254428*^9, 3.5639115374281244`*^9}, {
   3.5639115750762777`*^9, 3.5639115880030174`*^9}, 3.5639116582250338`*^9, {
   3.5639116984503345`*^9, 3.56391176008786*^9}, {3.5639119457344785`*^9, 
   3.563911983828657*^9}, {3.5639125210403843`*^9, 3.5639125490409856`*^9}, {
   3.5639125979987855`*^9, 3.5639126611083956`*^9}, {3.5639128670021715`*^9, 
   3.563912872138466*^9}, {3.5639130702837987`*^9, 3.5639131278820934`*^9}, {
   3.5639132526262283`*^9, 3.563913434192613*^9}, {3.5639134979902625`*^9, 
   3.5639135222086477`*^9}, {3.563913559982808*^9, 3.563913587937407*^9}, {
   3.563913643129564*^9, 3.5639136454726977`*^9}, {3.563913893811902*^9, 
   3.5639139485590334`*^9}, {3.5639139840870657`*^9, 3.563914064888687*^9}, {
   3.5639141429901543`*^9, 3.5639142000144157`*^9}, {3.563914269810408*^9, 
   3.5639142840542226`*^9}, {3.5639143487949257`*^9, 3.563914404738125*^9}, 
   3.563914455294017*^9, {3.56391451899066*^9, 3.5639146165662413`*^9}, {
   3.5639146469249773`*^9, 3.56391465099021*^9}, {3.563914684638135*^9, 
   3.5639146860572157`*^9}, {3.56391471638395*^9, 3.5639148044359865`*^9}, {
   3.5639148449423037`*^9, 3.5639148622662945`*^9}, {3.5639150099297404`*^9, 
   3.563915010347764*^9}, {3.5639151494727216`*^9, 3.5639152487053976`*^9}, {
   3.563915326603853*^9, 3.563915346531993*^9}, {3.5639157813918657`*^9, 
   3.563915788211255*^9}, {3.5639160749616566`*^9, 3.563916084421198*^9}, {
   3.563916863145738*^9, 3.563916867956013*^9}, {3.563916974604113*^9, 
   3.563916998251466*^9}, {3.5639170471642637`*^9, 3.5639170731837516`*^9}, {
   3.563917169124239*^9, 3.5639171692732477`*^9}, {3.563917225221448*^9, 
   3.563917281815685*^9}, {3.5639173866606817`*^9, 3.56391743454642*^9}, 
   3.5639174785899396`*^9, {3.563917530621916*^9, 3.563917555013311*^9}, {
   3.563917726810137*^9, 3.5639177280732093`*^9}, {3.563917953474101*^9, 
   3.5639180072371764`*^9}, {3.563918038582969*^9, 3.5639180432792377`*^9}, {
   3.563918079533312*^9, 3.5639182234085407`*^9}, {3.563918264612898*^9, 
   3.563918265321938*^9}, {3.563918306125272*^9, 3.5639183204030886`*^9}, {
   3.5639183512768545`*^9, 3.563918397598504*^9}, {3.5639186015911713`*^9, 
   3.5639186261025734`*^9}, {3.5639188701865344`*^9, 3.563918974285488*^9}, {
   3.564081080539436*^9, 3.5640811343645144`*^9}, {3.564880574348827*^9, 
   3.5648805849744344`*^9}, {3.5648807151418796`*^9, 3.564880717960041*^9}, {
   3.5648808318375545`*^9, 3.564880834966733*^9}, {3.564880887672748*^9, 
   3.5648809435619445`*^9}, {3.564881002612322*^9, 3.5648810078276205`*^9}, {
   3.564881058793535*^9, 3.5648810605646367`*^9}, {3.564882586727928*^9, 
   3.56488258833002*^9}, {3.5648826193637953`*^9, 3.564882626198186*^9}, 
   3.5648828797036858`*^9, {3.5668460139647665`*^9, 3.566846039283215*^9}, {
   3.5679698042792788`*^9, 3.567970064740176*^9}, {3.56797010256534*^9, 
   3.5679701033263836`*^9}, {3.568061384082344*^9, 3.568061403272442*^9}, {
   3.5680626130556374`*^9, 3.56806263129568*^9}, {3.5680626662546797`*^9, 
   3.5680627659563828`*^9}, {3.568062819720458*^9, 3.56806282150056*^9}, 
   3.5680638341234784`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYMgLhC8sPfay+73LP2/PYx/lteMkyVW
wAHGd+p3PbDcXwLOT9X/xWvIqwDn+2qmfhRzV4HzN12pLT1poQHnWwtprWep
14Hz039Pmrs0wgDOzz/23Hi9rxGc3xXFpvo3xwTOTz5enWaYYQbnH2SXDMyO
tIDzDQUbpr0ssYLzEz7b6vjl2MD5C+cdlfneawfnb+6zun0pyAHOL9llGzDX
xxHO339q6afOaCc4P9Pdcm9mhDOcP2eF4dbsLBc4f+LnvY0F5a5w/rNVpWUZ
RW5w/hG3STOamtzhfEb/W4/6GzzgfAbHbYwLKj3h/A7x776X2r3g/IKo5EPf
m73h/IeNJin2U33gfJHJM291LvSF85cJaFUen+2HCK8ieVf11f5w/jyFBTK2
IQFw/t6aXwwZFxB8RW/2P8rhgXD+lvOa3TevIPg9x/4ZKMQGwfmTi19mJdxB
8GtE5fiVIoPh/JWarKdKHiD4bF8YJQ/GhcD5yw021s17juBrJq3y+5sbCuff
9ty5KfQ1gn9pcZWufXEYnP9jc6CN0icE//+Ooq1teeFwvreBm2vNVwT/eKx+
ZnZxBJy/bkPB9///EfxTE28Xvkh/D88PVuwBG7buRMgvufH+VreeEpwfM3vT
jm49RPpN83rbfNHVGs7f8Wfy8m49JzjfNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwBLhSDZ
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.5680626321567297`*^9, 3.5680626705099235`*^9, 3.568062702019726*^9, {
   3.568062733319516*^9, 3.568062766697425*^9}, 3.5680628221645975`*^9, 
   3.568063836215598*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwUl2cg1t8bh1Fm+GWPyJ7J3uP7ve09n8cWki17ZGYmJElCUknKCBGp1JHs
JBUZEVFCKFtW/Pu/Oi/Pfc65z+e+Lj63QCsPMhISklRyEpL/r/xX/t67ffw1
pm55c9z8WR9uhCjNZrwOcDvG28HVFE/xd3SK1IdPHYUiMyqauO47uNYV3ZYy
c3b49HR8tDL9Iu4htUMnQ8cLb/vMTPQ6g3FTMY8VVn1BeP1i+WftUzv88ae4
8DfKovAhsu0bT7AWrsYo/uhwvAToTNEYv7QRw712c27dt5OGXyaur9deMeCB
nbNyj0xlwS2MRT/20Q6W4UAh9PesPAiHM45SR37DznTFeMp4K0L5WZb1nLNv
sdeUHJZ+9srwWM7O8XtbAybDkJD3M0wV7AYvPp4+fAtzXdOQMDurDqpuN/If
tVzA7t7u4PpzGQP+1V6hcdkArD5LdazfCoD7eFRGRTsRC2vSsLhlogleV0Ja
e/Iw7FXP/dV0Ry0QS+XkHLsqjPnoqyAfO21YO+RhfNqbASsql3ni56sDacLF
JSOKqxpX11Bi0DldILVL4ZYS2kAzleER3iF6IN0cslHHRNLcrpdTkJSkD4+q
b//6LbWMSM1Hv11JMABJ2TFHM701RKLZSFocZQg+xEyXN8fXURrbH9P+i0ag
/oHIvnF+EgU5nGn9k2wMg+bV90e+D6OpRHl3/LoJzH2OLLls+QkxX7sxmn7X
FF5SGYU8mniGHhwVj+q6aQa9a5rsPPx56HUIj67IQ3OwYq8Yu6J8E93mLebS
IFrARf2tjueSVQjF7pB4f7AAguQJRYBKxGdMuSdgawkNL0ie0C1koYb3Ypc+
f7KE7om5rdu5fiizc1+a95QVFGlJKJ/TCkXXQn/6un6xgnFeP/dDqskoluX4
f/z2BODxmJVcvZSAKsTIe8ImCfCb4fA2b7Ybolgn5XjtTIQPKf6M0QuAyqTr
zt+eJYJe+BbF+SFjJOZWafbX3xouzK4ssJY7oDHD54+tF6yBvmLMbk6MgPrv
RZ/EQ22gYJUnEEvG0Va9pTr/qg3Iz4rvmxPV0MGzkCepAbbwpTCf+majPDKW
1tON3bCFyW62MUyXF3WdkvLxC7WDNLqG928sOVFNbdCfgwM7+N3o+ryDnBn1
XB0LnvNawi2bPw4G9rXivH+fFv1VpAKBlqSbYXQP8bQ+NG1twwxa5zUNBG2v
4RR/uH4fVuACrbKCGYlfsbh91aMDAXF+4HB335nccMdJ4oPllnFhaBFkiiqX
McMj1giMs47iYNf5KOfPLQU85bDohkiBJIBrHP3WX258wRV5ixNkgEKh/8C9
jRyPPXpOwuaUHPzQyh2/6LGEbR59rZvvqwC2wgMP/iYMYTlePY59rkoQesr6
77PJFiwqszdU3EsFzooO66ell2MGZC5TN4PUIH/LLUa59SpG8iaxlD9OA76J
XkyhKY3CDjvf8um7gcMrF7oaU3QayxV8yfLs/b9O0C1NMlw3wApbg+8yfdIE
q/+o/z5MlcWY05eGtz9rQV+tddMvQS6MLFLhue+UNnAVWwzWlh7GWPvOHfu9
rAO1/SMDl/h6kfp7jtjFdV2wMJ9UyeE4QINbyRfDd/Qg6Ps1k6g/G+ibUaNG
OqkBRG6EShNSlhGJgcEq218DIIvzZpn12UA6VUMiz0mMYN3h4rdS4Xm0p3yS
6ge5MZT8mYguS/6MRH8bX7tJawIvLt/dZxgaRtE0Xnfcj5lCxtbgchx7Nxr/
OFVRftwM/F/JfrxeX4YaXgu6nBMwB4H+z0UXpa6ig8V8lzlmC3A7rFu7pnkf
1Zi9y7LKsYBZiqngQz9q0NL3hP0OJktY8f7Ut+J7G/leLmjbv24J0S9leemp
4xCvMfPEHrsVbFL/pvqW74WOcq+bthRZwZuveu42JXEorf2QxmtOApyt11pR
TE5BOXeunn1bRIAZQfsH8xUhaCQreaWQhwj8bmnB88ctkU3O57dS94igJjMl
N1oIyPtN9cw7cWvQ6coK5tG0RmRDdQkVVdYg9ODBlfFqBzS0yRFkJGUD55tO
jqgd6KEfJ2Yaah/bwGBeE5XHKTUUq/gtkihtCxLZT74XlKii+2FOcaSPbYGi
riTh8iNRRN2lOhwqbwf59KQ/C2Y5kSqlRe2T53ZwYPFy/jw1J3qjmvx80esr
LkL25qUqdTf+7df46ciNQ/Czz35q8X4dLv57e7PKnhFIWe9qHnlbgAtqy9ja
aHHCa3lXY4/QJPzrr0+plcf4wJSuMonMxA8XJvrlJGsLgUDDzihmScCZp+e0
7YzE4KnaD9e76uq46xExq7xLJ8HMccNE47wALiYpemhuUBpe/j2YvP/2CB7h
J1WbNCgLqjFHBB6fW8danpxR6FmQh7CLR0IWB79g0WwCU/HTitDjcGgiJbkD
4+4J+WY0qQyqeatHxRceYS/Tl160rqqCsZfYifT6PEx6wsX72bo6WPEkuGg+
TsCszsu0fWPCwXRT3jRU1AsrtY+J1L0K8JQlbfMurwV2sXk40i5bE5Yzdz/M
tShh8xVGP14XasG30JhQko98WKOLktp8kTawkvq23OigwexfEOeqqnWgpfvL
KpvAFw3PqYXzko26sMIer0zFtIsmPu7tBzTqQdXP8TurbHtowEBwgbxVHxhT
lvbnny6hBOOr8wPNBmDwlblAt2AdlUR05kogQwgKo2e4uLWMtEQZH451GsGe
Ysrdac0vyKR0uNKw2xisE404WjeGkWTnO1KrEROo8WJ/lk75AUU+1tDimDSF
pD2xpz2+deikj8jZO1/NQEOK5V+6XUWuD0TIYufNAVi4Xyub3UUPnjYO6oda
AM+u2V4s1CCbWnTAumoBNvV147OOpUhv8b3L1QhLgKM7tB7RF5Av3R35hU1L
kLh65AZ5vCfqC47Cl2OtgNjK2hZqF4noizYHsnetYM5YpHzfLQVdHB1Gm9EE
+OF/JdVIPgqBU/s4JQkRvKqm3iok2yPJNv+QrQQitGdln6Uo10BUcY9kFamt
QdxVz6mowBKxctV4ES5bw5MFnoP4SEdkV+zDYEFnA7mBFSNq50zRFy/plT85
NhBBS1zPvKOOVDduOKgx2EK+oHE4pYMa6s/z4tDJtoW51on1/4alUGUM0G8x
20HTq/9OBfdxoYTHrzKz8+wg6nu2e048J2Jvi9b+dfkPvtgqYj7uj/BTtDnD
SZG0gDkWBG++KMV/1CT271uxQm79v2kokYXPVVJdqBc5DsZqPk1vqyLwAd+M
yFvKAlCm1frVgN0V/1xx7pOTugjslqvtzhfo4yNkrybD/U8A5+KJmPxMabzi
r3DB81IpMCz88OwBIxtefc2q7+wHGeA4/jTQiYYUT37SXC72Qw4WliXz8pjn
MImzx23cfyqAbvP04zvZH7HKp8FDXONKUCHsJrAR3YQNmgmT0/xWgen5jdo/
EyXYp+g+ivDfauBK1ROv2XMJ+1B/bzKTHIPsphNG/XWh2Ojtw1Tj/wHsMJJU
nOF2xFKW9h6L02tCTSv3M8o0bayq80hPH5sWlH16YPV6TgLDvHN7ZDi0IeHU
A3acnRUzz5ZTWhDSASNZLvrnQ381Pk0WmknJ6wKh1/KBMcs8YkD6UZVyepD+
U2FZLZSkuZfnyNFYTB+u0y9ovv9vFa2aGGTTahr8y7vcm6zdKyhB52DbUc0Q
JtDU5qjLP96ammnS1TEC91vZ8wxB06jR0MDjt44xZG65mFCqj6DDyi0xvyxM
oPFUXcTjkSHUZUaicc7ZFJzTFptIbrxGWisXGJRPmQFlv9H7d0N3kConv5W5
lzlsmEkcM5nIRX0UXM058haAP9CQD6esQI0/vuufqrOAirOXqjsfV//jNZ2/
YQr/eMn224l4+jx0RfK0yNknlnAjdOP9j4RQNJSWfpFezQrahyr6pP38kVV3
gFP2SyvQYOupsNFJRGS/jj5YUSEAcrsqbElIRrfdjY8VNxNgoQF+X+/xRYGv
tcglcSJwaYarEvj00fnTukJeHUT4RfKdu1VHF3WzVBV6mFiDEWHBcM7fDv2+
8uTGwVtrePbFYbN21hYRTXv6dCxtgHV38cd2phb6vXQz0qffBhQyWeUD+NVQ
8znxfH9zWxD6pFBSUKSMIq0sp5oHbOHxhYzXU0UCyJtRoXiJYAdbaH6KXIcT
rTtODox+sQOBrr7xK4LsqDuz32DD6z3OeNBS7yjxFteZCWp/8okUJs5YZ+WL
NuB7f9kS7BwZ4DTk5+owFuFyPi+OHBhwwJ47h+7GUApekuXV45/LC4siYSJ3
hAPxJmxO07RDEH4erX06+9kaP+NU/yX7tSgIvGy68o4f8L6sigRT8pNgf5yy
KlhFGO/OPfVBL18a/pJRBzr4/IevFhxZLbgqC8KXT3H1OP/BhKgUqs9UycOG
UVPPectJLCDw/T27B4pwP/JQApdRN7Y018ExVqQMl/k76MvkHmMR75TEhupV
4Xpasd3lhzew7jkzo+RadUht6rkxQZeMRWftLi1+wED8+1+bZ8G+mMT6qBht
CMCqk/BAhZUVdv5lxnR0gCZoPrhPxL6qYkTVrQWhGC0ozzs6EUkniGUTlPcq
orWhcpCK+tclemxHps2MNlMHjvre+3hY8KdG7Dwx4X2eLjiJ8KlOEraQG/a8
yS9XD1r6SFh4c/ZRr/6Ypk6JPjQMVEfWtiwhePdkpu6OAfRdIJe/s72GPjpi
xp43DYGW50qxQN8q+nEnZc+mzAiG9Unvv7CdQM7xtxp5HxhD202iHD43jKgE
Seu7G01gu75a/IJ5P+os8cv62GIKH17uVpP8aEDzL8tD6pEZ1Jy4GOZOfg1l
Z96797HHHDxX2J7S9d5G/GdPRLWesQBfisqrlc7VKIPVKQGfsgDLSXduFcI/
3rq5UD3qaQnrXrL77yfS0ZWAaZdvPyyBeeSMbZuENzrJpa5M5W8FG/o2txNR
OPpAGXRna8EKkq/QNAgsJCOyrWhPWl8C3L029+f431i03jpNwJYJYCfKczpy
2hkVjj3t+BJIBNXCm/JJ5Rgasam1890iwrfO8BWFCHPEi0s4lsdZgxKP326p
hiPiDGf4ZrVnDa2El8eT31ig4QvWV44l2wDvlPlW1oAGmhPx9/KIt4Xd73OH
7EVk0Y51m5gquR1UbsUIPfY+jvZ15ZuXi9dw7scEjhslLXjzYSHVFlsaWK4Y
7Sd9VIY3Nt9xrCSyQGf0JZFl5qv4nw85Kk6S3KBQVXKYWBSF5x3hfulaxw98
L8dWDjm74Wdz15OFm4UhOsvzg2mdES4Skx5VMy0Olabxb7Z/yuKsiWWdQcel
oFcgNMHQjBM32bl48+1VGZi1n1M4onUIJ/leOI/flYNGtZzYv+cXsKvNS+/+
ViiAjfy1z9+mBrDb/x2/sXFbCRhcadq9fiCszD9KvbBSBSSvpgayXbiPZTWz
hqU9UgP+9B9FR/yuYN7NOa22rzWg0vv4Gd9zEdgX0wH19i84eLqLlXeTumC0
GU7uK7//6crvsI/OR/Swe+3NCisbmtByV1ggzU4aq9jS/Hh9Wwtas6S2g1bY
MdEU+a3KQzpAnRPkLtdHioXbUj/JYtSFiTGMSWh8Egl31kYbM+vBvo5RhJQw
SbNFZtfbSC59sGGQtlJ5sYbmjQ9mjPgMQKf8P91h9hUEnQKbKlyG8L06UIk2
dQOxdDkHx/Mbwa/gWfJoullk/7qp0UfIGGrMimMino8gVqbUi+2S//wgQCv1
c9wwKq6S+/1L3RSsjlBlLT9sR9lT9aeWNczgvL7VyCG/e+iP/z27M7rmwJ/1
x1u7OAfNbH/OQoIWwC/OPhIjU4ZkC+0Whu9agL/zhQnryzXoZdy3uFuClrBx
pVwgmrQQ7Y3Hhj+5bwlSjLW3yl6fQ7s/+x6Ti1vBvsQjuxhSX1QXImNdXmUF
3+VslJ6wJKAOu4xge3ECeJ3ejEccKYg96Xfbk2oC+CZ0Lme/DkSComdi3KWI
cMh6S8GbwgTNR12JNG4gQpCF+CjPPS1UsFTVckPNGiLEVwR9ftugrcdyl4kv
rSGzozoEsu0RC3/InX+3CdcDF9ItLukgblsKqincFqLUPesT+1VQ1ncbqclW
WzhOoVqu8lMI5cuwaxm8tYNfAkt9OZYcKD/fzGvp8iyuATWl/VodeOKG0YEq
KwU0fjSjyJupwe0nxvxJ7ZjgQvHUrY8/ruMs3GUl1WrHIDHO7cS2dQLOZaql
PVvCB+TnGDZjF7zwaz6/vz1/LQTx2XLtnUyWeIff8Yc8A2LwmSyAp6VBGV+9
WC7wlUEStAmfB7+z8+EZXasK6cwyEMbrS6dXQIVvaxACznLIAQVbWW714grm
eCYHSZ9QgIun/QVloj5jqa8ijpfxK8G6weRmKH0bZvyQ52GTgApYtTmzT+4+
xMj0ysweyaiBxELCQiRTLlYwEJT6S1kDJkZpGSx04rATAV55IzY4POPvtjzQ
c8e4Xh3rOl8LcNjh5NR1RxMsu0WQTvGxJnDU7yj27stj8Ry3Jk41aUFlG7vT
k8c82Bc/xWjxV9pwJOPXy+44SuyZzkyi6Xsd+JB7v508rknDciQp7vKgLmyW
RQQ52f1FDh6gHTKiBxZKt6tDBrbQqKF/bteUPvw5fTqjnHUZtbw5+3tj3ADm
G3wzh1g3UOhVs4nViX/8U2v07E/HL3Sn9o6964wRVEiLPIt/OIpU3zDcCZk3
huLxmpsTm8OI6F1oMbZtAmE4iefHb2+ReOt/m64HpiAsvbV5s78KBbE88LhE
ag55mS69F2qykfghLdl3SRYw2dGqSNJVg/iNeOJ/k1lCRrOcsFb5XTSi3sBg
kGoJg4qXOqsaEpFulT31OqUVLKvdM/vh5IkCuxr1RjKtgKvU29+FJAYZS8dR
iR0hgMfwzfHyghREi+RZpi4RwMgnazK2PRxlbtzz+vgfEaZi8n0ElomotVKA
hzmHCJt57lfr8jCkfK+GlozTGkz9VyRnwwiIdlsqbL/IGjp/iPMXmDii/Lev
wfS4DfS37lfkrRuiScMjhE8lNrA+IEj8NaCGXpK7veW/awvp1kQKtt0TyOEu
Wn0iaAfU72cvx1UcQzLwuvtn9C4utPfn0FGqJnyP6SBM9wY9fDK+t70iXIIz
3zljSLBkg8ff3h94PsjAP6ec/0DDxwPTru63XJnC8KM9f+RHXwmACeX9TFoF
J1zv1Y7gtSYRWPV5IeP5RQfPyFjX19g8AbV/vSwebEjgxzUG5BNZpOGwfilt
nTozTn+Sm5T+P1lgO8HMHCS6j1GkffNkEpMHe88Aye+sP7BuDtOJHlFFQGIF
84HU7//5ZQeTzjFl+Jp3vcg29Cl2SHrgXZSMKuS9P1r87VIxxqmUeuP0SXW4
VOQtevt6GqZc0bD/2hD7V++p/6q1grHOvDsrtjIAtWLvNSSbbLE94i1S95Oa
oPBBa/KYgSbW2G3nXKWiBW8qE+SpcsWwT8Mzbe+UtWGDq4nd7gYTJusrMffe
Whf6u7jtm41X0F79xDlqgh60Wt1RfBNA0mxQb0aMd9WHYVGNO7Yz//q3dfRv
nIMh6Arw2s0trKOnewGHaT2NYCOl3I5S5xti6h9kCnU3BrJnjPFhO8No1Wkn
kDXUBFqV6Jk5Pw6i38u9l0gSTGGZpP7nkacIrZPYdcTHmsHttI2GeLNCdL6z
2Fgt3Rw2SxZuyXflo0Ym519eOhYgUzJA+PqkEqnKBJZ+a7GAoY99/wkZVCFi
3f1YEz1L0BNK6HbLzEH88bqf+TssQWvGJzFNPgjVieg4sZlYQUTRh78wEIRW
uavORPZaAfe1vbMFhCSEJ+aPphsSYFj5dyKFSBIS1C8PyXhPgFEhqlRTL0/U
5MB/5Y8ZEUaPs7nMhWsjRsPdj0lDREgrdD1t72qAttQehsmcsgaxffOpllp7
NH1W6UHlmDW4pXTr8pRbo2uR/PuabjawHz7LeGoLkHOBmfCOsy3k9Wqo1f5W
RG6vja/dmraFRdfDDCav+JBlarmH/287aDPoE2b1YUWd0sFeFN6vcLuxezd9
p3vxMLemcGI7CXwzOF4XeOkJPk1epiP55Sg401BdvzdxC1eNJfEk9LLDhRvm
2m+FUvHDX6XPvrfgheX6/sW4e0H44YYHHLKpgtBsIu2TqmGLZxSwi52ME4Wp
Dm0OAdDEUz78ZBNrlQDx+sQ1shciOLvBluLmOWno1sFfGj0+itc+2mYsDZSF
g/MbE4e3tzC7Om6f2kx5CDETrlZwmsK8bwqR615UhIwO3VLF928wu8hABYEY
ZbhNSTPaGlSPEZfGvrrkqsJTkfOSnsY3MeYAvRfeWepwywErue+YgmXluVKE
PMKgn9xh1FTrLBb0OiMp0A2AlLjJ4JpMwKLU3DkzT2nC6ssr+VCmjmWQmS/Z
+mlBx/rM6yo9ISz23bMv6T7acO1qSZu2+VHM2H+HVD1GB5TZ2pUy2n5rUARS
k/Je1AVKAXahT282UWlYPrtvsh4saCnZXI48QAZdiv5ncvThUIS+1+buEuKl
757mzTaA+/3PPQfvriFvs2jh5AxDIHMu5ZRIXUONYxr3c/ONwMt2qeR5/lc0
ezZBnfa6MfjwPlfI/j6M1vsLjxx+YAJRHNUCo24D6FdhUsPJOlOw6TT9G/ux
EXV7/gxHVWYg8yjpXZNnLiqPPx2212QOhyZM/65sFSHXzh89B44WoBVNslDy
vgqVGj5sGRixAKozgg6Pv5Yj39Bt4oGzJVTTqMa7mWcifp6LG6fGLSFss9f9
wgMf5BR8S57ZwwqeCU1c+RAdhh4jiQsS01ZwfSgy8eSNZPQqtVc1/zQBdBke
Gx07HI/MNtez7OcIkGT/JkBgzRV9mHVaMvMignvQQeh/mzhqaav1O7xMhJfQ
zMty1xSVWix86g+3BuOmEdvQvw4o2sXD6NOaNXDW0kxTLFmiT8zezidjbEB3
7izxZSGGwpYD6TcjbGHqeZeOrLsc4m9LUXL8awvNZV+eJnnxoBDKqzEhlSs4
Sbreyv6j1/hSQsCCsz41fJlvt5k1r8DvdEryJgwyg/D4eZzpZA6+/334Wm0d
F4wtN538ohSDbznOnGr15wdJkvv3D905gzdS1zseiReGp5l0BY1nTHCzp787
jIrFIXI6/0WAsjz+rnX2lMmYJDRsXEksYeXCi6r5yWJCZODrikPeRuRhvHk7
7YhxvBz4FTd2d53+hbV7jaQbZSjAnN2KO6XIIFagFrYzFa8EIVc77ZzaX2FH
//LbfUtTgc7fiywXdh5gfpNN4ozZapCp4vlupT4ba9DOkNO4owHl88d5Pxyc
w5atlQmGL3B4rERmpXXdFbOwpUXErwBubqfXKYP0sdvaBX5kPzTh3QpLioOn
DDbRUvCp66cWvCR99PdHPCfGst8wkrGqDVw8N4O91Q5hnTng3UyqC7X/pTxM
ph5BdUYeuzcP60FGzjVX344DlNN6X+zcEX2wv2/tYNG5jjzfOjD6MhiAYnnT
UkzPMuKlVFwvpzWE9Q+H2y7Hb6Cq54UmRQxG4Hk7u3s5fQ6J/w11KWMxhj1B
F985ps/oDokPXS23CZiqFvqoPR5Glx3f6YlJmEI1ixn5a5tO1Pi5J9lE0gzc
d4I0bcLvoyG2aUd/eXMIoXrHzNJ7FYWsKf/p57IAMqm8PGr1ByhonVGDpdAC
hp+s9z3prkFDtTLNMlyWkFczlUArUoTqn2Rwjd6yBPGhfR037WiUVRhskMhn
Bf23mITaKrzRZFeOZUOpFZAduVF5YuE8ekCvb3uZnwDsBv5f0+1T0OBRKID7
BLhH+17bWy0YnXcMbYwXIULtqCoy2DRDvKnyJeghEcQF47ZH0zVRglP1gJyc
NSyd4By/wmWD4tpXKeIbrOEsb5d5lZQDiqDtpHyjZANNflK/B5/ool69sBZO
ZVvQKnasFdRTRZxV9kNBTbagonI+OkhdBJ3npPq2WvwdZ7nQP8x/sxN/HJxb
+5mcHJykFM5pJ9fiWjO+ssMjjDDCI1s1b5KPc0kv7pG+4oSzNlh+qFMifv7W
kR8GLnzw8EXwy8jLPviXiaqm20lCsGNu8KxezApfLEv+8yJLDCRzuhRLfFTx
ijdzTU19J4HnE82DeE1+fDT6cpHyhjTcot0OjRCiwZ8RNa+c+yMLsqleyadF
1rAs2piouCMKsP7C96I+5xiWsNAbf+2QEji3yIWE4O1Yg+qbTjIyFeB/Zem+
+a0a++plTK7CqAZmWG8fs/11bNrO+08/qwb0Nyr77WvFY1hEb9UpBRzmKrg5
Wh56YK6Zb3m+FQOwXwqtK8bMsEx8X0v/riYoqmz/KbRRxBqm1qauVGrBqUcv
F1+848Xe/Gh0oKnRhskoys1JBmqMKoFbIa5ZB7IHqmknDD9qfHFS2h/v0AU+
oZ5zV3X3UNHN43eDuvTgXL/bxnzCDrJ50/1q5qM+5C1Gn3KaXkLFNPGL7n0G
IPV9OVD/yzqiScl4/l+fIdhO0rVKvV1CQYt2ZLeHjMDRMwT6vcZQW+O6oPNn
Y+j/VmWlsD2MNNnkK1h/mgCBx/RoyOI7ZNkkzIWWTCFXTtSmtfERMns14319
2Qx6bqg9r+rPRt6n9pJpYiygyTgxc/dKDVKPC3iVtGMBr45PJ/Zul6ArzK3P
zp63hAI11jydlGQ04rR3O/DgH78omPb64J7oNhe79nSKFdAPcxtvP4xCEjMq
v50OEaByaS67PDUF9Rin/vRL/sfj1VzZ8cHn0IxoQ8kiJREoan6SVPHaoq3G
boPUdCKEkTOzuP/QQLxHH/EUMVjDbHel7dBFK3SVZumX6HVrSNim8hUKckRb
T1gq+lhs4JiioEHSPWOk3+ceUl9gC3IRHeuWQydRKenxVL+UbTwX6QrcrX6B
S2QbCE+n0QFbTOK9c5738L0Hq3Ri/aygdPR2aLhjJj6Z3ybuUnocRKfT/vyx
DsdDOF8PqcUKAA2vSj0lvzOeLf9871yMCDTOT/rMSOnhdZ32uZ/rTsDR3I3a
pg1JfPXFDMnErBSQkDHtv7rJgjtPPvVCSzLQIrHws4CSBG+//eHicUp5iGBv
1ORKn8F2WhUK2agVYcFAn+180ges9tKxcOk9JfBpMGzPW3iGnX0V+/P1f6og
wkcpU/LwLvbHTtxigU4d9l/2a8kKZGApklWBZSIYUPHcvxcdFIJ94OyPLeQF
2PSp/D3qZI8Bv6lDF7cmyHKx8j100cLq9GVzkagWPJs5kGSSP4FRF2t0HYhq
A9+dIvWkd8xY8v0zNw90dIHkyELss4DfKFX52pa9th485eN6nxJD0pzxU+Jx
nLk+YPUVDm1+K6j40K/dRSNDiDcjTbaQ3kBmS5VfRa2NQNllUfuiyXc0TXfl
ZS3xH19UONZ+YB5BMUbjG6RuJpD+X8LNTLchNHrHc1ot0BSocs9iw1It6Nh2
wMLYWTPo6xk8GfWjCDkFTZnpRprDQ/8BuUt4HtKiQ9Zx6hZQWlcuGztdgSIv
iW3yPLcA5yYlFeOj1Shgev3lpIYl+A/nUj/69+ojNoQEfWQJlxwEisxQMNIZ
mVnJ0f6Xv0hl43JwIOIPpXNNabeC1EqmtegPiYhXidiCNAkgtPCZENGThKYG
t/VYugiwaNnbv57qjZizZHsY9YkQUjByek1IFxlYF++uvyMC11jyDd0OPTRZ
/vDiW6I11Eloiwyz2SOf85s8gwPWsLI+ezp9zAatu0V4ttnbANmbr0syjZqI
Pu3lhJytLaxKvJbuGlRCv9LNVCW/2EKPjhq2WsyP+IPbuUp/2IGFI9OokgMb
yoPNmrXLw3j/lpZNTNYbnMlXhIntBxmYNzev5355jDNtpr1IGmWATyKO9qWn
C3EJm4i6yg4OcF3JaP16MxkH7LYo7QgvTMzM6P4n5o8HvRHz9T4sBDaS44zZ
l4i4Oq9Z9jq5GMQd7zEflsJwNlOfn8EGJ6Gk5tl9jw+CeORUq09+ozS85z1I
tc6kw+WTuD9erpeFTl9+tDGxga06m6yw9sqD44Fv+ZXqCSxMO0rrbIcimN3V
Pboz1oml2nPt5zQrwzJNxM7JI3XYjYfXQkwGVCFHZSdpR6AAiz1j+/lWvzpc
4VZOmh5MxDxT8z57rWJAYfi9nfOVNzYnfOJjeSJAyi3SnlcylliSRl2NT7wm
+Bk3bLdhKhhPyN25tQwteOiXH4DP8GP3Pj891nNJGx7xsHCtFdBiKx7FB+cf
6MKJsEJKmtZtxEs15uR/Xw+e9e74RYb8RRbd8axCj/XBL94g5fDDJeSaeW9O
65EBnI02csdM1pGqD1mQYZUhtJPZh4yvryBm97cEjqdGoEFzPH1AbRwNXm2S
VnhqDKnokL7C0jC6U0n0Dv9gClJDVDlu7PWIlsk7sKLPDDjGbvn2bV9F0wzB
Ihf8LIDC9Wix+Gg1+ts2TtEYYAmxOtmSsgUX0R7S7PH8bQlZPzta0/j+RYll
/fP2NSuYu/niSrdkCiq88oldYIsAZXF594w5nJD7e8Yi38h/eTquEx8yo4Fu
nvSfirtgDRY+tF/EvBzR8wwU9fGwDdS+fdqIBZuj0U2tFupLNiD7c3bL5IQG
OuXi2/Lpoi20c1LzOB1Io/45Ui4OOjuo5Dup236JG11KGSYJzN/AZ/JYF8OM
XuFZaWNpfN5HgIc7QXVZ9AHe13g0/9MAC7C6DtJW0mXjy8j0K+VDbjie5knN
zRGJy78gcB6s84Nz6y3zizKncX4exSrNv8IQ+kX7yBS7IU6CC55kFDsBVaPl
JSfqZHBX3Evq+mkp4P7Usr1cwo7v6f2S56qTAS2u0stJ3GS4Vm/VG/k2Ociv
CHii/uIn5sxCyVj3RgF6H3SJstf2Y6Xfu5Som5Wg51WCwyj/SwybeM9r1asC
rvnmX/4TKcXqikLQfp8a7I9IBThkXsa4VG5ahnzXAHk/tfJOqnCsWzdAGN/H
gWKIYKC874SFSS+8O0OtDXu2w1VZUWxYkebe9o6AHlzkD9S5ZkPSTG/z0z/6
pD7IyOS0235aRa4XGLZ6ThhCgZYC00bMBjr/iT/PTc4Irmdkr609+oHSLpDS
SygYAxPdFIlCyAi6LHSP9DNuAuXCx/+qKQ4jn59FSrmmZkAXA3W/c+4i9nY3
a3sbcyAfLNtsL7uG1vHbNworLKA2rCZVQ6YGlRhd06A+aQlBnw3WUrfzkR5F
YF92tSXMW1wTyEsMR94qEtwZslYwwf35uuoNP5TE/cGuqMEKOMRrwxxqE9B0
ybtLQrIEyDCP8mxoTUaOa0VL4o0EIPcyqBWQ80c961ZgqEQEAeFjN7n9DFGD
/7zZ55dEoDot9+3FN21Um1RVfaBtDZ6ckm/eN9ii0LthTOLt1nB7Dv1l67ND
DUrHlToNbIDKR9lC+rw2CvAqMC/Tt4UL15QxX10VdOgYMc38rS0kc7v3JzYI
ok5C3576D12Yqo1/x2O0j9il3H6E/tSDzdcxBdkWf5BzD4NP+Yo+ZGS8753U
X0aTaQ7Lqb8MQDOZPuuC3gbqC5up5d80AiPJKYcPNKOobkyS4+KuMbj5fyqi
WxxGh3u23h/+zwzutp48GyJSiXL8PNwSGc3BP+r9vbm+bLRYfnHySoYFFIxL
Tk1/r0F8Hg98BbIsQTfkoDCKJgE93m0MjTxqBW5HhBnLP3oi3+gW/g1GAgBh
jO9bfgqSbb0m0chGhKD/PkkwLFuhzNvnN+4WEsH5BtsOcwOOLs4G7QyUWkPx
oZ8SNrSOSHHKf+StsA3cffbfvb/eBihYSvzPMzc9cDisEetuQtJMERe0mRCs
D2xRzMWP4v6dN7H7gN7XEHZ8e1gVrq4jXho5saUIIyhpe5Ooaz2FtPK4/BTC
jKHhZRvN0Pww8g1kmxdPMYGdj1/TKvkG0TsqzTsCmWaQXR93M5G+AIlzHqRY
mVgAq0ZJ+kTUQ7Q31GB1v9sCOETOstXYPUR+ZUqy+72WELB0YjWv2x+1dht5
nf1kBWIJ63IJvUnI+e3ourUlARiLfHSmvRKRqwgj8YsNEWy6yBK46LXQ0feV
p/M9rEGdR2LrjaIDks3qu97iawOM90fX/mEkqimf9G/xtIXnU/RM9D8U0NCW
wSLtL1swmwwlS9vkRf+ooUbxjx0QV3517JuyoNeRNaWi3o/w/oD7e5097/BM
Xpc+AXUSaDVyT5rTbcRH0n8L3yg6CqH7u0vt72/jzeQC1/5eZoc3Giy05IOp
uPxFFg0SKV5YnLG8GyMbjJf/vnCh1FMQch88LW74Y4vfVjQ233UQBbJRtWS2
IU3cdSX9e16xBHSa2wQlXBDFW+7qzpt6SwPjdlcXvRIDfvRF0L0KZ1nY7JAp
vPlhG1shZ+waipWHp31uOvOzU5hn3QeFF+cU4byL8deuwh6MFnS09X2VIXJk
xzuWrQHTIpF8UZqiCtPjZQpvBYuwJunWUMc4dZC/lPVV/MgFrIDz2tWG2xjU
mN0Ti1D0xxjLv0nedQBI/vJav4mPiG3uWDxhttaENnqyWuZCDazUc2c56IwW
cLGF3zk8L4SF0Gz3brtqg7Vm4PmRz0exdZq8sYEQHVgkdB1vfrusYVJ3RtMg
XhdO65uLt+xsoI4rqfo/o/WgZ8VX9ePQAaK4OE0WmqEP8dKrL6yYl1G25Mcz
dmkGsF9CXh8StoYa9NlzGZIMYbu7b9doaA3diSqMqr9iBHyBMTPr/JPIt3L2
6d1bJuDayX3qzsQAImHL6nKsMAWepZW1lYGn6OmL9HNapWYQ1XLeYUb5OpKP
avnCUG8ODEb1T2VYi1D8WmvocTsL+LNYIWyRWIWkv/dP3vpkAdezUa5rXgXS
c0koZ3C0BOU587bW/MvI75xdy7HPltDHJqxRmeWL1o/1yXKetgJpt6ajcuOh
qIT9SKTepBWYScdwnPRLRsfNNkqdThFgc2whU4UqAe39FyfhNU0A0q+3mJia
T6MFf6nDVGeIQPru+51eH0DyO9LhHxf++XgAyS/1JhNUSbyyn7tkDaJZFXQt
6VaI4LSiq3jOBtpvDcpV0eCoibhyujnEFmoKXMsraOSRhDfuIPdoGTdvvCNB
rtGKU+FMOpKvqAD5+Ltvi1fiuUYRZAvXmSE2d0Xj7ascPMl/p8UhlAto6fIv
yfwXi4sefiu5ZswPAk6zLLf13XFHnZyuOBdhUPyT4C2gb4q7WfMtsp8XB85H
11tU5uTx8u8XxZqeS0KSYsSGKQU3rkMZ9KTfTQZeaXXwlx0jx7nJSYosAuSg
YLdUx9flN3bqZe9sULQC6P5IUbD4OIhdt+Q5YRekBKdEdxqSXVqw9vY/HhSR
KkBB89T1SXMZ5rBCS2GboAbb7rQOdCpXMQcKikWpLA1oDWC4ZtkXie189p24
VIlD0vXUrR7h09iqhrtP6jDAcQr2GgVJA4zr0AWKS180YYLiyim5dRlsW1Bn
aHJKC14F/03JNz+G0aptdO/81Abh7vRb+cuHsADpL5o22zrgKllk3MwygDYz
X6m17+mCzQJ+giLsADWM59ptkunD4zvK7w87bCDBS1TlUdQGcEF3j8Twwb/+
FcFDJw8bQneBx620iA209Vi5SZzaCDavy7pKEn8ippsf5DrpjMFwJCN5z+Az
cj/n8EGIxQRaZYPY6Tr/zQ85zrVOgX/9G5ly87l8F+qxHsqLFjaDXjZ5z/HL
D1DH2ZRTqyfMIcqX78z1iKtIOcj74Ti7Bfx6IcR27tV9dIVv+YdcngX4bsam
lY7WIDcj+4ldtn8+PXjhspjuLZR1lyFo8YYlYGu1l67fikHDq1pMOLcVfCuU
q29i80aRIW3mTcVWwN2hu1utfx7l+wgZlR0ngNQ33RjG4BQkP+JNRnGXAGGK
wZeEloPRifBdwmUBIrBoFpCE6VsgNVrKpxFlRFCoYdAZoNVE6zknx0mkrGH4
Ye/A4iNrBKb92rm11sBKaBD4FOKAHpAuv0iXs4H9x+1c1230kOvRMTGVRlsY
NbnVtrAiglbG3O+EVU7h0meeq7mad+E9UirUFXGHwXnXZO4kYx2u6PuYWesG
Ixhv3ic5RF2AFz+nF69K4ISzzbnRvT8S8Rrd5SdRGnyQ8/z1FVofXzyRI1OY
4YwQzOZshcu/sMJJ9Bq5M86KASf/Qg1uroanzKelilafhFaHqC+64/x40qdR
8+wf0iDm8tzeboMGZ3N9xhM3Iwv2G7XjLb1rmMjpwOF7u/IgmZnpVrc+hsWR
RtZSryuCUyfaPPS1HfMmu/1JeOVfHrfyJfZ9q8H6Im9NxpGpwWD04/t3D+Vh
GcemH3WQa4A9l/ylmyIJmMHOvlKxIA5ubQIGu56eGFmoQC/TDQAHumHNAzVz
jOZgfvx9gSbY/owiDaFWwt7r3vleXqIFKn7ZU8dN+bAW/j9G0fe1IanyP8M3
s9RYLfdzepZGHQh669JMWzekwXfnKkbRrAvifOVHpGt3EWqk+7DUrAdvbvBq
cRB3EXN6hPXmG30QPOHX49azhI6eSPMr6jSAgPlz5M4v1pFNnKjI7Q5D2Jse
jZn0X0b2GU+GXvYZQb87xUPSj2Po2e8E64ZJE3B/k2pXuNOH3BVlpRZmTaH+
lu+DU3dqEcZ80ZdzzgxyC7m5eg+y0cWMzxJi5ywgduMij4xfDXrDmvfVZNMC
vkN5cGv5PeRLYkgbH20JLKFescHRKUixy0BzPsEKst665K+TRiFuTfapiAMr
MK3U3t6MSEGiTI8IMvEEiPRo8hO0iETXtNRh5xARdJNdGAuM7VCunpSYD501
ZK7GdboetUKiD/FTVxhswEjHu6g6zQRlys50xOTaQuYfIZ75j5LI2a3XXSJ9
Cycr6K4zz3iJ65j9Ol9PQgeUPtsjLvSl+LK46vK1HFaIexLTdxou4+58M7bU
nsdhR+VlWdd+OF7Ser/srIMAaK5ELG8KuuDygQXe844icC5gua9kSg9vd89s
KrtyAuyTPSpCSKXxvi+pvcadUvAtiKGch8iKU6iSH2OZlIEdz2W7/dR/NlOp
zy64KQdKkX6TOcaz2DU28S2NbQWwSBt+FUr5Eau+23n/waIS2DukN1vUPsd4
L1r++bGvAk4Wdl5dWiXYjE/sCel9NXhQRp8bvJaBia+IiBayYlD6y5gmlz4U
G3Tya1VjBzBu/NWrruKAfaO6T7HNogm87gOvX61oYZKUPFJ6vFrAfyWna/CI
BCZ4+Gc3O582tOQVEeiDWDAJ7YOwfHVdOF70PnhafxH1Rv9STlLTAxL8173N
KJLmh4e5pvb09MHz6VDi8PMVdFRwM1pQ2xDyXEdvFRptoMI5A9OnJkZwHLmF
D41+R+8eLmS/NzGGLjPxmRrhEQSv+56dszeBdEoxjoniIWRxrj77s6cp6Nw2
vN891YIkw6P3qT3MwHV5nqvE6jYy7ki06Ak0h8IS4eTP6dcRVcYidZqyBdz1
U5G0PFeB8p9R3MGeWEDmisecgGc12o3jGq9UsYSCaBu3mwLXUYPW6ID9c0tw
5j2fczM/BF2WfvbSArcCLmf2C1LeAaiJG3POaLEC8RW+pohLiYghR7Z+WIMA
+t+tUwUZkxHc4q8bbSXATyPZbcVSH9Ra1uTFq02ExfsGdpSceujMWMjRmjdE
oCtaJgsl1UPEryeuFlhYQ7ge2f1v7XZIgnLIaf69NdBL+Z/y97RFgnbFnCnW
NuAszdDvclwLzcSvNVkQbOFmBhPOrKGMZH+/v7w5bAv0TeWnM44JoLi2R2J/
igfw9xK6CrhDDy4h2us340QGXncDPD/F1+NU0R9u/SpkALWTzAYFijfx2q8F
E8SLHCCckbJErpSCB88kbas38oLIRjVNqUAAznKYemh0WhAutFXRiUhb4xbN
CY2t30XBasvph6Yijq/6Uz/5KnwS+NPLT24kCuG8ake5lx5IQ/XDXh2pc/T4
tcu5p6+VyIIBy7mU2pubWGY9mGu8lIdFjjfmvqVfsWB7wdBvTxQhN/PwNmR3
Yap8K0eeVisD1a0iz8WiOizt5Q/Tq22qgOcuhr+bLsD4hQeuZr9Wh191983x
wCQsiOaNe+UUBpzPFap7cn2wDLrkuNEoAL28CX21FkuM5O8tw9UITXCeOil+
lEYVUx0ymadN1oImh+7honMCWCHr1hHVZG14POtBEptFhymW7+Blt3Whhon3
4AL9NtIU6Lm0WKQHlfISby5T7yP6tJNV8pX6wMsz+9S2bgl9qKryii4zAFKW
lo1KgXWU6lY8PnzPED57zHp1eKyiPVJRUeVHRmDhUXnfs2McFVJVrVXWGMPx
yCmXooVh9FjYNeZetylks76wa9upR7teVMGSnWYwYz2GC4fnoEO42Yd7XhZg
8C3518btajTyyN2h29cSYnHfFmJjGtJjZbouOG8JDuufjz++4YUmq65WTSxZ
gVHEBYF++hSkX+HUKL1OAN9Z+kjhyFNoPn72ZA6JDYxWlLGlYxaopG2B6Vay
LTyobsB7smWQzo8LX6WK1nH1E6yntvha8Ad6CVPLX2mggznRp2nuAd6qaheF
57LAn7w/IZpXsvEw/SDax2e54eG8G0fHcCTucUZ5QWqAH+SOCF427DiNd9mz
sDeMC0OPgaPW8pQhzjxuQ5ikOAEP7H0r1o1kcTVXyl0ykAImuu+/ucI58NJi
1bnQuzKwvWR7NaOaDL87LOCg+lgOZkVkhxxuzGNbPruBw88VoFeoM/me3gB2
dzvEO75GCVRy97sekSBs9X6pZMQLFdjSFv2lNVCKFVe3F2i/UoPQOznMlJFZ
WOsuK41HvwaMfkGBpCgc639TXJf4C4enohFkSbunsKzcvPexpNowfWk/plqW
HZtKtlEV4NIDenOSc31A0iwVPFK0LagPJ1Wp77lor6EP9znPkQkagp2zs6R4
8gbqeddyaEXcCHR8+ep+OcygIAHnb0YnjaHzY1H01WsjyKoot91MyQQuFE6p
3XIaRrEe5UatumZgJPKxsDeyBFFxHLKdMDUHO8aekgnua4jJP0br+X0LKBAU
4os5U4OkpptODYhawnTGsW/D2wWIb3WD716FJRy756mWdSMCPb76d1Zf0gpW
+5dZn3b4Is5uEtuSWivgONFP1XMmAX36+/A8LkmAyTnstOxKMmpq6rBfriOA
YLiq3JXwAHSOfmzcRo4I19d4Uk/XGKH3ay/P5DwjwoW6892nMW0k+FziaS9u
Dd1YYrIowRYpihMt8BZr4AgZnb8pZ4+mJQwWUnVsIOpMSNwJUh1kED84xtZl
CxLeypaCxkKINk9Uw2NcF5rmX5WFDv5FKkaWzGuTeuBRuJhUSbuFuDJe7T/9
qQ+mAewnOk4uI4uKM4HNPwzg+o2sGV7pDdTIqH1B87cRZN05CBi0HUURVrxf
9laNQXStwbd2dRix6R3+LktpBmcqzK+TRTxEiS3k7hQ05lDM9fyzb2M22rM4
2ayQYQk3yWO+bI3+8zNCGqZIawWKKdxvmjI90dexYz1tTERwPhV+UnCegMoE
LWkc84jwIKxc2JkdR55D+ZmZ/DYQS0FIPyduiBqDU5SmHPSA7BDBwMaVpFmk
wEWIxEcfKDw4ltJq/tVf8vG8npshDLKoLQe8XkdnD33MiwswghEFrvDkN1NI
XD4KJ541BiZGUbvAlWEkOUNVXRxjAt9tPNdN4gbRZIrJY8sUM6Cw+ao8LHAD
LedJqpwysAByjMq/jOMhOnY4Z7et3QLO/+X8L2DwIdK71nzh6BtLqJl82bhD
E4gcQmM8Qj5YAX/NfxseV5OQmfDz2UBTAryz8rj4tycR0WkWrvy0IsJdKdWZ
E8+1UAr5CT/309agF8+vgm/aI7fkLcNETxvglrPRtC0BlFrMZjTuZguXr3vM
EQMUEdepHnxwzhaGQ51Vpm350Fw2J03/qh0U3Vld2J1kQcn25T/nL+mBy4Wp
zjO0ByiDMn2YUKgPb26SPgv8vIS4rL88W88xhPliybOykmuoT2PqQ/gdI/gy
McrFujaBPjMYhik/MQOZrD8vGR9eQ5o3qPinXCxg7tQr8ziOf3nY+US8eMoS
nl3kDYgY80av3cxyGOes4G7c8O/JtmT05HTG6HU/IqQoXU9x1MCRzbuJCMF4
G4irryjlk8PQWaojL0Jp9cCTcGu4h4KkObiscecPkz5EDm658Kqvo9oZifBg
ZkNweWg72p2ygbRc2C6lcRtDS+29GyLTI2g0/ZyRqrAJfBCQntUrHEYzrdoO
c+rmoB6d+jdWKgdZdinkbt6ygKr6I0lkj2qQjlZxXJuQFWTwfHTSNPVBjfXe
7qHC//6fuURQlHoK+qi5wB5ygghStPOuuaGmiJzE7fLhWiKEzlU9CWXQQk1q
TD0+z6whOvLSJ4Vpe5THOY6evNOFxlQdq0MDe6iA+pj48Gd9+DLtdOYF2TKS
ng/3PzlkAO7mV0982llHaWZ7J+MnjCCf/mgvI8UYcvHV8zq6bQZ0u+zSbU+z
kaE0z9jCeQtwOrsfX1ZTg9QvOe5qURKAMjXj9dLVFKS5qfxMxlgPHmiFfPl4
jqTZp08jed9WH8y/B2O2QitI+vv32CdWhhBE573Td3QD7QXKzl11MoZzY2os
YhQjqHFgQTbT1wT4NzpXvbiHEFXcmZHqMDOIH/pBNZt1E9k7m5iSIgsoUWj/
QllXhf769koovLaEJkS/+GQlCEl/CX93T5cAutPZU/yxScgrrFKC3JgI6TZf
ixt0dNDZkBPn9+2sYc2izjXD0x61+5s8JnO2AfcbawNA1ESK2RfI2BxtYZ/X
77W3pxIqF3o34zFpC29nCEGLEvzoYHHh5O9qPbhQdSj1Ye8eyqHqT2Bp0off
G2cXrav/+dGxN/6vXhlDyMLb8fp/ecPV3OUvOGwGMemRMJBzFXVMXzvvGWgB
/L8ZZ5iO1qB6j6CD8tV//t3uq3m5zRPtb37qrPxjBYG+vMbfjVKQzcHd5/0n
9MApSM/Qx4uk+ZfqDraroA/5wyOiM/6raNmdKuqanCHETpKr4kEb6M5sqQqd
hjGUDzREcluPoO6aOuyMgQlcy6F65UIzjAYZXy/HVFuAIpo29t6sRmv6SwVH
FAkQf8D+jScrGSUyhL1k/qULYU4sT5Ua91ExjftAwbY+OCl92uxxX0ZB3pbB
5hsG0P1nd2jIfgP9GEr/cmjfCPYeMc1ItH9Gi+4aNgyHTaD1LbdI8bdhdI+1
w3WP0xxkg00iwv9kI597P8qbmK3Ac+JAZE3cCwWzV03O3SbCsK2bl788IIlf
7xuzffWghZJO46ssSfOP04ldpNH6gOmpC2YT/u1/+lXCcLAhZJV/5aFzXEf2
W6/yWGONYTXjJKnHzDBqylTI3LhmBmGsD78z0uej7Be1Ewsf/vGPTFg94e5Z
VE+X0djnQAQdwRMRtmGaqKhA3K7Hxxr2RINqhEIcENuD/f9VaCbuUL9dGJ+k
UklIol92ociWkOX7PbYZYxmDMfZETLJVoohkV8mukKJE1ghZkkeoRKXsWypS
trLFRIjX+xc857qe+z73576uY5a+YgWnd6wpPSvhQVVsh4Q8XTPxUOdU5yz4
gCusOzF5Z9fx3H2q7EE5lXiHIXfqh0BOUI2ctTpsmIkHGzzN7/Dig5NmdX25
slG40aeoHD5BYfhCL5t9FXAeX472ff6ZLg7Xbu74yqRb4XkRzk7fyFIw+kZK
6Y+oNv5hk01La5wMrHXRjXSmpPBkyq+X/ifl4eCH33orl7nweihyl6ErQpv1
5BYhfBnD5Nn/TPgogcnOEh83uW+Ys4YE5c9ZZfj5+nraCMs7bPShrEG/oyro
mNp7L3o8xWrYeqXeBKrBobj4batJd7Fd3IS2Lh8NEL6le/KwSwR2106m1+I2
BnfdvD7cK/fEnNI5ttTQAX7K/V1M9aZhFTZvWPqpWqByfdn/6D4MK+NrO3/F
QRvWvotvP6kpgU1L8b8utdMBjJDjlCHMhTX3n2rO9NIFxtsu28Mhc5peHfGO
dgF6cIwtuPxVPBPRBda+5F0kgj+jq5pB2PhvxvPWy5EkkInkUvUVmUXNdRZi
PuH6wGsoPOxrP49sdMfe9l0hg5+OferllXmU3Nw80hhtADcLhL5aUIeQBC9H
7Lk0I9CPfUSS4e9CO7r3tHvnGEP2mPZvPavqjfy0XmK9T4GP3Cx+qQW30DJz
Jv5AiQnMl+usVjxKRxw3FJqP0Kkg8jRP4IZVEfpTMjob2kEFcjwLy+ivfKTU
rdOx39oUFnGvDDaIRfFiDTnLPaageilo7csudwTnRxUEHMzgoR23kk/cBbSf
ePm8+RczoBfVHlkxC0OtpdttcNuNPqhS/k3eMBh1HNBa8fxmDj8KXcqVJJzQ
0pPU2O8naTB3vcgTywPktXfub9UEDayFid9+k4yQtkm2le+UBZTtqOgU7zdD
g1vLorPOWQJbWMDnOQcldC31dkuSwiy+a7GsVzqiEefJcJndG8AGxRm+nXrp
BXgs+50Lwhd5oNjupsbwjiRctyy6V452AEqXbq7SrwTiYKWZslNdFHpTq8nb
Mpzx4uGQf5UmErBXPmr71efGuEe22vq6x2G47tZgaal9DOddsNw9lycLvN8U
jwmFCOB8T3nj1mwUwOuvT/Ow1xb8/Q11506Xo+CPjtQ6D09jBaNNvOHex0DP
bSr4klQPljzoo5PkqgIftY1z72fWYxlS3zxSzx4HbPPuF0SxPKz9b8UFfz91
cK1PPCN0JQF7PKajnx+hCVnU0j/aqv7Y+n+s4keycLiXLOl68fwGgSrE45md
AG7em7u14/WxT04r5iZ9WlD0K/rpJw1FbGsvv+XUZ224YDm+PfbZf1iU9d6G
sh86INUbm91swIppr+fLijJ1IZmy3mp7qw3xF/+y7VvSA47E0yk/SetI1519
tmKNCOG8S+ZhuUy02f2rd8gWfTh6lOG5+daGXqteKq4SyFD5df5G3sY+zijZ
NjfHagCKedWTDrUTiG1y7V73dkN4YMkzecelHzUpdpYOcRrBj4Dpl2EfetGL
DGi5JWQMAocP6Q7nvEFde+zuJ4hSYLZVdA+nUC7SSKF9eSppAoE1hrkqpgno
rmzwlhFeKljIRxHagnOQ1D7P6aG9piDDxTnE23sPBe7rTmOmmMLuwMN3xU0D
0WpG4ZLAf2bAUrHpdWD3afTqzScKyjADwYgjparMK2hE/UrVeIY5bE3MlmYY
eSOW0BeiySI0aPa/Sn5TSkX6Jue0zHNoMJLjtsuzA5Bs8ZTjmIwFvF9+V/nG
zwJhq6y8bgp0WHOXShzPJ6JCjT1Bx0qG8ISAPQdSCt/gPbHRFfHHWUGggE/0
nG0pLi/TE3HJnxt0s0a1iWdScae1TAhx3A+qW/Y1cMiE4k1pToKJMiLANNS3
Tel3w7sqA+wMzA9CXojJSs4Wc3zHrY/y520PwXvN2tvzr9Tx38tWHg53j4Be
tdww3xExnB4Scqj2szxMR2XPFDvsxJt+zI+tf1YEsUSOlHCRBcwn+szWqnkl
CBRKmzzvPIgF3mxt1v2lDH/Y/5t4KP8a02Zc+1Q9rgqVtat84y4lmF4IkXJ/
WQ089qW0jNncxj6virDj/zTg/bVoaxuPYMxYI/WK1gEcJE00i342MTBzhkmW
zC2AyXG+rmxkgjWfcJROTtaCxruXz6U5q2CDiz7OFRnasLplpOdqrAimrrVP
R/GBDnAlKAY/tdiBhf+KXBkq1QWrEW3fl679mrr1dSf21+hB3QUDu0SnFUTR
jThdUkOExQZX0lTVClpwNRZee00C5/Dsu/L1M0j/Obt0daM+RLxw7uIpWECr
/ov2Lg1kSNkzpFdfPoso/SPw/q0B3In3CPBjG0QXbHKlwwaNwJ3XuH5n+Efk
tVClyvLdGGLTVT3EWUtRJWb5c3CEAhSThG22AgmIV0Q/RNWXCuUPry7F04tR
/Ej+jMICFd6ePRn+YVM2srrIrnzNzxQ+DjtKyv8NR6EHHGEqyAxcXOqYgo/9
UN/Fl2w8V8zB7QDjRGSDH3IzIezexEIDqa8e2a0/rNAHx5nHJjstILoirCK8
yxTV59Cqzu6mQ+JIB+P1mhEq+f5oxiFxg9fOSkXqm8uh54liXTd3LuET/x5J
qazU4tTHuHR6LTuc+lJI93bOxid/2Tu2ePOCcFtE4LWKGFyCccnrC1EQRA1P
PRG2uIjX8PJxRpDFIJfrUnd+vgMeyX4tQ8xIEj5aX3BO1CDhH8pzWmODpMFr
Vm3yHFEe15iil4VWyAGnoJlMehkvPjBauAB9ChAucclEppmAd8mFDT2aOgqB
KqVqeMkYNqQlLmk6dww4MeO/wYbtWJHMgbrh7ypw906P/whPDbY8qb526c9x
cC7UbVOPz8LsvQ+mmf1Rh9hHQdasJ6KxKx0u4Xs4MBgWenvmhsMFrO+figs7
D4DkSsRzswIb7Ohq2yAXtxYkzRLN7DV0sCnGrcAdB7Q3/PrE5pG/DKZQWUc+
KLCRz3BS2PvlXozA3ep4SlUPvDZnGO+Q/4mm0/db31YhQuG91gTNDX7XSEzy
q9UmQWHP92OdI3NI/+llNcDJoHiiX7Lfgongx77wIH0DcGhS4kgW/44al/lX
vugbglH9YNqYfB/KCiTdUbQwgg6KdnQi6kHsI/2MPCdjeF8k0laj0YBUjxLY
RBwpsCQv9KWNKxM1zpi233Q3gSdNrQWvFW8hd31W5xhlKrgMtX2swPORhInv
vHE5FeL+balNjXmMGg3kp+JUTIHhGDAnk3oLZVXf++dUZQrL7fp+djsuoLJB
4Sw5TTOgzsYm8o17oq0X6PYxdRv5nPvfR0nXEHTjxYOi7+rm8GT8W+u1o2Fo
hqDCQPXmkFWotADKbij1aZCypBYNvm4JE4Z0IjonOHjnxhsaYCWmwbJZeih2
+efeqxQLkHmZEPAtzQrFvNNbWWi1gAN1WoqQZ4lqzSp8nM3pcOviHodBmjaa
DWcf8ytoxzdZlupdbXyLq0YJ8n3gY4HpWo+zoZ3lOIvGAodYABcc0XGeSnqY
jnuLH2YecuUHRcn3uFNkOH5DjelokSMMlYPPNnFme+GuD5Z28nSLg5H/tUKH
cAvcZtedlvwOKSDo7Fl5V4vjJ4P67/DyHoErKh7Xfg8exBfGKv/sz5SHVfWM
SfoMB669p+0Q7x1FONTQ2eK5+gfr+6wWRH2qBBzOj5XsuIawc9/9owWKleHp
bGuS/683GE/EJ25yjioYvul3yR0rxdZfxT4vf64GcSnkYE9SGua7jWt6+zMN
mFA75D+CQjFfI6cCw/4NtXloNlmwuGGfCCXm874AX4W6pRfYzLAXdjwpld5a
MPfvEMH9ghpGuibqzn9VG/jiyNtWGsSwvcf4WH8H6cA8/5FgFXYOzLpF8uTz
O/+/b45q4ClbQh1PtMSKUonQePPd9myTNTR1mvWSxiMS/JCIs/xcNYPYNBUk
bz/Uh/XJ67rtHAtIxuEsT2YmGYLlB3hZ0jf6E5WeSCo0gEGWByU+u76g2u8/
wmteGUPT1pyG715PkXdi39xsAwWsudd+Z9YkosTuWvFyFyqs9txsPnv1MWo6
KBXe7moKQwMtm/TI15FbY8DlzeMb+rP1Eer4ehpZDRAe/Zwyg8J2y9Kz/8KQ
YKVwhMpvc6j7YupzT+YECr28GuW9ZgHV1VduO4VR0WvfIs2QEEtw1paQ8Pik
gB7s/UyJF1zA7WJKfN461uNlOR0xfek7AOOPXdlhmIvXrgZM+vjshZeNKj+S
2uNx5ZubxKKMBeCfeMqg0XF/PKiqwFy/URTYD8/Kb+FywvcvslKmWiWg7+7Y
0Q59A1xQ5hzjDfMwNCWVDb5PU8TzzvUOHZeTg9j4ZemPQ/y4n/FwQ2aaArw6
eP/j8UUWnGrvIIryj8JRl4UalZ0/Md1kZsZk6TFoTE6oLkjqxO6HNwfXPFKB
U21eBBlvhL3fHneMrfw4FLc/fnRROgfbV+m5lVGlDvLGJ/H02Vhs72ca40uL
Jux6l7vmzn8R692ptij6Awf2LIm+4CsnsLtED+r1f9rA6OzOtkngw1hzwmxU
+IgwKf1snk+JUFe/ZqL0TJgEO27kRskGzSM25UxlQWEybOJzrxGNYKJzb+PU
qiUM4HKHyQxWPoqcvW8a2RwyBAbvwJPpnD701HLXo+1HjSDm5EzGgGcvihST
pfVrUeBGoEGJ9WwWCtbp7L1PNgGrLTbbrn5ORFmbJ283P6SCIkk37rx/Mfrz
5INntYQpXGDZfB4FpiEO12eGRbmmsCAvdzRR+hLq0WS0SsiYAcEuMzPb0Q0x
BPjpOcVmMNlK+DilEYyMpP/zM5Ixh2+ZOlxKW8PRGcEBjs4Sc1jx+edsu/8s
ovyXWWSvQINQi102TZaGaFBZYtqrkgae7Jt+35rRRie6fqmXa1qAc5uFsJSI
JUqZfjlNrrMAze1++7adskaBkvZ6p7XpkP2Us91CTxfJVlnY+/frAeFs1qff
Kf/Q297mwrJBIpjLnthX4bWEVs7cbnnxgwTydVzznRv969rxcdmBYX1Yxbhv
dYsxUYHj+RnqpAHQG26XtwcPoL5daahq2hCaXgpVcjJ7kTDrjV/kzRQI/UV+
cUO0CE02zY5h10yB3ntmIZ8YgoQJc2J7d5jBcvPv8yLeDFQ5/jX1LRcNHMWd
ZR+609BaW9GohzAd5MNzAs7GklF/Yqklk06ED7afTTFXQl31wd7aF84k2Gwg
9S2mZWM+RTrmdIIMqVL3e0/2LiBuwv1WXTcDkJWO2b285RsSDMvNP+VqCIf5
uFTub8wX/yAk1vaSEbwT29YqldeNJrU7nrsGUyA5PMT2cmUaMrcgJjkRqYDt
/LGuMF6ACu4QqJ2NVPgWJOy0jbMIKW0PLeF/Ywo1b2vdIyvPokfNSc6+Hzb4
ucVZo9M7FDWZSw0HGppDAv1rx/DfEPTd+ET9LJUGcndmaJS9OohnTCikIIoI
6Uqno1V119GZMYcs29skqPwTx+0zMYMaTQtnnseS4Xsbp7as7TxqvLlbPSLd
AMQ1GsPVdL8iqgY/c/kJBTpOLcwKbk1GbXKXLs7aU8GyINJXlFmE/nkLcl79
agqri3atDM0zSC0eRQuNmm34h8Y9XxyGYg+pfopiI8KPakZV/uQ6Yjkmm1i1
mwT/0ioidwYvoPGLpUoxnGQIL1V2zw1lIuViPWYKvyG8/UHpcFzpQxp6s9JM
ESMYKIgcefuoF52Y2vOpQNUEls7E3ONZTUBD9tnjW+5SgZNXeFtfbTE6M812
KkvMDLYGmUk5/HVFssO99sHi5tB3n/vzU8NwlEcpGfM7RAMlpVB7FUUK4tZ5
t2/4MQ2Exh5y2r/XQs/Ud3xpadGDfbTRCYOYVXRpYm7hSzcJ0t64Re5cmEGu
l5dlyB36EMRtiw3+XECB9w6nxg4YwLlrPfVsyp9QTzLveMcCBfQbqrr+Nsaj
vqYYuZVAKnRKP3zAd78YOe9j9OmRiGBl0ttIu0yoW7at2F9nToJcIgfrXdIc
cr3gqtFOIYN/unTUcREmmq07afbAyhBM3dr19+/qQ3xxzjwkhhGUBCntGoAe
xK0+MfzqHAUOhBVucla5i8YXah5wPqdCj9uAzMDwhh+G4ujYC1Owemxv+MTi
PMrb/qPpiY45THZEXRHLDkVYiNfKTjINWC5zRa6X6SI7V0f2EVs6LNj1vvAJ
10Lxl0+9fpxPBJ3QWAUPkX/o/HieoUAlCT7kLpULFs6g5PGU6dEOCpDiPT+1
vkxAtACWTl9PKvAX96y+Yz5GfVz936NmTcFm++dR6gwDXRTXra9imoH74skM
c81w5C/8sX9Ukgi8L7TP3HMg1AU1n++pUSCB/azG2O77v5EU86ZqiRwZlrQE
+B9fZKJk5c6HB44bQmPIQq/4qT502O2wsKCuETxJLcpgEelFzvlyetGFVNjy
MurQBE8x8vA9kcinZA4VJAt5ufwwlK34YFBqQg9GO/0HIWQNXZ1Uy7jPJEE3
3Zxv3WIW5S11y7vP6cP7C7z+SVQmGjhYTdyzbAAJnT9zKkf7EUW4UuX9uiHw
9mWlVIz1ov1at4breE1gWwTxzbHheBRrQolN4zaDJ3eSw1pXGCjIdq/767s0
eHlvx2DZFkAUjn892Qwi1BnYJ1sAoe7izNKJBl8SnJt8cPL96Y335zbYw5MM
1kovnw1fXECvDJ7fYo+nwOKgj+jT6BQUpODDxvxgCrRKOac7Cp7oxn5KRLcV
DY5YzwzwvtBCSiy7nxy6SoT4VqzSNX8dSebuUnWPJUG93WG3ELZZRHw3M6Dx
yRQqRfJ8Jnjd0JfDTf7SLjT45KfL5JEH1OWe+N8TAhEukPa2Dd5bR1YpNeWv
2Mgw34enhAQwEUvt8LQbvxFgjc1qD2t7EUX76aCcvAmM/NeWFpeZgI7lZ96Y
biXBlT5eN9+eGdQ0UTlh+YsCbQZyPFOj8Whp3q2P358KGicI/fSgYpRvXc/n
hRMh++VkknMAoa4v6fxzNhIZ3jAZD/kxJuqzQxL1VEOwy0ioown0Ibk8+rBM
MQkSDlwP2PN4BoVrqs66v6WApnyy+KhSIhJxKyjR+2UKPJvt9xrZnEauV0XL
2+fM4MHkcDJRKBzVOR3av1uYCDHZvp7GRoS61L23q0YlyfCg9N3nA8FMFNgl
56euYAhKAQoMemgfmh36byRJ3QgSZZ6n8xr0ovAe9un8XCr4OdevuBsWI7s2
jQhFeXN4nK+8XD4Qhvj4v5ZkTeiDF9PxXZk6E/Gk5C5rLRpCVQDnUtlML+rN
FbK25DCD/R9/7rlTxEDJVMt9rSeIcBmjR3FYEupu7xiPAU8SsCib0bRuzSLl
HwbduucMQeT+/bP9U72oULKM3SiDBC6vzx7//G4G+dHzKiz4yAAzEza/Nvij
Uf4NPpZJhbBVk1zZzGKERf51Y0iZg1o9m1indDh6dkjX4eNnEsTlCxDI7LNo
HL84avyPAl+Du5IXn8SjmrQnkYPBVDgQIB334HkxEuzemSpgQoT6Oe3rfy8Q
6thEWINCTxqCxuJI1sJ6LyqTWqnYVUcCZovf7ozSGZSdtPjL8RMF4ghKp1oZ
CSj22bb9bxdMoSBAJVEig4EiW1xa7/01A1knfeELluFI6YtPWp0cEfxl2kwX
PDfytivs2SUVMgxRztfnuDKRat/70qN/9WEW1/pNdmKiG/mvfOhsRkCzGrve
ONiLZH4tfD0uZALZl+iXb3MlIN3FwJefeM1AW1X+xSaH02j7+6zbgV5EuKaQ
NbImRqijdW2X1w4iwV39g/7zMIuy+2YGomVFYeJmZ9XKF2d8kjUrXLaGDvSh
ZBU/E3WkSVOIka0hglNn20nDlyuosfCDd7ueIdjKnzseebwPkTZ7WPm0m8D2
pK0X81IzkZR1J5e9Dw1sSpoeOGtjiGEwFdaupw77np1oeWSRhNmll1VHyypC
ZWFRs++ZVax6NSk3WlYbGlazvp/POYwxHrNmRsuawd/jAkYDHW7ofw+qTdo=

   "], {{{}, {}, 
     {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl2HfAFtL7x/EnEUWZKS3tvffekwbaaZeQFC0llXbau5DV3nvvgVLai0QD
kQYqlErf1/X7/XGc6/3+XOd+7nnOUaa2XV7onCghIWHofQkJMSe5NyFhzj0J
Cf3Bl3ghrp84IaEY1x43w3fVp+RZjSJcIe4wtwT/hffjt6xpwU3GA3AO/AB+
QY8p4X5uruJdvAsvwg30FOdewi/iBPy9PJtRFBbmjsiX4r/xAdxLT0tuCh6I
c+KkuH6i/1ue8AA3Dw/Au/Fi3FBQguuAm+NE+Ad5dqMYV4Q7Kl+G/8EHcW89
rbipeBDOhZPhBnriqSb1n/l4IP4KL8GN9JTkXsYt8D34tDyHUZwryh2TL8c3
8CH8tp7W3DQ8GOfGD+KGenxECcm4BXgQ3oOX4sZ6SnGv4JY4MT4jz2mU4Ppa
WIw/rmcFd5M7jPvoa8O9j4fgPPgh3EhPEu5BbiEejPfiZbiJntLcq7gVvhef
lecySnLFuRPylfhffAS/o6ct90F8z3BenBw31nM/9xC3CA/BX+PluKmeMlxH
3Brfh8/JcxuluBLcN/JV+BY+ivvqacd9iIfhfDgFbqLnAS45txgPxfvwCtxM
T1nuNdwGJ8E/yvMYpbmS3Lfy1fg2Pob76WnPTcfDcX78MG6qJymXgluCh+H9
eCV+UU85rhNui+/HP8nzGmW4UtxJ+Rp8Bx/H/fW8xH2E38MF8CO4mZ7BPtNk
/MP8Um44dwCvws31ledex+3wA/hneT6jLFea+06+Fv+HT+B39XTgPsYjcEH8
KH5Rz4PcI9wy/B4+iFfjFnoqcJ1xe5wUn5fnN8pxZbhT8nX4Lv4GD9DzMvcJ
HokL4cdwcz0PcY9yy/EIfAivwS31VOS64JdwMvyLvIBRnivLfS9fHxuY8S0e
qOcV7lNqFC6MH8ct5Mm5x7gVeCQ+jNfiVnoqcW/gDvhB/Ku8oFGBK8f9IN+A
Exkn8SA9r3KfyUfjIvgJ3FKegnucW4lH4SN4HW6tpzL3Jn4ZP4QvyAsZg3yu
Ffny/Gk9G2O/NL7Dg/V15GbIx+CiOCVuJX+Ye4JbhUfjo3g9bqOnCtcVv4KT
49/khY1KXAXujHxT7JfGKTxEz2vcTPlYXAw/iVvLH+FScqvxGHwMb8Bt9VTl
uuFXcQp8Mc4HozJXkTsr3xz7pfE9HqqnEzdLPg4Xx6lwG/mj3JPcGjwWH8cb
cTs91bjuuCN+GF+K88GowlXizsm3xH5pzObGcyX0pebbco9xqbi1eBw+gTfh
9nqqcz3wa/gRfDnOBKMqV5n7Ub419kdjDjeBK6nvqdi/fHbt+Mf51Pw6bjz+
Bm/GL+mrwfXEnfCj+EqcBUY1rgr3k3xb7IvGD3iYnte5ufKJuBROE2ex/Anu
KW49nhDfe7wFd9BTk3sLv44fw7/HWWBU56pyP8u3x75ozIvP1EjDb+Anxncb
9zI6c49b/0fs70YNrhp3Xt+O2O+M+dwkrrS+tHF+c09yabmNeFJ8f/FW/LKe
Wlxv3AU/gf+UZ/DeHY5zTH2N/0g9WF9Z/q94Pfqr879wdbmd8T6bv4xzWH1a
NlzdnOusp5j5Cu5hXmDtZHkZ3BCnk2c1f4u7mDvEPhjnauy3eJK8qvkO7mNO
ZX06+Sb+GTw59kTzJvkp2TbZK+pn5AX4X9Rv8/3Vb8hS4qtxnhjX8cd4iN5a
emrgX9Wfx+epf1ec9+oz/Hvx/GTF+d/VC/VP4cuq0/PZ+JOxn8b+Gmd17OHx
/GTVzP/hd8yprUsv38w/i6fEXmveHHuk+Xv5dvmruAl+Vl9B86/4TXMf+Zvy
J/EL+Jr1T5uPxO/XXCbuffJP8FBry3F/x/thXU3+AvdF/E1jUXxnjQz8lrhP
xfcc78AdranNvYO74lT4ujyjxzsa53Tc+/hP4z7BDdNb3vwPfiuet3W15L/x
9eK7oT+leXfs0ebk+Kx8RNxN47PRV8L8B+5pXmz9VHk53AhnkGc3fxfvU5wt
6kXqKXx19d34LdJPW7M17mxxtvBb4p7H7+RfU9eR9cXdcGr8V5yPRm3uGe6i
fFecF8Y5PDLed26JfBouj5+OO1ecO/E88VScVp5Rvi3ucLFetjXufvznfCd1
XVk/3B0/hf/Wl0nfsbgjqP/hP1MP11eBvxHPV/+z/CVud/yW+a/ijqP+kR+l
bsl1lZc0/4mXWvOu+n15BdxYnVGew3wKv2HuGGeZeUl8Z83T5HF5Tmf6ID6b
2K9k9fgL5v74nzh7jRv6ZsT9zrr35BXNN3Evc119teWX+efiuepPZd4T9yX1
T7LR6lZcNz2lzFfxsvi7sorqTHzO+C3E2RdnoXqp+n0+vb5M+rbH3TI+o3it
Rg8ujZ4bXEWjHleHu6JvT5xhxnLuQ66Svsxx/4u9jsvM7Yg7ZLyn+AvcWc9z
3ADcE6fFN+OcNm7imXhEvEZ5Xfy7em+cZ8bPeIy8O7dCPh1XxllwLq/lhzhH
4uxVL1N/wNeI/+fT97T+LOadcdeMuwS/Le6n/Jd8F3VT7nl5IfNvuKt5oPyt
+PxwffyvtZnNx+NvmSvjWeqR1lWKXN07Hse6etb9wT+Pv9aX2rw37mjq87Kx
sXfLV+r9CFfBWeOuGfsBl5X7PO6r8drxAOsHmV8wnpP9KdsXe6qxivuYq+ox
ssU9Mu4G+pfjD3EmeTb5F3EvjTuObLvsPL+LfyP2PVlh/mKcS3E28unVDbhb
1mQxn8CdzVXwKP319V0178dPxeuM+5s5Jf7F+nG4Ne6pp3Tsq3i1NZ/Iqqmz
87n50/H7iTuHeoV6Op9ZX3Z9X8YdNx4PDzF6cxn03I47i9GAe567pu9A/JaN
X/H42DO5NfJPcXWcI+6k8Vq4HNyuuNdGP96N34zPmRuK347vDb4TdxfjXzwb
j5Y3jM8BX1cfjN+icQFPiN8rt1b+Ga6Bc+I8XteZ+E7FvUe9Uv0RX1N9j76s
+nOad3O1uRnx2zLv0HdB9pWsq7oZ10BPEfMl3C3OCPl/ce8xbumbw7fnx+ir
HJ9dnNXmRvrqy//iD+lNw+2TpVb/xk9M/P//RtJbvk7vDK4mlyvuvHqycbm4
r+LeHGvwcKMPl1Hf3bg7GY25Btzf+g7H98K4iCfF8+DWy2fiWjh33HPjjubv
rsIfx3kkzy3fE/fm+O3HXUh2kd/Dd1O/yDWUFzVfjj0h9szYw9Txjy/fxH3K
2rHqJrHHmo/gtPr2x/5nToMvebzJuE3cAfSUMV/HG6yZJXtGnYfPy5+N32vc
B9Wr1Z/E3q8vj7696tnxeHiE8Q6XWU+iuAPxTbmG3A18NJ6HcRlPifsLt1E+
Gz+L88b9WZ6Ty8t9jedEP96Lu8fZzY3EfXEWfE/c2/TcxnPxONxM3gjfVB+T
pfO8D8jSqa/wU9V9ZZv0zcG1cT6cT9+5+O3oS6Zeo/40Xoc6sb5c+vOZ93F1
uLn6PtdzhR+IG/Oj1InjLhZ3b9l4dRXZ7fjsZI2t/5c7Lk/PH+TTq3/np6n7
yTbrm4vr4Py4lzw3l5/bj+dFPx5t9IvfkL574/fDN+eacLfwiTiPjD/w+3Hm
clvk83BdXAD/GPu2nrXmz/C9sjx65se6eCxuTFyP4jVzE8wt8O34ruFDcX8x
/2ndB+p3+a2xHtfDBfHb8rxcAe4AXhD9+GvcI84fbmzcqXE2nATX1XMHz8cT
cUt5U3xH/W2cE8ZV/KF8ALdNvgA/hwvh/N7bn9R99K0zz4jPV89B80LuC+4q
bobHxZnFtYr3M86HeK+N8UZr42Tcq4yBenfEnmttYfXP8R3m15tn4gKygp7D
IfUi/hreh3vGZ89NiLsFzo7vj7NeT5vYw9TfxflqTJcNwjtjn1UXUZ+P76ts
g3kWLihbjK+bm+OJ8Zxw27gbGoWMSUa7OPvjtZqLxl1RvdFjzFbf53kU5v8H
luCv1Q==
       "]]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{1405, 1406, 1407, 1408, 1409, 1410, 1411, 1412, 1413, 
       1414}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"E\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.5680626321567297`*^9, 3.5680626705099235`*^9, 3.568062702019726*^9, {
   3.568062733319516*^9, 3.568062766697425*^9}, 3.5680628221645975`*^9, 
   3.5680638362556005`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxFmXc8198Xx+0RlU1lkz3L/KB7bFkJWSWlQkUkSVFJChllZFVGIiQioxCR
yPwIZaWsJJWVkTJ+98338fj95fF8+Hg4r3vOeZ1z70fI2dPyBBUFBcUQJQUF
8VP49kpGCn/NHo2fxmJU/sHI+BW9+ZjrGupYUDDMCahDrZtVGGkcWUB6oerw
NF0L0rmt//rxPh64JmppeSKkDZ2Q/7tZcbMghIY9aG09S0ZmkidmuAxFIYRf
JuVOGxkVdV0+36gmATc1+QajfpGRBptUAc1VGTDU+mWRu0RGrv9iHmTaKcB8
ZwjluxUy8qz/trvAbBdYNfAFS62R0S0Hup0r7kpQnNAjUIr5WIO/i6KbCnxn
8ogdxVxDv23/aXs1sLLckjKPWZE1MP67DwmenjzmtIz5yG8tGXN3TbhBN5+x
ijk95S3vYuQecAtXClnD/DyK1N9hCfAjz/cjwT7lWhYPTLUhNbl4muDqpszZ
sIM6oB528C/BJw3VX52004Xu3x0rBN/PViw5fUoPNPaeWSM4+vera14X9KEy
zhqfbjsayz3v6+ZtALcfBK5znUFMYlCQIVRUwzpT7usbvh1oBOrbzNaZQruU
Mu3iXtjpb7HOodyLZh0hxjCxIrjOXg7Hahevm0DvCPc6D11TOo7umkLUfo51
5ohN6gtLN4M8Vbp1zmKRuthwzxyEnSnXucZbQF/8yT4Ie77BKYJpvFrWFtBz
g3qdXwX8pXBrtwAGow0WMqFfFrHdD/aLFOtcTJYM7+3aD1KqGxxRv6og6GgJ
TGYbHHvu+6kjnyzhfdIGB3DybxW2t4IjwRucI0nb5DNoBUI7N5hujnJbzWFr
uMCwwY8VCq+kfLOGn5s3WNI513zF4wDkbN/g/r0viw78OADS7BvckXFJFp2z
gWH6Df7zfL+m8KwNfKTb4LUX3iU3z9iCPO0GmygY6AfM28Imqg1ucJQ/efqc
HWRRbnD+M6/FtTU70P6Pm6L7z467TiH764esBY+VI8GVsvsrKgwwv0+g96Fm
IwptezV6wIYDVNoXfXfcbUV0i7yTNMq8UEdqToznISP7vII1ESlh8DzDFSCR
R0YUV8/unkZi0Pfzpm3bEBn5/rZi+3ZQCviyVWgU58komEZiXjxRDqwUVgGW
yejHkVduUlaK0E/1rDFjlYwCWC7I2DjuhqdhgyeDcL0tsNToJ5xSBrsimtUO
zDGuTQfbjqhCDpWhwBTmixEt56Rc1YFx8sHAEmYjKqehe14aEDP9omEFM0Xj
tUfCl7Wg78mXXUT90hx+cLItCYFh46aXBMeJVnK+IANcKWX6RnBy7dl09i5t
oMytXCCYI2yqe6lXB/Y6+y8TTOWn/PLUkC7MFpesEszVdmHH5LQe1LNsWT9P
TfK2gJ9z+rDXJWCdP/y5HnL+rwF8HbBd52HjUq0wSiMwY9XZ6Acjo1nuFSO4
//jAOuvlfRR/SWEMxmZK67ysJsvwldYEsq9vW2eJSZPYe8ymwPZxoz8ubXJN
Pb7DDBAz8zoPvB/KyeY3h3MLVBv1XCPqdEFkHyyxbfTD2s8Ep3EOC0DZG7/P
N2+NsoyxgPRPG/0wNRK4+pZ9PxSMbXz+VGTim9W7+2Gnz0a9CJpwfF7msQQF
+Q1m4Zsze33fEm75bnBoHbVWzXYr2PFog2NSo92b71tBjvEG90Rdn0kWsAZB
1g22ieltls+wBvP/+sOt8elYq9QB0OHcYKqPhYE5eQeg4L/++LiwzctY3gYC
mTb4q/RY8bMiG+j5rx8CVIb9rBVsIfc/zvQ5dJmyyBa4qTeYsYHUfU7JDgr+
q38SvcWzkpd2kP4fN5Kuv/zp+gUdXOxn5uwvQMO/Bo76zVPDLR6r24yyDUhq
cmkhz54N9gw0J6SMtSBRXUVbG53tULS890ljTxv68qvrZu4OIWiynZ8nx5CR
mPXpmOu6OyFhk3GQYy+up9FxXTtjSXCO3FcwNIP9m0nSMj5cFrJr87wE/5GR
pJwE9fgHBVidStfXxf3ge1r+WdCHXZDx7YzOIVxvr0uOKTf9UIJvO8St6zFf
4hYZujqqAv+E/AMmMPM1eQ8bD6pBrb8y7R/MlWFTFbWzJEjqi5Ik+kHhs5Pb
izlNoJ/onyPmheUVxTfD7Aiadx3OIOr5kb2/n340AHtl1ReCed5c0v0VuYjC
+N3tWPfWIEfmmO4gP2aQ/550jOp9E/qaf61j1ZIL3tY5tajytaHxXIYbz8X5
QbRU5mGSMRl1nrrl90BNBOYWAj+lVJNRb86FrkOa4mBTR8PpOk5GPVTVg+c9
pIHxlE7xy0UyylkRS3z5SB5+fJV4wofn5dNYyzb3dkWIoFF3mMLncb2kKlvy
627QeZz5NBXHJ+POb3P8uzIoJb/+/AlzbtnZj7wDqmB25kbtLOYP5mK0mybV
oYZdx+gf5q5LbXTnJzWAavygLqG//XnGYATtHsj3OOtM6O1LoWEY2AqQr/a2
keDgqeUiqS3aYPTnwk+C30V0GM27klEx9bJCtHkG0hvzqivpooSt5h/Uin+8
Rcsr3IF2B1lhltvDo+xyC9p9soJpzWgb5J/Mf3KnqA09jHJt8ogTBCd55+sn
rpNR+Z5xbbO3ojCQekfBtAvP/0PPP92pkQBdfa9dA1Nk1BaVE2hGKwtqq3EZ
Z//i/x/n2G6QoABnttqfYsTnMZvINJsYvQvY+AoY9XF8OxmUnx7LUwLODzTl
VZjPeJIz7LJwfVwdKfmGeWr87bb++2pw309mbAGzb6uq5MfnJJiwjmoi9ol3
4+bG159pgjOXMJk4n0tR/6Z+tu+BDH71eEK/zFyfJLM3gEOeQz/Bq/pKVdNp
v1HNPbvW1vIqVEWzk/TadhMEHdgbjjiaUGlV6sFca07IvLPl39GBVrTYHqN+
SI4PHkz0OfHtJqN4Jr7KI4XCsCVabTqklIzc4+aui1WJwdkk+SLzr2Qk7h92
MX9UCuxhB3X4Avbba4/rvfjlIXmGrFKK54fp35B7zdGK4Jdu+qUZnwfFSPIE
St8NJZs30cQQ+0rVVOtKjjJ0m5I0ezCnbOVPmk9RhSU+080zmB97XNRMzlUH
PtHylL+Yo6q4fEILNEDBYB8jod+tKqbWtkYLxvL0TAm9n8w6Nes+ISg4s1xD
cEKCuetU5DcUeDWj1OFSCbo2b7xG4qKDaBP3Kw4G75D9534PSjt2mGzWbdHX
bUWcfI8fPtXYAWI9ez3S/rYhXjMd3W8PhUCkXJzZMo2MYk9ODr+s2QmfEy94
9wyQ0dvT/E8EOiVh1Wg6NfM3zndItsgXVjnIDdvU8BL7xa2GWeUwDkU4JJnq
74v1L2lZnXHfthvqHWKTvXB8B4/FvFKQVgaRsgebWzHfrPblfyysCvyMETM/
MZs8EXhSLqIO35boKYn5SWXw2LxAUQOihu9cJvwisdPr5i81LfC9OsBJ6JU+
4xrfY4PgBdVoPsG81TsarjwDEDj1aIRgRah59/3SP/STkmZ18V8tWmZf89FP
2gKbZBOu6fo2I47UY3ut9nNDJyX1naQDbag3+Er7JiEB+POJ499xJzJiaVpU
6qsWgemSsbG7DWRkUP1XNLZcHO7qtSWJ/MB6b80Zai1IA8XY6fjaP2TEr9Wp
dI1TAc6f/nzSD/vFFlk+yi1bd4Gj09XKLTgeutBhF3ZJJdAzOPfoCVHf28w+
N0mogAvnnYVBzKVOb9n1dqhBsaK1wRxmaoXO1ouKJPhrSz9A+MV21ZtJR2U1
4SJfli9RD2o5xas1e/dAcMLEeUJvfXzqjK0iQHBGePs6K5x1pXOrRqSdQ8JP
PiUiH+fy89Z1FBDZ7yVuRHqLRmkf68l9YoGi1cOR0notiBRA4WLVwgMudM0m
GQ/aEM0XBXeyBfaHU0kso5fwvlKctW3XTVE4kSr7O/g91p/IIyl7WQLUK8c+
VU9if2r/zi1ZKwOxArqIFfsDj9EflYULCsDll136HZ/Hs4Iltkeeu8CSoVdV
DcdnV8h38lmEEpwwkbxdTtT3vZ20+iEq8OJgo8IY8Xs/T2URfzX4G5NiSPiD
9VT/F6c4EsiTYuMJf+A4Y1DhFqUJ/Zn65cR5RMUfofMu2APx7xaiCP3e9NH+
3rkzaPmXNx9VWiWaCjzz47AhIxi+NZeiy2tEqfVygoEfOMBelCXRsbwVrY50
xz4r5AU/iRh+bTEy+nNwzLHWQxhWT5+cuV6I88P4/CDTVTHwnnXde3+EjMzL
Jt8ap0nBFqWH70bwPtla+83RtF8OKNoKpC9jP7j/VJjK31sR9iVneb3A/VC1
FMpkcnU3iA4M+t3C8dW59oQZ31KGHSozhR+I+tbw+Tt0VRXudb7nm8bMsiJs
NxyqDsHlh7UJPzg9WC7FdkcDLOuvfSf6oVj31m6tVC1YvUIJhN7pA2pWeysQ
lC3kviL4ynaG4dm0EdQ+72BR3liEis7GPeulpQULtxN6h6sakM7YqV3dPWxA
XXkx15mrFfEq/FymrN4OCdsj6tUm2tCVB0xfjZyEgFV9C19TEvabz3nlKUE7
wcnzdmJePxn9fHx9sSJKElTvj8o1z+J52TheXt4mC8aXudI8sR/0XYq8rzav
AB6vE7Mdsf4X1tq3LyzugtrR33UuRL6Y/S9eZlIGiRmv5kbMgT9arsZSq0JT
ZOTrH4Q+UmM9FZU6TLjohBD7wxdXE1p1Ng3Y6TJgTegftXNb7ODSgkzmcVpC
7x7fljxHZQT31ixy1vcHSv6bp4OXkLKQ4xl5yVokc8dIbDR0M6inC3A7izWj
5azZzZIdXPCPvz7biNSGBhPeSDk94ofPL3TB4gCun+01HzUCRKA6Mmm64g0Z
3VF6uXzBXxw4BeK3tX8no8J6+7jeQmm4V2sVrYP7f7ZijOLzN3lI0aIINcX1
fniwzPXVlCKYHD17cw3rr0tpD+GnV4KdS1H9mTi+v7XKydyMKuD5nvrfZ8zP
wnecV1hWhb4HSrd+Y3avDvhes5UEr85x3yX6f9FOyuLHZk3o6G9xJOo9WC7P
87H4HhiWCnAn9MbDQv7vyG5UwDuXxVafg9hPibNzf6WC7rS0GyXR9Yh9IbQi
qI8VaO51+TQ/b0EyNr6FuW+3wbhFN7VOfRuCPSkSzD2CcPz4eO3BcDLyapQ8
5UazEzL0+76MfyQjTUHzO3O0kjC93Y5jfJqMuM1Ofj9rJAud0fFjzbjf/YZq
TyaUKgDzncckcaxXKYjvfeTzXfCDy5JhP45v9rDpDFeLEkgUDD6qJe7/uhd1
3N/ifp+iFf1OzAN73tWYKjWoozp5aRFz0pNYb9NOEqQWBP4j+j3gmG3vgw7c
72Xpw4R+l5vxva6ze+BnHPUDQn94cDeFZ8I8iiieC3vr8BpFhfaHCrkxQdkf
p5k355tQWylLQlcnJ/yzOlFlvNqKpl+ZfaF/wgdVzcXcqgjHW2G1fW1OGOZD
a4bVK8hIWEAlT3tFDEQq5/i/jeF5jkRl2SSlIeaJ3ClxvB8eQa7yd4/Kw2jD
YPoP3O/LBr+UeAsVoXJnt/hnrF+nJa9R6c1u0JXazJ6E4zvMSc9W2KgMnvnk
1D6iPkcaVBmrVKGqI2aSmP97PpMFLVvU4QeD5gLR74X3vV+ttmkArz0+TmK+
qd/b7z2iBa+aXtqu73/6Z8TQKgLP29T1BNf45T+ScCtAHmFd29/lRKMIQac2
EU0KSOlrrWIaqEM9YZNiSfdZQCGQwplerAVV0YrErkTygFDenoKCmDakFMKp
RSEvCA1e88LuvmSUPXnjxiMXUSi6UxXP0o73FRWTff8cJGBnXcC4JPb7IzNh
I/FpMuA+MZL6eQnfB9L1J8zcFGCNTpy/F9c/S4VXRs7hXeAlJ+KviOOboWVr
+BigBOcmbY68IPJX2K5ccUEFnguqnfiKmRn0dA1PqcG1Zu054n1Jh0Ku4lEw
CfYmufgT+S9XqD138LIm0FmaFRDnIeOGHHYXTCPH2NdZ8zcqEANi15OrZoDb
maNZ2ucbUZyxL9WPuxzg2aqdSJfdioI8/r52OMcL8YYZ524KkJEETbPcbxNh
iHLODhnKx/uJXkzDZScxYLia8OnFMBk5HxD6yXNFCiRKBEbCsb9nj4RIlr+U
A7X92ipOON969F4lHc6KkNsZqZ+P881HS3Hf4sxuOPXLJugmjs+xsuWb1yVl
mItzcuzCfHe/gLSdlyrQmASkEe8FdXWLJ+j81OH9Y0sWIt8OM8x0toEa8Mr6
cw/hbw50dD/lo7TA5VykOpHfmf7jqT65Q+i+emQoOlqImuTVGXMu08C+oF6m
774NSOVUEYdOEhsoa/9I/bLagtJebpHKC9wO3MU2ahlDbShff7rkopYQbFt6
3XownoyubYsQYz22E/q2cCSE9eH6Nijlu+UuCZ63JI7YYT8Pngi9KfEU3weH
QvONsJ8HdfXtu/NVAdyOX8q1wHq5j7wQuDy2Cy6wLSUdxfGJH/XszvinBF9J
D7jeYb5M6feMcU4FgHFZkPBzN6qULrEZNSh1MjUk/LzN78HgZSoNMGoOR4Te
WztGC97SaoGp4c0VIr+HnVuOy4T9QavPd4j3lNcgPfNfV55TbIZXmTWMbstN
aFqKNB0bwwVZejwjS9Jt6LjQmC2jCz/I89fWMlqQ0cPazMfuDiLAyybAVlqD
+9sz0W3ioDhEb1V05Mf+XXc8ovzxbWnYY/bEYA33c9unmy0m9fLQvrIpQBnX
Lx2JdgfnoCL88dp+ZxHrFc015BFd2A0WV4rfP8TxxXJL/dFaUoZ9gTwzA5if
ptdnZv1UhfK0bnHCvwVD9i9+XVUHSTFzT8K/x04GSCusakDV2DsLQp/UjLhE
MtceeOoU7krk9/KbAsnFtE70yvSHFHVCFpKRaDk9dogKTAretXBCPWK41P7g
VzIr2F5aWZBJakHPviR+tg7ZBofK6NNvV7ahs2NBS5qlgiBl9MHzbAgZcdIw
fuwbFQW/rNHC1A9kZFEVWFo7IgHX92/+chz796wHY8kXMVkYuFsclIr9W1CD
hW8qSwGUnjNF8mC9sZFxR2Mf7gKDT/7CJji+iOewT6tSCdyPSJe9xnzWXvTc
cIkKLNFVe45jJgnNMJU9VYNnLWGKhH+HVn41i35DAu39LiNE/wqLdUbfqdEE
WibmXkK/3tcbX+Tvz6HgnE79rZXVKMsgcGj6yyZoLU898V6/CdWS7C6iOE4Q
2Jz+nnuyFfkYejEXufNBzrhSt7Y6GZ04pvZDvlMYOjybeydekFGDPSdP8YAY
lD56tZUf+zXHgI3VIJ00dBo/udGH72saR+j/UYE8PBBxPvQe9++jNNL4uXRF
uDphI/4B603vFnEgFe0G5cdxyXdxfH9O/vPsfqkM3n9eePdiTl/ydruarwpr
O7KvEn49m/lIzrdCHUr05JuJ/k17WpeoW60BpVFXeQh9tf+4Np3o0IJrc9yW
RH7LGCQFPNxS0VjZxdLe+XCkuOY8zzW9hqTnRpbgaR3qMGFLbAtgAdWpoeJk
rhYUaFyc03GGB3q2+wRxRrYh0/6QTB5+QTDyuNQj5IP3h/DzFQM2ojA2oc1h
Scb+dOO48/BeCVDtbmYc+IXrmdKhsfW2DBhPyBTUYX+OM//55uIRBcjUTkhr
x/X9GvJOy9jsgrx2eno5Yv4oMC9891ECHVkbnTLMxzXFzBc8VcDHhXeFeP8f
y5Az7j2qBu0GwY2EP5czdEs0BJCA+WqgB5HfzWwU7V0+mvDP/mkOoT80Mb4x
VnEaDbEmW2TPlyOOlBPTnP4MYJUoHC5n34j3v+Rzgr4c4OZzpicjpRXpFYV3
y1vzgnriDiNOXjICO60EJg1huM/XOxzylIzyh66tlO4TA7LfQqAe9mf3R6S1
NXcpMBGw7jqM/ZlrznbrTLYcPLTf9mkfzi9PMdftVQdFyPcbYc3B+W25pXG8
88RuMNzqcSmYeJ8Zq+cK9sb30VWWgk7McZ98dGPdVKHQzukI4c8pEsPuiZ7q
oGEht0jcR98vlZy76KcBLWyH2gm/eqLJfkW5YBD1MfQ2vM9+hj5GhZfcUaeB
6dzfk4aWDUhB5uONCxfZoFQ6Q7V7tgU5r6bCtaPb4cntSXY00Ibqk5z5Y2SE
gPw55mFSHBl1lfofMrbaCctHGIvneslo012ywtmDkjCUrnSTD/vx7F87d6f7
ssBa3PBSCfuxzbVrkpUDClBKy0prjPXVf/39bW1gF9wy7P99mNivwk/Slf1W
ghYpXtUGYn+KaH2n91MFRrgOkYn3OR2X0P4X42rweumGGOHH+tcMzNP+kqCF
LkOJ0DewLMSMVjTBxYG0ROSzIkakK4LpD9p0Le/08aAaZPEUSd+rZAYXhgOn
Rsaa0MRPx6ON3lyw/FDV77FoGxJzuXDmswE/ZH0N+GtjhuuFi4flxl4R6Gc9
kJf3Gu97zKEpIqbikBlxz+PNOK7X55mtUVekIWT4VsMn7Meav2yKgkrkoeJ8
cp4krte+sSdz0KMIEQwal39jvV3y1wezfu0GdU5q3XQc36C2qPj+GWU4tnnV
jfDjPBneqqFRVWDXjZon3t/+TmisXlhQh0mmmYOEHzt670yyXNAA13IBY0Lf
dDDzN7/c92gxg/SdauERUgvh52njoYLQ9L3v9nDVIyrNuS0i/qyQdMEqKDK8
BXmLSs1Lum2DcC3qT0llbegWaf7ogUxBiOBZqva8gedd+h8mjg+iwDyVDYtd
eJ5vTm7M6ZCAw75UyULYf49c6U3m4pKFmVHHN6HYf+e+lS5sT1WAHTbRm1iJ
/ZG9XZIreRccKYzmNcLx9QyQrlgUK4GR7O3yasxeoxfD+fJVQMH9Jjvhvxw3
+tn2ZqoBm5kMM+G/a3VRFc8rSDC/j62b6M/z9KyTjC81wf2dUNf693OcA+Z3
+OewD6dxndasRkWZHZE99zZBwUVebS3ZJlS57D/h48MJWfT211u/tiKVCEqR
EDM+6DbYkaSsgu+XZblWRrXCYIs0f1SUkdH2RRrzX61i4MzTIlv2lYz4Zbxc
GualoDQrettz7L/ZXt2D6vLygHeSsTe4P/3MhmpSkxRhmfZYRDvWa+HoJPwq
ZzfIcAh1xhLzIW4+ZaJQGfqjcnuI97K04HeB5Vmq0LD23YDw3xbG28oMz9XB
2ka4hPBf7lIPOpcyDWA0XWAh9GlZK0bKlRuANf/p9fd0Q2p3O5/3+yB0ZeP7
BAn7TlZHH2s49d97/6Oeqb5wOWFoKRRkDc7D99Xl2MfhcjqQ/1R8ifDv2idt
3u/1TaDrGc/6512e0qSGy1nCQ7WNv5+geRgsV/7/938X41/X3+trQIeYyV2i
nw7dK3oRLrcLksr3F/Ni/h+M6YaK
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], LineBox[CompressedData["
1:eJwt02W0kFUQBVC6QxCUbqU7pBGREJFuCQE7QAG7KLsVu7u7EIsWaVAQaezu
7n3W8sd+Mwfeut96c+fWnTxt6NSCBQoU2OtH6mw/GrJSfzGv6qdQnKPlu9Te
fKZ/mLZcK3dgq/5mVumnsz+ny0+qw/lNv4BCzJEb8bb+El7L+ZTgGPlutQ+f
6x+hHdfJB/G+/hZW62dQhTPkp9QR/K5/hcLMlRuzSn8pr+d8SnKsfI/aly/0
j9Ke6+WObNPfyhr9TKpypvy0OpI/9Aspwjy5Cav1l/FGzqcUx8n3qv34Uv8Y
HbhB7sR2/W2szbyoxlnyM+oo/sw9UJSL5Kas0V/Omzmf0hwv36cexlf6xzmI
7fJ8OrNDvp11mRnVOVt+Vh3NX7kLiuX+5Was1V/BonyDMpwg36/252v9E3Tk
RrkLO/V3sD4zowbnyM+pY/g7d0Hx3L/cnHX6K1mc8ynLifID6uF8k12iEzfJ
Xdmlv5MNmRk1OVd+Xh3LP7kLSuT+5Ras11/FkpxPOU6SH1QH8G12ic7ZZ7kb
u7P7bMy8qMV58gvqkfybu6Bk7l9uyQb91SzN+ZTnZPkh9Qi+yy7RJfssd2dP
dp9NmRe1OV9+UR2XB8qi/99rqeyA2oqN+mtYlm+wD6fkjaoD+T77RNfstNyD
vdl/3snMqMMF8kvqeAqyWC6d+9e3ZlPeO8tzPhWYmjeqDuKH7BLdstPywXyQ
/efdzIy6XCi/rE6gEEvkMrl/fRveyXtnRc6nItPyRtXB/Jhdonv2We7Jh9l/
Nmdm1GOWvECdSGGWymVz//q2vJv3zls5n305NW9UHcJP2SV6ZJ/lQ/gou8+W
zIv6zJZfUY+iCMvkcrl/fTs2572zMudTidPyRtWh/JxdYk9mlp1We/Fx9p/3
MjMaMEdeqE6iKMvl8rl/fXu26Ofzdr5BZabnjarD+CX7RE8OlT/J7jNLfwBz
9ZPVYqzQ75Pv522zn3+bof6aPeEQPs1Oc6D/m5dZUiFvlJm5Z3pxERXzTXZk
1mpvKtGHyvTNN+jH/mz1e4epVehPVQ6nGgOozhHs9Hs11IHUZBC1GExthlCH
9zNvtS7DqMdw6jOCBoxkV2ahjsrfxWgaMoZGjKUx2/L+1SaMoynjacYEmjOR
3X6vhXoULZlEq8yZ1kyhDf8BSnXmSQ==
       "]]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{472, 473, 474, 475, 476, 477, 478, 479, 480, 481}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0.01},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.5680626321567297`*^9, 3.5680626705099235`*^9, 3.568062702019726*^9, {
   3.568062733319516*^9, 3.568062766697425*^9}, 3.5680628221645975`*^9, 
   3.5680638362966022`*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYMgLhC8sPfay+73LP2/PYx/lteMkyVW
wAHGd+p3PbDcXwLOT9X/xWvIqwDn+2qmfhRzV4HzN12pLT1poQHnWwtprWep
14Hz039Pmrs0wgDOzz/23Hi9rxGc3xXFpvo3xwTOTz5enWaYYQbnH2SXDMyO
tIDzDQUbpr0ssYLzEz7b6vjl2MD5C+cdlfneawfnb+6zun0pyAHOL9llGzDX
xxHO339q6afOaCc4P9Pdcm9mhDOcP2eF4dbsLBc4f+LnvY0F5a5w/rNVpWUZ
RW5w/hG3STOamtzhfEb/W4/6GzzgfAbHbYwLKj3h/A7x776X2r3g/IKo5EPf
m73h/IeNJin2U33gfJHJM291LvSF85cJaFUen+2HCK8ieVf11f5w/jyFBTK2
IQFw/t6aXwwZFxB8RW/2P8rhgXD+lvOa3TevIPg9x/4ZKMQGwfmTi19mJdxB
8GtE5fiVIoPh/JWarKdKHiD4bF8YJQ/GhcD5yw021s17juBrJq3y+5sbCuff
9ty5KfQ1gn9pcZWufXEYnP9jc6CN0icE//+Ooq1teeFwvreBm2vNVwT/eKx+
ZnZxBJy/bkPB9///EfxTE28Xvkh/D88PVuwBG7buRMgvufH+VreeEpwfM3vT
jm49RPpN83rbfNHVGs7f8Wfy8m49JzjfNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwBLhSDZ
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJwUl2cg1t8bh1Fm+GWPyJ7J3uP7ve09n8cWki17ZGYmJElCUknKCBGp1JHs
JBUZEVFCKFtW/Pu/Oi/Pfc65z+e+Lj63QCsPMhISklRyEpL/r/xX/t67ffw1
pm55c9z8WR9uhCjNZrwOcDvG28HVFE/xd3SK1IdPHYUiMyqauO47uNYV3ZYy
c3b49HR8tDL9Iu4htUMnQ8cLb/vMTPQ6g3FTMY8VVn1BeP1i+WftUzv88ae4
8DfKovAhsu0bT7AWrsYo/uhwvAToTNEYv7QRw712c27dt5OGXyaur9deMeCB
nbNyj0xlwS2MRT/20Q6W4UAh9PesPAiHM45SR37DznTFeMp4K0L5WZb1nLNv
sdeUHJZ+9srwWM7O8XtbAybDkJD3M0wV7AYvPp4+fAtzXdOQMDurDqpuN/If
tVzA7t7u4PpzGQP+1V6hcdkArD5LdazfCoD7eFRGRTsRC2vSsLhlogleV0Ja
e/Iw7FXP/dV0Ry0QS+XkHLsqjPnoqyAfO21YO+RhfNqbASsql3ni56sDacLF
JSOKqxpX11Bi0DldILVL4ZYS2kAzleER3iF6IN0cslHHRNLcrpdTkJSkD4+q
b//6LbWMSM1Hv11JMABJ2TFHM701RKLZSFocZQg+xEyXN8fXURrbH9P+i0ag
/oHIvnF+EgU5nGn9k2wMg+bV90e+D6OpRHl3/LoJzH2OLLls+QkxX7sxmn7X
FF5SGYU8mniGHhwVj+q6aQa9a5rsPPx56HUIj67IQ3OwYq8Yu6J8E93mLebS
IFrARf2tjueSVQjF7pB4f7AAguQJRYBKxGdMuSdgawkNL0ie0C1koYb3Ypc+
f7KE7om5rdu5fiizc1+a95QVFGlJKJ/TCkXXQn/6un6xgnFeP/dDqskoluX4
f/z2BODxmJVcvZSAKsTIe8ImCfCb4fA2b7Ybolgn5XjtTIQPKf6M0QuAyqTr
zt+eJYJe+BbF+SFjJOZWafbX3xouzK4ssJY7oDHD54+tF6yBvmLMbk6MgPrv
RZ/EQ22gYJUnEEvG0Va9pTr/qg3Iz4rvmxPV0MGzkCepAbbwpTCf+majPDKW
1tON3bCFyW62MUyXF3WdkvLxC7WDNLqG928sOVFNbdCfgwM7+N3o+ryDnBn1
XB0LnvNawi2bPw4G9rXivH+fFv1VpAKBlqSbYXQP8bQ+NG1twwxa5zUNBG2v
4RR/uH4fVuACrbKCGYlfsbh91aMDAXF+4HB335nccMdJ4oPllnFhaBFkiiqX
McMj1giMs47iYNf5KOfPLQU85bDohkiBJIBrHP3WX258wRV5ixNkgEKh/8C9
jRyPPXpOwuaUHPzQyh2/6LGEbR59rZvvqwC2wgMP/iYMYTlePY59rkoQesr6
77PJFiwqszdU3EsFzooO66ell2MGZC5TN4PUIH/LLUa59SpG8iaxlD9OA76J
XkyhKY3CDjvf8um7gcMrF7oaU3QayxV8yfLs/b9O0C1NMlw3wApbg+8yfdIE
q/+o/z5MlcWY05eGtz9rQV+tddMvQS6MLFLhue+UNnAVWwzWlh7GWPvOHfu9
rAO1/SMDl/h6kfp7jtjFdV2wMJ9UyeE4QINbyRfDd/Qg6Ps1k6g/G+ibUaNG
OqkBRG6EShNSlhGJgcEq218DIIvzZpn12UA6VUMiz0mMYN3h4rdS4Xm0p3yS
6ge5MZT8mYguS/6MRH8bX7tJawIvLt/dZxgaRtE0Xnfcj5lCxtbgchx7Nxr/
OFVRftwM/F/JfrxeX4YaXgu6nBMwB4H+z0UXpa6ig8V8lzlmC3A7rFu7pnkf
1Zi9y7LKsYBZiqngQz9q0NL3hP0OJktY8f7Ut+J7G/leLmjbv24J0S9leemp
4xCvMfPEHrsVbFL/pvqW74WOcq+bthRZwZuveu42JXEorf2QxmtOApyt11pR
TE5BOXeunn1bRIAZQfsH8xUhaCQreaWQhwj8bmnB88ctkU3O57dS94igJjMl
N1oIyPtN9cw7cWvQ6coK5tG0RmRDdQkVVdYg9ODBlfFqBzS0yRFkJGUD55tO
jqgd6KEfJ2Yaah/bwGBeE5XHKTUUq/gtkihtCxLZT74XlKii+2FOcaSPbYGi
riTh8iNRRN2lOhwqbwf59KQ/C2Y5kSqlRe2T53ZwYPFy/jw1J3qjmvx80esr
LkL25qUqdTf+7df46ciNQ/Czz35q8X4dLv57e7PKnhFIWe9qHnlbgAtqy9ja
aHHCa3lXY4/QJPzrr0+plcf4wJSuMonMxA8XJvrlJGsLgUDDzihmScCZp+e0
7YzE4KnaD9e76uq46xExq7xLJ8HMccNE47wALiYpemhuUBpe/j2YvP/2CB7h
J1WbNCgLqjFHBB6fW8danpxR6FmQh7CLR0IWB79g0WwCU/HTitDjcGgiJbkD
4+4J+WY0qQyqeatHxRceYS/Tl160rqqCsZfYifT6PEx6wsX72bo6WPEkuGg+
TsCszsu0fWPCwXRT3jRU1AsrtY+J1L0K8JQlbfMurwV2sXk40i5bE5Yzdz/M
tShh8xVGP14XasG30JhQko98WKOLktp8kTawkvq23OigwexfEOeqqnWgpfvL
KpvAFw3PqYXzko26sMIer0zFtIsmPu7tBzTqQdXP8TurbHtowEBwgbxVHxhT
lvbnny6hBOOr8wPNBmDwlblAt2AdlUR05kogQwgKo2e4uLWMtEQZH451GsGe
Ysrdac0vyKR0uNKw2xisE404WjeGkWTnO1KrEROo8WJ/lk75AUU+1tDimDSF
pD2xpz2+deikj8jZO1/NQEOK5V+6XUWuD0TIYufNAVi4Xyub3UUPnjYO6oda
AM+u2V4s1CCbWnTAumoBNvV147OOpUhv8b3L1QhLgKM7tB7RF5Av3R35hU1L
kLh65AZ5vCfqC47Cl2OtgNjK2hZqF4noizYHsnetYM5YpHzfLQVdHB1Gm9EE
+OF/JdVIPgqBU/s4JQkRvKqm3iok2yPJNv+QrQQitGdln6Uo10BUcY9kFamt
QdxVz6mowBKxctV4ES5bw5MFnoP4SEdkV+zDYEFnA7mBFSNq50zRFy/plT85
NhBBS1zPvKOOVDduOKgx2EK+oHE4pYMa6s/z4tDJtoW51on1/4alUGUM0G8x
20HTq/9OBfdxoYTHrzKz8+wg6nu2e048J2Jvi9b+dfkPvtgqYj7uj/BTtDnD
SZG0gDkWBG++KMV/1CT271uxQm79v2kokYXPVVJdqBc5DsZqPk1vqyLwAd+M
yFvKAlCm1frVgN0V/1xx7pOTugjslqvtzhfo4yNkrybD/U8A5+KJmPxMabzi
r3DB81IpMCz88OwBIxtefc2q7+wHGeA4/jTQiYYUT37SXC72Qw4WliXz8pjn
MImzx23cfyqAbvP04zvZH7HKp8FDXONKUCHsJrAR3YQNmgmT0/xWgen5jdo/
EyXYp+g+ivDfauBK1ROv2XMJ+1B/bzKTHIPsphNG/XWh2Ojtw1Tj/wHsMJJU
nOF2xFKW9h6L02tCTSv3M8o0bayq80hPH5sWlH16YPV6TgLDvHN7ZDi0IeHU
A3acnRUzz5ZTWhDSASNZLvrnQ381Pk0WmknJ6wKh1/KBMcs8YkD6UZVyepD+
U2FZLZSkuZfnyNFYTB+u0y9ovv9vFa2aGGTTahr8y7vcm6zdKyhB52DbUc0Q
JtDU5qjLP96ammnS1TEC91vZ8wxB06jR0MDjt44xZG65mFCqj6DDyi0xvyxM
oPFUXcTjkSHUZUaicc7ZFJzTFptIbrxGWisXGJRPmQFlv9H7d0N3kConv5W5
lzlsmEkcM5nIRX0UXM058haAP9CQD6esQI0/vuufqrOAirOXqjsfV//jNZ2/
YQr/eMn224l4+jx0RfK0yNknlnAjdOP9j4RQNJSWfpFezQrahyr6pP38kVV3
gFP2SyvQYOupsNFJRGS/jj5YUSEAcrsqbElIRrfdjY8VNxNgoQF+X+/xRYGv
tcglcSJwaYarEvj00fnTukJeHUT4RfKdu1VHF3WzVBV6mFiDEWHBcM7fDv2+
8uTGwVtrePbFYbN21hYRTXv6dCxtgHV38cd2phb6vXQz0qffBhQyWeUD+NVQ
8znxfH9zWxD6pFBSUKSMIq0sp5oHbOHxhYzXU0UCyJtRoXiJYAdbaH6KXIcT
rTtODox+sQOBrr7xK4LsqDuz32DD6z3OeNBS7yjxFteZCWp/8okUJs5YZ+WL
NuB7f9kS7BwZ4DTk5+owFuFyPi+OHBhwwJ47h+7GUApekuXV45/LC4siYSJ3
hAPxJmxO07RDEH4erX06+9kaP+NU/yX7tSgIvGy68o4f8L6sigRT8pNgf5yy
KlhFGO/OPfVBL18a/pJRBzr4/IevFhxZLbgqC8KXT3H1OP/BhKgUqs9UycOG
UVPPectJLCDw/T27B4pwP/JQApdRN7Y018ExVqQMl/k76MvkHmMR75TEhupV
4Xpasd3lhzew7jkzo+RadUht6rkxQZeMRWftLi1+wED8+1+bZ8G+mMT6qBht
CMCqk/BAhZUVdv5lxnR0gCZoPrhPxL6qYkTVrQWhGC0ozzs6EUkniGUTlPcq
orWhcpCK+tclemxHps2MNlMHjvre+3hY8KdG7Dwx4X2eLjiJ8KlOEraQG/a8
yS9XD1r6SFh4c/ZRr/6Ypk6JPjQMVEfWtiwhePdkpu6OAfRdIJe/s72GPjpi
xp43DYGW50qxQN8q+nEnZc+mzAiG9Unvv7CdQM7xtxp5HxhD202iHD43jKgE
Seu7G01gu75a/IJ5P+os8cv62GIKH17uVpP8aEDzL8tD6pEZ1Jy4GOZOfg1l
Z96797HHHDxX2J7S9d5G/GdPRLWesQBfisqrlc7VKIPVKQGfsgDLSXduFcI/
3rq5UD3qaQnrXrL77yfS0ZWAaZdvPyyBeeSMbZuENzrJpa5M5W8FG/o2txNR
OPpAGXRna8EKkq/QNAgsJCOyrWhPWl8C3L029+f431i03jpNwJYJYCfKczpy
2hkVjj3t+BJIBNXCm/JJ5Rgasam1890iwrfO8BWFCHPEi0s4lsdZgxKP326p
hiPiDGf4ZrVnDa2El8eT31ig4QvWV44l2wDvlPlW1oAGmhPx9/KIt4Xd73OH
7EVk0Y51m5gquR1UbsUIPfY+jvZ15ZuXi9dw7scEjhslLXjzYSHVFlsaWK4Y
7Sd9VIY3Nt9xrCSyQGf0JZFl5qv4nw85Kk6S3KBQVXKYWBSF5x3hfulaxw98
L8dWDjm74Wdz15OFm4UhOsvzg2mdES4Skx5VMy0Olabxb7Z/yuKsiWWdQcel
oFcgNMHQjBM32bl48+1VGZi1n1M4onUIJ/leOI/flYNGtZzYv+cXsKvNS+/+
ViiAjfy1z9+mBrDb/x2/sXFbCRhcadq9fiCszD9KvbBSBSSvpgayXbiPZTWz
hqU9UgP+9B9FR/yuYN7NOa22rzWg0vv4Gd9zEdgX0wH19i84eLqLlXeTumC0
GU7uK7//6crvsI/OR/Swe+3NCisbmtByV1ggzU4aq9jS/Hh9Wwtas6S2g1bY
MdEU+a3KQzpAnRPkLtdHioXbUj/JYtSFiTGMSWh8Egl31kYbM+vBvo5RhJQw
SbNFZtfbSC59sGGQtlJ5sYbmjQ9mjPgMQKf8P91h9hUEnQKbKlyG8L06UIk2
dQOxdDkHx/Mbwa/gWfJoullk/7qp0UfIGGrMimMino8gVqbUi+2S//wgQCv1
c9wwKq6S+/1L3RSsjlBlLT9sR9lT9aeWNczgvL7VyCG/e+iP/z27M7rmwJ/1
x1u7OAfNbH/OQoIWwC/OPhIjU4ZkC+0Whu9agL/zhQnryzXoZdy3uFuClrBx
pVwgmrQQ7Y3Hhj+5bwlSjLW3yl6fQ7s/+x6Ti1vBvsQjuxhSX1QXImNdXmUF
3+VslJ6wJKAOu4xge3ECeJ3ejEccKYg96Xfbk2oC+CZ0Lme/DkSComdi3KWI
cMh6S8GbwgTNR12JNG4gQpCF+CjPPS1UsFTVckPNGiLEVwR9ftugrcdyl4kv
rSGzozoEsu0RC3/InX+3CdcDF9ItLukgblsKqincFqLUPesT+1VQ1ncbqclW
WzhOoVqu8lMI5cuwaxm8tYNfAkt9OZYcKD/fzGvp8iyuATWl/VodeOKG0YEq
KwU0fjSjyJupwe0nxvxJ7ZjgQvHUrY8/ruMs3GUl1WrHIDHO7cS2dQLOZaql
PVvCB+TnGDZjF7zwaz6/vz1/LQTx2XLtnUyWeIff8Yc8A2LwmSyAp6VBGV+9
WC7wlUEStAmfB7+z8+EZXasK6cwyEMbrS6dXQIVvaxACznLIAQVbWW714grm
eCYHSZ9QgIun/QVloj5jqa8ijpfxK8G6weRmKH0bZvyQ52GTgApYtTmzT+4+
xMj0ysweyaiBxELCQiRTLlYwEJT6S1kDJkZpGSx04rATAV55IzY4POPvtjzQ
c8e4Xh3rOl8LcNjh5NR1RxMsu0WQTvGxJnDU7yj27stj8Ry3Jk41aUFlG7vT
k8c82Bc/xWjxV9pwJOPXy+44SuyZzkyi6Xsd+JB7v508rknDciQp7vKgLmyW
RQQ52f1FDh6gHTKiBxZKt6tDBrbQqKF/bteUPvw5fTqjnHUZtbw5+3tj3ADm
G3wzh1g3UOhVs4nViX/8U2v07E/HL3Sn9o6964wRVEiLPIt/OIpU3zDcCZk3
huLxmpsTm8OI6F1oMbZtAmE4iefHb2+ReOt/m64HpiAsvbV5s78KBbE88LhE
ag55mS69F2qykfghLdl3SRYw2dGqSNJVg/iNeOJ/k1lCRrOcsFb5XTSi3sBg
kGoJg4qXOqsaEpFulT31OqUVLKvdM/vh5IkCuxr1RjKtgKvU29+FJAYZS8dR
iR0hgMfwzfHyghREi+RZpi4RwMgnazK2PRxlbtzz+vgfEaZi8n0ElomotVKA
hzmHCJt57lfr8jCkfK+GlozTGkz9VyRnwwiIdlsqbL/IGjp/iPMXmDii/Lev
wfS4DfS37lfkrRuiScMjhE8lNrA+IEj8NaCGXpK7veW/awvp1kQKtt0TyOEu
Wn0iaAfU72cvx1UcQzLwuvtn9C4utPfn0FGqJnyP6SBM9wY9fDK+t70iXIIz
3zljSLBkg8ff3h94PsjAP6ec/0DDxwPTru63XJnC8KM9f+RHXwmACeX9TFoF
J1zv1Y7gtSYRWPV5IeP5RQfPyFjX19g8AbV/vSwebEjgxzUG5BNZpOGwfilt
nTozTn+Sm5T+P1lgO8HMHCS6j1GkffNkEpMHe88Aye+sP7BuDtOJHlFFQGIF
84HU7//5ZQeTzjFl+Jp3vcg29Cl2SHrgXZSMKuS9P1r87VIxxqmUeuP0SXW4
VOQtevt6GqZc0bD/2hD7V++p/6q1grHOvDsrtjIAtWLvNSSbbLE94i1S95Oa
oPBBa/KYgSbW2G3nXKWiBW8qE+SpcsWwT8Mzbe+UtWGDq4nd7gYTJusrMffe
Whf6u7jtm41X0F79xDlqgh60Wt1RfBNA0mxQb0aMd9WHYVGNO7Yz//q3dfRv
nIMh6Arw2s0trKOnewGHaT2NYCOl3I5S5xti6h9kCnU3BrJnjPFhO8No1Wkn
kDXUBFqV6Jk5Pw6i38u9l0gSTGGZpP7nkacIrZPYdcTHmsHttI2GeLNCdL6z
2Fgt3Rw2SxZuyXflo0Ym519eOhYgUzJA+PqkEqnKBJZ+a7GAoY99/wkZVCFi
3f1YEz1L0BNK6HbLzEH88bqf+TssQWvGJzFNPgjVieg4sZlYQUTRh78wEIRW
uavORPZaAfe1vbMFhCSEJ+aPphsSYFj5dyKFSBIS1C8PyXhPgFEhqlRTL0/U
5MB/5Y8ZEUaPs7nMhWsjRsPdj0lDREgrdD1t72qAttQehsmcsgaxffOpllp7
NH1W6UHlmDW4pXTr8pRbo2uR/PuabjawHz7LeGoLkHOBmfCOsy3k9Wqo1f5W
RG6vja/dmraFRdfDDCav+JBlarmH/287aDPoE2b1YUWd0sFeFN6vcLuxezd9
p3vxMLemcGI7CXwzOF4XeOkJPk1epiP55Sg401BdvzdxC1eNJfEk9LLDhRvm
2m+FUvHDX6XPvrfgheX6/sW4e0H44YYHHLKpgtBsIu2TqmGLZxSwi52ME4Wp
Dm0OAdDEUz78ZBNrlQDx+sQ1shciOLvBluLmOWno1sFfGj0+itc+2mYsDZSF
g/MbE4e3tzC7Om6f2kx5CDETrlZwmsK8bwqR615UhIwO3VLF928wu8hABYEY
ZbhNSTPaGlSPEZfGvrrkqsJTkfOSnsY3MeYAvRfeWepwywErue+YgmXluVKE
PMKgn9xh1FTrLBb0OiMp0A2AlLjJ4JpMwKLU3DkzT2nC6ssr+VCmjmWQmS/Z
+mlBx/rM6yo9ISz23bMv6T7acO1qSZu2+VHM2H+HVD1GB5TZ2pUy2n5rUARS
k/Je1AVKAXahT282UWlYPrtvsh4saCnZXI48QAZdiv5ncvThUIS+1+buEuKl
757mzTaA+/3PPQfvriFvs2jh5AxDIHMu5ZRIXUONYxr3c/ONwMt2qeR5/lc0
ezZBnfa6MfjwPlfI/j6M1vsLjxx+YAJRHNUCo24D6FdhUsPJOlOw6TT9G/ux
EXV7/gxHVWYg8yjpXZNnLiqPPx2212QOhyZM/65sFSHXzh89B44WoBVNslDy
vgqVGj5sGRixAKozgg6Pv5Yj39Bt4oGzJVTTqMa7mWcifp6LG6fGLSFss9f9
wgMf5BR8S57ZwwqeCU1c+RAdhh4jiQsS01ZwfSgy8eSNZPQqtVc1/zQBdBke
Gx07HI/MNtez7OcIkGT/JkBgzRV9mHVaMvMignvQQeh/mzhqaav1O7xMhJfQ
zMty1xSVWix86g+3BuOmEdvQvw4o2sXD6NOaNXDW0kxTLFmiT8zezidjbEB3
7izxZSGGwpYD6TcjbGHqeZeOrLsc4m9LUXL8awvNZV+eJnnxoBDKqzEhlSs4
Sbreyv6j1/hSQsCCsz41fJlvt5k1r8DvdEryJgwyg/D4eZzpZA6+/334Wm0d
F4wtN538ohSDbznOnGr15wdJkvv3D905gzdS1zseiReGp5l0BY1nTHCzp787
jIrFIXI6/0WAsjz+rnX2lMmYJDRsXEksYeXCi6r5yWJCZODrikPeRuRhvHk7
7YhxvBz4FTd2d53+hbV7jaQbZSjAnN2KO6XIIFagFrYzFa8EIVc77ZzaX2FH
//LbfUtTgc7fiywXdh5gfpNN4ozZapCp4vlupT4ba9DOkNO4owHl88d5Pxyc
w5atlQmGL3B4rERmpXXdFbOwpUXErwBubqfXKYP0sdvaBX5kPzTh3QpLioOn
DDbRUvCp66cWvCR99PdHPCfGst8wkrGqDVw8N4O91Q5hnTng3UyqC7X/pTxM
ph5BdUYeuzcP60FGzjVX344DlNN6X+zcEX2wv2/tYNG5jjzfOjD6MhiAYnnT
UkzPMuKlVFwvpzWE9Q+H2y7Hb6Cq54UmRQxG4Hk7u3s5fQ6J/w11KWMxhj1B
F985ps/oDokPXS23CZiqFvqoPR5Glx3f6YlJmEI1ixn5a5tO1Pi5J9lE0gzc
d4I0bcLvoyG2aUd/eXMIoXrHzNJ7FYWsKf/p57IAMqm8PGr1ByhonVGDpdAC
hp+s9z3prkFDtTLNMlyWkFczlUArUoTqn2Rwjd6yBPGhfR037WiUVRhskMhn
Bf23mITaKrzRZFeOZUOpFZAduVF5YuE8ekCvb3uZnwDsBv5f0+1T0OBRKID7
BLhH+17bWy0YnXcMbYwXIULtqCoy2DRDvKnyJeghEcQF47ZH0zVRglP1gJyc
NSyd4By/wmWD4tpXKeIbrOEsb5d5lZQDiqDtpHyjZANNflK/B5/ool69sBZO
ZVvQKnasFdRTRZxV9kNBTbagonI+OkhdBJ3npPq2WvwdZ7nQP8x/sxN/HJxb
+5mcHJykFM5pJ9fiWjO+ssMjjDDCI1s1b5KPc0kv7pG+4oSzNlh+qFMifv7W
kR8GLnzw8EXwy8jLPviXiaqm20lCsGNu8KxezApfLEv+8yJLDCRzuhRLfFTx
ijdzTU19J4HnE82DeE1+fDT6cpHyhjTcot0OjRCiwZ8RNa+c+yMLsqleyadF
1rAs2piouCMKsP7C96I+5xiWsNAbf+2QEji3yIWE4O1Yg+qbTjIyFeB/Zem+
+a0a++plTK7CqAZmWG8fs/11bNrO+08/qwb0Nyr77WvFY1hEb9UpBRzmKrg5
Wh56YK6Zb3m+FQOwXwqtK8bMsEx8X0v/riYoqmz/KbRRxBqm1qauVGrBqUcv
F1+848Xe/Gh0oKnRhskoys1JBmqMKoFbIa5ZB7IHqmknDD9qfHFS2h/v0AU+
oZ5zV3X3UNHN43eDuvTgXL/bxnzCDrJ50/1q5qM+5C1Gn3KaXkLFNPGL7n0G
IPV9OVD/yzqiScl4/l+fIdhO0rVKvV1CQYt2ZLeHjMDRMwT6vcZQW+O6oPNn
Y+j/VmWlsD2MNNnkK1h/mgCBx/RoyOI7ZNkkzIWWTCFXTtSmtfERMns14319
2Qx6bqg9r+rPRt6n9pJpYiygyTgxc/dKDVKPC3iVtGMBr45PJ/Zul6ArzK3P
zp63hAI11jydlGQ04rR3O/DgH78omPb64J7oNhe79nSKFdAPcxtvP4xCEjMq
v50OEaByaS67PDUF9Rin/vRL/sfj1VzZ8cHn0IxoQ8kiJREoan6SVPHaoq3G
boPUdCKEkTOzuP/QQLxHH/EUMVjDbHel7dBFK3SVZumX6HVrSNim8hUKckRb
T1gq+lhs4JiioEHSPWOk3+ceUl9gC3IRHeuWQydRKenxVL+UbTwX6QrcrX6B
S2QbCE+n0QFbTOK9c5738L0Hq3Ri/aygdPR2aLhjJj6Z3ybuUnocRKfT/vyx
DsdDOF8PqcUKAA2vSj0lvzOeLf9871yMCDTOT/rMSOnhdZ32uZ/rTsDR3I3a
pg1JfPXFDMnErBSQkDHtv7rJgjtPPvVCSzLQIrHws4CSBG+//eHicUp5iGBv
1ORKn8F2WhUK2agVYcFAn+180ges9tKxcOk9JfBpMGzPW3iGnX0V+/P1f6og
wkcpU/LwLvbHTtxigU4d9l/2a8kKZGApklWBZSIYUPHcvxcdFIJ94OyPLeQF
2PSp/D3qZI8Bv6lDF7cmyHKx8j100cLq9GVzkagWPJs5kGSSP4FRF2t0HYhq
A9+dIvWkd8xY8v0zNw90dIHkyELss4DfKFX52pa9th485eN6nxJD0pzxU+Jx
nLk+YPUVDm1+K6j40K/dRSNDiDcjTbaQ3kBmS5VfRa2NQNllUfuiyXc0TXfl
ZS3xH19UONZ+YB5BMUbjG6RuJpD+X8LNTLchNHrHc1ot0BSocs9iw1It6Nh2
wMLYWTPo6xk8GfWjCDkFTZnpRprDQ/8BuUt4HtKiQ9Zx6hZQWlcuGztdgSIv
iW3yPLcA5yYlFeOj1Shgev3lpIYl+A/nUj/69+ojNoQEfWQJlxwEisxQMNIZ
mVnJ0f6Xv0hl43JwIOIPpXNNabeC1EqmtegPiYhXidiCNAkgtPCZENGThKYG
t/VYugiwaNnbv57qjZizZHsY9YkQUjByek1IFxlYF++uvyMC11jyDd0OPTRZ
/vDiW6I11Eloiwyz2SOf85s8gwPWsLI+ezp9zAatu0V4ttnbANmbr0syjZqI
Pu3lhJytLaxKvJbuGlRCv9LNVCW/2EKPjhq2WsyP+IPbuUp/2IGFI9OokgMb
yoPNmrXLw3j/lpZNTNYbnMlXhIntBxmYNzev5355jDNtpr1IGmWATyKO9qWn
C3EJm4i6yg4OcF3JaP16MxkH7LYo7QgvTMzM6P4n5o8HvRHz9T4sBDaS44zZ
l4i4Oq9Z9jq5GMQd7zEflsJwNlOfn8EGJ6Gk5tl9jw+CeORUq09+ozS85z1I
tc6kw+WTuD9erpeFTl9+tDGxga06m6yw9sqD44Fv+ZXqCSxMO0rrbIcimN3V
Pboz1oml2nPt5zQrwzJNxM7JI3XYjYfXQkwGVCFHZSdpR6AAiz1j+/lWvzpc
4VZOmh5MxDxT8z57rWJAYfi9nfOVNzYnfOJjeSJAyi3SnlcylliSRl2NT7wm
+Bk3bLdhKhhPyN25tQwteOiXH4DP8GP3Pj891nNJGx7xsHCtFdBiKx7FB+cf
6MKJsEJKmtZtxEs15uR/Xw+e9e74RYb8RRbd8axCj/XBL94g5fDDJeSaeW9O
65EBnI02csdM1pGqD1mQYZUhtJPZh4yvryBm97cEjqdGoEFzPH1AbRwNXm2S
VnhqDKnokL7C0jC6U0n0Dv9gClJDVDlu7PWIlsk7sKLPDDjGbvn2bV9F0wzB
Ihf8LIDC9Wix+Gg1+ts2TtEYYAmxOtmSsgUX0R7S7PH8bQlZPzta0/j+RYll
/fP2NSuYu/niSrdkCiq88oldYIsAZXF594w5nJD7e8Yi38h/eTquEx8yo4Fu
nvSfirtgDRY+tF/EvBzR8wwU9fGwDdS+fdqIBZuj0U2tFupLNiD7c3bL5IQG
OuXi2/Lpoi20c1LzOB1Io/45Ui4OOjuo5Dup236JG11KGSYJzN/AZ/JYF8OM
XuFZaWNpfN5HgIc7QXVZ9AHe13g0/9MAC7C6DtJW0mXjy8j0K+VDbjie5knN
zRGJy78gcB6s84Nz6y3zizKncX4exSrNv8IQ+kX7yBS7IU6CC55kFDsBVaPl
JSfqZHBX3Evq+mkp4P7Usr1cwo7v6f2S56qTAS2u0stJ3GS4Vm/VG/k2Ociv
CHii/uIn5sxCyVj3RgF6H3SJstf2Y6Xfu5Som5Wg51WCwyj/SwybeM9r1asC
rvnmX/4TKcXqikLQfp8a7I9IBThkXsa4VG5ahnzXAHk/tfJOqnCsWzdAGN/H
gWKIYKC874SFSS+8O0OtDXu2w1VZUWxYkebe9o6AHlzkD9S5ZkPSTG/z0z/6
pD7IyOS0235aRa4XGLZ6ThhCgZYC00bMBjr/iT/PTc4Irmdkr609+oHSLpDS
SygYAxPdFIlCyAi6LHSP9DNuAuXCx/+qKQ4jn59FSrmmZkAXA3W/c+4i9nY3
a3sbcyAfLNtsL7uG1vHbNworLKA2rCZVQ6YGlRhd06A+aQlBnw3WUrfzkR5F
YF92tSXMW1wTyEsMR94qEtwZslYwwf35uuoNP5TE/cGuqMEKOMRrwxxqE9B0
ybtLQrIEyDCP8mxoTUaOa0VL4o0EIPcyqBWQ80c961ZgqEQEAeFjN7n9DFGD
/7zZ55dEoDot9+3FN21Um1RVfaBtDZ6ckm/eN9ii0LthTOLt1nB7Dv1l67ND
DUrHlToNbIDKR9lC+rw2CvAqMC/Tt4UL15QxX10VdOgYMc38rS0kc7v3JzYI
ok5C3576D12Yqo1/x2O0j9il3H6E/tSDzdcxBdkWf5BzD4NP+Yo+ZGS8753U
X0aTaQ7Lqb8MQDOZPuuC3gbqC5up5d80AiPJKYcPNKOobkyS4+KuMbj5fyqi
WxxGh3u23h/+zwzutp48GyJSiXL8PNwSGc3BP+r9vbm+bLRYfnHySoYFFIxL
Tk1/r0F8Hg98BbIsQTfkoDCKJgE93m0MjTxqBW5HhBnLP3oi3+gW/g1GAgBh
jO9bfgqSbb0m0chGhKD/PkkwLFuhzNvnN+4WEsH5BtsOcwOOLs4G7QyUWkPx
oZ8SNrSOSHHKf+StsA3cffbfvb/eBihYSvzPMzc9cDisEetuQtJMERe0mRCs
D2xRzMWP4v6dN7H7gN7XEHZ8e1gVrq4jXho5saUIIyhpe5Ooaz2FtPK4/BTC
jKHhZRvN0Pww8g1kmxdPMYGdj1/TKvkG0TsqzTsCmWaQXR93M5G+AIlzHqRY
mVgAq0ZJ+kTUQ7Q31GB1v9sCOETOstXYPUR+ZUqy+72WELB0YjWv2x+1dht5
nf1kBWIJ63IJvUnI+e3ourUlARiLfHSmvRKRqwgj8YsNEWy6yBK46LXQ0feV
p/M9rEGdR2LrjaIDks3qu97iawOM90fX/mEkqimf9G/xtIXnU/RM9D8U0NCW
wSLtL1swmwwlS9vkRf+ooUbxjx0QV3517JuyoNeRNaWi3o/w/oD7e5097/BM
Xpc+AXUSaDVyT5rTbcRH0n8L3yg6CqH7u0vt72/jzeQC1/5eZoc3Giy05IOp
uPxFFg0SKV5YnLG8GyMbjJf/vnCh1FMQch88LW74Y4vfVjQ233UQBbJRtWS2
IU3cdSX9e16xBHSa2wQlXBDFW+7qzpt6SwPjdlcXvRIDfvRF0L0KZ1nY7JAp
vPlhG1shZ+waipWHp31uOvOzU5hn3QeFF+cU4byL8deuwh6MFnS09X2VIXJk
xzuWrQHTIpF8UZqiCtPjZQpvBYuwJunWUMc4dZC/lPVV/MgFrIDz2tWG2xjU
mN0Ti1D0xxjLv0nedQBI/vJav4mPiG3uWDxhttaENnqyWuZCDazUc2c56IwW
cLGF3zk8L4SF0Gz3brtqg7Vm4PmRz0exdZq8sYEQHVgkdB1vfrusYVJ3RtMg
XhdO65uLt+xsoI4rqfo/o/WgZ8VX9ePQAaK4OE0WmqEP8dKrL6yYl1G25Mcz
dmkGsF9CXh8StoYa9NlzGZIMYbu7b9doaA3diSqMqr9iBHyBMTPr/JPIt3L2
6d1bJuDayX3qzsQAImHL6nKsMAWepZW1lYGn6OmL9HNapWYQ1XLeYUb5OpKP
avnCUG8ODEb1T2VYi1D8WmvocTsL+LNYIWyRWIWkv/dP3vpkAdezUa5rXgXS
c0koZ3C0BOU587bW/MvI75xdy7HPltDHJqxRmeWL1o/1yXKetgJpt6ajcuOh
qIT9SKTepBWYScdwnPRLRsfNNkqdThFgc2whU4UqAe39FyfhNU0A0q+3mJia
T6MFf6nDVGeIQPru+51eH0DyO9LhHxf++XgAyS/1JhNUSbyyn7tkDaJZFXQt
6VaI4LSiq3jOBtpvDcpV0eCoibhyujnEFmoKXMsraOSRhDfuIPdoGTdvvCNB
rtGKU+FMOpKvqAD5+Ltvi1fiuUYRZAvXmSE2d0Xj7ascPMl/p8UhlAto6fIv
yfwXi4sefiu5ZswPAk6zLLf13XFHnZyuOBdhUPyT4C2gb4q7WfMtsp8XB85H
11tU5uTx8u8XxZqeS0KSYsSGKQU3rkMZ9KTfTQZeaXXwlx0jx7nJSYosAuSg
YLdUx9flN3bqZe9sULQC6P5IUbD4OIhdt+Q5YRekBKdEdxqSXVqw9vY/HhSR
KkBB89T1SXMZ5rBCS2GboAbb7rQOdCpXMQcKikWpLA1oDWC4ZtkXie189p24
VIlD0vXUrR7h09iqhrtP6jDAcQr2GgVJA4zr0AWKS180YYLiyim5dRlsW1Bn
aHJKC14F/03JNz+G0aptdO/81Abh7vRb+cuHsADpL5o22zrgKllk3MwygDYz
X6m17+mCzQJ+giLsADWM59ptkunD4zvK7w87bCDBS1TlUdQGcEF3j8Twwb/+
FcFDJw8bQneBx620iA209Vi5SZzaCDavy7pKEn8ippsf5DrpjMFwJCN5z+Az
cj/n8EGIxQRaZYPY6Tr/zQ85zrVOgX/9G5ly87l8F+qxHsqLFjaDXjZ5z/HL
D1DH2ZRTqyfMIcqX78z1iKtIOcj74Ti7Bfx6IcR27tV9dIVv+YdcngX4bsam
lY7WIDcj+4ldtn8+PXjhspjuLZR1lyFo8YYlYGu1l67fikHDq1pMOLcVfCuU
q29i80aRIW3mTcVWwN2hu1utfx7l+wgZlR0ngNQ33RjG4BQkP+JNRnGXAGGK
wZeEloPRifBdwmUBIrBoFpCE6VsgNVrKpxFlRFCoYdAZoNVE6zknx0mkrGH4
Ye/A4iNrBKb92rm11sBKaBD4FOKAHpAuv0iXs4H9x+1c1230kOvRMTGVRlsY
NbnVtrAiglbG3O+EVU7h0meeq7mad+E9UirUFXGHwXnXZO4kYx2u6PuYWesG
Ixhv3ic5RF2AFz+nF69K4ISzzbnRvT8S8Rrd5SdRGnyQ8/z1FVofXzyRI1OY
4YwQzOZshcu/sMJJ9Bq5M86KASf/Qg1uroanzKelilafhFaHqC+64/x40qdR
8+wf0iDm8tzeboMGZ3N9xhM3Iwv2G7XjLb1rmMjpwOF7u/IgmZnpVrc+hsWR
RtZSryuCUyfaPPS1HfMmu/1JeOVfHrfyJfZ9q8H6Im9NxpGpwWD04/t3D+Vh
GcemH3WQa4A9l/ylmyIJmMHOvlKxIA5ubQIGu56eGFmoQC/TDQAHumHNAzVz
jOZgfvx9gSbY/owiDaFWwt7r3vleXqIFKn7ZU8dN+bAW/j9G0fe1IanyP8M3
s9RYLfdzepZGHQh669JMWzekwXfnKkbRrAvifOVHpGt3EWqk+7DUrAdvbvBq
cRB3EXN6hPXmG30QPOHX49azhI6eSPMr6jSAgPlz5M4v1pFNnKjI7Q5D2Jse
jZn0X0b2GU+GXvYZQb87xUPSj2Po2e8E64ZJE3B/k2pXuNOH3BVlpRZmTaH+
lu+DU3dqEcZ80ZdzzgxyC7m5eg+y0cWMzxJi5ywgduMij4xfDXrDmvfVZNMC
vkN5cGv5PeRLYkgbH20JLKFescHRKUixy0BzPsEKst665K+TRiFuTfapiAMr
MK3U3t6MSEGiTI8IMvEEiPRo8hO0iETXtNRh5xARdJNdGAuM7VCunpSYD501
ZK7GdboetUKiD/FTVxhswEjHu6g6zQRlys50xOTaQuYfIZ75j5LI2a3XXSJ9
Cycr6K4zz3iJ65j9Ol9PQgeUPtsjLvSl+LK46vK1HFaIexLTdxou4+58M7bU
nsdhR+VlWdd+OF7Ser/srIMAaK5ELG8KuuDygQXe844icC5gua9kSg9vd89s
KrtyAuyTPSpCSKXxvi+pvcadUvAtiKGch8iKU6iSH2OZlIEdz2W7/dR/NlOp
zy64KQdKkX6TOcaz2DU28S2NbQWwSBt+FUr5Eau+23n/waIS2DukN1vUPsd4
L1r++bGvAk4Wdl5dWiXYjE/sCel9NXhQRp8bvJaBia+IiBayYlD6y5gmlz4U
G3Tya1VjBzBu/NWrruKAfaO6T7HNogm87gOvX61oYZKUPFJ6vFrAfyWna/CI
BCZ4+Gc3O582tOQVEeiDWDAJ7YOwfHVdOF70PnhafxH1Rv9STlLTAxL8173N
KJLmh4e5pvb09MHz6VDi8PMVdFRwM1pQ2xDyXEdvFRptoMI5A9OnJkZwHLmF
D41+R+8eLmS/NzGGLjPxmRrhEQSv+56dszeBdEoxjoniIWRxrj77s6cp6Nw2
vN891YIkw6P3qT3MwHV5nqvE6jYy7ki06Ak0h8IS4eTP6dcRVcYidZqyBdz1
U5G0PFeB8p9R3MGeWEDmisecgGc12o3jGq9UsYSCaBu3mwLXUYPW6ID9c0tw
5j2fczM/BF2WfvbSArcCLmf2C1LeAaiJG3POaLEC8RW+pohLiYghR7Z+WIMA
+t+tUwUZkxHc4q8bbSXATyPZbcVSH9Ra1uTFq02ExfsGdpSceujMWMjRmjdE
oCtaJgsl1UPEryeuFlhYQ7ge2f1v7XZIgnLIaf69NdBL+Z/y97RFgnbFnCnW
NuAszdDvclwLzcSvNVkQbOFmBhPOrKGMZH+/v7w5bAv0TeWnM44JoLi2R2J/
igfw9xK6CrhDDy4h2us340QGXncDPD/F1+NU0R9u/SpkALWTzAYFijfx2q8F
E8SLHCCckbJErpSCB88kbas38oLIRjVNqUAAznKYemh0WhAutFXRiUhb4xbN
CY2t30XBasvph6Yijq/6Uz/5KnwS+NPLT24kCuG8ake5lx5IQ/XDXh2pc/T4
tcu5p6+VyIIBy7mU2pubWGY9mGu8lIdFjjfmvqVfsWB7wdBvTxQhN/PwNmR3
Yap8K0eeVisD1a0iz8WiOizt5Q/Tq22qgOcuhr+bLsD4hQeuZr9Wh191983x
wCQsiOaNe+UUBpzPFap7cn2wDLrkuNEoAL28CX21FkuM5O8tw9UITXCeOil+
lEYVUx0ymadN1oImh+7honMCWCHr1hHVZG14POtBEptFhymW7+Blt3Whhon3
4AL9NtIU6Lm0WKQHlfISby5T7yP6tJNV8pX6wMsz+9S2bgl9qKryii4zAFKW
lo1KgXWU6lY8PnzPED57zHp1eKyiPVJRUeVHRmDhUXnfs2McFVJVrVXWGMPx
yCmXooVh9FjYNeZetylks76wa9upR7teVMGSnWYwYz2GC4fnoEO42Yd7XhZg
8C3518btajTyyN2h29cSYnHfFmJjGtJjZbouOG8JDuufjz++4YUmq65WTSxZ
gVHEBYF++hSkX+HUKL1OAN9Z+kjhyFNoPn72ZA6JDYxWlLGlYxaopG2B6Vay
LTyobsB7smWQzo8LX6WK1nH1E6yntvha8Ad6CVPLX2mggznRp2nuAd6qaheF
57LAn7w/IZpXsvEw/SDax2e54eG8G0fHcCTucUZ5QWqAH+SOCF427DiNd9mz
sDeMC0OPgaPW8pQhzjxuQ5ikOAEP7H0r1o1kcTVXyl0ykAImuu+/ucI58NJi
1bnQuzKwvWR7NaOaDL87LOCg+lgOZkVkhxxuzGNbPruBw88VoFeoM/me3gB2
dzvEO75GCVRy97sekSBs9X6pZMQLFdjSFv2lNVCKFVe3F2i/UoPQOznMlJFZ
WOsuK41HvwaMfkGBpCgc639TXJf4C4enohFkSbunsKzcvPexpNowfWk/plqW
HZtKtlEV4NIDenOSc31A0iwVPFK0LagPJ1Wp77lor6EP9znPkQkagp2zs6R4
8gbqeddyaEXcCHR8+ep+OcygIAHnb0YnjaHzY1H01WsjyKoot91MyQQuFE6p
3XIaRrEe5UatumZgJPKxsDeyBFFxHLKdMDUHO8aekgnua4jJP0br+X0LKBAU
4os5U4OkpptODYhawnTGsW/D2wWIb3WD716FJRy756mWdSMCPb76d1Zf0gpW
+5dZn3b4Is5uEtuSWivgONFP1XMmAX36+/A8LkmAyTnstOxKMmpq6rBfriOA
YLiq3JXwAHSOfmzcRo4I19d4Uk/XGKH3ay/P5DwjwoW6892nMW0k+FziaS9u
Dd1YYrIowRYpihMt8BZr4AgZnb8pZ4+mJQwWUnVsIOpMSNwJUh1kED84xtZl
CxLeypaCxkKINk9Uw2NcF5rmX5WFDv5FKkaWzGuTeuBRuJhUSbuFuDJe7T/9
qQ+mAewnOk4uI4uKM4HNPwzg+o2sGV7pDdTIqH1B87cRZN05CBi0HUURVrxf
9laNQXStwbd2dRix6R3+LktpBmcqzK+TRTxEiS3k7hQ05lDM9fyzb2M22rM4
2ayQYQk3yWO+bI3+8zNCGqZIawWKKdxvmjI90dexYz1tTERwPhV+UnCegMoE
LWkc84jwIKxc2JkdR55D+ZmZ/DYQS0FIPyduiBqDU5SmHPSA7BDBwMaVpFmk
wEWIxEcfKDw4ltJq/tVf8vG8npshDLKoLQe8XkdnD33MiwswghEFrvDkN1NI
XD4KJ541BiZGUbvAlWEkOUNVXRxjAt9tPNdN4gbRZIrJY8sUM6Cw+ao8LHAD
LedJqpwysAByjMq/jOMhOnY4Z7et3QLO/+X8L2DwIdK71nzh6BtLqJl82bhD
E4gcQmM8Qj5YAX/NfxseV5OQmfDz2UBTAryz8rj4tycR0WkWrvy0IsJdKdWZ
E8+1UAr5CT/309agF8+vgm/aI7fkLcNETxvglrPRtC0BlFrMZjTuZguXr3vM
EQMUEdepHnxwzhaGQ51Vpm350Fw2J03/qh0U3Vld2J1kQcn25T/nL+mBy4Wp
zjO0ByiDMn2YUKgPb26SPgv8vIS4rL88W88xhPliybOykmuoT2PqQ/gdI/gy
McrFujaBPjMYhik/MQOZrD8vGR9eQ5o3qPinXCxg7tQr8ziOf3nY+US8eMoS
nl3kDYgY80av3cxyGOes4G7c8O/JtmT05HTG6HU/IqQoXU9x1MCRzbuJCMF4
G4irryjlk8PQWaojL0Jp9cCTcGu4h4KkObiscecPkz5EDm658Kqvo9oZifBg
ZkNweWg72p2ygbRc2C6lcRtDS+29GyLTI2g0/ZyRqrAJfBCQntUrHEYzrdoO
c+rmoB6d+jdWKgdZdinkbt6ygKr6I0lkj2qQjlZxXJuQFWTwfHTSNPVBjfXe
7qHC//6fuURQlHoK+qi5wB5ygghStPOuuaGmiJzE7fLhWiKEzlU9CWXQQk1q
TD0+z6whOvLSJ4Vpe5THOY6evNOFxlQdq0MDe6iA+pj48Gd9+DLtdOYF2TKS
ng/3PzlkAO7mV0982llHaWZ7J+MnjCCf/mgvI8UYcvHV8zq6bQZ0u+zSbU+z
kaE0z9jCeQtwOrsfX1ZTg9QvOe5qURKAMjXj9dLVFKS5qfxMxlgPHmiFfPl4
jqTZp08jed9WH8y/B2O2QitI+vv32CdWhhBE573Td3QD7QXKzl11MoZzY2os
YhQjqHFgQTbT1wT4NzpXvbiHEFXcmZHqMDOIH/pBNZt1E9k7m5iSIgsoUWj/
QllXhf769koovLaEJkS/+GQlCEl/CX93T5cAutPZU/yxScgrrFKC3JgI6TZf
ixt0dNDZkBPn9+2sYc2izjXD0x61+5s8JnO2AfcbawNA1ESK2RfI2BxtYZ/X
77W3pxIqF3o34zFpC29nCEGLEvzoYHHh5O9qPbhQdSj1Ye8eyqHqT2Bp0off
G2cXrav/+dGxN/6vXhlDyMLb8fp/ecPV3OUvOGwGMemRMJBzFXVMXzvvGWgB
/L8ZZ5iO1qB6j6CD8tV//t3uq3m5zRPtb37qrPxjBYG+vMbfjVKQzcHd5/0n
9MApSM/Qx4uk+ZfqDraroA/5wyOiM/6raNmdKuqanCHETpKr4kEb6M5sqQqd
hjGUDzREcluPoO6aOuyMgQlcy6F65UIzjAYZXy/HVFuAIpo29t6sRmv6SwVH
FAkQf8D+jScrGSUyhL1k/qULYU4sT5Ua91ExjftAwbY+OCl92uxxX0ZB3pbB
5hsG0P1nd2jIfgP9GEr/cmjfCPYeMc1ItH9Gi+4aNgyHTaD1LbdI8bdhdI+1
w3WP0xxkg00iwv9kI597P8qbmK3Ac+JAZE3cCwWzV03O3SbCsK2bl788IIlf
7xuzffWghZJO46ssSfOP04ldpNH6gOmpC2YT/u1/+lXCcLAhZJV/5aFzXEf2
W6/yWGONYTXjJKnHzDBqylTI3LhmBmGsD78z0uej7Be1Ewsf/vGPTFg94e5Z
VE+X0djnQAQdwRMRtmGaqKhA3K7Hxxr2RINqhEIcENuD/f9VaCbuUL9dGJ+k
UklIol92ociWkOX7PbYZYxmDMfZETLJVoohkV8mukKJE1ghZkkeoRKXsWypS
trLFRIjX+xc857qe+z73576uY5a+YgWnd6wpPSvhQVVsh4Q8XTPxUOdU5yz4
gCusOzF5Z9fx3H2q7EE5lXiHIXfqh0BOUI2ctTpsmIkHGzzN7/Dig5NmdX25
slG40aeoHD5BYfhCL5t9FXAeX472ff6ZLg7Xbu74yqRb4XkRzk7fyFIw+kZK
6Y+oNv5hk01La5wMrHXRjXSmpPBkyq+X/ifl4eCH33orl7nweihyl6ErQpv1
5BYhfBnD5Nn/TPgogcnOEh83uW+Ys4YE5c9ZZfj5+nraCMs7bPShrEG/oyro
mNp7L3o8xWrYeqXeBKrBobj4batJd7Fd3IS2Lh8NEL6le/KwSwR2106m1+I2
BnfdvD7cK/fEnNI5ttTQAX7K/V1M9aZhFTZvWPqpWqByfdn/6D4MK+NrO3/F
QRvWvotvP6kpgU1L8b8utdMBjJDjlCHMhTX3n2rO9NIFxtsu28Mhc5peHfGO
dgF6cIwtuPxVPBPRBda+5F0kgj+jq5pB2PhvxvPWy5EkkInkUvUVmUXNdRZi
PuH6wGsoPOxrP49sdMfe9l0hg5+OferllXmU3Nw80hhtADcLhL5aUIeQBC9H
7Lk0I9CPfUSS4e9CO7r3tHvnGEP2mPZvPavqjfy0XmK9T4GP3Cx+qQW30DJz
Jv5AiQnMl+usVjxKRxw3FJqP0Kkg8jRP4IZVEfpTMjob2kEFcjwLy+ivfKTU
rdOx39oUFnGvDDaIRfFiDTnLPaageilo7csudwTnRxUEHMzgoR23kk/cBbSf
ePm8+RczoBfVHlkxC0OtpdttcNuNPqhS/k3eMBh1HNBa8fxmDj8KXcqVJJzQ
0pPU2O8naTB3vcgTywPktXfub9UEDayFid9+k4yQtkm2le+UBZTtqOgU7zdD
g1vLorPOWQJbWMDnOQcldC31dkuSwiy+a7GsVzqiEefJcJndG8AGxRm+nXrp
BXgs+50Lwhd5oNjupsbwjiRctyy6V452AEqXbq7SrwTiYKWZslNdFHpTq8nb
Mpzx4uGQf5UmErBXPmr71efGuEe22vq6x2G47tZgaal9DOddsNw9lycLvN8U
jwmFCOB8T3nj1mwUwOuvT/Ow1xb8/Q11506Xo+CPjtQ6D09jBaNNvOHex0DP
bSr4klQPljzoo5PkqgIftY1z72fWYxlS3zxSzx4HbPPuF0SxPKz9b8UFfz91
cK1PPCN0JQF7PKajnx+hCVnU0j/aqv7Y+n+s4keycLiXLOl68fwGgSrE45md
AG7em7u14/WxT04r5iZ9WlD0K/rpJw1FbGsvv+XUZ224YDm+PfbZf1iU9d6G
sh86INUbm91swIppr+fLijJ1IZmy3mp7qw3xF/+y7VvSA47E0yk/SetI1519
tmKNCOG8S+ZhuUy02f2rd8gWfTh6lOG5+daGXqteKq4SyFD5df5G3sY+zijZ
NjfHagCKedWTDrUTiG1y7V73dkN4YMkzecelHzUpdpYOcRrBj4Dpl2EfetGL
DGi5JWQMAocP6Q7nvEFde+zuJ4hSYLZVdA+nUC7SSKF9eSppAoE1hrkqpgno
rmzwlhFeKljIRxHagnOQ1D7P6aG9piDDxTnE23sPBe7rTmOmmMLuwMN3xU0D
0WpG4ZLAf2bAUrHpdWD3afTqzScKyjADwYgjparMK2hE/UrVeIY5bE3MlmYY
eSOW0BeiySI0aPa/Sn5TSkX6Jue0zHNoMJLjtsuzA5Bs8ZTjmIwFvF9+V/nG
zwJhq6y8bgp0WHOXShzPJ6JCjT1Bx0qG8ISAPQdSCt/gPbHRFfHHWUGggE/0
nG0pLi/TE3HJnxt0s0a1iWdScae1TAhx3A+qW/Y1cMiE4k1pToKJMiLANNS3
Tel3w7sqA+wMzA9CXojJSs4Wc3zHrY/y520PwXvN2tvzr9Tx38tWHg53j4Be
tdww3xExnB4Scqj2szxMR2XPFDvsxJt+zI+tf1YEsUSOlHCRBcwn+szWqnkl
CBRKmzzvPIgF3mxt1v2lDH/Y/5t4KP8a02Zc+1Q9rgqVtat84y4lmF4IkXJ/
WQ089qW0jNncxj6virDj/zTg/bVoaxuPYMxYI/WK1gEcJE00i342MTBzhkmW
zC2AyXG+rmxkgjWfcJROTtaCxruXz6U5q2CDiz7OFRnasLplpOdqrAimrrVP
R/GBDnAlKAY/tdiBhf+KXBkq1QWrEW3fl679mrr1dSf21+hB3QUDu0SnFUTR
jThdUkOExQZX0lTVClpwNRZee00C5/Dsu/L1M0j/Obt0daM+RLxw7uIpWECr
/ov2Lg1kSNkzpFdfPoso/SPw/q0B3In3CPBjG0QXbHKlwwaNwJ3XuH5n+Efk
tVClyvLdGGLTVT3EWUtRJWb5c3CEAhSThG22AgmIV0Q/RNWXCuUPry7F04tR
/Ej+jMICFd6ePRn+YVM2srrIrnzNzxQ+DjtKyv8NR6EHHGEqyAxcXOqYgo/9
UN/Fl2w8V8zB7QDjRGSDH3IzIezexEIDqa8e2a0/rNAHx5nHJjstILoirCK8
yxTV59Cqzu6mQ+JIB+P1mhEq+f5oxiFxg9fOSkXqm8uh54liXTd3LuET/x5J
qazU4tTHuHR6LTuc+lJI93bOxid/2Tu2ePOCcFtE4LWKGFyCccnrC1EQRA1P
PRG2uIjX8PJxRpDFIJfrUnd+vgMeyX4tQ8xIEj5aX3BO1CDhH8pzWmODpMFr
Vm3yHFEe15iil4VWyAGnoJlMehkvPjBauAB9ChAucclEppmAd8mFDT2aOgqB
KqVqeMkYNqQlLmk6dww4MeO/wYbtWJHMgbrh7ypw906P/whPDbY8qb526c9x
cC7UbVOPz8LsvQ+mmf1Rh9hHQdasJ6KxKx0u4Xs4MBgWenvmhsMFrO+figs7
D4DkSsRzswIb7Ohq2yAXtxYkzRLN7DV0sCnGrcAdB7Q3/PrE5pG/DKZQWUc+
KLCRz3BS2PvlXozA3ep4SlUPvDZnGO+Q/4mm0/db31YhQuG91gTNDX7XSEzy
q9UmQWHP92OdI3NI/+llNcDJoHiiX7Lfgongx77wIH0DcGhS4kgW/44al/lX
vugbglH9YNqYfB/KCiTdUbQwgg6KdnQi6kHsI/2MPCdjeF8k0laj0YBUjxLY
RBwpsCQv9KWNKxM1zpi233Q3gSdNrQWvFW8hd31W5xhlKrgMtX2swPORhInv
vHE5FeL+balNjXmMGg3kp+JUTIHhGDAnk3oLZVXf++dUZQrL7fp+djsuoLJB
4Sw5TTOgzsYm8o17oq0X6PYxdRv5nPvfR0nXEHTjxYOi7+rm8GT8W+u1o2Fo
hqDCQPXmkFWotADKbij1aZCypBYNvm4JE4Z0IjonOHjnxhsaYCWmwbJZeih2
+efeqxQLkHmZEPAtzQrFvNNbWWi1gAN1WoqQZ4lqzSp8nM3pcOviHodBmjaa
DWcf8ytoxzdZlupdbXyLq0YJ8n3gY4HpWo+zoZ3lOIvGAodYABcc0XGeSnqY
jnuLH2YecuUHRcn3uFNkOH5DjelokSMMlYPPNnFme+GuD5Z28nSLg5H/tUKH
cAvcZtedlvwOKSDo7Fl5V4vjJ4P67/DyHoErKh7Xfg8exBfGKv/sz5SHVfWM
SfoMB669p+0Q7x1FONTQ2eK5+gfr+6wWRH2qBBzOj5XsuIawc9/9owWKleHp
bGuS/683GE/EJ25yjioYvul3yR0rxdZfxT4vf64GcSnkYE9SGua7jWt6+zMN
mFA75D+CQjFfI6cCw/4NtXloNlmwuGGfCCXm874AX4W6pRfYzLAXdjwpld5a
MPfvEMH9ghpGuibqzn9VG/jiyNtWGsSwvcf4WH8H6cA8/5FgFXYOzLpF8uTz
O/+/b45q4ClbQh1PtMSKUonQePPd9myTNTR1mvWSxiMS/JCIs/xcNYPYNBUk
bz/Uh/XJ67rtHAtIxuEsT2YmGYLlB3hZ0jf6E5WeSCo0gEGWByU+u76g2u8/
wmteGUPT1pyG715PkXdi39xsAwWsudd+Z9YkosTuWvFyFyqs9txsPnv1MWo6
KBXe7moKQwMtm/TI15FbY8DlzeMb+rP1Eer4ehpZDRAe/Zwyg8J2y9Kz/8KQ
YKVwhMpvc6j7YupzT+YECr28GuW9ZgHV1VduO4VR0WvfIs2QEEtw1paQ8Pik
gB7s/UyJF1zA7WJKfN461uNlOR0xfek7AOOPXdlhmIvXrgZM+vjshZeNKj+S
2uNx5ZubxKKMBeCfeMqg0XF/PKiqwFy/URTYD8/Kb+FywvcvslKmWiWg7+7Y
0Q59A1xQ5hzjDfMwNCWVDb5PU8TzzvUOHZeTg9j4ZemPQ/y4n/FwQ2aaArw6
eP/j8UUWnGrvIIryj8JRl4UalZ0/Md1kZsZk6TFoTE6oLkjqxO6HNwfXPFKB
U21eBBlvhL3fHneMrfw4FLc/fnRROgfbV+m5lVGlDvLGJ/H02Vhs72ca40uL
Jux6l7vmzn8R692ptij6Awf2LIm+4CsnsLtED+r1f9rA6OzOtkngw1hzwmxU
+IgwKf1snk+JUFe/ZqL0TJgEO27kRskGzSM25UxlQWEybOJzrxGNYKJzb+PU
qiUM4HKHyQxWPoqcvW8a2RwyBAbvwJPpnD701HLXo+1HjSDm5EzGgGcvihST
pfVrUeBGoEGJ9WwWCtbp7L1PNgGrLTbbrn5ORFmbJ283P6SCIkk37rx/Mfrz
5INntYQpXGDZfB4FpiEO12eGRbmmsCAvdzRR+hLq0WS0SsiYAcEuMzPb0Q0x
BPjpOcVmMNlK+DilEYyMpP/zM5Ixh2+ZOlxKW8PRGcEBjs4Sc1jx+edsu/8s
ovyXWWSvQINQi102TZaGaFBZYtqrkgae7Jt+35rRRie6fqmXa1qAc5uFsJSI
JUqZfjlNrrMAze1++7adskaBkvZ6p7XpkP2Us91CTxfJVlnY+/frAeFs1qff
Kf/Q297mwrJBIpjLnthX4bWEVs7cbnnxgwTydVzznRv969rxcdmBYX1Yxbhv
dYsxUYHj+RnqpAHQG26XtwcPoL5daahq2hCaXgpVcjJ7kTDrjV/kzRQI/UV+
cUO0CE02zY5h10yB3ntmIZ8YgoQJc2J7d5jBcvPv8yLeDFQ5/jX1LRcNHMWd
ZR+609BaW9GohzAd5MNzAs7GklF/Yqklk06ED7afTTFXQl31wd7aF84k2Gwg
9S2mZWM+RTrmdIIMqVL3e0/2LiBuwv1WXTcDkJWO2b285RsSDMvNP+VqCIf5
uFTub8wX/yAk1vaSEbwT29YqldeNJrU7nrsGUyA5PMT2cmUaMrcgJjkRqYDt
/LGuMF6ACu4QqJ2NVPgWJOy0jbMIKW0PLeF/Ywo1b2vdIyvPokfNSc6+Hzb4
ucVZo9M7FDWZSw0HGppDAv1rx/DfEPTd+ET9LJUGcndmaJS9OohnTCikIIoI
6Uqno1V119GZMYcs29skqPwTx+0zMYMaTQtnnseS4Xsbp7as7TxqvLlbPSLd
AMQ1GsPVdL8iqgY/c/kJBTpOLcwKbk1GbXKXLs7aU8GyINJXlFmE/nkLcl79
agqri3atDM0zSC0eRQuNmm34h8Y9XxyGYg+pfopiI8KPakZV/uQ6Yjkmm1i1
mwT/0ioidwYvoPGLpUoxnGQIL1V2zw1lIuViPWYKvyG8/UHpcFzpQxp6s9JM
ESMYKIgcefuoF52Y2vOpQNUEls7E3ONZTUBD9tnjW+5SgZNXeFtfbTE6M812
KkvMDLYGmUk5/HVFssO99sHi5tB3n/vzU8NwlEcpGfM7RAMlpVB7FUUK4tZ5
t2/4MQ2Exh5y2r/XQs/Ud3xpadGDfbTRCYOYVXRpYm7hSzcJ0t64Re5cmEGu
l5dlyB36EMRtiw3+XECB9w6nxg4YwLlrPfVsyp9QTzLveMcCBfQbqrr+Nsaj
vqYYuZVAKnRKP3zAd78YOe9j9OmRiGBl0ttIu0yoW7at2F9nToJcIgfrXdIc
cr3gqtFOIYN/unTUcREmmq07afbAyhBM3dr19+/qQ3xxzjwkhhGUBCntGoAe
xK0+MfzqHAUOhBVucla5i8YXah5wPqdCj9uAzMDwhh+G4ujYC1Owemxv+MTi
PMrb/qPpiY45THZEXRHLDkVYiNfKTjINWC5zRa6X6SI7V0f2EVs6LNj1vvAJ
10Lxl0+9fpxPBJ3QWAUPkX/o/HieoUAlCT7kLpULFs6g5PGU6dEOCpDiPT+1
vkxAtACWTl9PKvAX96y+Yz5GfVz936NmTcFm++dR6gwDXRTXra9imoH74skM
c81w5C/8sX9Ukgi8L7TP3HMg1AU1n++pUSCB/azG2O77v5EU86ZqiRwZlrQE
+B9fZKJk5c6HB44bQmPIQq/4qT502O2wsKCuETxJLcpgEelFzvlyetGFVNjy
MurQBE8x8vA9kcinZA4VJAt5ufwwlK34YFBqQg9GO/0HIWQNXZ1Uy7jPJEE3
3Zxv3WIW5S11y7vP6cP7C7z+SVQmGjhYTdyzbAAJnT9zKkf7EUW4UuX9uiHw
9mWlVIz1ov1at4breE1gWwTxzbHheBRrQolN4zaDJ3eSw1pXGCjIdq/767s0
eHlvx2DZFkAUjn892Qwi1BnYJ1sAoe7izNKJBl8SnJt8cPL96Y335zbYw5MM
1kovnw1fXECvDJ7fYo+nwOKgj+jT6BQUpODDxvxgCrRKOac7Cp7oxn5KRLcV
DY5YzwzwvtBCSiy7nxy6SoT4VqzSNX8dSebuUnWPJUG93WG3ELZZRHw3M6Dx
yRQqRfJ8Jnjd0JfDTf7SLjT45KfL5JEH1OWe+N8TAhEukPa2Dd5bR1YpNeWv
2Mgw34enhAQwEUvt8LQbvxFgjc1qD2t7EUX76aCcvAmM/NeWFpeZgI7lZ96Y
biXBlT5eN9+eGdQ0UTlh+YsCbQZyPFOj8Whp3q2P358KGicI/fSgYpRvXc/n
hRMh++VkknMAoa4v6fxzNhIZ3jAZD/kxJuqzQxL1VEOwy0ioown0Ibk8+rBM
MQkSDlwP2PN4BoVrqs66v6WApnyy+KhSIhJxKyjR+2UKPJvt9xrZnEauV0XL
2+fM4MHkcDJRKBzVOR3av1uYCDHZvp7GRoS61L23q0YlyfCg9N3nA8FMFNgl
56euYAhKAQoMemgfmh36byRJ3QgSZZ6n8xr0ovAe9un8XCr4OdevuBsWI7s2
jQhFeXN4nK+8XD4Qhvj4v5ZkTeiDF9PxXZk6E/Gk5C5rLRpCVQDnUtlML+rN
FbK25DCD/R9/7rlTxEDJVMt9rSeIcBmjR3FYEupu7xiPAU8SsCib0bRuzSLl
HwbduucMQeT+/bP9U72oULKM3SiDBC6vzx7//G4G+dHzKiz4yAAzEza/Nvij
Uf4NPpZJhbBVk1zZzGKERf51Y0iZg1o9m1indDh6dkjX4eNnEsTlCxDI7LNo
HL84avyPAl+Du5IXn8SjmrQnkYPBVDgQIB334HkxEuzemSpgQoT6Oe3rfy8Q
6thEWINCTxqCxuJI1sJ6LyqTWqnYVUcCZovf7ozSGZSdtPjL8RMF4ghKp1oZ
CSj22bb9bxdMoSBAJVEig4EiW1xa7/01A1knfeELluFI6YtPWp0cEfxl2kwX
PDfytivs2SUVMgxRztfnuDKRat/70qN/9WEW1/pNdmKiG/mvfOhsRkCzGrve
ONiLZH4tfD0uZALZl+iXb3MlIN3FwJefeM1AW1X+xSaH02j7+6zbgV5EuKaQ
NbImRqijdW2X1w4iwV39g/7zMIuy+2YGomVFYeJmZ9XKF2d8kjUrXLaGDvSh
ZBU/E3WkSVOIka0hglNn20nDlyuosfCDd7ueIdjKnzseebwPkTZ7WPm0m8D2
pK0X81IzkZR1J5e9Dw1sSpoeOGtjiGEwFdaupw77np1oeWSRhNmll1VHyypC
ZWFRs++ZVax6NSk3WlYbGlazvp/POYwxHrNmRsuawd/jAkYDHW7ofw+qTdo=

       "], {{{}, {}, 
         {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl2HfAFtL7x/EnEUWZKS3tvffekwbaaZeQFC0llXbau5DV3nvvgVLai0QD
kQYqlErf1/X7/XGc6/3+XOd+7nnOUaa2XV7onCghIWHofQkJMSe5NyFhzj0J
Cf3Bl3ghrp84IaEY1x43w3fVp+RZjSJcIe4wtwT/hffjt6xpwU3GA3AO/AB+
QY8p4X5uruJdvAsvwg30FOdewi/iBPy9PJtRFBbmjsiX4r/xAdxLT0tuCh6I
c+KkuH6i/1ue8AA3Dw/Au/Fi3FBQguuAm+NE+Ad5dqMYV4Q7Kl+G/8EHcW89
rbipeBDOhZPhBnriqSb1n/l4IP4KL8GN9JTkXsYt8D34tDyHUZwryh2TL8c3
8CH8tp7W3DQ8GOfGD+KGenxECcm4BXgQ3oOX4sZ6SnGv4JY4MT4jz2mU4Ppa
WIw/rmcFd5M7jPvoa8O9j4fgPPgh3EhPEu5BbiEejPfiZbiJntLcq7gVvhef
lecySnLFuRPylfhffAS/o6ct90F8z3BenBw31nM/9xC3CA/BX+PluKmeMlxH
3Brfh8/JcxuluBLcN/JV+BY+ivvqacd9iIfhfDgFbqLnAS45txgPxfvwCtxM
T1nuNdwGJ8E/yvMYpbmS3Lfy1fg2Pob76WnPTcfDcX78MG6qJymXgluCh+H9
eCV+UU85rhNui+/HP8nzGmW4UtxJ+Rp8Bx/H/fW8xH2E38MF8CO4mZ7BPtNk
/MP8Um44dwCvws31ledex+3wA/hneT6jLFea+06+Fv+HT+B39XTgPsYjcEH8
KH5Rz4PcI9wy/B4+iFfjFnoqcJ1xe5wUn5fnN8pxZbhT8nX4Lv4GD9DzMvcJ
HokL4cdwcz0PcY9yy/EIfAivwS31VOS64JdwMvyLvIBRnivLfS9fHxuY8S0e
qOcV7lNqFC6MH8ct5Mm5x7gVeCQ+jNfiVnoqcW/gDvhB/Ku8oFGBK8f9IN+A
Exkn8SA9r3KfyUfjIvgJ3FKegnucW4lH4SN4HW6tpzL3Jn4ZP4QvyAsZg3yu
Ffny/Gk9G2O/NL7Dg/V15GbIx+CiOCVuJX+Ye4JbhUfjo3g9bqOnCtcVv4KT
49/khY1KXAXujHxT7JfGKTxEz2vcTPlYXAw/iVvLH+FScqvxGHwMb8Bt9VTl
uuFXcQp8Mc4HozJXkTsr3xz7pfE9HqqnEzdLPg4Xx6lwG/mj3JPcGjwWH8cb
cTs91bjuuCN+GF+K88GowlXizsm3xH5pzObGcyX0pebbco9xqbi1eBw+gTfh
9nqqcz3wa/gRfDnOBKMqV5n7Ub419kdjDjeBK6nvqdi/fHbt+Mf51Pw6bjz+
Bm/GL+mrwfXEnfCj+EqcBUY1rgr3k3xb7IvGD3iYnte5ufKJuBROE2ex/Anu
KW49nhDfe7wFd9BTk3sLv44fw7/HWWBU56pyP8u3x75ozIvP1EjDb+Anxncb
9zI6c49b/0fs70YNrhp3Xt+O2O+M+dwkrrS+tHF+c09yabmNeFJ8f/FW/LKe
Wlxv3AU/gf+UZ/DeHY5zTH2N/0g9WF9Z/q94Pfqr879wdbmd8T6bv4xzWH1a
NlzdnOusp5j5Cu5hXmDtZHkZ3BCnk2c1f4u7mDvEPhjnauy3eJK8qvkO7mNO
ZX06+Sb+GTw59kTzJvkp2TbZK+pn5AX4X9Rv8/3Vb8hS4qtxnhjX8cd4iN5a
emrgX9Wfx+epf1ec9+oz/Hvx/GTF+d/VC/VP4cuq0/PZ+JOxn8b+Gmd17OHx
/GTVzP/hd8yprUsv38w/i6fEXmveHHuk+Xv5dvmruAl+Vl9B86/4TXMf+Zvy
J/EL+Jr1T5uPxO/XXCbuffJP8FBry3F/x/thXU3+AvdF/E1jUXxnjQz8lrhP
xfcc78AdranNvYO74lT4ujyjxzsa53Tc+/hP4z7BDdNb3vwPfiuet3W15L/x
9eK7oT+leXfs0ebk+Kx8RNxN47PRV8L8B+5pXmz9VHk53AhnkGc3fxfvU5wt
6kXqKXx19d34LdJPW7M17mxxtvBb4p7H7+RfU9eR9cXdcGr8V5yPRm3uGe6i
fFecF8Y5PDLed26JfBouj5+OO1ecO/E88VScVp5Rvi3ucLFetjXufvznfCd1
XVk/3B0/hf/Wl0nfsbgjqP/hP1MP11eBvxHPV/+z/CVud/yW+a/ijqP+kR+l
bsl1lZc0/4mXWvOu+n15BdxYnVGew3wKv2HuGGeZeUl8Z83T5HF5Tmf6ID6b
2K9k9fgL5v74nzh7jRv6ZsT9zrr35BXNN3Evc119teWX+efiuepPZd4T9yX1
T7LR6lZcNz2lzFfxsvi7sorqTHzO+C3E2RdnoXqp+n0+vb5M+rbH3TI+o3it
Rg8ujZ4bXEWjHleHu6JvT5xhxnLuQ66Svsxx/4u9jsvM7Yg7ZLyn+AvcWc9z
3ADcE6fFN+OcNm7imXhEvEZ5Xfy7em+cZ8bPeIy8O7dCPh1XxllwLq/lhzhH
4uxVL1N/wNeI/+fT97T+LOadcdeMuwS/Le6n/Jd8F3VT7nl5IfNvuKt5oPyt
+PxwffyvtZnNx+NvmSvjWeqR1lWKXN07Hse6etb9wT+Pv9aX2rw37mjq87Kx
sXfLV+r9CFfBWeOuGfsBl5X7PO6r8drxAOsHmV8wnpP9KdsXe6qxivuYq+ox
ssU9Mu4G+pfjD3EmeTb5F3EvjTuObLvsPL+LfyP2PVlh/mKcS3E28unVDbhb
1mQxn8CdzVXwKP319V0178dPxeuM+5s5Jf7F+nG4Ne6pp3Tsq3i1NZ/Iqqmz
87n50/H7iTuHeoV6Op9ZX3Z9X8YdNx4PDzF6cxn03I47i9GAe567pu9A/JaN
X/H42DO5NfJPcXWcI+6k8Vq4HNyuuNdGP96N34zPmRuK347vDb4TdxfjXzwb
j5Y3jM8BX1cfjN+icQFPiN8rt1b+Ga6Bc+I8XteZ+E7FvUe9Uv0RX1N9j76s
+nOad3O1uRnx2zLv0HdB9pWsq7oZ10BPEfMl3C3OCPl/ce8xbumbw7fnx+ir
HJ9dnNXmRvrqy//iD+lNw+2TpVb/xk9M/P//RtJbvk7vDK4mlyvuvHqycbm4
r+LeHGvwcKMPl1Hf3bg7GY25Btzf+g7H98K4iCfF8+DWy2fiWjh33HPjjubv
rsIfx3kkzy3fE/fm+O3HXUh2kd/Dd1O/yDWUFzVfjj0h9szYw9Txjy/fxH3K
2rHqJrHHmo/gtPr2x/5nToMvebzJuE3cAfSUMV/HG6yZJXtGnYfPy5+N32vc
B9Wr1Z/E3q8vj7696tnxeHiE8Q6XWU+iuAPxTbmG3A18NJ6HcRlPifsLt1E+
Gz+L88b9WZ6Ty8t9jedEP96Lu8fZzY3EfXEWfE/c2/TcxnPxONxM3gjfVB+T
pfO8D8jSqa/wU9V9ZZv0zcG1cT6cT9+5+O3oS6Zeo/40Xoc6sb5c+vOZ93F1
uLn6PtdzhR+IG/Oj1InjLhZ3b9l4dRXZ7fjsZI2t/5c7Lk/PH+TTq3/np6n7
yTbrm4vr4Py4lzw3l5/bj+dFPx5t9IvfkL574/fDN+eacLfwiTiPjD/w+3Hm
clvk83BdXAD/GPu2nrXmz/C9sjx65se6eCxuTFyP4jVzE8wt8O34ruFDcX8x
/2ndB+p3+a2xHtfDBfHb8rxcAe4AXhD9+GvcI84fbmzcqXE2nATX1XMHz8cT
cUt5U3xH/W2cE8ZV/KF8ALdNvgA/hwvh/N7bn9R99K0zz4jPV89B80LuC+4q
bobHxZnFtYr3M86HeK+N8UZr42Tcq4yBenfEnmttYfXP8R3m15tn4gKygp7D
IfUi/hreh3vGZ89NiLsFzo7vj7NeT5vYw9TfxflqTJcNwjtjn1UXUZ+P76ts
g3kWLihbjK+bm+OJ8Zxw27gbGoWMSUa7OPvjtZqLxl1RvdFjzFbf53kU5v8H
luCv1Q==
           "]]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
          PointBox[{1405, 1406, 1407, 1408, 1409, 1410, 1411, 1412, 1413, 
           1414}]}, {}, {}}}], GraphicsComplexBox[CompressedData["
1:eJxFmXc8198Xx+0RlU1lkz3L/KB7bFkJWSWlQkUkSVFJChllZFVGIiQioxCR
yPwIZaWsJJWVkTJ+98338fj95fF8+Hg4r3vOeZ1z70fI2dPyBBUFBcUQJQUF
8VP49kpGCn/NHo2fxmJU/sHI+BW9+ZjrGupYUDDMCahDrZtVGGkcWUB6oerw
NF0L0rmt//rxPh64JmppeSKkDZ2Q/7tZcbMghIY9aG09S0ZmkidmuAxFIYRf
JuVOGxkVdV0+36gmATc1+QajfpGRBptUAc1VGTDU+mWRu0RGrv9iHmTaKcB8
ZwjluxUy8qz/trvAbBdYNfAFS62R0S0Hup0r7kpQnNAjUIr5WIO/i6KbCnxn
8ogdxVxDv23/aXs1sLLckjKPWZE1MP67DwmenjzmtIz5yG8tGXN3TbhBN5+x
ijk95S3vYuQecAtXClnD/DyK1N9hCfAjz/cjwT7lWhYPTLUhNbl4muDqpszZ
sIM6oB528C/BJw3VX52004Xu3x0rBN/PViw5fUoPNPaeWSM4+vera14X9KEy
zhqfbjsayz3v6+ZtALcfBK5znUFMYlCQIVRUwzpT7usbvh1oBOrbzNaZQruU
Mu3iXtjpb7HOodyLZh0hxjCxIrjOXg7Hahevm0DvCPc6D11TOo7umkLUfo51
5ohN6gtLN4M8Vbp1zmKRuthwzxyEnSnXucZbQF/8yT4Ie77BKYJpvFrWFtBz
g3qdXwX8pXBrtwAGow0WMqFfFrHdD/aLFOtcTJYM7+3aD1KqGxxRv6og6GgJ
TGYbHHvu+6kjnyzhfdIGB3DybxW2t4IjwRucI0nb5DNoBUI7N5hujnJbzWFr
uMCwwY8VCq+kfLOGn5s3WNI513zF4wDkbN/g/r0viw78OADS7BvckXFJFp2z
gWH6Df7zfL+m8KwNfKTb4LUX3iU3z9iCPO0GmygY6AfM28Imqg1ucJQ/efqc
HWRRbnD+M6/FtTU70P6Pm6L7z467TiH764esBY+VI8GVsvsrKgwwv0+g96Fm
IwptezV6wIYDVNoXfXfcbUV0i7yTNMq8UEdqToznISP7vII1ESlh8DzDFSCR
R0YUV8/unkZi0Pfzpm3bEBn5/rZi+3ZQCviyVWgU58komEZiXjxRDqwUVgGW
yejHkVduUlaK0E/1rDFjlYwCWC7I2DjuhqdhgyeDcL0tsNToJ5xSBrsimtUO
zDGuTQfbjqhCDpWhwBTmixEt56Rc1YFx8sHAEmYjKqehe14aEDP9omEFM0Xj
tUfCl7Wg78mXXUT90hx+cLItCYFh46aXBMeJVnK+IANcKWX6RnBy7dl09i5t
oMytXCCYI2yqe6lXB/Y6+y8TTOWn/PLUkC7MFpesEszVdmHH5LQe1LNsWT9P
TfK2gJ9z+rDXJWCdP/y5HnL+rwF8HbBd52HjUq0wSiMwY9XZ6Acjo1nuFSO4
//jAOuvlfRR/SWEMxmZK67ysJsvwldYEsq9vW2eJSZPYe8ymwPZxoz8ubXJN
Pb7DDBAz8zoPvB/KyeY3h3MLVBv1XCPqdEFkHyyxbfTD2s8Ep3EOC0DZG7/P
N2+NsoyxgPRPG/0wNRK4+pZ9PxSMbXz+VGTim9W7+2Gnz0a9CJpwfF7msQQF
+Q1m4Zsze33fEm75bnBoHbVWzXYr2PFog2NSo92b71tBjvEG90Rdn0kWsAZB
1g22ieltls+wBvP/+sOt8elYq9QB0OHcYKqPhYE5eQeg4L/++LiwzctY3gYC
mTb4q/RY8bMiG+j5rx8CVIb9rBVsIfc/zvQ5dJmyyBa4qTeYsYHUfU7JDgr+
q38SvcWzkpd2kP4fN5Kuv/zp+gUdXOxn5uwvQMO/Bo76zVPDLR6r24yyDUhq
cmkhz54N9gw0J6SMtSBRXUVbG53tULS890ljTxv68qvrZu4OIWiynZ8nx5CR
mPXpmOu6OyFhk3GQYy+up9FxXTtjSXCO3FcwNIP9m0nSMj5cFrJr87wE/5GR
pJwE9fgHBVidStfXxf3ge1r+WdCHXZDx7YzOIVxvr0uOKTf9UIJvO8St6zFf
4hYZujqqAv+E/AMmMPM1eQ8bD6pBrb8y7R/MlWFTFbWzJEjqi5Ik+kHhs5Pb
izlNoJ/onyPmheUVxTfD7Aiadx3OIOr5kb2/n340AHtl1ReCed5c0v0VuYjC
+N3tWPfWIEfmmO4gP2aQ/550jOp9E/qaf61j1ZIL3tY5tajytaHxXIYbz8X5
QbRU5mGSMRl1nrrl90BNBOYWAj+lVJNRb86FrkOa4mBTR8PpOk5GPVTVg+c9
pIHxlE7xy0UyylkRS3z5SB5+fJV4wofn5dNYyzb3dkWIoFF3mMLncb2kKlvy
627QeZz5NBXHJ+POb3P8uzIoJb/+/AlzbtnZj7wDqmB25kbtLOYP5mK0mybV
oYZdx+gf5q5LbXTnJzWAavygLqG//XnGYATtHsj3OOtM6O1LoWEY2AqQr/a2
keDgqeUiqS3aYPTnwk+C30V0GM27klEx9bJCtHkG0hvzqivpooSt5h/Uin+8
Rcsr3IF2B1lhltvDo+xyC9p9soJpzWgb5J/Mf3KnqA09jHJt8ogTBCd55+sn
rpNR+Z5xbbO3ojCQekfBtAvP/0PPP92pkQBdfa9dA1Nk1BaVE2hGKwtqq3EZ
Z//i/x/n2G6QoABnttqfYsTnMZvINJsYvQvY+AoY9XF8OxmUnx7LUwLODzTl
VZjPeJIz7LJwfVwdKfmGeWr87bb++2pw309mbAGzb6uq5MfnJJiwjmoi9ol3
4+bG159pgjOXMJk4n0tR/6Z+tu+BDH71eEK/zFyfJLM3gEOeQz/Bq/pKVdNp
v1HNPbvW1vIqVEWzk/TadhMEHdgbjjiaUGlV6sFca07IvLPl39GBVrTYHqN+
SI4PHkz0OfHtJqN4Jr7KI4XCsCVabTqklIzc4+aui1WJwdkk+SLzr2Qk7h92
MX9UCuxhB3X4Avbba4/rvfjlIXmGrFKK54fp35B7zdGK4Jdu+qUZnwfFSPIE
St8NJZs30cQQ+0rVVOtKjjJ0m5I0ezCnbOVPmk9RhSU+080zmB97XNRMzlUH
PtHylL+Yo6q4fEILNEDBYB8jod+tKqbWtkYLxvL0TAm9n8w6Nes+ISg4s1xD
cEKCuetU5DcUeDWj1OFSCbo2b7xG4qKDaBP3Kw4G75D9534PSjt2mGzWbdHX
bUWcfI8fPtXYAWI9ez3S/rYhXjMd3W8PhUCkXJzZMo2MYk9ODr+s2QmfEy94
9wyQ0dvT/E8EOiVh1Wg6NfM3zndItsgXVjnIDdvU8BL7xa2GWeUwDkU4JJnq
74v1L2lZnXHfthvqHWKTvXB8B4/FvFKQVgaRsgebWzHfrPblfyysCvyMETM/
MZs8EXhSLqIO35boKYn5SWXw2LxAUQOihu9cJvwisdPr5i81LfC9OsBJ6JU+
4xrfY4PgBdVoPsG81TsarjwDEDj1aIRgRah59/3SP/STkmZ18V8tWmZf89FP
2gKbZBOu6fo2I47UY3ut9nNDJyX1naQDbag3+Er7JiEB+POJ499xJzJiaVpU
6qsWgemSsbG7DWRkUP1XNLZcHO7qtSWJ/MB6b80Zai1IA8XY6fjaP2TEr9Wp
dI1TAc6f/nzSD/vFFlk+yi1bd4Gj09XKLTgeutBhF3ZJJdAzOPfoCVHf28w+
N0mogAvnnYVBzKVOb9n1dqhBsaK1wRxmaoXO1ouKJPhrSz9A+MV21ZtJR2U1
4SJfli9RD2o5xas1e/dAcMLEeUJvfXzqjK0iQHBGePs6K5x1pXOrRqSdQ8JP
PiUiH+fy89Z1FBDZ7yVuRHqLRmkf68l9YoGi1cOR0notiBRA4WLVwgMudM0m
GQ/aEM0XBXeyBfaHU0kso5fwvlKctW3XTVE4kSr7O/g91p/IIyl7WQLUK8c+
VU9if2r/zi1ZKwOxArqIFfsDj9EflYULCsDll136HZ/Hs4Iltkeeu8CSoVdV
DcdnV8h38lmEEpwwkbxdTtT3vZ20+iEq8OJgo8IY8Xs/T2URfzX4G5NiSPiD
9VT/F6c4EsiTYuMJf+A4Y1DhFqUJ/Zn65cR5RMUfofMu2APx7xaiCP3e9NH+
3rkzaPmXNx9VWiWaCjzz47AhIxi+NZeiy2tEqfVygoEfOMBelCXRsbwVrY50
xz4r5AU/iRh+bTEy+nNwzLHWQxhWT5+cuV6I88P4/CDTVTHwnnXde3+EjMzL
Jt8ap0nBFqWH70bwPtla+83RtF8OKNoKpC9jP7j/VJjK31sR9iVneb3A/VC1
FMpkcnU3iA4M+t3C8dW59oQZ31KGHSozhR+I+tbw+Tt0VRXudb7nm8bMsiJs
NxyqDsHlh7UJPzg9WC7FdkcDLOuvfSf6oVj31m6tVC1YvUIJhN7pA2pWeysQ
lC3kviL4ynaG4dm0EdQ+72BR3liEis7GPeulpQULtxN6h6sakM7YqV3dPWxA
XXkx15mrFfEq/FymrN4OCdsj6tUm2tCVB0xfjZyEgFV9C19TEvabz3nlKUE7
wcnzdmJePxn9fHx9sSJKElTvj8o1z+J52TheXt4mC8aXudI8sR/0XYq8rzav
AB6vE7Mdsf4X1tq3LyzugtrR33UuRL6Y/S9eZlIGiRmv5kbMgT9arsZSq0JT
ZOTrH4Q+UmM9FZU6TLjohBD7wxdXE1p1Ng3Y6TJgTegftXNb7ODSgkzmcVpC
7x7fljxHZQT31ixy1vcHSv6bp4OXkLKQ4xl5yVokc8dIbDR0M6inC3A7izWj
5azZzZIdXPCPvz7biNSGBhPeSDk94ofPL3TB4gCun+01HzUCRKA6Mmm64g0Z
3VF6uXzBXxw4BeK3tX8no8J6+7jeQmm4V2sVrYP7f7ZijOLzN3lI0aIINcX1
fniwzPXVlCKYHD17cw3rr0tpD+GnV4KdS1H9mTi+v7XKydyMKuD5nvrfZ8zP
wnecV1hWhb4HSrd+Y3avDvhes5UEr85x3yX6f9FOyuLHZk3o6G9xJOo9WC7P
87H4HhiWCnAn9MbDQv7vyG5UwDuXxVafg9hPibNzf6WC7rS0GyXR9Yh9IbQi
qI8VaO51+TQ/b0EyNr6FuW+3wbhFN7VOfRuCPSkSzD2CcPz4eO3BcDLyapQ8
5UazEzL0+76MfyQjTUHzO3O0kjC93Y5jfJqMuM1Ofj9rJAud0fFjzbjf/YZq
TyaUKgDzncckcaxXKYjvfeTzXfCDy5JhP45v9rDpDFeLEkgUDD6qJe7/uhd1
3N/ifp+iFf1OzAN73tWYKjWoozp5aRFz0pNYb9NOEqQWBP4j+j3gmG3vgw7c
72Xpw4R+l5vxva6ze+BnHPUDQn94cDeFZ8I8iiieC3vr8BpFhfaHCrkxQdkf
p5k355tQWylLQlcnJ/yzOlFlvNqKpl+ZfaF/wgdVzcXcqgjHW2G1fW1OGOZD
a4bVK8hIWEAlT3tFDEQq5/i/jeF5jkRl2SSlIeaJ3ClxvB8eQa7yd4/Kw2jD
YPoP3O/LBr+UeAsVoXJnt/hnrF+nJa9R6c1u0JXazJ6E4zvMSc9W2KgMnvnk
1D6iPkcaVBmrVKGqI2aSmP97PpMFLVvU4QeD5gLR74X3vV+ttmkArz0+TmK+
qd/b7z2iBa+aXtqu73/6Z8TQKgLP29T1BNf45T+ScCtAHmFd29/lRKMIQac2
EU0KSOlrrWIaqEM9YZNiSfdZQCGQwplerAVV0YrErkTygFDenoKCmDakFMKp
RSEvCA1e88LuvmSUPXnjxiMXUSi6UxXP0o73FRWTff8cJGBnXcC4JPb7IzNh
I/FpMuA+MZL6eQnfB9L1J8zcFGCNTpy/F9c/S4VXRs7hXeAlJ+KviOOboWVr
+BigBOcmbY68IPJX2K5ccUEFnguqnfiKmRn0dA1PqcG1Zu054n1Jh0Ku4lEw
CfYmufgT+S9XqD138LIm0FmaFRDnIeOGHHYXTCPH2NdZ8zcqEANi15OrZoDb
maNZ2ucbUZyxL9WPuxzg2aqdSJfdioI8/r52OMcL8YYZ524KkJEETbPcbxNh
iHLODhnKx/uJXkzDZScxYLia8OnFMBk5HxD6yXNFCiRKBEbCsb9nj4RIlr+U
A7X92ipOON969F4lHc6KkNsZqZ+P881HS3Hf4sxuOPXLJugmjs+xsuWb1yVl
mItzcuzCfHe/gLSdlyrQmASkEe8FdXWLJ+j81OH9Y0sWIt8OM8x0toEa8Mr6
cw/hbw50dD/lo7TA5VykOpHfmf7jqT65Q+i+emQoOlqImuTVGXMu08C+oF6m
774NSOVUEYdOEhsoa/9I/bLagtJebpHKC9wO3MU2ahlDbShff7rkopYQbFt6
3XownoyubYsQYz22E/q2cCSE9eH6Nijlu+UuCZ63JI7YYT8Pngi9KfEU3weH
QvONsJ8HdfXtu/NVAdyOX8q1wHq5j7wQuDy2Cy6wLSUdxfGJH/XszvinBF9J
D7jeYb5M6feMcU4FgHFZkPBzN6qULrEZNSh1MjUk/LzN78HgZSoNMGoOR4Te
WztGC97SaoGp4c0VIr+HnVuOy4T9QavPd4j3lNcgPfNfV55TbIZXmTWMbstN
aFqKNB0bwwVZejwjS9Jt6LjQmC2jCz/I89fWMlqQ0cPazMfuDiLAyybAVlqD
+9sz0W3ioDhEb1V05Mf+XXc8ovzxbWnYY/bEYA33c9unmy0m9fLQvrIpQBnX
Lx2JdgfnoCL88dp+ZxHrFc015BFd2A0WV4rfP8TxxXJL/dFaUoZ9gTwzA5if
ptdnZv1UhfK0bnHCvwVD9i9+XVUHSTFzT8K/x04GSCusakDV2DsLQp/UjLhE
MtceeOoU7krk9/KbAsnFtE70yvSHFHVCFpKRaDk9dogKTAretXBCPWK41P7g
VzIr2F5aWZBJakHPviR+tg7ZBofK6NNvV7ahs2NBS5qlgiBl9MHzbAgZcdIw
fuwbFQW/rNHC1A9kZFEVWFo7IgHX92/+chz796wHY8kXMVkYuFsclIr9W1CD
hW8qSwGUnjNF8mC9sZFxR2Mf7gKDT/7CJji+iOewT6tSCdyPSJe9xnzWXvTc
cIkKLNFVe45jJgnNMJU9VYNnLWGKhH+HVn41i35DAu39LiNE/wqLdUbfqdEE
WibmXkK/3tcbX+Tvz6HgnE79rZXVKMsgcGj6yyZoLU898V6/CdWS7C6iOE4Q
2Jz+nnuyFfkYejEXufNBzrhSt7Y6GZ04pvZDvlMYOjybeydekFGDPSdP8YAY
lD56tZUf+zXHgI3VIJ00dBo/udGH72saR+j/UYE8PBBxPvQe9++jNNL4uXRF
uDphI/4B603vFnEgFe0G5cdxyXdxfH9O/vPsfqkM3n9eePdiTl/ydruarwpr
O7KvEn49m/lIzrdCHUr05JuJ/k17WpeoW60BpVFXeQh9tf+4Np3o0IJrc9yW
RH7LGCQFPNxS0VjZxdLe+XCkuOY8zzW9hqTnRpbgaR3qMGFLbAtgAdWpoeJk
rhYUaFyc03GGB3q2+wRxRrYh0/6QTB5+QTDyuNQj5IP3h/DzFQM2ojA2oc1h
Scb+dOO48/BeCVDtbmYc+IXrmdKhsfW2DBhPyBTUYX+OM//55uIRBcjUTkhr
x/X9GvJOy9jsgrx2eno5Yv4oMC9891ECHVkbnTLMxzXFzBc8VcDHhXeFeP8f
y5Az7j2qBu0GwY2EP5czdEs0BJCA+WqgB5HfzWwU7V0+mvDP/mkOoT80Mb4x
VnEaDbEmW2TPlyOOlBPTnP4MYJUoHC5n34j3v+Rzgr4c4OZzpicjpRXpFYV3
y1vzgnriDiNOXjICO60EJg1huM/XOxzylIzyh66tlO4TA7LfQqAe9mf3R6S1
NXcpMBGw7jqM/ZlrznbrTLYcPLTf9mkfzi9PMdftVQdFyPcbYc3B+W25pXG8
88RuMNzqcSmYeJ8Zq+cK9sb30VWWgk7McZ98dGPdVKHQzukI4c8pEsPuiZ7q
oGEht0jcR98vlZy76KcBLWyH2gm/eqLJfkW5YBD1MfQ2vM9+hj5GhZfcUaeB
6dzfk4aWDUhB5uONCxfZoFQ6Q7V7tgU5r6bCtaPb4cntSXY00Ibqk5z5Y2SE
gPw55mFSHBl1lfofMrbaCctHGIvneslo012ywtmDkjCUrnSTD/vx7F87d6f7
ssBa3PBSCfuxzbVrkpUDClBKy0prjPXVf/39bW1gF9wy7P99mNivwk/Slf1W
ghYpXtUGYn+KaH2n91MFRrgOkYn3OR2X0P4X42rweumGGOHH+tcMzNP+kqCF
LkOJ0DewLMSMVjTBxYG0ROSzIkakK4LpD9p0Le/08aAaZPEUSd+rZAYXhgOn
Rsaa0MRPx6ON3lyw/FDV77FoGxJzuXDmswE/ZH0N+GtjhuuFi4flxl4R6Gc9
kJf3Gu97zKEpIqbikBlxz+PNOK7X55mtUVekIWT4VsMn7Meav2yKgkrkoeJ8
cp4krte+sSdz0KMIEQwal39jvV3y1wezfu0GdU5q3XQc36C2qPj+GWU4tnnV
jfDjPBneqqFRVWDXjZon3t/+TmisXlhQh0mmmYOEHzt670yyXNAA13IBY0Lf
dDDzN7/c92gxg/SdauERUgvh52njoYLQ9L3v9nDVIyrNuS0i/qyQdMEqKDK8
BXmLSs1Lum2DcC3qT0llbegWaf7ogUxBiOBZqva8gedd+h8mjg+iwDyVDYtd
eJ5vTm7M6ZCAw75UyULYf49c6U3m4pKFmVHHN6HYf+e+lS5sT1WAHTbRm1iJ
/ZG9XZIreRccKYzmNcLx9QyQrlgUK4GR7O3yasxeoxfD+fJVQMH9Jjvhvxw3
+tn2ZqoBm5kMM+G/a3VRFc8rSDC/j62b6M/z9KyTjC81wf2dUNf693OcA+Z3
+OewD6dxndasRkWZHZE99zZBwUVebS3ZJlS57D/h48MJWfT211u/tiKVCEqR
EDM+6DbYkaSsgu+XZblWRrXCYIs0f1SUkdH2RRrzX61i4MzTIlv2lYz4Zbxc
GualoDQrettz7L/ZXt2D6vLygHeSsTe4P/3MhmpSkxRhmfZYRDvWa+HoJPwq
ZzfIcAh1xhLzIW4+ZaJQGfqjcnuI97K04HeB5Vmq0LD23YDw3xbG28oMz9XB
2ka4hPBf7lIPOpcyDWA0XWAh9GlZK0bKlRuANf/p9fd0Q2p3O5/3+yB0ZeP7
BAn7TlZHH2s49d97/6Oeqb5wOWFoKRRkDc7D99Xl2MfhcjqQ/1R8ifDv2idt
3u/1TaDrGc/6512e0qSGy1nCQ7WNv5+geRgsV/7/938X41/X3+trQIeYyV2i
nw7dK3oRLrcLksr3F/Ni/h+M6YaK
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], LineBox[CompressedData["
1:eJwt02W0kFUQBVC6QxCUbqU7pBGREJFuCQE7QAG7KLsVu7u7EIsWaVAQaezu
7n3W8sd+Mwfeut96c+fWnTxt6NSCBQoU2OtH6mw/GrJSfzGv6qdQnKPlu9Te
fKZ/mLZcK3dgq/5mVumnsz+ny0+qw/lNv4BCzJEb8bb+El7L+ZTgGPlutQ+f
6x+hHdfJB/G+/hZW62dQhTPkp9QR/K5/hcLMlRuzSn8pr+d8SnKsfI/aly/0
j9Ke6+WObNPfyhr9TKpypvy0OpI/9Aspwjy5Cav1l/FGzqcUx8n3qv34Uv8Y
HbhB7sR2/W2szbyoxlnyM+oo/sw9UJSL5Kas0V/Omzmf0hwv36cexlf6xzmI
7fJ8OrNDvp11mRnVOVt+Vh3NX7kLiuX+5Was1V/BonyDMpwg36/252v9E3Tk
RrkLO/V3sD4zowbnyM+pY/g7d0Hx3L/cnHX6K1mc8ynLifID6uF8k12iEzfJ
Xdmlv5MNmRk1OVd+Xh3LP7kLSuT+5Ras11/FkpxPOU6SH1QH8G12ic7ZZ7kb
u7P7bMy8qMV58gvqkfybu6Bk7l9uyQb91SzN+ZTnZPkh9Qi+yy7RJfssd2dP
dp9NmRe1OV9+UR2XB8qi/99rqeyA2oqN+mtYlm+wD6fkjaoD+T77RNfstNyD
vdl/3snMqMMF8kvqeAqyWC6d+9e3ZlPeO8tzPhWYmjeqDuKH7BLdstPywXyQ
/efdzIy6XCi/rE6gEEvkMrl/fRveyXtnRc6nItPyRtXB/Jhdonv2We7Jh9l/
Nmdm1GOWvECdSGGWymVz//q2vJv3zls5n305NW9UHcJP2SV6ZJ/lQ/gou8+W
zIv6zJZfUY+iCMvkcrl/fTs2572zMudTidPyRtWh/JxdYk9mlp1We/Fx9p/3
MjMaMEdeqE6iKMvl8rl/fXu26Ofzdr5BZabnjarD+CX7RE8OlT/J7jNLfwBz
9ZPVYqzQ75Pv522zn3+bof6aPeEQPs1Oc6D/m5dZUiFvlJm5Z3pxERXzTXZk
1mpvKtGHyvTNN+jH/mz1e4epVehPVQ6nGgOozhHs9Hs11IHUZBC1GExthlCH
9zNvtS7DqMdw6jOCBoxkV2ahjsrfxWgaMoZGjKUx2/L+1SaMoynjacYEmjOR
3X6vhXoULZlEq8yZ1kyhDf8BSnXmSQ==
           "]]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{472, 473, 474, 475, 476, 477, 478, 479, 480, 
           481}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.,
          
          PlotRange->{{-0.1, 3.1}, {-0.1, 
           3.1}}], {-1.2, -0.8180339887498949}, {
         Left, Bottom}, {0.5, 0.5}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{
  3.5680626321567297`*^9, 3.5680626705099235`*^9, 3.568062702019726*^9, {
   3.568062733319516*^9, 3.568062766697425*^9}, 3.5680628221645975`*^9, 
   3.5680638370426455`*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2DGDwwv7UxNuFL9Lf28P4XnvZ/Z6l
/4fzz/KacbLECjjA+E79rgeW+0vA+an6v3gNeRXgfF/N1I9i7ipw/qYrtaUn
LTTgfGshrfUs9TpwfvrvSXOXRhjA+fnHnhuv9zWC87ui2FT/5pjA+cnHq9MM
M8zg/IPskoHZkRZwvqFgw7SXJVZwfsJnWx2/HBs4f+G8ozLfe+3g/M19Vrcv
BTnA+SW7bAPm+jjC+ftPLf3UGe0E52e6W+7NjHCG8+esMNyaneUC50/8vLex
oNwVzn+2qrQso8gNzj/iNmlGU5M7nM/of+tRf4MHnM/guI1xQaUnnN8h/t33
UrsXnF8QlXzoe7M3nP+w0STFfqoPnC8yeeatzoW+cP4yAa3K47P9EOFVJO+q
vtofzp+nsEDGNiQAzt9b84sh4wKCr+jN/kc5PBDO33Jes/vmFQS/59g/A4XY
IDh/cvHLrIQ7CH6NqBy/UmQwnL9Sk/VUyQMEn+0Lo+TBuBA4f7nBxrp5zxF8
zaRVfn9zQ+H82547N4W+RvAvLa7StS8Og/N/bA60UfqE4P/fUbS1LS8czvc2
cHOt+YrgH4/Vz8wujoDzrdgDNmzdieCv21Dw/f9/BB8AV6byKg==
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJwUV3c8lu8XRpSE7NGXsrKSlT2e55iv7dUQGiTJSlbZIUKSrBBCIntFFG6k
spJEZoiMJDJfe/z8/no/1+ec5zrXuc557ve5ea1vn71BQUZG5kdFRvb/X74n
Oy/Tjr/HVExSho3fduBV1CInbtml4/dtkmwyoQN/71WcJWxXgnc5Z283tX3B
myRdbx60q8fNfrxMcZhox1siu3RIN7/iTHsN5ZfEPuMLIbS/vfK/4eQXy7QC
Gttw/w8lImsZ3fhXMS1Z3KINT4DV4uXHfXjXurqpb1Qr3qoU/G725k9ciKK1
VulwC16gwnxPtmQUj/Fl5kosaMYXf9ike+SP4ZLX3ylbGTfj945R/1rKGMdZ
H3T18aU04YmJRjfnH//GVaE4q0v9E94W88N1+uY8blL3red2RyMenpTQGie1
gNOtve479aARF7PDLc6ULODGleliVKqNuNuhGF+3/EWc7KH24m7Je3xXS6Zu
IWMZ5359jvNZZgP+gnXYKPr4Cn75cYlH27UGXHPywU+J1BVc5RTblXXeBvxR
SB/Z7UQSPpXANuuhV49zfPDRmHu8hs82ChkP30J4TSz/98gj6/ifnVfC8lu1
+FXrdhuxh+s4RVJLmXFELZ5FfjzUMWQDj0da/C+KanApeN/yx2cLP7m9doCB
uhrXQ4eMpm7u4WZMaa5FB6twqT1rEtvCHp7DrkB7L7sSj+Sx7OBXIYNGPZv7
01qVuId19Z3zH8ngl87xstuP3uCaUy4f33wnh5HrF6IShStwhbDjHB0cFPCv
1un2/e5yXEy43XHqMgXcfOFs+z2gHGd2EGJmn6QA47q6lfih1/ivueFrXqQD
8KfDfGw2uwzvjXr0JlqRErjzOfhcLpXhbRKKh/P8KeHqlsH0aaYy/LVrfOkA
FRVclpD11AguxYNIentKbAeh8pvRwYSpYpxnpyp1R44a+Bvup3jQFeAsaTcW
WH2poTjtTrdWSj5OjTNritdTA7K/ZbMhmo/PBzr/vUo4DEMzH01/G+fhdZQn
lRou0sBC3mAXeUkO/jq763F/Cg1gnFFbNPo5+CvtwLGFnzTwiSXIvnr6FR4V
/iOc1+4InOAOVFoQfoVfoY3tu+9FC9ilJNfVmiycWISfSqmlhesjBaZuNlm4
ptHcvXIyOjhkv9FvSZ+Fi0XrCE6E0wG7b9BLT9uX+DbznofWM3r4rv9yY1Ew
E/9CJ3eY8goDpBpR0/i3pONd+kxJHX4MoBC6YCaqn473P/wn+CyVAdx3t+Y/
fk3DJ6hyNMWHGOAqDfXTlyPP8e0d9kCzS4xwDRLjNZlScQqVFXp+X0Y4rWEz
F/cyBaf26Xw+l8wIyqdZdJLkUnDm1fCa+4OM8F3oknnWtWRc9N/GaqE5E5Cz
vVA78jkJlxTrfeDpzQSamVPq2vZJuJzDaxb1Z0ygv5pNduBwEq4+5SDd188E
/SekC2cMEnHzkR+3yM2Y4UHG2PNvk0/x8A40ccGUBdTvqekIXIzDo2iT3Xnu
skDx5UiVMZo4PF7vLsXfpyzgF7+o+rk+Fk9vEucJ7GEBweF7OPPpWLyyLv1S
/nlWaPJ5JLTAEoPXbvvOeHiwwodG+cm4b9F4o5KZNx7PCmsJa25qT6LxjkqG
xO/drMBm1UObTxeNTxYHde2eZYP48gNKwWJR+MzslWutbmzA0/nAL/zNY3xB
VGkhLpYN/N/4dlyDx/j2qyU6kS42kGdIc79zKRJnSb+ue86EHV7/+rpn+yoC
V3+i1ZBjzAHfq4YH8x+G4YF6FXldzhxgdbauP0c8DK+j4o/becwBraqstFQ9
obiSH5ntuXYOePDMWOPzyVD8jH3NkT0dTti24dQi9YbgbgKiJBE7TpAWaset
Q0Pw0p9JI+fDOEEwImSeSj4EFzO9W5b/iROsFiMaf6YE4wIaUhdN1Y/Bexkr
/Rvu93Hr3XQIunYMFKjY39OL3ccz3tGLFgYeA6e6eJ/2ySCcS3J2m7x+H5ti
ie6Xg3BW7pzMIuX/IMjf+tTGhUD84BrXP0pZLlDPSZoSm/PDNV8/6pM4zwVl
65Hbpv5++P1bmw0W7lxAS5f4SOqoH7473hdXWsYFPxaqTw/J++JrnbGKl8W5
QbYwk/J8qjcuF0nOH2bIDTsCiUMGit64B8GF9rUTNxTMWHN+6vPCF5Dhz0MF
3HA83PYwN6cXPp1P/aBc6DjoK9tXfy68iwvaejqPaB8HPv3rpTwX7uI2vFMX
D9seh03F2pzm3Tv4aOIHUcus4yA8Eb62duEOPhByr5OG9wRMWNk8t2L2wG9I
bNJJ0fHA5w4jA+0mV9zgR1g2x3EeGDF9vfDR1xWXCWNVJZPggdkpkxe+0q44
5U9Jp69EHlgo75r1f+mCZ0bdbLsVvx8X8hBKF7yNRyiRrl3I5oHKoXfkDFnO
uOvU/Q2VSh4QIhXRZPE744ClCdP27/NPTWkdFbmF/5z7Hpr/Hy8Y0uXfpzBw
xJueWR+PFeMFkr7OpcQBB7xYa+GNtyovxL57/4TW3gG/9/zIpI4lLxTUuNZ6
PbbHuQzVNX5n8gKVJ+Oq39+buHlhyR6/KB9w2thsjpJscDBTTTyizAd9SW91
D6XZ4MKUn8WX9fmA//Jv1jSCDb5+aepK4y0+ECfLzj6Qfh1POMJda1XGB7y1
PxYPXLXG71Xln9Np5ANa0QVJKkZr/MZ1hb8S3Xxw5ojAY91P13CZmnPH9lb4
4Grjc+MwqWt4t0OE13MFfshRb/ypw2GFV7NxMDzQ3ceMnj15eZZ4ZmN2jpMF
P6gt3l1YFbDE3Y6971X24wcaHsXyQ3xXcYa2NZnBen4wOJQdSSt7GTcUubHI
RhCA9zULf0qrzPDNR3dqhk0FIDyS5ifJ1AzP/ffgQZatAMS/qsqoWLuIU1a8
4pQOFYA6A0n7UNWLeDU2rWb4SQD+MJRW/R64gNu9WD/C0iMABt7hBZYhF3BW
ysO9gxMC8OBDIZ2Q5AXcpVXEwY7yJJiKDzNFPzqPC553jA3WOAn8FZuDmMk5
/Hul72W9cychN8h4K5vqHB7EGSnIeP0k/I5dvyNTcxYfGimsTrt/EjaNdd6W
i5zF4+z//Xr3/iQERJ/52MRsgpMFuJ5ZwAWhQYDZO1fKCC8eC9qpNBYEVsmw
wwE1hvglzdhmf0tBkFsLtOMnGOKVh8svHQkQhKpIuqTK6wa4U/xKsGCdIPhE
2XYalunhx9Yojea+CEJ/6u8zXTp6eLM5K0fFsCC06VxSXxjTxflOyBWq7QiC
+5DGkTEOXXwgz/P7ZRUh2MpV3ppJIuChtOFp/AZC8NXc3SZWhYDL3E6ym7kk
BJ7OCx2ZY9p4tMy7bU9fIaicGbWfktDGtes3BeKqhWDJvkbKdkgTf/3d/06r
gjB0en34dcJVHc99YGP9S1cYppqFZVb51PE0OX3jLQthoBhUDmbvVcMjkjhE
TvsLw9gnDc79LcCvXy4fin4vDPy11U++8AFuQZfcmtclDGQazFufa3GcWBdY
2TguDGfXL0+qyeG4Co9R9AqVCPgfbzPuk8BwlolpDTM9EahSnrR6oaKC0zz9
Kul6SQTaVWsTlj8q42TaldwRTiJwjO9vMW6sjM/mBK/VRImAeGyzXKa9Ev7J
8XjBiW4RGKBwPtFQoYDfXT7H9PuSKJg1lcSuPZfFnbKU9vacROGhw/uLF9Vl
cesLvLMc90ThWMnTBsVpGdyo6t8nvQxR8JpIrHFWkMGFfB96F0+IQr5hQOvG
H2n8uJiLbTNJFJriXg+1P5PGWYZNz40ePAWvzB3yVvSkcTJc4DSTyCkoHMzN
PFUmhfdT1I/euXUKjs2e8k2MlMQ7yrO/RN07Bc4LSjMu2pL4R5vI6pwnp8A8
+EaeG7kkXtZkHj9QdgoY4kml1SRxPCJihaC6egpKd24SX5HEcGUm0RLKADHQ
HKPRrzUVwTvILVq/PBGD3e+mBhpzwrjV4sPxhAwxaDI2dQl8IIyHdP5hF2kU
A9HyoGWKGiG8Iyov0JDqNJgfP1ToqiiIW90bSGZjOw3+8k7hS0Mn8aVbh9/8
FDwNfA9zT5OCTuLshvZ/XHVOQ2bx2+wbnQK41RGRswmPToPRJZKB6j1+fGnT
zMky9TRovZUY4zjNj4fMhIcKF52GRgvvIa1hPjyvdbq6uuM0nPhO8ypAjQ9f
Csvl/8koDhrnBnrGOXjxEEphklCSOICVP/36DjfOtnLx6GKuOLD9kpY9EcSN
546HiVS/E4f7cndJhge58S+Nv68Y/BCHCtKToEw2LpwtKKfJ5bgEtPO7B+oa
HcNzXfpGFSUkICp689TXUU5c2erQFgVIADPd+D+uO5y4FX5T4uk1CeD+3rCx
kMmB5+0IJr3LkgDd5M63r5jYcZU509f330gAw/GzYimv2fCOodB2/SYJ+OXC
mHviPBu+VDNFNvJbAsgomHfrU1jx46rdMkGskkBJyKItU2HBb27FPs82k4Q5
A6v3y/WMeLzR7AdvK0k42bGkteXDiDe80JoxtJMEpo3mZnp5RpxDZ11u1VMS
WjTxWr3XDHhL/JVO7URJ2KE4fNvC/ii+8rty9Vi6JGwrp82YztPjPMoM3POv
JKGooF1TwpMe9xprtE+slISvPHuhFyLpcBFx4QPTPZJQu7M3mv35CG4aFCRS
OywJ/8Ky5ostj+D3vw8aR09KgojlO3MzEg0+6PM4VYEkCc9pN9zvnqTBI5qX
ZB+ySIEHjwOddhI1/tcK2Ymek4KDsl17Nh+ocI4Ktie7FlLgvOHRMuZMhWse
cnnTZS0F9eqf+HL+o8JTi/gofN2k4OeiRQLJixI32AxL+RwjBb/Np2WPqB/A
vQzH3qc/k4KPJzO+Kq5R4FkZStPuL6RgY/5iTEQRBb6tPSfDVSYF6lxZj+9z
U+BFcWc7nDqlgPN41e3LNOT44FTBCvRLQYigp7FYCxl+UInqP9ZRKdi0XTDb
DSXDr45W3UTzUtAg9vdP0iEynP40Nzn9UWlgP8XC4iK8i91u+n2mxFAarD1Y
CX4lm1gDFDqKmUpDp/kM1Ql8E2OocXmZd1UaVj9JJad0bmClJRtMWbelYe8e
aYRyYx1bSjqylBQjDYKPr3C1XV3D1Jk7RdiSpUHkfXfrre1VLO5x/LW4TGnQ
YfUMKU1ZxWTuc397XC4NTQ58iDRCwu46SpTe75EGJd8j/K89V7CmyeXfe8PS
wB9LnxjCu4KxW7094T8lDeak0uGG9mXs7Xm1J55r0iAdejP4mtAytqF6ztmJ
8wwcZM+JL5pdxPwYPMVMr5yBSfX44bAb81h7hLJN940z4I1O19qM/cO4qchS
ic5nIGkrS9PB8h9WtxF+RD/gDDhmVLY0X5vDyMaTZ/AXZ6BSOdZv595fjHjF
kg/lnYEzN1aq5Y/8xV708VsovT4Dv4Wkey2ezWDq7YWtMh/OQGKe8xuVmj9Y
8Ju6XJHJM/B3QTwhgWUa+y4RPPpq7gz4yZcp4SW/MYF8AofA6hmQ93IcjdX/
jX1M6ww7fkgG7nJUqnE9nMIOhv+yZRaRAXNbZ/FxtkkswuLgyR0nGRC8wzR4
2OsXhknSrv7xkAHjIyUeDhK/sEUqpuZePxmo6rDWnPk9hpmVcduXRsqAm5Fg
kezlMewktWzR9UIZIOlVt90zGcX6h5XuEStkgN6mSOYy4ygWWQ7GqrUyMMvZ
auyQ9RNbumqwyNYuA5f2HHKfFI1gDW+uy7b9lQGPsCNusz1DmMcj+4NVyzLg
d+LZjKvNECZ07Xbfyy0ZEI+MtC5b+YFF0fp6+x+RhZUahzDCsR/YpeuxSPKU
LIRduyUg5T2ArTK810p0kIWLgt2vdgJ7sfypJrYQN1nQcpgL9BTuxa7Utv92
8dnHkyGyxG892Meb/Q/1ImRh2mzR5pBQDxZTN/9lJ08WTGXiBn6NdWOa8aS0
mTJZaIyPeZsf142t22/d7nsnC+0nm4JfandjV1kPMZW17uNXzcIcpV2YmNNx
U5s/+/x1E6/To79ho2oCQiaLssCAGW4E6n/D4thF11U3ZIEY3lfvfugbttko
m8x+WA7+6hDY793vxFo4DUfahOUAiSTN3D78Fbve7GsrZScHuU6sK7FOnzEb
FUGj1dv7+Z8ePhun+IzZlnXK1njKwT1L/Z/NyW2YXcpJKq0wOYj4pJUl97UV
c7799aXZKznI9joQyKXXgrlMeD/iLpaDioUvcd6zzZiruYD7rzdyEB9JuQHR
zZiHhre60yc5MHqhxbD5ownzYecfC5iQgzaLAyMhwZ8wv8gvLZqzcrBK+9+f
l5KfMH9yr9LDK3JwuQmtHvj5EQv82x4Qd0AerjaccXPDP2Kh9XeP5/DJw4rO
6Ko7/Qcs9mbbpQ4reXC/cmHn7WgDFj/koRFnJw9f1Q1zMtIbsKcmJ06ZucjD
FeHNimDLBixJ2WNzLEAe3GKazC5/rMfSjh5/RkqTB0Yrmo83JxGWEdISWP1K
Hq53OpOJuSHsxYabXUCxPCjG7zaXkCEsa7xZ/nCdPLTVB1oM8tVi+VWuvVzD
8pAnaM1P8qnGCsW46sYm5CE1udd7nKUaK3rRlP1qVh7MLR7WEUvfYaWP/rsj
uS0P9hW6HxP+vsUqLT8xa/6nAD8TnqZedK/C3h/iNHE0V4DXZ8wujX+owKZe
iusNXFMADZMrbmtOFRgtaGoQHBTAq3/Tzo+9AjPzui3L76sAaYdoBhtdyrH5
6U+cP1IV4DHfJ/qcM68xlgc/mHSzFUC/eeBGzu8yTIl38UhVkQJQP0+1nU0t
w0LNuXZj6xRggebu5ukjZRh3m9svvVEFUEpYYhD9W4Kp24b/eDutAJW12xzT
N0owO4q074KL+/UbeYM6fhVjFUqtTRQUisBXb2Kz+qsI0y84UVDNrwhnP1zl
GN0qwLwj291FbyqCk3AfIfxh7v5t65dT0m1FwA4crdfmz8U+fly7cdBLEQ7S
VFm9qcvBGHb4zH6FK0LTv1nWB5uvsJxb3irJ+YogHhN6m/1BNtZ++Iksdbki
FH8renX3VDa2lJ0lfrdGEdY1hOfUu7MwbOQrz9l2RbBKNB46KpSF9RgJUtH8
U4SJGVLp2kgmtjmjvOu5qgg2BZqdytGZGE+YydrkriJcJprdbFbPxJzq/f68
P6oEQryHpDILXmAHJLu/eEspQcJXhoxfjzIwKcbAhD8eSmDWE/Z6gvI5Vk3d
J9zspwQiT6IPbcelYupk4jVZIUowMZwj+1kgFTs//+OnZbwSVAndE7fVT8Hu
fpEX6S1XgqfhGWaPC55hex+jasprlOBJom7gLcIzLLx20jDmgxLg8bN3vkwk
Yc8K4twMupUgVnHz/iZ/Elb7cL6mcUkJ9G+KnHpYnoBpBWkbZWwqgRN7Yutv
iwSsw+v5qD+FMvT4vM5+cSAB+3lTn0qRSRmMsPYOFvOnGIV2jlGJlDKI/Q38
68Ucj+lQWI6luChD4rq1r0JjDPZt4427t5cy2DXE2p/wj8EsFmkPXgxUhg0b
Wgs6xRjMcbRalClaGSIVbb8slkdjUXVsHuElyvvfm5OpRxyfYOyVtw7aVimD
pKEVnrIQhWUUfUzSqFcG9/RYlkNeUVhZqhva7VCG3X4JZ4vIx9h3n46Dd/4p
gxV1W4Ba2yPsitvJZ2dXlSHq1T1zyquPsCl7v1OSu8rwKoc+3nU5AlszEyX+
pVOB3doudWn+COyYfOiza6dV4FGqnXDa03DMallVzMhJBZSsnyWWNDzA6JjI
Or97qADPU00r0RsPsGrJRvdL/iog8yjqp+iRBxiLs3aNXZQKPLfAMrMvhWAt
00Z6waUqEFrd9myELhi7c4jx3+F3KvBHScR7HN3H+AS7Y6Lfq8BcWbYxfvs+
5nf94sDzLhV4wq1wf6InCJMcsbR7u6ICZ08EWqq9DsSGt3lp8R0VaA9/ZG7h
FIhF/DdR8olKFcy5ZB6lCAViE2Z2a11sqtBVqeC4qx6AJXW7hM4pqMLIIC0j
UdMfI2sNyuLzV4VfwmEhNFneWNFvDZ28B6qQSSxbVVfwxiwOHpyViFKFRmfG
OJMOL6xCI+KMaroq5M4c5+nc88Ts6mIbL75XhXy749cdPO9irMPnbUdaVYHu
c86uI+ddrHGLjeZGlyoMDqHb5OgOxqWYYuI2rgoyjsq5TdR3sM7yl6ORVBhE
V5/S6ypzx/y7boQw02MwdqLNPsLSHRNdFBJOZsMga06fJp7eHQsRL7ydI4QB
9Ynslz4ubphCXsXue10MJqyuHC1Sd8VepH3iWnuMAd9S+8lhaWcs9bJY34UE
DFIdnDuel9/Cko7FxVSkYVBs9FLkrtwtLCrB6qBbCQZdVBaDhupOmE/U1vxs
Jwai4zumb10dsDsG1vn6AxhYOak2XaBwwFxoWm3yxzA49k62qC3eHrMNTRi4
uYTBQd3xj8fq7bCz96Q+/GLGwXBVxtBd+CZmqJLkr8aFg5CxauHfJltMZ3NX
PkMAB+sP/DpbtrYYdre98IosDtN53JwNBTewU843E/pNcXjL12Kyp22DUV59
bt/xDId6S7piQ3QN2/uPUuB0Jg7P44Xs7rpewzYHHEYe5eNw/2noepvgNWzh
gsI53RocXstTnFV/aoUNGXarfBzCwdZGJLeF3BLrO6K0xjeJA22mYH+g/1Ws
qzWjLGgOhyrhuxT3t65gLVrOgvguDgd7z+ko7F7GBtMoqYePAmwykeVd576E
9e/I36BlARDaelBzNt8C67ns2KjMAaBfOdeuomiBdR7r8kvmAVi1z/83eNkc
a0pIX7woBVAq8lVVvPoiVh6l9KPrLAD3ce+IvI/nMesUeqpqU4C/EhtrSW7n
MabcX+IvLACCh94TqnnPYy7vI+7ftgYgP7/KaBV8DhNbGRShdQNYuizYnXf2
LPaDrOTc8h2Anyd6Tq1Qn8Ui6IL9B70BtBNGCMoNJti04KlvuUEAIc/J2+ql
TLAsc18vrRiAKtbw1Rc8ROycrXGm2FOAmWmO71nIGKNw529nfgZgQdentqds
jFlFfj7xKwOA45F7WQZmhHHV/9d8rxSA0uL02NNLBli8QC3r268A+VpZ93VX
dDANqWg8vRvAwe1Aj3q0DrakamMf2gdw/CBHsay4Dka8SIvO/wSwtr62csiF
gNFGXLZZ/Ld/vf3n8e3qEW0sZH77tSi9GhQ3cr89FK6BndnuHGJkUoO4Be2z
V1Q0sF/U2Qc3WNWAx6b7ff2i+v6iG1o0c6uBNBcbb4GlOrZ9/jm5zWk1kO1U
H/1PRw3zqFYlPjdQg5tP3BrbEjDsjUUzxQBRDeQfbnqfYcew1U3iG5YLavCB
nqKUJVkV81a2ORZ5RQ2Wap8kQo4Kdq82YsLHWQ3UXmWfx34qYfWXWRIr3dRg
cUeEzNFdCSPbea67dFcNro6dFmWgUcLuq5YV2weogaN+xcYHTBELq+vzMotW
g4XIrc7pBnms5eq1U/HxatCY6uPyzEYeo9mbGf6apAYX/3iTux2WxyLxXXXC
CzWQU9xYSzaVw6IbBOjkXqsBZ/mmXPuuDJbc6PqC+bsanD16eKcgVBr7Yb11
zrhfDQpnH1X8UJHGuA48OPhoSA1GDj65cmZFCkvTSHKkmFSDL4usIRa2UtjL
j3WyiyQ1aHghyB9uJokVNh1p62BXh5zvr86+nxbD5myf+tFwqcN4dqnFK28x
TPzQCQltHnXgexLb3HNEDCsjSMcjYXV4O7UnzixzCqtsMbtaqKgOrfmBMtTx
Ilh9W/bSw0vqIBJ67NiPGEHsNUenq7+lOuxOCBy2UhXEsmw3F1yuqwMX+510
ypmTWASF8fxFR3X4tDL1vlD7JHZeaf3vSV91yE1gGPGiE8AI4XyOnAHqwPFE
99DWe35MqddghjZYHaotWvpSPfmxE24vppcj1KHAMdEZn+LDZvL0Jt8nq8Mv
d193sm+82NCah82bNHXYphrvDYjixb5qpY/nZqqDomP02HFDXqxibHnsSb46
XCmpna35woMFcD4fuVKtDvkfOC6/eX0CY3k437cxoA4dpReq5wS4sIN9nBfn
htXB/eL04ah3/2EbApq9o2PqUO+6E5Jo/B820pD0vfmPOtSSl+xMBhzD8tbV
vj3dUIfGKIkNl0UOLFXbifhwRx1su3uyLGI4sKj4hK9+5Bow8WjXt0iaA/OQ
/Pvl+mEN2L7YVxjlvb+gdvFtUpwaEHjlFQfOwYZJVdbpnuTWgP0TmcftAysm
QPmnhYNXAxoSUs/Ru7BihzNUm/eENYA3PVXl/hcW7Hvf1IcvChpA4qrmMHvG
jNkTFJG9mQYsH7ihf82OEfsnzPmp7PI+H1m2dRoPI+ZGs9G+YaUBF9Ru3+sf
YMD8vrwdemivAXExmR80jBmw6HMK23k+GpDfQ3147hE9xirLQbl0b5+P83Sg
PC09lsy2fkQpWANe/75B5hdFh70cqPqv7ZEGlJxg5VpOot3/HpdXnknVADZy
h4Znn2gwZTV2DekXGsAYIx1YcYEGa+Bb0/PJ1oD7+Ud1W38fxlonKy1oijVg
1PvQ6ijjYWzIUc5HtF4DjkTM1bb4H8IovGTfOYxpAFcGsac0ixILM2d9/3pS
A4T7orJa9CgxWmVSy+YfDRBsefg8ceEAxrpb0R+xtJ9/IsXVTvkAJhwis55/
QBMOx7rYnOkgx4yjz8j/PakJetJc9O96d1RTc6XeODpoQrhgRma/3JJqy8D1
lnRnTbBt+35JNGhRdYUm4Ue3mybMnms+Xvd5QVX/1ia5iq8mKLB/lI/48E91
U+qDEW2kJjA4vPxGKfBH1bzm/HRhkSY0tAwtsfMPqYbMhm6NlmmC2bj6nQ92
A6ql3O/oWSs1weWzZR1tWa8qdSC3rH+dJkR3F9GO6H5Tfas5FWT4VRM647M/
UvlXq7J1eP73b0ETSrv6ux/xtiP1vTxxPpImxBvtfbn0tBM5Sw6pmW5ogpV4
qn4dazdqigW7OnItKD0aUhB8uB/duXj4TRSTFoz8wJhPDo+i76PJRhIyWnCu
3eSVPusMImP6cu26ghY4H0gzpJH8i8Q09jwSVbTgeOpX1wnCLArOvp6yp6kF
ZEf++r11/oekHcSmv17Qgq5mbvM6/UUUs4yCXDy1gNwshFviJAk5d0Vfu+yr
BbLUgeUfo0nIoOy6mk6AFlwjGIs2bJLQwduHyXnCtOAQP8fJ762ryG/mfODX
BC24LMSrNHpuHZm3ClnVJGsB78mw9yyv15Fc7iaek6YFxcw8ew/oN9DijYy9
e6+04JRH8iGaxg1kO/b3nnilFixyBChQM28hzYa6q8eqtaDOXe9yrPUW4k2P
wQ7WaYEob+4RydItNHRZfnf40//52zxjtLbRO2WakdZWLWA/P/VH7/E2Sjg2
jN580YLKUM2zB7q3kUn/ff/HPVqwmnPX5bLZDhKvunDFe2Dfj9uZP5YSdxBt
grDqjWEtqJ6pz3Hv2UFN5zq2VSa1YKw04MsJvV2UJf1iSPiPFkx1ew9B0C4K
YvSoZZnTAo/LrFXylbtI5Sun3+yKFhCNRxVjOfcQZ/Hspf51LaCPvZn4l7CH
ViPrlT9ua4HpX/zUQY899N0x9r9SMm1wJ7B2Dj3fQ2V6N7ZSKLUhIjbOyuHT
HooSUfgRRq0Nk29tq/Jm9pAT9ZEad1ptsD33vK/tIFmdYFOpjz6LNuxq6t2V
ECSro8wOtpDn0IaZU++WOWTI6saCTZX4ubSB3pjMswPI6uqsRY4d5dGGx1l3
bhkakNWlqm1vbPJrQxjfbc04U7I6b56vA1NC2sBWr27/3JKsznTvxbuuU9pw
2UVb1/4mWZ3MiMezOglt8BbrNFm5RVbHiAje+We04eEf2QVld7K6fynHzBPk
taHg+ZcYVU+yunafOYX7ytpAhs+9XPUmq8szb+BwxrUh68NMnI0vWV2oQty6
uYY2VPFyfQ3Zxzbstv1aBG0wM+5rPO9DVqe2qvBWSl8bXqm7DX3b5zvecySJ
21gbGhbVH27s19suH/E8fE4bGs+my7U6k9UNxJZdJJlqQ8elYRPMjqyu0jVE
fsxCGygOnNMxtSKriydeZP9yVRt8MNMw+otkda4SomtvrbXBglLVz2bfDyP6
nd4sW22o07sSf2HfL7G5r5XRDvv1DtGp/pQmqzvcnpng56wN4VKZ47v8ZHVT
+Xfu2rlpg2SdG6mMed8v7t2R3Lv7/th+f2tLRlb36Uko4Y+PNrQtOih9691D
MhRHS0UCtCH6C1Zpl7eHsjwSORyCteGvurzpY689xPL7RFB+mDakyNx8pKC5
h4LNc//MPNIGywdjTddp95A19q7aMX5fTwcZK0/sLuoqVeMvTNrvP/Lz4Szj
XaTG3/ZoNlUb8mXEWh8f3kU81D8u38rWhrftm45ebjso2uf6p6I8bdC4HyXl
xLuD9mb/nv5XpA0PCg+EFrRvo5Fv27vOldpQ+Gc4fYl9GxlpPrhZUq0Na+/t
CHNVWwhV0nXO12lD6zMedc7zWyg15fgLl2Zt8OyyJs0EbiKLG6Dh1q8NRPm0
IrfuddTW11LwekgbzolfZX/jvI4U9UxYlke14Uby7P182nXEIWE96f5HG1bf
+yZFE9dQz3pw2J1NbXAZjzPwXiMhTUfahTe72hDCtn4uOIeEKobjzVYpCPA6
XeErpQUJxTZmi3geIYB59gULYtMKopAVj606SoCdZ29CjwSuINecys01ZgJ4
9axb8qisIGJk82cvLgKYMkqeVaxZRg27xjLveAhAE5ETJn5vGUm49qduCBDg
tNLhl5Yay4je9M8tn9MEkJKK/Xjx+xK61+LaWy1FgCsLKr+PZiyhOaVNbEuW
AIl9/cJTt5ZQ+4kjDH4YAZ7S/1X7enQJqcTGedWqE6Cgd0K2e3wRFVByjW1r
E8C2qjeo790iivgj9trfmABYeZ7FB8dFtHnpzbG6cwTI0aanTCUsIvsO1eDd
iwQwHnfFLp5cRDrlRucDrAjQJ6yafnFqAb092Vdbb0OAA3rCvx63LiChJMuT
ZPYEOHiDcz68eAEl0Ew/hlsEoJA7e17t6QI66O+yGuhKAHZvlowS/wV0d379
6vs7BHCZeWHVfnMBTV4Laib32dejrSIQfW4Bnf9+WFL9HgFSdU56L8MC+qgd
m3T/PgFKitLm/kns59vWfPEJJYBYKKPCHd59/rAJCvcIAgRILtWcZdnXk0On
4BhFgIbLog5B1AtIp1nu1vXYfb13CTdXt+aR/W/LzEsJBKhcfcLk8WceRRx6
2HcumQCtKeRvbw/MowKh17QGaQS48em24vDnedRO+KGmmUmAiu4ir9KGeTR3
k9JT5RUBJgWfXByumkf04acLZfIJwHPid9XFsnkkkWs6JlZMgBiuh77MRfOI
2BLAdvI1ARwDdEIoC+aR63SuPnclATpy1suP7+NY6q5A1moC/CM5zV7Yz38t
vPWGro4ApFavo2n7fN06An+pGgnAFDK/O7Nfb8XOkGf3EwFsQrJSJff1sDy8
e2G1lQACpxzbrNvmkWxeesS/LwTw72dzuNM7j0xbW+qnvhEgYdbnyuWJeeT5
Z3FlpIcAz5odQo+szKOkw/+J9g0QYGji8vUaigX0TkTT8uswAZ7kcZPp0i6g
Qd1b8c1jBFi7di0il20BbdkntNZPEvbPH8bl7n3/uSLqd6v+EMDQmePUp9ML
6Gobo33uIgEiIr62jxIWUMCMUloGiQA9puc49i4soAwam+6kDQJclv++2maz
gH7pVao+JNcBL5K75LmQBXTA8adbEJUOnDlje+vA/v4IPKLO9T6sAw+0tsl0
Xy0g288WTA6MOiCXWz3v27aAZvT3pvR4dUAz96hWH8ciWjLQiaZV04GTr+JT
2FoWEbnx4K8ngTogLv3jkpH2Mmqpu8DvEaIDbPo8Y3euLKNo8W/XzcJ1YDeT
qtzNYxnx0LdM8ETrQHbXO9ueF8sIvryZKkvXgY4HVDLpG8uIWlVKKOGlDuzN
PNT8Rr+COgsLb/rk6AA5awMpn38FWUW+nFYv0QEnHz0bzGAFBerHzHTX6YDO
T5YkraQVpFNDe+pt434/9TbfWfJXEMOpcMfUJh1wnvGkulqzsu9PwKxNhw5I
jC/cJgytIDufTTHdLh24x3QJG/q7giRn7tw63asDNsYxp75vrqCGVqd/pGEd
mKlwiOxlI6FwxWnxwTEd2MaYnvbwkxAx7/rtukkdePosaopHkoQ4OH+WZP7Z
r0e69vm1MgmNhlsshM7pgFowfdQDbRLKXe+RdFzUgXZ3Nu84Igm52Jm4GpN0
oGVtq7fXnIQU+tvLzmzowAKutqRrTUJkOjpL7Ds6QOFvx/rbnoRaqj5I708K
Kn8uR+S6kFC0EO4+SqkLLUk3noffJSGzxOryj9S6sNyPJwb5khDPIbmVXFpd
WOmk/PA4gISm75bJPGbQhZAyOcec+yRUOiV2x5VFFywLLg62hJCQl2numwsc
ugDzfyxmH5AQNPGvKnLpwnjRbXnaUBKilkuXO86jC+QcjtV8+/HO7GOeFAK6
YHb1qrhoMAklsSZUTQnpwouyz8NcgSRk9YBxve2ULiSpyzKT9vUIkyIVSiR0
YV2Nm7NoX++CDbV33Bld8BulUsL3+3n7Pfidp7wujBq5NmTbkVCg5t7GJWVd
GEFjq4OWJKRT4aMEuC5IXx0QGrhAQgwCqz4CGrqQYDX4PFmPhPrjXGuoCbrQ
TLJ9yYmRUMaBua1ZPV0IMCIPJu7Px87dTuWbkS54p5wKU+QlIcnxcb83Z3XB
hc5us4OBhBoaB3f8LXRBi5/HbHp/H8KlTTHrq/v6hTP6rPr2/28yv93TttaF
HlblBef3K2g0qGWP3kEXNh3a2GRjVlDu4v5d7JYumMt8eDd2dwW5XKsP7HPV
hajcnyfoLq0gMrVK8gxvXbA/H2nZenwFWWj+buv31wUvjStJPlvLqILAEc94
Xxc2Wjq29HqXkZ2Rj2BwhC5QXM06Jha6jBpNCuZronRhopNBXfzSMuK6MPR2
JVYXZjLEnaTFl9G3S5i+bYou0J54ksHfsYTELG+zpKfrQqDkIBtFyhIKtc4Y
7nupCwM3ft/8dGMJKdlTuOgW6sJHCnO34ZVFlHm3KV4M7fvhQc8Ytr6Atr3X
rtx4rwuJzKNaDeULyNRfWCjtky5sTwz6jt5aQDQhEe+OdujCxVG6Ron989w9
xmhkaWR/XqV6b9c+zSHNwl6hd2R6sGIR9itLcAallRxaXKTUA+nctzOWtX/Q
+muFatHDerD6VNpK/PwfVPgu2SCVUQ9s06JbFh5OI9bmq64BfHow5/qbyofu
N3Jpe6L0VlAPfLqM57HyKdT2peHAoqgeaDrwls1ZTKF73/kSrM/owdOI6OXl
kkk0NTZVraWpBzbPo2cYXSYQTLKH3NPRA8smGfp4gQmUPK1jWGWgB8eR9Z3e
wXFkNJ//U/iCHihYzmqEGYyjqm1nSlpbPSCF5Jod0vyFmMgyvmg66IH4qcdH
N6l+IacD3xL8nfWgX5brTnDrGOKhOSMyf1cPMj+0BmldGEPh7GuGXWF6oNJ5
noN0bxTFt7SMNz7Sg8j8Ez8vEEdRuneyd/kTPeC97Tu1wjeKKn+oZscn6sHN
i/OZ7xJ/osbIo8oPUvRAQKUxREnzJ+pQHeu8k64HQyODXGzLI2gyPWTbNEcP
+gjk2TUXR9AC0TSWULAfp3hR4kE3grbJhYUVSvSAeCM/2/bTMGKx+XyOs0oP
VGmOP+xWHkbqwkwFP5r0YFsu5MWE2hAyGhiH9jY9SI528vWiHkLmEW96azv0
oMvmYAH5tx/IZdaMIq1XDy7ZukHXzR/I77loUtSgHriE9zZQy/1A4UbbpwNG
9CCRnqGd6eAPlF6abm41pQd5kkJvAwoGUf4113nijB6Yvk8o/xY4iCqZNB6o
/dODqPQ9556Lg6jDY6qUb1UP9MTHLDppBtHgybfazJt6ENP9N7tyagBN9j4c
OrC7r7eEeUrs4wDaVjhNPUmlD5lrIz45wQOIemb3ec9hfXhxkWUm+cYAYk7p
PNNEpw+6/RHB2zoDSHTH3TKHVR+2BSwdppkHkFyxFimRUx/aJo26rm31I3VL
9kfh3PrQUPrymdBEPzJ/X11pf1Ifio0yfO++60c2bpEGFiL6YMs2WPovux+5
8F/9pXdaH5q+pfrExPUjv+8SXspS+iDjK2Vrer8fhT8gpxeT1QdmujEyWbd+
FC/X/ZJLUR8ag1b6BK73o/TfWYp0qvqQ213hxX2hH1Xq6tz4p6kPkeuWBodU
+lHjJufWiI4+GDQMPfst2Y++FPyN/mqgD81GolPFgv2o/zISbCDqw+W0mLrz
3P1ogu5Jbel5fbDPu1TaydKPFuqszr4w0wcTh286x+j60fZt6emYy/rg+UOZ
VeRgP6Lmpbx330ofVNbGM1f2+hBzVw+zu40+ULxlCvDY7EPHg3PyrtvpgygH
o3wGqQ+Jynjj5532+2ESNru92IfkJvV6NF30gTcj4/bAXB9ST+BylPXQh4ra
DzS9M33IfL0+gc1PH5YiTpPfmOpDLhbXG9eC9aHHuCi7f7wP/XYKVKF9uq+X
551s9D6+GvC8kueVPnxIOX8Gn+5DydSFy/nF+nDca8wy9W8f6omplpSt0odQ
dIAgO9+HGP5rvVVfrw9ufz8Ply/1IYOsvnzdFn24EKTH2biv90PlisDVAX3o
+lV4VnajDym1Mqa7zehDxnBxyshqH+qne4aq/u3P78OJSob9/LtneYa2l/RB
eLnCoXSfjyUxZ1NtTR+qfBnWX+/XK/shzhm2pQ/Wt76n0s32ISOeSvn2PX1g
689MfPO7D83aqJoyUhpA42duoYxffSgi76OHKbUBnDf7/bBxqA8J/9OPS6E1
gJrHL3YZe/tQk3R32SiDAUz6/vsQ3NGHbDwtOk+y7j8v7cJB19SHKGrH/jlw
GgDW2KL0srYPpZPZ05VyG4ChUrK98us+pKK1cIrEawCD+aHjba/60OBDTz0l
QQPo5Jf8rZ3ch9iYQ8M+iu/Xc1YPHfDvQxUX6V4dPmMAj63m0wZv9aGzqfEf
jeQN4EHymPLzy31oYfS/8ThlA4gVq0lh0+tDj0++JB/ADSBX8PiOstz+/B1E
eY5rGkBpUmEaBW8faikuw67rGEBcLHW9JU0folRo8J0jGkDllbK7r/t7UaYf
IVn6ggF0Gak/ikW9CN53vPU0N4CHh0Q4RzJ6ka/eMInceh8fDUyJtO5FHE9s
WAi2BlByT4ZuEHpRZfdf6UgHA+AjNS3d5O5FS5c3b7O57/sjT89y7FsPin4R
FHXJ0wA+8x/6Ipzbg8SnqIsyfA1g3NR2xcC/BzncZp8RDTGAzW8/w/N5e9BY
kIwN/tQApge8Mh+bfEeCbPRRLs8MQCfqFUGM8ztyyP9d9eK5AVg1cV9JH+lG
K13JRyhfGYA3ZxH/oHU3ohYgL2+pNICN8iLRB8ZdSLzpC/nZfgMovsnx9uGh
TuRukXMqeMgAHNkMG46EfEVv/wVeqBg1AJvWULPkzQ6kxi6Tx/bHAM6dMGRw
m/2CztslE39sGIAHTmb77ddn5ENzM93mP0OIWO9Z8OdoQfVp0Pr0hCFwi4po
jmU3I8ozx5ab+A3hhFdIyjuZZvT40hdtETFDKGI1onpv2oQyCs/8m1MxhLNH
qKMWCj6iZiMyVc+rhnA1fLaa7Nl7RDs+YJtrbQjthbyd1SrvEdGzPHrA1hA0
03SzW8Ya0GC67YTybUOgjnfC+iQa0L+F9kdkgYawQFb+50gVQixxzwYfvjCE
Wmo9t5KRt4imh/mbW7YhZP1WX9Iye4vI2KOaL+Xt65tfXF7srkJzyfcrTpcZ
gmmT4Y7ft0rUlOkY9a3BEDprt4rIJitQ7cRkSPVHQ2g6mP1+wrkCvRa08n3Z
YgjRbDVmHzbLUXr+ebs7nYYg0Usda81Rjrxeq6pzjhrC/W2RqjaHMuS8UqVA
MWEIUSkKTgKUZchGTlri729DKH/u8OpKeikyqRbkQvOGEH9G2LSxsgSJNh5d
tdozBEHJ9dWUrkLEQxkxq3vACO7P6tZH8BUidm3KcelDRnA9z/gpxd0CRNm2
/pXyqBG8aDzt5CaUj4a/jeXlHjeCW/XS356W56DvzJczYviMYOELHzPDiRzU
dqE3wUfQCNrZZWyHH79ClQNtwQbiRmCz6aJmeicbRY+VX1lQNYJ7hLP9Bxxf
olB+8fMDakYQ4adXYr6Qifxu5Oo1ahmBntC35HavTGT/J1U+3tAI6Hyh7F/s
C6S++IBR4YoRHOrS+/qlNx0pnCGj5r1mBOuSJ0Y6GdOR+B2f3cM3jMBqYYYr
82wa+m/D+e8PJyPoaOs57T2ZipiU/4x9dDECruACchv5VETtf72/yMMIAnon
qX9HpaAVMrNPAX5GkBZOqggwSkYz6l01doFGEB8SdMmn8hkaDTF4bRJiBAdN
fyr08T9DX6jV0vkjjSC63D8liD4JfdSreUobbQRrQx58FY8SUXWkbCQpzgg8
2ArGmegT0SsGUe/mlH1/ltU4TvAl7L+v5uuUGUbwlYnCKyn/KaqqeeipnmUE
3g33LKYUnqIW2z93UKERSJXc/1JtG4+IKpykzVIj6Lq+snD8YDwaYNT1UHiz
H49aq2UqiEMztblu5cgIik+FedhQxSG32P7FhfdGYM60u5ReHYu2blK7ijcZ
wdSFH7jgnVgUoqqw4NhmBKqS8QJTMrGIltnudl6HEXD+eO7QsRGD4qcT/011
GQEh+taPLx9iEFdd8y2BPiPwfegF3bExKCtubfbaDyN4QiZz/YttDDptL+SU
/nOfT4KVrgCPQZXYxb9D40ZgZBxz6BJ3DMJYwhyOTe/7mczN1b4XjZr+VP65
OGsEnXoSLHNT0ciofsru6YIRtD1TflfYFY1649mmu1aMQOd91feNxmhk6aB9
k2Fjfx+2OCQ/VEWjafzulOGOEfwM/B6/VhqNXFhf3XhEbgwJkZbtD4qjUVAD
lc1BGmPI4Ho34FAZjWIdb1gHMRnDLe+vL6c7otExtadjdWzGcOiBdrPsWDR6
yfbJavuYMUi7Gty9sxaNxGZXfiqeMIYsT1OfBMYYVPFewNKT3xj4uwZSwyRi
kEri+ZEKIWPwq9bPkTeJQZ+cQq4snTIGbwfe60/vxiAj9YohCUljGP+v89mT
9BjUyz5x6ZaMMbhRf2FhbY9BV+eYf+QrGMO6/ePnLNsxaKpRw2JaxRhUfEJ3
/CRi0dqtl2bXtYyBL2rNTiMjFgVqdPdl6BqDGZXFoYDhWETNeeDiiOE+ZmrL
HOGOQxwfrS+YmxoDVU/O6secOKR0jO+s8U1jIBmJ/WcwEo8a502+RToaQ2nT
l/xP0k+R/qcgYtttY0jOFAweePgUXXYZM9LyMoaCW91nHuEJ6F5Thr7yQ2NY
zfz7XKY5Eb13O6ElVGAMZznyfjxRSEGbpPlorhJjWC7X2H7zKgXJeDcMMZYb
A6NeeZUUWyrKDbjmsV1tDAdGDHcW11NRdOTLl9/ajMF2kb2Krj0NWb0SovCb
MQZg5X6vYPQC7c0mWk6zEMGaUqt0WS0bpYoHUo2zEeGCZBhZZ2A2UnCxKxjm
IMJczUl2z/ps5LassNbFRQQKiYSEwyqv0NTGQBQSIAKfKEe/r1QO6jjIVRcr
QwT8larMnUN5yFGH0uaxHBFujHZ+fYPnIeqI2cPhCkR44agobuKZh9Tp0AV/
FSJkleVK+03koUrmq3M3NYkgldl97uebfHTugnactTYRsCOTe1LT+WghQVzx
ig4RqDDqWzmcBUj02F7IWQMisKlmPhzxLkBpPBlcqueJEEZY//ROvBDRR0i1
nDYlAm9FLneEWSEKWG50P25GhLXZPEFiUCGyapps27tEBHUfsr+ZXwtRp4Tn
3YUrRLiYH3qHj1SI1J5R841ZEmH6Sr2xP2cR4nM65d14nQgOB/Nj8q8Wodie
WoHyG0TY7o1suR1QhA7gRp0vbxJB51fwHCmtCE0wugo9cCTCQSuGDNHBInTe
l6L7zi0icBb3bn8mFaFPE3H3bG/v+/ePaYqZoRi9qqrsIbgT4cSW0bYfFCM2
Xp0ghTtEKH8ZsB5tWozCIgbERDyJ4EcKOyHlWIzWlx36Ob2JoHKVbMD0XjGy
u7IdTONLhGr9oMitJ8Wov+mxxJYfEbpPvXzBkVGMdCVP/Ph7jwiXnXYDcoqL
UfWz0tChQCJw+Z568qKmGIkeUJf+cp8Io58a5ciai9FsbtjokwgiJA2Lj02M
F6Nioy9RZ2OJ8PvgmOuByWL0hHdh8kzCvh+rfuFZg8XIZYVJlTWZCH1vVjre
tBSj0StZ01SpRGBg4znUX1uMTJpl41efE6Gw/Mh9ipJi1CjZjP9OJ0LwtnGO
eHoxkk42+9v3ggi3rj4YufC4GGUemEloeUkEaYLmE1fvYsR8y1f9Xfa+HoGT
vL7Xi1FIL+2/vBwieNk0bDnqF6MVPO1Zch4RSj2KQ1WlipFNnoTWo4L9ffkQ
JvKHpRj1ML1f8C0ighya0LdbLUKVk+OEK2VEyHN6VNT0uggJGt9ZNiwnwpMd
qtqkx0Uo8e3BdOwNESIXb0zz2xYhr0ciqyfeEeFqtbyiPkMRml6pfsFQQ4Re
h0GxwbFCZH7VwJAcESFT9uPQobJCpCR1O+tXw378W8fRkzqFKD+ZjNjdSIRf
93isDzEUov8oY7c+fCTCvZ1jR517CtB2b8XZ7Jb9/RByYi82K0DIb5PMrpMI
58RPyQHko9WSqYX7XUTQjaagmJrNQ5LjXaPPvxPhaTSKt0rIQ1m6BQ3d/USg
vi5g8fpnLopguxyIjxHBZNSGW/FcDjItRXtsS0QwLS8b/n0pC0WP581LrRCh
7bZVSAd5FmplS/hpsEqEcch1bcx9iVT8nevvbxKh/vhEUPtGJuLTOxHwj8IE
IurOCKrnvkDz44G7n5hNYNHue8eiQxoSZr/1b5TVBMQYGUbZ+p4jaz3zkS12
E1DvefBYROs56i2VqpPiMoGE4rFAWqFUVOv/y/+5gAmQnuTy+5Ano9XSjltv
BU3AneKAK/J7hiQmqq90C5vARMR/v/o2klCmXpzq4dMm4DKgsxy6kYjC2TV3
PGRNoOLir1MB9AmoUU9y7om8Cdhe810US3qKtvy5hvMVTSDJx9Q6hf8pcp5Y
qR1VNYFbffGHS/B4dL4s289A2wS0Twa2WEfGIl79Q9v8F/f5asje0P2NQjI9
Gl3HzE1gDXdOo4YopG0ZmMt4yQQUpo0/NCY+Rg7uG+f3rppAEY1SgLVxJKpI
+Vs0aGsCKzeld7+OPERNJ4VDvtmZwOhgK7mW7kPUX2Jj0eJgAn64Q8P5ynC0
82H4YKXzPtaMFpdOCkPas18tY+6aADBs0t7weYDM7tLKhXuZwNexa0KSGyHI
gUyXNsDHBFjdb/q5+oSgJyyNb53u7fenzJagGRKM+lUqGHVCTaBH7lFTYUUQ
mmla+I2Fm4Bpn/1KnnYQ2iaerpONMIEUKt+h9cFAxHvjlQN/lAloue0l/6/h
Mo+n8nvieMs3aVNIyr4nFCGKMHZFuM9y77UWcW3JLiXrRYWQFkvaaEEq2Sq/
phRSlIpKoUJClC2kFL/757zOnDPvmfmc8zxzcGks+h7Prp09zYBD9zVlBJZE
4WHRtzmTWQxYeVglT4FxGNMuCQZ+z2GA4c/SlNPnIrG8Mlmi/RwDVN7Nmrmb
HsK/Hw+HVV5hgLpQ6blrjw6ggPc965JrvHpoqGtlqh5A2fFJ2YIiBogXcPTT
csLRgi+gOeMGAwbtT8qfiQvD9E1u6/dVMiAnZPLl19gQzL977p/7HQZvnrKK
cF4aghUm7a0O9xjgKhOdeTYrGN8zyVhLZECKo3yeLQbhYFc60/AhA9g3XKxL
6SD85/tcbcsjBlSjwPfKsUCUizH/IFfP02OfT9xR7UDUXhJ/a10Db73xvl9S
VQBanHyQuOoZA2523a/6szQA/a7pas4+Z8D+EdXxM0/9MXpzKP9kMwOoKnX3
3M3+mPG/0k9DrxjguDm0nLy0Dytebkj58IYBTz8NTJ8/5YcZ8o+u/HnH08uB
6NlPK/zQ7wC7RvwDA5pFlQyK03zRommkfXsHA6pkC0O/rfFFOekjky4fGRA6
9dwj8aoP/guWWhXzmQF/fzm/4Bj48N7zSpWL3Qy4e0Rmf3iHN6bv793d85UB
q9/vZdWqeaPv48hDCwd49XIKlW757IUWa4RPKwzy+CY+SJXleKGsb/Et8+88
/4UuIjaOXvgXjRs5wwxI+1b/+KisF74X/NB7ZJTnv+Rjn/0IB8s9A+cKx3n9
rvM1Pl7LwbR7i8UaJxhQHKmbqXSeg74rLmgPTfHu+4llOYtiOPje+e/5gDle
fbfseu5jxEHzEoclE4sJGNUvsP3qzEGZeWPyIksJ+PN0PEg2mIN/yaOGOssJ
0EmQfFadysG2a9IOLAECxF4OCeeWcLBspiokYhUB7suUhApf8+Lb2ablCBFQ
mnuK+2KGgz4FXwurVxPA+TS3/qeKF5r9OlzbsYYAk60aD+fv9kIZ69Wf/q4l
YGrJMH9PFi/f89enJcUJWFA5v/7wWy9sGzcRNpIkoCdXq7xa1BvTcoOs4mQJ
aDknrFhb5I0+w/x78+UJ4IsmlHf/9kYzk4tRtYoEJEu/djbe5YMz35rLFqkQ
MKt2ix053xffGXBeKKkRMM/5woXLbr5YduJfv+UmAsZbRtfcqfdF721qksma
BHyS/HBaL8cP3x09dkRAn4C6d0XNGn7+WNYpk69uQID9aFrm2gF/PK5x9769
EQESrmsT1b33o9n7vrFMUx4fbps8HhSAt9ebOYvaEBCe9+oftAZi6pNZDRkX
AvJM1LYeMAlBCOrbLLmbgAJnIe3Q9BCcEG/WFHMjQMO9epXWxxB0DjqnvdqT
gLuKn9JfHQrFjRLbt/L7EzBpyTwfh2HYHHTQaPQwAdTjNbUh7AiMl3CDH9EE
eHo+mJS6EYE6DVbGg7EEpDXtzpqYfxDPS6w17U0gQKBN0vr39YMY0FBl8T6V
x3/Z23/3vEhcJTmxqyaPgGefLTyY+VFY19Bhi+cJkErceHvrZBRGBNfaVV8k
QLLefOaGZTR2NWQyKi7z+rUsp1h1KBpvB2+mC0sI+KLF1K0UiUWO5DrmlZsE
DL6Y9/LH9lgUezqPlV9KwDrVFv7GvbEYL/mKnVfBs1VKQx1LY5F4ut854z4B
BqKNRUyzOOQLYbocf8CrzzXxl+u947Ba0tA1uYYAlTHZ6vCUOJQLWbEnoY6A
pGLhn4dexeG4ZMneiOc8vpN/92WT8Xj16UmPsGYe/zOP7a3B8egYEukZ/IoA
uZsrJz1PxOPjpzu99r0hYEPshFbs83g8GfLNd08nAR9l/DwW6nFRzOJQEPmJ
AGbJ/Y0zBBfz1y6LsOgiwFYjct1GPy6WoVqiWi8Bp99FxG3M4aJeBqZI9/H0
3koJ/bzJxUfutplCAwRcimob7qrl4qvFgRemhwjgpi+tkB/iIrt93tWhHwRc
f826HfCPi10lJ0o+jRCwMzxRvkUgAb1j5Mpfj/H2D3afspBOwBFG+b26nwQM
nP1f+tNNCRiuYFZzZ5IAv197zpMGCTg79eZJ8S8CAnxlrL/sTMCkZ54vzv0m
YJO7lUwIKwEF8qZaM2Z4+63XF866J6Ck8dru8DkCdhWb/p4KT0C1vm3DzgtJ
KB4ZyChMSsDtKU4zJotJWJyU/GjkRAJaa0Txb1hGgmfb2Y+F2bzv3aEauUkh
EoDskO3JSsCjdQsNHomRsK/cZEyHm4BZPoo7r0mRoN5jHikUlIBXBSxZx+VI
WGvl//mYQwJu6m5ziVUg4f1FoY8V1glYVe7tEaJEgoKdWuDB7QlomPTbl6NM
gl4Nv3yragLWs5ODHFRI8HKbisF1CWijKh5ho0ZCzwVTQW2+BHzz73q00SYS
ugYM3TTHuOj8anuipgYJN4p0/pS3c7E3/0WKoiYJyXYHORWPubgvzDVzrTYJ
lZa0hnoRF39ajmQv0yEhZm5tj3QaFxf8WHV1bBsJ6H5CiUFyMfnhpZJefRJK
B3peHNXiomCmZnmbAQmWX+gkBSEuyuhSNWhMguLQBzK8MR4Ll3x9UmpKwmDL
kSj5y/Go0Rn2osCcBPPejG65w/FoFJfVfmwHCW1bh+P41sfjE1K5+7A1CSeY
n1u6f8ehrdK9/oBdJLwgPI/8a4xD16b2CZpBglCej1mvVxweFpFaKedAgrRn
/6bxlFh8cXuJo5ETj0e3vEfDOhalbCcvO7uQMNUxlLqNPxYfJj3Xy3LjxRcs
2yn+XwwumD7EWe5LwqWTA7+k/h3GI+1tOHWIhK/+6Uk7tQ/i+/Ba/tVRJPhK
cFyTHkWgsvAtcnMMCRGe1X4K9hHYaJ30zY/L08MNiYyYoAO4HLVFulNI2OmT
1nW4LgwzL5zY15RHQp+Cw9XBomD8oh91Z+A8CXyZl1U5NsGo/d57Ad8lEkJ1
glIUR4Pw7SrIhiskFCx/aeqtH4Rr44drK2/w4sc+Gc14FIA+Uu0CrbdImAn9
5+EkFoDV1fUOo7d5egnT00oP249OP/NGVKpIWORlVSqv5Y/nPazFLz4gYagC
hk83+uLIPF0O1pCQf117AnR8Ec7J3W5/TMK3nZq/dS77YPfb3xYiDSR8Zzxv
mUjyRgXLwuDklyS0K/In7fLiYNGGRY2hXSQMC/73WybDHVskjGf8e3j1uu5Z
rq3kjn9XRql59ZIw//M5YeEHbmg7NZHmMEBCvMOz/fI/9+DE417ScJQEtrK0
W0SvK0pVySTqjpPw4BMj9JyaK1oWOVdpTPDy7ReIUIpwwdz0N2vlp0m4FnWm
wHqdM4Jz3cfF8yjwKulu2sJ1QF+7eSvnL6BA+fO+yy++svGkyXb4s5ACc+5u
oWxrNvYpV+R/X0wB381v80pkWJg6WeD1eiUF3ZFZPvKjFFYNfM5uFKTATcFj
U4EfhZ87xBtrhSlwdQnbqDBIoubjk2pVohQErnyjJjhK4Ps07liuNAVy7keD
BqUYuCD+odwpWQqeHozZ0XDbHlXDZsjj8hSIGGfPC7W0x2inkKqY9RSUtuuh
1ZQtFtre6o/YQIG2dryLrqYtvjYeWhusSoH68sE9p0J2oYLy3kgPdQoW0tNb
vPls0Fb8QonLZgri6RWOT1jWeECg4yNTi4LTP6WT3G7uxMYJAnboUiCvJH5W
0m8HBjwyWbTJiAIJ4zA9UtYSsyuiddYbU/B5EVcGzlrg42vVXjKmFHy/YsVe
LGaBq9M0G4UsKQjOfu/2U9EcDeP2zyzbQcGCQ4JJc2Vm6BVarLbImoJjzM8X
K8zMsNpRLv2XLQXtUqK7B8JMsXeXa82oPY8/d4SyFTHFFca5Y98ICi6p6/Wp
3jPBPeuFqE4mBcyGBbESAiaYLGab+JZNwUaHkfY1D42xfEVyVbMjBWYKquGs
UGPkm5i/7pErBa8S/IUODQFOl2an9e6hYOxYib9hIeCQv/p//HspmP/iy4Xn
PoCfVJ4cVPWkoCPCbHK1BuCrfucRWy8KPALnQlZOGWGlW3L7aT8KEnRPJzgZ
GGFux536zgAK9HLPascXGqLHS6E83wiePj6axQT3GeCmWv/g6VgK6tIy9vEV
GuB01VOrpGMUhC5aLeLx1QAfF8tLr86kYOqMx4nbZwzxmgJjqdMZCq6GFiq5
rjXC1PPRk5dyefrJEf2zusKI138Rv/o8CmrPLe0sWwQYtLaka+A8BW0sdy9/
bUBm5ocm9QIK9Dd3a7XnAlrZBRqTVyj4csV3hX8LoP7yxXfCr1Gw5aagWety
Y5RJ0s7H6xSoKET9bj9mjEKmTaLdNyiQ7i9Y5fLcGBfNcz/+XykFIQMllSGC
Jjh4MD3CuoKnX3uVdukCE+zUURreX0WB//L546dHTPDlz/t7M+9SkHg7+qmb
oSlW+A/afrhPAb+bVs//ekwx2s1c0auegh/zvkg+NjPHQKnO3OQGCgxvMWI3
5Zvj3o7gVTefUbAib3RByHwLtKIvzky84Omvg5tjXm+BQjtmXse/o+Bo7h43
hz1WeE3jdvT5fgoswqb5ot9Z436Rsd93vlHgIGPRM25pg9p/NMJeD/Huy/55
P7ZX22BNbanff6MU3IcHMiKXdvHmqVK27zQFPU/CxraE2yF/1C1NnSU0qOyx
cM7LZmCz28gNu2U0pFRyKxPeMPCUhfoGnxU0pI5HPdmzikCZVbek8wRp6H9a
zHp3hMCtBTeXLxCjYZf/2Kb+UBK9n93oe6FCg1lDWpC0MY2bbv5w61ej4fmf
pqqGCBonMjd+nKdOQ9v1563fb9EY63yjVUuLhhFVsY/pEkzMHimpydGnIVxl
TMFnmImub77rlxvQ4PGKllGWZaHCPbU7z41oeGoYx1UmWVgaX3JjzpQGjtim
Zy8rWPhUpCTX04aGneTQjgF/Nqb9GRKJsaVBrfZEZE8OG6nPqiey7WkIs1hw
paeOjV2F1480UTTcVjNd3ybqgPuCVaNn2TT8tL+9J5njgNP610M3u9CwYdau
u6bUARMWqfp5uNFgESO3zWjKAVe9LHbL8qRhu7Ta9DMdR8zLVmE3+tDwVznw
pmKwI25wL7b9509DYv/Y0JpCR7xsP/SmJYwG6+r3rJB/jihjpOZUGEWDrrTf
zGUDJzy70b87KpEGe5/lnRu8nHCNxE0v8jgNlUPSczERTnhi6cgP5dM0xP7m
91UMdMLlv9VDZ/NoePJVRS7bxgmP9Af+ab1Mw8WF39SYy51wwbvbsUUlNChe
vZr+8YYjwq4W01OlNKwhK+Tf8Pii6sb5Yipo2CfTYFei7ojV+sKNPndpOBSR
8mZLLy//Mq3j1H1e/+tvBEOGA2YN1w7veECDwZII0cV7HVBHhbI3qqFhXXD7
4FktBwy5FCqsUkfD+QH8J9rMxuH0ypy5JhrudjpOlfaz8HiTOU/fNEg8MNaE
QhaqLX7nPPiSBgF1fxd/Dgt9oqek37bSMDbR73asg4m9+3SvFnfQ4J7w1Fy6
kMaOHffK6CGef1EHe2ADiSZ2l9lhP2goW1rZqvCBwGIqffbUCA3KaUUrao4R
eGi35843P2kQK13ayzfCQLEwwR7iLw2PyftS3Gf2GH/o75HgWR7f3agz7lx7
HIzp35g5jwntRddEjxna471kPPj6PyaUNt2pMgyyQ/ZFH0H7FUw4FVD0Xv/A
Lqy5Qt0JWMmEzC8tnPpZG1S+buSSLsiEnWbeeTeO2uB0pUhRswgTxHUUrOIL
rDGr6RHskmJCy+PZojMTO3D2VUnfPhkmaCRciQxI24Gcd1mpqXJMOMxHHjug
sgN1uv3fNykx4dLdlQX/vK3w3dS6wJ3qTIiu3vhef84CDf/+t8Z3MxNm/ZQz
B4os8Or80f8d0+LZZXUSp5kWGL78yeJnukyo9lMffltpjiJywRcsgQmnA4aO
2aeY4eH1LuZeJky4XLHqNW1uhr1qVkNJZkw4uDc4SnW+GVboSuk+sWICv89W
e41oU6R2NTabMZiwZub719+pJnifqAz1IHnnhQvv7qRMUIF9USyBZoKrhmDL
bikTnHAP59Q6MGHBs88jm6uM0dnbbfkXJyZMOLc9DE0wxjp/m7IFrkzwyPnZ
CpQxnoyQmzV25/GH9Qu5TPN+m7nTO+I4TJDUYhqz8gE105pP1/gyQehK+885
BmBLwaGNRiFMyB6XDjDkGiHpPGauc4AJdefeapUsNcI3q71dN0YywXxgH3U/
1xCZLz6FK8QwIaq86LKsliG2JdLp4lwmyHTbTae1GmD7lEnNkhQmaH7rn7ZR
NcBOL42xX5lMCF9OTaRe2I5dO5aRb/J5/K0K1I9Wffyq2ldRWsaEt2eq+T1d
9HF45GyETwsTtqSu0d4vp4/T5YztcuNM0O5XmbWj9FFvMsdRX5AFWQrWYYsd
9fGwTk8EpcECtYzKL9n5evjcIrRGbCsLTC46lSpY6KEki4+/24gFB7dzyuNa
tuF+r2y7a5YsSDy51dDXfBs+OKCS5W/HAsU3W/Kz87ZiX8zPanuSBWeThY1W
G2xFgaP3P2mxWDCu9kij4a0u6mQkLhB1YsGsjN8jb44uumbbKv1xZcGZ5wb6
pcM6mHRRdOdHdxYcP+05QO3XwZuFXf41HBbc6xYQFvi6BefuBlcm7WdBZ27W
krNV2tjJV5aSH8gCfm7kx7Hd2lhNjbk9CGbBzew9hUVLtTF0NEBgKpwF3fca
zDQ9tHBgvb+XZwwLZr4MLHRYr4n1YSUGcXEs8DBRUtrXsRnza4eEz3FZcPVG
hVFjxmZ02e1b8+YIC+rElkg7z2lgyxmvdWYZLBh4/GliZZs63uq9OrI7k5dP
gHKSFamOqZp99ZGnWJD6S1F68PUmtGz2CC7PZoFWeP0E491GvL/IvUnuEguO
0RSf6IwqXgl1jppfxgK+2/mxx28p455VHRu2VbGg3eZc7dDYehQrcXgXWM2C
bduiDwVuX49pX5jqXY9ZIMWnV7jtmyJaxbztEG3g9c97K0PBWhEXilNH7ZpY
wJX0aImrUMAIgtH9oJUFZYnJj7rz5FFz+OXxqTYWCFQXuiWLy+OPY7Z6mzpZ
0Gimbzh+UQ4LFV/0eXaxoKmPDPyuJofuj6xPnutlwfc9/wnaPJRFCZdGo7cD
LGgLcd3Wy5LFd9NW35f/YIFtV8iCo1MyvPnawvzwJAu6nop2GJrLoFxtgq7T
PxY8uNZ5J95LGv/QtRv0FrGheDpSscxbClsG5kusW8GzZTea16VIYnEkCEyv
ZkP1w5UuQc0S6HgJxysV2LDkZf/xqCJxXNKg1xaizYYsgfnfsvvF0Ftoy8UR
kg3TONi9yEwMG1zUffxC2HB0RcXLZwwxjC17mJpxhg0Hv2R4ZMaIod5i+9LK
e2yYs78/GL1EDLM2rzWxamLDD/mR5kzGOpxw6mpt72SDfEPzx3SFtSgXVCdx
+Ssb7J2E23UdRZGRVOjpP8yGWqtmpTU+a3AgQ2xpyzgb8i6MD810iWDs2dSb
Or/YQI39qJ/dJYKiV2eJszNs8Fo6q33v1mq8WRr4a26ODcNVe+7VL1qN/wdm
rv8f
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwt1nc8V10YAHBkRiVb9sieZf7QeWwRCZlJqVARSVJUSEaiUFZlJEJKZRUi
Epk/UdllJSErI2W85/L+dT/fz33OPec+57nPuULOnhYnqCgoKDooKSiIq/Ct
lYwU/qo9GhPGYlT+IaiEXlLAwy0VjZRcLO6aj0RVfs8eSbjlI4+ITzs+5MSg
WoWzrrRulYi0c0D4SW8i+nCzzWjelYwKNy0rxJhloOkQph9+uR/RYgbpJ9XC
I3T5Xb7kYlo7erNvXGpTQhaKh4Vnv6M6UD7vXBZLbQ6qJ117PeH6DTks9jCx
9+SjJ5qsV5Tz+1E3fVfdx+znaKbneKpP7gC6rx4Vjo6+QFd20A/Opg2h1nl7
89L6lyghwcx1KuoHCryaUWx/qQg1xPScHXWdQnbXDlkJHitF4Ynx9XGK02hg
e7J59nwpknFD9rvzp5Fj3Nus+etlyJsuxt87dwYt//Lmo0orR6v6ShXTab9R
1T3b5ubSCpTO3md2m38O6X1P4zitWYmv17/J359DITnt+tvKK1FkSAeFZ8I8
ulk4F/He/i3iendJ91fUIorgd7fdvrcKlcWKfLrJ+AdtDso7fTy4Ch12bjou
E/EHrRbwiHeWVqFHlPyhp0OWkLKQ4xl5yWqkCFUffl76hyYoqVcX/1Uj4zd0
ZiOua6htQcEwJ6AGKa45z3NMryHpuaEleFqDbgo6tYhoUkBKd3MFY18N8nEu
PW9VQwFRPV7iRqT3SG/Eq6boEyVsM/usVjj+HqmF8XO1cFFBePreD3s4apGM
RNPpkUNUYJL/oYkdahHrKXFWzu9U0JGWdr0ophYN/uo76je/CW5wWd5ikK1D
X6Iji26rU8N07u9JQ4s61CCvzpBzmRr2B3cx/vStQy/P3nneRUMD5m4n9A5X
1KGgeeM1EgctxJi4X7E3+IAEV0rur6jQw/x+ga6HmvWILeXENLs/PVgmCkfK
2dUjesSqJ1dJD7cyh7O0z9ejqcAz44cNGcDwvZkUbV49qqDeSXprsxmCD+6N
RGwN6GVmW1Tnvc2Qf5FXW0u2AWUZBA5Mf9sMzaWpJz7qN6Do8J5wITdGKPnj
NPPufANyZIrtCPZjAvmfSceoPjYg86dI+l45E7jQHzw1NNKA9Mx+XSmg2AJv
MqsY3JYbkMxtI7Hh8C2gni7A6SzWiJZZ13z0k7bCZtmEIF3fRtS8RYWB2pEZ
pBcqDk/TNqE2E5bElgBmUJ0aKEzmaEKdEZNiSfeZQSGQwplOrAkN0zzWk+tl
hperh6Ok9ZrQ8gpnoK3Ddpjl9PAoudyEqDTntor4b4ekC5bBUZFNiP5S64Nf
ydvB5tLKgkxSE2JdCC8L7t4O1Pc++TQWNCGpyaWFPDsW2NPXmJAy0oQUZL5c
v3CRBYqlM1Q7ZpuQyqmXbDpJLKCsPZ76bbUJ6Yyc2tXRyQKbyi/mOnM0I7uv
PR6Utqww2ajbpK/bjMJb3gwftGYDldZFX567zSiaKfmcoC8buPmc6cxIaUZ3
jH2pxu+ygWezdiJtdjNKrZUTDPzMBnaizImOpc2ouCLVIdeKHTJvb/13tK8Z
lS/7j/n4sEMWnd215u/NqJpkexHdYQeBLekfOSebUUsxc8Kndnb4Z3miwni1
GX1/FtS2asEB72ucmlT5WtDYhOPRem8OWH6o6vdYtAVNS5Gm42I5IEuPa2hJ
ugUtZ81ukWzjgH/8tdlGpBbElnpsr+UBTmin3HQ76WAL0rml//bxfi4IErWw
OBHWggKNC3PaznBB5w6fYPaoFlRBIxK3EsUFQnl78vNjWxApgMLFsokLXGgb
TTIetKDdJ8sY14y44dnJZ09uv2xB3qJS85Ju3BCptak3qaQFPf+W+NUqjBsO
ldCl3ypvQTLWvi9y33PDqHnHJp3aFiSqq2hjrbMDXi7vfVLf2YKcV1Mh6OgO
eHJrkhX1taC011ul8gJ3AGehtVrGQAviVZhYpqzcAQk7btaqjbUgdr7HD59q
8IBY516PtL8tiHaRd5JamRdqSI2J8VxkpPcyskPeihfUE3mM2HnJKNjj71v7
c7wQb5hxLlSAjFaHOuKev+AFP4lYfm0xMlpsjVU/JMcHD8a6nfh2k5HKTUqR
MFM+6DDgSVJWISMfQy+ml+58kDOq1KGtTkbTb0y/0T3hg4rGQk5VREajufTX
C8T5QbRY5mGSMRmJuVw489WAH7K+B/y1NiWj40IjNgwu/CDPX13NYE5G/Qnv
pJwe8cPXV7pgfpCMukKutG4WEoA/vWz/jjuR0Qn5v1sUtwhCeMSD5uazZLSv
JyyTi18QjDwudQr5kJFSGLsWhbwg1HnNC7v7khH1NwV3srkgOJ1KYh6+REYP
o10bPO5gyztfO3GNjG6Q5o8ezBSEm1xLlZ7XyejsSPCSZrEgSBl99jwbRkaw
J0WCqVMQjh8frXaIJKNvvz6F5vIIQYPN/Dw5loxqk5z5Y2WEgPw19mHSHTJ6
pj9ddFFLCLiX3jY7xJPRlQeM342chGC7+la+hiQy4jXV0f3xUAhESsWZLNLI
yC4vf01EShg8z3AESOTh+Wy1Ehg1hOE+X9dg2FMykqBulPttIgzRztlhA8/I
6I/DiGO1hzCsnj45c+0FGcUz8pUfeSEMW2PUpsOK8XwluZZG1cJggzTHy0pw
vo6pjcu3C0ObZ2PX2CucnzLLHWtzwjAfXjWoXkZG7adu+D1QE4G5hcDelEoy
KuXgYr6+VwR6th/My3uL81Wd+djdXgR4WQRYiqvIyHtH1ReNABGojEqaLntH
RswNi0rdlSIwXTQycreOjEwlT8xwGIpCGL9Myu0WMvobeb6sz1oURsa02SzI
ZJQ9ef36IxdReHm7Ip65Fe9PYRb3rlBROJEq+zvkI55/z6i26XtR6Eu9rbDv
Exm5pf9hZPssCkxT2bCIzU7N8KV7WBT8soZfpH4mI696yVNu1DshQ7/72+gX
XF9Wp2Ov6e6EhM3GwY5dZPSp2P+QseVOWD7CUDiHHcR9U2z7sZ3QvZUtIaKb
jHq/5pWmBO8EJ89biXk9ZBR3cnLwddVO+Jp4wbuzj4worp7dPY3EoHsi1KZl
AO/vQNBK8X4xIPstBOoNkpGDXmzdZScxoL+a0PsKu5ihwIHxqhh4z7ruvT9E
Ru535q6JVYjB2ST5l2bfyWjHIrXZr2YxcOZqki3BrrNj5yrsE4PiR2+28Y+Q
kbCASp72ihiIlM/x/8Duyrnw6ZCmOFjXULO7jpJRKFN4isg+cci8ec/jHbaS
Z6LbmIM4xGxTdOT/SUa3lV4vX/AXB3aBeO5WbIPKv6JxpeJwV68lSWScjF5+
uny+Xk0CQjX5+qN/4f24ftx5cK8EqHY0MvRhp6iY7P9nLwE7awJGJSfx95HI
JSl7WQLUy0d6K7GPHSrovV0lAbr6Xrv6psjIfktyfU6bBBz2pUoWmiYj84rA
4uohCbh2YMu349iagma352gkYXqHLdsoNtvwqK6tsSQ4R+3PH5gho813yQpn
HSRhIF0plG8W59ugmO+GuyR43pA4Yos98fjaYlm0JKjeH5ZrxH5/mv+JQLsk
rBpNp2b+JiPf35YsPxykgC9bhVpxHuf7EWltzV0KTASsPh3Gdj4oNMF1RQok
igSGIrHNSibfG6dJwValhx+GsMX9Iy4+G5YCO+DZFLlARvwyXi5181JQnBXD
XYDN1mdt2U8rDe3GT653Y1MgUVkWSWmIfSJ3SnyRjDqpKvvPe0gDwymdwtfY
LQWZzdFXpCFs8EZdL3bN8Zulj29Jwx7TJwZr2C9q7e50vZCGe9WWMTp/cH5v
zBlqLUgDxcjp+GpsDRapfOqrMmCo9cs8dwk/j9K+vvmWDBiPyeTXYB+ZiRiK
T5MB97Gh1K/YIa0/OSWrZSBOQBdt/4vjo3MCTWlkQW31TsZZ7CNXupI5OGRh
ZtjxXTj2rAdD0TcxWei7Wxicis1pevLnWSNZaI+JH2kk4hklLeIjZSG7Os9L
8B+O/2vr7nRfFrYX1r1Wwg4ZCw+VeIrvD4Q/M8LOqR8tLW2RBePLHGmeRHxY
tsi37XKQG7G57jURTy0xL54oB5YKqwDLZMQxZ7NtJlsOHtpx9+7Hzh4Kkyx9
LQdqB7RVnLCbq3847uuRA4qWfOnLRHzQ41ovfnlIniGrFBPxXh396vLygM/A
kXfYGkfo/lGBPDwQcT70EfsIcpW/e1Qehuv608exc1bEEl8/kofx7xJP+FZw
Pf6yfhlcJA9l55PzJLFbekObTGrloXVlc4Ay9mzZCMXXH/KQokURvg+bX6td
KYhdAc6f/nrSD9v1X+yDTFsFmG8Po/yAfcds4t3FIwqQqZ2Q1or9Nl1/zNRN
AdZoxfm7sLmM/qgsXFAADr/s4p/YH+44thokKMCZbXanGFbJaO5H8cKOVAXg
sY7ZvB1bUIOZbypLAZQKGKO4sP0Gqk8mFCsA0+3HJHFsSTmJTaOfFWB1Kl1f
F9s6KEiyvE8Bimm20xhjB3/q3n/7uwK4Hb+Ua47dfSnqvtq8Ani8Tcx2xL5R
N6scwaYIhyRT/X2xx4+8cZOyVIQequf1GdhchRy3Vu0V4Znf0PYcbD06r6I2
Z0XIbY/Sf4Z9/6kwlb+3IuxPzvJ6hb3vb9i9xhhF8Evf962RWK/pQFVqkiIs
0xy72Yr9KI00ei5dEa6OWYt/xl42+KXE+0IRynd2iH/Ffhpn0eLeqgg3qdXt
p4j1jjyZg05seo3Lv7FpSTQ87P2K8Mdrx+1F7MP9Ja5vphTB5OjZ0DXsrbJ8
lFu37QJHp6vlW9fIyLP2x+58011gWccXIoX9FvJOy1jvgrxWOjo5bOYyr4yc
w7vAS07EXxH7ef4SyyPPXWBB36Wqhj2byDibGLMLWPjyGfSxdVhbJTmSd8GR
FzG8RthxUXeOxj3cBQa9/sIm2ErBfB+jCnbBOIcF/QFs39Pyz4M/74KMH2d0
DmHXfv/9Y61vF9ww7Pl9GJvzyCuByyO74ALLUtJR7FdW2rcuLO6C6uHfNS7Y
S1qWZ9y5d0OtfVyyF3YA8wUZa8fd8DSi/2QwdtMNjePtJ3aD4TaPSyHYfDQU
983P7IZTv6yDQ7ErlsIZTa7uBtG+fr8b2BRDyWMofTcUbdlMHYtt7ugk/CZn
N8iwCbXHYad3iNiTXu4G5cd3ku8S79uUV6/0bjfoSm1hTcK+VlSRLfl9N+g8
znyaiv1J/lp/1q/doM6+STcdWzTXkEt0YTeYXyn8+BC7JqU1jJ9OCXYuRfdk
YtOGD7qwSiqBnsG5R0+wb9jT7lxxV4LChE6BYuw9CkwLP32UQEfWWqcEe4aG
pe5LgBKcm7Q+8grb9gXfyec3leCEieStUuyd9MpPj+UpAftn6tIK7M4+0hXz
QiUwkr1VWol9swD2a5UrgfsR6ZK3xH4e3jfD0aQEEvn9j6qJeig6ptwwrgQ/
eMStarF9Ik/SlvxWgiYpXtU6bPGjnh0Z/5TgO+kBxwfsaCb/i5cZlUFixqux
HtvhWOwbBWllECl5sKUZe4G5Sj/hlDLYvqRebcPOHanlCPHG91eZ89uxHcub
fnhdUoa5O06On4j8uHZGGN9QBh6VmRefsWMqpppXcpShYx9JsxNb7858ytgL
ZeiJzu0k/OfkP8+O18rg/eeVdxf2YXY6lhf1yuD5jJzajS3jzm99/KcyKCW/
/dqL3a8tKn5gRhmObVl16yPqlVPqj9aSMuwP5Joh/LdaOZmTQQU8P2769xX7
A7fp1wYJFXBhv73Qj32szt9F0U0FfjJ6xA1jH9cUM1vwVAEfF94Vwi4vWpXL
LqhAgaDaie/Ybvd20uiHqcArh3qFEewznuQM2ywV+Hd1qOgHttfwxUi+Zyqg
4B7KOop91k703GCRCizRVnoS9tG9qOP+Ho+fohH9iX2JU2Tg6jAeL+QfMEbU
/83mD3oTKjDEcYhM+DKl33OGORUAhmXBcezA8aarcZtUoSEq6i3h0Epf/sfC
qsDPcHNmAjvWtcGh5Ygq5FAZCkxh3+n10Y1zU4UXtk5HCN89ICBt66UK1CYB
aYQTNXz+DlxVhXvtH/mmsVO28SfNp6jCEt++LTPYaSEfAkuzVKFu7acB4fQl
b7erz1RhjSf7KuFHQ3WqDBWqUNEWO0k4t+TsF94+VTA9c716FjtPhrdiYFgV
WHWj5wk/Ta/NzJpQhdK0DvHfRD+K5DmvsKwK3Q+UbhAudnrPqsejBoWKVgZz
2FV03AdO26mBpcXWlHnskQw5466jatBqEFJPmAn0dA1PqUFQo/YcYVs/T2UR
fzX4G5tiuIA9Nfqeu+e+Gtz3kxkhzHa9h2VvphqwmMowLWKThGYYS56qwfOm
CEXCoXa8q7EValBDdfISYb4G70HjfjWo9lem+UP0C5fwnlejavB26boYYTeq
lE9iM2pQ7LTPkHAhqb6Wikodxlx0wgibPBF4UiqiDj+W6CiXsC/ebDon5aoO
DJMP+ginSAy6J3qqg4a53CLhmprFE7R+6vDxsQXzX6J/rwjbDoarQ0jpYW3C
jz0uaibnqgOfaGkK4SaGW8r0BepgZS1cRHg285Gcb5k6FOnJNxLe85UsaNGk
DuP0mguEP5uJ0WyeVIcqVh2jf8T3MaaxemFBHSYZZxwIC4YdWPy+qg6SYmae
hN0rA35WbSPBm3OcdwlvUmhvvqhIgr82dH2EFbcHxv/0IcHTk8eclrFL6Tsk
6gJIwHQ10IOwDoVc2aMQEuxNcvEnbDXV883pDgnkSXHxhH2bVSW/FJBgzCq6
gfBaTXRZQRkJ5vezdBAOL/9uGvOOBNoHXIYIJz2J897XToLU/MB/hMsjpsqq
Z0mQ1B0tuYKtH2RglvaXBE20GUqEW/we9F+m0gCjxkhE+JurCY06iwbsdOmz
Ikxl8NgsX1EDogdvXyZsROU0cM9LA2KnX9UR/rhUdO6inwY0sRxqJWw/w0Rr
E6gBb6y+dhI+3V8qxXJbAyxqg34Sjq7g8AnP1wAFg/0Mq8T5V+xB61KiAQz7
FpgJpz2tSdSt1IDi6KtchF/c936z2qIBvHb4d4c4by610J6f1ACqUQddwo7e
O5MsFjTAtVTAmPDIyQBphVUNqBj5YE540VbKfHyLJrT1NDkS3qEamnRUVhMu
8mX5Ej7yW0vGzF0TrtPOZxDewkLR+slHE/7ZPc0hXKpQfc7hsibQWpjmE2Y7
Y1DmFq0JPZn6pYQ/jJoZX3uuCc4cwmTC5+m2TzK81gT3D0KfCAuLtcfcrtIE
GkamLsIBx2y6HrTh8SXpg4QVvjq5vZrTBLqxnjnCfctCTGhFE1zsSUuEb/AM
57+n0YJ9hqErhIdt3RbbOLQgk2mUZo3oT+1eob/UtMD3ah87YYr6oEfCl7Wg
+8m3XYTtaWkn5KO1wOVclDrhQt0bu7VStWD1CiUQdquIrbap0oKRPL19hKv/
cWw+0aYFQXOcFoR51e8d8B7SgjcNr20ItxZk9N+k2QPPPM46E5aaEZdI5tgD
T50iXQmHyOV5PhbfA4NSAe6E1XIKV6v27oGQhLHzhNNT3vMuRu0Bt0ilMMLR
8UdovfP3QPyHhWjCl6L/TU207oEMfvV4wi6h8V2us3tg4s6mB4Qtrii+G2RF
0LjrcAbhPb5NeY7KCO6tmecQlj7jGt9pjeAV1fAzwtSHH5xsSUJgWL/5NeHp
g2qWe8sQlCzkviHca9quWdOLIP/MchXhD/pnxNAqAs9bm2oJd6dQ0/dtA3im
9r6ecG186oyNIkBIRmQr4YJoUk+bBcB4nu8XwjJz3ZJM3gD2efY9hB/Z+fvp
xwCwlld8W89nJU/dlecAAqceDRG+I1rO/ooMcKWY8cd6/qaWX0pt1QajPxcm
CPuUapk/2KcNqcmF04STq8+ms37SBsrc8gXClQ2ZsxEOOqAe4fCXMFvEVMdS
lw7sdcbtBPukofqbk7a60PG7bYUwlZ/y61MDujBbWLRK+H62YtHpU3qgsffM
GmGOlgs8k9N6UMu8lYKCohXF/H4T5HVBH8rvWK1bk8wdMDGnD3tdAtY9knve
183bAG49CFz35z/Xws7/NYDvfTbrrjGITQwONoSySlj3oHGxVgSlEZhu11k3
5f7uwVuBRqDObbpuCiOjWc4VI7j/+OCGtYsp0y7uhZ3+5uvWy/si/prCGIxN
ldYdzrlo2hZmDGMrguteVpOl/05jAtnXuNftZX+sevGaCXQNca5bYtIk7h7T
PmD5suGBIKXj6O4+iD7Atu5Lm11Tj/OYAmJiWjdbXFJ3RLop5KnSrrvv40BO
Nr8ZnFugWncWs9TFuntmIOxMue7CKlGnCyL7YYllw1XeAvriT/ZDRMGG1yYS
nEbZzAFlb4xPEUzj1bIyh87rm9b9zKw52iLWHNJ7N/wm4C+FW6s50BtteGoo
cPU96wHIH9l4npAJ3bKIzQGwW6RY96moxHerdw/ATp8NF5IlI7s+HQAp1Q0L
mrB9XeayAAX5Dd+sXVUQdLQARtMNM/PNmb69bwE3fDccd+7nqSO9FvAxacPh
NZu0qnZYAs+jDQew828TtrOEIyEbjk2NcW+8bwk5xhvOkaRp8Om3BKGdG+6M
vjaTLGAFgts3TDtHyV112Aou0G/YOrarUT7DCsz+92OFF1dSfljBxJYNu9U/
HWmWOgg67BuWdM41W/E4CDk7Nkz15UVgTt5ByP/fPXtfvzw4fhCkWTf8ZYHb
y1jeGgIZN9yWcUkWnbOGQboNf5ceKXz+0ho6aTf8p+CApvCsNXz53wEqg35W
CjaQ+7/XXnkXhZ6xAXmaDWf6HLpM+dIGODdt2ETBQD9g3gY2U22YoY7UcU7J
FvIpN1znKH/y9DlbyPrfJDrz50WvbSH9fz977rW4tmYL2v/7P4I0RBc=
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], Thickness[Large], 
                LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], Thickness[Large], 
                LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], Thickness[Large], 
                LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.5,
          FormatType->TraditionalForm,
          PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {
         Left, Bottom}, {0.2, 0.3}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{
  3.5680626321567297`*^9, 3.5680626705099235`*^9, 3.568062702019726*^9, {
   3.568062733319516*^9, 3.568062766697425*^9}, 3.5680628221645975`*^9, 
   3.5680638380497026`*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2DGDwwv7UxNuFL9Lf28P4XnvZ/Z6l
/4fzz/KacbLECjjA+E79rgeW+0vA+an6v3gNeRXgfF/N1I9i7ipw/qYrtaUn
LTTgfGshrfUs9TpwfvrvSXOXRhjA+fnHnhuv9zWC87ui2FT/5pjA+cnHq9MM
M8zg/IPskoHZkRZwvqFgw7SXJVZwfsJnWx2/HBs4f+G8ozLfe+3g/M19Vrcv
BTnA+SW7bAPm+jjC+ftPLf3UGe0E52e6W+7NjHCG8+esMNyaneUC50/8vLex
oNwVzn+2qrQso8gNzj/iNmlGU5M7nM/of+tRf4MHnM/guI1xQaUnnN8h/t33
UrsXnF8QlXzoe7M3nP+w0STFfqoPnC8yeeatzoW+cP4yAa3K47P9EOFVJO+q
vtofzp+nsEDGNiQAzt9b84sh4wKCr+jN/kc5PBDO33Jes/vmFQS/59g/A4XY
IDh/cvHLrIQ7CH6NqBy/UmQwnL9Sk/VUyQMEn+0Lo+TBuBA4f7nBxrp5zxF8
zaRVfn9zQ+H82547N4W+RvAvLa7StS8Og/N/bA60UfqE4P/fUbS1LS8czvc2
cHOt+YrgH4/Vz8wujoDzrdgDNmzdieCv21Dw/f9/BB8AV6byKg==
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJwUV3c81e8Xlyizkpmkssne8/M59jUul2QVCQmpkLIyQgghyUpGJIkyIuHJ
qISvTZmJQvYKWfG7v7/u67yeM97v87w/5z7ntP0N08uUFBQUXtQUFP//5Yn7
l5PBXY8NidH9yHZvw9/RCJ+85pyJ4/p2f5f+teL1Pq9zhZzf4NvW02W7Ma14
o6THlQPOtfiG5/5gleL/8KaYbsLalQ68M+ZrdAhdC74UxvDbp6ALD/CcNjz8
vBkP+PhG+G9WD37sQjMuqN6MJ8H66z8P+nArvHRwNKAJb1YOfT935QfOYnpd
p5/mC/5KlTlQ7s0o7jN61P/4m0Z8ecgx06tgDDe/0aVcY96IB3LS/FzJ+oVL
Pb13cV/BZzw52ejK4oPfeAuNWz+t3Se85eGQx9SVRbyFw6v5K3UDHpmS1PxI
agkXYqu3zaytx0WdcWuZN0v4NSoPCz+/etzz4EN/z4Jl/LkGPdHsTx2+qy37
YSnrD74vaESW9LMWz2b9bhTPvYqnJ9++fsypFteauPdDIn0VF+n7VtA4+wGP
DuujuJG8htvVUKy+2UE4x0c/zfkHf3Fx7/NHVmVq8OoE3t4Y+g28pr3wI0tj
NW5r3+ooen8Dp/qnkT5mVY3n7uMOvxq2icdUFUlcDq/CpaC+adpvG8/a5Uty
XKnE9dFBo8kre7ieWGPIEaYKXGrPfo1taQ8PdjJsni8rx2NOXWznVaWAPxOu
h80sy3Ev+6pbZp8ooF3aqzLr+Vtca9L9U3nvPjClI1I9NCnDFSO4Odo5KEFW
7JLVQYoyXFSo9erkBUpoNRxc+fqmFGd2FWRmn6CEBVNKU0fmUvzn/PdLPmv7
4eL14MdF08X4t9jo8nglKviP/6uiwbNivEVCifZlABVo5RdcYLtQjJd6JBYP
UFODi7itg3reG/zumv6eMtsB8H3uf3crvQg/9e9d+j95GuicYbwwMfcSZ8m4
vMTqTwP/lf5T9wl6idPgzFritTTg9fPwlQHml/hi8PVZW11aqInT+/1bPR//
QMWvXGdBBzTXD5y2L83DS593P+h/QgfyN7YdHpvm4Xk6wWNLP+jA7ye9ps3q
czw2cijytDM9FKXM34pXfY7bMCT0hfgwwN6tktjWkRycVISfeVLDALu1F8fn
o3JwLaP5wDIKRrjouWHqoZiDi8YTBMYjGWHBTKYsIvkZvsO856Wdegj+lige
OHs5G29jlKelsjkCtrNrVrdvZeDdBkdT2u8cARXRzU8X/j3F++8vCKSmH4Hk
uTQXroin+Dj1Cy3x4SOw4DIdS5OVju/8Yw+2PM8EpTz8R/om03BK1dVDvP5M
4FrKEN1wJw2n8et8Op/GBFUcmb9JLGk483pkdcggEyxeOiCoSkjFRRY21wut
jkK/tcndpIZkXFL02z1v36Nwi/P8tXHHZFzetZRFI/UoVL09/SGHJhnXmHSV
7us/Cg40ZwbszJJwq5Gha/ssmUGRjZVKbScRj2xH4+fMWSB+kml/f2QCHsuQ
dvPUbRYwX/TbrMcT8ET925Szj1ngzNJyROvfh3hmo/ip4K8ssKit5iB19SFe
8SHzfIEZK/yMf2ZTYxuP1+z4z3h5sQLYEVLEuePxBmVLXzyRFV77xr/DUBze
XnEkubeHFVJNRfYGP8XiE6/vdu+asgGvunJi3kwMPjNnc6nZkw2WzqVWZPvE
4EsiykuPEtggpSz/jw1NDL6Tt8Io3M0GQQOfe3ZEo3GWTAe9sybsYF5q68gT
dR/XiNOue2HMAfRKGcFpseF4sP7bl93XOWD28ewZe4Vw/AM176N/DzjguEQe
m//YPVz5DoXT2VYO8PK5KvhA6R4u41JNv0c4BtdYPbJfboTinnwia8LOx+DU
focyz1ehePGPlBGziGMAy927ly+G4qLmt0sKPh+Db67dYpUtITifppSFuQYn
HJ77VpL0+i5uv5sJdy9xAvuCop2i61086/0hkcJgTkg/wTP8U+AuziU5t7Ov
lhMqRvRlNHKCcdYTL54VqRyH+kpvVS/jIPzAX64FKjkuENa8tf600h/XKo3u
kzDjAjhPqehO9MdDrm3VWd/kAna62qtjv/zw3V99j4pLuIBK5WZSOKsf/rcz
QemC+AlwLrcJE4r2weVj9vFGEE8A83U5HXVRH9xL152h1O0E9BvhzM3t3vgS
Iv44+OoEcAjNpB/h8ManCmjulQlyQ8DjrCOzVbdwASfv6yM63LA6w9j+2+kW
7nh60oLWiRvsX7yWFma5hY8mfxS5mMsNKcNj/Y6eXvhAWGAn3emTcCDN5oGa
2k38ssQWoxTjKXhfyfO3iMYDNxyKeM7BfQpeBzDnEurdcdkIVjUKiVPQn6tZ
yujvjlP9kHTrIJ2CVyHVQ7TjN/BnsVdariWeAsoeT+9zg9fwKOW1S+een4JP
36JX5Gyu4R6TIZuqFafALKkrkfenGw5YhhBD/yn4IMP5gHLlKv5jvje84Php
uHQye2RQyBVvTLXnThA9DdQq7zRlql3w19pL5b5qp8GF1zfNwtgFD3xKP0G4
eBraBq4y/L7jjHMRNTR/PzsNtJb/Hpybc8KtCt/s8YrwwDaHYKcBmyMOlmrJ
9Co8MPbhGwdngwMuRPWf+B8DHqh/wD6md8MB3zg/adNwjQc+sZQYV7TZ40n0
J2rsSnjAljCYdCLtEh74ruAsoYEHaqyEzM1Il/DLDoqzEj08kOeTwlh38BIu
W32Wc2+VB5wNC1J5/ezwHtcon6eKvOCbQJCUGLDFq9g4jtzT44XPkfwsExa2
+LOG5y/crHkhxtir+n2/De7JWf9N5Q4vWAjvotTRC/iRlr+yg7W8oEGDq8rQ
nMeJwpeX2XT5oKD7XydlsQW+FX2r+rs5H/jz0NwxPmuB5y/cu5frxAdR31N0
D26Y41Rv845Jh/MBA3ewZ5a2OV6FTakTP/MB9pNipX/JDHfO3qBn+coHE6qH
Ho9mmOGsVLTfBsf54Aohn0/YyAx3bxZ2dabih/Fw7WDX4rO4gNnVhFBNfuiR
9XMWDTXFeyv8L+if5Qfulxpv3iub4nePxQgwOfCD+saJTvs/JvjwSGFVRgg/
bKl0sq1fMcEfuSz8fF/PD3nDb9ae2ZBwiiAPmSVcAKyW+TdjFw3x12N3/1UY
CwDxQs5Zk0BD/LxWwpeAiwLw12r+ZschQ7yCtuw8fZAAjH51EPopa4C7Ja6G
CnwQAA6TUOH0RD2c8y+V0XybAHD/pIj3k9TDv1ixcrz9LgDL45xdo20EnOek
fKH6PwEI5B+/LM5IwAdeevdeUBWE4gG6a5JPdfBwhsgMXkNB0IFXKsVaOrjs
jRTnmfOCMPzrykzUvDYeL/t+x9tfECq/rLkqa2rjOrVbfI+qBOHFNz+P3/80
8dLegFvNikIQU932zrFQHc+/52j/U08IOtfdue5cUscz5A2Mt62F4Mnt6rAu
dnU8KoVDWCxACAwHMPZTkYA7XCgbjq8XAq/zxTtX5jHcmjGt+WW3EMwkUykY
uGI46UNwRcMvIWjwSjO0nlbDVU8Zxa9SC4PPj8+mA/OqOMv4lKalvjD0Cb37
78phFZzucYekx3lh+Mv+drQiXRmn0Kk4EeUmDI66zg5zZ5TxuRehf6tjheGk
gtT2b2Ml/PNV7lcne4ShJPOgAFakgN/+c/bo7/MiIHRTwfvCO1ncLVd5b8+N
bFu1n4y7KIvbnzs9xxEoAh/jCQVytLK40buFz/pZIlCw77HbRzsZXND/vu/r
cRFIrh3IVDsljXOLujt9WROBPUdJE6ceKZzlu/nZ0QNnwPwNv8XXCCmcAucT
Oyp8BrxNLM96rEri/ZS1o7eunYEsrefnj1dK4O1lz9tiA89AW7SA/ispCfyT
Y0zVi7gzEJ/8+NXNInG8pNEqcaDkDEw+PJ1075UYHhW1qqu2fgYsY/WJDXVn
cJWjIm+ogkRBR0snzZMghLfvs25uixOFLNXsu/a/BHG75fu/krJEYcmvSnkt
SBAP65xmF24QhRg3U91pJIC3x74MJlKLwVwt6wt7Q37cLnAgjY1NDBIfeuyv
+cOHr1yjLf8hIAZCo/UGEel8ODvRZdqDIAZFvFle51d4cTt6YdOkaDEIeri6
RnrNg69sWbpdTBeDv1pxYfF2PHjYTGS4UJEYbF7tMTrKwoO/bJ6qqmoXA682
4rvmwNP4SkQ+7w8mcaiQ4GQPsz+Fh1EJrQmmiMPYjiDr0Q9cONuqxeHlfHEQ
fnjO/YYOF57/K0K46r04wOkdadR5HG9r+G1jOCQOap2G6QyznDjb3ReN7twS
cO2l0IciuWN4vnvfqJKEBNBc0Gepb+XAVewOblOCBKiqs4lFXebA7fArEo8v
ScAKpm12Kp0df/lPIOV9rgSUm/d5xHGx4arz5qUh5RLgXjricq+OFW8fDm81
aJQARdqVss3LrPhK9STFyG8JEHddc9YpZ8G51Xpk77JKwhe9O3c7HZnxK9sJ
T59bSkLrPa3UfEomPNFo7qOvnSRwtAZwPKw7gtdla88QnSXBZ13KwzfoCM5B
2JBf95YEy4pL31QojuBNiTadOsmSYKRw5wCR8xC++rtinTNTEipvn/9o9ZwR
P6Vy5MRiniSo+UV3iksz4j5jDS7JFZKQYRAtwmbCgAuLC+2f+ioJ/91v2s+R
Q4eb370rXPNdEk5dmHN5rkKHh/QOGsdPSELeQjX6+JUWH/R7kK64JgkWSXwh
yYdo8agvK3L3WaSAtLGzb+PhQXzWDjmLnJUC86GCPokhKpzjLVvcrrUUPDcP
eCMRRYVrHXQv77aXAomVGJurylR4ehEPpb+nFEgLJTKHZOzHDbcinvz3UAoi
xpOaM70ocR/iWH1mqhT8Lc+TWxalxHOzlKduZkvBRBPFS/PJffiOzrwsV4kU
nI8diSdd2IcXPTJtd+uUgqb/ZDXTzCjwwclXq9AvBe2hB3FhVgr8gDL1cdZR
KVCvlWG5WLSH2Y6+u4IWpYDhrNSgwPtd7JDYiX2HDksDQdyXIndyB7vR+Fvm
DVEaLBOYnJYTNrE6KLwqai4NwQM5CZqCm9iRavecl7bSYOei8cMKbWDFbzaP
5t6QhkqlHrbKhb/YSgr9SspDafjkF10adHkd02DuFGZLk4arE18SFA6uY48e
JF569EwavmtfPxxYsIbJhpzoelAmDVMfBLnS11ax21clikO+SkPgjcfyl57+
wRon/vze+y4Nf5xcirr1/2DsdpUnAyal4dI+arWnmytYpZl6nPdfMp4LQbQC
51ewTbWz192OyYCtqkXCPbFl7M4Rb1FzGxlQvhecd5dtAWuNUnHsuSwDvKVS
tT+T57ET1BTppOsycLte087q+Dz2YTOS3iBIBihq79+2E5rDKH6lzeDZMuBV
etajzWoGI9lc5EEvZaA9w0tuYGYay+7jtVYulQEnjrSIdwHTmEZrYbPsRxmw
ie2c6MifwkLLP+QLT8hAwN2djVfMv7FeidDRvHkZ0Oo1TY8sncT4CnQ5+NZl
gN/VZX7PdBL7lNEZwX1QFlaUyvOfpUxgByJ/OjELy8LA5f6VVblxLMr6AP8/
N1nYdPB1Yi8bwzBJhvVpL1mQYmRf8rk2hi1TH/3y7Y4snFOs0J0XGsMsS064
FMfIAk3RS8vdZ6MYP41ckUOhLPj4e8bm6PzA+r8rB5LeyoKA7nXGsv9GsJgy
MFarkSXvCxIH801HsBVbw2W2VvK5toM1j9N3rK7cQa5lVhbYOxXpfZ4NYV7R
Lgfe/SHjFaOZ65YbwgQv3ejL2ZaF8XMXBXpaBrFYBn/fAHo5GPzxRDNvcwA7
75CAJM/IgVDZw+l9rv3Y+pF67WRXOTAvcYg69fArVjDZyBbmKQffMn8Zq6h+
xWxqWn+7+8nByWisNm+qF/t0pf++fpQcrH4QtT6v3Ys9/LDY9u+lHPhfC3xX
xNiDaSWuZcyUyEEUsytlXUM3tuGyfaPvvRz4hQV5bfl0Y7asB4+WNMvBFOeB
gY6pLkzUjdvccVoORLxHfey/dmKj6nyCJstyQBNd7MHzqBN7xC6yobZJruea
e2XSpBPbapBLY6eVhycnF7/253ZgTceIIy1C8nBkOsn25Ic2zOGLv5OUszzI
Npy1MdNtwRxVBYzWb8iDpoeuP/vPZsyppFOu2lseRpP1Gh0CmzHnJ/zU2hHy
YFirc+1OdRN2/UZHjmWePNxh4bzcrvMFcx/3jT7xWh6yPMzPss03Yh5WfDd/
lsuD7cF9cRWJjZiXpq+G22d5OMmi1Tz/+zPmx847FjQuD6aKG5qVTz9hd2La
mrTm5OHSD64UTaNPWMA+n2LaVXI98fUFSopPWPBsa9Cj/Qogv+0SRH/lIxZe
e5v7BY8CzHxr5f+s0YAlXGk5326nABuzvCZdonVY4rCX5iNnBUjspA6cH67F
HpucPGPprgDX+Xc4WexrsRQVr62xIAVYlfJNHvb4gGUc5k5dy1CAj9sHH5Xm
1WBZYU3BVXkK0LA15C6jWINlb3o6B71WgJGVCka7/6qx3F9fFGg/KMBLLpfQ
3PUqrOCdxzeu7wqw4s9kIW33HisU5fowNq4AKc7u/C67lVhRduPzvDkF0JzN
LT6eUYkVRx+/JblDxk9xe2do7B1WcfEzs9ZxRbj9JyyH168Cqz94zOSqlSJY
swclXZsuwyZzxPUHLimC45qiqEtSGcYAWpq6ropwqWH65CetMszS54Ycr78i
+b2TYxf8vBRbnPp8bChdEZgoUva73S7BWO4NHdV7rghhIKZdI1aCKZ9epn9X
pAh5pzIdVCeLsXArrt2ED4rgnBJ9+611MXaixfOn/qgiMGSbX6rOfo1pOEUO
VU4pgudKgggjz2vMmTKjV2BZEQrHz766mFuEvVVubqSkVILu31gz3ZtCzODV
yVdVvEowaSU4+3i4APONab0pckUJHvlHFnbGvyBvWz/dUm4oQRNVsB61xAvs
06e/lw/4KEEX0Wmosz0PO/KPx/JnpBKIwGc+WuY87MU1X9W0AiV4HKWgRlWU
i7XSxsnRlCnB+b+HPdbNc7GV57nit6uVQOeyg6AiZS6GjXScMm1VgrOX1e3D
L+RgX40EqOkWlIDbNPFp1Mln2NaMyq73uhIQFjZeufRkY6ciTP5O7CoBvYFb
8IPIbMyt9s50/WFlONv28k7seha2X7KnzVdKGVb1zj7+XJ+JSTEFJ017KUOc
OsuOb+8TrIqmT+jLHWVI8XnOmHPlCaZBIV6dG6YMhOoJavedNMxscejHxURl
YKeKfdAjkobdblMQ/lamDGq0ihLdqSnY3qfY6rJqZTCi3Hl1RikFi6yZID78
qAy+hNyv4wPJWOqrR56GPcrwJtvut/XJZKzm/mJ1w4oyvDqweUi9+jGmfVfH
KGtLGbIknevfXX6Mtfs8HQ2gVAEGemJDJNNj7McVA2qloyrwnS/uM++1RIxS
54XRGykVYJRLccuVeYQRKC+OPXFXgdhD/UzUm/FY12b5TV8fFbhMZ6sRVxGP
WS8zHLAIVoFxqnfHuG7FY1dHq0SOxpPthJXnxjNxWOwHNq/INyqwUvqJZZgi
Fuv1az9wa0EFYkyUdI/4R2E2nvyppusqUGO0/0LrkShs0uXOGcldFWgICHu+
9uI+9tdShDTLqArnPQq/xQ1GYpwK4amXxFQh/HVCyU9SBGb3R03UyE0VVoIr
9ShDwjDGoxSdvV6q0H5asD5LMAyrkmy4eT5AFXz5wszm2kMxlus61c6xqqBk
TNsRxROKNU0Z6YcWq4K9MjBPfL+L3TrItED7XhXeTJ92nYu/i/EI9DyMr1eF
/7aWh7O072J3HCwGnnargpuGDRvT22BMcuSic+WqKjxZsx0o0AnCvu+cZsD/
qUKkVpLnw4+BWNTx8TefqdVAdbulmqQRiI1bOv/tZlODtUxRWyvtACylxz18
XlENShs7fyZc8scomu/m8gSogdn99Nm8FW+s6Lcm4eU9Ncg1KwjjeOCNWR84
MCcRqwZVEeVt9sLe2FvNKBm1TDVQ4v904+6V25jzh4QGi3o1CFFr+DO56YWx
fjdzGmlWAyrdagbuHC+sYZuN7nK3GhhWlnwVM/LCuJSemHj+UgPx7iTvvpc3
sc6ynNEYagywX+rbpt6eWED35TDmQxgY9qx8PC3hiYksCwqlsWHwULS2feK3
BxYmXnjjhSAGLPuiYlgveGCKL9/u1uthsCU1lc9s7I5lZ3zm+vsAg0CnB80s
tW5Y+gXRvnNJGDxFm/u1iG5YCuejh28zMGgz7psX/H4Vi02yO+D5BoNM/skO
RsqrmF/s9uJcJwa5SaZtJnYu2C1D+wKDAQxeNxJCBXacMXe6ZseCMQz6pIqn
3qQ6Y07hSQNXVjAIet9dPzpwBTMNlPr4kxkH6VinoqrrThhRNSVAnQsHoeTJ
EVkOJ4ywtauQxYeDylBfrcPHyxh2u7XQRg6H0V8xRa+4L2Nnrl9J6jfH4Q7/
5kz9mANGZfvUpT0VB/NRlWTmx5ewveNUfGLPcJgSddJ7b3wJ2xpwHYkuwCHX
er7emP4StnRO8axeNQ6PrI4eML5nhw0Te1Q/DeNQ0nKtXIz2ItZHr/yXZwIH
29vxQfce2GLdzVkld+dxuDDu9u0Dsy3WpH1dAN/FweDgWZFv/DbYYAYVzffD
AGvOva7Jduex/n8KlxlYAE4Ifk7b/mONfb1wtUGFA6D4xQ0L9fvWWCdn9520
UwCvF5dve7y3whqTMpctpABYxCwdwiUssbJY5aFuU4BnqaF+3yzOYfZPDlFX
mQNEduqWDR48hx3N/ymebQ1gvVpO97PSDHOvjwq5YQ8gtD+edeuEGSa6OijM
4AnQrKryxHjVFBuieHP2zy2A0iGjZrdCUyyKMTRg0Bcg/QoD24PLptiUwJmu
/LsA7jr36PsGTbBcK38f7YcAXKeuO8V3kbCzTsbPRB8D0Ah23W98SMIob/K2
MqeS+XKO/LdnSsLsYv47+TMLIOPRrMXfYmOMq/b4l8BigMMRipVSP4hYIl8N
a2UHwAVrzSs3E/UxTal4PLMHgO+RDghL6WMrao4u4X0AwgFdD1g69DCSBQMy
+wGw5BgYHn1ID2OIuuC4vADgGiq7sPVEF6tOkoztXyHH69y6ekFDF3PNoaqs
XQfgrlKz+TOtgzXVFNLH7gK0lF/OqFfVwcIWd0pFDqkD0w5T8o8lLUxmp3OY
6ag61BLiK+eytLCfNM8PbLKqwyudJCMJUy0MeIjWX06oA26u1G9WqYntmD3d
5yimDqafhi6dfqSBeVWpkZ4aqoP48EOjuhDAyq2/UA6Q1KF0a1iJnBZb3yKV
s5xTh6VnMR9jKQDzVXHkjLFRh/sxD71/7sexwJqocb/r6nCdZaiukEsNq73A
klzhqQ465x4z/8xTxSj+PdVbua0OL84VHiuVVsVC1EpeuwSpw4HHSziPsQoW
8aHPxzJeHTgPda9qPFHCmmwvnUlMVAc1A8+fRGkljG5v5ntHijp06d4I/dOi
iMXguxq62erQGBT049A+RSy+jo9RvlQdeGY29u4Fy2NpDR7ZzL3q4JVv/PNW
qww2ZL991rifzG+kmlo0QAbj2n/vQPSwOnj2hA3fkZDBMjRTrlJOqAOLyufd
uRRpLOfTB7nlNXW49y/j8SFfKWzckTAlukXGn01x3UJGChOg7k5z3lWHyrq8
wfAFSSxfe2LvxwEN2L1R5556RRIrbKRvaWfXgBP8Z08dbxbH5p0e36Hj0gDn
E7asbIbimPjBkxI6pzSglH5FeqRTDCvRlU5EQhog0fL299cfolhFk6VtoZIG
mHY8V3BgPoPVtjxfuX9eA35uynmsdQpipRydHgEXNaDz6YbJCW9BLNdpa8nd
QQMsCpxXv3ELYlGUxosWVzWgbocUuOcpgJkpb8zy+5PrrRcp/xTjx2Ze6k/U
p2mApKyphttXHmz4r5djeYYGOEYfXHWL5cE6tDN/5T8j4w2xemZG4MHejv0Z
iyvQACFSz2r/h9NY0LGnIzZVGiDsyu1RXnEKY7m/2Lc5oAEcUvyx/jknsAN9
xyzmv2tA8RDvvQvSJ7BNPq1vo2MasPT5/C36j1zYSF1K75dpDfhm5a3eM30c
e7mh3vV4UwNeB9pE0hE5Mcw5sUXqmCZ5vwli5rjMjklVfNDjP6EJFTEzpu8Y
2TE+qukmjtOaEJsbUWb/jg2jzVL7siekCfLnLPu/M7JhvX2TH9sUNYGq6mzx
5S8smIuuEnKx1ISth6Wp1W5HsQWhY59LLmjCqcbnZzROHcU86TZbN+00odHb
Mm7/VybsTlvl8H0XTVA7u/OfvAYTFn9WceelnybYzapxXjxzBGOV46BaCdSE
XVZrL5+uw1ga2wa9cqgmcJLeWeQbHcZyBt4db4nWBLryBRoX0iHy+1pBZSZd
E2TUTVivezBgKursmtLZmmD2daExZo8eq+P5q+/3XBOaiOk2J+PoseaJCmu6
15qQ715XGVZKhw1flfcTqdWE5gAxARIdLUbpI/fedUwT1svTvk//o8YirFjr
Syc04bOgvBV6Ro0xqKw1bU1rwohZbew2gRpj3X3bH7VC7sdYmmBlKhUmFCa7
UbBfCyrqbh+RNtyPGcfLKMzya8H60/oPQmsUWK8HMy4jogVXPykOvCimwCzP
/tHxF9cCpbynRQ+vUWD2bGXm9Apa0HBxhVqld0/tdrr07TMELTDSRaziDf/U
0vOlyq+6ks9vcHL5R2+qNQ04NGVe1wKGvst+ldSbaqt0SUM9nlrwgcV5riJo
Q83g2tY+VX8tGFyQ7D1486/altRHI4YYLfLAlpG4YbGmZlVtNlVYpAWRZstr
e5zLamzt3scXlrRAeke4huncmJrG3ktxnjUt0PpmWs+sP6p2XXJY3XxTC4p5
2xcJQSNqjQng/GGfNlxo4mEVtBpUu2VBWx57VBu0fpsHCJzoVusdTTOSkNWG
uvznOyxGmWoP/6C77t7aMDrMk6v6Yhhd746/dMFfG1ZL0sxGrUaQYYmDOiFI
G5omu1KHqUbRgRu0+05FaMPem8p/LsVj6M6MWXBHkjb0XmA/mrI2jpzGZgPF
K7QhXGxOzkB6FmnVfbDlrNKGx9a8Eywrs+h05kPswAdtGFcrFWQonkPDFxR2
v3/Whsm5QX5ngQVk0h8S8OCrNpQJvM+kD1xCqh3H7sytaoMZi05/Ec8fdOz1
3Pn+DW2g+93n7+T5B63H1Kp82tGGV9wnruzV/UEl+pe3n1DpgESmptcn61Uk
0FjsZ8CiA52ssdSqwWuI6nmotQKHDkwCITS5cQ2NhZor83LpQPHj9wcr6ddR
uvrO5havDtBmaoYpJ6wjJqTrWyCjA6GXQqYm4v6ihSecVkkKOpBBH6pI1/oX
tfrNK4ao6IBjLmbUf2ADhSs+2rDS1AGWMGcRR58N5Mju1K+tqwOmNcmnjr/Z
QOrr5P9VAx2I+rxf9fr4BtopG/GmPasDD8VYNIb0N9FAQonFmrkORAT4Xljw
30QVHmEKY9Y6sBb8dDvu1SbykBD5W2mvA3lhOYIeB7bQZMGt286eOiBSLNtj
ULCFzE/sjuTf1oHL8WspId1b6HNcuO60nw7kFq0VTG5soVyvZA7XUB3gEMw9
xw/biOX3ybsFEeT4L/r4X7ttFGqVPz0TrQP7RU+zTwRtI3vsfdXVRB0Y/48o
s79yG3UXq/MWpuhAu356k0jXNlLnbYmeS9cBnI1+4cLUNip+bLoqmk3uP4nN
8PG/bXSKZujCtedkfpzK0R1HdlC8n8PnopfkfiSvnD3Is4P25mbFFop0wGaq
2khRagddv+iVJF6qAy8kjvLZYjtopGtn93qFDvDEedzx0ttBRlr3rryp0oFq
IXMKb9MdhCoYOxc/6IAdt6rlJasdJCqcpCj5UQeoEzJFJWx3UPoT7mz3LzqQ
+nyHf9huBzEcekFb8p8O0Pt3zDlc2kH+wRKeyx06YCibKNxwcQfNrLwblOol
238aw1bO7yDry6Dp2a8D2wO/8pbO7aCWvqZXpcM6oEt3RbGSuIOU9E1Y/ozq
AF9e65iW5g7Krxm4IzOhA3c74g0S5HcQh4T9xM1pHdDPl+BOF9xBEdkzxLfz
OnDLlJ/Slm0HrTPfrFhd1oGlxfnMHsod5BS+zS23rgPPn1Fnbcxto68boRG3
tnQgLmaqoKl3G2ldZVgq39WBlI6jLnjVNnr7PdFynVIXXj2gCLV8uo14SSfq
5Q/qwqcpsezDgdsooeG5sDe9LrRRsrvZXdhGlHLiCe8O60LRP4UYHcVt5PGi
Yusvsy5c3mYoQEzbiBTz5T8fLl3YCf8YTERbqG7XWPb9KV14b/k0yiZuC0l4
9Kdv8ukCU/lx2XnbLXTIfPqan5gu8D9eP+i3vokCmzy+VUnpQt0Fg9DrHzbR
vPIWti1HjpeXg67QTdR6kv7IHUwXDF9Wnuo8sIlUEx751GjoQuM9/ccOnzbQ
KyqusR0dXbDbuTR/NmgDRU2LlgYY64IXfnRGaf4vIpQZmQXZ6UJWD31odv46
+qSTkBISogsB/MfmWGf+oAmn6ja/cF1IMXtWzZb5Bx2IGKe8GaUL44oKP9vP
/UGEL/LXHBJ0oUF5bMKsaQW16g6paz3ThZq++izt+mU0f4XKWzVPF9wdZSnj
QpfRoUixQtkCMr4BtxM3dJcRqSmIjb9UF46nxEj/6llCPQS+WeoGXRCRELA3
2V1Eq87EU7ufdeGoyl2vq08WEcv92+fWm3VBK2i41kNlEZk3N9VOdulC9C+i
I0/YAvKeXl4d+aoLN0/UX68RXUAptMdF+gZ04cDHBRae/nk0qHct8csYmW+Y
TLKEwjzadklqrp3QhYtVL/i+zMwhrqja3XfTuqAeF19Mmz2HbFuYXPKXdaFf
z0/gBusc+qlfoXZ/HwHiXD+r9XHNov1Xf3jepSbA3X3rHj/HZxBfNE2+Ly0B
QjMOu1q8mUFO/1kfdWUiAAd3JY2twQyKmA3VtWclgDNnrt0PrhmUT190x/oY
AeRJMj9eLk2jGYO9Sf3TBPjvyVrpZsY0oncT4tLkJ4D+f/feX/edRqIxJiYq
wgSov3JTj8F8GhEL/cJlxAhAu+um0iI7ja635lSfkSLAvuOnnbNYp1HcXOsS
rxwBIgyw/PCNKVTMsM7PpUQAH66bvV7fp9CKISGeQZ0AR3q+nyUUTSHmax6f
qbQJcLPb3fJEyhSSfZC2tUMgQPnzr68GwqbQuaKPEmuGBHg/UCVw6+YUut02
5zhPIoDpdnv2b4cplDzPmjZhRuaXXLcmZD6FKhnxju+WBOhUxrYl9afQgJgz
1bcLBPD0XI/6i0+hLeJDpXY7AnD9lxzgpTCFjl+vut7oSIDqrs5XmZJTSDX2
V84HZwKcZiYtuJ+ZQjavGQYq3Aggy/XpxKjgFApslzv0xp0ALb5DRyf4p1Dm
gq3mCy8CfK7UyvMm23WHIn0yfQhA4fS6OE5gCo2KlxQl3yGA9aEvdPzCU2if
8eDPuGACvMHUHkiITaGmD+d4vcIIsOA/yx0pPYXixbscLCMJcNCVtktBaQpZ
ZhjmqsYQYCeyb1VefQqdOtQ0fiqeAD2WSUMBZH5TAZr81IkEiLUK/0Z1jtzv
+Q+Xp5MJcIZ+Sv6T3RTysVHOa3tC7uf8NvHttSkEbeWTJZkEELpLea3NfwrR
qEkJJuUQIEpbdeJg9BTqLCy84veCACNV0wcvPJlCdjE5UxpvCHCtMvuhdO0U
EtrhFhYsI0ABiD153j2Flq6mudC/I8Ckr3gi8+8pFGzwcKbnAwFc9x6l1h+d
RoRqhjOVDQQoNfAlrAhPoyNnIq+mN5L56X07s6c+jbLoguYc2wkwZr7ZG+s1
jeqa3RbWvhMgo3b50euf0yhSaUp8cIwAiYnPmqf3phHppcONDxMEKOPsQB9P
zKDRSOul8HkCXFJ+KiB3fgZREAgr7P8IsPLl+Hf54RnU9O6j9A6FHtgKVE7H
/5tB8YL4zVEqPTgo34sZnpxFpw7Kr+Yz6AG7y4ODTQ6zCBp515W49OAx99H1
ncVZFKy1t3leRQ/Kmnsv5hyaR4S3fsqA64GlWj6dj/Q8OsK37senqQfO9vuP
ypjPo6z989tz+nowWmfqr/Z0HtU1DP4LsNYD3w6HJ61CC4hCvWJflq8eMMvX
Ch+XWETWWr9b+gPI+FafqBuRFtFbXY5EphA96Dz4DnW5LyJnIz+B0Cg9sPlh
kffszSJqMHm1WB2rByx3yr2G2xYR17nhytUEPRA+ue8qPruIus5jBk5P9OAb
y/3mQqYlJHrxBktmph4MvbV4tMu9hMLts7735ejBC8k1064zS0jZhdJdr1AP
VBO9WCc1l1Cim4xSSLEemDpr6HEbL6GFG46U1W/JeJYqej9aLaFntxsTRZEe
pP+9aqZ5bQnt+P61uVyvB4r2Kb7Mt5eQeYCQYMZnPeiz0rRUI7//ioOtlr41
60FW70+amntLiC4s6v3hdj143zSXExWzhBwjqkMI3XqgL9qnnpuwhD5EzRnc
/aYHfmvs2/tTlhBH7AnWqkE9cOfkn8pNX0I3HxqNrIzowdmHXqdDspZQe2LQ
izO/yPGkO7VJOUtIKKXY3fG3HvgTSwe/P19CIU/GlJ7O6gFjUEy06YslNJxx
dP+3RT0QGgqeWSTb8s80Ww+t6sGKBfWRErId/9zrse6GHiTOxrE8zFtCM/nP
bYN39EAmJulIdO4S0ir8JvieQh/+SsRxpWUvoYw3B5eXqfThQNsi6f3TJbRR
qlglQqsPkVbijb/I+E0rXEIdGPUh97+6RJZHS6jwfZphOpM+BB878VWHzP8A
+o/1K6s+aCm9z7wVtoTs6nZGGDn1ge00PWO6/xKq+iiWr8OtD9xfIuXKPZYQ
6xdbjyAecvzpfKkapyXk3hKnXCmgD44CP44VWi+hlra6/csiZHz/5RwIJi4h
vq7lVmEJfbCmcTsigy+hwF6eJHsZfajoKjKuk1hC/X1nLz5R0Adp7h/DPCeX
kPRQmFCvij6s/rrVeY5xCU2OTVZpa+lD5xWLVOnWRQQT7GGBBH3oMLvGANmL
KG2KQHxnqA+JE/8Of7m5iIwWC34IndOHZzlYDCfTIspfGcq/ZKUP9182OvUM
LSDKdQbPNBt9uEbl+3gkZwG927lOxeCkD2ddGco+nVlARymy2rRc9WGZ+Hl/
zOw8ctvflRRwXR+6FSzdAvPn0Sk6GeHF2/pwtaOagI7No0j2v8TuCH24M6kb
Gd8/ixKbmn41ROvD70PyS0nhsyjTN823LE4fhFqo9X9KzaKKIbXnicnk+CcB
S4LBM2giM2zH/AU53jn9/ZF/5HlGMk/QfaUPsuFHL2uT59/OPiEhxTf6IHZj
mWtOeQqxOP539tg7fQjhnfoVFvgbaQgdfTXUqA+7ya9FU9gmkdHAL2ht0Yf0
BLtUproJZBVV/q2mXR8IVj63f7tOIPc5S8qMb/pQ19JX9vTTOMoszrSym9SH
rDqD1KmIX2hHUYxmgtoAXtO+3U0zGEM0M7tPv9IakPX1mJhMO4aYn3TKNDIa
wDObvt5PTaNI5N/Niy9Yyf5OPh/y9UeRVX1VhQu/AczIGlfGV44gR88YQ2th
AxB9tJVMrTuC3Hltf+qLGcCfmIvFJX3fUeS9fYdE5Qxg++zZxdS9YVShR7i8
oGUAgbJtl5hdhlDD1rHtEYIBLNyU/FhAM4TaXs3GdxgagBFJl9+oYBCNM8bV
FJsZAN9ojHHOnwHE3P2V+aajAbyxs99YfNqPuENfvHRwNgBSNPE4idiPRGR9
cTM3A1g6O3ng4W4f0kjiuirnZQB0dSfSM536kLu1Q8PfUAPgoInzszT8hg5l
zoyqRhpA77Mrlm+ovqHCXx57d2MM4IjhaMHB2q/ot1uwKsNjAzjqNCiSrfQV
hZUcPG+SagA9fEtJvZu9iGc91jfpqQHsi21fna/uRbZBTytO5RlA+zbj/nfa
vWjnI9/XywUG4GK0f8WSsRel0RT+KXhtAHd+Txt//taDvj6skpR7ZwCs98u+
jl3vQYa5fQV6TQZQ1GZ2y6WsG81M2TbHthrAYvKSbkZkN4oUm/zd00m+n9H2
UKeL3ehjxSqf7YABXLzv//YxUzey2/bXzPluAFcURn4vzHWhXXy//dQYGe/e
q311zV1IuZkp03PGAJb9Sy6/juhC/Yyp6N2CAWQGBCwg5y502/TU8M6KAVTK
fR8UNuhCJUPixyK2DUDkcvD5beYuZHSqQqF1zwCCRCzFz251ojlHNXMmKkOQ
1Zgbmx3rREILBo+eMBhCB5Wn86e3nahRuqdk9IghlP7767ue2Ykcva07+VkN
YWPcfpoY04koa8YWXI8ZQubYztePvp0ok8KFsfiEIRRwHrlo4tyJVLWXzqyd
NgTWd5M5ixadaPC+t76ygCEMf2/5mEzoRGzM4RGfxA3hrtM404xoJ3prwZhH
K2MIF9leB4af6kSm6YmfjBQMIXWuSJOJtRMtjR7/9UjFEESPiAeH0nWiB/w5
+wZwQ+DK9zn7jaITibiKnOLWMoSmijfvqZc6UNPrEsyBYAiUz854U412IKc/
ijb5hoYwe3HzxJOuDkSlWOc/TzKEYKxorvpTB3p2RzdN+pwh1EUPnbZ634Gg
vr3S28oQ8h9z7Di+6UAj1OZ9NTaGoFCw8b4rrwP5639f22dvCG7sR9IeZnYg
jjhHFl0nQ9A882cwKbUDVfTMSse4GkK1jHx1T2IHMuO4adJ13RB6A6/5Kj/s
QCsXtm6w3TSESGsxMxTbgVxvsM+IhBmCfQRHXTvZHrsr64g/NoToExMh59I7
kADboVj3VEO4/JlByySb7F/w+132U0Pw4+ULGyTjWe1Oo6fKM4SZrF/ul8o6
kNIVLzm5AkOIinNj1a7qQIHbxItOrw1hpTtPKKS+A9Hw7StrqjCEwvWlqN7O
DkSsHBzerDIEjbyxro7+DpRg+PbAmVpDkNDT9l4i9+/4rSvWD74YQvxBwbZr
yx1IvLFtn2k/+Xyk49g6TSe6af3iTOiwIai8VtrtZuhElQvB596OGkJAUsbd
2COdaCfEOmhi3BC+tKyf5mHpROrssi/Zpg1hLlDZJoK9E4W/YuzRnTeEmslL
Je84O1EL/nvHZ9kQ6OQvpxee6ESHe+sECtYMIS9LNf0iWR9mzmmkoU1yv6xH
xVt4OtGV9xQbmXREWHFsZ+AW7kR+dFcyHY8TYS+B6dZPoU5UmwHNj08SoUTy
3rl0wU5EJcP5p5GXCGW83m9b+TvJ++Mfrg1BInzL/HH4Gi9ZX+fbdIRFiTDb
XzFxm1yvezHP3VqSCJ8o18p+cZH1GxacFi1LBBmThI1Cjk50nsP6U40iEWg3
wqVamTtRVqHMwrwqEdjP/DesfKgTTQAjx0l1IkhwW/isHCTr9eukOkmbCLzU
vCFzZP3ecKm7elePCPcFjZa0VjrQ23+pj0uJRGjarig+PtaBNh/erP1lQoT8
BXd1UnsHwgSI0yzmRGi94pbxlazXL0YUat62RLgRPV2YEd2BGH4NOOXbE0GS
2tC8yaMDkbzL4geciPAlp6T6kHkHekz/oIruKhFa2ukGHBU70GCm07jKDSKM
z+sWII4OdFIWDl27SYQKZ6szDH/bkWPTMcUMb/J5noSlZk87WlhqjaYIJsIY
/Vyuwr12JHMvr1wqjAhr+8pqBq3bkc+x4B/2kURYtqJwlxZvR/s0ZGQ+xxNB
pX0x5b+2NqTzjcFmPZEIH997HviT2oaiXCfDBVPJfJ6r7aU5tCGWR6mD97OJ
UHziWojiYiui+8rc5fmcCKvL1CMW5a2Igj32y/mXRHib0GXP7duK5tNC3oqV
EMH/+1L+7c3/0PjwTgFbORFuW9Xo/yn/Dw1ye2fvVRLht3bBt7kb/6HGZ1dj
u+rI+Jm/XxMdbkE14xNhVZ+IcPFLqpVNbAsqFbDzz2kiwpk456VRtRaUWWDm
fKuTCPf2zoyWJzYjn1I1jWOjRCj4/JE5mKcJXV99p0g5TgT51mylk5++IEd5
aYnZ30RQJQkslTt9QSZVAlxokQjq3176fX7diEQaDq/b7RFBiNJw3VD/M/re
NfYyn9sI9rGGM/4rakC9zBeyHvIYgW16Rl+0bQNqOfctyU/ACIbe+Y7uHW5A
FQMtoYbiRpBRvHvs0a16FD9WZrOkZgT5natcOgZ1SGP5HpOijRHQHZbvrMZr
kKIMBc3pS0ZweMXW/XpNNRK/5bdLe9kITEW0ZxqVq9HxzeuzQ25GUP3cQsNO
tQqtUlh+DrpjBHXsfx1XTStR3hER3y9PjOC0nXRQ9n9vkfik1QZVlhGIn1su
qrF8i95V3/fWyDWCBkrp/PTfZajJafoWKjSC5q1HpEy6MjRTk+9ZhoyAJsS6
wOZyCfJM6F9eqjcC3O7FdSJFCdq+QuMh3mgE9cOi2TPpxYiB2fnGy3ZyfV0/
Lc2KN0jMRdAt84cRdHJNPrH7VogqMIvZ4V9GcP0gnf9NgUKEsUS4ck4Zgc8W
w51S31fIqHbS+fGSEXD8cAp/KlyA3FnzLkfvM4ZbM64SYa9foLf1fBe9eY1h
07DC1Vs3B6kmm428FTSGoHwl37gvz9BntzCblTPGIJjjLXtb/xn6xj5+/pqs
MYhcGDybYpmN/l7LsXTQJvvr3TZlP5OJgjV7+rL0jIHjnuDpWfMMRHNsv8UI
0RhuJwn37kY8RRyf7M9ZmRsDRh0r+m7zCVLm5DE1vmIMd3L6Y/g4U1HDoklX
zFVjYOdiciy+noIMPt8ltdwg59t3u4C7KRldcB8z0vYxBudh6Zab95PQuDZT
e8gdY/L+ra6jufwYXTuuTqwLNgaH1pnbjTaPUWBjloHKfWM44Oyr8l4rER1I
72zxeUDG+5XVk6n2EYrzoNCveGgMjjpVzxbUHqEsLjuCVJoxuO1GKtDqJaB6
z5Pagq+M4Y0FxurzKB5trS3Gc70xhqsg035aIR7J+tYNM5UZQ7ym3O+vNXEo
P+iS106VMVT0zO+7eiMW/aSUrlv+YAzmNYwduj0PEFc4JcPvBmMobQ28wY49
QPExOTldLcbA9qSOT1MoBrUc9lpsbDcGHa8v8r4vohHVIy2Vmm5jiH0VzWYu
Fo0wNtaIkm/G4GWU39D4Pgr5pE505w0awzPXSqVKwyhUylXBnT5iDEmMFn7s
k/fRXGa468OfxkCjfTK06959ZJcnSHlnxhjMXqT8pu2PRGnCG0SPBWOwnA8C
+6hI1FvYlOq0YgwCuzvnmzUi0SHJ1Inz68Yg/btAUXRfJCKUuUiZbBmDUAXf
V+/PEShEXjlAZ9cYQnyoJVPjItDIhXvjJ/aR4KfKlG7AxQjkn3EtimM/CSYZ
nY8zyUUgjtFzkszUJKDbOflS/UgEKj+NfWM8SIId5leL20vhyNRB4A4NLQk0
HHLnRfvC0WLuIZ799CRw/JuXXd8QjmIm17/8YyDBoREi3YuycNTo8oX5zxES
CA2s/mF/Ho725pIvTrGQgKfeI/N3QThKFw+m/sVGgvHDjn6a5eFI0d351XcO
EsRTPt0X+CkcfS0hmfRzkqA9751MWH848vyj+Lebi5yPzviw5nI4Oix3+mkb
NwlUlXcTXhyKQIW3aTWbTpEgUMsOZUhGIL3K5akGHhIUyh95wGoRgSY3B2IR
H9mf+yXF5t0IFKrSIFspQIJemkY2+ZIIdCqgYLBUiATr+ynb349HIPQhIbhI
hARwYoPPgysSWVP4C+SLksDIXpNTzzIS/VV3aH0mTs4/GlgonhKJEkMNPJ9K
kmDuufbgoeFI1H6A60OCLAmsVcYob964j64SqBwfyJOgSmBuq/PDfUQTNUcb
qUjOF7cQ+Z0pCmkwonMBqmT/QzqXKhqiUAWz7fwVLRLogNywKTEGnT2n88he
hwSeD5cvMFXGoKUkcSUbAgmcWgOcJ/kfIBHOvTBTQxJwyXtyRtLFooxTWVxq
ZiToNqtreLwWhw5FSTWJmZNgeAvflVSOR0F/Gm5yW5LAYv4Ja4tfPLJrnGjZ
O0+CGZt8R4+9eMTjdsa3wYEEGd6yg6msCSjvXcVX3Zvk/g+e7r1zLRG9NmqL
NU0gQVPDo+jRmFTEXWmrrJlIgqPSUbnEsVQUd3ppQiaJBAf+/MM65NKQ++pR
NdY0cnycmvDcSBqSTrOc7csmwTNlTDhBMh1VTPzStSkh6+kVMfJ9cwYSML71
h1hGgtZcm5uqxzNRcuWBTKycBDkRV3O03DKRT7Tw+sn3JHBPLr5rdyALKUvd
yP1ZR76/cNcYhZwshO5sUTh3kiCo6Obzyy3ZaP3N5FJINwkqSiyKhJaykeSv
7tGnvSTI/ddRZMT6DOXqvarr6ScBJdvZykKbZyiK7UIwPkaCiVm/7iOTz9An
PYK79S+yvjr7AwwO5KB/d2Ttbk2Q4Ifx7UvV/DnI/RcDvJomwX9N2su89jnI
vBjtsa2QQF/n0FGfzhwU/+vlotQqCb7kgm3NdA5qZkv6YbhOAvVlGx4aylyk
GnC9NmSLBGv/xKUzJXLR7WLrN093yN9fQhvjD61c9OaXTmblLgnSakXvHrbK
RTz6J4MWKE3g0n1K4zOBuehCAP0NWmoTOLftoEQfl4seF/+15TtoAgGvzw99
yshF7b9+GeG0JkBg/HHHtCgX0bB3Ytb0JsAT8uvy66pcpKFfI36L0QRcvG1H
uhtz0Z2AfO74wyYQZqEtXtWViyqKEw+9YjKBoZgHT22HctHir+Ddz8wm0H5X
1KvqVy76Viz1QYrLBFZOK3qP/c1FNQE/A57ymQDfjp1b+VouWi9uv1YpYAJ1
lySjQ5ZzkcR4lU2PkAlQvJkbbZvNRc7sL4gLImR8RtHlD8dz0TP9R2q0Yiaw
+XKfSRO53nBAkBifBJmPqPb2VTIe1pKrJ3ApEwAw2Ln9ORcZjVswWsuYQK4x
bfqvd7kokl3rn5ecCdB89uIpzM9FDfqS83EKJtBHF9rXkpyLtgO4vhcomUBI
tPB+5Xu5SLaEpu2zigk4l9jM/3HPRdfHV2tG1Uzg1yTLyIp1LspnHyvcxk3A
IUnrhJRmLhrTb0tn0zCB8yI/V/KFc5FZyfM7hjomcPKl6l3x5RwUO/7Q7QrB
BMqdx5slu3PQF/bACyH6JnCxoqPpXEkOUg40V600MgHScx3aZZcc5FWiIdpD
MgG742jwvGYOej0uzrVgagKHmw1Dujlz0GmDgzu8Fiaw6vXgZuvHZ0j2q2Y3
p5UJDIxdCvFMeYZ0LgbnM503AX7WkccmV58h15ubZnu2JiBubS+fT/8MvX0y
WzToZAJy4gVGcvLZqJFfKKzLmXw/Ga03T+9kof43jtZNruT6s7Vep+uy0L+P
3w9UXDeBrxdf1npoZCGduY6LD2+bwMdPrhvX4jKQ5W0G+UgfE5gupfMxZM1A
rhR6DEF+JvCpe4T6ZvpTFMfSUOkWSO5vcAFnwut01K/6lokQTtbTvaD2ubE0
5Pog5ePuYxNA5Zkx70OT0R32r6lrySbk+UHivXgiGcVmM7nPpZLraZEoZSuT
UFl5FNfgU5P/NVzecTn9URzPiJAkIhqSfma0h4pOe2k8995npKHS0lA9TT1p
R0KoKElUGpIkLemQJCnaQstKKCVpC7/nz+/rnu+95/P+fM/53gOyS+pdnbn/
E/N9oQFlOTSghlQDH/gm47k9Dts8y7jnqbK0+W3+BcyqvPrHsYJ7PvllJKqo
C1iq091hdZ8GDTYCY8ULLuAbBhlhiDQYrU/71mPH7Xfh+m+lntKg3JX33rRp
Apa27Dj9tpMGLz6Lla5+cQrPb3mcM9dFg4yykpwfe7n9PIhVI/qWBrnvd+Zv
LohDqU0nJ237uDzH1ouwL5zEc0cHDn38TAOfZM09DE4sutdyQhZ9pYFOt6a8
y+8YNFi35qL0EA3Ov2gsKzgeg/Oo3egySoMi+8+cx3HR6L7ymtLwFA0+f/Q8
UVEZiQYOKhb8szQIk1GQ/GMciZvLXh7Z/ZsGjf5yhcy+CHxjM5/h/Y8GyTd3
d2gsj0D9QqtlE0sJMDqxuCV7JhQleX5uEV5OAGN/s3qmRijOk3H7VfgJSL9k
73kqioMlv8v9ggUJMOXEX5gTDUFJ07X98yIEHDTPmokKDcL5jFsz4qIErDK0
z5vtC8TX4zprtMQJUIjZ90dUNxAT0nyNIjcTQBNbsEpPJAB/f2su4d1JwPgC
m3d6I2zs2ufycqsMAYdZT3o0PNhYcuHPF8M9BJhdum5/7bsvuu2VEY9XIMBF
1M3/zKwPdsWdOimgQQD/8rK7uoFHsaRXMkt2HwEhBWANeV54Vq6y2lKLgDoH
5zcp/Z6o92bwZ6IuN76idY+IvQdukgnjL9UnQDavNnhzgTvOhQtve2VIwCHa
jSCDuSN4d5uezfoDBEgFnQ24UeiGZzg9gWrmBHTqwWcUcEO3FvYFK0sCer33
Dt8LdEXueFZ/hSLgcxT9yhTTBeca1T5UMwjYXr2lfEubM76SaP3dxyKgbSrB
aNTCGc/U/5WTtCVg45qkMjE7JwTfQXnxQwQYp/Wn3544jBOizQobHQgQWL+j
buTcYbTxvaq01pmAgejTR406HVFQLFZ5tSsBO/G0lvFxR6yr91QROEJAUJj1
96c7HXG3mKYanxeXxy71gH+JDvixfsteXm8uP3v5a1lmDnjJd4X6Ql9uvnca
IIHfAU3Efqn/YxMQun8ioqzFHv/Wd2vM+xNQLZd/YkWKPZb41mrOBhKgf+tN
cLSjPbqIFeybCiagsP1YmKCCPW58dmH/rxACIpvCH+bw2mOz7zGtsVACpvzx
kWfVIYwSc4CRMAIM4oTXePgeQpVnRtpDEQTIbByrk5E7hEO+cjpforj6/JS3
pE7ZYYaYiO5ADAEx/S85SXV2uIT9Ra8/joD+FZfJjkA79H5WbvDmDAH5w0kP
JAzsENh0kxfJBLR/2zybqWaHguITZjXpBPhsjS8qvmiHdc96zDGDq9//+9G3
1XYYzH5iUXWdAFYn3XPnkB3KiN+yrMgi4Oi5oolT4ofw/bNEWukNrt+j/fR+
xiFMZocQd3O5a42WvpWXDqGRuCNZlE9A8SPX7r/dh/AuW56eX0gAYXRZ6Z06
l4/4BkZOEQHSlWlNhc5cPg08zKxiAgpe1VRuS7LHKPFWVnopAVcKTeXHJ+1R
paHC6nI5Aap3Updv3+WAQ+xrBy9VEiA03v3qtaMDEg1Hbc5XE9DTuKrf960D
LvFj2J59SMCygiE3HRFHrBLfbxdfQ0Cf9elIKytHlPJbaR9TR8C756PT2z46
4rh44eHgFwTYtv7U6Od3wtyGJKeAZgJK9e8EcWyc8KAfx5ndSkBYSUfwzG0n
rG0wcfXsJICPV8rVjuGMSX7f3O17CXiZEKfCfuCCGw1CfMl+Al78bA5rXueK
WSIrgg3eEyD6OeTQRT9XLEGZWJkBrp92/qEK8m7YutTn2swwAYZti7YyHxxB
gfSpjvO/CVAyMoASHi+Mq1u07/FGEpKE/IaD/viiYEqybqkYCRW7DFYKq7Ax
5ch/JnkSJISkrHqac5SNuQKGzLNSJKS/wUen3rHxKSve12onCayNaxxLHvnh
whHB3J97uc+dZ+3U/QMw/lFm4YAGCUbjzf7qNwNwdaLCvdf7SPhyKVT/ZV8A
SqpSNahNwv3Lqe8T9QNRKzKl+5QxCcUZdmETAkEYKiyxSsqKhDFvjs3T6GB8
eXfZQS1rEtoO3h+qLglGCfPJGza2JEQndrMevw/GRydeqKc4kGBVWTXStvcY
Cm6pjC09TEJqwq/rzU7H0P5RdmubMwk5kYvM7iccw4UzIS787iSkJaTn7313
DIlkl7s7PElwOn9t4BFvCGbLEfMGR0lQCPdSEN4VgnpHdiRGsknI+GUrJsAO
wYu8wn0Z/iQwHOb0spJCcDCTZ3t1IAkCZ+ipg/dC8GT3a5wKISHyq8Yb+7EQ
fBP4hG/tcRKIhdq0k/wc3L7mDikfTsK2mzMrtbZx8NidtAzzSBLE2q5REcDB
RtMT3zyiSdhx1M9Dl8VBjxjb8NyTJCS+TpKSi+YgPyoJfzhNQnystvOzPA5a
7PkEjGQuP9lP1N9eDiZeu+DZlE5CnNfF57OTHHwlCKmQQ8IquEg0jXFQJGr0
SdltEjTzN4XHNHGwquqp1dhdEqoHON77Cjlo/Sv9x85yElbk+farxHCw8Fyc
ulElCY6hf/3feHJwfpd/rHMVCbrnvv5RIDmY4WQqev0hCQH7Gv79EuHgDx5V
F6wh4W2NKq/pTAjCVam73bUkNNJmhDVfheD5vQLz03Uk2A4YBD+6E4IfXs0a
CD8jwd/Tnv3yZAgqsD9fUHhOglR/pImdbQhGCbT1WjSRELP7q4G7XAhKG+az
41tI4FEOetrZfAz9PyVhXhuX76sNnVvSjuHT8HC+px0kqG2Z3NTieAxdKhkZ
/16ToJhqHCf6PRgrKJ1vYt0kKOdpyt8uDEa+n7uV1HtJGFe0kQt1D8abO3gb
/d+T0Hpprcm9viBsF9P+7fWRhI6Xd1zEU7n376rjMq4D3Hi30TBeyyA0n5pI
sPpKgkXFYJRKZSBO1A6Q+8dIuBq1KDnTIwDBpq5vKQ8FkyH/sWW59eNuwbNq
wUIKUu3+3eZcYGOSjibMLaJgt0dEzjU9Ng5uL836vpSCmv/Op7jf9sUzk9mu
basocFE8p/YjzgffJET/TNtEwabY/MELLz1xYdQjqeTNFIQmD6VuPeCJuwJ+
k2e3UCAqq6lr/MIDw6z9ysO3URBM7peUa3NH6e2HOU6yFPwXJmhrPOKG3o91
ePdoUcAIP/6909MZU0vDVLZpU3DNy+Gz2SJnrM2rcpXUpUBSch1T8YoTrk1Q
aBQypEB6s5S+RsthrDoodW7anILisnW3Fxs54pKJBRse21GQnr7kKG3SDmeK
UxMG7Cn4IlvpNq1lh8Nesov5DlMgorWezD1ri61fbH6Yu1JwUz42d5mCDab1
VDzt9ebu5ykVpmVY4ZlUcw0eNgXLBZ2tb/JYYTj9c/EWfwqarYTG3jmz0KlF
KN09mIL8eb7ydjUm7nnixZ6JoGBcZC5yLw8dJSMWfxWNpqAoRXLlj2AK1+y7
YqsVS4HMqkQD1gSJM+UNRidOUZBn9MdP7heBtQVbNq1NpGAsLO6EoyANS12r
klWTuXrt02iSGZaYJ01bbn2JglMz+jtd91jimYywycw07vdst7hNFpojI/Ft
k2w2BT0p4qOGcaZoZOGjTeZQEMO7eHZHkwlq8C+tCMyjINDuQV+DkAlKnlDK
wlsUfL8wnCRUbIRDx84Fm5ZSEKZwzPzWZgPsVdk6erScggZ5gSfGp/Sx5Vf1
4cRKCuQur261mNTDUq8h87fVFAwcKhFy69bFMAf9/1yfUuDPE/0q47U2+kj0
psU/o6AsqCTfwkEbD/ewBYueUzDUMdIu9APQiH7998RLCuLnuk7nrANUF1L1
FWmlQMGIlfzIXgt3t7wc1GinYP/HiuOL0vejkPHvtqguCt66KdFv7NiHi5ck
Gua+4fq75npWF0cTp2u34/NuCi5F2YlGv9LAXk1GvuA7Cv5s9zWbzFDHltnv
4kofKOiSWOtyXkAda8ujk5ifKHCk57lZxu7FPLm7YRlfuPkt0Bz6dlINjwr/
nK34xvXL6mZnnrAaKs3JBbQNUxCxOPPF1E1VnOv3GRsa4dbL1fu5tXqqWPOk
2GPxGJfHw1Oq059V8ET+2KD4OAX9C/LJiLMqeOCsnKPqBAX1PLdajDVUUIjt
02c5RUEcfUeE1g9l7jxSzHKfocAo7f5es5vK6CQpZ3F1npuftftGe1llHPt2
R7+Vhw7b17LXfXihhKH3ZDUX8dLhUnJs+55IJeQ7fkdBZRkdqgutfuWZKqGk
4J1N6avpAAPrpi5JKqFadhH/wo10eK9uqZdtoIR1nnsWKUvQYeJY+KLIQCW0
VCmadZWiw0e5wkW1lUrY+2/3WNpWOlTJnv5Wx6+Mbs9vD77cSYdQgzarr77K
OJG4u49Hlg5q+oqz8V+UMcLmdoeiIh2Gfjt7rvBSQQPtEXMzZTroiA+6nSlT
Qf6tuxtdVOmQri7Baligiqk/Cmsua9DBqU3QQTJHFe06v2vc20eHurCZLWvn
VVH6vkzFCy06KJwf38VmqGFxVOHtf7p02GgYbCsmvBcbhAvTnA/QwbJP5+RE
hTomzA0Lh5vTYT5K5R7vdg2k3u26kGpJhwKbnw3v0jTwff6tk00UHfatXb84
I04TZzRu+cvb0kHU88rsyqj9uMOxwPyPF1e/Vt54vJc2NlxVLx73poPEjV9y
O0q00eVt4+qvvnTgXH/e5DutjTcshzvbA+igzvFlfYjWQUktGev841x9ziYp
VLYurhMrciXPcteho9MOk/q4sOtuxM1COpzb43GrsdAEM1frfMwookPnjTnp
N1MmCGbtusnFdNgcwr8kHkzxeN34kvBSOiQcXAdV7aY4U6J4lqqmAyPTxtb1
5wFMGX0yavyQDl2Y2luiaoYqOylLrRo6CHgIGzgcN0O/TP81O+vocPi87Ib6
JeY4eq7s8r8mOiiVRZxqFLRAmaVdNkMtdFghoiTz5bwFHgmb2vSqgw5ZzZKO
pUssccBTNbeghw58w3e9TY5botQA88jFd3SIDJxTtCuzRHvrYJmIT3RIDfQM
3jxsiT3G90vow3SYUjU+qWhBwwLq3N/kH3QwT0kXWhhJw5BDziadv7i8+q49
DblDQxN3jUtrZuhQUzj5wa+bhhsDVn8k5rn78+HmkwUE3o/HY22LGVB6D7Rq
9AhkXT+y2nIlA8TWlSVLBRGY0vQYzCQYwNKzKHl/g8CuqQ0+JrIMiJqpcE+I
IDCQv37pc1UGkFFF2jYHCBSWYl8zBAZwplO2Vv+j4YCM0fAJPQYsdrSL6m7h
9ltVCdV6IwYk+pzaan+ZhjE6E1G8ZgyA+gfUFhsaUmaNzXo0BkgtSTWfW0/D
aqLM34lkQH+xmwz8skRp1vWNMXQGmHXU0B+8sMQJx0CXJ1YM6Gx9c0szxBJt
3Bz4P1kzoJhacETN3BLrvA6ULLRjQGNmVCIlaYlJwVJ/tR25etsfXyo5boFz
x1fecHBiwJ4NZl1H11mgY/SMcaQLA/guysjp3DJHhYTmizXuDAhvjfdf/NwM
27NDdmv5MSB2l6zGmi+mKMRTfl89gAE1jBvii0NMkbT5qa8SxID5Z3UbBwRM
sXOtm91uDgN+rMn5aLffBF/H0s+JRnP1eSuIPLxnhCIfz4uuj2WA8ZClVi7d
CFn7X+QJnWSAyFt6KGvWELundGqWnWaAS15xGZ+BIfa6yv2cTmTAr62zyesm
9FGszuP4r2QG+Nukdb/M1kdbybxlPy4x4JSCrfxOuj72vxGXGkxjwC3m53OP
qvXwvfEKsjOLAdezzSN6MnRRMtfgXcsNBtj8MX2411oXHRZGeTTlMmBKOpdP
ZIMufqyaia4tYMAHfwHQuayDn3cNlhaXMMBJ+W9+U4E2bo3brF1YyvVfXP5+
PptbvwM2L/PKGXCVZ771vYY2fk3v+JxRxQBri+lki3bAoZWP152t5fKQ6ejL
EQD0qFeVjalngK0MVXLCTQu/hxUZchoZsN2nq+oA7sfRH1eCj7QzoLxMvocW
tQ+984Uu2HcxINJz+t38T00csz91k9nNgIK/7q3L3TWRvYGn1ryfARfrF2bL
D2ngr7bAbv2PXD83KZtvY2ugf/zIuOYgl6djcEPmAg2c0nFaoTTEgA3DOnzM
VHWcuUfTlBpngJCqYYlx9140qvsU/XWWAe5SNOditb14uTOgqWgBEw7b5a+y
u62GQwNL1wQsY4JP/o8b0ipqqD55+aDGaiZM4XORrlZV7BF++O2ZJBOy4LG7
tqIqhqp8DKbkmKDddiNL9okKijOX8H3QYkLhwXhbOW8VfBi0M8XLgglVz06q
dfyngnap5lvn7Jhgsuhea94rZfxXyS47cZQJMjObn+zzUkb/MW+BqUAmTDfq
1OtLK+PXbV6uzuFMME241gPc+8v2kHtN50kmDMcupVwclbD9kusGvfNMuD9p
HDHySRHPKAw+5SQzYeSd+KL16Ypo2OzEvpfKhNObVe6uNFfEhe6fJIbTmSCR
XegfPKuA1byOTVKZTFAzu6L696oCBma+DzqYw9XDJzagr6GAcvsOSSfeZMK9
aiOnqVZ5zPG3Ob6ghAmZ91bG7R6Qw6jaK6R4KRNOfBXKvpsth/aCPTv2ljNB
8Nnbfwsc5HBjoVWXTxUTDqaPDiy/J4sJnxiy72uZ0Hki6ciru7vRKPxVz/pn
TNBKtOArfySDi0SpOIsmJlRMRd/53bULgwnah4cdTFh7azhoVHInKoy2nJ16
zYT8oSPPVckdOHLKXH1PLxMqHaeiJRK2o+Nj06SrA0wI7G1JnhfbhmK2jVqv
vjKh/aWr6Hmfrdg1Y/Sdf4QJ8DrbY7bpPzSVM9APnWRCyuqM57GXpbH8mPND
j1lu/j/vu51bK41ST2JUrf9w4xWfptdc3IJz9Cc71HlZUO6tmDh9Uwpdrn3M
2rGMBY/le9QLNaWw/esCsQ0rWbBn8LfBYOdmLOCAwMxaFlSXybOMhDdz56Nw
ntdiLPD+88Xx7RFJPJiJ42XS3PdVHuYryNqECkrzA8kyLJD8pFcykiyBy56p
v/ZTYoFD5eU/E3niWPm94oG8Hgt8rFUddm0VQzch5es/SBZMJx5dvHSZKIqo
lcTcPswCeUvfSm3NjfjMVvaIhx8L9GN8zS/e2oARJY/OnL/EgmsKYU/Uu0VQ
fallcdl9FiT2zhs/HlmPKfIiOkZNLFA4edP79db1OGH9vqO7lwVrFW2Oxi9e
h1K+dWI3PrPATyw5wdxIGGkn8p29RlnAKM8KynVfixFXzhSpTLMg6cH9Oyvc
1mBRsc/0v38sWPNlOU5rCuH/4/68yg==
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwt13c8Vf8bAHBEJZSQkE12uLZrfJ6QjKzIDJXKSJmJSEhGpIyQyigjysgq
hMjIuDdfKZUUQkNlj0r8PoffX/f1fp3n8zyf8zyfc173CB3zOniCjoaGppeW
hob4Fb72714mf5P2EEtpO01wJHq8WVLgtFsWurHfRGdbfhxqCizJlXArRVN8
H5/etE9EbfI+rhvdGhGjE8vhCkhHL+J7DeZdX6J7+xtCtR7fRVORzF8Ci/5D
P8vOnN9ikosuPC+VXMx+hS5smSwp+pCHUmGhZPZqPwq7YKzb8u0+6iBfqvnh
+gklKjikjNeXoAea7KHKpUMoImR0yJOtDE0PHM/yLxpGrU6uR6Wfl6FQns0j
M9mfEeuG1Z05vOUoLc3UdfLqF/RJWkHselkl6kwc8PnqOok+MgnrLR2vQTHp
qR3JpCkksj2G+8R0DZJxQ/aKpVMoQ0lCojS4FvluSgz2LZpGEk9mNf/G1qGV
fUoNU9mzyLdB+q5lQj3K2TFoep1/DvXnJbtd2dKA9MYuf5K7PYcMTyrKDEY2
oLjIfhqvtHnEHs74edavEXE9P6/78+oiEnGx+WyT+QzVJYn0xTMtocOPS2L3
v36GnI51H5eJXUJq2S58R5maUC4tf9SpyN/Ib2+JpcDZJkSCphffzv9FHlm+
2QKoGRnVbzIdd11FOzYLF3WUPkek1WPznFOrKGji40aHj89RvKAzVUSTBp49
ePlZnLkF+R+rPWvVQgMHGYyvhZ9oQXrj3i1VfbSQeNPJPXZbK1KL5ueictGB
UEyftqlaK5KR6D41fpgOrJZ2zpw80orYPcTZd47Rgd78peasklY08nPwaOD8
Boj70iIYrNuG3iTEVV1Xp4e+OB4zGdc21Cmnzlh4gR7SO+Xq9a+0oXKflLJ3
DAwgkFyc1ERtQ+HzRqtkzo3goCxmzG7RjgT/Pb79T2UzMOSGp3BpvUAcmSem
dgRvho3lDAN+ti/QZsSuJ9u4GXjFmhId/F6gybAzE077GaGztny6v+AFaqDf
TX5mswVUL+m61DB1oPK83qtvb22BHzpRSQ9FOlC+ftjw1KctsEusOYOs0YES
YgZihNyYIOEJI3WPewdyZE7qjwhkBnLT2/bMZx3IvBhJ33rKDLWyp31TX3cg
PdOfoRU0LCBM156q/L0DyVw3EBuNYYFQwycrXmydaJl91X/fza2gMbMg+c+p
E1FYVBjpHVnB5Ki+4L1vnajXmC2dGsIKpN9jB/OXOtHb2F9iN2+zgliThdOZ
TV1olKFAT/YDKwRPF7wzF+1Cy/92htk6bAeX82GM5xy6EJ3m3FaR4O3gGSOS
UePWhTaf77nzM2M73NVIpLaf7ULsCzF1Ee+3Q8jB3JNG17qQ1K/fCw/t2MB5
1n7XamMXkpd5c/lcEBucqnvnWNXVhVQ8yjl0brKB8Ndnflr9XUhn3EOh/y0b
FNc797T+7EJ2HwdO09qyw0wwnXEnVzeKodaPHrLmgK/DwhMqrt0ogTnDTzCA
A14+O/TQzrsbpRgF0E3c4IDKoSh726BulNUmKxj2mgOWz/I1TlzpRtUNWQ5F
VjvgTneP8/mH3ejpcvB3f/8dUM4WwhVf2Y2aybZBKGUHCOxkpgl92o2o1axp
fa92wPWgJA367m40VhLeu3KQE+6f3xtR8K0bff/heLTDlxMcYnf1tE91oykp
8lRyEieEJRsxdy92o+X8GRbJXk4QbjLgj2CgII4sF0NLi52QoohaSwUoSOfa
vmcFZlwgoRGs62ZGQWFGlYW9Z7jA/kTbiwErCmpgEEn+d5ULXtTxkMn2FEQO
oTlp2c0FCq5buWuOU5Ciex3TqgE3HGM5Y9EeSEG+olLzkm7cEP3L9FnGBQoq
+5T+0SqaG/Im0+IcIihIxjrgUVErNzAvFbjlx1GQqC7JxlqHB36Xuoa53aGg
YytZEH6UB97ip7Mkh4Kya7ZKPQzjgaHl5vrPeRTEK/9jmbaRB6je5i/4Siho
B1/B3WKNXTB3JMfwTT0FbVzk/UWvzAs5/v/9jX9PQXrlcf1yVrwwxNTqPj5I
QRGn/zyz9+MFdzHxIYVhClr53J9c9ogXRiL/q877QkGLPUnqh2X5YBvpWMHS
LAWpxNOKRJvwgaGf5fDkAgX57/dmLvfkA13RibsDvyloqt7k06YHfBBEuXMy
cZWCvhZtvlwhzg8sPDTJ57dQkdjJc2c+6vPDsVKOYh4WKjouNG7DeJIfQgsn
c8q2UdFQ2nMp51x+6NvW0NLAQUXvIkN7tggJwDcSz6orPxWdkPvDQmIRhNnN
3cHM8lR0YCA6j4tfELojjufvV6AipegdWjRygpBEO3shSImK6D/Je740F4QS
ec6WJjUqupvg2nk6RRBOWxbc+ApUdIU8f/RQniA4TdayD+pQkc94xG/NakE4
8pbk2KFHRaCdKcH8VhC+V5kPxxpQ0aeffVFFu4RAM2NLWIkZFbXdPMafJCME
lL0B/CcsqKhk31RVkJYQyJB3XeWwpKLQO0xjBs5CcNDL0szJmop4TXR0v9wV
AjtJkxvZh6nI7mHpqoiUMFhH6D1dcsX1bLXSmDSEoeG50CVDdyqSoO+SnTUW
hkvPaFpSPKhoyWHcsfm0MLja67PtOk1FqUx8T488EoabVZJnv/ngeo+LLA2a
hcHygkwGqx/ul4vahNwrYXj71HRCwR/3p86SZ3VOGGLP8ju6B1DRK48rgXfU
RODGVdGrWeepqJaTi/WyoQgUvjosdDcY96s5r8DTXgR2qWwNzA6hIl+epjca
ISLgJsz45HooFbF2Liq9bxSBomzmy3sjqMhE8sQ0535R2CHyeWw6hor+xJ2t
G7QWhYCtVw88iKWi+78uX849KQqrP+Y/HL2C51OZz60QJQqh/NlFbXG4vvbX
vSatorDAm6PunUBFbjlLTByvRWEvnYMUxzUq2kHP+Ob9qChIUTVuVmF7d0h6
uNHvhuLkSM7p6/h8WZ1KuqS7GyykKpOMk6morzr4sJHlbnC7KRb4ATucO15s
u8tu6BwZ3X0qhYo+fHxYmxmxG3RDbVbDb1BRsvuvkZqm3UDbeDMvNY2KaC76
KE4hMehYijt87Bae73D4v2ozMXAKJmW8wnbQS2q/4CwGR0nbeXVvU1E1Y4UD
00UxGKs9zMh3h4o8U+YuiTWIgcctB7P6TCriWaQ3/UkRg3d8895CWVTUbreD
q3JQDN5sqNwSiS0soPJw7z8xuEEWqNfLxue/8FzfYU1xGGbnqqvMoaIo5phM
kQPiEOxnqMFyF8/TK93tu4M49FdnHDmOfV2pZvlcsDjMSvA82nqPivQb/4gm
14rD6D12eqtcKirvu3C2Q00CVs0pUXn5eB6Xjx8bMZSAlmI3rynsTBVjs7/2
EqDnQsNDLsDPRzqX5J4LEjDy6XRXB7bL4YoP15sk4GpblOrAfSqyZ8noKOyV
AK/b31p5C6nIvCGsuvmzBIT/56TtiK0paHp9jkESuuoGVt5jc4x+1bU1kgRx
3SzVziIq2nLjpbyPgySUtnBc3/AA91u/mu+KpySkeVjOa2D/KLi0WJcgCYJR
0YuF2K2n+B8IvJKECR7fA8EPqShg1pLti4MU0F0y1Fooxv3OJa+uekrBNdV5
EeESKjp2SOgHV6gU+P0pNTfBNn38q9UoWwo0+qixOdjiwbFBJaNS8IFU1b23
lIr4ZbxPts9LQWzUYTU3bI5Ba8uhjdIwGveOJgGbBonuYZOUhmTfgfJ+7Ld0
jUNnT0vDKeWSUZcyKqJW5FESQqWB+0Z52GXsluPxtQXXpMFaPSMhH/tRm13K
u0fSYJMqsOUL9pUrc/u1FqSBq3u69ugjKtJgkyqlvygDUlc/4mHhfLT2HZRr
MuBZPcpmh31kOvZzarYM8Hmr/PLBjuz5tlOyWQYEjRR97hLxCYVhJgx7wNhu
oHeFiA99l8HJuQdsdCKXOSqoaOY0Y9UnsT2gK1veIYW908T9m4/BHihfKLA6
hH2ESfJgatweSMvZb5NPxP+x9XS+vQe+/3Fpr8GO/B4TJVG8B4bcp8e7sQs7
vtbWUveAgfFO9RkiPvq+yKftsiBne9FIvRLH00vMi6fLQl2QjmQtNueczbbp
+7LAyJHG14F9/3O0ZG2NLKg2fnzVj01p/uJ4YEAWhG5Mx84R8eEFbd78cpBv
R1GWrsLx3v1D6nJy4HXjmKUatsaRTX/pQA5mgxF5H/YR5Cp346gcsKeed3XC
Lvwnll6TKwc9n1PtErA1f1qXR1TJwehI//ub2NQPUd3GbXJwPttUJg97pm6c
5uMXOWCheaJTh82v9UopfIc8kCb9LcawXf8m3cmzlQepBZ9UUjUVpZj+eB50
RB5otx17p479LGffdxM3eQhZsl7ei81lsKSycE4eIg9uGbXAfpHi2KOfJg+L
1ZX63thzX6oXeLLkYcO3rzfOYQtqsPJN5mNzpr8IxQ4cbnZPq5aHjQHC7+Ox
JWUlNnx9LQ8KI/S1BdjW4eGSTwflYf6iLKkEO6Lvvdn1MXlY1jG8Von9/vzV
22rz8uCzzEzXhH2lfUY5loMEEyv03W+xJ47Uu0lZkoAlN1qN/jHebyXntRV7
EoyJXTFgxNbb5F3Ve4wEP/a91NuKfbtYmC7YlwSBYy4buLAP/Im+1ZVIApPL
MTlS2IEmw01ZN0lg1uLDK4edm03+6pdDgpIEnihF7GX9n0q8j0jQyxoipold
nHyQ6tlDgjMTQzkHsN+PP5iDtyR8PqfTzbE3khl27RgiAd+F+DArbKehx671
kySQNzEVPoy9dQ8f7dZtCjDDc6LaA9ur7YtiqYkCyP76bXkZ+xk8PCVjrQC3
Y90exWCz1nnfK3RSgPui1TTx2GWlv9lyvRRAyK3lbBL2TDrTTHqiAjhfiW7M
xNZh75HkzFCAkJgXj3Kwk6+mHE2+qwAG91LScrGVIvj+u1qhABe0crWLsANO
yZVFvFaAbR7BNFXYbWOzX1YHFcCrYjLlMfbOI08ELowrQJLKLf5a7CdWe6+d
W1SAxl4rtkbs31qWZzy5FYEm3vbiC+wQ1nMy1o6K8CQyNPEddvcVjeOvTijC
rNCfuAFsPgaa2+ZnFOHBHYHQQeyG3zFMxhcVIVlvg9EwNs3njO8oRxFO2ZlF
fsU2d3QWri9UhK8G+D8Ndk6/iD25XBEO0hTMTRD32/2wQ+m5IgRG7zOYxL5U
1XBfckwRXpBf357H7pO7NJT/UxG8io8JLWKLFu3nEl1QhB3ul7OWsFsye6L5
NynBWPCfmL/E/GJGTrJLKoGd5SN22if4/Nlv3P3PUwleR4oLMGFryzMvfPNX
AienHGVm7GkGtvY3IUowvPpyPwu27SM+97J4JWB/Gue8DXv3ZuVil4d4Pa22
Ezv220FyqHmlEgxuELDiwI6vADOtp0rgwKqsvwN7xunANGe3Esy6408I7GdV
LsqdE0pgsPlGPg+2f5z7xsezSlCo/+niLmzxo1799/4qwd//Ph7ixU5gDg66
wKQMEWlqS3zYDi5J9fLSypBqHL5TCHuBtWlfmocyzDDqdYhhF423cUb6Yodu
9RPHdnza/cX7vDJoZavySGC3uL6NNbqiDEc8qEcksRMbJin/CpWhvlSyRxpb
L2U+8/sjZRjnZjgpg73k/terv0YZ6pSv/ybstGMT26MOZSj2HOOWxZbx5Lc+
/k0Zfss8A3nsob2i4hbTymCnAa2Ek3dKLWn9VgYfsyf7Sdh/mpUzdjKqQJfB
Q30F7BfcJh87JVRA5NmJPUrYLu3BJ0luKnCyST5XFfu4ppjpgpcK+N47zaiG
ffJRj3LdORXwthU6Tdjt1m6GfdEq4Pdos7w69hmvl/ds81Ugu6Y6l4ztPRoU
x1eiAi5dZ1YI+9iJ+o1UqUDNNaq1BtF/3SAdz1YVCDiUtkET+/xOkeGLoyrQ
9L7bRAs7JJ7yQu+HCtyJ2nuH8AXawDLGORV4LhcxQThsovti8gZVMM8KitTG
jmoM4C8QVoWfS433EXaSa6cD9Ygq3KBUNOzFTvngr5vspgrVzlv/Eb5hISBt
660KGtuDyTrY6Rr+f4YvqsK/3tRywpnb+G/OZ6qCymvpdF3s7MgXYbX5qnDg
5KmXhHN++7pdLFGFjztfM+hh535uV2VsUAWGQQVvwkWPfd7wDqoCafaUxj7s
hzK8DcOjqkAXb+5JuDinLS//hyq46p+7TbgsbtdZ+WVVuCiY9odwtXMru94u
NVg84Feij920idvilJ0anLekLuzHHr8na/TuqBrciTEXNMBmBj3d/R5q0LpV
xJCwbaCXskiwGrj/akknPPm1lXvgthr84jWTN8TmuDzAZpinBqLL+VaEyULT
TI+L1WDix8lAwlF2vCtJDWrg/1mqgTBfp++I0ZAanNDn1DXC1jkZM/Dkqxpw
9tG6EHajy+wTm1aDMcXTEYQryR1tdHTqcMqzuZGw8QOBB7Ui6jB9z1nJGDso
vttPylUd0mfNNx0g+i0x4pnupQ723c8FCLe0LJ7YGKgOw196VAmz/hO2HYlR
h9jXzScJF5wO0swoUofT2/SeEe5mvKa8uUIdAiLaXxOeycuVDahThxGOxe+E
tT++FDzYrQ5SUS4cJtivTcUYtvxSh0Pn7roQ/vNdY+Xcgjo8rSgKICwYbbE4
tqIOWQ1HYwl7NoZ8a9pGhusXh4sJb5B/RQkikYHV88AsYdL2sNRv/mRQ+zTv
bYpdu7lfoj2EDBvrr4cS1qGRrcuNJMMK32IcYavJgU/OKWRgLJbKJxxAUZV8
U0GGvrdGbwmvtiTUVdSRQaPQeZRwzNMxk8TnOF+kwRThmw+SfQ+8IsPLppub
zLCfxk7WNc+Q4cMyrxLhfeH6ptl/yJAgRtUmTA28M3SBTgN8NloZEv7kasyg
zqYBjPlDjoTp9AtMS0kaIJHIepmwAZ3z8C1vDQgLOd5N+L/fVX5BgRrgpVLR
R9h+mnmjTZgGRN4a/kD41FCtFNt1DTgsOvSDcEIDp39MKY53PMdkjt13nrrx
7C8NMODp0yXs6Lv75sEFDfhrG2hEeNw9RFp+RQNcWhgsCC/aSplPsGiCudAH
R8I8qlE3j+7RhLuzAQGEj8xqyZh6aoLgn+P3CLOw0fT0+WtCIRtTIeFa+WY/
hwua4GeXWkKY44x+nVuCJnT6HK4h/OKrqdGlMk2IpuRTCJ/dtP0XY40mcNsG
9BIWFnuVeL1JE36wSvcTDnGxeXenVxMOsegNEZb/6Oz2ZE4TptrNpgkPLgsx
o3+aIJbsNk/4yq7R0lYGLRhM9/1NeNTWbbGXUws6Le1pLYj3zSvvqJ9qWpAb
HchKmKYjPFf4ghY4fZmUJmy/ceMPuQQtMNlMViBcqXtFUStLC7TYDdUIuzUk
Nds0aQHflypdws1/Obec6NUCljJ2Q8K86rcsfD9rwcoxFVPCPRX3huIZtGE4
qtOGsNS0uEQGpzbsm9p3mHCk7EOvAnFtsPbNPUJYrbBypclQG/zCmd0J52S2
8i5e1YaUrphAwgmpRzb6lmpD8JeQi4TPJ/yd/NGjDZf7N0QRPhmV+s51Rhsq
bvHFEz4YSno+wo6AQakzkbB2QPdDR2UE9N5b0ghLn3FNfWuNYNvOlVuE6Z3u
uFNvInDqkc8j/MHklWbLBwRmz32LCb/PpN88uA1gbPJ5JeG21KxpGxLA7Hax
OsIVCeSB3oMArT6vnxGWmXsvyewLEHnxdivhXLvgwH2JAD//DXes9atxV3to
GQDdzzwK4RTRpzuevASwfDDVs9afyeVyqa17QQSlvCHsX6tlfufAXjjlRDdA
OKPZJ4e9by90fM4cJtzYmTcT66ADTsPXxwhzxE72/36nAwalPV8Iu+9Xr3e3
1YX90arfCNMFKtd4DOsCL+z+Tvj2fVLVKQ89GG5+smZO6rldv6b0wK8TTRBO
nK0P9z63D5RON6xZ8yV3yI+5fSCpxP+D8HjR2QA3X33g9rFf8+ulS9Fn/+gD
TavLmlv0k9IjIvaDh5fomkeMqrViaQ1gZ9L0Wj5as/cj18IMIOjV2JppDAxm
dv4zgNRrU+veW02bHWQI4gO0a+v1Hr4Rr6ExgjjpLWuO2blo0httBMthc2vx
y2p7No8xGIOYSeeave1dmhcvGcOpx4/WLPHLOPkW8wHQjclf83C40nF04wBs
q8td8/ktrlnHd5lAqHfemjmSb76PzTGBGZa7ax78b7jwPr8pPO5OW3M+q1RQ
+y1TuBJ5bc2VTaLO50TMIG0qds1NvgL7xB+YgSQpes2rP9Kcv3KYg1ts1Joz
BbN5tazMgZ1//XqJKSXhYJI5WJvHrLk+5A+NW485WCau55v8HLbSym4BhTZX
1ixkvGlZxMYCil+uX/e4mv585YYFkLatr698KRn3rs8CguvW6wkac3xc5joI
me8vrzm+bUVe0PEgKHivm5VvzuTZ7YMw5rDuZL9vHkc+HIT7QeuOadmg1cRj
Cfkl6w7Zwb9N2M4S3o6sOykr0bPrtiV4rKy7UJKh03/IEu4PrvttwqXpDAEr
mEpc98Y5Wu4mJyvIO7xu66R3XXL3rECHvO4C+UehmV+sYEVq3W4dxeMUqUPg
J7luyWNFpv9OHwIJ+XXTvXkUVvjwELiqr3vAsKb80MQhsNu77jcL3N5GctZQ
p7vu3nvn9yA/a8j5f70x6fHKsnJrOPH/fEsVFprCM9ZQIP3/+1UZCbSStwHe
/+9n9YlvVdQZG/D5/37y/A9foC23ARnxdRvL6+8LmbeBYZF1M7aT+/2UbMFL
eN3tjnLup/xsYUpo3eRN5mVVNbbw5P8uKfNeXF21Bbr/+38AEeNm
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], 
   GeometricTransformationBox[GraphicsGroupBox[{
      {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
      {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
       GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
          GraphicsBox[{{{InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0.5, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"E(t)\"\>", 
               NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[0, 0, 1], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"S(t)\"\>", 
               NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
               Automatic, {1, 0}]}}, {}},
           AspectRatio->1.5,
           FormatType->TraditionalForm,
           PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {
          Left, Bottom}, {0.2, 0.3}]}]}}], {{
    0.31246912880656175`, -0.11294064896622724`}}], InsetBox[
    StyleBox[Cell["\[Beta] = 0 && \[CurlyEpsilon] \[NotEqual] 0",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     Magnification->1.4999996423721313`,
     Background->GrayLevel[
      1.]], {0.13788670598434716`, 0.14744795389840548`}, {
    Left, Top}, {0.3727041415885499, 0.06399970108086207}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.752225}, {0.666667, 51.360434}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.5680628334712443`*^9, 3.5680628356643696`*^9}, {
  3.569078698829727*^9, 3.569078739652062*^9}}],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.5680627982762313`*^9, 3.568062828262946*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"-", "\[Beta]"}], " ", "*", " ", 
    RowBox[{"s", "[", "t", "]"}], "*", " ", 
    FractionBox[
     RowBox[{"i", "[", "t", "]"}], "n"]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"eq2", "=", 
   RowBox[{
    RowBox[{"\[Beta]", "*", 
     RowBox[{"s", "[", "t", "]"}], "*", 
     FractionBox[
      RowBox[{"i", "[", "t", "]"}], "n"]}], "-", 
    RowBox[{"\[Epsilon]", "*", 
     RowBox[{"e", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"\[Epsilon]", "*", 
    RowBox[{"e", "[", "t", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Epsilon]", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", "=", 
   RowBox[{"N", "[", 
    FractionBox["\[Beta]", "\[Epsilon]"], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.85"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ezero", "=", "0.15"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"izero", "=", "0.0"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"e", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"e", "[", "0", "]"}], "\[Equal]", "ezero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "e", ",", "i"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"a", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<S\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Blue"}]}]}], "]"}]}], "      ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot1a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"a", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Blue"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], " ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot2", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"b", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"E", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Orange"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], " ", ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{"plot3", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"c", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShowLegend", "[", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot1a", " ", ",", "plot2a", ",", "plot3a"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Blue", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<S(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<E(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}]}], "}"}], ",", 
      RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
      RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
      RowBox[{"LegendSize", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "}"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plotall", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "tf"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.05"}], ",", "1.1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLegend", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<S(t)\>\"", ",", "\"\<E(t)\>\"", ",", "\"\<I(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Orange"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
     RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
     RowBox[{"LegendPosition", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0"}], "}"}]}], ",", 
     RowBox[{"LegendSize", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0.3"}], "}"}]}], ",", 
     RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
     RowBox[{"GridLinesStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Gray", ",", "Dotted"}], "]"}]}], ",", 
     RowBox[{"Frame", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"True", ",", "True", ",", "True", ",", "True"}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"\"\<Density \>\"", ",", "\"\<\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"\"\<time \>\"", "[", "t", "]"}], ",", "\"\<\>\""}], 
         "}"}]}], "}"}]}]}], "]"}]}], "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"plotP", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"Evaluate", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x1", "[", "t", "]"}], ",", 
            RowBox[{"x2", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"S", "[", "t", "]"}], ",", 
           RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
      "\[IndentingNewLine]", "plotQ"}], "=", 
     RowBox[{
      RowBox[{
       RowBox[{"ParametricPlot", "[", 
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"x2", "[", "t", "]"}], ",", 
             RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
         ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"\"\<E\>\"", "[", "t", "]"}], ",", 
            RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], "\n", 
       "plotR"}], "=", 
      RowBox[{
       RowBox[{
        RowBox[{"ParametricPlot", "[", 
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"x1", "[", "t", "]"}], ",", 
              RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
          RowBox[{"AxesLabel", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"S", "[", "t", "]"}], ",", 
             RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
        "\[IndentingNewLine]", 
        RowBox[{"h1", "[", "t_", "]"}]}], ":=", 
       RowBox[{
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x1", "[", "t", "]"}], "/.", "sol"}], "]"}], "\n", 
         RowBox[{"h2", "[", "t_", "]"}]}], ":=", 
        RowBox[{
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"x2", "[", "t", "]"}], "/.", "sol"}], "]"}], 
          "\[IndentingNewLine]", 
          RowBox[{"h3", "[", "t_", "]"}]}], ":=", 
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x3", "[", "t", "]"}], "/.", "sol"}], "]"}]}]}]}]}]}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.5638355904558997`*^9, 3.563835704468421*^9}, {
   3.563835950077469*^9, 3.56383606512805*^9}, {3.56383613822723*^9, 
   3.563836367357336*^9}, {3.563836441114555*^9, 3.563836444201731*^9}, {
   3.563836535058928*^9, 3.563836589524043*^9}, {3.5638366644783306`*^9, 
   3.563836665858409*^9}, 3.563836695909128*^9, {3.563836848841875*^9, 
   3.5638368525680885`*^9}, {3.5638372255084195`*^9, 3.563837265661716*^9}, {
   3.5638383151507435`*^9, 3.5638383180759106`*^9}, 3.563838362903475*^9, {
   3.5638384377487555`*^9, 3.563838575206618*^9}, {3.5638386112096767`*^9, 
   3.563838657701336*^9}, 3.5638386889021206`*^9, {3.5638388049467583`*^9, 
   3.5638388069938755`*^9}, {3.5638388495773106`*^9, 
   3.5638389667440124`*^9}, {3.563839052506918*^9, 3.563839071571008*^9}, {
   3.563839147339342*^9, 3.563839232596218*^9}, {3.563839314060878*^9, 
   3.56383942477421*^9}, {3.5638394696337757`*^9, 3.563839480051372*^9}, {
   3.5638395362795877`*^9, 3.5638395453271055`*^9}, {3.5638395986821575`*^9, 
   3.5638396665290375`*^9}, {3.563839704558213*^9, 3.5638397404972687`*^9}, {
   3.5638398239280405`*^9, 3.5638399312031765`*^9}, {3.563840014577945*^9, 
   3.5638400676949835`*^9}, {3.5638401105414343`*^9, 
   3.5638401221330967`*^9}, {3.5638401613373394`*^9, 3.563840168990777*^9}, {
   3.5638402066729326`*^9, 3.5638402331264453`*^9}, {3.563840302771429*^9, 
   3.563840436440074*^9}, {3.563840514500539*^9, 3.563840531504512*^9}, {
   3.5638405784992*^9, 3.5638405821144066`*^9}, {3.563840618338478*^9, 
   3.5638406387506456`*^9}, {3.5638407249235744`*^9, 
   3.5638408190029554`*^9}, {3.563840856229085*^9, 3.5638408646885686`*^9}, {
   3.5638410103198986`*^9, 3.5638410835630875`*^9}, {3.563904889849905*^9, 
   3.5639048947221837`*^9}, 3.563905146271571*^9, {3.563905177983385*^9, 
   3.56390518226363*^9}, {3.56390525411874*^9, 3.563905299470334*^9}, {
   3.563905472683241*^9, 3.563905489465201*^9}, {3.563905647569244*^9, 
   3.5639056597809424`*^9}, 3.563905703646451*^9, {3.563905742419669*^9, 
   3.5639057793877835`*^9}, {3.563905869972965*^9, 3.563905882011653*^9}, {
   3.563905928065287*^9, 3.5639059436801805`*^9}, {3.563906210805459*^9, 
   3.563906215908751*^9}, {3.563906296232345*^9, 3.5639063025807085`*^9}, {
   3.563906365490307*^9, 3.5639063658563275`*^9}, {3.563906424897704*^9, 
   3.563906433242182*^9}, {3.563906471104347*^9, 3.5639064759836264`*^9}, {
   3.5639065288356495`*^9, 3.563906529453685*^9}, {3.5639068329810457`*^9, 
   3.5639068636147976`*^9}, {3.563906895527623*^9, 3.563906897037709*^9}, {
   3.563907110560922*^9, 3.5639071121890154`*^9}, {3.563907274969326*^9, 
   3.56390743274035*^9}, {3.5639074760618277`*^9, 3.5639074793070135`*^9}, {
   3.5639075838239913`*^9, 3.5639075917484446`*^9}, {3.5639076912791376`*^9, 
   3.563907827329919*^9}, {3.56390786003179*^9, 3.56390792333441*^9}, {
   3.563908035557829*^9, 3.5639080787833014`*^9}, 3.5639084082481456`*^9, {
   3.563908463246291*^9, 3.563908492127943*^9}, 3.563908626086605*^9, {
   3.563908825166992*^9, 3.5639088270190983`*^9}, {3.563909238651642*^9, 
   3.563909240037721*^9}, {3.563909322232423*^9, 3.5639093344691224`*^9}, {
   3.563909382587875*^9, 3.563909606090658*^9}, {3.5639097046552963`*^9, 
   3.563909707405453*^9}, {3.5639097449105988`*^9, 3.563909747819765*^9}, {
   3.5639097912782507`*^9, 3.5639098366698465`*^9}, {3.5639098902499113`*^9, 
   3.563909890652934*^9}, {3.563909925842947*^9, 3.563909927602048*^9}, {
   3.5639099589818425`*^9, 3.563909959344863*^9}, {3.5639099995731645`*^9, 
   3.563910046916872*^9}, {3.563910148071658*^9, 3.5639101691978664`*^9}, 
   3.5639102340005727`*^9, {3.5639102721207533`*^9, 3.563910351650302*^9}, {
   3.563910421532299*^9, 3.563910510495387*^9}, {3.5639105664275866`*^9, 
   3.5639105760811386`*^9}, {3.5639106580418262`*^9, 
   3.5639106824562225`*^9}, {3.5639107247046394`*^9, 3.563910728398851*^9}, {
   3.563910840744276*^9, 3.563910862496521*^9}, {3.563910926792198*^9, 
   3.5639109604401226`*^9}, {3.563911036075449*^9, 3.563911037511531*^9}, {
   3.563911431340057*^9, 3.563911437320399*^9}, {3.5639114789257784`*^9, 
   3.563911493954638*^9}, {3.563911525254428*^9, 3.5639115374281244`*^9}, {
   3.5639115750762777`*^9, 3.5639115880030174`*^9}, 3.5639116582250338`*^9, {
   3.5639116984503345`*^9, 3.56391176008786*^9}, {3.5639119457344785`*^9, 
   3.563911983828657*^9}, {3.5639125210403843`*^9, 3.5639125490409856`*^9}, {
   3.5639125979987855`*^9, 3.5639126611083956`*^9}, {3.5639128670021715`*^9, 
   3.563912872138466*^9}, {3.5639130702837987`*^9, 3.5639131278820934`*^9}, {
   3.5639132526262283`*^9, 3.563913434192613*^9}, {3.5639134979902625`*^9, 
   3.5639135222086477`*^9}, {3.563913559982808*^9, 3.563913587937407*^9}, {
   3.563913643129564*^9, 3.5639136454726977`*^9}, {3.563913893811902*^9, 
   3.5639139485590334`*^9}, {3.5639139840870657`*^9, 3.563914064888687*^9}, {
   3.5639141429901543`*^9, 3.5639142000144157`*^9}, {3.563914269810408*^9, 
   3.5639142840542226`*^9}, {3.5639143487949257`*^9, 3.563914404738125*^9}, 
   3.563914455294017*^9, {3.56391451899066*^9, 3.5639146165662413`*^9}, {
   3.5639146469249773`*^9, 3.56391465099021*^9}, {3.563914684638135*^9, 
   3.5639146860572157`*^9}, {3.56391471638395*^9, 3.5639148044359865`*^9}, {
   3.5639148449423037`*^9, 3.5639148622662945`*^9}, {3.5639150099297404`*^9, 
   3.563915010347764*^9}, {3.5639151494727216`*^9, 3.5639152487053976`*^9}, {
   3.563915326603853*^9, 3.563915346531993*^9}, {3.5639157813918657`*^9, 
   3.563915788211255*^9}, {3.5639160749616566`*^9, 3.563916084421198*^9}, {
   3.563916863145738*^9, 3.563916867956013*^9}, {3.563916974604113*^9, 
   3.563916998251466*^9}, {3.5639170471642637`*^9, 3.5639170731837516`*^9}, {
   3.563917169124239*^9, 3.5639171692732477`*^9}, {3.563917225221448*^9, 
   3.563917281815685*^9}, {3.5639173866606817`*^9, 3.56391743454642*^9}, 
   3.5639174785899396`*^9, {3.563917530621916*^9, 3.563917555013311*^9}, {
   3.563917726810137*^9, 3.5639177280732093`*^9}, {3.563917953474101*^9, 
   3.5639180072371764`*^9}, {3.563918038582969*^9, 3.5639180432792377`*^9}, {
   3.563918079533312*^9, 3.5639182234085407`*^9}, {3.563918264612898*^9, 
   3.563918265321938*^9}, {3.563918306125272*^9, 3.5639183204030886`*^9}, {
   3.5639183512768545`*^9, 3.563918397598504*^9}, {3.5639186015911713`*^9, 
   3.5639186261025734`*^9}, {3.5639188701865344`*^9, 3.563918974285488*^9}, {
   3.564081080539436*^9, 3.5640811343645144`*^9}, {3.564880574348827*^9, 
   3.5648805849744344`*^9}, {3.5648807151418796`*^9, 3.564880717960041*^9}, {
   3.5648808318375545`*^9, 3.564880834966733*^9}, {3.564880887672748*^9, 
   3.5648809435619445`*^9}, {3.564881002612322*^9, 3.5648810078276205`*^9}, {
   3.564881058793535*^9, 3.5648810605646367`*^9}, {3.564882586727928*^9, 
   3.56488258833002*^9}, {3.5648826193637953`*^9, 3.564882626198186*^9}, 
   3.5648828797036858`*^9, {3.5668460139647665`*^9, 3.566846039283215*^9}, {
   3.5679698042792788`*^9, 3.567970064740176*^9}, {3.56797010256534*^9, 
   3.5679701033263836`*^9}, {3.568061384082344*^9, 3.568061403272442*^9}, {
   3.5680626130556374`*^9, 3.56806263129568*^9}, {3.5680626662546797`*^9, 
   3.5680627659563828`*^9}, {3.568062819720458*^9, 3.56806282150056*^9}, {
   3.568063768292713*^9, 3.568063780749426*^9}, {3.5680639389074717`*^9, 
   3.5680639410275927`*^9}}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Power", "::", "infy"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Infinite expression \[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak] \
encountered. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.568063944880813*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2xmDw2t5rL7vfs/T/9jD+WV4zTpZY
AQcY36nf9cByfwk4P1X/F68hrwKc76uZ+lHMXQXO33SltvSkhQacby2ktZ6l
XgfOT/89ae7SCAM4P//Yc+P1vkZwflcUm+rfHBM4P/l4dZphhhmcf5BdMjA7
0gLONxRsmPayxArOT/hsq+OXYwPnL5x3VOZ7rx2cv7nP6valIAc4v2SXbcBc
H0c4f/+ppZ86o53g/Ex3y72ZEc5w/pwVhluzs1zg/Imf9zYWlLvC+c9WlZZl
FLnB+UfcJs1oanKH8xn9bz3qb/CA8xkctzEuqPSE8zvEv/teaveC8wuikg99
b/aG8x82mqTYT/WB80Umz7zVudAXzl8moFV5fLYfIryK5F3VV/vD+fMUFsjY
hgTA+XtrfjFkXEDwFb3Z/yiHB8L5W85rdt+8guD3HPtnoBAbBOdPLn6ZlXAH
wa8RleNXigyG81dqsp4qeYDgs31hlDwYFwLnLzfYWDfvOYKvmbTK729uKJx/
23PnptDXCP6lxVW69sVhcP6PzYE2Sp8Q/P87ira25YXD+d4Gbq41XxH847H6
mdnFEXD+ug0F3///R/BPTbxd+CL9PTw/WLEHbNi6EyG/5Mb7W916SnB+zOxN
O7r1EOk3zett80VXazh/x5/Jy7v1EOnJNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwCU82uv
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.568063944898814*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2xmBw2N5rL7vfs/T/9jD+WV4zTpZY
AQcY36nf9cByfwk4P1X/F68hrwKc76uZ+lHMXQXO33SltvSkhQacby2ktZ6l
XgfOT/89ae7SCAM4P//Yc+P1vkZwflcUm+rfHBM4P/l4dZphhhmcf5BdMjA7
0gLONxRsmPayxArOT/hsq+OXYwPnL5x3VOZ7rx2cv7nP6valIAc4v2SXbcBc
H0c4f/+ppZ86o53g/Ex3y72ZEc5w/pwVhluzs1zg/Imf9zYWlLvC+c9WlZZl
FLnB+UfcJs1oanKH8xn9bz3qb/CA8xkctzEuqPSE8zvEv/teaveC8wuikg99
b/aG8x82mqTYT/WB80Umz7zVudAXzl8moFV5fLYfIryK5F3VV/vD+fMUFsjY
hgTA+XtrfjFkXEDwFb3Z/yiHB8L5W85rdt+8guD3HPtnoBAbBOdPLn6ZlXAH
wa8RleNXigyG81dqsp4qeYDgs31hlDwYFwLnLzfYWDfvOYKvmbTK729uKJx/
23PnptDXCP6lxVW69sVhcP6PzYE2Sp8Q/P87ira25YXD+d4Gbq41XxH847H6
mdnFEXD+ug0F3///R/BPTbxd+CL9PTw/WLEHbNi6EyG/5Mb7W916SnB+zOxN
O7r1EOk3zett80VXazh/x5/Jy7v1EOnJNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwAJBWH/
   "], {{{}, {}, 
     {RGBColor[1, 0, 0], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"E\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.5680639449198155`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxF1Hkw1GEYB/BVstW0E11ojGNT2UZrt4y0brWILLYVKo3I7k8IaxW1STSi
XQnTNXLlKia0pdBsWuOILpY/ajUTzeToUqjNsVQzeZ535p13PvN93+ev53nN
QmO44YtIJFLA3/3vpGZrSguNFY6k/8tTTuYMCeadFvySYrNMO1jXecGu2eyn
lT4G4HCraQqTYgr2poX/WOduDpb1nUnotLUA263aUqt91hIsmMktKA9kgGPa
h7fXem8DXzygs1ETZQ0O6zjNZxI2YAXZ0C8yyBbM1Eu5OipigUMmHCw5Ufbg
ksI2I3WWI/j+JVa/kusMFjU5+BbsdQE3d5WPZx50BUe475RHBO4C37zNrI88
thucMyE/F3uSDR6qSjhBCN3ArW6511NT3cFaPqoP2SkeYJLLQ63ipD3gDH21
t/KCJzj2QFiLOs0LPHjO+qjTlb3gNXk3VJkl3uAK3S1JHfkcsEJowt5c7QMu
NC02cuD5guXiaRLRjTbzIs9uCPADP3hNk7ztQ0vb5ximwVxwXvzosZB3aPFa
45XUoH3gO7QlXaIBtM6klqHiMA9cybiXXDiMpoVWcTTR/uD+PY0y/89oZemp
rU7x+8G/7/vZU8fR8w3C+vTjAWAvhhtb/BPdEWwVERkfCK6pi1XPz6O7cvrj
RgRjMA8ssm9dfSPmnay0xi+C95CnyJqll69iPnlwoFf1Dv1MqvT4KXgN980z
1NOa85hfYxq4ejxH+6XfDo/+hm5nxAl0iGZ4/0u4WmYtxpwwsp5KbkFT41qN
yj6iU/KlNTZqtCKxpsyCqIV6h4kSSvdJzHv0Wnjrn6AlfG6i0yB65PL65cpx
tH7FHDd/Bv1oKc0kmiiC+qvCiMcFCZinr8hcNPIY7XzEcBPlPfqmZPBR0Xf0
i+I2UsQUOrR6R/lLDbrszZhKQqeCD+XLGiR0/E/4nl/Teth24IbZvEoJ3RXs
wGNm0ZtwXluqXwl72Dhv7oujAkU9OD/8u9pFEjr2u0VQr16wCPv3k/at8/Qm
7Mc/CJY5UQ==
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], 
      LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 10, 
       11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82, 24, 25,
        26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 37, 38, 39, 
       40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66, 61, 57, 54, 52,
        73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 76, 70, 77, 50}]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.5680639449258156`*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2xmDw2t5rL7vfs/T/9jD+WV4zTpZY
AQcY36nf9cByfwk4P1X/F68hrwKc76uZ+lHMXQXO33SltvSkhQacby2ktZ6l
XgfOT/89ae7SCAM4P//Yc+P1vkZwflcUm+rfHBM4P/l4dZphhhmcf5BdMjA7
0gLONxRsmPayxArOT/hsq+OXYwPnL5x3VOZ7rx2cv7nP6valIAc4v2SXbcBc
H0c4f/+ppZ86o53g/Ex3y72ZEc5w/pwVhluzs1zg/Imf9zYWlLvC+c9WlZZl
FLnB+UfcJs1oanKH8xn9bz3qb/CA8xkctzEuqPSE8zvEv/teaveC8wuikg99
b/aG8x82mqTYT/WB80Umz7zVudAXzl8moFV5fLYfIryK5F3VV/vD+fMUFsjY
hgTA+XtrfjFkXEDwFb3Z/yiHB8L5W85rdt+8guD3HPtnoBAbBOdPLn6ZlXAH
wa8RleNXigyG81dqsp4qeYDgs31hlDwYFwLnLzfYWDfvOYKvmbTK729uKJx/
23PnptDXCP6lxVW69sVhcP6PzYE2Sp8Q/P87ira25YXD+d4Gbq41XxH847H6
mdnFEXD+ug0F3///R/BPTbxd+CL9PTw/WLEHbNi6EyG/5Mb7W916SnB+zOxN
O7r1EOk3zett80VXazh/x5/Jy7v1EOnJNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwCU82uv
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2xmBw2N5rL7vfs/T/9jD+WV4zTpZY
AQcY36nf9cByfwk4P1X/F68hrwKc76uZ+lHMXQXO33SltvSkhQacby2ktZ6l
XgfOT/89ae7SCAM4P//Yc+P1vkZwflcUm+rfHBM4P/l4dZphhhmcf5BdMjA7
0gLONxRsmPayxArOT/hsq+OXYwPnL5x3VOZ7rx2cv7nP6valIAc4v2SXbcBc
H0c4f/+ppZ86o53g/Ex3y72ZEc5w/pwVhluzs1zg/Imf9zYWlLvC+c9WlZZl
FLnB+UfcJs1oanKH8xn9bz3qb/CA8xkctzEuqPSE8zvEv/teaveC8wuikg99
b/aG8x82mqTYT/WB80Umz7zVudAXzl8moFV5fLYfIryK5F3VV/vD+fMUFsjY
hgTA+XtrfjFkXEDwFb3Z/yiHB8L5W85rdt+8guD3HPtnoBAbBOdPLn6ZlXAH
wa8RleNXigyG81dqsp4qeYDgs31hlDwYFwLnLzfYWDfvOYKvmbTK729uKJx/
23PnptDXCP6lxVW69sVhcP6PzYE2Sp8Q/P87ira25YXD+d4Gbq41XxH847H6
mdnFEXD+ug0F3///R/BPTbxd+CL9PTw/WLEHbNi6EyG/5Mb7W916SnB+zOxN
O7r1EOk3zett80VXazh/x5/Jy7v1EOnJNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwAJBWH/
       "], {{{}, {}, 
         {RGBColor[1, 0, 0], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxF1Hkw1GEYB/BVstW0E11ojGNT2UZrt4y0brWILLYVKo3I7k8IaxW1STSi
XQnTNXLlKia0pdBsWuOILpY/ajUTzeToUqjNsVQzeZ535p13PvN93+ev53nN
QmO44YtIJFLA3/3vpGZrSguNFY6k/8tTTuYMCeadFvySYrNMO1jXecGu2eyn
lT4G4HCraQqTYgr2poX/WOduDpb1nUnotLUA263aUqt91hIsmMktKA9kgGPa
h7fXem8DXzygs1ETZQ0O6zjNZxI2YAXZ0C8yyBbM1Eu5OipigUMmHCw5Ufbg
ksI2I3WWI/j+JVa/kusMFjU5+BbsdQE3d5WPZx50BUe475RHBO4C37zNrI88
thucMyE/F3uSDR6qSjhBCN3ArW6511NT3cFaPqoP2SkeYJLLQ63ipD3gDH21
t/KCJzj2QFiLOs0LPHjO+qjTlb3gNXk3VJkl3uAK3S1JHfkcsEJowt5c7QMu
NC02cuD5guXiaRLRjTbzIs9uCPADP3hNk7ztQ0vb5ximwVxwXvzosZB3aPFa
45XUoH3gO7QlXaIBtM6klqHiMA9cybiXXDiMpoVWcTTR/uD+PY0y/89oZemp
rU7x+8G/7/vZU8fR8w3C+vTjAWAvhhtb/BPdEWwVERkfCK6pi1XPz6O7cvrj
RgRjMA8ssm9dfSPmnay0xi+C95CnyJqll69iPnlwoFf1Dv1MqvT4KXgN980z
1NOa85hfYxq4ejxH+6XfDo/+hm5nxAl0iGZ4/0u4WmYtxpwwsp5KbkFT41qN
yj6iU/KlNTZqtCKxpsyCqIV6h4kSSvdJzHv0Wnjrn6AlfG6i0yB65PL65cpx
tH7FHDd/Bv1oKc0kmiiC+qvCiMcFCZinr8hcNPIY7XzEcBPlPfqmZPBR0Xf0
i+I2UsQUOrR6R/lLDbrszZhKQqeCD+XLGiR0/E/4nl/Teth24IbZvEoJ3RXs
wGNm0ZtwXluqXwl72Dhv7oujAkU9OD/8u9pFEjr2u0VQr16wCPv3k/at8/Qm
7Mc/CJY5UQ==
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], 
          LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 
           10, 11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82,
            24, 25, 26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 
           37, 38, 39, 40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66,
            61, 57, 54, 52, 73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 
           76, 70, 77, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.,
          
          PlotRange->{{-0.1, 3.1}, {-0.1, 
           3.1}}], {-1.2, -0.8180339887498949}, {
         Left, Bottom}, {0.5, 0.5}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{3.5680639455118494`*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2xmDw2v7UxNuFL9Lf28P4XnvZ/Z6l
/4fzz/KacbLECjjA+E79rgeW+0vA+an6v3gNeRXgfF/N1I9i7ipw/qYrtaUn
LTTgfGshrfUs9TpwfvrvSXOXRhjA+fnHnhuv9zWC87ui2FT/5pjA+cnHq9MM
M8zg/IPskoHZkRZwvqFgw7SXJVZwfsJnWx2/HBs4f+G8ozLfe+3g/M19Vrcv
BTnA+SW7bAPm+jjC+ftPLf3UGe0E52e6W+7NjHCG8+esMNyaneUC50/8vLex
oNwVzn+2qrQso8gNzj/iNmlGU5M7nM/of+tRf4MHnM/guI1xQaUnnN8h/t33
UrsXnF8QlXzoe7M3nP+w0STFfqoPnC8yeeatzoW+cP4yAa3K47P9EOFVJO+q
vtofzp+nsEDGNiQAzt9b84sh4wKCr+jN/kc5PBDO33Jes/vmFQS/59g/A4XY
IDh/cvHLrIQ7CH6NqBy/UmQwnL9Sk/VUyQMEn+0Lo+TBuBA4f7nBxrp5zxF8
zaRVfn9zQ+H82547N4W+RvAvLa7StS8Og/N/bA60UfqE4P/fUbS1LS8czvc2
cHOt+YrgH4/Vz8wujoDzrdgDNmzdieCv21Dw/f9/BB8AvQUw/Q==
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2xmBw2P7UxNuFL9Lf28P4XnvZ/Z6l
/4fzz/KacbLECjjA+E79rgeW+0vA+an6v3gNeRXgfF/N1I9i7ipw/qYrtaUn
LTTgfGshrfUs9TpwfvrvSXOXRhjA+fnHnhuv9zWC87ui2FT/5pjA+cnHq9MM
M8zg/IPskoHZkRZwvqFgw7SXJVZwfsJnWx2/HBs4f+G8ozLfe+3g/M19Vrcv
BTnA+SW7bAPm+jjC+ftPLf3UGe0E52e6W+7NjHCG8+esMNyaneUC50/8vLex
oNwVzn+2qrQso8gNzj/iNmlGU5M7nM/of+tRf4MHnM/guI1xQaUnnN8h/t33
UrsXnF8QlXzoe7M3nP+w0STFfqoPnC8yeeatzoW+cP4yAa3K47P9EOFVJO+q
vtofzp+nsEDGNiQAzt9b84sh4wKCr+jN/kc5PBDO33Jes/vmFQS/59g/A4XY
IDh/cvHLrIQ7CH6NqBy/UmQwnL9Sk/VUyQMEn+0Lo+TBuBA4f7nBxrp5zxF8
zaRVfn9zQ+H82547N4W+RvAvLa7StS8Og/N/bA60UfqE4P/fUbS1LS8czvc2
cHOt+YrgH4/Vz8wujoDzrdgDNmzdieCv21Dw/f9/BB8AuQIo3Q==
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJxNz30s1HEcB/Afk6vWLfTgYTcPl8qZ5q5u0oVDnec77iJPY6Jzv/MQDqEu
eWhKrjwt1XCYx9jQSZJdOvMQZXT5J2xoy8NqPXjoQueqLZ9v7+29915/vi0i
E3h8bQzD2H/6d8mF6lqpqcIJ+5eunRSzeLyKuW1FemudFd4GHqQmCXTxXvAr
idJjTTAGHmbkdn8WzIBHiqeSFgVfwV5yAmdeoAGPEu126YTpOW/btZD1stHX
CMy33SDSiOZgNoX//aC7JVg2cS112N4KfNrAuk3nug1YsFlSWR9EBScMLpxo
Yx8H3w7RPayOo4Ojhq5G03A7sIJgzI0NtgfT9LPKllIY4IgVRxtOnAO4RjpA
Ut1xAnfcZUwpec7glOeOfpU+LuDekfrl/FBXsND9lFwYdAZc0UTrjI05Cy5e
kWcnprHA882pl3GRG7jfreRBTo47WMt38kNhlgcYc3mqVZ3hCb5lqGIrb3qB
E0Oi+lS53uC5bPpF5j0f8P7Sh5P5NWxwg551xlA5B6wQmbGOtviCpebVJEd/
P7BcvIHh48gW3oRfhwK54CdjlIL3E8iSwS2qeRgPXJq8FBMxjSw+YLqXHHwO
/IiyYyRlFll3VctYEe4PbqQ+zpQuIFMimznq+ADwlGe3LOATsrL2yjFm8nnw
zw6uA3kZWfNM1Jl3KRDsTXVjideQh8JshbHJQWCDKLynMhU5HK8hjqch/xDt
k9HFyJa3VBvqG8hZsl5JURkyg+DX3tmNnLcnX3uxB/mtfp+/yQtknERfz+xD
vk8zcvV4jbwaOvtuchrZ+YLxEeIMckE0L505h0xO6ifVfUTm5jXx478gVxTM
dVV9Q14sMtmtXP7vT7mk1U6F/KZ6ABOuIxs2bPHKN5EjW07Wj6qRW9sTVRoN
8m8O/xY3
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], 
   GeometricTransformationBox[GraphicsGroupBox[{
      {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
      {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
       GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
          GraphicsBox[{{{InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0.5, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"E(t)\"\>", 
               NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[0, 0, 1], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"S(t)\"\>", 
               NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
               Automatic, {1, 0}]}}, {}},
           AspectRatio->1.5,
           FormatType->TraditionalForm,
           PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {
          Left, Bottom}, {0.2, 0.3}]}]}}], {{
    0.31623381710543597`, -0.02258812979324576}}], InsetBox[
    StyleBox[Cell["\[Beta] \[NotEqual] 0 && \[CurlyEpsilon] = 0",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     Magnification->1.4999996423721313`,
     Background->GrayLevel[
      1.]], {0.13788670598434738`, 0.20391827838151766`}, {
    Left, Top}, {0.3727041415885497, 0.06399970108086207}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.752225}, {0.666667, 51.360434}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.5680639819269323`*^9, 3.5680639892183495`*^9}, {
  3.569079251971365*^9, 3.5690792863873334`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"-", "\[Beta]"}], " ", "*", " ", 
    RowBox[{"s", "[", "t", "]"}], "*", " ", 
    FractionBox[
     RowBox[{"i", "[", "t", "]"}], "n"]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"eq2", "=", 
   RowBox[{
    RowBox[{"\[Beta]", "*", 
     RowBox[{"s", "[", "t", "]"}], "*", 
     FractionBox[
      RowBox[{"i", "[", "t", "]"}], "n"]}], "-", 
    RowBox[{"\[Epsilon]", "*", 
     RowBox[{"e", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"\[Epsilon]", "*", 
    RowBox[{"e", "[", "t", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Epsilon]", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", "=", 
   RowBox[{"N", "[", 
    FractionBox["\[Beta]", "\[Epsilon]"], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.85"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ezero", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"izero", "=", "0.05"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"e", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"e", "[", "0", "]"}], "\[Equal]", "ezero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "e", ",", "i"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"a", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<S\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Blue"}]}]}], "]"}]}], "      ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot1a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"a", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Blue"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";", " ", 
   RowBox[{"(*", " ", 
    RowBox[{"For", " ", 
     RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"plot2", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", 
         RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"E", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Orange"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], " ", ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{"plot3", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"c", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShowLegend", "[", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot1a", " ", ",", "plot2a", ",", "plot3a"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Blue", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<S(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<E(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}]}], "}"}], ",", 
      RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
      RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
      RowBox[{"LegendSize", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "}"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plotall", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "tf"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.05"}], ",", "1.1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLegend", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<S(t)\>\"", ",", "\"\<E(t)\>\"", ",", "\"\<I(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Orange"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
     RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
     RowBox[{"LegendPosition", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0"}], "}"}]}], ",", 
     RowBox[{"LegendSize", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0.3"}], "}"}]}], ",", 
     RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
     RowBox[{"GridLinesStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Gray", ",", "Dotted"}], "]"}]}], ",", 
     RowBox[{"Frame", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"True", ",", "True", ",", "True", ",", "True"}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"\"\<Density \>\"", ",", "\"\<\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"\"\<time \>\"", "[", "t", "]"}], ",", "\"\<\>\""}], 
         "}"}]}], "}"}]}]}], "]"}]}], "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"plotP", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"Evaluate", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x1", "[", "t", "]"}], ",", 
            RowBox[{"x2", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"S", "[", "t", "]"}], ",", 
           RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
      "\[IndentingNewLine]", "plotQ"}], "=", 
     RowBox[{
      RowBox[{
       RowBox[{"ParametricPlot", "[", 
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"x2", "[", "t", "]"}], ",", 
             RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
         ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"\"\<E\>\"", "[", "t", "]"}], ",", 
            RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], "\n", 
       "plotR"}], "=", 
      RowBox[{
       RowBox[{
        RowBox[{"ParametricPlot", "[", 
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"x1", "[", "t", "]"}], ",", 
              RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
          RowBox[{"AxesLabel", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"S", "[", "t", "]"}], ",", 
             RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
        "\[IndentingNewLine]", 
        RowBox[{"h1", "[", "t_", "]"}]}], ":=", 
       RowBox[{
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x1", "[", "t", "]"}], "/.", "sol"}], "]"}], "\n", 
         RowBox[{"h2", "[", "t_", "]"}]}], ":=", 
        RowBox[{
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"x2", "[", "t", "]"}], "/.", "sol"}], "]"}], 
          "\[IndentingNewLine]", 
          RowBox[{"h3", "[", "t_", "]"}]}], ":=", 
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x3", "[", "t", "]"}], "/.", "sol"}], "]"}]}]}]}]}]}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.5638355904558997`*^9, 3.563835704468421*^9}, {
   3.563835950077469*^9, 3.56383606512805*^9}, {3.56383613822723*^9, 
   3.563836367357336*^9}, {3.563836441114555*^9, 3.563836444201731*^9}, {
   3.563836535058928*^9, 3.563836589524043*^9}, {3.5638366644783306`*^9, 
   3.563836665858409*^9}, 3.563836695909128*^9, {3.563836848841875*^9, 
   3.5638368525680885`*^9}, {3.5638372255084195`*^9, 3.563837265661716*^9}, {
   3.5638383151507435`*^9, 3.5638383180759106`*^9}, 3.563838362903475*^9, {
   3.5638384377487555`*^9, 3.563838575206618*^9}, {3.5638386112096767`*^9, 
   3.563838657701336*^9}, 3.5638386889021206`*^9, {3.5638388049467583`*^9, 
   3.5638388069938755`*^9}, {3.5638388495773106`*^9, 
   3.5638389667440124`*^9}, {3.563839052506918*^9, 3.563839071571008*^9}, {
   3.563839147339342*^9, 3.563839232596218*^9}, {3.563839314060878*^9, 
   3.56383942477421*^9}, {3.5638394696337757`*^9, 3.563839480051372*^9}, {
   3.5638395362795877`*^9, 3.5638395453271055`*^9}, {3.5638395986821575`*^9, 
   3.5638396665290375`*^9}, {3.563839704558213*^9, 3.5638397404972687`*^9}, {
   3.5638398239280405`*^9, 3.5638399312031765`*^9}, {3.563840014577945*^9, 
   3.5638400676949835`*^9}, {3.5638401105414343`*^9, 
   3.5638401221330967`*^9}, {3.5638401613373394`*^9, 3.563840168990777*^9}, {
   3.5638402066729326`*^9, 3.5638402331264453`*^9}, {3.563840302771429*^9, 
   3.563840436440074*^9}, {3.563840514500539*^9, 3.563840531504512*^9}, {
   3.5638405784992*^9, 3.5638405821144066`*^9}, {3.563840618338478*^9, 
   3.5638406387506456`*^9}, {3.5638407249235744`*^9, 
   3.5638408190029554`*^9}, {3.563840856229085*^9, 3.5638408646885686`*^9}, {
   3.5638410103198986`*^9, 3.5638410835630875`*^9}, {3.563904889849905*^9, 
   3.5639048947221837`*^9}, 3.563905146271571*^9, {3.563905177983385*^9, 
   3.56390518226363*^9}, {3.56390525411874*^9, 3.563905299470334*^9}, {
   3.563905472683241*^9, 3.563905489465201*^9}, {3.563905647569244*^9, 
   3.5639056597809424`*^9}, 3.563905703646451*^9, {3.563905742419669*^9, 
   3.5639057793877835`*^9}, {3.563905869972965*^9, 3.563905882011653*^9}, {
   3.563905928065287*^9, 3.5639059436801805`*^9}, {3.563906210805459*^9, 
   3.563906215908751*^9}, {3.563906296232345*^9, 3.5639063025807085`*^9}, {
   3.563906365490307*^9, 3.5639063658563275`*^9}, {3.563906424897704*^9, 
   3.563906433242182*^9}, {3.563906471104347*^9, 3.5639064759836264`*^9}, {
   3.5639065288356495`*^9, 3.563906529453685*^9}, {3.5639068329810457`*^9, 
   3.5639068636147976`*^9}, {3.563906895527623*^9, 3.563906897037709*^9}, {
   3.563907110560922*^9, 3.5639071121890154`*^9}, {3.563907274969326*^9, 
   3.56390743274035*^9}, {3.5639074760618277`*^9, 3.5639074793070135`*^9}, {
   3.5639075838239913`*^9, 3.5639075917484446`*^9}, {3.5639076912791376`*^9, 
   3.563907827329919*^9}, {3.56390786003179*^9, 3.56390792333441*^9}, {
   3.563908035557829*^9, 3.5639080787833014`*^9}, 3.5639084082481456`*^9, {
   3.563908463246291*^9, 3.563908492127943*^9}, 3.563908626086605*^9, {
   3.563908825166992*^9, 3.5639088270190983`*^9}, {3.563909238651642*^9, 
   3.563909240037721*^9}, {3.563909322232423*^9, 3.5639093344691224`*^9}, {
   3.563909382587875*^9, 3.563909606090658*^9}, {3.5639097046552963`*^9, 
   3.563909707405453*^9}, {3.5639097449105988`*^9, 3.563909747819765*^9}, {
   3.5639097912782507`*^9, 3.5639098366698465`*^9}, {3.5639098902499113`*^9, 
   3.563909890652934*^9}, {3.563909925842947*^9, 3.563909927602048*^9}, {
   3.5639099589818425`*^9, 3.563909959344863*^9}, {3.5639099995731645`*^9, 
   3.563910046916872*^9}, {3.563910148071658*^9, 3.5639101691978664`*^9}, 
   3.5639102340005727`*^9, {3.5639102721207533`*^9, 3.563910351650302*^9}, {
   3.563910421532299*^9, 3.563910510495387*^9}, {3.5639105664275866`*^9, 
   3.5639105760811386`*^9}, {3.5639106580418262`*^9, 
   3.5639106824562225`*^9}, {3.5639107247046394`*^9, 3.563910728398851*^9}, {
   3.563910840744276*^9, 3.563910862496521*^9}, {3.563910926792198*^9, 
   3.5639109604401226`*^9}, {3.563911036075449*^9, 3.563911037511531*^9}, {
   3.563911431340057*^9, 3.563911437320399*^9}, {3.5639114789257784`*^9, 
   3.563911493954638*^9}, {3.563911525254428*^9, 3.5639115374281244`*^9}, {
   3.5639115750762777`*^9, 3.5639115880030174`*^9}, 3.5639116582250338`*^9, {
   3.5639116984503345`*^9, 3.56391176008786*^9}, {3.5639119457344785`*^9, 
   3.563911983828657*^9}, {3.5639125210403843`*^9, 3.5639125490409856`*^9}, {
   3.5639125979987855`*^9, 3.5639126611083956`*^9}, {3.5639128670021715`*^9, 
   3.563912872138466*^9}, {3.5639130702837987`*^9, 3.5639131278820934`*^9}, {
   3.5639132526262283`*^9, 3.563913434192613*^9}, {3.5639134979902625`*^9, 
   3.5639135222086477`*^9}, {3.563913559982808*^9, 3.563913587937407*^9}, {
   3.563913643129564*^9, 3.5639136454726977`*^9}, {3.563913893811902*^9, 
   3.5639139485590334`*^9}, {3.5639139840870657`*^9, 3.563914064888687*^9}, {
   3.5639141429901543`*^9, 3.5639142000144157`*^9}, {3.563914269810408*^9, 
   3.5639142840542226`*^9}, {3.5639143487949257`*^9, 3.563914404738125*^9}, 
   3.563914455294017*^9, {3.56391451899066*^9, 3.5639146165662413`*^9}, {
   3.5639146469249773`*^9, 3.56391465099021*^9}, {3.563914684638135*^9, 
   3.5639146860572157`*^9}, {3.56391471638395*^9, 3.5639148044359865`*^9}, {
   3.5639148449423037`*^9, 3.5639148622662945`*^9}, {3.5639150099297404`*^9, 
   3.563915010347764*^9}, {3.5639151494727216`*^9, 3.5639152487053976`*^9}, {
   3.563915326603853*^9, 3.563915346531993*^9}, {3.5639157813918657`*^9, 
   3.563915788211255*^9}, {3.5639160749616566`*^9, 3.563916084421198*^9}, {
   3.563916863145738*^9, 3.563916867956013*^9}, {3.563916974604113*^9, 
   3.563916998251466*^9}, {3.5639170471642637`*^9, 3.5639170731837516`*^9}, {
   3.563917169124239*^9, 3.5639171692732477`*^9}, {3.563917225221448*^9, 
   3.563917281815685*^9}, {3.5639173866606817`*^9, 3.56391743454642*^9}, 
   3.5639174785899396`*^9, {3.563917530621916*^9, 3.563917555013311*^9}, {
   3.563917726810137*^9, 3.5639177280732093`*^9}, {3.563917953474101*^9, 
   3.5639180072371764`*^9}, {3.563918038582969*^9, 3.5639180432792377`*^9}, {
   3.563918079533312*^9, 3.5639182234085407`*^9}, {3.563918264612898*^9, 
   3.563918265321938*^9}, {3.563918306125272*^9, 3.5639183204030886`*^9}, {
   3.5639183512768545`*^9, 3.563918397598504*^9}, {3.5639186015911713`*^9, 
   3.5639186261025734`*^9}, {3.5639188701865344`*^9, 3.563918974285488*^9}, {
   3.564081080539436*^9, 3.5640811343645144`*^9}, {3.564880574348827*^9, 
   3.5648805849744344`*^9}, {3.5648807151418796`*^9, 3.564880717960041*^9}, {
   3.5648808318375545`*^9, 3.564880834966733*^9}, {3.564880887672748*^9, 
   3.5648809435619445`*^9}, {3.564881002612322*^9, 3.5648810078276205`*^9}, {
   3.564881058793535*^9, 3.5648810605646367`*^9}, {3.564882586727928*^9, 
   3.56488258833002*^9}, {3.5648826193637953`*^9, 3.564882626198186*^9}, 
   3.5648828797036858`*^9, {3.5668460139647665`*^9, 3.566846039283215*^9}, {
   3.5679698042792788`*^9, 3.567970064740176*^9}, {3.56797010256534*^9, 
   3.5679701033263836`*^9}, {3.568061384082344*^9, 3.568061403272442*^9}, {
   3.5680626130556374`*^9, 3.56806263129568*^9}, {3.5680626662546797`*^9, 
   3.5680627659563828`*^9}, {3.568062819720458*^9, 3.56806282150056*^9}, {
   3.568063768292713*^9, 3.568063780749426*^9}, {3.5680639389074717`*^9, 
   3.5680639410275927`*^9}, {3.5680641117453575`*^9, 3.568064114039489*^9}, {
   3.5680641715557785`*^9, 3.5680642000984106`*^9}, {3.5680642374305463`*^9, 
   3.568064247196105*^9}}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Power", "::", "infy"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Infinite expression \[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak] \
encountered. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.568064117487686*^9, {3.56806418382248*^9, 3.5680642012804785`*^9}, 
   3.56806425114233*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwVxX08kwkcAPBpQrEreptuJ2R5uVqbfCil3y8amfKyhkcdJ2rmpRcvvSh1
elfEM2nVkaE0LycvqWarmPOSStmaS1KiK4Xo9aSSu/vj+/lahG3lb5pAoVAC
//P/lhlj53PNVMt1pO9pixYNAO+GvvfLiHF4GOZCFzJfQyvNcZJu8FR0Ccq9
aE7vA9cMbp3Mh44PFmQbbBG8gE0Lv9A4NHPMT6PVMZTPYY3tpnczPazQxuBp
mdyiF6q0e7e3LLbBGAu/kvOqZ7DUxK5c97f5eObUOmFAw1OI+Jp5rpBgo5VU
h+XO64KtTX2LytfYY2tNHH/QphOOr9NjjsU44A+v9j7t1u+A8OY9Qo7IEXWZ
QJ236C9Q6Zv6RQctRq/T+cX+x7XAMU6WvE5wRuHN5onQo4HQDy7zvWOW4b6Y
BUtl8WrIz21kjJxYjkf5EkqKXhtcTnd+rOEjfgw5fBN3t0KCwsX33OoVuNJ0
9O4ZtztQe7vw/bH1rujCPs2i0Fog0mPJjUjCDSmUsctKZjPkFHGuREetxHY3
E20sNIL4w43923ZyceKyAuvOlD/hZcn2HaI4d3R6spxaMKUeGtwzzxw44IHx
fRUyhaQOdHw6ezOSV+Ekn6wgx8KbQFlxVScv0RO7uP2JjUHXIWXWyBrNUR7a
j7+Tmv6ggG3rwutHDnphV7zybfV0OfTsd9gIp1YjZ6jadSbjKkw/ebbzWP4a
NLA9/P1vQTVcnGqX2JztjcyCyrO/tlaBKm4O17rUB5XSiR0T3Csh1zyP4SLw
RXgUIu3tL4cbSV8oojZfjGLnFTSmlIGFl/63uYF+aL+eam09rxSq79umPtL6
YSQ96+F3ejGkNX1nmwfz0SnG4E6UkQxOxr+OCu3iY8vGIirfsxCSZphNsQxa
i8bTGn5OrzgPxbYTbyc8W4s2WX3Dt2YVgN5HHVNViAAVu3NPOcrzQMau3Jfb
J0C1kDOaX5ULtmEl3mOb/VHkK6uRLMmBx541Vf4D/ljIG0i0Mv0dNOd3L4D4
AMwK7TegjZ6Gz5f9llm+D0A9+RM3JlMC4/K4K0e2BKJkaKshY28WeLHduUmf
ApGaZZag1WZCc/DCyOh4AjcaLqkejhDDpYptI+PjBO4pzzLi9mbAbfHj2FcR
w3ChpFsx17ofnPV9K67UEBisPsiMLiKhxflgzWBENzgWvJN1lvZDclVtGikh
UEd3vp65vhg+rn/2oLOLQG26Ahu9SLiVpln1KeI+FGeOPeIM94NVysiXsUME
3kvf3OTmJIbTHLrrqjsEhlYopz5MJMHvSNGmzUMEMit8ljqYkdDEjo3QE9VC
+1rVnJ+MB+CfuGlVDkkEzqCOS1N8xCBiOIzuqyfQtv25YqqYBMvYBsaFFwQO
hvlfH3QgITk77ZLjCIFvQ8LTs/VJUO26dMFGVA68EGqDpeUAhIjyaW07CVx5
UtN9bb0Y1Mb1gtk3CezawW6vySEhVcjfBT0EuhZZfxUgCa/I2ZM17wl8cJ33
5rkJCbMufudnfyXQQraBc/VzBlwzsJ2zWSQFtV3Z2WK7ATAJFynPbSfQ5uX0
a5oNYjhidGzCKyWBmjrnHeICEnCD6TxaN4EOexQMI3cSclJ7rknfEpg3Mnlm
Kp2Eu3mNlMhRAs0M6wO+6JAQVupU2DpG4B14cXHPmwy40DHcmcqyxB+9nw7V
DvbCL9lV8lSWPZY4x2rbeJ0g5L05qOYuRTfHMPURTw3Iv52UpbJcscNB+5Ie
3QIuAs4JlsIdk2nmk53+UEF96b04NdcLw5R1VA+xHDyoMUSC2gcztZLrc6ZV
grBMV5rK4uPGyxy9mloZ2AQ9MA5OEKDUcOjs/eQ86NctOMRSBGDO7nKTxA8S
+BfNdn5i
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], 
      LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 10, 
       11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82, 24, 25,
        26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 37, 38, 39, 
       40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66, 61, 57, 54, 52,
        73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 76, 70, 77, 50}]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.568064117503687*^9, {3.5680641838494816`*^9, 3.5680642012984796`*^9}, 
   3.5680642511643314`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwVz3k41AkYB3BKdFBU27UdDMnIMY5UMr0vuWocmTR+anmqaQ6VchW1aYVE
kxUWG5lUjqI0KWVIYt27LUOnURnCYH6lVDpMdvaP93mf95/P9/sa7DnE5ExR
U1PzU83/m5KivCJcXrvRdIPwr+zzYthSreU1wJuEdbPz16lrNMAjHbsZGgG6
mG2rP7lg/SNwSnF5WOS9CPVDM6tGDTuAY/lNx0pHH+Nv3/JIZz0BTyrn/QI3
Izx8Xzd0Z9JzKHscfbhlnQmSSaZRpzZLYcNc05sav5mh5dow7pHpr4D3PS23
gKChJJPjvcmxBw41Dtrc9LTG6Bnm9FEfGZzZoblSecAWA8NWRR7Z0wvspl+5
Vnw77Ots3Nvp0Qe1Wot99vuvw4fZGakbDN6AlV5M5lCEPVqfju1r/PQGdo3R
zbwOOKCxqK057Xo/XBI2LB1P3ogU+s9cCnsAbv9uL+1gIl6d3WD3VGsQIirp
W3M9HHG+volNTMYg1LQWfEja6YSs7Ic7jA3lEOS2vjqI2IQcY97R8QtyuHDV
qnz/PmcMebL7fdKCIUgdqz4ZEumCe59Fd1vGD8FA8eEj/DBXXHgzsz+6dwjq
XdP+jI11w0SzY/fv4TCoe3f1psS4Y3y3TU5N6jCoOd5Vzzu6Ga8to94zlw5D
4sJxz47TW/CEMd/6itEIhOxg143HMXBo3Ku5jT0CspO2eyHDA4XNc4R9l0dg
fvr5rqRLnuhcm9HYIh2BQl3To005XqhvTQuv1FZAbdgKl1Ul3hhcxplVSFeA
UD9vKd13K7ZHhThU8BRQffybGr99KwawHbS7khVgwNCaMPTzQRHt89jUOwq4
00YVvHjsgy+NyKinjxVwtvEHTT+AiXmvy8UXPykgPXxo365uJi7sWe0q0SPh
+E/L51D8t6HNyuK4gNUkXKNOa43o2YYUkvdsyJkEzY/qi2sDfVF8QlvZu4OE
ItqtE8JBX7SQXmBJQkig7in2UgZvR9nq86Lz8SRIN4vLto9sR13tLKfcDBI6
rhwzh3AW7pq34kduIQlfbvs4UD6wsCDKzYFeTsJkRVh5wkE/HB2YmRBdRwKD
5upy/JMf1oc21NW0kdAUYBm0P5zAGcJ6ubGUhFJRyPjkJIGF82yZLwdIaE2V
hsp570Dz3ZLSmcqHYK+1VVQuJvCFm72OoYyEFvs4sYL3GmINCscCHldDTFnN
2XOZBDprruGavyLh486ezq5uAsnUXQ7T35DQfLbD/ROvDRS5rux8cRUYJY5/
U8YT+Partfv1bhKyrBY5uf9NoCyx50ZWLwk+CVc5wW8J7JML6iP6SWikhfI0
+TUg+MNkzZbiSvgcNq/M9jiBjINcg2FVf/5S268n6gisckvpeanqRwmtX5rf
T6BnVZxajSo/Judsqd04gcGMsSSq6r/aqNJ8E/5N6MVF85ZRKiGQf0mnPZLA
VgmvKFHlSfTqfJc8IPBG7/2sGJUn4DKjQEYghZr8gK3y5OeWzOz4QGC07oRr
m6rfwsIfzJzvBDa/zkuOU/n3plNXBPMvgqi7hTPwUgxz2fyq3MME2tTcaPdT
+QnaSVPkVQQGnrvT5aPycfdiY53XBJ5Ji5lmp/IvCGT3Lo4SWDT7rs5llf9P
XoNa0FcCZ7FE6SyVv6dkbcEjJYEcSWukSHXnP3/XJbCgYApN953H2FP4Jaes
QmBhjXNazCeUKAPuFjJO4rIBnRnlysuO/VAxkV4ksHBCS/9bZnmz5ED3tUq2
qHTFaexXV4jvQ1BX8m+YxIWBX7zenqL7joDb1ANEhMQbOwSdB6c4K4B7Q+Oi
wIKJ5oypT/cNK8DEv1MvIMIXS041HfAPJGFY43K8RSULzw2357aWkvAfj9Oo
6g==
   "], {{{}, {}, 
     {RGBColor[1, 0, 0], 
      LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 10, 
       11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82, 24, 25,
        26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 37, 38, 39, 
       40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66, 61, 57, 54, 52,
        73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 76, 70, 77, 50}]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"E\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0.1},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.568064117503687*^9, {3.5680641838494816`*^9, 3.5680642012984796`*^9}, 
   3.568064251171332*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2s2aCwEp7r73sfs/S/9vD+Gd5zThZ
YgUcYHynftcDy/0l4PxU/V+8hrwKcL6vZupHMXcVOH/TldrSkxYacL61kNZ6
lnodOD/996S5SyMM4Pz8Y8+N1/sawfldUWyqf3NM4Pzk49VphhlmcP5BdsnA
7EgLON9QsGHayxIrOD/hs62OX44NnL9w3lGZ7712cP7mPqvbl4Ic4PySXbYB
c30c4fz9p5Z+6ox2gvMz3S33ZkY4w/lzVhhuzc5ygfMnft7bWFDuCuc/W1Va
llHkBucfcZs0o6nJHc5n9L/1qL/BA85ncNzGuKDSE87vEP/ue6ndC84viEo+
9L3ZG85/2GiSYj/VB84XmTzzVudCXzh/mYBW5fHZfojwKpJ3VV/tD+fPU1gg
YxsSAOfvrfnFkHEBwVf0Zv+jHB4I5285r9l98wqC33Psn4FCbBCcP7n4ZVbC
HQS/RlSOXykyGM5fqcl6quQBgs/2hVHyYFwInL/cYGPdvOcIvmbSKr+/uaFw
/m3PnZtCXyP4lxZX6doXh8H5PzYH2ih9QvD/7yja2pYXDud7G7i51nxF8I/H
6mdmF0fA+es2FHz//x/BPzXxduGL9Pfw/GDFHrBh606E/JIb72916ynB+TGz
N+3o1kOk3zSvt80XXa3h/B1/Ji/v1kOkJ9sQw169XYj0cWj1uaKLroj4dWfO
iSi5iIivtLUs87v1EOGrEXlZMLYEEV6vWBa16O1C+B8APa/wKQ==
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.568064117503687*^9, {3.5680641838494816`*^9, 3.5680642012984796`*^9}, 
   3.5680642511983337`*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJwVxX08kwkcAPBpQrEreptuJ2R5uVqbfCil3y8amfKyhkcdJ2rmpRcvvSh1
elfEM2nVkaE0LycvqWarmPOSStmaS1KiK4Xo9aSSu/vj+/lahG3lb5pAoVAC
//P/lhlj53PNVMt1pO9pixYNAO+GvvfLiHF4GOZCFzJfQyvNcZJu8FR0Ccq9
aE7vA9cMbp3Mh44PFmQbbBG8gE0Lv9A4NHPMT6PVMZTPYY3tpnczPazQxuBp
mdyiF6q0e7e3LLbBGAu/kvOqZ7DUxK5c97f5eObUOmFAw1OI+Jp5rpBgo5VU
h+XO64KtTX2LytfYY2tNHH/QphOOr9NjjsU44A+v9j7t1u+A8OY9Qo7IEXWZ
QJ236C9Q6Zv6RQctRq/T+cX+x7XAMU6WvE5wRuHN5onQo4HQDy7zvWOW4b6Y
BUtl8WrIz21kjJxYjkf5EkqKXhtcTnd+rOEjfgw5fBN3t0KCwsX33OoVuNJ0
9O4ZtztQe7vw/bH1rujCPs2i0Fog0mPJjUjCDSmUsctKZjPkFHGuREetxHY3
E20sNIL4w43923ZyceKyAuvOlD/hZcn2HaI4d3R6spxaMKUeGtwzzxw44IHx
fRUyhaQOdHw6ezOSV+Ekn6wgx8KbQFlxVScv0RO7uP2JjUHXIWXWyBrNUR7a
j7+Tmv6ggG3rwutHDnphV7zybfV0OfTsd9gIp1YjZ6jadSbjKkw/ebbzWP4a
NLA9/P1vQTVcnGqX2JztjcyCyrO/tlaBKm4O17rUB5XSiR0T3Csh1zyP4SLw
RXgUIu3tL4cbSV8oojZfjGLnFTSmlIGFl/63uYF+aL+eam09rxSq79umPtL6
YSQ96+F3ejGkNX1nmwfz0SnG4E6UkQxOxr+OCu3iY8vGIirfsxCSZphNsQxa
i8bTGn5OrzgPxbYTbyc8W4s2WX3Dt2YVgN5HHVNViAAVu3NPOcrzQMau3Jfb
J0C1kDOaX5ULtmEl3mOb/VHkK6uRLMmBx541Vf4D/ljIG0i0Mv0dNOd3L4D4
AMwK7TegjZ6Gz5f9llm+D0A9+RM3JlMC4/K4K0e2BKJkaKshY28WeLHduUmf
ApGaZZag1WZCc/DCyOh4AjcaLqkejhDDpYptI+PjBO4pzzLi9mbAbfHj2FcR
w3ChpFsx17ofnPV9K67UEBisPsiMLiKhxflgzWBENzgWvJN1lvZDclVtGikh
UEd3vp65vhg+rn/2oLOLQG26Ahu9SLiVpln1KeI+FGeOPeIM94NVysiXsUME
3kvf3OTmJIbTHLrrqjsEhlYopz5MJMHvSNGmzUMEMit8ljqYkdDEjo3QE9VC
+1rVnJ+MB+CfuGlVDkkEzqCOS1N8xCBiOIzuqyfQtv25YqqYBMvYBsaFFwQO
hvlfH3QgITk77ZLjCIFvQ8LTs/VJUO26dMFGVA68EGqDpeUAhIjyaW07CVx5
UtN9bb0Y1Mb1gtk3CezawW6vySEhVcjfBT0EuhZZfxUgCa/I2ZM17wl8cJ33
5rkJCbMufudnfyXQQraBc/VzBlwzsJ2zWSQFtV3Z2WK7ATAJFynPbSfQ5uX0
a5oNYjhidGzCKyWBmjrnHeICEnCD6TxaN4EOexQMI3cSclJ7rknfEpg3Mnlm
Kp2Eu3mNlMhRAs0M6wO+6JAQVupU2DpG4B14cXHPmwy40DHcmcqyxB+9nw7V
DvbCL9lV8lSWPZY4x2rbeJ0g5L05qOYuRTfHMPURTw3Iv52UpbJcscNB+5Ie
3QIuAs4JlsIdk2nmk53+UEF96b04NdcLw5R1VA+xHDyoMUSC2gcztZLrc6ZV
grBMV5rK4uPGyxy9mloZ2AQ9MA5OEKDUcOjs/eQ86NctOMRSBGDO7nKTxA8S
+BfNdn5i
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], 
          LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 
           10, 11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82,
            24, 25, 26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 
           37, 38, 39, 40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66,
            61, 57, 54, 52, 73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 
           76, 70, 77, 50}]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJwVz3k41AkYB3BKdFBU27UdDMnIMY5UMr0vuWocmTR+anmqaQ6VchW1aYVE
kxUWG5lUjqI0KWVIYt27LUOnURnCYH6lVDpMdvaP93mf95/P9/sa7DnE5ExR
U1PzU83/m5KivCJcXrvRdIPwr+zzYthSreU1wJuEdbPz16lrNMAjHbsZGgG6
mG2rP7lg/SNwSnF5WOS9CPVDM6tGDTuAY/lNx0pHH+Nv3/JIZz0BTyrn/QI3
Izx8Xzd0Z9JzKHscfbhlnQmSSaZRpzZLYcNc05sav5mh5dow7pHpr4D3PS23
gKChJJPjvcmxBw41Dtrc9LTG6Bnm9FEfGZzZoblSecAWA8NWRR7Z0wvspl+5
Vnw77Ots3Nvp0Qe1Wot99vuvw4fZGakbDN6AlV5M5lCEPVqfju1r/PQGdo3R
zbwOOKCxqK057Xo/XBI2LB1P3ogU+s9cCnsAbv9uL+1gIl6d3WD3VGsQIirp
W3M9HHG+volNTMYg1LQWfEja6YSs7Ic7jA3lEOS2vjqI2IQcY97R8QtyuHDV
qnz/PmcMebL7fdKCIUgdqz4ZEumCe59Fd1vGD8FA8eEj/DBXXHgzsz+6dwjq
XdP+jI11w0SzY/fv4TCoe3f1psS4Y3y3TU5N6jCoOd5Vzzu6Ga8to94zlw5D
4sJxz47TW/CEMd/6itEIhOxg143HMXBo3Ku5jT0CspO2eyHDA4XNc4R9l0dg
fvr5rqRLnuhcm9HYIh2BQl3To005XqhvTQuv1FZAbdgKl1Ul3hhcxplVSFeA
UD9vKd13K7ZHhThU8BRQffybGr99KwawHbS7khVgwNCaMPTzQRHt89jUOwq4
00YVvHjsgy+NyKinjxVwtvEHTT+AiXmvy8UXPykgPXxo365uJi7sWe0q0SPh
+E/L51D8t6HNyuK4gNUkXKNOa43o2YYUkvdsyJkEzY/qi2sDfVF8QlvZu4OE
ItqtE8JBX7SQXmBJQkig7in2UgZvR9nq86Lz8SRIN4vLto9sR13tLKfcDBI6
rhwzh3AW7pq34kduIQlfbvs4UD6wsCDKzYFeTsJkRVh5wkE/HB2YmRBdRwKD
5upy/JMf1oc21NW0kdAUYBm0P5zAGcJ6ubGUhFJRyPjkJIGF82yZLwdIaE2V
hsp570Dz3ZLSmcqHYK+1VVQuJvCFm72OoYyEFvs4sYL3GmINCscCHldDTFnN
2XOZBDprruGavyLh486ezq5uAsnUXQ7T35DQfLbD/ROvDRS5rux8cRUYJY5/
U8YT+Partfv1bhKyrBY5uf9NoCyx50ZWLwk+CVc5wW8J7JML6iP6SWikhfI0
+TUg+MNkzZbiSvgcNq/M9jiBjINcg2FVf/5S268n6gisckvpeanqRwmtX5rf
T6BnVZxajSo/Judsqd04gcGMsSSq6r/aqNJ8E/5N6MVF85ZRKiGQf0mnPZLA
VgmvKFHlSfTqfJc8IPBG7/2sGJUn4DKjQEYghZr8gK3y5OeWzOz4QGC07oRr
m6rfwsIfzJzvBDa/zkuOU/n3plNXBPMvgqi7hTPwUgxz2fyq3MME2tTcaPdT
+QnaSVPkVQQGnrvT5aPycfdiY53XBJ5Ji5lmp/IvCGT3Lo4SWDT7rs5llf9P
XoNa0FcCZ7FE6SyVv6dkbcEjJYEcSWukSHXnP3/XJbCgYApN953H2FP4Jaes
QmBhjXNazCeUKAPuFjJO4rIBnRnlysuO/VAxkV4ksHBCS/9bZnmz5ED3tUq2
qHTFaexXV4jvQ1BX8m+YxIWBX7zenqL7joDb1ANEhMQbOwSdB6c4K4B7Q+Oi
wIKJ5oypT/cNK8DEv1MvIMIXS041HfAPJGFY43K8RSULzw2357aWkvAfj9Oo
6g==
       "], {{{}, {}, 
         {RGBColor[1, 0, 0], 
          LineBox[{1, 71, 65, 60, 56, 53, 51, 2, 3, 4, 5, 78, 6, 7, 8, 9, 79, 
           10, 11, 12, 13, 14, 80, 15, 16, 17, 18, 81, 19, 20, 21, 22, 23, 82,
            24, 25, 26, 27, 83, 28, 29, 30, 31, 32, 84, 33, 34, 35, 36, 85, 
           37, 38, 39, 40, 41, 86, 42, 43, 44, 45, 87, 46, 47, 48, 49, 72, 66,
            61, 57, 54, 52, 73, 67, 62, 58, 55, 74, 68, 63, 59, 75, 69, 64, 
           76, 70, 77, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
          PointBox[{78, 79, 80, 81, 82, 83, 84, 85, 86, 87}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2s2aCwEp7r73sfs/S/9vD+Gd5zThZ
YgUcYHynftcDy/0l4PxU/V+8hrwKcL6vZupHMXcVOH/TldrSkxYacL61kNZ6
lnodOD/996S5SyMM4Pz8Y8+N1/sawfldUWyqf3NM4Pzk49VphhlmcP5BdsnA
7EgLON9QsGHayxIrOD/hs62OX44NnL9w3lGZ7712cP7mPqvbl4Ic4PySXbYB
c30c4fz9p5Z+6ox2gvMz3S33ZkY4w/lzVhhuzc5ygfMnft7bWFDuCuc/W1Va
llHkBucfcZs0o6nJHc5n9L/1qL/BA85ncNzGuKDSE87vEP/ue6ndC84viEo+
9L3ZG85/2GiSYj/VB84XmTzzVudCXzh/mYBW5fHZfojwKpJ3VV/tD+fPU1gg
YxsSAOfvrfnFkHEBwVf0Zv+jHB4I5285r9l98wqC33Psn4FCbBCcP7n4ZVbC
HQS/RlSOXykyGM5fqcl6quQBgs/2hVHyYFwInL/cYGPdvOcIvmbSKr+/uaFw
/m3PnZtCXyP4lxZX6doXh8H5PzYH2ih9QvD/7yja2pYXDud7G7i51nxF8I/H
6mdmF0fA+es2FHz//x/BPzXxduGL9Pfw/GDFHrBh606E/JIb72916ynB+TGz
N+3o1kOk3zSvt80XXa3h/B1/Ji/v1kOkJ9sQw169XYj0cWj1uaKLroj4dWfO
iSi5iIivtLUs87v1EOGrEXlZMLYEEV6vWBa16O1C+B8APa/wKQ==
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.,
          
          PlotRange->{{-0.1, 3.1}, {-0.1, 
           3.1}}], {-1.2, -0.8180339887498949}, {
         Left, Bottom}, {0.5, 0.5}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{
  3.568064117503687*^9, {3.5680641838494816`*^9, 3.5680642012984796`*^9}, 
   3.5680642517793665`*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJwVxX040wkcAPBpmMoKvdGzE7K8XC9b9lBK329ERd4W+snDidi8VV56EXWq
qxTHb1pTR8bEvDxFUtginJckV9ZcJSW6IpRS3aIbd/fH5/mYhuznhs2iUCju
//l/s0x1YZ5x0yYN8QTdxmYUanSslsXwxdBtfe1yqfUoNB25ftWSXwGuQdQW
M7NRaGPF8rT5d6FnZ9OyH/RH4V66YttX3kMozVI/Y4+PQIf9qboxXj/YSj5J
e8tH4L7geewwbxyulvXLlluMgGs9zeMtbwaehDgYhjPfQRfddrZmoB46+OcV
mxgOgWOmc6PU0xAfr8rR2efzBsLWTNHZdBMsSKc3MuSvwd0q7NPireZoqfPy
Wq3pIFQpjx3sWGeJ0abeZYVNr2CDgXWF5s8r8dLF3eF+LS+B9z3rShHBQnOx
xmoX1z7Y3zZkU+G+Frvq4rhjlr1wfrc2Ux3NwXnDx172055CaHtSOJtvi5pM
oK6w+ROaaEbeUf7r0C27oNT3vBLY+imidwn2GN7QrgUDCgj+7LDSI3ojHo9e
tUEa3w0Fea0M1a+b8CxXREnVfgQ3M+yfK7iIX4JON+DRLkiQOXhd2bEZtxhN
Prjk1Al37xdNnAtwRAdW9moKvQMitq6vjyCckEJR35Qz2yG3hH0rKnIL9jgZ
KGOhFQSf608cOOyMWhslFr2pv8PbsoOH+HEuaPdiE1UyvxlaXLIunTy5FeOH
KqUyUSNoePYOZqZsw9meQn/bogagbL6tkZ+4HfucRxJb/e9A6hKVu+KsK66d
+SQ2mieDA7tDm1Wn3LAvXv6xemEtDJzg7IWLO5D9odpxMeM2LLxwufdcgTvq
WJ2e/sunGor1rBPbczyQKblx+aeuKmiKW+ZsUe6JcrHW01kuNyDPJJ/h4OOF
8CxIPDhSAfXJUxT+Iy+MZOVLWlOvgakb7Z/lu7xxbQDVwmJFOVQ/tEp7pvTG
CEPhk2nDUkhvm2aZBHLRLlqnM1JXChfi30UG93GxY28Jlbu9CJIXGc8389+J
+gtafsyoLIRSK637Ca92oqVwaPzeEglof9EwagryQdnRvIu2tfkgZd04njfk
g93h7MmCqjywCinzUMf4It9LWidanwvPt9dV+Y76YpHraKK50W+gKDy6CuL9
UBg8okOfzIZvN703mk34oXbtCycmUwQztXG3zuzbhaIP++cyjgnBjeXinPx1
F1KFxglKZRa0B66JiIoncO/c9dXjPAEYhPLlVw4SaPl2YY1ijwCC+AX0R4cJ
3HJB0V8TIIC/4xZUcZIJXESdEad6CsA8VTWl/oXAPzJi2pzsBJBSdTedFBGo
oblS24QmAHuaV+WtOgIDu08xo0pIOKN7btawnEBFo/0hgYSEbv1mn6UNBPYd
YvXU5ZLAZ3AmjzcTaNXzWqYnICGbbei4rZPA4Eq53pNEEr4EvHrc20egMkOG
rW4k4B6jFfR+AjlJMoauCwlp4dwjMECgY4nFdx8kwSy2hXH1DYFjIb53xjgk
eJ8pCYv5QCCz0nMDx5iE3LSBGvFHAvNVcxanGZIwTC6do5gg8PEd1/evDUhI
yUm/bqsi8GNQaEYOjYQH+a2UiEkCjec2+01pkLCkeJqb851AU+ke9u1vmRBS
blfUpSawE94UJ73PhOuVB1QzMwQmVQh1nQcz4V9HaTPI
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJwVx3s0lAkYgHHaoosppU21qjEko6xrktj3TW7lLvGlw5FpzKiUa9RihRVh
hcW6TSqXUjEpaUiDRdjtuKTaDDGEwXylpNkust/+8Zzn/NT9TruxF8nJyTlS
/X9G+vw13uamn3T28P7MzxNA7VLmlkDuZeAPdLDHBwXQFFlZos2tghFcr7KJ
UQdt+sEcBa4QUn7X3nmgog7aU3vt5jhdIC2yYZUI6qHDLF4g5QxBnHrZrHdf
A3RmiIIlnLeg8HZj5fL5RjjQoOg0zlkA05UlpvKLW+EJzWTZYm9lzDemL6zb
/QQs060by53XIz04p35GoxfYep9pBjQ6Jty945Dl8Qwcmex362w1MfyhcvCR
5H+gui86vMNUG8lknchf94tgzxqdqsW/7EC9XSH+Z5a+As6XzKJSQh97ctjO
+/YOw+m2CaMqR0OMXqZrMeMqhoteClvnTxqjT8i2iDN+I8B6/LO/AdcER5+2
HXvqMApNihtcTxw2xcb87Iw96q/BYHVszmSYGRpeiBttm3sNvrMWO5xOmqMW
v6s989YYXOG1qsnSfkKGxQ/+DNY43P3NTNTrhnh9ZavJc8UJCKuzcCly2Itr
6dpGsdkTIOwsfZ98xBI98hu9tDQkEGC7uyGA2IdsLc5ZWaEECq8b1Jw4boVB
z46+S143CRmzDeeDIqzx2IvoAb2ESRivCD/DDbFB1aqcseiRSWixyfwjLs4W
k3ace1iLUyDv3D+SHmuHCQNGBcKMKZDbe1+++Ox+vLGJWasrmoIkVZlj74UD
GKPFNbymOQ1BXqxmWbw9Tsqc2rtY0yA+b3wMsh2Q176KN3p1GtZm5fUnX3FE
q6bstg7RNJQp65x9XOCEdEP90DolKTSFbLHedtMZA6vZK8ospMCjF6tZuLtg
d2SQ+QOOFBqiPstxu13Qm2Wu1J8mBXV7xa8anq7I1/84+909KdzrYqa87HPF
QU0y8nmfFFLbvunTvd2weKhGcHlOClmhk8d9B9xQdXi7Tc9qEqK+37yKcfgg
Gm2tiPfeTsIN5pLOsOGDyCA5LyatSFD4IL+hyccdBTFK8yNeJJTr34nhTbjj
j6JCj54gEph+FU7zgYdQvD2Pn5dAgmi/oPrQ9CFUVsq1LMomoffaOV0I9UBf
lS3fispI+PeuqznjvQeWRtqaW9SQsPAgpCbxlCfOjC9PjG4mwV7fxjpqzhNb
glubhV0kPPbWCzgRSuAyXotES0TCGha3viicQCPh7W5Pyj7cK7TuCAI7ezjl
SZQ/hqhUG0cRaH/KX32KsmaS7PN8AoFvPhna3RogIbZamHoph0ArhZ3+uq9I
MFN04dcICHxpa0bTEJOQqJS8SFJPoM+le/2ulHtWN7tvfETg7ZGHubGUuWrG
n2KaCay3TR8epJxrsN7S7i8CxUnDt3NHSPhwZPhp/wCBZIav+dLXJODRDVq0
IQIvZsYuMaGc4u8WCWICGcy0RyzKjOAWtZIxAh3r4+WElF0Tr7MD3xA4Kklp
CRsjoTBFXHt5hsDylfdpVylLLm1c3vuewGjlrzZdlGMLUitNZAQG2s8mM8dJ
+Lu4VS7gE4ErPPhZHpRVy765FXwhsH2oOC2est/NXaVP5glk93RG8ClX8oNk
CwsElqkYuw1S/g8aTFtZ
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2s2aCwEr7UxNvF75If28P43vtZfd7
lv4fzj/La8bJEivgAOM79bseWO4vAeen6v/iNeRVgPN9NVM/irmrwPmbrtSW
nrTQgPOthbTWs9TrwPnpvyfNXRphAOfnH3tuvN7XCM7vimJT/ZtjAucnH69O
M8wwg/MPsksGZkdawPmGgg3TXpZYwfkJn211/HJs4PyF847KfO+1g/M391nd
vhTkAOeX7LINmOvjCOfvP7X0U2e0E5yf6W65NzPCGc6fs8Jwa3aWC5w/8fPe
xoJyVzj/2arSsowiNzj/iNukGU1N7nA+o/+tR/0NHnA+g+M2xgWVnnB+h/h3
30vtXnB+QVTyoe/N3nD+w0aTFPupPnC+yOSZtzoX+sL5ywS0Ko/P9kOEV5G8
q/pqfzh/nsICGduQADh/b80vhowLCL6iN/sf5fBAOH/Lec3um1cQ/J5j/wwU
YoPg/MnFL7MS7iD4NaJy/EqRwXD+Sk3WUyUPEHy2L4ySB+NC4PzlBhvr5j1H
8DWTVvn9zQ2F82977twU+hrBv7S4Ste+OAzO/7E50EbpE4L/f0fR1ra8cDjf
28DNteYrgn88Vj8zuzgCzrdiD9iwdSeCv25Dwff//xF8AG65oBk=
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], 
   GeometricTransformationBox[GraphicsGroupBox[{
      {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
      {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
       GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
          GraphicsBox[{{{InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0.5, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"E(t)\"\>", 
               NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[0, 0, 1], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"S(t)\"\>", 
               NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
               Automatic, {1, 0}]}}, {}},
           AspectRatio->1.5,
           FormatType->TraditionalForm,
           PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {
          Left, Bottom}, {0.2, 0.3}]}]}}], {{0.31246912880656175`, 
    0.011294064896622658`}}], InsetBox[
    StyleBox[Cell["\[Beta] \[NotEqual] 0 && \[CurlyEpsilon] = 0",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     Magnification->1.4999996423721313`,
     Background->GrayLevel[
      1.]], {0.13035732938659894`, 0.27168266776125516`}, {Left, Top}, {
    0.3764688298874239, Automatic},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.752225}, {0.666667, 51.360434}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.5680642641230726`*^9, 3.5680642656831617`*^9}, {
  3.5690793143349323`*^9, 3.5690793485628896`*^9}}],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.568064213855198*^9, 3.568064215764307*^9}, 
   3.568064261870944*^9}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"-", "\[Beta]"}], " ", "*", " ", 
    RowBox[{"s", "[", "t", "]"}], "*", " ", 
    FractionBox[
     RowBox[{"i", "[", "t", "]"}], "n"]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"eq2", "=", 
   RowBox[{
    RowBox[{"\[Beta]", "*", 
     RowBox[{"s", "[", "t", "]"}], "*", 
     FractionBox[
      RowBox[{"i", "[", "t", "]"}], "n"]}], "-", 
    RowBox[{"\[Epsilon]", "*", 
     RowBox[{"e", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"\[Epsilon]", "*", 
    RowBox[{"e", "[", "t", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Epsilon]", "=", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", "=", 
   RowBox[{"N", "[", 
    FractionBox["\[Beta]", "\[Epsilon]"], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.85"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ezero", "=", "0.05"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"izero", "=", "0.1"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"e", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"e", "[", "0", "]"}], "\[Equal]", "ezero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "e", ",", "i"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot1", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"a", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<S\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Blue"}]}]}], "]"}]}], "      ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot1a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"a", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Blue"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";", " ", 
   RowBox[{"(*", " ", 
    RowBox[{"For", " ", 
     RowBox[{"S", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"plot2", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", 
         RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"E", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Orange"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], " ", ";"}], 
  "\[IndentingNewLine]", "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plot3", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"c", "[", "t", "]"}], "=", 
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"t", ",", "\"\<Density\>\""}], "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
      RowBox[{"GridLinesStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Gray", ",", "Dotted"}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShowLegend", "[", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot1a", " ", ",", "plot2a", ",", "plot3a"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Blue", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<S(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<E(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}]}], "}"}], ",", 
      RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
      RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
      RowBox[{"LegendSize", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "}"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"plotall", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"s", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"e", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "tf"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.05"}], ",", "1.1"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLegend", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<S(t)\>\"", ",", "\"\<E(t)\>\"", ",", "\"\<I(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Orange"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"LegendShadow", "\[Rule]", "None"}], ",", 
     RowBox[{"LegendSpacing", "\[Rule]", "0"}], ",", 
     RowBox[{"LegendPosition", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0"}], "}"}]}], ",", 
     RowBox[{"LegendSize", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"0.2", ",", "0.3"}], "}"}]}], ",", 
     RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", 
     RowBox[{"GridLinesStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Gray", ",", "Dotted"}], "]"}]}], ",", 
     RowBox[{"Frame", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"True", ",", "True", ",", "True", ",", "True"}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"\"\<Density \>\"", ",", "\"\<\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"\"\<time \>\"", "[", "t", "]"}], ",", "\"\<\>\""}], 
         "}"}]}], "}"}]}]}], "]"}]}], "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"plotP", "=", 
    RowBox[{
     RowBox[{
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"Evaluate", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x1", "[", "t", "]"}], ",", 
            RowBox[{"x2", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"S", "[", "t", "]"}], ",", 
           RowBox[{"\"\<E\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
      "\[IndentingNewLine]", "plotQ"}], "=", 
     RowBox[{
      RowBox[{
       RowBox[{"ParametricPlot", "[", 
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"x2", "[", "t", "]"}], ",", 
             RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
         ",", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"\"\<E\>\"", "[", "t", "]"}], ",", 
            RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], "\n", 
       "plotR"}], "=", 
      RowBox[{
       RowBox[{
        RowBox[{"ParametricPlot", "[", 
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"x1", "[", "t", "]"}], ",", 
              RowBox[{"x3", "[", "t", "]"}]}], "}"}], "/.", "sol"}], "]"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
          RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
          RowBox[{"AxesLabel", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"S", "[", "t", "]"}], ",", 
             RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}]}], "]"}], 
        "\[IndentingNewLine]", 
        RowBox[{"h1", "[", "t_", "]"}]}], ":=", 
       RowBox[{
        RowBox[{
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x1", "[", "t", "]"}], "/.", "sol"}], "]"}], "\n", 
         RowBox[{"h2", "[", "t_", "]"}]}], ":=", 
        RowBox[{
         RowBox[{
          RowBox[{"Evaluate", "[", 
           RowBox[{
            RowBox[{"x2", "[", "t", "]"}], "/.", "sol"}], "]"}], 
          "\[IndentingNewLine]", 
          RowBox[{"h3", "[", "t_", "]"}]}], ":=", 
         RowBox[{"Evaluate", "[", 
          RowBox[{
           RowBox[{"x3", "[", "t", "]"}], "/.", "sol"}], "]"}]}]}]}]}]}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.5638355904558997`*^9, 3.563835704468421*^9}, {
   3.563835950077469*^9, 3.56383606512805*^9}, {3.56383613822723*^9, 
   3.563836367357336*^9}, {3.563836441114555*^9, 3.563836444201731*^9}, {
   3.563836535058928*^9, 3.563836589524043*^9}, {3.5638366644783306`*^9, 
   3.563836665858409*^9}, 3.563836695909128*^9, {3.563836848841875*^9, 
   3.5638368525680885`*^9}, {3.5638372255084195`*^9, 3.563837265661716*^9}, {
   3.5638383151507435`*^9, 3.5638383180759106`*^9}, 3.563838362903475*^9, {
   3.5638384377487555`*^9, 3.563838575206618*^9}, {3.5638386112096767`*^9, 
   3.563838657701336*^9}, 3.5638386889021206`*^9, {3.5638388049467583`*^9, 
   3.5638388069938755`*^9}, {3.5638388495773106`*^9, 
   3.5638389667440124`*^9}, {3.563839052506918*^9, 3.563839071571008*^9}, {
   3.563839147339342*^9, 3.563839232596218*^9}, {3.563839314060878*^9, 
   3.56383942477421*^9}, {3.5638394696337757`*^9, 3.563839480051372*^9}, {
   3.5638395362795877`*^9, 3.5638395453271055`*^9}, {3.5638395986821575`*^9, 
   3.5638396665290375`*^9}, {3.563839704558213*^9, 3.5638397404972687`*^9}, {
   3.5638398239280405`*^9, 3.5638399312031765`*^9}, {3.563840014577945*^9, 
   3.5638400676949835`*^9}, {3.5638401105414343`*^9, 
   3.5638401221330967`*^9}, {3.5638401613373394`*^9, 3.563840168990777*^9}, {
   3.5638402066729326`*^9, 3.5638402331264453`*^9}, {3.563840302771429*^9, 
   3.563840436440074*^9}, {3.563840514500539*^9, 3.563840531504512*^9}, {
   3.5638405784992*^9, 3.5638405821144066`*^9}, {3.563840618338478*^9, 
   3.5638406387506456`*^9}, {3.5638407249235744`*^9, 
   3.5638408190029554`*^9}, {3.563840856229085*^9, 3.5638408646885686`*^9}, {
   3.5638410103198986`*^9, 3.5638410835630875`*^9}, {3.563904889849905*^9, 
   3.5639048947221837`*^9}, 3.563905146271571*^9, {3.563905177983385*^9, 
   3.56390518226363*^9}, {3.56390525411874*^9, 3.563905299470334*^9}, {
   3.563905472683241*^9, 3.563905489465201*^9}, {3.563905647569244*^9, 
   3.5639056597809424`*^9}, 3.563905703646451*^9, {3.563905742419669*^9, 
   3.5639057793877835`*^9}, {3.563905869972965*^9, 3.563905882011653*^9}, {
   3.563905928065287*^9, 3.5639059436801805`*^9}, {3.563906210805459*^9, 
   3.563906215908751*^9}, {3.563906296232345*^9, 3.5639063025807085`*^9}, {
   3.563906365490307*^9, 3.5639063658563275`*^9}, {3.563906424897704*^9, 
   3.563906433242182*^9}, {3.563906471104347*^9, 3.5639064759836264`*^9}, {
   3.5639065288356495`*^9, 3.563906529453685*^9}, {3.5639068329810457`*^9, 
   3.5639068636147976`*^9}, {3.563906895527623*^9, 3.563906897037709*^9}, {
   3.563907110560922*^9, 3.5639071121890154`*^9}, {3.563907274969326*^9, 
   3.56390743274035*^9}, {3.5639074760618277`*^9, 3.5639074793070135`*^9}, {
   3.5639075838239913`*^9, 3.5639075917484446`*^9}, {3.5639076912791376`*^9, 
   3.563907827329919*^9}, {3.56390786003179*^9, 3.56390792333441*^9}, {
   3.563908035557829*^9, 3.5639080787833014`*^9}, 3.5639084082481456`*^9, {
   3.563908463246291*^9, 3.563908492127943*^9}, 3.563908626086605*^9, {
   3.563908825166992*^9, 3.5639088270190983`*^9}, {3.563909238651642*^9, 
   3.563909240037721*^9}, {3.563909322232423*^9, 3.5639093344691224`*^9}, {
   3.563909382587875*^9, 3.563909606090658*^9}, {3.5639097046552963`*^9, 
   3.563909707405453*^9}, {3.5639097449105988`*^9, 3.563909747819765*^9}, {
   3.5639097912782507`*^9, 3.5639098366698465`*^9}, {3.5639098902499113`*^9, 
   3.563909890652934*^9}, {3.563909925842947*^9, 3.563909927602048*^9}, {
   3.5639099589818425`*^9, 3.563909959344863*^9}, {3.5639099995731645`*^9, 
   3.563910046916872*^9}, {3.563910148071658*^9, 3.5639101691978664`*^9}, 
   3.5639102340005727`*^9, {3.5639102721207533`*^9, 3.563910351650302*^9}, {
   3.563910421532299*^9, 3.563910510495387*^9}, {3.5639105664275866`*^9, 
   3.5639105760811386`*^9}, {3.5639106580418262`*^9, 
   3.5639106824562225`*^9}, {3.5639107247046394`*^9, 3.563910728398851*^9}, {
   3.563910840744276*^9, 3.563910862496521*^9}, {3.563910926792198*^9, 
   3.5639109604401226`*^9}, {3.563911036075449*^9, 3.563911037511531*^9}, {
   3.563911431340057*^9, 3.563911437320399*^9}, {3.5639114789257784`*^9, 
   3.563911493954638*^9}, {3.563911525254428*^9, 3.5639115374281244`*^9}, {
   3.5639115750762777`*^9, 3.5639115880030174`*^9}, 3.5639116582250338`*^9, {
   3.5639116984503345`*^9, 3.56391176008786*^9}, {3.5639119457344785`*^9, 
   3.563911983828657*^9}, {3.5639125210403843`*^9, 3.5639125490409856`*^9}, {
   3.5639125979987855`*^9, 3.5639126611083956`*^9}, {3.5639128670021715`*^9, 
   3.563912872138466*^9}, {3.5639130702837987`*^9, 3.5639131278820934`*^9}, {
   3.5639132526262283`*^9, 3.563913434192613*^9}, {3.5639134979902625`*^9, 
   3.5639135222086477`*^9}, {3.563913559982808*^9, 3.563913587937407*^9}, {
   3.563913643129564*^9, 3.5639136454726977`*^9}, {3.563913893811902*^9, 
   3.5639139485590334`*^9}, {3.5639139840870657`*^9, 3.563914064888687*^9}, {
   3.5639141429901543`*^9, 3.5639142000144157`*^9}, {3.563914269810408*^9, 
   3.5639142840542226`*^9}, {3.5639143487949257`*^9, 3.563914404738125*^9}, 
   3.563914455294017*^9, {3.56391451899066*^9, 3.5639146165662413`*^9}, {
   3.5639146469249773`*^9, 3.56391465099021*^9}, {3.563914684638135*^9, 
   3.5639146860572157`*^9}, {3.56391471638395*^9, 3.5639148044359865`*^9}, {
   3.5639148449423037`*^9, 3.5639148622662945`*^9}, {3.5639150099297404`*^9, 
   3.563915010347764*^9}, {3.5639151494727216`*^9, 3.5639152487053976`*^9}, {
   3.563915326603853*^9, 3.563915346531993*^9}, {3.5639157813918657`*^9, 
   3.563915788211255*^9}, {3.5639160749616566`*^9, 3.563916084421198*^9}, {
   3.563916863145738*^9, 3.563916867956013*^9}, {3.563916974604113*^9, 
   3.563916998251466*^9}, {3.5639170471642637`*^9, 3.5639170731837516`*^9}, {
   3.563917169124239*^9, 3.5639171692732477`*^9}, {3.563917225221448*^9, 
   3.563917281815685*^9}, {3.5639173866606817`*^9, 3.56391743454642*^9}, 
   3.5639174785899396`*^9, {3.563917530621916*^9, 3.563917555013311*^9}, {
   3.563917726810137*^9, 3.5639177280732093`*^9}, {3.563917953474101*^9, 
   3.5639180072371764`*^9}, {3.563918038582969*^9, 3.5639180432792377`*^9}, {
   3.563918079533312*^9, 3.5639182234085407`*^9}, {3.563918264612898*^9, 
   3.563918265321938*^9}, {3.563918306125272*^9, 3.5639183204030886`*^9}, {
   3.5639183512768545`*^9, 3.563918397598504*^9}, {3.5639186015911713`*^9, 
   3.5639186261025734`*^9}, {3.5639188701865344`*^9, 3.563918974285488*^9}, {
   3.564081080539436*^9, 3.5640811343645144`*^9}, {3.564880574348827*^9, 
   3.5648805849744344`*^9}, {3.5648807151418796`*^9, 3.564880717960041*^9}, {
   3.5648808318375545`*^9, 3.564880834966733*^9}, {3.564880887672748*^9, 
   3.5648809435619445`*^9}, {3.564881002612322*^9, 3.5648810078276205`*^9}, {
   3.564881058793535*^9, 3.5648810605646367`*^9}, {3.564882586727928*^9, 
   3.56488258833002*^9}, {3.5648826193637953`*^9, 3.564882626198186*^9}, 
   3.5648828797036858`*^9, {3.5668460139647665`*^9, 3.566846039283215*^9}, {
   3.5679698042792788`*^9, 3.567970064740176*^9}, {3.56797010256534*^9, 
   3.5679701033263836`*^9}, {3.568061384082344*^9, 3.568061403272442*^9}, {
   3.5680626130556374`*^9, 3.56806263129568*^9}, {3.5680626662546797`*^9, 
   3.5680627659563828`*^9}, {3.568062819720458*^9, 3.56806282150056*^9}, {
   3.568063768292713*^9, 3.568063780749426*^9}, {3.5680639389074717`*^9, 
   3.5680639410275927`*^9}, {3.5680641117453575`*^9, 3.568064114039489*^9}, {
   3.5680641715557785`*^9, 3.5680642000984106`*^9}, {3.5680642374305463`*^9, 
   3.568064247196105*^9}, {3.568064687651297*^9, 3.568064695800763*^9}}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Power", "::", "infy"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Infinite expression \[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak] \
encountered. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.568064697036834*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Infinity", "::", "indet"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Indeterminate expression \[NoBreak]\\!\\(0.`\\\\ \
ComplexInfinity\\)\[NoBreak] encountered. \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/indet\\\", ButtonNote -> \
\\\"Infinity::indet\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.5680646970738363`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2xmDw2t5rL7vfs/T/9jD+WV4zTpZY
AQcY36nf9cByfwk4P1X/F68hrwKc76uZ+lHMXQXO33SltvSkhQacby2ktZ6l
XgfOT/89ae7SCAM4P//Yc+P1vkZwflcUm+rfHBM4P/l4dZphhhmcf5BdMjA7
0gLONxRsmPayxArOT/hsq+OXYwPnL5x3VOZ7rx2cv7nP6valIAc4v2SXbcBc
H0c4f/+ppZ86o53g/Ex3y72ZEc5w/pwVhluzs1zg/Imf9zYWlLvC+c9WlZZl
FLnB+UfcJs1oanKH8xn9bz3qb/CA8xkctzEuqPSE8zvEv/teaveC8wuikg99
b/aG8x82mqTYT/WB80Umz7zVudAXzl8moFV5fLYfIryK5F3VV/vD+fMUFsjY
hgTA+XtrfjFkXEDwFb3Z/yiHB8L5W85rdt+8guD3HPtnoBAbBOdPLn6ZlXAH
wa8RleNXigyG81dqsp4qeYDgs31hlDwYFwLnLzfYWDfvOYKvmbTK729uKJx/
23PnptDXCP6lxVW69sVhcP6PzYE2Sp8Q/P87ira25YXD+d4Gbq41XxH847H6
mdnFEXD+ug0F3///R/BPTbxd+CL9PTw/WLEHbNi6EyG/5Mb7W916SnB+zOxN
O7r1EOk3zett80VXazh/x5/Jy7v1EOnJNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwCU82uv
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.568064697088837*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2s2aCwEp7r73sfs/S/9vD+Gd5zThZ
YgUcYHynftcDy/0l4PxU/V+8hrwKcL6vZupHMXcVOH/TldrSkxYacL61kNZ6
lnodOD/996S5SyMM4Pz8Y8+N1/sawfldUWyqf3NM4Pzk49VphhlmcP5BdsnA
7EgLON9QsGHayxIrOD/hs62OX44NnL9w3lGZ7712cP7mPqvbl4Ic4PySXbYB
c30c4fz9p5Z+6ox2gvMz3S33ZkY4w/lzVhhuzc5ygfMnft7bWFDuCuc/W1Va
llHkBucfcZs0o6nJHc5n9L/1qL/BA85ncNzGuKDSE87vEP/ue6ndC84viEo+
9L3ZG85/2GiSYj/VB84XmTzzVudCXzh/mYBW5fHZfojwKpJ3VV/tD+fPU1gg
YxsSAOfvrfnFkHEBwVf0Zv+jHB4I5285r9l98wqC33Psn4FCbBCcP7n4ZVbC
HQS/RlSOXykyGM5fqcl6quQBgs/2hVHyYFwInL/cYGPdvOcIvmbSKr+/uaFw
/m3PnZtCXyP4lxZX6doXh8H5PzYH2ih9QvD/7yja2pYXDud7G7i51nxF8I/H
6mdmF0fA+es2FHz//x/BPzXxduGL9Pfw/GDFHrBh606E/JIb72916ynB+TGz
N+3o1kOk3zSvt80XXa3h/B1/Ji/v1kOkJ9sQw169XYj0cWj1uaKLroj4dWfO
iSi5iIivtLUs87v1EOGrEXlZMLYEEV6vWBa16O1C+B8APa/wKQ==
   "], {{{}, {}, 
     {RGBColor[1, 0, 0], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"E\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.5680646971098385`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2s2aCwE57r73sfs/S/9vD+Gd5zThZ
YgUcYHynftcDy/0l4PxU/V+8hrwKcL6vZupHMXcVOH/TldrSkxYacL61kNZ6
lnodOD/996S5SyMM4Pz8Y8+N1/sawfldUWyqf3NM4Pzk49VphhlmcP5BdsnA
7EgLON9QsGHayxIrOD/hs62OX44NnL9w3lGZ7712cP7mPqvbl4Ic4PySXbYB
c30c4fz9p5Z+6ox2gvMz3S33ZkY4w/lzVhhuzc5ygfMnft7bWFDuCuc/W1Va
llHkBucfcZs0o6nJHc5n9L/1qL/BA85ncNzGuKDSE87vEP/ue6ndC84viEo+
9L3ZG85/2GiSYj/VB84XmTzzVudCXzh/mYBW5fHZfojwKpJ3VV/tD+fPU1gg
YxsSAOfvrfnFkHEBwVf0Zv+jHB4I5285r9l98wqC33Psn4FCbBCcP7n4ZVbC
HQS/RlSOXykyGM5fqcl6quQBgs/2hVHyYFwInL/cYGPdvOcIvmbSKr+/uaFw
/m3PnZtCXyP4lxZX6doXh8H5PzYH2ih9QvD/7yja2pYXDud7G7i51nxF8I/H
6mdmF0fA+es2FHz//x/BPzXxduGL9Pfw/GDFHrBh606E/JIb72916ynB+TGz
N+3o1kOk3zSvt80XXa3h/B1/Ji/v1kOkJ9sQw169XYj0cWj1uaKLroj4dWfO
iSi5iIivtLUs87v1EOGrEXlZMLYEEV6vWBa16O1C+B8AqNj0CQ==
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], 
      LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 55, 
       15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58, 28, 29,
        30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 61, 42, 43, 
       44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.5680646971168385`*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2xmDw2t5rL7vfs/T/9jD+WV4zTpZY
AQcY36nf9cByfwk4P1X/F68hrwKc76uZ+lHMXQXO33SltvSkhQacby2ktZ6l
XgfOT/89ae7SCAM4P//Yc+P1vkZwflcUm+rfHBM4P/l4dZphhhmcf5BdMjA7
0gLONxRsmPayxArOT/hsq+OXYwPnL5x3VOZ7rx2cv7nP6valIAc4v2SXbcBc
H0c4f/+ppZ86o53g/Ex3y72ZEc5w/pwVhluzs1zg/Imf9zYWlLvC+c9WlZZl
FLnB+UfcJs1oanKH8xn9bz3qb/CA8xkctzEuqPSE8zvEv/teaveC8wuikg99
b/aG8x82mqTYT/WB80Umz7zVudAXzl8moFV5fLYfIryK5F3VV/vD+fMUFsjY
hgTA+XtrfjFkXEDwFb3Z/yiHB8L5W85rdt+8guD3HPtnoBAbBOdPLn6ZlXAH
wa8RleNXigyG81dqsp4qeYDgs31hlDwYFwLnLzfYWDfvOYKvmbTK729uKJx/
23PnptDXCP6lxVW69sVhcP6PzYE2Sp8Q/P87ira25YXD+d4Gbq41XxH847H6
mdnFEXD+ug0F3///R/BPTbxd+CL9PTw/WLEHbNi6EyG/5Mb7W916SnB+zOxN
O7r1EOk3zett80VXazh/x5/Jy7v1EOnJNsSwV28XIn0cWn2u6KIrIn7dmXMi
Si4i4ittLcv8bj1E+GpEXhaMLUGE1yuWRS16uxD+BwCU82uv
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2s2aCwEp7r73sfs/S/9vD+Gd5zThZ
YgUcYHynftcDy/0l4PxU/V+8hrwKcL6vZupHMXcVOH/TldrSkxYacL61kNZ6
lnodOD/996S5SyMM4Pz8Y8+N1/sawfldUWyqf3NM4Pzk49VphhlmcP5BdsnA
7EgLON9QsGHayxIrOD/hs62OX44NnL9w3lGZ7712cP7mPqvbl4Ic4PySXbYB
c30c4fz9p5Z+6ox2gvMz3S33ZkY4w/lzVhhuzc5ygfMnft7bWFDuCuc/W1Va
llHkBucfcZs0o6nJHc5n9L/1qL/BA85ncNzGuKDSE87vEP/ue6ndC84viEo+
9L3ZG85/2GiSYj/VB84XmTzzVudCXzh/mYBW5fHZfojwKpJ3VV/tD+fPU1gg
YxsSAOfvrfnFkHEBwVf0Zv+jHB4I5285r9l98wqC33Psn4FCbBCcP7n4ZVbC
HQS/RlSOXykyGM5fqcl6quQBgs/2hVHyYFwInL/cYGPdvOcIvmbSKr+/uaFw
/m3PnZtCXyP4lxZX6doXh8H5PzYH2ih9QvD/7yja2pYXDud7G7i51nxF8I/H
6mdmF0fA+es2FHz//x/BPzXxduGL9Pfw/GDFHrBh606E/JIb72916ynB+TGz
N+3o1kOk3zSvt80XXa3h/B1/Ji/v1kOkJ9sQw169XYj0cWj1uaKLroj4dWfO
iSi5iIivtLUs87v1EOGrEXlZMLYEEV6vWBa16O1C+B8APa/wKQ==
       "], {{{}, {}, 
         {RGBColor[1, 0, 0], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}], 
      GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGCwA2IQrdT/d/E8uYN2s2aCwE57r73sfs/S/9vD+Gd5zThZ
YgUcYHynftcDy/0l4PxU/V+8hrwKcL6vZupHMXcVOH/TldrSkxYacL61kNZ6
lnodOD/996S5SyMM4Pz8Y8+N1/sawfldUWyqf3NM4Pzk49VphhlmcP5BdsnA
7EgLON9QsGHayxIrOD/hs62OX44NnL9w3lGZ7712cP7mPqvbl4Ic4PySXbYB
c30c4fz9p5Z+6ox2gvMz3S33ZkY4w/lzVhhuzc5ygfMnft7bWFDuCuc/W1Va
llHkBucfcZs0o6nJHc5n9L/1qL/BA85ncNzGuKDSE87vEP/ue6ndC84viEo+
9L3ZG85/2GiSYj/VB84XmTzzVudCXzh/mYBW5fHZfojwKpJ3VV/tD+fPU1gg
YxsSAOfvrfnFkHEBwVf0Zv+jHB4I5285r9l98wqC33Psn4FCbBCcP7n4ZVbC
HQS/RlSOXykyGM5fqcl6quQBgs/2hVHyYFwInL/cYGPdvOcIvmbSKr+/uaFw
/m3PnZtCXyP4lxZX6doXh8H5PzYH2ih9QvD/7yja2pYXDud7G7i51nxF8I/H
6mdmF0fA+es2FHz//x/BPzXxduGL9Pfw/GDFHrBh606E/JIb72916ynB+TGz
N+3o1kOk3zSvt80XXa3h/B1/Ji/v1kOkJ9sQw169XYj0cWj1uaKLroj4dWfO
iSi5iIivtLUs87v1EOGrEXlZMLYEEV6vWBa16O1C+B8AqNj0CQ==
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], 
          LineBox[{1, 51, 2, 3, 4, 5, 53, 6, 7, 8, 9, 54, 10, 11, 12, 13, 14, 
           55, 15, 16, 17, 18, 56, 19, 20, 21, 22, 23, 57, 24, 25, 26, 27, 58,
            28, 29, 30, 31, 32, 59, 33, 34, 35, 36, 60, 37, 38, 39, 40, 41, 
           61, 42, 43, 44, 45, 62, 46, 47, 48, 49, 52, 50}]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{53, 54, 55, 56, 57, 58, 59, 60, 61, 62}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], GraphicsGroupBox[{
     {GrayLevel[0], 
      RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-1.2, -0.8180339887498949}, \
{-0.7, -0.31803398874989486`}], InsetBox[
         GraphicsBox[{{{InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0.5, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"E(t)\"\>", 
              NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[0, 0, 1], LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"S(t)\"\>", 
              NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
              Automatic, {1, 0}]}}, {}},
          AspectRatio->1.,
          
          PlotRange->{{-0.1, 3.1}, {-0.1, 
           3.1}}], {-1.2, -0.8180339887498949}, {
         Left, Bottom}, {0.5, 0.5}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{3.5680646979188843`*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2xmDw2v7UxNuFL9Lf28P4XnvZ/Z6l
/4fzz/KacbLECjjA+E79rgeW+0vA+an6v3gNeRXgfF/N1I9i7ipw/qYrtaUn
LTTgfGshrfUs9TpwfvrvSXOXRhjA+fnHnhuv9zWC87ui2FT/5pjA+cnHq9MM
M8zg/IPskoHZkRZwvqFgw7SXJVZwfsJnWx2/HBs4f+G8ozLfe+3g/M19Vrcv
BTnA+SW7bAPm+jjC+ftPLf3UGe0E52e6W+7NjHCG8+esMNyaneUC50/8vLex
oNwVzn+2qrQso8gNzj/iNmlGU5M7nM/of+tRf4MHnM/guI1xQaUnnN8h/t33
UrsXnF8QlXzoe7M3nP+w0STFfqoPnC8yeeatzoW+cP4yAa3K47P9EOFVJO+q
vtofzp+nsEDGNiQAzt9b84sh4wKCr+jN/kc5PBDO33Jes/vmFQS/59g/A4XY
IDh/cvHLrIQ7CH6NqBy/UmQwnL9Sk/VUyQMEn+0Lo+TBuBA4f7nBxrp5zxF8
zaRVfn9zQ+H82547N4W+RvAvLa7StS8Og/N/bA60UfqE4P/fUbS1LS8czvc2
cHOt+YrgH4/Vz8wujoDzrdgDNmzdieCv21Dw/f9/BB8AvQUw/Q==
        "]]}, 
      {RGBColor[1, 0.5, 0], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2s2aCwEr7UxNvF75If28P43vtZfd7
lv4fzj/La8bJEivgAOM79bseWO4vAeen6v/iNeRVgPN9NVM/irmrwPmbrtSW
nrTQgPOthbTWs9TrwPnpvyfNXRphAOfnH3tuvN7XCM7vimJT/ZtjAucnH69O
M8wwg/MPsksGZkdawPmGgg3TXpZYwfkJn211/HJs4PyF847KfO+1g/M391nd
vhTkAOeX7LINmOvjCOfvP7X0U2e0E5yf6W65NzPCGc6fs8Jwa3aWC5w/8fPe
xoJyVzj/2arSsowiNzj/iNukGU1N7nA+o/+tR/0NHnA+g+M2xgWVnnB+h/h3
30vtXnB+QVTyoe/N3nD+w0aTFPupPnC+yOSZtzoX+sL5ywS0Ko/P9kOEV5G8
q/pqfzh/nsICGduQADh/b80vhowLCL6iN/sf5fBAOH/Lec3um1cQ/J5j/wwU
YoPg/MnFL7MS7iD4NaJy/EqRwXD+Sk3WUyUPEHy2L4ySB+NC4PzlBhvr5j1H
8DWTVvn9zQ2F82977twU+hrBv7S4Ste+OAzO/7E50EbpE4L/f0fR1ra8cDjf
28DNteYrgn88Vj8zuzgCzrdiD9iwdSeCv25Dwff//xF8AG65oBk=
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQrdT/d/E8uYN2s2aCwE77UxNvF75If28P43vtZfd7
lv4fzj/La8bJEivgAOM79bseWO4vAeen6v/iNeRVgPN9NVM/irmrwPmbrtSW
nrTQgPOthbTWs9TrwPnpvyfNXRphAOfnH3tuvN7XCM7vimJT/ZtjAucnH69O
M8wwg/MPsksGZkdawPmGgg3TXpZYwfkJn211/HJs4PyF847KfO+1g/M391nd
vhTkAOeX7LINmOvjCOfvP7X0U2e0E5yf6W65NzPCGc6fs8Jwa3aWC5w/8fPe
xoJyVzj/2arSsowiNzj/iNukGU1N7nA+o/+tR/0NHnA+g+M2xgWVnnB+h/h3
30vtXnB+QVTyoe/N3nD+w0aTFPupPnC+yOSZtzoX+sL5ywS0Ko/P9kOEV5G8
q/pqfzh/nsICGduQADh/b80vhowLCL6iN/sf5fBAOH/Lec3um1cQ/J5j/wwU
YoPg/MnFL7MS7iD4NaJy/EqRwXD+Sk3WUyUPEHy2L4ySB+NC4PzlBhvr5j1H
8DWTVvn9zQ2F82977twU+hrBv7S4Ste+OAzO/7E50EbpE4L/f0fR1ra8cDjf
28DNteYrgn88Vj8zuzgCzrdiD9iwdSeCv25Dwff//xF8AKOEo1k=
        "]]}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesOrigin->{0, 0},
     DisplayFunction:>$DisplayFunction,
     FormatType->TraditionalForm,
     Frame->{True, True, True, True},
     FrameLabel->{{
        FormBox["\"Density \"", TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}, {
        FormBox[
         RowBox[{"\"time \"", "(", "t", ")"}], TraditionalForm], 
        FormBox["\"\"", TraditionalForm]}},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     Method->{},
     PlotRange->{{0, 100}, {-0.05, 1.1}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -0.6180339887498948}, {
    Left, Bottom}, {2, 1.2360679774997896`}], 
   GeometricTransformationBox[GraphicsGroupBox[{
      {GrayLevel[0], RectangleBox[{0.2, 0}, {0.4, 0.3}]}, 
      {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
       GraphicsGroupBox[{RectangleBox[{0.2, 0}, {0.4, 0.3}], InsetBox[
          GraphicsBox[{{{InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0.5, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"E(t)\"\>", 
               NCache[{1.05, Rational[3, 2]}, {1.05, 1.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[0, 0, 1], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 2}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"S(t)\"\>", 
               NCache[{1.05, Rational[5, 2]}, {1.05, 2.5}], {-1, 0}, 
               Automatic, {1, 0}]}}, {}},
           AspectRatio->1.5,
           FormatType->TraditionalForm,
           PlotRange->{{-0.1, 3.1}, {-0.1, 3.1}}], {0.2, 0}, {
          Left, Bottom}, {0.2, 0.3}]}]}}], {{
    0.31246912880656175`, -0.07905845427635905}}], InsetBox[
    StyleBox[Cell["\[Beta] = 0 && \[CurlyEpsilon] = 0",
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     Magnification->1.4999996423721313`,
     Background->GrayLevel[
      1.]], {0.13412201768547294`, 0.17756546028940168`}, {
    Left, Top}, {0.3727041415885497, 0.06399970108086207}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.752225}, {0.666667, 51.360434}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.568064704461259*^9, 3.5680647065583787`*^9}, {
  3.569079051929923*^9, 3.569079090776145*^9}}]
},
WindowSize->{1904, 945},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
Magnification->1.499999761581421,
FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (November 20, 2012)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 22680, 516, 1449, "Input"],
Cell[23262, 540, 5015, 80, 376, "Output"],
Cell[28280, 622, 5394, 86, 357, "Output"],
Cell[33677, 710, 5394, 86, 357, "Output"],
Cell[39074, 798, 10287, 183, 376, "Output"]
}, Open  ]],
Cell[49376, 984, 5998, 121, 359, "Input"],
Cell[CellGroupData[{
Cell[55399, 1109, 22157, 511, 1479, "Input"],
Cell[77559, 1622, 27849, 466, 376, "Output"],
Cell[105411, 2090, 32453, 542, 371, "Output"],
Cell[137867, 2634, 13200, 226, 376, "Output"],
Cell[151070, 2862, 74496, 1250, 376, "Output"]
}, Open  ]],
Cell[225581, 4115, 65330, 1094, 359, "Input"],
Cell[CellGroupData[{
Cell[290936, 5213, 22336, 514, 1479, "Input"],
Cell[313275, 5729, 1861, 39, 376, "Output"],
Cell[315139, 5770, 34550, 578, 371, "Output"],
Cell[349692, 6350, 11468, 198, 371, "Output"],
Cell[361163, 6550, 48623, 826, 376, "Output"],
Cell[409789, 7378, 41758, 704, 359, "Output"]
}, Open  ]],
Cell[451562, 8085, 42191, 714, 359, "Input"],
Cell[493756, 8801, 94, 1, 44, "Input"],
Cell[CellGroupData[{
Cell[493875, 8806, 22411, 515, 1479, "Input"],
Cell[516289, 9323, 447, 10, 52, "Message"],
Cell[516739, 9335, 1710, 36, 376, "Output"],
Cell[518452, 9373, 1712, 36, 371, "Output"],
Cell[520167, 9411, 2089, 42, 357, "Output"],
Cell[522259, 9455, 6591, 132, 376, "Output"]
}, Open  ]],
Cell[528865, 9590, 5690, 116, 359, "Input"],
Cell[CellGroupData[{
Cell[534580, 9710, 22576, 516, 1479, "Input"],
Cell[557159, 10228, 522, 12, 52, "Message"],
Cell[557684, 10242, 3018, 58, 376, "Output"],
Cell[560705, 10302, 3014, 58, 376, "Output"],
Cell[563722, 10362, 1795, 38, 371, "Output"],
Cell[565520, 10402, 8763, 169, 376, "Output"]
}, Open  ]],
Cell[574298, 10574, 7429, 144, 359, "Input"],
Cell[581730, 10720, 118, 2, 44, "Input"],
Cell[CellGroupData[{
Cell[581873, 10726, 22622, 516, 1479, "Input"],
Cell[604498, 11244, 447, 10, 52, "Message"],
Cell[604948, 11256, 479, 10, 32, "Message"],
Cell[605430, 11268, 1710, 36, 376, "Output"],
Cell[607143, 11306, 1716, 36, 371, "Output"],
Cell[608862, 11344, 1716, 36, 371, "Output"],
Cell[610581, 11382, 6206, 125, 376, "Output"]
}, Open  ]],
Cell[616802, 11510, 5415, 111, 359, "Input"]
}
]
*)

(* End of internal cache information *)