(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    191284,       3652]
NotebookOptionsPosition[    187157,       3511]
NotebookOutlinePosition[    187570,       3529]
CellTagsIndexPosition[    187527,       3526]
WindowFrame->Normal
ContainsDynamic->False*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Plotting Commands", "Subtitle",
 CellChangeTimes->{{3.4199910321613007`*^9, 3.419991038907156*^9}}],

Cell[BoxData[
 RowBox[{"Clear", "[", "\"\<Global`*\>\"", "]"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Sin", "[", "x", "]"}], ",", 
     RowBox[{"Cos", "[", "x", "]"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", 
     RowBox[{"-", "\[Pi]"}], ",", "\[Pi]"}], "}"}]}], "]"}]], "Input"],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJwt2Xk4VO37APCRpZRIKoWKiiiVSsuLusdLIsqSSiUiiRKSSnt5tZDKUipZ
CqUo+5ZwDxIK2UK2QvaZOdbZDH7P77q+f831+ePMzLnX51xHxdHD6uQMGo2W
IkKj/f/nHhNpgwkVScboM6Oqri23C3Qzrw3NWibJiM9qHFUKtUdNlcHIRQqS
jJCnGYb1IR4ozS/lbZwvyVB/X3glJuQm1ry7neQyQ5IRcPtVxf6Qx2gza3xJ
Q+csxp1dc60PBEfjqdKWoZTYWYwtKMi//DAZ/Xa9j3JWncXQWvjecOkNxHP1
gvmhcjMZfnn5u2bvqsZvxxT6/spJMD5dKtbO+9WIkwUJKTpLxBlqict+GDPb
sSttONhSUozR3fPrcMmsLtz6WqL+4RxRhsrMBJE9sj2ot6J2/QOeCENwvnRL
Iq8PX8nN0d4/JsLwvJizcotoP4qKG/6jOCTCSLk1d2nO3H781ptpkNgrwqg9
rq32fkU/2nx8YfO9QYTxb/8i/W1m/ei93cF3TqYIw/FUzAKRqH78sG/o54Nz
Ioy9vxovbNMbQKWr0tcDB2iMhEV9Vc8cB9E17pt8ZA+NkTt9dPmn04OYVXk3
7WMnjRHiFFpZ5zWIlsrTvVXNNEa26UXdcd9BvFtCWcl+pzE27wtQ64sZREqm
Rj0skcZIOaH6ILBjEIviQuuj3WiMxWHWZ4sOM1GmytwjxYXGiCucUT7HgYm2
3DmzC51oDNPWZqN9LkzkmvhBpy2N4VUnGlNwkYmalHfCqr00xsM0rzdmoUx8
+s/BW+/X0RjfDKWPK31nYnXERhvntmm8cwA5N7awkBbnEdZWP43nOCsDzuux
UCvxY711xTT6rNCqsDdgYdAnDUuDz9Oo+fq49XJLFlo0qOxRfjGNW2OCd+q4
sbBaZr5es/U0Fmy/Vtn2ith3ZPm+iimUOaPDqhJlIy1Ay66keApt/zamZUqy
USvYPULv8xTec8pmhsqwMSh6YPHahCnsOxqctVWRjRZ5nbKz7k/hoYwH3gs3
sbF6vFa0yGAK/xR7am21Y+MPl/TeLZ8n0cXX9Tc/mY21v7kWO9MnsS1N6cSV
DDY2HNTLNUqcxAvbKk1Gc9jYalgSeOjlJD6MyNGtKmTjgHLjxstXJ7F998pQ
9To2iv0SXM3TncRZkzUq7mNsnGUB3V82T6JSuJu1N4+Nc0r/21e5dhKLczR+
eQnZOD9TSqVdcRIDQf6njRiFy4OXfZ2eEOLOoGtXy+Qo1DH5d55BnhC3JkYk
bdlI4U7G3cumGUJs/54exNCmUH/b9879H4ToKyLINNhOobGqdaZThBBzql98
3QQUHhBxPnL3mpDEbUdfuhmFnp/848r1hMhmLvbWd6bQW6tqbq22EMsu1K+y
cKXwUvz8S82aQmQVZs055EbhjacvTQaVhEiJD/vs9aLwwbmPbKnJCXy+Mi2v
9TqFbzVqtlvkT+DRDR6mfqEUuqxOLbyVOYHDJjFrJcMoXKMavCf14wQaM2l3
7j6nMEnZ0nZ+1ASy5LpenY6kMFu+5mb9jQkcuyVztukthVcWps4SvzSBVu3O
EirvKdSTCw7e4jGBUrOOLXBMpJAhbRkbZj+BzXdEAiuTKSwTr/lqQ5/Ar3tC
WkxyKAwQTTX33z6B68J05hzMpdBMJLjpk9YE5tNcEo/kUVgjtBhQUJnA2pBT
unsZFDaPVs9tE5lAp21jgY2lFA52VFs7FAtQe7nok1s/yf/9ndIW/FmAa1x0
wuQaSfzagpyL0gWYFbp0RnQThWNNFj4r4wSYcsVzYXQLhcIf1S+7/QSIGm7K
hh0UFlSmrFp0XYBvbi9xDu+k8Nb3oI9GFwSo9TR9fn8XheKlFhh/UoDMAs9o
jx4KpQuqO12NBJixteyGyiCF1Z9TzoTvFOB/v+6N6jApDPkUNPZtqwAXDvVV
mLEoXJRpIaG5WoCp/wZ+OExR2JSm9dh2uQCV3SzTrIcoDE+Zt/ihvAB1/uYr
Gg+T+vpQrcGeKcBfD98uXjxKYef7lLRlNAEOrc9IHCOOiw/SNefxcXTywevy
MQrVYy32pvTxsZJfnWHLoXDglVbDnz98nKPQXqPApfBD1Dx72V98XGg+blFD
rBVe7elVzkeLn0+9V/MpvG92cQafwcdAsQ6LeuI/U4pPbubwse1do7aPgMLt
qYWqEil8DCozVZaboPDxiVPZgfF83MCWlXtD3LNwrolcNB/vqIvMXS8k9V+W
1vwijI+Zs0fnJhGzNacm397h4+Q7y1WhkxQa/Y59vO46H/eq3PiHRxwVbKKS
4c1H4SfNA9ZTFHIMqDQdNz4eijC4FE+8l/PEsPAEH7deTIweJo57p9Ow+ygf
py+bV22aJvk88udUlRUfP9otFT1DbD33Lt96Dx/r7MV3hhN/wLUPWvT5+GaH
4AaDWMyrRsnxHz5y9YZL2ohtV11K6tPio8HqzvkjxBkNSnQPdT4m7Ck9OUk8
x7+oZnw5H8cuRxZMEzvqupy4Js/Hp1JOS/nEuay54zNk+JjYruTbTzz/Vfpd
fwlyPxYVzGri01aHF8+b4iHH+PKxZOIisen3YeM8TNZaV+9HrJAdp7uUxcPf
nFELS2Iv1z2VsX+JpVvrFhCXKw7ZrWnlYawnx/YHuX/lqqdDKXU8/PT8IPMW
sc8tXd9t33m48/58Xw3i6k0dcgVFPGz98u+ychJf9e67bwxzeVhsM6PQnvjW
M81t31N5GFXrfppF8tNkUltm+Z6Hj3e9U/Ai1hJeOtL0ioerTGpqWCS/95KW
Mu2e89CULx10nLj9ePH17sc8kpf7B76R+tgq5yrjdo+H+U6uK9YS91zK2HT5
Ig8v5M+vq+GRelhz5Mv0WXL/d/Sy5YnDWqcP3D3JQ/1rj2KtST3u0je9HGrN
w1tH7z9NHyf5nd2JHzfxcN1r927xEZLfvHuW2mt4+IHrKCtG+sPaY11XrgoP
HdKu7uaTfhKt95Eom8fDIW3jujLSb46RMns72VysMlX0EvaR/Jhntrv0cFFl
FsVN6yX5mXHUk2rj4oYdfgHHST8XOb8NFVZwUdT6XOMr0u8qWjuaFyVy0eLJ
QcWsNjKfrPrD1sdycfCs1wZ6K4m399P9Ri+5GB167WpRM4VVOayKCw+4mBZc
m5dM5s8V/SisP8PFow4bKM0aCt+c2HONeYKLsgePVPr8IPm5w9kuZsvF1WEh
PXmVFK7+ti9tsxkX2f7t39d9o7DeajouRJOLzHPb3NOKKJz2TnRIWMXFiwnz
NzLIPFzz7NCyIiVyf1Ghm74WkHy2JD8bluJi69jF0VwyT9c5HQ+wYHFw5nDB
ld1pFN69UOghncTBT4KTC1nRFKY+O6up9paDNTeSaDfJfG/9tKR/RxQHq2b/
s1nyJYWbps45nn3EwWLn654SZD/8vrviQIU7ByuGpI7FPSDz4Pl/OgEbOPiK
U/TI/QKZN7m7xCVSx7H0vpSuvgGFicHZ386/G8dPihdUn5D95uaiEdQRPY6v
dmktbtelkLVwrmL+o3FcfrtL4RDZj0Oe9VrebuPY7pea3raK9L/aCdvO1eP4
wZ+7fifZtzNCb6UXRI2hb1hXmnUeG4tdR3w0w8aQnnKnPyCbjX50p53hD8ew
5JCfeU4aG8XZu8svXBvD2bNXJvPekf1uIvNb88gYZj3c9VfmKRulpyNnv1w4
hm6JDq4vzrBR8cxnh0uBo1gs3nlt5Xw2hpeVGc31G8XHt43l7aTYqKDWsDb2
6ijmxWs4BkkQdwyNV50eRbeucplWAQsXH1ILUDMZxfUbxHgyXSxcYBCc9lN8
FDmdox6DqSyUUjwlqn1zBON9uLLXTVg49W3+m6Fzw2i74I/q+eNMtHyulil/
ehgdUyLerSfnv7iTOiU7HYfxVEL44S5LJu6hOXYHWg2j2lKHvdsNmBi2JVVV
Y/Mwyru9+hikysR1r8zfOowNYW7t3U5h3yDaXgiMr704hNcbabRqcj49D1LW
rlw21ty7f7jyyAAaGuCdEz1sbP5d3KNiOYCLdntlH/vJxmP8OyIeuwcwZ1+T
glU6G/9MhA+MbB5A4bG4Dh0Pcn3OyabXUgPod03PQ6qXhdcLjJ5E5fVj2Ce3
gOQGJgaEGN1fLd+POZsrGeOZA3h02+jfpdm9mCz7NUU+vwfncmb+8Pz9F8/r
vBDd6dGJv61Oavzn3oE6d+yN+0634rXq3U8232hBykX4+Ob9emzsMXtdtr4e
//vyUgd4pagkdVndq74UGz7rfUkQTcGCBinnKVoK2msaTVoHJ4Frtd2y5MAk
6DC2OeAeVQbdcsp6by6VwVgyJC/WrQeH1WmrjLrroPnNMvfh6laQ+Rb9Xru5
Ba66fzY+EN0JLy9rZRaHdYDNqw2HIh72wKagWBvbz3/B+V75jN/VA7DtoWyX
Wnkv2MqcyS7/MwDm0cW55XW9YPlMyi1jaAC+U/s/Orf3gl68+U//eYNQKXzc
9Gi0F+aX/ozXthgE/RCzqWdL+yBfotMs4McgaKxx/PeBZx8suCsI21LFBLNI
p8Yu2X4o9lu7NvA7G+aVH/St0x8Anemnr9Ra2LAjSzT8854BSLtMW1Q4wIbN
7c7nIvcPQIz7TxpHkoKIlvaD+04OgK/NzQZ7YwouDtYUOt0fgH81625vLqHA
d1+QkWPlAPxx3eF21n4IvByE1cFWg6AUP/JW59QQbPVf2P3xyCDY/I3vmOkx
BHfC9HyKHQeh2m7+oZgbQ9CdKr6gxWsQGPt79RsjhyCkV475OWQQoncEy+u3
DkHjj9xL/9YMgp1sd9GCw8OwbZe+0kETJoiF1489cBiGmPyWH3qWTEhY8UVN
9PQwjEnLhCkeZgJ3c2zA8JVhUDnoZVnowoSggw5WVRHD4J4tsfvjPSYUv2zr
uPdnGD4eDzUV/8IEdbUG2sSpETg4K1AlfisLqpJKNnl5jkDRqVrpwB0suLAt
06nfZwRM1QMqXAxZUGT8pKzRfwR2DrxKlbRiwdEzVkEZiSPwtXojq8+NBY9S
qpa7UyOgphxzT/E1C0Z1Snd2XByFnpVmqYaibPi6P2VX6Y1RMMl7Mvp5Fhue
u70w+3h3FK4HK/9dK82GnVFnjlwOG4Xy31nfxhezIUBk3kXZrFGgBWv7b1zP
hhVlNh/1x0ehft2sD7sPscHywIBizPkxqIqWYXbHsmGVe92K+1fHYHOK0X3P
d2zg3M3TcP9vDN56/0wc/cCGiJxH23RCxyCp+6lfVyYb+hQ3769NGwPNeaZ2
rqVsuNV5NWDGyBjw08tLpPrZkOwxl+/oOQ77YxztE9UoYNZpcUd8xoFeriUR
soaCNdutx31vj4MzcwbDYz0FcbSXwzEh4+A/uNtl3lYKwoPVBzozxqHr/Lhb
jyEFfukGLY78cQhwNbP9e5yCIvlTv0ZEOKDKXZSh60TB9NWARt/ZHNjV6yAd
cIqCK4Y1dTGKHJjPSf06x50Cj592FZ07OMAyPaIZe4WCI9zL+Y6+HJCRAnGV
EAqeHY38PBLAgf5nC5f0PaGgHhmffEM5YD15VeXtMwrM78/MionjQGh6g9TM
SAoMlzxN6vzKgRWBrttt40ldX8/54PWDA9G+Vi3N7ynAjpaEGU0c0L363c3i
AwU6CSviV/RzwL0hykY5lYINuinRjnO4sP58Fn1/LgVu0XWRI3Jc8A/kGfrn
UZAgyn3pq8QFdfFzm7IKKFhVseN5zDourEnx/zpWRIHCse9BneZccJEMLBL7
ToHYzZ7bjk+48I/i6AOPXxS4nxc94BDBBX2plxa8ZgqaTimrH4/jgu54i/Ll
Vgo+WBypOpbBBS+zhE7H3xRYr6hSOFzPBdU35zsa/lJQsGiQdaiVCyzRat7y
HgrU58wqPPiXC/b/Chc79FIgHNU/ZT3GhdwXd7y+91MQW5KZbr6AB3Io50tn
UyBFFsE+JR6wdF80mlBkDiRRh/eu4oFsZdxm0yEK9jzToJlq8yBuifnUlhEK
Mh4Y1Zno8eCC0Xm35aMULLt14q2xIfFp9T+0MQpGXCLNjKx5EOnk3Jg4ToHt
sdzlu2x5YB3hd+QCh4Kvlo0jBk48cH9k17mVS+pHR/aFvjcPlCzvTr/mkfhs
WO9Gv0Z+/8LlJ6Z8Ep+VpgB+PNgt8FrHIv5X6k633hMenMr/dXrxBIkPLSZH
N4IHI/pC6RjiReMFD3TieLAg83HWSiEFt/pb7P75wIOzWecdIokH2ngbt2fw
QPuvv4zMJIln7ULxbXk82NmSyfAhLvi6qWnLFx6IbmvzbiZW/2yeqF3Bg/jg
3rXaUxSEJLvd2FzPg8n/CrrvEAtj/S03tfIg5M3eGHLeBufnb1dt/MuDD4G+
DrLTFFQHFnM3MHlgVWW20pRY5/afb+vHeGAxFdl7jTjuwmTkOiEP/kl2TXpL
LH1a4ZymGB/OepFtROxjt81wrRQfFjUZG3QSd1pZy69ZwIfNHntlx4jNdp8b
UFfiQ1BJUgd5/oAs3Uf5q1fxoerU6Qzy/AHKWolBapp8ON5x0588f0DAqrIT
qtp8CMwbOj5IPLa4e+sqPfJ7vgydn8R2c2fMXmnIB1bu2KJs4jKR5W0qZnwo
Zz4ZDyLexNFNUbYm10cmNDgSRwzY/Lfclg8PLfVzNYklfl84uMyJXP/A+RWb
xMOzLkRjqRsfQqs0/N8RN5cmCxW9+bA6PML7CLFhXsUPhWt8kHWvdRQjTkrp
j1nix4dzZX/2vyXxv/1ipYn8Ez48mtG7s5bkT3PmGyHrJR/cHGmRdsRN3mop
X2L50FiSt7eL5H+9hYa8VzofaLVh8T8FFPzKT/hm/JkPxpvHLQyI/dZq3lhe
zIcVkj5735N6apbY0F1Ry4erpbfodqT+7ninPI9t5oO16sFtH0l9anVuNLvS
yQeHTvbtMVK/9/K101eP8GFO/FI5N1Lf2t46t31lBSCVlr9mepiC3x2ftQ8v
EcCRa+wv84gDzHf0bVARAK/NJ0OB9NOfNXTzNi0BJF29/0Se9N/Djl1Lt1sI
wCfrmn0m6c/t5qXV0jYCKGcfTPTvo+BvnrFft70AXuWG7TtI+lnnuelgiIcA
kgUeEU2k/3v2WX5iPRJA6h1pu9tkPgTn1bp9CRMA9ffh2cXtFOitsVZ+GSWA
IJ+xhngyT0LED90zThIAjDTnJJP5A3m2B2IrBfCpf13xiTrSHxrts678FMDA
d0Fifg0FYc/s8yzaBOAr8nZYpprsBy/HlVNMAeyt2vI0soKC5xouwzZSE6Bk
xzE+Rs4NBs/64zYsmICsC06rrhRTwBY7YyOhNAEHLZYef1xIwa4/ZzF97QSY
mxsLYvLJvAg7/1DadALWdDd9dc+kwFTspsYX/wl4rvB444tYCo7n69QbhkzA
JD0re9ZrMp8ucm6UhE/APDA094iiIKbvbP3XxAm4x7ybqfKCAl6F7c3yygnQ
s6s7r/iI9NdTnZ9VskLQtFzveuIiBbn7ODfNFYSgXXnkhOF5Cn7MTFtTvUII
TtXNV5U8KRBc1rhVs1kIN/xd5qS5UmBht3ht/QEh3B40K/CyJf2uxrn164UQ
loiKGJvSKZj/J3XtkRgh/NlX+yxKj4LVL842NCcIoa7x5ML+7RRYzele2/pZ
COLJElEnNlLwjqpraG8TwoNNyqKUCgUHclI1/6pMwiDTfsFxEVL/Jmeb2O8n
obEyICT9ExuGQlbYtKdOQmlqwm062eebWhsbKz9Nwrmz4l0lKWzIcv+38UP5
JDTd+EnLjWcDhso3nO6fhOHr68t2P2VDdVthXY/6FGQkm94VuLNh9NyiH+3x
U1D+4YBqiRIbtn7+vq8qeQpMKpbFOMqzwUfsdlV+9hT8nM/L5smyQRg2WBlR
OgUxIVoZ0jPZIJbHqDjSOwXJURcWdA6xYJHEmW8NatNAlam+W13Mgu3hWFL1
ZhqGe8OXbHdkwd/1yXouSdPArErf4HSUBcHFUeki2dNQNFT77Z41CwaY119r
l03Dkjq555lGLIgAvevhA9PQ+1/O18Q1LLjlZauQLk+jPxKz3CE2zIRu+V81
N2xp9J6chQe8LzEhybGWvqiHRnexZ23+cWYQ3rheY+4boNEfmlzZKH9iECI8
1Z7fY9PoMwUdjw6R82rAjSsUj0OjD2+Ycb7QeBBOhq+IapkpQh+Vp6vqqJLz
ba3XxCsNEfqxMXe7wtYBCNCXy1p7VoT+sfood7vRADgrW6/VHxOhD5z4ouIo
2g9pXTMzjYZm0EN2zd5Tad8DexaIqz0QEaNr5q87nafSBRf3aG9NoInTu71y
S4qf/YbydyNWJQJxekS2dW5paBO4eAsOLp89k37pd1Op8qNqeLlLW7B/5ix6
3CXbd0sjCkHBL9uvdIkkHQLv/BNxyhM2/E7Z30fccq7YZUrVEwzJgUVSQZIu
f6NrXWGZB5wdimDsIea8cvhjUuQODFtfYSXx+KjjuqOZbuC8Za93vaIk3UVV
3OP6SxdI6+k80bFUkl5PqVQyTh2HUv3WTTOWSdIT5jQNSZbbQ2vET5GVxNqv
D+wKKbID8f1l0U7ER2db9cVk2oINfmzpJVa6uWnxl5c2MPXMZz97Ofn+uHfr
JVwsQG703AoZZUl6oklNo1LxPlDfd2Z4A/H+flOLdVlmYClm9/gcsWDmZ919
EcYQ52nwfYz4mLwRLciFDp++64UvVJGkP3cubKVn60GV2lbXrcTd8XLZDpHb
gduqPtOHOMds5alYVy2Q2r6i4Tmxu8TPK/ej1UE5VPHNJ2LVkBLVb2eUYQt7
gXczsYq9QbS85zz43/su+v/ed+38Pz+P5Nw=
     "]]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJw12Xk4VF/cAHDbzNyJKJRSiaJfIkSpJOe2lyKthCyVJZWSpWxFIWXJlqRk
TYgosiTOJbLva7ZQBmNmjl0I7533ed/55z6f5zzPPed8v99z5p7nyFy5fdaC
j4eHJ5OXh4f71D4hfGhehk5kL3F/CO774jaKSdEJAfVl6/6RVpQZiVotSSdy
cm7dHCW9IeDSSdnVdCLKePtkF2nh2bK/O0TpRG6fzuci0kvX1BOBMJ1QG25J
fEt6tD7hnM4yOmEzV9NgT7pXU4zXiEonej1xtQOkG5I8P1rz0YkDDXurqKSL
xUeNnBYxwnRj+auSRQQ/e5jQveYwQsF3/q0L6XhWdXbwNEZ8EWJ0bCUdZrDv
WvQ4RmwJfa1Tt4Cgd0nyyjQORnxl7Ji5RdpJZQ38ysQImEO0CZA2wKbWtvZj
hK2Qita6fwiecLha9rsHI0qunyiJnEdQo7fBYawDI1pmqj1FSa/P/Vgn1IQR
A8qv4pmzCC6X3eAuWYcRsx3y2EnSi8/9tm2twoje3KyE+L/k/KysvQ99x4jD
fy777J8h59fUqnoGYsR/l5qqHkyT8wNHek3yMSLs9NiJ3CkEEyQ27XPJxAje
38OjYpMIWpV1jmbEY0T28wB0a5Qcr5r228JojEjIn126gxA8Hp17svo1Rpzu
K9W+yUFw270XiYOhGLGz3D3oJAtBzpbTxlJeGKGc1vQ7dRDBXyEFdEUPjBAX
jay1YyBYv6iQs9cNI8KnRqeUBsj4tmKiFxwwwv+q/3xwPxkvn+Iyv2sYYVjr
OzLXRY5nXMXxlRlGMHqbv3t2kuMxid703hgjXPoMO3k6yHipu7kXn8cImwMB
FYOtCC4M7FKbPYwRfooH0gzqEfQ6kvzWUg4jtHyK2T+KECT8XPQ2ypDvd521
eQ8R/Ndwkq99PUZoX7RrelCAoL0Jx+KEOEbsCX5rLZqH4JV7atsV+THizJGu
L9XpCILkgvyxXhrRk1pvH/gaQRcUeCuli0YQhT8nuyMQzN5ltvFqO41Qat53
UzYcQaVivsfNdTQi+KPCgfAgMp+dx7RzCmnEgI5y5HJvBOeEGtvd3tCIjRsG
S07eRFD9XPyzXRE04k3GB2HB6wjefeWgyQmlEbrr7hkXWSA4LCcRY+pHI17S
hmhipgi2axlbHXShERcXt+ZpnyH7v8OYohnQiCDjYxZCOxG0a54TDRWjERu6
1W70jnNg+NnThmEiNCLf+Purag4HfquPj30hSCOOfQta+YnJgdSaUyoR/DQi
Ci31XunnwDelb3WiJqiEY6j+epsGDizPPuj7volKPI65O0n7yIFSr54t5IdS
CeMM1rKn5hx4WOLX4YLnVELL9eojD2MOvP5Czb/Qj0qg6lCrO/ocmBXcJVn0
mErY/FD22KvDgSeeKe35YU8lpqfkhO32cKCDa+Pd+nNUwnK+sMhpOQdWXpYc
+iNGJSSfvBVhfGLD09GaYE6ESrzg3OgTTGXD5l6TcBEhKmGi8Cx8WyIbdl+N
P6whQCVOLTfJOBvJhqPXFWOfT1IIXqkjlTqP2FDCSctQo4VCzA2kd47qseG1
wCvVz8MpxN7nceOTQyy4UJiSobGWQkj1axnqCrBgdYey0Lw4hXj24ut58X8j
8M10llX+CgoR3vzOpnFiBGoqQSlNjEKYUKXG1X+PQJeoJv/9MwIELqz/KbZo
BE67/rPGWwQI67+aVB73ETi6R1fmaLAAYXEx/b8xNhP+/jwWfIYuQPRViujt
yhuG6rHU5gBBfuIzv/ZzN8VBqLmpUcnvLy9hMp+9vJjvD1zvKuzuz+Qhdn0+
tGkuoBfWv9lhYNm9BJ1DGc4ish2wzjpzcFf+Atw3/MjaULYRJso37NErmIeX
ZtTHVnwvgSqR9XfuVszC1LA5Cwt2ApRR2d+x+sMMLDHaGTlkkQOYX49QqJ+m
IK3f9qPDmSqw7ka++T3/CfhHI5qR3t8CFitF343ajcHvtcxmGNYN7IHQ+esz
HGim/3vcfks/yFWrIaa+MKGTpv8tutsASF/5I0OigAGb/nxzunpgCJw1Wand
+4EBJVJdKiNPDYHpFOPfSZEM+Ev/7aoq/SGgeXhilcZ9BhSny3mvth0C5U7S
rsZqDPhinPe2QeQQ6O10ORKbPAB9Zo/He48NgZWJyh3bwv9A3o1B725HDgN7
jVf8Wrf7ISqTLf7ZwgRhYeu6Lpr0w2FpJRXBX0yQxYnKuq3TD5c7/JLaNcQE
03FxFrEK/bB3jNfh7hwT3BdMLRMY6oO4tFp2iNQIeNBV6Fdl1gdPbw+3trIY
Ab4P/ohdOtsLYfE5Kz32CEhqt2TZHeiFhkpyGwOmRkCF6nDJM5VeyOM1TC9e
GAHLBtmO34R7ob6p7G1xYRaQjOakg/BfUF6qbo+REgvIHRDfU/OkB2aue9Zk
e4sFNLxNjw/ZdEH+2U7O2wEWqPjr/s7kZBdsDJr2N2exgMHNN3wtCl2QXBRy
GyZYwPHcz29FrE7oeaZW8yEPG2TInNvx2rYThrQxujiSbPBf4VFJ3bsdcH2h
jYuLLhuIz2xnZTq3Q00XPaM9GWwQb3PqxDbDdvgsQkZFIpsNVHtsEmM02mGp
xVwNJ58N9ErfmwXMt0HjNWtMfcvYwC9UpsXSvQ1m385Lv9bDBnwqqwrXerbC
mn5KK7GMA5D1v+cPfZtheI8EWrjMAc0fd6zQtWyGqa+Tmy9f5YCvk5ZB6w83
Qzv9d8u/WHOAl0dDUN5SE9RSK7E/Yc8BkhGJwRNOTTBtuz+D7ssBh8v0Qq0s
GiGzr2HDUDoHyC/3EVM/1Aj3THn6fsviAOFz+aECMmT7ormybx4H/OyRC4vt
aoCHCA1FyncOsJ2eC+s81wBFayK+vWjhgAi5d+GnD9bD+NJg0RWzHOB+o2O1
lHQ99H/qEqu/wAGlVzYq/Zyvg0NJP/XDeREwdJlUErOvg7nZsuqzdAS8k9+q
PDGvhagk+uV5SQQ6aBNqt7Wq4fAWKstsLwKPS15rgL9l8CxRrVt+B4Gh2r2h
Frll0FUxeVuBPQK6P9tG/O6XQceyJdUUJwQkOWJR7X9/wNZJtR833RDIkPBf
spsthcaa9f2hTxDotnErSZj7Dudrloyuv0HgoKPkhqqv32HzbYvU3rcIJD3M
dRxz+Q4bjz+V0otFwCFscovWfDHMXh5rIZGIwLLCm0/b5ovg1Isw22PpCNhu
+vpGfA5C4tQajiKBwN7d0zrmLhDSd02s2lKMgMAp1aW0uUIo5Vt6UaIEgdeO
KebH5gtgyP2rMv1lCJSXR25x+ZcPj0/cq1lTh0Bod2vbD7d8GPlrIr2xHgGT
cdGnYgtfoakD8d6rEYGpdX4jqQt5UD86qqW+BYFNt10zfi3mwInn4huXdSHA
fpxjrvgwB173y4rx6kYgN2JC1HkpG6Y9dNs504PA6eIbjqI82TDSflVwSR8C
bquMNY7wZsGM6QZxnkEEjm2LGAn2zITb9ZdJ7RtCQBQ0v+nhzYRNRwh122EE
kq1PLd3j+wz1pBxffBtBoDVfsySFPwNqvt7MM4cQWO98pWdcKB0yFt7HjI4i
4O9ycmeQ6EdIK4iO+jWGwA33Db2VG1Jhijc1NXGCzPcDqrr15g9weT5W8GAS
AW0P5EeRT4FFCQnyp6cQ2Pa4aDe+Mwnuof0R/zmNQKRXSkD33vdwQFs+NGSG
zIdP6G8XkAjr2k/ePPwXAaavxfMv2gnQy9tDKXiWrLdnugNn9eLhB5FDEopz
CFT67d43eiEOdn09ZAhJJwfSB7eZx8C11x04tfMIqEoPOAfVvIWyzlfByX/k
/DfnyFW1v4EnSoSZkPS43NMGyp9IWHHVkKO4gEDDViN3HEXAg0cUT4WQzlDY
Lu86Fw4/b7vJP0o6SGmp+QvlBXRP4Rc/uojAnR0NHqMrQqGDco97GGm9nfGK
CuuDYdvfIbyTtKktM6NKNxCaSIpdllxCQMohEDtg8Qyqu+k0niHd46xqlu3q
A4U7n8V4ko562JqjEPIIriyHZcmkc5dNSR084w5RUv+xStK7V++vVXzgCLty
RqR/k75xaNm80sUbMJS/5ewk6fqsnZmYmT68dDuye4F0s0OqluonAGY/7y1a
4r7/3pFhvTdXQbXh54VZ0noZhqX7Y+3A5zJKKIt0Q4Lo6nMOzmC18m7PNtLJ
pyzUsuI9wEjkyfKvpJlHizq1ArxA2vAJ63DS2w5s8Kpw8gWXazXMbbjj2ees
eN7MH3jUb81UJ90aaWODZIOA1Clpk3kyHtMvIwqz1oaAfDvlK7mkV7/4Ieoi
HAYMjlrCW6R3h0xaAv5wcDO+1XEdaYPnm/IF/r4Ef9TDvIvI+N/31xOpZL0C
qx9ncUxJ5/qk5pxvjQLrHN1qvMl8tj/uEJSsigbhRwwOLSfthgtkoF8xQFR2
STSArIeo/aoCX5rjAL/HNsKRrBclzRMfJeriQUzlWFQPWV+FGmYGLhUJ4GEB
vRWQ7tkdmAoKE0Hc+dILI2R92qq/uxiX+x4EWn2N2kV6cec3HkpmEvi7FIff
J+tZSpV5vvJ9CjicT4lgkPVvqnh04XzwR9AUeD/EilwvmhGJgdMx6aBYTrDY
lFxPQo/4V5wyyABfpI5P6pLrbZh9NZZt9Qn09E6bi7IRiCuVLVF5kgnOTCne
2E6u36D5Zn9ekSwQsZOa181A4MEO7wuN4VlAnaUu5D2AgFHUAMM+8QswN5Ar
ye1HQNwxkZ5TmgNGUuy8s8j9hO/DxcYnOrkgzFOFvqETgdFe6muDllzATnjx
wu0nAjWnrBTn/uSBNrVtldKtCPjIbj29X+AbELRkpy/UIvBv+HyluQwBtA8m
99EhAhMCaUraFgQYTT2o+PsbWR8bKaGqyQQw0hHwzfxK5uPCFyP+HUVgrOS+
495sBL4UrWIn4MUgzGRpb0cqGc9XrSJDpiWA9s6H504EAhZZSg718SXAvWMm
9esLBIzrfNpzB0vAwfJwx38hCJyk7I59ersUOPx2MrEIQGCr3UtVhYc/gHDh
fEK1JwJ9xw0u2L4tB4dV/oNj1ghoDbiZ13SXg+cVqnEMC3K/8Yy9pbihAjBs
hZuariBw9ivTm/m6AjzYvk/mpTECxQru2ZavKoHx7lmvotNk/IXjJEzDqoF+
Qcr6xJ3kfsKcYv13pB54vQv2yvrLAWZ7MPu2a/UgiZGVnzXJAYE+krM+XvXg
J93KOG2UA5ibAIXxvR5cp93qeTLEAXFGvhsSDjaAcPN1vP1tHCBWI6krjTeC
+58m3it84YDJdJC+Zl8zwL1VxNfbcEC1wj7RO5ebwbWcz7uLrnFA/Ht1x7KH
zeD41GTkZVMOOBu9fZ9TSTOonBvd4naeAz4Fritr0mkBmb1tHnpa5P/7rZme
QLNW4HV78zv9FRwwuC1dmOLTDg6tn74/ksYmSzvFzjipHSDTtz9c37NB+KbE
5szKdvDfA+9n/LFscFQyKvKKyE+wVt3HbTaUDRLofluIiJ9A2FFc66EzG5gN
WWq5fugAqaxHAxMH2aDjnZTtWH0XEDO+kv28jgWyqalnk8a7gLPcj+Rd5SwQ
arV3t6l4N5BWuBvTRLDAKfnzPDX63WD/hrbomU8sUJj6NCSpp5vMf4F0bygL
xGZOZpuyeoDLZy/eXRdZIMtsYInxuBfIHNxqudA8Alxt849fiO4HxYJ6Qk/z
meAgmLomnN4PEiOyrfo+M8GyFcqeZYX9wH0/7YxaChNEfIrL29vTD0zUKlu+
RzBB9uTTbVIbfgMpl4H+l45MMO5iIDQY+Rvoqs8OLVdiApsnU3X3w/8A+9gz
fTj5/WwQo6z/JoABMIU6wwNmQ8DySQXfr3omUEhxVllhPQC+eyko+FeR33mB
ovyPtcl+Vg4Ui18aA1p+TicqWN1gQqNMq89pAvgVR7ZBtVaQfnv57JU7U+BD
TXxt4YkaIPCQ4XklbAbcm/3WGlSXCzxfbT4hETYLtu9ItxD0eQNPCjyUL3k6
D6pEL9wrUPgOP5641c5JXgA3tNQN6f0NcE8kLK19twTsCr5IuBj8hB+vNOKr
GTx41lLwk08PeqGl9HmFA5O8eNBp6wajqd/w82/al6OjfDhvRlx/Ti8DaotT
tvjxCuD075ctkxOH4eaGI3FPKAJ460E8TSljGP4L8JHyogvg982MQtPI81ga
DZNwXymAt9XUqkVUD8MV88uw2zIC+GT1Mi/p8WHY0reCefaAAO5yebXh/D4m
NEtf/1HSUwBPGETjFZXkOUh7p3oKDwUf3hc/rNc8AtGh93EhAhSc2VQ8J9A1
Aq33S4q4YhRcuYBu+Zk8Pxqp8AydXEHB2bL5h2bHRyC+uvoVeyMF359XMqS+
kgUF+68uqAAK/tPw7rE7p1gwxjm0JMedgk+NuayrK2DBtfbUHTGeFFwwqIP/
QwkLhtx0jvL1puBjed3CHlUs6G1q6nQpgILnMrR9Vv1kQZsjClvn31BwP95H
NewJFty58ruf1jcKfv1Ts8HZrWxYkTR+tnSOglOuurzo9WPDv2V8+XxLFLy0
b1WWaQgbbhkU3YzzU/F1wbperRFs+EhObeKrIBXPeX1R9cM7NtSMsw/NWE/F
X824h4wWsmHG68mm11pU3K2nsH0YsWFE4PT5u4+o+Duji++eneTAH2nUgnQf
Kk7b8Szmnx4HTlWvlmM/o+LhfA0Slhc58Kzg7imrULL9irfDRnMOFPK99+Jy
AhXPTX7+TcGJAz08/7Yc/0HFL10BIPktB1o7zF3cuIyGe4Tu01Ua5sA0oyfy
4sI03PPTT/eDbA4cPyj+DxOl4Y0M6Q2nxzjQdaVS7PhaGt5yLjvxzCwHBn40
HymVp+FvVuZUzmMIfhkqf3jzBA3/wpj0/L0Fwbm6C2fNdWh4qLLR3gfbENTK
6Ze9eIaGJ+XcObNSCcFy738V4BINx+UVY6R3Idi1SUVc7DoNj376K/r3QQT5
Lr9MyvOl4fvcdtjOGSN47LCs60d/sv+u3CpJMwT9FT7pxAfR8KdtjW5qVxFc
NVc57h9Bw+t58lp1riO49eWiplkSDbeQCDq/xRFB3QaLBmo52f+jhHYLPwRD
c8fj56toeDwMXiMYiGB79EOn0Toa7nipJSYpCEFz21frOtpouJJv45PqFwg6
CNZYpA3ScIlW1bc50Qi+PrJz7hwNw5euKVtJfkYw7KxJeZQghjeDuDm7LAQD
TX3DB0Uw3DCXY0dkI/jIuUvVdQ2Ge7ncoR/MR9AmzetGnDyGj2Rvr2z7juC1
rx/3srZj+PlYOxtGKYImZe00dVUMT97tNzxShuDZPsWECg0M9wfIs7MKQY1V
LV2jJzH856suQZ0mBHduWkrR0MNwW4sNoaItCCopyzt7ncdwv5q2ydpWBDed
cF+15jKGl54vOKLYgeAydzldYIvhYomzIs69CAo8O73+6V0Mn9aPvzzVh+Bi
uDOz0QnDfStEH1n/RnA8o8bH8iGGR85H6qgxEOz44wgDgjDcyuPUH8MRBJvH
ogPawjD8UtLy7gAWgrWLFUYyrzC8RP5pcg4bweI1Un+zYjG87oXRN4QQ/CZ3
/MfiOwwXOCrCtziKYLbq3bDjKRi+vFNdkn8cwZRTP1S6PmO4CZ5LjE0gmHBp
dFEuB8PXose6nZMIvrWUrLmdj+HZ4H1a/hSCIR621/lLMDzDd6rHbIasj4CI
3TrlGM50eZ8h9xdBn8hiystqDGfwkaEk7ZK1Om5bC4Zvqj9B2z9H5rcIv+Pw
E8PbFC+t7SZtW2ujVdiN4Rd1qfP28whad4YJYf0YLtIhl8r7D8ErQ4UdZxgY
brP2uaIPaeOpoaTXTAxvn13nxruA4EU+sXsDHAxvFUqOtCetJ7L/iPIEhi88
WeXbRVp7vZWY8wyG048cOqy5iOBh+eC+4nkM/1O0ui6EtJZ6froQDx3/IH1v
ay/pPYcG3C8K0PGs/3T1ZJcQVNUTORWD0fHIA75HTbn3AZf3SjKF6DhwFxcM
Jr3F5uqQ2ko6XhfwJyqPtPS9gGz3VXS8opK12E5a0ivHq2wtHV9QllVCpJV/
ZZwbIv2wLiGT68MaKZvoknRcc7/gbu79wq3RN4Q26WOPn+4eI00YP/pXQzo7
9+TGCdItOa5VHNIKFXOhXDNFHSNF1pHje/+cSp5PoFiF1Z4zpLVrbQa4ttyl
49BMWraY8XSatGvQ0UNTpGMPlLC5DhoBoqvX0/HewCenZ0jnxapm6JN+FgKF
/pIWEl7D6iA9uH/qFnmegTLXV+bPk67YxlvEtXrJsmfrN9Dx/QPjK+dIm7os
/GdCuqz4SRrXnxn9V/tId2y8VzVPuuxAlyqfFB0vvv9pOfd+petNC+9m0hLR
DTpcU86VR18jPXHuexnXkh+LbL1J3+0P4yXPW1CJnr8/kbSO1qm9XBvAtM5B
0nSTm3Fc35J8n4JtpOP9Mi1NXD9yjHGWJ70sczP/IukPCqESN0ir779rxDXh
48/w41r9rhfXzX3eX1JJ3/+n/4HrxZf3z3FI5402j3MtNmG3SUSajmdK3RTj
3hdt1b0xpkx6cO3wDq41k68ReqTP9J/U5fqMgMlzO9Jj98KsubY01TcJIV3S
UezBtctXve2ZpCuWtYVz/XyV9r8m0ou0hhSuE+4cqpokfbUx4xvXeVWakatk
6PjUdadqrmu3qF9XJ51VK9PBdb+n8h590jE8mQNcz3Rtpd0nnb0kj7gW2rOp
NYL0TJXPNNfSoeve5ZG+YlExz/UujrhDx/+2jy1y/X/3Y/j/34/9D3uxlZM=

     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->
   NCache[{{-Pi, Pi}, {-0.9999999999999918, 
     0.9999998830731719}}, {{-3.141592653589793, 
    3.141592653589793}, {-0.9999999999999918, 0.9999998830731719}}],
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.419291872687881*^9, 3.419292140351719*^9, 
  3.419292244274002*^9, 3.4192923069830112`*^9, 3.419292995097774*^9, 
  3.419297121521201*^9, 3.419990668903923*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"f", "[", 
   RowBox[{"n_", ",", " ", "l_", ",", " ", "x_"}], "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"x", "^", "l"}], " ", 
   RowBox[{"Exp", "[", 
    RowBox[{
     RowBox[{"-", "x"}], "/", "2"}], "]"}], " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"n", "+", "l"}], ")"}], "!"}], "  ", 
   RowBox[{"LaguerreL", "[", 
    RowBox[{
     RowBox[{"n", "-", "l", "-", "1"}], ",", " ", 
     RowBox[{
      RowBox[{"2", "l"}], "+", "1"}], ",", "x"}], " ", "]"}]}]}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"radialFunction", "[", 
   RowBox[{"n_", ",", " ", "l_", ",", " ", "r_"}], "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"2", "/", 
     RowBox[{"n", "^", "2"}]}], ")"}], " ", 
   RowBox[{"Sqrt", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"n", "-", "l", "-", "1"}], ")"}], "!"}], " ", "/", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"n", "+", "l"}], ")"}], "!"}], "^", "3"}]}], "]"}], "  ", 
   RowBox[{"f", "[", 
    RowBox[{"n", ",", " ", "l", ",", " ", 
     RowBox[{"2", 
      RowBox[{"r", "/", "n"}]}]}], "]"}]}]}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"psi10", " ", "=", " ", 
  RowBox[{"radialFunction", "[", 
   RowBox[{"1", ",", " ", "0", ",", " ", "r"}], "]"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"2", " ", 
  SuperscriptBox["\[ExponentialE]", 
   RowBox[{"-", "r"}]]}]], "Output",
 CellChangeTimes->{3.419291872915292*^9, 3.4192921404968557`*^9, 
  3.419292244403434*^9, 3.419292307126892*^9, 3.419292995254314*^9, 
  3.4192971217125177`*^9, 3.419990669048338*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Integrate", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"psi10", "^", "2"}], " ", 
    RowBox[{"r", "^", "2"}]}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"r", ",", " ", "0", ",", " ", "Infinity"}], "}"}]}], 
  "]"}]], "Input"],

Cell[BoxData["1"], "Output",
 CellChangeTimes->{3.419291873160089*^9, 3.419292140570848*^9, 
  3.419292244460108*^9, 3.4192923072995157`*^9, 3.419292995305193*^9, 
  3.419297121933755*^9, 3.41999066930155*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{
    SuperscriptBox["r", "2"], " ", 
    SuperscriptBox[
     RowBox[{"radialFunction", "[", 
      RowBox[{"3", ",", "1", ",", "r"}], "]"}], "2"]}], ",", 
   RowBox[{"{", 
    RowBox[{"r", ",", "0", ",", "20"}], "}"}]}], "]"}]], "Input"],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJwV13c41e8bB3Aje89zjJB1jpGRlsa5b6SBttWysoqEsspXyiqpbCrbqSSU
7aiEJNkhIVr2SkbK/n1+/5xzva7rc13P/Tzv+7nP+Wywu3jMgYWJicmF+Pj/
d3KAHbu2/UOazJBbp4047qhplzOxkPODN6sV8qb0kt1rtRVBcnK3QFJwi7ZE
4Pxu/uiSF9xd0dAXonFI86A0Lbnyjiyb3H1oMemwP6+7laY+ZX93zSkVfjR8
KveaN6L18aesLn/OAIvFu1/v1Z2iKT7m2rq49AiGZ71cOWLP0Vx3e134K/sU
/t0c5uF/7kUr7PhOnzPIgWVZH/MY/eu0RReT3mmn53DthtbqHqVwWhpz762/
hvlggs9jGWwxtD1NUUrznwtg+YvHyZTaB7SRxH1Vc+eKIHXq787HxzNoEfYr
p2eXiuEeLTix/FoWTUur8N/0nVJoIbF7CvO8oLUvOcf+lmWAdfl0iRC9iOb9
XkZrKr8cpkP2aVYqltMkYzoaJg1egfomU5KMaSWtwircaeLTa0BzuouzUg3N
ThVZx53eQBr32Zm52Doay9KVljn/ShjbM9rFWtBE6/hutn7OsArsbiz2qdd+
pD2u1XKZ5a8G7yXhGWnJTzTfHB7GzOdqaL15+rBWXxfNKHqIfSbtLShWCXav
kvpo0r5VptPnakAyPuzls9HvtF9nkjJ+b3oHHSdeFstE9NMqDXx+Ty29g3W6
LT0zPkO0aJVjtKmaWrCMldXryR+l2QtsjPh15z0sxRw2TaZN0rb+4eiZNK+D
odeKTRFRv2kcX35SJmU/wI+zB0CuYIbWVfnaa2LkA0x++SV0m/UPLftx4tvx
/Ho4IPFjveXNvzT/iEtC41cagEN4j6ekwSLtkOch6zGDRqj86l3runWFJmep
kjvK2wRZfF4+vpuYYGb3uqWRT03w8+rF7CcjzBDPVR4/7NQCqlcvK24sZYMi
HyPPS+RWeLjzwV/dNg5IGtsmMevfCsnfjwalCXFDyBmlSs8frdBP6s2s8uYF
t1ZhpxnDj/C86dY6JlYBsDBg4vfM/gi/wpNnvn0RBCyZLJrmb4NSmTh3HWNh
EE6qY5n+3Aa90wJcQS5isMRf8tR9VzuoezxWHV5PgoHrmUd+p7VDvM6mQv4R
MpQ4BaRMnesA5XKLy1dqpSG1x8XwYnMHRDBv+EfplYGbB09M/Nr0CbJ/JdC3
hMrBSZ3NO34tfQLZOxbC1d/kweDxhh8XbDpBTj025fsGRVCXELg5WdMJ4R8K
buV7KsHq6uiniTufYchAVK9Fjwrp9ake47LdoPiiKORJqgbMJRarfovoBiOh
9pstBlqw16mhv22hG2q+FBYK6GvDBOtfs/L2HvD/JDSz1UoHoI1XIA+/wFfr
TS23/DdDdJp8XXruF/jMVJH479EW2L770I5bYb2gartovCy5HW7z2M/6z/WC
XUAAacFRF752++W42/bBq4zymz8qdkCw9yMZy51fodRkaZUWsxtany+zUKa+
QeDEwrfaUT0QBi4rPo3vEB5xNFK5Wh92KsfuCLP/DkY91+N2pxvA3bmns1c+
fgcXZlf2iUuGsDnqk4Pdsx+we2zLv7wLB8DK10a/98cP8Nn7TVMrwAjCrMdl
zMk/Qefe7SGReGPo2cjcdSDkJxhPXuI72nsQrtWrG2lb90OhjuMtC7ujkJVf
qvwsrh/w+KdxFa5j0Jaoz6rU2A/3N3BdmC88BopOlq/IugOgWeS2NUXMFOpZ
gzWYRAbB/ZFu3BqXBcyN8fNcOTAIRv07ZK5+tID1bfeHZ68NQhhFZUAt2RLc
056nDU8MQszFbr+9eidBfPcX4ZbaIZD9l2237vUZQEXHqf0rQxDltG655bEV
nOOZbqjWGYar+bGRK7HW8KqbPaQkbRjm45hO7n9jA3bem/4mXxkBpnKqUvBb
O8h7fuuLq8YYsHkqfWTd7gRjwmMRRrZjcIB8z/l+rRNQvI1o1Ngx0DN9P69m
4Qxpu3jS+xfGoPzLmQsHAs5B9IcIx5PvxsFh+Iaey4ALePffm953ehJizqnv
Id90h4K9vzOU7k3COYuv4Ubf3GHq6RFT1upJ4Km74ey3zQOc3YVKKyi/IGjd
O7aGMQ84uRLtv2X2F3zySnbWOHMJUnkagoQMf4NW4ArrKXdvoO2+ejrQ6jew
XJKe5/rsDb1ualumfH7D7vy12Kc0HyC33R5qzP4NAicUH5YI+kJUosmBm4LT
cOpxhdbIGz8IUmrmX/syDc8LtBWjDvwHTvDx/oTnLKSqmxxvunYDmDLmy7/c
ngWH1kTD2Dc3IHGddG89fRb0X0nblq7dgLoPjjJPO2fBmX/ekv96EFBNlzMc
dsyBzoeehwNhwTDiTMn5yvwHHniaFpo+CoXz0f9VtEbOw5k3XV3fSLfBbVCl
vyhvAcZ2cjp7H4yG71bdnFUfFsD4EV3mh080HO+6qdE0sABtu089NM+Ihu0N
w36DkovQ3qeZZfU3GljzHwmKhy3CZHmxaWN6DCT6b6D5WC/BvXV9es5/Y6FK
ROK+ruAKXDwXbbuamgCb79RVGKqtwLDsoxva9QnwmN134OjeFahoEK0zm0uA
iIVOzfP+K3BYxf+J2/5EMP8WW/tgZAUCun21G6cSYSxbcG6pchUkojXiInY8
AO4NwZRv25lwPW2webU8Cep2RWkGGDJhd0ri64PfkiDUMmXb+mNMeCUuIuIq
azKwRJbtO+XChNEh85kexsmwuDrh9DmZCVtMt3WWdSfDeK9ZVgsLM7LdiZWE
qRRoTKSoVDYyo5lV5vYz/6VBeNFmbetuZvyVF1b9JyIN9rfq6a4OMuNasQyz
d1Ia1HCcPrBrjRlV+mVr1V+mwSvvyHNl2iyY5PH3xYW/aZBruvD0RTwLpgZG
dgi6pMNdwQbVdBtWHMoJ5k/YnQGMbeuLD7mxYvbR6muNRhkwYHURlq+yYn/1
rtdfLTJgZ66IqUUCK2ZsjRtM9MiAkQOn/+NrZkW/599FrDMzwCBossVv5zp8
V5yRz8+UCW7ZcJJyYB3+bldjW+HOhAcfowY6zNfhBi/39HdimfBbduuCpuc6
5M201hhUzYSUVwHyQ1nrMIjkLH3yeCb8+yPgdUycDXuUpn4yJ2eCwnq7tTUF
NiSrpj4LfZQJh/YU3crVZsNDz7tX+3Mz4VG0ZQrnQTZ0Y+H4TanIhGOa6e8r
gtgw6xTnp7beTAgwnz3qGsWGn6pCaiQGMuHpf4a9EqlsGC23O2v7eCYwNY7+
vlzOhkyelgKr/zIh13mTpNo0G8Ydu9LzSJgOXfeC6V2rbOhe0ziQTabDutJO
jVBedrzO7eYfJkOHk2xXDX5Q2NHdbXXjexU6hKo3Nd3dwo6tlPGtqpp0yD8u
a7nLgB2ZcuWe2W+mA2fGW9cEK3Y82QovrWl04t6I/d3jyo7H23uN5QzoYPXb
6fqMHzvuEadql+2jQzGNN/5gHDt+Tpweu3CEDt8drOSWMtjR8sVbxm1TOvDe
eZGd9YIdJQ6OfQy0pIPdF9M3rI3seOH0tZ7f1nTgfvjjgkc3Oy7URYycOkuH
gpNu0t+G2FG22Lws1ZEOrD1hfuXMHMjVOZCZ70qHnPuiVKoABwYWJddcu0gH
0xPpnXHSHNj2b/GFsicd6F3lOh7bOJAa7Liy6k0Hk8R9P7/u4cCNL22dtPzo
MGfREWlyjAPdXna/2HGVDkkkWyi35sBnWSbf1/9HB8PPk5OUCxz4Yq59uTuA
Dr/iryTFXeHAwgcK/BcD6RBvzmHMepMD+yxvSfddpwNNPHbBPY4DVUbGtRSD
6DD0SS7rawYHxm+qN90TTIe7cbnmJi84MClsR/TuEDpsNdvBVv6aA6FldFYg
lA5fRd8XUho4cNNLyZCXhMM6jtvFdXHgu3n6UQyjg1bsd0HWIQ7kM5tzSCHc
dfzCG/dZop4VjpZPhANFFi98ZeJE9USPB0OEqe2h0ib8nJjnZdrZSrg1WqSB
IcWJ1xn2UbGEfY+l+VFUOJEaONSjTVhOeCM1bisnkthyq7OI9T98ZHSy7OFE
sfcSJxaIej2j9oa4H+VEm2dSzxUISx5t1/lqxYnXZDU6KcT+qgVtfhq7cuKE
ruV3NmL/51snIhl+nOjTrfb9NXE+wpF+QAnjxPtva0YOE+dXfpj9V2wsJ56r
es/3ijhfO4GYJJYMTqx8aXuWhTh/nhZZY/fnnLj8ae+qPJFP0d2chb5XnDgT
lj+7nsjv9CHdLON6TkwqsT0xS+Sb03SMjTJIuInSspHI3/TOt8LYGU5c8zzC
F0P0x7KJqx0LExf+1v1Jaif652BjyJs+SS4MuDo/20/01/xtYTdjKhcK3Ij+
W0T0X4pxqjRjCxe+HqxTs7Uh8q8v84s9woUNX1LuGZ8g8g83pLJYcWEym96f
W2ZE/kZtnRdduJCzO/Bv5lE63PswrmMcyoXMRtIGLgeI/OpkfjG/4kLrxlIV
o21EfmHPki5+4EJZ94FM501Efvu2G/d1cmH+U92nZzcSedUezSqb5sJJpZ2f
puTp4PEu2O4ihRszdkoa2fPSQWZgL/u8Djd+8K+LaWOnQwMLV7Y/ciN58feo
PDMdlPDO9K0T3MgzYaNx/k8mdJfHBdJvc+PD283G8cS80XvxOKV7ihsHo4Yv
XyPm1a9mZ32bZW589YUeL52SCQ8nVYeGOHlQ5rFiQXJ8JvxRfb5xbgMPRrx4
fMokjJhPj0pf8ZvyoM2HDerWTpkg9LCux6CMB4O4DLb4yWdCBSM8oL6GB9Uk
3pIdJTLBpctE/uhHHrT450LVFcyEd2Ifz1mN8aBC2Gbb6JUM8Ivs/ucrzYtf
lEYtxIj3vh8hY+J5gbzoJ5rEfi0kA/LdeY+TD/AhppWTFlrTofGBiF+uOR9a
JyXtm32bDkM1kqn69nw4Aokcn0rSQVJCZdz1Gh9WqT0QOZKUDsFVhkFVxXyY
oxnkrOqYDubC1wrPy/OjzYEXa2l/0mCxcFrk9RI/em+RK1diS4P0qy5jWhaC
mK1Y5NE89BBupC4fnZsQwrxJLe6bQTFwRKvMQ21WCGcO9TC87GJApupSlN2C
EI5ms8Wd04uB8p9jra1swui9LUfCYS0aZpS6D+fKCONNqZe2RVejwS6n+KDj
EWHMnq49vOQVBXoMtwNdhcK4mvNx8sXQXeA3Uj0nUC6Mz8qfGR9+chd6ewZv
7q0Uxg3Dtu/5nO+C7/LpuqJGYfTjzXGdHL0DL8B4X9SgMK63LHm4byoC5Gop
hkYkEWSbHlwaYroNTO3f8dUVEbxD5viUYxAGwaMV6Veui2C6zUkdz3VhwMWU
zKJ7UwQdmnWWPN6FgvDGEzXFcSK428D8hML+UFAK+7jv+QsR/CrGT7Y+EgJG
O6sPZQyJYC19pOGdaxDEZGaevnlMFP+hE9+vgmtALr/+eu8JUYxfRwp0NbwG
Sa3WMmw2otgX0LkzpCsAHq9Ifb9+QRRzVBIZt5gCoMwi9uzVm6J4qkH39pKF
P/TyhJx3qxDF4SDlNlslP1C+7OhrqiqGb5Pl2+rwEmzc8e14qpYY7hvLazv2
yxM2M1lqjm0Vw1Jf0ff+SZ6gH3Fg6JqBGJr2FkkVLnqAFV3d9NlpMTRICRJ4
WeEO8R0zmiz3xLBtfF/jtQZXSH7gwnMwTgzZv/U+V9rpCnSbgaGEh2KY0q0b
L5PjAgUTn5I3ZonhXqaBd3zR56F5HYPnRJUY/vmZFbB2wRnYtlwbfj4rhkpX
PfJEneyBd+lv9eICUZ8G85rjxFkQrnJPMWQSxx2DwZbSl86C3EE7sy+84jhW
tfiqMNgOdjkYvmVXFsey/pw3uWU2YKBWkXJUXRx7z+38oXXABoymt15J2iSO
eZc2duwssQbL/6jam0Ac9Zf/NXuwW8HlOJ7UM5bimL81sVrww0m4eir4SpaV
OIq+MjH8wXQSbmxYMZu1F8fkuOaPUTtPQGTuL95bHuI4XmValMiwgJx3H68U
hYujy89GDvsuUxj4k2DO81qc+H/y5cGGPYchQ0/nUt9bcUyI3fbqyt+DYH2n
+d7zenEsdjhcW5NvAj2KbB+Od4njCmVJf+tOI/h43HNn0qw4itnKUzvTDeFu
Kp+l26I4Dn40OLAasQdMxrMuIzMJf94ME1G7ZgB1N77lDvCTsEHZyvKhrx5U
5JvIbVQlofXQP0u5wJ3gvzK8a02LhKySlVKa73VB90DQiY/bSNgWy9frKL0d
ir4zor0MSdhzaN93q+nN4Klu9nyfCQmDtfcnK3nogKbv7waJ4yQ0OapoJL+m
DdkCFLYKGxJqVGlpRN/WAOdT1RsinUj4dP3PK9PLaqD05AzNzo2EJ/SeVLaF
q0AaLdaH3Z+Ed1D1pcayIliFa8Z23SBhcYNjUgHx/i7dWf8i+xYJn6ULtdZ/
k4OEC8xjhxJIePBB9dw9F0kwZSSxb0ghoatFVqgziQTCbNsVZukk5PWz4whb
FoHWI+3w7hkJU217M6clheBuktvphAISfpF5Rj09yAsmI1x+5xgk3OIUphvE
wQlcmx/F7awk6mk4L2mXxAq117CA7z0J8/s+cbLuX6MFN3xp/tZEwsjwl7Ft
u/7R9Ek+4/kdJLQ/YFiIpBnamp0wZ/AXEvoKFowX5I3SXuXlKpr/JCHl7haT
Q4vfaVcW9+tRR0k4viQu80G+g7Z978CZxSkSZh2n1fG2vqX9ibp2pXGehCzW
P9r1FbJpBX2SCSkrJMw5cXv2z4oLzV2lpNB9HRlvvNgW8d3yJk3D62irPg8Z
h9vWW8vHFNLGKycmRIXJuD2z8cj0zg+0LN6bXMNkMjLXpB3c/+szzdFSQZkh
S8YdpcZ9ref7aYr0Cv3bymRsCr0gP/d0gvZz6oT1mY1k4nw/SNJ6ZmlpO/9c
1dxMxkpezr8qhou0M2GRicw7yfj3Dv15Vz0TSLarFbfrkfEUQ16jf3AddMm8
//hoPxkt3g9l5lzigvjzdr98DpPR7Rs6qV/mB9OSFW4jczKeZjnrnzMrBMIs
9ynSZ8j4cEqcJXZIFFoObt7z6ywZbcsStd4Lk8Fo8Px/0R7Efs5KUv+Jy8Le
/xRy9viScdm8PFPHbQPoi/X2zAeQcX7jyoMrrgqww/Dg9lMRZNTJqqFmvaTA
1j42J74YMr5wYSyF8qrCJq+KuDf3yWjuHvF80FcdVB9pzio8IeOA6FwMZ5sW
KO8e2dCZS0Zplj7z88QkkP+UduRmERmVuAobbqTogCSbcN5EFRlzHsTebkrf
CjwOc87FvWQ0JY0/+M9kN3Cu5CQ49ZNR06v4/X4JgHVxDrUSY2T0mdw+2u2H
sFzTqRDwl4z/dvy3Oc9ZHyYUGV/3Ckugtd94WEPCXhh55cG3QJZAIbXm1MCi
fTBgqrrrmawEnrf0cfv7eT/0Bj+8L7BRAlcFSvbI6xhD48B/pl37JPAT8+Ew
ifVHoM5/a1D4IQn8OaypbVV7BGpEp/J3mUng4aYpXPI8Cq/22Aik20kgt1zl
rG7nMcih69ef+08CpSRCiSMzgzv2HLhUIIEt6SeX1PA0hC+/cctlSOBHLb0V
W5kzEBrrm2xdKYHm54MffVk7AwE1o4tvm4j1gxn8sY3W4KbYWBwxIoF+Zecy
fGpt4dBApJqMjCQmbsqU/NfuAI1qAx2nFSVx/bzi4J3jjmB8aVvAQ1VJbJIL
FQjucIT9LF9bydsksXj4zIu7PU6gL6fmLXJEEl2GO9c4/56DLaffVXLekMS8
XO774+5uIN2xYDY7KIk8TBJvLmlfhgdSB9e0JyTRr/nyl9DQyyBxNi3LfUYS
B/0uOu/uvQziM3uXJlcl8dktTb6YW14gKBibNkKSQpL5wYn2cW9gNdEY7zsg
hbe43u4xbPaDsbd2gXW5UnhBRiS8jjUQZKO6zt8tksK/23bsDdkVCKZWh8xM
X0oht7iT6H2vQKj4p6v6vU4K9wlHxdWMBEL0RqGOv/1SyNnk8m1D+3XYmfCG
QpGUxhLvVLns0iCIOC/dEhJKOIn5Q8jrMNAQ6lxvYL0ea283/yaZRsLQnaEb
cQ7rMYBP6o6bTyQkc/8dHnZZjxpb7Ne+P4gE3nXkggjf9SjeYl9D/hkJY/Mn
9nZGrcdq16d2LR5R8Ki3z+1czXqUpW+w2hIfDdJZg2/uqcjg17Tnee+mY4Eb
/tj2zspgwmLv+PjYfdg3efKvvJkcCoy1eMTWZEBXtT3zSfUNGHxG6PP7kiwo
vlljJfdnA1bJzIVVquWBI5vX9+ZmeRw027x0uScfznpeLeZ9oIBSbrdRkVoE
Wzd9LVZJVkCjrY03w7SKgHsGS/amKaDL2Zrrg9uL4IUHe2ngYwV04EzxjTpQ
BMvuUWVzBQp4qyBT5un5Ioi/+ORlb4MCyly4ENLxrAg+uLZX5awoIJVa/p5d
tRiS1LdWf2BSRL+0Q1rl2sXgPpFYPcSqiDK+OO6kWwzirlZv5bgVUXaS6VDB
/mKwcxmtiRVXxKnI5EAWp2JYPrf23l9TEZP3Pb1yN6MYNJ3Umk1sFTG7vWZ2
j1gJfD0nezHXXhHjhexNP0mXQISriCC/syLaemYWWCmWwKjH0tEWN0Vc0Hxo
dVqnBDL9Gz4d9VfEnOS9m1mPlgAp2qXPPEERd2dv+rUcXgJrr55N2DQpYuCs
/M/ohRLIe5N6p6pVEXf+G5+nMZXC6eoYDfkORTzvc7qxn70UGO+vuvf3KOJe
if8KSaKlcKnNeM5hRBE7a/abUDVKYXh4fOk8qxImbbO5PW5TCi3C6jxeukr4
pN3x7UxlKdAuXBh9uEsJPXmZ3Y/VlkLe+7z31cRbzOLJkBfPGkrhrr92sOBe
JXT1cBg36iwFk6GtK8+OKaEs1XDXrvFSqGfoTf10UUKji+f+jYqUwTsbi/Yj
KUroL3lc392mDDa/TMz3SVfCXkp1D7NDGdDFeu6l0JWwL2uK6c65MgiuP20y
ka2EE+2z8/c8y0B/s927sFIlHFdKvLM/uAwqOS6UVrQqIVedRUzw4zJ4mXfj
oTqrMrZpNh9RHSoDdhMzyQR2ZZwTaXlEGyuDo6OU+8zcykg1XPIy/lUGwwpN
8Z2CynhJnP/2ofkyELlPig6UIZ4X6kpdZGOAS1DOzQ5dZdyia2YwrsCAErlr
HLBbGXuuVpaEURjAXHE09Ckqo1F8RpG0GgMS/s0HBexTxs37TE21NjHg7QW9
a1QzZTy+uHfPKjBAyrLTy99dGa+H3VzZcpIBjn+y5oYuKSO7TU32qTMMyI++
eumojzKe8O2Z97NhwL4mOQ/lAGV8y7DwSHNkwCV9F9fW20R9xpPkOE8GNKgz
nVV8ooz43DZC5hYDxOvbftzNVkZxy9S+5tsMsHV6ZLOQq4zhoZ1DPncZ8Dfd
yKq5SBkP7xSnFsUwQIEUd8K3Whkz1wskfEpmwFVm1SONfcroqhxc8foFA4b2
8HQp/1DGEQ0q6+8CBhy5OWF9fUAZE+89tJYqZoCiwPOLW8eV0Ub1ktMZBgMa
pTffS/unjE1l+0fuVjFgq40YaWlJGekKL+TC3zIgLXM+xWxNGdcoJoEB7xjg
pcrI42anoJ+/xOtjHxggs53WfFmEgrs2xzo8bWXAzauy5i3iFOQXExZ0a2PA
TAXTVxVJCqqLCsyodTDgveHbya9yFNwWPWkf85kB7sf38x3QoODE5kY9oa8M
qHY7ZrL+AAX55r3e1I8yQL1Ap8PHhIJKfwYHFMYZEP9H9HTbYQqGDE/be08Q
eft/dgkzp2DEJrEAjikGiIafvj19loKXs8rNemYZENC0W8TEiYKfY5WiVucY
MCIo+/DxeQpa84zrSs8z4HXCj+xTHhRMYJHpM/hH5PvIsf5dAAWtuGZz9ywz
oHVk3zG5GxQMOjaRsHmFATvUVXquhFDQLOoVi8wqAwQKx0c1Iyiod6HTvm+N
AVfmGz3C71FwVn+DbSFTOQzo5i0MRFNQy9tw5AZzOZRVunM9uE9BlcId6fys
5SC/7ljUXBIFm4bku+oJR+zTkTicRsHT1cL0wHXlYNv8h7ruCQWX9M3YutnK
gbv3yn63Igoev8+zdTdnOWz1ecp3r5SCHJNu5q8J2wp3tT0vpyDn3iuz27iI
9fZvOTNdScG8OaUcaW6inv6z8sI1FHznL9EYSljgWvTwpvcUDHQ+5TFO2LF4
yuNyEwU/WoWY0nnKIfqIzLa4VgpKXWuJ/0f49bjJcnE7sT+KutM+3nIYCb1a
1dlJwZvTre8jCYvKZ4f+7aagMf4p7yAMr7uMyX0UHNBr0xfhK4fzlhxCut8p
ODmaYWtCOH52S+eJfgo2/sqUCCRcddf+4ZUhCt6pFbmQR3hCJcbm4SgFH2Vu
svpMmPyuSunVBJGnh/7UImEDm99jvVMUFG8PlZfgLwe3JZkXKzMU3CttuKhN
+EH8QS+ZeQpSjtX4GhJ+p+2/AxaI/lM+mHac8O/G7DXrZWL/syqXThOWdu6u
CVyjYOzLx7PWhPezcoans1DRSEFI0YrwpZSth6vZqNh4sYzdgnCKroNoPycV
rYImk40I13fEdLPyUtGwh2ViO+H5i9UpigLE82EmsxsIb+CZPmsoTEVJHbkS
NsImj2VVHMWoKC/6aesAsR9fvUO/QslUDP/91uc1YXqvf+ETKSo+I++7GkW4
xeeZb50MFX3syw1sCC8K9+we3UDFi1pX21UIK+dxsnIrUTHh5Ij6L+L8jx7Y
VqdKpaIv2B3LJew/4HDHWI2KXKVGe50It0u+Jd3RpuJGsfmMBiLf1eLp3tzN
RL0LQYLehFWPymU0b6MixUncXIpwYNh/6oI0KmbH/fI0J/olRz5nWkuPilpl
3IcniH77/Lqn5OgeKm6T6+L9j7DG3Da9GCMq9r/W33aP6M+T9xzZiw5ScdSy
KkuQcIhqXEPHESrarBay3eEoh16bGTNxCypWj9fe9mYvB85lOaltJ6lYQmtn
9BP9r5Nw+LvFGSo65aj1GRMOb8o5f/8sFT2VnvDxEfelxPmLZrkjFTmDK2Ud
ifv0g5X7T885Kv5MFtYuZymH7Tucrkm7U/Gl7alTx4n7OPh4Q2yqP5Hv5ENR
I+I+TwT/WGANpCKLm0PZOeK+z9ilWzsHEevXNEUFEfOASXaDmnY4FfWWHWYe
LTJAMkGuujqBikLr/N49IubJBq/vFMpDKko4zrgn/GEA9XjandspVOR5zuka
RMyfLQJyJ0wfUdHcnmJlNEPM5zDZ34MFVJQ6vvtu7CQDLBy+mRmVUDHvbqbw
CWK+WRmkvsxjUNFNi4WZTMw/lzWZMJ9Koh9O/qaGjDAg1EdGhquZqJezhWV9
PwNeOa03UR+l4ul1jxsNifn61rAvP3KCih7N8dcLPjGgXiGZ9GeKinYVGp0S
xDz+/E26//U8FfNNRly6iPk9YyF95fA6FbTor88Sqyfq3y+V5Smrgn4WPx1i
XjIgliqxjmGmguWRCtxFDxhw2kr5Sb+lClJG6KbpicTvS6yOEf9pFfRPbTgc
Hs+AorWDkWftVJBu7Hr2cDQDOjpvSPNfVMEZcv3hx8Tvn0jIxOazN1Ww3+LL
q1s+DIj+8caB76UKet0eX9xxhAEnSU2c2ytU0L43YzDzIAPkD/Y8s6si1m9q
7uU0ZkBB2dx06XsV1OcWWq41ZEDbPZUAuw4VDHsre1h0JwOEaDHxpZMqyB88
2PxHkQGRDxzf28qpYmTzgNfInzLw8b5xyV9BFc/viWMZmSkDq2MpsgnKqihh
JyY9MFUG6tydPo3qqhjV5sLUNloGH/wMqdt0VbG57U1PcF8ZsJxQvMV7TBUP
58tvP1BTBl6kn0alQaqYsmCXan2vDE7GnmnmHVZFyqpz0UnpMpAu5JZyGVNF
2/j7R5FcBt8+ljp9mFRFa97cbHnRMrAXEGYOnVPFQC3hlD6eMnALr9VZY1ZD
Dc4PI+pLpXAjUPP+tLQaxm46xbq5uxSeujLbdx5Twyyu2+1L0aXwb8+jhdQK
Ndxfq3pFbbUE+gf1favD1LF6ttrJraUYMnZrSzXZbsS7hWmqoq5FkBviJeS0
UQN73jp43xAshDCzs8asfzSw4WDI0dWifNjSm/40rEkTneeCfojuegGJKg9z
m4y1UOAMRfZGTS5cq7yTaMzQwgrL+6mJv7LhoJTZo3pFbXy2sWWFe28W6Lm9
PyV0Sxsdx+5yG04+glRpO8XGP9p42/q7/Gx4Jii+fRJ/6NQmTMmr9x7xS4fI
jdWqbRWbMDuv3LZgcyo4zq77+EFVB2viVW4FXn0Idvkzcrfu6SB5R1jjxWOJ
UFfPGfRqWQdnR3NHJ3TjwNXgR+QHwoZeVIMYwoKvGCmdhG97dyTrErbMPV/+
m/DFtkrz0O1xMHyvcVpxRQevF4x1ym6LA3azSJs7hK9tvC54fHMcGHwj0axW
dXC1+6lzuUYcDFn8NnYhHDl1aMSGcHhr3QlfwlFblM5xEG6r8vOKJgxGDm6m
G+PAjv4lp5awzQmdsF9qcRB4LlVKc00HVSlsM/IqcaD400dlF+Fe2qvgD9Q4
qDt5ZNsBwjvt6WR3woImzMfPEpZp4djzmhIHqRpnwxMI541IPrVQjgP9JzsT
6YQDtE4arioR9cmKPs4nHHS5/iedsIbQu6oGwi4juzfMKBL13Upu6SL8T0Sv
OpGwN4t33yBhFh0veyAsefXQ+AxhU4MejiGFOKiYVV5YI9yi754TQfh/xb+4
Gw==
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->{{0, 20}, {0., 0.1017818422176176}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.419291873232169*^9, 3.419292140640239*^9, 
  3.419292244545444*^9, 3.4192923073652983`*^9, 3.419292995377808*^9, 
  3.419297121999257*^9, 3.4199906693672943`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"4", " ", 
    RowBox[{"(", 
     RowBox[{
      FractionBox["1", 
       SuperscriptBox["r", "12"]], "-", 
      FractionBox["1", 
       SuperscriptBox["r", "6"]]}], ")"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"r", ",", "0.001", ",", "3"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{3.419296962686017*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJwV13c8ld8fAHCrVJRRRqVCISIqK+RzRPJtyCpCSGapVDLLTlHZRCE7Kisz
yrFnKURIua51rbvs/bu/f+7zer8+5/l8znOez7nn9YhY3zWwZWFiYuJl/Pz/
Kq/Hy005MADy4TseRrF3I1cHnpUW2QE4K1ziRPfpQvu/3DFVcR4AiXuuCY/8
OxHJuGmrhs8AfHkRu1NiZycqmBH5fDaUEbfvoT/O7EBaR7oELn8cAE41pd6J
X+3o1mvVrrukAbifLKJG0/2J5BVjAl0XBsDc3Db7yugPtOGwEK/OSoBrw4si
B0/8QM1s+v+d4SUAwTr6vVHvd2SuxpZlIEeA6GLinuOXW5HGtoKNLiUCENvH
Bzy/tiDxnmvGV4EAo5X6MrqSLYjyoHSzlS4BXMpEj6pwNCP/DzdtbzsRoIBk
db99rgHZewh8pT4ggPnOXe93ujegC2frdrl4EWDZ7TpBZa0e8Q3tq/MMIYC+
20IkhaseZe1pF32WRYDPPZeuc12uRS9Jjz058gnA/ExYL2qqBt0vkeoILSWA
zyXxdNegGqRqEOgX00CA3qHUAuHqatQWrERIHSaAnoJFp5deFSo0HlYSnyLA
7ebJ7UN0jOLEIsKyZwigfLtitkgHI+vqCfV8lkFg2jIy9nHjK5pbTEz8KjwI
s47zfg/iKlBfw7k5dHgQXs5qe+1ir0CV0QsX6mQHIUKSZDblXo6eyemvtqgP
wvO83Toztp+RkAObWY/5ICQZnCFfvVGKmBULPpnZDELhrtyU9+MlaJTVYtvA
rUEYprRrp90vQXlvSz+PeA7Cgpid5MUXxej075uCM3GDcMlt2fBffyHSfmif
L5gyCGc99vVo3ilE53ba6KhnD0KFRYOROksh0r90zT348yBMfnEMyj/2CVk1
Xuo50Mdw/PPVro/5yMb2gvMZ4iBAYpa8tH4+cmD9b8utiUFQtzuVeoqSh+7C
aeWS5UEozzL20onJRd6l8nEX9hKB90q1bTLXR+R/+Zjc/YNE0KrPCNZ1+4CC
ZmSaXh0hwlKbX+194nv0UlZikahKhDKjwMbGmmyU8G63iYc5EZ7uLCy/mf0O
JZ/hpybZECGYbUPghdQ7lD7E+6zOiQhh4cJDT3Iz0ccDnGVcj4mg02oFXysz
UMWrdYHMRCKY/SkdcVpPQ5UKK3mtGUSYFOhS8Y1OQzWdC2dpOURQL6ucm5RO
Qy1cNDe1SiIcsfDmjrZJRX1Ph353/CPC1FfV5NzpZPRPjHB3cZQI2j/ztLbF
JCNibT/7fgoRTJxFOa6oJ6NxRnc7bhBBKeZA+QGZt2jRrenVxoEh+JLTPvup
LAGt8tXLih0egpBR/lHmQwmIqai68ZzcEORXlHUERb5B7NTyhRg0BCV098Nj
7q8Rv0OOsfT1IfhOeMXL4RiH5E0iBa6mDoFY+64bIU3RKGu33t7Z7CFQ2a+q
eMwuGu39s/1AWMEQtDyLJzVuikYsFsHi9VWM+Eydw5tzUaj9hq/CsYEhSH+Z
zF8/HoG0xNRPfhsdgoCXD5w6YyJQ2eiKmj15CK7VvrcL1IxAyY5uWolrjHrP
5FM/pIWjO3fvGG4VGoaOfcpeulOhiCgnbZx+cBgalfZm15iHosv0cVM4MgzN
1jV8Kz9eIrWHttYPVYbhqDFLkXflC8ThZX5v0GQY5tq7v14oD0FZQefCPscM
w8vM91ZdIk+RkM6WKKPEYcg8P73XsiwIhW1tiKWkD4PMswnnUb0g5PpCI0ms
aBjcRV/urn/6BJ2JVM6J6BgGMWpBSz5HICoznM+X7hsGW8d3+3YVBCBpvqKi
xsFh2HG9b+CwSQDaFSf7ZY06DE5bj5ppffBHxETxVkeuERiyvPXL3MYPXbEc
bmMTGIEGo1naDX4/1CKc2vF2/wiQdG1M+5t9UUHavr4umRFAAvcE2RR8kW/2
rnGNCyOwIyduuVfRG+0rZmHfEzwCd4I8q7dre6LwTrOvoeEjQJcwO3P5lwdi
oxc9YI0bgU1rdn2pNh5o4qg9YSpzBDwKjp2QfO6OSrJaP+O6ETj3yEG/n+yK
JBsPOct/GwGH0zzJF164ooSRx+LZnYz82rS/HkdcUYCoXFQkcQSYxF4vjt95
iPQSop1smUYhV/qLj8ZWF1RbPi3axz4KTtMGpLLCB0ixV7tXl2sU2gN42fIs
H6B9/EtnlPePgsAXMvdKxX00EXbtAIfaKIQeP2to9OQeCggQ78h3GwVy5RKB
48MdNJ/i80zMZxQeCStFVEjeQTeretRfB42C3kurlbT3t5HeWsiHgJhRaBaz
r5/75ISE3CiBVwpHwYKokfm0/yYKi9FRbS0fhRfSaeKjt24ilqIUGtSMwlZz
6WnZNUc0TjW0kGwfhahH1zdZizmikptlSqvkUXj/dK7K4Lk9kgzmITvPM+a/
czlaSNKe8f9wM31kbRTyVepNw5rsUMCwEM8PzjF42K3hrc9ph/Qs/CZSpMZg
ULTT6lGmDRrXP5d41m4MaiT7mh4fsEaP0EyUxR1G/BiPo2bbdbRDNiHkoesY
fDgSoObrfR0d5yS7pQWNAfH3Xm7NISvk2RBhsJE5Bo8mruWae1oizmKV//jz
xuBgii+xb9oCJaUNgUzpGGRG8s/037BAtb4KMmaNY/AqquSymvE1xKnay146
NgY6OmuHDpqaoSRJ//XvlDF4uar+yINgiuQEj8wNL4zBDWTIveRgiozmHhF5
t5DA/95K0znfqygxT/jrncMkAI3ZDwcbjdHRQw73xR1JwCu8Wy41xwhV8fI4
nrpHgsXYTNp+AyNkwFxuaeRBAjnL1B6FRUPk+o/jon8wCUQbbPbv+s8Q4bg8
iX/ZJGh+b1vbtKqPDJ6a7J8rIEES2bDvfI4+Gn7IzMdZTgLjZ7zNcpb6aIuh
IYtKCwm2uUk839yoh/S2L/THTJDATuDPrOOFS4i48rbzI50EqyE1AcdrdJHL
hE5L7TIJCF9YrC1UdFF84+tS2rZxKBL4Jlx07CIi+qlHXjwyDsMGz6pkVc+j
B/NPzm5yGofTe70ZG/osct1CzY54MA48Uzxf1nXPIvc9ppz7vcYhnmutu5qs
jR6pH21XDBmHquXfQ33HtVFgULepQ9Y4yO6hQeY3LRQUh77O5o3DM++e/reu
WujZ+/cH/ErHQYFbs3xeRAu9aPMejm8YB5k9pvoZjzRRNL/EndbhcTi8xC5x
S+M0ij0c8dN4ahyyW4LOFM5poDiVlePDM+NwqITdROaDBkqw+LGwyjIBWk+S
76Tt1kDpmW5+R0UmQHUGFXGzIVSk2BQdcW0CXFi3GS7zqaESneML+2wnwK7I
7t+DZFVUZppw9b3TBMRZzl+sk1ZFX7yd99d6TYBZd3hC6zkVVNcgmDUbPwGJ
/7wt3r1RRg09/tv8UiZAcR8pYJu8MmqamHLanj0ByHvoHEebEvq2o/qYeNkE
qGV3XW3drIR+XXGsMO6egKMBrYORIQqo26Fz3/DfCRBNCP0gK6uAejxP+TqP
TIDlBZKgcpc86k/iORM8y8g36vrTRUweDY9+bivnnYQi/cgU5u7jaNZ1G3Hf
pUkw2nY9tvO+HOK7Whd4wXgSPDVnj5eLySFFVW8JL8tJaNzv3tRdKIvcN2hO
PXcngSdX49jRF0fR6tPehchwxv2lru8Xr0qjfTejXlfHTcKbt8md6p1HkPqF
i6eoyZMwwbLkWq97BPlyV/tfLJiE2+7o0u0LUogtPmv7lo5JiPN9Wyx8/TAS
87LOV+ybhC77/AHrSQmkfU3I0JY4CRf/+yyY4CaBnomEx9XQJ6FFLpypI0Yc
cb53O/h45xSMtSe22ZMOoV0V2ifpRlPAEhDCET4gghQSmfqFr00B159P8fFP
RNAVn3LvS7ZT0KwRL3JQRgTFaR6t+/hwCu4itvcJvsJI6BvfJfvYKfC9yc20
4rwfncr9QYtJmgKNipWhws59yCI8OLoucwqiNyTucp7ch5KN1npFSqcgKNxQ
xplDCB36O2zT/3sKBs9Kvuv+vhudwUnsHIQp+G/FstpSazeySzF5f5I0BTMT
1jnyXwVRlu03SuziFMgS9954UyyApMmFnvq7p+Fg7hYF4yo+JL/hH95gOg1R
JVfeERR4kZF6z0ib9TRsqJXH9rXxoIePZVR/35yGP07jZk8deVDJyu+RMc9p
iLxx483fNG6kvCituvXNNOgWfrruZ7wDmSj5h/OkTYPVhp/r4bTtyMP198ju
D9MQd+H0t1YaJyqf9QuXqpiGXcthL7pfcaBTtO6R838Y+QyZsj9t2oos5KRV
jYamwVs/4TXVfgvyvusXbj45DcLLzO5t39hR1fQR1dsr0yA9FnoRkjaj0xO+
4aF7yVCVsN3ulwUb0h6SUm03I8PmZLGtF3WZkJ2ob3jvDTI4qTV8rfmwAU+v
d40M3iLDYpSV5UrlOjQN+ITTvcjQX1jba0pbhXP9v0Z2JpDBXbk6hS9wCW7u
lVIVSifDrH/xlo2CRXhu6hN+6CMZkv9UlHsNLcC3HklVhS9kOBxFNZjTm4dL
Xd7hV/rJYPTnyw1roxlw3vVrxGKYDEhV/8m1RDqEG0qq2k+R4Zn5u1ve4zTo
aO8ccVslQ4JHQdd6CBWM2g6rxgtR4Gd4Nk1raBJMGjtG/phTIF+JTMwJIgJJ
cjzzqg0FTPZ6DODAQfB4sWH/+xYFmHLfdvM8JcBrfemJDk8KVFXfG7wl9xf+
/HlCbo6jAHr4fOl1Vxc4qSfknU2mgN6FhCAT3l+wmvzJuf4do96eX72pVzpA
yG6AXlXCGG/Te6B34jtYUJUXSn8x8gf/9zedpxrIBpfKFPoZcSMDz/qVCvAu
tvUoHGLEmSiauyjF8NYzciWXTgHfwr0dcv+lgzPL/IbBFipUnd35dsI7C396
cYntnDiV8XyfB+6ca8HLX/uGt0gx3PmyvjzxGz5Nsa1vlKGCb3Ppw/ujbbhT
/1HQGQUqoJA+SeuP7XiWP3uLhhYVsm52k2OIXVhNR3584ywVCFKe27cNd+NA
D9xceZ4KzypKiK2E35ivvytEzZAK+cpxHj7ferFiCst2ZWsqCMsrZzy98xd7
d7ycnrelQk/oXNKFC/9wA+vutmJHxny3ltqNig1gYzvZsBP3qMDZuin/lh0B
ux8x55H1pYIeb15+ztwg/lxczCeeRIVD9QJm3yuGMfcPB37FVCq4nxD8Eb1z
BDuQ9gpoZzLqRZgO33EcwYJ7/QXtcqmwWuCOPblGsauv7t7MSioka2kvNZ0Z
w23xzEIlNVRIODa9bz10DIsXFgk1NDDyzTyw8O8ew10je/aPtlHBpGIBRVuR
sPz5MWHxASp87JUcfXN9HL+weS2iOMTId4t5x9akcTz8+KKo9hgVHhXx5C73
jOOo/MKDdhQqmDe7Cwaem8B0Pl/xzA0qcC8fiPotNInPyZ6QKGGlgUv8qSM8
upM4RWdUooGdBjpmBobrjyexntcFyVEuGrToG8ps7ZvEeQRBaXFhGhClRfUf
Bkzhzcut0oqHaDBcwaZLeD+FLXb6yGgfpoHwvh9Oh9un8A7tkaN2cjTwtI42
vbFnGttZxsm6ytNgPUvlreWpafzV/bxckDINnJlKaectp7HTh4JjmYgG3yKi
CJuTp3Fdnc3xEi0aGK26Wf2rnMZC/wRONOjQIKGtqbi0fxq3cnvLj+rR4Kii
wLgvHxlLuZ5TEr9Og/CT1K2DXmTsH7ampGhLg5uPg7VVo8i4LytfWduRBqvD
r6tKs8k4+A+/it09GuzqdHcT/0XGhNlmFdeHNLgSZbNLmETGyjseqwZ50IA6
7JV3boWMSWhILdOPMb//jFk0DlAwMo09VfKEBnXq1lk75Sj41YP/1BuCafDs
VLSkGKJg7cw8GI2gwYuY25t4LSg4CVuj+RgaBFpaDs3couD5Hj6Nza9pQF59
kCbiQcEZHI9Oi6fSQDl/Vet2BAUXlXAtUTNo8PP0c/+eNxRcdz0tryKbBuJf
fxsWZFDwL04lu6AcGmyjBuxfzqXg4dIWIf0CGpSJXIXiUgqetbbo3FtMgyQv
h20jmIJZd9CDR8tokLwm1fq8kYJFbXYveFXR4Av/vWNnuyj4OFdOjnYdY32H
NmtZ/aFgjXJkw9NEg3lqvvgSgYL1bH/t6W+lQbp35crOUQq24nZoz/xBg7jS
hL+fJijYuWLl6b1ORn7fmX+/yRTsaxemrvabBr/6qrc9oVNwOM/Buc1/GP30
x8PmyxwFv/1S8qH9Hw3oakIkn0UKzrU/Z51ApEFWgGFI+zIFV/L+E7QfZYyv
DVUuXKXgtq/3fhyboAH/+t5e8XUK/uewKWh1mgY7hE6fP7pBweSd8WqNNBq0
hZjatzK8Vik9EzFHAyHXifUNhjlvVmWbL9HgdUZF/3eGhfiMrCTWGP24Olun
yLB01Rg/nYkOginHH6ox8qve8vr+hY0OpJrEdAKj/jl+rsCnW+jAzcvGJrZC
wabVqSoGnHTY3UM+xbFEwTedFGlC3HSo/fp5Pnqegj0FWt6N7aRDtmr2t9oZ
Cg6puWbxSYAO70qZTOKpFBx/m7br8V46cOgJHhGYpuAswSetZw/QYe7y/Q71
cQouqxX05z1IB373n794Rii46c5H5b/idJhN0imMYLyPnt2I8k6KDtNeV8cx
432R6joz7h+lw55v61OJ3RS8cNfe/NRxOvynV39Upp2C+RtCmztO0mG868Qu
23oKFr8n6pt4ig7uBzy9uRn9oSBUouigwXh+Ua2i+2UUbHT/b9qaDh2W+x/8
tnpPwVH7pb0Pm9CB5bCW2pbnFJzajOVnzOjgfei5Xag/BX9yMZz8akmH8qnU
Z12Mfu5o8TQxtKfDBfGxex/sKZjbrfm4tysddkSY8MYy9sfLH3ZjndF0cNJT
ijRl7LeP1qKVlDg6OHtsFXz4h4y/zf2N5mCco+oONlVX28h4m9Dl05oZjPU5
k6AcVEjGQQ6aiZ+K6WC6RW7pOWO/ezMLG0Z0M9azluXMKVYydj7RW6krOAPy
ac/1qQtTOKwhOuam0AzsdLzj/d/oFM69qucUJDwDUr3pzSG/pvCUT+PuysMz
cP78rudN+VPY8Vuxi8zJGXitKVuv6TCFrW0jpThNZ0DPtPdkU+ckNnp1Prb5
zQyY655fWkmewNs33sTNJc7CxkW3z5F9I9im48l6WcosXFpWoRg3j+DyjLs2
jzJmQUviT+KhMsZ5cUFTjjVnFjR5lWt+xYzguviJRu4vs9DArhwdqT+CPeVP
LhzpmwUnBwXN2JZhTHLsvmzNPwfufl4birVDuOYX984foXNgRBJj92sfxIfD
ReOHIucgcCA127R6EIeelz+wGDsH86cLA1HBIDarMT4i8nYORJ/HzchFDOLZ
vCTNB3lz8NK9hitDfxBLPJd2Efg5B1PjmZf7fxHwCw2dLkueedit+vPo7uYB
fCXX5xU1ah4CvWIeiuj3Y5eVe5341Tz45a2rZSv340gdG66wN/NQo0j3PyPc
j38QdZ7KpM3DuEGuTQXlD9YR4HW7+WkeDnMNO78J+4NVfNOvDP+ch5Ft74gH
O/vwfoNmvp7tCxBkJg4cjr14ZI43Gj9dgOErZiYZ3xnnPc0g2+v5AigZnTQ0
Ke/GotORlUphC1AQ8/KE0LtubDHMO54XuwBqgiMPun27cXcHr3pyxgIkMzcl
7lToxg15vCTf2gW4JTtPzEjuwpmOvGqnNxaAzynU6lfAL2z3l2e4znUR6tJ6
7HLcOvCuao/dHZ6LkDgs8XbCrgNXpw/qDngvQiwKkFC+0oGFnAo+LwUtwj4n
tylWhQ7csawXdvTVIkj+fZ1hPtOO1QXDVeJKF+EGrWhg04N2zG+4I+LW4iLE
bz91r/3xT9zQtE2d13MJvNQ3uF0efcfS6oaSfY+X4MQe+pG5G99xROGbXal+
S9BmMpby4vx3bJ4kPXkseAkuW+heWN/zHdMf6Mbpxy2BG1OW+UT5N7zvQCQ9
vGQJFuYufuhcb8UuD3e/45pZguVjR+WsYltw38T1yN/zS5ARwdL9xLcFg9X7
x2+Xl+BMpLQVvtmCt51XNZJlWYb5wMru29CCk4WvMV/iWQapIpJWyXgzbm1N
NguVXQaJfBfBEY1mLCp6mHu70zIc3f7O9BRTE37lE7dX3HkZ/NokW/dMNmLO
v1skwGUZuG8/W+HsbsTzr8ZP3Xu0DDy89tqyHxtxy/YPt7peLIPLMbYTjlcb
8b0lmcbEnGXo01Hfl1zagKt+nvA+SmHEt59Zf+5fjxWOpgefnVmG+pt7Anvv
1uP3z3fFWC0sQ3bMA62T1+pxtPbch8iNZfiodkhSVrke238p6Z3nWoEMpqaH
dHId3pF1UgHLrcB397WZBss6fM0Hpi7dXwFNBTsOKd1abPB87edl1xVIPbg2
RDpVi7VfVRSbea7AwLsJyVKZWiyXp+Rj778Co5SBSr/ttZhlQJbXJ3IFDh+/
ZPL9ew3OUhdWzv3EyGe11CWnX4Nn15gCOWdWIE5QIqzKuhqHPKrZ2/xgFZho
XUEEM4wV91wvCXZbhQunLFbGNTEeKt3QO+fF+C5xL1bbIo2x2oxaUKv/Kjx6
veW3/2olpjiWUr9HrEIY3tC+k1SJjYw/1nfkrQIOyVDePvoV7z8ee7d/chUK
rr81IQV8wZ/GHGspN9ZAQjc5V2H+M75zW86b2WEN0pXNizQGP2OpmXnlnU5r
sHJAd+v1b59x6npArqLLGvg0OBj0pn7GUXxJ8Y8DGePpBzVy9T5jF82OuxwZ
axAVsa2jJ68MK75VEZIYXQOR7Ry0XK9S/PkKx0MLh3Wg6n2JCTtTjI/e+TQi
5bQO6taH2NYUinHqk6tXFu6uw/1Ld5+4iRfjkKJ3SuFu62BnOR0WxV6MTXm1
lquD1uF7Oe2eXUsRXv7+yEcsYx2SeptXnQyKsMoZcvDU4DocJ0xIfbxViL+c
aE/yNNuAFwUt98OqCnD+Uj3phOUGyEnsfHq4qACn4/Lj09YbwAl/IlvfFeDn
59MbLG9ugMhtsduyYQXY9IYbWcuD4Q4x+dsWBXgpcp8616sNcJffa/N5PR8r
0h3/pnVsgInchXoT7XxsYsIcOnqICSleWVwmDuRg0zyu2klxJvS3mCTzqzkH
m23ev0g9zIT8gw4c7inMwRZFKtYr0kzo/uEiKcFnOdiW20WRW4EJKbD8dnU9
loPvN43+O3mGCTXKnO5LePoRv1T+JvvSlglJPbCb2a3xAdcIvmo/kcmE9iwW
XboykoWTy2Ku82cxIcFQskr2ryz82CSatpjNhNIEBXZsrcvCynERPJU5TKj9
2BmgpGbhPIEX+jrFTOjNnoFoo+tZOIHfr928jgkZK/Pd8SC8w667brU/ITKh
PzEKG4SxTCzFDe2/9zMjMxczfppgBuZO16cRhZnRwTDHbWzbMvCckg0PWZQZ
tXF4KB5cScdVlsH6bBLM6P4Z361Bf9Px5bzOdjlZZtSqRL7en5qOfXUdOoKB
GZlKGCrVyKbj7hcRnapWzOhD9JNQCYM07Ld1uOttCjMat7u56VBpCj49Oqr3
LI0ZRTR8vVL9IQWz1Y63Omcw6q0GiNonp+CgR5RqjWxmVNM0wPktOAW/oCzn
DOUzo+tXn9ktm6fg2C6eIIkqZnTOspR7iC0Ff0wBxbx/zIiuM59VZJqMu0++
ia3cy4Ja16iXCCeT8O9pLe/EfSxIUlfmja5EEu5JIds+OsCCLsvEibTsSsJ/
tp5WUDnIgjjhfDGJkogJvaTOYikWxCHl/qMmMxFPeCjy5JxkQf+CrbIG+RPx
2uf252+MWVCIM9Mbf6YEfEhli597FAuSN1hqOLEQj2WI9Ys+MSzo3bKsq/5o
PFYMCXB++ooFBU6XD3l1xWOdvnXL2DcsaNMBhbb5wnjs5DmnXpTGgl7zdxQE
3IvHReXEVUohC7pXOnWNSo7Dmqpf3e1/saCnFQGZ3+ivsLXafecrfKzIJrpn
8aZQLD4rI6ypKsCK6knZjsZcsVh6fxuf8G5W5PFGqvsCSyye35CsGBdiRQef
KQcZkGJwSO3gpseHWJHr5R8+TUUxuOCc/pu0E6zo3tW/3SaXYjDTVbkGqj4r
clTtUeoPicaJD8l7n4eyIhU/E7R1TxQOMc33jgtnRewuXGJ8O6KwK9wfzIhk
5F+yq5BkicJ6W+czq2JZkQwBCE4TkZglce3YfBIrSiewappWRGKHOk6d63ms
6FNw6JlWi0h8fOcRF6WfrMh42cug+0MEbsq3/zbEw4ZOF/pvF7sWjmedfr4Z
28mGxEVUNI0Nw7GI5Mlbk3xsqLrP+WL4f+HYM2XbtpndbOipcEUzv2I4lo7M
OcsiyobKm+xaXbjCccSDmRrh42woP/fGW0JQGDZV9Pl8zYANTR5Tt/W3CsVT
FbGZvyPZUFvE0Ka7yi/wjvXfaqIcmxCf3NmlqnfP8IHT/D3hLzeh7u9R7RvX
nuCjX+1kr7BvRjHHtUjsVf5Yccvt/BLvzchex7dKI8QXy1x2VlRlYkdDnwNN
7s4+wqK9T9z5PdjR3bSLN3nTPDC7ZRzmW2VHJWhPe9xTV1wm4uEgxrDK9oVc
xLDD8FUeBYZP59iGkoJccYvj3htGDPOcXdRXZviFS9LmKIYvrtEmfwe6Yt6Q
9Ivca+yo/JLcLQF/V7y/OP/PtnV21PXgbeyrR674h1tE4B6GNwiZmcCwr8p9
GSmGc4SgbMzLFQ/iEz7/Mbx9QISgxHB6S4noM4brP+Sd7vFwxZKEL46bNtjR
Ae0Rg91urrgvNZGXj+HOljmvaldXHGLrXXGIYeKb2ExHhqcmYLsWw5YswUzl
D11x7lxNvj/Dt9dkG01dXLFlWdrVSIY3M9essjDM7RXIksowiWv4xIcHrvge
k7ZRNcNbZXsyV+67YtFa8bWfDG+SfU9MY7jjCXsmgeHvuzmFLzAcoEPSpTKs
MrZmMXvPFctzNC9sMCwX5vM2geH/AWqPEps=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->{{0.001, 3}, {-0.9999999979806407, 22558.30401958544}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.4192918732921667`*^9, 3.419292140750457*^9, 
  3.419292244630897*^9, 3.4192923074802523`*^9, 3.4192929954393272`*^9, 
  3.419297122048688*^9, 3.4199906694180937`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"4", " ", 
    RowBox[{"(", 
     RowBox[{
      FractionBox["1", 
       SuperscriptBox["r", "12"]], "-", 
      FractionBox["1", 
       SuperscriptBox["r", "6"]]}], ")"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"r", ",", "0.001", ",", "3"}], "}"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "1.2"}], ",", "2.5"}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.41929696911734*^9, 3.419296977989046*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJwd13c8le/7APDjUFqyIsmnpLI+RMkIuZ4iaQktaZBkRENJRiFJoWwikT0+
ZZWRlEtERip7li3Eec459v4+v9/zz/16v+77dV33uO7X/Xq2mN8wukKn0WgH
OGi0/2v9B3f+tNnCANr/f1yEbq+sRu05BiyP3b7ymD6NsJTwCGy9zAA7zfJP
Ja+X4PGlxv5uWwZMh5iZzhUtQkWneyDblQEd70pbTVjzcLijoV/wJQOc1D7H
CXnNwNWNshpiiQwY98xdsZQ9DX4m7oHb3jAgtr3wg2vvFHxrkdFQ/sgA6RCm
0YTBJBxvdAs83cGAk+0fL5ufHIOb6xr6L/YxgNAwfHQhmg2BJ2Q0rEYY8OR8
iq3bEAvqauv7784z4KVzduOiLxNOfpfWiBQj4WdgGkun9y8Yf63rbz9PQpYq
oyfduwcGZYaSz1qQYLzRuRO9usH56ZJVsy0JtIxXTfyPu+CFodxwnQsJxZ/t
u20Vf0F7+yNGZQQJxB2/mReNjWCn9TLzYCwJBkdfehsLNMB87NubZSlUPtGG
1vjTdSBm2ckuzqPGW7Rubh2ugYtMtan8Biq+z6FfifyfgWF0/L1yB9V/0sil
bK4Q3HKvOL/rpfpppPY6MhdeuQTPZbBJ8Hi3sU7xUCLcpE8uGa1gQvFBwVfD
bqn49ulxrsOSTGp9BZ3XD1fh7Ke2vhWylOuflX2I/ob7yStlX+WZ4FGZf+fW
wHesN7znfUCZCYRvm4z5m1ocF05bsU+HCalXmxhhPY2oqbd7aOkgE7pkXXhW
9TWhlzNWFh1hwpPCvJ7qrmYU6mj01TzBhCy1CGf3b62oEkfnUTNngvhutaTH
13+hW92z0ckrTGjxn4g5evQ3lnNu+J5rQ813Zb7lwPZOPGOpEKBkz4Q11cuy
bC270Onf8/wKHkwwEMjMSp/oxoLcXCHJGCZsK1t/rqawD/l+WAurxDPBSUnk
R6hgP1oPblyvm0zlCzLpu27TjyIbPUUsM5gwn+2ELrwD6OihvzG5iAmxOroz
FQf+4PdIDrG8Eia83Dn6z6L/H5R8lyNWXk7FG7t90bPpDzb2i24a+M4E48Ip
ItRsEHcf+SMu2cmEN60yA1GXhvCpxYstKr1UPFuOtStjhrDv/jEJ3T9MuJfD
nzHbMoQhWe+2WpJMOF/pJOJ1eBjZQh6SyUtM4JvdHNIs9hcPKyhJ5XGywCFy
77/8+n8xTm9AqpybBXrnjE4s3v+LBq5HZQZ4WVBleEJ+ZdtfzOwSkZMUZ0GP
nIThnYcjuHy2Wk5lGwv6Crn0u/4bwYuC7vK60iwQ/+eHnXTtCK7V7d9hqcgC
F/NQk8uio2hpGqHguJsFi6nqr0z3juInpyOK3mosuEnLZx0xHUW719k7kwkW
fAsK6VoeO4pfvljsytNhwcn5u2a/i0ZR7Pd6pXI9Frz8XpGb3zGK1XxuuwcM
WLBDZf2QhxADZR0Pq0peYkHgHubKblcGegYsqKpcYcHV+z66GiEMbEvNUtO1
YcF834vi/DQG+rQLq1vas2BdvdNdyQYGdo1XqjveYcHpEIt14oMMVFt7X8Pb
mQXMPtfMw3MMHCR6NZMfUPM7dIa+bzOJhEn43rxHLPiiZZ4qqEji89uHtMp9
WPBkb6jMdoJE3eRMGAhiwdOwa8sELpIYg+bEZBgLvExNe8dsSZxsEdq3/AUL
GPO3E7Y4k5i0+t5+yXgWqGXN61wLIjEnj3eGmcSCn/v9PFuiSPxyKSGzMI0F
kp+aT2QnkdiwRtXSO50Fq5gPN81mkNiXXyVmmM2C91vOQm4+iePmF+s35rIg
xtV6VT+SyLmW7TPwngWxC7LVfl9JlLDYMOVazIKPwvY7DzaSuIs3PV33C7W/
vct1zNpJ3PeBsOCvYMEkM0typotEgysNoh3VLEh0K5oTHCDRjM+6NvkHCyLy
X/56O0zizcK5x/b1VHyPsd/NDBI9LAO0NJtZ0ND2edUjNomB/FsnlrdT9dTu
bPFxgsRXH/Ne1/5mAVtTbNB9msQMq8PmL3tYkPrwhG/tLIlFAr9FrAao8aX+
au/mSfz+yf7HzmEWCC9ubJVcJPG39TLv+VEWrBXbf2THEokMwUjNrywWfPc1
saqmvFAkNxY0wQIxx+HFJcprrhannZ9hwYukwo4aymJCJ82kFqh6nB//okJZ
rviPMJvGBpG4XXc0qfgatq41H7nYMFgSndhF5T8szOv1eAUb+AS4uLbPkWjy
OV7daA0bNrQw9q6eIfGqnQpLjI8NpZ8KJkMnSXRZX5XyR5ANaRpp30rHSPQt
uXDx7Xo2pOTTjCOZJEZeY627v5ENqw1E/l0/SmKqyKPqg5vZMHHqVp3WEInv
S0U8BbayQdjpZwN/P4kV19+o/ZJkw3iM3rsg6jxaNhBkiiwbRl3PDiF1XoNf
6pNu7WCD6LfFkegmEqduWJ3fu4sNhwzKdsjXkihc7l9Zt4cNQ41K666UkShp
L+ERvZcNTptd3Pio+lAWy1Ox3ketX0In59Z7Ek/e+pWwoMeG2Y7bzWb/kRiy
Sc5N2pgNdGkdzRV+JMZX4u6xc2xw2+Zn6e9J4luHE38/mbLhw0j8k0aqnuuq
XIxPWLHhqOQf+9dWJPLdrdzl5siGtUHGAuHU/Xj2w/JPfSgb7AxUg02o+/bG
XKKIjGDDTeeVInfaGfht4lfoauod1bK2KD77nYGrxE7t106i9ufASzXvdwz0
ttaOfpvLBpMVijN+1H134xA/EdRE7Wcp/cBeTgbeVGot0hcZg90JfobMqREM
KA8Nuyo2BoI2190ODYxgxlkDO2/xMZBtTaz0bRjBEfevG4qkx+DIkXV+FVkj
aPMt10F+zxi80FYo07YeQfMrwbJrTMbAwKR1T0X9Xzz5/Eh4ZdQYnNc/MjMX
O4w8S1ERE9HjsHTsbkFwWz9a1D1afB83Dsdn1ckzlf34IemGxb2kcdCRao/e
9p56L45qK3Kmj4O2gFpJQ1g/fokc/sr3cRzKudVCgw370WX3nql/28bBzlpZ
O7yqDwdtmk6ZC0+A0wPXJZXSXixp4BP84T8BJwe3cz+o7UbpQInI3uAJ8OqM
TzP53I3+R3Zvng6fgMn977yI7G48V3Lm3y2vJkDCL2JMMagbxzNjtG9nTsAz
pxLeJMNulPKTc1j/cwJGhpJPdTR04dN9eo2m/JOwQePnjg2VnXg6w/05M2QS
vFzD7mwx7ECHOft6fD4JDzIXNdPUOjBYz4I3IGoSSlTYngfEO/BHj95j+YRJ
GDLKsCgk21FvvcDdq28nQZq372ZUQDuqeySe7vs5Cf2rUnq21rfhJqNKoRae
KfA+JwmrbVqxf0IgFB9PQd/pc8ZJNdR7zzJKc/WbAtWTe04Yf2hCidHgItWA
KcgOe6YkltKEF/sEhjLDp0BTpP92k0cTNtUJaMUmTUEsR0W0oHITlmcKDHqU
ToGtwmRPUmwjJtsIaO5fmgIhO3+zhocNaPmLv++L4zR8SWixTL9bh+s+O2+o
c5mG6D6pV8OWdfg5sVu/020awomHUmqn61DMLrtgxnsa/rG7O8KpXId1swYB
O55Pg8yvF0nnx2pRSyRQPSJ/Gi6zcjqX3a5F4RNrg2ynpyGSZ6997f2fWF6x
SkvAZQZctZb4HO7VoJzWCZm2+zOgJMr+d+JyDQa9i1oX/2AGvhv/iXt6pAbP
x8j93ekzA6cu6h9dFK1B9m39CMOIGbhLSz0//OEb/rM5mB2YNwNTE8de1y9W
o8OdDSm8YzMwu3OHoll4FbYNXwpunpyBpCB60yOPKgSz/+6/mp2BA8FyZni1
Clcd0TipQJ+FSa+ipmtQhbHiFziO88+CbM6gTt5QJVZXx57zV5gFqSwHkf59
lSghIc3HYzcLO3hSTPbSKvC5e8RGyZuz8OC7TLXo36+45tcKKXCYBb5rT+bW
NH3FyedDe+3vzQK/gJWuwpuvWMXz2rbx6Sw47ORSsjn7Fe1n5L9Gp89Cm57W
P7H55Vj8U8ltB0n18xxY9PMsQ+UdiT4Hx2ah7KqoV+uNMvzPb12Y2dQspIXd
1tlzoQxDdSdeBy/NwhvNbTIKamVo9TGvdZJ3DpJoFXfYjC+4NnWPMirOQY3T
wli56Re84A4jx2/Ngbay5WpZ/VI08lv4ecpxDuK3LvQO7i1F3eeFuedc5qAz
ZVgmX74UFTNV3a0852CA7Cx6wFOK9E4FAffgOZDeddy4pqYEU7XE1TLeUvHM
ZhoVDUtwfIHmtWZsDiJEpAKKzT+j772SjZW354HGavTuOoeoInopz+fuPBzd
e3FuSBuxN3/J4LAr9V/ilKu5Qg5Rc0zTu9pzHu69WNHsOV+EpE0+syZoHgJw
Sfd6TBGePPOmrC5zHtA3SY1n4BNu2hV+o+PvPGRfemU8+PAjvv1jU0peXgAp
/dgM5ckCvH5N0Y3DegES1c7n7OsuQNmxSTVBuwWY26y/8tK3AoxffJih4rAA
7uXWRq3xBRgiFBN534saz966L8OgAB20626sTlqAkKBVdS2Z71HllbqY1MAC
bOFZzcpwzceC06vvXLReBKbBx7CAA7m44/rbflm7RdAy38a1oJyL8Y/Onp66
sQi3jt94dFcyF31zUlQD7y6CpeloQAh3LpoI6Mx+9l6Emg8se8uqHJytuee+
PWkRYlor5+2MclD9AMNnpHsRdnUNy76xfYcflWpjXM4twdPsqlsBxdmYNVM2
qGS6BIpSgo+lc7IxET/sGjVfgjXQHlydko1+RxLLTa8uwZZr268pBGSjyeW7
DB1nynXbd1+7mI0zwf9o8T5fAqfdGy0KFrNQhW3zK6FuCYwVj5YZ62ahsTGH
/8A2GqFyenq2pzMdTTJ5S/9K0ohfuYPyDZXpeG75pmmmNI3w9N4s3fIuHS/m
qJvPydGIW9I5siJP0vEKn4MKnzKNUKY3OzruTMdbFQO/9xygEV/l97e9fPwG
n6l9U3h2hUbI3rYc27DvNZaIPK9VSqYRotM5x0/3p2Ls+7BLwqk0QsSfoZ7W
kIr3jUNZ02k0IkFk/dqVX1JRLSKIvyidRtTuPABkfCpmrn9qqJdLI6JEO0NP
XkrFl8IPas9/oRFn1ISuO3eloOM629pHPTSiPUx5qetPMsryQW3zJg7inMM5
YZZIEvIlGrJ6xDmIrQE2q7hWJeGEqgU/Q4KD+L7aWWXrXCIWm/oYcklxELcO
eKz0/pWIpzLraxUVOIhqVcaljvhE9NC3rvMBDsJE6oRqiUIiNj0Nqtcw4yBe
hz7ylzJKwAcr+xpfxXEQQ5ZXl23Lj8P9AwMGTxI4iKDyT6c/v45DrtKh6ptJ
VL75hxJWsXHofY/8vC+Ngyip6FzzzScOn5Kz6b1ZHMSls08sZ8/HYXgjv7dU
MQdx2DSfr5crDt/EgUrmbw6CrTeZmmMSi017osKLNtKJ6gXm8a49Mdg8quMW
/Q+dkNGXj9KXisGWOMaVe5vpxCn5iC1V62KwfeV+ZfWtdGINHMkdJKOxq3Ww
PleWTqyWdfpRkhyNw84q/Ol76MRvH7PUbuFoXCio9Ys6Qyd8b9KiPGkvcZv6
igdOIXRit9FMudJUJMr3lE27h9GJlFkFR8OBSFTxfXjz8XM64TX6ode1MRL1
2hZNw6PoxLLNyt8n30WincuEVk4CnXghXJf90D4Scz70zJPv6IR9/sgFJiMC
tTU+OVk10InHhQ+Tv7Gfo7nmrZunhTgJi9CW6ati4XhQXlxbYz0nUTaYZnOG
NxzlNn0XEt/ASThHyTYdpYfj5JJM4ZAYJ7H1iZq30WAY+pZ2L7u/jZNwPPXD
vSInDLMPG0YlKHES9md/NRkfD0PaWcVypiEnYaPRotrhG4rRdxgb/fw5CfUH
xsRK0RD0NclyiwjkJLgdeLcLrQ1BR7jVnRRMxZ+xLJShh6DBysnk4nBOQr4L
uuyGg5EevbBzMoaTSOzi1DYpDEbrL2v0LmVyEm99/A9UXwzGXYL/Oqj+5CTO
zLoaNb0Owoosq2+9/FzE/neePNsvBOK43c+oP4JchOQWde0zJwJxi8we279C
XMTntpvHAg8FokvcqlVjG7iIx+KFlcIqgSgXnH6QLsFFfKiwrHbgDcSg22Ml
4ru4iKyMy6+6vAPQRMW94IIRF/F3p9YVTzN/HCkMT24O5iK+B/Uuu6H2FNcu
NmtKrF5GCCkenClOeYKb9wu3BD5bRjTVhNQuXXiEOz5ZKpzmXk6E7dIZ5C72
RJUV17Ly3JYTVnoexft8PVD+1E0VDRo30VvgZXxj/B5KtD5yEnbmJm4kHLsq
kOCM3KYRKDTPTeQRorURjx3x/RZn6+2U1XmmMgjK1n1n+ZUp70+/4j/o7YhV
Nhsvn6TMf3DaUI3yU4eY5SGUjy2w/jZ7OaKAb+IxvgVu4sNxRdv1no64KTer
fdUiN9F4+1X483uO+ONukJco5aWu5GSg7KF+S16WcroYvP/j6ojdqOR+iDJP
55YuVcqJVXkSTyiXvc7c3+LsiDJdH22WLXETm3X7jTbcdcS2+GgBIcr1VROu
nx0d0feKW+E2yj1R4ck2lEeGgUeHsindh/bhjiNmTJRkeVK+tqDw1cTBEU3f
J5wNpryco2SeTpnP1YseT3mQt0/p9W1HtKfpnvxMeaVCS/LcLUeUKJVc+El5
mcJ/PQmU6x5xJ3dRrtmwRvwo5Yd6g/pMyup/Fi6O2zvi7tWVU0uUFQPcX72k
/D/S/79+
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->{{0.001, 3}, {-1.2, 2.5}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], Automatic}]], "Output",
 CellChangeTimes->{3.419291873419533*^9, 3.419292140833323*^9, 
  3.419292244712969*^9, 3.419292307580284*^9, 3.419292995489644*^9, 
  3.4192971221695757`*^9, 3.4199906695397053`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{"%", ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "1.2"}], ",", "1"}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{3.419296984628289*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJwd13c8le/7APDjUFqyIsmnpLI+RMkIuZ4iaQktaZBkRENJRiFJoWwikT0+
ZZWRlEtERip7li3Eec459v4+v9/zz/16v+77dV33uO7X/Xq2mN8wukKn0WgH
OGi0/2v9B3f+tNnCANr/f1yEbq+sRu05BiyP3b7ymD6NsJTwCGy9zAA7zfJP
Ja+X4PGlxv5uWwZMh5iZzhUtQkWneyDblQEd70pbTVjzcLijoV/wJQOc1D7H
CXnNwNWNshpiiQwY98xdsZQ9DX4m7oHb3jAgtr3wg2vvFHxrkdFQ/sgA6RCm
0YTBJBxvdAs83cGAk+0fL5ufHIOb6xr6L/YxgNAwfHQhmg2BJ2Q0rEYY8OR8
iq3bEAvqauv7784z4KVzduOiLxNOfpfWiBQj4WdgGkun9y8Yf63rbz9PQpYq
oyfduwcGZYaSz1qQYLzRuRO9usH56ZJVsy0JtIxXTfyPu+CFodxwnQsJxZ/t
u20Vf0F7+yNGZQQJxB2/mReNjWCn9TLzYCwJBkdfehsLNMB87NubZSlUPtGG
1vjTdSBm2ckuzqPGW7Rubh2ugYtMtan8Biq+z6FfifyfgWF0/L1yB9V/0sil
bK4Q3HKvOL/rpfpppPY6MhdeuQTPZbBJ8Hi3sU7xUCLcpE8uGa1gQvFBwVfD
bqn49ulxrsOSTGp9BZ3XD1fh7Ke2vhWylOuflX2I/ob7yStlX+WZ4FGZf+fW
wHesN7znfUCZCYRvm4z5m1ocF05bsU+HCalXmxhhPY2oqbd7aOkgE7pkXXhW
9TWhlzNWFh1hwpPCvJ7qrmYU6mj01TzBhCy1CGf3b62oEkfnUTNngvhutaTH
13+hW92z0ckrTGjxn4g5evQ3lnNu+J5rQ813Zb7lwPZOPGOpEKBkz4Q11cuy
bC270Onf8/wKHkwwEMjMSp/oxoLcXCHJGCZsK1t/rqawD/l+WAurxDPBSUnk
R6hgP1oPblyvm0zlCzLpu27TjyIbPUUsM5gwn+2ELrwD6OihvzG5iAmxOroz
FQf+4PdIDrG8Eia83Dn6z6L/H5R8lyNWXk7FG7t90bPpDzb2i24a+M4E48Ip
ItRsEHcf+SMu2cmEN60yA1GXhvCpxYstKr1UPFuOtStjhrDv/jEJ3T9MuJfD
nzHbMoQhWe+2WpJMOF/pJOJ1eBjZQh6SyUtM4JvdHNIs9hcPKyhJ5XGywCFy
77/8+n8xTm9AqpybBXrnjE4s3v+LBq5HZQZ4WVBleEJ+ZdtfzOwSkZMUZ0GP
nIThnYcjuHy2Wk5lGwv6Crn0u/4bwYuC7vK60iwQ/+eHnXTtCK7V7d9hqcgC
F/NQk8uio2hpGqHguJsFi6nqr0z3juInpyOK3mosuEnLZx0xHUW719k7kwkW
fAsK6VoeO4pfvljsytNhwcn5u2a/i0ZR7Pd6pXI9Frz8XpGb3zGK1XxuuwcM
WLBDZf2QhxADZR0Pq0peYkHgHubKblcGegYsqKpcYcHV+z66GiEMbEvNUtO1
YcF834vi/DQG+rQLq1vas2BdvdNdyQYGdo1XqjveYcHpEIt14oMMVFt7X8Pb
mQXMPtfMw3MMHCR6NZMfUPM7dIa+bzOJhEn43rxHLPiiZZ4qqEji89uHtMp9
WPBkb6jMdoJE3eRMGAhiwdOwa8sELpIYg+bEZBgLvExNe8dsSZxsEdq3/AUL
GPO3E7Y4k5i0+t5+yXgWqGXN61wLIjEnj3eGmcSCn/v9PFuiSPxyKSGzMI0F
kp+aT2QnkdiwRtXSO50Fq5gPN81mkNiXXyVmmM2C91vOQm4+iePmF+s35rIg
xtV6VT+SyLmW7TPwngWxC7LVfl9JlLDYMOVazIKPwvY7DzaSuIs3PV33C7W/
vct1zNpJ3PeBsOCvYMEkM0typotEgysNoh3VLEh0K5oTHCDRjM+6NvkHCyLy
X/56O0zizcK5x/b1VHyPsd/NDBI9LAO0NJtZ0ND2edUjNomB/FsnlrdT9dTu
bPFxgsRXH/Ne1/5mAVtTbNB9msQMq8PmL3tYkPrwhG/tLIlFAr9FrAao8aX+
au/mSfz+yf7HzmEWCC9ubJVcJPG39TLv+VEWrBXbf2THEokMwUjNrywWfPc1
saqmvFAkNxY0wQIxx+HFJcprrhannZ9hwYukwo4aymJCJ82kFqh6nB//okJZ
rviPMJvGBpG4XXc0qfgatq41H7nYMFgSndhF5T8szOv1eAUb+AS4uLbPkWjy
OV7daA0bNrQw9q6eIfGqnQpLjI8NpZ8KJkMnSXRZX5XyR5ANaRpp30rHSPQt
uXDx7Xo2pOTTjCOZJEZeY627v5ENqw1E/l0/SmKqyKPqg5vZMHHqVp3WEInv
S0U8BbayQdjpZwN/P4kV19+o/ZJkw3iM3rsg6jxaNhBkiiwbRl3PDiF1XoNf
6pNu7WCD6LfFkegmEqduWJ3fu4sNhwzKdsjXkihc7l9Zt4cNQ41K666UkShp
L+ERvZcNTptd3Pio+lAWy1Ox3ketX0In59Z7Ek/e+pWwoMeG2Y7bzWb/kRiy
Sc5N2pgNdGkdzRV+JMZX4u6xc2xw2+Zn6e9J4luHE38/mbLhw0j8k0aqnuuq
XIxPWLHhqOQf+9dWJPLdrdzl5siGtUHGAuHU/Xj2w/JPfSgb7AxUg02o+/bG
XKKIjGDDTeeVInfaGfht4lfoauod1bK2KD77nYGrxE7t106i9ufASzXvdwz0
ttaOfpvLBpMVijN+1H134xA/EdRE7Wcp/cBeTgbeVGot0hcZg90JfobMqREM
KA8Nuyo2BoI2190ODYxgxlkDO2/xMZBtTaz0bRjBEfevG4qkx+DIkXV+FVkj
aPMt10F+zxi80FYo07YeQfMrwbJrTMbAwKR1T0X9Xzz5/Eh4ZdQYnNc/MjMX
O4w8S1ERE9HjsHTsbkFwWz9a1D1afB83Dsdn1ckzlf34IemGxb2kcdCRao/e
9p56L45qK3Kmj4O2gFpJQ1g/fokc/sr3cRzKudVCgw370WX3nql/28bBzlpZ
O7yqDwdtmk6ZC0+A0wPXJZXSXixp4BP84T8BJwe3cz+o7UbpQInI3uAJ8OqM
TzP53I3+R3Zvng6fgMn977yI7G48V3Lm3y2vJkDCL2JMMagbxzNjtG9nTsAz
pxLeJMNulPKTc1j/cwJGhpJPdTR04dN9eo2m/JOwQePnjg2VnXg6w/05M2QS
vFzD7mwx7ECHOft6fD4JDzIXNdPUOjBYz4I3IGoSSlTYngfEO/BHj95j+YRJ
GDLKsCgk21FvvcDdq28nQZq372ZUQDuqeySe7vs5Cf2rUnq21rfhJqNKoRae
KfA+JwmrbVqxf0IgFB9PQd/pc8ZJNdR7zzJKc/WbAtWTe04Yf2hCidHgItWA
KcgOe6YkltKEF/sEhjLDp0BTpP92k0cTNtUJaMUmTUEsR0W0oHITlmcKDHqU
ToGtwmRPUmwjJtsIaO5fmgIhO3+zhocNaPmLv++L4zR8SWixTL9bh+s+O2+o
c5mG6D6pV8OWdfg5sVu/020awomHUmqn61DMLrtgxnsa/rG7O8KpXId1swYB
O55Pg8yvF0nnx2pRSyRQPSJ/Gi6zcjqX3a5F4RNrg2ynpyGSZ6997f2fWF6x
SkvAZQZctZb4HO7VoJzWCZm2+zOgJMr+d+JyDQa9i1oX/2AGvhv/iXt6pAbP
x8j93ekzA6cu6h9dFK1B9m39CMOIGbhLSz0//OEb/rM5mB2YNwNTE8de1y9W
o8OdDSm8YzMwu3OHoll4FbYNXwpunpyBpCB60yOPKgSz/+6/mp2BA8FyZni1
Clcd0TipQJ+FSa+ipmtQhbHiFziO88+CbM6gTt5QJVZXx57zV5gFqSwHkf59
lSghIc3HYzcLO3hSTPbSKvC5e8RGyZuz8OC7TLXo36+45tcKKXCYBb5rT+bW
NH3FyedDe+3vzQK/gJWuwpuvWMXz2rbx6Sw47ORSsjn7Fe1n5L9Gp89Cm57W
P7H55Vj8U8ltB0n18xxY9PMsQ+UdiT4Hx2ah7KqoV+uNMvzPb12Y2dQspIXd
1tlzoQxDdSdeBy/NwhvNbTIKamVo9TGvdZJ3DpJoFXfYjC+4NnWPMirOQY3T
wli56Re84A4jx2/Ngbay5WpZ/VI08lv4ecpxDuK3LvQO7i1F3eeFuedc5qAz
ZVgmX74UFTNV3a0852CA7Cx6wFOK9E4FAffgOZDeddy4pqYEU7XE1TLeUvHM
ZhoVDUtwfIHmtWZsDiJEpAKKzT+j772SjZW354HGavTuOoeoInopz+fuPBzd
e3FuSBuxN3/J4LAr9V/ilKu5Qg5Rc0zTu9pzHu69WNHsOV+EpE0+syZoHgJw
Sfd6TBGePPOmrC5zHtA3SY1n4BNu2hV+o+PvPGRfemU8+PAjvv1jU0peXgAp
/dgM5ckCvH5N0Y3DegES1c7n7OsuQNmxSTVBuwWY26y/8tK3AoxffJih4rAA
7uXWRq3xBRgiFBN534saz966L8OgAB20626sTlqAkKBVdS2Z71HllbqY1MAC
bOFZzcpwzceC06vvXLReBKbBx7CAA7m44/rbflm7RdAy38a1oJyL8Y/Onp66
sQi3jt94dFcyF31zUlQD7y6CpeloQAh3LpoI6Mx+9l6Emg8se8uqHJytuee+
PWkRYlor5+2MclD9AMNnpHsRdnUNy76xfYcflWpjXM4twdPsqlsBxdmYNVM2
qGS6BIpSgo+lc7IxET/sGjVfgjXQHlydko1+RxLLTa8uwZZr268pBGSjyeW7
DB1nynXbd1+7mI0zwf9o8T5fAqfdGy0KFrNQhW3zK6FuCYwVj5YZ62ahsTGH
/8A2GqFyenq2pzMdTTJ5S/9K0ohfuYPyDZXpeG75pmmmNI3w9N4s3fIuHS/m
qJvPydGIW9I5siJP0vEKn4MKnzKNUKY3OzruTMdbFQO/9xygEV/l97e9fPwG
n6l9U3h2hUbI3rYc27DvNZaIPK9VSqYRotM5x0/3p2Ls+7BLwqk0QsSfoZ7W
kIr3jUNZ02k0IkFk/dqVX1JRLSKIvyidRtTuPABkfCpmrn9qqJdLI6JEO0NP
XkrFl8IPas9/oRFn1ISuO3eloOM629pHPTSiPUx5qetPMsryQW3zJg7inMM5
YZZIEvIlGrJ6xDmIrQE2q7hWJeGEqgU/Q4KD+L7aWWXrXCIWm/oYcklxELcO
eKz0/pWIpzLraxUVOIhqVcaljvhE9NC3rvMBDsJE6oRqiUIiNj0Nqtcw4yBe
hz7ylzJKwAcr+xpfxXEQQ5ZXl23Lj8P9AwMGTxI4iKDyT6c/v45DrtKh6ptJ
VL75hxJWsXHofY/8vC+Ngyip6FzzzScOn5Kz6b1ZHMSls08sZ8/HYXgjv7dU
MQdx2DSfr5crDt/EgUrmbw6CrTeZmmMSi017osKLNtKJ6gXm8a49Mdg8quMW
/Q+dkNGXj9KXisGWOMaVe5vpxCn5iC1V62KwfeV+ZfWtdGINHMkdJKOxq3Ww
PleWTqyWdfpRkhyNw84q/Ol76MRvH7PUbuFoXCio9Ys6Qyd8b9KiPGkvcZv6
igdOIXRit9FMudJUJMr3lE27h9GJlFkFR8OBSFTxfXjz8XM64TX6ode1MRL1
2hZNw6PoxLLNyt8n30WincuEVk4CnXghXJf90D4Scz70zJPv6IR9/sgFJiMC
tTU+OVk10InHhQ+Tv7Gfo7nmrZunhTgJi9CW6ati4XhQXlxbYz0nUTaYZnOG
NxzlNn0XEt/ASThHyTYdpYfj5JJM4ZAYJ7H1iZq30WAY+pZ2L7u/jZNwPPXD
vSInDLMPG0YlKHES9md/NRkfD0PaWcVypiEnYaPRotrhG4rRdxgb/fw5CfUH
xsRK0RD0NclyiwjkJLgdeLcLrQ1BR7jVnRRMxZ+xLJShh6DBysnk4nBOQr4L
uuyGg5EevbBzMoaTSOzi1DYpDEbrL2v0LmVyEm99/A9UXwzGXYL/Oqj+5CTO
zLoaNb0Owoosq2+9/FzE/neePNsvBOK43c+oP4JchOQWde0zJwJxi8we279C
XMTntpvHAg8FokvcqlVjG7iIx+KFlcIqgSgXnH6QLsFFfKiwrHbgDcSg22Ml
4ru4iKyMy6+6vAPQRMW94IIRF/F3p9YVTzN/HCkMT24O5iK+B/Uuu6H2FNcu
NmtKrF5GCCkenClOeYKb9wu3BD5bRjTVhNQuXXiEOz5ZKpzmXk6E7dIZ5C72
RJUV17Ly3JYTVnoexft8PVD+1E0VDRo30VvgZXxj/B5KtD5yEnbmJm4kHLsq
kOCM3KYRKDTPTeQRorURjx3x/RZn6+2U1XmmMgjK1n1n+ZUp70+/4j/o7YhV
Nhsvn6TMf3DaUI3yU4eY5SGUjy2w/jZ7OaKAb+IxvgVu4sNxRdv1no64KTer
fdUiN9F4+1X483uO+ONukJco5aWu5GSg7KF+S16WcroYvP/j6ojdqOR+iDJP
55YuVcqJVXkSTyiXvc7c3+LsiDJdH22WLXETm3X7jTbcdcS2+GgBIcr1VROu
nx0d0feKW+E2yj1R4ck2lEeGgUeHsindh/bhjiNmTJRkeVK+tqDw1cTBEU3f
J5wNpryco2SeTpnP1YseT3mQt0/p9W1HtKfpnvxMeaVCS/LcLUeUKJVc+El5
mcJ/PQmU6x5xJ3dRrtmwRvwo5Yd6g/pMyup/Fi6O2zvi7tWVU0uUFQPcX72k
/D/S/79+
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->{-1.2, 1},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], Automatic}]], "Output",
 CellChangeTimes->{3.419291873521244*^9, 3.419292140918852*^9, 
  3.419292244795671*^9, 3.4192923076819487`*^9, 3.4192929955572433`*^9, 
  3.419297122247014*^9, 3.4199906696173143`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"p1", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"Sin", "[", "x", "]"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"x", ",", " ", "0", ",", " ", 
       RowBox[{"2", " ", "Pi"}]}], "}"}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{3.419297036982894*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"p2", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"Cos", "[", "x", "]"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"x", ",", " ", "0", ",", " ", 
       RowBox[{"2", " ", "Pi"}]}], "}"}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{3.41929704550895*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{"p1", ",", "p2"}], "]"}]], "Input",
 CellChangeTimes->{{3.4192970654471397`*^9, 3.419297065840722*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
     LineBox[CompressedData["
1:eJwl2Xk4VN//AHBrITFzh1Ap2heSUlT0PpWtSClpE0JCskZIKm1IElLJlrKU
Tyl7wgkpFCmVUCoky8xc65iZLL/zfX5/nef1PHPunXlv595n1B089xwTExER
eSYqIvK/VRzLNHSuu7CZV/7/6+Le8k3zYu3gdkHz8FyyCp9pObXEeIL3rXzD
z2T9o+DCL4w5B+cfVQSlkbXV+FJleswNUL2Q+n4vWb/YxSxNikmB9UYzrfbd
TIE97iqtd2JyYB0WlgVez4GbQzZ58TEY9BQfGaqGYNhUvUNmq28jXC4tM5Ix
agSvIIujeV7foOh0lU5pSzOcLD4WJbbwFyzJnvfBlN0On3u2S2c6dEFXd8vB
aqlOiNDiiRQe7AH16Y9FdzC7wXtlza1X6WwQ+r5dl83vga5jXedTC9ng7V+8
cJ14L1iniriff8uGZ+dnqhbP7IWNihu2ol42fLLXWfJoQS+ITT3iYg0ObOud
tUXXvBdiPl0zwXkccDyepiCa3Au5gbsEZRVcsGhp9tPV7wOh44mnPzwG4L9Z
PQ23HfrBnjkcUOo/AC+nDs9/4dYP1eVB2+6FDECsU2x9k08/RKtEfDsQNQAv
zPw3jYb2w9IPWWKfnwzAeouIJT1p/WC1sdu6jj0AuY6Lr0X+7oenjKNThW6D
oBJvdbLyIBsUyntqb/kMQnqFWO2Mo2wIPOEVdypoEMy+txpbuLDB8M255Wsi
BsG3STyt3J8NbWeS9z55NAg3cn3SzWPZIPW3LfNBzyC8M5Szn/uODQ5l1ruj
nYfgyj7MC1nHgTWFypSK5xD48BZG+OpzQCynten+6SEIXLD6vd02DqSl2u7P
CxsCzfv2VvMtOdBx0dn26+Mh0E27uXmjOwccdvi7z6WH4JVecP2PVOLmW2FZ
p4eBcWIjp0GcC2sa9+/QPj8MR7qacwukuSBWqyJbEjYMYU5F7Fh5LqSVJN14
d3cYeg/fLFw/hwsdSenx3JfDcCD/2inFNVxwcCp4qCMyAr+qvFavt+WC4+Dn
V6/CRsA11PWnIIcL9kHR+4ujR6A9d65jUD4XbMTNuTl3RsBft377cDEXrBWr
5qRkjUBUYvGmBpJH0w3P/c/WjMBPk4Wxy5q4sOrCdY2NUqMgPfFR3WOECytk
tldpM0ZBNcHd6hSfC0tjJQ4tVx6F18XLW3zGuaCWfuaq8rJRuA5KXw5I0MCq
de3gmYzC5ujgMzUsGvgM4zt5V0dhfXbi03XaNIzcFdXKvjEKP9/lRb/SoWFw
QVl12u1RCBUVFmzTo6FPR2f4ZuYoFDfefbMGaPhxYIGF19tREI0w6Mkzp6Ey
dVJcczoPuGzlU1ucaShfXpKwSJ4HtX6fF+12peFlrp/2XCUecCoKZ+x3pyH/
Ndt2xlIe0JKDATt9aMjsaX3Ra8yDOwtzS7+fpSFydZFnxhUeHNbyNLsUS0Pd
muZuvygeDG5PWykdT4PUurEjRvE8MGWLXL5yh4ZLG3TNu9LJ9VmdqW5JNJzZ
WrRsQTUPRs/Ln/yWQUOxYXPK4Hse7Gl3nqb+iAae8disis88mCl1RMEhmwYf
M11J+y4etF4WjazPocHNquh3kvgYvNkR07a9mIYs6+YDJ2eMgWb8xhnWJTR0
Hxj7oM8ag3IRl+xDpTQcPaJb3rZgDD7FHN+08xUNB5yLElS2joGT7khk81sa
TAKK9t46PwY688Xjzn8h3zeouc4pbAxWumyMZzWT+AWPbdGJHoOiWFWxlG80
bL6gu7opZQyeBXkpprTRsD6iSJaJx+DVcnc1w980nIpsvvjrzRikX1BxTuig
ITdqTJjTMAarb+VRvZ00aMbq9lq0jwG73CvFs5uGRYlF1ZETY5C/viZEvZ8G
h+RmfRtJPlxsuTq8kU1DaupY3sqZfJg10PPenEPD3HTdtLq5fMjdGvnfQZqG
Q5n7VRIW8UHN3TLXaoCGO49OR7tq8GFjV9kc00FSX0+LQqT0+dByPUNZeZiG
3c+aR5u38WFgVX72CHFU7ph7phkfhieu3a8doUGmSPew8WE+NAga8214NJi+
2P9J0ZEPM2a3f5w9RsOVl6e3/3Ej32fX6O6PxGKvinQvBfHB8sutU0sFNDye
SWVMhPIhUuL37s/Eew67K5y+xocfWc06AUIahFlvQgdi+XCzxkyN9Y+GBzy1
QddEPmhxmax0YnPDM3adD/lwZZnozFXjpP5vfqm3ecKHApnhmU+JDTUjHu8q
58NEluWi2Aka2EFdyrVv+GChHrKBTxxXs/nq1g98GH+hsc9qkgb9WXdHXzbz
YX/ittOZxH8chx3X/eLDev/slEHiqOc7Pz3t4cNU4K6GNVMkn1OZaNkgH57Y
qoqfIG43F8u5L+BDk53k5gTiKwk2qnPEBJBuIAx5Rbyqp/BanIwAxvQHq38Q
f13HFM5kCWDb0g5qiDjk4gmXq3ME8HjH22MTxEs/Vn8VWSSAkcCk8inixnlq
RkEaArgl66QqIA5wD8ob1hFAdvvc0F5itZLP6icNBDC++z27kbhmulZ0t5EA
eKaBR3KIvfaFT9pZCCBntebnS8TKDzrdW6wF8JM3vNuS+NWAQdseO2K5700K
xK6b72x/f1wAD7x4Nh/I76cih4qMvATw4o41+zxxSYv5EhwggM1hVOhyYoel
mXF6FwTw/fXWebUkvjJ+ouK54QKoPCBWYUecW3nYe2WMAJI/ebhxSH4OMQp/
PkwQwA2jrNk+xGK2DIt5DwSwcPvHjxyS3+xst9Lb2QIwE8hF2xNbCV6vYOYL
YCcvbF8dqY9x4/l3I0oFUObkumAlsXlHk9/ZegGcKqOaPvJJPWit6uJ9Ib//
sn6REnHi2bA9Xu0CQMFRD6xIPXKUDbQcaQGcOxx2K2+U5HdXRo8pU0jOH48/
kkMkv0ki+ytVhJA95sCUIP3R3neoetMCIRzNPWMiIP2kdUU+bdVaIdA6pk01
pN8aSwMOK+wTQoPZHJ/xHpIfmaba60eEoCZFj+X+Jfk5oKk33VkIWgaXIuxJ
P3sN/1YQ+gtB3Mq7OZX0O3OFWcPPO0LYFWc9p/AHmU/TU5g1qULoP+mjhb6T
eP8ZsnqWJYTk2OAzla00ON1PaDtfLITcm59Kc8j8KVbu61H/JoTDR7VojY80
XOcZaMj8EgLD+lB9wAeSn883PYf+CmFpfEx3aT0NM6I38CrHhMANb3+nWUeD
7fRwcSelf8D21vXIraRh7Z/vxubz/4H/Y0r7FZmHUlWrI3SW/oOG5Ng1b8pJ
PkO+MSR1/0HbiP9wCZmnkryl8zKs/8H0wfIgk1wa/ut6o9dz6x8UC48pclJo
uFA5O7gx6R98DHkqco7Md+tUD1yc/g/qZTaslb5Hg4jNLOPwgn9Q6XzWaxo5
H/Y2Hdu74ss/eDcge+ThNTIPKiQ83BXGIZVXGeXhR+ZNytYHAzHj8CZMdtOW
bTRcrWn8EXpvHIrn+C2OI+fbm0FbZcWH5PNGq5XbN9FgZHjm+oaCcZh/oXP2
fnI+bu3NOx3aPA4/Lj3P+7GI9P/axeYKcycgO3xs1WZy3q5+O31UN30CLsR3
5lqVcsFz4JZW3ZMJQM8u90YUceGpyiI3m8IJeL3/0q7iXC5ouqOf599OgLTM
whx+FjnfmYG1tb0TUHjdqEv+FhcWHe5LOrxqEk5kH3W9e4ILSvR743NFk1Ap
2RG8kOLCnZv4aC+ehKgLpkq2slxQ1skN3lszCS8zlztETyMOvJ27tIXs76yV
/y7kwGxxh3mNwknQ1JLgy3dyYJ7S2Kja5ikY7Rj27H/OgSWgnl75egoyAsaY
Z7dzIOFtiai4qwg6rPBrsa89GwZ+PQuk3UWQw7PErFXk+c9EmDHY5iWCnB8n
HOy0ZMOIRuzv/AARtEj16E69bWywiDlR4RwmghTdU59EL2aD2JG5F+oyRVDJ
pysd4z39cGLorEhMtwgKbhYRaSTPp/qqW6bUnERR49Wwg/WH+sDU5rOPg4so
+vazqlvdsg+s7h3vfuAuig4JLot6mvTBCZWo+iV+oqj9X0Lf0No+SFBsu6dx
RRR9KD727b5sH/Bn+unpZYmiM+XGccmlvZA/meW9iy2KrsYYhy1V6oWVvxhd
Z0+JoYO6w12qRX/hSRblUuAjjmR50z94/eyC4PYjTSuvSKAfe44tv+jxG7z1
9cyS4yRRcKNJ3NqQNhCmGDr0R09Drd3m92tWfYZGrwT702nT0TzZwGU+n9/C
BpMFkz/uS6GPX2WdJ0WeQa3RhiyUKI02NNrOy4l8itOf393QkS2DGllq+umn
a7DiQg0320czkNXS3EXGf5rwJ1GpUJVSWSRRl/JIp7UNF0j5ZjTWzkRxgasL
quJ/Yw1FhptDtRxaGf3ggM3LLkxH8RTWfpVHq68zO5fU/sXsgXmVmq3yyDil
qqS26S/u22PiuaxdHlXTe584t//FXbPu1Kp2E4/f+BY1/Be3Jm8IkeLJo40x
5pO3VXuww/7yYa4MA6mtcNh6zasH7zwueuT1CgbaluTU3MnsxQuvXtXydGMg
6Vrr0KYtfdjnq06IgzsDrS8UT3i5ow+/Wtzxfp8HAy1rd/ZO2tuHbV/ru+n7
MNDNtnZri2N9OEF06KF0EAOd6P9Y4RTWh6lgm9kPwxkowCLa2KG+D4t5a0u2
ZDGQ69Hxxpt7+rHlq/a97x8zkGa44p8nh/pxqnxkGv6PgYLj9QOqHPrx5qfd
kPGMgb4/l1Ro8+nHQf33gnyLGSj8L4v9MqYfDx2bNjCzhoEaP5Sc3vqxH3cc
amvd+peBtI22zLXezsayBvsz7XsZKLms7YO+JRuvm9/kG9LPQBw5+fg5B9k4
rLNOtoRmoNnWPpYVLmys5V6yWZvPQG5F00yeXGXj4LN30+ZLM9Fj+1gzydds
rJi63218BRPtkYpUz1zPwZtDm9bP1mSisuOf5CINONjFaZe4nhYTGS+LeO9i
yMGly0wSfdcykX5f6nPpPRzs8Hx9Q98mJqpq1Ob0uHPw00rFNS3mTKSulnZ1
zn0ONv3TJCjwYKKuhebPDcW5+OzKqDM5XkxkUho3/FKKi3O9TSeyfJjo7E21
rpVyXDxnslQk0Z+J3v4srBtV5mLurIzpoSFMNBmtE669iovjTAMULaKY6JOm
1H8m+7n4V/Zc7e4nTFSfIs/+84CLFYe+5v7MYaI1z4zDvLK4eIfeTZ2W50yU
cepL9vB/XJz3WlLvfQETPf1z61JnARdf+cHdnFvGRCsZZraub8mrrHyFeUg9
Ewnyaqtle7k4wOeYyywOE+1Nc7DLXkLjMDPu8Y00E22pXT0tZgWNby86fdx2
kImOs8Veea6iceHXMOeMUSaK6DdxYayn8fDG/5zWTzJRp++oe7chjT3Eh+2t
5SkU6Wpu02VP47Pfz9gHMSm0ZGxW/iYnGkcWSNgnsyhk/PeoXMRxGmcfn2XX
rUQhivf8zQwPGve823DEX41CHLNDGg+CaOwYd/5gvDaFGLIgqR5DY5+T0gdL
1lKo97aiSk8cjUONYw60r6PQvokz6hm3aZzKf7B/yUYKxeZ9lZ2eRON2m7f7
CrdSaGGkq55NJo0563bvazWkUEronrbWRzQel2uxmjSm0KYz79x3/0fjORV9
e43NKOT5NfmA2nMaH1gst+frXgqt8i1Ee0to7DIZbyncR6GISL5heCmNTzfP
t5x3gELLJb3XFJbTOD5ce7ezDYVWPgt/M1JJ4yaOlQXPiUKu0pGVEu9obFF4
b8csfwptnDN8zbOFXG/YYUoxgEJbZe/t5rfS+OLqFfmKQRTSH21TC/xO4+LH
xaqKIRTyMX/c4fCTxgtSvgywrlBocbrv769dNNb/npjOCiPxEm/kz++m8X4V
p0OsCArZbx1XPvqXxDt2qIqKotDLu5d93vXSmHdV/jYznkIszApFXBozqr+a
Me+Q/ZvuNm+nabxSLFmEmUDyUf9wrdkAje2DNdwYyRR6qLJrct0QjYNeDM9j
pFLIz9jXff4wjW/xSprk04jdlv0SGaFxndd2A/kMCiU7OTdnj9K46wljSC6L
QlaJlw758Wg81decIfeYxDfKtmP9GI11jjkz5J5SaK7llan7fBKfNM3qmc/I
/f0C48wENHb9ORI4M5dCJkIfTQ5x8sGLnbKFFDpe1uKm/I/EJ37HHdliCg1v
GZdLI25qYu6ULaGQQsGNwoXjNOYyWkRlSynkUeh7NIlYyiK1cEY5hdZ1hcvL
T5B4Xjt+YsYrCm1uK3gVQGxQs0ptRiWFxHV/nGolPiDJ+yzzmkKZN/+u1Jkk
9be1LFzmDYUmLpb/uUwcee7SZpkaCsWk70wjz9s4s9RsWLqOQv9Fhh5lTtG4
UkBlSb+n0J4G84VmxN/Xt9pIN1Bo92TS32Binu99pnQjhTbkuD7NIGY+d3kj
9YlCJ33IaUSswdU6I/WZQkrfTLd1EBuvHNOS+kqhtZ47mSPE9i7lXdO/USi6
+ulv8v6Bz6Rfvju9lUINx93yyfsHju8wt5j+ndTD73Ph5P0DP5uvID69nfRn
6YB9P3GdTVvRtF/kfqGvNn4h/nM3zX1aB6mHkpFZRcQiza7q07ooVMuOG40m
nq2g/VWym+xPevzVgVjHkh8h2UOh65ZbSjSId0VhkOwj+685p3JJPNzeXRmR
YJP4NCwPzyK+JGXxSIJLoaUJiacOEScbKdpKDFCI6fHJQYL4Reh3SmKIQt41
v/ZmkPhzx92CxXkUihL7u/kTyd/BA2bLBWMUOuEgkmRL/Dpv5VeugELN1aU7
O0n+77qxtVonKCTyKT7zi5DGEm/ef/8wRepn7ejubcQe6k/Cq0VZSF06YOcj
Uk+G3052PpNkoaC355Etqb+ctRbRGdNZyGqxte4TUp+zb6wySJRmIfsO7oUR
Ur8DRnT81ZksNCNTleVO6vtentcOW0Xi3LIVU4M0niZvObZXiYUOBnNfM4i9
3LQfbldhobEfAfmzST8Zqw9N6Kiy0JMzYXFKpP+Gonyfz1jMQv6FwXYFpD+P
9O21FV3KQm+51tnhPTSuMdKZMbaMhZJL4i2sST8njY84dWiQ/ULPxG+k/03d
/JVf6LBQzmU52wtkPuRVW1c/Xc9CnK7rJ5XbaTxPXdfnoR4LRQWMfM0k82S4
eezdDX0WMhhqLc5p+V/8A885G7JQUa9mlWMTjaXvH9SwMWahnnfC7LKPND41
vqHF0pSFzotmDMo30nh7nnCNgTkLmTWsu5X0nsYjasHdLCsWmm3LMz1STWO7
YJtYaWsWyvdzWhRUReqrWR9N7Sfx3K1qf6OCxilRE3f7DrPQzl2mwrQyGu8Y
D9lZ4chCy/58e+NRQOP7zRfyPXxZKH72De27D2jcXb36Z5QfCwlRYZHUfdIP
+T+lc06z0Eww3OWZTM6jaAM7+gwLXWZfKVC/S+P32wXSXpdYaINtk++cKBrz
X3rZed8i17dc5eroT+PNj+dH3LzNQlr1hxwNfcm8vdOQ//wuyW9j65m5XjSW
89OQGUpioYBwlxm5rjReuKon3yeDhc72m5f72JD5lGonc6qIhRTERU3NEI3j
ouTWxb1goVaLT7eT9WncElxml/+Sheqbjyn26tHY6eCcghHMQlNPpyU7atM4
kGq286thoStr1MRpdRo/vGRR4N/CQt1sOwV7URoLXQzsA/+x0Kf6iJi8F+R8
f7kC+U2wUNXzxxcQOc/vzVRW855iIfeTkp3Vz7hYP3fop4u4AmoK+SJSksnF
If8y7Q7MUECcs6tqTG5xsXgUZac7RwE9yTG7IvTgYtm8v0dGNyqgiv/2La6e
y8U2kl8MBvUV0Lb389IclLj4yf5KVc5mBVRP8Yv4TC62GE/80bVVASXErM6X
m87F0UZ7jnzeoYAyk/0UOgY4WOFbqU3eIQXUU7M4a2kVB6tO3DzsHUT8N0FF
z4E8H3XsfHE7WAF1NORpOR3m4FNvpZXKQxRQ4cCnuqtWHFx388InmYsKSK6J
dafAmIP9l3hvf3hNAf24WPwmewUHN+7arducqIAuSFgaSAyycWiaHMsAK6DW
YsV9p06zcbfJtTopCUVkY8dZ++FEP3Yws1dbPE0RndsepK3k2I9/WKzz3yKl
iMYFv6P2k+fVz/t+qgfJKqI/WmK+Fab9uNJxbWC/ArESWrxxcT9OOte2tGGx
IrIc8bCt+N6HrYpWXo41UUSpjYfH9Iz7cNWS9zDvmiJqdnyt7iDei92kMiTU
pWchfyOZHfV23bgodZFB1c1ZaHqZplupeidu2KRfvYephK74lFRX3f6J+W73
9tpHKSGtIquSt7HfcM3ulH0zZymjifZvb9WiGrHDBv3MzDhldM/fJks1sQKn
fTvr/ltVBb13ubwh8bgX1rgibBokdt1d5TK52AsXrj29SWyeCtKGTs2KGk/8
LspLZiEx0/bor+2VHnjE0DHLiZhR4KB5uMAdGz837fpLfJEr4Xn2ngvuC2fZ
cOerILpGvf7VcXt8Sje6apL4Z3XzgHStHZ7skl0pr0bu57jPKKbSllTyNKEW
8Y3Xlj1pBTZYn8e/7U1suWWN8ut7B3CUQ3vTCHGSf9aqaS67sTLj8CZJdRWk
ONnYPLfKAqeVNacpEpc+MdutWWiOi5Q/eq8ndiwt2WSRaIp/NVTJBxC/bTMS
iXZB2C0YnQ4jPiFf8R0V6eOR5WXtd4iLvVhFR5P0sNTlwicviK+tW3j8getq
HLNmrWIdsYLyl6CwlGV47q+c4Fbidw+qF9edUMMZ1zW6+ohPihmmKHkxsPam
R2b/iIe1rv/v/67y/wMoLNIt
      "]]}}, {{}, {}, 
    {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
     LineBox[CompressedData["
1:eJwl2Xk41N/3AHC7GWv2oUhKSVKfLC3onlQKJVooW6WUpEJFH2lRiTbZkz6h
RZZCsiddpEKSsmRJMSHLzFy7kPyu72/+mef1zMxz7z3n3Pue89x5Lie2uwrw
8fFl8fPxzbwLYrHqnwYBa3OnZ14Eafa8NlKL2IuEDMVm/6GeeL7sYFP4CZSX
d8yjnzpzFNXLpPui+45Lh79Rd8q7/c4Nv4Dy27e+KKG+qVwumV54Gen11D+J
o36i5RjPlx6E3Cc+fj5JXbyyf/mOhBuoLQD01lE3m10pTQy/jdZ9Xv1BZGY8
bQlt/9IwtHdu+d2yvwQFrWjwTiyMQEuCJ+P8qOXXJBRWZ0ehHImuZi3qB+vc
hX6n3UELI+5t/TRFkK65/tZ5SXfRy65/xo5RF1r/jbJIuIdwXvFXIer6veGL
7ofHo+MSy9fO/kPXo6e76ufbBFR2xLwsdpIg35UR33xLH6D6saoAWWoh5KT5
oPAR6lx291HvOEGVpqUVBvmP0XjzYoYldZjZouOV2YmoLT/78aPfBKlZDeQO
pSWhDR1OV03GCOqwsXUITk1Gi/bUfjg/StDTXYXTc5JSUOS2AfP8EYJWOQVu
Nkt4ivh/9vTLDRO03UO5OSY8A+XevkWO9RMksQrh6E3P0ePC8WlPQlB/gZdM
+9vnyLr9rYUHj6Dcooac06WZyKD8XKglh6D1bxP+xhVmoWVptT+f/SJo4aZa
657V2UheNrbaq4sgsQrhR3r52Sh6pH9Et5Ogmir3TeXZOejmgZuTYWyCnOr0
QwfS8pB9dXDfxDeCwPYw20gnH3W11b0JaCFoQeNd/aup+civ3b6Fr5mg3pa/
jSpJBch93a2KXw00fj/L521IKEQ3dNal7a6h8Rl0zIoOx2jt1VLuuxKCbinE
GhdLFiP7s+PuSZigL5mBcw22FyMLW6/a80UEOfQ6dqq1FKNVYXFusgUEHXcQ
9xrklCDrjd9yqjIIijRxC747qwx9f1ZzMuQeQU1NO45K7SpDJa+bhltjaPx9
kNXlu2VIt87IY0E0QUnpivLHNN6isPQl66JDCXo592086L9DXVuXxUoGEvSD
XyPvl105mqv6q8zSg64vTjLW8b9y9N/zp1LiRwhyWzPu/7mtHFnN9nUscSVo
0LvGtPBIBboj2i0qt5fWR8f56pCzlcj2r1aBhQ1B2u9aOg3iq1Co4yZXCX2C
jN5aiJmerEGqrXpH2wZ5aFbdk08rI2pQoeObu1U8HupgC0QtzapBZq9CZTJ7
eSiEr3Cu8lANiiPTbS5sHmIbLTHo9/6MTkfYzXH/zEPBL8T3xXl/QZcTvIdF
03moIb4qZ8KrDjk854hd289DT9O1zvaH1SHjswcuXXTkoYtFV6Arsw7xqiIO
e9rx0OIW4w+fB+rQkXfLLq7eykP+imltyV71aHREU8prFQ/Nv3VL3M6rAR2a
fF3iI8lDnn5W+7M8G5FKUJx0VyYXWRw3TmaENqIo3tF28WdcNN9FmzhlNCLn
JdejtZ9wUYO5yDkGrxFtlXR+vj2Wi0yUX8c4HW1CAmobK7de4iKx/KU1ooea
0URnRku/NRcljkggR4dvaPXth4PD3Rx0LN81RGB+G1Jjr7W3EuLQ/Wyjzq/f
hm5Gvdwp/6cP9TcZv5je0Iai6xLdvwz1oVOTcg1/DrUhJxG1QcOffchvbanq
WGobAim7zAclfehqmVpa34p25P7bWITvXB9KqPn6oc6UjVxtMxYNcHtRXbc5
M8mlA7Erpa0NCnrQ9WWjfLl7ulGmoMVtf51fyGtJeVRxIgc5T+ZKlgp0oIkD
R9Nbj/cjvRfrNSZutSGXIlvr0EOD6GRE17/SC5rRgYG64uLgYWTYc8nNfsEX
dHN53oknV0eR1ZjhwKw3ZUigOG/lFb/f6HzkhKsr9zGS0bas/hEzgVoc9GO7
XfPw5njTR/3hf5As+3j6KZsPWIlUmV3I+4t61sR3ZbDrcez7l/yCR/igorq3
Dke2YmPVddPqB/lhv93PwZML2XhJ26yOc6cE4IzxzWNM/06clizrluMtCHUd
r3wOrOvGV+rxOkFfQVB65lcZu6UbOwocm21zVhDYdnEKH+y6sZjj+2rOZUFQ
ZGoGKh7vxoek/Q0WRAlC1CD/id2x3Vjdp1MgIk8QAsc3Pwoc6MaR6/Pve/4R
BP65oYknYnuw/3en2iVXhaD//YLSpvpePLzJ5L7rdSHoU9ddLv6jF3tkzjkc
HyIEUqd+qBl092KHKy0TsneEoG2A/5T3RC9eo71HYyJJCEBdLzdcrQ+Pn97p
VV4hBNZLo90Ou/ZhH0lLaVdJYXhduuOwNbcP83y0m+JkhGGPrubcWyN9+FAb
81GjgjDwXelhlk71YduscsMtasJgt3fBCXkpDjbYY+ast0wYFqt9WuWgy8HD
j9el8dsIQ/bs67XHj3Gwl/Eqy7hIYRAcb+HFdXIw3/HIC7djhKE2dPTmfg4H
h8T3Z138Txh6OuQ0VYc4OFUgZc6Bx8Jwyaba+AIfF7PLlXmLsoUh/GvXN54K
F+/cNRmaWSsMqq/d/fysuNjw+OuGMlkRMPazdlj1nIvL4lXEcxVF4HrMvOVK
uVy8/bMPSlIRgbeuEx95hVx8XH9Z8jUNEXBksfYGv+fipIn4f61WiEDuiYKM
g9+5mBUUMKfRRgQ+soUbisV4eCJ+g0tfqAhEf1ciU048vHbMJPyfKBF4di+l
zukADwdYrSz1vSsCXnaJkjluPMyYWqwh9FAE1uqVnTQ/ycMK9tLsOVkikLb0
ZhczmIeXyzfvt6oXgd72z6rdGTx88mhtWGSTCKwaCQh+lc3DuaVVJc2tItDz
d/+y4AIeNvHC8w53icD64jU6wm942KL6cfuFMRGQ+RjzKqqeh12DT+zPVBaF
h2/DZGeN83DyD7ewMVVRuHHN74HdFA9zDF1KTDREoTu5yS6an2Dvzp3zKrVF
IT93geE4k+CLpmva2UaiQMri7+xUITj2j9B+eWf6/YUinH2rCa7xjN3n+1AU
thdXWZV7EqwdOmvy1BNROKuTol10kuDLGVejvFNF4fT76RWpPgQb8rwrj70Q
hfphvXce/gTfP2qpf7BUFByNa9gRQQS7H/ojasMWhYmP0w5H/iO4LND7oVWX
KNSdcH3WFkewamK38ZZeUfiy+Zqa9QM6/s86r02DopAj+cBV6QnBK/entZgI
MGAkKvL4pgyChRydM7Q1GIC3sHg6xQQ7n60z11rIAKbBkMLCUoLzYi06NLUZ
oBb81lapjI7fZKg8bwUDws4cmMd+T/BnW+nLSqYM2Dzk+5H1ia7PJ1BVwYwB
d38MZXypIfhK1GSerAUDnE8VJ135QvCqul8cye0MsI2/X19TT3CcTbGtkAsD
hm7LzxX7RvBvT8MB/kMMOHIjO+FKK8HbQ5/dmD7CgLQL/vpj3wkW/hRTPOHF
gNiTCmFl7QR7bPHSHghgQMboZ3m+XwS/O/qrjBfIgKV2YmpG3QTPveG0l3ON
AbUbiw2P9xD8pcI88lcYA7apnY561Ufw6k0af1sfMMD43ny+CUKw/qPK4PeJ
DOiaSkro7ydYd9pbLjOFAaJF8fd/DBCskfdG60omA1IDRZ49GSJ4jpxH1rEc
BkgWMorODxOseEJ+rV0BA0oeP168bYRg8UWuO7RLGLBKtEO+aZRgkcuS3+Xe
MqDTYnFE+BjBfD9y3KbKGfCp0dJjw2+Ch6NFztfUMOBy4EXdsHGCeYPpjJd1
DHgqvV5JZ4Lgbiu7iEeNDPj2cr09pm4VSU72aWOA8pFTvOpJghtdrPX2dTBA
898DyPIPXe/r30Xm3QwwL5PqxdRVKg8263EYUHHAnqczRePlY147p58Bpht1
toRTF38ZcBIZZsALbQ/BfuqXurHdZIwB51IF5c3+Epx93fRk0yQDTi37fi6S
OqOrd6p0mgFff3dDC3WqaUTwM0EmOKvIOalME/w4zkguWpQJhv5bv9hQx038
vH9BnAlSLdcTAqhjbG9qHZFmgkw5fp9CHf5CP2u7HBNIMntTJfVNqVYTYyUm
fMvrU/9JfdU9sFxzNhMiBOu3D1MHvFu6Q3ouE/aciG2dovbXaGj9rcGE8Rer
S2j/gH3On3djL2RClf2LqXFqz+aFQx+0mfDivXAEh9rd8NO5HF0mKC5bGfCV
+mC4LyN+BRP6Yi3LX1I78+ZGBBsyIa3H3C2aerdFuar3GiY4Va/Z706944ln
ssNaJlys0coypLYSUNbbaMoEtS3qzpM0HpudS4p0zZhQ6LXMJZ/a9OWRzSwL
Juw2O4SPURsrytbyWzHB41HD6dnUht4vnfpsmNBhGBlYQuO/vNqlu24XE5Qu
Z/P2UmtezZpKcmLC7NP+HwNpPtXZDsFh+5kQvXH3eklqlbVCcmddmSC7YFr2
Fq0HqdGdWlbHmCB0Ubv4NK0XxvapFyu9mJBQOXD/O60vgfREk3mnmXChiNmA
qMdcR7cP+zPh4c63u/pofQ6WxLW2XmRCyOGX9w2oOaqb3N5fYcLv6YdwhtZz
W/2dc7E3mbChUDimi9Z/xcbVyfAfE+pCzoQfpvvlzPvzuhcSmPBGU7x0L91P
WuZl2UWPmZCrtnnYiu63q1u2laxJY8L3ttH9slyCN+xwbdZ/zQSbEZ2jS+n+
Ha5L3XeylAl39UUKWrsIfmTb35X5jtYTx1AisJPO3/7skO4nJuzfrVmWz6b1
uy9MYnEbEzipXoHZ9DzxZDeEH+5gQmTAcqZqCz0PDs5RftLNBO7jqCj/JoLP
H07SnD/AhK962pXqDTQfx4vWqgqIgfghbsZUNT3/zvZ4yiwQAwvTlHYmJvjQ
lO7YNi0xGHhmqvPzFd3vF06dC9ERA4etQsFZLwk+dWn6mriBGAyWnTm9Opfg
FdcUHgmbiUGU8/Tq5mcEp0evqx8/LAaMxKt8njG0vlhBDqs8xOBc89izl1EE
S8ZWtft4isH68ujTf8Lp+Xbfjjd0RgxO/fRxdr1Fz9fHx0R518RA+vXk46oA
ghMz765mPxWDjcsX4QE3Ws+TDtqNGWIQVrHiYZcrrZ+NarOrs8Tg13Gp2loX
gl81PvxTUCgGF5cazbvjSHDt9FMc9kEMnFaOXynZRjC/1euN6/rEYHdR6pwn
+gQ79bJtErTF4Wpi2JXs3zysoZ9oGq0rDqld2YXZwzzcfe6w3s0V4tDCPOyY
1s/Dp2Q48mfWiMNR0WPfg7p5+Maqka/bLMQhZv9sfvZXHi64Kuo8fUQc/DKH
kpbk0Of7fB135xRxMA1cLj/HnYdDw2/YpqSJw6G8FytLDvKwmECf6XCmOFiO
DMc67eVhvvaU2ddfisPHif6F/jvp8zlu0cecD+KQ2/b1ovVaHi5Tmb9ckicO
QSfmJ9rNovORVRktXCEBG+eMnulL42IS8C9bZKUEDOyNe3c2iYvdBxqrbYwk
YPH5wOuCD7h4X82dpF/rJUDF8Kr/eAQXbwlR2CO3SwKkT8uvvfAvF88Xk3nl
7isB6ZxLnUOmXPyFn3FJ+ZUEKDq65N7+xMG8tLvO1sUS4Kf5LsWgnIOZ9kuM
gsokYP4S74TaYg6GF1bDw1USAKpf48cyOTjdJepQTasEXGwuUm+L4OAbbzQs
g6YlwP/FFX4DWw7eEGgiP2IqCfNNtQ5N1fXhHMbJJzUVkvBO3FriWmEv7vIP
4L7+KAlpMbmH21/0YtbAbf20z5Jw2UTURi+1F/s3PSu91iQJB/Qq69/E9OIN
qV3fTXskQcOvk33ndC/+YmmvlMOQgp2G492Sur24P2Rd8N1NUuD3wKYd6P9n
HYVZ7i5vpUBqySf7dfu6MQkZlddrkAb91H+Xz3LrxPODgpadcJ8F4yGygpct
2Jht39Js+msW7LrhY17BacWbO2vHc47LQExp7Fes14DPeLu6KXJlIPnjo+rX
5h+xVe49C0UfWYDxVw2hn/Ix74+7v+CoLFSuyHAVv/ofevA1IPv4STmQktvl
W7TkDZpwM9n376Qc3F5raM9kf0aqU2EOXn7ycK8oR8lvdxPq2nSjkiGkAO+n
w4Iyz7ehNwurkNoNBUje5vbZYeQncmc8EZrHVATV5w/ZeW1dKC9hgcmbMEXQ
fON0KOVJD1owveFsSYQiDJtCmu7zHhTq5FqAoxQhcp9DRBrtx9xUnhi8uqsI
Ax+r9WKqepBK5CLdnAeKMOuj2BX1wR7kH6Q9NylTEcKdFO0njXqR6fHl/Dc+
K8LrX2SworIXVRsZv90uowRCxo96rOv60PX805NmctR1pRNC3/rQJoOMf4wU
lMCiiHnoBe0fi3U14uYrK4GIZuH68cE+lDWP4TusrgR2BWXdhjIcFCNapxW9
XAkG7L03eW7hoAO1R282bVMCyUG/2Z+KOEjdOrH0o40SaIY2Cz4t46BvVd9/
l+xQAubLVqmLHzjI9p2Na6qdEnzusriq0MRBmwtWrj27Vwke8l/6yB2i/W68
YP+cE0pwObNu93YtLvrtfm/HvhAlmHPAL6rtBhfd9nskeiFUCZrbFbL3hnPR
wutPC++HK8HyMKsrDTFctCulcH5LtBJ8ume74mkiF7341TK0K14Jno+dC+9/
zUUeB+dEWj5XgvDvrxt7CBe1Od2vM/yiBAUOtonXLXnI91hi8K46Ot4/1xP+
WPOQ1Lk041MNSpAs8FnpkC0PmfxX9DizWQlmuwSemrufh2KbW0/p/FSCDym3
Xy3x4aGddmoKGsNKcNQFoZQ4Hiq3jt8lqciC0AgjK90eHnIv63wtyqLObDpn
yuUhyVU6WgIqLGB3qatuG+Ch7XMLJkZVWdC1I/eJzTgPtXC/xLdpsuCpTF7l
JIMg3nWR3iwDFpR2DQf8XEhQ6N8tO9JXsiB+mcPq89oE6XlHvEpezYLcPE8b
GV2CzuxRv33fhAVWi3US1A0IEtBaox+0kQVp137E/zQlSOHtsfP2u1iw2f+f
4xOOBOWvyv61047O51v+B5V9BNk/m7DetocFUV+/+OsdICguImj+BicWtPAV
NGw9QpCWy4Pypa4s8FIK3bnwNEHG03Wy/KdZkH3pcaPrDYK+e8/2n/RhQToO
Y4mHEBTQtb9z5AwLAvbUJySHEvTuIy+v158Fa4K/BFVFEbTtP4ZT3RUWaDSs
iMuLJ8hltXFSUiQLGK7LDqu8IOgHsgmpimbBd/RwwiubIEezQ6cHYlhwMJ/n
VZxLkO2O0PVG91lwy8+TaVpIkMWxjh/ViSwYzl1a+fUNQe9Pjr8bSmKB0wMv
9663BG3wk0pnpbIgc+WNnr73BK0NWuXvks6CSEQCWj4QtOLBTdZoLgva734T
31pLUEbSg2mVAhb4uKpGyNYTpJOe24UKWRD+8etwdQNBCwvbsq9hFnzYWbRR
p5kglXp9G9VyFig/GZf+t42gOy3mq0wrWfDH7pHTSDtB8mznuYerWBBSIXvJ
7SdBUiSY+7yG5nMydqteF80Xs/XahiYWeFzc0mHfR9AF6UHPIy10/smSrbc4
BP1REN0d0sqC8sXXUvK4BI1q/LOwsZ0FtVEOrwgh6ORiM8mpnzR+ZtICf/sJ
6l/mMDyviwUyLYYqgoME9RoHlh7tZYEL5BcPDBF0eH1sSiiHBXPIZauWYYI6
zDNCc3gseImS0gpHaD5tm5ynB1mQFTzyfd8YQQ5OvI0LRljA9Ut6rvmboMYD
gkvNx1jQI4C3t1N/8Vw6GT7JggU15qImEzS/vqbsvCkWNOvsUW6lrjpnV/Ft
mgW7rUQmT04SZH7F4zm/gDLINGs+4/9D6+N6wJ2FQsrgoXxb5yr1+rDo85Yi
ytA8Ptuff4qg4jtPXT0ZyvBVIiX2JLVJXPGWKDFl+BukEPyN+uXjer2XEsog
vnH9BuO/BK182qvyQ0oZukoUP4VTZ2dO8wvJKMMzdV+tNup/8uV7tOSUIWeR
lfWCaYLSXy+u2aqgDPfWBZvtpV7ydm2et5IywDl58TDq5A874u4oK0PNrY77
BTP3B1/cAl/NVoaKSs7fRuqHjec82lWVYWrZAl1CrXN1onaA+sKnx1kzztXz
NRJQUwZjE/GVM/cLH0I8xeZTb7p8beUA9fCGA8kHqXPzLecOUZ8f/CF9mnpJ
xUTEjBkJjr6B1LFJt0Vof4JUJ3eZPaG2qHbvnLFZ5uaOX9QLSruujVLXOL+1
/E39YF0Zd8b2EqZZjLnK0BYStG2M+sRho0uLqa+HY4nf1DGquupHqX+ZjByj
/QzS+JAadJa6Qpu/ZMbPziwiN6hNOgdlJqhLatVfP6N+XxqUNuPea3KOPOrm
ub4fJqlPrQx985e69Eym5Mz9yt8OiSXS6sqgFP9564zlQGRiGfXQjjfvZxzH
vbQfqL3Zkfy030Ja96bLram3rt2yesbGo7/veFEznT0ezvjdo9PTAdTsefW1
M7a2GTwUTi2WNV/wL7Xrsz6DLOqVJt4OM+7f43b/DbWhofeVGfuJdgrVUZ/5
Y/d0xiEu32uHqQv66wZnzJrlYCQ8Txmy1DzkZu6LHhZ9fahA/Uu5558Z6xzd
KbaQ2oZtaTXjPNZnL0PqAd9ItxmbvtvaZEZd1lx6ccZVJyvBjrpC7Gv0jG3n
bUo+TP1X9HPqjNuq30ifoT7w5fmrGbv7g28w9cgRn6oZDy8u+h5DnV09r3nG
57+uNkuhTuDL6pwxIzA3rYA6d3oxmXH4Cj2FSuqxD1dHZzynLcO/mdrFtWJy
xk9u6XT0/u/zgb8z/scoxXLyf7////ux/wOGfecC
      "]]}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->
   NCache[{{0, 2 Pi}, {-0.9999998592131705, 0.9999998782112116}}, {{
     0, 6.283185307179586}, {-0.9999998592131705, 0.9999998782112116}}],
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.4192970673542233`*^9, 3.419297122405415*^9, 
  3.419990669871498*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"n", ",", 
      RowBox[{"Prime", "[", "n", "]"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"n", ",", "1", ",", "100"}], "}"}]}], "]"}], "]"}]], "Input"],

Cell[BoxData[
 GraphicsBox[
  {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
   PointBox[CompressedData["
1:eJxd1Elu1EAYBlCLFUsvWLBg0SCEEEKomWdiAoEwmzCFQaIJCSCGxMwz1BH6
CD6Cj+Aj+AhesvQRAPnVwh0p+vLy+XecripvX9lYWtuUJMnqv+//2X91c37I
hrl5JrfIVG6b+f0uuVXumbluvxzJg3KHPCp3ytMz952Tu/sM88O/E87zXl7g
fXyRx3x5+FzhGh/g68PnrHM+xDf5cJ/ZEh/R3xr+X/VtPub6u3ycl/kE3+eT
5qNP8QP2OWUP+Qw/Yp9b/ZizPieTPgOPnujP6jlwuaKf77PluA7lU/0586t6
bjmxTuWanifP9Nat5LiO7XP9Bc/7Qs8lJ9a5jT1PXuoX9a/0PHmtv+R+HHj0
Rm/ftBz30Whdf8X9NvScFvqrfRYcuIm9fdjFnvO3evtyynGfVrG/4fp3eh6/
19vHBWc85cANx31ffTBv36cfzXPFgRuO5yT9ZN45KTiem44D55/Nc8WJc9Vx
xvkX89xwPIfpV/PO4ZQzHn8zzznHc9txcsf9vpvnggNXXMfrf5h37qcc3wMN
B+645vFP8/f0nHHxyzxXXPP4t3nvmYLje6fhwIvBPC9z4j30J2R/AZmOuZY=

    "]]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{3.419291873890386*^9, 3.419292141284506*^9, 
  3.4192922449959393`*^9, 3.419292308015849*^9, 3.419292995739999*^9, 
  3.419297122566965*^9, 3.41999066995785*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Prime", "[", 
  RowBox[{"10", "^", "9"}], "]"}]], "Input"],

Cell[BoxData["22801763489"], "Output",
 CellChangeTimes->{3.4192918740044127`*^9, 3.41929214136814*^9, 
  3.419292245074376*^9, 3.419292308115878*^9, 3.419292995806032*^9, 
  3.4192971226611223`*^9, 3.419990670047616*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"Prime", "[", "n", "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"n", ",", "1", ",", "100"}], "}"}]}], "]"}], "]"}]], "Input"],

Cell[BoxData[
 GraphicsBox[
  {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
   PointBox[CompressedData["
1:eJxd1Elu1EAYBlCLFUsvWLBg0SCEEEKomWdiAoEwmzCFQaIJCSCGxMwz1BH6
CD6Cj+Aj+AhesvQRAPnVwh0p+vLy+XecripvX9lYWtuUJMnqv+//2X91c37I
hrl5JrfIVG6b+f0uuVXumbluvxzJg3KHPCp3ytMz952Tu/sM88O/E87zXl7g
fXyRx3x5+FzhGh/g68PnrHM+xDf5cJ/ZEh/R3xr+X/VtPub6u3ycl/kE3+eT
5qNP8QP2OWUP+Qw/Yp9b/ZizPieTPgOPnujP6jlwuaKf77PluA7lU/0586t6
bjmxTuWanifP9Nat5LiO7XP9Bc/7Qs8lJ9a5jT1PXuoX9a/0PHmtv+R+HHj0
Rm/ftBz30Whdf8X9NvScFvqrfRYcuIm9fdjFnvO3evtyynGfVrG/4fp3eh6/
19vHBWc85cANx31ffTBv36cfzXPFgRuO5yT9ZN45KTiem44D55/Nc8WJc9Vx
xvkX89xwPIfpV/PO4ZQzHn8zzznHc9txcsf9vpvnggNXXMfrf5h37qcc3wMN
B+645vFP8/f0nHHxyzxXXPP4t3nvmYLje6fhwIvBPC9z4j30J2R/AZmOuZY=

    "]]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, Automatic},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{3.419291874084663*^9, 3.419292141468802*^9, 
  3.419292245162676*^9, 3.4192923082164793`*^9, 3.4192929958737373`*^9, 
  3.4192971227617903`*^9, 3.419990670148696*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"x", " ", "=", " ", 
  RowBox[{"Table", "[", 
   RowBox[{"n", ",", " ", 
    RowBox[{"{", 
     RowBox[{"n", ",", " ", "1", ",", " ", "10"}], "}"}]}], "]"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 
   ",", "9", ",", "10"}], "}"}]], "Output",
 CellChangeTimes->{3.4192918741715307`*^9, 3.419292141551887*^9, 
  3.4192922452526484`*^9, 3.4192923083000917`*^9, 3.419292995940473*^9, 
  3.419297122861329*^9, 3.419990670247284*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"y", " ", "=", " ", 
  RowBox[{"x", "^", "2"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1", ",", "4", ",", "9", ",", "16", ",", "25", ",", "36", ",", "49", ",", 
   "64", ",", "81", ",", "100"}], "}"}]], "Output",
 CellChangeTimes->{3.419291874271874*^9, 3.419292141652687*^9, 
  3.4192922454469624`*^9, 3.4192923084147673`*^9, 3.419292996006402*^9, 
  3.419297122960926*^9, 3.419990670349042*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"x", ",", " ", "y"}], "}"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      ",", "9", ",", "10"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "1", ",", "4", ",", "9", ",", "16", ",", "25", ",", "36", ",", "49", ",", 
     "64", ",", "81", ",", "100"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.419291874355048*^9, 3.419292141753063*^9, 
  3.419292245560853*^9, 3.4192923085425043`*^9, 3.419292996174061*^9, 
  3.419297123061326*^9, 3.419990670451426*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"data", " ", "=", " ", 
  RowBox[{"Transpose", "[", 
   RowBox[{"{", 
    RowBox[{"x", ",", " ", "y"}], "}"}], "]"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"1", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2", ",", "4"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"3", ",", "9"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"4", ",", "16"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"5", ",", "25"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"6", ",", "36"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"7", ",", "49"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"8", ",", "64"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"9", ",", "81"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"10", ",", "100"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.4192918744418488`*^9, 3.4192921418370543`*^9, 
  3.4192922456770983`*^9, 3.41929230865567*^9, 3.4192929962405577`*^9, 
  3.419297123161016*^9, 3.41999067055063*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", "data", "]"}]], "Input"],

Cell[BoxData[
 GraphicsBox[
  {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
   PointBox[{{1., 1.}, {2., 4.}, {3., 9.}, {4., 16.}, {5., 25.}, {6., 36.}, {
    7., 49.}, {8., 64.}, {9., 81.}, {10., 100.}}]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{3.419291874521599*^9, 3.419292141920432*^9, 
  3.4192922457895603`*^9, 3.4192923087501173`*^9, 3.4192929962902527`*^9, 
  3.419297123262106*^9, 3.419990670633862*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"r", " ", ":=", " ", 
  RowBox[{"If", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"Random", "[", "]"}], " ", ">", " ", "0.5"}], ",", " ", "1", ",",
     " ", 
    RowBox[{"-", "1"}]}], "]"}]}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{"r", ",", " ", 
   RowBox[{"{", "10", "}"}]}], "]"}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"1", ",", "1", ",", "1", ",", "1", ",", 
   RowBox[{"-", "1"}], ",", 
   RowBox[{"-", "1"}], ",", "1", ",", "1", ",", 
   RowBox[{"-", "1"}], ",", "1"}], "}"}]], "Output",
 CellChangeTimes->{3.419291874724016*^9, 3.419292142023261*^9, 
  3.419292245902343*^9, 3.419292308867956*^9, 3.419292996419457*^9, 
  3.4192971234130774`*^9, 3.419990670765758*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Clear", "[", "x", "]"}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"rwalk", "[", "n_", "]"}], ":=", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"x", "[", "0", "]"}], "=", "0"}], ";", 
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"x", "[", "i", "]"}], "=", 
       RowBox[{
        RowBox[{"x", "[", 
         RowBox[{"i", "-", "1"}], "]"}], "+", "r"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ";", 
    RowBox[{"ListPlot", "[", 
     RowBox[{
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"i", ",", 
          RowBox[{"x", "[", "i", "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "0", ",", "n"}], "}"}]}], "]"}], ",", 
      RowBox[{"Joined", "\[Rule]", "True"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"\"\<t\>\"", ",", "\"\<x\>\""}], "}"}]}]}], "]"}]}], 
   ")"}]}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"rwalk", "[", "10000", "]"}]], "Input"],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], PointSize[Large], Thickness[Large], 
    LineBox[CompressedData["
1:eJxs3X94l2X5N/BFZIuIphEtI1pEuIhoIuJExImIExEnIk5EnIQ0EXUq4kTE
iYgTESciTkSciDgRcSLiRLRlZMvIlpEtI1pGtIxsEdEisud4nl2nx/F5Hc/3
j++O83j1Pq/zuu77c3/2i/nV6ddOvKJbVlbW0cdlZf3fj////+s4LfNjVlHm
x+yiTM/Be/O/y8X74nlFmX3602cAfQbSJx8fhA/Gh9C/AD+e/FDmPAEfRv5E
+g9PH2N/J+GF5E/GR5A/JX2M8xuJn0p+FH4aXpTpVUX46fjp+OjM+atG42fg
Ucf5jcGjjvyZrB917H8sHnXkz8LPwotZP+qY7+z0MV3/qrPxcXjU/dPHc9LH
dB9XnYOPx8fj5+Ln4hPwCfh5eNTxOipJH9PrqCjq9Dqqijq9jprwrPPJn5/p
VVFHPup4HU7M9KKoI4834VkXkI869a/Cm6KO/CTykzK9Cm+KOua/MH1Mz5Gi
CzO9Cm/CsyazftSxftTpfJuijut3UaYXRR15vAnPKiUfdepfFXW6f5qi7p8+
XpzpRVFHHm+KOvJT0sf0+imKOr2+qvAmPOuS9DG9fosuyfSqqCMfdaw/lfWj
jnzUqX8TnnUp61+a6VV4E541jfWjTvNVRR3nF3Vc/8syvSjqyEcd+8ezyjI9
ryzTi6JO/cvwKrwOb6J/G551eWY+L+q0v6Ko0/1ZhlfhdXgT3oZnTc/0vOmZ
XoSX4VV4Hd6Et0Udr7/vpI/p9Z8XdXo+FEWdnh9leBVehzfhbVHH5zkz0sf0
eU5e1OnznCK8DK/C66JO/ZvwNvJZV7B+1ClfhJfhVXhd1Kl/U9Tp87Q2PGsm
60cd6+NlUcf+o07966JOnwc24W141nczPS/qOP+oY/2oY/9Rx/XHm8i34Vnl
mZ4XdayPl0Ud6+N15JvwNjzryvQx9h91Op8ivAyvwuuijvWjjvXxrFmZnjcr
04uijvWjjvXxOvJN9G+LOs7/qvQxXb+8qzK9CC+LOl7/UafnRx3eRL4Nz5rN
+lHH+nhZ1LF+1LE+3oS3RR3Pv6vTx3j+Xp3pRVGnfFnUsT5ehzfhbfTPuob1
o47nf9Tx/odXka+LOvVvijrWjzrO/9pMz7s204vwsqjj8zu8Dm/C2+ifVZHp
OVGnfF7UaX8FeBH5kqhT/7Ko0/1TEXU8P6JOr4+aqNPrpw5vwJvwFrwt6vT6
7MCzrsvM50Sd5svDC/CiqNP+SvAy8hVRx/sHXkO+Dm8g34S34G14B551fabn
RB37xwvwoqhj/1HH9ccryFfhNeTrok73V0PUcX/jLXhb1On+7cCzbsjM59yQ
6XlRx/2PF+ElUafnQ1nU6flRgVeRr8Hr8AbWb2L+FrwN78Cz5mT2z4k6rZ+H
F0Qd+486Xv9Rx/XHK8hX4TXk66JO90cD3kS+hf5teAf5rBszPefGTM/DC/Ci
qOP+jzpe/3gF+Sr61+B15Bvo3xR1vP6jjtd/1PH8w7PmZnpO1Onzm7yo0/cx
C6JO38cswkvIl+EVeBXr10Qdz3+8gXwT3oK34R30z7op03NuyvS8qOP5hxfh
JXgZ/SvwKvI1eB3eEHVcf7wFb4s63T8deFZlZj4n6tg/XhB1PP+jjvs/6nj9
Rx2v/6jj9Y/XkK+jfwPrN+Et5NvwDjzr5sz1c6KO5z9egBfhJXhZ1On5WRF1
PP+jTu8PNVH37/pYF3X6/kkD3kS+BW8j34Fnzcv0nHmZnocXRJ2+f1WEl+Bl
eAX9q/AavA5vwJuijv1Hnc63Lep4/4863v9uSR/j+t+S6Xl4QdTx/I867v+o
4/kfdXz+h1fhNXgd/RvwJryF+dqYvwPPmp+Zz5mf6XlRx/7xIrwEL6N/BV6F
1+B19G+IOj7/wVvwNrwDz7o103Oijv1HneYriDqef1HH8z/qeP7jFXhV1PH+
h9fhDVHH+1/U6f21Jer0/twWdfo5Y0fU8XPGBelj+jljTtTp54x5UaefMxbg
ReRLok79y/AK8lV4DV7H+g14E/kWvI18R9Txc9LbMj0n6tg/XhB1yhdFnX7O
WoKXka+gfxVeQ74ObyDfhLfgbXgHnlWVPqbzy67K9JyoUz436jRfHp6PF+CF
9C/Ci/ES5iuNOu4vvJx8BV6JV+HV9K/Ba8nXMX89+2+IOt0fjXgT+Wb6t7B+
K96GtzN/R9Tp9d+JZ92emc+OOq5/1HH9o47rH3XaX37U6fcMCqJOv1dQmOr4
PYMivBgvwUvpX4aXk6/AK/Gq8PR7DdXhqa7Ba8nX0b8eb8Abmb8Jbybfgrfi
bXg73sH8newva2H6OLrrY3aq4/c4cvBcPA/PD0/9C/BC8kV4MfmS8FSX4mV4
OV5B/0q8inx1eDq/GrwWr8Pr8Qa8kfWbmK8Zb8Fbw1PdFp5+r6Yd78A78aw7
Mvtn35G5fg6ei+eFpzo/PO2/AC/Ei8Lj9R91en2U4KXky/ByvIL1K/Eq8tWs
XxN1er7VRh3vz3g9+Qa8kXxT1PH8x1vIt9K/DW/HO/BOPGtRpmdHndbPiTqe
/3ge+fyo4/mPF+JFeDH9S1i/NOr0/lSGl+MVeCVeFXW8/+M15GuZrw6vxxvw
RryJ/TdzPi14K/k2+rfjHeQ78aw7Mz076rR+TtTp9ZGb6nj95OH55AvwQvJF
4en1WRwez3+8lHwZXk6+Inx018dKvAqvxmvwWrwOr8cb8MbwVDeFp+dzc3iq
W/BWvC08/d5ke3iqO/BO8lmLM/tnL870HDwXzwtP/fPxArwwPNVF4en3Oovx
EvKleBlezvoVzF+JV+HVeA1ei9fh9eGjuz424I3km5i/GW8h34q34e14B97J
fFl3ZXr2XZmeE57q3PB4/w+P9//weP/HC8kX4cV4CeuXMl8ZXk6+gv6VzFcV
Hu//Ucf7P16L10Ud7/94A/lGvAlvxlvo34q34e1Rx/Mf78SzqjM9O+p4/uO5
Ucf7f9Tx9X/U6f2zAC/Ei6JO77/FeAleipfRvxyvwCuZvwqvxmvwWrwOr8cb
8Ea8ifNtxlvIt+JteDvegXdyPll3Z3p21PH5H56L5+H5eEHU8flf1PH5X9Tx
+X+qP/r6Pzze//Ey8uX0r2D9SuarwqvxGryW/nWsX4834I3M38T+mvEW8q14
G/n28FR3hI/u+tgZnuqsJZmevSTTc8Lj/T883v/D4/0/PNUF4en9vRAvwovD
U10Snv5dRyleRr4cr8Ar8Sq8mvlq8FrydXg93oA30r+J82vGW/BWzr8Nb8c7
uH6deNY9mfnsezI9B8/F8/D88Lj+4XH9w1NdhBeTL8FLyZeFp/ujPDzVFeHp
3/1Uhqe6Kjz9u5/q8FTXhKd/91OL15GvxxvwRtZvYr5m5m/BW8m30b+d9TuY
vxPPWpqZz16a6TnhKZ8bnuo8PJ98Af0Lw9P8RXgxXhKe6lK8jHw561fglXgV
Xk3/GtavxevI1+MNeCPeRP9mvIV8K96Gt7O/DryTfNa9metnpzruv5zwVOeG
p9dfXniq8/ECvBAvwovxEtYvxcvIl4en50dFeKor8Sq8Gq+hfy1eR74+PD0f
G8Lj67/w0V0fm8JT3Yy34K14G/3b8Q68E89alunZyzLnz8Fzw1M+LzzV+eHx
/f/w+PovPL7/Ex6f/+El5EvxMryc9SuYr5L5q9hfNfuvCU/Xtxavw+vDU90Q
Hu//4aluCk/3d3N4PP/xVrwNb6d/B96JZ92XOV/2fZmeg+eGp/3lhcf7f3h8
/wcvxIvwYrwEL8XLwlNdjlfgleGj08fwVFfjNXgtXkf/eryBfGN4/PwHbybf
Qv9WvI18O96Bd7J+Vk36mOruqY7XV3Z4qnviOXhvPBfvG3X6+igv6vT11QA8
n/xg+hfgw8gX4iPxInwMXoyPZ/0SfBJeik/Fy/AZrF+Oz8Yr8Dn0r+T6zg+P
73+Hj+76uAivxpeGp7omPN2fK/Ba8qvxOvLrwuP1hG/EG/At9G/Et5Nvwnfg
zeHp+bMzPL4+C0/Px13hqW4NT8/f3Xgbvjc8nuf4fvIdrH8Q78SP4Fn3Z3r3
+zM9Ozyt3xPPwXuHx+eLeF/yeaw/IDzeT8JTPRgvID8MLyQ/Mjzef/Ax5Ivx
8eRL8EnkS/GpeBk+Ay/HZ7N+BT6HfCU+n3xVeKoX4dX4UrwGX4HXsv5qvA5f
h9fjG9lfA9d/C95Ifjv9m5h/R/joro/N4aneibeQ34W34rtZv4359jJ/O/vb
j3eQP0j/TvwInrU807svz/Ts8FT3DE/7y8F7k8+lf9/w+PwRH0A+Hx+MF+DD
8EJ8JF6Ej8GL2d949l+CT8JLw1M9NTx+fyk81TPC4/vZ+GzyFfSfw/qV+Hy8
Cl9E/2rWX4rXkF+B15Jfzf7q8HXk6/GNeAPrb8EbyW/Hm8jv4Hya8Z3kW+i/
i/21hqd6N95Gfi/921l/P95B/iDeiR/Bsx7I7N/9gUzPDk91TzyHfG88l3xf
PI/8ADwfHxye6oLw9PobhhfiI/EifAxezPrjma+E/U3CS8lPxcvwGXg5Phuv
YP054fH5Pz6ffBW+CK9m/aWcTw3ntyI83v/D4/0/PL5/Fp7e39bh9fjG8Pj5
Cr4Fb8S34034DtZvZv6d7K8F34W34rvp38b6e/F2fD/zd+AH8U78CP2zVmTO
131FpmfjPcPj+4Ph8f4fPrrrY254qvuGx+s/PNUD8Hzyg/EC8sPwQvIj8SLy
Y8Lj+5H4eLwkPL7+x0vJT8XL8Bl4OT4br2D9OVGn7w9U4vPJV+GLyFdHnb4/
sxSvwVfgtfjqqOP3J6JOvz+wLur0+wn1Uaff/9gYdfr3Cw34FrwR3443RZ3+
fcSOqNO/n2rGd+It+C68Ner077N24234Xrwd3493sP5BvBM/gmc9mOndo07n
kx11Or+eeA7eO+p0/XKjTte3b9Tx+yNRx/f/8Hzyg/ECfBjrF+Ij8SJ8DF6M
j8dL2P8kzqcUn0q+DJ9BvpzrMxuvwOfglfh8vIr1F+HV5JfiNfiKqNP9VRt1
un9X43Xk19G/nvk2cn4NXJ8teCO+nfunCd+BN3N/7sRb8F14K/134234Xrwd
3493sP7BqNPztzPq9Hw/kuqP/s7rykzvHnXKZ+M98Ry898rM/rnh8fk/nkd+
AJ6PD8YL6D8sPN7/w0d3fRyJF5EfgxeTHx+e6hJ8EvlS+k/Fy8jPwMvJz8Yr
8DmcTyU+H6/CF+HV+FLWr8FX4LXsbzVeh6/jfOvxjeQb8C3kG8Pj+//h8f2/
8PT57Y7w+Pw/PH3+vDM81S34LvKt9N/N+m34Xryd+ffjHeQP4p34EebLeihz
/u4PZe4vOzy+/4/n4L3D4/v/4en3S/qGpzoPH0A+Hx9MviA8/X7LsPD4faPw
9PtJI8NTXYSPwYvx8XhJePq7z5PwUnwqXkb/GXg5Ppv9VbD/OXgl+fl4Fb4I
r8aXMl8N+1sRnura8PR3r1fjdfi68FTX4xvJN7D+FryR/Ha8ifwO9tfM/ndy
Pi2c/y7uz1Z8N/k2fC/5du7//XgHfpDXTyevzyN4Vm1mvnttpmeHx+sfz8F7
47n07xser398AJ6PD8YLwuP1jxeSH8l8RfgYvJj9jQ+P308LT/UkvJT8VLwM
n4GX47PxCnwO81eyv/mcTxW+CK/mfJfiNeRX4LXkV+N1+Dq8Ht+IN+BbwuP3
LfHteFN4en3vwJvxneGpbsF34a3h6fmyOzzVbeHp+bQ3PNXt4em/C7Af7yB/
kP6d+BE86+HM+bo/nOnZeM/wtL8cvDeeG57qvuHpfPPCUz0Azyc/mP4F+DDy
hfQfiRfhY/BifHx4/H4yPgkvxafiZfgM1i/HZ+MV7H8O51OJz8er8EV4Nb6U
9WuYbwX7qw1P9erw9HyqC0/1Orye/Eb6N+BbyDfSfzveRH4H3kx+J96C78Jb
6b+b+ds4v714O/n9eAd+EO/EjzBf1qrM+bun+qPP/8NT3RPPwXuHx78Xwfvi
eeHx8388n/xg1i/Ah+GF7G9keLz/h8f7P16Mj8dL6D8JL8Wn4mX4DOYvZ3+z
OZ8Kzm9OePy+Kz6ffBX9F7F+NfMtxWvIr8Brya/G6/B1eD39NzJ/A/vbgjeS
3443kd+BN+M7Od+W8Pj9n/DRXR9b8d14W3iq9+Lt+P7w+Pk/fpB8J34Ez3ok
07s/ktk/Ozx+/o/nkO+N55LvGx7f/wuP7//h+fjgqOPvS0Sdvv85LOr0/dHC
qOP7/3gRPgYvpv941i/BJ+GlzD+V/ZXhM/ByfDb9K/A5eCU+n/5V+CLy1fhS
vAZfgdfiq1m/jvtjHV6Pb8Qb6L8Fb8S3M18T128H178Z34m34Lvo38r6u/E2
8nvp3879uT/q9PONjqjTz0cORp1+ftKJH8GzVmd696hT/2y8Z9Tx87+o089v
ekedfr6TG3X6+U/fqOPvS+MD8Pyo09+/HIwX4MOiTn8/szDq9Pc3R0Ydf78z
6vT3Pcfgxfj4qNPfBy3BJ+GlUae/Lzo16vj7wFGnv087Ay/HZ+MV+Jyo09+/
rYx6QNfH+XgVvijq/l0fq6PO6/q4FK8hvwKvxVfjdfRfF3X6+8H1+Ea8Ad9C
/0Z8O/mmqNN/n2tH1Om/D9gcdfrvB+6MOrvrY0vUWV0fd+Gt5HfTvw3fi7cz
337m78AP4p34EfpnPZrp3R/N9Oyo03w9o077y4k67b931Om/D5qL98XzPvKu
/xuA55MfzPoFzDcML8RH4kX4GLwYH4+XMN8kvJT8VLwMn8H5l3N9ZuMV5OfQ
vxKfT74KX0S+Gl+K17D/FVy/Wq7v6o/8e//vQ91H3vT//v86vB7fiDfQfwve
SH473oTv+Gh/XXUzvpN8C74Lb8V34234XtZv/+j8u+r9H12/rroDP0i+Ez9C
PmtNpnePOuWzo07z9cRz8N5Rp/3lfuRd/9f3I0+vf3wAno8Ppn8B6w/DC8mP
xIvIj2F/xfh48iX4JPKl+FTyZcw3g/2Xf+RdH2fjFeTn4JX4fLyK/os+mr/r
YzW+lHwN/Vewv1r2v5rzqcPXka/HN5Jv4P7dEnW6vxvx7XhT1Lld9Q68mfxO
vIX8rqj7dtWt+G7ybfTfi7eT30//jqjzuuqDeCd+JOr+XXXWY6ke0FV3j3pg
V52N98Rzos7vqntHPairzo16cFfdF88jPwDPxwfjBfQfFvWQrrow6oKueiRe
RH4MXoyPx0voPynq47vq0qiHdtVToz6hqy7DZ5Avx2eTr8DnkK/E5+NV+CL6
V0c9rKteGvWJXXUNvgKvjXp4V70ar8PXRX1SV12Pb8Qboi7sqrdEfXJX3Rj1
iK56e9SndNVNUY/sqndEfWpX3YzvJN9C/114K74bb8P34u2sv5/5OvCD5Dvx
I+Sz6lI9qqvuVpfp3fGj8Gy8B94z6rR+r6jTfDn4MeR7433I5+LH4n3xfvTP
w/uTHxB1uj4D8Xx8ED4YH4IXsP5Q5hvG+Q6P+rSuuhAfQX4k/UfhRfhofAw+
lvmL2d84fDz5CfQvYf6J7G8SPpl8KT6F/NSoi7rqaXgZ+en0n8H8M9lfOfuf
hc8mfw39K/Dryc/B5+KV+Dx8PvMtwKvIL2S+RZzPYs6vGl+CL+X8l+E1+PJU
V6V6RfjpXfXK8FTXho/uqlfhq/E1eB391+Lr8PV4Pb4B38j6m8JT3YBvxrfg
W+nfyPrb8O34a3gT/V/Hd+Bv4M30f5Prt5Pr+xbeQv5tfBf5d7h/Wrn/3sV3
43u4v9vw98jvxffh7cz3PvPvZ38fcH4dnO8Brv9B/BDeGX5GV30YP0L+Qzzr
8cx8t8czvXt4qo/Cs8n3CE91z/AxXXWv8FTnhJ/ZVR8Tnure4WO76j7hqc7F
jyXfF+9HPg/vjw8IP6urHhie6nx8EPnB+BDyBfhQ8sPw4XghPoL+I8OLu+pR
4akuwkfjY8LP7qrHhqe6GB+Hjw8f11VPwEvwifgk+k9mvlLmn4JPJT8NL8On
s/4MfCb5ctafxfnP5vpcg1eQvx6fg89l/Urmm8f88znfBXgVvjA81YvwxeSr
WX8JvpT8MvrX4MvxFeHndNUrw1Ndi6/CV+Nr8Lrw8V31Wnwdvh6vxzeEp3oj
vglvwDfjW8LP7aq3hqe6MXxCV70N307+Nfo34a/jO/A36N+Mv4nvxN/CW5j/
bXwX/g7eir8bnurd4ed11XvwNvLv4XvJ7wtPdXt4SVf9fqqLUr0//vep/gDv
IH8AP4gfwjvpfzjVTak+Evnzu+oPI5/qrLWZ3m1tpndPdVWqj8Kz8R6pbkp1
T7wXnoMfQ//eeB88Fz8W74v3w/Pw/sw3INVZE7vqgZFPdX7kUz0o8qkejA/B
C/Ch9B/G+sOZrxAfgY+M/qkeFf1TXYSPxsfgY/HiWD/V4/Dx5CcwXwk+EZ/E
/ibjpfgUfCo+LeZLdRk+nfwM5psZ+VSXRz7Vs/DZ+DV4Bf2vZ/05+Fy8kvnn
4fPxBbF+qqvwheQX4YvxanwJ/Zfiy/AafDm+Al+J1+KrmG91quP81kQ+1XX4
Wnwdvh6vj/VTvSHWT8/fjfgm8g3034xvIb+V/o2RT/W2yKd6O/4a3oS/ju/A
38Cb8TfxnfhbeAv+Nvvbhb9DvhV/l/xufA/eluo43/eif6r3Rj7V+yKf6vbI
p/vvfXw//gHegR/AD7L+IbwTP8z8R/APyWc9kendnsjMd091nM9RqY7zy458
qnvgPfFeeA5+TKyf6t54HzwXP5b+fZm/H/vLY//98QHkB+L55Afhg/EheAE+
NOZP9TB8OF6Ij6D/SHwUXoSPpv8YfCxejI+j/3h8AvkSfCI+CZ+Ml+JT8Kn4
NOYrw6fjM/CZeDk+C5+NX4NX4Nfjc/C57K8y7s94/498qudHPt7/Ix/v//hC
fFH0v6CrXoxXk1+CL8WX4TX4cnwF66/Ea/FVsf9Ur47+qV4T+VTXRX5SV702
8qleh68nX0//DfhGfBPzNeCbyW/Bt5JvxLeR346/Rr6J83sd30H+Dfo3cz5v
4jvxt/AW+r+N7yL/DtenNfKpfhffje/B2+j/HuvvZb59nE87/j6+n/P9gPu3
Az9A/iD9D+Gd+GH8CP4hnrUu07ulOvbfPdVxPkfh2XiPVMf59oz+qe4V+VTn
4MeQ7433wXPxY+nfF+9HPo/5+7O/AfhAPJ/zGxT9Uz048qkeEvn4+j/y8fV/
5OPrf3w4XoiPoP9I1h+FF5EfjY/Bx+LF+Dh8POtP4HxK8In4JHwy/UtZfwo+
lfw0vAyfjs+g/0y8HJ/F9ZmNX0O+Ar8en4PPxSuZfx7nN5/7cwFeRX4h/Rfh
i8lX40vwpay/jNdPDb6c/Ap8JflafBX51fgavI751+Lr8PWcTz3XZwO+kfwm
vIH8ZnwL+a14I74N307/1/Am/HV8B/3f4Hya8TfxnZz/W1y/FvxtfBf+Dv1b
8XfJ7+b5vYfnfxvvD+/he/F9eDv+Pu8/+2P9C7vqDyKf6g78APmD+CG8Ez+M
H2G+D5k/68lM7/ZkZr77k5n9j8KzyffAe+K98Bz6H5PqOJ/eeB/yufQ/Fu9L
vh+eR74/PoD8QDyf/KCYP9WDI5/qIXgBPhQfRv/hrF/IfCPwkfgovIj+o1l/
DPONxYvJj8PH4xNYv4T5JuKTyE+mfyk+BZ+KT8PL8On4DHwm85Uz/yx8Nvlr
6F+BX09+Dv3n4pX4PF4/8/EFeFWsn+qF+CLyi/FqfAnzLcWXka9h/eWRT/WK
yE/uqlfitfiq6J/q1dE/1Wsin+o6fC2+Lvpf1FWvx+vJb2D9jcy3ifkb2P9m
zmcL57eV823k/tnG/bUdf418E/1fx3fgb+DN+JvMvxN/C29h/29zPrs4v3fw
VvLv4rvxPXgb/d/j+u3F95Fvp//7+H78A7yD/gfwg/ghvBM/zPxH8A/xrPWZ
3m19pnfHj8Kz8R54T7wXnpPqeP0cg/fG++C59D8W70u+X6rj9ZsX+fT67o8P
wAfi+figWD/Vg2P9VA/BC8gPxYfhw/FC+o/AR5IfxfxFnM9ofAw+Fi+m/zh8
PD4BL6H/RK7fJHwyXsr1nxL90+tjauRTPQ0vw6fjM+g/k/XL8Vn4bOa/hv1X
4Nfjc/C5eCU+j/Xn4wvwKuZfyP4X4YvJV+NL8KWsvwyvIb+c9VdwfVZGPt7/
8VXkV9N/DevXMd9afB359fSvZ/0N+Ebym/AGfDO+Bd+KN+Lb8O34a3gT87/O
+e7A3yDfTP838Z3k36J/C/42vgt/h/6trP8u1283vgdvw9+j/17W34e3k3+f
/vvxD/AO/AB+ED+Ed3L/HsaPkP8Qz3oqM98t1fF86Y4fhWenOp7vPfCe5Hvh
OeSPSXW8f/XG+5DPpf+xkY/3f7wfnof3xwfE+qkeiOfjg2K+dH8Mjv6pHoIX
kB+KD8OH44X4COYbiY8iX8R8o/Ex+Njon+ri6J/qcfh4fAJegk+M9ePr/1g/
vv6PfHz9j0/Bp0b/+Po/+qfvD5ZFPr7/H/lUz4h8qmdGPr7/H/n4/n/k4/v/
kY/v/0c+fv4f+fj5Pz6H/Fz6V+Lz8Pn4AvpXsf5CfBG+GK/Gl+BL8WUxX6pr
Yr5UL498+v2dFfhKvBZfha/G17B+Hb4WX8f86/F68hvwjeQ3cT4NXJ/NXL8t
+Fbyjfg2fDvrv4Y3kX+d9Xfgb+DN3P9v8vrYyevnLV5fLfjb5Hfh75Bvxd/F
d+N78Db8PXwvz4d9PD/aeb68j+/HP8A76H+A9Q8y3yG8Ez+MH6H/h6yfVZ85
X7f6TO9en5k/qj6zfzbeg3xPvBeegx9D/94xX6r74Lnkj6V/X7wfnsf+++MD
8IF4Pv0H4YPxIcxfgA8lP4z1h0c+vv+Pj8BHRv9Uj8KL8NGxfnz/P/rH+3/k
4/0fH0d+PP0n4CX4RHwSPhkvZf0pzDcVn4aX4dPpPwOfSb4cn0V+Nn4NXsH+
ruf6zOH6zsUr8XncP/PxBeSrWH8h8y3CF5OvxpeQX4ovw2s4n+Wc7wp8Jfla
+q/CV5NfQ/86fC35dfRfz/7r8Q34RnwT3sD12Yxvwbfijfg2fDv+GvdHE/46
vgN/g/7N+Jvkd/J8e4vnXwvP97fxXeTfoX8r67/LfLvxPXgb/h6+l+u3D28n
/z6+n/wH3F8d+AH8IPfnIbwTP8z9fST6p/rDyKc66+mUj6//U/3R9//xo57O
zGfjPfCeT2eu3yv6pzoHPwbvHf3j5//RP+0/N/KpPjbyqe6L98Pzon+8/0f/
eP/HB+L50T/e//HB+JBYP97/8aH4MHw4XoiPwEfio5ivCB+Nj2H/Yzm/Ys53
HNdnPD4BL+H6TsQn4ZO5P0rxKeSn4tPwMnw6/Wdwf87Ey8nPwmeTvwavwK/n
9TOH19dcvJL8PPrPxxeQr6L/Ql7/iyIf3//Hq8kvwZfiy/AafDm+gvVXxvyp
rsVXkV9N/zXsvw5fi6/D19O/Ht9AfiPnv4nr04Bvxrdwf23FG8lvY/3tzPca
8zfhr+M7ON838Gb8Ta7PTvwtvAV/m/678HfIt8b86fvD7+K7ye/B28i/F+un
ei++D2/H36f/fvwD8h34AfIH8UPkO2N/qT6MH8E/jP6pztqQ+pd21d1SXZTq
7vhReHaqq1LdI9VNqe4Z+Yu76l54Dn4M3pv+ffBc8sfiffF+MX+q8/D++IBY
P9UD8Xx8UKyf6sH4ELwg1p/SVQ+N/qkeFvlUD498qgvxEeRH0n8U6xcx32j2
NwYfS76Y/uNYfzw+AS/BJ9J/Ej4ZL8Wn4FPxaaxfxvlN53xnRP6SrnomXo7P
iv6pno1fg1fE+qm+Pvqneg4+l3wlPo/8/Fh/ale9AK8ivxBfhC9m/Wr2t4Tz
WYovw2vw5fRfga8kX4uvIr8aX4PX4Wvpvw5fT74e34Bv5Pw24Q34ZnwLvhVv
xLfh2/HXuL5N3B+vRz7VOyKf6jfwZvJv4jvxt1i/BX8b34W/Q/9W5nsX343v
if6pbov+l3bV70U+1Xsjn+p9kU91O/4+vh//AO/AD7D+QfwQ+c6Yf1pXfTjy
qT6Cf0g+65lM7/ZMpnfHj8Kzn8mcr8czmfP3xHuRz6H/MXhvvA+eix+L98X7
4Xl4f3wA8w/E88kPwgeTH8L5FOBD8WH4cPoX4iPwkcw3Ci8iPxofQ35szJfq
4sinehw+Hp+Al9B/IutPwieTL6X/lMineio+jXwZPp38jFj/sq56Jl6Oz4r+
qZ4d/VN9DV5B/nr6z2G+ucxfic8jPx9fQL6K813I+S/CF5Ovpv8S1l+KLyNf
gy8nv4LzWYnX4qs439Wc/xq8Dl8b/VO9LvqXddXr8XryG+i/Ed+EN+Cb6b+F
9bfijeS34dvJv4Y3kX+d+Xbgb5Bvpv+b+E7yb9G/BX8b38X1fYfr34q/i+/G
9+Bt+Husv5f59rG/dvb/fqrzUr0f/wDvwA/gB2OeVB/CO/HD+BH6f4hnbczM
d9uY6d03ZuaPwrPxHnhPvFeq4/xyUh3ne0zMk+rekU91HzyX/LH078v6/Zgv
j/33xweQH4jn44PwwfQfgheQH4oPIz881WWpLsRH4CPxUfQvYv3R+Bh8LF6M
j+P8x3N9JuAl5Cfik8hPxkvJT8Gnkp+Gl+HT8Rn0n4mX47M4n9n4NXgFfj39
5zDfXO7/Sl4f8yIf7//4AvJV+ELyi/DF5KuZbwnzL8WXka/Bl+Mr8JX0r+X8
VuGrya+hfx2+lvw6fD1ej2/ANzLfJryB/GZ8C/mt3D+N+DZ8O6//13g+NMX6
qX491XWp3oG/gTfHvPH+n+q2VO+M+S7vqt/CW8i/je/C38Fb6f9u7D/Vu2P/
qd6Dt+Hv4XvxfXF+qW7H3ye/n/k+YP4O9ncAP4gf4vw78cP4EfxD+mc9m+nd
ns3Md091XP+jUh33T3aq4/7qkeqP3v9T/dH7f6wX7//4MeR7433I58Z88f4f
88T7f+RT3S/y6fmWh/cnP4D+A1k/Hx+ED8aH4AX4UNYfxnzD8ULyI/CR5Eex
/6LIp3p05FM9Bh9Lvpj+41h/PD4BL8En0n8S60/GS8lPwafi01i/DJ+Oz+B8
Z+Ll+Cyu72zu32u4vyvw6/E5vL7m8vqrxOfh8/EF9K9i/YX4Inwx+6vGl+BL
OZ9leA2+nPNdwfVZyfWt5f5Yxf27Gl+D10X/VK/F15Ffz/r1zLcB30h+E/0b
8M3kt+Bb8UZ8G74df431m9j/65FP3//ZEflUv4E3k3+T/jvxt8i34G+T34W/
g7eyv3fZ/26uzx7urzbuv/e4P/fi+/B27v/38f34B7y+OvAD+EFev4d4fXfy
/nwYP4J/yPt71qZM77YpM98dP2pTZj4b74H3THV8ftEr1fH5R06q4/OjY1Id
nz/1xvuQz8WPxfuyfj/my8P74wPwgXg+PggfjA9hvgLmH4oPIz+c/oWc/wh8
JPlReBE+mvXH4GPJF+PjyI9nfxO4viX4RPKT6D8ZL8Wn4FPxaXgZ609nvhn4
TLwcn0X/2fg15Cvw68nPYf65eCU+D59P/wV4Fb4QX0T/xVz/anwJ+aX4MvI1
+HLyK5hvJV6Lr8JX038NXkd+Lb4OX8/1q8c3kN/I+pvwBnwz57MF34o34tvo
v535XmP+plTH16+vx/M/1Tvi+ZLqN/Bm/E18J/5WzJ/qFvxt8rvwd8i3xv7j
6//Yf3z9H/uf3lXvwdvw9+J8Ur03zifV+/B2/H18P/0/wDvwA8x3kP0dYv+d
nM9h/Aj5D+mf9Vzm+t2ey5yvO34Unp3q2H8PvCf5Xs9lrp/zXOZ8xzyXOX/v
5zL31yfVcX/kxvrx/h/rp7pvrJ/qfnge3h8fQP+BeD75Qfhg8kPwAvJD43zi
/R8fTr4QH4GPxEfRvwgfTX4M84/l/IvxceTH4xPwEtafyHyT8Ml4adw/8f6P
T8Wn4WX49Lj/Uj0j7r9Uz4z9p7o89pfqWbG/eP/Hr8ErYn/x9T8+h/xcvBKf
x3zz8QV4FftbiC8ivxivxpfgS/FlzF/D/pfH9Yiv/2O++Po/+sX3/yOf6lX4
anxN9I+v/6N/fP2Pr8PX4/X4hlg/vv6P9ePr/8inr38b8M34luif6q3RP9WN
kU/1Nnw7/lr0T7//1oS/Tn4H67+BN+NvMv9O9vcW59PC+b2N7yL/Dt6Kv8v6
u/E95Nvw98jvxfeRb8ffx/ezvw+4fzrwA/hB7t9D3N+d+GHyR+j/IZ7VkJn/
WENm/26pjtffx1Mdr8/ukU+v30+kOl7fR0W/VH8y1fF8yMY/Rb4H/T/N+j2Z
7zN4L/yz7C+H/R+NH0P+c/TvzXyfZ/4+7O8LeC75L9L/WPxL5PviX8b74V/B
8/Cvsn5//GvkB7C/r+MDyR9H/3zO9xuc/yD8m/hgrt+3on+6v4fg38YLon+q
j4/+qR4a+VSfgA/DT8SH0/8k1i9kvpPxEeRPof9I1j8VH0X+NPoXsf7pnO9o
/AzyY+h/JuuPZb6zIp+er8WRT/XZ+Dj8HHw8/c/FJ5A/Dy/Bz8cn0v8C9jeJ
/V/I+UzGL8JLOd+L8SnkL2H9qcx3KfNPY3+XRT7VZZFP9eX4dPw70T99/jAj
+qf6isinembkU/1dvBy/MvrHv6eJ/qm+KvLx72vwq/Fr8GvxCvw61r+e+W7A
55C/EZ9L/ia8kvzNzDcv8qm+BZ9P/lb6L8Bvw6vw2/GF+B34IvxO5lvM/Hfh
1eTvxpeQvwdfit+LL6P/fcxfg99Pfjn9H8BXkH8QX4k/hNfS/2F8FflH8NX4
o+xvDfffY7z+6vDH8bX4E/Rfx/pPMt96/Cm8Hn+a/hvwZ/CN+LP038T5Phf5
9O+7GvDn8c34C/gW/EXW38p8LzF/I/4yvg1/Bd+Ov4q/xvX7Ht6Efx9/nf4/
wHfgP8TfoP+P8Gb8x/ib9P8JvpP8T7l/3+L96Wd4C/mf42/jv2D9Xcz3S67/
O9wfv+L+acV/jb+L/wbfHeun+rexfqr34L/D2/Df4+/hf8D34n/E98X8qf5T
zJ/+fW575FP958in+v3Ip/ov+H78r9E//fvvD/C/ke9g/b/jB/B/4Afxf7K/
Q+z/X3gn+X/jh/H/4Efw/zLfh+z/f3jW85n5jz2f6d2ez8x/PNVxvt0jn+pP
4Efhn8Sz6f8p1u/BfJ/Ge+KfwXvhn8Vz8KPxY5jvc3hv8p+P/aW6D/4FPDf6
p/vji9E/1cdGPtVfinyq++JfxvtF//T8+Aqeh3811k91/+if6q9FPtUD8K/j
A/Hj6J/P+t9gvkH4N8kPpv+38CH4t5mvIPqn5/vxkU/10Min+gR8GPkT8eH4
SXghfjLzjWD+U/CR+KnsfxTndxpehJ+Oj8bPwMew/pn4WPJn4cXkz2Z/4/Bz
8PGc37mc7wT8PPIl9D8fn0j+AnwS+QvxyeQvYr5S/GJ8CvffJdE/1VPxS8lP
o/9leBn5y+k/PfLx9X/kUz0j8qm+IvKpnhn59P2J70Y+/v1s5FN9JT6L/FX0
n41fTf4a/Fq8gvWvi/6pvj7y6fszN+BzyN9I/7msfxNeid+Mz8Nvweez/q3M
t4D5b8Or8Nujf/x7IPwOfBF+J/0X43eRr475U303voT8PfRfit9Lfhn974t8
/P4xfj/55fR/gPVX4A/iK/GH6F/L+g/jq8g/Qv/V+KPk19D/MbwOfxxfS/8n
8HX4k8y3Hn+KfD3rP41vIP8MvhF/lvU34c/hDbx+nsc34y/gW+j/IvNtZX8v
cf81Rj79fORlfBv5V/Dt5F/FX8O/l+r4+UwT/n38dfwH+A78h/gb+I/w5jiv
VP841fHzwTfxn5DfSf+f4m/hP+N8Wjjfn3P93ub6/gLfhf+S++Md/FfkW/Ff
4+8y32+Yfzf7+y3734P/jnwb/X/P+u/hf8D3Mv8f8X3k/8T67fifyb9P/7/g
+8n/Ff8A/xvrd3A+f+f8DuD/wA9yf/6T+/dQrJ/qf6U6fr+oM+ZJ9b/xw/h/
Uh2/v3Qk5ku/H/XfmC9+3w//H/mszZn9P7Y5c/1umzPn//jmzP11xz+BH5Xq
j37+n+o4v2z8U+R74J8m3xP/DN4r1XH9Povn4EfHecTP//HPke/N+p/H+5D/
Av1z4/xS/UX8WPJfwvviX2b9fsz3Fc43j+v3Va5/f/xr5AfQ/+v4QPLH0T+f
++8bqY77cxD+TfKD6f8t1h+Cf5t8Af2Px4fiJ+DD6H8i6w/nfE7CC/GT8RH4
KfhI/FSu/yj8NPJFzH86+xvN/s/g+ozBzyQ/Fj8LL2b9s5lvHH4O+fH4ufgE
/Dy8hPnOxyeSv4D5JnG+F3L+k3l9XoSXkr+Y/lNY/xLmm4pfSn4afhlehl9O
/+n4d/AZnN8V+Ez8u9w/5fiV5Gex/lXMP5vzuxq/Br8Wr8Cv4/pcz/W7gefv
HPxGfC7P95vwSvI34/PI34LPx2+N/aR6AX4bXoXfji+M+eLrf3wR+TvxxeTv
ivnT58fV+N3kl9D/Hnwpfi/nswy/j3wNfj++HH+A/iu4fg/iK8k/RP9a/GF8
Ff4I/Vez/qP4Gvwx7u86/HHya/EnyK/j9fMkr6/1+FPk6+n/NOtvYP/P4BvJ
P4tvIv8c59uAP49v5v58Ad+Cv8j9vRV/CW/EX6b/NvwVfDv+Kv4a+/se3kT+
+8z3Ov4D8jvwH5J/I9ZP9Y/wZvI/xt8k/5NYP/59eeRT/dPIp+8PvxX5VP8s
8vHvz/Gf429H/1T/At9F/pf4O+R/FfPF36/Ff42/i/8G3x3rp/q3+B78dzFf
/P1b/Pfk38P/QH5vzJfqP+L78D/h7fifY/3085P38b/g+/G/0v8D5v8b3kH+
7/gB8v/AD5L/J/Mdinyq/4V3kv83fpj8f/Aj+H9jvlR/GP1T/T8864VM/9gL
md4N/3iq4+ez3VMdP3/+BH4U+U/SPxv/FN4j+qf609E/1T3xz+C98M/SPwc/
mvwx+Ofw3vjn6d+H/X2B88nFv0j+WPxLeF/W/zLz9cO/Qj6P/l/F+5P/Gj6A
/NfxgfhxeD79v8H8gyKfXh/fxAfj38KH0P/brF+AH09+KH4C+WHs70Su73D8
JLwQP5n+I/BTyI/ETyU/Cj+NfBF+OvnR7P8MzmcMfib5sfQ/Cy/Gz2a+cTxf
zol8/PclIp/qcyOffr9mQuRTfV7kU10S+VSfj08kfwE+Cb+Q9Scz30XMX8r+
Lmb/UzifS/Cp+KWc7zT8MrwMv5z+05nvO8w/g/1dgc/Ev8v5lHN+V3K+s7g+
V+GzyV+NX4Nfi1fg1+HX4zcw/xz8RnwufhP9K/Gbyc/DbyE/H7+V/ALO/za8
ivzt+ELyd+CL8DvxxfS/i/mrub5340vwe6J/+v3Bpfi95Jfh95Gvwe8nvxx/
AF+BP0j/lbH/VD+E15J/GF9F/pFYP9WrI5/qRyN/UVe9JvKpfizyqa6LfKof
j/zkrnot/gT5dfiT+HrWf4r56vGn8Q3s7xn2v5HzeZbz24Q/R74Bfx7fzPov
4FvIv4hvxV9ivkau/8vcX9vwV8hvx18l/xqvv+/x+mzCv0/+dfr/AN+B/xB/
g/4/Yv1m/Mfk38R/Qn4nz5+f4m/hP8Nb8J/z/vU2/gt8F/5L/B3eP3+Ft+K/
xt/FfxPzx+//x/rp/fu3kU/1nsin+neRT3Ub/nv8PfwP9N+L/xHfh/8Jb2f+
P+Pv439h//vxv5L/gPX/xv46Ih9f/+MHyP+D/gdZ/5/4IfxfzN+J/5v8Ydb/
D36E/H/xD/H/sX7WltQ/1R/bkundtmTmP74ls393/BP4Ufgn8exYP77+x3uQ
/zTeE/8M3ov+n8VzyB+NH4N/Du+Nf57z64N/gXwu830RPxb/UvSPr//xL+P9
Yv10f38l+qc6L/Kp/ireH/8aPoD+X2f9gfhxeD7zf4P9D8K/iQ/mfL+FDyH/
bbyA/PH4UPInMP8w9nciPpz8SXghfjI+gv6ncP4juT6nRj7VoyKfvn98WuTj
v/+En05+NP3PYP0xzHcm84/FzyJfjJ+Nj2P9c/Dx5M/FJ5A/Dy8hfz4+Eb8A
n0T/C/HJ5C/ifEq5/hfjU8hfQv+prH8p128afhlexvW/nPtjeuTj9/8jH7//
H/n085crIp/qmZGP3//Hy8lfic8ifxU+G7865ovf/8evJV/B+tfh1+M3sP85
nM+NnN9czvcmzr8Svxmfh9+Cz8dvZf0FzHcbXoXfzv4W4nfgizifO/HF+F2c
bzXX526u3xL8Hnwpfi++DL8Pr4n54uf/+HLyDzD/CvxB8ivp/xBeS/5hfBX5
R/DV5B9lvjX4Y3gd/jj917L+E5GP3//HnyS/nv5PsX49/jT5DfR/hvU3Rj5+
/x/fRP45vIH887F+/Pw/8un3C15Idfz+wpbol+oX8a34S3gj/V/Gt+Gv4Nvp
/2qq4/cvXov9pfp7eBP57+Ov4z9g/R3M90PO7w38R+Sb8R/jb+I/wXcy30/x
t8j/jPlauP4/x98m/wv678J/Sf4d/FfkW/Ff4++yv9/gu8n/lvX3sL/f4W3k
f0//9/A/4HvxP9J/H/4nvJ35/szr8338L/h+/K/0/wD/G96B/53+B3h+/AM/
iP8TP0T/f+Gd5P/N8+8w/h/8CP5f/EP8f3jWi5n+sRcz5+v2Yub8H091nF93
/BP4UdE/Xf9Ppjrun+xYL9Wfwnvgn8Z74p/Be7H+Z/Ec8kfjx5D/HPvrjX8e
78P5fIHzzcW/SP5Y/Et4X9b/MvP3w7+C57H/r+L98a+lOt4fBsR8qf56quP3
dwfGvKk+Ds8n/w18EP5NfDD9v5Xq+P3iIfi3yRfgx+ND8RPwYcx3IucznPM7
CS8kfzL9R7D+KexvZFzf9O97To3rF3/vGT+NfBF+Oj4aP4P+Y2J/qT4z9hd/
Lzr2l+qzYn/x96Njf6k+O9aPvycd66e/H34OPh4/F5+Anxfzp7ok5k/1+TF/
qifiF5CfRP8L8cn4RXgpfjE+hfUvYb6pcb6pvhSfhl+Gl+GXx/VJ9fS4Pqn+
Dj4DvwKfSf/v4uX4lfgs+l8V1zfVs/Gr8WvifL/TVV8b55vqijjfVF+HX0/+
BvrPYf0bmX8u+7sJr8Rv5vrM4/rfgs/Hb+X+WcD9dRuvjypef7fjC/E78EX4
nfhi1r+L+aqZ/272twS/B1/K+d3L+S7D78Nr8Pvpv5z1H8BXkH+Q/iu5Px7C
a8k/TP9V+CPkV+OPkl/D/I/hdfjj+Fr6P4Gvw59kvvX4U3g95/M0r68N+DP4
Rl6fz/L63cTr+zm8gfzz+GbyL8T+U70Ff5H8Vvwl8o1xPql+Oc4n1dti/6l+
Bd9O/lX8Nfx7eBP+feZ7nfl/gO8g/0P8DfI/4nyaOf8f42+S/wn9d7L+T9nf
W5zfz+L+SXUL/nP87ZhvRlf9C3wX+V+y/jvM9yu8lfyv6f8u/ht8N/P9Ft+D
/w5vw38f55/q9/A/4Hvj+qT6j/g+8n/C28n/GX8f/wu+H/8r/gHr/w3vwP/O
+RzA/0H+IP5P/BDz/Svu31R34v8mfxj/D34E/y/+IfP9j/1lbc30j23NzHfb
mtn/43h38p/Aj8I/iWfjn9qaOV8P/NPke+KfId8L/yyegx9N/2Pwz5HvjX+e
fB/O7wupjuufm+qqVH8x1XWpPhb/Et431U2p/jLeD/8Knkf/rzJff+b/Gvsb
wP6/jg8kfxyej3+D9Qcx3zfxwfi38CH4t/EC/Hh8KPOdgA/DT8SH4yfhhax/
MtdnBH4K+ZH0PxUfhZ/G+Rfhp5Mfzfpn4GPwM5l/LH4WXoyfjY/j/j0nXn+p
Hh/33xVd9bmxv1RPiP2l+jy8BD8/9pfqifgF+CT8QvpPxi/CS/GL8Sns7xL2
PxW/FJ+GX4aX4Zez/nTm+w77nxHXL9VXxPVL9Uz8u+TL6X8l68/CryI/m/5X
49eQvxavIH8d818f91+qb8DnkL8Rn4vfhFfiN+Pz8FuYfz77uxVfgN+GV+G3
4wvxO/BFzHcn8y/G7yJfjd9Nfgl+D/ml+L34Mvw+vIb93c/9txx/gPwK/EHy
K3l9PcTrrxZ/mPwq/BHyq3k+PoqvwR/D6/DH8bX4E/g6/Eme3+t5vj+F15N/
Gt+AP8P6GzmfZzm/Tfhz5Bvo/zzrb8ZfwLewvxd5f9yKv4Q34i/Tfxv+Cvnt
vH+/yvv7a7H/VH8Pb8K/H+cTX//jP8B34D+k/xv4j/Bm/Mf0fzPOP77+x3fi
P43zi6//8Z/hLfjP8bfj/FP9izj/+Po/zj++/sffwX+Ft9L/16z/LvP9Bt9N
/rf4Hvx3eBv9f4+/h/8B30v/P7K/fez/T3g7+T/j7+N/wffjf8U/wP/G/B3s
7+/cXwfwf5A/iP+T/CHu739x/3fy+v03fhj/D36E/v/FPyT/P54fWS911fF8
+Viq4/nTLdXx/Ps43h3/BH4U/T/5Uub62fin8B4vZc7/abwn/hm8F/7ZVMf5
5KQ6zu/oVMf1Oyb2l+rP4b3Jf57+fVj/C3gu+S/ix5L/Evvri38Z74d/Bc/D
v8r6/Znva/gA/Ov4QPofh+fj38AH4d/EB7P+t/Ah+Le5fgX48eSH4ieQH4af
SH44fhJeiJ+Mj2D/p+Aj8VPxUfhpXP8i/HR8NH4GPgY/k/XHsr+zOL9iXl9n
4+PIn4OPx89l/QnMdx7zl+Dnk5+IX4BPwi/EJzPfRXgpfjH7m4JfQn4qfik+
jfkuw8vIX8760/Hv4DPwK/CZXN/v4uX4lfH+kepZ8f6Q6qvi+qV6Nn41fk3s
P37+j1fg18X5xM//Y3/x8398Dvkb8bn4TXgl/W+O84mf/8f5xM//8fnkb8UX
kL8tzjfVVfjt5BfS/w58EX4n+1vM/u/Cq/G7uT5L8HvwpVz/e/Fl5O9j/Rrm
v5/9Led8HuD8VuAPkl+JP0S+NuaPn//H/PHz/5g/fv4f88fP/2P++Pl/rJ9+
/2IN/hj5Ovxx8mvxJ/B1+JP4+th/qp/C6/Gn43xSvSHOJ9XPxPmkemOcT6qf
jf2lehP+HN4Q86f6+Zgv/f7b5pgvfv8/5ovf/4/54vf/8a3kX8Ib8Zfxbfgr
+HbWfzXOJ37/H/8e+Sb6fx9/Hf8B57OD8/sh/gb+I7yZ/j9m/Tfxn+A72d9P
2f9bcf3j9//xFvI/p//b+C/I78J/ib/D+r+K+y9+/x//Nf4u/hv678Z/i+9h
vt/hbfjv2f97+B/I78X/SH4f/ie8nev7Z/x98n9h/f3s/6/4B+T/Rv8O1v87
9+cB/B/4Qfyf+CH8X6zfif+b/GH8P+SPsL//sv8POZ//4VmNmf6xVMf91y3V
8fvjH0/1R7//n+qPfv8/+sXv/+OfJJ+NfwrvgX8a78l8n8F7kf8s8+VEPtVH
Rz79+4hj8M/hvaN/qj+P9yH/BTwX/yLzHYt/iXxf/Mt4P/wreB7zfzXWT3X/
yKf6a/gA/OvRP/37z4HRP9XHRT7V+ZFP9Tcin/596yD8m/jg6B9//y/6p3oI
/m3yBfjx5IfiJ5Afxnwn4sPxk/BC+p+Mj8BPYb6R+Kn4qFg/1adF//Tvy4vw
0/HR+Bn0H8P6Z+Jj8bPwYvqfjY/Dz2G+8fi55Cfg55EviflSfT4+kfwF9J/E
/i7EJ+MXcX1LuT8uxqeQvwSfil/K+tOY/zK8DL8cn45/h/OZgV+Bz+R8vxv9
U10e+VRfGfn091NmRT7VV+GzyV9N/2vwa8lX4NeRvx6/gfwc5rsx8qmei99E
vpL+N7P+PM7vFnw++VvxBeRvw6vw27l+C/E7yC9i/Tvxxfhd7L8avxtfgt9D
/6X4vfgy5r8Pr8Hvx5fT/wF8Bf4g86/EHyJfiz+Mr8IfwVcz/6NcvzX4Y+Tr
6P84vhZ/gv2tw58kv571n8LryT+NbyD/DL4RfxbfhD+HN+DPc36beb69wPNx
C8/fF3k+b+X5/lLkU92Iv0x+G/1fYf3tzPcq87/G/r6HN+Hfx1+n/w/wHeR/
iL9B/kd4M/5j/E36/4Trt5P756f4W+R/Rv8W1v85/jb5X9B/F+v/ktfHOzz/
f4W34r/m/ePd6B9//y/y6e8X7sZ/i++J/qn+XfRPdVvkU/37yKe/L/le5FP9
B3wv/kd8H/3/hLeT/3PMl+r3I5/qv0Q+/X3Q/ZFP9V8jn+oPIp/qv0U+/X3T
jsin+u+RT/WByKf6H5G/sKs+GPlU/xM/RP5feCf5f8f6qT4c+VT/J/KTuuoj
kU/1f/EPyf+P/lkvZ67/sZcz5+uGfxzv/nLm/j6BH0X+ky9nrp+NfwrvEf1T
/enon/bXM/Kp/gzeC/8snoMfHeun+phYP9Wfw3vjn4/+F3TVfaJ/qr+A5+Jf
xI/Fv4T3xb8c86W6X8yX6q9EfmJXnYd/Fe+Pfw0fEOun+uuxfqoHRj7Vx0X+
/K46H/8GPij6p/qb+GDy32L9Icz3bbwAP579DWX/J+DDyJ9I/+H4SeQL8ZPJ
j8BPwUey/1PxUfhpnF8R53s6Pho/I/qnekz0T/WZkS/pqsdGPtVn4cXkz8bH
kT8HH0/+XHwC+fPwEvLns7+J+AXkJ9H/wsinejJ+EV4a/VN9cfzvz+uqp+CX
4FPxS/Fp+GV4GX45Ph3/DvPPYH9X4DPJfxcvx69k/Vn4Vfjs8FRfHT6hq74G
vxavwK+j//WsfwPzz8FvJD+X/jfhlfjNzDcPvwWfH57qW8PP7aoXhKf6tvDx
XXUVfju+EL+D/otY/058MX4X81ezv7vxJfg9nN9Szv9ers8y7s/78Br8fnw5
/R/AV+APMt9K/CHytfjD+Cr8EXw18z/K82kNz6/H8Dr8cZ5/a3n+P4GvI/8k
vh5/ivXr8afxDfgz+Eb2/yznswl/jnwD/Z/HN5N/Ad+Cv4hvpf9LnE8j/jK+
jfN/Bd9O/lX8NfLf4/29Cf8+/jr+A3wH/kPWf4P5foQ34z/G36T/T/Cd5H/K
+b/F9fkZ90cL/nP8bV5/v+D1vQv/Jf4Oz69f8Xxr5fn4a/xd/Df4bvy3+B7W
/x3zteG/x99jf3/gfPZyfn/k/Pdxff6Et+N/5vq+z/X/C76f/F/xD8j/jfu3
I/Lp8+O/Rz7VByKf6n/gB8n/k/6H8H/hncz3b/ww+f+w/hH8v/iH+P/on7Ut
c/2Pbcv0bvjH8e74J1Id538U/kny2dsy5/sU3oP8p/Ge+GfwXvhnmS8n1k/1
0ZFP9+cxkU/15/De+OfxPvgXYv1U58b6qf4ifiz+Jbwv/b/M+v3wr+B5+Ffp
35/1v4YPIP91fCB+HOvn49/AB+HfxAfj32L9Icz/7fjfp+dbQXiqjw9Pz8+h
+Ankh+En4sNZ/yS8kPzJ+Ajyp+AjyZ/K/KPw08gX0f90fDT5M/Ax+JmsPzY8
1WfhxfjZ4enrh3HhqT4HH0/+XHwCfh7rlzD/+exvIn4B+Un4hfhk1r+I+UrZ
38Xh6euvKeGpviT8nK56Kn4p+Wn0v4z1y/DLyU/Hv0N+Bn4F+ZnM913mL8ev
xGeFp/qq8HFd9Wz8avLX0P9a5qtg/uvY3/Vcvxu4vnPwG8nPxW/CK/Gb6T8P
v4X8fOa/FV9A/jb6V3H/3o4vxO/g9bGI58edPH8X43fh1Ty/7+b5voT353t4
/17K+/u9vP8vw+/Da6J/+vzj/uif6uX4A/gK/EH6r2T9h/Ba/GH2t4r9P8L5
rMYfJb+G/o/hdfjjzLcWf4L8OtZ/kvnWc32fwuvxp7k/NnD/PINvxJ/FN9H/
ObwBf575NrO/F9j/FvxF8lvxl/BG/GV8G/4Kvh1/FX8N/x7exP6/j79O/gfs
fwf+Q/Jv4D8i34z/GH8T/wm+E/8p/hb+M+ZrwX+Ov835/IL7Zxf33y95Pr7D
8/NXeCv5X+Pv4r/Bd+O/xffgv8PbmO/3PP/fw/9Afi/+R3wf6/8Jb8f/zPm+
j/+F/H78r/gH+N/wDvzv+AH29w/O5yDvr//k/fcQ/i/ynfT/N+sfxv9D/gj9
/4t/SP5/9M96JXna/8deyfRu4an+eHjq3x3/BPmj8E/i2fin8B7M9+lUx/3R
E/8M+V70/yyegx/N/o4JT/Xn8N745/E++BfwXNb/In4s+S/hfcl/mf3143y+
wvnlxf8+vv5PdTz/+kc+PR+/hg/Avx79Uz0w+qf6ODyf/DfoPwj/JvnB+Lfw
Ifi38QL8eNYfip+AD8NPpP9w/CS8kPM5OfqnegR+Cj4y+sfP//FR+Gl4EX56
zJfq0fgZ5Mcw35nsbyz7P4vzK+b+O5v7cxz37znc3+Pxc/EJvD7Ow0vIn49P
xC/AJ9H/Ql6fk3n9XhQeX/+Hx9f/4fH1P34J+an4pfg01r8ML8MvZ/7p+Hfw
GfgV+Ez8u6xfjl+Jz2J/V3E+s/GryV+DX0u+IjzV1+HX4zfgc/Ab8bmsfxNe
Sf5mfB5+S3j6/sZ8/FZ8QXiqb8Or8NvxhfS/g/kWsb87Of/FXN+78Gryd9N/
Cevfgy/F78WX4ffhNfj9+HLmewBfgT/I/lay/4fwWvxhXj+reL48wvNnNf4o
+TX0f4z16/DHya/FnyC/jv0/yfmsx58iX0//p/EN5J+h/0au37P4Jvw57u8G
7v/n8c3kX6D/FvxFfCv+Ev0bWf9lfBv+Snj6/uf28FS/ir+Gfw9vwr8ffnZX
/Xp4qn8QXtxV7whP9Q/Dz+qq38B/hDfjP6b/m/hP8J3M91Pmf4v9/QxvwX/O
+bzN+f+C67OL6/tL/B3yv6J/K+v/Gn8X/w2+G/8t+9vD+fwOb8N/j7+H/4Hz
38v1+SO+D/8T3k7/P+Pv43/B99P/r/gH+N/wDvr/nf0fwP9B/iD+T/wQ/i+8
E/836x/G/0P+CPv7L/4h+f/hWdsz/WPbM9fvhn88POW7458gf1R4uj8/iWeT
/xTeg/yn8Z7kP4P3wj+L59D/6PBUHxOeXr+fC091b/zz5PvQ/wusn8t8X8SP
Jf8l+vdl/S8zXz/8K3ge/lX698e/hg/Av44PZP7j2F8++/8GPoj8N+k/mPW/
hQ8h/236F7D+8dzfQ8NTfUJ4ev8ahp+IDw9P9Ul4IX5y+NiuegR+CvmR+Kn4
KPw0+heFp/r08DO76tH4GeTH0P9MfCz5s/Bi/Gx8HP3Pwcfj5+IT8PPwEvx8
zm8i1/cC7o9J3D8X4pPxi/BS+l+MTyF/CT4VvxSfhl/G/V+GX05+Ov4d8jPw
K8jPZH/f5XzLOf8ruT6zuD+u4v6cjV+NX4NfS/8K/Dr8eua7AZ+D34jPpf9N
zFcZnuqb8Xn4Lfh8+t/K+gvw2/Aq/HZ8IX4Hvoj938n1XYzfhVfjd9N/CX4P
vhS/l/7L8PvwGvx++i9n/w/gK/AHuT4r8YfwWvxh+q9ivkeYfzX+KPk19H8M
ryP/OP3X4k+QX0f/J9nfevwpvJ77++nwMV31BvwZfCP+LP034c+RbwhP9fPh
Z3TVm/EXyG/BXyS/NTzVL+GN+Mvho7vqbfgr5Lez/qv4a+S/R/+m8FR/H38d
/wG+A/9h+Old9Rv4j/Dm8FT/GH8T/wm+E/8p/hbr/4z5W/Cf429zfr/gfHdx
/r/E38F/xf3Tiv+a/Lv4b/Dd+G/xPfjvWL+N18fv8ffwP+B76f9HfB/5P/H6
bMf/TP59+v8F30/+r/T/AP8b3sHz6e/4AfL/wA+S/yfPx0P4v/BO/N/0P4z/
h/wRns//5fn9YXj6/Ot/4fH1/6uZ/rFXM71beHz9j3fHP4EfhX8Sz2b9T4Wn
+XuEp/rTeE/8M+Fju+pe+GfJ5+BH48fgn8N7M//n8T7kv8B8ueGp/mJ4uv7H
hqf6S3hf8l+mfz/W/wrz5eFfxfvjX8MH4F9n/YH4cXg+/g18EPv7JvsfzPl8
Kzw9H4aEp/rb4en5WIAfjw/FT8CHhaf6xPD0/jEcP4l8If1PZv4R7O8U9j+S
8zkVH0X+NLyI/Omc/2iuzxn4GPxMfCz9z8KLyZ+Nj8PPwcfj53J/TuD1eR7P
nxKeT+fjE8lfgE/CL2T9ycx3EfOXcj4Xc32m4JeQn0r/S1l/Gn4ZXsb8l7O/
6fh3yM+g/xX4TPy7eDl+Jfubxf6v4nxm41fj13D/X8vrqwK/jvz19L8Bn0P+
RvrPxW/CK3n938zzYR7Pj1t4vswPT/Wt+ALyt+FV5G8PT58/L8TvwBeFp/pO
fDF+V3hRV12N301+Cevfw/xL8XvxZfh99K/B78eX4w/gK/AHWX8l/hBeiz+M
r+L6PcL9sRp/lPwa+j+G15F/HF9L/gn2v47r9yTXd314qp/C6/Gn8Q34M/hG
1n+W+Tbhz+EN+PP034y/gP+fru4y2sqqXQPwNugWlFBSulQ6BDZSSqe0QSkq
YQAqqEsEwe7u7u5kYycoCiKYGCiiYgfGGeN75/Oe4XX+OO5xnfuZ8621dqyP
/TD7eyRyryw/Grlnlh+L3CPLj+NP0H8Sf4r+0/gz9J/FV+Al+Er8Ofx5/AWO
/0XOz0v4y/RfYf6r+Gv0X8ffwN9k/VX4avwtru/b3B9ruP/fwd+lv5b56/D3
6K/H38c3sP5Gns8PeH4/5PXhI/xj/BPefz7l/WkT71+f8f73Oe+PX+Bf4pt5
f/+K9/+v8S30v8G34t/i3+Hf49vwH9j/j/hP+M/4L/ivnL/fOL+/c/7/4Pr8
yfXbjv+F/8398Q/3z7940bP/9R1Sjvtvx/CUdwpP9/fOeCn6pfEy9Mvi5eiX
xyvQr4hXwivjVZhfleOvFp7yLuHp/FbHa+C7hqe8G16Tfi28Nl4H3535e4Sn
+6dueMr18Pr0GzC/Ies34vzsiTfGm+BN8WZ4c7wF3pL9tWL/rfE2eFuOfy/O
z97h6fncJzzldnh7+h2Y35H1O+Gd6XfBu9LvxvF15/zsi/fAe3J+e3H/F+O9
6e+H96Hfl+erH96f/gDm748fQH8gPggfzPpDeP6H4sPoD8dH0B8ZnvIofDQ+
Bj8QHxs5ff0yDh9PfwL7m4hPoj+Z+QdFTl9fHYwfQv9Q5k9h/an4NPrT8Rn0
D8MPpz8TPwI/Ej+K+bPw2fTn4HPxozk/x3D+jsWPw+dFTl+fz8cX4MfjJ+An
Rt43ywsjd8/yosjdsnxS5K5ZPjlylyyfghfwUyN3zvJi/DT6S/Cl9E/Hl9Ff
zv7PwM/Ez8LPxs/h/JyLn0f/fPZ3AX4h/Yvwi/FLWP9Srt9lXN/Luf5X4Ffi
V+FX49dwf17L/X0dfj1+A8/HjTxfN/H6eTN+C34rr9+38fp/O34H/Tvxu/C7
Wf8e/F78Po7vfo7/Ac7Pg/hD+MP4I/ijXJ/H8MfpP4E/Sf8p/Gn6z+DP4ivw
Euav5P56Dn8ef4H7+0X8Jfovs/4r7O9V/DX8da7fG/ib9Ffhq+m/xf3xNvfP
Gvwd/F18LfPX4e/h6/H38Q34RvwDju9Djv8jzv/H+Cf4p/gm/DP8c/wL/Et8
M/fHV9w/X+Nb8G94fd3K6++3vD5/x+v79/g2+j/gP+I/4T8z/xf8V/w3/Hfm
/4H/iW/H/8L/xv9h/X/xohX/9R0ip/fvHSN3yvJO+M70S0VO80vjZeiXZX45
vDz9CsyvGDkdf6XI6f6ojFfBq0ZO91e1yOn+2wWvjtfAd2X+bnhN+rUip+ej
duT0/NTBd6e/B/Pr4vXw+ngD5jfEG+F74o2Z3wRvSr8Z3px+C85fS65fK65/
a+6PNnhbfC/ur725//bB2+HtI3fMcofIHbLcMXL7LHfCO+NdIrfLcle8G/3u
+L54D/bXE+9FvxjvTX8/vA/el/PTj/PXn/M/AN+f/gH4QPqD8MH0h+BD6Q/j
/hjO/TUCH4mPwkfjY/AD8bH4OPY3Hp+AT+T4JuGT6R/E+gfzfB3C83coz+cU
nt+pvD5Nw6fjMyKnr08Oww/HZ6acf/8fnr7+OTI85aPC0/cHs/DZ9Ocwfy7r
H40fgx+LH4fPw+ez/gL2dzz7PwE/EV+IL2L+Sax/Mn4K/QLzTw1PeTF+Gv0l
zF/K+qfjy/DlnL8z8DPpn4WfjZ/D/s7Fz6N/Pn4B/Qvxi+hfzP4vwS+lfxl+
OX4FfiV+Ffu7Gr8Gv5brdx3X93r8Bvo3Mv8m/Gb8FvZ/K34bfjt+B34n5/cu
Xj/u5vXnHvxe+vfh9+MPsP6D+EP0H2b9R/BH6T+GP07/CfxJ+k+xv6fxZ/Bn
Ob8r8BL6K1n/Ofb3PO8PL/D+8SL+Ev4y7z+v4K/ir+GvM/8N/E36q3j/W837
41v42/ga/B38XXwt66/D36O/PnJ6/34/cnp/3xA5fX2zEf+A/ofM/4j1P2Z/
n+Cf4ps4v5/hn9P/gvW/ZH+b8a/wr/EtzP8G34p/i3/H/O85f9s4vz/gP+I/
RU5f//4cOX19/Evk9PX1r5HT1/e/4b/jf0TeJ8t/4tvp/4X/Tf+fyHtn+V+8
qOQ//UKek++A74DvGDmbX8hz28x3itw6853wnenvjJeiXwovTb80XgYvw/7L
4mXxcng55pdnf+XxCvQrML8i57ciXol+JeZXZv08t8y8Cl4Fr4pXZX411q/G
/nZh/3lO92d1vDr9Gsyvwfq7sr9d8d3w3Ti+mpGbZ14Tr4XnuWnmtfHa9Ouw
fh32tzvHtzu+B/09mF8Xr4vXY3/12H99vD7eAG+AN8Qb4o3wRuxvT/a/J8ff
GG+MN+H8NcGb4nlO91czvBneHG+Ot8Bb4C3xluyvFd6Kfmu8Nf02eBu8Ld4W
34vzuxe+N743vg++D94Ob8f1b8/90R7vgHfAOzK/I+t34vg74Z3pd2Z+F7wL
3pX95blp5t0iN868G94d747vy/x98R54D7wn83vivej3wovp57lR5r0jN8g8
z3tkvl/kWpnnuUbmfSJXzTzPZTPvi/fF++H9mN+f9fvjA/AB+P74/vgB+AH4
QPY3kP0Pwgfhg/HBzB+CD8GH4kPxYfgw1h+OD8dH4COYP5LzMxIfhY/CR+Oj
8TGsPwY/kH6e0/05lvs3z+n+Hsf9Pw4fT3888yew/gR8Ij4Rn8T8SfhkfDJ+
EH4Q+z+Y48tz08wP4fUhz+n171D8UPpTmD8Fn4pPxacxfxrrT8en05+Bz6B/
GK/veU7vD4fjh+Mz8Zn4EfgR+JG8P+U5vf8fhR9FfxY+i/7syOnr69n4HPpz
mD+X/c/Fj6Z/NPOPwY/Bj2V/eU7fHxyHH0d/Hj6P/nx8Pv0F+AL6x0fOvn8v
5Dl9f38CfgL9E5l/Ir4QX8j+FuGL6J+En0T/ZPxk+qfgp9AvcP0K+Kn0T2X+
Ys7PYs7faZGzn58U8px+vrIkcvbzmUKe089vlkbOfr5TWIqfjp+OL8OX4cvx
5fgZ7O8M9n8mx3cmfhZ+Fn42fjZ+Dn4O5/dczv+5XJ/zuH7ncX3Px8+nfwHz
L8AvxC9kfxfhF+EXc3wX45fgl3B+LsUvxS/j+l2GX45fjl/B/CvwK/Er8auY
n+d0f13N/Xc1fg39a5h/Letfy/m7Dr+O/vXMvx6/gf4N+I34jax/E9f/Jvxm
+jfjt+C3sP6t+K30b8Nvw2/Hb8fvwO/A78TvZH93cX7vwu/G7+b638P9cQ9+
L/17mX8f+7sPv5/+/fgD+AOs/yD+IP4Q+38Ifxh/GH8EfwR/FH8Uf4z9PYY/
Tj/P6fcbT0TOfv9ReAJ/kv6TzH+K9Z/Cn6b/NPOfYf1n8GfpP8v8FfgKvAQv
Yf5K1s9zfD4Yfw5/PnL2+8PC8/gL9F/AX8RfxF9ifp7T7y9fxl/GX4mc/f6z
EDl+P/pqePb700Lk/N8nw1+j/zr+Ov038Dfov4m/SX8Vvgpfja/G38LfYv23
8bfprwnPPj9QWIO/g0eOzx+8G57979cKkeN//7Y2vG/ma/F1+Dr8Pea/x/rr
2d96/H38fXwD8zew/kZ8I/0P8A/of8jxfYh/RP8j5n/M/j/m+nzC9f0E/xSP
HPfHJnwT/hn+GfM/xz+n/wXPZ57j8+U831/im/HN+FfM/4r1v8a/xrew/y34
N/S/Yf2t+Fb63+Lf4t+x/nf49/S/Z/1tnJ9t+A/0f8B/pJ/n9Pr8E/4T/jOv
7z/jv+B5Tu9Pv+K/4r/x/pbn+Pw978+/43/geU5fH/0ZOX19lef09eF2fDv+
F/4X8//G/6b/D/4P/m/k9PV3ntP3b0UrU47f/6/8r+8QOfXznObvGDmtvyO+
E57n+N8PRE7nN8/p/JfCS9EvzfzSrF8GL4OXxcsyvxzrl8PL4+XxCsyvwPoV
Ob8V8Ur0KzG/MutX5vxVwavQr8r8qng1+tWYv0vk9HzlOT1/1SOn57M6XoN+
DXxXfFd8N3w39lcTr4nXwmsxvzZeG6+D12H+7py/3fE98D04/3W5PnXxenie
0/1TH69PvwHrN8Ab0m+IN8Ib4Xvie7K/xnhjvAnPRxO8KZ7n9PrVDG9Gvzne
nH4LXh9b4C3xlngr5rfCW9PPc/r5XBu8Dd4Wb8v8vfC96O8dOf38N8/x+//I
8ft/vB39dsxvj7fHO7C/Duy/I94R78T57cT17Yx3pt+F+V3YX1f23xXvRr8b
87uzfnf2ty/3f57T89MD70G/J96Tfi+e7zyn159ivJh+b7w3/f3w/ej3wfvQ
74v3xfvx+prn9PrbH+9PfwA+AN8f3x8/gP0dgA/EB+KD8EGcn8Fcv8H4EHwI
138oPhQfhg9j/nB8OP0R+Ah8JPd3ntP9P4rnI8/p+RnN8zUaH0N/DH4g/Tyn
16exvH6Nxcfh4/DxeJ7T75cn4BPwiZHT76cn4pPwSfhkfDJ+EJ7nppkfHLlx
5gfjh9A/BD+Ufp7T5wum4FPwqfhUfFrk9PmFafh0+tPxGfgM/DDm5zl9fuLw
yOnzGYfjM/GZ+BF4ntPnU47Ej8SPipw+33IUPgufhc9m/mz2NwefQ38uPhc/
mvXznD4fdEzkosyPwY/F87xtxf/+cxx+HD4Pn4fPx+fjC3L/3/8VFuDH43ne
1ut//zkBPwE/Mff//beQ57LZfxfm5y/zhfgi+ovwk/CT8JPxk/FT8FPwAl7g
+E7l+E/l/C3GF+OncX3ynO6PJfgSfCn3X57T/Xk69+/p+DL6y5i/nPWX42fQ
PwM/Ez+T9c9if2fhZ+N5Ts/vObx+nYOfi+c5vf6dx+vjefj59M9n/gXs7wL2
fyF+If2LmH8RfjH9i/FL8EvwS5l/KX4Z/cvwy+lfzvm5gvOX56aZX4lfiV/F
+2ue0/v31ZHT1w95Tl9/XBM5fX1zDX4tnuf09dF1+HX0r8evp38DfgP9G9n/
jfhN9G/Cb6Z/M+fnFs7fLfit+K2c/9u4Prfht9O/nfl3sL872P+d+J34XRz/
XZzfu/G78Xsip69/78HvpX8v69+H30f/fubfjz+AP4A/yPwHWf8h/CH8Yc7f
w/gj9B9h/UfxR/HH8MeY/zj+OP0nOP48p+9vnoycvv95En8Kz3P6/ulp/Gn6
z+DP0H82cvr+LM/p+7sV+Ar6JXgJvpL1V+LP4c/hz+PPc3wvcH5fwF/EX8Rf
Yv5L+Mv4y+zvFY7/FfxV/FX8Nfw1/HXWfx1/A3+D/b/J8ec53Z+r8FX4au7v
1fhb9N9i/bfZ39v4GnwN/g7z38Hfxd9lf2vZ/1p8Hb4Of4/577H+enw9/j7H
9z6+gf4G1t+Ib6T/Af4B/iH+IfM/wj/CP+b8fIx/guc5vT5+in+Kb8I34Z/h
n+Gf45+zvy84vi84P19yfb7EN+Ob8a/wPKfn82ue7zyn19ctkdPP97bg3+Df
4Fvxrfi3+Lf4d3ie088fv8e/x7dFTj//3Ib/QP8H1v8R/5H+T8zPc/r57c/4
z/R/wX/Bf2X9X/Hf8N/w35n/O/v7A/8D/zNy+v1mntPnF7bj2/G/8L/wvyOn
z0/8jf9D/x/8X/r/4kXP/bef53R8O0ROx5/ndP52xPOc+jsxP89p/Z3xnfFS
kdP+85w+f1Iaz3Pql8HL4GVZvyxeDi+Hl2d+ebwC/Tyn81Mxcjp/FfFK9Cvh
lelXxqvgVfCqeFW8Gl4N34X95Tkdf/XI6fxUx2vgNfBd8V3x3Vg/z2l/NfE8
x7+/yPxaeG08z/HvM+J18N3xPMe/38j+9sDr4nXxeng9vD5eH2/A/vKc9t8w
cvr8V0O8Ef1G+J54nuPfj8Qb403Yf57T9W0aOd2fTfFmeDO8OZ7n9PrWAm+B
t8Rb4q3wVnjryOn9qTXeBs9zev9ti+c59ffC8xz//mXk9PXN3vg+9POc5reL
nI4vz+n8to+crl+e0/XtEDld/zyn+6dj5HT/RY7PN3YKT59/jByfL+0cnj7/
2hnvgnfBu+Jd8W54N7w7Hjn/+x34vngPPHLM74lHjn6v8PT54F54MR45Pl/c
Ozx9/rg3vh/9yDG/D/vrg/fF++L98H54f9aPHPsbwP4jx99f2R+PHP0D8MjR
HxjeL/OB+CD6kWP+YDxy9IfgkaM/FI8c/WH4MHw4PhwfwfFFjr+PMzK8f+aR
C1kuGoVHjv5o5o/Gx9CPHPMPDM/+fljhQHwsPhYfh0eOv086Ho8c/QnsL3Ls
f2J4Or6J+CT6k/DJeORY/yA8cvQPZv3IcX0PCU/X/xD8UPqRY/4U1p+CT6Uf
OeZPw6fh0/Hp+Az2Hzmej8PwyNE/nPmH4zPpR475R4Sn158j8CPpR475R7H+
UfgsfBY+m/mz8Tn0I8f1mRveP/PIcX8dHZ7u/8jxfByDR47+scyPnP/9XDxy
9Ofh8/D5rD8fX4AvwI/Hj8dPwCPH8Z+IR47+Qva/EF9EP3LMPwmPHP2T8cjR
PyU8+/vNhVPwAv0CfioeOdZfjC/GT8NPw5fgS/Cl+FL89PAsFyLH/bUMX4Yv
D0/Px3L8DPpn4GfikWN/Z7H/s/Cz8bPxc5h/Dn4ufi5+HvMjx/U9Hz8fvyA8
3T+R4++DXxie/f30QuRC+nvqF4UPzPwi/GL6kWP+Jax/CX4p/Uvxy+hfhl+O
X45fwfzIsf8r8Svxq/DIMf9q/Gr8GjxyzL82PJ3fyIUsF10XPijz6/Dr8ciF
LBfdED448xvwG/Eb8ZvwyIUsF90cPiTzyIUsF90SPjTzyIUsF90aPizzyIUs
F90WPjzzyMVZLro9/v+TRy5Jfkf0R2QeuTjLRXdGP/md+F30I8f8u1n/bvwe
/B78XjxyHN99sX7yyHF+7sfvxx/AI8f8B1k/cuzvITxy9B/GI0f/ETxy9B/F
I0f/Mfwx/PE4vnR9HsefwCPH9X0SfxJ/Co8c85/GI0f/mdh/8sglyZ+N/sjM
IxdnuWhF9JNHLklegpfgK2P+qMxX4s/RjxzrP49Hjv4LzH8BfxGPXJzlopfw
yNF/mfUjx/5ewSNH/1XmR471X4t+8sglyV+P/ujMIxdnueiN6CePXJL8TTxy
9Ffhq/DVrL8afwuPHPt/G48c/TWsvwZ/h/47+Lv4u/ha5q/F19Ffh79H/z18
Pb4efx+PHNdnA74B34hvxD/AI8f6H+KRo/9RykVjMv8I/5h+5Jj/SfSTR47r
/yn+Kb4J34R/Fuun5yNyPD+fRz955Hj+voh+ej4jx/P7Jf4lvjnmJ9+Mf0U/
cqz/NfuLHPvfgm/Bv8Ejx/yt+Fb8W/YXOfb/Hf4d/n3MTx453j+2RT+9v0SO
958f8MjR/5H5kWP9n9hf5Di+n/Gf8V9ifjo/v+C/0v8V/41+5Lg+v+ORo/8H
8//A/6T/J76d/nb8LzxynL+/Y37yv/F/6EeO+f+yv8hx/EXPp37yyPH87pBy
PN+R4/Vjx+gnjxyvPzvhO9Hfmfk746Xol8JL0y/N/svgZeiXxcvi5Vi/HMdX
Hi9PvwJegX7FWD+9flfEK9GvxPzK7L8yx18Fr4JX5fpXxavh1fBdmL8L+6uO
V8drcHw1OP5dOT+Ri7NctBu+G14Tr4nXwmuxfm28Nv06eB189zi+5JFLku8R
/QMzj1yc5aK60U8euSR5PbweXh+vjzfAG7B+Q/bXkP034vga4Xvie3J+GuON
8SZ4E7wp3pT1m7H/Zhxfc46/Od4Cb8H5axnzx2beEm+FRy7OclFrvDX9Nqzf
Bm+Lt2X/e+F70d8b35v+Ppy/ffB29Nvh7fH2rN+B4++Ad8Q7cv46xfzknfDO
9DvjXfAurN+V/XfFu+Hd8O54d87Pvvi+9HvgPfCeeE/m98J70S/Gi+n35vr3
xvejvx/z+3B+++B96ffF+9Hvh/en35/9DcAH0N+f+ZHj/jgAP4D+QHwgPggf
xPzB+GD6Q/Ah9Idy/w/Fh+GRS5IPx4fjI2L9cZlHLs5y0Uh8JP1RzB+Fj8ZH
42OYPwY/ED8QH8v8sfg4+uM4vvHRTz4en0B/AvMnsv5Ers8kfBL9yfhk/CDW
Pwg/mP7B+CH4Ifih+KH4FNafgk+lPxWfRn8a53c65z9ySfIZ0R+f+Qz8MDxy
cZaLDo/5ySOXJJ+Jz8SPiPkTMj8CPxKPXJzloqNifvLIJcln4bPoz8Zn43NY
fw77m4vPpX80fjR+DH4Mfiz7OxY/jv5x+Dz68/D59OfjC+gvwI/Hj8dPYP4J
+In0T+T6LcQX0l+EL6J/Uqw/MfPIxVkuOjn6yU/GT8EjlyQv4AX6p7L+qexv
Mb6Y/mn4afSXcPxL8KX4Us7f6VyfyHF/L8OX0V/+//5/IyaHqQ==
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["\"t\"", TraditionalForm], 
    FormBox["\"x\"", TraditionalForm]},
  AxesOrigin->{0, 0},
  AxesStyle->Directive[
    Thickness[Large], 
    Arrowheads[0.05]],
  BaseStyle->{15, FontFamily -> "Times", Bold},
  FrameStyle->Thickness[Large],
  PlotRange->{{0., 10000.}, {-174., 56.}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.4192918750826607`*^9, 3.4192921423505487`*^9, 
  3.419292246249279*^9, 3.419292309303368*^9, 3.4192929967781878`*^9, 
  3.419297123846908*^9, 3.419990671217478*^9},
 ImageCache->GraphicsData["CompressedBitmap", "\<\
eJy9XQe4FEW2HrlzA9mAASNrTqioa3oq5pwwLqgosCoILArimgOKKCgqZpEg
CILgkkTAhIKAiICAAVREBAUMoCRX0K13/tPnr6numZ57Yd/3+vv63pme7qpz
qk6dfKrPbXFT62vat7ipTasWDU7v2OKG1m1adWpwWoeOcqlki0xmi9aZTGZB
g0xWPjv5GP7B0QZ/Mpk98a+a49WT/++vDtMLWff11z+7U09+wZ1/7otu1ar1
T6Td90LvD13j457T8+473wzvy+K+IXqh1K1e/W/391av+nubXzE0k3rzV1/9
5G/EefaZ/dJuLnHz5i7jjZlq+rfEPfTgu86OzGNJ0F/RC2Vu5kdL9cEzTuvj
Tj6xt37ueONrvZL3D9ULNdyECV+4rve/o/fdcvM4d0OHMfr52mv+5d5+6yv3
Yv+ZbvHiVY+mPY/7iNGdd7zhnuw11frv61q1GK6fJ05cmPf8EIN348Y/XbO/
vezbePaZD9wn85ZHOJe68855US8Pemm2W7Pmd/fbbxszjyTbetkG7fvvfnWX
XTo4GLRSN3rUZ9rHhRcM1IZOOB5DGQ0o4P3jjz/16R7JmRikFyrcSwNnx6bt
8qZD3Jw5y3Qa5HOZtQXgODndC7dV6q5vMzLW1gfTFgugEfBtrhvhZzxrjcrA
pzf6ko3gunW/Ayt9+MknproZHy4Bxmz3mac/yGt36pTFBdvV0RxsiwCjQ0Bn
zfwua+Px+tj5/nLLq4e5FSvWKOHg+1tvfflwWnO3/DO655STertvFq2Mmqvu
Pvt0hW/uvi5vK0wPdJ2o33s+PNktXfor52Ybw+iXX34RpNcZ+tG1pUuXuvXr
19s4x/suca1aRoT4t0sHR7/Kc19++VOM6HDI8HGxDR0yxw/RQ1H/NW0Ennvu
OXfkkUc642XuqquucpMmTdL+jznmmGpuiy22kBZOPvlkN2xYxFKqGWA//PCD
O/bYY92DDz6o/5955pkA3Jfsrjtun+A6dxqrQ2XD7MEGy8EUvPnmlxgbBVBg
Jdj9+32UBLuW/qvlRo0a5UEGHDhmz57tKioq3AUXXOAmT56s13r27On69etX
zTo84YQT3L777qs/vfDCC/r4Bx98kM2D+szT+8aIu/W1I4Q/RJM/ftwCf/25
Z6f3CCHLug8//NBDtnHjxqjnOm7Dhg0uPGbNmuV23HFH/Tx9+nS9/cQTT9Tv
Y8aM0e/nn3++QlaKb/0NMqz/k07o7SEQXmCTmXXffrvKX+/x0HsGmYzkr7/+
6g444ACcMgr4m3WffPKJh0aAVvTlVoHZD3qJ/q2pwDdt2hS0oMR61113KYBn
n3223vjuu+/q93r16mXyIV741c+xsbzy8qEe4l9++c1fv7HDmBzEa9eudZdf
fjlOgRh/s27hwoX5ENcNIRah+LXOfffu3V3Dhg0VqkaNGulvLVu21O/nnHMO
oc5EbWS5BHnE4IfkCOFv326UzXaJLjZca3f9qExVCKGWO+WUU/xlnHXq1HGv
vfaadtu2bdskhAQQfCI49PJAA7D38x/GAJQl5wH8/LOIJYn4qhKApe6RRx5x
u+yyizvvvPPc7bffLrzlS1vy5a5Hjx4FJ75u3bqZ3CLqbB2Amc/5+HuVMKKh
7G8dNL0sJyFByf36fuTBXTD/R88lEuBOmTIlH9wS99lnnykTi26KwJw2bZre
dtJJJymY48aN0+9NmjQpACZAJDyiQexvly++6CV/WXhubetvybe/6KULzhtA
CGvYT3/88Yfr1asXRscIqzRGnDiw9kpc/fr1RVwcdthh/voZZ5zhOVOfPn1c
tWrVgEYBcCdPWuThem3M5/vZqIoy4XksqbS2PbJs2Wp//eef13WPD+yMGTPc
lVde6crKoMFsLDFsWrduzfE2bMqVZHAsX75cWf5tt93mDj/8cDdgwICA9RPS
ULoOe2UuIRUIYuQqGp2H9Pff/3CXXTJIr8+du8wgrWMg/fjjjxwv4yCiJ33/
PZlrARCGD5/n+xHlhyB8/300IBc1Gagyf+XK9b6TTh3HRvrMB9/m6ymdrN0H
H5jo2+3bZ8Z+BEaUNlwSxS2zpV27/dYJem3SpEX57bWzm6CZQttcv36DUXGp
6/CPMb6Pa0QxFwUqs6/dT/376quG+Y7uF40D18aPX5DfUVsD/Ndff3MnNn5e
b1y+fA37SipzIpF9X9Rqrv37q74vqO+49srQuflKV3u9UKYWChuk9jdyxKfV
oAhLn9TzeMpPws2j9p9/brqqy0OHzslsZ9ekL72vQ/vRBkfW818ohqL9PpQG
SsjDoVPiGDxoNnVIaubPPD3NQCjzitvdd73pprz/jZs2dbGbP/8HKm7dH3rP
M9stbRQHvDjT9zJ82DwRscszD6aBJGvX34zp15X/wgyC9PRT02iH+FEhKYWG
FDRbrgmOCiaZvECUKIL38uCPYwMuAjcdvMGDcjfDhMQhOi1NESjnmJBxr0fK
kIDmwRTWkwcmtOokmAsX5uhDJppgjhr5aQxMyNY8MNtaX7Jg3L//vREEY33V
co8/+r7KHiFYrxGvWxfpX5Pe+1qvwXKG1iwMh5ydt4dgt2s7il14HvXh9CUq
w7oJD5C1wVtHjPjUY1jHUBF6iaECsRaiokuztfW/aNFKd3Pn17W5cjNxvvjC
czwwJBIHZhJYO9Xho8eD1ZahIYdlQZgihlmucOK+Sy4aBK6sn087pY97f/Ki
zFaGYo/u73mYzz/3xVSQodyzT4K8ZElOU5HhKTVQvliQ493l9jhMtyTIjz82
JQFyibfpw5m5SWyKJEHBX0DzTTT4PLCvs/aEY7sm5w/QliqMoFet+s2DDa0U
3I7DDQ0hCXswRN4+vyuwMnHeduv4DKmryz1v5eEgOrpvl0MPwuXzojl3SxJ+
G2vvqitfSQx9iU4j26N+9MjDk/L6JQd0lJly7T//+Q/cQ+rJyRo+QhLurDP6
eXjatB7h8Qlw9e0K+/Ttbm33nXRCJGwmvrMwk4cM6Sic4Apr7IpmQ/KQ6fnI
5LxOQcN//vmfGDIgtvh9WV3xIvF03dzQYQz9JlOmfOO7qW6Pr137