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

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

(* CreatedBy='Mathematica 12.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     86746,       1640]
NotebookOptionsPosition[     85067,       1606]
NotebookOutlinePosition[     85402,       1621]
CellTagsIndexPosition[     85359,       1618]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"**", "**", " ", "This"}], " ", "is", " ", "an", " ", 
      "extremely", " ", "simple", " ", "script", " ", "to", " ", "show", " ", 
      "how", " ", "any", " ", "state", " ", "can", " ", "be", " ", 
      "approximated", " ", "by", " ", "smearing", " ", "boundary", " ", 
      "operators", " ", "over", " ", "a", " ", "finite", " ", "time"}], "-", 
     RowBox[{
      RowBox[{"band", ".", " ", "Here"}], " ", "the", " ", "extent", " ", 
      "of", " ", "the", " ", "time"}], "-", 
     RowBox[{"band", " ", "is", " ", "taken", " ", "to", " ", 
      RowBox[{"be", " ", "[", 
       RowBox[{"0", ",", "1"}], "]"}], "\[IndentingNewLine]", "in", " ", 
      "units", " ", "where", " ", "the", " ", "light"}], "-", 
     RowBox[{"crossing", " ", "time", " ", "of", " ", "AdS", " ", "is", " ", 
      RowBox[{"\[Pi]", ".", " ", "This"}], " ", "can", " ", "be", " ", 
      "changed", " ", "by", " ", "changing", " ", "the", " ", 
      "\"\<window\>\"", " ", "function", " ", 
      RowBox[{"below", ".", " ", "The"}], " ", "window", " ", "function", " ",
       "used", " ", "below", " ", "has", " ", "the", " ", "advantage", " ", 
      "that", " ", "its", " ", "Fourier", " ", "transform", " ", "dies", " ", 
      "off", " ", "very", " ", "rapidly", " ", "for", " ", "large", " ", 
      "positive", " ", "and", " ", "negative", " ", 
      RowBox[{"frequencies", ".", " ", "On"}], " ", "the", " ", "other", " ", 
      "hand"}]}], ",", " ", 
    RowBox[{
    "it", " ", "has", " ", "the", " ", "disadvantage", " ", "that", " ", 
     "the", " ", "Fourier", " ", "transform", " ", "is", " ", "not", " ", 
     "known", " ", 
     RowBox[{"analytically", ".", "  ", "For"}], " ", "this", " ", "reason"}],
     ",", " ", 
    RowBox[{
    "with", " ", "the", " ", "window", " ", "function", " ", "below"}], ",", 
    " ", 
    RowBox[{
    "it", " ", "is", " ", "difficult", " ", "to", " ", "increase", " ", "N_", 
     
     RowBox[{"{", "cut", "}"}], " ", "or", " ", "nostates", " ", "to", " ", 
     "much", " ", "larger", " ", "values", " ", "than", " ", "100.", " ", 
     "This", " ", "also", " ", "means", " ", "that", " ", "the", " ", 
     "accuracy", " ", "of", " ", "the", " ", "reconstruction", " ", "is", " ",
      "limited", " ", "to", " ", "about", " ", "1", 
     RowBox[{"%", ".", "  ", "We"}], " ", "invite", " ", "users", " ", "of", 
     " ", "this", " ", "script", " ", "to", " ", "modify", " ", "the", " ", 
     "window", " ", "function"}], ",", " ", 
    RowBox[{
    "and", " ", "inform", " ", "us", " ", "if", " ", "they", " ", "obtain", 
     " ", "interesting", " ", "results", " ", "and", " ", "can", " ", 
     "increase", " ", "the", " ", "numerical", " ", "accuracy", " ", 
     RowBox[{"significanty", "."}]}]}], " ", "*****)"}], 
  "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.8040364831005297`*^9, 3.804036497470373*^9}, 
   3.805350640266562*^9, {3.805420811744164*^9, 3.805420869588849*^9}, {
   3.805421997710637*^9, 3.805422187200521*^9}},
 CellLabel->"In[1]:=",ExpressionUUID->"f03b134a-0d76-4219-a648-52ae2adcef19"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8054598970546293`*^9, 3.8054599226159897`*^9}, 
   3.805460124974615*^9},
 CellLabel->"In[2]:=",ExpressionUUID->"1b743285-9917-49d5-ba5d-279816e85d2b"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"window", "[", "x_", "]"}], " ", ":=", " ", 
  RowBox[{"If", "[", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"x", " ", ">", " ", "0"}], " ", "&&", " ", 
      RowBox[{"x", " ", "<", " ", "1"}]}], ")"}], ",", " ", 
    RowBox[{"Exp", "[", 
     RowBox[{"1", "/", 
      RowBox[{"(", 
       RowBox[{"x", " ", 
        RowBox[{"(", 
         RowBox[{"x", " ", "-", " ", "1"}], ")"}]}], ")"}]}], "]"}], ",", " ",
     "0"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"windowf", "[", 
   RowBox[{"n_", "?", "NumericQ"}], "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"windowf", "[", "n", "]"}], " ", "=", " ", 
   RowBox[{"NIntegrate", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"window", "[", "x", "]"}], " ", 
      RowBox[{"Exp", "[", 
       RowBox[{"I", " ", "n", " ", "x"}], "]"}]}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"x", ",", " ", "0", ",", " ", "1"}], "}"}], ",", " ", 
     RowBox[{"MaxRecursion", " ", "\[Rule]", " ", "20"}]}], 
    "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"state", "[", 
    RowBox[{
    "\[CapitalDelta]_", ",", "  ", "l_", ",", " ", "d_", ",", " ", "Ncut_", 
     ",", "m_"}], "]"}], " ", ":=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"windowf", "[", 
       RowBox[{
        RowBox[{"2", " ", "n"}], " ", "+", " ", "\[CapitalDelta]", " ", "+", 
        " ", "l", " ", "+", " ", "m"}], "]"}], "*", 
      RowBox[{"Sqrt", "[", 
       RowBox[{"G", "[", 
        RowBox[{"n", ",", "l", ",", "d", ",", "\[CapitalDelta]"}], "]"}], 
       "]"}]}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"n", ",", " ", "0", ",", " ", "Ncut"}], "}"}]}], "]"}]}], 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"computes", " ", "the", " ", "state", " ", "created", " ", 
     RowBox[{"by", " ", "\\", "int"}], " ", "O", 
     RowBox[{"(", "t", ")"}], " ", 
     RowBox[{"e", "^", 
      RowBox[{"{", 
       RowBox[{"i", " ", "m", " ", "t"}], "}"}]}], " ", 
     RowBox[{"window", "[", "t", "]"}], " ", "d", " ", "t"}], ",", " ", 
    RowBox[{
     RowBox[{
     "where", " ", "O", " ", "has", " ", "an", " ", "expansion", " ", "as", 
      " ", "O", 
      RowBox[{"(", "t", ")"}]}], " ", "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"\\", "sum_n"}], " ", "O_n", " ", 
       RowBox[{"e", "^", 
        RowBox[{"{", 
         RowBox[{"i", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", "n"}], " ", "+", " ", "l", " ", "+", " ", 
            RowBox[{"\\", "Delta"}]}], ")"}], " ", "t"}], "}"}]}]}], " ", "+",
       " ", 
      RowBox[{"h", ".", "c"}]}]}]}], " ", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"G", "[", 
   RowBox[{"n_", ",", " ", "l_", ",", "d_", ",", "  ", "\[CapitalDelta]_"}], 
   "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"G", "[", 
    RowBox[{"n", ",", "l", ",", "d", ",", "\[CapitalDelta]"}], "]"}], " ", 
   "=", " ", 
   RowBox[{"4", " ", 
    RowBox[{"\[Pi]", "^", "d"}], " ", 
    RowBox[{"Gamma", "[", 
     RowBox[{"\[CapitalDelta]", " ", "+", " ", "n", " ", "+", " ", "l"}], 
     "]"}], " ", 
    RowBox[{
     RowBox[{"Gamma", "[", 
      RowBox[{
      "\[CapitalDelta]", " ", "+", " ", "n", " ", "+", " ", "1", " ", "-", 
       " ", 
       RowBox[{"d", "/", "2"}]}], "]"}], "/", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"Gamma", "[", 
        RowBox[{"d", "/", "2"}], "]"}], " ", 
       RowBox[{"Gamma", "[", 
        RowBox[{"n", " ", "+", " ", "1"}], "]"}], " ", 
       RowBox[{"Gamma", "[", "\[CapitalDelta]", "]"}], " ", 
       RowBox[{"Gamma", "[", 
        RowBox[{"\[CapitalDelta]", " ", "+", " ", "1", " ", "-", " ", 
         RowBox[{"d", "/", "2"}]}], "]"}], " ", 
       RowBox[{"Gamma", "[", 
        RowBox[{
         RowBox[{"d", "/", "2"}], " ", "+", " ", "n", " ", "+", " ", "l"}], 
        "]"}]}], ")"}]}]}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"eneigstate", "[", 
     RowBox[{"n_", ",", " ", "Ncut_"}], "]"}], " ", ":=", " ", 
    RowBox[{"Module", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"temp", ",", "i"}], "}"}], ",", " ", 
      RowBox[{
       RowBox[{"temp", "=", 
        RowBox[{"Table", "[", 
         RowBox[{"0", ",", " ", 
          RowBox[{"{", 
           RowBox[{"i", ",", "0", ",", " ", "Ncut"}], "}"}]}], "]"}]}], ";", 
       " ", 
       RowBox[{
        RowBox[{"temp", "[", 
         RowBox[{"[", 
          RowBox[{"n", "+", "1"}], "]"}], "]"}], " ", "=", " ", "1"}], ";", 
       " ", "temp"}]}], "]"}]}], ";"}], 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "This", " ", "simply", " ", "puts", " ", "a", " ", "\"\<1\>\"", " ", "in",
      " ", "the", " ", 
     RowBox[{"(", 
      RowBox[{"n", "+", "1"}], ")"}], "th", " ", 
     RowBox[{"place", ".", " ", "The"}], " ", "idea", " ", "is", " ", "to", 
     " ", "compare", " ", "states", " ", "with", " ", "a", " ", "fixed", " ", 
     "angular", " ", "momentum"}], ",", " ", 
    RowBox[{
    "so", " ", "that", " ", "they", " ", "are", " ", "then", " ", "labelled", 
     " ", "by", " ", 
     RowBox[{"n", "."}]}]}], "  ", "*)"}]}]}], "Input",
 CellChangeTimes->{{3.804028242705327*^9, 3.804028314515818*^9}, {
   3.804028917012205*^9, 3.804028929117559*^9}, {3.8041548658859873`*^9, 
   3.8041548662483683`*^9}, {3.804154908770089*^9, 3.804154920214857*^9}, {
   3.804209596508483*^9, 3.804209620816728*^9}, {3.805350783761807*^9, 
   3.8053508212913733`*^9}, {3.805353093401428*^9, 3.8053530943168907`*^9}, {
   3.805353244810075*^9, 3.8053532458555307`*^9}, {3.805355284115487*^9, 
   3.805355285048184*^9}, 3.805355657239215*^9, {3.8053560206941433`*^9, 
   3.805356023284205*^9}, {3.805356109530451*^9, 3.805356111166099*^9}, {
   3.805356227401641*^9, 3.805356228106627*^9}, {3.805356297308243*^9, 
   3.805356306434513*^9}, {3.805356365775319*^9, 3.805356368420575*^9}, {
   3.8053564881160316`*^9, 3.805356488438459*^9}, {3.805356723929036*^9, 
   3.805356749377859*^9}, {3.805460255926854*^9, 3.805460259585678*^9}},
 CellLabel->"In[3]:=",ExpressionUUID->"13805f10-16d6-4f89-bc2d-3eba39646ce6"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"window", "[", "x", "]"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"x", ",", " ", "0", ",", " ", "\[Pi]"}], "}"}], ",", " ", 
   RowBox[{"PlotRange", " ", "\[Rule]", " ", "All"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.804028905342493*^9, 3.8040289404771357`*^9}, {
  3.80415484380515*^9, 3.804154844572657*^9}, {3.805459665884947*^9, 
  3.805459673474278*^9}},
 CellLabel->"In[8]:=",ExpressionUUID->"d76259cb-7019-42a0-b100-29a24d303372"],

Cell[BoxData[
 TemplateBox[{
  "General","munfl",
   "\"\\!\\(\\*RowBox[{\\\"Exp\\\", \\\"[\\\", RowBox[{\\\"-\\\", \
\\\"15582.602884367929`\\\"}], \\\"]\\\"}]\\) is too small to represent as a \
normalized machine number; precision may be lost.\"",2,8,1,
   18721104492499696644,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8040289121798162`*^9, 3.8040289407426577`*^9}, 
   3.8053506451090593`*^9, 3.8053530992088423`*^9, 3.805353460789*^9, 
   3.805355316378522*^9, 3.805355669657131*^9, 3.8053560416305*^9, 
   3.805356119519912*^9, 3.8053563123038282`*^9, {3.805356376840652*^9, 
   3.805356403649514*^9}, 3.8053565944634237`*^9, 3.805356754233508*^9, {
   3.8054596669199533`*^9, 3.805459684785688*^9}, {3.8054602688092623`*^9, 
   3.805460285324278*^9}, 3.8055431932662163`*^9, 3.8225411368129177`*^9, 
   3.822627964195778*^9},
 CellLabel->
  "During evaluation of \
In[8]:=",ExpressionUUID->"9e556aac-fb8b-4466-a829-5ad584bdf248"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJw9mXc012/4/5GiHakkqURENOzxfj2LoqSopGEkREZE9kqljMx3RsksKyub
bEKIQrLlbY/3MBJF+Xz9zvl9v69/7vM4932er+u+ntd1znXOfcDQ+vIdFiYm
pgZmJqb/t66p2PBlWMqGYPr/n+BkuQLfCw38Ly9lHTXuJt+CrncJ8d/pLRyj
XHd/F5CtcXFdZ1BRma1wj4pXdSL5Ia7crGKy6xOQ/H6LLBRNDkJ88/YAz8UV
uWwJcdnh2mBILNsl585dlXeUedHnWB2Cp9xXpB7oJsizQk8wvuQFio3u3grT
PqzAd3G24GdGBCR+mXzqC5lVGLmkreOT+hLvZP+0N5dzK6ZdLfmPN/kVxLkN
fI0fE4qyek/PqsS9hhnfqVTCyVNxxWCK1hMVhfdbn7VZ+0Qr1hprhFi/isbj
+292D2oWKfrfzZNiDY/BTxgKh/q2KV623N3zkhyLt+e5NYR1pxQ3yaIiXDUO
yo4pBbwRzKSZDzYcg7VxoNY4TWsJ7yR9U0gwEj0dj/VZsk9OOYuQCso68u2r
49F/6hv7XX6C9Arr2StPvsFUTmuInqkmya1K4eaGijcIaE6uPyJwm2SgbJWu
RXoLB43XRfthQ1KujVuJKXmL8dyntberPEmHVL9pTsolQP1c7QtVryDShoa1
byWKEnBG9rXLaHUUia4m+8tdOhEsstaX7j19R2ppMletz0uEb8HDlcmtBaTc
i9GvOCWS0EEUl7dEVZPCW75SdbOTML9dmetezheSy2UWIvloMsTnhNPcP3WR
9Nolg2czkqEv1M127PUw6aS26ZDCkRTE3zp/f8aWQRLoeiX5LDUFqR4Xny/K
L5LYbjY9axF+h8snViSuWTETU70rXTzJ71B7cKdpSuV6olnvuOgdwVRw8/U5
RpRzElkDRu7v36bCgbvJ7MMEDxF6O/zrnwNpeNJK39u19SDhOFx/4HRcGpbb
nve2pokQN+8sPwjkS8e49Gtu//snCGJcrK4rKh278qYNH0rLEQfMDLgP7slA
W5eq1MLmUwQrlWx+71UG3PEnaH2nCjFuWVtauCsT+ibhiD5/kWhkLG5hCc/E
iZzZmvKJK0TmfZHb6lzv4RE2Zlk0c4MImdPNDSe/B3/n+1+W1QZEwI5IxcrN
WVik3pjUZNwh2rKf7pO6nAWt/xZL520siZ0XbVhSw7OQ92itb5eaLaEzpTvK
15uFgrdq4nnajkTcs7P1L/ZlQ2U+crrX350Y4ZdMYzfOht1pDVN18mPicMW+
QPeUbNztCz5nKu5NWOlstJmjZUN4hfukRrk/kbu4cMX0eA4Ym9maWPJDiN8v
hqT77HPwmXUtj9D7MELx2Jfdl4pzEEW9a+lpEkk8avrwt3YlB6ePab1JX4gl
6u4mDsgr58I3s1+fA2+JDWtDqt9756LuT/C9I1uTCY14t0SBplyo/gy+Oe+e
RoSS7vq82paHdqp+VLpGFtHdfcViy9U8+Jea6j88nUvwOeDik1d5+Min1SD4
roAw5BQ9/rs/D/JHmioV/IqJ5MydXPf489HmukNA/Vc5QVNjWRw0ycd60RIV
i79VxLFxerd2Wj6U3u0XE2mrIeyfdJd+ns6HUd1OFz7WeqJ4X23sSckCbP22
MY319WdipSTrcb5TAaKj+o32xH0llK9H3REpK8BZyjUJ8pY2wmfe+2wscyEM
btqRTwS2E03BD0S5VApBjgizu6LVSXCI3dri61cIu06DC69NegjtBrXZf18K
cedmzea5xn4i8o50u+32ImTLuGlWfqQQA8z8hePXirBlzQXe661DhEDM5kjd
qCLcHX+RF8oxStyV/+PWSinCMd1j/pPe40RGx8gtFcEP2Hn7VeyEzBQxZ9ui
VGL2AbqVvpWnBOmE9NZSwWOZHxAplDVGOTxDuKYlsyfOfUD+4/iplOFZgnXE
40ugazEOm/dljdX9Is55mmevqSyGRoD5W+/5RSKQVzvUibUEXVyL/WsvLBFt
Racc6WdL8PSGTH1o219i11Wxm4YBJeikTiTYev9H6M5ykzpbS+BnZP/7pzQz
4gJY96vvLEWhSrn+wRoWiNT1jkrFlqLU+eMjnuPrYG34qT51uBSBGd8Vz21n
R95KTto+4TJwaA+wyHNtAEnGz2Z9dhl0tMnjVxy34PE3ey2PX2XIVDqpunJv
G+qsb8v8lCvHhmuRTSdyOKCZIvuvr7ocXFtCpOtsuRB2WoByia0C29KULSxm
dqCHsvVj3fkKND0X2OX+eBeMdo/7ZLVXgD9575DdGA/ab07mkzdV4sFRAYk3
H3ixIHxLqFm8EjPBjuyNb/mgUKu2QelBJQjfbpWGWwewrT3pq8yLSnhXuhDH
TPgxMsQSJpZbCa393YJZjgcRyFSyb/fPSjwSffnpb6kgjLbuGt2yvQotxlJS
52YPQZbvQSqrRBWS/moPZBwXxpCCqNSMbRVkixvcizpFUKjmvTRKrsLbXQFz
XaQj8L8xXNGbU4UHQrsC12WLQcrxtdqnuSpUVY3lF986Bp+cjQYxttVYzmuQ
sK2SgF6VqWAouRo5MlqHetMkcaLl45RvTjUCi7cFpUZLoY/uam8/V41kr/c9
QxEyOHqY5qdu+xH357nDjCYVwCp7VlOJ/BGMVPKpTA4SulQSdsjmfMSBlcPi
vEoEHhvrxh2c+whtncjjPXon0RHblL9kUwNWYcHhP+uVkZYp7DoTUoOrcaVy
ZRXK8CzzOjmWXYOLl5OP9jmfxuFexc+tszXYMDURcH75DNx2ZlBSbGphVSbZ
mSNxDpcE1yfFhNTitVvIJe7NajgkecciNLsW+s8dIjdT1dByae/Cw9laZEkN
7C3JU8fBgICN12zqUJdVmPoZmvj9erJFPaQOIi3OgX/KNdGUeiZcKbsOppcj
LD1OXoJD/b/94rN18Mo3sghRu4zGNVbSa20+wfrJvsezLlq473Lxdu79elyz
+NxXon4DalaKKezB9Uh25rQ4zbiBg4Yi03rv67Fs3B2xkXwTHefWubMz6hEk
Kh2mSdEBaXf5Sz2LBmy69d7eN0IfG4rEWthMGsF19FeOs4whRtL27NJ72git
MLUdNa8MUR67Xj8noRGdWYu6vP8MYeM9StUdboSzQIzWTJ0RurSj2XIMPuPv
na1yiyZ3kPhrE3R1muBjsmw+2nEXHpNLT7NdmrCkoKgld84M1/snmtZFNoF3
S1y7W6kZNtXW3MzuaoKIXmBCQ6I5bEPdHNZpN6/mu2JC7oklTkrQMrI0vyAs
vfxmmsR93Cu6E8hysAWV+zau47ttB/Fzl/YzS7ZAlq5dVJ5uh5luxZz/Trcg
fik8v/i3HeyWt3f8NWlBkUUMT1mIPVyI6r2LqS3I53r3p+CTA57V8GVQT7SC
+2P21Y5Tzohr6fzcrtSG7nV2mnq3PdA+cW59smE7eB/wDDbaeGH6lfCZJ7bt
GA967tH00gsbzrM9uvW4Hf1+tmrVFV44mVHze9ebdgQhON9781Ok2WDCZ7Ad
/AF6zKYpT/F4SfKTucF3sA4fix/ueYajm/Y/FdfvQLGW3X1TcV+ola1UbrDq
wC99VUbmZV8YW/X/HXPvwPPmzugOB19EtkTaxUZ3INH+85Wacl+sC9thvK2/
A+XHkmLWX/BD396NynM6nVg0O7fvo+Fz+B1dYCq40YVgLvUoQ+sAuDieEx0z
74Lp1bKycyEBMKuIurrTrQtpzj/f/c4JwFkN5VSHmC40nYjOSPsVADbr4Csy
w12QExJTvOYUCK9MkaQiy26YWPi1atgGwW7BvWXCvRuN2yNO2wUHwYhoXeIO
6sZLxoWL1zODoPTFUcM5uxvDbjFn9SaDwMyo+S230I2oJKNNQuLB8BC7db7k
YQ/iH26tz4sMhpV9jj01uAeHdv879C45GHpla+P2vOnB4cShEee8YCheSJ93
relB2fSHD++bg7Fs+SdacX0vJJ/Kh5iuBMMp/cVMGbkXYhmqJpTrIbg7P8bD
eNuL119/7H5qFIJrivJn+PJ7oSmmdHeNVQikmyivPDp7Ub/uu7z/4xDMU8WU
wduHAm+juMZ3IbARrQ+rTOxb/Z9qXe9MCEbujHjGFfShnt3fa/h3CLTjmCw9
P/XBkM1WooaJDPkdckonJ/swd8JnYes2Mlj+e8eoONKPdU0ucl+OkGEnV9cd
S+qHYLB5XKQEGWMPhmoeXuxH7F1fMciT0TjB8xr3+5Ez3XVrmyoZ5LbnqhW5
/UiebWts0SeDdXPKidiafrgx667VNSbDQbVm78Pv/ajhya4oNyPjZunfn8Ri
Py4aiVhssCOjaYF7gI/9Bz5Wmcr9dCKDOC7VuML9A/Gib0/lupPBn3Qvrlz+
B+o+3KosekZGKMX3ecz5H5CMv8u94kfGuj1JDh66P9BS73GPJ4iMqaAf6oTH
D0hYz3d2hpOh27gkwxf0AxmiZ745RZLxhXXXwZXYHzis9zRiJpqMHGeNP2VV
P/DWrlrdOIEMgTyLkei2H1hK3SFskExGOMP7q/vwDwyWsMafSCWD/XBCsd78
D0TY7s7sTSfDxagykbR2AN5pZio678mgRfcF7905gBiFiNvZ2WTod/12/Xdo
AF7dXxf7c8lo4dxh2i8zgB9szcyD+WQoXTh+uezsAPSY252KC8nI875Air4x
gP1J+drmH8g4VG0m7G6+qmf+JWymmIyXf59u13MdwJqz645fKCVjg8ybFUX/
AQhnthz0LCPDzaZ8kjd6ABMOR8x9y8lgpPW0/81YPd/7lsmsggyDsYWKvvIB
hN9VH+GrJOPb/u1ppV8HMLpUx5m2yio6R8OjKAOg5sJvcxUZRWHnH7nNDoB7
8d45lVXeMSEhLc5MAfVOqMbVVb64tlo0Zj0FFf2eUfKr7M2veWALJwWGjv7H
Flb1KvFjpwcPBRPerzf5rPIfXctNDH4K1N7uPTGzGs8JlyVmfVEKlOM2vxVf
ZYsIn8VmiVX96NnbyqvxJ+TtpJMUKcja0Gsjvnq//taEoYzTFLSmm3RMl5Cx
c/pE194LFFill77wXs2Pxqaq5oCrFOyIDc78VUSGz2GNj//0KCgKPXBEfjW/
VSr9RfdMKNA4JM95dTX/S0YWmf1Wq/tPj5mqrPpjwPHTqdSBgrAanfdSq/7V
lrsov/agoCsjo4tp1d/g3X5d1wMp6OUcnRBZrYeFOo63MuEUzIgP9/uu1ouu
3at7O2MoaLsm11KzWk9CX1NY2jMoaG7NaP4SQ4a/27HmnHwK7LOkpqJfkzF3
uCgipIwCM8rEoXMvySj3+nREo5mC0CfSwpIhZGjJj2k30ij42/rMXu8RGcXj
9w68m6egeuZlyZbV/tgX9ovq/ZeCP0ecXKNW+2dqmvXRmU2DyDlrEH3BmoxH
iQfTKkUHIcaVNsems9rPl9PsYyUGkXtpU0DMVTLUmSROeigMoocncwenJhnc
OkrfFc4P4ueBWYng02Rkbrv9X4H5IAaOjD+fEiWDq3yiIcx2ELXLDW7mgmQ4
W9wPtXMZRP0Be+onPjJO1z08fMJvEBHia8h7OMjodY25kvFuVT9633nh+RCw
j/cmv50YxKeUwW3U3BBYhRrZPp4ZhNz+b3wX0kLw7RRV8fbvQby6Lsgb+CYE
MVFLrXzsQ2j/L1QzIzgEUpd3/30lNIQPJr9TVycQGJZpawabDOFlbyy9gScE
Jwq4OXdbD4G+XOF0amsIWN73fIt3HMLN+6f0QteE4E2c/rVcnyHcOepFaaIG
Y+iJiX5H6hCYrnMVBBQHw1DNwZJ3egiawglDjpdWuTPMJ8VxGNI90tfymgJX
58Frasc9h9F6mHghnxEIlobdm4p9hqFn3NjhFRCIN8XRQZ9fDWNl3V8H0wuB
GIpODGeUDGNXQKrTg8YAGBrnJ0gyjcCkSKh9b7E/jGbbKyt9RrBixlxU9sAP
Bi7B14qCR2C7JipST9MPumvUGe9fjsAovcy2+4gftHd83BObMgIP1sMSpqO+
OCuX7eBePwLZbj3XKS1fiD8KOCLPPgqeaOGyreI++L1N5WWu9ygkPM9+Xtf8
FP7HCq2Tno1hWZeRrjvkicYTnWP2gWM4+tMqI73EE+xSi3pnwsdAm+H/yhLm
CS85GfWRxDFcsNK/XqPqCVelQmH+2jEI+Sm/uq3zEOZahYPRa8aR70KaSlx0
g6pT4ZUwz3FwxlRXfVN3gpdLZ6Oxzzhkj30sbF/jhGq3xVOSweOwSW6V5ihx
BPFI5ti32HEImRtXKIk4QtqvcBNHxTjm6iuMszc6QCCqsNb/3zikYyqz1/Y9
AEtloYyXywQ2iC6v3eNsjdTNnEn/Hk/g6PvDfr9mrHBZx5LL8fkEbF8PhtaZ
WeHtwv5Zs6gJyMuMidzQv4fTYn6pGuUT2PTmW/PLKxZ4Fqm7dw/LJKxOSH85
aGMK8YmC56EbJsF/LSrn+x8TdEhxLG3ePokFlenNGU9MINRa28EkMIlBT2bp
jsg7qGc7Gjx2ZhKsc+wWVzuNsMGeeU2O7ySiB1xEaX4GyKnWsRElTyKuojCK
RcgAN7cVDCRETuL1qZKmcp9bSEszL41Im8S9psFHw2v1oT70zd69eRKH5Zm9
5PfpYP6o+MjC90nsHHPU3WF5E1HuPpfv/5jEQPXTiKCSG6Bzk44aTU+iLDFE
7a7hdQRqJE2c5ZhCfs/d5cavVyEdzXStevcULhFtztXHr+LH1M1aBf4pJOcd
yzYI18LRZ1vfiEtMoXbOXSPE9ApaSp10uK5OQTnyiWDR4UvgEDn/ZeDlFLTa
5GVErqthjC2Woz5uCsK9+zY7PDyH4tE5rayUKbTSW85Lp52FcXxkr2fRFHpv
ZsuubFVFEffUxIGuKaSqKaUzbTmNgAXSkQ2UKfy69PG3ynVlGLaHWM+NT6Fg
kdu5OUkJG4PlFqoXp1DoxlLoonkK+my+a4x3USFBIsaqU0mQGO1TUd9HRcsD
n1/3HimC/eMxP0khKtg0Tp5hM1BAjkfXtrUyVLAn+b9/LykHb90jWnSCik5X
p69kEVnoyntGfFehwsJfE5uEZbB2QYgvSZsKDQflIiM5KfR8c70dqE9FZOnJ
4xwXJJGZ/TXBwYSK/ihJyk9TCVy/5yiq6kDFC1gMz+YcR/pInexEGBXH2bYX
fZISw6NqHreWaCpS+Qb0EhpFV+cvq4qiRCpgebNQ2lIETLo7VXzzqSjiobWF
tAvhu5y5r00ZFf8K9loORx5C6q7yphu1VIS5Trn9tRTElW93roh8p2L58uK7
IImDEM7+EM7ZT0XOT8/iACF+/A3c3LM0QkWUWaOyzqEDSFLLN/g8TwVnqpLx
12d8cBVen5D7l4qHfVmGF6t5oblOb/w1Kw0dOS6zVhx7sFTFamXJRcMO5djW
kIld+Bp7PVuLl4bnJ4XXkq13IsE9fV5RgIYLY7mfjrLvwEU5LdfNkjTMPtfW
gSUnDu5KKf+lQIPfsNmt99Ic+D2/zPxDmYZBF5ewD9u2IT7rrU/mFRosWtRi
FYY3wiFw8XO4Dg3b9abU5hnroWZ5futDIxp+Oqjupe5gxz612MumFjTEKO2d
OnRtHeaFfoZpPKDhUX5FVVY2KxrWqnbLuNLQ3CYmHiqwBjHDkbz7n9AQ+/q5
9UAmM87GKr2dIdPA3R3xeWrjCuFd39L/+DUNtVfakmqtl4m6WX3uHQk0lOt+
i/vB/IdYt4d+OTmdhj9s3LZLFQvEmdOuAXL5NFDUD+6cTJ4nvO6tr/9cRoPM
89/GzwrniJrwCBb9Ohoyn+5NKqbNEEqTuY6PO2nwsAvaEfaQSjziVMrhotBw
fzen/oPcCaJSoYWWNEHDgaJli6/8YwTTHX0huVkaAvbTzq5tHCYQSLv9+Q8N
nOoN94ISBwmPQpcoPRY6qi1du7cYDxDlFPbO6Q106GrpbLjQ1Uv8Wx/B8Xg7
HVv1Hp7yj+8iFCUE1bl46ZCv0Lap/PCdcNXNfZYkQEcjs+yZfXu+EcVPT1XJ
itER33PAd39lC7GU+XW5UYoOzl27yv6qNBNyXXrSegQdeV/lXc09GwgnZtr9
aRU6yNUTXmwH64giEZe0Rxp07Fer9W8X/EgsXmEf236djtjvo35anpWEtHv4
/iQDOiYixZV3Xi0l7JMEdGTN6Bh6laLwS66IyPuaE9ZoQ4dMougR5fg8Yv73
yRZdFzp6kpuvzrhnExL8XzdMP6ZDk8MnP9c7g7A9r3fm0XM6qFbLVU+/phA5
dtSH20PpsDwkKRpZnkDMRjsXJ0bRscxXqzB4Kp449ontl0wiHby712/9EhRF
WM+EHW3MoMPQ70vu40cRROZuAXPdAjrOeFDz/ii8IBhKOQmMcjocWWeFDqkF
EWKWJwc8P9HxbU/PXKSaL2EZ9mX39hY6OoS+9cpreBHp5bpaiV100MOE1HxO
eBLU8alAmcHVeFJto18mORMiHM4NDZN02OVsjfURtiPM5NlYdefoiDNie65k
bU2kGIURjCU6vl8fzSJfvEtM+B909lzDgH9Am8BIvCEhVJCdy7mJgfuPJi1Z
LuoSJgNgJHAx4GFzQ2tB7SqRxP5FWGYvA4XOD0J1CzSI0eO6Rg2CDJx9I2N3
WE+VENCZitYRZ0Dpj85vnrWnCCMvpy66NANcGuqRnzxliTcZ67Z7goEsNVR8
ND9ODHWEXuA8y0BzXkdnnJUwcYDpoE+CJgPs7DwJaqP7CYPD2dXSNxgodmb4
7Vi7i4i7jH/1txmwN3OgSP/YQgy4NsvomDOwZDNkfOAGK8GXqGNLt2XA+vr4
8Oj1JZLel8n0h64MNIzN9HmVzJCiFh3HObwYSFdypvG0jZB696/jT/Bn4ITb
yyWt690kHrVQXekwBqzq9fal8H8h3XjAH1EfzcAC6dYCv1MV6WVUVuvNJAa2
29XyXizIJXXVEpvomav6LZOnH0YmknZNN6k8LGTAgBEp4DobTnoZUnF7soIB
1Ughk3Pd3iRuyRy3K/UMHCG+NXnRHUkvOxIiyloYcC58zxXNY0rido7IEepm
wLj3SiivyVXSyz1+zSGDDGgeNL22b1aJtLvcbWJ5ctWfa/+au6aOkiINrNeY
zDEQbEw7PuK8m8SzxpCvZYmBK7naesdF1pAiE7Xk5NdMQzNFrOvjGqrinrOq
Wgkbp3HckGXT+qJWxagpOestXNPIF084t8UxX5E34IifE+802IwarK2aIxSj
ju5LHBKYRkY3NO9MOSrubeOoVBebRkmwBS57XVXk27X4az8xjU8/OwQbotgU
Yz5MbnuuMo0n3QYfTZt7Ffbp9on+ujiNtf9mDI6fTVPYH191u+HWNNoucTwb
5VVQ4Bf1b7Z5NI2DnYKvdUuY5Q/hQGJ1zTSYym7b/XExkEga3F55pHka9PM6
grdENI8f8lrXG/59GtvpIvRq+3viQg3UbRZj0xhfVtJ5E7XIb9yYuOfz4vT/
vTf+D/HG9LE=
        "]], LineBox[CompressedData["
1:eJxFx1tIkwEYxvFvh3S7COaYC11rbbZd6CKim4aTWRgLhaGLKBRzfGTNLXRO
KVeTsMMWSaImA+fKFrQpobR0SSZByMgNE2mh1LJUzC7KY9Pm5rYy6H0f+PPw
E5I16koqQRCKv+38ROZBYyZ9dYf/ZhsQZz8Xo+1vhym0KvTq7DPTyiW0Mupa
CxnQYen9ucEGtKpd/+bCHTS1fG9TwI3WrzcS7YtoOf9Ycv/5NXDOLGuhsX4d
3NfD1nqNv8DmL+XBHEsYXCs/WvSwYwMc7S4gf7RugicNds2Vx7/BMqUoMeOM
gP0nZD35ji3wE0+nbP5pFJyeJdWd642B31MYNzJGtsFeRp1r0h8HS9NZOtKX
AK+0bHKOTCXBWVbroRodkf/f86WhT8e/o09+C255qyngBmOllruEVr3oKuRe
poKXt3Vm2ibaOd00WF1HA0e1eRpTDM2Pt5XVXqWDF5XNAQZ9F3hUMq7Y14zW
MVx0ITMFPPToQN5oG3oiV+5Tp6WCI7quU5oW9Fhx9+ndXAaYlMnd7g501dK7
jc82tMFZUcDuRF9n3pwzP0A7Pvp5ahd6ynSmdXsIXThsNJWE0CXV9DHLDPqs
yMYd+Yq+ePflgGQBfauUWI79RL+O3iNdCbSvX+AJEUzwOOlJsmjoUOCD41oq
OmLnTRez0ElVn9jCRqfQFPWvOGiOnkyTZKB5gnBFGQ8tCt7ub+Wjs6174j4B
+nBub1FMiP4Dy6DjBQ==
        "]]},
      Annotation[#, 
       "Charting`Private`Tag$1126#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.804028912210376*^9, 3.804028940771349*^9}, 
   3.805350645138816*^9, 3.805353099238799*^9, 3.8053534608203297`*^9, 
   3.80535531641626*^9, 3.80535566970368*^9, 3.8053560416736794`*^9, 
   3.805356119574312*^9, 3.8053563123423367`*^9, {3.805356376882092*^9, 
   3.8053564036985483`*^9}, 3.80535659449997*^9, 3.8053567542858152`*^9, {
   3.805459666949492*^9, 3.805459684848324*^9}, {3.8054602688864803`*^9, 
   3.805460285375319*^9}, 3.8055431933175983`*^9, 3.822541136864254*^9, 
   3.822627964258017*^9},
 CellLabel->"Out[8]=",ExpressionUUID->"2abcd90e-e6fc-4885-8824-e9de912ad130"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"Abs", "[", 
    RowBox[{"windowf", "[", "k", "]"}], "]"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"k", ",", " ", 
     RowBox[{"-", "150"}], ",", " ", "150"}], "}"}], ",", " ", 
   RowBox[{"PlotRange", " ", "\[Rule]", " ", "All"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{"**", "**", " ", "This"}], " ", "step", " ", "may", " ", "take", 
     " ", "some", " ", "time"}], ",", " ", 
    RowBox[{
    "but", " ", "is", " ", "worth", " ", "running", " ", "since", " ", "it", 
     " ", "initializes", " ", "the", " ", "windowf", " ", "function", " ", 
     "apart", " ", "from", " ", "producing", " ", "the", " ", "graph"}]}], 
   " ", "********)"}]}]}], "Input",
 CellChangeTimes->{{3.804028880283581*^9, 3.8040288850726423`*^9}, {
  3.804028951525094*^9, 3.804028974084029*^9}, {3.804029005167933*^9, 
  3.8040290075775833`*^9}, {3.8041548685405293`*^9, 3.804154886119443*^9}, {
  3.805351082195917*^9, 3.805351096672792*^9}, {3.8053534513236437`*^9, 
  3.8053534741470013`*^9}, {3.805355234078683*^9, 3.805355236562572*^9}, {
  3.805356124265685*^9, 3.805356128221991*^9}},
 CellLabel->"In[9]:=",ExpressionUUID->"93fdef47-8a00-4c35-bdf3-961d9b4a11ed"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwUV3c4128XloxQRoXsVTbZ2/nae+/9HWWrhLIiGUWJlK1EkllJyopOKKT8
zIYoFSnJXil5vX99rnOd5/Occ9/nfs51jhDlhJ03NRUV1fwuKqr/f2kZJJa2
nlLwwzmdRj9qZhDf/1yZuYWCUs2z+WRpZjATIEfwNlFwwOLQ4lNTZgiS3GyS
rKcgW770lq0bM6Qp522q1VFwL7vn6rQnM9ToKOsYP6CgUIa6yBEHZhgw7493
vEdBs4lK2lxtZlh2Ovb8SBUFX4a3ngjiYgYOCsOukHIK3qhLL++a2gNqx0rN
4kopKB77LiK/fA+4ReheTrtFwar7udbD7nvgTMLYf9dvUlDbI8kuZMceuJkW
ubfqOgVzmkZPBOfthrY8dsfGPApu+l8+NSSyGyZuP8jpzKagTKkad0URE9DV
WI4MX6NgV0sw0xYLE4g3/+CduELBjFrPPzMnGcHsRRJx8TIFr6fVlaS/YICg
fqFbVJco+Hfv0isGZgaomXIV40vaPq+5JCx7mh4GFlf8peIpuGrLq6qVQwfL
mxnV6mcpOPbXJetHFS2o738p7xRJwed+7rbSD3aCh4BP2NHTFIxaqc5zvEUN
sZLU9SGhFOyl2TltmLwD2nQ0tNKPUdDx1WXRTt9/2mbHKo26yBS0KbrDYyq5
rB0UYZTyxouC9DtFuUePL2inJXzpmXCn4NJ1Ta1Q41/aNWmxzEsuFAxU6zT+
79qU9mAet+0Op22+nqZR/+z4rL16+/E1FnsKZs23S8w2vtU+UGP3hs+Ggh2c
5TXDEZ3aGs2zB6QtKXh+WeLmq4QobY8XF901zCgYxKpyJ9y/Wzu2X7TQxJiC
Ktmbao3877WLRtvGnQwoaLj++G1i/xfticUN71CgYEivgiZH6Jz2MYHA4GoF
Cv62EFLLDv6rfUWS/mHTYQruZ7WUnMzf0q5VLlnpkqaggOh95vOkHbBq/iFq
UpSCHMwX1YtiaCA2wjyJn4eCO5dVL788ywhFCVOd0gcoSH3DPz9pngna0hIY
Ndkp6PxYNTvRdQ/QlzanO7Ns8z1lcaVtFytI1jgPeO+moI9KKf+1+6xg0by0
P4xh+/99IYmHbNngSr9U/pWd2/l0iWxqJuwFmnuE00QqCl4B7pjv/Psg8qK9
newmGZuu6RDGavfBrI+v7OZvMpp7tqk+hv1A0Y9mfLVKxi9ZObJ72/bDG4H0
b/lLZPxKo7VxVYsdzP/eavOfJ6OdE0PD2F12wHePC9V+kTHtUQ5tATsHKD16
GUU/TUbGjB2q4aEcUJ7x0enNNzKmHvK5LNzJAXzHFxVKv5Ixf5Q7yJaVE66a
0bGEjZPRaMbn4hMrTqAT4/6pN0ZGuaRWMaF4TojeKdvJNkLGGu90dd1KTpj/
pFsy/oaMF5ceFHx9wQlHnzievT9Ixo0CPc2ht5zwPtffPbaPjJIlKnoTo5xg
dSpG1fI1GZ0dJQjTw5zQZpuxj/clGduLyy3a2jhBVbZ0bvoFGUUluZSsSjih
mrGxp7GdjLDLMf1UOCcITr0qS0YyShRe+X6IwAlZ7eMJzi1kzKhvHbbb4ADG
omWiaBMZK3dE71st54DYM7u0Vh6TsedhcgGLOQcsuvAe6HhIRjT/1FA6zg6+
ynLLV2vIOJdmdeC5PzuMshn0ke+SkfmDyfu4b/vBZta5Wq6SjCJHE7IXnfZD
x8vA5K07ZAzVkjmh0bwP1MvOHu0tIaMKe+fus/v2gTCpjDfoBhnDad1mG4vY
IFureV0jf7uewrWK/G9YgYnrvyGGHDL227AouFOxwnL/amrZFTJ+Pse2i9Z/
N7zQN9r8kkBGXzqsbjalAQ1Bt/cP4sjoWNbuR9lPDff/HnsUF7ON937z6t4b
W9q5j7KO8YeTcTSiYIUguaq952qF6a9QMu5a4fzBY7ygHX+85dCTYDJumYUW
fcn6rr1q1r/j0rFte+DatY5Po9qBYpNjrgFkjJY4W7kej9rjO383ivuSUdwv
RCHavFvbYXx39toRMrqzSK2KfRvX7n4iGPKCtO0f/bsol/lTG/KUrLI8ydj5
j2p0TWpJu/aUieRRNzIuBZS5CWSva4vZedApOpPx9TmGlDnaf9qsTImtfTbb
+i3Yu/HjFA3UzQrfNFbdrsfPPa1cffthwqS12EKJjJah3lkHf7PDvhLX27by
23z08fAc4uWEEOcrFe5SZCQQukVbLbng1gOpapL49vuYylVTdueGfqbOe96H
yHjzBUsOkcQDcrj58IQAGRfrHkYWWvMBiTvvcRgvGWMP7u4tUuOH9DClxkgu
MlLzXcxU4BSA1t7/mmM5tvOVWsronxaAWfHA1oR9ZDzVNUk86yoIfAl0z5JZ
yZgXHm18s14QLMaK2y/vIWPcmflrqSxCcEZV+8VVRjJSpOUd9pCFoCrjXVcO
PRlNv03U/qgSgpGfoT3Xacj4++j3fTNzQsBoxNJbvIOMrF+tFD9LC4N6UWXf
nX8kvH/oh24uRRj8NgwHq/6Q8MyPgZ1frwhDrsPn4Zp1EhaqPJjOqheGzntn
3j1aISFnopZC8hthWN114EPTIglPm3z4fe2XMIgeeTj2dI6EW+OtXtl/hcGp
xWq8Y4aE53++uHZipwgkcU5/6f5BwhzvuXVqahGoO5k02fuNhCVEWQXVdWGY
6BH8PviVhO9WUjRXJ4Vhv+iT6XfjJLzyXTVWpkcY9OOcf42NkXDG7faX12XC
EDKyOPdlhIR6Kvc/90QLwy2ltMWptyQsPRGUJWAsDANpEiszQyQM3kvq7GAQ
hh0/OtYW+kl48mbQZlO7EMjpkzZWe0n4MSn7PO0pISDd+PP3Tw8J61XvJlbx
CcGVtewtqm4SpnnNLde3CMJTWwVquhckVGi8Xa/uKAj8dP70rEjC8vu+ye+G
+cGKRMPI3kLCxsrs3usDfBDTdHM3dxMJo1lVD7E95YXR42/YDtaR8HXFnelD
ftywu/vkfokHJLxQN/rR9xAXaIrs4ZS9R0JXedZ31wc5If+tPq9aOQmP9IrP
h9Oww0v5T/zapdv5BF5i3rywD35fihLSu0XC5SRzKsV/bOCi80DU4joJ6fxE
WM+l7IHkfAsJ2zwSpqPSJkWaEeqXp6ScsrfxcmpHMjXSAUcFvzzpCgk/KT58
5CSxpW20s0nR+zIJH5ic4T73ak37lKejSsBFEmanLUjcs5zXvl0/r3biAgl/
omRQMPGz9hBbqmZYIgnDrRVz6Grvae8MEoPIcyQM+DmQtCf8g7bCizad2FgS
0l6Y5rVO+6WdEfXbMDmChLmSvvWO//3TpuHi1Ll+ioTTU6pSvsSdcLpeSaMm
hISnTHLcTrvTg9vyCdl3Qdv68/fav8eNBYSPf+MQJ5Pw/U2l3/LFnJC5m4ZN
y2s73pB6NVcOF9BVCTHZuJOQgYNfLCiZB35OeWyFO5IwjGsvedhVAOrIg1Od
piSU50uVKrcWAVGqhc8fjEho+fPKAof0QcgtZB6d0ydh3ZG1rHbqQ3Dmg2kf
J2zr6wwlWuyGKMxG+r6U0tzWzzpXNiNJDEgHkjoIatvxH0mUJPCIg6EjNvgq
kFB8OGf/rSgJaFgaq40+vI1Xp3fpHJ8kSF79U50uTcLxhD9cx+ol4bocV1mJ
BAk1afcO05lIAfN/KsX1oiQ0uF+suNIrBXHHHAp6RLb1u+uh4mdzaVhkCsn6
JEhC4tULc6dbpeFoZXr6Eh8JB0leL71FZeCNyd0Ueh4SZjQJXSclyIDJ1MsE
ngMkjCN6jPINy0BT0veYw+zb/qynPc48siB9kC5Cfy8Jtdpib7xylIWbbSIh
ziwktE/eXQiJsrCXrBsUuJuEstSWbmF3ZCFxy8vnLAMJJ2gedKg9kYXVG2dI
1+i2+8GNAhf357Lgp5XvVrZzW4+33TVrnsnCyEi9QzPVth7fsJBZH8hC7mLl
jcI/ROSTMShzvSYLZw5/y3ixQkS2gm/Lx/1kgRwkdH52jogJJ2Id1eRkwajC
I4pjmohm+Wn7SqZlQPJbznGYIKJ/mnhfcY4MMIsMUnw+EnFKKjVPWlUGFonM
zmnviCjVfntLp1sa3lw3NX88QESMLzj0xVIamt8nEj6+IqKu8IuBA8+loIgD
Fek6iUhTJB+3JCsFifZ/xGSfETGlOufo+UuS4HdFhdepmYgrDwZjfo5IgMXr
k6yxj4jYSjOZq8cnAezG39dfVxAxqjpA6ki0GGwkiPxaKSEihUrQNyVHFD6i
12e+QiJaV05Lupcdgjsaw93HrhJxr6Hkh41bIqAm25a/J5qI7xKOzsQe5Idn
e349exxGxBhZCeXgYB4w+8X5g3iciD8aI3ccLT0AHtXHVGvJRFQ5d17oZu9e
mLyU6+XuTkT9hT3ipIsscDywPYnGkYhJHlIc1XYMcE6Sa8jJhIh6j/pmhP+t
azMyGvzZ0t3mm+bzNaNbU9qZP44LV2gScaHWa2nfVoM2X3eeqZ0yEYs7k3ti
YFb7TnlH8B9ZIjJF9+54+uav9uHkuZzb4kTM3tCUE3KhhQZf7qeWwkSEXq2v
jXa74aVo8J4idiKKhxG0VBXYwZ6uQMmUZbseuelTwU0HYHTyufviru34sS6L
s3q8MHubp9LgrxcmjDqufL0jBPtEOo1+fPHCZI2Yd/dTxeE69eKxq6NemG1i
n3ZYXRJEv/Bmab7xwpZb1tO1H6VArTjk6+VuL5T5GtUnznZ4ex/hj1Oo8cIv
/w51+cYowOQ/k7IPFV44OGDPqiKlCMc/hvYmlnhhJfGEItWAIqy1FK7I3PDC
1C/GPe4nlSDuRjfv22wvZE5gKxzfpQwMMcv6cVe88LZ081vxXGW46iEQKHHR
C9POpxj086tAKc+pxugYL6ROKCB2sKqC7J+b4wfDvXCX2Z8XztGq0DDykr43
2AtNZp7ojX1QBd2mFdnwAC+8a/Z4N7WCGrzME3QSPOqFnvWJ5uExamAfaR7T
7emFtv1vDRdb1GDU5fTtEGcvJOw7myW9pAbeasU9PLZe6FN+0WWCVx1mOV8t
dph5oYLFN9KohjqEr61yHTfwwvyCEsqohTpQvRXS5YTt+PWcgg/s1OHiYws/
VPXCSe3STOlt/77s8HR/eS/UUPjBK6quDtdP3Xq8V8oLH0Q33YjiUgdRx9dj
zQe9cO5Db9nuX2pwX2mdxpvfC19ez83veKgGavtFpJkPeCFLREH7lWNq8GzJ
0r6ezQud6xuivbnVwGwwIorEtI23V0lPu0kVBmtLihlovbC74/3QAUtV8Lja
21X7zxNfURMMtwZUYPLk7zn3dU/U+/SK6Z+5Chy3PchJu+iJDEnlnBINynCO
NcrbedITG+V5XcICtuv18+H7oE+eeFVBnuNWiyLEvvhlGf/eE2cOzFsJ0CnC
mTNklbuvPZEQknjncbg8RDsXVLZ1euKejpQYpWI5iFIY5n/3zBMtcCHo6rnD
EPHdhH7nY0+c4pEPDHghBeHt8dEHajzRdV+47uHXEnC68MmcTKUn7o5mUrdq
E4MwB7l3LoWeKMn5bOVwlAgEI2fFvfOeKNUdSC/nvx9OFNjydcR5YtWH3IBN
+u33efpSxvsoTyQO6q1YsNDCMdvntHNh2/fNnZscfbuiHSS9FUlzYhs/4+DN
NcU67UB69Vkuf0+M1w4dTM5Z0g74EkI5fMQT8dF4prELDfjmfjNzc/ZE3g9q
YWKf9oNPqODTE7aeeOlmPFWdMTcctXJTTDL3xEKfkVCfegGg0PTy1BA8cXns
4re7tofAK/jRDK24J55T1tjw4pEDT/M5Eo+wJ95kFwv9GCoPHqISw3K82/wE
kMSSuhXAbfR6izurJ8bkTzt89FcGR5PEtAfrHvixNiGj65gGOIi0UncueuDF
uRLFq4WaYPdv7fTojAdmFItk3evUApu6QCL9Zw/cEmCliqcigHV66SDvBw/M
oc7jv0CvA1YBn4wVhj3w+pX7+1+l6ICFoL2cZ7cHMljv9FaM1QXzP6m3Q9o9
MFpJLL57ThfM3rw4kNzigRYLZB0jdz0wfUB1+Ua9Bx7XtDnmi3pgkqqx4+ED
D7Qrzr49w68Pxr5hp7qqPPDO87XgnNP6YKR378dYqQd6dzcGSXXqgyHfd8+l
mx6YQuKmHGc1AIN1oYFd+R74Vv9TgLidAegPuhvxZ3qgyP3bLAdTDUDvXlaT
YpoHNpcZ+8i2GoBuyn+ypske23x3Heb8bgA6RxlKvOI9UOxI/koNgyEQCPqc
YWc8MF1k/lC/sCFsr+WXUk574K82+cM2ioawvTxuFQZ74JR4TT6DpiFo9s2H
1gV44NOQFNFRdUMQU7cBrz43jJwSqjVitwUbQuzQ3pduOHpLSNrf3haiDKsD
OtvdkFYnnUvpoi2UmI9QnWlxQ7xBHj/ZaAuvbHflyNW74Vag6/25cVtYcVaR
maxxwxdfJItiqOyA3+toe16lG66Hjb6b5bQD46NXXa1uu+ES898qLjE7CA7A
OepCNzxD96/+rYwd5AXPJtXnbPuH02jppO2g7TQvb1CGG8p32h9MErKDmTNm
tYKX3FDsAo+xOrMdsCdEmAwnuuGsq7wX46ItQMqdjymxbsi8lig38coW/NKH
wiDCDSXmfUIfF9pCRhY109JJN8zjmxoP87WFpgK54rJAN8wQM7PgFLOFr8Ve
qh7ebvjto96jvDEb2F2e+pqV6IZ+77Vc/160AeV7TUeeu2zjeX6wXf/wNnd1
339H2rlhar5g7UKmNVxo4rgia+GG3iP7+m0braAGDUS/Grrhrigeck+PJex8
XWRnoe6Gd5ii8p83m4P0YO93KkU3PPjnxOGmPDNwev839pG0G458beKq8TGF
8kmXKn5BN+wxVTH92WsE/T/P6w5yueG0DlPPTIAhbCzUvb2wzw09Vxnp/db0
weIfK80CnRv+mqtyvfNVB07REPJLqdywWKSX8j4ZoJDxmJzbhivurjDi8Tms
CfMc3R7tv1yRO0T9lImcEnDxrS2GT7niUu6+SqnLcqAncihF+rMr8lcN1tiV
S0CQhL3A5xFX5KBjyyfuEYasw+ceZQ25YvPh8XMLufuhVfm+uVmvKx7RTn52
33BJ+7vm2Od/na74UeC64mAAHbDpMUU8fOaKcYHThxbCeEDDRJ3Zr9kVpd/s
jZReOgRHrHxv8z5yxbOSyYtWurKQ6pCl0X/PFfmusyWV2CjCR9KCj8YtVzzd
x31nqV0T6H0FNmcLXPH51Lxyyw4dkDtmea0kyxVzx8SPSwjrQXxkxdPdKa4Y
fWtlcYtkBGJXyQc+nXBFmrjSaMYmK7DJTb93zd8VUwNu3LEg20BUYYuByRFX
DBT1G+sib+u7kuvkAydX7Jlqrdd1tIfg9v7uBG1XDNvc/Bq85gQsz5nv3lZ1
RbKHoa8POsO9F+ZXnsu74hZjOjE03gVmup870Yu64rpYd7TivCtc6qHWEBd0
xTs9VrHcBW4g+ZrAZ8rtihnWT1nPabuDb1/j14vMrhgxw85i5usBdAOrL6p2
uWLamwOj87884PagYuUralekZf3qXBTgCfrDwZd//XXBTptVqx1jnvDlzd1g
5jUXFHhJSHxq4AXn3k3bH15wwXx7qo8pxV4gOCKmavPTBev7MjP2LnnB0w9H
uU9OuuDi1hMrFnUieI0Vb2Z8ckGCIEeAeigRNj9+HK9974LG1PV0VsVEuD7O
0zE46IKknGJgbieC5heXsuXXLsi9lGdGeEeEka9ZF9m7XDAgP7y8cpwIkZMD
x1TaXPDns0Ad/lEiHJhisXV+4oJNhlQpQS+JUP/dQinisQt+l+SrDKoigtN0
CmdejQsWdize2IglwsrPFxuNlS7oSvPXZs2ACJm/dn4cue2C5dNWaLLpBYpz
Os/+FLrgKpcKx0iZFwzMx9zmzXPBmgKl5wXb+E8uNl3QvuaCUjxOxQmDnsC6
vBbgddkFnz+IWUt18IR7K0pWZy+4YPxr6ZKGTg+wXDspX3TOBc+9+iu0R8YD
Ztbv7X8W7YKW//mVZie6w8WNn2ufT7lgcoupsG+vG0j8Ff9AHeyCVYYZXtmM
btC16d0qEuCC1M1n/+qqu4Lv1q1ig6MuWPRyPuGymwvQ7RhP9PZyQT5JU/9b
x53BgMbNvMzOBSkWiu9+nnCEr7Q5sl0WLkjO278rw9MB4umH2H4YueDGNbXx
cbAHZLR6J6npgodCbLhLtvuTFpue9z0RFzxJPj//RsIYPuw9a/IfnwsWvLim
9NPWAKL2P5Ga53TB48sFLLt9dYGL4zcz214XTLwVu2Q4pAUNnCqL8rtdcPf9
SX6TBhVw5godtqNzwYi8W9U8Z+RglbumIZTKBV+OvZ0v0T8Imby/CjI3nPGd
D4qd89gDivySZx8tOyPdRG/PJRF6GBDwpbyZdUbnI/Ur/3Fuzy9Ctw3Xvjsj
/6TjpdMmcnDvIP9u9TFnDL2QJbJvTRskpfbmPXnujA+zuHNlFyzg+H9w3+up
M+Zai+S9INlAbWjgc6pGZwSFlu+TJnag/qRjwaDaGQNYb0lZsDuBiWW42eur
zphn8RHOJnpC6kIJ6USqM96cCWjYa0eE/7L6TrOdd0ZJr5tmNKkkcPooUeIY
6YzfyW09hQYU8D4x+meM6IznCuvM5kK8oXwfw944V2dM+XZPsVfGB2bqlcWF
7Z3xffKndJbPPiDnQYEOC2cMel/dD6m+EEaV7uBj5IzNdA+O/pD1g4bbzQG7
dJxRazjxZ2GXH/wx+R5Xqe6MFerRMQsu/gC/9udYKDrj50TBiVOf/CE+Q/fu
rLQz7tsf/K7dPQBeKB9vvyLqjOxUdwmnXwcA40j+ewVBZ9yTcNlXSikQrGI7
54a4nHGK85duUnogZAgv04bvc8YnN6/elPgUCEMvBHm59jhjZYhgQJtwEBwI
tFRopnNGtmS6sU3XIPBgiTLxpHLGLQbblrTEICh6eMdr67cT3oyTuCJ9Kwgm
nAfDipecsF6Ts+9abRCI/926qP/LCb/V3hI8/ygIgoqkiye/OSHt8tm4l5VB
cN/Atf7CuBPORPyKlLkaBIvfk15LjDjh73BV23OBQaByufZrz6ATDj45IV+o
EgRR8p9+H3vthIppS06UpUBoHWZiZe10wqO9A6q1xYFAHaUmWotOyK+8XhGh
GwiG/N5aDk1O+O/cb7qygQBIbsuwW33ohDHaXpbKjgHwyqfVL/euE7Y1eRGE
u/2BlelnrEaZE6bHr8WGyvqDw33OrNEiJxzOIpQpJ/nBh7XgZ4KZTtiy69pZ
Cr0v8F+/8bbtshPurO39x6DoAxSdl7+OXnDCPxfYRa7beMN0sgh3RZQT9vqN
T5hSjoCsjI2ceZgTRnYF5I06UeBk/xmjX8eckFFW9ZAJkGGd602IPNkJT8h8
E+t/7QlardQpg25OWCmLMoW27hBHOXzzlMM2XwnHFL+2uAB9VXJPo7ETVtMe
6FC3twcz60ef3XWd8M3a/YeCsTaQtvR5bVNjO7+N0V0OkubAoaV5UE/WCQvT
0v/LOAzQ9+H0BRtxJ8y+KygRdFkBUqJrp72EnZAnL1P7xTA36PHMWh7jdUKF
BZs/Brbs8LdJ4kE0hxOecxb3r7okD4/dvPdfZHVCjvbvoqYz2nBioyg8l9EJ
AwtXzoyoGcIX9QPw6J8jeoxPsQiu2sD19/bF7euOWP0lg4VD2gEcI9NpBhYd
8ULyhZwzPs7Q1UDXM/vNES2j9sxe+rrdX1VXnMX/c8TipGuu1Me8we+tXLNK
tyPyx9+bidvmXyg8iN+w3RF1DSZ4Jgr9IPPx1wlyvSM+PnKkNPlZIEQpD5ws
uOmIpYwbbkqfg0FpeM9wRZ4j2jTvO8KTexJ+hZmqNVxzxF9BH0RumIUAqQ7/
DV1wxFS8HEFXHApcDn/JX885IqM/hahhEAYDS6rPF6IdkWNt72Lx5zAwVLx/
iTnYETM1O/LuMZyGfwPTs7wBjmjVcW+x7NppaAgRtZM66ogK3+V7YzjC4eRe
yiN1L0fcHUyk+ZgRDpK1Nw6YuDiiXCFFLoI2AiZs30c72TniVnX/283gCLix
sP/TUQtHVAv8L0N4KAKcMmz0Qo0c8d/aDtnrspHAKp9aek7HEYcfSn4QjouE
l32du65oOKLturflya5ISAjeGVSo5IhB8zsnDOijQIuV8F+1rCNy7R7q9dSK
gtX7UQrN4o5YEr+scNY3CmqsH2d1CzvifuK01YnkKPCfW1h/y+uIYuf5CtcK
o0A4XcbjG8d2/qWJfyYqo2BU1v/pMqsjJqontdNXR0F2723hnUyOKKOwvKx4
Kwqsj48nsdFu11eAw1b3chTsYub9IbDlgHU7KqOYjkVB211nC9nfDhhm8XZf
iG4UnLG8dl9ryQHDu36PuDBGgfKv3r3mvxwwgkX3RVlnJMymMp52nXJANqd1
PvPISCiXNnrv+9kBPyYVZCkKRALl1Tmt0x8cUP+S7xGnxgjgCWq5mTjsgElH
c5zuGkfAENNv6mv/OeClarYZlZfhkFal5FPc7YB3NtLJqzrhYGIe3H2/3QGD
EiU7l6pOw46fVdKtLQ7YvKDJosV0GsIkRZZGHjhg8eGl3t93wuCh3RFD+moH
lDne9yFrKhQWo0pyFO844JNRmot2fKEQ3COilZrvgC7dE57P/E7C/aUjaQ2Z
DjjQXMrbHRsMszy3xyfSHDC2oM5bnf0EBAYdTNJOcEDiSw2zPQyBUJl59K1/
jAOqPa4dlvvmB9+f3JbIDnfA8wWZxe9rfMBnz6He2UAHFEjabcPCRoFSZW9B
Hh8HnPU7WNpkTYQJz9IQY5IDGmU+0/f2dAPKvUOcRQ4OOEppPFTDbwPFb7z9
X1lt22Y9Rc8qDWH8X2nzuokDOv6u/U3VrQwCYt/2HNJ3wDcqMiHt/55pe1mL
kmy1HTBOyoPrRIAK3Aj3qY1RdcAb5llzSeeMYPTmHZpKeQes1nv8/NpvG3Cb
F62gFnVAXakOi6MFHpB3wPePrKAD3ps4uEtGhwzvdMos3bkdcJCh23ZJ9ei2
vsUWHzI74LluH1c2xQCwVRDX9F6zR7vM81J7eUPhipvf5YwFe3Sc/MM4lh8G
vfHln1p+2iOD5hfPRs7TYDEonsgxbo9MI+5EJYZIMAmTeN3ZZY+hwg90/muM
hQvX/QWW2+wx12/OaoopDl50VJwUbLFHMqdeRXB9HBiwS3JEPrDHnVcihMao
40HnsSRRMt8e23YK6DhTEuHsx4AHTpn2qKz8auHjTCK00lXtTEizx/B6E/9T
J5NgU/an4/1ke8y8y9bcO5cEWs5S5R/i7THwn6FMke95iD4buEEfs31/1i+X
onfnoamsykIp3B4LCo3ML+hdgPX/fhaSTtrjHdW9ZcylF0B1XWohNdAeg0Nq
ni9sXYDTgkH6jd722NpHePfLLhnqTKqzJon2+Mo/ZFfbjWRYCp6ZYnOzxw3r
w3mHx5NBIU9aAxzscT56lm6DKwVOPgtKDbDa9pc2iE2ZpUDNj+qP2Sb2GKbZ
bra908Mc2y+5dj171FC45WyZkQKyGjIJc1r2uHRjacbrTgrspfXcdUPFHstz
wj6a1KbA6n+pl83k7HFt7JVSzrY9kv9k77qEPbo1GR9lL0uBFu+ZnFIRe1y1
brK4lp4CRXK8fPZ89lg0m0yZDEyBxD/mt6g47fGrvMWbCc0U8HsRLXaP1R4d
9HY3n9hKBouMqmp3Rnukal6R9H+cvD0/fZBnoLHHU2dOBzSSkmGfGFP94007
NFkuY7D6dwFWFzS0jq7ZIbltYSd3+gUYeRLwjG3BDu3yB8fY912A1gv5Rk+n
7XBp5h4SLp6HW3Yve4Im7FB0pDqzYDkJ/L9LvOl8a4c9HLar7CWJYPHQ1f1U
vx2+WzN/5zqVAHKxKePCPXbYEmcTwS2QAOv7fkzHtNrhidyouJv+52D044Fg
qQY7vKgVcbDpTBw8rTBZeffADtdf3+T7S38WzhPKtxRL7dAgSezy5KcoCGB8
l/i50A4PfOeLda6MAKthesb0XDv86Ugp1CKeBvZA3/3Tl+ywSVVsD+Olk7Cu
nJOXk2SH4WVNkz10x2GUqpPf8Kwd5v3R/Kc64Ae3s0UlikLsUH35EYGRygOS
yU73LIPssIuB+xPXKxsIkj6v+MfbDmdeu3jfC1YGm7VHDeVEO6zvopUoklUH
xbZJbSdXO5xo4OriFbMDjsvs7Tvt7bDxPwq2y3vBhrOhyQMLOyygBDrHK3pD
26/bdrt17PCG4iuOS/8Fw52GobeN6nZY2xu3emElFFISaDx9Fe0wovxnhIJQ
ONhwHfVtE7XDNzwzOSqJMfDJQORMxB47PLIiQpgTT4I2FvsdovR2WEmTmaT8
9DzcGYk/P0hlh7pN6+9vbOv9ePCXK7LLtuiuWa3//Ngl+FtQXDoxYos82fcE
h+9fgXGffsmrQ7ZoaNC9eudoBnTI76gh9NqikYJm1vT+q3Cpk9SU/8wWlz9d
CVLyuQbHr14hmDTbIndDok8IXSbYeWLHSp0tTujE0F8tygTuJYH/bMpt8e/J
mluzmAVhjV7FAbdscdQun7ZBOxten70RmnjdFvOrLt36+jAbRI1GDQuzbdGT
XMQhKpIDcbt5DjRcscXv2n5HlC/lwMiA63T/RVusjZdi6/6ZA4p5uU9+Jtqi
mZ+abb5BLqQS36bRnrVFlyF2waNZufDtEAdZINIWpahv+H4dywWdGQdF9VBb
TPwxJfiWLw/yaq/R2h+zRRNXhtNUjnmwGDHwNsjXFn/znfkqnJAHFgS2yvNk
W0wi6LrSlOdBKa3NmSL37fPmN92PtefBv540qyZHW3y0I0hEYjgPXK6+Fhyy
tkV9nokW2rE8eOCye+mXqS0afJqVGhrJA0YB8+f0BrYYp9Ab59ebB0cnU3KE
wBbzfMWo8uvzoKWqy19TzRYPSblo6mfnAUcIvZajgi2KWjPI6gXkQbCaEfMJ
6e18YuddIxTzoPtf4niyqC0mRD7+/HIhF4Sft29vCraorTJ/S7g0F85cok56
wm2LTRQB6yDLXHhjq+v8Zr8tarLfT8idzoHDB+Ik5pltMbL0/XjBmRxI/tj6
h4HBFk1NggVO7MyBL7c3X4vs3Obv0alDLGezQStQq0h70wafH4jhipnLgiz5
6BDnNRskej0Pa3XIApPWdY5LP22Qp6bFaGrzGtxKVP1xe9IGp7r8xuZ0r8Ef
s9PNrZ+27ay3yszRV+He2yXi4qAN+skdLKN6fQV2FSoo7O61wYSoL0rKr9KB
fPQkjWiXDUpeIhyq/nEZ9i/Mlrs+scHmNsLrz1MpcLxeJjr0sQ3qjfeEhndf
gM6YIMvLNTYo0BG7819OEkQxTi/gbRuUdaCOXdqMg6E+8Y6RQhtM7bKxZZCJ
AZkc3+zlXBuMMvmgm60VAeMikxril20wvGRaImU9EDSmRfboXbDBWIFNz2gv
MlyroXxyP2eDG5Y5NAkKZjBzuvjBqWgb9HqWuN91SheMtMcT0k/ZYG955X2Z
I0Qo2ingVHHCBoXVvltIcwbC725P8XZ/G3RcyAyJsw+FaqcPr1Y9bfDBR/9p
VZ6zQMfHfZPVxQbvslIfunIpHohfXU5K2tngx8JjXYevJMHe4DfsXkY2mOXj
p69VcQnCU/q9nsva4JKfW8bANt+nF7eOkMRtMPBugY5CxfZ7c5f1/yO0zY/7
74+89jkQLHMpVJ7dBtkiNpVP3MyHgVsprJpr1vh36Ozxp+eKoDfsG/fJaWvs
1XVMohgVQ4+R/qGyMWvULaDuYKS/BR3Tf9X3dVjjhSWzvy1RJYBPXA1M662x
44xa5KL0bWhJe2x1tnLbr9YRf/b9bXisEHzk5xVrHAzVa/0tcAdqaV4fE0q0
Rra09OV9jXfg/huJCOdwawyZYTz42awMqsvPx18OsMajEumhG0NlUB71NbXd
0xpTiTphG07lcNtCJ+e3jTXOZDI6xvSVQzH/jeLDBtZIfdObQ0i3Agrnf1d5
q1pjtIhpa1J5BeS3OT0ukLRG21daqZZ0lZCd+RD7+awxbSZIhs+tEq75sPbQ
s1nj1aj78wUllXBF7diwNo01jqyTNkK/VEIq48tPoWtWaKRFE2HHUQXJo6LT
FdNWmHondXAKqiDpXsLypzEr9Lmu9W3KvQri48b/sfdb4WrJpiTjsSqItdNm
sOiwwulJgXmGkCqIOpi/L77eCgvsKMl3AqogfHWVr6HSCqnK5aJLnKogrMte
fPaGFY5c+vOwS7kKgvNrFA5mWOGvhMyaL/RVEBS0R9st0Qr7BkPvtb2qBH8I
ML4SboX9if1vILESfFg7bV8EWKHnu3B/BdlKoHwR8fjraYX6gyrfYl5WgFdd
nI+CrRXqHfmqRO9aAe7nx4L9DKzQ1+B5T+P7cnBx0YguVLXCXbfJQ+ctysFB
MidpSNIKzQ+et/J+UAY2f5fSGfmtUInznLzdrjKw7LXJ12GzQnVy0CUb2ztg
FMJ4v3rNEv2vc/2tbrwNega+jV+mLfHBC/ZCufclQODoaD/w0RJHFrQ2WX/e
ArWmmHeJHZZI976yO+pbESiljnxpqrfEQoHPhU+KboK8l+qv+UpLdKcufVrq
dgMkqRd2eGZYYntzXvqH+FwQHbLcfS3REi+eZdhnupgFIncqObrDLbFG9RuZ
2+wa8JodlVL2skTpkOKoc4GX4ADvM+VAW0vs5TKXM8lOAvZZPp1iA0vUI+yZ
4pc7C3sxyuyt6vb9b5ds7SZDgPnqW4c9Uv+Pv9nMrOMKHKe0tc/yW2KFBVdx
t6Yr8LmUHFpg2/b7xg91yYTCQU0G5iO0lljM/uvJwYNxIM1/YnVo3QJ/O3oj
/evzoLhj+KPRjAU2X2QSMEi/DBoTGp0NnyywJ/3Ubm2lq2BaSZd7/YUFivNW
pi5J5oHN5aA45iYLFDUxH46svQ4uwQN+cXctMPSPTLqEYBH4qBSqH820QD6d
zJWHdSWQ2Kb8QYpigdkcexLoJrb1W1rQfsPRAmMZdIJrq6vhWvKOahZTC+Rt
VxFKCrkHt6xen1k6bIEfvFpcZX7XwNORo/zNm+a4oS+V/8CxDl60vKSTWTDH
GnX62L/Cj6C3SG6ucMIc32ZmLEX/fASjPn+fxveYb++b9bWeQfUwYUopX241
R7fLkUlfRBrgp3TXFZ9ac/TwUHP+PNQAG4vXyGZ55riSP/E6S6gJqN/8Nn2S
ao4vXqRUnHzSBAyNRAXZOHO0GA+z22/dDKzXn3MXhZqjiVXyxX3vm+HAWamd
e33NUS9b6Ayd2xMQoGT8THAzxzFrw5mk/icgarg2uGJpjkq0IsekCS0gK+75
xFfXHJ+WfLySfasFlJnab79X2ral0niP/GkBrVnxy+bi5vhezFFT0bQVDPrT
TrXwmGPYcNqDykutYF637HmYxRzpBOdYgttawS7HzaiY2hw/X0r+Jv2rFdyi
UHbfqhme2HVr7TLTUyB7inIm/TDDgKNGAfp8T8FPJ3VrddQM6dci/1IJP4Vg
kcUpvz4zlGClUo7legoRdC59I+1mOCtfkHl651M4+6OlwaLeDN89rHlR8akV
zr8SKW6tNMN7xzT7P9xthbT7KSlyhWboKLmqP3ysFbKuzp28lWGGAvfLfY4I
tML1U45u+5PM8BlPrI9LWwvcdmnWOx9hhnK37OIvObVAlaaQ1HqgGV7e81H5
/YcnUMt/YV8A0Qx3EO4cEbF7Ak07fv35YGeGOQ0lMbaNzfBswm7C0sgMw7/H
VduwNUNXZ8Orp+pm6OHmtbLPrQn6KvkfycuYYUYPrVfmtUZ4eznxRomgGRZc
OsXS39IA3+xtjl+gN8Mgg4YjBROP4b3M0Hz/H1M87HHHXWPpEbyidwnlnTfF
sukXJ58v10FtMzHiwTtTzFOZOMPQXwulWV83/rwyxXhJDw6a6geQe8I3xuiZ
Ka7oyysej6qBGJET8R8qTJGuUEjw+sR2v9xcpBEtNMUO+aIgoloFUN6evhB8
1RQ/UleFPwi7AyaXYlNpo02xvfUwnXhFEWh6U7PYnDDF+qQLqSsGBSBLOJ+R
f8QUK/4oxp/ckwVCXIz7J51NcXFOsNfGbXv+WLqcfdjCFO+nnL0tbh4H9K/Z
uKJ0TNHR9xSbVaIzbNzJKuhQ2s6PUnMz4egp+BXHxc8iYYoPpoSSn+clw7jb
jSJXPlN8fNHUU558DQaVhERus5niUrhYgnhmPrxgLi2dpTXFqxu/66YWiqC6
rboyYdYEEyMz/5z0K4eb1+Vker+YoPNdv6FNpWq4erru/oG3JugzcG7jOW0N
REg+qbv71ASVM2J/rH1/CPpXe1rfXjFBJqppS7u+ZlAJstYVTjLBfIu3A5Kv
W0DcaLA9KNIEdz78lzbU/RSYN0a6dlBMMNLsN2X00zMYIU8PSCmaoNUuK+pj
Hc/hteZxx9NiJsg1lHH6cf0LQPbFt8hjggln1cgfyzrhTvfvUUcaExw8uC4p
E9MNIfIMU2eHjVHono6Z4/wr8Ga67P+y2xjLT81xSTx9DS6TrDP7W40x46xe
w9ULvQB5BxYq7hijmuQm39MdfSAfej10Od8Y80N+7uNw74ODloKrkG6MHiXs
fEdr+oBhh/ifwXBjFOu877zfqh/+jlTF8AcZI7uE4G6W7H6YrTtM5U8yRt6N
oB0K7/vhc9rD+IcOxqhr6vLRjHMAhvxUaf+ZGKMScfGvmM0AdOo1XzDRNkb/
t1xncxMGoImXwHhNfjufIKEjQQ8G4O5qW+rYIWO02JOVG/Z+AIr6jFjEuY3R
78gB9oQ/AzA6V7EWtscYw24VVMRwDQIXy57xZ1TG2KxWKUIjNwhOssFdzMtG
+KKTLnkcBuGq5WCN+5QRDq0ZPP1oOAi9QSp55SNGqHrR6NErg0FgSs07t/La
CHupCyOiNAfBpOqvv94zI4y42+PaJDEIiS+Jdul1Rmg+ZMxIZhkE/NGmMVpm
hB5nLZsNZwZgc5eoiESBEQovumjp4QBoiKcwnU4zwqnXFlyKlwbgtPHMUts5
I/yWINewZjEAtT7WoyynjNCYJ/p0CO0AzCXVdnj4GWFS6ujz5Lp+kC5lv1vh
vh2fEmEi4tYPfh0RWatWRqgikzgjs9oHt79+iNHXM0LnLU363OQ++ExN8Lmi
bISnrAVOOLD1Ab/wLasx8W387AOSDwX/AzddWlVJXiNUsvLX1mfqhWySn0A4
ixHKk5JWHL68gsGzPfQd1EbIv3lz9WdpD1i0Zrzz/GGIdGXd6uOLXZA8toyV
o4ZoPXaL/diZTnj+17li7T9DPBXY3PRx8TmAJn9UxmND9HnvESVd1gZyDZU8
zxMMcerCcsRO/8cQ9HYPzd5wQ7RxPka3z6UWKlaDZ7wCDHHlwOFPDubV8I19
aKjK0xCvFQhm+pSWgLCyasu6zfZ9rbzf78RlgZdDfqmhgSGaiHO1pH/1h4LQ
zctXVQ2Re67EO3cjDd5dJZ3+JGmIn9T3vvlsXwz7a9u9pPkN8eC6Nu8v/iqw
6Rc1jmQzRNJRqq8X02rh8nzK4Rc0hmiqpRzQVloPdIdtqEg/DfD7Lv4RE6Zn
sF41WnytwQCr2lKZnv3oAaUewsXxKgNMZYop3/GwF05O3wqRuWmApFcnbWux
D6bF/fU7kwxQQWlv4ZPMQRgtXZnYsDPAlepsU12D9/D0JrM45Zc+1k2nx0jz
f4Hvj9IrL3zWR5UUd8be+i/A+opV5u6wPlL5bE64Wn0F0vpehfUWfZzV5R9i
OzkBycyZdXy1+tj7D47c/TsBNQfZVfXv6OOh8mLi3sRJoLLl1EpL00ern+ZK
+5O+gbhvbuvDeH2cd2hJ4P/3DWxiuHTfn9bHa1+tPV+fnIKIa/nt/wL0UZ/J
5trbT1NQVMFjdJCojwbx7dLLxt+h6+n1LlN7fdyRT4kdqfgO88N85ieM9bGp
idpAj/YHHJgpfJ2pqY8Z6UFNX11/gA61oE3TYX0Ut8ltDC/7AX4Higc+iegj
m73Zf/W/fsAVWWFH2gP6qPyewc1LehoaDEreSu7WR97ngbdFj0xv9+uDbjZU
+pg1Vkn1OmMadp0sHT21rIf/Ws5PMDdMg9wFUWLBdz1UaaLQVg1Pg8uNss84
qodBSTfCyNPTEPdQ/Oi3Pj3sNuJ+srQyDeXdFd+YnuuhesPSxsH1aej7JOkv
36iH8om21E3z07C+UvXT6a7etv5cQiI/TYPgbpnjZ4r10PCD5FupjmkwEb43
X5ylh6Kx688LCqchWO1waGeKHhZIMWxkHZ+GXKualZkYPfQff37yh+I04FH5
iL0heujqWHPJd/YHfI+q3VD10UPubD2RiRs/gDVDMcbTTQ/Nje/eVdb7AWpl
dVvxVnr4OC3QSfnDdyC1KMeX6+nhvFYJz1O/75A8+JimV0UP7deNpx9MT0HN
D9ULS5J6uDaz1jhHmgIqDo1U2KeHxONq7BMS2/WWbmY+Sq+HeelxzcfPTIKN
nlZGyh9dNCCGvZ5pm4Ci45A99FUXu8Qefc+Q+gpdiU8PbLzVxZCYL5crLL/A
fL5OgcArXXw1UkKffeQz6HTqFQXU6eJF3/bZxeGP4DfWLnylXBejj91Q2dE4
CleWDEofXddFxUfcqhsJIzAuYFxJlaSLZ48MO5kNDMMulS5p0Uhd5N4Vd5zO
aRDkLEzvmx/TRaKQcVR4Wx/ERZjXZTvqYl14hJ/F3RdQnvZK5YmpLt6+6qN1
8B9C323Lxs/auqiuf74ZjB7DelOvJr2CLk6vbcwdD7sNgv3WrdKiunghNvy6
w+FzYDLVp2PHrYv2l4wmNWrubs8ntu3hzLr4eFnt7uGR7flKwqGrbVUH9TWN
rytQekAhqa5m+ocOvpq8t/ojrB9uj+/P2zumg1z+7ZlslsOQnDPsT2nXQTMf
Yu4FlTGwonVmor6igy5rr66vTX2DkXFXK10JHWyYXJQtJCyDhVaTij+vDhqY
xt3s8lyBlhxugQwWHZSa4P5SGL0Kujcef3r2k4B7Dy/UJdStQ29Eo/COJALG
5bu27mTehAeHo5ZsAgk4ENUWEs77DzK/aXQU2RIwpS+/qUl0C9wdnnjr8BOw
8ZnVDrNsKsL3w0/Lz9YDpkfa9MuFUxN6vp2N/O8G4JLHCnB9oybcu6FjJpAI
6HfqdMpjm52EU0xtP1ttAL+ts+n/4KQhuLTFP2FWBfTOFImaDqUhaEXqX/bi
A1yIpzaPeElDEJCj8bq3EzC3f/cOEx5aAvVUh+y/H9r4RZg8zOxDS5i8kbRl
2aeNdla36OMraQldDkZ9Nx5rI62ly5rTd1pCNRN98a/r2phaPq2tL0BHSG/r
PKmdoI3NINf914qOEBKZrHfZXxudttJX1cPpCE5ypvvGrLWxSPDevQc5dAT1
KYYJaRVtPD9cdI6nho7AW/iy7gyvNmZnlbUfRjrClsOlpFfU2nj3KrGyrJOO
8IXJwon3hxamzJ0I0H5BR3jRtlss6D8tvD5e5ljdTEeoiHy91vxIC9WHk3/X
lNERUuXSupiua+FlsgowXKQjBE9Z5bnHa+GewudJYRQ6gn0hS0CVnxYOw2TP
Qzk6gopjn8YfKy2kqXz7PGWZlsC1O4PJXFkLLebrqZvv0hL+ttmO5vNo4f4Y
6t3MHrSET5F7707v0MJ9W67nzbdoCG1ygzEa3zXx4+84O8ihIZROXbO62KuJ
2tJx9x6K0BCSCx0ERuo0UbB3wSn69k5CkCP7vESBJv6K9C/35dpJsN79BiPP
aeJ43DxaxlMTTCbLLXX9NDHcavgl95cdBJ3W6JFd1pp450nHAXqVHQT1HCvf
PmVNvLv3VMZiDBVBIVhoOYdXE3s96S3jQrdAynQ5jrhTEy2V+yarBjbhoHDn
HrFpDZxPy6zV4PoLHENBYo/rNXCKTUxpzn0dWO4S6mIKNXB56oDXmPMq7Dq/
V9cwSQMzgxj5UGMZNlQb3IbsNPAcp5Z6esAcLLFemipQ10Cxg0yHJ/OmYeaH
Z9gRQQ2MNozngZxJ+FiwM23xlzo++Wplmvt7GN6GveFuGlLHbzSp/3lmP4c+
y4qyc83qSOgsWdQrSIZu0TNKprfU8arOfbJAYDe0bVk9Y01Rx3iGWat3tO+h
+Z2Q1bsT6qj3TTxBfeQL1D1YHrnppI7zClEBf4g/4M6R/GXZg+qY7mutPhC5
BDe1jp1bZVTHf60L6WNbq5DLrsPcuqCG45pbFLuCDbjYOSlm+VQNpwTzXxzY
tYNwXErePdBNDTdZHuyondtF8KWh+a6gq4YPbFsd7bYYCaSxN2EbYmpYNNzo
9JpjD8Eu/UxayooqTt83+dx8l5WgstT5rOyKKvaZUD6VcrAT/jV5iU+8UEHT
z8UtYir8hLVr8o+q7qrguP8YX4mbAGE+iEYvNFMFD32qs/kNgoQv/JXu1BQV
jN3IMrpHFCK8iF9JE9xUxiG5z1NBV0QIT927eL5/VcZ3o0//6+A8SGhQKii/
/1IZzT/1d9+7fpBQ+U2nDXKV8eTWvhL5wkOEy2apKx6KytjwR78zNEKM4MVW
8HiYRxnvBxPjOsbECLLvKsKtaJRxr9XvnfsJ4oR/hQ1qnTNKOBxWNH7wujih
17vzN2FYCa+FSXY0LIsTCqXfNDW0KGGT69q5KyYShONLE9Hyd5SweeMUV1CO
BAGalrQq05RQ3P/7E8bPEgTmc9T/hMOVkGW/3zvJQ5KEj8ZsTwuISrgoKMF1
8Ygk4R6zYNx+EyWkCfkbNlkgSYgdltW9LKeE7k9ZFH6/liRYXdempuNSQhLf
z9m435IE/iMW7bE7lPCldlWlKr8UYVbCPXHthyJGloa/fqspRWid9zcMHlDE
FEYleR47KUJafQTdjyZFrPsdKNlMkiJ4xV7oJJcoIveb8IxgXymCrGF28sgl
RQzXHOlZ8pYi/GMqNbUPU0TrxqHhv+5ShN6Bh4yvPBTRqV/BQt9UilCY19Zj
YKiI1Rxmp2NlpAjHSf2pLTKKuKAua+O9S4oAYuOWKhyKmNnFmXXvvSSBeXaW
+f4/BTxp+bebtXgbf93mf2JTCrj3nJOJntc2/ujdGUX/KaAYL5/pb9Zt/Ho8
dlwNCnjp07e5nw0SBCsGyX1XixRQ0UrDqc9RgsDfpzbEmKKAb9LpczymxAmz
2cZZCScVcOyz2YjRMXFCq6eT019XBXywNEwynBIjpB305jylp4CjMXCF2XG7
/j9D3/2SVMA15/l/Lo9FCbK18Xk++xRQ34gc94FRlPAvIsPt0x955Ll7VN7S
7hChl1DE4zIhj+3mNxK9Uw8SCunuj/a9ksfOA0zWow0ihOOvW26YPpLH3+YP
h/zfChOY3T8IaJ6XR5fyyLzqH4KEj0LT4w+Py2ME9dvNikYBwr3v68XSzvKo
HmSxe+UcH8HqNMdBfnF5LGvR/OXw+ACBX/vQZDarPD5cXad1F/ofw9Udj/UX
he1SGVFCUsgme3O+x977tV6vkSQjWwjRoKwiLUIUmSUrZL4aCEVWorSMKBnJ
aP1+/nw+53vO89xzvvfe53IR3+kVi9g2ZKl/D0QKwXFOIu2ytRhttyw17Nn3
RwLEdsLd0X32ZLUstXw0ipGGlZGQ3R9YtnxTlrrv7r7X0nJ/gWb6lJ/fOVnq
mpMC/+OIBei/lyo16SdLdWxweB5c0AT5odnzFJIsVelk/Yp1+SwEqZdVDGvK
Ul8OMktc+vkbkPZRoIWwLPU2g1jMrUFGgr2rU7aTRZbqb7cnWWWVhaDuu/85
7psM1fNIVFOtHCfhXt59NLhFhmrQtDBId2kPkd/B6Etyk6GKLqwwllIOEAf+
RofwFhyitvOv70sKkSCm87hSdwcdov557jjreFSauK9TdZddaxO/D5v6pyJL
qCdOjzK9lqb28o69bfNSIGw5rYkf26SpDtqo981eneCt++r4/bUU9fwxwxtf
5TSJD47nQ2YLpaiW26PzfXiAOH6r6e57kKL252k3b9miTZwXF9nRGyJJPdR8
LjHUUJ8w66UKdxKS1IJhoddHjxkQnIHOxOMdktRS29sPH1w0JPJr00MaiiSo
D3qeLOnPGxONxO/RwjFx6ssi8zipdQti3q7/7ikdMepTpcfpZXvtiNp137ZI
NjGqbtpgo9Q7OyIqm/FN6FtR6lvdbtmc2/YE00f1Hb7hotSn99fOCSo4EgeO
3w2xLxOhup059e5FhDNBOhtFyHAIU0POxI4wEYeJxoqDbz58FKDuk40+HLTD
hzgkreIM1QJUEct4j/nzPkRBufG77LMCVGpmm+A7Wl8itSTgo72QADWgYc+P
xXVfwvVOw2yv5wHqwvTt0pm54wSTVNZKcN8+Kvt8TeygbxCxINa6LhW0j8p0
8axgUGkQMSr8+c8M+z6qdE6qxfpMEFG2X5rR1YaPKp/q61nnGUxYcrbvNhnm
pbpaBqrYU0KIzF9flAXH91Ar6X+sxxBhxJk1Fo130XuoLIdZtRyiwgjfFXki
k28PlXEphKGrNozQ/B5jyOrKRX0xOTXhIHaC+PiR3fHXh11UWis1vlzmcKJ7
Qony8Mwuanird/sNDCdqx8nuQYK7qClf3f/7Fx5OnB8u9J4+wkltXrs+8e9j
OCHxXPXkwPROak1VaI5KZQTB2eFy6uKFnVQ2cXbc9ili06+cPWMktpN68fdM
nwBnJPGyuTep1Yedmjv5b3BHaCQx5d6uaPeGhfr7c/cja/GTRAN5u1YPLwv1
/rnhsm7SSSKZZKevTdlB/UESDPGMO0kcMpq1k36/jRp2eKNv9tVJIlxmZwTj
1BaqfMOMa49fFLGq9s1NTWILVWfyMiGaFkVE6HUa+QcyUfdsPX/vUlUUEel0
ind4g4EqwjnIEPojilg/4kjPTDBQ6UUCr81yRBORAQrfNOPpqQ2tj/66ykUT
J8/NthSy0lEjtOpvq/tFE78uPi0ataWlZh/Xw+zz0URUZl7ajiwa6r2FjZiF
/GhihVz++IvBv7ab3LWl3gPRxM/Aw1etXv1pE7eI7kicjSZW4/d4NTj/bisX
vTme8V80sVZxjjkxaL3t+US8L0Ushlh/oja+8Gu17b/DOVN7NDbx6MI9h4Sf
bdWyspSHZjHExvzd2Da2lTZnvM6p4BJD/KKjWIneXG7bZ8Tun3Z8E+/hEEw7
uNT2Rolxuisqhlh1Sp+Zd1loC3mqzD1xYbPeuT/JLSHf2iIlfjx6cWWz3n3v
QxcvzLZVjurcun5rM//10CtKznTbBHI8VCmJIf7Qap+QqvrclpTrsL2yMob4
K3mf+8+zD233axV7/tVv4nL5yBsPx9v00nZpCrXGEDQ029uU3w+3fT/w7DHf
kxiCjvSZcWRrf5vCeOrHuY4YYptVRNac59O2J2KaqhefxxAHFi0tbIKq2l6/
UI+n74khSP+pOz0uvEFISl7ON9/E3YHzUTU6LUSIx3yCX3cM8YGtQ2avRTcx
TC40cemKIeZrtlkH/B0gpu5WCAo9iyHm3OS39Q2OEgz6t91aqDHEl+3kJzJl
E8QnqztBUk0xxPI4ghF+IprinT4F1cYQS1VDNyMlp4idlW9dU+7FEIsXvNdK
uL4QBzgy78cUxBDfXf7YvqH9SqgVyNfoZ23yKaRXMs/PE7ZWAcEzFzf7y5DB
tO/4IvHwEMOWI2diiJ8L44oPPy4RlvdjHjwKjSFWxoSPmDv8IHq76Z9884wh
flQ+ajuls0rwm/3l+a67qSeb/vvuhjXilIZqdpvcJj5vzlchvUF8/ZZHF8a/
qYfyMXKC+w/hWWope3Elmlg0lCwOv/SX0E19xL76LppYkD8xzMrwH0HtpNtu
0hFNRMQzZOWt0eDgVrmi5iub/9tJ8Uq/aloUSzyj+CEymggPtOhU8adDavZY
3TplE5Mzf/Z9osex5PuJnILRRJislA3NSyZcqHhnpJMfRZBfUbYXZW7B11vX
r7tERRHaIRefmh7Zir8ln6Y620YRrLXflW+sMyN9R5n4Trooolilau8hIRb8
bMt+bsrmJOG/P3tZunknGnfp+mV3RBAfAhX6TgtwYCzV8KjU5QiCRO0pHzzP
gcXfL6QukyMI9cN/PE9ac+K33htzSt/CCaYCl9dPp3ehv9y7BWQKJ/JFDjQ7
7+TGoy9Ecvr3hRGcEQ2ZFeHcWPY0U+DyRChxvtPqBO1bbtTVVFWbuxVK+Huf
OVRcxIOMU+sTcfyhhHrZp/xljb3IJa9oNs8TQgxK301I8uLHHaTM+z5bgohz
vNeKx10EMWE/wfGn7xjBesznvuBFQVw7ZF5p6niMuFmjVePTLIivLe8rKHz0
IirNplvXeIUwt03+9ezKUWIiVmWEc1QIufQq/vYe9CTUP79hMLMRxvG7X2yL
7rkTHTIV266cEUaHHDjzSdudsI45yz5WKYz8KsRfo0o3wnu3JJ83mwgauXNr
57G5EtcNYxTie0VQ6kmE4+0vZGK5nN+j2UAMFUW2N1dvtyNi15eP0YeL4fNe
z0eEM4lg1u/0N7krhiebYssp922JAxOBJ0fpxfHr0/XPZCcbwoK9PX2FKo5v
2m9nd962JMYo165rLIpjc6SgwVtfC+JoqU/O2f0SeMU2TsRKzZyI0eEoYY+V
QC6Tvv5j0yZEadiRNikNSewaFjpRecaAUGxXeRbqK4m8yq8O7wvXJ6gsO3oa
syRxtV426k+gHjFSVDtitC6JQ41fBFjDdAiGN4zfPR9KYREl4NrFKC0iXXjs
R/mkFJZxhZoJNmoQe0MqNpY5pfGgvwNjIIM6Ib/dgfFMiDS+E/Ntp3+kTLhr
lfDlyhzCJN9x64J8WeJZ2H/JYx6HUGXn/uF1qUOExD37jT3XD2GyClt6u6wk
scLLOJLx5xCyNe3mfBknTDjZUPT6ZWSQfOkCf3G3INGaVFPNckQGv07SurVL
HSCS1g+nJT6Xwbwts04Zfpv+T+bR32d/ZNDtmtuD4IadRJnC1jpablmMeLrX
o+HINoLSp+CfLyeL5JXP/hkVtASbn9tBwlQW7W9261TmL8NjppTxd56yeMIv
pCQh9imE3anLiImVRfeUsdlrD2ZBBD4Z782UReYjlcJnM3/DmzcstI1VssjD
t7DiPsZApJ5Qa3DskUWfox6iZ29sJ2Dn0cC1SVkMVhBaDKXbSRQaNb9T5JbD
eW5Lj+FfXIT95MzVQTk5vJO/qjLcwkMwn+Y0CzGVQ0a68rgsZz4ioN638UGs
HF5O7xPjurbpB22vB1tkyuHRPey6MhUCxOD3drH5Kjm0PR7HzVonSJxPnn+f
0iOH5wqLBlnuCxGqIjw3JKbkMGux9nDylYPEXLuexfN/cjh1Ytj1g48wkesS
xOjNLY/t30vp/GVFCKuN7GYmeXmkb5nfcWlGhKC71hl611QejbbrV99OEyVq
ZX9I6B2Vx7sxGklM4mLEsV7+T59i5TF54kTE3loxgtfbJOtMpjxqKfPmEXLi
RC99uNWBanmsDQ42G8gXJ+Lybm9p65FH5tlnn+XpJQh5jRetLlPyON99po/q
KEFMjqyf+PNPHovD0gPGN98/N0IOSmdzK+DhW4z0nyYkCBNWq0k1eQW8L8ty
W4FdkvhTGp09aqqAdyJE+GWUJYkH+sU2EUcV8D+7+zQK1pKEx8cBZq44BVz8
VxOYe1iS2HXqH7U2UwGL8mSEejffc53cEpG21QqYbRVF4vOUJKJq7WSWexRQ
57TUgzl7SULK6sx0+pQCfv1lqXMFJYmJr/dyZf5TwPCU78HBApLE5QujpJfc
ivhA8N+X95vvTT0hhh3+8orIY34vRbVbglhtlXmy3UwRv5Zs8x3KkCBKyM5R
ZUcVcWhpX812kgThvHpezjhOEXv2WpcosW6+/zKqv8xkKmLAmPnlknZxgio9
kXe+WhEVX2tUPgoQJ0KeMzsI9ypiVdMx5Zbd4oTwUSXWp1OKuMZnq8ZUL0Yk
56TG0PIoYYFCs/aDWVFCS7VBIV9eCTm2FCQ/iBYlFgc/z4GZEootiDxVYhYl
7LZrOMXEKeFRn9REJm4RYjmeRCrIVELhFx8VNXOEiUv//C27q5Sw6xLDFO4T
JrqW8vW5J5VQaEfB5adcBwnNUSb5WiNldM4oSHj2XYAQvDuw7dtOFZTw0JrZ
/oKXaOP/xsgpqYIsgnLVeSU8BCWTkVZdTwVvZh4OXoznJq6lqK5dCFfBQGqO
rJg2F7E15NZnoXEV5HRJvvCxfyexAL7NzoWqqCMpkSvERU+kNpyrP9uiijXr
AS31ErSEmHxudemIKrI8V36zPeMfeAj3l6xtVcPKgvgwMaM1+O/WbAG/oBq6
808u9T/+ATnc9Hn6Gmp4fY+vI9guwsh25WtX/NVQnfRxf0LAZwhNsExvPK+G
50a4mGsOjQH7f94pH/PUsCntX+ue5h64F3n2/NZHaigXx19w/NktMF7OPiMz
oIb3s+od7pg8gWm/hzH2X9WwYfWF3NrwEJydehlxikEdW9LfzPYUvofmUdqA
HmV1tDLco6LFMgdONnt9li3V0ffsrzbFD99htUfRk8dHHS+cath6j7oEMm3H
yMey1THwZciTda5V6FU9Y3epVh05/gk8buJbB+/qm1YPX6hjQNrajkLmX3Dn
7gsDehoNlEwV6jPM+gvE/hltCR4NNHX/2mCg+R+8zaTRspbXwB+MXyoij9AQ
Jzl4VSNNN3Fk474WPlqCK1VBIc9TA3PuJu9g6aYlahjND3Wc0sAqj6apC350
hFWcl/j8dQ20iHb8Y0lLT3xbjzu4q1IDb1V/809OoSeSQrL2azzXQFKrNYPb
NgbC4l/4dOUHDYyarQlJDmcgdiWT7ousa2CcRljCrjcMxNhu+bAcNk1k6yvV
F5JnJPJvs2lwiGqiFK2u78QZRsJLep42ETSRzvmrTmAXIyH5qLvrr50mijoz
F9AwMRGLeiVpof6auNdktLdVnYmo60+wn43XxB3SdyivvZiIGMqRfW45mgjf
9ymeTGYidL7g5FCNJhZe+Hl06C4TsTWMv9ykRxOL90QK8D5iIl789zuY+kkT
uVOjb8U8ZSIyUt6oKv/SRO3kYGaZLibCcU/9f+U7tXAXZ03g0c04f8HVDgFx
LZyyYLpH2syfPBRy8QZqYcHIYVv5YiairNGSxOKohW/LF28rXmIiggyk954L
1MKgZSfvjAAmQnlg26f181rIH2G5cdaIifjt8qUk4JYWio4f3QN8TAR19lng
5EMt3BBV+/x7lpE4f6JAmfxCC71iPzxfqWIkzGjP/O2b1EIf95rQw2GMBMdF
16f6f7RwZvuRmig5RmKUWzOliROwT9n3xMlZBuJWIY+NnCSgJ3n4wfUcBkK8
eeg9HxlQ5iW7CvtPeuK7YXVRRjDg09YJjomb9ETtYJr/1iTAWorYsfua9AR+
Nfn9ox7Qo9lERO4EHcEUIfbYpw9Q1+/vTrsddEQvHVPS+2nAv55cLk75tIQD
bztXz24CZQJ4TN610RABxiryd0IJ1De2lLN79hdeDl5WLNmDOBH/T6iw8ydU
ZdFwHxFC/CPytsD18QpcdQv8vU8GsWZ+fzZjyw8gfzV7fMUAcV/MWqNnzRJM
0W21ijuBWHdc2piW/BW6usIV1M8gCv8RDEh1m4WyS1NcP1MRSewvc+/5zEAQ
75N3voWIDQceL1df/Ax/5GL97AcRzdSmX6zpjsK1apZZ1g+IfE+/tyR5DcEh
hVyvzm+ILGlzKY45/dBVIzUZt4GoLxB7LKf3ORxWbD6syqSNjRxM1y8lP4Zf
tabvFzm0Ue0CraTZlzq4qjROKd2vjQuFs3M3Je+AdJ3v2GGpzfiRhVXZ2MvQ
ofzLgVdtMy72ZkDwRBW41ycND+hrI+dEqEeqWCtsqPDYptho45bQ0cPPNZ6B
lJqqxR8/bXxBm6YuGtkPzx519tRGauNrMEzp1RoEV3UHY/8EbRT3NIy5/WUY
LmuE603c0sZ3XkG/S7+NgUQz4+Pr5dqY0Be6/4j+O3iqeY2wbNjku1pdaH/2
Paxq1apTX2njQalf7BpDHyG9VbchckIbf/IW7G/v+gTixKCS3FdtlJD6qaf3
4DNQcFn2DoMO9lm/a3a2mYKf1DMV5J062M+jEMnMNg2XtHdKcfLroENF9tB0
yzSIPc4v7ZHQwdOnlZx2uM1Au46saLyKDkZL8jLeWJ4B8pO2Qk09HbwpoSVe
EvkFVnQtBX9a6eAXn2rto0tf4OLTibz7LjoYl3v85Rpl04/pB+zz8tVBb6lz
khebZqHt2d+b/BE66HuOzcd+83x1NLjI/fqcDhawVQkm2szBcgff9bR0HWw5
1mlPTpmDFMN7nEa5OjgUEay1tWEODnZpXKYp08GFSff9/aNz0GrUw/qoTgdn
XqRJ/ZifA4fn5NTgJzroXjpj83BtDhaN55gl+nVQR3Fml8vqHCR1n7zw6a0O
dkrYuSvMzYGgKTNj9qwOng1kOXpucA6aezLP2q7q4P7nP/1uVs+BnZkYzQ56
XRyTFq3ovDAH33vrTz1l00U3Fkcpiu0cJJob/o7h00UR1qvny3bPgcDLkUgl
cV0M/GI2xNQ3C40WXqvzSrr4T7w/piNuFmz7foYW6eii17wUO4rNwjfLhCVX
S1301rp6oKfrC+y3LvzW562LfamfRSN/zEDDKwXfxBO6OFz+eMMsdgZsbJ7M
4FldrEpwephJNwPxtp8+VWXrojRLydN/61PAPxTs7luii4nKJnov/aagnkQ7
Ifhwky9vsD32zSTM2R14c+WlLr7eIFl+LfoMlo6ufSdo9bB+tyS1hvMj/PnY
V23HoofcxdviRkM+QJmf9nUlHj0Mn+Ub6M97D0xxB11+yurh86bktw+Z30Hr
3bm5MHc99MjZS3fj8Ws4LkN5STquh9R6CcYDASPA++hFlWKkHgor5s+k8gzD
id7KyJU0Pby48+qnueABkPoRzhTWpofSCiuazL7dMBbzZda2Rw/7ki7G7hnt
hEQm8guF13rIVWdvVm/2DD7zaF398V0Paw8OFmWZUSG9oCJi8JcezsoZCSZU
NwFIH3CuYdLHleDXklcm6uAm0guG8uuj9gG2ty9mysCoO4zRVkIf585zV3C1
3YZV2+kv8sr6+HTmwtXC5MtQ+M6hl0NHH09bBTxsU/2tZX3s+YNlc30Ui68w
U5C/DP8W1a8MOOlj9k9BuumNfLgXdS+8+qg+DnbS6jMfLIWtl9K0Qk7pI65f
uPTVqxbq9tAK2CTp4zZRyk894QbwvB3CIH9NH4UdYuetnzVBW61dz9I9fWzv
sGjdRWqH49BZ8apBH492PORfWXkMvF2qGVVPN/lF6mxvJzyF8PG9TsFv9TH4
z5hX4YlOOHj0oqb1F30s/r0joWyoCwa+/9svt6KP07fceiYEu+F0ZBD9ThoD
vKLyN0fcvQek6T5NL243QJUz3pUnU3thLMW2u3+PARanpf14UvwCEnc/u18p
ZICViV4B9NUvYVKsJCxIwwC5rKI3Hhr3Q0Y1j6OVoQFKHY5QIz3sB9RM0ZC1
NUB/xiSf09yv4PuzP/zsbga4RHwiG4S+gmzLALpFXwO8d3otofbZKzB6836q
L9wAb2peXxtnG4BVD+vnD84a4BPmc1r91gNQ+O3xvbRLBigSXmJTnDIANuGK
6YE3DbDdcCL5ZMsA0NAUhVoWGWCZr03s4ZkBqEja4yBTbYAvObJXopkHgcKZ
pM7WaoDWJtF9M0KDwJz7a9/CcwN8/Pbwz2fKg1Ancpy2b9gA5+6UaajpDIJn
5bvJio8G2DtSZuVlMAgc6pZdl+YN8D2m3w3VHQTqE2p5wIYB/rDa65ikNghH
NMWrOBgN0YHktawkPghMDy/X1bEbYp2VtOYZjkEolf7VROYzxML9nArXfg6A
WZFH+z9RQ4x9YcKaOzAAC/w9HXcUDLEq6pDEs9IByLih0GtAGKJ9xrsf6tED
oMie82rOxBD3WnwZkjIcgNeJDK8v2Rti6hLr/m6WAYii9X8r72GIG8d413X6
XgFf1PDHEX9DTLAd0u9KeQUefkXf+BMMsTPVfn/baj8wTrIuP043xBvUa/HX
7vZDCSVizSvHEH/WXpvTtuqH7+ZGdA9qDFE1ehvdiEIfXO6o3GLbZog6Ap//
uxXyEhQJHpa1bkM0eOS3UF32AqJk5/YQnwzx6Y7lOy5be4GRM1W6j90I68Rv
iYokdAHfaJ/jgr8Rfm3tL2KZoEKblarrlZNGuO/7wC2jJ23g8Tz/iEqCEQoP
Ctpdfd4CJY3BAXE5Rvjce+uq3cgjUMjljGfrMUKPvicNFPpqGNkdk1QzYoTO
5VkJAVyVEHlp8pLDJyM8qcS8VOl8D1rjHmblbRhh/78HvXSjhXB4fV+eLqMx
urJn8dSJ3gaG4POFM+zGWJf49e8W5mww8XB4ICNmjBcWV7ipd5NgfqytdlDB
GE1EONLLsyMg3VasMYIwxnH7fessx8xAoTe9ba+pMVpKGUfbi8bCiN7G0zZ7
Y9Rx55e9yZUKJ1sOdx/xMMYQbJDZ5XUV+JS7+7YEGGOpryU8zLwJh0WzxywT
jHFulp9/BxYAQz79hx/pxtiqlGQpxVMERdzHp27kGKNc+Y+V+vES+Mastfi+
xhiHX9/KZ9hbAWln7/4812aMFaNbO46bVoL8b5bfoj3GuKW3qO/AqSqI/DbB
GPTJGC8HfaVXaKqBV/u97+5cMEbG+3venHpXCxK2S3o1v41xu9DWxsrFhxB/
PmqStNUEaz4JDZav1MG7R/Txq7tMsHnLQ2n72XpQnk8VyhQwQSH59Wu5Lxsg
/QDXE7VDJng/ZHtceOEj0LkgRnfK0ARTlrol+wSaIKex6jY/yQQp2zX+c3je
BD/n1bWp7ib455G+dPzhZrAQePrhsL8J2qzGnzk21wwlJPPT9FGb/DPfc/d6
tgBt4sj+u+dN0Omi6kDbyxYgN7m1GVwxwX1jnUuREq1Q+/2L65c8E1xetRAL
jmgFFsGQf0n3TDCATuTF64et4GX3O1fykQlW74xW+jjVCtTEeK0Xz0zwxLPg
hI4tbcDTzPIuYMAEb7AZnn62tw1CFq7HsL83QWpRhsMBwTboFTzAV/3VBDnD
mk/u24wL25c22a6boKxcq9uWzfzYJHnnnwymyPNHnyw13QqjzU2/ru80RYHv
tq4TDa0gt6h3U5XfFAu0vV6FxLVCstBLtTEJU0x/aGqno94Kk/YOb6JVTPFh
Vc2VktkW0Er+ELlPzxQPHr/EzHCpBa63+HC3WZlizwu7gYeiLbC4uFzv7mKK
H+/bhArUN8MdB8a1gnBTPDtpINbW0AS/ky9d1z9nihLFNbGPJZuA1LpHeSbN
FJ97rT8XuN4IW4QlTkiUmuKWyLizxTaPwN2xZlfvQ1OkSWokl91tgMYUzVr/
x6YY7sGY1b5UD8eXLX5Ujpui+Ii66PfwOngmPJph88UUPzvXtE9WPgR+p8Py
KyumuDXFar1qqhZetYUGq7Ca4X+8IVkZ2jWgfDFzoQXNMDjJPEEv9wGkUQXS
3MzN0MTF2Z/p9X348qPsEC3ZDLOFBHdSWO5BNrnFXy/UDDse3d6yI7QEaMQ+
fe2+a4aND17pPVa9DWRnv5Tj1Wb4L6VFfXHsFtRcWpFgbTNDxuRtvLPG2eD1
k8nXetQMIetwBTtchTaxdOYfk2YYkr4gPP8sHbgpPKVXl8zQlrVJ9UhVMvQ8
lvzyeps5fhjds+GcFgWq/12fz+cyxxMDW3Isqo5DkQbdDx9Bcwzar/rQu00H
dkX6r8sfMscEyXsNXRMecLZ29O9vNXNkC9g/RP8rbHM+uvTP9M3xbKvcuJfg
aXCVfrD1krU5oo6apkdRAqgVJXAe8DFHrRXTdhRMh6JPi9yzYebI/GjDgqEi
A3btp/BXnzbHriN2PuEi12Dxhry4XqY5FiQppiqNZ4HrUO4hlkJzfC1n+O0s
Vw70sjMrjjwwx428lKQ4zVtQnPQevDvNUePI7w8nhW7Drg4TPblBczwTQKPv
svsOnKWrM/41YY51ZmePzfy+A4sgYPlkzhxlqOdU10cKwDU6lZS6ao7aWloh
YUWF0Fu/5mRHZ4EjC9wX9X3vgvqKhxs/qwU6WypXOwkWwW5/Nd9KYQtU/Kw1
yhtYDGdLCwNPylmgI13Bzib6ElicYjuho2WBXg45t+NTS8BVMDpqu7EFtunV
iccwl0Kv63TcEMkC6YzKL5VFlYJ6tnVCrrsFxu579ZHvQymUvG5O9jpugfwd
/saTamXAtUssXSbSYnO+f2d2J5bBOasr19bPWeDp+ajH3d1lsJj672Z7mgWe
F6y9u5+uHFyf++QnZ1sgg1PzNqVD5dDLOHzXttgCZ4USfh2yLAd1HSznq7HA
SL8Hi4pHy6EktrxyqtUCeevzW4KDyoGriauuotsC763NHuMMLof4tTNNESMW
mObNxmJ6rByWFOap+MkCbX82t5vZbvIFOXYwf7dAUa2IYEulTb57T3oGNixQ
TnuoJZVlk2/20KtsRkssbzF7h2/LoET45ojnTktkHn1wsuz25vo8GN9K77PE
tzYml7a5lkH8raCPq2KWSCfRo1+4swyWx8an2xQtsXjj5+vm5lJw22P4LREt
kfJa+li222Y/bauXrM0sMeDa9LvEXyWgnr5vjdfREj2HmXv7LpYAF/MK7f1A
Szyd+ulR9q1iiNd32xIebYkZRqffNfMVw/KZ7h3EhU19jKnRgVeL4MWv/D2v
blmikwH/7hfBm/NX2bHvZpklvrtcTsO3eZ+WhEYIHqmzxG/pLfR6aoUQ/81c
+ucLSyx4/prVf/4OaEz80uH5a4n7OxpvWIjkQ6Wv7tICgxX2GTmHFDy6BTpe
zNq2260w5VZSxuMDueDlcu0DD7cVfusLlMj4kAUVpvf3F8tZ4bRVTeqS5hVA
w9DAbapWaCf9oU778mUY0FFr8wcr/FPR47zckwaras9cFU2tkCHT+S+7aBIQ
Yu9y2z2tsP5XVFaqSSQMCBXMH/SzQkX50U+Ma8Hgud9HKzHYCvM/bOtUOnEM
VnllLn6NsELzSKdb8a72kMj1861FrBXezFrNZp7bC7wcTVLV8VbITCpROeLp
BPdYzsTsTrFCDY73e1DfG/oZWPje3rDCjE9pZqIWEeBBM+hH3LLCO3t9t8Xd
i4GV35lNdwqt8OLWbU9eLp0G7h8HnX2qrFCnZIv2xlwClH2fK+utt8KgzOoT
woaJoDlX+Uum1QoNG/h5X6cmg/tHzZur3VYYp/doPGrgEiy/pZtzemWF4Y+J
x9Xe6RA/2qXW8toKlRqm7D87XwauoUtJByY29VWyxebqZEBJH+nNuUkrTNcZ
X33IdwXUe3jFZ+ascMJK8dOWuSvQ2/Eh0mTJCslzSg/Dyq7CUstx7p3/rDDv
5ikxPYbrEP9I3juMwRoDK2YaE3OvA9fD9frX26xxvUV9vlz8BpRUtm7R2GmN
sdPpDfdLboD6vXiHW3us8W9v8/QV3kzoLTYppuW3xuvr3Ss+cZngWsC+5nnQ
GkcOXP+BrzNh8daIQZeENW65F+UlI5gFZ2/mXJeUs8YOU/0D1u5ZsOu6x/Ql
lU3+5Aj+zstZUHRZTHlZa7NewYJHfV0WqF78nmCnZ42cvrt7zfqyoDuxdrjB
xBolj2V/rds8PynxUcJ81tYYdfHHuPjbLPgehyfiHKxxx4XkXRP9WXA6munZ
J5dN/taPmuyNWcAR0bvLwNMa5SSL/9FkZkFhSIZnqa81nh8fHVnxzQLlAMfa
HcHW+P7wrmkFhSzo8uFnCIqwxqGd4lTmpUwgH520HTxljQde0mg8K8yEb+5l
Bcrx1sjv/59mg0UmxFKCfmQlW+PWK5PJKgs3gN1RWfdvujWmvXa4dvP8DSiw
/ZPhfsMa/8wKG2jsvgFU25prDrnWmL0je76j4Dq8tfXNtCiwxs0NFW4meR12
kUZzNR9Y45Eln3+xm/eHLCktX+HhZr7HwH89N6+COcmgQKLJGnNO2t6yYb4K
50m1Jdyd1sjgIWLuMJIBd0h+5WwvrJHu72uXGKUMaCUJVjANWmOmpU2HWPpl
WCOl16xMWKP606vivmrp4G13vLV/1RqfT96WKX2eDPF2Qu2df6zx5ecFw3mb
JLhtN/aklc4GadUcFxJGL8CYndHze6w2qNhewWU0Hg+m9geHEkVscH+/QofH
7VPgbT8+EidlgxUPxQ9fyImCePuMN+HyNvhda+yNys0IaLanee8JNjhS9HK5
53YwjNrXf3TWs8GpBc7Al87+8NM+YNLGxAbzhU792jhzDA45vJ1FexuMp1ax
T9M4gonDlW8qFBv8ciLy1fcQY/ByMFk45GGDpeN6VsPveOCsA+2ysLcNtlXI
HYvJ0YE8h4YVvgAbfEWJd7bdQoJmh8A1zjAbXGo0Jv4mucKog8ivbVE2aHXp
pf0pH8/N+V39bz3BBlUnJlb67QJAytGUbjHFBt9r7vRxvxgMxo50jDOXbXA1
zz40cSIUzjoGbRvOtcGIqhe9xzfPp1uOoiy9BTZIY7PHj94zChodJ9ielNqg
uUT95D+fGPjhaLa76qENpjwqvneH7zSwO9FzlzTZYLtCbddbmjMg5dTIm9du
gzKlHukhY2fAyCl43/VOG9werlOrXnoWPJ3EDlx8YYNdDlUD7P7n4LTTe8H4
QRtcV68LHhaOh1yn68LRb2yQs3/Hmv9gPIw4MUj6TNlgCP++gK4d52HZqUna
/asNOie8EffPPA+s5BBZhyUbrG7n0SvnvgASZHEFizUbPCba+iLu4gUwJH9Q
0v9rgzOymp7fVi+AJ/mGqia9LXY0GfGvkRLhNNlCQ4HZFrnMD0SUFSdCDpkR
JNhs8Vqoq+ruhURoIDejwG5bzJG57GEimQSWAwGkX7y2WMZd8y3BOQmmjQW8
Bw/YYrDfDUbJM0lwqn0w+p6ILU782DZkn5MEu9TOpyVI2aKQ1Rc6iftJUF6p
WuAqb4uG92qKumqSQEfsa52Kqi3OGToIkiuTYDQvt5sdbHGKfud25oIkCNxj
NTGra4u3SjO306cmAVMa3fJjY1vMs8nsiPRLghymh4w5lrYo1nSyIVc7CRRi
j/GcsLNF6cEM7hLWJOj+ySNt4WyLaYyDj/oHEuGwfy+KHrZFl/W5OZtLibA+
GUuiOWaLxd009se1EyGNIuf95rgtbmPY8oHy7QKIDH2Org6xxb6lpgteaReg
xfR6WkqkLU6rHtF7IXEBSE+MCjxjbfHZjPrkSOt5OFt9v5sreVM/h0ng8qsE
4JFwn1hIs8Xqrbq/blgnQOVtjuWua7aY+lbEc0tPPLxLj+CJvm2LjQOXNiLv
nYOwrRLSpOJNPW7vFLh3n4Ntp9+i9H1bzNSOEm2KPAuqgdre7xtsEQrLwizk
z8BV8+31uv222FL9nENgIQYkn7V0843YonW5+BbK2Wh4rBk08XPcFt8bTCXX
skfBouQwY8mMLVadnA8wEIgA0215pB3/2eLQrrl/x4SC4dMZa+8pBhJyVp8S
4NUJhMgN+pjWbSRUF85+HKm16ce/eBcEcZFwqoJtgEvNC7Tc99Yb85HwkdOB
Vzc1jsDQ6xfdgoIkdM560NSk4w50nfLLQ9IkFGP72avaQYIsmGKsUCBh0d/F
vW0b5iBbd4PnghoJy4SsfvAm60CntIm0O0FCPpYzB68zSoPr3T+opk/CBOam
l2uT/PCT7wGJw5SE28aHTfIytSD16mHvr1Yk3Hl1vkw82Rgaz3Wk5VJIuD/I
lS9KzgGsf0cWhHuQsHz1v7QnGhT4EiJZb+lNQgG+KnePK+6bfi99gjaMhI6y
R26Wmh2FYCRLe6WQMMn7Y3rNtD947t7H2nqZhLXvaho16IPAfu79992ZJMwS
6owS2RIM6lePVj4rJOFjbT8B9rkQkPIRu7yvfHO9zKEJOV2hwA9fg09UkXDO
nanC7GYY0H0JUhBuJaGxZfDeGK5wWGlW2HXqKQnpka60hRoO05dXV4a6Sfgj
vDi42CUCRr0eDUu9IuGb6ulHEvMR0K0RUxf/moQFD7ZwE4GR0MxO3Hj7joTk
jhSXT58joWKKNlJxkoTaT5RiuU1PQn7jU8fUORLW1NWEfS08CRlpF9QmF0n4
y5hH2G/pJMR7mvBqrpFwcS+f1n3ZKAhXY/l95S8J/bYbcLzwiAJv1v7xr/R2
qGYrHPv1QhSQP2c0626zwwdjeQ2H8qPArMEuN5vdDldTg2Ufl0cBXOSO/cFl
hx3Plw6PlEWBrMe4q+k+O6TKWN7Lz40CIZVbRIGQHb6y1BF2jo8Crh2HD/wW
t8NqJQs/Pbco2PpRiNZW1g7fllPD8w5Fwa+H0x/LlO2QjSfGp2b5JHxLLn1M
p2WHFs73XXrKT8KE2/ECsq4dDut5KyiTT0K/okx8tbEdUp6muxj8i4THzMue
26zsMMP92X3rzEionajV97C3w6AV6v4qsUgoqokQaaTY4W+73YXUBxGQmai+
heOIHa4IHJ6bkI6AGHlqV3ugHe6LZlt+yR4OAVvOlfKE2+GHo6+mfMJPgPtb
/eTgGDucTeC9cncoDPTP95gKJNmhVMaBuLsxoaDqfEnqZJodlgkYeGFnCEjI
WrO8umaHJ0o8vortCAHWsZGXp+/YYQGFpvfm+SAYkf5k/aHJDiMSRfl0r/pC
F91dedXHdtg6bFZ1btobGl8f40zvssOKIWqMseIxuHVmfogYtsNmtwuML54d
Aa/hdYe873YYqPAm72ClEziWNamurWxiqQf1HRr2YBIXy2P52w5zSPsCL/bY
gCZJ+1cRrT1SfzM3/2q3gEPiDOP/tthj5fTQ9YO/DeHAv44me1Z7TE7oNTql
rw0cg0k5Fbvs0WjBZrrcUAkYSsxOMe21x/f2kXvuHTkAazFsrq4C9hj18Jzz
1FMOCLN/smQsao/K58/QzCfIwqJMRIKStD3SdvY/mBHWhC+fJu7tULNHrXsj
LqIUY/BszsB1sMd82VvLNa8s4OM1g6HPevboUEpMdHHYwJhRxe9GK3s88I83
9LOsA9gLeqQV2dsj2PZrJhc4wcDv3UIZFHv8u41F0IqOAj0Vp0x8vDf1v2rJ
fIXuYJQoN0EKsMeTFg48p60Ow9PDU8EYZo/ayb84WO08oHmXedae0/bo1p0i
NKThCarfaaTpz9vjhdj4zrx9R+FhZy31e4o9rihl04T8OAryt71JY5ft0XnP
fhPBFi+oiOL78uyGPbKPS127GHUMJEj90VW59jhYZ6ZzXdIbiqTj2XIL7DE6
bpb7YL83CG5RLUgstccgrWHNg94+kPfhq3LYg816jp0CST98gK8xr9vt4eY8
GH/FmIT4QuYVW1fTJnu8ePKz4tFJX9jlv2VZud0er7RzWY4b+0G6QVOCYKc9
mlT4vq254wc7DgTysL6wxyMf3D7/+u4HSRuC9zcG7DH09Bej9kPHgWlwBKdG
7fFVe3o9n8dxOHsveah/wh6rS7gTRJOOw78E8G6etMeeuurrNIXHIcpt+Xfx
3Ca/WqFuT/VxWFUtSruyaI/fl3qVHzw8DqEcZKG4VXu06iuyGL13HBa/stT7
/rFHRyHzmPDM43D8WbuJPZ0DrirL3G6JPA5fbp2Y0N7qgJWcXX5T5sfBM1I8
RJrVAQXmHRTEuY/DB+t3jDy7HPD9m6SBztd+4CJ5OYuB1wGhOf4M/UU/GGPQ
l17c74Bshh8rBFT9wH5inTou7ID5QRyjvm98YaD+HqlTcjN/SPKwRLAvWFx2
/1It54Aqbet+Ff/5gKFeF1uylgMyDzCZGNP5wNN9MQUndB1wV65O3tYIb8A1
GZXDxg54YyZa+N3nY6BadsNV1c4BE7sOsEkXe4EE+7H708cdME+heOfViSNQ
NMurPRDigFvXNVl5+Y+A4JOXQy2RDti749BGsaMH7A1X/nM1flOf6KNPXlR3
2PGW0VQ3xwFHEkrMcrvJMMnRXX7/jgPWTbffzZtzhCbjSzu4Sx2Q50mzhiWT
A/jWc7389tAB42X8gq8p2oLO97FDDs0OKFrAeXO3sTXwCOeltT92QH7LQ6ck
Gi2gK0PU+nqfA3KZFhfGsxpC/vOvVTQjDmirfqwyCnQhgqaSw++tA3rePqds
PAtgoRIWOvzJAQNe7VQOPqoCIgGqQ8Tspr7wbY5JszLwr/CPYtmCA+oweG5n
VhKA4XHqtV2rDvhA/jndndyfWvc4ElZj/zigYr++d7HYHog3NnaYpXNEfik/
BoFccaCcZmmwZXbErdsv152qVACF+lfcrWyOOJ7lvV3OXx0+HSSPZfA5Ylv2
RU7NOl1odObX+CvoiO2uplmswwZwOeNT9jFxRxQOY5ewf2sMSOPnoqnsiPWk
QiuafEvgVpFpLdJ0xDd2gecVpa1hwf8H/05dRzxzR+x5aYwN3BqP/jBl6Yjw
Y6C7fpEE4RyobWXviO8Cdb5e22UPFsYMdxopjnjnuFI3Ie4Af+tSj6T5OKLW
9cacCSEnGJq3eroR6IgdR+kqKcxkuHdwt7BnuCOyLl+vb5ggQ7zzm4SXMY7o
5TLr1FvgDJSM3GnVc454TI56/aQjBRSfHzYsSHJE9ydttWV/KLCdRqSEJd0R
Ew8PS9qku8An5bmtkdcd0amqM8WX0xUa/St8PuU4osB1L7fVBFfIKAzpNitw
3PQT4TtovriCz7iyZH2pI77isqrMUnMD5PidIlDpiHZHAjbeRrkBt3Hbt5Q6
Rzzfv/x3rtwNFuPOma82O+LgL0u2b71u0FlnWOH+xBFLdtqmsE24wa357Ww9
zx3xqopcWcp7Nwg/2B+o1O+Iw9eumuS+cgML56v9eSOOeCNopPFCrRsIZzjK
bXvniA92uJy+mugGf7r4MsI+O6LV5Wt8nBZuMPTfh+WJWUfcK6bV78joBveU
79oaLzpif+YDCrXCFc75+9TWrDripXsXnpSauAK5UHo3/19H5Fv7yBD1xgXk
x5dOJNI74bN6hrc3nV1gG0fdyDKzE5pmckZHvaLAR6MoFRd2J3QJNdNP2fR3
6XV0G3L7nJBrOUB533cyeM93OOUIOSG1xCf7mgoZiIMpjUwSTuiZK75HOsIJ
vl/mjBlXdkLXxzxRXWMOgDg4L6rlhI88i4tm6R0g43uGW5iuE3bwDn9OErYH
ZVMOXRYrJ3Rskb/qSCJBHMPObYSPE5pA5vxEgBUMVPdHpwQ64a4ISFMdtoCD
h9PnX5/Y1BfHp7C3wwy6WtheBZ11QgnKeQvLTCNgj2DNvJPthKIL8wPJexE8
hF8yL9x2QoU3vBntqxpQO3gxWqPECevP/LHMfaQCjrIsbkO1TrgUR9rYe/sQ
lE309h9ocsIbh4v3tlqJwJ/UVB3/diccfafI5yzJBxYaZrWPOp0w1fDSjcYX
WyB/drsI00snvB7Q0Xzj6qLW8o2eGzZDTrh7VZ9n+zIn6BmkMOeNOaExSvtV
NwvAlzvb5lVmnLDvvemW+mOyIEdhrvWhIWPH/RePQ30A4rc9F65jImNop1v6
oyGEkYbEG3QsZIwavSJa7qUDUbu3RmfzkNGL2eiKjas+9D7p/Dazn7x53ipf
3f3EAPhDLrgqipAxjOMc49QeI3j8kknnhTwZ3+/+0yOcbgK7TnXU8KiR8VlT
L/23alPwkjwv7EWQkRRTdcr7qRk0vNG/Ua1Pxn17ah0pT81hWyIj83+mZAy5
cubx5WoLoCg/izK1IaNmLufC+CVLqJiM/3bDkYz19DLnU6SsgOaKnuukKxln
nlZxX020Ahtthn7Zo2Qkp0rcjR23gsKFJ9qn/Mj46ZnWaQNha1jNPVfzPJiM
FpfFLb8etQYjM11hrkgy5o0prQflWsPNX3Q3PGLJeFXw0OX3PdbwreTx1gfx
ZPzDQzHTXbIGcDgb9TuZjDzRX4/cY7GBdEadb4aXydhlfZxeRsAGPtfQul69
QUbDC9aynyVtQNmjve9D7mY/jTMqJ6VtIJH9jLZ0IRlTWvYu2ohu+qFWrDlZ
RkZOlq+TVtw2IOVPI9xRScYP12iXGWhtIHYv9TpH/eb3n9ieZ360hv7ncVvd
WshYVLBootZoDYKRRFT5k81+hSUf40qxhjCR/76uPd/sT9PuPx4ka7B684B9
tI+MOnSVlx/xWoNUqrtSwzAZX85U2b0es4KtxE5y5jgZhTq+jny9agVTS+2x
kR/J2M/MHyZmbAWPC0MKHGfIWM2rF396wRJuOQh1qc6TcbDq+ac+bUuwb4nf
ubFOxl9WSZpnO81BPkhJ+c2/zX5RlMQ7fpsBm9A0+RGDMw7l/jL/KrK5fxIN
C0+yO6OdnoZ97RETUCNtU/kl6ox7+16ez4s3AK4tTc5j0s5o4dP5VP2UPiw/
8jvdqOCMd2eCuq4E6UHZ/hfPowhn7PcZSI011gG+r2mU3/bOOPb4vzyfQg1Y
z8Uz4xRndLcX5g10UYMhq6W7TR7OqHb6ctxnThW4WGezEB3gjPE7b6uuxcjD
vzO7z/5JcEaOftqa47WCMKbYUfQ2xRnXes8X1XjyQf1MeE/zZWdcGmPjfBvK
CVdvii7m3HBGnY33EKrACEHmo7tO5Tqj1wUroy9Z77TMaJLUXAqcUeb4gu/n
g7+1xGrUXLVKnfFirtic+Q1WYPCaO7vvwab+66d23SrbAx+5s4v/1jrjrs83
9cQ/74fWHtPed43OWN39MUt5Qwhuxv5ZbKE64wXZurNDc6JgM+miHtvrjPnu
RyY6zsvA0wcHXvz7vKmPW+zWnzZlyPd4tTQx64zGqlZiXWRViNl9lqttwRkH
TfiDOKbVQCn6s1vcb2eke63/OKxXEzgOXY13o6Xg7zt3op6LAHz/oFdKbKHg
rvmdXlxBBBQZFC3/x0HBPIkPHkozCGc37Pd84Kbg7Yzt9RHB2uB2b4smlZ+C
R1u2ONUsa4OmW4N7/kEK3twpU/XKVwe4OXwSTktQkFX6iRT1jQ6sPOUpc5el
oM0VV9UgQhf6I7pfojIFh+WNVV9n68I9iegfBzQpKDqw5/T377qQ9E6Sm1aH
gowvFw1rVPWAOv+N2d2IgrwtRXfFYvVg/e/9360WFFxNrpt50KAHsqyB8/vs
KEjjaHeL9EUPvPll38c4U/CB8qyvKIs+5B9a6h8/vPm96dVpLVF9eA3Vj9W9
KSj3zj6hWlkfWC1Da7MCKDimeT2yUEMfDNwUi9bDKPgqaPmSymY8NvDnDYdo
Cqr6vea4KqIPD+PqkurOUPAuQVs8vUMfvqVFRO9OpOCO4DsC7rN6cDBf1T/s
0mb9C7JeSs16QKnccB28SsHMzxpaeQl6cIXaaCWfvYm3PpAc09eD7v5oncu3
KdjpctJI5K8u0H3UVFwspmBJXDN7Z7kuqC/9FbasoODa2ykNehtdCKZt21NR
S8ELOxcvHlzUgQ8C2r/92ikYdrn1venuzf7L0813d1KwyU2I/keONljqPJkQ
f0lBX3UWpfZ92tDqof94ZoyCXO2VD6V3IKyGMNUafKRgS5Ad8WcFQPpc5927
MxTMvxo4Wt2hBTkFxklHVigoTqtOmJhpQNSkudV7FheU1lQs/LaiBNUrrDqw
ywU1n2QMLF5ShFmGfoVcXhdMPhpygf6gAjgK2+xxFnVBp40YabKOLKQrcTI3
Srugj0/xsNZNaejUH/rFreiCP19qik2XS4Cyl/3ECLpgefK26hPPD0JA+J5+
JUMXlHGbBt1RAbh7frT9qrkLzittZV99tQ/eXs+q+WHrgvw7uXcx/toDu4rJ
d23ILshRtNsrWJIDzOr33qhy39TLNms0/GorxHe+TWQ/5oKiO5+R9IZ+aTW/
zo0K9HfB1rGRa8air7R+zLgefxnqgi1du+2qlpa0JNb3u0pHuSBPn4my6Rw9
eGz9aJl62gXFE0ufNZexwoDYEQWTiy44/jO/0uoJD2xTOyhcesUFr4jZxVJ7
+UHbeIpr600XVDk++vXSmABU+hz79azIBfV3z6eeuygCX06KfTt43wVHusK+
nO4Wg/3Js+/O1bggV7Ggu+cPCbhU5teuTXXBnkbrS8OMMtDRKFWT3+GCjOWu
9f+Fy8Lf7vnC/3pdUJYct7XQTQ6Ofw1MbHnjgqGsS55xLApwiEZQuvK9C27w
r8qlPFOAxV1Dr+5MueBzu+3OnSGKUC1+PvzaVxds3KInyrpbCUJBdW/ikgsq
1tL+hntKoGg71xa15oK34J8tqCrD6rEcT/+/Lsj0YeTpzwZlaIixYHand0XH
2tJ520MqEHWZpsKG2RVnNa1DzTJVQLOo2kafzRXVs2Z/vF5VgX+Nnmsqu13x
6hf1Xz+MVYHax5UjsdcVTY5Yf79zWRXOTHbhPgFXzA+gZfz2QhV0NqKm2ERd
8eiGkvT4P1VgYJVOppN2xVdOT3+fPqgGHYLvD/2Ud8Uqk86ry6AGiSqXB2dU
XVF0B+s1Yws1MDHTjRwDVxTbm7tWYKMGOw7/5Huh54q6Iv9+C5mpwcsTxe1t
Jq54zIWOeVFdDdKSnbyqrVzRp10kXX6/Gljlbd9+194VLRrG53k2VIGjtuXB
DYorHlZINR7tUoWhrkBSsocrslLqwwouqcL1dwIbMd6ueN/xaGetiSo4Lg/m
Bga44lbV/L9Gf1WAd8t5HY8wV/wxpMGRX6QCb/eqzpCiXPFhURPPXwMVyJWd
SzE87YoCwit7iyaUwVU/R1b9vCuOk8e+ffZXhgNki2GpVFeUu/mWge6nEhSe
q+bnyHRFvhZrWZ5viuCV6fmE4ZYrvqQ587eWoghi97m81wpckaOSXz68QwHK
R6Kq3j5wReVG99wn5+U356+rV9zpig1RTnm1iTIQBj+/ZL1wxbq6vaYdbIdA
2bb4Yurg5nq2rCsPXJKCRzHbXwe/d8UzsrnhryLEN+c36KO55ooa8nVLFtuE
4OxkAqvMX1ekiXd6uM1LAPQ2VGoE6N3wU6mOp2fcfuj8v+Eqj6dy68Ii85D5
yHyODIkTkQrvskiRZMgtRe47oEQ+USJDg3C7ipShFJXpRkKkJJJbZFaGQkKD
SJcklQr1nT/3P3s/+5l+a3Ey54WWkCibMlDtMazE08sp+4c8ie9dpm++TlLg
6cW3cUKZxFKffr1fVrI8fXzOdOqQWFizrYp/pzAkJyia1huQaNL7xNbyGR9s
vdLUd2cViT99vs5N1n4h5CsiogvXkmh7zO+WWdcw8bzJgJMJJPqqc6OjaruI
C4NDj5NsSdwmWPhXqd404fE5OeC4A4k2Q5yql8ELxKDK14rd20ks4Sufky0T
A+WCHH+LXSSq7O9JyjOWhu2mLprSDIlm+uUKgnM8fI5Fp6oCSVwmkn62x0MJ
xPp3WCcdILH3xzX7yCllsPMVmmUOk+gjXhvau18N6qJpRiKOx8dju0Z7FTbM
iy5Rep1A4lj117j7lhxYm17TfjuZxI6TgdVKblpQVsJaR2aSyL8yecbBSxs+
mjd8NMkhManfbksqb3/QbwzJEykgUePV4JuCNbqQM9y+pPwWibPvp6PdX+nB
UEBkQ3wViRE773SfzV4OKt/1Ij0fkHhIdINo3zZ92BH73MiogcS3qxfXiCzo
Q6p07OjiVhKzxiodRc6vgKeZxpn9T0lMDnHor9MyAInlw64lz0lUjj2wipNr
APa3TwufeEni8it3utgKhhBnbX7f/Q2JFavfPLl32BAeto+FGLwn0TzEom3y
qSH82pmmt+gjicJ1syN1ylwwH7UZejZDolT348tW7lw4FPIp5foPEhMLxTsj
4rlw61fWpqO/Sbx22TvxZAEXwhvyfxfyU/hof6pw7H0upJ+K8kgVpLBFwSMi
sYELFa5ut4+IUGjxOEmspY4LXSx96b3iFJ5/LF/oXcqFT4N8AW5SFCbpJH4+
eZYLUnm9DYQMhQm6t6QC93DBwL9EU0+ewlCB4dN2xlxwMIqLlGVR6LX+utUf
U4bg983z+fxSCnWXjbO6sw0hvmaV8ZgqhS6PiheENxlCfozo6U4NChW6ZArM
3xlAvf2r0WoOhW//KTh455ABvJGqtP5Hm8K6p2pEy8IK4HuWmJmsx8MX8cig
KWIFqF/ymY1YQeE5b+FUwY/6YElbbPXlUnj/zsmaF+764KErW+xsTOHDT/XV
OXeXQ/qtB8yyNRSOiIpHxVJ6UHE4/b6UOYX7Lf97RBXoQpdVoNIPSwrvBkqk
VLzXgSVtyh3tNhRW+zT2ev2hDSdHQteFOVFof1RMY9NbNhxWMJBu8aUwJWGw
TP+IPNiKneqc8aPQffHeyY3bZUH69/g5tX0UpobVRFcaSEPB+2sKwSEUUlFu
kpVlwnBwUKj3YiiFL1Q1srfSAoBdvhfqwymUe3UvfX7FL0KisX7nx0gKc7oW
ZqJzvxJ91VoqSkcpFPrWxQvjByLvZsxL6xgKtwZWHV5Y1U3sz3+dFRBHYe07
van6jlbC8iKSaScpLNdrjJrZMEYIn7mi+eAU7xw0QiwpmiG6Tvx6/T6JwoxL
v4yuJs0Rl8O9cmXPUTj40j5AL38Rbz9T0dl9gcIaE/77WeqiwO8eMXbmEoXO
xarbDSsloGNzf0HVZQoXeQn91a8sDb6rz6+QzKewaHBdztUgOTDS/zZhVsDD
C1q+bwUUYF59WwlVRGGf6fHLl08qQqqInHFFGYXhaj6TNL0UqIXgz4MVFN6x
sHp0oEIZDD4/vSV8l8fXgGiTzDcV+D66MtS4mvfeR9Ht/dpq8Gggycyzlvf/
gpmy4PXqkPR0cjb2Xwp3pZxXOO2kAR4NjlUl9RQ6BFYPBGtpgs69ooi+Rt59
4fYj6uma8LlEzJK/leffm+uqTH9rQm3u3oUVHTx/DR0evfInGxIuNNVu66Rw
+JD+uGsFG7Yn6h472kOh6cpYbWs+DrBj4q0LeykUjlR46WfDgYlD7/i7X/D8
M3JEtTmCA3cDbOvnByk8FjhfsbuQA7FUbpzOa56fNuWwN3dwwGUbv53LCIVR
jZFhseMcUHWgRSLGKBT7MuGsPceB91DXnPuBwq6F4VJbAS2oMNE41T5JYdZG
1amFRVpwVO+I4+wnChV3/5u5f5YDDmqDkuwvFM5f+EzXveWAoqzlE4dZCt36
lEfkGznwRuhS8sGfPDxbO3IzsjlQMvfD9fIChZnfJgaiD3Ag4tMOuSY+GiNT
zf/8wuvXje8qe6YFaJywTA8y+cUG2ReK6SrCNJ6Qtc85WMmGwY5Q9w1iNLru
tSn94seGgkc9SkGSNPZe3Og0I8uGg3dNXlyQpvHigTqpW7c1QSJneteEIo2r
UwNblNs1oC/dRV1RmUatz4PZBz6oQ96p0mErNRol2m/vTptTA4vQQCZFi0bS
jjpaOKcC/vbje8yNaNRdmXJFMI4FkQ/q+LkmNDpbK3av2qMIp80uZLHNaByP
afMm1itAyTK7bhFLGoOauR06/8nCNF8+9NrReF++LllaXgL4w6P6WxxorHDu
uV6UJgqyU24Ha7fQGJOh5/ZTThhMB/mv57vR2N/GjVEV54cNf7ywzdhOo5P+
6T8Jid/E9tay4dM7aQyrOFdBL/5JhFdRCgdJGu3bvRoOC3wi/jZae3MPQ2N5
ntB3DbVR4uK1JZs9fWmcqW4/pJPcRxSpj71z8qPxWUrJ+RmvCqImrfaYTQCN
21560lIubUS7RLqK2f9o/O54tSso5RUxdCLwzvJgGv/nPAovP44Tv4NVJ6TD
aFxZO67TrPCNkB6fiV8cwcMb7sISOfGT0KRa2d+jaPRuPBAW1fuLsHGKcB+O
ofF9yH+ZU+cFIF6/72FxEo0Kk4XrT1qIw/nsUq/sszTSdUXJYnMSUKD01/fU
VBo3ho8+fFEgBS1CZtyoizRGZTZI3BqVhoFoyeagLBp3ER8SM7NlYOLLiLf3
VRoXIpK/1m+VBcm3KRkO/9CYJWa8Wf28HKh7BJhCIY0HC14vWaQvD9xOmyfG
N2i0uHlkX3y5PFjZK/trl9Koyom3TjFSAJcH04uXltM4XBdtKpOnALRZ8xWJ
2zQ2WpYVfZRQhJDiq+Z8d2n8K3GiUT1AEU4sC382c4/Hh/VVz4xaXr9cct4/
dp9GZWWTVx7CLMiX1RUfqKPRoabU32cDC+78/Su/4xGN1PofmdXhLGjke44P
H9NooHQ9zT+bBX1hxQO3m2ksJW2Gjz5gwfjH2EOFbTQG7LixS6qbBT99d8lk
PaGRtTTbxPAlC8QHTW4kd9HY5yBcOfuCBap/iNvFPqMx7XuYa+ITFhi2vnkd
1kejulCRj8w9FoDNvaiAAR6/N1aZFV1kgXPVWRY5ROMRN4mnccEsoIz2lm99
TeMy8fm3T4AFwddwy8YRGk0F7Yuq+VkQo670ft0YLy/XipqP3FeEc2lTMYYf
aOwx0dHfGqQIuRKNauxJGvmuKg8HK/H4SFXN2PeJRiHDX4bRxQoQrxoif3eG
xtysOa7nWgUIz2s8IzBLY/yfi2X3VcmDv4GauPNPGp9GHF2QM5aHXRUh8RcX
aIzLvtd274ocbLFsWjTKx+Ca/TptrYK8vnc88D1KmMG1CTdXjFfJAKen6UCT
GINuA0dmXojIgNwu9Sk5KQZJ6RHuIldp+BbQ/O66PIMxwk7eWVmSUHNKo7uP
zeCmtVOBcyrCUCIX6rRMm8ET7jMty/wE4cqlluYgPQalTnmtjCsRgJii0Dqh
lQxmzPNnjBjywUGTVoutqxgM8DLSq+mcJ3yrNSuzVjNolcAvImj7g7BvbS02
tWRwg3GB8A7tz4S5G3v5MSsGcxvcB3YbTRIrBg7ltdow+ObZRLGY+iih6t2m
wdrI4NJrrIwk7hAh9R/7ErOJQb19lZH7rJ4SfAfCFEscGRTnxJb2FOcS0z/b
zv5wZjDuWS25xfkx8SaGI7nBjcHeVcc+LD7XR/SIhZ9M3s6ga+6ZXUGv3xCP
z7ULvNzJYISXlePMznGiUlnrqK4Xg0aBH1tiSqeIi/odobXeDNZPWFnKzXwl
TpdrTYvuYZAtsSNt4NV3Itr88L5t/gxOlC21vVY5R1AOy7wn9jN43MLDsjqR
N+93HR5ac5DBzeuEq9W6F8F6jyc7T4QxuDqv4+EjMQHQ8Y9wUT7C4NjKG6EL
ToKg9PlJq+9xnn5lQclVHkIgGqFtVxbLYBT9yU7MXRgm/n5K2J9iMGS1nQtb
UxSGZHSqUpIYvHa10cxzQhSeZESaDp/l8deuOi1dIAZ17M5S/TQGrdeqy8m7
iUN5oc6KQxcY3GcwU2w1KQ55xlH//HuJwa4EpQ3hhyQgraqTLXmFwZ8b1B/w
Ag7x1rpZO3IYzBZY49q5TRLCm6OU8vIZzHzG3TNeJAn+rl0pUwU8fyikH1v4
JAme/bpLLG7w/HDHTl5TWwoc6eiE+FIGHZs8/fbZSwGMdwl2lTP4OyTOW8hT
CoyC9Y6r3WHQVsDPR9lLCjg/ouf9qhiUnFQTHXSSAvnj3WEVNQxOL2qaSzCS
AkHR5TO/HzA4cByr/Pil4P8MS3PL
       "]]},
     Annotation[#, "Charting`Private`Tag$1370#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, Automatic},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.804028885517825*^9, {3.804028945067107*^9, 3.804028992196663*^9}, 
   3.804029025866338*^9, {3.8053510750099916`*^9, 3.805351098342145*^9}, 
   3.80535348925529*^9, {3.805355274341234*^9, 3.8053552897679234`*^9}, 
   3.8053553559747057`*^9, 3.805355706865172*^9, 3.805356052863922*^9, 
   3.805356153410406*^9, 3.805356340284047*^9, 3.805356393988844*^9, 
   3.805356431234817*^9, 3.80535662150921*^9, 3.8053567555406647`*^9, 
   3.805459710052505*^9, 3.805460311299596*^9, 3.8055432198747997`*^9, {
   3.822541164499196*^9, 3.822541167950087*^9}, 3.822627992504298*^9},
 CellLabel->"Out[9]=",ExpressionUUID->"33142a7c-e6cb-4507-8073-8abd9a62d7ca"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.805350662390202*^9, 3.805350667857346*^9}, 
   3.805350912957323*^9},
 CellLabel->"In[10]:=",ExpressionUUID->"7142ae71-d361-4ee4-92ec-3e5f8d7daccc"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"**", "**", "**"}], "*", " ", "defines", " ", "an", " ", "error", 
    " ", 
    RowBox[{"function", " ", "**", "**", "**"}]}], "******)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"errfunc", "[", 
     RowBox[{
     "dim_", ",", " ", "ang_", ",", " ", "\[CapitalDelta]_", ",", "en_", ",", 
      "  ", "Ncutoff_", ",", " ", "nostates_"}], "]"}], " ", ":=", " ", 
    RowBox[{"Module", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
       "rsbasistates", ",", "i", ",", " ", "var", ",", " ", "trialstate"}], 
       "}"}], ",", " ", 
      RowBox[{
       RowBox[{"rsbasistates", " ", "=", " ", 
        RowBox[{"Table", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"state", "[", 
            RowBox[{
            "\[CapitalDelta]", ",", " ", "ang", ",", " ", "dim", ",", " ", 
             "Ncutoff", ",", " ", "i"}], "]"}], "/", 
           RowBox[{"Sqrt", "[", 
            RowBox[{"Norm", "[", 
             RowBox[{"state", "[", 
              RowBox[{
              "\[CapitalDelta]", ",", " ", "ang", ",", " ", "dim", ",", " ", 
               "Ncutoff", ",", " ", "i"}], "]"}], "]"}], "]"}]}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"i", ",", " ", 
            RowBox[{"-", "nostates"}], ",", " ", "nostates"}], "}"}]}], 
         "]"}]}], ";", " ", 
       RowBox[{"var", " ", "=", " ", 
        RowBox[{"LeastSquares", "[", 
         RowBox[{
          RowBox[{"Transpose", "[", "rsbasistates", "]"}], ",", " ", 
          RowBox[{"eneigstate", "[", 
           RowBox[{"en", ",", " ", "Ncutoff"}], "]"}]}], "]"}]}], ";", 
       RowBox[{"trialstate", " ", "=", " ", 
        RowBox[{"Sum", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"var", "[", 
            RowBox[{"[", "i", "]"}], "]"}], " ", 
           RowBox[{"rsbasistates", "[", 
            RowBox[{"[", "i", "]"}], "]"}]}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"i", ",", " ", "1", ",", " ", 
            RowBox[{"Length", "[", "rsbasistates", "]"}]}], "}"}]}], "]"}]}], 
       ";", "\[IndentingNewLine]", 
       RowBox[{"Norm", "[", 
        RowBox[{"trialstate", " ", "-", " ", 
         RowBox[{"eneigstate", "[", 
          RowBox[{"en", ",", " ", "Ncutoff"}], "]"}]}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8053538152227097`*^9, 3.805353904555147*^9}, {
  3.80535412978638*^9, 3.8053541365872793`*^9}, {3.805354374110549*^9, 
  3.8053543753661203`*^9}, {3.8053547447698193`*^9, 3.805354748267174*^9}, {
  3.805354792704442*^9, 3.80535479464037*^9}, {3.805355822893488*^9, 
  3.805355823194525*^9}},
 CellLabel->"In[11]:=",ExpressionUUID->"0d54756a-574f-458a-8907-24a44907f488"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"d", " ", "=", " ", "4"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[CapitalDelta]", " ", "=", " ", "4"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"En", "=", "3"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"ang", " ", "=", " ", "2"}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"**", "**", "**"}], "*", " ", "The", " ", "state", " ", "we", 
       " ", "are", " ", "trying", " ", "to", " ", "approximate", " ", "is"}], 
      " ", "|", "E"}], "=", 
     RowBox[{
      RowBox[{"2", "*", "En"}], "+", "ang", "+", 
      RowBox[{"\\", "Delta"}]}]}], ",", " ", 
    RowBox[{"l", "=", 
     RowBox[{"ang", ">", 
      RowBox[{
       RowBox[{".", " ", "You"}], " ", "can", " ", "change", " ", "these", 
       " ", 
       RowBox[{"values", "."}]}]}]}]}], " ", "*********)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"**", "**"}], "*", " ", "This", " ", "produces", " ", "an", " ", 
    "estimate", " ", "of", " ", "the", " ", "error"}], " ", 
   "******)"}]}], "\[IndentingNewLine]", 
 RowBox[{"errtable", " ", "=", 
  RowBox[{"ParallelTable", "[", 
   RowBox[{
    RowBox[{"errfunc", "[", 
     RowBox[{
     "d", ",", " ", "ang", ",", " ", "\[CapitalDelta]", ",", " ", "En", ",", 
      " ", "100", ",", " ", "nostates"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"nostates", ",", " ", "1", ",", " ", "30"}], "}"}]}], 
   "]"}]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.805353906392953*^9, 3.805353969660307*^9}, {
  3.805354195654598*^9, 3.805354277603105*^9}, {3.805354461458313*^9, 
  3.805354501077379*^9}, {3.805355368377763*^9, 3.805355373283935*^9}, {
  3.805355438677886*^9, 3.805355441073481*^9}, {3.8053554831337337`*^9, 
  3.80535549587022*^9}, {3.805355844813705*^9, 3.805355845869182*^9}, {
  3.80535641139041*^9, 3.805356411420435*^9}, {3.805356655306826*^9, 
  3.805356661529242*^9}, {3.805459742189157*^9, 3.805459742358976*^9}, {
  3.822541077809513*^9, 3.822541120082387*^9}, {3.8225412116103687`*^9, 
  3.8225412424663153`*^9}, {3.8226279233572197`*^9, 3.822627951958605*^9}},
 CellLabel->"In[12]:=",ExpressionUUID->"31e8a4d7-856f-4679-9120-8d96b440768a"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.8605074182112262`", ",", "0.8129143787356343`", ",", 
   "0.7836929838979654`", ",", "0.7809468618296591`", ",", 
   "0.7788075291617124`", ",", "0.5627017539181165`", ",", 
   "0.29873196471328045`", ",", "0.05486129063652708`", ",", 
   "0.03924687396384842`", ",", "0.01281285438529419`", ",", 
   "0.012395979626220332`", ",", "0.01177428108866859`", ",", 
   "0.010560111579045867`", ",", "0.009902085290172457`", ",", 
   "0.012107682406275638`", ",", "0.010621763135561487`", ",", 
   "0.0093950523384483`", ",", "0.009261502500473046`", ",", 
   "0.011188774838665875`", ",", "0.007976623754238871`", ",", 
   "0.007006872940932672`", ",", "0.007738150106179174`", ",", 
   "0.006362637455464728`", ",", "0.005682134573222025`", ",", 
   "0.005825765613075002`", ",", "0.0053340414775183915`", ",", 
   "0.0062816380317678245`", ",", "0.00540793028999217`", ",", 
   "0.005229805123335493`", ",", "0.004561101101917161`"}], "}"}]], "Output",
 CellChangeTimes->{
  3.805354295128231*^9, 3.805354391790093*^9, 3.805354476667241*^9, 
   3.8053545142920427`*^9, 3.8053547637676277`*^9, 3.80535481530014*^9, 
   3.805355305008245*^9, 3.805355402525093*^9, {3.805355479949391*^9, 
   3.8053554984138517`*^9}, 3.805355782082769*^9, 3.805355858189077*^9, 
   3.805356183084078*^9, 3.805356358757207*^9, 3.805356452491809*^9, {
   3.8053566447511463`*^9, 3.805356664080516*^9}, {3.8053567349363737`*^9, 
   3.8053567605463467`*^9}, 3.805459718947287*^9, 3.805460328979171*^9, 
   3.805543239695367*^9, 3.822541123599971*^9, 3.822541178965043*^9, 
   3.8225412130205297`*^9, 3.822541246640238*^9, 3.8226279544406033`*^9, 
   3.822628000581691*^9},
 CellLabel->"Out[16]=",ExpressionUUID->"274cfa70-c0b0-4319-95f0-aa4f55e36e8d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", "errtable", "]"}]], "Input",
 CellChangeTimes->{{3.822541180203684*^9, 3.8225411889294252`*^9}},
 CellLabel->"In[17]:=",ExpressionUUID->"86a7a37c-c4f2-42ce-a6dd-274d78c8d527"],

Cell[BoxData[
 GraphicsBox[{{}, {
    {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.012833333333333334`],
      AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxTTMoPSmViYGCQA2IQDQEf7L9cT73l1vnaHirg4HTkMXMq8yson8OBy/Of
H7PISyhfwCFN5r1ry98XUL6Iw0TJkiN/X8P4Eg4pseellzM+gvJlHE4sX7sm
R+4ylK/g8DvQuOi42BooX8lhkoXXBC2JJVC+isNq3lyTBbZdUL6ag/DCoxYC
yZ1QvobDmt61jrKyHVC+lsMrvX96XQtaoXwdh2OG95K73VugfD2HxZ93zH95
GqbewMHQKeLVnQMw9YYOnI2+U7bZNkP5Rg6rJp2/tPF7E5Rv7MBUJPtB+VUb
lG/ikFXgGMgT1gDlmzqcruBTst1cA+WbOdS1Gt/i3FQP5Zs7NG+ZWbOVvwrK
t3DY2T43Sc2tHMq3dMhLaOE5dAfGt3KYqWR5W/VmKZRv7fCyc1rcsV2VUL6N
Q/SxA9YL1MqgfFsHrkON8jezYertHDwDBRxXriuyBwD1NH54
      "]]}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0., 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImageSize->{518., Automatic},
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0., 30.}, {0, 0.8605074182112262}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.822541182356142*^9, 3.82254124822843*^9}, 
   3.822628000727866*^9},
 CellLabel->"Out[17]=",ExpressionUUID->"a5d17a93-e6e8-4870-bce6-89c7d48b4bb5"]
}, Open  ]]
},
WindowSize->{1920, 1020},
WindowMargins->{{0, Automatic}, {Automatic, 29}},
FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 3166, 58, 147, "Input",ExpressionUUID->"f03b134a-0d76-4219-a648-52ae2adcef19"],
Cell[3727, 80, 200, 3, 31, "Input",ExpressionUUID->"1b743285-9917-49d5-ba5d-279816e85d2b"],
Cell[3930, 85, 6098, 156, 170, "Input",ExpressionUUID->"13805f10-16d6-4f89-bc2d-3eba39646ce6"],
Cell[CellGroupData[{
Cell[10053, 245, 500, 10, 31, "Input",ExpressionUUID->"d76259cb-7019-42a0-b100-29a24d303372"],
Cell[10556, 257, 968, 18, 23, "Message",ExpressionUUID->"9e556aac-fb8b-4466-a829-5ad584bdf248"],
Cell[11527, 277, 12658, 228, 233, "Output",ExpressionUUID->"2abcd90e-e6fc-4885-8824-e9de912ad130"]
}, Open  ]],
Cell[CellGroupData[{
Cell[24222, 510, 1274, 27, 55, "Input",ExpressionUUID->"93fdef47-8a00-4c35-bdf3-961d9b4a11ed"],
Cell[25499, 539, 50155, 841, 243, "Output",ExpressionUUID->"33142a7c-e6cb-4507-8073-8abd9a62d7ca"]
}, Open  ]],
Cell[75669, 1383, 197, 3, 31, "Input",ExpressionUUID->"7142ae71-d361-4ee4-92ec-3e5f8d7daccc"],
Cell[75869, 1388, 2763, 67, 170, "Input",ExpressionUUID->"0d54756a-574f-458a-8907-24a44907f488"],
Cell[CellGroupData[{
Cell[78657, 1459, 2301, 53, 217, "Input",ExpressionUUID->"31e8a4d7-856f-4679-9120-8d96b440768a"],
Cell[80961, 1514, 1769, 29, 59, "Output",ExpressionUUID->"274cfa70-c0b0-4319-95f0-aa4f55e36e8d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[82767, 1548, 215, 3, 31, "Input",ExpressionUUID->"86a7a37c-c4f2-42ce-a6dd-274d78c8d527"],
Cell[82985, 1553, 2066, 50, 378, "Output",ExpressionUUID->"a5d17a93-e6e8-4870-bce6-89c7d48b4bb5"]
}, Open  ]]
}
]
*)