TradingCodeOptimizedChannelExtremization.nb

(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 7.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    133734,       2644]
NotebookOptionsPosition[    130898,       2544]
NotebookOutlinePosition[    131671,       2571]
CellTagsIndexPosition[    131628,       2568]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Set the constants and formulas", "Section",
 CellChangeTimes->{{3.575736332055751*^9, 3.5757363359429736`*^9}, {
  3.575737118926758*^9, 3.575737120406842*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Slpg", "=", "24"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"PV", "=", "50"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Day", "=", "45"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Month", "=", 
   RowBox[{"23", "Day"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.5757364174566355`*^9, 3.575736435280655*^9}, {
  3.575736644225606*^9, 3.5757366868340435`*^9}, {3.5758435151600156`*^9, 
  3.5758435154060297`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"PL", "[", 
    RowBox[{"POut_", ",", "PIn_"}], "]"}], ":=", 
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{"POut", "-", "PIn"}], ")"}], "PV"}], "-", "Slpg"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.575737123831038*^9, 3.5757371592270627`*^9}}]
}, Closed]],

Cell[CellGroupData[{

Cell["Import the data and select the interval of interest", "Section",
 CellChangeTimes->{{3.571078761777526*^9, 3.571078762944593*^9}, {
  3.5757338698549213`*^9, 3.5757338789904437`*^9}, {3.575767729413353*^9, 
  3.575767731550557*^9}, {3.575856848983534*^9, 3.57585685642796*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Data", "=", 
   RowBox[{"Import", "[", 
    RowBox[{"\"\<SY-5min.asc\>\"", ",", 
     RowBox[{"\"\<FieldSeparators\>\"", "\[Rule]", "\"\<,\>\""}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Length", "[", "Data", "]"}]}], "Input",
 CellChangeTimes->{{3.505475178887808*^9, 3.505475194233892*^9}, {
   3.5054989171185293`*^9, 3.505498918364887*^9}, {3.571078824796131*^9, 
   3.571078838484914*^9}, 3.575305602578372*^9, {3.575856877832184*^9, 
   3.575856877971192*^9}}],

Cell[BoxData["357433"], "Output",
 CellChangeTimes->{
  3.575857349050136*^9, 3.5758607563830166`*^9, 3.575904720827669*^9, 
   3.575916228980337*^9, 3.5760873818078384`*^9, 3.576111867203323*^9, 
   3.576112394344474*^9, 3.5761167039599695`*^9, 3.5761171401615915`*^9, 
   3.576118620157982*^9, {3.576119422671157*^9, 3.5761194454159966`*^9}, 
   3.5761206110218444`*^9, 3.576121696151615*^9, 3.576155437171282*^9, 
   3.5761662166981387`*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"nStart", "=", "100000"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nStop", "=", "100050"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Do", "[", 
  RowBox[{
   RowBox[{"If", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"Data", "[", 
       RowBox[{"[", 
        RowBox[{"i", ",", "2"}], "]"}], "]"}], "\[Equal]", "\"\<09:35\>\""}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"nStartDay", "=", "i"}], ";", 
       RowBox[{"Break", "[", "]"}], ";"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "nStart", ",", "nStop"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.5757339187737193`*^9, 3.5757339270571933`*^9}, {
  3.5757340427698116`*^9, 3.57573405672861*^9}, {3.5757343463701763`*^9, 
  3.575734353495584*^9}, {3.5757347294660883`*^9, 3.575734777257822*^9}, {
  3.5757349870018187`*^9, 3.5757349890159335`*^9}, {3.5757367449303665`*^9, 
  3.575736745945424*^9}, {3.5757368953139677`*^9, 3.5757368973780856`*^9}, {
  3.5757370159298663`*^9, 3.5757370534490128`*^9}, {3.5758569110230827`*^9, 
  3.57585691115309*^9}, {3.5761190351976767`*^9, 3.5761190373192797`*^9}, {
  3.5761191277370386`*^9, 3.5761191296558423`*^9}}],

Cell[CellGroupData[{

Cell[BoxData["nStartDay"], "Input"],

Cell[BoxData["100037"], "Output",
 CellChangeTimes->{3.57612140834571*^9, 3.5761216966352158`*^9, 
  3.576155437639282*^9, 3.5761662171871667`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Data", "[", 
  RowBox[{"[", "nStartDay", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.576118992296601*^9, 3.5761190114232345`*^9}, {
  3.576119446617199*^9, 3.576119451890008*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"01/08/91\"\>", ",", "\<\"09:35\"\>", ",", "440.5`", ",", 
   "442.`", ",", "440.`", ",", "441.75`", ",", "0"}], "}"}]], "Output",
 CellChangeTimes->{{3.57611899744461*^9, 3.576119039472084*^9}, 
   3.5761191319958467`*^9, 3.5761192880585203`*^9, {3.5761194467263994`*^9, 
   3.57611945291961*^9}, 3.5761206144694505`*^9, 3.5761216968536167`*^9, 
   3.5761554378576827`*^9, 3.5761662174081793`*^9}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["HH and LL precomputation", "Section",
 CellChangeTimes->{{3.576115718712617*^9, 3.576115724415943*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"ChLengthMax", "=", "10000"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ChLengthMin", "=", "500"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ChJump", "=", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"NKids", "=", 
  RowBox[{"Quotient", "[", 
   RowBox[{
    RowBox[{"ChLengthMax", "-", "ChLengthMin"}], ",", "ChJump"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"TradeStart", "=", "nStartDay"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"TradeStop", "=", 
  RowBox[{"TradeStart", "+", 
   RowBox[{"12", "Month"}], "+", "ChLengthMax", "-", 
   "1"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"DataOHLC", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", 
       RowBox[{"Data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "4"}], "]"}], "]"}], ",", 
       RowBox[{"Data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "5"}], "]"}], "]"}], ",", 
       RowBox[{"Data", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "6"}], "]"}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "TradeStart", ",", 
       RowBox[{"TradeStop", "+", "ChLengthMax"}], ",", "1"}], "}"}]}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Length", "[", "DataOHLC", "]"}]}], "Input",
 CellChangeTimes->{{3.575904725850878*^9, 3.5759047272080803`*^9}, {
   3.575904907404997*^9, 3.5759049278410325`*^9}, {3.575904963128295*^9, 
   3.5759049794927235`*^9}, {3.575905026979207*^9, 3.575905044755638*^9}, {
   3.5759056208382206`*^9, 3.5759056210566216`*^9}, {3.5759059592184153`*^9, 
   3.5759059595460157`*^9}, {3.576087408115343*^9, 3.576087434882874*^9}, {
   3.5760950551017256`*^9, 3.5760950551697297`*^9}, 3.576096198926149*^9, {
   3.5760962542743144`*^9, 3.5760962543493185`*^9}, {3.5760963065263033`*^9, 
   3.57609630664531*^9}, {3.576096458372988*^9, 3.576096458826014*^9}, 
   3.576096705342114*^9, {3.576112411607461*^9, 3.576112422713096*^9}, 
   3.5761134199741364`*^9, {3.5761152027691064`*^9, 3.5761152037801642`*^9}, {
   3.5761157116102104`*^9, 3.5761157337434764`*^9}, {3.5761157892506514`*^9, 
   3.57611578974568*^9}, {3.576115858841632*^9, 3.576115860586731*^9}, {
   3.5761159783634677`*^9, 3.576115991309208*^9}, {3.5761160860716286`*^9, 
   3.5761160993693886`*^9}, {3.57611615585962*^9, 3.5761161875464325`*^9}, {
   3.576116404227826*^9, 3.5761164654903297`*^9}, {3.5761166524350224`*^9, 
   3.5761166583583612`*^9}, {3.5761167040099726`*^9, 3.576116705929082*^9}, {
   3.576116740787076*^9, 3.5761167423081627`*^9}, {3.576117386425624*^9, 
   3.5761174262056932`*^9}, {3.5761176157460265`*^9, 
   3.5761176157928267`*^9}, {3.576118155883375*^9, 3.576118167942197*^9}, {
   3.576118786147768*^9, 3.576118792424713*^9}, {3.576119268714486*^9, 
   3.5761192991189404`*^9}, {3.576119589076649*^9, 3.5761195950826597`*^9}, {
   3.5761200065811825`*^9, 3.5761200162843995`*^9}, {3.576120076516105*^9, 
   3.5761200769529057`*^9}, {3.5761206002266254`*^9, 
   3.5761206002890253`*^9}, {3.576120701299203*^9, 3.5761207294728527`*^9}, 
   3.5761213170543494`*^9, {3.5761213541980143`*^9, 3.576121358285222*^9}, 
   3.576121540727542*^9, 3.576121576826006*^9, {3.5761554408684883`*^9, 
   3.5761554419136896`*^9}, {3.576166214542015*^9, 3.5761662148050303`*^9}}],

Cell[BoxData["95"], "Output",
 CellChangeTimes->{
  3.5758573575356216`*^9, 3.575860756986051*^9, {3.575904721997671*^9, 
   3.575904728128482*^9}, {3.575904908216198*^9, 3.575904928589834*^9}, {
   3.575904963892696*^9, 3.5759049802103243`*^9}, {3.5759050285860095`*^9, 
   3.57590504553564*^9}, {3.5759056019465876`*^9, 3.575905622991025*^9}, 
   3.5759059605288177`*^9, 3.5759102662473817`*^9, 3.5759162344403467`*^9, 
   3.5760874094724207`*^9, 3.576094938576061*^9, 3.5760949834316263`*^9, {
   3.576095056017778*^9, 3.57609505780388*^9}, {3.576095125022725*^9, 
   3.5760951343072557`*^9}, 3.576095241191369*^9, 3.5760961489432898`*^9, {
   3.576096201316285*^9, 3.576096273108392*^9}, 3.576096310022503*^9, {
   3.576096353920014*^9, 3.576096355854124*^9}, 3.576096460040084*^9, 
   3.5760965229026794`*^9, 3.576096560831848*^9, {3.576096697983693*^9, 
   3.576096707036211*^9}, 3.5760975895136857`*^9, 3.576098084385991*^9, 
   3.576098422640338*^9, 3.576098558014081*^9, 3.5760991352460966`*^9, 
   3.576109381394143*^9, 3.57611099228728*^9, 3.57611147272676*^9, 
   3.5761118684213924`*^9, 3.576111917079176*^9, 3.576112103115816*^9, {
   3.5761124138185873`*^9, 3.576112426067288*^9}, 3.576112729313633*^9, 
   3.576112860364128*^9, {3.5761128966072016`*^9, 3.576112911670063*^9}, 
   3.5761129678362756`*^9, 3.576113091087325*^9, 3.576113224026929*^9, 
   3.5761132844133825`*^9, {3.576113415388874*^9, 3.576113423081314*^9}, 
   3.5761143677963486`*^9, {3.5761150355395412`*^9, 3.576115048592288*^9}, 
   3.576115170466259*^9, {3.5761152079694037`*^9, 3.5761152118756275`*^9}, {
   3.576115277851401*^9, 3.5761153007157087`*^9}, 3.5761153645133576`*^9, 
   3.5761154294600725`*^9, 3.576115461129884*^9, 3.576115799773253*^9, 
   3.576115861239769*^9, {3.5761159834877605`*^9, 3.5761159928162947`*^9}, {
   3.576116091361931*^9, 3.57611610044145*^9}, {3.576116162340991*^9, 
   3.576116189527546*^9}, 3.5761162268526807`*^9, {3.5761164089030933`*^9, 
   3.5761164664293833`*^9}, 3.576116617071*^9, {3.5761166592134104`*^9, 
   3.5761167072711587`*^9}, 3.5761167427821903`*^9, 3.5761171454812*^9, {
   3.576117397189643*^9, 3.5761174266736946`*^9}, 3.5761176173060293`*^9, {
   3.5761181566477766`*^9, 3.576118171967004*^9}, 3.5761184187863626`*^9, 
   3.576118465820738*^9, 3.576118621127434*^9, 3.5761186781493845`*^9, 
   3.576118716660708*^9, {3.5761187929217415`*^9, 3.576118822684168*^9}, 
   3.576118863263178*^9, 3.5761190809369564`*^9, {3.576119273612895*^9, 
   3.5761193006477423`*^9}, 3.576119595971861*^9, 3.576120019076804*^9, 
   3.5761200775925074`*^9, 3.576120617995056*^9, {3.5761207051212096`*^9, 
   3.576120731500856*^9}, 3.576121455847793*^9, 3.5761215414139433`*^9, 
   3.576121577278406*^9, 3.576121704201229*^9, 3.576155443255292*^9, 
   3.5761662176321917`*^9}],

Cell[BoxData["122456"], "Output",
 CellChangeTimes->{
  3.5758573575356216`*^9, 3.575860756986051*^9, {3.575904721997671*^9, 
   3.575904728128482*^9}, {3.575904908216198*^9, 3.575904928589834*^9}, {
   3.575904963892696*^9, 3.5759049802103243`*^9}, {3.5759050285860095`*^9, 
   3.57590504553564*^9}, {3.5759056019465876`*^9, 3.575905622991025*^9}, 
   3.5759059605288177`*^9, 3.5759102662473817`*^9, 3.5759162344403467`*^9, 
   3.5760874094724207`*^9, 3.576094938576061*^9, 3.5760949834316263`*^9, {
   3.576095056017778*^9, 3.57609505780388*^9}, {3.576095125022725*^9, 
   3.5760951343072557`*^9}, 3.576095241191369*^9, 3.5760961489432898`*^9, {
   3.576096201316285*^9, 3.576096273108392*^9}, 3.576096310022503*^9, {
   3.576096353920014*^9, 3.576096355854124*^9}, 3.576096460040084*^9, 
   3.5760965229026794`*^9, 3.576096560831848*^9, {3.576096697983693*^9, 
   3.576096707036211*^9}, 3.5760975895136857`*^9, 3.576098084385991*^9, 
   3.576098422640338*^9, 3.576098558014081*^9, 3.5760991352460966`*^9, 
   3.576109381394143*^9, 3.57611099228728*^9, 3.57611147272676*^9, 
   3.5761118684213924`*^9, 3.576111917079176*^9, 3.576112103115816*^9, {
   3.5761124138185873`*^9, 3.576112426067288*^9}, 3.576112729313633*^9, 
   3.576112860364128*^9, {3.5761128966072016`*^9, 3.576112911670063*^9}, 
   3.5761129678362756`*^9, 3.576113091087325*^9, 3.576113224026929*^9, 
   3.5761132844133825`*^9, {3.576113415388874*^9, 3.576113423081314*^9}, 
   3.5761143677963486`*^9, {3.5761150355395412`*^9, 3.576115048592288*^9}, 
   3.576115170466259*^9, {3.5761152079694037`*^9, 3.5761152118756275`*^9}, {
   3.576115277851401*^9, 3.5761153007157087`*^9}, 3.5761153645133576`*^9, 
   3.5761154294600725`*^9, 3.576115461129884*^9, 3.576115799773253*^9, 
   3.576115861239769*^9, {3.5761159834877605`*^9, 3.5761159928162947`*^9}, {
   3.576116091361931*^9, 3.57611610044145*^9}, {3.576116162340991*^9, 
   3.576116189527546*^9}, 3.5761162268526807`*^9, {3.5761164089030933`*^9, 
   3.5761164664293833`*^9}, 3.576116617071*^9, {3.5761166592134104`*^9, 
   3.5761167072711587`*^9}, 3.5761167427821903`*^9, 3.5761171454812*^9, {
   3.576117397189643*^9, 3.5761174266736946`*^9}, 3.5761176173060293`*^9, {
   3.5761181566477766`*^9, 3.576118171967004*^9}, 3.5761184187863626`*^9, 
   3.576118465820738*^9, 3.576118621127434*^9, 3.5761186781493845`*^9, 
   3.576118716660708*^9, {3.5761187929217415`*^9, 3.576118822684168*^9}, 
   3.576118863263178*^9, 3.5761190809369564`*^9, {3.576119273612895*^9, 
   3.5761193006477423`*^9}, 3.576119595971861*^9, 3.576120019076804*^9, 
   3.5761200775925074`*^9, 3.576120617995056*^9, {3.5761207051212096`*^9, 
   3.576120731500856*^9}, 3.576121455847793*^9, 3.5761215414139433`*^9, 
   3.576121577278406*^9, 3.576121704201229*^9, 3.576155443255292*^9, 
   3.5761662176341925`*^9}],

Cell[BoxData["32420"], "Output",
 CellChangeTimes->{
  3.5758573575356216`*^9, 3.575860756986051*^9, {3.575904721997671*^9, 
   3.575904728128482*^9}, {3.575904908216198*^9, 3.575904928589834*^9}, {
   3.575904963892696*^9, 3.5759049802103243`*^9}, {3.5759050285860095`*^9, 
   3.57590504553564*^9}, {3.5759056019465876`*^9, 3.575905622991025*^9}, 
   3.5759059605288177`*^9, 3.5759102662473817`*^9, 3.5759162344403467`*^9, 
   3.5760874094724207`*^9, 3.576094938576061*^9, 3.5760949834316263`*^9, {
   3.576095056017778*^9, 3.57609505780388*^9}, {3.576095125022725*^9, 
   3.5760951343072557`*^9}, 3.576095241191369*^9, 3.5760961489432898`*^9, {
   3.576096201316285*^9, 3.576096273108392*^9}, 3.576096310022503*^9, {
   3.576096353920014*^9, 3.576096355854124*^9}, 3.576096460040084*^9, 
   3.5760965229026794`*^9, 3.576096560831848*^9, {3.576096697983693*^9, 
   3.576096707036211*^9}, 3.5760975895136857`*^9, 3.576098084385991*^9, 
   3.576098422640338*^9, 3.576098558014081*^9, 3.5760991352460966`*^9, 
   3.576109381394143*^9, 3.57611099228728*^9, 3.57611147272676*^9, 
   3.5761118684213924`*^9, 3.576111917079176*^9, 3.576112103115816*^9, {
   3.5761124138185873`*^9, 3.576112426067288*^9}, 3.576112729313633*^9, 
   3.576112860364128*^9, {3.5761128966072016`*^9, 3.576112911670063*^9}, 
   3.5761129678362756`*^9, 3.576113091087325*^9, 3.576113224026929*^9, 
   3.5761132844133825`*^9, {3.576113415388874*^9, 3.576113423081314*^9}, 
   3.5761143677963486`*^9, {3.5761150355395412`*^9, 3.576115048592288*^9}, 
   3.576115170466259*^9, {3.5761152079694037`*^9, 3.5761152118756275`*^9}, {
   3.576115277851401*^9, 3.5761153007157087`*^9}, 3.5761153645133576`*^9, 
   3.5761154294600725`*^9, 3.576115461129884*^9, 3.576115799773253*^9, 
   3.576115861239769*^9, {3.5761159834877605`*^9, 3.5761159928162947`*^9}, {
   3.576116091361931*^9, 3.57611610044145*^9}, {3.576116162340991*^9, 
   3.576116189527546*^9}, 3.5761162268526807`*^9, {3.5761164089030933`*^9, 
   3.5761164664293833`*^9}, 3.576116617071*^9, {3.5761166592134104`*^9, 
   3.5761167072711587`*^9}, 3.5761167427821903`*^9, 3.5761171454812*^9, {
   3.576117397189643*^9, 3.5761174266736946`*^9}, 3.5761176173060293`*^9, {
   3.5761181566477766`*^9, 3.576118171967004*^9}, 3.5761184187863626`*^9, 
   3.576118465820738*^9, 3.576118621127434*^9, 3.5761186781493845`*^9, 
   3.576118716660708*^9, {3.5761187929217415`*^9, 3.576118822684168*^9}, 
   3.576118863263178*^9, 3.5761190809369564`*^9, {3.576119273612895*^9, 
   3.5761193006477423`*^9}, 3.576119595971861*^9, 3.576120019076804*^9, 
   3.5761200775925074`*^9, 3.576120617995056*^9, {3.5761207051212096`*^9, 
   3.576120731500856*^9}, 3.576121455847793*^9, 3.5761215414139433`*^9, 
   3.576121577278406*^9, 3.576121704201229*^9, 3.576155443255292*^9, 
   3.5761662179062076`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"HighList", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"DataOHLC", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", 
       RowBox[{"Length", "[", "DataOHLC", "]"}]}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"LowList", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"DataOHLC", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", 
       RowBox[{"Length", "[", "DataOHLC", "]"}]}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"StartChannelHigh", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"DataOHLC", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "ChLengthMax"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"StartChannelLow", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"DataOHLC", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "ChLengthMax"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"OrderListHigh", "=", 
   RowBox[{"Ordering", "[", "StartChannelHigh", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"OrderListLow", "=", 
   RowBox[{"Ordering", "[", "StartChannelLow", "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Do", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"HHArrayKids", "[", 
       RowBox[{
        RowBox[{"ChLengthMax", "+", "1"}], ",", "j"}], "]"}], "=", 
      RowBox[{"Max", "[", "StartChannelHigh", "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"StartChannelHigh", "=", 
      RowBox[{"Drop", "[", 
       RowBox[{"StartChannelHigh", ",", "ChJump"}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"LLArrayKids", "[", 
       RowBox[{
        RowBox[{"ChLengthMax", "+", "1"}], ",", "j"}], "]"}], "=", 
      RowBox[{"Min", "[", "StartChannelLow", "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"StartChannelLow", "=", 
      RowBox[{"Drop", "[", 
       RowBox[{"StartChannelLow", ",", "ChJump"}], "]"}]}], ";"}], 
    "\[IndentingNewLine]", ",", 
    RowBox[{"{", 
     RowBox[{"j", ",", "0", ",", "NKids", ",", "1"}], "}"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"{", 
  RowBox[{
   RowBox[{"Dynamic", "[", "i", "]"}], ",", 
   RowBox[{"ProgressIndicator", "[", 
    RowBox[{
     RowBox[{"Dynamic", "[", "i", "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ChLengthMax", "+", "1"}], ",", 
       RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}]}], "}"}]}], "]"}]}],
   "}"}]}], "Input",
 CellChangeTimes->{{3.5760892918670874`*^9, 3.576089307368974*^9}, {
   3.57609263790447*^9, 3.5760926547044306`*^9}, 3.5760944234886*^9, 
   3.576097591963826*^9, 3.5760980873801622`*^9, {3.5761124474395103`*^9, 
   3.5761124480305443`*^9}, 3.5761134879340234`*^9, 3.5761152169089155`*^9, {
   3.5761157471562433`*^9, 3.5761157678934298`*^9}, {3.5761160521366873`*^9, 
   3.576116052374701*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   DynamicBox[ToBoxes[$CellContext`i, StandardForm],
    ImageSizeCache->{7., {0., 8.}}], ",", 
   ProgressIndicatorBox[Dynamic[$CellContext`i], {10001, 22420}]}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.5761161027185802`*^9, {3.5761161694603977`*^9, 3.576116192000687*^9}, 
   3.576116229848852*^9, {3.576116413622363*^9, 3.576116438535788*^9}, 
   3.5761164690175314`*^9, 3.5761166196021442`*^9, {3.5761166659137936`*^9, 
   3.576116708999258*^9}, 3.576116745262332*^9, 3.5761171484764056`*^9, 
   3.5761173994048467`*^9, 3.576117431587703*^9, 3.576117618741232*^9, 
   3.576118173137006*^9, 3.5761184209082766`*^9, 3.5761184672112136`*^9, 
   3.576118622233894*^9, 3.5761186796694717`*^9, 3.5761187178181705`*^9, {
   3.576118794799642*^9, 3.57611882435466*^9}, 3.576118864742056*^9, 
   3.5761190819821587`*^9, {3.576119280305307*^9, 3.5761193047037497`*^9}, 
   3.576119598156865*^9, 3.5761217078048353`*^9, 3.5761554570145164`*^9, 
   3.5761662209633827`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Do", "[", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"OrderListHigh", "=", 
     RowBox[{"DeleteCases", "[", 
      RowBox[{"OrderListHigh", ",", 
       RowBox[{"i", "-", "ChLengthMax"}]}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"OrderListLow", "=", 
     RowBox[{"DeleteCases", "[", 
      RowBox[{"OrderListLow", ",", 
       RowBox[{"i", "-", "ChLengthMax"}]}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"HighList", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "\[LessEqual]", 
         RowBox[{"HighList", "[", 
          RowBox[{"[", 
           RowBox[{"OrderListHigh", "[", 
            RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"OrderListHigh", "=", 
           RowBox[{"Insert", "[", 
            RowBox[{"OrderListHigh", ",", "i", ",", "j"}], "]"}]}], ";", 
          RowBox[{"Break", "[", "]"}], ";"}], "}"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"j", ",", "1", ",", 
        RowBox[{"ChLengthMax", "-", "1"}]}], "}"}]}], "]"}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"LowList", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "\[LessEqual]", 
         RowBox[{"LowList", "[", 
          RowBox[{"[", 
           RowBox[{"OrderListLow", "[", 
            RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"OrderListLow", "=", 
           RowBox[{"Insert", "[", 
            RowBox[{"OrderListLow", ",", "i", ",", "j"}], "]"}]}], ";", 
          RowBox[{"Break", "[", "]"}], ";"}], "}"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"j", ",", "1", ",", 
        RowBox[{"ChLengthMax", "-", "1"}]}], "}"}]}], "]"}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"If", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"Length", "[", "OrderListHigh", "]"}], "\[Equal]", 
       RowBox[{"ChLengthMax", "-", "1"}]}], ",", 
      RowBox[{
       RowBox[{"OrderListHigh", "=", 
        RowBox[{"Append", "[", 
         RowBox[{"OrderListHigh", ",", "i"}], "]"}]}], ";"}]}], "]"}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"If", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"Length", "[", "OrderListLow", "]"}], "\[Equal]", 
       RowBox[{"ChLengthMax", "-", "1"}]}], ",", 
      RowBox[{
       RowBox[{"OrderListLow", "=", 
        RowBox[{"Append", "[", 
         RowBox[{"OrderListLow", ",", "i"}], "]"}]}], ";"}]}], "]"}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"HHArrayKids", "[", 
      RowBox[{
       RowBox[{"i", "+", "1"}], ",", "0"}], "]"}], "=", 
     RowBox[{"HighList", "[", 
      RowBox[{"[", 
       RowBox[{"OrderListHigh", "[", 
        RowBox[{"[", "ChLengthMax", "]"}], "]"}], "]"}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"LLArrayKids", "[", 
      RowBox[{
       RowBox[{"i", "+", "1"}], ",", "0"}], "]"}], "=", 
     RowBox[{"LowList", "[", 
      RowBox[{"[", 
       RowBox[{"OrderListLow", "[", 
        RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"Do", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{
       RowBox[{"Do", "[", 
        RowBox[{
         RowBox[{"If", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"OrderListHigh", "[", 
             RowBox[{"[", "k", "]"}], "]"}], ">", 
            RowBox[{"i", "-", "ChLengthMax", "+", 
             RowBox[{"j", "*", "ChJump"}]}]}], ",", 
           RowBox[{"{", "\[IndentingNewLine]", 
            RowBox[{
             RowBox[{
              RowBox[{"HHArrayKids", "[", 
               RowBox[{
                RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "=", 
              RowBox[{"HighList", "[", 
               RowBox[{"[", 
                RowBox[{"OrderListHigh", "[", 
                 RowBox[{"[", "k", "]"}], "]"}], "]"}], "]"}]}], ";", 
             RowBox[{"Break", "[", "]"}], ";"}], "}"}]}], "]"}], ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "ChLengthMax", ",", "1", ",", 
           RowBox[{"-", "1"}]}], "}"}]}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"Do", "[", 
        RowBox[{
         RowBox[{"If", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"OrderListLow", "[", 
             RowBox[{"[", "k", "]"}], "]"}], ">", 
            RowBox[{"i", "-", "ChLengthMax", "+", 
             RowBox[{"j", "*", "ChJump"}]}]}], ",", 
           RowBox[{"{", "\[IndentingNewLine]", 
            RowBox[{
             RowBox[{
              RowBox[{"LLArrayKids", "[", 
               RowBox[{
                RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "=", 
              RowBox[{"LowList", "[", 
               RowBox[{"[", 
                RowBox[{"OrderListLow", "[", 
                 RowBox[{"[", "k", "]"}], "]"}], "]"}], "]"}]}], ";", 
             RowBox[{"Break", "[", "]"}], ";"}], "}"}]}], "]"}], ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "1", ",", "ChLengthMax", ",", "1"}], "}"}]}], 
        "]"}], ";"}], "\[IndentingNewLine]", ",", 
      RowBox[{"{", 
       RowBox[{"j", ",", "1", ",", "NKids"}], "}"}]}], "]"}]}], 
   "\[IndentingNewLine]", ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", 
     RowBox[{"ChLengthMax", "+", "1"}], ",", 
     RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], "}"}]}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.5760969429887066`*^9, 3.576096944898816*^9}, {
   3.5760970486177483`*^9, 3.576097105314991*^9}, {3.576097522140832*^9, 
   3.5760975443821044`*^9}, {3.576097777908461*^9, 3.5760978953341775`*^9}, {
   3.576097951928415*^9, 3.5760980294178467`*^9}, 3.5760981739531136`*^9, {
   3.576109821945341*^9, 3.576109822154353*^9}, {3.57611208569382*^9, 
   3.57611209128814*^9}, {3.576112590634701*^9, 3.5761126263117414`*^9}, {
   3.5761129605118566`*^9, 3.576112962786987*^9}, {3.5761132189126363`*^9, 
   3.576113220432723*^9}, {3.5761140125140276`*^9, 3.5761140503871937`*^9}, {
   3.5761140895864363`*^9, 3.576114090479487*^9}, {3.576114137896199*^9, 
   3.5761141927093344`*^9}, 3.576114253150791*^9, {3.576114285334632*^9, 
   3.5761142891868525`*^9}, {3.576115030995281*^9, 3.5761150315663137`*^9}, {
   3.5761153070870733`*^9, 3.576115309819229*^9}, {3.5761154347743764`*^9, 
   3.5761154357994347`*^9}, {3.576116009431245*^9, 3.576116026958247*^9}, {
   3.5761162141659546`*^9, 3.576116216776104*^9}, {3.5761165017774057`*^9, 
   3.5761165611167994`*^9}, {3.57611659347665*^9, 3.5761166095795712`*^9}, {
   3.5761166465896883`*^9, 3.576116648839817*^9}, {3.576116747799477*^9, 
   3.5761167495555773`*^9}, {3.5761173543363676`*^9, 3.576117374101602*^9}, {
   3.576118443342896*^9, 3.576118447113698*^9}, {3.5761184909479246`*^9, 
   3.5761184931310453`*^9}, {3.576118624680827*^9, 3.576118633118499*^9}, {
   3.5761186737051306`*^9, 3.5761186751952157`*^9}, {3.5761187197930765`*^9, 
   3.576118724840555*^9}, {3.5761188584343157`*^9, 3.576118859473772*^9}}],

Cell[CellGroupData[{

Cell["Export", "Subsection",
 CellChangeTimes->{{3.576119610590087*^9, 3.576119611214088*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Export", "[", 
  RowBox[{"\"\<HH95KidsYear1.dat\>\"", ",", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"HHArrayKids", "[", 
      RowBox[{"i", ",", "j"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", 
       RowBox[{"ChLengthMax", "+", "1"}], ",", 
       RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"j", ",", "0", ",", "NKids"}], "}"}]}], "]"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<LL95KidsYear1.dat\>\"", ",", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"LLArrayKids", "[", 
      RowBox[{"i", ",", "j"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", 
       RowBox[{"ChLengthMax", "+", "1"}], ",", 
       RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"j", ",", "0", ",", "NKids"}], "}"}]}], "]"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.576119622524108*^9, 3.5761197214438815`*^9}, {
  3.576119781847188*^9, 3.576119798024416*^9}, {3.5761217246060653`*^9, 
  3.5761217435288982`*^9}, {3.576164949221362*^9, 3.576164953364599*^9}, {
  3.576171189303442*^9, 3.576171198320258*^9}}],

Cell[BoxData["\<\"HH95KidsYear1.dat\"\>"], "Output",
 CellChangeTimes->{3.576119723487485*^9, 3.5761197993036184`*^9, 
  3.576165008675763*^9, 3.576171218725094*^9}],

Cell[BoxData["\<\"LL95KidsYear1.dat\"\>"], "Output",
 CellChangeTimes->{3.576119723487485*^9, 3.5761197993036184`*^9, 
  3.576165008675763*^9, 3.576171236337525*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Check", "Subsection",
 CellChangeTimes->{{3.5760949252472982`*^9, 3.576094925719325*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"MasterCheckList", "=", 
   RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Do", "[", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"HHCheckList", "=", 
     RowBox[{"{", "}"}]}], ";", 
    RowBox[{"LLCheckList", "=", 
     RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", 
    RowBox[{"Do", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{
       RowBox[{"HHCheckList", "=", 
        RowBox[{"Append", "[", 
         RowBox[{"HHCheckList", ",", 
          RowBox[{"Max", "[", 
           RowBox[{"Table", "[", 
            RowBox[{
             RowBox[{"DataOHLC", "[", 
              RowBox[{"[", 
               RowBox[{"k", ",", "2"}], "]"}], "]"}], ",", 
             RowBox[{"{", 
              RowBox[{"k", ",", 
               RowBox[{"i", "-", 
                RowBox[{"(", 
                 RowBox[{"ChLengthMax", "-", 
                  RowBox[{"ChJump", "*", "j"}]}], ")"}]}], ",", 
               RowBox[{"i", "-", "1"}], ",", "1"}], "}"}]}], "]"}], "]"}]}], 
         "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"LLCheckList", "=", 
        RowBox[{"Append", "[", 
         RowBox[{"LLCheckList", ",", 
          RowBox[{"Min", "[", 
           RowBox[{"Table", "[", 
            RowBox[{
             RowBox[{"DataOHLC", "[", 
              RowBox[{"[", 
               RowBox[{"k", ",", "3"}], "]"}], "]"}], ",", 
             RowBox[{"{", 
              RowBox[{"k", ",", 
               RowBox[{"i", "-", 
                RowBox[{"(", 
                 RowBox[{"ChLengthMax", "-", 
                  RowBox[{"ChJump", "*", "j"}]}], ")"}]}], ",", 
               RowBox[{"i", "-", "1"}], ",", "1"}], "}"}]}], "]"}], "]"}]}], 
         "]"}]}], ";"}], "\[IndentingNewLine]", ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", 
        RowBox[{"ChLengthMax", "+", "1"}], ",", 
        RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], 
       "}"}]}], "]"}], ";", "\[IndentingNewLine]", 
    RowBox[{"HHArrayToList", "=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"HHArrayKids", "[", 
        RowBox[{"i", ",", "j"}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", 
         RowBox[{"ChLengthMax", "+", "1"}], ",", 
         RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], 
        "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", 
    RowBox[{"LLArrayToList", "=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"LLArrayKids", "[", 
        RowBox[{"i", ",", "j"}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", 
         RowBox[{"ChLengthMax", "+", "1"}], ",", 
         RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], 
        "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", 
    RowBox[{"MasterCheckList", "=", 
     RowBox[{"Append", "[", 
      RowBox[{"MasterCheckList", ",", "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Max", "[", 
          RowBox[{"HHCheckList", "-", "HHArrayToList"}], "]"}], ",", 
         RowBox[{"Min", "[", 
          RowBox[{"HHCheckList", "-", "HHArrayToList"}], "]"}], ",", 
         RowBox[{"Max", "[", 
          RowBox[{"LLCheckList", "-", "LLArrayToList"}], "]"}], ",", 
         RowBox[{"Min", "[", 
          RowBox[{"LLCheckList", "-", "LLArrayToList"}], "]"}]}], "}"}]}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", ",", 
   RowBox[{"{", 
    RowBox[{"j", ",", "0", ",", "NKids"}], "}"}]}], 
  "]"}], "\[IndentingNewLine]", "MasterCheckList"}], "Input",
 CellChangeTimes->{{3.5760945123296804`*^9, 3.5760946292043657`*^9}, {
   3.57609510815276*^9, 3.5760951111799335`*^9}, {3.576098146472542*^9, 
   3.5760981480386314`*^9}, {3.5760981819515715`*^9, 3.57609821182428*^9}, {
   3.57609824312107*^9, 3.576098261739135*^9}, {3.576098300730365*^9, 
   3.5760984052573433`*^9}, {3.576098577458193*^9, 3.5760985775011954`*^9}, {
   3.5760986153993635`*^9, 3.576098615502369*^9}, {3.576098746857882*^9, 
   3.576098778262678*^9}, {3.5760988597533393`*^9, 3.5760988691728783`*^9}, {
   3.576110000652562*^9, 3.576110002373661*^9}, {3.5761109816026697`*^9, 
   3.5761109844188304`*^9}, {3.576112327356642*^9, 3.5761123395273385`*^9}, 
   3.5761134558741894`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.57609886990192*^9, 3.5760988771003313`*^9}, 
   3.576098926099134*^9, 3.5760991528761053`*^9, 3.5761100946159368`*^9, 
   3.5761110102593083`*^9, 3.576111894810902*^9, 3.576112112666363*^9, 
   3.576112340044368*^9, 3.5761150603499603`*^9, 3.5761151813738823`*^9, 
   3.576116061044197*^9, 3.5761165673921585`*^9, 3.5761166255764866`*^9, 
   3.5761174129300704`*^9, 3.576118799997323*^9, {3.576118844353545*^9, 
   3.5761188682854524`*^9}, 3.576119084727763*^9, 3.5761196028524733`*^9}]
}, Open  ]]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["The main code", "Section",
 CellChangeTimes->{{3.5757370967674904`*^9, 3.5757370982945776`*^9}, {
  3.575857077539607*^9, 3.575857078970689*^9}}],

Cell[CellGroupData[{

Cell["Main loop", "Subsection",
 CellChangeTimes->{{3.575857582851509*^9, 3.5758575842905912`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"MPTemp", "=", "0"}], ";", 
  RowBox[{"MP", "=", "0"}], ";", 
  RowBox[{"Equity", "=", "0"}], ";", 
  RowBox[{"TargetPrice", "=", "0"}], ";", 
  RowBox[{"HH", "=", "0"}], ";", 
  RowBox[{"LL", "=", "0"}], ";", 
  RowBox[{"EntryPrice", "=", "0"}], ";", 
  RowBox[{"PrevPeak", "=", "0"}], ";", 
  RowBox[{"PrevTrough", "=", "0"}], ";", 
  RowBox[{"DD", "=", "0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"EquityList", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"i", ",", "0"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "ChLength"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"MPList", "=", "EquityList"}], ";", 
  RowBox[{"HHList", "=", "EquityList"}], ";", 
  RowBox[{"LLList", "=", "EquityList"}], ";", 
  RowBox[{"EPList", "=", "EquityList"}], ";", 
  RowBox[{"TPList", "=", "EquityList"}], ";", 
  RowBox[{"DDList", "=", "EquityList"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"EquityMax", "=", "0"}], ";", 
  RowBox[{"MaxDD", "=", "0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Timing", "[", 
  RowBox[{
   RowBox[{"Do", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{"CurrentOpen", "=", 
       RowBox[{"DataOHLC", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"CurrentHigh", "=", 
       RowBox[{"DataOHLC", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"CurrentLow", "=", 
       RowBox[{"DataOHLC", "[", 
        RowBox[{"[", 
         RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"PreviousClose", "=", 
       RowBox[{"DataOHLC", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{"i", "-", "1"}], ",", "4"}], "]"}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"Equity", ">", "EquityMax"}], ",", 
        RowBox[{
         RowBox[{"EquityMax", "=", "Equity"}], ";"}]}], "]"}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"DD", "=", 
       RowBox[{"Equity", "-", "EquityMax"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"DD", "<", "MaxDD"}], ",", 
        RowBox[{
         RowBox[{"MaxDD", "=", "DD"}], ";"}]}], "]"}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"MP", "==", "0"}], ",", 
        RowBox[{"{", "\[IndentingNewLine]", 
         RowBox[{
          RowBox[{"HH", "=", 
           RowBox[{"Max", "[", 
            RowBox[{"Table", "[", 
             RowBox[{
              RowBox[{"DataOHLC", "[", 
               RowBox[{"[", 
                RowBox[{"j", ",", "2"}], "]"}], "]"}], ",", 
              RowBox[{"{", 
               RowBox[{"j", ",", 
                RowBox[{"i", "-", "ChLength"}], ",", 
                RowBox[{"i", "-", "1"}], ",", "1"}], "}"}]}], "]"}], "]"}]}], 
          ";", "\[IndentingNewLine]", 
          RowBox[{"LL", "=", 
           RowBox[{"Min", "[", 
            RowBox[{"Table", "[", 
             RowBox[{
              RowBox[{"DataOHLC", "[", 
               RowBox[{"[", 
                RowBox[{"j", ",", "3"}], "]"}], "]"}], ",", 
              RowBox[{"{", 
               RowBox[{"j", ",", 
                RowBox[{"i", "-", "ChLength"}], ",", 
                RowBox[{"i", "-", "1"}], ",", "1"}], "}"}]}], "]"}], "]"}]}], 
          ";", "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"CurrentHigh", ">", "HH"}], "&&", 
             RowBox[{"CurrentOpen", "<", "HH"}]}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"MPTemp", "=", 
               RowBox[{"+", "1"}]}], ";", 
              RowBox[{"EntryPrice", "=", "HH"}], ";"}], "}"}]}], "]"}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"CurrentHigh", ">", "HH"}], "&&", 
             RowBox[{"CurrentOpen", "\[GreaterEqual]", "HH"}]}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"MPTemp", "=", 
               RowBox[{"+", "1"}]}], ";", 
              RowBox[{"EntryPrice", "=", "CurrentOpen"}], ";"}], "}"}]}], 
           "]"}], ";", "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"CurrentLow", "<", "LL"}], "&&", 
             RowBox[{"CurrentOpen", ">", "LL"}]}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"MPTemp", "=", 
               RowBox[{"-", "1"}]}], ";", 
              RowBox[{"EntryPrice", "=", "LL"}], ";"}], "}"}]}], "]"}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"CurrentLow", "<", "LL"}], "&&", 
             RowBox[{"CurrentOpen", "\[LessEqual]", "LL"}]}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"MPTemp", "=", 
               RowBox[{"-", "1"}]}], ";", 
              RowBox[{"EntryPrice", "=", "CurrentOpen"}], ";"}], "}"}]}], 
           "]"}], ";"}], "\[IndentingNewLine]", "}"}]}], "]"}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"MP", "==", 
         RowBox[{"+", "1"}]}], ",", 
        RowBox[{"{", "\[IndentingNewLine]", 
         RowBox[{
          RowBox[{"PrevPeak", "=", "EntryPrice"}], ";", "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{"PreviousClose", ">", "PrevPeak"}], ",", 
            RowBox[{
             RowBox[{"PrevPeak", "=", "PreviousClose"}], ";"}]}], "]"}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"TargetPriceRaw", "=", 
           RowBox[{"PrevPeak", 
            RowBox[{"(", 
             RowBox[{"1", "-", "StpPct"}], ")"}]}]}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"TargetPrice", "=", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"Quotient", "[", 
               RowBox[{"TargetPriceRaw", ",", "0.25"}], "]"}], "+", 
              RowBox[{"Quotient", "[", 
               RowBox[{
                RowBox[{"Mod", "[", 
                 RowBox[{"TargetPriceRaw", ",", "0.25"}], "]"}], ",", 
                "0.125"}], "]"}]}], ")"}], "*", "0.25"}]}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"TargetPrice", ">", "CurrentLow"}], "&&", 
             RowBox[{"TargetPrice", "<", "CurrentHigh"}]}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Equity", "=", 
               RowBox[{"Equity", "+", 
                RowBox[{"PL", "[", 
                 RowBox[{"TargetPrice", ",", "EntryPrice"}], "]"}]}]}], ";", 
              RowBox[{"MPTemp", "=", "0"}], ";"}], "}"}]}], "]"}], ";"}], 
         "\[IndentingNewLine]", "}"}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{
        RowBox[{"MP", "\[Equal]", 
         RowBox[{"-", "1"}]}], ",", 
        RowBox[{"{", "\[IndentingNewLine]", 
         RowBox[{
          RowBox[{"PrevTrough", "=", "EntryPrice"}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{"PreviousClose", "<", "PrevTrough"}], ",", 
            RowBox[{
             RowBox[{"PrevTrough", "=", "PreviousClose"}], ";"}]}], "]"}], 
          ";", "\[IndentingNewLine]", 
          RowBox[{"TargetPriceRaw", "=", 
           RowBox[{"PrevTrough", 
            RowBox[{"(", 
             RowBox[{"1", "+", "StpPct"}], ")"}]}]}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"TargetPrice", "=", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"Quotient", "[", 
               RowBox[{"TargetPriceRaw", ",", "0.25"}], "]"}], "+", 
              RowBox[{"Quotient", "[", 
               RowBox[{
                RowBox[{"Mod", "[", 
                 RowBox[{"TargetPriceRaw", ",", "0.25"}], "]"}], ",", 
                "0.125"}], "]"}]}], ")"}], "*", "0.25"}]}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{"If", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"TargetPrice", ">", "CurrentLow"}], "&&", 
             RowBox[{"TargetPrice", "<", "CurrentHigh"}]}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Equity", "=", 
               RowBox[{"Equity", "+", 
                RowBox[{"PL", "[", 
                 RowBox[{"EntryPrice", ",", "TargetPrice"}], "]"}]}]}], ";", 
              RowBox[{"MPTemp", "=", "0"}], ";"}], "}"}]}], "]"}], ";"}], 
         "\[IndentingNewLine]", "}"}]}], "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"MP", "=", "MPTemp"}], ";"}], "\[IndentingNewLine]", ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", 
       RowBox[{"ChLength", "+", "1"}], ",", 
       RowBox[{"TradeStop", "-", "TradeStart", "+", "1"}], ",", "1"}], 
      "}"}]}], "]"}], ";"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Equity", "/", 
  RowBox[{"Abs", "[", "MaxDD", "]"}]}]}], "Input",
 CellChangeTimes->CompressedData["
1:eJwdzl1I02EYBXCzIi0sUzJSK41JA6cr5zI1WqtFNczNRfOrdEpT2wYmbaNZ
2RqUotLXRKyWTdqm09rMi5qVMnNoKS0NZBEzUlPEEixl6cWq/3kvHn5wOAee
2OJykTQwICAghTroEBxeZJjmuA8UQuKWZrcmgdL4vqoSijcUVMGgEJUWnkpw
18FEy0dimTuxCZr3OlqgzO61wGTaN+IfI6sDpoyGPIWMVlsn/Dq/sQuaune/
gFpnDjHs4i1VEqVBn6WB9fM5uQco02elRLGnrRAq2Ypi2NHwqBTq2k8ooOnk
2AW4ixZWDyNa5HrI79t3H/Jm33WTHmNgEPo4/Amob7jzC5r3zAlzKIusvXmw
SdKhhFNZsVegUm3VwujP8TrIfPujFo485tTBZaPUAKcXvhArpvqZeZSS9QNc
2Mi6fAyuankigm1rF/fnU76xu1IhjeYRQOWERghrxCJWIfL2XuLpZoYZiqvl
Vlgvy7TBUJPfDtNEYTYJpdqbTbw3vOKHMxld/2Da1qXVRZQ23sM1sC+qIByK
Q+mRMK1nIQZ6/UOx0MByxsHlkXN0ONklTYLxUX9ZpFfLVkJFRrAKxqWef1lC
GeO66YALAtl3KHf1TsPk15G5pdj91J2FvOtlO8ooS9zCnVDI+R0HgyxGHlzq
PMqHM1ezz0C1zC+BnwSSCnhp+4oKjh1ha6FJTuNcQz4UfhxuS1BlwkMqP7Fp
IrgQTvK5xIM3mOVQR+dXQIPwgwZK75ZWwojN8behsyRdD3uGA1uhxzdKHI/y
v4Lroqv7Yf4mwSCseW4agj578Dj541ko8T9ehsdd
  "]],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"323.85800000000006`", ",", "Null"}], "}"}]], "Output",
 CellChangeTimes->{{3.575904770685356*^9, 3.5759048089532237`*^9}, {
   3.5759048434136844`*^9, 3.57590484656489*^9}, {3.5759048884977636`*^9, 
   3.575904911149003*^9}, {3.575904949805871*^9, 3.57590498882154*^9}, {
   3.575905019023193*^9, 3.5759050481096444`*^9}, 3.5759055870485616`*^9, 
   3.57590567727912*^9, {3.575905833840995*^9, 3.575905867739855*^9}, 
   3.575905962541221*^9, 3.575906028623937*^9, 3.5759065599850707`*^9, {
   3.5759065945547314`*^9, 3.5759065962707343`*^9}, 3.5759107824212885`*^9, 
   3.5759165839901605`*^9}],

Cell[BoxData["3.648295635552724`"], "Output",
 CellChangeTimes->{{3.575904770685356*^9, 3.5759048089532237`*^9}, {
   3.5759048434136844`*^9, 3.57590484656489*^9}, {3.5759048884977636`*^9, 
   3.575904911149003*^9}, {3.575904949805871*^9, 3.57590498882154*^9}, {
   3.575905019023193*^9, 3.5759050481096444`*^9}, 3.5759055870485616`*^9, 
   3.57590567727912*^9, {3.575905833840995*^9, 3.575905867739855*^9}, 
   3.575905962541221*^9, 3.575906028623937*^9, 3.5759065599850707`*^9, {
   3.5759065945547314`*^9, 3.5759065962707343`*^9}, 3.5759107824212885`*^9, 
   3.5759165839901605`*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Plot the equity and drawdown curves", "Subsection",
 CellChangeTimes->{{3.5758585923952513`*^9, 3.575858600343706*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"GraphicsGrid", "[", 
  RowBox[{"{", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"ListPlot", "[", 
      RowBox[{"EquityList", ",", 
       RowBox[{"Joined", "\[Rule]", "True"}], ",", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}], ",", 
       RowBox[{"ImageSize", "\[Rule]", "500"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
       RowBox[{"Frame", "\[Rule]", "True"}], ",", 
       RowBox[{"AspectRatio", "\[Rule]", "0.7"}], ",", 
       RowBox[{"FrameLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Style", "[", 
           RowBox[{"\"\<5-min Steps\>\"", ",", 
            RowBox[{"FontSize", "\[Rule]", "12"}], ",", "Italic", ",", 
            "Bold"}], "]"}], ",", 
          RowBox[{"Style", "[", 
           RowBox[{"\"\<Equity ($)\>\"", ",", 
            RowBox[{"FontSize", "\[Rule]", "12"}], ",", "Italic", ",", 
            "Bold"}], "]"}]}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Directive", "[", 
           RowBox[{"Black", ",", "10"}], "]"}], ",", 
          RowBox[{"FontFamily", "->", "\"\<Calibri\>\""}]}], "}"}]}], ",", 
       RowBox[{"RotateLabel", "\[Rule]", "True"}], ",", 
       RowBox[{"PlotLabel", "->", 
        RowBox[{"Style", "[", 
         RowBox[{"\"\<Equity Curve\>\"", ",", 
          RowBox[{"FontSize", "\[Rule]", "15"}], ",", "Italic", ",", "Bold"}],
          "]"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
     RowBox[{"ListPlot", "[", 
      RowBox[{"DDList", ",", 
       RowBox[{"Joined", "\[Rule]", "True"}], ",", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}], ",", 
       RowBox[{"ImageSize", "\[Rule]", "500"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
       RowBox[{"Frame", "\[Rule]", "True"}], ",", 
       RowBox[{"AspectRatio", "\[Rule]", "0.7"}], ",", 
       RowBox[{"FrameLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Style", "[", 
           RowBox[{"\"\<5-min Steps\>\"", ",", 
            RowBox[{"FontSize", "\[Rule]", "12"}], ",", "Italic", ",", 
            "Bold"}], "]"}], ",", 
          RowBox[{"Style", "[", 
           RowBox[{"\"\<DrawDown ($)\>\"", ",", 
            RowBox[{"FontSize", "\[Rule]", "12"}], ",", "Italic", ",", 
            "Bold"}], "]"}]}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Directive", "[", 
           RowBox[{"Black", ",", "10"}], "]"}], ",", 
          RowBox[{"FontFamily", "->", "\"\<Calibri\>\""}]}], "}"}]}], ",", 
       RowBox[{"RotateLabel", "\[Rule]", "True"}], ",", 
       RowBox[{"PlotLabel", "->", 
        RowBox[{"Style", "[", 
         RowBox[{"\"\<DrawDown Curve\>\"", ",", 
          RowBox[{"FontSize", "\[Rule]", "15"}], ",", "Italic", ",", "Bold"}],
          "]"}]}]}], "]"}]}], "\[IndentingNewLine]", "}"}], "}"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.5758582166727614`*^9, 3.575858288709882*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[
      {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxc3X941eP/OPAjySSZJJNkkkySSTJJJskkmSSTZJJMkkkySY5MJslkMkkm
ySSZJJPkSDJJJskkmSSTZJLsneR7fa/d+1zXeeyf5/XY637ev16v+9yvV52d
c8Kw2wfc1CgSieSnRiL/P9b/1J4fif9Jj2cCTsQtcRJug5NxO9wed8ApuCPu
hDvjVHwG7oLPxF3xWbgbPhun4XNwd3wu7oHPS4/P64nPx+nxjuLIBSGeFKs/
jiO9OI4jF3IcR3pzHEcuqnfssnAcR/pwHEcurnf1wHAcRzI4HlxyS+jHJfGO
4khfjuPIpRzHkX4cx5HLOI4j/TkeHGs4fnm8oziSGe90HMWxBo8I+VfEOx1H
cSy4uiF/QLzTcRTHcORK8nEUx3BkIPk4imM4chX5OIpjODKIfBzFseDkkSH/
6nin42hwmwdCPo5kxTsdR3EMR64hH0dxDEcGk4+jOIYj15KPoziGI0PIx1Ec
w5Hr6mPK/SEfR3EMR4aSj6M4hiPXk4+jOIYj2fFOxunBw6P1MRtHcUnwqOAY
rsaRG+KdjNODix4M7eMoLsExXI0jw+KdjNNxNo7iEhzD1ThyI+3jdJyNo7gE
x3A1jgyvj80mhfZxOs7GUVyCY7gaR26ifZwe3C+st2wcxSU4hquDCxqu/xHx
Tg5OmBjax9k4iktwDFfjyM3xTsbpOBtHg1PHh/ZxDFcHZ40L7efEOzk4Oia0
j7ODM28Lv8clOIarceSWeCfjdJyNo7gEN9y3VN8aIo6MjHcyTsfZOIpLcAxX
B+c27N+3xjsZp+NsHMUlOIarcWQU7eN0nI2jwc0eDu3jGK7GkdvinYzTcTaO
4hIcC85/KLSPI6PjnRyc+EhoH2fjKC4J3tHQPq7GkdvjnYzTcTaOBlc+FtrH
MVyNI7nxTsTJODV466OhfzgTZ+NcHMWFuASXBRcEx3Alrsa1OHJHvBODO8+o
j8k4FafjTJyNc3EUF+ISXIZjuBJX41ocGRPvRJyMU3E6zsTZOBdHcSEuCa5o
GD+O4UpcHbzuqfpYiyN3xjsxeFNRfUzGqTgdZwb3Dc7GuTgaPPDJ+liIS3AZ
juHK4CWh/mpciyNj452Ik3EqTseZOBvn4iguxCW4LDjWMH5ciatxLY7cFe9E
nIxTcTrOxNk4F0dxIS7BZTiGK4M7N4wf1+LIuHgn4mScitNxZnBFw/hxLo7i
QlyCy3AMV+JqXIsjd8c7ESfjVJyOM3E2zsVRXIhLcBmO4UpcjWtxJC/eiTgZ
p+J0nImzcS6O4kJcgstwDFfialyLI/fEOzF43fT6mIxTcTrOxNnBm56oj7k4
iguDtxXWxxJchmPB1Y/Xx0pcjWtxZHy8E3EyTsXpOBNn41wcxYXBfRrOPy7D
MVyJq3Etjtwb70ScjFNxOs7E2TgXR3EhLsFlOBacGa63SlyNa3FkQrwTcTJO
DR4crtd0nImzg/Mbxo+juBCX4DIcw5W4GtfiyH3xTgwe13D/i1NxOs7E2cHR
cH+Zi6O4MLj7M/WxBJfhGK7E1bgWRybGOxEn41ScHtzl2fqYibNxLo7iQlyC
y3AMV+JqXIsj98c7EScHH/lifUzF6TgTZ+NcHMWFuASXBd8THMOVwfvn1Mdq
XIsj0Xgn4ESchJODZwWn4FSchtNxBs7EWTgb5+BcnBdcGRzFBbgQF+MSXBrc
reF84XIcCz5mbn2swJW4ClfjGlyL64Jnh/YjD8Q7ASfiJJyMU3AqTsPpOANn
4iycjXNwLs7DUVyAC3FxcI+G9YlLcRkuxzFcgStxFa7GNbg2eOOc+liHI5Pi
nYATcRJOxik4FafhdJyBM3EWzg5u9FJ9zMG5OA9HcQEuxMW4BJfiMlyOY7gi
uKRh/eMqXI1rcC2uw5EH452AE3ESTsYpwT2DU3EaTscZOBNn4Wycg3ODxwTn
4Wjw2OACXIiLcQkuxWW4HMeCh5bWxwpciauCl79SH6txTfCQ4FpchyP58U7A
iTgJJwfvDf1Lwak4DafjDJyJs3A2zsG5OA9HcQEuxMW4BJfiMlyOY7gCV+Iq
XI1rcC2uw5GH4p2AE3ESTsYpOBWn4XScgTNxFs7GOTgX5+EoLsCFuBiX4FJc
hstxDFfgSlyFq3ENrsV1ODI53gk4ESfhZJyCU3EaTscZOBNn4Wycg3NxHo7i
AlyIi3EJLsVluBzHcAWuxFW4GtfgWlyHIw/HOwEn4iScjFNwKk7D6TgDZ+Is
nI1zcC7Ow1FcgAtxMS7BpbgMl+MYrsCVuApX4xpci+twpCDeCTgRJ+FknIJT
cRpOxxk4E2fhbJyDc3EejuICXIiLcQkuxWW4HMdwBa7EVbga1+BaXIcjj8Q7
ASfiJJyMU3AqTsPpOANn4iycjXNwLs7DUVyAC3ExLsGluAyX4xiuwJW4Clfj
GlyL63BkSrwTcCJOwsk4BafiNJyOM3AmzsLZOAfn4jwcxQW4EBfjElyKy3A5
juEKXImrcDWuwbW4DkcejXcCTsRJOBmn4FSchtNxBs7EWTgb5+BcnIejuAAX
4mJcgktxGS7HMVyBK3EVrsY1uBbX4cjUeCfgRJyEk3EKTsVpOB1n4EychbNx
Ds7FeTiKC3AhLsYluBSX4XIcwxW4ElfhalyDa3EdjjwW7wSciJNwMk7BqTgN
p+MMnImzcDbOwbk4D0dxAS7ExbgEl+IyXI5juAJX4ipcjWtwLa7DkWnxTsCJ
OAkn4xScitNwOs7AmTgLZ+McnIvzcBQX4EJcjEtwKS7D5TiGK3AlrsLVuAbX
4joceTzeCTgRJ+FknIJTcRpOxxk4E2fhbJyDc3EejuICXIiLcQkuxWW4HMdw
Ba7EVbga1+BaXIcjhfFujBNwM5yIW+Ik3AYn4/Y4BXfCqbgrTsM9cDrujTNw
P5yJB+IsPARn4+E4B4/CuXgszsMTcBTn4wI8FRfiIlyMZ+ESPBeX4gW4DC/G
5XgZjuGVuAKvwZV4Pa7Cm3A13opr8A5ci3fjOrwPR56Id2OcgJsFFzesf9wS
J+E2OBm3xym4E07FXXEa7oHTcW+cgfvhTDwQZ+EhOBsPxzl4FM7FY4P3N6x/
PAFHcX5wp/n1sQBPxYW4CBfjWbgEzw3eE1yKF+AyvBiX42U4hlfiiuBVwWtw
JV6Pq/AmXI234hq8A9cGzwjejevwPhyZHu/GOAE3w4m4JU4KXh3cBifj9sE5
wSm4E07FXXEa7oHTg9OCe+OM4O7B/XDD+6KrwvshBuKs4HHBQ3A2Ho5z8Kjg
vOBcPBbnBbcKnoCjOB8X4Km4EBfhYjwLl+C5uBQvwGV4MS7Hy3AseHHD/o8r
8BpcGVwW6luPq/AmXI234hq8A9fi3bgO78ORJ+PdGCfgZjgRt8RJuE1wq4b1
j9sHLw7lU3AnnBqcH9wVp+EeOB33xhm4H84Mbtew/nEWHoKz8XCcg0fhXDwW
5+EJOIrzcQGe2vB3Lg37Py7CxXgWLsFzcSlegMvwYlyOl+EYXokr8Bpcidfj
quCdDesfV+OtuCZ4asP6x7V4N67D+4I7Nqz/ong3xgm4GU7ELXESboOTgysa
7v9xCu6EU3FXnIZ74HTcG2cE/9/9P87EA4O7Ndz/4yE4Gw8PXv9yfczBo3Au
Hovz8ITgUQ33/zgfF+CpwaMbnv9xES7Gs4J/btj/8VxcihcEz27Y//FiXI6X
4RheiSvwGlwZ/HDD/o+rcMPnBKxvWP94K67BO4Lfa1j/eDeuw/tw5Kl4N8YJ
uFlwr4b1j1viJNwGJ+P2OAV3wqm4K07DPXA67o0zcD+ciQfiLDwEZ+PhOAeP
wrl4LM7DE3AU5+MCPBUX4iJcjGfhEjwXl+IFuAwvxuV4GY7hlbgCr8GVeD2u
wptwNd6Ka/AOXIt34zq8D0dmxLsxTsDNcCJuiZNwG5yM2+MU3Amn4q44DffA
6bg3zsD9cCYeiLPwEJyNh+McPArn4rE4D0/AUZyPC/BUXIiLcDGehUvwXFyK
F+AyvBiX42U4hlfiCrwGV+L1uApvwtV4K67BO3At3o3r8D4ceTrejXECboYT
cUuchNvgZNwep+BOOBV3xWm4B07HvXEG7ocz8UCchYfgbDwc5+BROBePxXl4
Ao7ifFyAp+JCXISL8SxcgufiUrwAl+HFuBwvwzG8ElfgNbgSr8dVeBOuxltx
Dd6Ba/FuXIf34UhxvBvjhOCPG/7/DyfilsGbGtY/boOTcXucgjvhVNwVp+Ee
OB33xhm4X/ANDesfD8RZeAjOxsNxDh6Fc/FYnIcn4CjOxwV4Ki4MnvNqfSzC
xXgWLsFzcSlegMvwYlyOl+EYXokrgh8NXoMr8XpchTfharwV1+AduBbvxnV4
H448E+/GOAE3w4m4JU7CbXAybo9TcCecirviNNwDp+PeOAP3w5l4IM7CQ3A2
Ho5z8Cici8fiPDwBR3E+LsBTcSEuwsV4Fi7Bc3EpXoDL8GJcjpfhGF6JK/Aa
XInX4yq8CVfjrbgG78C1eDeuw/twZGa8G+ME3Awn4pY4CbfBybg9TsGdcCru
itNwD5yOe+MM3A9n4oE4Cw/B2Xg4zsGjcC4ei/PwBBzF+bgAT8WFuAgX41m4
BM/FpXgBLsOLcTlehmN4Ja7Aa3AlXo+r8CZcjbfiGrwD1+LduA7vw5Fn490Y
J+BmOBG3xEm4DU7G7XEK7oRTcVechnvgdNwbZ+B+OBMPxFl4CM7Gw3EOHoVz
8VichyfgKM7HBXgqLsRFuBjPwiV4Li7FC3AZXozL8TIcwytxBV6DK/F6XIU3
4Wq8FdfgHbgW78Z1eB+OzIp3Y5yAm+FE3BIn4TY4GbfHKbgTTsVdcRrugdNx
b5yB++FMPBBn4SE4Gw/HOXgUzsVjcR6egKM4HxfgqbgQF+FiPAuX4Lm4FC/A
ZXgxLsfLcAyvxBV4Da7E63EV3oSr8VZcg3fgWrwb1+F9OPJcvBvjBNwMJ+KW
OAm3wcm4PU7BnXAq7orTcA+cjnvjDNwPZ+KBOAsPwdl4OM7Bo3AuHovz8AQc
xfm4AE/FhbgIF+NZuATPxaV4AS7Di3E5XoZjeCWuwGtwJV6Pq/AmXI234hq8
A9fi3bgO78OR2fFujBNwM5yIW+Ik3AYn4/Y4BXfCqbgrTsM9cDrujTNwP5yJ
B+IsPARn4+E4B4/CuXgszsMTcBTn4wI8FRfiIlyMZ+ESPBeX4gW4DC/G5XgZ
juGVuAKvwZV4Pa7Cm3A13opr8A5ci3fjOrwPR56Pd2OcgJvhRNwSJ+E2OBm3
xym4E07FXXEa7oHTcW+cgfvhTDwQZ+EhOBsPxzl4FM7FY3EenoCjOB8X4Km4
EBfhYjwLl+C5uBQvwGV4MS7Hy3AMr8QVeE1wYsP6x+txFd6Eq/FWXIN34Fq8
G9fhfThSEu9GuHHwxuAmOAE3Db7ytfrYDDfHibgFbolb4STcGrfBbYOLXq+P
ybgdbo874BTcEXfCnXEq7oK74m44DXfHPXDP4GOC03Gv4PuDe+M+OCN4ZnBf
3A/3x5l4AB6IB+EsPBgPwUNxNh6Gh+MROAePxKPwaJyLx+CxeBzOw+PxBDwR
R/EknI8n4wI8BU/F03Ahno6L8AxcjGfiWXg2LsFz8Fw8D5fi+XgBXojL8CK8
GC/B5XgpXoaX4xhegVfiVbgCr8Zr8Fpcidfh9XgDrsIb8Sa8GVfjLXgr3oZr
8Ha8A+/EtXgX3o334Dq8F+/D+3HkhXg3wo1xE5yAm+JmuDlOxC1wS9wKJ+HW
uA1ui5NxO9wed8ApuCPuhDvjVNwFd8XdcBrujnvgnjg9+PiG/R/3xn2CKxv2
f9wX98P9cSYegAfiQTgLD8ZD8FCcjYfh4XgEzgn+tWH/x6PwaJyLx+CxeBzO
w+PxBDwRR/EknI8n4wI8BU8NPqusPk7DhXg6LsIz6h296o16F+OZeBaejUvw
HDwXz8OleD5egBfiMrwIL8ZLcDleGuZrYfAyvBzH8Aq8Eq/CFXg1XoPX4kq8
Dq/HG3AV3og3hfnJDd6Mq/EWvDXUd2bwNlwTyl8TvB3vwDtxLd6Fd+M9uA7v
xfvwfhyZE+9GuDFughNwU9wMN8eJuAVuiVvhJNwat8FtcTJuh9vjDjgFd5wT
2g3uhDuH8pvD61kq7hLKvxDcFXfDabg77oF74nTcC/fGfXAG7ov7hfE9Hsbf
H2fiAXggHoSz8GA8BA/F2XhY6P+A4OF4RCh/WnAOHolH4dE4F4/BY/E4nIfH
4wl4YhhPbTg/UTwJ5+PJuCDUf3qofwqeiqfhQjwdF+EZwUc37P94Jp6FZ+MS
PCeMb2MY31w8D5fi+XgBXojL8CK8GC/B5XgpXoaX4xheUe/o2uCVeBWuwKvx
GrwWV+J1eD3egKvwRrwJb8bV9Y7MD96Ct+JtIX92cA3ejnfgnbg21H9D8C68
G+/BdXgv3ofD9/ZG3wmOvBjvRrgxboITcFPcDDfHibgFbolbhe81/Tg4CbfG
bXBbnIzb4fa4Q+jP8Q37P+6IO+HOOBV3wV1xN5yGu+MeuCdOx71wb9wHZ+C+
uB/uH+ZzS5jPTDwAD8SDcBYejIfgoTgbD8PD8Qicg0fiUXg0zsVj8Fg8Dufh
8XgCnoijeBLOx5NxAZ6Cp+JpuBBPx0V4Bi7GM/EsPBuX4Dl4Lp6HS/F8vAAv
xGV4EV6Ml+ByvBQvw8txDK/AK8P6nduw/+OKUP7mhv0fr8FrcWWo75SG/R+v
xxtwFd4Y6p/Q8PyPN+Pq4FcWhXHjrXgbrsHb8Q68E9fiXWE8+cG78R5ch/fi
fXh/8JXBkbnxboQbh+8pbhXcBCfgpsHDgpvh5jgRt8AtcSuchFvjNrgtTsbt
cPswHy8Ed8ApofwPwR1xJ9wZp+IuuCvuhtNwd9wD98TpuBfujfvgDNwX9wvz
tSy4P87EA/DAUN9Rb9bHQTgLD8ZD8FCcjYfh4aE/A4NH4Bw8Eo/Co3Eubvhe
8qODx+JxOA+PxxPwRBzFk3A+nowL8BQ8NYzv9uBpuBBPx0V4Bi7GM/EsPDv0
r0twCZ6D5+J5ob7zg0vxfLwAL8RleBFejJeE/hwbXI6X4mV4eXD/4BhegVfi
VbgCr8Zr8Fpcidfh9XgDrsIb8Sa8OcxnYnA13oK34m24Bm/HO/BOXIt34d14
D67De/E+vD/Mx6TgyEvxboQb4yb1jl4XnICbhvK3BjfDzXEiboFb4lY4CbcO
/bk+uA1ui5NDfrvgdrg97oBTcEfcCXfGqbgL7hr6u7Vh/8dpuDvugXvidNwL
98Z9cAbuG/r/csP+j/vjTDwAD8SDcFZo/7/gwXhIKL87eCjOxsPwcDwC5+CR
eBQejXPxGDwWj8N5eDyegCfiKJ6E88N8LgmejAvwlJC/MngqnoYLQ36bhv0f
F+EZuBjPxLPwbFyC5+C5eB4uxfPD+Do27P94IS7Di/BivASX46V4GV6OY3hF
GE9mw/6PV+EKvBqvCfUf2bD/40q8Dq/HG3AV3og34c24Gm/BW/E2XIO3h/F/
1fD8j3fiWrwL78Z7cF1o/42G53+8D+/HkXnxboQb4yY4ATfFzXBznIhb4Jb1
jr7U8PyPk3Br3CbUl9Pw/I+TQ/mG/aQdbo874BTcEXfCnUP7Ixue/3EX3BV3
C/U1PA+k4e6hfKPgHrgnTse9cG/cB2fgvrgf7o8z8QA8EA/CWXgwHoKH4mw8
DA/HI3AOHolH4dE4F4/BY/E4nIfH4wl4Io7iSTgfT8YFeAqeiqfhQjwdF+EZ
uBjPxLPwbFyC5+C5eB4uxfPxArwQl+FFeDFegsvxUrwML8cxvAKvxKtwBV6N
1+C1uBKvw+vxBlyFN+JNeDOuxlvwVrwN1+DteAfeiWvxLrwb78F1eC/eh/fj
yMvxboQb4yY4ATfFzXBznIhb4Ja4FU7CrXEb3BYn43a4Pe6AU3BH3Al3xqm4
C+6Ku+E03B33wD1xOu6Fe+M+OAP3xf1wf5yJB+CBeBDOwoPxEDwUZ+NheDge
gXPwSDwKj8a5eAwei8fhPDweT8ATcRRPwvl4Mi7AU/BUPA0X4um4CM/AxXgm
noVn4xI8B8/F83Apno8X4IW4DC/Ci/ESXI6X4mV4OY7hFXglXoUr8Gq8Bq/F
lXgdXo834Cq8EW/Cm3E13oK34m24Bm/HO/BOXIt34d14D67De/E+vB9HSuPd
CDfGTXACboqb4eY4EbfALXErnIRb4za4LU7G7XB73AGn4I64E+6MU3EX3BV3
w2m4O+6Be+J03Av3xn1wBu6L++H+OBMPwAPxIJyFB+MheCjOxsPwcDwC5+CR
eBQejXPxGDwWj8N5eDyegCfiKJ6E8/FkXICn4Kl4Gi7E03ERnoGL8Uw8C8/G
JXgOnovn4VI8Hy/AC3EZXoQX4yW4HC/Fy/ByHMMr8Eq8Clfg1XgNXosr8Tq8
Hm/AVXgj3oQ342q8BW/F23AN3o534J24Fu/Cu/EeXIf34n14P468Eu9GuDFu
ghNwU9wMN8eJuAVuiVvhJNwat8FtcTJuh9vjDjgFd8SdcGecirvgrrgbTsPd
cQ/cE6fjXrg37oMzcF/cD/fHmXgAHogH4Sw8GA/BQ3E2HoaH4xE4B4/Eo/Bo
nIvH4LF4HM7D4/EEPBFH8SScjyfjAjwFT8XTcCGejovwDFyMZ+JZeDYuwXPw
XDwPl+L5eAFeiMvwIrwYL8HleClehpfjGF6BV+JVuAKvxmvwWlyJ1+H1eAOu
whvxJrwZV+MteCvehmvwdrwD78S1eBfejffgOrwX78P7cWR+vBvhxrgJTsBN
cTPcHCfiFrglboWTcGvcBrfFybgdbo874BTcEXfCnXEq7oK74m44DXfHPXBP
nI574d64D87AfXE/3B9n4gF4IB6Es/BgPAQPxdn1jja8H20YHh7KP9zw/j+c
g0eG/Esa3v+HR+NcPAaPxeNwHh6PJ+CJOIon4Xw8GRfgKXgqnoYL8XRchGfg
4jD/ry+ujzPxLDwbl+A5eC6eh0vxfLwALwz9P+etepfhRXhxyN8X8pfgcrwU
L8PLQ/3Lg2N4BV6JV+EKvBqvwWtxJV6H1+MNuCqM74HgjXgT3oyr8Ra8FW/D
NXg73oF3hv5PC67Fu/BuvAfX4b14H94f+nNFcOTVeDfCjXETnICb1jt6ZHAz
3Bw3fM7whob9H7fErXASbo3b4LY4GbfD7XEHnII74k64M07FXXBX3A2n4e64
B+6J03Ev3Bv3CeevuGH/x31xv4bPJW/Y/3EmHoAH4kE4Cw/GQ/BQnI2Hhf7P
DB6OR+AcPBKPwqNxLh6Dx+JxOA+PxxPwRBzFk3A+nowL8BQ8FU/DhXg6LsIz
cDGeiWfh2bgknP+Gv1+ag+fiebgUzw++KHgBXhjaTw4uw4saPqc93N8sxktw
echvF/KX4mV4ecjfH/JjeAVeiVcF/7ykPlbg1XgNXosr8Tq8Hm/AVXgj3oQ3
42q8BW/F23AN3o534J24Fu/Cu/GecD5fCa7De/E+vD/UNyo4siDejXBj3KTe
0YuDE3DTUL5pcDPcHCfiFrglboWTcGvcJvTvkuC2ODmUzw1uh9vjDjgFd8Sd
cGecirvgrrgbTsPdcQ/cE6eH+Tjy7Xr3wr1xH5yB++J+uD/OxAPwQDwIZ+HB
eAgeirPxMDwcj8A5eCQehUfjXDwGjw3n65fgcTgPj8cTQn2vBk/EUTwp5F/y
Tn3Mx5NxAZ6Cp+JpuDC0f17wdFyEZ+BiPBPPwrNxCZ6D5+J5uBTPxwvwQlyG
F4X56RK8GC/B5XgpXoaX4xheEfqzu7zeK/EqXBHy3w5ejdfgtbgy1PdSaH8d
Xh/Kpy6tjxtwFd6IN+HNuBpvwVvxNlyDt+MdeCeuxbvwbrwH1+G9eF+Yz/bB
+3HktXg3Ct+T83OY/8a4CU7ATXEz3Lzhe3pCe4m4BW6JW+Ek3Bq3CeM7Obgt
TsbtcHvcAaeE9raH8XXEnXBnnIq74K64G07D3XEP3BOn4164N+6DM3Bf3A/3
x5l4AB6IB+EsPBgPwUNxNh6Gh+MROAePxKPwaJyLx+CxeBzOw+PxBDwRR/Ek
nI8n4wI8BU/F03Ahno6L8AxcjGfiWXg2LsFz8Fw8D5fi+XgBXojL8CK8GC/B
5XgpXoaX4xhegVfiVbgCr8Zr8Fpcidfh9XgDrsIb8Sa8GVfjLXgr3oZr8Ha8
A+/EtXgX3o334Dq8F+/D+3FkYbwb4ca4CU7ATXEz3Bwn4ha4JW6Fk3Br3Aa3
xcm4HW6PO+AU3BF3wp1xKu6Cu+JuOA13xz1wT5yOe+HeuA/OwH1xP9wfZ+IB
eCAehLPwYDwED8XZeBgejkfgHDwSj8KjcS4eg8ficTgPj8cT8EQcxZNwPp6M
C/AUPBVPw4V4Oi7CM3Axnoln4dm4BM/Bc/E8XIrn4wV4IS7Di/BivASX46V4
GV6OY3gFXolX4Qq8Gq/Ba3ElXofX4w24Cm/Em/BmXI234K14G67B2/EOvBPX
4l14N96D6/BevA/vx5HX490IN8ZNcAJuipvh5jgRt8AtcSuchFvjNrgtTsbt
cHvcAafgjrgT7oxTcRfcFXfDabg77oF74nTcC/fGfXAG7ov74f44Ew/AA/Eg
nIUH4yF4KM7Gw/BwPALn4JF4FB6Nc/EYPBaPw3l4PJ6AJ+IonoTz8WRcgKfg
qXgaLsTTcRGegYvxTDwLz8YleA6ei+fhUjwfL8ALcRlehBfjJbgcL8XL8HIc
wyvwSrwKV+DVeA1eiyvxOrweb8BVeCPehDfjarwFb8XbcA3ejnfgnbgW78K7
8R5ch/fifXg/jpTF+wDcCB+IG+ODcBN8ME7Ah+Cm+FDcDB+Gm+PDcSI+ArfA
R+KW+CjcCh+Nk/AxuDU+FrfBx+G2+HicjE/A7fCJuD0+CXfAJ+MUfAruiE/F
nfBpuDM+HafiM3AXfCbuis/C3fDZOA2fg7vjc3EPfB7uic/H6fgC3AtfiHvj
i3AffDHOwJfgvvhS3A9fhvvjy3EmvgIPwFfigfgqPAhfjbPwNXgwvhYPwdfh
ofh6nI1vwMPwjXg4vgmPwDfjHHwLHolvxaPwbXg0vh3n4jvwGHwnHovvwuPw
3TgP34PH43vxBHwfnojvx1H8AJ6EH8T5+CE8GT+MC/AjeAp+FE/Fj+Fp+HFc
iJ/A0/GTuAg/hWfgp3ExfgbPxM/iWfg5PBs/j0vwC3gOfhHPxS/hefhlXIpf
wfPxq3gBfg0vxK/jMvwGXoTfxIvxW3gJfhuX43fwUvwuXobfw8vx+ziGP8Ar
8Id4Jf4Ir8If4wr8CV6NP8Vr8Gd4Lf4cV+Iv8Dr8JV6Pv8Ib8Ne4Cn+DN+Jv
8Sb8Hd6Mv8fV+Ae8Bf+It+Kf8Db8M67Bv+Dt+Fe8A/+Gd+LfcS3+A+/Cf+Ld
+C+8B/+N6/D/8F78D96H/8X78X848ka8D8CN8IG4MT4IN8EH4wR8CG6KD8XN
8GG4OT4cJ+IjcAt8JG6Jj8Kt8NE4CR+DW+NjcRt8HG6Lj8fJ+ATcDp+I2+OT
cAd8Mk7Bp+CO+FTcCZ+GO+PTcSo+A3fBZ+Ku+CzcDZ+N0/A5uDs+F/fA5+Ge
+Hycji/AvfCFuDe+CPfBF+MMfAnuiy/F/fBluD++HGfiK/AAfCUeiK/Cg/DV
OAtfgwfja/EQfB0eiq/H2fgGPAzfiIfjm/AIfDPOwbfgkfhWPArfhkfj23Eu
vgOPwXfisfguPA7fjfPwPXg8vhdPwPfhifh+HMUP4En4QZyPH8KT8cO4AD+C
p+BH8VT8GJ6GH8eF+Ak8HT+Ji/BTeAZ+GhfjZ/BM/CyehZ/Ds/HzuAS/gOfg
F/Fc/BKeh1/GpfgVPB+/ihfg1/BC/Douw2/gRfhNvBi/hZfgt3E5fgcvxe/i
Zfg9vBy/j2P4A7wCf4hX4o/wKvwxrsCf4NX4U7wGf4bX4s9xJf4Cr8Nf4vX4
K7wBf42r8Dd4I/4Wb8Lf4c34e1yNf8Bb8I94K/4Jb8M/4xr8C96Of8U78G94
J/4d1+I/8C78J96N/8J78N+4Dv8P78X/4H34X7wf/4cji+J9AG6ED8SN8UG4
CT4YJ+BDcFN8KG6GD8PN8eE4ER+BW+AjcUt8FG6Fj8ZJ+BjcGh+L2+DjcFt8
PE7GJ+B2+ETcHp+EO+CTcQo+BXfEp+JO+DTcGZ+OU/EZuAs+E3fFZ+Fu+Gyc
hs/B3fG5uAc+D/fE5+N0fAHuhS/EvfFFuA++GGfgS3BffCnuhy/D/fHlOBNf
gQfgK/FAfBUehK/GWfgaPBhfi4fg6/BQfD3OxjfgYfhGPBzfhEfgm3EOvgWP
xLfiUfg2PBrfjnPxHXgMvhOPxXfhcfhunIfvwePxvXgCvg9PxPfjKH4AT8IP
4nz8EJ6MH8YF+BE8BT+Kp+LH8DT8OC7ET+Dp+ElchJ/CM/DTuBg/g2fiZ/Es
/ByejZ/HJfgFPAe/iOfil/A8/DIuxa/g+fhVvAC/hhfi13EZfgMvwm/ixfgt
vAS/jcvxO3gpfhcvw+/h5fh9HMMf4BX4Q7wSf4RX4Y9xBf4Er8af4jX4M7wW
f44r8Rd4Hf4Sr8df4Q34a1yFv8Eb8bd4E/4Ob8bf42r8A96Cf8Rb8U94G/4Z
1+Bf8Hb8K96Bf8M78e+4Fv+Bd+E/8W78F96D/8Z1+H94L/4H78P/4v34Pxx5
M94H4Eb4QNwYH4Sb4INxAj4EN8WH4mb4MNwcH44T8RG4BT4St8RH4Vb4aJyE
j8Gt8bG4DT4Ot8XH42R8Am6HT8Tt8Um4Az4Zp+BTcEd8Ku6ET8Od8ek4FZ+B
u+AzcVd8Fu6Gz8Zp+BzcHZ+Le+DzcE98Pk7HF+Be+ELcG1+E++CLcQa+BPfF
l+J++DLcH1+OM/EVeAC+Eg/EV+FB+Gqcha/Bg/G1eAi+Dg/F1+NsfAMehm/E
w/FNeAS+GefgW/BIfCsehW/Do/HtOBffgcfgO/FYfBceh+/GefgePB7fiyfg
+/BEfD+O4gfwJPwgzscP4cn4YVyAH8FT8KN4Kn4MT8OP40L8BJ6On8RF+Ck8
Az+Ni/EzeCZ+Fs/Cz+HZ+Hlcgl/Ac/CLeC5+Cc/DL+NS/Aqej1/FC/BreCF+
HZfhN/Ai/CZejN/CS/DbuBy/g5fid/Ey/B5ejt/HMfwBXoE/xCvxR3gV/hhX
4E/wavwpXoM/w2vx57gSf4HX4S/xevwV3oC/xlX4G7wRf4s34e/wZvw9rsY/
4C34R7wV/4S34Z9xDf4Fb8e/4h34N7wT/45r8R94F/4T78Z/4T34b1yH/4f3
4n/wPvwv3o//w5HF8T4AN8IH4sb4INwEH4wT8CG4KT4UN8OH4eb4cJyIj8At
8JG4JT4Kt8JH4yR8DG6Nj8Vt8HG4LT4eJ+MTcDt8Im6PT8Id8Mk4BZ+CO+JT
cSd8Gu6MT8ep+AzcBZ+Ju+KzcDd8Nk7D5+Du+FzcA5+He+LzcTq+APfCF+Le
+CLcB1+MM/AluC++FPfDl+H++HKcia/AA/CVeCC+Cg/CV+MsfA0ejK/FQ/B1
eCi+HmfjG/AwfCMejm/CI/DNOAffgkfiW/EofBsejW/HufgOPAbficfiu/A4
fDfOw/fg8fhePAHfhyfi+3EUP4An4QdxPn4IT8YP4wL8CJ6CH8VT8WN4Gn4c
F+In8HT8JC7CT+EZ+GlcjJ/BM/GzeBZ+Ds/Gz+MS/AKeg1/Ec/FLeB5+GZfi
V/B8/CpegF/DC/HruAy/gRfhN/Fi/BZegt/G5fgdvBS/i5fh9/By/D6O4Q/w
CvwhXok/wqvwx7gCf4JX40/xGvwZXos/x5X4C7wOf4nX46/wBvw1rsLf4I34
W7wJf4c34+9xNf4Bb8E/4q34J7wN/4xr8C94O/4V78C/4Z34d1yL/8C78J94
N/4L78F/4zr8P7wX/4P34X/xfvwfjrwV7wNwI3wgbowPwk3wwTgBH4Kb4kNx
M3wYbo4Px4n4CNwCH4lb4qNwK3w0TsLH4Nb4WNwGH4fb4uNxMj4Bt8Mn4vb4
JNwBn4xT8Cm4Iz4Vd8Kn4c74dJyKz8Bd8Jm4Kz4Ld8Nn4zR8Du6Oz8U98Hm4
Jz4fp+MLcC98Ie6NL8J98MU4A1+C++JLcT98Ge6PL8eZ+Ao8AF+JB+Kr8CB8
Nc7C1+DB+Fo8BF+Hh+LrcTa+AQ/DN+Lh+CY8At+Mc/AteCS+FY/Ct+HR+Hac
i+/AY/CdeCy+C4/Dd+M8fA8ej+/FE/B9eCK+H0fxA3gSfhDn44fwZPwwLsCP
4Cn4UTwVP4an4cdxIX4CT8dP4iL8FJ6Bn8bF+Bk8Ez+LZ+Hn8Gz8PC7BL+A5
+EU8F7+E5+GXcSl+Bc/Hr+IF+DW8EL+Oy/AbeBF+Ey/Gb+El+G1cjt/BS/G7
eBl+Dy/H7+MY/gCvwB/ilfgjvAp/jCvwJ3g1/hSvwZ/htfhzXIm/wOvwl3g9
/gpvwF/jKvwN3oi/xZvwd3gz/h5X4x/wFvwj3op/wtvwz7gG/4K341/xDvwb
3ol/x7X4D7wL/4l347/wHvw3rsP/w3vxP3gf/hfvx//hyJJ4H4Ab4QNxY3wQ
boIPxgn4ENwUH4qb4cNwc3w4TsRH4Bb4SNwSH4Vb4aNxEj4Gt8bH4jb4ONwW
H4+T8Qm4HT4Rt8cn4Q74ZJyCT8Ed8am4Ez4Nd8an41R8Bu6Cz8Rd8Vm4Gz4b
p+FzcHd8Lu6Bz8M98fk4HV+Ae+ELcW98Ee6DL8YZ+BLcF1+K++HLcH98Oc7E
V+AB+Eo8EF+FB+GrcRa+Bg/G1+Ih+Do8FF+Ps/ENeBi+EQ/HN+ER+Gacg2/B
I/GteBS+DY/Gt+NcfAceg+/EY/FdeBy+G+fhe/B4fC+egO/DE/H9OIofwJPw
gzgfP4Qn44dxAX4ET8GP4qn4MTwNP44L8RN4On4SF+Gn8Az8NC7Gz+CZ+Fk8
Cz+HZ+PncQl+Ac/BL+K5+CU8D7+MS/EreD5+FS/Ar+GF+HVcht/Ai/CbeDF+
Cy/Bb+Ny/A5eit/Fy/B7eDl+H8fwB3gF/hCvxB/hVfhjXIE/wavxp3gN/gyv
xZ/jSvwFXoe/xOvxV3gD/hpX4W/wRvwt3oS/w5vx97ga/4C34B/xVvwT3oZ/
xjX4F7wd/4p34N/wTvw7rsV/4F34T7wb/4X34L9xHf4f3ov/wfvwv3g//g9H
3o73AbgRPhA3xgfhJvhgnIAPwU3xobgZPgw3x4fjRHwEboGPxC3xUbgVPhon
4WNwa3wsboOPw23x8TgZn4Db4RNxe3wS7oBPxin4FNwRn4o74dNwZ3w6TsVn
4C74TNwVn4W74bNxGj4Hd8fn4h74PNwTn4/T8QW4F74Q98YX4T74YpyBL8F9
8aW4H74M98eX40x8BR6Ar8QD8VV4EL4aZ+Fr8GB8LR6Cr8ND8fU4G9+Ah+Eb
8XB8Ex6Bb8Y5+BY8Et+KR+Hb8Gh8O87Fd+Ax+E48Ft+Fx+G7cR6+B4/H9+IJ
+D48Ed+Po/gBPAk/iPPxQ3gyfhgX4EfwFPwonoofw9Pw47gQP4Gn4ydxEX4K
z8BP42L8DJ6Jn8Wz8HN4Nn4el+AX8Bz8Ip6LX8Lz8Mu4FL+C5+NX8QL8Gl6I
X8dl+A28CL+JF+O38BL8Ni7H7+Cl+F28DL+Hl+P3cQx/gFfgD/FK/BFehT/G
FfgTvBp/itfgz/Ba/DmuxF/gdfhLvB5/hTfgr3EV/gZvxN/iTfg7vBl/j6vx
D3gL/hFvxT/hbfhnXIN/wdvxr3gH/g3vxL/jWvwH3oX/xLvxX3gP/hvX4f/h
vfgfvA//i/fj/3CkPN4H4Eb4QNwYH4Sb4INxAj4EN8WH4mb4MNwcH44T8RG4
BT4St8RH4Vb4aJyEj8Gt8bG4DT4Ot8XH42R8Am6HT8Tt8Um4Az4Zp+BTcEd8
Ku6ET8Od8ek4FZ+Bu+AzcVd8Fu6Gz8Zp+BzcHZ+Le+DzcE98Pk7HF+Be+ELc
G1+E++CLcQa+BPfFl+J++DLcH1+OM/EVeAC+Eg/EV+FB+Gqcha/Bg/G1eAi+
Dg/F1+NsfAMehm/Ew/FNeAS+GefgW/BIfCsehW/Do/HtOBffgcfgO/FYfBce
h+/GefgePB7fiyfg+/BEfD+O4gfwJPwgzscP4cn4YVyAH8FT8KN4Kn4MT8OP
40L8BJ6On8RF+Ck8Az+Ni/EzeCZ+Fs/Cz+HZ+Hlcgl/Ac/CLeC5+Cc/DL+NS
/Aqej1/FC/BreCF+HZfhN/Ai/CZejN/CS/DbuBy/g5fid/Ey/B5ejt/HMfwB
XoE/xCvxR3gV/hhX4E/wavwpXoM/w2vx57gSf4HX4S/xevwV3oC/xlX4G7wR
f4s34e/wZvw9rsY/4C34R7wV/4S34Z9xDf4Fb8e/4h34N7wT/45r8R94F/4T
78Z/4T34b1yH/4f34n/wPvwv3o//w5F34n0AboQPxI3xQbgJPhgn4ENwU3wo
boYPw83x4TgRH4Fb4CNxS3wUboWPxkn4GNwaH4vb4ONwW3w8TsYn4Hb4RNwe
n4Q71MfoguCTcQo+BXfEp+JO+DTcGZ+OU/EZuAs+E3fFZ+Fu+Gychs/B3fG5
uAc+D/fE5+N0fAHu1XAdLa2PF+Le+KKQPy64D74YZ+BLcF98Ke6HL8P98eUN
8xycia/AA/CVeCC+Cg/CV+MsfA0ejK/FQ/B1eCi+HmfjG/AwfCMejm/CI/DN
OAffgkfiW/EofBsejW/HufgOPAbficfiu/A4fDfOw/fg8fhePAHfhyfi+3EU
P4An4QdxPn4IT8YP4wL8CJ6CH8VT8WN4Gn4cF4bXh3/C75/A0/GTuAg/hWfg
p3ExfgbPxM/iWQ37QhjPc3g2fj7k/xt+X4JfwHPwi3huiLEQX8Lz8Mu4FL+C
54f2kkL/X8UN+9RXwa/hhfh1XIbfwIvwm3gxfiv07+Rl9V6C38bl+B28FL+L
l+H38HL8Po7hD/AK/CFeiT/Cq8L8bH+3Pn6MK/AnIX9B8Gr8KV6DP8Nr8eeh
vS+DK/EXeB3+Eq/HX+EN+OvQn6eCq/A3eCP+NtQ3JXgT/g5vDvnN36v397ga
/4C34B/xVvwT3oZ/xjX4F7wd/4p34N/wTvw7rsV/4F34T7wb/4X34L9xHf4f
3ov/wfvwv3g//g9Hlsb7ANwIH4gb44NwE3wwTsCH4Kb40PA6+0V4fWmGD8PN
8eGhvieDE/ERuAU+MtS3NLglPgq3wkfjJHwMbo2PxW3wcbgtPh4n4xPCeJ8K
bodPbHhuCW6PT8Id8Mk4JdQ/MfgU3BGfijuF+g4J18dpuDM+HafiM3CX0N61
y+t9Ju6Kz8Ld8Nk4Df/ffXdwd3wu7oHPC/U9HtwTn4/T8QW4F74Q98YX4T74
YpyBL8F9G577gi/F/fBluD++PNR/WnAmvgIPwFfigaH+c4OvwoPw1SH/33B9
ZeFrQvnzQvnB+Fo8BF+HhwafFHw9zsY34GH4Rjw89P+Y4JvwCHwzzsG3hPq7
v18fR+Jb8Sh8Gx6Nb8e5+A48Bt+Jx+K78Dh8dxjvPcF5+B48Ht+LJ+D7Qnsj
YvVxIr4fR/EDeBJ+EOfjh/Bk/DAuqHf6q8GP4Cn40TDecz+o91T8WL1jW4On
4cdxIX4CT8dPhv7HVtTHIvwUnoGfxsX4GTwTP4tn4efwbPw8LsEv4Dn4RTwX
v4Tn4ZdxKX4Fz8evhuvhy+AF+DW8EL+Oy4Krg9/Ai/CbeDF+Cy/Bb4frdWNw
OX4HL8Xv4mX4Pbwcv49j+AO8An+IV+KP8Cr8Ma7An+DV+FO8Bn+G1+LPcSX+
Aq/DX+L1+Cu8AX+Nq/A3eCP+Fm/C3+HN+HtcjX/AW/CPeCv+CW/DP+Ma/Ave
jn/FO/BveCf+HdfiP/Au/Cfejf/Ce/DfuA7/D+/F/+B9+F+8H/+HI+/G+wDc
CB+IG+ODcBN8ME7Ah+Cm+FDcDB+Gm+PDcSI+ArfAR+KW+CjcCh+Nk/AxuDU+
FrfBx+G2+HicjE/A7fCJuD0+CXfAJ+MUfAruiE/FnfBpuDM+HafWO/Zu8Bm4
Cz4Td8VnhX93fS64Gz47eMyH9TENn4O743NxD3we7onPx+n4AtwLX4h744vq
nX5lcB98Mc7Al+C++NLQ3gXB/fBluD++PNR3W3AmvgIPwFfigfgqPAhfjbPw
NXhw6P9jwdfiIfg6PBRfj7PxDXgYvhEPxzfhEfhmnINvwSPxrXgUvg2Pxrfj
XHwHHoPvxGPxXXgcvhvn4XvweHwvnoDvwxPx/TiKH8CT8IM4Hz+EJ+OHcQF+
BE/Bj+Kp+DE8DT+OC/ETeDp+Ehfhp/AM/DQuxs/gmfhZPAs/h2fj53EJfgHP
wS/iufglPA+/jEvxK3g+fhUvwK/hhfh1XIbfwIvwm3gxfgsvwW/jcvwOXorf
xcvwe3g5fh/H8Ad4Bf4Qr8Qf4VX4Y1yBP8Gr8ad4Df4Mr8Wf40r8BV6Hv8Tr
8Vd4A/4aV+Fv8Eb8Ld6Ev8Ob8fe4Gv+At+Af8Vb8E96Gf8Y1+Be8Hf+Kd+Df
8E78O67Ff+Bd+E+8G/+F9+C/cR3+H96L/8H78L94P/4PR5bF+wDcCB+IG+OD
cBN8ME7Ah+Cm+FDcDB+Gm+PDcSI+ArfAR+KW+CjcCh+Nk/AxuDU+FrfBx+G2
+HicjE/A7fCJuD0+CXfAJ+MUfAruiE/FnfBpuDM+HafiM3AXfCbuis/C3fDZ
OA2fg7vjc3EPfB7uic/H6fgC3AtfiHvji3AffDHOwJfgvvhS3A9fhvvjy3Em
vgIPwFfigfgqPAhfjbPwNXgwvhYPwdfhofh6nI1vwMPwjXg4vgmPwDfjHHwL
HolvxaPwbXg0vh3n4jvwGHwnHovvwuPw3TgP34PH43vxBHwfnojvx1H8AJ6E
H8T5+CE8GT+MC/AjeAp+FE/Fj+Fp+HFciJ/A0/GTuAg/hWfgp3ExfgbPxM/i
Wfg5PBs/j0vwC3gOfhHPxS/hefhlXIpfwfPxq3gBfg0vxK/jMvwGXoTfxIvx
W3gJfhuX43fwUvwuXobfw8vx+ziGP8Ar8Id4Jf4Ir8If4wr8CV6NP8Vr8Gd4
Lf4cV+Iv8Dr8JV6Pv8Ib8Ne4Cn+DN+Jv8Sb8Hd6Mv8fV+Ae8Bf+It+Kf8Db8
M67Bv+Dt+Fe8A/+Gd+LfcS3+A+/Cf+Ld+C+8B/+N6/D/8F78D96H/8X78X84
8l68D8CN8IG4MT4IN8EH4wR8CG6KD8XN8GG4OT4cJ+IjcAt8JG6Jj8Kt8NE4
CR+DW+NjcRt8HG6Lj8fJ+ATcDp+I2+OTcAd8Mk7Bp+CO+FTcCZ+GO+PTcSo+
A3fBZ+Ku+CzcDZ+N0/A5uDs+F/fA5+Ge+Hycji/AvfCFuDe+CPfBF+MMfAnu
iy/F/fBluD++HGfiK/AAfCUeiK/Cg/DVOAtfgwfja/EQfB0eiq/H2fgGPAzf
iIfjm/AIfDPOwbfgkfhWPArfhkfj23EuvgOPwXfisfguPA7fjfPwPXg8vhdP
wPfhifh+HMUP4En4QZyPH8KT8cO4AD+Cp+BH8VT8GJ6GH8eF+Ak8HT+Ji/BT
eAZ+GhfjZ/BM/CyehZ/Ds/HzuAS/gOfgF/Fc/BKeh1/GpfgVPB+/ihfg1/BC
/Douw2/gRfhNvBi/hZfgt3E5fgcvxe/iZfg9vBy/j2P4A7wCf4hX4o/wKvwx
rsCf4NX4U7wGf4bX4s9xJf4Cr8Nf4vX4K7wBf42r8Dd4I/4Wb8Lf4c34e1yN
f8Bb8I94K/4Jb8M/4xr8C96Of8U78G94J/4d1+I/8C78J96N/8J78N+4Dv8P
78X/4H34X7wf/4cjy+N9AG6ED8SN8UG4CT4YJ+BDcFN8KG6GD8PN8eE4ER+B
W+AjcUt8FG6Fj8ZJ+BjcGh+L2+DjcFt8PE7GJ+B2+ETcHp+EO+CTcQo+BXfE
p+JO+DTcGZ+OU/EZuAs+E3fFZ+Fu+Gychs/B3fG5uAc+D/fE5+N0fAHuhS/E
vfFFuA++GGfgS3BffCnuhy/D/fHlOBNfgQfgK/FAfBUehK/GWfgaPBhfi4fg
6/BQfD3OxjfgYfhGPBzfhEfgm3EOvgWPxLfiUfg2PBrfjnPxHXgMvhOPxXfh
cfhunIfvwePxvXgCvg9PxPfjKH4AT8IP4nz8EJ6MH8YF+BE8BT+Kp+LH8DT8
OC7ET+Dp+ElchJ/CM/DTuBg/g2fiZ/Es/ByejZ/HJfgFPAe/iOfil/A8/DIu
xa/g+fhVvAC/hhfi13EZfgMvwm/ixfgtvAS//f+6uuuge+r6YeMX3d3d3d0p
Io2UAiopCoKU0gg3oCDYdCvSYYCCNF+6u5Hu7s7HGc7398z9+mvnNdfu2c/u
7Jn3+efM4kvxZfhyfAW+El+Fr8bX4BH4Wnwdvh7fgG/EN+Gb8S34Vnwbvh3f
ge/Ed+G78T34Xnwfvh8/gB/ED+GH8SP4UfwY/i9+HD+Bn8RP4afxM/hZ/Bx+
Hr+AX8Qv4ZfxK/hV/Bp+Hb+B38Rv4bfxO/hd/B5+H3+AP8Qf4Y/xJ/hT/Bn+
HH+Bv8Rf4a4Z7lHwqHg0PDoeA4+Jx8Jj43HwuHg8PD6eAE+IJ8IT40nwpHgy
PDmeAk+Jp8JT42nwtHg6PD2eAc+IZ8Iz41nwrHg2PDueA8+J58Jz43nwvHg+
PD9eAC+IF8IL40XwongxvDheAi+Jl8JL42Xwsng5vDxeAa+IV8Ir41Xwqvgb
eDX8Tbw6/hZeA6+J18Jr43Xwung9vD7+Nt4Ab4g3whvjTfB38HfxpngzvDn+
Hv4+/gHeAm+Jt8Jb423wtviHeDv8I/xjvD3eAf8E74h3wj/FO+Nd8K54N7w7
/hn+Od4D74n3wnvjffC+eD+8P/4FPgAfiIfwQfhgfAj+Jf4VPhQfhn+ND8dH
4N/g3+Lf4d/jP+A/4j/hI/FR+Gh8DD4WH4ePxyfgE/FJ+GR8Cj4V/xn/BZ+G
/4pPx2fgM/FZ+Gx8Dj4Xn4fPxxfgv+G/43/gf+IL8UX4X/jf+GJ8Cf4PvhRf
hi/HV+Ar8VX4anwNHoGvxdfh6/EN+EZ8E74Z34Jvxbfh2/Ed+E58F74b34Pv
xffh+/ED+EH8EH4YP4IfxY/h/+LH8RP4SfwUfho/g5/Fz+Hn8Qv4RfwSfhm/
gl/Fr+HX8Rv4TfwWfhu/g9/F7+H38Qf4Q/wR/hh/gj/Fn+HP8Rf4S/wVbsQw
D+FGoeNGpeNGo+NGp+PGoOPGpOPGouPGpuPGoePGpePGo+PGp+MmoOMmpOMm
ouMmpuMmoeMmpeMmo+Mmp+OmoOOmpOOmouOmpuOmoeOmpeOmo+Omp+NmoONm
pONmouNmpuNmoeNmpeNmo+Nm/9or7zzouDm+9tBBg46bk46bi46bm46bh46b
l46bj46bn45bgI5bkD7wiG0GfaHhHsItTMctQh94aIdBX3S4h3CL0QdeeddB
X3y4h3BLDJ6XPw46bkn6wCtfOehLDfcQbunB+qa94estbhk6blk6bjk6bnk6
bgU6bkU6biU6bmU6bhU6blU67ht03Gp03DfpuNXpuG/RcWvQcWvScWvRcWvT
cevQcevScevRcevTcd+m4zag4zak4zai4zam4zah475Dx32XjtuUjtuMjtuc
jvseHfd9Ou4HdNwWdNyWdNxWdNzWdNw2dNy2dNwP6bjt6Hjke0T+r+N+TMdt
T8ftQMf9hI7bkY7biY77KR23Mx23Cx23Kx23Gx23Ox33Mzru53TcHnTcnnTc
XnTc3nTcPnTcvnTcfnTc/nTcL+i4A+gDj/hs8PvmwOEewg197ZU/H3TcQYP9
zx98Pu5g+kiPduPX/ZDhHsL9ko77FR13KB13GB33azrucPrAK48+6EcM99DA
I9Yf9N8M9xDut3Tc7+i439Nxfxisb6lBx/2RjvsTfeChpwf9yOEewh1Fxx1N
xx0z8Jg3fb3FHUvHHUfHHU/HnUDHnUjHnUTHnUzHnULHnUofuLEG/c/DPYT7
Cx13Gh33VzrudDruDDruTPrAQ28Ono+zhnsIdzYddw4ddy4ddx4ddz4ddwEd
9zc67u903D/ouH/ScRfScRfRcf+i4/5Nx11Mx11Cx/2HjruUjruMjrucjruC
jruSjruKjruajruGjhtBx11LH7iHBv264R7CXU/H3UDH3UjH3UTH3TxY/1uD
jruFjruVjruNjrudjruDjruTjruLjrubjruHjruXjruPjrufjnuAjnuQjnuI
jnuYjnuEPnD3DubPo8M9hHuMjvsvHff44PyXDjruCTruSTruKfpIXzDoTw/3
0MAdPejPDPcQ7lk67jk67nk67oWBTxt03It03Et03MuD61/q5q+3uFfouFfp
uNfouNfpuDfouDfpuLfouLfpuHfoI73noL873EO49+i49+m4D+i4D+m4j+i4
j+m4T+i4T+m4z+i4z+m4L+i4L+m4r+j4fwN+eMeNQseNSseNRseNTseNQceN
SceNRceNTceNQ8eNS8eNR8eNT8dNQMdNSMdNRMdNTMdNQsdNSsdNRsdNTsdN
QcdNScdNRcdNTcdNQ8dNS8dNR8dNT8fNQMfNSMfNRMfNTMfNQsfNSsfNRsfN
TsfNQcfNScfNRcfNTcfNQ8fNS8fNR8fNT8ctQMctSMctRMctTMctQsctSsct
RsctTsctQcctScctRcctTcctQ8ctS8ctR8ctT8etQMetSMetRMetTMetQset
Ssd9g45bjY77Jh23Oh33LTpuDTpuTTpuLTpubTpuHTpuXTpuPTpufTru23Tc
BnTchnTcRnTcxnTcJnTcd+i479Jxm9Jxm9Fxm9Nx36Pjvk/H/YCO24KO25KO
24qO25qO24aO25aO+yEdtx0d9yM67sd03PZ03A503E/ouB3puJ3ouJ/ScTvT
cbvQcbvScbvRcbvTcT+j435Ox+1Bx+1Jx+1Fx+1Nx+1Dx+1Lx+1Hx+1Px/2C
jjuAjjuQjhui4w6i4w6m4w6h435Jx/2KjjuUjjuMjvs1HXc4HXcEHfcbOu63
dNzv6Ljf03F/oOP+SMf9iY47ko47io47mo47ho47lo47jo47no47gY47kY47
iY47mY47hY47lY77Mx33FzruNDrur3Tc6XTcGXTcmXTcWXTc2XTcOXTcuXTc
eXTc+XTcBXTc3+i4v9Nx/6Dj/knHXUjHXUTH/YuO+zcddzEddwkd9x867lI6
7jI67nI67go67ko67io67mo67ho6bgQddy0ddx0ddz0ddwMddyMddxMddzMd
dwsddysddxsddzsddwcddycddxcddzcddw8ddy8ddx8ddz8d9wAd9yAd9xAd
9zAd9wgd9ygd9xgd91867nE67gk67kk67ik67mk67hk67lk67jk67nk67gU6
7kU67iU67mU67hU67lU67jU67nU67g067k067i067m067h067l067j067n06
7gM67kM67iM67mM67hM67lM67jM67nM67gs67ks67is6/t8AH95xo9Bxo9Jx
o9Fxo9NxY9BxY9JxY9FxY9Nx49Bx49Jx49Fx49NxE9BxE9JxE9FxE9Nxk9Bx
k9Jxk9Fxk9NxU9BxU9JxU9FxU9Nx09Bx09Jx09Fx09NxM9BxM9JxM9FxM9Nx
s9Bxs9Jxs9Fxs9Nxc9Bxc9Jxc9Fxc9Nx89Bx89Jx89Fx89NxC9BxC9JxC9Fx
C9Nxi9Bxi9Jxi9Fxi9NxS9BxS9JxS9FxS9Nxy9Bxy9Jxy9Fxy9NxK9BxK9Jx
K9FxK9Nxq9Bxq9Jx36DjVqPjvknHrU7HfYuOW4OOW5OOW4uOW5uOW4eOW5eO
W4+OW5+O+zYdtwEdtyEdtxEdtzEdtwkd9x067rt03KZ03GZ03OZ03PfouO/T
cT+g47ag47ak47ai47am47ah47al435Ix21Hx/2IjvsxHbc9HbcDHfcTOm5H
Om4nOu6ndNzOdNwudNyudNxudNzudNzP6Lif03F70HF70nF70XF703H70HH7
0nH70XH703G/+NptMei4Awb7j+y4A+m4ITruIDruYDruEDrul3Tcr+i4Q+m4
w+i4X9Nxh9NxR9Bxv6HjfkvH/Y6O+z0d9wc67o903J/ouCPpuKPouKPpuGPo
uGPpuOPouOPpuBPouBPpuJPouJPpuFPouFPpuD/TcX+h406j4/5Kx51Ox51B
x51Jx51Fx51Nx51Dx51Lx51Hx51Px11AH7jVB/1vwz2E+zsd9w867p/0gYf2
HvQLh3sIdxEd9y867t903MV03CV03H/ouEvpuMvoA7fVoF8+3EO4K+i4K+kj
vfGgXzXcQ7ir6bhr6LgRdNy1dNx1dNz1dNwNdNyNdNxN9IGHlhv0m4d7aKTX
GPRbhnto4BYe9FuHe2jgoakG/bbhHsLdPvAKg467g467k467i467mz7Saw36
PcM9NHCLDvq9wz2Eu4+Ou5+Oe4A+8NDI/uBwD+EeGhw/7aDjHqYPPDSyPzLc
Q7hHv/bKYw867jH6SH8+8v//wz2Ee5yOe4KOe3LgoVu+7rinvvaIiwYd9/Rg
/y8HHfcMHfcsHfccHfc8feAR29z6dX9huIdwL9JxL9FxL9Nxr9Bxrw7Wv9ag
416j416nDzzimEF/Y7iHcG/ScW/RcW/TR/rwQX9nuIdw79Jx79Fx7w+uf7dB
x31Ax31Ix31Ex31Mx31Cx31Kx31Gx31OH+kDBv2L4R7CfUnHfUXH/xvQwztu
FDpuVPrAI7Yb9NGGewg3Oh03Bh035uD8Pxp03Fj0gUeM7GMP9xBuHPrAK683
6OMO99BIrzro4w33EG58Om4COm5COm4iOm5iOm4SOm5SOm4y+sAjRvbJh3sI
NwUdNyUdNxUdN/XA2w86bho6btrB9S1y29cdNx0dNz0dNwMdNyMdNxMdNzN9
4BHbDvoswz2Em5WOm42Om52Om4OOm5OOm4uOm5uOm4eOm5eOm29wf9cedNz8
9JFeadAXGO4h3IJ03EIDLzbouIUH65120HGL0AdeedRBX3S4h3CLDY5/ZfD9
wS1Oxy1Bxy1Jxy1Fxy1Nxy1Dxy1Lxy1Hxy1Px61Ax61Ix61Ex61Mx61Cx61K
x32DjluNjvsmHbc6HfctOm4NOm5NOm4tOm5tOm4dOm5dOm49Om59Ou7bdNwG
dNyGdNxGdNzGdNwmdNx36Ljv0nGb0nGb0XGb03Hfo+O+T8f9gI7bgo7bko7b
io7bmo7bho7blo77IR23HR33Izrux3Tc9nTcDnTcT+i4Hem4nei4n9JxO9Nx
u9Bxu9Jxu9Fxu9NxP6Pjfk7H7UHH7UnH7UXH7U3H7UPH7UvH7UfH7U/H/YKO
O4COO5COG6LjDqLjDqbjDqHjfknH/YqOO5SOO4yO+zUddzgddwQd9xs67rd0
PPI9af/Xcb+n4/5AxyPfm/V/HfcnOu5IOu4oOu5oOu4YOu5YOu44Ou54Ou4E
Ou5EOu4kOu5kOu4UOu5UOu7PdNxf6LjT6Li/0nGn03Fn0HFn0nFn0XFn03Hn
0HHn0nHn0XHn03EX0HF/o+P+Tsf9g477Jx13IR13ER33Lzru33TcxXTcJXTc
f+i4S+m4y+i4y+m4K+i4K+m4q+i4q+m4a+i4EXTctXTcdXTc9XTcDXTcjXTc
TXTczXTcLXTcrXTcbXTc7XTcHXTcnXTcXXTc3XTcPXTcvXTcfXTc/XTcA3Tc
g3TcQ3Tcw3TcI3Tco3TcY3Tcf+m4x+m4J+i4J+m4p+i4p+m4Z+i4Z+m45+i4
5+m4F+i4F+m4l+i4l+m4V+i4V+m41+i41+m4N+i4N+m4t+i4t+m4d+i4d+m4
9+i49+m4D+i4D+m4j+i4j+m4T+i4T+m4z+i4z+m4L+i4L+m4r+j4fwN4eMeN
QseNSseNRseNTseNQceNSceNRceNTceNQ8eNS8eNR8eNT8dNQMdNSMdNRMdN
TMdNQsdNSsdNRsdNTsdNQcdNScdNRcdNTcdNQ8dNS8dNR8dNT8fNQMfNSMfN
RMfNTMfNQsfNSsfNRsfNTsfNQcfNScfNRcfNTcfNQ8fNS8fNR8fNT8ctQMct
SMctRMctTMctQsctSsctRsctTsctQcctScctRcctTcctQ8ctS8ctR8ctT8et
QMetSMetRMetTMetQsetSsd9g45bjY77Jh23Oh33LTpuDTpuTTpuLTpubTpu
HTpuXTpuPTpufTru23TcBnTchnTcRnTcxnTcJnTcd+i479Jxm9Jxm9Fxm9Nx
36Pjvk/H/YCO24KO25KO24qO25qO24aO25aO+yEdtx0d9yM67sd03PZ03A50
3E/ouB3puJ3ouJ/ScTvTcbvQcbvScbvRcbvTcT+j435Ox+1Bx+1Jx+1Fx+1N
x+1Dx+1Lx+1Hx+1Px/2CjjuAjjuQjhui4w6i4w6m4w6h435Jx/2KjjuUjjuM
jvs1HXc4HXcEHfcbOu63dNzv6Ljf03F/oOP+SMf9iY47ko47io47mo47ho47
lo47jo47no47gY47kY47iY47mY47hY47lY77Mx33FzruNDrur3Tc6XTcGXTc
mXTcWXTc2XTcOXTcuXTceXTc+XTcBXTc3+i4v9Nx/6Dj/knHXUjHXUTH/YuO
+zcddzEddwkd9x867lI67jI67nI67go67ko67io67mo67ho6bgQddy0ddx0d
dz0ddwMddyMddxMddzMddwsddysddxsddzsddwcddycddxcddzcddw8ddy8d
dx8ddz8d9wAd9yAd9xAd9zAd9wgd9ygd9xgd91867nE67gk67kk67ik67mk6
7hk67lk67jk67nk67gU67kU67iU67mU67hU67lU67jU67nU67g067k067i06
7m067h067l067j067n067gM67kM67iM67mM67hM67lM67jM67nM67gs67ks6
7is6/t+AHd5xo9Bxo9Jxo9Fxo9NxY9BxY9JxY9FxY9Nx49Bx49Jx49Fx49Nx
E9BxE9JxE9FxE9Nxk9Bxk9Jxk9Fxk9NxU9BxU9JxU9FxU9Nx09Bx09Jx09Fx
09NxM9BxM9JxM9FxM9Nxs9Bxs9Jxs9Fxs9Nxc9Bxc9Jxc9Fxc9Nx89Bx89Jx
89Fx89NxC9BxC9JxC9FxC9Nxi9Bxi9Jxi9Fxi9NxS9BxS9JxS9FxS9Nxy9Bx
y9Jxy9Fxy9NxK9BxK9JxK9FxK9Nxq9Bxq9Jx36DjVqPjvknHrU7HfYuOW4OO
W5OOW4uOW5uOW4eOW5eOW4+OW5+O+zYdtwEdtyEdtxEdtzEdtwkd9x067rt0
3KZ03GZ03OZ03PfouO/TcT+g47ag47ak47ai47am47ah47al435Ix21Hx/2I
jvsxHbc9HbcDHfcTOm5HOm4nOu6ndNzOdNwudNyudNxudNzudNzP6Lif03F7
0HF70nF70XF703H70HH70nH70XH703G/oOMOoOMOpOOG6LiD6LiD6bhD6Lhf
0nG/ouMOpeMOo+N+TccdTscdQcf9ho77LR33Ozru93TcH+i4P9Jxf6LjjqTj
jqLjjqbjjqHjjqXjjqPjjqfjTqDjTqTjTqLjTqbjTqHjTqXj/kzH/YWOO42O
+ysddzoddwYddyYddxYddzYddw4ddy4ddx4ddz4ddwEd9zc67u903D/ouH/S
cRfScRfRcf+i4/5Nx11Mx11Cx/2HjruUjruMjrucjruCjruSjruKjruajruG
jhtBx11Lx11Hx11Px91Ax91Ix91Ex91Mx91Cx91Kx91Gx91Ox91Bx91Jx91F
x91Nx91Dx91Lx91Hx91Pxz1Axz1Ixz1Exz1Mxz1Cxz1Kxz1Gx/2XjnucjnuC
jnuSjnuKjnuajnuGjnuWjnuOjnuejnuBjnuRjnuJjnuZjnuFjnuVjnuNjnud
jnuDjnuTjnuLjnubjnuHjnuXjnuPjnufjvuAjvuQjvuIjvuYjvuEjvuUjvuM
jvucjvuCjvuSjvuKjv83QId33Ch03Kh03Gh03Oh03Bh03Jh03Fh03Nh03Dh0
3Lh03Hh03Ph03AR03IR03ER03MR03CR03KR03GR03OR03BR03JR03FR03NR0
3DR03LR03HR03PR03Ax03Ix03Ex03Mx03Cx03Kx03Gx03Ox03Bx03Jx03Fx0
3Nx03Dx03Lx03Hx03Px03AJ03IJ03EJ03MJ03CJ03KJ03GJ03OJ03BJ03JJ0
3FJ03NJ03DJ03LJ03HJ03PJ03Ap03Ip03Ep03Mp03Cp03Kp03DfouNXouG/S
cavTcd+i49ag49ak49ai49am49ah49al49aj49an475Nx21Ax21Ix21Ex21M
x21Cx32HjvsuHbcpHbcZHbc5Hfc9Ou77dNwP6Lgt6Lgt6bit6Lit6bht6Lht
6bgf0nHb0XE/ouN+TMdtT8ftQMf9hI7bkY7biY77KR23Mx23Cx23Kx23Gx23
Ox33Mzru53TcHnTcnnTcXnTc3nTcPnTcvnTcfnTc/nTcL+i4A+i4A+m4ITru
IDruYDruEDrul3Tcr+i4Q+m4w+i4X9Nxh9NxR9Bxv6HjfkvH/Y6O+z0d9wc6
7o903J/ouCPpuKPouKPpuGPouGPpuOPouOPpuBPouBPpuJPouJPpuFPouFPp
uD/TcX+h406j4/5Kx51Ox51Bx51Jx51Fx51Nx51Dx51Lx51Hx51Px11Ax/2N
jvs7HfcPOu6fdNyFdNxFdNy/6Lh/03EX03GX0HH/oeMupeMuo+Mup+OuoOOu
pOOuouOupuOuoeNG0HHX0nHX0XHX03E30HE30nE30XE303G30HG30nG30XG3
03F30HF30nF30XF303H30HH30nH30XH303EP0HEP0nEP0XEP03GP0HGP0nGP
0XH/peMep+OeoOOepOOeouOepuOeoeOepeOeo+Oep+NeoONepONeouNepuNe
oeNepeNeo+Nep+PeoOPepOPeouPepuPeoePepePeo+Pep+M+oOM+pOM+ouM+
puM+oeM+peM+o+M+p+O+oOO+pOO+ouP/DcjhHTcKHTcqHTcaHTc6HTcGHTcm
HTcWHTc2HTcOHTcuHTceHTc+HTcBHTchHTcRHTcxHTcJHTcpHTcZHTc5HTcF
HTclHTcVHTc1HTcNHTctHTcdHTc9HTcDHTcjHTcTHTczHTcLHTcrHTcbHTc7
HTcHHTcnHTcXHTc3HTcPHTcvHTcfHTc/HbcAHbcgHbcQHbcwHbcIHbcoHbcY
Hbc4HbcEHbckHbcUHbc0HbcMHbcsHbccHbc8HbcCHbciHbcSHbcyHbcKHbcq
HfcNOm41Ou6bdNzqdNy36Lg16Lg16bi16Li16bh16Lh16bj16Lj16bhv03Eb
0HEb0nEb0XEb03Gb0HHfoeO+S8dtSsdtRsdtTsd9j477Ph33AzpuCzpuSzpu
KzpuazpuGzpuWzruh3TcdnTcj+i4H9Nx29NxO9BxP6HjdqTjdqLjfkrH7UzH
7ULH7UrH7UbH7U7H/YyO+zkdtwcdtycdtxcdtzcdtw8dty8dtx8dtz8d9ws6
7gA67kA6boiOO4iOO5iOO4SO+yUd9ys67lA67jA67td03OF03BF03G/ouN/S
cb+j435Px/2BjvsjHfcnOu5IOu4oOu5oOu4YOu5YOu44Ou54Ou4EOu5EOu4k
Ou5kOu4UOu5UOu7PdNxf6LjT6Li/0nGn03Fn0HFn0nFn0XFn03Hn0HHn0nHn
0XHn03EX0HF/o+P+Tsf9g477Jx13IR13ER33Lzru33TcxXTcJXTcf+i4S+m4
y+i4y+m4K+i4K+m4q+i4q+m4a+i4EXTctXTcdXTc9XTcDXTcjXTcTXTczXTc
LXTcrXTcbXTc7XTcHXTcnXTcXXTc3XTcPXTcvXTcfXTc/XTcA3Tcg3TcQ3Tc
w3TcI3Tco3TcY3Tcf+m4x+m4J+i4J+m4p+i4p+m4Z+i4Z+m45+i45+m4F+i4
F+m4l+i4l+m4V+i4V+m41+i41+m4N+i4N+m4t+i4t+m4d+i4d+m49+i49+m4
D+i4D+m4j+i4j+m4T+i4T+m4z+i4z+m4L+i4L+m4r+j4fwNweMeNQseNSseN
RseNTseNQceNSceNRceNTceNQ8eNS8eNR8eNT8dNQMdNSMdNRMdNTMdNQsdN
SsdNRsdNTsdNQcdNScdNRcdNTcdNQ8dNS8dNR8dNT8fNQMfNSMfNRMfNTMfN
QsfNSsfNRsfNTsfNQcfNScfNRcfNTcfNQ8fNS8fNR8fNT8ctQMctSMctRMct
TMctQsctSsctRsctTsctQcctScctRcctTcctQ8ctS8ctR8ctT8etQMetSMet
RMetTMetQset+v/9/wAh+zro
        "]]},
      AspectRatio->0.7,
      Axes->True,
      AxesOrigin->{0, 0},
      Frame->True,
      FrameLabel->{
        FormBox[
         StyleBox[
         "\"5-min Steps\"", FontSize -> 12, Italic, Bold, StripOnInput -> 
          False], TraditionalForm], 
        FormBox[
         StyleBox[
         "\"Equity ($)\"", FontSize -> 12, Italic, Bold, StripOnInput -> 
          False], TraditionalForm]},
      ImageSize->500,
      LabelStyle->{
        Directive[
         GrayLevel[0], 10], FontFamily -> "Calibri"},
      PlotLabel->FormBox[
        StyleBox[
        "\"Equity Curve\"", FontSize -> 15, Italic, Bold, StripOnInput -> 
         False], TraditionalForm],
      PlotRangeClipping->True], {266.6666666666667, -183.75}, 
     ImageScaled[{0.5, 0.5}], {500, 350.}], InsetBox[
     GraphicsBox[
      {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxc3X981dPjOPArySSZJJNkkkySSTJJriSTZDKZJFeSSTJJJsmVySSZJJPk
SjJJJskkuZJMkkkySSbJJJkk07t3vo/vZ6/7fjzu8/zzejwf5557zut1zuu8
fp7zOmHo7QNuahQKhYoyQ6H/v2wIdeeHkkM4mSk4FbfEabgNTsftcHvcAWfg
jrgT7owz8Rm4Cz4Td8Vn4W74bJyFz8Hd8bm4Bz4P98Tn43Cyozh0QYPDveIN
8TjUi3gcupB4HOpNPA5d1ODIVUE8DvUhHocuDnxtEI9D2cQH/l+4JNlRHOpL
PA5dSjwO9SMehy4jHof6E49DlxOPQznJDuMojiecFW9YXpHsMI7ieMJnB+kH
JDuMoziOQ1eSHkdxHIdySY+jOI5DV5EeR3EchwaSHkdxPOFEuDrZYRzFcRzK
Iz2O4jgOXUN6HMVxHBpEehzFcRy6lvQ4iuM4NJj0OIrjOHRdg6PZ8Yb0OIrj
ODSE9DiK4zh0PelxFMdxKJLsdBwOnGh/ERzFsYS7BfnhGhy6IdnpOJxwECI4
imM4jmtwaGiy03EYR3AUx3Ac1+DQjeSPwziCoziG47gGh4Y1+H/1j8M4gqM4
huO4BoduIn8cDhweEOSPoziG47gm8f9DgvyHJzs9cHhokD+O4CiO4TiuwaGb
k52OwziCo4Hrbgnyx3FcE7iqIMg/P9npgcvGBPnjSOBoYZA/juE4rsGhW5Kd
jsM4gqM4huOBs+4J8sehEclOx2EcwVEcw3FcE7gukf+tyU7HYRzBURzDcVyD
QyPJH4dxBEcDJ0IMx3ENDt2W7HQcxhEcxTEcD/y//geHRiU7fRT54wiO4ljg
xPVLHNfg0O3JTsdhHMHR28kfx3ENDhUkOxWn48zA8f5B+XAOjuACHMUlOIbL
A/+vf8dVuAbX4dAdyU69I3l903EmDuMcHMEFOIpLcAyX4ziuwjW4DodGJzsV
p+NMHMY5OIILcBSX4Bgux3FchWsCJ9pPHQ7dmezUhBPnAzgTh3FO4LobGxzB
BTgaOHZrg0twDJfjOK4KXBJpcA2uw6ExyU7F6TgTh3EOjuACHMUlOIbLA4fz
GxzHVbgG1+HQXclOxek4E4dxDo7gAhzFJTiGy3EcVwWuGtngGlyHQ2OTnYrT
cSYO45zAocT64wIcxSU4hstxHFfhGlyHQ3cnOxWn40wcxjk4ggtwFJfgGC7H
cVyFa3AdDhUmOxWn40wcxjk4ggtwFJfgGC7HcVyFa3AdDt2T7NTA5bc3OB1n
4jDOwZGE72xwAY7iksDFdzc4hstxPHDk3gZX4Rpch0Pjkp2K03EmDuMcHMEF
OIpLAqcG/UkMl+M4rsI1uA6H7k12Kk7HmTiMc3AEF+AoLsExXI7jgWvuaHAV
rsF1ODQ+2ak4HWcGrrirwWGcgyOB00c0uABHcQmO4XIcx1W4Btfh0H3JTg0c
7drgdJyJwzgHRxLObXABjuKSwIkQw+U4jqtwDa7DoQnJTsXpOBOHcQ6O4AIc
xSU4hstxHFfhGlyHQ/cnOxWn40wcxjk4ggtwFJfgGC7HcVwVOHE9U4PrcCia
7BScitNweuBY8Pw0A2fiLBzG2TgH5+EIzscFuDBweuJ5MS7GJbgUx3BZYvuE
G1yOK3A8cCJU4ipcjWtwLa7D9dRf6IFkp+BUnIbTcQbOxFk4jLNxDs7DEZyP
C3AhjuJiXIJLAyfaUwyX4XJcgeO4ElfhalyDa3Fd4MT9hnocmpjsFJyK03A6
zsCZOAuHcTbOwXk4EjgR8nEBLsRRXIxLcCmO4TJcjitwHFcGTtyPrsLVuAbX
4jpcj0MPJjsFp+I0nI4zEs5rcCbOwmGcjXNwHo7gfFwQOBTc3y3E0cDxKxpc
jEtwKY7hMlyOK3A8UZ4gVOIqXI1rcC31UYfrcago2Sk4Fafh9ISD7Z2BM3EW
DuNsnIPzcATn4wJciKO4GJfgUhzDZbgcV+A4rsRVuBrX4Fpch+tx6KFkp+BU
nIbTcQbOxFk4jLNxDs7DEZyPC3AhjuJiXIJLcQyX4XJcgeO4ElfhalyDa3Ed
rsehSclOwak4DafjDJyJs3AYZ+McnIcjOB8X4EIcxcW4BJfiGC7D5bgCx3El
rsLVuAbX4jpcj0MPJzsFp+I0nI4zcCbOwmGcjXNwHo7gfFyAC3EUF+MSXIpj
uAyX4wocx5W4ClfjGlyL63A9DhUnOwWn4jScjjNwJs7CYZyNc3AejuB8XIAL
cRQX4xJcimO4DJfjChzHlbgKV+MaXIvrcD0OPZLsFJyK03A6zsCZOAuHcTbO
wXk4gvNxAS7EUVyMS3ApjuEyXI4rcBxX4ipcjWtwLa7D9Tg0OdkpOBWn4XSc
gTNxFg7jbJyD83AE5+MCXIijuBiX4FIcw2W4HFfgOK7EVbga1+BaXIfrcejR
ZKfgVJyG03EGzsRZOIyzcQ7OwxGcjwtwIY7iYlyCS3EMl+FyXIHjuBJX4Wpc
g2txHa7HoSnJTsGpOA2n4wycibNwGGfjHJyHIzgfF+BCHMXFuASX4hguw+W4
AsdxJa7C1bgG1+I6XI9DjyU7BafiNJyOM3AmzsJhnI1zcB6O4HxcgAtxFBfj
ElyKY7gMl+MKHMeVuApX4xpci+twPQ5NTXYKTsVpOB1n4EychcM4G+fgPBzB
+bgAF+IoLsYluBTHcBkuxxU4jitxFa7GNbgW1+F6HHo82Sk4FafhdJyBM3EW
DuNsnIPzcATn4wJciKO4GJfgUhzDZbgcV+A4rsRVuBrX4Fpch+txqCTZjXEK
boZTcUuchtvgdNweZ+BOOBN3xVm4Bw7j3jgb98M5OBfn4cE4gofhfDwSF+Ax
uBCPx1FchIvxFFyCp+NSPAvH8FxchhfgcrwYV+BlOI5X4kq8Blfh9bgab8I1
eCuuxTtwHd6N6/E+HHoi2Y1xCm4WOBKMP0zFLXEaboPTcXucgTvhTNwVZ+Ee
OIx742zcD+fgXJyHB+MIHobz8UhcgMcEDiX2fzweR3FRwkEoxlNwCZ6OS/Es
HMNzcRlegMvxYlyBl+E4XokrE86K/99iDa7C63E13oRr8FZci3fguoSD5/G7
cT3eh0PTkt0Yp+BmOBW3xGkJB+P52+B03D5w4v2IDNwJZ+KuOAv3wOGEr25w
b5wdOBq4H84JXHNDg3NxXmL9gvEFg3EED8P5eGTi/29ucAEegwsT6Uc1eDyO
4iJcjKfgEjwdl+JZOIbn4jK8AJfjxbgCL8PxwKmjG7wSV+I1uCpwZFiD1+Nq
vAnX4K24Fu/AdXg3rsf7cOjJZDfGKbgZTsUtcRpuEzg0uMHpuH3g9OD3GbgT
zkw4aO9dcRbugcO4N87G/XBO4PBtDc7FeXgwjuBhOB+PxAV4DC7E43EUF+Fi
PCVwPDFeAU/HpXgWjuG5uAwvwOV4Ma7Ay3Acr8SVeA2uwutxdeBoMH51E67B
W3Ft4NjwBu/AdXg3rsf7EuVLjH+anuzGOAU3w6m4JU7DbXB64IJgfFF7nIE7
4UzcFWfhHjiMe+PswHVBf98P5+DcwKGxDc7Dg3EEDwucGsyvkY9H4gI8Bhfi
8YFzgvlcorgIF+MpgcOBS/B0XIpnJbZXYnw3novL8ILA0ZsaXI4X4wq8DMfx
SlyJ1+CqRPmGN3g9rsabAqcn5gPCW3Et3hG4JHj/vQ7vxvV4Hw49lezGOAU3
CxwO5htIxS1xGm6D03F7nIE74UzcFWfhHjiMe+Ns3A/n4FychwfjCB6G8/FI
XIDH4EI8HkdxES7GU3AJno5L8Swcw3NxGV6Ay/FiXIGX4TheiSvxGlyF1+Nq
vAnX4K24Fu/AdXg3rsf7cGhGshvjFNwMp+KWOA23wem4Pc7AnXAm7oqzcA8c
xr1xNu6Hc3AuzsODcQQPw/l4JC7AY3AhHo+juAgX4ym4BE/HpXgWjuG5uAwv
wOV4Ma7Ay3Acr8SVeA2uwutxNd6Ea/BWXIt34Dq8G9fjfTj0dLIb4xTcDKfi
ljgNt8HpuD3OwJ1wJu6Ks3APHMa9cTbuh3NwLs7Dg3EED8P5eCQuwGNwIR6P
o7gIF+MpuARPx6V4Fo7hubgML8DleDGuwMtwHK/ElXgNrsLrcTXehGvwVlyL
d+A6vBvX4304VJrsxjglcGFwPdwMp+KWgWPB/e803Aan4/Y4A3fCmbgrzsI9
cBj3xtm4X+CcYD7VHJyL8/BgHMHDcD4eiQvwGFyIx+MoLsLFeAouCZwI03Ep
noVjeC4uwwtwOV6MK/AyHMcrcWXCJ8f/b7EGV+H1uBpvwjV4K67FO3Ad3o3r
8T4ceibZjXEKboZTcUuchtvgdNweZ+BOOBN3xVm4Bw7j3jgb98M5OBfn4cE4
gofhfDwSF+AxuBCPx1FchIvxFFyCp+NSPAvH8FxchhfgcrwYV+BlOI5X4kq8
Blfh9bgab8I1eCuuxTtwHd6N6/E+HJqZ7MY4BTfDqbglTsNtcDpujzNwJ5yJ
u+Is3AOHcW+cjfvhHJyL8/BgHMHDcD4eiQvwGFyIx+MoLsLFeAouwdNxKZ6F
Y3guLsMLcDlejCvwMhzHK3ElXoOr8HpcjTfhGrwV1+IduA7vxvV4Hw49m+zG
OAU3w6m4JU7DbXA6bo8zcCecibviLNwDh3FvnI374Ryci/PwYBzBw3A+HokL
8BhciMfjKC7CxXgKLsHTcSmehWN4Li7DC3A5Xowr8DIcxytxJV6Dq/B6XI03
4Rq8FdfiHbgO78b1eB8OzUp2Y5yCm+FU3BKn4TY4HbfHGbgTzsRdcRbugcO4
N87G/XAOzsV5eDCO4GE4H4/EBXgMLsTjcRQX4WI8BZfg6bgUz8IxPBeX4QW4
HC/GFXgZjuOVuBKvwVV4Pa7Gm3AN3opr8Q5ch3fjerwPh55LdmOcgpvhVNwS
p+E2OB23xxm4E87EXXEW7oHDuDfOxv1wDs7FeXgwjuBhOB+PxAV4DC7E43EU
F+FiPAWX4Om4FM/CMTwXl+EFuBwvxhV4GY7jlbgSr8FVeD2uxptwDd6Ka/EO
XId343q8D4dmJ7sxTsHNcCpuidNwG5yO2+MM3Aln4q44C/fAYdwbZ+N+OAfn
4jw8GEfwMJyPR+ICPAYX4vE4iotwMZ6CS/B0XIpn4Riei8vwAlyOF+MKvAzH
8UpcidfgKrweV+NNuAZvxbV4B67Du3E93odDzye7MU7BzXAqbonTcBucjtvj
DNwJZ+KuOAv3wGHcG2fjfjgH5+I8PBhH8DCcj0fiAjwGF+LxOIqLcDGegkvw
dFyKZ+EYnovL8AJcjhfjCrwMx/FKXInXBP7f9+bwelyNN+EavBXX4h24Du/G
9XgfDsWS3Qg3DpwITXAKboqb4eY4FbfALXErnIZb4za4LU7H7XB73AFn4I64
E+6MM3EX3BV3w1m4O+6Bewb+3/z7uFfi9yc1uDfug7P5/764H+6Pc/AAnIsH
4jw8CA/GQ3AED8XD8HCcj0fgkXgULsCj8Rg8FhficXg8noCjeCIuwpNwMZ6M
p+CpuARPw9PxDFyKZ+JZeDaO4Tl4Lp6Hy/B8vAAvxOV4EV6Ml+AKvBQvw8tx
HK/AK/EqXIlX4zV4La7C6/B6vAFX4414E96Ma/AWvBVvw7V4O96Bd+I6vAvv
xntwPd6L9+H9OPRCshvhxrgJTsFNcTPcHKfiFrglboXTcGvcBrfF6bgdbo87
4AzcEXfCnXEm7oK74m44C3fHPXBPHA78v+M/7o37kD4b98X9cH+cgwfgXDwQ
5+FBeDAegiN4KB6Gh+N8PAKPxKNwAR6Nx+CxuBCPw+PxBBzFE3ERnoSL8WQ8
BU/FJXgano5n4FI8E8/Cs3EMz8Fz8TxchufjBXghLseL8GK8BFfgpXgZXo7j
eAVeiVfhSrwar8FrcRVeh9fjDbgab8Sb6L824xq8BW9NOPi+9zZcGzjx/bft
eAfeievwLrwb78H1eC/eh/fj0JxkN8KNcROcgpviZrg5TsUtcEvcCqfh1rgN
bovTcTvcHnfAGbhj4HBivjLcOXBd8P58Ju4SuKqgwV1xN5yFu+MeuCcO4164
N+6Ds3Ff3C9wtGeD++McPADn4oE4Dw/Cg/EQHMFDA4eC+Z2G4eGBU4P5CPLx
CDwSj8IFeDQeg8fiQjwOj8cTAsdvbnAUT8RFeBIuDhy7vsGT8RQ8FZfgaXg6
nhG4KtifSvFMPAvPxjE8J3A0+B7wXDwPl+H5eAFeiMvxIrwYL8EVeClehpfj
OF4RuC4xHg6vwpV4NV6D1+IqvA6vxxtwNd6IN+HNuCZwOOivtuCteFvg+sC1
eDvegXfiusBVwfwou/BuvAfX4714H94fuCSY/yz0YrIb4ca4CU7BTXEz3Byn
4ha4JW4VuCYxvxBujdvgtjgdt8PtcYfAVYnxibgj7oQ740zcBXfF3XAW7o57
4J44jHvh3rgPzsZ9cT/cP3A0MX4SD8C5eCDOw4PwYDwER/BQPAwPx/l4BB6J
R+ECPBqPwWNxIR6Hx+MJOIon4iI8CRfjyXgKnopL8DQ8Hc/ApXgmnoVn4xie
g+fiebgMz8cL8EJcjhfhxXgJrsBL8TK8HMfxCrwycGlwvFqFKwMXBMeX1XgN
XourAmcXNngdXo834Gq8MXDokgZvwptxTcJB2IK34m24Fm/HO/BOXId3BQ73
aijfbrwH1+O9eB/eHziSuP6fm+xGuHHCwflxE5yCmwZOzK/bDDfHqbgFbolb
4TTcGrfBbXE6bofbBw61bXAHnJFwEDriTrgzzsRdcFfcDWfh7rgH7onDuBfu
jfvgbNwX9wucaH/9cQ4egHP5v4E4Dw/Cg/EQHMFD8TA8HOfjEXgkHoUL8OhE
+wvuP47BY3EhHofH4wk4iifiIjwJF+PJeArrNxWX4Gl4Op6BS/FMPAvPpnwx
PAfPxfMS/xfMb16G5+MFeCEux4vwYrwkcOJ+YwVeipfh5Yn1CTc4jlfglXgV
rsSr8Rq8FlfhdXg93oCr8Ua8CW9OOLifV4O34K14G67F2/EOvBPX4V14N96D
6/FevA/vZ38IvZTsRrgxbhI40T+n4KaJ35/d4Ga4OU7FLXBL3Aqn4daJ8lzQ
4Da4LU5PpA++f9EOt8cdcAbuiDvhzjgTd8FdA5cH8692w1m4O+6Be+Iw7oV7
4z44G/cNHEnMl4b74xw8AOfigTgvcE6kwYPw4MDx4P7DEBzBQ/EwPBzn4xF4
JB6FC/BoPAaPxYV4HB6PJ+AonoiLAhckrv9xMZ6cSH9zg6fgqbgkUZ/XNHga
no5n4FI8E8/Cs3EMz8Fz8Txchucn9t+BDV6AF+JyvAgvxktwBV6Kl+HlOI5X
JOonON9YiVfhSrwar0n42gavxVV4HV6PN+BqvBFvwptxDd6Ct+JtuBZvD1xy
U4N34J24Du/Cu/EeXB84PXh+sxfvw/txaF6yG+HGuAlOwU1xM9wcp+IWuGXg
kqC/b4XTcGvcJnAsmJ+wLU4PnBP8vh1ujzvgDNwRd8KdA0cT3y/AXXBX3C1R
/pwGZ+HugUPB8a8H7onDuBfujfvgbNwX98P9cQ4egHPxQJyHB+HBeAiO4KF4
GB6O8/EIPBKPwgV4NB6Dx+JCPA6PxxNwFE/ERXgSLsaT8RQ8FZfgaXg6noFL
8Uw8C8/GMTwHz8XzcBmejxfghbgcL8KL8RJcgZfiZXg5juMVeCVehSvxarwG
r8VVeB1ejzfgarwRb8KbcQ3egrfibbgWb8c78E5ch3fh3XgPrsd78T68H4de
TnYj3Bg3wSm4KW6Gm+NU3AK3xK1wGm6N2+C2OB23w+1xB5yBO+JOuDPOxF1w
V9wNZ+HuuAfuicO4F+6N++Bs3Bf3w/1xDh6Ac/FAnIcH4cF4CI7goXgYHo7z
8Qg8Eo/CBXg0HoPH4kI8Do/HE3AUT8RFeBIuxpPxFDwVl+BpeDqegUvxTDwL
z8YxPAfPxfNwGZ6PF+CFuBwvwovxElyBl+JleDmO4xV4JV6FK/FqvAavxVV4
HV6PN+BqvBFvwptxDd6Ct+JtuBZvxzvwTlyHd+HdeA+ux3vxPrwfh8qS3Qg3
xk1wCm6Km+HmOBW3wC1xK5yGW+M2uC1Ox+1we9wBZ+COuBPujDNxF9wVd8NZ
uDvugXviMO6Fe+M+OBv3xf1wf5yDB+BcPBDn4UF4MB6CI3goHoaH43w8Ao/E
o3ABHo3H4LG4EI/D4/EEHMUTcRGehIvxZDwFT8UleBqejmfgUjwTz8KzcQzP
wXPxPFyG5+MFeCEux4vwYrwEV+CleBlejuN4BV6JV+FKvBqvwWtxFV6H1+MN
uBpvxJvwZlyDt+CteBuuxdvxDrwT1+FdeDfeg+vxXrwP78ehV5LdCDfGTXAK
boqb4eY4FbfALXErnIZb4za4LU7H7XB73AFn4I64E+6MM3EX3BV3w1m4O+6B
e+Iw7oV74z44G/fF/XB/nIMH4Fw8EOfhQXgwHoIjeCgehofjfDwCj8SjcAEe
jcfgsbgQj8Pj8QQcxRNxEZ6Ei/FkPAVPxSV4Gp6OZ+BSPBPPwrNxDM/Bc/E8
XIbn4wV4IS7Hi/BivARX4KV4GV6O43gFXolX4Uq8Gq/Ba3EVXofX4w24Gm/E
m/BmXIO34K14G67F2/EOvBPX4V14N96D6/FevA/vx6H5yW6EG+MmOAU3xc1w
c5yKW+CWuBVOw61xG9wWp+N2uD3ugDNwR9wJd8aZuAvuirvhLNwd98A9cRj3
wr1xH5yN++J+uD/OwQNwLh6I8/AgPBgPwZHA5cH7aEPxsMCR2xs8HOfjEYGL
72zwSDwKF+DReAweiwvxODweT8BRPBEX4Um4GE/GU/BUXIKn4el4Bi5N1GcQ
ZuJZeDaO4Tl4Lp6Hy/B8vAAvxOV4EV4cODH+YAmuwEvxMrw84WD+mjhegVfi
VbgSr8Zr8Fpchdfh9XgDrg6cGuyvG/EmvBnX4C14K96Ga/F2vAPvTPQXiff/
8C68G+/B9Xgv3of3J8pzW4NDrya7EW6Mm+AU3DRwZHSDm+HmODVw1tgGt8At
cSuchlvjNrgtTsftcHvcAWfgjrgT7owzcRfcFXfDWbg77oF74jDuhXvjPon6
HtfgbNwX9wucN77B/XEOHoBz8UCchwfhwXgIjuChgevuafAwPBzn4xF4JB6F
C/BoPAaPxYV4HB6PJ+AonoiL8CRcjCfjKXgqLsHT8HQ8A5fimXgWno1jgSvv
a/AcPBfPw2V4fuDs+xu8AC9M/D7a4HK8KPCOBxq8GC/BFYErgvRL8TK8PPCm
IH0cr8Ar8arAiVCJV+M1eC2uwuvwerwBV+ONeBPejGvwFrwVb8O1eDvegXfi
OrwL78Z7AifO5+rxXrwP7084OH8KLUh2I9wYNwlcd2ODU3DTwLHgffdmuDlO
xS1wS9wKp+HWuE3gxPi0tjg9sX7XNbgdbo874AzcEXfCnXEm7oK74m44C3fH
PXBPHA6cCL1wb9wHZ+O+uB/uj3PwAJyLB+I8PAgPxkNwBA/Fw/BwnI9H4JF4
FC7Ao/EYPBYX4nF4fKK+g/1/Ao7iiaQvwpNwMZ6Mp+CpuCThkxvyn4an4xm4
FM/Es/BsHMNz8Fw8D5fh+XgBXojL8aKEg/HMi/ESXIGX4mV4OY7jFYET8wWs
xKtwZeDE/Kar8Rq8FlfRHtbh9XgDrsYb8Sa8GdfgLXgr3oZr8Xa8A+/EdXgX
3o334Hq8F++jfe3HodeS3Sjw/77/g5vgFNwUN8PNE/l1a3AqboFb4lY4DbfG
bRI+ocFtcTpuh9vjDjgjcDSYL6gj7oQ740zcBXfF3XAW7o574J44jHvh3rgP
zsZ9cT/cH+fgATgXD8R5eBAejIfgCB6Kh+HhOB+PwCPxKFyAR+MxeCwuxOPw
eDwBR/FEXIQn4WI8GU/BU3EJnoan4xm4FM/Es/BsHMNz8Fw8D5fh+XgBXojL
8SK8GC/BFXgpXoaX4zhegVfiVbgSr8Zr8Fpchdfh9XgDrsYb8Sa8GdfgLXgr
3oZr8Xa8A+/EdXgX3o334Hq8F+/D+3FoYbIb4ca4CU7BTXEz3Byn4ha4JW6F
03Br3Aa3xem4HW6PO+AM3BF3wp1xJu6Cu+JuOAt3xz1wTxzGvXBv3Adn4764
H+6Pc/AAnIsH4jw8CA/GQ3AED8XD8HCcj0fgkXgULsCj8Rg8FhficXg8noCj
eCIuwpNwMZ6Mp+CpuARPw9PxDFyKZ+JZeDaO4Tl4Lp6Hy/B8vAAvxOV4EV6M
l+AKvBQvw8txHK/AK/EqXIlX4zV4La7C6/B6vAFX4414E96Ma/AWvBVvw7V4
O96Bd+I6vAvvxntwPd6L9+H9OPR6shvhxrgJTsFNcTPcHKfiFrglboXTcGvc
BrfF6bgdbo874AzcEXfCnXEm7oK74m44C3fHPXBPHMa9cG/cB2fjvrgf7o9z
8ACciwfiPDwID8ZDcAQPxcPwcJyPR+CReBQuwKPxGDwWF+JxeDyegKN4Ii7C
k3Axnoyn4Km4BE/D0/EMXIpn4ll4No7hOXgunofL8Hy8AC/E5XgRXoyX4Aq8
FC/Dy3Ecr8Ar8SpciVfjNXgtrsLr8Hq8AVfjjXgT3oxr8Ba8FW/DtXg73oF3
4jq8C+/Ge3A93ov34f04VJ7sA3AjfCBujA/CTfDBOAUfgpviQ3EzfBhujg/H
qfgI3AIfiVvio3ArfDROw8fg1vhY3AYfh9vi43E6PgG3wyfi9vgk3AGfjDPw
KbgjPhV3wqfhzvh0nInPwF3wmbgrPgt3w2fjLHwO7o7PxT3webgnPh+H8QW4
F74Q98YX4T74YpyNL8F98aW4H74M98eX4xx8BR6Ar8S5+Co8EF+N8/A1eBC+
Fg/G1+Eh+HocwTfgofhGPAzfhIfjm3E+vgWPwLfikfg2PArfjgvwHXg0vhOP
wXfhsfhuXIjvwePwvXg8vg9PwPfjKH4AT8QP4iL8EJ6EH8bF+BE8GT+Kp+DH
8FT8OC7BT+Bp+Ek8HT+FZ+CncSl+Bs/Ez+JZ+Dk8Gz+PY/gFPAe/iOfil/A8
/DIuw6/g+fhVvAC/hhfi13E5fgMvwm/ixfgtvAS/jSvwO3gpfhcvw+/h5fh9
HMcf4BX4Q7wSf4RX4Y9xJf4Er8af4jX4M7wWf46r8Bd4Hf4Sr8df4Q34a1yN
v8Eb8bd4E/4Ob8bf4xr8A96Cf8Rb8U94G/4Z1+Jf8Hb8K96Bf8M78e+4Dv+B
d+E/8W78F96D/8b1+B+8F/8H78P/xfvxvzj0RrIPwI3wgbgxPgg3wQfjFHwI
booPxc3wYbg5Phyn4iNwC3wkbomPwq3w0TgNH4Nb42NxG3wcbouPx+n4BNwO
n4jb45NwB3wyzsCn4I74VNwJn4Y749NxJj4Dd8Fn4q74LNwNn42z8Dm4Oz4X
98Dn4Z74fBzGF+Be+ELcG1+E++CLcTa+BPfFl+J++DLcH1+Oc/AVeAC+Eufi
q/BAfDXOw9fgQfhaPBhfh4fg63EE34CH4hvxMHwTHo5vxvn4FjwC34pH4tvw
KHw7LsB34NH4TjwG34XH4rtxIb4Hj8P34vH4PjwB34+j+AE8ET+Ii/BDeBJ+
GBfjR/Bk/Ciegh/DU/HjuAQ/gafhJ/F0/BSegZ/GpfgZPBM/i2fh5/Bs/DyO
4RfwHPwinotfwvPwy7gMv4Ln41fxAvwaXohfx+X4DbwIv4kX47fwEvw2rsDv
4KX4XbwMv4eX4/dxHH+AV+AP8Ur8EV6FP8aV+BO8Gn+K1+DP8Fr8Oa7CX+B1
+Eu8Hn+FN+CvcTX+Bm/E3+JN+Du8GX+Pa/APeAv+EW/FP+Ft+Gdci3/B2/Gv
eAf+De/Ev+M6/Afehf/Eu/FfeA/+G9fjf/Be/B+8D/8X78f/4tCiZB+AG+ED
cWN8EG6CD8Yp+BDcFB+Km+HDcHN8OE7FR+AW+EjcEh+FW+GjcRo+BrfGx+I2
+DjcFh+P0/EJuB0+EbfHJ+EO+GScgU/BHfGpuBM+DXfGp+NMfAbugs/EXfFZ
uBs+G2fhc3B3fC7ugc/DPfH5OIwvwL3whbg3vgj3wRfjbHwJ7osvxf3wZbg/
vhzn4CvwAHwlzsVX4YH4apyHr8GD8LV4ML4OD8HX4wi+AQ/FN+Jh+CY8HN+M
8/EteAS+FY/Et+FR+HZcgO/Ao/GdeAy+C4/Fd+NCfA8eh+/F4/F9eAK+H0fx
A3gifhAX4YfwJPwwLsaP4Mn4UTwFP4an4sdxCX4CT8NP4un4KTwDP41L8TN4
Jn4Wz8LP4dn4eRzDL+A5+EU8F7+E5+GXcRl+Bc/Hr+IF+DW8EL+Oy/EbeBF+
Ey/Gb+El+G1cgd/BS/G7eBl+Dy/H7+M4/gCvwB/ilfgjvAp/jCvxJ3g1/hSv
wZ/htfhzXIW/wOvwl3g9/gpvwF/javwN3oi/xZvwd3gz/h7X4B/wFvwj3op/
wtvwz7gW/4K341/xDvwb3ol/x3X4D7wL/4l347/wHvw3rsf/4L34P3gf/i/e
j//FoTeTfQBuhA/EjfFBuAk+GKfgQ3BTfChuhg/DzfHhOBUfgVvgI3FLfBRu
hY/GafgY3Bofi9vg43BbfDxOxyfgdvhE3B6fhDvgk3EGPgV3xKfiTvg03Bmf
jjPxGbgLPhN3xWfhbvhsnIXPwd3xubgHPg/3xOfjML4A98IX4t74ItwHX4yz
8SW4L74U98OX4f74cpyDr8AD8JU4F1+FB+KrcR6+Bg/C1+LB+Do8BF+PI/gG
PBTfiIfhm/BwfDPOx7fgEfhWPBLfhkfh23EBvgOPxnfiMfguPBbfjQvxPXgc
vhePx/fhCfh+HMUP4In4QVyEH8KT8MO4GD+CJ+NH8RT8GJ6KH8cl+Ak8DT+J
p+On8Az8NC7Fz+CZ+Fk8Cz+HZ+PncQy/gOfgF/Fc/BKeh1/GZfgVPB+/ihfg
1/BC/Doux2/gRfhNvBi/hZfgt3EFfgcvxe/iZfg9vBy/j+P4A7wCf4hX4o/w
KvwxrsSf4NX4U7wGf4bX4s9xFf4Cr8Nf4vX4K7wBf42r8Td4I/4Wb8Lf4c34
e1yDf8Bb8I94K/4Jb8M/41r8C96Of8U78G94J/4d1+E/8C78J96N/8J78N+4
Hv+D9+L/4H34v3g//heHFif7ANwIH4gb44NwE3wwTsGH4Kb4UNwMH4ab48Nx
Kj4Ct8BH4pb4KNwKH43T8DG4NT4Wt8HH4bb4eJyOT8Dt8Im4PT4Jd8An4wx8
Cu6IT8Wd8Gm4Mz4dZ+IzcBd8Ju6Kz8Ld8Nk4C5+Du+NzcQ98Hu6Jz8dhfAHu
hS/EvfFFuA++GGfjS3BffCnuhy/D/fHlOAdfgQfgK3EuvgoPxFfjPHwNHoSv
xYPxdXgIvh5H8A14KL4RD8M34eH4ZpyPb8Ej8K14JL4Nj8K34wJ8Bx6N78Rj
8F14LL4bF+J78Dh8Lx6P78MT8P04ih/AE/GDuAg/hCfhh3ExfgRPxo/iKfgx
PBU/jkvwE3gafhJPx0/hGfhpXIqfwTPxs3gWfg7Pxs/jGH4Bz8Ev4rn4JTwP
v4zL8Ct4Pn4VL8Cv4YX4dVyO38CL8Jt4MX4LL8Fv4wr8Dl6K38XL8Ht4OX4f
x/EHeAX+EK/EH+FV+GNciT/Bq/GneA3+DK/Fn+Mq/AVeh7/E6/FXeAP+Glfj
b/BG/C3ehL/Dm/H3uAb/gLfgH/FW/BPehn/GtfgXvB3/infg3/BO/Duuw3/g
XfhPvBv/hffgv3E9/gfvxf/B+/B/8X78Lw69lewDcCN8IG6MD8JN8ME4BR+C
m+JDcTN8GG6OD8ep+AjcAh+JW+KjcCt8NE7Dx+DW+FjcBh+H2+LjcTo+AbfD
J+L2+CTcAZ+MM/ApuCM+FXfCp+HO+HScic/AXfCZuCs+C3fDZ+MsfA7ujs/F
PfB5uCc+H4fxBbgXvhD3xhfhPvhinI0vwX3xpbgfvgz3x5fjHHwFHoCvxLn4
KjwQX43z8DV4EL4WD8bX4SH4ehzBN+Ch+EY8DN+Eh+ObcT6+BY/At+KR+DY8
Ct+OC/AdeDS+E4/Bd+Gx+G5ciO/B4/C9eDy+D0/A9+MofgBPxA/iIvwQnoQf
xsX4ETwZP4qn4MfwVPw4LsFP4Gn4STwdP4Vn4KdxKX4Gz8TP4ln4OTwbP49j
+AU8B7+I5+KX8Dz8Mi7Dr+D5+FW8AL+GF+LXcTl+Ay/Cb+LF+C28BL+NK/A7
eCl+Fy/D7+Hl+H0cxx/gFfhDvBJ/hFfhj3El/gSvxp/iNfgzvBZ/jqvwF3gd
/hKvx1/hDfhrXI2/wRvxt3gT/g5vxt/jGvwD3oJ/xFvxT3gb/hnX4l/wdvwr
3oF/wzvx77gO/4F34T/xbvwX3oP/xvX4H7wX/wfvw//F+/G/OLQk2QfgRvhA
3BgfhJvgg3EKPgQ3xYfiZvgw3BwfjlPxEbgFPhK3xEfhVvhonIaPwa3xsbgN
Pg63xcfjdHwCbodPxO3xSbgDPhln4FNwR3wq7oRPw53x6TgTn4G74DNxV3wW
7obPxln4HNwdn4t74PNwT3w+DuMLcC98Ie6NL8J98MU4G1+C++JLcT98Ge6P
L8c5+Ao8AF+Jc/FVeCC+Gufha/AgfC0ejK/DQ/D1OIJvwEPxjXgYvgkPxzfj
fHwLHoFvxSPxbXgUvh0X4DvwaHwnHoPvwmPx3bgQ34PH4XvxeHwfnoDvx1H8
AJ6IH8RF+CE8CT+Mi/EjeDJ+FE/Bj+Gp+HFcgp/A0/CTeDp+Cs/AT+NS/Aye
iZ/Fs/BzeDZ+HsfwC3gOfhHPxS/hefhlXIZfwfPxq3gBfg0vxK/jcvwGXoTf
xIvxW3gJfhtX4HfwUvwuXobfw8vx+ziOP8Ar8Id4Jf4Ir8If40r8CV6NP8Vr
8Gd4Lf4cV+Ev8Dr8JV6Pv8Ib8Ne4Gn+DN+Jv8Sb8Hd6Mv8c1+Ae8Bf+It+Kf
8Db8M67Fv+Dt+Fe8A/+Gd+LfcR3+A+/Cf+Ld+C+8B/+N6/E/eC/+D96H/4v3
439x6O1kH4Ab4QNxY3wQboIPxin4ENwUH4qb4cNwc3w4TsVH4Bb4SNwSH4Vb
4aNxGj4Gt8bH4jb4ONwWH4/T8Qm4HT4Rt8cn4Q74ZJyBT8Ed8am4Ez4Nd8an
40x8Bu6Cz8Rd8Vm4Gz4bZ+FzcHd8Lu6Bz8M98fk4jC/AvfCFuDe+CPfBF+Ns
fAnuiy/F/fBluD++HOfgK/AAfCXOxVfhgfhqnIevwYPwtXgwvg4PwdfjCL4B
D8U34mH4Jjwc34zz8S14BL4Vj8S34VH4dlyA78Cj8Z14DL4Lj8V340J8Dx6H
78Xj8X14Ar4fR/EDeCJ+EBfhh/Ak/DAuxo/gyfhRPAU/hqfix3EJfgJPw0/i
6fgpPAM/jUvxM3gmfhbPws/h2fh5HMMv4Dn4RTwXv4Tn4ZdxGX4Fz8ev4gX4
NbwQv47L8Rt4EX4TL8Zv4SX4bVyB38FL8bt4GX4PL8fv4zj+AK/AH+KV+CO8
Cn+MK/EneDX+FK/Bn+G1+HNchb/A6/CXeD3+Cm/AX+Nq/A3eiL/Fm/B3eDP+
HtfgH/AW/CPein/C2/DPuBb/grfjX/EO/BveiX/HdfgPvAv/iXfjv/Ae/Deu
x//gvfg/eB/+L96P/8WhimQfgBvhA3FjfBBugg/GKfgQ3BQfipvhw3BzfDhO
xUfgFvhI3BIfhVvho3EaPga3xsfiNvg43BYfj9PxCbgdPhG3xyfhDvhknIFP
wR3xqbgTPg13xqfjTHwG7oLPxF3xWbgbPhtn4XNwd3wu7oHPwz3x+TiML8C9
8IW4N74I98EX42x8Ce6LL8X98GW4P74c5+Ar8AB8Jc7FV+GB+Gqch6/Bg/C1
eDC+Dg/B1+MIvgEPxTfiYfgmPBzfjPPxLXgEvhWPxLfhUfh2XIDvwKPxnXgM
vguPxXfjQnwPHofvxePxfXgCvh9H8QN4In4QF+GH8CT8MC7Gj+DJ+FE8BT+G
p+LHcQl+Ak/DT+Lp+Ck8Az+NS/EzeCZ+Fs/Cz+HZ+Hkcwy/gOfhFPBe/hOfh
l3EZfgXPx6/iBfg1vBC/jsvxG3gRfhMvxm/hJfhtXIHfwUvxu3gZfg8vx+/j
OP4Ar8Af4pX4I7wKf4wr8Sd4Nf4Ur8Gf4bX4c1yFv8Dr8Jd4Pf4Kb8Bf42r8
Dd6Iv8Wb8Hd4M/4e1+Af8Bb8I96Kf8Lb8M+4Fv+Ct+Nf8Q78G96Jf8d1+A+8
C/+Jd+O/8B78N67H/+C9+D94H/4v3o//xaF3kn0AboQPxI3xQbgJPhin4ENw
U3woboYPw83x4TgVH4Fb4CNxS3wUboWPxmn4GNwaH4vb4ONwW3w8Tscn4Hb4
RNwen4Q7BC6INPhknIFPwR3xqbgTPg13xqfjTHwG7oLPxF3xWbgbPhtn4XNw
d3wu7oHPwz3x+TiML8C9Aoe6NPhC3BtflHAQ+uCLcTa+BPfFl+J++DLcH18e
ON6/obw5+Ao8AF+Jc/FVeCC+Gufha/AgfC0ejK/DQ/D1OIJvwEPxjXgYvgkP
xzfjfHwLHoFvxSPxbXgUvh0X4DvwaHwnHoPvwmPx3bgQ34PH4XvxeHwfnoDv
x1H8AJ6IH8RF+CE8CT+Mi/EjeDJ+FE/Bj+Gp+HFckvCQBj+Bp+En8XT8FJ6B
n8al+Bk8Ez+LZyV8WYOfw7Px84HDQfoYfgHPwS/iuYGrhjf4JTwPv4zL8Ct4
fuDo1Q1+FS+gf38NL8Sv43L8Bl6E38SL8Vt4CX4bV+B38FL8Ll6G38PL8fs4
jj/AK/CHeCX+CK9if/sYV+JPaN+r8ad4Df4Mr8WfB06/qsFV+Au8Dn+J1+Ov
8Ab8dWL/GdrgavwN3oi/DVx+Y4M34e/wZurje1yDf8Bb8I94K/4Jb8M/41r8
C96Of8U78G94J/4d1+E/8C78J96N/8J78N+4Hv+D9+L/4H34v3g//heHlib7
ANwIH4gb44NwE3wwTsGH4Kb40MCJ/qIZPgw3x4cnHPQHqfgI3AIfGTixP7fE
R+FW+Gicho/BrfGxuA0+DrfFx+N0fELgxPG9HT4xcOL43B6fhDvgk3FGon6D
/u0U3BGfijsl3KrBp+HO+HScic/AXWh/Z+Ku+CzcDZ+Ns/A5uDs+F/fA5+Ge
+HwcxhfgXvhC3BtfhPvgi3E2vgT3TbS/XvH/W16K++HLcH98eeBoXoNz8BV4
AL4S57L/XIUH4qsT5Qnabx6+JnAst8GD8LV4ML4OD0l4UIOvxxF8Ax6Kb8TD
EtvjugbfhIfjm3E+voX6H4FvxSPxbXgUvh0X4DvwaHwnHoPvwmPx3bgQ34PH
4XvxeHwfnoDvx1H8AJ6IH8RF+CE8CT+Mi/EjeDJ+FE/Bj+Gp+HFcgp/A0/CT
eDp+Cs/AT+NS/AyeiZ/Fs/BzeDZ+HsfwC3gOfhHPxS/hefhlXIZfwfPxq3gB
fg0vxK/jcvwGXoTfxIvxW3gJfjvhk+P/t6jA7+Cl+F28DL+Hl+P3cRx/gFfg
D/FK/BFehT/GlfgTvBp/itfgz/Ba/Dmuwl/gdfhLvB5/hTfgr3E1/gZvxN/i
Tfg7vBl/j2vwD3gL/hFvxT/hbfhnXIt/wdvxr3gH/g3vxL/jOvwH3oX/xLvx
X3gP/hvX43/wXvwfvA//F+/H/+LQu8k+ADfCB+LG+CDcBB+MU/AhuCk+FDfD
h+Hm+HCcio/ALfCRuCU+CrfCR+M0fAxujY/FbfBxuC0+HqfjE3A7fCJuj0/C
HfDJOAOfgjviU3EnfBrujE/HmYHDAxp8Bu6Cz8Rd8VmBqxLP//HZifyDkIXP
wd3xubgHPg/3xOfjML4A98IX4t74osCJ+2198MU4G1+C++JLAyeuv/vhy3B/
fHmivCc2OAdfgQfgK3EuvgoPxFfjPHwNHsT2vRYPxtfhIfh6HME34KH4RjwM
34SH45txPr4Fj8C34pH4NjwK344L8B14NL4Tj8F34bH4blyI78Hj8L14PL4P
T8D34yh+AE/ED+Ii/BCehB/GxfgRPBk/iqfgx/BU/DguwU/gafhJPB0/hWfg
p3EpfgbPxM/iWfg5PBs/j2P4BTwHv4jn4pfwPPwyLsOv4Pn4VbwAv4YX4tdx
OX4DL8Jv4sX4LbwEv40r8Dt4KX4XL8Pv4eX4fRzHH+AV+EO8En+EV+GPcSX+
BK/Gn+I1+DO8Fn+Oq/AXeB3+Eq/HX+EN+Gtcjb/BG/G3eBP+Dm/G3+Ma/APe
gn/EW/FPeBv+GdfiX/B2/CvegX/DO/HvuA7/gXfhP/Fu/Bfeg//G9fgfvBf/
B+/D/8X78b84tCzZB+BG+EDcGB+Em+CDcQo+BDfFh+Jm+DDcHB+OU/ERuAU+
ErfER+FW+Gicho/BrfGxuA0+DrfFx+N0fAJuh0/E7fFJuAM+GWfgU3BHfCru
hE/DnfHpOBOfgbvgM3FXfBbuhs/GWfgc3B2fi3vg83BPfD4O4wtwL3wh7o0v
wn3wxTgbX4L74ktxP3wZ7o8vxzn4CjwAX4lz8VV4IL4a5+Fr8CB8LR6Mr8ND
8PU4gm/AQ/GNeBi+CQ/HN+N8fAsegW/FI/FteBS+HRfgO/BofCceg+/CY/Hd
uBDfg8fhe/F4fB+egO/HUfwAnogfxEX4ITwJP4yL8SN4Mn4UT8GP4an4cVyC
n8DT8JN4On4Kz8BP41L8DJ6Jn8Wz8HN4Nn4ex/ALeA5+Ec/FL+F5+GVchl/B
8/GreAF+DS/Er+Ny/AZehN/Ei/FbeAl+G1fgd/BS/C5eht/Dy/H7OI4/wCvw
h3gl/givwh/jSvwJXo0/xWvwZ3gt/hxX4S/wOvwlXo+/whvw17gaf4M34m/x
Jvwd3oy/xzX4B7wF/4i34p/wNvwzrsW/4O34V7wD/4Z34t9xHf4D78J/4t34
L7wH/43r8T94L/4P3of/i/fjf3HovWQfgBvhA3FjfBBugg/GKfgQ3BQfipvh
w3BzfDhOxUfgFvhI3BIfhVvho3EaPga3xsfiNvg43BYfj9PxCbgdPhG3xyfh
DvhknIFPwR3xqbgTPg13xqfjTHwG7oLPxF3xWbgbPhtn4XNwd3wu7oHPwz3x
+TiML8C98IW4N74I98EX42x8Ce6LL8X98GW4P74c5+Ar8AB8Jc7FV+GB+Gqc
h6/Bg/C1eDC+Dg/B1+MIvgEPxTfiYfgmPBzfjPPxLXgEvhWPxLfhUfh2XIDv
wKPxnXgMvguPxXfjQnwPHofvxePxfXgCvh9H8QN4In4QF+GH8CT8MC7Gj+DJ
+FE8BT+Gp+LHcQl+Ak/DT+Lp+Ck8Az+NS/EzeCZ+Fs/Cz+HZ+Hkcwy/gOfhF
PBe/hOfhl3EZfgXPx6/iBfg1vBC/jsvxG3gRfhMvxm/hJfhtXIHfwUvxu3gZ
fg8vx+/jOP4Ar8Af4pX4I7wKf4wr8Sd4Nf4Ur8Gf4bX4c1yFv8Dr8Jd4Pf4K
b8Bf42r8Dd6Iv8Wb8Hd4M/4e1+Af8Bb8I96Kf8Lb8M+4Fv+Ct+Nf8Q78G96J
f8d1+A+8C/+Jd+O/8B78N67H/+C9+D94H/4v3o//xaHlyT4AN8IH4sb4INwE
H4xT8CG4KT4UN8OH4eb4cJyKj8At8JG4JT4Kt8JH4zR8DG6Nj8Vt8HG4LT4e
p+MTcDt8Im6PT8Id8Mk4A5+CO+JTcSd8Gu6MT8eZ+AzcBZ+Ju+KzcDd8Ns7C
5+Du+FzcA5+He+LzcRhfgHvhC3FvfBHugy/G2fgS3Bdfivvhy3B/fDnOwVfg
AfhKnIuvwgPx1TgPX4MH4WvxYHwdHoKvxxF8Ax6Kb8TD8E14OL4Z5+Nb8Ah8
Kx6Jb8Oj8O24AN+BR+M78Rh8Fx6L78aF+B48Dt+Lx+P78AR8P47iB/BE/CAu
wg/hSfhhXIwfwZPxo3gKfgxPxY/jEvwEnoafxNPxU3gGfhqX4mfwTPwsnoWf
w7Px8ziGX8Bz8It4Ln4Jz8Mv4zL8Cp6PX8UL8Gt4IX4dl+M38CL8Jl6M38JL
8Nu4Ar+Dl+J38TL8Hl6O38dx/AFegT/EK/FHeBX+GFfiT/Bq/Clegz/Da/Hn
uAp/gdfhL/F6/BXegL/G1fgbvBF/izfh7/Bm/D2uwT/gLfhHvBX/hLfhn3Et
/gVvx7/iHfg3vBP/juvwH3gX/hPvxv+vq7uMlq+uHzZ8093d3d3d0t3dKaki
qeBRQpFQGpTu7hSU7g4JJQUFpFG6/qyH3/FZ59pvzrrWPWf2OTN79mfmxXf2
x/gT/Cn+DH+Ov8Bf4q/w1/gb/C3utqEeDg+PR8Aj4pHwyHgUPCoeDY+Ox8Bj
4rHw2HgcPC4eD4+PJ8AT4onwxHgSPCmeDE+Op8BT4qnw1HgaPC2eDk+PZ8Az
4pnwzHgWPCueDc+O58Bz4rnw3HgePC+eD8+PF8AL4oXwwngRvCheDC+Ol8BL
4qXw0ngZvCxeDi+PV8A/wCvilfDKeBW8Kl4Nr47XwGvitfDaeB28Ll4Pr483
wBvijfDGeBO8Kd4Mb463wFvirfDWeBu8Ld4Ob493wDvinfDOeBf8Q7wr3g3v
jvfAe+K98I/wj/FP8N74p3gfvC/eD++PD8AH4p/hn+OD8MH4F3gA/xL/Ch+C
D8WH4cPxr/Fv8BH4t/hIfBQ+Gh+Df4d/j4/Fx+Hj8Qn4RHwSPhmfgk/Ff8B/
xKfh0/EZ+Ex8Fj4bn4PPxefh8/EF+EJ8Eb4YX4IvxZfhy/EV+Ep8Fb4aX4Ov
xdfh6/EN+EZ8E74Z/wnfgm/Ff8Z/wbfh2/Ed+E58F74b34Pvxffh+/ED+EH8
EH4YP4IfxY/hx/ET+En8FH4a/xU/g5/Fz+Hn8d/w3/EL+EX8En4Zv4Jfxf/A
r+HX8T/xv/Ab+E38Fv43fhu/g9/F7+H38Qf4Q/wR/g/+L/4Yf4I/xZ/hz/EX
+Ev8Ff4af4O/xd0+xAO44ei44em4Eei4Eem4kei4kem4Uei4Uem40ei40em4
Mei4Mem4sei4sem4cei4cem48ei48em4Cei4Cem4iei4iem4Sei4Sem4yei4
yem4Kei4Kem4qei4qem4aei4aem46ei46em4Gei4GYd52Pf7DeBmGrz9It93
3Mx03Cx03Kx03Gx03Ox03Bx03Jx03Fx03Nz0QQ9eb2CeoR7AzUvHzUcf9O3D
ru85/1AP4Bag/89rfN8XHOoB3EIcP7iF6fi7h2Voxy1Kxy1Gxy1Oxy1Bxy1J
xy1Fxy1Nxy1Dxy1Lxy1Hxy1Px61Ax/2AjluRjluJjluZjluFjluVjluNjlud
jluDjluTjluLjlubjluHjluXjluPjlufjtuAjtuQjtuIjtuYjtuEjtuUjtuM
jtucjtuCjtuSjtuKjtuajtuGjtuWjtuOjtuejtuBjtuRjtuJjtuZjtuFjvsh
HbcrHbcbHbc7HbcHHbcnHbcXHfcjOu7HdNxP6Li96bif0nH70HH70nH70XH7
03EH0HEH0nE/o+N+TscdRMcdTB/0/673O9QDuIFhXnZYx/2S+8f9io47hI47
lI47jI47nI77NR33GzruCDrut3TckXTcUXTc0XTcMXTc74b5uzc2/+8H7vd0
3LH0Y7n/49g/7ng67gQ67kQ67iQ67mQ67hQ67lQ67g903B/puNPouNPpuDPo
uDPpuLPouLPpuHPouHPpuPPouPPpgx48Pi/g+MRdSMddRMddTMddQsddSsdd
RsddTsddQcddScddRcddTcddQ8ddS8ddR8ddT8fdQMfdSMfdRMfdTMf9iY67
hY67lY77Mx33FzruNjrudjruDvr/vMn3/c6hHsDdRcfdTcfdQ8fdS8fdN+iV
v++4++m4B+i4B+m4h+i4h+m4R+i4R+m4x+i4x+m4J+i4J+m4p+i4p+m4v9Jx
z9Bxz9Jxz9EHPbg9z/zB/Y2O+zsd9wKvL9yLdNxLdNzL9EEPXq/olaEeGPTA
Vt/3V4d6APcPOu41Ou51Ou6fg4/XsNc37l903Bt03Js8P7i36Lh/03Fv03Hv
0HHv0nHv0XHv03Ef0HEf0nEf0XH/oeP+S8d9TMd9Qsd9Ssd9Rsd9Tsd9Qcd9
Scd9Rcd9Tcd9Q8d9S8ffDfihHTccHTc8HTcCHTciHTcSHTcyHTcKHTcqHTca
HTc6HTcGHTcmHTcWHTc2HTcOHTcuHTceHTc+HTcBHTchHTcRHTcxHTcJHTcp
HTcZHTc5HTcFHTclHTcVHTc1HTcNHTctHTcdHTc9HTcDHTcjHTcTHTczHTcL
HTcrHTcbHTc7HTcHHTcnHTcXHTc3HTcPHTcvHTcfHTc/HbcAHbcgHbcQHbcw
HbcIHbcoHbcYHbc4HbcEHbckHbcUHbc0HbcMHbcsHbccHbc8HbcCHfcDOm5F
Om4lOm5lOm4VOm5VOm41Om51Om4NOm5NOm4tOm5tOm4dOm5dOm49Om59Om4D
Om5DOm4jOm5jOm4TOm5TOm4zOm5zOm4LOm5LOm4rOm5rOm4bOm5bOm47Om57
Om4HOm5HOm4nOm5nOm4XOu6HdNyudNxudNzudNwedNyedNxedNyP6Lgf03E/
oeP2puN+SsftQ8ftS8ftR8ftT8cdQMcdSMf9jI77OR13EB13MB33CzpugI77
JR33KzruEDruUDruMDrucDru13Tcb+i4I+i439JxR9JxR9FxR9Nxx9Bxv6Pj
fk/HHUvHHUfHHU/HnUDHnUjHnUTHnUzHnULHnUrH/YGO+yMddxoddzoddwYd
dyYddxYddzYddw4ddy4ddx4ddz4ddwEddyEddxEddzEddwkddykddxkddzkd
dwUddyUddxUddzUddw0ddy0ddx0ddz0ddwMddyMddxMddzMd9yc67hY67lY6
7s903F/ouNvouNvpuDvouDvpuLvouLvpuHvouHvpuPvouPvpuAfouAfpuIfo
uIfpuEfouEfpuMfouMfpuCfouCfpuKfouKfpuL/Scc/Qcc/Scc/Rcc/TcX+j
4/5Ox71Ax71Ix71Ex71Mx71Cx71Kx/2DjnuNjnudjvsnHfcvOu4NOu5NOu4t
Ou7fdNzbdNw7dNy7dNx7dNz7dNwHdNyHdNxHdNx/6Lj/0nEf03Gf0HGf0nGf
0XGf03Ff0HFf0nFf0XFf03Hf0HHf0vF3A3xoxw1Hxw1Px41Ax41Ix41Ex41M
x41Cx41Kx41Gx41Ox41Bx41Jx41Fx41Nx41Dx41Lx41Hx41Px01Ax01Ix01E
x01Mx01Cx01Kx01Gx01Ox01Bx01Jx01Fx01Nx01Dx01Lx01Hx01Px81Ax81I
x81Ex81Mx81Cx81Kx81Gx81Ox81Bx81Jx81Fx81Nx81Dx81Lx81Hx81Pxy1A
xy1Ixy1Exy1Mxy1Cxy1Kxy1Gxy1Oxy1Bxy1Jxy1Fxy1Nxy1Dxy1Lxy1Hxy1P
x61Ax/2AjluRjluJjluZjluFjluVjluNjludjluDjluTjluLjlubjluHjluX
jluPjlufjtuAjtuQjtuIjtuYjtuEjtuUjtuMjtucjtuCjtuSjtuKjtuajtuG
jtuWjtuOjtuejtuBjtuRjtuJjtuZjtuFjvshHbcrHbcbHbc7HbcHHbcnHbcX
HfcjOu7HdNxP6Li96bif0nH70HH70nH70XH703EH0HEH0nE/o+N+TscdNMyD
63dwBw/efljH/YKOG6DjfknH/YqOO4SOO5SOO4yOO5yO+zUd9xs67gg67rd0
3JF03FF03NF03DF03O/ouN/TccfSccfRccfTcSfQcSfScSfRcSfTcafQcafS
cX+g4/5Ix51Gx51Ox51Bx51Jx51Fx51Nx51Dx51Lx51Hx51Px11Ax11Ix11E
x11Mx11Cx11Kx11GH/Syw9YnXj7UA7gr6Lgr6bir6IMe3K4e6gHcNXTctXTc
dXTc9XTcDXTcjXTcTXTczfRB/2/9/1AP4G6h426lD3pwfe6fh3oA9xc67jY6
7nY67g467k467i467m467h467l76oAfXD9831AODHlz/e/9QDwx62u2+7w8M
9cCgl93l+/7gUA/gHhrc/5bfd9zDdNwjdNyjdNxj9EG38ff98aEeGPRZ237f
nxjqAdyTdNxTdNzT9EEPDOt/HeoB3DODv7/z9x33LH3QA8P6c0M9gHt+mMfd
/fuO+xv9f97r+/73oR7AvUDHvUjHvTTMw7YB3Mt03Ct03Kt03D/ouNfouNfp
uH/Scf+i496g496k496i4/49zIPnb9zbdNw79EEPbu+yf9x7dNz7dNwH9P95
0e//vg+HegD3ER33Hzruv8M8eP7GfUzHfULHfUrHfUbHfU7HfUHHfUnHfUUf
9OD3k3w91AO4b+i4b+n4uwE9tOOGo+OGpw96cL6OMNQDuBHpuJHouJGH+fZh
8ws3Cn3QA8P6qEM9gBuNPuhXhs2f0Yd64H/e4fs+xlAP4Mak48ai48am48ah
48al48aj48an4yagD/r2YX3CoR7ATUTHTUzHTULHTTr4/G70fcdNRsdNPng8
fr8N4Kag46ak46ai46am46ah46al46aj46an42ag42ak42ai42am42ah42al
42aj42an4+YYPF6GzXfcnPRBD86HuYZ6ADc3HTfPoIedP3HzDnrY5xvcfPRB
bzPs8838Qz2AW2Dw/9vz+45bkI5biI5bmI5bhI5blI5bjI5bnI5bgo5bko5b
io5bmo5bho5blo5bjo5bno5bgY77AR23Ih23Eh23Mh23Ch23Kh23Gh23Oh23
Bh23Jh23Fh23Nh23Dh23Lh23Hh23Ph23AR23IR23ER23MR23CR23KR23GR23
OR23BR23JR23FR23NR23DR23LR23HR23PR23Ax23Ix23Ex23Mx23Cx33Qzpu
VzpuNzpudzpuDzpuTzpuLzruR3Tcj+m4n9Bxe9NxP6Xj9qHj9qXj9qPj9qfj
DqDjDqTjfkbH/ZyOO4iOO5iO+wUdN0DH/ZKO+xUddwgddygddxgddzgd92s6
7jd03BF03G/puCPpuKPouKPpuGPouN/Rcb+n446l446j446n406g406k406i
406m406h406l4/5Ax/2RjjuNjjudjjuDjjuTjjuLjjubjjuHjjuXjjuPjjuf
jruAjruQjruIjruYjruEjruUjruMjrucjruCjruSjruKjruajruGjruWjruO
jruejruBjruRjruJjruZjvsTHXcLHXcrHfdnOu4vdNxtdNztdNwddNyddNxd
dNzddNw9dNy9dNx9dNz9dNwDdNyDdNxDdNzDdNwjdNyjdNxjdNzjdNwTdNyT
dNxTdNzTdNxf6bhn6Lhn6bjn6Ljn6bi/0XF/p+NeoONepONeouNepuNeoeNe
peP+Qce9Rse9Tsf9k477Fx33Bh33Jh33Fh33bzrubTruHTruXTruPTrufTru
AzruQzruIzruP3Tcf+m4j+m4T+i4T+m4z+i4z+m4L+i4L+m4r+i4r+m4b+i4
b+n4uwE8tOOGo+OGp+NGoONGpONGouNGpuNGoeNGpeNGo+NGp+PGoOPGpOPG
ouPGpuPGoePGpePGo+PGp+MmoOMmpOMmouMmpuMmoeMmpeMmo+Mmp+OmoOOm
pOOmouOmpuOmoeOmpeOmo+Omp+NmoONmpONmouNmpuNmoeNmpeNmo+Nmp+Pm
oOPmpOPmouPmpuPmoePmpePmo+Pmp+MWoOMWpOMWouMWpuMWoeMWpeMWo+MW
p+OWoOOWpOOWouOWpuOWoeOWpeOWo+OWp+NWoON+QMetSMetRMetTMetQset
SsetRsetTsetQcetScetRcetTcetQ8etS8etR8etT8dtQMdtSMdtRMdtTMdt
QsdtSsdtRsdtTsdtQcdtScdtRcdtTcdtQ8dtS8dtR8dtT8ftQMftSMftRMft
TMftQsf9kI7blY7bjY7bnY7bg47bk47bi477ER33YzruJ3Tc3nTcT+m4fei4
fem4/ei4/em4A+i4A+m4n9FxP6fjDqLjDqbjfkHHDdBxv6TjfkXHHULHHUrH
HUbHHU7H/ZqO+w0ddwQd91s67kg67ig67mg67hg67nd03O/puGPpuOPouOPp
uBPouBPpuJPouJPpuFPouFPpuD/QcX+k406j406n486g486k486i486m486h
486l486j486n4y6g4y6k4y6i4y6m4y6h4y6l4y6j4y6n466g466k466i466m
466h466l466j466n426g426k426i426m4/5Ex91Cx91Kx/2ZjvsLHXcbHXc7
HXcHHXcnHXcXHXc3HXcPHXcvHXcfHXc/HfcAHfcgHfcQHfcwHfcIHfcoHfcY
Hfc4HfcEHfckHfcUHfc0HfdXOu4ZOu5ZOu45Ou55Ou5vdNzf6bgX6LgX6biX
6LiX6bhX6LhX6bh/0HGv0XGv03H/pOP+Rce9Qce9Sce9Rcf9m457m457h457
l457j457n477gI77kI77iI77Dx33XzruYzruEzruUzruMzruczruCzruSzru
KzruazruGzruWzr+bsAO7bjh6Ljh6bgR6LgR6biR6LiR6bhR6LhR6bjR6LjR
6bgx6Lgx6bix6Lix6bhx6Lhx6bjx6Ljx6bgJ6LgJ6biJ6LiJ6bhJ6LhJ6bjJ
6LjJ6bgp6Lgp6bip6Lip6bhp6Lhp6bjp6Ljp6bgZ6LgZ6biZ6LiZ6bhZ6LhZ
6bjZ6LjZ6bg56Lg56bi56Li56bh56Lh56bj56Lj56bgF6LgF6biF6LiF6bhF
6LhF6bjF6LjF6bgl6Lgl6bil6Lil6bhl6Lhl6bjl6Ljl6bgV6Lgf0HEr0nEr
0XEr03Gr0HGr0nGr0XGr03Fr0HFr0nFr0XFr03Hr0HHr0nHr0XHr03Eb0HEb
0nEb0XEb03Gb0HGb0nGb0XGb03Fb0HFb0nFb0XFb03Hb0HHb0nHb0XHb03E7
0HE70nE70XE703G70HE/pON2peN2o+N2p+P2oOP2pOP2ouN+RMf9mI77CR23
Nx33UzpuHzpuXzpuPzpufzruADruQDruZ3Tcz+m4g+i4g+m4X9BxA3TcL+m4
X9Fxh9Bxh9Jxh9Fxh9Nxv6bjfkPHHUHH/ZaOO5KOO4qOO5qOO4aO+x0d93s6
7lg67jg67ng67gQ67kQ67iQ67mQ67hQ67lQ67g903B/puNPouNPpuDPouDPp
uLPouLPpuHPouHPpuPPouPPpuAvouAvpuIvouIvpuEvouEvpuMvouMvpuCvo
uCvpuKvouKvpuGvouGvpuOvouOvpuBvouBvpuJvouJvpuD/RcbfQcbfScX+m
4/5Cx91Gx91Ox91Bx91Jx91Fx91Nx91Dx91Lx91Hx91Pxz1Axz1Ixz1Exz1M
xz1Cxz1Kxz1Gxz1Oxz1Bxz1Jxz1Fxz1Nx/2VjnuGjnuWjnuOjnuejvsbHfd3
Ou4FOu5FOu4lOu5lOu4VOu5VOu4fdNxrdNzrdNw/6bh/0XFv0HFv0nFv0XH/
puPepuPeoePepePeo+Pep+M+oOM+pOM+ouP+Q8f9l477mI77hI77lI77jI77
nI77go77ko77io77mo77ho77lo6/G6BDO244Om54Om4EOm5EOm4kOm5kOm4U
Om5UOm40Om50Om4MOm5MOm4sOm5sOm4cOm5cOm48Om58Om4COm5COm4iOm5i
Om4SOm5SOm4yOm5yOm4KOm5KOm4qOm5qOm4aOm5aOm46Om56Om4GOm5GOm4m
Om5mOm4WOm5WOm42Om52Om4OOm5OOm4uOm5uOm4eOm5eOm4+Om5+Om4BOm5B
Om4hOm5hOm4ROm5ROm4xOm5xOm4JOm5JOm4pOm5pOm4ZOm5ZOm45Om55Om4F
Ou4HdNyKdNxKdNzKdNwqdNyqdNxqdNzqdNwadNyadNxadNzadNw6dNy6dNx6
dNz6dNwGdNyGdNxGdNzGdNwmdNymdNxmdNzmdNwWdNyWdNxWdNzWdNw2dNy2
dNx2dNz2dNwOdNyOdNxOdNzOdNwudNwP6bhd6bjd6Ljd6bg96Lg96bi96Lgf
0XE/puN+QsftTcf9lI7bh47bl47bj47bn447gI47kI77GR33czruIDruYDru
F3TcAB33SzruV3TcIXTcoXTcYXTc4XTcr+m439BxR9Bxv6XjjqTjjqLjjqbj
jqHjfkfH/Z6OO5aOO46OO56OO4GOO5GOO4mOO5mOO4WOO5WO+wMd90c67jQ6
7nQ67gw67kw67iw67mw67hw67lw67jw67nw67gI67kI67iI67mI67hI67lI6
7jI67nI67go67ko67io67mo67ho67lo67jo67no67gY67kY67iY67mY67k90
3C103K103J/puL/QcbfRcbfTcXfQcXfScXfRcXfTcffQcffScffRcffTcQ/Q
cQ/ScQ/RcQ/TcY/QcY/ScY/RcY/TcU/QcU/ScU/RcU/TcX+l456h456l456j
456n4/5Gx/2djnuBjnuRjnuJjnuZjnuFjnuVjvsHHfcaHfc6HfdPOu5fdNwb
dNybdNxbdNy/6bi36bh36Lh36bj36Lj36bgP6LgP6biP6Lj/0HH/peM+puM+
oeM+peM+o+M+p+O+oOO+pOO+ouO+puO+oeO+pePvBuTQjhuOjhuejhuBjhuR
jhuJjhuZjhuFjhuVjhuNjhudjhuDjhuTjhuLjhubjhuHjhuXjhuPjhufjpuA
jpuQjpuIjpuYjpuEjpuUjpuMjpucjpuCjpuSjpuKjpuajpuGjpuWjpuOjpue
jpuBjpuRjpuJjpuZjpuFjpuVjpuNjpudjpuDjpuTjpuLjpubjpuHjpuXjpuP
jpufjluAjluQjluIjluYjluEjluUjluMjlucjluCjluSjluKjluajluGjluW
jluOjluejluBjvsBHbciHbcSHbcyHbcKHbcqHbcaHbc6HbcGHbcmHbcWHbc2
HbcOHbcuHbceHbc+HbcBHbchHbcRHbcxHbcJHbcpHbcZHbc5HbcFHbclHbcV
Hbc1HbcNHbctHbcdHbc9HbcDHbcjHbcTHbczHbcLHfdDOm5XOm43Om53Om4P
Om5POm4vOu5HdNyP6bif0HF703E/peP2oeP2peP2o+P2p+MOoOMOpON+Rsf9
nI47iI47mI77BR03QMf9ko77FR13CB13KB13GB13OB33azruN3TcEXTcb+m4
I+m4o+i4o+m4Y+i439Fxv6fjjqXjjqPjjqfjTqDjTqTjTqLjTqbjTqHjTqXj
/kDH/ZGOO42OO52OO4OOO5OOO4uOO5uOO4eOO5eOO4+OO5+Ou4COu5COu4iO
u5iOu4SOu5SOu4yOu5yOu4KOu5KOu4qOu5qOu4aOu5aOu46Ou56Ou4GOu5GO
u4mOu5mO+xMddwsddysd92c67i903G103O103B103J103F103N103D103L10
3H103P103AN03IN03EN03MN03CN03KN03GN03ON03BN03JN03FN03NN03F/p
uGfouGfpuOfouOfpuL/RcX+n416g416k416i416m416h416l4/5Bx71Gx71O
x/2TjvsXHfcGHfcmHfcWHfdvOu5tOu4dOu5dOu49Ou59Ou4DOu5DOu4jOu4/
dNx/6biP6bhP6LhP6bjP6LjP6bgv6Lgv6biv6Liv6bhv6Lhv6fi7ATi044aj
44an40ag40ak40ai40am40ah40al40aj40an48ag48ak48ai48am48ah48al
48aj48an4yag4yak4yai4yam4yah4yal4yaj4yan46ag46ak46ai46am46ah
46al46aj46an42ag42ak42ai42am42ah42al42aj42an4+ag4+ak4+ai4+am
4+ah4+al4+aj4+an4xag4xak4xai4xam4xah4xal4xaj4xan45ag45ak45ai
45am45ah45al45aj45b///4/NqBtQg==
        "]]},
      AspectRatio->0.7,
      Axes->True,
      AxesOrigin->{0, 0},
      Frame->True,
      FrameLabel->{
        FormBox[
         StyleBox[
         "\"5-min Steps\"", FontSize -> 12, Italic, Bold, StripOnInput -> 
          False], TraditionalForm], 
        FormBox[
         StyleBox[
         "\"DrawDown ($)\"", FontSize -> 12, Italic, Bold, StripOnInput -> 
          False], TraditionalForm]},
      ImageSize->500,
      LabelStyle->{
        Directive[
         GrayLevel[0], 10], FontFamily -> "Calibri"},
      PlotLabel->FormBox[
        StyleBox[
        "\"DrawDown Curve\"", FontSize -> 15, Italic, Bold, StripOnInput -> 
         False], TraditionalForm],
      PlotRangeClipping->True], {800., -183.75}, 
     ImageScaled[{0.5, 0.5}], {500, 350.}]}, {}},
  ContentSelectable->True,
  ImageSize->{1078.6666666666667`, 379.5},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.575825429582138*^9, 3.5758254667414036`*^9}, 
   3.5758254987370596`*^9, {3.5758255951930294`*^9, 3.5758256864687896`*^9}, {
   3.5758261097285595`*^9, 3.5758261181330404`*^9}, 3.575826881002674*^9, {
   3.5758291266209784`*^9, 3.575829141987005*^9}, 3.5758311748195763`*^9, 
   3.5758391350970707`*^9, 3.575840136514768*^9, {3.575842163987733*^9, 
   3.5758421887021465`*^9}, 3.575842473367429*^9, 3.575842610244258*^9, 
   3.57584285559029*^9, {3.5758431268488054`*^9, 3.5758431401155643`*^9}, 
   3.575843233600911*^9, 3.5758433799932847`*^9, {3.575843546092785*^9, 
   3.575843556090357*^9}, 3.5758436481836243`*^9, {3.575843736948701*^9, 
   3.5758437562898073`*^9}, 3.5758437924098735`*^9, 3.5758439203721924`*^9, {
   3.575852950794761*^9, 3.5758530476397314`*^9}, {3.5758531060774336`*^9, 
   3.575853122566663*^9}, 3.575854294045823*^9, 3.5758545395590544`*^9, 
   3.575854895381079*^9, 3.5758549460187683`*^9, 3.5758558537138166`*^9, 
   3.5758571984595227`*^9, 3.5758581917193336`*^9, 3.5758582288214564`*^9, 
   3.575858276760198*^9, 3.5758607573330708`*^9, 3.5759047531509256`*^9, {
   3.5759055686249294`*^9, 3.575905571261334*^9}, 3.575905703814767*^9},
 ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztXQ2wJUV1Hu7P+9l9763sgiyguKKAoJKfCkqtUX4WEdCoGJAFFmEhPkFd
sQhGjWJAwSUC8oIaESw1AgpiRYLmCfKj/CyKC8EYKIGnQZQUVEVLEyuV0qTy
cr9z+nSfntszd+bO3N+drb333enp6T59ztenT58+3fMnm889861bNp971hmb
173mnM3vPvOsM/583ZFnn9NKqu8URY2XR9FOH1wX4fdyFMnXcut//OsV+EKG
6tY43fpj+l2PlpcWovUt2c8vLqtndgncfSr09PJiNB9RhtDT6q5+eop+N6MF
FG3/zUeLrdQVdG9NtIgH1y9ESyiSL6KFpWVb5vqFJcqp8yU9U6Ocs63vpWCd
TLahVXhhrmuUMh2rY30kxTAdOm/dPG8++H6Yfk4kETBubX5cyXqlwcLivKt7
2rR3iQgz9GgcCs1AVeuezuc9Y2jAM9zeOfOs3DflePyJLK2qrLqR0JLhFWVx
7KwJorVUkPbY2DZvKSBEaQUAIK1MA6rXGp3Pe8ZxY4KeWmGeM/dVnbZMbjG3
amUqCQ7jAamNQXvaxTRhgRB7pkmJu3KyR0UIRz61BJgY5Vr1NChl2gLMYdjH
Osqu0/2Ztr7h0YL8Jt3QQk18fKyb+OO2QTJxzGC47qLwwDUZvnBNARwxlYFn
NAQbthiThRXEan+0SRyVhGDUHG+rE+WjY9zAnyhBTushwmBkRlc3P29HYVQV
oyw84qtnWmXWRZ8pHnDapO0pLnf7QC8jBhe9YMWhRxIZ6F2PM8r0kfFt32MB
MSp9He1tVIKHmhYK5qWMuLnwTMFCftFG0EQbA0wZa3RV5nF+pNnW5ajNuPeL
csv8tSJ3b8/GSJxwqLv/p54eklnTUN86yUrCmfXSyQ4y2nTJ17SeKe93ykxp
v2f6Od2Kqc0uijvQ6nyNpVxFhNJeKsXa0TaK2oaN/MUeQMXuESs2jaeFqttP
+magupZY2eRY7evn7mv7YAWmCkxlgekPfAUF3OjpD34fJAMASUv7MFYF82dN
E3HFoEomRIFyLbha49V6NVDnIS2QJtTi0npUMCQWo/YldLG2ZWIITpeDjyb9
zpi2vwGVrkbJs1GCOEUtVRCqINSlOGPKiFljaoI2bPHpZXS1xkMSUkJ5s6a1
y8WNcgXKPbCtWCfuAsXaUc5SyYMoshUoNoSi0KMFmc0omoyhyEOSmT+uKiRT
0UYVhioMdSvTDOro5XS1OtLO/1Lk0ipuHnIpHUXKoCRGlUWtW4EqSm1fUVT3
qrGrLUqcYqf0ShtVEKoglF8Zhcyng+lqZ0tOEVPsQBkjyexdsBAqXmbd436Z
s4CSzXVv3t9q/kJv7Wue9zfi1TWMIOKDXa+mahWIKhB1M1kL+fIOUjxVfizj
Pgz5/jKliTfSXxEsWJwEhYj/oFCRkWdgx4bLAuW+mIrdXa9nGlmGHi/WhBeJ
YON1tdjOK3JrFPeL1+fc2hWQXFoFpNz1GcVEBcW+BrD0dzwlIIj3enxt8S/3
U5miugn1XbY9IZ42G0iby5ivenY0n60H0t6RES+j2N7q2WLP1gJp+9B3pWaq
ZxPTKjVTPZvn2RLUzIEZq98rY1ro2VAdg6p3TSAtaxcbFx5krTfEq5zwelUg
7ZCM+Yo8W0TM/aAvK80p7Kbva5PaSUl0/UV7mTLRSS8sa+auqc1Zweus7Nrj
qxqBx3ijSf1FTz75q0Mf+qd/c3VcnZGg93Pamf9w0yPP+s1vfusKeFFnIkN+
uxQi33fdtQ99++x3fb1rIp844fgvbbzj9h/nIjK02kFENvCUIffzWz/6neVD
XvkZJg9pV+KriSxb0gk6//Ofe6AcgsJce/eNX/lhYa7lJjKnaIG9/hMZcs90
IPKhM07/6rqnn/7P3hMZUhVMyNTBjzz8DND2o1NOvoGJWV6e+u1v/3frZ668
Hz2ZMv9tn2mb5O/fX3r8F5CkaBN02l+99ujPo4dE6YRRUiI5+9osKcra7H3S
BFz+iSvug9Soiw6CMQGaQAuuK5raaGpomvC71j+C6I5iDWCDvoZ+hpIsJZ+0
uctS7ilC+uZ7zl2UsQWUnPbNxUcHDZy1v/zlf6Ec0IW/A6XJbCSCpJ4+9g3X
QAMKPR00To8I4k1sdRABgblyPjUYQt54z91PQFIZCClBB8t8qVWhb2x9ss+t
N4R87QN/eStEMXBCAEiUNRSE+HgYECFH3f+9n/WZELrDHqMJVzV/YLtA59PF
x23uXup4pmQyTgmMdqTBquNyL++zhBIIE6XPem1whDXjhJG2ryE1nap0BUdq
rdZBwSkKYKjgA0WHcToLBT3ly5RYCkRH6wPbG90MAgOlDtt9p62urRjx6Gtz
j8u+bHDEoSyYEZo4fwwbEHGQotUHiji2cQZMHAwuO3k3xEGB9Zk4umO2gzv7
T56+xGbppTpPrD7U+o30vcoPWpazQDLumQy5K0puDDqA75sJNeZk+p6xW0Ey
xun1gX54SHyzK0T/sYJeFcMlJzvo8J+aaifakjFAmtpJ7sD3ckX//eoNn/Vb
Ry1pdBh7VJsw18kGMH+vbr4Y/hQByeSvqICg1DAksKZNb0wosnZFCWAr3JZd
OQ293p9sXJpTMFnjyIamMSlKPBchrzSY8PdwFD4cIMSnAbav/F3GQ9NAXrkr
d+OiW2nZJalJf22zpIzsuRpyCP0pbc/T0AjoUPpTzuaJoWmUqI2Sg6/LaZ+e
bba3KpM7bSBM7Qkh7+M02C6OGKTtXxFSBiENEPLk8cddBz+WXQe8ZCC0NOF1
RTmgSXwQXN7HBkPQKbfe8rg4RPCXJdYXgujOs1lGWA+F7f/ds868CSRQ7ott
rtAQVhYjmAJaJ/nyBeffDsnAZwWkqJG0j5JZ6/oPygFRHQihpMTq97NZUvSp
qfTTl116D+TgIjYG1HpEzbgpdh5CeCbZQAFHbv/+z4WYbmjZndPawzAuzkfL
VZd+7K7/OfzQq4aBloVPXLFNvKAVLWNEC90JUWCmCKzQzIP0fbZ9LKRfe8yX
NS4NCsdRdU4SrygpjSqy3DotUxhaoO6xqEVXsy7NRusZjy0NRq1KOD2Vvlja
ak6DGwcUUgGnl85TcXnRYsEK+p557Xfv+yl+IfoQVUCpIzfagkVv/EZQlCzV
mJhWqFuJm+Kmvj1fU0X3ExW9aSqKgY0QTROQZu955ztufvjUt3wFV/jAvpLR
G7CCiJGGvzBxiBUNGpzqX/rIBbcjndmDOkJtG2x7QTOtbsz6XYjMNJq8RA04
CWVtC2FddWpe44orFu6VZGtSDZdE0TJYfqoTTkgL0RKxklFVjRYS6xA+L/+6
PirLws7mGJJmcvYpESRagP6HjgZwAnhQCxQjWLOVDAnxB7A2JYgJx9GtQPHU
8FIc1SUajK5WWkpND0KMFgDjYghOGhD1dIdP7qAuC9QThFdyB77yskvu+cZ7
/+KbKJQqRdaN9snQmN1jBh/slBC6ZpzYi1tjCnBuiU3kLCXlJTbTPOYoTsPK
lj+WnTgcGC1M34yjzwYI1JNpvvFD5902LDRLLG0nmpEPg7N0iAI0Y3xnH0sf
aIbSAb2FaHZaNateqihtW6Ao5cDrkK97OBsuzv7YEmFU8IzaRAbweIUpRHq/
YvbMdiWQUOXExho42CifeSUfAuqW6F7jWAarDwaIbMSFkQu3tGPjsfaxEy1K
3CoMh16szCXYREayRk/F456chomkNbqPKMbmko84TMGoTAtovkio4Ygxf1Hi
uEAByVEvO9tFtCJwcWEvK/IJwl53EsS+FkbGVrKr0CWe6hbi/dH0PQlXikSB
4gNZON4n8d0GgBTASAlwz8zlDGNRSadUhVr1+oAq5u1mNND4+06PDhTAGmau
W0wMCadD9olhjRdwaN7ZByTq3YHe7OqYQFkyiHUjyaFn0YxmEWb3MhrZyWjr
t5CVyqaQ2WPecygbM6m5oZG7/02VKGHtJwQaKBa8QFPl+VxN3cfls532OT1t
Plwk8BoDhBjc8fepP33Ttb/bcNjVg2q+dWv2tvlwwKG5suiNu5C+9EWZ5Y5Z
8+FzFFcqAK9JgEUqwBu35r+Bi4KEAXpZ9jBLHkj27e/QODnsTaY71NAa1jp4
8VwWeoSq9h0lr7HPbrG/+tmsTP68jUnUlyAoCgYaIDZV2+wqSFltk7QhaJvd
ZbDWkYalEJoIU+7Q+UKj216oV/I5qqNGLA9WcZpsGGTyxosHkK3dx8GWbRNG
hvhhJQYuetbY86IBjEsgFxQo+32aYoDoUVnYgVXBsWMHTzWnZSUUxUHlIbZN
DDFZAjObWOu/Pob5Qlcr6HsS+dwwsLyMgU4ON0iONhsxXvGEc1p4Ix/4CiVa
xh5dsDPlnfSHRzdjcxgaH77I6jnMOYltwB3gCXigyX2AL1uvuvL+z1289a6M
fOlkDpXOjXD0EpHBuwjJXsEkFQOKBM7qFj755uOu5QX7ugaD2kdHpb2aEhNf
FL73aKHiXF/SomFaKFmC4zdd0odymre5qkHf9cj5dZaj5/ePJ5iSlMwT7ctx
eMnEE7Oj0L4wnJxgzJd+4MTkk6GBJqm1krgC/SExkcW4wugpzpU9OE28kpS2
bxJXas68Eqh0FW8d4wo0q/gCcnIl0u9NUn2qxa0XFOeKN6T1iSt1Oe6KHEU1
l+ZPRUM7hoQzegmpbr/dLsAu8QJ7eqCcESuVdifn4sxh9M0HNnr/WjjZJxc3
GpImrd99gAxB4XaWl4sh+cywoWu0XcTI1egjDApCS//5+sRQMQSV2qNRuugW
dY8hVmHY4y+MKdLBOO0RS8IOO0p4f1JT3WbODUwaNRD7oI0W3HcEhZ3Y2nTB
srmNVdT9hrzR3I7EKUKI/Fw82SC93zvpgXmTz1bIxBtSKDXnfymJS2a06jh7
CEGc2GWCUlxAitdrYk8cLjgKHcXS9VwlO/+iCeuhMcUKF59TjIHTnlGtfzM8
uGkdMAcvkNspmdwPpxym9dur3LwmZfCBYkc948W+hmwS8UK3Q/mZgwgx4SHK
ht4ozZbSe8VCGlP2eUfJhfJLB9aGb84OXDILUVQJLPRnxS/tzCoZJDogLWwd
pswRumAP+dJ6xR7/JXr+MBdSUYZN8O6KZW13boXYlDJz6IIV1KRescKQ33H0
4sPzYu+Wzhe3HUoLBWJ9gNPACVF9yaNvGJE8j3eu1UEyv80652Z0HPBWCcfL
fYduiOP8ttDARpJQn06dEPVMXfa0E7BEVkRtA6jRD+vXC+KpebNGMi7U2Agu
x0lRqZHpH0iSx942S3iezirshfk4L8caD1L9BE11NbueUSxXjaVuXnKUuuoM
fkR6cmcoZUCUHe0FxBDbvkvY6b4/NFSriNNrpOeX/LbwFCl4E8J+q6TyJCLK
jR7pRiKyTaDMtyGnsL39jKgQ260OCpxlljJdG3JWOx+Lr1lNy0L2Xi6uHZZU
PneynMp7iBjn7JpYw4zuTXFSdcFApZ1YMCkOy5FgHHsil8z6k7daZ3RtIufo
pTNRwF8VmvVvsPgL+hDZ7Iwd81zCHsH8opAw0H6K4gDBllVpWTAL55N7f0sI
s1kDGjg+ZsbaKgWM+vwM97jXd+ynD92h3q0kABpySCAlfGLKS+N/aSdri6Ry
n6w9PTzyaduVqKeoi4tm7tne0VO6BaLiiglFxy6IUtI6SxhbZAPiaPSRF4pS
oukorASSRGie5Jb1znNN88/239tmOTzA6VCUCB+9MRvpA4aL2PYjxnXeYNji
OvWFkBs1xOsTmEoEhCCwmoPqOTIWO1vuS+kNnWJTbG8ocIbwoOQyoR/R9l7X
4WOK+fLmu2iS5Y3Db6687NJ76GqW0y787NXbb/yr875FV3Ochmuk63yhZ3GQ
zvUXnH87Xc3Q9wS9gekQF+6KnUxofkjAXYbYDLFAxH+DFsn7JUKjZWj4VoKT
lrDgauDzKmH5p79nu+xsUpp+4pJPf+q79i6fgjQhMe2oCz0RfuUkIeV03scF
wfG/E+jjrGaWlzWH+yATWfzRA3bW5W8jE3lHDrWAt0w0Qcd/HH2U3alI5IcY
mBREgAE55zJkAnN1eFOfmcuAn7SAl9vLnECAD5lFPDFrIjyPDswzlCcyMTWq
QHWsgi6twTNU+xoVVKxpTiBOdqgavmJYlSE2la+p0QZuYbmg+6oYW81hEWiT
ndKvKo3VvmJoBhRDyAXFSLfHs9KpM9sS+St16NeG1L2TGpwVWh5bm8QJsG3P
TAyWFUaKq87M4Lb9IAeIvgt4QkI6loMQ/dWdezuyMrKCwrdWPeWrAEzeZOtX
05VkWblHZvbaSIcy8Jt32T4row+XcmN2GQasgu7YAHPlvapDxlxGaqLbe3/b
X0NcvdveDZ1+Ocb8Ur2zZcO/JB2EGPxp+39yb08JZNgRmBqa3ykG2nlWXnVZ
4iJgF8zk/fUN6S1y2mDNNcwO8xNDyFirHouHGpTAzN2YGsSHydvK7fGNQ8JR
bwds9r5eStRA9xzFbdkoE+coFjgGyNEmuo7M3zE3pXPV7h4pJZCBy9qN1Fcu
/4Rbqbf9wvwLMbiHa/4jzFTncnGe1kT3fDrzhSPJ6E4PHShhTtUF1+Hi7g3X
28InXyi8VgicsF3ceclDilTxGi5BqLV0XpcdZdA1t+ua21FN2Q99AfgLtF41
gJ7UoJ9nFZDM9KYc+wqoQLuQu+auNBWTbwviOLP/xYbVvE6tokEo90/5rjcj
u9Pe3aBFFx8S4xsYs7NWXmIz6qyVea+LzHBWQkvFiM9VO1xCRm9IBt8J5LN+
XbuWGx4VUjhPrRoDzss+n7jbxbK6wz6frCyPu3zj26M6bzAbZSkYJ7j3lrFT
OwvFaRqPSdxNUtY58gmldK00KlIxrnPsXLSVnJYslRfYytSQKFxanA95hUNK
RQkHRBBFnZUU95hBKSnPzMQ9Pja+fFlIKzrJYh9RJypozIuw4N4Rckgr/tvT
5UL8z7kEXRqvp+O8RonSjS2vu3X+hfhc98sijpijsn634bCrbNocp8kJuXQ1
y2m/eu0xX4inefnmbHlX27SVnAZPjX2BQrNT/zPaymi/yUBayPw1Qseqr62+
d0KHlT0SQqe7Jyez3E7z1GKPm+Y5Gy2F5fC1C9uTWd5pwpzAaPc23lFg9Im2
pftpLdadx+JnTvnatDt7hmhcjg6jUxBt37TiLV+Kw6LULbRZJWQjDjugoBwr
TCSJ2KixkGRoA2jJW3OVJP25fSzfIUJ9B6/YutIkKWMsxtCRl6QbxN0csZSt
vE9y3bJ4QVe32buu/6W71bJKzZzqLMGHWnJ8MCkBqUY84tfRSmnqtcpZJIc4
oG4kh+fpXomSazO9y94RbPogTCt5ZXOwDx5pqNdeuqxehZrPP5JN6MzYXawU
2cqFfUOZc3Q9vT46BALs/fkGP3M02vj8kABlfSWHL/B5vZBvg2/Yd7mSKh5Z
+QYCWkp+41ZW+bK6zeZx7EnHHQvBhlaQ80ogi3sxnwS8xmKNCfetydIl4zGQ
yl6B0Wb8q4xqy+FBTDb6Jz3+t1Iw0xaDQzZb6XZHuxYQAgrBPW31xYUgZ5go
IUwnCQHXGDbprN57B9cLOroQyeuk3BPNONudssnCc3QKzsbff3PFwrab3/++
W6i0tTl4zjIj/yId09W6koVWPMfsn0xjf0QmaDrv21wWHTjOpwymwr+zAy/Z
0C7IfPzil0Bx5i9svejb1334gju7Yz5v+G/0iPPdoV5OTkiUgZ2idvDo9VQG
CsB14XNupTN8Mvi5SdMOnzsSNU8Rh08lAysDuhPi/G32bnI4fB/5KNbLsPIx
jGVvCTmE5WT3cmfeYrCQsaswb3E/E2/lDVsjzVsEzmENtp235C2Mm9tZmAmv
Sm5miitq+Jkpr8/2D6+TaWfRI3Wa0toSBSLeeS2QTyxcvg0b5eNmIO6hO2Ed
ddRkIgOh3qe4ovihO2WIBNNO2iyUIhI8d8UVC/fKu4m0SOR1bqMjkmOlmrYt
zzv723SVyHCd6wAYcruvKE1KdnGyg5TQcKvVlJSkzB5IaaNtbsr8Kats5GXr
+giY4gfvjLkEetRPuFicPMV9YCjU1Y4nBhnVe3MKz8jLhJfJ6ojyh3VAcjG0
wdwj55vTLP00YJM5GzVQLuYFSMNnVy4GJwTIYqp494eZ6zKJ01zXRnVHruup
rcfrLFPb6RCHQQ68tHZGW1P8DcX/5eEvjB15B20W/gJ9A+Vv6aieTOI5HwJt
lWFJDJdnszJcqIsxXPhYMbxi+HgzXI6J6zfDvSJ2JIaDj2GGn8oZZW1XWg1L
BcuCdBrQKUMgFLXyV4IosGV+WEUhdEj7ZSmJWpdVFBstzzrPdwfbK+SJsRXF
KKqqSiiVUCqhDINQENYKc2lohaInx96DWSbHIyAAKSdBAFj8k01zQ9srTFgm
jDycZkhXt4xbT2kXVEPzFlkNH2S5mljerai4rAY2LWvKuvOv6mVDkZa4ZSpp
dSWtaU9aKg96gKWsO3GhKByXQ52JOEl74m+thFSWkLxIp5xCeoobAs815nni
vUZxfZGSzV1JKUVKz/gMS9dyXcz+1UvUKXIAV8/y6wTpwykkuGJ6IqRMccS5
RFOo16gzKkkYAxCS+CLzCwnJ5DOLCQlmFpTPAHrSw6ed+hWyIYZKXHTcTini
MguT3cmKno3JCo8g6wBkhaK+/OELbh8uWVEpO56sXkZ/VgRPUw9EIMqLXguc
VBAMd4jBYwH2pTk7B8vFVpCXVZAZOGQOpj9TNvIIV4FIo169E9hABQs1N37o
vNueeePrr4lWkSuofsQD23+OX3Q1y2kbHnzwKZs2wWly4idxZWQhJTAaU0gF
gggFUgV29qv4TwMkrPRhxY/YPEvf9W3vePtNPzpl0w10Ncdpj2466Xor+AlO
kx2msHyij9mSi/v9QvCZo296AxOmdwVgtKITjMQlUy8HSSbNnrGFD3v3ptLQ
BclsGk2AxaigbzNT1gEX0aX5lA+croKg7tAjTExCD9zudCZvCnr0IWYh9Mjv
rtEz4aGnlYL+hSc3+aDBJhQNGnnNogGNnDUcAg3aAMsis220fiFaGMyAp8GD
jgnPazfgARskpLAYeOBXAJ/j4LH5U8Aji21xwAB0vQEPnkCWGHiEYEGFuMk2
+aUIeABBXNdY89sejM+JyRh6OUPRO+mXs7THATvjuutzMToCyFse6TeA6sJQ
ooB2caWgRziu0FPX6IlqVHFTvFwaPdGwwUceywmf0FQ6UZzqEBKbeWuSiLVn
sV+CNacTQYFZ/xqfJdaIq4W6a99IyvQEy+MUf2NckmLWRTWep9iWp0pysJ21
6UA37jIt0E9harjlES4bptYQShdNJstolKVr6MaMw6rH4/oj8T0cz8uWLhnm
RaQ7NWziZAav1EzvJFrBpKSPlmwnQrLFcrrbqZZLrC6NoTNsAub9cTMY8mXG
lkXIIy3jRlzGJNbhETCf3ArQaRkjnzmW6IsXXXjnhZ+9ejtd0T6uqCGnVuST
u6BF2jkkcqc7idK+yGZJduQNWMbipukgYwkBCcj4kwsfv0duRys4DbctxSMt
4HHq2HbSS44fFSmZReIoz6w7SBDMWEsXHlJbVsGhWXYo907APDtoIBRDXgWC
+8VkjGQ61SiTjCfjMhZFTxEeqiGp9tdBnGYDjvB5Tl8F77nVs3g92sQtvpSe
i1vi18sTt5v2dRJ3My5ujumlzE0RcUdx/xGnoSzb4Ody9dKKLOImkmpZnCS5
hJytd4+ZuGERoNdnF/dEXNxQQ1hza/RO4gU6OFZs7Fy+kn1cteJ3AdnHCBwy
2Yv7rJL9jid7lGPf0NVH2U9q2eMezEHb3pAnrZJ72XIXCjPL3bz9D1ix77qs
ZcUCOzkwiML2xf1VYSRgkEQx5SGhLkhgeQU4ObcjQ2JPviH7Qenqo/kg4TUl
ByREzsKhBEggtVxIWOUgf3c45eC8dEb+nvl/oc0S8tJVUh9Vqaf0f0/+of5v
T+PLFs0eTAtF0FRo2hHRJMeddgh0zxzIV6FoR0RR9gONlzuFJyfHGzdRZYhB
I4MvOVxzLPH1Znx3OoVZoar5z6efduPGO24nnYKFWvLnX5hRRxWJVC+mo5oa
Q/hLefk12yt+fQyvcOAj+3xDoCoPU/jVf0xhCSqMqSu/864tN0d/yG3Bbcw3
BVu8XDIlU9c+qS/stBPCoxqcyKzSbOYLAgV4ZlbnwPg+DZB1DT4JS7ceY3xM
eBUWzuVg/OIabcZDXysFmgxxLthlNhgECqEBrfb0sW+8xiDQFoe/4Aedeci4
mNJVaRhCGZUPwwksHKJYWUAEuajyI4HnuJq5TCH1GV8d2WvgzTidJPFehTRe
G+ZEXPL4SGDOUtIBc8KmsjD3PEeeHdQ/HMhcvjcpN1LoqQopaUixR4YYNpFX
v0JKhRTcW6mrsv51wyYY1XAp2ylczjMtKojEISLyHhuIiHE+aIjIXrjRgwgs
YQ0R4fLwQGR/TqPNFT7b+wcbt9ShwIIJBFF1vs2SstQhE8RuICJy7AFE2mfD
jThEjMxKQIjwvTcIgTzopIdBIKSDYkE9iJDKq1hyo4YFgVt0u5EdMGAdqusA
GL3uP+KAkSzDChgqPxEwlFQMJtYFmAyTugeTlRU2ysBGptMONSIwzHRGRKkq
pMLG6OiNdXzj4EcefsZasCHHcIWSCiX+PGcvJw6xA6LTciFnpYec1gcrJDDF
5BgJ/JWFlKhs6Jh8qBPuAjLHJ/oDp8kQnNBw2kR7QmFMYZUpD6awFSoJUyge
ZBHaW/KQ5RVcI3iXzOayMPVcp41QNjV9cy5MTcUxJeWL7OllBrw3ytHDm7Wz
wgrhwiSpFFhJt6YyssFKpFMurBgHb7iGORPVj737rn/FL7oyJylibSae9rr7
tj155Pbv06mL0RynvanTs7zdvynvouoCusKfOHTtuRUx6HpsYOiukHvwAIr4
hckCXfzeVAy16AlUrUGtbK8bUtTaAaBc1IqMu0ZtM4RacVeIE5cbyL7/u961
5eYfbj71RroyRzjKNV2Zox4fOmPzV+9/2/zXdBqOf/zB6Zu/GnvW1THDNWHC
rdFbDLxWJDnAi2q6BO/LpK5ArOTSwvo6Xay26/b86frU38RzyZ7vuoU1EGgH
gHFPyVmtVX8pr79462KsxBo6GGLksHywqUtHQfHSP10zsT06mfH5FqxrOQto
/s1RR36OGGg4DnjLaZUVig2KYcDBsK5QrFE8GUOxh2QzvynrCGRtrEgDiGO7
0fcU4sEgJeSQJSj8FTbT8c/N9IWJscFvI47f1RVuFW7rHm7NvkqDXf98056c
rnwIM1KvTKMZJepaWJkcITlt5xkxrMohHmoqUwSzDcGsbHwzMzh4IiRSDgRJ
16TiYhiGjQobKhuGKQQwhmGxrvE3BcO+Aqk7AMvpJikAfuKEN39J3vcgEyTl
zplGwJxdeVt2cQc9NY0b8fhWJnpNm37uiVlxmGOqKIZkx5laqkmFsFItngQV
hGOnvwnX1H74PMCVx5XrQVojcosB1wZz87QrE2qVxrGo1Wqzk+aVMqiLOeDi
UfkkABcvCRDgSo0auOJbLRO4J1mJm8UdPmO62R4Q21KgvNNkTdtOk56cMZ0L
s/kVcIXeVPTiM/zo7cadVuGqwlWFqwpXFa4qXFW4KoIr74WqeJkMyLRnZtZz
gwpZFaiwHNtDUGlUxEGFVWdMEUcFVEQ4psXnXv/lHzju1mWDHWGKPcqzaNet
557zDTRArx/K+qJQofEVDQHAhBaU1SXA0MQ5x3xfTtP9Qpm/JXbNiEBsQtK+
sPWib0sLFNTEV0YfPmuYvLDfO/NtX5OgGFFz7Nxk+cDlBA/YEKmyCmmDV2Ya
aepYvZgym/REbpgTRxjyyOCZBWFu+0QIV2+xWZJXKSo0VWjKoK/kzXfp+kq5
Yytc7Ti4OpkpjjpH3R8WEFQ1+lW4Kl1fFUGYxPuOPsK4woEjLPCKhx0bYZrv
44Mwax/0BWF1jbDg4+q1oBXURhZqk7p6fCSsgp7btYJZaTCDt80eOD/WMEO0
D2omRibATORewawsmB3uSLAeuFPHCGaNOMwmK2RVyKqQNfrIaqIIFIchEkGl
1MpTukMYglgrhI0FwuAV7c5db3Al23hlcRMV8HbhTm57YTAsYaxLlYwmHXTc
ezRRTHcymnyPWaPvKAJ/e4aiGv20D1PGbjaMG0SJ80o0DVWeqKn0UTfelF5x
zjpcE0JvZEU0DVWRPXCArnJHSeQFFNE4vICS4aRvgMp+Lo6BEaqBakHPtFXm
G/C6BpRo1ApQwwuoAhoK7gXZW1dBq4JWGdB6Nd/wKgwZYxWkKkh1Byk6AKnB
1vWGB7Y/hV90ZQ56kcNg6GouOd+GBx9sSzvige3u2RlO805lbY4ClGEuEKBW
0ncT0bWPbTr5Bg3naKTwDDcxUWmOVcfKw4jj2W64xvZYtIfXheuPbTrp+ru2
vPNmujKnweBdPNvn3/r3Og2nyyAvXZkTYh7ddNIN+KXzgUXb3n7WTXTFp8bU
6VCokYI00hFfbTplA6c+gXFIR2t6guY23wmdT1WG76RGT0/Kpmr5tG5d+eTx
x11H6z77jTas4VDB+W6hooYSXsSGWU6T7RKUtyfYmgr55fAXmIC6O6E7SHnB
JYbSf3/96/6OWjfikIL3B12jglQQUpNJkKIqN2bCE3rtuOOJjp0ElugkjdDk
5HQ7MOZ6OWsFtOxAI1yNLdCOdCKz7QqVI0DLei6HsdWgBEXMEvOVFWjqJJaS
gMaGOdtlYtBK/sEBTU6dUUCjV1gmAo3MS5kvBuaG3hySWUvzENCEg0SNSdiQ
uckt7zn3HwOApGqmA0WyZTuJojKBVI4lzARSt951pBMe8QNXzin9ZwZm6a95
5a43hfUGtBCsxk5OrJ3hN5qIWTPJIJrxJtDL/HbCO9999texyQuPod0gB8fV
4p6BIUqTI4YEhmg5CqVDggwMsc5iJz1NnuB4AZDcaSZR1uXmXZNCJRhL5O3q
YG6ZX3PPIb/UgzJwTbQZDMrrMi0G6YKIkXOh8QhaaKawE5b55oN84MYqO5W7
Pj6V86aGk24qZ/PV3XQRKKQqDPxQtey2jaYSp5ATBE9FEjgCdVMjljbosLwW
8+XcUUJOptfKXpui/nIdsxUqqJM+Tqs815lIZVee63CbnJWHJvbnB9JeVSDf
mkBayBQP0XJIxjpCaUWeDdGck41lk5T12R2U3bOBtLmM+apnR/PZegGoj2J7
q2eLPVsLpFVqpnq2UjPVs31UM/gRXY+vLf6lmR/RE7GvV2S7xXNgzA6MV5IP
1NzZJrupxPxivKDdggXJEzTxWC3J9nUMlBwr6NmqIHOWMM3fInPspzH3aCpl
aIm3TBexUzx76x+fGLrWFtnmhuX63JTRu996ZpEbIPc1eZyf2s3VTPgzT6lk
cXnSUKZL50dm1SspstdcF/Yuzrv8S8v+MdW6mjrzzoCMvm9J5NZk5M5Lba/b
uDIS6UV7zLqUK9ue1+qeabWrlkhC3SPBLKFGi64+U+qS+I+yVTXZLj9TJopq
DpeUtgWgbYuyXo21tuVMoiPPkqye8cg3dcnzbdhlTgrzlz3us3CYY2vi+kL1
DCPEHCSYU+o8UOjzfj1ykXIHJc/EKln2iNJOmRgifPYpF0qrGM6zh5Xq+vXS
Pm7D/AJYpfpKBhI04mLPcHU7Z64uUXIWHYMTzffb0NuII6seA3ACANs51um+
P6gJgK2g1zuBN8OUMfNW5qpZmGM1wIL/rKd5PNzGC/WAYx5wFXFznteZa7ZO
M8pBoEuirbj4xHYFSND1MQ3PbtOmueuz/cSTWH0wUglC1rdr4pB1kPOyBRga
u+83OM5s5u+Eos57vBEfWGL8yVq51XBTsTx+/lZjG1RNohXRxidpgGe5uWr5
9m4pbBRM6VLxeOvvkhtx+fn42e76/Rw+Cao+gbAPpjzVpUqwbewfiIi0CSFm
hx7G2exocONdn+Sse8a6d5zCuDHcfr9NRcXzKN5bTPszhoYhpZvq20SkRb3k
rNW2kRsp3/LYpU3fuPQCFSv1xs+sjvFCxlkrvWh+ft41JkacooGL28snIaS9
g8N6luriPXA5ckW1a+bBSem+ALY1k5mmdZr6KDYpCNDXDtq0GUOQ/oSxzGds
M9jFkmqPoraRMjxy+uXFcYEnbo2xyk3XJuNS9Sr3h3whMG7exlhhy4uJ39xv
U8d7JZIg/AhOdjJW56Zh/rXG9eClFNLZWqHInEvr8fWtiYGuL8k2DEyDCM8y
dvAEQwvcV4ANoUf1Q6ZnVcY6nQWG2Y1fVzPIZ+cQUH1QI7ld27aPr22VG0ah
Qq5gtc/EjuNzghBl8JwI2tT2TaS7OmjkrMm2ZFG96NQ8OyziaYdwm6dxt3Dy
bMxIcdqp7kd24PtfrGEU18DLuoDds2Vbl7HqJ0L9UynCunwrO2zOkhAXrqdu
5gQ6cUcX36ayHk6pUr/ddm3GfOvS6/ypau0eAY1AN9zXXip77CujZ7q6NVy3
op3+H8mSs9A=\
\>"]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Optimization parameter: ratio of the final net equity over the maximum \
drawdown\
\>", "Subsection",
 CellChangeTimes->{{3.5758582929401236`*^9, 3.575858309437067*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"RoA", "=", 
  RowBox[{"Equity", "/", 
   RowBox[{"Abs", "[", 
    RowBox[{"Min", "[", "DDList", "]"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.575905503931616*^9, 3.575905504196816*^9}, {
  3.5759057172931905`*^9, 3.575905717511591*^9}}],

Cell[BoxData["23.13426329555362`"], "Output",
 CellChangeTimes->{{3.575825429582138*^9, 3.5758254667414036`*^9}, 
   3.5758254987370596`*^9, {3.5758255951930294`*^9, 3.5758256864687896`*^9}, {
   3.5758261097285595`*^9, 3.5758261181330404`*^9}, 3.575826881002674*^9, {
   3.5758291266209784`*^9, 3.575829141987005*^9}, 3.5758311748195763`*^9, 
   3.5758391350970707`*^9, 3.575840136514768*^9, {3.575842163987733*^9, 
   3.5758421887021465`*^9}, 3.575842473367429*^9, 3.575842610244258*^9, 
   3.57584285559029*^9, {3.5758431268488054`*^9, 3.5758431401155643`*^9}, 
   3.575843233600911*^9, 3.5758433799932847`*^9, {3.575843546092785*^9, 
   3.575843556090357*^9}, 3.5758436481836243`*^9, {3.575843736948701*^9, 
   3.5758437562898073`*^9}, 3.5758437924098735`*^9, 3.5758439203721924`*^9, {
   3.575852950794761*^9, 3.5758530476397314`*^9}, {3.5758531060774336`*^9, 
   3.575853122566663*^9}, 3.575854294045823*^9, 3.5758545395590544`*^9, 
   3.575854895381079*^9, 3.5758549460187683`*^9, 3.5758558537138166`*^9, 
   3.5758571984595227`*^9, 3.5758581917193336`*^9, 3.5758582288214564`*^9, 
   3.575858276780199*^9, 3.5758583128292613`*^9, 3.5758607573890743`*^9, {
   3.5759054892675896`*^9, 3.5759055047896175`*^9}, 3.575905572415736*^9, {
   3.575905708697575*^9, 3.5759057179795914`*^9}}]
}, Open  ]]
}, Open  ]]
}, Closed]]
},
PrintingStyleEnvironment->"Condensed",
WindowSize->{1358, 641},
WindowMargins->{{Automatic, 0}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{32000, 32000},
PrintingOptions->{"Magnification"->1.,
"PaperOrientation"->"Landscape",
"PaperSize"->{792, 612},
"PrintCellBrackets"->False,
"PrintMultipleHorizontalPages"->True,
"PrintRegistrationMarks"->False,
"PrintingMargins"->{{54, 54}, {72, 72}}},
CellContext->Notebook,
FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (October 6, 2011)",
StyleDefinitions->FrontEnd`FileName[{"Creative"}, "NaturalColor.nb", 
  CharacterEncoding -> "WindowsANSI"]
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 166, 2, 75, "Section"],
Cell[736, 26, 480, 12, 102, "Input"],
Cell[1219, 40, 307, 10, 41, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[1563, 55, 283, 3, 45, "Section"],
Cell[CellGroupData[{
Cell[1871, 62, 644, 15, 82, "Input"],
Cell[2518, 79, 444, 7, 40, "Output"]
}, Open  ]],
Cell[2977, 89, 1206, 27, 82, "Input"],
Cell[CellGroupData[{
Cell[4208, 120, 35, 0, 41, "Input"],
Cell[4246, 122, 147, 2, 40, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4430, 129, 205, 4, 41, "Input"],
Cell[4638, 135, 441, 7, 40, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[5128, 148, 109, 1, 45, "Section"],
Cell[CellGroupData[{
Cell[5262, 153, 3419, 67, 182, "Input"],
Cell[8684, 222, 2798, 39, 40, "Output"],
Cell[11485, 263, 2802, 39, 40, "Output"],
Cell[14290, 304, 2801, 39, 40, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17128, 348, 3297, 94, 282, "Input"],
Cell[20428, 444, 1010, 18, 43, "Output"]
}, Open  ]],
Cell[21453, 465, 7164, 171, 342, "Input"],
Cell[CellGroupData[{
Cell[28642, 640, 94, 1, 36, "Subsection"],
Cell[CellGroupData[{
Cell[28761, 645, 1236, 32, 62, "Input"],
Cell[30000, 679, 165, 2, 40, "Output"],
Cell[30168, 683, 165, 2, 40, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[30382, 691, 95, 1, 36, "Subsection"],
Cell[CellGroupData[{
Cell[30502, 696, 4228, 99, 282, "Input"],
Cell[34733, 797, 913, 18, 40, "Output"]
}, Open  ]]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[35707, 822, 151, 2, 45, "Section"],
Cell[CellGroupData[{
Cell[35883, 828, 99, 1, 36, "Subsection"],
Cell[CellGroupData[{
Cell[36007, 833, 10171, 252, 762, "Input"],
Cell[46181, 1087, 635, 10, 40, "Output"],
Cell[46819, 1099, 586, 8, 40, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[47454, 1113, 125, 1, 36, "Subsection"],
Cell[CellGroupData[{
Cell[47604, 1118, 3141, 72, 182, "Input"],
Cell[50748, 1192, 78300, 1308, 405, 62398, 1049, "CachedBoxData", "BoxData", \
"Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[129097, 2506, 179, 4, 36, "Subsection"],
Cell[CellGroupData[{
Cell[129301, 2514, 264, 6, 41, "Input"],
Cell[129568, 2522, 1290, 17, 40, "Output"]
}, Open  ]]
}, Open  ]]
}, Closed]]
}
]
*)

(* End of internal cache information *)