(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    142515,       2887]
NotebookOptionsPosition[    139150,       2762]
NotebookOutlinePosition[    139557,       2780]
CellTagsIndexPosition[    139514,       2777]
WindowFrame->Normal
ContainsDynamic->False*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["APPENDIX C", "Text",
 CellChangeTimes->{{3.3931670131553783`*^9, 3.39316701760128*^9}},
 TextAlignment->Left,
 FontSize->16,
 FontWeight->"Bold"],

Cell["Simultaneous determination of k and Tc with n=1.", "Text",
 CellChangeTimes->{
  3.3932541151780024`*^9, {3.393256437730439*^9, 3.393256443380356*^9}},
 TextAlignment->Left,
 FontSize->16,
 FontWeight->"Bold"],

Cell["\<\
Programmed by: Mark D. Normand and Micha Peleg
Last modified: August 1, 2007\
\>", "Text",
 CellChangeTimes->{{3.393166039594693*^9, 3.39316605992082*^9}, {
   3.393241773739553*^9, 3.393241777356629*^9}, 3.39324181747005*^9, {
   3.393241865841612*^9, 3.3932418680779676`*^9}, 3.393330050497901*^9, {
   3.393339938926812*^9, 3.393339939354993*^9}, {3.393340931847633*^9, 
   3.3933409388732967`*^9}, 3.393768549884416*^9, 3.393844866871951*^9, {
   3.394191726851714*^9, 3.3941917269981422`*^9}, {3.394965254744875*^9, 
   3.394965256657276*^9}},
 TextAlignment->Left,
 FontSize->14]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Assign the two parameters k and Tc their original values.  These are the \
values we are trying to recover. (In this case, n=1 by definition.)\
\>", "Text",
 CellChangeTimes->{{3.393167057906272*^9, 3.393167104947035*^9}, 
   3.393242067205596*^9, {3.3932524597927837`*^9, 3.3932524674366493`*^9}, 
   3.393252764466267*^9, {3.3933300596388693`*^9, 3.3933300633790083`*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"k", "=", "0.035"}], ";", " ", 
  RowBox[{"Tc", "=", "110."}], ";"}]], "Input",
 CellChangeTimes->{{3.393167044544138*^9, 3.393167047360354*^9}, 
   3.393241927165762*^9},
 FontSize->14]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Assign the final time values, tCycle1, tCycle2 and tCycle3, for the three \
survival curves.\
\>", "Text",
 CellChangeTimes->{{3.393339719425305*^9, 3.39333974191691*^9}, 
   3.393341354175434*^9},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"tCycle1", "=", "7."}], ";", 
  RowBox[{"tCycle2", "=", "7.5"}], ";", 
  RowBox[{"tCycle3", "=", "8."}], ";"}]], "Input",
 FontSize->14]
}, Open  ]],

Cell[CellGroupData[{

Cell["Define the three temperature profile functions.", "Text",
 CellChangeTimes->{{3.393166362624907*^9, 3.393166454118064*^9}, {
   3.393166577468137*^9, 3.393166582658086*^9}, {3.393166725191359*^9, 
   3.393166781654152*^9}, {3.393166882404248*^9, 3.3931668998421392`*^9}, 
   3.393252230849867*^9, 3.3933303398865747`*^9},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"T1", "[", "t_", "]"}], ":=", 
   RowBox[{
    RowBox[{
     RowBox[{"110", "/", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"Exp", "[", 
         RowBox[{"9", "*", 
          RowBox[{"(", 
           RowBox[{"1", "-", "t"}], ")"}]}], "]"}]}], ")"}]}], "/", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"Exp", "[", 
        RowBox[{"9", "*", 
         RowBox[{"(", 
          RowBox[{"t", "-", "6."}], ")"}]}], "]"}]}], ")"}]}], "+", "20"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.39333080816358*^9, 3.393330816299164*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"T2", "[", "t_", "]"}], ":=", 
   RowBox[{
    RowBox[{
     RowBox[{"133", "/", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"Exp", "[", 
         RowBox[{"9", "*", 
          RowBox[{"(", 
           RowBox[{"1", "-", "t"}], ")"}]}], "]"}]}], ")"}]}], "/", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"Exp", "[", 
        RowBox[{"9", "*", 
         RowBox[{"(", 
          RowBox[{"t", "-", "5."}], ")"}]}], "]"}]}], ")"}]}], "+", "20"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.393330809518353*^9, 3.393330815059342*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"T3", "[", "t_", "]"}], ":=", 
   RowBox[{
    RowBox[{
     RowBox[{"160", "/", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"Exp", "[", 
         RowBox[{"9", "*", 
          RowBox[{"(", 
           RowBox[{"1", "-", "t"}], ")"}]}], "]"}]}], ")"}]}], "/", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"Exp", "[", 
        RowBox[{"9", "*", 
         RowBox[{"(", 
          RowBox[{"t", "-", "4.5"}], ")"}]}], "]"}]}], ")"}]}], "+", "20"}]}],
   ";"}]], "Input",
 CellChangeTimes->{3.393330810824532*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Compute and save the three temperatures at time tCycle3 using the three \
temperature profile functions.\
\>", "Text",
 CellChangeTimes->{{3.393322237848249*^9, 3.3933222418990507`*^9}, {
   3.393325056163465*^9, 3.3933250652433043`*^9}, {3.393325526678794*^9, 
   3.393325542925816*^9}, {3.393326043888006*^9, 3.393326044481868*^9}, 
   3.393327194632271*^9, {3.3933303708437433`*^9, 3.393330378065383*^9}, {
   3.393330985699769*^9, 3.393330989439679*^9}, {3.393339427103109*^9, 
   3.393339429086478*^9}, {3.393772884477716*^9, 3.3937728861669083`*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"tCycle3T1", "=", 
   RowBox[{"T1", "[", "tCycle3", "]"}]}], ";", 
  RowBox[{"Print", "[", 
   RowBox[{"\"\<T1[tCycle3]=\>\"", ",", "tCycle3T1"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.393322100432173*^9, 3.3933221278763723`*^9}, 
   3.39332554916901*^9, {3.393325607619711*^9, 3.393325612349854*^9}, 
   3.393326084597148*^9, {3.393330385984529*^9, 3.3933304059236383`*^9}, {
   3.393330996182164*^9, 3.393331003269291*^9}, {3.393331046968734*^9, 
   3.393331048972906*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"T1[tCycle3]=\"\>", "\[InvisibleSpace]", 
   "20.000001675297746`"}],
  SequenceForm["T1[tCycle3]=", 20.000001675297746`],
  Editable->False]], "Print",
 CellChangeTimes->{3.393320121581217*^9, 3.3933221852294617`*^9, 
  3.393323123591468*^9, 3.3933252890246973`*^9, 3.3933254396472607`*^9, 
  3.3933257653010883`*^9, 3.393326611064291*^9, 3.393327059591311*^9, 
  3.393327201570022*^9, 3.393327837129407*^9, 3.3933286890721703`*^9, 
  3.393330481761557*^9, 3.393330838455962*^9, 3.3933310811866903`*^9, 
  3.393339336616654*^9, 3.3933399263090687`*^9, 3.393340379244706*^9, 
  3.393341226105783*^9, 3.3937690275234203`*^9, 3.3938449477756777`*^9, 
  3.3941917306380367`*^9, 3.394202733968403*^9, 3.394207933868371*^9, 
  3.394965368021757*^9, 3.3949668332989883`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"tCycle3T2", "=", 
   RowBox[{"T2", "[", "tCycle3", "]"}]}], ";", 
  RowBox[{"Print", "[", 
   RowBox[{"\"\<T2[tCycle3]=\>\"", ",", "tCycle3T2"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.39332215124137*^9, 3.3933221528608713`*^9}, {
   3.393325557500794*^9, 3.393325579892871*^9}, 3.393325619031274*^9, 
   3.39332609024548*^9, {3.393330392021524*^9, 3.393330410491646*^9}, {
   3.393330997885365*^9, 3.393331004684204*^9}, {3.393331050948956*^9, 
   3.393331053101078*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"T2[tCycle3]=\"\>", "\[InvisibleSpace]", 
   "20.000000000249976`"}],
  SequenceForm["T2[tCycle3]=", 20.000000000249976`],
  Editable->False]], "Print",
 CellChangeTimes->{3.393320121694007*^9, 3.393322185357984*^9, 
  3.393323123750484*^9, 3.393325289185557*^9, 3.393325439912942*^9, 
  3.3933257654491453`*^9, 3.393326611145443*^9, 3.3933270598144608`*^9, 
  3.393327201651826*^9, 3.393327837210575*^9, 3.393328689155407*^9, 
  3.393330481869207*^9, 3.3933308385259132`*^9, 3.393331081294511*^9, 
  3.3933393367146387`*^9, 3.393339926410222*^9, 3.39334037936642*^9, 
  3.393341226211865*^9, 3.393769027627445*^9, 3.393844947878705*^9, 
  3.3941917307816553`*^9, 3.394202734060958*^9, 3.3942079339447927`*^9, 
  3.394965368139865*^9, 3.394966833377267*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"tCycle3T3", "=", 
   RowBox[{"T3", "[", "tCycle3", "]"}]}], ";", 
  RowBox[{"Print", "[", 
   RowBox[{"\"\<T3[tCycle3]=\>\"", ",", "tCycle3T3"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.393322170793523*^9, 3.393322172397147*^9}, {
   3.393325566670063*^9, 3.393325582959031*^9}, 3.393325626854475*^9, 
   3.3933261158418827`*^9, {3.3933303956527243`*^9, 3.393330414259577*^9}, 
   3.393331055262907*^9}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"T3[tCycle3]=\"\>", "\[InvisibleSpace]", "20.00000000000334`"}],
  
  SequenceForm["T3[tCycle3]=", 20.00000000000334],
  Editable->False]], "Print",
 CellChangeTimes->{3.3933201217909107`*^9, 3.393322185505349*^9, 
  3.393323123897531*^9, 3.393325289315895*^9, 3.393325440102467*^9, 
  3.3933257655674067`*^9, 3.393326611225205*^9, 3.393327059898323*^9, 
  3.393327201743946*^9, 3.3933278373035583`*^9, 3.3933286892366247`*^9, 
  3.393330481976028*^9, 3.393330838605731*^9, 3.393331081400239*^9, 
  3.393339336807788*^9, 3.393339926501018*^9, 3.393340379487528*^9, 
  3.39334122632506*^9, 3.3937690277338057`*^9, 3.393844947967454*^9, 
  3.394191730920383*^9, 3.394202734145694*^9, 3.3942079340263243`*^9, 
  3.394965368264694*^9, 3.394966833457037*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Define the three survival functions as function modules.", "Text",
 CellChangeTimes->{{3.393340195045807*^9, 3.393340195302422*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"LS1", "[", 
   RowBox[{
    RowBox[{"k_", "?", "NumericQ"}], ",", 
    RowBox[{"Tc_", "?", "NumericQ"}], ",", 
    RowBox[{"tFinal_", "?", "NumericQ"}]}], "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"b1", ",", "t", ",", "T1", ",", "x"}], "}"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{"T1", "[", "t_", "]"}], ":=", 
      RowBox[{
       RowBox[{
        RowBox[{"110", "/", 
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{"Exp", "[", 
            RowBox[{"9.", "*", 
             RowBox[{"(", 
              RowBox[{"1", "-", "t"}], ")"}]}], "]"}]}], ")"}]}], "/", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"Exp", "[", 
           RowBox[{"9", "*", 
            RowBox[{"(", 
             RowBox[{"t", "-", "6."}], ")"}]}], "]"}]}], ")"}]}], "+", 
       "20"}]}], ";", 
     RowBox[{
      RowBox[{"b1", "[", "t_", "]"}], ":=", 
      RowBox[{"Log", "[", 
       RowBox[{"1.", "+", 
        RowBox[{"Exp", "[", 
         RowBox[{"k", "*", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"T1", "[", "t", "]"}], "-", "Tc"}], ")"}]}], "]"}]}], 
       "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"bInt1", "[", "t_", "]"}], ":=", 
      RowBox[{"NIntegrate", "[", 
       RowBox[{
        RowBox[{"-", 
         RowBox[{"b1", "[", "x", "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{"x", ",", "0", ",", "t"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"bInt1", "[", "tFinal", "]"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.393339887526169*^9, 3.3933398878273153`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"LS2", "[", 
   RowBox[{
    RowBox[{"k_", "?", "NumericQ"}], ",", 
    RowBox[{"Tc_", "?", "NumericQ"}], ",", 
    RowBox[{"tFinal_", "?", "NumericQ"}]}], "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"b2", ",", "t", ",", "T2", ",", "x"}], "}"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{"T2", "[", "t_", "]"}], ":=", 
      RowBox[{
       RowBox[{
        RowBox[{"133", "/", 
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{"Exp", "[", 
            RowBox[{"9.", "*", 
             RowBox[{"(", 
              RowBox[{"1", "-", "t"}], ")"}]}], "]"}]}], ")"}]}], "/", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"Exp", "[", 
           RowBox[{"9", "*", 
            RowBox[{"(", 
             RowBox[{"t", "-", "5."}], ")"}]}], "]"}]}], ")"}]}], "+", 
       "20"}]}], ";", 
     RowBox[{
      RowBox[{"b2", "[", "t_", "]"}], ":=", 
      RowBox[{"Log", "[", 
       RowBox[{"1.", "+", 
        RowBox[{"Exp", "[", 
         RowBox[{"k", "*", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"T2", "[", "t", "]"}], "-", "Tc"}], ")"}]}], "]"}]}], 
       "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"bInt2", "[", "t_", "]"}], ":=", 
      RowBox[{"NIntegrate", "[", 
       RowBox[{
        RowBox[{"-", 
         RowBox[{"b2", "[", "x", "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{"x", ",", "0", ",", "t"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"bInt2", "[", "tFinal", "]"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.393339891562159*^9, 3.3933398917635098`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"LS3", "[", 
   RowBox[{
    RowBox[{"k_", "?", "NumericQ"}], ",", 
    RowBox[{"Tc_", "?", "NumericQ"}], ",", 
    RowBox[{"tFinal_", "?", "NumericQ"}]}], "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"b3", ",", "t", ",", "T3", ",", "x"}], "}"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{"T3", "[", "t_", "]"}], ":=", 
      RowBox[{
       RowBox[{
        RowBox[{"160", "/", 
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{"Exp", "[", 
            RowBox[{"9.", "*", 
             RowBox[{"(", 
              RowBox[{"1", "-", "t"}], ")"}]}], "]"}]}], ")"}]}], "/", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"Exp", "[", 
           RowBox[{"9", "*", 
            RowBox[{"(", 
             RowBox[{"t", "-", "4.5"}], ")"}]}], "]"}]}], ")"}]}], "+", 
       "20"}]}], ";", 
     RowBox[{
      RowBox[{"b3", "[", "t_", "]"}], ":=", 
      RowBox[{"Log", "[", 
       RowBox[{"1.", "+", 
        RowBox[{"Exp", "[", 
         RowBox[{"k", "*", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"T3", "[", "t", "]"}], "-", "Tc"}], ")"}]}], "]"}]}], 
       "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"bInt3", "[", "t_", "]"}], ":=", 
      RowBox[{"NIntegrate", "[", 
       RowBox[{
        RowBox[{"-", 
         RowBox[{"b3", "[", "x", "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{"x", ",", "0", ",", "t"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"bInt3", "[", "tFinal", "]"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.3933398949497232`*^9, 3.393339895148252*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Compute and save the three survival values at each of the three final times \
(tCycle1, tCycle2 & tCycle3) using the original values for the parameters k \
and Tc.\
\>", "Text",
 CellChangeTimes->{
  3.393252270846343*^9, {3.393252527849209*^9, 3.39325252851716*^9}, {
   3.39333009959886*^9, 3.393330105871035*^9}, {3.3933301622362003`*^9, 
   3.393330197332992*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"lstCycle1", "=", 
   RowBox[{"LS1", "[", 
    RowBox[{"k", ",", "Tc", ",", "tCycle1"}], "]"}]}], ";", 
  RowBox[{"Print", "[", 
   RowBox[{"\"\<LS1[k,Tc,tCycle1]=\>\"", ",", "lstCycle1"}], "]"}]}]], "Input",\

 CellChangeTimes->{{3.393330222143549*^9, 3.393330243018742*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"LS1[k,Tc,tCycle1]=\"\>", "\[InvisibleSpace]", 
   RowBox[{"-", "5.323457255213671`"}]}],
  SequenceForm["LS1[k,Tc,tCycle1]=", -5.323457255213671],
  Editable->False]], "Print",
 CellChangeTimes->{3.3933305781739807`*^9, 3.393330838764044*^9, 
  3.393331091953264*^9, 3.393339337178993*^9, 3.393339926724555*^9, 
  3.393340379717238*^9, 3.393341226585587*^9, 3.393769028117043*^9, 
  3.393844948182076*^9, 3.3941917311577673`*^9, 3.394202734504816*^9, 
  3.394207934480723*^9, 3.394965368614175*^9, 3.3949668336188793`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"lstCycle2", "=", 
   RowBox[{"LS2", "[", 
    RowBox[{"k", ",", "Tc", ",", "tCycle2"}], "]"}]}], ";", 
  RowBox[{"Print", "[", 
   RowBox[{"\"\<LS2[k,Tc,tCycle2]=\>\"", ",", "lstCycle2"}], "]"}]}]], "Input",\

 CellChangeTimes->{{3.3933302478016157`*^9, 3.3933302690761337`*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"LS2[k,Tc,tCycle2]=\"\>", "\[InvisibleSpace]", 
   RowBox[{"-", "6.533848330579998`"}]}],
  SequenceForm["LS2[k,Tc,tCycle2]=", -6.533848330579998],
  Editable->False]], "Print",
 CellChangeTimes->{3.393330585178144*^9, 3.39333083886591*^9, 
  3.393331092054915*^9, 3.393339337298172*^9, 3.39333992683287*^9, 
  3.393340379849668*^9, 3.393341226695669*^9, 3.3937690284154043`*^9, 
  3.393844948286063*^9, 3.394191731279695*^9, 3.39420273459414*^9, 
  3.394207934744274*^9, 3.394965368711134*^9, 3.394966833708251*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"lstCycle3", "=", 
   RowBox[{"LS3", "[", 
    RowBox[{"k", ",", "Tc", ",", "tCycle3"}], "]"}]}], ";", 
  RowBox[{"Print", "[", 
   RowBox[{"\"\<LS3[k,Tc,tCycle3]=\>\"", ",", "lstCycle3"}], "]"}]}]], "Input",\

 CellChangeTimes->{
  3.3931662602221727`*^9, {3.393330273658127*^9, 3.393330287048992*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"LS3[k,Tc,tCycle3]=\"\>", "\[InvisibleSpace]", 
   RowBox[{"-", "8.430087595093248`"}]}],
  SequenceForm["LS3[k,Tc,tCycle3]=", -8.430087595093248],
  Editable->False]], "Print",
 CellChangeTimes->{3.393330590432136*^9, 3.393330838959113*^9, 
  3.393331092155212*^9, 3.39333933757596*^9, 3.393339926934671*^9, 
  3.393340380150382*^9, 3.393341226819251*^9, 3.393769028524839*^9, 
  3.3938449484064493`*^9, 3.39419173158877*^9, 3.394202734687237*^9, 
  3.39420793491243*^9, 3.3949653688137627`*^9, 3.394966833790856*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Find k and Tc using LS1[tCycle1] and LS3[tCycle3].  NOTICE THAT IN EACH \
COMBINATION THE PROGRAM FINDS THE ORIGINAL GENERATION PARAMETER VALUES \
k=0.035 and Tc=110.\
\>", "Text",
 CellChangeTimes->{{3.393166362624907*^9, 3.393166454118064*^9}, {
   3.3931671615911922`*^9, 3.393167165924527*^9}, {3.3932422183664618`*^9, 
   3.3932422232985697`*^9}, {3.393242314952285*^9, 3.393242315424522*^9}, {
   3.393242459395752*^9, 3.393242480010466*^9}, {3.393243035099559*^9, 
   3.393243039247012*^9}, {3.3932525627153597`*^9, 3.393252563470331*^9}, 
   3.3932534949476748`*^9, {3.393340581694598*^9, 3.393340591005661*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{"Clear", "[", 
  RowBox[{"k", ",", "Tc"}], "]"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"frResult", "=", 
  RowBox[{"FindRoot", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"LS1", "[", 
        RowBox[{"k", ",", "Tc", ",", "tCycle1"}], "]"}], "==", "lstCycle1"}], 
      ",", 
      RowBox[{
       RowBox[{"LS3", "[", 
        RowBox[{"k", ",", "Tc", ",", "tCycle3"}], "]"}], "\[Equal]", 
       "lstCycle3"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"k", ",", ".01", ",", ".015"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Tc", ",", "90.", ",", "95."}], "}"}]}], "}"}], ",", 
    RowBox[{"MaxIterations", "\[Rule]", "2000"}]}], "]"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"k", "\[Rule]", "0.03500000000000068`"}], ",", 
   RowBox[{"Tc", "\[Rule]", "110.00000000000229`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.393166623615265*^9, 3.393243787630814*^9, 
  3.3932496426723623`*^9, 3.393250869654623*^9, 3.393252669594225*^9, 
  3.39333059845035*^9, 3.393330839657639*^9, 3.393331092849626*^9, 
  3.393339338278491*^9, 3.3933399279946938`*^9, 3.3933403809072847`*^9, 
  3.3933412278842287`*^9, 3.393769029195719*^9, 3.3938449491222878`*^9, 
  3.3941917323075933`*^9, 3.394202735756583*^9, 3.39420793571881*^9, 
  3.3949653698083057`*^9, 3.394966834506035*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Find k and Tc using LS2(tCycle2) and LS3(tCycle3).", "Text",
 CellChangeTimes->{{3.393166362624907*^9, 3.393166454118064*^9}, {
   3.393166526203062*^9, 3.3931665315765142`*^9}, 3.393166587298316*^9, 
   3.393167175604994*^9, {3.393242243623486*^9, 3.393242245954938*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{"Clear", "[", 
  RowBox[{"k", ",", "Tc"}], "]"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"frResult", "=", 
  RowBox[{"FindRoot", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"LS2", "[", 
        RowBox[{"k", ",", "Tc", ",", "tCycle2"}], "]"}], "==", "lstCycle2"}], 
      ",", 
      RowBox[{
       RowBox[{"LS3", "[", 
        RowBox[{"k", ",", "Tc", ",", "tCycle3"}], "]"}], "\[Equal]", 
       "lstCycle3"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"k", ",", ".01", ",", ".015"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Tc", ",", "90.", ",", "95."}], "}"}]}], "}"}], ",", 
    RowBox[{"MaxIterations", "\[Rule]", "2000"}]}], "]"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"k", "\[Rule]", "0.0350000000002601`"}], ",", 
   RowBox[{"Tc", "\[Rule]", "110.00000000240489`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.393166625337246*^9, 3.393243788467682*^9, 
  3.393249643287869*^9, 3.393250870446741*^9, 3.3932526703281813`*^9, 
  3.3933306041872807`*^9, 3.393330840786152*^9, 3.39333109355436*^9, 
  3.393339338953945*^9, 3.393339928725037*^9, 3.393340381715424*^9, 
  3.393341228685154*^9, 3.393769029870781*^9, 3.3938449497831993`*^9, 
  3.39419173298339*^9, 3.394202736340352*^9, 3.394207936340229*^9, 
  3.394965370477409*^9, 3.394966835131833*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Find k and Tc using LS1(tCycle1) and LS2(tCycle2).", "Text",
 CellChangeTimes->{{3.393166362624907*^9, 3.393166454118064*^9}, {
  3.393166577468137*^9, 3.393166582658086*^9}, {3.393167193317575*^9, 
  3.393167196101915*^9}, {3.393242265526527*^9, 3.393242265924616*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{"Clear", "[", 
  RowBox[{"k", ",", "Tc"}], "]"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"frResult", "=", 
  RowBox[{"FindRoot", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"LS1", "[", 
        RowBox[{"k", ",", "Tc", ",", "tCycle1"}], "]"}], "==", "lstCycle1"}], 
      ",", 
      RowBox[{
       RowBox[{"LS2", "[", 
        RowBox[{"k", ",", "Tc", ",", "tCycle2"}], "]"}], "\[Equal]", 
       "lstCycle2"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"k", ",", ".01", ",", ".02"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Tc", ",", "90.", ",", "95."}], "}"}]}], "}"}], ",", 
    RowBox[{"MaxIterations", "\[Rule]", "2000"}]}], "]"}]}]], "Input",
 CellChangeTimes->{3.3931666688903503`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"k", "\[Rule]", "0.03499999999998977`"}], ",", 
   RowBox[{"Tc", "\[Rule]", "109.9999999999968`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.393166629907181*^9, 3.393166676962244*^9, 
  3.393243789196649*^9, 3.3932496439824247`*^9, 3.393250871183515*^9, 
  3.393252671328047*^9, 3.39333060835049*^9, 3.393330841984303*^9, 
  3.393331094364418*^9, 3.3933393396663*^9, 3.393339929459578*^9, 
  3.3933403824545193`*^9, 3.393341229414462*^9, 3.393769030545883*^9, 
  3.393844950498653*^9, 3.394191733753697*^9, 3.394202737125207*^9, 
  3.3942079370193653`*^9, 3.394965371226275*^9, 3.394966835831992*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Plot the three temperature profile functions.", "Text",
 CellChangeTimes->{{3.393166362624907*^9, 3.393166454118064*^9}, {
   3.393166577468137*^9, 3.393166582658086*^9}, {3.393166725191359*^9, 
   3.393166781654152*^9}, {3.393166882404248*^9, 3.3931668998421392`*^9}, 
   3.393252230849867*^9, {3.393330330715049*^9, 3.393330332134222*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"tempCurvePlot", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"T1", "[", "t", "]"}], ",", 
       RowBox[{"T2", "[", "t", "]"}], ",", 
       RowBox[{"T3", "[", "t", "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0.", ",", "8."}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0.", ",", "10."}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.", ",", "200."}], "}"}]}], "}"}]}], ",", 
     RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.01", "]"}], ",", "LightGray", ",", 
          RowBox[{"Dashing", "[", "None", "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.01", "]"}], ",", "Gray", ",", 
          RowBox[{"Dashing", "[", "None", "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.01", "]"}], ",", "Black", ",", 
          RowBox[{"Dashing", "[", "None", "]"}]}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLabel", "\[Rule]", "\"\<Temperature Profiles\>\""}], ",", 
     RowBox[{"Frame", "\[Rule]", "True"}], ",", 
     RowBox[{"RotateLabel", "\[Rule]", "True"}], ",", 
     RowBox[{"BaseStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}], ",", 
        RowBox[{"FontWeight", "\[Rule]", "\"\<Bold\>\""}], ",", 
        RowBox[{"FontSize", "\[Rule]", "14"}]}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<\>\"", ",", "\"\<Temperature (\[Degree]C)\>\""}], "}"}]}],
      ",", 
     RowBox[{"FrameTicks", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "2", ",", "4", ",", "6", ",", "8", ",", "10"}], 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "50", ",", "100", ",", "150", ",", "200"}], "}"}], 
        ",", 
        RowBox[{"{", "}"}], ",", 
        RowBox[{"{", "}"}]}], "}"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.3932494781597433`*^9, 3.39324949828539*^9}, {
   3.393249561255631*^9, 3.393249658020599*^9}, 3.3932508164105663`*^9, 
   3.393250877249597*^9, {3.3933308823753023`*^9, 3.39333093160261*^9}, 
   3.3933312008690434`*^9, {3.3933312326698236`*^9, 3.393331236179345*^9}, 
   3.3933312752089977`*^9, 3.3937685217923098`*^9, {3.394191561909532*^9, 
   3.39419161012357*^9}, 3.394191697830122*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
ListPlot the temperature at tCycle3 for the three temperature profile \
functions.\
\>", "Text",
 CellChangeTimes->{{3.393168351042939*^9, 3.393168364232419*^9}, 
   3.3932537841910152`*^9, {3.393322372504961*^9, 3.3933224384617233`*^9}, 
   3.393322770438449*^9, 3.3933233004745197`*^9, {3.3933239438840647`*^9, 
   3.393323944731514*^9}, 3.39332503330643*^9, {3.39333063583978*^9, 
   3.393330647794845*^9}, {3.3933311342538*^9, 3.393331141059312*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"tempPtsPlot", "=", 
   RowBox[{"ListPlot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"tCycle3", ",", "tCycle3T1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"tCycle3", ",", "tCycle3T2"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"tCycle3", ",", "tCycle3T3"}], "}"}]}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0.", ",", "10."}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.", ",", "200."}], "}"}]}], "}"}]}], ",", 
     RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"PointSize", "[", "Large", "]"}], ",", "Black"}], "]"}]}], 
     ",", 
     RowBox[{"PlotLabel", "\[Rule]", "\"\<Temperature at tCycle3\>\""}], ",", 
     
     RowBox[{"Frame", "\[Rule]", "True"}], ",", 
     RowBox[{"RotateLabel", "\[Rule]", "True"}], ",", 
     RowBox[{"BaseStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}], ",", 
        RowBox[{"FontWeight", "\[Rule]", "\"\<Bold\>\""}], ",", 
        RowBox[{"FontSize", "\[Rule]", "14"}]}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
       "\"\<Time (arbitrary units)\>\"", ",", 
        "\"\<Temperature (\[Degree]C)\>\""}], "}"}]}], ",", 
     RowBox[{"FrameTicks", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "2", ",", "4", ",", "6", ",", "8", ",", "10"}], 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "50", ",", "100", ",", "150", ",", "200"}], "}"}], 
        ",", 
        RowBox[{"{", "}"}], ",", 
        RowBox[{"{", "}"}]}], "}"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{
  3.393251050701592*^9, {3.393320294224659*^9, 3.393320333211245*^9}, {
   3.393320571080579*^9, 3.393320590759631*^9}, {3.3933208225830812`*^9, 
   3.393320886103772*^9}, {3.393320919192649*^9, 3.3933209459323063`*^9}, {
   3.393320993422297*^9, 3.393321031966597*^9}, {3.393321480456262*^9, 
   3.3933215239096737`*^9}, {3.393321595255995*^9, 3.393321647106287*^9}, {
   3.393321707336195*^9, 3.39332171063087*^9}, {3.3933217576497927`*^9, 
   3.393321775498185*^9}, 3.3933218321220922`*^9, {3.393321874676762*^9, 
   3.393322013321027*^9}, {3.393322462851087*^9, 3.393322463364461*^9}, 
   3.3933227992668552`*^9, {3.393322838191132*^9, 3.393322875539483*^9}, {
   3.393322989348707*^9, 3.3933230303468647`*^9}, {3.393323166028068*^9, 
   3.3933231919176607`*^9}, 3.393323254576283*^9, {3.393323328414671*^9, 
   3.393323354375997*^9}, {3.393323489175621*^9, 3.39332349837894*^9}, {
   3.393323544312173*^9, 3.393323557908409*^9}, {3.3933237239305573`*^9, 
   3.393323751116066*^9}, 3.3933240451270103`*^9, {3.3933240967479343`*^9, 
   3.393324126899761*^9}, {3.393324719907443*^9, 3.39332473324393*^9}, 
   3.3933254311157*^9, {3.3933257483089733`*^9, 3.393325755298956*^9}, {
   3.393325812335999*^9, 3.393325843018764*^9}, {3.393326930078993*^9, 
   3.3933269324271517`*^9}, {3.3933270478841248`*^9, 3.393327054210685*^9}, {
   3.393330654146825*^9, 3.3933307292577143`*^9}, {3.3933311021001787`*^9, 
   3.393331104688555*^9}, {3.393331144577475*^9, 3.393331161249202*^9}, 
   3.393331273211967*^9, 3.393768518941895*^9, 3.3941915638978043`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Show the three temperature profile curves and the temperature point at time \
tCycle3 together on the same plot.\
\>", "Text",
 CellChangeTimes->{{3.393168351042939*^9, 3.393168364232419*^9}, 
   3.3932537841910152`*^9, 3.393322372504961*^9, {3.393323367039167*^9, 
   3.393323441740209*^9}, {3.393331187854454*^9, 3.393331190091475*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"tempProfilePlot", "=", 
   RowBox[{"Show", "[", 
    RowBox[{"tempCurvePlot", ",", "tempPtsPlot", ",", 
     RowBox[{"ImageSize", "\[Rule]", 
      RowBox[{"Scaled", "[", "0.585", "]"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.393323062018441*^9, 3.393323083173884*^9}, {
   3.393323272934407*^9, 3.393323282685367*^9}, {3.393323520755739*^9, 
   3.393323526992766*^9}, 3.393323796966511*^9, 3.393324168607872*^9, {
   3.3949652979584017`*^9, 3.394965312789991*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Plot the three survival curves.", "Text",
 CellChangeTimes->{{3.393166362624907*^9, 3.393166454118064*^9}, {
   3.393166577468137*^9, 3.393166582658086*^9}, {3.393166725191359*^9, 
   3.393166781654152*^9}, {3.393166882404248*^9, 3.393166941203249*^9}, 
   3.3933387585188017`*^9},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"lsCurvePlot", "=", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"LS1", "[", 
        RowBox[{".035", ",", "110.", ",", "t"}], "]"}], ",", 
       RowBox[{"LS2", "[", 
        RowBox[{".035", ",", "110.", ",", "t"}], "]"}], ",", 
       RowBox[{"LS3", "[", 
        RowBox[{".035", ",", "110.", ",", "t"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0.", ",", "8."}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0.", ",", "10."}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10."}], ",", "0.5"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.01", "]"}], ",", "LightGray", ",", 
          RowBox[{"Dashing", "[", "None", "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.01", "]"}], ",", "Gray", ",", 
          RowBox[{"Dashing", "[", "None", "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.01", "]"}], ",", "Black", ",", 
          RowBox[{"Dashing", "[", "None", "]"}]}], "}"}]}], "}"}]}], ",", 
     RowBox[{"PlotLabel", "\[Rule]", "\"\<Survival Curves\\nn=1\>\""}], ",", 
     RowBox[{"Frame", "\[Rule]", "True"}], ",", 
     RowBox[{"RotateLabel", "\[Rule]", "True"}], ",", 
     RowBox[{"BaseStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}], ",", 
        RowBox[{"FontWeight", "\[Rule]", "\"\<Bold\>\""}], ",", 
        RowBox[{"FontSize", "\[Rule]", "14"}]}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
       "\"\<Time (arbitrary units)\>\"", ",", 
        "\"\<\!\(\*SubscriptBox[\(Log\), \(10\)]\)S(t)\>\""}], "}"}]}], ",", 
     RowBox[{"FrameTicks", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "2", ",", "4", ",", "6", ",", "8", ",", "10"}], 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", 
          RowBox[{"-", "8"}], ",", 
          RowBox[{"-", "6"}], ",", 
          RowBox[{"-", "4"}], ",", 
          RowBox[{"-", "2"}], ",", "0"}], "}"}], ",", 
        RowBox[{"{", "}"}], ",", 
        RowBox[{"{", "}"}]}], "}"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.393242403475233*^9, 3.3932424173383093`*^9}, {
   3.3932438191375017`*^9, 3.393243822744152*^9}, {3.3932496839695263`*^9, 
   3.393249758910964*^9}, {3.393249939311345*^9, 3.393249964426009*^9}, {
   3.393250838749571*^9, 3.393250859190398*^9}, 3.393339192919587*^9, {
   3.393339227320574*^9, 3.3933393060117807`*^9}, 3.3933396703786488`*^9, {
   3.393341157574501*^9, 3.393341160606799*^9}, {3.3933411964640408`*^9, 
   3.3933411983524523`*^9}, {3.393768504439052*^9, 3.393768505144226*^9}, 
   3.394191407322955*^9, {3.394191446397706*^9, 3.394191508459991*^9}, {
   3.394202710071759*^9, 3.394202712320156*^9}, 3.394207928306745*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
ListPlot the survival values at time tCycle3 for the three survival curves.\
\>", "Text",
 CellChangeTimes->{{3.393168351042939*^9, 3.393168364232419*^9}, 
   3.3932537841910152`*^9, {3.393322372504961*^9, 3.3933224384617233`*^9}, 
   3.393322770438449*^9, 3.3933233004745197`*^9, {3.393323859054771*^9, 
   3.393323888274333*^9}, {3.393326404691359*^9, 3.393326415582448*^9}, 
   3.393326465735125*^9, {3.393338826352191*^9, 3.3933388739886723`*^9}, {
   3.393339390263722*^9, 3.393339393939906*^9}, 3.3933394758287697`*^9, 
   3.3933419167867002`*^9},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"lsPtsPlot", "=", 
   RowBox[{"ListPlot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"tCycle3", ",", "lstCycle1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"tCycle3", ",", "lstCycle2"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"tCycle3", ",", "lstCycle3"}], "}"}]}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0.", ",", "10."}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10."}], ",", "0.5"}], "}"}]}], "}"}]}], ",", 
     RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"PointSize", "[", "Large", "]"}], ",", "Black"}], "]"}]}], 
     ",", 
     RowBox[{"PlotLabel", "\[Rule]", "\"\<Survival at tCycle3\>\""}], ",", 
     RowBox[{"Frame", "\[Rule]", "True"}], ",", 
     RowBox[{"RotateLabel", "\[Rule]", "True"}], ",", 
     RowBox[{"BaseStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Helvetica\>\""}], ",", 
        RowBox[{"FontWeight", "\[Rule]", "\"\<Bold\>\""}], ",", 
        RowBox[{"FontSize", "\[Rule]", "14"}]}], "}"}]}], ",", 
     RowBox[{"FrameLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
       "\"\<\>\"", ",", "\"\<\!\(\*SubscriptBox[\(Log\), \(10\)]\)S(t)\>\""}],
        "}"}]}], ",", 
     RowBox[{"FrameTicks", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "2", ",", "4", ",", "6", ",", "8", ",", "10"}], 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "10"}], ",", 
          RowBox[{"-", "8"}], ",", 
          RowBox[{"-", "6"}], ",", 
          RowBox[{"-", "4"}], ",", 
          RowBox[{"-", "2"}], ",", "0"}], "}"}], ",", 
        RowBox[{"{", "}"}], ",", 
        RowBox[{"{", "}"}]}], "}"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{
  3.393251050701592*^9, {3.393320294224659*^9, 3.393320333211245*^9}, {
   3.393320571080579*^9, 3.393320590759631*^9}, {3.3933208225830812`*^9, 
   3.393320886103772*^9}, {3.393320919192649*^9, 3.3933209459323063`*^9}, {
   3.393320993422297*^9, 3.393321031966597*^9}, {3.393321480456262*^9, 
   3.3933215239096737`*^9}, {3.393321595255995*^9, 3.393321647106287*^9}, {
   3.393321707336195*^9, 3.39332171063087*^9}, {3.3933217576497927`*^9, 
   3.393321775498185*^9}, 3.3933218321220922`*^9, {3.393321874676762*^9, 
   3.393322013321027*^9}, {3.393322462851087*^9, 3.393322463364461*^9}, 
   3.3933227992668552`*^9, {3.393322838191132*^9, 3.393322875539483*^9}, {
   3.393322989348707*^9, 3.3933230303468647`*^9}, {3.393323166028068*^9, 
   3.3933231919176607`*^9}, 3.393323254576283*^9, {3.393323328414671*^9, 
   3.393323354375997*^9}, {3.393323489175621*^9, 3.39332349837894*^9}, {
   3.393323544312173*^9, 3.393323557908409*^9}, {3.3933237239305573`*^9, 
   3.393323751116066*^9}, {3.393323894850007*^9, 3.39332392933667*^9}, {
   3.393324198458137*^9, 3.3933242203481817`*^9}, {3.393324253002262*^9, 
   3.393324299245779*^9}, {3.3933244200930223`*^9, 3.3933244387682858`*^9}, 
   3.393324554558779*^9, {3.393325728692493*^9, 3.393325735147439*^9}, {
   3.393325871387785*^9, 3.393325876316062*^9}, 3.393327824896139*^9, 
   3.393338900893297*^9, {3.393338934394993*^9, 3.393338937474901*^9}, {
   3.393338977946499*^9, 3.393338983905766*^9}, {3.393339369878024*^9, 
   3.393339400826179*^9}, 3.393339490325576*^9, 3.39333966498777*^9, 
   3.393768509596757*^9, {3.394191409402565*^9, 3.39419142338344*^9}, {
   3.3942027024846287`*^9, 3.394202704959762*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Show the three survival curves and the survival values at time tCycle3 \
together on the same plot.\
\>", "Text",
 CellChangeTimes->{{3.393168351042939*^9, 3.393168364232419*^9}, 
   3.3932537841910152`*^9, 3.393322372504961*^9, {3.393323367039167*^9, 
   3.393323441740209*^9}, {3.39332435574153*^9, 3.3933243770256643`*^9}, {
   3.393326446391835*^9, 3.3933264740635233`*^9}, {3.3933395940344677`*^9, 
   3.39333960323083*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[BoxData[
 RowBox[{
  RowBox[{"survivalPlot", "=", 
   RowBox[{"Show", "[", 
    RowBox[{"lsCurvePlot", ",", "lsPtsPlot", ",", 
     RowBox[{"ImageSize", "\[Rule]", 
      RowBox[{"Scaled", "[", "0.6", "]"}]}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.393323062018441*^9, 3.393323083173884*^9}, {
   3.393323272934407*^9, 3.393323282685367*^9}, {3.393323520755739*^9, 
   3.393323526992766*^9}, 3.393323796966511*^9, 3.393324168607872*^9, {
   3.393324385406657*^9, 3.393324411709361*^9}, 3.393326584402074*^9, {
   3.394965303214017*^9, 3.394965308782172*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Show the temperature and the survival plots together in the same graphics \
image.\
\>", "Text",
 CellChangeTimes->{{3.393168351042939*^9, 3.393168364232419*^9}, 
   3.3932537841910152`*^9, 3.393322372504961*^9, {3.393323367039167*^9, 
   3.393323441740209*^9}, {3.39332435574153*^9, 3.3933243770256643`*^9}, {
   3.393326446391835*^9, 3.3933264740635233`*^9}, {3.394961631708231*^9, 
   3.394961672094633*^9}, {3.394963269309606*^9, 3.394963271125407*^9}},
 TextAlignment->Left,
 FontSize->14],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"figure5", "=", 
  RowBox[{"GraphicsArray", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", "tempProfilePlot", "}"}], ",", 
     RowBox[{"{", "survivalPlot", "}"}]}], "}"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.394961405706451*^9, 3.39496143058958*^9}, {
  3.394961466930292*^9, 3.394961475094851*^9}, {3.3949615279010687`*^9, 
  3.39496153087962*^9}, {3.394964015767812*^9, 3.3949640233060083`*^9}, {
  3.3949640595347357`*^9, 3.394964094181012*^9}, {3.394966824684119*^9, 
  3.39496682692481*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{}, {}, 
        {GrayLevel[0.85], Thickness[0.01], Dashing[None], 
         LineBox[CompressedData["
1:eJwk2nc81d8bAHB7ZHPvNSMaXyuUaybnMUJR2ZR1k2gYDSSVUGiRSlIRGRXZ
GaVCIloyimzJLHtvv/O5v796vV+uzz3nOed5nnM+svRxlT7CwMDAxMDAuon4
VzdsqLx+8MgeoDKfu6mnUIXcRLtOihmwYEcepfKpIl/Rl/FxiarYTwpTmBbQ
FdGE/OZvpthfcjYNpqIY0Tvv5tzsgMqy2cPAhhHFxn8oFjOoxN4pCt1t6IHU
dO7OjSrYNpapSWT0eIttcmgPB3aER9XnRyhVNNIgQrkDe9LXYbIDpTlsLhdJ
jAEqK28Jq+QQehpfqpPBh8fHqvBEi6qO0qXG1L6OFmF7uL73zELZWyxkBbOi
sAckPHbMohyPodTU9buAysbRPHWzEeVav+d/+DEIW8Fa+8kYyos9EKmoTsU+
nWRovBcViF4P309OAio7F0vdmWhUUGJbef/beWxVQzFJB1TosJGpO8wW2/GY
pQI7Kop/c+nUDDd2XqAS0kCvpYYDYn4EAJXDwyxCxBW9Ln9V1HHTCvu+xSm7
i6jk0JWZLYZK2DVH05PD0ZuU9aeKX/YClXNrfyKnGSrdsu94610LoK5j+5Fa
boBKq8XSN5oqYoOUpOYvVObRP+DJjOO1LjC3IeA4Krcuy1t97YI9VW1wfDt6
H2uvFC1HBirXbOyyZTd631+6tyCMCajc2uP/iiZRhcYmz1/d49jB9VQFT1TR
PP5COu4LUHkEjGsr5VCl6LX/XnKEAJXXiEdNmRtVnsy/ettYHvvxtTzvflRZ
3TbkE9aAvSB/kscHVfkrvVBk3gRUvkJerid70MeGH0qpKx+BKmDS5++mgKrl
Vm5d1vHBLuBMzPJB1SFbxg+dFwGqoHTV+cc6qEb5XP76+WNAFWI1bLINRZ9u
SqnFTuF4kkZ1+GLy0ac/JrF+2wqBSvaZoSb9QJ+1T81ZnXTGnq4vnvFFnwcr
X/ON5ABVmEN/1HsT+rrruM7VQUugitobBPhXoq/xdxM8tixhz1g0+GWir1Nv
V3cdSQWqWKxi0IoF+pbMV87YMwNU8T9pYLAH1a4WGgR2xAFVMvfAD7cF9N2m
M/WAhB5QpbwvnK7qQd+zOFg1Dv4F6oZtGsWWb1Hd1qzD54YlgSpd+dfNfQuq
a2fYrH4Mz3ezbPirjilUzx7zM+0q3v9beHNPbF6P6lXlwknP8fy3LB774sOH
6q9b9k/2lwNV9g/5sXIaatBMe57jJghUxRWj3m1+qMFN+4DkZXegKgl19FcJ
oIZb3zkjk98AVXmb8ibLDtTQP3/8xG83oG4LfiZczYga75kqyjrjeKmfLZQ8
PYoay7va7wetA6pGTVdiQRFqHPaNZEvA8dOS2crcl4d+GCSM9LazAXXHyELn
2iX0Y2I858kBe6DqjctsfmiCfoolr7NuGwOqgeeXHQwJ6KeB1REO53CgGk6y
nKu2RT9jisR8Dr8Eqgll+Pt6bdSkcT5spzcvUPfVaUbbSKImmmLX+HgaUM1j
19xk9FDT1U7t1DM6QLX0WC1mj0BNrTDOFXAcqLZyt6eCH6Lmi2wHW0KrgOq8
rWJXkD5qTisujGR1BCrNfGn83BJqrj3GDxGTQHW94OFNFUK/pL5UPYvcAFT3
+X8l93PQr4rbKn73LwD1ZPSzYfIk+vVP/4acmBBQz4i67ebciFqEpvra4zOA
6pf7osLwOGo5YvvI4EkzUM9zy/768xa1ckiwCWRuB2p4sGNMywvUqvKNVqX0
CajXwvtf13mi1gNBbwLyaEC9+fhjed0Yas34fbKrKBKod1mEGvdfQm17n7Zl
lQ8CNSlXIZBERm3+9uqHDC4BNdUssTk4GLUlct4mfaQA9dlKSdXUZ9Q27ml0
/osBUHMSXx9rPYna727L2/3zMVDLxnWem6eh9jd/uFbs1YBaiTTu51mi9t4Y
99zWr0CteVrtFFSNOtTmJIS7FoBa/76eYhCCOn69De/7aw3UPg33FvlI1Mno
9fuB5z+g/j1Ye3DtLOqUl9IxGwsF6tijU/Ucx1Dn+ZCJl9O5QF30X3k4rYC6
JI0dQ9a4QE0g/c/be+Ooy0jR2e5YHKgJZ7xy9dFCXd4CNMUfm0Bt/dd/fBfC
Ude7tsPN6bqgJh9gaN9ciLqVigtj01+D2q5Lka803qBu/Qz1EBcGUDNLYmjc
Gou6beOLPUlGoGY1MLRLAqHuoJDXekGNoOY6cXpbohTqrjV9O2w1AmqXmUul
NRZRd4/uzmZOKqjdCBBFlrWoe1al9H1pIKjFiHMb8xSj35Lk8vty7KCWNp48
Y/Yc/fbqqtRblQa1L3OsdjXlqIfnzJf7z21AXebIziNBpahH2t0s1Cke1JUM
GGtfWKMeNftvXoI9oK59yNVkeQn1OO38rn/RB9StjqDoz1tRTxZ7w4jlNVC/
mlNRdv4j6ilftPrFXgfqsa9ipjfGop4fwz8q3lFAPY1H88WPdahnub4p7r8U
UK9I4jYJKEJ/zB616i+/Aw3GOO6Y4SfoDy3KYWs+C2gIKriF1CWhP77B7SIe
e0Bjo/CZTW82oz/xRzpG6ptBw4ghpy9jH/ozrPw77ukEaETvkRdR90G9Nz4M
jlpsBk1N92Mlf+NR7xMPbeNLYqBp4Twftj0P9Ravu5GUxQ+ax/vEz5vMoN4e
CyUrjkXQTEyLNHyQjvo0O88Ul9eBFv/upEezz1HfvpAq/tEq0FJiZNqnsx31
uW2mHJcoAS0zp8VzVeGo79aJ1xIBaaB1g3yZUmKG+vrmV0NUAkGbv1lu/euH
qG8pfn+rsw9oU4U31iszo34B9ET1phto2wv7H7yxivp1wg36BveDdrLHblbB
o6j/rtC1PUmbYAc8/6y+kYQGQIlE4qsFnacLpMp+ChqwqT/itfMD6DQvXPiv
ix8NnPAt+njiFezknH02I01GA7FvDgRUp8DOk3PG5w3D0cCIyeOOSwGgaxoq
QxG/gwaZ/o2rZ3mB7pUWNvNHFmhQ5JberTZX0C0za/VZr4YGDX726mvsBaTx
6Lhk7TM0+PCw3NMxGQBxGU5L7zdoMJftPMN6YQCdc9sPM/1Eg1XpXw+YcgM4
e+cZOg+jwfFxH66ncwCpOg5Uj1Q0ZHyx4KTzV9DTiC1X1PuChqbjkFbtWdAP
qnvjVvoF/eX41FeoxAv6z0a4qoL+or8SSzdVIlNBvz7jruTDO+jvLueW/8zq
weA/niPprQHob+zmM6QvCmDQclNAUz8W/dPIfzpW3QW7nLmatroton+mvXtP
/OcPu27HLYo1WqJ/NPJUfwQ37Kqqa9x2Igb9u3oOOoy0wEgFAsMPfUf/WlDr
58q7YMwjerNlyh4NB37jTXtvDCb9qrSlmFA0HLVaKL2hE3ZvUpuPanRAwykq
DvHBvrDbtTmxfFwbDX+5+/wuegK7f0/EqSpmoBGJg/rB75Zgz4AZra1PCI28
G/B3KMmBvdxPAlOaq9AYI2OnQIEwmDdtznxx+B4ao/RaL910BPO1Ir6gIBs0
pvjxS59bMljIeQidfCSDxuxvvH5NVgSLi1IKxh8d0Fgu+R7NXx8sN9/dIOyl
iMaVY57axauD1dmfa2FPytF453Onp86HwJZ7t6jsTU40PvTggfieK2BL5R41
ZK9H49PXf0SrPwVbh7vnudl+ool1XqaBvMNgm9513PDfHjShvl1rb5k/2Bmo
KR1cOoImIt+SZjbcBHsPOTb9oVk0EZdlfpw7G+yvb9l+Or4DTaQ8vtE5Xw/2
mZ+2RLaboYnXIUw19RSwH1+qpZlYoIm+XePxIU/ggO+8yteyc2hS5/tXg54i
OHj8xU1qyHs0aRw5EWLSBAcjJFQun3VFk5ZmlNLsWTiYomiY59qBJj1qDmmd
14CDrfIxW5kOock75bPKQq/AweBJZvzbFTSZcEnc89wvcHDi2/XKg4Ymn++E
9K55cPBfb7XRJQVNvnt9Y1OmJjg8k9h+WWMBTQ7mbxAzfA2OLHlSSsl5aHLq
5C67jFZwFFfarMnbiSZXlY7f418Ex237T4mRt6IpoYxCvg5tcHQMOeF97Aua
0k3Zw+pXAo7ZRX7DzSNoKibmzPjTt+BkQOZlmIpAU4mWD5S428HJWuV6Cpcu
msrgLz1xehmc3FbUAy9cQFNlkRz9aCc4hWX9MbvzAU39DUtoay4Fpw8RfnIf
ndDUjMEH0Z2d4NRgvONvuTaaZmActE1ZBafusuHZlm9omhy0vf6kLjgtd60F
yjGhafCvruYoA+dts9c+jniiaVPqCIt3NzjrPtDz949B0zZTgno/GcB5z3LV
hqhGNH3Cx/HtE5yuh9cJH3OqQdOxHhP5WuXgHG0//00f//7wAfGE4xXg3P1I
Q/NiAJqedT5xYuglOA9Ja/5qPYpmGA6/0T6aCs4TF7eonMhHMyTvg83uYeDC
+Dr6wysrNKNz+aGAqwm4bLD7+eb8NJoxujrU9VsLXP5LOtUdaIBmzKO0smny
4KJUeejlxp1oxi2uxdSZG1x0kj6vimDfzBYJO/AdXGzfaQbtOIlmYl8etfpV
Di6OE9NneLCTXr2SscsFl8Nsw/+1BaGZgg92ZTZ3wMW7se3V6G000/4rdsHC
FlzCOF11VQzQ7FZmspdJO7hkHrhZcVQTzWpwHNlR/Q1cchs+q1zrQrN6PIXr
jErBpZB6/cN5RTRrI2L9zDARXN69PNT19Qmavbj17m9wBZdvGbFmVzLRbMT2
PzllVuBS7ytbPXwazd7WVA3SNQSXn3LPRJRZ0WyafqO4zmZwaT+wIL9DF81+
sxe00RgEl6HWW2NM8Wi22cl1Y1ELuIzwyp8ZOYVmf7vmTap9BpdxleeuB5PR
7IyXxS3VF+Aya5AxHX8fza0Pjf6k7A00hp8XT/Kno7n/IrrvZ7sAjUnZn6Hw
FprbFqnivtUcaMyhsp+uf0Vzu+7XMStsBxqboNWOJiM055XFt3PLDNDW/c41
vhiO5gKuV+v36AKNe33NfT38/MtHL5kkhAONxzLF7agjmnuwccyaRAEa3zND
518raK7y4fcTjOpAIzEEM1+0RnPfAyJOvg0CGpltNbmVEc212iL/sx+BRmE/
LXEjB82NC+SEjNoBTXj2fbeXNZoXv3orri0AaOJ3Uj56DqP5Le7Gj2PLgSbh
6fXyewCa32awlmrJAbT1ekqXb7WjeaM1n5yaB0CTbOdYQqNo/rT//o+FJUCT
blVozG1A8xet2b+eYgKaTNSbudrPaP7qtrIGxT1A24jEY5SW0HzCiHJHchvQ
Nt3NiA40R/Of3Pimby0D7T/eu4Ep39H8D73qRVND7FRllV4tNN8lFczAdhNo
sur70w8Uofnp1nGui+uBJmd+ErmrooUNFnUyx3G8FJzNo467owUF5auym3G8
FFrVNQrU0YI6D2ztrgWaopUmR1AXWjCtydWycwbaVp3GNeN1aOEsijY3vAQ0
pXFVw0xptBC63sRmrQZoyrYVi3fH0cLNJQaHN/zYJSOccAYtJBed9NiWBDSV
CyYFH1TQQu1W8yBJHK9tvXHKrHVooYWL43Irjtd2Lf/xC1Zo4c9g+bV7eP23
3zzAz38ULSykqtzj+g00VUXbo7pb0OJmcf4XCzheVFuftIeLaFEZTel/E8eO
43D6l40Wtdx+tjyhYv/atveuL1rcm/2IffcRoKlZW2XMGKJFf/3Nrg/weNV1
cn7xlaPFYA/2BS/8fPUzT1iLc9Hi9Rt/o/UWsdOdfgRPocXHP3Pe/VUEmoaA
DeVTE1qsPqYtqn0Lu3EkNJsbLdZHSeTyPgeaJuO4hKcnWmzLXzPqwfPTVBrX
HW1Ai2PLlb7XJ7HD1u4J/EBLItH7vrfZAk1LdkIgaR1akinc5p7jg73/7KED
yWhJsVVo5fJVbL/Nkvj+taS3sUVB4TV2KWdxXTlaOlZ8OPyCBNC0jfze3a1C
S2fajdabq2G7F135XISWghhlCzbtww7X69RoQUt39oz8/orXS/uDibCaNVoq
6QzYKdEDtB1qF6KNBtFSFfPBxvElbPML5+QALX2X3Xm8ioR9vNfL4QBa+nOa
Kc7LCDth4bVoLFrmZr059S4de+VOpsQFtEyR97l+uwJoOiTFXbCKljfst5Q+
0ootb/Q4pRctUx8I7+flxrbhyNbiRMtOik8ynE9ip3Fn8e9Cyx4WV/S2X8Mu
nttycR9aPuXv/ostGfvzWdK952g5rFyRNbsRexQSaoLRcrZVEW0N5+/ObZql
Q2Zo+dWu0PK9ZthQ+ka1Ei1XaOyXenQYe//odC8vWm4SG+jUiMb2sgm8dwct
r/SIOvgMYad6iqxZohX2xr6SUgbsPL8Yk1K0IlCVL8aN68XOUg2Wuia0sjl9
z6/n+thNA1OnxNDK3pMXbLrjgabLqnCGcg+t2LmaFCrlY/NL6lc/RSuHrMmk
C3h/6Yr9uMUzhVb8NLIaRXC90lWOro09jVbiV7vMLfD66NoefyWegVaGI/X3
VDBiP0wTyehBK7OXeDP4RbCTnR6f00arDCfbOJ2VsNP/+VrHoFWS9ZnqxYPY
r66X+JagVR3xtF3bC7Abx/WemKNVI55TqcGfsVtPrMoyoNX9a7rMtd3Y3R9+
Cymj1cM9TRUneLBHuJT0+tHqjQwOlOIONMTCfY18Dq3ee/Tj8cQFbM4g7ZlB
tJoYmbSK7mLz1teHe6LVl6e03rbh/Y1EpfXLjdFqm+YJbZIotuLpG5KZaLVP
XuOBqwr2NpYG5Z9odUyCeT4X7x+kdrFuoB+tMa3FF5udxtbdIn1ABa3Jf6yl
XvmKvc85wfICWlO7zfSFTxvbMqLB3xytgYPGoQc4v5BtHJnRFq3ZjCVFZV/G
dj5J+uOJ1kJETg/+Ij7vxRN6/xBau9Hz7JIr8fmTQWUmzmgtNrOdPILXE51p
s+f+jNYy9XYZME5gB9pfq+VFa83HhRMUiM+H+3z4wI/WeqhmqkXE56+ZfPny
Ea0Nr+JoXsG+yV9uth8YGHf7LmXkYt/2Yf3UBgyUjk7ZshvYj3yeqJ8BBgn9
eV8WnA8o4fM7pgfAIP1csGz3PHaS8CuVbmBQPG1s84OId+rVhMuzwKDPlhs6
hPcXyqwd2ekFDMYnPtcqncPOft/WGAgMZnV9omeI78tNF3M7CQx2j0RzViWx
C2weS9sCg5dyaIfgAvYbJZaRLGA4HZMga0/E/+3nSj0mYDi7UHwmgfi+Uqdf
Fp+AIfTD8Lr/fmC/9+jTDACGOHsbDR3i+dUC93JKgSHhnU9oyAB2jQfHqXPA
kCJz7Vs18X2fCs4HxABD1nCpmwXuL+irprTQODB8CPnvtvtR7LoBN01+YKjp
12t/kYjdwNhG2gcMtaaO/403YTeSXw5lA0MLObr0PO5X6Ke8nNlBYBhNX/gX
LYXdsg7ypoFhKj/90qFSwr1+KgPAMP/mgJAq7j+o9fWfxGlgZPr6SrsJ5x9q
t/31TB4YKWP+19fjfEFdDv9Km4FRfH7L+tFi7G7Btx6swCjN8DOv3JZwVaRy
NDAqCFJbDt/D7pG6umMWGBF1SjZDELv3mZaMNDAa7kx+ez4Puw8OAyMw7jay
NN9rTrhJ9cY+YLSyyzs7jus/6p8XsDgPjB6BPtUauL6hIUph3gAwel6WcuB4
Qfg+x/7dwHjqRu1oK+7n6C/pplYFMJ5PUKJcxPUd/WN3D+UBxltlw0cqWbGH
a9nbS4ExpubRwr1U7BGt64dSgfFBvWmkBxGvkeT8D9eBMaUno3BdKPaot1xY
MTC+Yj3GYr6KPfaPlweP5x2vSJxMAvb4rg2P9wBjBaVGYVqHcIJ2QTkwfpX9
z+r+eewJ47yDx4Cxe09fcgexPyfDa1P3AmOf1T31nPuEG3ZBHzD+dTT8HILr
LZqSIKsZAeO0V8rkJj/CGX2j2sDEEe2qdxz3NzRdpMfZAEw8DwR+6twmPBNo
rAhMgk/eH+Ml9uOMqsUxR2CSeLkhOs+bcMb81hZgUvnZ2TX3D3v2+qycFzCp
76m45VFEuNKKqgNMO8qe6jYHE1623ncEmIzSvRKKifycO3o4wAmYHC8sO/gT
+TO/LfpYCTAdmuhe189DmPZ34zgwebh/KLH5RfjWpnRJYDptfkNUjfj++UG7
jSbAdHWTaNP0Q+yFKHevUWCKjFsJdztCuPCC4TQw3eX5rfaDGP9CWxpHLTAl
zD2PeYnPh/gksivzJzC9/KJheZqoJ4vZ9mergek1iDP2vCVc+6jcHJhKC1bz
LMMJj4rbHQemT48/8m/H/Rstyf/+LQtMXaetv02YEI5n97EHpt4BzYuHhAgX
pbPheP51lFCs6yRcl04OBqaZXX9u5PpiLzM11p0GZi7R07t9iHxbpmnt+wrM
/FE2813HCftT2/4BM4VZ6/l+KuEbLwSDgXnDCCO70mfChSSueWBWL79VOTKL
vcKkyB4NzDpqZ3yd3hMmWRhyALNeht3Gb0S+r2zhOGkIzGYxkqFZMoRN1Gcf
ALOrRxZ47iUc0TL2Cpg92qPH2ol8XIn9YcUCzF4WvommPYTTzrTbA3PAjh2r
CgGE32eMmwNzFO/nN3+J/b4yu33nMjDfPb5x/31ifVaZbCWHgTmu6vwfQw3C
vNvyjIE55cLWdQnE+Fc3Ux52A/OroVsHzIn4r+6v3FYGzKWGA8MrJYQPNNz3
BeYPSRCcQdTv1cNpwvj5tbYTz1mI8a36P5qmAvOfSqvZYl3CD2bXpwLzkFTm
dTcOwsl7HokB8+h5Vkn+BsIZXuc9gHlhW9Gu48T+WC2RWUoFFt5EkZj1RHxW
m0+kugGL0OKp/z4T9Wa105IUCSyiNp/enCXq22of34kKYNnEHdhTl094UjC+
CFi0znVsu9yCvbbO2kcaWHR/qlWpJBPm53oWByyGKlH2HZ6EyUk/ScCybwAF
azAQ3nBU7QiwuFk/qf27hTA1mPwUWI7lLLrGjhPW0pHpAhYfLstZAyIeazvb
VvDvn6tgWZ9ArNea0acCe2C5pezuaU7spzU770eDwBJzvXRthYjHmsPBR1uA
5UG/8N0MdsIuyro3gSU1vuYNM5Eva+4xj0SApWSdAmcRsV/WfJ3FeoGl7Mjl
hMPXCZ9NqGgAlsry9m381oQDPwscApbvZyPtjw0SDv7rmQEsvb1jz9bzEr5p
K7AHWIb+dFy2BcJRLdyawDLa88XlFnFeWLu9j/8zsMx3PxNhJPrJWizfiWfA
yt3ufLX/MeHHcxedgVWgzeyIVB3hJ4L9HcBKadXWO8BEOEXmQSmwbvhFXvhC
9MO1Z1Kd+cBKbfx2PFeJcHZclg6wajW8MRqiEc51Up0EVt369I0ydwjnCw+s
A1aT71faYoh8WSs8+aIIWB2/6JidI/rV2ptCF1VgPfRZXjafHv932xh7gNX9
kwjLMJEva6Wp7v8B68mPU++ciXqw9v6MXDWwXql4oWRAX4+PhYeZgPXa+wfr
LgQRrp7qsgTWqPLw/kKiP699UjglB6xxpa6JsiTCX8K9DwBrZokYP3c74e9j
33OBNe81+7ARPZ51i2vywFpUPFNziR7PBoZDdsBaXlgfPEHk21rjoq4EsP7I
uzrRRN9fzVmFMsDakutfy0eP56/Itk3A2pnjlmFCj2fLsY0UYB3MAtc3RD1Z
axO4Egisy8/nGhOXCXcqOl8ANsZnfTkt9Hh2Dh57BmxsTxtvCtLj2ZXkEghs
/Kk5hlcqCf9mOeIGbJuS3AuPEfmz9idRwxPY5LmuZsFfwr17ZOuBTdk/I03E
mO4J0nlg0zYbjammr2e/qvY8sO1f8PfdRJyX1gZvGLcDm41b3Ikl+v4YErnT
CmwHv5ccbqSPdyj5ejGwHUlbtQqhr8/fzLoiYDtvGb69i74fhuM/+QJb8Lvn
8kX08Y0I3IkFtnDZzzJR9PUbuRyvCWzRa7yCOh2ER13yvwPb0xf3Jh7S9/fY
QmolsGVSiodOEfm9Nn5QEX8+L6Tl924+ul95qwLbW/v1dXNE/Vqb8LbfAGwN
LGm5NnqEJ98riwBbs0/1c0V6/Kf45y2Arb11KImZHt8p5+4hYBvI23or/xXd
MzvVgG3FqdCHnx7vGZ59PsDOVNPsPkCP58x+aAF2DtUF51J6PGduPWUEdqF1
O/d5pRGe5Rp5CeyyRVVbv0jQPXX8K7ArSQ9sTg4kPCc33AvsqpGc68810+2y
JQnYdQ/v5ZGl58NcVVcpsFvz/RgO5yQ8H6aWBewHAmd7nejxnM83sAd2536R
dio9nvOdeo+A/dhbxy9/iH6+tqAqZwbsl472vgB6Pi3U7+sD9itnH/1LfUv3
tHATsF8Lt1LkIM47a4uU9RzAfjflfWYdfX8v2o3g33/W+TjbhV7/FhuFh4E9
c8RmtGKY7nF1FWDPW+ZR3kJfjyXu3Dhgfyt6PmeUXt+WDGpkgL3O2j7voi3d
GT0UYP95mG/iNz0eSx/0ZoG99VT1dsMeuttE0oG995baS26iP60tc6pfAfb5
z4IFj+j5vOxy5ShwMA2EqB0WpDuiWxQ4eFjGiuTp67mcHXgBOKTR1+LXhXTP
vnoMHApOOzRD6Pm5IhL8FzjUAtNfm3ylW7NeEDh2F4aXNPfS7bf7OXBYNczs
SDxJ9+3obOBwGj/81p2+P1Yy4+uA47QCvJul14eVLu0bwBHuvr4sTJHwKs81
a+B4mLT4nmRIt0b/MHBktzVXpDjS7ZwuAhwfKAWV2+n9YDVU0hI4Wphcqdo7
6E7biMc/OsqXqk/Pv9XKcRbgZGl5R9pdQ/fv76HAKVZ1/IrFLbqX2eKB0yi+
yu0QPZ5rcj7bgPO07wbDkxl072uNAc7Hpuc3BWvQ7ZXlC5yfZZpYbtH3y1oE
D/79mUWV3kRLuh8Nj8M66fobldlddGfhurLu28rdrzdH6G7mlQWuQLlHP44v
0T3o9wy4xWrMRpqE6P7X/R2437ivsusp0N2L6xTPsZvbY069pvsbqznwCud5
SCfT683avZa3wAt2ztcssugO8TYB3qMrNhOM/3/e0Vkl4L2dstc+l15/1kzT
mYG3ZLdhucv/xycb+xV4a+PBV4OeL2ukm+uBt2dMR5ZvFz0+q0n4eXP6Gm39
83T3P70EfFz3VG+VvqD7q1cV8EkNKhvEOtOdU34F+Kg75Oe8BeiOdpMGPpOo
LS920eO16i1yFfgcf8u4rD9Lt8n9ZOA7+W0iZYieH6sbPGWA70pJ+WDBD/r+
mL5TBnxRebI3xOjft9IhvwP44p5Fbw2m59tKZeEB4MuMcTltpkJ3tN848BVd
rybl088DK763PwBfeYhSsXAn3XZevcD3w2tl6Q+9/qyIblUHvk63I493H6bv
97mJVuAbPPgNcrTp/qmVBHzLxvFhgfTzwPINnmzgZ5ZiEhqn94vlw35RwM8h
pta30ZRubeEC4BfkT4i4Rq/HS79f5QI/KUrjpEwc3Z/dwoBfmKve/i29Pizl
35QFfgl2VrnRBbpDDEjAv3nF86s1vZ8tCS8cB37Z82wFo0b0erGsxAH88vNJ
CRH0+rPYVSUP/MpTP7xLntGdxv0P+LX+6ghsoPfnxf8e9QC/jsfPhdfTdLMF
RQC/bp9Pj9Vxev3qTbsK/AbdKS/Dbeh+nDMF/HubuWyG6fm4wKmjBPzm18vM
rF/9vz66LQK/le4Z/XcG/6+f4fjn9mltylEH6baLcwb+w74vOFWu0etvDOD5
u8s6rz2g5/sc7XQh8B9tF5xlTKJb4cgq8HsbBPY00J8/++5UDPCfE9zz1ref
3g/qtf2B/3zVan4H/Xw1c+deHPAHnctP37VCt6WPBfBf/i0WK0x//vS3c0bA
H5Xz1+c1fXxTOT9vAv/tw4/dpWvpdiPrAH+MsKXjdfp4pyihOD4Pgkp2O9Cf
P+lXgueXuve6zAp9fBMSVt7A/4xRV9SdHo/x8tfJwJ9eMMlXW0y367Ap8OdI
HFhOpD9/LCnYF/hf/5Nr0qOPb2T1ByPwv33c8TXjKt3RfLXAX2Z5+4MQfbwj
ksmbgb/y9UJOL/35w6pX8Xi/X/10LZw+vr/aAdbA36Bz8dIoPR5DBRE43j/G
t/nbnaJbwQnHr9XuwWFZ+vMH+YTw8/u2HNP5TNxP1/oy7QSBf6B1vaqqPt3r
XJ4C/9/IerlH3wj3ul2uBP6xGS2KJ71+/+EuNQP+xUqOcT56/eiW1xwH/pXd
EdffEfeLta4zcb+Bf+0722ZPer3ofPVbEQRYWpkPfqb3kw71r04gwDu2UhVG
d8vKQSYQEPC7QFOl/37Lxr1CICC0uLjYQ//9X4ZOhiAgyjqvAvR60XTWzQgE
NopPPlziJ9yQ0BgNApufnFJLp+dD/YPAOBCQ3TJWZx9NuO6WmQQIbN02wlpE
P7/UHh2YBwEN44GTp+j59alOrggEtL65c0nR16fmgbk5COhY9qbVRhGudrj0
EgT0nH63KRL38bXKz/bcIGB6pn3XAPG+ZK1sr20uCOxdONh9j97v3rVuwz83
D2o5b0ivH2+dS/B4ba415SZzEX69T9QTBFwS68Wd1hHOL4/sBgHXzfuLuOjn
qTzWYwUg4JZRa15Cv3/kgJ07CBwr/BIuQj+fvLh/WRcEznypGm8k7ndrKZW3
skHA38LwRgi9fz156dcFAgFNH7ao0Nc7MTb4Owhc/F3uEEWvd480pg6AQMRc
ycfdbIRvdwdkgsD1i1q0OeJ9wNqto2+TQSCSqXjpKf08cLPn1x0QuMNTuI2F
eL+zFvHCogQE4jfmPCpjIXzh8qQjCDzuMjHUaSV8ziJ3Ewg8edg9XJJD2J/r
Go7vM0HBnUX0/eqj95gfBPIZfLuyiPdTa7Tna5UgUPCW56oC/fscP7lxgUDx
2acq6fR+bl+fZQkCb0ebQ9Lo8zW/f1ceBKo7tDfG0/uJ7oA9jt/nuIavYvTz
sbZahjoIfLM+4RtHj5eaexV2w5f4qrsFhBW8LzwEgY7Xax436OtBXp3UBoFu
vzh+jm7C/PtyLoDAn20qr8Lp+bHuPBveP4PPXTlDXbFXV905foPAVGzli3NE
PVrtPTElCQKzlk5Wc8R+We2I2BoGAgs8M8t+RL9YbTobchAEVsP+20vfb6vV
jfqTIMh55trYUfr9+7m9/VUQ5FaWud9P9JPVxJUCaxDk/fsG3Ij9vXrfR7Af
BEmHhm+7EPV8NSy3whYEpcz3q9oR+bPqcj1yHQjKcA20/SD6z6rN8Z+dILip
OviK5TvCptzrB0FQXjfv5z7i/eaq2o2QchBU20o6u4u4762ym5u/AkGNwSyp
DzHYK0tc1/NBUDt1V43eMcKjgScYQBDEz4ruJOrRyo8TT0+CoClnyxvqCcLx
R+S2guDeV5k/64j36SuR3yy8QdDc49K4F5lwULutDgjaVG3ZnFZG2KXf/TEI
0oJPRwsT9WNl/Yl6MRA8rLwr4yUxvhWur65NIHikU6RqPzH+5YX3+zNB8MSO
0sWrHoR/OPWOgKDfHJfbwhvCVyjSPSAYkNZ5KZaI17J3rQiO13nrvIfbifgu
H2AR5APB4Hy77yeI/F9W6LiFn3/DK1WrnVifpc//1heBYJTEWesAYj2X8jQ5
joFg9Jc9PmQi35diB+aTQDBWdjx1L1HPl2iHmveDYFLvTt4yYv8s/ts38gYE
U+7yyzkQ/X7x667l5yD4VO+PwRxxPl7MvBSoDYIvEq+dU3EhfPxZFD8IFh38
+efJS+yFDqMQ/LzXnM9XdYn9vVD8dfMwCL55dUGk1Ynwbc/OgyD4niKzT4jI
3wW9oWhlEPxS7/3qigP2/H2l1HYQrA3Wa9xA3K/njw2f4QbBemXSyDsiX+d3
3Kt9C4JNN9/IzBD5ONcWnSoEgr9N2CM9mAnzHJ49DYJ/ZlufM9tjzza99TQH
wf60rIpE4rw4+7iaC++PYWaruV92hOUbSqRAcLY0yXU3cd6a2fYrRhQEF5Cu
tCKRf9PTNin480tlbd28xP6aLvS9Fg1CDO+FnRqJ+jytGhBuD0LrPkQdcCLO
G1PrC6SKQIjHUFEELmJP/nDoNQIhvspPzRuJ+jR5zVWmE4RIH1mtB4m/z0yM
uhU5gpBkzQXz08T9ZzxFZXU3CEnvFuOzriZs+vZNKAht/FRcq0G87x6btH2C
v1/285TpMpG/Y1pXD8WA0PZvx43DI7BHshP+yYKQ2j4OtmPE/hkxsv0WBUIa
tWlVpsT7oeG2UtILENL5/tuAPxP735orPicJGTXY6z4k5vNX9tKEPwjttpxZ
uXgAeyhT7lIJCJk23n3rQty3hrbyGQiAkPmP79qbiPkObjEXfwtCB5uN1HKI
+fRNN4+VgpCT3Z/p28T7sj5arJ0ECLn8CnnpS/T73k8cxHjcWt5t0yLm++dW
qVcBCHm3UxU/EPPpnjTUGwWhU471/9KI98/dehfz8PPPdPhkXCXuP103a9pU
QSig84XsXmK+ncLaThwgFPpbZmMzMZ/W+bnsYRAKO1TWU6JGeIty3S0Qiuhx
ehJP//vFvleSkiB0888DqUPEfJtv7x33BKHYfn6xfzPYjS0Xj4iA0IP46oEE
on401OSQY0Eo3upSwX5V7Po8UxW8vk/Kx/bmE+eR796SMzjemY9qgwOI+87n
26E38fxzLMP3yhP98pOxwyiefz6nrmg7cb+pntmJ4yBU7J/1EhH1qErTslke
hCosbvaz9mGX2Yqo7QehKg7D/GLi/ei7jzc6rEGounT50rGN2G+3Hpz6DELf
FD1Fvh7CftUhXgQg9Ivd1PQO8f4jr9RY7gEItZYyixgSfy/MaS07rg9CHb4l
vbPi2Fn/blo4g1BPj3zQAWJ904eYGONAaOQdZ57UT+wnputeZoPQ+Jn3F+uJ
eCcy/r6Efz4lf27PZaK+xWc8UK4Gofn7g3/6LbDv15npqgOJ+XQNJZM4X0W6
5pySBBKb3KU/zsT7q+uPrxW3AImjWyOXn6gvEZ/2GqcCiXfvs91ndmOHDA1E
JgJJVDb8glYVtp+p1sdrQBLv0jX554Z9ahIs/wJJ8t4sOYHIb+8rD7i2A2kT
85EcBuL9jMcxJNkNJKVOw98fifpqvzFJuAlI22KWswOIfmtNiSp1BRLVtOC8
HHH/3D9+9hI/kLRebyJFamEb2366jW0Yw2xsRdQ3attDpSogGUuEvTIlzhsq
u1melQNpdxqHnAHxPIV4YYdsIO0r4uFSJe7b0uON+P5Psv9F+S64D5vHYHvb
HSA50B7gSzE2+9fLETFAchoSz2Mk8oVJ3UHgGZBcFzfcmXgENN3Z51V/tgLJ
S0Letg73O92OqZf2ikDySc2srsH9QLfZM2hhH5BOb1XWLMf9WLeuLDdjD5DO
6lLFcnF90q2Y6EprBFIIbWfnrRDsNM+IBCsgXR4s3x9hjZ2QWFZJAVL4Kf3y
S7LY955ybzsBpBuhxsne+HyoG/Zfg0g+kO6lWrjvE8M+1GPndwhIcYqNzbvw
fta1j074HQekh4W2JjtxP9Tdz6ldUgKkxI8O8lvdsXdYJyzSgJQ+6DbKjeu/
roDKddkVIGWeHHBhwecfXTbebek3gJS9cOz7Mj4v7Vx8UaYjAKSCdd55w8Tf
9/9seN9dBKRSxQC/L8T/F8itYdxyEUjlBYv9H6SwUwIzbWaA9GHnRbuSSex7
3R8/4fnX7AvVyniAfa7cZZcmkBpO3li5hu8LO3c+DP3NBqQfC7zeIa+xtxbt
0zcBUnNIdNc5nI871/s/y7gApPY7994f2w40naX2DwF4f/QXJIaZXMIuYFLP
0gbSkIrjUWd8ftd54iHa1wOkf5mipn6bsKMOUyLx/htPuSvwBJ9vdTyEKdvx
9y3eCU9YwucJHSGFQ0l4/VZ4DUIE3In/j8H6wFcWSGvXGdz+w+PZ0e+6ml8B
ZJaQQHlrfN7bURy/p6oVyLwnvYqynmNbvTKr2AVk/mH5Bx8WsbUcXk/2AVnI
Y+BC615syeNpJiQgi7gcMmDD8dDuf9f23wYgy+yz/k7TwfZpmXqaBGR1xR2D
gri+adGeT9/mALLms/kvcvh+rrXD0rfqFJB3bCzMRn7YZLm2PUVABnFlX0+8
/pof97e9mAXynnUbGapw/mmun/D77gBks7CuP234/KgxcTnx3hUg72eM/ziJ
z6MaleLz5pJAtlqgREpmY7vvBp8LQHYaXCd6dh5o6gkzmct2QKYd/rgctQf7
mOjDsONAdu263JWagK1KuoOfQ/ZoWkmrx/c1tQ9+9y4HAPlU1cR2on5Sf24O
XGwHsq9eNhk6sWMNTa66ANn/3fF5u23E/zdiUnsnAuTzBb2ll5uAplqvc237
GyCHpfza04Hzb3vhJ8cdlkC+apOzowLfP7a7RQum3QTyDfZwxWc4ftsFjtqV
WgM5+gSV93QF0LYdkUz+0gTkR9tvNXDg+StP7bHg9gdyQq97xQi+DynfNnYp
CgVyUuzOl424vygrjlcFeQE5beHfvce4vys58etFvAVy7nvjA6p4PRUf96mW
dQH55RnJPaK4HyvKZhycrwRy0aYZ7dVzQFPISXbrcwfym6spEnhf0+QLBmKn
Q4D8cf9qtzPuf7IPm8tO2AP5E+PPekOcz7Lcxs3dbED+8jKzQg6fn/8LPLDP
MAfI9cIHU6ZxvLaY8QVtcAJyW2eRx3UloG38cE5I3xnIndGR9j6x2MLP9vmu
Avm3vttu6zWgyXjUdKX3Arn/qaAC8feZDUthvi/wfpnw8hotxP1t/ah0z3Me
IE9LGXY9xPeh9VIKneENQJ6tF68LxuslYXog7JwMkJepn/JN8fldLCazmnEY
KGzLm/268f2EMjDUvpcNKJxZy+4fJYBGHv2qaHIPKNwujXYvwoBGGmtj4TsN
FIEPIVr+tkAT7Jp5bNsKFInr7Stcc0Dj9dXk4BoHipTOy5EJfB7lMUngCeoB
ivTo9c4mfD/kpnD6KWcA5T9LzfIncUDjfGT77FkHULaLxlzRwPcPFtMtwtfw
91MT1EXxOZzGtBQl5lsDFI0NzdlRZ4DGmPq68UgtUHRkxX71ZYLLyvvL//A9
n2Kk/mRrjCS4TMy6lWxZAYpJiX5FWQm4jLYWfOtbDxTTnb12/+zA5V/WkhXr
IFDMd/0Xqh8NLn0bWE9G8wDloFVW0wQTuDT/13cs5ShQHJv3e0o8BpfGc18S
DbWB4nJwgtFkB7h8L87lNv4EFDdXqkKiL7hUzzQddbwNFO+TJcF7+8Gl2GeA
b5sVUEIjq+UyvoDL7Tn7tqfxQAkTOFradBRcbv5oaSm9ApSIe+usmVjAJeI+
R++NKKDcjN8bdEAXXC5U21X7FgElNqOxkT0XXI7U3L0TiuP/QMnvqKoZuLi8
9aZcmwHKo3zKivMQuByIjmK86QOUpNcH/yuSARezZn0Ox59AyajuvuAWAy7b
voWc1ZUCSpZpqEC0CrjI58ffjloESs73jU/ffAOXjWd4y+YEgFLQ5F4vxAYu
pMsHBq8ZAKW0d2Tz+wBwnq6temOxFSiNjAvfJR3BOcvX56X/e6D8fFN4WpQX
nJOHBB9E/APKL79TZKH34By3WTswBcenY3DQgXMLOIeMq2z/lAOUwe9N/VNj
4GxZMDbW/gwo/67duTaaDM5Ge9jkFKSBMmqwT3HIGpy1HqfuMIgFylRR1enO
V+AsFUo7NIr302rCy9VPoeA0KMzj+a8fhBntfJ5UUsGp5UZivp8RCLMIKBiW
DoDT5+IgszAyCHNeSb5eYAZOmduYw4svgDDpxG1KIhmcTkTFXV/SBWF5LW8l
3+fg2EaW3IT7iLDilFy9z0FwrA6nKTImgLByZp/vcR5wfJnoGnz1LQirbXAs
cTkNjterDEbN1EAY2E2N9uwAR+pn7ky5eRDWf882ZDgKjpKuFYqDHCC8K7Di
JkoCR/YEYS/RIhDeM6rVoMYCDr+mN6x7ZgvCNj9lnaVqweGshJykTx0I20f1
MooFg4NT/iZZ6x0g7GCSmEpWBQeDvpKPClwgTHtL+bsuDhz4Nl29jvuI8IkU
Vr8ZVziYtMT/6OJDEA452RP5eQYO5PM45R6OAOHLy0d/crXDgZhoE5a40yAc
HjEmYVYBB/xLWx6lLoPwjcdLGbXRcEBbmtTcXwzC976Rqhvkwf4d1+Ci9GYQ
zpAzZmxxBrsCbYovSzIIN/x+4TfwEWxODpMtwo6C8E+vbe9kM8FmzxLjjisS
INw8/4rl2F2w2fQ7g8sYj6eDr/LOPxpY/0LcR1dqQHhgZ0fO6CJY7zw3t+UI
Hv/SQ76hWWWwYmHLzn/lCSKbLH2dWeLA/E5Hhb/sSRDZUq8mfHgVzL32Pl09
7A0icvtn6j64gbnxb7Glyl8gorT3rEGoCuxfnOWvPbIAIpomgbJrNbDvp3vG
kfU7QMRM99LU4hyYJWRmioW+BZF97yDroCOY2de0dYnJgIiFDqP76wowIx0x
e1E0BSK2WqEtAVFgGin3N2nrRxChUcNKZ7fAnjA5nk93mEDEV/7GtQlbMInu
yOPlMwIR/3QzA/O3YGLDt4/XxB5EzslyL+fKgIlod7PEuSgQCdoc5eM9CsZp
HlMaL81B5OqG29bDYWBUKVnCEGwBIvGU+1IDBbBrQ4pCn5EOiDy+Z9diLAaG
Y9JxCcH8IPKEJHLnaTAYlhrZNrdfA5GnAg9Zj5iBoXNIkPQMBURyueP/9vSC
wdO8BBHGGBCpZEou7BQCfRvna1f8MkHkY/HFi9xRoC+f8aNE2Q1EPnnaG+5Y
B/oMmccqp/H4a5t4GuKYQC/7k9OCiCyItKQHjFlMgp7QToNkiT4QaXe2Kgr2
Bhhlpyg54PF1CSldzP4L8ClgcN2YOoj0Xujl5voNELpX1fcFXo8x8/2yVXWA
5th1TLdngcgkq9zYtBmgorzCygEcn+kSlmKZGkBnI1Mq4k+DyOLGkl2XykB3
+dNUuYYniLLMbXbVygZdUi+ffV4KiIolLD3Kugk6AZQnI2IVILressm1nQN0
TGY9nxepgOgG9jz5dVdAR6z6skuKEohuPuX+yuM87Hi/9W/W5XcgqmJY/1P6
OOwQSfTZezEKRLcvZMbv7wft8QT9kPfmIKqWHXE4yBW0P3l97Iu8CqI7RHQm
2g6A9sUAFaPH7SC6699z3nsmoDX6LcdgAoGoSVLozw+VoPV1af7HqTQQNbVx
ip8E0HrRfbVpcwmImpcJKezXAK0TZRyBngwg6nAnyATXP80pv9czdnUgekrL
OuQiK2hu4KsfjDIG0TNlC8MTBaDJ+bq++3kDiPobJdq7u4HG1K+dQ08vgOh5
q7/K+ytB49OxdLnhchAN877UIXMFNM6lfI7/aAqiETObTe5TQcO9cKTkdC6I
Xj//uYCrFzSsFabcn+8E0VvXyNdnDEFDZceKcbEBiD5IeaFZwwLqw6/+awih
gWi8vHmqTgGotxfqr57Hz3+cO8uX5wbq39hLSm/g+aWUQv/DSlDPfsp7ub4P
RLN+NcV4XQZ1v0fspwS7QbSCl3FciAnUBYROZHHqg2hlzDOHiHxQZ8006Hgx
DaLV4mYfl11BbTG0S3p1L4h+lb2f0FcBar29TjukWUG0yWCr6atQUHtrWzxq
IAiivz41FG/dDmr5b949CY0H0TbzAJknPaCWbiMWZlYLot1OFQs39EHt/oYo
sUOyIPo3wP6ZMyOo+a5499A+gujw6qpgQy6oeQ6KyRieANGxsJQgYxqoua2t
O2kkA6LTd0ZtVMpBzSab1/k19mrWFWbmYFDTnBv3U/8KYoxUOe8AFVDbrjDm
ZxAOYswltS3D3aCmEGZuaKMBYhw1orlNAGqSaZSWVAAxwZ4c53QGUGO7nH/T
9wCIkRO9m4c/ghqDdYkzMwXERByVLFRuAnVxT2Ff5BiIrf+ZZfBKGKijyXLX
FskgJlvzQrZaCai/Bs+07noEYgphx5PXTQO18bMH4PuRmJK+vPi+EqDWfuGw
DVcBMdU36TxNu4BatTm0d5saiOlmP53scwTqS8XQqZ9LIKZ3wt0T3xeo2eNj
NTlnQcxQdnOf5yBQM2q/PffMBbHdT1Kbp88ANfnH5bdhVSBmHZP8jvk6UO/O
b+lKaQQxOwtXdWNzoEYHmNfK+IDYQV7pnBsUoEbyRK31+IKYS0RSsmAyUMP9
rCGnFcSOBz6OkH4N1EDFqX4GZhDz0nBmOBIE1LMm8XluHiDmM73+XLohUH39
XvN0CIOYn1e8p0odUH2YsqS+DYBYMO2hBcLjc2vPePHJC8Qurz/w+XI2UF3P
sQV9xvELaxU1qPYFKm1jQ25pKIjdsIpT37cGVIeUw9da8PxijWLFnfH4rPSO
qqfUgtgDZpuYJ+1AtTDRChMuB7FH5WSePjze/QeXrrk9BbEnWjEMXluBappC
ZbxhA2KZirf7LuDxGRYzqVWmglj2kIVz+TqgGpB/RbDcBLG8p/y/mPF49YIi
Q7j7QKxY6tbnGw5A1fV8Wpf/G8QqBCNzHp4Gqmbh8dD3+0CssiLi4XIxUDUO
q74v8wex6tMh4c7LQFUXaUWRLiD2tcHPaWMEUFUfsYZIloJY8x2ndZnxQFWa
WYly2A1irfq2s7y/gbq1o/7QjDiItU+a/z61BaiKX+WFJlZBrMfS8JVaLlDl
39TJKLiC2Iig4pHSKqBu6fn73yG8vmMVWyyk8fg3L7akXzYCscnTG3Qu4/Xc
LKKCzH6A2FwDSci4FagbXe+M8gyBONPtpfK6UaBu2P5reHsqiLPqzWSqqgJV
6vRTKvc6EGefGLt/LwCokkUjF+X3gDiPxR/vg8xAXW8W/J/dVRAXEfgi/kcE
qGLPJzfORYC42Psq9l1O2JzVO29kg/j6U6WTz3D8Rb0t3q+ugLhMff4nT0Wg
iugra7s2g/jW2w/9Z/SAShF8ryqtA+IqejGuduFAJUdNqRg8BvHtE1F7X3/F
5tVI2iUK4poWoZuCbIFKIufwbRMCcQOBYw3sx4EqaHSq58UuEN/1/vC7YzlA
FWjZR5GWBHGTU07Pv+B8EvAufOEfCeJ76y0uRV8CKn/S3wwHPF/721pbRWOA
yid9gO29D4g76KmKnG8BKu/HxQ8ZHSDuNLGVuVMS27t4bucPED9ssaE1+TlQ
eSota7LGQNxbgOOqwjugcoe/3WlfBeIn73wT/qGODT1SXSUgfoZ0+9kFvF5c
y5HOKvYgHiAi9vEbjgdXgOUOVzzfUKmtrD5Xgbou+GW6GyuIX0mauCfCiG0k
bag9AOIRMkWbygOxuX+6bz8G4je3IEMBL6ByJkwv/ioC8ditFqEvLYHKUWu1
fNUBxONyKIIOX7ATNHa9LgPxRyqtySx4f3N4KR76iMefRD38HtcxKgc/1dE3
GMQzdvitzUkAld1V4nzvOxDPfKd9KzEWW3P02u9LIJ6juyZlwofN/1Rt4TmI
F+hf1X3ABFS2ivywM7dAvHT3w4t4nFQ2ldfvA51AvPyLC/cfGjbv9kIL/H0f
9m6Mv4H3G+uwp+rfHBCvMc98047Xk/UF/8ZcvD8a7EoXg/KxVTJ5dMNA/EfL
5ev/KWALvRq+cxvEmx1MRL+nApVlzkP3DY53u3O91ob72OUPdfuOgnj/kT9n
Ky5gH1iaQ/wgPjjwnP34DLZe0X8in0D83zHP+0Le2HJzRWHWID7uOVPkdgio
zMusWkckQHzRl32GzQg7bUkzOR7El2e+Xskux779xPaFN4ivnb1NstPCvvhq
NoYbJFjOi6k+x/uX2W57v/AdkOANVTy9RwCbjy8hgAMkBLS5+N4nAZVp+W7K
L3mQEJoYytJSwf4bcZD6CSREDz0dlN2HXf3SYTYUJDbpSTuz4frLFN78LjEd
JLbMry0FiWKfvdNyURok5HI742bwfmM6mqHZ0w4SyhseNfZWY5v2idYkgIQ2
A2X3BxZsisX9TykgoVM8PaB9F5uzIOXKJZBAPo1X8nE/YFw53N+UBBKGXdFl
TwC7L3Fk81WQ2F/GpXbpIvZrZ82pkyBh6T/UMMeNnT056csMEjZKNSe9cX1i
TP34pDcSJA4+DnvhhPsR4+1NC3+iQOJIEIP0jllsz1gJ318gcVSts/RlGPbh
xfr+fpA4PvLOUYGE7XD3WtUESJx0CrwvhusLo6mjlJwnSJzXmeGeP4m9VW5P
yVGQuDjdmOGD6zvjFh7jayIgEZyZbzwQhS0loV1HBolwCZ/QpkxsgaLlQGGQ
iF4ami8YAirDfBXjzusgcfdlTawirlcMk30PlstBIvbEM9VUDuwRudx17CDx
qM3N+y6upww9Imt78fyelnT2nnLF/nZxZMUfJNJPvwsZnMCuSeXLiQWJTPl4
KVow9oeBUKO3IJH38MDB/YnYJR8eFAqBxNtzjXVbcb9hSC9V1foAEmXMFwX+
ET9PW3vzXRYk3kdusUonnp9se9RyFiQ+JgU0byLG+0jP0voQSNRVr+8Ux/Fj
iGJYLeYEiUbzaqkWHF+G612yLFIg8bP15KH7eH0YIr4z9KqBROtIRZ8QXm+G
kB6q9P86uNNwKrc2DuCPKUOmRJG9nqVMKUUaKMrtRBMZTkohc+kUGuT1EiWS
0qCSSNEgkUSRkEg7UocOMiRO5URFikqlYzzr7uPvuvbe17PXuv//tfaX7QaC
t8q+H2XY/HH/qzGLWwmC96kTZlU1Mu+eFeA1DIIPune3Rycx70zZ1tsBgj5T
2X4R1mecX2Z4Wz0I/vW89e9PNs+ct5d17l8gGOpxMS3oY/acIwjJBsFokHh4
IMsn5y5rK3EPiNghJ66P5YFzflfqdh2IXM6w5DuWH26NVoxLOBBFk/SVV6SZ
HezkzF8BURLaHvFkeefsonqVrwKZ3HRJ/uUaZpvxzwd6gEwdXqbSyPqCszpu
rK0ERCu6z+mUFrOlRNAVSSC6Ckln7Vi/cL9Fb3xtCkR/Wo+gmuWZM0/d8u0Z
kAUrT2gK9zAvMvz9gj0Qk4aFmyKWMJu8L9dsB2Lq+iZjCesrzviq32AxENgx
f0Yx61tuvsk/Tez9q860zrnJ+o4zvPHDMBPIao2owIANzAbnVC6y57fL0i/Q
Z/3IzT5uZeQHxLF0n0lGGrP+QZvYKUDcOrXMU1m/c9OL/QTuQDw9JftD+5l1
n/e1HADi/bInw4mdB5zOkKMCB2TL83wFhRJmbfvf91oB2VVt8SriEfM0Qyf/
H0CCVmif2ojzOjVQRvgZSHCl9LKF1swaxc3GKUDCyupufGH3EY6ucbE/AeRg
nnu4VxuzIP/BsyAghw2WzjHH/RUoN2veBXIkW+etOq6veoizxyiQE+m9Ng3v
mKfYbO4aAZJ8Nlxg+ZlZVfX0/UdAUiZ51E1l+eQmx88QYb4QbxnFcsGseGlQ
B8iVY+N7CoaYJ00cDP8JJCciuUR3HLPyorR6DyA3R/ZuF1vJPPHPy/AvkPxQ
r2mvj6I3yrbGAinarRebhPOqdOjL7GYgQt8iZ2lcX8WhE0VlQCo6z8u9dUen
HCpkn1flue/Bg8toi8Mb2OtrXJbrheoyK8QFl5YCabZt+tljxCxv8beQ7VdL
dXF2VRCz3Nee1u9A2lakeKQVodNvSgcAaf/N57HrYrSikdx+IB/m9yc+XcE8
/qfGZTcgH/OeW1+LRRe0ts8F0mdwdyz6KTpIXOEwkG96kb5L2HnLyQxE5dYC
GSUTFuRuRMv6OLsBz9XJ/3S+wyxdp5K1HHixKNm74+TRCYYfFwAv1S212LUc
rRkVMwr8xNtjljKsnzkpu8KntcBP8h2RKAhFk6YuHni1KYNVHg3Mkp+otyXw
fMSPVYUH0HGq8ZrA69l8cvDB/Rz3uju0DPiZYz0TFXH+x93JkLYHfnZeV2NJ
Ivq4qwnzPNXO9Ur4fcfBGc9y4Jd0trndz2KWyM0tWQe8ReILjW2YF4ljcboR
wFuuan4zyQXtZ7qpFfiVN59t8pdFz3wPzcA7hj3xm4J5FL8t25sKvJNB1axK
nGfxxGdJ2sBveFPRt5OiwyyuvwHefUX5riqcX/HlsqxP+a3KhSFBuH9iHd0N
asD7VRWYauD6i9WcuKYF/PbQvOHqDnTBw4sWwO9uz4mYdhp9uPwftt77stMP
1g6gjR8EegEf6Z62Yo89WmvnQUXgo5UuyehkoickRGQAH/v/88fCnZlFP812
Xw98gmX86Rn30Ndczm0FPnHg5NpmZfRZL9ti4JOz4ibv90cfftzOnveiYmxy
C+ZLdFv2zRbgs/7efykazwfRufFrZIC/4blKMlgOrWuWogB87jsl/y3JaPWZ
8j3A3+5LW2idjxar9wHg74tW1E/A/RNpUQ9j6/kg5pix2C7008rtc4GvkF17
/tsY+uE1+4nAP1F5t6VFFX1Trb4Q+AY9KS4V+0HkSJjUWuCbbtRtjmtBRzYE
PAG+xSipZr8POtTFtRL4l2Z6ST570X/8TLAB/r2dteEM7C8Ra5vpV4Hvbpx4
RoD5ELEcbzcA/Mf1bcNyf6LN+vlQ4L94+VV9xv0QMViokw38UNBx98JJaJUY
fbZfI4PrKjOxH0UUAm9JA+X20ZnJhmjpSEsZoBKHcgfCsR+4UdEUFaAK5+rj
loahu8IWqwNV0jj7fT6eH1zHpgWLgCqne7noYD9zr7beiQaqltOvK52Lbnxc
FwNUU6hcVvsGLSyvPApUZ9lLLXaPZy4LX1gBdHp1emzeMPquQ/wLoLOaFqw7
o4LOM++sBGrc5dTrinng0rSlAoEu8tdwXI3nJ3fhVLoIULMvXXfNPdHnlZft
A2oxFHJwGuaTS3B40QfURv4c6bqBPpR1ugio7ZPwk9dw/rhof1UJoA4HPCT+
+IqOXGrVDHTdoNbHHhN02PRHm4F6vs0p+SRE76geygXqc/GkQQ7uFxdA3VqA
+roEpm2XRG+LHDEG6ldvEvvZBr05xPsV0OB7wg1fm9EbVS8HAw0NvvI0H+8/
nHNHYifQcKMYi93q6PUlX6uBRmbaTP+O5wHnGJ9QCvRYfNPAwAe0TTP7vU9P
2BZtK8K+5qzFql4DjZdOfh1igF5ptqcOaNI+90eDu9FWf4lvBJq2tTthGOeT
M9+athzoVe0a6VLsa25x9z1ToJntOeF7LdFmO7+vAZqzLtBnDPPNLTzfkw+0
2GJknijmjZvnNJN9Xsnw6wwh9ic3V20vB7SsUKgehecxN6dj/UOgFbNixMRT
0QZHP7Pnq1VTfCY5HT3TqHcD0PqGfqsqnFduhv69LqCNx5uKD2F+OT19YSPQ
VvHkS9J4n+F0l7wqA9r5WWuHrBlaM8P/HND318d11LxCT6uVtAb6YVO307H9
6KlDQl+gfW055vLYb5yGz1QloINVJvITHNDE3+o50GEV39WOv+aRTF7L1nvE
+8zRpF/rJRB6FAIdvVVZjf8XxxzgXQ50bOz7eJr4y+quCv8BBdjfhQ==
          "]]}, 
        {GrayLevel[0.5], Thickness[0.01], Dashing[None], 
         LineBox[CompressedData["
1:eJwk2nc8ld8fAHB7j3svrpGRoihJdRHh+STKquzREJfQEGWkJKMSZTRUZKSS
rxTZIbOsKLKyRzKz9+Z3nvv7q9f75d7nOedzPudzPs9zM3ahSp6no6NjoKNj
VsD/1bg3UlI/fF4PKEwHHpq4fcXshXtcRY4wIeuH6cAY5i6cGRP56gCyvYhb
wh7srnBsRstPfeTn7cUa97AI4SeFi/YWQGFmNNNz/oo9j/n2WeRIGbLE6quB
VSxKYi5NfbsCsrr2B/EELG6H+ZuAPjbkG40R1FNYgnDokft7u5BXNZWNurB3
p6VLhF5FAIVF7CqlIBFLjClSS+ZF42MBu7t0eth7iUnFHxM5yEFvX52XxlJ3
GMmQUsKAwrqdxC2qg31yHElIENNG1u9Q+taDpZmWEl5W3Eb2CHW8YYSlP7cK
lVOiINeUVozKYFnCDwJPCsQDhe0u4+2z8lhWvnnZi5/eyFkpImNtWPbp7Qy9
98yRBy/neShgOTFffK/OcwGF/fjR8asfsTyJMa+IJi+gcMiKpZ84heWV5OZ0
hZgg28lNl4Vg+bZ353doySPH3e8gnsC+vBW7+jmzHyicwhqO7dZY0Y4TF9uf
GgGFSyKIbHIXK6oUeb9dXw7Z/qfCHg+s2HFw6DIjihfXh9ipO6+xEtPi9I28
c0Dh1mDuuXEJK31uKf9IVgAoPJ6zBD9JrHSw6HjWPQbk7y+S3jJhX5WlLrf2
TgGFV5z/oNBT7GvL1AfJyBrkH8UhcdxYmXDwzkw2f6AQNflf5fZhZa4ZQY+P
7UJOIQZ/icPKKjtGXO41AIUk8s5y8j1W7in/QY5RCnm9QdrsNVbR0CSfsF4B
FP5BESF3D6xSdj38jpoLUAQc36k5LWGV/jumbL2FkMeMW+fasKq9NzLEli4A
hbxpd89bGfseIqH4fBbFU/jEi2KeEOz7X53nHvuykUddX3FNYNWqVxdNXK2B
IhLC3+I6hlUPl+Xxjn8CypY2sby+I9gP7YtqQcPGQBFPGAxkXMB+xDyNddyx
ChQJak3SaX7sx2zBhvb5BKBslda5uCmA/XzDW0LfNw8UyVxvusETWO1G9pGb
XZFAkd7C0TWwHasz606wEj0MlB10E0OdCVhdChuz8ql/yGO2cfUXsV97Uuxu
jIkDRabJRzpGEPvVSSetdAHNV2484KTqMFbPGtH8LgjlvzxjzebBO1j9AdlA
/iQ0/71b6zj+ncLqHxgPzgyWAGWfS5IIixPWcPBd0id7ElCUzrsYXrTEGuxV
rcTvOABFOeeot9AurCG8jj30zRegqPBiq5ylWMPg0sVLf+yBcqjd7rXjCazx
mb6cjDWK1+EOxZIiWayxpKfzxW0OoBy51vOb8xzWOOYeyhKL4qfNb2N0Rxhr
OhI73t/JAhQdj1b6dSLWND316bWVJVBO5sUmemdhzSJvOEw7JoFidK/bLQz5
iMl5NutAoJicuVFxlQlrjsgRcbHLBIqFbGqsqRL2W9n7nvoVHqCc0+t7dyAH
+20j1zM19Q4otq4lzi5q2O+gbtUENzWg2L1Zrk41x363wxSn10WgOO2Jvtec
grX4sJxqCygHytW/+UwDHljLu8/ZocxngOLuHsxdt4m11F4gwP0ZoFznJyft
TMdaJWrK/wvdCpRbfsXjGlSs9etjBY8Xt4ASJDw39jQMax3VfCgrwgeUh7vM
LU88wNr4Zgc6Y5KBEmZw3FLrK9Z23jz6yOsWoERUhN18aYa1s4myED/uB8qb
V+0b19SwdoWfNuXy34GSqGMp2eSKtVvd/uKVbgOUZOYaPuYJrD35j2tPTihQ
0ktdnQ6GYh3HEztSSoaB8lXX2sPqGtbhaalke8QXKBX/iZ/68B7reMX+mL+C
DJQasd8K/oFYx9Tlo941R4DSZGn/W8gR63y6L123OQ4ow6Q9F74B1vnlL+e6
pSJQxo9Vdi+fwDr7IxzS2n8AZSZaZJrTGOtSXBQV7FkGynrsg7I6fayrtSBw
4J8pKApIfVHwnMK66Z3/RF0eBcUtp+UyW6qx7l0SagaTAaAombWwSdyBdXv7
T2fOpYGifHPa8aVUrEf82Bn/TU5Q1Os77Tv9A+s5KmdtcSESFI2lAv1MdLCe
K0QbuSYpULQKZ39hy4b1FHbYtbzXAEWn3ge32T2xXvnP2c/f54FicNhzJ877
WK9mspL/OTpQfCJ3x0TsHtZrHvP5Mv9RUHy5Ip1qwoL13vbPO3y7ERRTZJ5l
M/ZhvbX6BWMm46DYOBnhvBqM9fZpqLewU0CxW8Y7jikT611QKCotugmKw1G5
BScvYX/EBUpeyLKC4obsxBj/A+yPc0/Z4Q1JUJLbnmbVthXr43areZFkBkoR
CQbh74OwPkkHg4CzMaD0Zl3t7Jwd1qdo+dOZ1AdK6Ql6cUQDrO+sep2mjwso
1f2V1lv/ivWlsDaMGweDMsFYfv4WD9ZXsmLSyvoLlCX1DvE/dsb6msaavhaS
QXl/7Cxh9ArWt1b/O3LnW1A2P1dmM8mJ/TWIbtdcKwTlNwGGNsc2sb82Yaf3
ZDCBck7I4NAVHeyvu1+nkKMeKNcwlBSz3sH+xpzvGq9vAeX5g59c3XZgf8f2
/olMnIaDJzkemkmqYf0Pvw1PGEmDisjxY6tR5lj/a0fVY74ioHLwtudc0yOs
/zPHw/gUAqhYnGpy9q3E+vuM5E3YVkDlxbYJ/YXj2MDBbrfPJb9AVcLUWtyo
Bhs44V9OmCgH1SOaVErmb2zAXpp8UTQfVB2XYlRr/mED4ZfyRL3egWrmT8Vy
63FsYGBpw1/hJhwyC7zRUeOJDazGnGy3doFDftK64Q8MsEEi9vpAiD0c+vAx
KdNADhtUCzwyMHwS1JgDFfLMyNjgU75gvXgpUCvrzjTlk8KGQJ6fn7cWNDxF
HkqPncCGzOrPO6t/A410q27NxkBs6JJ7TsWlXNAYr677QueKDT3/YuVV+Raw
i6Y9BS83saFxnbguXy8AFZ32y1WB2DDD6JRSijPA6ZkR7gZNbFgo/HB4BxXA
V1clIv47NnykuV9T+ThAFdOpUd4QbPilnWzi5DY4bLt0rLKwABtOY/GmExOE
ww90CFkH57Dh8vc/rPS54HCmhV6GQCo2PDXlwpm4CJqshRZ0gXHYyDGfLFfr
H6CZNyTVxceBjcxFYiq110FLOyQ5910g9o/t+0C2PA9oXT98d8zzAfZPdDVE
ITQBtN7n6XuLvsX+aVu37TSoB23CQpTcd0Ps33NpN/6a3aA9XBn902wXNqqc
kThZ2QPHigI+ttWEYKP6/ccv7fSEY2stytm2gI3aCMwO3ucCnUMrshr8adho
0A3oOqoCOgUfuGU9NbHRNqy9uuwp6FamBxRyxWNjN3/yvCs9BgaMn7fXupKw
sbCNbMmt3WBwIm2RzusxNvZW4XSMnzsYvLy0ZTT6BjZW8zTpKfYajlOEbuwd
UcTGRU9p+hWuwglXoY6AfhFsvHDI83T+JzC8Ky369foSNklP303MEgSTk3kK
CksO2CS533Q15AyY+K/Ydl5pxyblKmoG7N+ASZYdq1KGJjZp+TAvT0AOTIVj
bEJOamCTaQLPbDw1wXRAV3brSho2tTci0SJGCcxvHz00ce42NtWddDbR2has
YuodHl11w6ZGoqK26N0Fqx8DRebDHdjU3IOmR0qJYLX2ad3v6V9smsNZ/ybP
GJw6fWq8e1Edm1bar3K82BNO85cYbOj3YtOhBfzzW0PgjEfxoz/7t2PTkSmG
F7lS4Uw890uyUjI2/TbuYfdSPZz5PhHGFrOATef5M1TVk+GsqF0S6cMBbHpA
eyrG/zWc/bLU91gmEZtRq/txpC8HrAc4xxmWZ7GZY6HT/jq/4Rzrlb6DoevY
jLEBuSh1Ac7JniWH0NVjM45VtireynDuUgdn5K4L2MyTkoW9fLlwbvSc4woz
LzYT67vl8o1WsGHm5eYZ5MRmktThfc8S2PBT3m7ba4rNFOY9lPp4EGz2NZ7L
dLiJzQxnbBXRygObiw6X3a7rYDOzrtoWye1gc32j9tSwPTazIX/xGWEFbO6d
K1BtiMJm+ZKzebtUwebVre+C6UvYrMZbPWaPfLCp3+slO6OKzUZEuE0lFoDt
rj8fg/uMsdlXxlHyXJ1gq6ii3aYpis0mE4ouXVsDW8xWxXrjCjZbHMo2iKmD
rYnU9fmjJGz2373YjpYisPUKiqjRC8Bm5498E1bvBlt/N8UUs1Fsjo5+2Pzt
Btg+2N91UEoZmxO4vb/eVQNsow+8efErBpsDz8pKtmKw/aJfwMx7G5vTp4wz
XekF26+TWsmBN7E5s1nS4WY6sK2+/KKU4I3NXXI5U/AawLZ1YVlRpQ6be+44
naFSArZzp1nEN22wuTGrLbEXvwJVqlf2vh0Bm1uwvnRpJBOou1h1yjTrsHk6
uy+qTglA3cu/+EHNHpvnv3KqxeEeUA8OZJdf68Dm1e68JFJ1gKrvZNA6NIvN
Hw0a6fmjAtSTdQ/eu+Vj84ZhKqk2u4BqujWmjpKAzdtHtulbcwH1jP/31mvI
IalC96zqgHpZr0mBmoLNP890MmktAaorp55XKRc2H5+bu80iDahuuSGuQWRs
PuubRbHZE6DebG9x0zuBzXe2Pl82MgdqkA4d58YvbGEPo4CzTidQ47k01gLO
YgvKbOcPVf4E6puSyFtfx7GFw9zZHEeLgPrOoWj63kdswUzI9D+tV0BNDg7e
xmuJLfjsefoHqEDNUnCpbWHFFu7v//up2ASoOTefm8SrYQuPDx64raEF1Nzc
KFu1FmzhnWbjFjVpoBYSZcgcHNjCT0uSmfIwUMtVG85srcUWWs5St+e0AbVy
18l92yWxhT/U9BnFaqB+53X76lqBLcw7G4Uf+ADUH18Cy0oo2KJYwKPve68A
tTGeuv3yKWxx5/3eF6nngNqsmf7spym2uC9UwWGPIVB/dyoumUtgi9ovfjHu
3g/Utvmn8sXm2KJzCq/6jnmg9lQ4lvoMYIteDyo1+zSA+kfrRVmrGbZ4x8lX
JzYQqH35LLlqX7DFqO2TpvxkoA48dIx5nI4tlr2su0SvBNR/Px0jAg5ji3Ve
910LbgN1jKOqoes0tthujnlerwDqOHRcXjPBFqeIn/wnLIA6+eJL98272NKW
oPDIDi+gzs5Vf7zMjC3tcDgW9xyt59yauPrNq9jSviObCcZsQJ1fP72DaxJb
Orrp8qkqCqiLE2I3DytjS9c8T1Zk5wN1NeSq72w4tuRjyvrjKgNQ1xy+ph01
wZaC9hU3yOkBdV2NUVBtFluKHd/b9aYDqBstlRrLpdjSd3veufA1sKNvubpj
kBtbajpcuaKvBXYMIaZrR4OxpR4JPzqWELBjVGdU3Z6JLc21T3H6iIEd0xNJ
oxOZ2PJWo1/bLmqAHSv3gqXTe2x5994gGelA5Lff/rw0xpaVuGFPby3YsSmR
em1+YMv6VWkqFtZgx254/wTIYMvXsUeGWr5gx2k90Wmuji0HiOmYbVYht085
NIRjyyGrdKe/EMCOy5RzpV8PW36T4+q4Lx7suNWbIwr8sOXaPYa3xUvAjmfa
+/YHZWy5jZPtTjsb2PFaCouLqmLLf4dLgp8ZIhecLF2oxZaXExSecf4BO4JP
yQi5GluR3kL4sMwAdsRB+TDOx9jKXmxW8+cWsCMp3r7Z2YStqNg3t72mIN8h
5oZxYCvHU6NZdc+DHZ+wzH/bArAVT01pahQaL/9+Eef5SGzFz5F12Rldn989
KADisJUHD/89OryCnO1f6HoFW4lr/lT4Tw7sBA4o0c/YYCuVF1SFVcPBjix+
+wVjA7ZSHyaaxpOEbC6xLuGDrXRkbB7tQ/MjhwT9YX2OrUyulbk/mEGe/6Hv
N4utCj06UddhDnaC+XXpqh+w1W3Z+xw+uSCP2Es8t8ZW5dr51u8EgZ0QeSZD
dQVbPby9bffuPGQXAV7RCWz1wme7wFuiYCfMz2oTKoutunUeFTNURD7E8uSZ
JbZ6m14mS+oEsu0uR5fT2OoTvfE/P9B6CSfPCp6nYKv53V7qon1gJ6LI9k7C
GVstZzzVOLWKbJZSnpqBrdbJqF8s50f2iN5dvoit/r3GEOl8FDnTus43Glvj
Yg6ZLXwPdlt2zDUVrGJr5F0uDx5/RdbUkZa7j61tPWkseb4d+Sz9y3A+bI0S
JXiShwv5URZ1XAJbOyv3OtnaFXnazWHPLWzN0eju4f3BYCfKZmzPuYKtXfV0
aGV5gyyeFh6ei63dK5FjTm1E1p1Pq36PraWa5NhsKiG/nPBzCsHWcrUDSo4b
IKdkXjghjq19VT4pEW2HXEJ4LeiPrf0WGepWfoT8N6Z3Yw+2tt4nfNplBOzE
dhxU3XoZW2dtHMgvokNWXH2YqYatE8szRLjIyNqOX0+YYevS7/VakzSR7TQt
FByw9eOut8x6Y5Cj9ysy3sLWLag62fIZyEkuvCEx2LqtqQD/LZRfYtnU4tD/
sHUP5ZRGoXnkWvehbVzYesxGj6ERWh+x9SsXKU7Y+liopt5XerATPznWrjeC
rS/48iQThJCtNN8tnsU26Fw72K3lkan2TaX+2Aa/qVvlyilkd1K1RD62obbl
nfb+LORn+6uMNbCNo9xXE/yqkWPZwxiqsI2TmxqMtb3ICVmr29H37fp+f73E
jZwZevdjK7bxMJkNe+uAXGetE1mObTyLboqbvoXcPGu3swbbeBUav4E9Re60
J/f4YhuZV1UKOlB+iw93XNSwxDY6Dl5S5RcGOwk6pRwRZmxjYJdyFFUBmbkw
dTII25gUZVxKQ/kjwbmDLFqHbTJsxnw2uIYsEFtX24Rt7qqopdz9gSyr+mCi
AdtUfMxQw6uKLK95I/8AtgmnlW2j0P6SOCCn8TAJ2zSbjA9LvYOsliQs+xfb
9Be6NtyKf/6ESaPxE2zzYd9/vlT888Y+xqqPsM3nHzsFxtF6SpiHdtqNY5sf
D2sfoZ9GtnY4b/EP22y5KBi7G/+8M1OtERnb7KMYHMjBP+/qqe2Exje2gaJ5
F9mtkTy2H+jodd1Xk9OQbxpmO9UAHbmrW6b4IXKg0+dtv4FOVHPJnQntB4ng
w+Np7EAnmUQq1l1CDuHgvZQNdHLXjpk1oXhLPHb68MEU6DRZ0gJGUH5JRF8Y
rAsDumOXqmvlbyDHlu/sNAQ6g18Dwm74/eJJx3T1gc4iWvjThjhywp1r+82A
znlvQBdpGfljtSacBLprEbEylnj8UwtP1M0A3fXlz26x+P3SEpLDBYEu4NsY
x84m5Cwjh7NngC7S0kxZDb/+l12U3Hmgiy10CfAfQi6o5NK6DXRvtwX/rMTv
V3RKeYwJ6FLGiuyN0PkiUWp/bU8p0H3z3/nYwQm5ksfzfhzQVQ0e7vzwCrnK
bm2cAHS1+md2Tv1G/p5+hzwLdG0Cj4q80Xkl8UPx+B0poJt4vzz6SAL5V39T
AwXoZjPe+9oWIdePvVdF41n6YsV3AJ0/Eg0TuTxiQM/wI1f1N9p/Ek19zEF9
QE+e9HwghvaLRGtQoewToN+ytENs4jNy2/lKh/dAL0nXnF6C6q1Eu/pq6iDQ
7yZR2uyeIXf0nhC9BPQYZVYmmYTcPXlZaAzotdTfFHinI/ckxaTqAL3uUWPD
4+g8kug9W4LynN7EIv36FKr/En8KVCKoQO9406VSGdU3iX4DU24PoL98R+I0
2wfcQ94Xx4H+6sPaiXY95AFf9Tp0P+9YebIPqu8Sgwk9x32APrx47HwZM/Jw
dXj2P6CPqIpefpaAPGIQMloK9FH1+qGOeLxGajIEkd/2JWdzBCD/K81MTQT6
XOYLTIYbyGNhasc2gL6QRyhyWyzuVSnZV0D/lVy1e04Nefx8soAn0P+Q2Wny
wht54kC55H9A36s38KYLz8/J7OhEL6AfMHmm9OkF8hSh7Zkx0P87o1Xtr4T7
otAtSaCfc347I+WBPE0u/3AVGNgeUQ9fROebxMwpVl9tYOCOIjarPcad6NVf
DQyk16UXePB8nJnWkEoABtHMrY/SryDP+o94PgEGhebunsVR5LlHBZv9wKCk
9zXcMQf3b6E7ssBwqDhRo8UPeV64zuwwMBx97xz7Gd+f8zGeQVuB4cyttdOe
+P5ZCM9MKQIG2+lejkFu3FWzQ/zA4OjwLd+sFXmRrrUrHRiuGT4UVsTvv3g5
PW8cGIKkhH/PvUReUrxxvw0YQiPXA+3P47b/crUOGJ5y/1Fswse/9KQ75xgw
xC4mRWRW4B7tN+QDhswaZeNreD1ZfhzPWAYMebCFvq8Ad+6b3ZXAUJS1kW4c
iLv782cWYPgeV0HYj85viRWZA4c7gaHnmunPaR3c6XSTicDQP3TQx5YPd/2B
aRFg+HdGVO5XN+6pt29KgWFe++/DNHfk1T36PruBkVP4mq4Lvt9W45S7hIGR
EGa21HMRd27NmigwkhlVkk5ScDcUoXExbh2nZ5VH54PEGtMv5a3AqFQSXja+
gJvKcloTGNUU3dzPluK+vlAcDoyHky22/8T3+1ooldcHGA0ixANStuHOyV7N
A0aqYwpcPo68zpiYkQOMjp2PJjvx/bgu8PVjFTA6G7m/0u/DvdP1xywweh06
tLHbC7duaGsbMIbxVH/5h+f7ejBB4RkwPr24/eQLfH3WXxTmSQNjZLn3Xy1l
3Il8jR+B8e2tPRyx+PjXS0ublYExdyTcyhCP//r8aeI3YCzSGhpbz0feoL/z
gA0Yv8WDXzJevze47Z41A2Ot+XQSEz6+DSmjLej6f8tMFj5r4D7JExsJjCMS
Hx/Ys+G22lpwDhgnvJnFCQ24qQudhcC4vC9H+yKeHxsec6njwMTzSihCDI/P
RtTpD0Rg4lu5urMarzcbrzOlDYBJ2Oz7l+t4fdt43zrWBUxSXDf7fmXgznu6
VgFMKje69t1pw/17sOkYMGk0K5YrvMHdVRcvCUxaCmGWXZdx94eDPzCdGML8
lOlwTz//GQZM9qava//tQN5k773/HJgufFqhPp/CzRv1SAaYXDiNF47g8dgU
UPAJBaYbX5nEYvH12pRYlRcFpvC9DpcN8XzapAgtDAJTxIOizXU8HpsHf1vt
BqaoQcGnyay41a/fWAamhJiqL4z4ftk86vi0GZjyOXaz5+D5smlBePkJmIrP
34m1e4D71LofLzCVlXTuI5jitm5YswWmuuuhlheGcTuo/I0Epv7+yf/EeHC7
M/cwAtPI36475oD7Ok+4GjBN9NWcC8f7hc2bLFaPgWmp9z8hevw82fQtSw8F
Zq5O66DBONwPAvfVATOxw+C8xC/cocS7rcBMblc9bMWAOzzsvREwb20VWK7B
z8PNiHOvjIGZ0vjzYpo87lh7FxlgVmn4cnTEBverwOA0YNaof7992xPcr2MK
0oFZp+5uRwS+XzbfJV47A8xnatQMbuDn1WaK4rIsMNtW75LJoMU/dbOoAZgd
vgsxjeH7ZTOt+F4RMLtWzBZa4/VgM0tydi8w3/36Qf4IbT3yvbiWgTm4NIrj
1m3cXxYTuYA5rCRwMBs/nzcLr7RzAnNkEfWVDD/uEq3qJWD+mC9C4OrEXf70
jQ4wp+exjh2lxbOiabQWmHM+z1f50uJZxbvzKjCXZNf7TeP7bbPahfckMDel
B03/xvNrs7Y32RmY29I8a3lp8awbj9gCzN2f7JN1aPH8NReuAczDKUD9gteT
zYZpVTTetaTFxldruH8nVT0HFvr/Bj610eLZEvzWC1hYEhtDSLR4tp732wcs
hIRPWnfLcLfzfOABFql4h+wL+P7Z7JKNbAWWXZxBKfCP5nn2fmDZ65n8TugY
7u4vwX3AomowEVFJW89eVVkdYDm57OkuhfdLm3/p/qgBi5l95KVVWn78/a86
EFhO1eXbNdLG26/3PABYzr/bMPGnrc/AXUoQsHgbB+7voeXD0PcVe2DxK0za
lUMb37CxixywBMpUbwujrd9wizsBWB5t8pDUunCPtNycApbED8+mX9LyezTd
+yGwfCR/HrmK7+/Nsa1uesCS7t/2R5eX5pAgdL8CS7Ffi3j92hw/o9sNLA1M
79LQuYY80VGO5tviUpkkR4v/pKLeE2DpbB+JZ6TFdzLknBawDKXvCc/IxT11
4OJfYFk/m+1CoMV72sEiDFgZqlochmjxnE75YACsbAeWrYto8Zye+dcCrHwc
6iec3+GeuW6mAawyOeV7avDzaHPWqfsKsMpLDkm/uUlzfFQzsB4IZRe70ULz
72AvYNWwO84tQ9sPc+pSN4H1SK0L0yYtnnPO3aXAqqvyaK3lBM0xoxzAasrb
NBbITvMCfxmwWt1c6D9Li/f8VkwKWK0HhToptHjP6zS7AuuFgjM1f/1ofnZW
DFhddt7+lt9Nc55VFLC6P4n/8uQQzR2o72f1der/ALT9uCDqkgusd69HjyYU
0Hww2hxYgwNN5NgCaDZ5YAOsT9+WfvxF2x8L90r2AWtsqcKeF7R6tpC56zGw
/tcdl3qOVk8XOnrR/NLXuPfuoK3nwubCHWAtEPb+NEGrj4sStyeBtULpn0I2
bT0XVYMzgPWXqWW6jznNRigvWZeqSVnRtP2+6DsLwCaJ/ficl03zhap3wKZ4
832ezg+atTJ9gU03OzC/pZ9m7qkyYDNpmD/0ypV2/9GffMB2dsquwIGWDwvl
xMfA5sTdoC4fRHNUciKwXdsNhQu0+rBwIcAa2K6rLG5YtdN8Mm4/sN3S+aRR
GE8zxe80sAU6iBXfk6PFcyX4B7A9dG/aHJ75f3zfFwPbozshYEDLt/kv/ueA
7WX8Sim/Fs3Xj8kD26tPGfReHDSbyJUAW0LRhcMdtHoxvyc3F9hSO1q+vj1D
W//utEpg+0bOKttPO2/m9j5G8696HL+VQsuH2TU+EWCr5Xp4S8mS5oqaFmBr
Y6BSVGnrPWv+TRPYun2OP1KjjXd2y7Q+sP1dOjimIU7L5x5FC2CbmOBN0KTV
h5lzHfzANue0SndkjmYx2S5gW/47eEZ7gLYfWp3qgZ2prZBft4pmnTARYBcp
v3jXKJy2v3i0jIF9K5j1mtDycTKvvwDYpb8cVjOjnUeTdiKPgV0hXXDOirbe
E6mkh8B+NKbc3pa2n8alMl2B3UAwrcSOlm9jX/w1gd3oSYzoeTqaT17LAPYz
QdeanP7S6scV3zpgv+a+Vcs1mVZf7p/vBvbrk5zx12JoZva0A3afCwtr7qG0
euQn5gnsQed+ZnnR8mPoYk8YsMfpe0v5KdPqG9/Qb2B/W+HgFyBDq3/u9g+A
/f1ho867IrT6+KtaBdizlGUi7uPPD5t9tybQeKq3/WYKp+3Hnlc1S8BeF1tq
8ziHVn87y64Ae7PQx4KnSTTz1+sAey/PHfcX+PPvZqdHWjqwz68o9KNzFa/3
i+R+YF/1EIXXtHxpZdfZChx0U6wxbxVp54PAAz3g4BzoNv0P78c2m7d8KgQO
yfqHZak9tPOm/WQxcOzcP8Y0TsunuiKKI3DIRRhoozzDz6tohQngULbgKk+m
5fMPrJoLOAw6QysSqbgr5VO2AIex+gTLAG085b+DADgsXp04JnUEd5kn4Sxw
UKk8lW+kcJdGnwkAjutD4VWxg7Tz9wbRDTh8dKbYOmnnSV5rMPp7QLKh7pZK
3Ll7FqWBI9SZ8J32fmIzK6/QFzjezDyufob335spx/9ZA0eSyQxH0yncH8y5
0HxSso31+fRxvzcmkoEj14tU85iWz++knnsCx8/1pz9CxnHH7OaeA45G6zmu
Glr9i/peXgocrSWmxzlqcb+w6nwEHH/v8P8MSsX9xKD4D3Assz2rvUvLh/tu
vJzAsXFhgecb7fy9++T2GHAy1pifZDDC7R+v5QWcPGHkOr/9uL3vie8BTim+
F7+8afvliuPzJeCUdV8i5NPq0cVxw6PAKf/b0nC5Gbfj2cxXwKkSJVR/nZYf
59YuXQDOk+JRDW54f79puO3RHHCa+q6QMvD3A5v6E/GjwGn155TxtBXuY/Gj
+sBpnyDS6IK/v9nUyM4qBc6bstFNF1dx7w4dvg6cvvKPzyrRztcd9UMngfPu
gcBB+o+4JVdaG4AzTP3qYiT+fmBTcHknH3C+MdIRKaf1owzP0lOA8z9z9beP
8XzfWJuMEwDOj6cPyJ3B9+/Goqx2FHDmnBdXn8XXf2P04B9N4Kz2mrPdeh93
fZYEK3DW+YyMjPbirl5ofAucTQE91z4fxF3Gx/4HOLtDqu8ex8/Xjeym+6HA
ORMf/5833s9tvKDeUwHOxXfPFY4m4g63lBYEzrXkh3lEfL9t3Jdouw5cLFme
1Ul4f7fhKWl7A7hEqgzGf+PPfxtGtTWJwCXxU9PzNa3/11HmqwYuqQblzcv4
/tzQcIowAy75zu1ERk/cu7aZ1gOX5uQyRQF/nljf+NFjCFzH5iYK1vD1XZ89
LS0DXAbL/dqVeH++PpRE9AIuC8Y6C2v8/cB6nRfdPHBdEnx38yH+PLkeXW5e
DFyuotGM5vj7gfUw8e1ngctD8lHINvx9yLqfzAoAl+9u79g8vN6u2x2vQuN9
ihmVDOLPR+vS8V82gStS65huOt4frwuYT8sCV6yuWoMP/vy+zpQmbQ5c/5ns
7OfD6+9a35H9G8D1xWGD9fBu3JGpLReAq6R15wfa+7a1O5GnBICrQtfIkB/v
59acN/f9Ba763QmRQ/j41w4f3MkOXINT+rtC8f5jtXc5pRy4xmzdaxfw57fV
Stc+OeCabohzs7HAnaLbwwVca1nTBQfw/bF6nfjdDLhJNyKPt+H5scoQpDAG
3IL/Smc08f5i5W+sYCBwi50eff4Rf3+y8m3mYi9wy2ho9Pjiz5crAfqfZIFb
g2HgqvRz5OX5va9TgfuIO69AOJ5/y3XF8S+BW2fgYN4SHt/l947/LQO3SWUI
Qw1eP5atRg6aA/eFkP0RV/OQlz5xOX8F7ivrZw524P3Gkv/nd2+B2/3KvS4t
/P3ikonuuj9w+xq27RDE+4/FWbYMXuB+JuD7uRB/HliUksZagPtl4PszO/H5
LYwfjp8B7leLjXSP8PNvIZt95CdwJ7fv0LWbwA0+fFzAXRL3o4MDP5/mtVe8
SMBdwbvg64bPb57xrrglcNf4b93ehfdzc8VXF38A9287t8tp+Puzuf3GMhXA
PSYjvGGO76dZhvXRReCejjryphif30zGXXk030UO52Oye3DbCDZ4AQ/9WEn4
Gv5+aTpbKbkYeATTHSXf4P3+lPb4eB/wiFbs4InE13tylLncHHgk2/tXw7bi
DiNIvQceOSZq840V5ImfP0q1gAcsrIONUpDH9wexygKP9mUxz2N4fzdW3uqd
Djx6fp126ng/NmaelYXuZ5p8Sl0Wj8+oa8v5aOBxWjebpsf338g9KYYF4LlC
4u9axOMxwrh/kwd43HY0Vo+NIQ/fNv6L/u5jaJTQir8PGrrkv48XeB6/PW6Z
hj+PDEgkXCABz/NcLu1EvL/pv6v7vQZ4on/U7I/Bz6O/A877rgPPuwVdriC8
/vfFdN7/BTz5ulol5/Dzr6eb7eAr4Cm2Zkwxw/vDHin9iovAU3bt60t9vB/r
djhb8h14amPAXRnvxzu7HnrvB56+STUZXm3ktmdae0WBZ5hxVYAZ3/+tnylT
O4FnXCiffhXvl1qatu15DTyLmsodg/j+bt7wCX0OvJzPDoQX4e8vG4h9XmLA
S3g/cysrErmezYHAC7wCRekXaO9T6pZGZZyAV2J475HneP39WXnFdwp4KYd2
LV4hIn8nn70/AbwqJ0f67fB6V9m6IPgdeDXsk+qt8HpZEWEv4ga8OmE7Pmjj
9ezbvHDPS+A982fbObHryEVWMhnFwGvbaa5giJ/nBQMHGTHgdWh5QH8H399f
LnDpXgNe15/Tb0fwfj3XQudAEPDezS8ZzsLfb6dXpXcUAW9w9lzeEN4vpHFH
CDcCb1i6zEMRfH6pOkk74oA38r9He/zw54Pk+EC9GeD9GHHumgH+vu/Nr9yS
V8CbHv70iC/ez8WX1CXLAm/Og0r+DPx9SNy7gxLbgLfEX/6zIH4+v9SdfYTm
2+S8vvoXf/56tHpTYAx42y7s+0nGz8OwwJDXfcDbbX8+TtcOOYQxK2YUeIdP
/YRP+PkX2MjalwS8a8di7t3E3494F3xcsgQC3Wun3eZ4vLzqHEdFgMAowcA3
heerR31Y9U8gsIkoDmzH+wmXN4mfG4FAIsTeD8afV6nOikdigcAfpuy6DV8/
66mn7htAEOSstyzA+9HTNvsqhIEgysosO4H/fmDKcHkzHAjS65d/mOL9ltZR
xiYiEGS8WbIm8N9vQDwqWBAIu5biY+/jz1eHepLsW4Cwd7bpSv5/yAeEhRvQ
91X+qRG34u8vtlqt1f0Bgppj83Ie3k9scdz64RoQNAZc+kzw/ohsqT5aBoQj
vW8zA82QOf8O+kkD4XgLp9kY2g/i82FZERVAMHxQbGCK8l18cudIWh8QTDTc
NAuP4L8/RZV+7QeC5buOvWH472EdjKF6H4Fg5/6BXSEYubAxMWMKCA4y1ptR
6HlIPIcs374EBKdO0gI96hfFU2W3SroD4cqRm30N+PVjv7yzZgfCDZJegTvq
/8RvXvVuQ/H0Lt/I6ELngfhVgYLmbUC4fSPjvfY6sqOfx4ccINz5I/JcEL++
yduS74NACPv0zyUPH5/M0txhNyA8totzkET9mrhYkl3HKBAiBI3PPMDHSyId
U68FQtTtfN3T6PpiKzwZhR5ASDj+YNs6Gp9YhVfjQgwQ/qPXEHZA8RDLre4S
zALC+6wZ3trPyMlVTS1JQPgkarX2Cl1fLLTE7YUqEPJGZX8fRuMTO0n9k1ED
hIK4rh/J6PlQTKNN+t4EEIqNH3/jQ+MV2zPy46s/EMrylj/149fn+OX1fh4I
dUHfgwPR+ESLL5lNoL83qPn4TqB4iH5w3jlyAghNU/s8La4iP5/bXc0DhHaL
KDsZdH3Ry/dmelC+Dey4oFaN+kFRou3LbLQeQ+1iBw5ogt2WZaXwFgsg/Aut
l43+idx7XZwLzW9yXoV8GfWXW1Lk8vei76+UsU3xovq7BaNndqoEwrru/QeF
6Pzesv1bCCsZCJt1LNKXUb3bwvpvV2sSEJnaGU9Vo/NHpNYsK9wdiDyT6+X3
cJtg74LTgEj0uGVzAH1fZH+h+BIzEPlWVlb60PdFiH4xzTuAKMy8pACoXgn/
qFq5owbE7VtmXq4SkFUGDGqjgSj9+qrie7QfhPmEn7W5AFFmx+Qvy0dgJzTq
yvnnIxD37BtnzuFFjnJ5890AiMrHhlyvov0l+E9GueoKEFV+OnBKoPUR/NJ1
7lgZENWM+9/VhiGHPKBfngTi4bN/OuS4kXdlkDS3AFHfrVN7iAvsyFaP7KWM
gXh8+VTvM1T/ydvMdOo1gWh4u81bC9UXgZHuRkY0f7Pg32lvOJE9tqczNQHx
3Kv6LWfR8zi/d2J2mD8QqdInczhRf8Cv8m3yuyIQ7ZNrDfNR/8e3cMGI4zwQ
L2TXBAqh85zv0m5O3eNAdKspn2pkAzvS4Wd3njQA0dNI66E/6s+Is3QmDJlA
9Pr9bYcCWm/imw+W+58D0edPyekwVA8Jay8plrJAvL+YX6HLAna8UbkKPT1A
fOCjYrOIzkdeNUYxZgEghjJ8Xk1E5y9P58HSHSjyT7iz9zExI5MpwzlcQIzZ
/im6mAnsuFwEd0ReBGJcj46WWjvYcc4Pnug4AMTXL3vH8j8h36h2PyUNxP9I
JPUclK8cXg8IHXJAzKBz70lJBzu2k22UvmkgZhVwB+3G/39LoXbGwzEgfr6e
qPD+DPJOuaC+VCAWTLT4v0PzZZ7ik4zSAmJll+r2GHSeMZr8aP5QAMTqyIYf
Iqj/YHgTqVpwDIg/TS+5R6J40Y9LHfo0DsSGmpjyp1lgR+dBLuKmALErb9Px
ISdQ14+7tk1+AmKvRySBrReoa9cNtyWi9fu7TyE3MAeoqzFE66gSIA4nUdkD
qEBdbi5cPSEOxNnnZR9u5AJ1gUVJtATlw4LxWZPFMKDOM75ak2UC4jL3/JqH
HVBnV/4E0MUCcePezuMo36jTvy0qn/4HJHa34Emn80AdV2sNkvsOJK69214M
qgJ1jOmH3XopkHj+fQF7AlD/lZ86/nMKSPy2Y4/PFQB1eG/EtajLQJIwPHnA
ggTUvre3ik4QgLSNc6ijaRiof3ZrKuwgA0mq0u+ucSFQe5JlDkr6A2mXRnrz
CSegdobcCzReBpLiHv7r2kVAbe568o1pK5CUh1MkvkUAtUno6upfKSCpJmhX
Hb4A1AadTC4NViDBluvC6vxArQ2yj5G5ByR99rYvlEtArfC5o96iDaTjuR+b
f5UAtczhfmxRDZAMHX2nnAWA+vWIucsOFyCZle+QflcM1MIWTXPdX0Cy8bv2
SJAPqFk2jzlMkoBkt1c7ORONL71377ejukA63y1UfhKN/5ORSURpNJAuHSpa
CXIEajLLuJJVEZA8Fjntl78ANS7ngqixGJC83nX7Pkfxis47pAI7geRtmv5y
P4pvZPK0gqgRkPwyLOou8QL1iVU0Ybc3kB46J6h0ovW52xY2c/MdkMJEr5t6
ofX01z3A1RcMpEc1ei4C3ED1Sci5Jh0GpOcyUwnHPwPVUyx/91AtkOL71XmK
Uf44cM6sesUA6e1TguxpG6Da1rbfWO4FUuLhv0cWs4F69iYl97sCkD68Cr6h
cA6opkGXubiVgJRzqvnv60ygHvbIvhAdB6Q89qQNDTagqrlwd6QlAOlL7i2h
9rNAVT7O5GkkD6RS8rYTfKxAlcsq45t7CaSa+iu5d08DlSxN/7gqA0i1focb
t6YBlUCp7n8aBKT6vfzjhcxA5ZBa+3BuGEi/Q75sm/8EtusJ59kt4oH0R4c1
1JERbP/yvghQRONfKIqn6n4A2//IBbeZDYG0jGlIylHA9pXnWAN6viKtFnf0
8hSB7YvMV2tJB4GPrlTwbOMvsL1fEm9ioAd8HN/CrM7Oga3DlmBI4AM+bi05
IfAB27PGRjFH5YCPt+x7y3YWsDW1LRdvx4CPv4LZdFgYbDXZqu23XwE+8apb
htc0wHbLRZ3Krgjgk9QV4TWtBFuila2rVwXwbf/+uVbZEGxZxW4oWDIAn0z1
rP4aFWxmto0Y33IFvv0/Lx4LvA82FYJcbwTfAt/RBkuNl7/A5vwJ7i1mN4FP
13h+3ccKbCzPRsnssgE+/canBef6wEZfzSC9JwP4DJvqVKXmwEbBYUdrXSTw
nWo5qvhJGM5N1XBdkKgDviudFLlvVLBe79f3DhUEvqtn6kffjYJ1V7F36E47
4HPrckkOcgfrQkV33finwOfV/UHm+H2wvjlz24/9APAF/Nm2veUjnJ3O09Dj
fAF8zwcJIqPzcObH2Fm+2ZfAFxVTORQbAWfeXoDdn94AX4yJb9bJA3Dmxs2P
5dLnge91yeTxjKtwRsqWGDHhC3wfo2v9vMbhtMfFmFd9KD5fjUIGmQfgFIvC
9qvxisA3XsieLtEM5nP18kI/UTyn3Ep96t3B/KuFTZG+H/DN7rqhd4cPzMOr
gmredwLf0ovhv4NGYL7rpv470TfAz3itivzxJ5idC/BRcz4H/MIygbdUysGk
xtrjxjYv4NeKYDxmkg2GX1vZP5bOAv8x0Xu5+kFg+OL9/fP/lQG/7js22SNn
wPByuXb03hXgP5HDzXmAAQwF/6r/5doAfstWch3pBJz42yIee6Ma+J1Fd5n/
GgYDZ+KvlCdk4HdJ+FhZ9QUMJAM5j+aHAf+1PXsPloSB/u9CPmJhN/Bf16CI
pFFA/8hNO+63GPD726h3h/uD3o5Tr5mqzgL/swQjhxMioEMKlZdbDwL+SLnG
Fu1xONaYG6PMwwf8L7PNddRL4NizzF7h53HA/6ri9K49DnBMVFjdbYse8L8f
tp/gyoSj+58dO8+8BPwfXYfOMQWC9ooS+WlPF/CnLl+oWzsF2l/f0ql5KAB/
FseV9DE60Dbr+nB1Thz4i+S8PGoMQOtePk/GxEHgL8laGfwmAVomrybnk/yA
/5u6j0X+DGht01W4WuwE/FUnAlSSo+BIaa92M+sy8De4PlwPHoQj7Iv7RLIe
A/9g1qt7Or5wuMBy1/u/KH4jCmecrBvg8PPrqemiIsA/+lFY30MKDl9V2X3O
owX4p94+Jb6uhsMyL3+qiKLxrDwJjF3lB4h7t8fL2QD413mO+BMdAHxeE82X
MoB/8wGd/c48gLMKW1VafoAAk//NXabWAOJ0ire2zIIAj6tzTkoSYAYOP80h
EQQIY7uivq0Axrcz6bcqMp/j0K3246DRPpXpxb8EAkLnbI+wzICGc8i5SCsC
CGw7YVpnowbqcQGSYWro+kpyh4ZJv0BNTnltZqQZBA7+t1Qjuw3U6Mvc9oyf
AYFD27NTMQ841CoRtrFwDARgy173yyJw6D7lSMmHaBDQ49hOV24PqhPeRsrh
7CBgcK/nb0cOqFZvvZR9rgkETtLHVMywg2riTakg1QwQMFkmh4qngqotJriQ
1Q0CZ4c5hK8vgUp3/pv4294gYGNXsRamByrFaVwk7x0gQO2505MQCyqvNc3n
DIRBwPH3+jvU16k47HfSSdgFAlfLp/fvCoGDC3NeNjcFQODe21a9Lkk4uK+4
tls+HwSCzD4d+voADgrbO/hZboDAQ9ZAuf9m4CD9E/bvS7dA4NElCs+1r6Dc
6KM+pCkBAtH7wxvY7EHZ51hM54FqEIjtd/g6/gOUnYa9Nt6tgUD8c/XMRkVQ
Nl2n/CTVgsC75dFncSygLO8VyV8XDAJppcesDiSB0qDHmxZPFxDIdBPXEyaA
UrNbsW47PQjkSM2rbtwApbJGL3nr+yDwJeit6Hc9UEr4dMlUHY234uRGr/Uo
KDm9PiZYIgUC3+mb67VMQemU21jAeUYQqMn8+FW2AJQMIh+6LjqBQL3gqbdz
IaC071e0v64eCHR05zg+kAfFzR/aW0xegkD3o1BLl+egOLuRLbxjHgT+aNrr
mm6C4rDHLxaLUBAYTCTtlvgFig1ydBKrNSAw7ew8kX0VFJPCG2f1REFgTkKr
52U7KMYVjQnYyoLAQv2WX36aoPhs50WXlD8gsEb5nqFPAsWAVwFTG3eBzLIm
7dGbBYo27JuPmk4BmT1lzaFCFBQt/swmvVwGMte5RosP90Dx5MhPEWFVIBO/
+at4moMi3B2K7HsDZNEHneuci6C4/QdzS283kCXUMsenbUBRjEXrqhA9kCUn
HnT/rgJFstOlax7HgLzT+GDJ60hQZI9vT22OBvJ+4Yi7yqpAma7eHXxOFMiU
WCVh6m+gjD34riDjDWTlrS2pYW5AGXI6/WKVAchqMiKtAx+B0nV99FlnFJCP
Kr3eEyEOlOpW7SCBJiDr5Gt+Lc4HSoXLRh11Hsj66v0WoxZA+bpVsLPCEsiG
2jsDNB8BJa/SgmhwEsinTFJ+TzMAJVlq26BdKJDPtJy8LBoHlETXHoUFEyCf
OzVNr3MIKG8aRLlmPIBsT6XsfuUOlOhfFnVKi0C+4prvd3wQKGFpW+KamIDs
OndG4EYAUB4+47U3Cgay2/X15HcSQAl6iB2dlgCyly80rVkCJeB9W780FcgB
oZWyyTVAuZ5IlpQlAfke0anotxNQPDgWWwHF9/4zDlMGJqBcu20ap43iERJz
/LaVBlCcww+b658F8vPkxkbWNKDYGz35VILGHyXv4XTAAChUydFcczT/6Azy
uvUIUM5tXBGQQNePzzu1M2cbUE63/90eag/k5MreW/YRQDEVefhL6TOQU/QD
iI8UgGKsvQ3rfQbkT3XbE7/8BIrhjYkrG55AzvrtUM/HApTj9EfHU1F8ivrH
pUu9gHLUn2/7xEMglzqF5Y/zA0Vr8YKrlCSQv40pGAqlA+WIp5Gj3n9Arpp1
u+nyDygQKiyafxvIjfTLdeJngHJI+KmMYBuQm79kXxPmAYpKFkEowgrIrR5X
BfhKgXLQfE1KPALIXcPDp9l3AEUx2+J9mzqQh+t+D85OAkWhtnV7JRr/aPCT
4Ik3QNn7n998rQqQJ46ckBsxBYr8/W2eAqNAns0pv9adCxS5U0muV1D+bcRm
bnxH6yVzwj5J5x8I0lu4vC6jAGXnKVfB1wsgyETcrVU0BJQdlzUusGSAIPvd
Nw+yUHyl4qN8411BkP/SY/IrAaBI6qTmPHoMgoLSBnlRVUDZ6qtwc/46CAr3
sJ2JuAkUiXz3wUleEJQw9n0T3A0UcY3GK//dAMFdKlfk3ZOAssV7TJ1ZBgTl
ZmXrXU4BRaT5zgl2ZxDc+3HA/SI38gH23f4GIKi49Uz+uWtAEVoOaOSwA0Fg
1T+qh/KTnP5ZJBldT7OUZURrAllGt1jGEAS1b34NweKBIvBGlJDpDYJ6EyoN
iiif+F/tSzyM7mfWLGONnt8ppEJB88sAgpZh/fQifsj6Lwu+sYPgaZ1XCQIH
gELs/CnQdRUEbQrI/zgikVk2RFoIIHjpLbPHPBUovF592TutQfDKmVKhKbT+
vFvkdlWfBcGr5Ftf/lUChaf441rXKgh6Bs/R98oh80o4GrWBoL9rX2j1PFC4
Kuy8gm+C4J01p2bOTuTbpMUWdP/A+5OiBl+RlU8nH6gCwYdxq8m1aP9ypkZk
5m4HwWc/+SsbdgGFIzXrhbgTCEZaRvPyEZCvHbpeQwbBl/2S5iaLyMpCEQ+p
IPhqdU9/cxlQ2Ms+X7HdC4LJssfo26yBwjZRpMZ1AQQ/Zv3UFdFCLpCzdvgM
gp/A5NHp3cgPcnNt94BgloWNeOcS8m7SPzs0n6J7Nw71PgEKq5dU7Tj6fClh
844k2g+sxzv2NT4EwW8x96qp55Cl/Kal0HpUZT6x7EfzZ2m6dwPllWDDnw8e
QxXIGgPVu9H6NjvvK5RB9Y1lS/DxkB4QbFnKZbrwFCjMS3NrbgdBsIu37Mmo
DXIOn+bqThAcUu/6NLGCfHA+sjoUBEe+2y3u7UXeYjcUjeY/ZvpPwxXFn2nj
xsvSXhCcvrTwYwbtd6aKEI/EGhBcfck7srAX+ey4sxP6/Ib0833KZGTtA9n1
dCBEly7qdX0NeQ/zUmkECDFXybIsVwOFcUNTPPEoCPEuaG5ft0dOrLjlRwEh
kn/VJQ095CfCH5wlQUiA+0SG7z5knz9DvUMgJCJ1+jDdBrJ5pXpRBghJGbtb
M6F8YuSOv7KjHoR21CsK2qG/M6x9vH31EgjJnpz/9Q1dn2GMnDKM7i9//PqR
AFSfGGrW9X/cAaGDOjdlNtF+YwjvEhFJBiHVStW+c/LI/m8dhztBSF17NboI
zZfBLTetbTcIaR7x4fFB8WOw/G7XrABCBhq+sysoPxh2mL3jngOhE4WQcgrV
IwaR813uPiBkpEbvkIfyj4En98yJGRAyVwlo8woDCv2SuEdcOwjZUO4VLaB6
RP+zqjzoMwhRM496mYUgfytL1EoBofP7WfdlzSDnLW0fXwWhi3uDEtyKkP+j
l/28CULuux4GT5sj3/FWrpsGIc/3BkcMC5C9+f6rDQGhGzJca2moXtNfa/+K
CYLQbekwlytof9NTpybzT4FQ0NbHpmP3kLW37WtqBKEHr4x59FF9pdfgr5fp
B6FQcVLlB0NkZfnIgTwQerIlQvWiKLJsE6SIgFAM+YXEUBYyof64aTgIxT2z
aDsmgswxeOFqIAi95hd6kojqAT2zqK1EMQglEl8yn0f1j255mNuxCYTSuGL+
9fUj949arRwGoYyHZxM00frT9cwpiRFAKJtD/OxrdD7RdQgluKL1yGd99cvm
FnJ9+u/ERyBUxvAmu5sPuUQgXqAVhCo++/hwofjSfXlctHEShL5fttQ6xIH8
WZbdZAsI1f7mbohE5zVdauJz2T0g1Pbea9IIxZcu7kcM6yAIdVqb5PhdQY4m
Muc9B6EePnmfVBQPuheXBt5ugFD/rX4uzj/Ij6gTKZ9AaNLwpEz5L+Q7OpLb
hkFohll2cg6fn9/+rWNofnP5TJ+3ofyi85HPCA0DoZXt+dq+xcjXz9au/wVh
pkVpqkoq8uUgs9FWEGb9SCfrhOoR3YVV1aA4EOawaZ96nojs6HND4w0I81Y/
uj0bi0xNfRZnDsIisavRKShf6KzysoPQ98WMf1M72ZAtYisuhoHwVtb0XRx3
kc3CguwkQVj6qkOuozeyUcTkkDcIK2jVN0teRNbbYxuxC4T3L3+MOYn6ETod
FwZqPwgrpt63u43qM93RL5JHg0D4kJDadIcV8pGr3aovQFh7NInnmQ6yunHV
vQcgrBMf0PwN1Ue6Q3++/ooFYX2zszEzgKx640IhFwgbFvPtPqmMrFw6PqID
wqef3NbBz2O6/RnnP/OCsPUxK15ldP7S7fM3PvQYhG3WDvx2QP0ZnYLFxWd0
IOxwfuR/Jdd5IFVpHwfwc13c7FnCOc+5ri2j5ZYyyvbWzxLqbcEUpTClmjcu
oUhR9jRRMWRvQROVvd7RMinLxKRZqFFJ3oZUGi0KCcN7fmf+/Pz1/J7n/J7v
7znbm7h8oRbo75GGAx1msz7+oALnOQOBwAK959bnwSGuHynzvztvtQAd6XJm
487taL3dW7SBjv7q9cJ1WJ/ZphpnV6CTQ2KfGuP5mOiFLZcHOmVktlsON78p
Y0/Lb64DfTT67hUV7E+jjFVWMUCf+HbW0REu3ylDVuevRKDzSi5Zt3LzkBJv
zbZ2Brpwrvs5e1yf/TGMMQD6dPWoRg2uzzKDNlZAl9TDi3xcn+kNZ7nzrnjU
mRWcyFk/79ReO6Cr/aOnexejNbwnIoGufWEU5NXLWe8IuewDdN1HmSM4ctZN
OHA/AehGdcF7bexnndx2iwKgm7NKN6fUomerdDcD3UJW35nE76d9ud1hE9D3
zHNO9XN5RGk9avIdBbrTSfrvq9z7hdJc1mpXDvSjnzvqpLj+zKePuflIP3GP
Mi7C9WfGqipx9T3zbfyciutrtJRkcvt7HbWx1E/AWT3U/9groAenprQ68L6q
S5aqzQf6XXLJIVcuLym13zqvBgE9/N3bDRa30UtcbigCPVWRJBRy+UCp6vZk
ywMj+HJOSBSXz5RKx+vp+8AIr//6ePAZOj3CZw0wM1rp6k7sJxWN3mQ7YLR6
q/wuUJyVJcud3wMz60zIw0FuHlJKf57fWwOM/pYFHhZ4P5S+T4ohwIj/qHC6
qodeFF/yHBjz1kvmLVzeUzM2Zb62BmZecmCx8jDarOlpODALHOeStdz/ACUa
mSOaAsbyxgW1zhXokxGtn4BZVnn+Qz+X95Ri34ahPmAcgnbKuP9pzteC1j0E
xtl8dr/sFTo9tlEMzMqicw+H96AdjrXEAbM+q/im8ChnhcpT4QHAeHtsW+Lq
jk5Tir8BjI+6UVUq9rtCoOtkGzD+KWeLtfB+KMwx9zwCTOCB0ylG1zjLVw01
S4EJXupH7TiEzgzKdwRm97B4/wXsV/l9mQoqwEQEF8osMK/kHbosMoGJ+zrf
YznWJ3zaHVAOTKJ4091EzCPhnfWX7gGT3EU7texFV20xbQAm9avcJWun0Ykq
hly92S7ZxA/rE1ocf8PVmyfckFXUjRbPfsDVU3B7llo/1itUXvz4IjBFNllU
sJSzXP85vXxgyudn9MdgfXJFuT17gKkc8PC7jXktl3Hylh8wNednPhJivXLx
w5rmwNRJTtxN3YwOaGs/AUyj1rGq/HD0vIvuImCaG1PyJ+vQBjWNXD0t4fGH
/SbRWopXZcDc64jwNUnhLPicMc7118PvfJXLC9Ftf/8SDEyXo9eoOua7oAHG
m4Dp/uD+Zxjmk+CHZs80YHo9na9aYX8LipPTSoF5ozV/R/1P6Ji7214B867R
zMMI6xfsedG1HpgP4Yb2ifg9BUHW3H8L86lDR9u1C+0TKVoFRC5j4vbvb9F2
NmNuQBQcRsotLdGWPfb2QERD73JORqHnV+5XAqLm0RfiI0Qb/NpqB0Rfs430
6aPlP+6fAMI0/CRa4cuZmurW+QOIOKz+QymePzU2oOsFxLi99mfZfPQb2eBK
INKM/MgRB/QjBc9jQCwcsrZ5H0Z3jMuMgCweOr7m2j30r2qlvUCsPRJMD3mh
m1OvPQLipLmrQ4Tzg6q9nzsIZEVDwM1dVejK86PHgbiF+Za14X2iLma6zAay
pt0jNj0WXXwlMBDIxgwbKZ2FzlJyNway2cFSP/oxOj2r/AEQ3yGpsAfznzr2
ZdUwkAAPw67iMvTh6voWICGaM47Mu4k+kLbIBkjod7/oPViC3vcsaTeQPToZ
pTH4vagIp5vNQKL0mTu/8OcRapXL7S9BIlXYfQS9s94ZgCSdHTqpj3lGbY/X
7gCSYvyD6e0D6G3uWw2BpJktd9YMRvtp+18Hki31SLjsifYyuRQDJLdKV2tz
G3q9ExsHpMCiq1ge+5vyDFaMBnL2y4CGDTj/qLX/2zIA5KJdxPQnFu22dCoY
SPlN2xNnstEu3+tfAFK1bFripoFewYznAbnieGRZHuY95Wjoya1fvzL/oO1L
tH2aLbff223+qn2Yt5SdbegYkKY1JoWp2G+UzXvhJyCt7uU3uvnvuTS04DOQ
Du/68UM4L6jFTWu4+h88Tjz6xTz0ojLmLJCHm93o386hLTK1q4F0+7XbGOag
F0RThUBe7Ojb14jvMWruiYXceq9elokCR9Bzihq8gfy1S5ajje8pyvxa7Dog
72UjP2zfijYbU7cCMr5XNKLogjapjIwEMjlyL6kS5wNl/HJnKZDpfRk63ja8
TSu2AisfzViW8f1reKlnLrDqCfPDV2mixa/d5IDVtFXRaDjL2yqmDljtoYEK
G5wnFJs0qgksvfX8K/O1aGLhbgCsqYORnyLmL6X/3+H3wJqNTU8conkbnioC
dk51T+4I3296x+89A3ahYcH95y1o3YjA1cDaUrorm3D+Uzq7glYBa183/NI2
E639VsMM2OW77yfVGvOOKEwF1vl/6beKcH5RWsekQ8Cuu6ViFXsQPbN7owhY
z8iBjk+qvCPDuHo2LGgNDSnkrfWxClif08mXfHEeURqew0+A3XGIMrIbRau9
kSkB+x+rnvrLybzzYBGwgW9ubpmnw9tVUxnYUN8DOQzmC6Vatp87j2j7EdWx
ULRKvEkFsHHlta4v8f1MKX+6VgjsYXZ3Qmc5771X+4BNnxgYuzKAVoprrgU2
O6jU8twM3hqOZ4AteLI9JBPzkppRouoF7PnrPc/D8P1BiR5/OxPY8rmFkq/j
eEffcQG2Jn+Tz7ozvI0DvgH2x/33f5fi/KAUo992A3vnbNRDU349hbeQC+zv
LeIewu9XQXZRDGzXm8Z+bf785UdNFgLbr/PNoDLfD/LfXjcE9p2d6kcBnx/y
Zhl/Avt5a83nMb5/hG3PnEAsPOJNveP7Sxg1uBHEapWTohd8PwqlqhMgNpp0
mfWAv09yZQtWg3jJynSTxmjeNopeIF6V3bWomr+vgu4ZNSD2e266/DSfN4Lj
/9oB4sO1/ge3PeGtXyECcWVc/o0vFNHUT+1fg7hz7R9jfy3mnRqUA+IpseaS
Kj6/qW1OYjBYH/OzjOHvDyWdcgSDi93xRcn8+VGzUozBYCLiuH+dLm/lvAGQ
rFYvEL+q4K1gHQaSksCBk5PTvOVkpiAZb7FW1/TgLZA0geTvgOy03L3/mLYH
yfT0iIok5x9rdf0f/lCQVg==
          "]]}, 
        {GrayLevel[0], Thickness[0.01], Dashing[None], 
         LineBox[CompressedData["
1:eJwk2Xc81d8bAPBr73nv5ZLSkJCkumZxHnuXjEjZ3FLJTMNKw5eKKESRhlSi
kJSZymhIJCORmVH23n7n4/fX9/V+fe/9OJ/nec5znnOz8HLZ4E4ikZhJJNY+
4r+alwfK6vrdjYHOxtdtcDkIuYm1e4vrsGLLVa7d5oz8xV4mJ6buwjbcy+p8
DF0SS8lt+mqCfflQcyIdxYndKJlxswE6O0cra3MRSkj+8FpcpxxbztKAdhkl
SU5ma2xSxDa7Hijqhu5KH3hwoYsTO+Go+8XPKE0sSue/7W1A59i5NoVVDj06
tLmMlhqHfUhj3ZsklJ5cuidDAK+P47JBErskeio5olQ9nI/dujPq1UH0XHq/
jHBWNNA54+fL8/ahF0cG0tLW6mFX8cRUN6Jsq3eCtytDsOfouY59KCfhYJS8
Mh3oXE4Da0MWUZ7YlfB91HtA59a88TCmDuUVHii/9TUQ++xaDR1P9OrQJuaO
ywew86YNZ8tRfnJRqM8UL9B5FHNe369ABZKDZ+J+nAE6r5psyAtxVFD2Jr/t
miV2KLOYmg8qdL40Ja2rgF3pkT3IQEUP1/q8ftkDdD47rvth3ahUeu+xlpv7
gc4ff8ON5IxKq8SfbjKRx+7v86niQW+P9PadYMHxEtCknZ6cQWVWb3OWCxyx
h9UkNJzQuwRbhRhZKtCFGFlCgwPoXW+pWd5lZuzPtOQsFvReRepEc8co0IW3
Fw1//oLeN40+25D4BehkptZvT6ZRuVjklpecYUCnvF8Y1fVC5d65EbEGckCn
6uQwUzNRedWvAa/L37GrLl7N90MVAQrP5FmkgC7SXJMcdRFVfv+hkLZUCXQx
KeXgJ7OoSnbp+sU9XthlfCv/9aGqMOlR50Aa0MUdM7rswtHH7Wdz1856AH1N
xo3M9aXo0zVJpYQJHM91Pl8KbpxGn7oNE07teAV0SYXAkVOx6LO6z4yltwP2
SPHzIFP0ub+8QGDoBdA3nHe2qylD1XrH9kT0WwBdqu2sB2MYVSffTDkivQD0
ze/+OT2TRdUTxct67mlAl37Wfd87AH19IFDG1DUFdJmYUfuz0qhm+ZXOubZE
oMs/PO4amIi+Wf9OOyihBfRtr+cbggbRtyxONhW7v0BXqFcrbziJardluZ4d
XAf0HetO0MeeodpW0mZlD/y+yryM33YSqI4jruFRBK5/lUPbtwTWoLpdsuGU
J/j9VXP50bZtqO6KRe94bxnQd5/5eU/PDH1XffTkhZsw0LW8j6x1VELf3dQP
rrvIALoOW+ovM0X0/fo3rqgHRUDXTbv/dOdr9L139tjxTjegG5ImeMyZUX28
ibyMA47XPrV39x5vRfVl7a23QriBvl9q28qNYFQ/6B/FnoLjZynuzfZMEf3Q
SRnqaWUHus3WpOUr/ejH2OiL+wdtge7Y/+/n7VuoQfwBt9WvEaC7CN+ZLRJG
DTqW7pwO4UB3MyzL2TCGGuLyxb1cXwL96K/w5Xxp1KgSeFnjJD/QfR/uJuH3
bXSSbx8dfQT0U6oFJj+KUWPEb/U0vz1AP91GPWJejhpbYJTnzDGgB1uWsNGk
UVMwu93PCxVAj2SOHn2djpoevX4VxXYY6NdoefoXulBTjYcg/DcO9OuQ4FMm
gZolv1Q8jloP9PgqGWu1AtT8Plbx1K0goD8s2vjlfQNq/qd9VVacDPTHx8qO
7W5EP8kTf1qTM4D+bPvl00+t0U/3A3d07jcBPXfeY+qJDWrhlGAXytwJ9A8P
vdw2H0Atil+dKhQ+Af0jN9dH/wXUcjCk6EyOE9CrI38ZMB1CLRmd3u35UUBv
aHJ5XOCLfpml/8oq6wf6QKHnxyY39CvAVtlZJxTowwui3AOn0K9UrlhKpQjQ
Jw9+apH4iH6NntAP/KID9BW/6eMn9FHrzR05Rg13QUlUobvt2k3UWtTNs2Sr
BEpr/dQS6p1Qa08cI7ulGpQ2/TL/b1kVtSnNSIi2z4HSDrG/e4d+oLbm4vA/
f61AyezIr2MnvNBvJs/OpBP/QMmqU36LHjf6LSe5x3TkAigdvsyc5mGBfgeG
jb2czAalE/sWL5l0ofZ1BofDVnhAKZrfJfzZNdSuL+9g45EISgmfKp3uV6H2
k0JO8j+kQCn1Ve4KvEftJb9cm55qglLuJlOpjYGoQ+H1q4SnBaD00y+/7egB
1KGdoRzmSAKl7rpTMdp7UceB5NcnKPqgNHw0aV1eAeoICSvQCqkHZVaDf/+o
y6ijxqR40HIIlHcOb61Xl0YdXZoaTVx0UEbqlroNEahjWrH0Xek5UDb5DEcO
lqPOddSyW7IcoOxetOamrTrq9Gwv11reAMop3Mr7pUioi8/vy60n1qAi/u5r
Ru8f1LWBYXrBPhlU5Fkd3yA21KVk+9VTuAtUNNIG+YQ7UZe9xjftYC9QceF4
oD/zH+rK4vg+ZBEJKi+uGtXmcaKusnnLZo5aUPkwpVS26z3q+jH4432JCKg0
f/XIW7sZdS3WNSZueQiqLHXh6r/Xo27TOy3aiyWg6ni0OjC8CHU7RR/alssK
qqcvjRie0kPd/udbaUeMQTVm45rmAxyoO9m9baiuCVTfDxRyakSg7sHtnYnp
Y6CmMHORZ5yKeq5+6B/evxnUNwXnCHR0oJ77R9QNQsVB3eDb1LoGe9Tzmvvq
vSxBUD8xumVOyhT1dO1XsOScB/WCjEX27En0R/W33+uyWthtf8F+fv04+rM3
rEJwuAJ2RxSl64A++uO2WeSYRCHszvvz6bhZE/pz/XiBxJlHsEdQ0njf7WT0
58/scpjiOdjzPcuSPP0c/VlI3tfi4AUabBMS9dtoqFcI3d91zQ001M0zpVOE
UO+ecJ0//ftAI/1INofTTdR7kxxpfE8KNK8lHh977ID6QIFCEagBMO7OZYnh
RX3Wde6eGh8ATob/GfbLRH3H/fMrj78BuNE5fLFwCvUlFB08U/UQoO2LRH7J
KdQ3ZHi3LfQMaAUVFeUuvkf9zP9GlbM8QSvdy9hjqyTqp13Xuv7LBbRqx8lq
kQmoX6ehR1vFDLRlfDgOqymg/tuusukjG0G781E7S2Q56s9mDyStFQUdYal0
5zOnUH/F0+qDJrygoxNZzH4oBPWPjnrxpM+AzlOhOfaj8mjAIDjP26EadEMZ
/fPRymhgMhGp1ZwG/UMOW5oPGaG/nJ/+vFLgB/1bciijj4b+SixcU4xKA/36
joalWV70V8/h5xbTOjAwJwclzfSgvwmb/ShftoKhZV7AJqMw9E8lN32kqh2M
I74wyIEX0D+THrPjWwLAuL5KQ9P4GvrnRJ3o/Y8XTCSLnIuRPvoXcRba9NXA
pPCa9froLejfT9TyufwmmC58FM5xrkeD577yP3pnAPueDaUdeGqEBqOXX21Y
/xvMWQTmE44Lo8GHioeSz/uDuWJynf55QTT45eaTm+g+mEfxfvm43gkNSdhp
ny9ZgP0m6/V9nJ6goZK+gEOFL8Ci5eGiuNA6NMLE9FsoTxQOqATdFYyJQiMi
PVYL1w7DAb+xK70RvWhEvvLLH7cHcCA7fqhI4Dcasb1aUECVBxu5Q52tHyho
JJsa7xSgDbaSzg+5q8fQ6Pa4dJtkZbDjca997yiGRn8/sU93cAb7ar7dbV1c
aHQgKWmN8SVwYOvRMcnaj0Ynr/yIUU4HB+SyxWZvORrj9jQ5xz8IDjm6MxkC
9mhMeaea2dsAcIwxs8vtqEdjUcWUqfXXwCn53JDByE40lphlfoz3OTi9Gto9
rV2Mxh7evfp7tg6cvq0dCvFuRmMFYcwf60TAmfR6Q6GLDhr7ozeaHHYfnJ3y
zsf12aHxPd+qdbrywYXsHqzh74LGDaLGwgwbwUWGct7xji0atzAVKX0+DS57
go12bzdF40c+OqsFqoCLWxB/pv1RNH6jbHo7+Q245Gz/YJfvgcZTQtecONsM
Lh+es8qylKDxJxrwtH0WXBp6P4q9QWi8pOCqVKYquMxF/P4n8AyN9+euF9ct
AFeNRJGsq6lofMJbzyajBVzNJli+PMtG48sKx+IF58HVgUd9IVsdTZAzXgm0
qYNr8Cn3IzHRaELzoTHbqUJwLdDsZJzgRhNxcX6j6cXgtlk6/vtGHzSRapGk
wNsKbjtuZTySOIAmMgRLj/sugpvGN09vG+y3UZy9SAPcrOOL48pPoYm/l1N+
NZWC24VYAbftXmhiSueDmMZvcIsyoZil7kGTJKb+Aw+Xwe1WHePSTBSapIbs
rPPWBLdMvToy8xE0CQFVVZxvwe17Z3PMEzKaNKEPsZ7sALdWYYctt2zRpPWE
sFYDCdz+UAb9y9ajyeNeh4vvA7hN35grmzNBkwlHxnLVysBdNDyckb8PTQ4e
XJNy7D247/+DTravoMlph+PHB16Cuy1N1qbtNpoiuRapH00Ddwf5M20OzmiK
ctKuiXEZ3D0WLJizuNDUnou3hVwMwf086tQ+z0BT+hED7Z1q4H756lRhyBya
Mo9We+4kB+5XShwsX7agKbfEnyYOvOAe951jOU4OTV17Trt88Bu4P/52su+I
MJpKeHnUshmvL9Oiw/JBIJq69+bNRptscM9+q+LyoRhN5X2weWt9A9wLrLTz
VjLQVGtzwtz+A+D+KVBxm4Ibmt7GQvU0bAX3XuG4v8fn0bQKp/vuqq/gPmAZ
WLmFA01r8b3i1i8F98GLZo+cv6Npa5rVY91UcB/PYTrctR1NB2+72Qku4L5s
diku8zCa/m9n94u3lsBg4n9qcpGMpmNVd4Vo6gKD5d2uPE89NP1Iu37Nns3A
4FxIGaVpoumvtsLWKv3AEP4aOhGjiKab7F025f8EBnXDzT2TL9B0p0vOuNJn
YIh60NMivdH0lOf+67ueAWPND0kN3yQ0s/ZCzKftJ4EhJaktqueEZrb813Hr
uSMwpEWCafQMNLMjSpGxzRwYMixSfFUH0YzerVqWrTuBsbUk5sDwJjTjmSWg
IT0FjJ3FD82ThNDMmStV2l2awKBHeCQI30UzF4+GGqaEA0PZ6HFTaRqaSdo0
YkURAYZa1rk3ToNopvz2t+NMysAAUuGuwF1o5tuZ/7yLQ4ChFRKZPtCCZloO
oIDTlcDQnoh+xZyJZkaFXoQN2wBDr5y5MH0tml0TcT3x1xlgmLA0jvXZoFlp
hsHdhDJgmEJqLJM2mt2hs5JmwQkMswCqhH40mtVf8XrxMQkY+768mO0zR7O+
AfsqXxUCw0paaNcrdTQbbMVR7cMMDGv5PPPpGjQbsePtd3ljYBzYhlymytFs
ytD2tge/gGErcYd0+g+a/eQmMHl9ERiH3khY8wSi2R9aVfMmOF+HYwuYuMPR
bLvkeRL7NWDYM/QsZRTR7GTLKE/wWmA4kh7qPjuG5tbvr914DMfLeemaz7tX
aG7r9giZzTheLjkf1HxIaE6ZD7Z11ADD1bmiLSQBzZl8zFazcQCG26tY3/kf
aO40ijHXDQXGEYVG+lw6mruw1tB65SN2OavVDwU0d22BdKhIEBhHrV/9Dp9C
cw/yvY/suAcMj5NTrilOaK5mm3nIOhyv44E8va330NxPHs6LLThex6dD/FMu
o7nu/rLIeJz/E158CvJ6aG4uTTGepxMYnjYfQtvM0fzmNYLP5nC8vLgO34RA
NL8dTWh/XYN9tPLgJRU0r+bW8PM+HbtSTO6UAJo3e36Hw8gdGN7nnmj8wZ8P
0N7skoTX61P9IGvpH5o/f4RjzhM/31ciat3wGTR/5erfGK157GOv2Tpa0fzd
hhclf+WB4cc0ut7nOpqv8lAXU78ODH+JRSfVvWi+Lloim/8JtmN/V8kmNP8r
d0W/C7+f/317X6ZeND+yWO5/ZRwYpyRXXFMr0AItZu+3XweAEcDHFEXJRgsb
X+1gvPDC1uMuoiehBfkW8tLFCOzA5p7W3WhBa9PPrVsLsP+0x68UowWP167h
QRLAOJ25V3aQihb8WvXXmith/1Jla45GCyFMMnlSe4FxhktsUVsbLdwwHuqs
xvk649ym8kMQLRT+PqMh0QWMsxzzKyKv0UIFi1396AL2dnjevYgWvsloHKug
YFs/tWnXRwvdvsyJnvrYqdNtWqxokZft2kTJU2Cc28rSGbqAFkXkvK7Evsc2
6TZpiUaL6/dZbHBvwT7BlWrUghbpSaL7+HmxM3bLaW5Gi/by9zMcvIERuO6u
kORdtHhk/yWtnZHY6hsyPK+hRZ8ARjP7A2xrbuPLnWjxcpk82/N67EiarG4k
Wnxume+0gvdv4N8wsk8BWnyjd6HMzBQYQUzU46Jb0OJ7lX2Sd1yxRbexlleg
xUbxvt8qMdhaoy9astDiUpfYIa8B7BtCCbypaImj/k9hKQn7Ead4hSNaEqrI
FefF/SLodXxDxhG0tPmpcfMTbexfoX9rH6ElM+8g645kYASv+/z9fQdasnEx
fKWQi63w+mEu/ryzFZUShOsrWNPU66kUWjqlklVPw/0q+PCp8DVCaCl5ud18
P85PcNysWZ0VWhqM0jZ+z4Q9qzRa+w4tTYfyZwjSgBHC4t3ZbYmWSd6/uBwU
sPk9i957oWWKlV/VvB32ptyQhwNoec+aR3o787BNri4ucaNlfT6ftPO4/4ZY
zUsffo6W961ostR0YDvQ5YIc0bJrV+P743zY3oIaR9+g5asZnOghAzs2/Ia3
DFqOv/Pj7lgQdpLPhxvWaDk16t4yuol9f4ec4BBafumjVvwL13dItqId7Sxa
/qV6XJ0ihl1tFNTbipb/yKkkuShifx95FV2DlkckWGazcf2E/PTZ0lWGVphX
kl+b+mL3cnbZNaEVucoa+qVq7KV7v4qL0IpSLPMXAXVghLI8BxF+tAKHVJyT
8P4K5bpl15CCVqxH7kU/v4hNJVFchNBKGM23v5n4vJz2lv0/0crVrsehLsTn
t+tM5D5FKwmZrdQhnM9Q+pbCw0/QSqaWng7TGLZGIrO8FlppOiaaspX4/D4F
6YI6tNJFN92VT3ze0uL6dg60MriMo3kJ28ZhA/dbIDEZ+S9kZGM7bhOiUIEk
0vZb5u1VbM+CuNvDQJLQnvVnxfsh1Ee6frAOSBueCL81msX2Dw1/+RlI8r4G
1j9wvEPPTSlGFgFJmz37wgCur9Dw5cODjUAyOP65RuEsduQPSnwSkExr/4j5
EX/vWmI1XRxINnfEXiyvw44drU3H6/HcfqFNeA77zp93Uj5A8o1LkbHF8Q+9
qymRbQ2k03Ov/VKIv3cv4kjTNJAufBjk3vIDO21SwuI8kBJtrVX2EM/PUiyx
2QOklBKvC2F92C82uMZtBNLDjZFfq4i/l8N+xIgDSFmDpW778fkSmvc8+Yov
kD6EbYllHMUuClmgRQHpY69W67NU7BKxhryXQKoxObxltBG79JmgVjWQflJj
SgPxeRX6LudK3iiQhp/O/YuRxK6yis0/BySctFDnUuyPsZPHrIA0W3SQvAuf
P6GfPrpHOQATc/Ub9Ua8/0KrN/DVGgCTyEjAlbV4v4TWXr4QeB6Y1sxKrx1+
jV13/Tj/J2DaQGrIKcP9NvT7zQsHvIBpqzD9p2s89o8rpckVwIToEzIZwtjN
qt8V5YBJV+NBcWAO9k/RpA8uwGSkb2FuZk54LCx2LTBZ2uScHsX9P/TXrXU+
6cB05JxXlQrub6G/M90eXwWmExclD3HieSe0/QjXpyVg8rlaM9yCz/PQjrVJ
F8jAFJiiIBKM+3toZ0h9Jv7+9beD7uVs2D0UijUfMMV9vDMXn0Y424++G5iS
6kyijhDx+mPE2PkVmB52ZbzivoDd62NV6QdMb9g8WM2XsfvvWLQ8A6YSflri
xhTsgXVWB64B03uRj1sn9xC+e3rxADBVy2yxvBWI/TfB/f5OYOow/vOgjajP
QUa4cB4w/bGMV35xi/APA0ULYPp7WPdzGO63oUPo/hkfYJr0fDgudQp7WMCG
kxOYOWNctI7h8y10JE7+Ugww8yUJNeyJJTwqGegOzML333nwE/U4aiyw7zEw
S7xcH5NzkvCssEsUMCs2/G6f+Yc9rvH9ZCswKxu/v34kn3Cspm0jMO9+m67Z
dJ5wV7ZgPTDrP/VMeU3sz4nQHwkmwHw4aPFQALF/JtOc1soDs/NYB3cvH+EB
9RwXYD7C+FBo3Yw9Je/n1gXMvuZXxZSIvz/1XPrCVmCOkBJrnLyNPZ16W74E
mKMSl8Ld3Ak3n+Q6Asw3+TqVfhDrnxHo/6sIzCkzT+JeVhI+N7lDA5hfflGx
8CX6yay2WjQbMBfAGqauYsI+ks8XgLk0bznHIpzw3f6lzcD86W6l4E4JwjNo
qBKY232tvo4ZYs/dyZk/Ccw9farBzmTC792vPALmv4cl5Gt/E+7fNtQMzFN6
3Vez/bHnd5CNE4CFR8zXyIvYb/NvPkxwAotgtPVs+zHCzbmPG4FFhEXtyT46
4Zn2LVLAsn6IiUMBnw+hC3SW8lPAolx2vXxomvDDKQ0lYNmj5Odv/45wqWlD
DrBoZdhs+krs94VmVjYxYDGNW3chayP2Itc9pUFgcTmSBSfMCLtP7rMDliOt
MSOtxH5cDMx6jdfnud8/1aSLcEzXLXtgObN79/LWM4QLvhDrieb/XPSXqPcl
tr+2ucBy89imfbeI/CyJnmeOAZbEisBuXRXCMpm8FcDyMGgbdwqx/iWj2nE9
YHkzcP2gORH/pf+is/H7lur2DS4VEk6gnX4KLB/uwfkMon8vpRnHPQGWmgNj
T1iJ9S29fVFvCSzd5ZbTrzUJj7/8eQJYBiQzr7hxEl7OX38WWIYD2dYJfsde
5vaK1waWuR35eseI+ljewP9IAVj5U2lxa4n4LJvIXtAEVvK8z5bPRL9ZthZK
SwBWMetPRaeJ/rbsUKIkCqxSvOe6anMJ+7hRmYFV7Wzbjos/CcdRd/UAq2aD
UoXiA8LJGkfx83UVo23bThBO27UpCFj39qHzKiTCL69m3gBWN6v7NX+lCdfy
T08Aq8eLeZeEUcKN7y61A6sXj8W0DhGP5TajPhFgPfuedW0Kka/lgfYm/P3r
2xknzIl6WmFSHc8E1rgrpStLRDxW2HObjgNrUq/ozQwOwrxc9jnAmpb8sYiF
2C8rIvv2HwXWQu6tXPlEvazIWrTYAOtb94sprlcIb6uYGALW8rLWHYJWhHeu
UVcC1m+no2w9+gmrnyxVBtaenpHHa/kJG31qEQbWge62iweAsNmGnEvAOtz1
xfG6L2Fz14CXwDrb8ZjGRJwnKwfSXbcAG2+rQ0TvXcIudEctYBP6ZeouWUvY
rdeiB9hEWtS1DjITPnJ5ExnY1jdT574Q5+HKiSv3W4CNXv/1WLYC4VMlCfeB
Te17kf6AE+HTvxcngE2z7ummjTcInx25tQbYDL9d+hVH7JeV4HaPKmAzq/F9
XSNDOPTtujRgs/jqFMdhRzjsOkkS2A5/2WN6ljjPVi6Tto4Am/NnOZlcIj8r
4fe7ScDG+ERjHST200oE/d4uYPOunChxIPrFytVtY4PAdqqiM+nWG8LX4npc
ge1c+bdTtX8JRw0l9gLbpffPFHSIfK7E+I9eALbId0ncQSGEYx92nwa26LLw
3lfE+b5yo0JVH9gSS11SZSiE49rj4oEtpcQ80FmfcHzzb/z9B8WaNreJ/bmS
UCGwHdgyC8UFeVsJJwbcKgC2nAKOQf3VfCXt2UwDtvzXUx9DV/OVNMWqCmxF
+d1pb1bzdfu+yT9gK3tVd36M2N8rd7SEfIGtIu+tvdxq/u78OHoR2D6/zFJb
3W8ryYdc9wLbt9w71BT1VTcKBwPbj5yIsUai/ldSdC/j9fzMDqgRWM13Svon
dmD7/cItw3A13ymLfzcBW/dzi/ALq/m+qz8hA2z9WeBSRF/1pSFlYBvKVNCc
XM3/3fx2nN/xZxJrtiWuurXuP2CbyeCaYXxe9XTlI2BbfDJTn7pIOJX1fQiw
s6fXXxNerY+7i/U1wC6Y9kL3UvmqK5higJ36MGV9yWp93L215jiwiz+4sjiz
Wh937RXpwC55/8xPxdX6uCuq+gHYpe4xXnlcW11/hfxZYJfjiciC1fymOJzr
AfbtARmPaAar8Rg4sxHY6Z3VySOr8UxmkJWBXd10OK6K+f/xVBMAdvRG8Nrd
1fXd2fUjDNj1Nu28dGq1/m5fqtEB9n1zAf5SZ1fzOe8/DezWbonHF1bzkbiu
/wmw230rdK1fjdctuqEUsLs/WrYMW63X+B0gBOzHhdabHNy7Wj+0qLfA7h2k
raP4bLW+Rnc8BvZAi/Cd7avxjfH6+gnYz5c8kctfjc91UQ9+YA+X+bwxerXe
o57fSwD2mBV+4T1thK88E4wC9oRjityU1fxHCjTPA/udBgumf6v5+c/VPgXY
05/Fj91e7ScXG+7JAXumyOsBn9zV/TbRwgLsOWE/O40EVvfjSlU3sBfbrq2d
Wc1nYPvte8D+nfVRtrUWYd/80N3A3uRV9UR+tZ681WqSgL21ZeAey2q+PZ8g
LWDvy9l2PXd1/x3VY4kA9iGJff9dIeaPFXff6HFgH//PJ9TZb7X/RD5bC+xL
9q+8BFf7yWHfzj7gYP7YxOhbze9BXXEEHJy75hxKV/NrvbQuGzjI3Bp7PR8R
3id1XxQ4ZPIrtn0h5oMV2G3lChwKG/o2PzhHeM+erx+AY1cU19qzTYRVN7Re
BA5NVzM+mdX+tD3Osgg4rAR+DIZzEV7L+U8eOA6em+6xX80HjerZDxwOvbRW
+mo+yCT9cODwKD78pZuYr1Y4T5LGgCP0aM8zIOp3eexmjiZwXDp9518aMc8s
/+vdLgEckeGW8pzE/LncS32fCBw3H77LrCX6wXILlxIncDz+ffe54+p5VLY1
hg84Moesh98PEi7Yv+EgcOQs8m2XXj3/cs1c3gJHsVjgi2HivFl+WOkmBxy1
VrY5wavn56V7dAPgaHAVGOsk4rEc5LynCzhafKp26hLzxLLfGLQAR891pZe8
xLyw7HJ25C9wzH4WzrtD9M9lDX6/eOBYav40uWJKeJcMtzVwMveFKbkS8/6y
LMfBCeDkYx3JlyPyv0wRWiwHzg2o+nXBK+L879sRcx04pfdenF1LxH/pl6WT
FXButd+tGkb0u6Vv278mAKfSuacFhtWE84Uts4DT6FV4YVMP4fPm30OAc2+5
xsLuDMK+4tH2wGn5fWp3qjdh19gkW+C0H3UtZhD1tqR3XqUQOH23Qsk00Z+X
2GS9hYHztNrM8sEW7MXJLRV4vUGGLzRL7hHu+hAcC5zhjLVvL8sTLv2sJg+c
t+/Nv6MQ94VFnx9i7cCZ+iKX6Qw3Yftg7jLgTCv10PpF9MtFw+x91cD5/FfT
+4eHCa99pvUVOD+I5JXvJOaBhXePzEaA82PsvfV0on4WHuvREXDW8F4NUrYl
fA11fQTOn8wudPXdhK2U/KSBc3hYIE2b6EfzvzIKQoFz8ugCSWeScFFGJxdw
znX3Htb7Q/h2V0MAcLH+LKEYfSR8oDeaAVziFccu7SfuV3PlWftSgWs9WHdY
EvU5l9L6+jxwbS7S2mNNnC9zAWJB74BLMUd08iBRL3ObHh6eBi795Ao359X5
2teorQ24TEWzy1yJ+pzVUb4eAVz7byRLuBPz06zwkvQp4Doc4fvjaDf2zPOF
XYeAy9d/va43ka/ppj6+BuA6PcJzz5e4b07frbURA65gj+lF/yjCbtbiDsAV
4fg17wyRz6l//GtNgOuuSaDUeWJenezV2L8EXA8rGecvEP1/8j6LYAVwPdXa
33pJnLAdLdEUuPJUZOL+I+5vE1WcD9iA6/PGRtbrxP4cv1JhEAxc31LeOcWu
3oeU659IA1cDLbP4JvF7xVhHI+cocHXwX/S/Rfz+MKZw0SMduKbmFXtSLbBH
XnBsaAGuhVMScJ+ohxEjTQE6cJNGOZIfKmEPd8zlUoGb589vq8fEPDzMWfbl
E3BvqLta/rwde1ClPPotcG/ZOcg6RNTLv9LU5ZfALR9nqidfRlg7fn80cKvY
8FZkEPX4Vyt8RyJwm7ZGVaa7YPeL+Z9dAW4LjWH2P8R6+v6j+okAt03qXgMp
HezeMaW6XcDt4sJf9UAK+0/h3ZOewH267/rHlF7sbsn4O9XAHWw4ytlKnE9d
J4viTwP3hQxzozVV2J0F6Sb4faI8BT+t/j7Uoe2cdg+4H4zHfo4n7j9tEr5x
/sD9xHKc+wdx3rbqV5DVgDvrlYUJ2QT71/H5jxLA/eaM8JdYYv/8TI9t1gDu
r0s3q68NYTc01xUcA+56h0neL8T960djOo82cDeXWZlx12DX15iJPQDu7ouU
rxHPsesyApXeA/ccZ3zNJaIevgrNcz8D7mWPaf4PxHn8pYW3ewV4WL4c2Me8
H/vz7acG+4CHP1rk2/md2B9ZKys1gEeKfKs2kNgv70/vfTYIPLL+s4KFRD8p
W/Zabwg8Co225nMN2G+DrrpHAY9aEq3uNFEfxYd/KnUBz751Sd/9iPnt1eNj
04nAYxU6L5xL/D7zsoP8PgV4DnbaWYwdxM7la8L3fh63NPF6L+K8fW7w6NYE
8JyTvfPj2AJ2unzaCwPgCVWItVcmztu0rd+teIDn0q7wXqZM7AeSMa4NwBOt
4TOTSPw+k9L9WkUHeB7sNxSvIO4DcU0K568Dz+MDGg9jiXq/4XeUPQh4Mg/t
kj9M7N8YpiW5HuDJd1+nMUHk/8oUk6Qs8Hw+M+m8/j/s87JBHLrA8y14YOBf
B3bwvowj2cDz40K772tV7HPuN54j4Pl97fMlM+I89Xdcc3A78Izfu/c4kJiH
j4Q43vAAnplHCYr66dhuoiVONsCzmHG1QIjYb04pOX4vgZc9L+DzE2I+Puh5
9xsVeMU/mg41EvdvY8G6t1HAK/lVO+A+MX/qMysl3QZeqe8qKyeI/anV6iO3
G3gVWjcJsQRgqxkdGooGXu2ROboicZ+Tnqrp6gJeg8nh4kUivxvXfV96D7ym
cz16VcT9aK28SrAD8NqwfLNxIH6fER57XMgOvMdFH527mkr8Hkpljx8GXm+J
OywHZrFn9rHn+APvqQ0x1zaaY48dJUc9Bd7QrYEpBbjfhvyhO/q+Bt6baH9Z
L76fhnxZv+llPfAm6hoY5eD5L6RcgyuiD3hTjPZ8D8bzS0jJzvuVTcD72HJL
Dxn335Dnaa6VN4G3iLHMobUV+3rE0fX4fcuatzwjfu8MCb/LrBMMvJVG+80p
eD4MCQ5ivBgF3rqtaYl9eP0hx6K3H28G3t5RE7koPB+GaP3ee2ASeAed/Wum
8f05REV45cIU8I59v+uH88AIkWf9xZsIvIt5Y8W78P4IoYrFypwAPuGziWY/
cX0EdzftuaULfKJ/341r43kkuLGiUtwF+NYe+peQGYj9yfVouDnwyWhqtofi
+31wVpq4YwrwaTL/8dmcgO3L5PlaGfh0/AWo13H9BbtsN7ZzBT7DP6oFszi+
wfsX1P7eBT7LqmvMX3D/CFZ0/apfCHwe13bG+RQAI6h/RwfZC/hOLh1W/YXn
k6AG7lqDy8Dnf/Jym+577Hee6nmhwBdq/lNaFM+XQYnv58NngC+eGvq6pJX4
9wb7xFBP4Lsd/vTwFvx+QXIK2ju4gC91pp4Ug8+/IGGvwLePgC+jRdrIdRgY
gZ1KOVzswFd2t/oXNz6fAk8f6yDvAL5KgelQP/x+gYfsLGSWgO9L2PpNbXi+
C9RM3lGN/36jq9+JbDzPBLKwu6ztBL5BGbHlA3g/nbsw2xZqAnxjSToP3uL3
O+dMKnmP1zfD7Wkguw1bU/lO1RHgZxosu76oDIyz06KToYrAL5pzZMMDfN84
e2jNHfFA4JeolOZPxPk+Sy97Rf8N/Btaehai12PzReS0nAB+eVaXhrPzwDhT
7Hkw9jnwg41D5P4sbP4ZNb6NwK93Ym2AwW1gnO7csHD8D/Abn2911cDz2elc
3cef7gO/VYadhiyOz+n9B//S5YH/6JL1GBPefwEXqAXruYH/pDClbQbHI8DE
wjxCDPj9pOs/D+J5MoBseX3qFfAHm+9Pa64ExqnU/+6MSwJ/7EMz22x8v/F/
/GdFRhX4E97w6qXj+cWfcWae+THw36n+sjMZn0f+m26Guj4E/kfTRrwRxL/v
JWkYG00Af6GRbpkjPv98fU6IKsoC/1sHlixrPN/5btL9tYyAv9z3/W0TfB/w
qT9sw5QP/DXJ4K+C528fBUlq9Q7g7xrZIyOgBwyv6ur4uZPA38+yQGXD+9/L
6xRjYRz4h2iFTAvrsAXZd0YkAv+MtsqvXry/Txq/yL7yEgR44nddL8X3qRNp
Hzi9JEFA8Ol4UB6+/5xQ2rv94DkQoJbmeBC/Zx3/YCd+6x0ISPZv10nA/fdY
U5FEIA0E6LvlZk4KAeNoB2mjBC8IqO0b6HHF/e6o3Vh9hR4IaLo9qTuI++WR
7wNx3oogYBgt/UwP9zNGwWNnNm0QONy50XHtaWC4OZ3gKPEFAefWA4rm+Dx3
La8KTncAAUbTFaaLeH+7bi6cIoWDgPfXsYcDeN53blvHPyICApcKy/rzfgDD
UfIZ2F0GgchXkwV9eF5wYKSWeluBQHSOzFVx/H72TyOLn7ODQOLjmG3n8X3i
8MaetMwuEMiMc/Q1VQSGbaeM/xt3EMi5flMnFM9ztmyaRxRtQCD/ShUllwMY
NlJX+JSKQKAsTOG1KD6fra1s61f6QOCH59JCN75v7T9VN7grCgQWDZIvn+sH
hmH6DtWJUBAk3T+69QB+fwNvfnpnMwiySDKTR3H96e9SMr5VC4Kc4kp/NuH5
QCftW+uO1yAoLJjyXyS+r2ruEKj6wAuClGgV7404H3verckYeQ+Cojx1tsV4
vtxtpK5YuREEJTjYZIfngKGqxXr4UgwIbl46UW2F56cdn8YVyaUgKBPInjes
DwxFasmnt3dBUG72Xsp/+H6lYLt9yj0TBLdP/DhZ+BgYcmVQHTMOgmp/9wit
DwHGJtHjU/tTQNCsicd6ENerUM5+ievrQND8yltTK1yPAmLpAW0iIGip6add
gucrXt/SiakEELR99Gt7NJ5/2Ke6hsw/gaCr/zMuxUhwX1Des7PvGQgyZBxW
kijgPiu+oKntD4JHW4Wnme6B++RQmgc+fwVP6pzr+v4G3IcPbdltfAUEzwob
F/v3gnuHSXpK2BMQDKxYzm3zBffWuHNDTxpBMORs7lO9JXBvrhpSpb4AwYud
4gmi+Pm1g52eXni90S/+ehXogHvZRqGRI0sgGOt6l7GhBtyLcod20MpBME7U
4vAVO3B/LXfXwGYbCCaFFBodws/Pqj79xnwKBNPMrmxcwutL+rLXXB3n8zGT
phhDHtzjLm0TSsHPf5o3LlDzGtyvSya60NeD4AuJg4up+PkXFz4ldeaDYME/
2UYtvL4TamLekpUgWHy3rTojAtzdp4YWC+JA8K1F7AcyXq9jzOXyFT8QLC+Y
e9GDn29xOECs9jMIfov4FBmO16esoeK6dgwEv+8JDh3G8VBoFHw9tgKCP0Z3
BNj4gPsWg5P7zYVAsMUmyVUGP180e9Y6F9fPH2mPPZ/zwW366qfMN2tBcL6c
c1SADG7Pyn74btYBwSWj/66UfAe3BxqWeRW4/la+sW8+cQPcEqPCY3Y9BCHW
Fha7z8Lgdin9MSmmHYT4R5YqLmPbPdPRiDIFIaFTQU678Pf35dXylvuAEHl+
fr4Lf1836tBL30oQEmObVQQhcNv2dNPbhbUgtGnN+O0FQXBdCnz+a2s6CG2+
76P0tBZcR4fctBN4QEhGeqTWNgZce2SfCGfNgtC2HUNs+QLg+mmlytptBYRU
DPq8ffjB9SblZKBzGQiZ+LXq9fGCq/g5PdEcbhAym7PriK8GV+7DcxuujoCQ
ecjPQN1r4DLP4vvKxhGErCMbsx/wgEvz7dSNdzxByDG1bo09N7jc+BeWcaEU
hPy+VIzWc4LzwjyX5GZdEArYr3s17CM497NdezNuCEJnGj9IK0aAc3198Oir
MRAK7iw7FM0BzhmvXarVN4HQfzOFlUbs4Gydrp0d1gtCyZte3HnLCk73TrfN
J0WB0N12Q909LeAU3pD4Rs4FhO7f7hgsfAFOJyairhVdA6HHwsIa+XbgpOqv
eiPgAwjlkvzbs3LAMcn8+JlnBiBU1aa+KdkB7Bt5KDvvZYHQREL5s7NvwE5k
dmDRdgCEpi3sLWei4eDP+0qK6ni9c3xTi6dc4WCyWsC2Qfz85ctbzHD8Dm4w
GRzerQ7CXH6RI0fdwXbr6SeNtrkgLGm+b5eNMBzQaZnj0BwEYROun0X042Dx
wNDJRoofhM3eZDbUloHFCQ2xX9XGIGx+JHTUkwoWysk5QR0iIGxdIb350VvY
X50ekXl4Fwg7nfeNESWD+fLm/67vWgbhUzM8bnNFsHd05bNPvzgIn3n0OzRB
EPbG7SqcddsJwoFWObd3usNe1QCRT8f+gfD5XJtvxwXA7NK2bXreyiB81TNN
rdUVTGWuCagk14LwvR4N/rc8YPQoe9Zh8jkIP7wpKHvICYzstE6qHtIH4XSt
bp2ZV2Ak0O97fc4bhJ+lRp5VdATDkIAvmVz4/fLtGrrvvwSDowFmwcfiQbiA
68myJicYbE4p9tjADcJFb4JoLfag3103uFGlDYTfiWzcS+YAfdeD95x+rwfh
L3Un31w6BHons0d6lp+AcM15rfr12aBH53ouXIufX7edMlTCBrrzjrLp+Y0g
3HitaOPUC9CNnF7Q/MAKwp2GHFFHWEAnL/4Ifwb2dOk9F6NnoK2ku0MSJYHw
HNLcIE8Hbd4tZ43qIkB44e2vDv5S0Op+z/P7bgOQSe9E7etrQSueXNtf3Axk
7g/RB+0nAVb6u76nmgKZT1eeBsEArXoJpa/eA1mg/FPTJnaAAgP2yBcPgEyp
ZLPqFwM4pdDilZsG5HUfg8x9NQH1P1xWtWcG8gYjcQGrKkDPZDzfJssBedOn
1zUq5oBO1n00SNgAZJnPEyaLLqA5F+buKsYO5J1fjxmE/weaa5qXeyxrgKz/
3Vbzdi3sicmMjDXHf8/IYmop+CDscT3bfG4oA8gm9TeLHbtgj4pMgXJJN5DN
f3xTl5qE3Z1r3ueI9QPZrklf6YUY7NYcCuIOyAKyvU33ZOwD2E2zj9Xwx993
bA576S8P6uOxV+nHm4Ds9rNkh5omqD9VUaHenADyyVa6/AcXUJcUNyf91wVk
n8N1/x79A7VlYzGuMPz//dq8MiL8Qe33JqF1aXFAPvP7mYzZf6CWWi6i+bwQ
yBc6N25qygQ1Oc+3/635D8gJvYLi/6ZA1a59vGFWAchJyVV9KXGgqmXK82vN
PyAnW4bm7dsFqjLGdgNa1UC+XzZilusDKjNj1hse4fxk3qk5f2YIVFLiJ7R9
8fu+sAg3k7sGKhEQ9emAHpBzuTTFWreCih9DmzwYA+TXAVkvkQeomNA8wx0H
gfx+/7Vetj+gvFLbIurXC+QKTt3c15dAeZh3+PEMH5CrShdDPTaBcmu2hU1H
K5C/yp+gVTuDcpEUV3xAIJCbOUxMbrSBctCFTyyvqUBuKWWh6QaBsmdxnPz3
UCC3+Rf2TK8BZUfTJnLXFiB3dcmFHDwIyjoeUjtP7AXyUAlXjmQDKAvYP1v3
ig7kUb93wXX+oMwiWih5wx7IE3JnjS+SQWlGbEWPGgzk2Vv93b37Qal9tHjH
V0ugsPh+FMn8Ckp5RT+qB0qBwi4b2u1wApQyrsmecpAGCmeHSrYgDyjdS8zm
liADhd/ssZGfEShFOQ3IfGIHiphMeJBaBSh5RJbvztgElDXtmob/3EDJWVTu
ag0vUNbFT1NTWEDJtjFjxNoWKFIs7i9IWqBk2OdNfhEKFIXfup2VJaC0dUd6
q5csUHbELT4/cxiUpHYYb/5dBxS6SV6g7AIorbW7eSYoAChqBVKUKDVQEpQ2
vX3DDSi6cSwGlq+APhMxFr5hHCgGEpffmEQAfXxtl98yJ1CMHnHK6hwG+mAd
c2QfAsrefD6eXcxA77qu3l1cDBTbZpFvwnuB/s1OucmvESiHnJKAewPQP3/b
uf26F1DsB9bkME0CvdI+kv1bOFBc5tffGLsD9JLyNRGCx4HiKSF3oLYf6FkZ
yhMWSUDxSsus+lgE9Ke/DtVckgCK77btqmXRQE/f8Pmp5H6gnNaki2fTgX53
MDvTfgAoYU4av6+HAT32pDmZ4gqUi/1l+/6zAnq0hls5pQ8o4T7aZaEyQL+6
7kAahxNQrl4weHCyBuiXKfrlQfj94tP2M/aKA/1sxQpryGegJMrXN+kNAf20
WJy8hQdQbr86YKhRBnT/oM1C9DKgpFYektvGALrXiaGu/XpAedrvNsz7Euju
k0dbnDqAkund58gaDnTX1xJ8u3iA8nzO49uiHdCdwx31mA4CJY/7ZM4gCej2
RiGF2UpAKZU/c+qLKdCt7epjOoWAUpY33/tBEuiW57LyshyB8kEj2KZwHOj7
Hwl4BeD4fNx7QS0jCeh7aaHHi3yB8t376lJkL9AN/EaK8/YA5ccc/8mwAqDr
df66IhwElKawmPaz14Cua3t7o94iUFpvxL/z2Al0LccvMkX+QOnNS71sGAr0
3d+abrv2A2VA8fBRh+9AV79c9G+dHFD+ZYqZnJICupp2UfyHYaCMPrwpdP8z
0JXrfGIVVIEyfyM8ZYEC9J0a6ay+W4GyxK8TJoTjs0PGdOraGqCsXCG5bcHr
UaQNyY5pA5U17JyclQPQFXgS7oatByq/t2d+1hOgy+3awPszDqiCg3JJH+aB
Lmu8ft+bc0AlH+kLajEDugxD6lvLfaDSHJ112HE8pDO/xUbPAHXjXqtvTnuA
vsnnc71xJFCV5Xf3C9cCfW0FZUzmMlBVH89+kd2Ivf7pFml7oO7e9Oo5OgV0
idCPTYZFQIU12/1P4PyvMTz89w0zUI25N5Eq3IAuRqoplcsGqunl9u5f+UCn
BeQmvCEDdR9TcuU4F9BFR2LaRsaAajknErXuOdBFBhZc9PKAat/PLXZ6FuiU
le+wjheoTq6Vi9HG2Fdr53bLAtWl/WJ7Wgq2uLmq+1agHmlcelSnDXSyZpLj
zDag+lSM7cT9ky70oFf9+ThQ/bWeU+E3tlZAJ7kEqAElx2ZtdgBdsGvD7Suc
QA3M6ym92Igte2vjCWWgXn7YbNyG9x//t6/Ke3uAGmH9Yvf7K9inqYHzFkC9
yhEu/xjHj3+99/TSMFBjjtP5fd8Dne+s4jaVeqDe2Xn9Oyd+f16ty41F3kBN
6WG8H6oGOs/smj/MDkC9l6Dxsl4JO9vjJj4vqI/m/sXfZceWZp58h4Ca/c7g
4C6cT24piU8b7YD60m+dsZgg0Ln67DcuMgE1X2pKffksdibX3loSUIsiHkp8
wvHhUrto8A6/f+W+5Q6Hf0DndFvzteYuUD8xNdTp4v3MuaPJ4jx+3y8vM9/L
FmOT3v7djvNfJ2r3cBLHi+P+ooVbLVB//c4/ckUB6OxjR9ieygH1d0yUrVcC
dlXN0I+dQO3UdjOyWsFO3T4foAPU3nThrZK4XtjNK61u7wLqmKfn8CsfoLOV
PjW8JgHUSUnd9tst2MmasSlDQJ2uW1N7HueL7dwD1oungLpI/5RrIoytVqa+
oRFE2Bc3n+rIAzpr2c9aYxsQ4cpaZFRKYKc5nr/cByK8jvU2zy5jR1z/tH4n
iAh9CFMLOIBt0aHrxwsiEldal3hmgM4y3PinyBlEJPe8HBpzwm7Sz3TeCiIb
hq/8bvyIXaaTrKMHIlssVMvuJ2LfbGq4cBZEdorFXVJRx9YSmpWlggg9RVnM
BdcHi0Kbh1YLiKisb3oe7Ye9lj8n9j8Q2SMj3vwnE+jM80lD9c9BRF/5/ra4
ddiFoh/D+kHEsFD7/dtC7IxGU2UFEDHR6LH5Z4N95++Wz+tBxFxvywXtGOxQ
7sAr/0DEzjKrcQyfD8yGC91JpiByuGnfCYm72Ht2yXjsABFHuzEmw93Y23PG
3oWDiJsLfWuqP7ZoaEtiGYic9C48b4b7GdPfXY43noKI9+Rh6tkL2O1B3XcG
QMTv9FLGI9wfmRqYD4h7gciZUPixaItdVlT7xRtELkRVyWZ8wb5dqZwQAyKX
hY6WNh7Fjq0WPnsFRP6L57ZiZsWOZN2i+AhEriWbhRzUxD7DnnImDkQSMurr
ObKxbVVCTBkgkqRw6ugu3J+ZzHPy/nKDyJ1ckSWHAWyjA0yOb0DkXoHdlnzc
X5h2i+3S2A8iGVUdQW5x2Ot9zpw/CiJZJheEYhSxxTfli+HPv/i2Kb3oKzZ5
TmX5PojkNTLqyHj/MHFyz3y7CCKlPUOb350BOmksr63EGETeHY0uHML9lTR4
Is53BkQ+DCqa03Kw+7Sas+1B5OOE3zmvv9ht2mf4ToJIPdPct3X4vCZ9vtK6
lwYiDUWvfMX4sSvexhrGg0jzKR8q+R32OyGLH7he2vr7D3FJY7/hQm8FQaT/
W2PvxAj2Y9Ww/06AyL/IG5HDD7Af6mjsPgYiwzp75QfwfiSluk9m43xO5Ff4
/n6DfWuMysYFIsspL5c/4XyRrghw3/QAUSYbr/vl+LwmhX8+d6gJRFmFtuqW
9mFfTHqtvBZEuS49uJKH40sK9ini3QKilOOxIqlUbJ+FcytUEBXdbFqQhOud
5GVYY94AomLtnIfjzmGfSD9XkAyikhahDyJxfyQdibUaugmicmonFfxx/yE5
iH/6YwKi8hOydV74/CUd6rhecxxEt2f+8T/Gh33w5Y+5URBVWn+40NEX2zrs
1h9jEAUOE31jXJ8ks5zL4XIgqv2OfUB3GNukpfi7CIjqnXt/Dd3DNhag1Y6D
qPGw2nclXE8k/cSdx3RA1LpBxkESzxckkBpkJ4OobXQPk/h5bM17GrtkQPSQ
YWoadRe2htS7W3Eg6lQs8pcb71+SumH4IXsQPf6Q7dSUCzZ9StU4HkRPHn5H
GyXyvyvPgkMMRH1Egor+VmHvDGSFUBANiJxk6pDHVlwXKN0IomHeXVGfp7C3
vhkCIRC9uHi0gacVW+6djcgzEA3/b0TCFPd7kuw39aHfIHr17kJGDd6/pC3z
U1o4fvFfKVXf5bCloucj8ecTbe8IkHH/Jm16O+W1G0Rv92w4YIn7E2nj1KW7
N0A0dWFbT0M59gbP2Twc3wxZA6af+HwnrYu9LOEGopl5X43EdbHX9hw/Hwii
L8Ay5tBWwrulxctANM/GaV0rPi9Jaybe5aqAaOnls7s7bmCLXTef9AXRd4Ir
FzcQ+4G2HCfUDKIfki9/dnEk7MP9mQGiH1/esO0h3l/U0XiEBUS/dz471VeJ
TXXctTUPRBs8d5TI4P5GovRus6sE0abZN6weNwl7/WiJBNE2gfIb/3B/JZGv
jITifPVptL0YxvMHSej327sDIDrwyXVmewfhs9GbvoPooNVfTW8i/kIiSS/e
gejY8enqcbzfSYI2St7zILpwW2Bgejs2/5gCsyWILm9O2KEiQjg5dq0q0Eg5
EmdOLxI2qj/kAjS2j7Lsc3ieIvE9/UJ7DjSBae1NS/j8JfGGeJp/BJpw2Mfj
msaEVbIiw4FG5dubG4rPfxLPeIjrHNDEpQ5pkZYJn3heEgM0KQt/B1ainrh9
7ZfkgCZdpyTqSvx/btVDXqxAk903VfuBeD7Xyh1SFdAUzE7rXFAkHFv+egRo
qobnZFaI/cZZzqlABZp6lXqXowLhm4c0XgFNQ2/hTinxvpyuxbf+AU1bJ5g/
mIgfJ8eNn0JAM9UMnZgn6oPDbgwagLa3BLLsiH7EsVPsmDfQ9u9hYhQQ9cfB
LeUUDLQDahd+nsHzPYm9+JtkOtCc6JdLp4l+xL518sNRoLm81D9jfY0w1wuX
q0Bz38mxIw/PLyS2fpl9N4B2bHtEml8p4ce6j/cAzV/uauTYAcLbCqAAaAFP
TXXMiwkLztzB8Tkrw7uYjfs1iXWy4RE/0EI2R3udJPY3a6nLogfQItbHWg1e
JmzLcMfPv5JqwW9C9FdW0LOwBFrUOuGqZ+aEZTJ29wPtxpo49WP4fCexzM+f
SgFassgtyb48wo+OcPQA7W68zU8DccKxW/4eANp9Cu1GOtEPWIIPqqsDLV3o
Nps70f9YbFhO5gEtmzf5b1cPYQElaRy/3Kv2adpE/pmXVflvAu0V9zr7+9mE
h5JMLwGtkCO11imI8NeT6QtAK2d+8Oo3mXCsguFnoFW+Dg7mJeLLHFZ08xPQ
Pp2w1d3NTdj30Y8poNU08n1PZCZsHRFpAbSfT8+M7Cfiyyxp+gq/X6uDZf75
k4SF/zPD79NOVgh+TsSDmZ2/bCPQeoJ6eHk6sZmGllgPAm3EfJ9MRS3hd1uo
O4A2ziY7Mkm8H1N+opos0CYL/9dyncdTmUZxAH+uWxG5uox4nusmymTpohSp
PtMpa8vUJc0okSG3RphK2pQsSclU+oiylRRjsqRltEzL3BYShRnLSJ+ZD8NE
plLUhyxzz6M/v3/c95z7vuf5nfcdU2aK8yUodO8wAMOBqTdd9t9Fnwro2gl0
zEezAMdidLjHhz1A1QuJxSbMI0Fwmmp/U03/5repeegAcZwWUJ3K41Hvs9Ae
2RANlGV9yijCeRHM6s/6DqjUsyGgRQNtpVzdCHSKeqml5gH0tF/25AE126q4
vjESbWA04ADU1rm23iRYZTJUXqaqN6u/MHNlB/pjTZIj0DnFCYFRmM+kZ8j1
DdD5hgt6nq9Bd9zVCwLq8uon0Ul3dG11jj5Q97Ox9fcxH0nVX1QBdNlq38x3
gK4QLVRdT35Xz2qlA/qOsnoeUJ8TUe58H5OibaGmQP3c1ug44P4lBX5FLkD9
B+0aFJPRFwJ3+AJVBHVuuI/5QrKuesuBbnX0itk3Fn1sg5Y/0PC7/d09OI8k
6Su9mUB3uJ7xVuD5J4ctqlWOXNVls5L3Fze7aiLQ+LD9L0zx/pBdooxZQBP6
zNzTcH+TiM2V4UATIyuvauF8km2NlZeBHjusn9iH+U5Cm9+1Aj2de3FuBe5D
siHeQQY001J+fgGvHyC3V9XLvvRBp5TX95+e2Q809w50pPP6PgNJEUCLmhpS
QuPQXhalXkAvrY8caZ2F9pTnJAC93GGy+ZtWtDym9yrQsvchi2Ex+mu150qg
SpHgrR7OM3HdedoG6IOUfJ+Ey2jnVwdU979csvzRIH9+TptM/gVaZZ6W1Y55
RGAP1mtwki27ju8vZD7R2ge06XFdmYzXd7wa/AfQ5/Jdpjm8/twtutZA//ZV
9h/h9ecMpjKgXbu88/0E6JkKW9U8dA8P69bheSW28oOq37+Jz41yw7wkNtDX
A7T3xOvVtvfQMruTqn6Giw4IhZgPxGLdsgfABLMtwnZhPhPz8FprYMKbT//s
xn1Eph/fKgemUUEvNfB5Mms6lgpMt7XEr4CgTXPcHgLTPxPW2I37kJg8TawG
ZrjO2sM2iZvUOAOT1hc5XTdAG4d3qmxecdG8HPOeGCVbXgFmFR98TrMXLWnz
HAFmvdhSsuImt2OWHTC7WwXaDS5o+s7OC9hXxXnv2jHvicHxJ3OBLdqsCMHv
b5UFgVOAOZubtYe8RE+KCLwBbEnO+cbecLT+xuX7gXmlnLstTETrbTnZA+xb
jwB7N8xbojuwxBPYWpFJyRE+77oHq04DW59w9pwuPx/i/OFaYMF7shNMbqAn
jl+mcqiDHwmKQuvkX1sH7Ide6e4CPq867lvuA4sIzQyxxbwiouMX1IFF+6d7
LOT9ac9LegYsTrqmMg7ziEzomjAPWHwzdSrfzp0RcQjYkVWn7FeMcAsbY4Gl
uqZK/Hh/mp25qv4z7ulrt/P+NBUbGbAcxxQSKkOP7/Q6CqxwRnL7Xt7PeHJY
df3SvIlNQt6PRoprOLAy42OVR3y4ZTQXmFL3x5J0fF8l6qETTYCVb4s56DfI
re99AFhVXYTv1AT0uN+KVP+n8YSvZmEmt9ntYGCtns7X5/B5HJvWUgLsP90Z
QXceck96FAjsY90Xem7N6DE5q1aBRC35072a19z2O16CRNujLWytEC2sX6AE
iaH4iaTNkHvvo0SQyJLTd/QtQqu1id6CxEn8fZ06z1O1wKfPQeKd7Cij+P5A
BAM7S0ESJtY4ZHWbO9fpGkhSZR6xVzy5v7wyBJI7S9L3zcPvBUKemfWCpCOo
badyL3dyxhgwEsXO2LZUzK3wfgJGQVHEZP4Hbpu86WD06+7fa2Qt3JNsxoFU
u3hQvcOVW/PFeZD6/TNtYTa/H2Ss526QFken35o+jlvtfAVIh6Vi+xJfboHc
GiZ77X0cwsK4SZYPTP65JSYnPnrUS/Jh8qeIo+vLJo16mgsYLxdlSF8WjVrc
Asa5wZ0nB0dGrbEUjAfK54rEHqMWNoHxUGBq0qntn60E45GRPi3jtM8u/B84
mcyU
          "]]}}, {{}, 
        {GrayLevel[0], PointSize[Large], 
         PointBox[{{8., 20.000001675297746`}, {8., 20.000000000249976`}, {8., 
          20.00000000000334}}]}, {}}},
      AspectRatio->1,
      Axes->True,
      AxesOrigin->{0, 0},
      BaseStyle->{
       FontFamily -> "Helvetica", FontWeight -> "Bold", FontSize -> 14},
      Frame->True,
      FrameLabel->{
        FormBox["\"\"", TraditionalForm], 
        FormBox["\"Temperature (\[Degree]C)\"", TraditionalForm]},
      FrameTicks->{{{0, 
          FormBox["0", TraditionalForm]}, {2, 
          FormBox["2", TraditionalForm]}, {4, 
          FormBox["4", TraditionalForm]}, {6, 
          FormBox["6", TraditionalForm]}, {8, 
          FormBox["8", TraditionalForm]}, {10, 
          FormBox["10", TraditionalForm]}}, {{0, 
          FormBox["0", TraditionalForm]}, {50, 
          FormBox["50", TraditionalForm]}, {100, 
          FormBox["100", TraditionalForm]}, {150, 
          FormBox["150", TraditionalForm]}, {200, 
          FormBox["200", TraditionalForm]}}, {}, {}},
      ImageSize->Scaled[0.585],
      PlotLabel->FormBox["\"Temperature Profiles\"", TraditionalForm],
      PlotRange->{{0., 10.}, {0., 200.}},
      PlotRangeClipping->True,
      PlotRangePadding->{Automatic, Automatic}], {168., -182.4}, 
     ImageScaled[{0.5, 0.5}], {312., 316.}], InsetBox[
     GraphicsBox[{{{}, {}, 
        {GrayLevel[0.85], Thickness[0.01], Dashing[None], 
         LineBox[CompressedData["
1:eJwV0nc8lt0bAPDHyhae+34GCRVZ4W2Q1jnZoSgqInkjI6FXsvopKqnXqFdI
VlZmRkZSOEcpJTNFyihZ2Tsr/e7+Op/v53Odc41zHfE4LXuGRqNx0mgcvH/O
fcE/cMvQGaOqvR7lCk79O4ADu+e8hA43kqQl9o1n1QAvdnFC7INtSJl2zmxz
ohm4zk4sam8wRrtpf3+Nd8kEUezIyp8Ox5Exzb/f428SpLPDdULUupA1rS44
zj8ElLD/vWFKJiNXjti1g8oQ1LBvbS7mC0KXuFa+ecZ7gw9TkwUpVpYobNuq
/bzfd9Cz3sAm6LcgihajOedNC4MefRXb4y6xKFrlXRhdRwT0uIvZqXzYhKIN
E7zrlspAT+UX+/bsfSg60ExBW+0w+KpaVhqTXY6iJzlbLn9VBF8bjStGzcdQ
TPOTIgPzH6BX+MK7e1lHUWzsvfIsHk/QK+tocvVkAootdRcc7XIEvTssG9zE
e1HsezMNuYFs0Htyb5N2gAe6L6SlGNq6AHrzeN+PHbmF7gc+DL1OOwq+m8R/
1l6pRHHnVBUdRa6CvtCXQ+OH5VCCWWKBiJUE6Etx2mVwRQIleO4FcZemQF+Z
QGhynihKuLvYGeN9C/T1HlY151tCCe0NO02/aYL+nd0XynAzSrSbvuqQvQP0
9y+sBqn7oyS/pVvi4wzQv5xg+tnWAyUlNhNDTY1gQAykbAtzQEnVLXoNrR5g
YM8Nnf4hU/RAwFq5UdoIDNyl3zJK3oQeJOYPF4ZIg0GoShBrG1Gy0/5QmQBt
MHi05Yzb3pco2b/dtfvJEzDo6vXktetTlBwR4bBBchoMxjy38q1NQ8lP7JX6
bgaCwTHDpK4rviiF98U/PjJ3wFCcvWLGxAaUUqT9Ft3IAUOFay7RpJgo5Y19
RUjudzD0KrveylgIpXSXnTneJgGGJic9BDN+olTBFc91Bu7gh0FAyXnbepTq
Ir/QOSEJfszGAq1GH5Sm5jERGmoGhvne9peqiqA0gwqHa4qU1y2HqYenozS7
g+StWVUwrGfbsdmkBaVFaltwzrwDwzFyF4h3yiht8TFrsnIJjGgWZUzU9qD0
T55d/LeTwYhx30HXzd4ofW7OtFoiG4zYkTMDIULoIb37c1vqETBy0w926Wuh
h2bTYoYjVWCkA3yuq7mLHjY714snlIFR/waRh9UGKGPQQnWkvwSMRqyWysp0
o0yhkg2CnclgNE3dOiHQC2VuLdh1U38jGH13N+suSEGZgTfKMh3cwNi6E9qB
lcsoa5NqW0XgdjCmHjq0IhWJsg59OeQb0QDGdCtv+wQooCx/3Rl2ajUYc5Pp
dN9zFGW1ng5Qk3cCY5WD3tbPClD27UPVzbWeYOw9e127hD7KxucUH7bvAmMD
Ri+P+HWi7Gn3sCeaq2BcJF/0gBY/yrHS7MxNPgDGT3nlaJTZo9ytvuF5Sgpg
goOjW6yEifJYrfWFCh/ABKPPYjnMBuXZ/ft7Y/8XMKHy+l2/QyrKy0aZilnb
wYRlaHk5qYLy4Qu3S68Og4lCMtrOWxsVXGVxqG7DYOLVgpDRoZuooC39v4BO
DzDx5fO17fINqJDh29mRGQUmuZqeXht5hAo9fD4s3H8KJtWiMo4naKDHKkUf
aKwwMLkr+Fv9TSv02PYfnYnROjCp5yO13+t/6PF/f9mjHDqYtLaKUjapRo8X
X9drWbeCyZD1Qau/TFBRe/E0Ta8NTHZnncyw/RuVvH3bXhIrDiZ/3L8vaXQd
lQrb808P14PJ2X8/3NHIQKVHdrzV5TYDUwJuxv4io6i0J9LZf1wCTGls1TqI
vFEZ/9kDxm57wFR4BTEnE4bK47fuOec4DqZi88zOCuWj8pljq3WmjmAqLSm0
e6EFPTNp0lr9LgqmyoM437Qw0HOu5/51cjJgql9vMiEoBVUEXb9u1vQaTO9p
qtfpfYJQhev3m+OpYNogfCrIsA1h+vv9Ok7GYPqICaMqfx5hI6GFXGUFMO30
5m+tS5oIPz2x+3vNZzAdiefV6E9RdYJWLO/yWTA9VCQjoVuOXgaKD4d2ZIOZ
qKgLkxkVqDa/UEmwfRbMPDhyX1WoE9XOVXxeTFkEMzmiVa6eK+jN3j3XRx9c
ATMonG8A7EVvGiL0WrfagJnh4MQv7VXo7cwhCbqNL5iF3rW1fAjVH25Pn3xG
gNlRK8nEsy9Qc5biGjXbHjA7b+vq+qMYNTfGuPqNeIE5mv3zXc7pqHlOVuiC
fQWYI9xPtDsGoxbt0FnXzEAwt+danNhpQ9TSnWNbq3EOzIXls4KtmlCr5INt
N4q2g/ktXKSbYSf6+PBcy0rsKPjplrd2r/wc+txfIbV2xBAsyUmK5i5you9H
76qY8EaBlXzzJ3a/NdDQkESS9KQh+K30unH79Xo0fnpKfZ9ML6SNZy+O3JFG
08qs+e7aPsip/rG75+cImp36nt1UHgK5IkTqng+no5+zDn3fdtdB7r6+iUwp
EbQ01LLxRC6EazYlO5a6hKFfOTrNO7+oQN4rzn25cB7TzIu+aUoOQr6XjJKa
rV6Y4+nrnjOBP6CAbEtoTX4P5tpd5M0lzAsF/RXjP5xdxtxlkTGqIRAKPXdc
5d2vjNew555GaSdDEeZjJ9lUA8wbp+5Z0BAN19p823BKygfz08ZVv7jpQdGD
7YJHR1WwgF3yhVfL/FB0qYZvci0dC3YrHdRpuwjFEjYWxCNuLKytue7SESYU
N+bveL7dFYvUSOq6RAhC8fmq5NMHcrGotJ9HoEAlpMcMiEqMzGHR5k25+rPc
kNCN4jIwL8Vitx/DLbJ8kBgoeRBseAWLax/XVvOYgWRw2iejLlksPtk+btxU
DRlb2VHXNXdheq5WcJOqOWRsT9Rgn27D9LzvAUz5EMjQlGnPj7iA6YVhn+xf
f4WMPQoSn/ofYXppV97ntfKQoa+RsiVqPaZjHy/9hZ2QccI8r22KE9M/3txx
4WgoZFwNr1XMeYfpv2kv3qnbQkawmHNVmzMmOG77yQoXQUZItIAFJzcmuKV4
VI3WQEZYwsHLVvswwb/9xvvdpyEjJqe1lbcQE3SL4LMLIpCRU/v1fw5RmNh8
5OVoy1PIaOVYbFpvg4lDpJNulgVkfHxe6skWwYRZuuy+JRPI+HTxH5JejQlz
9dMu1/ogo2toyJpfHhOW+431p4shY6ipbWBmAhOndRxLOb0gYzWxePXtVUxc
rOz6/KkMMjmOe6TUbMeEr7ThX46pkMktpqxbNYgJ/4DzZkFPIZP/euq/JSaY
uKJWc+7qJ8gkXP9jPCAxcdOVS6z/CWQqabmremVhIk6d9mruA2SqzCi2eJzA
RMKxOQ07N8hUe9TvdVYYE0l+TcsuJyBzh4zNs1OemEgt5mYqeUIm5DXWN9qN
iZypVW86N2Qe/ahgK92IiWf3bnTL1EGmZUQfh0QgJip8RF4aTEGmteGDdHIb
JqoOo9pJBci0q2AMC8RionrB+5MQ9Z5rGs/FudOYeCsAezoOQGbQ+d7wujlM
tO3saP0fDTKvrTh/FOzERHueCFuR8o2QiXUmLzDRsS7/Ie9FyAxNWs5pvIOJ
L+MqTWI3IDO6gah9r4SJb1arX21PQmasZfxauigmerMvjE9XQGZcn+wx85+Y
+D5rNlTXCZkPlrf0fazBxMD/DGsfUfXlKBpwdNhiYuSol23GBsh8VNJwQEIX
E6OBLs3WVL4CaH7HWhkTYxk9kkZckFly3G595wImJgZO3nfjg8yqYL/dXyMx
MatulvbWFDLff8u9OPgaE8vzMcJp1pD50e2vSoVHmFjprMm88g0y2xeecrvc
xcSvquloZy/I7FpbEzlih4nfPr7WPL2QObi3q2B8CZOcz9yyvlP1/3hr/1Pt
Kya5gtq6BWogc9RieN/5Wkxy6yUm7CQgc8p1vn46CpM8L7yL4pchczlu7Y95
NUzyRdaAQ7chc1Uu5i9NBib59wU7wEDIoj1e5+uzQnlQ2GJrJmTxvFFcs1iH
SUHVzE/NMpC1dl574y8HTArfv7GzIh+yNh3xsuWOxaTYjyodZVHIkm/ZwbRf
xaT4mRbNwW7IUjSda35JxYv33Nfgj4Ms1YM+OlfVMUmv9z2ZYARZOw39FX6/
wSQZVlF8/x5k7ard1XtKlfLPF2Ja3pC1V285voqqn2HXIefnDFnaOgEiAXaY
ZG5x5tkqBFkm+67MLP3EJOuxevoWMcg6VAnzTthgki08Wl/cCFmH93A4lr+g
7CJ8J+oEZB3TutrhG4FJCYm0zQaekGW3PbhqXh6TkudkbtgkQJaXUuitqWOY
lGrqDbfigizvbBMdswpMrmfy8XP/giw/BaGVwg2UTzI3D9RD1mW5CA/3ccoD
wlUTSpB1U+Y/i9FgTEqP0ktHdCErgXFPerAEk7INLzR8qiErKfp4h4EEJjes
ObtGZh9kpRCsyIxAyvssLRyp+AyxOJ4zJpQfSXJuPgdZhUIJw719mNx4pcTQ
mwFZNZyppd10TMoJlLeOc0LW67KAACGqH7m9xVzNw5D19pyl7m4ByuclD9ar
Q1Zjm/D7WE7KrYZvTmpDVke278ThaUzK370cMGsBWRNmpgqvmjG5eXV32OUK
yJZIXI7PC8Ok0u2OlX0syJY60na6k4/ykwgQMgzZMryPlQSuU+7i2fXqMmTL
/eP41OkSJpUV9z98OQnZ6rotH2XPUkbrBYR+QrbeSJZItCEmVb5FZnDHQvY/
WhZBATyYVOOXtztTBNkX0OLoFDUfNQWrnDPUfW/9B5aO1L6oGVx0de2E7Evm
w2qmNZSDnQMuZUJ2sPuVrg1UfnWa8TEneci+n5a78w035Wm3yIebIfuFCMck
nep3a92PvLurUEK8t8A2m4ZJDZvIJX0MJV6IhxfEeWJy76d7PF5CUNJdjO+m
ciUm9ZjHgIsRXCdyVcXTSAyTxh+Mbp9Vgesq/Fqbt3Ri0lz2lFFbF5Sy7dsE
kgoxaTUtIu+kD6VWpcQ0Ck5i0i7Z7qt6Elyf0xmUEkz9p1PPQku4JZQ2EYmX
GsrDpHuan4qdKJReqt0pInYYkxcXtPWX0yl3SnLy/Et5cUPKxz+e/DW3SPV7
cYlzpeAhlF6WeNnVq0F5+WWRfSZld9O8Ymp/Lv7Wk3pXAKVXSKeDFr2Y9F5j
MBtfBqV/2ceExXpRJg6m7q6k7OsXGEbl9ya3/CL/ONzGK3CAMkPk+MRzymUb
bFwsKTObhNOeQelVgXyVXXspS5r5CZZTfvzqXecayhvMTb8UUn6dhZoB5Y3b
ckpLKH8JLa7xpbyJ4LmdD6V/8xyOfzRMWe7Dc50/tuxyDWikrHhMPjeHshs+
5clLWUkjKDiD8tU0c0dIWZnReeqPH7nsPlREWaU9kp5GudpETXuE8pay0bFU
ym1qGzU3UVaNNaj94xFxprItZTXf1JQkyr/nBKXvUVa3/HUp4f80Y+fY
          "]]}, 
        {GrayLevel[0.5], Thickness[0.01], Dashing[None], 
         LineBox[CompressedData["
1:eJwV1Hk0VV8bB3BDg1KGe8/lnisZG5RQiSjtrRRlaC4KKRKKhJ+ohEIylEwR
lTkzmQl7myWEiMpQpoy5ksx5z/vXWZ+1znr2s7772c+pm1ckrnJwcHBxcHAK
/f97wHMYNw9dPVaqZuvwqaPzNzAje2xZh1YgEU7t6T/5FsCBzI4Me70bbefc
cNIg5yjwIF9mtTdoo32cjK+5XxRAMBlYMmN2HmlzKss7BXaBONL/0CP5LnSR
M5wrrO8SyCF9vI4zotB1rsAzrTv3g0ry8ZZsHnd0d+Xt1pa0faB1kp0RbaCP
/PZq37v5vBT0bNQ0dF/mRSGsu+RTQQL0HJE1Pm8ZhkKUXB4UnFYBPTaCJrKt
0ijklNdf9X+KoKfkm2l70gEU4pMRzR/BCb7L5eeGJhWikAXD4sPP4sH3Ru3i
sdPjKLT7+K6AL1Ggd739h+eJZ1FY6saR3geBoFfCXOeBUSQKe28hsPSNCXr3
6DdY03pR2CAqO1epDnqN1D4edLmJwiUiN9xPcga9aatbxk89RuFhtLzhJm/Q
pxPx9eBiCXrhrfdHN4oN+n0rhn6d3IQinY+Pablagf7oa6qariwUGTE33Mph
Bvrz1/pGpQmgyNJaUqP+LejvPSl3mmcevVzR+mPlpyNgYG+3fT5uQi8D602f
MHrBwMDsP3eFO+hVvrzkgHUrGFiIPP7V+CZ61fkqp+IaCQYFQfRuPzP0muuw
8eGyZDC43+vQwNBx9FpPba66wAwMBtEfH4uSRq+HefpMJzjATyhHEPyNKCqk
jiPTOw38PNt81VqtAkUlRz9Ts1EDP6875FVfL0BRKDbpiqgg+Bn6zsCpJhZF
jcjCsxp08HNc61WXqxOKVrdru+RuA4ZemMokTEii6Hlh3cvmwWAoc9VdDlFh
FENTux1M8IOhqqR6A+11KGZbgsWkkw4YYrNv8ibMoBhDrfsiiiJgWNMlx9a4
HsVU8AjKpUIw/CcMqDTeRrFRnk/4c7PACM/7gVw5PhT7bsJLj+sEGNmw4Kfg
H4di2/NUHc3Lwchh4y9bdJpRnIDZJRvWKjASusme+LAdxXk9+8YxmANGks+T
AdvKUVy8vI3svhgwUuqNeX30UVwlnL0bBMHI4Nh6rqOeKJ67QcNB4BgYVc5K
mKjpQfHe46G6tRCMavfrXt/iiOJT/MmGCEswasKYGny0DsU3lgyfs/IHo97O
sOuICkoQ6t+V9m07GP0CvtZVBqGEdFSYvHQHjN1p4Isv00SJnNyfyAevwNiT
f7kS4t0oUe6P8O7ufjAWq3Ax0s0BJRrVHkyNzQZjH4ISg0A0SixV2mrxrAeM
b7hw0K1kASX5DF6MCpkF4wq+Q4uigSgJZw1rtBmDcY2Sp7ddtqKkmQiL3I4s
MG4t3mmz/yxKtuh5WBO3AMZLfjpeLMpAKReYY2edgsF4C7mhnXUEpYQnBmhV
UP8PHqs45dyJUr4+P5jd6QZ+8aULHFVZg1JN8jJ1oRr4dckhWSnfFKW5rtk6
edYF/LJPOJElNI/S6iLuF7jcB78etc/scAxA6cJff0a32oBfmfs0pPeUoPR8
n+F6ySIwwcnZLZgjjDJX2XjEfuYGE0L9Zxb8DFGm8unutg/zYEK2+sOAWQzK
tLRYvC3vCCb0fQsLGbIosxlEfla9AyYyGSEmjgfR28wbnaVEI5ioml13TM8b
vR19tb+nkgtMfPv6UHFzA8raqvrconMFYHN/LHg4moqy4lukdwY2ALZ8cML5
SCWUna2TpvBzN2Crev6o9zZA2fPxfXdLpgD78G1RdYd7KOdQ3OLNhibAvmgQ
vF2nDOV8fSu8r9EMsB9tdP+3pIPyRHGGuEAdYHcnGiUYX0YFSxqN6+XkAHs4
PFzkmAcqvLLSeK3hGGD/8WkNUEpAhbUfPuk+SweTa6217/CNoaLIu4GE5Rkw
qbRLRRc5omLDpqctW7eCSXUph/KUcFTcIkvWOE6DSR0iU/l5MSo5mnS4qMQc
TF6e2SJhy4lKgaCFY2AlmPQvJqbF/RCW6JsX5owEk2FpJ6zWpSN8VaH61bH3
YDL2lW/3bDPCSUGVvXdXgslCd67aZiFUtifyzutHR8HkwGF2pHs0Kr+Q5cXe
XQt+7/9Yf6g3D1V26K/YXh4Jfmv6T7prfUZV29UqZSoqwe9TOkKl6X9Rlatk
+fTsffD7Wu1llbvKqFqm73OnoDn4HYj/ytMLUI0vvxtH0G3weyhLnKVRiOru
HHg0x+wCU8HB9uyEYtTk4v8l3poOpl6fCpdb14macprXTVnZgqlkgdLrdouo
acz6tUf8KjCF/HkGgRpqNkxzt9UvA1Mjni+/tZeiFnXJlt20YPAHOtbU8CDU
yizdlJJxGfwZMxB5aVWO2udp18611IA/f42vXx/ORh17MKfZH34wzWH6TtUi
DnXcCl+UvrIKTBM2F9rNPVHH8Mfv5u/XgOn9D18IXtFCXzp3RBhHaIBpv3Sm
p8FH9K2Wtymy2wH83cHNsNbqRD35RWJG/yTAjHUav9rmadQ3vl77gpYPmN8k
IpAyx4XGeUT3KsluBovpp/NMlpXQ7xb2s6rlH2B5W3Wjokc9muE3su3f4Ak5
fiXNjQaIoYXEtlHeue+QS6Gtu2dmFC1P5W6d3RUIuZ/w1b0bicNcunbaCs5f
4Ir+/ok3onx4ReiW04+jJeEq6SjzXEs/vCr/Pxm/TXvhaleL/hT4F69ZNZDX
UCEJeSqEcip3OWBeuV/V10RPwbUSzb6V6T14vSfLyV7sEOS9IxPRarWA+Zsu
/77nLgnXvTP/t1p9OxaYF6949eMK5BN+e00iRhPTpMT7IpK0IL/hD8lLorcx
fa+lzU8UDgV023nPjsliQkvBv3BtJRSYr+Rh89Mxw6Y4silUCwpGSmVEoBVY
yM1uVl+iBtK013x5p3gdC8cG3C1LGYc03YLUtiaMhd+M5SlPPoe0E9dc2dYM
LJyqmXwy1BnSzlZt3hSPsHDOXEzKYBukmbjZBQjTsXC1zryxKy+k/TfDazb3
DgsPJQsHvl8NaVH9anyIFzO3L6wwuiADabFBAjIXTTBTQZT30IUVkJag3ndo
JhczFff7CtP0IC3l9WNnhUuYud8e/VikQ1rehba+6GzM1ClzrvtyFtI+NNsU
eFzEzBsN2s0bb0Pa39KoK0dTMDN5t9LWPdKQNgcOSMgqYmZaggtnkQakLaBv
3/lKMfMtozhgjQ+kc5QJG31qwsz8n31dcd8hfW3FEwOjP5hZpb98sWEdpG+s
vXfC7gBm9ly6F33QAdIljrL4z9RgZq/PZfmmIkiXep/fqHwCMwcyZaNuOkH6
1rop7cUrmDk6tmunlwak72qw0vR6hJmz0vyN1eaQfqRF/8CLJkzye/A6aL6A
9KOnppdcDDBJO6uq/BlDuvanoOJLvZhkiJskaVpB+onWj6rSfzDJim3PMV2E
9AvtR/ZkkJjcZKy1j68A0m06FWUrrmBSJWTj+ZU3IP2WYfNo/Cgm9y0pr+qa
gHT7rpvJ3g6YPGB8dkjHDNKdulO26j7C5CFed6GSDkh/8ENSqj0VkzoCifb3
lCA9dFCANTqNScMy5lIY1X94ZM3Pl8GYNP5+58qXREiPPO2ac3w3Jk1mdL1D
7SE9Gk/oZt3C5FXeEzzRgpCeGtHo5jSOyRsNCvVeVL2MU1662/wwaZP4cIrz
OaRnrTlAdm7HpO3dW8OirZCe75iWDSwx6cBzJDFmPaSXn/QbXDmAyTtoi+XR
ekiv4tHIyvfA5D39l4Gv9SC9pnTR1VIKky4jpGPyHUhvkL3BrL+MSbdpqw3z
XyC9Y7W2dmAXJr0yQjj6jSH9ayk3U+MeJr159e0zfkF6l0NR/18RTD6+VO2d
S9Xv7d1234DK33eKW9oyB9LHS9a8FWvDZEBVxXqXH5DOti9zaabyezYc4UEq
QPrUNudjD+mYDFo1/j37CKTPPh/qGzyJyRA523uF3yHBbVcrlNqAyXDFNSnE
U0isknHtM76ByReb64e41SHB8105U4AXkxH0iYBNdpDg031z1P4oJiO7armX
hCBBbvW6p1KFyahd08ozxyAh0nNAa9SM8kLfpoksSGwM+ct4yY3JaMyUCr4B
CWnuqxkc6piMVa2Zb6qDhFy3xo/qEkzGL2rs/dQOiZ3Bi+lOhphMiLmlfk4e
EoraOXdlFjD5RqO06bczJFQKpQl/FUwm3pd48NwcEhrB3JqnczGZXJ1fdO48
JDQ3eBZoe2MyRdN3268cSByN55E5RNVLqYo3HbWFhF7eet7dXJhMLZzuyKfO
1+8Q+kjTw2S6x1DAuBQkLpqEU0uN8uRnt5OakDAaFnnLSc1zhuEz3QhVSFyZ
Fw+cjMBk5vakpt0ekLDesO1c0xAm376dk/HrhMTNuNSa2neYzOLr2zdJh4Td
Dvm9+AllqzWdHSQkbh9QZGUqYjJb5MDx+lRIuJuodT91x2SOVaDdZQ5IhMSd
NNdjYTKvWrAjYRESYbKf2g9T85nPO3WSYwMkXuSe01LDlE/kPthD9fu6+uK2
HeaUPy+w73pCImnI7Ne6bEwWtJvmLH+FRKms038fdDBZlOY9wLsXEjhnfrBC
jHJ/RVKSBSQq1FzOF/3G5DsRzePuC5Co1XugkhxO2UttZxuVf4ut79LjQUwW
nzFfjlgLicGc155arpgsaTN1a5aExLCCoYVxCyZLuc75NVB5j6aS2v9JU5br
WAs2QYIdGyQYXUfZK5AZ4QqJ+UCvlwsEJtFOhT3ew5DBZ2udl5aISfyfxoHY
AshQkt03RKP2TXmNoOppD8jY+2b2g4wk5ZH9KnpPIGOfVG46+A+TFev3cPZ4
QgYUkXe4QeVVcSr4feFXyDi2Voqjipq/im87blzShAyjobXk7VlMVvandv/o
gQzP2I5jXdT9Vnf/Pt3kDRneZzP2lftgsoZDT3S0EDJ8V3vJvqHyqJF4ct+W
csB1RT67csqmqDhIHDIidj1t4aHq1wz+PaJuBRmZZZoGu6n+a4eVvvlGQsa3
7rxrPnKYrPtutbX9EBTaRQZ7KKtisjHV0WSXCRT6xDn3cSM1j22+uxgTRVDY
3bbXv47aX53996PnxCFT+pSD8YowTPa9y5wyaoHMSq6Y3G7q/Y7cNJFkNUHy
lsoZd5eVmJzMETCk3iuL1pthnMSBydl7obFjcZBVTvPPeGGHyeXPl2caEqCI
jSCP9/YSzFq9/ruaYA7cwPdA1u6YIGatf6+ZYloANxQ7f2ra0YlZDMasgPx9
KGrcLw1eZWKWyOAzdrMDFP0nKqiUYYRZksE9PqX34cbkTvdoTzfMkml13JIk
C8V0+CJEh9IwS+H5XzVFTyg2X7OXT/AkZimPIU3LQcqdIlwrfSiPv445qEaZ
vTQ9V0n5l+sS6wUUW2BVdPUqUWbDrA+nKNscT8tmUZ4q3yj7AYotMq7pnuml
PF/5Z+IrFFsyDfULc8CsvTx1MY72lJ2c3fyo8/euSV7S66bsb+jgNkh5ra/+
Fj3K+ZKGlvqU1+ms71CAYv/WpsuqqlHmb3BW+Uv5bdWHzlWUhZqOLyVQrk5E
TYCycGbyZ3HK33yzK50oM5+tTA+FYssrT0akjlBmnXx36Sll/a7rLo2URT9t
LrtH2RpfsltNeWO2e/gC5Qexp80hZbGgTjtnyqmW+/SyKEucCZS6TblMR/7g
KGVJxbEFqp/lz/JSytKUpRiarU6UR2nC243/7+mY1H+Ul6d5xZ5Tlm5b8rz/
P4Xye0k=
          "]]}, 
        {GrayLevel[0], Thickness[0.01], Dashing[None], 
         LineBox[CompressedData["
1:eJwV1Xk4Ft0bB3BbJVvPM499eyZpEcWb8KKcg6IslS1USBQSqYR4ZSmRLdmS
CFmyREJRlnPKkl/WQlpE9p0HobT4TX/N9bmumTn33N/7zDE9f2rjaTY2Ng42
NnbJv1etkHH8duy0Qc3eCybbgnXDgaNYn4e4LheS4BA1VeZRAZ5ipSlJacpI
nn3i207J/eC6WGpJd4sh0mQf33pLrwLEi8VWLztaIkMOQa2hGQ6QJRalG6r4
BR3niPC4M3UdlImF3zgslI5cOSvkly7Ggjqxm1tLuYOQ37rdLT2vPEDnHOtx
hrUVitxrfdZ/3g30SeufCFrlRQmbH5acftoO+vQUbC1dklCC9mSo46wA6HOn
n1TolEUJtmpj6mX1oK/6s0N3nhZKSJwUXrFlB193lj9NzHuOErnx7IDiC/C1
1bBqymwaJc7YiNTL7QAD/Jea7uRaoKTaPaGr8gfAwMYzRsE2KSipX6CsTLsd
DKhYtbgRAyjpz3yxVKoOGLDZ26bjfx7d1Zir2+/gAwYK172bNr2J7pZ+6Gy1
kAODRvc+6fyqRsl5FfwVPPlgKKJ2bMZkM0rJG+TneiIIhjKcNPQDxFFKSzuR
ZojBUDlPRHohDaXMTSiTPTvB0IDJTjPuFZSqkV/MNjILhv/tvVSO21Fqa5Ck
5u1kMDz8/U+Qki9KY3uTaNT+HQz/TDn8yfY8Stu2S09ZtQyM0EGGcqQjSjvc
l6+SZwlG9tzQHR47jNLSGX7ffErBSBzjpkG6LEqX4Zdz+fcDGIU7BQU3tKL0
1hO+Ne2bwKjF29Nue2tR+tBr3XRTezDq6vmswbUCpf90XtVNuAVGEyutfV5n
ogw5y6+/de6D0ekD978E+KCMMEH3GuEYMJbsIJczK4MemDbcehF1AowVr/Vj
kxJBD9xubGtvkwZj9XnN1oZ86EHY/YDGtkYwxmKd581ZRg/Q0L1mTh0wru9f
5mHbjDKVxRNzPG3B+LckoN7qjbIUFR65qAiCCe7/DT/dKYCyDlWu2N1aCyYk
f0YqRWWhLPcmAXPPP2Biv+3HrUZvUVaxjwnXdAyYSNx8SbBJHmVrhGhVWWmC
iXxLsZjtr1C2bWh/1+UwMFEThnnDrVD2tR2+BkNVYGJkip/jYAjKbvXiUtHW
A5NqJTmzr/tQjluCO2MqFEwaDhm7bvVCOXf0E2U3nQaTJ4UWRkL5UM7LNwcE
/nsIJsOuwC966uih2PEasiAYTH4En97UxaGHHZ46380zweT0hSA92e0ol8s9
W9CGDUyxZ259eQ2jXFVP/clLfGBq+1rPCp1plJtaq2IsehVM+bYIZL/UR3m+
ro8ns3PAVPSfpxvJXpRX9sIuKvh/YCpT6XhKoCfKY9lJDBy1B1NNcblxIAPl
u3Zdt72uDqYlj+kEVv9EBZ4ldwLK88G0UsTYL6lYVPBiSvZwFTuY3ld9y9t/
G3rE8dHkhnQHmHYje9z3WKBHSZxWn3JugenqUa/jLx6jwo9ibc8aqeffiUl2
i+uhop0X2pxNrcH0iEGt6ZUeVBQye/6amTOYESiiHVRfjx5rJmcFS/uCGTvP
fNVyB1RsX42HSs+BmUs5R0qEV1BxwtB5N/23YCa0e3mHVwwqbjrZ21pvAmaK
NffJqlSjJxoBQhpcCmCWnb2XXiaCSrab9fg5BIJZ4SHzn5EnUMn5hFQi/CiY
VWhoGnZ8gEqevXz0/UoQmLWKeP5cSAGVGvJ4Rh8dBbPFQgknvXRQWWR1m6Bc
JJit/85ncCgMlQ0Ue/M6T4DZz5+u7d7Sgp5qzDVdmMkFLM62imuTj9DT+VhH
6zvpgKUYn2OZoorKAzLdnPMnAEsjpL85zBqVjzs0VaaGAdZ+byltz/9QhUVH
vO0rTsA6bh0vb/QSPVed8aRptQBWqHTQn99GqFJCy6WUrACs2A3Vl8bdUeW9
3EBlXwPASmX7PtZ1G1UxBb9MVg4CVsng+XeF71G1okhe3UobYPXm2uTY2iPk
mbNvwiUQsMbv3pUwuI7wOo6xmu4ngPUtvDNGNQdhC5NWR+0CMMfjZugrMIXw
UnevLK8XmFPdpW6MvNAr4zr/5uxCMKe9yfNVwV306mGR9kbhQTBnJFisdqcK
1XLqTZ83DwNz9stbN3qwo1oU5nsirBjMRVUJLpKRqN7IcjzKwR7MJRUeOctX
hOpLG8iEr51gLvN+RO/3t6hBcsiSb1MDmHsexNH4Vhg1fNuhdPv0WTA3vJ+V
EpSBGp81++3zigPze9qadQeeoebwsKToid1gXj9qLujAe9SyvnHo+uWHYN7U
SLimaAm1hIdJfBGaAvNOjfbqfmqoNcbLuHfzEpiPxUuKjArUfvRDDT1sFsyP
lZDi+56jdwlK265srAYL8fGXWDlVqDtMgDsPaYGFNNO7O/l6UPfn/rmELEOw
kE+rcb34C31QUtEsDr4KFlAU9wjYiz58MimbPPETLEyEpH7urkGfdssZfll3
H3yDXq9fcyPU8+vu/qpr8+DblLVE6tlXqN/lsx2xpw58W7J1dR0vRf2JBdck
p+XAIptDpYZzFuqvTXY/07QTLAq6H+s+E4IGpN6Zbg/9Ahb3XEumnzqABjqS
W2wMtoPFyCLREOs2NLRPLGlePRws7eAUcjvQg0ZVYkkZ5SGw7Fa4Ye+WRTSt
d7r/0NsXYGWzBK3gBwdadK4sP2DeA34VmT07uaqKfrZtKWnM8Qer2xtad19v
xux8PVHQWxayzeT9mIxhYi5vRS9aSAzkUOrq7VuexOseyqjHlnpAzmiBN5UT
WZhXIu3z/fgpyDU0NPtQSgALBMyP/SkMgGtl0888dYnEtM6vY0UyjnBdgPNQ
AVzCRCSPcEbkCOSuFS6r2+WJBTezqirIb5Bn49uIuqI+LDQgUrkZ34e8vnL3
Os/+xCKJMuoqEl6Qr/LMn3Xa8lhM4V3kq9gzUEDkidPGB/pYfNiwo4xdD244
0S9jJ+WNJa+WlB7bFgtpxt28FlMKWJr7Y0lstRGkHQlHRuYVWHqDo4EqQwjS
zLQu6VTrYmmhaQaovQhpVtmfFaOPYWmZHxuYlmOQ5uBZsF7pJpbe8+PK/Dkd
SLtCGFR5jmBpj9tPwiRFIC3LOFzmdzqW7qqx178xBWkP2bXEzlDrfV4cG2z4
AGl5ZfMbWsux9IBc64rUCqQ9lrT+ldaKpWduON28T633fFLuvfZvzFxHi+Lm
XIK0trD/3bxxDDPVLKIf07ZD2kodN2sDAzPjFv80vNKAtN8HQ8Or32HmXYU3
zjy/IG21be3mc7GYed+mwDbvBaRzfeI89obAzNxC/cvbVCFdYPZ3fQjlanbi
gWgipG+SmE/+ScPMIYfURtogpG/OuKCS146Z44r2Tkb8kL5ty2y7VQxmTi9E
um+Oh/Qd/0yvebYBM5cdc880N0C6mv6oxwUBTHItXKjm0IZ0w0s9+0f5MCmc
5yR58QCkG/849jWhGZOiTaxNy0mQfuTqR799kZgUH2/lar0O6RY33xc/4MUk
U8RMgb8c0u3S3krY8GBy678iy2vzIf1SUz2rgxuTqiH9m7J1Id3LZF9EUCMm
/7UcdmMFQ7rP+9otSmGY1JC9ZqwQA+n+/fh49DpM7i10SuORhvTQ5RcNB9di
ct9/U+26mpCesunxPcSFSRN+/eOBEpB+v+/Avj2fMGmaNZC25QGkZyR/nXrx
GJPmKtXOzDRIf0gQe58dw6Sl7s7UhzKQXsLm2Vf4BJM2/JIfHXsgvayKP0z+
BiZt3Zsig6whvdw7RynvBCbt/td0aN4Y0qtmuoOyqfpPuX4A30hIf/1FY1OK
LSad7Bm+R/0h/U3Su2bx3Zh0jlYsrd0D6S3mrp5J6zHpUjZ+Zj4B0t81pdTH
lWHSdfach2MOpH95vuoUQfXLQ9x+wZrK5+vlJBr3V0xeEBaMvZUC6YP/KFXc
eIbJi7yj46JRkD6We2p98ClMXhqBSvt/QfpCYl3BlQpMeltxZbVQ+SyZ2pgt
R2PSZ+ua8JwlSP/Bv/jrsgNlVqdTejqk/wnZavw3X9/LmhqGJCTWX7o563wa
k/667/X6uiDBpyhzZ0SD8uR0ap8mJAQmKqEjDZNXb91RO+8CCUH7qdt2VZgM
eLOmrG4WEswjh5UtCUwGC/Bf5Z6AhAzv6OfOMcoJnozgWEjIvg68blqNyWti
u9e9k4fEdq0nXYecMXldmIyXuQoJlR2C3vtrMBkypr0gXwkJtbFCZm08Jm9Y
rLf/fRESGln7G7VdKNcM+sXdhwSU8BbbK4jJ0HDZNdvNIWG4/mPlbldM3mTf
5Ce+CxLGFY+62jFly3/6N+lA4ohTAMtNiHLBeqH4RkhY1G/ZnI0wGW509JxO
CyROBl6MEWFgMsJbRaM7BhIOivvzS6n6IqotnIM7IXG6V7T+MFV/JHtVadR3
SLhq1qyEOVEOSWKMP4PE5WVexx+VmIzyZdmIKEHCJ7s3IJHqV1TZi8Kt5ZDw
M3+SvIvqb9T0P4IdxZAILLFsc92Ayehjxog/FxIRblnqPVQ+t7Y49jrIQiJ9
aK8AouYhJmpFdyUJEplxNLnjJyk/W2kVHIREjvag7vJTyn27bq2xgERB2s0r
SnaYvL3D3uw19X3PjnUNZpRSfulw1vY/SDS9da+4fhyTsc2JNL6jkGgN1O4g
iylPZnJuuAOJt4qC09VrMBnHo7a8qA2J95GVMovUfonT487284FE/4F1UU6c
lCuyL4eehsRSTfqpgwWYjI+8vFZjMyR+AK2NCtS8x2d2iq5bgcRP9PmrAJVn
/IuFXbASMtheith0tFMe8/Fr+w4ZPLXR1jbfMJkAW+z4uCBDuvG/Ixe1KI+O
0/94QIbeOyutZOr+O6LyfhEDkHHQdPG3vzXl7cyipgjIMOyIq7IboKz5PcU7
GDKOdLZpyFLvu2N33K5lATKOdeupPBajnLUUda0GMtx7divUUvslSWFNa68X
ZCSO0MQnFzF5V+HrwcMzkHE35fVoKjVvd/fWFms/h4wUs4Cyw8qUDyWFdK1C
RgaeNS65QNlDZFlAFzIe3WsN9JmmXOJddWoRMl6ZRI6sGcZksgp7Po8bZExX
r3/C7MLkPWW6XvN5KLgvnlPfjMorVWqHz833UHCkLC3kQAAm0+OCDuauQKGQ
zA8GXzZiMnOqlU3oJhTeJRZ/XY3afw8jVvFpDIU72H+0SVP/n/wpp0gtBygS
5DEQ9YaqvyjBWHW9PRSVNfW05UrCZAmb1KH5YShax/HgaS81z0+t6039laDY
BXXzIH8q34pfdEOrIChODDy2zWPDZNVJk957L6H4KyLqcfJFTGJ+1aEnGVDC
nc4dJk/Ne23u4leTOCgpEKxw0YCOyddr82Kzn0LJqisd7Tt6MPmmkB0z4qGU
7ZAsuE/NU6vQoXKOTij1R4qu+tgGk2/PXf719CSUzu8JyggJxGQXH2ytFYVM
I4F7UmOFmPzgzvZJ/SRkrrz+V4Bugske0dP2gEG5R4JjTfhfd0Xn7aHM+r34
o46y2P4qxhnI/Cle+2VAlbL4FuHRKsruhwtLxSlLjDTH+EPmLyEnY3NqPnqY
zmoDppD52yExMsmT8hZXgdB/KftcCYws/OvPmnPxlKNOeAaOUN5q6HJ8gXK5
zAkXK8rb5OuUyiDzD0+RgsZeynJTVz4ZUH5S39RDnT89O9yGd7yh3JCL2sFf
9xJJ2pQ/R5TW+VDeeQhyVELm6hqTe48mKCvuTO5+Qtnqi6t/K2Wl2SNB5ZTd
sN1F6nzr+cfOf0qTcnCm2Rn4120FR19RfuSieaiE8q7itfIdlF8aKepMUlYm
lRPtKb9X3KQm+9cx9mwzlCcJEXnqPOrZzRbtSvVjdXWRl3nnrz0q3/P9H8sT
pdk=
          "]]}}, {{}, 
        {GrayLevel[0], PointSize[Large], 
         PointBox[{{8., -5.323457255213671}, {8., -6.533848330579998}, {
          8., -8.430087595093248}}]}, {}}},
      AspectRatio->1,
      Axes->True,
      AxesOrigin->{0, 0},
      BaseStyle->{
       FontFamily -> "Helvetica", FontWeight -> "Bold", FontSize -> 14},
      Frame->True,
      FrameLabel->{
        FormBox["\"Time (arbitrary units)\"", TraditionalForm], 
        FormBox[
        "\"\\!\\(\\*SubscriptBox[\\(Log\\), \\(10\\)]\\)S(t)\"", 
         TraditionalForm]},
      FrameTicks->{{{0, 
          FormBox["0", TraditionalForm]}, {2, 
          FormBox["2", TraditionalForm]}, {4, 
          FormBox["4", TraditionalForm]}, {6, 
          FormBox["6", TraditionalForm]}, {8, 
          FormBox["8", TraditionalForm]}, {10, 
          FormBox["10", TraditionalForm]}}, {{-10, 
          FormBox[
           RowBox[{"-", "10"}], TraditionalForm]}, {-8, 
          FormBox[
           RowBox[{"-", "8"}], TraditionalForm]}, {-6, 
          FormBox[
           RowBox[{"-", "6"}], TraditionalForm]}, {-4, 
          FormBox[
           RowBox[{"-", "4"}], TraditionalForm]}, {-2, 
          FormBox[
           RowBox[{"-", "2"}], TraditionalForm]}, {0, 
          FormBox["0", TraditionalForm]}}, {}, {}},
      ImageSize->Scaled[0.6],
      PlotLabel->FormBox["\"Survival Curves\\nn=1\"", TraditionalForm],
      PlotRange->{{0., 10.}, {-10., 0.5}},
      PlotRangeClipping->True,
      PlotRangePadding->{Automatic, Automatic}], {168., -547.2}, 
     ImageScaled[{0.5, 0.5}], {320., 342.}]}, {}},
  ContentSelectable->True,
  ImageSize->{348., 741.6},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{3.394965380535098*^9, 3.394966847065868*^9}]
}, Open  ]]
}, Open  ]]
},
CellGrouping->Manual,
WindowSize->{635, 727},
WindowMargins->{{1, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{5, 5},
FrontEndVersion->"6.0 for Mac OS X PowerPC (32-bit) (April 20, 2007)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[590, 23, 151, 4, 30, "Text"],
Cell[744, 29, 215, 5, 30, "Text"],
Cell[962, 36, 595, 12, 45, "Text"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1594, 53, 421, 8, 45, "Text"],
Cell[2018, 63, 220, 6, 29, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2275, 74, 244, 7, 28, "Text"],
Cell[2522, 83, 170, 5, 29, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2729, 93, 364, 6, 28, "Text"],
Cell[3096, 101, 608, 20, 31, "Input"],
Cell[3707, 123, 609, 20, 31, "Input"],
Cell[4319, 145, 586, 20, 31, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4942, 170, 603, 11, 45, "Text"],
Cell[CellGroupData[{
Cell[5570, 185, 512, 10, 48, "Input"],
Cell[6085, 197, 816, 14, 22, "Print"]
}, Open  ]],
Cell[CellGroupData[{
Cell[6938, 216, 509, 10, 48, "Input"],
Cell[7450, 228, 805, 14, 22, "Print"]
}, Open  ]],
Cell[CellGroupData[{
Cell[8292, 247, 439, 9, 48, "Input"],
Cell[8734, 258, 801, 14, 22, "Print"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[9584, 278, 175, 3, 28, "Text"],
Cell[9762, 283, 1701, 51, 124, "Input"],
Cell[11466, 336, 1701, 51, 124, "Input"],
Cell[13170, 389, 1702, 51, 124, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[14909, 445, 415, 10, 45, "Text"],
Cell[CellGroupData[{
Cell[15349, 459, 310, 8, 48, "Input"],
Cell[15662, 469, 571, 10, 22, "Print"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16270, 484, 314, 8, 48, "Input"],
Cell[16587, 494, 564, 10, 22, "Print"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17188, 509, 337, 9, 48, "Input"],
Cell[17528, 520, 566, 10, 22, "Print"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[18143, 536, 667, 12, 62, "Text"],
Cell[18813, 550, 82, 2, 29, "Input"],
Cell[CellGroupData[{
Cell[18920, 556, 668, 20, 84, "Input"],
Cell[19591, 578, 639, 11, 29, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[20279, 595, 315, 5, 28, "Text"],
Cell[20597, 602, 82, 2, 29, "Input"],
Cell[CellGroupData[{
Cell[20704, 608, 668, 20, 84, "Input"],
Cell[21375, 630, 630, 11, 29, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[22054, 647, 313, 5, 28, "Text"],
Cell[22370, 654, 82, 2, 29, "Input"],
Cell[CellGroupData[{
Cell[22477, 660, 711, 21, 84, "Input"],
Cell[23191, 683, 651, 11, 29, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[23891, 700, 384, 6, 28, "Text"],
Cell[24278, 708, 2667, 64, 210, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[26982, 777, 501, 10, 28, "Text"],
Cell[27486, 789, 3466, 73, 228, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[30989, 867, 385, 8, 45, "Text"],
Cell[31377, 877, 513, 10, 48, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[31927, 892, 324, 6, 28, "Text"],
Cell[32254, 900, 3252, 76, 266, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[35543, 981, 600, 11, 28, "Text"],
Cell[36146, 994, 3714, 79, 212, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[39897, 1078, 476, 10, 45, "Text"],
Cell[40376, 1090, 574, 11, 48, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[40987, 1106, 504, 10, 28, "Text"],
Cell[CellGroupData[{
Cell[41516, 1120, 532, 11, 29, "Input"],
Cell[42051, 1133, 97071, 1625, 757, "Output"]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)