Visio-SOD.nb

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

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

(* CreatedBy='Mathematica 10.3' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    173608,       3232]
NotebookOptionsPosition[    170475,       3150]
NotebookOutlinePosition[    170810,       3165]
CellTagsIndexPosition[    170767,       3162]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{"SetDirectory", "[", 
  RowBox[{"NotebookDirectory", "[", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.669918316704926*^9, 
  3.6699183233413057`*^9}},ExpressionUUID->"4ac51464-808f-450a-8730-\
3d1b2559e766"],

Cell[BoxData["\<\"/run/media/v.korchagova/Seagate Backup Plus \
Drive/BMSTU/RKDG/IK_code/RKDG1D\"\>"], "Output",
 CellChangeTimes->{
  3.669918324621379*^9, 3.6699183890920663`*^9, 3.6699186455267334`*^9, 
   3.669919059813429*^9, 3.6699198285663996`*^9, 3.6699231837273035`*^9, 
   3.6699240457496085`*^9, 3.669941994739232*^9, 3.6699423146285286`*^9, 
   3.6699423625132675`*^9, 3.670489580039255*^9, 3.6704897303698535`*^9, 
   3.670489938696769*^9, 3.6704900711423445`*^9, 3.6704901784174805`*^9, 
   3.670490488165197*^9, 3.6704906025897417`*^9, 3.6704906626441765`*^9, 
   3.6704912017820134`*^9, 3.6704914433988333`*^9, 3.6704915039022937`*^9, 
   3.670491545205656*^9, 3.6704915870210476`*^9, 3.6704917540696025`*^9, 
   3.670491797814104*^9, 3.67049283240228*^9, 3.670733591765873*^9, 
   3.6707585381124163`*^9, 3.6707608288273907`*^9, 3.6707787995737896`*^9, 
   3.6714737498098345`*^9, 3.671475663467289*^9, 3.6714766937152157`*^9, 
   3.671478381165733*^9, 3.67147862763483*^9, 3.671478774075206*^9, 
   3.6714819239523687`*^9, 3.6714819601834407`*^9, 3.6714827202249126`*^9, 
   3.6714827850606213`*^9, 3.671483146323284*^9, 3.6716336582422037`*^9, 
   3.671634884110319*^9, 3.6716349217904744`*^9, 3.671635650531156*^9, 
   3.671636153443921*^9, 3.671636721837431*^9, 3.671637553469998*^9, 
   3.6716376125043745`*^9, 3.6716377397536526`*^9, 3.67163781418791*^9, 
   3.6716379170507936`*^9, 3.6716380816002054`*^9, 3.6716383554308677`*^9, 
   3.6716394690335617`*^9, 3.6716814894286804`*^9, 3.6716833648589487`*^9, 
   3.6716863330747213`*^9, 3.6716864788610597`*^9, 3.671687088500929*^9, 
   3.6716871299893017`*^9, 3.671687186996563*^9, 3.671687221716549*^9, 
   3.67168772054908*^9, 3.671721342067326*^9, 3.671721815024378*^9, 
   3.671721935802286*^9, 3.6717221039849052`*^9, 3.671727195139103*^9, 
   3.6720376931999245`*^9, 3.6720407810065365`*^9, 3.672042112959959*^9, 
   3.6720434181931086`*^9, 3.6720443884796076`*^9, 3.6720444554504075`*^9, 
   3.6720447803838367`*^9, 3.6720448538744946`*^9, 3.6720809132491565`*^9, 
   3.6720813446958337`*^9, 3.672081385393162*^9, 3.6720815005967507`*^9, 
   3.672082893565424*^9, 3.67208309577999*^9, 3.6720831397555056`*^9, 
   3.672084599318988*^9, 3.6720846361850967`*^9, {3.6720846809776583`*^9, 
   3.672084718446801*^9}, 3.672085285810253*^9, 3.672085452275774*^9, 
   3.6720862578428497`*^9, 3.6720863355702953`*^9, 3.6720864196361036`*^9, 
   3.6726356950431156`*^9, 3.672636416053029*^9, {3.6726364734617653`*^9, 
   3.672636501230121*^9}, 3.6726365360497675`*^9, 3.672638792734994*^9, 
   3.672641344963578*^9, 3.6726413751863956`*^9, 3.67264145844413*^9, 
   3.672641558456371*^9, 3.6726444757575593`*^9, 3.672646285256755*^9, 
   3.672646529311573*^9, 3.672649401312481*^9, 3.672649451595852*^9, {
   3.6726494864856977`*^9, 3.6726495113522573`*^9}, 3.6726495785571084`*^9, 
   3.672649886736902*^9, 3.6726500281206083`*^9, 3.672719660796982*^9, 
   3.672720055966572*^9, 3.6727203408473425`*^9, 3.672720827622513*^9, 
   3.6727209035542893`*^9, 3.6727213240902505`*^9, 3.672726665400969*^9, 
   3.672726793041113*^9, 3.6727328834812517`*^9, 3.6781795808281517`*^9, 
   3.6781801433238306`*^9, 3.678180504083044*^9, 3.678180641884038*^9, 
   3.6781812687189817`*^9, 3.6781818274579983`*^9, 3.6781822235905657`*^9, 
   3.6781828640142765`*^9, 3.6781833643191605`*^9, 3.67818371465189*^9, 
   3.6781838351705956`*^9, 3.6781843170116563`*^9, 3.6781843770926476`*^9, 
   3.6781872793817997`*^9, 3.6781885385979996`*^9, 3.6781886756046534`*^9, 
   3.6781887573501115`*^9, 3.6822429192299886`*^9, 3.6822431261666803`*^9, 
   3.6822433694480057`*^9, 3.6822436471877775`*^9, 3.6822439418952446`*^9, 
   3.6822439913751926`*^9, 3.682244373939445*^9, 3.6822445486329126`*^9, 
   3.682244580063055*^9, 3.6822458162190704`*^9, 3.6822492829485645`*^9, 
   3.6845804096844797`*^9, 3.6845805281771126`*^9, 3.6845807591422386`*^9, 
   3.684581082710058*^9, 3.684581124225916*^9, {3.6845813941032333`*^9, 
   3.684581418051536*^9}, 3.6845814490981216`*^9, 3.684581517511074*^9, 
   3.684581690906034*^9, 3.684582866614552*^9, 3.6845829351543074`*^9, {
   3.6845829717395906`*^9, 3.684583026126071*^9}, 3.684583064693732*^9, 
   3.684583173669511*^9, 3.684583246310629*^9, 3.6845832834887657`*^9, 
   3.684583353289429*^9, {3.684583453685438*^9, 3.684583483312497*^9}, 
   3.6845835183300467`*^9, 3.684583595886809*^9, 3.68458365217666*^9, {
   3.6845836859536915`*^9, 3.684583730776513*^9}, 3.6846612136941233`*^9, 
   3.6846656391237364`*^9, 3.684665681290807*^9, 3.684665841065987*^9, 
   3.6846661542528286`*^9, 3.68466684835867*^9, 3.6846669662878485`*^9, 
   3.684667086623056*^9, {3.6847760354138575`*^9, 3.6847761211277604`*^9}, 
   3.684776186816518*^9, {3.684777129258422*^9, 3.6847771860806723`*^9}, {
   3.6847790781368914`*^9, 3.6847790935867753`*^9}, 3.6847814666965094`*^9, 
   3.684782677736777*^9, 3.684783598889464*^9, 3.6847851037115345`*^9, 
   3.684785359374158*^9, 3.684788163624552*^9, 3.684789388269597*^9, 
   3.6847894280648737`*^9, 3.6848181625506716`*^9, 3.6848182141833324`*^9, 
   3.6848182633800073`*^9, 3.6848183634932823`*^9, 3.68482026709009*^9, 
   3.6848203766435647`*^9, 3.6848204804064026`*^9, 3.6848205559022303`*^9, 
   3.6848206617746797`*^9, 3.684820882992185*^9, 3.684820959696402*^9, {
   3.684821006698599*^9, 3.684821031205885*^9}, 3.684821070361472*^9, 
   3.6848211015458717`*^9, 3.684821132418272*^9, 3.684821199825872*^9, 
   3.684821341395872*^9, 3.6849419910269423`*^9, 3.68506719266574*^9, 
   3.690687944330942*^9, 3.690688300581192*^9, 3.690688349464738*^9, {
   3.6906883992576466`*^9, 3.690688422464926*^9}, {3.6906884657702413`*^9, 
   3.6906885086513867`*^9}, 3.690688728967427*^9, 3.6906887941884685`*^9, 
   3.6906888844534388`*^9, 3.6906889274307365`*^9, 3.6906889717751703`*^9, 
   3.6906890119571877`*^9, 3.6906890594789395`*^9, {3.690689096272619*^9, 
   3.6906891164806395`*^9}, 3.6906981920172367`*^9, 3.6906982572002707`*^9, 
   3.6906987256842575`*^9, 3.69070111763666*^9, 3.6907013537854834`*^9, 
   3.690701420099372*^9, 3.6907017328472443`*^9, 3.6907029800951767`*^9, 
   3.6907030502082043`*^9, 3.6907030987897744`*^9, 3.690703163185087*^9, 
   3.6907033617556405`*^9, 3.690703435662806*^9, 3.6907081907299414`*^9, 
   3.690709693136528*^9, 3.6907099210921736`*^9, 3.6907101454823112`*^9, 
   3.690710399069178*^9, 3.690710451915462*^9, 3.690710506490919*^9, 
   3.690743559907817*^9, 3.6907436030882864`*^9, 3.6907448228850546`*^9, 
   3.690745260638093*^9, 3.6907457069426203`*^9, 3.6907458597623606`*^9, 
   3.691303666487562*^9, 3.691304117149755*^9, 3.6913043289634466`*^9, 
   3.6913045295944395`*^9, 3.6913046214754763`*^9, 3.6913046748847218`*^9, 
   3.691304899235722*^9, 3.691305669401402*^9, 3.6913188621126947`*^9, 
   3.6913189703593397`*^9, 3.6913190211604977`*^9, {3.6913190825097656`*^9, 
   3.69131910133553*^9}, 3.6913193750592637`*^9, {3.691319507773801*^9, 
   3.691319536208487*^9}, 3.693297156059641*^9, 3.69329726180505*^9, 
   3.693298255817523*^9, 3.693299708322379*^9, 3.6933101071796293`*^9, 
   3.6933104794717317`*^9, 3.693310869420681*^9, 3.693311453179756*^9, 
   3.693312106272626*^9, 3.693312309979719*^9, 3.694761759025447*^9, 
   3.6948653559350586`*^9, 3.694935684185026*^9, 3.694945520976152*^9, 
   3.695966976838907*^9, 3.695967250382845*^9, 3.695968224557116*^9, 
   3.696312906605833*^9, 3.696313941623442*^9, 3.696572611555287*^9, 
   3.6966463651891203`*^9, 3.6971109324538813`*^9, 3.7015254545555077`*^9, 
   3.702901985631571*^9, 3.7029023352481914`*^9, 3.702914014191622*^9, 
   3.7038293638143053`*^9, 3.703882032269373*^9, 3.7049631456092663`*^9, 
   3.704965013977288*^9, 3.7049667673196106`*^9, 3.7050336070128965`*^9, 
   3.7053518536254225`*^9, 3.705357320723464*^9, 3.7053585681144314`*^9, 
   3.7055910259482574`*^9, 3.705999272154393*^9, 3.706225566984624*^9, 
   3.7165436068289223`*^9, 3.716543715779397*^9, {3.7165437558484907`*^9, 
   3.716543783228559*^9}, 3.716543834378427*^9, 3.716543897579117*^9, {
   3.716552041806097*^9, 3.7165520538527527`*^9}, 3.7165521284249907`*^9, 
   3.716552176509163*^9, 3.7165528799810457`*^9, 
   3.71655305519631*^9},ExpressionUUID->"47f8ade1-2881-4e17-a4f4-\
5c33ff5a31d8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"Data", " ", "=", " ", 
   RowBox[{"Import", "[", 
    RowBox[{"\"\<telefile.txt\>\"", ",", "\"\<Table\>\""}], "]"}]}], 
  ";"}], "\n", 
 RowBox[{
  RowBox[{"nx", " ", "=", " ", 
   RowBox[{"Data", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"hx", " ", "=", " ", 
   RowBox[{"Data", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "4"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tau", " ", "=", " ", 
   RowBox[{"Data", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "6"}], "]"}], "]"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"deltacnt", "=", 
   RowBox[{"Data", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "8"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"nshape", " ", "=", " ", 
  RowBox[{"Data", "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "10"}], "]"}], "]"}]}], "\n", 
 RowBox[{
  RowBox[{"xcnt", " ", "=", " ", 
   RowBox[{"Data", "[", 
    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\n", 
 RowBox[{"nsteps", "=", 
  RowBox[{
   RowBox[{"Length", "[", "Data", "]"}], "-", "2"}]}], "\n", 
 RowBox[{
  RowBox[{"His", " ", "=", " ", 
   RowBox[{"Data", "[", 
    RowBox[{"[", 
     RowBox[{"3", ";;"}], "]"}], "]"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"PlotDGfile", "[", 
     RowBox[{"q_", ",", "t_", ",", "diap_"}], "]"}], ":=", 
    RowBox[{"Module", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"H", ",", "sl", ",", "sr", ",", "otr"}], "}"}], ",", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"H", "=", 
        RowBox[{"Partition", "[", 
         RowBox[{
          RowBox[{"His", "[", 
           RowBox[{"[", "t", "]"}], "]"}], ",", 
          FractionBox[
           RowBox[{
            RowBox[{"Dimensions", "[", "His", "]"}], "[", 
            RowBox[{"[", "2", "]"}], "]"}], "nx"]}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"sl", "=", 
        RowBox[{"Sum", "[", 
         RowBox[{
          RowBox[{
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"-", "1"}], ")"}], 
            RowBox[{"nshape", "-", "1", "-", "s"}]], 
           RowBox[{"H", "[", 
            RowBox[{"[", 
             RowBox[{"All", ",", 
              RowBox[{
               RowBox[{"nshape", " ", "q"}], "-", "s"}]}], "]"}], "]"}]}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"s", ",", "0", ",", 
            RowBox[{"nshape", "-", "1"}]}], "}"}]}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"sr", "=", 
        RowBox[{"Sum", "[", 
         RowBox[{
          RowBox[{"H", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", 
             RowBox[{
              RowBox[{"nshape", " ", "q"}], "-", "s"}]}], "]"}], "]"}], ",", 
          RowBox[{"{", 
           RowBox[{"s", ",", "0", ",", 
            RowBox[{"nshape", "-", "1"}]}], "}"}]}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"Print", "[", 
          RowBox[{
           RowBox[{"ToString", "[", "sl", "]"}], "<>", "\"\< \>\"", "<>", 
           RowBox[{"ToString", "[", "sr", "]"}]}], "]"}], ";"}], "*)"}], 
       "\[IndentingNewLine]", 
       RowBox[{"otr", "=", 
        RowBox[{"Table", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{
               RowBox[{"xcnt", "[", 
                RowBox[{"[", "i", "]"}], "]"}], "-", 
               FractionBox["hx", "2"]}], ",", 
              RowBox[{"sl", "[", 
               RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{
               RowBox[{"xcnt", "[", 
                RowBox[{"[", "i", "]"}], "]"}], "+", 
               FractionBox["hx", "2"]}], ",", 
              RowBox[{"sr", "[", 
               RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"i", ",", "1", ",", "nx"}], "}"}]}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"ListLinePlot", "[", 
        RowBox[{"otr", ",", 
         RowBox[{"PlotRange", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"diap", "[", 
             RowBox[{"[", "1", "]"}], "]"}], ",", 
            RowBox[{"diap", "[", 
             RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"Directive", "[", 
           RowBox[{"{", "Thick", "}"}], "]"}]}], ",", 
         RowBox[{"AxesStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Directive", "[", "16", "]"}], ",", "Thick"}], "}"}], 
            ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Directive", "[", "16", "]"}], ",", "Thick"}], "}"}]}], 
           "}"}]}], ",", 
         RowBox[{"AxesOrigin", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"0", ",", 
            RowBox[{"-", "0.1"}]}], "}"}]}]}], "]"}]}]}], "]"}]}], ";"}], 
  "\n", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "\:0412\:043e\:0441\:0441\:0442\:0430\:043d\:043e\:0432\:043b\:0435\:043d\
\:043d\:043e\:0435", " ", "\:0440\:0435\:0448\:0435\:043d\:0438\:0435"}], " ",
     "-", " ", "\:043a\:0443\:0441\:043e\:0447\:043d\:043e", "-", 
    "\:043b\:0438\:043d\:0435\:0439\:043d\:043e\:0435"}], "*)"}]}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{"numsollin", "[", 
    RowBox[{"q_", ",", "x_", ",", "t_"}], "]"}], ":=", 
   RowBox[{"Module", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "H", ",", "u", ",", "v", ",", "w", ",", "cell", ",", "sl", ",", "sr", 
       ",", "otr"}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"H", "=", 
       RowBox[{"Partition", "[", 
        RowBox[{
         RowBox[{"His", "[", 
          RowBox[{"[", "t", "]"}], "]"}], ",", 
         FractionBox[
          RowBox[{
           RowBox[{"Dimensions", "[", "His", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "nx"]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"u", "=", 
       RowBox[{"H", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", 
          RowBox[{
           RowBox[{"nshape", 
            RowBox[{"(", 
             RowBox[{"q", "-", "1"}], ")"}]}], "+", "1"}]}], "]"}], "]"}]}], 
      ";", "\[IndentingNewLine]", 
      RowBox[{"v", "=", 
       RowBox[{"H", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", 
          RowBox[{
           RowBox[{"nshape", 
            RowBox[{"(", 
             RowBox[{"q", "-", "1"}], ")"}]}], "+", "2"}]}], "]"}], "]"}]}], 
      ";", "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"nshape", "\[Equal]", "3"}], ",", 
        RowBox[{"w", "=", 
         RowBox[{"H", "[", 
          RowBox[{"[", 
           RowBox[{"All", ",", 
            RowBox[{
             RowBox[{"nshape", 
              RowBox[{"(", 
               RowBox[{"q", "-", "1"}], ")"}]}], "+", "nshape"}]}], "]"}], 
          "]"}]}], ",", 
        RowBox[{"w", "=", 
         RowBox[{"0", " ", 
          RowBox[{"H", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", 
             RowBox[{
              RowBox[{"nshape", 
               RowBox[{"(", 
                RowBox[{"q", "-", "1"}], ")"}]}], "+", "nshape"}]}], "]"}], 
           "]"}]}]}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"cell", "=", 
       RowBox[{
        RowBox[{"Floor", "[", 
         RowBox[{"x", "/", "hx"}], "]"}], "+", "1"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"u", "[", 
        RowBox[{"[", "cell", "]"}], "]"}], "+", 
       RowBox[{
        FractionBox[
         RowBox[{"(", 
          RowBox[{"x", "-", 
           RowBox[{"hx", 
            RowBox[{"(", 
             RowBox[{"cell", "-", 
              FractionBox["1", "2"]}], ")"}]}]}], ")"}], 
         RowBox[{"hx", "/", "2"}]], 
        RowBox[{"v", "[", 
         RowBox[{"[", "cell", "]"}], "]"}]}], "+", 
       RowBox[{"0", 
        RowBox[{"(", 
         RowBox[{
          FractionBox[
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"x", "-", 
              RowBox[{"hx", 
               RowBox[{"(", 
                RowBox[{"cell", "-", 
                 FractionBox["1", "2"]}], ")"}]}]}], ")"}], "2"], 
           RowBox[{
            SuperscriptBox["hx", "2"], "/", "6"}]], "-", 
          FractionBox["1", "2"]}], ")"}], 
        RowBox[{"w", "[", 
         RowBox[{"[", "cell", "]"}], "]"}]}]}]}]}], "\[IndentingNewLine]", 
    "]"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{"numsol", "[", 
    RowBox[{"q_", ",", "x_", ",", "t_"}], "]"}], ":=", 
   RowBox[{"Module", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "H", ",", "u", ",", "v", ",", "w", ",", "cell", ",", "sl", ",", "sr", 
       ",", "otr"}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"H", "=", 
       RowBox[{"Partition", "[", 
        RowBox[{
         RowBox[{"His", "[", 
          RowBox[{"[", "t", "]"}], "]"}], ",", 
         FractionBox[
          RowBox[{
           RowBox[{"Dimensions", "[", "His", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "nx"]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"u", "=", 
       RowBox[{"H", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", 
          RowBox[{
           RowBox[{"nshape", 
            RowBox[{"(", 
             RowBox[{"q", "-", "1"}], ")"}]}], "+", "1"}]}], "]"}], "]"}]}], 
      ";", "\[IndentingNewLine]", 
      RowBox[{"v", "=", 
       RowBox[{"H", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", 
          RowBox[{
           RowBox[{"nshape", 
            RowBox[{"(", 
             RowBox[{"q", "-", "1"}], ")"}]}], "+", "2"}]}], "]"}], "]"}]}], 
      ";", "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"nshape", "\[Equal]", "3"}], ",", 
        RowBox[{"w", "=", 
         RowBox[{"H", "[", 
          RowBox[{"[", 
           RowBox[{"All", ",", 
            RowBox[{
             RowBox[{"nshape", 
              RowBox[{"(", 
               RowBox[{"q", "-", "1"}], ")"}]}], "+", "nshape"}]}], "]"}], 
          "]"}]}], ",", 
        RowBox[{"w", "=", 
         RowBox[{"0", " ", 
          RowBox[{"H", "[", 
           RowBox[{"[", 
            RowBox[{"All", ",", 
             RowBox[{
              RowBox[{"nshape", 
               RowBox[{"(", 
                RowBox[{"q", "-", "1"}], ")"}]}], "+", "nshape"}]}], "]"}], 
           "]"}]}]}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"cell", "=", 
       RowBox[{
        RowBox[{"Floor", "[", 
         RowBox[{"x", "/", "hx"}], "]"}], "+", "1"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"u", "[", 
        RowBox[{"[", "cell", "]"}], "]"}], "+", 
       RowBox[{
        FractionBox[
         RowBox[{"(", 
          RowBox[{"x", "-", 
           RowBox[{"hx", 
            RowBox[{"(", 
             RowBox[{"cell", "-", 
              FractionBox["1", "2"]}], ")"}]}]}], ")"}], 
         RowBox[{"hx", "/", "2"}]], 
        RowBox[{"v", "[", 
         RowBox[{"[", "cell", "]"}], "]"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          FractionBox[
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"x", "-", 
              RowBox[{"hx", 
               RowBox[{"(", 
                RowBox[{"cell", "-", 
                 FractionBox["1", "2"]}], ")"}]}]}], ")"}], "2"], 
           RowBox[{
            SuperscriptBox["hx", "2"], "/", "6"}]], "-", 
          FractionBox["1", "2"]}], ")"}], 
        RowBox[{"w", "[", 
         RowBox[{"[", "cell", "]"}], "]"}]}]}]}]}], "\[IndentingNewLine]", 
    "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.6699183264744844`*^9, 3.669918347076663*^9}, {
  3.6947617815404634`*^9, 3.694761814812092*^9}, {3.6949441277687287`*^9, 
  3.694944131545414*^9}, {3.6949458817555537`*^9, 3.6949458893409424`*^9}, {
  3.7029388728778276`*^9, 3.7029388736590815`*^9}, {3.7045260123667088`*^9, 
  3.704526013075212*^9}, {3.704963174312654*^9, 3.704963174831028*^9}, {
  3.7053579924475775`*^9, 
  3.705357994028683*^9}},ExpressionUUID->"5b183156-5448-4109-918e-\
f244b7a47153"],

Cell[BoxData["3"], "Output",
 CellChangeTimes->{{3.694761799025874*^9, 3.6947618196815543`*^9}, 
   3.6947620030088415`*^9, 3.69476215726947*^9, 3.694865074381962*^9, 
   3.694865359226396*^9, 3.6949356881318164`*^9, 3.6949362353857408`*^9, 
   3.6949364497300715`*^9, 3.6949403341256495`*^9, 3.6949404049079523`*^9, 
   3.6949404756972632`*^9, 3.694940526104085*^9, 3.6949405827423363`*^9, 
   3.694940694242578*^9, 3.694940822976068*^9, 3.694942408688008*^9, 
   3.6949424837033243`*^9, 3.6949425839955945`*^9, 3.6949426848522716`*^9, {
   3.6949427890092945`*^9, 3.6949427953768196`*^9}, 3.6949435832447443`*^9, 
   3.694943981485768*^9, 3.694944057591855*^9, 3.694944136013589*^9, 
   3.694944255191286*^9, 3.694944556813644*^9, 3.694945389667541*^9, 
   3.6949455258355885`*^9, 3.694945589109557*^9, 3.6949456446019936`*^9, 
   3.694945688447152*^9, 3.6949458318230476`*^9, 3.694945890505752*^9, 
   3.694946004620852*^9, {3.694946046453582*^9, 3.69494606893656*^9}, 
   3.694946102991763*^9, 3.6959669802139397`*^9, 3.6959671945551157`*^9, 
   3.695968240338876*^9, 3.696312949168794*^9, 3.6963139469778013`*^9, 
   3.6963141336857104`*^9, 3.696314246865906*^9, 3.6963143584654827`*^9, 
   3.696572636869007*^9, 3.696637691501759*^9, 3.6966378778268547`*^9, 
   3.696637973862893*^9, 3.696638857439565*^9, {3.6966463618288636`*^9, 
   3.6966463668572044`*^9}, 3.6966545454837265`*^9, 3.6966546751436963`*^9, 
   3.6966548220757165`*^9, 3.6966548599823017`*^9, 3.6966550414945745`*^9, 
   3.696655324313429*^9, 3.6966555461305037`*^9, 3.6966557043228464`*^9, 
   3.696667073734584*^9, 3.6966674004913435`*^9, 3.6966676152077007`*^9, 
   3.696667717552846*^9, 3.6966680535516725`*^9, 3.69666852543235*^9, {
   3.696668573403612*^9, 3.6966685986493287`*^9}, 3.6966687743115172`*^9, 
   3.696668903711506*^9, 3.6966691618064957`*^9, 3.696669698901623*^9, 
   3.6966698873424363`*^9, 3.6966699690481606`*^9, 3.6966700137391987`*^9, 
   3.6966700634145765`*^9, 3.696670613179714*^9, 3.696670763074579*^9, 
   3.6971109357781086`*^9, 3.6971111158815765`*^9, 3.6971112467504735`*^9, 
   3.697111669880378*^9, 3.697112176372035*^9, 3.7015254657059345`*^9, 
   3.7029019888510613`*^9, 3.7029020245671377`*^9, 3.70290213279194*^9, 
   3.702902299633201*^9, 3.7029023369264917`*^9, 3.7029024445108604`*^9, 
   3.7029025208829246`*^9, {3.7029025579755898`*^9, 3.7029025867087307`*^9}, 
   3.702902775083962*^9, 3.7029127226673994`*^9, {3.7029140108512588`*^9, 
   3.7029140168795843`*^9}, 3.702914096942294*^9, 3.702914275550105*^9, 
   3.702914341123105*^9, 3.702914439668206*^9, 3.7029145029839854`*^9, 
   3.7029145604612975`*^9, 3.7029157196592155`*^9, 3.70293887683179*^9, 
   3.7029389814986515`*^9, 3.7029391405034285`*^9, 3.702939424622772*^9, 
   3.702939765831732*^9, 3.7029403374930587`*^9, 3.7029404177131863`*^9, 
   3.7029405496872745`*^9, 3.702940791027217*^9, 3.7029410739598527`*^9, 
   3.7029750633595743`*^9, 3.703829365658081*^9, 3.7038297270738487`*^9, 
   3.7038297680626097`*^9, 3.70382982254936*^9, 3.703829989743739*^9, 
   3.7038302932617693`*^9, 3.7038308923000207`*^9, 3.70383102146551*^9, 
   3.7038311723111925`*^9, 3.7038312347472057`*^9, 3.703831384188266*^9, 
   3.703831432407628*^9, 3.703831489576618*^9, 3.7038351581147747`*^9, 
   3.7038352284485264`*^9, 3.7038352874649043`*^9, 3.7038353532458115`*^9, 
   3.7038354900005317`*^9, 3.7038355658289247`*^9, 3.7038356439795785`*^9, 
   3.703835710792919*^9, 3.703835835696487*^9, 3.7038360255651007`*^9, 
   3.7038360993818746`*^9, 3.7038365755774097`*^9, 3.7038371471057005`*^9, 
   3.703837598772865*^9, 3.7038389063486686`*^9, 3.7038617241921225`*^9, 
   3.7038631735535026`*^9, 3.70386327462133*^9, {3.703882027731588*^9, 
   3.703882033899849*^9}, 3.703882121021566*^9, 3.7038823873738923`*^9, 
   3.7038824701549*^9, 3.7038854813897777`*^9, 3.7038860042785287`*^9, 
   3.7038882886981916`*^9, 3.7038884019468713`*^9, 3.7038884354003897`*^9, 
   3.70388850859566*^9, 3.704170414173745*^9, 3.704170722809621*^9, 
   3.7041708971096325`*^9, 3.7041726293637085`*^9, 3.704426938469243*^9, 
   3.7044270733736577`*^9, 3.704427185740593*^9, 3.7044272796395226`*^9, 
   3.7044274874930573`*^9, 3.704440925320387*^9, 3.7044411132371473`*^9, 
   3.7044413712780867`*^9, 3.7044418678648105`*^9, 3.7044491779966164`*^9, 
   3.704513583195146*^9, 3.704513849270129*^9, 3.7045140202425575`*^9, 
   3.7045143142884064`*^9, 3.704514529445223*^9, 3.7045145887743597`*^9, 
   3.7045146460550456`*^9, 3.704514726230991*^9, 3.704514840789357*^9, 
   3.7045148716993084`*^9, 3.704514908140191*^9, 3.704515265758192*^9, 
   3.70451563750823*^9, 3.7045156733006516`*^9, 3.704515818407716*^9, 
   3.704516069273895*^9, {3.7045163379527254`*^9, 3.7045163649188795`*^9}, 
   3.704516565361245*^9, 3.7045167070148554`*^9, 3.7045236179768286`*^9, 
   3.7045236942800245`*^9, 3.704523995238781*^9, 3.7045240499726562`*^9, 
   3.7045241025379953`*^9, 3.704524238449524*^9, 3.7045256358652964`*^9, 
   3.70452609350834*^9, 3.7049633873749847`*^9, 3.7049634927928567`*^9, 
   3.7049636687067995`*^9, 3.7049645290808897`*^9, 3.7049650149589834`*^9, 
   3.7049651677735214`*^9, 3.704966777253667*^9, 3.7049669304034443`*^9, 
   3.7049675591570177`*^9, 3.704971271139476*^9, 3.7050336091113853`*^9, 
   3.705033837270441*^9, 3.7053518558289876`*^9, 3.705352408385443*^9, 
   3.7053535492637587`*^9, 3.705354485294591*^9, 3.7053547663071737`*^9, 
   3.7053548379750757`*^9, 3.70535532484988*^9, 3.7053554374958878`*^9, 
   3.7053560599119625`*^9, 3.7053567499971013`*^9, 3.7053569545974197`*^9, 
   3.70535699730075*^9, {3.7053570832507954`*^9, 3.705357113052963*^9}, 
   3.7053571646546135`*^9, 3.7053572064102707`*^9, {3.705357316331343*^9, 
   3.7053573215340567`*^9}, 3.705357368373306*^9, 3.7053574994444*^9, 
   3.705357611919286*^9, 3.705357997172934*^9, 3.7053581664471426`*^9, 
   3.705358459264118*^9, 3.7053593892586546`*^9, 3.7053767576729*^9, 
   3.705377129925297*^9, 3.7053814005764413`*^9, 3.7055910819310074`*^9, 
   3.705999276122208*^9, 3.7059994386847386`*^9, 3.7059995061036525`*^9, 
   3.7059995774143333`*^9, 3.7060000148532124`*^9, 3.7062255738995104`*^9, 
   3.716543607441601*^9, 3.71654371614924*^9, {3.7165437563357353`*^9, 
   3.716543783713189*^9}, 3.716543834725276*^9, 3.7165438979399548`*^9, {
   3.716552042319249*^9, 3.716552054300879*^9}, 3.71655212892889*^9, 
   3.7165521771183367`*^9, 3.7165528817947607`*^9, 
   3.716553057021512*^9},ExpressionUUID->"a3e139be-c12e-49db-8c2f-\
ddbaea43f00d"],

Cell[BoxData["401"], "Output",
 CellChangeTimes->{{3.694761799025874*^9, 3.6947618196815543`*^9}, 
   3.6947620030088415`*^9, 3.69476215726947*^9, 3.694865074381962*^9, 
   3.694865359226396*^9, 3.6949356881318164`*^9, 3.6949362353857408`*^9, 
   3.6949364497300715`*^9, 3.6949403341256495`*^9, 3.6949404049079523`*^9, 
   3.6949404756972632`*^9, 3.694940526104085*^9, 3.6949405827423363`*^9, 
   3.694940694242578*^9, 3.694940822976068*^9, 3.694942408688008*^9, 
   3.6949424837033243`*^9, 3.6949425839955945`*^9, 3.6949426848522716`*^9, {
   3.6949427890092945`*^9, 3.6949427953768196`*^9}, 3.6949435832447443`*^9, 
   3.694943981485768*^9, 3.694944057591855*^9, 3.694944136013589*^9, 
   3.694944255191286*^9, 3.694944556813644*^9, 3.694945389667541*^9, 
   3.6949455258355885`*^9, 3.694945589109557*^9, 3.6949456446019936`*^9, 
   3.694945688447152*^9, 3.6949458318230476`*^9, 3.694945890505752*^9, 
   3.694946004620852*^9, {3.694946046453582*^9, 3.69494606893656*^9}, 
   3.694946102991763*^9, 3.6959669802139397`*^9, 3.6959671945551157`*^9, 
   3.695968240338876*^9, 3.696312949168794*^9, 3.6963139469778013`*^9, 
   3.6963141336857104`*^9, 3.696314246865906*^9, 3.6963143584654827`*^9, 
   3.696572636869007*^9, 3.696637691501759*^9, 3.6966378778268547`*^9, 
   3.696637973862893*^9, 3.696638857439565*^9, {3.6966463618288636`*^9, 
   3.6966463668572044`*^9}, 3.6966545454837265`*^9, 3.6966546751436963`*^9, 
   3.6966548220757165`*^9, 3.6966548599823017`*^9, 3.6966550414945745`*^9, 
   3.696655324313429*^9, 3.6966555461305037`*^9, 3.6966557043228464`*^9, 
   3.696667073734584*^9, 3.6966674004913435`*^9, 3.6966676152077007`*^9, 
   3.696667717552846*^9, 3.6966680535516725`*^9, 3.69666852543235*^9, {
   3.696668573403612*^9, 3.6966685986493287`*^9}, 3.6966687743115172`*^9, 
   3.696668903711506*^9, 3.6966691618064957`*^9, 3.696669698901623*^9, 
   3.6966698873424363`*^9, 3.6966699690481606`*^9, 3.6966700137391987`*^9, 
   3.6966700634145765`*^9, 3.696670613179714*^9, 3.696670763074579*^9, 
   3.6971109357781086`*^9, 3.6971111158815765`*^9, 3.6971112467504735`*^9, 
   3.697111669880378*^9, 3.697112176372035*^9, 3.7015254657059345`*^9, 
   3.7029019888510613`*^9, 3.7029020245671377`*^9, 3.70290213279194*^9, 
   3.702902299633201*^9, 3.7029023369264917`*^9, 3.7029024445108604`*^9, 
   3.7029025208829246`*^9, {3.7029025579755898`*^9, 3.7029025867087307`*^9}, 
   3.702902775083962*^9, 3.7029127226673994`*^9, {3.7029140108512588`*^9, 
   3.7029140168795843`*^9}, 3.702914096942294*^9, 3.702914275550105*^9, 
   3.702914341123105*^9, 3.702914439668206*^9, 3.7029145029839854`*^9, 
   3.7029145604612975`*^9, 3.7029157196592155`*^9, 3.70293887683179*^9, 
   3.7029389814986515`*^9, 3.7029391405034285`*^9, 3.702939424622772*^9, 
   3.702939765831732*^9, 3.7029403374930587`*^9, 3.7029404177131863`*^9, 
   3.7029405496872745`*^9, 3.702940791027217*^9, 3.7029410739598527`*^9, 
   3.7029750633595743`*^9, 3.703829365658081*^9, 3.7038297270738487`*^9, 
   3.7038297680626097`*^9, 3.70382982254936*^9, 3.703829989743739*^9, 
   3.7038302932617693`*^9, 3.7038308923000207`*^9, 3.70383102146551*^9, 
   3.7038311723111925`*^9, 3.7038312347472057`*^9, 3.703831384188266*^9, 
   3.703831432407628*^9, 3.703831489576618*^9, 3.7038351581147747`*^9, 
   3.7038352284485264`*^9, 3.7038352874649043`*^9, 3.7038353532458115`*^9, 
   3.7038354900005317`*^9, 3.7038355658289247`*^9, 3.7038356439795785`*^9, 
   3.703835710792919*^9, 3.703835835696487*^9, 3.7038360255651007`*^9, 
   3.7038360993818746`*^9, 3.7038365755774097`*^9, 3.7038371471057005`*^9, 
   3.703837598772865*^9, 3.7038389063486686`*^9, 3.7038617241921225`*^9, 
   3.7038631735535026`*^9, 3.70386327462133*^9, {3.703882027731588*^9, 
   3.703882033899849*^9}, 3.703882121021566*^9, 3.7038823873738923`*^9, 
   3.7038824701549*^9, 3.7038854813897777`*^9, 3.7038860042785287`*^9, 
   3.7038882886981916`*^9, 3.7038884019468713`*^9, 3.7038884354003897`*^9, 
   3.70388850859566*^9, 3.704170414173745*^9, 3.704170722809621*^9, 
   3.7041708971096325`*^9, 3.7041726293637085`*^9, 3.704426938469243*^9, 
   3.7044270733736577`*^9, 3.704427185740593*^9, 3.7044272796395226`*^9, 
   3.7044274874930573`*^9, 3.704440925320387*^9, 3.7044411132371473`*^9, 
   3.7044413712780867`*^9, 3.7044418678648105`*^9, 3.7044491779966164`*^9, 
   3.704513583195146*^9, 3.704513849270129*^9, 3.7045140202425575`*^9, 
   3.7045143142884064`*^9, 3.704514529445223*^9, 3.7045145887743597`*^9, 
   3.7045146460550456`*^9, 3.704514726230991*^9, 3.704514840789357*^9, 
   3.7045148716993084`*^9, 3.704514908140191*^9, 3.704515265758192*^9, 
   3.70451563750823*^9, 3.7045156733006516`*^9, 3.704515818407716*^9, 
   3.704516069273895*^9, {3.7045163379527254`*^9, 3.7045163649188795`*^9}, 
   3.704516565361245*^9, 3.7045167070148554`*^9, 3.7045236179768286`*^9, 
   3.7045236942800245`*^9, 3.704523995238781*^9, 3.7045240499726562`*^9, 
   3.7045241025379953`*^9, 3.704524238449524*^9, 3.7045256358652964`*^9, 
   3.70452609350834*^9, 3.7049633873749847`*^9, 3.7049634927928567`*^9, 
   3.7049636687067995`*^9, 3.7049645290808897`*^9, 3.7049650149589834`*^9, 
   3.7049651677735214`*^9, 3.704966777253667*^9, 3.7049669304034443`*^9, 
   3.7049675591570177`*^9, 3.704971271139476*^9, 3.7050336091113853`*^9, 
   3.705033837270441*^9, 3.7053518558289876`*^9, 3.705352408385443*^9, 
   3.7053535492637587`*^9, 3.705354485294591*^9, 3.7053547663071737`*^9, 
   3.7053548379750757`*^9, 3.70535532484988*^9, 3.7053554374958878`*^9, 
   3.7053560599119625`*^9, 3.7053567499971013`*^9, 3.7053569545974197`*^9, 
   3.70535699730075*^9, {3.7053570832507954`*^9, 3.705357113052963*^9}, 
   3.7053571646546135`*^9, 3.7053572064102707`*^9, {3.705357316331343*^9, 
   3.7053573215340567`*^9}, 3.705357368373306*^9, 3.7053574994444*^9, 
   3.705357611919286*^9, 3.705357997172934*^9, 3.7053581664471426`*^9, 
   3.705358459264118*^9, 3.7053593892586546`*^9, 3.7053767576729*^9, 
   3.705377129925297*^9, 3.7053814005764413`*^9, 3.7055910819310074`*^9, 
   3.705999276122208*^9, 3.7059994386847386`*^9, 3.7059995061036525`*^9, 
   3.7059995774143333`*^9, 3.7060000148532124`*^9, 3.7062255738995104`*^9, 
   3.716543607441601*^9, 3.71654371614924*^9, {3.7165437563357353`*^9, 
   3.716543783713189*^9}, 3.716543834725276*^9, 3.7165438979399548`*^9, {
   3.716552042319249*^9, 3.716552054300879*^9}, 3.71655212892889*^9, 
   3.7165521771183367`*^9, 3.7165528817947607`*^9, 
   3.7165530570228*^9},ExpressionUUID->"8cea844d-a8b3-4d5b-ad85-b9f14037795c"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"numsolListPlot", "[", 
    RowBox[{"q_", ",", "t_"}], "]"}], ":=", 
   RowBox[{"Module", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "H", ",", "u", ",", "v", ",", "w", ",", "cell", ",", "sl", ",", "sr", 
       ",", "otr", ",", "i"}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"H", "=", 
       RowBox[{"Partition", "[", 
        RowBox[{
         RowBox[{"His", "[", 
          RowBox[{"[", "t", "]"}], "]"}], ",", 
         FractionBox[
          RowBox[{
           RowBox[{"Dimensions", "[", "His", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "nx"]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"u", "=", 
       RowBox[{"H", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", 
          RowBox[{
           RowBox[{"nshape", 
            RowBox[{"(", 
             RowBox[{"q", "-", "1"}], ")"}]}], "+", "1"}]}], "]"}], "]"}]}], 
      ";", "\[IndentingNewLine]", 
      RowBox[{"(*", 
       RowBox[{
        RowBox[{"v", "=", 
         RowBox[{"H", "[", 
          RowBox[{"[", 
           RowBox[{"All", ",", 
            RowBox[{
             RowBox[{"nshape", 
              RowBox[{"(", 
               RowBox[{"q", "-", "1"}], ")"}]}], "+", "2"}]}], "]"}], "]"}]}],
         ";", "\[IndentingNewLine]", 
        RowBox[{"If", "[", 
         RowBox[{
          RowBox[{"nshape", "\[Equal]", "3"}], ",", 
          RowBox[{"w", "=", 
           RowBox[{"H", "[", 
            RowBox[{"[", 
             RowBox[{"All", ",", 
              RowBox[{
               RowBox[{"nshape", 
                RowBox[{"(", 
                 RowBox[{"q", "-", "1"}], ")"}]}], "+", "nshape"}]}], "]"}], 
            "]"}]}], ",", 
          RowBox[{"w", "=", 
           RowBox[{"0", " ", 
            RowBox[{"H", "[", 
             RowBox[{"[", 
              RowBox[{"All", ",", 
               RowBox[{
                RowBox[{"nshape", 
                 RowBox[{"(", 
                  RowBox[{"q", "-", "1"}], ")"}]}], "+", "nshape"}]}], "]"}], 
             "]"}]}]}]}], "]"}], ";"}], "*)"}], "\[IndentingNewLine]", 
      RowBox[{"ListPlot", "[", 
       RowBox[{
        RowBox[{"Table", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"hx", 
             RowBox[{"(", 
              RowBox[{"i", "-", 
               FractionBox["1", "2"]}], ")"}]}], ",", 
            RowBox[{"u", "[", 
             RowBox[{"[", "i", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"i", ",", "1", ",", 
            RowBox[{"Length", "[", "u", "]"}]}], "}"}]}], "]"}], ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}]}], 
    "\[IndentingNewLine]", 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{"cell", "=", 
       RowBox[{
        RowBox[{"Floor", "[", 
         RowBox[{"x", "/", "hx"}], "]"}], "+", "1"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"u", "[", 
        RowBox[{"[", "cell", "]"}], "]"}], "+", 
       RowBox[{
        FractionBox[
         RowBox[{"(", 
          RowBox[{"x", "-", 
           RowBox[{"hx", 
            RowBox[{"(", 
             RowBox[{"cell", "-", 
              FractionBox["1", "2"]}], ")"}]}]}], ")"}], 
         RowBox[{"hx", "/", "2"}]], 
        RowBox[{"v", "[", 
         RowBox[{"[", "cell", "]"}], "]"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          FractionBox[
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"x", "-", 
              RowBox[{"hx", 
               RowBox[{"(", 
                RowBox[{"cell", "-", 
                 FractionBox["1", "2"]}], ")"}]}]}], ")"}], "2"], 
           RowBox[{
            SuperscriptBox["hx", "2"], "/", "6"}]], "-", 
          FractionBox["1", "2"]}], ")"}], 
        RowBox[{"w", "[", 
         RowBox[{"[", "cell", "]"}], "]"}]}]}]}], "*)"}], 
    "\[IndentingNewLine]", "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.694944341362528*^9, 3.694944468898183*^9}, {
  3.6966685490179515`*^9, 
  3.6966685521501646`*^9}},ExpressionUUID->"b4b61ac8-3b97-4361-b062-\
242873d43229"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"numsolListPlot", "[", 
  RowBox[{"1", ",", "nsteps"}], "]"}]], "Input",
 CellChangeTimes->{{3.694944476746744*^9, 3.694944488437069*^9}, {
  3.7165436328506927`*^9, 
  3.7165436443134403`*^9}},ExpressionUUID->"852b2d9f-f0b3-464f-9028-\
c32293a8b859"],

Cell[BoxData[
 GraphicsBox[{{}, {{}, 
    {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], 
     AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxd1glQFGcWB3BigKirKEQMpFA3gkIixhNJNPLXuLJozBpQRA1ZY6KAq+sJ
rEeUeCXBA8+IMVndFQkYDSEuhxIU8EBQhB7kEHqAuYe5OJRRPIDtme9ND+VX
NTX1r6+P1+/3umbe+mJd2Mo+Dg4OJcLH8r1tSMZf5VtXwMG62nB5+F5D6OUd
Yj71g2UlitkYajniiJj716asn94/WcxvRx66bvb7ScznhN3alP+IeZJ1pYj5
htlPOCNVzGHWAtLFLN9qKfAXMW+wXG79r2Jm35liDrGe8LuYLdVEHrokZmu5
tf8T8wjL4w7PFnN0lGXliNnSnSEZuWJ+bCnXfFnMQdYG5InZerm9f4j5Xpll
5YvZ3XrBa2K2tiuy4KXnL3zpfoUveRS9dP/rkEh7hNVK/bqOk66967mBcd69
fW6i6HiX9XhW3008y361V39vYfukh9Z9Vm8x5i907DUfxbhd7tGr/ttYlN/Z
bTme1VUCv+D0V+z+JXh4Y+YTyz7zKcUL9+j+9nkqRczoVZxl/7DV6w5yDs4K
tM/LXcQvzG/rFvaZ313IY6Ytf0XYZ/Nbhu2Fy7M6hX3meQ8jm4N1fcX5uoeE
okkLmoR95lsO3+55Cvv8VuBGW+13a0TvCoxLVafnPW2lfnE4Fy49tbaxle7H
wS3t7P7/ptv6x2HKizj+zhLb/SVIaHdOXdDZQv2U4EHJronmfS1UjwSfcmpD
4tAW6m8lbs/+1NX7tInqq0T8tx5pKd4m6nclvhmalzE13Uj13sejR6M8M/yN
1P/7CN+mTt7zu4Hqv4+YxKoar0ADeVShaFO39I+repqvKuz3ChycPFtPPlWI
ndp2ob5cR/NWBZc7ARcuLtGRVzV0fRPax2qaaf6q0ZQ1OOur2Gbyq4bnAk11
rmMzzWMNdE+ka16c0NL7V4P4/KYxEWO0NJ81mP50peZSkYZ8a9Hx9YYofomG
5rUWoz+8cuDkIzV51+Lxrmy3giQ1eTyAYn1DzrAxavJ4gKkF7k9Xl6jI4wH2
XLt5bF2UijzqcCjk55+nOanIow5pz02GcalK8qjD0v2ORzODleRRD88nHTdN
OgV51KNrteZ0e5KCPOpxVivbUhWgIA8eusb3Qi41ysmDx8qG8fc3JsrJg8et
WElsW4CcPKQYdHVo6ACVjDyk8FCeM7cflZGHFMvH99+XPVNGHlJ8wn3/5jBF
E3k0oGqbvyJ7VhN5NODI3tqVn6U3kkcD0meeyNjs2kgejYj/yPxu29cN9H41
onLjjuQDz6Tk0Yiw3LsuSxOk5NEE7y/TO35wkZJHE+b8/aq/4SJPHk3oPD0l
7U/RPPVLBse2tDw5eLqfDOdP7G76JoCHtX1RMlx6J9rJ+0Oe5kGGuU65356J
4KmfMiSd3pA4YylP9cgQObPgeMtHPPVXjrKFisGBH/BUnxzD3bzl8VN46rcc
X4x+VePxPk/1yjHjq+oDbUE89V+Ov63patk2y1a/HOYVF+Le+wtPHgqcy9zH
x83mab4UuBacyReF8OSjwPGdxyLmzeVp3hRQhKrOFwv7zEuBWyPWBh8WMps/
BXzyJrt+8DFPfgpM2Fm1zCicz+ZRCa/tt+8NmsOTpxJHwtvf6BfG03wqUaLc
eGRFOE++SmSW/7iuRDiezasSMeMe+3LTefJW4tk8vX/sLJuHCp7j5//588U2
DxXK+1/0cxe82DyrkPXEx8dhkc1DhcXL9g5qHWvzUCFS8sZvHW42DxXmryg9
XTHU5qHGQOeYQvMIm4cab00Y0i/d0+ahRnHKtN3OxnryUGPGlYl73v2ynjzU
mKxom7xpZB15qOHdkFC6SV9DHhos3aboNi+oIg8Ndnt5ufoEVZKHBvMcPXb9
5ishDw12rOp8Jz6LIw8N1kZFeHgc5shDA8XqpKgtpzjy0MCcHxKaWsiRhxZp
ITfPFj3kyEML52UB/V68KSEPLSZVHx35nY+EPLQY5Sf/Z7iXhDy0eK309eS8
ARLy0CLs2vbbq7o48mhG47FhtZ8/4sijGcNnx8SNauPIoxmBc85f8Wrn6P1s
xnHfn6qfC8czj2ZM2Dr3bc+nHHk0445MyyU6SMhDhyynw3Hv95WQhw45nwTl
Bw2UkIcO/s4vPtssZOahw5Izw37JcZaQhw7SAfkVQc848tDhom/01pJWjjz0
2HRGcnakiSMPPery/709QqiPeeiRd3L8xGPC8zIPPRbPnxLpKlyfeegxtzrC
oH9NQh56uOQO6nOly+ahx8Cxi5b2K7V5GDBjbIX7ltAK8jCg0umgqTi1mDyE
37l/DY52NBSShwGrHAs6pnsWkocB2dKDSa/3KSQPAwy5HpmpPQXkYYRWWZbY
I2TmYRR+X7PXOTgUkocRZheplyUzDyN2+v7DyZKZhxEpZYUOlsw8jHDbPNCa
mYcJv37c2WO5PvMwATnPrZl5mDAto9uamYcJhy70WDPzMKFeyTLzMJGD7X9g
i5iZhz0zD3tmHvbMPOyZedgz87Bn5tEqZuZhz8zDnpmHPTMPe2Ye9vx/7W/U
xA==
      "]]}, {}}, {}, {}, {{}, {}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{629., Automatic},
  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 0.9975}, {0, 1.000103506608}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.6949444889174104`*^9, 3.6949445598688154`*^9, 3.694945394631068*^9, 
   3.69494553664427*^9, 3.694945590964876*^9, 3.694945647592119*^9, 
   3.6949456908668733`*^9, {3.69494584069337*^9, 3.6949458482747393`*^9}, 
   3.694945893530902*^9, 3.694946007609977*^9, {3.694946047276167*^9, 
   3.694946069279804*^9}, 3.694946103983469*^9, 3.6959669890518875`*^9, 
   3.695967201870536*^9, 3.6963139576045103`*^9, 3.696314138921236*^9, 
   3.6963142510350456`*^9, 3.6963143643571253`*^9, 3.6965726427654247`*^9, 
   3.6966377005583754`*^9, 3.6966378837072716`*^9, 3.696637981287429*^9, 
   3.696638868172295*^9, 3.696646371989572*^9, 3.696654549768017*^9, 
   3.696654679656004*^9, 3.6966548266440287`*^9, 3.696654864462599*^9, 
   3.6966550505191956`*^9, 3.6966553306698585`*^9, 3.696655551046849*^9, 
   3.696655707219033*^9, 3.6966670839792805`*^9, 3.6966674054156976`*^9, 
   3.696667619696024*^9, 3.6966677215851173`*^9, 3.6966680628603215`*^9, {
   3.6966685313927546`*^9, 3.6966685776759005`*^9}, 3.6966687775997405`*^9, 
   3.6966689074397545`*^9, 3.696669166138789*^9, 3.6966697011337767`*^9, 
   3.696669889822623*^9, 3.6966699713843384`*^9, 3.69667002079568*^9, 
   3.6966700656667304`*^9, 3.6966706152358513`*^9, {3.6966707655267534`*^9, 
   3.696670768966998*^9}, 3.697111701890552*^9, 3.697112181564415*^9, 
   3.69711227779893*^9, 3.7015254659999933`*^9, 3.7029019925002613`*^9, 
   3.7029020284073753`*^9, 3.702902135809934*^9, 3.7029023031815214`*^9, 
   3.702902339689066*^9, 3.7029024467244105`*^9, 3.702902524261978*^9, {
   3.702902560116246*^9, 3.702902589197558*^9}, 3.7029027803202705`*^9, 
   3.7029127282668743`*^9, 3.702914021272751*^9, 3.7029141045344563`*^9, 
   3.7029142800866804`*^9, 3.702914344823355*^9, 3.702914443450823*^9, 
   3.7029145060623302`*^9, 3.7029145638025227`*^9, 3.7029157243010845`*^9, 
   3.7029388801648397`*^9, 3.7029389847303514`*^9, 3.70293914758788*^9, 
   3.702939428971686*^9, 3.7029397680981927`*^9, 3.7029403408256254`*^9, 
   3.702940421811393*^9, 3.7029405516716604`*^9, 3.7029407934728575`*^9, 
   3.70294107624992*^9, 3.7029750664785795`*^9, 3.70382937073627*^9, 
   3.7038297320270534`*^9, 3.7038297722345448`*^9, 3.7038298673715544`*^9, 
   3.7038299932594123`*^9, 3.703830303590027*^9, 3.703830897346961*^9, 
   3.703831024824954*^9, 3.7038311763112507`*^9, 3.7038312366847305`*^9, 
   3.703831387547675*^9, 3.7038314347982826`*^9, 3.7038314935766883`*^9, 
   3.703835165114862*^9, 3.7038352331204557`*^9, 3.7038352927149773`*^9, 
   3.7038353594958925`*^9, 3.7038354944224615`*^9, 3.7038358494623175`*^9, 
   3.703836030049533*^9, 3.70383611742898*^9, 3.703836587530671*^9, 
   3.7038371822624025`*^9, 3.7038376013510237`*^9, 3.7038389197707124`*^9, 
   3.7038617285523787`*^9, 3.703863177491927*^9, 3.7038632784983916`*^9, 
   3.7038820388775334`*^9, 3.703882124877966*^9, 3.7038823916637115`*^9, 
   3.703882473379935*^9, 3.70388548493716*^9, 3.7038860066539574`*^9, 
   3.703888292610405*^9, 3.70388840597237*^9, 3.703888440287088*^9, 
   3.703888510345459*^9, 3.7041704221898403`*^9, 3.7041707276834555`*^9, 
   3.7041709046491303`*^9, 3.7041726389095645`*^9, 3.7044269436101203`*^9, 
   3.7044270833336806`*^9, 3.7044271912527866`*^9, 3.704427311903098*^9, 
   3.704427520778816*^9, 3.704440934119034*^9, 3.7044411246324205`*^9, 
   3.7044414112013116`*^9, 3.704441973815646*^9, 3.704449281732323*^9, 
   3.704513593478445*^9, 3.704513852479401*^9, 3.704514023801086*^9, 
   3.704514318436351*^9, 3.7045145527027445`*^9, 3.704514592194789*^9, 
   3.70451464924631*^9, 3.704514730145769*^9, 3.704514844205782*^9, 
   3.704514874922599*^9, 3.7045149111453257`*^9, 3.704515295174095*^9, 
   3.704515640033023*^9, 3.7045156764068584`*^9, 3.7045158239536533`*^9, 
   3.7045160728304214`*^9, {3.704516341613324*^9, 3.7045163692409477`*^9}, 
   3.7045165685184884`*^9, 3.7045167116811867`*^9, 3.704523622406975*^9, 
   3.704523699042405*^9, 3.7045239982649307`*^9, 3.704524052173218*^9, 
   3.704524106347703*^9, 3.7045242412845545`*^9, 3.7045256392016673`*^9, 
   3.7045261040628366`*^9, 3.7049636738324413`*^9, 3.70496453373419*^9, 
   3.704965021146397*^9, 3.704965171780368*^9, {3.7049665723521347`*^9, 
   3.7049665797493916`*^9}, 3.7049667801146965`*^9, 3.7049669369811115`*^9, 
   3.7049675735492387`*^9, 3.70497147868989*^9, 3.7050336123927345`*^9, 
   3.705033840962061*^9, 3.7053518632042294`*^9, 3.705352411154411*^9, 
   3.705353552285907*^9, 3.7053545924416847`*^9, 3.7053547738245106`*^9, 
   3.705354839864417*^9, 3.705355361735078*^9, 3.705355441744908*^9, 
   3.7053560634965467`*^9, 3.705356780454751*^9, 3.7053569575054855`*^9, 
   3.7053569997124624`*^9, {3.705357085914706*^9, 3.705357115837943*^9}, 
   3.705357166315794*^9, 3.7053572081024723`*^9, 3.705357328963315*^9, 
   3.7053573764870687`*^9, 3.7053575073320026`*^9, 3.705357615861085*^9, 
   3.7053580005723295`*^9, 3.705358168375514*^9, 3.7053584643157067`*^9, 
   3.705360246504519*^9, 3.705376764409685*^9, 3.705377179638608*^9, 
   3.7053817562750916`*^9, 3.7055911157420416`*^9, 3.7059992802661533`*^9, 
   3.705999442988799*^9, 3.7059995079810047`*^9, 3.7059995800872498`*^9, 
   3.706000019400462*^9, 3.7062255760450363`*^9, {3.716543608008183*^9, 
   3.716543644882161*^9}, 3.7165437162303753`*^9, {3.716543756414976*^9, 
   3.7165437837797422`*^9}, 3.716543834795204*^9, 3.716543898018268*^9, {
   3.716552042666233*^9, 3.71655205437745*^9}, 3.7165521290013742`*^9, 
   3.716552177279807*^9, 3.716552881862605*^9, 
   3.7165530570979958`*^9},ExpressionUUID->"e2ce393d-4fc8-4dc6-862b-\
2e1b7789c1f4"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"numsol", "[", 
      RowBox[{"1", ",", "x", ",", "t"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"PlotPoints", "\[Rule]", "100"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "1", ",", "nsteps", ",", "1"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.693298274705412*^9, 3.6932982851974607`*^9}, {
   3.6932983229762383`*^9, 3.693298345367477*^9}, {3.6933108897537794`*^9, 
   3.693310893586929*^9}, {3.693311464953287*^9, 3.693311467523058*^9}, {
   3.6933121333327413`*^9, 3.693312136252617*^9}, {3.6966553430186987`*^9, 
   3.696655343850808*^9}, {3.6966686636257467`*^9, 3.6966686639897704`*^9}, 
   3.696668807693842*^9, {3.6966695211851997`*^9, 3.6966695380222883`*^9}, {
   3.6966699041716356`*^9, 3.6966699043075914`*^9}, {3.7041726776544294`*^9, 
   3.704172678409078*^9}},ExpressionUUID->"d55d42ad-051a-4f72-88d3-\
b6ea73485290"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`t$$ = 1, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`t$$], 1, 401, 1}}, Typeset`size$$ = {
    360., {109., 113.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`t$118552$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`t$$ = 1}, 
      "ControllerVariables" :> {
        Hold[$CellContext`t$$, $CellContext`t$118552$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot[
        $CellContext`numsol[
        1, $CellContext`x, $CellContext`t$$], {$CellContext`x, 0, 10}, 
        PlotRange -> All, PlotPoints -> 100], 
      "Specifications" :> {{$CellContext`t$$, 1, 401, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{407., {153., 158.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.703831243169189*^9, 3.703831528749017*^9, 3.7038365920619845`*^9, 
   3.7038376062417126`*^9, 3.7038389233176174`*^9, 3.7038617323825636`*^9, 
   3.704170978687748*^9, 3.7041726427798553`*^9, 3.7041726806911535`*^9, 
   3.7041728165377173`*^9, 3.704515685758502*^9, 3.704516347941821*^9, 
   3.7045236271943736`*^9, 3.7045237037017145`*^9, 3.7045240581775007`*^9, 
   3.7045242522903533`*^9, 3.704965032558485*^9, 3.7049651756831408`*^9, 
   3.704966786945548*^9, 3.7049669467060194`*^9, 3.705033846370901*^9, 
   3.7053576207625666`*^9, 3.7053580060302076`*^9, 3.705358184092677*^9, 
   3.7059994480133686`*^9, 3.7059995129455404`*^9, 3.716543608441101*^9, 
   3.716543716438632*^9, {3.716543756597973*^9, 3.71654378381504*^9}, 
   3.716543834821754*^9, 3.716543898203487*^9, {3.7165520426834908`*^9, 
   3.716552054563891*^9}, 3.716552129195239*^9, 3.7165521775681353`*^9, 
   3.716552881893491*^9, 
   3.716553057141275*^9},ExpressionUUID->"edb9043f-1ac5-4df9-954f-\
ed6349f53f93"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"PlotDGfile", "[", 
    RowBox[{"1", ",", "t", ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "1"}], ",", "35"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "1", ",", "nsteps", ",", "1"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6699196761956844`*^9, 3.6699197299947615`*^9}, {
   3.6699228848452086`*^9, 3.6699228897484894`*^9}, 3.6714737799785595`*^9, 
   3.671475677017064*^9, {3.6714762283005958`*^9, 3.671476228812625*^9}, {
   3.6720434474117217`*^9, 3.6720434530276856`*^9}, 3.6845804437735386`*^9, 
   3.684580532795127*^9, {3.6845829260898943`*^9, 3.6845829326112795`*^9}, {
   3.684661218374783*^9, 3.6846612200598207`*^9}, {3.684666857110326*^9, 
   3.684666876626051*^9}, {3.68466697274629*^9, 3.684666974446701*^9}, {
   3.6848209158765635`*^9, 3.684820932318753*^9}, {3.684821330023472*^9, 
   3.684821333892272*^9}, {3.6849416349515753`*^9, 3.684941641783966*^9}, {
   3.6849431743036213`*^9, 3.6849431805839806`*^9}, 3.6871913084898863`*^9, {
   3.6932981716961117`*^9, 3.693298199372879*^9}, 3.702940573305168*^9, 
   3.7029406072089047`*^9, {3.702940811214245*^9, 3.7029408125153074`*^9}, 
   3.7029410970223503`*^9, {3.703830329559166*^9, 3.703830335481115*^9}, {
   3.703861767194195*^9, 3.7038617756354823`*^9}, {3.7038852336572795`*^9, 
   3.703885235160905*^9}, {3.704513739790392*^9, 3.704513743786209*^9}, {
   3.704515697493839*^9, 3.7045157019439955`*^9}, {3.7049668664209986`*^9, 
   3.7049668711993914`*^9}, {3.7050338670756063`*^9, 3.70503389090456*^9}, {
   3.7062255971180267`*^9, 
   3.7062255971620426`*^9}},ExpressionUUID->"7272443d-851d-467b-bb66-\
3114bae4dca7"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`t$$ = 1, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`t$$], 1, 401, 1}}, Typeset`size$$ = {
    360., {117., 122.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`t$118963$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`t$$ = 1}, 
      "ControllerVariables" :> {
        Hold[$CellContext`t$$, $CellContext`t$118963$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> $CellContext`PlotDGfile[1, $CellContext`t$$, {-1, 35}], 
      "Specifications" :> {{$CellContext`t$$, 1, 401, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{407., {162., 167.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.7038315472492323`*^9, 3.703837658898638*^9, {3.7038617458448057`*^9, 
   3.7038617762692733`*^9}, 3.7038631827400923`*^9, 3.703863283776909*^9, 
   3.703882047477937*^9, 3.7038821311845617`*^9, 3.7038823978015814`*^9, 
   3.703882482253524*^9, 3.703885236199161*^9, 3.7038854927608423`*^9, 
   3.7038860119586678`*^9, 3.7038885152006507`*^9, 3.704170732573084*^9, 
   3.7041709096446333`*^9, 3.704172655317114*^9, 3.7044269509239516`*^9, 
   3.7044498419113665`*^9, 3.7045135993366055`*^9, 3.704513745354316*^9, 
   3.704514329602285*^9, 3.704514601253224*^9, {3.704515698387473*^9, 
   3.7045157027255535`*^9}, 3.7045161766531615`*^9, 3.704516375794603*^9, {
   3.704966856310819*^9, 3.704966873253849*^9}, 3.7049669419166193`*^9, {
   3.705033871687889*^9, 3.7050338921704316`*^9}, {3.7062255866986046`*^9, 
   3.706225597755479*^9}, 3.716543608526209*^9, 3.716543716595602*^9, {
   3.716543756630939*^9, 3.716543784010263*^9}, 3.716543835149575*^9, 
   3.716543898236052*^9, {3.7165520429800863`*^9, 3.716552054595182*^9}, 
   3.716552129355476*^9, 3.7165521777042313`*^9, 3.716552882102009*^9, 
   3.7165530573496237`*^9},ExpressionUUID->"b5384a67-c4b1-434c-adb0-\
f6df9ea88cce"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"PlotDGfile", "[", 
    RowBox[{"2", ",", "t", ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "0.1"}], ",", "0.5"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "1", ",", "nsteps", ",", "1"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6699196761956844`*^9, 3.6699197299947615`*^9}, {
  3.6699198462184095`*^9, 3.6699198903619337`*^9}, {3.6699228956768284`*^9, 
  3.6699228999010696`*^9}, {3.6704899727237153`*^9, 3.670489973834779*^9}, {
  3.684580473119772*^9, 3.684580474196268*^9}, {3.684580552485094*^9, 
  3.684580553858017*^9}, {3.6845829248261805`*^9, 3.6845829314567757`*^9}, {
  3.684661285526652*^9, 3.684661286541795*^9}, {3.684667010701333*^9, 
  3.684667035942295*^9}, {3.6848209944371567`*^9, 3.6848209958411384`*^9}, {
  3.684821336887472*^9, 3.684821337714272*^9}, {3.6849416590789557`*^9, 
  3.684941669698563*^9}, {3.684944557091713*^9, 3.6849445585097933`*^9}, {
  3.687191360433858*^9, 3.6871913633300233`*^9}, {3.6879489683879957`*^9, 
  3.68794898367387*^9}},ExpressionUUID->"95466cb5-3379-4439-a894-\
19337d767127"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`t$$ = 1, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`t$$], 1, 401, 1}}, Typeset`size$$ = {
    360., {115., 119.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`t$119030$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`t$$ = 1}, 
      "ControllerVariables" :> {
        Hold[$CellContext`t$$, $CellContext`t$119030$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> $CellContext`PlotDGfile[2, $CellContext`t$$, {-0.1, 0.5}], 
      "Specifications" :> {{$CellContext`t$$, 1, 401, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{407., {159., 164.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.6879487138394365`*^9, 3.687948839872645*^9, {3.6879489428145328`*^9, 
   3.68794898507795*^9}, 3.687966081872204*^9, 3.6879661581825686`*^9, 
   3.6879664854112854`*^9, 3.687967905480509*^9, 3.6879681134444036`*^9, 
   3.6879797171091633`*^9, 3.689089331494978*^9, 3.6932981505079927`*^9, 
   3.6932997099870443`*^9, 3.6933104810141945`*^9, 3.6933108709241323`*^9, 
   3.6933114549492874`*^9, 3.693312107866103*^9, 3.6933123142510004`*^9, 
   3.701525468208485*^9, 3.716543608878668*^9, 3.716543716758625*^9, {
   3.716543756796492*^9, 3.716543784166354*^9}, 3.716543835302403*^9, 
   3.7165438983965063`*^9, {3.7165520431806583`*^9, 3.716552054759574*^9}, 
   3.7165521295090027`*^9, 3.716552177906069*^9, 3.716552882359861*^9, 
   3.716553057583356*^9},ExpressionUUID->"6223c2c3-075c-480a-89ce-\
fe76169de92b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"PlotDGfile", "[", 
    RowBox[{"5", ",", "t", ",", 
     RowBox[{"{", 
      RowBox[{"0", ",", "3.0"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"t", ",", "1", ",", "nsteps", ",", "1"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6699196761956844`*^9, 3.6699197299947615`*^9}, 
   3.669919851705723*^9, {3.6699199064898567`*^9, 3.6699199220727477`*^9}, {
   3.669922904413328*^9, 3.6699229050043616`*^9}, {3.684582923671677*^9, 
   3.6845829303802795`*^9}, {3.684818339382021*^9, 3.684818340520521*^9}, {
   3.6848183832220955`*^9, 3.6848184398718925`*^9}, {3.684818474892545*^9, 
   3.684818490959927*^9}, {3.684820985482871*^9, 3.6848209885248327`*^9}, {
   3.684821339430272*^9, 3.684821340381872*^9}, {3.6849416757919116`*^9, 
   3.6849416814432344`*^9}, 
   3.6849418154398994`*^9},ExpressionUUID->"9fc36678-e36e-4186-bbeb-\
6b161c064a4a"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`t$$ = 1, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`t$$], 1, 401, 1}}, Typeset`size$$ = {
    360., {114., 117.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`t$119097$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`t$$ = 1}, 
      "ControllerVariables" :> {
        Hold[$CellContext`t$$, $CellContext`t$119097$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> $CellContext`PlotDGfile[5, $CellContext`t$$, {0, 3.}], 
      "Specifications" :> {{$CellContext`t$$, 1, 401, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{407., {158., 163.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.6879487148014913`*^9, 3.687948840799698*^9, 3.6879489435415745`*^9, 
   3.687966082547243*^9, 3.687966158879609*^9, 3.6879664866673574`*^9, 
   3.6879679055155106`*^9, 3.6879681141774454`*^9, 3.6879797183912373`*^9, 
   3.6932997100100536`*^9, 3.693310481290277*^9, 3.693310871197214*^9, 
   3.693311454972294*^9, 3.6933121081411858`*^9, 3.6933123148981943`*^9, 
   3.7015254693347344`*^9, 3.716543609215526*^9, 3.716543716916444*^9, {
   3.716543756961417*^9, 3.716543784353279*^9}, 3.716543835456567*^9, 
   3.7165438985584803`*^9, {3.716552043353795*^9, 3.716552054933567*^9}, 
   3.716552129679255*^9, 3.716552178082759*^9, 3.7165528825941257`*^9, 
   3.716553057828762*^9},ExpressionUUID->"1185f7ae-90a0-4e9f-8ba8-\
7ba827d2c80b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"\[Rho]", "[", 
      RowBox[{"x", ",", "0.2"}], "]"}], ",", 
     RowBox[{"numsol", "[", 
      RowBox[{"1", ",", "x", ",", "nsteps"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"Exclusions", "\[Rule]", "None"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.68585365745935*^9, 3.6858537241626883`*^9}, {
   3.685853924122672*^9, 3.685853971668748*^9}, {3.6858546744116917`*^9, 
   3.685854677331276*^9}, {3.687190735031087*^9, 3.687190737790244*^9}, {
   3.694761868503249*^9, 3.6947618696670766`*^9}, {3.702975318153305*^9, 
   3.702975346929757*^9}, {3.703829467456313*^9, 3.7038294676125646`*^9}, {
   3.7045143795767765`*^9, 3.704514453189067*^9}, {3.704514973982964*^9, 
   3.704515015821701*^9}, {3.704515313279944*^9, 3.704515313613181*^9}, {
   3.7045161913496175`*^9, 3.7045161975900373`*^9}, {3.704963691694134*^9, 
   3.7049636940408115`*^9}, {3.7049645956461926`*^9, 3.704964618529418*^9}, {
   3.704965187900816*^9, 3.7049651884852314`*^9}, {3.7049664344501877`*^9, 
   3.704966434501224*^9}, 3.704967589651675*^9, {3.70503362090176*^9, 
   3.7050336218504343`*^9}, {3.7053768543775854`*^9, 3.705376854555712*^9}, {
   3.716552778947811*^9, 
   3.716552782539234*^9}},ExpressionUUID->"bbdd925b-a25d-42fa-a260-\
4f0830de797e"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJxF1Ys3lHkcBvARopSakVCELqPQ6mjWLXwj1i2FEu2KUsi1SHRZO0soKqV1
SyqVrZDIIpcNq6ENywxy6X3nHTQYDDO2kFv2cnbf33POc57z+QseTe9TLj5L
KBRK/N/9Z+19BJzaYVdzyr8RQ7bi/vhElVj439Gyv2glqKSQdj/8oFA8kUNa
bjHaw2ZDIektzuOC11dLSEe2GEPGpwrSSiVUQkKihnRZ/57mVtM60nUBd9cf
FrJIT9LNVhUEvyG9ZCZ/9fotjaQNFo+WHXjeTLo5ltHSoN1K+qnOXaWALmTL
4ZiipZZs0jM0boxeMHKRqaGrewbyNecT1cIC5JO+yVrRr5E7xVoeDi3IVher
byr2IF+sXZZ/gWDDH4FTpukzIiiWdq3nfWCDg/1tjXViEQjss3lWw2zIPrbC
+v6gCNRvjs7kjrMhfUKQS+eKoPoYM7f4IxssOi4ddOkQgedOhcNVn9kgSTh8
YjaJIKvTpLx5CQecvyjS+ipEoKyWGCFay4HldyJeVaaJgJa39SMDOJBFPE1s
chKBNMtHWHODAyufFlcebRiH0Wke8W5HG8itTwmxeTkGOSNVjfJJ7UA9JVVO
jxsFebUnIj6/A6gRZl3qPwzDNf9S3+zNnVAVVG++tmwIpnbn808yu2D5rUtZ
ufwBCNdnlax93Q0xwRST03v5wHvOusrRfA+LRqo/OxX0w1xAx51tFzAwkJKM
X9DrAx0LmS++VTgcV1Dp21TPg6K8fK3uWhxcUlW7d1bygLHGydmuAQet+7Ft
3xTywHQoI0eHg8ObXKnWs7d5sO+6toN4EIcFyW/fTQfzIKzHMeM8jQu+Ko7X
rirxoCI0Rf+aPxci44L3jwURYI4ZeSyEcGHYv4Hp4U1AnRU3LiScCy2ptfdb
3AhoVKL3ODG58FaB/qzKkgD81UumYioXZjLTB8qVCaAsx5rv1XLBrjXQBeq5
YPNQ0++FEgG+c1LtkRpcYGTI0xtUCZg4d+OzeC0XNJLm+O81CTirHZQVtJIL
s+ffeUvpEtDJpx8JnMWhwDnB0203Ac9CxCXxHTgoSEy4Lpwk4LIH04mRgANl
mruGFkKAsXSyxjsmDkJhYzv9DAHWZlp+5yJwaOjOcXaKImCZnti14TgO54vc
HR8lE+AU4fWMaY4Dz6vWyq6SALcVVmy/Txg0uxZIetYQ8MQmqkVvFINyh8y6
MBYByQ1Ru2b7MLhlGL47q4WAgoghr7RWDKxXbTUV9RPwXewAazQPA31pxTlJ
AQEJ+3p13jzAYMOcRKXyGAEn2t4u5GRg8HkQM7ScJkA4FdXrF4/BAP771KF5
ArYZHRDvjcKgra20NFCCB1vCdf0Z4RjkV9/YmSrHg9lWSspybwwySr7/M3c1
DwxoMtYz7hjE5vm/qFbkwfRPWkdG9mMQmn3odPs6HiRYBdpybDHwTNujJ1BH
NopRK6BqI1NDprV3MZBZ1vn0JFvkSDWvjX0eyIILcVk288i6Qle5Lsde0gqr
xLKsWWSpmjuFm7L6SAcyqnqWOfSTzrfzzq6eQp4cXbd6MO0D6dIDNpIpVnzS
TNu4+yWDyGyaYJeuwQBpTa5996M45Kc7D9v8VoT8VaJfGYEhLx60O2HZh8xW
16E9HkQ2klYddhtGzh5ZUbtMiCzLXkirGkcOLR0PDp4YgDNDWX1bF9lAcyh+
y5hHLuk9u2V+6SDpabkFPFEV2cQwNkVFH7kpb9ub6zHIHhtaZyTakScbr/ef
jh4inSHlGe6yWUBagSh9uISFLB0VfdA4dJg0JdezsJ82QrpC8/K9CwHIYZmF
12l1yPXVPrq0MWTlD+ubqMqjpHWD3hZzNiJbTEZkJm9HjnfzTrHYgdxc4Zg0
oY9MVTW+8uBr5EM/bI5xNhr97y9qoddy7uwLM+QAmTZ/6h7kFJXtxsnuyK90
rshSQ5CHTKIy7aqRqfZhujHyQtL4dnb7+V+Ri+7BZr7nGOkjhQZUtS/IP8Y9
iMbzxkkXCNTuyO8Vkd4Yu8ZW5jFyurrc5OIi8l/GPesp
       "]]},
     Annotation[#, "Charting`Private`Tag$119180#1"]& ], 
    TagBox[
     {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJw82Hc81l34OHC7KCOrrIxKklIhUVy20BAZyUqlREiSFtEwkyRJWmhJGUmo
kGSPGxFu494rZUXJ+l338/3+vv3zvN6vz+3zOee6rnOdcx5VnyCHo3w8PDzr
BXl4uP+1Pcpqr2I7GfP8928UHsvsvR4vdxX+v6MWv10bJ5f6f3Y98CR/dCzn
/7xkIcrdemX+/3nNvl+sLwnF/+ezrQaQ/rsMeP/X1p+firWc/wgzC9x/I7C8
eNkgL28lePyvD3k+83gxWAUcvv/5fQnFvLltRzXsafyf5x+fjZ5OTf0CE0r/
87z6xAOFA8M1cKJW8D/37zwpw7+hFpxe8P7nSXUj8dcn6wACIua5f7+V178t
o6YOpvSs/3tfODH9ZqxCPbz5VcTH/f1ih5wF8831MDq+gZ/re/X5QQtW9fCz
O+E/U668Wzuwrx7a+/P/syZ8GCp3rwenmWv/fS/kX9Xd9GP1EHQf/vte+bva
vWEh9VBpVj3Dta1WR+Xm2HqYTy/+wzUxa0D754N6OD5N+c11gBz70Yu39bBw
ePcE17M3f4sfaaiHqp6Jca4ThXguKw/Vw2uX7v+eK11aMtr3ux5qSb8nufbd
tuxF6UI9FM5J/DefNxOy3mkiDSDx6YQg11NvFFeEyjSAkZHVYq6NT6gR9qk0
wLaIbBGur6/RiNVe3wC8l6OXct1K2mAiurUB7plRRbmWzdT5yzFpgIWvX8W4
9nQxKKi3awAdEU1xrn+1WKhcPdQAi7rO/vc80sI+Gc42gHR28xKu6xecdipF
N8DeV2XCXEt8OMgzk9gAB0I1Fv1XX2GHSnvuNsCW+RUC/9Xj5mPBJVkNUFaQ
w+HOjzUcoJH6ugGunLlH5HrTixDSqdIGcPTWbPsvn4fD0/d+aQD1Uy5fua5a
GWG/obUB5p+rVHBtfyeuikVtgPKYmPdck5fc2ZQz3QCxC54fuNasy2BFCTTC
md+6n7kOiX782Eu8EXzFnzf8l0+jZ65G8o3gbv/uG9d8068kFNY0gst7LwrX
Ci1mE6DdCE8LL45xrfukt+uIQSNYzQXxcuez60xwaZx5I6yM9lLi+qjNovtv
djdCj9XzDVxHKD281OnSiHnS2c512piu999DOJ5yASuu8782mSkFNIKzn/ye
/+J5z2eNWVgjZHwIdeSafHJ60bHLjWBaKOXM9T/TZE5CfCPY2f5x4lpKdm1L
QWojvL+u/N/vtTif8rseNsI138TdXFtW7E/596IRSthGlv/lN+VHqPLbRrCV
0DXkOsw32sXiE76/L1CL65uGcoZ+dfh9618KXL8QK1BMam8EJ9ei/+qrimK1
UERsBMaKMDo3Hr0lA+Tv9EZorpg7xfV4fGjN7EgjJMq/Vud6ideS56r/GqGs
9zVzHr1aJyvOSqAJHGcXirk2WmQQ4C/WBAejs5O4dia27Ule0QQE//RQroPy
fTe/U2uCt6WDvlzHXpmT6tNqAn6/sKNcP3ZJnZrf2gSfL3oFc122fn3vKtMm
GJ64F8N1x8LnDzvtmuBq65pXXHM6XR+edGqC+KX8RK75X4xcTvFqgrnXm5dz
x6t48frh935NMFhU6MW1nr2SVf/pJtBSuFLM9Z7VxRq8EU0QOtHx3/ry/Wu7
RD22CQrkvl37b300k3/apjRBk9HwENfpj8MJQZlNcNtfdgMvuiBU/G3qsyZY
nO1wkuuGnc/ulBU0wTra48dcUxSNwgfLm2ByI28d1zOjnW78X5sg6MppEtfS
X08YabQ1wR3yn2GuN9zjVdnd2wS+Nkn/2epkOl8ItQlo5VuHuPYy1aan/WwC
8a1jNVyHy9TWffjTBPTyTw+4Tma755J4m+G4TaYf1y8/TSQKLm2Gu+REDa6r
b8UHaco2Q8iVm33c+fQdVXXYq9IM/zbmRHI9YVCqG6rZDJ/M5v5y47lUbO/y
e7rNoD1oZDeHXkOhT38yboZqg6vNM2jjkov9lJ3NcNaJcPEf2iVeqnKRYzPs
3qzmPo0O9sx9ouXRDBYt5078RcdtMb2671gzeKz7/vwPOkuoxzfsVDOkWxpK
c13eF2hz/0IzTKhm50+hO98IalVda4ZTFcvOcz0cnSlGv9kMYgrXT3Mt4KIz
JpzRDK36PJlcK61v7NyY0wwF0pcnuN664F3i+KYZigoFz3Pfv2t3VbRlaTMI
FMev547n8H3lvfrVzSB82USEO97z7AiFdc3N8FlmrSx3Psn6g0z57mY4+Wjr
Km58nl0zKl5KaoaLK450cuP5sTPz8jy7GYZeivvxo9lBB+Uoc83wSIZsIYTm
qSindy5qgbkRoYRF3P68VL7o67IWyKfklizmrm+3cxHvFVqg+GdznTDa7EWP
7cs1LSC67GSFCLffTukvv6/dAmW7EjKWoIMs7lITDVqg9PFa96Xc/SBlKj/C
vAWWiprxi6IzSU4Xg3e3wNtbfTe5Ltr4bqePC35v4xivGLcfXZSW2X8Ix0O9
doDrwcbTZEv/FnhUmJ7G9eSKztf6Z1rgd+8yZe73lx7bcn5dZAt87ZIw4Y5f
7d0tK4W4FghxXLAQQO/ZZz80n9kCVS+cJrn1cORR/qvRZy1gkd/mPIm+8FMs
nFLQAlFlGpd/oV/EtUjU1rSAeu9ZTRKat9rW7MZwC8hZxg9UoVdI5IpFTrXA
Eb/ZS6XojZ7CxGCeVjh+azcjH22Rd/y5j0grrPl0SfY52u1f3en90q2QMZwo
9pBbbzvXmlitbIXiPxOMl+iYtOtLt2m0gr5ZSHge+iGN3rNuSytUj12SKkQX
b7F8qrCjFZyFlpe+RzdezjklatUK45FGvtzxkFr5jRf2tkK655hSE3pK8bDI
2IFWsMraMvQdLepf3U053Aqztry5DG4/LFPN/nayFT66ekRw681wUVRQ7Vn8
3tFVGwUxXvZOpO2lUa3wqn3wiTi332TD4tyEVlg+6i2vgL449vDb/TutsPjz
y7tr0bdh/vGNR60QYVEmp8ft18SPBqfetsIfHy0tR3T3OkWhw59aYVU9v8ch
9PDZCx3761oh/zPnTzCar7bvoVV7KxDlf2dfQstJG/pvI7ZCbqfyoRj0Jp97
+pr0VlAYPqmdxO03BX/5FUdaYeORQbEUtPu8C0F0uhUo208tcB2y633mAl8b
GJ5W572Fjs2Q9Rtb2obni3mpRPQj1hk9qmwbtPH81b/KPR9u7eLtUmmDJS7S
J8+hm6/qttZqtgFnqeNbf7SheBPfLb024Am6eekAd3+6d0j/oEkbOB/q7TTn
rpfVf/3X2LXBT+qmEk30lTdJj0ec2uDL1J3V3Hod3bamq8y7Daj+OZ6pGG/P
Lx+Er/q3gWdIatFqdPNuB+M9YW2w4921pY/mMR89rJAVUW0QqRsewI9+4RP5
nJLQBmtH/Tv2zY2A7E+Z/rw0nA/L2zh+dgSuns2TOPukDZ4quhTkzYzAGK+5
pWleG1y4sUej7B9+L7H33JL3bfDO0PpZ/jR+Tzb4TdfnNnBabaqZ/Bffv/7B
8hPf26A6b5uF+BS+v0Rnly6lDZLttva9/o3vN2m8PD+Mz9X1wrZO4H7b6P2u
/k8bHDDWW/FybAQKcmdCbXgJME7dbkEYGQHmiNXNN0IE2Cd7iP/fzxFYqZfy
UmopAe6OnM8XHB6BhEqNwQFZAnSnJbZWM0egWiD0r5kiAVqOXDUNpY/AX5tK
yReqBMjrDX6yiIrn0W9O1iFaBFAoXavxbWAEzNjRBUJmBKi2Ft0n0DEC5za2
NvpbE+DHrtz1X1txPKfl6IRdBJj5u33iWBN+fz5f7r4LAd6Zix42rhmBacmB
aO2TBIgxTvp4txjPf64aD1JDCKCceiTmaAF+78Hp99NnCbDzwIPdsnkj8G2t
yPCXaAJYbNnarJKN79+h7+SaToBfKwVTem/ifKOigz49IMD86C/9ynj8Xl1L
nFo2ATK3bO+NuYbn7X1HKoZfE+BhYonQ5PkROO57a23UFwKwPvy8n3VkBJST
f0y//EWAhR9f1Ed1RqDiUOTLogkC2ASlC7E2YP50pA58+EuAU+PukdNrRyCz
27C0ma8dvDlGOyoUsB8pxYeNyLZDjZDk2Hu+EZDM1ZjQhXZ4NMZnHdD6CwRr
jg5X3myHTw9cj931+gU//gwNdm3qAOmI5cyp0z8hh/OhUSypE54wT9HafH+A
mNLzERrtG/A8fRuRfooNiX7vfB+v7gbTJYMVnPdMmDJ5RTse+R0Utsd4PvhH
h9AtNcWyX3rA7Kz9p5lTNBh6U5PQrtoH2gk2Aj/6KDBz4tv9deeJID1kSbt7
ggzrTRfN+37ohzr1hDNumiSsn1dre6r64dR7fZfp1STQlbbfZ1PbD05LD/Hf
UybBDmZ6zvr2fri+q5DSL02CPTc07UYZ/eCx+Jzln/khCOndnX5OcgACyaX6
yrlDUHYqdUui3wA8OLd95yjfEBgTt7nPBQ6A+dTP33f/DkK1xcC1wNABSLwg
/9L81yA0LlfvtY8cgPRxb9NnvYPQ/+l9pMydAZi9ZBj9rGAQeESIzQ+rBmBG
WMXyttcgWGepHitcPgj5Kdt5tlYPgG66mHqt4iAYhDwKNy0bAJWkGVqf6iA4
9G7TcS4YgH/nunwEtAZhnfHSoPsPB+D1vjhPF5NBuOSjx3vnwgBI8Y45zR0f
hIHPp2+46w/AkFeVhU35ICxi5MYcLe2HZqfX/J6Vg/D06hOdtoJ+KLXLqA6p
GYRNocMbTF/2Q4p+qElm6yAstYoUNc7oB0txjR0jlEGgFaeH37/YD68qburc
WTIE8QM7ZMfN+iG9+OL4S4khiO6wujO7vR+u5voVVsgMgd6BTfrSev3gmWau
zVIeghqFLOqJtf2wLPCP5nbdIbh1hmfo3dJ+OKvkpUZ2H4Km9g/mDb1E8LHf
5Nx/aAhseZSDWjqJsOcKb/x33yHIZVTSmS1EUGdnj7UED4EUsbzYq5oI34pZ
VeVXhyDW506vWx4Rqphlv9/FDYGiPcNz2XMivJJP0ChMGoLbk6Hag0+IEH15
Q/Lz9CHQPG5XVH6XCIFv579kPRgCG73bRxpTiHCA0fbnQdYQ2JWv8Bm9QYRN
u0K8UvOG4M+PfuPIq0RQjDS/fbNwCIYS7lYevkyERUXSdfElQ2ChtHUu+iIR
Bpe/3xhVNQRuJl/ypc4QodE21ufi1yFY2lG4+topIry7dCDtbOMQaJcd5ZUM
JEIidWbu5LchqIpRGr90jAjhsi2b/XrxeZCqkMcRIhy2eXj0yOAQiOZxolwO
EcEw36TFjTUEcuotBQ8PEoF1/lqm9ewQ+Cp0/Dizjwgc5/XHn/CQgH+xuPWa
vUTwHpXiU+YnwS7IPft1FxHsVtH15BeT4OuHttbdOzFeH1va7oqQYJLHbVLP
ighbnUv8ZERJUGsbt2KrBRHU4mIeSEjiOhnu3h9hQoR0tWD9JFw3ghaTJ2uN
iSD20bV9yXISeDwuvaJuRISrTqb+cXIkcOVVTXu4nQjTv9YJLlLE9/tufLrR
EOMdK/no6kpcl+2kgu5tRKCpzmzjUyWBtMm2sjR9Irh9oHZEriLB3be6FYFb
iUDY3xwwt4YEH9Z3V3rqEcHqV7HQBQ0SRL9QrPDVJcLHmAeP/+K6L82aNt2G
3qJ63TBsAwlOSXp83YR+Xh74bUIb+8Kvdj9dtOJ+l8BTW0hwRt9V2xyd8hMW
j+iSoGp4RMYDvThGIytAnwS3xO4pRaMjVJbt4BiQgJHpaFWE/l023XVsBwm+
3FVO/ok+4UgJohuTYM3C7D8dHB9puFH4sCkJRDt/XL+Gdrr+NptkToILUsM6
FHSjcqaRpxUJgqrmeG1xfiZlV78Td5KA2asy9hFd4nDy1AE7tJcT73aMh9aw
05Lvu0kQ4HB/Sw26dP+uynh7EpxvHX1wFONn/snstLEjCU72L5aQNiBC6xqD
teNOJIjKqooZQLslaROfupJA4dfM7S8Yf8bUmpsHDpLAoLJctxbzE+KlaC7q
SYIBmTk/+g4izNdJ/qnyJoHQeLWOKuY3bpPwq9DDJHjruDTlHGDfvbfgqeFL
Arph79VfWA+Peack+4+TIPP5uqWXzXB8HZTz5oEkyFjm1PPXkggW23s3/gkm
AVlskxLJmght2W2U3NMkyLuVNEW1wfEtrU3zDCPB7L3gIwJYn4zQj7aS50jQ
vrbb13QPjm+gaP7rBRKIyJ/W3WRPhDnLl0XnIkiQv9yv9hzWe+ybR74bojC+
Yg8six1wfMvT5MlXMF7zYkVDjji+yMTW1OskuMasWDK7H+PJio7eGYf5a8hz
EHbG+JUFcfKTsD7Omb2YcsH4qfo+PHyLBF7WnJJuVxxfvLvD8lSsVzFC0fMD
OL5xB6GmNBJsap247+eG4ztoUx5xjwQOMU4hirge579A4JZMEtwzmNSrQsdp
bVVjPMR40jsY+91xfHe0uu89wedxv672oR/PqcXvzsH1KXfzlo0Hjs9Xzpj3
OcbX1cv1Mvp9q/h48UsSvF4U9OA22kxf6NnxPBLkrKnwvoJufTR7QDGfBE1F
u7L2ot0WT4gSCkmgmi/v8xffzwhmf75STILn8hqPL6FDeofO6L/H9ToZ6j6E
45sz7V73o4wEpsB7Vwkdm9s88PAjCZz/Nu/dhvOTlvpyy6ESx6vSc10b5//4
QpmlUDUJlpaq7eDH+GjR8qfLajAfFXlBbzGepbuevT5ZR4LLumGqJk4Y33eZ
h1Qbcb3KRe57ifloVbot09VMgv17M5iLMV9u1+MaYttIMLSySD8e88n4FXlp
RwcJ3kd7LExjvk+5hG0e/UaC/vOZxq7o2coAevZ3EuxbFDSZg/0tVuPwPZc+
EkhqdK0iYb1I3zqwe8kAzn+gtUEY/Wh6L2/lEI5H3Z2puhvXV+MOP3U6CVaH
bY5TssN46ugo9TGxXi6eE+W1JULL/XXtNzgk4F3uJNyJ/ZEWIGswOUICWeG6
Y2bYH4O7lv58MU6CVG+PxiHsj7NG/E/cJ0lwaFdMjr85EaTERxfX/CNBGt1h
+CGuj45P8TE2c9jfFpW6heP6SQlYI9S2QAI1nunN/ri+HBSqru7nI0M1QSbk
LPZPyUY3/j4BMkyEiyk8wPXYET4Z5bWIDO//UrT6cb2mrE3moQuTYYn97ee6
aIduzcgTS8kwHqGc8AzXt+S1r3MjYmTwuxbzfTO6Q8f74pllZDh9uCmxG/tB
CuXfv39SZBCT+5Gbina4defcZVkyGD5jbA5ALzPZ9FdQjgx/RSpUPdCEX41h
CQpk2Gl96vwxdPKDo5MSK8mgcZBnRwLafhdPaJoKGeLKjfOmsR9JzGSMK6wi
A+ESv70NmvBS79STNWRw1pVdlIf9K9mVMKKuQQaFwbB2VbT9Iv/APE0yqF5Y
k5+L/U+8RPDn5g1k8F2i9tgK3Xrksf97bTL8SArImcT+mSS1nbNjCxnyBQU/
vkfvqe46Xq1LhuKgH4xEtNipYKa1Phn+NCuvOYNuVV7i22JAhvNKWWHB3L9v
fUpz2EEGo0MhxAju318yOdxjTAZIT3Z8jBbVIpI9TMkQXT07+A3d3HfGm2pO
Bn5SySVFHE9inMTQcSsyfB2t0D6LXsq07D9tR4aGocEeJZxP8x2S2/RujG9s
dlwAOtHiQm+EPRmsdbwqytFLsgq645zIkJby4a0TxkfEQ6H9kRcZXoQubr2G
8WxcUrJ3jQ8ZknSvPSSg48vtW3OPkMH/z99xecyn8IrrTe/8yDB/7evaN+j6
WhXb7QFkKNm3cvEfdOyZD/VVgWTwUQkMAKyPnaudra1OkWHb4+iXyejFnaNf
m06TYeUH16QZdH1UgsW+MPxepPSSY1hvsZvUv3SHkyH25zvlTvSipINV5Etk
UK59KfEa61PIprb8TwwZOvyclh3Heq79421wKZ4MGeeNd/egrz+bec93gwy/
dEVVbbD+rZzStsbeJENz+ufEcrSgwOZ3oilk2PrsYLKWKRFqipp0bqfiOd6D
uP4R+uoh36IVd8nw6pOJlyTuJxYSvJsf3iPDcyW9TO7+IlB5P39VJhlM7h48
kI3u22Gxc+ghjldZSq0enV8+TMp4QoaXv8QFhtFuJUaSks/JcPlQr9RmXJ+b
dBm5LS/JoCf4zNQBLVSUZB6Xh/kceR8bgi58PRTKU0SG8HuvfArQ19fHin4s
JsM91xuTLWj3l5uenX1PhnTP4icc9Ja1vcY65WQ49UrlmBD2g8VPo77/+kiG
NdBhqYoeVNMMzq3E/Mg1GG1Hv33csdi3mgxq2wX37kfHrrzwRPUrGR6YrAm3
QntmrjIcqCPD8p9+JO7vdeWbO9IbyVBafcJOBy2cHuq/v4UMUZ/Xlmlx3y+j
JCBBIEMw+/E6DXTx7a+ZTR0YD8PuzDXo+GWBejFdZKgtrpPk2vumbKtZDxm0
XM8kqKO3ilb6zveRoWz1kJAmeknCsYWyATIEygte00aTFkuknyGRwdaAKaiP
LrleumkzlQy7o67FmaATBQ41DNMxXuND4rvQPtHCPi9YZGhMnEo/gN7GU/Tv
8A8ymNs3rPZDi0a43Vb+RYYvNd0GkWjKDJ8WcZQMjp5EyXR06blXNWkTZLBT
WD7zFp30x9HDYQrrYSZuvAN9+MzspOg0GUIXdKZ/c98/kZPUMEOGHHUZcXlL
7vrfvfbaPBl2nNqga4am/ZqsNOGlwPahi8dPossDHrrO8lMgO5g/7z766PGR
uNPCFHg1986bF/u7IeOumvZSCthNk9u3oSWOmHzgiFHAYYWlw2k0g8xyfLaM
AtVuQ+QC9EevW8OHpClwr6rg8hg6ZcDgmtJyCkjlLVRa4Hnn2EGKUq8cBTr+
3kxMQUu66Oy1V6bAzR2xZiq4v7C+EZlL1ChwQ2d0vTf6k8PVy3WrKfCk1Db0
PjqFoCV3ZS0FGpvuKnSgj+/pKjTWpMDik99VBfD8ZNx8yfafFgXcM4VjNqOl
bNWp77QpUHNgo50bmlXXeuHUFgqYPbUMjEBXWJ6V3qBHge6IvaMP0KlflF+z
9CkQybBrL0X7mdZb5hhSwKjfcFkbWtpI7qyCCT4//2RKCPdHTvln8e9mFLA+
lmS+Fl217cSLFEsKaBT89DVDp5VImu7ZSQFlp0pvV7S/7odeYTsKaDnzb/bj
/p7QlVe6mwIfG5Reh6JlTo5GHrOnAMHzvPYF9AnhJY6yjhQ4KiNXehFd+XSN
+lcn/P7PaatzaGkzk+nTrhRQYCr2B6P9Bt2a1Q5SwJAv+uxhdMX5M4/aPSjQ
b7xObh9aanlyyGVvCvA+kPxsgD7+NtdS+zAFXioaBymhP+39umLwKAW+fXq1
ahbnKzk89CPxOMZvPYHWiT4W+69iuz8F+71nbw7642qZFM5JCqhtepN8Fr3s
s/bRe8EUILI/iexCf5g+suTPGQocal5p/Q/zJZEWOfg0nAIbJoOEv6GPbsko
3H+BAvvTo5Ly0eL+bS5FlynwfjeD5I8+soijeegKBSa8DN7sQpdlC8yLX6dA
/PAuY220mIlye0UsBS5OqNySQh/uN8g5mUCBptB3z6axvkrD959VTKJAWLBI
JBktKhNk25RMAUUVR8Z7tE9hnNL52xRQd2KM5aHf784Z1UjD9XDlqecr9FJO
xZfv6RRIe5Ws9RZ96Hpv2vX7FJhrfn6wBl2i9ttP7yEFepicH4PoJZViRrTH
FFg3e2CAD8fjfXCdxO1sCvwUntTehH73x5xq+owCa5d9pPqiRVI9S0ZfUKBr
Wf7fZ2ivTefiHr2iwN8lrYGj6OLm2+573lAgeWGFlTnGU9jvjfZcAQUyh29G
PEJ7Cjbw5b2lgFLnlhWCmL+3T6hdbiUUkHzLK8Wtp8XG8y+Ey7C+Dq21GEN7
9K24WPqBAs9E3g6fw/NeUZjO3mMVFHiX/OPHJHqR1B412c8UYE4QTI/i/cM9
//hkzRcKGOse/lWHLrS7Un+6lgJl+7LGlPD8KMR6cF+tgQKuu5LsjqEPXi0N
bG/Cely9djYbXaDSaXq5lQJ8vQH839CCn35Ka7dTQMzf69AftNuBxayBTnx/
37yMGJ5P8yfVPiR2U+CWup3qCrRAilHS9l4KCNtbXJFBH9joeohDpMBTZ852
IfSbxhDde4O4PgyN7Dj4Pv5jNxbtJFPA7d8Ooig+d+V/0TdFpcDj/IcnnuHz
14+qXz9lUCDm6PcsY7RLzx9H/mEKbOtsEQ3E+b2y8XlcMUWBNSWtLfUYL10t
VWOYpkBejErTUe56EiMRK2co8Pz9w4t8aEKnx/LPPFT4u0Vl1hDzcaBE8Z0p
PxX2RKxq7Mb8UdKJDtWCVFih4bgrBO1/IWPUbDEVnDblR4uif3scSPoiQoXn
br+HA7B+Lpms0LIQpYJKbk2FI1po1feGGnEqUHpGw2zRyYJpxywlqcBmhMvs
Q8ux9gvWSlNh2zf3jGPorEapbKvlVGh5nCmYhNZ63WFSJ0eFl7u2uXDr9d3N
W4PWilRo+q59UwS/bxxif7F+JRV0za685vbbuv3i8jaqVKAmbCmqRdvrt75v
WEWFvmKjBztwfr1yN5ywpcLyTzmB1WifWbuJRg0q3M85ps7tbz8GRW7ZrafC
Uf/rNXPo0M8NG5s3UCFsGa/NW6yv+ezY5l2bqNCa9v1tOMY75rr1iZYtVAiY
ERbcg/mQ8BNavEePCs1lBAluvWTYfX3aqk8F96yS2fOYzzwJc3LbDioYZGpR
PuB9h5Bh7NphRYWJLZ+pwnh/OnBpbtLBhgqma3QzUtAUr4+3O+2o0NY2tCCL
963fqw3bvtlT4dVuco8k3n8vLZoOcHLE/Kno74pHC3Hei3Q7UeFq3tfAOXRy
c9gLZ1cq7BtNNAnA+5tcvp7VdzcqeA4nfu5GZ936TXXxwPHkWcXuxvueVujb
qB4vKqy6ej84Ef3OOUT5gA8VrvcITL1HGxts/tR7hAqHXkavIKDrFEbd3I5R
oXhKuucb2n7+zd8+PypEVn3QrUX3kk6mHQygwhehsxtz0D5ftHT7A/F5g9XX
QPSPpz/a3U9R4e3i9dNr0KGxuUEDp6ngVbOqsQHHN3/CT9QzjArXZjdtc0PH
7NZ4NRhOBbVCB/PvOD+JTcydXheooE+J/WGCzpB8xhi6RIWam52b7mK8Vk0e
uep9GeulbItUH8Yz7/sqNXI0FWy8n6Vw461XTqk8dA3reX1ofwzeVysyn3hQ
Yqhg/KxqZTreT60jvWd84qmQnyS29Tk3X4eU71ETsd5pHmrvMJ+TP+QlGGlU
qL/ycg0Z6yX1AbMu8x4VHgd6G33D+tLZWxzpmEmFRN+wya9Yj6eKdo9UPaHC
s0uVVk//O4/IPz+bQ4XOzPGhFDy/5MswPTc+p4JMw1U57nnqZ/jl1vt5VCDu
rD3piOffRM3d1x3y8XvOCu8M8Xy9vl/OWLiICts38vnvx/N44w3GZGUxFcK1
da9dx/O7H7x9HfaeChfcCvnb8X66eCzy6IZyKljmn2PooJ9n7VKifaRC74Yb
G/LxPmC1X64ro5IKOt0/eszQdEFG4r5qKji/uMP6hfeHq++LLBZ/pYJJTrz7
W/Qqv8jZijoqjDc06iajq+V3FZ9pxPUg53zqGvpQ84oArRYqvE7RkryN5omg
r6K2UaFEb8/yMvQj7SLivQ4qxPJ9uPwHbUyOuG3fhf1jOmTPHvz+QIqd3aIe
9LuqsnPoixYr+Cv6qCCfGbqHD8evMEUrDx2gQkfxUoNMdPnzwpD1JMzvQuw5
a5z/gQMRmhQKFSIusMUFMD5/Rewo6XQqnFq3cbYdfffj8oy9LKx3YRfjQoxn
l3Kh8KefVKj2cKrJxvtAaPulz6dHMf8dmovfYz6krtie05ygwsFztCdEzNc+
BpV19y8Vhg8KfHfF/I7eLXi8ZwbzefdESCHm/6bNJVfBeSqcE3x3WAH7R0ue
bH0IPw0I+sP5m7F+AjypkeuEaDCtUbqWD+ttiUSBPmkxDZ5nf6qtxXq0OW3z
fLcYDVL1zpzXwvr/anDxuoYcDd40pZX6HcTzxY+dxkMKNOAV1j5BdMf944HM
1J2VNCC28ZibehLBlCf/KP9qGij9sz/B9sbzf+EFpXJ1GlzzaCtd70OEyMM7
u4LX0YAsu/P46cNEWCkjc2OtFg3yvAfdXxzB81Qt2WJwIw1q39icLj6K+2n4
m9nUzTTQ4o1/ddeXCDPrLhTb6dKA5PJI0OEYrj+idQCfProoLoqKNrghvbrM
gAYbJW2Udx0nAt7NiUE7aNBwZmAwAX129PVtdaBBwYBVVRZaNuu83YApDWg2
174ko985WvOnWtDAtzyd5YSOtSu9pmhNA5NsF9l/+H5383WLn9rQ4Of8kefn
0drbM+I37KJBcEvV/e84Pj6dJaIle3D8Yv4TEuguzYs3jffRYKL68Bt1nM8L
tZ/L6hxp8HYmvXoHzveCvGfqXmca/KC8rsnC+OyRbJPtcaVB0cFlB6cwfqoi
Jve8D9Jgse+Xa/pe2I95CxXYHjT4xVtj4etBhPtjKSr/fHC8vwoiEw/geZ3g
rKl4kgYSGQbsGczvh/q6vJwgGlA2eZe8xPwnVW3T3hBCA7MDXcstcT/RLZDX
NT6L3/N8dZd734i6OWjkHYXjXxxrrYfrY3/M3irWFRz/dOUudwMiaERWmZ26
jvNdp65+m/v/VwKzrKMTaOBifslp02YiyO/x3ZdzhwaDPs7PNNZiP7H83qmV
ToMYK57dravx/G600/ldBg0ijvfUXVEjwm29sh6jBzT4Wj8oa6NCBN8Nmgdr
H9HA/ZiU4cqVmM819wf2ZNHA1CJsM78ini+Vlnp/z8HxR29Kb5PD+pK+RPF6
ToMNkTM67ivwPLf01xHWSxqsJKwiCy3H+7eAFzM4jwayZ14+apPB89Nsm9/0
GxpIBSYGlUgTYcNvk+GoQnz+odn+gxT2i+HCQJFiGii7nzAflCRCJ1VtLKUE
62nfUWtl9DPi7dMKZTQwz/jkHrGMCOc6BaayP9DAU//0lRkJIuxqOhOuVYHz
07j+IQ2t/IXxr7iKBs9OTgnYo8fLXS4ZfaFBp1CN11p0bVH9wtevNBD4/atJ
EX0v1yB6Tz0NjPTO2mxCB2TlCnxvpMHFRveeQ2iTDIUYrxYaZJ4vSLdFS6Uk
CrPaaDAkXntfF8fDiJtLCO6ggaWVv6o8jrcsKlBs+hsNWpQer5tBJ54bSo76
ToOzaUeKv+N8t/h9vpPST4Mt/pn7rmB8Indee1TMoAFk1eXmYDw7PI+7b2LT
4OMxNTlPjPfqM3ZyeT9ocLqFtFVKHvv/k2W3s0exX5yLvRysQATF0t97lSdo
sFB5Km8F5iuo9fvS+5M0yHlWEfMRLT3z4HrKPxpsW7mjt1cJ870sylxsjgbV
B25cjsF8l609whO/gPbd6amqjPk2tv4kyEeHrZYnQ56jPfdrno8SoIPy5MxH
OayXghOi+nNCdLgU9tsoHM0fNToRLkyHfQ3Ok9Vo57udBb+X0OHeTzXqNPrF
65KTwWJ0cKG6LlJSJcK/L/c0hyXoEJf795AWenffReYxKTpsNuebWIt+POqV
Q5Whw57XZ8rF0eNC5oe8VtCBxHIopeL7LJTUVxLl6cCcvDecjb6rI0x0VqLD
4W+2LvZojs3w3Q5lOqyLq7vliePf4d22f48aHZR63Db4opPCipY1rqbD9/GP
GZZocuKdVsu1dDjQ+7N3FuOhmx2e8HkdHR4n/OQkoK+XHdxppEWH18IfW8Yx
fj1txoJlG+kQ7XggejN6PUO1Wnczvt/v6+KdGO+IWYHIAh06RNjyHNqK+SFI
srZrbaXD8z/CCbOYT7V1TX+fb6PDnWDK9QzM9xl4827VdjrYvIvbL4Hrp97p
VsgjIzrUfF2Y8MD6kA8I1VYwoYNQlsXRK1g/AdEuw2lmdBC3dX1xGeuvMt3w
paQlHQY/GX5yEsf7cL6Sb5I1HULmfmTzieL+8ZVnlYgtvk/BLMJIBO+DROrQ
tV108Fk55zKwCO9r47WZvHvp8CGtXVpJEPvt4twDl/bRof1qZfEsL95fVt6Q
nXakw1NWrf7F+T7g0QvuDHWmg14188H9f33gaOeYPOpKh6hlaky3qT74e1ZO
hOVBh73LqGplw31gmzRbe9ibDh2f/WRcmX3wIGfoypAPHSRYwj/SyH0wWl5t
cvAoHUSufsk+Q+wDs/anc93HcLx30uD3tz5IZcaWO5ygg6HSlQrJ1j5gzvmf
bQ2gwwn5OJX22j48L20Z+3oKx7de8vzpkj4YNJF5YxpKh9U/1k+PvOmDzS5/
T3wKo8Pdd4XMmmd9cPUkca3BOTrwJ2Rbjj/og+4rFbTiC/g+f16p8NQ+WJfx
5MmmCDrUOTftdY7vg4sFVz3zLtNBcTfvbGJkH6gO2PZkX6NDsVthFv/xPoiv
3p7vFIvz/2mhoO7WB+PPta4vSsD6qoq3vmLXB243lDzKbtDh7bfotQo7+qA6
REzXP5kOUus2fPi5vg80XRdElG7T4c+nOL4Z+T64bTRKbr2D9Xg7fc5MuA9m
1cill9PpYPzyQN7XqV44srjj5pb7ON+1D38XDPZC889qX9oDOhRtFwk1augF
vc63RmmP6bDe5nDgjaJeEHp458f0U6xX+/7Os1G9EHjlevWrF5h/21ljyWO9
8P342Xser+jwykh4TbBdL7zQOWD9uYAOzyQ4h8IkekFCznbl6be4fkc/la4c
64Fz84aTq0vocKohIj6e0AO2DYrZsR+wHo/XPcxL6IEfnqT5vbV0uNBsUbhs
/DtsjD9WMkjEeGc7Xmx41A1pQa43kgfpcP9+57hJaDcs7Lc5Ykamw+eM/OOn
dnYDQXk9nvDp8DvvgsPcSBecevfr5MkxjFdx29oovS7oyxiyUP5Nh5Ldz5Yd
FO4Cs8sEhfYpXP+aNez2gW8gaVfUoDuL48/rOpIW+w2KSWfWzAox4NO3vdfP
0ztBsdZ39rUwAwyue1O2V3TCtVcunV5LGfDofKlWxt1OcA4ziPqyjAHHtYwT
N+zqhIqDmq5npBlQz/Z/4rO2E9RNFbTXLmfApdYjvzVnOyBJfalQrxwDzket
SvjX2wF/lsz1xysyoP+6SZxEWQd4j/18u0OZAUWDH34F3OuA+u7B+F+qDFgU
d+eD+IUOSH9Stc1hLbrrcIKGWQfwxBSKC2gy4G2Ya9LDtR3gF5DFeKeF3z/x
6q+bWAcY6l9NldvCAEfbAP7nQ+3Q7SO39YEuAwgj5lKZTe1wOunNdxV9Brjk
S1i/Lm2HPHqPvMYOnN/FOPnVae2wc1ngx1fGDMi+zUrRj24H+g5+T21TBlgz
YzuLTrdD9PH0hSJzBoz0Rd2pONoOK1M3PNlqxcD7TmePm2s7lFdWm5XvZMD+
rEsPYuzaweWHC83IjgFCYZepFtAOyWbRay3tMR5zNyeCNdpBK3B5Q70DAwwL
Mz8NKbVDw728E7ucGPBPgE94SKod+Ma6Xzu6MSA2sXvVTd52eKgYsPe7OwOc
qiwnYJoA23fyjrl5MWBVqqhF1BgBQh+t1/U5woBmhed+76gEkGiq6qL7MiDy
a6cupZcAr6eczvr5MeD3po8MUicBbNV+rPjpz4Cc3Qvtq1oJwNh9uTw4kAE3
FR5M5dYTIPqcjPvvYIx3xp39YV8IoPw0d+7saQa+l/XjWgUBPhLg0cwZBjzN
S/vYW0YA19lvJpHhDDgLj2pPvSPA5NoTFL4L+P0rfCJ7CgmQ4rhw5folBlSH
V10PfE2Aptx1dTeiGTAZtkvr4jMCHO+uOL7sGgNokfJOftkEEODbL3InhgFi
hubvMx4T4MkG9qsV8Qw49bTWQeIhAYwPROzOTGSAaHXO2sb7BOi7KjWifJMB
1JsDevX3CHC24EVy9i0G1N7N6He+QwDpfqMta1MZIExus6XfJkDBos7O3DQG
jBOeO91PIcAuneNnNt7D8R5Tmwu/RQC255xs0X0GFOSAaUQyAa7Hp5TqPWTA
1dgF1Vc3CaBWstat7DEDFiR9Hi0kEaCC/HFmRzYDlCyOlV1AHxR1eFD1lAFD
CuLByui/25jGFi+wnjIOfOHcIEDqkYukulwGOFRavR1Ab0peFm33moH9txv+
ols+PFvVls8A57nFfob49yeY2786FDHAXnZwYw5aSKrdt7uYAT+7nG7p4Xiy
jH0Xu71nwMYdwcm/0HBi5uVAGQN6ZcLouTj+/jvJdoc+Yn1dXlF8HecX/nnN
T1oFA8rUvSLP4/ylf5YnHf/MgBWLbK2vY3wKV9hvGv7CAFm13iW5qQTYY0Fv
D6rFeji7tIWO8eQEnT89Uc+A0UW0eIO7GJ/74jJnmxjQ1OFl+TSdAKvqckr+
teB8eyJnNTII4L6ybZq3kwHyt/O8wx8QQEwu5N2HLgZIhy9v8H9EgM9SMqfO
9DAgfHbg0IUnWM9ipVraRAZYqvCsf471oC58kMUaYMBF6qXVI08J0MM/n51F
wnhbuexxfEGA+PnHXu5UBrzm01El5hJgx7S5giwD62Eq+P041tvIBKO7jcWA
FANWkCTWY9avuJS4Hwz40Jhua1hMgP1srT3mvxjgnhttfeI9AUoHQ76WTGC9
OPG9oHzC9dAw//bBPAOkXAv59ZoIoFvzJMiFlwkCHlqjD3D9MCss1i8TYEJQ
AWlerAPrqTg+66owEwrMJqOFcf3JPJK95S/NBPOZ81crGQR4Ebox0ECTCdGL
aettedrBLah93YQWE+gua97t5m8H0ROh9DxtJtQJrV5mLdQOIV7l7ip6THjU
5vrVYGk7rHbzWNGnz4TkluD7NuLY7/bzfLttyAQXiqL4asl2iN2bfXO3ERMm
RD1UGqTbYbutld0iEyb42m9u27a8HX5ZsIU+mzHhzct7Cqfl2uExJFaft2RC
s1yaYLhCOzgYakfo7mTC58fqN6yxPwnodRj8smVCgrFdEXllO5Ron5l8vpsJ
6yb4z1iptIOf5orCQ/ZMeFxh33VGtR0U13wIUHBkwo/HmzuD1NqhVdlTo8uJ
CaIZzwJ1V7XDZXleWpIrxi83//kXtI5MzqOdB5nQTtgVobS6HRji1gf5PJnQ
9PwL9QY6XYQj+9GbCbtPjNFa0baCNzrOHGbC993jyTxr2mFuQTtJ25cJfg61
TDV0wb8OG/ZxJgiGn2TroX0mzwhm+zMht4J5xwAtPbris3sgE1zV9X5uQNdx
PlyUPcUEsXynEUn0ebrnNsJpJrS62mSy8HtaJN7fcWFMuLtK4vcb9GBfTr75
OfyeeO7UUXRyl7X/3AUmmCkuzxFFmxE46u8jmKBu6zL7FOc32XiDEhzFBKl7
JxY2ovuXdB2fvcKEn59/LynC+FTvUhyJuc6EmC3vPwuhk1tzZx4mMCGWJNXS
ivENEx+P0kxiQnHgHcE1aA97g8UlyUzY15wtEqLcDpodddItd5hAnvQ9P4r5
kpASv++azoSuzwp0VfQfR2dVWgYTDDw8FG0V26Gmi7Zh5hHOny9mNEK+HTx7
ea3X5TLhl2Co9nnZdrCQt2kpzmNC8O6b84dk2mH9wWRHk3wmdP/a8ewL1pNk
5vfepkImkF7VJz7H/epv/0pvl2ImxN1YpZOE9ZdC2n7uWgXmK/qZrYVYO9Qy
z7widzDBzuZKsC7Wc57Gp80nu3D+Qoe/GQu2w20/gdK/35nw1Wb/1BjW//lc
O+OrfUwwPVM+IIH2/pFSIz7AhO36C46b+drh36/8ASMmE+RUaj5XzxOApP3n
cAObCUkdh/h+zBGgLtiYs38Y15fCYLs0OnW8ecp/jAnM4BClkzMEuKAjfenP
BK6XS/H37v8jgE/oQf4rU0ywVonKacL9dee7rDixaSaUHHA2nvtLAO0ptnjG
DBOy14kc24SW1d+ctmaeCeLJmSuP/iHA7NlwxUIeFtQnEM+tQDdOC62rF2RB
pXJH/s9J3G8M9+Q7LmbBQmPHl0Pouxfu6A2JsED2fZRG/28CHJlbZTYlzoLW
fRwqdQL3Z2P/+ihJFgTx5BieQm+OLNojKsMCxsgSigB6RdX0t/TlLNiqotb3
cJwA8zymB1fLs8DrFkMNNzWgmcaS8xXR5gc+0vF80BTddmy7Mgv0t55/loJO
F/AMdVjNguDB2oCFUfz7w8v12tVZcC3Y5kIV+sgXwuTedSygSkiRvNCNavEl
revRkuWyjuhN0eZnd29kwfZXqSet0WnkWf3mTSz42ZtF24GeNSn5a6vDgqmH
tAs6aJ/HQWUNeixw/XdAZz26fkHj/M5tLJAa5luyGr3Ri2JYZ8iCNaFDfCvR
qRX3ZyyNWJCcMiIvh/6n5PSxBliw31rHUQbtfUnskrkZxicl95Ukura/zqja
ggWU006rl6G1dkTNm1izIP+HzicJdMp9w8pKGxZ8m7YM4z7/828i0ngXC/Y9
TNgrhXZ3e23yaQ8L1vYK2Miiq8t8eXfsw+/lFvrIozXkVKrLHTFel7/fC0Un
hfdGGzizoHD06Obr6N/fU8xLXVmQu0iHkI52098loH+QBZ5fjcPy0OpTFdd0
vVkwoSvZ041OdAq3euvDgk5G7+2f6PHizYu2HGVBIJCcBTE/FadzYrVPsIBA
ezGuj17d6WHzJoAFdzf7Nzmg47csF9kQxAK5NQGvAtHOY3EJmqEs2MmjGfUS
/dHefNfLMIw/kxFWj1YrmF2qcQ7rIYxymoWOFS9peXaBBTw8L7emYL38CgxK
WhPBgpXbe4Wfo/e3auzNucwC3tuFs1Xo8g0U8VVXWPBm0RZxElrlxn3Ck2ss
WHXPzZRbj9eG999SicX5Wq+/vQHNsRNzeBTPAh/JHAF3tP2rOsmVN1iw4V/N
nZvoEpGozsybLKiav2FVj1Y8YZiqkMICRZUFWaHf3P12Yn9GKguMPVcsskGz
NF7LyN1lwbqyXtlb6GKm8l3ZTBY4f91/ZxOuJ3nrXpc7D1mQHiYmEIu+/Cxl
hfQTFmRbBKfQ0AzBXb0p2SzA7mZiNYX781HBjGXPWOA20UnUQRfVVLglv2AB
vLximIlesTpcQfwVC3J0V/zmx/VMo3AylxawYKRp5Gw72tYsxyOhCOvp+xYz
fewHBU88Voq8Y4FhmduxTPRFb8KjReUsuD7rWn0E+wmlMs77+kcWBHhq/63j
9hdlc1XBSsz/HU6sJvYfqcF3WXw1LFC5Jv7hJzpp6aVL72vxuYjKVWfsVyLb
LVwDGrD+tvyKr0Bf91uio9rMgpmZc21rZgnAl94h2t2K4/v9WmcCPb5vJPxl
Lwu2lQjmTGJ/DLxc4ujZz4Ivp19VX1jA/Ly5tFFqiAUZJfEyAnj+IC9ZSrtI
Y8Hq5kkXBbxvEL5q7LUfYUHR1oi9R7D/7vo9sk5wHNfjylHxWXS92nuB8t8s
eJ9wXyBNAPeLfRFDgX9YsOVRjfsYujLSsnzVPxZklmoFX8L+bvhm6Z2eWexX
+/bKC2L/L+nvDLqxwAI+P62Dseg3Bj5r/giwQVNW9knUItzPjq/jyVvEhthX
as/+oJ+ljfZ5i7BBpopt6re4HR5MRCQ3irOh2ve5EQi3Q+Lr+zMP5NlwNJdk
WSLSDov7fbodlNhgbfCZR3hJO1wV0SxcpMIGgwdlf2PQPAZjCR/V2GDiKMju
RF84Vup7ag0bsrOUXyri+WrqTqSpugYbDiUsNvBBh9RYKRI12XBOtCo9B31C
tavdYhMbygcy6pRF8byyNzNvegsbKOsr0lzRPhGHY97oseGIVIFeEnowT9Pn
8DY2mKUG51ShDxDHdqzYzobwNwuUEfQ34bLlLUZsWOLjMaaA+6X9tsvjUSZs
+Psmro27fzb7WrdsNWcD3Ll66QR65x2xFz8s2UCW3jOTiK750hX9eCcbVljW
z+1Am4xnejjZseFTofJRB/RHlSPbRPawYdWylnZ3tP7e9VKV9hifwwRzrosu
jf887cgGrRfrPtijN+aV1Ws4s4Ew1KNviM7tu5w94MoGHZHBshVodeGdESkH
2eCy1sB0GMefpS9+wNqTjfdwTksxeqVvt86sNxsGDMa8QtAZqQ/ECg9jvLX3
/FmNlv1yhH3Ulw2Hl/OmNmM8U8bW18j7scFyXHirH1pMZeJhmz8bmJXHB/5h
fuL3lJ+7GsiGnZeV4qPQgpei9hucYsNTq7ZDsejiseHpytNscDuiFCuIPuLr
+sgqjA2Oh765XMJ6qNmrzXG8gPGdvjjhjvUSWpNxs+8SG5puB1bWYD2tNhDS
O3SZDW2iDbpr0VfVBiIDr7Hh0aNShX6sT927O9dMxrDB//3uGxvRtCXFjRfi
2XDhjd2LC1jfFpPxMnE32eBjGN0niPX/22+qXDwF49FWPmaG6yVn8JB3Wiob
nMzdi87j+WW/Y4ug0l02vE3zVXyN602gftur7HtsaNk7//IOrsfiHTn2mpls
SFXf/esLrtcjheJTBQ/ZsP3iK8nfuJ5rMhgmFdlsWJOTNnMAzzdXTqZ297xm
QxBDfc8O7B9bKAsXvArYoF08lnKO23+c/VUZRZhPnub3pdifzEzMAibes+GV
bP6THdjP+KRGecWq2dCnqz3lhv21KObg89QaNijUyenSsT/7zNbuUqhjQ0a4
HyijJU9tGX/SwIYesg7pCO4H1fQHdzWa2fCd75xsCe4vIW7CRvmtbEgjbqNI
cveftlCKXjsbpANOm1/A/a7DnBTzsZMN+4s1DEdGsN+X2m0w72aDQ7FrbSB6
y4b3HQ09bFgWwM+a/oXjf6IWbk9kQzJR41EyOkU2Sen7ABta+Rp+bEGbJUxX
e5DQZGoL6Sf2v4Ujx2kUNiSGn7PMQGeFEkT96Zj/ujgHL7QDe/vbMSYbbFuk
J7XRvJ7PXcM5bLBJkN+wFF3QITk/P8yG5mVhb9qG8bxhHZF9bYQNupwfj4rQ
Eh/ZO5eO4/y27JZ4iK7a5PQr5TcbRjn3Fm6hg59W3Zb7wwYLqY6TSWgVeS2D
x9M4/leTbrfRhKS7g+qzbOh6K1D3GH2Zn//q63mMj9ZCYQl6U3jgOl1eDthK
0xW60KTh3tZyfg6cDygRmEUnH7IMNRXiQLbu6YD1OF6T7gK5+sUc+Iq3rsPo
UVvFyj1LODAknV+ajX5cGXOkS5QDE1obHwyj7XUnhN0lODBfnM5jjPHjeemZ
T5HkAP/rX5S76Nrh74GPZDjgHNY58A2duGnfRvcVHHBZlBF6AvPjENr4c4UC
B/ZkbzXkx3wuLzV/3aXEAUPblxsfoftnPgakqHBAYXZsnzHmPwu2au1dxYHx
UokcEnpjncareg0ORDoSvm3EenKnjz97Y8yBT4dLtJKxPtXWBfj6m3Lgw6Po
SEesX1YAfY2GBQf++t0lS2F9n/79PeeJDQc2vszoTMD9MJ7/U1bqfg7c7FgU
5Irrw956q88+Fw5cvbxihwCuH9mEfFUxNw6UfTy14jU6SzLrcYwXB0hDc/OT
uN6OOyt4W/hwoKN2k3AarseNGanKvEcxHjvy1HRwvf4eEB36dIwDvtpCVmtw
PZepxjw8fwLH25xZ+hodcZTHU/8kB1RY0p7a3P3w5Tml30EcSI4K3JqLFvk5
3l8QwoGl916arsR+QdgUkHnyDAfSNtZGJqDTQukHNcM5oGlWMzqGdi/1VGCe
50BzZ3bqPuw3eFLN8L7MAd1Ti87McvfLK40HlK5w4N/FhEJr3B9D68zl+q5x
oEVoTCURbbjkU09aLAfyxLZ9aUAv7Nma7pjAgbup3uk82N9qUvJdJJIwXukn
Hm9Cx3drLG9J5oBWo2ZXPf7eXj6rO+42B4RcdzoL4nNZT4U0qzQOnFqa/UcX
3f8k1Yn/HgdOMg3LXNBZdFGZqvs4Hpb4/ZPo4+tivl18yAG5ZWoPwtAbTvKk
GjzhQIPXqcoQ9HjBOcepbA6IdM3x+qBLf49Lvn3GgYHguiMW6IhtAR1BLzlg
qtPKlENbXKTf0srjgL6iZAIFxydS5bmP/YYDFetv73mIJvD3SDwr5ED3oX1b
dqPTrPcRfIo5cLli19YRjNfBhMabyu+xnkyvuV1Fq7SZ7+0v40Crw5sHq9AM
yU9i9z5yYCpPRUgN45/nvLXVqZIDpRubR6UwfyEZ+Tckqzkg01PgMY318H42
I6a6BudnuarxO9bLrOf1qJA6rO/9e7VysZ5iVnmc6WjmgLrHt3ZNrMfmazuD
ottwPE4bZHrxfCbJ0vHb0sGB/FHYcwHrNzNPxCPlOweSxFOe3Mf6J4tNOZv1
ccDodvsHOezP6qfI9uP9HLyXNDYl4HnWv7PZNmuIA0pXLrWP4fop0Cu1cKBg
PTe45XmyCTB5N9uYj86BV0d10n/TCWD4L2lbEZMDxPNfenZTCPC14qiW5E8O
HFkm4mrbh+dL1X3q1SMc+JxSlfazC9fPlR0qIeMciLixUXN/OwH6rKWkO/5g
fY5s2utfRwDl3HnR6H8YD+evJIVq3J+WchZtmcP1sXVZ3c2PeJ8gVM3c4vsB
mw+33fpcQAAdnbxJU8Ef8DrfNCwylwDhd+6OjC36AYln/PN5cvC+8/+KuPN4
qrM+DuBkuckSka2yjVK4E2UJzXyjLCVFhYmuipSEqJTIOkQpQyVKY2xZGtmS
Bl1+drIzJCE99jmHJuOWUPc5v56e5/nz/Tr3/s73+znn3Ne5//w+hk2lrkAw
59bxpPJ4B/A5eI3YiCIorysK3XWQ3JefHx7kFUdQIGOqFWFC7scKpi8LVyFo
cYqsDN3cAd0hWp3HVyNQSLq82VCe3N9H1jRLyCJIblkTkresA1imjLoqeQSJ
46+d2Z3tkJY1W+GzDoGNwvDV+HvtMCE09IeyEoLTO3Z5jB1pB02PpqJOFQQD
e5dLPl7TDj5txbmh60n9OzUDcE8blGilZGpvRPBatSAjPboNjDkX78cxEWzO
fGl0eaoVrto73zHWQuBjFpCTENcKLaVWMe+3IHjXEdTH1G0FibUGUam6CHTv
n5Y5seEF2AWphtlsQxAebTBaGdcEScMrr/AaIcjYvFovlacJhk0WfQt/IPVf
XRJZfr4R3BldpyV2Ivi4d2b3SecGyD/NdqkyReD8fD6f9aYe5pqzWT4WCFKG
xJL6j9ZDcGywTacVAjcjJx7XM3VQO+tuGWqNQPFigv+5D7WwwtbOVPsggmCX
gcsCEbWw/5kxvLVFMMjH/LJOphbuyDEN4n5CIGp/jfE8twZeBchuNXZEIM56
H//GtAYUhviY71kImkXyNQTiqsBlx7sNqccQnDtZPXrmfBVkp/Ur2bggaFgV
1adiXwXT/PXyvCcRtErwMNS3V8GWU4VShW4IQl3UvUNVqoCtEbVcwgvBzJf4
WaV/KND7U6b1ljeCpea82e4hCgquZMVJnUcgrPZD5O/NFGxar2931xeBurhx
QVYpBWmt9fKyfgisI8s8G7MpWHvR7s09fwR+N3IqRe9REK8wnr4mEEGeoljm
pesUiDX4uv0ajADvmFQSDKQg6qwAUzEMAfNvfa1Sbwp4ZePfp4QjCGB+7o51
pcCfUi1RiUTwkt0bY6hOkX1b7J9xDcHoTlWnK2oUeErsgg03SP8WOtweVQrG
S7v5smNIvs2C58xVKDjm7NK4KQ6BSGtSSYciBQeehNkw7yJ4aCn6VH0NBc2O
q6TzE8l+b5zyWpSlYBd/Wr9WEgKj2qiFEWkK9G2rXHRSELTriUUurSJ5fLbe
WJKG4NXjuUhNCQrUM4ex/kOyH9J/dbiwkoL0fd6FpVkIzsgIcbtFSR4fub5G
j8h5E9L3tRSh4O5vvxiycxEs+qux+1dQsNJCkftjPgK7ufkkNwbJ4++8GqoQ
gVaysrijIAXL7v0YZVJMzsPn1PpjAhQEGLftrS0h67nKv/IyP8ljiiVhVoog
bjBn4SEfBV63pnsayhHMs7T9xpZRMGEYeH93BYJld8S3bSM+NiJytJlCkB9s
bpjMS0F/9IPvrGoQ8Cj3BskQH9TRnGyrQ/DPpecCGTwUtAyU51o3IogOX2jb
SWwWYenT9QLB9ZtKT6e5lVDJfK17qBWBaeCitT/xtl73hZ52BBZ9ET5M4qKg
hQr7LgS/JFdKM4g11K7//OpP8vvRkb2Ddka7nIXjSwQbWcIDd79UgoJfjsjg
KwS1mqs924gTlAw6nQZI/R/2RPKSz4s3NcYPDyEY+SNXXYv4us9PDs5vyXnz
NbR3IOaTn1QYHSHzacyJhBBfqb404jqOyP/AV5apxBx3RvbEJIL6cCRZQewl
meBxGiHoVdvk2ks8Wb5BG02T/mpvwV/Ex0+UcDz+RjDssDH9E3G/iFnZzCwC
D86c+TKSx6GnPUHeHASGZShMgLiV5bpz9iOC/gC/MEE6L0EO48ICAkvDJDN6
nMoLb+EsIbjJOdjOS2xgLxV3iYvAxNHUYJ7Oi5tu+4kXg+KWkGwGGdfM3iof
wI8hwn4ilv7+Q+uaoSVBDOxAqUI+YoVPB9KDhDDUZzCE6HoSU/91ikcEQ0oL
lchDLLHnnGaYGIaEv4KpL+T5KVUrhQ0lMBTb9ScuEWsZPJ56L4kh29phboFe
z4I9jTnSGHz6uF10v/s2TmYel8MgNvNCh/bgbxERcmsxhMaVy9H2kPnuRKcC
hqbqzlDaizGUyTVlDOOhop70864LOikbq2Loa/N6vUgsF7TInd9A6svhtHwm
zuYkDhVswuARnf61n22eemw3TQydDZ7v6H4aRruTlDZj8P2kBLTtjvj492lj
sFVip9D5jXeLHY7VwXBhu4kUbV/LXH0LfQztVgX36P75a3ZL8xhicD/E0KZ9
23Bi7tl2Un9KTDGXzK9SFN59FjDkhg2r0y7cpFKkZoLBZj9/HZ3XjtTK2De7
SB6CC2G022VZZxPMMYhmV52g7RS7YLV/DwZVHUd32jOMRE2GFYZnj+pv0w4M
1hWu3I+hVpj/LW2Rj11TFw9giO70KaDreeDl3fi9LQahCr3btDXGRbPG7cn6
1Ar60S5j/R6R7IDh5thbJ9q7eyxO2LEwxCs1mtPu2ztuInYMwwvf0i20T9X+
rFzvjOH7saeKtD8YKfMEuWKgvNhitCOeVAzpumHgXZ/CpfuV0jjCnnbHMJjy
eox2RtqnpIeeGKRtmB20t8on+LO8MTzSja+gXR2nc3j1eQwP9kkW0j4g1KXf
6othKikri/bbkLPSEX4Ybq87kEbbe16Esz2A1KN5WJKeP2bCvCg3BMMR2eUS
tHN7w86uvYqht2xJlPaLOrbmjWiyPyT1V9CeKp6fWowleao8E6Dt7DM6VJaJ
YaxiPQ/tAWZH9+XnZD2rO3lpm40zlvJEpyFfQ/XreEEyqI46TUO1Ke9XC6qV
3w/Jm4YPHO7X/ln5ehLrvkyDKPc/9pL3aLpyaAamvjkkIjV04NEMcL9Z+tnR
GN/FmW/vh6Tg8eS6JLG97/5nlXApC0bm/52gKPz1vYb/9b8BiLakJw==
       "]]},
     Annotation[#, "Charting`Private`Tag$119180#2"]& ]}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0.12497847435166831`},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{693., Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.704514072730838*^9, 3.704514333871315*^9, {3.704514381518156*^9, 
   3.704514454792198*^9}, 3.704514563777607*^9, {3.704514965034604*^9, 
   3.7045150170015163`*^9}, {3.7045153116477847`*^9, 3.704515315624614*^9}, 
   3.7045156496808767`*^9, 3.7045157105130816`*^9, {3.704516180907201*^9, 
   3.7045161990340624`*^9}, 3.7045167254839897`*^9, 3.704523721799568*^9, {
   3.704963682169365*^9, 3.7049636946642356`*^9}, 3.704964541257534*^9, 
   3.7049646219808702`*^9, 3.7049651902564898`*^9, 3.704966436996997*^9, 
   3.7049669534508095`*^9, {3.704967582265435*^9, 3.704967590514289*^9}, 
   3.704971484858272*^9, 3.7050336248435593`*^9, {3.705376845431232*^9, 
   3.7053768557965937`*^9}, 3.7055911323648295`*^9, 3.705999360495189*^9, 
   3.7060000286930485`*^9, 3.7165436095519047`*^9, 3.716543717080814*^9, {
   3.716543757257153*^9, 3.716543784661614*^9}, 3.7165438356195602`*^9, 
   3.716543898866392*^9, {3.716552043616804*^9, 3.71655205510218*^9}, 
   3.716552129832231*^9, 3.716552178429742*^9, 3.716552783347816*^9, 
   3.716552883019836*^9, 
   3.716553058242547*^9},ExpressionUUID->"982880a4-87ef-4510-8ad5-\
c6df8a25c382"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"U", "[", 
      RowBox[{"x", ",", "0.2"}], "]"}], ",", 
     FractionBox[
      RowBox[{"numsol", "[", 
       RowBox[{"2", ",", "x", ",", "nsteps"}], "]"}], 
      RowBox[{"numsol", "[", 
       RowBox[{"1", ",", "x", ",", "nsteps"}], "]"}]]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"Exclusions", "\[Rule]", "None"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6858574887150583`*^9, 3.6858575088800745`*^9}, {
   3.6947618749828544`*^9, 3.6947618763438215`*^9}, 3.716552813228059*^9, {
   3.716552913912675*^9, 
   3.716552922139632*^9}},ExpressionUUID->"dc457375-fa71-46e2-bda0-\
5d7c74ef3b0f"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJxN1Hs01OsaB3DXk3Zn04gYhdzLJbZEoh6hEMq4t5Ii2hk7ue12Q51p5pAu
7tlt2y1FSrPcMnRj2EglNINcMvMb261hZsKJbJc49lrn/N7etd71rs96v+9a
3/X88WoFn/cMlZKQkLi/tv8+D4cKOI0TPvsl/rdkHNQi+UQL+L933cnOqyY6
4nbt6HucT/TG7RcyX59JDMHNM01ySCHG4i5UPnr1BjEBN02u2uA6MQu3/7G7
FdMzxbg3rNICnDQqcOuRPgmabzJx/9JpDdmzz3CrMAmYpGQD7tphh/Z3tk24
m8j5W46JWnDP6e9TKDv3CrfUAmPjFr023Jarp2q9yttxtydYdLYavsO9V+Gt
VMZu5Ie/B1kdt0P+d3lq4ZTPN/l+QbQq7Zu8Ub4KuQ/ZfoJe+Q97Nm7Kzs62
cCfkyhjiGNsNWWOlgpjrh7ygyKObnvsmb2vl45+N/JFGP1+f/837Vx3XtYuQ
k0khLFEZ8tkzGQa0ZuQ7DO6B8dfIvdMGAa6dyI7xrHTlAeT4xvWMOIwNjEOL
ClN+R+CxrM9L/sjafXPnkFN3MAgOF/IdJ9jgO1vw9dbGCNBMFy6UflrL37L6
frokFlhB1NLHn9lg5JiURxqjQOCuTcde/MWGK3O9RtU6VMjr3fu0XYoDvYY2
ejbsBFBVv3FhajMHwm9+cFhxSwPFR9s/WwAHakuS7ex1ckC2JVTUkMaB48yx
/SGpD0A4z8fem3XBThvF/XMOtVA8+aJNPrUbco8luRleaQV59QdTo6M9YO7d
RM7oYUNyWM2ZQt1emMzcbvZGrhe+2DFGz1L7QAdWbJ+UDUKseQtzc3M/+P9x
ItSMMgT88pabHK0PMEycPTrkNQJL5J7cHXGDoG5FjrLXGgejA+tWzrzgguQ2
by86SwCVjxgG/Y1cuFJCbuh/IwALJQ+SSysXVoxpRqbvBWD7MbvYiMOFBety
aa5QAEdSDF2nx7kw6yXH3E2cgOgB92yKIg8mkuqUJmIm4FlUlnlyGA+6pnR7
j+6YhP2DewK+RvDA84KNfYnFJDQ58hIjYnnAXiaVL8MktKnoD3hQefB2PfVq
qe8kcOufUJV/5UGrzoCldMIkSHw32F7QyIM6v5TfarFJcLqn9WOVCgYlDXP+
6llCsMiW12/dioGXsrxtdYEQtqUujX7QwmCVrK/pUiqERcr7YBljDI5v9huL
ZQmhjHQ90M8OA4VzT6PaBULYJDnj8/UsBhS1+Bvx+0QgMc9TUozAwCDy1jmC
swhEorZu/RgMul4yPB54iqC1v5jkcRkDkyju5u4fRUCp9HcvysBg+NW+IsNM
EfBPNjq6PMfA/WeJuoFxEbT7lEkHNmCw2KZ65/yMCJ665jRFt6z13/YDXXZZ
BJlWsXZ5nRhItQc5/0AQw0GF7bZTwxjUajf3XLMRg7ms8pK0AIPQi4NPNA6J
QWNJ8rmqeK1/5+ccpocY/hoftLKfxyCcohs0FCqGMe7rL77LGBDf2TpeiBRD
V1dNTbgkH17r+hj8M14MDFbarl838EGLnSi2ShdDNvPSf0o38qFTr4DdkSOG
hEdhVSxlPsTF11afvi+GqELfyG41PgSFfFGvKhND4G0HU4Em8h66ehnBEJkQ
MW9oY4HccpChn+qM/Iv6Se0/A5AFcYl5TsvIxiKfDX3uQ7g3KUzLtSwiyzTk
Vujk/Yk73OLFwHrXYdwMl+BC1hfkOaHaxvHbI7hrvJyksxxHcVOdE+8wx5G1
eIf7ixLHcO+1Ssgimo/jDtB4tyDZjTzXljIcSfuIO1smMNZTV4D6YzX3pFqQ
ZS/TvK2jJnBLlAZWDCtO4n6mlVQQR0aOzqlIUWxCfskKNVYUI6uObHlLUBWi
+f305jFHG/nA3IWcDBPkq37BWQfMkNufuafOmCMTtlpfu7sb2fdfunTSHiH+
v+YOKVyStEEesl/6uWofMnldVxjBAbkirP70HweRZ98+PBHljExNp5I47shZ
RBPrDH/keqNrcoQIZMselY7MSOTKSw8ylGKQ73W0qqleRL52XtZEk47sWU0n
mdxG/rj3co4LC5lwONqYLi/CzTVhd1PqkCsLQHc0UIz7RIUlQX0F+UriXRr3
0SfcZQL1XHm3KdQnP/EUdgQ5xFOsV05C3lpXV+nuh3wj7XhrcjDyWcvfZ76j
IGsnKDmvK0Fe2XPp+76HyAPika4SBnK6X/WJQ1XIq4aeMYl1yFxOWoF0N/LT
q/Onu98jZ9mc3FHUj+x6fyfTHkN+frHjDW0C+bbJ7jSSCDlqOM9bawp5u9tP
/MZZZBnJnuL0eeShGhvyqUXkOnKRqdlX5N80N8ytriL/FyRCA1U=
       "]]},
     Annotation[#, "Charting`Private`Tag$120552#1"]& ], 
    TagBox[
     {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwU2Hc8lV8YAPBkRCQrZVWUQkpDoe69j5WZGRllJirJDP1SRmWFhOwVhWRl
Zdx77b13CHeKcqVBWfU7/rqf7+e+45znec7znvcVt3c1vrF927Zteju2bdv6
1bkxN1A/b4rTmo9SXk68hWdRE3abEZKHJT+HhTVtU8yZjMTUMiF1aH24vzfx
3z2Mbs9YaZqQCXj1PIvcGxSGMXP4TYgRcgDzkZMC1Yx4zJRciFqkkBcQT9fr
pC4lYeIy9tVLXr0HO/z2VMGbNIzO7nwMMdUbhF/dNGcYJGAqF7vPfjtwH/a5
644GMAdjogr5pIyOPILYVg59L6NQ/EWx16/nnfwhQP6opk7OC/yj1mSeBpMA
SI1f6NrBmoCXPycbaREfCASNkkDWskx85h6D4HChJ7CWtSIgdDUfH8hedjRM
KA5u+677t7S+xZtbvCpe+v4auC72e984aoTn/Bd4TXN/MRynlWY/jczGSBot
zjU9K4eow2GJd1Jz8ML+muedXpWDBuELvmowE89TmPls54dyyM6dbmd+mYhf
Y798wohSDu8ZT3/Krj3D99d/8JxWrACM49CRX0vx+P9OBv79Q6+AI7kv/xl+
LMG7Wk8YpK5XQJqJdrXR30y8Q8SZV8BbCftGxs33Wt7DW9ZE/KAcqQT1bcRR
gRcxGIM5ulowphJeWkrqCE5lYdQF4aW0cSVcHlF4b8uXjzmvnjjb7VQJwW7x
mbfmijCHM3XC+GMrIZNZNOJqbQlGqDd7ojKvEriYH2SunyjGcG9sHLMkVsLh
Azvf/w3Jx6yaFfdmzleCs6vQaIBiHKZ3t4DACeUPEBqTInVoOBrThHW5MWD6
AaSs3PQ6qGH4KufWSi/nD2BCOp6jVpGFL0o6wL4v8ANgYo46UHQK8Nltvha1
8R+AN/61xufU9/jE5YF864IPoGrWwcPSUIaPOnRsg6nxA5RzBUW3vSjH+/pP
pWsxPsBJk+ISVaVSvEvhuaWv26sguVsz69eBIrz95HOV5/uqQH/cXP/9kTd4
c475mNMnqmAw5VCX965YvJ6CKm1ErQr2GZ+1Lf8XhFG9kXL2vkUVRE8Eyw6G
euEVY38Fi7pWQYEN/RelNBEj8S1H+npyFVQ43Vh+9vM9Zq/YtgdsJVVwqfS5
ntDFSgyXrkX325YqMJf28CWGV2N+53C6Li1VwadUGw3DH3hMt7Vb+UPNamBJ
+tT44vQHTGNEB6u4VTVsarSXTB0uw3yokTBr9qgGWbWPlCDBAkzB3IM8p9Bq
iMs6yP8rPgOTJTiyujO9Guo83L8av3DCJ6if0C0qq4ZVB/me3m05+AiPkFSj
jmp4S20fXrldhg/KJDF+TVeDVcZnsuJGNd6nVwkSf1XDthsrkcfLiXjuExX0
DvYaMLKpD7lYVY9/HXkyYl20Bmhsxm2mWg34gUtHx60v1gAlouLp2Y06/M2C
LP9oixoow2dvpmvi8X859x9pdKkBfYqMZ9dKJT7OOan7Z2ANxG/qzNZwlOCP
dQl4SsbXgLwiz7UKpnR8o0y0kFl+DUzZGIzMSz3FmIdz1ocSa6B75mFaR08B
ZnE+2LFmsAZk/p6/Md9ci3mqvX3XwmwNHIu+PViT3owRffuwTGy9Bjz8iWVH
HhAwpeyrFga7ayHpR9E7vselmJm2bzmlCrVQMlD0UmfWDe991FmPplsLQ/75
C88NsvFcIbM/99jWQt8jLcsl7/f4rFm7ZE2vWsDly49MPajCK2lMKd8PrYWg
RiGn6Eoi3pF1OPJTSS0IX/vslOXYjI9t7pyA8Vr4WXymM3iqDS9zWCPQnVEL
6s/iui8xdeDrHzcczWbCQ+cnd8vlug78FSqmd3gPHhJfd3kGCHXiGapVXmwy
eFh4eaNU07of8yTrjIgiDg/x4b/GA/EUjPD24oZbxniQ6wm+4l/6FVNiJ3Mz
xREPbzu8jkaFfsdoNrzh7vkPD2l3o+xk7/zCeAWkXj2ZjYeQh//tNu//jXkF
sXmxXXgwit1R0cj6B6OYwW3QMoOHxoD8198WVzC9f8OWV37iYaP4rPEdrmWM
gzVrqhQ7AX4ffEtQtP6BWScEqFqKEoA7l6P3bTsDEyO2MffsJAGePX+RGoil
Y6Qe+jwnqBNg/vdQz/ezoxjipx9nv5kTYDgoy2rndCzeFHP300EXAoSrfhb3
Ik3iF1Lmg4wDCdClHtwCBn/wQesO0k9eEqAiwfJ53u91/L6rpL6KtwQwZzp0
sjtlE19cc9X7M4EA2YEzufkXNvEawmOiQoMEcNsXvaI2tob/dN+4SWeWAFyt
8qKJd1fwHuM9t/zW0PnhPftymZbwHEraPEXcRPCLvfW+SWUan5nYXDkjQYTd
RpLal6XaMOf+gBWvAhG41G36XhIWMd1mtcxqukQweKzxvP/TJub6h3P5XjZE
8Mj9VRwptwO7JlhqmONJBHYmx9HbSjzYaO/jv8dCiBCQJ3Dg4LU92COjeWkc
qUS4psNWOvtPGEs4e1j9QgkR7numadrEHMSavMz4cqcZeb2bECYmgv3yS/hF
+kciRHLuYlpOE8DuLeedZmKqgzy9aZzFvm3YaxHrJjTBOgiisT8TTBzDZDnQ
u1pl6+AiTyHGpvonXnZPdfUz8zqojjuvGoflJXgwsk7evVsHSfx3H/4+vJfw
oSUi1/BJHeC7iNWhZFGCqrftyz0ldeD8azJZmHGIEKqvw/WnpQ6+HCk5L/Xs
CKHniPzjick62LXCN9nNL03g+ye2hv9eByt2LH7sIccIBV8fV/Ux14OWyPOY
mu2shN6xPz/ruethpxaZy+itAPZ7k4tcqVA9ONy7cuSh1VGsQAnldvbheqgZ
CU77vHASey7VLCdOrh7eSOja99HksRah3eSn5+tBSMKXfC9eAevnpSLmc7Ee
Yod2iUwyKWHTbSvNbxrWwz4Frt3/jihhGy4di7O4Wg+FlzwJZFZFLE0xs0/H
sR60BdSOPE4/i2WT3MOJca8H66gH2tSlU1hp3nCN4371UO6lpM+yJo29tPk3
cH9IPTy3T954xCmCvTvvSdgdUw8ttRPdD0s+41+MzP3ZllYPZYf3NhmxHyKU
N1jJ/8itByXPIFnjGVXCaOGgK7W0Hp7sZg80YNIirCZpvhsm1IPtyFULHSNd
gmgwfralvR78mh9WqPZdIuA8Tkl8GKoH3imXl4oPLhHsrHOs8qbrgeOA7Oox
Ux3CEx2RpKT5ejgdXkUStdIg5JyLHg7/VQ8T+/kvccYqEzokWHn8/tUD/wcf
70XGKcIC93+6Ljsb4MKKgedwGwPDvb4YbL2nARpu8FS63VXAnvp8vdHgYAM4
b7tHutyhhTUZ+ripfKwBsMMc36tGL2O96/SUTp9rANU9P+Q6Tl3DJr1r9Dqk
0gClWfevMGrssfgEhRKBSw0Qbs/fda3OHjv9uOArq1kD9NvnOxeet8EyuYkf
/W3XAJ7mDnnVN82xh6/F28/daYDuHJNL0+xGWA0tzvRxnwagpK0UnTunio04
uCyAj2yA4++kqlWHlQlFXLcNCxMb4HNGp0gKkzFh4M/0s/TsBvgvutNz48g1
guBA+/bA6gYIKOb/XbPrFkGJgMV5NDeA/35Vds3lu4Rrb0vvX+9rgIziLx7U
Fx6ERy+PVphMoPlWzWqmdd8jvApMXbpIbwARmT3MAzL3Cc0uvLIKSw0wW3Jb
A6hOhFmLYCep9QaQZft+3OU/FQKHxnqWEFsjMIUZbHeNssDKnnab3snbCFTz
wANKUc5Y/f10oQ2RRnhyvr1Nft0T677T0pRxpBE0nuXfpP3zxcat9EZPn2oE
hVQnj2MjfthKilp3H6YRKp3/0Tge+GNHtQK/R2o2wjaWk3feewdgV4qIgpeM
G2Gd6ZHim7QArOCejQs7rRqBWHzLzPZ0AFbhgZJdu1MjZAvPvmi59QhrTvYO
DvZohKPn5IUtdB5gfTXL36k/bISUMoLmAzYfbGLh9/7toY1gGBckLJvujq3i
l1upj2kEf+f3CUfsfAgf798R8U9rBEUpL2MaOZjwZ+atMjavEU7Ys+iLv3lO
2Kfx+cZ6aSO8qFI/ILkZQ1AsOPysmtAIzsVMMcVLcQRzPvsSn/ZGeLNP6Z9c
4UuCr2/GyNmhRrBd/uKYc/olIXH609rPKRQv9b0dfIGxhGp14YOlc42AYSFK
3kuMJkzkm110+9kI/NbE1eTvoYQ1npe3T/xF8f77Rck11I8g7DP4fIG9CWyy
9hgzR6gSzk/trsjnb4Kr2n4P4hv8sJZqehM39zdBafiw1VnZaOx/b8P/HZFu
gokOA4ndNsnY5N3th+lnmkDtu8gDtpQ32Jp7rDrZuCYIDBQ0XLbOxU5Mqrra
aTeBAdeeswYrudg1lYC4AyZN8PX5XhkBu1yscB6hesq6CXZz75dTz3iDvcC9
Pp1yqwmynkmpz5RkYa95KbJYejXBksTdwc5jaVi/iXvS+/yboMw8FlOYGoNN
VS7THw1rAm0rZpGEAW8sPmfJMy6uCZ7d49u/V/gx4RPXiSTjjCaQLulszjma
QtjwcCby5DfBuXwVRkVkLkF0PI/aW94EXLVc5YKW7wlYmGWPrGuCT3re86mP
PxCs3xw6odvZBBX/TcW7qBEJjzjtLnOMNMENQXHr5u5GQrp7um/bDLreqNjs
wHQNgTg2mfb0SxPc9+ei9e4tJ0xjhZrUlpsgrqvkk/n1fMLf7CtzTNuaIYqf
TSD/fSIB5zZw+tGeZpjSlDb65p2JrWNva/NWboYjoe8/WCo3YUl3WRjyus0w
tyTYMC/Xht02osL307QZ1Pv0nrDLdWEPXvBHLw7NwHvkCtMHbB9W+RX+mqtz
M8yu701dKxzA2u5YCzzu3QwB2S5x5OYhbICLQu7XgGawzVQoea1eh80c8up+
+6wZPESZtebeBGLrlUq/O8U3o3z80P8Q/IFAyvgmeORVM/iW9R/7tNJK2MZ2
HEN71wwW7WpPeJX7CQfv3LbLqmyGmQN9+xPlhgkqg7nBtg3NsC07nM6kM0aw
V6S/29/dDMSn3h/1n48TgtIlBj6NNoPpYszvR/8mCFkstivJ5GYwWJ5RjUme
JDTeThOxWGiGL6+takJtJwll887O1ivNoMt0rk779gTh9c3ztde3tcDImg8t
teYjIe4zO+etnS3Afv+QTJDRKOGp45jlXYEW2DRTjF49MUTwpr/J99zfAh+G
7hxny+klODp4rflKtcDjayem4odGsWZUVZ1Hp1vAkbKr3fQHBatlz5v8GNMC
YSHTOa5M81gl8sx8qEYLYMp2cAolMLAytkVKUYYtkCOtvpZnsYQVmfELi7Vs
gY+jxad2HfuO5bLWHU90aAHtktZj1fAdu/lJSDr9bgsceh86V5CwhF28Oueb
7dsCl5kW+vpvLGKnJyrb84Ja4BtNzGRM4gu2z+LpvqKIFjjCmWfl4kjD1n+8
fLMsvgV64veOS9pNYEvMJKqqMlsgwuwY80HWRuyr0aUdxPwWKMVdj+9JayXE
mNaZNZW3wERzqkaGNpnweDgyt53YAqNGuKwLNxYJXpev/e5pbwGmt40Htcc3
CDcGZTSHBltAyDo6yu8wE/GK0Wr8x08tUH3mwD/F5e1Ezf622anZFrg0w00Z
n2YmKhrEn6MutUDwrI2CDZmZKNXrEDy31gKrOnz/2je2E4X0zowyWFqhMExS
ae8pJuLObqYjP7lb4YzCqa7YjQ3Cmk7/vT/7WoH4dYi9sX2Z8LUjvWVTohVI
B62veETOEz5puexhPt4KWvSxQ7FOdYSetgs32BVaQX95V/O6AR1L1NhZsUul
FYRi3/AWCKxii1o+svDrtsLxi5eL2nNZcBnquSb7TFshPT6MfKVgFy666d5r
MZtW2O2JNdrWzY8LUFX/JXELeV417kKdIM69gU9dyrMVuK9YRuiECuLslcmx
xx+2QqzJwWcicXtwl+uKqadDWsG142V0EYUfp457dEbxRSsM6eBTmb14cfKE
S4+xKa2goiJrczaaCyeJERlSfdMK0sGXYj4TWHCCtfMSWsWt6P2w4c0FygqW
7XyVh151KyTdOL2f5UIF9ndVcKNxUysEvWWwDcn9JswpmPKZ97TC7DY94aMm
HMTxykP2VmOtwMrRaOR2UYDYefbHe3tyKxymBu/mTBcl1pTXM9382gqdaeeo
38cliO/OPDdyWW6FC1rnLjxsOkpMLbV65fGvFTZHCM9zOY8TI07JfvfhaIM3
0g5uihaniA9L1pQf8rcBn+r2NSOQIt6V64gOEmuDUpdbBWv2h4g2RQmkkKNt
8Gr+NRtfpCjR8LjjychTbeBzymtzdYiXePoYc3/CxTbAPFCfM3zwC7t8BLu7
0KUN9H/gMrwey+JwFNW2cN82MBzK7X+z/zQuOE3L/+bjNpgsO6esIn4O12uu
r6AR1QYBQgbpEdrncYICJt8OJbVB9/5fX0IScDjrPotcptdtIPtQIDbpqQou
J9zGZqaoDbxVyQZ1pedxixdv7CVUtwGPpIs35dFJ3Dkm577k5jbQ40v38Lss
gnuEdwvx7WuDEn7DBVPL7cRWH2+4MtEG8pUBJ881SRK5z/j9PkNvg83fMT95
F08TzRYDi3mX2oBlOMGg2O08MfNtiNO3tTYQrzoVX12uTJxziDzQw9oObbdZ
Wk4sqBFPHowdy+dph57OS/IfpjWIvpOJz0NF2sGfxkczjtAm1senazoeaYfl
HdbDTMu6RHbj1//UTrWDYIc8a/M+faLhrvwP4ph2iPuX6p3024CY1F7s+k+j
HYKpegIN7YZEyuOKo1NG7XCpLnkXeBoRZaB2puZaO5xlX+om9R8ieqzVJyQ6
tcOuz5ZrDnEncTUVrQbeHu3Q5Z9b+45PHbfdvXuHycN2yIx9HHLmhj5OR3aw
7lRoO/TaCSzRMi/jYj6P+eyObQdOWpi9gokZbjJrSo6Rhs5/9FX4xSVL3GFr
6ufOvHaIObVL6EfYNdwdofmMvLJ24OjtuWbJZY0rH140Cya2A9cfwdmOIWvc
xvNfux062kFIcqpcmWSNU9dda1MZbofQ1AMdxFPWuAi2bQEHZtB8feYk1Nuv
4YYbWBU359tB/9Wlxv5sS5zYQ86liV/tcH3UOdeh2QznqMibV/WvHayMzuxK
eK5GLPopaBu/swOiQk423si2IK4Uie7z2tMB265m9hLjrhNxtyX6jQ52gMJ5
yUiO47eIwZJSoXLHOqC3oVgsNtmF2Es6rrzrXAcc6witL7zrRhRMPfPni3IH
aAf/uPr+P3eitZlSSbtuB+DzNOxMvrsTc/jgZs6VDhAUT+mPH3QnLvaoH3xi
1wFMyl/e+u53J54L0/lod6cD/O9ITvx860r0VzeMBp8OWJMqPnN2wZnY/s9U
SyyoA0IS6m0qmJ2IPLVXt61HdMBHS3crryVborm3XdXHhA5481bNjOZwmZh5
ysmtMqsDLlsn+Gy/eAs3t3BHKq6wA74e7723EHoPdzLPg+Re1QEqSlNhu2l+
ON/rvokGTR2wkCV3ftkiEFe//5Hh8d4OOC2KS8L5PcaxTzxm5xzvgNFSbjL1
4xOc4cuw+jlqB2h1rPDQXZ/iEg2f+7YudsDq/QIpVZWnODLny5OvVzvAIEFD
av3SE5xMW/JcIEsn9L7D8PDEBuE8gjIzbXZ3gvGaIzmAPwBXg80xxwp3QvHa
hlJK6n3c9tV3PCKSnbCjTylsIdgdJ9Kj+hPkOkFaSVyJWdYOJ/9qfMRBqRPU
OG7UhJ27QLx0z60qTK0TTES7GAm2gcQb2jtSivQ6YeLdoIPm9mfER2LpD4fM
OqEudvqNyOMXxPjv8rZ/7Doh9ortyJnKOGJxS5eq2J1O0Kk7q35HOIHYnmQv
qeqNzv878Ku5OJFIdlnd4RTQCXlmw3NY7yTimkr0l2fhnaAoxi4+5pJE5Bc8
2lMSh8ZX7pAWHZ9IlP1CKB5JR//H7LK6vRRPvEg0iVnL64QLOGNrhwdxROuY
r14HyjpBzLAo/ZHCC6K3Y5CZOqET0ikxZz20w4nPzwudv9XWCbsrF1OPBgcQ
87hLRKMGOuFIC/HNvTgHYj1F41/pZCdMd2g3vnd0xY1XTpHH6J1grXk8fXrb
S9yPcK/mjW+d8OLEBFmFLxPHacOZK77WCTK/9uhTal7jDp/JCtNg6QKi544w
w//ycNgdSnecubvgTxNbeIThO9yVyT796H1dIBAbrBOPLcS5FjueqpDogm1H
BVpdVIpwoY83+Sdku+Cxldka37UiXKZZ3Mrfc11wvYDv89PIQlz1sWPjh1S6
YP3goajWkXe4wX8NtVq6XVBsG/BzWP4t7suQebqLaRds5mHE3ue/wTHnfQuI
semChZ4n/FcVXuFE/YKvf7jVBeM+yg1vKhJwZw3FND55doHaeJOavUkwTv9w
uRTToy6wD2/tx6TdIjr+0eE8EtoFl78tHz3UlU307yYzdGK6oHBe30DueQkx
MdO33zUVna+x7MKmXkks8dpdFpfTBX67kjj3stQSO7RyXlaXdIGBqyrY9RGJ
FFGs73RNF/x2eBf5Y7CeuL40ZMnc0gUqV7qvDDQ1EAVabmOl+rqg5mvsv0vn
G4nHk5gO6o13gVW6cviNc41EDZfE7R7ULuAOqFsRrmog2qjI0eMZXZB8oUDV
pa6e6Lunta32dxecls4arEokEqPnr+WTmLqhp1evrZ9QQ3xL+BnBytUNPIb5
hhKLFcTGF+GuMoLdUNBy3axQuoQ4cUPc2OBgN1gtsvlTSVnEn0pV8l4y3SDh
tLp+wjMbx8VtsDdJvhv07IcFfdOqcZIU+ioB1w3qm3b9ByhNOFyl3yeKVjcY
aj/uWxHsxJmF89ftuNwNmXV7BpVd+nBu1vmvZK264VzC0+FHPwZwYadVnhg5
dcNCi3+8YN0QLovto6O3ezcU+4lmOImO4Gom7mqnPOiGk9TLFPedo7ihIlbZ
+qfdcFfpp9nZsFHcQlAqN/15N8yNpa6/TxzFsZid+c6R3A03TrZ3f1YcxYkd
6xw68bobiD0NvaO3RnDn/tlWXi7qhu7L79j9jw3jLunVB12s6oZtPiaDjiGD
uOspBwwUGrsh+OGrMivfftx/849EpLu7oegku1/bRhcuWmH6s/BoN7h84XMw
GnlCzHmKLecidYNylnnzMa0GIn4oNeDvfDe8NVR5xnW4nzjvelWIstkNLycn
/6S+myJuI9bQh3b0wOkfi69SxslEQS7h0hbeHjgn9n2lKJ1GlLW8/+iDSA8I
Fm7Es0t+JqrmfdR5K9kDjmYyKXl35onmKwp7U+R6YEL3kPDze1+JruoJ1Ail
Hkg5Jy6FBwYxOGal+JFaD5SoLI7KdS0SU0mmfm56PZD27IfwMucSsfREhZa9
WQ9Euf/JW45ZIrb7CewxseuBubetyUlrS8TpTk/yReceaNW7/ouk+p24vG+o
UOFeD/RNxipV/fxM5HI6/Z+0P7rfpMoFVSkyUaLihYZIWA8s3W7IGJQfJuob
Gc78Te0Boaay2Q7xJpxDRvG7pZweoBj+nvt6fhz3gMHtSylB12dLfzlVTsPl
hfXwtDb3wAWnPUYuIz9wTI06qpELPWD5RdiXXrAd9vHkc/uv9MDvwBKx70dY
4YQ1x6Tbtl54gVcJj3+/A9QLbuba7+yFJ5xRH0cu7QTLtTZPE4FeCK1gPlz8
hwvctI4qa+zvBT1K5Gm8DweExAdzKUr1gqqpKMa/gh3SafSP0qd74UArO/cX
8x1QfvriGxFML4jviTy+accKnQGv3Xdp9IJvxEfL6v7tQOplxv0z6AVF4/0S
oPMPtyJ6fed3i14YNX3BZU/8jdvl3DhKud4LjcXYIvw6A3e4Wjx72KUXMnb+
cZySGMad3xHo2uqDjv/2xRvz5CPR0JR0oSqwF7jMkrrc/H8QHbOBPf9ZL7AL
yTyQ59hW5/c9fTjlZS8YG2sqrN7ZURcLfzMjM3rh0++oNmbn3XX1k3gl97Je
6Iz7srqYvK9uVFqU7TqhF15VNZSn9ojWLfg8GDRp6wUs7fbBcxUH67a3TqRr
DPTC5p6guOw4iTohgfPOipO94G/JaNnHerjupH2Sggy9Fzi7qdoJbJJ1GiV/
mEW/9cIiz4sLB5Mk6679NevftdoL2xz3YcrxknUelz6k/tveB/YW8R6X3SXr
QpMFb33n6gPZc+IRm5WH6zLm7p2lCvaBysH22veRh+oqz40wjRzsgzPk6Jq7
y+J13U/ke1tl+uBy51zUjU8H6s7v7tr+4mwfjDB5LL/8T7guL8lO4apyHzg3
d2268wvUCR7+4yyp2wf7dtXUUPQ46h4XRWV+M+0DvdDmSenhJeKSouRItW0f
MOT/NnnU7wbrplqOJ8594H5/9COrwkHo1jPG6Xv3wclZ1uR+URk4/3HOY19g
H8gfmx4e7D8Nefb+uZRnfcD21Elhwl4JBBl7PhXE90Ft5lz9JXtleOJTwOPz
qg+69whG7X2gDt+Z1C6qFPRBYLrhjel1LbCOGL/P+aEPHnI5jZXR9KBb0K1o
pKEP7ESN+EaTjSDvWNre22N9MJ263V4u1AwEK89ckqf0AYExzyrZYwlPlDsD
/i70wUDNDm4rDWv40Wlb0f67D/YHMi38WLWFkvx1L22mfjiv9K41S/o6fP6m
8byIrR9Esax1C2Y3YP/ZmLf8XP2w8vzuk6K3TvCsTmp6SrAfXnm+jOz9cAca
Wbz+qIr2gzmr+DVtL1f4o13HlyfeD8rT3iHnZdzBcdhU00O2H6bW/oTyKHuB
6nxQCZtqP7gLhtpcV3sA90/0djpr9kO2vp+4zamHUOIpRO+/1A9H5l8s+J/y
h/1/i4VSzPrhYVVQmlpNIKzyTQXJufTD9iD3/O7rwXDSXCotzqMfwoas9n/J
DgHHNM8Pqz79wPaFYdG6EArDR3cuNAX1Qy7hZNtY4jMowSiYmif2w+ON8GNJ
hdHwOTDIlZDWD6/ft+G43F/A/raeMInsfsA98djxVzEGIowciAuF/TAYxFcZ
0hsLNx1fHA1s6oc008kDE0cT4ED019W3i/2wmvw19I5fOhDt/N+W/uyHjnyt
nswbGWB9ht+i9k8/DLQoCgZKZkLq6Pmq7u0DEJRuL6PF9wr2iYV7fxMcgNgk
C1Wv31nAly/1Ux4GYNHt6D7N7znA2nxjoe75ABwX8O1/5lYMX3/PTI+cHIS2
WH0ply9V8PpLbSd31BA0xmZKeUm0AbdY7jcabRgMxJLTj6L7RtyqcMw8PAq+
3kFWWsyjsKL8jnbTfwwCx6Jp7k6T4HW6uVyw6SNgzRKn7iqRYKao+dmA+AQ4
Y/IPn2Ciwvrt4RTp/yZB6u52x4liOhxT2fHXsfYTHOvJFuuTmQPNLHGn93un
gdN/vxs75QvIJ3IfaRWdhmK3bTv6vn6Bg1HrtAnxadAaP3Y2avkLrN0fsWeR
nYZTo3v3rbB/hUKjMGsz5Wk4raGGuS33FfiZvptu3pyGmKGhKMJ/X2HGpl5d
u2YaNGJNF83ZF6DbtJDZum4aXM1zf0zxLECVbnKjR/M0sOtKtFwVWoAYBS/l
1N5pSNW6kKkiswAXd0thvlGmwW+3aX257gK8Iz4/85JzBj5RGyzEIxcgsdzv
x1ueGRC9bTW78+UCPMm/9Z64ZwY8Nk0ffk5dAOt4Nbm5AzPwTfiK7/2CBeC9
+1vmgvwM7Hq98+bfzgXwEbORIF+bgZ7ZwBpvVgbYG5688sluBuz3WkSZcTFA
/zFT+JjjDNp/hscd5Gegus7+3uM2AxIh12puH2TAcPlcfc2TGVioFuX5pMSA
+s/VvyrCZmDZom3fOjDgnfAzqfdRM/Ba4ZMdkwYDggKOR+cmzkAs4apakxED
7pb9bcpKm4ESvq7sR2YMsJjt+52WNQOuD0qGD1ox4OQlD5u4ghm07rUxQjcZ
IOqvFvv8/QwELCjkk+8wYEepQFt45QxoThfsue7OgOm9H04E1s8Az7wYmf0/
BnTqhNr7tcxA79jGruOPGFDx0CLep3MGuO23/zoVxIAI6vqmy/AM3LzfGDEV
xgBfwZ5Tt8ZngO/HGO+TSAZc106/4TA9A+3/df/a+YIB54uVeyznZqD+FTGg
OoEBc/89TdXcQOMXLnqekM2AL1eO3Xy1jQS/2Gnb9HIYYLvEv/0AMwkkDWes
+N4yQPcQ/awwOwncWUxUdIpQvPA9fQk7SUDW8CnAlzDg3JXKW3t2kYDOwJrx
lzFAIiwkjYePBCp1khdcPjAgUcJNIUqABErzN6zcqhnAjTcf4NxLAo+s0Bdm
tQx4YqriHCZEgnfDwT0SBAasLkqz7hAlQdTilx2DRBTvUL6MJ/tJ8NdmQOFG
PQNo4uuK28VJsMw9b/KpgQGWtdRB/0Mk+N3saabQxIB+k+47m5IkOPRSQ9G7
mQEai+VsD6RIkHq+cymxhQH4kLTMPzIk+Fdu6tyHfFo8+Lz3cRJkG0lxjCPn
1twd/ilHgsraO89GkEVNzO66nybBor/sj2bkGAawf5MnwUWzF9hcZPYQqaw7
CiT4Jkl38UN+dJAX8wWt69TVF4/VkX9Vr444YUgwxSbh/w+N5/ZliisdR4LZ
N2BXiExa6OS4rkKCG/oVMvrIpsFl2SQ1EhTHuHwio/l0HkjFWmuQQFzY0+cm
snL1k7FJLRJ8SF7aIDcyoNLYxd1ClwSkgZN39ZFlF0w5x/RIkOaX3l2I4lNl
cqku3BCZRGxcQvFTI6h64i6TwH7fJukQcq+k0tEfpiTg8TrQqFCH4hklN/nG
nATX5etWpVH8Z1ckn1tcJcGZ1qCoNTwDPGxE1XZZk2DhNjXkLcrf3za+3/W2
KJ6NsovnahgQdpLjndd1EqTr+nVmVTFAIOmftZQjCV711R9hVDIgk2mF79NN
EuC7qncJVqDxDVL+U7tLAsek0Xzm9wxQvzB+4rcbCczKgv9rR/XWl91HyfdE
fVJjO/udAjQ+rtZ4a28SsHvw2i+i+pz1wuvw3SdBpplWokEuGt9U6d+WBygf
iqpaXG8YsHnxben9RyTgEJbe/gzVe2hRhuPxQBIYNpcniGSh8e2NFyY/JsHo
e1EWYiYan39Eb1wwCdbOD6t6ZKB4zgUFaYWRINot3EAxHcWv2vVLcRQJGuc+
Nq6moPiJO6Zff0GCwMI/4svJaHzh14z3xpHgE01SeTvy7A9jtq54Eny8qCgs
noTGd1W75lESCZ4/VS00SkTxa4K7p1NJMI2LWYlF6zNM9pzEbDoJWD8V//wc
j8b3UnY06RUJFIKss/SQMzclwvVeo3jPu0DPSzQ+RyEcUy4JRtoU7J4jf+jd
/aP8LQk4jRVy/kNWVWDLuVlAgvffmndt/d+bsWEhWkyCF5r3E7uRLdl/7up/
T4JS3eNaZ9D1Z93mGx6Xk+Cw1dqBJmSP8Zl7Ch9IIB16/rAfGt+myqj012oS
DH0MtbRG4w/N755Kx5Nge3tDxy00PwH+phfGdSg/Dcz/paP5Zz6ovsjWSILa
umKvDRQvWVrxanUzyu+O282P01D+L+UUurSRQPCH8D15FG+1ilQ78U4S5I9/
i+V+hcYrFrtnpJsEbPvfnP6F8mUZHNYR2kcCT1v9n09RPmcX/R9iBlE+fN/p
yb5mgLuZ96mlYRKY86qpf0beqLtDzx4jgarb1/FKVA+hUteTzCZIUBDTyZuC
+p3ACws9zikSaOhe+RaL6idj1YCpbgbV53UT71d5aH11Ym4doZOAL8LgxVo+
iueZM2ITn0nwx+LWCQ1Ujz0p0gORX9D4r8mF5BSi/nRHUGn5GwmMvrsFvkH9
0W2Ei5H3gwT7K56fUC9F48Eyv7q2TAJ//1dFv1G/5N+9xN68RoJmHTN1ZdQv
BwnhIdqbqP5YwTgZrZ+YO5Jsff/QfOzKqkdR/zQWqX9isp0MZ1n6PZfReuPr
tGSeYCGDXYnpfytoPQ76Lgfa7CCDcVJ+2zharzFHo7fROchgWjpxJQP1V+NR
Gf/bXGR49zPhkCZa33xPWza/cZPhffx5mQHkwTO2fvd4yTCn1eCERf0ghrK2
tsZPhg3TgfFnyMYvXt4PECRDdnvlIzwyr/LJP6xCZLgW5GDah9y/2On9TIQM
EjpeVs3I0Wk3lnn2k4ExcCQhBdnw0jav+INk+O6qaqCJ+g/PevIPkUNkqJOy
n9mD+lX/27PuryTJEKBxbEcvcrR5/7cjUmRI2h3f5Ir6m+EO57sFMmRoHfzD
u468u5KVceo4GaSY2ZdcUX/sdch0/iBHhkuGo1d7kaP4L3zBnCbDy5rhy4Ko
v+o3jtxslCfDk+zBUU1kbne3z5oKZLgysUm1R+49wOnYo0SG3NeU/5yQo3rf
0IwxZDjT5JxiunX+Q+XrH3Fk6POgXDyOvEt2kmylQgajW4v/LaL7dU/cs6Wq
kWG49+WFJOSIMJ6ZmxpkmDqNDTuOzPX54idPXTKs8d1ivonG3/2SZLmqRwbu
bJtrnMgR6g/GHxmSQcgg274YzZ8zq2Q0zBTlk/ez9yqK104rkYEMGzI83qZI
eIni2clZaSBpT4b7hXf9ccjhNYa9+Q5kGHuevvgZ5ZNjX3BXxS0yYG41DGGQ
21sP6ly4Q4YS7UztOVQPofdq2+vvksHhtOGdOGStw1c0NdzJ8Ob4pPE5ZPah
pZYuTzJkpsRuVKN6ag98pm7kjaxr24FBDj15pGnUlwxV2Zeriaj+dkRdrSc/
JAOv65/t9ag+2bRba36HkKHWSxOqUD23/rZVehhOhgdvTI/KIwfnrH/YHkmG
HbHiZ4pR/WuYxp8LfU4GkVSivTQyK8upil0xZPh1XrkyCz0/mku7zsTGkUGL
tea4CPITO8fSfQlkuFgAHTHoeaLOw3QqPYkMS4EN4zzILHUpxYdSyfBcgdeX
Xs6ACYy61kw6GQY+tXl8QC6uWSAlvyLDV64f3uHIlpVYPr5cMhzm8E85g3xS
fja/5y0ZeMwGajmQ2Uqj1MIKyGB7xptOQuv3feGM17ZSMjjNJJrEIAcfC92F
LyeD2NiO5DvI196ezPH5QAaZwndzmsinj47jztSQ0f7tofJhZPY3gWOLeDKY
hXq/YkKelpBxy68jw8mr0Zwk1C/KMgfZHRvJMJnb/KgOOXT/g1fiLWi8xjIf
u5GtUw+dn2ojg0U1ZnAUWV64ezCxkwxWlcsB08gciV7OJj1kUL9jRKMiT+8R
Y+HpJwOWSW9jFrk8tiW1axDVb8Zs+2fkcN67Z0NGyODlJaaz9b/tc8Fe1Y9k
8Cn97k9BPrerzvHvBBkEnjvc/oTM+czpX/UU6hdqvhzDyCR2nsR7JDK4cp+0
6kCuDK46eYpKBpaT0TfwyBEsdh0LdFSfjDSJQmT7IA77vDmUr2ibuBRkxW2l
a9e/ov7h+KkmBHnXI8vYA4uoP1nrsN9Bpqxvl51cIsPCQBfpEnLV/XfN8T9R
PbG535dBjvp92cp4hQyd4QaDLMjX720s71olw0dR/6+TaH+h+PN1VMc6Gdjz
hVqK32+tf72jT/+SYVn/gk0AMm1xuU6ZiQL6Zttr9JBr7qSbbzBTIB77fGQv
8o2b38I8OShw0CfEIAv19/OzCRJyXBRozMUV2SPzOCjXfuGmQKbb5d4DyLPk
ucs5vBTYe+Z78Xgx2n/avFiwE6DA94cXL0cjx0wpPRXbS4FDbJThU8hOVyli
40IU+C+HYDaO9j98ZmcMDA9QIFJQ7Z0C8tzw5GdOCQrIiek+WETPG4Lxk4C2
wxRwe+TpkI8c0y8r9PgoBSTMfB2dkW/qj7zHyaDzV4QDTyHjuh/qrMlSYHxK
vHwDPb/4dY5QK+Qo4FNn/q8bea6t94H7aQq8eRRtn4VMvOgjcPwsBeZPZEz5
Icc1HSicU6AAnt/W7RryLZX2i6/PU0A0s0xYBVkAK+QjokyBXzPirzbeofeL
mobdY6oUMPt0UHwUuV7xdl7MRQpYcnfvqUSOr+RT0ddCZvn7KBXZWb52nEOX
Ah2ZidfCto7vHymo0qPA6UOrE37Ie1yW/J0MKVAUO/LCG/k2B+dlwcsUKOA+
ErjlujeSR1pM0XwfzedtHS+gqrzqaU6B4hRJjq3r3Zq27Ja4SkHvY7OvUpCJ
/93LGLCiwPMWZc9yZP690R4BthTo1dZ7OIR8syz/otx15NvH6/8gEwxa9k3f
oKD3SnbMYTRfvoWZrxE3KWBeEXbaDNkpdI14wZkCKq5VWWHItasOnL/vUWDI
/s9TDRR/nnj/6Te+FGhoEgvxQL5xOvm9yQNUT3uLcWnIu537zEoDKFBrRurf
yu/1T0qvXZ5RoNDtcEAQyn+Vr4mPaBQFEoT1zrxG3rXHVacrmgKQQ/AZRLZ/
Hyb2XywFqK7KMyyonj7ovV6SiqfA9bTmjJPIXF+ITWOJKF6zItWmyHbB4/HB
KRS4RJA85oVcKfHr1tl0CnRd6lt+hsxZx42lZVKg6T9+oTRk26vSPLHZFMib
XYvLRa74rUZVyUH5nU+59Q55Z5x15VIeBS7HCSfkIducvB+W8Y4C9SV5YhnI
5d2x1/SL0HogPt2MQua4VSS3WUKBlKW/53yRrVk7theUoXqWc+20RC57RR2x
rKRAMB9UnUNmx/3N46imwIa4FokN2Wpin19VLQV0wx4f6kLz38GvLyHYQAFc
qazgZeSrT6ruDnRRoCLDNtsWxbPk4JBKQC9aX8daQw4hsxIYAnIDFKh53aA4
i/JVvCxRGzGK4tdx9N9tZJYYbNSFcQpsNn/mP45sccLc7sskBUhacz8XUT0U
dXrIJ02j+EcPppcgMztF7tAiU+BVgi23K7I5c97ECpUCIe8Eb/xD+8fCjMbC
N7MU4O3sDI9H3o6ZCjCZp0BlQau/PLLZx9+XmRdQvGJN1MfR+02BF9/R0kUK
3Nao+/gEmYn3+JrtdwrM8RljFZCvFGr27P5FgcBec48ltF99p22fSVxB63fk
gG8JsrysOA5WKZBcVLL0HzKRmzRZt47ynfPaTBdZ83v6feW/FLD4fr5QHLl/
yGpvwzYqMGTKvm+i/bBFpWiFCjMVqk30JEnIlMRJ40ZWKvCPaWu1Izs/SF5S
ZafCv4B5y0rkX1YWUU07qRCemPWmDPmh8j5Z9V1UkCGUeWwdz3ZorKN5NxU2
DkrqTSELzZmwtgpQQXYoXnoHuj/Ow9CvfT+6v3Sx31XkNpPdwtriVDAn4Uvc
kA0Vej90HKLCSv7270+R7Td0f3ZKUeHaxYyXW/P9Or3zhe4xKrzem7/aguzV
0HGi+zgVxllMb00i/80O7b50kgo3S+7TtuIVEqx5u+c0FZqSvt9mQ/HkucXG
rn+WCu/an6R5IifrtrzpVaDC1fvtx+hb+eBRI/dhqJCRrPGrBuXr7E8mf0Og
wvOVILkDW/1kpF50QIUK7BUf1h4h9yfjzAc1qCB9d0b11Fb9PNxcNtZG55uX
1j9GptjgY4d0UbxCsP0DyM6qD06Z6FPB0WrWXQTV56/D5/uGDanQtZ07Z6t+
H+5YvWN6mQq3nXhdXiGzffmwc9SUCtvVtNumkKO7vfOumFNBTXBnxR5U/0LF
ZzXGLKlQeuz1OW3krBe/qGZWVJhi3ivjhSzrVRb40YYK8n6VuBRknNIpwrgD
yufptxXzW/2kSVb+010UD+WH1BC03r6++TpwzZ0KS7uflhUje4Xmu055UsH7
wpuMMeQQPal3075UyLYO6Tm69Tw8+VnL5gEVPL+t7DZETubLmZ15SIVK/glX
X+RDyw5PbAOo8JQUyshELhg7JEEOogLtx9WwDuSzNZQ6u6dUOKEynzWNTEx9
ZUUJoYK/3n7ZeGRNf9t1+3Aq5MQPntm6fr/dgSRqBBUWD0MNF7KF+vQ5h+dU
uF+QVteFxkc5kjZMe4HiFymlHom8/FWYZzaeCgFKJV17kePSPrelJlFh76cc
zU9o/mcMyv0vp1JhH861PBt5cFugws4MKtRfMOe7i+xeqvet/hUVRF69t7tQ
tPX8F871eU0FE5nuLE7k4j2frU/kUkHgyerINMqPfluZIP0tFfp1I9bLkRm+
Ab0pBWh+PB/5o5AjZPSCjYup8NZj8dZd5GOfhHAcpVQQPLHv0GXkW1BW6P0B
rZ8HBxl7kemssxFGjSg/59voUah+nnwoVWdvoYLy2OGWm8iHbvlvENuo4DT3
ad/W89mue98d2R4qfDzwez8D1ee2R/RD1D4q/LC+MFiPnCFXOpk0SAU9TPp6
DDKO/CjWcIQK03ffpFxHnorR1d3xkQq7GO76Bsh+6vuYiRNUeNFqxmmPLLJC
q/GaooKCBFFu63lsYfFIhkJB64GXuygL+c9OXUoinQo20s47apET8HuTDeao
wDck1zaMPHLgPQeBQYXk+6m+XGi8XgMPGzyXUH4jI2/JbO1XHuvcl/mJ+oOT
b502stEsdS7hDxUMamITI5CXEkoy9dep8EiVKlyC/Fz7oTnrXyrsqb69bWTr
fb1AsN2DmQYJZ7j4RFH87lhT/aXZaOh5vXpFBZmTp0SBxE4DLNupM7eQtT21
c/W4acDjbVxSjzx3WNCGhZcGbF8rDZeQQ0YpgrX8NNjBsAyRQPluUfILlhKi
gZPzq8ooZIevWrgZERrEfvhVtPU9izltz8rL/TTQOzaPYUX1lqVPKbwkToNE
jpu26sgq24pvMB+mgZeBnVAwMun9A7GaIzQQLu1y6kT2v6414iZNA6q5pQYL
qu/9e/ZEHpWlgfLeqzp7kAmtZPXpEzQ4cHgpTxL5mm/RRtwpGgRU3LM/i7wu
/aBcV54G9nKqPurISpECh6uVaCDjvVBmi4zebSddMWj8hy0/uSD7LBXGHgEa
4EJO2P2HXHFZkzlOHcVHZCHgBXKobtVTUU0ajHG9u5OydT81afY32ig+KY87
XyPLXUgOP36JBqtRMcmFyNvPcO6q1KfBY/ulTxXIIzJ+z3FGNBhRfv+CgJwn
weBtu0wD7QTNW3XID4St4wyu0KDd4JTX1vdmfb4+wY/mNDj+rsR763zxncpJ
tldpsCG35pqP/Ivpvci8FQ26aadstsbTviqe7m5LA6OLzmqhyCnfYw6u2dMg
+txbEXfku/PM2UE30HjWpmZNkVXJXpKcN2nAeehr9jnkPeP03NjbNJB88sqI
H3mu/4qMqAsNQiQbFr+ifNS2txW8dqWB55nV+/XIUfWKcsc9aLC0+Pn71v7e
rurt+wovGiikCZtaIcuXCMvjfGjwxHtXliTyjrxnla33Ub7ijo1t9duJjA1F
Az8aaHK5MWqRixJcasceofozers7CTnw+TTWNpAGvLsf/vVGNgkxqJ97jPKl
e7PGFFnKv17VPRjFz4uudha5926WZtAzGiQpeTSsoHoV1nc0ev2SBkrvdDwf
b/Wfi2NDsok0oIdeyruJXI/VulKRTIPdRSZF+sixZ6s/YtNQvMJbnp5Fdjwu
c7U1gwb4gb8nxJCVJFOm9LNo8MfbKp8VmUuMy3bsNQ2OXpucpaL1RhJ4SLHJ
pUHL9A/vauQyrkWHubfoej92Po9FDmax+exWQINnh/ROemx9393ou7VaRIMr
f5uvmiIf/6W8EPieBhObNnxY5G0L7+/uLKdBz38ME2nkIarE95hKdHza/sPC
yDmTsZ4i1TTwMwwO2I18f4hlJbuWBq8Ukm5zIF/quucrS6TBzzeFlB3IB5pm
18rradCYsD63E/lHjdlDbBMN5gpTH/Iht5a2/2tpoYH0sYjM/chJ+UpB+u00
cPyZYySHfCcrn2WsE9V75LtodWTlZJEQmx4a3OW6+OHKVr+KieCY60PHGwsq
WyDPhm0+cxukgc0pRVYr5OrAu9yrwzToF41ks0eOuD8THThGg/zWP2pb/dvG
3ZB/5wQNGPttCa7Ip281vIz5RAOzy289fJFZ7U7vE5mhwXpv7fUg5I/m2cnZ
ZBp8UQqIjkQuMBQQk6XRgOZL+pOE7K/1NKN8lgb/CtpSc5EHrW9eOzmP4ust
cqIS+fA9XaGCr2j9ND1ebEH2eXZi9OgiWr9WS1OjyJ2veGOzl2iQdtp4Yw5Z
tOqXwYGfqB6MUrS33idde8e4UpZpwLVIbOFB9dBIq+kQ/EODLvvCZ3LIAutp
wTFrKN82lVmXtuqJN1CNe5MGVWm7s52Qq486bAv/R4PDpqKRAVv1hNMksG6n
Q/iLc3YJyNYmMv8FstDh9LniAwVb+/nbuxQ22ejAxdTbTkRmDlz66ctBh9DI
gWt9yFcShkp+cdKBzezb5Nb+KK+w0sWNmw7EmssaX5DXmpJkFnjoELgqnvoL
WW/C77MTPx0mFb2mNpAzl2xeU/fQgfnJ1Z3MaD39YFOzs9lHB4XuGYkdyOpi
R/ZPCqPj5/4d4UBOOMMxeUWMDicS3gtu+Yv2QsLgATpcbbszyYuMse0z0Zeg
w6jp0YgDyFHepbydh+mQM7jAeQyZHPGy9+JROrh6zVnKI8tn+z5rkKbDl9VT
97f2F8HVV7Wwsuj++T2Oysgf+3Cs1Sfo8OxywSE15GOz4o3yp+hwVutd8ZYf
bbD4l5yhQ59F3E5V5H6+uQuy5+hAGxSTxyFLSHf9yVVE/9/9ckwR+R4UVRy6
QIdPBmHf5ZDbTV94ZGDp0PTz3hNJZOE7XnIiynS4c2QfbR/ynSCzhXhVOlB+
NO3eiVyXeP4t30U6JMVUs62i+PEVizlGadJh01KynY7s0LLt0E4dOuyvq0xp
Qq6cpM48vYT+b8/23vp+zvGjNZXJgA52OxM/hCNfY8+3eGhEB4PSj1ZuyEX7
IwVXL9PBw7X9phnytrNuQ15X6GDm/HkMkC/rXo5eMqdDqe5QvjTyHx+hnXNW
dPixJPKACVknaqP1ui0d9XFN32+oXtNezzyesadD1ur0x+mt/UNNo/LVG3Q4
5cyf1oesOvBmc9SJDmTZsy0NW98/PofWGN+mQ9d/pUYVyJ83nX1679BhfXWv
Wj7yeQEDeR1XOmj/5EnO3FrPMqe/t7jT4fukn44/8rTyniIVLzp0jwStOiKf
Mvtzm+CN6lXazM8AefQxkVb+gA6Vl3JWJZClk1+9OvkI1cPLsB+7kP1KnlgX
BNBB9jgXfhXtl8SndD5mP6WDfAtH3db3ivDGC8WmoXS4ryn+aGs/9yNXNnjH
MzqwvzY6VYRsGSlmVR1Jh7XH8R+3vrc0enDLO0fTIS9H0CsCWcb8306xWFRf
dw6zPESOxS6Re1/S4fE9XNhd5A0JclVAIqpvSx4WO2QH9sHnp1PosCLrop6E
3M1odKSl0UHXOdNg6/pnh8qw8Zl0eNHH05yBnF71WkArG9XHhSvZ2chs6S+/
rr5B8fc+/i0X+e7j4MZ3eWi+ZfffFiCP3fRJsnpHh/ILGsPvkfPOWGg2lNCh
gGb7hIDMI6Sz37OMDhMGGdzNyPf/nl8+XEkHH0k1/i5kCvVY92gVHTBc8HIQ
WadDNDu0lg5u/rUJE8ilRbv+O0+kg9+U0H4qsnDcX8OFejr8rP19bAE56P63
o+lNdFDtaDwzjfzVmvTXoJUOt5PK7nxDNlEfGGHqoIOIL0fdVj7w0o0FZV10
4OddYNtEPry77PGNXjpIDbMe2Po/4le25d4BOmQqeJC29t+/xuNOdQzRoeVH
vsQkslXdU/YHo3To2e9Vu5W/1tfeM7LjdEiWaXuUjnwi3KlyehLVSwQe57X1
/czVPDJ6mg7fRLy6VJD/mWg7qJLpkLG6/oNt6/vV+fMXflHpcI9xNrAJva/2
HziG3sDosE+0FnyQFVlF583m6aCzQlgWR878wlXPsUAHk8shWv05DGDv34yv
XaRDhFPSDQNk94pFF5fvdHgiOfN1+g3aryTPqB/4heLb903PH1k1oF9kYIUO
YR7n/51Ezr/R8CNolQ5FlQuev16jfqBb2iG/QYePvB8PdiL/dzI7c/YvHTxt
TB+UIlP3xPkkMs1CzMCR1ULkS+tP9HVYZkFU0ZyHgFxOuie5wTYLwsliCiRk
0VbHjUKOWbDaX0Ldi+739J3ZkA3XLOxWlY5wQF6M1srn3T0LllbXclqRr3gr
BTbxzsJ9n6JcHJoP8aqM+T2BWchyWWDpQT6iIiJ3dO8shIuzPpNBjjrCxTYu
NAv7aie7D+Uy4P+KzTweyi6K46QoaxJJCpHsyRpm5mQJlWxlj+xps2RJypIs
pUKSPdkSQvbQzJBIQtlCXoQ0+4wsUUne68/v53k8z73n/M7vnvvMtcKzNp4g
ToLAJ14m+0uY4DrPrMVIkEA2asvMgVLkl8OTCSwpEhRvOn1LBcUzI7/1iPVB
EvSFGlibb/iDdkzqbjUSmCUuYttRPznsvlvriQYJ1nM3SY9WMyEwsXJEUhvN
x3DNeq4Grd/fR8XkMCR4ZZ9Ila1ngqmgL/4FjgRNmpfc7zej/R+Gw+WQPgnk
v/HwhCCO9slYrzEkQYjEQ/dTiPelKudrGaP3byYe3YG4uaXNoNmUBA6pQVHt
TUywo9vNYk+i+f3uXfdAvCTCjH1zCsWj6HDej0YmJBtEHzxmSYI7hy4ZX0Ss
5Lur6701CQwoxLG+V0zoyiy/aGZDgtbVv6YyiL079Hn77EigK/MoyrMB9fvz
wxWnHUlg3p0T9BCNP1f8ssXIWRI0P5jf86KOCXqm7POO50jgtV0toLoWrWeB
aSmTbmj8uwavFqH5Bz1V1HD3JMGTflnpGBSf7d2tn797k2DihsfkUXS9Ytnm
2oULJIDzrFYFdP3Efroo8xIJhLPPlOzZ+P5+KqrZ35cEP3bVlgihfru7TL7z
QTQJ1rbZjv6H8ukzTPQRjEUM8l9FEG/edIb7cTwJIqeUix1Q/vOVqS9EE1A+
+S/rFiH94BwiTuXcR/neplGyjPQ3FiM0J5FEgvjCPauWiK9VlSQXPiTBYvap
3RX5qN8Zx6odTCXBb6nFE48RV3ENDpalkeB+vQ4pFrGZuk+wSiYJ3M/GMSMQ
U13WRGqykT5+dbhHIY5LSGnUzCXB1h+XTRIQ72846NiUR4I2SkhODmLiNH4V
U0iCjGRv91eInfisn7Q+I8HQ9WOZY4h/HSHjjEpIoMZVdJSzAK1fnjenOstI
cPBCpp0uYtVkweiTFSTYVv52PARx7+ti6U8vSeA2YvLxNeKLZL0O6xoS/Nw7
IL+tEPm1UL/3cB0aj0QawwVxAc57q+MrEqgfsRAiIIaLq6UTTSSo2zn9ZgVx
6JsDzFkiCXa2O9QlofjsZDYn+rxBz+MIUfuGuFrUUpXxlgQf8U1Veii+NL+w
wMX3JNiceaVwFXFctoDwtW4ShMeZ7/BA+ZDuLGr404v0tXAk5BPis/s+/WYf
JMHhq9jtr1D++HdfrX/9GcVzJGwQg+rzjZBwQPAoCfLPPnB4j1h2mxOFMkGC
5Ks2WT9Qvc4tkoY/UUgwmn0NY4nqs4B1N+UunQT+nvPuXxGfoSqZG7JIwHeG
XOeH+ofGyasdDYuongrMPz9C/U5017/aJ/9I8L27ZYKK9KbRnu9nx06GmJmv
mtFIj2SikaLgZjI0Z1pV7EF6zWoikz5wkiHpWJxBA2KzuoSCmG1keHSMuWiF
9P+vUtkFx0sGD0NDuiLiqtK+3b/4yRBA77rQhti9KPBztSAZXmXpfbVE9SP8
VOThpZ1kcIdrViOI32c2mR3YRQbbA7rvbFC9haWe3fp1Nxl0dSUNexArJa2/
zRAnwy+Lol5dVJ+TdwsirSXIQHSWvJSPODnmmB7vfjJUtPRKsqF6NoykLHfI
kIEa1LFoi3j5+r2ayINkuHyWjfoMcUmQiq+OAhmc/e22MBE7+vXLLyqRQYAt
5pQS8gu+i0Hfyw+RoZgi8c4DcavnrnxvNTK49jwLfNS4cZ6o+aykJhnKbX39
RhDLODqLjmmTgTbU36iLePgM29AjXTJgO+ifi9Dz9U4Yn+Q6SoZnltI+D9B4
WUZUzjcGZNiD+dvDs3G+CO63hR0jA0/Y+mwymq+17qEIDVMyfBm0KBXf+D1Y
c0CHdYIMLmtJQi9RvBoOBf98fooMrITpvaaILyiIVrtZkoF7/VsbuXbjPICL
3GcbMsga0rp0EUeJsc8m2pMhPzpbmoXypy5c9NTUiQwOx+y4ShCTBEycNrmQ
wYD/weR5lP8MbpoI3pUM48tsMhvfI05seTAQ7IHyVf9Dvxf50dr6ocRD3mSA
ZazWv43vrT+DtxReIsPtIfvMs0hvPz88mPG/RYbI+Xr6M6T3cZ7PPn9vk6Em
f+HAKKqPNjPxufg4MkSzdfHlIC594BEsdJcMimwzjbGovpI/lq3m3iPDISdW
UhyqxxCBhVsKiWSozpl8lIvq29lSZ2tDMhkuKLE6epFfGD2MStR/RIZKj8KD
OxErDHTu7H1Mhi3PPjUH5CH/FRLIts8gw0pw0i3SU7QenraVms0ig2/2iYiN
81KTqU+e+z0hw/EjdbXCiNs/zyqvPiXDXdYHmb5c1A+IKNXFFZChf9OXoXzE
D+0CdXc8I4N1dFBnAuLQjObWJ8/ReC9Fst1D7PKF3US+jAyWIwdjChAbiR3v
rSsnQ6M8xbYfsaJT8umjL8mQt8PHMfkJ6i9yRr50V6P5mCooWyD+Nb7P1a6O
DNld27ylEE/u9SbNNJABwzG+lQtxh0vFZd8mMtzP9NzNhrj86dLC79dkOHnW
JpsXccqU3vVYIhn26pmnKCEOlbq9vv0NGSR1J9hdEZ9z/xCb85YMhd4RzGLE
xoWCvHLvyMDek23Pnrtx3sk+pfY9Gcp8Hhj7Id5xIE8UutF8pDObfyD+7UXO
/dCL8t+68CoWxWuqWOWAbR/S6/BrfRUU73fk4BfTA6h+OzmcaIjL5QiHr3wm
w46qTs5mlJ9HFzY3/hohw6rlKbPnKJ9hZSdxMWNk0NhunSWO8u1KT2kXmCDD
pfO/hPMQGyuNncj+SgbVMyffHEb6UL4i1S87g/R61Ty3H/Ef1ssJLJkMs9Xm
P/WQ3qYOrXh0UckQyKYSyIn8tdMfRzvDIAP/4C2Fr4hTF3qWL82TwTvst9lr
5Kc31HeGryyS4fp/b18TUf/jHuTEcXuZDEcHLC71oX7UtL7gLv9vMjwkOTv/
QP56aJkqkLVKBrzY80f7kP5FtA+nHfhHBnXKuIATqo+/10LFq9kocOKqz9c/
6Pq3xpYCDAcFBp/yaG9B9fThN6f8+y0U8P/TVcGN6q1K1/zl6a0UiNZgN+BB
9Zh+47HmV24KvKjdvcCJ6tdzTdpgWYAC8x0dT+dQvZ/AXXp/awcFblDOZY0j
fzgcWWPOJ0wB+XBKWTvyk39s+k4yYhRoVTy+NQ75UcZmlyBrGQqIvDFJ7t04
/+ixS7NflgKUI38NkvDo+W/7flrIU6Dm/HS4KRGNb39Cw0dFClSvcF1oQawa
bXjtlAoFTks9y1FrQf379F/tHlUKCEOWaAHiv0cbfp1Qp8Bz2Q/jfK3Iz9fl
wkyPUCBgxxXsGGKVczO6nboU6FWo+KL7BsWfmL16DEsBd802Qjpi13D+cEMD
ChRkCDsbtyH9jHdi24wooD2jJJqxcT4Uc+vfURMK/F7/IEZCvPJnMRJnRoFC
uvNyyFu0njpWHCWYU4D7rvanJsRtTd7sGCsKvMp0m/uFWG63ZFvzaQqU3VM6
bbpxvir0S7SOLQW6Rt5pyyBeGkkxbLSngHHYO4cF9HxHbbPN2k4U+EJ2a6pB
3Jq2paPemQJy6UO2Xohll4mxGq4UuMV2To174/yTTahxrTsF0p4Ym+Wj+SzU
HeZS86KAAvVzkQJi+530zqrzFBhxOYspRvEgBhbdOXSRAjlhKkI7EcsMOh+v
vEyBksZn8kEb56HUdnEr+1FgOlUy6h2Kv+383XsKQRRYF6pj6RPQfs3S0Kw0
hAIcZQVcl1D+9lf95ZW7ToGUt0fd41B+7wg09BbfoEBxZN1gEWKWr1/igQgK
vBwOn45G/fSZj3IWRVEU0CH7lnih/rlZeUZA+jYFwl4EyZ9CeollnHkoeYcC
mUdMnBWQnurIEukiOSjfuU3TZze+p5h8sXuci/LdJvY4FPl9VHGK6M58CuwI
5eHZ+F5n5rUlS7AY6UtznPMxqqeadqJjcgkaz/2l7hRUb6IyoXsEXlAgvgQ7
l4H6m9kZWg5vFQUyTt4/RUT1e8KgyPleDQVi+hTjJ9D6UJXvvI+7ngLswqri
WxDfdO17ytWM4hFbZXMF+cNMy13XODwFlgOGf1UgPzGVMJTa0kKB69l1S8vI
b4Qm6ws2tVOgiLhpKR/5USJvePirdxSoF4hYXkb+xa1nZH+5iwJXLWmdNojj
LvCoS/Wg+qsMP09EfrcpY4Bv+CMFOLcn3ClDHPEuk5LQTwHWlUMxZxD/WXJ9
C0MU6Ih8qsePOERaLndpGOUv5FHFCPLXBau50NIvFDjn2zhahdg3quG0yzgF
kn1fvs5ETKsMVxH6isbnz2eTgth7wmjb+2l0v7tTYRbiaR7e2ZuzFBiWF3lW
g/is7iDxMJkCtqWV9mOIR32yMklUCti8vYsXRO8/k+4WlM2gQIIL2yd7xH0d
chaWcxRgu3gu8SVis6U5+S0LFHCZJv/aWO/e73+1uXmJAqr9H3nvIzayivjq
u0IBLCECI4Xi1RJ5rFn6D9KP936N54h1K3kfj/5F97fWHVdD8W0YH/R7sE6B
2EcHw9sQV+q4H1jZTIWYrCfYBZQPBR95tnIuKvTIl394iPJVnPZjzJWbCpyU
6mAt5N9PFiOSPwhQIUhAUDYJ5fd+RfbqEzEqzHlMLIUjfWwddx+23kuFdHnl
EGOknxhuhWouSSp8rcftqkfMpjN/D7+fCrNxfgfCkN5unG/0DjhAheZCDn3M
xnkbqc/9RqpU4Km7dvQg0i/JIqf8txoVFEStno9t9C8RHvGVmlQwe9S9b+P8
iMN/8xhRPSoQJbP1vyG/HtrWtKsXi+aT+o2ZgPza8kjUwq2jVPCZrS0/hPy6
x9ukV8uQCtYR4RH9iE0f85fQj1Fha0ylhz/y7/a3n6PzTNF874+TNvrhows5
zjYnqTDF4bTog/wcL+l5hNsc8aJ5NBvyc20LRaEWSyrqT1ZS7yKuCV9gBp6m
wo9jZ5U2o3pUKW96L2dLhWArs+P+iMvGogon7Kkgo36O0duwsV8wjUhxokLG
9SXhvaj/LNAWcDBxoYJqr/o7Z8T7vIfV/7pSQYrFu5aEOCv1CX+1BxUeVWk3
1yIWeetJ9fKmQuyy+tp7xCnziu1iF6jw9Pnxjk+I+SUXcz9dogKl+I7gxvUE
8+brMb5UsH/3fqp64/xj+K0zOgFUmL8ivmUT8pO6ecbvlkD0vl/T3R/QdU9v
+6fGIVT4L9gv/jbinf+9NeoNpYK0FruWEuJ2i0O00zeo4ClV/3ljPQtqz0oa
C6dCXmWC5ynEMjqcmm5RVNg86j7VgeIzVBEwRo6mwio/m4kK4pj9E5G+sVRI
PsSZFofiq5FueuBnPBXOB/758BHFf5an7sONBCr89DD8trG+Gv1MEL6bRIXT
ZYM1xii/m98feVGYSYXHZxKOb3zPrcMUWSrkUCFOi+AYhvzNs1pguSqXCodE
jaMuI321Z5GOEgup8PzQHLcd0uPtK6nDoxVUGAy9onoM6XmT0A92/jYq6Dt6
Gseheq2Jd3qe2k6FeypPHkrnbJwHeWe2p5MKfsacEwrZqN8KUFvI70Ljvzi4
1yALrWffn6TL9VCBdP+H3cZ59auO27AvP1JBibg1KS8D+f+noBnNfqRXrrh3
5HQmDBhOxeMHqbBs8pAdEEc3nlQ2HKaCnuAOw+I0JqgpvxroGqVC1L3KB3sR
z+TvD7X8jwp37Lu/FT1G+RZJ3DsyQYWysHsmmI3z+Pd+tzlPoXrB9TV/S0V+
tu7pMztDBY8DOpCNuCCoj+/SdyqcGJEedkdsTdWrnSej+W8vj9JFzO7y3D6U
RoWhjBewH3HVwI5//xhU6Cfv7EpD7GoSURg7h+ov/9DzO4i346mmvAtUIDh/
0EtC3Kpqw0pZooJkjWx8GWL/Z62Pdq9QobzP5O4YYkkxJZ2831RYiF/Ql0Dj
7UtMn5T9i/7esKIqFHEUB0dMxT8qfBRoHSIhVg31lddgp0FIjkbFhbSN/2f5
8rGZgwaLRsNH2FG8kt2OBelz0uDVLrWQCsRHh6t2v9+K7p9K8/BF8f5xQrzF
nIcGfBrC64YoH3kt8Z6f+WhwJCLSWAXly1JjcdvZ7TSQFryorYzyyVbq8nJm
Bw3eail+Oory/Y4x4vtUmAaxPNxW3ojvq1qpnBWlgcm1k1u7kT6sgz4wRffQ
4MKVmuJDyI93NRpWfN5Lg6I7oYqpyH/HV/GXUyRpMJgz8vgX8tsC0FKykKaB
Q+O272eRv6p0yr14L0cD7ct9Kgc2vjd8XyiuxNFgKWKtHVu98fvJZe9L+jTY
0ZTT8xL5FeXy9wNyRjTYyZF4SBTVS+DSSFH+cRrs9vER6EH1lsBBKEg9Q4NN
Xe2XW1E/YWmi5W5lR4OYF1tiv6P+Q+TeSyl+RxoUP0/iYkf9SsGOgrz4czSY
itC23oP6Gx/bPa5G7jQwl8/YK4b6IZWsVAl2LxokPO50EED909IE31fCeRoE
XN1TsdGfNUnF54ZdpEGe1ElF+Xa03nqxuWhfoUFJq67UHGKj0ut7l/zQeLi0
UrI60PrNXBivukoD/nrTW4rvUP5VL+dcCUbzL8XN5yNOC/rupBBKg5eLhbNr
iM82uuwhh9HgDqXdGTpRPP6OjBWG08BftdLFGzEFrLJco2gwOqJEvYq48vYH
h723aZBz9uM/T8RBnYa7x2JpoNU8lYdBrMtDGE27Q4MrQVf7fqPnr5trZZy+
R4PEPOvEHMTtKS/ttifSQIi5/T8ZxAnDcrt6k2lw93gtBxaN31KsYPjuIxrM
rfCfU0Ys4rInzTiNBrkZiXFsiMfzU204Mmnw59qbsAY0/4LvfMKt2TTw86/R
s0DsIx8/dDMXPf8H+f2Htxv7I7ZUnXwauP3ykJJHvFB1/fRyIQ2ERYsML6J4
Ny4t7KgtpqG+PF85EeUj4sjlAb9SGgic6htPRfkyuvn9oVI5DToaJc0jUD/K
3epiRa2kgVftWvgJlN8+jtHtxdVo/J6nfH6j/KeZWPW519GAPOW/9R7Sh9O9
D0kSr2iwedXQYR31l5KfDC3Gm2jwq9zMihOtB6QdBP5MPA04u3n+KSK/LrfV
+mjTQoPyJ9kcR5Aer2a9fLCjjQYF7PW2ChvnQf9mxbe108CAgzwhiPz3r0vc
raudNDi448LdqY3zcNLOwQM9NFAvktirjvqNnlhTv+hPNDAulWY0bOxfKeoX
1AZo4IIXrpBC9ZhTzu2cMkKDQFJh74tHqL/iX7Y1GKPBnsWM7d1JaP0MmLZc
GKeB8icl3v57TLg02HOi4CsN5OwWqgjxyL80G42sZ2hA6/HT+n6FCT/TC3Gb
vtPgfnHSdKgX0sOfxCM1ZBrIXHR2vX4W7deJXko7mDRgJGO6CKYonlJWsm1z
KJ+TTtxsOJT/2xjJqws0aLhL7XmhxoQxE6GdAys06Ez/xdITY4JE2T++6D80
ENf6oL2PD60/vDQutTUaUK9rDnmtM4DV17r6cBMdprdb6EnOMEBdvfyn/hY6
OJ3UCUseYEDo4/S5eS46ZC0WLLm2MYC4Ek3N56bDi/Te03oqDOBw9P1mxUeH
X8TcUS5uBpjiHSbYt9NBzZ4p/vkrHRL3HRup3kEHXufGroiXdBiMUu13E6ZD
2WrSq7FQOoh+29MtKEqHmJteyY16dHA+xtXxRowOyZqObtNoHgXPF4gBe+mQ
1lEmtqsC6WTbZKOUJB0I08GrQk40ULrcVdO/nw6eei9Jd5EvB3ysK791gA45
cTy5UnlUaFDNKz4sR4dnj4W/XtdC6+jPkKyHynT4OjSVXmlKgTg791R9VTr8
rgkJvf+WDD1NpxLn1dDzxrU6FTTIICiucydfE413ncImdPob2EbIRFsdocO4
IG07p/8MZE8J3GRH424P3EfrvDcNUwarwdVYOghLlc0/K56Ci1wDFwQN6SC4
gy9WvmECXl4geLw5RgcbvEPWEO0/WOoucQ4wpcOCZmBHj+QYRCZHWvWfokNd
2Z7K+NRhaF+4ePKWJR3KNfM5/YaGgNvG9tjh03RI0DN+zdw9CBav9GHahg6X
RIsOn/Tuh9TdyjoP7ekg9tKO9T74E3y5Iaqu70SHDOkCB3u1Htg3yaE870yH
4sqo6h9VzeBxdE423xXl3/YAUWBLE5QUjElaedBBZy2w3NzjFTA3vxNj90bx
DMcP43rqQe189c5qHzTfCoaN/9E6ICje2Sroi+4X8k7/aFYNWkO7elP86XD5
Ybp1xOpLqLr5/OHOQDq85bJRfRFUAQW978REUd7lb+fc0KgqAfEQ26+ZYWi+
ut/GZIOK4fE+UuGecDrwLSSFJVkXAX9nsM+TSDocPLe4VdasAO74bVGWiKbD
1YBoy0y3PGAXfTyfF0OHWwX71PcefAJhrTIN++Pp8Me0781OwXhY8qkLK7pL
B/ZvylSVjFi4ImgEsvfpYCyAkdNSjAFS0yBHSSLSqX3fS60P0eDq7vFe/iEd
TlMizDHBt8C6NtpKOY0OPVsLNbZ+DYdupx0iLzOQ3mt1p1+F3wCjzQVjqtl0
UFXe5Pxe4zpo27zx0MijQ1FrUbYDIwiq1izlGgqQfllihuuMq6BQPMXQfkaH
vZtGIi04A6DQ3L+66TkdHjQpXKz39wXxlfVgvTJ0nct22pXzEqQ9TdIllNNB
ltNrkNh7HgRMJdZxqI5+dGUbcMqcgzs/Kt+2ViN9hlG7GJWOsCkTd8egjg7n
lPrfG9+3hRv6H83aG+gQG7HfUA1vDUtUZ0HjJjpEdYx/fRxuDr4pzM+dr5Fe
qg/6nZEzBbJueNZxIh3CLekeH0MNwPUb77nuVjQfQ69HjpO6MHYvR/rUWzos
jRG2Ke1Sg9MaSpSPHUgfxYeOFh45AD3jr8st39OBlqb3cVujIBjHngwY+ID0
t8u5mjU7TmxR/k/zTC8dXN+byqhJbW85Mnzxz+dPdJjIj5pQP7q7pSbiD9Fu
AM2ftLWYT3Fvi+LBhNtfhuiAjfHJz53e01L0abep0wgd1uwOcMUf4G7ZF1rK
O/GFDnFmPwrYLXla0iV1+l3GUX4EX7gt/+Np2d71/vHUJB0OkL3Hz6vxtiQE
2Du6T9PBqrnVyJ7G08IhRtk3+40OU4pkzy5Znpabbde+eZFQfBqePsWTt7X8
vMhVQqbQ4fn6iR9qyltbfIXSL1+g08HbgkJTWtnSQnkte5jORPlVEcWXHeNo
cfNs+Hn5B7qutk++XJStZYzXuJm1QIf9XW8l3KZ+Ec/Uf47w/4n01zjReyXj
B7HX2ctwYYUOdjx5dKbXBNGY8ydX0B86fHGbPtnz7R2utTKm5+dfOozZT96k
72DgdOx2Pry2TgcVly8BEcp/cDXrhTa/2RkQfncTv3r/Ik6pRF3sxmYGBCbo
v7hkzsQ9s3w7+ZeTAcFFL+hMsVncvt/WhRHbGNBrjT/2n8AoLiN/5jwbLwMa
e+6uVti04wRPXFWK5mfAAYFlnbWUdGLeGwEeXUEGbHUkZoyJdhJVdSqo80IM
qLvegz3+e4DYUnXifakIAzb9lZltaxkhmstRit12MyBt6BP+y9cvxImnsbG7
xRlwssg57oHDF+LlXdKe/fsYcDDvztFJpWHiamKrwV0pBkSlaCj1OPQREzhd
pPRlGPD18Gvlc7daiLsjVtd/yTJAuS1p6cdqKa7kZ8ZklTwD/lu7IK/SNIQ7
ckWL4KPEAL06I9XbOn24ztnBbMlDDGiLiLolZf8eZ3s2IGz0MAO63P1ZFVJv
cKRBfodkDQa8/C1dZ/e0Hhd8slzbVJsB0qzI9it3nuE2vz0uwqbLAD6H0RPZ
Ejdwj3TJS68wDPjsc9YswjmNuL8mZtAPGHDXXzyy9FAxsVp+f81BAwY0BVww
786tIB7Nb0n+asQAk10xSjuIVcRPos5+6SYMoJxfwI59qyK6JP85ZXGCAQs1
sy9u3KoksrgylLhOMWDoPOnn9dLnxPBITZ4WCwbwXru95hKZReRdGaCGWDPg
zxbNfz+UX+ByfP3fq9gwYLJx+YunYzFOkcT3nGTHAIEpZzY3Sj6u2flFbK4j
A4ptJWgfXmbjjn829bR1ZoCGZG/IrFUqbtSMZMDvyoCAfV0Oe33v4c6335Z6
586AxBCiiWx4JG5ZT4otwosBQudF7ErPeONia4mTmj4MmClQxlH87Yk7Fc8S
mBfR8/aeG4u1DSIWFfzOfnYF9RGJEiWJMZFEdbH0MGd/dL+4vLbC4G1i20MN
B+FABjw2upBCd44jWm8b0O4NZsDVbxT3e+7xxOkoP5HYUAbQEunF26bjiP6/
eH9ibqD85N24xXXnGm7dr2xwKZwBpWwdFenFwbhEsklNeRQDMj0SgqtLA3Hl
w9F+4nFovJaWlRyvfXF65pLmQ3cYUFSWNu0vfhH3oYOgdP8e6kt02U7OG3vh
qHW/qKvJDPgwHh5hx7LBhSqlva99xIDOLhXZ9MVjuK1F6s8vpaF4ZjxIuCH7
h5C+pz9WOpMBBiLtPDUBpkTZR76e/2Wj+mquqZsPsSfWc/MaPsplwPdDhWsB
D92JRtGlUifzGZBw4iDTbt8F4uBvYzaOIgY0l8xfHT4vQXQPmJ1sLmZAQVrI
RZmkPbh5yi3C1VJ0/71J8by/argoV4kchXIGiNl9uJjkj8FtH8WHzVQyAJcY
Ht39VB/31MLRIauaAfnBP4L/qzPEqXSuaFvXMYDAmkq6ds0IR8Q9FuF+xYCp
Lc59T8mGuFMNaj/fNDEgpMtZ+8wWA9y4ct/gdTwDYh4m3pXPx+Ke0gXDOVoY
4Gp4p6NaXxPnXnpa9sEbBlTap5uGyh3AyZ5//EmknQGvXImfm3U4iFSZkdC8
dwxgpqo1llQdJpbPiO5X6GKAyt2wPzxF+kT/PMfu2m4GHO9audOWdpKo7pIT
hP2I6svGe45nQYW4vGdyb2cf0lvYK4EiKWli8xeJTstBBkzEdy/Y9QgSw9Pd
/Mc+M2Cv2E6p4f4WwlGbwt2eowwYqbl8btCEB7dZ6Hsbc4wBomkHZPWeiOI6
+2QvX5tgQPRqeKytliQuIdFHmH2KAdo9Ki8l7u7HmZuVERNQXxvIpbr9t7E0
TpCbcX7ndwYkacaWzPjtxw11KgvmkhnQkKsQOs4hicuI9Ws+SGPAtUSFfz1b
RHFOhtUe1QwGXB7vXtpUtw23j32RV2+OAftYTTWZzSOEGaJGQ/s84pxuA43V
HcRnN0POmS8xYNeaJ85iQJroo9u4dXSZARID7DZ7asSISr9+V7v9RvkYfLvw
V1qIOFev50RfZYBTnk4g/NhKrAkM3xz8D9XnMcFi/uY/hJDDLRX/2Jiwl031
4P2r4wSdOTa7OxxM4GmgjcfPTWP/lhuw7eBE+wLNTgPZ2z+xrRdjSrO3MqHt
ms7i7dh/2Nty76wP8DDBt50e6bvOjjMmcf2tRPuA6kNn6jJWNuG2FR1/dmQ7
E7bojqQdVdyE63G7Z962gwm3O8jmPRrr2GSJ3pWTwkw4M3SqZ0fCMvb0BH/+
511M6PZ4cbK0fBYrkm154hzaZ4xYHE1pzPxMGLNPWaSIM4HNbyVFs/wX4YnI
UM5VCSb8S866pxO+TnAdEjb+K8UEgvubw52tKwSZFLu5WBm0L1QKcdjz5QeB
bJGZIXCQCV/7r2y5fP87oYzvP/1MeSZo7+NqOCs5TPDtFqfvV2KCefrpJ0x6
NeHwXZfUchUmDHhEtaVXvsUuGedhtQ4zYdAXL319eAjbuHmG1KLOBAdhadf7
0ePYG23Syce10PzV9LrbrkxhcVFeOoNHmKA67ORR82MKuwn3fOasHtrna5F/
yKd+xXasUu6RsEzItd0s/HnxC/ZOk4Km/1EmaLjzqXuz9WPNrl2e/G3ABL7a
f4rB5BqsgGZl/O1jTGB/Z2l8r6WDMLAwp8qH9m17Aj2DsmbGCWlVh8fSTjAh
yI35oeXJMMHBN/C25CkmWLv1pDF+9hHEleqVyiyYYGqwqUp/uJMwRV3+rG7N
hEceyrpXfxIIhc+PRBLOMOFjgO3gmmcFwdsrTM7EjgmLkQPkNN0IgoI0vr/P
Ae37eF77irPysMyptTBHtI+Ut//OVeJcha3KBZlZF7RvbhPjkOmrxy6GLXK5
uTGha/xAS0RHI1bL7jl9woMJgZS0N4fONWFD1Z0+OXozoZ91hVv7ySvsawGB
2hEftO8dLstMjazF/qO3pZ25xATxwazJZN4y7NH3IWH9aF/bZGGjfKIjGXu7
SMHF3J8J9bkrphpr2YR3UZP63VeRHvWiuLL31xK2OqccMA1G+/wWUQbxTiXh
pI7xto5rTPgyeqn2VfhzQqLwH4Z+GNpHN/32lJTJJ/TNV/QRbzJhpjyGfWEl
jSD00a1OL5IJP6JE9nAKJxBsy4QzGm+h8d8Qb/y0HkDIiOu6oRnDBJfDOMoY
1gv7n3v4uZo4JixsNnwu/CUKuw8OGx66y4RbmPv0pZy7WNc932XLN/btBvS4
ndlJ2MKVDG75RCYUC1Vhmi88xJIGzVjPkpmgfy3YjbvwIVauim1g/yMmaPV2
VIddT8Zeul9X//QxE+7JGDiJjN3DVvr4ZIpnMEHlNn/ZtdXb2B9G4uGZWUzA
BqhqBz9MJKhL9bmKPGGCcM2DEaHLdwkha7eNHj1lAjE61MixLIbQ+EVbbnsB
yv+3H+GmZlGE1Xo6z4MiJuCfMrkIhaEEXMrTuW3PmdCQvLPiSEgAIcr39GBc
KRPWNSqGuSS9CW9PcL3iKGfC+9GP3DfabQicB19nRVWien9600v2sDThOIdf
xFoV0ssQpxip/iT2/tf97mG1TLhz4ER0zz9H7MfXw8dW6plwziKlqzbaHSuY
kSAf1MgEE/8uCfcVL+yZIBzffDMTdgV9MAyYOI9Ns1z4cYXAhHinx5rTGj7Y
L0rFQ7QWJizJKvysXvPGim9zbDzfxoSkz3eiv2l7Ys9958uZbWfCioyN4sU2
K0LBmzeRbp2oHp9zfp7MtCLMPgn2mOxiQnj0ha+1+60IB8PkTZx6mBDTEH6C
etaScNF2QmH0I/KPuDilf8nmhHK1h/w2/UwoOB0US/twkjDHf2yhfxD5V3/7
0/TzpgQ1+q/P5sNMWGMLvbHlvBEhuLO8qXuUCVc79hz2SQFCY6HrE9P/mGDG
5GUZi2sS/kTuvNUxwYQHa3FO5iP7Cdiz7z0NppAfXN8c0bjKg406ctO0ZQb5
n3bkB6Fnh7FtO1WVMN+ZcFAXcys9+ih2y/w3gSYyE47LDTvNfjLFmvamL2rS
mJBYHad7ZMISm1B6cqSGwQRZL9yNfUU7sb2x682H5pigNO94NqX7O2a7e21u
+TwTerYb4PUHthKsceej5ZfQ+7resWe/FSU8FtvjXbyM4rdSI/BPQYowuvzx
uPRvJkToRu7ZnyxDEBuMVs5bZcKcommRzkNZgvNLLcG9/5gw0ctXZqRykNDg
+Iu/j40FLm6TBovHZAn8nM28tzlYEGH9jj+uWZpwvvoGtxYnC9px9/b82SVB
aD2L3UrdyoI7Dxsjq4KECKJb17fk8LDQemktR1BawAfUtnJY8LMgXvENt9Bx
HuwHl2j2TYIseJlwegXzQAq7n9tovU6IBdE+X39Z0pWxYfVb1s6LsCDx1Nq1
7c+EsYOunX/EdrPgaGtq08lSbqwS791fvXtYMKGptvq27Bcm5tWJ5ah9LBAb
oLPPZRRixt15l9SlWNCwHURcRhbwmvwf50nS6O8Tx+2GR9kIiU1Jc5myLLB0
OaSw4/cWAsnTimkmzwLSyq5o956tBNx2Ifq6IgvMndPOdVpvI6S/HqLUqLAg
5EFZ29H7XIQf3mkkr8MsaIk/8+JjKAfBdIf9rKgGC5aeyKnPqP7B5xF2z3Rr
seDyneeaeeXT+N8+/32N0GGBKt+L2cMYGsZ655OJwxgWOOfKhykNc2DLWlz+
m8Wx4GBp/ewVk3+YTZckv6Trs0BtsF1rrGQJ4yQyM3zCiAWb+TwcrG5QMHVv
CofWjFkQs2dut9euIQzvFa+BquNo/poPbkQOvMR7ih7s8zBjAceRsxdu4kbw
hLeUXhELFtw2p8gnj83gRfzKurusWDDofX5k70sy3lfsctfNMywI9VTEksVp
+Hcdyp2H7FhQflzDiSFNw0sEzLXPOLBAUjj6sHI7GR8qXt32+CzSx7udraVr
M/i+zqutpufQ+96M8rXnjeDlAjWIq24smBY0Ua2aqcbf2rf8utKTBYVXFWOX
bg5ixrpeNbmdZ4GHEr3KZ3UCoxZ8/dXOiyzIGnxIINgOYxIk9eo7L7OAsm4g
n879CfOt+29NmB8L2lw0Lsvwv8VgrhGrlK+yQDdlLt7YvxqTuj+qciqIBezt
t8XcDh7GMHv1yx9dQ/n6qXREflM53vg6R5lxGAsOuxf6XXnXiM+V6Xj++yYL
cKLv7gdItOJXPsU9K49kQXIwpUdXsw1fIsudvyMW5Y//VWLolTd4x/AHOaEJ
LPBZDPvzdVcdvkbOIkvxAdLPFuUybt6neJ6h7RmTSSz4aRI7cy+sAuMZOfD4
YQqKR+NK0gnP5xi8Quojo8cseP9M4PWv4nzMzmGbhyvpLPi+N6tTKTYDc+XW
rqSyLBaMvGuRSxy/j9k3mpWwPY8F+42esOtZXMGH3D57520BC/4s7TZ0tY3H
f1LZFxfyDI3fPpuc+ScFHxWbf2u8jAVvFUdu9d1+iue7xnXCrYIF5IKVL180
CvBZPld2kF6yoD/IX9XJsQhfe1KncK6OBR+9S4T5CM/xR7FPLwW9YsGD+PNF
2D8l+B6VLRq/m1hQGvEgoY1YiXGQvPQ3HM+Cf2pi+qfiSzEkwf72TS0smOEM
ZunjizBXObQfxL9hwdrqk5Q85zzM+lKODW87Cyr2KjgNDGdgREd9SMJdLAiz
apCYVo3HnMxl2yo/yIJwg5YHSdSreJFX5xKDV1H9Dy8+/tiYjKmg7M3mN5sD
nJfWnxiCP+bOk1jXSfM58IgsFd/FEYLxtGYeqLSaA59scSg1vYERx+OrTtnN
QcMF9jYSNRqTkOT07r77HCx9JxP52M0xPlqZ89zX5yDh7I2lilfhmP0xO025
iucA/0UdH115H//vyE2+kZI5yHcWVFAte4j/wvw2UPxiDjbLv1al+z/GJ9vV
OhtXz8Heekoqx/YY/LqCdWAsfg6iBRtfagYGYcb7k3I5Bufgjj1u+pPScXxj
3IrH4Oc50LqfMFBQFohP1TsnXzg6B4mKe7VK2azxJ5+p1BlMzsFUKKFnl5sM
pjm0t+sWdQ4ch4fsHbxOYdKUNZOsGHOg+/TMxQofE0zATM4Zqbk5WFaWIpYc
1sHImV3+2ro0Bz2/2vi8okzwm9mHipJX5mBWv/TVjKc9fqpe76LrnzmQvX7h
dWqTBx5/sfCQ6toc9Bofcr8dfBmfLsHzc319DnZyCJXsUw/E/w+S61Y+
       "]]},
     Annotation[#, "Charting`Private`Tag$120552#2"]& ]}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{886.8749999999891, Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.685857503158502*^9, 3.6858575121243987`*^9}, 
   3.6858577497661605`*^9, 3.6858579072311573`*^9, 3.6858585398886633`*^9, 
   3.685858754025482*^9, 3.6858607075131173`*^9, 3.6858611887735863`*^9, 
   3.685861455069213*^9, 3.6871907248895063`*^9, 3.6871911603884153`*^9, 
   3.687194192270829*^9, 3.6871943527710094`*^9, 3.687196992036967*^9, 
   3.6871970921186914`*^9, 3.6879487162245727`*^9, 3.6879488431948347`*^9, 
   3.687948945859707*^9, 3.6879660848023715`*^9, 3.6879661611717396`*^9, 
   3.6879664883914557`*^9, 3.6879679080326543`*^9, 3.68796811618556*^9, 
   3.6879797202583437`*^9, 3.6932997108533907`*^9, 3.693310482363599*^9, 
   3.693310873230824*^9, 3.6933114560096054`*^9, 3.693312109184499*^9, 
   3.693312315919501*^9, 3.6947618773665485`*^9, 3.701525472232337*^9, 
   3.716543610153008*^9, 3.7165437173437777`*^9, {3.71654375752007*^9, 
   3.716543784929185*^9}, 3.716543835876383*^9, 3.716543899116824*^9, {
   3.71655204396172*^9, 3.716552055346273*^9}, 3.716552130116109*^9, 
   3.716552178716571*^9, 3.71655281428102*^9, 3.716552883329187*^9, {
   3.7165529148206673`*^9, 3.716552923102437*^9}, 
   3.716553058764645*^9},ExpressionUUID->"f741890a-d384-497c-b3e0-\
c04355c04b05"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"e", "[", 
      RowBox[{"x", ",", "0.2"}], "]"}], ",", 
     RowBox[{"numsol", "[", 
      RowBox[{"5", ",", "x", ",", "nsteps"}], "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"Exclusions", "\[Rule]", "None"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6858606166219425`*^9, 3.6858606235183215`*^9}, {
  3.694761884115344*^9, 3.6947618851050477`*^9}, {3.702939554361482*^9, 
  3.702939578489131*^9}, {3.716552831860157*^9, 
  3.716552835852928*^9}},ExpressionUUID->"a5715a95-4e8c-4045-87e8-\
fd5fa3ade187"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJxF1Ys3lHkYB/AZQ7EKMxKqSSyjosuRYlp6JmklbKmETSobSVGkHNoSS4tC
WmmWLootcSYSSjSk6WLM0QwKmXknl8ZtemdGaXLL1jm77+8553u+53O+f8Bj
HnRkW7AGiURK+pbvvTl4QFQ/6LOOTPp+mqx8oy1n00yT4H8naN+3TjXNJuzn
f6NUqSokrDudEOC2sJSwlTc+8PRcBeGYZiawP1UTNq6gYmRyHeGqng2CV04N
hBvCrs73l/MIjzKc9TnhLwhrjJUYzLfiE14zvbdq+10BYUGSffPzpa8IF9lc
NQ5rR3YZTCyb4SIkPEaTJK4IRy5zcvDxYyOf997PlXOQQ0OyrBOeIr9RWgd4
NCO7nuReMOpEPlmvUxKHCaE2OuDl/nEKq1zL55m0Vwh1u1bnm45QWGYXhsfu
4EIQRJvTM7spLO6++DvlH4WwJ5vfL+6ksAJXGfrXfBFCYqbn/OUtFNaVN2sf
CjREYJi34sHbBgrLhJ52QjFXBHpkcW5AIYVFK1780R5EEPSk6A05lMLS4gXL
6zJF8OV+5J6XKg3WsFqKvV7ZAsPv+fZjehqswqEavl5GKwyZ1D645Uli6dFv
K/r62mDIIIe+N3UKzh+sDMm3fANHef7++l/H4TOrpC80vh0itt5k6KV+gWg7
XsXcpx1QaxSp/Ov0Z5De5Z0Tmb8F/wiwvH32E0yEteUtieuCS3HdTvtejYDN
+plfQ2rEoHOrycdinwrKikusO+rFcFj0TO6ySwX2c7Z6uz8Xw81QS2aIjwqc
+tmFNiIxXD2ySF7hroJf0pd6KGViyPOszIqyU0FUpxc7liaB4D9yL4ZrqqA6
Mtvu/EEJFLw1dfcrVsK6LseAqQgJOJuOVwsKldDgKkmOiJZAb5lR+YbrSuAb
Mzq3xn/bE0PsmNlKED9+EG90SQJF7FBPl9NKIP3QJbhWLwHdjN7Spm1KcLtp
fuCeMQbnazHP3yYUYM/WYzxfgMHprszYXJUCFmVM9L01xyAiSNXwul8B47Gv
gzRtMdDmryjwa1MAxzs10JeFwXhm1e5MjgIMySqfqVAMdPkqjLtXASS1ZA4t
AgNmjGH7Gl8FyOX8VsYxDH6+PdlY7qWA5x2F3ltPYeB8UnC5aq0CYsv8vAqy
MJitZvz9YY4CpHvqXd0fYXB3hLTfmI+DwIdDCazDoDxpnkFzPQ4PPXIbongY
+HIoOSkPcLjoEM260owB29XaWucfHDbqL3ZS9GDQWWjCcDyDg52W0QRlAANZ
+uzQ2TE4LJwgPzL5gMEs9d1jsnAcvsi6HFzUGGyxUksLduHwXvzy885JDBRm
+U4p23BoaamsPESWAkVr/Nej7jiUcDNXXdKVAj7e3ObhgAO74veROwZSYJ/d
bgvLcUgqPniPaySFNlWe8xorHCLzdx5tnSeFdQZMnsVCHAJzNqwYMEN2TKRz
qEuRqRHqpT/ZI/M2ljAyNiHH0PdYdAcgD8QlX3GbRLaV++i2e70jbKiv1OaN
I2vW5ZX+eKWb8CH7mk4djx7CJe5B+dzPyKPD8wxkOb2EK7e7UbJd+wjHb0q+
XiFDNpds7ihIfk+4aJW/25My5OVpB6qwLuTpHe77XbqRhWY2tFsyZEetBYO+
g8j5Q7PqdeTI2sKpnBocObISDw9XvYeiyGJxY/8w0DzKG+0nkSveHbeanCEj
rNadEqctQF7rkJRtaofcVLzkRXoicsDCV2PkVuRRfnrP0YR+wmzNwOhtlgOE
DbHKmxo8ZK1TCTuYkYOESXcCS3toQ4Srzf+8FheGHJVbmk5rQH7GDbalfUA2
6Z3fRDUZJmx7uLFcZIG8fvREbtYy5LO+QdnrVyILqr0yVHbI1AXMlBurkXee
tkz0dhz+7x8I4Z3LxPF7zshhM1sOUjcgZ5suY2b5IT+2SdGmRiD3rz2V685F
pm6Osk3UkxMWLxO2xtYil10Dy77AD4R3l66h0r8in0m+kSAuxglzBuh5ep4K
whZJczbNvIV82Ux3dHoa+V+9pbPL
       "]]},
     Annotation[#, "Charting`Private`Tag$124338#1"]& ], 
    TagBox[
     {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJw82Hc4lu3/OHC7jOzsUSokbSUNbyKUQpJUQiotLRQNpJKRIqESykghI2Sv
ZO/IXvdeuKOQlX7v+/l9j8/zz3O8jut2Xef5Xtd5tdL5mvU5Hi4urv38XFyc
/x84x/hewTyq/++//3gN3i23fBws/wi4/vuPz8BvaY5GkHzE//xq8I7Rl8W4
/9nueHzm+ETS/yz8z8/eVCXzf15zmM349iQXuP/PLWLS0hsM8v933bNFD15N
FgLP/9n063vR5jslMP9/65HNlRji5i6H6//n0w7Jpz4OVYAs////fR7JqKl1
dyVc6Pz/10uSx90jIr6Bq87/v155KVbx+GgV6CkK/ecBsyvLedfXwCyL5z9P
qe8RS79SC8x3GYucv5eRtvm56nUtOEto/+V4O/fl1uiqWuCxc/jv/jWet8C2
rxaO+nFzc/7+GNsvU2K8FjZm3+DhmHH2qWozfx28YGXwcuzV/yo0ULEOfLQK
+Theap30z2hzHUzcCOPn+HVd5rV/JnUwVqEjwDHp4ReNwcN1sKfR/T9rQfFw
kX0d9Lmz/luv21zFy1fn60AwyfO/9RZ9qbG85VYHbtP7FzjmudG0xMa7DqQv
n57j+IB2e/nmQLw/d9kMx+H0bk+xF3XAVez4h+P+hMGNY7F1YB5lMs2xqzzz
7cecOniWQ57keCF0UuxsfR3kHI/8zyECXPdVh+ugOPDkFMfK3sLjfZN18NFg
+3/3c9kh8bHgXx2o1cf+t/+M3zJOUUL1INZzR5Dj6QwlOY/l9XBm5o4ox/qX
1NoOr6gHFa04SY4fr9EM3LiuHvZeoSz/r14I6w2Wba+Hpq+H5DiWidk6wzKo
hzKNPnmOHY7pZdWZ14P82yAFjpMl4UKybT30adj/Z3az8YpHp+uBr/Lwf7/f
HnSg57RrPURcuSTLsa+xVRh41kOIVrI0x3X/jpopP6iH0Rk+CY7Fi09yzYfU
Q07PY5H/6v3W6YKel/VArF+3hON3m89fz0uoBztZqzHO/hmjrpoR6fVQaKRO
4HjTRzfCjYJ6sJHY18mx1xmvV5bf6mHt/U9NHFeo+Fitb6kHvTD7Go6X9j1c
KtxbD48Mj1ZybBUZVMEg14NgRFQFx6+sQr1q2PXQELDiK8dE4chNSbP1UK30
+xvHWrXRDD++BpizFq3n2O3Bu3eOYg1wScut7b962ZNst0ehAZYnqvT9Vy+z
aeKKa/D3JVI0jhWb9/6GjQ1QLXvoN8c68b2dZ/UawOLPw//q++DN6wVBRg3A
kD+/leNz+5e8yTjUAIRsiiXHPspx3h3HGuD9xejzHEdN6DjNnG6AHfqBdzjO
rG7cq+zaAK83ZQT+F+/Xzmv23mqAOgORcI6JV2aXnL/fADVXE6I4njMMYz0J
boDnRdf/s5SMRnNWRAOsXe35nGNtVmlmZ1wDhKV9CeB4X5lN+NzHBqiy0r79
X32Ej3io5jRArVT/OY5vuTw4ZlzaAC8nvx7iOHSn/M6LtQ2w7TdhE8cfRbOU
nn1vgASxHWIcV5BM/mX3N8DA/loGJx69eYPEbmoD/OMpe8jxr2CPqoWfDSBy
q9uQY2FH4Q8r5xrgk2qBEMertyYEmfA1wtA/x6FF9J4leq6XRRshUaa1hGPb
/laLMLlGmD3Dn8zxtUyXzV/UGoFM54nmOPDhX6k+7UZwTKh9xfG7YxHTi9sb
4cqLIwkcF65b17vKsBHEipPzOG7/97XYzLwR9sp/7eSY1WEXd+VoIyzNSPjH
Me/Hn/fDHRvh9G1zHc76lO49PpN/sREO3i1253iblbLJgHsj1Of8KuXYYnWu
JrdPI/SqTfzXny4zB4TVAxthmc5W1n/900QcOxDeCMr3BgO4Oe+Hd15t12Ia
YY8NXZQHneUhlhORjOstsfLluN4sObIwqxEyc+V7OSYp7fEaKmoEnj17lXjR
8+MdJ3irG+Hs0QYzjqWrL+3RbG2Enr+fHThe/5p7xaHeRji1ffYUxyZXXvG4
kRthYvGtCceOhhupUWON8PJYshzHXstraov/NMIhA5EfnOeFMe1TCdxNsLzw
uxfHKaW/Q/hFmmD067QAx5XPg69pyTTBjxN3fTj76Tu30tpyRRO0PHQc5uz3
t16BjodWE+RkDMpz4iMiain7WqcJDDZ0xf9FryFRZ0v1m2C89Lf1Alo/794A
yawJqk5tXz+PPhYsVb7kSBMUL4vbNIe+7pAar32qCbqatU7NooO2GD46fL4J
pOMGsmfQCQI9LrduNIGHT85mjov6ru5/c7cJZq9m9v5Bd2Twa1f4N0H8tbZU
jkcfxIhSQ5vgyn2Z9xzzHds6IRjdBPbxfnUcK69r6NiQ1ATX2iWWc+63/Z9T
3pGMJngvVRvM8cFDFQ/2FTRBWIeiOmc9Z96oWupWNkGm+TyD4ztMH8W1TU3A
de9cB2f9YbpDdIWuJrgV/27Pf/PXf0+uCKEJbM+yN3PiX9IRc3+R2QTV53v/
8KOZ107Kk/7i9U0BM0JorrIiaseSZvCc2r91GWe+iyhkV0s0w9r5FBDj9PeJ
2z75is1w2fCDsgR678eeAylrmkG/zrBZkjOPp3Vl32xshvjQ2xbS6GvGL8kh
es0Q+dIifjnnfRI+nelj1AwKhIpqGXQM4ei964eaYcPFtmJZdPaGL2bOx5qh
Y4v3QznOPLonvdzmdDMI7qlVkkcPNbgT911uhraAjACOp+Q60nVvNsPxCe88
znpEzm+5s9a3GSr+rMwSQat9eW6iGNQMetyZXkvQFoethhdjmuG08qNbnHo4
+zYzbTy5GcQ2NaVNo++OiXqRspqhdd/fzHH0x6Bm8ZqqZvC/o7CGguauPLD3
6WgzVC81rKxDy4mnivpONwO3zverX9EbHAT7r3O1gJXzAVYh2vjThQ/OQi2Q
9eKTTjb6xFytu410C6ys+3MolVNvZhoGJiot8F5mMDUXHRD1WGSHZguYGHsz
89BxFGrP2i0tkNAbN16Ezt2y773i7hYo6DKsqEA33E+6scykBYJ3udhx1kNo
4dX/Z9kCMktFCr+jp5XOCE0cbwH73VtJA+hllyu7SGda4FRPfweTMw8LVyb+
uNIC8gP8zzj1tnOJ37UazxYINf0sLojxsjpK2FXg1wIVCkMnFTnzJhGWpj5p
gbSjIdc2ou9NxP14E9kCh2eKzfehX8Diu6dvWyCb58q4PWde95fo3chpgUSL
Iy+eo7vWKgmcKcX9pFAvpqJHPe+229S2QKs9I7cazVPTF2fyvQXeqhUP9aPl
pXde3tHfAhLzp+ij6E3Or3W1qC2gQWtrmeHMm6wZXqWfLUAgS0X+Q9svHmtb
NtsCeybVd3Jz4/nsYH7MP55W2CMrVPYXrwdGy1ycEGkFwsHSFVPot4yb28gy
raARaeBM55xft3dyd65oBfHxFw9+oJse6bTUaLVC3Kl8vxL0TrFGnufbWmG/
oFpKDOf99Pq07kmDVuAZja25xemX1TOX15i3QjP/ur4D6IcZz979PNoKH2zr
yZx6Ht+xprPQqRVmO1Vm4jHeDt+KBR9dboXuuPPKBuimQ9b6FrdagZQUJN24
iPnoYbjJ+bWCAuPR4F70R2ffD6QnreB74bjXh794Ph5bPvApCtervoQ6s8Br
8Mjzk7hnfCu0rni2Shc9wW20z/BTKxTbsbc6z+PzQnpvC+e3QkezhsydOXye
zPWMzq+tIH9/Z4PPLN5/Xazspe5WWBcz8sHiD94/b+tBHVIrzPAHf5efxvtj
xS2OtsKvT9zN3yfxfdvg9KXuTyvIPbeOvvWb1yArdd5jP3cbHDdqvts7wWtA
/2kSmiHQBvfeXDHRH+c1UNkWniIl0gYxVzN4g9i8Bk/KNYcGZdqgxV/Cto3F
a1DJ5zGzV6kNCPVbR5oYvAYz+8slP65sA3bgtFsmDc+zP46aumm3waLnqRPq
JF6DvcwHWQJ72/D88zmwv5vX4PaGlobLpm3Qs607e0knrsddntp2sA2qmmJb
5dvx+YuZ8m+OtUHqdt57g428BrOSgw82XmkD9Tm1XXvL8Hxopxkb4dYGgSrP
X8UW4fNi3fNnPdtAdcJjFyGP1+CHhtDotwf4vHexhxUz8f67dY/avWqDUS33
8gtxuF+/B9dKY9tgvOKZ2eJrfF5tc5BaYhto8q+QvRuJ5/XDZ8tG03E/MszD
x0J4DS64PNfw+9YGaeMr2pff5jVQDRuZTWG3wbIpP76dlrwGZad9U7J/t4Hc
THXtsgOYv61Sx4tn2mBn385dM8a8BjFdOwuaeL5Do5X3S9+dOI+Ug2/9lPkO
s2TRsypreA0kUzV/68B3eJhw9lDMDI8Bf9W50fLQ76Dx9NKiyBseg5E/w0Od
m9rBMVXx17tuboMkVnGD6LMOmJR6Y6m0jctAVPnDTwrlB2wyDTbg8/wLIRe/
uLxb3QUPd217Hs01D9MGaZQLvt1Q4C9ROvJ+Bjy2VOXKfOuBtQpLcv3Sp2E4
o+rJ95V9UFh52CKzZBLmL/14s/ZOP5T2n33mLvEb1hkuWXQpHoCEHaqicRkT
kJWaptFTMQBpi0W/6j5OgI601eH9NQPA1KZVTCVMwG76q6R13wdA/qCq3bGX
E2DxVMt8nDYAq7ZQ2g3uT4Bb76FXtyUHIXitllKC9QQU3ojYEnJxECavH/vi
MzsO+v077P9eHQRpU9fvPJPjUGk86H/VYxCcUy36gtjj0CCr3mvlOwgyeZGB
8eRxGCjN910eOQgbyZ9Zc83jwCXU3xRXMQibI9SqjyaOg2nCyvOfZYdApdVl
SPfwOOi8ElWvURqC4jdPToUfHIcVz+YpfSuHwMUjYt8v03GYu93pzKc9BLT9
1laV+uOQfjjI4ZjBEDzz97FK1B4HKe6Jo38vDEGO7No5D8FxGHasMN5fNAQC
3KoKP8J+QtPRdF6H8iGQVdu3QzboJxSYR1e6VQ1B/tZbMWf8fkK4rodBTMsQ
xGjObpdz+wn7xDR3/yQNgeDxB7njR35CWlno1kjhYdilnj95Sf4nvMq99ytF
fBh06nylnSR/wqPUi5/Llg9D985e1TPCP8EhymgjQ3UYlofrz4b/ZYPE1T9a
u3SGwWdpR95rEhs8lR3ViPbDsLb686b9mWxwttpkO3B6GIJ1HnXtS2GDxUPu
4G6XYXg8HLPteCIb1JmJE83Xh+EI451q1Us2/MhlVBQ9Ggaj6t8JqX5sqKAX
Tn4JGgZ/iRnJU/fYkKbwRPPzs2E493rvbnVPNjy4vz7sw6thmD2ZWrTgyoar
OYvfEmKHIT2qVkzoAhuO01r/xCYMw6LIOpUNZ9iw6aCbY8SnYfD4VOVSdJwN
Sr5GL0I/DwP3v+zx2KNsWJItXRucNwzfJp+cKD3MhiHZ/A1+FcNQXhT81eIA
GxoOBDrfqx6GP8FZZRUmbPjifTzKswGfZ7Fvr4URG0LI83+v/BiGp1nFA8W7
2eAl07z5Yu8wFFjE/n6jx4Yz++POnR0ahtOEsbCX29mwM9Og+QRjGNSH+h2I
m9jAuOMfY7owDE+MRkzL1dnAsl13IZ6LANv5bRyur2aD07gUjyovAT5xbxWR
UmOD+SrqNoWlBFDiWpB/p4zxKmlufSlEAFke2u1gRTZst827uHwZASKyOspD
5NmgFhQQKy5JAAmpor89y9nwSu267jNpAkjWZk+pSbNBtMTuu7AsAaI0Mjse
SbLh0VHDy0HyBHijk/lyUZwNs+y1/EuUCKDGzjYME8N4B0q+faRCgHU2Rd/1
RNlAWTm/g2clAfJcqk3nRdhwopjc7ruKAJVrfiT+EGZDm02T6981BLB6TqNW
C7HBhJ0rcFeTAE4pC8taBdlQEhD7bkYL70+6++0desvKxztvrSeAirpzzSv0
h6KrP35vJMBFDVfqG7SSzbGrN7YQgIf2ekUqOnwMlv7UIQDz9IjnN/TSAM0E
V10CrHjjNEJH+6yQ2M3SI0Di89k7svj8ycLZzvO7CeCxL0/dGn3pCOkaVZ8A
kXlR7JdowmiD4BlDvD81up2BPvo4J5FgRICytsp2Y9xPg2rMHgcTAtTdFv2Z
hjYofNTdb4bPI3hrqOD+86yv3DhuToAaXol7b9Dao0eFuw8RoIhSO7pqGRsK
bA6WB1sRoPtLkl8V2qh0r7v+EQJ4X80RdcN4tqzR0/h1lADBYxpDOzHeJ55t
7H9vh/EW/LFtBeaDNr0m9PhJjN/X/OVqEmxwc1QyWuZAAA2ZDm8DzN9ireSf
CicCPFiifvWuFBuCNgmmeZwhwPXILFo75lv69T8HTRcCjJe70U1k2PCOe1py
4AIB+AJcr3fL4vraSXeMrhKAxhJQtMB6Mt7Vu+HPdQLkBnzYrYP11prYSkp1
J8Dyr7607aq4PpGaKIdbBFj6MlTOdiWuz6PkgORtAoQKdrc/X4XrG8xerL5L
gIWPGhTfNWz4uy8l+7YP7p/15Hod1ntgxluX9X4EqAg/Q+LWxPXJRikQHxKg
4F2GnvZaXJ9vSEvEYwJ8lb5yy1QL48l48MAsiAA97LhXR9Zh/AqvsTKfEWBr
p/1T/fUYv5UucWeeE8CLyHBU3oDrC7a3lo0gQMMRhuwYmvbLWqAxigDrtU9+
Sd+I6zu5v8jnNQHiLhnucMR+XPwGV7fEEEBV7M077s0YP+3tarQ4AmTIX2BH
oKUjtbtexxPgUPDHlfJbcH1/1YIPJWF9KRU3PEZru8jrc38gQCnIbitB57eI
/cpNIYDu3liHFvReXYHkC58IILX6kGkpuuXtwnGlTAJYUNV/BqJPLP29rO0z
1rO/lu1mNO068+vDXAJQ+O3u5eHz3XqHb+rmEwDOZZ6WQ/817Fo7UojxTdwk
cAzXH5jaNBhXgvOgsv+iG+5PWurbc+tynAflWSGXcP/v7hbuE6jEeojJvAoY
L21K5mxhFc4Xux6xCYxnwcHk9Cu1BDCb1Lrui/E2+hJzemUDAUyufQhlYX5a
lF8s72zC/DxMGTDXwPU+DqoPbCXARrrOllbMJ43t6727nQDXogSnDdA3jt3a
PP6DALeea2jGY/4Xyl2pid0E2NfzrO4nzrdAzTOvj/URoP8SdGujpZ8fPyQ8
SAC9/Xo2dlg/b2ctucuHCeDofg/ccP7lNey+qE4lAHfakNONFRjPrVuV++gE
uFfwN8oW67H5zdrvT1lYTxIuu7RUcD65yuhN/STA2w+SrTFYz9c7RcY+/iLA
Dopt2S4FXM8e3nj7KZx3rhTFejk2SImNL62aw/pu/7x3Eedle2lwwP6/ON+4
V8v3YP+Eu64RaP1HgLvzyvqN2F/WihWPbHiIcLb87edu7D/JhhO8fXxEcDuU
4v4X+7Pda8rPcQkR3r/f+Wg3OlwjjIsqSIT52iPkCOxn6y4t30siRPDMnQwT
QEv6V//9KUoEmcvKT59j/7dvdbp3U4II/SPN3dvQ4aS5uTkpIlRtF7jxG+eF
9fPI2/dliPDdvMauAS1hsGmGX54IvOtEQ4vQbeyGW08UiXD8x6BUFTos9tyU
uAoRfphuo9PQVge5PKJWEKFshbfRUbT4fPQvxVVEeOPvXvUe51NbyrYb8WuI
oMmTeVgQHWbX9lNdkwguURtHfHG+WS25fPWTFhFs906FCaLF8vjHNq8n4vcC
l1EyzseWs+8u528kwgGiJbct+pnULtbuLUSw+EFplENbVHZeqNTB9Q6XJbBx
3oreuE431SXCZe4h/250i6qwS7MeEc+be292oJ+1vKdY7ybCwacj10loC2+D
Mz36RKid7vXiw/st0+4nnjIkwm/PZU/10E19N53IRkRoE3+c7ocOCRIfvmBC
BMevRn0DaBH6vgF3cyIsxllrPsL1N0USTsweIkKNvlxFOzrE+G6vjxURcmMH
G1bg/oUTsrqCjuLvX53XK0YLnVL8/taRCJb+XneYGL8G4TzLNc5EMFTZnboV
8xVcZNWSepYIdrf+HfRGC8o9bvxykQhTZ/xHRDHfdTUrDuxyJcKdWVO6LTrw
ZnFdxVUiqFsI2cahzVbbmprcIIJ+eog3G720Y7y60Z0Iwi8cD9thPdX5PTE+
fIsI/3bn91WiAzepf+vyIoJC2gv5DViPS56drCB6E6G+oy9fAOtVYH9N0Z8A
XL9twq0KrOeaP0563sFE2KC24tMmrPfHyfP5PE+J4P9Z7WU82uRo1PbAUCLw
8afqSuH7gp9v85dl4URIU8p76o+uym7c+iKCCF4zJq9n0I9Ou2TLvSTClVf2
J1zxfWIszr057jURFoo6SvvQfOVvMlfFYL/oF6n/Q/ftNjYbjiNCpZ7WtzXY
f5lFo4ToeCK8NdP0NkefyNsjKfmBCJ3vWvZHoDfp0FKbU3C9rFv2+WiB7GdG
QZ+IsMQ0PaQX/Tl92IMrmwg6u6r2KeL55/G6wGUluUQIbk9q2Ym2T9mU7JlP
hFPeUjePo7do9OpvLSJC1i5xPU/00vd+3ewSIjxY9kYhAj2kpnU9tZwIHb9y
5LPQOe/al7pUEiFx5MT2RnSgyt34ldVYn8Mz1uVoh5hVOwdriXD76BPnPLSO
QlP7qwbMR0rLhUy04CuPyzbNRDjXV3kulXP/5cp84m3Yn8zzxz+gc19UxzS2
E+FPZ6lRMjpY4uq2gE7M/7uq1ZzrTqEyLXt7iLDJ7N5CCnr7snKXxT4iNDdT
GjLQwk/O/yscJILk5sXQL2jCUvFXNwlE4HarMy9D5z0u2LSZTIToMKPFOnQI
3+n6USoRBkOufehEOz8QdP7IIEKjy0FTCnoHV/bcmREiOKv0DU6il/mceKHK
xvm194icCM5P0jyPdv84Po+9fZc6uuB2WlXUbyLsCc7fbIR+9ufIKetpIvjK
ds47o8/cXJhaNov5jAx97Y/e8TvpWf089gs/XShNgdP/hzT8F4nw9Vy/ZQea
wp4qN+AmwbF81wuL6CLXOLsFXhJwzUXbaOM8P3fhZ5C7IAkirFs+hKF30l6q
bRQhgc+FDtFatPhZg2KWKAm8r93cz6WE7yci40iyBAnCzuce240ucXw+elqa
BAVWYXp30eGDev7KsiRQE9qxqwl9/iRJuVcen59VLyKH5x/JY1strVRJ8DnY
2ycBzfjRTxdWI0FX2VsVIrrU+tH92tUkOKj2y04R3z/hbdryDzVIIPnFY/1h
9AWLzs/6WiRY66kR8wCt3+R9YE6bBKEXhN5noqUOqJO/bCSBSZCyWQ+aUdty
98YWEhzqdfJfQJft85Rev40EyXY/7JXwfRfxTTWdoUsCiyVeLbroi4Z1+5J2
4t9Tzfss0NJ75D0VDUhwhLDmbSCaVfRVrHsvCUJSYg+koCt2XPoYvo8EG6L7
g6rQUXmShhZmJNDLHrbvQ1/WKe4VNCdBxkTKNxbn922dnwoOkcBw5OTLKfTy
K+O+561I4Hd42eZ59CVB4SMyR0hwdXVZGMfl79eoVx8lgcDZq3nTnPXsNZh1
t8P4iKskjHLWO3SiSe0kCfTXNh8ZRJfdufn2+ykS9GfcbaxDS8mGud13IoF6
/FrBTPSFnNR9G8+QQJmrWyQMXWpZLTd0jgRfGx92XUZLjg6PhFwggZGU0ipD
9PnAubJdl0nQ4V9ovRxdPHtW+M9NEpR//XnLDeMpHuU79N6LBKuvXOk9iD63
JfqzzV0SUFeZ39ZEi11uPZZ9H/eXo36DjPk9u4SldfohCexDVtdXogsT+RbF
HmP9XX/gkIg+M6CXdOUJru+kg+EFdIGXjafSMxK4nh54dhC9bPm1A41hJNgy
O5a9Gu38OUj5zgsS7N5kk82Fzj+UNK4ZRYJ8WT0NMtafCKvsW/crEiRmxkhw
6vH0496ox2+w/md8bhSj89QmL26LI0Hr+LDJZ7RwuegeyjsSiEWXP09HO51c
K/4iEePzW9k6C/3ljxHZMJkElL9zAYVooQiHvPGPJPAqsN1aj3bcdDvobRr2
z6rNNsPo3KYX9hYZJJjUD2bNowUvZmz8m0WCASHnaRVcrwN/Pc+nHBJsDyjw
NEPnxJM7T+Th+nKfXvVCL9Vf/ChYiNfLjp/KQZ/qk7tXUEwCofSf72bQS6Qs
1GS+kmCXwMNzdzHe9pkXpqq+kSDq+n1aAfqz+cM69xoSqPKZf/+NPvmo4Or3
RhIUJZtSTmM+s1Z0GN5vIUHjl9sikWj+0jHpjd/x/myvuGp05pRacUgXCcT7
hv6p4HmR9/zTJWZE7L8ahSXVaDvej33TZBJkp66+OYtOf1uZ/p5GAuEYZ8O1
+D3Ds3vwvg2TBLrRPy7boI/1/DnCO0oCnfd3Ju+gP3lIamSzScBbatMfg+aW
WD/nNEGCBKLziiK0bbpps9gkCZZLvf/Wjk7b7/yubBrnyWHFahpaR3ulPsyS
YBg2G06hy0QJ/eXzJPhSkfblH9p0Iu62wSIJ+jqC1QTw/NvWcUr2KxcZDt5u
CViKPp6n9MWQlwzLPt+icq6TXvVbV/KTQenuw13c6Mt3o8f3LiXD7e7JoD94
v8lTx599EyLDZKfGYBfa20BO23gZGULXrLj7DS2wqru+SowMzUuH7uagw/ij
zu+TJEOW7+nhZLQ8w4a/RpoMusGp72PRCQ1SiSayZDijWdjyEq2d3m5QK0+G
LSeenohEfwl9PmSqRIZkVY39UWh9N6t7dSpkKPd6HB2NrrURU9i/kgx3z6VZ
JKCtdFvy61eRYZAaeS4d3Sv/9CiORCDN7hsuRjsvmP9u0CRDSHxxcTN6ZEjo
ufk6MvQOTM+R0B5f6zc0rSdDU9qfmHn0YmJg08FNZHAWLYuXxXgEPDa91LyF
DLF8BwR10eIXBZZabCMD6/7WQiF0tHn1+xZdMqyfCcvi3G/VhkdGljvJEBYv
kV3Cybe4EbF1Nxkkvb+UvkJv+83tawVkyA6+13GLk7/OCqXvhmS43uDym/M9
3Batb9duQgYzQtJhZfRx779T1vtxPXkzobxokmPJiw5zMkSXXesZwfq7vPfu
ZhsLMozPCK7rQk+u3tn6w4oMLudqAyrR3ktmXY8eIcMs70d2FlqAlS/UdZQM
aT/SHOPRYU23PtraYTy72/teoOUzt5l0nyDDJRFlp0B0wvNJ8rFTZDDNHdzi
j9b2yPHrcSTDG7XtGV7oL7ZuqsedyRB3uGPkPFpfb3Np71kyWBp+GbFG1yqO
nzhxHuthoj9dD221mDHTdxHz6Wy6RQndS7gSddKVDN4Rf7zmsP+cv2nrDFwl
A/PxqN8P9Mj7ke/2N8jAv1P9UCraIzD12qA7GVrTk/ruohcvXVzmcIsM+0nn
tfajAw5ppg15YTy7r+2WRItvops53sX1Py0R78Z5EC2ZTBv2xnzzWnx4iV41
dfaR030ycO9azWWD/tS9So34gAyULaAogt5WRCo/7Y/90129koTzpywm/hQp
gAx+m1NEhtGmvk7zzsFk2ApKIn3ottOqr8khmC8u1RUd6OPGQ9vPhpJB9OZn
swY0ST32B+U5GXbEdviXo10F7d3ORZBhyMu/Oxs9NaIgTosiA8/S2j1J6IhY
em3MazLYl47uDkdvtcz1PRJDhj9rVOe80e1cfrpCb8nQZehw8zz6RvahnxXx
ZJgST82wUOacZxQ+eCaRwe4FT/JWdOZyusOGD2RYrDt/UgY95nW/5c0nXJ+F
HVcnzusQrUOPrTPJsLq1rIfzPlg3IK8vmE2Gh6+fpj1DNzylTZXnkmFVfnj1
TfRFyEm/lU8GXs0W9TPopRO+59YXkWHlKLTaoj8kHFSmlGC8eBllVmgTG/nO
6HIyrLhaM8UxlZ8WcriSDFza/e7H0I/ys42XVpNBZY+63ln0qou+C2W1ZPCJ
/7DPE12pcDD3ZgMZlI87vg7jvN+a5Fy1m8mwcOaQDud9xeVDXUVuxXlWeUOm
C/12Y3b/63Yy3HFvAh7crz7R54VVJxnkvU5lcf59ajDc3HxJD84f/Y4Kc/Q9
Yznesj4yFLbP59ijFacpRR6DZDgc2ep2HV304bPbOgIZpv0t/j7m5Pe4jxaJ
RIbUJK8jnH9fnREyJ72ikuHqxKGbJeiXJbLRlgwyGLi2OPejO1U/C5aOkUF8
tO3dSqwvj+/eX93HySA2YT1hxjnPPTxwW+s3rn/1/WXu6Gwd2c3EKZyf/nZT
b9GHaWTGyxmsL+mBj63o8ZdZ7yzmyRDzXUiTB+s9dL+3Hf8i1m8JxY1zvmv+
JFPnxkuB/CXSK7LRrg5k37UCFHjL1NX9ixYWz9IlLKWAikGvgDH2Y+rXez+j
hCmgIzzz7DF6v/v+D4dEKTB8IKK1Cs1YLePIJ0GBlf/S6xbRAV0kmWIpCsxq
7Lujg/NJPTCz5YYMBS5UH6ecQ1fr3XusKU+BK90jAi/QZ0fM9IcVKbDUYZ7I
mc+8scunI1UosPN44E0C5/1gQUo/uJICPPXhX7lwvhpyZZ7jXU0Bp3SFGiU0
4fNd5SJ1ChwVWPFQB+17xqzz+loKnG96f9wGrbJ8+VMNbQqkv/7h+wRdWkM0
HtpAgY5HG0yK0PZeGQsRmynQ/zTnEwE9v/ZurrkOBb7lnslZ5MzzflNXHl0K
PJ3VPyG9ig16T6VXF+pRQM9+X/xKdI8+sf/abgpUDdwKVEd7jqe/UAcKbLnb
IbYKLZNwx3zQkAL3dU/qyqK/HDHljTCmQKaE6D8edKB5gb+SKQUctzmEMTjr
MVq79P1+CiTTn3bWoDfuig5ef5ACQZqxLbFonq3Cy/IsKMA/8+TuFXSn1r1Q
/cMUkLc9MbAN/VFtTKL2CPqI11ke9F0FhwhLW7zf7vjpNIynhWSrTI8dBUYe
+uznnEdWChm8djpJAYam+Kl5zvuC+7Mi8xQFYtfZbua8D95MhK+Yc6aA9oF/
ikysD0abrZbSFQowR6pnL2K9FdfVfkq6RoEknznJJehnFTs2rnejgMw18ijn
++Z0QcrnLx4UMCi9H7AHrZOloKPvSQG1i+0kTj8u+fgkr+Y2BUrcehavovve
LuywvEeBiI0fJ/7h91fGyyvF3T4UWJ/zwN8d7Rc6tMfJjwLtl6kzTPyeswmw
rGA8pMDD423mZ9CavhV7bzymANwz8hnG782WqwmmD55QYMCp0o+A3/cKFi6H
kyIpkJCsxssvi/NuX3eH9isKZO+2tI6Uwe+TPWa2X6Ip0LyEz08T/WJbYc+e
WApMLjEMLVvOBpf1Widr3lJAY4+A9zG03po3gxYJFDj74ciB39J43lYWcepO
osBryfiUMDRB2pvk+IEC6xratE+hc0TYZxkpFLCCJLX16Md8jvTrnzCfbopP
uNAnFlovzmZQ4JDzdpduKTasnzQY9ftMAU3xqZzPaK7Rz1eFcikQefeYRyi6
g6w2EZ6H8Uo69eE6Orn/hbtiIQVWP1ly6Cj6dgffdGIxBUw2Hj23B32w8aaX
dhkF5sNMxjXRqt9oc7kVFNib1T8mi/5VdMx7zzcKKDyVdhBC12TX/auupoC/
xoQBF/p1qt4DizoKPPC9ETUrifMjIZWvu4EC4pGRDtNog2jFAMdmnB/WLy9T
0VLhIYKMVgoMRg5dk8G/pwX9fXK9HeP1fixrH7rQ76ro7A8KfLlftcEdHXJ7
OMyvmwItGmeYcegtF79Ghg9QwL73j/QEmv/0FjnFYQq0kcf8ZTFePXaJ0YlE
CogWpW3djfY183+bS6MAud5n3310u8MF+01M7O+FNLG36NU3zeU/jVDAcEpP
swTt+WRDlwYb6zVHM7Qb3RAv8SJxnAJ2272MJ9BKBZOWqr8pIOiraSaI+b7W
0i3yZooCa5/qRauiKylF9TIzOA8P9thwLD0f+zh8jgJFhwcfbOfUi4Sfkehf
CpRbswsPoAs1znIF/6MA21J47iRaRN+0lJ+HCvv26xhdQjvYaN3x46NCtf7F
yJvorEvLdP8KUOHaptRxbzSv3/hvL0EqGKr8sXmItn3ZkTUpTIXdS60q/dEf
0/OuXBelgjM7dwfHc99ea42KUyGzbU2BH/pQ3z36eSkqqGcmGNxFvxt3TCIv
p0Jt0Lr2G+hfAkanHeWoEOpU4XoObaysrtKvQAW/rafFbdEvtwr22ypTIZZH
tNQIzdo/+rJdlQrkgapqYfRup1YbCzUqyGwwMeJBP7uVLdGwmgp5ZFoJJ57E
kMiWfRpUqPybvKUPrZPo9eTrWlz/vcdJxZx+KDxptkebCmqO/pJRnPy26vMX
bqDCreTEexfR62grK3U2U2GbNZG0De2zwOebtRX366y/bx7ro02SsUt7OxUW
uooSC9FqaxtnPuygAk+W7SKnP25CxpdVu6jgOSZxdCW67uhzt7d7qHAsdPRD
A9argqvHRkUDKiRG0qZdOfX94Nho1F4qOHBx7V2KLn+1M0VyHxX8W3cExUjg
+6uaa5XQASpQLQ9aJonj93Q/edj/IBWGsgfs9dCCv2piuC2psOtCErVADOf7
0tTj3oepsHgtkamGzlB5KjN7hAprGnoveIpif2+73uFhS4XPt0zP5C1jwxHz
I2HjdlR4d3O0Z1gE+/v09kOuJ6kwWVNX/1sYzxee8kKMU1T4dGlg2y8hNhx4
tlBzxokKDU4ayv2CbIhNGn447EwF85QU34yleD4oqjQ4eY4Km43PnHJdwoa9
39//7TpPhXubbfKkBfB8SQ8ssr5EhXU37gV/4GMD/e9lzxZXKgDvQO9qXjbs
lLbUOXAN80l3Swrh5pwPt0xU36DC3W/iynH/xmDIYHmGoQcVcqNkOsQWx2Dz
sZlLpbeoMK+3JcZ+YQweXenX0LtNBev0M16P5sag62EZJfcuFQrGU88HzIzB
2uj4+E0+VFjPt/TSuekxuJf1yOHTfaxf+h1flckxWDl4oCfRH+tNJYG88ucY
BFfuyjwaSIUQ4z03N46Owa8P2o+XPKGCjmp4iARzDE48VT5V+JQK/Rnv1tZR
x6DSTVTnchjW8+8LB4+QxkDL7p+Q8guM/xhrMntoDF7sGSe2RFKh5o36Knrf
GCyoEQvuv6KCyz/F7p9dY3B2aXvoljdUkLo9ffve9zFoGqt0ocRSQUF2Jra7
aQy2deTsiXpHhelXN2rZtWMgEBc5MvueCjvMmrQOl47B1YePK9M+UiHuZvrZ
mPwx6L7g+fpUGhV6HwskJX4eg49bj5t+zaJCn82KrbSkMRCXP6DinoO/lyA+
WBk3BrcXd06tzsP7Zcv3yL0cgwP1SomBxfi8uF/huwLHYMSBsGhZg/U8ZNJI
cxmDDcHn84b6qVAUbHM7T3kMoq7ZPQ0bokJFw5OBXdJj8M9m/9m9RCps/RHg
kSE0Bm2q6/CLiAquRi17T/4ZhR38SsxjTCpsSZG7HTk2Cu9YIhWCo1TYs2zY
JGpoFJa2/Y0qZmO+dqjUuf4YhRtf2FeuTODvj60Wv90wCn3Rw8aqk5jvSxMq
xRWjsPd+m+L3aZwvN/wnt+SPgqR5dr3OAhVs7HkmvyWNQi7h5poFARoIJVoa
X34wCko1LgvpgjSYtbUJOnlnFPzTjnU4itBgcVE10s9tFGxv6fl9k6DB8XUi
3NfOjELZSS27m9I0yMjUPr3dfhTUDRU3asjSwFbfMFDLchSeqYsI9MrTIAT+
7AzePwp/hP8OBCvR4OWsd6G68Sg4TYzl7FalgadrJy8XjEJd11AweyUNNr36
Ky+zcxRexVfssNagwWqFipSZTaPAFfBZjE+LBo7XT6yq1h6Fi64JtC/aNLju
W32hRXMUduo+ipDfQgPpumXHXuJHUJez/PZYHRokrg7oC1EZBfdnGd0rdGmg
fSPqQL7iKHyi9iho7kb33RpPlRkFlYj18dtNaBDVnWXTLjwKPBNd6UdO0KDS
4GKlx/QIxCm5Wnbb00B93Y6Sjt8jsMuMe+KEIw1Gf2gu3zYxAh5v1+k4n6VB
gss1yuLICIg3VnRSXWhQPLujaoA+AunTRz0vXqTBncELw/uoI3BAbURu7DIN
zu5U96oljQDt0P2i61dpcFf8xrPThBF4cHu5/eR1GpQ67leTHhoB1fepfz3d
abBWM3PrcP8I2C38MPD1ooH/6lWtZd0jMKVxicRzlwbudpuPd3SOQPiRfw8f
e2P8+ZuduH6MQGPq2tqnD2hg2PiJkdg2Ahe6yi5I+NNggDx+QaF1BPh4bIQi
A2iQdLPSJaV5BPSP+xyKCaFBDp9ov3jjCPQ9kvqpGkqDBe7Aw8z6EfDM+hiW
+Byffzyy6EvNCEgP7NmiEUGD4dBpaV101pKOjtQoGth7RkY3Vo/Awa0Xbm54
TYM5MTdzdzTT4a9M9hsalBwP0diAfhwcXrAtDuNnQ9mwUDUCankaJwrf0SCF
687pQXQZsWR+dyINOk4dKv+OPrnMOrbiPQ1WujqY9aJndtD1jT/SIGxd+sJv
dMTZe4TaVBqsitEbWIn33xQm8cA8nQa9pbx0Z3RzcfKq1kwafA4TVs5HX6Lv
qrbOpsEn6cM+Krh+AanvLl25NGjc/0PoNTpB32XpiXwaCG+KrFSvHQG4NJ8y
WEgDccHf9qlor69rxihl2D8LBwyS6jAeY0XPLnylwRPvulMbMF6f5aw2jX6j
wSMeDaOvaNa1O+6/62iQKR9wjhvj+/iN2HLPRhqQ0gITMtCrapPy5pppcG/v
5Q9nm0bAXqV1lruDBiP3OpaOYH5E5d2+FHfSIE3qkmVzywh8lVp+42YP1tfK
VHoh5lNd8CSDMUgDowT1ZdnfR6CHdzExgUAD/eVnokvbRyB48Z2jPZkGz9yl
F2I6RmD3rJGiDI0GijxHlH5hvfz8TetqZdCAVl6iYNKF+2cHhQeN0ID96fCf
V1hvNkxtCyM2DXTqJbJZPSNQMORWnfebBrdDpSqDsT4f1C/mxC7SgGmtfLAU
61mnKv7aMW46EAqFFZZgvdPLjNdJ8NFB2mpNjSUZ6yM3OOGRIB10hPoKBrE/
FjPWO+iL0GHuc/1HM+yfrJQ2+RlROjyR03jpzRiB5W9lnl+WpgNb3XXxG2sE
6l4XHlwjS4eyliOendh/dyLslw7L0+FQyEWV/tERGApK8LVWpcMnM9U/lewR
CHu0b5eIGh3umJZrvv85Aka+jOnq1XRYYv808O74CHz02HBVT4sOp2ty2vl+
jcCJa9/X/tamw3olkdJ89LJLHtRPG+lQGBDe6YDzwM2xyH7FNjrMrHHc9Wly
BFafOCXXp0uH7d/6FqOnRqDLhuvHi510SN8pU3gG50mgZWLooT10cAyRuCTw
B+fJARPzJQZ0MC9okniIZhszBb7upcP1MtOsXvQ7CKm8s48OzXEP9gnNjID1
zo0+OmZ0cDnu/V0azbetXY99gA472Lo2s/j7vI03pz4cosPeU9nN+eiLWnKf
T1vRISB5dI8VWmlNsaviEToINNCSKnE9LaoOmp1H6VBa+45HDH1fgZvyzI4O
mW8Vjm3D9W9dnvTW7CQd+g7bJGzD/dHETE/yONDBSG53Txbu/5UQS6bEiQ5q
3kbUAIzPAf6n7TfP0EH/i9cPF5yPf/9tfLbRhQ7RFf3vD2F8nadu8idepoPo
4XU/t2A+phqekq77YXwiwi/zYr4HhDsvLDykQ6/KzZeHaCNQeVDpZ8BjOig1
RBmvx/pIeXrmplQQPt+75a0wBfPZkjof94QO+wfPmUxhfd0S++Wn9YwOG1j2
O1jEEThlpbc0L4wOvxJzbrKwHrXaa6WbI+kgq3K/XWQY57WU2Bu7V1gPQ1MT
G3De/jliu5ISjfk1b7S3H8T6iYj9cC0W13OOSypyYASqOinr59+itSOle7He
U2W0cx8n0CHvXdBpTfTzY+47Jd/Twf3r4OyDPpwPr4oqYj/QQSz0+SCjdwQc
erlN16bSIVjwvcgJtLHC/ubcT3SgbpIL6MJ+Wncy7IhBJh3sTok3i+J1yZju
3sbPdDhpL73xA16fGVBxOpZLh3rp3rnD6CFlFxopjw6Jjx02iaGrHdJdrxbS
gfU5qXUI+/XT28lfs8V0iIlK66lAhxN23fYvo0ORjrv5F7TXyof/xL/SwThk
XqME7ejc4B/zjQ47Y42vdqJNEiVENGvw789bqHDj/bUpduE5dXS4OCK3A9CS
a97JQSM+XzOpOBQ9e44e19CM+VAd//gLTUjesMa2DdffuvDvPO6nhn4zjdiO
8dvRUPET/UmzdPOVTjpUnrQbCcJ4vbjIVzDTjfXyW7STitfvpJrrP+qjQ6jW
L606vO40El4lNoj1M3spKhHjbaLdd+DNMB0UHG/LemF+1l9Z+V2dRIcce+WM
fZi/OXbm4B46HQJV1JWaML+EjX/O1DPpUE0K/v0I8197XZ9lM0qHZ/r+hO1Y
HxG/mqYvT9ChtmTnvD/Wz92t0t5/ftNh2/CU5iqsL2ePk7wPp+mw8bWJayHa
7EtCkOgs5p+lXW2G82zjNFMsep4ODR0ft35Hy+hujlqziPGyKcq3xnpd8PRS
+szFADUHo9NfsJ4bZgXW1vEz4PHwqeJkrP+zf1ftnRZjQOEiLDmE8+wVn4OH
9WoGtGYU/P2A/bR4Rnbbd3UGyGhQtx/Hfjv7rW3Kci0D2nVPi8/j9Qa14LyW
dQwwkyjdx4v9uemBkeehDQzYMMFS/oOOIi7oNm1iwP1u1qsu7OcFg7yZA1sZ
YFBVkheP/e787lph/TYGXMt38rTDeVD3T/OO2Q4GCH/u6ptDb3Ak7azdyYDl
n1WIgThPIsrezO/bw4Bn+TuCeXAezSkfLakCBtysWt11Hu3kLepttJcB9d2k
qgJ0zUDtnkpjBoRMuNlOobV3+y0amDKgVKIzWHkW6/PNzvLy/Qyw3yHovBn9
Z+63r/5BBlw8JzawCW1/It2g1IIBlFf0GUV0ZaEL9+7DDGhpf17wC++nKb+i
sugIA7wv+AiLzo3AM6/eB3q2DJh65k7Iwt9PdocbFdgxoCSl2f4g+oTuQT7d
kwxoKwi5T8C/V58u89dxYgAxR6/sF+4v5KiXSY4zA4bfavRcR//K3bxkyzkG
aN2/85qO8ShzTwrceIkBKcqWkuUYv9Udp/ZnuDJgsK+tXhUdvEVWaP01BjiE
5GvexnjbTgQ90fJgwIGmnIHlmI8SK6ODKbcY8OVE/WZOPtWyFkQ0bzPgyqDR
hkjMZ6BYXnPyXQboHcldz8b5yb567dkaHwbk+w0cIeL7y6ZF0zLpPgPKdcZz
O3GeFq0nia16yIDDrj+tGsdGwH/U5vmKQAZIXczSK8J6YpmLWr8NZoDxBrfH
Ofj+tEqrlVR5yoC/nqqiGUx8P1zaGaEYzgDx17tbOPWYS1d9KRPDgAwJP4kP
WM8Kpr3HIuMYsHE+blsq1v/95HA56Xhc38WPERnYLwfP8UdLJDPgdef1cib2
V3ZV2YmwjwxYphfuzMD+k1vtpSiWhvVaT+wex/6kkFgxIlkMsHMX1lPF/j2w
N+nUk2ysrxDq6n3Y31nxp1SEvjBAo32M5IH9f8+p7e2SIgYY0gI7J3C+kMqD
nB6XYDxzFYU488hM1WglfzkDkjMHxKNwfkkNfUngqWKA7QZmxGk8zzwT8fbO
r2FA08bs3AY8LwvtMrZzrWeAtfcrZ0A/vii8dWUTA1gyMXHleB7iedW+rKuF
AUraKVVRaJ+a14zg7wxQVlDwOIeem3T6Bj8YUOfmu8sYfWuVZtxkFwMUt/cq
bEX/OvzTK6WXAbJnNSS3oK/ezzviMMCA4oWLKw3RrAzvDVLDDFjCFW/mhHYZ
NBasI2I+rjQFhKKJwiKUexQGvDEZHWpB2+/sKNtMZwApiMtCBdfbcyH6NY3J
gO+6gp3eaJuXpz3ejDLggpWAxxi6rVrT0uonA1I7/mhdwf0fnPy5lv8XA8Lx
/bSArlPL5yuaZOD3VgEhBuNlfNhn+OofBqxw+iQahfEs991XtGqOAQ+W5u0A
nMc7M0QiexYYMJQZ+J2NzhvouPb0HwO2267uTcL8ZOg5r/nDx4Set3k6qzGf
WhfWcn1awoRVRumBY+jkqPE+JyEmXKC6mpdi/mN/+4Q1iDGBpm6qfB3rJST9
zXysAhPSYs//UsN6Wzrg3GWtzITvO5JLVHF+PhLS+rxkBRMSfRZ0wtBcehNP
StSYwOu15k0IztO75wtcbqxhQu2J9wcf4vnh0srO78abmFDKK8S3BuudZhnz
aXYLE9xv7t7wD+3scyYgYxsTnrZVJ3Zgfxzvn9gtt4sJI3sHr1/G/vkhWCjb
vIcJG09crtuA/WW14/4vPwMmdJ+wujyKbnIxbd5uxASyccjxJOxHs0jRjyP7
mGAtp/rCFvu16lvng3dmTKi4+mqgFm3wK+bUUXMmqJkW0+9hf5esOLtDyIIJ
8/csxldg/+tarpMqt2LCfnHr6Rx0tvevMfcjTBDjrpndhvNiw6fCOk1bJphb
ps4lo1P77icO2jFhYW5xRmCSc/438wk/yYTVfFWTR9EJumLHTR2YUHlpduwF
WsWla+uCExO6NrylVKCjI2JFP59hwmmrLz0DaJlvZ5nnXNCtuxro6PCJdVUK
FzGfaVsKiWjRFb/jWi8zoZr6+n0DOtii6Pajq0zQ8L4RmoDm9/az0bvBhDWP
Oiw70bkTo7Pl7pg/K5KQH/qsi91bk1tMOBGzNFkBLd3/zbjZC9fnYrIyAfdT
ZbmRdeQuEwSz3tyTRXtURYf2eTNhvdfSgjsYj9V6AttO38d8lId0NGL8fqTf
6KM/YIK4v2arEPqR2qDvVX8mtNX3p+pivHVemq2ZCmDC1afJLtaYH4pwbsPd
YCawWgN5TmL+jKeClweFMsHn+4u+bfi9wFe3Iy3xNRPYMW1b/pt/u5OstGIw
P246ESZYT2c/i01nxTGh/yjXuhGsv6pomkFZIhOk9rbNGOA8fHgloqsnnQnn
cq2Wq2J980iNc4tWMiGU68fh9/i9lR1w8kNEFRMEtphf5sPvMeeFmoOKtUwo
8r29pA2/zyVvbPkVX8+EAtLepkz8nqukxr7UbGIC18kPhYn4ved2QnBPZgsT
XjCSW9Pwe1Ct1YO07TsTrj0xFK3D78V2I0JASQcTIo08b87g9+SDAvP1Rl1M
4Jcw49+D3rI+v72+B+vxd05pZAPOz3g1L6t+zOdIURwPOlzmmXL3IBOkZ+0/
PsTv1b1PZitPEZiQoRjdJ4f+9e/sBQqJCc+PuG2rxO/dBI+2ZZepTCh7Ry3w
RVszd+VM0JmwnXfy7GE0t8MHOy8WE2buxOrporPaJRcXR5kQkXaQUoB2MvVJ
9P/JhPQR7x+f0eIlTDORX7h//e4Czv0rNh1lh08yITvJ7vkI+vr7ihfyf5gQ
p8zjoI3rWaGgrfdulgl3UjpU/NFtz14OqS8wwdSsuWMKfZ+X91H6Iu5/jn3P
B/e3yevqWh1uFuSU7VBQxXgQRntbinhZcCQqNa0bHXZ6n4ehAAvI9403f8R4
GnRlydctZcFZH4G0MIz3+AGlcgthFnQ+G5d7jvl4Vx5wtnMZC3Szee6mYL6s
dH4L2ouz4Alj9/dezCdXikMmSZIFLZvfKqphvmtGu6++Xc4CemmFnAM6ZNPh
DfZyLOgqEXASxflu7dEwJqfIgjyXv02lOL9lC4zSO5VZEFCc5OiK83lgvsQ1
fAULTIsXZBVw/ibAdm3LVSyYO8c/XYPzd0OtZlqdJgs2lmiuUsH3rT31V3KG
PgvUL67+uA/nm9paV5fLhix4nLdBbRbrneFKXaNpzIKUDKJQEvaD+2R3Uvx+
Fmx9a6hJwH4K5i1NiLBhwRk/ZvgEnn+sTLc7Hz7Ggh+r9R444flJ5knmStET
LFjqvplQg+etBMmEdwGOuH4xJcbtvyNwwVbRydgZ1+MgGl6ziOuLjlDlPseC
y8dSUoW4RmFycNlw6XkWXDq9a96HexQKVwbE3bnEglVXpxxv8YyCzzkuB90r
LJiRt8+34R0F45TbypPXWMA6e41bgW8UhMZ+DWS54f4tNurXoNs2ucZcucmC
NT1vrhznH4UoD+pJLS8WXOX6EtqBti9wUKTfYUFH7Z0kHYFRUFvo7kv0ZuH5
YCztHhpPTtFO91kwtVUkOQ2d8bDhuPJDFmT1dId/RXvUGsn3+bMgSMnKrQy9
U7i0JyqQBT7/PIwT0P8str868oQFYX4mglfQVeGZx8SfsaAioapCBR3cpSnb
HMYCvicP48dwvVYKCV1BL1gwEvT0RQtaxkExyiSKBT1n+JvC0APxEUd5X7Og
WW7kgA46gbpsecUbFjR81BcvxHhcWBvw414cC9qkuJRU0euvcEXoxbNg4PjG
qy4Yv19Zt49MJ7Lg150mgVCMb8HkL8mcZBaIenZTX2H8fXa4tl9LYcEWCyvh
R/9wHt6jPtf+xAJHLl1PK8yXUIXDYWYGC8KfPlm7uID9xdsjnvwZ1zN1SO3p
PH5PmB5uc85lgYSez+m/WA8nnzSEquaz4NQxJboFnqdXtBpZDhSyYENH9e6j
eF6mSZaKvi5hgfOvtyEzOM8/2W5vOVrOgpVNjjq+OJ/dojOfSlZiPTjx6zCx
XvMXogMqqzBfd1VFzRj4veLw2M+tlgV9q+T3P8H5G7Dq1M32JoyvfBqxDM8X
Tf5m1x60siD+vBFk/r8i7j0eqjSMA7hbZkVqhopJbllLKJfcy5MpIhGJVhmF
2iSFWm2p5DaVS7NkpUXlltRat25auYSSVM6QLsot5XYO0ppqidnntH22P7+f
83HmvO+c93l+jz+Gnk8HTHYZtwyBKqdiKgbPV2bhTO7pZ/j9Zjqea8fz3iP/
wZPTPgQuC7dFeDdg/wztcX3/agjsFnvW1NaSsLv14dqcriF4UafnP6sK65dp
+eoNr/H53DLvLMgiQZiWayPxFu+/TyfI6wzmowm+RVn/EFSUWzaMJeA8XrVD
nzWM9eYmyTcOw/3UcNOuHcX9CkmcbA/A8xSzXH3f+yHwcClT6txCQvsaBcWW
j0Nw8cip7eNAgtqV6VnRE0NQ+JCTwjDC/iM3xDCeGoILnKP7wjRwHiBqJpMl
SFiVFcXxFSPBxKRQaDsDn+uEk0nXyBAcTE0bHWNgXU9Nf3IT11X1MXoweyYJ
ZsszPh8yHALJzXt73Wbh3Oz+uTMH65zDba8O8Tkk+IoOzY9vHwS+qt2zUhYJ
lSsV85fmD0JrpKHAdy4Ju+Y3xadgDlDqXdDEVMK6FXP+7vXFg8C1Y9y9wybh
UCzf80zvAORcel8VuhDrFjtjhemZAeiX6SzXUMccb18ffhrnQv2gxjKBJs5h
jJnyRQP9EPr4WmHU95ijuUEfT5zEudowK99Ih4THDqSZumY/2AoPpCcbkCDT
ZVOewOmD45v8frM1xDoZrzDh0/gWHt5y5o8Zk2D0QOr0O8e3wFSxPJltSsJO
i/Id4WM94BmhFe1mgblHv5s9ad8DGd2zj4hbY58wr3i+PqcbujmTYaUrcM7x
crxwULIbAhktu5irMGfUTCUmFnVA8a5K/zt22BcS17k8TXkF400F3FAHfM94
4hr3Y1/CsaRjbgJnElKnz03kxr2A+veBTlGuJOQe44nzzz2HmR6edkbumLsN
WpXVK5/B+pu20ONBwmWZE6s2DzyF35QNLJN/xD7Lyo5YrvYUXhxWMrHF9yLP
UaPpnm8bqHZKGoxx8T1yboq66tcC/itHtbO3YZ1OmeLlWbRAQU67ups/Xveb
fqU9pwWGpe6xxX/C6+WPjlsNCsB4Z6liKb53Mmm7Y7rqBFCpd/I75l6cs0lW
WMdRAZg9mf/odAgJxcWJDlu2CqDkyKVkxf04F0bZephxBJDz6B5b6SAJHs7e
bCk5Aagc8Oz6PZwEWYfalg/vCUhV7ctdcBTnLFf/evuXBMg3hAWcO0ZC608w
+nc9ASeDZxioRWNOifd0ny4mQFwpdSwrFueA2wXvdmQSEF6jdUPzBL6PIS2d
OSsIGA+4Fp4XR4JNx2hJrSUBe5irQTuRhH5StVLcjIC+W62SBXwSvs/cKrnN
mIBtfv73dZNxPcOlMR1LCNhwNdrNAM+lz4EEYzMdApq2sOYVnyVhrJDly/ye
gNVSOe2GGSQs4P3RKKtJgLnHHf9leK4N2CxHHxUCSqZcdW7kYJ971rX1hjIB
i/O7KfOL+P2aVpcYzCcg1yWk9NYlEgpMS6zrFQlQ+SgKs76C5+FZmVg4i4Az
F361qiwkIZndIHKZQ8BsBzWRTTGud6NM+BoG7se7orqaUhLsxPb/nCxNgMTv
Nic510iIMmoYfDuDgMO2j9fV3yDBbWBG+2r0+CCXaX+LhOtaS+2KpAjotzqa
7oh1yWKJbWKWJK6/V25rUw3OMZO6Abro9oTMRc51JMi5TFXdliDAfZn+wOO7
JLhrVyRtRj98VVHoirlqSax/hwTanucU2oI56dzOD3nXxQmoNnhpuhFzTxax
v38f2uJp4EQb5hyz6pd5VuiyiImqTZhjfE2WdMih9X6Ij3mBdVbNYHfSoBgB
ec3KDlswt9zIKM8PEzWD6sHLch2YW4LETh0ORqepWwp8sG4vWdHasRs9p/F+
ajfmlgm3hEeB6PjQHzf79eD7YnN9bRBakj2g+gbnwuuSbh4h6CO1v/TuwFx+
Mctn+ABaGMgo6Mc+kTW3kxWJ3quQFrQL+0i+X/PdBPRAhbYRiXPdzRPG0ulo
3+03hEE4J7TFMp5cQbfL2f81gn1pystlaRV64/W2iBAh1hMGQ+kJ+hF3xyr6
/0IhiUZ8Cm0vLWT8jLmnc7zvviSut6Yo9qEQ+2Tc7L3JLLTlJsXkX7CvWs4r
ytJEl4lyPf7BPqyx3cWcjdYvMGEfxr7O/zXUTwF90bWu8zPmhHvmAetmoVX/
2ZAbIUNBo7exkIE+m/16p5gchfWl2Zv+PObaffrR8hR4WUVLi/B5su7MlrVi
UqB1KML7E9rQ8s/BMQUKkj8b7v8bXV2y9v7leRScq/997Tu0i85Avq8yBU6C
8tcj6I4LPJ6yCgXpmnzrUXTQ/EXbBaoUxJUre4yhJ/k1nDgNCtgpW5YK6e9H
2kfDVgv/vsz9wQRaOWJS9EmbAnlZcQVxfL4C4dnOEl0KtsadaJdGW+wxqwzQ
x9ymlM+dgW5405qhvpQCXasEaSm0p3do+HMjCipHzdok0H2t8l5Jyyios7jc
SN8vzKnQ3MGcghVzX/eKoaXqHOeJWVGgx+tZRDvFqn/85nIK5jPXK9D7oVkW
2xoMFNTaBCyeRpfqapb9wKHAPUX+1BR6ZXZ1UtdqCh7Ic6xpNytxg9PWULC4
VMKUtk/ShPP6tRQEh7uG0x5hnNVnOOP+BerJ0vc7esxUtno9BaVRKf205T62
DB7YQMGG8Vw1+nkz94bcX+JBgc6iJIp+Pr2+WZf6NlHwU3RsJe2/uH/wzm+m
QJYVdZq2Y5vDdk8u5sAW3m7az9f1ceS34f7XnnagvbM+RuOeHwW+vZd0aX+w
1hCL2EFB9rK78rR5V6s6TQMo+DWobZRev6Ked+VwIAWXCMMHtPNy/sm4uIeC
pNTMQtom7LRwbggFdhVKabRrk5d5zd1PQYPtxTjaG2RazB+F4X7qcmJp90QG
z+MdpGBZ6Ohx2iGf5ITLD1NgNlNDjf58UfCV1vGjFPypk6dCm9+/pqwwkoKH
7yXYtAufRgerHKdAOt5dkba1i7rLk5N4HjbZMWk/uFupn5hAwdtm1pf1bF6x
RXY1nwK38YqZtAevfRqcTML9q1/JoO0X+qbzr3wKap4ki9F+ZUC0HrpNwQKt
/RK07fsYn4tmDWO+N/5yveQ8aL3xGYZqQvyLpX+oSI8sGgatKfr3MJuBW2zG
XDg9DFem//NedlDjkY0j0CP6z5G87KhXV0Zg+qvTA/aw+oq/+aqTZe7otREQ
fXUfU1AvUT3y9fc7CXA6L/adbus3z7u5lR82+c1/DizMkF83+r81YxUdGPmj
/98vTU1WKBJ9878DX1vZ
       "]]},
     Annotation[#, "Charting`Private`Tag$124338#2"]& ]}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0.2499822143205533},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{992., Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.716552227399151*^9, {3.716552838831346*^9, 3.71655284193149*^9}, 
   3.716552883558098*^9, 
   3.716553058989146*^9},ExpressionUUID->"3be92677-1b25-4cfc-ac1c-\
91d27528b810"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"$MaxPiecewiseCases", "=", 
   RowBox[{"nx", "+", "2"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.6858541411555786`*^9, 
  3.68585418884088*^9}},ExpressionUUID->"a1a574c6-e09d-482b-b7aa-\
c2b59d957b5e"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "\:0412\:044b\:0447\:0438\:0441\:043b\:0435\:043d\:0438\:0435", " ", 
   "\:043d\:043e\:0440\:043c\:044b", " ", "C"}], "*)"}]], "Input",ExpressionUU\
ID->"ed9c9306-bdc8-4a15-98b3-7a83ce12ffc8"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "\:0412\:044b\:0447\:0438\:0441\:043b\:0435\:043d\:0438\:0435", " ", 
   "\:043d\:043e\:0440\:043c\:044b", " ", "L1"}], "*)"}]], "Input",ExpressionU\
UID->"f7c993a1-14fa-4346-b084-ca2f3c41abe6"]
},
WindowSize->{1366, 725},
WindowMargins->{{0, Automatic}, {Automatic, 74}},
FrontEndVersion->"11.1 for Linux x86 (64-bit) (April 18, 2017)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 232, 5, 32, "Input", "ExpressionUUID" -> \
"4ac51464-808f-450a-8730-3d1b2559e766"],
Cell[815, 29, 8199, 113, 32, "Output", "ExpressionUUID" -> \
"47f8ade1-2881-4e17-a4f4-5c33ff5a31d8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[9051, 147, 12368, 360, 1023, "Input", "ExpressionUUID" -> \
"5b183156-5448-4109-918e-f244b7a47153"],
Cell[21422, 509, 6478, 89, 32, "Output", "ExpressionUUID" -> \
"a3e139be-c12e-49db-8c2f-ddbaea43f00d"],
Cell[27903, 600, 6476, 88, 32, "Output", "ExpressionUUID" -> \
"8cea844d-a8b3-4d5b-ad85-b9f14037795c"]
}, Open  ]],
Cell[34394, 691, 4147, 122, 301, "Input", "ExpressionUUID" -> \
"b4b61ac8-3b97-4361-b062-242873d43229"],
Cell[CellGroupData[{
Cell[38566, 817, 274, 6, 34, "Input", "ExpressionUUID" -> \
"852b2d9f-f0b3-464f-9028-c32293a8b859"],
Cell[38843, 825, 9322, 155, 410, "Output", "ExpressionUUID" -> \
"e2ce393d-4fc8-4dc6-862b-2e1b7789c1f4"]
}, Open  ]],
Cell[CellGroupData[{
Cell[48202, 985, 1070, 21, 34, "Input", "ExpressionUUID" -> \
"d55d42ad-051a-4f72-88d3-b6ea73485290"],
Cell[49275, 1008, 2657, 50, 328, "Output", "ExpressionUUID" -> \
"edb9043f-1ac5-4df9-954f-ed6349f53f93"]
}, Open  ]],
Cell[CellGroupData[{
Cell[51969, 1063, 1703, 29, 34, "Input", "ExpressionUUID" -> \
"7272443d-851d-467b-bb66-3114bae4dca7"],
Cell[53675, 1094, 2766, 50, 346, "Output", "ExpressionUUID" -> \
"b5384a67-c4b1-434c-adb0-f6df9ea88cce"]
}, Open  ]],
Cell[CellGroupData[{
Cell[56478, 1149, 1139, 21, 34, "Input", "ExpressionUUID" -> \
"95466cb5-3379-4439-a894-19337d767127"],
Cell[57620, 1172, 2398, 45, 340, "Output", "ExpressionUUID" -> \
"6223c2c3-075c-480a-89ce-fe76169de92b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[60055, 1222, 925, 18, 34, "Input", "ExpressionUUID" -> \
"9fc36678-e36e-4186-bbeb-6b161c064a4a"],
Cell[60983, 1242, 2317, 44, 338, "Output", "ExpressionUUID" -> \
"1185f7ae-90a0-4e9f-8ba8-7ba827d2c80b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[63337, 1291, 1436, 27, 34, "Input", "ExpressionUUID" -> \
"bbdd925b-a25d-42fa-a260-4f0830de797e"],
Cell[64776, 1320, 30447, 518, 442, "Output", "ExpressionUUID" -> \
"982880a4-87ef-4510-8ad5-c6df8a25c382"]
}, Open  ]],
Cell[CellGroupData[{
Cell[95260, 1843, 791, 20, 55, "Input", "ExpressionUUID" -> \
"dc457375-fa71-46e2-bda0-5d7c74ef3b0f"],
Cell[96054, 1865, 43020, 723, 563, "Output", "ExpressionUUID" -> \
"f741890a-d384-497c-b3e0-c04355c04b05"]
}, Open  ]],
Cell[CellGroupData[{
Cell[139111, 2593, 704, 17, 34, "Input", "ExpressionUUID" -> \
"a5715a95-4e8c-4045-87e8-fd5fa3ade187"],
Cell[139818, 2612, 29923, 513, 629, "Output", "ExpressionUUID" -> \
"3be92677-1b25-4cfc-ac1c-91d27528b810"]
}, Open  ]],
Cell[169756, 3128, 236, 6, 34, "Input", "ExpressionUUID" -> \
"a1a574c6-e09d-482b-b7aa-c2b59d957b5e"],
Cell[169995, 3136, 236, 5, 32, "Input", "ExpressionUUID" -> \
"ed9c9306-bdc8-4a15-98b3-7a83ce12ffc8"],
Cell[170234, 3143, 237, 5, 32, "Input", "ExpressionUUID" -> \
"f7c993a1-14fa-4346-b084-ca2f3c41abe6"]
}
]
*)