SIRS with vd.nb

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

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

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[    620465,      12152]
NotebookOptionsPosition[    616940,      12047]
NotebookOutlinePosition[    617398,      12064]
CellTagsIndexPosition[    617355,      12061]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"\[Mu]", "*", "n"}], "+", 
    RowBox[{"\[Nu]", "*", 
     RowBox[{"r", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Mu]", "*", 
     RowBox[{"s", "[", "t", "]"}]}], "-", 
    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[{"\[Mu]", "*", 
     RowBox[{"i", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Gamma]", "*", 
     RowBox[{"i", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{
    RowBox[{"\[Gamma]", "*", 
     RowBox[{"i", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Mu]", "*", 
     RowBox[{"r", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Nu]", "*", 
     RowBox[{"r", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.04"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Gamma]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Mu]", "=", "0.043"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Nu]", "=", "0.01"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"R0", "=", 
  RowBox[{"N", "[", 
   FractionBox["\[Beta]", 
    RowBox[{"(", 
     RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}]], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.6"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"izero", "=", "0.2"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"rzero", "=", "0.2"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"r", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}], ",", 
        RowBox[{
         RowBox[{"r", "[", "0", "]"}], "\[Equal]", "rzero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "i", ",", "r"}], "}"}], ",", 
      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[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "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]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      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[{"r", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<R\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"R", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"r", "[", "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", "@", "Green"}]}], ",", 
      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[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Green", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<R(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[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"r", "[", "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)\>\"", ",", "\"\<I(t)\>\"", ",", "\"\<R(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Green"}], "}"}]}], "}"}]}], ",", 
     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.5639192569106536`*^9, 3.5639192590437756`*^9}, {3.56392175996782*^9, 
   3.563921763652031*^9}, {3.5649408605169983`*^9, 3.564940939182498*^9}, {
   3.565699720038359*^9, 3.565699860512394*^9}, {3.5656998929582496`*^9, 
   3.565700399603228*^9}, {3.5657016419202843`*^9, 3.5657016452584753`*^9}, {
   3.567773137024293*^9, 3.5677731407058997`*^9}}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "obspkg"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"\[NoBreak]\\!\\(\\\"PlotLegends`\\\"\\)\[NoBreak] is now \
obsolete. The legacy version being loaded may conflict with current \
Mathematica functionality. See the Compatibility Guide for updating \
information.\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.57109286031627*^9}],

Cell[BoxData["0.2797202797202797`"], "Output",
 CellChangeTimes->{
  3.565699864028595*^9, {3.565699900984709*^9, 3.5656999321214895`*^9}, {
   3.565699969247613*^9, 3.565700399952248*^9}, 3.5710928606222873`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwVkXk01WkYx5FhWlRKWZItUyg3InSl5yH7eunipxLZ7pUoN0tKRRyTLpUW
LfaxNUxIoUiWKWuNaDGRSvbtvo0yypL5zR/vec/nPM/3833PeZW9jjj5iggJ
CbnS5/9b5eJ8drpC3a5+gxkTHZ0+sK4Wtx/kLECaJ2evsGw/PJfQWyzqvhJL
jOvbMpYOgMlFs9p8Bxk08K4zYA0MgO/WGQltCSWUTjzVWFUyCHbqvv+stVBF
huSU+eLoISh9dSq02UAN+dJS11B/GAxXaRSLntmCNafrmQZkGDizl9NyKS2E
jRc2myePwJGGIZ1iu234YyCZb7NxFM7vFftl/rAujo64HZAqHwXvxpN+2lw9
tLGUb2Vqj0GduKxjgJsBPmcVnFDNHANtyajkkRAmGrZIcTWWj4PnF6Mt9od3
Ynxlx6OmgHHISn8qP524C72dI2wVm8bh3gVmd4cTooy46AJTbgJCKo1YabbG
GHQtPrbZYwJqWnIn4/eZoHs+o0knZwL8LXZU+1O7UZcn1SnyfgJSb2uXBRwy
RafJcXb2WgEkfamOPhpuhgpFS6/etRTAYEFoGJdnjhmXHSz7eQJ4Yn75xtmz
Frh/+6OdWqkCEHbo+nQxyhIDB5REJx8LQMi4XDgzwgrDxupPNfcI4Jz0tF3H
r9Z4z8Os4N9ZARzd610/HWODPienF9hrCPRG6/rANVvUYCTbSzEISF252RWf
ZYeBre1ve3YTyFupEdGYYo97kjxkNrsQqOMpmm0qdMBvYR+TxLkE0pUy5Y3Y
LPQLahkSDSdQHTkjxH3BworYNzLWsQSUbcTnNrg6Ijtl0SgkEbjfps5/+8oR
58My/BRTCSQ0/NBScnfC5vC53vI8AleOjRzyfOeEz2quzl4vJhC5RmGFitse
fNNTI8arIPC7+k8tIR/3YFLSunnZGgJiX4Vl6w6w8VmzOol9SiBf6+7p9CE2
1gZUSv/ZSkDdq8B+PtAZLVxMr+9qJ9Bt9bDUecwZ1xv3ynS+JtCRfUITjrlg
t8pAG6uLwLd7jjtVJl1QsxMLVr4nsPCAVxYX5Ioxb29KH+wlYKNlbhY55Ypm
VtsdU/sJNLpv9Q84RmHt6uIgxyECRSVHpxcWKNTXES4UGyXQktQdPMwhwDwn
2ZeW1wdMcVZJ2UMK73gqrysfJtDMjHk4zvkAIsv9NogE9kFUaU3CpWQKi75z
9onR86/7Pr7sekfhavXyl54jBJoSOiynOG0Q774gp8TqA9Vz0zPzsRTeUl2c
+Afdf11bxsSylfYXTK5ZRu87xt32DRRQOKy/ye0+zQ1awRwxbg2UnhQaLjDu
g395q0t1Iynk7NikdobOc+V1v5+up7A3JBx76X6V4CfyOQMUFltqVp+n81Ep
CUV60xSil+HtHprrjhflqHGLoV42wuMIsw8OcLMkXoTT7/ERd+HSvnbJerbc
YwptjdorWmkf38/pOPRSmPtaoyOUzg9fklvSMUnhtwumS5ppls774ZQyS+HW
DAWdSZorflZXDORmQG2WlHe7Xh+s8uZWpYVSGHdi0cB+2h+3LF5kuIrC0NLZ
sVrajwdlN0p8oNBnysM5gM6n8nsrMj7T//Np3f3HND/LfCrk/53CQtPln4do
9irUz30+T2FEW1DwHM05f5MuPkMFYzqn7lTJDsH+lNIHfMY2tDLO1qTWj4Kf
9URMu5khKl+95Sy6fRwezF3J5zNMsLjgtVLnjQkwYmsnMirNMWVqYrDplADq
C//itZvZYFPcJROpFQQsFh2mQtodMHI+qtbmEAG/O6IZfIYTZvoPrZLJJqDm
9lLSPYSN02XRu6MbCIyK/hbLqHRBJc9Urv87Av8BHsenZQ==
   "], {{{}, {}, 
     {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.6},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.565699864028595*^9, {3.565699900984709*^9, 3.5656999321214895`*^9}, {
   3.565699969247613*^9, 3.565700399952248*^9}, 3.5710928617113495`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwVl2c81Q8bxg8hSsooI5VUQrI6Sf787tve+zhOKHtLtogQLQqhkFBWRFZS
smWHzJBRNAgZFaHh6Xl1v7jeXt/r873325wzsqcnkUiRdCTS/69gzJ/MtL31
hJSktlRychtoVW/W++y4AVyK27Yc1WqEzm0yLAynd6CsawT9TGotKMWo1j3U
58HFV8t0NbwVYC+xvk1qmwAOfp/d/5qtDHRF7Jd2qR9EwS4WN/bLRVDaH+zb
JiuMRbdV9jKdyIP/OESLGELEUM/L9/63gUxw/BWXmk2TRPpEnbpmh3Q41zx1
rEhXGjOXHsaf0kyGSDOmQ3/cyHi21liDlSkBbFsuOEg5yeDtsr/HpvfFQv1m
XkPXU7I44cJ8hZk/EqTYQ+988ZHD28++DKu2RYDVdwUxPTd5DGuq/FvYEwoP
0pr4f94ksF7Wzzn3ZSA8iZYb6TVCzL15aFbZ0Rd8XigYpOooIruzXcoFW0+o
bc/+dt1cCcsK+YoYW13BWf1ktTNNGRtKtqhdinSAe7lST11dVPBD+2TX01/W
cOt7dZiHvypqYVXH7z4L+PzI18/JSw2nBD2OnPEzhUa1uKRLl9RxXGLD0avZ
COj0307GhGpgGlP05a9hekBSLKe7H6CJw+XiGyyfNOAa90/d3qtaePF1/CvR
NWXwMLNt+BmujQqePI3qKggTYWQ7uK2DGQljW0jb5IArPvnt9Qe6+N7utDX/
dzLk7BANaEnRQz3Vix0BvFJQ77VP9XC+Ph5WSHBv8DwCaQL3+RUoBkhReqEu
YCYE1UHrJKduA9w16+4zri4I+7U3/z5gaoik94ux2xz2QNlrkajhfkP8/d57
2PUPN9xo/ispcNoIQ4RM7pOBE+K9v7hYjRphpCpVZpm6HYJ27t0ueMoYozvP
JBemsUCeCGO7z3tjzNMg9TsmMgDTDzre+jMU3Js1QDN4RYKHkiUX06YouDLa
KP1yfp0QsXmk9+esCfaUxiXwFi0TI5oVpSazJugsFF3J/myJ6M0MPAreVFx0
bnCQ850jVp8Yygt+o6JZEFdRktQUsfHc6+kVd1Mc1WZn6VufJLQl1VSDlk0x
41+R+SLHiZbTEs6u3jTMfWiUoTY/RBQWe/zc2KAhnZNUdff7PqL91ojntOMC
5OL9E72tzSDw59m9PzLMqLv7Sp7VVD1c66r+aELlwrGctO5hkSpg+sk/z3Cc
Hyvy7O2r3MvhVEHRxgFRQXw1QR9s1FwCpBDPY4sghM+jbAwuSBSA33djjilz
UXzUaBA1Yp4DEQzCy4eTxDFra+XDjqwHMGtV7SRqLIWS1hO7A8XuQdAOfzHq
6WO406NGzirkDqzsqFdNdDmOgXyXWbV/3oI4x3bzLqsTWP433iNk000IuNHh
Lep4EreeeWJMr30VNOgtJ1I8/kPdUOd09tJLQGoLyxIMVsCsx+X7LEgXgeFM
qnNXMuDhxaOaV+f9IeFg1c7nrxEfvVBt0tHyhrsNng84+xVRxjYl5wbXOeC6
vjC4NqyEus/obzcxOgP9+eMVLhPKmKYVpdux3w52dfnvnl9UwZ3+aa5UXiuQ
f80bNPdDFf12ll4KpTODgdXwq77ralhxrNq84jcFJrXKFa7TaWBnFWvJgTkD
IGlofOP+o4HO+W23q6K1QaXgzeEKkhYWcqbGntRRg9+yR5k/MWpjsSejBjIp
gfC8dnwKqw6O1u24EcivAIFbHNPtduuikvbfLzSLEzDWM5GXu1cP3X8Gb5f4
Kg1l9Qct/Q/oY+6nhO05GeKwMZdoOc1lgJs9RN87NgpDoV5ntFGcAUav0yU8
ljkICx9C/zZxGqI9b3eZk50AuNxMevn3tiHSUu8eT4jmAwFtrvHfPEaYX2O+
8DZoJ+zY80O37p4Rrux7Yl1xmh2uNW5SqOczxoZcYZEJE1aIS7/l9uqeMXIs
s5K//2SCoejwpbv7KDhbwn7uThI9UOOGX0lkUnAoRbU7kvMv4dT2+HOnqAnK
ANctf9FVgv5NSWhegQl2U1Q4fZO/E29WeD20JKi4raOgfKxugfh05HNZcSkV
T75TFf1U/IUIkpk8T5E0xeUMt2mBXx+JbB+LYLpSUzzYa3NHlGmCYGmRG/Qm
05C8FCMwnDhCyG02KH5aQcMiNXb1CaU3RJtceMWc4ztgLU+v0RRqhcmvY9bn
lzehxmSb9iDbSxCdX1spOMWBQbVflhPfVMNBZSlTqhIfcuyVDVd78Qzefe2/
8mj3ftQZs2h2migFIYprXLjyIVR9bCj/tfMxcH2cVqZpiWB+2uL6rpqHYLVV
xOhO1FH0DbidMFWWASLiwpumByTx75HUY7tqUsHPVaL40oA0bt8nHZ01nAh1
T22Pt8+SMdVyncXsZxwEch+YCPkog31eQ2SPO9Gwp91rUuu9LKr9J0RlyLsG
VdcXKhu+yWH0TL2/R3k4SI5bOj3/IY/fwve80mwMAaOLUi8nOQEdywskWvQC
IOvUhfOqtxAjd4yFPzT0gas1g+dpsYpo2NT67oCHB8zkaX2qv6uEkUPvr107
7QLllif+m7mnjIu97BPGuvZwqpIyXfBYBQt6Tn1u3GQNDhOzF8XLVfGjSeq8
ibU5jPf8/uteroYzWiFs9yWp0KdxcJaxQR2VStWPcPYZQqj2rZm+Gg00tSS+
Zf/VgQy/5gSxak10lwsTdIxRByVhjvyRZi20sBnjV1pTAp2swUeardq4Hnd2
m0ozAeLNnXRGQzqoEX/nyn/5snC+VEGJ970uvjYde3DtyzE46nzYLf2dHtZ4
/c3glpAEq5zD9EEz+hjVID1FcIhCzrPyAXVvA2SWcrsYrHgIqMXVG7u+GaBa
xbvt0fr7QW3uteUtP0P023K9YPvSbnDZlk6eXTHET84bNmplu6DLMwAWg4xQ
5J2GLWpwANu9lb7YX0ZI7+wcXdOxDa6+HaxeCTTGsn0Gu1mVmAEtGsc2kyh4
TiJY1O/WJhB/edZrNZSC/waCmtG6QTAHF0nLsJhgUZDTXqbwNWIXf6Gj8U0T
5DPRkohO/UHQ7juzG2yjIsfthsuaTYvEqKPk0s84Kjr/V8q7xjJLyC0nm/3H
boqrtyRuKG//TPTeceRViTXFt+0XyOVrE8SjC8i2ykVDC9+hZdvNY0Roae2N
2Ds0vLVZv2Q8epDgeRmo/PXmT5A2OjUwFtIEp1njBi+dZ8WiEpfOoN46mH7E
fPnJ4b145VPJh6XjT2E4z7/fQv4w+ksr2OnlPoIh+tr3vmePILk1+vEcWzb8
MH/f93aUhrafj7CfZBkgWm/0aiw7vobnTu12AmOtoPLZo/FpPx1eee0Wv5j3
En7/4Q6lmbNj5GJVRV95DRxzrty6ocGLdyRuSnk6PoeMaMf2swkCqCyj91+t
7xN4QUwr6jYdRImwy+6GOYVga/FkNLZeGHlYDKfT/XOhKzovVJfxKCb3Rtkp
KGdCa8LpbrVESbwUeFjEPyYNviVt/ZZ0SxpTMw72v4hOgkPMxx/bFpCxTJyn
qScoHtzPvc6k5chgKv3GScIpBhamm3hH7sli2u3G+W7L6+DXeULkzRM55JQ1
3UciIqB1Wk8rvFge3ydINYnSQiEw+tfCXDeBVy/dehDDFAhiP96KsHohWsy+
Lrz/1gcuVkV+DHRXRL8Wx2CuaQ+gyK3OHrqghJsqdu232uEKscayv/MCldGU
nC6f88Ue1qVe6rHeUMFNc27zpIvWEDRDCX19RxVjTro6AI8F2BAVL1wT1DDS
jZ2J3EOFDvURRZUMddQVSFUQ1TYC7Hz6uSRdA3dxM37prNaFHnNC2yFFEzd3
BXsPn9CAT+kRv6kPtZB+NmAy2l8ZzoSklgvkaCNSPAqUswCYD9I9aS3XQZc5
w8XiUyehOcM1uqdOF3kw2Pm+GxlmqnK9nlTr4badTfN5GZIQeyMzs6ddH3+t
riRV1YqCoNuRgAZbA7y2M3mKpeMQRO6yCIUJA2QrkR9gbN8PZSmzj986GGKL
Hu3u0Tx+iHH/aDn5yRDZ4lprb1G54Si/vCzzWSP0lrq+KtjAAd2bPdJXZ41w
9ThPn1UMG9CvBjqwuhijk3yG+PpXZvjR8NGYWDTG7Qe4Kuo5GODuyLOm0XMU
pNwvf3GCSoIhajHNZZWCJOtvHedk1gkBEDPPDTbBO/p7Q5MPLhN8vuyTRr9N
MEWKY1OE/BIxeNkkZnc4Fcdbiq1Vq2eJ5H7fV4V0pnhx1dkgNe0zMX34rKN9
iCmuHU9xv3x+klg3eSkix0jDR79JoprNY8TBaz/X/0TQsEm5ZxOX/BDxV5Vc
s3j/OzgVc+8f3d8MNQyH5OpMt+C911OWxWb18LM77qSF+B48KVhtyd79FNwS
foQL1Qih/V7pjxzO+XD4wvWAwo+iKBLsZNBdmg2JUjxKGq9oaG3z4m1f5gBh
eCXX/uw8Dd8J8uC8Vz/RLOnpyORUC9J6SVXZcm3gY/PCl9JIQr1fgsmOay/h
I+NDFfHRHRhkKS0dKlILckEkB+MOHkwcH2xYrH0ODO8k3V4bCOBM26XLj+uf
AENZDq/0lYMoQtdbOclVBJFJPCJHg4WxzCZZNuFNLkR0f+EWaRDDgYGwQZYb
mcCjsSqz4i+JLZXq186sp0Fx0RpH1jlpnBA6ZkmdTQJayR7n4htk9JO5/ulH
XTw4pRxiVL0qg3nArq7TFwO08+eOH7ggi7uMXmfJV18HysLIO8sEOeT+YZcm
Gh4BXO5qlU7R8rghJXLxQkIoRN+xYvIqIrAu+V7gObtA8KiPvHTOBvGxpLzF
BQFfCPjPju/GaUW0U3uXYXrIEyLp9RdMXZWw5OIr6URXVwjqfD563VkZRbjp
WMNOOoD22XU6+QsqyHmzo9alyhqYzrHQCVxVRcblzIwwXwvI8knkcQlXwyGh
Pl3yAVPQaJE5axunjvOVJmMO14xAgK31o0CsBpJjd9TL79MDJ71AofBITexK
DPkweFMDykcUshMStfD3QHPK0jNlmHILlWe9rY3e+s75XVsQfvTe3cqQo4N3
3baTK0tPwte7l8qOlujiYNvOyx5FZGh1+OJbXaCHI9bBrbljkpAbYu3z+4U+
CuiyFYnxHAGr5k/tG+YG2H52MCKDQwiyNPPr+oYMUGjpk20EsyC4eK9RNs4Y
Yk9VscKmzXtAcN/V5dNjhuiyE5Zc8rjBwjOVzGVvhMmDk49VSJxQWi12Weyj
EcbwjldGfmOD2isdconWxtgW/+5UhSoL6K38iD41bYwLd79x5lIYoHvKYkHP
kYLT7Xk+FrEkqHtZ7MqwSMGpvk+h67fWiSyD2f5eXxOs989wcHZeJgIt7bX6
v5sgwyn79TMBS0Q/l9OZoxeoKJwgv5LLM0doNH4In16jos5IS0j21GfCZ/Ec
24qfKe4XvtUgVzFJCL6MOGH+xxTZmvRE4w6PEytenKXkIBrWHv96MSphiPDa
fOuC16MlCN5iWvDUpxkWQt1nz6izoCa7oqff/Xr4+2EwvriEHzUD6vX79pZD
OcsT860hQuhLymiJeZUPes/mm7Tui+JAzy6lQqYccOInr11soOHluSn29m8D
hKBnI3/WJxrGXzvRH1XdT4Sm3CiU+UlDk43wDXORfqL+fGGWsFMR7Fxxdlpy
boMbApZdB+RJOCY5fvj+/kYYuj4vlHxvBz51o9IH29ZCDeOB+D83eXBJ2OvU
47nnQL66U4EkIYDtWgwJ3NNPIHf+8uUsh4MYpc2/0aRTBGky2vq/zIRxtTaa
K5UpD6yWrn+4c18MPT5GOb8tzoS6B6ozuk6SOJkhJmMjmQ47Kj0y885Io0xG
bL4oXzIsMXK0vAkio/kkX6/1h3hwKOk+Xukvg+WzshlFDLHAiirK6i6yyPtS
96Tf3HVQIolXZkXIYbrE4xnenAh4IdngbR4sjwxbz5auloZCEl/8rbI0Ar2L
tELexwcCR+6k+AMzxMHlwpJ6ZV9YWTd4ymWiiHz+jDq6Kp6Q5bC+6GGrhPzm
nSoPk13Ba8tax5qVMnrNVKeMWjvAjy13Rvq8VPDhmtDC9xFr0CmxVdQIUcWT
8t1vE7MsoCnmivqXQDUcfwFtmTqmwHT1I713pDqOhfy5a/TQCGLFe2xp1zSw
40dstpuBHpSp8ySwX9LE/PPscloVGpAecDfgSYwWeqlukvMeUoaCD54bYTe0
MbkqLtzzMILLo6lnD1J10C4jZ0v5u5NA4o5uMc/TRY6m4deiPWR4VnndXylL
D2/SDQ35/ZIEckDdKPsTfRScS0nvVTkCId8bvPfSDPBDz85EFRkhkPzQ+z61
3wDtcjKbdgoLgpplaC67uSGmhp2PtpbZA67+tLrdw4aoRmURV+vjhh+7u6T5
rI3w282lZxn7OCGDZ+t5tfdG6Hrc7l7iwe2wV285y+K0MTKGSi6werHA7+3B
Yo4fjdFvTiplzpcBZs9KMDDbUvCr1A7TqsckIK9L+vbMUnBsB12fTN064TDc
zj7taYJ2fSrKh24sE48oMX8TFkxw3ZpNek/SEmFssaQq40/F5C/k56/U5giB
Kj4rxhUqsqiPxoaxThEvKEvWNV6maJE/ZDgzPEmUB9jXuK6Z4jhPCEchbZw4
4/RgW7f/Px89oETF+iFCzAnMjhUtQtNCIaSkNQMzcKqI1zJjeGn28+aX9XDp
7HqdmTc/Vrhezs9QKwdzlbiWYEsh9GsqtDD9kw82JvvneC6K4uRgXhafVA70
sDdQ+GpoeDLCSb2E7w0R5WB0HiZoyB2sJIsf+onpWL4tvd/+5Sol65v0+gnu
nL9GKb/+8btn6uUyQz/xjFlk31mndCjUGO2qCGsDqQ2b5V2LG2DX9Jt+9Hgj
9GpzJHUF7UCz7g9ns0NrIVSrLK/XnQdfXdm+/8imCtAZuZrNs1cAG03/mfuv
J7Ae5Vs5Rj2IYfsMMsf/cZ972c5mUlMYM/cdudq0Nw+66MzaOmPEcKrC/erp
l5mQoDf3MsBKElmZLUyuaadDHRa4ilGlUWnr9vpyqWQgJFlXvviQsfi0J6Xo
RzzYyQvprZyTwdigok1qHLHwOVNca9haFkWvdCiQGSLhBfOgcEvQv/9Q/7Za
7rMI2MZB6u73kcc3bZJFOg2hcM9CbNDkDoHRwsU3K/IDwSaFjfEFFTHjooT2
BRNfeGrWQj9soIgNYZ2mY8aeUMrT7RlsqYRkjR0PO4pdYV6Yt6nEQhnJC/GH
hPwcoHXYtjXdXQWHA740dM5ag3tvrLXFBVXc3Zbng1UWQN3zdzzXTw0PZ7nc
9rc2hU8OlZ2BV9TxN6G5PlJuBK01Jgd8IjRQ6hPvvKCzHpipTLUPBWtiUn6C
g8BrDUhobf3QEKWFZU2M/9xbGdjSZ97LX9NGP0UjqTfHEYR2sUV7JOtgmwvu
MVw5CVsGOHu8snXRxsbsEf8kGcQ/n1pluK+Hm7nLiz23SMH68kIsf5E+Pu1k
UVE0PwJskVKtR6kGWBegLXNEQwhWij4vXuo1wHr5NLHvJwSBPKDcy3fKEPuk
D/Qc1dsDsQfqs9ffGOLHKyOP9ae5AT0/S+2xNEKvXscj9hKcwKcW6Gk8boT9
re80qhS2Q2cJixmYG+MusaJV42ss0Muv+OvspDG6MX4wz7zCAKvFSdEfrSiY
/6uiK6SKBO47l9aefaGgbcihn16D60Rrqlzxt3Mm+EhLxDQpdZlQ0s+i+X41
wWzT1JzYh0sEB6m8Qs6Xip+SYyLXTs8RrLIyXZw/qMh7ZmsV474pYpSpNCrD
wxRn5uvDTGcmCdLAAJ3PT1O8QHLmM/McJzhsnSpTfWmoYsmsWjE4RFxLutMW
L7UIY8yvIgqeNANXmv3izgvMmG414xk5UA8qpVGDEhR+LPBiPZZjVg6FE2F/
yvWFcOPumdrTuwrALUtuY8NNFIPqE4M81HLgCut1+ulKGubr6B6qE39DoDWv
0LZ3NHzy2mMbeaWfuBc18Sx9kYazc16vPKz6iY77TSTnNRp673QvFeDuJ2zy
T2R3/qFh3mKy4Mi3PiJraOFtlLggjpIp3PsaSsAipfR5lLg0XjkkelU2Oxme
/45/GCWuhCcP+AVdfe8GDfldXj2q2niacSCLV1ARHB4zpEeJG+HOOu73Fi1c
MMOQESH+DwAhJz8GJ/svhIPW1/Ae1f8wPjPbKnlLOChQpG6Kv1DDbXN0o7n7
qKC+yY3m06OPryy2plmniILwqT720z4UzKy25UJZEvwPPHpGIQ==
   "], {{{}, {}, 
     {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl1HV0lmUcBuBRskmNkaM3YIMBAtItJaCEYtFKw4jRtpSEmIQBSgliF0qX
IKAo2IQSBhiEYiuY1+/wx/U993NvO+c77+7zpg3I6T46V0JCwhwfcV7uoyAf
y48ziHrcrGtBXva6P0xuOrgX4hP5CQZTn1t0LcnHPvdHyENH98LslxczhAbk
pZO+CAfkJQylIbfqWnER77k/Sj6ucE/moLyUYTRiavyu80pnUQ7JyxhOY27T
XUZ+3nd/jPx0dk/hU3k52TThdl1rEvnAfSGJdHEvxmfyk4ygKUl01RfnsLyC
kTRjmu5iZzdnCY7IKxlFcwpwlb4kR+WnGE0LCnK1vhTH5FXk0JJCdNeX5nP5
acbQisJco0/lC/kZxjIrnoOzCNfKZfhSfpZxtCaZ6/Rl+Up+jvG0oSjX68tx
XH6eCbQlhRv05Tkhv8BE2jE9npuzh7MCX8svMon2FKenviLfyC/F/mKblKCX
vhLfyi/H1mKHlKS3Po3v5FdiO7E5StFHn85J+dXYAbPdOzlL01euzCl5dfzf
Y2Ok0k9fhdPya9wR+6IMN+qrckZ+nTtjS5TlJn0G38truCt2w93x3Jz9nZn8
IK9lcmyH8gzQV+OsvI4psRsqMFBfnR/l9UyN3VCRQfosfpI3xOZiN1RisL4G
P8sbuUeeHtshjSHuNflF3hTfM7ZDOkP1tfhV3syM2A2VGaa/hN/kLcyM3VCF
4fra/C5vjd3FbuLv47k5s511+EPeFv+T2A4ZjNDX5U/5jfi+sRsyGam/lHPy
dubEbqjGKH09zss7uDd2Q3XihVefv+Q3Ey68++6L7ZBFjnsD/pZ3cn9shxqM
0TfkH3kXD8RuqMlYfSP+lXfzYOyGWozTN+Y/+S0eit3Ec4rn5hzvbBIvYN52
zI3tUJsJuqbxfmaP+7zYDXWYqGtGbt5xnx+7oS6TdM3Jw7vuC2I3sV33NiTx
ofui2KzcNt5NfBQ7dbajAJNpz5R43n72P+01p8E=
       "]]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{385, 386, 387, 388, 389, 390, 391, 392, 393, 394}]}, {}, {}}}],
  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.565699864028595*^9, {3.565699900984709*^9, 3.5656999321214895`*^9}, {
   3.565699969247613*^9, 3.565700399952248*^9}, 3.5710928617423515`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwVVnk41N8XHrKV3diTbCmRJUsRzklEKkVo8JUszYwlIe0KkaWJiiJZsxZJ
EYUQETOfaSFpQUp7KVT27ff5/XGf+5zn3nvOve/73nOOqs8Bp328FAqlixz/
n9XOzxXkKDdb4hDRkpHBBvsGQYcvjAU4au5y7okjAU9ETRbzeUpg0aO7TSxe
Llidt3lYskMedZIWlr7vJ2Cf3rSogagK3u+kOt4wJmC71r5RWVsNbLHVSkxT
5EBl98lD7PWrMCBCWcP8ZQdskFpdwRepg0HXXwflb28HxkxKdhFNHzW6G46J
1bXBgcdfDSu2r8Uef73cYotWOOsusGIuyAjD3ifNDRW3gG/7CboB0wQ3C4k/
kVvXDM2CCo6BbuvRImhIwaO+CQwko9K+h5uhwRElvtixB7D3r4WOQ5A5ClWl
mMbG18G1nDaliSRLdB3NliGk7kNVsllvlxOid/AadtWragivs9iZvW0jTovO
qUb8rIImTtGfRA8rvDIseVGVUgn+tqYN/rRN2CWvY3zZ4zZkXTeoDgywRotb
Vs7ih8vh4t+G6JAjNmhoPvB6c3IpfCk9dJgZthmFXcoShWSvQ+vmlCunT9ti
9+3ZvI7iIuDZ8XbwfJQdaoT2Cr5OKwDKxhqevGNbsCepe+ZF0zVIkJvY3hVv
j+aBE3u9P+RCiLtvy0TMVlz2fLjF4kUWfIg28oPL2zCnVWyN1csMkE7NeJt4
bTvyLtvofFQ/HYolVh9rz3TA4r5ekXXjl6A5bLnNyrIdWDNJhdUdKZCjkqdk
4bwTBxrVHt/6cwEaIqYpzOc7sUc2aad7YTKobhWcVd/tiAVbJnxND7Hg7jMt
1ptuR3RzOxCl3ZEA5x7P66t4OmGK7zU5tnYcpB78HrC3zwmTazJWlE7HQISM
sria2y4s0z5wbWDxabihxc8Jf78LgzNtHb9rRIHAPx6F5j3OWBvszxldehJK
9O+cyvnqjGs80r3OLDoOWj6lDnP7XZCzBa35tx6B3i21lS4/XTDmY8HJB7yH
oKvg+Bo46IqWBhtCPNlhMFnlaK72xxU735lTpYZCYOF+WHVc8G60C1yW+osV
DFv1N9tEjO3Gir+pDf7OgdDuqecfeJCGhrKZaxTzmXDrdsjEwgIN3+sFp/kN
7wPOxd7Qb4xhCM1RMK/J4oDK3L2sORMhhPX1IUoEAQlPGz65uErjGcVycQYf
FwQmlH7zGSvh0fYRrl06AW43KxbUV6vhdnfr2BuVHKBEhhqOgCaKSxHC6SfZ
YCa483Z1LQ2dODP7H1kygG0WUzvEGIBRyY6q8hUcGPzV7310bBFuLuBoBZP+
Vv+eGr/pJoX5puIWU0Jc0NhksNvVShG/3+urtm0kYOBXd1zpUlXUNgm1VJzg
gKZzYErMphX4fXJi6vYTNkRVNp27kEZDkdLyVf2/GCD/6PimX0kTIBARKmhN
IcBTJOXV6aMiOLzkwyG33wR8vhXdNe8ki2G8ms4Pxwj4Vip0pmqlMvJm+K5l
+RPwz+P9i7d9NBxzdSgvuUSHjnNddmOMZ6Clul7Pa5AN1l9CWqu7edBaavd/
Y4cJmJ2Ti6J5SGLDuvP3DQS5YOhfL7xgp4CXN4wmCj8jID+Zwdl/SQWjrkop
rJIjoM7y28btbRp4mQgOu/CPDRoJE9NzsTRMjngz5GzLhHkbo8aRvL+wS/ts
UPdzDjTyrTB7uHsJXliiSal8R0BNY65HqbMMlpSOetjNEzDxPMX0P91luHx4
vmVdNAHpBvJWdgQNFcYY6vLf6ZCe7sAYTvoKjneNc2t9ORA9Zr9gJiuAestD
qgOqSD7f9e7noVExr6lvkELiL7OsJL98w1J85pYTXlpGgAE2d3w/PgOPI1d1
r9Um30tdCLfJEMOP1KEWy2kCpHN9t+xylEMjNabrjx8EOMZd37f/Nw0/Cl/3
3r+RDo/1QxkCzCYQfLSv4FYjG8J96g45t1JwORF5ddqPgE/8Jda6fRL488S7
cHN+LphFUOi7uPJIbU7Xqe4hgG9AP+jZThWMHZ/Oz9Qk7bvFCmvjNPC5S2hM
hSAHxsOolUYRNDRTE0xNCmdCmODFE2Glo+C53HbZnnscGI4K/rnHdjHmp9v1
Ml4SkPtYVyXqpTS+JT5fKebhwvzHV6m37yjh1rM8n8PPEcBUMpo61ULDy6tP
qz+mMuCUotDgn7yPcNPIvpFmQ+b/0Eu33/DzY2KdY9dkEQFWXwLWvnothT0P
stRekPgp6Q/N8jQpYtjsjj9rqwko5FGOC4ydAqGcDXftZAnQuWCn+SlBFC25
F1qa/5F4Fv8R1eqSxbTgIwHZIwSohbYqFX6m4TbjJyKfAuhADVhJlfvMi518
lJDWeAKo4wn1p99KYrjcS68DZLzkhN4EVaYwbq7JLKR8JeBpjUR69wsZ3HNi
ir2D5GfnMR6HLE1BXNNuPMNuIiCkZ9sN7VdUXNelvCNOgAtEevWj4hviaN5m
UvGS1JN2enfsyedyWLql07D0EwFRmedumUzQ0GI+W3aTPB2aj94qXMWsgM/5
dxQcb7LhnIrXU3VzCn4puNxx1oOA14m/NTOyJFDQtu7xzCIuNPKrp84lyePP
T4E33N8SYBQvY0HRU0G/HUw/PV0Crv8+c6aQroGBfi7qqyU5sId5TfT5ERpe
tw6hbWExQYcJ7oYVI5C4MrpJv5QDQkC11m0SwhcMkTKf5wRcsj/M+/OyNHZk
qLYqkvFO759+6H5QCY1YsVpDFwnolGxxVmykoe+Cco+ZFgNGe/1yw0s/gJWu
4Jebxhzg6JkuvnGSDxf+3JzpySHAJKBS2ipDCtdmF43OkPjm1YqtvhmliNUJ
vmNELQF7fLh+OomTcMSuf3GAMAHWDr9OVVFEkafW1q1slICR1WYjqSmy+Khd
U27jXwJYdKej8IGGO03FjB9E0kFnFTfwy3+82Mc7OhYdSYDQ8efZv65KouHF
DKuvZP4o3hz1YWRgCS64KtAnBwloMaMdg0syeCohRtNrltTnuuLiwBwB9Iqo
cHhA3sfP/RIrLZ2KgQENdBp5/pOLu9JhVXFU3yh+vZjcr7JUifHtghyO9tGq
e0l9fLuguKTrDw19Kg7WPtWhw0i0l8+jpZKIKwNsHUg9lFp9tZCRkUF7tvLs
EgoXHHzUdwbJU8l4aB9J4iHdVfBEWlIMJZpbadkTBCiHbXwjpyiFu24lneWQ
6xFO/O0PZcn6YewryiL/85ughOqf8hKYoRQYySX9yRXPO2XO0PB33yk6ZxEd
7glpLd/PzAVn/c5CSgEbDBZ8xmRHFmCJu9HnalcCurZKXXkaIYE6AzdqtpD8
RtnfvdEVLI9OL7v9VfsI2NYbXySvrIIHo0wyhw0ImGYdqu931cAuwzGVQRkO
SPky67MP0fDF2ODyijQmJFxJY6cajEDe31TdkwUckM7ZNyJzQgi3Ue7UtT8h
IFnk6kGVw9LoUt001EbGs65kvdJzVsJvHxu6sy8RECeSyPutnoYen8wKZw0Z
UGZOPWVc8R7+xqq03VvDgZ5kVvUFUz5suXP3lHYmAfo6PWeOHJNCDamD4pTF
XPCZz8Vob0VcccooRvQBAfUp6t3nhCdhMHB8foCf/K/loJ35QAQVsu0+LCbz
wY8hT292mCzWl7jZnyHzBXoraIoOkPX946I4vbN0WB+vLP9UnhcXsounrE8Q
wGv+T0z9hCQunetam0LqobKoK+l15hK8t+fKov73BDyYPfEjPFwGjzMpSbQ5
AsLTJp12uQvgnigD4awaUt9K92eJI1R8xW4auEOeH7l7s8OzXwwPlJT3Hpsh
QLEfXi8LlcMCNTUm4zsBWawP93JHaBgZd69s6To6/NgU82JyRgJ1P44ZECT/
hXzCFfZj0pjt1Xmnn+TfTsO2+dqkFO61/3f+FqkXFYPxY7NcUSwfzOo3GSdA
3mif/fZpSUzl7Wflk+uHpbXWj49TUb8onytK6rNxva9c0y9xrH/aSH29QAA3
r43iP0X2G8t8vPnE6PCunVPt+0AC58PfUvLJ/sX8enKBSK0UWu8e+TNE+hO7
f1Pnfp0kngzRmdAn7YArIYre96gYr0CN/0f6H2/aMJq0QRKzWmNb20jbOW/h
ncl6Km59xtlr8//+5PYy5qCpFOql6wd+JW2fsnVFT+ZomGmaq355ah/8l1l5
n6W7Fr1r4nrtXVqBbv8rptNmA4aJjZ7w/VsP92dTS1i6VmjBr+BV71gJFs4G
Sbp1m3HHeYGq/NASaCl7GtZpsxUf+np7ClzKBttFQbTwzh14zpA3Vzc6Bejl
fLksXScUEc18YikRD6vcXkh6hjvjKn/vgu6cCPjBlx+rW+eKm5wd2xIbQ6Hw
9fBblq4axtPawoLucOB/4FEQsQ==
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], 
      LineBox[{1, 156, 119, 90, 70, 58, 168, 131, 102, 82, 51, 163, 126, 97, 
       77, 65, 172, 135, 106, 86, 2, 157, 120, 91, 71, 176, 139, 110, 59, 169,
        132, 103, 83, 180, 143, 114, 52, 164, 127, 98, 78, 178, 141, 112, 66, 
       173, 136, 107, 188, 151, 87, 182, 145, 116, 191, 154, 3, 158, 121, 193,
        92, 185, 148, 197, 72, 177, 140, 195, 111, 189, 152, 199, 60, 170, 
       133, 194, 104, 187, 150, 198, 84, 181, 144, 196, 115, 190, 153, 53, 
       165, 128, 99, 186, 149, 79, 179, 142, 113, 67, 174, 137, 108, 88, 183, 
       146, 117, 4, 159, 122, 93, 73, 61, 171, 134, 105, 85, 54, 166, 129, 
       100, 80, 68, 5, 160, 123, 94, 74, 62, 55, 210, 6, 161, 124, 95, 75, 63,
        56, 7, 8, 9, 201, 10, 11, 12, 13, 14, 202, 15, 16, 17, 18, 203, 19, 
       20, 21, 22, 23, 204, 24, 25, 26, 27, 205, 28, 29, 30, 31, 32, 206, 33, 
       34, 35, 36, 207, 37, 38, 39, 40, 41, 208, 42, 43, 44, 45, 209, 46, 47, 
       48, 49, 162, 125, 96, 76, 64, 57, 167, 130, 101, 81, 69, 175, 138, 109,
        89, 184, 147, 118, 192, 155, 200, 50}]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{201, 202, 203, 204, 205, 206, 207, 208, 209, 210}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"R\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.565699864028595*^9, {3.565699900984709*^9, 3.5656999321214895`*^9}, {
   3.565699969247613*^9, 3.565700399952248*^9}, 3.5710928617633524`*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJwVkXk01WkYx5FhWlRKWZItUyg3InSl5yH7eunipxLZ7pUoN0tKRRyTLpUW
LfaxNUxIoUiWKWuNaDGRSvbtvo0yypL5zR/vec/nPM/3833PeZW9jjj5iggJ
CbnS5/9b5eJ8drpC3a5+gxkTHZ0+sK4Wtx/kLECaJ2evsGw/PJfQWyzqvhJL
jOvbMpYOgMlFs9p8Bxk08K4zYA0MgO/WGQltCSWUTjzVWFUyCHbqvv+stVBF
huSU+eLoISh9dSq02UAN+dJS11B/GAxXaRSLntmCNafrmQZkGDizl9NyKS2E
jRc2myePwJGGIZ1iu234YyCZb7NxFM7vFftl/rAujo64HZAqHwXvxpN+2lw9
tLGUb2Vqj0GduKxjgJsBPmcVnFDNHANtyajkkRAmGrZIcTWWj4PnF6Mt9od3
Ynxlx6OmgHHISn8qP524C72dI2wVm8bh3gVmd4cTooy46AJTbgJCKo1YabbG
GHQtPrbZYwJqWnIn4/eZoHs+o0knZwL8LXZU+1O7UZcn1SnyfgJSb2uXBRwy
RafJcXb2WgEkfamOPhpuhgpFS6/etRTAYEFoGJdnjhmXHSz7eQJ4Yn75xtmz
Frh/+6OdWqkCEHbo+nQxyhIDB5REJx8LQMi4XDgzwgrDxupPNfcI4Jz0tF3H
r9Z4z8Os4N9ZARzd610/HWODPienF9hrCPRG6/rANVvUYCTbSzEISF252RWf
ZYeBre1ve3YTyFupEdGYYo97kjxkNrsQqOMpmm0qdMBvYR+TxLkE0pUy5Y3Y
LPQLahkSDSdQHTkjxH3BworYNzLWsQSUbcTnNrg6Ijtl0SgkEbjfps5/+8oR
58My/BRTCSQ0/NBScnfC5vC53vI8AleOjRzyfOeEz2quzl4vJhC5RmGFitse
fNNTI8arIPC7+k8tIR/3YFLSunnZGgJiX4Vl6w6w8VmzOol9SiBf6+7p9CE2
1gZUSv/ZSkDdq8B+PtAZLVxMr+9qJ9Bt9bDUecwZ1xv3ynS+JtCRfUITjrlg
t8pAG6uLwLd7jjtVJl1QsxMLVr4nsPCAVxYX5Ioxb29KH+wlYKNlbhY55Ypm
VtsdU/sJNLpv9Q84RmHt6uIgxyECRSVHpxcWKNTXES4UGyXQktQdPMwhwDwn
2ZeW1wdMcVZJ2UMK73gqrysfJtDMjHk4zvkAIsv9NogE9kFUaU3CpWQKi75z
9onR86/7Pr7sekfhavXyl54jBJoSOiynOG0Q774gp8TqA9Vz0zPzsRTeUl2c
+Afdf11bxsSylfYXTK5ZRu87xt32DRRQOKy/ye0+zQ1awRwxbg2UnhQaLjDu
g395q0t1Iynk7NikdobOc+V1v5+up7A3JBx76X6V4CfyOQMUFltqVp+n81Ep
CUV60xSil+HtHprrjhflqHGLoV42wuMIsw8OcLMkXoTT7/ERd+HSvnbJerbc
YwptjdorWmkf38/pOPRSmPtaoyOUzg9fklvSMUnhtwumS5ppls774ZQyS+HW
DAWdSZorflZXDORmQG2WlHe7Xh+s8uZWpYVSGHdi0cB+2h+3LF5kuIrC0NLZ
sVrajwdlN0p8oNBnysM5gM6n8nsrMj7T//Np3f3HND/LfCrk/53CQtPln4do
9irUz30+T2FEW1DwHM05f5MuPkMFYzqn7lTJDsH+lNIHfMY2tDLO1qTWj4Kf
9URMu5khKl+95Sy6fRwezF3J5zNMsLjgtVLnjQkwYmsnMirNMWVqYrDplADq
C//itZvZYFPcJROpFQQsFh2mQtodMHI+qtbmEAG/O6IZfIYTZvoPrZLJJqDm
9lLSPYSN02XRu6MbCIyK/hbLqHRBJc9Urv87Av8BHsenZQ==
       "], {{{}, {}, 
         {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:eJwVl2c81Q8bxg8hSsooI5VUQrI6Sf787tve+zhOKHtLtogQLQqhkFBWRFZS
smWHzJBRNAgZFaHh6Xl1v7jeXt/r873325wzsqcnkUiRdCTS/69gzJ/MtL31
hJSktlRychtoVW/W++y4AVyK27Yc1WqEzm0yLAynd6CsawT9TGotKMWo1j3U
58HFV8t0NbwVYC+xvk1qmwAOfp/d/5qtDHRF7Jd2qR9EwS4WN/bLRVDaH+zb
JiuMRbdV9jKdyIP/OESLGELEUM/L9/63gUxw/BWXmk2TRPpEnbpmh3Q41zx1
rEhXGjOXHsaf0kyGSDOmQ3/cyHi21liDlSkBbFsuOEg5yeDtsr/HpvfFQv1m
XkPXU7I44cJ8hZk/EqTYQ+988ZHD28++DKu2RYDVdwUxPTd5DGuq/FvYEwoP
0pr4f94ksF7Wzzn3ZSA8iZYb6TVCzL15aFbZ0Rd8XigYpOooIruzXcoFW0+o
bc/+dt1cCcsK+YoYW13BWf1ktTNNGRtKtqhdinSAe7lST11dVPBD+2TX01/W
cOt7dZiHvypqYVXH7z4L+PzI18/JSw2nBD2OnPEzhUa1uKRLl9RxXGLD0avZ
COj0307GhGpgGlP05a9hekBSLKe7H6CJw+XiGyyfNOAa90/d3qtaePF1/CvR
NWXwMLNt+BmujQqePI3qKggTYWQ7uK2DGQljW0jb5IArPvnt9Qe6+N7utDX/
dzLk7BANaEnRQz3Vix0BvFJQ77VP9XC+Ph5WSHBv8DwCaQL3+RUoBkhReqEu
YCYE1UHrJKduA9w16+4zri4I+7U3/z5gaoik94ux2xz2QNlrkajhfkP8/d57
2PUPN9xo/ispcNoIQ4RM7pOBE+K9v7hYjRphpCpVZpm6HYJ27t0ueMoYozvP
JBemsUCeCGO7z3tjzNMg9TsmMgDTDzre+jMU3Js1QDN4RYKHkiUX06YouDLa
KP1yfp0QsXmk9+esCfaUxiXwFi0TI5oVpSazJugsFF3J/myJ6M0MPAreVFx0
bnCQ850jVp8Yygt+o6JZEFdRktQUsfHc6+kVd1Mc1WZn6VufJLQl1VSDlk0x
41+R+SLHiZbTEs6u3jTMfWiUoTY/RBQWe/zc2KAhnZNUdff7PqL91ojntOMC
5OL9E72tzSDw59m9PzLMqLv7Sp7VVD1c66r+aELlwrGctO5hkSpg+sk/z3Cc
Hyvy7O2r3MvhVEHRxgFRQXw1QR9s1FwCpBDPY4sghM+jbAwuSBSA33djjilz
UXzUaBA1Yp4DEQzCy4eTxDFra+XDjqwHMGtV7SRqLIWS1hO7A8XuQdAOfzHq
6WO406NGzirkDqzsqFdNdDmOgXyXWbV/3oI4x3bzLqsTWP433iNk000IuNHh
Lep4EreeeWJMr30VNOgtJ1I8/kPdUOd09tJLQGoLyxIMVsCsx+X7LEgXgeFM
qnNXMuDhxaOaV+f9IeFg1c7nrxEfvVBt0tHyhrsNng84+xVRxjYl5wbXOeC6
vjC4NqyEus/obzcxOgP9+eMVLhPKmKYVpdux3w52dfnvnl9UwZ3+aa5UXiuQ
f80bNPdDFf12ll4KpTODgdXwq77ralhxrNq84jcFJrXKFa7TaWBnFWvJgTkD
IGlofOP+o4HO+W23q6K1QaXgzeEKkhYWcqbGntRRg9+yR5k/MWpjsSejBjIp
gfC8dnwKqw6O1u24EcivAIFbHNPtduuikvbfLzSLEzDWM5GXu1cP3X8Gb5f4
Kg1l9Qct/Q/oY+6nhO05GeKwMZdoOc1lgJs9RN87NgpDoV5ntFGcAUav0yU8
ljkICx9C/zZxGqI9b3eZk50AuNxMevn3tiHSUu8eT4jmAwFtrvHfPEaYX2O+
8DZoJ+zY80O37p4Rrux7Yl1xmh2uNW5SqOczxoZcYZEJE1aIS7/l9uqeMXIs
s5K//2SCoejwpbv7KDhbwn7uThI9UOOGX0lkUnAoRbU7kvMv4dT2+HOnqAnK
ANctf9FVgv5NSWhegQl2U1Q4fZO/E29WeD20JKi4raOgfKxugfh05HNZcSkV
T75TFf1U/IUIkpk8T5E0xeUMt2mBXx+JbB+LYLpSUzzYa3NHlGmCYGmRG/Qm
05C8FCMwnDhCyG02KH5aQcMiNXb1CaU3RJtceMWc4ztgLU+v0RRqhcmvY9bn
lzehxmSb9iDbSxCdX1spOMWBQbVflhPfVMNBZSlTqhIfcuyVDVd78Qzefe2/
8mj3ftQZs2h2migFIYprXLjyIVR9bCj/tfMxcH2cVqZpiWB+2uL6rpqHYLVV
xOhO1FH0DbidMFWWASLiwpumByTx75HUY7tqUsHPVaL40oA0bt8nHZ01nAh1
T22Pt8+SMdVyncXsZxwEch+YCPkog31eQ2SPO9Gwp91rUuu9LKr9J0RlyLsG
VdcXKhu+yWH0TL2/R3k4SI5bOj3/IY/fwve80mwMAaOLUi8nOQEdywskWvQC
IOvUhfOqtxAjd4yFPzT0gas1g+dpsYpo2NT67oCHB8zkaX2qv6uEkUPvr107
7QLllif+m7mnjIu97BPGuvZwqpIyXfBYBQt6Tn1u3GQNDhOzF8XLVfGjSeq8
ibU5jPf8/uteroYzWiFs9yWp0KdxcJaxQR2VStWPcPYZQqj2rZm+Gg00tSS+
Zf/VgQy/5gSxak10lwsTdIxRByVhjvyRZi20sBnjV1pTAp2swUeardq4Hnd2
m0ozAeLNnXRGQzqoEX/nyn/5snC+VEGJ970uvjYde3DtyzE46nzYLf2dHtZ4
/c3glpAEq5zD9EEz+hjVID1FcIhCzrPyAXVvA2SWcrsYrHgIqMXVG7u+GaBa
xbvt0fr7QW3uteUtP0P023K9YPvSbnDZlk6eXTHET84bNmplu6DLMwAWg4xQ
5J2GLWpwANu9lb7YX0ZI7+wcXdOxDa6+HaxeCTTGsn0Gu1mVmAEtGsc2kyh4
TiJY1O/WJhB/edZrNZSC/waCmtG6QTAHF0nLsJhgUZDTXqbwNWIXf6Gj8U0T
5DPRkohO/UHQ7juzG2yjIsfthsuaTYvEqKPk0s84Kjr/V8q7xjJLyC0nm/3H
boqrtyRuKG//TPTeceRViTXFt+0XyOVrE8SjC8i2ykVDC9+hZdvNY0Roae2N
2Ds0vLVZv2Q8epDgeRmo/PXmT5A2OjUwFtIEp1njBi+dZ8WiEpfOoN46mH7E
fPnJ4b145VPJh6XjT2E4z7/fQv4w+ksr2OnlPoIh+tr3vmePILk1+vEcWzb8
MH/f93aUhrafj7CfZBkgWm/0aiw7vobnTu12AmOtoPLZo/FpPx1eee0Wv5j3
En7/4Q6lmbNj5GJVRV95DRxzrty6ocGLdyRuSnk6PoeMaMf2swkCqCyj91+t
7xN4QUwr6jYdRImwy+6GOYVga/FkNLZeGHlYDKfT/XOhKzovVJfxKCb3Rtkp
KGdCa8LpbrVESbwUeFjEPyYNviVt/ZZ0SxpTMw72v4hOgkPMxx/bFpCxTJyn
qScoHtzPvc6k5chgKv3GScIpBhamm3hH7sli2u3G+W7L6+DXeULkzRM55JQ1
3UciIqB1Wk8rvFge3ydINYnSQiEw+tfCXDeBVy/dehDDFAhiP96KsHohWsy+
Lrz/1gcuVkV+DHRXRL8Wx2CuaQ+gyK3OHrqghJsqdu232uEKscayv/MCldGU
nC6f88Ue1qVe6rHeUMFNc27zpIvWEDRDCX19RxVjTro6AI8F2BAVL1wT1DDS
jZ2J3EOFDvURRZUMddQVSFUQ1TYC7Hz6uSRdA3dxM37prNaFHnNC2yFFEzd3
BXsPn9CAT+kRv6kPtZB+NmAy2l8ZzoSklgvkaCNSPAqUswCYD9I9aS3XQZc5
w8XiUyehOcM1uqdOF3kw2Pm+GxlmqnK9nlTr4badTfN5GZIQeyMzs6ddH3+t
riRV1YqCoNuRgAZbA7y2M3mKpeMQRO6yCIUJA2QrkR9gbN8PZSmzj986GGKL
Hu3u0Tx+iHH/aDn5yRDZ4lprb1G54Si/vCzzWSP0lrq+KtjAAd2bPdJXZ41w
9ThPn1UMG9CvBjqwuhijk3yG+PpXZvjR8NGYWDTG7Qe4Kuo5GODuyLOm0XMU
pNwvf3GCSoIhajHNZZWCJOtvHedk1gkBEDPPDTbBO/p7Q5MPLhN8vuyTRr9N
MEWKY1OE/BIxeNkkZnc4Fcdbiq1Vq2eJ5H7fV4V0pnhx1dkgNe0zMX34rKN9
iCmuHU9xv3x+klg3eSkix0jDR79JoprNY8TBaz/X/0TQsEm5ZxOX/BDxV5Vc
s3j/OzgVc+8f3d8MNQyH5OpMt+C911OWxWb18LM77qSF+B48KVhtyd79FNwS
foQL1Qih/V7pjxzO+XD4wvWAwo+iKBLsZNBdmg2JUjxKGq9oaG3z4m1f5gBh
eCXX/uw8Dd8J8uC8Vz/RLOnpyORUC9J6SVXZcm3gY/PCl9JIQr1fgsmOay/h
I+NDFfHRHRhkKS0dKlILckEkB+MOHkwcH2xYrH0ODO8k3V4bCOBM26XLj+uf
AENZDq/0lYMoQtdbOclVBJFJPCJHg4WxzCZZNuFNLkR0f+EWaRDDgYGwQZYb
mcCjsSqz4i+JLZXq186sp0Fx0RpH1jlpnBA6ZkmdTQJayR7n4htk9JO5/ulH
XTw4pRxiVL0qg3nArq7TFwO08+eOH7ggi7uMXmfJV18HysLIO8sEOeT+YZcm
Gh4BXO5qlU7R8rghJXLxQkIoRN+xYvIqIrAu+V7gObtA8KiPvHTOBvGxpLzF
BQFfCPjPju/GaUW0U3uXYXrIEyLp9RdMXZWw5OIr6URXVwjqfD563VkZRbjp
WMNOOoD22XU6+QsqyHmzo9alyhqYzrHQCVxVRcblzIwwXwvI8knkcQlXwyGh
Pl3yAVPQaJE5axunjvOVJmMO14xAgK31o0CsBpJjd9TL79MDJ71AofBITexK
DPkweFMDykcUshMStfD3QHPK0jNlmHILlWe9rY3e+s75XVsQfvTe3cqQo4N3
3baTK0tPwte7l8qOlujiYNvOyx5FZGh1+OJbXaCHI9bBrbljkpAbYu3z+4U+
CuiyFYnxHAGr5k/tG+YG2H52MCKDQwiyNPPr+oYMUGjpk20EsyC4eK9RNs4Y
Yk9VscKmzXtAcN/V5dNjhuiyE5Zc8rjBwjOVzGVvhMmDk49VSJxQWi12Weyj
EcbwjldGfmOD2isdconWxtgW/+5UhSoL6K38iD41bYwLd79x5lIYoHvKYkHP
kYLT7Xk+FrEkqHtZ7MqwSMGpvk+h67fWiSyD2f5eXxOs989wcHZeJgIt7bX6
v5sgwyn79TMBS0Q/l9OZoxeoKJwgv5LLM0doNH4In16jos5IS0j21GfCZ/Ec
24qfKe4XvtUgVzFJCL6MOGH+xxTZmvRE4w6PEytenKXkIBrWHv96MSphiPDa
fOuC16MlCN5iWvDUpxkWQt1nz6izoCa7oqff/Xr4+2EwvriEHzUD6vX79pZD
OcsT860hQuhLymiJeZUPes/mm7Tui+JAzy6lQqYccOInr11soOHluSn29m8D
hKBnI3/WJxrGXzvRH1XdT4Sm3CiU+UlDk43wDXORfqL+fGGWsFMR7Fxxdlpy
boMbApZdB+RJOCY5fvj+/kYYuj4vlHxvBz51o9IH29ZCDeOB+D83eXBJ2OvU
47nnQL66U4EkIYDtWgwJ3NNPIHf+8uUsh4MYpc2/0aRTBGky2vq/zIRxtTaa
K5UpD6yWrn+4c18MPT5GOb8tzoS6B6ozuk6SOJkhJmMjmQ47Kj0y885Io0xG
bL4oXzIsMXK0vAkio/kkX6/1h3hwKOk+Xukvg+WzshlFDLHAiirK6i6yyPtS
96Tf3HVQIolXZkXIYbrE4xnenAh4IdngbR4sjwxbz5auloZCEl/8rbI0Ar2L
tELexwcCR+6k+AMzxMHlwpJ6ZV9YWTd4ymWiiHz+jDq6Kp6Q5bC+6GGrhPzm
nSoPk13Ba8tax5qVMnrNVKeMWjvAjy13Rvq8VPDhmtDC9xFr0CmxVdQIUcWT
8t1vE7MsoCnmivqXQDUcfwFtmTqmwHT1I713pDqOhfy5a/TQCGLFe2xp1zSw
40dstpuBHpSp8ySwX9LE/PPscloVGpAecDfgSYwWeqlukvMeUoaCD54bYTe0
MbkqLtzzMILLo6lnD1J10C4jZ0v5u5NA4o5uMc/TRY6m4deiPWR4VnndXylL
D2/SDQ35/ZIEckDdKPsTfRScS0nvVTkCId8bvPfSDPBDz85EFRkhkPzQ+z61
3wDtcjKbdgoLgpplaC67uSGmhp2PtpbZA67+tLrdw4aoRmURV+vjhh+7u6T5
rI3w282lZxn7OCGDZ+t5tfdG6Hrc7l7iwe2wV285y+K0MTKGSi6werHA7+3B
Yo4fjdFvTiplzpcBZs9KMDDbUvCr1A7TqsckIK9L+vbMUnBsB12fTN064TDc
zj7taYJ2fSrKh24sE48oMX8TFkxw3ZpNek/SEmFssaQq40/F5C/k56/U5giB
Kj4rxhUqsqiPxoaxThEvKEvWNV6maJE/ZDgzPEmUB9jXuK6Z4jhPCEchbZw4
4/RgW7f/Px89oETF+iFCzAnMjhUtQtNCIaSkNQMzcKqI1zJjeGn28+aX9XDp
7HqdmTc/Vrhezs9QKwdzlbiWYEsh9GsqtDD9kw82JvvneC6K4uRgXhafVA70
sDdQ+GpoeDLCSb2E7w0R5WB0HiZoyB2sJIsf+onpWL4tvd/+5Sol65v0+gnu
nL9GKb/+8btn6uUyQz/xjFlk31mndCjUGO2qCGsDqQ2b5V2LG2DX9Jt+9Hgj
9GpzJHUF7UCz7g9ns0NrIVSrLK/XnQdfXdm+/8imCtAZuZrNs1cAG03/mfuv
J7Ae5Vs5Rj2IYfsMMsf/cZ972c5mUlMYM/cdudq0Nw+66MzaOmPEcKrC/erp
l5mQoDf3MsBKElmZLUyuaadDHRa4ilGlUWnr9vpyqWQgJFlXvviQsfi0J6Xo
RzzYyQvprZyTwdigok1qHLHwOVNca9haFkWvdCiQGSLhBfOgcEvQv/9Q/7Za
7rMI2MZB6u73kcc3bZJFOg2hcM9CbNDkDoHRwsU3K/IDwSaFjfEFFTHjooT2
BRNfeGrWQj9soIgNYZ2mY8aeUMrT7RlsqYRkjR0PO4pdYV6Yt6nEQhnJC/GH
hPwcoHXYtjXdXQWHA740dM5ag3tvrLXFBVXc3Zbng1UWQN3zdzzXTw0PZ7nc
9rc2hU8OlZ2BV9TxN6G5PlJuBK01Jgd8IjRQ6hPvvKCzHpipTLUPBWtiUn6C
g8BrDUhobf3QEKWFZU2M/9xbGdjSZ97LX9NGP0UjqTfHEYR2sUV7JOtgmwvu
MVw5CVsGOHu8snXRxsbsEf8kGcQ/n1pluK+Hm7nLiz23SMH68kIsf5E+Pu1k
UVE0PwJskVKtR6kGWBegLXNEQwhWij4vXuo1wHr5NLHvJwSBPKDcy3fKEPuk
D/Qc1dsDsQfqs9ffGOLHKyOP9ae5AT0/S+2xNEKvXscj9hKcwKcW6Gk8boT9
re80qhS2Q2cJixmYG+MusaJV42ss0Muv+OvspDG6MX4wz7zCAKvFSdEfrSiY
/6uiK6SKBO47l9aefaGgbcihn16D60Rrqlzxt3Mm+EhLxDQpdZlQ0s+i+X41
wWzT1JzYh0sEB6m8Qs6Xip+SYyLXTs8RrLIyXZw/qMh7ZmsV474pYpSpNCrD
wxRn5uvDTGcmCdLAAJ3PT1O8QHLmM/McJzhsnSpTfWmoYsmsWjE4RFxLutMW
L7UIY8yvIgqeNANXmv3izgvMmG414xk5UA8qpVGDEhR+LPBiPZZjVg6FE2F/
yvWFcOPumdrTuwrALUtuY8NNFIPqE4M81HLgCut1+ulKGubr6B6qE39DoDWv
0LZ3NHzy2mMbeaWfuBc18Sx9kYazc16vPKz6iY77TSTnNRp673QvFeDuJ2zy
T2R3/qFh3mKy4Mi3PiJraOFtlLggjpIp3PsaSsAipfR5lLg0XjkkelU2Oxme
/45/GCWuhCcP+AVdfe8GDfldXj2q2niacSCLV1ARHB4zpEeJG+HOOu73Fi1c
MMOQESH+DwAhJz8GJ/svhIPW1/Ae1f8wPjPbKnlLOChQpG6Kv1DDbXN0o7n7
qKC+yY3m06OPryy2plmniILwqT720z4UzKy25UJZEvwPPHpGIQ==
       "], {{{}, {}, 
         {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl1HV0lmUcBuBRskmNkaM3YIMBAtItJaCEYtFKw4jRtpSEmIQBSgliF0qX
IKAo2IQSBhiEYiuY1+/wx/U993NvO+c77+7zpg3I6T46V0JCwhwfcV7uoyAf
y48ziHrcrGtBXva6P0xuOrgX4hP5CQZTn1t0LcnHPvdHyENH98LslxczhAbk
pZO+CAfkJQylIbfqWnER77k/Sj6ucE/moLyUYTRiavyu80pnUQ7JyxhOY27T
XUZ+3nd/jPx0dk/hU3k52TThdl1rEvnAfSGJdHEvxmfyk4ygKUl01RfnsLyC
kTRjmu5iZzdnCY7IKxlFcwpwlb4kR+WnGE0LCnK1vhTH5FXk0JJCdNeX5nP5
acbQisJco0/lC/kZxjIrnoOzCNfKZfhSfpZxtCaZ6/Rl+Up+jvG0oSjX68tx
XH6eCbQlhRv05Tkhv8BE2jE9npuzh7MCX8svMon2FKenviLfyC/F/mKblKCX
vhLfyi/H1mKHlKS3Po3v5FdiO7E5StFHn85J+dXYAbPdOzlL01euzCl5dfzf
Y2Ok0k9fhdPya9wR+6IMN+qrckZ+nTtjS5TlJn0G38truCt2w93x3Jz9nZn8
IK9lcmyH8gzQV+OsvI4psRsqMFBfnR/l9UyN3VCRQfosfpI3xOZiN1RisL4G
P8sbuUeeHtshjSHuNflF3hTfM7ZDOkP1tfhV3syM2A2VGaa/hN/kLcyM3VCF
4fra/C5vjd3FbuLv47k5s511+EPeFv+T2A4ZjNDX5U/5jfi+sRsyGam/lHPy
dubEbqjGKH09zss7uDd2Q3XihVefv+Q3Ey68++6L7ZBFjnsD/pZ3cn9shxqM
0TfkH3kXD8RuqMlYfSP+lXfzYOyGWozTN+Y/+S0eit3Ec4rn5hzvbBIvYN52
zI3tUJsJuqbxfmaP+7zYDXWYqGtGbt5xnx+7oS6TdM3Jw7vuC2I3sV33NiTx
ofui2KzcNt5NfBQ7dbajAJNpz5R43n72P+01p8E=
           "]]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{385, 386, 387, 388, 389, 390, 391, 392, 393, 
           394}]}, {}, {}}}], GraphicsComplexBox[CompressedData["
1:eJwVVnk41N8XHrKV3diTbCmRJUsRzklEKkVo8JUszYwlIe0KkaWJiiJZsxZJ
EYUQETOfaSFpQUp7KVT27ff5/XGf+5zn3nvOve/73nOOqs8Bp328FAqlixz/
n9XOzxXkKDdb4hDRkpHBBvsGQYcvjAU4au5y7okjAU9ETRbzeUpg0aO7TSxe
Llidt3lYskMedZIWlr7vJ2Cf3rSogagK3u+kOt4wJmC71r5RWVsNbLHVSkxT
5EBl98lD7PWrMCBCWcP8ZQdskFpdwRepg0HXXwflb28HxkxKdhFNHzW6G46J
1bXBgcdfDSu2r8Uef73cYotWOOsusGIuyAjD3ifNDRW3gG/7CboB0wQ3C4k/
kVvXDM2CCo6BbuvRImhIwaO+CQwko9K+h5uhwRElvtixB7D3r4WOQ5A5ClWl
mMbG18G1nDaliSRLdB3NliGk7kNVsllvlxOid/AadtWragivs9iZvW0jTovO
qUb8rIImTtGfRA8rvDIseVGVUgn+tqYN/rRN2CWvY3zZ4zZkXTeoDgywRotb
Vs7ih8vh4t+G6JAjNmhoPvB6c3IpfCk9dJgZthmFXcoShWSvQ+vmlCunT9ti
9+3ZvI7iIuDZ8XbwfJQdaoT2Cr5OKwDKxhqevGNbsCepe+ZF0zVIkJvY3hVv
j+aBE3u9P+RCiLtvy0TMVlz2fLjF4kUWfIg28oPL2zCnVWyN1csMkE7NeJt4
bTvyLtvofFQ/HYolVh9rz3TA4r5ekXXjl6A5bLnNyrIdWDNJhdUdKZCjkqdk
4bwTBxrVHt/6cwEaIqYpzOc7sUc2aad7YTKobhWcVd/tiAVbJnxND7Hg7jMt
1ptuR3RzOxCl3ZEA5x7P66t4OmGK7zU5tnYcpB78HrC3zwmTazJWlE7HQISM
sria2y4s0z5wbWDxabihxc8Jf78LgzNtHb9rRIHAPx6F5j3OWBvszxldehJK
9O+cyvnqjGs80r3OLDoOWj6lDnP7XZCzBa35tx6B3i21lS4/XTDmY8HJB7yH
oKvg+Bo46IqWBhtCPNlhMFnlaK72xxU735lTpYZCYOF+WHVc8G60C1yW+osV
DFv1N9tEjO3Gir+pDf7OgdDuqecfeJCGhrKZaxTzmXDrdsjEwgIN3+sFp/kN
7wPOxd7Qb4xhCM1RMK/J4oDK3L2sORMhhPX1IUoEAQlPGz65uErjGcVycQYf
FwQmlH7zGSvh0fYRrl06AW43KxbUV6vhdnfr2BuVHKBEhhqOgCaKSxHC6SfZ
YCa483Z1LQ2dODP7H1kygG0WUzvEGIBRyY6q8hUcGPzV7310bBFuLuBoBZP+
Vv+eGr/pJoX5puIWU0Jc0NhksNvVShG/3+urtm0kYOBXd1zpUlXUNgm1VJzg
gKZzYErMphX4fXJi6vYTNkRVNp27kEZDkdLyVf2/GCD/6PimX0kTIBARKmhN
IcBTJOXV6aMiOLzkwyG33wR8vhXdNe8ki2G8ms4Pxwj4Vip0pmqlMvJm+K5l
+RPwz+P9i7d9NBxzdSgvuUSHjnNddmOMZ6Clul7Pa5AN1l9CWqu7edBaavd/
Y4cJmJ2Ti6J5SGLDuvP3DQS5YOhfL7xgp4CXN4wmCj8jID+Zwdl/SQWjrkop
rJIjoM7y28btbRp4mQgOu/CPDRoJE9NzsTRMjngz5GzLhHkbo8aRvL+wS/ts
UPdzDjTyrTB7uHsJXliiSal8R0BNY65HqbMMlpSOetjNEzDxPMX0P91luHx4
vmVdNAHpBvJWdgQNFcYY6vLf6ZCe7sAYTvoKjneNc2t9ORA9Zr9gJiuAestD
qgOqSD7f9e7noVExr6lvkELiL7OsJL98w1J85pYTXlpGgAE2d3w/PgOPI1d1
r9Um30tdCLfJEMOP1KEWy2kCpHN9t+xylEMjNabrjx8EOMZd37f/Nw0/Cl/3
3r+RDo/1QxkCzCYQfLSv4FYjG8J96g45t1JwORF5ddqPgE/8Jda6fRL488S7
cHN+LphFUOi7uPJIbU7Xqe4hgG9AP+jZThWMHZ/Oz9Qk7bvFCmvjNPC5S2hM
hSAHxsOolUYRNDRTE0xNCmdCmODFE2Glo+C53HbZnnscGI4K/rnHdjHmp9v1
Ml4SkPtYVyXqpTS+JT5fKebhwvzHV6m37yjh1rM8n8PPEcBUMpo61ULDy6tP
qz+mMuCUotDgn7yPcNPIvpFmQ+b/0Eu33/DzY2KdY9dkEQFWXwLWvnothT0P
stRekPgp6Q/N8jQpYtjsjj9rqwko5FGOC4ydAqGcDXftZAnQuWCn+SlBFC25
F1qa/5F4Fv8R1eqSxbTgIwHZIwSohbYqFX6m4TbjJyKfAuhADVhJlfvMi518
lJDWeAKo4wn1p99KYrjcS68DZLzkhN4EVaYwbq7JLKR8JeBpjUR69wsZ3HNi
ir2D5GfnMR6HLE1BXNNuPMNuIiCkZ9sN7VdUXNelvCNOgAtEevWj4hviaN5m
UvGS1JN2enfsyedyWLql07D0EwFRmedumUzQ0GI+W3aTPB2aj94qXMWsgM/5
dxQcb7LhnIrXU3VzCn4puNxx1oOA14m/NTOyJFDQtu7xzCIuNPKrp84lyePP
T4E33N8SYBQvY0HRU0G/HUw/PV0Crv8+c6aQroGBfi7qqyU5sId5TfT5ERpe
tw6hbWExQYcJ7oYVI5C4MrpJv5QDQkC11m0SwhcMkTKf5wRcsj/M+/OyNHZk
qLYqkvFO759+6H5QCY1YsVpDFwnolGxxVmykoe+Cco+ZFgNGe/1yw0s/gJWu
4Jebxhzg6JkuvnGSDxf+3JzpySHAJKBS2ipDCtdmF43OkPjm1YqtvhmliNUJ
vmNELQF7fLh+OomTcMSuf3GAMAHWDr9OVVFEkafW1q1slICR1WYjqSmy+Khd
U27jXwJYdKej8IGGO03FjB9E0kFnFTfwy3+82Mc7OhYdSYDQ8efZv65KouHF
DKuvZP4o3hz1YWRgCS64KtAnBwloMaMdg0syeCohRtNrltTnuuLiwBwB9Iqo
cHhA3sfP/RIrLZ2KgQENdBp5/pOLu9JhVXFU3yh+vZjcr7JUifHtghyO9tGq
e0l9fLuguKTrDw19Kg7WPtWhw0i0l8+jpZKIKwNsHUg9lFp9tZCRkUF7tvLs
EgoXHHzUdwbJU8l4aB9J4iHdVfBEWlIMJZpbadkTBCiHbXwjpyiFu24lneWQ
6xFO/O0PZcn6YewryiL/85ughOqf8hKYoRQYySX9yRXPO2XO0PB33yk6ZxEd
7glpLd/PzAVn/c5CSgEbDBZ8xmRHFmCJu9HnalcCurZKXXkaIYE6AzdqtpD8
RtnfvdEVLI9OL7v9VfsI2NYbXySvrIIHo0wyhw0ImGYdqu931cAuwzGVQRkO
SPky67MP0fDF2ODyijQmJFxJY6cajEDe31TdkwUckM7ZNyJzQgi3Ue7UtT8h
IFnk6kGVw9LoUt001EbGs65kvdJzVsJvHxu6sy8RECeSyPutnoYen8wKZw0Z
UGZOPWVc8R7+xqq03VvDgZ5kVvUFUz5suXP3lHYmAfo6PWeOHJNCDamD4pTF
XPCZz8Vob0VcccooRvQBAfUp6t3nhCdhMHB8foCf/K/loJ35QAQVsu0+LCbz
wY8hT292mCzWl7jZnyHzBXoraIoOkPX946I4vbN0WB+vLP9UnhcXsounrE8Q
wGv+T0z9hCQunetam0LqobKoK+l15hK8t+fKov73BDyYPfEjPFwGjzMpSbQ5
AsLTJp12uQvgnigD4awaUt9K92eJI1R8xW4auEOeH7l7s8OzXwwPlJT3Hpsh
QLEfXi8LlcMCNTUm4zsBWawP93JHaBgZd69s6To6/NgU82JyRgJ1P44ZECT/
hXzCFfZj0pjt1Xmnn+TfTsO2+dqkFO61/3f+FqkXFYPxY7NcUSwfzOo3GSdA
3mif/fZpSUzl7Wflk+uHpbXWj49TUb8onytK6rNxva9c0y9xrH/aSH29QAA3
r43iP0X2G8t8vPnE6PCunVPt+0AC58PfUvLJ/sX8enKBSK0UWu8e+TNE+hO7
f1Pnfp0kngzRmdAn7YArIYre96gYr0CN/0f6H2/aMJq0QRKzWmNb20jbOW/h
ncl6Km59xtlr8//+5PYy5qCpFOql6wd+JW2fsnVFT+ZomGmaq355ah/8l1l5
n6W7Fr1r4nrtXVqBbv8rptNmA4aJjZ7w/VsP92dTS1i6VmjBr+BV71gJFs4G
Sbp1m3HHeYGq/NASaCl7GtZpsxUf+np7ClzKBttFQbTwzh14zpA3Vzc6Bejl
fLksXScUEc18YikRD6vcXkh6hjvjKn/vgu6cCPjBlx+rW+eKm5wd2xIbQ6Hw
9fBblq4axtPawoLucOB/4FEQsQ==
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], 
          LineBox[{1, 156, 119, 90, 70, 58, 168, 131, 102, 82, 51, 163, 126, 
           97, 77, 65, 172, 135, 106, 86, 2, 157, 120, 91, 71, 176, 139, 110, 
           59, 169, 132, 103, 83, 180, 143, 114, 52, 164, 127, 98, 78, 178, 
           141, 112, 66, 173, 136, 107, 188, 151, 87, 182, 145, 116, 191, 154,
            3, 158, 121, 193, 92, 185, 148, 197, 72, 177, 140, 195, 111, 189, 
           152, 199, 60, 170, 133, 194, 104, 187, 150, 198, 84, 181, 144, 196,
            115, 190, 153, 53, 165, 128, 99, 186, 149, 79, 179, 142, 113, 67, 
           174, 137, 108, 88, 183, 146, 117, 4, 159, 122, 93, 73, 61, 171, 
           134, 105, 85, 54, 166, 129, 100, 80, 68, 5, 160, 123, 94, 74, 62, 
           55, 210, 6, 161, 124, 95, 75, 63, 56, 7, 8, 9, 201, 10, 11, 12, 13,
            14, 202, 15, 16, 17, 18, 203, 19, 20, 21, 22, 23, 204, 24, 25, 26,
            27, 205, 28, 29, 30, 31, 32, 206, 33, 34, 35, 36, 207, 37, 38, 39,
            40, 41, 208, 42, 43, 44, 45, 209, 46, 47, 48, 49, 162, 125, 96, 
           76, 64, 57, 167, 130, 101, 81, 69, 175, 138, 109, 89, 184, 147, 
           118, 192, 155, 200, 50}]}}, {
         {RGBColor[0, 
           NCache[
            Rational[2, 3], 0.6666666666666666], 0], 
          PointBox[{201, 202, 203, 204, 205, 206, 207, 208, 209, 
           210}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0.6},
     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[0, 1, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"R(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(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.565699864028595*^9, {3.565699900984709*^9, 3.5656999321214895`*^9}, {
   3.565699969247613*^9, 3.565700399952248*^9}, 3.571092862510395*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJwV02tUjAkYB/Apba1LVgxdtJW0KKS2VIY8T+kydJsZU96Q0m0mKUoXEUIn
Ui7jkrXdD8VOu5VQ65KpWdQUJ43bUcKYRtNtXjtkKGP23Q/P+Z/fec7z4f/h
mRe9gxOnT6PRgqj5P21Pai+WWbWu7vcY93ZxkUPTj/bWSfxyaKmkx3S7yaF1
d+2lRfw6EJtnRe5gyOGBUwrPkC+Chr00pdBLDu2FUuYYrwvyI3QWNiw5SBiH
b47w3oD+9Pj5+kly6BD0pih5JDCOmshLq+Wwrtko+D1PB6VRvI165v3wyNht
skHEDKz3EneVT1WA90nflsshZugR0+rBUiggbtm4sbOxDZoe39d2u/49BNnH
/TvH3w4dTcb8Jh8cgIan+9IlHouwwJR+Dt2VsHKmQ53BgSUo2i9meJBK4E2c
Lq0inBAWnFjsVzQIOx4MuNQF/YrfFUUFAQuG4NhGw1+0211xaDB8C71xCGLa
9sY7890wgGnZyXAehlYjc3ZiuAc+Ygn32FUMg7NJTtFgGgNXdtD5DtNHIOqj
55Lg7asw/5b0TnviCFSW3bfUHF+NMaFZgdbtI3DtBKNXykE0MzLQMSxGIe2W
J6s00AuTz+XnSiJHQdRRpc7f5I0Rlx3bXS6NQoL/iuYEYg26ptJf6L8ehZIr
zjcSt/kgRz3CvThHBYKPzQd3ZvqiVe3Us1eZKngvTM/gp/ph+ekQZn+qCu75
nf7t0CF/3Lz8ziqnEhXohfS8O5nDxCSFjYH6rgpoXo16FVlrMWNYvE/Sp4Kj
ppog6ZF1eC3SV/h5QgU7N8aINYcDMHavRsedTYLsoGssnAtEB8eiYLojCfQz
F3ryK4MwqbP7Zd8aEqpnOGS1FQfjekGk2eIwElpTrX0X1oTgl4y3AiM+CWU2
FZaeXBbGJ3cMGGSS0Jw9TuM/ZmFT7nOzdbkkzAsw+jZ/Axu5xZOGQEDC9S77
gpdP2ajNKI+3LiGh8MF3J5sIDkoyv8kaq0k4s2twW9QrDj4UnZ04X0dC9myr
n2zD1+PzPpFhahMJf9j/0JH2dj0KBHO15iISDD/pmbdu4eJDiT2Ze5+Ey05X
95cNcLEl8ZbpP50k2EcLg7VJoegf5nN+dTcJvWtvNoQOh+LPXjKzF89IkF7c
sxR2hWGvraKL1UPCl2vsVbbqMFz6AoUzXpOg+zv1Rl7yBjz88oLpVhkJAU5+
vtljG9B37XJ2ST8JbRHLEhJ3Edgyqy6ZPUDCzBj+7dJ0AvP2TFJspryFX2n8
OJPA32ONwviUP6fOanDNJpC3YuGiA5TtjmrGtbnU3m7y8T8p5zSICk8VEVj7
lbfJUEn9lRGr/sZNAv+Kmje3kXLetHx95W0C0xsmhlsod5uIuRZ3CQz07G7q
pMy3dP26X0ygLC0TZZTPO5t5Mzupe6F69rRBEj5tevuk5xWBs+wbn0RRxq3m
C4zfEBg7FhmaSLkgnrMbZARWPXOQplO2TblneUlBYB1zafMxyuy8K3FJKgKV
7gvDr1MuKZA1lX+g+r+be/0uZeUpiylSNYFfTvhMkVDOKS6sddMQiNErr/RR
flhxn5bwlcAan+kfBiibVn/nFE8QuKzcykVNObrGveqRlsCsruSUb5Rr63dq
dDoC3V30agyHSPgP+mZZww==
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwVlmc81g8Xxm9ClBQpI5VUQrK6k/z1Oyd7b7c7lJlNtqwQLZVdSEZIRHZK
9gyRHRJFRMgKoeHpeXVeXNf1+XzfnHOuQxaXdS/RkkikIBoS6f+TL+JPevKB
WkJcTE08IaEFXjIKHnSyTYE85Y/vyoJboPZKXoaAbT7sWbWzXbRrgSYxVxsG
22qQ0IyveCLdAs13u5VXbDrglW2rFe9wM7RIh5TN2nwC5tKUKhX+ZmiNGnKd
spmHLEw93d3cBLfiH7TEiC/AMOPb0NziJhC2BaOT+QvQOJ8HiclN4LY1ys/t
2SIEbDPMfeHRBH8VyFULqT/AtoDj0MdDTcBZ7yv3/d5PkNA93zcc2AiqlVs1
v9psAvu5HdtOqDaA+KbFyt6FTbBq/E378VQD3OU1fXdYhoTDYiPHUg81gIfF
a0/9BhJq/uJLsFmvB/mvLg0vemnwRodjzEJ2PYx9Hza/srIFlcda1PpZ6oH3
z8tHfyQZUWPfjWyzyVpgT760sMePEVPMpl3D+mqBEXbLi1QzYkjRk1dN9bUw
H+Q8c1GJCVVYz7l6pdZCFd1R6RrDbfioY9K0wKgWLjBH91+7woz5hfbt/t01
0L5Dkonuwi6UcgilnU6qhm41tvh3/rvQqPOL05Ogahi4Pcef8GgXvnCk0AZY
VsM4/VN5kY+70N9UQiJIsBp+/+EIohqzYthCRVlPaRUIza2v5p5nQ//qbytx
7yvh1rvKcQMKOw5nJncOClaAbIRCzVMtTlx4u0JTxVUGQaol2d3OnPj2xs5D
x7eUQRX94Zg/9zhxUcDt/PPZVyDtT7LWa+PEuJH+uoXqV3DSrnz7pjIXPhC9
J+5q8wqOyIkbUmS5ke2AVIji65fA8JNnju4UD5ZlX7pU4VwK8kV3+kX1eTDX
jflkplEpXHPaqDFy/6c7XM9JUyyFv1/6YwoKeVDFp1ar50Ap/OyMPmMish/P
8FWasna+gKlnjNeLjx3AGxOFXxZPvYBLohs7xHfwYv+PmUMdLCWgPnTzCecB
XmwwpKba/SoG8s09Z0mivNiqShfLMVUMdJ/EHDu0eXG65dr157XFkBZu0+oU
y4tykpr/VXsWw6fvvTee7TuE6sMmTbajRXA+N3/zsBAfvh2lDdBtKgQNwUuL
e5WOIN87JkfW6/mwccezfJhyBIMPaqeP/NuLrLnr1zOsj+AdNZ7NRvV8oCvJ
5JK4cQQFabrLx9jz4TUxdU6j8QiKBl931snMA359h+gQuaOo8FxH5nv7cyAF
up5cAH58dcdC2080F/JGg/+UavHj5sOL1Rf25oKxfPSbAFN+9GrMMzH8kwOl
TMXG2wP50ZOU9ibibQ44xi6H8Ffx46UDEuNsdjkwmO3dayJzDL0lzlppZj2D
ot4AzxYpAcy/L3+A4XQ2ZF23shhTEcD0g8dvNh7IhmRJNa1fRgK4Vh3OnsSQ
DWHxnIInAgSwxCJBKvZ9FliaFH+MrBVATiadqRTvLGAfn5KjqgpiTvLCxt6q
p+D1Q49t0lgInzVo3xkyzgTHDOnNTUch9K+N83dRzAQLg0OznFeFcKw/O4Nb
PBM0X841qqYKYV/XXtk8hkw45nfbJ29cCAUDbLU7i57AAG31Z0+n40huDn8+
y/IE/mMTyqcLFEZNN8/Upb50eEdj1NIeIYyTZc43L9Sng9ni7S8PUoXRZfyO
3YeCdAjt/MYhWCeMfX3B/Ux3//nDs4M06E9gQvcdq7Ny//zbBXUf3DmBnj73
YydL0iCUTmDlWLwIZmwvf9qW8RhsfkUnPaGKIW2cek2TdQrEas7W+5iJITOj
icEttRSoeawwrWErhmNpwpIWYinAqbwmueothm/KlW5d3EiG5tgLnYpxYnjN
95igd0QyCIoIbJnqE8O/x5NO7q1KghmzSlshPXEUMx/d5yv8CC43TZ7M15DA
9MWnMedVEqAGcx2EKRIou31nbal4Auwqd0nPviiBkmmROULcCVCQv86WcVkC
R/lPmlJm4mEpfvtSfJQEJqUd6X0dHg9eDqIF1/okcOdBifCMwTjw3+UtTLlw
Eve4VEmbBT6AMCOGo38cyehUrafMzBALhBjz6jcPMhZccNXPX46BRXq2N+/9
yWg8xt1t/iUGqIX77QruktFL8vbEck0MHGU89dwyl4wlIpyNXf4xUPPC8lTr
DBmTTDeYjH5Gw+quWoU4+1Poy32dWe1nFFi+8bMWt5XE+yV/T04djAQrGX7N
1cuSGOmfv0WRLRKsCztPlXtLYumMVFo+XSTYJh6lV7gpidnAqqTeEwHOlzvS
qZmSmES7eYawjQBfjsOjgeOS2OM2QHZ5EA7RNq3G78xOY+nfGJfALfegdiuX
jsN5KRy1Z7zByBMGX9NFVAfNpVDoRttZMl0YMKO8nJK9FHLVa5zxmr0N1CuX
Tx32k8K9uh0ZMpW3YX6qkWvokRQm32+Y6zS9Dftb3cZUP0uh4n/8FLrsW+Bz
t81dyOYMbr9YrEerdhPEWYMefPOQxvsvvw0qtITCa8Z+gTf+0hiudV8x62Uo
yJJEyjNCpTFF9Pk0V2Yo6M8PfTKNlUaOZatkoZBQ8Go/Lfi+WBp3SxkeJBGh
UHF7vrxu6V9+utbbpTQElGlNRxNd/kONILsU1qJrYPbjrLCmowwGN5b/zesK
gh1spM5eDxl83yKWr14XBK/F6tyNA2SQbrtT0VpRELA7K5bbhsvgprjgVb/Y
IGie0lQNKZDBz7HijULUIBAbMbV9tSyDSyH736o0BAKpJTiDL+AsZjwvPWhC
ugqPkxt5ft4jsFbKyy6r3hcemQj3GzwgMFyg4F5Zji/Ec8dElSQT6J6vGvg5
xhfCH5gxuOUTWJPwyPeylS/4hv+an+0k8Oa1qMcRDL6ge1W8fmw3oE1prugb
TR+gu5hk9y4B8NjCCZWbc95QHC491K2LmHXv6IycjSdYJLLQv6Ygpl0VVfMz
8AS2rDGRx0aI/St5hbVynuBSG3btsgXiczEZEz9eTxBe/iDI7IZoMtORl/rB
AzLO+11RiEIM2zUc8lTHA2KPVOx51YH47LVCo7qqO3i8PqudpH4OWe2sEv0s
XeGF0RvaQe1zWBfcbjis5wqrG9ov2A3OIbc3vbqGvCv4/GfFfffCObRS/JRm
eNQVrlaEjfs6n0OvNzYB7FMucLOq/wo18hzqNDZ/OuziAg/rXB/v7j2HkpaJ
mXfZL0N165Ol28ayWJLHnU/f7ABFnJ2uAaaySFbe9bStwAEyrDcWXCxlkce4
Xf5pggOE0WrNGzrIYuHVtxJxDg6gL702c9RPFreU7T1ktssBprNVJ2ofymLY
wOdbty7YA/vt+f71QVnUeEl7v5HeDuyUzlTaUeWwrnCb4rUwa5gT4GosNJFD
8nzMUX4va3Dbtt62biaHbtOViR/NrcG//dXH23ZyKMhBwxx8xhoi9aR+Z/vK
oSE5RSbz2yUoNT393/QjOVzoZh3V07gEtFdOldmPymGy6h2NtkNW8ChL/IWD
vTx+aR179+KXOTQPWjanOMvjoM+3uvYZc1je9mCox00en67zz/8YMgc1pw0a
GT953H2vrdq+whw2xOs1me/K45ZZxznSVXM4X64/lftcHnO7zn9t2GIOe995
75tbkMc93skOFC4ziPpRGezirYCqWNH2u8cEnLsjzU38FHBfS7YHVpiAeqHl
OeVABTwj0/khLsMEGC4z0fDeVED6lfS0YE8T8J/WD+p4oIARZxysgdMErEdn
roqUKuC4QdKcgbkxyHRw+c8uK6DXnqJrQTRG8PWZp5etmyJO8rkcv+hlCJT9
f0eyvBTxWIb9fW9zQ2iMuKH0zVcRR15DS7q6IWR4xHHahyjiAH+PBvmwIVgQ
Za8dYhUxzJGVgdxFgZGu33+dSxVxWjWQJVWMAn1rITc9NxSx7GSlcdlvfWhQ
jI6/dk0JR0Q3bdyadGHCurzd94YS/iZUNoZKdYHh5jite5gSDgf+eaj7VBeU
30g6WUYr4Vy5wbD1LV1oUxo6J5+mhBq8SWeF1HShR/nIDH2dEsoWKR3f3aMD
Y6qlZ2/TKGN7BXPh4VltoNH6MBYRpIzJDOHXvwdrQnOVwWGPUGUUn+Ca47PT
hEiRLkvqLWVsW4584qitCbwszeO8kcpIjtxVK3NQE7D9xdfCFGXcy0H/rb1S
A4LUoqZ7qpTR0JRYevJXHUjKykscf5TRLqflfkW4GpDOldKk+qjgYKnIJtOE
MhjJT7YOBKhgfE6sNW+HMpQoccayXlPBnCus0qplymCr6csfEqaC7+ICv/Tf
U4YuY0LNOlEFt74LcB88rQxpXk2xwpUq6CwdzGcToQTyue+PlZFUMW93UuQZ
dUW4xfFTo/umKl7tiHkrtC4Hsc3NX+ruqGJJI/2/2ygHKT4PfYojVNFNYYu0
+4AclA6dfRIbp4q/+5oSF1/KwURK6G/KU1WknfEZC/eWA1kBtpyhJlU0sRjm
kV2Xhd9SJxgn6NWwwJVeGRlkwcXIsu5niBqedeVsUJJHYEmZ/ixzSw29zumK
vz+FkPvFdTP4rhomVESHuB5DmHQMkmG+r4buWnY577YhXAxMKuXNVEPUd8mV
ywBQz+h/ptKshhvRTjvkmwgQmFOLSWRWx481u+768pyF0WCyFdxXx7TY4W2k
HdLAv5cl3CVBHVvscb/O6hmwfzb58nGSOlqlZW4r/XQGlrsfbqfLVMeHjjvJ
5UVngPEITXFzqTraz+osFJw/AyJN7TS6A+qoHPPgxn85UuC7zSbFap8Gyqr9
/UY1OQ3sMQkfbj/WwM9WF8x5fpBhW9/uLrcnGmhhYfSMZ4wMJI7wN8bZGsjW
ONgh1EWG7w+vlZwo1MD+lj3XXfLJ0JTmEN5Vo4GcGGCX6kiGK0VnZbk+a2CH
4fDjW99OwnDXaHbWAU10/hmwU/S7BGTuEvJ5k6iJmgpX23y4xEHk6/k1ulRN
3MpRWuC6TRxelt/2ls3QxHs0AwNev8Sg2fqbZ2WuJg6ZBzRnDYvBdEWWW3Gl
Ju7Y0ziXnSYGJ+yOOaZ80sQqt79pHKJiUFJ7xNT7sBZmTcTuzEwTgVq3gwrH
crTw2NlY5zrX47CxMh/Jk6+FL9qZ5M8ZHweyT81H1mIt5JtNTOmWPw5ZgeYe
v19rIa8GS74w53GIvJue3tWqhb/WVuMrqoXALPMYrf+0Ft6pk5gk2IRgczbO
dIpdG7e6CH22aRCAZN5UnrP62qgv+1qJ14gfWMLEm09QtLHGR03yuDI/BP6o
cz9A1cYvXXvi5CX5waxponXTWBtbnfpD09j4gc/xuE+dpTbe2pMwydR2FDJf
lvYpuWsjo7jj1YBzRyFPsz1cN1obwzdoYp9LHoFK/w2Sbac27p1x9hhR4oPV
/K8L17q1sVYmWfjHaT4Q+9L9OalXG60y0xv3CPBBhkpOTc+ANvIvTliGMvJB
2F6TIBjVRpZCmT761kNAKajc3LukjYpln3aGax2C+S9Bfxt36+Alrs4SWyte
OKS29fdhQx0kfV6I3GG9H8h9ct3c53WwR+Jw1wnN/aBoGpTFaqyDScFXws0l
94O9+7r+5kUd7KooOLtl634oSZx5/sFaB99oUh+eyOYBxdkO0ygvHfTadjt3
5+I+sL8XX//3vg5Skx6eig3nhpIOwTuDvTr4+7P7oMMfDog8XPtk470Ojt8Y
eq41xQEO3tSafYM6qEhhElHs4QC+gzdXLgzroP0eWLTP5oAI53HTsQkdZIlu
ro6icID9jhTyzKoOTthtWiiW7AVeNfaR35y6mFNlPP/Bfw/cbforxntBFwP5
DVLJ8K/ouH4V32+qi27dNscvie6G5X3vJLjNdXHp3uLLtIO7wcQ1icx+SRcT
+seey5N2wwkeGSlGJ110F7+9xlfHBu9cfWDBXxcFPylbojIb7Nq/rFHzSBdX
Dxabl11ghRj3b/ZmH3UxTIEiuULZCdyKvq56I7rY2/xJueLsTkjj3H5F8bMu
OpyyehR3ZCcUVQpfFx7XxQiukfKwJRbo3OqSsjaji2unOHvMIliA5dFqT+Qv
XaS1swuvatsBtxq2nK3l1sO6LAHBUQNm8N9zYCffeT0Mb7+YkJfMBO2FTEZg
rId7hfPX9G4xwQHNlQyTC3pIHyQ2z+zGBNU32qTjzPWwJebT+TIFJqBd87Vm
ttdDW5k0kY3vjHDzQ3/lqq8elhzU3scsywjRKVGObx/pIdsKM/nHTwbIFqRv
9fish9nKpF6bODro5jn3y2lMDx3pvxin36CD3zsDhG3G9dBrVjxx1pMONFeX
w89P6eH8w6XdWfp0sFw3rkcs6OHOw+xltWx0gCYNw1tJ+nhZNEDIK2oLDISH
LD48qI8zhayXH8TTAsMyDVftRX08kNFH1X5LgrWC+PBxM33M+VX2LrCCBDNO
onSMlvr4XXyXYcVzEnROmsxr2ujjVGu2h0kkCR4OvWz8eFkf9VNLX5+mkECk
3sltLUgf/z1YSlrzJkGJHnwrmq6PA4kKnWG7/xJPxQqvJk/q4+rHBon6uQ3C
ec/i+stv+mgZePSnW/8GQd4Q8+ya0cfhXTQ9kjUbRE19gQPdgj5O9kwEbURt
EAOUAqr9mj6SzJfaLktuEIwB+RKSTAaY7297gCFknbBtef61XcgAJYE9ylto
jRC0eKb5x8kAu4qiY7nyV4jmJOmCpcsG+ExV0DA+aYWwHmxlnXI1QKseebmj
d1eIDO2Z3m5PA6z1TrO2s1sheEHYOCvAAB9oHQhKOLJC7OXJs9G7Z4DcBqqi
4UnLBO37wqDsXAPs1Jff7ZnwgxhSKSsymDFAO/7wctaXi4SsVgbV87sBPjFM
yox8ukg804/4GztvgBvmLBL74xcJX9NLqr0/DJDu/KWNiz6LBLcn65jubwNM
FGfbEiqzSFBT7Vi1d1CQ7X7ddZXGBeL9KpeLqigFd7Tllg7XzBPd6b4nwJ2C
C3Z11tKeswQbqbRM2pOCEwkRYesXZgk9k0UFSW8KJnwjv3qrOEv0sttePOFH
QYFYmdUszlmi/7pBxL4QCo68KTBXqJwhPtqILf6MpqDdf0Vc60wzxMTxryUF
RRQ880lBaKLgG7FWrCPDt0RBI3/2/HjxSYJZSvLd7mUKcl3cXkF/cJLgreA2
o1+lIJPSx8hg5klCueFLyNQ6BdWH3gQ+mfxKJPR6vs2jMcSra3baSclfCemV
BKP/WA1xLUr0rtzOr4S/5NgVfTFDXElznOL9NU5svnJ7ccPZED+qsTL1bIwR
HxmK7qS5GOL0XG2w4fQY8Vp/0bzKzRBNcgZ0pgfHCI+FyyyrXoZ4SCCqTrps
jJg65mRzKdAQ108lOl+/MkZ0P7Dhko80xA+tfuTS9VHiiYdJAE2RIR7ptngg
xDBKqIkpKvivGGKabIQCd9gIQerro/H4aYh+JDtuI9cRotTnUpXDuiGOcAay
5VFHCL760NPGfwyRpVFTKPrYCLFhUC8oTU/FZ79JQipNw8QzP2RZY6eiiefA
iuXWYYLpjXS/O5mK5MUI3sG4IeLNBVE7B3cqZj3VTVOcGyDYLG3LkzypKG/K
qFDWP0BctH28o9P7X/6wLAVrB4hVt91FZH8qVp/6fvVO7ABx5NbPjT+hVGyU
69rCLjNABBVV3418QMWorVqFI+H9hPRW7YIXZVTMV2RVGpV9T9xgvk07VU7F
HHWNozUi74ku1jp97ioqngm1VSrkfk/Y8pDXr9ZR8frsJGvrUh8RJ84pq/yW
iuYWrz/0pPcRy8afez58pKLl1+OsZ5j6CDTn4t/xiYrFHS47yKu9xB1r3Ssw
SkWOAFkp/NJL8Lk28GRMUDHm1uneO5W9hM6NrEtOc1T8xMeJc269xKM7oy9T
Fqg4M+v21sWsl5iK5N7WvfSPR75wY4tmLxGUeDdP8icVDTZDNo0Fe4m21EaS
3ToV3fc4F/Fy9BIcmX91E3/9490/Wb9C10tY5Jx+0v6HitkLCXxDSz1EXoHL
z81NKtLYild2fu4h/geR0wPh
        "]]}, 
      {RGBColor[0, 1, 0], Thickness[Large], LineBox[CompressedData["
1:eJwV1Hk4lG8XB/AhRdmNPWRLWQpZiuicpEglhAa/lG1mUELaZYlEIlEka7bs
ipA9Usw8U0nSgpT2UqHs2/u8fzzXc32u+59z7nO+t5L7UTsvbgqF0kl+//8r
X5nPzVRo3YLDRFtqKgtq+dRXHWFmgb3O8zxKLgtaT5XnrWVWwOecuzK2pSx4
rBPAWMZsAd6HXrnlzSzovNxtOc54BupKm7QPDrGAZRxRN8wYhFHRzqqy1Wwo
MaGGGFS8h7+Rio9q17FhtM8zK6j4A5it5/1SasCGEFm+obHsj1Cqb9VM286G
lBRrxp+4r2B7zyCrzoMN7Kt9Ad8YfyAgU8akJp0N0TeSWUm6I5D9N2n9uVw2
aDHBWa9iBGLWhLfoFLMhkPfq2cDiUTiwykLetZYNC9v1m0ey/8I+zUuHe7rY
IP3wzLZfcZOwLDiA15xCQEOiSs9l/ikY8p1YGFxKgKs7x1MrZgpOWg4s9+En
II9LIco3chr4Mjffs5QkQBdbO7+fmYXHoWt7NmgSYNXEa/2FsQinTBwuP7El
zxfdxyVHFmGFs/7nakcCLisefKpiQsEvudc7L7kQEORef9y+nYKriNCbM54E
mH/xb6/u4UJzsf3/jZ8gYNNFBemn0ty4mFEwbX6WAK21HN8v/3FjP/foeHgo
AVSfNVSpz9z4nIfi336RgKFfA26nxpfgjly2ul8KAb3xsdUJRjzYdvdeiGYa
AWxto+VF53hwcax0tjeTgMqAa3feLF2KMfW23VP5BISPWy0aSy5D7VX+1T5V
ZH3JU3b7nJeha5guf3oNAcyNBQW+mcvwYHCFdWMdATanuazT1XhxXYfBLKuF
AMX52vR5Qz6ETQ3+cgQB4pleIxJn+XA35W59xxMC+IBqvr6FD18wBErcuwj4
E+b309ViOeakWPYxXhLQzLPa+MH+FZiwQo1S+Y6sL7877nXaCqx1vbFk4D0B
BTvCPowMrsBFRxn61BAB8dF90UpMftxRk5ZH+UrAAYHEV+dPCeCfFR+OO/0m
6ysDzbRGAZTJsPywfIS8X+tfIVUUQeSqs3AqGSXvM8FS7VO0IG7hJLS1/iPr
1504PccRxLKh9AHDCbL+7twn4qJCKNLaTsuYJGCOuhi0PVUIP1KH27bMEDBy
r7TzwIAQHr1d1nd6loBPDs5yJ5SEUWWrcGHBHAFESvXDgiJhNHlkWPFygexv
k4dUyy9hbHjaTH29SMCbw9HVP6VFMFXON5RD4cATQcPlPAdEMP/hvZZYbg50
7xK78TRYBLUGi2p2LuHA65jfaqnpIshrUf94lvS7Dna1R6MILgS9peTwcODT
0tvm6/tF8OfZd0EmSznwY1vEi6lZEVz/cVyXID0SftD94UpRxDU+FtbLODDR
snk0brMoprdHtj8iPTcvFUZzEcWmjVfu6/JygNvkn5DKWVFcOd+9IZE035mu
jF83RVHvaqrZV9JC90u17teL4jl/rUkdPg5QJ6Ibzr8VxSCplwePkpbW97La
MyOKSdwDsTmkFQK3vpGSFcN95XGX2KRV78gzh4zEUDtFx/craY3f0xOlTmKY
YyRsOk1aR6v3wsnTYqgqdkyYspwDhj6V4mapYrghI390ljw3KYzPFagTQ/P9
I2PDpM2++Gx49VoMexvTlV+QtlS1aL01JYaHrP5dKSdt7a5ic1iaSu4vWoWS
ts9efGe4iYq7nrEPbSft9K7vCBeNitkt/UMU0q5y9+eIk1R8xWoZvEv26+l8
LTY5hYq+Pk10GmmfG/6ybrVUvChDvfiPvD//3t1Fmq+ouLFbYW8U6RPi6psm
Jqiok5/DESQdbLe044GkOF4w8BCMJecR/bTpk4MjadkyYQY5v3iBm8cUT4ij
Q3XL8CNyvtesTnD/vC6OnalK7bKksx6vVwx7KY5vic83Crg4kMfDX2E1Lo4Z
B5/fHSD3p9jsq6mEhARasRTmVpCuac5yKbaXwNvFoy6W5P41zp39ERQkgWeY
lDjaPAFtxrTTcE0CQ6Ij1A6S+/q0RiSl54UEup6dZu0l9/tzeXj3gp0kBnKr
2T8YJ+DH8AE3VqAkNtx2srpA5mVEw3gkKVESH3aoSW39S+ajYExQvVsSk/1O
+mSQeRPP8ti5z1YK9ZWZjj9+ECA7AK/lA6QwV1mZyfhO5m2lHONbghSO9tOq
+8j8aqb0RJ7rksLinc/1ij8RYHZl+4Pbe6VRK25x5fsBAsKs7hV1+0mj3cse
b6V+Mk9LVZLm46Tx5yffIue3BBgHU+j7ONJIbU3Rqu4lQM+7gX/RUgavbx6N
4X9GgOo23f2OZrL4vba/2qKZAPeFLAx3k8XVIfoRgo0EZNcJaZSGyWJ1tMc4
Qb5vcjrDc1wtshg4t3dsQzUBEvK3c8o2r8RnTplBxSUELJuU+81jIIenOkY4
luR7a14Z+0rbXg6/fWzqybhGwPkjMw+cj8mhfmyk+vBVAhY+vkq6c1cOd13i
+hx0mYDJrkSj/9bL46o/C20bwwn4Vsx3oWqNAnKnemyI9SbAS3tGUFdQEe8/
p9oWGRCwu+9ivrSCIh4LM0z7o0uA/kUJU4q2InruZXpqryeAZ1Dn8DMbRYyc
mMlJUyMgJ57BPnJNEcNuismslSJg8FdPVPFKJdQ0DNgiO8kGp9KKRRUNZdzj
bB5ZVMmGPepeo5IWqthmoR6TLMuGmdjjDQOOqtitN644JMGGwt8XLuTRVdHX
00FFQ5QNPPcKZDZEqWKXQ0BEBS8b6rd827rnkSpeJ/wCE/6xQM3eNzFi22r8
PjU5fecJCyihAXojoIbCYgR/yjkWVPacO87atBZ9ghVUTV52wmYxjQqeUC08
XPj6cM6eDmDMJmbk03RQtafptFD9Izj6+KtexZ4N2OutnVVg2g6XnJetnj+s
j4Hv4+aHC9rAo+MsXZdpiDv4hJ9IbWyFVl4ZW1+nTWh6eFjGpaEFdEXDkr8H
GaPuSTmeyPFGOPTXVMv6sAnyVSUaRV6sh1uZj+Qm47ag42iGBCF2H6rijfu6
7RDd/Naxql5VQ1C9qU3G7q04IzivFPyzClrY+WMxLmZ444/oVSVKJXhbGDV5
07Zht7SWwXWXO5BeqFvt62OOpuVm9sInyuDq36Zw/5PbUc9k8PWO+GL4Unz8
BDNwB/I7lMTwSRZC+47EG+fPW2DPnbnszoJ84Nr7duhKmCWqBvTxvk7OBcrW
Gq7s0zuxN65n9kXLLYiWmtzTfdEKTXwnD7l9yAJ/Z4+2yYhdKN/1p830RTp8
CNf3hOu7MbNdaJ3Zy1QQT0p9G3NrD3LLb7U/pZMCBSIapzvSrLGgv09g48Q1
aA1ctX1NyV6smaKCRmciZCpmy5na2+Bgs/Lj8rEEaAqeoTC7bLBXMs7GOS8e
lHbxzqnst8XcnZMeRsdj4d4z9dg3Pbbo5HQ0TLMzGi4/XtBRPGCHiR63pFia
UZB07LvPoX47jK9JXV08EwHBEgrCyk77sETz6K3B5eehSH0pO+j9PvRLs7D9
rhoGy/5xybS62mOdnzd7dOU5uK1zNyTzqz2uc0k5eGHJGVB3L7aeP+KA7J1o
vnTXSejbWVfp8NMBIz7mnmvkPg7duWfWwTFH3KK72f8AKxCmqmxNlMcc8fk7
E6rYsD8s3g+sjvLbj5a+8km/Yv1gl86O7cHj+7Hib1KTt70vdBzQ9vY9RkM9
ybR1sjlMEPNgNmQcp+GL8aFVFclMcGXeEuw6ScNCc3/azlgmTARSK/WDaWis
zJsUF8QE1ejJmflIGsYHvxm2t2BCWGXL5YRkGgoUl60d+MUAY16bO9V1NLRj
zx55uIUBUQIx3N8aaOjyyThvTo8Bz0Xb7GWbaeixqNBrrM4Appz+dEgbDa9r
nFd5TGVAiq60mSVBQ5lxhor0dzr8c3n/4m0/DccdrctuX6MDusmoCQ6S9X9c
EqV9iQ6xdLtT8IGGNkZCBo2hdFAOaJfL+0zD3QZPBD750ME2qtDryG8afuQv
dDuylQ7psR9qs0ZoGBpVW7JyIx2+Jciu6B6joXvFsbqnWnQIS7tcbjhJQ9OF
DMlt0nTgZD+ieE+T/ci7u/EI0UGqYMEubZaGv/tD6OwldHAv2Zj/ZJ6GaUZZ
KtenvaD8jv/k4iIN32v7JXv+8YL/AZY8yn0=
        "]]}},
     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[0, 1, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"R(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(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.3087044650413182, 
    0.09788190354968607}}], InsetBox[
    StyleBox[Cell[TextData[Cell[BoxData[
      FormBox[
       RowBox[{
        SubscriptBox["R", "0"], "=", "0.28"}], TraditionalForm]],
      FormatType->"TraditionalForm"]],
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     TextAlignment->Center,
     Background->GrayLevel[
      1.]], {0.45788532956895134`, 0.06086007874408672}, {
    Left, Top}, {0.25223413607034534`, 0.07152908336323226}, {{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.57109287116389*^9, 3.57109290385776*^9}}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJwVz3k81HkcBnBjRe2mTUnI5qhsdI1YaYrPJ0VuQ0O/apVYGYbFyJIkpVVi
V6ql1tnmHBVGqJWrckz0cnTYJTI7jiHm21Ipwv72j+f1vN6v569H1yvI1Ude
Tk7Okc7/rZc0ezNzdb3FgNm0pbGxBCoXGmgHcrMgS2WNd4epBOoj7uSs5xbD
6MLzR4JYEmhkhvgqcmuhLWyJVLBLAs2JnTbvfdvgeb/CKh22BESs2Ptjvq8h
eGPaGvlACTxJ7gmR+hLQurhdkpEnAbtqJach33lIiRg5yNAYgKfKposUPJZi
boRKe9ZXg2CZZFWX76yOL6eGWOzBQfDZMq1spKyD7Q2hoqqSIXA08PlXbe9a
NGT+YbfozDAIn58KE5mtx5odQ9dxmxR2LDMsVji9EdWviczNiBR8Zy5n5FJM
3NI2r2+dMgJBjcPGxY5b8VS+f5K9/ihcPKi4bjbABOcsfvZQrRgF76aTx4y4
puggaWlhGb2BeiUNF94BM+RFvYxcm/0GjFRiUkaOs9ClwJ1ruGQMPCfNNzoF
7ERGbc2DZt4Y3Mhs0Jr6xQLDb83bazePQdmvrJ5OV8TW1/FzLM1xOP6nOTvD
YRfqkY+xoiPjUPskdyL+kCXG/6XVZJwzDn57t1f7UbvRLH9dl3zfOKQXGJXz
/Pfgjs95bjfVZJA8WX0mONwKv6gcvlpqI4MhQdhPXL418pyLbAf4Mnhsffna
2bN7sV4o2MlMlwHDufufpBgbDGj2V5iokYHcrgpG9glbtLHaFC3qlcGFlVOO
neftsM8vsvDDjAyCD3o/nIq1R+aC2/OcFQTEZ0x+gN8csNpjyEF1MwHVK9e7
4284YvF3cV29uwnkLTU80ZTmhOGGjWob3AnU87Wtvi1yRrvUjGQlLoFMnWwt
cw4blwijRxTCCVRHTctx29nIP6u7yu4cAV17pc9r9rtgq5AxDMkE7rYZJPz9
3AXvbZAc1U4nkNg4x9TxcEXZmEV/RR6BK6Ej/p6vXFEtVWsmtZhA1IrVX+sd
2IdP30Yq8isJFBoseHK8fx/KebFmNWoJKL5jaNQf5qAGz5ucayCQzyyNzhzm
4OGTySsftRAw8BI4zQa6YcDHzakWHQR6bO8L3d64YWGVWL3rBYHOm5GbINQd
ryY1tLG7CXwsc9mpN+GOcVH6gqV9BObv8cvjftyPudMCzaNiAvZMa6uo9/tx
jy3DOX2AQJPHFj9eKIUlmd6BLsMElnlzqzLCKCz0vC35nvZh7g3l9nAKE4vy
OVzaH/jLhSZRFL4wrdQ/TXvthanp2XMUtmbGJtyiHSOsTbyUQqFmUu8BRSkB
lhK7pPw+hb83vdOooB23OF5eWkVhTkbXaB3tDpWHHM0aCss7yytaaHO1TD5F
P6RQeDcQxLRTjdQtbVooDHq2eMXiEQLvDvU/635FYZ276jNP2nhUQ1/5NYVG
dQ0cHu2EY64RIKawcjK1I4y2XshjrZxBCkXLCx5cpO0SV+ATKKPQs+wedZd2
eoK4MusthT3S0rIa2tJLml92TlA4mdG3SEQ7Ji3xjukUhbXinvxe2q3ZDXJ+
n+j/35SSYdor8+Zc02YodDB5tHWCtlfRttyns/R+UjXkM+07JcFT8/MU6trn
CxRHCfwHZv5n4A==
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwVl2c41o8Xxh9ClEr4ZaQSsjJLKvE9x5btweOxsspMNpGVyighSZRVdiki
OzujITJCNEgiKntl/Pu/Oi/uz3Wu+7w493XOQVs38jlaEokUSkMi/b/yxa5n
pu1vIKSltKSTk19BOaPIAVfHdDi6d6S58vIraLj4NEvYsRAWO6ytZpxeQYuU
hwODYx243YssyZZ7BW3RXRoLDh1wlFvQnPdTG7ySu1I55fAF7qkeqDgt2Aav
bw16jDv8gZ21B6W62logMinx1W3paTCxaQsuKGkBMUcwO1o4DaYL83L301rA
c+utS56PZmDLMbb8Uu8W2FCVqZ3OmIPue/u4hg62AGdTgPKvm0twuFK261NI
M2jWbNUdc9iE7SvXGMU1X4L0pu3CnulNiEs7sGXo2EuI5rV6xy9PQn9XSZGM
gy/B27bKx+glCYV3Bd5zWGkClTH3l6U9NPhCXvnGdH4TjPz6ZHNxYQva0fzS
6dvZBLzr5SnrsozIcX6xxPpHA7CnnZv+7xIjcnVOXL7e2wCMwKYiUceIBhzp
7S1NDfAn9MLkGXUmDOdRvOmb0QC1dIfk6k22YW/qpk+RWQNYMsf3hV1kxt4b
mQ2BXfXQvkOWic6SBQ+d+r42kVoHXVqsSe8CWbDpl61Rdmgd9Ef9FkxOYUG9
Etn+QLs6GKXPVZEYYsE+zW1LISJ1sLbOEUo1340cPuFx3WW1IPp7ZbHAlBW/
06wcTvpQA5HvakaNKezo+PBF/oDIC1CKVa3P1eNE105v+VquSgjVfJ7fdYET
198tmh7eUgm19Py3129yIkNd6Y0nUxUgF0iyN3zLifINA4PTdRVw1Kl6+6YG
FzZ+m2T0cKgAAWVpE4oSN74zPeSgVlUODEs8v+mO8WDPnOl09YUyUCm+0Sdp
xIM8KWkPss3KIMx1td7Miwc9bheRHqqVwca3vttFz3gwY4QrrGt/GSx1xp+0
kNiHraIsuSydpTD+iPFaidB+fJ++dnD2WCmck1zdIb2DF49IP6B07HwO2oMR
2Zz7eTFjPivT6W8JyET8p0CS5MXYYDV7jvESoPsidb5DnxeZ0rQ3ChpK4GGM
w2vXBF7cYHtFqfUpgS+/esIf7T2IPryZCY7DxWBaULjJL8qHIm4GneSWZ6Aj
cm5mj7oA0ur5qrJeK4TVGz7VnygCWHEHFL7824u839euZdkLYO75LEqLdiHQ
Pc/hOhIugFkX8OYIeyFUEeOKOs0CKHmqzlY/5ykIGrnEX1E+hD/Kmnyn2p8A
KcTj6DQIYvj5J8mBkgXwdPjyepmeIGaE2o+c2VMA5irxrUFWgnj7ZCWZuv4Y
yphKzLeHCOK5O/rGcW8ew/mE+SuCtYKY23M6jtXpMQzk+/VYyAthi3uQjk7e
IyjuCfJ5dUIY6132Omw9ng95187ajpwWxvuj+1ta9udDmqyW3l8zYYzY8QDS
GPLhehKniHiQMFbMxvPf+ZAHdhYlQ3ENwuiRoc6V4ZcH7KPjylRNEWQ8+Yp5
T20u+M4Zsv4wF0UT46tpQ+Y5cD5LbnPzvCjOyIVEeajlgK3xwSnOYFF0ytbO
3CudA7rlv5s1M0TRhxLJUsiQA0KXovyfjopiinrWzc7ibOinrfvq43oYV838
5iZ3ZsMpVtFCuhAxdA8q8ZjrzYR3NGav2mPF0ChuQPNMUyZYz0R9S8wQwy3K
6/8NFmXC1c4JDpFGMfSeHCO2Rf/jY/JDdejFMYn2+xYF5X/8dhFy4g1xnOC6
l/79+UO4Sie8IJQkgUsuFLX2rAfg8Dc+NZsqhRpcdTpN9umQoDvV5G8thdcy
j9Bc00qH+geqP3UcpVCw8ia7lVQ6cGosyy76SeHWo982zFfToC3BslPtrhQ+
4XS09I1NAxEJ4S3jvVLYbV/Hw1WbCpPWNY6ihtIYkasmeEksBdxafhwt1DmC
SdZGphank6EeC1zEKEdwoHIlv1I6GViq3TPzzxxBwQyGXHHuZCgqXGHNcjuC
pGfPyaaTSTCbtH026dYRzMxtFayJSQJfF8misN4jKMC45J01cBcCWfzEKJZH
Me/WlJJVSCJcN2M4tH5eBr8GtItsZ0gAQop5ccJbBuXNG9mezt+GGXrW1g+B
Mni3Lt/H+tttoD7b51QULYMstnUOc/W34RDjsSd2BTJYK7HbszPwNtSX2h17
PSmDB6ZyI8yW4mGRpUH1rvMxfEL31lR76RbYtV6yl3aUxXBFO8aJA3FwVl5Q
d9FNFic/2q+pscaB/bPOY9V+suifkl9RRBcHjvcP0atGyOIdM2qLbncsXHDr
yKTmyKLhVuMv6BgLARz8wyGjsjjwV+ulR2IMxDu8Nn9nfRzPrnSwBW+5CQ1b
uQxcTE/g3KMxH0ae6zCWKaE5YHMChYeaJo/SXQdmVFFWdz6Bn559zfKZigLq
Rbdj/JdOYKe+xs1TNVHwZ7yZazDlBK6E9/96ZxUF+157jmh+/ddPQC2HJj8S
/KPfeok6nERh82/ldFoRIL07NHHCWw5XOwwtVF5dhSrGPuHWQDnkDXrTmlN+
FZRIEtVZV+Wwr+W7J2fOVTD6M/jFKkEO9U756YlcuQq+7cdFPpTIodEyJm4q
XIUXUX+qG2fl0GU9f82j7Apo0FoN33c/hdxE1WG24jCwnlMQ0z0vj7ppzW6F
70NhByups8dbHk0CFnR0GkOhSqrRyzxIHtdHav1XikOB/YJatWOMPIY0vw4P
TAiFtnFdzStF8kgn/5hTjBoKUp+tHCvm5XGz1FxN+2UIkF5dzuILUviXP7a8
FqRgeJDWzLN0k8ClGJYdj5oCIMVCrM84kcDmnlHh6scBkMR9+9bzNALXNi1Z
Rm4HQEyiNYNnIYHRb0Zn3c8GQEDM3z9Tnf/0pLcf4xgCgBws3TTCBijBo/Gx
Vdcf6M6kOr1LBlyoTq2K+O0HJTFyg11kRPqKmDUVBx+wvb+TvoqC//JuzCTQ
2AdY80YkHpghilxcrWhU9gH3huthbraI1XFelEBeHxCb/yjC7IloOOx37cFH
b8gyvXRR9RbiGYtjP3MNvCFB4MV/FR2Iewom9+loeoF3lYJ+qrYijqNwVKCd
B5SatdIO6CvigPHJw58NPWBxVb+U3VgRpcguNLoqHuB/6ix3tKUiCm7dsot6
yAOCX1wfDbigiDJSaqrs4+4QUdt3kRqniIeU7Mr53N3hXqPHA7YeRfRT2i4Y
xe4Gda+zZ6PMlfBqzP4xhjYXKObs9AiyUsKGNhr6d0UukGW/Ou1up4R5Di6t
eckucJ1W74+JixK+FxJdTnJxASO55clDl5Rwg1RPtmVxgZ/5mt8b7in9y8P0
4zcsnYE96k/fyoASBs00cLfRO4GT+skaJ6oyrgn1vAm7bg+/hbman1ko4/Cp
hhJBX3vw3LbydsVaGU138R/7ZGMPge0VQ1FOyih373rT5ZP2EGd4Yi0/QBmn
Xnaezp04B2VWx0/9TFFG/0SfbmOdc0B78Vil87Ayfj9Pe6fj4FlIyZMudXFW
QcaNTsvSvzbQNmDXln5BBdfSJB3aJ21gflviYLenCvJpdhTMDdqAlusqjfwl
FfT/RFvt/MIGVqWbdJmjVVCuPT6cJtgGTKuNxgueqCCPP/tCyxYb2PPOb+/v
aRVMVkqgN+OyhltzNZfd/VTRknPs4d9uC7jQFWdjcUkVE3d4pcALC9B+Zqeo
EaKKmwa7ze5mWQCDGxMNb4QqpmTlfLnsYwGBP41COxJVMdhHVl2R0wLshyeD
Jcr+8ZOrB8xtzEG+gytwal4Vi82SKiJozGDskY+vo6cajqt9zLDwNQHKvo3P
eb5qePUQj4OvjQk0x4arTwSooX0YbjzUNoEs77uczlfUsFntlZkMvwnYEpVV
LglqyDzB8PvYewp8fr+2caFMDYWZ48OzpSjQu3wlwmdVDYmee721a0bwUi0+
KSxMHTnjOws8W8jw3b66PSBcHf8e5ywYKiMDQ8Qordd1ddyrfbnaMJcMGq2y
rnbx/3RbzU+OkWR4qz6oqPJQHZ+3VP0W1yJDt4bAJH2jOt5WFDbl6jaAEc0y
hSgaDSzXPlgpOKUPNHofR2JDNVBO6JvQr8u60FZrzO99VQOdp/wo/E66ECfx
3o4aqYHbOQM/uOrrAu/OtlHeOA0MpJe6Bgd0AdtLx56la6DdVHdpd40OhGrd
+tldq4FVV/2Fiza0gaShMcuxroFOLv8VN8RoAUmxjCbD/zSGZWm4MX3XADOV
H6/7g06jk+aHO7wdGvBcnTNhd9hpDK93E9Oq1ABH3QDBK9dPo7h7ns3Hmxrw
3pzQsr9/Gmt5beY+H9eAh74tCWI1pzHlm8cv91h1UCn4IFRJ0kQ635bvCtpq
EMmxpNMVoYntVnyuYivKkNDW9q3xhiZ69jsHvx5XhnT/e/4lsZqYoHF2j2+/
MpQNKmQn3NVExyN9jxbKleF7+tU1Sq4mZvNVct7xUwYlYdbHgy2aGCqkk6G5
ogRrJ8QZv9NrYdX0L1VlBiVwN7NrXLqihT37Y4I0VBB2pv/8Kh+phRRrwYt9
xxAKvnlsXo7WwuHp/VQvIYQf50Plme9ooWTlWuL7bQhnQlLLeHO08MHqiptO
FoB2Vt+j021auHWIP9aghQDh31q37zNr42uGPOlgHgUYvixzFu5o49v64kq6
HXIguGdnjHuyNhYzWqVTFk+C86Mf5Q9StTHO+bTJiy8nYb7r3na6HG1sEeKf
bSw+CYwCNCVtZdooIrfQUGV6EiRa2mnI/do49PmdverjExCwzSH97F4dvG+t
MGtqcRzYbyd/jHqggw5e6+0H52RgWy/be89sHTQMirzNNyIDJI6YVvN8Hfxw
uUFE+r0M/LoX9lz8mQ7qmysn+hXKQMtDl5j39Tro/zFYJu+8DFwsVlDi+qqD
d4Jq02MnjsKn98P5eft1cX9/34bkryOQwyLq33pfFw/JyGgGcUmDxJjpMl2G
Lia/6E722SYN5dVRfkpZuuiUE8d/6a8UtNlP+NQU6GLQzuaiJ5+k4OeLPM+S
Gl3U8BDRLnwoBeJOQufTv+ji3ct/TPdKSsHzBgErP349TNvuoZr6UAIaPA+o
Cj3WQ7vmpbF6j8OwuvAnjqdQD0uPB39F88Mg418/tLtED6/ZqVK7VQ5DXoiN
91qVHvqRL4VIch6GuOjMzPev9ZDN/82HxjpRsM4Rog38qYe73saDOqsobE7d
tRpn18fKROXlcy+FIY03g0fBSB8VhAQv7DMThJ3XpdvEKfooaORZIKIhCCFz
jV77qfpY/JXNUUVWEKxbvr/eNNfHmzv/HspmFQS+84f9G+30Ucyn15b17SHI
KS/rVffSxx/iSey3FA/BU932GHK8Pm6Ebxt4JSsANYGrJMdOfey5/5/sqDof
LBaOTYd16aOFxFaL5eN8IPWt62tqjz4eiHTx4hbmg6zTj+u7+/VR4oa5aiQj
H1zfYxEKw/o4mnl5H9Prg0ApqtncM6uP4Y1iQwl6B+HPt9CNZjYDFG0/GhR8
lhcOam1d4zcxwPw3BZ9E7PeBTK9yF7epAc5qPniiobsP1KxC83abG2CzYPZq
gOw+cPZaMdo8Y4DTW0raubbug+f3J598tDfAey87soh8HlCb6rC65WuAviP6
wRwze8H5ZlLTxh0DbM2+yZkcww3PO0RuDPQY4An37K+h6xwQx9+QvfrBABWy
I3TOjnOAix+1fu+AAdYNspiZdXMA34GIBctPBnjwgCV7cD4HxF4YtRr5boD0
tbWWDykc4LwjXWZy0QAr9J436j/fA7xa7J/XOMnYYdXf3h/4H0S3bEjxWpKR
X7agTBb+HToeY9L7rMiYFcUZ4yDJBvN73x3htiHjuoCGbfYBNrDwSJVhP0fG
aua2AXUSG4jzyJ9gdCVjT7zonGAjK7zz8IfpQDL67wggVDVYgWXfvE59Chk3
zKCwxnI33PaacLYeIqPO3TjPOcou4FYL8DD8TEYeKasTVQq74CHn9otqX8k4
ZummeEdgFxTXiF0TGyUju3F4d8TsTujc6p6+PEnG2MdDqxaxO2FnymJ33F8y
pp7ZvFz1dgdEvtyi0MBtiGIuXT5fjJkh8L/9u/hMDVF3Zje1NI0J2p8xmYG5
Ib7esmvOLJIJ9usuZFlYGiLhXsLH7skEdeFv5e7aGKKIn8tSvSoT0C4H2DM7
G6LVvvEA2t+MEPGxr2YxwBCTOuKZ/1NihPj0W+ffpBjiNuFtnStLDJAvQv/a
+6shVu8jpbjepYMuHsW/riOGGFV3VjI/nA7WdgWJOYwa4tgBl4BZHzrQXZyP
MR03RG/D5W1PjehgvnHUkJg2xEgGwy+trHSAFi8/bSUZ4ZOs9bTAW1ugP+bK
zL0DRli52foqJYkWGOZpuBrOGKGjF9NP8hsSLBclxYxaG6GCTIxx2AsSTLpK
0jHaGeFXpeu9tU9I0PnD4o+ugxGKd50cPxNHgnuD5c1DbkYo4/1MXI5CAokm
V8/lUCMcUnrWnNu2SVDiB95IZhph1LJzVDzbBpEr9Sw47YcRXuLDire/V4kL
/82slE8YoXn0HZPAvlVCZlXK5/2kEUqtDDJh/SpR31TkQjdthFwC3pQt8atE
P6WI6rz8z79WDMtF2VWCMajwiCyTMfroulTsuLJCOL56MtYuaoyJtnbLwaLL
hIjtI911V2McC2s7yVe4QLSlyhXNuhnj+UBJmgepC4T9wOvd4x7G+GfWdEY8
eoHI0p/s6fIxRstge25PpwWCF8TM84KMMUzATOahwAKxh+epg+FNY1ylRhcm
ps4TtB+eheYXGKNx17xrYPIcMXi6sth40hgDMxl4OcpnCCW9LKrPL2PMk365
fid3hnhkFLuR8McYT9wRC+RLmiECrM5p9swZY4yFweGz/jMEt8/uEfKaMT50
OUofJT9DUDOcduvvoOCpyNSTus3TxIdFLndNSQpGKhpeGKv/Q3RlBoiDFwWF
J+SclHymCFZSWaWcDwVLlJlCaM5MEYYWM6qyfhSsR9+0brUpoofd8Yz4JQrG
vwmpK+KcIvquGcfuvULBb433/mjXTBJDDlIzS/EUfCelcIS0bZL4fnjseVEx
Bb3e3r89WTRBLJcYyPPNUpCWa8M0Q/oHwXxC9h3bPAUZV6bDdxz4QfC+4Lam
X6TggEu3fxTzD0Lj5bcr4ysU5E4ZvPLkxxiR3OPz5imNCRoXbDmRnTZGyC0k
m53abYLiNKKnNHeNEYGyIxeNpEzQ8WScGP/fUWKzwrM0/IIJOrW3VfasjhBD
DMU3HrqboDY1rcT05whRZTRjU+tpgu+Tru7+NTBCeE+77Vz0NUFJbeNmonKE
GBdydTgXYoIV883p0RdHiK5EBy6VOBPczdZf2rIyTGR7WwTRFP/jyyz3mDIM
E1r//prABRO8dPMTzcXrnwlSby+N95IJYg2TUKnHZ6LM/1yty4oJvkrZd4bB
9DPB13T1uPm6CX7sXm8eFfpMrBo3icjRU3F2Pb8/tuUT8egS7lxmp2LAQdLP
W1s/EUytcn1eMlQ89ZC7bujuINFqKenk4kVFD+7lS6q/+wlWO8fqVB8qjntW
Pq7o6yfOOD7Y0elHRa87zCrY0E8serIVywRS0fZduVN0Qj8hELm0un6VimKC
enl75PuJ0OK66LhEKibz/pz8FtNHyG3VLyqtpOLLoT3UCaUPRDhzFO14NRUn
hlON2iQ+EO93Nxpx11JRwPJoQiX3B8KRR2YluJGKR7UG7nbN9hJ3pTmVNN5Q
UYmH6BzK7CXmzb92fxyiYo9qz4YSUy+BNlyCO778m08q8QCx2EPcsCdfhOF/
fn5kuWt+6yH4PF7yZH2n4k7d5TOJNT2EQXjeOdffVDTmzLqx4tlDpNwYLk+f
puJN/xWdQOseYjyOe1vXLBWr38uV79LtIULvRz+VXaJi3FrnSUeRHuJtRjPJ
aYWKi8ntUuIcPQRHzgb5/l8qDjfRX6el7yFsHx/Pbl+nYq6Vjsz4bDfxtMh9
aXOTihnki/s/f+0m/gfkqgbj
        "]]}, 
      {RGBColor[0, 1, 0], Thickness[Large], LineBox[CompressedData["
1:eJwV1Hk4Ve3XB/BDRIpwzHlkaiBlKiRaKzNlTHXwUJFzTkQIUcYG6SEJ0WAq
Q5kypUyZEjn7kFeiogxN5jQYkuG33z/2ta/Ptf/Y615rfW8519N27pwUCuUl
+fz/W/76Ula6TONenCCabt9ug6e8Shu9mBlgmX6jiJLVBo1Bj7K3Movh2LqL
8raFbdCi5stYzawHuzj9wkd1bfAytstshvEKIlxbdI4Ot0Gb7sWqCcYAZPP6
VxVtYkGBHjVsV/EgjOh9bXu6nQU/+k5k+OcPwZizyljhLhaESfEO/8z8BCbH
TjfRjFmQkmLF+H7tGyiH9udXubGAdaPPd4TxHUIk5w2epLIg+lZyW6L6NHjq
pGqGZrFAhQmOmsXTsOrvjya1fBb48dw475f/AxRMvsi4PGXBsvHOuunMX9AD
U2e6O1kg8fyc4eS1OeCR/MJrRCGgJkGhO3btPNxJLlge4CbAxZV9QuUq6dM6
vB5rCcjmkInyvPQHqibZpWZiBKhj48vRc39BZunre41tBFg847H6yliBG4rd
Me225PcV1xmx6RVoYecOVxwmIFb2aIeCHgUfhiY2/+dEgL9rdYB9MwW3lvom
L5wgwOirT3NFNweWqC+6zQQSoHNFRqJDghP9qoHT+DwBKlvZnl//5URtb+Xl
yHACqB5bqOJfODF4pty/+QoBw5MfjgfNrMLqd+2K3ikE9MTFVMTv5kIPocig
bXcJYKnuXpMXyoXhpbSZnnQCynyTSt5xc2Ou0ETnfA4BkTMWK7piq9E+RZPw
KCfrS563O+i4Gk3v+silPiGAqZ2b65m+Gif49NxqqwiwCeawSt3Mg77Wxjys
egJkl56mLmnxYvy/icelCQJE0t2nRc/z4vaiiuzWdgJ4gWq0o54XO4p+x7l2
EvA9wnvcxXQNGg1df8J4Q0Ad1ybdhiN8uJFSNFz6kawvp+va27t86OA1MdU/
SECuScTQ9AAfvpr55DQ/TEBcdF+0HHMtlr3cXkT5RoDzuoTeC0HrsKPwU6TD
FFlfEWy7W7sOw86EjayZJvtrNRlWTuHH+EoLx4IfZD/jzTZ/jubHkJAnjxt/
k/WrzwYvsvnxgeNMq9YsWX9XVruIkAD2BGTvSZsjYJG64m98WwA/ySXc3rtA
wPTjwpfOHwSQKuzzKPgvAZ8POUoHyq3H0aXFoNxFAoiUiue5eetx+xXXS2+W
yfPpuInXT67H8Yvvv/euEPDuVHTFuIQgeotI09kUNrTza63hchbEznDTxhhO
NnTtF77VESKIhi0Bzear2PD26tTm26mCmLi99uNf0h9bWRVutYLYHkBsvM/F
hs/cD4x29Avisot9ih43G8YML76e/yuIGnk8hwjS05FHXZ9vEMKzIslMq9Vs
mK3f8+PaHiF8e6xk6AXpxSXxCJqTEJ6w4ulU52EDp95vAYXzQrgpbb9hAmne
c51pk3eEUJl/x/5vpAUqC1Uqq4UwzOXonBovG6iz0TUX3guhqm38kdOkJXa6
W1guCKF5ju/5+6Rl/Pa9E5cSxndSj/1YpBVL/mEO7xbGCV9ey2+klaf+zBY6
CGOcx0apP6TVVHounw0WRnZz3ugKaS2PMhGD28JYjjTiL2m9h3FZ66qE0Sa9
r2OCtMFXD43et8JYnPZ51WvSZoqmjffmhXHTurrgR6StXBVsTklQ0dy0Ym84
afvMlY9aOlS8m7NyzJi0w8c+Lw4aFatCu6YopF2kKxeJs1TU3+w2W0qe94Rj
UkxyChWfz3y9TCPtcctH6vhTKo4YJBb8Jvvn03Mgb1svFU1PpAVEkQ4UUdKZ
naViSInuT37SIXbcrQ1iIigflqkaQ84juuPZ50OHRVBz/s4mBjm/uHV3zsgG
imCP7Z2FF+R8kywCOcdviqDDFe02KdIZLTtkI96IoO+gbGwuBxuyudYWW8yI
oH5pb+oHcn/yDb7pi4qKomMlxyAf6Sd1GU759qL46/klLTNy/2oXz4/5+4ti
boAZnbZEQJMuLRiSRFGy0p7jKLmvHU8EU7pfi2JJuHOpNbnfXx5Fdi3biaH8
jip6wwwBYxPOx9v8xJBzrwb9MpmXaWXd6cQEMfTOeLt73y8yH7k/+ZW6xHCh
f+ONNDJvIhlu5gdtxTFosooxNkaA1Ad4+4+vOMLOeh/GKJm3DdKMkXhxrH7b
87iPzO+2lO5LoZ3i+KGhWC7/MwEG140bHlhL4MlKpdmBDwREWDzO6/KWwMnr
C0Zy/WSeuBUSl65JYIlvdrTjewJ0Qyj0g2wJdMqw2FDRQ4DmyZq1K2aSGM7u
zVz7igBFQ/Ujhw2kcOQW9YVpHQGuyxkYeVwK7WJbrvLXEpBZJaBcGCGF1ez1
vwjyfpNWm1jkqJdCBZV9AxoVBIj+8+B+0Z4NWKKsYJtfQMDqOekprl3S6Ncf
KWxO3rdGZTG9qvbSeMQof1t6EgEXvBYaHM9IY73Ln+sTNwhY/tSbWFIqjQaz
DccCYgmY60zY/e+Of3BX3Zi6TiQBI/m8l8u3yOCIvC1fzEkC3FUX+NX5ZVHW
ZnBH3i4CDvRdyZGQkUX5Oe2U7+oE7Lwiqk9RlcUmQ/cw1R0EcA2onXplI4ty
QwW/7m4m4H4cg+WVJIt65T33t4oTMDDZHZW/QQ4HxwWcpOZY4FBYvKKgLI9z
17it88pYYKnk/kPMVBETCySNkqVYsBATUPPhsCJ6cGl9HxJlwcOpy5ez6Ypo
zc/iVhZiAdfjXEmNKEUUPlEeV8zDguq9I/ssXyji+hTOxvjfbbDZ3jPhouEm
TMmw0ixtbwNKuK/mNGxGsZhDOcmhbVDWHRrQprMVhbUy6/a8eQl7hJWLucJV
cE/DKZX7lq3A+JuQlkNTQ8FBswWB6hdwuuWbZrGlBk69UdbO1W+G/xxXb1o6
tRPv25cqTuY2gVvrebo6Uwtv8jUXi2s3QiOPpK2ngw7qmF6XcqqpB3WhiORR
f130MmxQvzRTC8d+6atYndJDeXshlUtXquFe+gvpuWt70SRRfYUlXAnlcbp9
XXaIPGIjNeW9FeBfrW+TdmAfdnHmioeMl0M9K+fnVScDVDMduS5HKYOTpruf
naQZ4qiiv9pNpxJIfahe4elhhIYq5dbrA4vgxq9nkT5njXHQxavbJC4fvuYH
BDL9THBWyyiCV+whNJsk3LpwwRR1rKcyXubmAIf1++HrEWYYOVHO9TY5Cyj7
nnBkBpvji2jvudf19yBafM6y64oFcpSaex0fygAfR7emuYv7cWDEr0X/dSoM
Re48ATcPoEWopY3Bm9sgknj7/dV7lmhqzxEdpJYCuYLKwa13rfDwoJCG9mwS
NPptNN5SYI3aW8ItlF8mQLpsprS+vQ1O+VrefPQzHp6FLFCYnTbk/d+a65Ad
B3L7eRYVjthixK/e8d0BMfD4lVLMu25bPNB65rLKy2iIbVlWk3W2Q75TvRfa
tkVB4plRj2P9dliRxzDOX7gIIaIy6+UdDuKz6vGCgTUXIE+Jm+U/eBBTwwnD
UcUIWP2bQ7LRxR47jwY+/LEhFB6olYalf7NHQcH/PC6vOgdKrvlWS16H8B7F
woR7/1noM68qOzR+CI8pcgbVcgZAV9a57XDmMOrdWhXi3OYH8+W2evI/D2PT
syRp4QkfWKn0q4jyPoIiCfsjxmK8Yb+aiXHIDOn2iiZPe09odVY96XmGhqft
s4I33GeCsBuzJi2AhornzQNLkpngwrzH33mWhhe9NSotYpgw60ct2xlCw0Hr
JM7r/kxQjJ5bWLpEQ1F+ft/DpkyIKKuPjU+m4ZfpcyUfJxmgy2NTUlFFQ1Wn
2OTmvQyIWneVc6SGhv38Os1Lmgz4P6Eme6k6Gj5Xd5vco8QApvTOP2FNNKw6
vrK1lcqAFHUJAzOChtZ+zVySo3T47TT4+n0/Dd+9UbJ4mEQHPC65mX+Ahk1c
ahvU/qNDDN0uCIZouGXudVNtOB3kfZuls7/QcLi6NvazBx1sox66e03RUKYj
iuW1jw6pMUNPM6bJ/22dXi+tTYeReCm+rp80/HY6SvKVCh0i7sY+0pqjYTqN
w8dQgg7szBeUk39o6N1sXsklQAfx3GW7u39peKo0qoa1ig6uBdo57Us0fMrl
cfbmH3d4VOIzt7JC9jcrZ/TEd3f4H29z0Rg=
        "]]}},
     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}]],
     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[0, 1, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"R(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(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.3105506965587257, 
    0.07763767413968137}}], InsetBox[
    RowBox[{
     SubscriptBox["R", "0"], "=", 
     "0.28"}], {0.49182594943345537`, 0.07457026847431347}, {
    Left, Top}, {0.23644200760721126`, 0.07410868895151404}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.722279}, {0.625, 51.366389}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.5657004341042013`*^9, 3.5657004982718716`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{"eq1", "=", 
   RowBox[{
    RowBox[{"\[Mu]", "*", "n"}], "+", 
    RowBox[{"\[Nu]", "*", 
     RowBox[{"r", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Mu]", "*", 
     RowBox[{"s", "[", "t", "]"}]}], "-", 
    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[{"\[Mu]", "*", 
     RowBox[{"i", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Gamma]", "*", 
     RowBox[{"i", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{
    RowBox[{"\[Gamma]", "*", 
     RowBox[{"i", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Mu]", "*", 
     RowBox[{"r", "[", "t", "]"}]}], "-", 
    RowBox[{"\[Nu]", "*", 
     RowBox[{"r", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Gamma]", "=", "0.4"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Mu]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Nu]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"R0", "=", 
  FractionBox["\[Beta]", 
   RowBox[{"(", 
    RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}]]}], "\[IndentingNewLine]", 
 RowBox[{"St", "=", 
  FractionBox["n", "R0"]}], "\[IndentingNewLine]", 
 RowBox[{"It", "=", 
  FractionBox[
   RowBox[{"n", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], 
    RowBox[{"(", 
     RowBox[{"R0", "-", "1"}], ")"}]}], 
   RowBox[{"\[Beta]", " ", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Gamma]", "+", "\[Nu]"}], 
     ")"}]}]]}], "\[IndentingNewLine]", 
 RowBox[{"Rt", "=", 
  FractionBox[
   RowBox[{"n", " ", "\[Gamma]", " ", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"R0", "-", "1"}], ")"}]}], 
   RowBox[{"\[Beta]", " ", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Gamma]", "+", "\[Nu]"}], 
     ")"}]}]]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tf", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"szero", "=", "0.6"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"izero", "=", "0.2"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"rzero", "=", "0.2"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sol", "=", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"r", "'"}], "[", "t", "]"}], "\[Equal]", "eq3"}], ",", 
        RowBox[{
         RowBox[{"s", "[", "0", "]"}], "\[Equal]", "szero"}], ",", 
        RowBox[{
         RowBox[{"i", "[", "0", "]"}], "\[Equal]", "izero"}], ",", 
        RowBox[{
         RowBox[{"r", "[", "0", "]"}], "\[Equal]", "rzero"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"s", ",", "i", ",", "r"}], "}"}], ",", 
      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[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<I\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Red"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"I", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot2a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"b", "[", "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]", "Red"}], ",", 
      RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
      RowBox[{"MeshStyle", "\[Rule]", 
       RowBox[{"Darker", "@", "Red"}]}], ",", 
      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[{"r", "[", "t", "]"}], "/.", "sol"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"\"\<R\>\"", "[", "t", "]"}]}], "}"}]}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", "Green"}], ",", 
     RowBox[{"Mesh", "\[Rule]", "10"}], ",", 
     RowBox[{"MeshStyle", "\[Rule]", 
      RowBox[{"Darker", "@", "Green"}]}]}], "]"}]}], "    ", 
  RowBox[{"(*", " ", 
   RowBox[{"For", " ", 
    RowBox[{"R", "[", "t", "]"}], " ", "versus", " ", "t"}], " ", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot3a", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"c", "[", "t", "]"}], "=", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"r", "[", "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", "@", "Green"}]}], ",", 
      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[{"Red", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<I(t)\>\""}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Graphics", "[", 
           RowBox[{"{", 
            RowBox[{"Green", ",", 
             RowBox[{"Line", "[", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"{", 
                 RowBox[{"0", ",", "0"}], "}"}], ",", 
                RowBox[{"{", 
                 RowBox[{"1", ",", "0"}], "}"}]}], "}"}], "]"}]}], "}"}], 
           "]"}], ",", "\"\<R(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[{"i", "[", "t", "]"}], "/.", "sol"}], "]"}], ",", 
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{"r", "[", "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)\>\"", ",", "\"\<I(t)\>\"", ",", "\"\<R(t)\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Blue"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Red"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", "Green"}], "}"}]}], "}"}]}], ",", 
     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.5639192569106536`*^9, 3.5639192590437756`*^9}, {3.56392175996782*^9, 
   3.563921763652031*^9}, {3.5649408605169983`*^9, 3.564940939182498*^9}, {
   3.565699720038359*^9, 3.565699860512394*^9}, {3.5656998929582496`*^9, 
   3.565700399603228*^9}, {3.5657016224901733`*^9, 3.565701701615699*^9}, {
   3.5657017580469265`*^9, 3.5657018728414927`*^9}}],

Cell[BoxData["1.6`"], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.565701874827606*^9}],

Cell[BoxData["0.625`"], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.565701874829606*^9}],

Cell[BoxData["0.12500000000000003`"], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.5657018748316064`*^9}],

Cell[BoxData["0.25000000000000006`"], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.565701874834606*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwdW3c8lV8YR2ZWViiVoozs0U/W+9jutS6ukdUgO0lIIkVDkiSVEImGKDtS
FBWSTdGSy1WSrOz5O8dfPt/Pfd/znvM83+d5vs85x/ZDR20OMzEwMMStY2DA
f3dcXc7O2Fqj65lbw6mqOkCQq9gsf3qtEvcKPhe1v6URzdx7OJhdN0AG1884
48s0Qv+q0euHViJwyCScq2CcRhxWXOBW5haHrZ5u0z7n+gkLmcMTG00kQW1o
3csJ8QGiuCsy5L2GNJTLrv4puDlAaPHLFjBHyUEKrwsDy9gA4bWYdOe+oxJk
7Qk4nCBOJ47W/VItsFCB0+7Hnoao0Yk4J9ady/5qoKJ7vTN8D51wrz/lqey9
B7r0L+38Kk8nathErf32aYDjSEL54e10QpnvzM3fwZoQyc1yqE2AThz4pyNn
6a8NouFZwh4cdCIr453Y7BVdaJ+0vhnDSCdKEjS/dtgA3F7o/LVleYAIrtSh
3DHXA5vWCtLBxQHiVeP9yUvO+vBqpPahFsI+JnurfBwNwMql+xrT0gCR/ki5
zM/XEJ7VNvtpovev/as6G3jCCJLOJm/2XBkgfj4OCfUOMobxuNle49UB4q1x
Ukp0tAkINNsE/EWY0epL/9UzpqDYx8hqxEAnGPSeMd49SYK+TZOj3gjHCs9a
dFwkQ/GfEg9fhAOd3GtnY8zg1500cESYdlbNg7hhDga9EZ3aCAtev/3lUpYF
cDpbte9A+MEG2ZP1aZYg0O0UwotwTdA2I6k8K4gpKFNmRDhD/K6YDpUCkzbM
NfNoPlURCwzebRTIs3r4egbh7WZsSxIO1vBVdLgI49JWmcufu6yBpbveYg7h
+LoVJXFXG5DPmitbQPj68d++B77ZwLkG7sElhCOEtvLu2GcL0yFP01cQzpVh
aQzuswXJizdpqwizTjGK1rhR4XVqSDwDms9DpaLTGb+oUBaj9RFjmUOPLZeP
2EGZ9vEOjL+Snhfb/bEDXXXRfIw7ssPlieP2MBPrFYLxXIm19o5Je2AIuWqI
8WpFUNmFAAcINTbfirGZkrFRxLQDcLR2MGJc76ro43fcEf4+dJnE83laGDi7
uuoIXl/kRjBuvPb12JDXGFGTbnbhLrmfEF8uT1/eww53Duu2P4+lEbEtVXQ7
e0FIWOJ0XSmmEayzYqPM6mIw4xGbdV6jn9iXX7AqIbsDnt/vPhX8sZ9giDqm
Ok7sgobDuqOr+weI0H+2/L+cZYHpQprgYv0AcY5ZeloqRQH0ttxmmOekE38O
VHnL2irDVssgIUXE94gNJ+TsXVVBKtEsLPA/OjGzocbolq86QDk3lVGVTiR5
NTq3HPgPMq5I//kkRSdOxjcdl/XaCx/f7jTy2UQnTJn209ICtaD1MKmA4EF8
e382Z0ekDuS9DFhZYaYTzG53fFpuE3BjWUJxHPE3WfKlUEUrGt7Jyh7zPbX2
WJZAlx7cSjwmswPFg+Clse75z/oAdPn38Qgzhak/96UZwLvSqx9vo+c3tpzY
PDpuCIZRv65/RPGh3SoaMTJlBG1Ffx72ovE/zsVcDFkwhoTbRyAH2buf/Ezn
EqMpXJp//EAcx4Op6aTwsils9l2QcUHYMP+T1HMGMmRzuB88gvCShjz7IIsZ
uAr/9/EQwtKjZtfTuMxhww9NGhnh8PVemR6bLSAoeKudIsLf22m5j7Zawqqa
h58IwqU1kvtPSFhBRSrrcTbMl5Fb+4cEKdBJqf2I+fvUsjnBJokC7e5crbMI
jw2cWXknYA39X+18cDz4Xkl5s3LDGl65rrjh38XNBHuXRGygzSA5HMfThi1T
Fq/TbWCoXbt7EeHYt+t0ajbZQkHNxfZlhJMyr/l/SLeFxDPTNphvPQkxE6nb
qPDzUKIR5qd90ucPitlUaJVkqsLY+/2Tn82ydsBUd/sLxkyfis7k5tvBzdzl
Gow/zYgGkhXtoYhf7hrGg7t/lhYW20PoLUEXjCP29IdRlRxg9sqKIsb3g10i
GYsdwLHnBA/GHPWa3cfVHKFltmEOz0eTjVJY9twRXDdtGMX4vWbM8xGvH4TU
n6C/EkX9RP/f7wfDpteBsIPk5KE7NEJ2dH4mfx8/MDUyiGek0QhJA2UHe/1N
0NHfTSoV6Cd+/O268HjzdrDPUYrzfNJP7KL6JcUY7ITWgbrsUD3EJ/qQgSNZ
Bnxl+oWyCweIA5wyNjcvy0NfmOZ4KuKLjIL0uqGPSlB0lbHqNuJ3qJ9iYfRH
FTgfZzgYg+rD6zJ39cY/apBMU6tcRfUjXFiCFkXfA9sj2E+MytKJLY1B/eQ+
DRhbOX27bwudeHlp7EXtpCZs/u8H378NdEKpd793xZQ2aDjuXC/IRidsTiu/
6Rcg4Nq5AiPMx5x9p8KMrgFEu2c4RSF+X6zuDnNM1IN5TcqoGuL/cC55sCZV
HzSPUJPcEH62/z+t4XQDyNywImmOnt/3gjqU/8QQ7vx9So9F8eBJ+3Na4ZkR
NBl2Weag9fW2L60EPDMG8U8btoche3eaSv5hqTUB+v1wJg70/TNm14Y7q02B
P5eN2Qbhe6F1yXJVJJB/v6rlj7C+NH/e1zoyfBTKF/RC2Dyn+zGpwQyuB4ZX
WiOsUNfMaNNjDgJq5cvqCIcV6+iL9lnApu1bj29BWN5Hyj/zhyXcvdapyYnw
gQdSTBHDVkDaZ9yD8/eD8mcfTY5TwFmg7xHO//aFVasbJymQ8SI5EseD8Ujr
/muh1hD3amZ5LT64M9X+zFiDc8P9Pvx8y7GTxHiEDSx90TPF8cCTPtOZuGgD
O+tN9uN4uPilu2om3BbeFbxdwt8Dl7ff2Rio8KDFRRjzU+HNkaC5M1RIHON7
hDF7ZIHKHg47kFro+YzxRrGnXrZX7OC+leAHjB3v+vBRuO3hg8P3DIy/eSlN
zCbZw3DbTW+MNadvO2nxOUCv8cTetXpy00vUMNEB/JknhTB+fAp45gQdITp1
bgnzX+RNuMHfK7PEpoXBis4lGuHKldQdHcYFp0+137wfQyMGn57tWLHZCJaq
eiatrTSi0zcu7I6GBKx7MeQvstRPfM490eWiLQWPPtxqD4hA8c70qi/kyG7Y
2OBa+fobqo/Lu1Ke5yjC6BepXF1hOvHkuk2Lf5syXCq43ndEmU7ElFU/khlU
hXu/n1APovwv57/V3uO3OmxT8lFNUaITXeEtrCGjWiBK8Rx5jupHW0l2XzyL
Lng/dT0ruY5OfMlgZv/OC2C62fDoOOLfubGlYlkePbi3qWIqG/E1v46zsUVY
H9Tbw2N2IqzrndyoLGoAT6eJbW8R7upLtVRUMwLunL6r2xBf+apMTj5WNQZR
dZafgsg+Tds4N0TomgCneIflB4QnzU0TufRMweKN+nU1zF/D1XlnLaRvOg9X
uCP8k/az0siQDLu03PMxf5+RTA+PGprBZ9fWLldcny0ZdE64WYC0qdMfaczv
ifN8Gq6WcI/H67UA9t+mHTZWXlZw68LAZmaEW1jFqpPUKECzm5fE/Ho2OGDi
WkQBg78SCjg/xwobLgerW0PT6aQIzM+rCgel/Mus4cYgfxv+3aYhwCXxpQ0o
1f13EOd/pr8bHkzstQW+Y7ZamI8ZHmab71bbwvL+zZmYD0dr9FkUCCoo9Qb6
Y76cPmi00+sdFeJEPq/xr0EoP/WwuR182bXcjfHo1bLbqx/sYFHxavkaHksL
8+mwh/sfWSgYV5+QvXXEygF4cut3YRxmY02r7nQA6sE3bGv5n1/97pitI0TO
6U/j7zfEd5hOe7USl/KiuxNG+wnDn4Fvy7oY4SrN+e7lpzRiaVn4jKMzH8yu
e3I5JIlGqPq84Fw1FQXXOwaFvxn7iXsJXo1HksXhecg58eWUfqJSd0jP4p0k
8O45IH9MeYBwdyn5llgjDTpf+0SXs1H8JuSesWCRh3x/zg8is+j7ya5txreU
wJ2/p9ZQkk5MpnBOplxTAZ5A7iPZ6nRiJ7v6E/d8NTCvK7BsRTjgaGu244M9
UJfKpe4nRyfGht6Jfk3XgHP3uw3ubUP5vPk/mU8lmiDY/eGlCz+y35AlOaZQ
Gx7+9Hyqxo7yecLi2EibLozbrB74gOwhN/VFhisIYDZFTb8R5dfTL+Po4QF6
EHZKr8gE8ZWqOfdn5yl9sPAVTTBDONFWYyk33AC4GuvLd6HnF5TfWHLFG0I3
w/e2gygeIoapZ1pvGoEuSS/vPOL3Id3nlX7JxiB82U3yAOa3yVc9w3smUNPS
/hzzC5rLfhZlmsK2KFW6GZpPu7OumWcaCdps//uB9fpg5rkl+4dkWLnx9DvW
825Rd56JPzCD2eM16+1w/pJkLGl4Zg4r4roeexGuu+eX0P7aArYPNgnjejP8
8lFQSZUlVFLaSNwIJ8ZnZ7c3WsED/aZ57P8d/rtP1rpTgPFNkxzWG3EbXc4Q
NArIkFtS1vR62p8nXzyt4fIzjo9rfA+g7+8ftIa3ewVu4nwsL6atwX7EBo5f
81rF+r2NLTBz7o8NHJHaJIHzMdNcuCeXry3ITE43Y/5P1dJtdcdtQcsuaBl/
P/Vr+btvR6kQ8VwyDfNTnJBzfhRpB/GSjK0Ybwrh67dZsoO/aon3Me4+b3d1
c4w9tFrNBmB8uyvkw1NGB8jbJEdgPCR1xOtwlAOs2DFtwnjB7o2MJosjXD5E
WcXfWzFSqx6/+48wOKSw1C7eT1Qz79R87bAejjOzsR85RyOeVWc6P6YKweJU
9o621zTiJueWlweKdkCOhpf+wlA/4Z88FbOrehco3+baHhEwQEidunTyKV0W
csPaqQUdSK+efVgXuFURmpZUG7/xofq5cDHtwzVl+PpC3faEItKjA6nDRJYq
XLKv4riA8u+16rHm5Vx1oHEU3etB+TmhemNwbIEWVObZDs9woXitTqp1qNEB
nmHn0PVIX3+z6NR++42AL5HLIb6IX1xxLh4TowBhdTvPtCJ+Zr+tVp+Y1gO7
y39I2xHOndNrvzGvD2I5EcceIhziwFGWwG8EdhIu0wuIr7vqCsPNBI3hSuwd
iwU0HiW+/kOYmAn8vTLmVYHsNWy2+pO83RTKpHZv2I3sCXUSM3vFSDBwiAQH
EBaqdzsWtYMMETuDdLCe3ldT+cxnpxmcu6Xni3+/m686+lfbAhqUrIXlMP9o
Ja7jOpbw48YMx0aEZ49kO7obWYHZj7TnLDifz39OqJKkQHp70D8cHyqpjn+6
syjQtbnjBM6vLyP7I+9IWkNNyv4AzMel7xEhZfetYY659gb+vShI2e5Rvg14
2/4Vw/n3nWPcsX2ythDEF8GG+ScSPfqm7IktqA0bhWM+SEq7n/JQpAJp5+A+
zJfhk1fDzEqpUP5b6h3GKWP5r29r2YH/uqI1fTBXrHqF+tIOJIxGXq49z12z
8UqtPaoXS3YYb3FgZacRDuBjb7Yb44QBe8W+WgcgxFk4Ma4YKX+hbOgIElsm
ZvD3b92y9Bq78ouYI95x3AnvJ85Ok1c1N7LC/C2H+OFEGrGv9+sRRkcBmHjn
siH2AY1457c1b1unDDzTX9p17yWqjxcfSfzgUwDLLyMCV1noRFz9pPolQWWU
0LJUryG9Oq9jG+AvqgrjdzcubkZ8c3ZPqlLarQ410gmOvEjfpnQGXviroQPL
cYayTKx0YneA180eewLOGE8sn0XzE3u1uf50IYCll/5HbZTvEl9Lcu8p1oPf
zjmJ0ohPUaJ3el0r9aEwr8ErGGGnw2AQ1GMM+XEPuhLQ+19IR5LraSZwx1vI
Sgit//V7/9Hp76bAy9d9xAHh49cseyd7SfDIoo0H8yezMHPfgZ9kOD40xnsY
71cIPTh8mdEKcrrTTLF+FemzUxJgoYCrwakmnF9k1+mrNEdTwHcoRg3nox3k
bVGjTNZw1EZkjR892qV8phcQP0jycpgfXFVqQrTLtvDt8WYZbP/46Wyvdl4q
cCu4r/UztY8ltgkmUaHPiFqCMde8YvBKuh00xT+vw9gpq2qyTBL1+6EfFvD7
ylDT8Dt8kXA57TZu0ovqpcBqsNFtHmiSoYivv0Ajtup0qp0VUoIMt1fMEmJ0
gkd+CyMPrwq4MLAXbET9Nmtsv6eAjBqIPf/dzIr8U3czc8IBue+4THX5WRSf
S9Q7jB7yerDsN24fhfuBBke3/L36sFOfdkQB4QWLa3tbDphC+dHe/3SwfWu/
LEc6kWDIIS7VE+HypQBmLk8yCAjnPPPD+kjA7a+XIQXyfrz2wflaU/loTv9r
CoyXUiawvahF9yPMja2hb4f5dYwrnXZcnbWkgs9Do0i8fn7SYnv0Jyrs3Snf
vhYPWnnByq52cGn2ytp+i4hG8bkn7o4QofTyH7ZPndIxL1bvV4SRx0LhFO8A
EXyoMoT6lgF4kuMZmJ/TCDrLQ0OFbxsgZrOAbFoCjdCMYPC0bRIBN468CI15
GsH8Q8m/lSIOlSzrrpYn9BPMpQ9EVS5IgoryJTeQQfUqRURGPlIaDnuXevvd
QXq07bewTK0cLMk+str+D8W76dyemRNKcJBNbCVkB50oLJjnzzmqAnNCX85t
RHrCsWiLT2G8GtxQ0qmXQf2fd9pOFqOLeyBy9fQfSXn0e9hRdYlTGiBzOPtH
jDidoI59/bE/WRN8hvc7CQnQCcEA4xfeCdqgr7/lSiPSFwk3D7AGFeiCNbdM
105GxN+auOijhwAE1S/MTqL4OanlsSneVQ8kIDLNFvkvjslqzMFPH5j5DVQM
EI5orvh2yccAbmS+PyGInjc7ssCofcoQTMVddlkiPrAe5WAUv2gEr7nVGEJR
vs4JviXiG2MMUzcqH9sie5vW7zninmQCl/zfl07h/QSeBrp4oimc+O13xRTr
P8vwXTFxJJivFVjwwXz4qnM/+RYZ3r7vzcX4l/8Zba4bZvDppH2uPcJTHamc
zA/Mwfr6yiYthP+mRpfKF1nAPzOGoO1Yn3r+DqnKt4RTr1hceBB+FHUweKkS
xevy7yTMhwN1g42rzhSYie0Mxvoih5T3urOHAhMVInlr/d3xeeqqmzUsLpbX
Yrxj28Vp1+/W8PxG+jEczy7H7qgJHraB/c3VXzBfi6vkzsvRbeBElQUzjv9X
F5o0bx20hWznrDKc3y1nphL2DdnCUf83Y5h/bb9cxiy9qFDTzZqM55ND+dPV
EWIHO+0a2zAO33+Y3PXPDnorvqz1g12C3m7yp+xhXYN8EMambwdihubt4di3
Hj2Mg8eP8syEOoD3bnExjIPYrp0KejxBbPYUcZpX6yfGzgT8cTPhgA+L6Yti
KP4z6xTEz3wUhItS3fXViO9zzj9da4/sgK8nHyQZ/OgnnnGUOHNG7YImU3Uh
Ky80//LRd+S7spAj+6fIp3mAaK795Wr+VQEuNER6LvLQifQnO5hOBSnDjT21
ua4KSO/Px3KaRalCL2tdZzTKH2+9ei6R49Rhtpx9R6AKnfDrq5TlT9SCrNfn
u29z04lSgzhVnUwdEA2e+BmN9MS4nYYt6QUB1lG8n/Jw/XfgqqL+AOgu5Vv6
hfiYYZDixzSoB7yV93mxnuh9ndJV/1sfmtKf9txGuC4JvKsZjWC8c9x5CPGz
iHx4MY3ZGJS0xdJH0HhJtfdlTnCawDWPiIinyB+eH5z4fflMYXipcm4n1nts
e6YecSG9W+JHckM4/3mqeTofGXh8Ml1xPZBdPr7/oZAZLPz1un8Q4SvOzcYy
chaQuWlbqTzm7+fGGHMFS1CwfvafMN6/EqY7H1GzguqAziRW7J9/GrMdYhRo
+St8COuBwCl+HaFUCgQ9Ls7C9eBToXK1spg1hAfk+WL+lZTFiX25Yw2ExtBJ
/HtffZJ1aY4N3MsiFrAeecBj4nBlhy2MXn83gvn3cQOkwH1b0BQZ9cR8O+18
/FmUFBXorNNWa3r2gtq9qjwqGPEZre2vRb6dZI0qtYPw9VGv1vRqeudgRqU9
VMQzr+mPJuPg15s0kH74miG/pn/z930KrHSAXa4VXGv94Sb2/sm7A0T7w8Uo
jhv9RPGx5MLPLCyw+Zzu/ls3aYT+T1+V7h5+OKklReq9SyNGHsbMvkiQAal7
9SHlz5AefD9UWdkiD1TLvRd2MaF+PvxKusa0Evx3Yea3uAzSJ1S9qydmVWBL
/5mnPSgfJnCdOhnJqQ4CvsMBl5FeoDt6z3Zs1IE4vgL9S0gv6IY25buqE7A7
Iiy+Fa3/QPyHbf13AY5ye/K5ovwVT6zom2TpwVaP6nl5xJdS2j/a1cf6MOpH
SPkgnJ62NSuw3hg0lplyYvB+0PuGVz/bTSBH67MJPm+4uz5qxKMF9Ue+sq1U
hNefi3vO20ICRi/OZ7jfDxxxZMr4RIbhJB9RXO8sX/30vjFuCcbjm3XX4/gt
8VG2XrCCnyslVjg/eLsuxaw/RYHX1z744/yiHRnwKnqBAiFsR4LX+hvB2gr/
09agJ3BMEPu/0ezCb78YW+gTIgSwf39Kl94bYaPC+JM0ibX696zB9MIlKkiw
/nqC8bX1Y3+lb9gB549/DWv5hnHrBb9z88SI+XrXwREaIZdouoseyw02Z80r
TqB+Y/LFT4beX4rwL2NC97Uo6u/6yr2qxpSBV/bpazMUv28z2i5uZVODBpWM
85oovts2dUSkigPIWbUUlKN4gx0WTvVb9MClf7w5EdmzyEQluUpaH2oWn3jL
IBzaPOLxl2IKO7d8ZMD94d11fxdHyCR4d6BEC+sry7HHP6TtyEDtvaaztv/H
XWUXqU0BfWB8h/Nt2GWZmW3PKXCeWZYH2yOAPvWyT8ca6jOHLmB7CSaoNPKb
UGHX6oa18xNTu7uLU81U+GX2pAXjmzDz9N+VbuIX+6sjsy39hICvlIDwIBPw
fvt3wek+jRCYiX0R/YUPQL7QtAXxN4xW63PrmRI4XqtVWNxJJ9Sit7RfKVGB
O1certuC+DjpZj6xsUkNWs9od/ih+j20a3f7o7MAP00Ov8xGfIvWKXrqE6UH
Sr6qETpo/duCsob+xSG+DXgXURcxP7OH9AtMIbbcndMK7//4MAWS8kmwXTE0
E+sjOt8xqfN+FNhW1jOE+RE4wAV5vymw9XneJbxej1b+dN8wpBe3d2Th9V0+
181w9NY04fNUqnArTz+REPs1drs3Jyjy2u3LiEF60PivmliRMlg0VSdGKCH7
NuW/V3ujCrl8jgXhyJ8NL/M5E1YAVDuGPlWg+T0yGlz9waoPI7w+jfh85MB5
vrnG3SR4ZZbKi88nTnftuHlIlQyjzOxMOD9OERm3U3MpcO061Rr75x75ug6H
vDXYcrut8bn0yLDl55dUyEl/ssZHyklGy/RdbOBIPnzbKh7pLanDFge1VEHL
qu+gJZrPDT2zbsk3epCdIn1fEn3/Wwb/uk9jJFCqPW+Cv8cu3KbrxGkNbgrH
1/Jl9WkPTu9jy4SNa2PfWBuN+HCr7M2DXF5YZxl7wCaWRlSfjE51U1CBsZlU
mVakd02PTRmxm6lBpqn18zrkz4qLfx8x6OjB5gWBc0fR9ypJUdJpZH34Z//v
At4P7zvbsMrjS4KGrZMf8X60+HpVmbFQMqxwPxbB/lr6VGpzvwH568vZbjwf
zdP22hWW1lBS+SgL42/a9o82/KDCSpJzJ15/TdjTHGnvAoLTUFXdcTvKT+L7
WyS0GUC/dsj8VTWN6Lk0uut2+gbQLcvM+4HsU80icX35ighon7sePzpFI9Qu
CukwKIrDds+i9GuX+olHo+fP53hKgmwoZ5XYTlQv95hZLTpJQ3sKaz9/KvLf
xKWBm3floHqlqUF4YoB4nWU0bOGtBFTnadvz2+nEhheB2bluKnBBZk9WA8qv
Eyz89Z8i1GCDVvBZW2Qfz6I29Rcn9gCz4a+IM0iPcoGhgYmvBnQ/CaufQnpU
n0HhRc45TfjW4ZsUhPRopVLtcedIbTCJ9fm+kQP1d5uuXyvN0AW9ko9kKtKj
/I/6FbKcAN5M3ZBiR/ljZoFSJminB16/5fY6IXvneC6MB7rrwy8vTRsC4aD1
803zBwxgPpr5JCeKr6n1N792BhkCw+F2siF637zIXc80yghSrVYFA1C9f3f1
gsnvcGOo4BOzssDnsxfpTMfjTECcvU50AuFEhXZ3x1hTeEL/2mqM/FFqIpLM
F00C3iH7k1h/Zp5MPVlylQzNV6M58P5X/sCx1bPxZtBqMxqC+0Xfx7/Ks+6Y
Q7889yzWowzCCfXOuRbwfJJlOz6vLn9x6YR+jiW8TGr6hfWo2snX3/hKrMCh
LoWG/R/1r/b4VkcKlGocTsV6VGmgo+9OFwWeVIaUrZ0/7D/ziM/ZGthit1Vi
7HfC8fXmz9bAM5e+H+eDqc0tKpsO2oDSkFsDzo/3RDjDjPtsYMPkiymsL7Za
Tue4uNpCbqlWLq43S7yRcl50W2jtfDmE68efI4rM7O5UeNFhnrh2PkC9upI8
Zges1049xtjWZcJozwl7KCU3HsdYzptwUi0YJwotmzXTiX6CnRAwVHjFDtPX
vnFYXKQRyeRQpj83BEFo220h6jMaIc38QeGf2Q7oTdi+5Paln3A2TKqP3L8L
Gu+2v8pzHyAO2W0fETktC915uefLG1G+GbgoU/lcAe5IabmcRvrQkC2wrOOQ
MoSu/8L8HvFtCwtDOiVAFW6u35B8CuUH15dNvwLD1SGs83rcc1SfnCa4WB3O
aIH59U7PEfS+EyvriGKCDlxOLI58jfTlwmff3suPCYheLL7XjPgxqePhc6Eb
gGFn/sgU4pfYuvOsl7/pQXX37mNYX85LGn7qo+mD2XUD4jrCAUrf9OznDcE9
OG65F/M1/pXW2yUjuOts9ngQjVf6PdlxhskEkpuveufi/ZzL7I9OcpgCeYuw
gwTeb5Iijvcxk0C79qOu69r+jUalLAcZ2Pu3u+N8JpDWplrHbQYaQ+90cX5l
Vt30r07CAqa/ip1TQLjR7tPN8F2WQKW3t2F9+c7/nOvkbisYucvFhM97NQK9
876LUGDjTrM07P+r28cHVW9SIGZ1tBzn44QsvsCR20hfRlP9MQ4LemNVedcG
pG81DGE9ectnJ/nhVluYuPnfD6wn1Xq8mVizbOEhC6sr5svukEXbKxJUaPJp
J2M+aHGxlYc+pEJQk+Kafpz46pEZ/JhGFH8sNOy71080Ku7lyI1kBkNmhTM9
t2nEHt9iQf3b/NBfcuOGUgaNYDB+tiXOXwaWTK9FFJegfnk49oL0E3mwv/BW
AuuB6K4vVomDSlBxve6/A9J0QvhAxbbInyoQOCgZU4jykdTBo93Zi2rwbigo
uQ7fr9lML3jHogPdct5KLUgPmi6s/HdXkoCDQdPReL1MxyWaBG4DJDM/+ncE
5Y/1q8PfW1P0QKyqUk8Z+bfVKHPg0T19SH7QXueOcNUz7raxamO4P9M5Eon1
xaVQu5n3JnDPakmOC81vw+5Yv/Q6U9A/rXHUFmH7SGmpjHcksBjQi8T6ZV9c
2aeXLWTQ2vs9BetBXcGLvpuGLKFj5OoLrAe78htue05awbcHlOs4Pi/GfZaT
OUEB0zdOcTi+32+8+cN8hgJMVTlha/0pA4krKtwaFO+v58DrkRYosFWOQvo/
Q4gd++e6vjYsrKPCA8PLW7A/BHTSXInzVKjL5sjD2O1Qk4fcpTniUWRGcRGq
H4aWf0+XMHDDLS636WmkD1q+XWgyq1MERzMxhxgROsGqybJZqE8Z0u5U7Pmh
TCckH5uISM6oglXJTJIVir+PLn61WiIAHNyfyjpRPPSz32edF9ID//As2VRk
PwW2bYrG4vogY2ljLYWw2pXUhSVTU/B1HGrbg+0nORMuaUCCQwN5pz0QTh0y
tSg3J0OyGG8Yth973AhHrAYF3jV4TOH8dquCNVO3jAInY2q24PUvRop9f7wX
2SMj/Cy2T+3DSi9xAypMn20JXOtv3hTIzN7tJJQzrixc6u0n5KSb/H66MEG5
Mqz/kEsj2MPb7vxN5YNuJfKNpGQaIa61YcvYAyV4G6W+tAPpvetXkg9ev6cC
j+hvUvqRvosvASudl2rwve7I4wyE47hjIr+cBPhnKFj5DPGJYfkOaTJUD2Yi
Zw/oo/VqfjIf5orRB56uo2wUhNvy873CH5rCjY9PIi3Q/C4cuvu9O5sEk9/7
DLB+WEdYtmV7UaD5s/V6XA+WI9QOhAxS4Grj50S8vii7wUKJYCqEWV5aO/81
HDz/QzF9ihhQCL1KFu4nHhifoY3/WA+p+xt0hpE/c+5qDh3PUgYmz8QTS4p0
IqtbwkmzWBVc25x24v7cN5u54tUMwO+UPxNv0Px2sXSkeq/owTdhvX6c/9ru
bzrBJEmC1/MdcrjfbWx+vW5ClgzL9wUl1vLVkVP6z+9TQH6ftAf2hyK90rVT
2hputWw8hufb+u+le1IFFWY1Ztb2K73/e/DAL4MVIpn25ZxKoBGpKt++e8qq
wtS2Xr3/0Hz4GTWCnlTqgQF5g/8u9H3plMJAj18k+HFWVBF/L+wH/7B06BLh
JJQ5fbybRtDtnMRCt/PC4jn6ThFUfzw7Wy2ebVUBuxfDKiFI3z2M8PvErakG
c5ORxkMoXzgFGNmpqOuBbW/53hNofA0O/zcS+vpw42KhI45/yr3208aHSMCR
l6aN9Z3/uvabkQFk2Jtywhf7ZzNz0uKbtxRQd+ag4/XVC592iSZbA/s17VSM
XXKEtpw3ZwRWt8NsGSU0wjonOjrjjArY5I/770d8WTp1Imqdpx5U1rQEWOB6
Y/etYiqJBMJlNsewvhAujLnL8Z0CKjXxa3rxU+37pKutHJBuZCYhfZ5G7B/l
O2WUqAqH9m4m4/Ma8XN5bSf/6gGVVXId9teB10u93JtQ/3SRyRrbK7VkzGF9
Ags8MLYduXOdRjiSGleOsatC45Zv4UvIHjxn+B5V5+pB40qm4G70fnXciNnZ
TyT4rR3zE8dfwYBxZsUKBYr4hgPX+quO7GZBPh7QOfgtXgbN5/D1fbMiImoQ
f1ZMdweaj1qs0byasj5YFXI04PGYZriCUl3JcOI89zK2H43cnL5R3xp+zn+O
x+N9DH0AsW9VwHvUrMYGzYf59FsB2kU9GOXRZNyL3h896sH0opQEK4pbJ/H7
A6TBbbS/FEiMhxj8fmjjHiWbcU6w+BA0dhHxvf+1+l7FLlWAl2bPj6L5yF6Y
83Dg1YdrT/MYcP+g8vWcdJcWGabV/L/g9QkV+W0hlK2B9EFlLb9qvHCZbnrK
Bqu39D56xNGIr5tHXzqbq4LsQOMRfD9BJNpNO/2DHrQLqWhK4PPX+8E3TOZI
oDWr5Yjt/dk/tuyPyAbIiSy7UX6JRpSzy2w74p1JxO7OerhHdoBQXj00vXF8
lZDXToyqqqERHWb8KS0RG0DxaNJrHqTvz5BLczsCRGBw3XRI8ySNMP968b7I
VnEISeteWL7QTyxcDnnx3V4SvvftkGKXQHrpvMehfpI0vPTJKz2UMkC0MDq9
b74qB5S5xCu84wNEsuXIm5MHlCBGRO3BeqTvX0O+n5y9CoyITjRmonqpq8Q1
8ztYDRIPOIR5Ift7aO+ynDm6B9zb/ow+QXrrZ7YC+fNBDdi6dUhXHr1fyd4t
XR+hCevsQryykL7n5mdo6wrWBt9YR1cdpO/TXeS67W7qwlD/0Ec/pO8PpfGw
VNqjdlorZZof1Ycyp3qmzxQ9yMueL3ZF9isWaTsWuV8frBs1QnF/PCot+q7I
xQDulHkzsaF82vDZvSEzwBCom8ucCfR+QEfiQZdTRmBRy70Jnzfab1npfRRq
DCeCUkXJyH+Dni+awy+YQGTVZuMxfJ+g2k4i+JwpJGmEj+D7qE6Gvxp7Ikng
IO6ijvV9ckPDQO1lMuw3yvsPxx9P5nCfdqwZBJTEfMX6ftdGnoTA2+bg9n7v
YXwfdf1Hgfag+xaw9yDTSazvFX7um2O+awn2LU4KeH9oYXosUazACorNT3Lg
+6g8ccoN8vYU+PM76QnO5zMFP8ejOyigWPlvTc+rfTTo2LTPGnSs5tb0fqJE
zf2FT9ZQM5tvj+s/HPupvGW/DXielXuF698m4/Bjtr028O7A0AjWd81FHE6E
sy2cZ1+4h/VDh5je4pF+WyA9lB/EemCuMCWBfoAKP/o9EnD+jU25+f668jjB
z9Symd+onxDMODwudIodWPWVqxdR/kzgSj0uHioIx88SCQ9KaQQ46tzi1NoB
kx7qocPd/cRT2tnlZ1a74LlA/uCngwOEf47m6qq/LPyx2HLT6f0AsXHKgXfi
kQLsM89+/pILxUvpxqsrTspAJQWVRyA+NcVpeXQeVgXfsC/RoSieHv+s23gu
SB0EykazvyP93j5fdvxkmBZodnFPCfHQiSe/DExzz+tAjkrz3R9Iv69uZpaU
v0eAx3JPG75vaaCcSGR2AhQcNEpaRPz5emjR1qpHD4q5nWtxPmTtFnX4+10f
gtdVrV5FWH81V2HHtCE0fhclf0F8En064twzZwQt0bt396PxDP24xstWjCHC
hrX7AbLfOr8fQWdZTCFe5CUD9ndD+RuVJQakV9KKy/D9TfbhlTsfOcxg9yXX
OKzXX2XA+xvbLCC9LHIE6/UuAZe713ZYwlTIyBZ8P1P7FrW3VMoKuj2tNbFe
T1c4wzKwkQKa/G4Va/1ahZumQTLSN+4H3+B6GiH88fb0LWsoyck6jPHb+q+W
VRk2IGTA0of1+oZbyQalYrYQ98u9B+v1Aa3I8qEMW4j8yOSI/c8U/WpH8nYq
iKaomWL/52kLnFYv6CPcPp/ynMrtJz4lXC5L3MsMAxU7g5PTaISS3KfzJ07y
w9stOYMD6TRi/Y1WpWPOMvCAd2WjXDHqlxYc/feny0OEFf9OfB5rf/aszMvv
SjDUG1S6LEUn6gb//Vr9rgK/L1a/SUX5JPiyD2v5PzUYcdziPYDyzfel7VzE
sjacU6hdHUf63EI7JVJPjABFp/JGfD/P1tPqntwNALuSkJuhOP7dDu5OTtYD
5xx7TlW8/zMb7FGWoQ+j79mk8H12S8PzXgWVxhDUfI7jFO6HvS3EV96ZQElX
0e21/dYXXLsrak2BiW39C3y/cOnkrOvhGhIkOxS74vxv+XkAmhrJ8LJQsxvr
82e6Dn++DViCy/PZBfx+qsycxbFRK7ildnftPGfjdtOzGiEUGAo7fRvHZ+JA
7pjyFAVSw1lO4fh1DOXaExtmDVQIXYf91RP6hl0w0hYyNwYxYX/4WjHwMjJR
4XLLibX7IC+SJLriOecIDQXSUPkcjaA8IXanveQC3jP7z9Wjeqb91744ukwR
wubYFmjCdOLLz7wp6FEGK1bpXQ+RHu9SjOl78FcVHOZdex1RPPUs/3eYSxCg
6BTbEg3xW3Wp7Rsfvx6wvR1izET2+ut5I2K9mD4w1G85iPWVwJFj75iNTKG9
6X0Jvj9pWhquCQQJCl8Wi2E9DoPC506bkkEykOE6tpefKbPHlT0UMKuK5cL8
22UV8s+ihAKVCp934vXWkpX+Xv3PGtJzp09je6SUnt4jpUcFP9Hstfsx4+e4
foU9bicUzV9wnP7ZT2hc3CrSIsIE7/os/9ueTyOYtKd4JE7xQYiXj9wZpFem
fj2b2ZSpBAxCDlmlknRCX6BNZmOqCrBpa6e/QXqq57vmaUqpGvjZfDcoR/gr
Q4HtvxAAJ8or/9eIP69cBG89C0L9CFfioiFar0nsDj/RKH0wTkx/i/UXu46y
1M1sUxC28is2x/sb+48KZmaS4BJPET/WG0kfX0qWHKaA7q+AzTh/vyWZBjoN
UGAd84tkvL74FEsthiAqcER/ScfryxL6bpm4dYpoyyp9ySTWTxTf77jSk7Ye
Fu+FF0ieoxFhFrSazNvK8C/+7cVKpMcprvt3VOWqQvh5Wtw55L8XN5USeibR
/CPjHr9H86N7mA7JLejBCwOGeJzP2Pdk7tkqToKK8w3l+D5LYONVzYpdZNBo
3qSM9ce9dcM3G7IpcMuy/wj2R/DNORtbJ1YIaGfLfnyVRpArhB/83q4KhYOR
krLoe+0Hnr469kwPmAQvBeH+rCU56uHuARJ8mJrchsfr4vXdd2lukVB+svtH
5xcaMV6a3+D6nQfUOdpiL1+gEZpnQqX6N6qAZVZajDHS2/ZMDzMSldVAOnjd
yCyK/7yDx3abKetBFJmsdQqNP+vdv2FIRx+YlWu/KCIcq2Kve8iNBEr++SM4
/vgZ7jYb+pLBXdTwGrb/41QGSmctBcr6koexvRPo1/y9TK3h9/PSmxh7r/N+
78/OCL7Xc0KMn9EIBtlq8vYwFSjs3HJLC/Gh8uvfpvqDelAYL3EC91+11nlj
LxJIEOfYtwfX+96IW4WjXyjg1aXxAI/Xv12MOHGZA9wtOiAN6VueYAuDhouq
wN87wXoe2evHwPatur/1gJW1b0Uc15eqD0IfhchQ/Ul5Tf894NdnniSxgELT
i/d8N1B/2cpSP7WqAmZBrtv+IHs0/7g4HX1fDwR2jYXLofc9Lr6INu0ggaSo
VSuOr9BCp4I7SxRQkL8RhOcjrjxzcqmJG3zM4ssaEX8ERW+8SuNVg9yV9Q0K
aD6Tv14Yz8vpw1vh4KuyeL9+8uujg/vIMBTMsxWP90iYlr9IWMOB9e1r5wXn
lmjsnC9VoC1gKFQDzefNd82D92P0IEnktjL+f6Bkf9W90YUk2OA3+H7N/hvn
Fev+UKB1xXXtfCVa5tK3vfmcsDvw3eV4lJ+SjI8xFn9QBdUUrewQNJ/fgwHF
mzn1QTK+zxnr455u2/1p/5Ehsp9jDM/nW2SUvKSiNTAO7gnF4xluKsgq9WUD
0aPCUjaXaURclsz5XgOUz4rkfXA++0TrunSgXg+C6WQ6Hm/PPYMmnimUvxU/
UrC9qzXchV/95YVg0dCC1VgasfTj9S3jdRxgeKwt5gniZ0DU287mUFXYu6z3
NArvF2bzPK/r04MbsfnqOJ68v0Q4LIyqwCWB4Z3vkD3MMoMTOe/ogeA2o2uY
n4Vn9o1/ek8CX1JJKp4/Ezm61WuOAk/5gtbmrzGW2vHBkBvY+UNeKSH/BEty
UbJWVKFy08NgI/S9wIePaGcl9SGC9ssW309K/SWvziHJCXYTseerkP0mrYeu
lVeqQtDOoK+n0fNe950tcphQv5IVao7PWyTbJ5pkFMmQ43xIAK/Xpcd2Iaaf
FY59G3FxvUIjhvPvCtFVVIHEesXOAL1PzaqR/F2tBxdSmCLxfefoNNreO39I
sNBuqo3f75lhC0w4zAsa37TbCpDea3Q/8fOhwHpYbeoKfoPmX+j9qbg2RRWc
W29l4v7ykKR6TNmEHrRRNcWwvSrfyD8y3koGmsNGUzyeSMIWocovJPAoyF/E
9hnaqHq1k8Eaugz8jmL7sB+33i5vxwOvSugCySiefP3oMb5qXDDJzeWQiNav
orUQmP9NFRjOlv/zRt/z2xUtfF1AH1Ymblfgfk3uZvFUDxX1c2ncQT7o9307
hka7W5H/6h48wPYZfnTf7cwSCfbOVK+dz+f0jH25rLADWDx25ol86ic8nzBn
XlZAemmDay/O38PM984poIZk+z/FtfNtT/LfmHYjLRibOPRWlpdO6FCVrygg
PXG+7FBROK5neS1B7UZmwCFS/hrv15qs83cMbreCoBLxKlzPXdKKKy4rqEDa
7/OibSj/Se/r5HMNpkKiW9na/kzF0vWHlxX0of+/c+twP/w/jyI8eg==
   "], {{{}, {}, 
     {RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwl1nfAjnUbxvHHXsmqZCebjGQVWQlNUlnZo+ydWfZKsl8ZFUqprOxsihCi
obKzR3YyMno/5/v+8XUe3+N33c/z3Nf4XXK36FynU6KEhIRRSRISYn6ZOCHh
nPAU1vJs+ha6b3kr/pf8OKbw+/GY7meeGV35OV7IZ7rwH/kkfg9/mS/hj6IM
H8CPyEbCXP+cl6uhsrV3+Dp9drmlvEnfml+Vn8BU/oy1CfIDckm5n9zZPMAb
mZ/yUj7zi/kgmuu6WXvaHMN7mOetFza78vbmT9brmTN5P/M/1tOar/A25lLr
L5rv875mSV7WHMi7m0d5M/MLbiTMMy/E78R6nkPZSreZv87/lstjGs+M0ro9
PEv8PH6BT0ZSzNdd1FXHBv4GyiAZFli7pK+BjbwNymKQ3/ertazxfa1d1L2P
5Fiou6yriW94W5TDb/pseFN/iU9BCnyluxLnHd/ydrimq4DpugfxuO53nh09
+WU+FSmxSPeX7lls4u1xXfckPtBlwRO6vTwHevErfBru9T1e1S2L+w2pdIv5
Vfk5bOY5HdNa9x3vwG/IFfEhz4ryun08J3rzv3iRuCf4z3w6T8fr8uW8FMrx
QfyYPFJO7Zgl/G/+PKroRsXv1OeSX5e36F+WP5A76m+aldBK91F8f3NinOP4
LvJbchfzIG9sfsb7mxV8dr+cCy14n7j25ti4NuZV64+Y3XkH8xfr9c1Z/K34
/dbTm/V4W3OF9VrmFF46rpU8WD4up3HsUvma/AK28Iesv6Hbyjvxf+TKmMGz
40ndAf5QPAv8b/5hPOtYprsezwq28s6oGM8Sllu7EX8LtvEuqBTXGCus3dTX
xve8K4b6OyqbB63ljufS2jX+UVwvfK37R/cStvNuuKWrgpm6HHGddIf4w3Fu
+HU+I84PVupu6epgB++O27qqmKXLiaq6wzwP3uY3+Exk8LfV130dexoy6Fbx
23EPYCfP7Zg2um28B78jP4WPea7YZ3V/8Lxx3flNXtRnevA9fBbPyBvwlbHf
xHPCh/ATckbrq+U78ivxt1p7l/+gf1huK38fa/KHce/o75rV0Fr3STxD5qS4
lnHfy2/HXm4e4k3MOXyAWc1nj8j50DL28NhzzHHxvJv/WC9mvhn3fuw91huY
H8d5i2k9k9mQtzNXxbVO8v93z1RduXhO5aHySTmT49fId+VXsYvnsd5Ot533
5P/KT2M2zx17re4oz4+B/Bb/BPdhre5fXV3s5r1QHfdjXbyIUM/aj2Jv1MAx
XQEM0t/ms/EA1usSob7+J94HNXFcVxCD9Xf4p8iMDbrEaKD/mffFsHhJoLr+
U/3Dsb+qTvBCGMLv8s/wIDbGewUN9b/wfkjk8zV0n+nyxP6iO8kLYyj/l8+J
7++413Sr49mP/Vb3DU+K1/gentcx7fkO/lacDl6Tz+F54z7RneJFMCxRwv/+
w1DcMT35b/LncS55I74m7lNU4MP4qdiHrX8rJ0OjuPetjZZ/1eeTO8g741rH
Xhn3TJwe+Rn5dfPz2HfjvRx7uJkv3plmf97NPMybxnFx7c3nY4+Uh8d7jo+P
90r8P4eXMHvxTubvvGE8C/yLuL5yY3lt7CvyNLl87HnycPm0nM1xm+TkaMx/
4/2R1DHPxs/R5Y/9VHeaF8UInhhf6oY7Lru5WZ8CTfS/8wF4ETnwnT4lmlrb
yweiFs7oimGkPgnmxvsPW3Sp0Ey3jw9CbZzVFcc7+qSYF+8rbNWlRnPdfj4Y
yfxdz+m+1BWI76/7k5fAKJ4M8+P9gG26NGihO8BHxL5kJo9zr5+rLxh7q+4c
fxTv8uRYEM+F45ro1sV9Es+v7nt+T+wv/CDP75iOsZ/xoTwFf4HP44Vin9Wd
5yUxmqfAo47pzffKC+PZ4U35+riGqMhH8DPxzFnfLqdFK17N2nvyIX0BuZO8
K/YMeUbc9/qU8ovyG+b8uMbmZN7HLMz/iP3Wce+ZKdHH2j7zNeuz5a+sZZGb
yRvi/MjT5YpyJXmkfDaeZ8ftkO+NvZofjvsGqRxTS7dAVySeF90F/hjG8FRY
FM8zdurSxfMTf1dcI9SNax3Pj/mDtfTxXawf4SNRDxd1pTBWnxqL41pgly4D
2uiO8ndQH5d0pTFOnwZL4vxhty4j2uqO8VFI7XfX1i3UPRLvCN1lXgbj+T1Y
qiuIH3WZ4n2hO87fRRqffynOo65oPLu6K7wsJvC0WKbL6rjmuo1xXuN+0f3E
70N7fiJ+h2M6x7Nh7taN1tXhi+Ricc14OT5Rvhd95f3m8tg/zcr4E4XjeqMR
0vEVZpW4PmYH86Q5Botjz0RjeZKZHl/HPhV7p5/dkZ+Sx6IJisZ+FPuU/rQ8
Dk0xJPZBXQas5MXQWT5jjkczTOYZsUouji7yWXMCmuN9ngmr5RLxnGNiZF2L
eGeYa8yq8UyZLVES/wUKT6ro
       "]]}}, {
     {RGBColor[0, 0, 
       NCache[
        Rational[2, 3], 0.6666666666666666]], 
      PointBox[{897, 898, 899, 900, 901, 902, 903, 904, 905, 906}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"S\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0.55},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.565701874865608*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwdWnc8lV8YRxGhQmZEyN6ErPcxr3nv5dojTbsyMqOMBkKSrAZaRvpVZpFr
lVUklFlRKmWVUAn9zukvn+/HPe8553m+z/f5nvO+O/YftTvExMDAsHsdAwP+
K35+9ca17U0GJ59yJebmdhCW9RvIn7z/Es9Se+WvXm0jujg12dZ7bIHHeyzd
+5qeEEbnTRuLKAIwrefFZX62mTikvMypyikG1492LkiuNRI2soe+85EkIaaA
5cvEfANR3h8T2qEtA3ydA3cyf9EJXW65e+tPKoBh88aw/Fw64f0n4+otZxXY
8SyKcq2UThxt/ax+z0YNBA590nSfoRPJriw7VwM0QEHC1voJqYE40HbcS9VH
E4hl2v6GrAaiaYOgrb+LNmwQz3uw3NdAqHLFZn05pgMllUn1BEMjsfeHvgI5
QA9sVWJfprM3EoXXngr/TDUAth3XbX5tbiQq0nRGeu0AzDKOLyohfKxWn3rV
2hC6lTvbt3M0Eg2dt+aT3Izg2GD5bzbWRsKXtLve19kYdF+P7Eha30hcKVat
8vczgakXbe0FjI3EhR/1cYHhprC4bVIz728D8ak0NMwn2Azyz/RJ9aw2EE/M
MnLi40lwqTwhWAlhRsrw+/Ox5tBmp+GyB2EGw2rGgkgL0Da7zjuFcCL/T5ve
s5ZwQamysHCtgQh0PdD8M8EK8n+LJuqh54/HaRwkLlmDq1iA5GOEt17MHU4q
tAGrhKgRZrT/21vkItsuk0HgRdZ2QYSbgkVNpe9QQNmxpUwU4WtiBcL69lRw
15xzEEG4PnqZwaeHComRIkL8CO+w2rAi4WQLzecqJDYjXPlC9txQvy0ceppx
iBXhlNY1FTEPO7iZ8+Q1E8IXQ7747R21g7Zki/V/0XqiebdvFnehQWzFtgt/
EC6RZe48NkYDqevje5cRZllgFGzaYw8FdNlmjItUHpy49tkeAlMq/uDfy+4v
Ja8edoAvNK+DqwiPWDwqd5hyABcX2oU1hHtvRCkSIY6wMNVwBs/3q8JWT3ze
EeJtizgY0Hr+PgyuOnPECb4puaphbKViZhq96AQWp3gB4zYPZV//EGfwcwA9
jP+7H/jz719naGCRVsS488JI0KT3HOE4+PWzV1c7IbZac2VVkxVeyv1Y1y3f
SiR21084OG6FO4WHbo+fbyFYfgrPrt8lDPl2dyoD/msiXMru/ZWQE4f7/AfD
H/k0Egwng9S/EVLwVeKH/7xHAxH2g8b92U0O2nKFmF9V04lT62UWpXOUQG0z
07JGDp2Y2lvvI0dThT1sEqfU2+lE9JZwBUcPdQjWk3q9SaiBWNrSZJrttwvi
Lq0bGg1sIDK8O92692rB+0Dqtoc1DURkyvMQOe/dcErvBsEz00CYM3mOXw7U
hcI3PiGzLGg9HXE3xWP0QV2Fc/HypkZi/Z6rvt25BDTl2gWxbWkkMiUf8z58
AXDq5+zUS85GIq85qJCn3xAmVckt/Bsbia1JcwO/h4zgMiv5+C70PKaIXY/8
xo1h/wYBgx9MjQRfd/i22W8mwGV3jZyN4qn3QjB6esEUUqgDnEmIz69+JZwN
XTaDpB1JM26I7+8tq/WTGM1hk/PM1l24HszN5/lXzcGoxaD7KsImZa+lHzFY
wh51px1maPyKtiLrR2YrsHLrrJhHWGbW6uJlDmu4Pl2gH4/4ELXRO//gNhu4
+yHl4BeE37wcLyneToYBr3P7uDCfmyQ9wyUoYBtKmsT8/zud7Tm5lQqqzO16
uD7+I3el2WVQ4VflXKwQwn6pOS1rl2xhoiD+CjvCYlZb364I2MHm9i43XG9b
RBZsGq/YgaxAwQLmT+KTdfpNQjTQm+ZbWEHzZ+RfCHh2hQYmlZmVmO+DaQnf
80TtoZQzMRBjx4yhZ8o37MGOxEjB/Gd6/SC2pMwBKtJITJjvr5cEAy2VHeF0
VQ0/5vtH+U+V98sd4UzYnaF/9ab5PsJexQl4cgwk8Py3jrnHMJY7wS7BJl2M
2dp0BkI0nKEofonAWGcD9X7VI2cI5j++C+MOnYRH097viImD65eKTDqI9zNv
9kUsrgPfxwMtdp9aCbnZ30tlLtyQfj46m1fyCSFprOrkaCQED+9fHbzG20y8
m+k/U7ptB3z6e/QK5b9GQsrePyPBeCccfBoVOVOI9Gli0tjZUhYoS2qS6b10
Yi+7rF3WOUUwuKvvuC6LTsgqyaybfKUC04HcSpoP6USYv/L9+FdqkDtDq/Zc
10A0Vh3Y1TmlAZKxlJwCd5RffonxkxOa8L369a1nRQ2ESGfwe8sxbbhd9CAY
xhuIx0lzdc3zOjDYyjc+uq6RUHnr6fNwQQ8OmJyJskN8tjuh2vKeh4ATv74G
SiC+33Q5HmF6AUBF9YFdGqqHs/SBCOd0Q9Bh23N+O+ofX0ssPzblGQG5r/n2
tg2NRLWnlu7XK8ZQU6jHUY2e71JnP1l21wT6PVvf8aB+4DU+dUKp2hSq3vd1
M6P8vH25snak2gxCvhaKpCA+95lLTjE3k2BMIuCeAsKxVhe+9tHN4cPGHX3H
Eb4e1pqpUG8BknaZkgKI30Yy3HdGWi3h6+yjqU6ErW8OlFq0W0Fh8kD3XvR8
pdYuRrtBawjOPaTSj3BEub6R4JgNDC2aiXGg/Cr6SgfkvyNDrvCHuW24P96W
Zor+SgF5Cf5//eB2TfUrUggVwput1gkjbDb9wvNCmC2kJG915sT858zXmFqy
hUuUpB4WhLuDIolv0XZArTAeYER405WlvvQ/djBMfTuB9frs8ED9UhQNiiMj
NmM+g/uTNxsY7IEqLOqJ+a7Ucjj4V6w9FJ9QWof/zyf8nzct1QFEDfsq8Xjn
Al8uKqcjfO7bP4D5P+qt8v1nhiOEPr9Tjvmus5jrqsvlBHuL5gUwf3uzvAVN
0p0g9MhrLYxjyxtS0rOcwchBYTfGAi1RxjOpPwlRb/KbFP124uN/cb1rdnzg
uy5iVoylhZgsZT1dIb0dfBNZn3vZNhF9fskRV7UlYO13J89dhUZiqCS8311P
GkYUJVeGdqL6ZWoYCz0sD3MXhQ21b9KJklWpnEc3lUGiJaHVKZ9O3L1o1x3Q
owr29uQF7mE6oRCw3fHgl13gkvo8zOJUA1FaE/Ra+I0WMM/M+oS2Ij0kSzFv
nN0NgnX5Q5E/G4j+qG6W0FldqNo39TiarZHoqbgxlsJsANE8GS2RyK8MX1vP
+mYzQI1g9o1KhE/NrZTLbTIEb46XugyI3wY+mZ2qgsZgtZcl2IW5kaCkq2tN
7TSB0E+6BwyRPveP5ZGVNUwhO1EjTw7Fh6ueFFmqbgbz1MP7xRG/nouyb4k2
IEHbd1U/fcTHeWvzdA5Dc7h7aZewGearyd/fbroWoDIcpN6CcLWF+aFZEytw
OTZWKoDys1678fgM1Ro4BvUfFCDcRmbQD99jA6eZP4zifBt9P82l7UGGsqWY
+7xYj4TE7SjeFHjBwiOK+djNIkzP0KDCvUrTwO0IV3/8QPJ4QIWGXvqwAMLn
lfZJB1TZQlrDmUU2hF8nJp3dpGsH8tqZrOsRtms/4p7+2A6iTjEo4fwzzWy5
/X03DVZbbilhPb520GpbAZ0GHlzPjmM+Hm0yYlYi7CGS1zYD4xP7THd6P7UH
ldHS63i9s+ercv8+c4CQoe9WmI/2Np3dJraO4O8vbof5ODt3OcK31xF6xYb+
YEwPl8s+THGCmoZieTx/hJ3tOL3PCbR+nDDAeMFtrG941Bnk5AJUMW5P6TVf
9H5B1FBcnm8+1kGYfAp8UtXPCLvT6T/ajdqIlVX+WGc3LpDb9Xf3QNATQt23
jv2vuSDIJ/zy3mHTTFxP8+48nCkGHAJBtp/7G4lag0lDm6eSoB1ffLOmHfln
94rR9CYZ0Bac/rxrgk50p5XE2jArwtVMcGHLphPtmR49ZtkqsF3/5MjWB3Ri
Pod9PueCGmy3mZ8B5N93su66e6BMA8aCDTmN7RqII0df3HC+rQk2Ibw+PvkN
xNzkU8GRK9oQEzAi+HwY+ZsuLdnXFTrQ+FHeSAzxrX2SbJlwXw8Op/GFxiF/
HZX2Z266xwAqf4to8CP9VVgYluUIBojUykh8j/T3xOPkiagjhnBOIKUnH+mv
vc6vqZ3HjeD3ysPvF5D+ptO0V0qijMEy/ssVEeTHl1VbyBwpJvAuscHYGelv
9Ff72BdZpjDNorZkjfKx3+BRrX+mGYwOqZ26g/j6nDRiaHKdBDYvfqph/YWu
qk8P8s3hXvJoSADCL90MrLwuW8DJqVtBjKgePuafWnEssgTO4tLAaoT3nLxa
LXbbCnI/b1tPQc9nlWSsaK+2BtYU6zPtCLde90972WgDnC+DRDE/vz4uDq6o
J4PIr5Yb2E+kp9y48bKTAj53Xesw38UD5CObD1DhcbN/BdbfystTd4e9bKFl
n5LeJsz3IxOe7z/agq6cUvYGrOfCetqsh+3g1dZDNOy/ezYE5v+asoNvL7OP
YH4y/Yry4vCjgdNmRSvM37yRmqejR+1hrkd8HPNbjFBwK45xgFDqtxSst0Kh
XO/tVhzgcRFHFR4/cNrh/LYER2jsdbiK+ZzbH/rsP0Yn2FGyiQfzdc1Ug/6t
4AehNOkxunK2naim57uV2vNC3YkQ/hKLFuJnT8ZudyURGEpU0yw90URksYs8
3vtAHKz5a86lWjQSAZkLCVJ0KajsmuI7Dg2E9PGkyP8m5CDS5PHMsTI6wRdX
1Bq4XRmuF1QH7bpMJ6yXz15+dkEVHm68NzLbQycu0Oe6Vkt2QRmcaLoXhep5
8/bcxWtakLAa4KrfgM4ThyP18kp3Q4qEfFgIOo+m0fmOJd7ThSIutlBTdJ7z
oWc0OzXpQ334SBI/0s9Rmz69J6MEvPN+9eQjwhzJ7ge/zwJ4byPt80d6WvLL
8OWl30bwRbyMrxXpqcwpjV+l60yg8mu0fA7id6gTW1UatykUS4gweaL4SLXe
j7LaagYPYmibaYgv1JS2ZxHCJNA9w5lrifj11ervJ8sd5kCv9b+sh/nXKrG0
W9gCFK6tiN9H2KWpttp3pxU0/Fk3i/0DH8+Zs0+UrOHn8suBCwgXlKnPzujZ
gGqa8dI8wunjFR7f9MnwQM71Ng+a/+fhG84HTCkQIeqUh/Xz0++htHpJKnyk
i41jrJbnPDVQSIWb7Q8f4PPhypvo0KpbtjDsbda6EeE/X7rLmeXs4EoV439Y
Tx8EqzoUl9nBwbcfUnH+nzonB7nI0WCHqkIK1lOB+NmWqrs0OF+olon5JSlz
4PhBZXuwpJw+ifHXyPMRVpX2sOzGHIH5+KtcPdX+sQMoWxRKY77xigfnk8AR
/A4U7cJ8+8rZxJfa7Aie6m5TGIs4sbCOE05QnnxXGs+fnU32nkv9THhG7su9
x9FBCNsYGX++vgOG27++IyWj86jv7PtHTTth8/4wzf0nGoin/tvviPbJAn/L
2/joFqRvZ4sl3nEpQWCPYX4g8p9Wd0Tv1ErshrKExF9On1H9mBWR76nqwvyA
QF4YyndOX+CZGW19cKpTD2VG+iR/xDtr0JEAVZlDftuRfj00+RRn88IEZPzy
MvrQ+mwH42NSX5mCXidnxhOUf9dDYBw8aAa6tkp3g1B+hy0OZ7aNk0D0PHu1
MsL2PnnUkd/WsGVuXOId2q9c8+alvX9twEhIZwzXfyDv7UPnGCnwPPklMz6v
CIw5qPAwU0HlrVwc1o+jbdVmgyl2ECPssZ/x33k3hlWWnQaXn7/0wvXNUa/B
O36OBoqroW9wPsYs2Gn91x2hfndbK47vCC/9S5uYE9g/d9yO42vWsCx5sVYa
VFogeoazgUhOXiDpL8nDCtte35WrdGK7fp9GHK8KvNF5/DIe+R8hrTO5+xT1
oNstPvwSOh9ql1SuNVkYwKaYfuUnqJ5as/K/O6kCXNE0tA5HeKXibTgbzQy2
nDz9cgnt37yCbH9yLwk6zbi2ayC8bHNhd/dec/ApcfezRXiBwfnpyWgyDAV7
x+P7iROtBVa6SRT4VJwaifdfzbNnxtuECvfb56dwfIi47OEkCxq0CwuOYL5J
koqDk1/QQCBtxA/vv9ZV/PxPsj3yAwXFGO/JIUst73EC2K6pjPffqhLkzeKD
fFo9tXRnYgdxbH9tqP0TBrCaCxcKC2wjJpiLTJRGt8A7WzeuC7lPCJ1oBi/a
cwFIjtWZeufbTKx/pxLwgioGjUL72VS+oPN15W1BtTOSIEORzvd8g+KZIyCr
GCMDFWHSleyz6Pzf84VftlkB7m1ZOy2Gzv8C5r80l8JVQH90fFvLXTpx/95v
7ptH1YBob3ZqnacTzg9EfO+naADNK+fgBpsGwufyTmbTs5rwLk8sUPgy8s8R
R3dJHNeGyF+e7EcHEL/mRt55ZuqA7P715zRQf9x6xKzOJ00PFgValDlRP07L
QkbxngF85zyvsBHxObApOf7ofgCDqFtP2VC+InUPCqV4GILG3aDCd6gfJzNR
5pz8jWAq+mpLF+rH0V0PR5N8jaF3x6f3dqgfWx1eZtQ7bgKlpFjGaDQfy1E2
RrGzprBRPr4nGMX75rFsAb8EM3gbWCBbj/Pfpnn4QAYJ4lfFfuF+LLapfUIs
3RyUPt7TPYSwDzlKKiHZAvbuG9bEfKke0b+VmW0J68/UcZeh+vocEKvHcckK
qvcsj5ii5y/05rGvv20NvgnkgGaEZ/LiKxUf2EBf0Npp3D/bvb6E1peR4ZZ8
/CTWv+KT+46t1FLAK3amBvNpb+vHzr9uVPg9cZwF88kv5Lf93z220JCYcg/X
o7jo2UWPN7ZwgeXIKn6ee9BVja2H7IDnjUIm7sfl9QqnFSbsoPLHdA3Wt4Yz
z3Wy99HAvKA/APOx57P7HNnbHlSZDV5i/t2kTvX3hjoApZkeges1yvOQZf8P
B7hQ5nYDj+/f6rNH8bgjPFhVy8D1av7kQ8Lkb0c4WTC1GfM1eMOF48Gl34kX
OldfHLjTTuS3KonFvtoKwzM1pMCAFmLtw8DF+w+EoYik1aKT1UT8cvvk0XxY
HESXuK8POqP6YatwYz8pBcWp/70dIjcQ5JrZp5YFcqgfOTruQX6wq/mzh/WI
EnDdCXQ6n0snrtwVZzoerAoDd3OkEp7TiSfeg0mWybugZCFXtCu0gcjRPbY8
flILaI3naKfqGogtq+LO7xN3g3XHzpLuuQbCf6xWjjtdF0jLEmtXEX8qjZPV
9fP1wVFhaN0bpK/fHLRpFnUEPHuc5fEb8Y/qxFFv/w5AZ3OWST7qx28bc/rb
vhhBMjfLsVWkz7xrlYPJ88Yw28ak8BT149YM8KEzmsKn1NTSKNy/LA/9ubze
DPhKNu07jPiS0XxLNpydBJlThrV2iE9ez1y5/bjMoUtza5Y25t8GzYViDgsQ
9vF8dxthudUQzyJeK6B+Zti7gsbnM/hy3hexhujyUfFklI9Uty4zWQUbePKN
1XgW4eqhzgRrJTL0OPmd48bnE/4Jt8MaFMj+KkfC/Tf4h/bPXmEqWHQ94sJ8
C1zg1ufNo0L9Jk8h7A8rqpKFh6/awqD5IxV835SWF2Qet8MObpeOrMP3TWNt
GbaVN+2gYO/BRpz/25tITqniNAh076bjfvxqC+TALRoQ6u43/p1n3EKqT0rb
w06NxPB//u+MxvX6O/bwJcnyAOZjzJN5lpOVDnCfgZcX8y2Mo3VDh5Yj3DZ+
K4X5Nnml7+O1WkeYfFTyHuMTQqzv5ws+EFkzwxElsh3EiavsH809d0D7PE36
z2Xkp96W1V6L3wnty0VazecbiOmihJ91abJwKSAnqroTnZc7JmtruxXhzmWK
Eyfqv5U6Ha1MTLuBsWzqmdNEA/HO24p5N7cuCMd8Z/sP6cmEs8/PXj59OMyp
UXAPn2/Dnpd57CJgLJyLAd/fsMaK7Iqhm4BBIZPWDxSPUXettTdPTYG2WzVs
AuXryuXthYFtZqAd8sfyBMqnY0d7w6eXJNBhujShiLAhv0YJ3xdr6GmqaxxC
+7OtlRKun7OBC0+1E/H9B7nhk8+lb2SQC4uKw/7cvMJX1XaZAnmL87n/7tOF
BYwnTtlBksmXy7j/KnzaPeu+jgbd4t43cT13Wp354p9Ag9xwi0Uc/7eDIuKf
8hxBNXPsMY5nusajlfDj0pDA1QjnBRuIB60umUMP5IGqtnHfaAHyK3WfGN5+
VoYpXZfarkI68dNZjjrFqQdRUrxDHKjfnlIqO1okbQChiUYjhaheeoR6o/PE
AEjxT/yyET6jffGXi7EZMCb2/2ZH8Uj+olAeQyFBzZkvVpjvYV3TB2eo5hDj
HpBihfC230emRgLIyH/aFvBhfQscJ5tGUKDE2dsW79eIs94hRo8Kz3uOqGA+
i2nZN9Yb0mDn2O11mH/jr36b8bbRIDw0IBjvd2uaWic3yR5CBDmvYpwFS//9
SB0gqHH0s/EeHYSeGDl9gVkWcnbfd9g0Qif4bXy/BJkrQuFZeRlHxI/oA05D
V3v1oNBUtXcG9SuvM1lD3vMGsKZkeEEU5V+MdcT98C0zUFXrULyM1k9tP8m3
s5wEauzdwrifcPD4HC3pJkOIcTMV339F5H7svT1MAU5x2396b+IrmxEXTANm
pq0KuB4YCElFbll5yBo+6Li1mE7sJbyVL+1ThumJ52sSyP8I775sG/xBH9Yp
cj6yQvFtNz0iRawRMP7sQ3c3wpscvxyOUiTBeg+NOGM0/5HnN+rkVc2BS8RR
1BBhgSf7HVwcKXDzgNJ7HD9XhuNSxQpUqIo0uIOx248rc3LVNDh5f8NZHK/O
BTuw0LKHi+xhiRhfU360J4FfDhLlDFPfPKYTumY+KesclGCddMINWXSetyZH
8rK66cNjnxPy9khPBbyYYmkRBAx3qQ/yongJKO//GPLFDLIf5+l6ofXs6eTy
Lf5OgsCKDBE1hDP8D+2P46bAwlHLGNz/Uj4tta1yUKF1B/N+HC+K0gdwzKQB
NWS6Da9nP/n8nwIdBchm8RHNROe1aYn61FF/AzCEjm9jKB4sMYFLsUEkSH/u
MaiCnl8gvNdcNY8C6Uufs/HzvB46Xvs7QIM0DtZD+HlNEf/dlPG5Rzx52BGr
eaGDSBHz7JbQY4CZdQw04bNtxGDSrFTulS0w7qmQWnj3CUFnlri4mioAY4r8
T05ENBMaZ3n1GZTFYJAk25X5A/X32dOnb3pJwj3pHFuWSRQ/TSvKH1cZcKLa
Ru7+gfL7PelDVoECuF28196L/FdjoelXGx8VEDNT/iGHzqNb6gJvlOxRA12n
PMHN3+jEd2buttfRGvDjY/JDL0vUPx707KoL14RNPdzM33IQ38DEmOSnDeE0
j/aaVw2EEYNS3c1TOiBOu29eh/Zbq9Ic4hajB9pn61l6kJ/KEbp4ofKaAVhH
9w0zovxwF79XKnQFyBGdLBBG8VtaplZtdTCErp6/Vn/R7296LX8LPGAEllv6
eqdQ/wze+Pv5773G0Laa9uEw0suFjVkjfcEmsFVhzDgN+S/rBwcMzU+awmjA
a9szKL5Pz58hfYkyg29qVdGtKB8sZyeYQpJJcOCQ4TWsh+lKLw84J5rDWZeQ
hn0IV5IEMrniLcCzreX6N4TzI/MiK85bQvhQ9OhtpCdlH4L+xqVYgXl/lJYh
er5f6eeawqvWwLx9G7kB1xN/WptbiQ10cnwox/fHNXVJ4UY3yWC7xec09l8a
kY2jXBUUMDhqX4H5cPJHc8h2ZyoUxpcpYf6ZecYWc7nZgtWmxC/Yf/mHOzdu
G7KF01Emqvh95MK2bjWhfXbwtMqgCvuv6wLsEWZjdrC99tEb3M+2kxdvunvQ
4L7sjRO4vqcOK69nPWAPe3hyOzDfvIY6uSaDHOCXdvYRrNel9ufXMuccYM5x
fx4er+BDuKrf+0Yk3rbgz3zcTmRahjFNXdoK+0LeDvOcaCHiDy83uoYIQ5ZM
UChxvYmQWf9M6YeVOHTGPJaq3ovq2SSjLcZTCtWwbDHZEdWLw45pgRNycDK9
q25DJZ0o/nBWtvaRElhNR0cPIv6ZbAis6t2vCnc3PCx3Qv3S4/Hzz4FRu4Ap
2eO2Y0gDcclWVN45UAteRmRdLnjUQDx58vMQS8RucCo80hkyi86b3zlYnGJ1
gRyRoE9C/HBlYZlWTtMH5qU71HqkB8tDfm/PlRJAu5vxj2/z+gd9zwwA1Afw
Nj1E/fW3pMnrsXEjUGV8uV+QpZHg0F1sX/5iDOvS5rhHkb86ojJq6PjbBKrX
VkcTUbyXUhp0n6yYwruPpezHER8q32Q6LzGRQL2CX9UJ8UXyHGtxJJs5NL4u
eKKJ+SVNhIyttwDisRn1OsI8l3vUWzmtQKgvN/UnGn8w3LVnJ681WM+ba2K+
rlcX+tEqYQPuvTpDU1gPHV5nRUmRYf2iyy/8Pu9pwCmPeXkKrOhpCmL91A70
ufNGgAquxUvSmE/nd3z7qJ5Fhf8OTNtgf5VWyBU4nWsL3fdDvLC/Gpg34iFE
7ECk7IIy9lcRwS2U2gI7+HTacvjffYPvTsui7TSoZhIZwv1NY9CHiaWQBtPp
VXcwf3Q5NtSEFdnDIQl+l3/vO2x6jTPvO0CPazU75s9txm91SeqOkFPnKIr7
/feRg/nHSscJ14jUW35aHcR/pt+qIvV3wGufgk1ctxqJOMEUKa4DO+Gl7nY5
OtITBrNqkeQAWQgQ+Ml+vhudF78mnpG5qwjxN2QWVy7RCR+ma/1S37WhXiyc
+cX7BqI74upYDJMufF++nWyG9CB528S9p8z6sBiTsRyH8mu+vKZVIEmANAe9
Afun+yKPNvFWm8DR+01+65Be7Mi/YMBCNwV6TcqPBZSP+mrOnjm6GdTdleM8
jfK1NSnMYakDndfZeTSxXjycjXWoHLMGdW+Dtddofwc11ZSnPtuA92Gj1/j9
k8HWs35Ck2SQGHfXwf6pv6w912ueAlMzb27g/Gi2mRt+jbUDrTL3R9g/iRgK
jIf9tYMDk6ZPcD3K8NyjqZ6kQXP4ViYcX42jOT5f3aRBPYhDP18U8f9gSm3R
eXnYr6NzPuo6negePfPcqlUZoutD7iQj//TJN1peZU0XvHW46p+yNRJy36Vl
8vgMYEGtNTkN6esrd/9mXQGAPK19XrcRfh41ox2vawabnMqY+dH+76wXHl8x
I0ECw/HHOmi/Gql5yyvm5tAzRbSaI6wUGrXGdogM9s8k5bBfsnoaR+08iva3
NWk33h9r8jRbojYV5sLmqZifXBlqFQP6NPjuPCCA+RTTck/2Z0EfIU7aHszr
20FQ6bHVzR9k4H62zK2Ud8j/HWareielCJ+1OaJvID8kLtV3Ib1JD57t9rv6
EPmhwI0dB0vHDSDmk+LiNpRPQ4nOc9NXzIC7sET5BlrfpkTFMo1SEmiIeXFj
P/THmzVIqZUMqwrMK7ge1l800X3cS4EIV6jF672hYrdidoQGku0UXRzvrW8c
aWMs8qDHz9ilXor8xt4Nf5hAGWYb499KXKETzX/4Nh7q1YfjfUq+aih+vR0F
D+JmCKikMFcMI6wcNHjltyTqL+vipvH7I4UUW1tdWXO4GjDZZYAwq+A6p7c2
yF/qFDX885MxpcPlMlSwa37VinFt7VOXbw9o8NZlTyqut/KuqVO2i7Jwp1v0
u2AjneDzZnUOUleCw2rM15tRfOa3LHYtW+hDkNiWB4pI78S/arBneRPo/Ol5
TQjFZ7el7dYfY2ZwtNvnhT+aXzi5Ya3mCwmevQscwP4krpH5IMtGCthfkzDG
/cfugFQ0KxsVyFTP4H/fByyy39mWTgMw9u3F6wmbbtpxVEAB+I5+O/8IxSPj
k7bZC1cDmDjaSfSh/UvneO5k8CUBuahmD/ZX54MYLKsvUIBqMZuEn1dyz8K6
7oMC7HcT00hE/u0Ut9Jx5UbkB0RDzLnQepM3JA3Q8kiwt87yJM6f8Bkmjs/N
FAC77H/5mi8kZbxdUQJjyNvhkof4/pK5neU5AWZHXP7OofmDiqqXf/KQQHjw
21kyGv+p2dh1Uo8Cgu2qwTi+YRb8SsdLaOBz4cxlvJ/uYvM562+K4HdLiV0D
xVNjPnfHNjMCAkwstHag9eSwbZMbGCKBzUG5Wvw901v30xMijFToY/JM+3ce
kpE+wt4vDwu07woe+XTirb9KTaW2AbzR/1lbgdbj262fsOZEggr+Y/y4Hxze
ZmjTGEsBBuFaLzxeT6FDZL2fIiiVcE+LofndmQ6Sd64jIFV4iVMczZ/B2hvL
W0uC/TPetjge0/ln/C68p0DD80vleLzs0WZa/x4KeE78YsR4Rf7Y6UO1NLhy
WSEO72/vzvbGS2FKwCxqvPsWivem9y8WtiQR8HNkRHgLen7BxoN9Ob9JIO1d
clYdPb/Vt43nxxYqqG/bScXPI993f9XrrgCjNizZ51C8zfYZvvoSbQDrBJrM
Z9D+Pu6La2OMIsF7i+UkfL97v63BrOw6BbSt4/7pXQ2rrOhhn3yiOekA54lL
HYTq3/2LfN/+Eu9tuO/uy2gjeq24c7qjt0DHRgun6ponRKxlZUnvESRQm/cI
vz3ZTFiPnL0lsF0MmIc3HR34hfr5udC6N46SYPLucvaRmQai+PTB/e8tZGDL
WIXr+CLSQ0bXjq7zCuCS7de5K5dOZJKnWyL3qkCnnprCgTvI70KZv4KjGnzq
nROomqUTBiocS1+OaYDsYM1DXguk53pS5KWjmpCo1rV7MBvx54aS5dA+bUi+
E/9zqL+BqGUdkGmLRv5Wzf95DNofJzdDT/8xPfiWwfzffeRXr7grDDhkGcCx
gHV6qyg++y9vYq51BHhSrz+6E+Eq1zamIaoh/H5I27IZ6Vm5QE9QjKcRTHYd
+LCM/MusjODTB+7G0B/Hcfw46mftQwfa84+YwIZCxhPZqF8d6U3f537cFET5
R7XS8fc0Imtvi8PMILTopdkzFP+PXnVdUWdIMNSdzoT52k53kDh2yhwSuc6x
7UXY1eRz52CMBdjYWI3MIJzZ3v6h+ZwlvGO6TdxE+r8p/+uYXqIVpF2XHjdA
z5fi25QWmGsNNJ2K2nqEN77ieRl8ywZurDwkYX+r9Mnl1/oCMpwXC7fD/nZT
smq7oiMV+JkDjLCeaLwy7hVysYXl79ks+Pu6dImmW8uvbUG9zt0K+1kI+qQq
4mkHQjt/PMV+VsgsKoj21g7clb58w36i6wGbK+GGz0udZ7E+J+ZkdVxU/Ua8
EXMOZ3vaTqRx5IWIhW2FS3e7TyyeaSFMys8NKNsLA9+MMoNtcRMBzvrZ7Lri
oBnwfHPFQaRn43Gr1RQpIFczXRdybSACbur8/RsgB56yL4d9q5C+Ljht/l6s
BK9UrlicwvfTlXzn11xVYa95zX8mHXSi9FMr36ngXUC2/SAjFIziN3rM+KKP
Fqwqci6UPUTnLZn3ATlHd0Pq02GdJ4ifL39XhURG6EL/xc+C+Huau5+NzUtO
64NRDXmwDOn1323rJRWvE0if2VqYUT0aq6YT+X0AYUHje58i/8IyIOg088YI
uFknfaWRPz3rwttU/tEY6OcZCj4jf2r0t0RJfNEEbO994ExH8RP8b9pt8Bc6
/3g2M8ajfJr4c3yrWjODPWfOnXFB+V7n/y44jtkcdo4lTOLvz9prWtRWGCyg
sTKXswD3p69rV1+xWQHj6JUdi2h8q1rfg7Et1pB4PVz3FL7fvQYdl0RtgPYc
Cr7i+1oe94IL4mQwGve7i/2pXrb920ppCrCOb2fEentFKZb5Ax/iAy1VDevB
9od7dIwzqZCQddIb9+No/le5i9m2oFwSGIf96cq1O79EttlB4+I1U+xPn7SN
kOuv2cFhJ+/P2J9uyc40rhSmwdFjpz5hP3FHj+fErntjhKEQ9zYhgw6iNXf/
9gyFHVDry6J7pwT5r+rj7pa0nbDRWd+DchXx99ILlSA3WXAqORuT3IP657Jz
gOcVRRD1VTdbRf7SyCtx5OGkNsjuuxvKivylaZwZuWBZB/okff9woXp8s7KD
g1jVg1vF+mF+KD82ejkxhsIEtL4+UYv95anpM3/GHphAa7vAVXZUryaN9D1C
taaw9O6QwyqKJ9nktPe9WjMobz93LhG/7/GxEVt7SoLXdTUzWN9DXIvkE0at
YfUQPecV2t+RhRptpgkbyP749Dj2l9UGTlOjH8iQpZ7Ci/1lnuwvm6BZCoTb
qBbj+MYL74OZE3bAUGfYjv1l1pGzwwmrdnDsVVQ/9peDYS2sW2NoEKtZwYrr
6QxH4jUJa2koO/Vat0Yc9cOKW11pJ+Qhxm/bUYcbdEJvxrE8vkoZbs7cUZxD
/c0jeGeu3ZIuKD3siixE/jKm99Apnk0GwCu63/EU0rfBVa1DHFsBgu4KXL2L
8OxlIZcsLTP4ZfS+RBjtXy/jYsRjIxL4qxey4/fBPIeDnq43NYc3hncOkxDW
Vmdg3bGPDJm7mmbw9zLNc7YvU/wp0P6sUAHvz998/cFUTSr0ZDbvxfxKbigs
m9ClQWpVqQTmw7dTHJ8jSl8SktYqzLePdBCunHkdJb0yYKh39O3IOJ3Ye2Io
j49PER7U7bXrQ/02dAPXLNsjPbgtL25+FelxqPX+UqshA9DyzX8kiPLZe99Q
oizHDLYVnqUUofXNeK8P17tNAqqlsQjOV3DG4PdvTWSIeO/Qg/lsl+n1QDaA
BtcE5YxxfLcrBHq1LcqBlUicKBX1n+LAgbHdyspw4ouQf+llOsH7xt7rbYc+
CDwckMf9YYBd56f4RwIK1M864vukxjWKxiMxEvAPp9Zi/80eICNsvNMcrB42
3sffK8Ua9w0UWFDg52aXuzgeCbrNGg+lqDDMvLMf48fCzDnaE7Iwz7vNv7UJ
+a3wQf1icSWwr/n4Owvt33ReTe6YoT5U3Kh4Joj0SEqhm6rlSUD50tINYbT/
zoH2O+WjZpCq9qfyCPbTvlkdDR9JMKkgZIT946+vrybamSlwuGlMEut91Q6D
15wbqPA2/Oe/95WxuiMajhsUgJt8kuR0lU58bAu7bm5nAF4enBPP0P4e7hx4
3HCQBCWf1bWw/2C50tMZkUoB9gz2eDyer1FQbb5XASyFMqReIv+SZN/W2FNj
ANzi78c40fp8P3ted8sigeaqYDXOx95y/gjeaSVIn1L7+B31/ymefM7iFgI+
Z1E7F9B8TLuUMmo2kyBaJy+Hiu8DZ3hGSrUp8JjM7oHjpfdI4FXCO0Xw8BCb
FUHx2a2h7v1Yn4DC07F62I+Ff/m+8PYVCVYbkixxf43X1IkxW6PAnzSPTLze
4nCIm2+WB590+28C6DymanOER0nFANL6X/8qRfMvu1UJ0WkkKJrQldNC4ydM
ubrjoynQfGifOx5fqpe7TtdFEXg8DNK00fz7TFYvti4bwPkUxR9iaP6gyWIr
kWoSZGiNq+L9FuRm9Ge5UsDvmN88Xn/3rpzbzw8pgRXP0fcHUbx4JH11ymMJ
cCh5I8CDxp/8qnOtYJEE4VPy3dify8q8O/xrExUWrE1d8PzOf0MnH1kpgL+7
gRkH4meu0UnVA8cMIJv1LOkzWn/Y3K89TaEkYBrQl8P5l5k/33bkGgXytRiu
/fPnY49WPR+g8cvX9oWh/nlx8LcVT5EB1Au2yrGg+aWLOLX900hgGBplis/T
fMMPC77XK4Ln22l7JrRf44eH5tcUCPBudY/DerqrJD95tosEnqKHEvHvN6nk
fnRbosBlke35eL5THrtfFGspwsfbG9sj0Xj/dmVRtq8GUK4T81kEjVcudhxX
+I8E+e6kf+fBYkftYB0TJciuK0r6gX4vUnz56cJRAloWDFwF0O+zNk6mwmES
iDsfz1TF99cklY4flyiw4KR14Z9fz4/0OrWgAMICR/JNUXxP9mTuSms3gI7u
xQNb0fg70uUc1tdIkHTjCu0fH3Mi2PgYlaBj0aKAguZTuc8wGkkmgJmN/Tu+
z+/e9lurK0oRpmbC1Tej/zs1drKeYidAspj8HvOtXOZPFSedBGbaFsfx8+z7
2VSMTpAg72fQT8w/7atzT7/cpsBEasA//b85ODd8TkkcbOJ2Tpd5o/pauVh0
TskIVlXVrj5kbSS+rr9+SgkZUhMLuX/vt/TtVVOVUD/6ON/8E/cj98vlD88p
qcFlpuuD6ZPovHunO/ilqRWw5WxSEES/J60LcD72EunNhiP/zmMyLn1cHsfs
oXmK/+u/+8W76/PPKdnBat3WePw9jZflTMJLU10QuBA4OsvcSPwPQhvsZA==

   "], {{{}, {}, 
     {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl1nfcTvUfx/Hb3jLLSiQiOzsjZTREhQbKHmVnb7IzMopUVKJ+v+zMsjdl
7z2yN2lPPT8Pf7x83q/39xz3fZ3rnO+58zbvVLdjooSEhApJEhJi9k6ckLBN
KIXl/DR/DF/x5nyNnB3DeLo4TvcJ/1lujPN8PFQJffyzXVcaK3gLlIYfldDX
2g59GazkLVEGn+p/0TXBBT4BSdFPv1NXFqt4K5TFZ/pfdU1xkU9EMvTX79KV
w2reGmt1OTBclz7WdCX8MtN1v/FmuKR7D8kxQL9bVx5reBus0+XECN09sab7
nP8e1weX+fvYpyuKj3T5kEI3kO+RK2At/4FXxCz+Bl8v58JIngE/yrWxKs6x
PkP+Q26BK/wyr45FfBLfLxfDxzylz9VGfkj+w3wZm+Us+u5ySscPMvfqsuke
M//hDVGAr7N+Rq6EB/hs62nNdryw+ab1DfL9cT34O9aTmi14ITMjvy3XwYN8
dXwm8624n5w70/xT1zLR3RuiMb8qXjFrYLF+Mj8gF8dUnh+pdG/zfXJFrOdt
URFf6P/StcI1/kHcb/7v1OZga/v1lbCBt0MlpMEQawf0lbGRt0dlfKn/W9ca
1/kUpMVQ/UFdFWziHVAF/9P/o2uDG/xDpMMw/SHd49jMO2KjLjdG6TLFmu7/
/N+4F3CTf4T0GK4/rKuKLbwTNsX3gtG6zInuPr9V9V/p7vA3cYt/jIO6Epim
KxD3rW4EPyI/ga38LK+MObwz3yznwZi4Z/CT/DzWxDnWZyW++5C3jftUvCrX
xBI+lR+SS+KT+M78bm/ID8t/mq9gi5xV30PO4PiR5lFddt2T5r+8UZzDv7N+
Tq4SvxOfG3uP2Z4XiXvK+hY5bzw/fKz1ZGZL/oiZlf8sv4B8fC3PaHbhTzp3
tpkI7fSJ9E3k2/pr5lNYqp/GD8uP4lNeMP4P3Tv8mFwN3/MuqIY5+sRoH9cu
9khkwijdcV11bONdUR0l/dzM5mjrJ6zVwHbeDTUwV58EHeKzxD6JLBijO6mr
iR28O2pinj4pYnP/JfZJZMVY3SndU9jJe2BrPKN4V3dvrOnm82ToxH/l03Ev
3tWd1j2NXbwnvovrinG6+2JNt4AnR2f+W+yROMJL4TNdoThWN47/ID+D3fw8
fxzzeC9eynX5PvYxjI+9Kj6P/CLWxXmO+VpOgbd4Ysc3jf1Yf918Gsv0M/hR
uTSm89Sxh8X9If9lvho/Q7c1roHZM/ZSM5vzxstn9Dn4s+Yd/hoK8j3WL8hV
4/7j8+PdYnbgRc3e1rfJ+WOv5BOsJzdb8exxbc26WB/7gL6r/KxzFsYejS6x
f/Mb8jP4hs/kx+Qy+JwXjudGN4GflWthL++DWlikT4Wu8fzFPokcmKg7p3sO
+3hfPIec8Q60dl5fG/t5P9TGYn1qdIvrFnskyvi9c8V7T39BXwcHeH/UwRJ9
GnTX/x37JO7HJN1F3fM4yAdgu64AJsb1jjXdUp4WPeIdFfskcmOy7pLuBRzi
A7Ej9gy8p8sZa7plPB16xr4SeySO87KYoSuCB+J9wS/LL+Iwv8ifwAI+iO+M
7xzv81xxX8v1sCHOsf6NnB69eBLXpJl8R38zvlN8G3uvvpM8S3/CLIeZ+jT6
tnHPxDUyG8Q9E3tfPCdmL17czOO8K7q6eF13hJeNPVP+WtfRfFu3yyyE3NYm
6VOYreMelH8362NjvDv03eIedM635j3orY8/Bm/JtbBcnq06KZfHF7wY8uqm
8KtyPRzlg1EPy/UZ0Cf2VMzRPYh8+FB/TVcfx/gQ1McKfUb0jecYc3UPxXtQ
d52/hON8KF7CSn0m9IvrjfI+yzx9/njv6W/oXsYJPgy743nHZF3uWNOt4pnR
nyfFfF0BTNXd5K/gJB+OPbrC+CDul1jTreZZMCDeOVigO8Ur4EteHA/rpvFb
8qs4xS/xaljIR/C9chFM4Xnis8qb4vjYt+WBcvPYU+N5NVeYneM7j+dJLhHv
HxTkI9EAg+J7x0osjOfGLBl7r/yj2QCn5XLx95vZMPb4uH/0KbGIP4LCuM0b
4gd5FBrhPscO1qXCYl4EP8mNcEYejdeQzXFDYs/FEl40evmsOSbuh7iX4n6W
H/W7DI3nAUt5MbwunzPHxj0kNzbTmsvi+LjG8V5Ck3gGUQJNURLj0Czu7TgW
/wEoRIqi
       "]]}}, {
     {RGBColor[
       NCache[
        Rational[2, 3], 0.6666666666666666], 0, 0], 
      PointBox[{816, 817, 818, 819, 820, 821, 822, 823, 824, 825}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"I\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0.12},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.5657018749156113`*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwdW3k8lF0UtiVKZRephArJvmXpPcY+Y5lh7EtE2SNLIVQoREg+lb20SpFs
KbIUEobJVtJmSVKpUFny3dtffs/vnXvfc899zjnPue+1bX+Q9QE2FhaWDHYW
FvxXMn25uGBL096prI+mOZeeEeT61ZYT3ivEgKMnZ9qNHqJrnQY3hysvHKxZ
r5ucxCRI6UaNN6w2Qoe1w5vlV0zigOLCOuV1EjC3OJIjGsEkLGQPfBc2kYYT
idUWnk29REVfTPgzLRkQrF27HCXYS+jwy5VxHJcHY6Wn29KO9RDei5n51xyU
YPmt4WUdwR4iqPWjapmFCiQSbXLHahjEGSfO7csBanA9/EyKShyD8Gw7dlDZ
RwPyf5XXqsYwiKbVojR/Ry0o1fvV7p/BIJT5TmR/CtOGYKH9dbHlDML9p568
ZYAu2H38w3jTzSAuFzwV/3V2LzwQEHb884lB3E/THmZaA+yLV/N3XGIQYXV6
1HxzfYg0k+VSYO8hHndc+5HsTAJKXdH9+FU9hK/JnnpfBwMwdvGkVCOcd1O5
yt/PEIoyWZ7UcfQQ537Wnww+agTv58R1LND4iZLwIz4hxhDF5aL1l7WHeGKc
eTEuzgQ0Ix+cfsnSQ7BavfqQfsIUvsuVuW5BmEW/mrUo0gy8Dx98cHCFQSSJ
/LJgJpLhzx67vFUIBzt5Nv+Kp0B+yskHLAi/P6nmRfxnDp1HBgoVEBY8f+lV
8mULOMtr+vYQwtd55SLbci3hat/y2lsIN4VsNdp52wraPx9IHUa4QKJIXI9O
hbcxK9cWEa6PXmDx6aHCZPGV75zInm2U1UtS9jQI5LResxbhSoZsyss+Gph8
u66McWrrXyUJV2uwP1wqw43w+dBPfu6vrYHCwwzD46OFtmyQdLQB7Z0uH9gR
viW7qiPsnQ0oJ+dcZUWYc5ZVtMmNDi+dzmiwIHxD6V5swUc6LMhp3fmL7JHd
X2K5HGgLOqMr7BgPmz2osP1sC56x3zkxZhZH7SZC7UBzgtUb49/3abqSP+wg
7pXYe4xXakOqTh+yh701YfQVhClKxkbRc/ZwiSisxbjNVdHXP9QBPq6xWMD4
bnnwr5UVBxhs4+fD9nScGz486f2NuF458VeYq5uQWK7JW9bgApfCZOdrQ71E
Unf9mK2dIPBqVIXwM5kE5y/xrxzq4tCaeml/Qw2TcCwtW5GSk4SHNwvM6ySY
BMvxw6ozxA6I9j+dFO/TSxz5acP/0VkOMizi/qM39xAJHDJzOy8qQJ2+RSML
qYf47F7vI2ejDOOk7ZOyHxlENO9ReTtXVVC53HBf4z8GMc/bZHTBTx1MHUwM
Uo8xiEzvDudud02QPFdl1J7AICJTO0PlvPdApOUFSm8hgzBl2/c+N1gHVFIO
M/gbGQTLs5NXJWP0QG5Ek89nhEFwuOX7dl8iYC5oM1N9lkFkST8SqmUA9Hf7
uvIj/uY0H74s0KcP75+GPy9DfBdM/jb45yUJ1FSXy56jeGCLUH/g994A2jL7
qqwRFu4+uunrjCEcHnqvxI1+r8sQjZ6eNQKivSKgiK2H6P8dnxi+YAynEprj
3dH8H8jVesmspjBdfSjwMI4HU9MfIsumMDs3H9yI9sewdGDnAxYydBLtvjsR
XtLazTW+igJfw/bSFv8yCJmvlPO5POZweJ2hiwB6HrXGu9BrkwX4PCL+WCA8
0vv+1s0tlqD+dHQmFeHKJul9R6WsYGBrAeUJ5sv0hX2TglRIrFEI+IL5YNmV
Zp1JhVHXoG2Yv99GT/x9KkCDMZGYAsx3v7MXW/7+RwOh2aZQHA8SFME3Sxut
wTVrxmUNwrybZy0a86xBgqoxuBrhpCfsek1iNpDdNLV1FcKZhecCnufZQE/v
t1I2hIfS4r/nbKXDc436Icw/u8yXzxWL6SDx7IgX5qfPszsTXXK2IDswo4v5
zTZw78StUluwzRyfX0Z4YF40mKxoBydfhSri5+O7JirLK+zg88TgFYyjNT5E
0JXsQVCpTRzPdy3MJYa1wh4On9p3BmPuNu3BUDUHkCsYf42x9mpqedUDB8gg
JLmxPc+04x9Me78lEr4q0tvnnxMfvox4RMyxQ37o8we81r2E3Nc/86WO/KAu
DbO11UxC2kDZ3o4kBuz7WVnau5jE2y99p0s2bYMDNQc3r7VkEjvo/pnxBtth
Q6KA04WsXkJwbNLAgSwLBd8UngtN9RDua2Wts1N2w68ri2Zmrj2ErIIM+2S/
EvgbRiw0IP4c8Vcsj+tXAZm3LelwlUE0Vnmqd3xWg2sPOJ6Xo/oQJSL1/viY
BvBV/qC6n2AQmztCPpDfaUGs0m33kQsM4lHyt4fNP7ShwyVg0K6WQSi92edT
O6sLrU5jLq4DDMI6VrnlgwABZnN2Ec7fGMRVx2MRRucAeqCfFIb8k9gwGOGQ
oQ9hp8qHORG/p26Rx5tySPDx4dzqKsT/6n2aOlN5BjB5drwsFWHHh/TJ0juG
MDLbYOyFfn/w/edYhWojaIi58nUOredN79LfQ9XGsPNleHUpiocXptKfVzWb
gP5tRcYV5P8TlHNTLxpMwXSAyrmA3n/lSGuWfL0ZEBXVyySESTL8t4dbyaB3
L0TzL4oH86uDJWbtFPCLKLnLhZ4rtHaxWg+Zw8r+mRk9hCMq9Eii7yzg6SkQ
iEV4t+/OgMK3ljCT1y1dg7D79Z1s0VNWUHOU8WMM15Oa6n6TUCps+H2p9B8/
y+tXhH9QYTG4LYwLYeNpxr5zR2hQqsPlgOPBb12h2ud5GiS0BQ3geOg+HEnM
RFuDV/CrePz79XnzLzIWreHUiFY7jofEV4P181E2sCHuIgnHG7g8GVnNQofL
ubF7cL1QaAkM+X2CDkFs295gfnLFlKlocNuCVfHZQMxvYfG73jZnbeGdhNEf
HA8ORb581HV2MKHxciN+/tpb6fuvTDvYOWCZgLH23CUnHT57UNAzXflXT7K9
RQ0z7GH0uEcwnr/kGKz/LegA0hwXnmN8ouJxaka2A7z6Ws2O17+xJcrgy9lf
RGi5KCHNYBCuPJmDcRE8UM+1mDS+l0mM3z3J/GstDBUX9BeoI0xisoTr1P2d
W6Bw7U6pmzlMYojt8bvwwF3whrwcFZyP6uPyjosPriqCl+OGR6WyPcSd89bd
AT3K8EjkDDvRxSDiqxpuyo6rgvpOeaHlZAYhH7DFzuuTOoz+nj0ShfJ/Sc3h
AfERTZhcKGWqnGEQPfeL36Wu2gufVX5pzI4yiFcFHFwjGwBUIh0Kk38ziIRv
SxVy6/XhrOGN35qIf6Wtazu6RUhgz+1tsBvxda9PVoeyqAGcGIvmwvndKkNV
8/N2Q6CM+tasRZiv3iSyRNUYsvSdci3Q+M6ta3mj95rAMQPGajHE3x/mphk8
+qawLJBobYT5a7jyx1nHDHxbyhLSkT8n3k/UGRmS4RI3oYbzdbWZ6YGvhhQ4
Ymltv4T4y6HVeOwL1Rx2NQnIS2B+fz/Fp+VqCczucYtcvH9iktZW3lbw8o3b
4R6EuznFGzLVqND7s29xFs83Pmrieo8Kmx45aGB+JYkYLoep02BpxCcC8zFd
wWNnQBUNBPqFD2C+DiQlJ67XsYbu/cvPcX5n+8J7/fseGxgtLYvhQLjAi7Kp
qMEG7h0bkMT5OqiJtEqBoIPB3+Q4zIdYD6Pt3k/p0KJo/I9P7UKlOQfMbcFR
U1kM46/pVZdWntuCh03HIuYn3aKj25BmB2ZqNWb4ecNRuQuBVvYgkqe1B/Mt
wpr2vuGFPcQmhl75l//51Yu+2ThAw/PT0xjPOr978eq1AygcObsOv789lWk6
543qIFtef2VvB2E4Efykqo8Vns76GCWw9hJLyyInHJz54LjrdYrsFSah6vtw
7YqpKFTGR3/O7WcSV9K8OwKzJCAlaa9wpieTqNs7qW/xVBqcQ4UefSvpJTxd
7r/OaJIBwsDA+vdfFM9pt05YrNoNSayXBHgC0PuzXHuMLyjBwtpgA+W1aP8v
rv1x8ZwKGIj29tHuMIjtXOp3PEvV4ODuor2XjzOIQ0GMYofrGmA+3PyrIJZB
fJt8KjqcpwWN9++P8mYxiCNdmrID97Xhb/3VjoBK5M9JS3J8uS6wDVr03mai
/J62+G26Zy9k1Y2ZPJxG8TD7SpYnBOCeV+6h2WUGEfvozFjUIX1gLGlUFSE9
Ttf+/Xn7MRJMl85MFSL+ZthoLd2KMoAnJYtNxQgvKLdY8qQawuieg7oZKD9H
T9FPMLKN4PnnGf9taPz+vQ/q/LOMwU1VY6AP8bvTZFjf8IoJ3DlUcLwe56uu
qol7haaw8e1lsXUI9zrvpRzMNQO2h1YdNrgeFyYs2d0gAzd9hsqKsNvx/GqJ
6xRw1Z225sD5TJr1fnu1OXBpvN+lgXDrFf+03kYLCM9xOnkE4alHN0Pu11sC
+9MFtXKEM1KLi3s7rIDTNMz1HcKSAbsimz2poK/scQnz6YywywniPRXi9b42
YP1Rmfv5zquDNFi/v18T8z390Ni+D+M0cD9K4sJ4t7iuFlegNdy3jh3E+bln
dXDh78/WUPZo+xas59l+Rx3k8bOB4UHTczg/zzaP2eydsYGolqZAnJ9zhmue
vg6iQ/dQ4D/9PGRX7uD3mw6LFw6mYHvEwvk+WC/ZQviQ1gaMB0/Zpm+Kt4OA
waPhGF/qC39+l9UetKdhBuPJnYHeB47bg8G3a/sx3xdsW2S1VzmAogm1GWPp
pF8LywkOkF+axYLf99dIrWGm6CfRnDap8nC2m2jg2K7daL8G9rmJVmdtYBLV
DYXOJXQhKLf7q5Dykkn86snc46KwGX7NiUUu3GISO48lR94dk4MLy1/EEsqQ
fj15ozV4iyKYusltiFTvIcwXEnOfn1MGwxSa0e2XSD+P5kwRl1UhPkRhZns6
gzjX8K1r+ZY6KNRGZxmhfFywYculuQJNMHiZddE9EcVvQ2azfZMe8L2rzGt4
h+qRxQvdJ68JaClS8wyeZxA8Z1y8vn8F8BjntbqN+FX8pEH9+5w+lAcllf1E
fLz1W7/3vz8ksLtezteN+CqToPa7hN0QAi2SryohvKO1PIoiaAwxG2aKjqB8
TE1tex4hbgKX4kaSddF8U5SVCfI2U5hs6q51wnxtlZrfI24G7ttdvlxH/hRq
czt8XJIMl6VSg8QRdmyqq/bdTgHRq7/2YX0tLHA68YmCOUwdmEoUxfx7f991
Rs8ShmKeK2ch/Cuw2MHTyAq8PPcc78D5/c/LtHppKpQtCNC+I6yS4/B58DIV
Vnsd18T59FHMh5h8aRrMR3wSxPl4aSQ6vOoaDXY2OxzGfFz81F2xSs4aEr5t
EMHPnzqcOewoZwODPUtdePzGuK8tVXdsQCPe+yDOx9Iynse8FOmQ70H/p0+m
ItMjKJV0kLvtqoj5cvFbaeMlHVtY93xC9l+/WKF6lv4I6QXj2N84HwtJhhSa
gB0kJu/4p68323NyvSfs4c6m7bvw+LRRO8V3zfZQnX49G+Pa6ZqHyoYOoHPs
yxjGFy5Yen87+5FoPJ1MvObqIk7OkVe0hTnhl4ZscNGlXsLxzXAgq4MAPKnp
KjjfyiSENt+4ckdnE0QVOwg3tjCJM20/1JMFlWGzo8hU8xyD+KNncyhAVBXc
zqcn6uQxCGfPzHqlXeqguu9Xvn00gzj9+MiWG5Ka4Dw4FREcxyDEH29qiy0H
0Ppx7nEAWn9Go/Q6jQp9iJyz5PZA/Dkumv/GtY4E8Z94j7Ugvrz214iSe2wA
XHEHEw8j3Pgs4OvciCkoD5C3vkbrCT1n+ebHGzOYvu6ko4ZwYXmho/sEGbQo
F/RwfdZ+xlcYMkWBxtvxtevQczl2kkpXHBW0Xjr+xPlAkrz1+Fc2GqREaQji
ejqkW8lnepoG9NMl/nh/jUoduWdXW4OOFUc+3t/UuWLv3g102C7RuxqPby6R
2iqYSYeJ5ZoC7F+t4rs8bGK2wHA7aoP358LzJrDYYgebqdelMB55nbhF6qYD
CI2f5cT7rwxN7Z+iFgmXL1JX3lMQvwRWwowurYeQkKX9G7yZhGChp5kNTQSI
hjaJ+0ifrd+9mXX9BhV4rf8j6XUTg+BM+nBQQFYNbn2OWyo7heqPqMWbDhkN
YJWWZ5NE/l+i57N67daHxDbLx7Uo3qrbHdxK95DgXYeIsCvyZ9/gREuXlgFU
+DcsNGP/Nr9ajnEygxcuBtJRyN6apUMcPAfJQMpvKlqLsACzXyDUiwJr5RW3
Y/2urRx09UMjFc5rdPzLv/R716LNjWlwMffjM+wvyeNGLyWf0sCiutgK+5Pf
bLE3boAOJx1/vfjHb53bYcqutkDTKFyH8ViA5vWSYVtwX7jOgnGr0mFvTp/H
xN57T8+t1uogwvbXhdOfsIDuu5Lvj/p7iLFVNwwVXvMCj4S8FGs2k9COZjlo
07kR2O/w8BUOMQmOt0oBDKoEKH40HfkdiHDldVGV09Lw8pmU887qXuLMxY2y
u2NkIJ12Vv86dy+R0PNJRLZZHsa2KxFVoSh+TX9rzB9VAo0ohm7xhh6ivOwP
/9UgFeA2rG4kVSD9fm+zb3mqGiSveazUj/o3n9ztq4wSNeBm5U/RN6i/c4gI
Upc6pgW7g5oXtTKRnvo2/HZfljbA7LG1R9B4wUPGD33SdGHdm7bc9h4Uv9nu
nCFle6H/UWec22cGEdx0Ji5oP0DUPX0XOaQXInW8xFJd9UH6lvlvH1Tvz7BZ
fbP3J8GpzbcfZKL9i+6qfZ3sawBfyv4U3EGYErjAqnvMEPJyEyuuofjiDOJm
lUg0gseORymaaPzVsAsb/eKNYbRG0v0Tyr+mbRqBnpkmkP7Ry+E5Pi9Y3z4m
kWEK7aq62UII+1hG7Yg/YwZBLQZLLli/Dutdy7pAhlmhnVbsCH8MOKHL8x8F
bD7dDGDD+o+Zs5bjujmsP/zGVQXhLzlxlbvvWYC3G0tFCNafBz+F15dawtGB
gzdKEb553CNsqc4K+JL9lkZwf9c63rHiTAXlX+o7cP67ana78cUQFfbqmzhj
veAX+oe+4kaDuy3PJDG/JLcmzrmO0IDSu2ELxi6H89UED1hD/bw/C47vinr5
U/Jj1iBr6muG+fr4dKf2BQ8buC2R9ADrBcv52TTHSRs4GTqchOO756PLN0tv
OqgyrkjheG1sKffnmEH64WtnLuZn1L4D5L6ftmBs/HENxn2CPm67j9mBlIfi
IYxNn4zGT/6xgydfyicxDpsJWj9/xB72eec643wh2ZKg6bxsD7U8p+oxDll9
7lhIyXeiWZ61vfpEN/HtxKHPbibcMNz2gLZxrpcobFWQONEvCFx14ebkASbx
d3TwfPk9cThy7YMv3z0mYVnz9Sm5SA5U2bM4+2t7iK7mj67mwwqgZSjjek2n
h8i7I8l2LEQZOrtLnpqg+t7wJ2kt5bgqlFFkM3kRP594DyWTz6jD0HbeSQek
Dy7qhC28P64JAV+XOnlOM4hKgzOqeoV6YMHu4S7ylkHM2GrZmD0k4JfRLrI9
qgdUe556+luAurRzB/B5WYHBRX+2cX1Y6+PP+wLx703jxb62TyTYUV+Y1YX4
KfS3cujMDwOoK6xZT0L4HvnAYi6HMbiMxAeloHyV2XxN9uhaE1h6eMTBEs13
8LkTvx+fKUT95vh0APNztcbsTR4zqIi+7Hcf+a/0QY55Hh8ZpvPt7m/D+X45
dN8NIQpE9u3TxvqgkMV3Xflmc1AMX79fGPP3ZUe8uYIlHPd89F8GPp8SGXMO
VLOCCKfEwDa8Hz+1fjHFqRB3bOLAN3y+PcuvJ5RDhcdS/mWYLwPlyg3K4jTY
c2fra8yv+1VnxF/l00DsM/PfeVtazmHTk9uswW9HuTbOh9fXm9iflbSBdfpN
81gf9PPCRbhmAw3N5slYH8Q6h1Yf30kH5XHVZsw3idNqV+pv02E53NjsX3/v
cueFqqot7Ff9q4L5dISndfUzTTvw6y5Tx7jTOKxRTMseRvJXpPDvxUodB4Lr
7GHUPDMD41gxrg8/ikYJ2VCNRKW4TqLicFb5y1Wr4KiQrez3I70EacJPZXCI
H27N61toPmYS4krTS6yPxSDfO66b8xmTeBV1Nk9rTgkig/vvH0P5qJaun370
lwpsulRN2lyE8hfPsciYtepgfXhg7DuqPyc+dx4/z64J10Wqlt1OonhOfb71
QxFAyFeSEM4nqcRfksllfViYfOKjjvhR+f7n+/QSEkxyLGyoR3x4Nl7ttOau
AaTTAy4cR7hozfFpr25TaB5v6ZhC61mTcObBhm4zOEYactHB+zPtwFYwQIbC
4jsiy2i/W6pnpd1eUiBAV2Qrrl8+rkvxa45RIVtXyAbHt27MocdxC1TQrdFp
w/1EumBzbUAsyieh+zzx/g25LBUErdAgvKuwDu/fhEzllenVdAjeaSuBx/+u
bjc9nUyHKKGn/+JXgrdsax6fLUwnr3P/V9+qhG51C9lB84z4Foyvsm457Z/w
hxh56ZDDFOsh5DNMd4wlrYMmzR9vB22YxNL1H+tkmcLgXCic9wnVe7d3Nd71
35RhUGtWJLANxWdBT+KW1WpQ1ruH+RDp9YVm9RwRbg3weiwe3IjiFSQtnNo2
68ObFk5mJIqfeyYqWfUyJHi+uMXFGPmPu0ivbUXGALIVRnLbsD/ZvyxOk82g
6mJeVgKyz/JbyVsZWzJ8SePT3IDr8br0R+V0CsS3R0ljf0akyM5vfUAF9iTa
HXxecWhs9tE7PRoEpjoWr/nXT9mcMKmngdXPCGfsP1PbosXZLjr0Edyf8Prf
3byd+JxuC8+ZpwUwFvDbKSAyzgYssgtc3+V6CYH5pIdxr/iAveX8vnV3mIS8
3ZF7JU9FYWNDJ2Wpl0moxW3uPXtfBZJkd3y5fpNB/HAz/y7cqQaeq/rj/kP9
eZhBJCngqQZs8fxgH4769zi9e3d9j+tDq/MBaj+qd1tDLk/+PEMCv/hi29to
/cUvazZ1pBjANZdXzRcR1vZlCzYrNQM3D+ltFGSfoNdzG9EaMsRG7S5cQevv
P1enpF5DAe2QJ76cmG+jPHD7ExWgqFYc82e5ZYSz+hANpt+mmuH1L9Xrdxz8
SoOIdMcZ7J+ZT2VGPSy2UO/z9xhef1rScNI2n7Wg8LT3iKwMk+iu5r3Q90II
nKiGIW+HmQSps/SZWosqTOZcMw1PRf240Gr+e8/UwSlKczsN7fdNo/GVt5wk
uPskqo4P2R+m9LnLk9sAhsO41XB+je2TzN6vSgZ2Qc9cEfS+pFOs6+XVKXCK
WfMY58Mr5PN63LtpcG/Vb1NsnzFnUHfGHRr4+fkEYPvL40rvrBjYQuaJq9uw
vcED5rd2DQpA8wGKwMtOpEfX7Dd1rN0EOd780wv1TEKm7hbrGFkd/MeOPnuH
7CPTjId3dZBgNz3Hrh3Z0x02US45T4bG7PfX8fu3HbjuJ5VGg6nPvP/6qecX
qlqu39oAnZeNv+VEMIldF/oSYnpEYHtxy3D1ayZhenjWiIuiBuGtD3mH4hlE
drCXZKypBjT8WL+1AOWbOrPjMrlkEhy61hqH+4WCDRmNuaYGEL2go4zzicQa
VdlvR8jwarfGIXzeTMoW91cPo0BE/Cl7vL/asXa6tZY04MtWmsb+8L+hqfK3
kwY6G0r1sX28jBKPCwdsgW4UxoX90RRx96qMTxnBp+lb4vPpGZEqsa9bSpcF
TkXe1f3ZgOIh+euOS3m8kHVA7kNQOpNoWCV1fvnsRshz70oYRf29WqKQHoui
BPSlc7nzhzKJm19Pnbp6UBpaueO/P3nYSxRoUKwWnWTAMqpgZO2GXsL9e/Jo
dpE8VG7WfpR7FOmRy0ZTFj5KMHjULHeKD9n3MLj4lpsK2Co4fe2vZBDfV/G3
DUSrwfOiT/mxKP8evNej/vCoBswmvuQ+jfQpDxgamPhpwWzB12XqOeQPFoWH
VxO0IdrjamDUPeRPpeZQ5xhdeGCfF9/HQHpA7Py5yoK9UFvd/6d0ikHw3/yg
cNkJYP+6xsbmJQYxv0CtErTVB4bh9Y8UrC8PLswEe5KA7+a2kBTk/5A1fzr/
uBvArmOK4hUIz67JHn4RYgi/twaalqP8b37PU9/0uBFcfJqiT0Ljn6afNvkU
ZQyD6TnNP1H950wcYws9YwJ+2aNeTNw/KvR6OiSZgpG7/4woPj8y2ZjFF2cG
YtGkZx64H4zMibyfTgYReo0/Pr8qHT28cjKVAtfIyan4fMuv5GPN5XxziHlQ
H62EMItIWpvzLQuwk1n1LBj3Pw+Tj5KuWsKzqweGSxBWi2x8zXffCvyOmrbi
/vP4z+bQLQ5UyMxp8F5CWGmU+S6/jwq7azR2Yn1qvO/ETT5nGvRMLglj/vgf
dWjc9JIG15lSMhjPbupWEfOwhsa+K//6zysb10YYv7MG1zui+7A+3WI5d9XF
1QaMOt92Yb2xtCFG3nvMBppo17Nx/fkcqMjB5UmH+0Isu7FeUFtQCu/9TAfX
BI+rmJ/yPoSTatkMUbXl5PKCYTfBRQgYKjzmglTDY9lbPvYSWeQjbJ//EwTZ
JLePFn1MIi5wodEpVBwarvOnhFcyif2226Y3xsrBHsMHq9Lre4ibo4mydQ8U
4GG4n0zX3h7CcHVwFXO/MrgxdQTKRxnE5lUsedRDqpBPeSCWd55BuD7q/Bgc
pQ4yX07GHUL54D/a1l0OwZqw4txw3gf1q06cnNOKaXow2JZcC29QPXvp9yal
hIAyr8s5bbMov+t5+Z4eBLi2It66B+2/OPspzpTX+rDncGtLE+LLH2nDgXfv
SfDCgbenE/GJR2eufeGTAYTdDjxGRng+9bHOkyUjIKfHTv6H6mHlSJbDPJsJ
rI/I2W+P5pNO4boZyW0K9em3ivwxn3YSoe84zGD24qnXD/6dv2jVyXGTQbN4
9QlpXK9ye1Rb11EgL3zTXpy/vI469WwXModSdq5hQfS8w3YgO2qHJZRHuj1J
Q/hpQILrj11W4EhcePMUnw8E+9we2UgFWstrv68Ip2+bGVfNpoI0Y5cv3t/9
ZMc3iyI08Kd/rsd8GPxBEiA2W0NIyjIF56MLvtvJN7bYQPg5s7W4/qoN+bBx
XraByAzOXKwfd4Uv2pyVooO0smcX5oMOz+qaIzfokKxbZffvPD5z9wiLoi3c
fTisifnxfdirMKzkPfFeqcxEUK+T6FDcw30rhgMKh2YX27x6CQ2/CkHSJX4I
FvkpuPkhkyh6sF6u9IQYEBajyRHPEV/6XllljCtBUBb/8wfofSLutVtjJlRA
LZJZsOMKg9jpETRYvKgGeR/elJujfBPDGlHOPasBM2nKxAjql9lCpToFLgGs
OrB3Df4+smZlaoRxUR/WPJs4sQXtL8OocPTmFRL4OPnCA3w+IfmLHHXNAD4/
CTM4jTDvriT/vFZTsA/wtfuBxtvFyOwseGoG0pEymwl8PnimauBRNxkqQqoK
sH5J2j3x8UUPBV6GXnzPjZ4nnnkpL3uUCj23CllwPD0Tzn5rPk+FH30VBbie
+7GY8RyPosHe18JuOF63VXX57l6kwfvx5na8H+dJurDATgdutX55PF5AL9eV
OEWH2cH2LuzvLGNFWd91tvB7uuwg9rfb/k4v+eTfRGB3wrpIxD9Dyy+x91nW
gaU5eTnbjEnMyGnPnM8UBmvxwo4apP84tVdtEnqnDPRdL3ssOhiEdInJRul5
VbjwYuBOfxKDOC8i91vvjzpIXDvz7RKKrw9c1zj/COmDh+ZVA0fEd4XVWxWN
JUgwtadCXBv5S5rjU/vGbQZwKDQu8hn2n/R8lLSBGailJy8lI/tyJk0taszJ
ULMmV4YP4a7bnzMY5hQQ5XCswedpF2o5C/dWUcG55XQI5t9ijPhIyR4atHkE
pWF/VJJevXB8QIPSLRnu2F+ewyG8d5/RIX+MdfZfPpLp9J9wYYPVD79uPyXc
S3BF9eR/yeGDp2uCNrfcYBLlby++oSeKAj+dS+HtCyZx/myWx/krKrAvVKD2
ZwmDSL0PVnqP1MCyXChQGOm7w47SoR+qNOBWjvvp1QizLOeb/TiiD+OO4wce
ovqhPWA+xRNPgksWe4auofXmCP9eqx1vAJbBHQcKED69v2hksNgMdocwvKyQ
fUusMjJaZWR4ce/mIXx/KYer9GfJXbR++UMO+H7TcrSae/g4FXK+p37F+X2o
zMup3Y8GO7eL/dMHxsIC/0lP0cCiI30J+8NLQskqf4kOxjvPx+P1Xzc+8X7m
7Rq4cC130yZxJtGs7RBJZAnBQrCLEfMVk7g8KOWkXaEKt67nhbeeRfnHdzFo
8IE6XCw9lWmC9nfHKmaOz199IOf5c7Ij+9OyshnRrAaoXzzYhfVeR1cj+3c5
Mmh73PqFz7+Dpdw+kHdT4ExGTRLOV4pjda4vZGiQYnlaEdu37cfctuJbNNiw
TiEI2+/llJWSfUEA+k6+ShhC/V7m+YRw9qhNwOJPfjPdiOxdX7BvjY46lPrV
DoogveVV9f21YTMJlN/OiLbi+wT8Bqf0v5LhvN7cJ/y+JeruBvUzNOAaqDqE
5x+zdRI/sm0DBBwee8gdzCQkNol7T2aIgHep8w4LxPcb0f4D67TV4O2m7Mv1
Ccjepw4nrmppgLOHdI8Lep8Wd0CLFAn1M1Ks/3mj9z0I1WmuBAPo7DHVbkQ4
gL03O+YQGe6Nqy3i+JZTiyToAUjfjRjV4vPKNpFYlzgyDZo/ZA7/07vnG07x
PqPBz3dTpti+6h8jWrfWiIJBp88Z5UGk11xk157JU4PWC483a6B8FVRQ/GVv
KAk43NhTL2E9q/e+J7yQDPYzdGN83pWeGML6ZT8N+rIf7sbzlZA+6gkJCUHK
X+ZPriEmIScwtks6Rx0eWCVaUdB+PnH5wrz7nQQ97uYreP9I+0RSkjZTwJnR
ZIT9Z7lfihqwUQBSaPfZuVuYxGzN6U32m5D/yUVQhPyRE2P67kgFCRz/s4jA
60+yXNp9/A0ZXp7ku4LjtVJG54BTHA1aWce9sT1cUrd3NfCJQNbduZsfkb89
Dunrft+oAYpNkwNfkD1fdTKfTigZAPumTYefovmWglQmz7lQ4OKvE//y53ty
V54wiQakDbtqsP+W/Trl1ZtoIPX9hS2e33GNw/mZYTVI5jvvuAX1Yxzr5yde
ZZKg7tycVzmab1froeMLDWTw3qb4Ae+H5JDd/eIQGshlKtHw+Fcqzyp9BYRh
B7vTzH2k95828leeeakOu/S3yOxH9jl2Ep1kPgPoKlUxwfW+8OPVPev0KPDh
xl0OvF4/scmo2Hs02BexxhfPF229qq1RWBA+ZFzOy2YwifQDVcX1TurQJ/rc
sgLNp/gl5yU/kwSwo06lA803PpD8mv0vGS5k8Ydh/xtHbhXhy6SBZlNDCJ5P
Q+DsFX7ejXC+k8/zO+rPljYFP7F3QPmHJts1jvYj4fZYQxzVAKYvir7H9aqG
S3ZroE8hsaVdhH6j6RmhvLJ/Tnhmhah0t5Oj3+8hmBT+i93RvLA3T8NmdSqT
OEGuvMU8tBEuzUysOoLygflw4rWNWyRA2OWZ9cVwJrGQEv5wxE4aoo1frM1q
6CVunvLa/8FMBs6oLRHNfL1EN6vTs650ecjwNQg5H9lDZFlOt0S6KwGDSJnk
E0D1E0r95e1UYOJui8mOagaxV4ln/lOYGlSeMyYNov7AS3eH5XyQBuhu99vp
gur1RLEC+aWHFjCUC7jeZKB+gGtQpi1aG95EPv5vqZxBrONn6ekL04VQysXX
jqg/yHORH7TN3gtzqx0DbFB/sD93/ao6O4Bzth4Waag/qHJqY3tJ1QeV1x/4
9FB+rtjYczhmH+rXEl5fTkT++ioj+vSeiwGM2NzUq0S4/aVne+EhQ+j/nZVc
hfTAIWaGh8sxIygK/1Jvgsbbbf775uYRY9C6J7z4G9XT8YMPu6JOm4A1Tfpn
P75v0GArFZZgCtEdN6XFEXYy/NgxFGMGLEOfdL1wfW5vH21OIcPmT8dZcX5f
Xzj1TjeJAlwerttwf7BDeH1a8CVzOKD3+Kwi1if9Ar0h1ywgJlavLwhhhQnH
3xxFlrD1+uZZfH91Ye5bhniZFay4MGRxf7D+jHL7bjsqEDamq3F/MF82MRPH
pEKTez4Prh9q/QZMMUcapPq08GJ+ZUg1XVsYQP1wxS95jOHwhPLmfdZQ4ndn
C9aDYsZRh23eWMPYj1lf3B903eN2IpxtoN9fdAjrR6a4/mLgBxuwJ+Xm/zuf
Kr+YNuZOh9eZj5WxHjwk9P1PzSc6rE96chPXo6SL2c/OK88QrwaCRO/u6CYE
Cw7MCB3jAqGSPM4fb3uJNJ6cUIkjgmB9XVRaC9Vjw4qUQUW6ONSnPA3YXM0k
Aq5qr6wEyMGgKJ/rzOMeQnjWfsP3mwog6WwddQB6iI2Vwul/nZThrMZwh984
g+g8o+P14oAqkN2l47yzGETJRKtwQog6CMa/cI5G8Zj1OszgvI8m7KlL+yKC
+oM7Hw1Mb53SA43Y6Kt9IwxiZROH9O4rBKzVzfwTi/oDA+UMovAFwHQ8x64d
aP+H9y/aWA3pw9KUxkgt/t4xKGr/ZYQE/HPnKDhfJDoKNVWMG4DdplWFlgiL
3p12HvptBEH7tWRzkV4y9OeZqfprDKGR1BlnNB+7/9uQk6tM4e3AwYRDmE81
LSpLLGawqdZHsh75r6Bs9ffvHGRovkx8347vR0z9ze/npoBr4MN/+btV5cW9
d7zm8N/gJTHcH/QJuBSdk7SEOePRV2cR1r1Af1O50wqK43OFcH+Qp3Bi1agw
FTi9Fj7j+51bat20DbKo0BUYY4T3V0Yk8Os7IRpU3nG+i/mwVHD79+ZN1sAd
F0f/d5/zQpZBpbgN9AlcEML6bFQnpmaywAaqSXPFuD9gi3ssmbWNDm5Da15g
PphaBevbXKNDX26KK9art3UFYtXL3hHkE3/JgmKdxEBaSlXGHg6oOme7J9a5
l1CSHzh1NJIfLJPXO8zWov7wbyGc9BADuUrLvKudTMLu5EnZRyNK8CCNS/sh
8l/r+M+PKyMq8Nru0UnlYgYRluLLWfNTDWqCnp2LQfklOrWr3XBaAxzWE/IF
qL7aHLS6Iv8fwOTQeecr+PuQm8eurCx9yOQQa+VH+/n6V5hXVQEJYnkPKNeg
/dPRFzFQuWwAuTcenUxG2PQhz67aZlNQEe6Vncd6LvKX64EmMzgb4cGtj883
X45CZwcZJtqGJnE9m5p0e5bWSQEHyw5jrBeEt5me1ApH/dlS9wD2T8borW/K
s1TQqfqUjPsBhyM8GkkRNBCOkfl3vmnsoWHF84cGH61vMrD//axYNrCy0SHy
kbQqjj+JExyTm+LpwGk71Y/9+zBTqi917W+iolfsqsInBkG9Q+zKfcQDdhaS
oeaGTGJq2tXjWYgwiDn/EkpB9fnVxO1ZGFIGSkWXw5PniD+K8e+uf1EF5jD7
He9kBvFOX3on7bs6vNwoTU1G8aO61POajx/1xzbMKlPE5y8H/4teI06CPkf/
FlXkH+XqBrPtmw3gYu5XMq53ppVR2kCYQUR/xiN83xjGRRJiTclQmyi1ix/h
5gXRxTemFEgavXMK19cdVuE/Le5Todk5j4751UxW+pKuSYNNE+nxeP1XavOX
99fQwL1ifD/2T/CW1zln2uiwPTHnD843WolbNnZvZAM1e6dgEZ5egk13dr3U
MT7w1Hmnx3KNSYRIy83J+ohCnfsv9+Y+JkES6JEVzlGBq/aGlyRKGcTQiHYs
tVINRtnOZjshvR88Fpmy+a4G+D2aymIivfHYRfBCdYg+FFod3XEX1QeTJEl/
0eNo/Qp3vl3B35vUN3L8iDUASBoUv4yw/L4gwcJCM2jKtDxPQ/bNUO0yTW6T
oWA6cATr/6UW6f4DJRQwy93dh8+PnpiZBjuNUsFce3oA5+/W7TIJvT40uKyW
qfvvPmnzsSj2SZS/2yLZMK64xjw7lLsG3Das4/ooxCQeLR2bCgsTApEAzrUa
qL5TXfdJ1t9ShVhBsYNhaQzCMGuuYOqeOqwPuFaA7+eMeZlOyi/oQ9T6iKBF
xP884wBq8jIJtr03WcB6MbgjXbt2BxnKVKSVNiH7vEJSzZ1kKRD780wIzj/z
5d2BtTtoUBznKon3x028dun5UQHgdJGu2NvOJOhDQqlDTpvg+X+P9jk1M4n1
ey6mbVZVhyX/c5c1kJ4J8W5zpTWQwCLuw8AT9L4Sj8PfqFNk8B0u48N8mKks
bXcdWQ9GJ471XvJnEmIjxNDmwyLwwa6WOI34a8d2oyBDWQ025beoqKN8Hv3N
uqxGSQOeMr5k70Xz//L5wDupR4K81y+896/C/uQzaNI1gLKiu8VNCPOzFHUZ
+pEh3Gq0Yw3Oh/E3bnn6UOBWoHIg1o9pY+cCvE1pUC//lonXp8YdVybaRoP1
6g7m2P8RmkFWsZ83ws3efe5fkJ5fmyilnZ+lBr4Fbm4JKN9EUyMPUYJIsJvF
Qzkbva85dYPOqVwycJlR2rGej15W3zXvTgPdN67/zuuucqwtI88JQptwAwn3
B0f13jhpZqpDl0n/Znwe37u+xebhFxJoNm7sx/ujcddo7oIoBVLrlP+dF5lK
mzRd/s0PJZ8tJGWbmIT+hxNkPwF1cGndPtOG/HFDcYtH/F0SnL4y09OAv+fn
y11Me0UG9QfVr7C/rxT8TfM8QYNJ/7p/90HZxrvzfn4Xhiav9NXfkL/vXtTx
5+DTgKbbg6YDyJ6lL97GP+UNwOT86gzcn800uFtfdqDA8MTYPpz/boq8L10k
kP92HriD/Tf1Lt1u72MaKLPX/rsffV3Nupm9Tw2MJyJqHVB88Tc+9/6YRgLz
XT+n8P0CCaH8T9wPybDTyXMvPj/ntRQbKQ2mwVa/CAs8vm92envhTyE4pHD8
PhXpef7PPKP5veow5fS1Dn9fPhgrZGG/zgBssn+24fqcpfGiWHwPBaY4I99h
fx0RlNWanxeAvVbRUtDNJF6nlzF7rJF+r5g71o7G6xYGO23tJkFNcREVn2e8
2l5rLLBAhj2bj6Tg8Ur95QKmMyIw3s3z0xG938zY76cfVQOmqNbyTcjf51zr
iHRzAxBznzv3EJ8PJFmfq6oShB/vGyZs+pkEbyaz1jVOHZTgaQXuP6ZDDtn2
jZPgDs9dPby/W8yvPKvmo4C3re2/78teOokBd5hkcIlcccD+jT5z6kN4NA22
PHjx7zxk3kf4uFuFMEi7niUG0X4Zf1F8JseK7DGfoZai+YWtBUx5thvA92r/
LPy9pD1CjWtNpRBIfqSvckf9xm2CVf9JkzpESGX44/7x5IdGy+BVBhC2DCnY
nug+xQgdZQr8IYVdwfaEjxUr/SKpwzTHW51F9Ht7dnEXrVYSfMo9bIi//zW3
CG5S+UGGkD1urfj3Oxx/z1WUiwA/x+zv1ci+N5OflnivqAPl48UIfP5QXSJi
fWWOBG8/BQrg+32WvJ8kIrdR4PIrzn//35K10tUS9IEMJk8rAzFfWyuO6tAS
UL/439t//dh6j8S6JGUR0Mk3ufYCzf8u+JqBmqowWFFlqdwIR2RvPHX0Pcp/
2eo+geh95mJ+lL1CBqDJvnAP3+8uuXiEsQwU2BljJY/nJ+k8DCvZrw7CLX56
Bej3kjpPHTgHSHDyqPgyrm8zic4hs6wU+O/JHXdsny7NV3lEcSOEvRekxiB/
Xh369ipFQRKcgPvUz62o/nJcSVBADYv0knIJrlcHyV/ie4104N2npOzD9QxC
j658VqHOGPqmCuNvIn3TfLs7pNeIAjtmmjywPSbsAQ5hvVYg6GRr8x6Nl3F8
wecaRocifU8urCcO3uEoTFGwBt+3Euw43lxyK2pTFFTgFFfCvquPGETt0vkb
KQok0KLe3oH16f85K/F1
   "], {{{}, {}, 
     {RGBColor[0, 1, 0], LineBox[CompressedData["
1:eJwl13f8V3Mbx/FfewkN0pb2Htq7jAqRaO+9d9EiJU1NoqUUWe2pKbTQNCoS
0U4pJaV9Py/3H6+u9+v9Oef3Xed8zqNcbXvV75koISFhcpKEhJiLEycknBVq
4DPeHv/qyuEt3f14WHeQ34fe/Dyfhrv9jad1S3TFISYs8c85uSY28xyOaanb
zDvwa3J5vM0zobTuR34/+vALvKhzevK9/C1+D3+GL+UlUIm/zH+TxYSl8p/y
I/ic51S20n3OO/LrcgVM509bmyI/IJeVB8qH5DbyArmM438yM6Gzrq+1J8wJ
/C9rxeRe8V7NfdZamO/yYebb1u816/Ge5jLrz5lv8ZfNkryyOYwPNH+P78T8
hI8ykzp/mXxe/yge043hX+gflFtH1nfiN+SKmMEzo5z1Qfzn+FzWD8VnRD9+
kU9HMizXXYi/jS95Z5TDaOcnN1fE57T2OLbwLiiPFFhp7aK+FrbyrqiAn/WZ
0V9/ic9ASqzSXdLVxjbeDRVxWJ8FA/R/85lIhdW6v3V1sJ13x01dJczUZYnf
XvcLz4oX+GU+C+m8/2d1y3WlMImn1q/RXY7fEDt4Ln0b3Ze8B78lV8YsnjV+
H92vPBte5P/w4s7pzb/ls3l6Xp+viHsDVfgr/Kicxvqn8j/yk/E9WhvLv9I/
JLeVt+ibyLPjOtHfNqtgtv4Z/dR4fbm8PDi+J/Mwb2t+wF81qzjviJwdXeI6
jtczJ/JB5hXrJcw+vK/5nfWW5jz+ivmO9Qzmc7yXudL683EN89JyVXm4fCzu
IXmhfJdz1ppXdE/ha57bWjvdVt6L35Gr4h2ePf6O7jeeI94Xv8rnIC3W6a7q
6uIb3hvVYl/Bemv/xv2KnbwPxnqt6rEfYIP1a/F9YRfvixr4XZ8Tg/X/8rlx
T2Kj7rquHnbzfqiJo/oHMUR/jb8b1xI26W7onsUe3h+x2VTTz9HliP1GdYzn
wlB+nc9DRsc9r1ulK4P0us/4Tbk+9vI8jmmv28YH8ETx2fhcnjPuf91x/hBe
4jd4ydiP+Pd8Pr+PN+CrE/1/Py9rVjNH6I7LGRyzWb4V+1Dct9bG8X36vHIH
ebu+aVwPcT/pE8s15Hfju5LfiO9HriAPiWPMX3g780M+0nzMeSfk3Ogae3Nc
H+ak+B3Mm9ZLmf1iPzJ/sN7KnM+Hm+9Zv99sGM8Xc431Bub0eA7J1eVX5ROx
98mL5IzO+dy8HdctvuX5rHXU7eAvxs/Fa/J5PFfci7qTPE/s1/wWfz++R3yh
uxOvi+/4QNSK94UvEyf893BraO17cRBq45Qub9xP+tt8ATJhiy4RGul/4IMx
znupY57W54vPbe0O/wAPYKsuMRrr9/MheAJndPkxIlHCfw/sD43M2KZLgia6
A3woknqNR3TzdQ/FfqD7gxeIPYMnwkfxHh3XSPdp7DGxr+q286Royg/y/I7p
FPsWfymeHfxR/h7PHb+v7iwvGNcATxx7oWP68/3yx/G5eGO+Nq4f1OAj+cnY
a63vkJOhWTwjrI2Xf9QXkDvLX+ubyXPkl/XJ41qTu5vvx71pvhn3npmHVzSH
xr5t/srbmx/x18y6zj8nF0I3/lrsO+bkuPfNJLy0OYD3Nw/w1nFtxncfz2jn
jzczo4lunfWG8gy5olwz/qZ8Ss7m2K/k5GjOf+IFrXfh3/Bh8Tzlj/MFPG/s
c7o/eWGM4kmxUJcdX+tSoIXuEH8FzyAHvtGnREtrP/PhqIfzuiIYrU+GRbqc
2KlLhVa6w3wEnsUFXVGM0SfHYt2D2KVLjda6X/jrcS+a9fGXvhjGWkuBJfF8
xW5dGrTR/cpHIqXzauk+0OWL/Uh3kRfHOJ4SS3VZHNdUt55XiutYtyeePWjL
j/BCjunKd/LXeCpem3/I88d+oLvES2A8TxX7sGNe4AflZdaz8mZ8A28kz5Qr
x54uj5JPx3XuuL1yWrTjday9Lv+mLyx3k3fpm8tz43fTp477XO4R117s9+a0
2MPNAnEvyUfi/jAbxPcpp479Kq59831zuT6b45vLG3WN5VlylXguyKPlM3Ie
x+2T70Z7/jsvYr07381H8zT8Cf4xLxjXrO5vXhITeBpMdMyKeCbgW/096KA/
ysegUeyt+E5/LzpaO8bHojEu60phov4urIz9A9/r0qGT7njsgWiCf3QPY5I+
LVbFPY8fdOnRWXci7jfc5b09qftEVyieVborvDQm87uxOu4v7NdlQBfdST4h
fi8zrfmUfqG+cOwpuqu8DKbwe7Am7jXHtdBt4lXj9XQHeEZ05ad4D3mPPEGu
Ky+Si8Q1wMvyqfK9cc/jU91nZjX8Ea/NJ6IF0vG1ZvU43+xmnjYnYbFcFC3l
N8z0WCcXRXf5jDkZreL38Z6LxfuK1zCnoDXe5BmwXi6O+E/fWXMq2mAaz4gN
cgn0ks/F66Et7uMbzZKxL8XfQzFdO3MTSuF/7eKuUQ==
       "]]}}, {
     {RGBColor[0, 
       NCache[
        Rational[2, 3], 0.6666666666666666], 0], 
      PointBox[{903, 904, 905, 906, 907, 908, 909, 910, 911, 912}]}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["t", TraditionalForm], 
    FormBox[
     RowBox[{"\"R\"", "(", "t", ")"}], TraditionalForm]},
  AxesOrigin->{0, 0.2},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.565701632242731*^9, 3.565701685525779*^9}, 
   3.565701874955613*^9}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJwdW3c8lV8YR2ZWViiVoozs0U/W+9jutS6ukdUgO0lIIkVDkiSVEImGKDtS
FBWSTdGSy1WSrOz5O8dfPt/Pfd/znvM83+d5vs85x/ZDR20OMzEwMMStY2DA
f3dcXc7O2Fqj65lbw6mqOkCQq9gsf3qtEvcKPhe1v6URzdx7OJhdN0AG1884
48s0Qv+q0euHViJwyCScq2CcRhxWXOBW5haHrZ5u0z7n+gkLmcMTG00kQW1o
3csJ8QGiuCsy5L2GNJTLrv4puDlAaPHLFjBHyUEKrwsDy9gA4bWYdOe+oxJk
7Qk4nCBOJ47W/VItsFCB0+7Hnoao0Yk4J9ady/5qoKJ7vTN8D51wrz/lqey9
B7r0L+38Kk8nathErf32aYDjSEL54e10QpnvzM3fwZoQyc1yqE2AThz4pyNn
6a8NouFZwh4cdCIr453Y7BVdaJ+0vhnDSCdKEjS/dtgA3F7o/LVleYAIrtSh
3DHXA5vWCtLBxQHiVeP9yUvO+vBqpPahFsI+JnurfBwNwMql+xrT0gCR/ki5
zM/XEJ7VNvtpovev/as6G3jCCJLOJm/2XBkgfj4OCfUOMobxuNle49UB4q1x
Ukp0tAkINNsE/EWY0epL/9UzpqDYx8hqxEAnGPSeMd49SYK+TZOj3gjHCs9a
dFwkQ/GfEg9fhAOd3GtnY8zg1500cESYdlbNg7hhDga9EZ3aCAtev/3lUpYF
cDpbte9A+MEG2ZP1aZYg0O0UwotwTdA2I6k8K4gpKFNmRDhD/K6YDpUCkzbM
NfNoPlURCwzebRTIs3r4egbh7WZsSxIO1vBVdLgI49JWmcufu6yBpbveYg7h
+LoVJXFXG5DPmitbQPj68d++B77ZwLkG7sElhCOEtvLu2GcL0yFP01cQzpVh
aQzuswXJizdpqwizTjGK1rhR4XVqSDwDms9DpaLTGb+oUBaj9RFjmUOPLZeP
2EGZ9vEOjL+Snhfb/bEDXXXRfIw7ssPlieP2MBPrFYLxXIm19o5Je2AIuWqI
8WpFUNmFAAcINTbfirGZkrFRxLQDcLR2MGJc76ro43fcEf4+dJnE83laGDi7
uuoIXl/kRjBuvPb12JDXGFGTbnbhLrmfEF8uT1/eww53Duu2P4+lEbEtVXQ7
e0FIWOJ0XSmmEayzYqPM6mIw4xGbdV6jn9iXX7AqIbsDnt/vPhX8sZ9giDqm
Ok7sgobDuqOr+weI0H+2/L+cZYHpQprgYv0AcY5ZeloqRQH0ttxmmOekE38O
VHnL2irDVssgIUXE94gNJ+TsXVVBKtEsLPA/OjGzocbolq86QDk3lVGVTiR5
NTq3HPgPMq5I//kkRSdOxjcdl/XaCx/f7jTy2UQnTJn209ICtaD1MKmA4EF8
e382Z0ekDuS9DFhZYaYTzG53fFpuE3BjWUJxHPE3WfKlUEUrGt7Jyh7zPbX2
WJZAlx7cSjwmswPFg+Clse75z/oAdPn38Qgzhak/96UZwLvSqx9vo+c3tpzY
PDpuCIZRv65/RPGh3SoaMTJlBG1Ffx72ovE/zsVcDFkwhoTbRyAH2buf/Ezn
EqMpXJp//EAcx4Op6aTwsils9l2QcUHYMP+T1HMGMmRzuB88gvCShjz7IIsZ
uAr/9/EQwtKjZtfTuMxhww9NGhnh8PVemR6bLSAoeKudIsLf22m5j7Zawqqa
h58IwqU1kvtPSFhBRSrrcTbMl5Fb+4cEKdBJqf2I+fvUsjnBJokC7e5crbMI
jw2cWXknYA39X+18cDz4Xkl5s3LDGl65rrjh38XNBHuXRGygzSA5HMfThi1T
Fq/TbWCoXbt7EeHYt+t0ajbZQkHNxfZlhJMyr/l/SLeFxDPTNphvPQkxE6nb
qPDzUKIR5qd90ucPitlUaJVkqsLY+/2Tn82ydsBUd/sLxkyfis7k5tvBzdzl
Gow/zYgGkhXtoYhf7hrGg7t/lhYW20PoLUEXjCP29IdRlRxg9sqKIsb3g10i
GYsdwLHnBA/GHPWa3cfVHKFltmEOz0eTjVJY9twRXDdtGMX4vWbM8xGvH4TU
n6C/EkX9RP/f7wfDpteBsIPk5KE7NEJ2dH4mfx8/MDUyiGek0QhJA2UHe/1N
0NHfTSoV6Cd+/O268HjzdrDPUYrzfNJP7KL6JcUY7ITWgbrsUD3EJ/qQgSNZ
Bnxl+oWyCweIA5wyNjcvy0NfmOZ4KuKLjIL0uqGPSlB0lbHqNuJ3qJ9iYfRH
FTgfZzgYg+rD6zJ39cY/apBMU6tcRfUjXFiCFkXfA9sj2E+MytKJLY1B/eQ+
DRhbOX27bwudeHlp7EXtpCZs/u8H378NdEKpd793xZQ2aDjuXC/IRidsTiu/
6Rcg4Nq5AiPMx5x9p8KMrgFEu2c4RSF+X6zuDnNM1IN5TcqoGuL/cC55sCZV
HzSPUJPcEH62/z+t4XQDyNywImmOnt/3gjqU/8QQ7vx9So9F8eBJ+3Na4ZkR
NBl2Weag9fW2L60EPDMG8U8btoche3eaSv5hqTUB+v1wJg70/TNm14Y7q02B
P5eN2Qbhe6F1yXJVJJB/v6rlj7C+NH/e1zoyfBTKF/RC2Dyn+zGpwQyuB4ZX
WiOsUNfMaNNjDgJq5cvqCIcV6+iL9lnApu1bj29BWN5Hyj/zhyXcvdapyYnw
gQdSTBHDVkDaZ9yD8/eD8mcfTY5TwFmg7xHO//aFVasbJymQ8SI5EseD8Ujr
/muh1hD3amZ5LT64M9X+zFiDc8P9Pvx8y7GTxHiEDSx90TPF8cCTPtOZuGgD
O+tN9uN4uPilu2om3BbeFbxdwt8Dl7ff2Rio8KDFRRjzU+HNkaC5M1RIHON7
hDF7ZIHKHg47kFro+YzxRrGnXrZX7OC+leAHjB3v+vBRuO3hg8P3DIy/eSlN
zCbZw3DbTW+MNadvO2nxOUCv8cTetXpy00vUMNEB/JknhTB+fAp45gQdITp1
bgnzX+RNuMHfK7PEpoXBis4lGuHKldQdHcYFp0+137wfQyMGn57tWLHZCJaq
eiatrTSi0zcu7I6GBKx7MeQvstRPfM490eWiLQWPPtxqD4hA8c70qi/kyG7Y
2OBa+fobqo/Lu1Ke5yjC6BepXF1hOvHkuk2Lf5syXCq43ndEmU7ElFU/khlU
hXu/n1APovwv57/V3uO3OmxT8lFNUaITXeEtrCGjWiBK8Rx5jupHW0l2XzyL
Lng/dT0ruY5OfMlgZv/OC2C62fDoOOLfubGlYlkePbi3qWIqG/E1v46zsUVY
H9Tbw2N2IqzrndyoLGoAT6eJbW8R7upLtVRUMwLunL6r2xBf+apMTj5WNQZR
dZafgsg+Tds4N0TomgCneIflB4QnzU0TufRMweKN+nU1zF/D1XlnLaRvOg9X
uCP8k/az0siQDLu03PMxf5+RTA+PGprBZ9fWLldcny0ZdE64WYC0qdMfaczv
ifN8Gq6WcI/H67UA9t+mHTZWXlZw68LAZmaEW1jFqpPUKECzm5fE/Ho2OGDi
WkQBg78SCjg/xwobLgerW0PT6aQIzM+rCgel/Mus4cYgfxv+3aYhwCXxpQ0o
1f13EOd/pr8bHkzstQW+Y7ZamI8ZHmab71bbwvL+zZmYD0dr9FkUCCoo9Qb6
Y76cPmi00+sdFeJEPq/xr0EoP/WwuR182bXcjfHo1bLbqx/sYFHxavkaHksL
8+mwh/sfWSgYV5+QvXXEygF4cut3YRxmY02r7nQA6sE3bGv5n1/97pitI0TO
6U/j7zfEd5hOe7USl/KiuxNG+wnDn4Fvy7oY4SrN+e7lpzRiaVn4jKMzH8yu
e3I5JIlGqPq84Fw1FQXXOwaFvxn7iXsJXo1HksXhecg58eWUfqJSd0jP4p0k
8O45IH9MeYBwdyn5llgjDTpf+0SXs1H8JuSesWCRh3x/zg8is+j7ya5txreU
wJ2/p9ZQkk5MpnBOplxTAZ5A7iPZ6nRiJ7v6E/d8NTCvK7BsRTjgaGu244M9
UJfKpe4nRyfGht6Jfk3XgHP3uw3ubUP5vPk/mU8lmiDY/eGlCz+y35AlOaZQ
Gx7+9Hyqxo7yecLi2EibLozbrB74gOwhN/VFhisIYDZFTb8R5dfTL+Po4QF6
EHZKr8gE8ZWqOfdn5yl9sPAVTTBDONFWYyk33AC4GuvLd6HnF5TfWHLFG0I3
w/e2gygeIoapZ1pvGoEuSS/vPOL3Id3nlX7JxiB82U3yAOa3yVc9w3smUNPS
/hzzC5rLfhZlmsK2KFW6GZpPu7OumWcaCdps//uB9fpg5rkl+4dkWLnx9DvW
825Rd56JPzCD2eM16+1w/pJkLGl4Zg4r4roeexGuu+eX0P7aArYPNgnjejP8
8lFQSZUlVFLaSNwIJ8ZnZ7c3WsED/aZ57P8d/rtP1rpTgPFNkxzWG3EbXc4Q
NArIkFtS1vR62p8nXzyt4fIzjo9rfA+g7+8ftIa3ewVu4nwsL6atwX7EBo5f
81rF+r2NLTBz7o8NHJHaJIHzMdNcuCeXry3ITE43Y/5P1dJtdcdtQcsuaBl/
P/Vr+btvR6kQ8VwyDfNTnJBzfhRpB/GSjK0Ybwrh67dZsoO/aon3Me4+b3d1
c4w9tFrNBmB8uyvkw1NGB8jbJEdgPCR1xOtwlAOs2DFtwnjB7o2MJosjXD5E
WcXfWzFSqx6/+48wOKSw1C7eT1Qz79R87bAejjOzsR85RyOeVWc6P6YKweJU
9o621zTiJueWlweKdkCOhpf+wlA/4Z88FbOrehco3+baHhEwQEidunTyKV0W
csPaqQUdSK+efVgXuFURmpZUG7/xofq5cDHtwzVl+PpC3faEItKjA6nDRJYq
XLKv4riA8u+16rHm5Vx1oHEU3etB+TmhemNwbIEWVObZDs9woXitTqp1qNEB
nmHn0PVIX3+z6NR++42AL5HLIb6IX1xxLh4TowBhdTvPtCJ+Zr+tVp+Y1gO7
y39I2xHOndNrvzGvD2I5EcceIhziwFGWwG8EdhIu0wuIr7vqCsPNBI3hSuwd
iwU0HiW+/kOYmAn8vTLmVYHsNWy2+pO83RTKpHZv2I3sCXUSM3vFSDBwiAQH
EBaqdzsWtYMMETuDdLCe3ldT+cxnpxmcu6Xni3+/m686+lfbAhqUrIXlMP9o
Ja7jOpbw48YMx0aEZ49kO7obWYHZj7TnLDifz39OqJKkQHp70D8cHyqpjn+6
syjQtbnjBM6vLyP7I+9IWkNNyv4AzMel7xEhZfetYY659gb+vShI2e5Rvg14
2/4Vw/n3nWPcsX2ythDEF8GG+ScSPfqm7IktqA0bhWM+SEq7n/JQpAJp5+A+
zJfhk1fDzEqpUP5b6h3GKWP5r29r2YH/uqI1fTBXrHqF+tIOJIxGXq49z12z
8UqtPaoXS3YYb3FgZacRDuBjb7Yb44QBe8W+WgcgxFk4Ma4YKX+hbOgIElsm
ZvD3b92y9Bq78ouYI95x3AnvJ85Ok1c1N7LC/C2H+OFEGrGv9+sRRkcBmHjn
siH2AY1457c1b1unDDzTX9p17yWqjxcfSfzgUwDLLyMCV1noRFz9pPolQWWU
0LJUryG9Oq9jG+AvqgrjdzcubkZ8c3ZPqlLarQ410gmOvEjfpnQGXviroQPL
cYayTKx0YneA180eewLOGE8sn0XzE3u1uf50IYCll/5HbZTvEl9Lcu8p1oPf
zjmJ0ohPUaJ3el0r9aEwr8ErGGGnw2AQ1GMM+XEPuhLQ+19IR5LraSZwx1vI
Sgit//V7/9Hp76bAy9d9xAHh49cseyd7SfDIoo0H8yezMHPfgZ9kOD40xnsY
71cIPTh8mdEKcrrTTLF+FemzUxJgoYCrwakmnF9k1+mrNEdTwHcoRg3nox3k
bVGjTNZw1EZkjR892qV8phcQP0jycpgfXFVqQrTLtvDt8WYZbP/46Wyvdl4q
cCu4r/UztY8ltgkmUaHPiFqCMde8YvBKuh00xT+vw9gpq2qyTBL1+6EfFvD7
ylDT8Dt8kXA57TZu0ovqpcBqsNFtHmiSoYivv0Ajtup0qp0VUoIMt1fMEmJ0
gkd+CyMPrwq4MLAXbET9Nmtsv6eAjBqIPf/dzIr8U3czc8IBue+4THX5WRSf
S9Q7jB7yerDsN24fhfuBBke3/L36sFOfdkQB4QWLa3tbDphC+dHe/3SwfWu/
LEc6kWDIIS7VE+HypQBmLk8yCAjnPPPD+kjA7a+XIQXyfrz2wflaU/loTv9r
CoyXUiawvahF9yPMja2hb4f5dYwrnXZcnbWkgs9Do0i8fn7SYnv0Jyrs3Snf
vhYPWnnByq52cGn2ytp+i4hG8bkn7o4QofTyH7ZPndIxL1bvV4SRx0LhFO8A
EXyoMoT6lgF4kuMZmJ/TCDrLQ0OFbxsgZrOAbFoCjdCMYPC0bRIBN468CI15
GsH8Q8m/lSIOlSzrrpYn9BPMpQ9EVS5IgoryJTeQQfUqRURGPlIaDnuXevvd
QXq07bewTK0cLMk+str+D8W76dyemRNKcJBNbCVkB50oLJjnzzmqAnNCX85t
RHrCsWiLT2G8GtxQ0qmXQf2fd9pOFqOLeyBy9fQfSXn0e9hRdYlTGiBzOPtH
jDidoI59/bE/WRN8hvc7CQnQCcEA4xfeCdqgr7/lSiPSFwk3D7AGFeiCNbdM
105GxN+auOijhwAE1S/MTqL4OanlsSneVQ8kIDLNFvkvjslqzMFPH5j5DVQM
EI5orvh2yccAbmS+PyGInjc7ssCofcoQTMVddlkiPrAe5WAUv2gEr7nVGEJR
vs4JviXiG2MMUzcqH9sie5vW7zninmQCl/zfl07h/QSeBrp4oimc+O13xRTr
P8vwXTFxJJivFVjwwXz4qnM/+RYZ3r7vzcX4l/8Zba4bZvDppH2uPcJTHamc
zA/Mwfr6yiYthP+mRpfKF1nAPzOGoO1Yn3r+DqnKt4RTr1hceBB+FHUweKkS
xevy7yTMhwN1g42rzhSYie0Mxvoih5T3urOHAhMVInlr/d3xeeqqmzUsLpbX
Yrxj28Vp1+/W8PxG+jEczy7H7qgJHraB/c3VXzBfi6vkzsvRbeBElQUzjv9X
F5o0bx20hWznrDKc3y1nphL2DdnCUf83Y5h/bb9cxiy9qFDTzZqM55ND+dPV
EWIHO+0a2zAO33+Y3PXPDnorvqz1g12C3m7yp+xhXYN8EMambwdihubt4di3
Hj2Mg8eP8syEOoD3bnExjIPYrp0KejxBbPYUcZpX6yfGzgT8cTPhgA+L6Yti
KP4z6xTEz3wUhItS3fXViO9zzj9da4/sgK8nHyQZ/OgnnnGUOHNG7YImU3Uh
Ky80//LRd+S7spAj+6fIp3mAaK795Wr+VQEuNER6LvLQifQnO5hOBSnDjT21
ua4KSO/Px3KaRalCL2tdZzTKH2+9ei6R49Rhtpx9R6AKnfDrq5TlT9SCrNfn
u29z04lSgzhVnUwdEA2e+BmN9MS4nYYt6QUB1lG8n/Jw/XfgqqL+AOgu5Vv6
hfiYYZDixzSoB7yV93mxnuh9ndJV/1sfmtKf9txGuC4JvKsZjWC8c9x5CPGz
iHx4MY3ZGJS0xdJH0HhJtfdlTnCawDWPiIinyB+eH5z4fflMYXipcm4n1nts
e6YecSG9W+JHckM4/3mqeTofGXh8Ml1xPZBdPr7/oZAZLPz1un8Q4SvOzcYy
chaQuWlbqTzm7+fGGHMFS1CwfvafMN6/EqY7H1GzguqAziRW7J9/GrMdYhRo
+St8COuBwCl+HaFUCgQ9Ls7C9eBToXK1spg1hAfk+WL+lZTFiX25Yw2ExtBJ
/HtffZJ1aY4N3MsiFrAeecBj4nBlhy2MXn83gvn3cQOkwH1b0BQZ9cR8O+18
/FmUFBXorNNWa3r2gtq9qjwqGPEZre2vRb6dZI0qtYPw9VGv1vRqeudgRqU9
VMQzr+mPJuPg15s0kH74miG/pn/z930KrHSAXa4VXGv94Sb2/sm7A0T7w8Uo
jhv9RPGx5MLPLCyw+Zzu/ls3aYT+T1+V7h5+OKklReq9SyNGHsbMvkiQAal7
9SHlz5AefD9UWdkiD1TLvRd2MaF+PvxKusa0Evx3Yea3uAzSJ1S9qydmVWBL
/5mnPSgfJnCdOhnJqQ4CvsMBl5FeoDt6z3Zs1IE4vgL9S0gv6IY25buqE7A7
Iiy+Fa3/QPyHbf13AY5ye/K5ovwVT6zom2TpwVaP6nl5xJdS2j/a1cf6MOpH
SPkgnJ62NSuw3hg0lplyYvB+0PuGVz/bTSBH67MJPm+4uz5qxKMF9Ue+sq1U
hNefi3vO20ICRi/OZ7jfDxxxZMr4RIbhJB9RXO8sX/30vjFuCcbjm3XX4/gt
8VG2XrCCnyslVjg/eLsuxaw/RYHX1z744/yiHRnwKnqBAiFsR4LX+hvB2gr/
09agJ3BMEPu/0ezCb78YW+gTIgSwf39Kl94bYaPC+JM0ibX696zB9MIlKkiw
/nqC8bX1Y3+lb9gB549/DWv5hnHrBb9z88SI+XrXwREaIZdouoseyw02Z80r
TqB+Y/LFT4beX4rwL2NC97Uo6u/6yr2qxpSBV/bpazMUv28z2i5uZVODBpWM
85oovts2dUSkigPIWbUUlKN4gx0WTvVb9MClf7w5EdmzyEQluUpaH2oWn3jL
IBzaPOLxl2IKO7d8ZMD94d11fxdHyCR4d6BEC+sry7HHP6TtyEDtvaaztv/H
XWUXqU0BfWB8h/Nt2GWZmW3PKXCeWZYH2yOAPvWyT8ca6jOHLmB7CSaoNPKb
UGHX6oa18xNTu7uLU81U+GX2pAXjmzDz9N+VbuIX+6sjsy39hICvlIDwIBPw
fvt3wek+jRCYiX0R/YUPQL7QtAXxN4xW63PrmRI4XqtVWNxJJ9Sit7RfKVGB
O1certuC+DjpZj6xsUkNWs9od/ih+j20a3f7o7MAP00Ov8xGfIvWKXrqE6UH
Sr6qETpo/duCsob+xSG+DXgXURcxP7OH9AtMIbbcndMK7//4MAWS8kmwXTE0
E+sjOt8xqfN+FNhW1jOE+RE4wAV5vymw9XneJbxej1b+dN8wpBe3d2Th9V0+
181w9NY04fNUqnArTz+REPs1drs3Jyjy2u3LiEF60PivmliRMlg0VSdGKCH7
NuW/V3ujCrl8jgXhyJ8NL/M5E1YAVDuGPlWg+T0yGlz9waoPI7w+jfh85MB5
vrnG3SR4ZZbKi88nTnftuHlIlQyjzOxMOD9OERm3U3MpcO061Rr75x75ug6H
vDXYcrut8bn0yLDl55dUyEl/ssZHyklGy/RdbOBIPnzbKh7pLanDFge1VEHL
qu+gJZrPDT2zbsk3epCdIn1fEn3/Wwb/uk9jJFCqPW+Cv8cu3KbrxGkNbgrH
1/Jl9WkPTu9jy4SNa2PfWBuN+HCr7M2DXF5YZxl7wCaWRlSfjE51U1CBsZlU
mVakd02PTRmxm6lBpqn18zrkz4qLfx8x6OjB5gWBc0fR9ypJUdJpZH34Z//v
At4P7zvbsMrjS4KGrZMf8X60+HpVmbFQMqxwPxbB/lr6VGpzvwH568vZbjwf
zdP22hWW1lBS+SgL42/a9o82/KDCSpJzJ15/TdjTHGnvAoLTUFXdcTvKT+L7
WyS0GUC/dsj8VTWN6Lk0uut2+gbQLcvM+4HsU80icX35ighon7sePzpFI9Qu
CukwKIrDds+i9GuX+olHo+fP53hKgmwoZ5XYTlQv95hZLTpJQ3sKaz9/KvLf
xKWBm3floHqlqUF4YoB4nWU0bOGtBFTnadvz2+nEhheB2bluKnBBZk9WA8qv
Eyz89Z8i1GCDVvBZW2Qfz6I29Rcn9gCz4a+IM0iPcoGhgYmvBnQ/CaufQnpU
n0HhRc45TfjW4ZsUhPRopVLtcedIbTCJ9fm+kQP1d5uuXyvN0AW9ko9kKtKj
/I/6FbKcAN5M3ZBiR/ljZoFSJminB16/5fY6IXvneC6MB7rrwy8vTRsC4aD1
803zBwxgPpr5JCeKr6n1N792BhkCw+F2siF637zIXc80yghSrVYFA1C9f3f1
gsnvcGOo4BOzssDnsxfpTMfjTECcvU50AuFEhXZ3x1hTeEL/2mqM/FFqIpLM
F00C3iH7k1h/Zp5MPVlylQzNV6M58P5X/sCx1bPxZtBqMxqC+0Xfx7/Ks+6Y
Q7889yzWowzCCfXOuRbwfJJlOz6vLn9x6YR+jiW8TGr6hfWo2snX3/hKrMCh
LoWG/R/1r/b4VkcKlGocTsV6VGmgo+9OFwWeVIaUrZ0/7D/ziM/ZGthit1Vi
7HfC8fXmz9bAM5e+H+eDqc0tKpsO2oDSkFsDzo/3RDjDjPtsYMPkiymsL7Za
Tue4uNpCbqlWLq43S7yRcl50W2jtfDmE68efI4rM7O5UeNFhnrh2PkC9upI8
Zges1049xtjWZcJozwl7KCU3HsdYzptwUi0YJwotmzXTiX6CnRAwVHjFDtPX
vnFYXKQRyeRQpj83BEFo220h6jMaIc38QeGf2Q7oTdi+5Paln3A2TKqP3L8L
Gu+2v8pzHyAO2W0fETktC915uefLG1G+GbgoU/lcAe5IabmcRvrQkC2wrOOQ
MoSu/8L8HvFtCwtDOiVAFW6u35B8CuUH15dNvwLD1SGs83rcc1SfnCa4WB3O
aIH59U7PEfS+EyvriGKCDlxOLI58jfTlwmff3suPCYheLL7XjPgxqePhc6Eb
gGFn/sgU4pfYuvOsl7/pQXX37mNYX85LGn7qo+mD2XUD4jrCAUrf9OznDcE9
OG65F/M1/pXW2yUjuOts9ngQjVf6PdlxhskEkpuveufi/ZzL7I9OcpgCeYuw
gwTeb5Iijvcxk0C79qOu69r+jUalLAcZ2Pu3u+N8JpDWplrHbQYaQ+90cX5l
Vt30r07CAqa/ip1TQLjR7tPN8F2WQKW3t2F9+c7/nOvkbisYucvFhM97NQK9
876LUGDjTrM07P+r28cHVW9SIGZ1tBzn44QsvsCR20hfRlP9MQ4LemNVedcG
pG81DGE9ectnJ/nhVluYuPnfD6wn1Xq8mVizbOEhC6sr5svukEXbKxJUaPJp
J2M+aHGxlYc+pEJQk+Kafpz46pEZ/JhGFH8sNOy71080Ku7lyI1kBkNmhTM9
t2nEHt9iQf3b/NBfcuOGUgaNYDB+tiXOXwaWTK9FFJegfnk49oL0E3mwv/BW
AuuB6K4vVomDSlBxve6/A9J0QvhAxbbInyoQOCgZU4jykdTBo93Zi2rwbigo
uQ7fr9lML3jHogPdct5KLUgPmi6s/HdXkoCDQdPReL1MxyWaBG4DJDM/+ncE
5Y/1q8PfW1P0QKyqUk8Z+bfVKHPg0T19SH7QXueOcNUz7raxamO4P9M5Eon1
xaVQu5n3JnDPakmOC81vw+5Yv/Q6U9A/rXHUFmH7SGmpjHcksBjQi8T6ZV9c
2aeXLWTQ2vs9BetBXcGLvpuGLKFj5OoLrAe78htue05awbcHlOs4Pi/GfZaT
OUEB0zdOcTi+32+8+cN8hgJMVTlha/0pA4krKtwaFO+v58DrkRYosFWOQvo/
Q4gd++e6vjYsrKPCA8PLW7A/BHTSXInzVKjL5sjD2O1Qk4fcpTniUWRGcRGq
H4aWf0+XMHDDLS636WmkD1q+XWgyq1MERzMxhxgROsGqybJZqE8Z0u5U7Pmh
TCckH5uISM6oglXJTJIVir+PLn61WiIAHNyfyjpRPPSz32edF9ID//As2VRk
PwW2bYrG4vogY2ljLYWw2pXUhSVTU/B1HGrbg+0nORMuaUCCQwN5pz0QTh0y
tSg3J0OyGG8Yth973AhHrAYF3jV4TOH8dquCNVO3jAInY2q24PUvRop9f7wX
2SMj/Cy2T+3DSi9xAypMn20JXOtv3hTIzN7tJJQzrixc6u0n5KSb/H66MEG5
Mqz/kEsj2MPb7vxN5YNuJfKNpGQaIa61YcvYAyV4G6W+tAPpvetXkg9ev6cC
j+hvUvqRvosvASudl2rwve7I4wyE47hjIr+cBPhnKFj5DPGJYfkOaTJUD2Yi
Zw/oo/VqfjIf5orRB56uo2wUhNvy873CH5rCjY9PIi3Q/C4cuvu9O5sEk9/7
DLB+WEdYtmV7UaD5s/V6XA+WI9QOhAxS4Grj50S8vii7wUKJYCqEWV5aO/81
HDz/QzF9ihhQCL1KFu4nHhifoY3/WA+p+xt0hpE/c+5qDh3PUgYmz8QTS4p0
IqtbwkmzWBVc25x24v7cN5u54tUMwO+UPxNv0Px2sXSkeq/owTdhvX6c/9ru
bzrBJEmC1/MdcrjfbWx+vW5ClgzL9wUl1vLVkVP6z+9TQH6ftAf2hyK90rVT
2hputWw8hufb+u+le1IFFWY1Ztb2K73/e/DAL4MVIpn25ZxKoBGpKt++e8qq
wtS2Xr3/0Hz4GTWCnlTqgQF5g/8u9H3plMJAj18k+HFWVBF/L+wH/7B06BLh
JJQ5fbybRtDtnMRCt/PC4jn6ThFUfzw7Wy2ebVUBuxfDKiFI3z2M8PvErakG
c5ORxkMoXzgFGNmpqOuBbW/53hNofA0O/zcS+vpw42KhI45/yr3208aHSMCR
l6aN9Z3/uvabkQFk2Jtywhf7ZzNz0uKbtxRQd+ag4/XVC592iSZbA/s17VSM
XXKEtpw3ZwRWt8NsGSU0wjonOjrjjArY5I/770d8WTp1Imqdpx5U1rQEWOB6
Y/etYiqJBMJlNsewvhAujLnL8Z0CKjXxa3rxU+37pKutHJBuZCYhfZ5G7B/l
O2WUqAqH9m4m4/Ma8XN5bSf/6gGVVXId9teB10u93JtQ/3SRyRrbK7VkzGF9
Ags8MLYduXOdRjiSGleOsatC45Zv4UvIHjxn+B5V5+pB40qm4G70fnXciNnZ
TyT4rR3zE8dfwYBxZsUKBYr4hgPX+quO7GZBPh7QOfgtXgbN5/D1fbMiImoQ
f1ZMdweaj1qs0byasj5YFXI04PGYZriCUl3JcOI89zK2H43cnL5R3xp+zn+O
x+N9DH0AsW9VwHvUrMYGzYf59FsB2kU9GOXRZNyL3h896sH0opQEK4pbJ/H7
A6TBbbS/FEiMhxj8fmjjHiWbcU6w+BA0dhHxvf+1+l7FLlWAl2bPj6L5yF6Y
83Dg1YdrT/MYcP+g8vWcdJcWGabV/L/g9QkV+W0hlK2B9EFlLb9qvHCZbnrK
Bqu39D56xNGIr5tHXzqbq4LsQOMRfD9BJNpNO/2DHrQLqWhK4PPX+8E3TOZI
oDWr5Yjt/dk/tuyPyAbIiSy7UX6JRpSzy2w74p1JxO7OerhHdoBQXj00vXF8
lZDXToyqqqERHWb8KS0RG0DxaNJrHqTvz5BLczsCRGBw3XRI8ySNMP968b7I
VnEISeteWL7QTyxcDnnx3V4SvvftkGKXQHrpvMehfpI0vPTJKz2UMkC0MDq9
b74qB5S5xCu84wNEsuXIm5MHlCBGRO3BeqTvX0O+n5y9CoyITjRmonqpq8Q1
8ztYDRIPOIR5Ift7aO+ynDm6B9zb/ow+QXrrZ7YC+fNBDdi6dUhXHr1fyd4t
XR+hCevsQryykL7n5mdo6wrWBt9YR1cdpO/TXeS67W7qwlD/0Ec/pO8PpfGw
VNqjdlorZZof1Ycyp3qmzxQ9yMueL3ZF9isWaTsWuV8frBs1QnF/PCot+q7I
xQDulHkzsaF82vDZvSEzwBCom8ucCfR+QEfiQZdTRmBRy70Jnzfab1npfRRq
DCeCUkXJyH+Dni+awy+YQGTVZuMxfJ+g2k4i+JwpJGmEj+D7qE6Gvxp7Ikng
IO6ijvV9ckPDQO1lMuw3yvsPxx9P5nCfdqwZBJTEfMX6ftdGnoTA2+bg9n7v
YXwfdf1Hgfag+xaw9yDTSazvFX7um2O+awn2LU4KeH9oYXosUazACorNT3Lg
+6g8ccoN8vYU+PM76QnO5zMFP8ejOyigWPlvTc+rfTTo2LTPGnSs5tb0fqJE
zf2FT9ZQM5tvj+s/HPupvGW/DXielXuF698m4/Bjtr028O7A0AjWd81FHE6E
sy2cZ1+4h/VDh5je4pF+WyA9lB/EemCuMCWBfoAKP/o9EnD+jU25+f668jjB
z9Symd+onxDMODwudIodWPWVqxdR/kzgSj0uHioIx88SCQ9KaQQ46tzi1NoB
kx7qocPd/cRT2tnlZ1a74LlA/uCngwOEf47m6qq/LPyx2HLT6f0AsXHKgXfi
kQLsM89+/pILxUvpxqsrTspAJQWVRyA+NcVpeXQeVgXfsC/RoSieHv+s23gu
SB0EykazvyP93j5fdvxkmBZodnFPCfHQiSe/DExzz+tAjkrz3R9Iv69uZpaU
v0eAx3JPG75vaaCcSGR2AhQcNEpaRPz5emjR1qpHD4q5nWtxPmTtFnX4+10f
gtdVrV5FWH81V2HHtCE0fhclf0F8En064twzZwQt0bt396PxDP24xstWjCHC
hrX7AbLfOr8fQWdZTCFe5CUD9ndD+RuVJQakV9KKy/D9TfbhlTsfOcxg9yXX
OKzXX2XA+xvbLCC9LHIE6/UuAZe713ZYwlTIyBZ8P1P7FrW3VMoKuj2tNbFe
T1c4wzKwkQKa/G4Va/1ahZumQTLSN+4H3+B6GiH88fb0LWsoyck6jPHb+q+W
VRk2IGTA0of1+oZbyQalYrYQ98u9B+v1Aa3I8qEMW4j8yOSI/c8U/WpH8nYq
iKaomWL/52kLnFYv6CPcPp/ynMrtJz4lXC5L3MsMAxU7g5PTaISS3KfzJ07y
w9stOYMD6TRi/Y1WpWPOMvCAd2WjXDHqlxYc/feny0OEFf9OfB5rf/aszMvv
SjDUG1S6LEUn6gb//Vr9rgK/L1a/SUX5JPiyD2v5PzUYcdziPYDyzfel7VzE
sjacU6hdHUf63EI7JVJPjABFp/JGfD/P1tPqntwNALuSkJuhOP7dDu5OTtYD
5xx7TlW8/zMb7FGWoQ+j79mk8H12S8PzXgWVxhDUfI7jFO6HvS3EV96ZQElX
0e21/dYXXLsrak2BiW39C3y/cOnkrOvhGhIkOxS74vxv+XkAmhrJ8LJQsxvr
82e6Dn++DViCy/PZBfx+qsycxbFRK7ildnftPGfjdtOzGiEUGAo7fRvHZ+JA
7pjyFAVSw1lO4fh1DOXaExtmDVQIXYf91RP6hl0w0hYyNwYxYX/4WjHwMjJR
4XLLibX7IC+SJLriOecIDQXSUPkcjaA8IXanveQC3jP7z9Wjeqb91744ukwR
wubYFmjCdOLLz7wp6FEGK1bpXQ+RHu9SjOl78FcVHOZdex1RPPUs/3eYSxCg
6BTbEg3xW3Wp7Rsfvx6wvR1izET2+ut5I2K9mD4w1G85iPWVwJFj75iNTKG9
6X0Jvj9pWhquCQQJCl8Wi2E9DoPC506bkkEykOE6tpefKbPHlT0UMKuK5cL8
22UV8s+ihAKVCp934vXWkpX+Xv3PGtJzp09je6SUnt4jpUcFP9Hstfsx4+e4
foU9bicUzV9wnP7ZT2hc3CrSIsIE7/os/9ueTyOYtKd4JE7xQYiXj9wZpFem
fj2b2ZSpBAxCDlmlknRCX6BNZmOqCrBpa6e/QXqq57vmaUqpGvjZfDcoR/gr
Q4HtvxAAJ8or/9eIP69cBG89C0L9CFfioiFar0nsDj/RKH0wTkx/i/UXu46y
1M1sUxC28is2x/sb+48KZmaS4BJPET/WG0kfX0qWHKaA7q+AzTh/vyWZBjoN
UGAd84tkvL74FEsthiAqcER/ScfryxL6bpm4dYpoyyp9ySTWTxTf77jSk7Ye
Fu+FF0ieoxFhFrSazNvK8C/+7cVKpMcprvt3VOWqQvh5Wtw55L8XN5USeibR
/CPjHr9H86N7mA7JLejBCwOGeJzP2Pdk7tkqToKK8w3l+D5LYONVzYpdZNBo
3qSM9ce9dcM3G7IpcMuy/wj2R/DNORtbJ1YIaGfLfnyVRpArhB/83q4KhYOR
krLoe+0Hnr469kwPmAQvBeH+rCU56uHuARJ8mJrchsfr4vXdd2lukVB+svtH
5xcaMV6a3+D6nQfUOdpiL1+gEZpnQqX6N6qAZVZajDHS2/ZMDzMSldVAOnjd
yCyK/7yDx3abKetBFJmsdQqNP+vdv2FIRx+YlWu/KCIcq2Kve8iNBEr++SM4
/vgZ7jYb+pLBXdTwGrb/41QGSmctBcr6koexvRPo1/y9TK3h9/PSmxh7r/N+
78/OCL7Xc0KMn9EIBtlq8vYwFSjs3HJLC/Gh8uvfpvqDelAYL3EC91+11nlj
LxJIEOfYtwfX+96IW4WjXyjg1aXxAI/Xv12MOHGZA9wtOiAN6VueYAuDhouq
wN87wXoe2evHwPatur/1gJW1b0Uc15eqD0IfhchQ/Ul5Tf894NdnniSxgELT
i/d8N1B/2cpSP7WqAmZBrtv+IHs0/7g4HX1fDwR2jYXLofc9Lr6INu0ggaSo
VSuOr9BCp4I7SxRQkL8RhOcjrjxzcqmJG3zM4ssaEX8ERW+8SuNVg9yV9Q0K
aD6Tv14Yz8vpw1vh4KuyeL9+8uujg/vIMBTMsxWP90iYlr9IWMOB9e1r5wXn
lmjsnC9VoC1gKFQDzefNd82D92P0IEnktjL+f6Bkf9W90YUk2OA3+H7N/hvn
Fev+UKB1xXXtfCVa5tK3vfmcsDvw3eV4lJ+SjI8xFn9QBdUUrewQNJ/fgwHF
mzn1QTK+zxnr455u2/1p/5Ehsp9jDM/nW2SUvKSiNTAO7gnF4xluKsgq9WUD
0aPCUjaXaURclsz5XgOUz4rkfXA++0TrunSgXg+C6WQ6Hm/PPYMmnimUvxU/
UrC9qzXchV/95YVg0dCC1VgasfTj9S3jdRxgeKwt5gniZ0DU287mUFXYu6z3
NArvF2bzPK/r04MbsfnqOJ68v0Q4LIyqwCWB4Z3vkD3MMoMTOe/ogeA2o2uY
n4Vn9o1/ek8CX1JJKp4/Ezm61WuOAk/5gtbmrzGW2vHBkBvY+UNeKSH/BEty
UbJWVKFy08NgI/S9wIePaGcl9SGC9ssW309K/SWvziHJCXYTseerkP0mrYeu
lVeqQtDOoK+n0fNe950tcphQv5IVao7PWyTbJ5pkFMmQ43xIAK/Xpcd2Iaaf
FY59G3FxvUIjhvPvCtFVVIHEesXOAL1PzaqR/F2tBxdSmCLxfefoNNreO39I
sNBuqo3f75lhC0w4zAsa37TbCpDea3Q/8fOhwHpYbeoKfoPmX+j9qbg2RRWc
W29l4v7ykKR6TNmEHrRRNcWwvSrfyD8y3koGmsNGUzyeSMIWocovJPAoyF/E
9hnaqHq1k8Eaugz8jmL7sB+33i5vxwOvSugCySiefP3oMb5qXDDJzeWQiNav
orUQmP9NFRjOlv/zRt/z2xUtfF1AH1Ymblfgfk3uZvFUDxX1c2ncQT7o9307
hka7W5H/6h48wPYZfnTf7cwSCfbOVK+dz+f0jH25rLADWDx25ol86ic8nzBn
XlZAemmDay/O38PM984poIZk+z/FtfNtT/LfmHYjLRibOPRWlpdO6FCVrygg
PXG+7FBROK5neS1B7UZmwCFS/hrv15qs83cMbreCoBLxKlzPXdKKKy4rqEDa
7/OibSj/Se/r5HMNpkKiW9na/kzF0vWHlxX0of+/c+twP/w/jyI8eg==
       "], {{{}, {}, 
         {RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwl1nfAjnUbxvHHXsmqZCebjGQVWQlNUlnZo+ydWfZKsl8ZFUqprOxsihCi
obKzR3YyMno/5/v+8XUe3+N33c/z3Nf4XXK36FynU6KEhIRRSRISYn6ZOCHh
nPAU1vJs+ha6b3kr/pf8OKbw+/GY7meeGV35OV7IZ7rwH/kkfg9/mS/hj6IM
H8CPyEbCXP+cl6uhsrV3+Dp9drmlvEnfml+Vn8BU/oy1CfIDckm5n9zZPMAb
mZ/yUj7zi/kgmuu6WXvaHMN7mOetFza78vbmT9brmTN5P/M/1tOar/A25lLr
L5rv875mSV7WHMi7m0d5M/MLbiTMMy/E78R6nkPZSreZv87/lstjGs+M0ro9
PEv8PH6BT0ZSzNdd1FXHBv4GyiAZFli7pK+BjbwNymKQ3/ertazxfa1d1L2P
5Fiou6yriW94W5TDb/pseFN/iU9BCnyluxLnHd/ydrimq4DpugfxuO53nh09
+WU+FSmxSPeX7lls4u1xXfckPtBlwRO6vTwHevErfBru9T1e1S2L+w2pdIv5
Vfk5bOY5HdNa9x3vwG/IFfEhz4ryun08J3rzv3iRuCf4z3w6T8fr8uW8FMrx
QfyYPFJO7Zgl/G/+PKroRsXv1OeSX5e36F+WP5A76m+aldBK91F8f3NinOP4
LvJbchfzIG9sfsb7mxV8dr+cCy14n7j25ti4NuZV64+Y3XkH8xfr9c1Z/K34
/dbTm/V4W3OF9VrmFF46rpU8WD4up3HsUvma/AK28Iesv6Hbyjvxf+TKmMGz
40ndAf5QPAv8b/5hPOtYprsezwq28s6oGM8Sllu7EX8LtvEuqBTXGCus3dTX
xve8K4b6OyqbB63ljufS2jX+UVwvfK37R/cStvNuuKWrgpm6HHGddIf4w3Fu
+HU+I84PVupu6epgB++O27qqmKXLiaq6wzwP3uY3+Exk8LfV130dexoy6Fbx
23EPYCfP7Zg2um28B78jP4WPea7YZ3V/8Lxx3flNXtRnevA9fBbPyBvwlbHf
xHPCh/ATckbrq+U78ivxt1p7l/+gf1huK38fa/KHce/o75rV0Fr3STxD5qS4
lnHfy2/HXm4e4k3MOXyAWc1nj8j50DL28NhzzHHxvJv/WC9mvhn3fuw91huY
H8d5i2k9k9mQtzNXxbVO8v93z1RduXhO5aHySTmT49fId+VXsYvnsd5Ot533
5P/KT2M2zx17re4oz4+B/Bb/BPdhre5fXV3s5r1QHfdjXbyIUM/aj2Jv1MAx
XQEM0t/ms/EA1usSob7+J94HNXFcVxCD9Xf4p8iMDbrEaKD/mffFsHhJoLr+
U/3Dsb+qTvBCGMLv8s/wIDbGewUN9b/wfkjk8zV0n+nyxP6iO8kLYyj/l8+J
7++413Sr49mP/Vb3DU+K1/gentcx7fkO/lacDl6Tz+F54z7RneJFMCxRwv/+
w1DcMT35b/LncS55I74m7lNU4MP4qdiHrX8rJ0OjuPetjZZ/1eeTO8g741rH
Xhn3TJwe+Rn5dfPz2HfjvRx7uJkv3plmf97NPMybxnFx7c3nY4+Uh8d7jo+P
90r8P4eXMHvxTubvvGE8C/yLuL5yY3lt7CvyNLl87HnycPm0nM1xm+TkaMx/
4/2R1DHPxs/R5Y/9VHeaF8UInhhf6oY7Lru5WZ8CTfS/8wF4ETnwnT4lmlrb
yweiFs7oimGkPgnmxvsPW3Sp0Ey3jw9CbZzVFcc7+qSYF+8rbNWlRnPdfj4Y
yfxdz+m+1BWI76/7k5fAKJ4M8+P9gG26NGihO8BHxL5kJo9zr5+rLxh7q+4c
fxTv8uRYEM+F45ro1sV9Es+v7nt+T+wv/CDP75iOsZ/xoTwFf4HP44Vin9Wd
5yUxmqfAo47pzffKC+PZ4U35+riGqMhH8DPxzFnfLqdFK17N2nvyIX0BuZO8
K/YMeUbc9/qU8ovyG+b8uMbmZN7HLMz/iP3Wce+ZKdHH2j7zNeuz5a+sZZGb
yRvi/MjT5YpyJXmkfDaeZ8ftkO+NvZofjvsGqRxTS7dAVySeF90F/hjG8FRY
FM8zdurSxfMTf1dcI9SNax3Pj/mDtfTxXawf4SNRDxd1pTBWnxqL41pgly4D
2uiO8ndQH5d0pTFOnwZL4vxhty4j2uqO8VFI7XfX1i3UPRLvCN1lXgbj+T1Y
qiuIH3WZ4n2hO87fRRqffynOo65oPLu6K7wsJvC0WKbL6rjmuo1xXuN+0f3E
70N7fiJ+h2M6x7Nh7taN1tXhi+Ricc14OT5Rvhd95f3m8tg/zcr4E4XjeqMR
0vEVZpW4PmYH86Q5Botjz0RjeZKZHl/HPhV7p5/dkZ+Sx6IJisZ+FPuU/rQ8
Dk0xJPZBXQas5MXQWT5jjkczTOYZsUouji7yWXMCmuN9ngmr5RLxnGNiZF2L
eGeYa8yq8UyZLVES/wUKT6ro
           "]]}}, {
         {RGBColor[0, 0, 
           NCache[
            Rational[2, 3], 0.6666666666666666]], 
          PointBox[{897, 898, 899, 900, 901, 902, 903, 904, 905, 
           906}]}, {}, {}}}], GraphicsComplexBox[CompressedData["
1:eJwdWnc8lV8YRxGhQmZEyN6ErPcxr3nv5dojTbsyMqOMBkKSrAZaRvpVZpFr
lVUklFlRKmWVUAn9zukvn+/HPe8553m+z/f5nvO+O/YftTvExMDAsHsdAwP+
K35+9ca17U0GJ59yJebmdhCW9RvIn7z/Es9Se+WvXm0jujg12dZ7bIHHeyzd
+5qeEEbnTRuLKAIwrefFZX62mTikvMypyikG1492LkiuNRI2soe+85EkIaaA
5cvEfANR3h8T2qEtA3ydA3cyf9EJXW65e+tPKoBh88aw/Fw64f0n4+otZxXY
8SyKcq2UThxt/ax+z0YNBA590nSfoRPJriw7VwM0QEHC1voJqYE40HbcS9VH
E4hl2v6GrAaiaYOgrb+LNmwQz3uw3NdAqHLFZn05pgMllUn1BEMjsfeHvgI5
QA9sVWJfprM3EoXXngr/TDUAth3XbX5tbiQq0nRGeu0AzDKOLyohfKxWn3rV
2hC6lTvbt3M0Eg2dt+aT3Izg2GD5bzbWRsKXtLve19kYdF+P7Eha30hcKVat
8vczgakXbe0FjI3EhR/1cYHhprC4bVIz728D8ak0NMwn2Azyz/RJ9aw2EE/M
MnLi40lwqTwhWAlhRsrw+/Ox5tBmp+GyB2EGw2rGgkgL0Da7zjuFcCL/T5ve
s5ZwQamysHCtgQh0PdD8M8EK8n+LJuqh54/HaRwkLlmDq1iA5GOEt17MHU4q
tAGrhKgRZrT/21vkItsuk0HgRdZ2QYSbgkVNpe9QQNmxpUwU4WtiBcL69lRw
15xzEEG4PnqZwaeHComRIkL8CO+w2rAi4WQLzecqJDYjXPlC9txQvy0ceppx
iBXhlNY1FTEPO7iZ8+Q1E8IXQ7747R21g7Zki/V/0XqiebdvFnehQWzFtgt/
EC6RZe48NkYDqevje5cRZllgFGzaYw8FdNlmjItUHpy49tkeAlMq/uDfy+4v
Ja8edoAvNK+DqwiPWDwqd5hyABcX2oU1hHtvRCkSIY6wMNVwBs/3q8JWT3ze
EeJtizgY0Hr+PgyuOnPECb4puaphbKViZhq96AQWp3gB4zYPZV//EGfwcwA9
jP+7H/jz719naGCRVsS488JI0KT3HOE4+PWzV1c7IbZac2VVkxVeyv1Y1y3f
SiR21084OG6FO4WHbo+fbyFYfgrPrt8lDPl2dyoD/msiXMru/ZWQE4f7/AfD
H/k0Egwng9S/EVLwVeKH/7xHAxH2g8b92U0O2nKFmF9V04lT62UWpXOUQG0z
07JGDp2Y2lvvI0dThT1sEqfU2+lE9JZwBUcPdQjWk3q9SaiBWNrSZJrttwvi
Lq0bGg1sIDK8O92692rB+0Dqtoc1DURkyvMQOe/dcErvBsEz00CYM3mOXw7U
hcI3PiGzLGg9HXE3xWP0QV2Fc/HypkZi/Z6rvt25BDTl2gWxbWkkMiUf8z58
AXDq5+zUS85GIq85qJCn3xAmVckt/Bsbia1JcwO/h4zgMiv5+C70PKaIXY/8
xo1h/wYBgx9MjQRfd/i22W8mwGV3jZyN4qn3QjB6esEUUqgDnEmIz69+JZwN
XTaDpB1JM26I7+8tq/WTGM1hk/PM1l24HszN5/lXzcGoxaD7KsImZa+lHzFY
wh51px1maPyKtiLrR2YrsHLrrJhHWGbW6uJlDmu4Pl2gH4/4ELXRO//gNhu4
+yHl4BeE37wcLyneToYBr3P7uDCfmyQ9wyUoYBtKmsT8/zud7Tm5lQqqzO16
uD7+I3el2WVQ4VflXKwQwn6pOS1rl2xhoiD+CjvCYlZb364I2MHm9i43XG9b
RBZsGq/YgaxAwQLmT+KTdfpNQjTQm+ZbWEHzZ+RfCHh2hQYmlZmVmO+DaQnf
80TtoZQzMRBjx4yhZ8o37MGOxEjB/Gd6/SC2pMwBKtJITJjvr5cEAy2VHeF0
VQ0/5vtH+U+V98sd4UzYnaF/9ab5PsJexQl4cgwk8Py3jrnHMJY7wS7BJl2M
2dp0BkI0nKEofonAWGcD9X7VI2cI5j++C+MOnYRH097viImD65eKTDqI9zNv
9kUsrgPfxwMtdp9aCbnZ30tlLtyQfj46m1fyCSFprOrkaCQED+9fHbzG20y8
m+k/U7ptB3z6e/QK5b9GQsrePyPBeCccfBoVOVOI9Gli0tjZUhYoS2qS6b10
Yi+7rF3WOUUwuKvvuC6LTsgqyaybfKUC04HcSpoP6USYv/L9+FdqkDtDq/Zc
10A0Vh3Y1TmlAZKxlJwCd5RffonxkxOa8L369a1nRQ2ESGfwe8sxbbhd9CAY
xhuIx0lzdc3zOjDYyjc+uq6RUHnr6fNwQQ8OmJyJskN8tjuh2vKeh4ATv74G
SiC+33Q5HmF6AUBF9YFdGqqHs/SBCOd0Q9Bh23N+O+ofX0ssPzblGQG5r/n2
tg2NRLWnlu7XK8ZQU6jHUY2e71JnP1l21wT6PVvf8aB+4DU+dUKp2hSq3vd1
M6P8vH25snak2gxCvhaKpCA+95lLTjE3k2BMIuCeAsKxVhe+9tHN4cPGHX3H
Eb4e1pqpUG8BknaZkgKI30Yy3HdGWi3h6+yjqU6ErW8OlFq0W0Fh8kD3XvR8
pdYuRrtBawjOPaTSj3BEub6R4JgNDC2aiXGg/Cr6SgfkvyNDrvCHuW24P96W
Zor+SgF5Cf5//eB2TfUrUggVwput1gkjbDb9wvNCmC2kJG915sT858zXmFqy
hUuUpB4WhLuDIolv0XZArTAeYER405WlvvQ/djBMfTuB9frs8ED9UhQNiiMj
NmM+g/uTNxsY7IEqLOqJ+a7Ucjj4V6w9FJ9QWof/zyf8nzct1QFEDfsq8Xjn
Al8uKqcjfO7bP4D5P+qt8v1nhiOEPr9Tjvmus5jrqsvlBHuL5gUwf3uzvAVN
0p0g9MhrLYxjyxtS0rOcwchBYTfGAi1RxjOpPwlRb/KbFP124uN/cb1rdnzg
uy5iVoylhZgsZT1dIb0dfBNZn3vZNhF9fskRV7UlYO13J89dhUZiqCS8311P
GkYUJVeGdqL6ZWoYCz0sD3MXhQ21b9KJklWpnEc3lUGiJaHVKZ9O3L1o1x3Q
owr29uQF7mE6oRCw3fHgl13gkvo8zOJUA1FaE/Ra+I0WMM/M+oS2Ij0kSzFv
nN0NgnX5Q5E/G4j+qG6W0FldqNo39TiarZHoqbgxlsJsANE8GS2RyK8MX1vP
+mYzQI1g9o1KhE/NrZTLbTIEb46XugyI3wY+mZ2qgsZgtZcl2IW5kaCkq2tN
7TSB0E+6BwyRPveP5ZGVNUwhO1EjTw7Fh6ueFFmqbgbz1MP7xRG/nouyb4k2
IEHbd1U/fcTHeWvzdA5Dc7h7aZewGearyd/fbroWoDIcpN6CcLWF+aFZEytw
OTZWKoDys1678fgM1Ro4BvUfFCDcRmbQD99jA6eZP4zifBt9P82l7UGGsqWY
+7xYj4TE7SjeFHjBwiOK+djNIkzP0KDCvUrTwO0IV3/8QPJ4QIWGXvqwAMLn
lfZJB1TZQlrDmUU2hF8nJp3dpGsH8tqZrOsRtms/4p7+2A6iTjEo4fwzzWy5
/X03DVZbbilhPb520GpbAZ0GHlzPjmM+Hm0yYlYi7CGS1zYD4xP7THd6P7UH
ldHS63i9s+ercv8+c4CQoe9WmI/2Np3dJraO4O8vbof5ODt3OcK31xF6xYb+
YEwPl8s+THGCmoZieTx/hJ3tOL3PCbR+nDDAeMFtrG941Bnk5AJUMW5P6TVf
9H5B1FBcnm8+1kGYfAp8UtXPCLvT6T/ajdqIlVX+WGc3LpDb9Xf3QNATQt23
jv2vuSDIJ/zy3mHTTFxP8+48nCkGHAJBtp/7G4lag0lDm6eSoB1ffLOmHfln
94rR9CYZ0Bac/rxrgk50p5XE2jArwtVMcGHLphPtmR49ZtkqsF3/5MjWB3Ri
Pod9PueCGmy3mZ8B5N93su66e6BMA8aCDTmN7RqII0df3HC+rQk2Ibw+PvkN
xNzkU8GRK9oQEzAi+HwY+ZsuLdnXFTrQ+FHeSAzxrX2SbJlwXw8Op/GFxiF/
HZX2Z266xwAqf4to8CP9VVgYluUIBojUykh8j/T3xOPkiagjhnBOIKUnH+mv
vc6vqZ3HjeD3ysPvF5D+ptO0V0qijMEy/ssVEeTHl1VbyBwpJvAuscHYGelv
9Ff72BdZpjDNorZkjfKx3+BRrX+mGYwOqZ26g/j6nDRiaHKdBDYvfqph/YWu
qk8P8s3hXvJoSADCL90MrLwuW8DJqVtBjKgePuafWnEssgTO4tLAaoT3nLxa
LXbbCnI/b1tPQc9nlWSsaK+2BtYU6zPtCLde90972WgDnC+DRDE/vz4uDq6o
J4PIr5Yb2E+kp9y48bKTAj53Xesw38UD5CObD1DhcbN/BdbfystTd4e9bKFl
n5LeJsz3IxOe7z/agq6cUvYGrOfCetqsh+3g1dZDNOy/ezYE5v+asoNvL7OP
YH4y/Yry4vCjgdNmRSvM37yRmqejR+1hrkd8HPNbjFBwK45xgFDqtxSst0Kh
XO/tVhzgcRFHFR4/cNrh/LYER2jsdbiK+ZzbH/rsP0Yn2FGyiQfzdc1Ug/6t
4AehNOkxunK2naim57uV2vNC3YkQ/hKLFuJnT8ZudyURGEpU0yw90URksYs8
3vtAHKz5a86lWjQSAZkLCVJ0KajsmuI7Dg2E9PGkyP8m5CDS5PHMsTI6wRdX
1Bq4XRmuF1QH7bpMJ6yXz15+dkEVHm68NzLbQycu0Oe6Vkt2QRmcaLoXhep5
8/bcxWtakLAa4KrfgM4ThyP18kp3Q4qEfFgIOo+m0fmOJd7ThSIutlBTdJ7z
oWc0OzXpQ334SBI/0s9Rmz69J6MEvPN+9eQjwhzJ7ge/zwJ4byPt80d6WvLL
8OWl30bwRbyMrxXpqcwpjV+l60yg8mu0fA7id6gTW1UatykUS4gweaL4SLXe
j7LaagYPYmibaYgv1JS2ZxHCJNA9w5lrifj11ervJ8sd5kCv9b+sh/nXKrG0
W9gCFK6tiN9H2KWpttp3pxU0/Fk3i/0DH8+Zs0+UrOHn8suBCwgXlKnPzujZ
gGqa8dI8wunjFR7f9MnwQM71Ng+a/+fhG84HTCkQIeqUh/Xz0++htHpJKnyk
i41jrJbnPDVQSIWb7Q8f4PPhypvo0KpbtjDsbda6EeE/X7rLmeXs4EoV439Y
Tx8EqzoUl9nBwbcfUnH+nzonB7nI0WCHqkIK1lOB+NmWqrs0OF+olon5JSlz
4PhBZXuwpJw+ifHXyPMRVpX2sOzGHIH5+KtcPdX+sQMoWxRKY77xigfnk8AR
/A4U7cJ8+8rZxJfa7Aie6m5TGIs4sbCOE05QnnxXGs+fnU32nkv9THhG7su9
x9FBCNsYGX++vgOG27++IyWj86jv7PtHTTth8/4wzf0nGoin/tvviPbJAn/L
2/joFqRvZ4sl3nEpQWCPYX4g8p9Wd0Tv1ErshrKExF9On1H9mBWR76nqwvyA
QF4YyndOX+CZGW19cKpTD2VG+iR/xDtr0JEAVZlDftuRfj00+RRn88IEZPzy
MvrQ+mwH42NSX5mCXidnxhOUf9dDYBw8aAa6tkp3g1B+hy0OZ7aNk0D0PHu1
MsL2PnnUkd/WsGVuXOId2q9c8+alvX9twEhIZwzXfyDv7UPnGCnwPPklMz6v
CIw5qPAwU0HlrVwc1o+jbdVmgyl2ECPssZ/x33k3hlWWnQaXn7/0wvXNUa/B
O36OBoqroW9wPsYs2Gn91x2hfndbK47vCC/9S5uYE9g/d9yO42vWsCx5sVYa
VFogeoazgUhOXiDpL8nDCtte35WrdGK7fp9GHK8KvNF5/DIe+R8hrTO5+xT1
oNstPvwSOh9ql1SuNVkYwKaYfuUnqJ5as/K/O6kCXNE0tA5HeKXibTgbzQy2
nDz9cgnt37yCbH9yLwk6zbi2ayC8bHNhd/dec/ApcfezRXiBwfnpyWgyDAV7
x+P7iROtBVa6SRT4VJwaifdfzbNnxtuECvfb56dwfIi47OEkCxq0CwuOYL5J
koqDk1/QQCBtxA/vv9ZV/PxPsj3yAwXFGO/JIUst73EC2K6pjPffqhLkzeKD
fFo9tXRnYgdxbH9tqP0TBrCaCxcKC2wjJpiLTJRGt8A7WzeuC7lPCJ1oBi/a
cwFIjtWZeufbTKx/pxLwgioGjUL72VS+oPN15W1BtTOSIEORzvd8g+KZIyCr
GCMDFWHSleyz6Pzf84VftlkB7m1ZOy2Gzv8C5r80l8JVQH90fFvLXTpx/95v
7ptH1YBob3ZqnacTzg9EfO+naADNK+fgBpsGwufyTmbTs5rwLk8sUPgy8s8R
R3dJHNeGyF+e7EcHEL/mRt55ZuqA7P715zRQf9x6xKzOJ00PFgValDlRP07L
QkbxngF85zyvsBHxObApOf7ofgCDqFtP2VC+InUPCqV4GILG3aDCd6gfJzNR
5pz8jWAq+mpLF+rH0V0PR5N8jaF3x6f3dqgfWx1eZtQ7bgKlpFjGaDQfy1E2
RrGzprBRPr4nGMX75rFsAb8EM3gbWCBbj/Pfpnn4QAYJ4lfFfuF+LLapfUIs
3RyUPt7TPYSwDzlKKiHZAvbuG9bEfKke0b+VmW0J68/UcZeh+vocEKvHcckK
qvcsj5ii5y/05rGvv20NvgnkgGaEZ/LiKxUf2EBf0Npp3D/bvb6E1peR4ZZ8
/CTWv+KT+46t1FLAK3amBvNpb+vHzr9uVPg9cZwF88kv5Lf93z220JCYcg/X
o7jo2UWPN7ZwgeXIKn6ee9BVja2H7IDnjUIm7sfl9QqnFSbsoPLHdA3Wt4Yz
z3Wy99HAvKA/APOx57P7HNnbHlSZDV5i/t2kTvX3hjoApZkeges1yvOQZf8P
B7hQ5nYDj+/f6rNH8bgjPFhVy8D1av7kQ8Lkb0c4WTC1GfM1eMOF48Gl34kX
OldfHLjTTuS3KonFvtoKwzM1pMCAFmLtw8DF+w+EoYik1aKT1UT8cvvk0XxY
HESXuK8POqP6YatwYz8pBcWp/70dIjcQ5JrZp5YFcqgfOTruQX6wq/mzh/WI
EnDdCXQ6n0snrtwVZzoerAoDd3OkEp7TiSfeg0mWybugZCFXtCu0gcjRPbY8
flILaI3naKfqGogtq+LO7xN3g3XHzpLuuQbCf6xWjjtdF0jLEmtXEX8qjZPV
9fP1wVFhaN0bpK/fHLRpFnUEPHuc5fEb8Y/qxFFv/w5AZ3OWST7qx28bc/rb
vhhBMjfLsVWkz7xrlYPJ88Yw28ak8BT149YM8KEzmsKn1NTSKNy/LA/9ubze
DPhKNu07jPiS0XxLNpydBJlThrV2iE9ez1y5/bjMoUtza5Y25t8GzYViDgsQ
9vF8dxthudUQzyJeK6B+Zti7gsbnM/hy3hexhujyUfFklI9Uty4zWQUbePKN
1XgW4eqhzgRrJTL0OPmd48bnE/4Jt8MaFMj+KkfC/Tf4h/bPXmEqWHQ94sJ8
C1zg1ufNo0L9Jk8h7A8rqpKFh6/awqD5IxV835SWF2Qet8MObpeOrMP3TWNt
GbaVN+2gYO/BRpz/25tITqniNAh076bjfvxqC+TALRoQ6u43/p1n3EKqT0rb
w06NxPB//u+MxvX6O/bwJcnyAOZjzJN5lpOVDnCfgZcX8y2Mo3VDh5Yj3DZ+
K4X5Nnml7+O1WkeYfFTyHuMTQqzv5ws+EFkzwxElsh3EiavsH809d0D7PE36
z2Xkp96W1V6L3wnty0VazecbiOmihJ91abJwKSAnqroTnZc7JmtruxXhzmWK
Eyfqv5U6Ha1MTLuBsWzqmdNEA/HO24p5N7cuCMd8Z/sP6cmEs8/PXj59OMyp
UXAPn2/Dnpd57CJgLJyLAd/fsMaK7Iqhm4BBIZPWDxSPUXettTdPTYG2WzVs
AuXryuXthYFtZqAd8sfyBMqnY0d7w6eXJNBhujShiLAhv0YJ3xdr6GmqaxxC
+7OtlRKun7OBC0+1E/H9B7nhk8+lb2SQC4uKw/7cvMJX1XaZAnmL87n/7tOF
BYwnTtlBksmXy7j/KnzaPeu+jgbd4t43cT13Wp354p9Ag9xwi0Uc/7eDIuKf
8hxBNXPsMY5nusajlfDj0pDA1QjnBRuIB60umUMP5IGqtnHfaAHyK3WfGN5+
VoYpXZfarkI68dNZjjrFqQdRUrxDHKjfnlIqO1okbQChiUYjhaheeoR6o/PE
AEjxT/yyET6jffGXi7EZMCb2/2ZH8Uj+olAeQyFBzZkvVpjvYV3TB2eo5hDj
HpBihfC230emRgLIyH/aFvBhfQscJ5tGUKDE2dsW79eIs94hRo8Kz3uOqGA+
i2nZN9Yb0mDn2O11mH/jr36b8bbRIDw0IBjvd2uaWic3yR5CBDmvYpwFS//9
SB0gqHH0s/EeHYSeGDl9gVkWcnbfd9g0Qif4bXy/BJkrQuFZeRlHxI/oA05D
V3v1oNBUtXcG9SuvM1lD3vMGsKZkeEEU5V+MdcT98C0zUFXrULyM1k9tP8m3
s5wEauzdwrifcPD4HC3pJkOIcTMV339F5H7svT1MAU5x2396b+IrmxEXTANm
pq0KuB4YCElFbll5yBo+6Li1mE7sJbyVL+1ThumJ52sSyP8I775sG/xBH9Yp
cj6yQvFtNz0iRawRMP7sQ3c3wpscvxyOUiTBeg+NOGM0/5HnN+rkVc2BS8RR
1BBhgSf7HVwcKXDzgNJ7HD9XhuNSxQpUqIo0uIOx248rc3LVNDh5f8NZHK/O
BTuw0LKHi+xhiRhfU360J4FfDhLlDFPfPKYTumY+KesclGCddMINWXSetyZH
8rK66cNjnxPy9khPBbyYYmkRBAx3qQ/yongJKO//GPLFDLIf5+l6ofXs6eTy
Lf5OgsCKDBE1hDP8D+2P46bAwlHLGNz/Uj4tta1yUKF1B/N+HC+K0gdwzKQB
NWS6Da9nP/n8nwIdBchm8RHNROe1aYn61FF/AzCEjm9jKB4sMYFLsUEkSH/u
MaiCnl8gvNdcNY8C6Uufs/HzvB46Xvs7QIM0DtZD+HlNEf/dlPG5Rzx52BGr
eaGDSBHz7JbQY4CZdQw04bNtxGDSrFTulS0w7qmQWnj3CUFnlri4mioAY4r8
T05ENBMaZ3n1GZTFYJAk25X5A/X32dOnb3pJwj3pHFuWSRQ/TSvKH1cZcKLa
Ru7+gfL7PelDVoECuF28196L/FdjoelXGx8VEDNT/iGHzqNb6gJvlOxRA12n
PMHN3+jEd2buttfRGvDjY/JDL0vUPx707KoL14RNPdzM33IQ38DEmOSnDeE0
j/aaVw2EEYNS3c1TOiBOu29eh/Zbq9Ic4hajB9pn61l6kJ/KEbp4ofKaAVhH
9w0zovxwF79XKnQFyBGdLBBG8VtaplZtdTCErp6/Vn/R7296LX8LPGAEllv6
eqdQ/wze+Pv5773G0Laa9uEw0suFjVkjfcEmsFVhzDgN+S/rBwcMzU+awmjA
a9szKL5Pz58hfYkyg29qVdGtKB8sZyeYQpJJcOCQ4TWsh+lKLw84J5rDWZeQ
hn0IV5IEMrniLcCzreX6N4TzI/MiK85bQvhQ9OhtpCdlH4L+xqVYgXl/lJYh
er5f6eeawqvWwLx9G7kB1xN/WptbiQ10cnwox/fHNXVJ4UY3yWC7xec09l8a
kY2jXBUUMDhqX4H5cPJHc8h2ZyoUxpcpYf6ZecYWc7nZgtWmxC/Yf/mHOzdu
G7KF01Emqvh95MK2bjWhfXbwtMqgCvuv6wLsEWZjdrC99tEb3M+2kxdvunvQ
4L7sjRO4vqcOK69nPWAPe3hyOzDfvIY6uSaDHOCXdvYRrNel9ufXMuccYM5x
fx4er+BDuKrf+0Yk3rbgz3zcTmRahjFNXdoK+0LeDvOcaCHiDy83uoYIQ5ZM
UChxvYmQWf9M6YeVOHTGPJaq3ovq2SSjLcZTCtWwbDHZEdWLw45pgRNycDK9
q25DJZ0o/nBWtvaRElhNR0cPIv6ZbAis6t2vCnc3PCx3Qv3S4/Hzz4FRu4Ap
2eO2Y0gDcclWVN45UAteRmRdLnjUQDx58vMQS8RucCo80hkyi86b3zlYnGJ1
gRyRoE9C/HBlYZlWTtMH5qU71HqkB8tDfm/PlRJAu5vxj2/z+gd9zwwA1Afw
Nj1E/fW3pMnrsXEjUGV8uV+QpZHg0F1sX/5iDOvS5rhHkb86ojJq6PjbBKrX
VkcTUbyXUhp0n6yYwruPpezHER8q32Q6LzGRQL2CX9UJ8UXyHGtxJJs5NL4u
eKKJ+SVNhIyttwDisRn1OsI8l3vUWzmtQKgvN/UnGn8w3LVnJ681WM+ba2K+
rlcX+tEqYQPuvTpDU1gPHV5nRUmRYf2iyy/8Pu9pwCmPeXkKrOhpCmL91A70
ufNGgAquxUvSmE/nd3z7qJ5Fhf8OTNtgf5VWyBU4nWsL3fdDvLC/Gpg34iFE
7ECk7IIy9lcRwS2U2gI7+HTacvjffYPvTsui7TSoZhIZwv1NY9CHiaWQBtPp
VXcwf3Q5NtSEFdnDIQl+l3/vO2x6jTPvO0CPazU75s9txm91SeqOkFPnKIr7
/feRg/nHSscJ14jUW35aHcR/pt+qIvV3wGufgk1ctxqJOMEUKa4DO+Gl7nY5
OtITBrNqkeQAWQgQ+Ml+vhudF78mnpG5qwjxN2QWVy7RCR+ma/1S37WhXiyc
+cX7BqI74upYDJMufF++nWyG9CB528S9p8z6sBiTsRyH8mu+vKZVIEmANAe9
Afun+yKPNvFWm8DR+01+65Be7Mi/YMBCNwV6TcqPBZSP+mrOnjm6GdTdleM8
jfK1NSnMYakDndfZeTSxXjycjXWoHLMGdW+Dtddofwc11ZSnPtuA92Gj1/j9
k8HWs35Ck2SQGHfXwf6pv6w912ueAlMzb27g/Gi2mRt+jbUDrTL3R9g/iRgK
jIf9tYMDk6ZPcD3K8NyjqZ6kQXP4ViYcX42jOT5f3aRBPYhDP18U8f9gSm3R
eXnYr6NzPuo6negePfPcqlUZoutD7iQj//TJN1peZU0XvHW46p+yNRJy36Vl
8vgMYEGtNTkN6esrd/9mXQGAPK19XrcRfh41ox2vawabnMqY+dH+76wXHl8x
I0ECw/HHOmi/Gql5yyvm5tAzRbSaI6wUGrXGdogM9s8k5bBfsnoaR+08iva3
NWk33h9r8jRbojYV5sLmqZifXBlqFQP6NPjuPCCA+RTTck/2Z0EfIU7aHszr
20FQ6bHVzR9k4H62zK2Ud8j/HWareielCJ+1OaJvID8kLtV3Ib1JD57t9rv6
EPmhwI0dB0vHDSDmk+LiNpRPQ4nOc9NXzIC7sET5BlrfpkTFMo1SEmiIeXFj
P/THmzVIqZUMqwrMK7ge1l800X3cS4EIV6jF672hYrdidoQGku0UXRzvrW8c
aWMs8qDHz9ilXor8xt4Nf5hAGWYb499KXKETzX/4Nh7q1YfjfUq+aih+vR0F
D+JmCKikMFcMI6wcNHjltyTqL+vipvH7I4UUW1tdWXO4GjDZZYAwq+A6p7c2
yF/qFDX885MxpcPlMlSwa37VinFt7VOXbw9o8NZlTyqut/KuqVO2i7Jwp1v0
u2AjneDzZnUOUleCw2rM15tRfOa3LHYtW+hDkNiWB4pI78S/arBneRPo/Ol5
TQjFZ7el7dYfY2ZwtNvnhT+aXzi5Ya3mCwmevQscwP4krpH5IMtGCthfkzDG
/cfugFQ0KxsVyFTP4H/fByyy39mWTgMw9u3F6wmbbtpxVEAB+I5+O/8IxSPj
k7bZC1cDmDjaSfSh/UvneO5k8CUBuahmD/ZX54MYLKsvUIBqMZuEn1dyz8K6
7oMC7HcT00hE/u0Ut9Jx5UbkB0RDzLnQepM3JA3Q8kiwt87yJM6f8Bkmjs/N
FAC77H/5mi8kZbxdUQJjyNvhkof4/pK5neU5AWZHXP7OofmDiqqXf/KQQHjw
21kyGv+p2dh1Uo8Cgu2qwTi+YRb8SsdLaOBz4cxlvJ/uYvM562+K4HdLiV0D
xVNjPnfHNjMCAkwstHag9eSwbZMbGCKBzUG5Wvw901v30xMijFToY/JM+3ce
kpE+wt4vDwu07woe+XTirb9KTaW2AbzR/1lbgdbj262fsOZEggr+Y/y4Hxze
ZmjTGEsBBuFaLzxeT6FDZL2fIiiVcE+LofndmQ6Sd64jIFV4iVMczZ/B2hvL
W0uC/TPetjge0/ln/C68p0DD80vleLzs0WZa/x4KeE78YsR4Rf7Y6UO1NLhy
WSEO72/vzvbGS2FKwCxqvPsWivem9y8WtiQR8HNkRHgLen7BxoN9Ob9JIO1d
clYdPb/Vt43nxxYqqG/bScXPI993f9XrrgCjNizZ51C8zfYZvvoSbQDrBJrM
Z9D+Pu6La2OMIsF7i+UkfL97v63BrOw6BbSt4/7pXQ2rrOhhn3yiOekA54lL
HYTq3/2LfN/+Eu9tuO/uy2gjeq24c7qjt0DHRgun6ponRKxlZUnvESRQm/cI
vz3ZTFiPnL0lsF0MmIc3HR34hfr5udC6N46SYPLucvaRmQai+PTB/e8tZGDL
WIXr+CLSQ0bXjq7zCuCS7de5K5dOZJKnWyL3qkCnnprCgTvI70KZv4KjGnzq
nROomqUTBiocS1+OaYDsYM1DXguk53pS5KWjmpCo1rV7MBvx54aS5dA+bUi+
E/9zqL+BqGUdkGmLRv5Wzf95DNofJzdDT/8xPfiWwfzffeRXr7grDDhkGcCx
gHV6qyg++y9vYq51BHhSrz+6E+Eq1zamIaoh/H5I27IZ6Vm5QE9QjKcRTHYd
+LCM/MusjODTB+7G0B/Hcfw46mftQwfa84+YwIZCxhPZqF8d6U3f537cFET5
R7XS8fc0Imtvi8PMILTopdkzFP+PXnVdUWdIMNSdzoT52k53kDh2yhwSuc6x
7UXY1eRz52CMBdjYWI3MIJzZ3v6h+ZwlvGO6TdxE+r8p/+uYXqIVpF2XHjdA
z5fi25QWmGsNNJ2K2nqEN77ieRl8ywZurDwkYX+r9Mnl1/oCMpwXC7fD/nZT
smq7oiMV+JkDjLCeaLwy7hVysYXl79ks+Pu6dImmW8uvbUG9zt0K+1kI+qQq
4mkHQjt/PMV+VsgsKoj21g7clb58w36i6wGbK+GGz0udZ7E+J+ZkdVxU/Ua8
EXMOZ3vaTqRx5IWIhW2FS3e7TyyeaSFMys8NKNsLA9+MMoNtcRMBzvrZ7Lri
oBnwfHPFQaRn43Gr1RQpIFczXRdybSACbur8/RsgB56yL4d9q5C+Ljht/l6s
BK9UrlicwvfTlXzn11xVYa95zX8mHXSi9FMr36ngXUC2/SAjFIziN3rM+KKP
Fqwqci6UPUTnLZn3ATlHd0Pq02GdJ4ifL39XhURG6EL/xc+C+Huau5+NzUtO
64NRDXmwDOn1323rJRWvE0if2VqYUT0aq6YT+X0AYUHje58i/8IyIOg088YI
uFknfaWRPz3rwttU/tEY6OcZCj4jf2r0t0RJfNEEbO994ExH8RP8b9pt8Bc6
/3g2M8ajfJr4c3yrWjODPWfOnXFB+V7n/y44jtkcdo4lTOLvz9prWtRWGCyg
sTKXswD3p69rV1+xWQHj6JUdi2h8q1rfg7Et1pB4PVz3FL7fvQYdl0RtgPYc
Cr7i+1oe94IL4mQwGve7i/2pXrb920ppCrCOb2fEentFKZb5Ax/iAy1VDevB
9od7dIwzqZCQddIb9+No/le5i9m2oFwSGIf96cq1O79EttlB4+I1U+xPn7SN
kOuv2cFhJ+/P2J9uyc40rhSmwdFjpz5hP3FHj+fErntjhKEQ9zYhgw6iNXf/
9gyFHVDry6J7pwT5r+rj7pa0nbDRWd+DchXx99ILlSA3WXAqORuT3IP657Jz
gOcVRRD1VTdbRf7SyCtx5OGkNsjuuxvKivylaZwZuWBZB/okff9woXp8s7KD
g1jVg1vF+mF+KD82ejkxhsIEtL4+UYv95anpM3/GHphAa7vAVXZUryaN9D1C
taaw9O6QwyqKJ9nktPe9WjMobz93LhG/7/GxEVt7SoLXdTUzWN9DXIvkE0at
YfUQPecV2t+RhRptpgkbyP749Dj2l9UGTlOjH8iQpZ7Ci/1lnuwvm6BZCoTb
qBbj+MYL74OZE3bAUGfYjv1l1pGzwwmrdnDsVVQ/9peDYS2sW2NoEKtZwYrr
6QxH4jUJa2koO/Vat0Yc9cOKW11pJ+Qhxm/bUYcbdEJvxrE8vkoZbs7cUZxD
/c0jeGeu3ZIuKD3siixE/jKm99Apnk0GwCu63/EU0rfBVa1DHFsBgu4KXL2L
8OxlIZcsLTP4ZfS+RBjtXy/jYsRjIxL4qxey4/fBPIeDnq43NYc3hncOkxDW
Vmdg3bGPDJm7mmbw9zLNc7YvU/wp0P6sUAHvz998/cFUTSr0ZDbvxfxKbigs
m9ClQWpVqQTmw7dTHJ8jSl8SktYqzLePdBCunHkdJb0yYKh39O3IOJ3Ye2Io
j49PER7U7bXrQ/02dAPXLNsjPbgtL25+FelxqPX+UqshA9DyzX8kiPLZe99Q
oizHDLYVnqUUofXNeK8P17tNAqqlsQjOV3DG4PdvTWSIeO/Qg/lsl+n1QDaA
BtcE5YxxfLcrBHq1LcqBlUicKBX1n+LAgbHdyspw4ouQf+llOsH7xt7rbYc+
CDwckMf9YYBd56f4RwIK1M864vukxjWKxiMxEvAPp9Zi/80eICNsvNMcrB42
3sffK8Ua9w0UWFDg52aXuzgeCbrNGg+lqDDMvLMf48fCzDnaE7Iwz7vNv7UJ
+a3wQf1icSWwr/n4Owvt33ReTe6YoT5U3Kh4Joj0SEqhm6rlSUD50tINYbT/
zoH2O+WjZpCq9qfyCPbTvlkdDR9JMKkgZIT946+vrybamSlwuGlMEut91Q6D
15wbqPA2/Oe/95WxuiMajhsUgJt8kuR0lU58bAu7bm5nAF4enBPP0P4e7hx4
3HCQBCWf1bWw/2C50tMZkUoB9gz2eDyer1FQbb5XASyFMqReIv+SZN/W2FNj
ANzi78c40fp8P3ted8sigeaqYDXOx95y/gjeaSVIn1L7+B31/ymefM7iFgI+
Z1E7F9B8TLuUMmo2kyBaJy+Hiu8DZ3hGSrUp8JjM7oHjpfdI4FXCO0Xw8BCb
FUHx2a2h7v1Yn4DC07F62I+Ff/m+8PYVCVYbkixxf43X1IkxW6PAnzSPTLze
4nCIm2+WB590+28C6DymanOER0nFANL6X/8qRfMvu1UJ0WkkKJrQldNC4ydM
ubrjoynQfGifOx5fqpe7TtdFEXg8DNK00fz7TFYvti4bwPkUxR9iaP6gyWIr
kWoSZGiNq+L9FuRm9Ge5UsDvmN88Xn/3rpzbzw8pgRXP0fcHUbx4JH11ymMJ
cCh5I8CDxp/8qnOtYJEE4VPy3dify8q8O/xrExUWrE1d8PzOf0MnH1kpgL+7
gRkH4meu0UnVA8cMIJv1LOkzWn/Y3K89TaEkYBrQl8P5l5k/33bkGgXytRiu
/fPnY49WPR+g8cvX9oWh/nlx8LcVT5EB1Au2yrGg+aWLOLX900hgGBplis/T
fMMPC77XK4Ln22l7JrRf44eH5tcUCPBudY/DerqrJD95tosEnqKHEvHvN6nk
fnRbosBlke35eL5THrtfFGspwsfbG9sj0Xj/dmVRtq8GUK4T81kEjVcudhxX
+I8E+e6kf+fBYkftYB0TJciuK0r6gX4vUnz56cJRAloWDFwF0O+zNk6mwmES
iDsfz1TF99cklY4flyiw4KR14Z9fz4/0OrWgAMICR/JNUXxP9mTuSms3gI7u
xQNb0fg70uUc1tdIkHTjCu0fH3Mi2PgYlaBj0aKAguZTuc8wGkkmgJmN/Tu+
z+/e9lurK0oRpmbC1Tej/zs1drKeYidAspj8HvOtXOZPFSedBGbaFsfx8+z7
2VSMTpAg72fQT8w/7atzT7/cpsBEasA//b85ODd8TkkcbOJ2Tpd5o/pauVh0
TskIVlXVrj5kbSS+rr9+SgkZUhMLuX/vt/TtVVOVUD/6ON/8E/cj98vlD88p
qcFlpuuD6ZPovHunO/ilqRWw5WxSEES/J60LcD72EunNhiP/zmMyLn1cHsfs
oXmK/+u/+8W76/PPKdnBat3WePw9jZflTMJLU10QuBA4OsvcSPwPQhvsZA==

       "], {{{}, {}, 
         {RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwl1nfcTvUfx/Hb3jLLSiQiOzsjZTREhQbKHmVnb7IzMopUVKJ+v+zMsjdl
7z2yN2lPPT8Pf7x83q/39xz3fZ3rnO+58zbvVLdjooSEhApJEhJi9k6ckLBN
KIXl/DR/DF/x5nyNnB3DeLo4TvcJ/1lujPN8PFQJffyzXVcaK3gLlIYfldDX
2g59GazkLVEGn+p/0TXBBT4BSdFPv1NXFqt4K5TFZ/pfdU1xkU9EMvTX79KV
w2reGmt1OTBclz7WdCX8MtN1v/FmuKR7D8kxQL9bVx5reBus0+XECN09sab7
nP8e1weX+fvYpyuKj3T5kEI3kO+RK2At/4FXxCz+Bl8v58JIngE/yrWxKs6x
PkP+Q26BK/wyr45FfBLfLxfDxzylz9VGfkj+w3wZm+Us+u5ySscPMvfqsuke
M//hDVGAr7N+Rq6EB/hs62nNdryw+ab1DfL9cT34O9aTmi14ITMjvy3XwYN8
dXwm8624n5w70/xT1zLR3RuiMb8qXjFrYLF+Mj8gF8dUnh+pdG/zfXJFrOdt
URFf6P/StcI1/kHcb/7v1OZga/v1lbCBt0MlpMEQawf0lbGRt0dlfKn/W9ca
1/kUpMVQ/UFdFWziHVAF/9P/o2uDG/xDpMMw/SHd49jMO2KjLjdG6TLFmu7/
/N+4F3CTf4T0GK4/rKuKLbwTNsX3gtG6zInuPr9V9V/p7vA3cYt/jIO6Epim
KxD3rW4EPyI/ga38LK+MObwz3yznwZi4Z/CT/DzWxDnWZyW++5C3jftUvCrX
xBI+lR+SS+KT+M78bm/ID8t/mq9gi5xV30PO4PiR5lFddt2T5r+8UZzDv7N+
Tq4SvxOfG3uP2Z4XiXvK+hY5bzw/fKz1ZGZL/oiZlf8sv4B8fC3PaHbhTzp3
tpkI7fSJ9E3k2/pr5lNYqp/GD8uP4lNeMP4P3Tv8mFwN3/MuqIY5+sRoH9cu
9khkwijdcV11bONdUR0l/dzM5mjrJ6zVwHbeDTUwV58EHeKzxD6JLBijO6mr
iR28O2pinj4pYnP/JfZJZMVY3SndU9jJe2BrPKN4V3dvrOnm82ToxH/l03Ev
3tWd1j2NXbwnvovrinG6+2JNt4AnR2f+W+yROMJL4TNdoThWN47/ID+D3fw8
fxzzeC9eynX5PvYxjI+9Kj6P/CLWxXmO+VpOgbd4Ysc3jf1Yf918Gsv0M/hR
uTSm89Sxh8X9If9lvho/Q7c1roHZM/ZSM5vzxstn9Dn4s+Yd/hoK8j3WL8hV
4/7j8+PdYnbgRc3e1rfJ+WOv5BOsJzdb8exxbc26WB/7gL6r/KxzFsYejS6x
f/Mb8jP4hs/kx+Qy+JwXjudGN4GflWthL++DWlikT4Wu8fzFPokcmKg7p3sO
+3hfPIec8Q60dl5fG/t5P9TGYn1qdIvrFnskyvi9c8V7T39BXwcHeH/UwRJ9
GnTX/x37JO7HJN1F3fM4yAdgu64AJsb1jjXdUp4WPeIdFfskcmOy7pLuBRzi
A7Ej9gy8p8sZa7plPB16xr4SeySO87KYoSuCB+J9wS/LL+Iwv8ifwAI+iO+M
7xzv81xxX8v1sCHOsf6NnB69eBLXpJl8R38zvlN8G3uvvpM8S3/CLIeZ+jT6
tnHPxDUyG8Q9E3tfPCdmL17czOO8K7q6eF13hJeNPVP+WtfRfFu3yyyE3NYm
6VOYreMelH8362NjvDv03eIedM635j3orY8/Bm/JtbBcnq06KZfHF7wY8uqm
8KtyPRzlg1EPy/UZ0Cf2VMzRPYh8+FB/TVcfx/gQ1McKfUb0jecYc3UPxXtQ
d52/hON8KF7CSn0m9IvrjfI+yzx9/njv6W/oXsYJPgy743nHZF3uWNOt4pnR
nyfFfF0BTNXd5K/gJB+OPbrC+CDul1jTreZZMCDeOVigO8Ur4EteHA/rpvFb
8qs4xS/xaljIR/C9chFM4Xnis8qb4vjYt+WBcvPYU+N5NVeYneM7j+dJLhHv
HxTkI9EAg+J7x0osjOfGLBl7r/yj2QCn5XLx95vZMPb4uH/0KbGIP4LCuM0b
4gd5FBrhPscO1qXCYl4EP8mNcEYejdeQzXFDYs/FEl40evmsOSbuh7iX4n6W
H/W7DI3nAUt5MbwunzPHxj0kNzbTmsvi+LjG8V5Ck3gGUQJNURLj0Czu7TgW
/wEoRIqi
           "]]}}, {
         {RGBColor[
           NCache[
            Rational[2, 3], 0.6666666666666666], 0, 0], 
          PointBox[{816, 817, 818, 819, 820, 821, 822, 823, 824, 
           825}]}, {}, {}}}], GraphicsComplexBox[CompressedData["
1:eJwdW3k8lF0UtiVKZRephArJvmXpPcY+Y5lh7EtE2SNLIVQoREg+lb20SpFs
KbIUEobJVtJmSVKpUFny3dtffs/vnXvfc899zjnPue+1bX+Q9QE2FhaWDHYW
FvxXMn25uGBL096prI+mOZeeEeT61ZYT3ivEgKMnZ9qNHqJrnQY3hysvHKxZ
r5ucxCRI6UaNN6w2Qoe1w5vlV0zigOLCOuV1EjC3OJIjGsEkLGQPfBc2kYYT
idUWnk29REVfTPgzLRkQrF27HCXYS+jwy5VxHJcHY6Wn29KO9RDei5n51xyU
YPmt4WUdwR4iqPWjapmFCiQSbXLHahjEGSfO7csBanA9/EyKShyD8Gw7dlDZ
RwPyf5XXqsYwiKbVojR/Ry0o1fvV7p/BIJT5TmR/CtOGYKH9dbHlDML9p568
ZYAu2H38w3jTzSAuFzwV/3V2LzwQEHb884lB3E/THmZaA+yLV/N3XGIQYXV6
1HxzfYg0k+VSYO8hHndc+5HsTAJKXdH9+FU9hK/JnnpfBwMwdvGkVCOcd1O5
yt/PEIoyWZ7UcfQQ537Wnww+agTv58R1LND4iZLwIz4hxhDF5aL1l7WHeGKc
eTEuzgQ0Ix+cfsnSQ7BavfqQfsIUvsuVuW5BmEW/mrUo0gy8Dx98cHCFQSSJ
/LJgJpLhzx67vFUIBzt5Nv+Kp0B+yskHLAi/P6nmRfxnDp1HBgoVEBY8f+lV
8mULOMtr+vYQwtd55SLbci3hat/y2lsIN4VsNdp52wraPx9IHUa4QKJIXI9O
hbcxK9cWEa6PXmDx6aHCZPGV75zInm2U1UtS9jQI5LResxbhSoZsyss+Gph8
u66McWrrXyUJV2uwP1wqw43w+dBPfu6vrYHCwwzD46OFtmyQdLQB7Z0uH9gR
viW7qiPsnQ0oJ+dcZUWYc5ZVtMmNDi+dzmiwIHxD6V5swUc6LMhp3fmL7JHd
X2K5HGgLOqMr7BgPmz2osP1sC56x3zkxZhZH7SZC7UBzgtUb49/3abqSP+wg
7pXYe4xXakOqTh+yh701YfQVhClKxkbRc/ZwiSisxbjNVdHXP9QBPq6xWMD4
bnnwr5UVBxhs4+fD9nScGz486f2NuF458VeYq5uQWK7JW9bgApfCZOdrQ71E
Unf9mK2dIPBqVIXwM5kE5y/xrxzq4tCaeml/Qw2TcCwtW5GSk4SHNwvM6ySY
BMvxw6ozxA6I9j+dFO/TSxz5acP/0VkOMizi/qM39xAJHDJzOy8qQJ2+RSML
qYf47F7vI2ejDOOk7ZOyHxlENO9ReTtXVVC53HBf4z8GMc/bZHTBTx1MHUwM
Uo8xiEzvDudud02QPFdl1J7AICJTO0PlvPdApOUFSm8hgzBl2/c+N1gHVFIO
M/gbGQTLs5NXJWP0QG5Ek89nhEFwuOX7dl8iYC5oM1N9lkFkST8SqmUA9Hf7
uvIj/uY0H74s0KcP75+GPy9DfBdM/jb45yUJ1FSXy56jeGCLUH/g994A2jL7
qqwRFu4+uunrjCEcHnqvxI1+r8sQjZ6eNQKivSKgiK2H6P8dnxi+YAynEprj
3dH8H8jVesmspjBdfSjwMI4HU9MfIsumMDs3H9yI9sewdGDnAxYydBLtvjsR
XtLazTW+igJfw/bSFv8yCJmvlPO5POZweJ2hiwB6HrXGu9BrkwX4PCL+WCA8
0vv+1s0tlqD+dHQmFeHKJul9R6WsYGBrAeUJ5sv0hX2TglRIrFEI+IL5YNmV
Zp1JhVHXoG2Yv99GT/x9KkCDMZGYAsx3v7MXW/7+RwOh2aZQHA8SFME3Sxut
wTVrxmUNwrybZy0a86xBgqoxuBrhpCfsek1iNpDdNLV1FcKZhecCnufZQE/v
t1I2hIfS4r/nbKXDc436Icw/u8yXzxWL6SDx7IgX5qfPszsTXXK2IDswo4v5
zTZw78StUluwzRyfX0Z4YF40mKxoBydfhSri5+O7JirLK+zg88TgFYyjNT5E
0JXsQVCpTRzPdy3MJYa1wh4On9p3BmPuNu3BUDUHkCsYf42x9mpqedUDB8gg
JLmxPc+04x9Me78lEr4q0tvnnxMfvox4RMyxQ37o8we81r2E3Nc/86WO/KAu
DbO11UxC2kDZ3o4kBuz7WVnau5jE2y99p0s2bYMDNQc3r7VkEjvo/pnxBtth
Q6KA04WsXkJwbNLAgSwLBd8UngtN9RDua2Wts1N2w68ri2Zmrj2ErIIM+2S/
EvgbRiw0IP4c8Vcsj+tXAZm3LelwlUE0Vnmqd3xWg2sPOJ6Xo/oQJSL1/viY
BvBV/qC6n2AQmztCPpDfaUGs0m33kQsM4lHyt4fNP7ShwyVg0K6WQSi92edT
O6sLrU5jLq4DDMI6VrnlgwABZnN2Ec7fGMRVx2MRRucAeqCfFIb8k9gwGOGQ
oQ9hp8qHORG/p26Rx5tySPDx4dzqKsT/6n2aOlN5BjB5drwsFWHHh/TJ0juG
MDLbYOyFfn/w/edYhWojaIi58nUOredN79LfQ9XGsPNleHUpiocXptKfVzWb
gP5tRcYV5P8TlHNTLxpMwXSAyrmA3n/lSGuWfL0ZEBXVyySESTL8t4dbyaB3
L0TzL4oH86uDJWbtFPCLKLnLhZ4rtHaxWg+Zw8r+mRk9hCMq9Eii7yzg6SkQ
iEV4t+/OgMK3ljCT1y1dg7D79Z1s0VNWUHOU8WMM15Oa6n6TUCps+H2p9B8/
y+tXhH9QYTG4LYwLYeNpxr5zR2hQqsPlgOPBb12h2ud5GiS0BQ3geOg+HEnM
RFuDV/CrePz79XnzLzIWreHUiFY7jofEV4P181E2sCHuIgnHG7g8GVnNQofL
ubF7cL1QaAkM+X2CDkFs295gfnLFlKlocNuCVfHZQMxvYfG73jZnbeGdhNEf
HA8ORb581HV2MKHxciN+/tpb6fuvTDvYOWCZgLH23CUnHT57UNAzXflXT7K9
RQ0z7GH0uEcwnr/kGKz/LegA0hwXnmN8ouJxaka2A7z6Ws2O17+xJcrgy9lf
RGi5KCHNYBCuPJmDcRE8UM+1mDS+l0mM3z3J/GstDBUX9BeoI0xisoTr1P2d
W6Bw7U6pmzlMYojt8bvwwF3whrwcFZyP6uPyjosPriqCl+OGR6WyPcSd89bd
AT3K8EjkDDvRxSDiqxpuyo6rgvpOeaHlZAYhH7DFzuuTOoz+nj0ShfJ/Sc3h
AfERTZhcKGWqnGEQPfeL36Wu2gufVX5pzI4yiFcFHFwjGwBUIh0Kk38ziIRv
SxVy6/XhrOGN35qIf6Wtazu6RUhgz+1tsBvxda9PVoeyqAGcGIvmwvndKkNV
8/N2Q6CM+tasRZiv3iSyRNUYsvSdci3Q+M6ta3mj95rAMQPGajHE3x/mphk8
+qawLJBobYT5a7jyx1nHDHxbyhLSkT8n3k/UGRmS4RI3oYbzdbWZ6YGvhhQ4
Ymltv4T4y6HVeOwL1Rx2NQnIS2B+fz/Fp+VqCczucYtcvH9iktZW3lbw8o3b
4R6EuznFGzLVqND7s29xFs83Pmrieo8Kmx45aGB+JYkYLoep02BpxCcC8zFd
wWNnQBUNBPqFD2C+DiQlJ67XsYbu/cvPcX5n+8J7/fseGxgtLYvhQLjAi7Kp
qMEG7h0bkMT5OqiJtEqBoIPB3+Q4zIdYD6Pt3k/p0KJo/I9P7UKlOQfMbcFR
U1kM46/pVZdWntuCh03HIuYn3aKj25BmB2ZqNWb4ecNRuQuBVvYgkqe1B/Mt
wpr2vuGFPcQmhl75l//51Yu+2ThAw/PT0xjPOr978eq1AygcObsOv789lWk6
543qIFtef2VvB2E4Efykqo8Vns76GCWw9hJLyyInHJz54LjrdYrsFSah6vtw
7YqpKFTGR3/O7WcSV9K8OwKzJCAlaa9wpieTqNs7qW/xVBqcQ4UefSvpJTxd
7r/OaJIBwsDA+vdfFM9pt05YrNoNSayXBHgC0PuzXHuMLyjBwtpgA+W1aP8v
rv1x8ZwKGIj29tHuMIjtXOp3PEvV4ODuor2XjzOIQ0GMYofrGmA+3PyrIJZB
fJt8KjqcpwWN9++P8mYxiCNdmrID97Xhb/3VjoBK5M9JS3J8uS6wDVr03mai
/J62+G26Zy9k1Y2ZPJxG8TD7SpYnBOCeV+6h2WUGEfvozFjUIX1gLGlUFSE9
Ttf+/Xn7MRJMl85MFSL+ZthoLd2KMoAnJYtNxQgvKLdY8qQawuieg7oZKD9H
T9FPMLKN4PnnGf9taPz+vQ/q/LOMwU1VY6AP8bvTZFjf8IoJ3DlUcLwe56uu
qol7haaw8e1lsXUI9zrvpRzMNQO2h1YdNrgeFyYs2d0gAzd9hsqKsNvx/GqJ
6xRw1Z225sD5TJr1fnu1OXBpvN+lgXDrFf+03kYLCM9xOnkE4alHN0Pu11sC
+9MFtXKEM1KLi3s7rIDTNMz1HcKSAbsimz2poK/scQnz6YywywniPRXi9b42
YP1Rmfv5zquDNFi/v18T8z390Ni+D+M0cD9K4sJ4t7iuFlegNdy3jh3E+bln
dXDh78/WUPZo+xas59l+Rx3k8bOB4UHTczg/zzaP2eydsYGolqZAnJ9zhmue
vg6iQ/dQ4D/9PGRX7uD3mw6LFw6mYHvEwvk+WC/ZQviQ1gaMB0/Zpm+Kt4OA
waPhGF/qC39+l9UetKdhBuPJnYHeB47bg8G3a/sx3xdsW2S1VzmAogm1GWPp
pF8LywkOkF+axYLf99dIrWGm6CfRnDap8nC2m2jg2K7daL8G9rmJVmdtYBLV
DYXOJXQhKLf7q5Dykkn86snc46KwGX7NiUUu3GISO48lR94dk4MLy1/EEsqQ
fj15ozV4iyKYusltiFTvIcwXEnOfn1MGwxSa0e2XSD+P5kwRl1UhPkRhZns6
gzjX8K1r+ZY6KNRGZxmhfFywYculuQJNMHiZddE9EcVvQ2azfZMe8L2rzGt4
h+qRxQvdJ68JaClS8wyeZxA8Z1y8vn8F8BjntbqN+FX8pEH9+5w+lAcllf1E
fLz1W7/3vz8ksLtezteN+CqToPa7hN0QAi2SryohvKO1PIoiaAwxG2aKjqB8
TE1tex4hbgKX4kaSddF8U5SVCfI2U5hs6q51wnxtlZrfI24G7ttdvlxH/hRq
czt8XJIMl6VSg8QRdmyqq/bdTgHRq7/2YX0tLHA68YmCOUwdmEoUxfx7f991
Rs8ShmKeK2ch/Cuw2MHTyAq8PPcc78D5/c/LtHppKpQtCNC+I6yS4/B58DIV
Vnsd18T59FHMh5h8aRrMR3wSxPl4aSQ6vOoaDXY2OxzGfFz81F2xSs4aEr5t
EMHPnzqcOewoZwODPUtdePzGuK8tVXdsQCPe+yDOx9Iynse8FOmQ70H/p0+m
ItMjKJV0kLvtqoj5cvFbaeMlHVtY93xC9l+/WKF6lv4I6QXj2N84HwtJhhSa
gB0kJu/4p68323NyvSfs4c6m7bvw+LRRO8V3zfZQnX49G+Pa6ZqHyoYOoHPs
yxjGFy5Yen87+5FoPJ1MvObqIk7OkVe0hTnhl4ZscNGlXsLxzXAgq4MAPKnp
KjjfyiSENt+4ckdnE0QVOwg3tjCJM20/1JMFlWGzo8hU8xyD+KNncyhAVBXc
zqcn6uQxCGfPzHqlXeqguu9Xvn00gzj9+MiWG5Ka4Dw4FREcxyDEH29qiy0H
0Ppx7nEAWn9Go/Q6jQp9iJyz5PZA/Dkumv/GtY4E8Z94j7Ugvrz214iSe2wA
XHEHEw8j3Pgs4OvciCkoD5C3vkbrCT1n+ebHGzOYvu6ko4ZwYXmho/sEGbQo
F/RwfdZ+xlcYMkWBxtvxtevQczl2kkpXHBW0Xjr+xPlAkrz1+Fc2GqREaQji
ejqkW8lnepoG9NMl/nh/jUoduWdXW4OOFUc+3t/UuWLv3g102C7RuxqPby6R
2iqYSYeJ5ZoC7F+t4rs8bGK2wHA7aoP358LzJrDYYgebqdelMB55nbhF6qYD
CI2f5cT7rwxN7Z+iFgmXL1JX3lMQvwRWwowurYeQkKX9G7yZhGChp5kNTQSI
hjaJ+0ifrd+9mXX9BhV4rf8j6XUTg+BM+nBQQFYNbn2OWyo7heqPqMWbDhkN
YJWWZ5NE/l+i57N67daHxDbLx7Uo3qrbHdxK95DgXYeIsCvyZ9/gREuXlgFU
+DcsNGP/Nr9ajnEygxcuBtJRyN6apUMcPAfJQMpvKlqLsACzXyDUiwJr5RW3
Y/2urRx09UMjFc5rdPzLv/R716LNjWlwMffjM+wvyeNGLyWf0sCiutgK+5Pf
bLE3boAOJx1/vfjHb53bYcqutkDTKFyH8ViA5vWSYVtwX7jOgnGr0mFvTp/H
xN57T8+t1uogwvbXhdOfsIDuu5Lvj/p7iLFVNwwVXvMCj4S8FGs2k9COZjlo
07kR2O/w8BUOMQmOt0oBDKoEKH40HfkdiHDldVGV09Lw8pmU887qXuLMxY2y
u2NkIJ12Vv86dy+R0PNJRLZZHsa2KxFVoSh+TX9rzB9VAo0ohm7xhh6ivOwP
/9UgFeA2rG4kVSD9fm+zb3mqGiSveazUj/o3n9ztq4wSNeBm5U/RN6i/c4gI
Upc6pgW7g5oXtTKRnvo2/HZfljbA7LG1R9B4wUPGD33SdGHdm7bc9h4Uv9nu
nCFle6H/UWec22cGEdx0Ji5oP0DUPX0XOaQXInW8xFJd9UH6lvlvH1Tvz7BZ
fbP3J8GpzbcfZKL9i+6qfZ3sawBfyv4U3EGYErjAqnvMEPJyEyuuofjiDOJm
lUg0gseORymaaPzVsAsb/eKNYbRG0v0Tyr+mbRqBnpkmkP7Ry+E5Pi9Y3z4m
kWEK7aq62UII+1hG7Yg/YwZBLQZLLli/Dutdy7pAhlmhnVbsCH8MOKHL8x8F
bD7dDGDD+o+Zs5bjujmsP/zGVQXhLzlxlbvvWYC3G0tFCNafBz+F15dawtGB
gzdKEb553CNsqc4K+JL9lkZwf9c63rHiTAXlX+o7cP67ana78cUQFfbqmzhj
veAX+oe+4kaDuy3PJDG/JLcmzrmO0IDSu2ELxi6H89UED1hD/bw/C47vinr5
U/Jj1iBr6muG+fr4dKf2BQ8buC2R9ADrBcv52TTHSRs4GTqchOO756PLN0tv
OqgyrkjheG1sKffnmEH64WtnLuZn1L4D5L6ftmBs/HENxn2CPm67j9mBlIfi
IYxNn4zGT/6xgydfyicxDpsJWj9/xB72eec643wh2ZKg6bxsD7U8p+oxDll9
7lhIyXeiWZ61vfpEN/HtxKHPbibcMNz2gLZxrpcobFWQONEvCFx14ebkASbx
d3TwfPk9cThy7YMv3z0mYVnz9Sm5SA5U2bM4+2t7iK7mj67mwwqgZSjjek2n
h8i7I8l2LEQZOrtLnpqg+t7wJ2kt5bgqlFFkM3kRP594DyWTz6jD0HbeSQek
Dy7qhC28P64JAV+XOnlOM4hKgzOqeoV6YMHu4S7ylkHM2GrZmD0k4JfRLrI9
qgdUe556+luAurRzB/B5WYHBRX+2cX1Y6+PP+wLx703jxb62TyTYUV+Y1YX4
KfS3cujMDwOoK6xZT0L4HvnAYi6HMbiMxAeloHyV2XxN9uhaE1h6eMTBEs13
8LkTvx+fKUT95vh0APNztcbsTR4zqIi+7Hcf+a/0QY55Hh8ZpvPt7m/D+X45
dN8NIQpE9u3TxvqgkMV3Xflmc1AMX79fGPP3ZUe8uYIlHPd89F8GPp8SGXMO
VLOCCKfEwDa8Hz+1fjHFqRB3bOLAN3y+PcuvJ5RDhcdS/mWYLwPlyg3K4jTY
c2fra8yv+1VnxF/l00DsM/PfeVtazmHTk9uswW9HuTbOh9fXm9iflbSBdfpN
81gf9PPCRbhmAw3N5slYH8Q6h1Yf30kH5XHVZsw3idNqV+pv02E53NjsX3/v
cueFqqot7Ff9q4L5dISndfUzTTvw6y5Tx7jTOKxRTMseRvJXpPDvxUodB4Lr
7GHUPDMD41gxrg8/ikYJ2VCNRKW4TqLicFb5y1Wr4KiQrez3I70EacJPZXCI
H27N61toPmYS4krTS6yPxSDfO66b8xmTeBV1Nk9rTgkig/vvH0P5qJaun370
lwpsulRN2lyE8hfPsciYtepgfXhg7DuqPyc+dx4/z64J10Wqlt1OonhOfb71
QxFAyFeSEM4nqcRfksllfViYfOKjjvhR+f7n+/QSEkxyLGyoR3x4Nl7ttOau
AaTTAy4cR7hozfFpr25TaB5v6ZhC61mTcObBhm4zOEYactHB+zPtwFYwQIbC
4jsiy2i/W6pnpd1eUiBAV2Qrrl8+rkvxa45RIVtXyAbHt27MocdxC1TQrdFp
w/1EumBzbUAsyieh+zzx/g25LBUErdAgvKuwDu/fhEzllenVdAjeaSuBx/+u
bjc9nUyHKKGn/+JXgrdsax6fLUwnr3P/V9+qhG51C9lB84z4Foyvsm457Z/w
hxh56ZDDFOsh5DNMd4wlrYMmzR9vB22YxNL1H+tkmcLgXCic9wnVe7d3Nd71
35RhUGtWJLANxWdBT+KW1WpQ1ruH+RDp9YVm9RwRbg3weiwe3IjiFSQtnNo2
68ObFk5mJIqfeyYqWfUyJHi+uMXFGPmPu0ivbUXGALIVRnLbsD/ZvyxOk82g
6mJeVgKyz/JbyVsZWzJ8SePT3IDr8br0R+V0CsS3R0ljf0akyM5vfUAF9iTa
HXxecWhs9tE7PRoEpjoWr/nXT9mcMKmngdXPCGfsP1PbosXZLjr0Edyf8Prf
3byd+JxuC8+ZpwUwFvDbKSAyzgYssgtc3+V6CYH5pIdxr/iAveX8vnV3mIS8
3ZF7JU9FYWNDJ2Wpl0moxW3uPXtfBZJkd3y5fpNB/HAz/y7cqQaeq/rj/kP9
eZhBJCngqQZs8fxgH4769zi9e3d9j+tDq/MBaj+qd1tDLk/+PEMCv/hi29to
/cUvazZ1pBjANZdXzRcR1vZlCzYrNQM3D+ltFGSfoNdzG9EaMsRG7S5cQevv
P1enpF5DAe2QJ76cmG+jPHD7ExWgqFYc82e5ZYSz+hANpt+mmuH1L9Xrdxz8
SoOIdMcZ7J+ZT2VGPSy2UO/z9xhef1rScNI2n7Wg8LT3iKwMk+iu5r3Q90II
nKiGIW+HmQSps/SZWosqTOZcMw1PRf240Gr+e8/UwSlKczsN7fdNo/GVt5wk
uPskqo4P2R+m9LnLk9sAhsO41XB+je2TzN6vSgZ2Qc9cEfS+pFOs6+XVKXCK
WfMY58Mr5PN63LtpcG/Vb1NsnzFnUHfGHRr4+fkEYPvL40rvrBjYQuaJq9uw
vcED5rd2DQpA8wGKwMtOpEfX7Dd1rN0EOd780wv1TEKm7hbrGFkd/MeOPnuH
7CPTjId3dZBgNz3Hrh3Z0x02US45T4bG7PfX8fu3HbjuJ5VGg6nPvP/6qecX
qlqu39oAnZeNv+VEMIldF/oSYnpEYHtxy3D1ayZhenjWiIuiBuGtD3mH4hlE
drCXZKypBjT8WL+1AOWbOrPjMrlkEhy61hqH+4WCDRmNuaYGEL2go4zzicQa
VdlvR8jwarfGIXzeTMoW91cPo0BE/Cl7vL/asXa6tZY04MtWmsb+8L+hqfK3
kwY6G0r1sX28jBKPCwdsgW4UxoX90RRx96qMTxnBp+lb4vPpGZEqsa9bSpcF
TkXe1f3ZgOIh+euOS3m8kHVA7kNQOpNoWCV1fvnsRshz70oYRf29WqKQHoui
BPSlc7nzhzKJm19Pnbp6UBpaueO/P3nYSxRoUKwWnWTAMqpgZO2GXsL9e/Jo
dpE8VG7WfpR7FOmRy0ZTFj5KMHjULHeKD9n3MLj4lpsK2Co4fe2vZBDfV/G3
DUSrwfOiT/mxKP8evNej/vCoBswmvuQ+jfQpDxgamPhpwWzB12XqOeQPFoWH
VxO0IdrjamDUPeRPpeZQ5xhdeGCfF9/HQHpA7Py5yoK9UFvd/6d0ikHw3/yg
cNkJYP+6xsbmJQYxv0CtErTVB4bh9Y8UrC8PLswEe5KA7+a2kBTk/5A1fzr/
uBvArmOK4hUIz67JHn4RYgi/twaalqP8b37PU9/0uBFcfJqiT0Ljn6afNvkU
ZQyD6TnNP1H950wcYws9YwJ+2aNeTNw/KvR6OiSZgpG7/4woPj8y2ZjFF2cG
YtGkZx64H4zMibyfTgYReo0/Pr8qHT28cjKVAtfIyan4fMuv5GPN5XxziHlQ
H62EMItIWpvzLQuwk1n1LBj3Pw+Tj5KuWsKzqweGSxBWi2x8zXffCvyOmrbi
/vP4z+bQLQ5UyMxp8F5CWGmU+S6/jwq7azR2Yn1qvO/ETT5nGvRMLglj/vgf
dWjc9JIG15lSMhjPbupWEfOwhsa+K//6zysb10YYv7MG1zui+7A+3WI5d9XF
1QaMOt92Yb2xtCFG3nvMBppo17Nx/fkcqMjB5UmH+0Isu7FeUFtQCu/9TAfX
BI+rmJ/yPoSTatkMUbXl5PKCYTfBRQgYKjzmglTDY9lbPvYSWeQjbJ//EwTZ
JLePFn1MIi5wodEpVBwarvOnhFcyif2226Y3xsrBHsMHq9Lre4ibo4mydQ8U
4GG4n0zX3h7CcHVwFXO/MrgxdQTKRxnE5lUsedRDqpBPeSCWd55BuD7q/Bgc
pQ4yX07GHUL54D/a1l0OwZqw4txw3gf1q06cnNOKaXow2JZcC29QPXvp9yal
hIAyr8s5bbMov+t5+Z4eBLi2It66B+2/OPspzpTX+rDncGtLE+LLH2nDgXfv
SfDCgbenE/GJR2eufeGTAYTdDjxGRng+9bHOkyUjIKfHTv6H6mHlSJbDPJsJ
rI/I2W+P5pNO4boZyW0K9em3ivwxn3YSoe84zGD24qnXD/6dv2jVyXGTQbN4
9QlpXK9ye1Rb11EgL3zTXpy/vI469WwXModSdq5hQfS8w3YgO2qHJZRHuj1J
Q/hpQILrj11W4EhcePMUnw8E+9we2UgFWstrv68Ip2+bGVfNpoI0Y5cv3t/9
ZMc3iyI08Kd/rsd8GPxBEiA2W0NIyjIF56MLvtvJN7bYQPg5s7W4/qoN+bBx
XraByAzOXKwfd4Uv2pyVooO0smcX5oMOz+qaIzfokKxbZffvPD5z9wiLoi3c
fTisifnxfdirMKzkPfFeqcxEUK+T6FDcw30rhgMKh2YX27x6CQ2/CkHSJX4I
FvkpuPkhkyh6sF6u9IQYEBajyRHPEV/6XllljCtBUBb/8wfofSLutVtjJlRA
LZJZsOMKg9jpETRYvKgGeR/elJujfBPDGlHOPasBM2nKxAjql9lCpToFLgGs
OrB3Df4+smZlaoRxUR/WPJs4sQXtL8OocPTmFRL4OPnCA3w+IfmLHHXNAD4/
CTM4jTDvriT/vFZTsA/wtfuBxtvFyOwseGoG0pEymwl8PnimauBRNxkqQqoK
sH5J2j3x8UUPBV6GXnzPjZ4nnnkpL3uUCj23CllwPD0Tzn5rPk+FH30VBbie
+7GY8RyPosHe18JuOF63VXX57l6kwfvx5na8H+dJurDATgdutX55PF5AL9eV
OEWH2cH2LuzvLGNFWd91tvB7uuwg9rfb/k4v+eTfRGB3wrpIxD9Dyy+x91nW
gaU5eTnbjEnMyGnPnM8UBmvxwo4apP84tVdtEnqnDPRdL3ssOhiEdInJRul5
VbjwYuBOfxKDOC8i91vvjzpIXDvz7RKKrw9c1zj/COmDh+ZVA0fEd4XVWxWN
JUgwtadCXBv5S5rjU/vGbQZwKDQu8hn2n/R8lLSBGailJy8lI/tyJk0taszJ
ULMmV4YP4a7bnzMY5hQQ5XCswedpF2o5C/dWUcG55XQI5t9ijPhIyR4atHkE
pWF/VJJevXB8QIPSLRnu2F+ewyG8d5/RIX+MdfZfPpLp9J9wYYPVD79uPyXc
S3BF9eR/yeGDp2uCNrfcYBLlby++oSeKAj+dS+HtCyZx/myWx/krKrAvVKD2
ZwmDSL0PVnqP1MCyXChQGOm7w47SoR+qNOBWjvvp1QizLOeb/TiiD+OO4wce
ovqhPWA+xRNPgksWe4auofXmCP9eqx1vAJbBHQcKED69v2hksNgMdocwvKyQ
fUusMjJaZWR4ce/mIXx/KYer9GfJXbR++UMO+H7TcrSae/g4FXK+p37F+X2o
zMup3Y8GO7eL/dMHxsIC/0lP0cCiI30J+8NLQskqf4kOxjvPx+P1Xzc+8X7m
7Rq4cC130yZxJtGs7RBJZAnBQrCLEfMVk7g8KOWkXaEKt67nhbeeRfnHdzFo
8IE6XCw9lWmC9nfHKmaOz199IOf5c7Ij+9OyshnRrAaoXzzYhfVeR1cj+3c5
Mmh73PqFz7+Dpdw+kHdT4ExGTRLOV4pjda4vZGiQYnlaEdu37cfctuJbNNiw
TiEI2+/llJWSfUEA+k6+ShhC/V7m+YRw9qhNwOJPfjPdiOxdX7BvjY46lPrV
DoogveVV9f21YTMJlN/OiLbi+wT8Bqf0v5LhvN7cJ/y+JeruBvUzNOAaqDqE
5x+zdRI/sm0DBBwee8gdzCQkNol7T2aIgHep8w4LxPcb0f4D67TV4O2m7Mv1
Ccjepw4nrmppgLOHdI8Lep8Wd0CLFAn1M1Ks/3mj9z0I1WmuBAPo7DHVbkQ4
gL03O+YQGe6Nqy3i+JZTiyToAUjfjRjV4vPKNpFYlzgyDZo/ZA7/07vnG07x
PqPBz3dTpti+6h8jWrfWiIJBp88Z5UGk11xk157JU4PWC483a6B8FVRQ/GVv
KAk43NhTL2E9q/e+J7yQDPYzdGN83pWeGML6ZT8N+rIf7sbzlZA+6gkJCUHK
X+ZPriEmIScwtks6Rx0eWCVaUdB+PnH5wrz7nQQ97uYreP9I+0RSkjZTwJnR
ZIT9Z7lfihqwUQBSaPfZuVuYxGzN6U32m5D/yUVQhPyRE2P67kgFCRz/s4jA
60+yXNp9/A0ZXp7ku4LjtVJG54BTHA1aWce9sT1cUrd3NfCJQNbduZsfkb89
Dunrft+oAYpNkwNfkD1fdTKfTigZAPumTYefovmWglQmz7lQ4OKvE//y53ty
V54wiQakDbtqsP+W/Trl1ZtoIPX9hS2e33GNw/mZYTVI5jvvuAX1Yxzr5yde
ZZKg7tycVzmab1froeMLDWTw3qb4Ae+H5JDd/eIQGshlKtHw+Fcqzyp9BYRh
B7vTzH2k95828leeeakOu/S3yOxH9jl2Ep1kPgPoKlUxwfW+8OPVPev0KPDh
xl0OvF4/scmo2Hs02BexxhfPF229qq1RWBA+ZFzOy2YwifQDVcX1TurQJ/rc
sgLNp/gl5yU/kwSwo06lA803PpD8mv0vGS5k8Ydh/xtHbhXhy6SBZlNDCJ5P
Q+DsFX7ejXC+k8/zO+rPljYFP7F3QPmHJts1jvYj4fZYQxzVAKYvir7H9aqG
S3ZroE8hsaVdhH6j6RmhvLJ/Tnhmhah0t5Oj3+8hmBT+i93RvLA3T8NmdSqT
OEGuvMU8tBEuzUysOoLygflw4rWNWyRA2OWZ9cVwJrGQEv5wxE4aoo1frM1q
6CVunvLa/8FMBs6oLRHNfL1EN6vTs650ecjwNQg5H9lDZFlOt0S6KwGDSJnk
E0D1E0r95e1UYOJui8mOagaxV4ln/lOYGlSeMyYNov7AS3eH5XyQBuhu99vp
gur1RLEC+aWHFjCUC7jeZKB+gGtQpi1aG95EPv5vqZxBrONn6ekL04VQysXX
jqg/yHORH7TN3gtzqx0DbFB/sD93/ao6O4Bzth4Waag/qHJqY3tJ1QeV1x/4
9FB+rtjYczhmH+rXEl5fTkT++ioj+vSeiwGM2NzUq0S4/aVne+EhQ+j/nZVc
hfTAIWaGh8sxIygK/1Jvgsbbbf775uYRY9C6J7z4G9XT8YMPu6JOm4A1Tfpn
P75v0GArFZZgCtEdN6XFEXYy/NgxFGMGLEOfdL1wfW5vH21OIcPmT8dZcX5f
Xzj1TjeJAlwerttwf7BDeH1a8CVzOKD3+Kwi1if9Ar0h1ywgJlavLwhhhQnH
3xxFlrD1+uZZfH91Ye5bhniZFay4MGRxf7D+jHL7bjsqEDamq3F/MF82MRPH
pEKTez4Prh9q/QZMMUcapPq08GJ+ZUg1XVsYQP1wxS95jOHwhPLmfdZQ4ndn
C9aDYsZRh23eWMPYj1lf3B903eN2IpxtoN9fdAjrR6a4/mLgBxuwJ+Xm/zuf
Kr+YNuZOh9eZj5WxHjwk9P1PzSc6rE96chPXo6SL2c/OK88QrwaCRO/u6CYE
Cw7MCB3jAqGSPM4fb3uJNJ6cUIkjgmB9XVRaC9Vjw4qUQUW6ONSnPA3YXM0k
Aq5qr6wEyMGgKJ/rzOMeQnjWfsP3mwog6WwddQB6iI2Vwul/nZThrMZwh984
g+g8o+P14oAqkN2l47yzGETJRKtwQog6CMa/cI5G8Zj1OszgvI8m7KlL+yKC
+oM7Hw1Mb53SA43Y6Kt9IwxiZROH9O4rBKzVzfwTi/oDA+UMovAFwHQ8x64d
aP+H9y/aWA3pw9KUxkgt/t4xKGr/ZYQE/HPnKDhfJDoKNVWMG4DdplWFlgiL
3p12HvptBEH7tWRzkV4y9OeZqfprDKGR1BlnNB+7/9uQk6tM4e3AwYRDmE81
LSpLLGawqdZHsh75r6Bs9ffvHGRovkx8347vR0z9ze/npoBr4MN/+btV5cW9
d7zm8N/gJTHcH/QJuBSdk7SEOePRV2cR1r1Af1O50wqK43OFcH+Qp3Bi1agw
FTi9Fj7j+51bat20DbKo0BUYY4T3V0Yk8Os7IRpU3nG+i/mwVHD79+ZN1sAd
F0f/d5/zQpZBpbgN9AlcEML6bFQnpmaywAaqSXPFuD9gi3ssmbWNDm5Da15g
PphaBevbXKNDX26KK9art3UFYtXL3hHkE3/JgmKdxEBaSlXGHg6oOme7J9a5
l1CSHzh1NJIfLJPXO8zWov7wbyGc9BADuUrLvKudTMLu5EnZRyNK8CCNS/sh
8l/r+M+PKyMq8Nru0UnlYgYRluLLWfNTDWqCnp2LQfklOrWr3XBaAxzWE/IF
qL7aHLS6Iv8fwOTQeecr+PuQm8eurCx9yOQQa+VH+/n6V5hXVQEJYnkPKNeg
/dPRFzFQuWwAuTcenUxG2PQhz67aZlNQEe6Vncd6LvKX64EmMzgb4cGtj883
X45CZwcZJtqGJnE9m5p0e5bWSQEHyw5jrBeEt5me1ApH/dlS9wD2T8borW/K
s1TQqfqUjPsBhyM8GkkRNBCOkfl3vmnsoWHF84cGH61vMrD//axYNrCy0SHy
kbQqjj+JExyTm+LpwGk71Y/9+zBTqi917W+iolfsqsInBkG9Q+zKfcQDdhaS
oeaGTGJq2tXjWYgwiDn/EkpB9fnVxO1ZGFIGSkWXw5PniD+K8e+uf1EF5jD7
He9kBvFOX3on7bs6vNwoTU1G8aO61POajx/1xzbMKlPE5y8H/4teI06CPkf/
FlXkH+XqBrPtmw3gYu5XMq53ppVR2kCYQUR/xiN83xjGRRJiTclQmyi1ix/h
5gXRxTemFEgavXMK19cdVuE/Le5Todk5j4751UxW+pKuSYNNE+nxeP1XavOX
99fQwL1ifD/2T/CW1zln2uiwPTHnD843WolbNnZvZAM1e6dgEZ5egk13dr3U
MT7w1Hmnx3KNSYRIy83J+ohCnfsv9+Y+JkES6JEVzlGBq/aGlyRKGcTQiHYs
tVINRtnOZjshvR88Fpmy+a4G+D2aymIivfHYRfBCdYg+FFod3XEX1QeTJEl/
0eNo/Qp3vl3B35vUN3L8iDUASBoUv4yw/L4gwcJCM2jKtDxPQ/bNUO0yTW6T
oWA6cATr/6UW6f4DJRQwy93dh8+PnpiZBjuNUsFce3oA5+/W7TIJvT40uKyW
qfvvPmnzsSj2SZS/2yLZMK64xjw7lLsG3Das4/ooxCQeLR2bCgsTApEAzrUa
qL5TXfdJ1t9ShVhBsYNhaQzCMGuuYOqeOqwPuFaA7+eMeZlOyi/oQ9T6iKBF
xP884wBq8jIJtr03WcB6MbgjXbt2BxnKVKSVNiH7vEJSzZ1kKRD780wIzj/z
5d2BtTtoUBznKon3x028dun5UQHgdJGu2NvOJOhDQqlDTpvg+X+P9jk1M4n1
ey6mbVZVhyX/c5c1kJ4J8W5zpTWQwCLuw8AT9L4Sj8PfqFNk8B0u48N8mKks
bXcdWQ9GJ471XvJnEmIjxNDmwyLwwa6WOI34a8d2oyBDWQ025beoqKN8Hv3N
uqxGSQOeMr5k70Xz//L5wDupR4K81y+896/C/uQzaNI1gLKiu8VNCPOzFHUZ
+pEh3Gq0Yw3Oh/E3bnn6UOBWoHIg1o9pY+cCvE1pUC//lonXp8YdVybaRoP1
6g7m2P8RmkFWsZ83ws3efe5fkJ5fmyilnZ+lBr4Fbm4JKN9EUyMPUYJIsJvF
Qzkbva85dYPOqVwycJlR2rGej15W3zXvTgPdN67/zuuucqwtI88JQptwAwn3
B0f13jhpZqpDl0n/Znwe37u+xebhFxJoNm7sx/ujcddo7oIoBVLrlP+dF5lK
mzRd/s0PJZ8tJGWbmIT+hxNkPwF1cGndPtOG/HFDcYtH/F0SnL4y09OAv+fn
y11Me0UG9QfVr7C/rxT8TfM8QYNJ/7p/90HZxrvzfn4Xhiav9NXfkL/vXtTx
5+DTgKbbg6YDyJ6lL97GP+UNwOT86gzcn800uFtfdqDA8MTYPpz/boq8L10k
kP92HriD/Tf1Lt1u72MaKLPX/rsffV3Nupm9Tw2MJyJqHVB88Tc+9/6YRgLz
XT+n8P0CCaH8T9wPybDTyXMvPj/ntRQbKQ2mwVa/CAs8vm92envhTyE4pHD8
PhXpef7PPKP5veow5fS1Dn9fPhgrZGG/zgBssn+24fqcpfGiWHwPBaY4I99h
fx0RlNWanxeAvVbRUtDNJF6nlzF7rJF+r5g71o7G6xYGO23tJkFNcREVn2e8
2l5rLLBAhj2bj6Tg8Ur95QKmMyIw3s3z0xG938zY76cfVQOmqNbyTcjf51zr
iHRzAxBznzv3EJ8PJFmfq6oShB/vGyZs+pkEbyaz1jVOHZTgaQXuP6ZDDtn2
jZPgDs9dPby/W8yvPKvmo4C3re2/78teOokBd5hkcIlcccD+jT5z6kN4NA22
PHjx7zxk3kf4uFuFMEi7niUG0X4Zf1F8JseK7DGfoZai+YWtBUx5thvA92r/
LPy9pD1CjWtNpRBIfqSvckf9xm2CVf9JkzpESGX44/7x5IdGy+BVBhC2DCnY
nug+xQgdZQr8IYVdwfaEjxUr/SKpwzTHW51F9Ht7dnEXrVYSfMo9bIi//zW3
CG5S+UGGkD1urfj3Oxx/z1WUiwA/x+zv1ci+N5OflnivqAPl48UIfP5QXSJi
fWWOBG8/BQrg+32WvJ8kIrdR4PIrzn//35K10tUS9IEMJk8rAzFfWyuO6tAS
UL/439t//dh6j8S6JGUR0Mk3ufYCzf8u+JqBmqowWFFlqdwIR2RvPHX0Pcp/
2eo+geh95mJ+lL1CBqDJvnAP3+8uuXiEsQwU2BljJY/nJ+k8DCvZrw7CLX56
Bej3kjpPHTgHSHDyqPgyrm8zic4hs6wU+O/JHXdsny7NV3lEcSOEvRekxiB/
Xh369ipFQRKcgPvUz62o/nJcSVBADYv0knIJrlcHyV/ie4104N2npOzD9QxC
j658VqHOGPqmCuNvIn3TfLs7pNeIAjtmmjywPSbsAQ5hvVYg6GRr8x6Nl3F8
wecaRocifU8urCcO3uEoTFGwBt+3Euw43lxyK2pTFFTgFFfCvquPGETt0vkb
KQok0KLe3oH16f85K/F1
       "], {{{}, {}, 
         {RGBColor[0, 1, 0], LineBox[CompressedData["
1:eJwl13f8V3Mbx/FfewkN0pb2Htq7jAqRaO+9d9EiJU1NoqUUWe2pKbTQNCoS
0U4pJaV9Py/3H6+u9+v9Oef3Xed8zqNcbXvV75koISFhcpKEhJiLEycknBVq
4DPeHv/qyuEt3f14WHeQ34fe/Dyfhrv9jad1S3TFISYs8c85uSY28xyOaanb
zDvwa3J5vM0zobTuR34/+vALvKhzevK9/C1+D3+GL+UlUIm/zH+TxYSl8p/y
I/ic51S20n3OO/LrcgVM509bmyI/IJeVB8qH5DbyArmM438yM6Gzrq+1J8wJ
/C9rxeRe8V7NfdZamO/yYebb1u816/Ge5jLrz5lv8ZfNkryyOYwPNH+P78T8
hI8ykzp/mXxe/yge043hX+gflFtH1nfiN+SKmMEzo5z1Qfzn+FzWD8VnRD9+
kU9HMizXXYi/jS95Z5TDaOcnN1fE57T2OLbwLiiPFFhp7aK+FrbyrqiAn/WZ
0V9/ic9ASqzSXdLVxjbeDRVxWJ8FA/R/85lIhdW6v3V1sJ13x01dJczUZYnf
XvcLz4oX+GU+C+m8/2d1y3WlMImn1q/RXY7fEDt4Ln0b3Ze8B78lV8YsnjV+
H92vPBte5P/w4s7pzb/ls3l6Xp+viHsDVfgr/Kicxvqn8j/yk/E9WhvLv9I/
JLeVt+ibyLPjOtHfNqtgtv4Z/dR4fbm8PDi+J/Mwb2t+wF81qzjviJwdXeI6
jtczJ/JB5hXrJcw+vK/5nfWW5jz+ivmO9Qzmc7yXudL683EN89JyVXm4fCzu
IXmhfJdz1ppXdE/ha57bWjvdVt6L35Gr4h2ePf6O7jeeI94Xv8rnIC3W6a7q
6uIb3hvVYl/Bemv/xv2KnbwPxnqt6rEfYIP1a/F9YRfvixr4XZ8Tg/X/8rlx
T2Kj7rquHnbzfqiJo/oHMUR/jb8b1xI26W7onsUe3h+x2VTTz9HliP1GdYzn
wlB+nc9DRsc9r1ulK4P0us/4Tbk+9vI8jmmv28YH8ETx2fhcnjPuf91x/hBe
4jd4ydiP+Pd8Pr+PN+CrE/1/Py9rVjNH6I7LGRyzWb4V+1Dct9bG8X36vHIH
ebu+aVwPcT/pE8s15Hfju5LfiO9HriAPiWPMX3g780M+0nzMeSfk3Ogae3Nc
H+ak+B3Mm9ZLmf1iPzJ/sN7KnM+Hm+9Zv99sGM8Xc431Bub0eA7J1eVX5ROx
98mL5IzO+dy8HdctvuX5rHXU7eAvxs/Fa/J5PFfci7qTPE/s1/wWfz++R3yh
uxOvi+/4QNSK94UvEyf893BraO17cRBq45Qub9xP+tt8ATJhiy4RGul/4IMx
znupY57W54vPbe0O/wAPYKsuMRrr9/MheAJndPkxIlHCfw/sD43M2KZLgia6
A3woknqNR3TzdQ/FfqD7gxeIPYMnwkfxHh3XSPdp7DGxr+q286Royg/y/I7p
FPsWfymeHfxR/h7PHb+v7iwvGNcATxx7oWP68/3yx/G5eGO+Nq4f1OAj+cnY
a63vkJOhWTwjrI2Xf9QXkDvLX+ubyXPkl/XJ41qTu5vvx71pvhn3npmHVzSH
xr5t/srbmx/x18y6zj8nF0I3/lrsO+bkuPfNJLy0OYD3Nw/w1nFtxncfz2jn
jzczo4lunfWG8gy5olwz/qZ8Ss7m2K/k5GjOf+IFrXfh3/Bh8Tzlj/MFPG/s
c7o/eWGM4kmxUJcdX+tSoIXuEH8FzyAHvtGnREtrP/PhqIfzuiIYrU+GRbqc
2KlLhVa6w3wEnsUFXVGM0SfHYt2D2KVLjda6X/jrcS+a9fGXvhjGWkuBJfF8
xW5dGrTR/cpHIqXzauk+0OWL/Uh3kRfHOJ4SS3VZHNdUt55XiutYtyeePWjL
j/BCjunKd/LXeCpem3/I88d+oLvES2A8TxX7sGNe4AflZdaz8mZ8A28kz5Qr
x54uj5JPx3XuuL1yWrTjday9Lv+mLyx3k3fpm8tz43fTp477XO4R117s9+a0
2MPNAnEvyUfi/jAbxPcpp479Kq59831zuT6b45vLG3WN5VlylXguyKPlM3Ie
x+2T70Z7/jsvYr07381H8zT8Cf4xLxjXrO5vXhITeBpMdMyKeCbgW/096KA/
ysegUeyt+E5/LzpaO8bHojEu60phov4urIz9A9/r0qGT7njsgWiCf3QPY5I+
LVbFPY8fdOnRWXci7jfc5b09qftEVyieVborvDQm87uxOu4v7NdlQBfdST4h
fi8zrfmUfqG+cOwpuqu8DKbwe7Am7jXHtdBt4lXj9XQHeEZ05ad4D3mPPEGu
Ky+Si8Q1wMvyqfK9cc/jU91nZjX8Ea/NJ6IF0vG1ZvU43+xmnjYnYbFcFC3l
N8z0WCcXRXf5jDkZreL38Z6LxfuK1zCnoDXe5BmwXi6O+E/fWXMq2mAaz4gN
cgn0ks/F66Et7uMbzZKxL8XfQzFdO3MTSuF/7eKuUQ==
           "]]}}, {
         {RGBColor[0, 
           NCache[
            Rational[2, 3], 0.6666666666666666], 0], 
          PointBox[{903, 904, 905, 906, 907, 908, 909, 910, 911, 
           912}]}, {}, {}}}]},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->True,
     AxesLabel->{
       FormBox["t", TraditionalForm], 
       FormBox["\"Density\"", TraditionalForm]},
     AxesOrigin->{0, 0.55},
     GridLines->Automatic,
     GridLinesStyle->Directive[
       GrayLevel[0.5], 
       Dashing[{0, Small}]],
     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[0, 1, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"R(t)\"\>", 
              NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
              Automatic, {1, 0}]}, {InsetBox[
              GraphicsBox[
               {RGBColor[1, 0, 0], LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {
              Left, Bottom}, {1, 1}], 
             InsetBox["\<\"I(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.565701632242731*^9, 3.565701685525779*^9}, 
   3.5657018755146456`*^9}]
}, Open  ]],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{{}, {}, 
      {RGBColor[0, 0, 1], Thickness[Large], LineBox[CompressedData["
1:eJwd2Hc8Vl8YAHBkZpQVSqUoI3v0k3Ufm9d68RpZDbITQhIpGkhWKiESilL2
SCgqJJvSlNcoSUj2/J3jL5/v5173nuec5zznue+e46csTtDR0NBc2ERDg//u
jV/NzthVr+GaX8+qoDBEVDKL7z7pnklEHch6eFBiiKgPfpoj5l5IsOooKNnu
GSIaZf3cGN1fELouS0UzW4aI5thug1m3DiL6cURf3MQgMXWJ7Wfwoy5Cxvg5
y/kfg0TYq0Lx+Xs9hFzG9aXo/kHiFsw9/Xe9j/jJ/OLkfPsg8VYl8tm423dC
9Lf/H+HiQeKxGvd5pcIBwunTOdeZ/EHi7xeXzIBHVKLkfZHOwP1B4vx25sHp
e0NE18PlcJabg8Tt26Zuk9d/EgvEG5a7IYNES+IXv1G3SaI+3ejKPdIgEZVy
6+0NuSmCi659B5fuICHpTtgpFE4RRaZtKunEIOHPlHjO/9FfYocrv92i4iCx
pqtYN3XvH6F9XHqlS2iQyOL9Zpqwa4bozCqroRMcJHRGLn+XSZ8hhqSD4kl8
g8S1S300p27PEh5PRYt2cQwS/K9CtP9cnye2L41U9axQiedJwr2xrAuEsrTh
aOUClXA63uoiGb1A5IVllBTPUIkc2l1XvC4tEuPGmx1HxqmEHNQ3/wpZJhzO
O03p91OJ3i2eh6MXlgm5Jwe+93ymEsHfucbEglYIO97M2dN9VKLuvAuru98q
YeHYMjDZSSVItUymP9zWifuFn4q7XqPnrR+f3Ta1TkipJYTX1lOJWKEj7cJq
NKDVMGr8oo5KBByvDqS8pgGO5Fga+mdUwn2T+1tvZlrwvJETqFdBJRxyeHde
NqYFRqcTTBmlVELnh+/r8l5aiKfa37v2lEooX93F385PB28GTP/bU0AlJMVa
vX440EGlHGx+l08luD1FuflG6GDL139X7HKpxOCfb8eCZzcBn43I9PG7VOJD
3LXyhEP0MFS1LyA5jUq0yBxiyQ+jBx166Qsf76B190su+sTAADsuaRy5fYtK
PODSop82ZADp1udvOW9SidTSSZvNcQzwQM9y/O4NKnFxlrSuso0RFm/bxI4l
oPhuLVhY2jGCTxdT9qN4FN9/Dx54ZTBCGN3hnHNxKL6PlkuRg4zg93XcwfE6
lSCfpTVN388EtqQTd8xiUbzbC7PKPJlA4BSfqMU1FO9zh9nWp0ywflvzvUsM
lRBarUxfPcgMd09odD2LohI8GSemeM8xA6OWXN3yVSrBTHDrSL9ghtnErywm
yCvfX97W28QCOn6dkU+uUInJCz6/nfRZ4N1y+rIg8uAeQeLMNRZwNumGtMto
fhreJsV3sEC6rpGwGHKL85kfD7k3w3prb8CrS2j96fepvLTZDKfpmZhPIpfk
dl//mLYZlu+HFIogP9C7QJ36vhlSjzSrj0Wi+foppcQiwgpWf6Mu1yLHRX2J
2uPOCjJbrA5nIEeIR389VMAKB3zfXItFDmo5KGsxxQom7/wnryJ7eg1Heiqy
wTQ7m00CsiNbUl9EMBucP9d1KxeZ/IQ4kFbDBlsuHLnUhKxj+ud8KQ073GZz
mp1FVp5M7X6nww7MXIEvZNH4JBMM9g9HsYPFReOqM8hCcnNnV1rZwcMotrwF
mac7u42HkwPUj32NFUfxM5823yNlxQEvSoe5k5FXuNcDdO9wQKs4WWgzmr+p
soJmx28coMTSGXUNedjKTjBozxZYvjS8jx/N/8c5Jt+4E1tA+ataZyHyu9vl
rx7kb4FNplFHLdD61Sk78734swUCBIIK15E/eUeV/+bfCjlh5Tcro6lEG/tB
FnrHrZDB9iNGD+VDtxFXSnvoVpA5lfSSA+XLx+iJ/XfSt4JGeebj78jDDA91
pL9uhcgd3BJpKN9WVvku2NpzwvymJ9cCk6gEndoMh/A5Tgh085C8gPKXOaTz
7p9UTuiTJd1MSkb7Zy7qecRnTgCpIoN2lP8SE4tzBYe5gK6FRigD7RdZyQ+X
z5zlgtc7c0aG0qnEQc8SHq07XDBYevOmbAaV0PrhKd/3kQvOqooa9t+jEof7
v5ykteWGv28ctkY9oBJR7bXDVtY8ELfC6rhWgvKBLfW0UBAPnL5IxD0ooxLJ
pCC63zd5gHf3HV4KqgeZjdJCF97zwFXRvqY6VC8q6jLtH1F4YXkme2/nSyox
8vRi95rFNjBV0NTv6EDvj9d9+dCMH47rh7AVTlGJC6Sy/G4ffhjZNBvYNo3m
m0H4xup1flC7dCN2AtVDlVAaV8tWfnBieRyqvEglFDyes64bCIDjXe2iX7SD
hIi2nI211nboHuwzLOMeJBjnBSfolQRhziUq67LyIHFCZoldjl0Idrk6zXpc
GiSMv1zN5d8lBIFpfUurVwYJxau86jQyQrDHtTg9MXqQoP8u691BFoJqhk3x
lXGDxP04t5aTyULwLPCS0GrKIPH9T++VRzv2gHWObIzrk0HicEHhurDEXniW
23cu4P0gAbbqt1lV98K0i1LQWN8gIUb/Tvqf0V7oj9uz4vR5kFiw/+HYcHIv
fDn7IEn7Ozr/WHfWHC3eCznKblpLo4NEj2dM8F1lYdj0fNSbf2WQMBE/8Xeb
vggojm6q+Ss0RCxdC3z+zVoEvg3sFWUWHiLyJi5fznEVAYkg1lrBfUMEfdkD
AfkrIiAvF+0E4kNEtcaopskbEdhy8KiUn9wQsZ/ilRSpvQ86hhqzgzSHCJpw
P4UpYj80n9CYWD8yRDylXlytMNsPz7gLRj4cGyLsdZKawo7sh5Z7XS8eOw8R
FSyl9qzh+6HVQInXzG2I8E6eidxftx/k7rDtCfUZIj7ln+l1UBOFvHe3u3xC
h4iS3rDAt8piUCmx/rvwFhrvZZfjg4ZiUOPxuOx4yhCRcdDIbNlODLpSGAe5
UoeImBR+cakwMTjhXubudXeIcHYo/ZpQLwbqXwYEVrOHCJ7hUW1bkjh4ig/y
ZhcNEZtvdsj62YvDgy1r2yRLUDx6FTtjvMVhxSAxtKR0iBh/GDn/PE4cRO83
BVZWDBFvvHY93t0jDhVaK/vv1wwRQf8suX7aSwDdlTSe5SYUT47K+rq3BPw2
2XnL7u0Qcdxqzzj/eQnoe5x/ubJliDCtnHhDuicBORK/iz3ahgjRc9Fnnw5L
QH5wF6Wwe4j4SPdiIPDkAdjW7Fj98usQocolUUgfLgkpWxxoGCaHiHZau7dt
8ZJAXki4vmVqiDj6N3ro1j1JqFtrbeb7O0Rc6vzFJ94gCSsSeWZ7/qH74/Iv
mDBIQYE36zv+eXQ/q7jFrWtSMBCsMpW6NkRML9l6H0mXglAzrn0X19H/j0Vd
EXsiBdZXXgufoBkm8t+OVle3SwHF9NCV/XTDxPTVPOHvnNJg+nmcO55hmLhE
LzYrmiINmjvv0CyyDhPbZmy2/M2ThsPG2c9q2IaJvKGr4tXPpOGuqKrDefZh
oq3hp6PxF2m40hzmusyB7r/4sNF3lwy0rii0fOVE71vdn/IsRwYmPovma/AN
E2p/rEsiymUgeIFpiYrc/vVKq1GjDNgaCdpE8qPxPP9B0/9TBv5l/NV4KTBM
7FLvUbzIKwsZTi/ohQWHCbflpLu5trKQddDnRJzQMJFsOv7q7FFZiORXfLB5
zzDxMkt3zMRdFij2s5aXkfkNFg7OnZGFY0yCa4F7h4nmZMdOvduy4Mz1sUFH
ZJiY+Vkxtz1TFmh4bbLKkIVUt+6cfCALr8OVVvbuGyaCqQ0etytkwTaxQXoZ
WVxabNPoe1kojqetvSM6TFhfvChe800WRvv9y1aRI3o/myWMyELVjcb/jooN
E59Drqcrz8rCf1fmfgmJDxMxTdNK0TxyAPNZCokSw8Tvo7XuEpZysMvUn1dG
Co23bFv8mp0cUAz9K0ORdZh8y7uPy0HQ5s/0b5HTn+ylO+cvBzcPNuQ7Sg8T
xktX094lysGX50qWZ2TQeE2o9Zl35OBf7Our1cg591RGT2fJAZ1rwpkV5BW9
P4qCxXJg0lqXECo7TDy5YdHu3SkH0YU3Bk7KofH+eDwDH+XAjFFs/0NkRhWG
HbwDcpB2t+rgd2SngUq32kk52CLx9KWR/DDBIbWTlmOLPDjQMBduUxgmVC4E
iQ5ukwfTrLRIPWTXng6Til3yYPV8TD4Que5sRKqTtDxMzqWKdyCfavypUGgi
D+ed/Z4GKqL1gwIvSWt5GBf425KJvPW5b3a+kzxcET+Y1YxcVLjIlXNKHhZ4
P1/apjRM0EjUkfYEy0NRz87bqsjmORERGRfkwaJgyvsI8nQK63RKojxw+LKf
zEbW4u4U35YqD0xqaumvkG9cTz5247485A2/ShlEVozY2XW9VB7uXn+4aedB
tB9WqMysNfLQ6TMapIz8PugBRL2WB/cJo3oL5CAvmaKI9/JwOUZnJBK5ceTf
z/Vv8vDrat2rVGS+o1W7w37Ig++ISGQRsvvnUJulCXmI5h7b9wa5iqIZf2Ze
HnYOXnj6EZm5g6FpZl0ejPwdd/9GtjVsWfNjVoCWnV9DVpAX1S19vAUUYOre
tuUd/w0TpCq+B7/2KEDRSJiIBHKq/NdvrhIKMLO7X/M/5LGCe7zD8gpgyHjd
ShtZRfSEyTFVBVA1GzhmihyTJX65X1sBbIqlPGyRv+yYqLE3VgCJoZaTx5Al
b5XMfKQoAKSx+3sgh249I2ntqACiCUbBvsitMaouPScUwDP4c0QQ8k4GmnSy
jwLc2rw1+RyyT/jrnrYgBTi0qvk0HLluMYrVKFwB+hkbeyKQOQJMtJuvKgBX
/1/Gy8hHJjjP6SYowPFDO0hXkIvcP5Q0pCiAfcftTGyaodQxIksBoq1rWbDJ
jkf21uYrQMhlaswl5Kw+YTuVEgVw7LTbh58/bT6aWFmtAP77/L+cR9ZqLXir
+EoB8jltC0OQk/T8aEveKYBCimp2IPLgS6VDMr0o3hqjZ6eQ5VWXfAu+KgDN
xcp/7siR5XV54iMKcP/XEwqen16ZyIEHf9D8LTr24/kTeaTPLzKnAGalc0lm
yAEibOSsNQWo3v4wQBf5dUbn1V1MitAsn3FZBZlH4OaLtC2KkL+2uVka+cSN
w/P8/IoQe1FQYy8yY9SgK7e4Igg++9XGiGxN9zAjQU4RxAI2jc+jfHgY6vWB
XUURFqbD9EaRDfxmdJmNFCHTwPxZI3KMHeO+VW9FkNe40ROCrCHLNvcrQBES
jtoEuyH/ZeBq+hCqCFtVAy5a4nwr3ulRFKsIN2XVm8SR9zErPXEuUATjxkLT
DrQ/Pn5TOU8uUwQvi2/alcixpWCmXqMI3xpPPsrA+83J+O+2VkXouKDW7YX8
stxZqeW3IiRTFavX0f4NuObBWPlPEcZtd7oPIYseO9WXvawIb0b9kxuR49jO
nQ1jVQJuzzGfa8j2zkm1sgeUoF4sznYL8tzWet3bnkoAlewUWlQ/Hv1o3HbJ
H91fPpH9DdUjx5rWn74hShDccyPmGfJrt4/RpBglmK9k3uuLnFg32baarwRU
luL7H1E9k/TeZe3ySwl2y3oopKB66Nx0zlXO/SD0akXv+4LqrYvaftO5UwfB
ufP3xBNk1+JOpednDgK9zs/QC8juafsYdK8ehLD1879FkH1OdWTbPjgIjals
Sl6Sw0QInzA1fPgg7AllPjOB6n2SW4t9+9H/IOO62O8P6LyoZxIw9zqsDLbj
cZUn0Hn1I1ua9OmYMuzaNaohhcwGOtr6nsrQ9yS4aQadd7bBp5SEzymD+Ins
75HIk6NvBL6kK8Ol3D7t+7vR/mvxHyQNKMPk2vk7AzuHibOxracl3A7B+9f7
dD22DxNynBdu/QpQgTB2huOd3MNENXOfWFOoCmyyCnTLQtaikX6ec0kFvnZ7
JvkjUya/fD+SrAIeY0fseJGD2v4T/1CqAjx972ocuIaJmujJ5w3TKrDjv++c
/7ai/KM7Qk3zVYWOE4aFBOoHuhbLT58NVgWVXvYZXmS7v2yMNhdUwfhGj+s4
6h+8BqoluBJUIevl5b47yHF12wKiClWh+rHl2BzqN3pD2hkDJ1RBgOw6/gz1
I0f/qUuaequBQEgWnwvLMMHORdPZG6AGnlG2jurI1bINp+3D1EA/yuPbNmQe
H73n7nFqoKW183oLMzr/R01JkUVq8PCH61NFZNn+I+5VM2qgbLtvMw/TMPFt
ZQ8bsaoGl6Qb1qcY0f7ZMVz4hkEd+iTdZduRh23d57u3qUMMZ6FWNHJKj++V
P8rqsBqjI0GHTPP2Ys7eMHV4XOOztkaPztef2gb5l9UhR77t3ndkO0bGcZk4
dbiWUBL2ErlMO0ZBPVMdBAL+/ohAdq9LarCpVweOMfugzcidpdkDsQwa4P7U
8aLIJlTfMt4Izl/XgK5p81uRtKgfcJDss7qlAaODo++9kFO230gsy9AAzdL3
JApy3K2jjP6FGmDOLt67DzkkbnlyvFMDpizWj75D/aDFeblXg9wEJF4q1BVC
NlFLCdMUJEDGrrKFFdlgae2/eyIEHPOfjZhH/aRGUGuBoxIBB0KDYzuQD/i4
3fpoTcAFvb+ruN+kd7rr0X6HgJurwjJTqB9d30EvInWfAJfVj539yEufPPuv
PSIgYrnkfhvylJWypeFzAszDt3x4jPzVpEft9VcCPoetBnoif86gZ/62BcBg
h86pqVXUT6/+d4KNB6D4HNMKFfm9g1eDKj8AC/uH8h7kzu3doalCAJJm7YWV
yI23Mv/aoHbrtHhd5UXk0jiVL90WAHeWen7uRD6exsFQbY0+n1VTZrmQufIG
pbPsAF7N3BRlRvatj4k4dRyAR+nK/PTKECE581mczR+1bymKWi3IX2gKLf8F
AtiRX3i/RI5hjwz7fBbgnw5PdQXy6P4DXXkXAX7on6jJRs45fC5YNxEgwjnD
LhzZ0tXsvuRNAKvSwFtByHSnhVu57wAk0+f9O4l8NPbd7sF7AKfYXTkdkQVf
7Gg6XwRg6qb1Xg05WaSGt6oDlUM7M2s6ZG25BCKzB6DwmG7S8jL6HlB38bjS
B0Czr2B8Bplsw1ZL+Q7QV8a58hOZLcbB5e8EQHDjvgsdyM9vycZ9nEbxhMU8
eovsmU1f9WIO4FfK77+vkJtrCljj1gAUukc/VCFfmlwpkeDQhPvbq2aykRVW
Or9ycmkC0+tR2kzkQeZcxkVeTfAOyZJIRYa9JnZNOzXBYXCqLQF5hXKX1kVK
E1a9pqzDkR8f8ztgJKcJ4SSS6jlkOx9dK3klTbDsrzx0Brnq6p88GnVN2LHE
fekUckC1OvmusSZYdFQZHkMut2ui+0TWhMfZiyWOyHNL5HIeK01w+yV5yA75
rKrL9lhHTRCGsDRL5Oovf1qbjmlCUazwGTIez7kz4ZtcNaG6vt3HBPl8Tcxw
iI8mBJ/TLNZHfuHAc7vCH8XDlrCsg0yzetdwOkgT5sLmj2ohR6gXP/UI1wRZ
T4VQdeRX31SO5UZqQhL/HTlVZPrzr7mpVzVhgkOF9hDy1bq+YNsETVhUIU8o
4vl1OnYgOVkT7HOsWRWQN6+PfetI0QTB2mpNOWSjzIAE1ruawLNbN1EGOZZY
09LP0oRdLnWLUsht36/ORuRqAvf+yRBJZI4LnHl1+ZrQspbJcwA54aUI+8ES
Tfhln5Mghtx19OkLvwpNoOOJ9hdF5qJV9n9SrQnapK3e+5EpWfUiv+o04UoK
Xdg+5JuaRn0irzQhO0UsVwT5A7U3+miTJgQMk4aFkfkjnNTS32lCF6+8Cvbh
vaMTfR2acLPxwYO9yKkNflncvZpwO8FPHPvL8WVLs4+aUMJu37AHWXDTZcZr
XzWhru+AH7ZjNsezxgH0/1EFStgZ2iledCOasKU6dwv296E9uzR+aQIj48Ca
ELLQpcedZ/9oAoVRZBO+flxEKbL8ryZ0UlQEsbNf1yn9ndUEq2u/DbGHXQxG
JZc04bk2TSz2fobuVPc1TfjKpzmI7ZZrb5JDpwWJWUHGeLx5uiPr3xm1YHyL
Rwv2rxGfkh2sWiASO2CP45W4suBiswXd//QxDZ4fr/0RfDe4tWDt750q7IJG
1pZ2Pi1Q6gqJxPP5x/Vm6GZBLaBp2nkMz7c0024ZPSEtEDe1MMfr4fswj3pR
RAtCqT8t8XoV68sn14ppQf3yE3dxvL9/PtdblNSC13wB8RLIilG6i4pyWmBW
xNKM17ui2dap4JAW7NOinpRGnncf3DqqrgX0cg2fcf4os3i/EtbSgptXi2xx
flUbhoulkbTgn/W/KzgfX7TkTkfba8GL8YaHOH9L+Dv9wo5ogXmLchDO7xzX
pSlfZy346aZiQSDH0JlN2nih53Npy2vj/FFZ+L3vnBaYeArEGSHrR+31EgjX
Ar2E9Nd4f6l8MB5ji9QCjt5TTHj/7fbPGv0XowUTQ+7FFOSxfNJIfaoWqJyk
JDkhf50PcCnPQNffMoni/d6hmzmUd18Lkh90NTojl1H/UeMfoetehKgHcrjA
3X7Hai0oetzsFoDMEz3Zt/hJC2BY6m0sMmOfgM2fb1oQsKl2PR55UUTnwwBV
C4xuaBM3kPtfpvQ2/dKC1vSnH+8g5y9odt1c1ALBnFC/h8ga7sktcgLa8HSW
2P0a2UP/UK2HrTaYOfQl4no8ISbwpthBG+6Wu9MxIftvXmxdPKoNixH0Z1mR
Q9uqvkZ7aMPNzLdneJATLJVX8kO0ga2lqXI/csWR/1TH0rUhc+uaiDE+H4KV
nnlSteFNWfz7O8jpeXLlXp46UNHQ5qWCzqvmT87NmT46QNlRbk8gz2y+9aXH
XwdoTnSRdJCNTi7Rqp3TAQMhh/2myEtyr0zZYnWgj+Zb5zHkw88powVPdODu
n6fDUcjb2s/smJjSAZ3wnzfeI2ut50vvndWBlm8CpM/IPrJfNa0XdcA5IGa1
H5+3SeBeR6sLUz1T9qPIgTYs5XFcumAl7DC7hNw7kGoqo6gL7DkD8bvR+Z74
r/ai7xldSLqYvMMV2ac74ZjDOV0waWDfjs9/42JnTYNwXUg1W+fxQWY8xUIr
dFUXXrIr0gQhh45RLnTc0gUNQ83Hl5Fdqb/PS1foQqtOr2kOslqHQOj4jC50
Fv9+iPsPgafj9h8XdKE94sCBQeS52Beqr1d04Z690aMR5GLSieU0ej2QVRNM
H0fe31gUYsSjB9ej7posIXPW6p99pKAHAkoMP3hQv/PjUWCQu78eTMXM9+sh
W+9c688L0oMz/qkCJOQ38Vf0f4XoQRWnoJkJck7AbX7PSD2YuVn9yBL5uMaz
aq9kPeC75iRyFLm/a2XNp0IPhD5s3ROMbKpz2a2wWg/82y6xnEOurWDvnKzT
g9y5nvEw5PS0XVm+TXqgvEqXE4lsdwK0/T/qQUHMg9445PcLkVcDl/Qg7s5J
yEHW8WKbKl/Tg1ALxr4HyGXfkm3n6PQhuS3ePR85qSFX/AyrPiS6hIY+RSbH
Nr0LFtSHP9cn3aqQW3ezbg3V0AdWoW7Td8iv9ZJSIiL0gbvNwucP8ojr87aQ
K/oQVrtDbxKZ8eow3ekYfRBibhT4i2zQdPCkc5I+RHu/LZvBz9P/oqlzXx/q
27ueLSP3GIj8ZmjQh+HcEDoW1H/OuJsIrb3Rh9Le4jubkXmig6zm3urDfbMV
STZk67fNL3506UOO6if9LcifDU8mN1H14a47rxkv8iCpQj2a1gCiFx89wP3t
Jq/v/hcZDCCWv4ZmL7LINea8sywGQNrJZyOM7PrOjsuT0wDGVqoX9iGPGa3/
IO0xgHLRA1sPIE8bGySwaRqAySulG4rI3Cf93tDrGkBX69tSJWTF66lLKwYG
4Gk72nmQBn8vjbv8IRvAvp3vaQ4hL5kkHmo/agCVp/r/U0emNfs8GH/BAGQG
aBl1kZvrrIQDLhlAknLIOHaCdJezbZQBPBn+0qGHLMTRPCyUYABnfnldN0CG
tvIfxZkGsDtcYdgImVldTvRWtgHwmXmVGCN3FhS4hTw0gJvvn4SZIB+NzR7V
KjSAqEpnVjPkC0aJYz11BsCVz0Rvgfv952wHqhoMgI5p83PsrQeivNIbDUDr
vPIpS+R7m8PHXdrR+zwlOijIL996T8x+M4AtnH0nbZBpDAym+VYNYIfnkrgD
jqfylfwKjSEcTyspx04QJU4P0BuCWsN7DUccD9PBmTw2Q+gs9TJ0wvE0Cs8d
EjSEoeOGcBTHczDz4C4hQ6i63FyJ3Zm7/QydiCG8XOyWPIbjucy50HLAEF4Y
pW45juPRWV+0VzWEgZ4TVc44nrIQFSAMoaimRNAFxyMyFyKijcYz9Pg89r1N
f5bHSYbw5mipKv59/GXD59UwO0MYtYlJdUWOkrfWOO5kCLLeBePY5Ptd5/XQ
2Fgep6m5IQ9cbF7n8DSE5l3T77FpNCto751F798+PeGObKfzs+VjmCHYCDko
eSCX6fMnc0YYwpZR67PY7qYh+yNjDGGxgXsJu8H88eTzOEOIsR046IksaPW1
aibJEPjKLfywu+w1jFzT0HxZ/vcdW/LIKZ7MTEOI5ijm8kK+cvzet75sQ5j+
NqCNreJB52tYYAh7ZIIysZO9FQ5FFBnCVq+Rt9gTp1zonpcZwprMrmns+0GN
yZK1hiD1dl3VG3nl7LzjiXpDSLYpccS2DhMTzXhjCCZDmmHYRRcOT314awie
hqWp2JsvxTzb0m4ItG6sFdguV59HGHQbgoiAWQd2Xcy40cUPhvBLLfIHNn/c
Tt7qz4bgUliwjH060bR/ut8Q8kw6OU4ityeHPzwwZAjvZqZ3Y4ulFPm6/DSE
7xcFZLAj0qiH7v42hKUuAzXsrxlcmz5MovVquKyPffC+divHDBq/zHsydkJu
wE39BUNQnVe1xR7Ly3W6sGIIh+bqHLF1Cj6IPqMhQTaL8zHshRLlagkWEjAP
7nHGLniWapzOSQIOj8yN+xlr3/G+5yVB3Qe5jecdfbnSz76dBJSrdObY1a+k
8vR2kYBqs80Am7fJyS98LwlC9/mrY/u2xKtU7SeBctt2OeyWtpeb/kqQYDWX
RxhbpOtvq7gMCXLsj3Njn+/de+u4Agkm6JnpsD/2WR5J+48EYYMsk3j+5L9c
EutVJcGsovdn7B/UH9W6OiTYr+pcgA0jfJfOG5BAxJfmBnbqqIFJpTEJkgW3
BGObTj76LmaFxt+fqI6dN/0l79hhEowGcOzCpptj8091JMGZy+yrOF8qV3zo
2VxJwM2XU4HNRXOvTceTBM4COonY3pu6boX5kOBQyhlPbKHNCuKTQSRYY3/E
jx3FN2/SfZUEJb9LXXA+Jzc3DzVcI8ER3cf/YWeeTT1bGk+CtvgIFuyKL+q5
ybdJ8Pptfz7eLyOZl1asH6Ln3Xz6De83LTGux18aSfCet4AH70fTT0PQ2kKC
miKVPrx/D8eUf6hpJ4HqoW8p2L7jtnQZH0gwluQhgJ1ZlHn46A8SnB6d3ILr
wYqyFPMIgxE48v33HtcX5rG1u+9ZjOBAtGMMNndap0IjuxEoj77RwJZYPX3k
Ia8RLP1xy8X16XB9dYXHPiO4dFvTE9evCkODExM6RvDJsaMX1z9fO+eG+Ugj
+Hk3DWyROTLHBtSijMCnNPILrqcFQ37rF2ONoMNiIhD7p/cFNbabRvDhrHW+
NbJT+N0KoQdGMH+6frMVsnFO3yPDZiO44RtSbY73y4TRjTQ2Y9j6XYVKQqZe
VHQhbhqDdn9ojxry/m0ccb53jMHp7aET2J6PflZm3TWGQSn2eVV8/nanstI/
MAbzG2vbsZlFaEubK4xhTUjDBZ9n0o1ttBYfjYFbsXIVn38hm90yXXaYgH/A
LisZ5BcZ8PbmbhNILw8bl0amV9j+r1HYBGa/CF7Cvm7fpicuaQKZ23eXSeF6
XKAw8UfNBJplzfkkkZtMadTPOJmAmIHdbzF8/t+48zk6ywRY7c268Pm9+T13
l3+uCRw6RncWm4Yvrsk+3wSeTTPswf6TGlEmVWwC/4xo/PcgN973iut6aQJ7
Rlr5cD8QXKKuJTBgAtv37Dq9E/lbFzU/b5cprCu6ePEj93I73EvcawozgeM7
sVusPtwK2W8KlOGuTj68np9aIo2lTUHavOI/7ARqqeOUuil8vznHsg3n49/L
nMqOpnCfw+0lN/KDrRJnm9JMgbvPLhD3K9I/Di/Q3zMF63Y7aezK59FntHJM
oSap9ScHPj9dfwXWFpjCuRcMDthjNXn+pbWmUE3uNGRHlvIQ9c78bgr3EntU
8O91FRo2v78OmYLDs/kl3C9p8Fz13D5qCt3j8c+xTV/8cL85ZQp6Uzs0sH15
H5y4RmsGOX1pBrjfKqsXOXJG2AyqUhlPMyGr3ab0l4maQZ+ruQr2G+9LjtMH
zGD8Hhsd9ge+YfuTimZQ59OTxIg8fzLb1lnXDIy+pz1jwOfP9r0WZm5mcPvK
0A565Hr/3bqij80gsrBcjhZ5aXYyQbDQDEqMz7JgK559+ZWz1AxsGlOoNLj+
hB8LWKlG41v9lYSdEJud3dViBg+0WhfXUb949IEoXeiYGRge1vu4hpwqvmDi
N4Hep3ivHLu3oPmO67QZfH1AvoFtUOohZ75kBj/WSs2w+QesZLkZyOCofa51
FXl9/PaRUR4y9JAb3q/g/lr6AsPQNjKocDlVYSv7uj/+xk+GbfuM0rD9/ynP
dwuSof0P33HsH4uf4mpFyJDe5f8P97PtjIJ1SYpkoFotimB7GdC7XD9IBqPa
KDZs5phxlihlMrxpdplZQtZir7UKUyODFtC+wa7gdvrjpkOGx99femBnCN0T
VKeQYdqCvn4RmSNGrlnKmgy/fyU9wQ7/13B6ly0ZypRPpGIfbRxpWbcnw1xU
TwD2Xu8DZxucyUD7qlUSO+l9jUjpCTJo/PTZgb2JMO3MdiND2yfzzdjDnH6i
l73IsLv84+gC8oPKivf6p8lgzz2Qh71tj8FF5UAyjAafv4N9NeaTpPgZMhi8
sovBdndcidx8jgwvE995Y0ts0pJviyCD52ikIvZT07Y4iyQydDmzdeDfl3dV
OaloJ5PhrPOxV9jxe6ZGFG6RIXJ9ohLbd4ZLnTeVDP6PSrKw5VNtf/dlkaF3
R/cZ7Pubxm41Z5PhtungSWzuk+e0nuWSQeqwmAv2DJFxJzWfDIk3KObYFSND
+o7FZND+IyyNvd8s8J9JKRmqpT/tw75dxZipUY7GE1m/Ezv4mvjc7mdkuEwv
wYGtIncqZ/AlGabKyH/nkB+l0pB7GshQPpA8hr2DPmn51WsyKNmzDGOvfCiz
yG1G8/n5Yh92begSjXsnWl+zhy+x5wp/TEV0k0Gm+l81tuxQ98DdXjI8qQ4s
x84xfPyy5yMZ/lbxP8buD71dNPGZDG69yg+w+Yoi77F8I4N8fWwWdsw2hwsE
lQzipPYU7NeGBr52Q2TYRP88GXs1VPFo4AgZ4ls+JWD7DrHB419k2PXscfRG
PNsWZRp/k6FjzfEK9pDhyG7qHzIkxEIktnVR7fq2aTJkPE8Ow04Yyp+UmyFD
agjDOey32259N54jA11tTjA2HSmiw22BDE85/YOw1cJ8XkQskSGQ6WQAdlCR
XeHdFTJIS930xy4c0susWiNDMeeYL/boNoX4Hhpz6NX2OoW9l7Q7fILOHE5Z
8PtgM/N1atixmoOT9GlP7MmhC2tvuM1h8IuVB/aHIrk6OUFzCPF5vHG9Jmww
7K6IOdSnHNn4f5nhasceMXO43b7ND/s+6YY6i5Q5WLI7bYzva1i4lIiMOdCO
HNwYP2+x105CzhwM38lvxBfFp7MaoGQOreeTQrEbSLJ/4v8zh/T82fPYy2GC
3x4dMgeZjJCL2D7DMzUD6ubQlDm6Mb95fNSCZcIcjm7u2ph/KqktfZuWOaC6
EotNKc4NNdYzh4G9xjew44YTvd0MzOHXs7Jb2E185x0iSObAnKiWiq1y3lqt
ytQcSqvzNvJhjxHTirCNOXwRGCvGVnyv3b39sDmomy1s5JfekQt5nPbmwBS1
eyP/PE8vUtadzGF5ubIBuyzt95PPruZwrYLl/cb94x1HEoPMIebF3Cq2bRDb
wahgc6BA0Ca8PzxpDNnCQ1C8uZtZNvYzT0OV93lz0OT248H+qFbGaXDFHBYM
pSQ37r+e8mrtpjm8cFxzwg7le39n9jYaf07WCey4LE7f8Tto/SIo3til5TGC
n++aA6E8ehZ75VtoYHkueh59w82N90kfE/UuN4ebI1yd2GUd4tc+9ZoDQ1+T
Ca4/CcL1uUsf0PrPF1hje52xfbnjkzlwLKQfwd67++qs4zdzeHYz3Q873mf4
yOCIObw+xH0L25M9U/H3nDnYN+cOYAsZ8fSv8FtAp3ZyCK6fsY1rskKOFiCV
tVCO6zf4/ZDbecQCXC9KvsCe2dEuv/2YBciOOjVjO/jdVeQ5YQFH2uo+Y0sJ
qikzn7SA04lu69jtfmeJqVALWPmsaYDPj607Z0xeplvAaJdaH/brpi+mtRkW
wKvNMIAd7P/KrPqeBYjdbh7FHmhKMi/LsYD7WcQSdrG/nFVegQW4W/4RxOeX
RbOPQ0INGk/jf8ewb5z+5Xn0qwVcamYfwd6uF+Jn2W+BvpdHx7Hv87MG6w1Y
wNbp5zPYJbWSlyWHLeBMrQk9Pk87mXwzF35bwEnR7cLYHOlzPQnLFrCvSf8I
dtTrTer12y2hsP5qF/bW28naZYKWEPPT+SP2bY99pIe7LOHvrf++Yz/g0Le5
vtcSJm68Gcd+Yxvjd1jCEvw5Q5nweU73Z+uDv4csgdPPUhU7lHfXlr2HLWE2
8Gk6dlsxix1hbwmXmZfuY+8ync1xcLSE/DLVfOwXV1pVbh+zhGz7rI3+gW4h
xJXN0xLEp2fbsK9+7qudC7GEN4WvV7A/Br1i5gmzhMxt/nS4HxHjLrSUC0fj
y+Blxm4xuvLLK9ISBngJbmy2WkVe6jVL+Ppohzh2Umai97t0S0i4MGuBPaQa
VjmaYQlh7+lssRU/utMxZlnCQwZGR+z3WyEFci1BhX/CFZs/YuJV+RNLUBzT
DcHOcDHaca/OElaP7MjEzhdnaAkYsASRq7eo2N2CmssnBy3B8KHUCPbKljBJ
t2FL6OipGcU2nZuJOzxqCae8X01izzQMW2pMWYKqlf8qNji8/sZEQ4EH7Q58
uB/zNKPZQktHgWvtZ7Zj39BSg6VN6LrOtZ3YP8TK7o8zUWDqSZowduxstlvX
FgqwSzvLYH+Mi/ybupsCP44n6GLTRbzYm7yHAgIpigbYBwKXLa8LU6DVo4uE
fd7+dEW4KAWGGWfNsEXEnM+5yFDAcN/IYexT9VoM0gQFZPt9vbFTys4fFNWk
gJdAtg92w8NqNyFtCsxebPfF5omTb+HSp8D+9a2B2NV2e+PnTSng8VA3DJtx
hlag3okCL1MDY7EXilLiho9S4PugSxz275My9MzOFHjebZyA3fnTYdLUjQL1
fYzJ2KlfKt98PUWB0GciaRvxp5iq0vhTgCXiczp2uNVIkXAABYJNozOwXTq4
0j2D0fzs6c7Cln510n/hAgUSJjnzsLnV0xyJyxRozGZ5vDGeimaDK9EUEGb8
+WQjvkfCu3mSKDCgSynFtk769E4mmwIdInS12KpsTJVBDyng3yrzAlvoiuL9
2scU0OXUrcceOxsfbFRGgcpfom+wO/7VOCdVUWBeea4Ru+zkmOmnGgrkpD9p
3liPY7r73N5QIIb/0ztsA6t7yzNtFPhp9KQdm8twuSviAwUO7ZPqwv6qZp23
9TsF1pLse7Afyhafz/hJgfJI1ffYzGGF8gdZrEB06eMnbPe3T360SVgBXeOd
zxvrOVnw8o6qFXhvKt643sxbkHrC2Ao+71/t25gP1ccBco5WED1/feN54scf
ma6etIJytdPd2Dnk373dgVawz6qlcyN+QtI+L8wKYkVoO7C3CT51s7xuBblm
PBvxJG6e/CN20wpYv//biJdtUSZgLd0KWmOfbcwH3YfiC/kFVnArf3Vj/sJe
TzOGl1lByObwjfldKFG4TqmxAmHd8RrsifjyO+vvrGBZJr4S+4vhsxKr31ag
oSRQgP2IEr+WPGkFjInnHmGHHDlB6v1nBf1VnzfWf3sg56DFihX8UUzIxba9
58FJZreGdzbfNvLnw5yAL0nGGoq5JBOxu7NDpIjT1qj/d9vIb0uHv7oHz1hD
GanlNHYvj7uT1Dlr2NQs5Y/dd9kqfkekNXSYzW/sl69usn/nk6xhrPOWO/bI
gR9lRSXWEHSbxwF7NL1nJKPaGqpi6Tf23xh7/bbrDdboe2fFaiPeybRgj25r
yH3PQN6Yj1Jztb3T1kATGK+zkS+vhyJHF63B7+tHTew7vYHvntLawOPtkgS2
yuwdO1VOG+jX+3sIO/TgYDBF1gbmr69t1I9WvYCX25VtwONLhhT2ThtGZiqB
bG10ALvujMTtk2Y2wJHftB97vcq//IqPDQTpGe/CDpg6xTEXZAPuB4QEN+IR
Pel2ItwG1qzoNupZ9y03AZ0EG/Cmn+bFzg1wCKMtsQHbj2c4Ntaj4PAH32ob
2O9YxYYdN2QtM9BgA4QQAyt2sIU5ta7HBijHXjFhG8nq6YbO2gBLRzct9pLV
K3EVBlu4dpy8juvro3Oo9eCxhYjUhRVsu6za6XIRW/gT9G4Jm6VJpe+0oi20
zzcvYFeNVz6X07EF4Z3o8wPZnUvp3qSlLYQtaM1unA/KJZeeONtCqGzNP+wm
RxkPr9PoeQ8dprFVmMhF5c9swXH71gnsp0W+8+vrtuD2WXIc+39Dq/G4
        "]]}, 
      {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwd13c81W0UAHAUESpkRoSsbELW75jXvPdy7ZGmXRmZUUYJoZKsymgZaVql
3GtlFQllVpSmVUJS9D7P+5fP98Pvmec559i274j9QRYmJiaVNUxM+Kfk2ZVr
BVsbDU885UnOy+sgatnlxQ/5FhJNKfu5j1/sIBoj71yX871LtDzsiNM630G0
qgb7sPkyiPJ6avn25A6iPa3XYsHnBVFLcX2+8WgH8f0k1+fI8peEtI0q683D
HURs8135X0V9hCRpawi/XweRDYt3fqYPENR4+ukEzw6iQzfx0ZTPO2LiwNrF
EtMO4pY+3/Gdd8cIIxHeLSKGHcSPkQOFR8vHCbfI9Bv+2h3EcRH293NFH4js
6eHIMvkOIieH7DOb/pnwitqbd5erg+g8PxL8xWeWcBr89tm7q51Izs3uuKD2
nXgj4RLB8bSdUPQl3DTufieSb1oKZj1pJ0LWnT8WUv6DeKF75cX+W+3Eqpkm
/XvRT0L5i+fo39PthFBztMl0+i9C3If8Js2gnbCqX0f+5POPeJbeu+PKlTZC
7d++BYHv/4j3try392a2EWkSXt1S+kwwvYaJJnq6jTi6ry7MoYUJrGcjRMKD
2gjTT0Et1f3MsOsc/We7cRvxfvrN3siFNeD3ZKDZ/lMrIbFSe3lFix1eKvxc
072jleji1uJY67kJnuy28uhrbCF6rXlzu2M2Qcd6S+ea2hZiMGVGJu/yJhj3
Ukwvvt1CTLCWmCqPboJ3du485/NaiL8rgnEu7jygsPPfroHgFkJh5vdihSsv
nDsbk8Mv3UIkd9dPODpthlvFB2+On20mMrjyQyXCN8PF293HF5KaiSyrcJbJ
i5thb+jbYb7jzURhq7JE3KvNMDxdSwoKbCZq6IXu5Q788Ph4qGCZZTPx8U58
76q9APitiZyRYGsmjM+aNZRQhGBK35vH4nQTEWdVVdZ7WAhg427RtyeaCDqr
1IWVdCEYUxJsOR7ZROjGMHnTngtBapzu5Du/JkLD7zHnPwth2JG45LPNtomQ
NlFzdjIWgYf3rgwW8DcRbL9EZ9buFIVC+1tVgXcaCdMHZwZUHERBYFqFya60
kUg4tNzgFioK2XLBYcTVRmL1w8CFe/dFoYSk3ayb3Uj86snc5aEsBkPJ6lrl
xxuJL+Xspyplt4JfMvtzb7tG4qDKMrcatwRcPdI5L73aQNiMnL4htFUCWIc3
HBlYaiA0T/MbMKlIwCBJvivrZwOx9p1q4AuqBDSI7ONQ/dpAXM3w6TyUJQFc
QsF2n/sbiHfT/UnlW7bBp39HLlPuNBCtefu2Zipugzo/Nr1bZQ3EHbPv1VEG
2+C1b9EGnhsNxPErnB8tvLZB+xxN9s+lBkLU1tjk89VtMNz+7R0ptYFwrbj7
T0pBEu4JHoh45NtAgItBDqeeJGgFPt9YeaCBkFv7TPmntSR0xj6RqdnTQCy5
f/JsOiQJ4ou8VwddGohsTrEne+5Lgo1g7Zl0ywaizz818oqOFKz+7uS7rdhA
2Mof/CFAkobYIravE3MMYvlM2OM3TtJg+u5SzuFpBlE6c+rUdW9puCuba8f2
hUGsrboprJ4kDXIU2UKvNwyizvCLke1TadBJKL1e284gZBwCMhNNtsOBp9FR
08UMor/mmIcVbTusdzHwpFxhEPHCaTI8+7fDS72tCvRcBjH6tqKuIGE7tC+X
aDedZRAX/GbeP2rcDhv3hWvtO84gmE4Ea3wnZOCb1M+AOU8GcWc8fqWGIgPk
GparIm4Mwt00sy3WSwYsteVLyU4Mooaj0p3zhAyUpt95O0RmEIFZ84kydBmo
6poUOAYMYqgsot9DXxZGlKT/Dm1nEElcyQVSNrJQcfK1Xq0kg9A8kuv7zV0W
NIK5DArFGcQ5zUd/I47JQiJPA5wVZhDmjGXpC3WyoNoMMdPcDOJBf2xYh44c
CHQO3MpaohOlpw7se28pB5vGKt3GF+hEgZY15Y+bHDhT7aJ2/aQTqblC8kqx
clAZLlvFOUMn9ntUjp5rlAMd4anPOyfohBt3fkdZrxwY6R95OzJOJ6j0uJqm
D3JwL0fuRto7OqEvQT43zyoPubvuOW4YoRObJ76YuFjJA2VRXfpcL51Yf/GF
arC7PDiXnY5N7aETTOY1YqmB8hAo9IvzbDedmCpJ/PU4Qx4uBuZG13TSiacB
W2+J98mDYPPbhJhmOvFElDVXZ0Ie5vi3BLQ20okHXZMn7Rbk4Va3+A/hBrQf
lUe7EwUVIFnBKP3NEzoR/pPG+9ldAdryRFhf1dCJwOu6//4FKoCX/Mthv2o6
sc9x25TQcQU4ca7r8boqOkGunXlqVaQAigVOTrvv0wnZYylRdyYUIMr0yfTR
CjqxVTHIu21BAazF4sWpt9D+3jjRxth2gL4gc5dGOdoPIa3EK78DsocPOG0u
pRODLIyxsEM7YPaCqJHOdTrRXXmjK+P4Doj133LE8RqdaDmQVldydgfs09U9
G32VTtxvdc0aur8DqOrr944WofuKgPi5ph3ge87huxBygZzsYc7+HTBP+6Ho
WYjuK3WeZLC4A/5y7PH7e4VOxOmNaDqtUwRe8gmSM3L4VOO2I0KKIHDk+9lH
l9F+yWf/FOkqQg6br3jWJTrh8i/syyNrRQjwMDTnQibf83jV66EIo7ZsOWfy
6YQer8LdtScUwahpfXhhHlo/s1tH11lFcM3x79yJvOdHyofsIkVwv3C3vTeX
TsyNPVrxuo/GWy7YG458sueroHyTItzdtHpKAlmgQVh9rlcRrEQyZV7m0Imy
u5Y2jz8owj53Cc1kZP3CKO+T84ogKnS40Ay5O6MszpZVCa5kgSsH8p7jQ/kC
Akpw//Ee+75sNN8hjup3MkrwWYcr5hrySc9dL0q1leDjzfXtUciCtn5fgy2U
oPj0Djkn5HL9vDV6rkrA52mYoYOsr9ghttZfCZTLeKckkLu3/NbuilaCyekI
jY3Iezjl7bPPKIHhbQOnNXi+ZZdAr8tKIO6nYb5yEc33LTlJ7rYSJFyTW/iL
LDD8sOhHvRJ4vZ1yYEF/X9bxpa6uWwluXaI4c+P5Hgm9SnynBJ6eEjNieL5S
i1mb70rgf0OZUxPPlxvJIcCsDB0LlkUUPN/pUql3PMoQ1GNUGIT3FzFoUCqp
DA61H39nIwv4sLsEayjDIXXWq03IpU46IbqmypDzuCTlJ7KeuW/aGkdlWCOb
eE0en+fO3JvPDyqDNd+R9wfweW5vb7gYrgys4ia7biCfXCu3IJurDOobWZY1
8X3NO2/8UaoMr1QvW55ELv1wWr7uEfp+KiZmELmr6bOnzYgy8NwKcj6L4+GB
YCT/lDKcm1T/+AN5rpiU+favMphA/jZXFE8C8SWtQVtV4GpRTfBOFG+lQQNj
u1RU4PhXkYByZL096/6wgArMNCS8lULxuofwUbm4VwWmJp6vSqF4LluRyX10
XQWkmhNbnVH86087PUioVoHr07eUZpG7R5OeW7eqQEx96K1U9F7mHn9ievtZ
BSb1XOu6itH7NejTjOdXhTe6T14moPfo8yfzyg0XVdj2LJpSgN5vFnmqOWqP
KnTqqyvuR++7odjsm62vKkiYq/xUQO9fyGJJazFCFQxGx7c036YT7VmePeY5
qrDV4MTIZpQv5JXl1nx5pQpTQbzKWg/pxOSeel8Fmhrs5pA6qdGOvq8SOLvq
pgZ7LGrvmHbQCdN1QdW9+9Tg9rqHD5xRvrt8W5LlWIgaDNzOlUl8Tidslk9f
enZeDR6uvzsyg/Ll7Qv23YE9auDgQJ7nHaYTR1o/a9y1VQehg5+0PKbReqEi
QNFJHT71zgpVo/y96XHQtbLd6qDnnC+88TuduHf3N+/1I+pAtDc5t86h88nl
nMs9rw5bbeemAdWH8ACVewmv1CFvmlbjtYZBxGyKUHTy1IAQfZnXG0QYRKob
2/aVQE1QlLKzaSExCENVrsWvRzVBfrD2Ib8lg/jBytv2OkYTfn5MfehtxSBc
7ov53UvTBJp37oF1tgxiO/vO2/srNGEsxIjbxJ5BNFTv39k5qQnScZTcIg8G
sbip0SzHfyfEX1wzNBqE+vxPrQInQ3YC2e6DnEgIg/B88vxzUPROYEn1vOkU
yiBafAZTrFJ3Qtl8nnhXGIM4T5/tWinbCRVwvPFuNINQDNzqdODrTnBNfx5u
eZJB7G875q3mqwXEMm0fI5tBHNCXIS8e0YJk9a5dgzkMwvt+z87HEVqwoYeX
9Tuq/76XtrOandaCd/kSQaKXGMThIy+uudzUAttQfl/fQgYRLSg1fmJCC37U
vL7xrIRBZPp0unfv0Yb3QdQtD2sZRNboUZMLvtqwosQ9X/GQQVy0E9/hEqQN
LyOzLxU9YhC5ekeXx09oA63hDO3kYwZRsHFr3kKBNiSuBLoZMND+a4Nfi77R
BtbpGd+wVgbRuE7YLsBVB9ZJ5t9f7mMQn64pWw3t1YHUWwm/hvoZBBeYmpD8
dSCC5tle+wqdf+SRnVLHdCBqyYvzyACDmP3yVHjksg7EBo4IPx9mEGKdIe+t
xnTgZsn9EBhnEMbeySMPv+iA/N7bYezv0f5ZCvplfuhAvUQE6wvkKt2OVhaW
XcBcMfnMeYJBWN8Sv1UntQsqEpOXnD8ziKi056EKPrvgpP41gg/1ZwVy7wNz
j+yC9KfDui3ILS2/DrJF7gLn4sOdoTMMYtOKpMv75F1g07G9rHuWQZQcitLP
L98FaVI7wkNRv/eKLMO6fmYXCD8uHIr6xSDUeOKyvx7VhbKqlHqCqYGoYx+Q
a4vRBUn1gOexyMZMyo+vn0Sm3bN4jOwwO/LOK0sX5PetPaPJ3ECEd2nLv67U
hYaPO4wlWBqIJymzj5vmdGGwVWB8dE0DYRZvTi5a1oU+ab8/PGsbiO7IK2Ox
LHrwY/lmqjnyOx9r1l28eiAa+4PjDjKLeQn5rpoezA0I5YezNhAWLF7jl4L0
oPiNb+gMWwPx8nd1aFSkHvRf+Cy8ZV0D4faDi805Tg/IkYkGJOSAsToF3nN6
QFqWWr2CnEEXOJp8Vw9KeDjCzNgbiP7obrawGT2o3jv5JIajgfAM2Z5nv6gH
yg+7ooqRP/nF7FBd1QMfXZ76p8i/XBSok9z6EC3DP8S1voEQ0U7K26ukD93u
CREXkff8NFAkB+qDnWrcy3OcDQQ3L1NP/1F9+J7Jeucecp1qU6h7rD7onK5n
60HefNj8sW+GPiwINatwczUQ7V/IVon39OFQhkBYPHLYOp4Zjkf6cHOHpMUV
ZEmZvvPnGvXh2S7/Kw+RY/Y7D13p1YdiM7XeaWTVt16+D+f1Yb9pUrQ9dwPx
5u82LmJFH26UGoT7I6dumbj7lNUAFmIzl+ORJ1x8f/UKGMAhbs2iu8i5fUFJ
0zoG4PxYI4x1A7qvOXWFo0YGUHmt8pkw8tymha5lSwMIlth0XwnZhhzFz+5u
AE98j+9wQGbqiL8uGWsAGqrcC5eQb382sSg7ZQDGteTBCmQ3NrYplQwDYF28
Ra1HrjJJ1TAoNAAnxaE1b5B96ZlNzo0GUB8xkiK4sYHgf+Pg/bbDAIQeDuzY
jtz0R2D9wV4DONan7KeOLLrrkl3IBwNYo8T9yBq5p/LaWBqrIcTwZTZHIcf2
HjzJt8EQ+MX3OZ1EVvghK5cvYAjz6q2pGcgnlSuOlMgaQliy8UgxsprtYT5l
VUPI6H+9VI78NkC1tkrHEN4Y/KqrRNYpq1pttDSEDbH9Ki3IH9vCr1rYG4K3
J/fEM+TMTzrmL9wMYeJIJ9GHPCVVnz4aYAhG0PF9DDnP+ITa/qOGkMN+mvQZ
2Xyv0auvMYawRqjRYhq5uOCp6K90Q+DYdtV2Cfmyh+KAY7YhHA1co7+CnCty
4XxVgSHYxPQNM29qIC4M/rbmKzGEeuFWBTbkjOw9bCF3DeEH91nF9cgpDm0N
PbWGwCv5fowb+SSv8jGVBvS9eKgFD/KJnqydGe2G0NG9sH8zcnTGn9mpHkOo
+i2mKYgcZrOv3HrIELT9Ch8JIwet7zhQPm4IsZ+UFrYgB7SriHN8M4QHurGf
xZC9k7KHfOYMYVXZ6Lw48l7TlQuty4ZwNk3ppwSyB8sB8vY1BKSLLnJLIjs3
dLKf5CRAupT8Htv+uFrzez4Cji99C5JCttXPjTUSJaD19fE6bIvlVe0iaQJk
uegMbJOHB+dWFQnwafWIxzYMf17huZOAsQgeJuxdmho+TwwIKD4Vp4/H15zL
27bFnIBAU0vtbciq95hGo8gEsHJw/sDr3XHYJ3vQiQA1uYP+W5FlFLup2l4E
PFhcvCaKLPlNkzPbh0D51KtABFms9NLT+SMENM8bugkhC3mzxNEiCRju0hjk
R+aT9tN9EEeAY9kbIT7kDe9fzG9KIeDXyIjoJuS1u6/4decR0JhnH8yB/G/L
WmmlqwQc6eZoZkVeHvJ/e6acANrtzP/v+7ujDs3yMQHPnmR7/kbxMMlXyF3a
TMDnbGrnPPKnl6ztbM8JMD/s+m8WedS2T79llIB3Pq9aPiIPcOr+kvxIQJHG
aSccj70dRffjpwmoorBWDiO3mx2WIVYJGH/2obsbebhgLfubjQC1wjnXqpAH
V7QPcm0GCL4tdOU28iuPgCY9IYB87b3eN/H7E+mNyZcAICW0+Ocgt2YX/nBW
A7isZWQTgVyZoTvSaw9gnnlsQRl536UNrHVOAC31BqP4ffOWvlcudgPIFf9S
JIoc1JiacGQfgGH0jaccyIrzw/JcIQBR2pnJ71G+uO56LNLsPICq2n37DOQs
6Sf8D18AnPw1M/kS5TMTtXNEYR9AePD4nqfIcwYH/JIGAOoD+RsfIlOdueod
3gHobsw2LUTmSvU48GMGwGcLaW8A8snZvw8UNhiBD9dLPSbko3UG1Cs2RtCt
0tm+FeXbarc2liGqEfx+SNu0EXlxmVq92dEIunr+Wf9D+T1K74BImqcRaN4O
Ln6HfPxJ6kT0YSM4I5TWU4h8mj4Q6XLOCHQ5dp/dipzfFFzM128EX9TIzYKo
njA6b8yluBvD0cEHvzlQvXog1BMc62UMX7r2f1hG9ey69/L3oP3GYLWpr3cS
OZWFMuscYAyTMVeau5AddJcmtx8zht9/H/44j/ytzOpjY74xkPuabuJ6uTll
duD3kDFcYicf24nqKduAsPP0G2PgZf/iJ4v8W9r09di4Magxv9wnjPy2Ibe/
7asxpPKyHV1B9bhsyejlxd/G8FWyQqAV2dA3q1NN2ASsURpyRfYj7ar3czEB
vdcj21JQPZ+RE35638ME+uO5jh1DDln/+/nvPSbQtpLx4RByTNfD0RQ/E+jd
9um9PfI5ms7fsmgTsEr4elkMucZLW+/bZROoLdbnqkH9BEvkzkf+4yawb52Q
4U/Ub5x25W988NEE6GeZij4jc+kttC9/NYE1GbO8o8j8q1WDqXMmMNPGovgU
We6k5lL5GlOo+hazIxeZck5De3K7KYR90ttvhHy5VK06wN8UJl+0tReh/qZ9
aH974WFTWFfMfDwHeX599khfiClsVhwzyUC2PrTMrH/MFMpJccwxyMtqzWSu
NFN4l8wwcUF2fezwpeK2KfR7tb7jQz45lfRn7L4ptLYLXeFEvif2aAN/jSkc
udfovwaZPU5sZyzdFAyLWbR/on7roemneNsXpiDnn5/ZhyzQHbFl5rsp8NgX
kHNwf/avTFlywRTs7n7gPod8WHXUyOm3KdSsrowmI7dmgi+d2Qw+paeXRyOH
OXNUZ/CaQamUGIsXcv9YPllF0wxykjXzFZDP/6yPD4owg4UtX7Ty/6H+vPfc
Xo9jZiAuOKp9Dtnm/n4jixNmMBr42i4Jme0IB7PEaTNYvyOhJwQ55ptD3Its
M5hiU1+0QfYenzyuXGMG1e/7ulmRTRvou0XqzGDx3UHHlVUGsa3wvCEb3Qzo
tWk/55FHPbRX3zw1A9outfAJZLvBhNj0V2ag38md2YKs/0I4ZmreDNKoA9wp
yMJ3ptwHl9B6vJqYE5AX0xh6LX/N4N3Hcs5jyPetDv65tNYcBMo27D2ELNN6
L9p6szncj6VtpCHz1JOiyjXMYY56aJ8k8swlEddsbXNYMn5fJor8PHpaJ0HP
HDY4V7AKIifpXFhyNTEH5uT+35zIfyvfRnDQzGHTiVMvF1fQ/w/lYeG+IeZQ
mNQn04PsJLb6tjTcHMJKXpo/Q356Non0NdocvqtXx7QiXz+aI+SfaA5vg4rk
65H3GT6qC8gyh9Eh9ZO3kHvvGUlV5JrDluLTlBJkI6nOM1OXzYG3uEzlGrIE
+4jHoRvmoKbeoXQJ+e3Lv6uHa8wh9FuxWBoy2fSUz906c3jQfuZMMnJ9DXfP
LN0cHt9W4D6FfPnS1uKgNnPQCf1jdRzZ7SCYhAyag56d8u1g5M6B9lsPRs0h
Xf1P1WHkXVZ2m3+OmaN65fsiAFlIZd/H0K/mkPMkX88b+dVS4umwZXNI2ZYy
7Y5sGsD1vXrVHHYnnUlyRa56k+WyyEICjUpBNWfkzKYb8hGcJMiaNKqzR2bZ
qZxZu5EEMbr5uVTk4JKa5V98JBAd/H6ajExNa3sWKUoCvSTuPCvkhlWK5iMJ
EggOp9dZIKsED17+LU2C/Wvip8yRNzh9PRStRIK1nprxJsjPxTk3xRiSoO2H
mr8Bsn7mhcgnxiQI0Cjm1Ee+tVZ0/K85CRKZjj3RRU79qvgglkKC2qSv1jrI
y+7VInQaCUom9BS0kf26DRJXnUlQKXhUUAvZopLscGIPCTrNebZqIj/cPvCE
cYAEZZ81tDWQZXO9tjP5kYBcUrtbHTl7/Zd0OEQCSZdjWWrIbLFBi3HBJDj3
3HNQFTl8dml3YxgJWAYMFLA/7o1vY44mwXvL5RQVZId+DlXj4yTI/xX8Sxm5
xTwzNyGBBBcfJIZgf/R+3BWdRIKh7nMs2GynJ1hCU9H5HDQqUMLrKeHWCcgg
gVFYtBm2RZvWof2ZJEhYkVhSxPv77HXVPZsEWivCNdip61IGaPkk2PPY6gT2
LdkHXDYFJEi5dpmG/Zw0YmR6lQS2L36pY0/7rI3Qv0kCqpWJGPaGZKUKzXIS
aEp482KrlDqNK94hQaEH6X9T208IbH9AAnXOblHs4C+l1mI1JMjUHlfDzmTv
jeOvI8G+aR877Adyf6q56SQw17E8ht1nIT3J2kSCManAu9jzvrYSq09J8Ppx
7TT25pRwx8UOdD+cfFp4vzvLClNnukjgJX4wGdupo53x6SUJdFkuTmBHfP0x
//YVCVYYKVb4/HI5tigMDKH9HVCowx62PJTVNk4C8bOcNfg+/vhldzA+kuCL
oogxvi/RVMZq7VcSPHsXNIC9u5PHr/QHCYIqM8Xw/Z/4pltQtECCiMkd3dhF
6w/05f4mgaxP2WkcL++tagxSmC1gg8v05p3IawLehcSzWsD2scQv2NJn2Euj
OCyg4XVRC44/72duvP48FtCltTkbx+s363+frLZZAL0u4BKOb85AOVGT7RZg
/bDhHo5/xTQ7Oz15C7gS+KXLEPnw82uPd6hZAI+Yk7gR8pyNxTkuIwu4fXGn
KH5PfIeCn641s4A3RrcOkZA10/OX/1pYQM8k0YrfX3jX1IFpqgXEegSmWeP3
Ynt+V/ceC/At8/C3Q2amDL8/G2cBbfaarruR2+mOUkdPWkAyzxmOPcjnlF/u
d0m2gNOuoYy9OL9taJ+QOGcByh/v6h1Ehq7qT/cLLeBu6mhoIHKc9flvfXQL
+LB+W98xZCYLiznBFQswbjbsvoLHr21W/8tkCQ1VedxFeHxZInRsrSUQT8yp
V/H467TmS7ksQdTX691NPH6r1OIuUUtQLPgreQ+Pb/rvt7ueJagOB2s04/GN
apiLoixBx/wq/yTOl6afOwdjLcHW1npkGuc3klAWT4IleLU1X/2O7EuOlklM
tYQ9e4e1cH146W5o7X3JEk5M3ghmRvXjanhrlmK9JUjbZ0kLIZtWvJZ9xGQF
uzWct5kjJwv+su09bQXnlauKi5Gz2ts/NJ2xgncsN4nryIVR+VGVZ60gYihm
9CZyzYjBjawcK1ib9Ji3Avlj4cm/TiVWwF1aHlSDbCzHe2uk1Qq+zTya7MT1
S0eJ/SOrNVi7d1bOIbN/W73yisMamEcvb1tA5rvUo9HKbQ0ifXnpv5AVVkK9
SvitgfqZac9fZNfGuhq/7dbA+LNmBtf3GkuLgzOm1uB6dKxcCDnIbX/Tr0Rr
KPwtnqyPvKHw25h+sjVkXJUdN0Su+BD8Lz7NGiz6o7WNkD8HxulzXbSGmt3L
I2bIu09cqZG4aQ15n7espeD+4/pAuWW7NRSnDnTvQZabsb5wicsGrk4VGSQg
t6r33R/bZAPJVyP0TiIfiHDr2c5vAzZzFlq4Xylk8uO+J2YDMQ9GJVORBfiS
Trco28Cv5ZcD55HX6jQcm6baANegwf0i5PF4zQPERRtwkwiUfoIsI7AhIyjP
Bmi6lXX1yP7ln2uLr9gA69YtZAbyfG8+59qbNuCXSA5sQmaXZq5sr7EB9jSb
pHZk5dYuZvtBGwjJO6jajxzqVrIjcdQGVg7Sc18hP5yJc6waswENH8PV18hG
gpplAl9toKfxccMQsoNvPnXktw1smh2Xeoccvd6n8MAWW7j9Ie3AV2RGAXRc
FLcF2nMo+ob3oyHys1XKFjx6dYcmkdPdu8zlFW2h5Tu7yQxyUYXGzLS+Lahl
mCzOIbeRmQwidtvCKdYPo3+QN1/IG04ptgXrxOgRVtQfrn/F9zLkhi1c+/uQ
xIbMJJjR5l5mC51cHx5gT+cnVCndt4W+4NVT63D/eTUg42WDLXC/DBbnQI58
YGAsPGYLQwvmEly4X52v1WGZsIWcj0+PYR/QUleZ/GwLPoeMX2Pb1cmI1s/a
wvmnOsncyApNGxf3/LMFYxHdsQ3Ib16Ol5VuJcOA95m9PLif5fMoOi9JBuNx
/9vYnY6vs6NlyLB2wXUJu2aoM9FGmQw9zv5neJHPjVd6fjcgw30Ft5t8uJ/+
cYpHx5MMFYux9/iRdTSY2LftJUPWzsZpbOWw6FWOg2RweCatIIC85ffhyZFA
Mop/uyLseSaXpydiyDAU4pMgiHxzk0JU2yUyCL3I3iqMv//kurS2iAxnJSLs
sWsfp0QYXyeD3SbfU9jt3l/D6ivIcGNHwhfsb09KQyrrySC21HxNBDkkc/DH
90YyRL537MH+48MerNxKhhVF1r/YXHy+R8q6yRBq0kTdgqzkJxtY+I4MeaIf
ZrFrDJ0nRz+QIVsjjV8U2XDzaX+RL2SQGvfQxSYzPvle/E4GhfDoeOwg/psH
zzBT4HnqS1Yx5KVvrybaWSlwqHFMGju+gfUA23oKOBRImWBnBhzcF89Lgfkj
VrHYVY3SXhFSFLALI33B1s9xeFslSwH28a3MW5GfBp70nNtBgb/6WsLYrwUn
3A9pUiDnmwIJe/c030i5DgWekDk9sT81mbh90aeAcLtaCPavQ9dc9ptRIFLc
OR87zqRvoMiSAr82ut7GZhde4/zWlgJluiUMbKGWfY6uThS4vl/5PXZRXmZ/
thsF/I/6z2HLH2mi9e+mgNfEErM4sq6IpD3FhwIv2PjEsZtm7V6mBVCg/Vmx
Irb103hq5xEKTG5O2YXtETRONotE87n42GFPmPF0J8RQoOngXg/sQ1uMbBvi
KMAkWueNfby1yFovhQKfStOjsNku93RGplOAM5MzAftsMJNVzXkKUC1nUrCF
SKodPy+i83XWPo9dJLrHQi2fAucWP+dgy82dbTtcQIFCbaYC7HttDPOKqxTQ
sYm/hq1zZfbp15sUmEgPLMVuDBE3k71FARWn5gpszaiGUZ5KChgecajELj2x
9+jfOgp4x03XYosmsXB9bqIA2OfUYZ9Lu3btZScFfG+7PcZee8FU70kvug83
+P/3kXkfe28OU4Bb0u7/76cKk/zPv6cA4/nFB9h7bsqyxHyjwA4pwf/nz5df
sg2eoUCErdr/6+uvaM/znkPnO/3m//VvUM376L5IgUtiWwuxLSr91OyWKZC/
MJeHnaClG2u+SoE/GZ5Z2G89Tk2IMVOhj8Ur4//zG3NU5WOlgupbhXjs6m2G
r7nXUeFtxK//z99+v0wMOwcVyFSvEOy0T4ttK1xUaN3Gug9bXu7doaUNVJi3
MXPFbvVr4/u5iQoaW7ZTsf9N5Xh92UwFNdZ2fezLynGsHwSoIEhLV////IN8
b70RooJb6aIsdshPnV+9olSw7HrEg/3p91BGvTQVPtIlxnE8Juo1aT6UocIw
6/Z+bInY8uEHclSwb3rViu3GdEymVJEK1VGGt7C72UTpmZpUuFtlFoQdYLH2
QLoWFXqymvb8/x5SpziSdagwGz5HxTbmrneM1afC857Dqtg1fLunfUypcK99
bhK/1wKJIlEDByp4aM06Ym9IVWtXckL7YQ00xj7xsyl0qwsVihMqlLH3tH7s
/OdOhd8Tx9iwJQN3RDXtp8KTpoBKnE9u1ta8IoVSIaLJeg32HXJXhn0mFZaq
ZuNw/tr6cLeuSRYVErNP+GCf3fb9o0Y2Fe7sn7LFDprnNeDPp0L9Bi8RbPV8
l8mBYipcb394H+fLmo8fSJ73qcDopQ8LIdfHLDP59lAhOUpMBOfjbdbr/ko5
20HTmUqpjTjeX5n0irjawfKPHDZsc6+4Uh53O7DekPwV1xf/0N8O/3bbASM5
7S521aXJ28PedtC8V1kf23zqhdf5cDtIS93sguuTf3pu8+pFO5goSrjMiRwj
+CpvIccOVMqC4rEzinmCpvLsoPteqDd2ZXWq6PAVOxi0eKSK/fdNTFj1DTsY
9jFvXY/3r7xXNrDaDjIYSQu4fla9kD8z1G8HB59mHmTH70+q8cbyazvQeOxh
jR0Q4dKwZcgOTkWbqmFLip9e8HxjB+fZDq/genz28ITX+492oKegnIPtz12o
ObloBxcpKT24fktYb377V8geNrZ3ueN6/7fg1pLYFntoWCgwwx6YM+YjxOxB
rOK8CnZGfrBF/DZ7uFk+sgb7z9fuB6wK9nC5mvnOWpzPk1NOb9Czhx06WezY
aa2rqhKe9nA9t+U1CzIEf1IT87IHke0/n2LPb+lWF9lrD0+rDauxPYKvaG4+
aA98bxSzsJVE9XXYD9nDq80HadjdwVHE9xh7oFaaDDDj9y+6F6aP2wPTY6N2
bK02C6NvcfagXeHxCLtAVMhk4qQ9pJh+vYR9pK3GfDDNHmJFPfdhbxKbt224
bA/yQkXzTMgtbSPk+gJ7OOTs8xk7MqSZUldkD59OWQ1jj7Vl2lVdt4eiPQca
sO+HqDmWVtjDgbcf0rHt2w97nHtiD9EnmZSxL4R+9d8zag9tqZZr/6H+SsQ8
Opj21h48lL9+X0W+KsQZaT5mD1vrHr3BflCveEpxwh6qfk7VYvesCypcmrSH
7y9zDmNvuLzYd+6PPQxT306sIGcfPj2cuGIPR19F92OLGQmNh/+zh/1fzFqw
FT/tmvFYQ4NuSZ/r2NaqsezynDS49PylN3ZyyxqDRhEa6E8JzP9F3pSTZVIl
SoMjR09+ws7x225VspUGNSxiQ9g3N5Cc0yVpEOTRTcd+6pIa7KpAg21qimnY
LNObbv7YRYOV5hvK2KmM4ooJPRqkV5dLYfNkqlcOGNDgh8uAELaEtkNDvREN
/X97cw02EZ8znGJJg3ZR4RHcj8bwb90o6UqDuMot57G77nO4Ee40yODqPI29
lbxw3cOTBvfkrx3HZiQ9183ZSwOLov5AbJalaG8ufxo4b1SyxrbP8r4vH0iD
AmEFE+xrqvZ/zQ/TQLqdoodt6iefGR9CA1aWzYrYp4cH6hejaVAaFbkRezC8
mX1zLFqPViU7thzfXZraCRo0RWxmwe60TvoakEiDvAjLhWVkrnpN/vEzNFBa
CXuDfWeB89aWczQAE79ebIryB3DKogE1dKoNO7PwfOCzyzQwrcqqwtYc9GVh
K6bB1LnqW9ivNkEu3KABoeFxDTvcUlD5WBkNfM8nXcIWSphprr5Ng7PF6lnY
dXVPXb/fp8Fb193p2O4/L88q1NDgxL11p7H/7jh66mAdDS5fUozHLjhgvaWI
TgNPnmfHsMdf/Tbnb6NBRFhgCLY0qTQk9QUNhDJG/LG9HzoV/BvA98F+ELtM
nrXz6BgNZK6O78EGj5Y365gcgCoq7oU9mJH4I1/cAcq5k4Owj7uH1pyQdYDt
mskR/48vt//YARUHsKKcOoHdOW8PltoOcIEzPBn7SKMxqzLhAFH8dpnYmzPU
O3lJDhAqzH3l//26SZ79RXZA8VdUis02zyzcuNsBiujyTdiTh1TWsu93gN18
eR3YPZ89Zsk+Dqh+G77Ezh+pfTp6xAFmeyTHsZWbD4UsxTlA6XHlNfh+nTKH
nqlccwB7EjMFW49rXW14iQMclBJ0xZZI0rxaf8sBvqZY7cf+FnU20rrKAZbd
WSOxj+812+7z1AFUR8uvYpeo3j9e8NkBgtIq/2DL7ysnrxxyhK807wP4fXoP
dfJ8CXaEJZ2cw9jXqZP9vWGOQGmiR2JLEIrupbGOEEb9noYtIHrHh5buCOJG
fVXYLK/vx5VVOEJlBokF5w+w7TXJuucIPW41nNixLXNsJ6oc4R4TPz/20gON
dIcnjqBiWSyLPXO2Ou/fM0cIHfphjT1i+eiB46QjuLrSzmOXO5xdzZp1hFmn
ffnY0V4Hrfp/OsL5Cvdr2CJhPO/t/zrCkxKuamyXIj8eKrcTfO7bN4D9elE4
yErFCU5V1wri/HiT+fvjFA0nyH3sJI4dztW6rkPbCW6avJXB5pcMKSSBE/jv
L9mJ7WDb2W1q5wQBAZL22L3XopWIUCeYn2QkYfdv9t2tdMwJ7q+oZ2IPnHI8
uyXRCRp6Ha9gj/qo/viV6QRhz289wH47KCb5Kd8J1LLGnmCPWXLS+q86Qf2u
tlbsjzs+Vd174ARJ4beGsL9c7vtYUOcEXx6Vvcf+xt0okN7kBF4a7pPYM7OX
Iv16naBXYugP9lKlnb7knBMk2JVw4fpg0fIh8ctvJzhRNLkRO68/7NkdZmfY
VraBD1t3Ic9Nj8cZ9pTMCWGP8NO/tkk4g8Nzp63YMVrvIx1UnYEv11AKW8yZ
jX2ccIYHqbdlsekRCjmHKM5Qyyjdgb07lyyzvNsZYKuWCva/hyHVSYed4buy
mzp2b7aPsOk5Zwg7/Fob+8ZRj1jmB86wU7hR7/96aG83Tu9zBu2fxw2xrVXN
zWIWnMHyJD9gc7TpDoRqukBJwiKB3eap4hcQ6gL+jqCPHfeAkXYu2wWMHRV3
/b+/ddR71Y9cIETw2E7sefexvuFRF1BQCFTDvnMv6Ne/fy7AYJNVwv4P66yf
Vw==
        "]]}, 
      {RGBColor[0, 1, 0], Thickness[Large], LineBox[CompressedData["
1:eJwd2Xk4lF0UAHBbolR2kTZUSPYtS+8x9hnLDGNfQsoeWQohUSFC8qmslVYp
ki0iS5aEYbKVtFmSVCpKIt+9/ur5PfN677n3nnvumWm7R6DVQTYWFpYz7Cws
+F+JtKXC/C2N+6YyP5pkX35GVHHJbA3wLiC2tIvQbzU+IxrD71+X9i4h+DR8
irw/PSNaFY94cXo/IfY9aDm/WrODaE9hmsx5MQhpttz+8t4O4plW/KNpr7fE
qa8K9PZfz4m7OgIxaiXvCHLsP7KgWCfxfdizILToPfFescRYULeTiBHj+vDj
yighE6KeoBjXSVy8aOH17dxHouFMEvGaq4voOD98ZNLrG3GzfOKfMFc3kXgp
69kFpRni1UCg6P2d3YScN+GoUjJDVGw5ubRg0E0Erz5/PLjoO9Ekx9peGdtN
/DNUrZ+58pNoSp1Urp3tJjY2R+p/OfebCCkVJaQYDKI2Q7IvZe08UdYrdl3+
E4Nw9ej0lEuaJwK6T62LYO0hrrNuOeN36g8x8tI+mynWQyhBY/unyL+E8xfJ
a+8pPQS5brXFhNcyMeBwgDP1Fvp82WNOeGaZKHezlaU/7CFStu3vltRhgdMR
93V+1vcQoR41YfSnLKDzruj74/4ewmAi6GlFHyu0zHobnmLtJTQTtmzs3sgG
qnaOQSI8vYScdKffhDMbrK79uuO0cC8h4LtLQGScDVhkFri+y/YSH76MuIfP
sUNeyPNHvFa9xEBqckX6Xg6oOG+zN8apl+hQ2Mt9J5oDCoZm/7Z59hJlRzJL
X65aBceEbGS+H+0lTs6Rl7WEOeG3ukzQlcu9xLalqtwldS5wLkhyujHUSwjm
H5wROs4FQkW5nD/e9hJchICB/BMuSDE4nrXlYy/xLfbwZ1djbhhue0TbONdL
1HPs0GqwWwP7XUUrMzcwibIbzHNDOWvAdcM6ro9CTOKmUez7mbdr4OKNnE2b
xJlEauJw4nbvtSDf0ntURppJuPBkDMaF80Ad19/E8X1MgnqP2J3zmAdszSVC
zAyYhIHFl5iHLOvAwoy8lGXKJOTSTXaOJa6DRo0fbwetmcSiwHKo4eX1EBy8
6LHBi0nMlBe3u4ysB8PY472X/ZjEmI2j+NHtG8D/yFgtdxCTeH6xovnmnQ3Q
edXoW3Y4k+hap87N4cILh6rW6yQlMgkmhf9SdxQv7MtVt16dwiSGkr7uvJzL
C5kHZT8EpqH3rbplIP+aF3i2yUmyZqHxl0Ri7Z344ITLTYrMNSbBpjO7XvI4
HxzQfqfLcoNJcEX25H3J5oOWNYGbm28xCYFfibVxr/iAvfnC/nX3mITs1z+/
ih34QU0KZqsrmYSi3MDpYxH8YJG03n62mkmo+5YJki7zQ5DIT8HNtUyCNOGr
PDjED3d+6ZlrPGESJlLGjVfn+aHos7mETCOTsPCQpPpvFIBk2kN27mYm4fBm
OIDVXgCeVnXlX2hlEq7i1YvPjwkAp7NU2b52JuHpmJmcdVEA+k6+OjX0jEkE
DZjd2T0oAE0HKQIvO5nEUUEZzV+/BGCfZZQkdDOJKKtVbQ3CgvAh/WpuFoNJ
JHbXjdnYCgKvekUwPxPtL092yLajgmB1U1RK8wWTyCQfZfv8nyDIJLp+NO9j
EtmJVucrKgThx/v6Cet+JlHQKr8ttl8QuGrCzMgDTOI6x9oS8pwgtAnXk5QG
mUQR6aOukJAQJP9j/uQaYhKV9QVORXQhKLX9J5/8kkk8Xjw+FRoqBCL+nGvV
XzGJJi37CCJTCBaCnA2ZyO3hqlxryoVA4iN9ldswk+iu5L3Y90IIHKkGwW+R
+2andxT8FILD8iceUl8ziVfKz8p9BIRhJ7vjzEPkd0E39FVVhMGSKkPlHmES
4/dPMv9ZCUPZRb0FKvLUtIv7s2BhEHP6LZSMPCOrNXMhQxisxAs6qpB/eQuf
cC0TBimXc8Qg8uLNH+tkmMLgVCCc+wmZbbw79+d3YWj0TFv9DZlL8u7uej4R
yLw/d/sj8nr3hJpEJRHQzjO+8QJZsOCAqTVNBIj6tm0PkcVGiKHNR0Tgg201
cQZ52yZxr8l0EfAqdtppjrzTYX6urFQE+Dlm51cj777Ydyq6RwR2FDYPV6L5
KfaXCpjMiMB4N89PB2R1gXPX+Hk3woVOvgPf0fro0HyURhQ2Quh7QWo0MinN
sOGW5UbosLJ/s4TWN5Zcfod5eCNcnplYdRS5fpXkhaVzGyHXrevUKNofrSiW
Q9adG4H9Hg9fAdq/cI1Ay5jPG+F27363L2h/K3+MaN5ZIwr6nd5n8X6r+NSu
XTYRhfL4qM85KD+CpWTnZLxFocbtt1sTyp/St5fe0BNEgZ/OJf8W5Zec7dEH
RS2isLG+k7LYyySk9JXsbEliwO7BytLexSQ8/hXASXcxkC23yL2O8vnKo/Wy
xbFiQJiPJoU/ZxLiitOLrE/EIM8rrpsT5b/Q5lvX7mlvgshCe+EGdH7oQ0Ip
Q46b4Pl/j/c7NjGJjAunwtgjNwGLH/nNdAPanzUeJg7VmyDbi396oY5JcP4W
/8qhJg6tKZc96qtQ/SpLHlSgi0Ndcov/ZnS+4wIWGhxDxKH+Jn9yWDmT+Dc6
eKH0gTgcvfHBh+8Bk/jdk7HXWX4z/J4Ti1i4wyQmi7hOP9y1BQrW7pK8nc0k
DiosrFNatw3m/o5ki6L6ZTaccGPjlm0g7PzM6lIYk1BNENJlUdgGfWlcbvwh
TILjraI/g7oNFD6ajMwHMIlrqV4dAZnbIDlxn3DGASbx9kvfmaJN2+Fg1aHN
ay1QvSguWZaUlYDa2/lmNduYhLnMwe/CxlIQm1BpfqCxl1hIDqsdsZWCKKMX
azPre4nbX0+fvn5IClq5478/re0lOMpviiqfkYKXzySddlX2EjX7JvXMW6TA
KUTo8beiXmIn3S8jXn8HbEgQcLyY2UuwnDiiMkPshCi/M4nx3ui+6osOe6Yp
DYLVa5ciBdH7T3t6fDCVhrOqi0QTXy+Rr06x/OsoDRaR+SNrN/QSZy9tlNkT
LQ1ptHN6N7l7iQPOD1+nN0oDoa9vNf+vhxAcm9S3J8tA/jf550JTPcTRn9b8
H51kId087j96Uw/hf11redlfFgZF+VxmnvQQHjbbpzfGyMJeg0er0up6CIuq
ry3kK7Kgwp7J2V/dQ+w6nhRxf0wWLi59ETtV0kMMsT15FxawG96QlyKD8noI
bX7ZEo4TcmCk2LI99XgP0c3q+KwrTQ7SffSDL0T0EG7fk0azrshB+WatxznH
eohTPZ9EZJrkYGyHIlERgp5PvRNrvmoPJLJeFuDxR8+vlbHKSt4Dv6/9NTV1
Qc9zSM/tuiQPNXrmDSykHkJ41m7D99vyIOFkFXkQeojbowkyNY/koTbMV7pr
Xw/R1fTRxWxYHjQNpF1uaKPnT95qDdqiACaushsi1HqIO0s7Lz26rgCeDhse
F8v0EF5/M/Ju2CvC0luDq9qCPUSmxXRzhJsiMIjkST6BHqLhquGUubciDB4z
zZni6yE2msyr/zqmCOqRDJ3CDT1Ee6ZLj9FFRVhYG6SvtLaHkJGXZp/sVwQ/
g/CFerYewvbkSZnHI4rwKJVLqxb1W3F9ryzTxxUhMJP/+SOWHuJV5LlczTlF
iAjqf3h8iUGcbfuhliSoBJsdRKaa5hjEZ7c6b1lrJRgn7ZiU+cggNpYLp/1z
VIJz6sMdvuMMwmB1UAXTQwlcmdoCpaMMIveeBNvxYCXo7C5qMX7HIMwWEnKe
n1cCg2Sa4d2XDOLeBatu/x4leCxylp3oYhCvJu7OwpASUMq67J8+ZxCcWqs2
Cb1TAvrulz3mHahffFflVfdNCQY1Z0UC2hjE+j2bWddvUIbXej8SXzcyiMDW
jyol5sqQQLTJHq9iEA1Q7CdnqwwT95uNd1YyCN7aoMI7rspgI+/4tb+cQZSW
/OG/HqgM3AaVDaQyBvHj0tofl84rg75obx/tHoMgCfTICGcrw3U7g8vbihnE
hXOZ7heuKcP+EIHqn0UMQjVuc++5h8qQKLPzy83bDOKon0JpXL8ySL9tToPr
DKJ1/OfH5REUn+3jk0qFDELErXpr9IQyqEYw83deYxDVdL20Y7+VYdPlStLm
Kwzij671YX9RFXC9kJagncsgoniPydm6qIDy1fqH6v8xiM6z2p4vDqoA2U0q
ziuTQWxexZJLPawCeZRHYrkXGET9n8S1lBMqUEKRyeDNYBAso9lTxFUViA+W
n9mRxiCoLvsl6u6oQIyg2KHQVAZxdVDSUatMBe7czA1rPYfm21n8TLVZBSaz
b5iEpTCI+Ir62zLjKqC2S05oKYlB9CnEv7v5RQWYw+z3vJCliow3Sv1SgYsv
Bu71JzKIp/k9CVtWq0JJ715mbQLav8QPhwRkVOHO57jFktMMwpbtVn66kips
ymtWVkO+FeU3sE5LFd5uyrpad4pBmByZNeSiqEJYay3vUDzKP0fOHUv+qnAz
7GyychyD2KfI8+tTqCqUnzciDZ5kEN9X8bcNRKnC8yuf8mKQ7R9s9ilNUYWk
NU8U+2MZxNoESa28TFXwyXd1PYVc7yyz9myuKrRefLJZHXkHl9q9A8WqcGjP
lX1XTzCIoRGtGGq5KoyynctyRE55CJa6j1XBolQoQBj5h6vZd+FOVTiwqj/u
vxgGcVPVqom9TxWMJsKr7ZEd1thfmBlG4/NdcNiC3FBxQK3jsyrceMTxvDSa
QYQm+3BW/VSFqsBn56ORd7kHDhb+VYXcD29KzZBTeY5HRK9VA6sjA2PfoxiE
3odYsq+AGji37phpQ56tOrPJbpMaFJOvwBVkpwMZdYq71UBl/+88O+T1ey+l
blZRg0W/81fVkZvW5+9fo42e960eFEEOGytU/E1Sg2mOt9p/j6PvkTV3WMfI
auA3duzZO+TXaSXMHis16CubO96OnHaworDOEVn0uUUZMkm7NrTIQw2Em311
85F/8TYaXvRVAxN7Y/0U5KKJVuFTwWogGP/CKQrZ5XHnx6BINZD+cjLuMDJv
BrPaJU4NFKGlzAP5qddQEvmsGgzt4J20Rz6m+8ZRI0MNuoz7N9OQZQXGdktl
q8EjywRLCvKbyU+LvNfUgPLxUrgx8vn6b11Ld9RAvjoq0xDZIHMuf+qBGqz3
v5GPPe/zN3DwkRpcKj6dgZ+/S7DqPW1Ug3DJdD/8Pleh1fwPnqmBY6TGDjwe
/2ee0bxeNZhy/FqD42lp4C8/+1INduttkcbxhmdtPH3sPXp/lpp3ALKc/xZb
z09qMDo/ezQS+Z2e1C7adzV4uVGKmoR8QUR2XvePGmy7cfbbZWSjLwrPZFnV
YcpshlqMvNCkli3CrQ6eT8SDGpDvX9L24+BTh8a7gyYDyO6H9XS+b1QHhcbJ
gS/I7aLmbzqk1YFVSo5NAu1n1DerkipFdWhhfMnah6zQYh97XVMdnNylepyR
s4I8JWJM1KH+x/qt+cimRr4/falofKqVXCPy4qagp3b26nCHJtM1jnyg7fgh
JW91yPtdWq2C8tFTZ6fFr0B10Nnhu8sZ+dCDHrXaY+owm/CS+wyyd86OVYYJ
6nC7/KfoG+TDgYxC+5vqYDbc9Dsf5X/QWETy5vvq4Pt4KpOJfMRBKuRDBRov
2+3ManSeQvUjSP4t6rDlwAe7MORIEcn3J8bUga/8B9UNnc+olK52g2l1sF9P
yOUjR7OGl3LPqsNMqhIxghz7ufPEBXYNuClSseSKzv+ZJ0e33JLQAKfBqfAg
VC8yvDqcut00QOJ8hWE7qi+Zr0P1L3hrwN6a1C8iqP78R9u62z5IA5ad6i94
I1/SDl14f0ID/L8udvKcYRD5G7ZcnsvXAP2XmZfcUD0rqjoyID6iAZMLxUzl
swyicbUozc9BE4p1f7f7pTOIiUJ58kt3TWAo5XO9QeYBA31jX02Yzf+6RD2P
6lN4oJrkcU3YE9j0VxPV52+TLaLDuZrQ8PDhKC+u5x3BH8jvNCFG8a7byEUG
EZHSGSLrtRciLC5SegsYhBJfbNanUC0IEvKoiSllEDVcg9JtUVrwJuLJf4vI
JBb52uuntCDK/XpA5AMGQf82/HZ/phbA7PG1R9H9drRLQ2bgoRb8q7ve4Y/u
v8dJ32qbfmhBh7P/oG01qr9s+9/nBGmDcvIRBn8Dg3D7qStn4a8Dth//MN50
M4h1/Cw9faE6EEK59NqBgcZXbApxitaBR3a58X3IgoeNar1TdWDdm7ac9h6U
r5MW5PhSHWAbNO+9y2QQim/2e1fP6kCr45izywC6n56dvC4RrQuyIxp83iOo
H/iob3LntC6ox0Rd70N25OScVkjVhcG2pGp4wyDK9c+q6Bbogjm7u5vIW5R/
9RlNdo26wPeuPLce9Rc9DwvfpazaB5+Vf6vPov7jan6L+O9z++CRgLDDn0+o
H3GWG7TJ2gdzqx38rafQfotdOF+evw+qK/v/FCOnZrlxBpfsg/7HnXGun1E+
pv79Nt2zDzJrxoxrpxmEVYxS8wcBAkznbMOdvjEIDtc8n+7LBMwFbmaqzTKI
5U0cUnuuEbBWJ+NPDPLCS983yUUElHhezW5DnrHRtDatJeC34W6yHeqnXpu/
0Hn6moDmK6oHgn6h/iefg2tkA4ByhH1B0jyDeJiqNcy0Atgfr+rnsMggPHLW
r6qxBThv426eisx/+4P8VUcAj3UNDU3IQY1n4wI9ACIf6DnLov5NbvaVDE8w
wAPPnMOzyNcdjocbngfogX5S6DKDsD5keU3uP4DJoQtO15DZQiQ7BS4DrDq4
b00PslvK860frgAEfyUJCaH+UPzJpraYUgDNH+ef+CNnSj0WqmYA9Hf7uPCj
flJfKZ0oeAEwHc+xeyfyD11PnzODADeWxVv3IlPteOrobwFqUs8fdEPmOevs
+f0rgPs4r+Vd5FPfFstk1+vBOYNb8xqoX1VZ7HnNx68He62ZFSbIH7hucP4R
0gN3jev6DsggYe7YtlkP3jRzMiOQF+l5rJ579CChzeJJNXJojS41z0wPIkxl
uOTZe4gKxza2l1Q9UH79gU8X+dcCtULQRg8YBjc/UpAjtD3FUlz0QOqO2bw3
cszjs2ORh9Hni+oVV5CfOAterAzWgwLLYzvvI7Ms5Zn+OKoH4w7jB2uR43Qf
3Pc5oQetTgep/cgJ9YPh9ul6EHq6dJiTA/Xnru67MzP1IINDrJUfec3y1Ajj
kh6seTYRuwU5hfhHMr6qBwuTT73VkNMbpNapl6H45yy43ZGzm45cFejTg/ct
Yc9LkIc9/lpbDunB4pT6SDWyOPtpzuTXaL2OtDY3IufrX/JjG9eDtd5+vC+Q
C5/Wq32f04PSwMSSn8hjniaTcgt6ELk+PPAv8s5VzGzvf3pAzvXjZF+Fvs8Y
ji+/5STB/aeRNXzIxa1rO7pFSGDH7aW/B/nLof+i1oiToM/Br1kFWX71VgWj
bSSY2lsmroX8wFg5s06aBM//bnE2Qq5st3ct3kuCdx0iwi7Iv70/8E7qkiD3
9QsvD2RNbv9mSRJ6XpL1Py/kGtMT0jlkEhy+0Rp3BPlJx40fSU4koNRceRiP
XLax50j0fvT5qddXE5CvH1qYCTpAAr7b24OTkc+yWX6z8yPB6c13H2UgR1Ej
DlMCSbCHxV0pCzkwv/DLvhAScLiyp1xGpmvNf95xnATTxTNTBcjGiRJ+oifQ
/OTvfbuGrDVgNsUTT4LL5nuHbiBvDb46+fMsCXzjC23uIvM3PPf6mEoCs90/
p+4hc6z/NfEqgwQ15+c8S5Gn7pDHG7NJ8LF2bnUF8uvfoZ4V+SSI4T2oVIXM
MCwYvX2NBN6OPvAIufz9z/dpRSSY5FjYUId8S2GLe/x9Epy5NtNTj5wdbfLu
aBkJHP4zD29APiGa98alhgTxn3iPNyMHe7W50OpJYB73YeApsmfF99cGTSRQ
ejsj2opsxy7urNlKgk85RwzakMk0o+HdHWh96Nm27cg6BUGOW7tJUFV4hfoM
WeFL9kt+JglgZ41yB7KEdos95wAJTh4TX8IWTPo2+OclCVRVlkqeI3MOitp9
GSEB/9x5SifyHymDgXfvSfDCnrcHezr4sE3fOAnu8dzX7UJ+03Cpr+0TCXbW
FWRi965vtq79QgKNho392E+dvzDvfydBj5vZMnZlkYjVtTkSvP0UINCNfGde
r/e/PySwvVnKh51r5E9NWiLB9vfGC/j51MwsRhSrPiiNH+rCPvmhwSJolT6E
LkEydqji564D3PowHMqtin0oRsjcbp0+WGf9bMPxOnQSnWQ+fegqVjbGNhPz
pewT0gcN9oUHeL77vDM7lET1IXYsigtbqbLedMdmfbiU85WM10eK41P7xu36
cDgkLgKvp7CVgAnPDn34XumXideb+4pu27K0PmTJj+Tg/Vj84mX0U04fjC+s
Tsf79VU7o2VCUR/YN2060oLcNzjR3KWpD2V+9QtNyK07+PQbdfSh5Mr9wkbk
RyHaTeWgD509Jlo4P/I3pDfkmOhD1IK2Es6n8y41RJqZPoi5zZ2vRT51d6w+
jqoP05dE3+P88zHeW+djrw9GzgcolXh8adGWB876MGJ9W7cc59eaP51/3PRh
93EF8TJ8vrqqXyf56MOXkj/5OP/TrTUX70Tqw9Oiv42FyEJqGzl+xOgDJA6K
X8X5Kzy/ViteHyyCOg7mIxe+rNrUkawPN5xfNV3C+7tfQ3sqVx8mz42XpCBr
64noK1/Vh5xbj08mITdI/CZH3tCHz09D9c8gPxuvdFxzXx/S6P4XT+Dz5ace
KftEH7jiDiXg+sEWrvbI970+tGX0VVghJzgINZaN64PtplUFFsg82nPtC59Q
PtwNOE7G8f4rHzr7Qx9qCqrWk5ClT6nOF7EbQIB50nVFZMt0FY3POwyAMupT
tRbn222lCj9fA7iSwfK0Btf7lwfaCw4bQP98ZlIF8uyarOEXwQYwvzXApBSZ
ErDAqnPcAHJzEspuIC8oNVvwpBjA6N5DOunIDrX0yeJ7BjAyW2/kiSzcfWzT
1xkDODL0XpEb+fzPupNBxwzh/Zy4tjm6bw4z092djxvClbAvdcbIZg8O6Jmc
MIRLLcl6JGTOQG7WbQmG8MThGEUDOWqKHsvIMoTnn2f8tiMfev85Rr7SEOqj
r32dQ/enDkM0anrWEIj2Mv8ryKL3p52G5g0h0ENTJgf5V8oT7aeLhkBOi5n8
D/kB+eDfHA4jcB6JD0xG3tlaGkkRNILoDTNXjiLz1RlHFKkYQaaeY4458kRR
2FHvYCOI5HLW/Ifuf9vN/97cPmoEmg+E/84jt6SdMf4UaQSDadlNP/H/D4Ze
3OgbbwSjVRJun5A99j2q8cs0AlcV9YE+5De9i/8OVxrBrpdhlcXI/fPxCWEL
RnD6VFM87jcM/HhmKv4ZQUgEdcYJuXwk0/4XmzGsD8/2sEPOaLohc2ytMSzW
HrW3wP1KStvzcHFjuBw3kqSD3Ll1LW/UPmM4rs9YLYb81CjjUlycMWhEPDrz
EvVD44dquyLPGIMVTepnPzJnwhhbyFlj8M0a9WQim7SpBxzIMIa0j572z5E7
jYf1DK4Zw73D+SfqkF+YSH1e1WQMencVGNeQP5ArdZNYTWC68nDAEWR2v7fB
J1eZwNuBQ6cOI0slc92O4DaBurQ7V/yQDz135PflM4HIeY5PB5GnKMsT5O0m
MNnYXe2I/MPMJJ1HzwSWBBKsDJFZLV99SIs1ge+yJS5bkNvrbSRDT5lAVMdt
KXHkdPneA/aJJmDo5jcjirxtffvYtnQTaFfRycL9IHRVTDwoMIGNb6+KrUOO
pZyfelFvAiYDVM4F1D+a1PLsrm4yAWXhXplfyLy7E/1yW03Azt/H9gfylTUn
pj27TaBpvLljCrnhmf/XuRETUBogb32NzGJi8kNkyQRm534FNSC3VzUrL7KY
wqZqb4k65PRdRMg7DlOYvXT69SPkbavVZ2/zmEJZ1FXfh8jQKvlrr7gpuO1w
/nITOdZg+Y+Ttin4NJecSsPxlUdqAWEK4f3pj1NwfFK/IqX0TUE1LWkxCcfH
/uXvNNkUKi7lZp7C8TW9Wop2NIUXzvpSkTg+vUrWKxGm4HXk0KNDyI4GHzuG
ok2BZeiTjidyufHGTL44UxCLIj1zR/a2iNwZf9YUApv1F52Re532UQ7lmAJb
rWWHNbLc/kDBggJTaMywuEBDPuNxZWSw0BT2BDM8LZG1fNiCTItNwdVdajsF
+drR1ky5OlMgyiqXSMiLEb9dDjaawrlwd249ZNto6V35LaYgFSG9mUBec+rs
ow3dpnCcNOSsjRxy3uLNjzemMH3TUVsV2aB4YNcjFjJ0Eu0+u5DzS1Z//85B
hqarxPcdyPNlmjWy3GTQKFwdK4Vc/CjbLJePDNN5tg+3Iwu1uR45IUGGq5Ip
geLIQR1pWtU7yVCiLKW4Cbmjq4H9uywZtNzv/BZFjumTyPJQIQO74IEcEeSJ
9xM1hgZkuMxNqArg/RsXORVjQobqBMnd/MjZkybmVWZkqFqTI82HbPGt6K20
DRm+pPJpbECuWjzMwXOIDKS8xitrkflZrnQZ+JIhzHK0Yw2yP3tvVvRhMjwY
V/3LjfNljYrMt6NkeLVH/TAXcqLIb3NmAhn+7LXNXYWc2d4+2pRMhs2fTrBi
F0RkRzxMI4MIvcqPA7lyWPdG5kUyzArtsmRHbkrZoH06hwxcppR2NuRu3fc9
YQVksJuhG2GPF5xatL1FBm76DJUVeYZqm2F8lwz50wEjLHj/WKWlNUvI8OLB
7cPYgp7PrUWryBATuadg+R+KVyjvE3ctGXY5HtiHvbv18ImFejJ4bVf48A+Z
JM1/d7iVDLoPgjWwLV6OQmcHGSbahiaXkB3OVgw87iZDWXBFPrandoL/PSYZ
nCOW7bGDpu3Z8gfIUFB4TwQ7Kk/2UuorMqg9qny1iJxosbjnxBsyvDzJdw07
c7mrOfADGYxbygOwC0oLHNwmyKBJuaiLXeR+5Bt1igw+wyV82JX8+qf1vpLh
gu7cp7/ITc2Cm5R/kCF4r2srdnfoRKnELzI0ZL2/if1qR7WRwAIZ9m4+mow9
PpD0mv0fGS5m8odizyQ4Bc+yUuC/p/fcsBc193CNr6LA19B9NGyuqX95/dwU
cAmoNcQWyOlRaV1HgdywTfuwt5hde1bJRwEvGxstbNmlkP23hCgQ0bd/xer3
DecuilIgpUZp5XnSfpHkxM0UcGI0rrzPgvfTtojtFLj6inNlPIfGmkqfHRQQ
vf57P7ZncIqZowwFYn6eDcYOknT9QN5DgbPpVYnYUX0K4dpKFPhDCr2GnXia
db2cGgVOM6ueYGeqvygU30uBKc6Id9gFH6/vXadLgQ+37nOsrO+lo4wloMCu
aEu5lfU1NTn41YACRy2s7LCbFkT/vjGhQOLovdPYXXc/pzPMUHwcDlXYY+vS
HpfSKRDfHimF93um3s3qqj0FhifG9mMvBipPnnemwKXfsSv5IsDsFwjxpMBa
OYUdOL+2xN+6c8CbAncClAKwZVUjCLo/BcJHDKtX8jFL3E8tFDn+tB3O1yDH
A02/4ymQl3zyEc7v9QVT73QSKcDl7rIdn4fi0SPLJ1MocIOclIL90T9Wh+c/
Clh/uu2Pz4/ribzKbTfRfupMW+Hzt9gs1X+wiAKmOXv6sLO5in8W3Ufzkzts
j89r//kaRbUqCmgFP/XhRDa7Plhk2k4B3/Ci+/i8T026PkvtpIC9RYcRrgeJ
eyY+vuihwMuQS++xmytnpVxfUsBfR2Qrridaz/gKgqco0HA3vnodsvRXyoUc
HjM4ss7AGderVuUXD97xmsF/g5fFBJE9jzn27BAyg2J2rmHsAhafdaWbzUAh
bL2HMLKwwJmEp/JmMHVwKgHXQw7NhuNfqGawu1FAbhvy+5OqnsR/ZtB5dKBA
Hnmn8PrUoMtmcFD3yTkFZN+ij1VX88wg+lFdlCLyLDN7LcdNM1h/5I2LMjKX
FOvD9koz4FJ/v1sdWb61i9VqyAyWPWZmdJEj13gVeG4yB+/HxB9zXG8uXH6V
dNUczvGavD2M74t+gd7gG+YQHaPbF4jvO5HUNqc75mArvepZEPKX7LjyPQ/M
wcuVpSwYz/+aX2pvgzmEZTuePIocXqZLEn1nDi2nQSAGeaT3/Z3bWyxArWV0
Bt+3fQLOV85LWMCc0eirc/h+sBnIitxpAaURrk9TcX192RFvJm8BJw48/i8d
3/fvH7rM6FrAUPRzpUxk0vfTfJouFsDsHjfPQb7JKxvRlmMB1/uW1t7B851w
mOe4YgFbb26exa6qTTpGum4Bz64fHC7C/cShT2F1xRZwbODQrWKcD49vBz+s
swD2lgXVUuQ9Prv8C95awExut1QVvs8bpfYfk7SEga35lKfIOhfpb8p3WUJh
fI5QC3KL/ymXH7stwYG4+AZ7QGTMKUDVEsIdEwLakH8HFNofMLQEzwN7T3Tg
fBKTsLL0soSXb1yP4N/bGoO3Gu66awntnw+mDCMvzH1LFy+xhGVnhgzuh1Qj
Gl7zPbQE32Mmrdi3T7iHLtZYAl+S7+IIXp+UwsLeDkvgNAl1eYd/v7u5iy1q
yhKqjjF+jCEvT1/cPylIhYQqef8vyLnysatGhanA6bnwGVszyPvuyEYq0Jpf
+35FDv6p+ZspToW44xMHv+H7+c/L1DopKpQsCNC+4/uNU7w+Q5UKvT/7/s7i
fmHbFXFdOhXeRi/f+IvP91ml9j22VCCsTVYvIp/42RSyxZ4KGdn1XthureMd
y05UUPqttnMJWcJ/d0TTASroKblf/of3s6qy3ziEChvmLxezoP5SeLvJSc0w
FN9i9wB2wtmXcjLHqNBzp4CFFdnbZTF+zXEqZOkIWWPLspOUu+KooPnS4Sf2
fYuuVKsMKoy6BG5nR95S7aqln0mFroBoQ+y07TPjKllUkGLs9sEOmuXXFcqm
whNJvxJs5Wz7z4NXqbDa84QGB3Ll+KixywMqbHpsr74Keadl2E/zh1Rocsql
Y1+s5izYV0EFp+YzwdjhyTK/tj6iAnsi7R62llLg9Q8NVLig3rGFE7kuaoHF
u4cKk4XXvmP/KpmYiWNSodEtj2c1suIo811eHxX2VKnvwr5uerfhxRAV9ukZ
O2GfFXaOJd5TIV73az32U1OTIMdRKphpTQ9gL0WpuoWNUyH7e8pX7KBRHrj7
iQpwpVqcC9m2tG5Z+AcV/ga1hWKnj975pjRLBe2KT0nYz4Sz3pr9osKPvrJ8
bJ3ow0/iFqigU6Xdhi1B3nriKxsNkiPVBbmRv43G/msRoMGYSHQ+trRIwNd3
QjQov+d0H9uD7PDmrwgN/Oif67AHSpXqlcRpsPfe1tfYj6M/ROdJ0eBX+CfB
NXg9SrsDqnfSoDDORQJbYazG5YU0Gs/ijAL2NfIFXe49NHiwat4EO1HEYClU
jQaLI97h2E1kxS9pGjTYNJEWj/03WnykaC8N2twDU7EPj80+fqdLg4AUh0Ls
2yLvi/8SNKjbdfAe9ntyV64wiQakDbursOkPbkSZGdHgUs7HZ9ipY+f9vUzQ
83JvmdhtIjHOcWQaNH3IGMbWirHVqbagAV+W4jT2dsrqRUk7NB6n1Zq1yKr9
+kwxBxqkeDfzYhvtj73N50SDnslFYWzfkD/0ZVca3G9+JoEdtaS2+5cbDXTe
uEhjpyUEs37xoEFfVu0e7PKcz/deHaLBeo9+DezWHdKner1pcFU1Qwd7qMTT
sd2XBrt2iOlhLzWPcFYepsH02xRTbF4LsZHiIBps9Q03x5YYsn1YGEwD2QxF
2kp804z954/SoFibyx7b/iiPemI4DYSjpZ1W4mUx5TkRSYN9r4VdV+I9e/pD
WBQNtjx64bYSr2BTtX8Mmk/I/gPY1/L/pR6IpcGkX83BlfiltQ86xtGglXXc
ayX+smPatFNo/f9767MSv045n8kZGtDPFPlhL1L31KudpQHXQMVh7O0Hb/pK
ptJg6jPvkZV4I7aK8GXQQKOxPnglvnOXmv/9RwOh2cYQ7IcVZ8Vf5dFA7DNz
xYsjUWEVN9D6NNmv/P32H3PbC+/QYMM6+cCV93EGdqffo4Gvr7f/yvvEJiNj
HtBgf/ialfjS5N13+VfQQKBfeGU+16rzljyqaOBWNu6xMj/SqxcOj9D6bUlf
WY8hW+tY4zoaWP4MX1m/qXdptvue0ECJvXplfZd8O+XUGmkg+f2Fzcp+nDB8
KdFCA/PKQsuV/OGOKxFtQ/utZm+2Et+F+tO8z2jw892UCbbfLQ3lf5000N5Q
vLLf5QyZ5Jd9NDD+dlMJO12y8cbCAFqvst9yK88fs2/Y9JIGN5mSK/klsTVh
zmWEBpTeDVtW5nd4bP+HcTSfYySulfk3HY9kn0R/3xbBtjK+sMB/UlMovo60
RZzvi3V6HYe+0iA8zWEG23ddgernXzQ41RY4gG3krm7J84cGH61uM1bOR0WX
z56/NHg/3tSOPeS8mB+4TIOwroIabMNiB+7Z1VagbcmRh72NIvhmcaMVuGTO
OK+Ml393fvMmK+COi6NjD/4gCRCbrSA4eYmycl6zj5ic3G4FvjtLtVbqwafu
slWyVnDq2wYR7IHEpIT12lbQ7bH0HNejlNZ/ittcrMDuSLE0NhyZUNq83wqK
fO9twZ7d1K0s5m4FDX3XVuqf85E8VcGDVlD3y48Fe4+4jiZXgBU8tIoZxPWy
+0gEMRNlBZ5Br+KxeTfPmjfkWsE2qvogrs8XQj75ur22AgoPMxTfB2JGkUes
31jB2I9ZH+xrG9eGG71D870nuh+7rE7utNyYFciY+Jhi96wOKpj/bAUlj3es
3C/rc3+9SP9rBadHNNvx/ZP4lF23UcwashqntmLzXszULxe3hj6Bi0Ir95fP
DvKtLdYQdt50LfbN9cZ25ySsYZ1e4y98/7XYnz3iIGsNgz2LXdhsX3hvft9r
DaPFJdHYUUJbNkg4WIPWLucP+P7sesDtSDhZQ7+f6NDK/Wsxd93ZxRoMO992
YT8506l10d0a7m5LfITNNh95iMfXGoYHTc5jJ7warPsVaQ0b4i6RsDMKzvs/
z7WGnt5vxWzIo9rRVZP51lBJmivEVh3yZuO8ag0R6Zw52P28cAluWEN9k1kS
9sa4r80V96xBPd7rEHa+J2XTlXpreHB8QAL7jsyqjtB31qCUlH0d9w9Mcb2/
AR+swY6Uk4e9uCFazmvMGhppN7OwLX7NpjpMWsPJkOFE7NmmMet9M9YQ2dwY
gA3OT0dWs9Dhak7MXmxfS5YNrGx0iHgspYJ9gaQDC+x04Fbtl8OekC6/Nr2a
DkG7bLZhp8wVevVuoMOObb2rsYdS479nb6XDc/W6IdwPscU9kcjcTgfXoTUv
sHeH/bU+J0kHKaUDXdgxTiGVJ3bRQWlcpQlbSvrAcU8FOuS501f6q8BG0ip5
gg76/5LisDlnWUUbXenw0vGsOvZ86aXUMTc6vM54ooT9OUCBg+sAHR4KsezB
7vno/M3Ciw4qjGuS2NnDVS2vA+nQPRTAhy3fHBA8H0uHQLbtb5bx7y+xHJOb
4unAaTPVjy2gm+NCnKbD7GB7F/Z8ZbvJmSQ6RAq11GE3FUluFcygw8RSVT62
bcbL5wqFdNj27KgntollkJ71DTr05SS7YGvzrK46eosOSToVtivjnVG9VneX
DkthRqbYUxFp4ZRyOsjedVHAjnE33OHVQodmBaNl3H8GbXmdfbYNrXdC9h/s
A8PBvPefofUaY53FNrG58ne2C41HcH/C5jf92xs3QIeTDr9fYN9SfBCT/5EO
C7Ka97APC33/U/WJDusTn97GVl1QDOv9TAeXU+7XsRuaS/04ZtB6fe3MwR6y
LbX3nafD34uHkrE9tyla5i3SwWjXhXjsmU8lhj0sNlDn/e84Nld0ibI6tw1Y
Fp4LwM40UpDxWWcD89Mlh7C38ZZszeWzgemkdW7YmoX3edjEbIDheswa2/vZ
vYkuWRuQGZjRwZ7N2DPComAD92uHNbBjne+9UFGxAQ+Vf8rYl74VN1zWtoF1
zydksEvjiu8t69tARuz17djtQsXZB81swEFDSQz73e27Cc/pNvCceUYAe177
bqiSiw3Q1AvWYfMyitwvHrQBumEoF7aMR5HFUoANaI8us2MLi9/3sj5nA++2
Gf7B3xfYBh7E3im2AZuM8V9LK79PqpyjP0afG8XMY39Nq7i8/NwG3K07/mKP
+WvcLBq2AbeFmyz4fcOmj8psPtvAgZjvnNiR+w+S+37agJHRxzXYYmF8H6wW
bSBsSHMDtv0VHz7qOluYUH+5cSX+CqE73UK20DQjvgX74vNGMN9iC5upNyWx
B36JBpEVbOHkqxAF7KM8raufadiCb3eJGraQRHCBMdhCQtLOlfWmm3d0G9Bs
wVS1yhSbWRi5hwixBY0JVi/sPkFv1z3HbUHSXeEw9uBpm7RN8bbgP3gsDPu1
l+L33xm2sGvA4hT2+O6J8tIyW/g8MXhtJd6HNB2JH7YQ90rs/Ur+Ph2Nn/xj
C0+/lE5iX+4Le36f1Q60pmEGW2vusqM2nx3I65qsnIco9Q/hdEU7EFRsE8fn
pdMotEFM0w5G8pYlsTfbcXK9J+zg3qYdu7Hrj8leDLC0A5Fczb3Yy9XBFWcO
28G+qlA6duhM4PpfR+1gv1eOE/bkrgCvgyfsQP/bDQ9sZpaXqEG6HYyecA/C
vhHqHM1aZgdHTu8/iy1W7DAQVIM+N8tIx04dtVV412QHlWk3s7DDrWjv61/Y
QUxCyDVsiqKRYdScHVwmCqqxJZpPaTgt2UE1z+mV+rJg0yyjtcoeFIypTdhF
x2H9vKA9SHFcfI7N3aY1GKJqD7L546+xq6erapUM7EH7+JcxbG9+tSvfrO2h
/vmZaew2FwUfvxB7+LjGfAFbKvH3wtIpe8grzmTB9TC27ElKepY9vPpayY49
8jphi+RtexAaP8eJrbWaWlrxyB7SCQlu7Fmndy9evbYH+aPn1mHfLw36vbxs
D4Nt/Cv19X9Zu6eT
        "]]}},
     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}]],
     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[0, 1, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 0}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"R(t)\"\>", 
               NCache[{1.05, Rational[1, 2]}, {1.05, 0.5}], {-1, 0}, 
               Automatic, {1, 0}]}, {InsetBox[
               GraphicsBox[
                {RGBColor[1, 0, 0], Thickness[Large], 
                 LineBox[{{0, 0}, {1, 0}}]}], {0, 1}, {Left, Bottom}, {1, 1}],
               InsetBox["\<\"I(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.3105506965587257, 
    0.17644925940836664`}}], InsetBox[
    StyleBox[Cell[TextData[Cell[BoxData[
      FormBox[
       RowBox[{
        SubscriptBox["R", "0"], "=", "1.6"}], TraditionalForm]]]],
      GeneratedCell->False,
      CellAutoOverwrite->False,
      CellBaseline->Baseline,
      TextAlignment->Left],
     TextAlignment->Center,
     TextJustification->0,
     Background->GrayLevel[1.]], {0.27302886776708135`, 0.3851209650330394}, {
    Left, Top}, {0.22585505204270945`, 0.08469564451601605}, {{1., 0.}, {0., 
    1.}},
    Alignment->{Left, Top}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImagePadding->{{0., 101.722279}, {0.625, 51.366389}},
  ImageSize->Automatic,
  PlotRange->{{-1.0291666666666666`, 
   0.4291666666666667}, {-0.6460339887498948, 0.32799999999999996`}},
  PlotRangePadding->Automatic]], "Input",
 CellChangeTimes->{{3.5657018986799707`*^9, 3.565701946066681*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Mu]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Gamma]", "=", "0.4"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Nu]", "=", "0.1"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Lambda]1", "=", 
   RowBox[{"-", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Lambda]2", "=", 
    RowBox[{"\[Beta]", "-", "\[Mu]", "-", "\[Gamma]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"r0", "=", 
   RowBox[{"\[Beta]", "/", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}]}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"e1", "=", 
  RowBox[{"{", 
   RowBox[{"1", ",", "0"}], "}"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"e2", "=", 
    RowBox[{"{", 
     RowBox[{
      FractionBox["1", "r0"], ",", " ", 
      FractionBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"r0", "-", "1"}], ")"}]}], 
       RowBox[{"\[Beta]", " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Gamma]", "+", "\[Nu]"}], ")"}]}]], ",", " ", 
      FractionBox[
       RowBox[{"\[Gamma]", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"r0", "-", "1"}], ")"}]}], 
       RowBox[{"\[Beta]", " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Gamma]", "+", "\[Nu]"}], ")"}]}]]}], 
     "}"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Zeta]", "=", 
     RowBox[{
      RowBox[{"4", " ", "\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"], 
       "\[IndentingNewLine]", "diff"}], "=", 
      RowBox[{
       RowBox[{"\[Beta]", "-", 
        RowBox[{"\[Gamma]", "\[IndentingNewLine]", "\[Delta]"}]}], "=", 
       RowBox[{
        RowBox[{
         RowBox[{"N", "[", 
          RowBox[{
           RowBox[{
            SuperscriptBox["\[Nu]", "2"], " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "2"]}], "-", 
           RowBox[{"4", " ", "\[Nu]", " ", 
            RowBox[{"(", 
             RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"]}]}], "]"}], 
         "\[IndentingNewLine]", "\[Lambda]1"}], "=", 
        RowBox[{
         RowBox[{
          RowBox[{"-", "\[Nu]"}], 
          RowBox[{"(", 
           RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "\[IndentingNewLine]", 
          "n"}], "=", "1"}]}]}]}]}], ";"}], "\[IndentingNewLine]", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]", "=", "0.15"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"VectorPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"-", "\[Beta]"}], " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Mu]", " ", "s"}], "+", "\[Mu]", "+", 
      RowBox[{"\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "s", "-", "i"}], ")"}]}]}], ",", " ", 
     RowBox[{
      RowBox[{"\[Beta]", " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Gamma]", " ", "i"}], "-", 
      RowBox[{"\[Mu]", " ", "i"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"s", ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "-", "\[Delta]"}], ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "+", "\[Delta]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "-", "\[Delta]"}], ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "+", "\[Delta]"}]}], "}"}], ",", 
   RowBox[{"VectorScale", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Automatic", ",", "Automatic", ",", "None"}], "}"}]}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
       "\"\<Infected (\!\(\*\n\
StyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\))\>\"", ",", "\"\<\>\""}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"\"\<Susceptible \>\"", "[", "S", "]"}], ",", "\"\<\>\""}], 
       "}"}]}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.565658124509137*^9, 3.565658245748071*^9}, {
   3.5656582796350093`*^9, 3.5656583781846457`*^9}, {3.5656584203400574`*^9, 
   3.5656584398001704`*^9}, {3.565658509662166*^9, 3.5656585999593306`*^9}, {
   3.5656586525263376`*^9, 3.5656586645560255`*^9}, {3.565658698216951*^9, 
   3.565658729194723*^9}, {3.565659251972624*^9, 3.5656593843011928`*^9}, {
   3.565659433853027*^9, 3.565659454761223*^9}, {3.5657188028221235`*^9, 
   3.5657188034091573`*^9}, {3.565718950375563*^9, 3.56571895136162*^9}, {
   3.565719026149897*^9, 3.56571907183751*^9}, 3.5657191162680516`*^9, {
   3.5657192007608843`*^9, 3.565719201699938*^9}, {3.565719407568713*^9, 
   3.5657194129880233`*^9}, {3.565719483283044*^9, 3.5657194884823413`*^9}, {
   3.5657195457726183`*^9, 3.5657196382689085`*^9}, {3.5657196686636467`*^9, 
   3.565719721795686*^9}, {3.565719872141285*^9, 3.5657199409272194`*^9}, {
   3.5657200764059687`*^9, 3.565720126157814*^9}, {3.565721225169674*^9, 
   3.5657212254276886`*^9}, 3.5657213654927*^9, {3.565721513162146*^9, 
   3.565721650479*^9}, {3.5659862997684703`*^9, 3.565986346904166*^9}, {
   3.565986387213472*^9, 3.5659864763165684`*^9}, {3.565986530978695*^9, 
   3.565986644117166*^9}, {3.5659866843334665`*^9, 3.56598668789367*^9}, {
   3.565986722767665*^9, 3.5659869171817846`*^9}}],

Cell[BoxData["1.6`"], "Output",
 CellChangeTimes->{
  3.565986603338834*^9, 3.5659866546107664`*^9, 3.565986690059794*^9, 
   3.5659867386925755`*^9, 3.5659868017221804`*^9, {3.5659868374082217`*^9, 
   3.5659869185228615`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"1", ",", "0"}], "}"}]], "Output",
 CellChangeTimes->{
  3.565986603338834*^9, 3.5659866546107664`*^9, 3.565986690059794*^9, 
   3.5659867386925755`*^9, 3.5659868017221804`*^9, {3.5659868374082217`*^9, 
   3.5659869185248613`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.04"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Mu]", "=", "0.043"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Gamma]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Nu]", "=", "0.01"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Lambda]1", "=", 
   RowBox[{"-", "\[Mu]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Lambda]2", "=", 
    RowBox[{"-", 
     RowBox[{"(", 
      RowBox[{"\[Beta]", "-", "\[Mu]", "-", "\[Gamma]"}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"r0", "=", 
   RowBox[{"\[Beta]", "/", 
    RowBox[{"(", 
     RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}]}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"e1", "=", 
   RowBox[{"{", 
    RowBox[{"1", ",", "0"}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"e2", "=", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["1", "r0"], ",", " ", 
     FractionBox[
      RowBox[{
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"r0", "-", "1"}], ")"}]}], 
      RowBox[{"\[Beta]", " ", 
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Gamma]", "+", "\[Nu]"}], ")"}]}]], ",", " ", 
     FractionBox[
      RowBox[{"\[Gamma]", 
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"r0", "-", "1"}], ")"}]}], 
      RowBox[{"\[Beta]", " ", 
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Gamma]", "+", "\[Nu]"}], ")"}]}]]}], "}"}]}],
   "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Zeta]", "=", 
     RowBox[{
      RowBox[{"4", " ", "\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"], 
       "\[IndentingNewLine]", "diff"}], "=", 
      RowBox[{
       RowBox[{"\[Beta]", "-", 
        RowBox[{"\[Gamma]", "\[IndentingNewLine]", "\[Delta]"}]}], "=", 
       RowBox[{
        RowBox[{
         RowBox[{"N", "[", 
          RowBox[{
           RowBox[{
            SuperscriptBox["\[Nu]", "2"], " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "2"]}], "-", 
           RowBox[{"4", " ", "\[Nu]", " ", 
            RowBox[{"(", 
             RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"]}]}], "]"}], 
         "\[IndentingNewLine]", "\[Lambda]1"}], "=", 
        RowBox[{
         RowBox[{
          RowBox[{"-", "\[Nu]"}], 
          RowBox[{"(", 
           RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "\[IndentingNewLine]", 
          "n"}], "=", "1"}]}]}]}]}], ";"}], "\[IndentingNewLine]", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]", "=", "0.15"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"VectorPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"-", "\[Beta]"}], " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Mu]", " ", "s"}], "+", "\[Mu]", "+", 
      RowBox[{"\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "s", "-", "i"}], ")"}]}]}], ",", " ", 
     RowBox[{
      RowBox[{"\[Beta]", " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Gamma]", " ", "i"}], "-", 
      RowBox[{"\[Mu]", " ", "i"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"s", ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "-", "\[Delta]"}], ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "+", "\[Delta]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "-", "\[Delta]"}], ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "+", "\[Delta]"}]}], "}"}], ",", 
   RowBox[{"VectorScale", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Automatic", ",", "Automatic", ",", "None"}], "}"}]}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
       "\"\<Infected (\!\(\*\n\
StyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\))\>\"", ",", "\"\<\>\""}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"\"\<Susceptible \>\"", "[", "S", "]"}], ",", "\"\<\>\""}], 
       "}"}]}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.565658124509137*^9, 3.565658245748071*^9}, {
   3.5656582796350093`*^9, 3.5656583781846457`*^9}, {3.5656584203400574`*^9, 
   3.5656584398001704`*^9}, {3.565658509662166*^9, 3.5656585999593306`*^9}, {
   3.5656586525263376`*^9, 3.5656586645560255`*^9}, {3.565658698216951*^9, 
   3.565658729194723*^9}, {3.565659251972624*^9, 3.5656593843011928`*^9}, {
   3.565659433853027*^9, 3.565659454761223*^9}, {3.5657188028221235`*^9, 
   3.5657188034091573`*^9}, {3.565718950375563*^9, 3.56571895136162*^9}, {
   3.565719026149897*^9, 3.56571907183751*^9}, 3.5657191162680516`*^9, {
   3.5657192007608843`*^9, 3.565719201699938*^9}, {3.565719407568713*^9, 
   3.5657194129880233`*^9}, {3.565719483283044*^9, 3.5657194884823413`*^9}, {
   3.5657195457726183`*^9, 3.5657196382689085`*^9}, {3.5657196686636467`*^9, 
   3.565719721795686*^9}, {3.565719872141285*^9, 3.5657199409272194`*^9}, {
   3.5657200764059687`*^9, 3.565720126157814*^9}, {3.565721225169674*^9, 
   3.5657212254276886`*^9}, 3.5657213654927*^9, {3.565721513162146*^9, 
   3.565721650479*^9}, {3.5659862997684703`*^9, 3.565986346904166*^9}, {
   3.565986387213472*^9, 3.5659864763165684`*^9}, {3.565986530978695*^9, 
   3.565986644117166*^9}, {3.5659866843334665`*^9, 3.56598668789367*^9}, {
   3.565986722767665*^9, 3.5659869171817846`*^9}, {3.5659872619605045`*^9, 
   3.565987319312785*^9}}],

Cell[BoxData["0.2797202797202797`"], "Output",
 CellChangeTimes->{
  3.565986603338834*^9, 3.5659866546107664`*^9, 3.565986690059794*^9, 
   3.5659867386925755`*^9, 3.5659868017221804`*^9, {3.5659868374082217`*^9, 
   3.5659869187758756`*^9}, 3.5659873203268433`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"3.5750000000000006`", ",", 
   RowBox[{"-", "0.8919934640522875`"}], ",", 
   RowBox[{"-", "1.6830065359477122`"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.565986603338834*^9, 3.5659866546107664`*^9, 3.565986690059794*^9, 
   3.5659867386925755`*^9, 3.5659868017221804`*^9, {3.5659868374082217`*^9, 
   3.5659869187758756`*^9}, 3.5659873203298435`*^9}],

Cell[BoxData[
 GraphicsBox[{{}, 
   {Hue[0.67, 0.6, 0.6], 
    {Arrowheads[{{0.045873685240266644`, 1.}}], 
     ArrowBox[{{3.4103128195171935`, -1.0457188588233333`}, {
      3.4396871804828084`, -1.0382680692812416`}}]}, 
    {Arrowheads[{{0.045873685240266145`, 1.}}], 
     ArrowBox[{{3.4104273313431723`, -1.0247156955524255`}, {
      3.439572668656829, -1.0164140896950065`}}]}, 
    {Arrowheads[{{0.04587368524026648, 1.}}], 
     ArrowBox[{{3.410596991241114, -1.0038421872606125`}, {
      3.439403008758888, -0.9944304551296766}}]}, 
    {Arrowheads[{{0.04587368524026653, 1.}}], 
     ArrowBox[{{3.4108641850742583`, -0.9831639914327611}, {
      3.4391358149257436`, -0.9722515081003851}}]}, 
    {Arrowheads[{{0.04587368524026609, 1.}}], 
     ArrowBox[{{3.4113198235960995`, -0.9627941311615329}, {
      3.438680176403902, -0.9497642255144706}}]}, 
    {Arrowheads[{{0.0458736852402661, 1.}}], 
     ArrowBox[{{3.4121819472213515`, -0.9429307900570114}, {
      3.43781805277865, -0.9267704237618491}}]}, 
    {Arrowheads[{{0.04587368524026636, 1.}}], 
     ArrowBox[{{3.4140335711919643`, -0.923878099555498}, {
      3.435966428808037, -0.9029659714062195}}]}, 
    {Arrowheads[{{0.04587368524026636, 1.}}], 
     ArrowBox[{{3.4183829648169195`, -0.9056245565294351}, {
      3.4316170351830824`, -0.8783623715751394}}]}, 
    {Arrowheads[{{0.0458736852402664, 1.}}], 
     ArrowBox[{{3.4265922920913643`, -0.8856332847950947}, {
      3.4234077079086367`, -0.8554965004523368}}]}, 
    {Arrowheads[{{0.045873685240266276`, 1.}}], 
     ArrowBox[{{3.4339068566680835`, -0.8613943692056935}, {
      3.4160931433319184`, -0.8368782731845953}}]}, 
    {Arrowheads[{{0.04587368524026647, 1.}}], 
     ArrowBox[{{3.4372686632038576`, -0.8365999789541851}, {
      3.412731336796144, -0.8188155205789607}}]}, 
    {Arrowheads[{{0.045873685240266235`, 1.}}], 
     ArrowBox[{{3.438640532719185, -0.8128767312079337}, {
      3.4113594672808163`, -0.7996816254680691}}]}, 
    {Arrowheads[{{0.04587368524026654, 1.}}], 
     ArrowBox[{{3.4392654261407247`, -0.7899583905538532}, {
      3.4107345738592763`, -0.7797428232650068}}]}, 
    {Arrowheads[{{0.04587368524026631, 1.}}], 
     ArrowBox[{{3.439587388829359, -0.7675208065010323}, {
      3.410412611170643, -0.7593232644606848}}]}, 
    {Arrowheads[{{0.045873685240267, 1.}}], 
     ArrowBox[{{3.439770380031155, -0.7453739537313088}, {
      3.410229619968846, -0.7386129743732652}}]}, 
    {Arrowheads[{{0.04587368524026628, 1.}}], 
     ArrowBox[{{3.431628853615862, -1.0452431085557445`}, {
      3.461228289241282, -1.0387438195488303`}}]}, 
    {Arrowheads[{{0.04587368524026658, 1.}}], 
     ArrowBox[{{3.4317188607731284`, -1.024200308578984}, {
      3.461138282084016, -1.0169294766684482`}}]}, 
    {Arrowheads[{{0.04587368524026619, 1.}}], 
     ArrowBox[{{3.431854164295903, -1.0032810158118683`}, {
      3.461002978561241, -0.9949916265784208}}]}, 
    {Arrowheads[{{0.04587368524026664, 1.}}], 
     ArrowBox[{{3.4320717026364336`, -0.9825525568029793}, {
      3.460785440220711, -0.972862942730167}}]}, 
    {Arrowheads[{{0.045873685240266145`, 1.}}], 
     ArrowBox[{{3.432454426098961, -0.9621370874395154}, {
      3.4604027167581832`, -0.9504212692364878}}]}, 
    {Arrowheads[{{0.04587368524026643, 1.}}], 
     ArrowBox[{{3.433216123091529, -0.9422683589729369}, {
      3.4596410197656153`, -0.9274328548459236}}]}, 
    {Arrowheads[{{0.04587368524026651, 1.}}], 
     ArrowBox[{{3.435000939833844, -0.9233719637655182}, {
      3.4578562030233004`, -0.9034721071961993}}]}, 
    {Arrowheads[{{0.045873685240266505`, 1.}}], 
     ArrowBox[{{3.439811536245491, -0.9056245565294352}, {
      3.4530456066116537`, -0.8783623715751394}}]}, 
    {Arrowheads[{{0.04587368524026629, 1.}}], 
     ArrowBox[{{3.449546645045162, -0.8853928882285244}, {
      3.443310497811982, -0.8557368970189074}}]}, 
    {Arrowheads[{{0.045873685240266575`, 1.}}], 
     ArrowBox[{{3.4568130647615685`, -0.8601705468114551}, {
      3.4360440780955757`, -0.8381020955788335}}]}, 
    {Arrowheads[{{0.0458736852402661, 1.}}], 
     ArrowBox[{{3.459508061359725, -0.8353575066173211}, {
      3.4333490814974197`, -0.8200579929158247}}]}, 
    {Arrowheads[{{0.045873685240266276`, 1.}}], 
     ArrowBox[{{3.460511969015327, -0.8118693258448285}, {
      3.4323451738418176`, -0.8006890308311744}}]}, 
    {Arrowheads[{{0.045873685240266186`, 1.}}], 
     ArrowBox[{{3.460955883295972, -0.789157467325324}, {
      3.4319012595611724`, -0.7805437464935359}}]}, 
    {Arrowheads[{{0.045873685240266096`, 1.}}], 
     ArrowBox[{{3.4611825339398354`, -0.766873473869549}, {
      3.4316746089173087`, -0.7599705970921681}}]}, 
    {Arrowheads[{{0.045873685240266575`, 1.}}], 
     ArrowBox[{{3.4613110989901625`, -0.7448399021972668}, {
      3.4315460438669816`, -0.7391470259073073}}]}, 
    {Arrowheads[{{0.045873685240266485`, 1.}}], 
     ArrowBox[{{3.452957186451028, -1.0447472134654612`}, {
      3.482757099263259, -1.0392397146391135`}}]}, 
    {Arrowheads[{{0.045873685240266644`, 1.}}], 
     ArrowBox[{{3.453023888759422, -1.0236578539243342`}, {
      3.4826903969548653`, -1.017471931323098}}]}, 
    {Arrowheads[{{0.04587368524026643, 1.}}], 
     ArrowBox[{{3.4531256125047873`, -1.0026822837178324`}, {
      3.4825886732094995`, -0.9955903586724569}}]}, 
    {Arrowheads[{{0.04587368524026648, 1.}}], 
     ArrowBox[{{3.453292601775628, -0.981886981731843}, {
      3.4824216839386595`, -0.9735285178013035}}]}, 
    {Arrowheads[{{0.045873685240266526`, 1.}}], 
     ArrowBox[{{3.453596012063382, -0.9613989425140086}, {
      3.482118273650905, -0.9511594141619947}}]}, 
    {Arrowheads[{{0.045873685240266554`, 1.}}], 
     ArrowBox[{{3.454233694673856, -0.941483366239602}, {
      3.4814805910404307`, -0.9282178475792584}}]}, 
    {Arrowheads[{{0.045873685240266165`, 1.}}], 
     ArrowBox[{{3.455888303562708, -0.9227138987320412}, {
      3.4798259821515787`, -0.9041301722296764}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.461240107674062, -0.9056245565294352}, {
      3.4744741780402246`, -0.8783623715751394}}]}, 
    {Arrowheads[{{0.04587368524026634, 1.}}], 
     ArrowBox[{{3.4729483033828505`, -0.8848362598054603}, {
      3.4627659823314363`, -0.8562935254419712}}]}, 
    {Arrowheads[{{0.04587368524026623, 1.}}], 
     ArrowBox[{{3.4796572053562733`, -0.8586416019248925}, {
      3.4560570803580135`, -0.8396310404653963}}]}, 
    {Arrowheads[{{0.045873685240266415`, 1.}}], 
     ArrowBox[{{3.4816206356685124`, -0.8340447918499181}, {
      3.4540936500457744`, -0.8213707076832277}}]}, 
    {Arrowheads[{{0.04587368524026651, 1.}}], 
     ArrowBox[{{3.482299936573687, -0.8108614863150004}, {
      3.4534143491406, -0.8016968703610025}}]}, 
    {Arrowheads[{{0.04587368524026625, 1.}}], 
     ArrowBox[{{3.4825946051158247`, -0.7883718343812977}, {
      3.453119680598462, -0.7813293794375622}}]}, 
    {Arrowheads[{{0.04587368524026638, 1.}}], 
     ArrowBox[{{3.4827444601612823`, -0.7662433153713649}, {
      3.452969825553004, -0.7606007555903521}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.482829519191869, -0.7443215069269022}, {
      3.452884766522418, -0.7396654211776718}}]}, 
    {Arrowheads[{{0.045873685240266505`, 1.}}], 
     ArrowBox[{{3.47429964439327, -1.0442316655430948`}, {
      3.50427178417816, -1.03975526256148}}]}, 
    {Arrowheads[{{0.04587368524026611, 1.}}], 
     ArrowBox[{{3.4743450688346575`, -1.0230885705430424`}, {
      3.504226359736772, -1.01804121470439}}]}, 
    {Arrowheads[{{0.04587368524026616, 1.}}], 
     ArrowBox[{{3.4744153252178185`, -1.0020455076285109`}, {
      3.504156103353611, -0.9962271347617783}}]}, 
    {Arrowheads[{{0.045873685240266145`, 1.}}], 
     ArrowBox[{{3.474533063297726, -0.9811647897665279}, {
      3.5040383652737033`, -0.9742507097666184}}]}, 
    {Arrowheads[{{0.04587368524026617, 1.}}], 
     ArrowBox[{{3.4747541012490895`, -0.9605715039650342}, {
      3.5038173273223396`, -0.9519868527109693}}]}, 
    {Arrowheads[{{0.045873685240266096`, 1.}}], 
     ArrowBox[{{3.4752463489481666`, -0.9405504365256161}, {
      3.5033250796232625`, -0.9291507772932444}}]}, 
    {Arrowheads[{{0.04587368524026691, 1.}}], 
     ArrowBox[{{3.476684786207878, -0.9218368110757207}, {
      3.5018866423635515`, -0.9050072598859967}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.4826686791026336`, -0.9056245565294352}, {
      3.495902749468796, -0.8783623715751394}}]}, 
    {Arrowheads[{{0.04587368524026638, 1.}}], 
     ArrowBox[{{3.4968527412916353`, -0.8836924186292648}, {
      3.4817186872797943`, -0.8574373666181669}}]}, 
    {Arrowheads[{{0.04587368524026652, 1.}}], 
     ArrowBox[{{3.502329866626208, -0.8568461802374808}, {
      3.4762415619452214`, -0.841426462152808}}]}, 
    {Arrowheads[{{0.04587368524026653, 1.}}], 
     ArrowBox[{{3.503591653609667, -0.8327009388070654}, {
      3.4749797749617626`, -0.8227145607260805}}]}, 
    {Arrowheads[{{0.045873685240266096`, 1.}}], 
     ArrowBox[{{3.504006604044007, -0.8098690587620395}, {
      3.4745648245274223`, -0.8026892979139634}}]}, 
    {Arrowheads[{{0.04587368524026645, 1.}}], 
     ArrowBox[{{3.5041850251132756`, -0.7876078471235604}, {
      3.4743864034581535`, -0.7820933666952996}}]}, 
    {Arrowheads[{{0.04587368524026638, 1.}}], 
     ArrowBox[{{3.5042758267193914`, -0.7656330004196187}, {
      3.474295601852038, -0.7612110705420984}}]}, 
    {Arrowheads[{{0.0458736852402665, 1.}}], 
     ArrowBox[{{3.5043275208322937`, -0.7438199066465077}, {
      3.4742439077391354`, -0.7401670214580663}}]}, 
    {Arrowheads[{{0.045873685240266054`, 1.}}], 
     ArrowBox[{{3.495658092419813, -1.043697248139006}, {
      3.525770479008759, -1.040289679965569}}]}, 
    {Arrowheads[{{0.04587368524026667, 1.}}], 
     ArrowBox[{{3.4956851914031932`, -1.0224931459584636`}, {
      3.5257433800253795`, -1.0186366392889683`}}]}, 
    {Arrowheads[{{0.0458736852402666, 1.}}], 
     ArrowBox[{{3.4957276764964034`, -1.0013709086034077`}, {
      3.525700894932169, -0.9969017337868815}}]}, 
    {Arrowheads[{{0.04587368524026606, 1.}}], 
     ArrowBox[{{3.495800319336242, -0.9803845843915094}, {
      3.5256282520923303`, -0.9750309151416369}}]}, 
    {Arrowheads[{{0.045873685240266096`, 1.}}], 
     ArrowBox[{{3.4959412017474114`, -0.9596478319032055}, {
      3.525487369681161, -0.9529105247727978}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.4962743555305797`, -0.9394419305774353}, {
      3.525154215897992, -0.9302592832414253}}]}, 
    {Arrowheads[{{0.045873685240266644`, 1.}}], 
     ArrowBox[{{3.497390533901525, -0.9206379536044682}, {
      3.5240380375270477`, -0.9062061173572493}}]}, 
    {Arrowheads[{{0.045873685240266505`, 1.}}], 
     ArrowBox[{{3.504097250531205, -0.9056245565294352}, {
      3.5173313208973678`, -0.8783623715751394}}]}, 
    {Arrowheads[{{0.04587368524026651, 1.}}], 
     ArrowBox[{{3.5211072509826846`, -0.8815911390233095}, {
      3.500321320445887, -0.8595386462241221}}]}, 
    {Arrowheads[{{0.04587368524026644, 1.}}], 
     ArrowBox[{{3.524736956272387, -0.8548771005110266}, {
      3.496691615156185, -0.8433955418792621}}]}, 
    {Arrowheads[{{0.04587368524026607, 1.}}], 
     ArrowBox[{{3.5254185406664837`, -0.8313651700371274}, {
      3.4960100307620885`, -0.8240503294960185}}]}, 
    {Arrowheads[{{0.04587368524026619, 1.}}], 
     ArrowBox[{{3.525637224706752, -0.8089055310488612}, {
      3.4957913467218207`, -0.8036528256271418}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.525731329967096, -0.7868705620187941}, {
      3.4956972414614764`, -0.7828306518000658}}]}, 
    {Arrowheads[{{0.045873685240266235`, 1.}}], 
     ArrowBox[{{3.5257794533960096`, -0.7650445518771556}, {
      3.495649118032563, -0.7617995190845613}}]}, 
    {Arrowheads[{{0.04587368524026636, 1.}}], 
     ArrowBox[{{3.525806988320304, -0.7433359113626101}, {
      3.495621583108268, -0.7406510167419639}}]}, 
    {Arrowheads[{{0.04587368524026636, 1.}}], 
     ArrowBox[{{3.517034393946919, -1.0431450614609603`}, {
      3.547251320338796, -1.0408418666436146`}}]}, 
    {Arrowheads[{{0.045873685240266235`, 1.}}], 
     ArrowBox[{{3.517047120447897, -1.0218727803754404`}, {
      3.547238593837818, -1.0192570048719918`}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.517067329670006, -1.0006595769681486`}, {
      3.547218384615709, -0.9976130654221407}}]}, 
    {Arrowheads[{{0.04587368524026642, 1.}}], 
     ArrowBox[{{3.5171025501799296`, -0.9795465002106493}, {
      3.547183164105786, -0.975868999322497}}]}, 
    {Arrowheads[{{0.04587368524026613, 1.}}], 
     ArrowBox[{{3.51717303098232, -0.9586235634296574}, {
      3.547112683303395, -0.9539347932463461}}]}, 
    {Arrowheads[{{0.04587368524026606, 1.}}], 
     ArrowBox[{{3.5173500164677494`, -0.9381314149647053}, {
      3.5469356978179656`, -0.9315697988541551}}]}, 
    {Arrowheads[{{0.045873685240266415`, 1.}}], 
     ArrowBox[{{3.518040650740168, -0.9189645630009202}, {
      3.546245063545547, -0.9078795079607972}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.5255258219597763`, -0.9056245565294352}, {
      3.5387598923259387`, -0.8783623715751394}}]}, 
    {Arrowheads[{{0.045873685240266145`, 1.}}], 
     ArrowBox[{{3.5451526313731154`, -0.8783326214560332}, {
      3.5191330829126, -0.8627971637913986}}]}, 
    {Arrowheads[{{0.04587368524026639, 1.}}], 
     ArrowBox[{{3.5468304244075703`, -0.8528601907657964}, {
      3.5174552898781446`, -0.8454124516244922}}]}, 
    {Arrowheads[{{0.045873685240266505`, 1.}}], 
     ArrowBox[{{3.5471095913399258`, -0.8300717938035983}, {
      3.5171761229457887`, -0.8253437057295475}}]}, 
    {Arrowheads[{{0.0458736852402665, 1.}}], 
     ArrowBox[{{3.547199217460269, -0.8079814858093396}, {
      3.517086496825446, -0.8045768708666632}}]}, 
    {Arrowheads[{{0.04587368524026651, 1.}}], 
     ArrowBox[{{3.547238138527397, -0.7861637392928081}, {
      3.517047575758318, -0.7835374745260518}}]}, 
    {Arrowheads[{{0.04587368524026603, 1.}}], 
     ArrowBox[{{3.547258207989535, -0.764479393280535}, {
      3.51702750629618, -0.7623646776811819}}]}, 
    {Arrowheads[{{0.045873685240266256`, 1.}}], 
     ArrowBox[{{3.5472697688240364`, -0.7428700367671892}, {
      3.517015945461679, -0.741116891337385}}]}, 
    {Arrowheads[{{0.04587368524026623, 1.}}], 
     ArrowBox[{{3.5384303632725067`, -1.0425765406754417`}, {
      3.568712493870351, -1.0414103874291332`}}]}, 
    {Arrowheads[{{0.0458736852402661, 1.}}], 
     ArrowBox[{{3.5384337114609723`, -1.0212292399865337`}, {
      3.5687091456818854`, -1.0199005452608982`}}]}, 
    {Arrowheads[{{0.04587368524026649, 1.}}], 
     ArrowBox[{{3.5384390912591224`, -0.9999136269273202}, {
      3.5687037658837353`, -0.998359015462969}}]}, 
    {Arrowheads[{{0.04587368524026649, 1.}}], 
     ArrowBox[{{3.5384486333739376`, -0.9786526847640324}, {
      3.5686942237689205`, -0.9767628147691138}}]}, 
    {Arrowheads[{{0.04587368524026664, 1.}}], 
     ArrowBox[{{3.5384682904783458`, -0.9574986275890819}, {
      3.568674566664512, -0.9550597290869215}}]}, 
    {Arrowheads[{{0.045873685240266096`, 1.}}], 
     ArrowBox[{{3.538520538063147, -0.9366006159500938}, {
      3.5686223190797106`, -0.9331005978687666}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.538759496099238, -0.916615543453912}, {
      3.5683833610436193`, -0.9102285275078055}}]}, 
    {Arrowheads[{{0.04587368524026623, 1.}}], 
     ArrowBox[{{3.546954393388348, -0.9056245565294354}, {
      3.5601884637545096`, -0.8783623715751392}}]}, 
    {Arrowheads[{{0.04587368524026602, 1.}}], 
     ArrowBox[{{3.5682422641977367`, -0.8743541430457051}, {
      3.538900592945121, -0.8667756422017266}}]}, 
    {Arrowheads[{{0.04587368524026644, 1.}}], 
     ArrowBox[{{3.568618682779551, -0.850917325836027}, {
      3.5385241743633067`, -0.8473553165542619}}]}, 
    {Arrowheads[{{0.04587368524026647, 1.}}], 
     ArrowBox[{{3.568680829112189, -0.8288469828566668}, {
      3.5384620280306684`, -0.8265685166764789}}]}, 
    {Arrowheads[{{0.045873685240266436`, 1.}}], 
     ArrowBox[{{3.568701224782885, -0.8071044681867766}, {
      3.538441632359972, -0.8054538884892263}}]}, 
    {Arrowheads[{{0.04587368524026611, 1.}}], 
     ArrowBox[{{3.568710223269711, -0.78548992828242}, {
      3.538432633873147, -0.78421128553644}}]}, 
    {Arrowheads[{{0.04587368524026632, 1.}}], 
     ArrowBox[{{3.568714915332572, -0.7639384127167864}, {
      3.538427941810286, -0.7629056582449306}}]}, 
    {Arrowheads[{{0.045873685240266325`, 1.}}], 
     ArrowBox[{{3.5687176402891065`, -0.742422541362309}, {
      3.538425216853751, -0.741564386742265}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -1.0419934640522874`}, {
      3.5901522881682832`, -1.0419934640522874`}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -1.020564892623716}, {
      3.5901522881682832`, -1.020564892623716}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -0.9991363211951446}, {
      3.5901522881682832`, -0.9991363211951446}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -0.9777077497665732}, {
      3.5901522881682832`, -0.9777077497665732}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -0.9562791783380017}, {
      3.5901522881682832`, -0.9562791783380017}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -0.9348506069094302}, {
      3.5901522881682832`, -0.9348506069094302}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.559847711831717, -0.9134220354808587}, {
      3.5901522881682832`, -0.9134220354808589}}]}, 
    {Arrowheads[{{0., 1.}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.8705648926237157}, {
      3.559847711831717, -0.870564892623716}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.8491363211951444}, {
      3.559847711831717, -0.8491363211951444}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.8277077497665729}, {
      3.559847711831717, -0.8277077497665729}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.8062791783380014}, {
      3.559847711831717, -0.8062791783380014}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.78485060690943}, {
      3.559847711831717, -0.78485060690943}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.7634220354808585}, {
      3.559847711831717, -0.7634220354808585}}]}, 
    {Arrowheads[{{0.04587368524026608, 1.}}], 
     ArrowBox[{{3.5901522881682832`, -0.741993464052287}, {
      3.559847711831717, -0.741993464052287}}]}, 
    {Arrowheads[{{0.0458736852402661, 1.}}], 
     ArrowBox[{{3.5812879902541725`, -1.0413979487828502`}, {
      3.61156915260297, -1.042588979321725}}]}, 
    {Arrowheads[{{0.0458736852402666, 1.}}], 
     ArrowBox[{{3.581291647186961, -1.0198827187174107`}, {
      3.611565495670182, -1.0212470665300213`}}]}, 
    {Arrowheads[{{0.0458736852402661, 1.}}], 
     ArrowBox[{{3.581297638431006, -0.9983321425098508}, {
      3.6115595044261366`, -0.9999404998804385}}]}, 
    {Arrowheads[{{0.04587368524026652, 1.}}], 
     ArrowBox[{{3.5813085709357795`, -0.9767191033016205}, {
      3.6115485719213636`, -0.9786963962315259}}]}, 
    {Arrowheads[{{0.045873685240266325`, 1.}}], 
     ArrowBox[{{3.581332139775606, -0.9549793367776445}, {
      3.611525003081537, -0.957579019898359}}]}, 
    {Arrowheads[{{0.04587368524026607, 1.}}], 
     ArrowBox[{{3.5814003675788713`, -0.9329154258361062}, {
      3.6114567752782714`, -0.9367857879827542}}]}, 
    {Arrowheads[{{0.04587368524026649, 1.}}], 
     ArrowBox[{{3.581791297542681, -0.9095051425892776}, {
      3.6110658453144624`, -0.9173389283724399}}]}, 
    {Arrowheads[{{0.04587368524026649, 1.}}], 
     ArrowBox[{{3.603045606611653, -0.8783623715751396}, {
      3.5898115362454894`, -0.905624556529435}}]}, 
    {Arrowheads[{{0.0458736852402666, 1.}}], 
     ArrowBox[{{3.6112767380201767`, -0.8675443321454883}, {
      3.581580404836966, -0.8735854531019435}}]}, 
    {Arrowheads[{{0.04587368524026602, 1.}}], 
     ArrowBox[{{3.611498800853826, -0.8475615126972974}, {
      3.5813583420033175`, -0.8507111296929912}}]}, 
    {Arrowheads[{{0.04587368524026617, 1.}}], 
     ArrowBox[{{3.6115447772974605`, -0.8266626866756261}, {
      3.5813123655596826`, -0.8287528128575196}}]}, 
    {Arrowheads[{{0.045873685240266096`, 1.}}], 
     ArrowBox[{{3.611561215539371, -0.8055078684452932}, {
      3.5812959273177727`, -0.8070504882307096}}]}, 
    {Arrowheads[{{0.04587368524026651, 1.}}], 
     ArrowBox[{{3.6115688062051357`, -0.7842463489800541}, {
      3.5812883366520074`, -0.785454864838806}}]}, 
    {Arrowheads[{{0.045873685240266325`, 1.}}], 
     ArrowBox[{{3.6115728783487735`, -0.7629302991272877}, {
      3.58128426450837, -0.7639137718344292}}]}, 
    {Arrowheads[{{0.04587368524026601, 1.}}], 
     ArrowBox[{{3.611575289792077, -0.7415826605088054}, {
      3.5812818530650663`, -0.7424042675957687}}]}, 
    {Arrowheads[{{0.04587368524026606, 1.}}], 
     ArrowBox[{{3.6027525289870503`, -1.0407924325913733`}, {
      3.632961756727235, -1.0431944955132015`}}]}, 
    {Arrowheads[{{0.045873685240266186`, 1.}}], 
     ArrowBox[{{3.6027676996922255`, -1.019186291264574}, {
      3.6329465860220598`, -1.021943493982858}}]}, 
    {Arrowheads[{{0.04587368524026607, 1.}}], 
     ArrowBox[{{3.6027927324674485`, -0.9975067886408321}, {
      3.632921553246837, -1.0007658537494573`}}]}, 
    {Arrowheads[{{0.045873685240266124`, 1.}}], 
     ArrowBox[{{3.6028388555216972`, -0.9756970577850194}, {
      3.6328754301925885`, -0.979718441748127}}]}, 
    {Arrowheads[{{0.04587368524026641, 1.}}], 
     ArrowBox[{{3.6029396448815207`, -0.9536220951849929}, {
      3.632774640832765, -0.9589362614910106}}]}, 
    {Arrowheads[{{0.04587368524026654, 1.}}], 
     ArrowBox[{{3.6032366834802234`, -0.9308714104651035}, {
      3.6324776022340624`, -0.9388298033537571}}]}, 
    {Arrowheads[{{0.04587368524026634, 1.}}], 
     ArrowBox[{{3.6049133805347973`, -0.905544799057003}, {
      3.6308009051794885`, -0.9212992719047145}}]}, 
    {Arrowheads[{{0.04587368524026649, 1.}}], 
     ArrowBox[{{3.6244741780402245`, -0.8783623715751396}, {
      3.611240107674061, -0.905624556529435}}]}, 
    {Arrowheads[{{0.04587368524026624, 1.}}], 
     ArrowBox[{{3.6320780390393628`, -0.8653344099969191}, {
      3.6036362466749234`, -0.8757953752505127}}]}, 
    {Arrowheads[{{0.045873685240266526`, 1.}}], 
     ArrowBox[{{3.6327224742888786`, -0.8462014007261472}, {
      3.6029918114254067`, -0.8520712416641415}}]}, 
    {Arrowheads[{{0.045873685240266034`, 1.}}], 
     ArrowBox[{{3.632877646755795, -0.8257136837282302}, {
      3.602836638958491, -0.8297018158049158}}]}, 
    {Arrowheads[{{0.045873685240266145`, 1.}}], 
     ArrowBox[{{3.632936156703222, -0.8047908308770718}, {
      3.6027781290110643`, -0.8077675257989311}}]}, 
    {Arrowheads[{{0.04587368524026657, 1.}}], 
     ArrowBox[{{3.632963912180482, -0.7836769982241705}, {
      3.602750373533804, -0.7860242155946896}}]}, 
    {Arrowheads[{{0.045873685240266186`, 1.}}], 
     ArrowBox[{{3.632979045716443, -0.7624629261812536}, {
      3.602735239997843, -0.7643811447804635}}]}, 
    {Arrowheads[{{0.04587368524026661, 1.}}], 
     ArrowBox[{{3.6329881051698267`, -0.7411898371321074}, {
      3.602726180544459, -0.7427970909724666}}]}, 
    {Arrowheads[{{0.04587368524026646, 1.}}], 
     ArrowBox[{{3.624242380902795, -1.0401796400627457`}, {
      3.6543290476686336`, -1.0438072880418292`}}]}, 
    {Arrowheads[{{0.04587368524026645, 1.}}], 
     ArrowBox[{{3.624277586707555, -1.0184797203688678`}, {
      3.6542938418638737`, -1.0226500648785646`}}]}, 
    {Arrowheads[{{0.04587368524026642, 1.}}], 
     ArrowBox[{{3.624335977006222, -0.9966670719147259}, {
      3.654235451565207, -1.0016055704755633`}}]}, 
    {Arrowheads[{{0.0458736852402663, 1.}}], 
     ArrowBox[{{3.6244442112968733`, -0.9746546160048588}, {
      3.654127217274555, -0.9807608835282874}}]}, 
    {Arrowheads[{{0.04587368524026634, 1.}}], 
     ArrowBox[{{3.6246820821415717`, -0.9522386629088441}, {
      3.6538893464298567`, -0.9603196937671594}}]}, 
    {Arrowheads[{{0.04587368524026619, 1.}}], 
     ArrowBox[{{3.625380100600591, -0.9288318242439073}, {
      3.6531913279708377`, -0.9408693895749533}}]}, 
    {Arrowheads[{{0.04587368524026629, 1.}}], 
     ArrowBox[{{3.628877046428395, -0.9024106109512755}, {
      3.649694382143033, -0.924433460010442}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.645902749468796, -0.8783623715751395}, {
      3.632668679102633, -0.9056245565294351}}]}, 
    {Arrowheads[{{0.04587368524026645, 1.}}], 
     ArrowBox[{{3.6528199792743115`, -0.8637519998494885}, {
      3.6257514492971166`, -0.8773777853979433}}]}, 
    {Arrowheads[{{0.04587368524026612, 1.}}], 
     ArrowBox[{{3.6538744485631827`, -0.8450423416011411}, {
      3.6246969800082462`, -0.8532303007891477}}]}, 
    {Arrowheads[{{0.045873685240266325`, 1.}}], 
     ArrowBox[{{3.6541675906682607`, -0.8248579090571122}, {
      3.624403837903168, -0.8305575904760336}}]}, 
    {Arrowheads[{{0.04587368524026623, 1.}}], 
     ArrowBox[{{3.6542843641559872`, -0.804126891460362}, {
      3.6242870644154417`, -0.8084314652156409}}]}, 
    {Arrowheads[{{0.045873685240266616`, 1.}}], 
     ArrowBox[{{3.6543413422196367`, -0.7831418341773255}, {
      3.6242300863517913`, -0.7865593796415343}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.654372941537343, -0.7620193913376783}, {
      3.6241984870340853`, -0.7648246796240388}}]}, 
    {Arrowheads[{{0.04587368524026606, 1.}}], 
     ArrowBox[{{3.654392072998218, -0.7408145818767301}, {
      3.6241793555732102`, -0.7431723462278439}}]}, 
    {Arrowheads[{{0.0458736852402662, 1.}}], 
     ArrowBox[{{3.6457582697232507`, -1.039562533693226}, {
      3.67567030170532, -1.044424394411349}}]}, 
    {Arrowheads[{{0.045873685240266325`, 1.}}], 
     ArrowBox[{{3.645822449964739, -1.0177675609052343`}, {
      3.675606121463832, -1.0233622243421978`}}]}, 
    {Arrowheads[{{0.04587368524026648, 1.}}], 
     ArrowBox[{{3.6459292058493324`, -0.9958207141433899}, {
      3.675499365579239, -1.0024519282468993`}}]}, 
    {Arrowheads[{{0.0458736852402666, 1.}}], 
     ArrowBox[{{3.646127486740989, -0.9736068800481684}, {
      3.6753010846875824`, -0.9818086194849779}}]}, 
    {Arrowheads[{{0.045873685240266346`, 1.}}], 
     ArrowBox[{{3.646561991564192, -0.950865823830497}, {
      3.674866579864379, -0.9616925328455064}}]}, 
    {Arrowheads[{{0.0458736852402664, 1.}}], 
     ArrowBox[{{3.647802221305215, -0.9269215193559533}, {
      3.6736263501233566`, -0.9427796944629071}}]}, 
    {Arrowheads[{{0.045873685240266256`, 1.}}], 
     ArrowBox[{{3.6529539489449583`, -0.900407850528995}, {
      3.668474622483613, -0.9264362204327227}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.6673313208973672`, -0.8783623715751395}, {
      3.6540972505312044`, -0.9056245565294351}}]}, 
    {Arrowheads[{{0.045873685240266554`, 1.}}], 
     ArrowBox[{{3.6736088478622158`, -0.8626073739308155}, {
      3.647819723566355, -0.878522411316616}}]}, 
    {Arrowheads[{{0.0458736852402663, 1.}}], 
     ArrowBox[{{3.6749911067716963`, -0.8440604747406726}, {
      3.6464374646568753`, -0.8542121676496163}}]}, 
    {Arrowheads[{{0.045873685240266214`, 1.}}], 
     ArrowBox[{{3.67542825150081, -0.8240895944952117}, {
      3.646000319927761, -0.831325905037934}}]}, 
    {Arrowheads[{{0.045873685240266436`, 1.}}], 
     ArrowBox[{{3.6756120982753084`, -0.8035138541922062}, {
      3.6458164731532623`, -0.8090445024837966}}]}, 
    {Arrowheads[{{0.04587368524026638, 1.}}], 
     ArrowBox[{{3.6757044097756086`, -0.7826397208063397}, {
      3.6457241616529625`, -0.7870614930125203}}]}, 
    {Arrowheads[{{0.04587368524026664, 1.}}], 
     ArrowBox[{{3.6757565033105513`, -0.7615989813068714}, {
      3.64567206811802, -0.7652450896548457}}]}, 
    {Arrowheads[{{0.0458736852402663, 1.}}], 
     ArrowBox[{{3.675788410727599, -0.7404563915693846}, {
      3.6456401607009723`, -0.7435305365351894}}]}, 
    {Arrowheads[{{0.04587368524026638, 1.}}], 
     ArrowBox[{{3.667300548152975, -1.038944250943376}, {
      3.6969851661327393`, -1.045042677161199}}]}, 
    {Arrowheads[{{0.045873685240266596`, 1.}}], 
     ArrowBox[{{3.6674027660890345`, -1.0170546857267209`}, {
      3.69688294819668, -1.0240750995207113`}}]}, 
    {Arrowheads[{{0.04587368524026621, 1.}}], 
     ArrowBox[{{3.6675728908632106`, -0.9949760424370965}, {
      3.696712823422503, -1.0032965999531929`}}]}, 
    {Arrowheads[{{0.04587368524026654, 1.}}], 
     ArrowBox[{{3.667888158268173, -0.9725701047100547}, {
      3.6963975560175415`, -0.9828453948230916}}]}, 
    {Arrowheads[{{0.045873685240266346`, 1.}}], 
     ArrowBox[{{3.6685709593310296`, -0.9495415655174242}, {
      3.6957147549546843`, -0.9630167911585792}}]}, 
    {Arrowheads[{{0.04587368524026641, 1.}}], 
     ArrowBox[{{3.670426953210687, -0.9252417863893635}, {
      3.693858761075027, -0.9444594274294968}}]}, 
    {Arrowheads[{{0.045873685240266394`, 1.}}], 
     ArrowBox[{{3.6766751325462734`, -0.8992906581781819}, {
      3.6876105817394405`, -0.9275534127835355}}]}, 
    {Arrowheads[{{0.0458736852402665, 1.}}], 
     ArrowBox[{{3.6887598923259386`, -0.8783623715751395}, {
      3.6755258219597753`, -0.9056245565294351}}]}, 
    {Arrowheads[{{0.04587368524026647, 1.}}], 
     ArrowBox[{{3.694474981942933, -0.8617608858853013}, {
      3.669810732342781, -0.8793688993621305}}]}, 
    {Arrowheads[{{0.045873685240266256`, 1.}}], 
     ArrowBox[{{3.6960963656676125`, -0.8432294238213729}, {
      3.6681893486181014`, -0.8550432185689157}}]}, 
    {Arrowheads[{{0.0458736852402664, 1.}}], 
     ArrowBox[{{3.6966703294823473`, -0.8234014306701709}, {
      3.6676153848033666`, -0.8320140688629749}}]}, 
    {Arrowheads[{{0.045873685240266214`, 1.}}], 
     ArrowBox[{{3.6969246328784795`, -0.8029488716199269}, {
      3.6673610814072344`, -0.809609485056076}}]}, 
    {Arrowheads[{{0.045873685240266596`, 1.}}], 
     ArrowBox[{{3.69705600815907, -0.7821692334736127}, {
      3.6672297061266432`, -0.7875319803452473}}]}, 
    {Arrowheads[{{0.04587368524026665, 1.}}], 
     ArrowBox[{{3.6971314580202415`, -0.7612008465034942}, {
      3.6671542562654724`, -0.7656432244582229}}]}, 
    {Arrowheads[{{0.045873685240266485`, 1.}}], 
     ArrowBox[{{3.6971782176609893`, -0.7401146956193817}, {
      3.6671074966247246`, -0.7438722324851923}}]}, 
    {Arrowheads[{{0.04587368524026666, 1.}}], 
     ArrowBox[{{3.688869169250322, -1.0383280298911484`}, {
      3.7182736878925344`, -1.0456588982134263`}}]}, 
    {Arrowheads[{{0.04587368524026622, 1.}}], 
     ArrowBox[{{3.689018288445934, -1.0163461310492223`}, {
      3.7181245686969224`, -1.0247836541982098`}}]}, 
    {Arrowheads[{{0.045873685240266186`, 1.}}], 
     ArrowBox[{{3.689266021235483, -0.9941416082216719}, {
      3.7178768359073735`, -1.0041310341686174`}}]}, 
    {Arrowheads[{{0.045873685240266145`, 1.}}], 
     ArrowBox[{{3.6897221226622317`, -0.9715605095265802}, {
      3.7174207344806245`, -0.9838549900065662}}]}, 
    {Arrowheads[{{0.04587368524026637, 1.}}], 
     ArrowBox[{{3.690690230847265, -0.9483000441791035}, {
      3.716452626295592, -0.9642583124968999}}]}, 
    {Arrowheads[{{0.04587368524026645, 1.}}], 
     ArrowBox[{{3.693155470914141, -0.9238460777138541}, {
      3.713987386228716, -0.9458551361050064}}]}, 
    {Arrowheads[{{0.0458736852402664, 1.}}], 
     ArrowBox[{{3.6999333521530855`, -0.8987129825980593}, {
      3.707209504989771, -0.9281310883636583}}]}, 
    {Arrowheads[{{0.0458736852402665, 1.}}], 
     ArrowBox[{{3.71018846375451, -0.8783623715751395}, {
      3.6969543933883466`, -0.9056245565294351}}]}, 
    {Arrowheads[{{0.04587368524026646, 1.}}], 
     ArrowBox[{{3.715419150730034, -0.861119083161993}, {
      3.691723706412822, -0.8800107020854386}}]}, 
    {Arrowheads[{{0.04587368524026636, 1.}}], 
     ArrowBox[{{3.717204959765054, -0.8425243121262507}, {
      3.6899378973778028`, -0.8557483302640382}}]}, 
    {Arrowheads[{{0.04587368524026652, 1.}}], 
     ArrowBox[{{3.7179019475718875`, -0.822785548845017}, {
      3.6892409095709686`, -0.8326299506881288}}]}, 
    {Arrowheads[{{0.04587368524026617, 1.}}], 
     ArrowBox[{{3.718226322700986, -0.8024287348848199}, {
      3.6889165344418706`, -0.8101296217911829}}]}, 
    {Arrowheads[{{0.04587368524026652, 1.}}], 
     ArrowBox[{{3.7183986308935664`, -0.7817287632181029}, {
      3.68874422624929, -0.787972450600757}}]}, 
    {Arrowheads[{{0.04587368524026649, 1.}}], 
     ArrowBox[{{3.718499331294973, -0.7608240445241612}, {
      3.6886435258478834`, -0.766020026437556}}]}, 
    {Arrowheads[{{0.04587368524026648, 1.}}], 
     ArrowBox[{{3.718562480209288, -0.7397888762164946}, {
      3.6885803769335688`, -0.7441980518880796}}]}, 
    {Arrowheads[{{0.04587368524026605, 1.}}], 
     ArrowBox[{{3.710463673763092, -1.0377171272707788`}, {
      3.739536326236907, -1.0462698008337958`}}]}, 
    {Arrowheads[{{0.04587368524026632, 1.}}], 
     ArrowBox[{{3.7106680278320043`, -1.0156469244954636`}, {
      3.7393319721679945`, -1.0254828607519686`}}]}, 
    {Arrowheads[{{0.04587368524026603, 1.}}], 
     ArrowBox[{{3.711006097921333, -0.9933257668887648}, {
      3.7389939020786658`, -1.0049468755015243`}}]}, 
    {Arrowheads[{{0.045873685240266526`, 1.}}], 
     ArrowBox[{{3.711621931234763, -0.970593038750144}, {
      3.738378068765236, -0.9848224607830024}}]}, 
    {Arrowheads[{{0.045873685240266165`, 1.}}], 
     ArrowBox[{{3.712893533619318, -0.9471673558798916}, {
      3.737106466380681, -0.9653910007961117}}]}, 
    {Arrowheads[{{0.04587368524026635, 1.}}], 
     ArrowBox[{{3.71589561570825, -0.9227385458378026}, {
      3.734104384291749, -0.9469626679810579}}]}, 
    {Arrowheads[{{0.04587368524026632, 1.}}], 
     ArrowBox[{{3.722787018965567, -0.898432220549515}, {
      3.7272129810344317`, -0.9284118504122025}}]}, 
    {Arrowheads[{{0.0458736852402665, 1.}}], 
     ArrowBox[{{3.7316170351830813`, -0.8783623715751395}, {
      3.718382964816918, -0.9056245565294351}}]}, 
    {Arrowheads[{{0.045873685240266616`, 1.}}], 
     ArrowBox[{{3.736432593837071, -0.8606206664149426}, {
      3.713567406162928, -0.8805091188324892}}]}, 
    {Arrowheads[{{0.04587368524026655, 1.}}], 
     ArrowBox[{{3.7383253745197034`, -0.8419234001055773}, {
      3.7116746254802955`, -0.8563492422847113}}]}, 
    {Arrowheads[{{0.045873685240266554`, 1.}}], 
     ArrowBox[{{3.7391291034400647`, -0.8222341519813279}, {
      3.7108708965599346`, -0.8331813475518178}}]}, 
    {Arrowheads[{{0.04587368524026614, 1.}}], 
     ArrowBox[{{3.739520703280839, -0.8019500891769294}, {
      3.71047929671916, -0.8106082674990733}}]}, 
    {Arrowheads[{{0.04587368524026623, 1.}}], 
     ArrowBox[{{3.7397344028853823`, -0.7813165995033935}, {
      3.710265597114617, -0.7883846143154664}}]}, 
    {Arrowheads[{{0.0458736852402664, 1.}}], 
     ArrowBox[{{3.739861460394118, -0.7604675758536603}, {
      3.710138539605881, -0.7663764951080568}}]}, 
    {Arrowheads[{{0.04587368524026655, 1.}}], 
     ArrowBox[{{3.7399420785794675`, -0.7394782852396183}, {
      3.7100579214205314`, -0.7445086428649558}}]}}},
  AspectRatio->1,
  Frame->True,
  FrameLabel->{{
     FormBox[
     "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
      TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}, {
     FormBox[
      RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}},
  Method->{"TransparentPolygonMesh" -> True},
  PlotRange->{{3.4098477118317176`, 
   3.7401522881682836`}, {-1.0571457522205705`, -0.7268411758840043}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.565986603338834*^9, 3.5659866546107664`*^9, 3.565986690059794*^9, 
   3.5659867386925755`*^9, 3.5659868017221804`*^9, {3.5659868374082217`*^9, 
   3.5659869187758756`*^9}, 3.5659873206028585`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "This", " ", "is", " ", "example", " ", "of", " ", "Tunnel", " ", "Diode", 
    " ", "Example"}], "*)"}], "\n", 
  RowBox[{
   RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
   RowBox[{"Needs", "[", "\"\<PlotLegends`\>\"", "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"eq1", "=", 
     RowBox[{
      RowBox[{"\[Mu]", " ", "n"}], "-", 
      RowBox[{"\[Mu]", " ", 
       RowBox[{"s", "[", "t", "]"}]}], "-", 
      RowBox[{"\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"n", "-", 
         RowBox[{"s", "[", "t", "]"}], "-", 
         RowBox[{"i", "[", "t", "]"}]}], ")"}]}], " ", "-", " ", 
      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[{
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], "*", 
       RowBox[{"i", "[", "t", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"n", "=", "1"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Mu]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Gamma]", "=", "0.4"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Nu]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"R0", "=", 
    RowBox[{"N", "[", 
     FractionBox["\[Beta]", 
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}]], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"St", "=", 
     FractionBox["n", "R0"]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"It", "=", 
     FractionBox[
      RowBox[{"n", " ", "\[Mu]", " ", 
       RowBox[{"(", 
        RowBox[{"R0", "-", "1"}], ")"}]}], "\[Beta]"]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tf", "=", "50"}], ";"}], "\n", 
   RowBox[{
    RowBox[{"num", "=", "10"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "0", "]"}], "=", "1.0"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "0", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "0", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "1", "]"}], "=", "0.9"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "1", "]"}], "=", "0.1"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "1", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "2", "]"}], "=", "0.8"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "2", "]"}], "=", "0.2"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "2", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\n", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "3", "]"}], "=", "0.7"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "3", "]"}], "=", "0.3"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "3", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\n", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "4", "]"}], "=", "0.6"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "4", "]"}], "=", "0.4"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "4", "]"}], "=", "0.0"}], ";"}], "\n", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "5", "]"}], "=", "0.5"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "5", "]"}], "=", "0.5"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "5", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\n", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "6", "]"}], "=", "0.4"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "6", "]"}], "=", "0.6"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "6", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "7", "]"}], "=", "0.3"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "7", "]"}], "=", "0.7"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "7", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "8", "]"}], "=", "0.2"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "8", "]"}], "=", "0.8"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "8", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "9", "]"}], "=", "0.1"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "9", "]"}], "=", "0.9"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "9", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"szero", "[", "10", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"izero", "[", "10", "]"}], "=", "1.0"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"rzero", "[", "10", "]"}], "=", "0.0"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Do", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"sol", "[", "k", "]"}], "=", 
      RowBox[{"NDSolve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{
            RowBox[{"s", "'"}], "[", "t", "]"}], "\[Equal]", "eq1"}], ",", 
          RowBox[{
           RowBox[{
            RowBox[{"i", "'"}], "[", "t", "]"}], "\[Equal]", "eq2"}], ",", 
          " ", 
          RowBox[{
           RowBox[{"s", "[", "0", "]"}], "\[Equal]", 
           RowBox[{"szero", "[", "k", "]"}]}], ",", 
          RowBox[{
           RowBox[{"i", "[", "0", "]"}], "\[Equal]", 
           RowBox[{"izero", "[", "k", "]"}]}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"s", ",", "i"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", "tf"}], "}"}]}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"k", ",", "0", ",", "num"}], "}"}]}], "]"}], "\n", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pl", "[", "k_", "]"}], ":=", 
    RowBox[{"ParametricPlot", "[", 
     RowBox[{
      RowBox[{"Evaluate", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"s", "[", "t", "]"}], ",", 
          RowBox[{"i", "[", "t", "]"}]}], "}"}], "/.", 
        RowBox[{"sol", "[", "k", "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "tf"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "\n", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pls", "=", 
     RowBox[{"Flatten", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"pl", "[", "k", "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"k", ",", "0", ",", "num"}], "}"}]}], "]"}], "]"}]}], ";"}], 
   "\n", 
   RowBox[{
    RowBox[{"line", " ", "=", " ", 
     RowBox[{"Graphics", "[", 
      RowBox[{"Line", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"0", ",", "1.0"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"1.0", ",", "0"}], "}"}]}], "}"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"arrow", "=", 
     RowBox[{"Graphics", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Arrowheads", "[", "0.03", "]"}], ",", 
        RowBox[{"Arrow", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{"0.5", ",", "0.6"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{"0.45", ",", "0.55"}], "}"}]}], "}"}], "]"}]}], "}"}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"pic1", "=", 
    RowBox[{"Show", "[", 
     RowBox[{"pls", ",", "line", ",", "arrow", ",", 
      RowBox[{"PlotRange", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"0.0", ",", "1.0"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"0.0", ",", "1.0"}], "}"}]}], "}"}]}], ",", 
      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[{
          "\"\<Infected (\!\(\*\n\
StyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\))\>\"", ",", "\"\<\>\""}], 
          "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"\"\<Susceptible \>\"", "[", "S", "]"}], ",", "\"\<\>\""}],
           "}"}]}], "}"}]}]}], "]"}]}], "\[IndentingNewLine]", "\n", 
   "\n"}]}]], "Input",
 CellChangeTimes->{{3.565554774177836*^9, 3.5655548263928223`*^9}, 
   3.5655549318198524`*^9, 3.5655549690719833`*^9, 3.5655550007557955`*^9, {
   3.5655550510096693`*^9, 3.565555168414385*^9}, {3.565986995650273*^9, 
   3.5659870445610704`*^9}, {3.565987146117879*^9, 3.565987170560277*^9}, {
   3.5659872128436956`*^9, 3.5659872134537306`*^9}}],

Cell[BoxData["1.6`"], "Output",
 CellChangeTimes->{
  3.5659870532095647`*^9, {3.5659871537373147`*^9, 3.565987171609337*^9}, 
   3.5659872149918184`*^9}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQDQEf7BlQwCh/lD/KJ4YPALDCP24=
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwV1gk0Fe0fB3B/L8lSlEgp0YZW0YKX+62ktFFZ2mghxVshaUVvtkiyU0qJ
pIiQciPbvZNQCa97s7v7da3ZheQ/9zlnzpzPmTPzLL/vzDNaju6HnCUlJCR6
yEN8rv4mbj14lCBuBcjZbZ0vUd6DE+qNLu+zCzB4IuyCXnEPNpikxtaWF2Dj
f0qrArJ6MCJzzkxqsABx3WERo/d7sHTV4T/H9xTCUueP00LLHpy3mXZOnShE
xd6erYFfu1FqvpbYe6QIibP5ViZEN4SPaz+NXSxCqcbRwf7CbhSvdNd+ElAE
fb8wpQMZ3ahelb+z/k0R/D/X3RWGdIOqoereIVWMJ3XGW73Nu3GOOXQpILsY
mlHuYz5FXeg/btusPVUC2pR92qK8LphU0rbaKZci1ZcaVJDehZitDReu6JYi
qjL3r+74Ltj6P1EJsi3FW6k3lHWXutAe+CuNm1mKQzt3fMKKLtRl7HNYv6YM
UiuDCjj3OnGFniR1qLYMOVqlSyj+nVh0s8LFsLkMm/7Ubki43gkl+VOWyvwy
bCGuhu517kQetUInbawMOiefn0mhdOKjQZbQRIMGn6pi32UDIkjbt7uruNLw
TPFMaJWtCJL+z9vfD9Mwdr7iD3WfCCbpbavP/6bBbk/AszQzEdQG3t1XlqJj
3frymMANIjQa5G01VaYjeo+V1Y5ZItwLMbAY1KPD63Hes5ZPHTh599Srelc6
PhasCaz72IGMu5TCXA86jEsWbKh824HcFQ2f/a7RUXVObvaHZx14qPUobCyQ
Dk8hh5Pi0wHtkZVShkl0yG01n5u1sQMWjjbeEnV0RIUcHM9b3QFa389NYz/o
mPvMCUVLOxAh3yDNaqUjfE3ErDqlDix/rJvtJ6IjO7U+T6FXCBu1mLw503S4
3rzLrH8hxH6n9ausdQkYlke1DScKMXKFUmS7joB0z+G6+bFCaPuGv7cwIPDb
O+ipk78QBSua86dNCBT/2FimfFII3ZlzeTlWBJzWj1u2qQkRYXBdb4EnAarf
+bp9SkIslRvbK3eVwGLOjvQSGSGmLuSPd98gcOzSy6vpowL0dc8dve1HwPzf
O3aJDAFOO8g09UcQWEsPP7TkmwBWskd6nWMIxJhmtacSAiwTNLh+jSeQQP+H
Rn0rQK/NkthzTwisuMc7NxUpgGXvqA8/ncDN18zHcSECjMwwTm7NJFASsi5W
77YA+tNPl5Rnk/e7GPa4uQtQFsRYdu49gS1mr/pnWQrgRcxf8LOUQFrt1z9F
5gIoZsS0udIJzPr1RNrdVAChk2kf4xOBd8s6VFvXCBCXrtDvXUVAVqjY2Swv
wJl1S5Nm/UcgWDDbKeUvAdQynZvkGGR/wepSFyf52NA85PqLSUDNWlQn383H
yJh1XGoTAdtvvbJsLh91pQ0GTi0EKoLv/Utt5uOqSFZvbhsBwZmFxh5f+PBV
aLPYxiZw+seB0IN0PpTY611pHAJvdTPWbS7ko+ZTbN8GHjk+lQOhshl8SHn+
Ws8XEKg9Xb3vVzIfM4tW96/oIOt9a/2NrgQ+FN7O0zwiImB84PLSprt8yEVX
8u53EZhMKH7F9ONDcnjIL6qbgF1r8WvmDT4GBuJSg3oInDyto9d0iY+GivYD
//QSWHU515jtysfb3D/30Efgy/FZtV2n+bjdveK49E8C1s79w7+O8oHcQOIj
6cam2W/kDvHRS9n7xbGfwMW/Fkto7uEjpDbda4L0yjU1Pw23k/NLqa3wHyAw
/2mTn60xH34/f1ZOkrZ+3l94RZ+PluEtvs6DBHqDKpMSVvGh3tfYWUp6IkJl
E20p2d/8v+bJDxGoehT+b89CPp7zORK7SEvu6wxQV+YjxuHX+8ukn6TO3Wkp
z4d+tPrfUaQ11Z9Ot0jysavSTOMZ6ZxpG123CR6ul45ufkL6ofRohdQgDyoR
bREhpLXZYCd18uBhmWzgSDpt+8BVcHhonNe9ZhVpJ3ZlJK+RhyfjTnfY5Pgy
LgTph9XyMGfe+z1BpMsfCU4ZVfIQ6B0cqEZaUuOVZncpDzt3BVIekfPNSr93
NZnKw6twmwA50nMGLM/ZZ/Mw4ZLs4Equ182XOWPqL3kI61VuzCfXd+Nt9zXs
pzzkGNhODZL1CFu3Ry49nof3h2Y3Lia9o2k/w+IODy+uhzWCrGdtnKBqyS0e
Zoq6lLeQ9X7sXHBz8goPdat99ReTefB//VOd5syDK0IO5ZP5Gd1hqvzagQfp
kXAPVyEBq0dP6xNseXgnP5IhT+btdKlncZA5DyLtyazFXAIeb2t7/U15MFLW
jblP5lflldpI4CYeDFf/V93TTuArxyT+wQoemjNzfW6Q+af6vg0Yk+aBH+xy
oLqezKuXyTf1P1y0uupfKqgjkDlhL2M+ygVVMftoXA2BQpdGxzQhF6OHjYoW
fSWgXM0YTq3gQuacXdJ5GpmXFqrGQCkX2tdE9IYSAt6TplbbP3AxkJpssLGI
wNQT3eqhV1z0hbpsK8knoPXcyDsmlIv4Zsd+tdcExq/1q80M4GKGvsVJ2VcE
3lA31/h5czEpq/yiK5WATuq58MALXIguGE78+5Qc73X76ApLLlJMX+ePRRKo
FJW37pjHhWJ9wro1lwlYumnIBM/iotDeZcY1dwIFrJj31TO4uKwTlP3+PAG9
iTspLuMczDF99272GfL9NHL5wWjnYL69wY4NNgTy+QpGwRkcmKs8fL1Tn4BX
rdf4nFQOnt0I1v6xlkCyAsc8+QkHDinPvY+R3/cLilYB1ZEccNpn9W/TJJDq
Zhprf42D/bbHefdnkfmgJ62wNecgRSbwq46Qjt1mhdk64KB0Q33ZLA4d+dvS
P0kYcfAjNPKZqIUOS8/GsJI1HBxLcXa+Te5HKsXmwR7zOHh4UNRnVETH4u+Z
GVl8NlgyFTb8CDq4aktsg0PYeBPBTYoi90dVjZDvnv5s6N/7OVqjS+5PnhW+
Tj5s2A+3K0gvo0OdufK6jQcbh+SW1lir0JFw9XCW1xE2Zh6zWn5nnIYw4uuR
TF021nywtztYRsOE8XQlI4kFfuZyB3ULGjKiJ5MGYlmgfF24034rDf+c/3lc
LZSFApHGy3hDGkpZ4W4BXiy8mzu0/JcODcZRzpdqdrMws8TwqIcsDZ0P0v2M
R9vR2srp21VF/m/YpmdstmvHNg3BtKZ5GTx8/pPO29eOZyERFSyTMtTFNmwz
NGvHu/2srEcby0BMvtzpoNeOy3HjS6SXl8HrxW2Oknw7pJZFB76RLMPa8a2U
BfQ2hN/PGiRulUJNUT4xaHMbNiZYXLt9sQRSuQflfLe04o5KZOGlbUXwUznr
EaDXCh02XUt7QxFqUpabReq2Yqqn7WirZhH0bGoXFqu3IrbvZNROiSIUaXJk
nCRacXWJlt2i0o8o+NkV1vKlBemFqrvbTD6C6lEr6XCmBSdC9z8wMCrE9UeR
HTGvmhGVHvawyvADnj98afcwpRk3FQ88TNP+AG27qO6UxGYw1K4oh6h+wPpa
gfuXyGbkN1GpR4apYM2o3eZ4oxnG7l3H9HOomPkuRipnbzM6aHZLGTpUuD61
9U0cbkJvSbmmgUY+okOqEWbXBKtlj7MZ6u/w/VtujcvpRmwP+CT3MSMHt29Z
FLekNkDV+qIL0/M1zk60OgdJN4DzKPBx/cw01BhaR3dF/YDlxXHZ3cxkND7Y
9fSy3g8kK1087G2QCP6X8MxIIRPQFbap7ItHUuLh+IIcJsYLXBfvaYlC/H9v
6lQDmFBz5IUpT9+D7+LPaU2nmbisUlIeZnYHfyf6fSwxZ8J2+e9Kz8N+6Nnr
yDupx8RQVerN5IXeWOht5kxoMlE4V3D9d8AVWPh4xQcoMxHwMmx7X5EH5HJ8
TzbJMlFC1WeuvPYPlvhXf7KXZCIl8/IYS9IZ5aUDOlOTDDj82iurcOwUblWq
fbMZY8De2s3sO+soduTNP3V6iIGMudnb4+bYgJb5/MSJfgZubmlt3mluheZ/
6hRW9TFQEjU4/KbcAskikcaeHgasLiQbu5iaQTU6K6S7iwHHz6XrBp0o8K/g
JLR0MjDK7ajMXmSIL2XpxJCIgaap7JFCmj42anmt3UParcejcDxzLSKVppcX
dpDP2z1yeL+UNlZmT00fIK1lojwVo70U4ae0gqaFDGhWeui8KF8Em7PMlYWk
/wzlWOYdUwXz8tlLwaSD/+esFZ4+B1GOuR72pOdWrS3MdZDHnNlT6X+Tlnyn
mvVmnzR8jgxnLiM9I/nA86kWCdx+cG2XImmDG1UKvasmKNbXn5+WEF8vjB4f
Shum1De4M4YFDFCzqm6rneqn2OgH/e4i3VW5Levvq52U9f6RVTyxy7e3BWvx
KRqLFmaJnXHxh7mXAp9i6kmLFNtBZvDt1TEexYXrckRst9jju4qreZSx4vmd
XNL5ORvmWHnzKPolrYpiP6vO7/Js5lJqPlE82aTfX7tH6L7iUPxtdx8V28ds
5PCbOA5l92K3rWLHan603RnAobhxpBXFToweMco5waHEa5/PYpHOHjjh4KrK
oSTKDPe1k467Vlt34i6bcuRHbIPY2t9VNytdZ1MSFliWiV1uviy//iybMuO+
bLTYv9V18yN3sCnzlJM3i/19WsuNLcGm3LokqSm2wvCLuq1sFmWFk7es2EbG
f3J4JSxKaEReaxvpaOLznSgfFmUkyvOz2JmhdbqJx1mUyXyLHLHPv5ZRqjJm
US5xNz0Sm3ouX1FtIYui98soUOw7/1s9HTLeTvk/xqW63w==
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwl1Qk0VO0fB/DJUqJF6g3h9dqlEJIK95ukhEQlRQtZ8gopvVlKqZQ1LYRs
kShCKSOhkEnM3JQJyTpjZiyJNiVS/e+c/z3nOc/5nPucc3/P7/6e36Ny4PA2
LxEajdZODeGcdl34DOP/cxOm/8odkYgfhg/pppR1uwmz7xEeoaeGIfO80DSa
3oQbvsvV9nkMw3HtHZk5LU2QUK53XqM7jJ3iomIvZzLxytD80+a6IRgktObM
8WfCKVJEtf3hEPLnFcttD2Vi4c7PnZ75Q+CZulmePM9EaxbNJDZuCKUelxSO
ZzLBV5o99N1pCO/wsUiUZEI3ONDYd2QQW8Icyw6qsTDWZpui3TsInnVsQqMu
C1uVlr14/3oQN29F/pq9moWBAJ/esPJB+OaE6ujZsfBRM3UWeWYQ1xyvVv04
ysIozSV+vfwgXtcvLzlTyYJe/LfcjXMGsYH+5XffMxaOxMnf3/pnADSD/UFK
LBa0InKGAwUD8DqzJNq4i4X9oaj6XDqArRk5tzsmWQjOXI2ftgNImGtV37uC
xBaDJteNxAAKUm2KS0xItL9KCEtdMYDKOllZZ4KE6Br1Odv+GoDJxPV1BrYk
Wt5WhSr2CdCWbu4t6UFCtdumIKdFANkfPbczfUgcCaL/q8cQQJ0mZzM7gMSZ
1wPcfQUClN+ZLPw3hMRoaV+U0jEBvmw81mcfRyJjUYQM11sAZiHHOO8SCZWn
D0uKdgtwZ8xCvDWRiqcjyXkPBHhM4y6vSqfWW6qeXWcowDyGUlLQDRKeQyJT
yzUEKHbcclUsl4TlBG2uspQAAyFxQfcLSFjRz9er/+ajPFriMKuIhDfd7bfh
Zz62JBoZ1Nwjcd+/0ejft3xkTDCsDeiUs4o2XWHyUUFjPLn3iMQJ0WSZZ0/4
8PC4uXpWJQklFy0acYuPFUl6py2ekiDXaZjFpPAhIXHKV72WRFzZ3+49sXzY
tWZmcupIBPnfDV17io9NDpf1j9eToNWYXs4+woe323MTAYNE4TTuzffiQ3a4
6KVuA4mxUG1u1C4+XjSXSzi8oOKP9Vox244PwbdtNLtGEjpnDt5OBB996z+z
VJpILH6Q5aBlxIdq2oxzLZQvBJ5YxdDkQ5Hz1cyVSUJR9YKH7xI+Ul5PStdQ
zqfJ9cvP4yPa3Fz2F2WZoUOV7Bl8uJ2yCPiLRSK7OGA86RsP8rcPGktQTtKc
m+o2zEMJSzq+jVq/QntlsXEP9Z6WdSWcckXUa9NFLTw47Qr0olH2X/LKdprB
w56hIc19VDxX6YqC0QoeljJ8viVT8fvq5c8fLuKB/sfhUyG1v1Uuu96MZvMw
XSJikkbt33TeP6unk3iYEPQOeT4nUan83mpRDA85FRs1pKh87Z3MFFsVzkP6
tTKpi89IfKyXPuF+hAdmhnXNeyr/YvnpJclePHw5OeGtXkNipC/8VttuHk6f
fbF07RMS46Xf3f+25+Hd5FO95VUkAvZYfQhcz4O/Pj9jqoL6H8oF1i9X8ZB7
2Dw9r5xEweei+FxlyhZ5/CulVH6ide5xFvFg+03qb1GqfnrMrgRpSvIwM+rP
hBNVX4dmr/jKGu9HbEv2nJx8En1aX8uXve9HtUPHhetUfZaSvrpJff1Q/vJA
5Vg2VS+WZ81OM/sxsqXU9vV1EmWLbr2bUduPX8ER6tuSSQRGtBtepPfDO+7r
/fKrJLiso6pPs/vRb7AgRJs6P3737xvHBPdD661Zw4MwEp/fnPri6N+P6Dxz
S/vjJGI7fcLVPPqRyA9Ne3mEhFSw+0yufT94d9IOhVDnNa9+lUiDZj8MP1wY
O7uDxNqxih1tiv1wDdwcYbGVhIk64+SoTD80D8vrCDaTkHWw2br6Dxd+6/f6
dFP9QXFCILm6g4uNEq20S1okbpMRixOauZDUOcAIUyHRXab98wODi6Z3BwR2
ClQ9pTnbPS/lIsg04MOteVQ8Ydof++K4kAgfa9QeZ0EupTX/5FkuWFuaDOxG
WbjptlBfNZSL0eFaR+cBFlxXdhVFeXMRP9jjodHBgv7hUKLaggv9nT9i86j+
OD8kweXGai5qbNp8pB6ycDLsi2mcPhf1U1MuLndZkG8c2BCuxIU/m6tXls6C
jpTZMuYkBypW3iF7TrDw9nSmmngZB7sfipTmr2Jhukl/b9ZdDtzmqn3po/q3
bb5vF3I5ULpzpFtcg/reo4jU9KscLEvu3im3kIXGW9WP6Ec4eLjgaeyeMSYe
XXt57YgBB6tds1ZG5TDxieMccXEpB5H3JH9npTAh8iDuv1IVDsI2ZMrlX2Ti
csTbgAUyHJgknxs+S90/M2QLbQ4M9CEjJzTphAMTae1BDW/9+/Ckl8G5+LMJ
X4tVhufs70PcmoxjJZ+awPDblOjo0IeHlayJWkETmnyTnWYb9WGb3saA6ldN
2DEWGWww2YuKZt3YBblN+LO+wsU1uhe6iR8/O29qgrxGnBVZ2oOX3XMnD0U1
Qmmj+K6G3B4EGUV/lAprpPog+XfLtR545jdp5Pg1gj5r9mW5sB5M6A4vLHJs
hDincb+/ZQ8G60mRzQqNeCO+NlflXTce75A51lD0Al1NMUxb6W64khdExZkN
8J22DoVYN96E7rqYW9WA+qGDPy1+dOFtRF29WXEDyss+mQVxujDrEKtj/+UG
iM3eKHm+tAtzvX7N8N/ZgO3RnpG7dnZBRk07oZ77HLsHi9c4FXZiiCzIc/3O
gFJ/ZRU9uxNiV3rME4cYcN9jdF4lpRPpa+vFmJ0MsCSdny6J7MQ1VvB54xoG
kg98C7m6rxNWDA/VWdEMpJyMvRv/VycanKcXFsozsG9yprpr3Dt4LhdjRJvX
4xQz6cloYgdGkqSfTsfVYVnHuIdufAd2NqbejQmvQ3GWpGRwZAe0m0OtFQ7X
oVaTpqr9XwcKfsh02G2rw3T7fXmacwe4+9ZajcjVYeYFWYOTih1Qu3K0V+12
Lb6XL69yLHkLcvszkrxUA5n6dO7U+3ZI2u6+E7e2GlZ7DxeECNoRt+n4lU0q
1ZiVYO79q68dyY7RojIS1XiZHn9doa0dC2N+P2K3VSFmfaugoKYdadbqdWJH
q7C4dXHSzOR2ZGgU2xgVV8LpV53H+U3tmN9x1mJc7zGCpSQiOFVtyPeuWmrq
Xo67Exfz54+0Ima/EVe1uRQ6auyuVZatsBkwVzx2/i40xDcECZrfIE7HUyEu
PA8qkpKLGkPeIGO3Zp13Yza8DjgcTDR8g2NKNrm3L1/H5Z6jP3bPeAPl0RTL
8eeJSK3/fMrgHRuPlarMzvRchFQ1M/tpFRtSY6Z7t+ZcwMFr4+Ff89lI+D7y
0T3oDCJ/39zZe40Nt5YSJ88tYVgQvsz8dQwbVmfEgvfpH0Pl+dqej6fZuGW5
5rrq5gAs/mG7/W4IG7909VQ8Wr2hexV2F4LYkF1Zvjgp2h0+CjlGtofZMC4/
17vXyQWrSv+h2fux8fTmjb4bmjuQJp2rMN+XDT/pY5uT/tjDOiiyZ6UPG22v
J7tuOWzCVPpJXYE3Gxe2zbin3mcBe6aGe4sXG3SvzJBp5lpkKOhMi1M+SDSy
tq9YCfuvg4z/PNlYvZTXZi6ij3YD8W+/Pdg41Z6lWLNZC3PFN78vpCwaJGK3
540KmFuuPDxEueJcmsKTAAUsUf9wwoTy8udSl2JuLUKsp3+4DGW6YYXsWMF8
dHGS548fYKPm4qPB2ppZ+C1bldBLuc8o1q9VSwRun7K9mykXGifwXg7+JJof
/JGpo/yLXPa4+cc44XbA4NYjyidNGtoOSn8iKmMkBPcoP4mo5assGCIa5Nv0
Cilb+BtmxSr3E4daXVXzKd8XV/zvfUsXEdV8mrxJ+cj+lOMvOa2ET0JPYDbl
vfXihp8+vSJCR2zuZlF21cnrGrjcSBR49a7MpNyklTC6LewZ4ff+5rIMys8m
dUyjdlQTuavStYSWGbspPWVYTawlUtWEtl0/bZO0oJo44ZetIHSH8cBW4lUV
oVQ7JCX0urBMK0+7KkJ/idNoOmWnP8zVbVsqiTV2Jx4KvWllyR9jvwoinZxx
X2imWXqZ9dYKQjkwvkjo6zNEu8INK4jIuSV5QmeNtPXYTz4iEhVVU4X2OXrJ
Oyr6EbHwQFO40FMtZ7v1i8uJe+8uhQk98NhFzvlqObFV2yVYaK85U7ZZweXE
ZZOpQKHPKKpOx60vJ96nHvQUWnnJ38s47+iEn6Wdu9DLokxei9TSif6slfuE
7qQTKzbk04k8J+ldQt88V3BWNYhO+N8WdRL6XEW7Rs1uOqGSMuUodHZnpCB0
HZ2g/fPNXmh2mVzaNi06YW3+1Vbo6QUTCpvn0Yn/AfrMt9k=
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd0wk0VWsbB/AylES3clVfNEiDknRE1K39l6kQhQi3kZxMIWk0pjJFpYgQ
pRGVUoY0mE7K2D5nG47pOLNGDUhKfNt919prr9/ae73r/T/P82q4+dt7yIwb
N66IfsbezP+WFKv+WxS0D25OmOEoxczPXlNzDCm83VglR5lK4WhS4Tn6D4V3
0R07DmpIcexY0jYbMwr1Tv6+DlOl+NW56bPZJgoanMd6JqMSTFG89EN9M4XA
lU+MLLokMNeecMTPgYJPqiT733oJbmkY/upxovAxrGNW2DMJ5BReKJq4UmD3
/wn5cEUCT3nup5Q9FKxzLiXpx0ogU6nbeMmdgtOCAoX4YxJUGO3bHcCkcOjC
dFv37RL0tV2orvOhcF/9f6YiCwkmvZ5XbOVHoTad0RmwWoLYvpL43AAKlS/E
GwpVJfA23KmufJjCC3eOrq+8BE7ppf1/HaVg5/VRljEgxtAPu699xyhYtuum
iZvESLM9mr47hIKOl+YJiiWGwZ2lAT2hFPIyOcHkEzFePtxVsDWcwtl6uQcd
N8XILnwelB5B4Ug4b85Akhihvr71r09SKE+0bVU/IwZTtZ9sjqTQPbhOan9Y
jN8HPl15dYqC+e1EpxQPMdpW9RIppykwE/X1PziKcXXhxVarMxSK7yuftbYQ
Q/wnIJhPOyZLZv+z1WJMTJ5r4hxFQSZvhLNmiRhTuz3NCmjLa6/hVs8U45vW
rMxe2vmXy8LdFMRwlrfzUY6m++WRxVEaEuH7BKM3U2gHK0vbXr0XIaD8G/md
/r9jwvXMhHYRwljZ15/SXpfIW7qvTgR3ez8nd9qVP3tOWz4XoXNyn+JX+jzy
hhVF6++L4LpWj7eb9tUsh1fGmSKYe3/7WkDn0YyKKbI/L4Kc1g/393RePcLy
wqEIEYZH5Z1lae9VC3e+cVCE5DDp53F0fawOqqgK3URYvXKnhZCu55lLX+p0
t4lgdl038g5d7wfNw5Hx5iJo7dKs3BpG57PRNP65WoT4+PFLeHS/lHvtFQ5p
iSA704jaEkzP87Avb/h/IujKVX28dZzO5zXtVfJkEfoSy5P5dP93zD3e2N8r
RGNUvJ5cEIU085AfpXwhcr1S/D8fpFAQF7vmAkeIu+IEzjN/Cn90TNQ8i4RI
SSvKVKDnz2yNVpn3XSGSsMo+2pOCaP2/0SFpQpxwWV/50YPuz7HdpxrChGho
eBrMpOd76crjxhJ/IYayvY3W76T3Z6S+nrKX3r/JvGPAhUJ0ZDMjxVQI2eCy
G8r0/cmM+6jyQ18I5oQIxoEtY3l/vGAuFuKFWv7hfGsK0m2F7qGThLgdR/3o
NKXn19DMWfO3AEm+57PfgEKfYrlCxycBTjwiu1Po+6zcJE0IJwVYI5n7WaBH
ocIn6llGqgCyse+Yy+ZT8D18ax4ZJ0BBkF2hkRqFoz2L1VRDBVCLvOO0fAaF
Kd7jXlB7BbBYNnScNZnC7wdtnxYsF+DnG/O0lwMchBo83iycK4BxrWvrny8c
vBWemvx4mgDx224bLfzAgZktKyJmkA+1N2cdl/A46Be/NJNh8TG93PGo8isO
uHudUqyL+fhmwHCMf8nBRbbLyK1cPnwCw/T6izlwc1/GT0jkw6HetTM8l4NW
6e37Wnv4mP8w6UTCOQ686p57DTnwgQJzsWs0BwtranntG/kQR/xcrhLBgbGS
zqu3unycUJVYmR/kINdRVT9iHB9TWPxNRfYcrA24Vpv7vhtrTb4ZCaw4MP/j
0nSY041chpP0pwkHC/xkAw7c7MYWLQbzix4HAVnqNd2W3UghCw+PTuNgQGRi
X5LGwyx8P9Jdz0ajnvaCmigeuB4iKpbFxiyikNsfyIMHZXBp8XM2CNXvlzOs
ebA+G9dvmMcGq/FsxrKRLlj4Kewpi2Hj/JXSoaWeXdi8tuVizAY2hu/MMehy
7ELQ9ysZfkZs5NV/Lckx7cJt9lK+pS7t9EGdc/O6wPvkVs1XZ+Pp6EXqJLcT
SrucipIGSdzpv7ll2LYT/Muhi9bmkbjdMuhsSHSinCNpiL5OYoc8YzBWpxO5
ter2DSkkkurTTx9W6sT54MizxqdJsNLXiNzqOmD5/M/U+h0kio845oTZdMDu
qXvRFSUSkpOMz7/2tmP4UDFDk2zEgSARuWZbO5Yw5bMfPmtE4Ymrs+Mt2sEo
fbTI8E4jXHWoYG/tdhzhqrquDGtE/oyeosk/2lCvkanWrt2Ioe+qW2vPtaHg
a2AqEdWAmJaRgXMNXDi8dCllGdVDt13MmFzJxTW3FZcFmvUgSoo4KUVcPJn1
TG9kSj3q4kJ7BFlcjPC+7jeU1GEmadS5+hAXMjo23AeJdZi2fYMvqc5Ftb5p
beuHWmxUIeO0g1th9fNL7+KsGtRmyMY9DWjFDj3/uoaYGpSMl7u3ndmKPScr
NE8E1sCvzOtblV0roluK+kTmNdBodyhyWdqKitBreeM+v4GgQlu6r6MFdpMC
P4ate4MvE6XZ26xaEDL0bjBcUA33315KHbbNsHGOFV2zZOHC7n9GDDc1o1mj
drhvNQunmOHOmRuaMV3cVmC3kIVPG2cpRes3o+XJfC2d0SpkOM1vq57dDON9
B5M9CqvwcKN4af+7JsQOVKpINKuwdf2hLblnm2D/pPa6y6RK+PhXLhP3UCD2
i6nS3jL4uLlP8eBywEv21Lj0TwnWmskjdS4H+UKR9TTzAjxe6rOyNpuNkXK5
EqvuPPT5G7C1TdiYujNTsSTnJozKNj5SGs9GzXzWzWKNLGQWaCkrcUhEZPhI
fM+kAO8Gzj26R+JtQZH+462JsC4O6Vx2iUTU7eDsM79j0b684SgvjMTD1ba/
q8efQtP+XunuABI5ZpH/un8LRsyMESsmk4SSZ1Wfx0AQSksVKrx2kbA+ynsf
lOcHzdqhzZ+cSfC7+7wKepjQX7fyZdw2EiaE5VDowz04kT78dL8dCfmSjNLR
IGekRG6dSWwhcSHL8kOetT3u+n7IibQhYfyE4RBbaIW/Dbxz7TaT+L5p/HVe
jynuJOXaB1qTUPyjfd2mdT2W3zgjeGlFIj//XXECZYB8o3OGprQbXW/tVLRZ
iYFdOtZ8SxJpd23TvSqXYJi12/EK7dQPyzmbvDVQeoi13ZP2stJyh9vTZqPZ
iam4gfbVwJGQWYoqmKi+/vci2mahvU4KTCXItJgvmm45lu9Zma2NPN3Xd7oy
tGVCzOwtdEeJl/WTVwxuIvHog3Qa13aQUGE57+ylPXh6d9mX0a/E9ihVm3e0
a+xZsob27wkDaVqniHatc65M1qCQiDzCtubT3vq9ocOltIOoqvvW0kX71oKg
j1oFTUTDKh1+B+03UbUPxIsaiVUp2UfbaZtE5JqVqlYTrivqwtpon3SxPvvX
mXLCQGJTzKU9Uz1KWTinhCisl10x5tOjc290DD0i3jrp1rTSZgoTQjJ7cwll
d9tjY2YvPt/qU3CDuB50z/i/7xWv7FkBVwkj053rx7xjXpU5oy2DePv3vLVj
ztM/555jlkEcjmpaNWbdIrP2yIXphJLiyJIxJx0weLt1whVCZvuKRWMe6spe
lXAmlfjKOLBgzL/3bzbaNzGVYGxXnTNmpV+KXTnTUwgTubDZY85OC3YdTr9M
vJbrnzlmxahuvUdLLhPzFY+qjvlIjHhbaWEyce/VBJUxr/Mzyp9kkUz8Hzbi
zZM=
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd0gk01HsbB/BJ6VKoRrpaLVlSqKTJ+v8W2ZKuEnmJFKWXUokpS5FQ6S1L
aUEYFddSVwvFtZUa19vQDDNj/tlmhnRIZc0S9f69zznPec7nnOec3/P7PT+N
Qyf2HJah0WixVM7UTf+PLqTdnQmSqvoVuupdMFo2a1nUbRKni5klmxW7UKZv
vW5zKokMP5ae16QUYTunZ1ekkFAMIZdkfpLCVOXVoHISiR1tihHjfCkqzQKt
LK+RkHzfvefYayn+/G5ta5JAojPytH32PSkCVq8ufHCRhK5svLfPVSk0rk0+
WhJNYt31IoFpmBTG/cN5npEkkhi8ehNXKaK6spsOhJCwbuljeFtLwbr55JHa
SRKJ+ct7MjZK0Xk+svlZINUf+Lz3sJIUowlH93ocIhG/RnXtwJQER8orvI57
kXD6wY+78VmC44FrFd3cSTxrW+unXS+BeElfVb4TNf9BR67ySwnoGr2nVOyp
+dQM9JbnSZBkYWnobkWi6sz2wJA4CWw1Txn4MUhs+zvGlB0igVtyqrbhBhI0
P4uqDX4SOOyPSebqkaBv4RX9YS2B5Cptc/YKEuflPA49k5FgoCGAHUIjMZb0
WLd+SIwvsgFMhQkRPB+OrRqTisH/MR4VNSiCRJDhnl4rhmjXy98nJCIk37Xo
l4kXo66Qz9r+SgTB83NGIqYY3Nd9/q9eirCrqGDBW38xJsfoYSuKRZjlYmn6
0UEM+3TJSFCmCMGhYUMWC8TobQ3KSAwTYeq04A6HJsbR8BJZ+ZMi+BLnnHu6
O9H47WaR7xER/HSqbOWLOiE/5a1XtUcER2Kw55hFJ2SENkvpa6nzz91gRx/u
gHmCw/5LzS3oujQcx3DogOfiUaeddS3onuN9YZVBB7I2rxwYLm/BCKtdO3a0
Ha7DqUu+sFpgvrOwIfNyO9xsavbeCGpBNHOSJXzRhgHld9OLZrfAa6FHXlJm
G+ZVD/UzRoVQZYw+OhvXBp8Uu1ibT0K8VjpfyHNpg1HrVm+Nd0I0GLg1Zw21
4m5oxpbOZCFGussPnTRpRfKYaw5nuRCpkRG/92m0oia/P79CQYiJqpHIa/Nb
EdoY/jRjWoD/2FTbO3d+QMWwwMKwUwBHP2ZA1eUPKHMcDmaxBLDS3OAyq4uE
iu22H6paAqS8V7uz+5kI9K25p7I0+HgxcWmwKIfa29cSwpnOhxm/OFw7RQTh
9UTTKRk+BiPaXY+fEmFUMH3btrsZ4wFzW/ZsFOHtsQe9BbnNeOcstt1R2oKp
zQbekrXNkA/uVWU1CzFrfa3jYaMmXIjPG7JhC7Gv4N54p2YTLD3t18uUCaEj
7PnsqdyEi0Z2OjWZQuzd4OrgPsLDu+XHDjgFChFj2+bmX8pDTSXP5YqcEKvL
4nR/mfHANraaYO4RIG+rRzXNjou0q1pRA3YC1KTJfzc24eKXdVxHhKUA9waH
vIL0uLgymne/bo0AwWo9eoPzuTiwPr18PU2AldNGT4Nz3lP/aNZZ3ad8GKbL
ijlljXhbHZX9kXoX90rDxIghDmxWFX6sp+71uiC7xzelHvyJszk2q5uR9TWq
0oFZj4DSE3mNy5vBh2/odo96sC9a6sgpNmPpyUvVZzXr4bA0bduSgSbEVimY
dzz7BwtiPa2uvGxCf8758j8/1OFx2tP5OnuaYF539lGcCRsJD/4t9/w+D7sq
vyX8wahFR+zkiE4WDyGXw2at06hFiXe1LCuNB5vxoIilCrXQ/yvauyCZh8on
FYHrpa/xmfYkaWE0D0tJmyIi8TUuld8ZUffmIffrQ353/yuwYhWZMmo8+Hwq
n61eWoPin/bFiU+4yFxguGl4qgIjFny5jTQuisMrjKfUS2CdpVK4ffF7lK58
1VtS/RgTQZGMh+GNSDVllHFrcuHkqXT8qGwjKpRi6Sc8s1HlfF1z5csG2H3/
ntz14zZ+Wxu9JfxCA2zDtTT785OR0Tjn8qRbA/7FPH8xa/cVTEzZVCaZNeCM
+s8dcxNi8FuO5i2mVgPqbxbl+gSFg3HtTsA8lQZISitylIaDUeOygZ4/rwHs
+GXmPnWBcAkLyLks0wAuuzd3Nt8XzKx9tfRpDq5+GP0pGtyPhQGbYrjjHGwK
MDuz8cZe5Bg9txKOcrBsU6uuWZATSqv18vjDHCgFyux8F2+Djb6DaVbU3lWL
EipuFxLo3Rl2yniQg8O3/8o86s6AAZM9FjzAQeehbbEPD27AtsAzcq3fOGBa
R5q99dPFUUZIWQhlvmpPqLeKBob3R9ZqUVYwKhhydlKFsbHkTf9XDkqmrBfk
+i3CG0WHaTblR2vMaiOY8phz6+aBfMraa3aru+rKIEt4LCSV8tkt2lkPwyaJ
eQpF+pco153O1190fJhQHuMNRlAWtD3I7Kj9THwzueYTQnnIcvE/Zo7dhJLh
xZAgyrec/m772N1GqMfODw+gnJB+412TvIAwN0e2P2Xlkr7maF4j8dGv0/cw
5WEvfa7i9Fsia1+v1Jfylbkao5UKNUR1qF7pIcpvPE7m0ZpKCdqdmq6DlPfX
pXvS9xYTn31V3Gb8UMsxYX1fHrHLUv+TD+Ue2aSdK+ksImcFLWPGc65m+DPa
7xApXxWPzPi/CV8Kmo1TiHVfas1nLBemf/DMxBUi0W6x2oxb2e15/O4YIunN
fdUZdxPkhS9OF4hQ9RL6jCNdbvrrPY4idBJtFGecNvli3OhXJMFa6Co3Y9PT
K1+MXQ8n/gdHcivC
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw1zns41IkaB3ChrFK57BQt0krrPqLQwe9ri42mdpFSknaxZI0oty1JKc6J
WhUht3XOVKpDMZNCrcoUM+MyN9MYcxOFzrTSUVi17MxznvM+z/t8n8/z/eN9
10QlhfyoraWllaReTf5vBvH/DPT5xiZtQAmJef1M6KQSh8YM2G5NSsxOkzNT
R5QwoPVuPpegBFUw3EHqVuIxY5+sWqrAwbiwIx+KlUiUrcnZ1azA+dQ0b3qe
EvF+1PyQywq8Yp0j42claigvzCyDFGhK64vsDlfi34zLxW9Zcgx/fTap00KJ
Vbxtt3pq5Ug9Fr/EbJkSJzj/4YznyXGld36/75wCm/957/iMvxz0vAiFsUKB
OxEHGBadMlT+EGU1UKHAqc2W978TSTE7+MelXEMFEhO1dzk0S2EXbkvJmZMj
U++G7ZYKKejaVPKBN3L8mZnZahMlRUpf0fyDTjnuBllcvfXfAXC8PzQaZ8kh
9nNetctyAE9b2+xahmRwPksOeqI7gO6VlHNaXBk6Hv+2IFolgdfDM9nrH8jg
cbh0o3+LBKTIBiKkSIYducr8o2ESpERenaraLMMi2j2rgKp+/D50MU1QJYXR
jQ7rj2f6YbCszJP8dynI47KTr6j9CF0+tikzWYp3zw5FRPr0w93f+NvhzVJw
/uy1Eg6Kwbo9Z6o7OgCnNwuXfr9ejOA/PsTqOg0glnNseZC5GEfJRQ1lpAF8
c/dvC5L1xFjr/+zd2jkJVBTerI/iOQJ/LcFXXAks37Vj0S/P8UjrbuBgsgTl
htKXrz+I0BbYvT6f0Y+kRed9rw+LMO5sNNVX0Q9vp9eqAr4IDeNUjqX675qI
PbX8ehH2m1xf3xjaD9JeVaD3QRFmHqS6Sj+IsfrNtk6vl30YWZx1qNhTjN0v
bJdnTglxaPDObtETEUYvvqoufy3ELyxe9Po6ESZX6nb1yYTwoCe5XS4RYYdp
w6IyphDDt29KUhNEuJpMSdp5SYjs0M+zr5BEyDKvf56wQYhr7l1vqxL64NZo
alh3VoDm6tTOK6uFoDVsOMvIFsBoJLbGe4kQ2zdumutNE6ByqW2fakqAret4
tl9HCTCoH3cnqVeADtefZEu9BfCb2Xt5+QkBRpcY3LSe5GO/EWkVU8lHV6EL
2fYQH+UHw8Yy63lonPFi5MXyEWZe7uxcwUNsGfXhZCQfObYdP43/gwedkfKh
me/4eO8sGSuLUffVLeZ1rnw4uA9Pl5jzYDelV1sxy8O1/T25WZZcnEoLM5cX
8WCQvyH46Vw38u2dPFx7uDDr3+dyYwUbPlzmJWY7FxE9BSdYUyyo5Hv045u5
CKuoy1gsZiGosrviLY2L8QzXDZOlLHBD5mkjmVxIXRL27P6ChWMnTJt2k7k4
7O8UEWbbCWWUr70DrRd06snzgvBnUFWuyPC934Mj9lmVOy3a8UmbedgvvRtD
nqmxnhmtmHA1enHtQhfk1ey4bjod5wodTpl85ICe6Beekn4L9kfyH9RUcCD6
MvfyPnMaSoVD5jahHITSvodTdzmG9dMbRm04WMf1m6jfWITcwOl67kIOSkpN
rX3oBeiYyO0K+p0NQ5XHgaNxp5F7IX7cV87Gm0KT9kd9mXD81bFci88Ge/nC
FQvjUrBl69HkGhYb6TkNW5I3JcBM90ibGZON5HdVSxYURiOnJXGBrI0N7gXZ
SlHIPsTt83c0eshGXTzp4KOCnciyO/VqvIWN23qL/ZkuFISKU6Z+bmaj6FPd
RKr+FgxHX1+Rc58NfZPfGt13eKGQomp9eo8Nk+bBWmt9N8SLs8wC1H6pa0H6
SHZAsMuTkokmNsLpHhL7AmvEzOYT9Wozd6U9tg75AlTPrcKTaiOAqWNbaIJj
waO8SLX519l6SV5LkP3offZWtcdapsSOJB00Zp9Z4anxoiYbIuYj8cDOwNdR
7e2u06UMi0mCwihKWat2Mf2zqOmdKiIq12zGUm3qtIGi+uYwMdne3rZKbRn1
nFX4aSnxVKp6v1Jz36NB2/q+kHC/WMMnqa0n+LFv+9EuImY2L/5ztT/udaME
VDCJZuoI1URtkum2QIbjQ8I5YPUtY7VpdrcNxm8yiDXOE3Yaf0nMD661qiMy
Hq9jGamtkz3EziimEa3LXHI1vvuvrS6tqRVET0z3Ho3DipXxxfQiotas111j
WpcN1/F0ARFNOW6l8fMjvTmSptOEWavEUOPOAtfe+KzjxKaTZ3Q1ntWdH16t
SCFuB4R/MlSbkfZDW2UwlSj76sWMxp5cY8uY9DiCJNGZ0njpmEOwQVo08Rf/
pHE/
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd0Xk41IkfB3BX65wt2W2WVCS/HNEW0Sbfdyltkjt3lrXa1LoSxaMckSNX
VjErlbC0u45oKN2JGaYZY2bMMM4xrexQaLOO1PrN7Pt5Ps/nef3z/uetHxzp
fkxBTk4uVHqyX/KLLEJY/JdXKNuh80NJnBBbmULLYsNXuPzp49YZbyFszUbX
vya/wt3dFxjFZCE4VzgvDnwU4+7T2j3PSvpwKO+CxsY2Mcwt6+Zf1Pfi8kGm
XqOrGKWGoi+aC3uhZ6z/Qd5ODK/KGurM2V68CB+v2W8hhlXGm5Tde3tRsEE/
svJLMU5cKlbR6RWgMHBfjlA4ipipYX/nlQJUm+lWnw0aBXy8pqPn+bB577m8
2W0UPXvJIz0jfFTWOd7n7B1F7PYRS+cGPirC9GmrDUbRsJTHVvLmY6V9vYvn
mAjhD0/rLNb0YPTdja3/OyGCOIG0Xi6JhwrXA/raomHM6yVxrMN42BXO9o54
MoySN7qZ5b48hAf78DtLh/Hp28qcz3fwMGNw691V32Ectyp9+fUUFwuatq4F
vCFMd6jZ6J/g4rrSvGZq5yACF4oV7H25mIlobIm/PYiY/lOKhQ5c8Jse+yVm
DCK3+dAff5hwMZ+evP2u/SD6fAS+rVMcPE+ySeW3DkBkVL1yfSIHlBBRiOOz
fthJ7Fxrozgg2P3yTmX96B9n5AT+wEFyjKFacHI/rFgm7qYOHOzX25dC39MP
vVVL1p5rOJBsoqlktAox3zXacL25G4WsdWMkRh9cr/ato2h0Q1flul/RhABl
yg6keMVuxGRQ2gLYAujUVe4YnmXD5nXCPhuqAGYS3SALDhsS0TXuzkTpTktZ
+9uz2YjeWBO3R0sAp+JD741U2Ngi6mAU7OXDSfU11WFtFyrGTYrz63mISNIr
yiV1YUKh1c2qmAej1uCm6WUWYpf+zJtN5OFtnNdF0hgL7buz8u8587Aktner
vsNCpAK3zHuaC95INFnLiQXXL1sKli252LTWufM9hYmTAhUmn9ONTwdHRDV5
TKhrZCfzHnXj/I+TBglpTDzILXMcr+7G+2fh3l5RTBRpMle4JXZj89sPLfIO
TPSZDW3YsqUb2Y11dMV/X8LnnKftNJmNY35RF8/HvsQWdQMl43tMnAlI/XG+
gIEZkarWTGQHuFXRT0yzGdiUUfhdllMHjqsqyEekMTCRf67N2bQDyp7mz9ee
ZcA8dnpXwDgdN28tZn8VwECm3aR72vd0LKTNaieYMrAQu3FREEDDgPuNCV1O
J/hV35uHxrbBJlj4NGJXJybJiY8/Jz+H7Ubx/JWoDoRYKkyaeNyH7RpyiERM
x9xQPMvq2R1I6v2DDmbS0amlSJo1qoZ/4KrRUBc6JMIX3lHBZWjSWmhMM6SD
5Eq0lJ8rApH++L5IjY7nPvGPbG/kg2Q063dngYb2SAuqTmA6vmF3UdUmadh6
m0s5/iARnLnHbyGmQas8NC61PBYvWUcP/zZAw84V4Zk6heHQ5t1Msu2lIdvK
tsjKLwRLV3tXBPXQ0GYaluDQchSm24a2WXNpMJzSpvbUeoB9RSydjYZdUU35
D6scERie8aCdTUPWnIvmpUE7VD7ZVqsp9Wf86JOrJN+Au9llsbSLhrpXQd4O
e7bjb+FPZHupU/+t0GqaMwIvqspNQ+r4MdIRwwv6iG67bTTGokEvbs1F5Ydf
YSB5rIAu9WBWTMr2f1ZhX2b3CarUNQEpv1GFyhhXv6lYJXX88aO3+Qfl4L+U
d6RU6tbcnxKPhcwRlLci9SKpw5gG5wsKpwnqXwPOBVL/6u6QNXV9jNBuDCDy
pC6JEXz45DtMBFbd18uR2rWKEr4cwyf6zrxLvyT1L5d3M+pjWIRHV9D5LKlp
DTQ/0cM2Its4sylT6p7mj093ej8iAk+dtpT5jK75778O3iVSaz0HMqReTcqZ
t1CqITzqzSgyN1/rDKzeVkHcWxaGyVzk2XBYWf4awWDaHZY56QB1cSzqZ+Jr
7hErmX8+M6bY7J9FUFcbG8lMmW2x+k6SQmwwSV0n82fGm3WHbsURXP20NTJb
C1+3pH97ipBfWa4pc4+1hvtpx1DizYUJksyOV1pzvBKCCENOrrrMTJHF0WIV
byJWtVDtv77V8oTnhDtxx6NdVeaTSubryVouxP8BUl5Fiw==
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwdzX080wkABnBJorxdeuOoFnkJp5eVQ/2edBGtpShiJFPKrkuKSm8ii05F
L1eUilIthXOHRFH62byN36xLstxs41wmkm7p9TbP5/N8ns/3r4fGjvbbqq2l
pRWkrmYXjkaMyNH0QDpzSWyluRhugsHfUnx7YPpB1XRGW4zPn4uyb/7YA9XV
0+XW4lZ4KQYiXk7oQWDH4VD+vlYwdt+6u6ioG8afC0nzZhHej6v+l/ZBgdAn
W7INKkQo/k7EZnYpYBh31XTpLRHG7ChmH25QYHgoMC4gQYQ5q/pOKbMVOLyD
J/Cni5Dup6BPWq5AA529WsCj4Hxf1F9/Sg5bQ4eE5ZkU5DrXgqP2yVFy1qB/
IIXCic7U2knhcoijbQs7t1Hg6nGqkuly9B03OzNiTyG9mIxWdsjA1rI2nfdL
Cy6c6yfGOMkQ985/u0GHEDyxOW63SxGqe6mKVSOErKrExOWpFJctm/JUd4Qo
OjYobb8nRZavSmJyQIhYnt3EoKNSdI3E0O5aCpG+UBTpYScFMCYkN6YJI29p
FjxVJ6YURdVEeDWCyd9kPn+rBBl5Hq6xixrBksx+tmepBInMgsJS60aM37Yp
o2uKBB9T1yrrxjZit+EVEIIOFOj/PHcG2YCY0x/Lvzh0YOOq9Ze+rG6AWVUy
/+KXdvDT/tncdLAejoFNvdOetKFm6u9P7+yqx5Djt71auW0YLtVdcGNrPZL9
MrsNE9vAFbAkvb71WOlpZH3Row0zjCdNL5tTj47LPVvCyeeoeCKoMX1eB/2r
nYdI6i9UBvOs3qysQ/q7coaTzjPQuJyd4RECnC/MZb5toRAQLjvEChVg+ru8
GeJyCt3xdmXsQAHOSXcwWnMpuI3jWmYyBOBOafCyi6UgsCh9c4kuAPHJMt/Z
nMIND4sIhZ4ASycOe9u0NcOHOUSveMBHK/W2tc6zCQecLDm6Lnx8lWR/GakQ
gP6HbnV7bC16r1a+vG73GIM+HHupTi2ykoMYzgllMHPfkZp2n8Q963dmJb6F
OPnDBb2Xx0n47NK7rXsiD6zUgY7q7SRoz60u25zIhpa0OKnXj4RMmfVf3eJz
6Fcln3b3JOH9rdt1/6lfoQrm6ugvISGnKU6+ik9CX0WucukiEkFSlqtL/35E
lO+OG5hHYoTJcehcHoOZDZF3a5xIMHLOOsc6bQP3hWl8vgOJT8HDLT0bw5DF
WpO/fi6JA6v4XSeebsBiG38E2pMIX5lgq1rNxLikRocyOxKXE4XVZstWYLHR
/gCoHXKQtb7Fyh3+YQWvB21JlDTLXleuWwCvMxioUtvAyttj4xZ7pLkP9mWp
rSybFak0puGnBdGcJLWpwOKXE9KmIWro8N7dar/SfrsiIcQEEn/T7Ei1/TLi
tR8Y6IKzdZNJmNrzTazLLyR9JZiRBYeC1PZMNB8bsm+Y6G1xE27QWBkTxOH1
EcI+nz3+an//Tfxq/jw5Md7h75J1ah9N6rbZQLUTBUZmWWvVHppsFftBLCLI
2jUvfNUOox5fmd1cR9zLeeWtsXlztSi48jEx7lB8/xq17ZsXPZ7qdJ8oVpB3
NM5Mmbpf36KIcHEXHtGY0XQs5Wb0TeLP8IfhGh/pmUMp664QvAzn1aNOLAiT
TT5PmLrsJDR+aKQcc4+fRuQkM+gaa5FJj4xuJRFVXdecNK49Euia5h1PeOWz
7Ef/tqsesrNiiKjamTYa28blfDx/chvxnG1orXFeS9p146mbCcak/Nka81m3
bQMcA4h6vWs0jUv3uZw2XMckPDd/naXxSU6raoHXCqKhuHLUT6r476O4ywhH
He6oH0Vtl9nJ3Yj/Adjhr5Q=
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwlyQk01AkcB3BXTYckciVXNls2achZ/X8zlVw5skiHeHRISlJoRcIirGNX
ROMMg6ks40gh//9cblrFJN4w0ZAQDaE8+x993/u+7/u8r5aXv9MFCTExsVN4
RZuVKUoL/Nxx0EF0jUvvtcAXV2ZsWPA4gNJQq7xvCxiaLm+NcBmHFPM9nsID
+K8yIsnfMg4rpzm+NR+aIaUK3qknjgFaNN2/Qm4GYV3I8bwYAQSteU7bot8M
jrnr26MuCoDNz7zos70ZAigZ3nHHBNCaelLA+8aBtIwEk7m1Ahjg2tP7KjjQ
uT0/1eP+RyhycTEQI3JAdZNidFTaKAw5KT3jaXEgT7pHKyJoFAzsyC1f5TiQ
mrUvJ8dtFLBhDaeaOTbQQ3tJZLVRkNEzFPzVwAbSzOImtZIRuGE1pN3vwoaq
sVOJvzE/wNoF2/PEQhY8THCa9lDgw0myqf/lTBaIa0j0eS4Ow8zMl0fsJBbc
XZBaiR0cBh80RTB5mwV3luNLrIqHIWh3YD7vBAv8KkoDU8yG4RrV/HsvgQU9
Gg9MNS8NgRrFfpkRx4TB7rfkpheDILdEvPj4HhME2uHaAwmDQOx5oZv5BxM4
lnUBB90HoeX8mhtsPyboaZ/Z2yI2CAVb2+jqTkzwjTyssdF2AKIKM69HajKh
w39H+vREP8xWpkWYtzJAL8v4qK47F/qMdQLKWAwIVqD0vDHlgkzk5hwdlAGB
Xe39lVu54HzSRPHIcwYMBDmfXdfRB+Qzy57rqAz42nsmXI7UB7fC3+c9jmHA
0Z6S/qv6vcCmdUUY2TFA2SCxkkJ8A5uHgtpnZzB4kvT+s2ltNwzNK7UmT2Ow
Oz5AISCnGzxpUQcMJjGwyRFKdfzZDUpng0mxYxjEysyHTjt3wyx/nnydh0GT
RCGJPt4FhN9t/iV2YvDDBxQMgzqh+RCBp1yOAX9jVKd8UxvsXBnV17mDgWu+
jD0mxQEFh+MmIUQMpL1LtswVNMJN8bJ8BQIGtX7NWONEFViEuL8y+4RC+aWo
OYNiGrjL5l524KLgwy67vXKhACgJ9fVeHSiY3aKlq+zKhIbkqfBUFgoh4sW/
vi1OgZ2F0naNTSgE/W31yZoaAzNZbkoJDShIVS2udEnfhV/u0xuNX6KQZtym
tph1E7SzFxyxOhSORwfOJan6Qbu69Tv6cxQexlEee6d4wUJ0r5EUbgs03sWg
2g0+ODydflCLglDNX9LuoyP47rC7YoFbTzOZucn7GDgFmBDkcYfqaW+TC0Vg
aj7Db6oGBYncnkRF5f1g7sqn9uKmEkJKNlfqwixBs4GDO5PLqRky2wEH098O
1OPOjgv7UqmiDPwHKrI1uBlxJJs8T1mQ87COrsDtsFGyO/jqWjjyvW7fM9xn
Q2cqRhqWkclqJdUnuBcN9dMtLYSICglLL8N9ammvViH6CdmgdiirFLf9Bdny
4dZhpGh/xvcS3FavKWEuTlzk0eH6WJHNhEbeVOVu5GXkfhD5vtpybNcIC/HZ
UCsjslF94JXTUo2Icw5xgoq7OhxtmpqkIzKE8TcijwWKHWwzpCHxvtVMkZX9
k22lxQqQZHLaC5GneImfvcIfIlr8V3SRLRTfYY71KUi226tnIm+Tndt1TjUG
abuRQRO5/lYH1sYLQwLGHEpFTuoLvWQbHYj8mONRRS6nKvJfL1xGJLQkV11p
Sa5Z0vJCPMU9ikWmXFvf/43ihnARYZHIkyts4T/rTiDG8rRV5772GD331BL5
6npz1T8SDmy40gWIDpxYdTbJZkmda4TYxhxedVzZf8SuUiJyO9t41YnWERPC
5D3I/+490q0=
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwdzQs0lGkYB3BLZUeK6UKhkPslZcstfM/SzaUSg2ZWLCullCgql5CWodIJ
q7aMYTZJLtlhaszl+1BhO03uGYppXBpEu0Qpkf2++Z/znvf8zvN/30f/t9M+
YYoKCgo0/BD3ndtEePBSRGQCessT/DLKebBul+fT+IIJuKVRIjNBebCKcZ2Z
GDkB+1NP6aa85UELh+0ZR56A9d825jbo8SGcqfHaNWAcZujOjq03+VCy9EJj
ysIYpOqsEycX88Fz1mWNTucYRGs+FM2y+WBSf71N4cEYDP0qDHQV8aHzx0Lr
Yr8xUKuusgn+zodDDfbJrtWjoLfP+VU+TQBxMrvXIRdGoKZy84DTEQGcmTgm
POgzAl7Z0nxOpAAmg10CUyxHgMLmUS0uC2A61f914YAMynz1ozzKBBCmjlA7
Dshgs7Ot9uiUAKaiQm4VbH8H3qm+7ZwTQthk+yjzufkQpG0zrP0ULQS1IErt
YdIQmByiRGjHCWH1RJKi5egg8ASh7pp0IagrzpMulgxCQmgGImEJYTanE+kz
GgQ0m9VI6hRCS4C3i9WWAXiS+bUo1hgFW2/lMzc6JPA0tENJywIF5v69NjoF
ElDLlb55uAWFc7+Lry4Ll0Dv4ZC5Mnu877TGcOZ7P/i7mHGm3VEoq5Vq6ln3
g5UBP/jrcRR0EWGUackb+Kz25aYNC4X3Kax1pS09cL/YZtuGYhTaBvOhsKQH
OBXld+ZLUPhu7C8VJ/XAqyyq3d0KFPKvqUiXb+2B6i4aI4eLQpV7jNrZPDFk
6+Ykk0UoRPmMekkjuqHXMCnop0l8n9F6m9hdXVB9G9KWm2GQ/NmtsuJGG+xw
FFSlmWOQ/40xnH2uDfRnd/8yb4EBi3qJXnS4DcajHvq9tcLgS3GYqoNZGyQc
7JxM3I6BAUt1ujCjFcZEdSq6gEF6f90hnlILSFTv6e/wwSB+boiRaf0C7n/g
NVOiMZhZmR7jTmmCIBpXeoSJ97lpEnQjCv0ZtlpMLgbNZJWozGs1EGR/aSHn
HwyinnqJbh15ALIec/HnDgwMe03sSEVFMB/qHWzfi8E3h4jGmKM34WOrL/9u
PwZb2EDhW2fB0j8XH/lKMaBWLUpX5l4GbZW6es1BDKan0OGPMfGg7PCiLGAI
g5fPCoz2e0bDk/M0E4Nh/D/ZYs6GncfgsfLYD9W4XcfDWN07g4CVV3NyxTsM
6Ln7ckfFFLg4v1ZpD+7+9/HONxo9YBW1ui4SN3uod0n3eRdwzM6W0nFnrG8n
LYmxAzt3tuQ27vrJSKpyrBXIGuxC7uHmN9U4cv81gPThgeQK3MtOBOtyxFpg
nDhVwMado3FGkZZABuYmvUYO0TdaeHPllDJUPXLrfYybZtY1Tbq3iBxoMqXV
4ua6e5XPlc8glRYee3i4i5n8K5HPxxH7rOBJwjr04+Ea6oMI46p/IB9398fQ
Vm6ZGNm2u6OI8F/SQqlA1ooMpwW0E3awbV7i8vIZktTp+R/hRd9XGepjAoQu
Xa0kIOZbGdojfdUI3duPTNjKq+pDYlUp8re+oRZhyzV7h2VFRUjAxgQ9wupO
X7qySvOQOAg1JHw2aPOTu0uzEMdTn4wJm6Tz2gMLLiO0yhZTwm7S4qMXa+IQ
dvq0GWEui+Z60jcasWx5bk74MbkhujT8KOLBo1gQjhmsfWChGojEqpTK3XSA
pL48nIKsOPZO7kLj2ff8ZjfkDyeSpfx9jubpvryfkbUqenKb9lFPvkBtEUbs
VrkX5gyMI85ZIYuSHXJf6+CIXCcNEQgDudHtvIP1Ij2ERd4pN5PcPbtqQAv5
Hwb51D4=
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxVyXk41AkcBnDS7qJow4TpEtbIWEe5md93UUKnSEieFSNm10hPg8rRmM2d
DqwYNxkq1zCGmQqto+QYRs5ixswjlGMfpIt2fv7b93ne530+z7vvQshp4iYp
KSlPSdH9fxYhYMC5+6jAA84erDSjtiyAgTbGu78wEO4MLFKLaAtg9Swa+y8u
AmSdj5C5cgvQrxSYswLxYOJheExm9zw4rAe+i8zOgHHbiiPfz3+ASzY8P5nm
vyF1KuxpqO4HiHbm2oEgE6K0jhMuLL2H0p0Gy67bs0G+jeNbn/Qe1H9g3tGw
zAPTA2sfvz2bBdm0PBfjsSIIKm7peGQzA91mm1O3OxfDVITpPlvFGbgzlNGu
xi6GgLjkHBvBNMj34ZP/SS6B2zZlW3xvTsMpdfmRdI1S6CSH4pCBd3Bypiy8
5nsZPNSTmjlBm4KmuA6RYXsF1DZjns3uFYPZA9t5sWIlUF5gxITPIggO49yl
uFeC0xFLgbhfBLNqSPZvk5WQsUps0IsXAUmYS8HOVUGPye3JyKVJwMaQErRn
q0GuhaB4Y1QIukNFNcY0JtDrbyTfapwA5rQ9ryuLCWL3oCjV6AlYfqmEVatm
QomSkznWfgIs/JwyW8eYUCOUj73ZMw7IiepP2Ya1cDbg4mf+7FsYj1/LdOms
BZZq55KvxRtwezVIdubXwUAmcyRCYwTw1+z8dYV1YIc/9OnAyjB8jj5KfDtf
B09wDpPWncPgP5883yPHgvqrK0nmlGEYtG5pEBBYUHjen9jaMwRfqgZ7TPNZ
sBmns155exDYrlVDi0710HPG3k98aAA6tPAl7m5s8Nhj8rXdlwc0/ZxVi3Ns
eKIojc1x4MEaK+e6/AU2iP9k0PPxPDh2tkx0PYQNt14qCH//0AvTjHa73EQ2
yO1W/EWI7YXDi07hm7hsGB0Ik3VK6Iar94cbopQbQCWnODWpoBOsezFEdlED
RKXtMIPyNgBt/mnjS43AaIkrz2/iQkZ6C7VN2AgzJPMEKQ8mpJk+CSX8yoEC
EhlHv8IAh5prpDkvDnxT/hH7wC4PzLUHX+8K44C6VlBFya50wLdLz2ASOfCX
j8bJHwcTYVfimDg6nQMDcXE3+KpUqFJYHJ+gc+ARLX94pTsMpNPojjsLOZDt
+sqvlRgMnu/FoU4lHGg08YquovnBcW+r0YRSDpDoXsSTsp7ANxvesszgwHAf
42KX4SnwFSRO9ZVxwP2+I20s9TC4GvXHhpRz4Hr4u7z6p9aQ260Q3Ctx/V4N
TJbvAWiLIBsqP5R4xoW/nIADqYelcwSJ+9V0uJq+eyBmsU/GQ+LJ4K1x+41V
IEiFSyNJbOR9lK+1IAeXFTHPKRLH/fx17qWONOh0UZSjJFaobVrtG/+IBGH5
jrES983gFHzC5xDV9RDKTfQXb5uzSBEhqcXUuniJmwX+ZXmKI4i2V+3eRIlj
fKbujhvxENZS9hpq+77djw1S2hCDBH16Empa1PkYFhfp8sB/RR34/EpT/xkm
kiN6bJkssQp3oTU3rAxZn9sRgNq6K55snJ6P2F02oKKurODZEL6nIzZ7/khH
/TqS6Ba4moSI5LYVoA57oYNJnqAibZZ0BupUC3XD48vhyLc6bAVqzZUt+lkc
MkJmR1ajdhnVv5ai64/4hI4yUatdzrItjPdEdCK96lAbbeZp3sOdQrro5izU
26WsBG60w4j5uZ4NH1qxsnM+YYM0++HrUcfeK6AxLA4iqwTShpepN/KW9fSQ
L1H3N6wtfEMs1dyHFLuwNvxT+dbFt5tUkVrHlg0v7U8hU9yVEO+Fzg13pMro
CjUVkP8AJwO67Q==
      "]]}}, LineBox[{{0, 1.}, {1., 0}}], 
   {Arrowheads[0.03], ArrowBox[{{0.5, 0.6}, {0.45, 0.55}}]}},
  Axes->True,
  AxesOrigin->{0, 0},
  Frame->{True, True, True, True},
  FrameLabel->{{
     FormBox[
     "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
      TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}, {
     FormBox[
      RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}},
  GridLines->Automatic,
  GridLinesStyle->Directive[
    GrayLevel[0.5], 
    Dashing[{0, Small}]],
  PlotRange->{{0., 1.}, {0., 1.}},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.5659870532095647`*^9, {3.5659871537373147`*^9, 3.565987171609337*^9}, 
   3.565987215056822*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.8"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Mu]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Gamma]", "=", "0.4"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Nu]", "=", "0.1"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Lambda]1", "=", 
   RowBox[{"-", "\[Mu]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Lambda]2", "=", 
    RowBox[{"-", 
     RowBox[{"(", 
      RowBox[{"\[Beta]", "-", "\[Mu]", "-", "\[Gamma]"}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"r0", "=", 
  RowBox[{"\[Beta]", "/", 
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   SubscriptBox["c", "1"], "=", 
   FractionBox[
    RowBox[{"(", 
     RowBox[{"\[Nu]", "+", "\[Mu]"}], ")"}], 
    RowBox[{"(", 
     RowBox[{"\[Gamma]", "+", "\[Nu]", "+", "\[Mu]"}], ")"}]]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    SubscriptBox["c", "2"], "=", 
    FractionBox["\[Gamma]", 
     RowBox[{"(", 
      RowBox[{"\[Gamma]", "+", "\[Nu]", "+", "\[Mu]"}], ")"}]]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"e1", "=", 
   RowBox[{"{", 
    RowBox[{"1", ",", "0"}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"e2", "=", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["1", "r0"], ",", " ", 
     RowBox[{
      FractionBox["1", "r0"], " ", 
      SubscriptBox["c", "1"], " ", 
      RowBox[{"(", 
       RowBox[{"r0", "-", "1"}], ")"}]}], ",", " ", 
     RowBox[{
      FractionBox["1", "r0"], " ", 
      SubscriptBox["c", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"r0", "-", "1"}], ")"}]}]}], "}"}]}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Zeta]", "=", 
     RowBox[{
      RowBox[{"4", " ", "\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"], 
       "\[IndentingNewLine]", "diff"}], "=", 
      RowBox[{
       RowBox[{"\[Beta]", "-", 
        RowBox[{"\[Gamma]", "\[IndentingNewLine]", "\[Delta]"}]}], "=", 
       RowBox[{
        RowBox[{
         RowBox[{"N", "[", 
          RowBox[{
           RowBox[{
            SuperscriptBox["\[Nu]", "2"], " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "2"]}], "-", 
           RowBox[{"4", " ", "\[Nu]", " ", 
            RowBox[{"(", 
             RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"]}]}], "]"}], 
         "\[IndentingNewLine]", "\[Lambda]1"}], "=", 
        RowBox[{
         RowBox[{
          RowBox[{"-", "\[Nu]"}], 
          RowBox[{"(", 
           RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "\[IndentingNewLine]", 
          "n"}], "=", "1"}]}]}]}]}], ";"}], "\[IndentingNewLine]", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]", "=", "0.15"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"VectorPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"-", "\[Beta]"}], " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Mu]", " ", "s"}], "+", "\[Mu]", "+", 
      RowBox[{"\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "s", "-", "i"}], ")"}]}]}], ",", " ", 
     RowBox[{
      RowBox[{"\[Beta]", " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Gamma]", " ", "i"}], "-", 
      RowBox[{"\[Mu]", " ", "i"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"s", ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "-", "0.025"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", 
     RowBox[{"e1", "[", 
      RowBox[{"[", "2", "]"}], "]"}], ",", 
     RowBox[{
      RowBox[{"e1", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "+", "1"}]}], "}"}], ",", 
   RowBox[{"VectorScale", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Automatic", ",", "Automatic", ",", "None"}], "}"}]}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
       "\"\<Infected (\!\(\*\n\
StyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\))\>\"", ",", "\"\<\>\""}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"\"\<Susceptible \>\"", "[", "S", "]"}], ",", "\"\<\>\""}], 
       "}"}]}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.565658124509137*^9, 3.565658245748071*^9}, {
   3.5656582796350093`*^9, 3.5656583781846457`*^9}, {3.5656584203400574`*^9, 
   3.5656584398001704`*^9}, {3.565658509662166*^9, 3.5656585999593306`*^9}, {
   3.5656586525263376`*^9, 3.5656586645560255`*^9}, {3.565658698216951*^9, 
   3.565658729194723*^9}, {3.565659251972624*^9, 3.5656593843011928`*^9}, {
   3.565659433853027*^9, 3.565659454761223*^9}, {3.5657188028221235`*^9, 
   3.5657188034091573`*^9}, {3.565718950375563*^9, 3.56571895136162*^9}, {
   3.565719026149897*^9, 3.56571907183751*^9}, 3.5657191162680516`*^9, {
   3.5657192007608843`*^9, 3.565719201699938*^9}, {3.565719407568713*^9, 
   3.5657194129880233`*^9}, {3.565719483283044*^9, 3.5657194884823413`*^9}, {
   3.5657195457726183`*^9, 3.5657196382689085`*^9}, {3.5657196686636467`*^9, 
   3.565719721795686*^9}, {3.565719872141285*^9, 3.5657199409272194`*^9}, {
   3.5657200764059687`*^9, 3.565720126157814*^9}, {3.565721225169674*^9, 
   3.5657212254276886`*^9}, 3.5657213654927*^9, {3.565721513162146*^9, 
   3.565721650479*^9}, {3.5659862997684703`*^9, 3.565986346904166*^9}, {
   3.565986387213472*^9, 3.5659864763165684`*^9}, {3.565986530978695*^9, 
   3.565986644117166*^9}, {3.5659866843334665`*^9, 3.56598668789367*^9}, {
   3.565986722767665*^9, 3.5659869171817846`*^9}, {3.5659872619605045`*^9, 
   3.565987319312785*^9}, {3.5690196001678762`*^9, 3.569019614332687*^9}, {
   3.569019647240569*^9, 3.569019720411754*^9}, {3.5690199001110325`*^9, 
   3.569019906246383*^9}, {3.569019952615035*^9, 3.569020003258932*^9}, {
   3.5690200519207153`*^9, 3.569020079657302*^9}, {3.569030238121333*^9, 
   3.569030271768257*^9}, {3.569030464233266*^9, 3.5690304976751785`*^9}}],

Cell[BoxData["1.6`"], "Output",
 CellChangeTimes->{
  3.569019722116852*^9, 3.5690199076474633`*^9, {3.5690199564962573`*^9, 
   3.569020004025976*^9}, {3.569020054329853*^9, 3.5690200801623306`*^9}, {
   3.5690302385333567`*^9, 3.5690302736143627`*^9}, {3.569030464920305*^9, 
   3.5690304982902136`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.625`", ",", "0.12500000000000003`", ",", "0.25000000000000006`"}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.569019722116852*^9, 3.5690199076474633`*^9, {3.5690199564962573`*^9, 
   3.569020004025976*^9}, {3.569020054329853*^9, 3.5690200801623306`*^9}, {
   3.5690302385333567`*^9, 3.5690302736143627`*^9}, {3.569030464920305*^9, 
   3.569030498294214*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, 
   {Hue[0.67, 0.6, 0.6], 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{-0.049880277583797934`, 0.}, {0.049880277583797934`, 0.}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{-0.04904637935177826, 0.08051123427149331}, {
      0.04904637935177826, 0.06234590858564953}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{-0.046555537919026765`, 0.16076311897984544`}, {
      0.046555537919026765`, 0.12495116673444025`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{-0.04277198516068473, 0.23994890538212513`}, {
      0.04277198516068473, 0.18862252318930345`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{-0.03831909067209755, 0.317646861274367}, {
      0.03831909067209755, 0.2537817101542044}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{-0.03377176769726891, 0.3938513002920624}, {
      0.03377176769726891, 0.3204344139936518}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{-0.029497383694712286`, 0.4687951336096725}, {
      0.029497383694712286`, 0.3883477235331845}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{-0.025663191096410843`, 0.5427719851606846}, {
      0.025663191096410843`, 0.45722801483931513`}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{-0.022307138282786236`, 0.6160428479941438}, {
      0.022307138282786236`, 0.5268142948629988}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{-0.01940203317990864, 0.6888093267042947}, {
      0.01940203317990864, 0.5969049590099907}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{-0.016895421100480798`, 0.7612174395648273}, {
      0.016895421100480798`, 0.6673539890066007}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{-0.014729958762197338`, 0.8333700346508063}, {
      0.014729958762197338`, 0.7380585367777648}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{-0.012852284532926514`, 0.9053389241413312}, {
      0.012852284532926514`, 0.8089467901443824}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{-0.011216054611489947`, 0.9771743318878847}, {
      0.011216054611489947`, 0.8799685252549719}}]}, 
    {Arrowheads[{{0.046410595684747466`, 1.}}], 
     ArrowBox[{{-0.009782327259354252, 1.048911636296771}, {
      0.009782327259354252, 0.9510883637032284}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.01976257955905921, 0.}, {0.1195231347266551, 0.}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.02056349292403671, 0.08033127324954148}, {
      0.11872222136167758`, 0.06252586960760137}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.0231311370958023, 0.1608766320313989}, {
      0.11615457718991201`, 0.12483765368288678`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.027315095682602063`, 0.24067515728098188`}, {
      0.11197061860311225`, 0.18789627129044664`}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.03250398552434157, 0.3190121280879314}, {
      0.10678172876137272`, 0.25241644334064006`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.037964444826314114`, 0.39567233008163255`}, {
      0.10132126945940018`, 0.31861338420408164`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.043153448299845146`, 0.47083670168050107`}, {
      0.09613226598586914, 0.3863061554623559}}]}, 
    {Arrowheads[{{0.046410595684747424`, 1.}}], 
     ArrowBox[{{0.04779831473038961, 0.5448425920150323}, {
      0.09148739955532467, 0.4551574079849675}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.05182537768117737, 0.618018050041981}, {0.08746033660453692,
       0.5248390928151617}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.05526603552759421, 0.6906206131255355}, {
      0.08401967875812008, 0.5950936725887499}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.058192645641096094`, 0.7628339866381024}, {
      0.0810930686446182, 0.6657374419333257}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.060685292602636484`, 0.8347836664862548}, {
      0.0786004216830778, 0.736644904942316}}]}, 
    {Arrowheads[{{0.04641059568474737, 1.}}], 
     ArrowBox[{{0.0628177134804722, 0.9065539844911025}, {0.07646800080524209,
       0.8077317297946114}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.06465284591512412, 0.9782014787404925}, {
      0.07463286837059017, 0.878941378402364}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.06624256706397214, 1.049764245389799}, {0.07304314722174217,
       0.9502357546102003}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.08940543670191636, 0.}, {0.18916599186951222`, 0.}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.09016668779328325, 0.08010977689052154}, {
      0.18840474077814534`, 0.06274736596662131}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.09283161765795456, 0.1610246687848936}, {
      0.18573981091347402`, 0.1246896169293921}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.0975877407493988, 0.24165944429829145`}, {
      0.18098368782202978`, 0.1869119842731371}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.10390211482540537`, 0.32087168864836435`}, {
      0.1746693137460232, 0.25055688278020705`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.11078234274517641`, 0.3980769493235662}, {
      0.16778908582625215`, 0.316208764962148}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.11735268516573438`, 0.47337080719947255`}, {
      0.1612187434056942, 0.38377204994338443`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.12314825906596111`, 0.5471977184921812}, {
      0.15542316950546747`, 0.4528022815078186}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.12805171796442433`, 0.6200273308622233}, {
      0.15051971060700425`, 0.5228298119949193}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.13212713885695548`, 0.6922210658137666}, {
      0.14644428971447307`, 0.5934932199005187}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.13550062360483767`, 0.7640221715416775}, {
      0.14307080496659094`, 0.6645492570297507}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.138302303735744, 0.8355848681805745}, {0.14026912483568457`,
       0.7358437032479963}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.1406453023074787, 0.9070046021208238}, {0.1379261262639499, 
      0.80728111216489}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.14262145002222879`, 0.9783400427668514}, {
      0.1359499785491998, 0.878802814376005}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.1443031784851319, 1.0496272822633304`}, {
      0.13426825008629667`, 0.950372717736669}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.1590482938447735, 0.}, {0.2588088490123694, 0.}}]}, 
    {Arrowheads[{{0.04641059568474737, 1.}}], 
     ArrowBox[{{0.15976100564395213`, 0.07983050969613013}, {
      0.2580961372131907, 0.06302663316101272}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.16255363550080304`, 0.1612257957618093}, {
      0.25530350735633983`, 0.12448848995247641`}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.16818825961318323`, 0.24306537872124367`}, {
      0.2496688832439596, 0.18550604985018487`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.17638183011490088`, 0.32351311799383825`}, {
      0.24147531274224196`, 0.24791545343473312`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.18562760699993314`, 0.40124622604515375`}, {
      0.23222953585720973`, 0.31303948824056044`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.19431103492499188`, 0.47626178103818273`}, {
      0.223546107932151, 0.3808810761046742}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.2016225209913064, 0.5493423116487752}, {
      0.21623462186583647`, 0.45065768835122455`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.2074707850023912, 0.6212875420414147}, {
      0.21038635785475168`, 0.5215696008157279}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.21207400918187952`, 0.6926381463944038}, {
      0.20578313367526332`, 0.5930761393198817}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.21570496575718462`, 0.7637035508605772}, {
      0.20215217709995822`, 0.6648678777108511}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.21859888858776902`, 0.8346481907074215}, {
      0.19925825426937388`, 0.7367803807211494}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.22093666334803244`, 0.9055561592435245}, {
      0.1969204795091104, 0.8087295550421892}}]}, 
    {Arrowheads[{{0.04641059568474744, 1.}}], 
     ArrowBox[{{0.22285193088806993`, 0.9764690501532807}, {
      0.19500521196907292`, 0.8806738069895759}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.22444245074975094`, 1.0474063459912761`}, {
      0.1934146921073919, 0.9525936540087232}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.22869115098763065`, 0.}, {0.3284517061552265, 0.}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.22934321151739487`, 0.07946752269833787}, {
      0.3277996456254623, 0.06338962015880498}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.2323120046862664, 0.16151478991269683`}, {
      0.32483085245659077`, 0.12419949580158887`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.23944576410452956`, 0.24522475874187627`}, {
      0.3176970930383276, 0.18334666982955225`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.2511761394279979, 0.3273980982148783}, {
      0.30596671771485934`, 0.2440304732136931}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.264555685997343, 0.40501352720223377`}, {
      0.29258717114551414`, 0.3092721870834805}}]}, 
    {Arrowheads[{{0.04641059568474737, 1.}}], 
     ArrowBox[{{0.2760890649412464, 0.4783898986668086}, {
      0.28105379220161075`, 0.3787529584760484}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.28469549959606916`, 0.549502907449178}, {0.272447357546788, 
      0.4504970925508218}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.29084500565660193`, 0.6197752507082389}, {
      0.26629785148625523`, 0.5230818921489037}}]}, 
    {Arrowheads[{{0.04641059568474735, 1.}}], 
     ArrowBox[{{0.2952626824434443, 0.6898618674709158}, {0.2618801746994129, 
      0.5958524182433695}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.29850996949177155`, 0.7600076639139237}, {
      0.2586328876510856, 0.6685637646575043}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.30096207492829585`, 0.8302867104582731}, {
      0.2561807822145613, 0.7411418609702978}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.3028621390749695, 0.9007089388472046}, {
      0.25428071806788766`, 0.8135767754385091}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.3043689170794376, 0.9712625480052857}, {0.2527739400634196, 
      0.8858803091375708}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.3055882477776763, 1.041930103408096}, {0.2515546093651809, 
      0.9580698965919032}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.29833400813048777`, 0.}, {0.3980945632980836, 0.}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.29890841493116194`, 0.07897663065956814}, {
      0.3975201564974095, 0.0638805121975747}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.30213910256136756`, 0.16196524556938985`}, {
      0.39428946886720384`, 0.12374904014489585`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.3122982912366197, 0.2488990561139313}, {0.3841302801919517, 
      0.17967237245749726`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.3317025033820378, 0.3327823548912681}, {
      0.36472606804653357`, 0.23864621653730328`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.3512657379944231, 0.40692971013457346`}, {
      0.3451628334341482, 0.3073560041511407}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.36410216107666504`, 0.4758537456498695}, {
      0.33232641035190635`, 0.3812891114929875}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.37165048831927494`, 0.5440316533790706}, {
      0.32477808310929646`, 0.45596834662092917`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.37624653709459305`, 0.612686721828074}, {0.3201820343339784,
       0.5301704210290684}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.3792288882547282, 0.6819229401879935}, {0.3171996831738432, 
      0.6037913455262918}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.3812818456273384, 0.7516297710181233}, {0.315146725801233, 
      0.6769416575533047}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.3827656510806481, 0.8216899058362078}, {
      0.31366292034792326`, 0.749738665592363}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.3838810992871739, 0.892012908783105}, {0.3125474721413975, 
      0.8222728055026087}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.3847467126294256, 0.962533523258398}, {0.3116818587991458, 
      0.8946093338844586}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.3854361137938683, 1.0332050840422173`}, {0.3109924576347031,
       0.9667949159577821}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.3679768652733449, 0.}, {0.46773742044094074`, 0.}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.3684491045877477, 0.07827604148741232}, {0.4672651811265379,
       0.06458110136973053}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.37212162291838946`, 0.16276453615130942`}, {
      0.46359266279589617`, 0.12294974956297629`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.39043772114209163`, 0.2559536564553117}, {0.445276564572194,
       0.17261777211611684`}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.42581638330436006`, 0.33495545328106985`}, {
      0.4098979024099255, 0.23647311814750155`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.44514245369839583`, 0.3988987418075715}, {
      0.39057183201588974`, 0.3153869724781426}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.452793772003251, 0.46417303016102046`}, {
      0.38292051371103464`, 0.3929698269818365}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.4563770043452633, 0.5316900988129217}, {
      0.37933728136902234`, 0.46830990118707805`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.4583593010422113, 0.6005424388148947}, {
      0.37735498467207435`, 0.5423147040422478}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.4595920467746105, 0.6701745345122124}, {0.3761222389396751, 
      0.6155397512020729}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.4604240636004252, 0.7402876247976717}, {0.3752902221138604, 
      0.6882838037737565}}]}, 
    {Arrowheads[{{0.046410595684747424`, 1.}}], 
     ArrowBox[{{0.461019926862382, 0.8107146090872701}, {0.3746943588519036, 
      0.7607139623413007}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.46146609280692136`, 0.881356522212698}, {0.3742481929073643,
       0.8329291920730157}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.4618118859556296, 0.9521515611194603}, {0.373902399758656, 
      0.9049912960233962}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.4620873279972401, 1.0230593324775334`}, {
      0.37362695771704546`, 0.9769406675224658}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.437619722416202, 0.}, {0.5373802775837978, 0.}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.4379542519408693, 0.07719580136138028}, {0.5370457480591306,
       0.06566134149576257}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.4425935672415088, 0.1645701433117979}, {0.532406432758491, 
      0.1211441424024878}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.49276082608973376`, 0.2638877888460622}, {
      0.4822391739102661, 0.16468363972536637`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.5257294098269983, 0.3177541720454844}, {0.4492705901730016, 
      0.253674399383087}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.531355557038773, 0.3809069520899755}, {0.4436444429612269, 
      0.33337876219573864`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.5331807493787555, 0.448604182451813}, {0.4418192506212444, 
      0.408538674691044}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.5340344646908695, 0.5179606705824408}, {
      0.44096553530913046`, 0.482039329417559}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.5345191278633469, 0.5880792082574426}, {
      0.44048087213665305`, 0.5547779345996999}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.5348285346045111, 0.6586068064734338}, {
      0.44017146539548874`, 0.6271074792408516}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.5350421030170237, 0.7293784454022296}, {
      0.43995789698297616`, 0.6991929831691986}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.5351979296693129, 0.8003070783564773}, {
      0.43980207033068697`, 0.7711214930720937}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.5353164251856951, 0.8713425604600937}, {
      0.43968357481430476`, 0.84294315382562}}]}, 
    {Arrowheads[{{0.046410595684747424`, 1.}}], 
     ArrowBox[{{0.5354094574216994, 0.9424540069124678}, {
      0.43959054257830044`, 0.9146888502303887}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.5354843759706186, 1.013621371243272}, {0.43951562402938127`,
       0.9863786287567273}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.5072625795590591, 0.}, {0.6070231347266549, 0.}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.5074143571875206, 0.07531680805059363}, {0.6068713570981935,
       0.06754033480654922}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.516869963845939, 0.17228733411258296`}, {0.5974157504397752,
       0.11342695160170274`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.6032935135437943, 0.2332108036012066}, {0.5109922007419198, 
      0.19536062497022197`}}]}, 
    {Arrowheads[{{0.04641059568474734, 1.}}], 
     ArrowBox[{{0.6057507207496629, 0.2969088239994895}, {0.5085349935360512, 
      0.2745197474290819}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.6062140341127721, 0.3660905765519587}, {0.508071680172942, 
      0.3481951377337555}}]}, 
    {Arrowheads[{{0.046410595684747445`, 1.}}], 
     ArrowBox[{{0.6063958063201602, 0.4364574344790304}, {0.5078899079655539, 
      0.4206854226638266}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.606490744648899, 0.5072682935086418}, {0.5077949696368151, 
      0.49273170649135806`}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.6065485447455483, 0.5782929814062762}, {0.5077371695401658, 
      0.5645641614508665}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.6065872586395428, 0.6494369036788806}, {0.5076984556461713, 
      0.6362773820354047}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.6066149313677491, 0.7206540707238777}, {0.507670782917965, 
      0.7079173578475504}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.6066356658746757, 0.7919194428978188}, {0.5076500484110384, 
      0.779509128530752}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.6066517655601017, 0.8632182237301184}, {0.5076339487256123, 
      0.8510674905555954}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.6066646200956614, 0.934541109122596}, {0.5076210941900527, 
      0.9226017480202605}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.6066751162093021, 1.00588195576414}, {0.507610598076412, 
      0.9941180442358594}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.5769054367019162, 0.}, {0.676665991869512, 0.}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.5769056953875309, 0.07126792724532446}, {0.6766657331838976,
       0.07158921561181837}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.6766578236459978, 0.14195448024428708`}, {
      0.5769136049254306, 0.1437598054699986}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.6766651973136052, 0.2140041744003264}, {0.5769062312578231, 
      0.21456725417110217`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.6766655520412467, 0.28550481657935434`}, {
      0.5769058765301817, 0.28592375484921706`}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.6766656613651234, 0.3569612774301545}, {0.5769057672063048, 
      0.3573244368555597}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.6766657130579369, 0.4284046523147368}, {0.5769057155134915, 
      0.42873820482812025`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.6766657428988434, 0.4998424011734181}, {0.5769056856725848, 
      0.5001575988265817}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.6766657622439197, 0.5712772191116111}, {0.5769056663275086, 
      0.5715799237455316}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.676665775772814, 0.6427103168380474}, {0.5769056527986145, 
      0.643003968876238}}]}, 
    {Arrowheads[{{0.04641059568474744, 1.}}], 
     ArrowBox[{{0.6766657857532972, 0.7141423189386749}, {0.5769056428181312, 
      0.7144291096327532}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.6766657934137125, 0.7855735802724576}, {0.5769056351577158, 
      0.7858549911561135}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.6766657994758211, 0.8570043173853563}, {0.5769056290956072, 
      0.8572813969003574}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.6766658043909507, 0.9284346699145964}, {0.5769056241804776, 
      0.9287081872282601}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.6766658084555416, 0.9998647319480137}, {0.5769056201158869, 
      1.0001352680519857`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.6465482938447733, 0.}, {0.7463088490123692, 0.}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.6486034554198553, 0.057258166685248246`}, {
      0.7442536874372871, 0.0855989761718946}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.7448630631278353, 0.13093480643886246`}, {
      0.6479940797293072, 0.1547794792754232}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.7457360649826155, 0.20674826304178395`}, {
      0.6471210778745271, 0.22182316552964457`}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.7459019741429184, 0.279356258056217}, {0.6469551687142241, 
      0.2920723133723544}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.7459691797360088, 0.3513316420921313}, {0.6468879631211337, 
      0.3629540721935829}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.746005162695095, 0.42307564016313026`}, {0.6468519801620477,
       0.4340672169797267}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.7460274843701049, 0.49470944928623634`}, {
      0.6468296584870377, 0.5052905507137634}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.7460426532869378, 0.5662822160980439}, {0.6468144895702048, 
      0.5765749267590988}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.7460536211403025, 0.6378176455662475}, {0.6468035217168401, 
      0.6478966401480378}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.7460619158104518, 0.7093285762700456}, {0.6467952270466908, 
      0.7192428523013825}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.7460684059667955, 0.7808225662973048}, {0.6467887368903472, 
      0.7906060051312661}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.7460736214035116, 0.8523043548102739}, {0.6467835214536309, 
      0.86198135947544}}]}, 
    {Arrowheads[{{0.046410595684747445`, 1.}}], 
     ArrowBox[{{0.7460779033604685, 0.923777064113752}, {0.646779239496674, 
      0.9333657930291045}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.7460814814410097, 0.9952428349688679}, {0.6467756614161327, 
      1.0047571650311315`}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.7161911509876304, 0.}, {0.8159517061552263, 0.}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.7888269259696638, 0.027041304898679806`}, {
      0.743315931173193, 0.11581583795846306`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.8139410624657811, 0.1288378617536994}, {0.7182017946770756, 
      0.1568764239605863}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8147014168151091, 0.20318768134035817`}, {
      0.7174414403277477, 0.22538374723107038`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.8149304301232998, 0.275672370598584}, {0.7172124270195569, 
      0.29575620082998744`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8150391138768869, 0.3476450738403007}, {0.7171037432659699, 
      0.36664064044541345`}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.8151022846991833, 0.41940533675342184`}, {
      0.7170405724436734, 0.43773752038943514`}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.8151435063585017, 0.49105722227179044`}, {
      0.7169993507843551, 0.5089427777282094}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8151724997195072, 0.562646378994558}, {0.7169703574233497, 
      0.5802107638625845}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.8151939929625066, 0.6341959789930245}, {0.7169488641803501, 
      0.6515183067212609}}]}, 
    {Arrowheads[{{0.04641059568474742, 1.}}], 
     ArrowBox[{{0.8152105583723164, 0.7057190338172816}, {0.7169322987705404, 
      0.7228523947541464}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8152237140658981, 0.7772234128200017}, {0.7169191430769588, 
      0.7942051586085691}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8152344133146312, 0.8487141548123467}, {0.7169084438282257, 
      0.8655715594733671}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.8152432846677222, 0.9201946356360556}, {0.7168995724751346, 
      0.9369482215068008}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.815250759263146, 0.9916672018774352}, {0.7168920978797108, 
      1.008332798122564}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.7858340081304875, 0.}, {0.8855945632980834, 0.}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.8794884615723083, 0.047514901283910796`}, {
      0.7919401098562628, 0.09534224157323205}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.883317266804194, 0.12795753604385585`}, {0.788111304624377, 
      0.15775674967042985`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8838214727971221, 0.20110464290233648`}, {
      0.7876070986314491, 0.22746678566909206`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.884013874943633, 0.27325668674365616`}, {0.787414696484938, 
      0.29817188468491523`}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.8841148661798395, 0.34508359089510504`}, {
      0.7873137052487316, 0.36920212339060915`}}]}, 
    {Arrowheads[{{0.04641059568474734, 1.}}], 
     ArrowBox[{{0.8841769847218428, 0.4167642740988371}, {0.7872515867067282, 
      0.4403785830440199}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.8842190234594183, 0.48836674989039486`}, {
      0.7872095479691527, 0.5116332501096049}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{0.8842493537514522, 0.5599225181319653}, {0.7871792176771188, 
      0.5829346247251773}}]}, 
    {Arrowheads[{{0.04641059568474734, 1.}}], 
     ArrowBox[{{0.8842722649378347, 0.6314481663227601}, {0.7871563064907363, 
      0.6542661193915253}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8842901805799541, 0.7029532595720943}, {0.7871383908486169, 
      0.725618168999334}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.8843045729039172, 0.7744437008729449}, {0.787123998524654, 
      0.7969848705556261}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.8843163876645835, 0.8459233305107046}, {0.7871121837639875, 
      0.8683623837750091}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.8843262600725997, 0.9173947546107487}, {0.7871023113559712, 
      0.9397481025321078}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.8843346325409351, 0.9888598040280683}, {0.7870939388876359, 
      1.011140195971931}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.8554768652733447, 0.}, {0.9552374204409405, 0.}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.9516534891137733, 0.05286273142271951}, {0.8590607966005119,
       0.08999441143442334}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.9528059551439304, 0.1274736353114006}, {0.8579083305703548, 
      0.15824065040288512`}}]}, 
    {Arrowheads[{{0.04641059568474739, 1.}}], 
     ArrowBox[{{0.9530708768310013, 0.19974467986210545`}, {
      0.8576434088832839, 0.22882674870932312`}}]}, 
    {Arrowheads[{{0.04641059568474737, 1.}}], 
     ArrowBox[{{0.9531877114655036, 0.27156229651002156`}, {
      0.8575265742487818, 0.2998662749185499}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.953253421412605, 0.3432148783815909}, {0.8574608643016801, 
      0.37107083590412326`}}]}, 
    {Arrowheads[{{0.04641059568474734, 1.}}], 
     ArrowBox[{{0.9532955222314636, 0.41478905305773695`}, {
      0.8574187634828216, 0.4423538040851201}}]}, 
    {Arrowheads[{{0.04641059568474737, 1.}}], 
     ArrowBox[{{0.9533247949497682, 0.4863198521734019}, {0.8573894907645172, 
      0.5136801478265979}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.9533463255936739, 0.5578241444977321}, {0.8573679601206114, 
      0.5850329983594106}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.9533628260658278, 0.6293110559127848}, {0.8573514596484576, 
      0.6564032298015006}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{0.953375874386343, 0.7007859545040247}, {0.8573384113279423, 
      0.7277854740674035}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{0.953386451123937, 0.7722522041794719}, {0.8573278345903482, 
      0.7991763672490991}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{0.9533951976559377, 0.8437120201255786}, {0.8573190880583476, 
      0.8705736941601352}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{0.9534025511393576, 0.9151669205673273}, {0.8573117345749277, 
      0.9419759365755292}}]}, 
    {Arrowheads[{{0.04641059568474736, 1.}}], 
     ArrowBox[{{0.9534088197906755, 0.9866179808805945}, {0.8573054659236099, 
      1.0133820191194047`}}]}, 
    {Arrowheads[{{0.04641059568474744, 1.}}], 
     ArrowBox[{{0.9251197224162018, 0.}, {1.0248802775837977`, 0.}}]}, 
    {Arrowheads[{{0.046410595684747424`, 1.}}], 
     ArrowBox[{{1.0221430829950031`, 0.055132197059928306`}, {
      0.9278569170049965, 0.08772494579721454}}]}, 
    {Arrowheads[{{0.046410595684747404`, 1.}}], 
     ArrowBox[{{1.0223485284813587`, 0.1271676896325505}, {0.9276514715186407,
       0.15854659608173519`}}]}, 
    {Arrowheads[{{0.04641059568474734, 1.}}], 
     ArrowBox[{{1.0224120183996799`, 0.19878917908893165`}, {
      0.9275879816003196, 0.2297822494824969}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{1.022442893656093, 0.2703125347302786}, {0.9275571063439065, 
      0.30111603669829273`}}]}, 
    {Arrowheads[{{0.04641059568474731, 1.}}], 
     ArrowBox[{{1.022461148406146, 0.34179745119167815`}, {0.9275388515938534,
       0.37248826309403604`}}]}, 
    {Arrowheads[{{0.046410595684747376`, 1.}}], 
     ArrowBox[{{1.022473207347744, 0.41326336938827873`}, {0.9275267926522556,
       0.44387948775457825`}}]}, 
    {Arrowheads[{{0.04641059568474745, 1.}}], 
     ArrowBox[{{1.0224817671133046`, 0.48471851173364894`}, {
      0.9275182328866949, 0.5152814882663508}}]}, 
    {Arrowheads[{{0.04641059568474738, 1.}}], 
     ArrowBox[{{1.0224881577435558`, 0.5561669540188775}, {0.9275118422564437,
       0.5866901888382651}}]}, 
    {Arrowheads[{{0.04641059568474734, 1.}}], 
     ArrowBox[{{1.022493111024409, 0.6276109467066316}, {0.9275068889755904, 
      0.6581033390076537}}]}, 
    {Arrowheads[{{0.046410595684747334`, 1.}}], 
     ArrowBox[{{1.0224970628510617`, 0.6990518338752932}, {0.9275029371489378,
       0.7295195946961348}}]}, 
    {Arrowheads[{{0.046410595684747466`, 1.}}], 
     ArrowBox[{{1.0225002890475456`, 0.7704904677885372}, {0.9274997109524539,
       0.8009381036400338}}]}, 
    {Arrowheads[{{0.04641059568474741, 1.}}], 
     ArrowBox[{{1.0225029726650225`, 0.8419274149927638}, {0.9274970273349769,
       0.87235829929295}}]}, 
    {Arrowheads[{{0.04641059568474744, 1.}}], 
     ArrowBox[{{1.022505239961011, 0.9133630667897149}, {0.9274947600389886, 
      0.9437797903531416}}]}, 
    {Arrowheads[{{0.0464105956847474, 1.}}], 
     ArrowBox[{{1.022507180839814, 0.9847977021312591}, {0.9274928191601854, 
      1.0152022978687403`}}]}}},
  AspectRatio->1,
  Frame->True,
  FrameLabel->{{
     FormBox[
     "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
      TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}, {
     FormBox[
      RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}},
  Method->{"TransparentPolygonMesh" -> True},
  PlotRange->{{-0.049880277583797934`, 
   1.024880277583798}, {-0.049880277583797934`, 1.0498802775837979`}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.569019722116852*^9, 3.5690199076474633`*^9, {3.5690199564962573`*^9, 
   3.569020004025976*^9}, {3.569020054329853*^9, 3.5690200801623306`*^9}, {
   3.5690302385333567`*^9, 3.5690302736143627`*^9}, {3.569030464920305*^9, 
   3.569030498335216*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "0.04"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Mu]", "=", "0.043"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Gamma]", "=", "0.1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Nu]", "=", "0.01"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Lambda]1", "=", 
   RowBox[{"-", "\[Mu]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Lambda]2", "=", 
    RowBox[{"-", 
     RowBox[{"(", 
      RowBox[{"\[Beta]", "-", "\[Mu]", "-", "\[Gamma]"}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"r0", "=", 
  RowBox[{"\[Beta]", "/", 
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   SubscriptBox["c", "1"], "=", 
   FractionBox[
    RowBox[{"(", 
     RowBox[{"\[Nu]", "+", "\[Mu]"}], ")"}], 
    RowBox[{"(", 
     RowBox[{"\[Gamma]", "+", "\[Nu]", "+", "\[Mu]"}], ")"}]]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    SubscriptBox["c", "2"], "=", 
    FractionBox["\[Gamma]", 
     RowBox[{"(", 
      RowBox[{"\[Gamma]", "+", "\[Nu]", "+", "\[Mu]"}], ")"}]]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"e1", "=", 
   RowBox[{"{", 
    RowBox[{"1", ",", "0"}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"e2", "=", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["1", "r0"], ",", " ", 
     RowBox[{
      FractionBox["1", "r0"], " ", 
      SubscriptBox["c", "1"], " ", 
      RowBox[{"(", 
       RowBox[{"r0", "-", "1"}], ")"}]}], ",", " ", 
     RowBox[{
      FractionBox["1", "r0"], " ", 
      SubscriptBox["c", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"r0", "-", "1"}], ")"}]}]}], "}"}]}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Zeta]", "=", 
     RowBox[{
      RowBox[{"4", " ", "\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"], 
       "\[IndentingNewLine]", "diff"}], "=", 
      RowBox[{
       RowBox[{"\[Beta]", "-", 
        RowBox[{"\[Gamma]", "\[IndentingNewLine]", "\[Delta]"}]}], "=", 
       RowBox[{
        RowBox[{
         RowBox[{"N", "[", 
          RowBox[{
           RowBox[{
            SuperscriptBox["\[Nu]", "2"], " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "2"]}], "-", 
           RowBox[{"4", " ", "\[Nu]", " ", 
            RowBox[{"(", 
             RowBox[{"\[Beta]", "-", "\[Gamma]"}], ")"}], 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Nu]"}], ")"}], "2"]}]}], "]"}], 
         "\[IndentingNewLine]", "\[Lambda]1"}], "=", 
        RowBox[{
         RowBox[{
          RowBox[{"-", "\[Nu]"}], 
          RowBox[{"(", 
           RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "\[IndentingNewLine]", 
          "n"}], "=", "1"}]}]}]}]}], ";"}], "\[IndentingNewLine]", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]", "=", "0.115"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"VectorPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"-", "\[Beta]"}], " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Mu]", " ", "s"}], "+", "\[Mu]", "+", 
      RowBox[{"\[Nu]", " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "s", "-", "i"}], ")"}]}]}], ",", " ", 
     RowBox[{
      RowBox[{"\[Beta]", " ", "s", " ", 
       FractionBox["i", "1"]}], "-", 
      RowBox[{"\[Gamma]", " ", "i"}], "-", 
      RowBox[{"\[Mu]", " ", "i"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"s", ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "-", "0.575"}], ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "1", "]"}], "]"}], "+", 
      RowBox[{"(", 
       RowBox[{"4", "-", "3.575"}], ")"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "-", "\[Delta]"}], ",", 
     RowBox[{
      RowBox[{"e2", "[", 
       RowBox[{"[", "2", "]"}], "]"}], "+", "0.89"}]}], "}"}], ",", 
   RowBox[{"VectorScale", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Automatic", ",", "Automatic", ",", "None"}], "}"}]}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
       "\"\<Infected (\!\(\*\n\
StyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\))\>\"", ",", "\"\<\>\""}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"\"\<Susceptible \>\"", "[", "S", "]"}], ",", "\"\<\>\""}], 
       "}"}]}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.565658124509137*^9, 3.565658245748071*^9}, {
   3.5656582796350093`*^9, 3.5656583781846457`*^9}, {3.5656584203400574`*^9, 
   3.5656584398001704`*^9}, {3.565658509662166*^9, 3.5656585999593306`*^9}, {
   3.5656586525263376`*^9, 3.5656586645560255`*^9}, {3.565658698216951*^9, 
   3.565658729194723*^9}, {3.565659251972624*^9, 3.5656593843011928`*^9}, {
   3.565659433853027*^9, 3.565659454761223*^9}, {3.5657188028221235`*^9, 
   3.5657188034091573`*^9}, {3.565718950375563*^9, 3.56571895136162*^9}, {
   3.565719026149897*^9, 3.56571907183751*^9}, 3.5657191162680516`*^9, {
   3.5657192007608843`*^9, 3.565719201699938*^9}, {3.565719407568713*^9, 
   3.5657194129880233`*^9}, {3.565719483283044*^9, 3.5657194884823413`*^9}, {
   3.5657195457726183`*^9, 3.5657196382689085`*^9}, {3.5657196686636467`*^9, 
   3.565719721795686*^9}, {3.565719872141285*^9, 3.5657199409272194`*^9}, {
   3.5657200764059687`*^9, 3.565720126157814*^9}, {3.565721225169674*^9, 
   3.5657212254276886`*^9}, 3.5657213654927*^9, {3.565721513162146*^9, 
   3.565721650479*^9}, {3.5659862997684703`*^9, 3.565986346904166*^9}, {
   3.565986387213472*^9, 3.5659864763165684`*^9}, {3.565986530978695*^9, 
   3.565986644117166*^9}, {3.5659866843334665`*^9, 3.56598668789367*^9}, {
   3.565986722767665*^9, 3.5659869171817846`*^9}, {3.5659872619605045`*^9, 
   3.565987319312785*^9}, {3.5690196001678762`*^9, 3.569019614332687*^9}, {
   3.569019647240569*^9, 3.569019720411754*^9}, {3.5690199001110325`*^9, 
   3.569019906246383*^9}, {3.569019952615035*^9, 3.569020003258932*^9}, {
   3.5690200519207153`*^9, 3.569020079657302*^9}, {3.569020459062002*^9, 
   3.5690204890467176`*^9}, {3.5690205425347767`*^9, 
   3.5690205723054795`*^9}, {3.5690206068484554`*^9, 
   3.5690206155549536`*^9}, {3.5690206517810254`*^9, 
   3.5690207154836693`*^9}, {3.5690294073498154`*^9, 3.569029429272069*^9}, {
   3.5690294642920723`*^9, 3.5690294649381094`*^9}, {3.569029501131179*^9, 
   3.569029568711045*^9}, 3.569029862124827*^9, {3.5690306774654617`*^9, 
   3.5690306976246147`*^9}}],

Cell[BoxData["0.2797202797202797`"], "Output",
 CellChangeTimes->{
  3.569020492795932*^9, {3.5690205435408344`*^9, 3.569020573409543*^9}, {
   3.5690206074794917`*^9, 3.569020615980978*^9}, {3.5690206534591217`*^9, 
   3.56902065815639*^9}, {3.5690206882161093`*^9, 3.5690207157696857`*^9}, {
   3.5690294086938925`*^9, 3.569029429936107*^9}, 3.5690294655361433`*^9, {
   3.569029502344249*^9, 3.569029569126068*^9}, 3.5690298628378677`*^9, 
   3.5690306395112906`*^9, {3.569030678259507*^9, 3.569030698280652*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"3.5750000000000006`", ",", 
   RowBox[{"-", "0.8919934640522879`"}], ",", 
   RowBox[{"-", "1.6830065359477129`"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.569020492795932*^9, {3.5690205435408344`*^9, 3.569020573409543*^9}, {
   3.5690206074794917`*^9, 3.569020615980978*^9}, {3.5690206534591217`*^9, 
   3.56902065815639*^9}, {3.5690206882161093`*^9, 3.5690207157696857`*^9}, {
   3.5690294086938925`*^9, 3.569029429936107*^9}, 3.5690294655361433`*^9, {
   3.569029502344249*^9, 3.569029569126068*^9}, 3.5690298628378677`*^9, 
   3.5690306395112906`*^9, {3.569030678259507*^9, 3.5690306982836523`*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, 
   {Hue[0.67, 0.6, 0.6], 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{2.9629186581277063`, -1.041472174627209}, {
      3.037081341872296, -0.9725147534773667}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{2.9703014285326903`, -0.9762175321454187}, {
      3.029698571467311, -0.8941979673877285}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{2.9848106908303413`, -0.9117241294821309}, {
      3.01518930916966, -0.8151199414795876}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.008464667561782, -0.8415578275929663}, {
      2.99153533243822, -0.7417148147973236}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.030383560691421, -0.760355503374796}, {
      2.9696164393085804`, -0.6793457104440652}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.0417681987959595`, -0.6766869988931795}, {
      2.958231801204042, -0.6194427863542529}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.0465764016294727`, -0.5961398482463739}, {
      2.953423598370529, -0.55641850842963}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.048668014006762, -0.5184660017815933}, {
      2.9513319859932396`, -0.49052092632298183`}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.049650260239002, -0.4426404762884621}, {
      2.9503497397609997`, -0.4227750232446845}}]}, 
    {Arrowheads[{{0.04597795341063359, 1.}}], 
     ArrowBox[{{3.0501415163896244`, -0.3679672985780262}, {
      2.9498584836103774`, -0.3538767723836918}}]}, 
    {Arrowheads[{{0.04597795341063346, 1.}}], 
     ArrowBox[{{3.0503965113964546`, -0.2940352023966316}, {
      2.949603488603547, -0.2842374399936578}}]}, 
    {Arrowheads[{{0.045977953410633446`, 1.}}], 
     ArrowBox[{{3.0505297001410447`, -0.22059973011660297`}, {
      2.9494702998589575`, -0.21410148370225787`}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.0505966686934043`, -0.147510275642341}, {
      2.9494033313065975`, -0.1436195096050913}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.050626212175958, -0.07467026681518864}, {
      2.9493737878240442`, -0.07288808986081505}}]}, 
    {Arrowheads[{{0.04597795341063345, 1.}}], 
     ArrowBox[{{3.050634048978245, -0.0020154191869942504`}, {
      2.9493659510217567`, -0.001971508917580821}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.0327558165415054`, -1.0396771821303166`}, {
      3.1101013263156383`, -0.9743097459742593}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.040592977973605, -0.9753695920330729}, {
      3.102264164883539, -0.8950459075000743}}]}, 
    {Arrowheads[{{0.045977953410633585`, 1.}}], 
     ArrowBox[{{3.057629753423479, -0.9121395889869777}, {
      3.085227389433665, -0.8147044819747409}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.085494493745552, -0.8402774275490495}, {
      3.057362649111592, -0.7429952148412402}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.1067903895492797`, -0.7560907671899422}, {
      3.036066753307864, -0.683610446628919}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.1157737596980146`, -0.6725048532478023}, {
      3.0270833831591295`, -0.6236249319996302}}]}, 
    {Arrowheads[{{0.04597795341063365, 1.}}], 
     ArrowBox[{{3.1192289604689165`, -0.59298038205363}, {
      3.0236281823882276`, -0.5595779746223737}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.1206906340776337`, -0.516200580756204}, {
      3.0221665087795104`, -0.4927863473483712}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.1213737350693402`, -0.4410316927538894}, {
      3.0214834077878043`, -0.42438380677925713`}}]}, 
    {Arrowheads[{{0.04597795341063348, 1.}}], 
     ArrowBox[{{3.1217162524117064`, -0.36683444102325125`}, {
      3.021140890445438, -0.35500962993846674`}}]}, 
    {Arrowheads[{{0.04597795341063354, 1.}}], 
     ArrowBox[{{3.121894882529815, -0.2932544326302237}, {
      3.020962260327329, -0.2850182097600657}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.1219886596948574`, -0.220086456405407}, {
      3.020868483162287, -0.21461475741345382`}}]}, 
    {Arrowheads[{{0.045977953410633585`, 1.}}], 
     ArrowBox[{{3.122036039740536, -0.14720548672731176`}, {
      3.020821103116608, -0.1439242985201205}}]}, 
    {Arrowheads[{{0.045977953410633474`, 1.}}], 
     ArrowBox[{{3.1220570328368873`, -0.07453170301263526}, {
      3.0208001100202573`, -0.07302665366336843}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.1220626217636105`, -0.00201202821095555}, {
      3.0207945210935336`, -0.0019748998936195213`}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.1024236638413165`, -1.0374720003136622`}, {
      3.1832906218729695`, -0.9765149277909138}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.1106159703839555`, -0.9742502163320118}, {
      3.1750983153303305`, -0.8961652832011354}}]}, 
    {Arrowheads[{{0.04597795341063357, 1.}}], 
     ArrowBox[{{3.130961627124852, -0.9126389441954668}, {
      3.154752658589434, -0.8142051267662518}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.163571730914373, -0.8378392782388068}, {
      3.1221425547999138`, -0.7454333641514831}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.182710595835497, -0.7510837573054653}, {
      3.1030036898787894`, -0.6886174565133959}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.189250145630302, -0.6683502738537759}, {
      3.096464140083984, -0.6277795113936566}}]}, 
    {Arrowheads[{{0.04597795341063362, 1.}}], 
     ArrowBox[{{3.191594381327826, -0.5900083073785124}, {
      3.0941199043864605`, -0.5625500492974914}}]}, 
    {Arrowheads[{{0.04597795341063346, 1.}}], 
     ArrowBox[{{3.1925705612985626`, -0.5141050937178289}, {
      3.093143724415724, -0.49488183438674627`}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.1930268231455967`, -0.43954957537919775`}, {
      3.09268746256869, -0.42586592415394875`}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.193256628507217, -0.36579022242953224`}, {
      3.09245765720707, -0.3560538485321858}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.193377125046126, -0.2925332017617902}, {
      3.0923371606681602`, -0.2857394406284992}}]}, 
    {Arrowheads[{{0.04597795341063361, 1.}}], 
     ArrowBox[{{3.1934407144990047`, -0.21961106657769214`}, {
      3.0922735712152813`, -0.2150901472411687}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.1934729949430234`, -0.1469224328918124}, {
      3.0922412907712635`, -0.14420735235561985`}}]}, 
    {Arrowheads[{{0.04597795341063357, 1.}}], 
     ArrowBox[{{3.193487357457003, -0.07440269059237069}, {
      3.0922269282572836`, -0.073155666083633}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.1934911942535726`, -0.002008863498634098}, {
      3.0922230914607143`, -0.0019780646059409735`}}]}, 
    {Arrowheads[{{0.045977953410633585`, 1.}}], 
     ArrowBox[{{3.171928391842571, -1.0347362943586351`}, {
      3.2566430367288577`, -0.9792506337459407}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.1802728926083446`, -0.9727168867801417}, {
      3.2482985359630843`, -0.8976986127530054}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.2051374825537158`, -0.9132228111187631}, {
      3.223433946017713, -0.8136212598429555}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.2424849459775373`, -0.8336911750166729}, {
      3.186086482593892, -0.749581467373617}}]}, 
    {Arrowheads[{{0.045977953410633474`, 1.}}], 
     ArrowBox[{{3.257896752691706, -0.7455777273684}, {
      3.1706746758797233`, -0.6941234864504612}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.2622340161945518`, -0.6643365779088412}, {
      3.1663374123768766`, -0.6317932073385913}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.2637192479121264`, -0.5872397052945671}, {
      3.164852180659303, -0.5653186513814367}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.2643342551994348`, -0.512171416277122}, {
      3.164237173371994, -0.49681551182745304`}}]}, 
    {Arrowheads[{{0.04597795341063345, 1.}}], 
     ArrowBox[{{3.2646228415149134`, -0.4381832424631808}, {
      3.1639485870565154`, -0.42723225706996576`}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.264769055158698, -0.36482584032502635`}, {
      3.163802373412731, -0.35701823063669164`}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.2648461713967833`, -0.29186534568732814`}, {
      3.1637252571746455`, -0.2864072967029612}}]}, 
    {Arrowheads[{{0.04597795341063343, 1.}}], 
     ArrowBox[{{3.2648870834029937`, -0.2191696290137554}, {
      3.163684345168435, -0.21553158480510543`}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.2649079481434637`, -0.14665889317696731`}, {
      3.163663480427965, -0.14447089207046498`}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.264917268573006, -0.07428227714761168}, {
      3.163654159998423, -0.07327607952839199}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.2649197664959453`, -0.002005903134955088}, {
      3.163651662075483, -0.0019810249696199833`}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.24130499313398, -1.0313167477630867`}, {
      3.330123578294591, -0.9826701803414893}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.249423630941815, -0.970517745152364}, {
      3.322004940486756, -0.8998977543807832}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.2808229368685082`, -0.9138192785049385}, {
      3.2906056345600625`, -0.8130247924567802}}]}, 
    {Arrowheads[{{0.04597795341063346, 1.}}], 
     ArrowBox[{{3.3215618586888245`, -0.8273960598658106}, {
      3.249866712739747, -0.7558765825244793}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.3322167165285292`, -0.7398838624193487}, {
      3.239211854900042, -0.6998173513995125}}]}, 
    {Arrowheads[{{0.04597795341063347, 1.}}], 
     ArrowBox[{{3.334786384015142, -0.6605443383770437}, {
      3.236642187413429, -0.6355854468703888}}]}, 
    {Arrowheads[{{0.045977953410633474`, 1.}}], 
     ArrowBox[{{3.3356467646387093`, -0.5846788775243521}, {
      3.2357818067898623`, -0.5678794791516516}}]}, 
    {Arrowheads[{{0.045977953410633474`, 1.}}], 
     ArrowBox[{{3.336003901585806, -0.5103893892090492}, {
      3.2354246698427658`, -0.49859753889552594`}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.3361726296841505`, -0.43692235790707656`}, {
      3.235255941744421, -0.42849314162607}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.3362587110240205`, -0.363933425204527}, {
      3.2351698604045507`, -0.357910645757191}}]}, 
    {Arrowheads[{{0.04597795341063357, 1.}}], 
     ArrowBox[{{3.3363043925377722`, -0.2912454654641255}, {
      3.2351241788907985`, -0.287027176926164}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.336328756053473, -0.21875872275789238`}, {
      3.235099815375098, -0.21594249106096847`}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.336341237232421, -0.14641293621903978`}, {
      3.2350873341961504`, -0.14471684902839246`}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.3363468339759508`, -0.07416963254702731}, {
      3.235081737452621, -0.07338872412897636}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.3363483385302346`, -0.002003127946476619}, {
      3.235080232898336, -0.0019838001580984527`}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.310641642881068, -1.0270295432630114`}, {
      3.4036440714046456`, -0.9869573848415645}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.3178791097245974`, -0.9671790734275406}, {
      3.396406604561116, -0.9032364261056065}}]}, 
    {Arrowheads[{{0.04597795341063354, 1.}}], 
     ArrowBox[{{3.3594896702146118`, -0.9140016743325299}, {
      3.3547960440711013`, -0.8128423966291888}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.3997068495419582`, -0.8190610171644426}, {
      3.3145788647437553`, -0.7642116252258473}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.405670768551298, -0.7343022231613822}, {
      3.3086149457344156`, -0.705398990657479}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.406978410751985, -0.6570217332737937}, {
      3.307307303533728, -0.6391080519736388}}]}, 
    {Arrowheads[{{0.04597795341063363, 1.}}], 
     ArrowBox[{{3.407415054618537, -0.5823218233652554}, {
      3.3068706596671764`, -0.5702365333107484}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.407597858246535, -0.5087479042724575}, {
      3.3066878560391784`, -0.5002390238321175}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.407684994919194, -0.43575729185628576`}, {
      3.3066007193665192`, -0.42965820767686075`}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.407729790858469, -0.36310596203901085`}, {
      3.306555923427244, -0.3587381089227072}}]}, 
    {Arrowheads[{{0.04597795341063362, 1.}}], 
     ArrowBox[{{3.4077537140544965`, -0.290668822623765}, {
      3.306532000231217, -0.28760381976652444`}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.4077665401344657`, -0.21837535972072472`}, {
      3.3065191741512474`, -0.21632585409813615`}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.4077731395411828`, -0.14618287500610244`}, {
      3.3065125747445308`, -0.1449469102413298}}]}, 
    {Arrowheads[{{0.04597795341063375, 1.}}], 
     ArrowBox[{{3.4077761096308334`, -0.07406402996255233}, {
      3.30650960465488, -0.07349432671345134}}]}, 
    {Arrowheads[{{0.045977953410633446`, 1.}}], 
     ArrowBox[{{3.407776910389239, -0.0020005210856607015`}, {
      3.3065088038964747`, -0.00198640701891437}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.38011468869843, -1.0216819547453382`}, {
      3.4770281684444253`, -0.9923049733592377}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.385456931083453, -0.9617585972920025}, {
      3.4716859260594033`, -0.9086569022411447}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.444430673521634, -0.9115083302806101}, {
      3.4127121836212218`, -0.8153357406811085}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.4759173354805184`, -0.8095854854351572}, {
      3.381225521662338, -0.7736871569551326}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.4783608329795097`, -0.7290605258367423}, {
      3.3787820241633457`, -0.710640687982119}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.478880787045842, -0.6537899120867453}, {
      3.3782620700970134`, -0.6423398731606872}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.479056605116602, -0.5801591715289476}, {
      3.378086252026254, -0.5723991851470562}}]}, 
    {Arrowheads[{{0.04597795341063346, 1.}}], 
     ArrowBox[{{3.4791311739526276`, -0.5072356429208981}, {
      3.3780116831902287`, -0.5017512851836771}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.4791670886716908`, -0.43467919009736544`}, {
      3.3779757684711655`, -0.4307363094357811}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.479185702120596, -0.3623372072192496}, {
      3.3779571550222594`, -0.3595068637424683}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.4791957065107333`, -0.29013124887248504`}, {
      3.3779471506321226`, -0.2881413935178044}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.479201097981436, -0.2180169201934522}, {
      3.37794175916142, -0.21668429362540864`}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.4792038838029864`, -0.1459672297751551}, {
      3.37793897333987, -0.14516255547227716`}}]}, 
    {Arrowheads[{{0.04597795341063376, 1.}}], 
     ArrowBox[{{3.4792051419578875`, -0.0739648303163552}, {
      3.3779377151849683`, -0.07359352635964848}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.47920548210031, -0.001998067688564694}, {
      3.3779373750425457`, -0.001988860416010377}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.4500244074398307`, -1.0151327236143866`}, {
      3.549975592560168, -0.9988542044901894}}]}, 
    {Arrowheads[{{0.04597795341063364, 1.}}], 
     ArrowBox[{{3.452367655461479, -0.9523823575269539}, {
      3.547632344538519, -0.9180331420061935}}]}, 
    {Arrowheads[{{0.045977953410633585`, 1.}}], 
     ArrowBox[{{3.5382522061798016`, -0.8965969675883567}, {
      3.4617477938201966`, -0.8302471033733618}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.549895752904281, -0.8002514961831548}, {
      3.4501042470957173`, -0.7830211462071349}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.550438846211706, -0.7242924748488192}, {
      3.449561153788292, -0.7154087389700419}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.5505573890945916`, -0.6508501764328067}, {
      3.449442610905407, -0.6452796088146258}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.550598420936977, -0.5781784404693485}, {
      3.449401579063021, -0.5743799162066554}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.550616104688823, -0.5058415531031976}, {
      3.449383895311175, -0.5031453750013775}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.550624718825934, -0.43367998520834955`}, {
      3.4493752811740648`, -0.431735514324797}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.550629220789454, -0.36162160692953393`}, {
      3.449370779210544, -0.3602224640321841}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.5506316560857685`, -0.2896290685660538}, {
      3.4493683439142293`, -0.28864357382423556`}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.5506329751526033`, -0.21768109920126935`}, {
      3.4493670248473953`, -0.2170201146175915}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.550633659516247, -0.14576469740808828`}, {
      3.449366340483751, -0.14536508783934396`}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.5506339696282017`, -0.07387146945039028}, {
      3.449366030371796, -0.0736868872256134}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.5506340536863537`, -0.0019957545912581078`}, {
      3.449365946313645, -0.001991173513316964}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.520796201255666, -1.007406366744439}, {
      3.6220609416014744`, -1.0065805613601368`}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.5208046797064814`, -0.936222138680836}, {
      3.6220524631506597`, -0.9341933608523111}}]}, 
    {Arrowheads[{{0.04597795341063347, 1.}}], 
     ArrowBox[{{3.6220418592691788`, -0.864872032695653}, {
      3.5208152835879623`, -0.8619720382660655}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.622061238118009, -0.7920111036325641}, {
      3.5207959047391317`, -0.7912615387577256}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.6220622366665784`, -0.7200489564103213}, {
      3.520794906190562, -0.7196522574085399}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.622062468564854, -0.6481908241583249}, {
      3.5207946742922864`, -0.6479389610891076}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.622062551302253, -0.5763656659711884}, {
      3.5207945915548877`, -0.5761926907048153}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.6220625876072243`, -0.5045551372150332}, {
      3.5207945552499167`, -0.5044317908895419}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.6220626055044467`, -0.43275237220673657`}, {
      3.520794537352694, -0.43266312732641}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.622062614937854, -0.3609542202467324}, {
      3.520794527919287, -0.3608898507149855}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.6220626200733683`, -0.2891590323251311}, {
      3.5207945227837727`, -0.2891136100651583}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.6220626228687856`, -0.21736586170589825`}, {
      3.520794519988355, -0.21733535211296257`}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.622062624324848, -0.14557412604861333`}, {
      3.5207945185322926`, -0.14555565919881897`}}]}, 
    {Arrowheads[{{0.04597795341063364, 1.}}], 
     ArrowBox[{{3.62206262498676, -0.07378344747926319}, {
      3.5207945178703803`, -0.07377490919674048}}]}, 
    {Arrowheads[{{0.04597795341063362, 1.}}], 
     ArrowBox[{{3.622062625166622, -0.00199357009353767}, {
      3.520794517690518, -0.0019933580110374012`}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.5928854615307935`, -0.9988302255174241}, {
      3.69282882418349, -1.0151567025871517`}}]}, 
    {Arrowheads[{{0.045977953410633446`, 1.}}], 
     ArrowBox[{{3.596805355735891, -0.9141592272317679}, {
      3.6889089299783917`, -0.9562562723013792}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.689595906993329, -0.8439465297112773}, {
      3.5961183787209543`, -0.8828975412504414}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.6930821731683134`, -0.7852134146723116}, {
      3.59263211254597, -0.7980592277179782}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.6933681935674807`, -0.7163234048884599}, {
      3.5923460921468027`, -0.7233778089304013}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.6934401868919955`, -0.6457926571325744}, {
      3.5922740988222874`, -0.6503371281148582}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.693466767421324, -0.5747065056347123}, {
      3.592247518292959, -0.5778518510412917}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.6934786560249044`, -0.5033666088862604}, {
      3.592235629689379, -0.5056203192183146}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.693484588943558, -0.43188976399276285`}, {
      3.592229696770725, -0.4335257355403837}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.693487742888005, -0.3603306485737349}, {
      3.5922265428262783`, -0.36151342238798306`}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.693489470702203, -0.28871826025531894`}, {
      3.5922248150120804`, -0.28955438213497053`}}]}, 
    {Arrowheads[{{0.04597795341063352, 1.}}], 
     ArrowBox[{{3.6934904157463806`, -0.21706940505480615`}, {
      3.5922238699679028`, -0.21763180876405466`}}]}, 
    {Arrowheads[{{0.04597795341063335, 1.}}], 
     ArrowBox[{{3.693490909873307, -0.14539449393880566`}, {
      3.592223375840976, -0.1457352913086266}}]}, 
    {Arrowheads[{{0.04597795341063348, 1.}}], 
     ArrowBox[{{3.6934911351874606`, -0.07370031990564346}, {
      3.5922231505268223`, -0.07385803677036022}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.6934911965573582`, -0.001991503760986006}, {
      3.5922230891569247`, -0.0019954243435890656`}}]}, 
    {Arrowheads[{{0.045977953410633446`, 1.}}], 
     ArrowBox[{{3.666562682601711, -0.9900724816680713}, {
      3.762008745969714, -1.0239144464365046`}}]}, 
    {Arrowheads[{{0.045977953410633585`, 1.}}], 
     ArrowBox[{{3.6814445413571404`, -0.8966686169450533}, {
      3.7471268872142853`, -0.9737468825880939}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.7559061191751586`, -0.8345854390312472}, {
      3.672665309396267, -0.8922586319304713}}]}, 
    {Arrowheads[{{0.04597795341063346, 1.}}], 
     ArrowBox[{{3.763514149501053, -0.7797885971855218}, {
      3.665057279070372, -0.8034840452047679}}]}, 
    {Arrowheads[{{0.045977953410633494`, 1.}}], 
     ArrowBox[{{3.7644646165270257`, -0.713076747757077}, {
      3.6641068120443996`, -0.7266244660617842}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.764725433294309, -0.6436329467426174}, {
      3.6638459952771156`, -0.6524968385048152}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.764825258092028, -0.5731869445485369}, {
      3.663746170479397, -0.5793714121274669}}]}, 
    {Arrowheads[{{0.04597795341063347, 1.}}], 
     ArrowBox[{{3.764870791982437, -0.5022669617784189}, {
      3.6637006365889886`, -0.5067199663261563}}]}, 
    {Arrowheads[{{0.04597795341063364, 1.}}], 
     ArrowBox[{{3.7648937975641315`, -0.431086236632554}, {
      3.6636776310072934`, -0.43432926290059254`}}]}, 
    {Arrowheads[{{0.0459779534106335, 1.}}], 
     ArrowBox[{{3.764906131349894, -0.35974697199001227`}, {
      3.6636652972215313`, -0.36209709897170567`}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.764912929904103, -0.2883041933875297}, {
      3.6636584986673224`, -0.28996844900275964`}}]}, 
    {Arrowheads[{{0.04597795341063361, 1.}}], 
     ArrowBox[{{3.764916665893021, -0.2167901273847766}, {
      3.6636547626784037`, -0.21791108643408424`}}]}, 
    {Arrowheads[{{0.04597795341063345, 1.}}], 
     ArrowBox[{{3.7649186264804624`, -0.145224891685578}, {
      3.663652802090963, -0.14590489356185427`}}]}, 
    {Arrowheads[{{0.04597795341063362, 1.}}], 
     ArrowBox[{{3.764919523103886, -0.07362169016749938}, {
      3.663651905467539, -0.07393666650850428}}]}, 
    {Arrowheads[{{0.045977953410633446`, 1.}}], 
     ArrowBox[{{3.7649197678723065`, -0.0019895462583057674`}, {
      3.6636516606991187`, -0.001997381846269304}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.7417070136115544`, -0.9819501535675395}, {
      3.829721557817013, -1.0320367745370365`}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.7660278858179783`, -0.8885574222534476}, {
      3.8054006856105893`, -0.9818580772796996}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.8237100585853594`, -0.8299537125188582}, {
      3.747718512843208, -0.8968903584428604}}]}, 
    {Arrowheads[{{0.04597795341063365, 1.}}], 
     ArrowBox[{{3.833709446968743, -0.7755033768229097}, {
      3.7377191244598245`, -0.8077692655673803}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.8354309469079557`, -0.710255764664099}, {
      3.7359976245206115`, -0.7294454491547623}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.8359451853009183`, -0.6416880497781848}, {
      3.735483386127649, -0.6544417354692476}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.8361492736358747`, -0.5717937138906826}, {
      3.735279297792693, -0.5807646427853214}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.836244219822119, -0.5012479814969463}, {
      3.7351843516064487`, -0.5077389466076289}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.836292783462861, -0.4303364709014143}, {
      3.7351357879657066`, -0.4350790286317322}}]}, 
    {Arrowheads[{{0.04597795341063361, 1.}}], 
     ArrowBox[{{3.8363190377896825`, -0.35919969249915673`}, {
      3.735109533638885, -0.36264437846256126`}}]}, 
    {Arrowheads[{{0.045977953410633446`, 1.}}], 
     ArrowBox[{{3.8363335970321133`, -0.2879145521220977}, {
      3.7350949743964548`, -0.2903580902681917}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.836341634174515, -0.21652660093523166`}, {
      3.735086937254053, -0.21817461288362916`}}]}, 
    {Arrowheads[{{0.04597795341063334, 1.}}], 
     ArrowBox[{{3.836345866891623, -0.14506450733049983`}, {
      3.7350827045369446`, -0.14606527791693244`}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.8363478080642706`, -0.0735472033553927}, {
      3.7350807633642966`, -0.07401115332061095}}]}, 
    {Arrowheads[{{0.04597795341063345, 1.}}], 
     ArrowBox[{{3.8363483391231346`, -0.001987689208311906}, {
      3.735080232305433, -0.001999238896263165}}]}, 
    {Arrowheads[{{0.04597795341063353, 1.}}], 
     ArrowBox[{{3.817824059725415, -0.9750898660168702}, {
      3.896461654560295, -1.0388970620877056`}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.8467535086412425`, -0.8856510263511658}, {
      3.867532205644467, -0.9847644731819815}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.892642035419244, -0.8273164162553104}, {
      3.8216436788664656`, -0.8995276547064082}}]}, 
    {Arrowheads[{{0.04597795341063351, 1.}}], 
     ArrowBox[{{3.9038599668713396`, -0.7721089287277441}, {
      3.8104257474143703`, -0.8111637136625458}}]}, 
    {Arrowheads[{{0.04597795341063374, 1.}}], 
     ArrowBox[{{3.906323097882483, -0.7078043909578781}, {
      3.807962616403227, -0.731896822860983}}]}, 
    {Arrowheads[{{0.0459779534106336, 1.}}], 
     ArrowBox[{{3.907119973690872, -0.6399349959758447}, {
      3.8071657405948374`, -0.6561947892715879}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.907447688138694, -0.5705145121343708}, {
      3.8068380261470165`, -0.582043844541633}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.9076031473830004`, -0.5003022223699878}, {
      3.806682566902709, -0.5086847057345874}}]}, 
    {Arrowheads[{{0.045977953410633536`, 1.}}], 
     ArrowBox[{{3.9076836314903973`, -0.4296356940525586}, {
      3.806602082795313, -0.435779805480588}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{3.9077275003579723`, -0.3586856838183417}, {
      3.806558213927737, -0.3631583871433763}}]}, 
    {Arrowheads[{{0.04597795341063358, 1.}}], 
     ArrowBox[{{3.9077519710610584`, -0.28754730062464523`}, {
      3.806533743224651, -0.2907253417656442}}]}, 
    {Arrowheads[{{0.04597795341063363, 1.}}], 
     ArrowBox[{{3.907765539268494, -0.21627754942462382`}, {
      3.8065201750172157`, -0.21842366439423702`}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.907772709307311, -0.14491261372286343`}, {
      3.806513004978399, -0.1462171715245688}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.907776006447782, -0.0734765408912907}, {
      3.806509707837928, -0.07408181578471297}}]}, 
    {Arrowheads[{{0.045977953410633585`, 1.}}], 
     ArrowBox[{{3.907776910319773, -0.0019859250720889758`}, {
      3.806508803965937, -0.0020010030324860957`}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.894296320362985, -0.9697238469995356}, {
      3.962846536779868, -1.0442630811050404`}}]}, 
    {Arrowheads[{{0.04597795341063356, 1.}}], 
     ArrowBox[{{3.924378621675141, -0.884747589557854}, {
      3.9327642354677117`, -0.9856679099752932}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.9622885748501493`, -0.8256468922676514}, {
      3.8948542822927026`, -0.9011971786940671}}]}, 
    {Arrowheads[{{0.04597795341063336, 1.}}], 
     ArrowBox[{{3.974059129040624, -0.7693949969543605}, {
      3.8830837281022283`, -0.8138776454359293}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.9771791360599336`, -0.7056696982406998}, {
      3.8799637210829188`, -0.7340315155781614}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.978265231749647, -0.6383523582663284}, {
      3.8788776253932054`, -0.6577774269811042}}]}, 
    {Arrowheads[{{0.04597795341063365, 1.}}], 
     ArrowBox[{{3.9787274728169417`, -0.569338096030389}, {
      3.87841538432591, -0.5832202606456148}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.9789509623761035`, -0.49942296392088437`}, {
      3.878191894766749, -0.5095639641836908}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.979068047045189, -0.4289796241417543}, {
      3.8780748100976634`, -0.4364358753913923}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{3.97913237798523, -0.3582021471864692}, {
      3.8780104791576226`, -0.3636419237752488}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.979168468449423, -0.28720061627351917`}, {
      3.8779743886934295`, -0.2910720261167702}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{3.9791885649762393`, -0.2160418288015283}, {
      3.877954292166613, -0.2186593850173325}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{3.9791992198406403`, -0.14476855779459133`}, {
      3.877943637302212, -0.14636122745284091`}}]}, 
    {Arrowheads[{{0.04597795341063348, 1.}}], 
     ArrowBox[{{3.979204132170719, -0.07340941600171914}, {
      3.8779387249721333`, -0.07414894067428453}}]}, 
    {Arrowheads[{{0.045977953410633605`, 1.}}], 
     ArrowBox[{{3.979205481470695, -0.001984247046697612}, {
      3.8779373756721567`, -0.0020026810578774594`}}]}, 
    {Arrowheads[{{0.04597795341063349, 1.}}], 
     ArrowBox[{{3.9706316322606687`, -0.9657465687232242}, {
      4.029368367739326, -1.0482403593813516`}}]}, 
    {Arrowheads[{{0.04597795341063354, 1.}}], 
     ArrowBox[{{4.000046761310925, -0.8845737176208025}, {
      3.9999532386890704`, -0.9858417819123447}}]}, 
    {Arrowheads[{{0.045977953410633564`, 1.}}], 
     ArrowBox[{{4.0323939121603996`, -0.8245062051170686}, {
      3.967606087839595, -0.9023378658446499}}]}, 
    {Arrowheads[{{0.04597795341063335, 1.}}], 
     ArrowBox[{{4.044346555725656, -0.7671988419219008}, {
      3.955653444274339, -0.8160738004683891}}]}, 
    {Arrowheads[{{0.04597795341063375, 1.}}], 
     ArrowBox[{{4.048024263300871, -0.7038045004543553}, {
      3.9519757366991244`, -0.735896713364506}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{4.049392442356463, -0.636920654829124}, {
      3.9506075576435316`, -0.6592091304183084}}]}, 
    {Arrowheads[{{0.045977953410633626`, 1.}}], 
     ArrowBox[{{4.049994085196641, -0.5682542893474967}, {
      3.9500059148033535`, -0.5843040673285071}}]}, 
    {Arrowheads[{{0.04597795341063333, 1.}}], 
     ArrowBox[{{4.05029039132047, -0.49860415689499726`}, {
      3.949709608679525, -0.5103827712095779}}]}, 
    {Arrowheads[{{0.04597795341063348, 1.}}], 
     ArrowBox[{{4.050447426778673, -0.4283644181686686}, {
      3.949552573221322, -0.43705108136447796`}}]}, 
    {Arrowheads[{{0.04597795341063355, 1.}}], 
     ArrowBox[{{4.050534382686031, -0.357746572601113}, {
      3.949465617313963, -0.364097498360605}}]}, 
    {Arrowheads[{{0.04597795341063332, 1.}}], 
     ArrowBox[{{4.05058343757338, -0.2868728633937096}, {
      3.949416562426615, -0.2913997789965798}}]}, 
    {Arrowheads[{{0.045977953410633515`, 1.}}], 
     ArrowBox[{{4.050610866156079, -0.21581841080894135`}, {
      3.9493891338439155`, -0.2188828030099195}}]}, 
    {Arrowheads[{{0.045977953410633654`, 1.}}], 
     ArrowBox[{{4.050625454520823, -0.14463175141305207`}, {
      3.949374545479172, -0.14649803383438018`}}]}, 
    {Arrowheads[{{0.04597795341063379, 1.}}], 
     ArrowBox[{{4.050632197084844, -0.07334556985045039}, {
      3.949367802915151, -0.07421278682555327}}]}, 
    {Arrowheads[{{0.04597795341063381, 1.}}], 
     ArrowBox[{{4.050634052583149, -0.0019826489775035022`}, {
      3.9493659474168457`, -0.0020042791270715693`}}]}}},
  AspectRatio->1,
  Frame->True,
  FrameLabel->{{
     FormBox[
     "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
      TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}, {
     FormBox[
      RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}},
  Method->{"TransparentPolygonMesh" -> True},
  PlotRange->{{2.949365946261838, 4.050634053738163}, {-1.057627517790451, 
   0.0486405896858752}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.569020492795932*^9, {3.5690205435408344`*^9, 3.569020573409543*^9}, {
   3.5690206074794917`*^9, 3.569020615980978*^9}, {3.5690206534591217`*^9, 
   3.56902065815639*^9}, {3.5690206882161093`*^9, 3.5690207157696857`*^9}, {
   3.5690294086938925`*^9, 3.569029429936107*^9}, 3.5690294655361433`*^9, {
   3.569029502344249*^9, 3.569029569126068*^9}, 3.5690298628378677`*^9, 
   3.5690306395112906`*^9, {3.569030678259507*^9, 3.569030698358657*^9}}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  GraphicsBox[{{}, 
    {Hue[0.67, 0.6, 0.6], 
     {Arrowheads[{{0.046713595647695165`, 1.}}], 
      ArrowBox[{{2.960028766194492, -1.0745111901241042`}, {
       3.0399712338055096`, -1.0094757379804715`}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{2.9657497145505833`, -1.0062047624747013`}, {
       3.0342502854494184`, -0.9292107370584459}}]}, 
     {Arrowheads[{{0.04671359564769515, 1.}}], 
      ArrowBox[{{2.977189338008054, -0.9396256688910738}, {
       3.0228106619919473`, -0.8472184020706448}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{2.9986665300193, -0.8706467463402251}, {
       3.0013334699807017`, -0.767625896050065}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.024315572280731, -0.7902802776706956}, {
       2.9756844277192713`, -0.6994209361481658}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.039860046079678, -0.7032188168494866}, {
       2.9601399539203235`, -0.6379109683979463}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.0464264999001216`, -0.6186327495927354}, {
       2.9535735000998806`, -0.5739256070832689}}]}, 
     {Arrowheads[{{0.046713595647695214`, 1.}}], 
      ArrowBox[{{3.0491501780954713`, -0.5374647934715677}, {
       2.9508498219045305`, -0.506522134633008}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.050372018806759, -0.45855955893131367`}, {
       2.949627981193243, -0.43685594060183347`}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.0509614385018846`, -0.3810400290904027}, {
       2.949038561498117, -0.3658040418713158}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.0512590279920726`, -0.3043912322433289}, {
       2.948740972007929, -0.293881410146961}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.0514111616488617`, -0.2283139143937587}, {
       2.9485888383511396`, -0.22138729942510274`}}]}, 
     {Arrowheads[{{0.04671359564769517, 1.}}], 
      ArrowBox[{{3.051486368331551, -0.1526278799829215}, {
       2.94851363166845, -0.14850190526451132`}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.0515190947081825`, -0.07721988087639776}, {
       2.9484809052918193`, -0.0753384757996065}}]}, 
     {Arrowheads[{{0.04671359564769519, 1.}}], 
      ArrowBox[{{3.051527677432851, -0.0020158066680175967`}, {
       2.9484723225671505`, -0.001971121436558086}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.029861392588941, -1.0724446000595116`}, {
       3.1129957502682033`, -1.0115423280450642`}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.035676241799539, -1.0048139886882603`}, {
       3.107180901057605, -0.930601510844887}}]}, 
     {Arrowheads[{{0.04671359564769517, 1.}}], 
      ArrowBox[{{3.0485619109074857`, -0.9395979802728147}, {
       3.0942952319496584`, -0.8472460906889038}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.074414082398493, -0.8705774405945594}, {
       3.0684430604586512`, -0.7676952017957307}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.101581411802054, -0.7866346739473297}, {
       3.04127573105509, -0.7030665398715318}}]}, 
     {Arrowheads[{{0.04671359564769496, 1.}}], 
      ArrowBox[{{3.1145796822432192`, -0.6987266339810676}, {
       3.028277460613925, -0.6424031512663653}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.1193865504676217`, -0.6151241852975763}, {
       3.0234705923895224`, -0.577434171378428}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.1212978316553386`, -0.5349610746745799}, {
       3.021559311201806, -0.5090258534299958}}]}, 
     {Arrowheads[{{0.04671359564769512, 1.}}], 
      ArrowBox[{{3.1221476965499377`, -0.4568001855095194}, {
       3.020709446307207, -0.43861531402362774`}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.12255834582991, -0.379813295957837}, {
       3.0202987970272335`, -0.36703077500388154`}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.1227666462719457`, -0.3035526672178769}, {
       3.0200904965851985`, -0.29471997517241305`}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.122873694693081, -0.22776631147536391`}, {
       3.019983448164063, -0.2219349023434975}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.1229268806399753`, -0.15230448716930525`}, {
       3.0199302622171693`, -0.14882529807812758`}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.1229501299217755`, -0.07707356567912481}, {
       3.0199070129353687`, -0.07548479099687945}}]}, 
     {Arrowheads[{{0.04671359564769517, 1.}}], 
      ArrowBox[{{3.122956250242162, -0.002012355845438115}, {
       3.019900892614982, -0.001974572259137567}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{3.0995933518565737`, -1.0699817907095812`}, {
       3.1861209338577132`, -1.0140051373949948`}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.105347239104728, -1.0030363382085263`}, {
       3.1803670466095584`, -0.9323791613246208}}]}, 
     {Arrowheads[{{0.0467135956476952, 1.}}], 
      ArrowBox[{{3.1199161280457406`, -0.939561084888485}, {
       3.1657981576685463`, -0.8472829860732336}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.151478434135188, -0.8699376536335313}, {
       3.134235851579099, -0.7683349887567587}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.178727103306771, -0.7818431464026646}, {
       3.1069871824075155`, -0.7078580674161968}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.188691870993283, -0.694108038919453}, {
       3.0970224147210033`, -0.6470217463279797}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.191994226401526, -0.611792045950686}, {
       3.0937200593127603`, -0.5807663107253181}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.193273029414431, -0.5326396099961976}, {
       3.0924412562998556`, -0.511347318108378}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.193840325499965, -0.4551788359275668}, {
       3.091873960214321, -0.44023666360558034`}}]}, 
     {Arrowheads[{{0.04671359564769509, 1.}}], 
      ArrowBox[{{3.1941155663901832`, -0.37868283938557123`}, {
       3.0915987193241037`, -0.36816123157614733`}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.1942559552619687`, -0.30277831572972047`}, {
       3.0914583304523178`, -0.2954943266605696}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{3.1943284978361235`, -0.22725926990871378`}, {
       3.0913857878781625`, -0.22244194391014763`}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.1943647190184574`, -0.15200421149136287`}, {
       3.0913495666958295`, -0.14912557375606997`}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.194380621521138, -0.07693734790369308}, {
       3.0913336641931486`, -0.07562100877231119}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.1943848227508562`, -0.002009135279851159}, {
       3.0913294629634303`, -0.001977792824724523}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.1692536876762025`, -1.0670377971489493`}, {
       3.2593177408952263`, -1.0169491309556264`}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.174716233467627, -1.0007131770263946`}, {
       3.2538551951038017`, -0.9347023225067524}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.1912411961549174`, -0.9395094765568801}, {
       3.2373302324165114`, -0.8473345944048384}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.2302387787351847`, -0.8681322575112046}, {
       3.198332649836244, -0.7701403848790854}}]}, 
     {Arrowheads[{{0.046713595647695165`, 1.}}], 
      ArrowBox[{{3.2553113488838465`, -0.7760275109673523}, {
       3.173260079687582, -0.713673702851509}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.2621946775297403`, -0.6895341646629618}, {
       3.1663767510416885`, -0.6515956205844711}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.2643015686585506`, -0.6086693499337303}, {
       3.1642698599128787`, -0.583889006742274}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.2651072350090424`, -0.5304949387587542}, {
       3.163464193562387, -0.5134919893458215}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.2654656162581586`, -0.45368434368847704`}, {
       3.1631058123132703`, -0.4417311558446701}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.265640531491327, -0.3776392372301784}, {
       3.162930897080102, -0.36920483373154017`}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.2657302970068343`, -0.30206154759085824`}, {
       3.1628411315645946`, -0.29621109479943175`}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.2657769398833545`, -0.22678857679291037`}, {
       3.162794488688075, -0.22291263702595107`}}]}, 
     {Arrowheads[{{0.04671359564769533, 1.}}], 
      ArrowBox[{{3.265800342470084, -0.15172468736526057`}, {
       3.162771086101345, -0.1494050978821723}}]}, 
     {Arrowheads[{{0.046713595647695075`, 1.}}], 
      ArrowBox[{{3.265810660048364, -0.07681021974161545}, {
       3.162760768523065, -0.07574813693438882}}]}, 
     {Arrowheads[{{0.046713595647694936`, 1.}}], 
      ArrowBox[{{3.2658133950075916`, -0.0020061226694079075`}, {
       3.1627580335638372`, -0.001980805435167774}}]}, 
     {Arrowheads[{{0.046713595647695054`, 1.}}], 
      ArrowBox[{{3.238897778342371, -1.0635182562304204`}, {
       3.3325307930862, -1.0204686718741554`}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{3.2437468139490377`, -0.9976047956816709}, {
       3.327681757479534, -0.9378107038514762}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.262515798814971, -0.9394321674780473}, {
       3.3089127726136, -0.8474119034836713}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.3108387450985837`, -0.864123692550483}, {
       3.260589826329988, -0.774148949839807}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.3309490453995663`, -0.7695268820949454}, {
       3.2404795260290054`, -0.720174331723916}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.335136765562429, -0.6851429763961533}, {
       3.2362918058661423`, -0.6559868088512797}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.3363600188607707`, -0.6057718994900919}, {
       3.2350685525678005`, -0.5867864571859123}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.3368272122839233`, -0.5285180926473236}, {
       3.2346013591446483`, -0.5154688354572522}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.3370364027190353`, -0.4523058305582836}, {
       3.234392168709536, -0.44310966897486354`}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.3371392474066, -0.3766740126887013}, {
       3.2342893240219714`, -0.37017005827301724`}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{3.3371923725733756`, -0.3013965455522192}, {
       3.2342361988551955`, -0.2968760968380708}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{3.3372201316531056`, -0.22635056522313368`}, {
       3.234208439775465, -0.22335064859572773`}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.3372341256053186`, -0.1514638578169609}, {
       3.234194445823253, -0.14966592743047194`}}]}, 
     {Arrowheads[{{0.046713595647695214`, 1.}}], 
      ArrowBox[{{3.337240319854192, -0.07669130286955551}, {
       3.2341882515743787`, -0.07586705380644874}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.3372419670525715`, -0.0020032985022788797`}, {
       3.234186604376, -0.0019836296022968025`}}]}, 
     {Arrowheads[{{0.04671359564769515, 1.}}], 
      ArrowBox[{{3.308618902343474, -1.0593292031897983`}, {
       3.4056668119422393`, -1.0246577249147777`}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.312449063119993, -0.9933508154307678}, {
       3.4018366511657203`, -0.9420646841023795}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.3336911431619054`, -0.9393036129621533}, {
       3.3805945711238077`, -0.8475404579995653}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.392515430213571, -0.8566047494404467}, {
       3.321770284072143, -0.7816678929498433}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.4054401446482925`, -0.762808169673726}, {
       3.308845569637421, -0.7268930441451354}}]}, 
     {Arrowheads[{{0.04671359564769524, 1.}}], 
      ArrowBox[{{3.407596878750911, -0.6810288184830835}, {
       3.3066888355348025`, -0.6601009667643493}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.4082167633097153`, -0.6031025315953996}, {
       3.3060689509759977`, -0.5894558250806047}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.408455312451627, -0.5266981394929324}, {
       3.3058304018340867`, -0.5172887886116434}}]}, 
     {Arrowheads[{{0.04671359564769512, 1.}}], 
      ArrowBox[{{3.408563133899411, -0.4510329834569596}, {
       3.3057225803863024`, -0.44438251607618756`}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.4086165791346987`, -0.3757795734175398}, {
       3.305669135151015, -0.3710644975441788}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.408644374437073, -0.3007781973201415}, {
       3.30564133984864, -0.29749444507014844`}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.4086589792112956`, -0.22594203159580406`}, {
       3.305626735074418, -0.22375918222305738`}}]}, 
     {Arrowheads[{{0.04671359564769509, 1.}}], 
      ArrowBox[{{3.4086663757699243`, -0.15121992628893513`}, {
       3.3056193385157897`, -0.1499098589584977}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.4086696623066577`, -0.07657982834714856}, {
       3.3056160519790554`, -0.0759785283288557}}]}, 
     {Arrowheads[{{0.04671359564769533, 1.}}], 
      ArrowBox[{{3.4086705389191723`, -0.0020006456335878403`}, {
       3.3056151753665413`, -0.001986282470987842}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.3785589855304887`, -1.0543973981819559`}, {
       3.478583871612367, -1.0295895299226197`}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.3809695095165337`, -0.9874348717844356}, {
       3.476173347626322, -0.9479806277487115}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.404625681724483, -0.9390477217634605}, {
       3.452517175418373, -0.8477963491982581}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.47302390445731, -0.8451954736838854}, {
       3.3841189526855464`, -0.7930771687064047}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.4788072846142253`, -0.7563162428910791}, {
       3.3783355725286306`, -0.7333849709277822}}]}, 
     {Arrowheads[{{0.046713595647695165`, 1.}}], 
      ArrowBox[{{3.4796644169447233`, -0.677243858105184}, {
       3.3774784401981326`, -0.663885927142249}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.4799129610034503`, -0.6006551454708686}, {
       3.3772298961394056`, -0.5919032112051356}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.480009957496705, -0.5250232796935047}, {
       3.377132899646151, -0.518963648411071}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.4800543013782503`, -0.4498562023196661}, {
       3.377088555764606, -0.44555929721348103`}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.480076476861386, -0.3749491377909297}, {
       3.37706638028147, -0.3718949331707888}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.4800880896295108`, -0.30020200137367814`}, {
       3.3770547675133447`, -0.29807064101661185`}}]}, 
     {Arrowheads[{{0.04671359564769509, 1.}}], 
      ArrowBox[{{3.480094225131972, -0.22556016691192024`}, {
       3.3770486320108843`, -0.22414104690694117`}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.4800973463505156`, -0.15099131710590466`}, {
       3.37704551079234, -0.1501384681415282}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.4800987382976976`, -0.0764751201390413}, {
       3.3770441188451583`, -0.07608323653696297}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.480099110635229, -0.0019981489370619098`}, {
       3.377043746507627, -0.0019887791675137724`}}]}, 
     {Arrowheads[{{0.04671359564769519, 1.}}], 
      ArrowBox[{{3.4489111407443453`, -1.0487039409930357`}, {
       3.5510888592556533`, -1.0352829871115399`}}]}, 
     {Arrowheads[{{0.04671359564769524, 1.}}], 
      ArrowBox[{{3.4497766822421623`, -0.979228183534955}, {
       3.5502233177578364`, -0.9561873159981921}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.474666084076039, -0.9382917885977871}, {
       3.525333915923959, -0.8485522823639317}}]}, 
     {Arrowheads[{{0.04671359564769524, 1.}}], 
      ArrowBox[{{3.5499275749453156`, -0.8318775652826012}, {
       3.4500724250546826`, -0.8063950771076888}}]}, 
     {Arrowheads[{{0.04671359564769512, 1.}}], 
      ArrowBox[{{3.5512321068263555`, -0.7503618019657803}, {
       3.4487678931736427`, -0.7393394118530812}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.551425624514279, -0.6738063713191015}, {
       3.4485743754857197`, -0.6673234139283314}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.551483272306799, -0.59841803630435}, {
       3.448516727693199, -0.5941403203716543}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.551506189270012, -0.5234815862576057}, {
       3.4484938107299867`, -0.5205053418469702}}]}, 
     {Arrowheads[{{0.0467135956476952, 1.}}], 
      ArrowBox[{{3.551516800608448, -0.4487666623624197}, {
       3.44848319939155, -0.4466488371707275}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.551522156270783, -0.37417665725715754`}, {
       3.4484778437292154`, -0.372667413704561}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.5515249804588485`, -0.29966398541744904`}, {
       3.4484750195411493`, -0.29860865697284095`}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{3.5515264806910305`, -0.22520249952529947`}, {
       3.4484735193089677`, -0.2244987142935619}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.551527247186849, -0.15077664285772951`}, {
       3.4484727528131494`, -0.15035314238970332`}}]}, 
     {Arrowheads[{{0.0467135956476952, 1.}}], 
      ArrowBox[{{3.551527590215688, -0.07637658152263509}, {
       3.4484724097843102`, -0.07618177515336919}}]}, 
     {Arrowheads[{{0.04671359564769515, 1.}}], 
      ArrowBox[{{3.5515276822240516`, -0.001995795016443477}, {
       3.4484723177759466`, -0.0019911330881322046`}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.519901969183981, -1.0423270835124556`}, {
       3.6229551736731596`, -1.0416598445921201`}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.5199045257872728`, -0.9683199274938974}, {
       3.6229526170698674`, -0.9670955720392498}}]}, 
     {Arrowheads[{{0.0467135956476952, 1.}}], 
      ArrowBox[{{3.5245356815090556`, -0.9147799126181736}, {
       3.618321461348085, -0.8720641583435451}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.6229533775473266`, -0.8196807431279423}, {
       3.5199037653098144`, -0.8185918992623477}}]}, 
     {Arrowheads[{{0.046713595647695075`, 1.}}], 
      ArrowBox[{{3.6229556738924993`, -0.7450950501299942}, {
       3.5199014689646413`, -0.7446061636888671}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.622956046575054, -0.6707109947963067}, {
       3.5199010962820867`, -0.6704187904511261}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.622956161959579, -0.596376414571185}, {
       3.5199009808975616`, -0.5961819421048195}}]}, 
     {Arrowheads[{{0.046713595647694936`, 1.}}], 
      ArrowBox[{{3.6229562088184375`, -0.5220614775411001}, {
       3.519900934038703, -0.5219254505634756}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.622956230812551, -0.44775632161816453`}, {
       3.5199009120445894`, -0.4476591779149826}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.622956242018328, -0.3734567400880266}, {
       3.5199009008388127`, -0.3733873308736919}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.6229562479684856`, -0.2991606360913869}, {
       3.519900894888655, -0.29911200629890305`}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.62295625114605, -0.22486684726558398`}, {
       3.519900891711091, -0.22483436655327743`}}]}, 
     {Arrowheads[{{0.04671359564769519, 1.}}], 
      ArrowBox[{{3.6229562527763237`, -0.150574677342099}, {
       3.519900890080817, -0.15055510790533383`}}]}, 
     {Arrowheads[{{0.046713595647695075`, 1.}}], 
      ArrowBox[{{3.6229562535083715`, -0.07628368380980044}, {
       3.5199008893487695`, -0.07627467286620382}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.6229562537052327`, -0.0019935719650351277`}, {
       3.5199008891519075`, -0.0019933561395405544`}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.5917432699803236`, -1.0354762529655717`}, {
       3.6939710157339594`, -1.0485106751390039`}}]}, 
     {Arrowheads[{{0.046713595647695096`, 1.}}], 
      ArrowBox[{{3.592838168032364, -0.9553301814151325}, {
       3.692876117681919, -0.9800853181180148}}]}, 
     {Arrowheads[{{0.04671359564769517, 1.}}], 
      ArrowBox[{{3.661701357792563, -0.8454637452248049}, {
       3.62401292792172, -0.9413803257369138}}]}, 
     {Arrowheads[{{0.04671359564769515, 1.}}], 
      ArrowBox[{{3.693591072413076, -0.8101268576911513}, {
       3.592123213301207, -0.8281457846991386}}]}, 
     {Arrowheads[{{0.046713595647695096`, 1.}}], 
      ArrowBox[{{3.6942042792265344`, -0.7405408937543256}, {
       3.5915100064877485`, -0.7491603200645358}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.6943178185849965`, -0.667937937266484}, {
       3.591396467129287, -0.6731918479809489}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.694354587667148, -0.5945141800783319}, {
       3.5913596980471345`, -0.5980441765976724}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.6943698675351255`, -0.520751998359436}, {
       3.5913444181791574`, -0.5232349297451399}}]}, 
     {Arrowheads[{{0.046713595647695054`, 1.}}], 
      ArrowBox[{{3.6943771409108317`, -0.44681789507952063`}, {
       3.5913371448034512`, -0.44859760445362645`}}]}, 
     {Arrowheads[{{0.04671359564769523, 1.}}], 
      ArrowBox[{{3.6943808819551602`, -0.3727845794622956}, {
       3.5913334037591222`, -0.3740594914994229}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.6943828820569578`, -0.29868883853753514`}, {
       3.5913314036573256`, -0.2995838038527548}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.6943839557080915`, -0.22455127725923096`}, {
       3.5913303300061914`, -0.22514993655963045`}}]}, 
     {Arrowheads[{{0.04671359564769519, 1.}}], 
      ArrowBox[{{3.694384508780886, -0.15038433300248955`}, {
       3.5913297769333963`, -0.15074545224494326`}}]}, 
     {Arrowheads[{{0.046713595647695234`, 1.}}], 
      ArrowBox[{{3.694384757929204, -0.07619595693648423}, {
       3.5913295277850787`, -0.07636239973952003}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.694384825095301, -0.0019914691642649008`}, {
       3.5913294606189816`, -0.001995458940310781}}]}, 
     {Arrowheads[{{0.04671359564769506, 1.}}], 
      ArrowBox[{{3.6645597144415056`, -1.0284869108165338`}, {
       3.764011714129919, -1.0555000172880422`}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.6693656112962065`, -0.942463217918498}, {
       3.7592058172752183`, -0.9929522816146492}}]}, 
     {Arrowheads[{{0.04671359564769512, 1.}}], 
      ArrowBox[{{3.735004339064542, -0.8462432200221135}, {
       3.693567089506883, -0.9406008509396051}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{3.763264496207057, -0.8031306671217344}, {
       3.6653069323643677`, -0.8351419752685556}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{3.7651567549301257`, -0.7366506517527968}, {
       3.6634146736412996`, -0.7530505620660647}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.7655598973721927`, -0.6654599744431314}, {
       3.663011531199233, -0.6756698108043013}}]}, 
     {Arrowheads[{{0.046713595647695165`, 1.}}], 
      ArrowBox[{{3.765696823640526, -0.5928150946606482}, {
       3.6628746049308987`, -0.5997432620153561}}]}, 
     {Arrowheads[{{0.046713595647695165`, 1.}}], 
      ArrowBox[{{3.765755094639258, -0.5195429688291977}, {
       3.662816333932167, -0.5244439592753781}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.765783229600961, -0.44594480984356966`}, {
       3.662788198970465, -0.4494706896895775}}]}, 
     {Arrowheads[{{0.04671359564769509, 1.}}], 
      ArrowBox[{{3.765797838195534, -0.3721558873396219}, {
       3.662773590375892, -0.3746881836220967}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.7658057012466646`, -0.2982458245024582}, {
       3.662765727324761, -0.30002681788783186`}}]}, 
     {Arrowheads[{{0.046713595647695075`, 1.}}], 
      ArrowBox[{{3.7658099434116803`, -0.22425407208973988`}, {
       3.662761485159745, -0.22544714172912153`}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{3.765812137219192, -0.15020464202128672`}, {
       3.6627592913522333`, -0.1509251432261461}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.765813128537259, -0.07611298156960349}, {
       3.6627583000341657`, -0.07644537510640076}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.765813396408244, -0.001989477114078975}, {
       3.662758032163181, -0.001997450990496707}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.738327122971088, -1.0217559037258506`}, {
       3.8331014484574797`, -1.0622310243787252`}}]}, 
     {Arrowheads[{{0.046713595647695096`, 1.}}], 
      ArrowBox[{{3.7483833109852664`, -0.9321901433354275}, {
       3.823045260443301, -1.0032253561977196`}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.8070167804724138`, -0.8465039605214562}, {
       3.764411790956154, -0.9403401104402624}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.8327385172356774`, -0.798069197740845}, {
       3.7386900541928907`, -0.8402034446494451}}]}, 
     {Arrowheads[{{0.04671359564769515, 1.}}], 
      ArrowBox[{{3.8359406836468053`, -0.7333436094061588}, {
       3.735487887781762, -0.7563576044127026}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.836719708386939, -0.6632471813148364}, {
       3.7347088630416283`, -0.6778826039325965}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.8369972758726325`, -0.5912635067742902}, {
       3.734431295555935, -0.6012948499017141}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.8371182585867785`, -0.5184250451110507}, {
       3.7343103128417896`, -0.525561882993525}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.8371775073223224`, -0.4451311507410696}, {
       3.734251064106245, -0.4502843487920775}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.8372085598694086`, -0.3715668346687699}, {
       3.734220011559159, -0.37527723629294873`}}]}, 
     {Arrowheads[{{0.046713595647695096`, 1.}}], 
      ArrowBox[{{3.8372253843842445`, -0.29782912777797615`}, {
       3.734203187044323, -0.3004435146123138}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.837234505795176, -0.22397370119455814`}, {
       3.734194065633392, -0.22572751262430327`}}]}, 
     {Arrowheads[{{0.04671359564769519, 1.}}], 
      ArrowBox[{{3.837239240633596, -0.15003474040109185`}, {
       3.734189330794971, -0.15109504484634098`}}]}, 
     {Arrowheads[{{0.04671359564769518, 1.}}], 
      ArrowBox[{{3.8372413865039787`, -0.07603438245374215}, {
       3.734187184924589, -0.07652397422226209}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.837241967655935, -0.001987587289445328}, {
       3.7341866037726326`, -0.001999340815130354}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.8128655608674733`, -1.015637761152187}, {
       3.9014201534182367`, -1.0683491669523888`}}]}, 
     {Arrowheads[{{0.0467135956476952, 1.}}], 
      ArrowBox[{{3.8278361224623594`, -0.9253259453785657}, {
       3.8864495918233506`, -1.0100895541545816`}}]}, 
     {Arrowheads[{{0.046713595647695144`, 1.}}], 
      ArrowBox[{{3.8787300063073116`, -0.8466342482734286}, {
       3.835555707978398, -0.94020982268829}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.9023220313553613`, -0.7943584226100683}, {
       3.811963682930349, -0.8439142197802216}}]}, 
     {Arrowheads[{{0.04671359564769516, 1.}}], 
      ArrowBox[{{3.9066412400360426`, -0.7305323621924379}, {
       3.807644474249667, -0.7591688516264236}}]}, 
     {Arrowheads[{{0.04671359564769524, 1.}}], 
      ArrowBox[{{3.907825240465408, -0.6612698368647594}, {
       3.8064604738203016`, -0.6798599483826736}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.9082672183886955`, -0.5898447608802101}, {
       3.806018495897015, -0.6027135957957942}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{3.908464466779282, -0.5173897237096369}, {
       3.805821247506428, -0.5265972043949388}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.908562426981915, -0.44437160253026226`}, {
       3.805723287303795, -0.45104389700288483`}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.908614241386686, -0.3710139979312634}, {
       3.8056714728990246`, -0.3758300730304551}}]}, 
     {Arrowheads[{{0.046713595647695116`, 1.}}], 
      ArrowBox[{{3.908642496023515, -0.29743654592236746`}, {
       3.8056432182621953`, -0.30083609646792253`}}]}, 
     {Arrowheads[{{0.04671359564769514, 1.}}], 
      ArrowBox[{{3.908657887085955, -0.22370879660214937`}, {
       3.805627827199755, -0.22599241721671204`}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.9086659054526174`, -0.14987385450161542`}, {
       3.805619808833092, -0.1512559307458174}}]}, 
     {Arrowheads[{{0.046713595647695214`, 1.}}], 
      ArrowBox[{{3.9086695497675685`, -0.07595982277659637}, {
       3.805616164518141, -0.07659853389940788}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.9086705388484804`, -0.0019857920183959633`}, {
       3.80561517543723, -0.0020011360861797193`}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{3.8878977683267526`, -1.0103587457333714`}, {
       3.9692450888160997`, -1.0736281823712044`}}]}, 
     {Arrowheads[{{0.04671359564769519, 1.}}], 
      ArrowBox[{{3.906379352464366, -0.9212038381152429}, {
       3.9507635046784864`, -1.0142116614179044`}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.950327090102672, -0.8467123659021288}, {
       3.9068157670401797`, -0.9401317050595898}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{3.972109472357279, -0.7915765537048802}, {
       3.8850333847855727`, -0.8466960886854099}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.9773126188122516`, -0.7281353918427915}, {
       3.879830238330601, -0.76156582197607}}]}, 
     {Arrowheads[{{0.04671359564769515, 1.}}], 
      ArrowBox[{{3.9788970764725735`, -0.6595000291294818}, {
       3.8782457806702784`, -0.6816297561179511}}]}, 
     {Arrowheads[{{0.04671359564769507, 1.}}], 
      ArrowBox[{{3.979515423717258, -0.5885453953440325}, {
       3.877627433425595, -0.6040129613319719}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{3.9797978108907217`, -0.5164293113500622}, {
       3.8773450462521306`, -0.5275576167545134}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{3.97993998931686, -0.4436613924221188}, {
       3.877202867825993, -0.4517541071110283}}]}, 
     {Arrowheads[{{0.046713595647695075`, 1.}}], 
      ArrowBox[{{3.980015869227061, -0.3704943117156797}, {
       3.8771269879157915`, -0.37634975924603886`}}]}, 
     {Arrowheads[{{0.04671359564769513, 1.}}], 
      ArrowBox[{{3.9800575068394393`, -0.2970661073423328}, {
       3.8770853503034135`, -0.30120653504795714`}}]}, 
     {Arrowheads[{{0.04671359564769517, 1.}}], 
      ArrowBox[{{3.980080292422401, -0.22345813227840872`}, {
       3.877062564720451, -0.22624308154045267`}}]}, 
     {Arrowheads[{{0.04671359564769511, 1.}}], 
      ArrowBox[{{3.980092204718164, -0.1497212896044982}, {
       3.877050652424688, -0.1514084956429346}}]}, 
     {Arrowheads[{{0.04671359564769508, 1.}}], 
      ArrowBox[{{3.9800976335664955`, -0.07588899937597243}, {
       3.877045223576357, -0.07666935730003181}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{3.9800991099945024`, -0.0019840843779280345`}, {
       3.87704374714835, -0.0020028437266476477`}}]}, 
     {Arrowheads[{{0.04671359564769496, 1.}}], 
      ArrowBox[{{3.963135107964192, -1.0059923282923602`}, {
       4.036864892035802, -1.0779945998122156`}}]}, 
     {Arrowheads[{{0.046713595647694964`, 1.}}], 
      ArrowBox[{{3.9836343240043743`, -0.9188480865460539}, {
       4.01636567599562, -1.0165674129870932`}}]}, 
     {Arrowheads[{{0.046713595647695165`, 1.}}], 
      ArrowBox[{{4.0218670643424606`, -0.8467644151187053}, {
       3.9781329356575337`, -0.9400796558430133}}]}, 
     {Arrowheads[{{0.04671359564769491, 1.}}], 
      ArrowBox[{{4.042110137995676, -0.7894405585546407}, {
       3.9578898620043184`, -0.8488320838356493}}]}, 
     {Arrowheads[{{0.04671359564769496, 1.}}], 
      ArrowBox[{{4.047987886471929, -0.7260818884456324}, {
       3.952012113528066, -0.7636193253732291}}]}, 
     {Arrowheads[{{0.04671359564769487, 1.}}], 
      ArrowBox[{{4.04995014304408, -0.657912412602313}, {
       3.950049856955915, -0.6832173726451197}}]}, 
     {Arrowheads[{{0.0467135956476951, 1.}}], 
      ArrowBox[{{4.050748685055135, -0.5873532046661384}, {
       3.9492513149448603`, -0.6052051520098658}}]}, 
     {Arrowheads[{{0.046713595647695096`, 1.}}], 
      ArrowBox[{{4.051121565930667, -0.5155368753544893}, {
       3.948878434069328, -0.5284500527500864}}]}, 
     {Arrowheads[{{0.04671359564769521, 1.}}], 
      ArrowBox[{{4.05131182778759, -0.44299623515736614`}, {
       3.9486881722124045`, -0.45241926437578095`}}]}, 
     {Arrowheads[{{0.04671359564769505, 1.}}], 
      ArrowBox[{{4.051414259626151, -0.37000502686061953`}, {
       3.948585740373844, -0.37683904410109903`}}]}, 
     {Arrowheads[{{0.04671359564769491, 1.}}], 
      ArrowBox[{{4.051470810116081, -0.2967160429445391}, {
       3.9485291898839137`, -0.30155659944575086`}}]}, 
     {Arrowheads[{{0.04671359564769522, 1.}}], 
      ArrowBox[{{4.051501894522749, -0.2232206064849912}, {
       3.9484981054772454`, -0.22648060733387018`}}]}, 
     {Arrowheads[{{0.046713595647695096`, 1.}}], 
      ArrowBox[{{4.0515182003083, -0.14957642016082887`}, {
       3.9484817996916943`, -0.151553365086604}}]}, 
     {Arrowheads[{{0.046713595647695186`, 1.}}], 
      ArrowBox[{{4.0515256508764885`, -0.07582163864546188}, {
       3.9484743491235057`, -0.07673671803054238}}]}, 
     {Arrowheads[{{0.046713595647695005`, 1.}}], 
      ArrowBox[{{4.051527681101376, -0.0019824581047855317`}, {
       3.948472318898618, -0.0020044699997901505`}}]}}},
   AspectRatio->1,
   Frame->True,
   FrameLabel->{{
      FormBox[
      "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
       TraditionalForm], 
      FormBox["\"\"", TraditionalForm]}, {
      FormBox[
       RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
      FormBox["\"\"", TraditionalForm]}},
   Method->{"TransparentPolygonMesh" -> True},
   PlotRange->{{2.9484723177232253`, 
    4.051527682276776}, {-1.0935211463290633`, 0.04953421822448766}},
   PlotRangeClipping->True,
   PlotRangePadding->{
     Scaled[0.02], 
     Scaled[0.02]}], 
  GraphicsBox[{{}, 
    {Hue[0.67, 0.6, 0.6], 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{-0.043931837857651944`, 0.}, {0.043931837857651944`, 0.}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{-0.0435216683545385, 0.05956064898719075}, {
       0.0435216683545385, 0.04758220815566639}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{-0.04227147999080847, 0.1191064835553501}, {
       0.04227147999080847, 0.09517923073036418}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{-0.04025744057000309, 0.17830248790506376`}, {
       0.04025744057000309, 0.14312608352350767`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{-0.03767124017648707, 0.23688845839160652`}, {
       0.03767124017648707, 0.19168297017982203`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{-0.03475472315126165, 0.2947293514792524}, {
       0.03475472315126165, 0.24098493423503334`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{-0.03173231838731406, 0.3518105783951487}, {
       0.03173231838731406, 0.2910465644619941}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{-0.028772302221797316`, 0.4081988102559199}, {
       0.028772302221797316`, 0.34180118974407997`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{-0.025979692585391127`, 0.4639982820969618}, {
       0.025979692585391127`, 0.3931445750458952}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{-0.023407466172256853`, 0.5193194210635003}, {
       0.023407466172256853`, 0.4449662932222138}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{-0.021072855776326147`, 0.5742621926221992}, {
       0.021072855776326147`, 0.49716637880637193`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{-0.01897162623794993, 0.6289099969345969}, {
       0.01897162623794993, 0.5496614316368315}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{-0.017088256462417812`, 0.6833293292155007}, {
       0.017088256462417812`, 0.6023849564987848}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{-0.01540237331998574, 0.7375718974203141}, {
       0.01540237331998574, 0.6552852454368286}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{-0.01389246694273922, 0.7916774008282177}, {
       0.01389246694273922, 0.7083225991717823}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.0257110192852052, 0.}, {0.11357469500050907`, 0.}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.026099730537118865`, 0.05940259508831587}, {
       0.11318598374859543`, 0.047740262054541266`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.027349342893828017`, 0.11902835376765959`}, {
       0.11193637139188625`, 0.09525736051805467}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.029481449878162445`, 0.17852068187045242`}, {
       0.10980426440755187`, 0.142907889558119}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.03236286506131131, 0.2375281015974966}, {
       0.10692284922440298`, 0.19104332697393195`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.03574420742062585, 0.2958015148228981}, {
       0.10354150686508842`, 0.2399127708913876}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.039343335226861134`, 0.35323965989176453`}, {
       0.09994237905885316, 0.28961748296537826`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.04292040334680569, 0.4098699991492531}, {
       0.0963653109389086, 0.3401300008507468}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.04631242534481407, 0.46579638430905}, {0.09297328894090022,
        0.39134647283380697`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.04943126185150934, 0.5211492385865361}, {
       0.08985445243420495, 0.44313647569917797`}}]}, 
     {Arrowheads[{{0.041333464358056946`, 1.}}], 
      ArrowBox[{{0.05224441987155072, 0.5760541017533732}, {
       0.08704129441416357, 0.49537446967519794`}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.05475401736360258, 0.630617649004267}, {
       0.08453169692211171, 0.5479537795671614}}]}, 
     {Arrowheads[{{0.041333464358057036`, 1.}}], 
      ArrowBox[{{0.056980533942088255`, 0.6849246118648011}, {
       0.08230518034362604, 0.6007896738494845}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.058952280077978744`, 0.739039813367418}, {
       0.08033343420773555, 0.6538173294897248}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.0606993411865581, 0.7930118576661186}, {0.0785863730991562,
        0.7069881423338814}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.09535387642806234, 0.}, {0.18321755214336624`, 0.}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.09571735704559756, 0.059210987503524895`}, {
       0.18285407152583102`, 0.04793186963933224}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.096964474728144, 0.11892925013909514`}, {
       0.18160695384328457`, 0.09535646414661912}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.09925325499338745, 0.17880872078585439`}, {
       0.17931817357804114`, 0.14261985064271698`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.10256040518308213`, 0.2383950081133473}, {
       0.17601102338834645`, 0.19017642045808128`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.10664864519317904`, 0.2972651026401693}, {
       0.17192278337824954`, 0.23844918307411642`}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.11114497424464909`, 0.3551643851506711}, {
       0.1674264543267795, 0.2876927577064717}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.11567628935996556`, 0.4120486360373287}, {
       0.16289513921146304`, 0.3379513639626712}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.11996829414090143`, 0.4680282867395569}, {
       0.15860313443052715`, 0.3891145704033001}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.12387003865128512`, 0.5232812008417116}, {
       0.15470138992014346`, 0.44100451344400243`}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.1273289658573914, 0.5779877117000372}, {
       0.15124246271403718`, 0.493440859728534}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.1303531876324818, 0.6322998555085761}, {
       0.14821824093894675`, 0.5462715730628522}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.13298083006570036`, 0.6863342036193797}, {
       0.14559059850572822`, 0.5993800820949059}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.13526072026175215`, 0.7401756376234385}, {
       0.14331070830967643`, 0.6526815052337042}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.13724208364176782`, 0.7938842790910611}, {
       0.14132934492966076`, 0.7061157209089388}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.16499673357091948`, 0.}, {0.2528604092862234, 0.}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.1653301792010281, 0.058973888448587364`}, {
       0.25252696365611477`, 0.048168968694269766`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.1665713889042702, 0.11879942036509594`}, {
       0.25128575395287267`, 0.09548629392061835}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.16907827225416255`, 0.17920644711475825`}, {
       0.24877887060298035`, 0.14222212431381318`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.17304671872763186`, 0.23963327875055182`}, {
       0.24481042412951104`, 0.1889381498208767}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.17830888440954137`, 0.2993601767492565}, {
       0.23954825844760153`, 0.23635410896502917`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.18431980498766842`, 0.3578210842822904}, {
       0.23353733786947448`, 0.2850360585748523}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.19040661287962193`, 0.41483645854066364`}, {
       0.22745052997752097`, 0.33516354145933624`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.19605423963531463`, 0.4705744993928358}, {
       0.22180290322182827`, 0.3865683577500212}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.20100876267238169`, 0.5253549272947995}, {
       0.2168483801847612, 0.43893078699091453`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.20522115041199396`, 0.5794894088661039}, {
       0.21263599244514889`, 0.4919391625624673}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.20875145139929974`, 0.6332171950944264}, {
       0.20910569145784313`, 0.545354233477002}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.21169890206952507`, 0.6867015455294431}, {
       0.2061582407876178, 0.5990127401848425}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.21416548983482075`, 0.7400471576408423}, {
       0.20369165302232212`, 0.6528099852163005}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.21624135201903233`, 0.7933189290909505}, {
       0.20161579083811057`, 0.7066810709090494}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.23463959071377663`, 0.}, {0.32250326642908056`, 0.}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.2349367990191425, 0.05867294612856608}, {
       0.32220605812371467`, 0.04846991101429106}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.236165808892263, 0.11862195977228708`}, {
       0.3209770482505942, 0.09566375451342721}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.2389976311455721, 0.17979099756010167`}, {
       0.31814522599728506`, 0.14163757386846976`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.2441116695104441, 0.24153514332578624`}, {
       0.31303118763241305`, 0.18703628524564228`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.2515801021587303, 0.3025194375883662}, {
       0.30556275498412694`, 0.2331948481259195}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.2603854023178024, 0.3614195057344043}, {0.2967574548250547,
        0.2814376371227385}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.2689944791653971, 0.41787526580238693`}, {0.28814837797746,
        0.33212473419761296`}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.2763850975847638, 0.47244882975207925`}, {
       0.2807577595580933, 0.38469402739077774`}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.28229860624579356`, 0.5259163025651075}, {
       0.27484425089706366`, 0.43836941172060667`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.2869019254968666, 0.5788490651680661}, {
       0.27024093164599056`, 0.492579506260505}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.2904745784914808, 0.6315742635577308}, {
       0.26666827865137643`, 0.5469971650136974}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.2932721779310208, 0.6842563499246395}, {0.2638706792118364,
        0.601457935789646}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.29549339781208966`, 0.7369705661324478}, {
       0.2616494593307675, 0.6558865767246951}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.2972840525918816, 0.7897472524814003}, {
       0.25985880455097554`, 0.7102527475185997}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.3042824478566338, 0.}, {0.3921461235719377, 0.}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.3045353375166349, 0.058278429941511445`}, {
       0.3918932339119364, 0.0488644272013457}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.30573988550006714`, 0.11836478674490919`}, {
       0.39068868592850425`, 0.09592092754080507}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.3091087852495372, 0.18073343182376245`}, {
       0.3873197861790342, 0.14069513960480895`}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.3165814295570925, 0.24477126477917505`}, {
       0.3798471418714789, 0.18380016379225347`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.32894182160854313`, 0.30733597902088866`}, {
       0.36748674982002827`, 0.22837830669339704`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.34289990100705015`, 0.3650377871144161}, {
       0.35352867042152125`, 0.27781935574272676`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.35429616333600317`, 0.41850881683228663`}, {
       0.3421324080925682, 0.3314911831677133}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.36220746294049566`, 0.4702151239966294}, {
       0.33422110848807574`, 0.3869277331462276}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.3675019814388696, 0.5216142540168833}, {
       0.32892658998970176`, 0.4426714602688308}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.37111275807684885`, 0.5732065027867922}, {
       0.32531581335172255`, 0.49822206864177904`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.37366298016833865`, 0.6250959129466442}, {
       0.3227655912602328, 0.5534755156247841}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.3755302622089477, 0.6772641741980489}, {0.3208983092196237,
        0.6084501115162366}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.3769426046812182, 0.7296654495443814}, {0.3194859667473532,
        0.6631916933127615}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.3780411750285959, 0.7822546593747773}, {
       0.31838739639997554`, 0.7177453406252228}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.3739253049994909, 0.}, {0.46178898071479474`, 0.}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.3741234125115096, 0.057738826753323515`}, {
       0.46159087320277603`, 0.049404030389533615`}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.3752775246948361, 0.11795870175634818`}, {
       0.4604367610194495, 0.0963270125293661}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.37970848997478235`, 0.18250159075213268`}, {
       0.45600579573950323`, 0.13892698067643872`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.3937076062609896, 0.2509845733925323}, {0.442006679453296, 
       0.17758685517889627`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.4177561503932934, 0.3117888646316564}, {0.4179581353209923,
        0.2239254210826293}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.43537673580958514`, 0.3617159173368309}, {
       0.4003375499047005, 0.2811412255203119}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.44415147635928637`, 0.4101939540720998}, {
       0.3915628093549993, 0.33980604592790015`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.4486274272518368, 0.4599273845578224}, {
       0.38708685846244884`, 0.3972154725850346}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.4511739272742537, 0.5107784687768833}, {
       0.38454035844003187`, 0.4535072455088308}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.45276952750741783`, 0.5623813398369716}, {
       0.3829447582068678, 0.5090472315915997}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.4538462698708434, 0.6144807359039376}, {
       0.38186801584344227`, 0.5640906926674907}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.4546149782325904, 0.6669168169210721}, {
       0.38109930748169524`, 0.6187974687932134}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.4551881420168038, 0.7195889444672859}, {
       0.38052614369748183`, 0.673268198389857}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.45563037336506107`, 0.7724318843289344}, {
       0.38008391234922456`, 0.7275681156710656}}]}, 
     {Arrowheads[{{0.04133346435805694, 1.}}], 
      ArrowBox[{{0.443568162142348, 0.}, {0.5314318378576518, 0.}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.44369877362883603`, 0.05695653505912976}, {
       0.5313012263711638, 0.05018632208372738}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.44474000380167955`, 0.11722199910388979`}, {
       0.5302599961983202, 0.09706371518182448}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.45225937167449637`, 0.18694603161071313`}, {
       0.5227406283255035, 0.1344825398178583}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.4921334497313736, 0.25797252603866616`}, {
       0.4828665502686263, 0.1705989025327624}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.518181031495179, 0.29930043600437617`}, {
       0.45681896850482084`, 0.23641384970990956`}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.5244545163895895, 0.34518504625045043`}, {
       0.45054548361041036`, 0.2976720966066923}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.5266725599301066, 0.3948876073491311}, {
       0.44832744006989317`, 0.3551123926508688}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.5277331216291262, 0.44621518955164335`}, {
       0.4472668783708737, 0.41092766759121363`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.5283383878460294, 0.4983364501872773}, {0.4466616121539705,
        0.46594926409843684`}}]}, 
     {Arrowheads[{{0.041333464358057015`, 1.}}], 
      ArrowBox[{{0.5287247085058789, 0.5508974930881027}, {0.446275291494121, 
       0.5205310783404685}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.5289907960910246, 0.6037259434142299}, {0.4460092039089753,
        0.5748454851571984}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.5291844013105698, 0.6567285906882232}, {0.4458155986894301,
        0.6289856950260624}}]}, 
     {Arrowheads[{{0.041333464358057015`, 1.}}], 
      ArrowBox[{{0.529331195179578, 0.7098508472191765}, {0.4456688048204218, 
       0.6830062956379662}}]}, 
     {Arrowheads[{{0.04133346435805694, 1.}}], 
      ArrowBox[{{0.5294461179129196, 0.7630586970860976}, {
       0.44555388208708024`, 0.7369413029139024}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.5132110192852051, 0.}, {0.6010746950005089, 0.}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.5132636886530361, 0.05572199830824697}, {
       0.6010220256326781, 0.051420858834610166`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.5140088262648604, 0.11547722921080902`}, {
       0.6002768880208537, 0.09880848507490525}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.5527967886145233, 0.2044306220875232}, {0.5614889256711908,
        0.11699794934104821`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.597789847341018, 0.23095390451085948`}, {
       0.5164958669446961, 0.1976175240605691}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.5997384756500324, 0.27860980120483547`}, {
       0.5145472386356817, 0.2571044845094502}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.6002137643223292, 0.3300832425539413}, {0.5140719499633848,
        0.31277390030320157`}}]}, 
     {Arrowheads[{{0.041333464358056946`, 1.}}], 
      ArrowBox[{{0.6004142269465362, 0.38258913255018373`}, {
       0.5138714873391779, 0.3674108674498162}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.6005221782309034, 0.43551699402653704`}, {
       0.5137635360548106, 0.42162586311631994`}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.600588928066715, 0.48865786280901874`}, {
       0.5136967862189991, 0.47562785147669534`}}]}, 
     {Arrowheads[{{0.04133346435805693, 1.}}], 
      ArrowBox[{{0.6006340284882625, 0.5419210878341857}, {0.5136516857974516,
        0.5295074835943854}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.6006664362080054, 0.5952610337676165}, {0.5136192780777087,
        0.5833103948038119}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.6006907990297443, 0.6486522386257481}, {0.5135949152559697,
        0.6370620470885375}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.6007097566625406, 0.70207938055584}, {0.5135759576231735, 
       0.6907777623013027}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.6007249145988778, 0.755532688808448}, {0.5135607996868363, 
       0.7444673111915519}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.5828538764280622, 0.}, {0.670717552143366, 0.}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.5828539479116477, 0.053492177038583}, {0.6707174806597808, 
       0.053650680104274144`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.5828588179259591, 0.10648395369746089`}, {
       0.6707126106454693, 0.1078017605882534}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.6707151633566205, 0.16025615704494833`}, {
       0.5828562652148079, 0.16117241438362304`}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.6707168523417018, 0.21403774925435406`}, {
       0.5828545762297265, 0.21453367931707448`}}]}, 
     {Arrowheads[{{0.041333464358056946`, 1.}}], 
      ArrowBox[{{0.6707171218324376, 0.2676626987399399}, {0.5828543067389909,
        0.2680515869743458}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.6707172232840889, 0.32125858708592936`}, {
       0.5828542052873394, 0.32159855577121343`}}]}, 
     {Arrowheads[{{0.041333464358057036`, 1.}}], 
      ArrowBox[{{0.6707172752743469, 0.3748440299609871}, {0.5828541532970815,
        0.37515597003901285`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.670717306581282, 0.4284245411076372}, {0.5828541219901462, 
       0.4287183160352197}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.6707173274005742, 0.48200233427185823`}, {
       0.582854101170854, 0.4822833800138559}}]}, 
     {Arrowheads[{{0.04133346435805693, 1.}}], 
      ArrowBox[{{0.6707173422072312, 0.5355784707062842}, {0.5828540863641971,
        0.5358501007222869}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.6707173532599275, 0.5891535227943173}, {0.5828540753115008,
        0.589417905777111}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.6707173618171377, 0.642727826478473}, {0.5828540667542907, 
       0.6429864592358125}}]}, 
     {Arrowheads[{{0.041333464358057015`, 1.}}], 
      ArrowBox[{{0.6707173686337492, 0.6963015919192278}, {0.582854059937679, 
       0.696555550937915}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.6707173741892551, 0.7498749573247527}, {0.5828540543821733,
        0.7501250426752473}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.6524967335709193, 0.}, {0.7403604092862232, 0.}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.6528096671475457, 0.048337160057705525`}, {
       0.7400474757095968, 0.05880569708515162}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.7335724528269719, 0.08368356362807775}, {
       0.6592846900301708, 0.13060215065763653`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.7394692489803294, 0.15191051076051698`}, {
       0.6533878938768132, 0.1695180606680544}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.7398559322395524, 0.2076471368369019}, {0.6530012106175901,
        0.22092429173452668`}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.7399783934337971, 0.2620761930334403}, {0.6528787494233455,
        0.2736380926808454}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.7400368957766871, 0.3161068776098183}, {0.6528202470804556,
        0.32675026524732453`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.7400708517256044, 0.36996435227341923`}, {
       0.6527862911315382, 0.38003564772658066`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.7400929388811585, 0.4237310367983934}, {0.6527642039759841,
        0.4334118203444635}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.7401084210256168, 0.47744422790333424`}, {
       0.6527487218315257, 0.4868414863823799}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.7401198615526825, 0.531123256979703}, {0.6527372813044601, 
       0.5403053144488682}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.7401286537564407, 0.5847791432956527}, {0.652728489100702, 
       0.5937922852757758}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.7401356184463256, 0.6384186275041409}, {0.6527215244108169,
        0.6472956582101446}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.7401412699215186, 0.6920460643817207}, {0.6527158729356238,
        0.7008110784754222}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.7401459465282807, 0.7456643925520949}, {0.6527111963288619,
        0.7543356074479051}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.7221395907137764, 0.}, {0.8100032664290803, 0.}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.7301362561825505, 0.02829951208429505}, {
       0.8020066009603062, 0.0788433450585621}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.8067391054989326, 0.09052520295006665}, {
       0.7254037516439242, 0.12376051133564764`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8085100805602927, 0.149357913277672}, {0.723632776582564, 
       0.1720706581508994}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8089020795226342, 0.20451116996656574`}, {
       0.7232407776202227, 0.2240602586048628}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.8090680903706617, 0.2588408547254685}, {0.7230747667721951,
        0.2768734309888171}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.8091589273224299, 0.31285688379232013`}, {
       0.7229839298204268, 0.33000025906482267`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.8092160126129715, 0.36672043205032734`}, {
       0.7229268445298853, 0.38327956794967255`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8092551421706097, 0.42049843300999606`}, {
       0.7228877149722471, 0.4366444241328609}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8092836100648103, 0.47422365591204824`}, {
       0.7228592470780465, 0.4900620583736658}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.8093052396477725, 0.5279140320411023}, {0.7228376174950844,
        0.5435145393874689}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.8093222249752472, 0.5815801975615459}, {0.7228206321676096,
        0.5969912310098826}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.8093359138252533, 0.6352288603982539}, {0.7228069433176035,
        0.6504854253160317}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.8093471792808642, 0.688864460239159}, {0.7227956778619927, 
       0.7039926826179838}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8093566115468609, 0.742490052441305}, {0.7227862455959959, 
       0.7575099475586952}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.7917824478566335, 0.}, {0.8796461235719374, 0.}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8654744411713732, 0.021255186142566357`}, {
       0.8059541302571978, 0.08588767100029077}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.8769837193279978, 0.0920816411642446}, {0.7944448521005731,
        0.12220407312146966`}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8778070209809521, 0.1481362089407348}, {0.7936215504476188,
        0.1732923624878366}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.8780844818135427, 0.2026765429086732}, {0.7933440896150283,
        0.2258948856627553}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.8782222924986477, 0.2567631923988236}, {0.7932062789299233,
        0.2789510933154621}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.8783044223658595, 0.3106542205176682}, {0.7931241490627117,
        0.33220292233947457`}}]}, 
     {Arrowheads[{{0.04133346435805698, 1.}}], 
      ArrowBox[{{0.8783588743104954, 0.36444322771814097`}, {
       0.7930696971180756, 0.38555677228185886`}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.8783975973972934, 0.4181723285468003}, {0.7930309740312776,
        0.43897052859605673`}}]}, 
     {Arrowheads[{{0.041333464358056946`, 1.}}], 
      ArrowBox[{{0.8784265366210602, 0.47186326570993786`}, {
       0.7930020348075109, 0.49242244857577616`}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.8784489795006486, 0.5255283972141694}, {0.7929795919279223,
        0.5459001742144017}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.878466890446061, 0.5791752659178329}, {0.7929616809825101, 
       0.5993961626535954}}]}, 
     {Arrowheads[{{0.04133346435805694, 1.}}], 
      ArrowBox[{{0.8784815150337373, 0.6328087363223512}, {0.7929470563948338,
        0.6529055493919343}}]}, 
     {Arrowheads[{{0.04133346435805699, 1.}}], 
      ArrowBox[{{0.8784936810293307, 0.6864320863447978}, {0.7929348903992403,
        0.7064250565123451}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{0.878503959914455, 0.7400476053437188}, {0.7929246115141161, 
       0.7599523946562812}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.8614253049994907, 0.}, {0.9492889807147945, 0.}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.9450207234401989, 0.034682099496990214`}, {
       0.8656935622740864, 0.07246075764586693}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.9468699399229222, 0.09276599874728199}, {0.863844345791363,
        0.1215197155384323}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.9472296866838393, 0.14742156398273717`}, {
       0.8634845990304458, 0.17400700744583422`}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.947380806839389, 0.20147876136715198`}, {
       0.8633334788748963, 0.22709266720427657`}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{0.9474637907573304, 0.25532571914869573`}, {
       0.8632504949569548, 0.28038856656559}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.9475162021129157, 0.3090746206346255}, {0.8631980836013695,
        0.33378252222251736`}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.9475522961431435, 0.3627698971091037}, {0.8631619895711418,
        0.38723010289089616`}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.9475786623002372, 0.4164326611930079}, {0.8631356234140481,
        0.4407101959498491}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.9475987644551734, 0.4700742291214206}, {0.863115521259112, 
       0.49421148516429353`}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{0.9476145970160246, 0.5237012117712427}, {0.8630996886982608,
        0.5477273596573284}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{0.9476273892150205, 0.5773177298942084}, {0.8630868964992646,
        0.6012536986772201}}]}, 
     {Arrowheads[{{0.04133346435805695, 1.}}], 
      ArrowBox[{{0.9476379398600606, 0.6309264856099889}, {0.8630763458542248,
        0.6547878001042966}}]}, 
     {Arrowheads[{{0.041333464358057, 1.}}], 
      ArrowBox[{{0.9476467905242398, 0.684529324488374}, {0.8630674951900453, 
       0.7083278183687689}}]}, 
     {Arrowheads[{{0.041333464358056966`, 1.}}], 
      ArrowBox[{{0.9476543213556377, 0.7381275500162151}, {0.8630599643586477,
        0.761872449983785}}]}, 
     {Arrowheads[{{0.041333464358057015`, 1.}}], 
      ArrowBox[{{0.9310681621423478, 0.}, {1.0189318378576517`, 0.}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{1.0163883000618896`, 0.03883999973584065}, {0.93361169993811,
        0.06830285740701648}}]}, 
     {Arrowheads[{{0.041333464358057036`, 1.}}], 
      ArrowBox[{{1.0166439658169857`, 0.0931504846283499}, {
       0.9333560341830139, 0.12113522965736438`}}]}, 
     {Arrowheads[{{0.04133346435805693, 1.}}], 
      ArrowBox[{{1.016720881545936, 0.14695294782217055`}, {
       0.9332791184540634, 0.17447562360640084`}}]}, 
     {Arrowheads[{{0.04133346435805692, 1.}}], 
      ArrowBox[{{1.0167579293006042`, 0.20063720821080855`}, {
       0.9332420706993954, 0.22793422036062003`}}]}, 
     {Arrowheads[{{0.04133346435805702, 1.}}], 
      ArrowBox[{{1.0167797238443474`, 0.2542754988829741}, {
       0.9332202761556522, 0.28143878683131157`}}]}, 
     {Arrowheads[{{0.04133346435805697, 1.}}], 
      ArrowBox[{{1.0167940764738344`, 0.30789115848331905`}, {
       0.9332059235261652, 0.33496598437382374`}}]}, 
     {Arrowheads[{{0.041333464358057015`, 1.}}], 
      ArrowBox[{{1.0168042427997883`, 0.36149401386468366`}, {
       0.9331957572002113, 0.3885059861353162}}]}, 
     {Arrowheads[{{0.04133346435805705, 1.}}], 
      ArrowBox[{{1.0168118212008752`, 0.41508892192700036`}, {
       0.9331881787991243, 0.4420539352158566}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{1.0168176882425646`, 0.46867855888417775`}, {
       0.9331823117574349, 0.4956071554015364}}]}, 
     {Arrowheads[{{0.041333464358056994`, 1.}}], 
      ArrowBox[{{1.0168223647884749`, 0.5222645206215141}, {
       0.9331776352115245, 0.549164050807057}}]}, 
     {Arrowheads[{{0.04133346435805701, 1.}}], 
      ArrowBox[{{1.0168261798043572`, 0.575847817853438}, {0.9331738201956422,
        0.6027236107179903}}]}, 
     {Arrowheads[{{0.041333464358056946`, 1.}}], 
      ArrowBox[{{1.0168293512776585`, 0.6294291218100472}, {
       0.9331706487223409, 0.6562851639042383}}]}, 
     {Arrowheads[{{0.04133346435805696, 1.}}], 
      ArrowBox[{{1.0168320293757451`, 0.6830088957298893}, {
       0.9331679706242545, 0.7098482471272536}}]}, 
     {Arrowheads[{{0.04133346435805692, 1.}}], 
      ArrowBox[{{1.0168343209173172`, 0.7365874696295623}, {
       0.9331656790826823, 0.7634125303704377}}]}}},
   AspectRatio->1,
   Frame->True,
   FrameLabel->{{
      FormBox[
      "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
       TraditionalForm], 
      FormBox["\"\"", TraditionalForm]}, {
      FormBox[
       RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
      FormBox["\"\"", TraditionalForm]}},
   ImageSize->{83.91304272109045, Automatic},
   Method->{"TransparentPolygonMesh" -> True},
   PlotRange->{{-0.043931837857651944`, 
    1.018931837857652}, {-0.043931837857651944`, 0.793931837857652}},
   PlotRangeClipping->True,
   PlotRangePadding->{
     Scaled[0.02], 
     Scaled[0.02]}]}]], "Input",
 CellChangeTimes->{{3.5690302858010597`*^9, 3.5690302859790697`*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, 
   {Hue[0.67, 0.6, 0.6], 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{-0.043931837857651944`, 0.}, {0.043931837857651944`, 0.}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{-0.0435216683545385, 0.05956064898719075}, {
      0.0435216683545385, 0.04758220815566639}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{-0.04227147999080847, 0.1191064835553501}, {
      0.04227147999080847, 0.09517923073036418}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{-0.04025744057000309, 0.17830248790506376`}, {
      0.04025744057000309, 0.14312608352350767`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{-0.03767124017648707, 0.23688845839160652`}, {
      0.03767124017648707, 0.19168297017982203`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{-0.03475472315126165, 0.2947293514792524}, {
      0.03475472315126165, 0.24098493423503334`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{-0.03173231838731406, 0.3518105783951487}, {
      0.03173231838731406, 0.2910465644619941}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{-0.028772302221797316`, 0.4081988102559199}, {
      0.028772302221797316`, 0.34180118974407997`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{-0.025979692585391127`, 0.4639982820969618}, {
      0.025979692585391127`, 0.3931445750458952}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{-0.023407466172256853`, 0.5193194210635003}, {
      0.023407466172256853`, 0.4449662932222138}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{-0.021072855776326147`, 0.5742621926221992}, {
      0.021072855776326147`, 0.49716637880637193`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{-0.01897162623794993, 0.6289099969345969}, {
      0.01897162623794993, 0.5496614316368315}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{-0.017088256462417812`, 0.6833293292155007}, {
      0.017088256462417812`, 0.6023849564987848}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{-0.01540237331998574, 0.7375718974203141}, {
      0.01540237331998574, 0.6552852454368286}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{-0.01389246694273922, 0.7916774008282177}, {
      0.01389246694273922, 0.7083225991717823}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.0257110192852052, 0.}, {0.11357469500050907`, 0.}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.026099730537118865`, 0.05940259508831587}, {
      0.11318598374859543`, 0.047740262054541266`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.027349342893828017`, 0.11902835376765959`}, {
      0.11193637139188625`, 0.09525736051805467}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.029481449878162445`, 0.17852068187045242`}, {
      0.10980426440755187`, 0.142907889558119}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.03236286506131131, 0.2375281015974966}, {
      0.10692284922440298`, 0.19104332697393195`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.03574420742062585, 0.2958015148228981}, {
      0.10354150686508842`, 0.2399127708913876}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.039343335226861134`, 0.35323965989176453`}, {
      0.09994237905885316, 0.28961748296537826`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.04292040334680569, 0.4098699991492531}, {0.0963653109389086,
       0.3401300008507468}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.04631242534481407, 0.46579638430905}, {0.09297328894090022, 
      0.39134647283380697`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.04943126185150934, 0.5211492385865361}, {
      0.08985445243420495, 0.44313647569917797`}}]}, 
    {Arrowheads[{{0.041333464358056946`, 1.}}], 
     ArrowBox[{{0.05224441987155072, 0.5760541017533732}, {
      0.08704129441416357, 0.49537446967519794`}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.05475401736360258, 0.630617649004267}, {0.08453169692211171,
       0.5479537795671614}}]}, 
    {Arrowheads[{{0.041333464358057036`, 1.}}], 
     ArrowBox[{{0.056980533942088255`, 0.6849246118648011}, {
      0.08230518034362604, 0.6007896738494845}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.058952280077978744`, 0.739039813367418}, {
      0.08033343420773555, 0.6538173294897248}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.0606993411865581, 0.7930118576661186}, {0.0785863730991562, 
      0.7069881423338814}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.09535387642806234, 0.}, {0.18321755214336624`, 0.}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.09571735704559756, 0.059210987503524895`}, {
      0.18285407152583102`, 0.04793186963933224}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.096964474728144, 0.11892925013909514`}, {
      0.18160695384328457`, 0.09535646414661912}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.09925325499338745, 0.17880872078585439`}, {
      0.17931817357804114`, 0.14261985064271698`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.10256040518308213`, 0.2383950081133473}, {
      0.17601102338834645`, 0.19017642045808128`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.10664864519317904`, 0.2972651026401693}, {
      0.17192278337824954`, 0.23844918307411642`}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.11114497424464909`, 0.3551643851506711}, {
      0.1674264543267795, 0.2876927577064717}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.11567628935996556`, 0.4120486360373287}, {
      0.16289513921146304`, 0.3379513639626712}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.11996829414090143`, 0.4680282867395569}, {
      0.15860313443052715`, 0.3891145704033001}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.12387003865128512`, 0.5232812008417116}, {
      0.15470138992014346`, 0.44100451344400243`}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.1273289658573914, 0.5779877117000372}, {
      0.15124246271403718`, 0.493440859728534}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.1303531876324818, 0.6322998555085761}, {
      0.14821824093894675`, 0.5462715730628522}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.13298083006570036`, 0.6863342036193797}, {
      0.14559059850572822`, 0.5993800820949059}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.13526072026175215`, 0.7401756376234385}, {
      0.14331070830967643`, 0.6526815052337042}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.13724208364176782`, 0.7938842790910611}, {
      0.14132934492966076`, 0.7061157209089388}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.16499673357091948`, 0.}, {0.2528604092862234, 0.}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.1653301792010281, 0.058973888448587364`}, {
      0.25252696365611477`, 0.048168968694269766`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.1665713889042702, 0.11879942036509594`}, {
      0.25128575395287267`, 0.09548629392061835}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.16907827225416255`, 0.17920644711475825`}, {
      0.24877887060298035`, 0.14222212431381318`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.17304671872763186`, 0.23963327875055182`}, {
      0.24481042412951104`, 0.1889381498208767}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.17830888440954137`, 0.2993601767492565}, {
      0.23954825844760153`, 0.23635410896502917`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.18431980498766842`, 0.3578210842822904}, {
      0.23353733786947448`, 0.2850360585748523}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.19040661287962193`, 0.41483645854066364`}, {
      0.22745052997752097`, 0.33516354145933624`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.19605423963531463`, 0.4705744993928358}, {
      0.22180290322182827`, 0.3865683577500212}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.20100876267238169`, 0.5253549272947995}, {
      0.2168483801847612, 0.43893078699091453`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.20522115041199396`, 0.5794894088661039}, {
      0.21263599244514889`, 0.4919391625624673}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.20875145139929974`, 0.6332171950944264}, {
      0.20910569145784313`, 0.545354233477002}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.21169890206952507`, 0.6867015455294431}, {
      0.2061582407876178, 0.5990127401848425}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.21416548983482075`, 0.7400471576408423}, {
      0.20369165302232212`, 0.6528099852163005}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.21624135201903233`, 0.7933189290909505}, {
      0.20161579083811057`, 0.7066810709090494}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.23463959071377663`, 0.}, {0.32250326642908056`, 0.}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.2349367990191425, 0.05867294612856608}, {
      0.32220605812371467`, 0.04846991101429106}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.236165808892263, 0.11862195977228708`}, {0.3209770482505942,
       0.09566375451342721}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.2389976311455721, 0.17979099756010167`}, {
      0.31814522599728506`, 0.14163757386846976`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.2441116695104441, 0.24153514332578624`}, {
      0.31303118763241305`, 0.18703628524564228`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.2515801021587303, 0.3025194375883662}, {
      0.30556275498412694`, 0.2331948481259195}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.2603854023178024, 0.3614195057344043}, {0.2967574548250547, 
      0.2814376371227385}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.2689944791653971, 0.41787526580238693`}, {0.28814837797746, 
      0.33212473419761296`}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.2763850975847638, 0.47244882975207925`}, {
      0.2807577595580933, 0.38469402739077774`}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.28229860624579356`, 0.5259163025651075}, {
      0.27484425089706366`, 0.43836941172060667`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.2869019254968666, 0.5788490651680661}, {
      0.27024093164599056`, 0.492579506260505}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.2904745784914808, 0.6315742635577308}, {
      0.26666827865137643`, 0.5469971650136974}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.2932721779310208, 0.6842563499246395}, {0.2638706792118364, 
      0.601457935789646}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.29549339781208966`, 0.7369705661324478}, {
      0.2616494593307675, 0.6558865767246951}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.2972840525918816, 0.7897472524814003}, {
      0.25985880455097554`, 0.7102527475185997}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.3042824478566338, 0.}, {0.3921461235719377, 0.}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.3045353375166349, 0.058278429941511445`}, {
      0.3918932339119364, 0.0488644272013457}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.30573988550006714`, 0.11836478674490919`}, {
      0.39068868592850425`, 0.09592092754080507}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.3091087852495372, 0.18073343182376245`}, {
      0.3873197861790342, 0.14069513960480895`}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.3165814295570925, 0.24477126477917505`}, {
      0.3798471418714789, 0.18380016379225347`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.32894182160854313`, 0.30733597902088866`}, {
      0.36748674982002827`, 0.22837830669339704`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.34289990100705015`, 0.3650377871144161}, {
      0.35352867042152125`, 0.27781935574272676`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.35429616333600317`, 0.41850881683228663`}, {
      0.3421324080925682, 0.3314911831677133}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.36220746294049566`, 0.4702151239966294}, {
      0.33422110848807574`, 0.3869277331462276}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.3675019814388696, 0.5216142540168833}, {
      0.32892658998970176`, 0.4426714602688308}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.37111275807684885`, 0.5732065027867922}, {
      0.32531581335172255`, 0.49822206864177904`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.37366298016833865`, 0.6250959129466442}, {
      0.3227655912602328, 0.5534755156247841}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.3755302622089477, 0.6772641741980489}, {0.3208983092196237, 
      0.6084501115162366}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.3769426046812182, 0.7296654495443814}, {0.3194859667473532, 
      0.6631916933127615}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.3780411750285959, 0.7822546593747773}, {
      0.31838739639997554`, 0.7177453406252228}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.3739253049994909, 0.}, {0.46178898071479474`, 0.}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.3741234125115096, 0.057738826753323515`}, {
      0.46159087320277603`, 0.049404030389533615`}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.3752775246948361, 0.11795870175634818`}, {
      0.4604367610194495, 0.0963270125293661}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.37970848997478235`, 0.18250159075213268`}, {
      0.45600579573950323`, 0.13892698067643872`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.3937076062609896, 0.2509845733925323}, {0.442006679453296, 
      0.17758685517889627`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.4177561503932934, 0.3117888646316564}, {0.4179581353209923, 
      0.2239254210826293}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.43537673580958514`, 0.3617159173368309}, {
      0.4003375499047005, 0.2811412255203119}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.44415147635928637`, 0.4101939540720998}, {
      0.3915628093549993, 0.33980604592790015`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.4486274272518368, 0.4599273845578224}, {
      0.38708685846244884`, 0.3972154725850346}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.4511739272742537, 0.5107784687768833}, {
      0.38454035844003187`, 0.4535072455088308}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.45276952750741783`, 0.5623813398369716}, {
      0.3829447582068678, 0.5090472315915997}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.4538462698708434, 0.6144807359039376}, {
      0.38186801584344227`, 0.5640906926674907}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.4546149782325904, 0.6669168169210721}, {
      0.38109930748169524`, 0.6187974687932134}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.4551881420168038, 0.7195889444672859}, {
      0.38052614369748183`, 0.673268198389857}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.45563037336506107`, 0.7724318843289344}, {
      0.38008391234922456`, 0.7275681156710656}}]}, 
    {Arrowheads[{{0.04133346435805694, 1.}}], 
     ArrowBox[{{0.443568162142348, 0.}, {0.5314318378576518, 0.}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.44369877362883603`, 0.05695653505912976}, {
      0.5313012263711638, 0.05018632208372738}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.44474000380167955`, 0.11722199910388979`}, {
      0.5302599961983202, 0.09706371518182448}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.45225937167449637`, 0.18694603161071313`}, {
      0.5227406283255035, 0.1344825398178583}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.4921334497313736, 0.25797252603866616`}, {
      0.4828665502686263, 0.1705989025327624}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.518181031495179, 0.29930043600437617`}, {
      0.45681896850482084`, 0.23641384970990956`}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.5244545163895895, 0.34518504625045043`}, {
      0.45054548361041036`, 0.2976720966066923}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.5266725599301066, 0.3948876073491311}, {
      0.44832744006989317`, 0.3551123926508688}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.5277331216291262, 0.44621518955164335`}, {
      0.4472668783708737, 0.41092766759121363`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.5283383878460294, 0.4983364501872773}, {0.4466616121539705, 
      0.46594926409843684`}}]}, 
    {Arrowheads[{{0.041333464358057015`, 1.}}], 
     ArrowBox[{{0.5287247085058789, 0.5508974930881027}, {0.446275291494121, 
      0.5205310783404685}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.5289907960910246, 0.6037259434142299}, {0.4460092039089753, 
      0.5748454851571984}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.5291844013105698, 0.6567285906882232}, {0.4458155986894301, 
      0.6289856950260624}}]}, 
    {Arrowheads[{{0.041333464358057015`, 1.}}], 
     ArrowBox[{{0.529331195179578, 0.7098508472191765}, {0.4456688048204218, 
      0.6830062956379662}}]}, 
    {Arrowheads[{{0.04133346435805694, 1.}}], 
     ArrowBox[{{0.5294461179129196, 0.7630586970860976}, {
      0.44555388208708024`, 0.7369413029139024}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.5132110192852051, 0.}, {0.6010746950005089, 0.}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.5132636886530361, 0.05572199830824697}, {0.6010220256326781,
       0.051420858834610166`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.5140088262648604, 0.11547722921080902`}, {
      0.6002768880208537, 0.09880848507490525}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.5527967886145233, 0.2044306220875232}, {0.5614889256711908, 
      0.11699794934104821`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.597789847341018, 0.23095390451085948`}, {0.5164958669446961,
       0.1976175240605691}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.5997384756500324, 0.27860980120483547`}, {
      0.5145472386356817, 0.2571044845094502}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.6002137643223292, 0.3300832425539413}, {0.5140719499633848, 
      0.31277390030320157`}}]}, 
    {Arrowheads[{{0.041333464358056946`, 1.}}], 
     ArrowBox[{{0.6004142269465362, 0.38258913255018373`}, {
      0.5138714873391779, 0.3674108674498162}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.6005221782309034, 0.43551699402653704`}, {
      0.5137635360548106, 0.42162586311631994`}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.600588928066715, 0.48865786280901874`}, {0.5136967862189991,
       0.47562785147669534`}}]}, 
    {Arrowheads[{{0.04133346435805693, 1.}}], 
     ArrowBox[{{0.6006340284882625, 0.5419210878341857}, {0.5136516857974516, 
      0.5295074835943854}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.6006664362080054, 0.5952610337676165}, {0.5136192780777087, 
      0.5833103948038119}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.6006907990297443, 0.6486522386257481}, {0.5135949152559697, 
      0.6370620470885375}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.6007097566625406, 0.70207938055584}, {0.5135759576231735, 
      0.6907777623013027}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.6007249145988778, 0.755532688808448}, {0.5135607996868363, 
      0.7444673111915519}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.5828538764280622, 0.}, {0.670717552143366, 0.}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.5828539479116477, 0.053492177038583}, {0.6707174806597808, 
      0.053650680104274144`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.5828588179259591, 0.10648395369746089`}, {
      0.6707126106454693, 0.1078017605882534}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.6707151633566205, 0.16025615704494833`}, {
      0.5828562652148079, 0.16117241438362304`}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.6707168523417018, 0.21403774925435406`}, {
      0.5828545762297265, 0.21453367931707448`}}]}, 
    {Arrowheads[{{0.041333464358056946`, 1.}}], 
     ArrowBox[{{0.6707171218324376, 0.2676626987399399}, {0.5828543067389909, 
      0.2680515869743458}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.6707172232840889, 0.32125858708592936`}, {
      0.5828542052873394, 0.32159855577121343`}}]}, 
    {Arrowheads[{{0.041333464358057036`, 1.}}], 
     ArrowBox[{{0.6707172752743469, 0.3748440299609871}, {0.5828541532970815, 
      0.37515597003901285`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.670717306581282, 0.4284245411076372}, {0.5828541219901462, 
      0.4287183160352197}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.6707173274005742, 0.48200233427185823`}, {0.582854101170854,
       0.4822833800138559}}]}, 
    {Arrowheads[{{0.04133346435805693, 1.}}], 
     ArrowBox[{{0.6707173422072312, 0.5355784707062842}, {0.5828540863641971, 
      0.5358501007222869}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.6707173532599275, 0.5891535227943173}, {0.5828540753115008, 
      0.589417905777111}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.6707173618171377, 0.642727826478473}, {0.5828540667542907, 
      0.6429864592358125}}]}, 
    {Arrowheads[{{0.041333464358057015`, 1.}}], 
     ArrowBox[{{0.6707173686337492, 0.6963015919192278}, {0.582854059937679, 
      0.696555550937915}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.6707173741892551, 0.7498749573247527}, {0.5828540543821733, 
      0.7501250426752473}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.6524967335709193, 0.}, {0.7403604092862232, 0.}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.6528096671475457, 0.048337160057705525`}, {
      0.7400474757095968, 0.05880569708515162}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.7335724528269719, 0.08368356362807775}, {0.6592846900301708,
       0.13060215065763653`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.7394692489803294, 0.15191051076051698`}, {
      0.6533878938768132, 0.1695180606680544}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.7398559322395524, 0.2076471368369019}, {0.6530012106175901, 
      0.22092429173452668`}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.7399783934337971, 0.2620761930334403}, {0.6528787494233455, 
      0.2736380926808454}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.7400368957766871, 0.3161068776098183}, {0.6528202470804556, 
      0.32675026524732453`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.7400708517256044, 0.36996435227341923`}, {
      0.6527862911315382, 0.38003564772658066`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.7400929388811585, 0.4237310367983934}, {0.6527642039759841, 
      0.4334118203444635}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.7401084210256168, 0.47744422790333424`}, {
      0.6527487218315257, 0.4868414863823799}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.7401198615526825, 0.531123256979703}, {0.6527372813044601, 
      0.5403053144488682}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.7401286537564407, 0.5847791432956527}, {0.652728489100702, 
      0.5937922852757758}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.7401356184463256, 0.6384186275041409}, {0.6527215244108169, 
      0.6472956582101446}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.7401412699215186, 0.6920460643817207}, {0.6527158729356238, 
      0.7008110784754222}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.7401459465282807, 0.7456643925520949}, {0.6527111963288619, 
      0.7543356074479051}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.7221395907137764, 0.}, {0.8100032664290803, 0.}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.7301362561825505, 0.02829951208429505}, {0.8020066009603062,
       0.0788433450585621}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.8067391054989326, 0.09052520295006665}, {0.7254037516439242,
       0.12376051133564764`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8085100805602927, 0.149357913277672}, {0.723632776582564, 
      0.1720706581508994}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8089020795226342, 0.20451116996656574`}, {
      0.7232407776202227, 0.2240602586048628}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.8090680903706617, 0.2588408547254685}, {0.7230747667721951, 
      0.2768734309888171}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.8091589273224299, 0.31285688379232013`}, {
      0.7229839298204268, 0.33000025906482267`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.8092160126129715, 0.36672043205032734`}, {
      0.7229268445298853, 0.38327956794967255`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8092551421706097, 0.42049843300999606`}, {
      0.7228877149722471, 0.4366444241328609}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8092836100648103, 0.47422365591204824`}, {
      0.7228592470780465, 0.4900620583736658}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.8093052396477725, 0.5279140320411023}, {0.7228376174950844, 
      0.5435145393874689}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.8093222249752472, 0.5815801975615459}, {0.7228206321676096, 
      0.5969912310098826}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.8093359138252533, 0.6352288603982539}, {0.7228069433176035, 
      0.6504854253160317}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.8093471792808642, 0.688864460239159}, {0.7227956778619927, 
      0.7039926826179838}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8093566115468609, 0.742490052441305}, {0.7227862455959959, 
      0.7575099475586952}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.7917824478566335, 0.}, {0.8796461235719374, 0.}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8654744411713732, 0.021255186142566357`}, {
      0.8059541302571978, 0.08588767100029077}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.8769837193279978, 0.0920816411642446}, {0.7944448521005731, 
      0.12220407312146966`}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8778070209809521, 0.1481362089407348}, {0.7936215504476188, 
      0.1732923624878366}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.8780844818135427, 0.2026765429086732}, {0.7933440896150283, 
      0.2258948856627553}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.8782222924986477, 0.2567631923988236}, {0.7932062789299233, 
      0.2789510933154621}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.8783044223658595, 0.3106542205176682}, {0.7931241490627117, 
      0.33220292233947457`}}]}, 
    {Arrowheads[{{0.04133346435805698, 1.}}], 
     ArrowBox[{{0.8783588743104954, 0.36444322771814097`}, {
      0.7930696971180756, 0.38555677228185886`}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.8783975973972934, 0.4181723285468003}, {0.7930309740312776, 
      0.43897052859605673`}}]}, 
    {Arrowheads[{{0.041333464358056946`, 1.}}], 
     ArrowBox[{{0.8784265366210602, 0.47186326570993786`}, {
      0.7930020348075109, 0.49242244857577616`}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.8784489795006486, 0.5255283972141694}, {0.7929795919279223, 
      0.5459001742144017}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.878466890446061, 0.5791752659178329}, {0.7929616809825101, 
      0.5993961626535954}}]}, 
    {Arrowheads[{{0.04133346435805694, 1.}}], 
     ArrowBox[{{0.8784815150337373, 0.6328087363223512}, {0.7929470563948338, 
      0.6529055493919343}}]}, 
    {Arrowheads[{{0.04133346435805699, 1.}}], 
     ArrowBox[{{0.8784936810293307, 0.6864320863447978}, {0.7929348903992403, 
      0.7064250565123451}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{0.878503959914455, 0.7400476053437188}, {0.7929246115141161, 
      0.7599523946562812}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.8614253049994907, 0.}, {0.9492889807147945, 0.}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.9450207234401989, 0.034682099496990214`}, {
      0.8656935622740864, 0.07246075764586693}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.9468699399229222, 0.09276599874728199}, {0.863844345791363, 
      0.1215197155384323}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.9472296866838393, 0.14742156398273717`}, {
      0.8634845990304458, 0.17400700744583422`}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.947380806839389, 0.20147876136715198`}, {0.8633334788748963,
       0.22709266720427657`}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{0.9474637907573304, 0.25532571914869573`}, {
      0.8632504949569548, 0.28038856656559}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.9475162021129157, 0.3090746206346255}, {0.8631980836013695, 
      0.33378252222251736`}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.9475522961431435, 0.3627698971091037}, {0.8631619895711418, 
      0.38723010289089616`}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.9475786623002372, 0.4164326611930079}, {0.8631356234140481, 
      0.4407101959498491}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.9475987644551734, 0.4700742291214206}, {0.863115521259112, 
      0.49421148516429353`}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{0.9476145970160246, 0.5237012117712427}, {0.8630996886982608, 
      0.5477273596573284}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{0.9476273892150205, 0.5773177298942084}, {0.8630868964992646, 
      0.6012536986772201}}]}, 
    {Arrowheads[{{0.04133346435805695, 1.}}], 
     ArrowBox[{{0.9476379398600606, 0.6309264856099889}, {0.8630763458542248, 
      0.6547878001042966}}]}, 
    {Arrowheads[{{0.041333464358057, 1.}}], 
     ArrowBox[{{0.9476467905242398, 0.684529324488374}, {0.8630674951900453, 
      0.7083278183687689}}]}, 
    {Arrowheads[{{0.041333464358056966`, 1.}}], 
     ArrowBox[{{0.9476543213556377, 0.7381275500162151}, {0.8630599643586477, 
      0.761872449983785}}]}, 
    {Arrowheads[{{0.041333464358057015`, 1.}}], 
     ArrowBox[{{0.9310681621423478, 0.}, {1.0189318378576517`, 0.}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{1.0163883000618896`, 0.03883999973584065}, {0.93361169993811, 
      0.06830285740701648}}]}, 
    {Arrowheads[{{0.041333464358057036`, 1.}}], 
     ArrowBox[{{1.0166439658169857`, 0.0931504846283499}, {0.9333560341830139,
       0.12113522965736438`}}]}, 
    {Arrowheads[{{0.04133346435805693, 1.}}], 
     ArrowBox[{{1.016720881545936, 0.14695294782217055`}, {0.9332791184540634,
       0.17447562360640084`}}]}, 
    {Arrowheads[{{0.04133346435805692, 1.}}], 
     ArrowBox[{{1.0167579293006042`, 0.20063720821080855`}, {
      0.9332420706993954, 0.22793422036062003`}}]}, 
    {Arrowheads[{{0.04133346435805702, 1.}}], 
     ArrowBox[{{1.0167797238443474`, 0.2542754988829741}, {0.9332202761556522,
       0.28143878683131157`}}]}, 
    {Arrowheads[{{0.04133346435805697, 1.}}], 
     ArrowBox[{{1.0167940764738344`, 0.30789115848331905`}, {
      0.9332059235261652, 0.33496598437382374`}}]}, 
    {Arrowheads[{{0.041333464358057015`, 1.}}], 
     ArrowBox[{{1.0168042427997883`, 0.36149401386468366`}, {
      0.9331957572002113, 0.3885059861353162}}]}, 
    {Arrowheads[{{0.04133346435805705, 1.}}], 
     ArrowBox[{{1.0168118212008752`, 0.41508892192700036`}, {
      0.9331881787991243, 0.4420539352158566}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{1.0168176882425646`, 0.46867855888417775`}, {
      0.9331823117574349, 0.4956071554015364}}]}, 
    {Arrowheads[{{0.041333464358056994`, 1.}}], 
     ArrowBox[{{1.0168223647884749`, 0.5222645206215141}, {0.9331776352115245,
       0.549164050807057}}]}, 
    {Arrowheads[{{0.04133346435805701, 1.}}], 
     ArrowBox[{{1.0168261798043572`, 0.575847817853438}, {0.9331738201956422, 
      0.6027236107179903}}]}, 
    {Arrowheads[{{0.041333464358056946`, 1.}}], 
     ArrowBox[{{1.0168293512776585`, 0.6294291218100472}, {0.9331706487223409,
       0.6562851639042383}}]}, 
    {Arrowheads[{{0.04133346435805696, 1.}}], 
     ArrowBox[{{1.0168320293757451`, 0.6830088957298893}, {0.9331679706242545,
       0.7098482471272536}}]}, 
    {Arrowheads[{{0.04133346435805692, 1.}}], 
     ArrowBox[{{1.0168343209173172`, 0.7365874696295623}, {0.9331656790826823,
       0.7634125303704377}}]}}},
  AspectRatio->1,
  Frame->True,
  FrameLabel->{{
     FormBox[
     "\"Infected \
(\\!\\(\\*\\nStyleBox[\\\"I\\\",\\nFontSlant->\\\"Italic\\\"]\\))\"", 
      TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}, {
     FormBox[
      RowBox[{"\"Susceptible \"", "(", "S", ")"}], TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}},
  ImageSize->{355.6521733722073, Automatic},
  Method->{"TransparentPolygonMesh" -> True},
  PlotRange->{{-0.043931837857651944`, 
   1.018931837857652}, {-0.043931837857651944`, 0.793931837857652}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eqS", "=", 
   RowBox[{
    RowBox[{"\[Mu]", " ", "n"}], "+", 
    RowBox[{"\[Nu]", " ", "r"}], "-", 
    RowBox[{"\[Beta]", " ", "s", " ", 
     FractionBox["i", "n"]}], "-", 
    RowBox[{"\[Mu]", " ", "s"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eqI", "=", 
   RowBox[{
    RowBox[{"\[Beta]", " ", "s", " ", 
     FractionBox["i", "n"]}], "-", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"\[Mu]", "+", "\[Gamma]"}], ")"}], "i"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eqR", "=", 
   RowBox[{
    RowBox[{"\[Gamma]", " ", "i"}], " ", "-", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], "r"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"sumEq", "=", 
   RowBox[{"s", "+", "i", "+", "r"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"sol", "=", 
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"eqS", "\[Equal]", "0"}], "&&", 
     RowBox[{"eqI", "\[Equal]", "0"}], "&&", 
     RowBox[{"eqR", "\[Equal]", "0"}], "&&", 
     RowBox[{"sumEq", "\[Equal]", "n"}]}], ",", 
    RowBox[{"{", 
     RowBox[{"s", ",", "i", ",", "r"}], "}"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"eqS", "=", 
  RowBox[{"eqS", "/.", 
   RowBox[{"{", 
    RowBox[{"r", "\[Rule]", 
     RowBox[{"n", "-", "s", "-", "i"}]}], "}"}]}]}], "\[IndentingNewLine]", 
 RowBox[{"MatrixForm", "[", 
  RowBox[{"(", GridBox[{
     {
      RowBox[{"D", "[", 
       RowBox[{"eqS", ",", "s"}], "]"}], 
      RowBox[{"D", "[", 
       RowBox[{"eqS", ",", "i"}], "]"}]},
     {
      RowBox[{"D", "[", 
       RowBox[{"eqI", ",", "s"}], "]"}], 
      RowBox[{"D", "[", 
       RowBox[{"eqI", ",", "i"}], "]"}]}
    }], ")"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Jaco", "=", 
  RowBox[{
   RowBox[{"(", GridBox[{
      {
       RowBox[{"D", "[", 
        RowBox[{"eqS", ",", "s"}], "]"}], 
       RowBox[{"D", "[", 
        RowBox[{"eqS", ",", "i"}], "]"}]},
      {
       RowBox[{"D", "[", 
        RowBox[{"eqI", ",", "s"}], "]"}], 
       RowBox[{"D", "[", 
        RowBox[{"eqI", ",", "i"}], "]"}]}
     }], ")"}], "/.", "sol"}]}], "\[IndentingNewLine]", 
 RowBox[{"MatrixForm", "[", 
  RowBox[{"Jaco", "[", 
   RowBox[{"[", "1", "]"}], "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"MatrixForm", "[", 
  RowBox[{"Jaco", "[", 
   RowBox[{"[", "2", "]"}], "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"eigen1", "=", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Eigenvalues", "[", 
    RowBox[{"Jaco", "[", 
     RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"eigen2", "=", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Eigenvalues", "[", 
    RowBox[{"Jaco", "[", 
     RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Reduce", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"eigen2", "[", 
      RowBox[{"[", "1", "]"}], "]"}], "<", "0"}], "&&", 
    RowBox[{
     RowBox[{"eigen2", "[", 
      RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "&&", 
    RowBox[{"\[Mu]", ">", "0"}], "&&", 
    RowBox[{"\[Beta]", ">", "0"}], "&&", 
    RowBox[{"\[Gamma]", ">", "0"}], "&&", 
    RowBox[{"\[Nu]", ">", "0"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Mu]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Nu]"}], "}"}], 
   ",", "Reals"}], "]"}]}], "Input",
 CellChangeTimes->{{3.571164711999408*^9, 3.5711648996365376`*^9}, {
  3.571164968651058*^9, 3.571165004375121*^9}, {3.571165045169193*^9, 
  3.571165382909786*^9}, {3.5711654226118555`*^9, 3.5711654623763256`*^9}, {
  3.5711655141528163`*^9, 3.571165599968567*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"s", "\[Rule]", "n"}], ",", 
     RowBox[{"i", "\[Rule]", "0"}], ",", 
     RowBox[{"r", "\[Rule]", "0"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"s", "\[Rule]", 
      FractionBox[
       RowBox[{"n", " ", 
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}]}], "\[Beta]"]}], ",", 
     RowBox[{"i", "\[Rule]", 
      FractionBox[
       RowBox[{"n", " ", 
        RowBox[{"(", 
         RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], 
       RowBox[{"\[Beta]", " ", 
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]]}], ",", 
     RowBox[{"r", "\[Rule]", 
      RowBox[{"-", 
       FractionBox[
        RowBox[{"n", " ", "\[Gamma]", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "\[Beta]"}], "+", "\[Gamma]", "+", "\[Mu]"}], ")"}]}], 
        RowBox[{"\[Beta]", " ", 
         RowBox[{"(", 
          RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]]}]}]}], 
    "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.571165600717368*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", 
   FractionBox[
    RowBox[{"i", " ", "s", " ", "\[Beta]"}], "n"]}], "+", 
  RowBox[{"n", " ", "\[Mu]"}], "-", 
  RowBox[{"s", " ", "\[Mu]"}], "+", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "i"}], "+", "n", "-", "s"}], ")"}], " ", 
   "\[Nu]"}]}]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.5711656007329683`*^9}],

Cell[BoxData[
 TagBox[
  RowBox[{"(", "\[NoBreak]", GridBox[{
     {
      RowBox[{
       RowBox[{"-", 
        FractionBox[
         RowBox[{"i", " ", "\[Beta]"}], "n"]}], "-", "\[Mu]", "-", "\[Nu]"}], 
      RowBox[{
       RowBox[{"-", 
        FractionBox[
         RowBox[{"s", " ", "\[Beta]"}], "n"]}], "-", "\[Nu]"}]},
     {
      FractionBox[
       RowBox[{"i", " ", "\[Beta]"}], "n"], 
      RowBox[{
       FractionBox[
        RowBox[{"s", " ", "\[Beta]"}], "n"], "-", "\[Gamma]", "-", "\[Mu]"}]}
    },
    GridBoxAlignment->{
     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
      "RowsIndexed" -> {}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[0.7]}, 
        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
  Function[BoxForm`e$, 
   MatrixForm[BoxForm`e$]]]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.5711656007329683`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "\[Mu]"}], "-", "\[Nu]"}], ",", 
       RowBox[{
        RowBox[{"-", "\[Beta]"}], "-", "\[Nu]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0", ",", 
       RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}]}], "}"}]}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "\[Mu]"}], "-", "\[Nu]", "-", 
        FractionBox[
         RowBox[{
          RowBox[{"(", 
           RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}], ")"}], " ", 
          RowBox[{"(", 
           RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], 
         RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}]]}], ",", 
       RowBox[{
        RowBox[{"-", "\[Gamma]"}], "-", "\[Mu]", "-", "\[Nu]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       FractionBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], 
        RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}]], ",", "0"}], 
      "}"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.5711656007329683`*^9}],

Cell[BoxData[
 TagBox[
  RowBox[{"(", "\[NoBreak]", GridBox[{
     {
      RowBox[{
       RowBox[{"-", "\[Mu]"}], "-", "\[Nu]"}], 
      RowBox[{
       RowBox[{"-", "\[Beta]"}], "-", "\[Nu]"}]},
     {"0", 
      RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}]}
    },
    GridBoxAlignment->{
     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
      "RowsIndexed" -> {}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[0.7]}, 
        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
  Function[BoxForm`e$, 
   MatrixForm[BoxForm`e$]]]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.5711656007329683`*^9}],

Cell[BoxData[
 TagBox[
  RowBox[{"(", "\[NoBreak]", GridBox[{
     {
      RowBox[{
       RowBox[{"-", "\[Mu]"}], "-", "\[Nu]", "-", 
       FractionBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], 
        RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}]]}], 
      RowBox[{
       RowBox[{"-", "\[Gamma]"}], "-", "\[Mu]", "-", "\[Nu]"}]},
     {
      FractionBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], 
       RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}]], "0"}
    },
    GridBoxAlignment->{
     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
      "RowsIndexed" -> {}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[0.7]}, 
        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
  Function[BoxForm`e$, 
   MatrixForm[BoxForm`e$]]]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.5711656007329683`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"\[Beta]", "-", "\[Gamma]", "-", "\[Mu]"}], ",", 
   RowBox[{
    RowBox[{"-", "\[Mu]"}], "-", "\[Nu]"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.5711647460074673`*^9, 3.571164903006143*^9, 3.571164978650676*^9, 
   3.5711650462611947`*^9, 3.571165176271823*^9, {3.571165222525904*^9, 
   3.5711652489991508`*^9}, {3.571165281509608*^9, 3.5711653032872458`*^9}, {
   3.5711653340661*^9, 3.5711653847817893`*^9}, 3.5711654295694675`*^9, 
   3.5711654629067264`*^9, 3.5711656007329683`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"s1", "=", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"-", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", 
        RowBox[{"(", 
         RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]], 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], "+", 
        RowBox[{
         SqrtBox[
          RowBox[{"\[Mu]", "+", "\[Nu]"}]], " ", 
         RowBox[{"\[Sqrt]", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
            RowBox[{"4", " ", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
            RowBox[{"8", " ", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", 
             "\[Nu]"}], "-", 
            RowBox[{"2", " ", "\[Beta]", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"4", " ", "\[Gamma]"}], "+", 
               RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
            RowBox[{"2", " ", "\[Beta]", " ", 
             SuperscriptBox["\[Nu]", "2"]}], "+", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"4", " ", "\[Gamma]"}], "+", 
               RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
             SuperscriptBox["\[Nu]", "2"]}], "+", 
            SuperscriptBox["\[Nu]", "3"], "+", 
            RowBox[{
             SuperscriptBox["\[Beta]", "2"], " ", 
             RowBox[{"(", 
              RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}], ")"}]}]}]}], 
       ")"}]}]}], ",", 
    RowBox[{
     FractionBox["1", 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]], 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"-", 
         RowBox[{"(", 
          RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}]}], " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], "+", 
       RowBox[{
        SqrtBox[
         RowBox[{"\[Mu]", "+", "\[Nu]"}]], " ", 
        RowBox[{"\[Sqrt]", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
           RowBox[{"4", " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
           RowBox[{"8", " ", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}],
            "-", 
           RowBox[{"2", " ", "\[Beta]", " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"4", " ", "\[Gamma]"}], "+", 
              RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
           RowBox[{"2", " ", "\[Beta]", " ", 
            SuperscriptBox["\[Nu]", "2"]}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"4", " ", "\[Gamma]"}], "+", 
              RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
            SuperscriptBox["\[Nu]", "2"]}], "+", 
           SuperscriptBox["\[Nu]", "3"], "+", 
           RowBox[{
            SuperscriptBox["\[Beta]", "2"], " ", 
            RowBox[{"(", 
             RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}], ")"}]}]}]}], 
      ")"}]}]}], "}"}]}]], "Input",
 CellChangeTimes->{{3.5711691938424244`*^9, 3.571169194924486*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"-", 
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], "+", 
      RowBox[{
       SqrtBox[
        RowBox[{"\[Mu]", "+", "\[Nu]"}]], " ", 
       SqrtBox[
        RowBox[{
         RowBox[{
          RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
         RowBox[{"4", " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
         RowBox[{"8", " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], 
         "-", 
         RowBox[{"2", " ", "\[Beta]", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"4", " ", "\[Gamma]"}], "+", 
            RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
         RowBox[{"2", " ", "\[Beta]", " ", 
          SuperscriptBox["\[Nu]", "2"]}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"4", " ", "\[Gamma]"}], "+", 
            RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
          SuperscriptBox["\[Nu]", "2"]}], "+", 
         SuperscriptBox["\[Nu]", "3"], "+", 
         RowBox[{
          SuperscriptBox["\[Beta]", "2"], " ", 
          RowBox[{"(", 
           RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}]]}]}], 
     RowBox[{"2", " ", 
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]]}], ",", 
   FractionBox[
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "\[Beta]"}], "-", "\[Nu]"}], ")"}], " ", 
      RowBox[{"(", 
       RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], "+", 
     RowBox[{
      SqrtBox[
       RowBox[{"\[Mu]", "+", "\[Nu]"}]], " ", 
      SqrtBox[
       RowBox[{
        RowBox[{
         RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
        RowBox[{"4", " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
        RowBox[{"8", " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], 
        "-", 
        RowBox[{"2", " ", "\[Beta]", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"4", " ", "\[Gamma]"}], "+", 
           RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
        RowBox[{"2", " ", "\[Beta]", " ", 
         SuperscriptBox["\[Nu]", "2"]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"4", " ", "\[Gamma]"}], "+", 
           RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
         SuperscriptBox["\[Nu]", "2"]}], "+", 
        SuperscriptBox["\[Nu]", "3"], "+", 
        RowBox[{
         SuperscriptBox["\[Beta]", "2"], " ", 
         RowBox[{"(", 
          RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}]]}]}], 
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.5711691962765636`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{"s1", "[", 
   RowBox[{"[", "1", "]"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.571169202217903*^9, 3.5711692091292987`*^9}, {
  3.571169273844*^9, 3.5711692998494873`*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}], "+", 
    RowBox[{
     SqrtBox[
      RowBox[{"\[Mu]", "+", "\[Nu]"}]], " ", 
     SqrtBox[
      RowBox[{
       RowBox[{
        RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
       RowBox[{"4", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
       RowBox[{"8", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], 
       "-", 
       RowBox[{"2", " ", "\[Beta]", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"4", " ", "\[Gamma]"}], "+", 
          RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
       RowBox[{"2", " ", "\[Beta]", " ", 
        SuperscriptBox["\[Nu]", "2"]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"4", " ", "\[Gamma]"}], "+", 
          RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
        SuperscriptBox["\[Nu]", "2"]}], "+", 
       SuperscriptBox["\[Nu]", "3"], "+", 
       RowBox[{
        SuperscriptBox["\[Beta]", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}]]}]}], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{"\[Gamma]", "+", "\[Mu]", "+", "\[Nu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{
  3.5711692098443394`*^9, {3.5711692746860485`*^9, 3.5711693015455847`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[Delta]", "=", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}]], "Input",
 CellChangeTimes->{{3.571165674583498*^9, 3.571165676627102*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], " ", 
  RowBox[{"(", 
   RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]], "Output",
 CellChangeTimes->{3.5711656782807045`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Chi]", "=", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
    RowBox[{"4", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
    RowBox[{"8", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], "-", 
    RowBox[{"2", " ", "\[Beta]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", "\[Gamma]"}], "+", 
       RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
    RowBox[{"2", " ", "\[Beta]", " ", 
     SuperscriptBox["\[Nu]", "2"]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", "\[Gamma]"}], "+", 
       RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
     SuperscriptBox["\[Nu]", "2"]}], "+", 
    SuperscriptBox["\[Nu]", "3"], "+", 
    RowBox[{
     SuperscriptBox["\[Beta]", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"\[Chi]", "=", 
  RowBox[{"\[Chi]", 
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}]}], "Input",
 CellChangeTimes->{{3.571165685706318*^9, 3.5711657142387676`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
    RowBox[{"4", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
    RowBox[{"8", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], "-", 
    RowBox[{"2", " ", "\[Beta]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", "\[Gamma]"}], "+", 
       RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
    RowBox[{"2", " ", "\[Beta]", " ", 
     SuperscriptBox["\[Nu]", "2"]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", "\[Gamma]"}], "+", 
       RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
     SuperscriptBox["\[Nu]", "2"]}], "+", 
    SuperscriptBox["\[Nu]", "3"], "+", 
    RowBox[{
     SuperscriptBox["\[Beta]", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{3.5711657146287684`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 SuperscriptBox["\[Delta]", "2"]], "Input",
 CellChangeTimes->{{3.571165734284803*^9, 3.57116573851241*^9}}],

Cell[BoxData[
 RowBox[{
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{"\[Beta]", "+", "\[Nu]"}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], "2"]}]], "Output",
 CellChangeTimes->{3.5711657389960113`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Reduce", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     SuperscriptBox["\[Delta]", "2"], ">", "\[Chi]"}], "&&", 
    RowBox[{"\[Mu]", ">", "0"}], "&&", 
    RowBox[{"\[Beta]", ">", "0"}], "&&", 
    RowBox[{"\[Gamma]", ">", "0"}], "&&", 
    RowBox[{"\[Nu]", ">", "0"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Mu]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Nu]"}], "}"}], 
   ",", "Reals"}], "]"}]], "Input",
 CellChangeTimes->{{3.5711657590888467`*^9, 3.571165785624493*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"\[Mu]", ">", "0"}], "&&", 
  RowBox[{"\[Beta]", ">", "\[Mu]"}], "&&", 
  RowBox[{"0", "<", "\[Gamma]", "<", 
   RowBox[{"\[Beta]", "-", "\[Mu]"}]}], "&&", 
  RowBox[{"\[Nu]", ">", "0"}]}]], "Output",
 CellChangeTimes->{3.5711657870908957`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Reduce", "[", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], 
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
     RowBox[{"4", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
     RowBox[{"8", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], "-", 
     RowBox[{"2", " ", "\[Beta]", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "\[Gamma]"}], "+", 
        RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
     RowBox[{"2", " ", "\[Beta]", " ", 
      SuperscriptBox["\[Nu]", "2"]}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "\[Gamma]"}], "+", 
        RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
      SuperscriptBox["\[Nu]", "2"]}], "+", 
     SuperscriptBox["\[Nu]", "3"], "+", 
     RowBox[{
      SuperscriptBox["\[Beta]", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}], ")"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.571165746811625*^9, 3.5711657482468276`*^9}, {
  3.5711695942943287`*^9, 3.571169632061489*^9}}],

Cell[BoxData[
 RowBox[{"Reduce", "[", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "4"}], " ", "\[Beta]", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
     RowBox[{"4", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "3"]}], "+", 
     RowBox[{"8", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"\[Gamma]", "+", "\[Mu]"}], ")"}], "2"], " ", "\[Nu]"}], "-", 
     RowBox[{"2", " ", "\[Beta]", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "\[Gamma]"}], "+", 
        RowBox[{"3", " ", "\[Mu]"}]}], ")"}], " ", "\[Nu]"}], "-", 
     RowBox[{"2", " ", "\[Beta]", " ", 
      SuperscriptBox["\[Nu]", "2"]}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "\[Gamma]"}], "+", 
        RowBox[{"5", " ", "\[Mu]"}]}], ")"}], " ", 
      SuperscriptBox["\[Nu]", "2"]}], "+", 
     SuperscriptBox["\[Nu]", "3"], "+", 
     RowBox[{
      SuperscriptBox["\[Beta]", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"\[Mu]", "+", "\[Nu]"}], ")"}]}]}], ")"}]}], "]"}]], "Output",
 CellChangeTimes->{3.5711696335885763`*^9}]
}, Open  ]]
},
WindowSize->{1904, 945},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
Magnification->1.4999996423721313`,
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, 22412, 524, 1539, "Input"],
Cell[22994, 548, 402, 9, 32, "Message"],
Cell[23399, 559, 213, 3, 43, "Output"],
Cell[23615, 564, 3043, 57, 376, "Output"],
Cell[26661, 623, 10127, 175, 371, "Output"],
Cell[36791, 800, 6268, 108, 371, "Output"],
Cell[43062, 910, 20304, 356, 376, "Output"]
}, Open  ]],
Cell[63381, 1269, 17409, 311, 359, "Input"],
Cell[80793, 1582, 17087, 301, 359, "Input"],
Cell[CellGroupData[{
Cell[97905, 1887, 23186, 548, 1719, "Input"],
Cell[121094, 2437, 123, 2, 43, "Output"],
Cell[121220, 2441, 125, 2, 43, "Output"],
Cell[121348, 2445, 141, 2, 43, "Output"],
Cell[121492, 2449, 139, 2, 43, "Output"],
Cell[121634, 2453, 21009, 353, 362, "Output"],
Cell[142646, 2808, 19292, 326, 370, "Output"],
Cell[161941, 3136, 21236, 357, 371, "Output"],
Cell[183180, 3495, 62488, 1054, 376, "Output"]
}, Open  ]],
Cell[245683, 4552, 52991, 893, 359, "Input"],
Cell[CellGroupData[{
Cell[298699, 5449, 6208, 162, 740, "Input"],
Cell[304910, 5613, 228, 4, 43, "Output"],
Cell[305141, 5619, 270, 6, 43, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[305448, 5630, 6232, 163, 740, "Input"],
Cell[311683, 5795, 267, 4, 43, "Output"],
Cell[311953, 5801, 396, 8, 43, "Output"],
Cell[312352, 5811, 36628, 697, 543, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[349017, 6513, 10327, 311, 2355, "Input"],
Cell[359347, 6826, 154, 3, 43, "Output"],
Cell[359504, 6831, 29293, 505, 561, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[388834, 7341, 6585, 170, 857, "Input"],
Cell[395422, 7513, 306, 5, 43, "Output"],
Cell[395731, 7520, 405, 9, 43, "Output"],
Cell[396139, 7531, 36256, 685, 561, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[432432, 8221, 7031, 179, 857, "Input"],
Cell[439466, 8402, 516, 7, 43, "Output"],
Cell[439985, 8411, 647, 11, 43, "Output"],
Cell[440635, 8424, 37273, 702, 550, "Output"]
}, Open  ]],
Cell[477923, 9129, 74319, 1378, 149, "Input"],
Cell[552245, 10509, 36073, 681, 554, "Input"],
Cell[CellGroupData[{
Cell[588343, 11194, 3675, 108, 513, "Input"],
Cell[592021, 11304, 1546, 41, 68, "Output"],
Cell[593570, 11347, 683, 17, 65, "Output"],
Cell[594256, 11366, 1368, 36, 107, "Output"],
Cell[595627, 11404, 1624, 45, 67, "Output"],
Cell[597254, 11451, 1124, 28, 84, "Output"],
Cell[598381, 11481, 1620, 41, 111, "Output"],
Cell[600004, 11524, 543, 11, 43, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[600584, 11540, 3899, 108, 119, InheritFromParent],
Cell[604486, 11650, 3402, 100, 155, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[607925, 11755, 234, 5, 44, "Input"],
Cell[608162, 11762, 1691, 50, 82, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[609890, 11817, 261, 7, 44, "Input"],
Cell[610154, 11826, 206, 6, 43, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[610397, 11837, 1341, 40, 76, "Input"],
Cell[611741, 11879, 1233, 37, 49, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[613011, 11921, 122, 2, 47, "Input"],
Cell[613136, 11925, 258, 8, 46, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[613431, 11938, 501, 13, 50, "Input"],
Cell[613935, 11953, 278, 7, 43, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[614250, 11965, 1370, 39, 50, "Input"],
Cell[615623, 12006, 1301, 38, 49, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)