(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 439038, 8683] NotebookOptionsPosition[ 359200, 6904] NotebookOutlinePosition[ 427070, 8288] CellTagsIndexPosition[ 426826, 8279] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt3V9sVOeZx/FIKyHFHmzPeBiDApEsERLZNEQEO8GkJEQkaLsKf2LUNsRZ KJFIIFQrF4JK1RCllqIVVSWjJm16gUTCHUjJXSxxV1nlGiGtVlqhvdiLvZi5 2Iu92IuVVvtwHp/nfc7fOWM7IeDvp1N3OPOe97znOe/xhX99z4ye/Kc3T/7d Y4899g/y3xOPP/bY/fcjAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFZJq9VaxsZW Uk+H61X1YXc9dNeBbajGD696+/IjZttUrIN24ttUr2F23/KadG1Zcrgi1Y/S 015VhrS8YVcs7zLaV+ywqGX2QEV6bVyl/+qnX95D1w6rl6vKCHsdHgAAAAAA AAAAD7VWq/XrX/96fHxc8xHduHPnTtm4ZXTUb9y9e7dstBhF/3nhwoUzZ87I 7s1m0/6EfvLkyf379/t9U4fTHVPGI6mPpHM5kHSe6i132KL80NJb0afa4Hqj Uf01PDwsA6vY+FLU3h9a3hxrNP7caHxdr9+Nfsp72fJko6HF1DaX4h6Oue1F w7Y2fsfZej116PJ9/afPNJunok9vRYOUN5fr9YOZc+naVQmtg3QrO96NDiRv Trk65PYjA0tVL7vXQVf/gwVDetW1OVVt2NJg175Xps+ekdebH5z+yYnjW8fG slPUt5cG0kzby2v7xK6i9tLz0V9+IA2KejOv/fyn0lJ6tpbyU7bYwEpeupf8 1PbljfcdnbaSFvUvZ/f8y3uL6iBDrT4qLe+yi+DLLn586KAdWk7kic2bsyOs ODw5wa7jAQAAAAAAAADgodBqte7cuXPmzBlLfDRHu3fv3szMjG7UZnNzcwsL C41GY8vo6NWrV6WB7Hjjxo17EWssbt68eeHChdxMSv4pjaWfGxkTExP79++X T/1GaSlbrly5kurt5MmTsl2OIuPx+YgcWgeZDXq089QuqbHdjSKqiq+BgYGh oaGKjb+q16WxnIVW+NU4ccu+bkdhlhXzerx9Nuohe15+2NbG7ygvOZyedckp p/qXn6eiweQO8ut6fTIeZNeuSkzGAV9uHY7Fw04FkQeLB2Z7ydGfdM2+dvX3 XfkqPd3Xl1sl3/7Hhw7OfXPzj3/7a+r1q7/8aXTbU9nsafvELvko2372i8+f f3lvNjI++ssP5FM5xBObN6dGmxqJdmud6MbsgXJfO17aI3vt2vdKlcYyVK2n HKVrY6uDP6ncChSNSo4yffbMsovgK/n7W99mj/LWh+c0JbR5XnF4b35wuuhX BwAAAAAAAAAAD5cNGzZcjfj0SuO/+fl5v3FhYWFubk62yPY7d+7MzMwMRLaO jZ0/f17aHzlyRJfUaT6YmxDJ4aTlvn37dN+hJI3wBmK6URrr4Sy70REuRnzo Iz81r5RdZHsqL7hy5Yrmg9mcyMbWUz5Yq9Wq54NfDg3JGekpHKvQ/qBbn6hb ztZq0kN25H7Y1sbveDfKIjf29VXcVy/35YLYzidxPiIs6qpk7k0Wx3z2utRo pFLLKtW7HKeBs+4spvr6UrNi0u3y6fr1ekGL8kE59FsfntOo6MTHH02+/tqP dr/47NTuvUcOz37xuWz8/a1vZaMPqrZP7NKIShpIM2ksL2mj7eW17+h0Ixlw azSmMVZJxmqp1rN7pqyZ5ncXr1+TgelLj5h+7Zlqbdokx33+5b16LuXttz23 Qw8hdGy57Q+9f0qTUzll2cXflTrUiqOSo6ykCLr93blPdCTSg56C/Dzwzts6 QvlpI5SiaSfyadnwpnaPbntKpwf5IAAAAAAAAADgYaerBe/cuTM0NKRRhUZ4 GsBZpKUbDx069MTmzbpaMBXwzc/Pa8go7W/cuFEUw/l8UBsbaezzQftUO5c+ rcMto6PaifzcuXOnZTryU5rJufi4U487Pj6uCx7PnTunJ5WbD87W6/I6W6vp 69P1631+ZNv1lcoHrw0Ophr413R/vx73mWbTh2Kyl3w01dcnP+X93Xix28Yo zJJT8PmgyI48Fcxpm1Q+KK/fRCVNRS25+8rGg8l95dwPRIM8Xqv5ZY8+dpSe s12VJClSh1RX0nmqDvqSQ1suM5kcWG71dMA6f/wSQo1ofW7lM1A5kfJ88LWf /1Qjpx/tfjE6v5rOUp2uB955W7M2K/LWsTENB+Uja2/2Hjlsi+YaLvh+84PT tmDt2andReOxVEsGY1Nd88HZLz5//PHHbXhFZBfNBw+9f6prex2h5YO57fW8 pAI6Bj8qHWqVUWkKuZIiWIx78fo1+UVhZdcRNjeO6Ag1edTfbNrJ+IsvyAi7 Fq1keSkAAAAAAAAAAA+LVvRNgvfu3ZuYmNC/z2tIt3PnTvmpS2Zs4xObN2sq J2/0D+m6VE1+WsgoquSDQy6ONJYP2p/ihbyR3jQf1F3kWIuLi7Va7erVq7rI 0dZPSTNdzGiLfUbcw1Hl05J8ULbIsTRH0EBnqq/Prz5bt26dZhw+5vChmG+Q YiflM6lP169P7TLd36/hoA5yFfPB3AV0RfmgT+5kSH6QMravk59arFM9H9SH l5bXwT6Vw2muJwP7s9srW3DdS3qTjVrtoiWEreirFf0ANBsqWvMoGzXs03DQ 8ms9hKbYO17aM+BCWF3C9taH54raa6R48fo1n21pNPazc7O6zK21aVPRWleL xmzYlg/qEe1wKXqxpLHlgxqMlrTXivl80Oazp3eErtHTVYc+gPN3QcmoxEqK sHVsTGNcCwf9EXWE+45O25XynWgdcofn61D2+xQAAAAAAAAAgIeB/tlfv4JQ /zauYVytVltcXPQbFxYWBgYGNB+0v7rrX8tT0V7FfNAyEVvP5TvRkEWHJyPR R5tq8iUjkf6l2czMTGrloxxaOpcGPjfcMjqqTyjtmg/qIilNcBrR1/b5aMli lEb88E/56eMqy00aGZaA2HK2W/W6xluaWWgzW4dlodsq5oPZp4zm7juZSe78 icubjS42/Wxw0J5o2lM+aMO7Ha3dS5VO3vgg9el4NaVtuTY4mBqY7jUZPffV pz+5Swhle0+LB/Wr+i5ev2bjtPlps9QutE5FjdIaG5rac7a9RWkyPy211Ghs /MUX3rv8z5qRDRU8p7c8H7QOc+klsHzQlgmXtBc+H8yekQ5ARqKncOCdt1MB XG4dskdZYRH02aSyi4Wk/rx0hDpV7EplOykfIQAAAAAAAAAAj4Bms2lfQSgs fZubm/OPDJV/pvJB2VF7aCWjva754JkzZ6Sf/c6W0VELGfdFdPuRI0f0kaFb x8a0Q13tOD4+Lsd6YvNmDf4sidB8ULboIseGW28o7S0fzF2OZOdiUUIqH8zG DdlQrDyXeSbZ3tas2S6aOWrcpmNYxXxQG/ioJXffg8mzToVBsou0+SoO127V 67bqqno+6I/72eBgbh1Sw9Dsz7Ycj6qXSpk1pLMc2TbOZqLGXhcPaupkS+2y WZUVR99sn9jll/Jle9aB/eJ3l+zxmDqBNRqTLY0NTV2xqF+ulwouK+aDucW3 AaTywa75l4WeJf3bKWi3OpN9Ptj1+ZyWDy6jCLLl9B8u+8WA2cNpoVTLPf7U V7J8hAAAAAAAAAAAPAIsQRsaGtKvF5yYmBgYGDh06JA9MlS/fPD+o/lWIx/M kt2H4+8f9GQA8/PzOh7tUJ8Uao/3tO891CTi5s2b+uWGcjo2Bn2v+eD58+dz B5YlDbL5YGrH3HytpGff4YH+/twIwy9WWpV88Fa97r/xcDJK0DbE39iYzTdn kwvrsuHRhuiLGq2N5nSNZApZPR88Gyd9vg6p4uu3N2aXczbib+7zpbOQzo7l lxB+un69dNXT4kHLBydff61ilKbrDU//4XKVKE2X2mm8ZdGY7KgPIM19wOYP Nh9sxV//t/fI4ZXng7KL1Lx6EWzLtud2VAz7yAcBAAAAAAAAAGtTK/4Kwq1j Y5oJavqmWaGu5tPleLLR54D2p/5e80HpUL8wzp6lqY21E/tIlwGObnvKf9eh PvXUnkV55MgRWyooDeTQ0ol8pN+HKNttLaHmg0UDyy3LMvLB8vWDXTtMyeaD ttDM5C7c8/ngtcHB47WatbGv82sVrH/02d+6det8EGyjWt18UI/rG7ei74JM tem1etZVdgmhjwvLFw+OJBOrKgdNRW8lUVpqqZ3lg89O7dZbY/aLz/VLDFOL Fn+w+aBstIemrjAf1CLILroksEoRss8yLT9WbifkgwAAAAAAAACAtaAVfwXh zMyMPlPU0jd91uj58+dtyV7qKwKtB83pqueDFgvqgTRHsM7t08XFRRuPNNCj yDj940n1gaX2HFTNB+3Ro7Jlfn6+68Byy9JTPnhtcPBsrTZbr2dfz0SJ3grz wVv1+pdDQ1/V67LFv75yyVdRPrhu3Tr56ZvZ9xuW54P2cNFUZVY9H8w2zo6t qHq2bDDLPvJLCP1qyq6LB0eSiVWVyVMxekvlg7oWMhWNjW57KvcBmxXzwdyQ OneQXb+vcMTlg0XfP7hldPTduU/8GLLfP1jyBX/Zatv/UaFiEVaeDzaKv4ex a1cAAAAAAAAAADxc9CsI5+fnFxcXT548qX8nHx4evnDhwo2Ifvng0NDQxMSE PoA0lQ9KS8sQq+SDGv+llsL58FEHoKv/tL00vnLliozwRpJs8YfWfFDIGO7c ueNXIH6n+WDJS/rR3GEl+WCVV0k+6BfN3Y2fMppdo/cw5oNFJXq1+FsI71Ze PDjygPJBuwX+/h/fyT5gsyQfvHj9mmzc8dIeGUP2tXVszPIvHeTsF5/LAA6f fk8OnX1Z+xGXD46/+MKze6Z8tz85cfytD8/pysHf3/pWFw9qlmdDLTmK9GBH SVVbi5D7lNHVzQePX/qtjDB3ePuOTme/cRIAAAAAAAAAgIedfQWhpWn6x3b7 QsA33njDQkNd06d/ute/6m8ZHZWN2WV62cU4zWbT8r5UztJKPqRU/yCvjwwV 9rzTmZkZffqoLT/0kaXlg3Lo8fFx2S5bNCxoRKsLH0g+KPvqGT2ofFBTMB+Q 6VNGZVRV8sHsNyR+D/lgtk1u9UpKpGXXGZhaQng3el9l8eDIg8sH9exke/Yp oyX5YPlL+tdubZDlL2nj87iu7U98/FFjQ9PiOT/UiqPKVluLkH3KaNd8sOuz TEdcPljykgb2q6xrhwAAAAAAAAAAPCxa8VcQLi4u+ocHDg8P6xI8aWPfJqYP +dTvAdy/f/+VK1ekzcLCgn5BoYZ08/Pz/hGganx8XHqomA/q3/Yto5Rd/DcJ 2sKiRrQOTgajKxwtH9Shyhvf+Ht4vmju6+nVyAdL+q+SD+ql+Tr5MFIZwCOf DxYtIZQ+/VQvnwkPKh/UYWefMlqSD859c1M6LHrteGmPZaY2yMcjtfj7QD1L 6EZcPrh9Ytf9JYRTu2U88pIe9LiNDU1Non2VbKjlR2m4/y9BtgjyUfYpo6ub D8oZlQyvyjwBAAAAAAAAAODh0oq/gnB+ft7/aV1+Xr16dWFhwS8IGh4e3r9/ /40bN3Rpoe5lsZ3GcPfyaDbnnxeamw9aWKAbbQmhPgHVZxZKn4O6uLho+aAG ZPKR/ByOaMubN29+d/ng2Vpt3bp1GjF4Pv5YST5Y1H+tcj7YiB4r6hO0p/v6 quSDP+Tni+oEkPe1KO+bcmeUqnC2/hVTpAebD+otkHrKqBSn5PsHNYnL5lyp JM4GmVqQ6+mxUusHLUfTNvJGnyy6a98r/heFXWvLB/XTrEb8JNiialcswgrz waI66P+7gPWDAAAAAAAAAIBHjz7Ez0IB+1u9vLc/ktujGnVj7hKb3E+zf3W3 BDB3DLZkKTUwG57f1w/SN2hlyPAakSpLgZaRD9riqUaSjcd3eKC/v9d8MLf/ ocwzQovyQU1LU08ZLc8HN8ZL8FKV+R7yQV+r6f7+onzQT0hRkg9WuaBFM+EB 5oMj8S3gnzIq/yzPB3PnoZ+KqXxwKJm5ez7ps3zQYnpdw7vv6LQmd9lgLpXZ 6WnmHqUkH6xYhA0r+P5B7WQo86WoqeEBAAAAAAAAAPAosZxF/zxuf6u3VXjZ jRbbae5gD3LUflKhnrbRZv4Q2TGkPrUObffUvn6QvXZeXpBe80ELR7LRpHom uSau13wwt3/poWI+qEnHUPIpo9nxH8x7RGfRqG6vOB/8dP36bGN5nxqGtPGL H4+76tmsk3EeS66OlDZ+YdoK88G9Rw73lA/OfvF5lXxQui3PB1t5TxnVpCw3 H/SL+HKNVA4xU1fN8kHfvyZ3uoRQS+QnTK9r+orywSpF8GHf8vLBKvMBAAAA AAAAAIBHSSpBKNk4EsdtuetrLDUoWoaT7S17uOzGkoU8uQlIxRMsqcYy8sHy nKXZbN52a/dyExM/wmw+mO0/dwxF+aCGLKmnjKbyQf/pb6K1n6mzfjKKBVOd 95oP+oRRVyluSK4JvexCTE36/EpJOW5uqpgNLi0kqnJBi2bCT04c/+Pf/vqz c7NVojT5dOvYmLS/eP1aSSiWTaaK8sGReJGsPWCzuXGkaz5YnsStJB/M9i9F tiWEqd5WKx+sUgTp/Be/uyRbJl9/rUqSm3sVyAcBAAAAAAAAAFizlp0Plqwf lI987HU8fq6jNTgW5YZPxk9AXfV8cCQOWWYzSwhtX/n0lvv0QH9/arHYn5Pr +OzplNVLIdtPuU4+Xb/e8h2rg30qg7EI0h96OhqYr16qT3/WFS9o0UzYPrHL wq+SkKvlVrrpMrcto6NFC9nkI43bmhtH7PGeJQ8y9Q/Y/Nm52R9UPij7Fi0h XMV8sGsR5FNNck98/FH5SWXjS/JBAAAAAAAAAADQaz746fr10kZ2yX1Nxl+7 5h8xKq8vo+d5SoODLvyyiNDHfKuVD+ou2aeM+n19PCevy/W6nsWxKK3zyd3G uCw+H+xaCjmEX4Sop3wsrsPl5MAO9Pfr+OUQryYH9tngoFXvutuuaxJT5VpJ PigDvnj9mqZpuQvT5J9vfXhu+8QuW6SpIVfRI0bln+/OfaJJlj0OtDwfbCUf sKk/x1984YeQD45ESwgnX38tu4RwdfPB8iJI509s3rz0ANJo9+w3jW4ZHZXK y88N8bepkg8CAAAAAAAAAADVaz5Y/vqqXtfoTXo4VqH9gXhx3HeRD2rIksra /KI/Oe7lvO8o9K/b0WM/7RmezWTuWV4KXQw4mYwIc1+6DNDSn4rVm44jRR8P LTsf1CJvn9ilwZNFhBYwbR0b04xp7pubWnwNqjRSnP3i89FtT2l73UUjKo23 5L19+WB5NDaSfMCmvlYrHyz/3kwdhpxXST64tC41WtCnJbI1sD4f9Os9i6yk CPakU6ntgXfetuBVRyIXUS/KL353ya6Izwcbpet/iQ4BAAAAAAAAAHi0rW4+ +OXQkKYPzWazEa13K4rGbkfxloUp30U+OBKHLJcK8kFdYJh9Bqm9vq7XNRz0 uUxPpbCI8FbBUW5HDy+VQ1gapRFP1+rpekPLenq6oCWTQVpue26HRoRz39x8 68Nzb35wWl76hXf6bYP6pFDNxeSnRYQaSGn7d+c+sU6kQ1s8WCUaG0k+YHNV 8kFpf+j9U4dPv6fDy772HZ22MyrJB3VsO17ao9mclMLmkgZw5UeR19axMW2/ kiLoldKIUIts/Z/+w2XdeOLjj1qbNll0qMM7fum3MsKS4Um5dBJ2nS0AAAAA AAAAAOAh1Wq1JqPFbl8ODcnr6b6+7OMK9fsB5dNrg4Plr98MDFhipenGxr6+ 47WafHQ7DrbkvWzZ6HI3OdyleAzT/f25eZaNwbfxO8qhLfhL7fhk9IhOHb/v X8OgoeisZXf5VDO1W/X6Z1FLi+10EdbySqFRqbyXDqVbCwqlzdlazfJHX3aL CLtWzxaC9XRBS+jqxdamTSc+/kgDPnvNfXNz75HDUhA/Wg2q5J+HT7+nX8xn L9n90PunmhtH/JI6HeH02TP3o7E9U0VjayUfsDn+4gt+pZ490bRKPrhr3yt+ VEWvX/3lT1rMrvmgX0IoZ61tLIDr+nr+5b06dZfywWUVwWbItud2WCBoLxnb s1O79Uql4suuLxmVLRqtMmEAAAAAAAAAAMDDSIOGgShfy65HG4kDEW3weKnU wxU1bBqKVtL5fS1jsocfWrNUUpY7BmuT3TH3OY0aAqb2taxK8zvZmDq71CCX XYrUCWaPomsMszFfxeoVrTsruaBd54Mdd9tzO56d2i2vLaOj2lv2AvkKSzNt r2sGi2qo7e3Ec4dhyaMd1CJavV5Fy+6yp2M1tFPI0g51Uln/RcOzNjYwK1r5 UXw1tP3yijDiQmT9VMsuLw1k/Rn5GLcWKxledjYCAAAAAAAAAIBHjOY1w8PD jUZDVzZlIzYfZ5TQHny4YJ2nWtqBfJLYiBStpcq2SW0sysv8CWb7104sJUwN siS266kURTs24i/yy41julZveRe0Kx+bdq1JyTjtBLOrQbV9+dhsGL4Tq2TF ZW4l51J0vbr279ukpmLXiWG7rKQIfhhVrlRP83YZEwYAAAAAAAAAADx0LODQ NyUNusr2kLtvqlkrqfogWxmreILfRSm6tqk4sIp7dW3ZtYemU1ST8vbZXbpe r/KW1Xe39tWvV5XpNJI3Y3udGCssQurstOCaNuZeqV6HV6WwAAAAAAAAAAAA eCQtIy0iYHogKDsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA5NoJAAAAAAAAAAAAYM14 AwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAfO/+BQAAAAAAAAAAAMCa8a8AAAAAAAAAAAAA 1ox/AwAAAAAAAAAAALBm/DsAAAAAAAAAAACANeM/AAAAAAAAAAAAAKwZ/wkA AAAAAAAAAABgzei0O51Ou925/x/93+h/7v/Qf9x/q/9Z+nd7qYG9iXde2pzc 3o47bEf/CE2s9VKj6Hjxgd0+rsHSfzt+VB2/59Ln4eB2bu2278+104/iAdgB ls6+3YmP1w5vlz4M9QmnEXfrxtF2R0zVzZW9k+jSjSiuWXupEKHfxPHCj7BT +iKE6xafi52sbV7q0q5bXG+7JHHp7ZK33TCtvKGOcSM3l8I+S8N1F91qZpWz UoSDWYXc9bTZGy5UouyutPa5v35+9sQzOTGtXVXDJAnzLpx+Ym64qRjfA6na 2blbm0Tv/p5qu6O58XWS7xOjCsXsxLMtDCtxCf1Jtv3phnNzt0coqh9V8l4I V87fxPF2G4ifvskzDL8QbCrHc68d/tdNA3/4RCE7bovNJrsAnXCaHWtqZ2s/ /fQPN2DyctsYE0e1yof6JoYZ5pSfKe6Ojo8TJpi/Vdp2tRJ3qrWw0zLWS3yT +BHZzWaVbYfP3G+BThhBuE06bkDWh7vY4Y7thHslvI3P282tMK/TR+i0XX9h 1OEXRHzwMAHbbuShUPFMcTdhfDw/i8K8CBchDC7c4HYeoS5uNsSn4i+dXf70 Tex+CdmRE9MjzGR/3ds2Yn8Lhg9tqO5ODW3cLHIT3y5QmJZ+xtrUCaOz6+NH mfhtZGdtfVi5rKyh8omZZpfU3dyJS+amnV3TcIKulu4/jk2/+CqHWRsmZvIg 1qv/tRNmok12O2Y4fPqqhyP5m8OOELfv2K7hX3F1wkUKd6KvZrgl3PXrhL3s t4ex0wx3WrudbuFOyCa0n3m2m5+lyYvvjutmTWJ4dj3ju8eK6G7H1NYwncOV 80f2k9qmRmpSd+ydm1OJK9QOEzWeCW6KhpnrrmOYxW1fAz9qf+ptP1y7TxM1 C7d5Yg7YlY1ngJ+V7v5I1MD2CkMJNQ/3XPJOizuzoVsP8Zm3M0O23kPzcD3t EMlZZlciHnTivd1h6donbvH4ZrTpZO3iGy5MFDdjwpj9JLRZGiacDSVZNruT 3fxt+18INpkSY7QauUvsmoYrlyx+x43CX/VOONtw69g1sKtlF9UdONwZYSra lXI3iV3xcEOF2d4JVU1UxS5SmG3u0iQmhl3txOGXKmZzO/wW8PenmxTtdmqs Np64dn5rKGuYF223SzxfO2GANm9SN6K7gOGHlTj03rHTdCcZ5mM7jM0mYVwU d1HdYPw8Skwhq6KvTaiAnzvJ6sYlj29rG1m4ccPo/cRzg0/MSDf57aKGLeFk fdnstN1gQoUTdbIS2z3nr2aY1HZ+1j78OxzeDdj9Imi7Htwg/OzuuGOFKxzu Xnfp4/3DfZiYWnap3Mm6qWxTIdxVndB54ldDO3GyNmg7ms3+9O0SrqzrKlTL Kmr1sqH5OyVZRHfDJiri5mYn7ivUJdw3dvBQqMRst10TZxE3T064MLfDRQqN QnXa/jTjy9q2EVn5fWHi1jZnXDO7E23+2BlZQcKtGCanm4mh4p3ESfipYYNN HDzcgXbIjp1vuJOtTZgXnfiudneWv9385Ai3ie+ynTyrUDZX+cRFsWLbvWCj SN2tHd+x3bjWyF1MmzM22f2daOfqz8hqnLolE1fAdxp6dvepu1MTu4TfB/EN 5foMdfJ1DXMhzGebHMkZ6I4YCpP5PRBvT9yA7maN53C8KXzkLlQYs90z7vra mMKFa4cm7p5uhwOEqeDnfjvRkZt2NkXcpEn8OrBr4npxw/QXNRzCRu/vTnfL ujG7EYY92uF/QqN4loSr0Q7n4k7apmsYqLvqYXKE//EXqG3nljihMJNsGG6A 4bZyt4hNAz8X/P2SOEO7T+L37qpaVf2+4Qq76sTN7dYI1zbcTpkDpu6AduKu DFPA3Y3xvZi4WslboGMF8fVqu9478X0cqmTV9xfXjhVOwK51OE64P21axjM8 rqa7Y0Jjdx5WXHc7hA3uKrjBdJLHS81B17FdUJtGfo7GRwi/R9zUs0KEKx6m WTzz3EXuWD1CUd2d6IYaZmoolTsJq087jMeqGgpjEy7T1g4S/uUnT2Ki2Hji EvgZHW6jeA7ZNUgMNuxlbUM9E3e4u45WTptX+ua/AAAAAAAAAAAAAKwZ/w0A AAAAAAAAAABgzfgfAAAAAAAAAAAAAGvG/wIAAAAAAAAAAABYM/4PAAAAAAAA AAAAwJrx/1oIIGU= "], {{0, 75}, {2400, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], BaseStyle->"ImageGraphics", ImageSize->Magnification[1], ImageSizeRaw->{2400, 75}, PlotRange->{{0, 2400}, {0, 75}}]], "hidefromslideshowgraphic", CellChangeTimes->{{3.4483017593296423`*^9, 3.448301769562791*^9}, { 3.4487297016867533`*^9, 3.448729710294153*^9}, {3.449486136735977*^9, 3.449486146926845*^9}, {3.449490735677544*^9, 3.4494907482045183`*^9}, { 3.473785056790244*^9, 3.4737850735465307`*^9}, {3.485608891427413*^9, 3.485608902078108*^9}, {3.516534228793694*^9, 3.516534238460294*^9}, { 3.517925345960129*^9, 3.5179253474520397`*^9}, {3.518187873028657*^9, 3.518187875044894*^9}, {3.5181990234752483`*^9, 3.5181990242399282`*^9}, { 3.518200170676401*^9, 3.5182001710513353`*^9}}, ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztXU2sZUdxvtxzz/17PzPzZt54zI9jSwFbOEBE8MQ2hGALsJLIYxyj/Ewg xqAYnjFK/INFrOAosRQlE0UCQTBZIAGzw5KzC5J3EcJrNBJCQogFCxbnLliw YIHETX/dVdVf9TnnvvOen50QefHOu/ec7urq6qqvqqu7z733oSc/9VefeejJ g088dOM9jz/0N586+MQTN37wrx8Pt6rXjUaLj41Goz+6cYTP6/BRLuv1r371 q6GXA1xQ6Ze//OXQywEuqPOLX/xi6OUAF9T5+c9/PvRygAvq/OxnPxt6OcAl SGG5XjWr9WrVrJvwFz83Dd1L38OzcbixGk2sWIO/1Qq3m9EilcQjq7VKRWPx JlZOZc+45w21FEk2em/luaDnoDLGt9F2et7k58o9lTXa4X7qxYXc2ZUUSywm llbKuvzXZ8YysevJqxjAXTOaZu6EE2lujLKjud1iodl3MBvIV7iDCk3oLTfj mkxjRPebPDinXZEVsWO9I0nk6tbTKrY+lbHM2iLyTb05Q3JrTKalbIUx4oI7 oSqyzMPpaOZ60iNIaDWqsiCbZpSGeJuV1DTNs+WGeywCC0ycNc1ZrTILVtfk rJrZFKyq5sX/ozR28yxY5sPqx/ab0X4eGzZFk6A3lpXTRGbFSTYKaDXaMZGY cRYjoF1To83sL0l9V7mNUpSis1FXMhukZlUataT+WTnY5q3L46x7C6KXDXDV uFEYJbp1LqsKE7GnkWcNia2hZxMbPRF1FcktSWm8MpgkG+154LQiaIkotYqG 7tCo1YOx2bgHDlU204axla6y5e04IF05zlZtgZmlhae1UzoCH7YXGvhVcT/b gbcNbSB7hgJmmUFlJhlune3djC4WCIzuOAbb+Jx7b0NpjExIvZoErKnNUOKG DBRkCSsaZ/N6q/I7WSFbBKF5Hpk8GtKPKrK2Q5jA2N44Eibz1AXR2hmrh8cU 8bir0S41TSpMXtV1LY9jqr7X4+2aDumTOji8MGwAx4UQSHg60LPsMQkxG7Jl WFqGL4Upb8Pm73ed8jovSyFL9uvGfdSRiD7ZHMmIuOPCwR6NUY5iOMrxdlLY WfYNY4kjAvvXZXMgf8RIpmrXUmFnm6U6mo4U/sm7aelLKrZFiNflypzWy2DO yaeQlLOFJSOcZTdWDESTsD2SsviODDEPqnhRVQ0LFVPVwntljIjNTSLLp7x9 uEiSA6MOdWnU3qbZwboxXwnOQ3vrLJCsU+Kod9mtkFQIF5wfseAgNX+OjKAo UgRvDnZYXdlJqpuZFgI0jR47I6EhIQVXN1zFbu46d+6iFgPAUtDxc4oGdryP ctBq3tvZK9RgEuU+I/sp40EtU7HCCstbLafqg2RnN2JT08wX6ZNND7YLOa/a 7LvYr0mCnnt4pbBPemtBcW5cGKodcKnS6eTCYuum5ICdjzkmDdUzFvlAlR3C SpmvTOxq1Ai8WJTJQlIM6ZTHRjdJb+4as//ZiY5N0jkmJQ3JWKNBVYwPGbkz m2D9AmlUHlGHQyuSQB42MkNyhxTkkFZY3znCIsPQULVwMq6HFKKuTKBR9X2U 4yKokU59aCrlGOCohiCHULT13cLfDJEcSTesSasYKZYBV2aRfP/KFNkHV+Ij alJ8626ql6S35RDKJRfYmSRY0IqrFHGYINStTHJhBsvryQSK0KHJsnLuhazS uRmyRKecKwEqUdoCyzumwc7bZSdKbr7RTMM5P1xk3c4vE8i7HA4jLLv4KmvC qojLM4gYUGRFEb94S9bphgeQFIotkFCyPWluCgFkH1LOVTi24gHzgiOM287k aKw9SacHSThvch7fzZSy5/Ao61SFo0fvRhi4ndeknBwFTE4NOWh2AEvdYdtc WaBVOnXjXaOglUJSS+XJwqTgdu5YgWEWd1KMYzLdynjNo7gqdNr4t5B76u0m d3gsYQzBlyjy+VYk4iK01pg2Ti3ajtn4Vn9OLmWkoQDHTCUKmxQWvhVnnSYw AYxZ5rTQstzTijRrNdLo3cdVDmiE9k4RQjSO7U6H0mjkn2GiMW+pBrdX8Mo2 6T2xN0SK/VbZA6vScJDlgDDjeBbbjoOghgY5N0XGKYGF4rdjOYt6ZZOizCLz IVpwOuOJU7TGDwM51Nxt0Wk0tSR3tbIq7p6ZQGNzaoP+LMhek05kkg5t5fEo MNxFACuNpxsfvmaVH+Vw0GN/EadzcpCxw3x8nNtyb7whk99V2VudhiTgUgMu btJ04MS7G51az51PdRCnYRJPYAplbzjimnmI9hHAyKJB1ops5AK9qybn4RnO SDVy3J3du41NDpxWms6hKIQmtZr80wiWPHdmPlpZmp29rRAxaQ2ZH6t6gWIO pynUIzptrHZzEbIRHwuxGnDkoeH1ltPwFfPcNKWwLYPqgv2i3RymFlOpHJE0 NDfPLoYRhZrLKyBeB7lia87p1Hzl5SEz6EazWE5hCxlTzOLHa+VkkOdwFnWL ws7Ic6y8XMm/N41hZoYLrtQVBhaho4YlPJ3xkF/GQOqQZXpH+Ghi5aTf2Sxy VgvD0VKUK/IUHrUaW4iYWt2Vb9+c2IqlxsJpnHDas67b3SiyRuSoi+OO7BR9 REQOLkuthLmWJbt8QwlrZg3kSJuyzQxJZewv7aRuzkjByYJSF0QJ30xGUSiq iwUyuLu5mRlagbj83Ykl+7LcVsG+AUSVxWVT2HPOdfKc2A8nhWcObFmDVxpP NLa+x6w3mYRGW7P8qJCWRjg6ySbXmAS9IGq541lA5u5y7FkgtusM6Z2wYzFx OUEv6Nt8NSNNEzMabmZceBHp5kj74tCPvVrW6RElkDPUuVHImmiZgTydUyIy n8hDIvfqjC3u2UqTiktvMavMaRHCJqFM88CwO9FZ1LY3FAq+uGvUkmpM23Ga nlqGmeIuI50jEEJRb5+2EikwvE0GQfrh9MjBuOJEGQ03LbUqM7Q5l5MDjEaH vfHYUyC+2feCbT6z6AMqsfslD1jLIVOkZjNDipfYEvD0dZHwaL3+6U9/OvRy gAvq/OQnPxl6OcAFdX784x8PvRzggjo//OEPh14OcEGdH/zgB0MvB7igzve/ //2hlwNcUOfee+8dejnA5bU6qc473/nOoZcDXFDnuuuuG3o5wOW1Oq/V+TWp cyl+rtbnz5+Pz/Ftt+Pe0x33BjT1L6mpr+LfGJUDif39/UgG36b2YBv346eJ 3avtXoV7NT7N+kiN8WC6scjUUy66M+njRcqBUqqlTxcdnC76Gj9TPjh37hz+ AuO45sJocTq0MErUKDzBx6V9quzTdkcXlrjOcGtugh3FKkY0ymDqiUauRrWR EqbWZ8+e7exF1SHRAUrzRFKa5+K/yKW2st7b24v/8R1cluMDTrbWp0+fDk+0 rHA0pqLKdB2LVo7kWFRFyEUy+JPndUeLYxQIxKRIx7OKORnVHaxoOaWBEmPR S5Z3KMVcK8mqVxDzUhA2zFKuJnmhBSk2HSiv2YBhOlXQQlenHb2YdLSp5WgM pFxtQuG2okaHwJba4rrc+yBgtOCVdtHB6zLyULck2UejLgwFdYTHEVs17oHy UkaK+tHVt7lgQ0/Xqm51SQKcbVIBURUv5KNbKqiBwu7u7np7ezv+x3eIaULM gRMps1wvFovQMIoHFsQUkpGQhLR4KInyEyMvdcaxjZkrro+90ixLDlw5anKM B6E9aYFInLIBIM7K5kzEOlB4hh5MYg/qsgeiS0cQUpJqISCmjtsifsKIqdNK qppEO+1iLAPf5kHeJbtk6m/57XcEht9+5x2h/ptuusnqlUM0Jrth+YY6Vj/Q ivX75Td19UkKMzJtNb00zBHYItsYNulieJYhqoQHlBH2QrnAzBwftYbqElPR oWCAUGFqRxNHfmSls4vY1MQNS9T8NvVpbz8Xrp+MAsRFqAlRh15cuE7FLL3w Pk5pV9Z/4Y+0bgCKPJ5Q5CvE9cVA4JtnzoRWvxF9083LJStKRYNwNRRFoa31 10+dCveeFr1KoocoU+cuBBIPhs6EUuuXwvdr4Q//8R338TwYQKyrmPtMYgP0 1w9sbdkzxgLioVWupPG02IwHxXmkcUO49+XAC8qBJ6KjgKgqDWmAFDo8RkdC tPZiaOLLUg3dIKxwei2sJmktWFqGVPgOMiD3YhwENPH6yNWjgezNJKkuxFN1 OorESWOq4XqwXeDN+euvX3/s7z+//tcX/ysU/tJ3/zuYwrP/+fz6vfd/qMTo sQyiWtmHDj6JoqnWKVBY3/eph80EyAtYPx949BGUXr/93Xc6FKsLL3HTW94c 6aHsrbf/rpMZOMf9x77678YdNIOjkHfd9b7I1Va8TtaP/8dXTF6xJ7idvQOq 1wSEYBvk0Qx6GX1bmsiAEm6DwDJeF+vf+f33mu7+8acPNvRwflgPVcaqEIDu g3+7UseW6shUABr2IqN+ziaRGw5ijoUsdydFFKWerO8MGkVmzchyTYpuxess WmZpK5eSToen12JMC/2G7bDOBJPT1h4Vx4WqNr1ccGvxj4uhpavEMKwHViND zdaCxp6Js4hr8UpkTLCo9ljAimvG9Gz9Qvh+cwF/MrSjHenYN7KHimzBMgM4 zERC6DdsmqGHouReWd0jcEUYUA0frS2ae+AWFEz1EHb/5599IlQNehM4fOgf n1GNWv/t1a9Hy2ZLxP83vPGNeDYai72hDrQOf5949h8cbY1DhIbNG81mgmYT atSkWOhoUH5pZhlNhuXOoEDCXJBRw0q1CHAqGPY8dnSyvuvDD3CnNsEDGnrH e94dKaFvkMketDU5JzVCaWARG1isf/Otb9VMQl9vR/3drbi7FuujHhjXEQoS DiXR3jYgw+4D3YHyHLArmw8+83dgNbFZRRFp6Dt8LnMiWFFHj6/Wi+KX7dkk 6vyrgg1lyuPuWCgZH5NR93nlzJmlUIJtKiREhxHq71DfGAZeijPkBCX/tLPj YERJXybZaIjSjvyPYPQpmvmt295lRgktLeYs8T/UVVUEhst5DjF4MyU4sjy7 Oh1pYMIC41cjwfciZOkzg0kBzn/wlx8N345h9DNn9OipDxYsERN7psbCJp9Y 2W1FBCo1DkhUWuTEtjajW39Hz7Y6ipbU1CHPez76F86clQuMrY4NgDiPy9Q4 fNsdt/NYLAbGBU8e09anLWuEvoeic7Gti6IT+Lvl3LmJaDycJ7zf3eIFn7OG 6uh8bxCVLO35lYMEnb6G1kfKZUnmssFFDWiI3OPvcnL9FmZg6nEhiStlw/SB CCfKZkYSAvEbEnBUJIXLJKErxNc9hBcYjruJL8xRWLJXLfypI4aBL5LgUXBm WQS5qouMMzYo27FYiDei2qoacwytEb4by2SPii5wbhRSbHKwSR/PdEbgHIkP QJjRJohRuS1J/zvgRXsDVi5+8AOGtUTCZqAluoR7S+KgL6JIPd4b3GOFd32m 9ATodNgU3fGf0adEGBXi4eDy+WOCy3yjXYdnc8ocX5EQfiym9iClBitxB7An Rhft2okizLxEGJseRy9z5kzdgS54xAiiEVGZH3+ukNuDQkN6WnV0Yl8WtoTC wwUFQBJpSGpsEUXF/QWkaZ/2BLCV2Qdy+Cainmszzi30BGKDUCeZAqCELUkN diajVKaZVdWhyyrOlAvciffUcHXqo2ay2eTOcBAfy/3pE4/Z59I+XkGQqYgE qkAsKILsTtaeTOJlAc3wXqPcH37sQUNw7tGM1hw043oi6PIe/CtWersWq8em 5VEy8dMsIfZ5WSmvrK6U0xpxDpdX1Cc5+D4xVDuvi1rzqMAvUTEgV+lhqjxA J49ksxaSqV1djDMm3wzKXNT4ZWJ51KLvEuVY69zCXq5d8D4jyV2l2hrQdKR+ Sn9ws4xFSs/nUJBaUR5RvWyFpmfHxC61CFgNWwTjAGZmmo5hrFDM6rOUTZg1 pjBBZiKGocC9I+LWCcIWz3uK2OgkYOs4HUdzmhdD2Eb0tMkNaDUkqyJw9W5i TlMCPN9TL7ZPi959z/aQMsmLXn3r6ntRQ325sz0bVXQ/ATejqSPW/33b1JGc P5frWn2PazdHa+4EAVaUZy4xSpiPtooRtTlRu9pPbSJWjFrDcLVi1HN56BcE tOoObL2k6FjFbqt/n/RwyaA1DFjLcK2FjGkMLrkxSMyg6EWKCB/MkhxVpIY6 ia7Evygolwtmd1uZjZCqlq/xjpphF0YVs02B1JtadDiR1YMsLsTkWZeuCh0F UjGGqpBKtwdXu2DV+aUUYGmY1hUNctamF1ZfvwlWj9X5EjOFHV2tOElIXVj/ da9DyXjCK5je1KUsFSfDk0neujApt8HUeFYTjsoUz+3B0vb9PoyKnyWTp/1e KMHYmjcTnG7tC6vl2rHpSbzvywZMWtCuxXewE7o7Y8o9fiPAJtwkonF/ney/ GIabUxctqlcMM+pKJt4Cn51IbcUqixgzfCZhPVaEjASfoyPiZ2fsPdPhsD9d GM14Ny2HSFUvaeNWfMwkyuLHhNAyeBoS5nVBKJc5DELL+SSShZpf6JsPMoSS MiVTDqrPKlryTomSmSwBFNNQXZBjyim0mUWuOFrl+HwTrIZ6s5xZeYMN0ElK pqtdaPcmgM35kP3hO5E/m6D2TopeYYff+9731l/4whfcQrf242tf+9r629/+ tsvjKry9//3vX3/rW98ar3/0ox8FNpUMspS8ky0UCU9TmaeeeireD9/Wd911 l1szqygNBNIoo2IrEnFhWEG1juyhTWov4bQoE9r7zne+E5+HGpGuQtO+7jc5 qxsu6/Xzzz9vPKoxHRmRZ52AMp1O82bGUe12H6D8BpOfE9kSk5XsNO15vNa5 9JFRuC7n7DHymwgE31zAUw8EE4i/yhB8riPo9xC8cMJTz6+7O8FReG4hbBf+ dg3GESevw/F3+6j4m4DodGtOjF0EOg0dAL9jiGJGmyg5liphF6VmEU5ra4Ok NWLg9Rss4y5Ki2Wx86sAEt0iyxgnZKTJZed2917J7B1ZMj3R9FaHV8CCjHRw KvHl3p7fQ384Cj/JKHwhVrrjjjsi3AGqiq0EkTigFc9Bgjdj3n///VbvkUce ifD2xS9+MZYHagco1twC0A9IGVA3iDsUDOK99dZbIylGY582fotDY0ram6Xo M9T/yEc+Ej+zB1D5aEwNVp999lmHyNou75HmuihXoPKRQbluQQx2jM6BIMVG TIqNO3G4buGwUToq/uqSNe9wQ3vcm0MweN82Q7xaGNxXLGNm3cLgq3u6T87n PzTLBSF5zmubcXCMsDhR8D17rOC3Z+osqaDFoeiLvWALtBZ4xG41Ts8Tv6Mx HZOQ0wWjCW3vp5mnQ2EsswGosOl9DO5GO7FvtmFo/5zb71z6PuF/Q/sVewwZ w+1eee2XK9dJXklcW0eB5FEfJovHmOaJvz95Nny/3J2UhgCiAq4AaRhw5g4A mgLfc/FQtioOnqMOAtPSrWLNEs84YGVok7IT0VB0oAOZeZ2jBGbyGSlCjl4q Sh/FgM8ymiktcXZ92223xUf4r/woJIMfuAg8x32aE3VB8tEDZb/XcElFh2Jx xVg82jkUfvMGIpAiOEXyoVxg+n+GvDOTLOfMZEmvc5eR9vJkUfeNR0bdvgl1 1ya/DtRNBw3q1ob7wOZIn+kxAQ5r07N5XAUHaJZzYGl2KbhL5AUTr9/YG90H PLQ3m0Gxcti9iFd/tuIY0ekiMqWTbGDXxz/+cYd1AQNkMj63sA6MlbhiK69p 8wCgAwFqFwye9XswwbrA4Kg8j7avWwKC6ZdYqBxqUMrpBsTIoTdh3BNIomcl O4GeZu3AmYbg6gh6uD4pELxb0sIyGX0FQBCJA4S9L+WVqYs57z0UBP8vpgDq 1rQ+g+A0SpZP/Unoqfu6yh3f5+0M9knh341Hwj9V464ZbUfU1ht1YlMCnoWI cxaRLx98KLOtdAgjdAinD2pXtgw4Y7AZgjpQjecUgsCwXwLAplN/3mluwV/r SEZq7QY+69A741fB8P7MoYLpybhudSQj5BSGCKLi4yhDwkpJud4R/+WTOUAT ABMgE/DKoAUgAqo8+eSTDpQ6gj2GVM0FHAqpE4bUHAvm1wGAQWksnbNNOLiw wJbDTW0WvQFEVzE0TjkFBNAcMGpgiXhUJaB5iRPF1PbGdjnsOYOph1q30GaN w+C1nXd9Uc6/4ihnHcFlEU+R9KFX1wYCwG864ZtBUWUa/n6N4bdiMSa+aAml clGnbrrlTWXX2hHoyQLw3mAAVqXsWinf132w/Ru7ipyri9pmOfu5+TTMPBfs 3TyQFpR33NmeYptCJ+ZhgIj+dkvAykjH/D0LYPt4ONu9sKVZhdnAePUpBtil y6bCZ913330Rargj4dk4YtXcspVd+Gr9W3bOtQeHrKHjhKKVLZ0leEWiO7lF DVQ5wlQ41gQv+wlFXvCv0M0oi/LoOp6XmdkTQdnBW7XKhfNOmN28VescTh+l uehRt2phO1PuS21TfcrnHRbtAqxLuAW3rwDcovp5v2dLOmyttCG3Z5NAPir5 mCWZFxr0W8tdEe+sA3DLvT1DjvJNyYBKwFWAILxJb/WY9k30Xw7ensDO1ymh nca1GtOWC0ytBcN+bO3JA7wC2Hr0XVkKq5wO5YwipvegLDCri354hFsoiiBz Q9h6DFgFcNbxGoNNBVS5t7CNCMqckkKwLQG1ZBLOxXKaq9UxxCYACY1jh5kd /a4giiD95SxLDT5PUGLoPfRWhv1X4zxBOhj5kutUbSkDXojYCKYTPVtZ7k59 BfC0570SfmAqezVN16K/hCP51X8j/7JC3hrog9rKDmddMfCdlIEt46y+fwUT 2i5UkvemRLxoodIZB6V6BrmEWAABquJ5x5xZFn3/1wEWJICGX/pu3tV7KMBu tZwVivRkBw7tKd/HqzEYPk/2LMEdokGaaQ1/gk6nLBUQN1FIqoAn1Jpx7cDY 0bFANucGgPaB7CQi68TOkwqlGD+P47PfiIEoKAJ3EXMrVY3DsYaElnnaz7MS 1C23D+hsTJ2O4u0TTzzRDlR4k3of6pohp5C0bxrrItdF5yGD4n0QI925rVta eYfMCaLwVPKXnCigPFcXPF7ymY3WbvO8o/mb9l6sSYR5miBuxN0261+m9TUv oaTiXQcQ0NJFAt8HCbsjB+fddmm1gM0bCCrb1HGLBfjd6d2puBAGYd5xykes x4IAnDfVc62KiER7IuCscbieTqJt9C2AxlJTx1xbJh7/6+DM7HIovxGcly1w 7unlYZ3EfQ2YFeO1kzW5D1kdsnHaJLTBUH17/HeTy+JqjlN3m+pCuc7Y+Zlm c0u4LlPWA+DanVcodgmMqgyNnfCfDWfHsgtwJWRYzvUAmNFXDcVS9v6UATfK IpBmWILD4ByvArdqWy3+RgfHzpft7e117LWnTZgjfgexVHPRIW1umdLZB8ms IkTjiFY30I7TukQqj57Inpd0GyKbdWYntENHwfKaoBYRoQzqeMCUgA7pAsvA vchFxQLeL6SNvIbpQGUy1EMw/fz59hFafrshDwJa6zqtW64jas5bmK3o/Ajm EIqbDIo+nq7tnW2KAwPiao2ZsfpVvOMx6Z6cEIIA9lIOTQ6Mp/XzYtk/VTlj GxU5C6CzIAY6rIx98so/x884OUwG8rLgfMiRM41iNHWMdjekjtEUmi2nEH2p Yzv5Nu4A+A391lerbOq2OmFUVcVw8Vt+RabGA2ftbUp1F9nR0FcpfZaR/vUu nUxbGQxR8dsamrMtnyGMVaQvz0RorCg5Wn0b7VGAfi/aROpxCfBZGjc4x6QA z5E1BKw7PBjANTJHhoO7qDN9lNGMSgfAM76DBUHUsezs7joIlZF4O74aW3tz 2vZkVe7IwyyWmzjBXslJW4VH28UYKmCq/0J+v5PlzU8oRq+LoHbfThdtro9n /AIZsFlKAyy/4IB2Yu9u6Vk0dLCech/+BTJdQlpEqswpJ8zBKb89hsejkpMt Wp/eGiPnsBYao7txZ+Q8Sqyu4aPGgbQ4kprbNXjAPlt2L6iuC2XINHRWn1l1 zZfAjWT7ShismAew6sg01MeAedHM9AJ4jT1QqOs8nBWkw64SoHYdiKsTzdPx 8IL6L2Q4TuuujNphvdbLvIzFBQ3q+Gag1zdm6O4QarDKfC7jposyOmCaIou5 RBwkhiNs/b1dgBaM6dqZj3hjgjmCpaYkymdIetNu27R9Iu2vWLhcs2ZwhqC9 DsGE4l63P2N0wWiqxqItRXyVNiSsNNV5Fblby+NwTvx8XqjW7cAo0h3R50Ru WnN6NEICTJnNPnxPW9RG+U2uDEv6bu5HI2o/arCi7d2S4niDCn3DOOAE//Or xGvDe+3OCWH9REg87WFlKNxfMhJJOvcI98h9ZFdQl1OEztXKPV4qqKJwXiwO U+A7SLOA+IWEjMEXibUuwTI+q975WH3mYnWd2uL/oTH7ZP2BP/sTA4Vg3Mn/ 5R9X0GmZYjJ25zKsA1PUM4QysXo6trCIyWSNgeESdDCUu7TFK4Gm7i/Jy5ht EGfrYhDng3CLDJ8Ov7nMXGIc5SdN0L/UOlQ3SSiNj9ux49pgyUhxlA418otv 0142EwRvpsmdnfZ1Vl9xrAl6+ETBbkGjmY0TXtSjbMryZitK1/MbWVb+pQrD 34t+O2GnZNILb50ODAPANNrNz6YxktU0CJ5L+iJ1aisqlgbDSHnzcqHCuJ/c lTtBdvOrJyhi5z128wjOmjcp1TMwP477lpduwPUxsJtnCPv+HXPY9IzHpcth 3Ba0kk3EHpu3i2m4csfvgr60l7cQFu+CbmVFuzGS04n57aetVMmmIxE659Pc 8JUccwYBX9vTl7Vf3NtjTSuz6MSw/nyBvB46FloI0j0jHrc8ocpiuSKvmAY5 2lbSnibMYxOFp2yD5Cm3RKYoiLUuGCqMGUinuyiAhniW0/HJTvht0ygb6ozS z9JsxfJaH3+IwHTAuZdhqj7SZEmxgYH3fqixF7+8YKAZQKQC77PY/DSWQyyJ JhU0QxepzESDVp38RC5igYn0ASjL+49RobQZPTBBlGvXOqgf2sk3bOyktsVv 3QYZjBN4wn94M+VVX8ffBeihXGAl8DoXKfC0fFiKo0BLVNJEtl+wORXv6eZe thSe+0NIwH9FVtDCqYqx7MbguvhTuNR7DJegCxqBblACUKli2kWj3Ymc10C7 KAdIIzq6PwiHVBTpupQWLCjrHrGnBsxFXf6NuxIkNTLJIFnZS+UZh5DT1rhs KuVeSst0lLHxWebHhI5nc8F8tMrpoqPCDJ0lcWskffVZVA8nxJsJkCGWJtjU hPUh1JYEny84AaTzZpczgyKqLOyuX9nQ8iAvgeeYGCTnxpT0gAxnqVUscyr3 e/ddimd0p9HiU6ACK+NZpdIFhCqE8O/A6HEyLc8bfT/8mU+bmWOu6PfczR2U MB0Zkh3BK8SvePSuu94XxjOBE5pWwezrwbeJ68F5/9ORynwqujCqaFDTsN2M TvsYZZmjr/j1oiTLWYQ9kCrVLJCxTiA2Zas9FqJ97nOfi5NVPwB1nPPiGb0f 2/bwINGLZxkBp3YPcAA0BM2YaUvGCKQBYnSgBGqFv0Aj1B2jYnigpNKxOVzr SBbNtPWruyv6ZsbOtnP6gh65X1CDGVyN6HXVraJdjeiVZrbP7HX81uiuhjXx Pdb6ti78f05skt/MrSP7DGwztXSZ4JZ/0Uk4in9SRvdUPEOPACpsUzXZVAcJ ktW2phYjnF3NMBw/Izi75DtcDSC9TeHNZSGjyP2ifH44C2XMIRFY6RJkV53A xiVi4ao4DC/ItGDKZR7eK98pl1jFihgMG3+wNBzUwsyGtG9KqXs8QpFQfCw/ yAPMo9KqdyAMc6cfDJBtB/M4pcez8hSZQMQY5JfFSTP8Rx0EX/qMfwtI6o5i 5Xi4N6gTWAUUFT3S+AJ8SOeF5tzx1NGHhXSvowsj2hGyiG6DBQteFepKt9Hm 47i/73MnWTYepZHru+dfmXad/FRy/JnLuEdl1lGz6+ez809Sx5yI/DDzPr9o W37nep9/efoEf/F6YpRbvy2thU91FF523Ovd29nLxo5xurRPMYKIUtqyT7HT u3nkjcC2tbu0uruGtAWVuRfd7kCnKAe5B5TMl1+Xn3l/rc5rdY5RZ/S6/wFX sbDV\ \>"]], Cell[CellGroupData[{ Cell[TextData[{ "Financial Modeling with ", StyleBox["Mathematica", FontSlant->"Italic"], " and QuantLib" }], "Title", ShowGroupOpener->False, CellChangeTimes->{{3.448190122176695*^9, 3.44819012385317*^9}, { 3.485609127497636*^9, 3.485609133015955*^9}, {3.514308355088097*^9, 3.514308374696691*^9}, 3.5146594348020153`*^9, 3.5146601881617107`*^9, { 3.527506685984375*^9, 3.5275067070625*^9}, {3.527507399140625*^9, 3.527507401578125*^9}}], Cell["Thomas Weber", "Subtitle", CellChangeTimes->{{3.485609136120798*^9, 3.4856091511532907`*^9}, { 3.4856091945334663`*^9, 3.485609199379443*^9}, {3.4951031489375*^9, 3.49510314984375*^9}, {3.495106455296875*^9, 3.495106455453125*^9}, { 3.5143083846926413`*^9, 3.514308395249558*^9}, {3.52750671140625*^9, 3.527506713390625*^9}}], Cell["Weber & Partner GbR", "Subsubtitle", CellChangeTimes->{ 3.483202458953512*^9, {3.495105345328125*^9, 3.495105347890625*^9}, { 3.49510644571875*^9, 3.495106448390625*^9}, {3.5143083980990458`*^9, 3.514308409442589*^9}, {3.52750671921875*^9, 3.52750672896875*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Introduction", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.514308340990994*^9, 3.514308352103572*^9}, { 3.527506860734375*^9, 3.527506866359375*^9}, {3.527507057890625*^9, 3.527507087046875*^9}, {3.527507134515625*^9, 3.527507141703125*^9}, { 3.52750792815625*^9, 3.52750794184375*^9}}], Cell[CellGroupData[{ Cell["About QuantLib", "Subsection", CellChangeTimes->{ 3.483202458956058*^9, {3.514309203943825*^9, 3.514309209861143*^9}, { 3.52750795746875*^9, 3.527507960984375*^9}}], Cell[TextData[{ "QuantLib is a free/open-source library for quantitative finance written in \ C++. It offers tools for practical implementation and for advanced modeling, \ with features such as market conventions, yield curve models, solvers, PDEs, \ Monte Carlo, exotic options, VAR, and so on, see ", ButtonBox["http://www.quantlib.org", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.quantlib.org"], None}, ButtonNote->"http://www.quantlib.org"], "." }], "Text", CellChangeTimes->{{3.5143080983732347`*^9, 3.514308102892667*^9}, { 3.514308469349834*^9, 3.5143084713580437`*^9}, {3.514308507511819*^9, 3.514308539833797*^9}, {3.5275080781875*^9, 3.527508118265625*^9}, { 3.5275081765625*^9, 3.527508185859375*^9}, {3.52750821653125*^9, 3.527508231578125*^9}, {3.527508286984375*^9, 3.52750829728125*^9}, { 3.527508378453125*^9, 3.527508379453125*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["About us", "Subsection", CellChangeTimes->{ 3.483202458956058*^9, {3.514309203943825*^9, 3.514309209861143*^9}, { 3.527507950765625*^9, 3.527507953171875*^9}}], Cell[TextData[{ "Since 1997 we are consulting banks, energy companies and other financial \ institutions in the area of financial modeling. For that we use quite often \ ", StyleBox["Mathematica", FontSlant->"Italic"], " " }], "Text", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.527507149296875*^9, 3.527507228890625*^9}, {3.5275072925625*^9, 3.52750733221875*^9}, { 3.5275073679375*^9, 3.527507375046875*^9}, {3.527507580671875*^9, 3.527507583765625*^9}, {3.527967612948722*^9, 3.5279676174552016`*^9}, { 3.5281007583921165`*^9, 3.528100881248776*^9}, 3.52810093117056*^9}], Cell[CellGroupData[{ Cell["as a prototyping environment", "Item", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.527507149296875*^9, 3.527507228890625*^9}, {3.5275072925625*^9, 3.52750733221875*^9}, { 3.5275073679375*^9, 3.527507375046875*^9}, {3.527507580671875*^9, 3.527507583765625*^9}, {3.527967612948722*^9, 3.5279676174552016`*^9}, { 3.5281007583921165`*^9, 3.528100926133317*^9}}], Cell["\<\ for model testing and validation\ \>", "Item", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.527507149296875*^9, 3.527507228890625*^9}, {3.5275072925625*^9, 3.52750733221875*^9}, { 3.5275073679375*^9, 3.527507375046875*^9}, {3.527507580671875*^9, 3.527507583765625*^9}, {3.527967612948722*^9, 3.5279676174552016`*^9}, { 3.5281007583921165`*^9, 3.5281009461521025`*^9}, {3.5281009849679165`*^9, 3.5281009908964415`*^9}}], Cell["\<\ data analysis and exploration tool \ \>", "Item", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.527507149296875*^9, 3.527507228890625*^9}, {3.5275072925625*^9, 3.52750733221875*^9}, { 3.5275073679375*^9, 3.527507375046875*^9}, {3.527507580671875*^9, 3.527507583765625*^9}, {3.527967612948722*^9, 3.5279676174552016`*^9}, { 3.5281007583921165`*^9, 3.528100964488469*^9}}] }, Open ]], Cell[TextData[{ StyleBox["Mathematica", FontSlant->"Italic"], " is very powerful for that, but some extensions are helpful. That is why we \ have done it with QuantLib again." }], "Text", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.527507149296875*^9, 3.527507228890625*^9}, {3.5275072925625*^9, 3.52750733221875*^9}, { 3.5275073679375*^9, 3.527507375046875*^9}, {3.527507580671875*^9, 3.527507583765625*^9}, {3.527967612948722*^9, 3.5279676174552016`*^9}, { 3.5281007583921165`*^9, 3.528100873988336*^9}, {3.5281010095031967`*^9, 3.5281010471673555`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Getting Started ", "Subsection", CellChangeTimes->{ 3.483202458955147*^9, {3.51430857274755*^9, 3.514308578875259*^9}, 3.527507728046875*^9, {3.5279672971346035`*^9, 3.5279673118958287`*^9}, 3.5279673586430483`*^9}], Cell["\<\ Get the package from http://www.weber-und-partner.com/QuantLib/mma. and \ install it.\ \>", "Text", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.519534989171875*^9, 3.519535006671875*^9}, {3.51953507540625*^9, 3.5195351675*^9}}], Cell[TextData[{ "The first step is to load the ", StyleBox["QuantLib", FontSlant->"Italic"], " package. " }], "Text", CellChangeTimes->{{3.495209008234375*^9, 3.49520915653125*^9}, 3.495209919765625*^9, 3.4952106014375*^9, {3.4952106824375*^9, 3.495210832234375*^9}, 3.514307848543872*^9, {3.514308058576482*^9, 3.514308065607885*^9}, {3.51430841745117*^9, 3.514308419642997*^9}, { 3.5149152616687326`*^9, 3.514915280523456*^9}, {3.514915328702818*^9, 3.5149153375415287`*^9}, 3.514915444638068*^9, {3.519534989171875*^9, 3.519535006671875*^9}, {3.51953507540625*^9, 3.5195351675*^9}, 3.5281010966485057`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Needs", "[", "\"\\"", "]"}]], "Code", CellChangeTimes->{ 3.483202458976812*^9, {3.4951937068125*^9, 3.495193735734375*^9}, { 3.495195085203125*^9, 3.495195086125*^9}, {3.514309192473827*^9, 3.514309197918544*^9}, 3.519535019125*^9}], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox[ ButtonBox[ PaneSelectorBox[{False->"\<\"QuantLib\"\>", True-> StyleBox["\<\"QuantLib\"\>", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, BaselinePosition->Baseline, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL["http://quantlib.org"], None}, ButtonNote->"http://quantlib.org"], Annotation[#, "http://quantlib.org", "Hyperlink"]& ], "\[InvisibleSpace]", "\<\" for Mathematica installed, Version \ 0.2.5\\n\"\>", "\[InvisibleSpace]", "\<\"for \"\>", "\[InvisibleSpace]", "\<\"Windows\"\>", "\[InvisibleSpace]", "\<\" system \"\>", "\[InvisibleSpace]", "\<\"Microsoft Windows (32-bit)\"\>", "\[InvisibleSpace]", "\<\"\\n\"\>", "\[InvisibleSpace]", "\<\"Mathematica Interface \[Copyright] by \"\>", "\[InvisibleSpace]", TagBox[ ButtonBox[ PaneSelectorBox[{False->"\<\"Weber & Partner\"\>", True-> StyleBox["\<\"Weber & Partner\"\>", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, BaselinePosition->Baseline, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.weber-und-partner.com"], None}, ButtonNote->"http://www.weber-und-partner.com"], Annotation[#, "http://www.weber-und-partner.com", "Hyperlink"]& ], "\[InvisibleSpace]", "\<\" 2011\"\>"}], SequenceForm[ Hyperlink["QuantLib", "http://quantlib.org"], " for Mathematica installed, Version 0.2.5\n", "for ", "Windows", " system ", "Microsoft Windows (32-bit)", "\n", "Mathematica Interface \[Copyright] by ", Hyperlink["Weber & Partner", "http://www.weber-und-partner.com"], " 2011"], Editable->False]], "Print", CellChangeTimes->{3.5281017075869923`*^9, 3.5281028675950017`*^9, 3.5281032486629505`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Visit \"\>", "\[InvisibleSpace]", TagBox[ ButtonBox[ PaneSelectorBox[{ False->"\<\"http://www.weber-und-partner.com/QuantLib/Mathematica\"\>", True-> StyleBox["\<\"http://www.weber-und-partner.com/QuantLib/Mathematica\"\>\ ", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, BaselinePosition->Baseline, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.weber-und-partner.com/QuantLib/mma"], None}, ButtonNote->"http://www.weber-und-partner.com/QuantLib/mma"], Annotation[#, "http://www.weber-und-partner.com/QuantLib/mma", "Hyperlink"]& ], "\[InvisibleSpace]", "\<\" for the latest version.\\nVisit \"\>", "\[InvisibleSpace]", TagBox[ ButtonBox[ PaneSelectorBox[{False->"\<\"http://quantlib.org/license.shtml\"\>", True-> StyleBox["\<\"http://quantlib.org/license.shtml\"\>", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, BaselinePosition->Baseline, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL["http://quantlib.org/license.shtml"], None}, ButtonNote->"http://quantlib.org/license.shtml"], Annotation[#, "http://quantlib.org/license.shtml", "Hyperlink"]& ], "\[InvisibleSpace]", "\<\" for the QuantLib license.\\nFor questions, \ support issues and enquiries mail to \"\>", "\[InvisibleSpace]", TagBox[ ButtonBox[ PaneSelectorBox[{False->"\<\"quantLib@weber-und-partner.com\"\>", True-> StyleBox["\<\"quantLib@weber-und-partner.com\"\>", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, BaselinePosition->Baseline, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL["mailto:quantLib@weber-und-partner.com"], None}, ButtonNote->"mailto:quantLib@weber-und-partner.com"], Annotation[#, "mailto:quantLib@weber-und-partner.com", "Hyperlink"]& ], "\[InvisibleSpace]", "\<\"\\n\"\>"}], SequenceForm["Visit ", Hyperlink[ "http://www.weber-und-partner.com/QuantLib/Mathematica", "http://www.weber-und-partner.com/QuantLib/mma"], " for the latest version.\nVisit ", Hyperlink[ "http://quantlib.org/license.shtml", "http://quantlib.org/license.shtml"], " for the QuantLib license.\nFor questions, support issues and enquiries \ mail to ", Hyperlink[ "quantLib@weber-und-partner.com", "mailto:quantLib@weber-und-partner.com"], "\n"], Editable->False]], "Print", CellChangeTimes->{3.5281017075869923`*^9, 3.5281028675950017`*^9, 3.5281032487330513`*^9}], Cell[BoxData["\<\"THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND \ CONTRIBUTORS 'AS IS' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT \ NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A \ PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR \ CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, \ EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, \ PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; \ OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, \ WHETHER IN CONTRACT, STRICT LIABILITY OR TORT (INCLUDING NEGLIGENCE OR \ OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF \ ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.\\n\"\>"], "Print", CellChangeTimes->{3.5281017075869923`*^9, 3.5281028675950017`*^9, 3.528103248743066*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"How", " ", "to", " ", "get", " ", "started"}], "MSG"], " ", ButtonBox[ StyleBox[">>", "SR"], Active->True, BaseStyle->"Link", ButtonData->"paclet:QuantLib/tutorial/Getting Started"]}]], "Print", \ "PrintUsage", CellChangeTimes->{3.52810324875308*^9}], Cell[BoxData["\<\"Setting default values:\"\>"], "Print", CellChangeTimes->{3.5281017075869923`*^9, 3.5281028675950017`*^9, 3.528103253610064*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" Setting Valuation Date = \"\>", "\[InvisibleSpace]", RowBox[{"{", RowBox[{"2011", ",", "10", ",", "20"}], "}"}]}], SequenceForm[" Setting Valuation Date = ", {2011, 10, 20}], Editable->False]], "Print", CellChangeTimes->{3.5281017075869923`*^9, 3.5281028675950017`*^9, 3.5281032537001934`*^9}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Getting help", Cell[BoxData[ RowBox[{" ", ButtonBox[ StyleBox[">>", "SR"], Active->True, BaseStyle->"Link", ButtonData->"paclet:QuantLib/tutorial/Getting Started"]}]], "PrintUsage", CellChangeTimes->{3.5279672293671584`*^9}] }], "Subsection", CellChangeTimes->{ 3.3824524252213373`*^9, {3.514308595622859*^9, 3.514308595844242*^9}, 3.514662627149618*^9, 3.514662723834064*^9, 3.5275077715*^9, { 3.527508517*^9, 3.52750851771875*^9}, 3.5279672771158175`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Names", "[", "\"\\"", "]"}], " ", "//", " ", "Length"}]], "Input", CellChangeTimes->{{3.5280694253604865`*^9, 3.528069444177544*^9}}], Cell[BoxData["1180"], "Output", CellChangeTimes->{3.528069445158955*^9, 3.528069821890669*^9, 3.52807006446948*^9, 3.528070478835309*^9, 3.5280708908477535`*^9, 3.528072044136101*^9, 3.528074053986123*^9, 3.528074183572459*^9, 3.52807440286779*^9, 3.5280748312537794`*^9, 3.5280749301760225`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"QLCategories", " ", "//", " ", "Shallow"}]], "Input", CellChangeTimes->{{3.5280692492472477`*^9, 3.5280692595821085`*^9}, { 3.528069418781026*^9, 3.5280694212045107`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "Abcd", ",", "AccountingEngines", ",", "AlphaForm", ",", "AmortizingBonds", ",", "AssetSwap", ",", "Bonds", ",", "BrownianGenerator", ",", "Calendar", ",", "CalibrationHelpers", ",", "CapsFloors", ",", RowBox[{"\[LeftSkeleton]", "55", "\[RightSkeleton]"}]}], "}"}]], "Output", CellChangeTimes->{3.5280692605234623`*^9, 3.5280698220008273`*^9, 3.528070064589653*^9, 3.5280704789554815`*^9, 3.528070890947898*^9, 3.528072044236245*^9, 3.5280740542565117`*^9, 3.528074183662589*^9, 3.52807440295792*^9, 3.528074831373952*^9, 3.528074930236109*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"?", "PricingEngines"}]], "Input", CellChangeTimes->{{3.527508562796875*^9, 3.527508573375*^9}}], Cell[BoxData[ RowBox[{ StyleBox["\<\"functions to construct and use PricingEngine objects.\"\>", "MSG"], "\[NonBreakingSpace]", ButtonBox[ StyleBox["\[RightSkeleton]", "SR"], Active->True, BaseStyle->"Link", ButtonData->"paclet:QuantLib/ref/PricingEngines"]}]], "Print", "PrintUsage", CellChangeTimes->{3.528074930576598*^9}, CellTags->"Info3528082130-9836581"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"?", "BondEngine"}]], "Input", CellChangeTimes->{{3.52750852328125*^9, 3.52750852525*^9}}], Cell[BoxData[ StyleBox["\<\"BondEngine[ObjecctId_Symbol,YieldCurve_Symbol] Construct an \ object of class BondEngine and return its id\\n \\nObjectId: id of \ object to be created\\nYieldCurve: discounting yield term structure object \ ID.\\nPermanent: object permanent/nonpermanent\"\>", "MSG"]], "Print", \ "PrintUsage", CellChangeTimes->{3.5280749307869005`*^9}, CellTags->"Info3528082130-9836581"] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["What You Get", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.51430857274755*^9, 3.514308578875259*^9}, { 3.519535365234375*^9, 3.51953536784375*^9}, 3.519535471921875*^9, { 3.52796740350756*^9, 3.5279674093259263`*^9}}], Cell[CellGroupData[{ Cell["Boring Stuff, You Expect But You Are Not Interested In", "Subsection", CellChangeTimes->{{3.527967415104235*^9, 3.527967443144555*^9}, { 3.527968265547112*^9, 3.527968275211008*^9}}], Cell[CellGroupData[{ Cell["\<\ Extended Date functionality (DateEndOfMonth,...,DateNextWeekday, \ DateNthWeekday, ... ,IMMNextDate,...)\ \>", "Item", CellChangeTimes->{{3.5279678279779186`*^9, 3.527967829349891*^9}, { 3.5279679001817427`*^9, 3.527968051819787*^9}, 3.528069535418742*^9}], Cell["\<\ Calendar functionailty (CalendarAddHoliday, ...,CalendarAdvance ..., \ CalendarIsBusinessDay,..., CalendarIsHoliday, ...)\ \>", "Item", CellChangeTimes->{{3.52796805344212*^9, 3.5279680617941294`*^9}, { 3.5279680950920095`*^9, 3.527968105436885*^9}, {3.527968136761928*^9, 3.527968227993112*^9}}], Cell["\<\ Extended DayCounting (30/360,...,30/360 (Italian), Actual/360,Actual/365,..., \ Actual/Actual (Euro),Actual/Actual (ISDA),Actual/Actual (ISMA)...)\ \>", "Item", CellChangeTimes->{{3.5279682288343215`*^9, 3.5279683609042287`*^9}}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["More Boring Stuff, You Might Have Some Interest", "Subsection", CellChangeTimes->{{3.5279674505451965`*^9, 3.5279674730175104`*^9}}], Cell[CellGroupData[{ Cell["\<\ Basic Instruments like Bonds, Futures, Deposits, Swaps, Swaptions, Vanilla \ Options ...\ \>", "Item", CellChangeTimes->{{3.527968388193469*^9, 3.5279684151622477`*^9}, { 3.5279684615589633`*^9, 3.527968467687776*^9}}], Cell["Indices", "Item", CellChangeTimes->{{3.5279684162738466`*^9, 3.5279684172552576`*^9}, { 3.5279684893088655`*^9, 3.52796848931888*^9}}], Cell["\<\ Curves and Surfaces (Yield Curve construction, Volatility surfaces\ \>", "Item", CellChangeTimes->{{3.527968490260234*^9, 3.5279685213950033`*^9}}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["More Stuff", "Subsection", CellChangeTimes->{{3.5279674780948114`*^9, 3.5279674824711037`*^9}}], Cell[CellGroupData[{ Cell["Standard models", "Item", CellChangeTimes->{{3.527968388193469*^9, 3.5279684151622477`*^9}, { 3.5279684615589633`*^9, 3.527968467687776*^9}, {3.5279685891023617`*^9, 3.5279685924571857`*^9}}], Cell["Standard Pricing Engines", "Item", CellChangeTimes->{{3.5279684162738466`*^9, 3.5279684172552576`*^9}, { 3.5279684893088655`*^9, 3.52796848931888*^9}, {3.527968596793421*^9, 3.5279686035531406`*^9}}], Cell["...", "Item", CellChangeTimes->{{3.527968490260234*^9, 3.5279685213950033`*^9}, { 3.5279686085503263`*^9, 3.5279686089008303`*^9}}] }, Open ]], Cell["\<\ The idea is to make everything as low level as possible to avoid black boxes. \ We will imporve on that.\ \>", "Text", CellChangeTimes->{{3.527973300548973*^9, 3.5279733193159585`*^9}, { 3.5280696866161537`*^9, 3.528069711001218*^9}}] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["A Simple Example as a Starter", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.51430857274755*^9, 3.514308578875259*^9}, { 3.519535365234375*^9, 3.51953536784375*^9}, 3.519535471921875*^9, { 3.5279734263698945`*^9, 3.527973448271387*^9}}], Cell[CellGroupData[{ Cell["\<\ Keep It Simple: Just use a formula\ \>", "Subsection", CellChangeTimes->{{3.51953549346875*^9, 3.51953549809375*^9}, { 3.5279692596766*^9, 3.527969266005701*^9}, {3.5280704962803936`*^9, 3.528070502719653*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"?", "BlackFormula"}]], "Input", CellChangeTimes->{{3.427173443890625*^9, 3.42717345140625*^9}}, CellTags->"Simple Example"], Cell[BoxData[ StyleBox["\<\"BlackFormula[OptionType_String,Strike_?NumberQ,AtmForwardValue_\ ?NumberQ,StdDev_?NumberQ] Black 1976 formula for option pricing, using \ displacement.\\n \\nOptionType: option type (i.e. Call or \ Put).\\nStrike: option strike.\\nAtmForwardValue: underlying asset \ at-the-money forward value.\\nStdDev: standard deviation, i.e. annualized \ percentage volatility times the square root of time to option \ expiry.\\nDeflator: Deflator (usually the discount factor, or the annuity, \ etc.). Default value = 1.0.\\nDisplacement: displacement in a displaced \ diffusion model. Default value = 0.0.\"\>", "MSG"]], "Print", "PrintUsage", CellChangeTimes->{3.5280749313276787`*^9}, CellTags->{"Info3528082131-9836581", "Simple Example"}] }, Open ]], Cell["\<\ \[LineSeparator]With most functions there are options associated. This \ simplifies the calling of functions.\ \>", "Text", CellChangeTimes->{{3.42717355640625*^9, 3.42717358815625*^9}, 3.4966554092259436`*^9}, CellTags->"Simple Example"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Options", "[", "BlackFormula", "]"}]], "Input", CellChangeTimes->{{3.427173485765625*^9, 3.427173492375*^9}}, CellTags->"Simple Example"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"Deflator", "\[Rule]", "1.`"}], ",", RowBox[{"Displacement", "\[Rule]", "0.`"}]}], "}"}]], "Output", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmVkYGBQZwCB35Uz+l86MjDcnlM1HURv37cKTE9/vx5ENyxz9J8B 4kv9BNMNc0UCwHStNJhmYHWC0BdjIPThfxB5YeZAMP2TF0JfSwTTDGtV/oD5 QbVMM0F0kyDzTLC9+WC6oTKEBcx3d/oBpi9O/wuk31nFuYXzvgLZe7RUAUSr PoTQG16Ug2iGtIvTwfwjk1QsXjnOr3KWEPR85Xjp7NZSDSAduPhHG4g+9VUm wglIzzmQUQaiZd9orALRIRNW3wXRtvcu5ToDaQ997kwXIM13wrISREutXjAF RJ8JybsGogHHIomz "], CellTags->"Simple Example"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"\[Sigma]", "=", "0.20"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"diffusion", " ", "parameter"}], " ", "*)"}]}], "\n", RowBox[{ RowBox[{ RowBox[{"S", "=", "36"}], ";"}], " ", RowBox[{"(*", " ", "Underlying", " ", "*)"}]}], "\n", RowBox[{ RowBox[{ RowBox[{"K", "=", "40"}], ";"}], " ", RowBox[{"(*", " ", "Strike", " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"r", " ", "=", "0.06"}], ";"}], RowBox[{"(*", " ", RowBox[{"interest", " ", "rate"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"T", " ", "=", " ", "1"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Time", " ", "to", " ", "Maturity"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"BlackFormula", "[", RowBox[{"\"\\"", ",", "K", ",", "S", ",", RowBox[{"\[Sigma]", SqrtBox["T"]}], ",", RowBox[{"Deflator", "\[Rule]", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "r"}], " ", "T"}]]}]}], "]"}]}], "Input", CellChangeTimes->{{3.42717337009375*^9, 3.42717342690625*^9}, { 3.427173481375*^9, 3.427173534359375*^9}, {3.4271736365*^9, 3.4271736511875*^9}, {3.427180437578125*^9, 3.427180438109375*^9}, { 3.42718065090625*^9, 3.42718065359375*^9}, {3.427194306828125*^9, 3.427194329140625*^9}, {3.527967084148344*^9, 3.527967093431693*^9}, 3.5279689792133136`*^9, {3.527969010878846*^9, 3.5279690411423635`*^9}, { 3.527972826477291*^9, 3.527972828530243*^9}}, CellTags->"Simple Example"], Cell[BoxData["1.3520378923599161`"], "Output", CellChangeTimes->{ 3.430728655875*^9, 3.4348618*^9, 3.434960374609375*^9, 3.434971006078125*^9, 3.435297294078125*^9, 3.435298762015625*^9, 3.435298981015625*^9, 3.43529903715625*^9, 3.435299344984375*^9, 3.43529955934375*^9, 3.4353008541875*^9, 3.43530088865625*^9, 3.435300975828125*^9, 3.4353016468125*^9, 3.435651366390625*^9, 3.435664364046875*^9, 3.435665549140625*^9, 3.4356663059375*^9, 3.43566813284375*^9, 3.436167698296875*^9, 3.4361786225625*^9, 3.4966554125228186`*^9, 3.50668371853125*^9, 3.50674906734375*^9, 3.51909595965625*^9, { 3.5279689664349394`*^9, 3.5279689805953007`*^9}, 3.5279728305231085`*^9, 3.5280168139417486`*^9, 3.5280169518099937`*^9, 3.5280698254557953`*^9, 3.5280700673736563`*^9, 3.5280704813589373`*^9, 3.5280708934414835`*^9, 3.528072046669744*^9, 3.528074056429637*^9, 3.5280741858757715`*^9, 3.5280744051010017`*^9, 3.528074931547995*^9}, CellTags->"Simple Example"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Make It Complicated", "Subsection", CellChangeTimes->{{3.42717273265625*^9, 3.42717273740625*^9}, { 3.44272839153125*^9, 3.442728398359375*^9}, {3.44272845440625*^9, 3.44272847790625*^9}, 3.521364288328125*^9, {3.527969241430363*^9, 3.5279692485506015`*^9}, {3.5280705630163555`*^9, 3.52807060599816*^9}}, CellTags->"Simple Example"], Cell[CellGroupData[{ Cell["Defining the Driving Process", "Subsubsection", CellChangeTimes->{{3.42717273265625*^9, 3.42717273740625*^9}, { 3.44272839153125*^9, 3.442728398359375*^9}, {3.44272845440625*^9, 3.44272847790625*^9}, 3.521364288328125*^9}, CellTags->"Simple Example"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"settlementDate", " ", "=", RowBox[{"DateList", "[", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"maturityDate", " ", "=", RowBox[{"CalendarAdvance", "[", RowBox[{"settlementDate", ",", RowBox[{"{", RowBox[{"1", ",", "\"\\""}], "}"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.4427285375625*^9, 3.44272853809375*^9}, { 3.442728569765625*^9, 3.442728570328125*^9}, {3.50668592121875*^9, 3.50668592421875*^9}, 3.52136428834375*^9, {3.527969330097861*^9, 3.5279693702856483`*^9}, {3.5279694512520723`*^9, 3.527969458933117*^9}, { 3.5279695473202114`*^9, 3.5279695512458563`*^9}}, CellID->46583927], Cell[BoxData[ RowBox[{"{", RowBox[{"2012", ",", "10", ",", "22"}], "}"}]], "Output", CellChangeTimes->{3.527969371257045*^9, 3.5279695524075265`*^9, 3.528016814552627*^9, 3.52801695212044*^9, 3.5280698258864145`*^9, 3.5280700674838142`*^9, 3.528070481429038*^9, 3.5280708935115843`*^9, 3.528072046739845*^9, 3.5280740564997377`*^9, 3.5280741859558864`*^9, 3.5280744051711025`*^9, 3.5280749316180964`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"yieldcurve", " ", "=", " ", RowBox[{"FlatForward", "[", "r", "]"}]}], " "}], "\[IndentingNewLine]", RowBox[{"vol", " ", "=", RowBox[{"BlackConstantVol", "[", RowBox[{"settlementDate", ",", RowBox[{"SimpleQuote", "[", "\[Sigma]", "]"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{"underlying", " ", "=", " ", RowBox[{"SimpleQuote", "[", "S", "]"}]}]}], "Input", CellChangeTimes->{{3.527969093377474*^9, 3.5279692064801073`*^9}, { 3.5279693935591135`*^9, 3.527969402902549*^9}}], Cell[BoxData["FlatForward3"], "Output", CellChangeTimes->{{3.5279691016493683`*^9, 3.5279691191044674`*^9}, { 3.527969178329629*^9, 3.527969207531619*^9}, {3.5279693960927567`*^9, 3.527969404244478*^9}, 3.5279695738483567`*^9, 3.5279729534899263`*^9, 3.528016814993261*^9, 3.528016952170512*^9, 3.528069826727624*^9, 3.5280700675939727`*^9, 3.528070481519168*^9, 3.5280708936017137`*^9, 3.52807204681996*^9, 3.528074056579853*^9, 3.528074186025987*^9, 3.528074405251218*^9, 3.528074931698211*^9}], Cell[BoxData["BlackConstantVol5"], "Output", CellChangeTimes->{{3.5279691016493683`*^9, 3.5279691191044674`*^9}, { 3.527969178329629*^9, 3.527969207531619*^9}, {3.5279693960927567`*^9, 3.527969404244478*^9}, 3.5279695738483567`*^9, 3.5279729534899263`*^9, 3.528016814993261*^9, 3.528016952170512*^9, 3.528069826727624*^9, 3.5280700675939727`*^9, 3.528070481519168*^9, 3.5280708936017137`*^9, 3.52807204681996*^9, 3.528074056579853*^9, 3.528074186025987*^9, 3.528074405251218*^9, 3.528074931868456*^9}], Cell[BoxData["SimpleQuote6"], "Output", CellChangeTimes->{{3.5279691016493683`*^9, 3.5279691191044674`*^9}, { 3.527969178329629*^9, 3.527969207531619*^9}, {3.5279693960927567`*^9, 3.527969404244478*^9}, 3.5279695738483567`*^9, 3.5279729534899263`*^9, 3.528016814993261*^9, 3.528016952170512*^9, 3.528069826727624*^9, 3.5280700675939727`*^9, 3.528070481519168*^9, 3.5280708936017137`*^9, 3.52807204681996*^9, 3.528074056579853*^9, 3.528074186025987*^9, 3.528074405251218*^9, 3.528074931988629*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"?", "BlackProcess"}]], "Input", CellChangeTimes->{{3.5279691307612286`*^9, 3.527969133875707*^9}}], Cell[BoxData[ StyleBox["\<\"BlackProcess[ObjecctId_Symbol,Underlying_?NumberQ,YieldCurveID_\ Symbol,BlackVolID_Symbol] Construct an object of class BlackProcess and \ return its id\\n \\nObjectId: id of object to be \ created\\n\\nUnderlying: underlying.\\nYieldCurveID: risk free yield \ curve.\\nBlack Vol Term Structure.\\nBlackVolID: Black Vol Term \ Structure.\\nPermanent: object permanent/nonpermanent\"\>", "MSG"]], "Print", \ "PrintUsage", CellChangeTimes->{3.528074932319104*^9}, CellTags->"Info3528082132-9836581"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"process", " ", "=", RowBox[{"BlackProcess", "[", RowBox[{"underlying", ",", "yieldcurve", ",", "vol"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{ 3.521364288359375*^9, {3.5279690714559517`*^9, 3.5279690727878675`*^9}, { 3.527969127216131*^9, 3.527969128698262*^9}, {3.5279694141387053`*^9, 3.527969431553747*^9}, {3.527969587047336*^9, 3.527969587477955*^9}}, CellID->100207886] }, Closed]], Cell[CellGroupData[{ Cell["Defining the Instrument", "Subsubsection", CellChangeTimes->{{3.42717273265625*^9, 3.42717273740625*^9}, { 3.44272839153125*^9, 3.442728398359375*^9}, {3.44272845440625*^9, 3.44272847790625*^9}, 3.521364288328125*^9, {3.5279696762956686`*^9, 3.527969678138318*^9}}, CellTags->"Simple Example"], Cell["Payoff functions are collected in the category Payoffs.", "Text", CellChangeTimes->{{3.442728803609375*^9, 3.44272883709375*^9}, { 3.44272925671875*^9, 3.442729306578125*^9}, 3.521364288359375*^9}, CellID->158078979], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Category", "[", "Payoffs", "]"}]], "Input", CellChangeTimes->{{3.44272931053125*^9, 3.44272931565625*^9}, 3.521364288375*^9, {3.5279697081614895`*^9, 3.5279697351903553`*^9}}, CellID->898507446], Cell[BoxData[ RowBox[{"{", RowBox[{ "DoubleStickyRatchetPayoff", ",", "PayoffDescription", ",", "PayoffName", ",", "PayoffOptionType", ",", "PayoffStrike", ",", "PayoffThirdParameter", ",", "PayoffValue", ",", "RatchetMaxPayoff", ",", "RatchetMinPayoff", ",", "RatchetPayoff", ",", "StickyMaxPayoff", ",", "StickyMinPayoff", ",", "StickyPayoff", ",", "StrikedTypePayoff", ",", "PlainVanillaPayoff"}], "}"}]], "Output", CellChangeTimes->{3.5279697360716224`*^9, 3.5280168163351903`*^9, 3.5280169525610733`*^9, 3.5280698283900146`*^9, 3.528070068925888*^9, 3.528070482430478*^9, 3.5280708944929953`*^9, 3.528072047701227*^9, 3.528074057381005*^9, 3.5280741868972397`*^9, 3.5280744061725426`*^9, 3.5280749325294065`*^9}] }, Open ]], Cell["In this example a simple striked payoff is assumed. ", "Text", CellChangeTimes->{{3.442728803609375*^9, 3.44272883709375*^9}, { 3.44272925671875*^9, 3.442729345890625*^9}, 3.521364288375*^9}, CellID->172077646], Cell[BoxData[ RowBox[{ RowBox[{"StrikedTypePayoff", "[", RowBox[{ "PayoffID", ",", "\"\\"", ",", "\"\\"", ",", "K"}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.442728885125*^9, 3.442728888421875*^9}, { 3.44272902490625*^9, 3.44272902878125*^9}, {3.506684253984375*^9, 3.506684258296875*^9}, {3.506685945578125*^9, 3.506685951703125*^9}, 3.521364288390625*^9, {3.5279728427907486`*^9, 3.5279729090560336`*^9}, 3.52801700269316*^9}, CellID->581215155], Cell["Available functions within the ", "Text", CellChangeTimes->{{3.4427292464375*^9, 3.44272925171875*^9}, 3.521364288390625*^9}, CellID->300442781], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"PayoffValue", "[", RowBox[{"PayoffID", ",", "S"}], "]"}], ",", RowBox[{"{", RowBox[{"S", ",", "10", ",", "60"}], "}"}], ",", RowBox[{"Frame", "->", "True"}]}], "]"}]], "Input", CellChangeTimes->{{3.442729037515625*^9, 3.442729051671875*^9}, { 3.442729214890625*^9, 3.442729224046875*^9}, {3.442731455421875*^9, 3.442731458828125*^9}, 3.52136428840625*^9}, CellID->624621587], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJxN0Ak01VkcB/BH2YoQk/XIkq0Q/i+y9f/Zt/e3vJFyxCBkSbJFk4zqTSlC TUOmQoU0DclSvaSJlHqUh9SQih5lmYonWR5j/uPM+d/uOb9zv59z77nn/n4a IbHMMGEajZZE1n+7i42NJo22Dmj/LzuOs0qvGLL1NqZ8rTSySdwu0Yi1yMql p0bbtyCPSb6vLjqInN2XbY8LkLsP9IemfdWmnHiEELZV0KPcsVN2fERuPeUa hYWjZ0UNKJefqU7J1DKibJj0Q4DpKmPKOSzOhsa1JpRrDz55xjQwpbyZN1nw Ugej7Gh45HSaGZ3yDZ5NjSJ9E+W3R7LK6wzMKOeLQ2uipTnlylm1Nbpmmyl7 tIdkC5wsKFdlW77qZFpSjrtj43WBYUX5LqeUf9zfmnK4s0VD5HYbygXlJnXR UVsoZ082HNqbjFOO77a0olsA5WAtV4ZtI3K6bsyEM9giq7+ice8iP8wU6IzY 21G2qDAZEDQi80G5usjNnrL8SjHn2wxk8+7JV1wP5NTIpyLC3yOLnE73C/VH VuS9p+nvRsZ/rvGsPokc4lk8yMlBZimd3M87hfy4IvyyfB4y84XS9L5C5HDd 9EKr68hZTxgfm7nIx0aPR7A7kQ+vbOFVPEdOIWx78/5CDuvY1BLRjxzEj7cL eIe8Q66qwXvwm/9sXV9rOYy8pUftouQ4ssWcv6oQH5muUpA/NYm8IUAu+800 sk6al0TXLLJm0UlWi+CbeQ6IHahaRJYTdvxaIuQANGMNr1DPE/gqrcNxBctI 71WUzWo9jy8Pm991WIy0zJmJIolKfGJ43MdHmvS7joGr5ffwvyWMuC6ypJdC Iz68PtrdRo70UniAv9k9ZKujQHoptOCc8R6jGTXSS+EZXjLTJH7eiDQzNXi5 x0vcV/zXuzzCAdK/s9P+nMLDlScNUoW9SD+yXllEG8TfvG620mCSTjaf8MgY xHfVfLkT6OsA93sMGirzh/CUQB92TyD5XqHC1j03P+C/1crdbI8l7+t8ZH2c HMNfB52+Xn/KAYpVGPwkcz4eys659Es3eW4w7Z1YPYdfUi9WtfFxBPUVwpwO exFoTJ2jRXAdQabtinS6qBRou4vNa21zAj0/y/617NVwu10/s+e5E9w/6OHX VrYGch/9Y6we4Azp9K/HhEaUIT9hJCqozxlun3fftoynRvalJq3p5wI03xTr jFANqNAX4ST2u0Btmbxe1yEtWPFFSKkx0BX0uGKhyw9owzXjG2mFH1zhj6bm uf2FumAY8rvHQowb1GZctZy6pQ9vXdnVW8fcIFV3iONbsQFeXP7REE9wh+05 o3XzbYYwX+Ntrcl3h/F2p4mMxxthGTu+7ugeBojGD0VJvTYGT2Mnx9QpBhQG ZZ2YGTWB1oCNkdEJBOTVB3a+eG8Ka3ZG1F9IIsDgEXef1ZgphERclOImE9DM tVMp/mwKc/Fy1fRUAr4M6YRGzpiCXsb03AKLAC+Zz1MCCQxY1X9m5eYRIB72 k5KGIQbWYl5VdWwCUlYVB0UnYJAheVx4uJ4AGaXVItxkDLpkm3yU7xFQpsW6 Sk/FIEqVPpvWRMDzzRH8BRYGZ00U7VxaCTDeaczKzcNgyr+/q7ePgNFb96/U sTGAYCUdqbcEpDeZMpTvYZAVzkzBBwhQfFoyntaEwbq4ZtWSIQJc3mVYuLRi wDxaHhbziYASSe/W3j4MCjMHbhWNE2Ct8CAWH8BgJFd5RSefgE6NTfIlQxik n8uqNJsmgGauFBDzCYO24oe0yFkCztpmCnXyMVAo+4d5TkCAEWOh1Gwag5Br 5qVPF8h5+ca6nRNgUFm1d3pxkYAdwQOfFhcx+Bc8ImFx "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{10., 0}, Frame->True, PlotRange->{{10, 60}, {0., 19.999998979591837`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.442728996453125*^9, {3.442729040515625*^9, 3.44272905265625*^9}, 3.4427292245*^9, 3.442731539515625*^9, 3.506684110328125*^9, 3.5066842654375*^9, {3.506685939421875*^9, 3.506685955171875*^9}, 3.506749117609375*^9, 3.506749183609375*^9, 3.50675065628125*^9, 3.506753010234375*^9, 3.506758867796875*^9, 3.506778245359375*^9, 3.506778525328125*^9, 3.518768907265625*^9, 3.521362211875*^9, 3.5213642884375*^9, 3.527969649417019*^9, 3.527972856139944*^9, 3.5280168175369186`*^9, 3.528016952701275*^9, 3.5280698294114833`*^9, 3.528070070277832*^9, 3.528070482610738*^9, 3.528070895133917*^9, 3.528072048672624*^9, 3.528074057651394*^9, 3.5280741870774994`*^9, 3.528074406382845*^9, 3.5280749327096653`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ExerciseID", " ", "=", RowBox[{"EuropeanExercise", "[", "maturityDate", "]"}]}]], "Input", CellChangeTimes->{{3.5279698095572896`*^9, 3.5279698323901215`*^9}}], Cell[BoxData["EuropeanExercise8"], "Output", CellChangeTimes->{{3.527969823337104*^9, 3.527969833551792*^9}, 3.527972860215805*^9, 3.5280168177972927`*^9, 3.52801695287152*^9, 3.5280698297920303`*^9, 3.528070070608307*^9, 3.5280704826808386`*^9, 3.528070895214032*^9, 3.5280720491132574`*^9, 3.5280740577214947`*^9, 3.5280741871576147`*^9, 3.5280744064629602`*^9, 3.5280749327897806`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"europeanOption", " ", "=", RowBox[{"VanillaOption", "[", RowBox[{"PayoffID", ",", "ExerciseID"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.5279698507865744`*^9, 3.527969853520506*^9}}] }, Closed]], Cell[CellGroupData[{ Cell["Doing the Valuation", "Subsubsection", CellChangeTimes->{{3.5279698744806447`*^9, 3.5279698791974273`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"pricingEngine", " ", "=", " ", RowBox[{"AnalyticEuropeanEngine", "[", "process", "]"}]}]], "Input", CellChangeTimes->{{3.5279698997569904`*^9, 3.527969942458392*^9}}], Cell[BoxData["AnalyticEuropeanEngine10"], "Output", CellChangeTimes->{3.5279699433897314`*^9, 3.5280168201306477`*^9, 3.5280169530117216`*^9, 3.528069830493038*^9, 3.5280700707885666`*^9, 3.5280704827809825`*^9, 3.5280708953041615`*^9, 3.5280720502348704`*^9, 3.528074057811624*^9, 3.528074187257758*^9, 3.5280744065530896`*^9, 3.5280749328799105`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"europeanOption", ",", "pricingEngine"}], "]"}]], "Input", CellChangeTimes->{{3.527969882542237*^9, 3.5279698890916543`*^9}, { 3.5279699700380497`*^9, 3.5279699811740627`*^9}}], Cell[BoxData["True"], "Output", CellChangeTimes->{3.5279699822856607`*^9, 3.5280168203409505`*^9, 3.5280169530617933`*^9, 3.5280698307934704`*^9, 3.5280700709187536`*^9, 3.5280704828510833`*^9, 3.528070895384277*^9, 3.52807205082572*^9, 3.528074057891739*^9, 3.5280741873378735`*^9, 3.5280744066231904`*^9, 3.528074932960026*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"InstrumentNPV", "[", "europeanOption", "]"}]], "Input", CellChangeTimes->{{3.527969984198411*^9, 3.5279700014331937`*^9}}], Cell[BoxData["1.3615001701072922`"], "Output", CellChangeTimes->{3.527970002444648*^9, 3.5280168205412383`*^9, 3.5280169531018515`*^9, 3.528069831083888*^9, 3.5280700710789843`*^9, 3.528070482931198*^9, 3.5280708955344925`*^9, 3.5280720511662097`*^9, 3.5280740579618397`*^9, 3.528074187417989*^9, 3.5280744067033052`*^9, 3.528074932990069*^9}] }, Open ]] }, Closed]] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Some More Advanced Examples", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.51430857274755*^9, 3.514308578875259*^9}, { 3.519535365234375*^9, 3.51953536784375*^9}, 3.519535471921875*^9, { 3.5279733649415646`*^9, 3.5279733747757053`*^9}}], Cell[CellGroupData[{ Cell["Pricing Bermudan Swaption", "Subsection", CellChangeTimes->{{3.526267847265625*^9, 3.5262678714375*^9}}], Cell[CellGroupData[{ Cell["\<\ Describing the market conditions\ \>", "Subsubsection", CellChangeTimes->{{3.5281012946231794`*^9, 3.528101354889838*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"settlementDate", "=", RowBox[{"CalendarAdvance", "[", RowBox[{ RowBox[{"EvaluationDate", "[", "]"}], ",", RowBox[{"{", RowBox[{"2", ",", "\"\\""}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"yieldcurve", " ", "=", RowBox[{"FlatForward", "[", RowBox[{"settlementDate", ",", "0.05", ",", RowBox[{"DayCounter", "\[Rule]", "\"\\""}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.52626761275*^9, 3.5262676563125*^9}, { 3.52697972221875*^9, 3.52697973165625*^9}, {3.5279732550735826`*^9, 3.527973260321128*^9}, {3.527973517711237*^9, 3.5279735201447363`*^9}, 3.5279745848657293`*^9, {3.5281031863733826`*^9, 3.528103187464952*^9}, { 3.5281033587212067`*^9, 3.5281033764667234`*^9}, {3.528103409434128*^9, 3.5281034168547983`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"2011", ",", "10", ",", "24"}], "}"}]], "Output", CellChangeTimes->{{3.528103261641613*^9, 3.5281032687918944`*^9}, 3.528103377918811*^9, 3.5281034179363537`*^9}] }, Open ]], Cell[BoxData[ RowBox[{" ", RowBox[{ RowBox[{ RowBox[{"swapLengths", "=", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5"}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{"swaptionVols", " ", "=", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.1490", "0.1340", "0.1228", "0.1189", "0.1148"}, {"0.1290", "0.1201", "0.1146", "0.1108", "0.1040"}, {"0.1149", "0.1112", "0.1070", "0.1010", "0.0957"}, {"0.1047", "0.1021", "0.0980", "0.0951", "0.1270"}, {"0.1000", "0.0950", "0.0999", "0.1230", "0.1160"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";"}]}]}]], "Input", CellChangeTimes->{{3.526708470015625*^9, 3.526708492296875*^9}, { 3.52671651425*^9, 3.526716523984375*^9}, {3.526716845375*^9, 3.52671684653125*^9}, 3.527499650171875*^9, {3.527500203921875*^9, 3.5275002465625*^9}, {3.5275015188125*^9, 3.527501522421875*^9}, { 3.52750309115625*^9, 3.527503115515625*^9}, {3.527503145921875*^9, 3.5275032858125*^9}, {3.5281018035349584`*^9, 3.5281018561406016`*^9}, { 3.5281018873855295`*^9, 3.528101956875451*^9}, {3.5281020065268464`*^9, 3.5281020331451216`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPointPlot3D", "[", RowBox[{"swaptionVols", ",", RowBox[{"ColorFunction", "\[Rule]", "\"\\""}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"PointSize", "[", "Large", "]"}]}], ",", RowBox[{"Filling", "\[Rule]", "Bottom"}]}], "]"}]], "Input", CellChangeTimes->{{3.528071009778768*^9, 3.5280710250407133`*^9}, { 3.528102174758752*^9, 3.5281021760906672`*^9}, {3.5281022360568943`*^9, 3.528102243127061*^9}, {3.5281023581023874`*^9, 3.5281023834488335`*^9}, { 3.528102454130469*^9, 3.528102493967752*^9}, {3.528102532352947*^9, 3.5281025429782257`*^9}, {3.528102573702405*^9, 3.5281025782088847`*^9}}], Cell[BoxData[ Graphics3DBox[{ {Hue[0.67, 0.6, 0.6], PointSize[Large], {RGBColor[0.857359, 0.131106, 0.132128], Point3DBox[{1., 1., 0.149}]}, {RGBColor[0.7116684444444447, 0.7410033703703703, 0.2963271481481481], Point3DBox[{1., 2., 0.129}]}, {RGBColor[0.35482182222222236`, 0.6484806592592594, 0.6554374518518518], Point3DBox[{1., 3., 0.1149}]}, {RGBColor[0.24491715555555554`, 0.3441342074074075, 0.8101740444444445], Point3DBox[{1., 4., 0.1047}]}, {RGBColor[0.2820112592592592, 0.16948659259259277`, 0.7148719259259261], Point3DBox[{1., 5., 0.1}]}, {RGBColor[0.832861777777778, 0.693165222222222, 0.24734844444444432`], Point3DBox[{2., 1., 0.134}]}, {RGBColor[0.4663673703703704, 0.7141170666666666, 0.49677506666666665`], Point3DBox[{2., 2., 0.1201}]}, {RGBColor[0.29795959999999994`, 0.5657927999999999, 0.7522386000000001], Point3DBox[{2., 3., 0.1112}]}, {RGBColor[0.25003857777777777`, 0.23947477037037024`, 0.7740190222222222], Point3DBox[{2., 4., 0.1021}]}, {RGBColor[0.471412, 0.108766, 0.527016], Point3DBox[{2., 5., 0.095}]}, {RGBColor[0.5357539481481486, 0.7331906370370371, 0.4212226814814812], Point3DBox[{3., 1., 0.1228}]}, {RGBColor[0.3499719555555555, 0.6422420814814813, 0.6637906962962965], Point3DBox[{3., 2., 0.1146}]}, {RGBColor[0.2563255555555556, 0.43092088888888885`, 0.8085534444444444], Point3DBox[{3., 3., 0.107}]}, {RGBColor[0.3288768888888887, 0.11660066666666667`, 0.6491964444444446], Point3DBox[{3., 4., 0.098}]}, {RGBColor[0.28379887407407406`, 0.1662923407407408, 0.7117702074074075], Point3DBox[{3., 5., 0.0999}]}, {RGBColor[0.436651814814815, 0.7041362666666667, 0.5322022666666665], Point3DBox[{4., 1., 0.1189}]}, {RGBColor[0.2932429185185185, 0.5540700148148148, 0.7596890296296297], Point3DBox[{4., 2., 0.1108}]}, {RGBColor[0.264135111111111, 0.2014291111111113, 0.7458891111111112], Point3DBox[{4., 3., 0.101}]}, {RGBColor[0.4666608296296295, 0.10902715555555556`, 0.5310886814814816], Point3DBox[{4., 4., 0.0951}]}, {RGBColor[0.5413381851851853, 0.7340082962962963, 0.41635785185185176`], Point3DBox[{4., 5., 0.123}]}, {RGBColor[0.35320520000000005`, 0.6464011333333334, 0.6582218666666667], Point3DBox[{5., 1., 0.1148}]}, {RGBColor[0.24629600000000001`, 0.31595666666666655`, 0.8004399999999999], Point3DBox[{5., 2., 0.104}]}, {RGBColor[0.4381538074074078, 0.11059408888888887`, 0.5555247703703701], Point3DBox[{5., 3., 0.0957}]}, {RGBColor[0.6545410370370374, 0.7431753703703704, 0.32997788888888874`], Point3DBox[{5., 4., 0.127}]}, {RGBColor[0.375893777777778, 0.6660012222222224, 0.622276222222222], Point3DBox[{5., 5., 0.116}]}}, { {RGBColor[0.6236, 0.62, 0.8]}, {RGBColor[0.6236, 0.62, 0.8], {RGBColor[0.857359, 0.131106, 0.132128], Line3DBox[{{1., 1., 0.149}, {1., 1., 0.095}}]}, {RGBColor[0.7116684444444447, 0.7410033703703703, 0.2963271481481481], Line3DBox[{{1., 2., 0.129}, {1., 2., 0.095}}]}, {RGBColor[0.35482182222222236`, 0.6484806592592594, 0.6554374518518518], Line3DBox[{{1., 3., 0.1149}, {1., 3., 0.095}}]}, {RGBColor[0.24491715555555554`, 0.3441342074074075, 0.8101740444444445], Line3DBox[{{1., 4., 0.1047}, {1., 4., 0.095}}]}, {RGBColor[0.2820112592592592, 0.16948659259259277`, 0.7148719259259261], Line3DBox[{{1., 5., 0.1}, {1., 5., 0.095}}]}, {RGBColor[0.832861777777778, 0.693165222222222, 0.24734844444444432`], Line3DBox[{{2., 1., 0.134}, {2., 1., 0.095}}]}, {RGBColor[0.4663673703703704, 0.7141170666666666, 0.49677506666666665`], Line3DBox[{{2., 2., 0.1201}, {2., 2., 0.095}}]}, {RGBColor[0.29795959999999994`, 0.5657927999999999, 0.7522386000000001], Line3DBox[{{2., 3., 0.1112}, {2., 3., 0.095}}]}, {RGBColor[ 0.25003857777777777`, 0.23947477037037024`, 0.7740190222222222], Line3DBox[{{2., 4., 0.1021}, {2., 4., 0.095}}]}, {RGBColor[0.471412, 0.108766, 0.527016], Line3DBox[{{2., 5., 0.095}, {2., 5., 0.095}}]}, {RGBColor[0.5357539481481486, 0.7331906370370371, 0.4212226814814812], Line3DBox[{{3., 1., 0.1228}, {3., 1., 0.095}}]}, {RGBColor[0.3499719555555555, 0.6422420814814813, 0.6637906962962965], Line3DBox[{{3., 2., 0.1146}, {3., 2., 0.095}}]}, {RGBColor[0.2563255555555556, 0.43092088888888885`, 0.8085534444444444], Line3DBox[{{3., 3., 0.107}, {3., 3., 0.095}}]}, {RGBColor[0.3288768888888887, 0.11660066666666667`, 0.6491964444444446], Line3DBox[{{3., 4., 0.098}, {3., 4., 0.095}}]}, {RGBColor[0.28379887407407406`, 0.1662923407407408, 0.7117702074074075], Line3DBox[{{3., 5., 0.0999}, {3., 5., 0.095}}]}, {RGBColor[0.436651814814815, 0.7041362666666667, 0.5322022666666665], Line3DBox[{{4., 1., 0.1189}, {4., 1., 0.095}}]}, {RGBColor[0.2932429185185185, 0.5540700148148148, 0.7596890296296297], Line3DBox[{{4., 2., 0.1108}, {4., 2., 0.095}}]}, {RGBColor[0.264135111111111, 0.2014291111111113, 0.7458891111111112], Line3DBox[{{4., 3., 0.101}, {4., 3., 0.095}}]}, {RGBColor[0.4666608296296295, 0.10902715555555556`, 0.5310886814814816], Line3DBox[{{4., 4., 0.0951}, {4., 4., 0.095}}]}, {RGBColor[0.5413381851851853, 0.7340082962962963, 0.41635785185185176`], Line3DBox[{{4., 5., 0.123}, {4., 5., 0.095}}]}, {RGBColor[0.35320520000000005`, 0.6464011333333334, 0.6582218666666667], Line3DBox[{{5., 1., 0.1148}, {5., 1., 0.095}}]}, {RGBColor[ 0.24629600000000001`, 0.31595666666666655`, 0.8004399999999999], Line3DBox[{{5., 2., 0.104}, {5., 2., 0.095}}]}, {RGBColor[0.4381538074074078, 0.11059408888888887`, 0.5555247703703701], Line3DBox[{{5., 3., 0.0957}, {5., 3., 0.095}}]}, {RGBColor[0.6545410370370374, 0.7431753703703704, 0.32997788888888874`], Line3DBox[{{5., 4., 0.127}, {5., 4., 0.095}}]}, {RGBColor[0.375893777777778, 0.6660012222222224, 0.622276222222222], Line3DBox[{{5., 5., 0.116}, {5., 5., 0.095}}]}}}}, AutomaticImageSize->True, Axes->True, BoxRatios->{1, 1, 0.4}, ImageSize->{371.4928250444737, 208.00791190419662`}, PlotRange->{{1., 5.}, {1., 5.}, Automatic}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.02]}, {Automatic, Automatic}}, ViewPoint->{2.4252951650451693`, -2.1120110623833432`, 1.0523082413337388`}, ViewVertical->{0.30580317975129717`, -0.12556321007446497`, 2.3594468307341017`}]], "Output", CellChangeTimes->{ 3.528071025982067*^9, 3.528072053609723*^9, 3.528074058672862*^9, 3.528074188599688*^9, 3.528074407584573*^9, 3.5280749339814944`*^9, 3.528101499868307*^9, 3.528102177001978*^9, 3.5281022438581123`*^9, 3.528102365933648*^9, {3.528102462832982*^9, 3.5281024946687603`*^9}, 3.528102543719291*^9, 3.528102579140224*^9, 3.5281028763676157`*^9, 3.528103269653133*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Constructing the swaptions", "Subsubsection", CellChangeTimes->{{3.5281012946231794`*^9, 3.5281013164645853`*^9}, { 3.52810271582677*^9, 3.5281027166179075`*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"indexSixMonths", " ", "=", " ", RowBox[{"Euribor", "[", RowBox[{"\"\<6M\>\"", ",", RowBox[{"YieldCurve", "\[Rule]", "yieldcurve"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"swaptions", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"SwaptionHelper", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"swapLengths", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "\"\\""}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"swapLengths", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], ",", "\"\\""}], "}"}], ",", RowBox[{"swaptionVols", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"-", "i"}]}], "]"}], "]"}], ",", "indexSixMonths", ",", "yieldcurve"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "swapLengths", "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "swapLengths", "]"}], ",", "1", ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}]}], " ", ";"}], " "}]}], "Input", CellChangeTimes->{{3.528102747081712*^9, 3.528102755613981*^9}, 3.5281028920902243`*^9}] }, Open ]], Cell[CellGroupData[{ Cell["Defining Short Rate Models", "Subsubsection", CellChangeTimes->{{3.5280169128740063`*^9, 3.5280169217167215`*^9}}], Cell["One Factor Hull/White Model", "Subitem", CellChangeTimes->{{3.528076306805518*^9, 3.5280763164694147`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"modelHW", " ", "=", RowBox[{"HullWhite", "[", "yieldcurve", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperSetPricingEngine", "[", RowBox[{"#", ",", RowBox[{"JamshidianSwaptionEngine", "[", "modelHW", "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], ";"}], "\n", RowBox[{"CalibrateModel", "[", RowBox[{"modelHW", ",", RowBox[{"swaptions", " ", "//", " ", "Flatten"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5268103427804537`*^9, 3.5268103634210787`*^9}, { 3.5268105273273287`*^9, 3.5268105908742037`*^9}, {3.5268122518429537`*^9, 3.5268122576242037`*^9}, {3.52681598578125*^9, 3.526816008734375*^9}, { 3.527500350640625*^9, 3.527500366953125*^9}, {3.52750045921875*^9, 3.52750045965625*^9}, {3.528072710994997*^9, 3.5280727278792753`*^9}, { 3.528073035211197*^9, 3.528073037023803*^9}, 3.52807632121624*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"0.04886852517737412`", ",", "0.006172829596521923`"}], "}"}]], "Output", CellChangeTimes->{ 3.526816011171875*^9, 3.52688415196875*^9, 3.526884503296875*^9, 3.52689754128125*^9, 3.526897658734375*^9, 3.526898043671875*^9, 3.5268992746875*^9, 3.526899370359375*^9, 3.526901710234375*^9, 3.52697370690625*^9, 3.52697443903125*^9, 3.526984477609375*^9, 3.526986240515625*^9, 3.52730707465625*^9, 3.527334453953125*^9, 3.52733490840625*^9, 3.5273358851875*^9, 3.527336220890625*^9, 3.52739299228125*^9, 3.527478203796875*^9, 3.527483869390625*^9, 3.52748488653125*^9, 3.5274863085*^9, 3.52748767025*^9, 3.52748798040625*^9, 3.52749179575*^9, 3.52749974575*^9, 3.527500353578125*^9, {3.52750124375*^9, 3.5275012576875*^9}, 3.527501293859375*^9, 3.5275013536875*^9, 3.527501556*^9, 3.5275025461875*^9, 3.52750358596875*^9, 3.52758607503125*^9, 3.527590442125*^9, 3.527590890265625*^9, 3.52759446334375*^9, 3.5275962316875*^9, 3.527596330296875*^9, 3.527596369640625*^9, 3.527596535515625*^9, 3.52759671290625*^9, 3.527974262251834*^9, 3.5279745064730062`*^9, 3.528016824767315*^9, 3.5280169558858547`*^9, 3.528069835159749*^9, 3.5280700756054926`*^9, 3.5280704858253603`*^9, 3.528070897967992*^9, 3.528072064925995*^9, {3.528072718605941*^9, 3.528072729000888*^9}, 3.528073449867443*^9, 3.5280740593338127`*^9, 3.5280741898114305`*^9, 3.5280744081553936`*^9, 3.528074934622416*^9, 3.528075120860213*^9, 3.528075614900608*^9, 3.528101503323275*^9, 3.5281028786308703`*^9, 3.528103272757597*^9, 3.5281033041527405`*^9, 3.528103429292683*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"error", " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperImpliedVolatility", "[", RowBox[{"#", ",", RowBox[{"CalibrationHelperModelValue", "[", "#", "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], "-", "swaptionVols"}], " ", "//", " ", "Abs"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Total", "[", RowBox[{"error", "//", " ", "Flatten"}], "]"}]}], "Input", CellChangeTimes->{{3.5280730686793213`*^9, 3.528073070121395*^9}, { 3.5280758998703747`*^9, 3.528075939617528*^9}}], Cell[BoxData["0.28638671425247775`"], "Output", CellChangeTimes->{ 3.528072752795102*^9, 3.528073077752368*^9, 3.52807345149979*^9, 3.528074059664288*^9, 3.5280741901519203`*^9, 3.528074408545955*^9, 3.5280749348227043`*^9, 3.52807512265279*^9, 3.5280756163727245`*^9, { 3.5280759096544433`*^9, 3.5280759434630575`*^9}, 3.528101503813981*^9, 3.528102878891245*^9, 3.528103272887784*^9, 3.5281034307247424`*^9}] }, Open ]], Cell["One Factor Black/Karasinski Model", "Subitem", CellChangeTimes->{{3.528076306805518*^9, 3.5280763164694147`*^9}, 3.5280763755143166`*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"modelBK", " ", "=", " ", RowBox[{"BlackKarasinski", "[", "yieldcurve", "]"}]}], ";"}], RowBox[{"(*", " ", RowBox[{"One", " ", "Factor", " ", RowBox[{"Black", "/", "Karasinski"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"times", " ", "=", " ", RowBox[{ RowBox[{"Map", "[", RowBox[{"CalibrationHelperTimes", ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], " ", "//", " ", "Flatten"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"timeGrid", "=", RowBox[{"TimeGrid", "[", RowBox[{"times", ",", "30"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperSetPricingEngine", "[", RowBox[{"#", ",", RowBox[{"TreeSwaptionEngine", "[", RowBox[{"modelBK", ",", "timeGrid"}], "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], ";"}], "\n", RowBox[{"CalibrateModel", "[", RowBox[{"modelBK", ",", RowBox[{"swaptions", " ", "//", " ", "Flatten"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperImpliedVolatility", "[", RowBox[{"#", ",", RowBox[{"CalibrationHelperModelValue", "[", "#", "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], "-", "swaptionVols"}], " ", "//", " ", "Abs"}], " ", "//", " ", "Flatten"}], " ", "//", " ", "Total"}]}], "Input", CellChangeTimes->{{3.52750160028125*^9, 3.527501621890625*^9}, { 3.527974282981642*^9, 3.5279742848443203`*^9}, {3.5280728961211953`*^9, 3.5280729400042963`*^9}, {3.5280731051417522`*^9, 3.5280731108299313`*^9}, { 3.5280733532384977`*^9, 3.528073362031141*^9}, {3.52807340251936*^9, 3.5280734142762656`*^9}, {3.5280759631914253`*^9, 3.5280760193922386`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"0.04565599716062508`", ",", "0.1214914873576665`"}], "}"}]], "Output", CellChangeTimes->{{3.527501244234375*^9, 3.527501258234375*^9}, 3.527501294359375*^9, 3.5275013541875*^9, 3.5275019069375*^9, 3.52750286525*^9, 3.527503897390625*^9, 3.52758608328125*^9, 3.52759079971875*^9, 3.5275947876875*^9, 3.5275962318125*^9, 3.5275963304375*^9, 3.527596372890625*^9, 3.5275965356875*^9, 3.527596720921875*^9, 3.5279742871676607`*^9, 3.5279745135131297`*^9, 3.5280168253281217`*^9, 3.528016961914523*^9, 3.528069841128331*^9, 3.5280700821849537`*^9, 3.528070491763899*^9, 3.5280709024244003`*^9, 3.528072065727147*^9, {3.5280729026405697`*^9, 3.528072913215776*^9}, 3.5280729800118237`*^9, 3.528073132000373*^9, 3.528073383221611*^9, 3.5280734349259586`*^9, 3.5280734776273603`*^9, 3.5280740807546144`*^9, 3.5280742135756016`*^9, 3.528074428374467*^9, 3.5280749575453777`*^9, { 3.5280760127026196`*^9, 3.528076039831629*^9}, 3.528101524473688*^9, 3.528102896216157*^9, 3.5281032901325808`*^9, 3.52810345004252*^9}], Cell[BoxData["0.3073163710151898`"], "Output", CellChangeTimes->{{3.527501244234375*^9, 3.527501258234375*^9}, 3.527501294359375*^9, 3.5275013541875*^9, 3.5275019069375*^9, 3.52750286525*^9, 3.527503897390625*^9, 3.52758608328125*^9, 3.52759079971875*^9, 3.5275947876875*^9, 3.5275962318125*^9, 3.5275963304375*^9, 3.527596372890625*^9, 3.5275965356875*^9, 3.527596720921875*^9, 3.5279742871676607`*^9, 3.5279745135131297`*^9, 3.5280168253281217`*^9, 3.528016961914523*^9, 3.528069841128331*^9, 3.5280700821849537`*^9, 3.528070491763899*^9, 3.5280709024244003`*^9, 3.528072065727147*^9, {3.5280729026405697`*^9, 3.528072913215776*^9}, 3.5280729800118237`*^9, 3.528073132000373*^9, 3.528073383221611*^9, 3.5280734349259586`*^9, 3.5280734776273603`*^9, 3.5280740807546144`*^9, 3.5280742135756016`*^9, 3.528074428374467*^9, 3.5280749575453777`*^9, { 3.5280760127026196`*^9, 3.528076039831629*^9}, 3.528101524473688*^9, 3.528102896216157*^9, 3.5281032901325808`*^9, 3.5281034502227793`*^9}] }, Open ]], Cell["Gaussian two-factor Model", "Subitem", CellChangeTimes->{{3.528076306805518*^9, 3.5280763164694147`*^9}, { 3.5280763755143166`*^9, 3.5280764022127075`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"modelG2", " ", "=", " ", RowBox[{"G2", "[", "yieldcurve", "]"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Gaussian", " ", "two"}], "-", RowBox[{"factor", " ", "model"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperSetPricingEngine", "[", RowBox[{"#", ",", RowBox[{"G2SwaptionEngine", "[", RowBox[{"modelG2", ",", "6", ",", "20"}], "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], ";"}], "\n", RowBox[{"CalibrateModel", "[", RowBox[{"modelG2", ",", RowBox[{"swaptions", " ", "//", " ", "Flatten"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperImpliedVolatility", "[", RowBox[{"#", ",", RowBox[{"CalibrationHelperModelValue", "[", "#", "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], "-", "swaptionVols"}], " ", "//", " ", "Abs"}], " ", "//", " ", "Flatten"}], " ", "//", " ", "Total"}]}], "Input", CellChangeTimes->{{3.52750038953125*^9, 3.527500394359375*^9}, { 3.527500451265625*^9, 3.527500452296875*^9}, {3.528071256203109*^9, 3.52807126128041*^9}, {3.528071370267125*^9, 3.5280713862400928`*^9}, { 3.5280716986593294`*^9, 3.5280717013532033`*^9}, {3.528073183324173*^9, 3.528073185056664*^9}, {3.52807351026429*^9, 3.5280735891176753`*^9}, 3.528076072658832*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.0521857088794509`", ",", "0.01976635089729688`", ",", "0.05219186925200033`", ",", "0.021149938903081346`", ",", RowBox[{"-", "0.9485430435430515`"}]}], "}"}]], "Output", CellChangeTimes->{ 3.526884521015625*^9, 3.526897541921875*^9, 3.526897659390625*^9, 3.526898044140625*^9, 3.526899280265625*^9, 3.526899376015625*^9, 3.526901715859375*^9, 3.526973715703125*^9, 3.526974447171875*^9, 3.5269844820625*^9, 3.526986244328125*^9, 3.527307078515625*^9, 3.527334457859375*^9, 3.52733491228125*^9, 3.527335890109375*^9, 3.5273362249375*^9, 3.52739299659375*^9, 3.5274782108125*^9, 3.52748387490625*^9, 3.527484890640625*^9, 3.527486312484375*^9, 3.52748767434375*^9, 3.527487984578125*^9, 3.52749180328125*^9, 3.527499745796875*^9, 3.527500411640625*^9, {3.527501243453125*^9, 3.527501257625*^9}, 3.527501293796875*^9, 3.527501353140625*^9, 3.527501552796875*^9, 3.52750244521875*^9, 3.527502545171875*^9, 3.527503314*^9, 3.527503488015625*^9, 3.527503584984375*^9, 3.52758607484375*^9, 3.527590441140625*^9, 3.527590889171875*^9, 3.527594462375*^9, 3.527596231609375*^9, 3.52759633021875*^9, 3.527596369328125*^9, 3.5275965346875*^9, 3.527596712671875*^9, { 3.527974249613661*^9, 3.5279742607396593`*^9}, 3.527974503779133*^9, 3.5280168244969263`*^9, 3.528016955545365*^9, 3.528069834759173*^9, 3.528070075265003*^9, 3.5280704855449567`*^9, 3.5280708976875887`*^9, { 3.5280711881452465`*^9, 3.52807119860028*^9}, 3.5280712669585743`*^9, 3.5280716708293123`*^9, 3.5280717029855504`*^9, 3.5280720592077727`*^9, 3.5280722746776032`*^9, 3.5280728492437887`*^9, 3.5280734943413935`*^9, { 3.5280735363818445`*^9, 3.528073595276531*^9}, 3.5280740863426495`*^9, 3.5280742190334496`*^9, 3.52807443425292*^9, 3.528074964365184*^9, 3.528076079298379*^9, 3.528101530362155*^9, 3.528102903977317*^9, 3.5281032978036113`*^9, 3.528103463331629*^9}], Cell[BoxData["0.3275372439006028`"], "Output", CellChangeTimes->{ 3.526884521015625*^9, 3.526897541921875*^9, 3.526897659390625*^9, 3.526898044140625*^9, 3.526899280265625*^9, 3.526899376015625*^9, 3.526901715859375*^9, 3.526973715703125*^9, 3.526974447171875*^9, 3.5269844820625*^9, 3.526986244328125*^9, 3.527307078515625*^9, 3.527334457859375*^9, 3.52733491228125*^9, 3.527335890109375*^9, 3.5273362249375*^9, 3.52739299659375*^9, 3.5274782108125*^9, 3.52748387490625*^9, 3.527484890640625*^9, 3.527486312484375*^9, 3.52748767434375*^9, 3.527487984578125*^9, 3.52749180328125*^9, 3.527499745796875*^9, 3.527500411640625*^9, {3.527501243453125*^9, 3.527501257625*^9}, 3.527501293796875*^9, 3.527501353140625*^9, 3.527501552796875*^9, 3.52750244521875*^9, 3.527502545171875*^9, 3.527503314*^9, 3.527503488015625*^9, 3.527503584984375*^9, 3.52758607484375*^9, 3.527590441140625*^9, 3.527590889171875*^9, 3.527594462375*^9, 3.527596231609375*^9, 3.52759633021875*^9, 3.527596369328125*^9, 3.5275965346875*^9, 3.527596712671875*^9, { 3.527974249613661*^9, 3.5279742607396593`*^9}, 3.527974503779133*^9, 3.5280168244969263`*^9, 3.528016955545365*^9, 3.528069834759173*^9, 3.528070075265003*^9, 3.5280704855449567`*^9, 3.5280708976875887`*^9, { 3.5280711881452465`*^9, 3.52807119860028*^9}, 3.5280712669585743`*^9, 3.5280716708293123`*^9, 3.5280717029855504`*^9, 3.5280720592077727`*^9, 3.5280722746776032`*^9, 3.5280728492437887`*^9, 3.5280734943413935`*^9, { 3.5280735363818445`*^9, 3.528073595276531*^9}, 3.5280740863426495`*^9, 3.5280742190334496`*^9, 3.52807443425292*^9, 3.528074964365184*^9, 3.528076079298379*^9, 3.528101530362155*^9, 3.528102903977317*^9, 3.5281032978036113`*^9, 3.5281034634317727`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\<\ Constructing the bermudan swaption\ \>", "Subsubsection", CellChangeTimes->{{3.5281012946231794`*^9, 3.5281013164645853`*^9}, { 3.5281035425154896`*^9, 3.528103546210803*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"startDate", " ", "=", " ", RowBox[{"CalendarAdvance", "[", RowBox[{"settlementDate", ",", RowBox[{"{", RowBox[{"1", ",", "\"\\""}], "}"}], ",", RowBox[{ "BusinessDayConvention", "\[Rule]", " ", "\"\\""}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"maturityDate", " ", "=", RowBox[{"CalendarAdvance", "[", RowBox[{"startDate", ",", RowBox[{"{", RowBox[{"5", ",", "\"\\""}], "}"}], ",", RowBox[{ "BusinessDayConvention", "\[Rule]", " ", "\"\\""}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.526268058625*^9, 3.526268068890625*^9}, { 3.526268142359375*^9, 3.526268197078125*^9}, 3.5279735729106092`*^9, { 3.528103036547944*^9, 3.528103049035901*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"fixedSchedule", " ", "=", " ", RowBox[{"Schedule", "[", RowBox[{"startDate", ",", "maturityDate", ",", "\"\<1Y\>\"", ",", RowBox[{"GenRule", "\[Rule]", "\"\\""}], ",", RowBox[{ "BusinessDayConvention", "\[Rule]", " ", "\"\\""}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"floatSchedule", " ", "=", " ", RowBox[{"Schedule", "[", RowBox[{"startDate", ",", "maturityDate", ",", "\"\<6M\>\"", ",", RowBox[{"GenRule", "\[Rule]", "\"\\""}], ",", RowBox[{ "BusinessDayConvention", "\[Rule]", " ", "\"\\""}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.52626833621875*^9, 3.5262684370625*^9}, { 3.526268477921875*^9, 3.526268478921875*^9}, {3.52626858028125*^9, 3.526268580890625*^9}, {3.52626864384375*^9, 3.526268648765625*^9}, { 3.5275001200625*^9, 3.52750013746875*^9}, 3.5279736147107153`*^9, { 3.5279738040830193`*^9, 3.5279738134665117`*^9}, 3.5279738773784127`*^9, { 3.527973937274539*^9, 3.5279739831505055`*^9}, 3.5280168640337777`*^9, { 3.5280702114107714`*^9, 3.528070262834715*^9}, 3.528070345293285*^9}], Cell[BoxData[ RowBox[{ RowBox[{"swap", " ", "=", " ", RowBox[{"VanillaSwap", "[", RowBox[{ "1000", " ", ",", "fixedSchedule", ",", "0.05", ",", "floatSchedule", ",", "indexSixMonths", ",", "\"\\"", ",", RowBox[{"FixedLegDayCounter", "\[Rule]", "\"\\""}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.52626833621875*^9, 3.5262684370625*^9}, { 3.526268477921875*^9, 3.526268478921875*^9}, {3.52626858028125*^9, 3.526268580890625*^9}, {3.52626864384375*^9, 3.526268648765625*^9}, { 3.5275001200625*^9, 3.52750013746875*^9}, 3.5279736147107153`*^9, { 3.5279738040830193`*^9, 3.5279738134665117`*^9}, 3.5279738773784127`*^9, { 3.527973937274539*^9, 3.5279739831505055`*^9}, 3.5280168640337777`*^9, { 3.5280702114107714`*^9, 3.528070262834715*^9}, 3.528070345293285*^9, 3.528070976561003*^9, {3.5281033343361425`*^9, 3.5281033365693536`*^9}, { 3.528103482969867*^9, 3.5281034879269953`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"swap", ",", RowBox[{"DiscountingSwapEngine", "[", "yieldcurve", "]"}]}], "]"}], ";"}], "\n", RowBox[{"fixedATMRate", " ", "=", RowBox[{"VanillaSwapFairRate", "[", "swap", "]"}]}]}], "Input", CellChangeTimes->{ 3.526269807796875*^9, {3.5262698429375*^9, 3.526269843609375*^9}, 3.52627028096875*^9, {3.52750014815625*^9, 3.52750015178125*^9}, 3.527974490219635*^9}], Cell[BoxData["0.05057217929310608`"], "Output", CellChangeTimes->{ 3.526294013609375*^9, 3.526294282671875*^9, 3.5267082055*^9, 3.52670866609375*^9, 3.526709769015625*^9, 3.526712207625*^9, { 3.52671229328125*^9, 3.526712316*^9}, 3.52671256128125*^9, 3.526714747671875*^9, 3.526715855703125*^9, 3.526716432765625*^9, 3.52672011509375*^9, 3.526722417296875*^9, 3.5267227163125*^9, 3.526722867796875*^9, 3.526724469765625*^9, 3.526724591171875*^9, 3.5267917411898303`*^9, 3.526794919531009*^9, 3.5267952807367697`*^9, 3.5267955623527575`*^9, 3.5267958570308275`*^9, 3.526795955183936*^9, 3.5267984535798254`*^9, 3.5267988539315133`*^9, 3.5267989968350196`*^9, 3.5267993444071455`*^9, 3.5267994953895874`*^9, 3.5268000382107644`*^9, 3.5268070632804537`*^9, 3.5268072397804537`*^9, 3.5268074436710787`*^9, 3.5268096836554537`*^9, 3.5268101786085787`*^9, 3.5268108234210787`*^9, 3.5268117202492037`*^9, 3.5268119536242037`*^9, 3.5268121330460787`*^9, 3.526815936734375*^9, 3.526884117890625*^9, 3.52688446809375*^9, 3.526897534734375*^9, 3.52689765296875*^9, 3.52689803909375*^9, 3.526899243234375*^9, 3.526899338296875*^9, 3.52690167703125*^9, 3.5269736589375*^9, 3.526974394640625*^9, 3.526984448828125*^9, 3.52698620265625*^9, 3.52730703640625*^9, 3.52733441603125*^9, 3.527334869*^9, 3.527335845390625*^9, 3.527336180390625*^9, 3.527392951921875*^9, 3.52747814340625*^9, 3.527483823671875*^9, 3.52748484578125*^9, 3.527486266703125*^9, 3.527487629*^9, 3.527487941234375*^9, 3.527491728171875*^9, 3.5274997431875*^9, { 3.527500148859375*^9, 3.527500152421875*^9}, {3.527501237609375*^9, 3.527501256734375*^9}, 3.527501293078125*^9, 3.527501344015625*^9, 3.527501478640625*^9, 3.5275025301875*^9, 3.52750357*^9, 3.527586072109375*^9, 3.527590425234375*^9, 3.527590872984375*^9, 3.527591140921875*^9, 3.527594447796875*^9, 3.52759623096875*^9, 3.527596329578125*^9, 3.527596366515625*^9, 3.527596533015625*^9, 3.527596710625*^9, 3.5279740027086287`*^9, {3.5279744784627295`*^9, 3.5279744914313774`*^9}, 3.5280168220133553`*^9, 3.5280169534323263`*^9, 3.528069832415803*^9, 3.5280700720804243`*^9, 3.528070483622192*^9, 3.5280708962254868`*^9, 3.5280720530589314`*^9, 3.528074058512632*^9, 3.52807418814904*^9, 3.5280744073742704`*^9, 3.5280749337010913`*^9, 3.528101498416219*^9, 3.5281021312862415`*^9, 3.528102907181925*^9, 3.5281032990153537`*^9, 3.528103490180235*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"VanillaSwapFixedLegAnalysis", "[", "swap", "]"}], " ", "/.", RowBox[{ RowBox[{"(", " ", RowBox[{"x_", "/;", " ", RowBox[{ RowBox[{"IntegerQ", "[", "x", "]"}], " ", "&&", " ", RowBox[{"30000", " ", "<", " ", "x", " ", "<", " ", "60000"}]}]}], ")"}], " ", "\[RuleDelayed]", " ", RowBox[{"DateString", "[", " ", RowBox[{ RowBox[{"ToCalendar", "[", "x", "]"}], ",", "\"\\""}], "]"}]}]}], " ", "//", " ", "TableForm"}]], "Input", CellChangeTimes->{{3.527485005375*^9, 3.527485031515625*^9}, { 3.528076189817298*^9, 3.528076194754397*^9}}], Cell[BoxData[ TagBox[GridBox[{ {"\<\"Payment Date\"\>", "\<\"Amount\"\>", "\<\"Nominal\"\>", \ "\<\"Accrual Start Date\"\>", "\<\"Accrual End Date\"\>", "\<\"Accrual Days\"\ \>", "\<\"Index\"\>", "\<\"Fixing Days\"\>", "\<\"Fixing Dates\"\>", "\<\"Day \ Counter\"\>", "\<\"Accrual Period\"\>", "\<\"Effective Rate\"\>", \ "\<\"Floor\"\>", "\<\"Gearing\"\>", "\<\"Index Fixing\"\>", "\<\"Conv. Adj.\"\ \>", "\<\"Spread\"\>", "\<\"Cap\"\>", "\<\"Call Digital Payoff\"\>", "\<\"Put \ Digital Payoff\"\>"}, {"\<\"Thu 24 Oct 2013\"\>", "50.69444444444437`", "1000.`", "\<\"Wed 24 Oct 2012\"\>", "\<\"Thu 24 Oct 2013\"\>", "365", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"Actual/360\"\ \>", "1.0138888888888888`", "0.05`", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", \ "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>"}, {"\<\"Fri 24 Oct 2014\"\>", "50.69444444444437`", "1000.`", "\<\"Thu 24 Oct 2013\"\>", "\<\"Fri 24 Oct 2014\"\>", "365", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"Actual/360\"\ \>", "1.0138888888888888`", "0.05`", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", \ "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>"}, {"\<\"Mon 26 Oct 2015\"\>", "50.69444444444437`", "1000.`", "\<\"Fri 24 Oct 2014\"\>", "\<\"Sat 24 Oct 2015\"\>", "365", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"Actual/360\"\ \>", "1.0138888888888888`", "0.05`", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", \ "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>"}, {"\<\"Mon 24 Oct 2016\"\>", "50.833333333333286`", "1000.`", "\<\"Sat 24 Oct 2015\"\>", "\<\"Mon 24 Oct 2016\"\>", "366", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"Actual/360\"\ \>", "1.0166666666666666`", "0.05`", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", \ "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>"}, {"\<\"Tue 24 Oct 2017\"\>", "50.69444444444437`", "1000.`", "\<\"Mon 24 Oct 2016\"\>", "\<\"Tue 24 Oct 2017\"\>", "365", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"Actual/360\"\ \>", "1.0138888888888888`", "0.05`", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", \ "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>", "\<\"#N/A\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Function[BoxForm`e$, TableForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.527485024546875*^9, 3.527485032390625*^9}, 3.527486318328125*^9, 3.527487680421875*^9, 3.52748799040625*^9, 3.5274918126875*^9, 3.52749974734375*^9, {3.527501245875*^9, 3.527501259390625*^9}, 3.527501295515625*^9, 3.527501355625*^9, 3.527502182609375*^9, 3.527502885984375*^9, 3.527503903546875*^9, 3.52758608378125*^9, 3.527590808375*^9, 3.5275947935*^9, 3.52759623246875*^9, 3.527596331203125*^9, 3.527596374265625*^9, 3.5275965371875*^9, 3.527596722359375*^9, 3.5279743870613008`*^9, 3.5279745163872623`*^9, 3.528016825808813*^9, 3.5280169620547247`*^9, 3.5280698415289073`*^9, 3.5280700826255875`*^9, 3.528070491964187*^9, 3.528070902885062*^9, 3.5280720663981123`*^9, 3.5280736143840065`*^9, 3.5280740869034557`*^9, 3.528074219564213*^9, 3.528074434703568*^9, 3.5280749647757745`*^9, 3.5280761955555487`*^9, 3.528101531163307*^9, 3.528102905239131*^9, 3.5281030810919952`*^9, 3.5281032997063475`*^9, 3.528103496829797*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"accrualDates", " ", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"VanillaSwapFixedLegAnalysis", "[", "swap", "]"}], "[", RowBox[{"[", RowBox[{"All", ",", "4"}], "]"}], "]"}], " ", "//", " ", "Rest"}], " ", "//", " ", "ToCalendar"}]}]], "Input", CellChangeTimes->{{3.527485075890625*^9, 3.52748509428125*^9}, { 3.527485243109375*^9, 3.527485253640625*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2012", ",", "10", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"2013", ",", "10", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"2014", ",", "10", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"2015", ",", "10", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"2016", ",", "10", ",", "24"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.527485081234375*^9, 3.5274850951875*^9}, 3.52748525434375*^9, 3.527486318578125*^9, 3.5274876805625*^9, 3.527487990671875*^9, 3.52749181296875*^9, 3.5274997474375*^9, { 3.527501246171875*^9, 3.527501259453125*^9}, 3.527501295578125*^9, 3.52750135584375*^9, 3.527502184296875*^9, 3.527502886078125*^9, 3.52750390359375*^9, 3.527586083859375*^9, 3.5275908085*^9, 3.527594793609375*^9, 3.527596233171875*^9, 3.527596331359375*^9, 3.527596374359375*^9, 3.527596537484375*^9, 3.5275967224375*^9, 3.5279743956035843`*^9, 3.5279745203429503`*^9, 3.528016826109245*^9, 3.528016962114811*^9, 3.5280698418093104`*^9, 3.528070082926019*^9, 3.5280704921744895`*^9, 3.5280709031153936`*^9, 3.5280720668487597`*^9, 3.5280736172681537`*^9, 3.5280740873140464`*^9, 3.528074219974803*^9, 3.5280744350941296`*^9, 3.5280749650061054`*^9, 3.528101533336432*^9, 3.5281029063006573`*^9, 3.528103090926136*^9, 3.5281032997764482`*^9, 3.528103498942835*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"bermudanSwaption", " ", "=", " ", RowBox[{"Swaption", "[", RowBox[{"swap", ",", RowBox[{"BermudanExercise", "[", "accrualDates", "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.527485322765625*^9, 3.527485352625*^9}, 3.527502198609375*^9, 3.527596124421875*^9, 3.528103100559989*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"bermudanSwaption", ",", RowBox[{"TreeSwaptionEngine", "[", RowBox[{"modelHW", ",", "50"}], "]"}]}], "]"}], " ", ";"}], "\n", RowBox[{"InstrumentNPV", "[", "bermudanSwaption", "]"}]}], "Input", CellChangeTimes->{{3.52748773009375*^9, 3.527487780984375*^9}, { 3.5274879218125*^9, 3.527487928109375*^9}, {3.527491853203125*^9, 3.527491855015625*^9}, {3.52749841178125*^9, 3.527498431265625*^9}, 3.527502219375*^9}], Cell[BoxData["14.57217439305673`"], "Output", CellChangeTimes->{ 3.528101533837152*^9, 3.528102907712688*^9, {3.528103126627472*^9, 3.5281031407978477`*^9}, 3.5281032999867506`*^9, 3.528103501266176*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"bermudanSwaption", ",", RowBox[{"TreeSwaptionEngine", "[", RowBox[{"modelBK", ",", "50"}], "]"}]}], "]"}], " ", ";"}], "\[IndentingNewLine]", RowBox[{"InstrumentNPV", "[", "bermudanSwaption", "]"}]}], "Input", CellChangeTimes->{{3.52750237665625*^9, 3.5275023863125*^9}}], Cell[BoxData["14.335284219732888`"], "Output", CellChangeTimes->{3.528101533937296*^9, 3.528102907872918*^9, 3.528103142199864*^9, 3.5281033000568514`*^9, 3.5281035026281347`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"bermudanSwaption", ",", RowBox[{"TreeSwaptionEngine", "[", RowBox[{"modelG2", ",", "50"}], "]"}]}], "]"}], " ", ";"}], "\n", RowBox[{"InstrumentNPV", "[", "bermudanSwaption", "]"}]}], "Input", CellChangeTimes->{{3.52748773009375*^9, 3.527487780984375*^9}, { 3.5274879218125*^9, 3.527487928109375*^9}, {3.527491853203125*^9, 3.527491855015625*^9}, 3.52749841178125*^9, 3.52750221415625*^9}], Cell[BoxData["13.495170848873114`"], "Output", CellChangeTimes->{3.5281015340073967`*^9, 3.528102907993091*^9, 3.5281031467964735`*^9, 3.528103303461747*^9, 3.528103507745493*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperSetPricingEngine", "[", RowBox[{"#", ",", RowBox[{"G2SwaptionEngine", "[", RowBox[{"modelG2", ",", "6", ",", "20"}], "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], ";"}]], "Input"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Sigma]", ",", "\[Beta]", ",", "\[Eta]", ",", "\[Rho]"}], "}"}], " ", "=", RowBox[{"CalibratedModelParams", "[", "modelG2", "]"}]}]], "Input", CellChangeTimes->{{3.5280737017095747`*^9, 3.5280737202662573`*^9}, { 3.52807649972292*^9, 3.5280765009847345`*^9}, {3.528076536545869*^9, 3.528076557265662*^9}, {3.5280766853298097`*^9, 3.52807668674184*^9}, 3.5280771210263104`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.0521857088794509`", ",", "0.01976635089729688`", ",", "0.05219186925200033`", ",", "0.021149938903081346`", ",", RowBox[{"-", "0.9485430435430515`"}]}], "}"}]], "Output", CellChangeTimes->{{3.528073712565184*^9, 3.5280737273163953`*^9}, 3.52807409276188*^9, 3.5280742259133425`*^9, 3.528074440732237*^9, 3.528074970594141*^9, 3.5280765593887153`*^9, 3.5280766883040867`*^9, 3.5280769887861586`*^9, 3.528101534337872*^9, 3.5281029083035374`*^9, 3.5281033036319923`*^9, 3.5281035152763214`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot3D", "[", RowBox[{ RowBox[{ RowBox[{"CalibratedModelSetParams", "[", RowBox[{"modelG2", ",", RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Sigma]", ",", "\[Beta]", ",", "\[Eta]", ",", "\[Rho]"}], "}"}]}], "]"}], ";", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{ RowBox[{"Map", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"CalibrationHelperImpliedVolatility", "[", RowBox[{"#", ",", RowBox[{"CalibrationHelperModelValue", "[", "#", "]"}]}], "]"}], "&"}], ",", "swaptions", ",", RowBox[{"{", "2", "}"}]}], "]"}], "-", "swaptionVols"}], "]"}], " ", "//", " ", "Flatten"}], " ", "//", " ", "Total"}]}], ",", RowBox[{"{", RowBox[{"\[Sigma]", ",", "0.01", ",", "0.1"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Eta]", ",", "0.01", ",", "0.1"}], "}"}]}], "]"}]], "Input", Evaluatable->False, CellChangeTimes->{{3.5280750644891553`*^9, 3.5280750782088833`*^9}, { 3.5280764576724544`*^9, 3.528076491340867*^9}, {3.528076714802189*^9, 3.528076808987621*^9}, 3.5280770349325137`*^9}], Cell[BoxData[ Graphics3DBox[GraphicsComplex3DBox[CompressedData[" 1:eJxkfXVcVs3zNkp3N2KBhd2BnoMBNopYCCqKiq2IKLaCBSgKBigqAlKCSApK CdiFimJg0fLQHcZ7+H3va/b5PO/9z/mc6+w9O7M7Ozs7O2dPz1VbrdZ0FRMT WyktJiYuXDc7nDEq3OPO4frywrxLw2S68ON/xfQKe3OG8D7ihg07HtZwkx5q j/iy7iLhv3rb7vWWruEmnzk4Rf33FcJv/7QaNYHvyveObogwmhFEeO85lnXi Rcq8sU/fuAzfG4Q7epryLZw2j3vUL7vg5K2pQr24x/Xv4IzoI1FtxA/wQtNF BjHlpcQPcLmUgxbnutdz4Af4oZBB3SRLxYkf4IuNehdPf6nC99217K7N13DC z6xvXlRhqEN8ov6oHzFzy/QYn8D9NJ6s8RX4wT2uVufGHqmaUEd8Ag9NN7n7 oayI+ARet33LyZW+TRz4BD5x71SJJ48liU/gTjsmPvieqsr3t/XOauoXRfjo nnJmf5V0iX/U/7XHxmdDNnalfgcus+rWhX+EdsP/gVc3/8j7KPCJe1y7Xdio EjmqhPgHfsDddfShL2XEP/B7tombIq+0ceAf+JjoraditWWIf+C2jaGTtB+r 8SZm2U/P7IghvM2s/c8nNT2SC/XvkapWXmCsQnIBvyDROLd7pTgPuYDrXPO0 PyK0M+gCLwj3XBkg8I97XM3/0fs7Z04JyQX8e/dedS5GtSQX8HUWunI+mX84 yEX0p0tNKI6XI7mAD1neVtKrSZ3X8t37U3NFLOHdfqaOUR6uT/Ki/jcnRs8I 8tEmeYHrmdw1nvpVheQFrii3rMuaJ5I85AW+Nnv4wzdCv6A+4L/b3IxPCXLh HtcPzjedFxyvInmB94m4urYjronkBZ7b6+zQjtVdSV7gIz7ajzxyXpHkBe5n 8HJ1whRNfrzEiR192+MI33tuU+5lMwOSF/W/zri1RHyaDskLPHXz+PmDMlVJ XuABbesdPwr6BnmB7/8aY5Uj9BfqA+6yQPuPRnwT3eNqaD/3I5/VSPIC33Bn pNnplx0c5AXeuEvr/LhUSZIX+MySYq0MGxX+4tHzm1dLxBM+3Mw7SDdOi+RC PXfXjVL/ra9LcgHvc//VwVBhvEAu4L9bwktkEuTI7gGfrXz2kbZDV7InwO97 Ve2NEvjHPa7uKX36R09hcgG/U/NgyOIzXUgu4H/+qe2as0OW5AJ+5KTuSnFp NV5nd0zd7YgEwhvfDR4VMUmH5EI9T1XPT12hpUdyAVd80dhsIYwXyAW8JaKh JELQK8gF3Opt1OGlQvujPuA/f8iEOAr84x7XJz8/nhhzmMkFXGrXZKm9PpIk F3DbTeftc60VSS7gK7fcODXvhTrvv+HJzj9zkwg/ufR1d+VyXZIL9TQ47Xv6 UxjvkAv4A0/zwS+FcQG5gOuF9XHOE/QHcgHXyRjvVCK0P+ojvdv2pMDLh+kh rsUrJx7VTmZyAd/3zM/hU6EsyQXca4GV3c9oFZIL+ArPLTvFozR5PbuitlmN dwiXerO9dkG0Pl9xZMKbpqs3uJGnPO0e/4njxEQ/yIX6T499JT9S0H/IBfxq oEUvPWk2LwCf6ug5sMGa2RPgV66WXq4qZHqI6+YejYa64+VILuCJaQNafs1S IrmAd0iqKs7LViO5gGdaO/vIBWkTn6AXUhq+54Ggz+ATuPxF28uOL5idB774 9yyHjmhmB4APD3L0UZmtRHziOsh5SHric8Yn8KvrWrcZrlUlPoEHXPJ0Ma7Q 4AMsf+/3908h/JtYpN7XW7rEJ+iFZGy1GiToJ/gEfti9JtVA6F/wCVzbovzW qmw2roE/7Z3g1E/gB/e4DvXpf6ExmfEJ/MGcjbM2x6kTn8DdjHt+cOqlTfzg fzEBl2SdBb0CP8D9IsfLGgv9An6Ab9qyMXas0A6gC/zpsGT3XUK9uMdVNXuV h44Wazfg3LCEwwXyWkQfz8enyqa1Ce0J+sBbNzrcOibwj/8DN1w0s6VUoIN7 XD+M6Xpv8EEtftvg1pE6Kp4crlvSgqzKv//mTH8UDZjc7Rzhcc+KxY2KKrhQ d7PRiuPCCJ/wdIPJ7ShtooP/Se0o7NJWWEH3uJ5yWx9/Y2cTx9+cNWF33CXC 351z1UraWMyFr985KdwtkvDP89a+6Dinw+Me/3s7SscpTCiPe1wrVd5+2jKx ggu6+9E4PziQ8IAgJe1ZYiVc5NwI8ykvownf1a3E9OcpXR73+J/XR/N0e6E8 7nHN97w7OaqoiAu5pjjYqTqY8HIL29ySU/9w7/239N3qdZvwAQF2Ve+v6vG4 x/+G9VVeq3D6H7rH1WKihPK0t+XUzsDValoKr72t5/Jy5lbs4uK4G4MP3+54 E8xZrdkSf1PwW9D++J+Th2vBoDJtHv8Hvry8j2yKQAf3uO4rvzHtxeU6an/g d1sqWr2utnKLvE7cTB0WR7jX9qwMmRZN6hf871DkBPO/N3V4lAPu2HVaW6hA B/e43ju4U0a8qoX6BfimP2Vl0Wv/ch8OBA2Ry48nvM+q4DvxztrUX/hfatnK orfndHmUA/58QsuulwId3OPaT8I90l71L/UX8KwhE63CTovzS7anxi/el0j4 Is+e3m+Vdakf8b9G18S3PoF6PMoBn+A3vjVZoIN7XBOni4WJXxbn0Z7A7Y3X Bd1JkuY/rX4/5kbPO4T3+KR0sdcjPWpP/O9Swvu9vYT2RzngUT3Whj8V6OCe 6hm+7Yt6izSP9gRek31Y+6KGAr/EyDM3MCWZW5JedUFJ0K//zafy1J743/sp LtKvhPbH/4HzSZsORQp0cI9raMuXN6MPK1B7Ah8t12PP+akq/LJFtffqHyYT vtnVJv3KDR1qT/yvyL7b81qh/VEO+EUlZ/trAh3c4/r1pf3AjadVqD2BL86b dyDOQ43aDc/H16TcNxPaGeWAhxhZXU4VyuMe15WcYkn3UjXiH/jjRl5+6xcN 4hPPL11qeZosyIVywC1GSq9yFcrjHle1EYMqFWZo0rjG+uzMquHS10w66B7P J8VLd5wRcIxHPB98OeJOhwyzkyh/fO+kvdJJtYSj/IAxCxwaSloJx3ro+YP7 3UqGlpI9Ah2nl35rFJerkH6CzmyvYf3z9fTJn0T5QMlDmd7H9UmvQm223Vp0 8Ay3PupAgFmHPsmL+lsL/hl9704t0YV8mb2iFS/LFlM8AfgHOZ+Xadtq6Z7W qZU61VECjvGL50Y7TN98eNBA9aF8nM2ppY47f9L64XGc6u6yyedEcQ9ZWifi f7Oze478I7QP+AT+j1Wp+VNpFl8CfmaSdLqlQB98gK+IZRP6/xH4wToF5XMH fOozS7WE7vE83fGAPKfK5ingY8MPrJcuYnEVPFe3klOTKWJxIeDX/N6f7NOd 0cFzi2HHY0cIOPoF/b+of4Hd8X0qNI5onsnZtN7aT4P8KOA2Gy/b3jDQIbuB 9YfTnf5fPmbp8LLjyyIdYzy4yQnfAo41h3NybiP37RbmNbQn9Csze7mj6j7m jwHvsH9pLrGd2QfoXf64n3ISffWov473OZzt6xnJPe/76pnvYAPyr6CPAdeD XpwpZnYA/V/ad01QSYQ++V2HFbOiIqqjRessWZpn0R6zG4e5bRPaATjawzJu 36R8oR0gP9pjQGX/yN9ZbN6EfJfriu17C3LBbqB8Y5XhgH4hWuTvAXeKNSrq OKhL9gR05i04bKa6W4/GI9pJ8vv3nr2E9oH8aI+TPS3GxwjtQP6iqPyvBa+q xrno03oE7fRqS2CpRKQ+1Qt84Yiacm0JLep3yDGsorfc5BCGQ44X0VXWuod0 qV6UT1pld8J3rRb1O+qZ7dJnzxBBLvCH/205n1y8ROATfKC8as/mbSYCP6CL 8ie2LSwIWsv8ZJR/UXEo0VBDi+TCc5WZrZJGGix+gvGxJ2rcHsMbxaT30N9v XdzCw06qk33D/8pnrxs8RiiPcQp7UPB961itzeV0j+fjXp9IGiXgoIt6Si39 rVVfsHUN5E4tsjGUNtWhdsDz3C4ayt0FPO3t71veWec5XE99njDJZ2kDd//K mowHiwMID88z1ezfXkT3eP75fPcTRgKOe1wzrdPuu8wq4wrjS8v2u1yn66eZ I75UTinmfr1pNjAfmkJXtX7byhKKNPktM3IG7n9wnMPVa2Dsoc1tf6le4Pk1 7wdsmlTMle6f2xovH054/GLVO+rz9HnHbY77usRGcE7qAyfG25zm5G5or03P 1Cf6oPe84vA1f4FORvKwOwMU/bl71U9CG3f5cPsPNEzJWF9C8gDPP99fcceU MioPOhsKd+q7S1Rxn1stzmYtu8nlZU06qrjZh7vwOenD19EG/EOTCQFRxVGc VN/Mg1trz9M8Arqgd9lef2+YUC/oAj/xPqjMXqCP8uBLxuiC09l/8YNrfbN6 7vSJ1Vz2Ef9HK4OuUfkN1VlN242K6R7Pm0b4D9kk4LjH9dg6Ofkl/Yqp/4DP jRvUZ9w4Vh7Pr96S/mwq4EnKR2aufxzLOYSKbXqmH8xtWhddmHCAtT/6bWZJ rpjNDX2+WcZbQeVyHLfWc6Tz2rWhXMfeF8MbdHT5sV0DXiZtjqfyVl/PFsk+ 0+VfHro373aP05zqefcxRzIiuOPVYb+u/NHnT5tdTl1w1Ic7mOK/85rlTdF6 RIbf3RF+xo5P4KAXKusHLWl11+OTGxOtJNQTufJVR8QsF93kEn88Wj7bXJ/3 ceF2zqlM5MZMDc5eXB3FNb7p+2uJsgEPeSDf+m8bNs07qM+Db8ixJ/Jwo7qu Ll9sdlhvxKpkziuswuNddiz38Jv25qZeBvzdjz9trtklU/kpj88eHtGhy0NO yK3wbO6ofoK84BtyWKwIO6R1VI/H+EF555bP3bhmPR7yQL5nngaDNwpyQR7I d3uaeOZuQS7wB35vfAz+pdnbgPoF/C45Z2Q9v4P1C+o3Sk9PtGtm+ybo55Pn lLp0+LPxi+cxql/yCsqY3mKcbslNE3tlWUI45m0jm5N3rL8Vkf+DcVDo2Jr7 XryY/o//Td2wobjiX3RgR71Ol6tvVWR+F56/vx+iMVfAcQ/7nGY80vjVn2qq D/XPtz8w/os4s9sYT30drpwWv15C4wLP3a571GxcUEz+FZ6//D2p6tmXIrrH 8wlx06c+F3CMK+CP6m44vOrF6OD545xfc18LOPoFfkTclWW7fnL6ND9Cv3ar HVqh4c/iwOhnv2G7Eot99UifMd8aDt6w5XM5W4eino1r1qgo8fqkz5jP73on 1c2WZP4A6PuudLxge5CtC+4OFFsfNz+By/k+4dphwd8Df+B3duC5pNECnwfT Suc3pkSQfxLvbux8SihP9YnqP1/wfcgmSeYf1l/q6S8/JYUrUh2+sH8HszPg qyR+BLdP4AfyuD8OmFLnAf9BnuZT6PnbehlZh4laPPobevTWrOxz4opiusfz QyvtxbIEHOMB+r84rO8K8Ut/Sd/w3KhI81GeDlvvYNwEvPH6FFhVRnTxv0Xr Bvmad5TSOCF9fifzZqEwXqDHwB2KPhalCvoMOtDPZ+uWH+0ILKF76KPaYLUq R0Fv0W7Qlwvp4vGJgp6gnaEvlTezKuIEPVmy5UPac6FfKe7+3VVnaKM++dv8 +NHhGUJ//s/fluPRT6CXrNp9sqzQX+gPsjf/53/Kk91D/4SM/5GwVugXtAP8 rMf7ee5Ebgvd0/6/5JoPuwUc/QU8W9Kp4OaoRrrH89FL8nwvCzjsDPpFt7e2 st31cvLDsG4aaNdr3ord5bQeAO504ds/bge0aV8G/3tVZDJzq1Ae7QvcqXqp S3pRJd3juek8xYa3Ao7xSPueyvkJY/vW0T3F8c45FU8VcPQH8BPVn/qqjmyk ezw/ff3rM0MBx7oAuJfU5Ituc1roHs9tD69ZfFbAsS4APkM/7OgD93a6x/PB 9zaszRNwxHmAB/bXGFXSn+1r47n+q2mmzQKOfQTgO7/UzbST7ELxIjzfF+/6 dY2Ao/2BvxhnkD9TRZzaH8+t2kP6fhb6BfbURWvniaym21xtnweTfAV9xv9R 3nRJlz8LBDpY1wF/qelUNaSPJNWL57GLzhuPE3DYK+A5m1bt/76Qxf1oP6sw baL5aR2ij/+lSg2fVSGUxzgBvtlYvHC4jyzRx/NhqZ+yTAUc9hT4BxNnp5o3 8kQHz09GDFvXJuAYp8ANLgz5MEtHiejg+YbdT38sFHCsL4AvOftOfuowFaKD 55/zL+vPGMb29YC/FEtwrF6iSnTwvNVB2r1hCdvHwfO87E2r3+lrULsRvXll ETPd1KjdKJ5a9bpyldCe6Nc93wv8Wj2E9d+QYz8Oj2PrepT3k9342lKgg/pQ /1H3qPnFQr24R/kBJ1KPH7ytTvzgeZ/tPVPdBRzzDfCR3xKl7nxndPA8quTe 9FQBB3+wc7a56hN4Z01aL+AaY7c989fZFrJHwJ+fkdVtWlRP9zSPTNt7oFjA 4T9gfqgwljpePe0fsvvkB+V8e2dixuJs+N8ZmwhvffN/yL/H1d1TrcKwsZTm A1yfJyXK1ZnUkv+N63AHqQC1xc3choUB7gEdUXQ9Vb4meJD+b250N8eH+r1v 0/Ws09T2e6e68vC/cY00OdYimS9F8ziuIznb5B528uTn47qvQyZqYKMyP77s 1fv5yUkcrn26x9iMsGRxXejFy/Eq+tM5TfJzUH5KloOBmwXb78P/nMVdJiz+ V3lcF6q7Txwao0H9iHn/zjoF+4CFVTTfAPcs7N/rXLcSusf/dhY/MNkqlAdO +2tPHY65dGPrR+AG3lMv77rWQPd4foa3OrNFwNHvwPN+enSNTWP+MPyFNt3W 3iMFfwPl8L9eB5UN8oXyuIefrDm5h/iDr0VEB89H+lVPG2PG4tLA/9yzrOos D32CPc40mCM/M7KU7vHcxWBo9VIBx7jG8/JVmvtty/T4EEnx+ftK2X7cGfUI zemTDUh/iv30anXuh3BvTh2oS9+iQ/s75XvrFnwtuc3d+ehaIN6NjUfU8y5q FrdKsBvHVEYFvzrI9mt8fgRblM7V4EEX9fR4sEGiXKAPHHZ6RsDe1Td5PZov QO/J1SlFvwU6+D/qD1yhttxZSpdw2I9+1zdOND3F1oMor6Gm/m6UYDeAQw/3 rsr72GUPw6G3weoJQ1yCmN7i+eO2ll7SQnmUA/5dtSJ/t1Ae+gD/yHaKevoh wS+iPEIR/qfSVSxCvpj0B37Z0xUnsnSdWRwGeG2JkXbIrZ+k53i+cIpHw1+D WioHekt7ZoyTF+gAp3iIhubQPTE/yb9F+Wenv5WNUiihcQW/+66L/9xb2izf EvWf6V6v1yeZ+Wmo52P0XBebZnVaN6F80LbKf7bu1OYhP+jtbd51NkSexWGA D9V7Y3TFiI1f8Ov+8dicuQrMP4dcStb5c/qOK6b+hl6MrHKcs1jQE+gH8NQM 6w3dBD3BvIz+NN11fFdHX22Kk6B/A4ODrUP66xIOf1tCb/ztvSf0aFwAHyBj e7plIIuXQo8Cp030WiKjSesp4G9O/Mo/J65F7YPr7HWHXwx/1EHtQHnEfspD Xe1ryJ+E/UhLqN21apIaxbHRni+nOD2ctVCT4vCUL9BqbR3o3kJ+OfBjS+fo nKmtJjuC/nlxdttyx9ml5HfSfs3guLRFNurkf6J/dkdEzPWz0aJ9atTv2FhR kC3UC5zyNrctefNAqBd+OOUvvH/neFjyF+kbcPurkj9H/Wog+wV+KwwrBr58 XEXlQM+o1S3ulkAHOOhlhc7wXPQvOrheVLMvcpX4h9oZ/H8fEhX8I0+M1u/A l3pETg3UbKP4AuhsMFXckGDWSOVAL7Pn9fQOgQ5w0LPdoqOf/S86FPcrjow5 MriB2h9y2cdYWejKSdB+BPDT2SXmS6b9pbge6Ay+qH04tX87tT/lFSxe/i2d U6N4PvB54ao9XGyZfQO9+aOaVH4Usv0a8DVe4nnKaIEf4ODreMb9Evd/8YPr Mq/xZsM82mj+QL0ufjFnjvlI07oD+IaPjw6dHiTOV1gkyVQE3iI6F68pzvMJ FKP5C/x83Nb/ykVBP6GXwJdPz5E0smVxDNArXpypdTSP5VGAL/E2r6lhAj/A wVfTTDvNsH/xg2tpvel8J3cxWo+g3vUyPpa2K+TJPwc++MuSGUEy0uSfg06z VOyiH94S5IeDn923cqJjUzQIBz+v91q3SaVr0XhE/Wvn+m87INQLHPUP+CCu l/avenH95X7kQfcICVrv0Pwe/NkqY4EyrZuAe3y8M2x5P3mKL4FOxJFIM63n MmQnUe+Z4ogvs7XYvI96PKVv3C8U6ANHPU7R3HPXf9HH1bO5yVdbR5baAfLm Hu7w3ZCkSnYeuHVroc7HNcpkz0FH7WnYXt8hitRfoDc8pLR8n0AHOOjl6Jo4 N/2LDq4DP6cYOIQq0jqI9hkX2w3zzmN5qsDn15e9NfiuyrdWZWncLEkkOpWW 17u357H9ZfBTOraXzVOh39HfwNWOTdfvJfQ79Ab05FxV/AfvZfvC4OttWXT3 IIEf4OCrKbF0pcm/+MG1aPdsfnlvVepH4MMWlRv1N1Sn8njuP7vScoSA457W c7LjUzL2s3064LV3R12rEOZNzLuYt1uGDXnrvUGT7BvsVo/efqc25mnyWC/B H8h8ohGdM4flW8IeTK99t/VouRaPdRT87SO+BQ61i1lcF/ORldr+XVYHmmn9 Bn9bJ/TsgwrHOipH+WPLL0x2FsqjHP53dsyCW+LrWV4Z5p2rXzUnrv7bQetA lC/W7t5jbt8WKof/XXLeb+ollEc5/C9HZ17lur4sfwzzyLv98mkHF3eh9kF5 pZyxpc2nf1M7ol29BwQ+zM3X5NGO+F/F31HXLBfr0nyHeq7On+V2QaAPuii/ dM7zydrev8kugP5T+e6pnJIktT/Kh0e/dsk93ZXsNvptYtwRk3E/tXj0E/53 fsR0zQ02eqQPqEdn/NC0JQJ90EX5J+59JQoF+hi/oD/sSdWJ2xqytI5A+SW3 d/ukB0nROAV956Opm6qCtGm9jPIS4TH6Hxex+BjqUTIbkvlMoI9yqMdY8unB 1wJ9jDvYQ1OnudE7pyjS+h3lRx0yfyPRIUfzBf6nPrQg/KxQHuXwP+6KVS8d oTzlh8FON9ocu/NIheIAKP85zfn45/XMnuN/MlsuFz0QyqMc/pdabGZaI5SH HYE9bL7/52yvX2rUPijPLfHeKdmqSnaM4kxfPyySDdam9sH/hpdpvWxZxPxz 1CMlPsZymEAfdFH+ecArd2WBPu7hV0/QNHc4ZaFB4xrrEbdNB4sz7dh7W1j3 ONx8smiFsN6BPwF/Z+DnmBk7XuuQvgFXMyvqYZTK9hkRV8iu9C/rc1CP9BD+ VKC29u6SNpYniXFWU+feJCeso1EO/ojPhos6J4zY/h29FyiuZdl9HNv/Qvlf zsN0fQ2KyW8Avvz3vYdnXjF7CHzH0BkXp97Tp/kC9iBu2pvLzq76vEpPncXe w26z/KkbVr5dphhQP7arKeg4Bl/jcuz/rDgz2YD8KPjh/8Sp7Do4m70/CNw5 4rbj5rts3Qc5Fi3bOtvPgO0nwi927mdsJu1TR/Ya9lV89qnq314/6f/Ajdw1 HzXGl9E4JD/8hnH5dl6P8k9gX7erHenl0EuD9uVhX3OTdB6m3mPvUQJ3Mbjv ve2ILpWHfg3Ivatw9qYu5QNDL9a4j/4z87Ie2VX0/+niSl/fafq0PkI/LP/w OS/niD7Np8BzAxq/q+xlee/AnQIsquf1YeVpH0Dr+d0dgn5iXKD/udwBaWN8 9Hkpfvj94GF3yI5JX//oUfRXn19kMya6Ouwa2T2bp4r+x80MaLzDTjTaFPRM VtKk+R1+1CG/LuGr/pWHD7zHLkmVR8d0CKf80IX3zJ7qaFG8BfbG+MqcU4a9 dWgdDfx2vJmHhzvL76L3Swa2NBUJ63f4D/CjNh0Z/PuEsH4Hjnq9NP7ciJBk 4xHtV3k2fY+P0G5oF7RT87K1eeJiBmS3Qe/C48LQhwId8A+/ZqfR+KwAYV0P PcH4NnLv0Blzt5zsDtb7LhldPzfLNBMOPZVJn/qGK6znfpW9d7w805ermfD1 9tMNJ7kCleYET61K0n+UV4iZ80FSSZzWO8CNrkXFv5rQTuMO9f7tpntln20d 0UGcIUpZ+ZB6WgeNO/CVrXy47kJVPY1P1BO6cmt12dk6GoeUPxMS5V/gxfIN MF7CFj25y81Upf1K4CY9Il+dOKxB8RCsW0dpfzhUp8Heg4A/8k0l79qsChZP hj+S7GL1bvkuHVqvwR7I9Y+XuDBIlfwZ4JNvTN34drM67b9Dbx+7zupIWqBF dKD/BgmjtzuN0SD/B/optSdqha+aNukV9CX+YpOYYZkazSPAHTdLHhgoo0nz CPQ2d/Ym5x8fGB3o+VT7c/eefWN+L+ZDvQs9F7iE6tA8jvHqPqT8wUthnFJe jmi8Giv5vN0njFPwgXH57n2g9Q9hPEIe6PVXa2XLccJ4jDq3Y1NARzInp7NZ foZPMqcstTN9zkLGP+zcwK49P8ie06T9RODr1n7VNBerIvsFPSkplC/wDmTr cejRtj5yv50O1pIdR/kf/af0L8mup3Umyvd6Puj+medsHxP/a3+foNX+uIrm IdhzuWfbRvmPbyI9A53eYk5KOx+10P/xXO2M1dMXZo2Eo/9NCt5duXOwnew+ 6MdPfrF//sXf5Deg/MYLfivG9NIkfcP/etzqcuVD/3aqD/3cc+umWYr7xGi+ pjyuU5UD5vJdqd1Qvinq9YOvQj+CLv535WKP2KBAMcJh57oPzAlsM5CgOADo GGzP6HpcUormF7KLHRmDIodoEz/4X6/9ipoN3hKEwz/dFp5n9VxRhvQQdJRP 20272E2O6sXzSwPmruz/XIZw6GPHgnoV/VEKtO4Gfduj4klpC5SIPp5vGXrt d6iwrgeO8XJm18eeVaYqJBfoa6+fGuGygPmTwH1Lh993mKVOcoFOhs7YS73m ahE/1E4aKhoS71QIBz07n9s3UjarkT8AffyzosLTWRgXwGGPxa9/CQs4Wkb2 EfZPoa9s11uTVcm/hR31vyozac06DbJvKC+3Z16DegGzV7CXLjFVlgeW6pBf hHoboztSgrqLEw47333EgdyV5u3kH6D+wk/PtugbKtM6BfiHghRZl5tqtE7B uFgeXeC/OkCT1mWwr6WZC+oODmLxFshR+LvO755gn2HfUD5BcUr2UsEOo58g n7XbxWO71Zh9gx39G2x1QUqww8Bhj/3vuLSpCXYYdhblyyu/rokV7C36G+PC quzJ2aWhLP6J9qj1LYyaKrQDcLSH2ybrv15CO0B+tEd6wvPR+wPYvgD05fSN OOvlJ1jePvpl4ZfcktcZHWw+FtnDsDur9j0W5mXYAcq3OpYhH+HZRu2OedUz 4d2mzYM1iB/0s+RtYzOHF5o0/+K5l43sqox5GmSvwH+NvsKvTHl1sifoh2Lv +0E1VzVo/FK+T/3J5c+tdGkdgf6tmxtild0uR34X9ePh9a5tN6RIH9Bf1VNV LpsdVCK9Qr+8rbVfPcdRjvoXfm/bupEDEnVVSU9QT9glmSkGC1j+BvqrcMV6 52ey6tTvqOei0VqngGFsPQt9Cf316amJshrxj/9NlX404uNk1m5o1wcbEkdP K9EmHP3ZPvZMJHed+T+UV743pWWQXR39H/2uXH/u3PTWdrrHvBT6WKO/ZE49 4fDXJgXGlHk/riY7i/onqSc1Bgh+DnC0v+XYjOvBr9XJjlE/b9gT+eAD2y9D +w+V8fKT2cHWBWjvqY61ij182b4q/iezOmR80jXm/6PfDn0YmLpvEfPn0Z5X +Z41C2IZDrvKO9XUb3vD9nPh/6j3sbAovaDJz1bd86LGIYUbELS0fO6iO9zT SUPvPv2hSXEnrPO2zhjSY3GxDMWdMI5SjEKyh4Z2JT+Q3t+/qKZUnqRAdhV6 ojWwfumSbBXy32C37PgbSqX9Vch/Q/uENG4rsnRRo/0g2G1nE8uXQS8kCMc6 4ltEeCjv+pf8FcwbY5+USt8/3kz2l/b19JpjDUqlyC7BnpcbZEfv+NOF7ADk 3iX/IG7MQ5a3hnY6UrLvcqCtLLUDxvXh++nDO0IlqB3A1+oQyawvOmLUDpBj ea2m3QEDBcKxHh94U6W8/01pah/wdc6q/PbeUeK0XoYcQz38fWwEuYDDnsxI Snc65KNI8yz4+m43cd/DP6rU75DjqpnhvRxBLuCwM1M+aa0/UKRM+gC+epxK 8D2iwuLblI/2a7ziE0sWx4Z9iKvvnuK5iq1f0A75H45oHn0lQTi9FyUVNuq1 tzytaygfWXNU/h81VX7a1Wy14RvO/efcEll++ZuZN1uroynOdvpilNpOYf2O 91rxnuv/3uuXp7jTgU8qenn7o7mC3O7uO4Tyw+TU7e4XXCb7qRUzusZewOn8 kJu3v5gMvc21X5tX4Cvg/XaPGp2XcZ3Gxa8msxYPAYd+OMr/+OPsH8tprxh9 6qqAg26GWRclv8Ik7sjOyiUHBPylZH78IROW17FevfdxPwEHXT+PRqcY3WRO qv3V2UsCruucyPUwuMH5uNgm+D6O46797TW08xybnRkNw7e+ieAm5P9Z9Svv FBeh6rEyZbEB35hnENm66RYXddXBWXGn4H+tHWR+ZpoBv9vl3sbq1NucXRf+ yofJgdz7Iw8PTZlswH9PbxwYnhrPnZe4MuH15jCu1s3Ofp1Af3ne+KJdIxK5 gODd39Zp3uRujaxYbSfglbp+IV/3+XPW2uJqKutvcQqDJ02cI+CLlbpOvTkl kPu11UbnqFCPeu+M4Z1xFSWd+/Zxi+9wQSVuv+0XCf7z2J/X1wh4ZOhSibzd yVxoQV3DlaJY7uqKk/c72w18gK+uPpsPuAk4+ABffgn5ns4CDrqox3/539X7 BVzmsu41N4GuwprDMSlCPUf4lK7XBVz5U/HMTTnsPdYd4cGelzYY8NtNbmtW jI4gP2Gm1u22sbYG/Iz0Vb5jTkSTXTKcp2KywsKAvb9s4ld4TMZP8N+CLfLN Wb9P/WdGYdSby9yI5NCvHVMM+GcvVxv4NbM4ZP/oGSsuTDXgt902DJ48zYPG 9byRpvEB/3rf31Nt8Yh0hQiu/Jnr1ZMC/v6k+LXWNvY+o1pXnwHunfovmt8r TyXp3n95k8sPyfrVSSd835w3/3TzI3/vYt80s059Ax/jWh6Mlqu7xa2zOuKx S8BPr9o89kYhi6eZLt156vS/4mNJlYZdchRvc5n3jM531kv7yCK+UkbPWdep n/ReranKGJ9riRz3/fSPTv0Hf+A32b7tZuf4Al3Uc6BOcmYn/6PHmZftcmPv /Z3aNkWpk5/2Fxe12/USuB8ftlXsWRTO2Vxd//msgB97svSQ0ZlE7sVN6/62 XaI4jTEfyjr11mnCzZGLVFK4Q4GfGv/ejeOOpKqVbRRw/B/0HLS/ZnSWx/9B r5faL/VOO4P/g17r3+GXO/Vzwa9T+funh3PJlg9jFr45xg33fjA208GAP9pd 99MZxQjut1eXJG6BB3c73b3Jy86Ar6ryXDexMYbLGl0te7cjgDsQMnzbWkFP VoVp9Xt9IJbzdE8beEs2SOC3YXyVQN9DZ5fM7G+x3L1zWrWS1UFcsvy3EWkC PkbxotVD7jjX8PzjrZ6DwjlX5S+xhwR8ZkRtdaVdPDdloueI9qOhXMQhpU9b Bdzv/cdbhbsTuL53pfgWLoJbpp741LFTf/R8Lfa9F3DjWz6qAyK5jb4nrnb2 o4qcROm7P+c5s/G6612/RHFGn+bNs+ks37p8rUZwEhdt7PfT4dktzry21yNv Ae+1fXHr5r8B3L15i7etro/hwtWCojv1TefcKTVFuWROx/Z1rvWMWI57duTn GQGX9jQ8pC0XxBkZrT0QIMg9Tiap2zYBb9N+5D9ekLPi/dX4YYLcf113HO20 D5AH8mkPnWnR2e+QB/L1uOB6t7MdfKbJ1o9dm8IFeZ9syx4j2BO36JpOftaE Lzc1F+S8++Fuvb0gd68z7+Z22j3IA/ne/zkVv1LAk69EGG8V+N5tlZhWL5vM zU25V7S20/6I6KIeo595I53/9Z7L6YX5u6LTj3IPL52WsFhnQP6Dwa7s7/dN T3HJ9+9rxS4x4KW8Cqxu1LD3GUuK6rKaFxnwoafPhkf4s/PcpC34sEdmLL/R 1VS5PulOELf7fcODlwK+aYbF4qB69l5e7u/MftkCDj9vV7y5we9Z4VyrxanV nfaw3mRdeb8w9j5R+MzzIZ3v3VC875rJ69CoUM52+rx1J8xYfPiQ5MHYN7fC uEZv4xuddn7kdtOw1F/s/SODqMnq/p3tJvJruyh3qFZkRXKReTr8eQEfGO6z XmMOey/vjcpp/059wPyH+TAvdWHyETP2Xt7ghxeiNwvyzbS1eO0p4PAbrPXD 8wvmxXOD0262dfIJeawqTvsqCfIZ3LI4cFDAIQ+9R1VT2O9o5/z+ZcRVw3b2 HlPqsUufO+uFnJB7zyn7Fwf/1b+QO3T9MpPOejmfm/cMsyPJn+82+fqcTj4h J+S2lQ9X6bSHqA/171t570LnvE/xX6sBcXv3neT0XL5mjVwhzMs5vY4+2M/e hy3onnQ7ZBV7j35gTnbCSI8w7sGrxEed9RZqbJLqeesY9YuN+pbSTj4bbQ8N bJnH3usZ4CLV1UfAYa9pPzCzSKZzfI182KPGOjmI/P8uzzTjO8cX7PKFls0+ doKdbintON5pn98cP77ap8917kBUyMzkbrHcZt3c4ZsEXKzguqPXq9tcrd7t 5MGxdziZhfqPOu2w7fZBM6QNBf/pz861jcbXucja4Pm9JzO/qK4sq+R5+nWu hhfPaxTKr3qxJ9SCj6X40lDD1oIKAQdd1CMdp6d1UcDhbw3O+bN8reB/uY39 cLJzfpHL2/m13wuW97vCcP64C53tJqJb+lB3wVcullOpuSR1TsBRDv8bu071 YKf+y2VodaROvMxNu/NlQ/WgGM7zdJWsq4D/MpNorQyP5i59s889GXeRW/nq tvtIwX9Y1OpXHLjsNsdrvZ87O/Mq9/iKuMN7Qd7JJ0ynm6Zd5MKrtFJ9g6O5 3wcXeq/qHC8TDabkZF3lArYcL+sq/K/3V7etnf6q2gu/VXG/k7iMLZN2utyL 4Xp2rWm+IuC4x/OXfzx7dNrVdfKb3idxt2g9ddXRcUu54B9utc+TuTw0hkva 0D9j9djLXMiBCQ29BP+kQelm8tRotq/qZ1E/IV6YpxAnXPTn1oRHlf7cgYP8 xgkCHdDte2ZsaMmYW5zFTkfFTj1ZUp0wXeyXP8VpNWt69+jUk9SUdLtqH7bf F+WmNLZz3GHdW3Sx96il4jHcqb/LwzvLT4668sL6Whw30+r3Zu/kEE55w0PV 8m4G/Ml30do5wn3Ihge7xwvP5UY4PO+c14pjh9kMfRvMjXZzOW8nrA/eK4U/ 7LTn7V2DV4qJsXNiT4c4jj00qo1L/08+qqMoH/VwyJLfhkcvE/59qGr7zoSf nERv6ReGR9k5AAomXqZXg9V44CivVrjoi6ucLNkrlP8sf2fkukG6xA/8TI+j gR36e0qIHzoHJbPf2Dnva2nc0vmOWm+MpUfJEh2sY+Ys6lVyon8j0aH3VUX5 xo8b7PVvWUQQHum80eT+Q1neMyd1/UQ5dm7qR/1Sq6dGjE/MR9clVfvX7pLk QR/4pZSgbbFG7dRuwD9PKtnZYVLFgT7wlgsVz1N7qhN9rBNrjCqNZseoEn3g Q2UO61+OkuFBH3iemFN6/kAx4h943Kk5PSv1FGj8AvfPXXt21w1W7xWluCzV 4nDu7jezhumjdale2OM53PHdpgvVqV7g3Y73v/1+hAKtr4Fvbvz+uFuqOPFD eIp6d/lgth8BPEthTGaPD4p82FN527VrWXw4Ze5S/beTNIgf2Oc1X7+luI1Q I36Aj1SpHCmloUl6SOtosZV7lC5IEz903mari9yBOjHiB3hxx/FvXcykiR/g rq1LiusLlYk+nW952+WdrSSLAwOf0/jj+cJr8lQv8NEFZoZTVnWheoFvWBJT vWq+BNULXCxO+2CykRzRwfzQT06nUqdWkugAf7ps/cJ+WyWJDnBniaEthm2s HRDfsB98zzFCQ4noAJfpo54Qf1SO6AA30/zxcUQqGy90fuHJDau7WLH4MPA/ +3wv+i5XJTrAv+69O2Ffd2Wig/jGwBlPFvfx1CM6wG8NK5b1DdMiOsAN/wxw Dv+kTjjmvT+VYpMDZNj4pXE2KzDtU0o72Qdnkf+5TPR+B8r9eS63ffT5C9wH /W3jW3PKqDyuXqJzRVC+60Wnw5sGXOFKqkc88kqvo3JZ/zlXBPKifFT3z4Wj 6hifbkOrpr/+dp2rrk7sL5YiTvpfJJqf7fevnpYZ1Uh0UH6uT9nnrS/ZuD6q 2XP+pgE3uIjIrIa8BypEp0QUT3aq2yK/c7YkjaOpBhreDxaHcP3KTS9Ky7cS fdD58/X0JLMxitQviEtf23ZlrUS1BtV7vN16qfTOcM5tY/am9oE6VG+ZyB8b Xtjl2OijqlSveZfpF1cGhXHyoYrT7w5n+gk6uUdvHI61ZHpO8fU3M18+/6lM 9P+bxw7600v3XuuojORCY/c8arVXI/onv52wD8q4yYU/+pnhrMPGI+iMn5w7 w9hNhvRqpoiO0gjJF99Xq5IdkHsTVFLjEM3da8+ZduMxG++4LtkiX5XXtQvR mf0sJuyC4Cc4/lCzTilg5R9at47dNCCWu+HyTyunKkm4hYVaWsqrOO7Fj9O/ z+crEP543EAz6Z0J3Kj8rMZ3vurEP+038d6rmk1UqPyMgeYPrPWSuMUGmU3R sbpUHvubCV9PeDYM1yQ+I2I4hy6xiVylwjqbpDZV6t+qRZHhQ3oc407UvvW+ sYrp/56m1OI5N85yQbGeve5faaZ5sEOU57L4/Ouz5/LZ/PtLNL5eRVocL3Ni 88vf2Emur7/5cz1Mxe7YBJQTna6T3ua4jQ/kMqVqm9f6FJMfAnyMi8Qo+1MV hE8e8/3YAMXrnHVcXpW2AfNbcF3r4PkrtqiM7qH/DQMkl9+9XcHyd0V6npkX +jLkWS2Vl5KZ8C7lVSjXqpy2bLlhPeHQ52Ljk587XjYRHeht65WvPbeHNVA7 HBPp+aNjo34sSGni0P4SIvrPmi3afh/XpvkF+rnvzIipG+P/EJ0TIn0+cFK5 ++T3zA+Bfi6e6W/98b02j/IeIr1oPMrXGoyXID158uF87xk+UZxlo5H/ZqUu vOyIceK3LBI5BRGdhSk7z2h91iF8ukifu7tnvRyeoU10nqU9MSkuiOHWaMYV X5ToSvqG/bSvK64vyrjA5rujy/5xebD4Npe+tHBH3woZ8ofxv+y4SVK+43Ro 3PlnNm69qxDHHcladiCnWp/oY732OPO11vY7UkRfcq5kh9pvYR23dPxBSSc2 ro/z3Q+uDIrnnp5R6id1VZ7kOinC+6z/NNGtTZnwvmnG3+PlE7ghzXZvpRRV CMfVss+I+/xUhoeJxpGOQ/N+mxwVkgvjbuqIiR5ve6oR/3j+NcWaixnH2tnT eMHxjsokLuW7ispaMzXC+4v2v9R3fQi83Eud6GMf43xyYcKs2er8xstrI5v6 JXNPDFfOCMq4wx20vDSg2kKD2kFWlP9TXzh2jpgMo9Mh2vcwzB0lIyamRXYA /vzrjy2mCxLrSd+qRflsv8UOTvnQo4lwlB/3tcz43PMOGi+1ovJ73G09Kiar UP/W9lBLWZPoxb24envF+WOKpLfv1AMl36ad4abvWdJPTIv5q9hv0RO9Fww+ Efdt4L0nB4j9pHkZ+Ii7yn57a0uJT+AO+XlVa+rLiU/4udoFd/+Mqv9J9LP7 t8vtjgvi9HSMBywbwt67wX6QmI5E0T4b5rcgTnNz89Hrx99psX4U+ZlbfLWP a73So3Y4JhoX+yJ7rQzdqkF4nw91+Tr3b3NNvhLvlDgtwuHv7Q7a92OZMA/C bmC/3X6emLqKHct7p/fNUx++0uynRTjiNO1tF/VT4zVIf+i81sDNG0Im6xEO /3DduTGTvBbrUH8hjtQ61nzZqT26VH590vAgm68J3LNDRupBQzUJny6ap0ws ntfnmzP9PCnS/3VdFo6Qi9Jkdkmkt+ud1e/fSmN4pCivLV+6Q/xbNZML8Ru+ 2vbBuRwt0p//vrcLOii/ftvZu+/8mD+TKrp6ivxA6M/+T7WV5TXnuPSRn8/X DC8m/LdovrupvebO4zulpIeZIv/wq8g/RHlc3w2f/tIph82DXUR+Y+bXK6U2 g0tpvoiIOvt2zNAQbtK6bs7GIwyo3Y6I/DfHQ4FDQlfoEf+bRPG0r6Jz56gd /nMeHfqxVaTvltLHl+fV6FL/NojG6cJ3s9T7hujTPL5X5A+8id6pOfAukzdd FC/xFJ3/Ru0gwo+JcNBxO+kleffVVW7pS88r7y4Vk7yPlQarq/++wd3x7zhe WqVDdumRiK+Do90W6onrER7W78nhbgMjuWOSyvONdAxITzxE8+ZL9wtiurv1 aRytff3HP8M3lit4vOOd+kumt8ecR4bZesdyPg3hAbEl+oRjfvEVe+O6IZuN C3OR/3ZcSVzu2ksdwiFHgemyuItprD3h1y1d2HZ5YG8DwvuJ5p3Q7lPnGyzS o/4FPY2eJ60T05g9hL2NF51LhvbE/rPdX5WakOASsmMHMoya3Mb7cVsydI05 g1LCxeL+54891jL3cs5k/pvuubxf0jMSOInAOuXZq/WJH+R9OCd3zVp+iPEZ +7yu1iojmRsw6feVX9HM34Pdtt44tC1xDRsvB0X8iNvbuSwey9ZliLcpBo5b FniR6S3wk//RH8Rzpjlumd5taQm1O+IhMve0HlvcZOsv2IFYRd2pgdZtVC/4 9Dij/8rXvZ7wfaLxXtwYo2g8hfmHiPPEH/recSma+ZmYF372eXnFO7Wc/EN6 b3iHmndGEKND3+tokz9pnFZF5YEHPhm4tbCihnDML5cnKWietK+j/gKeX2to cHsu80sRbznS3l7s39BI5YHvnfnshOqaJsKx/9l4KCJ7884WwjF/2X7wchm9 r4PWP9iHvVJ6dNDwUDEaX8i3epE4d6C8lSb5jXQeUbi3adUQcZpPgU8eMu6p /0oJsueY7xJGX/ho1E2bymOeSlB/7mpzjMVzgO+vOXf1sx3zAzFPqTV0Gz9J QoHsA/DPjRMGNVQyPxBxDNUxsw+r/2Y49nkN5w8N77WL+XvAfTcc2ZFbp0rl EceIOheXwduqkn1A+aQVLyRKz2sQHZSful0msLsh8xuxj3yietriN5G6VB74 PiPTz3cSmN9IcZJJAetdLdn8jvILgq843utgfiDK7369qceBWOZP0vcfPHb1 z5zO6OB9Dqlxfttz21kc767I/jwWnedD86kIf/YfHH7XLokTrUcT2LjIEfld S5z1unFJZaSHuEasirwb4cX0VqZqyxdrvUjuYX1i2/w3zTS/rxP5IV7SVUOj NVWIf7Sz7Enrv8GaTK6K8Nl9wt2SOEmZ8hGtv1g7wD8Ze0PFqssv1m5ohy+X 0+c6KjE/B9eRGxtWh6xi9JGHf+hX9ynNj1i7ZYnylQxF59IAzxHhvUU47B7y m9p3OSv5d2Hr5SOieFFz6p1o67NlxMcsUT5dfd+eii1ZjE+8H3Cv5mOi/SBN 5i+J4mY2orgZcOznLv0Pjv27TyK/AnzSecN3h2R0ncP4Mf9h8HrMw1iuuqa+ +rylPuktnT/vcsmp+xy2HsF64WT9ymNfnrVRvx8SzSMPplQMM/uiSvOpmMiP mmOgsLZ5qDzh4MczzONoRxDb18A8mPq9262hUi3UnodEcmRVKJn3u9ZIONYR q9bMmOxxmK2D8HzDqfZN+l0byQ5j/02jo2PgLw32njL0f8HdqvDPYq0kl7vI r3uj9WJ59G2GYx6583ehZMR4ts6C/vd4N3fpu13MDiM+Nld7tUzGbHHCYf9X z/zj6Haonez5A5Hflalk2BY2XJ7mcdD3Fjtn/TSOxRsxX6yL6BM/XkL7/4vX WYridZAX+Xg5J2/xfceIE479Mq38b5a1r2QIp/MoWsZ22yzO4njIOzgaa7qi qxGLm4Gfr4U+V8QsuxKOdjiSusFRpawLyYX5qzij7Z+whyyuOFMU98i9prI/ KkGXcMRVPJItzS0Ffxj98lwUD8kocKivHCZFOOJ+xWPtDpZvUiIc8f/xdX6l UTosHoh6BztqvyzLEaP5S0YUn9GZdfcfKU8WpwX/u6WevQiZJUnj6LhoXbnj a+oa/wMahBuL1pVZ2uH+GUnqhIOf3cmOyz92YetZzMtbrCaY9/Rl82lfER2Z PJn6tWYMfyCS9+6uYys6VBiOa7xGfPL54wyH/2y31NFkwEJZ4kda5G+PejvU TdyZzac3sO/R9uOUpRrDMe+vF9NV8xzF9iOkRc+/KK6UTGxj8zXiqAu+DXi9 6Ap7Dxr+QFRIUNdFn9j8i/wHQ/0x3wrjWZwZ87hU2v5H561YfCxcFBfyOjjQ JtxAh3CM9x9/Z2e3SWiRnsOf1Pe3THCY30DjGn5dyYMj+evSGf5QNE5jvn0M q/pUQ/YBfuNxF1NbTXPmv6H8se/Ls402NxOOOOdY8d/BMdHMb6Tv40z4cUnX sp3KQ99iHHbFelSLkT4/FcUVlapsv/249YvKIz5plLpE7ayyGLUz9Op5TEkX mVG61D7oR4ecGZt2h8lS+6NfXl3mR92dpUT9jrjEUu+IKTNWsLhcabaOoeK4 eK44Qu6G1SQV0gf0V9h7376v9rD3huDvPTu393CPYcyPgr9kajvrsW4Yw8tF fsL3QxvdD4ez/VzkFRT8Zz/ogMh+VD3rlTk3QJ/kpfNsLnSN2fBAj+wM4tum D29e2hZaQvML5vcfZxNCgq5WEA692q63THL/aTb/Yr7YcLgtUUOmmcbh25PP 0v+khnDJzVzgd2O2rocd7qHzsinkJnsfGe3settFW+In84sQR0q89mz6b56t o9FfdVqNB4LvaBFeLuqXxtbv3ucKtQlHnHaaq/u6xm4MR790O7hW67wr81sQ t5kxMavgvrQW8U/fB5OwOemqzeI29SL/Ifu5icJk2TrC20T+xU+xdpMa50q2 vyBaVyqmBLV168/80iOieMXPuGkTFi2pJv9njWjcRH52mVA/WIH8Fozf1PYv avU2moRjHyFG36zfxFlaNI5gDyNHyngozNckHONihHmgas4XNcLRL9u0+99w U2d00M4zP6Ylri5k+AlRO0tEP8z8FMDsUpmovLxNkf20Hco0Xui91A6NcSWT 2LxgIopLD/z1acuKIoYj/tzwhdOYNZ/RR7ttV3PbnLiU4djfufiz9oZHDutH +P/flo8ufddSQ+2MeX+96H3M/+J4TxP0ES9yP9Ll+5Q/LG8B/sykEZ8WVid1 pXphx7L+GftwcSujg3jsrQ3HT/bOZXQQR5qp8OriwFwpwqVE81dm42HZ2WfZ fPdS5CcE3zQu6+0vy/IQRPEfmwbJjH5BCoQ/EsWLNIxLxr6cqUQ44qs7JWo+ l9WwfXZHEV60+OmlB4qMfxmR3VpvmWnT6xibd7AuizPW2rFXRpXhona95WDi rtZXgXDk/7j+0FTNv8T0kL5zVPPu55ynTG/3ieKEbgpOC0aasrhxu2jfMEvj Ws8nl7TIzqMeCclLivbr2fxL58KVeH8368bmdylRP17fd/LJ2YNqhGP+Mjj3 ak1zDfMTMH+lF+VKPJvC9l8ei/o9+Lj2pe792Hny2M9qNNw4o2WpEuHg60vF ssm717P8EPpe8b4XF6Jb2H497HPrPpsnt1b8Yfspov3W58tlx74cy+JR8MPf ZP3IPnxRjehgvrZN+6hjtJ75daj3VUBw9RsnNk+tEemnWda6hvhujA7WNavt nqpG76ykejFOZSOva+p5NbP8B9E4jSsbPlHRtoPmkekiO7Z2suknK2NmB9xF +54XZfLMo76zOP9TxBcvL7kSc43NI9Dz938ufqjKYXYe42JEwZBJvC2zY5DX PTA9tjVRmXCMR7/1Cuu0vFUIx3iMdLxceF6HrftwTsOdJ1Kr7vlKEI64X/7g nyahs7sSjvVjib7Ntcd/f9G8gPiqV4pF/iExdu4T4t6FM7t9dlosRXqCfYGd Dv0ad39i73Nh3pnxrFvx9Bds/9dd1C8zO+rnVTnKkFzwBwYmhFcs/9aFcPru sYnrmaZY5qfBrmpPV3vUx/Uv0Ycc537aFEcH/yK/Bftft3O6ta7fy/KyoIfK h1LMD6yUIDu8WpTXbBc+3dzc/y/R+Snyl65auexKXMnW+1gnbl/hYT58gAHZ q1lrPm1+8+0SZ9GSPX3rVJan+qh0zLBrjwK5AV9s2iZONiB+Hq7RjBk6J4ZL 3/kqcosZo9O996zg3LtJ3P5pCf+Xl0vzxU+tt+ezorhdE0dbBVew+HzmsDdP W/cmcNWX957o/L4D8OaP58adtPXkBs+1/JS6jO0vqIeXvbo2/Sa3f43ri868 a+jtN48uV+c6x3JtAR5m6hMMSH/kdVNnXjGM4xb1NdLtfG8L46LZOO/ayHfJ 3MzKbJ8/YhqU/4zxV7dxlNikxHrqV+DnPsa2hKyRpPKQL1D0/QWUBx4XFtHk 0bOd1gnAL1ZPHXUvTYbooF2vzy28tLWjg8oDH7bMJ/jMQHauJvD8wgVeu2wV iA7s3s8LwU0VNrJUHvjOfpNm/L4nTu/XAF+joHlLQpV9vx7tN7x3SLS5niy9 Bwe83aNj4sS3v2n8AN+xoOrXWMF/QzsAj76xriU0uozkAv7giPV8uTT2PXfg AeOkkmwPtVM8AvhFG738yvPs3EvCR5weN0mSnesO/OnT1W///tAhuWh/wDhu T2kMO8+T4iUHrq/vNUaW3uOj9/GVPz+eOfkvyUX5swMVEw4J60f6nj32ASwf X62uqCG5gOc/M7U41sC+2w58VteukQvE2XfAKY4l5q0w9Bo7DxP4nV/Zo88L 8x3kovViTnbM4/G6JBfw1aa17pywnoJcwBMj532WfiRL7yECX6pSKJb/VIy+ /wI86/PtF8PN2fcdgA/pn9eqsaaJfQ9RhNvPm69msI99tx34vNyuuad12HfA yR7c2lJu/oKdtwZ8/sjUyPWCvw0+YW8qs7Yd+9aTfYed1v2L+gbtGqJAdIAP 7bl+UIuJEpWHnVNfvuOb9w11Gi/A9w25obSwhX1XHbiZ3rr+2TtVaRzBrox9 nG9jIse+XwBcTGekte8ndepfrNf8jF/r1E1gdMg/8gqSH/WKnZsH3Npjzr2G LlrUbpQvM+9kicUpNZIX+MvQLvsXrWDfWQD+PrBJR/+3MvEJ/Ijegw3jbdn3 FIAfdR3puN6SfYcauPjNLV9S/dh3xrF+fTirl+q08/rEJ/BBKd/zOGG9CT6B W05wvKsjrHPBJ/D1vk3fBw5TIz6BF895OqKXIfseOvCWCt/1LrHs/EzgBlO5 oW457PuAmDdOXNl5I2yxDtULPGhb/aoIYf2LeoGPDl3nFKPJvssAPFm+zfX+ dNY+wGXsPkQlC+tl5L9iHjHMHFml/aCM8lYpz3TjbCeZ9DrKQ6V8+bCmWZK3 xXnkjwL/evqQxPg4FR75ncBNKt491O6qwyNfluLHou/0If8VuKfTu+iAqEbK ZwW+9O2Mn6NmSfLINwXOzQle/eigKr2XBBznASL/D/PUCtXNnwrlWmkdDnz4 wbzyw8OlecSLgd+YejXi1Uo1Hu2D8ZufEDnIqUmXR/sAF2s+/P3yS3VqH+DJ Cyoe7BynSO0D3OtawqtcS0keeavAc1LPRR7V6cIjjgz8b7rr4MGqkjzyR4Gv 9NWw25GvwCPPgPJJ7+Uqp/uq88gTBT6oY5XYmVhdOucf9kSGT13SvZqdgwFc re7i0+afytTOwJUKVi8zd2PfraP4tNpKt2ITdm4P8MoA/7OfhmvyyLuFXao1 11FoWa3KIz+V8igK+frgNlUe+anQq/2DDd77rmrg1onW/+h3o8L5M6r7afLI T6X11sDFTgH5JZSHCtzp/JqD8wPKaZ1D+SmPHY8t9ymmOCbwIb4L05wLtHmU x/x+adzcAUdPVVD8Dnje9e4DRhj8pDxU4MUT86bE3K4gfxr4+adTracZ1pN+ Ev2WhN0ec5q4vQs2jvmiEEf40tGhh15U61M/0vdM5qfbxz6rpfxUOi9xeq9F DmENlJ+Kec1Jdra9TUoT5ZvSOv6nxA6T9+2UPwr9aey/+PYepS488kEpr/ne 8L2+El3pXAjSh5vjR1kelqJzV4BvKSg2e3xBgt4DpfOpprzxXXdHike+LPTB Z8jAsfontHnkldJ7DE5bn1gbyvLI16F15wvFOXJOMjzijMAVly33b7kizyM/ EniI9w/bCml1HnmxmF/E9l3zHvFZh0deLOUFpA2Il43R5pFXCrxV7PzfC23K PPJKge9uK+CVFFV45I8CV9x5/PfiHBUe+aDAZ2vVti0zU+ORDwq85OgKU+9e 7DxnzC8bPqf5feipRuddAPcxN/Uzn63OY72NeWGv68s7Oh81ecTvgK/4Niuz 1kKD3q/HuNP3qfWN+VtOfhdw39wlseptOjzyRDFeBrqUznXIaKL1M8bpecs1 4Qvfs+9fAz8t+s4L6gX+YJf4WO9a9v04yidy2+aUkPCT6AM/Y235zz+zy2hd AHzfo3s2fZey71MD/176u3RVfTnlrWJ8XQtcOfPuWhUe+9D0HhJ3/PubREUe eZy0H/uPt8yJrRo84obAHabPOe80nH1HGOPxgIbL3Dpbdv4Vxl1Ftnbz1j26 dJ4MxsXcBfnfg220yG+E3paczh2y/aYuvS8M/MsUm8Sgd1o88hiA1+/43Kv+ pib5D8AtNM672ovr8si/hL71m7No9uU0TR75l8CbxslUJn7SovELfbO5c3L1 kH5MXujVqGnrsrIm6/HIBwV+NfrRwWJzDTovguZ90XdSsK5Ee3rt35Lds0iN R7yS/AdR3mbmf/yNmyJ/A3mctG4t0f9dMryY8i+BP8mY1bhycCn3OP6s182h IdQ+J7Ur5ByE9bubaH6n9rxz8ciQ7Xq83fRLS2aNjKRxsWPf72GjS/R55GWC n7ei7/lu+w+O7/win5Ly/kTf7c38D+4owo+1Zc4LzI0iHN/tRb4m7Xs3LHtr cbeU8i+BX/Gae/rrpWKKo6GdV68P6R79QpdHnij0002Uh+l0bk6PyepehE9R 1v/m2seA/BDgr93dOI3eBjzyHYE7z/cc9mehHo+8T7TngmcLX8lU6/DI44S+ zd2/XG7sbn0e+ZrQn34TvKpfC+0M+w88J/3b+pPZejz2V4AfuBYz+N5LHR7x O/RXuJSHUmeeJPJCgHd7xinbZLJznoHPON+74OxF9j0gtP9GUb8gLxPtHD3Z Y9Gd4BLKp4S8v0xCxvGH9HjkUwLfvsC3uCRanc4dovcjn5mmJKwp5soT+L6a M1h7vg1ZMPacqT6tx8Fn3JHuau6j2mifjPajdjQmnbNuIzsM/Gm3N2tuuNeT vYVc+wuTzUsiaihPCLj2f74vSfkyD2Zd80xl35cErusqO/P7fPa9G9hD7vGi w6+DainuD/zD3km/j9jXEQ55H40bm585t4ni/pSfXnx6x+qd7DuP8E8WrPae fKpOjNaJwBNKV7Txq9j3GYH3emQSMDZUjM6Ro3yNXcVNP4aw7zPCPgclqbgW LmHneAMf7rBm87b5ErQOBb703uKU3lvZdxiBx7+aufbqSgmyn+SHPylWnn2M fYeRxQ3WbkiI1CX60J87A1d0N2lj32EEPtiB2z4wlX2HkfB3T7W+2snQfAT8 p92kwYMkFAgnvygh0EOiSpnO7QG+P2OSQ89dKoRjXniVE6X8oU6V+AdeYLHH IjGBfccQ4zTynwO6zefZ9xOB1/y4VHK/g32vEPgGH9cnxxs1eOQjQj/9RN8T TP0Pfvk/3xkELp/9Tc4xoZbi5tDbyDHd9SySymgfEfq2fFSI7qw3zZR3iHZ4 MSA3OUZThfiEvM8u9vNdpqTJIy8Q/E9tMwhqeKTBIy8Q/OSKvnOX8x/8nQhH XjW99xn1t9ZsbDnlC9J7MH7b913uUkz7B5Crl9jgAIezZZzx5Kta2mlsviua qqg/Y4w+j7w9iifIil9MtNTnkV8IvGBGzqCaLE06fxj4xx7TttkO0uSxvwI7 c+9tWrfRU2rJf6O4t4aj0sA97DtikPep6Dto8H9Q/o7Urelz/FTpPEaU1xLZ pfv/8QciRP4A/Do6b2B0w5t3z9roHGDgZZtVW/Z1qaR+R3uO3B8knxmrQudH gb71zMonvZtYnBDlpzh86P7cpIrWicBHXcq4uzS0hPoFeFjT8gn7rlbQ/iXw XfyiLpr3dXjMU+hHje7qB3bIsO92Ad84rePazcNNpD+wqw/tlqVmvm4n/Qe+ 81Xp1a5dWkle0pOKD3HfXMQoTgLcMOnIjKDZ4mTPKV+3KGhE7vgOyi8BfYup n9JevJLhse8Iu+rd/67N5nU6FB8Gvu3bd+fcvuz78vQeee/NWv2MFKj9UT7u m0R3bcuuPPLqgA9b8Fm7MkeMh58DfPmyC0viJaXJfgI/oyKTL1ErSf48cPvA Ui2tXHGyV1RvxiPDPVbaPPL2MI56P7tQYuKpSPMLzQtju8vemyVJ5xQBPz7m 7ufZl1ncGLibVb9ZAUflaL4A/R9utttH+8qQnwO849Sv8cYLZSmuCPzmT2eV Vd2VeeyzAhd/dG6GZpACrRNpXrCfNjNpphKP/Dyy8+0Zx22dVXnk5wEvFuXd YX4BvnL5cLuAUao88hRpHzuw8eH8Axo88hQpHzAyKuB9kjq1D70/qj1rXdfZ 7LtIwEvmzsxc+0mNznWE/Rn39PD76U7s+0QYR1vzP7suUtWkdRP0+ccY3ROz 0xsofw74/CvpYk8/se/60fkQG8X0W+e2U3nov2HSiJ2TNjdTnIfyQO20bbOj m2hcAx909YHHzmoxHvkowNPSknyzbv2ieBTwyhp1v/3KbD8OeljqpJHVL1iC zvEAXmJf+eiMpBa1A/TKb1+idnczaeovijd+uLBnWZgsxZ/p3PETmtt3h2mR nwM9+TbT/PI7I3auL8qXyWkeujSLnd+L8meX++am7VHlkbeHfh899Gvm8kkq NO8DT7c0dVMKU+ORh0f7AlE9a1zD2Xm/0AeFdTO8jEfp8sjvhz649z7o3PW3 Oq2LgQ/P/n9lXWtYlMcVFuQiICwLy+4qd0QCiJVLogYqDkWCYjGCGkMkliQk FkWkIkklYLiUmyBGTCBPRRQQTIgiBg1VARGjiAiKxapgpRAh3EwFCQoh0s3T ec/02f7cl4+5nHO+OTNn3nM+D2O9KdP/iyc7q31fBriUf19moRp+mf0Xh/xh bzcMbJQ7ch4R3xf4tn23NGor5jDwjIH3cd4g1k/g6bb+p5OPzaX1E/b5Yeu2 pWlv/kjrOe1bNuTmzSgaoP0/7DamNWH6mpacgbcKvb+ebf84y0JJegf+S9xs Xdd0wQ8EXnfP0uz6YlFfEfr1WGXkeMNbZSc8fgXcy9c4wu97OcWdgD+1P+i3 KEh8TwT6PebmNqwfKL7TATnf5Odl1CmgvK5nYd/VdDwjngfwgnfPbwqy/on4 LsADiq/afmP1jPYbwPeP7rUrcRgjeQL3m+ee3bb+BZ13oJeQ3E7PUd1x4lFB zt9wfiDOWXh/Vz3bnvm3DtW+iI8fuN+hGQq3zUoGvhTwVt+Dnncq5Qz8J8ht xCUurTbHhNYBqssSsOXgkLeMga8D3F1x4ELkfDkDXwd4tmSlx5V/ycifAm8z aLc2fCIl/wW9XLT9Of0HXyUDjwp4vGZ3wTLHubQOUJ56+mJ3RY2cgacIvGba 3uVUj4LitMAfmt0LMrRS0P0L7HnncYV17awR4tkDrzv0yOjQmIIhvk38Hb+c r/ZGPaf8Cjov548HfjDnOcXnga+Y/1Fo7fWJ5Xv4fhV46bpvP/HRMaP3lPJR OM8Q7zXwGO2pp33NGrRfIp7LiPf39j9oMPDpKY98/ltacT6zGPj0wE8p6+/o SWexldy/0/li5/nkkGRj8l+wzySndyaql5qRPeB9qR1/LTRO5TexDtB9x861 h8PNnxLvDXZr0JHX1vor/43vlzAvt4LEwB37hX8HXhylf+rEP01IvxQXeveg bFWPnIGHCvyzzfUr6wqUDDxUyMf3vZDPrGMktG8h3mhr1eX+IPG9MPgX786e 8o2WUgb+HOV9RsY7btpjwuB/gec67dgwECAjf0H3+7Yv2Z2x0WfI6yC9Ty1P n+OmQ/Fe4Db9Oh9sviXOyxjn5LhXqt4+Kfk7jHOhruJAXbcp9Qs93o9Y+62d RMau836Bn76afjwh0YzhPgjjr9D6g+cGBzkDvxl6fPtEcP4u/RHiN5N/4Xw/ nAfxXth8aDV01XmY+MeY18XfvlT80MeMBfLzHcbzG5O6tJPjClofMC927fWv GlV+H+sD8Q0OXek8UDCbzgWwQ9f6tk9t/TRJLxhn3HLJ3wPCxHdpgVttGoh2 P6FN/VKeU3u07h+bNBj2RcTL08lt39hgQO8j8NB5LUufSCQ0Tti538nT+UUd 2gzxVeDWAZNNXRtF3XLIJ/DluisXAyUMeWi0Pvde6NvdJWUv+D0j8fhCW9+a GW7MwOcDfthAsUwWoToH8XMf8M6Uppa4Lg0G/4XxN87rKvk6T4vO0VRPIm+d hWyNJvkXjL/9fsEGRxMJAw8P9jkyub28Mcyc9jnQ72Oj3evtnS1YiXTXvUer RRy7xfnykVZLCzYwMbH2OxMR7203uZu4e4EFA4+N/Hus77KhGTK2uTb3Lzet xH3lK8tGvz7rY8HAn6P7slsPjeJVOPhzWP+LGi89cfGyYNWRCTaTH4s4p/lQ vLFvkDkrP7PyC72mo2SHt/3/UaqIkrOEnEqP/iCxj6rqK0yRrLBgXs0ZC8yH /0pyKJxe5PRnVb+zE8/4DJ0X8hl4VF32a53GXWrxBCWPJ6DeE+172z8/0vnA gIF3jnae8zo84GcDL4jVWjNiacbAs4Sc84srMvaa61KdWMzriMddh5O9Cqqz iv1XmTIt9HaVjIEXDrnJzde8c9bVjKE+BcUrtprOO1/dR/x49Lua13+AnvB8 Hc9/RByM1oeP1ltKP56mfEvKhyt7kdDgZkDrMNXlqh+Y2+JuQHwGyhPyTnmt PtKIfcL7w/M5PM8O+VeQg2ZSVmpLlQlDfhfkb8zzwsBvxry6eX4H5IB+zZIj 3nT/kynbx/uDHW7lPHnkdUDvZZwPX4Y6FbwdJeczg/+K57eE65iuy5+muBPe x9HY+5NFHRpsW0aLVvFMwVNKOJd5eKuP4Iti/Mead1UtzNQnHO177Hbe9/4s wR8GXs7Hqa7HerU8VjoPlo6Gj7kJ/j/wqt4wo5Il+sSDBT7O7ZnqF3E8ZKoz 5fd5ol4Nfafa926Ko42Cngc+d0WQwdUAkYcIPcq4HjFujGuqvChqZEKTeLPA fa4VsVFPkb9Jflnbaab834Z0/gJe4x+d6m8v6s4Bt+s6t1/6QuRfQC/BM/wL B4xFvgn60f1SYbw2tlfkLfB5H50d7HxHe4TmifacrQ0f+ziJ+leYd0R3xtjg mJgv9N7H7Ra/0X6Ki19EbIk+8fkx/iR+H5ek9h5l8/cI/RLPobwk47ax4NtT 3rzZ53pxTTLiUeP/Kr+4+YbPEsG7pntGh6MOobGifgjGFcjXE8gH/e78pX6m iZeo64J2mjX7nYvmD5M8Ke85s7Q/0XCc5IlxVS6qtCuOFnaIediVRbllNYm6 ClS3ICakIfV/8vrx98I3phriVXidWry3h8d7Sb583mcH17wfp2dEdo6/V17M SPq0VPDnMY+84pd79ywRdT6Jv8/PC/iN+WU4ZebWGRrS85DbK61h/snVom4n nu8ubXR0cxLfX6O4WfZq/ePrTEXdG9SZm27PH9QW9UOAd42c9NhqKPIE0X/r pfro91T9ol3IrcXV+/pTld1mqcUrBnm8ok7t/Fuhlh8HXFn/9o/BiaYkB6pb NtTw6oMKU2of+2vr33UE15RJab6Yn3RUeTvNVOSho70Hg5Lhc17CnomPFP3q pdPRok4d5tfD45ZZan5hO/cLaBf9xETeCD7jKb7PRXkzzT95F4eLPCDIZwvf hx9X8yMW3I+gHTwvKezdXq1a9+h8xdezC3dbLB3sRf445BDw5YLUNleRl0p+ 4OfFh/NdNNh/AK/IueE= "], {{ {EdgeForm[None], GraphicsGroup3DBox[{Polygon3DBox[CompressedData[" 1:eJxNnAccV9P7x+84937taJlRIbuQHYokIVI2JckI2SJEKHvPZGXvmZWM0LBJ 9oxIZIXiR/h/3n0eL//X63tfz7nnnnvumc/4PM/5thlwZO8jiizL7qyzrBQ9 LGXZqaK/6ebzKsseV3q8nn2h9BNKb6n0mSrzkNLLim6r+xvzLPtTlcxXmZ+V v4Xypiv9qNKbK32Wyn2ndCfRG3V/oMp+LrqU3ntJ+WfpGqFnD4suJ3q8np2s ZxuJttJ1l/L/EJ2kOh9U/o5K36BrX9VznWgHXb1V5jg9+1Xvn6v0fLV/cd3v oTItdP+k0mfr+l7pb1XPa6Lb6727lbe3yiyj+2t1f7bovqL3Rf6bum+q9D5K T1W6neieus5R+jrRVrqOVzrpnev1zZ6i36sNjyivleh7upZWmXdFV1c9s5X/ gK7TdX+f6NKiW6g9J6rMH0p3E71H+Qfr+rTymFyuOs/Xs8eUXkn0juRx3lJ0 LdX5U+Z5+rjyvGym8h8xVkpvqnRLlRmget/S/Wm6X1Hp53UdqPQPeva86MWV vzlU6R6F3z1S17nJ87ii6GeV+9VJZV5TepTSayq9vMovp2uw7pcQPUj0Aj1/ VdfVSq/BuOpaT88mif6s/I+Vv5TSp+r79yp9iK5/lD9F9GvRDzWWKyp9j+jP MafM7W0q30f1NHT/dua11FZ0iOgJugYq/XzlOdtB9S+ka1GllxOtuVf6LtKi vVX+OZV/NdLDlZ6gd5fU/fKMW+l6qXNzffBd3Zeiu+jZcyqzp+hvKj9Tz/eO eWYeD9P9n8nvbSI6THmn6LqfMRU9Wtd0pXcX3VXXCKWXVF27qv6/Rbso71hd tyr/jtptuF30d9V1gPI2Ej1M3z0g9gLt/I11qGtp3bdX/rKio2rXf7fKXlN7 H5Dejj2lMj3oR+U9wF64RumjVeaG3Pv20UizxnfWNUT3vSI9qvLeZ02OUZnV lddf1wW631/0gFhvfJ9+vqz0Vhq7q5PLU2ZAzN1pojvpGqt0F9V5mZ5vJdpc 1xpK/yX6nr63stIrMOa6hqrP80V3KcyXrlG9U5V3hNLLK71C7EH24vF6t73S V+depz1jrfaM75JeXXVdHmUWy91m5mVdpRfW9azSF1bev81U9kU9fyFzGfgf /O1Y+EztMpTdLHkt/CW6isp8qXRf5lTpv0XP0NVVz85kHYu+oXd6Kr02/DZ5 7zSSv0Ob+NYwldmYfaaxXE153/CurhOS9+NCouNz87sfdH+Kym8kOqf2WmRN 7iW6l5630/W17m/XfVvWc/J+WVJ5M/XebUp/lXntsQ5Z56z3D2I9f6v7bnpv 1WjHX8pbWddTut9Qde1Ne0X/J7qI8hYRXT/Gkz7vl5z/P83btslyYK3kfV0o f2XRPqI565n9ojb8Q3sY29xlztP9B6X5912iuynvOtGOur9V6UrXaZn3N3ue Pf6MaKlrXGaesARtUZ19k8dsGnxc6Qb7Cx5eekxuFz1E902Uv3Myr1pC6Sai HaJfC7M/c/Mf2jw5N885PbPMQebRzw1yp5cMnjMSHqu2dMxdP/dv6X5n0bP0 fMPc3yL/usoy5yk930rtOClkAXzrD2QKskPPJrPvao/DLbqeUv5Revc90Wdr 87F+ym8rmlgzmWU/YwVPhDfuq3pnIUdED1a57eDVom+qzGiltw3ex9rYmDWo /KsLr8kltUa3Fx2pb96kZxepzotEr9X9j5l1ho7RL8YSfvUxcld0Ffgda0pl L8ndTvZLi+AJO4lu3PAe+73y/ocPtEl+t7/K7Ca6h66+SrcRvULl5qvMjNpy pG/My9Ka1z/UlpORwaxHXdso/3WV35E1qfITWPusF10r6Pknolfp6qzvnRzf fU356+Vu9+bwGl0fZeYN84M/3BUyqAEPyb2e2R/nFbFPdL2h/HtiLv9WG1aC j4nO0Deuo4zoX5l1AL79MuOha57Sh6venUQHix6uvGvgMfAavb85fVL+IrV1 o9Gi28de+FXPvlGZV0QXhYfB03RdrPvT1bZnlZ6r9C3Jsu9m0Stpa+F6f1Xe L7q2DH4H39tc9Q3V85NC9v2v8D3p5pq7aSq3muhloXNcovItQy9CP5pVWT9c WM+HI6MK6wmUJ/0hY1KZNy9Te62z5t8VvRe9k2/V1gvP1Bz/U1uXQPb8gu6k bzcrzRtPUJmtkVWsddHNCq/1fiqznb6xiModpTKbKP8G5R+svHaZ87dGdoQ8 /U7XT+xh5W+usp0KryHq3irqv0BldhMdpzqOi2+NgYfrft3M7z6jvO6F5f0L lfXNfrX1w21DR/wV/qBn/dXG7qIL6b2FebfyPmbNU5Z3+uv+K903lE4Nt7tH 5f7NVn5PpfdT+hE931jXhNKU/rIXdtDzxZS3o+hX8ENdO1VuN+PVA1mT+3t8 ays9S4wN5XVNVN6r+k5X6kOHzjwejMvtSo8v/Gwv9pTK53q3S2WeM1/1nh82 Ae/eqTJf0zd4ttrcVbRS+W1E79W81pFuG/ztHtGjc88HczFX9xeis6rc0Sq3 ZuY0uvDd9Jn5jfRlSt8p+jU6NDqS6BG6rlf+i5X3xxnKP5C1q/RLKttE15OF deFF0U8K8/GFRB8vPAfLV85fEr0RvV3phZX+qfQamSL6V+78zrq/t/DaYI00 LTxejFXXSDMmK1ReF8NVz296937Gl31Xmb/B9w6L/KujzitER6Brqcx9um/G XKErot81XM8Dyp+HTC+cXlBn7vXB2hiqsusj32KtPRlrAL6KnnB45v5uofTk 0nTLwnxqDX2jt9q7bOgjw4I/DMld5pbM+nBnXbtk3k/M402Rj448U+8fU/ie MhfV1j3G65vjoi2vRFuGhd7SRt/9XnkPqsyR+tbDhXnrcpXnaFnROZV5HP3K 0E91/YMOKnpqYTtucu13H1bZsvD+6Za5vY9GezaOfPhGHflV8IaxsSZ7hv1Y ig7U9S06leiaer6Knn8MT1V6kK5LQwYdzjrSO++o3CdK760+dUC+K/1+YTsD e+NGlV9H+e8q3V50U12/wHdEN9D1jdIbVq77UF1rZE7zvQ/hrbnTfHdufBfZ tyPlkW/J+AFyDlkM/8PW20z3TdWmC9XGXLTQs/OVX4oeEn3hWwvp/vLC+z2D 1ymdi/6l9y6I8g+io4j2Uj0zlH+x8uvK36YN2Ne31B7vxwInOKiwLgnWgJ04 Uflf691XlF5d6dVi3bJ+v1P+68pfE3mbe+wYt5trjyF1flR6f69bGccYSP8r r1tkHLr0Q8q/ROkXRFetbCe0E22i++XRLUTXjf2Hjt9Gzybpvm3lNcpaZf8s pmfviK6t/Ol6ZyPRfdT3t5T/bcxXrfteKj9Nz9/JPKaM5/jScpn5fbA0f1tf 6bH6/sGsDd3PSuZPfAu+8ZRoK/g5vDHzWI3Tu50y8wJsT+zLZwvbtsjx+aKn q3wrlblPZY4K+YKceUf3d7D2a2Mw4CbYn9BVI41++xZrrLauBU9dp7YtuVph +//tyvLhuNq6TaH8C2vbSuyn9kpPVfpm+qj0K5XtOOy5lyvz79Vq10e92Kfw 8rUK21GTVeYi0VVVZu3C+cdV5vWzcvP+dyvz101q70P244PJfHOdwnz0M913 UP7DovvFt2j/TbXn5TNddzE/9D/zGDAWyPUiuZ2fJOtQHQvrUS8l9xHegTzu FulzVef6vCv6ZTI/PjGZbz9YGGM5tbIcG6n096qzg/K3Ql9R/lVKLyr6mOgy ortrHU2P9tOPNyvz16PRZRh/ldtVZZZgjpRuUrnP9B2Z9FZlPt1R5Y9Bv1T+ JaKDRTfQdW1mm2AxlevTsLyjj0+XphtEfxduGHO6urLuSh/RX89TXTuwt5T/ gNp3q/Kfwa5Jtu+2F+2Z24bRL9sndNphSh/JPhf9sfL4Ms6l6LHJ6ySR1rO1 ld5fdV5UWDfYIDPPg/fBA6fn1vfQ+7BhwZQm6/4Y3a8l+n3t/YVtdYmuI0I/ /DbWHuuOdgxSfhvR/WrjHPuFXXNa8n5pnrxnSL+ZjNNgF7xI/3X/Ze61d1Sy 7pGLjk2WF6y9PzPzAvjAIfpWa9Ff0HvVhjmFedaRyWs+S5ZjyLMVSmNe2JDo /2Bn2LCLiZ6HnqjiT1WWj+htX/Nu8t5slqxPtorx+VDPX8/8bdq7guhByr8N 3oAul9l+b6FrmtLXY0sofWkybtQsN3a0VOWx+ygZ3wJbA2NDH+Zb8J6J3Bd+ fzmtn6bK76/ny6DbM6ehf6KbDcBWQBdSW/dqmJdjW6G7oRtg/6F7jKst29+v jJ+ChWJrbJobS6Vtayf342/Vdb/Snyj/vsD6kAfoGNeKnph7Lk/LjXMOYI7R nXLjyU0jDVbA+u0ZdjjvnqRrjyi/SW6so7XqPys3Lryd6Jq58V/w9mNER1fG 7cHqrhedX9jOxt5eSXREbowY/BccD2yvRdQ/Nb61afQRHAL7fErIQXSXI2vr X+jT8Agwj/VjL7SMd2nnopEPzoN9D36Bbcm3Nosys9W+NzKvMTCejWIclojv joTnxnpC5i5eGb/fXON8TjJeCNZ3fmU76WnRbXJjbbNCjqKPIuvQkdGb4eOf F8Yp7lZ6am7s4qvMejP6cwswFWSY6B4NY+mDlH9pZbtsmcI2Kvg8du7llbFx sFMwVGQV+2JKbdsO+2gM5Qvraa/kxqCeDrsbv8kJojeINvS9RZXuVxnPR7e5 rLL/5USlbxQdoTrO1LWv3r89N54wSc8m5sZ+wQGwAcHI+1a2hcEV7quNOYE9 YVcvqzpOz92X5wr7BVjrPyvv0Ny2wdjQZ9BrXgvdAb34Rz0flP+HmR6UW+a2 D7mAbMTOwH5A10FnRHdEX8WuwtaCFyOLroy5eLWwvg2ecKK+sZ7oa6pnTm6d En3yuWR5gq10T2G5hnz7ubY8Bx9tpftPM+NTc/V8WuE0uh063hrwg8pYz7PJ vgzqHl7ZZ7Ep+5V5TB6DSnSphtsFjjK1tv8CP8ZZtccBH8efuW1DZNZ3MSbw 6HnJmGSPZJ0UXRS99CE9H5BbNswU3T94I/Yk701Bhyqsh6CTYWtghxyKPig6 OLfN8o3ogfl/egz0H32vScPYLxgw+vIHmXV4fFmfxX5Hl0BXxz+zTe15x6fz e+76wZSRzx1Djt+f2zeGXwxbH5ufPdMpNx5Lv8ApFvjHRFsWxm7gffCY5vFd dH/0IvQjdIk5sd7Q2cDqwezR5dBJhojukAdWrPuBlWXKvZX3Cfvllsq8Hp5/ J+WT90EX0ZtV/6e5fXvIBmTEHaI/KH9KYf0bvB+MHT9Fr2Ssds1kPPospf/U eO6fzMPWEP1H19NKryx6STL/Wz3ZdkPuI/+xCdCTsQvwycF3l0nWOdEhD6/M CyZkxhXBNroGj7qpsI74UW7c+vnM2PXhyZjl72rPAXp/eaXvQZ+qrLtUonNV 5ovcutI1hbF59he6LPot+u+5lfGDJ5F9yfpzE/qdrMuBS2DrY/Nj+2OzYtNi t2I3d4HHiHYIHLBO1o9p+wmBJ4AJjku2tbC5sLdGVMaKHqDtDetd6F/YwdjD 2NfTC9uDt+nZ2eiMoo9XtsmwzabzTm6eSl3z2E+FbYknlP+4rhmZdWVscvRo MHQwmEdET06WXUsgR3S/q9JPVMYB2E/gpUOT7ZFFk+2+1qy30mt8s9BbkHed Ys0jw5vG2t4leX8M4t3COC76UIt4vpyuHyrraeC6D0Yd+DuKqJs0tu+0KN8y yrTV9aPqRdHtJto7N09nvX5cWre8r7Tv+u7Yp0cVtmEZt1/QD2I8T6qs5z4M Hqm6PlN63WT/KXsFf/h6yWP8vOpsp/t3M+vSRW3ZjQx/k72b+/7TsDexO78o bV8/UtrXB+66wCcYfODfdLOQ+18UtjXgifA9/JvrBH8bmJsvdK2dj/9zrco2 +uLJ/g3koV7LTkru4/rJeEefWEeME+OFzwUdY5fcvhtsBWwG8O2FGn5vVdEz a3+XfQqPpl3o8NiD+2eOT9g4+kL7b0juC7EH+CzQ7RdS/tHJ/UDfxofMN28T vbH0c/byjcn8/wjqaHhvskc/VN6luXHMt5FDhXFz1vgXmfuGjEPedde1Um35 h28dHx59xX+F/xudDCz9oGT5f1sydv1i8EN0OfgYPqzbw+eFnwvfxLmFy+Fn eCYz71uvcnoVldmtsK8X/vkIOICe9W7YF3hhbj8xfvvbQlfBrt9P9OLaWNWM 6EtnPW+T21c6PrNODJZNfAVlfq3s20bPAfOfQn25fS7gy+DMn4nulOwXuEn9 WDUtgJWym5X+Ej2Svosu1rB/b7OG13Avxi2zfxqfLv7ttmrbBbl94WBm+HO2 yPzNVzP7DllHrCdkA/gZsg2bEQykv+iGtX1BH8e72InoUewNsEswzKWScVDy DxVdvLYtib/u0dL7tE+y/wsf5Z/Kn5B77bJuu9ce5861ffbYCPjwwWSw3bDh 2qhd5+X2i7doeHzwn1ysvF8y+8+e5v3CMT/r5Lav8Ru2Td5bxAUNh98qf47u 1849R8zV1bXHihihIngjej766c4x761rr/m3Sz9vGWXo79JKv6T2bBlrYN/M Ogs2OHoLPITy8MBpwU/hjdMqy4q5lXWMFlHnprE3SeNnwMeDXs46x6+PbUK8 BOu9d+1+0B/9sv8lxxvgK0d+4uNGhhKHQDwScUkta/th8cfunhvDxu/M+BCX Q0wOa/u9kGX9kmOswCvmRpsfg58l23Gtk9uGL5m5Ya2xblgzC0f7wbjg08hB eB/+GfDlG/4tG+uM8escY8haYc3g3z6stu0Gzoa/GRsrrx1/wHjgi2dN4RcE P6Ef3XPbmANVplXpduK3RCdDH8PWwubqG/uTfdq09vhtnVv/Qf8HswY3hlet mJtfMWboDvgBlqi9xjdouL4uwQdGix6TW0c5ONnH2l/0iNr5YID4nrHjiGGA J1AGXgDGhd8FLAt9DNscGx//MX5kYkzAQIjNwuafVNovgS4EroX9vV7tNhyf Oz5jRxZIbrmOHoJ/cUxmyj3xaMwXPgzeXbywnTlU14u17Xp4wneVdUtiHyaW rhudZMt4l3aAbeIPWjewNfxmx9bG6PAh4ktE5iBHkaeDQvfoniwH9sw93thc +LTABCnfJ2TWocFzsE2OSZaxYErMy26xnptH/cvGfLHWWZvIEXgmujFxHnsH H3ux9LiBC2ELYROhUz1b2l+EToVPHb8HfhN0rsFRBv/akZHGnkXeIGvAN7fO HN8CRrVjjD/yhzLsK2J5iOm5srYth00HRkr8HHjJJ5XtmsOjfuxT/GHUS8wN 4/9D6T2Fr5e2vlR6zMHlhiTbhtiDp4WdeHnMFz4t9Objk8cYXPHRmPMNatvI jP/xYTsfkvt99CZ8x+hblEMW8N5ztesBx/2iNg84s3JcHHGPc1T/Gcn2+5XJ 9h5235Gh8+Drebt2TAyxMdeFzvhGjNu9gVmBXYGb4addseF2sgZYC7OQ46Xt rG5hW92h+5m1fbvYWSOTMaUfRM9OljvIH/YcvgDWKH4KdLRVwFJq2xD45hhb 8LE3Yh0hg9Ehp4QPFB8cawm+x34C6yG+66rK40Z55PWrpe3QqXo+p7Re8XJp mwXMCp8QfcVHTB+6h92E//jymFPmFj8pPix8WWBm6CzbRprYDeJWiG8izgk8 rYBXlpavf2O7FAtUvAX+a2yKLSvHIPCsin1wTay9+VEP+tFW/9qwZcTRxrdf jr6AmzMvYC3g1vjiV0WOVPb3Lx99AmslBgDb+K+o58coR/keUZ5yYMlgYLQf bB6/Pv79A9ATS+O52LHbha19d+n+0K9JevflZN/Tq6wTbMrCuP8PwcfgZ2Aj +Lq2aNgnjr+J/oAzjMo99qwzcBL6hw2IkgFf+LK2LUiMxMRk/H8yelzD8S8r NxzjAo8cqzIz9d5Xhf1DKeQhdt8vpeNaXy+th4OTfJqs44B9gpMOim/xTXBR cLCjMu8tMDIwuF9Lxwm+WVpHR1e/DDleek0Se0hsLXWeKvpJ7bjYiyrHIH2Q W+f5uHYM4ikhI5Bp2N/oEugAyOimtE9l96msUxHj2KXhcSaeADsWfe9mlR+d 7Gth7LHlkTPIm31YN1H+2PgWPJn9xDu8e23wKMrDp9B7RyXHab4eOAB4QAu9 07x0HAb4xfXBc5g/5vEKbMZkfAh8jlgNymLjfxs8H95P3BgxNfdX5ldXxRi2 iFgH4hxmhs3eLbMtRlw38hRZz7xu2bAOk8daWyH0DGLQiLUGm8VHeXbsR/Yf cdX4DvBXoo9hZ+Anfz/0sg2S/a3oU9iU8OMrgre8E9gCusr00OXYA/jTiW17 oTSO+GXhmIgPaqffr/0NvgU/hhfDk8EZXo+1Sh/vzO0HOiMzrjhV+W/Wxhuf UZvWbhgfBbNeoH8WbgftBlsAGyfeD4wT/GPbzL4MYjSJuxgdz8gnZo/6ycPn SvlHK/uP2cukwVKmRX9HxXfhb/iO8CGBQ4JHzok0+35WrEmwNDA17KvJkZ4U fIFyfANf9o+FbbRF491FYjxmxphg/76ivrdreC3MjH39XOl+vJisI8BLwWiI ZwCDAotiruZF++nH3Ejj96LN4E34FH5SemPRlwun8QW9X3os7yytM82NsQI/ ZE2AG+IDxxe1dIzTvBj3l6MO/EwnRpmBSncCByuMOV8GfystE8F+wTvAFMA8 SK+OXI61hz6wk8puWBr764OsLf1eb/qr9E/q78aiV5Q+k/B5acx8bOnvExdO G8CBn8DGaDh2C0z48dIxXEvxjczxQcTrsGaIwQajWBlcSHmbx3h0Fr0Gfqey v9eOS67Qb5W3RGlf8Oy4x+8JHklcFf5UMGN8dOgiYE3o/7uoH8vo+bKBGRHP xj3+yodK+1WJ+fgs0g9F2eWiPD517EIwZL7fJNoAlkwanwGxMYspb9faMa34 YMBcwVMujX0Hr/i4sOzGP0OZ4Zn3FnsM7O6P2G+sD7DMGYVjIy6P/bhrtIc4 i10axkaoE3x4bMzL48lnPX4vHBsJJSYSewQMmfZcLPqT2tpU7/xYey8zL/gm h8Scsga5/z3ehXe2CP4MnyYNL/33vktm2izSzYKfUwaMlm8RdwC2RCwQevw7 peM8ifdEhiHLlm4YF0U3npLsJ2KsN4sx5x4MnzhVcOOvsMlKj9O4mB/KEcN2 aJTnXfrLOvyhNnaKfQKWBo7ZJnOMI9hra/gu9ni0nfiBkyuvX8aKuG3sXOIT 5lU+J7FRwxjm55lxwY7JuNnuyfj2b6H/zyodg/BUafsAOwHfx+BIo7NtkRxz y/kb4qLBBAYkyx5kEJgB+Cn2OXE7+CDAT4hTAI/Cf0HMO7FM7AniEMFe3s2N v4CbwSOeqK0rgJOAEb6TG28hzhv7ChsBW+EupZsrfQ+2am7Zj9yn7LQoPy3e BYsYGmW+ykx5B5sZPwH+gv61y/I9sJ3OgSn1En2gNPZJnCg+fPxV+Krwu7Ge iKVFt+QZ+ijjz3c4Q3BQ7b1IbCxYMLgXvgB0kPdyx+HjC30/tz+Uuqlnlcw+ AuJMVxd9o3Zc07INY5qcodhabX86ObaFsxLg6qyRjg37a8ABwAw4W0R53uNM 07lhp+B4AcvgbAE+Zc6InZMbl8PfQUzhY8m+ReJG8B2AAxA3gy1PfOG6DesQ MzLrFOhzQ8JmwZeEH51zA+Dz8BLiHMAekZPgkeCTE5Rux9yW/51JAqMjDm79 hn1O4IvEgRFDf1Hob+jtxGoPrqxH43fEZza7tCwlboizY+eHbkec/E25dcrx MW6MH2fuliwcc3JF7di+9Roen22wkYiDTvZj4s/kzAX2JL4IMHIweuxPsAx8 +eAP2LjYutgt6LStc+87cB5i4YiJaxKyg7UxKMpjj4HpgWF1avjsARgTMUv4 sNA/1gmdhDQy/YNkHvVh8hjMjnHoVltfRW/FL02cDDLiwGgzti5xluRj+2Az oHOgaxIDhq+MuKD9Y82zJvFr4Adpn/yctfGE8oap3PvK277h2Atsi0Ua9lmg 66LzEpOALUSs317Kv1vlu7IWGsYy90E/Kq3voOfAB7Ad7gybC9sZ3Yi4r42C x15am3cT/4B9hK1EzBRxgsQ84EtgXhfEoaAL184fgp1SOraJGJthos0Kx6is qLpaKP2Gnp9emYej004vzSvwMRLTgn8X3y518i6+P85dcP6Cs3Lo4seHvnSy 8psXPmN4v+qZkTsOf4d4TizF8KiTeAtsVPgAfAU7DN3+0OCByCjifNnH4Npg 2sQuYLsRQ4bdh71J7Ad2EBhDj4bxCWJoiJXhDAJ9ZRzoJ/0lBhJbb4VYS+dF /cRnEPtH/B4xufNK92V2cszD5+zFhueV+YUvgIsQc0NcCOfmwEh2Ir6jYX8d 51C/SY7z/zZ5rOjjATFf7MepYdPQf+I0OB+xXZQnXhFbdgd8VfEtfMwjo49g Xt/F+LKfR4bNQswzthM2FHIcXoHtgr3B/LKfHi7tu0U/eDI5FoL9TD/xQePb GhzjAZ4AvsBZTWIel6wck8X8Ir+ZP3AJyjWtnM/8fxIyBdmC7GFdERf3ee41 SYwXMbLEeIAjcMYNvA57c0xp3B59CT8dc9KhYf344dz6Mj5KeBE8ib2GL504 VcYf32l7cObKdgsxusSCYMtNSMZZwOvAJfCpo8sSb3x9bfyN88fYtn9G+XtC FhNbhu+ec0zEuD6SHJ/yaHKcHnwJno2diA75Xm3dY26Mc9/asRmcQcaXgv+J uB8wCnCX7g2vPdb4W6Xt7r9V7rdkfo6v/qkUcUyFsY8HauNfxAm0bFhfQm/6 JvQ+bANiL4mrWqdhDAIsAr8E58H3Df4D/kbM1ZUh09FnuzUcK9U89vewwDfA OTiHQdwFdhN+b/oFj6OP5MPr9kg+e8gZRLB8cHbwo+ty8yN4C/bP96GTYycx x9hKxDLjSyPekjknHz/tQYF3sd7woVEGnYPYRNYUa+v8GFv8esRdcLYEnBc8 DoxvaOb9PD32N/7ZB3LH+3EOHduXWGl0SXyx4DUzIt0n6BOR/1hunAW9Dd1i XO5xRNfgnOZxmf1Z1L9yZj/CI7l9CmAzvIteNzhk/YTaPiliOw7MbKeTBh/A N47vnPYR64tPZuHKOB94JVjfzrX1reG1Y21ZS2BWxPcSX0ecHfuUOFt0Q2xf bGBsUvgxcZzoeOzTWwqPJzgBOAVYwa2q61q+17D/5oriv3ZA8Q2PVt610f7X Sp8ZX6ly+0ZHPnYC9gLxQZyrpTwxmcQgc/Ye39vP8S51MAaj4l36Oyra83jt NuBr4/wB7Ud3xVZg/OkzuiFYzBmZsejXc+M/+MjxlaMD7Rq25K2V/ffYyPih 0NWwKevMco8zn6dn9ktwNg9ViXOM+Kg594dOio+Ke2xN3h8eOh91oAOyx1gj +DTw83L+Dj0ZWxebFx/zmMJxhOTjsyON/sxZS8qPST6fAPZBvDRnton5BOPE d40Pe2K0E1/LvMibEvl9ao8B5205m8cZvZdqxyRzdhHfH34K4vD4DwFiEW+L vkO5n5T5nBSx76zbhSKfMti7d8SY3107ppGzWsRRTc6s2/NfAMSfch4cDIH4 M/4LgLjf+yK9XbST9u4d+cvE3I6P/QUWzt4GV+dsLPyEGIC+0WZUXWx8zl2i o3Mu/qzMPjrwGHAZfBPEr/8c+4i4ZcrjW9mrcLwN32V/wT/GVI5hZo8gE8GG b4h1u03DsoFz3Oi06LOcO0B/IRYT/Pn5oMwbad4HY0Z+Il/p+5WRRs5CJ0b+ nqq3dWWbnX6vUtiWmxX8ge9tome7ge83bMOgsxCzSqwHMR/EjGIDoDvgO/v3 nCpxIAv2UPAB5C7yl3hFzgugGxMrxPkd9hmx0ssFdjM35pF20vYzcvcX3Y0z BmBhnE3+oLI/llhszuaA+4H/YQOCn3KOFRsSLIYYUc71EJ/5ZGn8DpwGfA8M EiwSW6tnw7o1MWCv1JbXd1U+p8Pz1ZJjUIlzBU9EJyemu3XDeTwbGvgO8Xaf hb72TOhs6MxPF44bZuwnFOZpnMsCV+JcKjoeuu57ofc9E3od54DgLStXLkN9 nLnZt2EMEZsXPy3tQJZ9GjwZ2cp8MGf4kBhndBXONXL2Ffyb2EhihkcWPgvP eXDSxEyBkeOfohz7b0SUIR9cTE1YEDfMWri5cjwA8Q3gA7xPefQD1i6xhazl JwLH4LwAvBeM7NHa/AmehewhzuTGwmfYiS0gveA/THLrT+hq70V5+BuxkOSj U6HvFqH/8l3WMmlijsGfkNfbNewL5Kwrvv0F5xxK/y8JPihsgx7h58A+4Lwp jJp2469C3+TsDPYndmjTwGyIhSYWhzNoUGJz0Kk4N7lbw+fCLy0c50DsNGni 67ZuGFO7SeVwBuLTJob0y9L62GOlfRvYnfizOjeMN2E//i16SmZ+/naMP2OF XwedhfZzhoezo8Q7EHOArwf8gXiRmyONDwm7/6ra/BZ8iXgcYiNuyvwu/P+M wrIJW4X/0egVa+Wl3LFAxKCjk+JHuiDZNuL/YQaUjhVhjbRWes/S/p59K8eN ED8yPHQPMKV+yts7d0zGJkpfpasvfCq5fv7rhv9FIY6BuLY/a+t6xAiBf4Cd EbPE/4HwXxj8Lwff37H0mhok2rt0/FAv9ITSeuPFpf+rhDNaa5TWHdEbeyp9 Sul4W+IeTisd67CD6Dal/9eD/y/Bdrwq+WzjC6Ibgo3o+fDS2N/BoruUjmfC R48ty//8dFfeHrnjc1ak7sAc8fkSb4aPeTrjWjpmkzP6G5U+P4cejG3M+Xds ELD/nRseA8aC9XF+6XPu6I9XVvZXoj9wHo0+0190XnRfxpf5ZF6VtQAfwXbk v53w6SN3+H+nrqX7T993Ll0XNh7nBU+N9jDGp8Y4t2VOS/vt8Bkv8B2HzQpe MACZovwTS88Z57iJMSDWAJsV25Xxxae/f+azGJyJABtrJTqKMSt9tqx/zB9z x9gTE8X4E1PA+Rn2wG9hHzFPnAninOVKDcfF4NvAr8F/7bQvrZ+zTokL6oiM 17Wprn6F7RH6u3/MPW3k/6zm1Y4v4OzpfqX/DwXdvEfp/1gh9unk0r6c5+Fj 9Ku0TjKQMSj9PyPwqK4xzsRscRa4HX3TNaK03bB16W9Q/z6ip5fG1MCgwaL3 ScZOGGfW3OGMU+mYMM49jcjivzVCF0JHOaD0uq+jf/STtXaE8tYq7acZHfuR fUnbV4n2H126HbQBnPuF3LIDe+ec0nYL/nLWYa/K9tx1MYbrl/7fH3RcdFV0 XOIYz2XcSts7x/Kd0nFgjAF2E+OwTun/TRiTOW4PHAC+ih1JbF6H0tguuAsx KbTlvGgPuMUloXOeoLwhpc8MUd+lpc/r7IFeWHo8+d8kYlv5rwz691z0kfhT dGb4eBntR04hr5Bb8Dj0NvYR/POM4K3Ei9I27E5waOIEviscDzC7cBp7hrUD f4Q3EvdD/A9+Yc4zoKfz/xvIsNlRnnPBYIDECO9e+ZwNvgziHsAAwCXBrbGv kQesd+aJNQ+fXil4NWN/VIw/Y3126M8nxZ4CQ4S3HRL8jTLMIdj5IzE3zMtZ pXku/JY1fmCsc3yYZ5e21ZlP1gHvHyZ6aOn/TQF/Bs/i3BO4Kv5KcFZ8L2DX /OcJWNeZ/2+Oofx33BaleTF8AL0S/ZI5IGaIOI0/Ks/d87nHce9YN+AQXUW3 L401L/DbhLx7N2QNPJb/tAFfaSvaI7fMQ971i3WFTIX/tQkeyBmJLpnxn5Gh X8FzSd8aa4lzX8hQ5PJe2OOlfaPnJWPI/I8cODZ94QzaMaV5xIJY6cIYKO/z /ybMAfyfNUY+59HYz8OC9/4fniLngg== "]], Polygon3DBox[CompressedData[" 1:eJwtm3f8V9Mfx+/93HvOJyUtlBZtq4REgwYhIqOFIkoSysqKqOyRvckeZWaV vclomJklShSJzITf6/l7nT/O4/t+n3Xv59xz3u/X+/U+3xZHjDtgbCXLsm5F lpX6e0nMsi6q2FPyUZJjyLKp0jtJ/0Z9LlfdYZJ/lrxnNcuu1aBb8yw7WnWT JQ9S+VryNLXXl3yZ+u+s8fuq7ljJL6lMl95G+nGa+2Ppb0hvJflgzfeK9Aek /6g5j5S8uerfld5d/ZdrzmbSN5L+gPSmkjfQmB0lP6Vn7Sa5rermqP1c1bUO 1t+UXlt6G8mvas6HpF8nfSbvoroNJd+nuTfV+CdLP7uX6l5Q3evq86j63yj9 guj3W6X2naS/LLmvytXS60nfU3Kh+S5V/8bSK5Jnquwt+VXN1VLz36z571T/ p1U3VfIzKr/lfp+nJTdS/6c0/g7pE0r/3uekj5Y+X3PcoLrb1f8pvpXkN/XM eyVPlNxR878l/fnU/wqNvYR1lbyD2jtX/T0vV/uVqguSn1X/adJPkb5E+kr1 6yt9nPTf9byb1D5Q+tvSa/JbVfaWfoz0Reo/Tf0f1vsskL6/5KtUrpPeSvpY yatU9lP/46WfJ/kEja8hfaD0BRr/h+rYgDdLf0Xy1qpbLPk2lfWlr1E5XO0t pT+s99lB7d9Lr6fyvtp21nwX63mnqn2d2paoroParpF+suR91D5b7d9ILyX/ rLpham8u/TPNd170txzPXFqf7tLPV/8TVfeV5ntP9XXV/3Dp7xb+3tPVPkd6 b9ZC5UHpF/D+6n+HynqSb1ff3prvTY3PNf5W1Z0ueV/1f1b9V0nfSPKX6v+Y 5HPVtq36/6a/I9V/a56vOdZJP036SOl/S35J5e/c+/FFyU9ofH/Jb6jvPhr/ ePBZe136LtIH6hlz1f9PzoPkk1XqVHyGP1Tf3zXHUdKvYP9K3l7td0mexz7Q +Lv1922N/111e0v+TKWJ+h8n/Vc9Y7709aUPkf6W9H6cl/T9jwnu31Ttj0j/ lL0R/a0uldxT81+Yzsdr0veQ/pP+HqT+jeiv+XZU/zM133DpH6nvA9KnqP1s 6S3Z++r/vtoPkT6Ys6U+NSXfobHbab6d1Oes3N/vY7V9pz59NP4o6WvUp6fq rpY+QHoP2lWmSN5V/bpo/BCN/0zjD1XZX/IVKrum33ui5BW8t/SHpG9cWt9T +hHSv0/n+1eN3UX6d3rewxpzUcXv+CB7SWWy9A2kR8ldVSap/xjpX2C7OK+S j9c82+h97tffT9U+kfXlHdX/nGR/P1ffR1X2Yi/qWS3U/0r1uVbtLZhPdS+y Znre5swZvJ/Wqn036SvUvgw7ofZbsPeSr1G5Qe03SD9Vcv3os9RJcjfNf1Pw Wbleeq+qx++g8b1Vt1TyJqqbL/1ZzT1U8ueqaye9ndq/ZI9qvks1/2nSv9Zc u6kE1X+pugd5htrPlXyC2her7VDpS6Q3w6ZKf0H63ck+jOFbBtumrhq7o55X R/qtah+vug807yJsjPT20k+QXEvt10mfIb2L9HM0X2vpp0vvL/ldlbelbyx9 mfpuqbJA+u7Sfyhs7y+Rfon0f6QfHO17BqjuBskzgmVs6I3Rv3c2tlL69dHn AfkO/aZp6nuz9EOk189tT37VO42o2Ab+gu1X+6iKz9jrnH39xtV8Yz07k7xO 7dtKbqf2PyT/o9JG+slq3lDyKZI7qrTmm3NuNMcJ0jfL7a9pO4lzkbvPeGye ynLsnfRbNMfQir8B3+JkvqvK0sxjOkkeoRIlv6y6IZp/pPSq9H00/90ac6LG 749/Ya/jF1UOyPwOXSUfrdJI8qfpm/Jtj9SY29T/tWCZNWAt8HH4ur2kX4Xv kz4i85m8krMb3MYZ4axg7ztK30ZlIr5WZRz+SeWuaHzTq2Kf+mHyj7PwR6p7 XvJz0XtpWtKx3/0q9on4xquCzy5110h/RvpBmW0GtgMbja0GE4GNHlF738yY C+x1qUq35P/xj6z3hZIPVd20aAyC7d9O+kW0RcvH6vedE6x3Vfu2qX2qSg/J 32rt6+F/eE89v5XKteo/Sn+PUmmY2yZ0lzxWpbn0RdKPk7yHyheSd1ZdqTmu lnx0bp85JgJ09Jskt9JvC6V97xi1nyL5XD2jp/Qfkz2qUdqWHMeZl/yI6tvi 63Lbg77Yb/2tpbKX5Kr6XK/2P9T+PL60tD0chY+W/Jj6bYXtyO0vAbFT2S+5 z/fZqjtQ5XPVDcJPSz6/8G+dKf0Kfmth+9yJc6UxS1W/heQvJP+r3zcEe6NS V/IT6rstvoRnSr5OpX9hPAGueAwfoL7tJS+WXICJMmNGMOq/hW3F4dJvk17R mvQsfCY4G1dJ7sUZlN5TZS/JpxY+q9+xrySfAfaWvlr6mZInqLyS+cx1ljyV NdXYwSp9Cn9vvvvZFT+LZzA3z5wo+SyVzzKfuS0lH1v4WzdW2RrMqXJcwmiX cf7092bpz0Sf/RNVeuS2AWMKz8HY7ioPYVvAE8n/fBtt33fVPM31228s/Azm BgduLvn6wvudff8guBxsIf1zyWuC44vttXZtNP6RaPsL1t5MelOV4eq3n/Sd JK+NtmHYrmacX3yIxl+rMbOlfxL8W25SeVr6UyrXVPxbfsN2gMn4Pao7S22n q2woeazaL1f7qdIbVIwxdkrtYAtilAnY22gsQJ/TJE9UaYZ/xf5r/CTsc/qt +DPawd7N+V5gn+hng7m+lPy0+vyX20ZgKx6W/q/0f1RGR2NOsCeYBezykNo/ z/0MnnVvcKwyT3WDpO+ncllun4fvaxGNLcAYgyXfqv4f5LaBxAc9VLcwdwyz R/Qzefa63PHi7erzCWc1t/88Vnprjd1S80+JxjPInK/JyV6D5YlRiFX+KxxD cD7aRMc3T1eMWcGuO0RjQermJPtaU/J+qrsoOF74RmMvyuwvr04Y5hjVna32 rlqfdqXjwfUlj4g+r4+rrl8whiHGuiQ3thmg9newTXrGR5JPUqlV8TPBf/gP fFmUfmc0/i4lF2Bk6R1UpmWuGyu5czQWJaYYL/ni4Fioig+S/iz4p2Kbje1+ DP+SJRsbPSdzVyqOp9tHxxbEGMdEY2iwNHvkaOlXcv4Kx/NdK8YjG3EWc+MT MAHYgJiE2OQP9rT6naJyn/QDNF9VdcPU50n2Ez5IbedXjF/vUlutzJgWbPsY z2Svqu4Mtd0bPdd4lXui8fmFFc/BXMTgxL6MeTzNx9wBn4f9j45dwMjT0/m9 quI1Y+3wP2DVx9L6DND7dihtn1cH+2t8N7byluD3g8u4Ij2P9WXsOP3+raQP 1PgGwRwBXAH4kniMuOyR0mvAWmAjZnFWo2PVcen776fxS7Xel+FLpD+guZpk tlHYqv3Vvh1nAPwZ3A7WbSB9RDAe4CzhM/GdcBr4jVWJD+kj/VvNv1r6KOm7 Sp9e+owfxPdSeUVyB5WGnE3N8QbxU+74j5iJ2OnlFM8cqDInd0z7f/4imrsh ZiZ2HqvxHTOfkZHSd9fzNlJdN9VN0t/DomMLztzwaEwFtoLDgR/ZItp/g7nO j+ZDfs8dI1zMWVBZjt9Sn5PUNlT64twYGCzM/Ph2fPzRwf2Jjb9T3RGSD4nm WhgzLK3HDGJO1Y1U/xb4W/Bvbox5TWEfg70domf0xidLvg/8Q/xYem1e5RtI rkOd2k/MHVNvUBqbnSD9Nel1S8fL4Lkm/PbSWGON9C7S55Q+q8tYj8I8EPHu x9Lb8+3VvlXFMUmF2ETlg8wcEvHEeqV94/bSG6r/LtJ/IdZQ6SW5Rel4Yo1K D8mNS/MJcBgXEN+Utg9jpb+o+TaRPjNzTAUf0wwOITOHcrHkTUtzS/iEyyQ3 Z89njtGI2bup/AAeln4dsXdhX4hPhC8i7iT+XAIGVfuGKvdJPi03P3BPad+z H/tX8hCVbzPH8MTyrDlrH3LzDXwPuAf29F2S9wJTZeYk4Camw0HkGEDzBfg8 vt9HhX0h63VGZh92X+k9S7y7cfBeBrdiW7GX2E0wJliTPfosXAS4Nnf8s5Pk jUpzj3AS8EHra57r+XaS31ZpUDp2OFXtcwrHlMSWbaQPLX2G4RefKH22Dynd 1gd/G4w/8ZfLpM8sjSe3kb4y+ahWvKP0F1hffHs0H9ZJctuqYx5iH7iHdtL/ 0jvUZC2xH6oLan81sw/EF8KTwEXQZ9+0vqx9e5VDJW+pcp7a6/DN2AuF4zI4 RPjg/qXb3lTdvdLXsQa5Y1ZiV/ir0yX/pbKW+FplYm5OE/52Ehg9N2cCf3J5 af7sDWx06ffkfeF04W//K+078CE4iecSdh+kv4Ok70GMoPkOxP9xtlT3Ib67 Yj5xbmn/DWc1L+2/lurbS2VHyT+q9K+Ys2wqOapskvtMc7Y7quyROT4aKLmv yi169kDpYyT/DP5R+wGSt9D6rtJ611P7LHBx1TwzfHNVf/uo713sIfABuF/6 QvX/BmwNLlb/PwrjsWdUWmrOP6VPItYgfpD8seoaVhx//oBcmouCQ4KPf6Bw rE7MDt/5N/EPeDrz+Xu5NH4DQ8K/3qn2P9T2Enu2tA/Hlw+Q3Knq9W5SmLOG z5pRmIshZtsz+IxwVvjm8JV/BtuL80vzMbWDsS+czAbBMSix6MCE1xdIblqY M4RffKA0VsG/4eceVlkkORbmh94tjb3ATG9LPov9pvZlmTlv7A9c3QTwX7Ln 8KOnSD+ztD3fR/r43Hw75xt8xh5lr3KeB4NlcnPs2D/4rvNy/ybWG+6NPTwp 2Uv4zYvAoKX5aez1zpJ7VG1f4brAl5ck+z0hM/9zY2mbim2F478+nYcrc+N5 cD32HS5sSm7OmHjykdw+A99xC988t02cns4jWBiOHq4ePpBYjD63lvZ5+D6e wXkjJ0Fu4kXpd5T2F3D3k6VPKY13WG/WvbV+T9dgX7dzZo5vCb+3YswEXwOf z9njzHB2Okr/rOKYkHjuM/x/xRz2+5J3KRyTE4sTc8L3r6iYQ8HGtVbbpfjv 3Lj1Yn5fYf73SdZIzzhT8tT0/uSXwO7n4DOwvdFYAt5gc73/N9LXgqXBBpr/ +2juoW1mvAMfyV6rnzlm/Tkaq8xW3VbwndG2n5gS/P5XdC4NG1knml/OC2PW GpJPwy+pfJ+Zo4ObOKZwrIyNIXbfsTA2IYbne8KFX5u+F/5iGPEz+EdyWXXs sLx0Pq5uMBcBx1ov2D7ARzWSvrD0+vBtJ0n/t3SOplXmPQQf8Wbh/Aw5qNWF +ZYOrEVuDhp+Be50hPRxkj9UqV/xNyIfA99BPg5MA7aBA4ELISfzFXurMDcF fgXHwoGBj34qzI29xO/HX6h9peSiaux6nMZ2r5oP6pUZY37N/tRvHJSZs2ss +fnCWGmNxnwv+T3mrTiGJo4H75DrwsZj67GvuJKhufl07GsN6YdJP7a0Tce2 4wOw6fi7uth36aNL8wzDk83Cdm2Gz8zNz4ws7X+nsPelHyZ9/2DfsZXqDwr2 yfjm/zLnHLDPYKP5rGHpOZgLzmdocI6DvX689IODn9dM8u74XMnDVbbNnfO5 R/VbSH8tc93hpTk3uDc4fvh5MCHYkJwS/D/8Hvmwo6SfVJqzfQVbWpjLhb/r nTmeJh8AvtyN98md34L/6yJ9dO78G+9TR/r+0o8q7ZPxzWAE8oWNSueQ8Vfk PvjGfGvWv1V0rLRY7zqaeKpwTgscDh4nnl5VGIeDx4l/t45+F2Lu+cGcKNwo nOPcYA6AdycmeTfYJoN7wb/Y6o7RvgDM/15wTEhsCIaeF8wJYLvBxOQHyWGB i8HH8Plw+NhybD75SHJgnC9yoruqfcvodyGnsls0PwFPOibp20b7JmKK9zX2 tmBbBsYnP3JTaVwOPod/uS/YNpGDJh+5XPr9uWOa/yRfGeyfyNH3UfuNwb4J zE8+5TqVC6RfqDmblM6f4NuIIcjvvhWcG1yoUjuan+Hcj0i/h5wUdgH7AL8D f3ZP5pwa8fGC0n4X/wvfAaZ5ofT5Buu0rzqGgPNaj/yW6iZUbJP/Ah9En1/O Me9HjhbeGf6ZeJKcN34Z/wwftHvpc8P5qURj3H6l8w9gX9YDX/Zo5nwZfD2+ lJjoixR/kssFYxBPwjcxNzEM+UdygpxTzmsWzefw2+7PnF+ET4P7giODK+tQ NYaeq/ZaVXOMcI0vqXyq/qcEnxU49XeCcyKD9VtvLswHk/Mnv0FOv3lwfp/8 PHn6wVXPwVyb6e+QlFvAl85O8eimqZ1nzlXbPJWVYK+K85/3F85v/aTySeF7 GNzHeF2lRbC/hntdrbJTcAxLLDuv4vzXjsFtzMFc3CngbgFndvvg+Jh3AXPP TfZ6VsU+Bl/zTvT9DO5qHFT1/uaOBHuevc/8DTNjBp7fuvQ9lS8qjn/AyeDl dyq+H0J8RBsxArECmHt2aX8AFsdn47vxUb/AL2iO/mqrkTv/Sk6U3AD5EPb7 etFYuZP0xpJXqr1z7hiD/TU+2FbC8b+dzgtjR4O11b4p31P6gML5g1oq72BP VddEciOVF/Fn+JjonCq5Vc7QB5prWOm8JTmnjaNtIrbxKpWekjeL9l3kxGdI /jvYF2yR+35BvejcDe/AuzRX6Se5rspL6vtTcC72COltozlyuHJi3oVq+xXO AftX+P7EwaXjJOKlptH8LmefnMsbxFqF4xLiE/hj+HHOBhgB/hu+nbsAKzPn D8jPcRbZ0+TvGkTjoiMz5xpYE9aGmLBhWi+4LWLgb4Lfg/htGz1zeub7R+QR 4XrIEXC+iJ/BHv2q9sH4YtaceJf1IbdzE/sh2D5ji7smfwF/ha3pkvwFfCu+ pl/yB5tH56K2See3reSDVSbrfVZk9nn4Pr45/pc14515V9YXfwN+AWsNqpov xrftk/zXGRpzUu4cIXwK9zPgUgYn/7BdNNcwKPkrvhPfa6j0toUxIliR3BH8 A/uC/QFm2L7wfQ1s+WWZ88lwbODjxWobrvcZF5zvWiL9sKrvD+AL4FjhWrnP BTdBTm4O+DaYGwTbwVWeKH2HzJwo3Gi76LMC17V3ih+4H3BtZr4MTAW2wl7C N4wO5koX8b5Vc3rEz8SCuyb8vi5zjIm/4Exxts7LvL85s5xdMFuNaI4VrpXY exi+W39H8e01/4HSG1ada+GuCvaUHA/8FtiRXNCoYG6RWPdQ6XtFvysx9cvB v4/cY4dkD8hhkMtonc4H+RXOhoZmL0j/NpjrqJX7/e4Ojr3JOZB74HzCZfMN +BYLomMtzvR70Xdc4HDYzxtVjaeI0yYnf8+dIuJEfBz56IWFeZo3Ez4YpvJs Zo6B9wFPcLcJTn94MGcOdw6mxf6QP8L3wRnDHXMfpEXuPYetgO9flpnTI3/A nTPicOp+D47xwczcHyL2nxXMFcIZXpD0AzPn+Mj17aD+r5bmJ8h1rVX5MTNm AbvASRxYmtOHqyAOIh6aleKBH1U+UtvfKv9KXj/6bgU2HFvO/RKwEFzPvpqr V/TagFl7pu8BPwNP00ztefTewqfj279P/gnfeUjCrsQrkzLHD5wTzst2mfPF 3F/iLhExxoxkz3nWx4WxL3ucvc47rwr2F9hqnsGz8EfsFWIK7irxPnCf2HRs +xGqezcz5ue+CvtzRu47VSuC7/PVzp0D4j5KzarjITAwWJj7MNgKchw1JfdV 361Ufpa+e+H15zyA2dqn+zXcZeObwOeQ05iafD+5DmxI/+AcAbZlveDcK3du mH9e9N1ObMD8aB1s0Ud1k8FmwfdtfiXew5cEc2V8k8ODbSZ3JsHs2FJsOLb8 vYrPB+cFmTmYizMOZ8v9N87+kyrvV8wRfgB2Dc4NgoEWRdsAbMH/76+p7anC uSPyO9g0MNhHpfEZ2Iw9zF6G2++gcnrw/VXusbYLvm8KtgLzgH3mRmMXbCa2 8/5kn8iRkytvlThqcgah6v7YAu4hMB+cL7wI/EiDqjmNfaXXLcx1kA98vfT9 Nu7a4b//Kp3jI9cHRwxXfITaN6w6p47fxH/WqBqTgc3Olf5icM4eHoSYo3HV d1qfK82Xk9shf8YaYfM3lvxgMNeJzcZ2wxnBHZGvjVXfuW2Z1oS1YT3BtuQT zojO6ZPbJ8dTu+oz1jnYn3IeeL+1aX7W8/zgu1l8U/gkbPYnpXPy2HJ8DnfA sNHtUjwChmQP1qsaL8LVwvHUqTofS24ajv3zFK90L73fOQtgCu6cguHBGtgQ 7rySX8G2cD+LO6fwr7dG5xzIPXCn+LVozgabBX/B3SP2I2sDJwY3hs8sk0/G lxJPcSeV/AN3I8nPwivBLz0RfWeTO5lgBLAC9wd+qBjzfwH+UllacQ6EXAg6 ew8M/Wn0HT14PHwM521xdGwAvucuHHe226ht7+B8Od8D20efr6Ixwj7BmBJ/ NTs417V32n/c3wJrwBHCFWLfB1AHx1b1+fuxYs5haTBnd07mOs4jPnv34Jwq vpw7462SjSY/z/0IcsMkiZZGx5jEmkvT75ua/D1rwn0KfHjf9JtGpfflrCzE JkTb/LalfTK+AEwzq/QZ5Lxyf2D9wpwh3CHnZ7vSPm1N2u+1y5Qjjp6TubdJ 9oF4lZwF96d/CL5zsjSzTwX/c77IGWJT6lbtv8lZghnADvj/PDgfQm6dnAM5 C/AUuQi+B9itNnFfNMYH63MHlPx4p2i+HN68XvJpfUr7FHwLOV1yu/WD89/Y F7hTcrBNqrYfH5S+w0HuCXv0Tmk+nvPSXeP+rDim/6f0nsKWdwvea8QL3Gkl hiGWIb8Od8CeZm+T/5xZcY6CXAXzcb+TO9E7B3NCcEP4S/wm+RjyL9xp5m4z +buRme0ddg97WrP0nQHuDnCHmvt0nEfOJXfwuY9A/n9D1jP4ffEf3P2EX72r 4pwKuRX4xh6Z35H8LHfUW2a+k8qaEXMTe5MjBGNypwD/gY3EVnIflrtvzAlf yx05cqjgffL/3JHhrgz/MwG+flxtG6TvuSRh4val+XSw8k/gm8J3jidIPyv4 LkGDwvEu7dhmclKro/EQXAl32LnLTo6OXN2faX2JmYmd66f+4CNiTzgmuCZy OuRB4IzgjvD3xA6NeAf1XRH9rtwh4C4B/gD8XEN130Xz6Q3SGp4ZfL77JJ+x nGdHz7Vl+n3gyc6l73hyXwgfVzf5G+wj90WI5bnzwN0H+EHu4MMJwg3C3+xW OqYHPxFfw5sSExE7428eKn0ng/sa+ALWimcsI7YKti1w+twX544iZx8bgE3k DHOWwVwvJ3/ZO2EW/PlM/d0krQ/rBH4lt9ZE/TdI9gasCf6uJv9IzhBM0Khq Dgsu60jV/Sn5f3lwWdc= "]], Polygon3DBox[CompressedData[" 1:eJwl011oz1Ecx/Gz5+cN2zyGTVktSVZbwjBt48I8jNGIcLFyY2pRNrtRFBfu pMSF1qKxmWyZPNXaSpO5GKIWauRhZi3MUsrr1y4+ne/n/f18z/mds//yD9dX H40NIRRRAs1JCiFPsZjq+AvWLhqPC+FpfAiV2Fn+IKWpy6wbab65Q9Z0LN+6 hOZiHdbN2GLzu9TFWCqV2us6DcWEcBU/kDB9/lKsgJJk3ieG0IcV8iWaH/hM vIvvpg16zfgpWq/+6owePEvmhOwsF3sZnUE5WBOWiy2Sf4U18qfVFWZHzT7G Zsp9w2rlxvkKSsO+yCbLbNKrpM98wFdh+2Un5LbxK/AGd2rkiyg52g8rEL8t W2V2lB+L3hi7hS2X+8Gfx4vtNcKnUoLZn1ieXLvcNplf/F4adsZNmb/4E7wV O252KnormsR2UL1+Kb23Rw3eI3dRLkUvKfrb8ln0Vr9bbqdMJv8xuh+/TqYf O8J/j94fu0v3sDo+m0ZFy7GT9If/TfPUdyjefCd/zrpdbsDcM8p2txb8mG+5 LLeHJqNz5XrlqmS2ULrcPvyd+3bw7ZSBNciVyH0yt1W9ANstNyjXKlNOgW+K 3gzLsWbTbLk4em2ulZ7r1cid0Ssz8sDcQ5ohM4I9CtP/GDGUi8XThLkBiqVP Zq9Fvyd1i7le+1VjQ/TS3ZbpZeCJ5trVC23XJtuG1UbvhK/BC2lQ/gXWqR6L fo9x098Ufdtw9M76g9gbs838FL5a/Y+a9G5g/bRSfV8uV7+Pv2S9gmVY18qm OPM//yl6mA== "]], Polygon3DBox[{{1793, 831, 622, 1271, 1219, 1810}, {1694, 606, 825, 1362, 1264, 1693}}]}]}, {}, {}, {}, {}}, { {GrayLevel[0], Line3DBox[CompressedData[" 1:eJwl1ElsTlEUwPHXVkkES5uW6iCUEvNMFVUtVTqh1aLUULSoqZN5Hosai4jY 2IpIDJGIWBBbohKJtY0IYqiW343F//3Pu/eec+5333tfclVdYW1MFEVxLvkI cYbLY66Ij6JeXBQbRS+4wPgKY/3Er1El7s/VnMTd3MnpqJHznlviomgPCrEB U9BhfCr/6hlFCWoW94iiD8YSxQnGS9Up5YFoxQxcQQauIhMxNnaai0NvXopB OIfteo/g++r91eOg+CSSUYYU7Ec5tgarcZPjrL3By+1lW3CohXqMwk7sQh5m q13BS+Rmh3MRz8JujMYftRp4DuaH9RhqXSKvRKL9l8hNFV9ANvba9xh+aN0h PoU0rMJgdKmZbm5A2JvcRl6AHGNVnMtz+Yv9vxE3cpaz7eImZIq/8ltzzeF5 ud+v53dxubEWzuNv/I5v6dEgTrXmM7e7r+c/aBNv4g5zn/hAOFs5lbyMc3kH ftvzXfMpxsrkbAnzOI4TOIYH5kaGc1Yri89jJmKdUXs4Y1zDR3WSrN0nnofp qAv11B3OtZiGkvA+WNetd3HIF+fwZmzCMNRgI4rCuWOs2tdDXWfSKu6Uu979 YqzDWizCERzF4ZCr7z2108MztfezvIIL+BImIXxAF8P7b+1kvhzeA7RhIs5g Avqq01vPV1L6iJ/zT/fV5oZgTfhNaoznhWhCM/KxGuPwTM4dlhb9wG1xfHjO 9uRnRWkuT8O3jkrxCH2eiF9ybHhGxh5F//8H/gHk93G2 "]]}, { Line3DBox[{1373, 1470, 1569, 1623, 980, 1568, 1706, 1707, 1570, 1617, 1624, 1858, 1441, 1618, 1559, 1561, 1560, 1507, 1813, 1842, 1442, 1709, 1708, 1710, 1443, 1374, 1799, 1821, 1444, 1620, 1749, 1882, 1750, 1738, 1758, 1445, 1508, 1804, 1850, 1541, 1784}], Line3DBox[{1375, 1542, 1705, 1543, 1533, 1572, 1621, 1795, 1852, 1571, 1600, 1601, 1511, 1535, 983, 1510, 1544, 1562, 1545, 1512, 1849, 1536, 1622, 1446, 1619, 1608, 1609, 1602, 1447, 1376, 1818, 1822, 1766, 1448, 1377, 1816, 1823, 1449, 1739, 1881, 1471, 1626, 1688, 1450, 1689, 1690, 1546}], Line3DBox[{1378, 1509, 1740, 1759, 1760, 1883, 1513, 1547, 1563, 1472, 1566, 1537, 1838, 1803, 1514, 1610, 1473, 1516, 1094, 1538, 1515, 1548, 1611, 1474, 1691, 1628, 1629, 1627, 1805, 1824, 1711, 1451, 1379, 1885, 1767, 1768, 1452, 1380, 1859, 1625, 1453, 1665, 1475, 1630, 1692, 1694, 1693, 1871, 1792}], Line3DBox[{1381, 713, 1328, 730, 206, 1169, 405, 708, 137, 1268, 611, 210, 313, 138, 314, 211, 1068, 139, 485, 1201, 484, 1382, 1886, 778, 1383, 480, 1243, 551, 140, 434}], Line3DBox[{1428, 1763, 1529, 1704, 1528, 1847, 1427, 1502, 1683, 1501, 1841, 1684, 1426, 1500, 1594, 1048, 1605, 1425, 1499, 1593, 1498, 1682, 1424, 1737, 1879, 1658, 1659, 1657, 1423, 1866, 1661, 1756, 1660, 1757, 1422, 1815, 1880, 1497, 1721, 1496, 1722, 1421, 1555, 1783, 1788}], Line3DBox[{1435, 763, 1606, 416, 1857, 1434, 1504, 1596, 414, 1433, 1503, 1595, 1870, 592, 1432, 706, 1663, 1662, 1431, 1801, 1837, 1530, 1430, 1051, 1685, 590, 1429, 1848, 1820}], Line3DBox[{1440, 1615, 1664, 1616, 1599, 1607, 1178, 1439, 1506, 1598, 1687, 1856, 1686, 1438, 1532, 1597, 1855, 1802, 1437, 1505, 1723, 1725, 1724, 1436, 1558, 1117, 1531, 1557, 1614, 1556, 1789}], Line3DBox[{618, 617, 1697, 735, 1873, 1393, 794, 1781, 1712, 1872, 1394, 1773, 1832, 1819, 1395, 1633, 1634, 680, 1396, 556, 1867, 1575, 1482, 1397, 407, 1576, 1483, 1398, 1868, 558, 1668, 684, 1399, 783, 1772, 1638, 1861, 1400, 1741, 1319, 1401, 717, 1521, 1833, 281, 342, 895}], Line3DBox[{234, 637, 174, 761, 1274, 632, 535, 1239, 536, 173, 1153, 383, 172, 382, 1152, 171, 581, 1256, 526, 1420, 1875, 663, 664, 170, 1081, 232, 324, 886}], Line3DBox[{1534, 1517, 1518, 1843, 1384, 1779, 1780, 1888, 1385, 1631, 1632, 1199, 1726, 1386, 1695, 1761, 1476, 1696, 1477, 1612, 1387, 1603, 1023, 1573, 1478, 1388, 1667, 1839, 1479, 1666, 1480, 1728, 1389, 1356, 1635, 1769, 1636, 1390, 1770, 1771, 1887, 1391, 1519, 1574, 1520, 1876, 1727, 1392, 1549, 1481, 1787}], Line3DBox[{1539, 1613, 1540, 1524, 1554, 1851, 1491, 1525, 1718, 1719, 1717, 1874, 1716, 1720, 1468, 1418, 1648, 1765, 1796, 1864, 1679, 1492, 1652, 1735, 1840, 1736, 1589, 1493, 1591, 1232, 1653, 1590, 1494, 1592, 1655, 1656, 1654, 1812, 1831, 1681, 1469, 1419, 1846, 1526, 1701, 1702, 1703, 1527, 1114, 1564, 1495, 1565, 1786}], Line3DBox[{795, 956, 62, 563, 957, 63, 788, 64, 958, 65, 1213, 503, 66, 1144, 365, 67, 366, 959, 68, 567, 960, 69, 741, 961, 70, 723, 71, 1072, 223, 896}], Line3DBox[{1785, 1551, 1550, 1844, 1402, 1714, 1715, 1713, 1731, 1877, 1814, 1403, 1775, 1776, 1774, 1834, 1807, 1404, 1777, 1835, 1778, 1405, 1806, 1860, 1637, 1730, 1729, 1406, 1669, 1853, 1670, 1577, 1484, 1407, 1171, 1604, 1578, 1485, 1408, 1672, 1673, 1671, 1733, 1732, 1862, 1409, 1752, 1753, 1751, 1836, 1809, 1410, 1742, 1743, 1817, 1884, 1762, 1411, 1744, 1745, 1522, 1553, 1567, 1552, 1790}], Line3DBox[{1791, 372, 1583, 1800, 1829, 1523, 1463, 1415, 1326, 1748, 1464, 1416, 1863, 1641, 1764, 1465, 1676, 1488, 1649, 694, 1878, 1584, 1489, 1586, 521, 1585, 1490, 1587, 1865, 524, 1651, 1650, 1680, 1466, 1417, 1811, 1830, 1755, 1467, 1678, 1041, 1588, 437, 906}], Line3DBox[{1793, 1810, 1845, 1454, 1640, 1639, 1675, 1455, 1412, 1825, 1456, 1413, 1808, 1826, 1457, 1674, 1797, 1827, 1642, 1734, 1458, 1579, 1486, 1581, 1643, 1006, 1580, 1487, 1582, 1646, 1854, 1459, 1645, 1644, 1677, 1869, 1460, 1414, 1746, 1754, 1461, 1747, 1798, 1828, 1647, 1698, 1462, 1699, 1782, 1700, 1794}]}, { Line3DBox[{766, 646, 1710, 649, 200, 1602, 403, 135, 1691, 603, 209, 312, 138, 315, 212, 614, 1696, 141, 488, 1634, 487, 952, 1835, 787, 788, 508, 1675, 569, 160, 436}], Line3DBox[{930, 1061, 1062, 1821, 931, 1345, 1346, 1822, 1347, 1348, 1196, 1198, 1197, 1824, 1282, 1283, 1021, 1068, 1022, 1183, 1134, 1170, 1023, 1135, 1024, 1137, 1246, 1867, 1026, 1245, 1027, 1206, 1860, 1204, 1205, 958, 1005, 1825, 962, 1073, 1146, 1074, 1829, 1075, 1110, 1042, 1371}], Line3DBox[{932, 460, 734, 733, 1882, 1315, 1313, 1314, 1823, 935, 1349, 1885, 1350, 1351, 777, 1201, 1200, 1244, 554, 1839, 1136, 1025, 1138, 407, 1139, 1028, 1141, 1853, 560, 1250, 1031, 1213, 1211, 1212, 1826, 963, 1325, 1326, 1327, 728, 1076, 1851, 289, 319, 882}], Line3DBox[{1058, 1015, 1131, 1192, 980, 927, 1016, 1132, 1133, 1852, 982, 933, 1120, 1127, 1121, 1065, 1334, 1883, 984, 936, 1335, 1336, 1328, 987, 940, 1069, 1843, 990, 944, 1330, 1873, 1331, 1285, 1286, 995, 949, 1107, 1844, 1108}], Line3DBox[{1060, 1329, 1059, 1279, 1280, 1281, 1842, 929, 1102, 1119, 1017, 1125, 1091, 1849, 1092, 1189, 1126, 1019, 1067, 1094, 1095, 1129, 1105, 1182, 1020, 1268, 1266, 1267, 942, 1298, 1199, 1269, 992, 946, 1832, 1358, 997, 951, 1834, 1208, 1001, 957, 1303, 1033, 1217, 1218, 1271, 1219, 1845, 1364}], Line3DBox[{241, 640, 183, 1723, 670, 541, 1663, 542, 176, 1593, 384, 172, 381, 1592, 168, 579, 1680, 522, 743, 1754, 722, 723, 154, 1522, 220, 317, 876}], Line3DBox[{1087, 1057, 1177, 593, 1856, 1164, 1054, 1161, 414, 1159, 1050, 1156, 1841, 588, 1260, 1238, 1239, 703, 1272, 1078, 1846, 1077, 1149, 1041, 1254, 576, 626, 1700, 923}], Line3DBox[{1089, 1086, 1191, 1085, 1855, 1162, 1053, 1261, 1052, 1870, 1262, 1157, 1049, 1155, 1048, 1173, 1154, 1047, 1153, 1046, 1258, 1257, 1831, 1235, 1236, 1234, 1333, 1332, 1830, 1227, 1226, 1228, 1828, 1037, 1323, 1036, 1324, 1072, 1109, 1361, 1369}], Line3DBox[{1096, 1270, 1097, 1130, 1106, 1833, 1030, 1071, 1337, 1338, 955, 1884, 1339, 1321, 1322, 1004, 961, 1224, 1007, 1869, 966, 1307, 1040, 1229, 1230, 1865, 1231, 969, 1044, 1151, 1232, 1233, 972, 1045, 1152, 1308, 1309, 975, 1310, 1237, 1879, 1259, 1014, 978, 1837, 1084, 1293, 1294, 1295, 979, 1117, 1123, 1056, 1124, 1372}], Line3DBox[{202, 597, 1689, 21, 549, 1665, 29, 1383, 38, 1390, 48, 1399, 497, 58, 1408, 364, 67, 367, 1579, 76, 571, 1676, 85, 1418, 94, 664, 101, 1421, 235, 835}], Line3DBox[{1118, 1098, 1188, 1099, 1088, 1186, 1187, 981, 1858, 928, 1167, 1168, 1064, 1090, 983, 934, 1103, 1128, 1104, 1066, 1838, 1093, 1263, 985, 937, 1180, 1181, 1169, 988, 941, 1359, 1888, 991, 945, 1284, 1872, 996, 950, 1877, 1299, 1300, 1209, 1210, 1000, 956, 1366}], Line3DBox[{1278, 1184, 1185, 1166, 1179, 1178, 1165, 1055, 1163, 1176, 1857, 1175, 1174, 1083, 1158, 1847, 1082, 1277, 1340, 1341, 1274, 1276, 1275, 1080, 1113, 1273, 1114, 1079, 1112, 1190, 1111, 1370}], Line3DBox[{1362, 1264, 1871, 1265, 986, 939, 1296, 1297, 1243, 989, 943, 1357, 1887, 993, 947, 1207, 1861, 998, 953, 1301, 1862, 1302, 1215, 1216, 1002, 959, 1035, 1145, 1223, 1006, 964, 1038, 1147, 1304, 1878, 1008, 967, 1305, 1306, 1255, 1864, 1009, 970, 1292, 1875, 1010, 973, 1311, 1312, 1880, 1241, 1242, 1012, 976, 1360, 1848, 1365}], Line3DBox[{1363, 433, 738, 678, 1876, 1070, 994, 948, 1319, 1320, 999, 954, 1836, 1214, 1003, 960, 692, 1225, 516, 1854, 965, 1039, 1148, 521, 968, 1043, 1150, 1840, 697, 971, 698, 1256, 1011, 974, 1240, 1866, 1013, 977, 1051, 1160, 392, 908}], Line3DBox[{1367, 1115, 1122, 1116, 1081, 1291, 1290, 1289, 1287, 1874, 1288, 1344, 1343, 1342, 1221, 1863, 1220, 1222, 1827, 1034, 1251, 1253, 1252, 1144, 1032, 1143, 1172, 1171, 1142, 1029, 1140, 1249, 1868, 1248, 1247, 1202, 1203, 1356, 1355, 1354, 1353, 1886, 1352, 938, 1194, 1859, 1193, 1195, 1018, 1881, 1316, 1318, 1317, 1063, 1850, 1100, 1101, 1368}]}, {}, {}}}, VertexNormals->CompressedData[" 1:eJwUWnc81n8QLyNSovKjSCiyK0XK6JKtojKSrOy9N2VG9kwhqYxShKyi+th7 7z2fh+d5rEoUGr+Pv57X9+4+d++7z9197l7wmDjeNKfasWOHMd2OHdT41/N3 QeDtjDlo4Ah/x/18Dj4rM15wG46HHuOZ35/JJHh/ibTn8n8EFJpt9NjhqC38 cV27mSVKQufjuS+KrBOA7ZimuPAzF3COSry6xkRCn+JZ9185RIQL+SL5Ap+t QPPQTXGGP/OoiOnMxw5RInjtRlYBqhYg6x7SxzMzj9LXnycev0qE/3aZHhdt N4PX1PWzWthew93wtnfYvmqy7igXtvtC26HeAOMUC5b8yYtxrufKjsznx4N5 ya/YTyQy5D8UKQlonEH0T1Us/327B3r07kbrGSSksN+n09qRAHWDWXUBj5xB lOZS06fzJNTKFyxjSybAD6F9tV5U1vDPOz5SjI2EBvxomRiYifDzlN+6moEF hJXIiPfSktCd/taXQ8eJoArfLp4hmkGEPdtB1gNEcLC75Kz9Hwm9+ae6OWXr Anm3RWK2cWidnnu7jetHai83BeNJ1aE6YIzxvzZVv8SP8XNpPfQyTo6H8mlb Yy1ZCiJxfJqO2T8Nt3e5yBESW+Daz9mwY7xkxCv7+8Nc6yzMVxcOUGpdoDZ4 hC08jIS8En8L1EcR4H3hPZpYMyt4/OpqhQ2Q0N860sK7aQJoqV0ZbU6wgHdN 8oHNnCTEur4z5j49EaJ83C+2zpsB7cGv7Q1mRLgysnyfqW0emVWONXgdtoI7 iZPt+k4EyI2+USaC4+cXcWx/SqIzWNOkhiVifA8IJc6aGK+SSfOFWozTJLUo 5kPaHDQVjZYGPJ0Dv+qhb9ZiWdD6wOpmTc4C4rQ9foeKfQoStgwVw7vCINki MZ8ui4ysnZPyjvLNQoFc4crZYheQnmjsWZkkoV/HdAWseAjwN2pStFnXGk4q e5WZ+5KQgOfmeek0AtxeNx06t9MSonnv1trJkxC8fyVOP06AUwp/JqVpzeHn qMuemmginGbMY9rMmUcsQ/G7klPNYYhqd/GtTQII/UcQYhUiId6F1y+chqzA Qn2nEAnH991/D8x5cLxHNNDTYRzntC5Tlb0Yd+i+sqhP2I/Vp4pyJhh/1s9J bmLKHPKg947PS51DATfLapdWXsGlK24PxMwX0RKn117hwHFwOkpspxsLhOOs 4bsqjlKQRJnCTUO/GZiZX1w2SnUGsT6ykaMkGXFcUFE3KJ4FNiNhYqiFDXgZ 0tO5fyahM8VHjCqv4HtwZ1s4GWUJhxMH6BndSOhjrbvhj0wC2NL51TyVMoeG NdtJ8Rych7I7Yp/GzaPxUwVE7XNmoHy1TzL4IhH6mpQ8Li3Po5KrabJs/8yB YcBqNDqGAJy/ss0ZQkmoQCCYDxlZgdZXyTROfB8mFT3e9Ph+4i/vqufH9yJz u6HwKvZn12ZhswD2z3Nd5evMaCBQpSf7tKTPodMnhbQTns2hnQc/cW0Vp4N0 Lot1EeMSWvM5/uZD9wiMVlxp/12P5YP+DBxIoqCFKuX03T3ToH09hFoLOUPA 3NLj2igyOsdYs0tMYRZm2JSszgfZAtVrtqWafyQU6ffFYWBjFmSrxTi7eKxA 3Cn2ue4bEqITZaslmRBA/KxummipPTRSnf/GY0mEqyVGAT+a59GJt7O8X+zM wF5q0MpxmQCpzSbvrMVJKJBrs2zO3QLe5lkRHuA8qzAbrBnEeZcqemzZEOfb nR0edEb4niqoPUI/4nuTvTrw4Tq+r7MF8XwU7M+7C3f/ZWP/XlhF8XRjvzwt qUyLsP83/H/re2fMoaePc7z+JTwGxVfjnqIvltCDpa8MBKEhOKz2sM5kKAAi kyfd/lAvoPBlG9YHJ6bh6Zbsm1yCM7j9rVRomSSj9F6RAY6+GVAbv2l4KssO Wi0PcdDLkVG+eUc586tZYDzU+satwgqqWrtUPfiJcPFY660sKhJi8ThMEn1r BouXaN6mphOARVNGzsKbhJ79vf9bfssCOk49IurjPLs521K0nXeHPWcnXXC+ +VuI3NuL76Nes5nMjO8nIpH54SV8L4v2/IsnhIdgH7/4ABf2wyQv5MlZjH+Z PGLBhv1st/CjmcS/O+8YH/uolgQqmg2NGdzLyITBc30prh++RcScCGEKgM8K rJnWDgsog0H1tJjPFAwKPxj59MsFki0tpzxPU1Du3rEvMqYzsLlzt2FavT2c zNMhMAaSESgapBRpzgK7c5rOnRvW0LH1zEhlngCvFdJePJHCfeL7mX3LFDOI cukR2H+VAElBNjkncd1Q/0orPhdpCez/oQ+ncD690ZhKrMP5lXL0yhM+nFfL fDIeETjuL9fe79nE93A/iL8tHsdf497qI/n4fkiOyPKIw37kqatr38T4t84V yd3Bfoqy3I8/9nwOjZ74r3SzIR5oLF/aS0UvI4rn3QRjul4oIjU/MWcLBJr5 gtWbvQvIq0Xo91jqJLRcODazSOUGLEdpBmvvUxCHx3so+jYN1pERVkenHEB9 bWurCZGRarTG8fZ/M5Bb47x6dcYafq+sVmfkECAmzWKj1ZmEuh5cLvAWNwea 24b9E7gebj2rOfcJ18eSbhBHJq6L3aoLMdt5M/e00Gs7jz4sqD9hw/kT1W1m cgHH/Wvj0XIzfA8uJjk0GTj+X/441jdj3JvWNPuEsB9W0SYbwhj/aNLtd/id QofnhmgFsL/NdfJHLsfGQ2ibwz1f0jJ6sluglS++C0R1AsI/MQYCnV7awcoz i+hn6vq3M3IToN8itVn/1w2YXm3qvGqhINfWn4XJ/tOwwWjZ3LnkCIWSDoLi f8hIweBAptPbGTjOGORlamkDRqWsR2l3EpDT5+9BTJskWDpSz2xULwHhyo0N TDjvVYw+D2zXwYwaWBrj/D8p+7JWFufN+wlnwe08+nw4uOQezp+n0kL5qzju 3HWJQVfxPTScoUVNOP72id/pMjHuvd4s5TbYj6XAJAF/jJ/+84iPH/aXIsNU KI/95aa+G/XeMg4kEWNT99kV1O9Um/vZuA1Md6ioRnYGwkxG2O63UYvI+D+h 2v9IY9AecHram+QOU2mMqpwsC+hRRRIvA+M07O3pMY1zcwLtBJWzhTiP5Q7U r+7Deb0/3OKrEs7nNm0oLsZ5EK4udLIG50VHs5bm5qQD6OsrulzHcfzXri5U jOPKlaenkYbjaUv/o3jqbhvstKSCaoyLJPGxUhnjqavSYA3azk/7z/KqGD8l Y+ROhGAc6G24RTY7raAH5Q1pZ9ob4eFmCQuzaxCcLH2SemZ6EbEvH/c8GTcK T83me5588gBRsvKFY3cWkOoeJ32B1CmQWnVVvzvnBFRyytZtOC9NqXQfNOM8 ZY5y3BTH+Zl79/2HVHyvewU1S7PwPb9Bw4NZ+H59h3LypHBcaIjC71/gOD27 tx6jguOj2TVXfK+jEZKp1Gc/Ylz8x5xZG12CgGPwD9dDjP+iHv8NDYzfa9Xu YmxLLKRsbN2deb6CjgxJqGZY10Jm7+x/Gz+DIHN2rtry9BLSjZtUPiI1AqFs 62nUXp5wv8m0czufpPRLdm/nF3NBfYoyzquTajfJTPg+KiOtXh3G99MjHHHT E98L291T3Hew/5aRSqv8OB78DUd6jXEcDAeL/+23rYWW0/3Cfdh+H7X0vbfY rs7L/ZkxGOdpWGzTxjirJ3V6zknEQv0nKrXo+hWUnBs8sMvhCyTX2T7mNQyG 18BHcxrHcceGZBInjiuPt2SYAo7nm8+U2zcwbp/3rQN3sB9UV8QO1nt6grbQ UsQF5y+QYrK6JxDru5DnoNhrEAxkp+j4R9gut9+hOn1s9/F0XoZeQgwcOxYn oI/nSaW3olrH8TzZvd/IJOhLPAxuUZkO2JKh79XxX6GOsyjOSctnU8AJvtBq 5jf9mkfSlY9kX5whwuEszreHps1gx+5X3g+w3Nrb0LBBfO5tcPGXb1j+87TF ASOs/zn3wOUTWP/+nIb1J8/jgd5glqrZiAJ9pW8U7nDOoBqO4OrvJnHwiOMB KmEmoXfSXV1ubEQovT2XXEUwg2Odr/gMsNz1h9MVjfjcxK+ttFks/2uEondq W39aR+c6/v1jkUqScU4E6xf10QqwgNi9xfPDGqbAjezDPNIbAaT7Zy6hkyTU 9p+W8+8fBHjcelDG7rsZdNX9TYrBcoompRqX8LnZo968JVi+kXk9WiBkGm0Y 6sUX4l+NiNlkRzkCCBv+ZW+hX0Tz06pl0SMT0LMeFWrwJwho7GvfTuiRkNGe hF9Z1QRQl1tVF+MwhyJihOhrLBd+UaOvBp9ra/ysIYXliyP/aU+mzSGVG3t/ 5DydQ7pGx3Y4j2TC4pOYuhOfFlED15evhQJj8FtjeFjvWwCcDuoVlXiI9w7i ouO3SALsQ1LF/52zh69n/jZUhxLhFJ10rF7+PPpOf/ay+XUzeLR3UX4En8+S E8g5gvWFzPj5imM99ZJXDfLxvPHzbISKO86LnCurBjTvH0PVks/qz9tLKHi9 tITsNwxXlJrjVRKCgLuFhT6Km4yuV1zof9g1C8uDzpIsDniOkk9iMVAmAhc5 Qct0bh5x2LefOBxpBvsttVuO3xsG1jT52wtY3/Li5xg2rMecV+JjKbbbQmDL vYftJliEnahzfgxHHKsYtGeX0O5U7nKmsQFIEbB97uEUABlt7fNn75JRBYd0 jcu9WVjxEeI322UNXXyXmBzpiMDRpnqr7CgJrR1Q/VHWZgYDXAeq7uDz1EHW QUpY39k/BjRKWI8r574IGWyvKOn7X2qc/0pb/B9+/EiAeiHl0NO38fs74DU6 p9oHg6w3xI8+DoA6teN8j56TUYRYn1Cn4CyESJlY9aZaw8pyATV1IwHYP9x/ o6ZDQjdeV3zUZDKHd63FJ5XU+mDjjFUKN9YnZHLKnpQcAPrDNGS8b6KyTS0p Pmw34u8jqpG38RCe/U9y9dMyCpPzP1ra3A2/T6/GFbwIgF2MJUOvJ8hoqieU Pb9/BnS21qq4j9vA99FLxyNw3G+KNuyIxPfQ8eKG/Ka9FaxdjFUUaOkGvSNz cTNYX1xGdpw71vMm79nk9hxp3++9Rw7brfp890pMSBxI+CjVMjCvIHa5BzeX KztgR/SXflOXQNg7IrOp0UICalPlzgMyBHS+I2cmJuEyvCjyUHPGcTeqc6aX wPfAzr7/w3Uc/882BQf/fOqA4EO/d20yrSCWDILicaynZYNbwn/b3/AVRyVs 18/642Mj1TjonByT26m1gn48t5Y4sL8FZqZMlzn4gkCrUpV+WRLPde9Pcr/s nQKCaEsRZ4ETVDFY7OvAcT8SSd7YvofIX2IGn3H8Q0pn3FQPtECYoC3LN03c /x/QxfbzBgHrfT6GB9iulYHjxavYrr7/U14x+jiwXiu4pRexglYfG6RoPaoH /+ELFnc+BkEnrVt3Ho6vZdHOfbk43hdObf7bheM8bl8yUZxcDyd91zWv4HMn 9C1pmbG8Q9RNrUisP+iKtv9NrF/mZWpLWGAsaMwWK8aWrCDzkM3DwmrVULfP fH7uZDDkxM11v8b+vBblIJKxf8Ti1CYq7Ff7C7vfhVeq4cc5tb+B+NxN1c+3 H2P5Zb8iugSsXyNf5+JtrJ/laa3pA2IMjMPXvjh7CojIr5WtMcwgRjAos1J2 hpevg/p+4u8nondNYzFf66yVvC6mx42uMe0xJSHHHz7MT94T4FLAHNHoxDOo 5a4f3mlMQhr7Ry+HVBLgWkZsUP6mCwT3cWfc4SCh9NCU4+f3EEFThaWrzcQJ Us4mfoxlJiO9JrZGWcIs0CmZ9JwcCoJ0pdDXWntISP5J2XgiJxHm3VjYA7Ut IM9L42Vd9zzyYXPgcTIkQhjya9aZN4XvdA/PiizNI/e0N5qfgAg5M4sBtv9M QeFgzlyw1TxiNeb98LCbCP2era8iBs2gZX8syyPcN6/lyywN4j5a4lux4+Gy C+yMOT1w5xPud6fe+zVi+guLXsfvdM+AVML+5HH9IlwW3nz6mGoMSWedrDur 4w12no8Lq/H3Py/ZO9GYf8jZqHdT2xvuvWYzNJwhIee+is/aRwmADt//EXjC BRRPsaewmizBpl02if/WMKqnXrytXh8Mbx9aLoPSIihr3v/g9Gsc1SX81Wer k4Mt4Udp8jguzDaG7JE4ToUhg6dYcHyuJ5PG2+SJ8PqQh3IQeR4Jptlrkvc5 wdu7+btMsV4aM/mx3dhOVHLyfXasn9f0VZwrxtHwh+eyEsZ1frBD9RzG00+a UukkLUHh0XrLidIB5Mr1ReGbRjIkCz0aEC4bQMXLHC+rMP9JW19GAaafzN38 vePWIuJ5c+hGbVsPkBZ8Au1oB2Hjt/Y9jvYeiOZ+G/dXZxElpjXYn8b0Kt4n dYxVy0hS8PTa4+xuyBLpZrh55gmoM3wO2pvTDTuFjxz5g5YRx4LM3r9iT0BF 7b9WsCCCuOrfj19a5tEeiWslN1vMgXqS9kXJBAk1xhmYrBwjQJWe7AmFAUt4 d/XrqZUiErp0Y4236jYBBHyoPYUTLIDnfGRaWCcJ9fwTvPdcggCqyu5DMo0W 8Lpuqt/gERGecYXkUD+fR/4r+/ylCmxAqYaBY38BEZi/XdD0eDiPLq9QKxHN TeFaHm8JzRIJeRY1HDq3nwCt2onOlb8tYJoh3PYGAxntkjuolbo4Cz4p8YMi opZwNEb1ylGDBSCqD5evJE8hZ4eB166FuN6fMXua8ZPRg2CrD0ONs2BW2tTP YWoJ9zmMGi8o4P026cz79ZezsNkUyXHxiSUk2ng9OzI6B78SMj+Gms8hxefV jE7GShAi0K+39zgBEjTNRNJxPPbe/s031W+J58q1Sgk9AsTuOawSg+OxYnv1 0FKcBcBeheQO7P/dh+JMJjgeTwX/zBQ0WOD5er5SCfujSLbR+LlIQj639W28 sV/8//YoFa5Q0Gbp9wF9pWl4UQ+ijJJOUKY2nJvlRUF6VzeLKjanweYav8GX 8/aQd7WuLDKFgvzWnjqTmqfhP9WN/2wj7GHqrKpcBo7LPYZjAddwnNJo/gnv xvFJK/x0chj7f3/lMPt2POZ+HvGkxnG4PfPl6M4KCkobsOj482QackorYqQn 7cF48UjaGo7LVoDucykcJydO3auCOD5vBx/Mu+9eQtLfww5PE0ZgNDvMKonT EyZv8X++i3H/iCHz5GM/xI56L6+dcwIpngM7P2PcvvoPD2ViPxoO/G1Iwfgb fswcCfdZRgOs+cFa93vB+CpHp4DJPWjze++ygP3ZmZZWEo79OxNBsy6P/XqX reK6M2UaGhQKP/z9SEFWZdlJ+zHOQy2Bf/YTR8AVjiXbYFyEeTOu2xiPkjLN 8kesN4t6c84L25Hqf1ZVd/cenFKJk9A6uYJu99J6qFW0IcZG77OILwKcOUOd ZcvbkFdsglgg5me4rMTcwvQr0+ktXeUkdF9yYKblOgHS35zRRObxsJg2oVzy dR5NOcwfrpImAntQmdO9x+Zwx3nLzuIGAZLqagRu4HNBkUe4g83i4Q1LvMV3 CzKiN5kRTXafhfKQhjFPrwDI9GZrSsLfdRf2eK9ivqSbiYwDpt/oqxnXSyNC fOlX/9jUefRB+5lT41czYB44720tsIhK9lR2p1pOgFSk5F+pZFdIPfvhfjn+ npFbr7yL+RteBRX7Md1f5Oy77fn8juL0xPZ8brhGntNJjQfhdeL3rVgKzO8P 442qnkZKzDvdl5zy4OQOm7Ox+PvMtNKuTczfbyjW0IXpBdeo/U6kz0E+b2T2 Mv69TLtEXC14Du+HNeMzHs6hQn0lTfNwPOe+sP1vgbUcnM/oNCXi907K/cZf PfzeBelT6ow/xYAtO/ueOxjPbaoCyWMYj370RsxwczzwRxpsFEeQEDui0dEM JoAC5d5lhqxnQKdaXvxweh6V1E6ydF0lQsBobIPOuimoag3v2VibR2ar9G6d EkR4bxTqx0FjBjZO/etnQwnQxfVvUx3P0XVRa3udU59BQ2fFuBAfBRzd/602 ucwgzq3Yvpj+IOB82XHsgAwZ3TIyVPsvfxY+dt8KnWQNgKDJob/RrEvQpOBg PfB2BKlc5Rf+mOcDUV/P77rQNoheOov5RpUswc58LoUZbgf449/ila4zBZ12 1zdrghdQpEqppIrZJQiI/NXQjO3VLsSobttfFee19cd2fw6bvKDPG0E7ahr9 grAdqRXdi15Y/6af6yILxmG/189uG9eOWMMrfRiPOBMxc/vvAlP3RAe2/y7A HtqaaR8XDx9lrvxnfXQZ9l5gqhS06EfqBevHWvNeA929IwGB+Ds6qvjTbcy3 1dVouo/pG61b0ch/Dmovf9V4GDAHousmv04dqIQ25SgvK1wnT5paj7T09YAq NRVLpEoJpLdbtp3p74GhCot/uphvYi34SxnT43nGL9IHklBsYuyd8CQC9EzF fn10xRxkeJ1Fe58TQa4zpzH60Tyqr22X2u1oCpctXytewX3TjRiR6oL7qGmG 2Ydf0xZwoNhvpGiLhA5MEt2X/uI55PgAgxObJdwaGM5hQETQ5iHGlXvPo4dX tK2vChkAh7L+jhS2OWRXrPbC68Q8OKgs8AjvlIPlU3d8Zw6RkTFLVI/syCwU rX0tkVSxhOOdaGtAgoyeNnlF25bOgnmj0Zu2e5ZwLKZgT2rGNCpwYj6YWUqB 21OcgW8OOoEltaWAaTIBPP62Sfj4kxBbZ8JPWWVzeOs/lR+Dca9mxIeLYz/W vCUtUjD+XCnJNoPNacT5lWVvtxcFWp+MXzjn7Q5GrST9E+EUZHfX7YvWzDR4 Vx2zJprZAyvzzMQ69tOiJ+7mG+z387ff4i5hf0+lyK8Dxp3y4mzLFPaj39yR hwPjzw9rfdmXS0FuR34yeBRNA3U+6+TdUntoof1Au+2PxcYP80Hsn3h63Zsy 7FfgaqtWb/ws6DOztgXcIKMYicw/bIesQc1j4PRNbwq0iVRFZWxMoyU5aVKN nztkqklb3cL4mrKS4nkx3giJGEuEcSqWnLvtje19crZ17sH2t/g8dC5guwer jg9alI2i0NszbjuHFkHhcB1387I3fFsVqz91mYSUNV5mnZvA+7OSVEyfmh9U 58+yZxFIKNV1xoiLgwCRIobfZJ2C4OsNY+mevfh9yt419UYE719rXYWePvVQ dahIAj0mo8lq+yOGorNgICEwdXTkBfwM+SgK+HxLvbVDBNbnvseNdckxCOwn j4q+lF+AJUHvD9ZVU0jZ5jpBqcsXTO711DnhbxmbI8PpmG8l57uDG9MF62zP WFeswJA1r92zx1Uo9mCU3IOZB8Cn6kprgO1RBBv2VWH7R3aA3kFs9+1v47r+ 9RXgMWYptuzMRMtzBaa2g2nAb58+o0lagevm8h4PWcOQ1qi1nKd0MUi3f940 9F5A7XfkFHaNhSOOIoW+FospaFvnOmJYHY7OHxXI9MP8jfS/dWmYbpknJWTw Be85Z8f3j9NmoYXmUtYvVV/AM12hpfl3JrJxaBwww/yZ1YQfMpj+h0bVlmeQ hNDfc+kqIgRYCz1+cfyKBSSdl/x1mEhCOW6ccvQ4TmsBuxg9TSyA6tuRY9/U CZBmFD7aW4H3hv9WTLs5LcAsa2Hve1kC7BB1dV5tIqFfiaELL8UtYPRD9CNb rNfrvSItLbZjH5rl4YD1U/a/WdRRpqDvS7mHAi/PgGeBnHPVmC28aXf2YbxF QQeOXVrsEJ4BirH4tRdUdmA7uvVUYR8BKvQzU/RWcF9/5VTi3O4Ax9ge9HNi fEp23RH0GK/Yc9UYQYyTS/H8d9f1WXC7Zi/uSEVG41OvPqpzO8K13YEPgrA9 NjW1FW1svyJIJzUD25Vb2P9Pk38a+sQkVQOocTwVgi1zqxygvWDweRfGkSlj fm0vxjVa5nreH+Px5rz0YK6tBw319yTEJy9DQk6CYiDlGky8NY5nub6I3LkD +V52jqOPAj5y3teigd7zR7xCGxklXpB5d2JxBoxMcmeH7ZNA2+zWie3vd9We v7b54UHk2FZMJz9v3dqD6+GcUtc/KVwfNbzvg2lWvME3+Kv7ljwJJRm5MF4Z I8CACG/uTJ0LPBsxPqa1jOOvt99ETZyE/JwL5NeP+MEPLrUDWq+XgNjWK81L O4SI5J1sjROR4H7OMustrpP+G4fyt+uGwl7mbIbrJUlbeUgopQr1HCu9pI/z Wq529KswzuczEp7uGoOZKMaM62cXzt+D/d1HfwykQbrc0B2D82GIRa+DZzt/ 85YOXePFebtpQ09ir8R7V2hAWirOl0EKKHw5agGRK4Ol3M0kNOjdm+6D8+Vl bfpxBQkLcBR8lHTYg4yK4r8JcpnMwp2nmXnaYlbwmYvPclQMzxsHr4lfYZxH pZBcm5OpCUWHltkMaBaQqfmm+C++aTB5EC3o9MUBTieemLJ5tAzz3Ry1Jn09 6J9nTDzb2jXQsw5LHmsfRzlFDmuR+H6Od178fArfi1oTITXyygL0nvobUVA8 hWr3f6wyJbsC7eup+jL8LaCaczIM8xc7X1crY7oCnVRa6MFF2P2ANkCvZAL1 Vnas92R4wFjFgwx3/E0nYiDmj/lq5w9cysX0iXN+N+s5ZtGrFuYXP9+QIcQu KjTc3B0U2boU6g6soOc9+6gpHh3go2EnVqb5CN4dpHazTiKhtMMl3w3vEeCg 0al7doYWcO+sUNaWZweUdOdFF+NzvBrOpZZYvkCAvy5FZwX9/EMnbdbZDJa/ r0WxDMTBI4WdHc+6moGZnjctHPMtXDTLe/vjYCdjVrhF1Ary0fvxO1KnHtZ+ T/1LU47F/asnYfkW/t6TnXgL898FJR7jwvSBseETHGUrqLncf+jyvmroa/tL MysfDc3fPyS2MVVDwY3Fr4yYn/2A5psNpqcc+fjqV98KMjQb0mNe/ggim/k/ imRj4Ij6a17Hbx/BjUeueAnze+53XziL6eM6CqJplBVka/D8xTue97BWfP5e 4Y8oSFmo5NPiew/ZAeyUBMwXFz9uJ4HptzVlwgR/rSCyg/SOWNtseHSR3usP WwQMfHy809g1G56TFTR4Mf94kFJ6NKZfOLqi4PV3BWmp020aQzSIZlyMH3wb AfdHFnLfGEeDUt+aiQfm35HQeGCG6YHOhg8b8bd8V5qngc5DJCawUnMsKxyC fU/x+N4nwMLE+1C/RBI6xSOWl37HAmb2sx/sL9vuSyNO+81wvh/llezlMYel LREJ8bMP0UOHrPPNWB/BzoVUnBkOER8Cvbo2cHw4he4VtL5EReP+EcAcAUrr WxpuNS+RizwVpR/zw9XHOzqYImBCvcEk4OsKGtNWFKEbeYcE2IsaNHaFw4JZ YtBV3I/0Tmefc8H9KUxgWk1s3A4SS1aYTLveoecb2WXh+Nwti3DyLG04mH56 H206u4JmIWjHWd5SREeleCP/Zjhc1r1nd5qrFG3o9o44YX7616S0S5heIxZD 4OvF8mOKrx1jK9C7J8YR3gnhMCAcKA8RFUjceEFKEvN5Tn902Yvpq3WxbOpV K+hCqTjvl/cIsRj7W9k0hMP0fvF003yEOnZJ+Zlivq5xqOqf+nCo7NRTvfF2 BdHOyA/Tq9agWGqFQ8dWwiG8T0lGRakG2V1Vq7DBfEH2SKnSZWz3P93VpKQV pD9gw/nySR2yLWo/ocAYAXv2NgR0PqpDtWYKtu8xn5ekOz64NwIoeyw+LIgt o/YI+ernp/oh+ZyDkcwDP3CP0K528ltBK1+El2lbGpBrgFGyNk8EaDC3k11x HFMOxOhcwXHVPR3iy4Tj6RshppBQNQP0rP/xbSyRUcA3GlNfRRtofVSZfqyx AU0n3j2XgPUxdvvIUbgjoHCIi3UD22MP+U96DNv/y7iZMxXiB/PvRc+dNl1B kdJjBlsTTSg68L+FHuEIKJ0V5N091oTq0jITtTFfzLAz2QrTzQ4yiLCoriDp gdbfZ4db0BmPu1VCohHgqu++S3ygBdWfmzWSxfz93UvR1SIRoOi1xJZ+qQo2 1JReaX3G9TT9XEVYORjS8265GeI5v++VYAYfnvOLWqZD9ryKhztVH+yVHBfh LpdPz4beOFJt+dL9/o8nPPa4IXTkzjji2jgXL4v54YsxWYGYbg35+f9V4v2h PYF+jXYWrju8il9Z94Z9onR2e+gXULNBhlYRxzQczdC1Y9qTAke/frr8A8t1 K5+7xIrP9RzU05zA8gY0PlLDaXPo0y6n4edP5xDt3fNWWqRMYBC63Kj+bA41 /K6rZMV7Xl/saGC5QSr8OSoYUozpG+Y0fr6Y3v/Wa0du0GNgHndjl8bf2oXM CVR4H+w7bObyhCoRyB/3JeljenUux9RxTNfoga7Ej/FAP2j52AvTmRreNgOm 26m+bnJOiIM8/jfd239XGIukZ1LE9M31dc8PunEgHuoQEozppcVP69Uw/crn OgWmw3Fg/PRCXjimP6D6vnwd0w8w0Sm45sSCVW6kssytZaSZICi0pd0Hh8/8 knj3yw+m8i/Y7cd57Be18O+Obg1851RgtGAJhoZjjfR6On2wznLVVASfU58/ fV4dy5+UvKQch/W72UdG3cL6ixjwBsUYC6XyxCULYTLQdbae+VAzi44upGd/ 5bSDVrcrJgfbSNDv1rgadYGA6IQnDhQW3Qe/a0K223KJxIrq7XOGPhy7x7B8 77FChUosdzJgZ8ZSKwm24g3W1grvw4dnfTPzBivwMba86KZ6M/Is2zP5gzEE GINPvYnTaEYbp6nGBzFf5G7lzCtM51KeImrEk1Gx/qdDBNlZeM6dTNjx3Q96 FU2NrfCcYTL7VE0Jzx1KyiN63njeiBEwHJ7Bcp98wgeu43Njvw3urHzzAxWu fSqBagto4YnrtZ9DYxCYaqYwPdEFg0anRstwPn3pUP9Bh/PrVk5M8zJDCvA6 nzBlHR4D+S88A/fwOZPccssaLC8gO5LyYWEZTTruCKd26IKAmamegZokiNbq OheEv8vpRXpeYf5M+UXPKEwvbVeovmpJQiKC15V3FRPgPNu4o5WQOURX86mx XCch32G5kYsdBGiM/COg4WEHE0pbnz9VkVCuu8jRT8q436cY/0nJw3PLvHu5 6tQcyrKt0xczngOpQZAhl1lCWz3X4e1+8R/NI63t/vGtJflUMu4br8+9aiz/ QAQ7z/q1SP951GuPV6cJvA8Of9XYpUKA3mrlH/7YTtuvG2UNby3g8yvdEgFj AiTz/9POySMhRep5XRo6C/hbf1imCp93rLgn7Y/16XcHOWyNmYNo4PMljoMz UKYgq0NrRUHqdrRiunvs4ephsx7R2zMQXn2AK0ySggzaBuRnSm3hlkaN3V3c LwzXw5IYoQokN19V+OK+UTBjGFEvvYKitRpyWtpa0fSz8/VhQhHA8+xPd/Xd RbSDWVz4QNQ4UmCP1UmxiQbnq3do6ppb0e839Nlf8blAuX1XubC8XUvs5NWI cfS416BN0mQREdeuJ6ljeXHZi7PreB567yl7owHPR3EmNhHJeC46uo9H/cQp MugaHJwfLZxFfAuMJTxNOcBC5XesbAcZ/LiF2J7+nEWXQG5k1T0CmCyfBi6H 4H1AnP/a+1gCVN/67rC45gVzaQ1PlsgEOMaQrC9znoQizaevrL5xAXq19cAX +HxCgVZ3EdaXMZpl2IX1REWGf1qIJ8C33T4U5mASuvTw73+dK17QrLJw79xf MiJQ/1vVyJ0BGWOOnefbHsBbvn3XJpNJQKDotkr7ENBPA1Zp7bdeoB1d/+TK XRIi1Lkd6PtIAGOQqR7K8gPV50xzNVQkZEhmzrjJTwTLN5lJMq/M4f3ckU7V lXkkojttfVuWCBIi9EPrw2bwpmI8ehj7P+9gJCKA4/E7q+7NIRwH5wbOztTW BThHo+K8XjyJ3IMEwanhIYxk/RG4jvENZtXobuPtlzjDxI9x7qIu0fWmX4Se dpbph80TqIGyHmdj9gJMmneV7sL5cc9oYfEwzpe5V/ImvjhPxL43Urbzo/Lm 8QIRnC9BPr9ndpbZgt6IZuHatwlQvfXw9UuqRURHcAs6qO4KQ8WZZstlU3CX Uq/1WHUByfS6n9jf6gSaF0j2T49PQ+cvY/ZR2gX08lDrxMl8R9CumatcnWuD FsWuI/wiK8i/Yu+j+poAmKNjzOlwxXpLdR1UlMZR/t/7t1RDo0HMkWHQ4PcK 6p9gDF/QeoouJjJ8pokLhXVWEu32/+Wy3F87v/1/uQ/MxN0flsZD4Pymd3oR BbT06gdys6dRi1eL3qdFZ9CkHnVcuUNC9zq32EyrCMDAHM79qs4C1OOZjuQK k5DBiYHhiF8ECHmt4eNUZQ5dCu6y5WZk9G5QTrDJaxZyeM+IhNq4Alf+hcS+ vRRUXvvkhNOjGbjgTiPZKuUF58xbfFNcFxBVxr+sy05T0N6cMReVFwlPDxUf l3hKQnrK7oo73AjgTM29J13BEriv7FEzxnjGuuRW9lQTgNJEPtqxwwII3Eaf G7A9lvPPtT5g++E9inE+2O5YgmvCtr09+vFK2/ZvUYVll2O7my9rDjDMkJH3 rlyen10z0DzMqHuEwwV4bnS8EciloJAWTrkb76dB5OZf9cZVT+iyXmEtlVxE eeLOkT2iE6A1PHLiwN1A8JIKnlnH538sdF3a1nddULh0H9ajbM3+RAufL157 43oC61s5mhOfh/WI29TqNKbPIS7GnSdj8fscQkPXztWYDtFvLXcc0KMgCzk7 OyP+GbA+eYPprbgL0AU/+NcsvYDcv0ibnGmfgouPPLgKj/jALfnC68nERTR/ XePHL79R+HTHZClQPxBYu28J38Xnu1vL2pixvngVRdEUrCftRbzYBXx+uTG8 rR7r88v1+hKB9bzWUdcqwDiONsRd88Tv51umAvmml48hiWNwf1kbBR3slIq1 8JuGs0S9MVZNFzATLNcvqltAehoXchk6JoGZubH3II8nqOt7bUjcX0IUO2vu h71DuN6Nf1jkBMJxS0HjIw34nr48Ztx3i4Qkbx2joiq3gNnshZNC+4hwKtnq ff8hEtLI/ur0O8Ec3INYeuwlicASb5UT/mMeiTKs1q+kmkHDKuWVDcax+9yg eTHG9Tp2KXwHxsPwR8KQG+PIa6A78RbjohrWWFrg9gQZ6bzBBeyXwsTq4+Lt uWgiuYK7+hEI3Bcqnb2wgMiHJYkOXVOwd8k9LMPRBbwUB2Ia5BfRSo5t4dmd ExAb6mHF4uoJ8+ryRbFUy+gjnc7rvxIDoMdGlxj7KQA0a2XrFnBe8tKJWTqn kZC2dOGE8GVLYGqQcn6K/e19/sHphQ4JbVyR5/u9ag7T7AeeGP0kwM95Od98 ERIS1yr4sTxuBlRR6VnuGIfhkeyISYyL8a1SRQjG83j1YeBNjMN27dPdLxiX 26dYMaKLJ2Qq6v2Txf78eZXgRovnHM+XQEU1nwCs7uwfYl4sIKXAv4ODx6dA yunbI31/V2Cn/t3B/3ERUa37DcdIjIHywVO7td55AmXnRb9a12W0tZ+Rbt/r Xpih7ZoXGwqAnZPWO6izKcjl2AB9yYdpOCXnw7Ro5Qjcce6dagcpKFSK/mdY 1Azct2ClZeOww3shQ/w0thfbF8EQju3TmLllS2O7Lyd31JRjewdeGNVxYvvM J//Nc2K7wWmLykYY/9dMp7QTGH9XH9N+lB4PfDlXqsqoF9FtlzWNncsTkM/p TT8T5AYowYXnN+8SanpJlHhhNwJT60XuzQe8QZS3O+BC7zIy8fwtVi/SDb6P XrU8x/iL+UR8n/NTUGs9xb/bcQaSeQirLjG24Df3V5ED6y3eqZlcgO3wVyVk V2D97MSWf31Y7wETbvOv2E7mUsrrcKw/9eWuo9tzc/u1AvPLGOeZUtsBdY84 iBK1lbprvIheLu6me5g0Du4Hnnzn9HAHWaSaHxy2hH4TTQcGXg1BJv9uugd6 PnC+d1De7NgKutjIpUyJaofThTdJpBeBwDHGyZqLz3+/aJuui/V9WH32fcXd HSx2US6wvh4CxaYlFw+sj3Y56ak01vMociszAOMZnvzXq4zxrFd9Z3h1IQ5m TUpfpJYvoicOB858kx6DXgZHC0dtD1iWY2XeM72E3FZV/7iTBkCh1aG0KtAX CvkWrnaarKAUKSHh7KUmOOI7VshwLQgCuq/IleP7fhQoO7YD3//pjkOP6vC9 n/W/7v8Q3/eLky8dtu9/SiYzZJPdDg73H2HpZpmFBMbjklKFZNS4Xu9S/cUa jnYpLh+WGYMrg5wZcRjXaqHrFymMp4RZvKga41iQj4v5PbWEjqd1L9pjPIee ZIWFYr9Mzm20X8N+DXX67pxYigXVR8Hxvx/h+f/viMzqvTqoJm3wPR8Ogoxv ZUz6/nWgwWvyfQnzF65PZWhi+tl+tZ9RWM+N/64f18J6hL6NjDbfiYV9fMvF kvi9VFbgU+wntsHzV6JZtLUBQGMakvTzzwr6Y2KbajWYiK4QjZYCgkKh+Mfq dK4cCVV1XAs7OEkAqa18StSoOS6y+8K1fCR0QtaUVecfAQYftaTvWzSDmNuR r7Q8SejMCSIt83MC7M179/O6qAWIRlxqnlAnoUDaxstFnQS4LTe57xyjOWSp 0SoUrVKQ4o6vXd9hGsw3ra5u0HvDw/PQaxS/iGqr/dfa+sZgV4Df47yQAPgj nd75E8sxTB4+8A6fK6AKsRjG8v+FnLj7HctliYSY6uBzb7Wi+h5i+X03dw97 By6g2/bpp8/oTcFNf417/fmecKhN2cJXfAll/HraS8U/AkcjO+dyRYMg3Pzx mhSWm7SbfumGz2nyP+MtxPKfjzdGnMdy87lxdx3xuffPq+J9sTwL1zd/F9pF lHzqe3zc/AR0HaT10NjhBRz2CWKzNUvIVmixljF4EIITNFgyjwUA93fBqx4U Atz7KnN9WJKEVuRjIz1qzGEupSrXg40I+QWuCsXMJCTGWFnVVGkGUm+6yt9g vcYXJ9RssZ0am4n7x7B+gvb+89pYr5OIIms/tiPPdTXbDeunmbcqz/VfROof ZDe5OMahKeBMbaqsF9ht9XX6yi6jcP0bvFOLfZBSSog6oxUA1waqS9NfEiCH b+KuqDsJsYT0zQjxW4Bbur+X4CABZhtjyz1VSOjwOpcWzR8zWN3N/FEe6/2t k/H4Obbj+ckvygLrT8jTeCC11AfCY/Mn7bAdtpIXn/5qBsD7q/P18HURdZl0 W+ZeHwWBSpW906ZeUHGmNull9jIalFPxW7LsgVqBNf8lqwDopnpdHCxBQQ56 oV/26s9AYP/O4oZ7diBSEeEq30lGRY1UzVWUGfh7rmeJaYcNdNQ+yh3EeoU7 FMbEsZ3sMn+WHKyfNDmafseqB6ZlrjMmYDvZzCGypVi/1ce9e81vLaGDedom L8OH4Y6Ye3ZghTeM96SKo9/LSPiYc97npU7goHIs/nspEArJ51dHsZwp141Q XXzupwkHlSyWH30Vf7VmuRMKCrrt3+FzGd5UXxCWj93Yx2RSuoTCXvxTsmgc BAm9GkGb7z7Q+1nQ5rbCCuKNrS11kWyFSclvxxW3AsGbR7HqLZb7J3xOUAuf k3t/aMcRLP9QLqs043wrOM7x71XF504u8XLswPL2QnQSEQzLaJPhuZrgngG4 lSaUxEfvB0/kDFfW7q2gKW7TtKqCBphSfn1e+HEQ3IibGmLEcTxU8W8pCMe1 t/3z41c4ns/oeVS341gUY9i9Hdd7dsziP/9Zw2QVr7Qv1ivPw3vSF9s5xadw vYPOD3gUjDb+K2oAR/31hDlsZ0+SIO10chCcPsxtN3S7BmxFU19Tv11Bg8fp PdhYgsFDkp0znTSP0r6urY0pEMHWNWxXrJ0ZZPWOxp/yJaAFdOIaC957JMl3 2p+99gIa75IHnay4P0yL5/kyE+EijVOAL9EMfA/9HPixn4ToXYK+07ESQUCB KSPNxQwE9S+Oa+0lodO2SZvOR4ig2txXIetqBnLvbNok8PwUveuUygyepxTf ZMtsYvln3kopKlwkpKD1MKNxFxHGM+5Ed7iZgbunZunekklkls/mlYT3oYiW mxpKeA+6XoNWMvGe8+J63l9nvPfoP6Lkq+F9x3nnnNZHn0XkwOfT8HVtDPR7 0BBNdx4InX15Pg/vh4ZMLsNBeF/8ZPbaenzTDGxE6i9wnMbz3IlKOdtVAtTD 8HDRPTM4dIs/8xI/CYWmVZRl/CGA0IXGwdteZpBmPzAujvuCoLM+o+gCAby4 o66cErCD7zaVGiBPQhw3Xd3ExwlgusHXGXDNDmJPcuy5gveEypVFjyS8N9BR d8ab4H3hCn9JXdKhMeAPpdZIr1xEjw5fy2F/8hyEb6pEs6yPAWfNRZ9C7Mdx 25rWxq48aJ5/mnSGdwZ2SApxndWnoJMt3rcWpzyApPbjtHXYJOxVCeRyG1pA h6kECR/2PQCF/XM2izdHIE0l121dcAn1D9W1aj6NAdFPnWYs+STk2f7dKtOI AErX1oLv0lsAY85PAS0vIhiVW206VsyjVy42Xd4s5uAiPlMRmEyEhGvLGv+e zSPbXW11TPJmcOaIZtjwGyLwLzjQ6kbNIxuRb4GV3abQHhK2RU4jwlvtEGvG 1HlEw0RwtRszhYJF68SM60SI2jfzm2diHv3R+HLpD4sZCH1kd2Y+ToSlgl3k 4F0k9IPdx//ORTP4rpy/2H2QCHuaml4SDpLQOy0jz8qrZmD93jPsAn6/paf8 dvTg97zp+0P7IfyOH2D4sXMymoxCWkfaPl2ehX1iQuWUBivgf4PGtu6TESku 7pG9ziwIqqiKX3ptBY1orbHgKRk5JYg30ZyahdYp9iY+ohXkBlv8HMJ7ceDj 29yVujPwZEJI7L6IDbyVFbULIRJgfsifgU2GhOrS2dlVJe0g4sXLE2ElC8jp NuWeBPUUJBbeH9xZ5ALU7NyqmzsXkG6KtWmZ4DQEaFvcFNBxAg+K2O6Sagq6 2p/NoBg9DdomTbnrSw5wV7dJYvfYAvpbeHeN128Sdsf0NBXvdAXdmPLzh08s oAv8SbG6X6fAInTqh1SCEzB1Up7tIVAQD2mAy1t3GiT2hB3V03SEZpGsrly8 txf13qkfxXt8zuuJa1J4f9+4o1qehvd2dcYX0vN4j/8ktPBbBO/vFu3/FdGu UVDa9a5MhovT8JOzvHQ12BEuuXkI2+F4Le33XPmN47cv+rSnMI5bMwutaMqt GfjGxNGbeZ6C+h6O37ouagOnQqpymfB5/QPNPlRYH3Fr8Wod1lPtx/e65fJT JKjYMH4X7/ezRoLiL2NDwSh7qP8C3s/9+YjnRvB+fC5sWCw03g8ObImHqr1f ALL4445ddFNIzsk1s03eHc5+nt3X/x8FlKjfiS4/nEGMomcobuAEpGRV6oYr ZJgn9BwXS5lFR2UvbSlXOMKwzA5Sw1H8LqrLltyiI8Lwbc7agi4r8LNb52QS x/R/zi/alwmQWZDm8OijA7zyKqy45E9CwjmU9JhkXO/KF3QeSbtCZQr7CUdD Esp8YV5j+5kA10t+/thzxh6ECxRlBatJyIKrncirTAC+vA9X+cacoT9B7I44 rs/gy5tNp3G9Hn375RrVtAd8O2+U7YPr074nk+smrle3V5yF47hOH9MfuZSA +2aX+efDPriPpipa9TuetwBS2sfzHNpEuEJ8ps01Mo8eTBcMZUqbw4vhgvZ1 DyIcYp1+mVc5jy4/erD7mqEZ+GxE/C0TI0Jt5pDm4415lHlGcWvR3BzK/DVn 5W8Rod7+RpjY0Dyqzp6tL/A1AzF/Mbq6tBlQnHgcbkdPQct1f0QVJezhcqHx 5J5rs3D7eB2JJZSMHn0r0kn1tQFh25CE7spZ6I7vZ+k7TUacTZ31Z5Os4CBL Xzgf5yygpJLvu96QkY/g1/gbRBv4bTawqpAwC/Gv+k4K3iCjb9R34h2nrCAz gschSmgGYEJUl3yLgmpfTB3Z1HQA2VHB16xLmE6/URnZTkZMMxFZZ9Vt4azX zfUkq1k4oGitKeJMRobZ3VqrwtZwMFcjYvrTDNR/P+r98isZ9StoGjwvtYUa tu9CtRdnYdCFa2wsjoz4nqtwSHtYw2mxkF7A9SmquiQaiOv1lejPpclCF5AQ TSupxPXZS6tDWsf1uugbKMCM67QyIfGcDK7D7MmTWVS4Lu1jTjrG4npM35Bs N8R1KL18Qus/XJfDHL6b3Lgedz9m4Ptks4iIf9TOe1iPI/pxzuIMr2iYEnwX x34O79UPPQx9FwlAp8pIjm8zh0O5b1xkCGQkVd4+0NQ+A1Vmk5S7j31AqNP3 Br81CXl17n7RX4jfkdSFt9qsFjDiUF9DwHPCgSju6TZxCrqXWBU91+EF7WZp OVtBFMSi+7D45sI0uAo/NV+x9oS+7MhEvkwS2ndGqjnLlgClh/iGmbwsQLKu Jeyr6AQ0BH45mC+5iJo60w59NQ6EZSR9Qdx7Gj6NJ9B/6KAglVMfhjnue0H9 jw8dew4toNh7aXvTd03DC40GqE70Bo1bnFon7o0C4WlrWCRxEa34n6Ho6geC TTpRvDpxChYJgrMLhgtoyTjfh63TC1hlAtvNMxeQWx2V/HPuKTgjcqHyZKEH zNeuRa1xEUHDT6pddjcJsdNJx/P4mQN5/nFaQ+8Q/PzL3S9wfwmttsh+PZcT CH2j02+IepOgrRjqc5u4gB7NfOZmiPeEpFS+U4u8iyiGRj/TwG0CImjDZlf2 eIImf9remCHcZ44dH1VQJqHyhsu//4yYQ/kdEU+NcwMwmyeLAqiWkXfhw279 T3i+ffn4ysWYcYi3+En4fXcRGdv/+dk35AlG6h/PlD9dRMHle6WVXo+BeoP0 ssoNT1Dou3LenZeCOvh32qu7zcB1jqG9HVft4MGeB1Iur3thzTDxZrHrMppk WBbbHAyAEws/W0/WjkJ4x15Y61tENss5avm7vSD9ljWFxID3X9H1odCJEbBp FZs688kLsn94K8mKdkNdVF6TQO8yWgw+wWY+FACO2uKp4lvDcLG2UtvhIt67 +1sTb1h6w/FKVbrPjktoZuDBh8RDw1Ajo+MXvMcHdsUlSlDHtAMrepamiff7 FOve/hy81w9vyV0plhwC8cuWOXnPltCkkyWv5CsfYFtZD/ZrXUI7/54nVd4a BI20yTRRabyPi4V/u/ZyEUW8vRD9K34MLoeUE15xecCj1A93PmbNgM+LS7dp qCjIJKj/fgrJFpaWGT3mlpsg1oRHH+E9/n3T6lbN1SD4+SmANO89APHMj2/t WF9CkWfvn6up9wUO1Ypn2/VQ/bEkbbs+DgfK6qnjushzfng3gmcGUHvy/S8G uG+EEA8ekQmGp9Xi43/wnEaVmLtS+5sAZ2XLPLocLWDKWvq38D4SckzOIN9i J4K22sZD/bfmYDTwQCuNnYScL7h+PLaXCCEXMy4dKjKHXI9AmjN7SGjLsazp EycRyof+u/WDYAZdDlm/Pp3C86iC7hPNrXk0H0abHelqBXe57q4NUROB6/0e hjYebOcos/6WtwMMdf90iS8jo+hzF8Pk9s7CGfG4qqEDdqBoEKdTepeMjqb7 9jb5zYLTy8Sy2v02YC9I33CamYwqfRzNJYizoL6xaExUtgLulI3m7b5csHc9 rxb36ZwGsw4j3J93v/k6cRD35Zym9ouMuE8nGoY05uP+PPtx/7nt/qvN+zf0 BO7HrSrq8xa4D+dftBEUwP33QMmcohLux3LzpIPBuA9zigeEUnD//fUkqDwC 9+N3VYVL7FoO4CLte3u7/+bs1TjJhvvxG9cciSu4D2v7mntu99kRi6io7b5b ue+eTgXut30uEvOjuM/W/DnlVIf7rsrt6cvXcb89q/a64BL2P+9pzYEEHA+e 6p3ZtTgOkLxm2Ij911/JcSvD8Wiio7pZhOOw3jd69QL2X8GrI08Ux+PXjzv3 63AcrlIlRU7QLiCDsJM7Hh+fBrciwRSjfEeQ3T3DallLgIFGlnc6t0nItrZW 7DWXPWjV54rfw++xjn/z/FQVCanY8FmZjzqDylOBd3O8JPTx/ucG5R1EeDDs ltyU6AAMLXTFH+hJKO1ZQlsUNxHOFPoc6Ms1h/yjlaUbf+bRlZBmxyoRIpjJ ZdcrKZuDZs8B488WRJCJcNFRb5lHDNd93bP5zcGMQZJ7xWwWis7li6y6kpHu Ulb5CyUbWF05S3OcdhZOIS/GwUoyKn8ZrjV/2BZqY553qQST0PIAJ/1IPAFY 24d+HmvH74Ie1bUmXQp6+g52KgvOQMfI+VDlMEcYODibeIRrAQnYTr7x35oC fr362JtCLrgXM9ltlFCQhrqqVcrzaTj1g3faLsIJ5HbqXRF4uIDItOWydBq4 3wY+aDWXcYVcNVHLfMYF9LN9PkqabRryU7dqvl1xBv+W56OFC/g9Y+EYc1CY hPs+EGEm7wYdiuql4yYLiF1nVMEoegoephuxx9O4gAy7TudH1UX0hCeuapAy DhZHVVMZpN3/p+vMo6mK3v+PZI5SJClCGQqRiIZHGmWskAjJcM3zWOaxZIiM JWUKDTJVkmxlzkzGTHfiDriRoRL9Tuvb7/db6/NZ3z8d6+6z9z7Pft7v11l7 Pwf8jhh+vd47Ca7vkHj5ETpyTPv2OKDYA2j32l6r9eOBKdhvYDGJhjwDLZN7 JN1g7/Yt/kt/plFbsYx2mCwZXr4pHjbB1t2rSMWoecz337CL7/+IccDiCCnM 6qUtBMweYuPNJMGth11KUkEURMzrenBJxQuquHdVlBBJsMjM31F0HOObL7H3 2ttcQenGZQ0jTBeZf72d/Ynp5PpdZ6FBTB+NawbC7vDhIXtM8o0VPx3VcUgP aJUFguZDxnIf5m+crO5X/fU74pFjs1qYz6lxNX4inIE912lTMdHDRHiv+qDl QakjJOtJKe73+Htu/I1nGuZToqzVRdkPOMD+aodyyQkquhZ1ayNzPwE+TJ+4 eDTcCeN0bUubFjpSkteQ0PqIcVtpS9jIsCdcnA975sOgo5L1Gm4m1QmIyGuT C5f2gvXkg5IXIukoMkOy9r4RNq9HtlsX1nmARwnf2wKBGaTS2pj+7sU4fKo2 W+729IKo78aG4g5zyLN1u8YUtQ+M8ex2r+SDQOXb5ycbdzPQryKjp58GOuDk q7Dqk8WhwFtc4aO4l4FGz13+sMWiA25yym03fhMKIcObLTazU9DTyTZ+V3Ey nOW1chkj2sFtx35ld0EKMnXs8ydtJkOdheLh6AZ7SF+WXOMm40EjYqOyXgzG BUFV3NZS7sCQbR1bekuAcN0Gc/lFLA9Z2Jyvm3GGnNXIeeZreGDbWZ5Rh6ch 54VA4XW6O9gm3z1KO0uA9H5Lq1OnaahhT3jKHx5XuJAWl2VhTkFpA7W/S2tJ 0OTj2Yg3doA6a9zqlSYKuvjcu3lEgwQ00phsTZkzHPv9YFPqaSqS12UxcMwl AkOF+7KKoBecViCPZFVQUNZLH3rFFcy3m294pDViDwsN+nY1ClR00jb8lOIH Igivvt3yJNAZTD0ufFCsp6LTecOLQqsEyBUtU/Vh8wKbO51xDG4qqk+wtEqg EaHviLui5ZgDpNJtpoXSqAjXd8+jSZUIce6eM5wcrnAjeefqvWM0xNJo9YJ2 kQDJLEm+Z6Y94C5n8cEbN6hIl/Op79QtIiTvV4oT/+4IjFJ7JsmfVPRBupi+ pYwA7te/qR1ecYEUkvHme6U0FNyIOjUK8cDyY0HxGKcnaCRqfVYwIQHp9o1B FWx85vn1r0aH7MHW+4uUdDoJCq3Y7HqDKejUvNFvq7c46BSU7NYeIQG55bhx 4xksL9LUUtnT7GCxzqL6Pjae9M8WOnRsfNZP5J6oY+OSG66aHFEjgT0LS93W dkxvWyb/aPvYw/ep/Mbzd0iwPMwb6RNLQckfOY2dduOg7Oje3qeY/9Ma2p5l kjIJ23m9fCtveUDV1UetSsV0dEc+ff6T4CSoJ5gJzDN7wprcysTDBsynpddl XTahIJMDG/P2nHOAFKMH92K/k4Dh19+5pkBBGQMvjhRx44DPXkcwCcsX/nOd XlNY/miWU9U9stMOZGuNslkx3T/UvnsqAdP9h+eEGkMlL4BLsKeikg8RsvQl mUNwVLToEiujHOwODv1kB9NjJKSbkxcj8JkCR4XPesQkagLO4oaDqTIZQr/f XdRcmUaqYrvrf2n9ff8wfjIb0/1PMVXZnOIUxJ5XWMKWZgNX9NJ+jS+TQCye Wi8gR0Ej9j23RzidQVO3QEK5BstLvzIX/C0p6FOFZuHLImdwXz7nuvcVCYRF 33ilOVJQG6HizeQWW7iyvVPHSoMI6jEbbzxMpCL99brgPyR3sGF/cnS+iwDd nR8MWwlUtK3e2z+oxQO4+CfWW2oJwDpef/4Ig4qK9CxERWY8oM5du6H6Vy5M vLdNtfjFgK3au8dtTxwAXg/9ec7v0+h6cVyEqBoZqoY5MgaZbGDTvPVeXUwf L1bE+7Ayk6GLGrbf9p4N2PBqZ/BdoKDRw9v1zvST4FTpB7et1s6QW2ZO3zFJ QSfa+2+r7iHBh7QkW/kgO2i7jHvzcA/mB+akfu3tIoLtIa+771+4Aded58ti 2PNgNQnSN8eeD9szNY73N2ygsO+Tnu4oCag3L3KxnaagSbUt+xf0naGtKfXV 0zIq2uzZ4zrET4SfRzZP4MEDuIW/bz2ymYZS1Y+bf75HAKHh79tf6XhCiP1u h5PiJFCuUXuvOUFB107y3SUF2sGZ3UxZ+7B+8C+uqfzt16bRTN2HWH9Im25E DWLtcnWzmxdi9/mKzxrqxdpPzzor3I21e6O7be0Qdh9/FrJ5Ktb+o+VEc7YB TO+POSaVXiXDdq6vDnZd1vBJ7/0BXcY0wm2lBBkfJ0PaZUfr1nlrCHo6tVY0 PIuIj3/KFPANoseduY6bNB1A/+xz3E/MZ7IcMN0/IkIG6bLNpTFuNuB2SiSy X5qC9in3b2hcJcF4OdPr6t9OIKaSV86FxZnUw03JKVjceeLtiYmYr3bJrCEo p5MhcGfCQaPsaaQrZUJdeO4IGoKhJ30LyXBq63tCUOI0evXsSZEkxx5Qqu6u YRWhImkRBdlzA0RYMUC/WcRwcFmZ9WmNEhUlsqpxXnlHBB2HtiD47Qa55qYL iYpk+Fb/tKDi5zTKPmpIz7zpBOc5ZO34ucjAF/G91EEEm2e+yowMQxsYGb3g lIbF62njTSQcFr9PRUl2q1jc9hDN3xbkUFF3hoeakTTG5V/03eu3eUANPniw awTzuycyxNyEqAglf+os2omDHcqp6RyRJPDzUCocTqCgWq4bV28O2UHisebG L1j/tvu/f2yN9feFalWVrBsOTu/z222ItcuTuvHuU+w+UaTE9Uqs/b2zT77F 0fDQ+/uhRXwEDRkM7DrOVekFvRz76T1ECtrxiRp2X4QEOTGoJjLLFUL2b+v/ fISKjmYpiueXEWEu6o6LZiAOIn5ZnGXH8ulF45jzNlh+/XGyNC37izOcaq4t wG0kgc0VKAtbpqB0j/Pv0Qs7cJKF0Z0VRND3d7MqUKWi/hcSHSVBOOiWWPbR x35/UuupsxDWnnLk9HPBfmdYS9oqMzoyjXJPn7PRMiTDI3GuMvyINQzEq53o m55GGgZzBnVnyJB4caT0IsMadNXm/fceoyBN1re3AskkaIt/ycJWYQP3rqvf z8ZRULZmWn5WOQnKsvoEdzY4g+8JVdVUPwpyjj/7p/oxCV59ChbjXnUGfZaA 6Yh8MkQr8ZElkqcRxJZ17k11BPFu1Svj3RSUH7Nr5+9DWPsnNNbUjO3gEu7K ja4VCrr92QhXs4EEn5TCfFgWXEHTkt7W9YeBirs4f+TcvYncI/nmZy5eh/LO KX4ZUjlIz71ye0ploMc/c7cnVVsAs1278mIQFe0/Prz4/goRLsoWvTvy1h3E rrApqv0hwc0/bvGjeyno6h/LUy8f24DAVPG53lkqGo64u7mljgDeVb8HEtUd QST+UXXraxJke9SXzNhQUHVC6+flamd4xrLa05ZDgrDXp40HfSho8wUvh6FF Z8jHr0uYHiZB4D4z/Y9dFDS4N7S3w8gOlPIVahqx8Vw8UTndjI1PdfVWSsO8 KxT2M41zutDQqWsBL8q5CZDAxrHxgpMXzMRycC1TiZBBvhlwgwfTecOx67d0 3GCmkvz+mwkRkgQsvbZi40u5dSbVVsABagt/XGNqIkCLWNrTP1Qq6lx5dlhy zAPeFeFV9zMzYKZpS/uXF12o4mrdZISFAzSdtGSO7JtGMRIB14KukeG70PsK m35rONCa/4VnFss/r72fTQAZUOlC6u9f1mCGqz2/tXkKMd7tLJsImAKD5qX6 n+s3gHoZx7fuREHFU1f8vF5ivmjXm2yWPmegP5XoeOeF5Rm5Hdm6+di4aysf Z846Q2hbyqbWmxTU8fb9qZWHJBidPit9QMkWnls6WvhjceJkIxd8GIuTivtc i0ftrGFwB3OjLp6CDivZnHwvisX1JOX3xbN2sHBgvqgY466Lagm9rRiHKRpf 1fbH/JuGWuvh1n6Mx9Ll2shyJEiN7OXkv+EKZ2e6GqPHsPXjZyJiJoldDzNo EQ93hcOPd92/IEFFtZPWFN4OInSl7pTYr4yDRZvZL/FSVJSNv2uf0UwE+iHV 99tb3KA42ejkX/0L5iBxtGJ6uOn2k0dymA52DH6V3PiIBLW5pT3kAAryetJx bFzOFkarzxOX9EjQfjCvvLmagpi4/vDzLbmA6Q7fkd+YzxGpvPlyvg273owb qlNzhXPmfDHfjEigV3dzjf81BUV49H+6pGYHxQNDnWM/Z5D68R77/dJfEUGl frqc7gpiVTJa6UdIYFYxn7arg4J8RhVFZqztoIPzQ+M+fhLYNr/FnZrB/MON ySvHPO1AZWFqS+EQESwOqIjvFKaiXu3wunOxbsArdWbOp4EIscirY5MsFRXs iWC21sOBt4Gl8LzUVzSEZ/ejY/cXaTl04e2MK1yeDj0rQJhGG3h3hSvpkOFu svmfLoo1rPaLONZ1TCNDZ87n+BtkOP6ua1bvpyPc0kgfoBeR4UMES8TuhGmk OHv4o7u5NdzOMndlxnRkB8sP7RFMRw7mTwz9uucI7NwuGqeHKEjSf+tDgiwJ uC/tu9Cy2w6abry8oX6UipLvCc34lxAh5osH7SC/O4g8yplKeEqCXQSXy70e FBT+RvwXY8oZymrW3ezLamBQYf22VTsDdZ4NprSynAAWZYUP51pJoNanJnzZ kIIU74/HcUU6g4HPa8pr/WT48DF65/N1BroUMsvhP3oDhn449tljfnF2bOZD MOYf5dlJ43ZJznDtx4JUI5YPiV9uevpj+dC/2tB3N5ctOLRyvK7EOOKqfWLy OYwjfqo9oNNznaH0KYfZ3g5MV3KNbFJnCSDWrKYdc9cDYr3two6QqMhKIU6X vZMAPrjyI3KSjiC58jNm0wAV5QmPjDjiCfB20Od3YD7mH5IHrYI+kSDIby15 tynGSdekixfSnOHy1dvysgMEqLcSnNcdp6LL4T+HBn44QG9iWEsjPxmObiJN NG+joKb6Q/TaeieQLqcEncX09XHTVJw6prfDPiN3cqNs4IPnQlYRlv+zLR4m fSWRIP4AJe37EWcoqPLepqlOhoPVcRIcC9OoL2TTi/yLNtBp7cngopBAe9Nx xjc1CqJ3XDV6VWkDn8aztp9Mp6J93wSCDqsQwTSisU3ipzvIu3YpNU+QYPcn vwGekxTk3398dau9PWh9NjywIENBnbwUStQvElz+evHsRk8bqN56IF0Sy9f0 YI7TrExkaE3Xfdk27wS7RXGhcocw3+izjzLOIAGHGmHHgQQbiFJgmM3uoCCL xAopOg8WX8kRElsCbKAvOeCaohAZBOuNODdvpiCFyS17lU7YgGjeus5ZUTIk PSSG93BSEEcZme9WgROsKh32TQ7A5t/wg0iYOZaPk374/nnuDgZPy5v2+1PR RuHAJFtLbFyZO0fXvtqDqNWrBQKmu0Wm245bYdx3c6dRXGajHfzs9s/Y6k8C wZ6NXz9nUNBJZZmH3Z4uoKqTHXkkngRndoGSRAwFvRJ8Yaeo5ALKozYbt+iO w+Xs/kQz+RnYE/P9SYfc/9+PavRvP2rPv/2o00eHdd8sUlC8u2DkWXYS/C5v i9toFArbD3RHfcZ8uHOToevpI2TYT6qfWK+3BZfq5D6FAxT0Uvj49tkVLG85 RbUnsNrDieeKa4vD00jCs9dZ24gMJUvHfE+Z2kCEUPPY4HEiYsrLPS+TQAXU oReSe/sBRFedS8mXaYT5CbtqXAIDJGZiu99axgMeeeg+wnRxt7n5pu25GP8+ SGAc+YaDxkvWoeGpJKgSKymQDqWgS+OK8QfW3WH4P/Ybf1b5n/3Gdz9FFoT0 UVDwFI/Xh4MkeGdqc+7HJgd48mq+2FmLgpKarKu5B7B59QvaJnHaFhoM2j59 w5632I/FehL2/DfNF4lS3O1B3yio7LEQCVYk17esT1HQ9UDHHqK8B3SJi0Sf /4UHv2K+8Q/+NHSG6/R5B+FgIN9/3TqF8Se1JLp+CMuvGW/cE59N42Cp9cXh DbpkGJ01iLqKn0Y2LzrJtxpsIXj9YveRj9i8ry97HDHD+HF3bN7UaxzsG8ks iMbylMdasYIClreEYm19/U+5wzGtTknZIio6xTJUlSdKhFneDw86RJ0hsESk NxDTo/Yfh5ba24lwN+mkhPUvezhUfq1juycZph8kH+Cvm0YHnOV/FU7bQjK3 zQepzWTwEnJd376dgo7+2HP0z6wtjPh8kqcHkMD1QvL28+kUBLa9KV9E7SHM /uds5EUiWJ2gypaEU9Hae5Xi2xdcASc0Xzl0lo5GP3YdM38/CVlXzcKuunjB HPM+5n4RGopuirLeFkKAmkkmt2uCrmDZFD83501FN2LXlvOtiXCpwFQpmNsR xi/pCzlrMlDsM6FjWpfbgKv2yTUl/ruQbjA3emmQBDonKo9dPk9BB7eXRdVu tgM2XLnPBDMRogoJ54/XUhHL9IUk+S8uwPxSyubT8Bx6fFbaY/taN1QHMff7 VIfD3IKn6dlVOipJskTePBPA3S8w5JHtA9lHtFctU2iI5anP66wePEiEMpYH xNxBSa0jdReNCD+4mrdewHxU2KfDhls5HWA+7fraK0SAzMNCCplzVDRL62AL znCB6g0N6xen8Miy/mUvdxQN5UzQDhMrkqCyaTtnUjEDyUsI2A8Ef4LzjhO9 rTlRwLSy9n7+xQxqPWM0vQM3CszFdzb26/lBiv2PigjLfvglcM/AVWYOnfwq mYJ7EgIM4jbRZ/eG0eJSwHui4SxyuWg6Pex6DxJu96rh1xhoLIyhlKeQArc/ 5ZRPnoyBgyeMmS2UJiHya6orbyYdqcx9Gkw54QWBD84dqknqB6aTEiORYnNo 6nbSD/XSILA/mOHk/acLkRUHJAVX55Cw82uLX4FxMP3EWJ8sSYBSeeennWY0 lOJbqLoJe46s79+YfV2egH0iu3ZteEdHPAGLF0yNvSBXh19qaccAxDRJZ3ax z6FqrbrEEhQIX69VyTX9jdf3nzo2Y/HbFHbO80SXE2wSRdfd5vDwRquN92co DX2UFLv7XMUVpjlLmPYfm4Df6S2OLHN01CNX0TuJ8dFl1/dfviA8ZClE2Z15 QkM8PH3F8Xtd4ULIa9u/+/BXW8Uy/u7Dz+P/KFVVlvRf5ztS/53v6BBXG62Z J6Bv/qtua61UYGFZ+T76POB/rSvCatYTWINx336lLCcljPs0tujJ/bbx/K+6 Ijf+1RXJi7unvekEBdUxZI6cJZJAf5povInJFia/RL+tZieDjznnU/fdFFQy 7N2uiewhpYjMobVEhGx9PrzRBkz3OCa27vHxhLilYLX9mJ8Tag5/0YP5u/LD LfoGNzGfuaBA9juP+V6DZ8ftyNMoLRTfRZ+3hf1p+uE5xSR4/rB48bgbBX1v 408N6bMHcWtzpm/Yeov3i2d7iq2/6P1+J98d8wLVC4mvVLD1HDWbtEnqEhEM a68dCbFwgtvSBSdOMyjIPX1zlQMvCeraq87y/8YBW+lc4iY3MkSayxJ7Pk0j GefvVdG2NiB1KmL7bRYy3LvUcPSXOAWxuv9aV7piB/Qv6kkJFzA9TrMwdazF fBBVMLflhz0UEyyunVmmIY6fYbRNx/Aw8FhU2pjJExZeM8SPt1HRtU+6U2rf CIC8zn1NMXP+X/exFz4K0mWuIcGMZantM0sKuin3/IZQC8bjqXoClVvm0M6c X/OxxH7IHXC5tMMuFNx3SJSdN6QjrVnTepuCSbj4yDvgTKUn9OGlWW/x01Bz la7Qs3gC/KZFpN+66gIpteOTg3eI8GJ/U3DRFSrK1S+W4+9xhKGU7mGdv3UA 5YyObXsyhZQbRGLXjZNhA73sl1AJHQ1u/yKqwzsJBVohMZeeeEHbnquN8iZ9 8PoEm/id0Dl0SM+tLWclFPIWrfxON00A9c3a7GITHTWwnUxewXtBrBl7+fwf PIS0h3pv96GhHvvjj9g/uMJtWZv14fRx0OmqT760cwY5RtgH1dd5g+q+bCMD LiIkNJM2sFZR0fQmXYugbgfQ9+3iPpSFh+P3DLgJb2loa9RY+9nnbrA1wqXl qcMYvIt4ZRjhNIPWnzIVZST7AOwObOYanoWCoFzBgC2DaLS9/ZzdrjAo0ZkM vH1rDE563R14aTsDB3KcZL0tk+BXq5du9F08CMUPENK4KHDkd93H5+GDEHJx 260WzF89UWgTlcX8Fe/12f6LUn/Pj/snFJpiej9U6vbNtxV2LxmqJbOmQNfH jpeNjXQYWZeorNYYAV6cdwhurgdckOHGhm90dCXW/KaA4gQof5CpOswWCabl esSU8ll0/sYDT5+eQehxVScY3UqApVON50cfTqH8F2en87KmUKp1QeUNfB6w X+ZsMCGOo5d78i7eZ5pBfRMMHsecXCi/NuNBSmCgsIsOtqrrDaihMa2yzycd xn4RvdhCRkEqWKhv+OkM8veXiZqvDoXBQbnCVLdxoH4+4rlr3wy6P9qd3EkI AiXFu9F63k0o5ODmJ3YhDJRnoH156et94CSvTah9oaMN0pa+TYkT6IvFo1Oh 02kQL6TJkfAHyw9nLBR3/MK4KnUjs1QRDmING9jbSsfBVfrzDtdtM8grSDz0 YcItWPNxDzm8GYHBppCF158YKPBKUIoHugufj3de5/hGgrdRY985sPlG35lu ki7bAu9Sw+iZxAkYvuBzDyMoJKqqmOxX5QOLqxT3U3gGOmYZYn9u4TX8HP1R TdS6DcEF2s+rM6iIwRXioK1MBI37dj/v33aAihzQDhzG8vV9u+ONowS4vyq1 596sIzz46Plp8vAkCpoT31abSkc3yki5iXpJ4NY9qEzezEAxsbx5zXmdyOF5 8EeF3AQYqwhY+PFzFpFlcvVSbQYgYrIpb79AEJzam/Woz5iGtLwsD+w5QIBk s/rOUS4XMP89siiaRIJHNbPs+AgKkmVLP321zwE+fA3/NknoQk3rCvj+33PI 85s38QdPAigHyMTa29IRl2/UW9OYSXRNO95lYOc9uC3l/OS8ryt8NuCVwP1h oMn9n/94RMeAaZPPiqYOAx3VPj1hmP8Zxpu3bjy+ORzaxXV2Z/5mIL7eF7O3 mB6ia1yLWQntMfBaL/Bc5N/zAsZHwrWx9b7H+Ivyk833YMTpdPK12Ulk/Ko5 nLKPjgycnG8rXUmEkIz2rk9Bcyhy3MtB264PXVJ0CvztFgcfVi+xSGDj5MRs YC827lqyq3U1Nl5iZ03ngkQTNCfcensgkoG+JGceYS0KhxD7bXoyBzvhovDO sGwhBrrpUbNXlzkMVviuvx+h9aGI3vctlvZzyFZtTmdCKw6OZioJRP6goa/N BgfWVfDo+phv5p/4BNj8h3Ym6RsVfUuJ5GWuIUDQBRmuDdvvwNlXX5VMs3vg UqartFr9HOI8Vl0UfiwECvcScmP0qPCzZNeOp6lElF+xpk5fd4Zp88ymOE1s XVdM7VgdI0G4XLiKqbgHDDiNDIULUZB2mN79IF4yLGTgHYPrXcEwcoS/np2C LgwcDMzbQ4ZOBo4QdskOTuuEarwTpKBCHNNCMuZDTVaDhVuZcBCe+MNmZXwa fdj1puOVPhnjh6MmigQbePvvXHDHv3PB3v/OBat7zMcqipCAUyrw+iiRgo6v 3dpnERoKEtyPO1PnxtE1JsFuEssMZDx30/KzjQW9WsGeu+V08L8mvvqeZRLT V6Fs4mAarJr2MHSGZ5DT7/blByVfoTL81u4NfrGQbBxZHyBAhs1fJje68lPQ D7VUgqCAPYwsyW6xasH4/076XpsTJAjmEmc6q4yDiq6Q6XdbMU4vXc2omyTC 7yMjQh1b7IFzvHg56jLG1cMqeqqJRKisWbF6yGYPqg4Z1ZfksHk0ZqGeG6Ag 0sffk0frcWDRWa0vdZoEOXVsa8/qKUgki92xQQ4HW28dabjhQgLdI1e5K3Mo yJjVx46kZgej7HURRhtIIGTKPSnzg4IWn0FW1AMsn/Q4ch8doyHS5+InG6zx IMpuXrxhuzvcCXsna9ZMR0s34cNUwwSYx8d+2SLoBTEJd1UEr9OQuuvi85Ld BJgOEPkyHOsMFS+UeZeXMM5ZaK1JwvTaoqtpNyunO7wkkskr3US4Hst56LAY FYn7lshE5+HAw8p1rxl9Bm32Tkr3sP0KysrdHrQvvtB/KOeqkgoDqV+1WpdU bYcNghNvzU+EgcvGZeeZ1El4Fd5bUWZOR7S2BIVnhR5wKo7g+4vvK2ik2FR6 /JlBS/tvz8ht9IPDCg/q3cNGYXjxwCsXLD+7B0rr8KT5gOcTRa8v5AHYHNhI SMTPIv0udYkYv5v/dW7X9t+5XQ2r+ahmkQkYrBF3alymIxbPJdIZOua7/vlA vf/wgd5X5T1NAmiQveoo4vENj+q4m1VVLuVC9V1NmXKhGdjyveFrYuI46i8Q HmNteAL7//lD5X/+cMM/fzjWp3lCN3sK7g0W8gpg9xHoKXCptn8AmjXd7qVd n8Gx7Z03/gwDdMmJ5rX3n0Cu0NTMn0wKKs9xZs33JYE9d8zjZxmOEDIw23/6 EwVVmO7UHjtDgm+f3Qr8m+z+q+6c8r+6c/95/di/63YKvzqn16bRIfzHmP4D ZFDZL6Vb5G0DJ0pMJO7PT6Pwa6kmTepkkBGumalntgGehlzv6/uo6NFOZfS6 hQiDAqWLSX5h0P+v/hv7v/pvlv/qvy3/R104zX/Xn7qwn5DmG0AO9BuWz1jn YOX6kah+Wg4ojlwVpmPr4e5ILjn2AAm+fvign/XFDhrKQ97Z3SPDmrOoXUr+ NFJ6oPzyaJkV6BeKr2/9RQGJGKr7IhMJ2QiVPeI5agvutj5buI5jfro80F3p BRG60oeW2O7iIK6Uu8HMnwQ2x7QL0zIoKFOT59veGVt4LNoSORc8hVyzCa+Z P02BtdpBJ7KrB8ZRZx4ZdU4hPRWpUGfPKXhYcJP7+xFP2CNouOLTRUOZdz+/ UPPHuMSq8vFPKTdYqt1xiYLxzIaTQdl3ML4pv0Zb+6LnAhIk8Z0LTCTYKcx+ jecXBRXtIKhRnFyhXu7BvDuRCLmJ7F8ytlDRUdzi6/vqOMCxTAjHYb8PiCjP m8La8x78VvYKa+c/65Lt/VeX7Fme2IUORyra+DTBh+JCBMa2ttsPJ1Mx/yDU KKBBAWlmkdCIZALs2JgxQ9naBw7FLWEdf4jQ3FVCzsT6syCTN8udHw7lcs6q uotEeLXkY7uflYr03OLU+7mc4M0GhdlYfgIkbrnJ4WBPQ1cD3VbGnziDEoE9 zeoGFd3Rbj3JdgvjGFVzg+dmtzF9yc1SOTsEF3xlvfM34GFj+rzyzaMUSLoW NlAWNQtlnKdlEkqGEO6ygoJbbwzAvkPhbpWYH2J7mpCziYo0TORDLSvfwMy/ +GH5Fz+n/8XP5GoVqTi6FelxK27EmzDgiLwuPtQ+E0LjlnGGjRQUf7NAVEyT BE1vf9gzednB1fIBHcOFOaDZkl9cPtuNbE51dViaRgB5f82zV/aTKOEjjT7h TweHqmabik0+kGZDO/PpDB7RqpoaWL7R4Hiw7YMrm32BcFKHroH5BPltOkt2 p6yAuPNgJYmYDec4d11PfDKJmBcJsx4GdCTew3zXxyYPmArhocS5ORS2a/SR Q/kXOH5O9Udb+B3gs507SJXrgVc8W1Y8eucQUzb7PeO5eJCJPpbeHzCHoNc+ 18arD5U1zUVJRGTCGU0FX2bs76Li+ISEm3PILIvlR8yeNGh8Jq2uasJAzGyl F7iqWiFbaULQoCUW6Df5jMYmeiBrTEzB490cCrh07ohTSwwQGSykg0M09N2c 4xA/Do8OcUeWxe9Kh0iRexqSje/RXQ+pK/qdDPQycMG5PzoZBBNk7xzx6AP1 F7fX3AKxfu30lVPmiwTu3JcGD4MZyOn149fG95vQ+8chn7MMEmGvgP5vZnUS fLwq0rXYRkHmGzc8dvHDAS+vsZqMSjmY6U13ldMYiJN+jqn4cQwsjeHN4wxn ketPzw2KycPotJXOklXwPYjwm52OTKKhG/eU6/D9eIivJCaI2rkCjr1FqlWr BuhFZe9tOrB25DfKx4lHwaYtu9z8xWjIhtl77pg/AZm5sy2bat+DYJWfla+W 6mGH9hwd95CBIqNZmNPLI+CqiQDZ/CMD2fL6sN4ORvCd27Rq9mQkFB8dRseT 51CHboFyCrEXccaVR65nx8EsY1LavY+ANv8wSBKdoKKAlP6l/R8SYdyUc78b 5i+3HvAsUNjgDvIfuVFNeTSMt3axKCtWoBBXk8JrFAY6IoveaLrchoxund++ c7Pocm7k2M+cARhdrxO1VLwFaqUCY8xXZ1D11fUH116OoZsx7PIXTBKglON1 5UIoASIGCxYid9KQyfQ33KNQJ5gaTlhFz8dQtB6nozv2u7FftlkfFRPg0eM4 F9fOAbD50h3BNjWLvp+8d91A+BbIxM+F9n5mIAdehuTJpRo0kHlx/4mXt4Hy 80fT/h1paKRyl37KGjYOtiMOf6jR8GJceN/7JCrSPYj/LHqMiKLpFtszSAlg XcuOs+AZQJf5LjWXcc4h3zS2SRvVODD9V88H96+ej96/ej7/t87P9X/XL/y7 Hns5Z+L6fSKko60uhwyoiO3CWtAYny9Iid0PMuiYQ95xKXscDvegJ81XHONj c2DfUoNXefYUOvT0lfPNv+dT6+qOfYlNh0lBIWE/r34UftTylYbkHMpUqTWe sEoFguHQ24SHM0jr2TMju+JR9Oja0geVnAQ4unGffrgNA5UedJjLamuBkaax z0/IYXBGp8SI5ykDVWpdyOPAf4KEXSsF6mwRcEzoUmUttt731PkujN96gKD2 kUnkYjTkaLJZ8OzqgChLZmCSwTjS1vOqFyUU3ma4+CRi/cuPZHppjPGCymK/ btieRBC3DFa3SR1HX7n0D4ti/K59mKH3pj8e4v+jLk3X+v/UpfnPejUj/+rV aM2KuIvn9MOJcZ7jwc7dwK5oTB36OQMS4/EKj/7MIZ5+ocvDxV3Qsb2nP5o7 FQ5RBQmXQ4pRzLaDDgZLDBTu15GrLhQDjw8u/+AwaEMPW4/1F2gykElLb3/g /tj/996s7N97s+Z/783+833awr/r/+krVP75ion6LPEDuTNgflHj09d7oyhf P2VfuV40OEq126jkT6G3DL0eatYU9Ih5Z3q2e8Dl56ojz+hfYUbsVuKhthl0 7IVhx+EDvpDxarFWpIkBZql3B0Vka4GmRvtWg4+Dl/6qcvfOUlBDmnCu5TAJ RGWfSp15bAcPClsCDRAFcUvbq/hqkaBgOPbknkp7CMAFXQ1UpyCOgaWnuGkS pHxbtjpsYQeKi0YVJYZUxN3/c+BxPBF2rOCRjYYXHPYlR174Q0VRzYNt+kUE MJpUi3UOvwkni3KIAYlUNF+ofiJEgwja+f4J8o+9oS1v4dAinQCf4l3PanVS 0d4IMes/u3zhYensEr8qxqeG6fOdXyaBkvDmNv73TZDq0Hkodo6G3k8Fbq7U JMBSKvn3Mw4fENlbnlfpPYMiu1Yd/c6MQTUoHuDVCYGs69f3bthIR2Ldd8Q+ S+LhurbtrLSkPzBS6u6XHyOA633isKE2Ddn5lvUJ8XrCPiTA+usuAQhlsmNF W2lI+ISUQNWSO7yQL0sqUsdDZ8rbLdtXaIhKy2k/t+4HGZat0o+xvOY/qHDa 6AsBtmet4yI7XWAy6elh3UckSLtrIVYYQEGC5zVOv7fEgfM5lme9smQ4YxGZ 8PLPNDpv5VG3g++/607I/3tfJ3z14IVLhXh4E7o/NLKUhuR6H9WqcnrCBK4l fqM1AQpu7MQ/PEhD+7QvBDjwuAOfR/71ExOTsFfw81D5QTpqO/j+kImXN2TX 0x9XY7qgEzwcFo/pAsz5Vk1Yu8Nm0ZF4zjczyHlxVlFMcxRcrwrUTw4GwNyw XtqXQ7PIR6lvT4zsCHB14s9cjw6EX+41AedXSCBQMGv88QAF9TrH4NIEbSHT mBRo/4cEmgGCULGXgqQ/We807LeBh1sEpIa5yTA7eltrUJiCnFaeTX1hdYSk 5rPXBbbgIeWS1O+4LXQkd6Y2wZLdEx5NdaN3RgQQoJvtn1Ojoambyrxb3rqC /oHjujcfTwL3fvRk8god3e7jQ/MXvODQi2sPfQpm0R4IXV3ePISY1mlv2kOS wE5YX3BYi474Tub7BL6ZBM1nBVkXzDyh9hxxce+DWbSJfLHume4Q6OvXOj0O DoTS2e5XwQ9pKBpvxrzahIfKSRaJprNu4N/Ho3CCl45kCy+bXxHEfOW0c1AZ lwfmu0VPBMvT0AXnnZK8dgRYx+1MfNPuDPoXTx/mt5tDy1PHX1n+7oPV80IK TWdDgEfRylyhZQ5xbPYz077VA2edHjcd/hAKJ5/Lcw/2MJCn7be1rSzvYc/8 wXf71aOA8+5y8N98reFbVfX3ux6HCUxJrkH34PnlV1fFKSOIxpaZ1c0+iywc Xqn4syaC8R6HGgGjGVR2PSyyCo3BJ/9zfg9MfCDcOq8o8NQs0iPJczuQhkHp cdLQLukAmJ2KfSv+agZZzvOnn7UYBVRizilV4QtGQhoVd2ZH4EfodxEPrP3v XRZc0gL+8MjJLvaL6RzaoWwibavxBRpeXpY2JAbBPslNM5sxH6K4uzh6KWMY NhzKWJJb8Ict3j2q1h6T0CaKP1nhRUdnvysbIQtP0JNIaxGuJMDRxWr7lWUq yj/pkXrhlhNc5FxkmusmwBpPIYcIgYqat+npH511BFyzmEJKKAVpmdD0+FOx vLRHvUkW86UzRqHThRV0pEuw7XdjnQTfntNX3eyDIWyDRepY8xj8KfVWbrs0 g+7LIrPR1yEgHuJZmrepH9R2lbTYq86hfMtazscGd0DFg9VUoHwGzRZTXWou jsJlDTMtL71QkO9pfX54zywqX8w+cDNwBFKZvAqmfobBttk3ln5Ncyjp5lvn 81E9EGnSVbC+EgOUkNvCn6XGYPOppu1GgTNIY3mS84F/MFhoWD9RXBiF7g7b Cp7YGfS1N17U7PRN4NO7RjIaHAQ+kT97hMpn0YNbLRk2QaHww2qvbc2pr2Bx /uXM8e8z6OZJHaMTioFw0GBe25yLht7dbC3gyyQAizdFrdbACTioN3qG7o+C yAy5sTdnBhWoC4z1yvuBjqt48PKpUdj1KoDt8esZdHjznkzWvX7gf1FOd3Af pvd6d/cZuvZDIPP95q/yQTCgdaJkOX0OBbcTD8t96gWBoZXjbvdCYJnzbK2E 9Cg85CmY8a6ZQUHTwQ/cR3zB3WzQwWZoDnF+qxLKY+8BtU3mOSVaoeBDMVIM 0mmDzTEzlqqnGOh1mQdLc2YY1Cyp5avsCIPtY25lKpjvu7b4tNigIBrk/vH+ of/g/bU+9yJzWQp6cPbg4IZfJHCnd3Z8EnAE0z2SR22UKWikYTHIb44EZclb tpyvsYHqVumAsIeToHs/xyHuKh1x7yOdlNO4CxUD3AvB0Xh45/jnI2qkIUPL Iw3rlAgQvX7RQfjCBHD4GifGk+io60Vl26vmHNiJCv2GJIlQ5p1yRjWfiopS NS9f1/KGXYKr20xLKcjjp2rLczMSmOI5w/Ss7YCHWuWQtZEMXmFBGrpiFHTI f6zVJNUG8vlJu80lZpAF77tTcHMcNl+vGK7R84ZI42t7EwswjtjI6Ud8iwft ARPfFBlXCPkYqJ9USkcB9Ucl+bgmYTpCxMrTyhO22qXyiO6io1NHJN9XrE8C U9u+37gId8h0rol6H05HZUaFbUomk7D9yp/t3G0eIKFm5bj+fAbdipDXZnEa hV8VjutfCT5gETsb/cq9EPqSuEN+LTPQruGIq0c2RoE2Xc6Tz4iCrsoy37Bs IUFsk4fnsa2e8Id927kiNwqKMf1iwldMAqLQJuK+nV5Q9XKva1wLBVk+C9Of OU4CY8XBrW98A2FHcVRORDkNhejdl+HPx0PDhYtCbAJB8P1lgRfbHjpaf8gl uvPHJBxg+7a/7FQonD9/KhffS4I52pLbHh0KSqjb1OCpg4MFPteseCsy5MsE ElY6p1FrcE7bKJMtMHTVXXntyCBu7cky83kavSJZvF5rt4GeuRATFlsisN54 ukzyoiJL5eNjYiMOIHJwvIp3DxEEdQbjRAqp6LPlWFCQrBMU1ynTPkcSocos VyzBjIrOvelTvXHGARorije+yCKC2/zU3p1aVLS1cnmbY4c9TO3nIychInD0 ik0S5bB85enMQ2Szh9L6jOUa3CRIsstZ+AXQ0VBJYhNrtyesMy/n+S1Pwvu8 yrEz4nR0cseEjO6AO2yIjty35QgeKPOjvf0/aGhGb/OVqLPu0K6tFv8pGQ8q 3puP7KiloSqpQFut766A/OO3GhpT0GtNmcCVJhKs+p8u7om3hYylQWdwp6CX d3q4vItIwES3ePxljx0M8j++dTiAACG8pycnMJ4Tv9zrPRbp/1/nMXf+O4/5 v53TDJ7P0UMZdKTJ7lw7rjQJjx7wbgu85Q1Jf1i32Ctj+tLG6TikPg6yLTTN BPADL/22jAg8Cdr3jNXcAwqqLQmqe99pC4/xoU58UvXgOlaGu5jHQI5Rst1M 0VEQ1PbKt9BnEM44+MWlNM4ijVqdCLGDQfDxK+vbzbFfwUY/RymPMIOyWeZi X6v4g4zUnxu5azNIGdOcgu1fwS2LdVTgnj/4HdIPSdvbCdbyhZPHdzCQkZMy 38KdMDgs3NWv0dIH79i/umS4ziHju4t6E5RgIF+vbmW4DUEg30Xy7vuzyKP2 vHFj6E3YEReJf6JNgBdcjMlVDRrq7OtuXrRxAa1cVkZuBgEMpjkOPcPyrj3H DvYOZmd4HiedkylKQZnWvS/s2chQEyIXmmhnB+9unCdtMKGgb/dnQlcbSPCu trLcxREHzVXmF1/xU9Cshaq/ogAZlMdEThqy2kHrVzMFcSEKmlY5/mqFlwyx /J4tLMG2IMvH1xnOQUFhEW74z2JkWPBV8d1KtoHZ/I/nKVg7SdaCsvPbyFCt f7OKXdsWmK5t8Na4RkVS1/aIECKIcOZOPclzpyOs82qbWcVR0evDHykVp4nw He9ASuR3gudqxMzX3VQk9zigr4GC+cevfln+353ghZCOwOZ5KkqtPGl3voYA nl4eA/k5zlAVKxtcX0lFCX1uhRW8RDC59Hq8ao8jaF3+fKTGkYrEi8qNN3gQ 4c60zKBvjD1QvkQ/PCVNBCXuM6nVOVR052qRTNRnJxDRfLFIxvp3XTQ6+DjW 3zqV8/SLWD+/SmTPJr4nQnTM8G82RSpSrOhJW9nhAMu+v6l54yQoHZh5ukGT gk6xajX1LzqB7+19rXuwPGvi0xReh+XdAf5n38peuMH1sbKJwktkeHBieVJ/ dBo5ndJmtbtvC28MeetnzckQdP+d35HeacR64bXwU0VbYOuejEnG4tyYn2Z0 6NAkaNOoZ3QbPIE2o/BbZZiOLPSzfgtFT0DioPXj0RwveNks9kIJSHDthch4 WDMF7XcxPfLHKxC+9zEbwzMS7Gp9OlDiSkHFz8OzZwPd4Y5CekhiHwlCG3xE orQpqFrlCdPHJRfQ1THYUy5NRekjhO/yTUQop5zapxhmDzzxa7hSLB+lcHhx ZWP5KcP8x8cjtx1glv0hjzDGTQ8zSrWFThLBCg0rSqU5QhheVkfAeQZNuXk/ CcCNQe0L0ZOXlrzB7Kd4WwOZjkq7VaMyrk7AgXtCBbsFvCA0ht5MweI5343j gS8Wz2WGJYTiRBeYGt99i7uJANkVyceZaFSE7JkV3Fuc4dI+lsxuFixPGoal xX+gogDvtNCcSif4aFR1+Lghts7ff7tv20oClvm1wc6TDhC/ad54NhGL2x+4 9LfhJHByVt4sauMMWRPiK2tjFJRikHK1WYIEIZsumoVPu4JpdrnU4kYqemai Usq2QAQnsSrJ8bfuYNVpeDbnEaaj1Tucznti6yigJfvmY3s41H7frADLvzWl T18MYvl45l70lQfibmA++nX9MhaHpZ0b94VgcWgveW+IO8AdktZ3cq7SKGhU H9dRvZUEcimXVH8FOIB5oh595SsVHe2XAMNhAkyKJYa/cneH/J3ebVvWqEhd oPdKynMCfNsoUCuCcZ9t58DOEjkaSj/CEieLI8BT14+3h+o8MO56G/ENy9cJ 8RsYFkl4qJJi6tBg9YWeXK4Rg2kKMtARLDknRIKf9n277tjZw6vvo4IRPCRQ lC+ybP5GQfgQqnDdmhMsxv9x18R4OzLh9SUvjL8dVr77rNi7gdzC+p/3qtj8 7xVq2ZtGRa7pGQe23nAA+3JiCgGLH4298/spjUQgn1cPfcviBl4Pz2Ztl8Dm +SvhmSULGQ77ZfiU0p0gxs5GzPISBZ07o/fxXhsJutLaGZ+CnMHuWqbzT4zL tolnF9VgXPbZ9IxWe6w9nB/tt2zUJwJPZtHxDZFUlHlXkH7M2BmKvAmRFTWl iCeSkOc1x0CZ24yE95TcgMW5Z2fnWEiQ52eX6v2DgnLM3516s+gKR2so3Otz 0+hZXvnTV8fJMJrW28Pz3RpwMmHbdfdRsXVSfuxgK7buRZbkL39ygy28S9WS YRRUmQIk/RRs3m4zHHaNeoK16qzv9/sk0FpU7Q7D/v/oM996XIsDXI7M5Lz1 hYEEbTw4ThlXw6Y2B32jLS5QqySxUplKRDHT7/YE6lHhLKfg4aJ1Z8gV/bbr oiIFHYveNsW0QIKV8KpUm+f28Pjf9xeY/31/we/f9xdOckYMhmHxI9lOIJza RoJRcbLMdmUP8CW0Lb12oiCZUkFq50sSnNLX0flDwIHLxWItPh0y2E56/5Eh TKP+tnfoo4grbLSe21R1lIpiItmlB18SQZqrVdz6tDuUd2wed82noC7GVy0B RxKYTHj9UdW3h22LHzx1Asgw1/wsP/7dNDIlJX/jG7GDa+Sgn+/Cqai8WszY 5yIWFwV7fdsvuEJD8s9f/iMUxEp8liElTQK1B99f0yvtweKoJ2F1KxmWiOZV NVsp6DY7d9TGZhxco2Wq+wmQwPJnxN04KvY7Cn9Aj447dPYG0QUw33a1OHpf GObjPrBO/MRvC4LbSeceb66wAhueR81/399HBXO9v0XMBiTxwC2idw49sH3+ yEmuByZzQxoa5uKhbCzcUXiFhgbm2Q3z1PHQfknmDW7dD1ysy0b/7jtcen7l 5TgzEdQbcxq1vrjAZV/1r948mG9r2NI0TSXCWmdwZSWnA2iJxr++m4vl/Xim YgtnbH5wyu2mx+zAEteX2aNFBs1S9mQl0jRCIVzLlo9swfuA7NH8pyTo+2Py ptGDgk4IZNY4kXFgJaDuOGtDhOzLDztpmD/UPJjbx6XkARcCVh/cxLhx1uT7 yxyMI/fecjmkjvHj7um5BmbPPtSP7znFe3MO1V+99nEoPBO+3no5GP5uDnWQ VtutJ3pAa/dJnk8tMeBXL8L79iAd6VdPp6tOTEKg3d0Nvl7ekHwoyPbvfscr 8qtlf/c//sj0VcrIcIGMY5U1nJjOVTcTHeMw3du6uuXEdmEHeBJSNWTFMw2a m3aONyhNoYQOf3lVCTtI6eUKsVomgZDYpczbchRUyrMJKRy3A2FOA0dJRRI0 aXJQ9vf9Pbe36/A4jwMEKZhbfckjgNjtPv4cFhoKsN1eubzJA3QuOL0gY3wr +lRfnvsv77JaFOlinHtf8NqTU3Z4lG9l2ftmiIa2FU/Y4HalwyaLtz9DA+fQ xu/3Zjvc+6DEfcNyAF8kbPkyYUG+QkeK/Qkhno8x7j6ddI9P2wtqIttx3tto iH7cYIAQSwDNQ5Vzgj0u8LawwiYe0zUBgsZ4G6ZrHddY63wxvy3UmLYsoUaC V/sf+xe3Y74pSXhb1xQOIiTnPnwQJIJNyvmjrSVUdLjC4hI93BkiZoPPheXS kbRgKLea+CT4y/PJ2lh5gfNdkZ+97UQI6LQU8JegImEW3epjv+zhzqJVZLAj AYpr50+a76chXi+bjdrurhCRx1/Y0U5Hh1p1E9rLJuDnwFHKtidesFG9hBxX goeyxEg59JyGaFcjv3i6uINi4fxDzjk6utrfcGbLsQlY6GRn4XjtBW6JImPz hElgzaMquMrTkcxkpDm1xgMWi8IlVBKJcKPWZSz6MhUpfBd+GY3xwiDzx718 dgSY0FW6EyRPQ6WRrfsy2p3BKcnIrp99Em6wLSgNl2G67e9WsiDqBbhlzZ0v MD5/OWDzshnjdbFn72WDMU5H59SS+Am9aO2DuWFA8hwKTK+4kZ0dB8KN798Y UBjIumSuXEqlApFiJzRfuNyGlkkzdYGpWZT4wQ32dA6Arl5Nbp7wLXj3Xtuz fZmOgnv4NUpEJuCQPgg60z0h0twkf04O498bo43+j6iIX2N9xD3aDUz91B+S +vGwUeXaWngSDUWUOsv8tHUFDnXD72YY395X7jQ1wni3wJld8j7GudEGrha7 OXpgdRnhLg/NoUV3s9NeWqHwWkEju+b5GHr3o+2D61XMv0TwsrOaJMBkuu2h pDUG6l+85ci1Pw1tuJT28wYtGkiPxh5m42fRBwWT5BjyAHzMUREb9sN8u5Fr Z9oxPMCx7u6FJRpafXLGaYbDHXKN6PKyGPc+q825vYhxsGn/wqEijH/7f+0+ TGhvgY1tiZqeNgxUpKWWfZUcBuKu9YV6R4lIOVrJzySZivY2aXN7kxIgjSdb mmmFgW5Z1Vp/sy+EurjZ2/cxXg580rnh7/7X8pLdbh/mCUiQSNsx9zwARG8V 38jD/I8rW85HlggS3B99NHPP3hO6jil/1lSioLoXVdeo30jAH6C6g2vZHnq1 n3Ee3YbpCzsSd8Hy9K4WGZmrZnZQYHgiicRCQUFunPvlpMgQhapQI8nmv77T l/7vO311dR/tb2zA1tfxzYZqS0RYidzso+/jCcUqUpmhnhQkp/hioLGABM71 Q2aNY/awoytEoOoQBf1ye1h5jEGCtp6PJQZhdv9rPcCtHUYsBd5UdCu7zWje mgiHxC8wNx7zgtv+CtU1tZh+eP4Slr1Agiyi/IfFn/bAl5Co02uN+a7dex7v ekuCVKsPLN19dvBd44eEEXa/88R6m3zs/hurlovcsHEF/f7KqWtMgkfnz5Y2 VlLQrr4Jtl/+OPBiaNTIXCIC3kisUBnTve81ElVtFk6waYfgD37suSvy1OzR XKYhru/mL04weYKj9mXpcWI/CEmKL+RvmUP719g5pm1DoanypH1m6Bzy3/6G v+VKHywgUb+RlVDY5Z0jtdpER+r2V8rkmyaA9CmuX5jgBWHhrH+EfGjo0laK C+MPHpwu1uFlP7hCkYMTbkMVFWlvG5G+yEUESa5jQyndDnB9Jcg1kJcESvPP FA8zKIj2faSjdRUH+c8Kjf/uxw1+Ehr3d3+uzFZhx2AzZ4xhbx51LpiES6ON kqcN6Uh5llNKptIT2Grf7TLdOYNqVoJP16aPg8kh96iZOm8IIxe6kt7SkJff byeFLDxEhThvcH/uBtpKq1l/992mXxkruMlPQ9d6bylfv+oCBceM98Q5zSD+ hxX1kQ5j8JpwM6g52QcePN3Xj98yiIQOGMYtD83Cit+b+3K7woA0/KBqtzQF Pbjj+DX7Nwkaa3b29r63BaUfH26ncFEgjkmjOOouHvQqnl14Gz4I9ptV00K8 W+GS03WDZlMGnHleLXSeNQVEPmhIJmmMQFJstNlgIx201uV7VeZ6wOTKx252 jN8KkjPqn2I8d7WcfFrd1xZUci2OyytOgERF464P3+io9/eb11vYIoHlAK92 Xc8g4ITuTkeVzyLnwqgLyzcT4Eo41V6UaQYJGagW/iaNo/JknvGknFwYdUt9 SHw6g97EvhCYCB4F797mNMH3oZD+OfA29yId7U5L6+XaNwEGT9S8+xqDYOjE rUXpKAry/7V5KSORBMoPOow+DDlA1nJU0OhqA/KIuXhvLYGBhmvPUiN80oGn gNNa+//U9d3xVEf//5FCEUJWZlFWKpKRXjRIJJQiUbL3yt4zZCel7FVSWSlF nbKyVXa2ey93cbUl8Xv3+9zP9496fP503Mfj/T7nvNbz9X6e8wyjYWWGZVul bytK5DQgqo7dAFm3oVrJ5El0r86To7Kfgu40ie80nMuEAydbUlAj9vvTB1gR O4K7MVzj7eg6sN/KuMLyrRY8I1gn1adpSJtnU2+6bhw8e+lAOHaTgt6rbSE9 Vp5CeyV1a6sM0qCbXTFHru0jTL48l8rGOY8mp9TU96kHwuLvS2dVC3oQ1x6f ZHYuGtI/4BfSVZAMZJP3x8pXFpAS5QqrH6EXle7YKm7KngzfnH592bWMgxGL wUORa0Qk+KrCi3zPHjhFxXNTLgzANZ4ObhOZBRSOHg+VCIZCK+cRSIqdQmZD IRF4WwoquLMiUCeUCnltgnF/+KDZfRfY9JjdgNbOvrU19hoYtyfobX45Aypc /Ph3NBLSSk19yM8fD4/jC1VOKuFg8rxQav1tDFd2/LgUiuHZtXVHwyLnZiBg gzyl8D0JaezZYMDU6AQM5SmrsSUdEPzseOV+fRqqaf59+gdHJPg0jp+N/XQH bdtcqJu98kcfr8hQpesaFN/o9HaQoiB3Ua8F6YUp9ExMw8jpfAqYlxGI6tE0 xMQiFXJbohXcKc/Wn74fCb6E4OYKfhoqq/HJZVPogUEdA2IyQwQ81U/jJtv0 oVfGoht/hSygc9vt2krcE+H819cmkg4LaP/vxFCg9qHbrOSPSicT4eOrTglD kXHgYJYemAmlopC79ptZwAdeZxLL9ipPo6u5tzWZf5LROq4Y686kZBidPCku RiAiUtXsvXxBPJiwvOBejAgHj5iRsIdrc+irfPfhfhkC3NgkoNBUbgNDh40p 9WQ83MrJCkk+SEQHbNpCLyl7QggxNNAgmQbXnar0V2VbQLXQ6q3w5SQQp+u8 LNF1XqTpOi+rYYoS84xUOFRyvcBvYQK9vLnaWGCbANpBPu5xzHioeqXkGPGV iPK0w7Rqz4bDntijLExpY+hZn5+ARCEVkr5p9kQaxIKZgkL1J1Ma7LYuuH85 ph1pTYfz4R2y4JTbKd55hil4s27Wc30NBayPaBiWD2XC1BPjBUkPAmyx+dTQ 92YO1dha7nV8ZQtFEivcbnoEmGFU5WrE8BHBhrqyIdkOnpiubHQeJKJ1Rx3C dsnjYfTq0YnmJnuYmD7RzfyGiNoMhb9d0sGD4OnnS0d22QPPJZOVQxjOVL18 uVxjPR7Kr8bODt+xB62K3YMHxUhoT15D0td3ODCOu/KmpMgerlQTbj46jOHH jRo8km1YndzjuXpV0R7GD33yu3IED0ssXZIiLUQkU6J/7agX9j4H1BtbpnDA fu/0u1puElrOYttVxuUA1Veq/dssKMjqa+VI680pCCxPnmO67wkB9Y35Njlk 1Fyf4S7ZPA1bRYu23+F2g50WtMHgNSxeKfx43sExCsGuMucdNviBySZyQvIN KuKdPSE42DUGGWJ5R/fo+YDtJTM+Futp+MTItVtlnIyCq46dmt/mAbfDYuIr RWaA1+vOAs9lMlrb3rP9WYILaGuH5RirdMGTLZ8NxZVpqL2h+pnA4Yh/dFKa 6DopKkGrZ7/dIsChK62TD3Iwu/Pf9EpdyBa86LxNh794m/L0egNPrzdU6PUG 9RBjuvfiNHqvKNx/7g+vU+wq907jQnAtyTFBx2nAmrCzS+ZDB1gGFFsu38iH J6XRx3Oj8WBNPYtMkomoXwavFq3vCssnStFrE8wOlXDFyrVE1KW6cs5sxRFK MqO36OTOIXOurC162PuysYR5n4yzAWe6nu97up5vLV3P9+/xl/TxeLpubyld t9eVrtv7Xz3ft/RxQ/p4bNAZMcXxadhoHkJ6kEhG+9ZtUZJv1QS1OpmQujYc 8AwdOWUpRUKHVzRYwvwi4BJHutNzpgVQ4OIuG9gyiF41m+xkoxRAwakKnaQs InLKJl5U9MNDtfKTi4sLtv/wMGXpPMyPpGsn1UoJ4OfdJpOZOofyd+nu0e+y hYSsHg/uZSJy32V8lLQOD+mtCv07XNyA/UdnwV0uEopQq3dwxeEgXIF5oEbN HkjOKasVcng48NXrZxfmT/zHF/dI9dvBhU7Jgn0PcSAxJFXzh9dptz0u+VOC PSgxSIudbpyFFQk1+fzQWSR2qsisyMMTktmSqPVes/CFcsaJuWcWcegzLVWq ecH0u6NTGv7TUNmI1Lx7MTwlpRvTvcsdNOKmjXXSZyBx91j4LBDBIfd8UBNv HzS8Vvp9H3v/i1t5S16s4eDh+NsCreJICLT7JfKYnYTGzIf5Lz3B8O/QYqff k6cQTd+Xl/R9Mf7vfsXvq59zxQGlpXz0D0/z8alGxaSpm5B86rOrkwMZOX3O nYnbOgPNZGFbxgIX+Fl97g1XMA440uWUMqxIaKJAyqnuYhy8PHN4Xcr6aXC3 XEwX0B6G52bXElLVibB2yeJyiw4JiU0fH7PNxQGzgEIF60t7qIdJb5I8FUKJ HZefG0yARv515W/yaUDNa1+s1n6H+hc923Q+L8CBmUFh6QtRMFbGWkjwp0Dg qphgqcMUquabOjLA7gOqlA9GZQLTSGuo7gQzGwXYVSwzTc4Fwvhf+pL1dH3J WonuuK+nKeiMkY68RcEUolXWhmTZFIHUoaBFTQwnGz4fLi7GcPOhedeHzlid LGT6zaKzuh+esutStuosIILPwOWrkfGQe27PpEngAqqMeuJsc7UPaT8/HN4t ngn3hFp2GDxvhziTniIpUxp6OU4Rmn2bACmyfqnQQ0Mc1ju8StrrUaeiWIHA tXR4WSE2nfH7HZz99Ui8amQBlTnc1t/3IhJ4T8weCo8moxp5MyQ2N40M4x5/ X61JA3+PC4Udqa0o+EVJYl0oDZmbcm2SNUyBbFd51XoyDfGuITO//dWw98Bo 15b8a7CQK2SakY6H4dMv/B9GEpFHLvfK1jZb+HWe1G4W3gibs+rnIstoqNg8 47t7QQw8QfnjSWfnkTdr4kal9BG0+yihdoN7KrzpYtx5L3UEOS+tqM5g/2ew WRNUDk2F+O2MaR7dNHRPkjXiqnYD1N5pqSdIxEBZvrpnjBAZ0U4vMPzhCZYt iSjVhzvDjtP2TEqaGeAwcTl/AsOjtSFCaUFa12DUaSPP3PICyrzeEyvF8A41 p13lswxJBP7Tmntc/WaQUcPiyc3iZLTYXHf9mF4qiCqLBfvepaF0jl7zw1+b QGR1wXuuOgqu9NwXfRKBICSAz9joDQ1VfPbYl6UVDXu+i7y/NoH5td7sfc3+ GaSiiBrOvkwBi92G+IM6HpAxL1DqhtVftbeMuC9Ux8JnDdPr6zH83JSTtXjp 0TjqfR1Xybw/GSzryqVOFA5Cd/XwXoeFeSRW7C+xeV8Q/JxlnFyjNSDuZyVl hA4a+jQTtG7gYRwYWbEMuYkvIPnMcf4z8QNI1ej3zb38iZBN1xMUpusJJtH1 BDP/0hlM+O/4itHYYUMSEtZP5zW+gQPPjTIPNnP6gtUr51BepfdobY1zc3j3 AqLVbTt4LqEAGKbMOdd2LCDbGrmCuasDSPALjkfkyk2oHt94tPPeGPIWSqv4 dpeKtNwNxqj5yaAwxi3MJU1D8cIcphShbojx4sx+QgwHvWpBykNBKprqD1Rn uTWBfolYEZcGkv5P566arnN3Q+I/Ond/69/l0vXvKrVDW7sfD6OYdmJSccw8 gKO7xZ4P16BTlnj0pss7ECJfNEsoGIBy0yytxp9UYDiQ2zP1oBeO1fA4Ja4t IPtGYVu1zTeBxc//4ENnPOQ6tVtsLyIiBprTx/bbjiDATtitkjMLP1kWRIlF s8ijTChrb48nTDnHT5/4RkOy78gZDXFlSOPgIZTLfw28Dk4+DjpCQx4Xc3TY znSiKuaihwTZBPh1MufOxkUy/K4RPtlwfBpJohZ3b2ydWYT8jHYnk+BjAKPE iAYOjVmXqDyOu/N/Omg4ug7aPqv/6KCdLBtc49tKREb8EewTvAQoLdU2alew +0f3dpYel+To9cDsX/VAe5/nsWzJV+DF4z8m30oDo3LRWePpRJA/LxU6u5cM l4v5lZKuzKBA1mZj0XJv+PaGmnc6hIh2Zv8K+XobDyvuApNsTvZwJkR5RlGE iJQSHHcxsRCgM52JnG1sC1PVRVXIn4zuGT/tP748DfWdBg+vYzglQVeTLc2M graHjn0IuDsFU/b51iaa14G58sSNxhYyunLZqDAwdhpcZMS/85OiQMxhHfmT KhHZjMjqsRLxUJxc+o5d2RYUq9UXC5NwUGMScOrhWRLS9VUZJ2h6A+aYx0M1 cUDy6MkNTCGh8/36n8XyrkI/riV1x68ZUJRirpdtIqGysLJ2RXsvGM96e7P2 yAy8NWJJEtUhowPZE02ZLD5wgf0O/wU9MjJRVmcqPzQDx5nCZFfZvaCh7EVt GTcZ2b+27Fu6PgPJu14ztX3zgPCH/sW9O6fBrOJHyRoThr/sbC+x7PQHhX21 +My9ZMRyn3aPzXoGth/f+dqazQOiNUZ/jXbgYSEiZWTdGSJyXnlXTwq3BW8V OZrYJB4Sk0u+5Gph6zpnKXdA3hbaFh7FZg9Mg4Z3/PXKNDLKLHVkeWLtAbbh SnO6R8bghruH3lotFVW+vnWteCgAxgO/H/LlGEbHlnOfNJXMI4M8C93ssDS4 PW/2Te3HPCrWbpIV9h6EFW/9B7X3Q2Eqx3dDqPQC0v2esE720gC09SxVdeWH AWN1w8ilIhpaE/ggmybZBNvrN2y6EBsD0w2bQ//wwKouDT34wwuz7FwMtA1y hqfBlPmop1Nwz901ql+XgpJGT/PtMfeCiEp944VTw8DUksPHf2ceJY6V3jgV ivk17pwh6dE8Zre7ONKoQ8DZuJudHBkEkoYoJUNsAR04HmxrkzYASjF8X7Iq QyAg1Ol+40ofGDdpfGawW0Db4vYoWmqHgfVQcpQ38zwaYDX8XUP6iO4eOHDr LVMKICkgTTAvoJHWfYQCgUGQ0Id3LK+DgV/cMcNAgIZKt22/H7mzBwzkrK0U EyLggChx5r7bAtJin44ZfdsH4YdbyDqkUOhf7Z6lonEIu+Dxm9mEilL7a13k TX3Anc67+0zn3X2k8+5eRYWxuluOQcQ2zjr+CipK4ZZc+lTtC1OK5Sx/eIr4 JNyDP7zFzwrvUnu13SEK70Y7vm0aQmXQXt0tFFTLEFbZtskTqp6bp51MHwOf mLhQ1UIq2mD2oOCjiC8UBW4NUsgaAbHlPB0mLG/eFgz5SPrkD88E1e3PtNCQ 3NCeX35ur5BaButImU8cCMbIRsoYEpHBiEa6XA8ecLpvQ5gl7YA9h0jtM6ai Eml2m4a349BRkXpG5GkYtM4VOAccXEBG8ezcx9gHQOjFzaxvhvFA6mnNswym Iiv8jsHiXeNA8d4bOeEfCrbe75ofBX8Ew108X6TF55Gm5Pei5z8jQFpVW7M5 5j1oSTA127YuoA39Eh2lP66Bi2DahW0JVNR8as/1zZ/HIL7mUc/NY4FQcmYT o1Q1Zp9qeS84h4ZAUdTI/kZIOJiddzyh+4WKHhzwlEg8iuGyFQv26H3BYG3f G2xTPwUx1OYj/doU9Elx8eQhV2+YzNSjHryFh5NPDMxbQ4moymjU9bOrHRyJ pN1L/nMvRh2rLPyioB0bDR+eyPUBnWjV22MFVPRVn9Or6gbmTyv2ccwKfqA4 E9i2HE5Gt37c73NZmIZu0dtZ75TdYJuBsMQR+zHQ++jeOvcQy3db4u/kGfjB hq2xamWYHy6/IWzsPjoGVz7d+aIm6Qf5y+sVwhqoqHTm2cjPXWPQl8fxufSj L0TMe2TfafwAx0MRmXBrAXUdOSPKkBoGZb4833SO0pCYsIPkKb1OiNNXjN58 JwJkDx7tOojVE96fuiZCf4TDhBRsqymJhZolbXbOrBmYrpVk/P98w8Pt7QWG zqC1iJTCZxohbF30+dUSGvoRwpdE3RAFR7INnEcd7yAOH3avxhUaYtYcKBD7 GvtPPxno/eQAur4MM11fZhddXyaPPj7h+Z/x8v/qzqyqmGfgKSh6sGiM4eQk 5MTc1+x7WwB32qOcnioS0XvTX+qaNDzsTit3LPluA6t03uBdOm/Qks4bFJFW i1lSICJxlm6+G1/wsK7G2TnnuQ0Imn4oE1+agg9WSxcZxSloRX5cIutoOBzy 8SYnZo/B9RsX34rmUdEbrTG11vdxsP+6+o/rYQTYIg2WszVz6DEvW5hHtQ3k KEjhhGZIyJvJTukPj5V/TIvDZN4JnIu6+0mlJPR992tNE3Ec0GhStlVnHYFP 2DXYJZCEupRN1rlfxIF4Rt+l1DEHoHk+btSVoCDnpFYHz+9TwFXdJWQ/6AGF u9x5R5bI6BHMbGJTmQae1YDNOdoeYE6iPBV6RUbLUfWvX6VPg1yv+Yz3Fzfg DFlb0eikIp/fZn1hlFHojTsk6CLn+w9efkbHy0npxFv3ntNg/7HnGQNFr2Ff X6uW8FoivDDxCnXDUSC0wripw2oSNSYm7VP97ANx5099Wx9OROvsOjwqb+KB 7WvSRq+THtBvd0ZOPYaIbjNHHvNLwcPP2siXocyeYHxa8vQdAyJqZ7IiL/Xi wcngh0e3gAu0fWHuVC4moSFSitDIThxsW5xOdNO9Crp0fiDtL36gdfy7nRIH CSCnVCjT9XUOde88XaqqYAsst/oElC4RgPpL9BzP+zk0QJzjU7lqAzY1C2tR xwiQxS/XTSHOoU/nWgb6F23AgrV80XRyBvysCwOyhkioU0AjqJDPBdpnLWuK rHFwH0QItKsYXh7fnOS02QnctYTiFFpxYJpDfFi1m4Q23PThF4hwgMCguhM5 0Ti4Iqrw+w9/p9D/4fcdcY4gbffc8Q+PyoY6u/UPr+rzqsy16xg+tbg8+656 Cw6crA2Em59gOHjPymCBOGafNaW7GT1x4No4J/oSw7kGPk2jVtccoIh74IgA 0xSQDLbsZ3pCQYmnjz696+oFDBZHGp6vTkEwv7mukDAF6Zqp+hpEeYD/vrZq ddMp4NBbVn8aSUHZwj0zlA5P2L3AfSZTcwaqGO+cTzlBRhdKQi1+DPmBzgl+ hsQHmD8qWvTUXMFD0seTO0Rj7IBPdwv3sjQFSVq8lf5EmoK2+UURneEA6NF0 7epimYB4kQid+1pUpD0qse6aaig0peX4xFZOgXR74m/7UxR0ffHBoUmfANA6 K183tJsA0trtSi4MRMQ6nf2SxdMWwug8Q006z7CIzjOMI7WKHualIsb6Xk3m xxMQ+rRyi1ysH/w8qWn5SuYjfAn/eLBNcR5lNbQt88QGQ+jVtqXXQe+hvlHj oUjbAmoLaqAsN4SDXXHjHa8N9aBqEpPT+Z6GgstVS9+rxsCXIA6VF2tDsESM yWd/MI8admyPru0KhMrWTt8BFiJyR8HHXcQIEFk4lt/tj9VLOkfM2OSJSO3z 3bnF73hImJXO/CluBxVihi+UMPu0Tq3lLcXskxDKLLKf0QuU4+69fV5AQibU 6MfHduNAi/W1aFaHM5D49c1WSSTkfs2Tb0vrDFgsS+2Pa3OBq1vbhoTukVCC T3I5BxYfNCcMXqbLOEO5ld5xQV0Sur5LatejbBz09nz6EdLtAF77Ik8R5ElI u4CTOxXh4GilXu7qRgfovP6lNDiAgqxWArY/sZ8C/wdVQjvfeQGtWpnYa05G xTeLg3A7Z6DDt7RjzzY32ECVaaw+hoMTPYmqVxJJWBx12xG81Rm0d+xM+M5B RLlO+HJ9fgKwubu/S11vByUthASvzUSUsUckzkuYAObrqUG3H2B+V7b0sTyd jHZ/ap2U7J+G16efLRW4e8Chu76pN7koiNXtQDMz1zTYWNr1RDF7wQs/ZY3s l2R01aZSKejGNLDzT11kXfKARm3ejBPTZEStO2jVcHEafKYK2kSbPeC1VgI5 eQNW/93JzOPE6uJzMTdPx457wO+K2vyssGlQrJ0bL+7A6uhRRRm+/R7Qx9Fq dXrfDJg+HT4AZ8jogStPUVa+K9RHO2zbykxEXV+edblKEEDMtIkwqmML7WWx 5aaP8MCwY88SswsR3XvjP+G99V++nxid78d46Gd/p9MUNDR4il/xo6BzISqG X55EgJ1aoNJ7FxLiZhmsPeGGA3+BBzpttY7A3nR8jk2Uini9WpYUEibgjkdW WXy0NwgJn7peaj4Ntg3G95exeTcmTn8w1feEIEVqb43XFNwe/HCC6EVBY+dX 1p8d9YJMnZ3TsulExHE3RJg1HA8zZfM37jE5w/yaWjvPJyLqVcG3SrDhQbo6 48OXVWe4Oju8efUDEdlba86a78ODblkyUb3JEczWnt0SlyGjl1oh+w66zED8 yCXhA46eMOIQNFd5noSa9woud8XjAG4xPGN+5wQSv3n62lQxu50uDzavxIGe Qj9sEnSCZk6cc6UNGVkIqT/+xDcDo5vy833ue0AVt6K+szceZL7mF1RkExHc T5q/mO0AmhvuWlAL8eBSWN1BukpEH1iLxYz97KHsHKPTJTwectIbswQ0iIi/ 4R7fTyz+bOC+ltddh+E0ba3lK1eIqDyl+3mHlD1kOk36f+DGg+GywI85MhHV 2F90LQhwhB1SH6XOjcxAGOfSte+jJESVGEvO8/AAJk5ZRx7MT03nk916MT/V vOj0I1zWEYa/ZTDvvYYHG6m8TfsSiShw9bGonakLjMcEf+beQIBJ5+2GjWJE 5PiVcZWr0A5+tr29XpVJQi7Mm3WWlbE4fXPrprRsNxg2N+HlbMJBkJ55n5Qs Cb15oSHZYWwPvMdxs1pyc+i34A37UK5Z6M18aLgqaQMh3QVqUEEAX/FNcmfi 5pCO1EBmB6829Drihe+ZvgCRVB1R734aWri3hyOEyxUIycGSkZFElJZDFG5M x4OEww6uT92O0N4mfuEZlo9mDmSZa2P5qNT1YBvHVkdIOMJM9M7Ag3poesDG CCJyPWhdNjzmBRuPSbVI7yIhlYYXMjxtOPBb8W2uXPSAk7qNyZZSGG5sCOmz WMWD8nf7prWlYLA18M9fxsa/rSzkzv3GQ80a06D6D2foTtF59JCdADlbjhVr CRDRU68KYRUHe6iKVtiSE0BCL/u+KIdZYLi56NJNKwfHf/oJ8fR+gtWstOK5 LVMwX0iS4H5MQU1hGeN7872Bl34PzxD9Hp5t9Ht4Ir5tT72F5a39RaODlVge 2/FIRvdUqiusHGE874rF56GutqxQLD77rNt+5vh5BzhkEeAqYou994ntCYn3 icgwuUYrFLMrigZfsGrLJDTYyEQdfUtBfhtuMlbxesO2tK0H82xHIcpw9bwh BcMTQ6Tyqn5fSKw6Y1GRMoGslGeKy/ip0DEYcITWlP/P/Q8H6fc/KNHPP0bR zz9epJ9/rNV5lrPPfgYazpruKJMno7orRLuvrz2hbUJvK4MeHlisfr1ge4Xh iyYrB9dKB3hUF7ig3z8DrNzhqiWTJKT/aUdUZo8rHHa9afpDlYyITyi5D01m 4Jf/pILVM7d/ztn508/Z4c+IGT3wpqD0daqSXp5T0DSgqPPY0gsS6OfCZOjn ws7Rz4U9p5/vuEw/33GFfr4j7sFKigYzAZSjBa9OiRDRqfuFdRw/bf8nT/5v PvwLOh/+bz7zZTqf+ahRsQvpDREpeBSe09LGg3zt+ZEmD3coCO7bKvAaB6MR ExxeWN7DdxUaNYi7g1xQp06DIQ5anSaenYgioSdLDYGPsbjHz3JGcLMkEWWv w/VKrSNAsHOA4fIje3g+efesEFbnfJLtyFa0xgNfMK9bi5rr/3zPv8+xnqPv o7ppVO6XQRx0mEicDBQiIbJp/zdrG0ewWTUV80+bAe39EfVNHGSU6zmgOTLs Blvp9jxMt2cBuj03mJvetNlKRsHyle6dSTNQefG1tqa8C3x1kOajGuEhhK/0 7OU6Irpl+/VD+JgdhE4o28hqUFBlM2SJd05BD4lU5pLrCTH0fdSk7yPQ95HZ OX6LwTwOwn/6vqxnxeLDWLDXargrKLAamuhSiIhvyPDsRSyO1slXpboetodH JiPH6mPwYCUr4uWaRER9/l5l7yexepudlrLZHwf2LoGNZ21JSN1lJiRLwRX6 xvGK786TEbMEP0OFDJZvSxmqK93d4c25yHtTR6dAw1M7rzGZglQMRiUun/eC kunBcuWCKTSvY9Ogb0QBoz3pP3ckFICCReKbQ6HzKPliXfDLD8Nw3ywNf4Mz Boik50Ufz7TBMNNtHmMnGjprZ8dyjD0KssUFnEvHaYhDTLbLR/sZMI/sZ+F9 Hv2P3V6k222Jd0tLlBQB3kTSwvzWExGpifHTK0t7aKN/j/tJ/x6nTP8e97cf 2dL9aI6/ou4DNh91C4dLLdj8zApSOwuxeTEFk27czZlHe+tfbl0+NAx8Tvuy 1zcGQON8+aUKAxx8ruBoHIgmoR3HN8qxKLlA4COVcUNs/hGgrS6NrUdDTi/J K7Xgf8aTs7uM9XyxfbrRHuGkhO3b96MHLXj+7Jd6z3YekRl0z0Tols1lMhTv LUuUm/YDhhee9Uucg3Ad+msPsi4gQ6eQNsQcAwaMKu6xMjSUHDv81Y6hGw6g 3mEwiIKlcJ7PBzSGwUT+wdkUbB7T/L1bGt8EQOdxw9z2ExXQ6j9ifGSRhlDi L+8QrhgYWjLM0cX+/rlB1emsVgWwvcw98xobl6P3e63o/d4Ier/3UcrVNLdb RKTspSH0MgAPOpe9oycYHeDS5TIz67RpOJlunz2P4df1u15beTP5guPeyt2v Mf9ZitTfGYL5U3hAxqNJzI/+ixe06Hghn44XNot7bjcTm4G9SwoP5y3JyOdn Mq9utjsEcZxNu3hvHHZri7D7mFOR8dD3ARU+X9h3QUvhCmZPHbtPPU4yboO+ u24fwjG7Yuvbvn2wYQpOFa3j/n6cgpq9lmqPvPQE54qNV9f1DUOqZuODPZid 2qevecVh9jl4wrFCB1tfGaJmTQG23hccrgh9x9Z584Wl+GDseXu/yVEAe77Z xbwmK+y5XlzHtOZ1n0F2rap+9h/7vWDQ874u+p9+hQW9X/G/8K/IkIyTnikB CDfXDR0bmkNLWhn3Y6/YwknpbIvmgxjeMP0oJoLVKe41nbneL5xgv/IF5uYD 06CyWQLpLZPRlVNqnfICnsD5IeZxdy1W185X/GYzwUOtyYswpUE70Btyb+PA 6v6Ex9v2y3ESUf0FUhpXrS20Bj2WTWTshrkVJmsfzI62To2fXY/ZjxW9b/mN 3reco/ctT/6VF2zpeSHu1bcnN7H52jWf3ND2Ew93EpitZhdsYVfQ6KMn7EQ0 3s/4fFKQAFON91t4hmz/qcMl6XX4f/NINj2PWNLzSJ5cyPL2TSQUUKo71kfF Qdfxx5mXI13Blzq07zIWvw4bLRWv+GH4vkX39ygWx468+70jD4vjCT2nfzVj cV3J/IR3PBbPL9sk5PlZ4SFMWTUzvpyI3ngJezc3ucL/A/kz9AE= "]], AutomaticImageSize->True, Axes->True, BoxRatios->{1, 1, 0.4}, ImageSize->{391.7192602331265, 254.85345697232992`}, Method->{"RotationControl" -> "Globe"}, PlotRange->{{0.01, 0.1}, {0.01, 0.1}, {0., 7.104105169166462}}, PlotRangePadding->{ Scaled[0.02], Scaled[0.02], Scaled[0.02]}, ViewPoint->{-1.6175436830164887`, -2.7660241197943067`, 1.0875031044781427`}, ViewVertical->{0., 0., 1.}]], "Output", CellChangeTimes->{3.5280750803219213`*^9, 3.528076865809326*^9, 3.5280777863930607`*^9}, ImageCache->GraphicsData["CompressedBitmap", "\<\ eJy0fQecVdW1/n1TwBJLmkle6kvy8k9e3nsq1sSosScxyUVEFAuiyIgVEcUu CioqKnZFQUURQUDpICC9996HYWB6r7fNvXf9V9v77HPn3EGMj9/vzAz3nnPL Xt/6Vt3r/OOm+/r1veum+27rc9MvLrv3pnv63dZn4C8u7X8vPpT7b6HQvz0b CoXgFyH6G0Ih84P/PUc/9D8Bf79Bv3Lo/Fx+IBfslfg/fiKH/syjvw7JNa/z rzz3TPo7L/jhnIzXDX3dFwr6gAe/zgvlBbxQ8Tf8Qg/bdf1hR9d2ynw426o5 L/0g/cqFgoICWRIwAue3+7594072r1z7V4mc/4B+JnwN++b4dz799j5pvpw8 iH/l+07WC0L5AV/O9xr/Jq9xv34d5zXsV3QfC5Kx96mS8mL3dXCh+9gJ9sKY XDgw4KS8gMe+Yy9slQvvDTgpP9uFWZajUV7qHvqVQ1cdlfUFsn3/WnmJ/gEX dg547Of2wkq58O6Ak4I+xS/pZz5d+N/yaTuihyAlGC/vd1fAax+d7f3avbb5 8P8vYFGPjCX049wZ8NbHfMWP08l+nF919HHyg/RZTp4gj9wR8IbHfsUPwR+W H/pFRx/iqGykYn5/Kr9vD3jbb33Fj8Ln8bf9SUcfJdga5Dgfop88gO93QsBb nxrw1h4yOqTWw7/1rQFv+FU/hIeHIMLtQCcKAt7gxIDHzrNvsEYu7Btw0rcD HvtzxnuHWCnwxwr53y0B13znK7wOGJblD7VEXqxPwIXfDXjsb/STX2uhXHhz wEnfC3jsH/Yd58mFvWWR8ZwfBJz+z4APzVfPlqtvDLgm6HX+nX4yvE8OfEXz oabLy/YKeIkfZnuMEYJMsa48CtN2x2Dk2jg8MT8BD85TRj3bvvz/2vOz0q9n 28VIhW4IeN8fZf3ax/IrljTUwL7aelha1Aifbm6CV5Y0w0fb0UlcDtB/JkCv 95P8oc+xn+x33tKCfcmv5dWINQtdn00KGY+dxD+/xS9RUXcIyurLYWtpJczd WQUTNtbBhgaAGQcA3tkE8MRC9FI+B7j+jQSv0B8CPrT5Qv/5TX+h6wI+/I8D HmPUCyaOhdqaPVBVWwQl1QdhbeEh2FZZBzsbo7CyIg5T9ybg3Q1t8PSiJNw9 PSWf9eyAD8AOAz/0y2/6S10b8AW+bdcwyAn5rv6kF6uu3gV11TugHo8a/KZ7 D+2Dg3XlsL+hDnbUNsGiA83w6dYWeG1FK5//+CKU32SAa0cm4dqhjdC9oJrX 6ayAD3iU/RQ/6+hLBxvoXEd/rhF54Hf4nnPFi/Oa4YGXy+Cmvnv4I3QK+Kqu 87a38iDUVO/Ctayt3okEX1e9Eypr90NJfRkU11fBxtIamLOrFqbsaubzP9gF MIy0DRnl6jEAVw1PQI/7m6B7r1J6/syAb8xeA3+6f+/oGx82IKP/DZDnrs4q QAHL+P0A7+4GeGZWHB4cXghZFkLM0g/4knXlNVBaXQhV1btZ/jV0EMrr9kN5 3UEorCrFxaiEddVNfP604jZ4b0sSnluagvtnpqH3OICur6Wg66Mx6FqAC3LV ARbARQHfwvMMfiBCbG+U+S/9tj2yflvxoBZUAEzFCPPjQoA3N6Xhyc9icNcL jcDs3f7SE+3r49tvryyDiuo9UMmHfPWq2kKoxK9dWVeEsC+F3bU1sKlW5P85 GoJ30BA8g4bg/ulJKJgI0P1NgPCzMQgPbIbw9bUQvrSYX/3CgK/u+SMSwoau CviEDOhO6hEMGd8A9wwr5/8FBUEneF/nR7C8vAH2VxVDWfU+KK/eK1+rZi9U IKQr8OuUoSRLkIkL62v5Yy060AKTtkbgg20JeHULwJDFAAMmAdz4Nn6lp9IQ HtQK4dvxK11ZDuHz9vK7/NN+hZflK3TP9hWU/nc0pWFVdQq+KEnBpP14IO2P RVm9uh7gsdmi3TPPK3Ax777U8fzzp3zahMIE/95QUQ0lNYWMWPquFfody4iT a4tZbAcaqvjcLSi6RWUR+LwoAaN3peGltfg95wLcj57+bW+n4Rr6ngMTEC5o hHCvCgj/rRjCZ2zn78puTXtLxDJ9Ub79lQEf+fsqGbpsa30Slle0wfySJCN1 ThnAlEMA43EVXsOP8vhMWYFxZxXA8yfLa1DIfrwn1zwYs7uNT1pY1gI7q0pz 4FDNfqTxMlyCcloG/NoHaw9CcV0JFNVXQmFDLT5Llx4NA1GcBe+k4aY30tDt QfyqBREIX1MH4ctLIXzBXudrZnOeNAXVLesXPZEvLGpKwKbqOKytaoP1dWlY WwewtAZgPka1M/BLEym9tQxVZ2ILnz+qSwEMO6WAXu84Z73mH6iDd7a1wcd7 5SuvrKiHAzUHoLimiL41lOL3PYT/P1B7CIpqS2B/XQXsq68RLws/ys6GCGxu SMKSKkCRA7y/A2AEIu3xpQD3fQFw9+ey3uF7UhDu3QThbpUQvvgAhM/cQY9f bb/20/K1u4oc8FOKp/htvnpffQz2NMRhX0sS9kcBtjUDrKlPw6LqNHxRgQd+ 6cnISe9sl3f77IwCGHkaf1mYeE6BhpLyjWfvq4NXN7XB6J1tML6wDfWkFTZX VUFRTTF/80P4zQ/i7/01JVCI33hfbRnsqavWb/wd2F1fD9vqW2FDfQrW1gN8 iSibiIv9zjaA5zGaeAQRdufHADejUvd4AhX7DgT7dfUQ/jsi4Lx9ED5tK71S T/pIbKeelG8eDhC4eKPiJpQ3R6AyEoOKaBuURHEdWlOwrTEFa2pTsAz1fUUt wDI8ltQKP7+nazHpTFmHIacWwNg/FIhLIF/mKJiKxnb42iS8uaXNon5JWSPs qUZR1xzMoVVBbO7DtdhbU4pHGfJzlVz9PdhXVwk76hphfX0b4i8JqxCHKxCH M0sBxu1E/OFyPDsL4CFcjtvfALjuKVyOe1Epbo1CuEcNU3f47F0Q7rKFXvGa AL3wjNcRef0SptnAp30E8j2+ujEagdpoDKqiCSjHNS1sbkMGaYON+GW2NKZh cyPARjzW47GaXGhkktG6rvSar59eAINxXUefVSAW/xix1uh1T9xeC0+tTMJL G5IwEhVsrCrY2ooaXMaSHFzTQ/jJ8E/Yjau6q6Y8ZKzk3lq2P7C9tg5VOw7r 6hKwurYNJZyCpbVpWFAN8ClbX6RW1LMBMwBu+ggdwhHIOY/g8t7dBuGbWyB8 BeraBfshfPo2XOLN/Oq97Xp+c7HKufKcobX2IdbxfHpztBUaolGoicahrDUB +xoTsKexDQpbUrA/ArAPjz147GgFQHcXllQrTDvzS76DOv0qrvdjSGT9kLmH nFHgfRZk3vc21MPYTbXw6NIkDFudtDpOb/1lSRNsqaQV3lVTijS6q7oUdlaX w46aCn5+G/ocKAFZ9ZpqWFcbgbW1MVz1OK56ApbVtKFupWB+VRqmliAGENzP rUZgL0Bg4+pf/7EiEBcufFtcGI8Y/5w9Rt9vsQv/zcVUuvB/z7rw3+HTW6It eLRCE6K9HtFe1hKDUhRABSK+PJZGNklDUSQNe5FRdrakYRsem5vl3T/YzfZR 3KPjYeTmCAxd0grPLWuBESub4P4FSRi8PAnPr0vCG8ghHyiHzNlfB0sOVsOa skrYUlWRA9uqKzBIZQcB13cHrvXO6jJxhWtaYG1NK6yuwYCuJoZrHYdViPbF 1Unk9hRMKU3DWOTXN5Bfh63BNV8sn+z6UYj2wUlc74Sx2+FLkE9O32HA3idg oeGrxIAdJMmUWC4PWHKJN37D17ZGm3nJW2jJI1HEfRyJJgHVsSRUxFK45Ck4 EEnCvtYk7Eb878Alp+uIaGaX8pLDKGSPF2Ym4NEP43DniCjcMiMF98xrg7vn oDM8LwaPLIjCXXNT8CBGvkPx3GfXpuC59fI676MCTdjZiNFxPcwpqoMFh+qM xd5cXQVbqiv54PWvboS11c2wproFVlZHYHl1VHBfk4AvK9tgRmkSJh5Kwxhk nFe2goF537FpuP6VJFz5OJLNHXEI34SEc11DjvrR4VO3ohg28v9MVivY3+kw MP066vC3rLL5tcgm0sTyaVW1aEZOakS1qEf51MbaoBINbGmkDYpb29DIJmFv i6gFXUtqsbomza89ZT8Cc2ca3sIg6NklKRj4KaeDoPe0FBTMxGBlZgr6z0OZ fZmG+xal4cGl8hpPr2qDl9dFkL4jslr/ARP3tcAXxQ2wtLQWVqOB2FCNRxWH 9SiXBliNYeDKqmaUTyvyUhRWoZ4sqIijoY3DZ4dSMLYIYOQuWaAhaHQHoOd1 C8ZKPVFHrhyegiseQCHdgka3J/oh3cRRD5+1U36fup4/xU0BK+qlDzoMpr+O lP4aICVJBP0Hnx5xpNSqmkSSIk2qQ0lVRRJQhschlFJRK2mSrK6xHltaRItm oDaNx+V5Fyn7BaSPx75Ep3QKwA2j0VCez18d+qBm3To7BXd8Ia9xz4K0dfee WxOHtza2wAdbm2DcjkaYvLsBphfWw9zielhcUiciqqqD1VX1sKqqEUOvJhRX C/5uhYUVEZhVGoMpJcl8JdDHEAz3fp6GWz9IofqkoNvQJHTtjx7ijRjNdkV7 /bcSkQrabP59ylowZjuo7hGU0g4K89u5RpfJA7hEooAneqse8a96C656E+tH HKojcSjHVS9B7iqOpKAwIiu2qxWM5tOi00P244Ty4XaMAm7Do/cnAFegI9j1 8i363HfgtjkpuP/LODy2OAZDl0Xh+VUReHltK7y1oQVGb2mGsdubYNIeSYMs RNd0CQbdKzBKWVmJvysbYUVVEyyqaDauwqfo+o7eKyh8GWPstzAgGb4BKGsW MvnEPrjwvYe1wVUPolr0i6Fa1PHChy/cL4t+2hYIn8wLb6t17sp7CX+httCl AWD+Kf88Xpe1kZc2QksbaQkAdQzdogRTTxla5YPRdK7oz+4IaSG97sYmgLkY 2H2CX46s8kj8Yu8gqJ9fJ2EEhkpXDzyI7JOEW2ehlfgiAffNj8Mji2Lw5NIo DFsRgRFrIzBqa4Q/0tTiCMwoboVP97bClCKkn0NNtLR2jWaWtsFn6OqM2aeO AP4eVyRv+dJGdDxXYoCHvn3Bh2Zdj4HwfWiO70yI83llFdpjDPT+uJv9+/Cp G3FNV9OZg+zySYUgdEnA8gkqJREfjTT4l1CXr9VBZ100LvSEYV4RI1OOfRFh a/IsEU0YowAsqJIY+RN0K0aiOz98HfICOtJ3zVGKw+9y9ZAquOHdZug7ow3u QIs7YF4CBi9LwIvrE/DODvFyXlwXl9N/DLNLWmBOaRTmlCVgGlLOpIOybJ/j Ek7GqOFDXL638a1eRCgOxaV7cBFA/8/S0HcU8sDzYjjCd6EZ7RslMwrhf5Qh PWG02AXt6KmbkAfW4fKt5HfjVgeWuSSeQxdnXb/Oun71vIZRPwxRbriKCC+C oaoseylVUfl+pQTFSDIHVT2JSCaHhd6ClnQXLueGRok455RLBEyR0QhcyuFr 5LsPmAfQd0I6X6ng+rEx9GGScPe8pK7y99EWJuDVDVF4b0cUJuyPwYSiNvj0 QJolY5aQfk8oBnh/rziBL+ASPotv8yQu4wMLKPxJw92ftMGtbyfgxmHxkIlt mVKvoijzIIT/sEuN3QZcxjVgVjEo2uSHJOdr86ntGgjUFMa8lc2hpUXg0OJG oi12QRmgMaTPWJx1nB4rj6LPWhpJoM6Sp3EID3oHwuueCDngAGsw3JyPCzsF dW4qfvtpuhpv4wo8g6HHILRjt09MQ6+Rxlb9FsL3N6H+lcBVg6vUE0nCLeiJ 3DYnCYMWJhB4bTACw6J3dyXhOfQWR2xMwxtbRafpfHKzxx2QlX53l3Dna5TW WA/wxHKA++fje05HKh+fgttHx+GWl2Jww+Ao9OgvlYnwNehe/LMcwn8uROB6 BkyBO9jqvWTxbMrWXd1fONZIVrc9dplSDYXGkEJxeWmJBb9xxG88B7k0jlG+ GCtZ3v1KB7udIHMTUsL6Jvn6szVtRpSArAqPoo7eO4O+bhp6o7tw9StpWenf QPi5CFz9Qis6WK3Qa1ICGTeJfh4e81MwCH29x5alYegqDFjWeZboTVzNUXsA 3sPVHYkE/gb+/0Vk0qfwvIfxrQbMAeiHnsmNaCRvGtUGN78Sg5ueisC197fA lQXyrcPdqiH8l0OIZ2TVkzfJY8iq4ZOX099D7ApLNil0QdYVVvy21uJRRyud Q8uMtpoWmkkjiovNDlgrAgwpAi0aYZmeozC+Do9aPKqRfCvQLUA489sQSxCQ 9+JKE+nuxJUmQNN1S6slh/IxLsNbuCQvbRB1JmNyP6rybTPxq38KcO0HlOdH B+3FtPoJv4Jrxyah98Qk9J2ZRkcNcLnRAGksOBiX8Glc6udxOUcgoN+g5BMC +KXNqCzIRoMRvA8uFL/4tqm4xOPwPd5NQc+XE3DtU1G47qEWuPqOJuh6vXz3 8N+RfS8oQkdgu7PEK/FYzJ9mSAB38IJ23BmUa31iPkUaHELnywO4dtJEI6W1 uJGMSCdkYlwSTzRiRNMiFC4ucysHMxGN8yMsnSqUTrlKBllcTWMaCqMAe6Oy epThWlSBFIOqP2Gv5HDf3S568Caq/3Nr0TwuwdWbC3DrNIDrqQrzIUB4JEC3 9wCu+gjgmglaf8Ao/8XNAnwi6EcoD4x24HYEdu+PAXq8i+ePSEL3p+LQ/cEI XHlXM3S/Ce3dVeJKM1lT1uTkzbryK33gzhpGZumH6hT8cFBgImlxaTHJUJlf OafHW2voCJmGhVhrPRNVzCMpfA7FE/ol/t2iutTChEXhJuUc64zeIFnR+xxC yRxAyRyIpqCIsjExkcx6SupXot+HXsRUNASfohcxHo+P8fgIj9FII6/haj+7 RiR0ryOhbmMBrsQV7/mpWDT0Be7Ap/uT2iDbPLwMOd1TG/zIwzeBMdXU3dAH aeiad7TqhxeHz98P4TN2oDQ2qmSWW314wYohSx/YkYvh3KxiEJ8w0VKFh4TI 8ZYaj8lUHGozQkRrTWizYxEJIWJIazGNK0lRGpjGYvw+pChsj9kFT5EbztdQ yQGjEFhbA+gjA/rKALPxmInHNDw+PyTeCpXZyC0fQayONvoRFMnA+WBjyRsm A1w3kUUCvT7DEB1t6e1zhMoGIZU9ijQ1eKXI5Um8fiiK9RmUzzC0v0Px/4+h zB5YqOI8Ea7ESCo8LAXhx9DlHoh+Yz90u3s1outdC+HLJZsZ/iPq0inoQ55M /uMKPJbisQCM0IJI7OfflAz/FCDDX9NPA8g4CjGOQiQBEuHFfYSHGhX6X/wp nBzH33EVXtTqEtkhEV5llBICEj+R41oSS/F1h1CXCsnao0O1Bu3PCnT+l+Gx GI8FqFvzkPlml0tAMAF17H3UqbeQ9V7eKDr4ACrLPchgBegJ3ErewCwR2p1U 3cLH+89XW4TnPbjECjGXJIZr9iTK8tGlLDd+uTvwJfpOspnt8BAMQR/EEPTu CIRvQYe1J3JhGEOny0osw4RP2cROa/jkZX6NCyJDfihL9+GRS/CcAAlK/loq HYnmCjwqURMrPWG2+oSZg3/UI1rjqJBWjniIIrZYq0WKSG9TjZxIsqQ6V0VM IqOyGC5YaZxs4150JbajwdpCpRkU6boGzT+hL/22lmYGrxDDQ0HWvSie/sh7 d9PxhfxN4hyAIhu4IENsK0hXH19BJbfH8f+PLQfrxvefJSmMPuMBbqBWlJHy XJhS0AMionw3NrEhC/8dfeCLDmrEsS1kk6InLzHKFxoesOjcKdRRD+eRC/CP WQUop7c1l+FBlREUJS4vCdJQa0IESc/hz+/gzzqVYIMejUyrJMWoZjOaVIpU 5KmmhDdKsUo1sTIOUBHXVotOsAkZdR1KcVU9wHI0dIuQXTF0Np0YD6FQSPfw wM81aBHVb0lQDy3VA/9+eKkIml79Yfz/IBI26SgS7c3o413/PgqKmiteBi8s vB0FdXOTaNoV5E6XoG0rUmFt9mS1CI95/L/nA9b36IzH5KrQ4bYaqM/3hwCx /MYRbltTKR4sGpHM9z3JtFbrUUNyQSkYqdRDAg+SjEilmaUS0RwTvVU9J0/j nOaujRvf+jssmXI8iCuLyDOkCAkVbWuz1D/XNoiYltbKWk8sVv+DgkRUulc3 sx+fp6tAevMo2qpHltH3QSGFfmDFZERFZRxyye+djVSKelWA7saN6Pb3JKfy VRTZcOqJUR3r2yQldDJs/6iA8MXkJO7jGBMjeke/Fhh5yBaerHm7U0QMZ4lc cGncamiyqcQIIIeV4yhoa6nAoxKPqqDFJw2pQ0h4WtFstYKSVLT2VGJoiCV0 zX8INbje1fE0rn2atALK8CgmW4Vrvxvt1XZc+y1Nuv71shCkIrPKxeEgW/XR Xklsv7ZV4qhh6KlT2Imet8ji5yKHpWKD6CXoN/klDy2S9acMCjnod1Ncj35J H3Tsb3gHHfXXALqilQk/jcfjKoeb0UB1Rxn8Ew3UX0sxzscQ6axdaKC2SJx/ CjkYC63evG/X+79lvU3Dngv73/JPKSEkGw/i6h/ClVcJNKsEcu3qt7VU83LX GD8QpSBHnZ+UIgL/qCy/YuTn0BgXMqrDZUcVQDGkoYpFkGYVKEERHIhKNXo3 qsCOZrE16xtkDai9YgGKYXaFiOETFMP7GM6+vUPEQLnR59ZJ2Ek+IImDwlsU iUR2oR/Dw4sl4n8I1/9BXX9DW7egy37jaNSDN9F9fwnX/hk8HkMnb6AmCa9v 1vUvEz340z55/JSNeKxSB28+HnP43T7IxlOy7qEzAkQiynC8iqRYxNJ4iBUj iWJJotFINpcHagVrQxuK53cskkRrvYqlyWoFvSy9XWssDi0xyYg14vLXo2jq 8KjBoxqPShVLmTLTgYh4ciSW7ZqzWdkgxoPEsrBGPDkWy36AMagdo3ZKDPsK MtRwdKOfXStV5KdXc+LFUgeltx5fxmlgq6H3z5OkzF2oGv0moUUZS2UjjIre ENF0fRZFMwRF8yC6AP3le4SvQf/7cqKoQ2xVwmfvVvGsY/Xgv0+eCwGSsQzF D4mRDp0eIJ7/4p/SwZJi8RRbzWERNYuI2porXLVBqUi4JH/XqNqgfFpZbWQp fs9aQ28XicVQPHEVTwoaVDy1Kp4qh7zYeERFRPtahLzourXaOLMCCWwZZd6r hcCoJW/iAQlkx+wRMZHT/doWjJ42CZnR9Som0aAVkoUcTIxGjsF8I6qTuDGU WmBuUM256mW0Is+heIbi8SiKZ1CC0+u8/D3QkvwFtefCYrEi1DFALvYpq/FY qiJi7RlvCew/RBynZRWHNGmlGorwOIBiOcCiSTUd7FBrRBxVkGQR1aBYmMkU lsf5mIzeMxqTBFwLGvCmeBLlkoR6dJLr8LeqDV6LksEPXEVyQbUpITZrlfWk lCfVsDdQNEu+F6kPymYhymUeBkOzMAiaStFssaRCycC8hwHROzvk+tdRPi+j fF5EVXp+rWSiqeD8ODljZE1QZQbOFja7Y4oX+d74Hka+6Ihd/QpAd7TsXakT 7DE87kfZ3BeH8B3yvdjCX1KiqrNHVWe9WpZF/HITab2ZSqXEFuoSIJTf889f qlD2O4JBoaCupHy6Uo5HBQsm2SJdEfQ7afSmpUZNjehKzOEyEUpEhZKAZhRG IwqnAY86/Ls2Tkcqh+xMDoqHytulmt2hHJxteEKhGIfYKAybGoxS51aIYKaV SJcjWX663igOlQReR34bgUoznIRCCkN8hmbmETQvD2DIcy+GL3dNQx5DE9Nn ghHMidATzXwPNPPdyMwMxoN6Vu9BodyNMWk/+V7hrtUczoT/VAjhM7Rr4JQ1 pCysf58GEJnXtyedSHa7mCsk8QokkkzXF0IaBZUmQTnak/K0J4ckZXw0klUz y0u+ygk+Oos5TpgpSJPuiMlB3cGDxES6Ux9P4sdFZkMP3PMKgJ1iuo68AeOU 7VCnbIOKag0eK9UxXpghKrqWRDWu0OO4t9FDeH2TtMhSmewZ5LUhy7g6DQ9j 8HLfHNnsQAXzvriu1Od/3RgwatQdLU7XJ1FKD+MxECV1R5s0UxZoAebvFeKU /WEvhE9D5/jkDSillXgsUlqbSb+nWeFIR7Fs52I/mLss1bVK1+/FYx+KRERj xeLXnxDJpUx7zVLN5dbNN6SWaFH3rNWNGZt9gomoL9AcS+SQZFCBG1E2DfEk 2516lEkdyqNWZWJcgqKIcNuuFmkK3qxqZPgtUzZ0LTXwfYZq9CnJhuwP8tvo HQGyQV57kjIDqEKDvkBXgBp7pwDciq7ATWgZrkd7czXyWve3tc6Ky0ZdULzQ ZF/OLRTvuMtm7iYIn7KMIxTjmc20PCY7Q6TDNUNFXHlA/R6RR6CqHGJVSTWR PFLNpQKZc1ggyWbPCSBhxFkY9ZqKCRJGDDUlYQSCB2lM0noBmdIgTSFSO4ia Qp2ce1AiO8kL0BCSpLKx2ZMIE1u1XGu0JVMio7ZLiegVKhEhqT1HuWqVyCOU bpstmnIb5VFRU2782AvxKX40IAwPQlW5C63/LREIX0sN6HWmKyV8DmrJ6abC g67zKYuFxWbwonubomhtdH1kjwu/kfTfhP4nQGqyPfJoeYE61H2fJhVB2tMk klbTodC5LD3zoVPoKqSMVWo2gqtRLar3Ah0VXAwtkBEcaZIIr00EFzeCS+MB LDh6D4k/ASpiXtBTqMLb1SpWabtTJV2jnjZdS64C50xLxV2YjO7CJ0hzH6oq keBe3eh1AzyLNPcUWqQnFos6kUW6Z4YR2Hfhho+oVw3VCQV3Fbpt3Z7QgJM6 o2gHxfWa1f4b8ttfNbN9wQH5faqpFC1HCS6Q15xhdStLR6ekb9QCBQnvGBXe bjnqSYgeFTpCJPkdlC/yC0iLCjrCq3SEp5qnwosb4UVFeNEM4bWgxjWj4Jrw aFTh1avwSPOMAC0XRoHL5qFfeXS2WRToJSryoKs2DBVo6FJ0oReLEtFLkRIV EKWhqemFMrjudZQDumjd0XXu+rDK4Y6YNHhSgT+M3sBlSG8XHZLn/lSoHsEG rZMu4QSA2prQVGtbMrYZqiQOI6HfB0joFJ96qYSC1QzhkG4sxrifDVqj5GSt lJrKPCk1q5Ra/LkET0qSS/AklUBJoZTiRkrpQCnVJkxP0YlwkNSMJEVpHnX+ dqpnTs00q+ulocZYK9pHMUW9cQxo83S5Xl7vUOJyu7lOlUoYEe1T7/fRRmEs 1BND1aueRqVif1sqWqxUNyAbdqetSZXic/+5WJ7DkJU64ESpOKMjtPiZlaTZ 3tjO48sqxv8KEKO4hL8JFGOQsokIi/X3IRTjIRZjskkDKxaj5q6VLRMqxpDm HEiMrHBRT+EiKMZWVLYWFGMzirAJxdYY1+X+IdQn8FPhUaU+oUnWHYqLNPep b2jiKyvJmvaSpJiX/MEP98gmgpFb9W2Og6eoIEuJufmecbsdY51bkBt7vYt6 idx4NXLjlciNXR8A8tJts55UjWrQ7SjHsBY99fM0n30WNcNvUFFyYkiumWRF edQRi/J3AaKUEKxzgCitOEkTG/aHfiznYCjmifSgirJERNlULqmLDMMnyW1X lC2eOFGUURZlwhWl6bhApcyFhgT1gZM0a1Sabr6PTB+9Mpm+nRqQsSTrVJJo 8r5AkzedfBXUxwkYHY+lZomdsvXrDaTalzVrgYopkvmxdezvJ4lSF+wnGH+h 03iDq5iPGG8erV1fjbm4jEQtlJRmPYC+irLsmVtQomtVopRq/QKPGfxuE6xQ M1uDDy/U/2evlYzTr1SUu7KJE0VYqKLElfBp6EHWzvbirHQyTyLOhCPOuCvO qEeyqJ02S0ckS+ejhuJj9PPn0ITCbNQDRUyEC9UJUVNySovVKaXriHB3K+lS MygldakhdAk6o/MpdCuVvXOTiqTP9sNd0tX49ha5/kVk3eGrxZ95ZoXxX/4d HkbqvQ+jqrvREb3tQ5TwOyjhTH3tj1H1rTEvROiK+vrXCraj4XP3S8xG/RWn b0SfZqVN5Iqkp9HvcVZI3woQsFdkUs/0NwGKerqrqLWB0tVv9UOWsJGuSPYA 82+60QnLXROaIV26hiQs0m12JMzSNR1NrXGjrynR1maU60+UifFIoGHFo0Fp mJTXDTjoXUi+hbqFzNSuNlF4rjRMdf4vyqT3jHapUh/Nx+SrbpPr0aLmwCvr ST1IvE9TRL6A9wqYtRg4GaX7MUC/0QA3v4HSfRGlS7r7qOrunRpiXC9tJuF/ oO5eqrr7R03Rn7EVDasJBBe5ujvWSvaEAMnKnmxbt3XleYar1Z48c0igmv6y CltfaEXqcbCG842uOMt94qScZFsWccZVYUMcOSr/xttYpvRYCwqqJZ7OZTL+ pThJLMs0E3GtIWKNQUKabqEa5H6tQ+5WMiZdXUn7W6ukMZYacKhj7VP8dmOQ hEepLN/ZymYVXqf4A/X1edTVoRTGEwvP4o5O4zH1RVW9CVX1+lcArkFV7U7b dR8ESYD1U5e3p7QtcOhxsaqqyUyegaraZZWq6JeuqobG+CXKAtXi76+zyjHX k2MtTclASZJa1+1RQe6hx1BDv+8I1AjTBCQkTId9KRCxuUwVptbxyTeiz5CI NJFAQ6YnJeYGI3ERKJ3fGqdWYxQnMp5RWOv6OhparU4SXUNSPaQsXBT1NnlS aoAqm2uQfZcj+y5Eic5C5p2KEp28X7rcmAwwpEQ+YxJGC/saBTMUUGIw+eRC NK1fAAxEn/dO9E1v/RRMPHk1lQBQQ698CrmXrOt9eNyNQi1AofZCoV6tQqU4 5oJi1tDwGdoifvo65N9lKsy5sirvW2l+1xWUXz9/FSDXMzuQa8hmB4xcf2rl 6rOsDVnk2ixyTaKiJltlxERbaz0qqydXeszwbjQjS0DPRWJJ/CStlKFu4Qyo jTgdNTWUSxeUqaoeVIEWKuWS30SZ0XUo0BXUJ4eU+yUKdQ6a1OmH5FoyqxPx GOeo7FubMETF8PQFCmZQTR/HsPQBdJbuwbjxNnR/+1Abxwdgtpx3HwZwxeMU yJCaEu/qzjYqi3YXkuJg5jwqTe/h/E74tE14cH5HpTobj+n09ygr1+9nl+sv A+Qqw3aOcuXK3Os5wCzXXBbrz1is7UVabEXq5gxEXUmkUnZIoroS/5oMXSLK 6mobDEisfpG2kVghQkJFIg790QlSNZWggiVtDWkCr9yxqQfUZzL8S9q6uYmb rdhfWqqhDV1LXfMz0Cn+nJxiJKSx+OXfp+5h9JleR3Ud4ajrI+QnzZCpELdh DHILesPXojd85VvyWl0p50AEPICSdijd22gnO0r3WpTuFYJwjm/OcSoRp6G+ dqFe1AVeH8hUI8fQ21bCP8gu4f8IkPDZmZa1dpcwkkfKnsNEP4/3pGwTtI6F tVKm1F4FpFDKKakA5pD26nQK0dsGNrRxp4snarziaEyNbQIPI2iKBEnSv3Ok nFIpp62Uq0zwGsDJew0va8cPeU4rtNtngRvEFsten08Oo8IPITHfP1PUmMiZ 1JgyfF1fBzsrJXx1E/tJLMXz0U86e6+377HLamThxU5rz3Qr0jetSH+UXaQ/ tydJC5zmnmp3GkFScCPSFGfpZ050szdAlEXW96VgNW1FWe6KElJWaWtVlvWe LCPSuWrkSefFYvEcEiY65lESJYlU/acgpaVLjImtdBwno7SFUc8RJsXdpuKk 68gRXlQlDa8c6KAoJ6koP0J8v4eiHLnZU9rnVog4n0BP+NF5wsoDp6M4J0sr BCvsy9KhwiK7B0Rh+6IrfFMs30j5DBnwwR0QXThHy56vMDErqm3WCprOFyDb nwWcnillzyFWKbPKiqYep6Ldp4GsF8B64i2BNIo3jeJNt1TgUalQPJ552Yq3 td6mmGxZONJifeIYqiuKGI8EibkNtZyzTZni5RgHrHhNgsLEsKqt+BFQX/GL 74/aAoctsS9HbV2scSyNEJhWrJ4UgvpD0lT0id9En/i19aita0Vbh2Gg89QS 4WbSWnSn5OW+Bbd8QBMC0Sd+HqVq0vFEyQUo3d4U6LSKAlMYe0mpnX5hdsxQ M0UXkwmezU+/ZlXyJ9ll+9MA2Z4jFwoTGBUmweZ66kt/iurKolDG6bfWRQaU LaD6AsoXSLaoviJfGQCSVhU2dldk67UvxVS+8YjEPOJWRVGuVr5MyX79VfdY 9ZbcYxP0qP6aXlfTcylrSD+PhXEotw92iNze2SKqSUxL8iP1fN5TT8XAt9m2 9kf1vB3Vsy8GNr1HYGBDPvBDJo+fQm8pDuEbVHhX1Elgc4E2K5+5y5tjQi0X py4wODOBzctWiD+1UtG45icdii6HJMfy26V5JR/9Bsmvsyc/1E9PfuhONpVq 789xrJ+pFs8VFtnVesUyKju3kuyaVW4RfH2UHi5y3Cc/kl2SZYcOMbSg3JpV do02i3+COEqaOSTFpKx+sTbO0rmcfGiS0IaC1S9KJayZsM+YvuNZAV9cZZXY 5xhR0pci097oulz3EkCPpzTNcJ8d24T0CuHrMI7p3qBZQvR4z9Wc7xnbrNE8 BRXwFFLAWSLWl6zwfpFdA4PGcf7JZdeaHaqEO204s8uR5G/YkIZs5iEz+1Dk aWOTlJCgGZeoWcbBEOOmrBdcJdJ0q2cozURrI7Jus3rDrXhEWBvjyLZxlWYM pRmNG4mmoDWRNnXfBvaJ0m6mEL9EWZyauCzbapmG3sJkINbqbqwF6PF+gR7v DMTilANiRCcWsoBh7C7xft/ZbJrTfgpDFmqgqsazL7U6j0F6RQH3RH3q8axm CdnzpZhGWlTDN9LsuCbJ7FOkago01LB2+mbdE45aespC1dCZ1qIOt5IOmlOt kg6aJHuue7pIWlQ3U8zHe2KuCxKzR7p8DittiRABMi+Gcm68I1KW7oREi/Au SblNQ9gEuk0+ScdE0nEr6aSs9s9ZZZtMo4JK2QSwplWxNO6pLr38fvWCd5pm X/R+V9M8NbSni2iPEEp8donmDw9I/nCsukx0/avrWJ1t5vThOQD3TgO4g2Kc cdKWeC0a06tfRINqS3GUk0ixy8TSI4N6VYOU4ygnbDL+NIyiy3qVMCu05xRP sU7xMCvwX2cXeNDE43YCr9khVtbH1bv9XO2IXbn6J77cIj/PGn7QarmxuSJ3 SV94cq+BtpZaSV+0SnKmDTW8zZF7wi93WYRfk+j5dKZsJ/qpVy2vUS03MS6V 7kriftmbvocdrvwpM1Uj+8Roxt8c9akmFUrumK5FLYc30B6/jPZ4OMa4Ty8G UxIYiOK/E8Xfd6z00/d8BRWdygFPijnmOXiUvCjQxuGeNACGxpmWSTB0luYY u2xkZ0rEvxD/nqOKzub4GSv232QX+w/sSX/mB/JcYaOQdxgFRzY/ql3RJ2TS VCJvEfcP/fWfRtc8e0X2tC2yi6qTuE1ZT8RdB0ndF5ZEVXdEnkPyVscBpR26 AGI2DWmcZ68jyaVzt0abmVQ2sRH3izXJDjLaXEGJZdqcziNDSzxBj1NBj0IH 7G1ynlHRX0K7/dxSdJyR1gfPk+ettNFu93rLU/QrSNEHafHnNvSc+0j4Hu5B beJVksz4YyEq+U6dkrLW2aY5T6U+w2h6aKiV5O8CxK17vk4K0PJ2gq/NFHx+ kOBDovA/dfjdJLJcx8zleS+Acmvz9FkkX4kONko+qTnoJDrWJPkkSR6d6zZV dnnvRCxG+wgcoqdrxMFuYwC003a7ncMPgGIt8xqm36M7bDY7bM956Aqx7dPJ rpvRN2jPDQBeRwC8otr+LIJgqIDARmF3TUAQvI8goC6a5x11H4hMfxepe5zD JxZstzqx6+i5hc/c7aj7KjvR7uQ5pkREx5NW/L/PLv7vB4j/Ap/4txvxZ+V5 k9lktd/TLiOC0s8h8dNgaAWAYXx/NV8A4Ao/hUyfUuGnUPUNAFD1dREvQBAI 26P49ZDMJvl1RviZDFDPOxPSdksVDTaka0qMh56Rr6b+xK2GAbQIsajc22pP 136EDu77aOJHo/BHbZbp+QSAl6j8u1i0/zF07B6eDfCADha+C527glEIACr/ mmT1IG2qvj0hyeobtF33H9XIADTNg/ay7ZDHTqWNIsvVefQSX/S/x7OKXyIT /iPofhEXuKeT+Gu2s1MnAGDPjkNp4+E7YlcSqN+XS1IncCnfi8CdirDdICQC TzVLSC0Cr7UCT6nA2cRHWeNpxxAGZf/jEzo9HzdhtSN0089Yb7aixFK8w7TC EfghJyQzGr/b0XguUjhVp8mFIjyi+49RDcai4D/aIYJ/a4No/PPLAIZ8KcK+ byrAAAzV7p5svPwT4Rqk/Kuekp45q+1c749wrMbCpXr/eajtZ+ymjcEqcO6Z y7Py/tz6dA9beXvDb1XKQbcTuTBAyrmW5VnL+f+2SqHsnucEa8zweSzqE5To i1TM/moxkbuImbJjVXjI5qI06naq1cwryRVij7JZZzG3hi62+s2evep3LEPU zSpq6gCnjRQ1Kma6xo3AD2YQu6vbND6DtvrPQ9dtltagPiuStBhZdyL4cSju D7Z5uv0i6fYigMcxIh80XdIp/T6RfXk30LCTNzWVMkw3TAzSoO2OpKRWekU4 tcLnXFwiun2q0W27k0X36JEfN52X6iEr66Ab6yi1B92R5qJMapfDp95i3mv9 5Smj2eLR0Q8m9ULt5HdLVUbw0nUngqfUWRp13BO86nirJfUcZvXTjJrrIcav DeXexoZdZR8X2beo7Kn7n3Zn1MZSzOl0jWvUgzidNgZuVfVeWSPZF7rOhG80 r4OC9s/xm03Yk6Hiq8Wre5JUnNoEpgDcTvthP8JAHeV+NQbrV7ymfcE06458 dFbjrSrbNZm7x8hHZ9kOsrI9Lbtsg+5a5LudQ802w9uudEWt86xklb9ZsPns qh/nuOritKUdsYpIS1Sk5SxSaKmywydUn9lNV7GGRK6n+uQqMo2yXBMZcmV9 dnbc1Oke3CpKviS80qMpSpny4z43LGvy9uCuUG+dQvMvjcd+oL0+08D/FylN ukjstNFnkuvNNDB7lDMW4FnVa27VorAcjz5xE5bbPQOnbkcxa8c5d2ktcmpU 06ypvs+K/IzsIj/BnnRpO0FvE0Hnem5aJ6dy5dNkR9bfUirfZ5MxpnjlZr8Z YihraK6Qz/5L1OIa1mByzZJ+cXMSxkRm7LOjCrdFo+3FTSqs20Zog5VsGBXV 5cAs4Q/M3BqkVpvNQAKOybTzkgPwcpHydPwSnxVqUWOHeGVvUgButHc+wCNz 0BubwQbaFDOuG4nhGA0VeMEZKkA2mh0yQ9qNEoD/tcJiggbnUFs7b3Zbxj0+ nm5P9e6awjIMuv+OCvr4AN3OKvIcTsHkq4++E/y51lAHJehcxsCxGRgwSbki DdQkIyMYKFPw/sTacB8ImMr9QEhq3jWJOk9ASCIIkszlxo7HbW8887hm0E0a joCAet9ZdcZ4ZfQ/qXz8mFV5Mk262i0U/Z4JvqlqRbcUWGLjLn7pAaTSH0tf LTW8X0Xb5p91ylb927TzB6XcswnCV2rT+8Vmxk4nT6d5t5zpE5nF4ulvRfyH 7CI+LkDElwWIONcTcacMEduydJCA8/nnd7LIdj9385mMm+kUAd2MBy1iptPq iidpKg8KGF/UFa+KlvoR0E07NkO8ouNC51LcavIK0tYLroq313G7s0i7cO1U kXqnow9N9MyDOoAsD97cIN4Y6fVws8XhaHgCSfwh9L3vRQK/40N0yrTPtofZ UvyIIfRvid/dU7qCeGDCZVJgYKPNE7G0L1625bm9I+GTP+P/3WkFf7b1v0Pe 3WVFuOC7zVfgrSIv87loWw0WskKBz5OQPEfDMn/39V5Kxmnbieu9Owm6433V FjqFP1FTqUWGoEK0PqU1bYuMzhYZ7NOhA59C9lelJ4TEooQeVvoEp+a40JJI 2ekJdVrqbJeW05YFty97l7LAJh20sapWGsjmo+M+s9jvsHFAbrZN/JSTME+g z/aosv69kwDuokZdJIM+SAa9Rkgc3nWw9nYOUFIgMqDy2T9reEsZZeL48S47 ePigDEwTMpAi9iwlhSkCsdssOP5kwZHvKrygxOAi6G6mf/Hxw1ZrAlxkiB1Q t8Lf0ZCv0ZtTOKW/c9qDYL8DAFuHMS4AgyBlUzMMBAJBHVFAqwTsDIJIswVC CoGQcugBmV/roz9jWjCtR6bJzKl526YG00FIr817q1t0bzUBgLz3CgHALJp+ WyR2n5p9TZBOXt67m+X6EavtjovHtBe//2doFT6RbByXUjUB320I8wQPVKGg jYXaswVtP1qFv1LtxamldnF4gqavnbJA/+ZKmwDhZxlCt8adwXF+wLNBN0KV LVWBd979q3t6NcFkK5sRgQkhpGaHosNyh1RlpUHC5HOERsy0flu0M9s59pkx 3pTdEawcdEq0ZYoVk9WpziHAMEbEY6AoQXDSiEdTO6ykkDJMXjMeJ9LQwk0i nUOgwYV0m04zYcNdawoXu09Vt31vQEuyCgOCZZWSxCPYzKFgr1gGKH+2Xyab fqRjLCjge3WNeBPDlth+8AEY8/Ubj7HBGOQNNC3Xvobc8YJk8rtyJj8lQ7pv 0Sx+Nyq/V0P4EqrZFHMDGz9+qvCHQIX5wwkSpuAxWdnLEMclFi8XBGAjk1a8 xwJvHP1X19wQXuTwQUYohwpABjI7nUJ+vq/Mt8exNidkVACEXfjdbQWgRNFS zjmClIeYkEAml50QhQuVgyONof/Bnw5kYhJQGs8jgXCJm/JPglozUtCcSDl7 Q9Jee028/Z4CE0z6Rjg0SIsGNSsvrZLMv0kUTNMaL137Hu0n0OTQCCr9LJPS D/JMyACHh5eNkoapa2hX1zDZwyzTNHRGQy8d4fwP2qdHPTdS4w2frn3nun9W QLNAd4fMFCl4SLnIIiXoXo8dICXoluZ/c0+v3kIoITkrVphZtjtQ2aECMznj zu0a2Q1MfqgQ2XcYmEjfB8OE08UWKmyMKBZJa60gje4IAoVhko7q7R7OQ6Q4 PmpcSqlELBFq+dCKcDOjxewkAt8+hXJtazfeyN5Wj1lMtpjYxSBliSJlbqkE o3TtJ8iwY7ZLMGqyxcQsXCLAgPShWcAFQjq37zjZzXnty7o7bIjuUGBrhNRy cyvPkGIUkDW6uBStkVMOPoWHSdiwxdYIp7vM8hMLlwssXC5VMDjQEBCEggdI Kmw62Rf4x+HAErIZyAywBFaYOnFC0qs3+lNX5n3EMoUkMXmhgyKtOKk7A9qr mcpAkkS00pKbRsJJR+otkvgxJRsLozjBSKpNcYRRlKFkOoi8njADJbuBKQNG hTqXxBopJJxNDf5S4+JKyUzTdVSAMOHu+xmEQx7ukAWSweK8xhQw/X7UWHDN C1J3kFIz3f2NZiZQkQljnyvNjgjqHjooyWjDNycz3ziG6Qu7Zz/HD6LzLQb+ EgCUHHveUQ5kOrU7nSFD930h4NBPDoJMTNXOkTEpj1y1SvhnZx9kHNYxL8Jp bARKDwsUPsk2opRwAJR2wCIZbAEKKFAAKQcUKAISphy1TOzIKN94QIkpWKII lEgGWBq0OaFKQWLTnAiS4oimOhUs1IFkypKUxjaO8NwSP1DGKlAozfmGU5Mm znlivlSp7p8m6c7bJsi11G9mdqRKKERNCVShEs4J/1NnsFNJ8k+mSqWlC5kf nav+m1OThpC2DDIEzrVQ+VsAVL7lACTDFHEgnd/OrvlAk8egCXnZFM6XGYfW djXY/uA8Ro1HNB5imEx9xQ9ETef2qHHaTaVtrbMmycUTBkSOgxrbIs6GKur3 Zwxq6FyyVAn0Z1zkyHYdDKB/xcBpSPinUB1S95emuZlJewY4u53WpY3EMJQ1 1WlHnEyj5kQFDUVNlFB7V4FDtexhBJp5AI/Mlhw5lTbvnAhw6yeei0NNile4 G9X70I1qhGLCl0sJKHwebeLYx90sApqNOhJkGfcuhUJ2BBXXOcMnT+JX/3cL n3P88GEQHJ8dNEdZppEutjwXNHTkKG7k4W2GdHK0Nipcw7gRS5Xv1MpcxBh+ ceHymwy4HLA9rV6HeSnDhQInULgIVGrVItX5LFKKIeNaJA8ubQiXAMgw0ZCD 06BTyxjXGCuFfs4ecLlC5mAmZHSG5uYGiZzobcyO2s+pNLpXMi6f7BLYcA5W o6bh6AEPpU0hxDFTAe5BjrkDOabgY4CbMHS6bqRTJvvjfrY4VDdxeET/Nrvb Z7AoPBj8wcLgny4ZHJ5FjrcsItu3OmcCgoMheUyNUBAW8m3dVLselS32OLmV PF+vK74joaKIAjKn79E0wZmASFFgB3eAerjim7goaPb5JWKUk/EELmkgEhKy 16BeJ9ry6UgdGDhUIQoqY5p3C0DCrmYhDfr+VGaZq7Ez5d0YDfslG09IGLNN iWMtuiZEHIuQOOaih0tuCeVbxnPDo+YAj4IrntZkGzU7sndrhnAxaVgv9sy9 knc7RWupwhmesZmmDzNd/MjCxBvf3PXIYPJdC5Mu7oXVm9nY5PDPdvEzPaz5 e2NwpImmE/u4+dbHNYaRYmgPNVKcybUJ+wIeSkyQOSqDPA75YmhbpPsBIqeG zY2Jiwx3ZCImpKFzEh0UxAwebe1QE9HtR/WClhBNqMS1rOUh+9UxmQvmYEar MydwrLygXFxXKslR/8wUxMinexymWA/wGqXuqU3yS8sUNjd/02iAGyhW1jbJ rmbANPVDU6xMt+66WmfaXFbhFV+3OSTCt+OxGaUMj8QDyRkWJN2ODCQ/tMZF poTluyDhQ97ZhUa1gcZ2eqJ2R14ANDQjlw0a9S40OmXsXFJoNJWZzS/sgWhp Jyss1G9VWDCRxJGogqAR0Z7KBoUFj80xE/s5Y6upFHqxLRIcy9O/EZZA52sM qsu7G5UlVngsQZfci7biznGSlb2RsrIvS3r+SmqTe0BRcDv6pX3QJ73O3Muk iuNgfu5Mk2IzA6rkvhjy91z9PU3dCw6Gf2g9iS4WCt2PDAo/s3zhu82QQkGM Q/WWXA2GGQohEwzXKhTcXksFqe2p143iOQ4O6BSLgxyCAfmnjoPBb6BZWX0t NCwn2ZCX0eBzLgQJdJ2JYlJIEikmCSEKDwltliDo/OaErcxz8iQu0+fIrJCT UapmpVjTs7ZnA52LDRjErEHaWl7l9VfOPGDH0xNTvKpMQZc+NhODXLQkA9CS 3D5GKny9XgPoORyj3CEA3R52SjgFet/Uq+t0Kh3dek6n0p1msmrmbkX27l2m qVaE9AMV6J1/tLctpeMUC5Ue2aGSHwCVX1uo+DbeVG02PqQPJ25H7nZt1avh fj3Tmi0XBdf7BS9HuXhxmrKLDHeYWb8U+yJ1eGVhafXxI4b5w++OKmJyOIPf GQEjoEkxfQhoCDDoh6jh/xF6pfjKeDTrYKZ6RQyXh2NeMv+gk9A3LukmdEbW 1gKspBwJJfPJyOAXmYr0MhGpcxwu1AdbjJPxfXgOXdGhaGAenYLRC7qh93yI Ie8ogD40puclj1668oYbhc7N6IxcR/PvamRo7kWSZuPnumz32gKc6MWjl+n8 1icpcvqf40PO/1rkXHNkyPmdtTc/dklGkEO/GTxsb+h6GwlvtzwT2D4ifu0u A78MJO1xkfQfHSKJX8hnhZxashPhtDdFnk8rUGrNICAfnlSuP4Mo4iaCh4ul JjPkK66FIcWSGalt9sHv1VQKMRB1gVKIsxQ/5pf4secglqYhliYjlj7BhfsQ jfl7m+T6V83ktu/BYAyEH8Yg+P6xAP3RX+n3JsDNIwCuf06Y6ArexIPHHTpS sVdUfJauVTL+l/Ntuoery1bTwiBEtMQSkfyWnoPwyRMV0yL/AX/yIeu/LbJ6 Wu/m+Ox4Otky0UmHxVOum1khe4UOTGd3o4jCaOdXhZK+GUZHCiXxZ36kKFJ/ prFjJIElJr9TEwpp5pYqi+3QZO4A+ytkpiSaMzFhMURNNJFGRKWp4uhDU53D TuWKqJCTqGN2QjRto/wKomk1lRrxoy7Aj/8Fomk6oulzXIKJ6OR9oiXGUeoA vURJuQXeqLiBaNjuRsN2Gxq2W14F6I2G7bqh6AY/qlsC+2Oo1E/L0tdGJL/y 90qZPfUnZajTtstU6VNMjdHNr8yyDGVwNPBcH47+y+Lo+iNjqNMtor5tAZjT IZLyDZJq2yV21RfWGjW3MfhaXARHl2biyE6jk4Ynv3PMj7vhdnMmkGoDSgDN DKY0ginNQBIwMVVZWnKBlPYBqUWB1JhRfzSJO7exlZxnuoHZDjJzCKS1CKTl +DEXow7MPyjUNAO/4hStPX6M9PT+ZomnXqHa42KAJyXeNn17t76HtPQWWjra 6v+szDDjDUcDqL2xjdsbGRc9aCNxrYwI/XOxS01yb+5T1ih+loBz/5hMbvqe Qur+83yQ+q2FVK8jg9QfLKSOtZDKJUjlWU/JTd9J2jfPLWL7+6ZCzmaWbwV0 Tfl3sBlMyf/JzW44QI6Sw08WUk1l7S1dgNPEHwExFbrAosqsk/G2Uxp30WMJ jLPiiCKDKkFU2jpOrrEz9QN3BNcBzeLsRERtQURtQFd7DQJ+BX7KJfiJFyCy vjgo131OPZW4Uh868dmLywCepuISRejoQN2ltYLe76KlI79bq0vdDD3dhbFZ X+mlZHhcgfT0typxoP5ELfFap6R7lp+6zqkuGXqaLfI0QHrwfB+QfmOB1PvI gHSe9Z58NfCqTQQmgZTnfNuEj9d2m5EH3O7lhG1zvZ1bYcI2rlXW7eU9s2Zz 3D4LLAHVfgssCuKKqYFCp1BrJO9DlduFa6wek5QUFBRa/yuPxQxhGcvnwiqF PjnCCo9oXMiqJdPqaf2SzjezhErVLzdlKSIrghbdPJMsH90BdSXCa6lWF+Yg tKbtF7+cyOo9Q1YrkawWKVlRRWEShnPjbN2Sq9++qQc6Oqi39GwyUqhP4lIk q/PRjzq70InouCHbQdaXtleCJfVdRdbDfmT92iKrTwCyjs2OrIstRTnBnAUV /7Tp5ZAPXtrSl6tOlXXXbaj3VcCVHwQuTgvsp1cmB50sYQONOheAiYvluVau NUz74j0XYExfuqoXZlhED2B0LlnDNgQYc5cDsFZbHHesYRaA2VSSZqDJtdpc L846la/oGk4XUBcXfr3P9gp3cW6JmoOpx8JkF2cJd/X/FL10qkG8L9dfQzkD dK2uMNyFwR8Pp6ItHd2dHosLSyB8TpHHXXwzKNqGucpmHk+erfTldW8ZnD36 Z8HZxtFj6fcvLc76HhnOfG1+RwgxZjCzadfbBJYRBO7MzQIw0zyqptECTJz2 S7zmctO8E4guqYm62QTQ5h0wlXRp3nHQ1eqhK5aJLo/CInG/ZTQURuf70goB BdI96m+ZZNTaWg9d86jOgQpElnECVbq2SSj4FrWe004DpbBHZgDc97lYx4KP 0Gkf7c1cunKwZC6Zw24HSS1cQ8McTO8Fcth56HCdldF7YR0ud8rdTENX8phs CsuHIRcWwOMXCM7Wvfsxn/ALC7Rbjwxovq4MNpCbyP2u2ky+/BbOLWyxhQ+x k1szSGybs82wZgcnOC3IEFSZw2Iygeb4Xy7Qjg8Ami/rnQE08cCgtVbU9Eyv SSzqx5n49DFI6kZywlgS8dXGGEv5zGRrRqrBYkxrIiZALIk6Pr3DYpu0lkb3 mV5c5mAMGexTB2NcI1kjHtgw9MB4bwOaSs6QU9/yGOkU6zEC+E4XNOb/AtpP ul8aM04zjRlr+b6P8vdC7VWf7UBqssGFzunKh6cuKoAnLxQ0rR4paPpZVjTR s8cdDk15LproMB5XlRCWLbyGTElee398rRyBaHI3qOdoBzN1L1sgeWbRwVKu xZK+aeNBLrS1J660l22QRfuRrwPIaTpshyf26tXtMniyvGU9ei99RedTKrSW J04hojCAs0l0d4yjpkN36F0u19eK28V4Qo2YpXgiizh2u1hFSji8uVZ4i1yv IfPQMs4EGISW8Z6JukPqfc3jd9JcAx79ME68CY1iz1aiLHn6GITYXh1KYkpu q537V5pR1zNZ7AZWz1xcAEMvEliteGscv9JPLKxul7/+RTBJbdaU4hyKqtnq uPEGRw6GAs1fyEyak2K+l2LIANEBB0THZbV+oPcOBN0RzShqrSfrp13OP3aY yTbFC4rQ+qUYRYaZ0jY2lGwDWGayKIp5NwHKnBZJFds8tVCEnhWI8YVUsS32 MgyT9qjVU8d9pFZtya+imPBxGmsxlZ1327DAbfEjJCZkDNyTksE2NKX3OoTQ lTTTlcYYVWgi91hKqCteTNl2qRsP2tItUlXImXGQD89eUgBPXyyAWva6AOrf LaDuOjKr59uMp1Yvx4IrxwOXtpP5e0UIYEeAL01nCT3tPRzOJO+g3psvN+oC rVxk8FOnjYiNX3u2cqxfSrfbp9DyGYylGGOCs0TC5B+AE+6tii/OPcSlcFMX N9X/XGvx6H9H6U/qFXLrvsRCI5ZbFjKkivEf9PkA4MY3EUIveHMNWfQ0LIPT CjqYMlyPrjnNR9Kyr00ruB0iyzPpSERi4DP80gIYdonAZ/Grn/DH+KGFT/// I/h4jYuyYtIeYHZe5Lo9rl53dN1OE/6FDH74HA9DHfLUb5inPPgEQ4ifz+Sq bBiKOD2vFkOxABwpVzGOgHEUUQw1xdXafFumyDuJUTcUpFNNUpRCwHVa+6O2 Vxq1SBXjWcWm3vdLGE3OEzror65CqlqiZePZ4qDfQZM6PpANX9e/DHDNMIDu g+UGLIyR27TFnpqQOLNeIw76+br7z27GMDeVE7qSv33zuJzexHx48bICeP5S gdqCl8fzJz3JQm3A/w3UWLHcrLtvRIQPamakX57biK+0hA7VUZap3G3F/Jmk W0lg9qvDwkwg5plEMYeSgHehlvbRlcDMpEr9MMuAWoKgxjBTPPzAOut2a0dA rdlsBCrKCAhNusFsHON0Q5GkG5DS1IQey4EgOegPTtVc1ljkslFOawKlGR7m 7lhvokQv08REWfdK9t4FY+S9b/dKzGuYymSj2JdcZg6fPCvPhdcIhNcLCq95 Lwm8vmfhNfBfgddGD175Ci+HxLZadPkxpqMKsgyUc/Z7qN+UcR+TvSHT8uRg TFue8jJBxm6Xibb9ftdXBFjE62NI8ybEdCyGS+PnMgaZCvzH7YrPNqcV9xef y02pUKNBuvn5LidhSq0vHAk62QbyvWwkuNFrZHhqvvhcBLJ7xgPchkR201sA 141weqQG6XiSfjo28toGp0eqjDMNAjL03U/b6jQyrHKIzPbd5nn+eD688pcC eElRNmf4BL7yOxZl92dHWV5WlOU5KOODgdZJgBZy+6aOEF5eL52Fl/x/b1Z4 5WpHXSZ/8f+bDuUQtuj7ZnbJcHjoRxe0ZlpKg64IIYzwRSCL0/13NWka4rSD hIj0tzGWBmi+bhm3w0FZzAXZ/lapR29vzLCY1C1zSMLDKbgQE9Gr+NjcFgmd +zfQuX95ufz/aQIbhYfIZv2Rzfohm/V2Gq2Yze7VW0z3NTVEvf0nb18s4eZu ARvVo7eEvB6H5U6zVWZTnvQ4SCmnE7z1twJ4/a8F8PJlArxZzzHwTrS4u88F kkGX16bnwjHvX4Bj+70DXwOWAkF3l1u+C0tjYUNcp7JQ9OrY8v+DOR4ej2cs iln1N0YEs514baxZCMbQ7wwcLQYzLSo9RhY17mAxMwXmWlQ6P7OV3FSJTIp1 VZUUH79ELM5GLE6l1NdOuZZSX6Nx7d9eK1gcvtgEl9+DR5H47qf+CCS+AiS+ G4n4nsEowRJfkomPxp8zpniQS4VukpQUKz9+GtW0N3kpMMt7subHKvZGXl4A byL+XlPsTR/2qbW6jL0H6K/cbxhu+Zb9nIJkJxdmTou5DIAS780NG7whMS7t 5WiVyg6GqS/0VYoK5EbW8mHpMZtePRQSvJ2TESkcHm98LvIfaLUorRmNdEC0 wCSIgDKAi2Wzsg4B0jWmydTk9QudfCs35FBJkqrdlBvDuOizPXIdNeNQWXIM De+k7MYqBhwMncuWNmTuF9b/I7S272LogATY63kMTYeYIc0pIUC+Z4JWvPk+ q2XcaUrJWH6sizbknLrBc/86JkCDwVF/L4C3EYdv/EUwOOVpxuC3LAYfCUBe Dv1kdOVnx6BvwJTgj/28jZTr35RjUcghxBYpMVU5zNc5GyRNryHi0txIUrfc +WMLDS7y1Arb4IJCWZ0f28lr52l0nb6DwpDHO0h02M9FolpicJCI1li+2H9b 9rNgZPZTIGLY2uYAMeoA0W2/MDdMNwWAsqhXIzfxBFniTfiJ1uAnXFIqzEfN PCzRfQJIYsCPtgr7vbUGYAQl/r9EIM6SJO29k8BMEe5NKRK9O+wVettmvn/d rTQ9OMrJWsbU5dVCftR5caaSHzX08BThdW7zhfb0iEE6RsH33j8K4B0E4FsK vslDJtqnGXw8cdZI2fln/h+y1Hh4CFZuyIBgKN/tRjS/QzkZRQO7z1yKnJ0z oeg0l+2wwwl4JqLZwae0l+u5hhnsaLoVLRRzbOBBL2PzvSWicgTNo32kmOb0 CcGwUWFoRmlhVMvldCHGVAc45LgWsRaN+z1ClxTp/IDNObYNaEej11i2slKs MF0z96D0UE+nrX2mhxot8UjKo6wEeJ5SdTTJeJpMUNJiAV9rJtd3exKBaJpe 3ZRvd23YuKxSSZGGWpjp9Zt56qkQ4Apvs85c65AgJ+a4mPzgnwUwGnE58q+C yU+fYEweZTH5RDZCzIEjRGOlopHNMgGjUioOyl2IxXyLTjm26Naw9lvYjWfo gNHp4vfwyB9I5vHk2sFuFo9mP6Hd1uTvclRIHt0+59KuQ61KcCqxZRd/1T0T jFp5T6E7mEIwJhGACTziDhgziZHOz4yDXQsdFKKs0nGsi8okTDFV0Qk7pQl7 1AYJUV6k+gOGJ7QX5P7PAO5Cl/BWtNA3vmsJ0k7kcds60ECHeygWL0cjfVGZ EONZtLtQdyRTp+Op5vbZyzyCnGPwKPg4WsH4YbgA3kdAjlIwjn98kgUZg3HI Nw5GZsVNgsXKTYq/TV8Bj3kuHtt1tEmwIo6kuIleilnbJHOybW4VeEs9zMNi SBMziEVyV7Ii0XUhTaK5Qez7aT48pn1YTFostikWDTlmbgig84O2JJlw2e26 NSEKXWMa2XhTAO12LZQW7o9NhR5DlFeojrEQ4Ik5Qo730X2gx0t1nuYpXPWq vNYVT3o3d/KIUEr1ArbNOv7Zdn242T4wY6AZjOMNnHR4XCf4GHE4Bo/3/iY4 /PhRxmGexeFTATjMDXisg5jlknaIJGeWcJkn/iMjcqMGLgjJThlgtIDsiB+t 4XbuPGJcRG+8bY4OoHKad0OZyBSTranp/EymZKIUcB6jwCw5DDhrTEoq0oBv k1H3F6v/3zaUIbI04EzE/ZbbAJTe1t62PKPy4TbwuuEMXUMtSrxjpcLZsaKW m3asjKH5DRjOvK4VkGeQLJ+Y7QGU2kfIevd8E2z+j28gRuPL8CjA44YYGW5b omWezJjcwPciMZ0li/T3nHadJSFjnfFtPulaAB8hTj9QnH740GRdU8XpMwGY PObIMJnPmDRMaHsE9FNl65fLN71yFoEeKr2dLuop+na6+NqYlCBNX6DdI2Xa MBu1DdM11O3R5zfUsqDHOd1y3DMQ2HnicWVMPwLB8lhrr2OHhyC+H4IQl8U2 +0ZNDvo7PA9inW6YWqIbpmYfkA1TFn6bpQfzLeLHFQrBL5UjpyMEPwMzSrAn 0mO358Bz9vjO6hjE3ERNcug7XkE3vKqxMDxjj9MtsN658ZEXSytbCpV0Upac 3K0AJlxRAOMIf5cL9t5/YLLKD5domLXJ3zoytOUx2pTqKjc5iNtsmHAzE6Q7 YsLOHSHMqTXWs6l5gESWOd85EGv0/er9zb8+1sviH/70sLDj54j0WmrsNJLD NT25mcRUzGVBNtOa1Mz39Zdra4poK3590ywnzm2IxUENTa4rSOaX3MH3NT6h pA25hNQkN2Su3fgykGYAj5HNL9e+iDCT+b+CE74rODLc9TTktYknG5FV5ufM JiqaSmIHTqzlyc9+qvPuUYtU5/hz+fD5lQUwESE3HiH3McLtwwsLRIuf/9fp LZcBZx5jsxsyAYpjb9UhbIc8bTiQBRZDK8kbaY/TzcW+hOKuANhZyPnv9+S0 q+T7d19JIUWyiDk8MCnPIk7QVplDkDOjATvoOXABF+JMomYRY0lfjGJMr5u6 tpT4LdsWlRma0Esaa7uhVuLkRaU6xSDPRiJvruEuFhNxPDpDsjQDFHa3jATo pR0G3QbLQC2GS782SdFc3SLs9rdqLszxc3/YL0zXWdjN18RiJsvOFmXJV6hN 7V4AnyHcPkW4fYJQG3vR14Paxer+CazWG7gZB89DGx9+wG1yAOe3rTmehTX7 /kwbnmaYvXmAoY6Rx96e6UP3vD35v5lxrrx3VJC3p4R3yCLQZGLZzjqZbB/+ WuupNa8hdILtRXBNrR9+bRaCSX+YrFyWZ4eQ1skhUDyOU4X0UiZVaGDn7tAi Cpy+31aH9SVPsvlqAiBaVo4++hHvmRaXZ+UuY5yauV9BWKDhcHftxrvMaT84 m/vQvVrdWu5yMdTnFYdnGuoL5biAnH5VAUxBUE5CUE74O5rcfwmQnTIBaUKM vI5hmMXimsZQiTv47czMfSJvZz+zA0J3K7MLP5MrVAg6neo53n6uozKh5xRQ yqRrD/FH3Rq+AWDZWmGafDtvssEPGdD08cbVyXNrdo0JpC2EIi5HZlxcEjWG +mjexrwcVYPzMYpCQuDkPbKNeYwdsnAS+3eUqH6A9tlMQAR+iCHGO/4GmK6P Sqaa4UN3mr45ppO1M2iQbnh4VkYTTCAV5qvTBPqhYVaPApiGAPycAIjgm3Bx wdfHXn477Cl9VW7IzYY+byOhsp56tl7prV0fVl7mPvocM2TOud9iSFIxIZMT 9OyvjATyGhiOzbIbJyMZKOALCfpOdPr9Ou6TMb3JgjzJyaTpZqvpWJsRliU/ hZ4WTnIo4Agdb1HY5BTyTC8WnX7QSRE6aRnhys6cpp6iriCdzuUSiTQ0Uvq+ 7MfRzGDBewC935BbZdti8QNpnm4pBjkhd1LuYbiwwuPCP+yF8JnU5W46ZTo7 HcrtyFC1gZODXqiI/+ZcXQAzEJpTEZqf/QN9w4u/Hide1A6X6y0ucz1znWv6 tgxgqzbx/h2uIvvGUzFEpfShs8vszh07LaR2h2Fhb3Kmvz0w37eJWqEZ8sp4 YpQ7ZwWmcQxLiQZt+sUEwE4TV6u/otIxMKmqFzeYbOcbCjZzCJw55BmGvuur MpvCnslf08uWaFHPpGSC8teaklEn8wSuKr/uBCj0OhQDD6Q0zMd6h5JX0Epj ENzdWGm689CdbV67DN3JnSbiEUdS0vpc7eE6GznyDK4sO0kXS5Ihbz6eHaXp 8eVRMBdBORuP6QjMKQjKydoK/cFQrsc893WgmeeDpprpw6Ey152UFfIln9Vt 1DGM9r4XPIIxE5L6qr5AxfiHtoASgMcDPjwKQZYoHs/OwKPb8lXVjiwlMdPI xWat8HkJmWjMmuu00/LA3qLeKMdte8g23cZMSqLzbeQS8arN+5wd2eRGrnFm kVCecKoZHYGr+sFm2RGPjEkP3TtRZmpxxKwN+L7qMjFlH+0rpHnAYd7HIbns c6Q2Gj4L2fL0bVRIcTCZ0V9jEDj/mgL4Ao+ZiMJp/0QUKgJHP7nhMAjMDUBg +wjmKyBQm22Mbfb2M5qKcvU23YuWee9E3/aOXfpOQbFKdib0ZiY5/qEi79sZ ORmDvIrAhhuTEvQjr1VF8HvDhlmRZ+rL2Xod3LlKdH7mZtpip6S3rUFqzC7y qMuLrjP5G0QetbZKfXmFNN1QrwMGMkqd34GevlHUOq2E7rjXS7u7ustkYUOJ dmLJmUiJp5vxf6tlCfJB7pkwV3cU0Tj8z0NmNxv9W3JtASzoWQDzEJBkr2ci IKcpIN8dzIA8OgCQj9JPN3GYHZq5FpryiYwf6bqQlW4rvyyFQtIbKZnrQbNT JjRNT39Ou45DHaSTA+4tXe19wjyIaiuYl62WV2s8xBmdksyUIXuQ5eamci0V GeSYCc9GgqfC8mT8G3ETjfIRBNFkQhoQM3vCgsjRVJ3daMZA9KCS495maYHY TC0Q+BGXl8lcHbqOWnCoukcQNWO/RiGLvLka4CUtogyeDfDIdI5yLLv1HWl9 PalTYTwfvpEiG9MPpj5lJkueQX04mxSmKx22nG+DhjwHn8uuK4DFiNEvEaNs usPoU2o39tuPbsyGz8cDHjs6O1J9ZrxivUFsVrDmSq+YZHZdoPrmnwZ2yXZ2 95/4RtFlAWtQg1ieC1YD1YNciD5k4BrSbA+h1cVpJlZrMrGqMunCvYuC1UhW rApO04xVl06zGXI6nzskYhmDMtXDNDsFaGoPTexZrLeCoGoL7dCkigulxCdR RRrdpPeJTk1FGj3NJ+cAPKQFP4rIb/0QDBVeSbPaByuz8gbNNtu1xJsE2rEp ty4qVJfb5hN/m84UE/2suL4AliJaFyFa2cQjUmcpUt94eKOe9c1A1dBTxXqO f/I7SI7zte6cTXNelhtPeEjt5EOqY/Vz/BuGvwJSzXJ5+1aIWXMdVi0NCVKP VqSWZ0FqLSFVvkIOtTXSj1ZSKqcCmNFbiyciQkP/FWjuM3cQ+xq7taXMdTbJ 3O9qFHyu07E/dB3tIqaSDTmbM6nXdjfAeOJTNPmj0Ny/sRKjITT3T88FeGyG dvB8ghyKnueNGA1d87q8TrehwNvOLDCJL0/b6Ay183armPk+UkY6CpYjApcg Ahcg+uZ3RQRqA/erD276Rnky1/IkHgLDHFOkqdpkkuWhnEBUisFwOxwxDMo5 ImB6vTshY/NzLC6FQk3WkkMjmSTNoNTiNF9v9lM1uD07XKkh6HO2SDJGDiKp WFNJ2U3HE+WnNQaSv5sZmg6DesiM260v4oiKM/pVkOnrAHeabktMGNQqln5n o/Tz0DW8z8rJqHMopFtgxtKAzw0Ab9P2F4zTn/1S2iUe1HIObea7me4d+xbY JJBhT76zOx590De9Do3+Vc3qVOZaFg2fvltTqicqYO2cWJ4XJH/zrhZYeUMB LEPwLkYjvwCBO0+BO2LQ/zlwiTo4atqoJUTTY7bRwIcLQcKitqMiJ1teye0U z8/oFDfZT/UP/Pcxluxn56Dsp7OPwcJYU1PaY6Ew9krdnXzduQbL8sHRbc1z yJUJ1nhhxhPQrx5potRUpNnbyRDQsCtYTlosd+QJ8MuiG4AfMDMHqrVI4bJv 8/4F4lfKLi3Dz7qQMvE0paEQYDINFMXVHIPyeAdt/2sUSi3EMOoL4VbKxt8z wZur3/M1gO7DnXaL+9LS8XMrHjdqy0U3nXx1aYVFux2qbijYdEgutQ0mek9c e6xAJC9FFC9CFH+p7eMvDtz8TRn/C30wXscAzuOfnXS3wmYfjEOaWMph8j3a 82HNeQa/lo61eMkIzgU79tYyrhnZ/pXxykkB26BhOyYdyIb8mHVw62L2aKc1 zRso4mUDPNA20vRyzQiAUzQPBG0HJOyA1p3Ybbs27G6HVtPk+FsLUTL/E9D8 f4TrO5rCqVUSTvFUboUpve7dH6MLMBqg1xsAV7+Ekf8zzm0f2EdNQvhmYtko d5R7N6Mq9RKip2szJd1fs4sU0AWnmVttpufrDrvl6KMuuaIAFipEnx+w+Rsi 2iCE5vLPfCFZd08N1y0lD+94Cs7oLbe5ozoImgJL2zeZF7TPQXt52RMgxKqf Kj6rKaEXGfiYCmauu4tft4H9xEAyI1dv8FgV0D3kpAAIkxEXk2aIYFzx6Awh EUzmECjxozh+gcLvBN9oZnf61kH1Begl3SGVnJiqYD8gZMqkxKLsoSJER64R Jh2x1HZ3PIJEet94gDu1s4NS9lc9h1HUEPQBHlaU3pmUPvNeSKRX2941ee58 Dv7t9KRTfCTqtk/qbx6qa4zR2hsL/CmGIHg+ZsOhY78OKDsrtvR2NghKN14y 1t/xYN38fTA0c6TRQ628h80M6iSoBuAzzzd20IZR+dZllcMlzjwfaSphlnGj Ubk1TNpoVEXbOLXnPBs+3VK7KXbyqyJA6e7mDm0qZdquDOOvNsb922Mr4+2j fXr7zHqSL21fZH3VTvryz6GL+hQGUI9TMmoiuqnoot5O9zTA4Ok6uiMxNbs9 JrtiGVD9ktJTeW3Ua3j7iza8GT/1zN3e3kQ/eToldyLPPFWaNRhireyGHqvu fnjqLnb+mFvzMiBKVxwhg17QDqzrFKy5UpGXypCGUkczaA0S09qrlAHYw5Cp dgELl9pOYA62fDfd6BC2HmQDYFvkQdfZIdHEyVXffJQyo3fNFTQpxjaie7l/ QW1GcjXS1A61dF46bvaUtTnWHszEKNfY0+mZ6K2NZ0wSc7Y50vluqX6zbi9z B+DPLJSaPeWqJuzgiCtkxrMMXySOwKMI5UGT0V8dh1DGaOuWN2VoOU22uOIJ UxlVOPdNKs1qEx2VAS4RHedJrWfvhfAZO51Ela+JyUZoSLNKCyGTG1uNeF6h 3elP3r5VHwWd8MtnfUMwXifNIqb5MiQZ/XyvCoXnpn3Rl7cDzdvx42/6zGvX 6uTfmhsMZVMm2G0HE2RLZVl/tYi9V8dL6OxuFvdh2eC4nO43YFvtsrTbOVh2 q/odYDlkeskzwy0619SxDJjr6R5mNK/spHa3CKHTbRFVJ6YTltfRVskK3T+O 32xusewh51uEIJ7HmQEaGH+9vkJV6iSenUGprf6fyKAWasfjQv/z6NsOBdlw QWNh71FI90mqb+uxs51uZhqiTvc1RLVn51n5ite1VxbAakXx4H6CYtdp8HkT D/8LeC4XPOcYPCMtm9fO0VKpvd1VWuoJ+ERawezxcq6yswNmr5PK0Qlvj0bI NAPUSM+oTSKETETmgNrr3WufQTDU7NupEfKj+qDv9hGKbEX1SV8T1S1ZUJ1U Hzgt2dpfWVCbfqqYATWitykuwHYbS93bwrobgMnH2ONUwNZTVqFSmJqyCjw5 1JmOYPxhCtkoL/b8Aq/DivJit32ELP0uwI2vS4f9VRSyDda72tNtYM3NlHq3 OQ4x9fkpU9M9hNt1WOVltpt6hbGp+vCn9tS1ivFHCxgTjFoGW56l7KC5REeC 7nKDbs19cbPyTqVRLwdbvlqxneT0b7JiA6Q0/ZvXMbb5YZkgabGdZ7Ht0LTp wsrIMejGzIyNwiFfmqFTRkO0xbR1z21PoNOUemJAW3T7bhcX0WCbUmOI6Jih Zuq6ku4rk2BImw4s63fYDsHT2u1qN9kxOt13B4JWZ6AWfpiNtd7Odrqbk0n0 0nU868iUySjAWw7wwiKvDEHn9KeNxB/IUC1qnaabYXcbIttGOFVG9965Q0F9 fUzbp+u0fVq5+pxCrzHr1E2BjVmdddHX606kh27Z7kfv0Ra99xwZev/MPxVq 5WsNgm2xAWGWrt2FBwF4pwKMP1+igmDbhrBNImzT2WErFYpOHmzNIdA9DHI9 TvaQK9kx5Wuvlb/9pjmuk1kq5v9xo4zTJOP28gtg2zfKpJ1GGc7nxlptHiCt XdRpRqtp5k9R+iEd+jW/ZCJLE4JvxqCCuzIgHVGI77gb3317g0fDNKDGOMx0 nXEuuHC2SQpnRMMjlgA8Ox/gSdrNORUMG9/ynnZaY+h35dMIVtvjSm0zlN/V ruueEafb2hlrSSzMnVt2v5N1iN0+V3luqk38Dbppu0GmbvHMhbvOsLfVkElJ nex05wwcM4DNkMqOEd3ZItq21RKyyXlgpzbNIEubKoLUJqANz49RSS5WQRv1 EOLQhuBmgFdktG+7m6b8DYmm/Bay7vQ21/foJObAu8WQaQfLcQb9trtvVZaN K+6mKblLtBgVu2kq10W7hofHdoh2p++Ga3FGrl4PQ5sc7Eoj5un2r6nQuRbr 2YYxZd4rhs5391OZRob9TjnOsPQaxTtdQ+kNi/dtkil+j9JwqwFeXYYsvVBY +nFk6Qc/BxigtyC6eZTcHvaqZ9HtoNbZR9JeQaOAbhErzUPhq5qdTS6l3ga/ s3eh67ENwqeZWa6rnSZvL+Ehvz/X3+Mtow+8cUc78Pd3wP89S+J9MsAfspBv N7ZOVIAEm8UzOdb678Lva6WKV7WF0Z9Gak2Tg0BdNNVe03oMtSVSvp6PaPkG UghIoBpEi9eo651lL1e1lkNsGbrdzbZy3U0MNU4ZT3XHK4toZHmUr1vcn4B2 hsnmuq25IRP3+KoiXheaeOLHZIwuzqoMdns2O+BeLw/qAZFJvC30eydNkr1F MmgMD51bG5AnKXbonxwW0yZJfWhLs6gCVabHoMPyrsSW8CI6LMPmIf3PAniE huFNArj7E29AXs+XdJ/rY8r/tnBC+RLt3O3WCOG/ZvL/HlSFHdw26TX6rPQc ch/956loB9zQXgEGOArwI6sAN1rPJveIYf9nsRJSHClfS94PV0+2I9j36LFb kKf9avEyUuSWcqoFtjLoN0AUAR+v2AjxknXgTPTxMG/yKe3GPOZ0AHvPzzGv JVPOnD70DLgL1Pe1h3unzAln8rfOeczxOtjy2w9Pbq2mN2ytIUvgjVCR56NO Q7A3fZSHj9KmnQSZzYxxj22cSMHwkxLav+3Q16HTzT5uZwuZcL+C3Q05V2uT 0Jea1p6BKzEFV2fyTqkSjlXuf4taMRxf55FpCHZqZBsvYefNo+V1rhouTUIY hHPS5NIMij8LKf4MonjTZ7nKt43M9APL/00rxni4/oK5cPd1O60rTmx/pgfs n1m35jp+Nt8HZ8PwBsyuy/Nv2XF+vvOYOjt0Hv7MlbQhUXwNZTfSdXtDxzHy jaNDR6RsNQJjPUJkPf9uRdRHEPVN+1ZCsoxMxEZthesENfsOOIMKdIhQtdxT MeT2weudozJSLb5Jk7XOnVdy2m264KEEOQGz/ALHmYqPkx80IpzeqqWajKrT bMTPEaVH3el+iHLt0QQ+lNttT3G6Pcr/M6uHQ6e6AzJ8XRqKcpP+Jg9no94+ iih9UYnetrNIUuBUxJmESB+H0dIHyGHvaBxKLRtPaQrcQbkWkzprJSetg52p kpOUbqMeLRq4HAfh8w564ybbUzm0H+4803Yq9Tx/Htxxjdwf0+B9kIP3X1si 7xFA3+CmXIKxfa7lcLn5ghVemkBNpMqUvk38FwQNQpwf53MOLeHfzWV0U7/G snU0Q0JBTv9ai1Y507FykW3LoanoALQe2m271/V+oZlha802Q+k5Dp2HTPt8 nnYjmxSit7mjzrK59nYc7YtcBdhFmUAPZSI9L3OStFQmf5lR46n1fJdoowN0 bUpGSu8I6CbhktDZ+NkcGIN0c1s+5HSejIRRHO0CXqxjK+dqPYf7Orc54elK gJcWi38yeCa76jl6OU3Cv+ENgB7onnR9VvMnD5n50YjpW8Q9CV+D4Wk3UeXw JRVmprttPyIm77LJ6QB1x0ibmy9M9zF5vx67fLB+0IH17yysrwig6iD67sBN +VPAY66zk67ayvFqmhCW5hnPyOby6iXL+HdryUpoKFubA/VllG1sLFtvFSx2 cE2ODppp2l0LrYVlECsugrbSXcaFydENI/5t784ttSQT3zljw4h6cG4Hacew F2r3tzTRBmS9PPjOWh7uTarRg30ON5IeY7ubBfKmw7nOB/u0v83ZID8d1OYs KZtOFvIZHXhSST9GMjSmebTVc9Hp7Uwxfn2NduP9GKai0Z1IU4NpAM0GCVJf Wca5cRgyRy67byLAXdTO9D7ATW9jkErNIs8j3Icq9Hk/XVq67noj9K+NSZAa 1jsCXsSeechEKeHT2lG5zVc5dwTko2/3Xa7X8rAD9/+1Xsvl2aBtpk5nA/kf LY93tqejg0sRZxoxkDZFlrKVkC5eyH83lqzKgdrSdeib1pWtc40GtJEvjsTf urMFYntroa2oFMkeGbR8p3gqORB86xzvrhM6w9AZuO7f/uRsV26Xj1EkC5CP cpPmvuyjcLe2kx7TvjUv83YAEoGaydH+fn3bU2r9ctNPauBsotF2u0riqZAg OtclcnURvtf+ftAZfdEHWwXe+zP7odyUOY1kF3dF4PWf7YJPunQw5WHQSxnw iWwXpTEPN7wOcM0LGHxS8nGwwtyyO42TS2gJCIPPy8V549uqnivzN/n/XTqi d9u552TUvTmI/7+9Kw+Tq6ryb6q7k85CWJRFZFFRXEZMIIFA2AQBxeGbzgII hhDWhBEEFcSBgRkEBCMgO7IvojACEzIIUYZRCEvYMhACSScha2fpLJ3urL13 vblnvefed6uTMJ//Tb6v0t1Vr17Ve+/3zj3L7/yOhJ9XDfd499PoAy1NhnJt ZZQflniObihKvpTB5ElNvWFa3t1AX7J5+dv52hXv5k0rZuTrVs7gG6lv3tNI cWnnvE15zyKHhaUONsvdPhpnE86rFOdB+Pkh8/uoz2/t7IB+yj+LQJ+bBnpz Mc3eUgA6p9n3toy/QLfEDxtojDrz49YUA3VMPgrcpZHKQr2TP7vHgbxa5/iw z1JiyysuC+wy1ZaKiHdoX9lKiJc+FdgeikTKrpKU+2qvCf+iOwN/dC7d5Hr0 afiu2j2f5MLP66Y6x/xZ55j/Ic8vdqHnRBiEcQ9NuTvZOTN1Pze6YoFVF6Kq WHXQhHdO+uGo+qm0BZxXPVhUP+3kuxfVugsXUMz6vxqYH6YwD0qXW4f5cDXm OOBFKyBL/pJ3sMu9dvk7+erl7zpUzyB5H/afP3ZXc5G74ksdMpa787bqw1LQ zi9ELCZXBSAm4AZgNpWiUPUk6F1BZyNqqkaWoC/cC4JLtgkwaKveTeFL0F1d Eb6ZxJYBfL21LjNhleGL6C1RrQi+8ud05FmKWIXABWJVuwduYxuZ65gWiPOo oJXFeSLvMXBfN8B9noH7B0gYzqT3uciyxBi+wXkl//afeX6F80p+4rySC4Fb 5bySM+/I8+/dlOejrud6kQiU/aCMqfO6cQkaKwx1OcqZ7MNQCtRU7AOT7YUn /midk1p2hycdMyH/uUfwUeqXjFCnon9l2B6ssN3F+yAu6nPO8yoH11XL31UZ PsKqu4SL3ClbutSd2vmU7U4Btco7yRIlzk4CtUo6rOYhWsW+zhf32HJLqtTK inVdgpk+L4pnIFryomSfjvtSeodnawhPK5hcbrfwhH1/UcfQ2ogQ9me7/gOE OkSucY/VbYTUFUz7syo9ktJ+n6ccAEJfBoQuIoROcXfzM3PofVHIKJSpK58l kvXFzqmY+IDznYHMeouzsjeylb0SyvCM0oll4pUIoRXL8FQFg6x23RHOyh46 3/nNsz1IrZF9RbLYVqa2L+PtJofQ6w6dwBfN/fctNbKHbJ+RHZZ47lNmF03L 3zKfzJBd4O70xW6BbXBh1Er2hftYth+5B2RbyQ/m54uNgZqzk0p8qk9FTKxB brVJZGAJnlyDGg9aP+VWy0yhbnIAXMxQr8sGMnCtXIVtUAmI1lCTpF1/hce+ 06NTJ/2VA+xKNgNIUS3thN0mtrBruM16JWNXyjHqGqz3EzpAFmCaO7K/LPVZ anjPU3PCZkEJ/K77M2N4n/wSZ2EveJjV92Awgov7RgLd7+oyV+S5Eg9O8Rkd kMLjijwMmiSHCp3iEQuQF0WAfZ9/ithywSnG6y3oveXYCfkvGL34wrcVvQdu H3oPUlu7e+KNgZld4M7dYnfeGiB++4jII1UBQxVbXbiKKBZW829iZTEF55tX uI5CR6IdVc0Bf88gFdyAYDjHAIWprEOhuHIg8a1FFIJokVkd91HlWETJ0D6U kSzShaO+u/DRjXZWcAr7tDlmwen6dsKqpVmvMYJTljUilRRouRZP4I1GSs2J jMUfuXz45IfF0uENXEX/2bO07Q9+SwS+MyF6A4ncGxxQr2FD+1MH0Iu5gg75 5tPbeHizkcoVQwvlw2Eqy2wiNHVnjasgLD6sqPdhXN3qMHujxexJ6hX8/fZh 9sDEc58LkOrO3GJ3dy9zZ2o1pcxmlhJIJevKo0+9EFVEqSYytbGwVcpz4iVf OgPcd272w1MlXay4XW9x2ydQaDa4LSHj4+hImb73hoDcqEbmTDfNNVHcxRPq OxW23b3BtiPinZoOAdi2UBrZHLoHM6WbdbUngKDAszMbz0atgr95i4qA0OzC hKf8smc8B/Us0Km6jRqx6q7zDS/IerqI1f0grQw2tm69Vr0DGzscuacMSct6 mqYVQraxBA8B7O0OsJMsYEerkd1/+wA7WI3sfgFM3cVdDPHVPK1u2Bk0xZkf Mp6rkPOtts0svUNWWRolVQvARkGbGltsuaSU35XvIBxpkgtgfnRtNEqh0MFS QiWL6ija2kxRxLe1rgFiFt346EAr222gCnvqVb+KocrjynH7VOZ3gbWyLayg 5r7w9FX0HrCyQJEOKnnv+UoecpVeDLlKF/6O3jvuThdw3ewCLs6RoZWFWUkX owILwQyqemBlT1pHxWzpADic3Vlglers6Xcy37AlSQPfQGh+ypjfOx1obzrM gPZ7CtrPbx9ov5F4juDLGawF7nIvAf91DrS7zgyh+oHClRYFA1UD00Sritye SiHVh8x0rbYq+JEWL38896kwUhGlKxGlSa+AUboOnINm+JCCPlAV5wTa+MYD bsUQzA0gVAGyaGV7eoVrPFiT21UoSmCnoNGkB4ReAdQ6G3xBNhfeI07Bnwxc wSmwwRfQSSHHda2zrlcJxeJJVO+VQxvjpzMw7XMXSgsYgwrdrYi2w8hphfma bFADpxUG2tDvU9VpFWje860J+a8tNM9QB2CvBDT7Vobm19We7m8BuRACKki6 AtQQkM6q9gtEANSOSjyVmJ/k8enZPzDn0OgAiiUVqr7nvTV7zls0rwGQioUz cTgkPWDaTtislhIqACnhaDCqSptr9flX3K6NhxD3tLe7T/RzOLtTOC1hqWH/ ylMQGaYFFYvWkKcvKdiZMmCJpyEKTJ9jJpDAFJhA9xoWKPiv17yQ51dMyXG8 AwioTnjUz7ARw/rPbFgvhMFfPSKkgcQgK50KU4kPVO6ne0zn33UaotpQThIo Wu91aL3NovUcNaSpSInRShUBAasB6lfsexa5M7JsfmZQWhtOFpGpX2Ah10rU FE5VYpRqD1bTHNhJJLMmPxmmJdHyjVDK3oQhqoXz14WsFtR341aSz1SEaRbk AzaoMIDC1D164GHyreW0fGVGQN2hok2FbVtMoGXo+dyUsRN6pgjKpX6pn+xO EgT/QtyBoOru6cx3CClqMqznHBdXjeXhX5q8utQ9LnIPd/2xRDCWlSxHoi3l ou4AmkjHdhSkArJMqGuv8+9qR8m6SbP1/Q6Wd1hYTlRY4sBs31xSAKNEWdaS BrBc7G7SFfVWd78Pw5INp7AZkC7mx2Pzc2k4egim4eizUmLG1y/0CzvfkV4H IBwzklVZLLI3+plIqUJUKiqFT5sYiJz0d4+eNkMa7ujyYOxQMGbEKutbUbBy Y6cAriZczClUyoSdII2msYoKhEaQfWLmmDBlkDjmgvqz73OR0e15fvKvGIAS Gf0IRnO6xzllze/j6zAO8QTUPdclAybTJUykj+NfQgtZN/h5sJCmjaM6f9DB 8K4RlOCfNIKapi/S5XzgNhvIr6qBRFMpWaOVs/0oErCBgsdabxolKw+LMhK9 ZouPOauUwCVx2GuMzJ92c2Q2RGK3U0Mk7brDN/mInpgw6HliFSoCZinF5oWu JYakuvXJPg6dZLyFpsfWKt1R2F9lHo4Im3VDx3MXMgUij7OavTk7xzhoik6s 4LBHWcHtDNm/LufdDfLMGA6JQOsP3gacMEg8IUYNbeDUW/J85A2qtKI28nz3 GN+lZVSE4IlrSJ/Sch2HUQBfN9gSZF73Lf5T1X017Jbq/OHjJuT3MEZvYoz+ RK1l323GqNhIazcPINzSfYRsAZRU8cs3MlrYegGkMLM0ixZoEvdL4fQjxaku /03bgVPFaNwdSjitSc2LyAxUfXqfYBpoT3F6fycln4dQ3cwJqICALm1HRazu E5Sl4GHT+/C3VP4Lq7kJ6CH3JKCtj1tEuaNf1NQ4bUq+4j4koMopp0ufdp6m i+HPfyjPx9+T56fflmNUVHctdfEj6i4RwyppfSqc4ms8UIKGcAvXBeL4mSi0 Qqid7h6v+sLp83rkBrOPOczey5j99eGE2Z/Ruu4FeA0QcW/p5X5/Na2Y43dr B14owwknu1mv9pTIsrPIlmL/6Bz/nEk6kVI/GC8rlhaCVVnjVR6gjHR2OKuC njjPJwx1qErJnjh+vxehYnBWB7aUvm7rJtDtxrppSMBKYFMUJqTWEy/usFnQ uszJprXtRWyKLpWN3mey2oTkRoE+/l8so/bsfFJOeXwWEzX2QOEU6Itjsm3+ Ixj89Cgt/mPvzPNTbs6DkAhxhiGRW/zHdwYZfXwNLCtk9EcsAiU1n1oKDKs6 oMRPmeo3e9Zay/xxh9UHDies3sZYvTKyqqQSURGjX0qY1qFsigWtaF2lgwEC F/IyqbqPiaF50qhACn6+tcFjtTrGailQT/9Y6a/BmE+6Ve0c5Biy65X5HUN2 z6Kyv+m0F4/UDCHzDT1GOw290vZWw/4mzMJ2PYRX+ZpR9xrOPcn2xi2D3mUL WSZTLWP6IGxrK6a2EiU5UoHsCwxZrJh+SO8FgZS735T0/d4k+gMC1UCXZfuK 6n+35vkoQ6zSoWUX5NTIBp33p/iyKb4WcwkHf8Q/LTHl1ayCgS2xgf398RPy hxi0d1rQ4vsGJFG6n1rS4X7ZNz00NNjOAbIfogy6G8iczqZoB6N4qd9TTV8m 8WQmiheRE7aeTInq40FuKFMYM7F7YctNLQv9oo+J0qDhrORJ2n0Dsh/BU/vq uRNnxwJECZ4bKkC0zUO0vVu5zWFzApTzy27/7e7/Y3B/cYelBaiw/VYw4w+2 t01n8ZovAH2JATqFgyp4H0T1D83gmtNrJA0Bz18zNc+vmMxkV2dcz7mPwnpQ Ua0T5hTI+PyYQQp1fVCm4laGupOMcfXsPwalDKnQgfPcbe/D+yoLzycdPB9h eN59RLD+Z9xsX4Dn5xWehys8qS4/CPGCBhRMHBjE5nmKyZlvLwuMZebDpSqE Y423joix2Erqgv6x7xTAebXhRGQGYMkrofVVtim+poxTBCCCbw2AL56AogCM xB0CxmkHt/iSFUBJEhTqhXRnTwmIJdkX8w73dHsnPMqKwZi418y0KKFENTKt JKh7bgqFHkRJCqglLy0hWgnUPOF90EkTR07c+C5Evssg4/m4s5MPepXUkTea iv1luZfcOZuVUrmtQO2kEPhAIE1neYtKSR+xk/y8tNQ8r/3S7t8fHAgfYxD+ 5ghewC9JxEslRebOSWR+LrG8H+FN6AAWR/soL7ultQxwQZM5j1dkuofmzlyW N87/WBu91ppOrijmQZiKLDrTo9W8tRjuE/ynA5SNgUyK9Xk7mVGmc8ew1Bk1 oXuIxqxShCjbxQM0qaTZeKTsdTtsdhM+uVc3lZIX2l5MfYLtU8XOei52Aj6n N1L2k/sA8D3YoMtK01I9AhX/W6dxgy51o2fiF098JM/PutcFSrfn+ehfGTsp efmLGKTjvOI0Fjwtfw/s5CHzXJAktJL3jJ20iqkyhfm5kgHp0w6kjx9BIL3/ yAogpWuWsVJDAZ/7qOU8xqKyDECARXYtI5MNKK4+cxryliXzw8W8pCkmXr0p MG9ZRBXLkLbvuU6ahC+0WsFbS1Y9esPSoBQf1IzIjHLyc1DFUnxSBtXjU71d mB9PjFIi54EA39eVnNfJD0QpW89Cq2FUipfoHbaN2SOV6pvTV/l5KKov6QzD U6aF3BL0rv9znl/N+pKXPKkjws+4y0VJtzhACu/pKpsmZaKeofFjvdOS9KDe OUytKHqbvt5ZsKIWoJNPmJA/wQB9UAB6fsKK+kar3ZMo3TthRZGtmu2gazcY zbILRtCI0k7yxoUNeVvjfEmNckAkqdB+3nLiOr2IIC9NJrjY++5aVesNZU9b ZJYUgXSJ5eZzldM0UdEir+S8ErYF7lIwopVAis9zGT5vl1l7XUJyAmZ+VzYE OU6d+CAaaQqlsbaeJY0UkqPxWm+19Vjs4BXunEV1j7gFPKLn/RuXNy97hpNO j9A+TrvNBUWTOMm6F67zoHEj65f0VaHGzbE8RhdM6PD5mGvyJjTgQMcmVLvD pzh4/jvD85GjJlREZ7Wu8Z9JovOzakO/7W1orbOhy6wVzluWN5CeAebrZ4vZ XEs5eQ7NVfJ5Eec6awlzUjoq6u6T4ayxhjPk4hMt5FMM0LDVKWPnsxItpIK4 uc/d25VdAQkJeqizdwIgO7NvOEB2ekBGhLtKY86s4tJaFnu0yhvB4s5B0Hus SwCmEzL2AkhIfE4W5aWZJgh6lYh31/05ZDNheekBzStogukKdECV+XlOp2Az ky5wL/u4hIaMH1zv8CZMEWs5A8FpCdmfc5B8iiH5WADJtBzBXklA7pkwlyd6 aPZRSLataeClHWxkPXUw7eA7mNxLYFIRkWDxALnYb8fJda/SmJU0MlILyd1L qfaQqlgxYMMyLKoH/iYt5wOKZPtAebTF9uDBrto2QoaeoyJ83g4yY25dFzyU DtoTo5JSR/2KUREDEqQDWCgjI/2AnXx3aQQ6K/li60XgVV4ra/ZkramP+02e n3obO4/X+uwQZt9hCs+ELhy9h6+PBIvYxA71LqShCw4lZN4HK4POsD5ia/i8 /v7MkQS73x1tYIeo2zcJsj3U6tXh3xSHlDfwCkyoIqYGatsSpMoOSuhckvos cTGEIcwN+XR3KaW4mN9hHKl+FuFIfMNBAR3e6GdtnfzGRk0rO2FPJ2OJuG/9 DPetIyDDw2bSuVzyYKoK6uIyxKuwzIa5xxr2x2VVtfJxytF4k7I5UCa/4SWJ UHbGks6FLpQGksb373RRCs/E8WOdmD0EMnJnuShlLNfJgfz+nTXQy+lDZgil oQg5JCC9eQ68WrJMipKTj/Ttm7jduWq1vpAE1G4KqFEWUO46AmAAVGWyJmup 8FLPgGsgQLWw+0Z0MykUdjTOloXT0tRrmKaexhThaUmgXu8MVH8DqBW9AUq6 Xn0lppIrhzlDAFQ7tFA7O9WNj07m/ipBjbgWxPypsl3CfLp3LhS31ySWS8wZ biQUSM5QOoRdLMyg3FMJGEpL4zyhMIDAb5Nk9rh7XHjxa4eiGxldV7G5AucN +tfO7szrznDhxalc3v4H6gGq++bygIRRtFiqDGF6hOEx5UienD024at5hYcv JUG2a2JpHO2Xxn4Ob8tEWJAbIWZrEqW8AbHI65ppMnfr4pbl9XnX6jkpsPUr 9ETgRjrJa0ko/sqtZwxIn6iOBWA3S6KaTITPEcaSmIXYAem7bTgw3s9I6vbi aCUqADrEVTEirIMGO7KVP5mZsMqYMskOwrZzOTsoTZNvNPoM9Z94nYTsy9Nz 2NztjnQzSEpzMwQKjWDlxK2N33Nr40grNHJlrLHDCZcxrLEDpuxYmPcJVb/F pvlhVtB0Vjf4dbVdIpdGW1aEmvvry4qyQvMjmjLknruVOaNkCcNpgTr8aL7c 1S2j0y9R5FKFXOvKedbVCvhizUgEF2IOLaK6LHI12S+LHO0WZSUtojJpU608 e9t3iXlEtUaj4uwMDtFnMlXlfZO8cNjMkm0Dqk4HcxhNNArbQzQqkqtSorPN YiCMLc1irOPEF3k/dPzB/0JOOGhMPkHC2GfdR+vlmJt90gRBcrkD2CUwId45 YGd1mtQzUyCOJ5J43QjW5Rs2l8Elunwh/ZZ+ArnsBSJ9jdUF8mtJVO2SsF2n eds1CCNOiRQRVNjByn422DVIcbDr375K2GMIqnlaZfvYPHgmBpnpaHiArJBB qsO3y8bo0rxQFFlCv0EppymvAjA2fW2bwXQquFhIwzC4GViSogFSzRcqQmuz ceFThBoxW7AtJDpA/gFGv37EPbNCWnjNDBKAhq4pXAGG9z3sCxt0vHtQbW1K nv8EZmw6bwxkws64262ZtzpkxQSbSx26LnLoOs+ha1x7kDfG12EM3BFLnTfG Y4sPmuMlkkLiAv38E+JqdKV1Ep86IIm1ndSCjdMtQU/ZXcyyetZgupZp4Q6e 61zzcYiq2kqo4sUTSxDBOHYdSyFliQaBFbEK9lBU4ctWnyWElcaGBlZRxSxk woAkOk6kwLMBwBqSFMRFuxxlK+ximEKUTZ8Jp0A00UV47iUhY8+n9zxhulvv 5kYWSPTCa5KtgEYWMFrj783z0+7I81E35TZdIUFl3T+5RfHsdp/oFRWu48Rm Lfa0rSEfmXJZlS2XmefUH8uqKmPM/TUkCa8dE6ZsvPX6zSyz8qYVxq0T4bZ1 8+SBa2IVd0epS+YctJJyVYrkPwbVBpFM6RfWYNOoQopVM/havaKq1WQcuni5 +RrWYHs6iV8VT/GBImxbpUIsO/ZNlq2yxRMBFgMBcBM59lZ9XAiA05jmD70n 8B6h+D/GRS508t+g5Owv/1tXaMnNnuvcrrHOXp0MPn5EWNGxPuc5dJ3Z6sWv xF4dw/Zq+MK8bqjnA1RiW9HPqYSB0Wp3+unFr0qgTPLznKzYM4m3HdSc+SjU IWneLx/Kzb8iwPBnlUltCeilhhoArDYFMJtrpYwWV2xDLhTT9/rnEX2vSDSh Iqp813I7JcjLztEqg5CUw1h2okEY0k20zF9J4zhFN4HtU0UqLfU3EcKkkQQK VIIw6G7CJAX3jd7lEYYqsFACgG0x2/qYc7rud569s18jLeXEJCkQGuB0fX9L UKnC55kpXXfwx3ndgWGlin5P1ftfoAVmpOKhv1nHFDgVNexLERSzitgboNib aN6z6OZHGb4KvBoDOgHgfE2skmVb4NGHi6Zy8nohPG1YBsjUFvsV4QK6iUdC A92pv/H5vTBliMJkqTQnQh7IyvcABEGT0rOeephtUqZt2tBPi1dQy8hbxUST AtHZrqDs8r/FZBNg5MF7IE0GhJOn6710K+b73/T5fmgFhRXUOWZSzz+P7dwY sXPXmlIppF4vYBAK8XkkF6NOYJmIw4GYt8DYuQ96KUZRv/3IIe/gdf1O0qwJ LnfYLlymTKQvW1lc9uct7XMXKRpLPF+MYagLbuZTF1nAJglpoQaBCEBJr8ig ZzP/MSrXi0JJdUQn2QBRwsbs0EK7khBD8bmOLt8c0mmITywG1cFRQ6We5A3M ehLJMth2tfQkM0UUFtyF0YL7nhlvA+8Jchtcs/+9M4eP8MiPO18vttFDhOBW XHGxpAYAf5H8e3+yepSaJSCh1ZtvrN77YPV8iqNo9JKAo4uZZeT2bzPW4vGn uZQFClirVRt4id2VmDpsC143z9DtyrKQkmUTGZzaQhRqgUaQdCHJIB+FBhOc o+JmkbZUIqDB+Tg0Se3EfZkOpLLSl7xq09YqnCIpIlEobLum3XcUx9XNeM2F 7YU6L8rrWByo94o4D3LzJtKXeJiGZNMg0XHBY7lkqUffQtlb9Oywh66HRdh7 UBQHkXMKK1XUQuKWnkJjN9eBSjVxwNj5CEFLTXS1j06ApUaN3Kf+RsCTHif7 XAGCWDUHH27dPElkwMQNLlWJxWN6nbd3iEabxLVM+AZPNK4x1A9tg2OO56cr kufY6oUEuvYtOn1Oll7fC4ezxEsAw2wgAhE2q6TAEJXad8TLNoj63JbRQFuk bs71motIOIKeTCg2/dX7cSqCviOuolARYMPFqmDCiuPsBo4PlzktG6XelIm+ mhq1IXNM6RzrTZqgHTWEGjPVcKXQ5YPG3XqDUZ/4afkZu3iVUVaj5u1S/Uyp Ma2zCVyoiZexaReeAyPHE2ZbFoCfGAnWCrKCxZSQxaWBL6SgFRm5kMEh8CpI KgbQasdRneUOr58USH4V1T2kxinwostEmFpnhD0sNRM8OqWxb6BTP9NLNRMN aG905nD9nEXhxAMcTkBfOpI3XqS3Qg73h0+QIvn4+ygdMpJrnjix8wqhD0MO 1+dDEF91Xp2u7uhlHosHzTVtFnZe+GtKsB5z0IuK94pIzJg8hG/qo795iH42 CSwxdPa5n3qIDWJYsbFil15Sv2VI0AKUtPKk0FL/XcsEiCxaPS0Rw6gb1ESc X0mJwJ52zQuj5W1KxOAK+yMCXPnSU3eIK6qeE4p202gVNtB5mQZVDdzFa4np cxlVqQmEKIe8QFMBwEl/kGlBd7yuQwel7+zH3HSOxXQOE3TKgzI0ynndD7qC dAi+fhLJdtYdsxLSIR5caOB8e4QfCTtNE22nDHtFvUBEFn7fE5JgKakVuhL/ 5qUMJo0AIriXlVK4gJCGAucWnS2yfL6pGw0Oj/WA5zw2NJ9RlMNs4iMYmMzE 2jWNgKHTPSCE7AS1FjvIvTMoIlEpHPa+V5IaDpuujxCCkaTp9ZasGWw7J5rZ BwWklxkh0r4Aqq4umiSbtAfNKGNNIWyffYqZjA9TkfLU2/N8FKhiXs8Q0VSG g8j5RODBVMYYafpmkaGjMBfrO7hs6egNWf1GHzhNQZGSavXJ/RMrAMX9dbVd qco8kwJAUnZhWRn1Ts306FDFb7GSuISKjfGcJxQSMmK7IVbSp1J32gos7OCX ThVSl/qPi+6qCa5gLfYt+DiwDyvxKz0C0suyIkrSz+eSjzjbMLUOZFJfZZlU AcQUTi88wU1/D7wrrJs9Nb2AY46kqsgr0unAwiElgHykVBW5oQVHHp0jXAk6 fskv2DwqwWGOV6iwduMVMRsnD31bEEFa0qkF6aQCOKBX9eceF33zHudB9AAm sB9ABJ2WcHo9k3pzbaT23IBYkPWImuuFz1ej3fX42uYmduJMZ31iKSE4bAkg oQMNNRYry/FD2bmrQzrtAB2fr1gQtBz9WEQ3LgoCOuas98knrTebUEx4f/Ae IZuC23zHa4KS/iRQOpnamWVZkargqEmkpjvyal++gfG25zmzcaYzG6dbbsNa GqQCZuMwchghF+BcFr/KkO1ghLyMP0cNeccbD8QCcfjIMlyPv5OIcQ9UPpDL B6vISs9eMSwWKgQ3UNVuEF16tCNy+VcWCsJ06QMGHmV9BkWMgwTbIDAKmn4k 2/hVbGVPSX+nrn6SbRBdfdh2oSne1UclYWF92tny8J6n5niP1SbAb1SG3h5e dAFWDSjg3U4svVG+gIdSIXjpJsJItA5mHVBjMD5/vLMP33T24XBnHw4R+wBk qlneRtjJaGQjvpE0CoIGIuBlqGQT2gO3TpRFHEOhsEi5mEtdDIiMPbj+/Mgk OjE4oOeiKdaa+htYaApPyRQFTkNGx8RBb1kbyrw+caVKbqwFX4kbIEBYYLgB 8XRroZ4ABRi2lzGn2lT2LkkSQh76V8w7v+o5zUFf8Fien32/czDvonrbqBtl 6K+nAONFPLeTTAHyA4y4gdCcIIIeNp8v+EfGjXhXTcGph0zLn6XBSWksuL9O Fhi4f7WAhX+xPoOEFcYMcOWeMeCuL+JFri+m41YzFlJR6xpZChwSBiTFAZIF 1/ZWvqPq2CB0ST1CkiIaXRQLr3RGk1mRqKSvAwE4B5wsSBgpVUilwPYqFWB6 t+I8MHbFSB6YRz+DVYBcCiSCR7MvaTuxtcMQuLtY12cF4O9yWezo5VSVOGSB WxSEi/SBqb6+bczCW3QOD1AbQMw1arjuCxf/cn0J/cHFKo2H0YRz9Erucjc5 I1EWnTGMCtZ4NR2NGI43QlDFFj294FvSF5z+LqwAfMG7tumCp4Tz5O5vag8n QMhYqbjSnpIzge2l2g5Kj8/UhyrlmpP1LaWoDeHcRI35wE0ccwve/qyftmNQ WldlcrjVD3W3+lC51T+UCgD//SbGkp5S5uucvZfTU/nVowkPuyoefuyNwQD0 +SjKhJu+Ke9pbXY4WOcXC/AjaKFnxkVt0HgUOwRue3IJa1JQUN+zrRV8GBMi oPVv79LQ0Xe/SzHSSy5VnPlrcLA6qkSiQ7jZZBi4HW6WKQLB9rAK4OyaJT6G FG27h2cU86jQBPKz/yCHEBXrH6KL1dffdP1Cbe8RqTtbZOmr1c7zA6ebFpuI cOuBidey7SowMjb20oXiQo+NfoyHFnzoYgC2QbLdGyivsBJbdyvioaIURyZs wb1SvgFDwo8MpY7zcqDK0V6hQ9KqcggkYDuOIqX15y2eBSO05qkL82CIYuAE vlzQeMUTZeZT9edoj25tSBPRFX4fV/BRQ6Wi/Cq+MaUcjAlpvHSDeru4NfHT fuNv0jNf1Nt9gtlRt1uKITR0EYFgE4M+TALQY8n0ZQFJj8jFUPKoCYh6ZbqY Pl1UYWagdBdSHkCrvME8NSzwMsmgA5tsEteT8v1oBGv4u9vi2W/fD900Vo6m 72eGMfUluskQSzeh/PCYQ97JqipdGO9j79zbhalNXRj7k8agkaBprU6flzKM zFUog9sMlVBzccru5K+cEVffbT8BuF998+4tzXhxcBt1vzay+YXbrZbdr/ji dIYXpxYvji2MRm44no5dPfyraf4Mu0iSjN3NnJi6g2LRhBm42p064u2KtwT+ 9eneTnqa41Myp3uo3g3f96d7IDo8mFhnr7ZMSY286YPVeesK4dloAZpug0F5 l4N/O9sxsmW9pNDbNIVeghMHbla7pD2o+Gf6z4gMjUf8WbUEvv6AWQEprP0P dj+MGvpm/vQwEtXdSy/F7v+30zVC0UmRBA+d4TqpRfXGenEZ1SVAIK6GFi4+ m3RcGd6G5d6qDW1htcFajCgewIOUoQA2Q0qMmb66svpTNT2/9Hy8osT28rWb qLLTiwt1rKLoHz3od9Fz0bFwfXwunBu1Om/n87AZjp2t5+bm5twP8cFzUcI7 dEChA1Y9ZRSnCjwkOq37Jc6DP0Y6ILzbfji+0d9LiZvsh3QkJ+rV/y4+sQdt 2bApOLoed3Rt3IPZtKnF/U61yjUrm/POjYl2ptYoR+wZQHRjVOvFZtCkFPb8 FeP+MO4EooPCo/gRHcUovVjHMTIyCmXQkPa4a9DK336l+7YtG9fpdWxZ3nv7 THAEYThDF+TLiS8uShgIyOFzZdFMuPFyHJfS9zlNr8aR9pq2c1IFD2DDupK5 Tzc1NhsqoHz3QlqW3fCqnGdD4HNfTXz1ffRz4y+sd/bl9NdZes4P1cMgt5OS km1rWrxDiMTE8JvRWUX4426/XunbRCetn37aFfRFJuoXGW4+vgtuOvBLLUsD /vEKKR+fZb1MEElcLvyu20B29kXj8+hrXqzXFsfsiGXGnMpauE6eI427G5z4 VqklM7Zhep16pcpuF5/ibHrtcj3RX9FvCWyCDWuN6S++e1sPxHtdvZIpP8k3 v1rP/X72m3ex/YFtUsO6KnoovTLwPskX/IWeWn8DDq30jbbOxUqHDFUGjTfr GZER7PZj0quGfLFeiTpb5WDDX+fSa3fpUR+3zV8iS3M0qvU33vcDeoBHVNo3 7uxW2vxx/SoHJzZPAVJ2cAft4Cn9vAMq7QDffzdt/px+3v6JzQfq0dxLm7+o m++b2LxPpTNVq/vZBjt1HX3UK3ogu0cflckZ3zoTf7vugWvotbf0GHdKfPDf wjrwB7+vRyzD28MP3toN34uPzee0Xg+NPTT4ALaZvd7In+RwFpmDkFu/15Dq k3xIqx5iiifFh43vmLTtv88Ld5VCtD+1j9J75qaPrE/66dQRPfT/O9rWHfkL lLrqfEXwHVu50tnf/S8FOCzs\ \>"]] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Static Replication", "Subsection", CellChangeTimes->{{3.521369367421875*^9, 3.521369370671875*^9}, { 3.52186607190625*^9, 3.52186607584375*^9}, 3.52267193628125*^9, { 3.526031533546875*^9, 3.52603154446875*^9}, 3.528103564887659*^9}], Cell[TextData[{ "The QuantLib example \"Replication.cpp\" the ", StyleBox["Mathematica", FontSlant->"Italic"], " way. For the theory see Mark Joshi\[CloseCurlyQuote]s \ \[OpenCurlyDoubleQuote]The Concepts and Practice of Mathematical Finance\ \[CloseCurlyDoubleQuote]." }], "Text", CellChangeTimes->{{3.442726551265625*^9, 3.442726565609375*^9}, { 3.44272673103125*^9, 3.4427267686875*^9}, 3.521364288265625*^9, { 3.52136938809375*^9, 3.521369395078125*^9}, 3.52267193628125*^9, { 3.52603155453125*^9, 3.52603156046875*^9}, {3.5281035784070992`*^9, 3.5281035828935504`*^9}}, CellID->214388999], Cell[CellGroupData[{ Cell["Constructing the barrier option to replicate", "Subsubsection", CellChangeTimes->{{3.52603169590625*^9, 3.526031713109375*^9}, { 3.526032004453125*^9, 3.526032007109375*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"today", " ", "=", " ", RowBox[{"{", RowBox[{"2006", ",", "5", ",", "29"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SetEvaluationDate", "[", "today", "]"}], ";"}]}], "Input", CellChangeTimes->{{3.525522630503706*^9, 3.525522634066206*^9}, 3.52602727246875*^9, {3.526031716234375*^9, 3.5260317165625*^9}, { 3.527974856866848*^9, 3.527974859700923*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"maturity", " ", "=", " ", RowBox[{"CalendarAdvance", "[", RowBox[{"today", ",", RowBox[{"{", RowBox[{"12", ",", "\"\\""}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"strike", " ", "=", " ", "100.0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"barrier", " ", "=", " ", "70.0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"rebate", " ", "=", " ", "0.0"}], ";"}], "\n", RowBox[{ RowBox[{"underlyingValue", "=", " ", RowBox[{"SimpleQuote", "[", "100.0", "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.52541388075*^9, 3.525413883140625*^9}, { 3.525413938109375*^9, 3.52541395828125*^9}, {3.52541412734375*^9, 3.52541413534375*^9}, {3.52541420325*^9, 3.5254142560625*^9}, { 3.525522832613081*^9, 3.525522833316206*^9}, {3.52558883284375*^9, 3.525588855265625*^9}, 3.5260317465625*^9, 3.5260318364375*^9}], Cell[BoxData[{ RowBox[{ RowBox[{"flatRate", " ", "=", " ", RowBox[{"FlatForward", "[", "0.04", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"flatVol", " ", "=", " ", RowBox[{"BlackConstantVol", "[", "0.2", "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"exercise", " ", "=", RowBox[{"EuropeanExercise", "[", "maturity", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"payoff", " ", "=", " ", RowBox[{"PlainVanillaPayoff", "[", RowBox[{"\"\\"", ",", "strike"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"bsProcess", " ", "=", " ", RowBox[{"BlackScholesProcess", "[", RowBox[{"underlyingValue", ",", "flatRate", ",", "flatVol"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.525413155203125*^9, 3.525413156703125*^9}, { 3.52541321925*^9, 3.525413263625*^9}, {3.52541362878125*^9, 3.52541365525*^9}, 3.525413872*^9, {3.525413982953125*^9, 3.5254140880625*^9}, {3.525414263796875*^9, 3.5254142958125*^9}, { 3.5254143305625*^9, 3.525414340140625*^9}, {3.525414569703125*^9, 3.5254145761875*^9}, 3.525415148*^9, {3.5254242291875*^9, 3.5254242481875*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"referenceOption", "=", RowBox[{"BarrierOption", "[", RowBox[{ "\"\\"", ",", "barrier", ",", "rebate", ",", "payoff", ",", "exercise"}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"referenceOption", ",", RowBox[{"AnalyticBarrierEngine", "[", "bsProcess", "]"}]}], "]"}], ";"}]}], "Input", CellChangeTimes->{{3.525430357640625*^9, 3.525430439953125*^9}, { 3.525588952765625*^9, 3.525588962890625*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"referencePlot", " ", "=", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"If", "[", RowBox[{ RowBox[{"S", ">", RowBox[{"Barrier", "[", "referenceOption", "]"}]}], ",", RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "referenceOption", "]"}], ",", "S"}], "]"}], ",", RowBox[{"Rebate", "[", "BarrierOption61", "]"}]}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"S", ",", "50", ",", "150"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"Filling", "\[Rule]", "Automatic"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.528018245189782*^9, 3.5280182809011326`*^9}, { 3.52801975212744*^9, 3.5280198648094687`*^9}, 3.528019918696955*^9, { 3.52802115142388*^9, 3.528021206202648*^9}, {3.528103670369334*^9, 3.5281036709501696`*^9}}], Cell[BoxData[ GraphicsBox[GraphicsComplexBox[CompressedData[" 1:eJxlkws0lGkYx6UyU8mli6xoJblFGTXS6PM9E4mU+sZtTLqMKBziUFJULu2c tumCqSH3RiQtG1GImiOpbEZaySWEDSmSWuS635618+6x3znf+c7vvP///3me 9/3ele7+LE9ZGRmZc+T79zddyLTFEwk4mvG9SVaAQdOXFFd5NRbEm529Jokz h0GmdR1HyAKzka7cK5mbwH5OmidDwwGe9Z/xVuFvhKYwRf7iRAeIly//PU9A h+zDtKenVjkCm8vopAauB7dtyX7etxwhuuO8LYdDA6xlRZa9jhOoqsx7dL56 LRx8z/pekeMEPXVe9IYYAyhKT2rdYOgM0KG2wDVFB1h18U30QmcI2LtpDeGs BdXfW6HI3AWMDyoNhlqpQ8hrhvmGYhcIz2LtKPVdAodX2e5gMtmgKWgOrn9D AZ6u35dtYjbIYL62lLefcZ5ms8zLza4gM/38xh/T+fAYMZ5Dax9jcqQ8Amr5 qVWIY5/v6KvYvUfKbtSrpZ3ViH2KL4sETm5SztJMU8fqED8NG5Xx2r1Xymvs KOOr3iB+WKPPb3TcJ2Vh5aSxZgvi5KAPPgfc9kuZt3SFolYj4sYrsp4M4wNS poyGXzjgj9glno3X3EWsSnO6OTmE+MsNt8ZsOlfKn4gyYeoJxFONeiuUixFH uhVzLIcR66qmaz1kuEv5j9y4gsITiF3YRWNTjxD/8/8xp/8/I7CwCqjNaCKA +tmixOvqZghe3ZxSEc6GcJGpbYNkCpfT1v7OnyTPM+1RmR/E4XrOHwVu4ej8 UmbrNTQlzcynTedrQEAf++JgCQGwPamKvgSDI9qxf8py2QCBD3Zeb5sNlRk2 f3q3kfkaOXvm2r3DXcwPbhfuQ/nMxv3WNnyU/43b0dfqtR2WbTbX3rLWFE7r aNvw0sh+DwwN+bUO49aiqfEcDeQfNRrw9sud2d/K6f4WwvwtOz+q3iagYbiK leSAQW96n6YWwQZxpF3Hg+a5kNnF+dpQQ/aXc4HFW9yD9xulrr67E+Uvqgid OB2J8neMxyxXlLUGL8rbZ+2hJjCacSYoI5rsL0JFM71+DNfpVB5TV0D+F6ry K29kzJyPMT2fDnR5mA6P9pP11RKfU+fW4rKiokar8wSMHNe49qkeg0PcvkkL I5SnZ1mXb3p/5rzK0/NO4M6+29QM0wnIsu8Q7grCIOtg4j2aLZnPFxg+b5QD FYpHoNIzko+NV1cOf8QZupiAuRXlhxbPc1U7jfJDnnub3JRYgrKfYWKeyBiK PI3mFZ4j/bGZBWWvJnDh7OUnHeWQn66QEIZfn7lfptP7pQXOP+HBJt2kP/uk +OfqBjxf99v1pxEEmHHXhbSPYFAfMXQqeDXKizFzV3iVP3P/DKb3TwU015XM OU63AfF1/pCy0wa4V04Ne78U+ZOfmohzayygMiDhjOidPgRbGYU8HiLrLzme oXiiHGepn1IujyWg6NKCkuECDMQ7rV0SH6B6YREVefRUApRG+8z0ozA4ZxkY sWkr6b98v7aGTQH7uB6aYQXJrgULuj/04e9WyVdRmai+ccFLuZ5QlBe3dU5d 6VnyfiT0T1a9nMQlgtRNAbJI30vlGixMRfpLSyvo9p1kfmCveVXeW1xhUSgW uxLprdfrl6beQfp+1kXzWYvQem5d3sa2QdJ/wzkpmlmFG7QlHIu6RAA76or+ 4BMMjtosnOtdjPz7goQlZvORv8mjHpPjERDvm0nt7sbAoiCr6OYomUddt1eD W4jLO5y5VV2G/EryUacYyQSIa77OU+FjEHK35RBmSepjbLUd4ing05atzCgn 2S7aYLijH18vCvL8ZIHqnacVtEhOojxeoX+xOJK8XymLbtTumsJ7m7k/nJZB eiue1axvyUifvZe31K2dzHcWnehNb8UNOJhG2o9In3ZHXsD7FennJ+5arqiE 1qvUjy7rGyD9vpXLaldLcKH4lq7HBfI+TbC5/hIMJE8GmncVIf/JB+wEa+p/ zsP6/eeuKAJ6unzAYwADzrhPfOEImRev4JiiX4YfeukeXlCK/Pl2La7uc5D/ yJb1E0vCCbAZMlnwyxQGWr5dDdfGSf9Aygsz2m08/3Xiq66H7v/T/8t/Afn9 16c= "], {{{}, {Hue[0.67, 0.6, 0.6], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[ PolygonBox[{{133, 136, 119, 44, 134, 111, 130, 91, 106, 125, 68, 83, 102, 121, 50, 60, 75, 96, 115, 15, 54, 64, 79, 99, 118, 43, 49, 59, 74, 95, 114, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 42, 48, 58, 73, 94, 113, 1, 92, 107, 126, 69, 110, 129, 84}}]]}, {}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[{133, 84, 129, 110, 69, 126, 107, 92, 1, 113, 94, 73, 58, 48, 42, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 114, 95, 74, 59, 49, 43, 118, 99, 79, 64, 54, 15, 115, 96, 75, 60, 50, 121, 102, 83, 68, 125, 106, 91, 130, 111, 134, 44, 119, 100, 132, 80, 128, 109, 65, 124, 105, 89, 55, 122, 103, 85, 70, 16, 116, 97, 76, 61, 51, 45, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 117, 98, 77, 62, 52, 46, 120, 101, 81, 66, 56, 123, 104, 86, 71, 127, 108, 93, 131, 112, 135, 40}]}}}], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"S\"", TraditionalForm], FormBox["\"V\"", TraditionalForm]}, AxesOrigin->{50., 0}, Method->{"AxesInFront" -> True}, PlotRange->{{50, 150}, {0., 29.998718929235366`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.528018246221266*^9, 3.5280182818024287`*^9, 3.52801978091884*^9, 3.528019869065589*^9, {3.5280211603967824`*^9, 3.5280212076947937`*^9}, 3.528069848518958*^9, 3.528070089896042*^9, 3.5280704984835615`*^9, 3.5280709095546527`*^9, 3.528072077884629*^9, 3.528074098470088*^9, 3.528074231631565*^9, 3.528074974079152*^9, 3.5281036091412926`*^9, 3.528103675386549*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Pricing the barrier option", "Subsubsection", CellChangeTimes->{{3.526031857109375*^9, 3.526031867203125*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"referenceValue", "=", RowBox[{"InstrumentNPV", "[", "referenceOption", "]"}]}]}]], "Input", CellChangeTimes->{{3.525519842488081*^9, 3.525519858222456*^9}, { 3.526027181625*^9, 3.5260271830625*^9}, {3.5260317863125*^9, 3.52603179565625*^9}, 3.527974854713752*^9}], Cell[BoxData["4.260725872875961`"], "Output", CellChangeTimes->{ 3.525519859050581*^9, 3.525521300675581*^9, 3.525521818019331*^9, 3.525522842081831*^9, 3.525578392453125*^9, 3.525584673671875*^9, 3.525585739421875*^9, 3.52558669659375*^9, 3.525587112*^9, { 3.52558720559375*^9, 3.525587248078125*^9}, 3.52558892171875*^9, 3.52558896553125*^9, 3.525591208625*^9, {3.525591256953125*^9, 3.5255912783125*^9}, 3.525591377828125*^9, 3.5255915588125*^9, 3.526013256*^9, 3.526020008640625*^9, 3.526020323890625*^9, 3.526020472046875*^9, 3.526027183953125*^9, 3.526028347390625*^9, 3.5279748450398417`*^9, 3.5280168272208433`*^9, 3.528016968343768*^9, 3.528069848889491*^9, 3.528070090276589*^9, 3.528070498563677*^9, 3.5280709100453587`*^9, 3.5280720786156797`*^9, 3.528074098800563*^9, 3.5280742320121117`*^9, 3.528074974259411*^9, 3.5281036096019554`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Constructing the replication portfolio", "Subsubsection", CellChangeTimes->{{3.52603169590625*^9, 3.526031713109375*^9}, { 3.526031814375*^9, 3.526031819265625*^9}}], Cell["Constructing the put for the strike", "ItemNumbered", CellChangeTimes->{{3.526031901140625*^9, 3.52603192771875*^9}, { 3.526032164328125*^9, 3.52603216846875*^9}}], Cell[" Final payoff first: as shown in Joshi, a put struck at K...", "Text", CellChangeTimes->{{3.526032059203125*^9, 3.526032081046875*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"put1", " ", "=", " ", RowBox[{"EuropeanOption", "[", RowBox[{"payoff", ",", "exercise"}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"europeanEngine", "=", RowBox[{"AnalyticEuropeanEngine", "[", "bsProcess", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"put1", ",", "europeanEngine"}], "]"}], ";"}]}], "Input", CellChangeTimes->{{3.525521259128706*^9, 3.525521263472456*^9}, { 3.525521314159956*^9, 3.525521336363081*^9}, {3.52558893034375*^9, 3.525588937359375*^9}, {3.525588985453125*^9, 3.525589017953125*^9}, { 3.525591230859375*^9, 3.525591240390625*^9}, 3.5260318930625*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"pl1", " ", "=", RowBox[{"Plot", "[", RowBox[{ RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "put1", "]"}], ",", "S"}], "]"}], ",", RowBox[{"{", RowBox[{"S", ",", "50", ",", "150"}], "}"}], ",", RowBox[{"Filling", "\[Rule]", "Automatic"}]}], "]"}]}]], "Input", CellChangeTimes->{ 3.52801821134111*^9, {3.5280212498253746`*^9, 3.5280212754121666`*^9}, { 3.5281036859016685`*^9, 3.5281036866427345`*^9}}], Cell[BoxData[ GraphicsBox[GraphicsComplexBox[CompressedData[" 1:eJxFlQs0VGkcwCevGRJRJKXkFcquSeSx4/4nYiYS4zU03kks1aFsHgmnndNS G6aYoiGvZA8bUWY9kqSyHj0mGfKIJSmz2LzF3j1nm++ec889v/P9vt93z/m+ e+6OwJOMYAkCgZCA3/89C3nblAgEOrAC3otWV2kwTjm1B1uig2rTlfZGKRrw H+kl5a11AHtrYYLfFzv4UEGa/yLrCJud5ohrZw9Ad2qCjaPkIdA/nVR3b9kW GAe96p4oOUF5dbGNpcgGdp3x89mjcBjepOTlt0/tB/v9I9cGFZ0hMs5UYD1I hZ6GoyEGmc7gmGxGLnsNkDO10PbjBhdIs1Brc67EoCCTSseyXeB00UKPBIcC PVM8L3l1BnDNL1zvyLKCaaqdwDuTAebzo+VXiy3ASSov2FLDFZ6Jzoeqpu6D nnjF1A3ZrsCVb3pdwTGF0hDy03PabsAMsBwmRZoAy/5mROgdN0gbSqF7e5OB 0retxEnPHdRUZR+mtH8HQSOMheYydxgTHDftTjeEmoKc/r27PQCG1Nd68fSA IeD2mFZ7wCkfi10uHlrQvtAPNVaeYBy0fjrOdiucfWNptZfvCYklDMe68I0Q ok13pFKZoMnpje56SwT2zogp+0YmECjhdOK7vzG2Zi/hxQ9eQPj/+jN1Se/j Y8RYGfn9EtVbzPOgXpnbijjjueNEs/MRMbNI1+qG2xGH8a/kc9xZYi7RzNtK ESB+Gr9IOO7sI+ZdDsRl7beIGzoNUoVuvmLObFkx1uxDfDPqY5g/y0/MbJVt ilpCxMKrEsGWxv5iJi4mXvI/idiTy8Q67yFWI7vfXplFPFXIEpaaBoj5s0t9 Zm4M4lWh/jYlPuJkFt/bZg7xTrUCrQbLQDH/VZ5VVR2D2JNZs7T6ELH9iae3 cs/RgZ9u7uufTINo3V5ecyITEvPN6N0dq5iMjs5C6gq+f3kP6yMgC9P3+MRh JaL94knqd/fkoF60TJSw05oOKQuX9Iwf0eCETsaMRAATILL20K0BSWgpos2E DuA9jbIj0g6DmKdV0MFMX9SjCv3saKmol6CnQ2Pn4e/jPzsb0T+H2eWvLpdp IH/RaDI0ohz5l1/RZkK20yHK6IEcdxD/3gsmNLVcmNCY7DBU2ysNxaPe/3R3 4uuXXWKwN4xhIqNc3XuHUE+5Oe5rQjLqLRadjypKw9dPUtUs6FrC9IaVlrYq IL9NTX5HYRHyR4+azS2K8L569nOS9EvsWMDEirUR8vVtBJVmD5DPrTGRrFKk w3H7tmWHSRqUBGXfJ9Px+amc3c+FMqBKPBq5/hnOZ5bbW+Y+YZY7KRzqAdSL 48t6qSegXk2wkWz1RdzPKK6qf/UVy5TcEusmg3xThRvx2C3ke/yMRe/5gPul sY2/tHdjXUmz56J1kZ9uHqjwqhL595tI8SMqaDza1ujs41l8/safihRjmrDG Q3ae2bXI5+0ykOsh0iFQ0DWjO0+DizaRSRYHcP/Kg5edTCI4ZY2Rdzfj7FW1 9sPHCWxQW76VREV946oXMmNxqJd1QEpQdwE/TzdEK60vVrAOTq7FKQnkj5MC DNflIv9XlWZTp2G8Hzlu1VrxDlNQjqNk7EC+nYlBXe5d5IsYl63WKKPxckHF voFpfH6hR04atRU7TVsnHcpHvm9U5h/mcsi3riqpub2I+6TvfTQCqjF51/N3 2uuRv2OkYN2EJB0G1FnTyss0OHuv7xjFBvfT6TquXCKEDZQqWTbh7JBmODck wkzyo4I/W6N+CrmqryMW9djVJ/mNyfj55CkXvjy8io33BmxOICDflm275stN 5Jf6sFVY7/G+R37MeEE/ZuhN0cjbjvy8u/Ic9u/Il8s+vEVxPRpv3Xp608Qk Pj+8ZdNL3Q6s48lk7+Ea5MfWMm/YkZDvvRzGrZ7Hfa6CG8+gHjv2IjCxqg75 lQ59XoFSyNcKH+2+voz7k7w2c/JvWOWb7FejDcj/9j//xv8CDyaP3Q== "], {{{}, {Hue[0.67, 0.6, 0.6], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[ PolygonBox[{{1, 126, 112, 53, 124, 104, 121, 87, 101, 118, 72, 83, 97, 114, 58, 66, 77, 91, 108, 25, 61, 69, 80, 94, 111, 52, 57, 65, 76, 90, 107, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 56, 64, 75, 89, 106}}]]}, {}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[{1, 106, 89, 75, 64, 56, 51, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 107, 90, 76, 65, 57, 52, 111, 94, 80, 69, 61, 25, 108, 91, 77, 66, 58, 114, 97, 83, 72, 118, 101, 87, 121, 104, 124, 53, 112, 95, 123, 81, 120, 103, 70, 117, 100, 86, 62, 115, 98, 84, 73, 26, 109, 92, 78, 67, 59, 54, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 110, 93, 79, 68, 60, 55, 113, 96, 82, 71, 63, 116, 99, 85, 74, 119, 102, 88, 122, 105, 125, 50}]}}}], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{50., 0}, Method->{"AxesInFront" -> True}, PlotRange->{{50, 150}, {0., 49.99999795918367}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.528018212412651*^9, 3.5280212765437937`*^9, 3.5280698558795424`*^9, 3.5280700906170783`*^9, 3.5280704987239075`*^9, 3.528070910455949*^9, 3.5280720788059535`*^9, 3.528074099070952*^9, 3.52807423237263*^9, 3.528074974399613*^9, 3.5281036097521715`*^9, 3.528103688074794*^9}] }, Open ]], Cell["Constructing the digital option ", "ItemNumbered", CellChangeTimes->{{3.526031901140625*^9, 3.52603194571875*^9}, { 3.5279749998123937`*^9, 3.527975002255907*^9}}], Cell[" ...minus a digital put struck at B of notional K-B...", "Text", CellChangeTimes->{{3.526032097265625*^9, 3.52603209984375*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"digitalPayoff", " ", "=", " ", RowBox[{"StrikedTypePayoff", "[", RowBox[{"\"\\"", ",", "\"\\"", ",", "barrier"}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"digitalPut", " ", "=", " ", RowBox[{"EuropeanOption", "[", RowBox[{"digitalPayoff", ",", "exercise"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"digitalPut", ",", "europeanEngine"}], "]"}], ";"}]}], "Input", CellChangeTimes->{{3.525521867394331*^9, 3.525521867394331*^9}, { 3.525521941097456*^9, 3.525522009878706*^9}, {3.525589024046875*^9, 3.525589054921875*^9}, {3.52559106425*^9, 3.5255910680625*^9}, 3.5280385780939984`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "put1", "]"}], ",", "S"}], "]"}], "-", RowBox[{ RowBox[{"(", RowBox[{"strike", "-", "barrier"}], ")"}], RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "digitalPut", "]"}], ",", "S"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"S", ",", "50", ",", "150"}], "}"}], ",", RowBox[{"Filling", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.5280181628413715`*^9, 3.528018181508213*^9}, { 3.5280213175227184`*^9, 3.5280213575803185`*^9}, 3.528021404908373*^9, { 3.528037650827533*^9, 3.5280376516887712`*^9}, {3.5280377075290656`*^9, 3.5280377283990755`*^9}, {3.5280382834903793`*^9, 3.528038294896781*^9}, { 3.5280383294464607`*^9, 3.528038344087514*^9}}], Cell[BoxData[ GraphicsBox[GraphicsComplexBox[CompressedData[" 1:eJxNlgk01Wkfx6+dSCFqlCh7K+4oMX/Pz5TlkuXKckmFKETdtKkI1WuabhlF XLtsSaO3dE2XbBlaTNYkSyJKCEmyxzzvOe945p5zzz2fc57n8/39nu3cNZ5H 7L0FaTRaHv7+7zczZbUMjcYAfkVFx/w8HQYoth6aYcCGi8qJ4RJ6UPhYIzxN 0gpWTXnNhDRsho/3xSfHJHaCl0GH8oaW9dDCObd9p5A1pNWLjNaOaoK9pUtx lYwN8JsTpPv5qrD+xL49etK2kOMkLB8QqQzmP3+40bXEDqLa79wcF1gObaVe B7Vj7aBczUfupeFiSPoy9eKQHBNo8RceS6nPoIxYEwZKZMLxrKk2wWgK2r6k uEgp2gPX4GJ8bZwRjJqYNbnG2oPBZO/dmOxtYCOc5m2otAueDYf6KnC2Qlvw Eo5c4i7gSlW8vB+tD7kHdZ+GqDoAy8OwRzyQDm7myQG+tx0gqvsyw9VVF6iO 1Tk2Go6wQkGi7HLNJtj/wX6qMs8R+pp89FuurQN+RtLbHzc4AXQrSrqkaIB9 E7dNv8AJ2Hu2rWc6rYWaqbfAN3IGnf1LR8/uWAVBrwyNfix0hrAc+53F/svg oCpjp4kJC1Si2082vxaDCM2AL+blLKBR/gyxN59RhEo7rf4nF6D9//MXZ0aj /0/CKE/33YyJ6wJPgmJ+ajXh6893DlXa7V5gN/EbxT01hP0Kf0uPdnRb4ByV tFVUE+GnwdM0H7s9C7zeSmxW9TXh0jptTqvD3gWOfTKno9JBOPlYv5+7274F jpBfvWRtK+HWGEFvQx33BRabDrvifoSwM5eF6h4QXqHreGtunPCXTLfWXH2P BR5klsSmniY836q1WqaQ8Hm3QtftE4Q1V2SsLTX0XOD3d+N4BacJO7P4M/Nl hM0PP72ZGsKAQNWjxeXCdDBibU6obrKDtMllRb8fEAGVSiWOozM+ryNKRw0d 3yPjHeyGrDYmiH82LvK58ROcVG9PqQxjQVj6FkZL7TwSVVOb4szh/U4rKwmA OKTl9CnaLYzsb4qQVktbEsk/KXqstc6YAcu+/mDtfp4OlyWraWcK8H2JLO0t s5OAt22Sv7vrMyHMQuJ7061RxB5iXR0tYgJYJlXrL6PgsNr1b4IeLIDAR9Y3 O4XgSZbFN99OnK+Ut1vEqgs5G+23jN1L8k1a95lZcEj+YGYMfeWYHYR5Hroa HywAnnmb/SxP436DLE2cm4vQOQ01i4g03J/7+HjA2wlklj4/m6dEfNMbR3wD 7hLf1UaLbweVGdDrelhe5zEd9LyX8xqycD8uciHPTSWB6j3/0wE1JpSzzTrZ veNo0c/Wn1bcYULLRLV90i4KBjKGVNYyWVB+3qr7UbsIZPe6fm2pw/3kXbGP kOtDwxtT1R9Yk3zZyrPfz50n+TFz73oD3+N+NparZhwVgsf87GlbH9wPMncR ufcaTWeFHsuKwv2EK6hkNM8gjR6ZmVXSxPdihdSazCziC62LWbnbDK8/cPUD GwdRr9eWielhXI9i4nNxkQYkmM5v3XGZCZOnlOIHmyk44DE0Z7yR+LS2N+Vv eUh8XD5diLeEAfWR3Km4LjqIypZe/Z5sB1BGWdiAFAweKhXuX4nrFfGuLxWZ Qk7+5oobMpiQY9Mda3uMgpz9iX/oMnA+J3rD81ZRUBDzClz6DPOJ2ZonE5+Q oSYVbWJK8s8WSrgoniP5Pnculae8sQNa9MCwpr8wsI27Kxr34bxnXZEpCl2I 771RouAS9l3P5pU0fkexQivPOIgSn750QjC6SXybHOt7Oii8PrwByV8ujSCn /6CTeh/x/Nwz5b/WtKB8zbGbT8OZYOCxOejdJAXN4eMhJ9WJ75qBp3RjPvHJ 0g/p1bBxPW/itRO9a9EfFeLBH+TJ+JM7Ngb9OY79y05lLTldgexXhchUXGcC P1KyaIJHQbm1mXPiI+JLWa+9qE2MAZU5eZ+sRujA9rl2Ri4B9z/amBdVIgWV m9745C7HebZjz7zlp1FweOV9/VQmLJ0eMtC+QMGl7YHh20xx3m8PG+pYYmAT 16e7oRKzC0/yY/8Q6lKVqhY3IfXp8OpF+86S/EYBtzxeCz7/VaEOfv3CYCFA 04zZjfPc5kMH9btRnKlwU/FFfH8Thueq6+dQbXTqNrYg8Q2Ie6xbnEp8oiuG zVO34fWeOy28ifsFRcpX6tv04HoCB4yq779BlwdkRH8Nwf57d9h1DzOQtOxZ 6voa4jOjaxen3iO+gW+XYiP98XiFRad8j75Ew/ZXjQRkyfi7Tfe3do5if6ZT UpRJNVrXmXDiQiQTWBditEerKDhusVjEt5D49h6LLTJYROa3eTVTohFM4Ppn i3/8SIEh27pW8gTOu6Lsvb+vChnzcvi3prFffPMeJY8CJLUr9HZNCfGt+ZCx eEiIAaX6/Pfqk3TIkpthr+bagTsnuUt3Vgp0ln5S5Mhj35iR6bbkabRU6kKI YTJ+X+q+SihwKAh60HGA2o791xhqu7hi4NeZK2NYgdkqat1E9zCipx/zHjQm 9V7W5XXUnvnXeudVZZQ14/u5z/IXSS0R4HVLtx53wXnZkUHRpj0oouBIYfl5 /J6kyGY22M6jgXaPH87RiG9HxA6BsWTiC5yanQrdivcv43GYgMooyt0TIe/2 DtfjlH56IOMtGv9Lhe97Fvu16oOVXfLROldKKU2Z+NLuSUVH/Jf4nF7HWRzx w+NztXweRr1CixJtVy5ZSsZXrzq+fGgE+/2fLG9Qr0Wx5bc1va7g9+Q7y+NI LQW1VSPttnziO/OIlWAm/q/zYvbhc+8FJvT1+oHXCAXZTLewwUCcx3Mzn9eo Rq6zftyCSeznSjukaJegA/WeYbxi4su36nDxFCa+1RJCDjmheH4Yn5ofOIHW +ve2xM/i+SMpLwx076D8V4mNvaVk/j//X//hvwGIg92d "], {{{}, {Hue[0.67, 0.6, 0.6], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[ PolygonBox[{{1, 173, 152, 56, 171, 139, 167, 110, 133, 161, 86, 104, 127, 155, 64, 77, 95, 118, 146, 25, 69, 82, 100, 123, 151, 55, 63, 76, 94, 117, 145, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 12, 54, 62, 75, 93, 116, 144, 11, 111, 134, 162, 87, 137, 165, 105, 170, 128, 156, 68, 138, 166, 108, 131, 159, 81, 99, 122, 150, 53, 85, 103, 126, 154, 61, 74, 92, 115, 143, 10, 67, 80, 98, 121, 149, 52, 60, 73, 91, 114, 142, 9, 8, 7, 6, 5, 4, 3, 2, 51, 59, 72, 90, 113, 141}}]]}, {}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[{1, 141, 113, 90, 72, 59, 51, 2, 3, 4, 5, 6, 7, 8, 9, 142, 114, 91, 73, 60, 52, 149, 121, 98, 80, 67, 10, 143, 115, 92, 74, 61, 154, 126, 103, 85, 53, 150, 122, 99, 81, 159, 131, 108, 166, 138, 68, 156, 128, 170, 105, 165, 137, 87, 162, 134, 111, 11, 144, 116, 93, 75, 62, 54, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 145, 117, 94, 76, 63, 55, 151, 123, 100, 82, 69, 25, 146, 118, 95, 77, 64, 155, 127, 104, 86, 161, 133, 110, 167, 139, 171, 56, 152, 124, 169, 101, 164, 136, 83, 160, 132, 109, 70, 157, 129, 106, 88, 26, 147, 119, 96, 78, 65, 57, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 148, 120, 97, 79, 66, 58, 153, 125, 102, 84, 71, 158, 130, 107, 89, 163, 135, 112, 168, 140, 172, 50}]}}}], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{50., 0}, Method->{"AxesInFront" -> True}, PlotRange->{{50, 150}, {0., 29.972190391127896`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.528021358701931*^9, 3.5280214068311377`*^9, 3.5280376612324944`*^9, 3.5280377299212637`*^9, {3.5280383313291683`*^9, 3.5280383448586226`*^9}, 3.5280385907622147`*^9, 3.5280698563802624`*^9, 3.52807009141823*^9, 3.52807049925467*^9, 3.5280709108465104`*^9, 3.528072079637149*^9, 3.5280740994615135`*^9, 3.5280742327932353`*^9, 3.5280749747000446`*^9, 3.528103609942445*^9, 3.5281037000219727`*^9}] }, Open ]], Cell["Constructing the put for the barrier", "ItemNumbered", CellChangeTimes->{{3.526031901140625*^9, 3.52603192771875*^9}, { 3.526032164328125*^9, 3.526032182984375*^9}}], Cell["... minus a put option struck at B.", "Text", CellChangeTimes->{{3.526032154984375*^9, 3.526032158375*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"lowerPayoff", " ", "=", " ", RowBox[{"PlainVanillaPayoff", "[", RowBox[{"\"\\"", ",", "barrier"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"put2", " ", "=", " ", RowBox[{"EuropeanOption", "[", RowBox[{"lowerPayoff", ",", "exercise"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"put2", ",", "europeanEngine"}], "]"}], ";"}]}], "Input", CellChangeTimes->{{3.525522298956831*^9, 3.525522327863081*^9}, { 3.525589085234375*^9, 3.525589112671875*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "put1", "]"}], ",", "S"}], "]"}], "-", RowBox[{ RowBox[{"(", RowBox[{"strike", "-", "barrier"}], ")"}], RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "digitalPut", "]"}], ",", "S"}], "]"}]}], "-", RowBox[{"PayoffValue", "[", RowBox[{ RowBox[{"Payoff", "[", "put2", "]"}], ",", "S"}], "]"}]}], ",", RowBox[{"{", RowBox[{"S", ",", "50", ",", "150"}], "}"}], ",", RowBox[{"Filling", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.528038392076518*^9, 3.5280384041238413`*^9}, { 3.5280384969072576`*^9, 3.528038501573968*^9}}], Cell[BoxData[ GraphicsBox[GraphicsComplexBox[CompressedData[" 1:eJxNlAs0lHkfxyeKEblGXreVRJRyWeXS4/lbcsmtGbehUYhCrDmUzf2275zW VFtoTO65rbR6l8buKGStapvN9bUyIxTrkpBsuaf32XPeMz9zznPmfM7z/32+ v//l+e8OjqaGipFIpB+J55//imItBRLJGZH+/5vGGKb4GnDjr3rppdIuIp6s Iy9/kHIV8QArxc5V3E3E1ON+TY8V3EW8/+LpAFNZDxE7fjV+85XcCRELW0LO GbCBC9+vPD+vRBFxOdvWGS+goAuVK0KxHAwJ3xf7yahREcfi21udedZowdah z59NRRbLE/dyqyyR+9bSUCtNT/T7XGq4CusIEibJsZQKPBFHpu2/dTnmqOac ydPkPV6IFmQ1Ro4xQ3THoqjwO17o+miWs7+/CcKGtKrd9byRqorUo6yOg+jM OHWlvdYbTfWFmQ/cMES88sLhLw/4IDSqJu1XrIeofRyheYMPYgRY7qf46KCO lWHEs/ZFxmfkFxLtNdClP62sv2z0RWnVVNemyJ3o3B5nV1tbGtLOGYzrfyGJ mPpR7x1baYiERTpLvnyHM7UHSd1H/UTz/4O1pvfmN2C81uT1mq2/iJeRWn0J Hzj7mets+4mTIqaTbzaNdQBHNH5fluNNF3G1dqkG1gf8NGmVFHYiAPbPRXJ9 zwvgli4DlsDrlIjZTzaMtYeAi2LfRATST4uYqawlpyMAFuSKhVoZB4pYcjXt SmA0sC+HhnfdB1Y18f5hYxH4fQVdUGMeJOIZSjO7JB74s2CflkIjcAa90d9u CVhftVynxSpYxH/dy+M2xAP70nhrnx8BO3799HZJMnwP1rRD+fw+OK/a7Zos b184rzb2jJ5KIQWR39k8CLt5FMXtHSxuT6OhtLLDzgOdn3EJXd0V1gax36WP mqNQHr7P520OPQ32t1h834CwEPLjJGIFXTaQnyXNJyU0QP6wUPrHQHPIZ8zS ri48oCB0vJBvvhNDX+tmfxQLoiEU89Dt9og4elLp9DF8hMjXrD25zeUV7mt9 5jj7FOTbCk47OLEgf6Yi10z9A+QF1x6KOB4PeSl6uk7MUmJ+gYuLUcNLuEPZ 5/VaTfCtGs2HR90D39Vep4/nvoD5mIbu4vZUgh+byDh6Vhf8279ye6t6l4IG lvjUQk8MTZfPautQaKg1w2X04eA2VDXh//dAFzGf2itUptIUPmdUsve+G+Qr tid+SsmA/NyN1xMxf0Her7yqVY8wyFutTI2tvE7MJ11Fu7x/DdcbU1jTkAXf c1WZ3RWV4EvtylU/6QD1EyGHl1bniH7UCp6Rt/XgYmU8gX0WBS1/o3lrph9D Z4NmN2yMwLfPrq/+8C/g4/DMxLlysD4Sii1XPxVBvzPnW7a+UYc8n0hHtQPl FFTtPsr2iMVQ9ZmCn02ciXxWzoFnAgmkIhkSI/87wRfXO54svcWt9LEc22OQ n9go5aeWAvlhdy+3Fr+EPIbNaFvvacjjhRpJNVwmfNlV3ObeTzhbXD3BSwJ8 5rL5Sfht8B307h4bwjb1+288znSSqK9JaP2uYwCv1/9w+2k6BVkEHbr0ehlD /emLyXF7wXfDIli2tx58imbnTTsY4Pu5jZw0rgzj4+yNLv22SPh3flMpF9+G UzWSFdqyKYh3TfrBEhdDrW4OvgUPwVe832C7UBLWmxF2I0EpH+bffvBlWM0u yEtKb68zL6Eg+dVZC4NMDF22i0m3PEbkff9LTxdNErnnTZkcaCfYjys9+WYW f7VHhk+2hf6Mud0SU4mQ37uFXssdgDynLST93JOQl3dsa1/Tt8T3mz+3we/e wDtzSiwZYuCbJgcZ7igBn4TqnGOJJdRfU243dx8j+omZtubXvcSzphUkvkuG 97KKiVj2bvA5mBk0lfwEvumPl9nXImH8HPWq9RZFGH+vr+7IyALhr/ApvG7L xw1H8i9mXqMgWmauwcJjDF1w2rEtvBF8p2LZDyy2Q70wpB+TYFIQJ7KKPDmJ ISuGW6f0xU33Kbea98Mq4ScfCtAMasBlPFPvdDSDb/d4+Y5Zcdi/SqU1hhYH 1tNY/q0aSxl88jKZyVZFFNTa9beUCgtDl+4PncXsCP8NZ11PjiSKGKlRsGoj 2OW64dLoHG5WFhs6YwP9ZplwhzoTNq137ePyR/2Qxx2VFVzwgzxmQ3RjawZx nxQrVvR4fManB4P+lUICnz3TfsuHIvDFrKyvpB6B+poApjL9NdGPT1n8dPkw vviHNi88Ed4b+mOapV+Ar/QnmRzmf8Dn8yLPKTpi031a4KEuJw/j+RoXds3O E/7IJ7t69nbi7NY7+iFXiPvkEy0ouhNDnY/nBz144Et4SMt3IG86Lw7j7yYy KWhqIgKFzGOoikJPm4mBPP/1CE7DMuHnyHoVGzTjZ7uD07hN4Kt3GfIL3go+ LSlxr+pUqNeJnBi4tU7Uzxc/tzC5i9f/WdA70QL1/wN/bCe8 "], {{{}, {Hue[0.67, 0.6, 0.6], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[ PolygonBox[{{170, 152, 56, 171, 139, 167, 110, 133, 161, 86, 104, 127, 155, 64, 77, 95, 118, 146, 25, 69, 82, 100, 123, 151, 55, 63, 76, 94, 117, 145, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 12, 54, 62, 75, 93, 116, 144, 11, 111, 134, 162, 87, 137, 165, 105}}]]}, {}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[{1, 141, 113, 90, 72, 59, 51, 2, 3, 4, 5, 6, 7, 8, 9, 142, 114, 91, 73, 60, 52, 149, 121, 98, 80, 67, 10, 143, 115, 92, 74, 61, 154, 126, 103, 85, 53, 150, 122, 99, 81, 159, 131, 108, 166, 138, 68, 156, 128, 170, 105, 165, 137, 87, 162, 134, 111, 11, 144, 116, 93, 75, 62, 54, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 145, 117, 94, 76, 63, 55, 151, 123, 100, 82, 69, 25, 146, 118, 95, 77, 64, 155, 127, 104, 86, 161, 133, 110, 167, 139, 171, 56, 152, 124, 169, 101, 164, 136, 83, 160, 132, 109, 70, 157, 129, 106, 88, 26, 147, 119, 96, 78, 65, 57, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 148, 120, 97, 79, 66, 58, 153, 125, 102, 84, 71, 158, 130, 107, 89, 163, 135, 112, 168, 140, 172, 50}]}}}], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{50., 0}, Method->{"AxesInFront" -> True}, PlotRange->{{50, 150}, {0., 29.972190391127896`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{{3.52803840858025*^9, 3.528038426145507*^9}, 3.5280385029960127`*^9, 3.5280385977021933`*^9, 3.52806985692104*^9, 3.5280700922694545`*^9, 3.528070499785434*^9, 3.528070911497446*^9, 3.528072080238013*^9, 3.528074099922176*^9, 3.5280742335443153`*^9, 3.5280749748803043`*^9, 3.5281036101126895`*^9, 3.528103704939043*^9}] }, Open ]], Cell["Putting all insrtruments in the portfolio", "ItemNumbered", CellChangeTimes->{{3.526032271703125*^9, 3.526032291015625*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"pfo0", " ", "=", RowBox[{"{", RowBox[{"put1", ",", "digitalPut", ",", "put2"}], "}"}]}], "\[IndentingNewLine]", RowBox[{"w0", " ", "=", " ", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", RowBox[{"(", RowBox[{"strike", "-", "barrier"}], ")"}]}], ",", RowBox[{"-", "1"}]}], "}"}]}]}], "Input", CellChangeTimes->{{3.525586810234375*^9, 3.525586893984375*^9}, { 3.525586960640625*^9, 3.525587046*^9}, {3.525591449765625*^9, 3.5255914555*^9}, {3.52602767065625*^9, 3.526027673625*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "EuropeanOption400", ",", "EuropeanOption403", ",", "EuropeanOption405"}], "}"}]], "Output", CellChangeTimes->{{3.525587206125*^9, 3.5255872485625*^9}, 3.525589120609375*^9, 3.525589185125*^9, 3.52559120903125*^9, 3.5255912785625*^9, 3.525591378078125*^9, 3.52559155915625*^9, 3.52601325653125*^9, 3.526020009234375*^9, 3.526020324234375*^9, 3.526020481671875*^9, 3.52602632971875*^9, 3.526026409578125*^9, 3.526027674328125*^9, 3.52602782740625*^9, 3.52602834765625*^9, 3.5279750642350287`*^9, 3.528016827320987*^9, 3.528016968443912*^9, 3.528069857041213*^9, 3.5280700923896275`*^9, 3.5280704998555346`*^9, 3.528070911667691*^9, 3.52807208061856*^9, 3.5280741000523634`*^9, 3.528074233684517*^9, 3.528074974960419*^9, 3.5281036101627617`*^9, 3.5281037076529455`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "30.`"}], ",", RowBox[{"-", "1"}]}], "}"}]], "Output", CellChangeTimes->{{3.525587206125*^9, 3.5255872485625*^9}, 3.525589120609375*^9, 3.525589185125*^9, 3.52559120903125*^9, 3.5255912785625*^9, 3.525591378078125*^9, 3.52559155915625*^9, 3.52601325653125*^9, 3.526020009234375*^9, 3.526020324234375*^9, 3.526020481671875*^9, 3.52602632971875*^9, 3.526026409578125*^9, 3.526027674328125*^9, 3.52602782740625*^9, 3.52602834765625*^9, 3.5279750642350287`*^9, 3.528016827320987*^9, 3.528016968443912*^9, 3.528069857041213*^9, 3.5280700923896275`*^9, 3.5280704998555346`*^9, 3.528070911667691*^9, 3.52807208061856*^9, 3.5280741000523634`*^9, 3.528074233684517*^9, 3.528074974960419*^9, 3.5281036101627617`*^9, 3.528103707682989*^9}] }, Open ]], Cell["Construction puts at points (B,t)", "ItemNumbered", CellChangeTimes->{{3.526032360859375*^9, 3.52603238615625*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Hedges for the barrier", "Subsubsection", CellChangeTimes->{{3.52603241965625*^9, 3.526032428484375*^9}, { 3.528103720381248*^9, 3.528103737235483*^9}}], Cell["\<\ Now we need puts at the barrier to kill the value of the portfolio at that \ point. For the first portfolio, we\[CloseCurlyQuote]ll use 12 dates at \ one-month\[CloseCurlyQuote]s distance.\ \>", "Text", CellChangeTimes->{{3.52602666090625*^9, 3.52602667365625*^9}, { 3.528103748171208*^9, 3.5281038026395297`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"innerMaturities", " ", "=", RowBox[{"CalendarAdvance", "[", RowBox[{"today", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "\"\\""}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "52", ",", "4"}], "}"}]}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5281042916727247`*^9, 3.5281043466818237`*^9}, { 3.528104406517864*^9, 3.5281044152504206`*^9}, {3.5281044580820093`*^9, 3.528104468406856*^9}, {3.5281045482917247`*^9, 3.528104555772482*^9}, 3.528104596460989*^9, {3.5281046450308285`*^9, 3.528104656457259*^9}, { 3.528106188309955*^9, 3.5281062065061197`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2006", ",", "6", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "7", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "7", ",", "31"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "8", ",", "28"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "9", ",", "25"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "10", ",", "23"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "11", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "12", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "1", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "2", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "3", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "4", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "5", ",", "7"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.528104347853509*^9, 3.528104416241846*^9, 3.5281045565235615`*^9, 3.5281045974023423`*^9, 3.528104657228368*^9, {3.5281061986648445`*^9, 3.5281062070368834`*^9}, 3.528106729638347*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"putn", " ", "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"EuropeanOption", "[", RowBox[{"lowerPayoff", ",", RowBox[{"EuropeanExercise", "[", "#", "]"}]}], "]"}], "&"}], " ", ",", "innerMaturities"}], "]"}]}], ";", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"#", ",", "europeanEngine"}], "]"}], "&"}], ",", "putn"}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.528104703394752*^9, 3.528104754187789*^9}, { 3.5281050166051264`*^9, 3.5281050553408256`*^9}, {3.5281052267673244`*^9, 3.528105251703181*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"pfo", " ", "=", " ", RowBox[{"Join", "[", RowBox[{"pfo0", ",", "putn"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"w", " ", "=", " ", RowBox[{"Join", "[", RowBox[{"w0", ",", " ", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"Length", "[", "putn", "]"}], "}"}]}], "]"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.528105085063565*^9, 3.5281051348351326`*^9}, 3.5281058185082064`*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "30.`"}], ",", RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]], "Output", CellChangeTimes->{ 3.5281058194595747`*^9, {3.528105918642192*^9, 3.528105940073008*^9}, 3.528106081856883*^9, 3.5281061276327057`*^9, 3.52810617286775*^9, 3.528106211663536*^9, 3.52810628186448*^9, 3.528106374687954*^9, 3.5281067316312127`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"killdates", " ", "=", RowBox[{"Most", "[", "innerMaturities", "]"}]}]], "Input", CellChangeTimes->{{3.5281048763534546`*^9, 3.528104894169072*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2006", ",", "6", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "7", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "7", ",", "31"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "8", ",", "28"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "9", ",", "25"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "10", ",", "23"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "11", ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"2006", ",", "12", ",", "18"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "1", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "2", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "3", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"2007", ",", "4", ",", "10"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.528104894739893*^9, 3.528105258032282*^9, 3.5281057243227744`*^9, { 3.5281059199640927`*^9, 3.528105941675312*^9}, 3.528106084710987*^9, 3.5281061296556144`*^9, 3.528106216850995*^9, 3.5281062831062655`*^9, 3.5281063759197245`*^9, 3.5281067326026096`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"SimpleQuoteSetValue", "[", RowBox[{"underlyingValue", ",", "barrier"}], "]"}], ";"}]], "Input"], Cell[BoxData[ RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetEvaluationDate", "[", RowBox[{"killdates", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], " ", "]"}], ";", "\[IndentingNewLine]", RowBox[{"portfolioValue", "=", " ", RowBox[{"w", ".", RowBox[{"Map", "[", RowBox[{"InstrumentNPV", ",", "pfo"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"...", "finally"}], ",", RowBox[{ RowBox[{ "we", " ", "estimate", " ", "the", " ", "notional", " ", "that", " ", "kills", " ", "the", " ", "portfolio", " ", "value", " ", "at", " ", "that", " ", "point"}], "..."}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "...", "and", " ", "we", " ", "subtract", " ", "from", " ", "the", " ", "portfolio", " ", "a", " ", "put", " ", "with", " ", "such", " ", RowBox[{"notional", "."}]}], " ", "*)"}], "\n", " ", RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], " ", "=", RowBox[{ RowBox[{"-", " ", "portfolioValue"}], "/", RowBox[{"InstrumentNPV", "[", RowBox[{"putn", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], "]"}]}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", "killdates", "]"}]}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5281053101572337`*^9, 3.5281053262804174`*^9}, { 3.5281053621319695`*^9, 3.52810554530536*^9}, {3.528105589819368*^9, 3.5281055908608656`*^9}, {3.528105644508006*^9, 3.528105664146245*^9}, { 3.5281058315970273`*^9, 3.528105836624256*^9}, {3.528105882069603*^9, 3.5281058887592225`*^9}, {3.528105997185131*^9, 3.5281060248549185`*^9}, { 3.528106116666938*^9, 3.5281061198214736`*^9}, {3.5281061557431264`*^9, 3.528106167379859*^9}, {3.528106235157318*^9, 3.5281062757256527`*^9}, { 3.528106307521373*^9, 3.5281063688796015`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetEvaluationDate", "[", "today", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SimpleQuoteSetValue", "[", RowBox[{"underlyingValue", ",", "100."}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"portfolioValue", "=", RowBox[{"w", ".", RowBox[{"Map", "[", RowBox[{"InstrumentNPV", ",", "pfo"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{"portfolioValue", ",", " ", RowBox[{"referenceValue", " ", "=", RowBox[{"InstrumentNPV", "[", "referenceOption", "]"}]}], ",", RowBox[{"portfolioValue", "-", " ", "referenceValue"}]}], "}"}]}], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{ "4.412194687874204`", ",", "4.260725872875961`", ",", "0.1514688149982435`"}], "}"}]], "Output", CellChangeTimes->{3.528106428605483*^9, 3.528106736868744*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"HedgePerformance", "[", RowBox[{"k_", ",", "Spot_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"pfo", ",", "w"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"innerMaturities", " ", "=", RowBox[{"CalendarAdvance", "[", RowBox[{"today", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "\"\\""}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "52", ",", "k"}], "}"}]}], "]"}]}], "]"}]}], ";", "\n", " ", RowBox[{"putn", " ", "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"EuropeanOption", "[", RowBox[{"lowerPayoff", ",", RowBox[{"EuropeanExercise", "[", "#", "]"}]}], "]"}], "&"}], " ", ",", "innerMaturities"}], "]"}]}], ";", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"InstrumentSetPricingEngine", "[", RowBox[{"#", ",", "europeanEngine"}], "]"}], "&"}], ",", "putn"}], "]"}], ";", "\n", " ", RowBox[{"pfo", " ", "=", " ", RowBox[{"Join", "[", RowBox[{"pfo0", ",", "putn"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", " ", "=", " ", RowBox[{"Join", "[", RowBox[{"w0", ",", " ", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"Length", "[", "putn", "]"}], "}"}]}], "]"}]}], "]"}]}], ";", "\n", " ", RowBox[{"SimpleQuoteSetValue", "[", RowBox[{"underlyingValue", ",", "barrier"}], "]"}], ";", "\n", RowBox[{"killdates", " ", "=", RowBox[{"Most", "[", "innerMaturities", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetEvaluationDate", "[", RowBox[{"killdates", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], " ", "]"}], ";", "\[IndentingNewLine]", RowBox[{"portfolioValue", "=", " ", RowBox[{"w", ".", RowBox[{"Map", "[", RowBox[{"InstrumentNPV", ",", "pfo"}], "]"}]}]}], ";", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], " ", "=", RowBox[{ RowBox[{"-", " ", "portfolioValue"}], "/", RowBox[{"InstrumentNPV", "[", RowBox[{"putn", "[", RowBox[{"[", RowBox[{"-", "i"}], "]"}], "]"}], "]"}]}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", "killdates", "]"}]}], "}"}]}], "]"}], RowBox[{"SetEvaluationDate", "[", "today", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SimpleQuoteSetValue", "[", RowBox[{"underlyingValue", ",", "Spot"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"portfolioValue", "=", RowBox[{"w", ".", RowBox[{"Map", "[", RowBox[{"InstrumentNPV", ",", "pfo"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"portfolioValue", ",", " ", RowBox[{"referenceValue", " ", "=", RowBox[{"InstrumentNPV", "[", "referenceOption", "]"}]}], ",", RowBox[{"portfolioValue", "-", " ", "referenceValue"}]}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.5281042916727247`*^9, 3.5281043466818237`*^9}, { 3.528104406517864*^9, 3.5281044152504206`*^9}, {3.5281044580820093`*^9, 3.528104468406856*^9}, {3.5281045482917247`*^9, 3.528104555772482*^9}, 3.528104596460989*^9, {3.5281046450308285`*^9, 3.528104656457259*^9}, { 3.528106188309955*^9, 3.5281062065061197`*^9}, {3.5281065822664366`*^9, 3.528106610036368*^9}, 3.5281066786450224`*^9, {3.5281067895845456`*^9, 3.528106814250013*^9}, 3.528106879523872*^9, {3.528106918680176*^9, 3.5281070968563805`*^9}, 3.5281071973108273`*^9, 3.5281072355758495`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"HedgePerformance", "[", RowBox[{"1", ",", "100"}], "]"}]], "Input", CellChangeTimes->{{3.528107216478389*^9, 3.5281072199734144`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "4.280913167478061`", ",", "4.260725872875961`", ",", "0.020187294602100003`"}], "}"}]], "Output", CellChangeTimes->{{3.5281072209548254`*^9, 3.5281072400823298`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"HedgePerformance", "[", RowBox[{"k", ",", "100"}], "]"}], "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "4"}], "}"}]}], "]"}], ",", RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}]], "Input", CellChangeTimes->{{3.5281071098450575`*^9, 3.528107171994424*^9}, { 3.528107259640453*^9, 3.5281072664001727`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[{{1., 0.020187294602100003`}, {2., 0.06604276036918666}, {3., 0.04865089500160824}, {4., 0.1514688149982435}}]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, PlotRange->{{0, 4.}, {0., 0.1514688149982435}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{{3.528107163061579*^9, 3.528107174247664*^9}, { 3.528107251859264*^9, 3.5281072691641474`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"res", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"HedgePerformance", "[", RowBox[{"k", ",", "S"}], "]"}], "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"S", ",", "80", ",", "120", ",", "10"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5281074317579455`*^9, 3.5281074329096017`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "0.03624233740581673`", ",", "0.03456698475675424`", ",", "0.020187294602100003`", ",", "0.009047999433915876`", ",", "0.0034292570142127055`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.11961539584592806`", ",", "0.11386858659883892`", ",", "0.06604276036918666`", ",", "0.029324831786017747`", ",", "0.010994954520336275`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.09598649400263959`", ",", "0.08649725194599522`", ",", "0.04865089500160824`", ",", "0.021143915460935858`", ",", "0.007801097058350637`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.29022852171423974`", ",", "0.26865837345817845`", ",", "0.1514688149982435`", ",", "0.06530435452306271`", ",", "0.02376322596138758`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.52810745304856*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot3D", "[", "res", "]"}]], "Input", CellChangeTimes->{{3.528107330542405*^9, 3.528107388505752*^9}, { 3.528107439248717*^9, 3.5281074396192493`*^9}}], Cell[BoxData[ Graphics3DBox[GraphicsComplex3DBox[CompressedData[" 1:eJxlWntcTGsXnqbbdJkxJPcYFI6S5H7dixNylBNC6DiVkMthfMopl2NLkZRS IYTRvZRK6V6mCAelIvfLuBxKx3eGRs2cYr6332/2nt+szz/75/HMWu9+3mev td69DfXZtmQdl8PhHNHjcPQ5zB85xV4VN8xWH03U/J0DLL5pQPi1yxc0OE+L r9vu9+/FOA0u1OIJrp+qDgVr8N5a3GXKiqy+W7T5NHloyexlVucrUV6CP9r9 au+ICpSXA+Dxd9qY5lyUl/xu4icbd+NzKC/B7+fUh4YcRHl5QK86ZR0TU4zy 8kD6k2vvHOtClJfwFR9saprTUV7y7+bpNtLU4ygvwfkNZmaKfSivEORznFMH xDaivEKQ/dD29vK4BpRXCBKu7wH3tddQXiHQB9rn/FmUi/ISXODXf+2yeA2u YPPTDattA1Yw+6vUritH/lOUiMG7tPyI0E0ZLRdQHKK/ff3vX6ESxSH3Ub7m dO2bChSHA9IFn8pTQhicC0x8UP7YMrzovAY3YHF60NJKKS9BgxuxuBR8Yn9Z FY/icCC342RDS59SFIcDsr4F15YZF6E4HBBOqb9S1ZGvwU2167n63UzRcEyD m7M4Z3y/X5/9E6nBBdp1fnBMrZsehuIQHWwlnLFW2SgO8XPKhjzupnQUh/BF Y30eFiZp8J7a+DuebY1fxPinl3Y9OQP1syODNLiFlv9x9cmquztQHA6I3hx6 2GP5KRSH7GPUsEN3kuNQHLJfgbu2CT5EoX3nQfTyg179O4rQvvNAsmRHgmR1 Edp3HuQu8no8UlqI9ovw29vbzhTno/0iz1ei5H6YSx7aL/I8JsStb5VmI515 IFMOe715bQrSmQfw7ZeEXi8vIJ0Jru+Y85+8BKQPD+r7d951mxGD9CH8nxOa q5MikT4k76Y5k9/VHUT6CCGr6/IV6bRGpI8Q/Aqtata/aUD6CMFaHPbAPLwB 6SOEwKs1O72T6pA+QnCwTbH55e1tpI8Qmk+EPPAYfhPpQ/I2toQHXpAifYTg 5fTKeurVMqQPqUtvP47fP70Q6SME4c1z81cNzkL6CEF0yM1kWG0q0oescz73 TstuXDcUlHRY7BT9P7KQPkpKmp5zuWlSPtKnixJJLf/MsC9G+igoSefh3T+U piB9lBREqrZEVWUgfboo2eCNa77ewv4h61pZ/6ieexLpQ9blOnZ+2spTSB+y rtlHC/fmnkH6kPv6YcT7LwcPIH2UFF30/eXwgyFIny4K5j565B4aivThgvCI Qc1+uhzpYwCSgJsT3nuXIn2MwMErPPmnH7E+XHCQrTTvUBUjfQxA1jx5qri2 AOljBNGfLde3SHKRPlyQhZ6kB/XMQvoYAKxenvdicSrSxwgkDpZvzsVIkD5c iFba114NiUf6GICoXOxvy41F+hiBl9p3sr06HOljCrI++VT9vSqkjznQdP/f Viy/ifQRgOjjvtMvn99F+piCl6o1eowr7hfk/tLD+VkBlUgfAbhd7D3X8ucq pI8piKa27A00vYj0MQfp3o9NtnbZSB8BeFW3jnnlmoP0MQWJefwbvyUnkD7m APyw8z2/n0D6CEDGD/QszWB8y8wPbZT8vX7vSz9nILydkue1L3LZmYtwFeUn bo2tcipAOHle7GWPJ1nguUhNeXx6YJX1mqkbzDzTRonnhKvcozIR3k6Jb6Xu GOmch3AVlb4tbFOy8xWEk7x9NnkPXVCCcDXVr3Khx7kFeA5so8C39vKLoLMI b6ekeXF/yIYnIVxFeeVVD28MT0M48Uue/Na1zxcRrqbcPHoUrbLDc2YbJeHy hvAXhyO8nZJM8B5lxz+GcBUl3zCrquEznpNJHTgzcNXvD+MRrqai65RfBpUx fYqZ69ooTl3uOLdnOxDeTnF21ky+nRmEcBXFGfx0ptOufQgn97u2Y+irZDyf qylOkZ5NQkQo2nc9aDbsY+Q0r1wXp7kQsvAb9elrKeKT5/rYu6ATKSWIbwjl D+/kU8uwr4zBY1D+p2aDIrTveiA9affPkRcVujjJKzHlPxxXVo74BkDv/VT+ KB75k+T1ktcm7d1ZivjGAGsvhQ93L0H7rge0i+vcgpW5ujjJKw2o8OkyzkF8 kneJbFq0ZzbiGwKM1bewzsO+MibnhRGtRYaZaN/1QBb1LmV2Z4IuTvI6xD/6 y2bjGcQneSW3bUwfnUJ8Q6hPr1j3XyfsK2MQ5eWmNF4+gfZdD8Qty29OzA/V xUnefkcWl8wMCkF8A5DauVycSx1AfEPwq5t31tUQ+8oYhOLZUcvu0MgPPIgA w+f1AuQTUg+V0Sf6n3kvRXwzyNw/uqZ2bg3i88HzP5ViTsqfiC8Awdolg8Yb 1CE/8CCu6fXFsZdwHTMFv6QXohC6GvHNwMjz9mb5DzcRnw/JvYsKPe/fQXwB XHjfQPvOqkd+IHNjgI+CPz4L+YH0k2/NYxW8fMQ3A+FVyTpvZRHi80G03+NM 3YdyxBdA/NCw5rOtUuQHHojszPzn7cJ+MAWYdzpnyy4J4puBuN3eprAoGfH5 IEm9dlqtQOdfkrd+uYdwgWM28gMPmtWF0T3/zw+kb24ZljdxRBjim4HH48iG lfOPIj4fnBO7lLMmxCC+AHw9HE0anJhzt5q9pi9+8ySsWbO/tDEwuPn6yhbY oHmu6R4szgm0DD+3XdNHpBYsHp0TFFPixMz539m6Edi0+XnX+CL278y1vtVE tdCS0aEHi0smtSi+r9M8v7QFi8urU1+e2sM8d99Y/4SFPFlHz9L4ljZi79d6 f3pvmwdVLI/lW/yt7/JQU5fAgsV5goIjyQ+YOaGNvQr7eo3pz2XqTzt7FZ7d k9ZaytQ9FXuNt19QfNtfMyfQesDEmdLXXv1zMeMTfWDiiK/P9n9eoemzNDNf kb6/fVmL3zVNXtqEjcNJUE4f+BtTl8zYOJz7+3rMsNf4ljZn43BMjd96/qOp e1JtX3YzkqeNmK+pS3RPNo5EHONzxEhTx6AXG0f+dIKVvIapb1/YvnPLcnjk vSim73xl+07B3K+yp0qmbnSy/SUi5VTY59vF7O+Z6+NnHwOmCcvY3zNXT59j K5r+W8T+nrn6bns5wCyLmZdM2DgOA6c0l8kvafimbJwp02/edbnA6Mln4zjv /uv4Vq7mfQ6t7S+3+hxVmczT+BB6snH8N6oLB1hrfCLtxcaJt7q+NlDKnH8/ s/XTLcqlrGkZo0MHWyf7vb964YqCqc//snXS7cpd/TP9NedWWlv//dr98+vs GR00/umuA10+WyM2M/pr9CFx0tV/p3x1krLrYK7pc5s7x23PYNfBXOPtPqor k7LYdTBXoah1v+FMjZ6grZOjzN+5ZzZo6om0JxunH99FPPK+xp90LzZONJ/z /a+lzPPFnFPaKYflE0+oW3IRTubtb30i93wsQHgXJUlWHlB9LEa4mnq88Omu na34PKiiRh1JyXGPKEB4F+XleCi1IaIY4Woq/onf2UWR5SyPwT02dFwdMZbB ucCsH5JtgsW1mQgndSDa+OCYiXkI76KEP3fdTtS/gnA1Fcb/3KNfIz6Hqqho 7/lyx4VZCCfz8LZ+FQJFHsLVVPEYPjekmolvxOLNrj8o/rl8me3fzPppj+I1 fq8TEK6iZLbhD1IeJSK8i6Jti4NOzkpDuJoS2b4ffDgFn+9UlNQlybTNOQHh RNfUfaM3H0lEuJqSpGTf8/yCz8skviiAdqAYvrZe0dc68u4VhSFcRQktn2yP hGiEk313LjQdbxOHcDWVuzs26bEJPneTc1DIB6eYwYcQTtbfemHniw9HEa6m 6kfZu8d54HO6mpJdPGYiWcTUBwVb53KN/u1ZMqRcFyf7GR30VLnmWyniG4L4 79JXBs9KEN8Y3H49cyOzGPmZ8OnmtIERVIkuTvheq8O4jlYMv4vFxSsCZpXs Z/o1F5h1+nakDnl6GL8/Ib6beXTlgamYbwgJwQGxdi3Y58Yw5ZZnbVN8AXuf DH+P/ZAd/ffi95zG0M/fKLvajvGtEYvLKa/+v+5nzhfaOi/apbRKCr6oi3e/ z1k+sH3SowzENwTJ+Fl1t23TEZ/oI/ROXUMzPjRn+ZwpQYe3pybr4oQv7Z3g bdjJ+FPA4uB4aapHK/OdRdtHOKmjIwu/n9TFyTrdLlnVnt5yAvHJOguF/H1P sW+JDpX6rmudGb9p+5H4+tqCHuJjujjh06eymz+UMe+rtfOV6MrSySYfwpDf zOCPe+fDZwTdQH7jw6CwiKb0YXcQXwClECSyvHsP+Y0PcZ3eCsX227o44TsW LKK8BzL8LhbPHGm9JntTHfKVGfh8MvH/M7QK+YoPvV+eHdL1rgbxBXCjbtwd e6fbyFd8uLtgb12HdbUuTvh/TOu5a3TIDV2/EXxSqnzUiOvVyD9mIFmT5Z/h j+sqH3JFvpl9fIsQXwDSNwNlB5aWI//wAaTbStbI8pDfBOAWPPKfO/cKdX1F cNnQ8d8t2Pf/2v7L+a2qtvMu8lv3etYHeN5MQt9NuuP0MW0Uvk5DPuED7bpo xuCUBOQrAcgflsU+jkrU9U/3fG3/LBP2nkY+aaPEi+Ze+VWRgfzQRsltnz4I qsA4mYcfeI91zM7V9UN3HJNtitiDGQgn88OPdtTVY5hP5me9oSETvAqQT9oo aee9UwfmJCM/tFGyyBUGSzYnIpz0l8jQjB8bU3X90D2Hi15tFcVJEE7m5yH8 3r06kxGuomDI9BJ9H1R/SJzoL8+STxUeR35oo+pdNjrHPo9BeDsloue9nlJ1 QtcP3eeUtPbWCG40wtspr6f3Qxw/xCJcReXy86we38H1h+jDD5xmEhWM/EDu d4WDychf8Pc1os++xENuJ4J1/UD4dIz47PQE/N2N8KeFJl3ZvA/hRJ/Pdx+c PBuM/KMH6Z6bzpV5VSCf6IHfR6U0lotwmgsGDrJ/Z1wuQ37Qg1GBh95uTkZz HeFfr9hqZemO+Qbgpb98RaU++o5A6mqX88xjG/JxH9QDeatyqzisBPlHD0Tm lt7PAwt1cZKX3jXCdUQSntP0wM1u3FLnjfm6OOHnnp5DxcTiPmgAQhN32+cV 6Dtgd/3/fV3fEc34O4UeiB+fkdqcxN8pyPqXrN2uepumi5O8/R55HmsdkIb8 Q+LUjh5W65CkixN+/GLrOVc34D5oANImK5+8c+g7I1ln88q+wUlN+DuIHnj8 9qxhwyc8j+lB4ICdwcNnxOniJK/L5h27R57Hcxc5D0YNXV9pifod4T92GORx 4xn+XmkAdGOfn+ouRCC+IYzy7znj4YYjqN/xwNNl1qjprxmfKFl8i7Otb/Vc hJN9aI7LeGERjL7LkLp9OnTm4Xmva5DfeLDHqZ9kQWaJLk7iyHtJdq+YUIX4 ZpCoP2FkeCyKQ+q5u+JmY/kX5r0fF5j4bpMnrJb+wvjQgMUd3r6Ylv35si7e /R4s5bh4wOsixDcDtw2uqYfqmefLiI0jjDo04HRori7e/V5rMeVmHID8T+I4 WHSE+vuWIj7pj02Xyl4vvYr6KQ/kYe68sbV4TiP3FRl1rWl+ki5OfkfPtJ46 JBT73AxyPxVf8qtm5kYBG8dr+PFvypDzunj397XZvypq1Nj/ZiD80raxx0z8 /xbI+hPDXnnsYp47pv/yIGS5T+PD2Xh+I+f0W5va6i5F6eIkr3hA62HVB/T9 neSNqBedPqJk+ogFG8f5nXCO/EmYLt6tg9sen96dRxHfDDxf7pg96GgM4vMh MC5j8aVzx6n/Abti55o= "], {{ {EdgeForm[None], GraphicsGroup3DBox[{Polygon3DBox[CompressedData[" 1:eJwt1ElsjlEUxvF7aagWjRJhIYiQCImQCGlCJCiqtD60ihYdlKBdVFKJJoKG BQsWNizYWLCwMY8taqp5qJopFhIWEhYSFv5P7rP45ZzcvN9773vOud/o6sZM Q68Qwlr0xj8sRieavHYb25CFeyiLISwlPsIvFOEsNkLvuqn38cwK4nOUki8h PkAxeYnfX0G+nPhE+5CXEs/jLxbhHLbGdLa3yPG+F5BPXu73D/VeL3ASA9GD Q84vIXjf+xhBvorYjdMYgja0sF5D/IAMeYb4EHk+51PU+7cvUUe+ktiF31iI O9jOejXxPY6gv8+/m/U64if8US1wFz+xALcUY/p2rf/AfHTgGwpxAwfRz/sO 4/kKf2Mz+TriO+wlryd+RkP6/NCOkSSriZexg7yW+FHPo497tB/ZeIZBPFNG vIhjyMUr7EJfPEYjz1QRX6uGPpt6dwAD/NvvmIczmOD6XMV4n1m1Gku+hngF w11b1XmSz6m6lZMv874T3S+d/7j3Uu8qfWb1qyCmul3HOM+S6jOFfL3rM9W1 +oIt/i6dcydyQprJVj+vuWp2fTTzk93TaxhFXuk6jHFN3mAf+Qa/v8pzq9oW xXTXdKf2eE4029NZn+t+zYipbur7JvdOc5vrOujuTPP7NcMlvkea81kxzZXm 5zDy3PfCmGZPszonprnVHT+BfPfla0hnUN2yfH91Fzb7GzUDM2OaT9332TH9 D2iGm9xHfftRzZB7egqDXats3y/9h9R6hnV//wOumI7T "]], Polygon3DBox[CompressedData[" 1:eJxNl3f00GMUxu+3VBrapSLtEpVEQ0P9MlIUSkYZKaM9tbcGlb2dIkSJzEP2 OBwOx94cTk4OpRIySvbzOffp1B/Pee973/m99z73vt9GQ8f1H1sqIn4W9hPe FsoKdYTTiohX1TJ+kHCs+q+rLS00Eo5X/02vayH0UX+D2gOEo4RZ6j+ntorQ SWig/ka1lYUOwkL1xwhtJB8hjJc8WmgdqWPsMqGt5COFyUUCuZ0wrcgzOftQ 4WTJL6qtIZSwRv3n1VYTugjN1H9JbU3uLnRU/wW11fk24XD1ZwtHS24vzCvy G/gWdIxxBme1FPpKvkBoJrm5cKHk84WmkTrGPlS7f6SOsbOFBpIbCoMknyUc Eqlj7GLhMO4iXFIkkFsJwyWfLtSVXE8YUKSP8BU6xr5UWynSZtjuPbXlIs/g rJfVqola+ETCJ2rLR57J2ZvUfid8L2wRdgq/C38Iu4VffFf2+0n4Udju+Nkh /Olv53t3CZsj92Svrfus2eG9dvmM3V5bTncoK+wvlBdK+fu533+ROmKj9T5z ywj9I9cg7ye8E6mr6njBHpUlVxIqCu+rP5BYtQ65SpFz0CGz9kDHAzFQC18J HR2/B0uuhz+ET9UfDE+sQ65PLAidJR8jNC5yDXPqe68aQnXhI/xPbFqHXLvI M9HV9l3Yo5HQxHu3gS/CEfDE6KG13SPH/lX7T6TTC2IXvggtiTO+jfgW2gsd rOum6V0j56I7TnLPyLmfq61o+8NVfMIZhX21xbHzitDLPic26zgWhjgu4fEU 4Qv1zxPGSh5XpDzaeQHdV17D3KnCItuffHKl5GGRHIWbc4rMKfiGOcx90vyD b78KT5gP8Geb8ExkviKfVNP8p80f8lEF9Z+NzFfkgzrqP4U+ko+l1V9v/sD/ v4SvI+/EXebC38g7cZfFwjeROuQrhAmSx5tzmyyPE761bpQwUvjBPNvmu9e1 bbeaW708NjFyz02292jvsd2822xflPXcyfhD+C2S53ASbvaxvZDh9mvWwd9D bMMxnoNtG8RePje1zafiN5/B3ju9ZrTvwl7UkEZqGwsnFGlDbEkOIR90hzNq 6wsljn+4VFW4V7hbuCsyLomdxfg9ksNwmT3Zuwk2Mv862Kc3R8Y4sU6NWBlZ ozo5fuDnjWpviOQ4vL5D8orImGyu/p2RuubmFXveFMlxzmLu8si8PMRj7FnP eQB+k1uIwesiY5BYJGeRf65Ve01kTiAPEIPEIjmJfIBPjivSxtgazsN9atra SA7BJWrrhCJrCLFLDN8ijLAO+dZInsFNaut0c26K5RneB25U8ndxZ+5Y09+C z8jlfSN9OUm6ibYbtproe6yw3SZ4z+W2K996dWRO5JupydRmchK5Cd8ujMzZ +Hil923h3EZMrIrMkcRKF/Jm5BtmhHCPY4ZYaaixpWqXRNYNasmySB0y9aWr 92AtPOxM/FnHGLbvWSSH8MHDwkOROZV8Sb7p5Zgn9rt5HXuN8hi6UZ7DXsT5 pMg9uduVkTWtjMfgAm8w5lSwP6iJ1MYeRXKmxPeaKf2MyBqwJ09TC95Sc1pk DiMeqLHkb95IvJWoWdSXVbYZtsKmsyL3ZC9y/2eRtW4k31DkWdOFv30mc6jd 5EjWwsm2jp/F9uWCyJpcyTantlBjlvlO3HnPXXmz8XajJlGbsPU6oV2RNqeG jHWMEWuMPRiZc9vZJ9SyGvbVQPXPKPIO3OXjyNo7TLqLipSHqB1apA6Zd92F 1tE29/ddL5xS5BuRt2E/r2EeOQTerzc3ZtoezOMtWUaYbTvCSbh4m7BGWB1Z U1pJ31s4qUgbY2tk8to02x2ZXMebfJrP6m2/cOaeO3NX7nS/z2Dv1v5m7sxd yVXL4IjwmOTHY29OJ5eT6+FC7UiOwQnelLwta3uMfwb+HcjhxCW5gbfkG77b 4CLfwVdF8v7cInXI5IIPIt9m6M8TzizSZ/iKXICOMeaSh/Al7+LLHVfnFPmu HuR9B1o32OvQN4ysV9xhrW2CLcil70a+Iwf67H72Lb6aE3kW9Zh6yJnYaonw aKTNeKNQT/gHeiRyDB0ycxZwV8cpsUyeJffeZ7/PL/I/5AHHMW+GxT5jqeVF 3nOJOUgMETu3ew1rN5oDcPVSxxjzyOmcudpxwNnUH+oRd5jpOWtsF/6pSiLf mLw1eV/1cUwQG9yV+lTZ5672Phscw7yf4PI8vs3yqVoz17oTi6zZvRzn3JV/ oOG+M28q3lbzbbf+Rf73DDCPGZttm+2ZQ4sd1vksfIjv5tq3/b0WH/8PG1Z7 Xg== "]], Polygon3DBox[CompressedData[" 1:eJwt0zdoV0EcB/D3RMEyWAaNgyXYsJGoWLGhJiRGEpOIMaKJhsRYIH9QwTYI CRYsWNBBB1110EEXe++9i6IoFnBQcFBwUPBzvBs+/L5398rdvXv5DbmqlnZJ khTSgYFpkgzgrVzPIPm3+ovbzOEPX/nCVYr5xhjXjuaT3MxY+Yf6nRuU8pOb MU83PoOZDGEw7/QvZag8khF80G6kQB6WZmPvtRsYLhem2dhH7SZGyfn05412 XZKtKcy1iAnyRCbRi5680F9LnnwtrimMT2ZK3I/wnJy8mjVxDmGu6+SNbOJC 3LcwfkQ9yp24b8X6Sihlt/YunlFDD33n1UWskg+ph+kmd+WpPJ/u8qW4zjb5 hHqSi3E/whyOqcc5G+9ZrG+PupdzcZ2N+g6oBzlDdbhW3xZ1K/epCPPWV05F 3N/wHTbLrWn2/s/xW2+Td7CTcWn27cPYcsbLfenD67jGfvI9tZzZclmavatN u5XHzKOLvk505FGcZ2d5e3gnD6ikfZqdsRKmytPS7Hz90/6bZO8K60n0rVRW cD1eH87nfvbxkoX0dt0GdT134zzDc3K0cCWepfAPvIr3NLlnGc08jPOaK1dS xZO4php5AbU8j9+/Tq5nSZr9Z2XMkovS7NysDWeKW3Es/I+X4/6GPT+lnuY/ hHBx5w== "]]}]}, {}, {}, {}, {}}, { {GrayLevel[0], Line3DBox[{21, 1, 110, 111, 112, 113, 114, 6, 135, 136, 137, 138, 139, 11, 160, 161, 162, 163, 164, 16, 57, 58, 59, 17, 60, 61, 62, 18, 63, 64, 65, 19, 66, 67, 68, 20, 179, 178, 177, 176, 175, 15, 154, 153, 152, 151, 150, 10, 129, 128, 127, 126, 125, 5, 41, 40, 39, 4, 35, 34, 33, 3, 29, 28, 27, 2, 23, 22, 21}]}, { Line3DBox[{114, 231, 234, 235, 180, 109, 239, 242, 243, 181, 119, 247, 250, 251, 182, 124, 255, 258, 259, 183, 129}], Line3DBox[{125, 333, 331, 330, 201, 120, 327, 325, 324, 198, 115, 321, 319, 318, 195, 105, 315, 313, 312, 192, 110}], Line3DBox[{139, 263, 265, 266, 184, 134, 270, 272, 273, 185, 144, 277, 279, 280, 186, 149, 284, 286, 287, 187, 154}], Line3DBox[{150, 360, 358, 357, 213, 145, 353, 351, 350, 210, 140, 346, 344, 343, 207, 130, 339, 337, 336, 204, 135}], Line3DBox[{164, 290, 292, 293, 188, 159, 296, 298, 299, 189, 169, 302, 304, 305, 190, 174, 308, 310, 311, 191, 179}], Line3DBox[{175, 392, 389, 388, 225, 170, 384, 381, 380, 222, 165, 376, 373, 372, 219, 155, 368, 365, 364, 216, 160}], Line3DBox[{111, 228, 193, 314, 316, 106, 236, 196, 320, 322, 116, 244, 199, 326, 328, 121, 252, 202, 332, 334, 126}], Line3DBox[{112, 229, 232, 194, 317, 107, 237, 240, 197, 323, 117, 245, 248, 200, 329, 122, 253, 256, 203, 335, 127}], Line3DBox[{113, 230, 233, 71, 108, 238, 241, 74, 118, 246, 249, 77, 123, 254, 257, 80, 128}], Line3DBox[{136, 260, 205, 338, 340, 131, 267, 208, 345, 347, 141, 274, 211, 352, 354, 146, 281, 214, 359, 361, 151}], Line3DBox[{137, 261, 82, 341, 132, 268, 85, 348, 142, 275, 88, 355, 147, 282, 91, 362, 152}], Line3DBox[{138, 262, 264, 206, 342, 133, 269, 271, 209, 349, 143, 276, 278, 212, 356, 148, 283, 285, 215, 363, 153}], Line3DBox[{161, 93, 366, 369, 156, 96, 374, 377, 166, 99, 382, 385, 171, 102, 390, 393, 176}], Line3DBox[{162, 288, 217, 367, 370, 157, 294, 220, 375, 378, 167, 300, 223, 383, 386, 172, 306, 226, 391, 394, 177}], Line3DBox[{163, 289, 291, 218, 371, 158, 295, 297, 221, 379, 168, 301, 303, 224, 387, 173, 307, 309, 227, 395, 178}]}, { Line3DBox[{21, 312, 69, 228, 229, 230, 231, 24, 336, 81, 260, 261, 262, 263, 45, 364, 93, 288, 289, 290, 57}], Line3DBox[{2, 105, 106, 107, 108, 109, 7, 130, 131, 132, 133, 134, 12, 155, 156, 157, 158, 159, 17}], Line3DBox[{27, 318, 72, 236, 237, 238, 239, 30, 343, 84, 267, 268, 269, 270, 48, 372, 96, 294, 295, 296, 60}], Line3DBox[{3, 115, 116, 117, 118, 119, 8, 140, 141, 142, 143, 144, 13, 165, 166, 167, 168, 169, 18}], Line3DBox[{33, 324, 75, 244, 245, 246, 247, 36, 350, 87, 274, 275, 276, 277, 51, 380, 99, 300, 301, 302, 63}], Line3DBox[{4, 120, 121, 122, 123, 124, 9, 145, 146, 147, 148, 149, 14, 170, 171, 172, 173, 174, 19}], Line3DBox[{39, 330, 78, 252, 253, 254, 255, 42, 357, 90, 281, 282, 283, 284, 54, 388, 102, 306, 307, 308, 66}], Line3DBox[{59, 293, 95, 371, 370, 369, 368, 47, 266, 83, 342, 341, 340, 339, 26, 235, 71, 317, 316, 315, 23}], Line3DBox[{62, 299, 98, 379, 378, 377, 376, 50, 273, 86, 349, 348, 347, 346, 32, 243, 74, 323, 322, 321, 29}], Line3DBox[{65, 305, 101, 387, 386, 385, 384, 53, 280, 89, 356, 355, 354, 353, 38, 251, 77, 329, 328, 327, 35}], Line3DBox[{68, 311, 104, 395, 394, 393, 392, 56, 287, 92, 363, 362, 361, 360, 44, 259, 80, 335, 334, 333, 41}], Line3DBox[{22, 313, 314, 70, 232, 233, 234, 25, 337, 338, 82, 264, 265, 46, 365, 366, 367, 94, 291, 292, 58}], Line3DBox[{28, 319, 320, 73, 240, 241, 242, 31, 344, 345, 85, 271, 272, 49, 373, 374, 375, 97, 297, 298, 61}], Line3DBox[{34, 325, 326, 76, 248, 249, 250, 37, 351, 352, 88, 278, 279, 52, 381, 382, 383, 100, 303, 304, 64}], Line3DBox[{40, 331, 332, 79, 256, 257, 258, 43, 358, 359, 91, 285, 286, 55, 389, 390, 391, 103, 309, 310, 67}]}, {}, {}}}, VertexNormals->CompressedData[" 1:eJwVWXc81m8UNUJK/bRoCJVKaWiIkJuisrJSiqIiq8yUkb33i9der733SMIV skOREhENJbzZIvo9/dXncz4+9/s85557zn3edt0xU9NnYmBg8GNkYGD+929z taeioimcLPix62dNCbLHffi4+IUOZ6UoMcyVYXDt7LbaL/qFOPbY6pXITzok 0x569omGwd2ae2mO3Mn4+6oX3XeBDvbbbW0dprzAbIWdWmxCQdP2+uk7K3T4 IBFdZsz8GC50pV3q++OI71LeDCX9pYPm9Wm992lP4AR3vqnPpAe681+9fIXg j0N1ntkyR0E1g+CF9C+xuDK+6a/8Ih0SKWtSR5YSQf+Uv+3X1jD81HXBhus3 He631bOVzYSD7ZHK362tnqjSzsdktkyHVIfz4bf7/CHfqNI4440znr6rwvGD nGfxUDqPrpkfTOs1nfUsqMJAq165pUY66GsJMZncS4IIxaCtwpoFaJ/f/W3p Bx169sup6nilAS0k41fN6wT0zs3etWOGDnS7uDrtSzHwucBWhm2NN6ZIKP31 /EOHFl6/+7srAoHnl6iA4trrGDn72GkDuZcWTXXGMTcMhAMt9lbfa8KUVZLa Xw3ooDYy7LbYmAFhLePji/caMUjdyXD/fTqwxYd88lEoAYbswyrjajWY/DCl kyeZDknOJ1aFaGVBZ5THKhWJAhwzd/qWSPr16570lU7OWPgcZjs/VB2P/1VS L4sTfpgPbxx19ncGP44QMb3RYnRj6I8a+UaH5pz814MePnDXtty3ZFMx3g79 nhf2nQ7eG6WLfSEYXkxdogxIFmH5+gUullE65D6HM6lnveCLWW/axEgg9ntZ MPgSPpm/gfhHLgqcmznutJ4eitdVaTn/+Hf1ED0sG0CFfB5H499GkWirdV6D hfBjYRM7+CgmDD6us+wwGszDqWvzZ2XodFjTGs0XbhcGDQlJkW5TWRiTfFDt 3RQdfl+4wX3nehh0OWH8YZZ03GO+6/vELB2WjgW/yaqJAYqR8Ldg3hic7t3Q spPoxCG0WbbVIR7kj5xQMNKMQvMAe8U+wkNTmY3Q/TgaFJ90Fj8aEoFvfK08 3Qgusu/SFcvvIWCuMMGroEPDG9rBbUakToZ/Bn6IpMBqM6ayPqUY7HlX+pKJ nL9y4OFTsRB/mOUc8h3sD0OLLp1uDXLf3mNJOxK0aIBfTrx3Px6KLpMCqbqk ju3GFF7PR3EgM8wZzBFFwcqS9l3eS3Rw1l6jkCMSDTsj+qsY//rhNb/1Y/6k /vGuMK3rPe4wpH67Q8LFH01kdik2EZ71xT5RD1a4wOO6G+8ZhbyxvKf+Hh/R VWX8a4tvEg4QLCopWNnthhrbDM4bEtxEpyx/5Q0V9tIqLwYoeeDpmP6ufnLO orVvVp0tDIHfHTPKFzvcsPvqpPlZUp+nQJLDPogCPZuUmxdVXBGY9vdGEXx6 6TaDo2MosEZFMTlqV+Cfk1MRs2/osCApi2EyUSByQv/qT9anuO6cTrFcPx18 +LZvd2dPgJPqvF6cBcVY/b2rYO4zHcSrli4KmyVDyQzfwkWnHJQ85fLw7jgd RLNmwhMep8Dg+kcsEUoZKKzH813kFx3ednHnFTqlwk1d93LjHSl4ual6vxXR w7i476ORyylwVvjLOcbBaOSQ7RypmKPDN5WLJ49xJUHivQcWP36GYQ2TgRAT 6e/mg1refhUJMM2vsTZwgYJivp2ffpG+HPS9lZ+rFAnVXEb+Sx2uKMsT/0KT 8KO+yq/9s1oY2F+sMC0QssdfkoFb1xIeHpu/d2fWDAGpt+mTck/NUUr/NVM8 wXfQo5oy02Lh75mDNjL7m5CeIfWKYkSHgem92Q0diZB6iSvIbqQRT6+xWuw2 psOQgHsMs2IqbLHzTbqd3oi+zPEfCk3oEHOyRzOgOgem8MjixpSX6GJ9K3f2 CfGNS8eO114vgHMtX7enDdZhTohl7TM/4mNi97Sl1IvAnrFI6NO2Wixg3/nT IpL48OEX7EqeReDfUvwoNrASc/feTjn3lMzLOZaih1gAA/JjKk0Py1FdXptt pInUt+yUfTCRC+JH3nl90CzBCQFpU7b3dHAKYX9ecTEdpJc1WhaP5eCziUnD LcT/Yzn4vgidSIH2sxk2VmPp6EErfZNF+vW5VTaZhTcRWIaT0k+lJePevA99 t8mcZrRWKjw85gq/+ldy1HUL8XBVukfTGOm7qImCRYc/BBjPHVdfzkbfQZOD v0h/1zk5JO4oCwUdO+FeHbFUvCj0lt9ing5P9unnGChGQQY/q81CVw5qpTus cibf3fiTorbQFwsatQ2j3R/SMG9xZ2Uo8eeBMa4XZ0VocE64h176iYYGrefi zUmd9pdlcQ/Sw+A4a5WdpEMCHlZTZ1UgegjuF5ut4woHeUmH3Zytkeg/P72l kMzps6lDpf0e4SB4MNGXujUEuSQvcFWROfXza/1Qc8gHgt10r5zv8ce7QT8T g//NEZtH9vI9X9h66bMT11tv9DjZ6PuU4K/QyPhEoh/0te9TGe5yR8Hqc3nd BJ/U3yQcsD8AjJ+Ux45TI/GOwrotHaT+Y0NGT5PlMCg2MBwS25qMbYuC/EYk ZztZtQqW9ePgjbcq/39fM9Fhr0robsJbD6M+hLLGA18kC6sILQ4/1mcxcxD9 t53QUK51T4SPMa/0qFrxyDdDK44iPIzuLhjmZ00BjiNZ8XVcCThaX75hhvQr Mp750ppvNDirXfrg7I1Q/C9pR95Gwo9C6nijNC0BYnbvbPf/TsHo1CGX3wQX UZLiu/4wDoby6niix/1RlD94qoXwNlfgNji4Pgys/BK9zw+54BmBu8EzZL6i VfwGlwRDYal5quDGuC3avNbsuUd48J6Rw7Xng6F/9dmnO7aao4mSU+dLghsP Vf0dKwiHb4o/ZlVWarCgPjDyYSkdOKK55oczEmDg9N7Xf3bXoWhWy/J8Ah0+ fmhSEFROgdZwqZzfsi/xeVxbn5cX8Qed1g1r5tIhS/enTIBpCdoEKXX0E7/6 YnRf/ItbLngNzPBqupWjj7YjQ04b8YHigpEwr0Iwzvpg/TusEs8vp+wzeUYH XdlY87UO6fBtL7PNe44UNI0tS98ySQdLAacYVcsMWNd42cZbOAMd84VDnIi/ aWTHKQoZZALPhhytbvUcNDQumtYke0XBpIpUkR3Jrx2qsXHFFPxKCS2YJbyB 1wOZ4ZwY2HpgD9f+O2GosG27jRjBe1UETMcGYkC1R8IknDMah/oGrioT/gf/ c/DfcSMc3h6QHfy9lIfHzW82s5E8HRfdJ/p1PhxSRW4LJgplY9QvqSQ9opMd LGnHboZFwK1nG69330jHs9ymUoqk7xJ39bY4H4+E1YHHLTJ8ktF7Sd6nmujk pq2Gk3xHJIgcbRnVM0/AA6bSVs+Jrn7gqYyVfAvwSjtRyn2nEKN3bmRZRe57 o05xQfL0Q7jKEh9vuyoHFxP6+WnTZJ/58MG29MUj0HnN4it4PhVjQzbbtRM9 P8o75iEpZwucTnUXdRnjcNuNMN9Aov98R9fAtA57yJBf0d44F4h8YbeXB4ke eL3SKjn/RACmUNfeDEzEd7sXueikTnyIl/SxmmioXHad2ctCQ96L37ceI+e8 VcyTJuYeBzsvluQ+nY/F/CXFGRWC377fdWaDAA3uhWxRZfoahYOfKRmXCW6q /PHArEciHC1yQeE34Xhpk6/IQYIvh/kXfeT0h7yVx4HKs4G4qOvzQIGcR/3F TkoMNwUu+T1hO7wpAJl5HqcdIHjh6tef6/aFgOWBXjuGY34oJkuJXyb6N90w 2fNNhAoeMiqdLZd9cHL5k0YjwQdOb7rPLBsO3M9y6f73vfDIeac2T4KzKTn8 2uLhAJevyeY8eeKEfxikQvxIvt/U9WbTYXaFa7JGc1v/OOEn+QW6KcEFIjSf Cct4gFRmDPP7M84o8mXVkiLBB44MnPnr7g27tU0GaQ7OWNljVLyX4I0qci+b X/pBWHr5yr0qZ7zYfXTbb3L+Wa0jVQcdomG3/4qTUQUNX8m8Ex0mPNMifo3Y FsdC5f2dNhb7UjDL41qxKcnfIMeMNOsf8VCQVTx5ISQdGwPeRoaSvoejb4xP EA0S1n6X613Owth++qQK8e3tC5zje7ISYeFA2yC3UR6q951oSyO5kFEqe717 ygnuWjZY1FpH4lgcdBgRHiZ76yI9LFyhOSni6uPrxOeDXMf7iD7t17xj2/Hd HXKWlMeoZB821tcT5yL6Vxy5VtKi7QVHv3yIEJMrRXea5dJWsod8m4q+LNLh A9lmOas/X6lAnf8Om33tInv71DvJOwFJMKOco53PEYFPv/Vv8yP3bTW55kk1 SIau4uqed+ORqMt44HI++e6fFD9LlE4B6ZHKC/Pt0ah/6Ud8A+FByMLBYXhH KnzNyfLhKIhF14AojtdkvmT8pPYsz6YCd1n4E67gePwj9jKineSU/9R1w0NO ERAcuP4zddoTGc7Mbr1C7lvRk3jq4+VIYOybeCx91Av3aTrEHiS4MZ1nbQBv FNiwveIaN/ZCZb2Fxr9kXqZCS95LTEQBn/K35xFpXmj91TCmi+D7JNRCflRF wy4Om7vSw1444/uaK43gJnt0zKW4A0D5nPca1tOO+L5BX32a9D1Qv+oMm0UA rD80KhbCZYurJqYn/xJ8njbP8KolAM7Ipa3bMWOFWjIiIuxEPyMKY9lBAoGw PHgg/1zyA6w4un/nfwT3fW0nrOwYCDWr+VoVbt3FhwJNmf/eQR/Sch4EtydB z4vfbr7SRWjLlNEa9ZX4cOpUQxFLCmStz9V1W36KzqPbh9Lf0iGOO/qThXgq CA/H5dk8rcIHed77vV4Q/kPyKin30yDhZ4CGwNMXGCxl4Xk6k7wTR89dehOT DgZRcbuNKPV4VtjUr9afDmanqbs1zPzhl3/vSvbnavybEDN/vY4OR+aq2bxN gyCtoCBRROoF+nocWatVQvZDTL5y8FQwmLH2tHex16GD5VnRUvL+Ojxz2wVK QsA1INXDv7seqyQ7rY2C6WD4qD1J/xgV7G+/H5KIb0AO5s9Mtg50OPOMqi+V lQ6s3X+lQhiS8UbsfblIkhfPzUJuMmzMhrFAvrdil3KQaT5OfhV5f4kVsUWk P86DvmfWldBYhAVO9D86fWTvEmRh0xovgDGxxF42o6doGMS2NaeVDisXRgWv xRWBm/GZvObVlajrGSAyWk4Hub75L38HY+Hh4om6zvRAZJL0Y+kiOaI53jug 3EUD65T0zsGzUeiE7bu3EH/rfFwvLXEqGe4naCnVhyfi4i6l23pEt1+f9Q+k RaaCeVh8Z7l/GmrYcnTWkPmtOXzY9fFiOuwJF/u62TUbrx0tCj1I9kOb0757 TAQpUPd6w58JHhOkSoib0Il+ht9Q/U18yTvrhSBPb7kL+pUE510neO0n7ST5 MSpstn4dbJXlj16KckVPiM7lBixNGS5HwFEXg0vTr0Ix7tivR5pEt9t5xJfc 86Ogw2Gk3vNCFOrGTK6MkRw06jscCQURkPMp8+noHhoWXn52spLcy3r92jEl 30TgjBXPv9kciW73Xgu1kLm++ObKc5becAisK9h/cK8vBihJ/JYn39UwF2js 8feHDk3t6/NvXJCxRLnxCznn8Ud9q7r9aTDFNFwwIZ+LRWVs4goTdNg/+/NW /YVUGCs1irj0MAFvqMoxrye80ccDVW7eigWjTMORN/a+SG+1ThUi599oElT6 nwoFanfmm/26cQ8ZnuhtmCD1LavGm/wfpAJ7pG29cftLVHglIjbnTHJ/7cBi pVgRGMhP7jwVXYVXFb428RN9Dgz09SmnZIKe5f3KUO1cZBRWrhAj+qnMiPtr +DMGZHTzOw5JxqBX9IPj6wk/6lxW/gObnECmr2Q3RawIWexsCv6Qd/1hr1fZ Uc5eEDjGLXRMJx+LphUObSD9tT+zurv5URDosu9ZOaWYhc5Md9eLEb8yLb72 Q88wEkJp6rqr1fJwybqFKk/8du5BxrjK5hiQ/+8qr+e7TDRPF6woIPvGXj/D F6UYBw38ohm62qm4UhO7w5DwYyg33BjoFwZ8KYfKP1BpGPLK3eIz6dcj75tP +AfD4LW94ylhgVgUi11SZie6Lbxmy0g5Hg4RxRuuPeaNwIf8tV5/CH65cVOa 8IA3lN2PWxfQE4AZLkNNniv/9pM7ez81+0Byqs/b3Le+yCPOkp9K8PaWhRa/ Ul+g3kLOlm4vLOjfn4YE33/2pGtqlQekuLD6LjYEY5/n3lolgtd4fFy4YEqB bGn2jXNLMSjex5Q2TL47m80799cvBhLC/6QvHcvArZkbJYdI3nUs/GTk8IiB sZCVVQ/PxWHc95c/C8m97JglFK9cTIB9OTw3NnTEodDdW1Dyb2/pP3igTT8Z lNd8e/RnJB5NT0fI3SE5IsjbbLJongisZr+yN4dS0fOCPUSQOvHCw78pNBp8 66cVdVeFoHanmt5l0l+n/JGDGn/jgEEx9JP9vkDUWKyJiCTnXJSSj21jDIfq 2zQ5n6vuaHZ5/YkSovPQP0bshmFUeHkveDw+zRkjSxInN5L79vWsafKuDIYx g0Ou9wMs8Uczw1A+wRtYCkdlx4JA9bbZ6Ou6anRWWB1JI/5547v4uf0mcWCb MWe5FFWLTcK8P+JSSe5s82pm2pgEIskn3J6erMcrTzl28lLJfptX+MC5JRkU zpZb0W8W4hOG7+XL3+iwoBaZkMefA6dOrk/VcnyKJTPB6Yyv6eA2vFQ+K1AA HXbH/Bf9K3BPu+OdB+S7Ar6DjN31acBX6JrxdZKGw868qgaEf1rTtqtrRDJA JPOcQtr+dCzMG062JHP68dzqwLaxDEiX3yN75lwW/li3Ss2R+BV7TGfa7JUY eGOWn3btti/uN3/SfI/MqfDtg6+v02JAhyFf1esUFW9tY/xiQvgMO2C5c+xl DEyYz7258ywCY19Y6TUT/sPfMgrLrHGDF72mI2ul89DCSa/+CvH5Usc8sXeX 3WGLQ1XSfud0vKVQ5TJH+ns878lJvxAPmK44YspUTUPxSqstB0n93PWnr8u/ 9QSW3Ifv+OdCMZDauptO+rUcqV1eKREAN/fvMOKoysRN9ms9/u0Plqso15ud AmFn8t42WErCAvuRKGuiE6Ys6/d2tUFwIzTbeptFJNq4dErnkXttljVLTbxG hQCnIvHhn7G4+YTlrZ3ku6bT5008S6Pg9Ecb3slLWSjsypoeS+a3Jnqt23e1 aKiYPKnOYpOG0g2hI/pkfqtcrC1/0qPBz8whryotCU/w6nQ/I3vRxOPRHj// GDAbHzS5lRWHP67b34ok52FrFz6uzRkH9bIKJXxhqXjSJE3V+J8PiLMIncuN A05N++EXdYkosOlOXwKp8+V3hfdzuXgoc21bOvslBnlmWJl0SZ3z6qL3Tdxo kOfxQ2c9bzQG9f2+uZHgs3OT0S5kjzpWm2v/0zwOmxc3hj0kfal9GcYbeD4a XjZOTqvfisYrX9QehhOcX03F35ktDqJV5TfEK0RgqX3RwX94wFSC9ZXWBIjW 3F3TLkZFetSqciuCn9we2vySKQKGTHgovfUR2Cj+5uyzf+/czUV9lQ1RMH5K 5/nuIipyFnotVhD8eVfjcKRvLFkV3ktpJAQjn1i5TzTB/1s+/K1SLgqOOQiM U9YG4p9DvhnxpC+rBi1Es376wZr0b7a9VD+8LL/riyOZu9icASFGFgpc7T5B KyryweXpZYkbBL9z57qv4OYQYF2za49bpxdWJ8yoCRE8zqLytPweKog5Ph5V mPBALuQ+MEX0Mzxq+8CiwQ82XTwYr3PSGxnEdFJyyN/PrDFNbfwSBO/muO+J qHmi0zWBHR4En9jhOuHDSPacAzNjzObuKB26oKJO8IKrW/i8MAhWFv7LK510 xcp94+ez/u2Hkvb7jywFQIfG/cpf6gko0RLlJEfuOypaPHRMnALpK/cnW5sy 0RJ2Kf37fcbKl0dG1joYrK963fw1VYhxzZlmqSSPOPda6ybmhUAno3rJu79l 2G8z8db5Ix26g1Mn14lHwNxX9QONp3KxQlR61pfk1NXnIYl6DyOBfyff0M3M YhTa/73MmuyTVVe/f3sgFg+Gakw2maoFeOHcrE4dmXexF78iH9XFQ2zuu+2q 3xOwS6oiUo34cN2dM8PTT2ggo/abAXST8ZGq/Lkhos+Z1afZFyMSQem58k++ tjQUWJOruZr4jFtohW5TURI8aTiTVSGahRfaH4w0khx8SPuPykZLgtSpr+I/ opKwtaiJcpDU2Sg5VrjheTKk+GQWdLCkIVUtbVCdzNfPFHWJhdoUEHau3mbV lYhbbjXHyxN+VntOxbYeSQSzV19rshZDUeqEslQX0flzr7eWa9mTQN/R7dbX vjB8PP/w6r/feaqk8xRlPieB63znK+6qCJSl+fiKkXsd8XBOs65Khh0FzT/P xkfhtwOr+q6R+RreYh1zP4sGIYWKfW+bQ7BDod7pItF53IhEeaF7ItzwZgvn zqbize2Ho7xJfZ+XDzZYR8TD4fn80ZtmQfiSTaRRl/RXJYblDM+VMNCPTMkU nHXBPUO5Bt+J3mZboKlzTzios50PeifsiqI0QZY6gkur0+67T4dDvZ1ascd9 V+Q2DJSPJXj3Rc6donURMLiBc+OJDFe8RBkSfUjwlQUh/+KFUNhQmlv/XM8O kzPGA2SJ3vZGj+gZN1Eh1u5k9Y5+OzS1MhjfTXD38/FtXq+Cgb8qc6nIwBzt du86VfQv969/5wThSDD6Ijq2qqUWZZ5+0ppOocNSVeL+u3lkHo+5VvZQ65Hf VouvLYTk6Td1FQmhGNj8Mt456VYD7jMS4mFwIntRulLeO3UabGB+nd95pR63 HOW2awylw84h9s6zGxNhn4ziQDlvA7IsWI7ykf2NTzC50j8wBa46nhR2H3iJ CWM3zr0nuPgAywPew5lgMPOqYuvBChRQ1y3fQ/Z5lPkUtv52FljJ7YiZG0aU s1s5dKaUDuWBkX9ig7NhkxhLD1NbLWqE7pU+FEOH/jvTa6zU8sB2m/CNjiuV OJ93h+cU0qGp0n/1Oo98MHVhahRgfYEntlDc/NLpsLu66dznikKoLRzv2+JY jQcUJc4OFNLBPKLI5NWXLJA7X1ImqJGLE4WnC0RHSI6Ylb6/LJ8Heo9drBuU ilFgz8MwuQ90ULUyZ/XpKYAZQQPja/SnyMZD9VVsIXzuX/p46GkWGOULNzzX zcOcR9pxd0m+p3p7DzzhyYP1S2sDPLuKsURTUu9QLx0MLtTpG/pkwbXS7/yv TPLRQKeGx4vMr54Wi1gmPw3EjW1HhmnRaMAe1HaA6HB9gvIyxS0JLnUpF3Vf SMK1DWvWmJD5CjYYEZ39mgIf1IeXUDIdr8vZuz0j/uDkYDDY1xcP/UJvOvQY YvHZl/vjp0idEOVdlM7ORDiXt2kqei4JzTZpiv/Lo8dlrqbXH8XBw9q3qoU6 JEdObTaXJH/PnZ2hfq7JBQbnt3QPMxXh/JbUzrvET3653hBreuELUldvz686 VIhK7MayvWN0GDyS/EN52Q9e4tZ1gt55aFruU5BOziPZfFcl+GMweOabvePQ KMBD5dsm/iP7ie9HzRhN+xCIWjp/5VdvDr5XTYxJJftDWgLv4Y9bQyFoF43j Knsm7utavbqB+IMoc3HHUd1I6It2Yf1wlfjh55TaU6T+riA2L2GIBA1+i9Jy o0ycO5VkFE38KqbZjaWIOQYaMu/sfvMpHUW1Mm5LkDoTL8zCOndGgkSmIN/x J6moZC/r50r2E/uDC7KCw9HwQ38dO+90Mi5vkV87Q3DN3DfP9NLi4Dz7yutp oyS8oLXf4Dzxk1rKltH8eSpsYrofT32VgIIfDz+4Qvzk+d+7R7kzQmDZUtKo RzsaVcrL8saIbxiE5fQrPaWCJyU9qMkkCuOZjK61EdxxpEjpiiYF5B/Rent+ UpHm18kCxAeqFUOyvQxC4PCesH2NxA/7RMLmdv77/5qjQ49LH1HB6mD81wL2 UNyjVpY29e/385bF1P3c3hDMIgpML/xxKjvoKI34QO/EROqfRXd4LFX2u83Y Gx1C6z//ITjnjkKDVglvaDesX0/N8sbMpQPr3xJcoPZNReOAC6SwjZf4bnZH +ubNNxT+0qHIVro9is8DdNi5ZzWuuONaka28BwjOiHeTDXW94eXHV+93Ut3x CatdECPB/W0HOA+d9IWwiZEB51VU1L73OfCfH8rWFD5LowTDj8iek7FOkWh4 7NVWK3L+a4Z1+w40hoKOVE7Vac0EFGFR/ZpI+IxS8PRdzRYOzO4NvQaLsehq Z5v8huBKwU8d7c5EgvXJQ9T7PxLx5lZ9KCD+z9GlUJJkFQ1xQf1Rlhqp+O62 ouw+0sfoTVPGjzJjgfpaWlvkRQbmqA3jSaKTO+JuCYmfY0E+qIXhnk4sSnIK 1f97d5g0cvLU0hJAqZgmKhEVjes8dzmqE3wxvmBNGMmRI6+e+z2wi8W7JbFr HP69rzMrVEdIfrH2bcPlN5HYEE6n/ya4qtdc9naSX4GbDTYcKolGm7tbOvkJ flbSbekCyS+JuR27VMJikRKb0yZOdJXx0rTShOTXsQloNXwUj08/nP52kZzf 7zqlt5u8g/bcZHl950IoyiRyzJ0mPKy6xvVpliEewts/c4/nUJDJZLeOPtGV h2+ZbWxnPCgXKipVtVCwT/AJjzDBv8ZsyuOriQbKDBdv4z5/vDa+hsuU8O82 uP5ja1AMGAlxiJje8ccbl66WSRG8oefBj0c6sTB87x7P5nh/lLVNWFn3598e u72B/2gcGKrc7Szv9cc5px8TfaT+rumIevovKnx6t+OjYYQbXqMEWvwgfdeS uqAo3BECzqf4uXZvc0W2Bd6LikRva4+/38z9JwSkNpf99/o/J2yjaklqEfxv 3WYL41wKcJ75KPE22hltJFpHUlb+/e4UsVXlAwV6485dPLXpCY76FRf+y7tn vIkrJ9iCIXbVh6bqX48w7vYV/iqCl3Pt4uE6GQycq260yrRbYEJ69ol6gp+8 zijup0AFF9aBdXtlK9FzqXL3xTbyjh6XDLHaGA30cGGnjb/K0SvWfehWD/Hb 0Ji3S7axwMobbPYhsxodJTxKul8Q/teX9bz9GA82TBxpA0dr8dqvKBn+TLIn 7IiXffw+AZgXVD2tokpR+l0Id+cAHUQODj6120V8eOa2WcWV56j95+u2YPLd L9LzWbFXkkApLFjK07MG3bewDwqUkfdjT7C/nkcyBFbz30vRrUMliRN9gSQH OYWy3okHp4A2faH9TEQ+XizmV67/Qe5F9deYi0qFin3L6aifjUHxQrdmiT/v YZvq6PybAebsLHHeV4uQ6X1fjeAQHe4zNLmr380BPzbv064LZSiQUHlb6Q0d tI285ZWT0mB6eSrnyYl0HFJvNg4m+17Qrj3me9mzYGpUxrX4TAEmiwxVfvpC h8trZNbWPsiFVR52MzafStBB00GE/x0dDix+/9BlUACbvh3MuOvyDEtjihRU G8hcC2Uc8NueCr8Zam51HY7Hmci51XYkjxQ3uzGNDyXBdvbET+/FozDzvNKZ X2QutlvqTbTJpIInu0lfTmgi6hTspWwlfr55J+isT0+H225JXKY+aWi7j1Hy MjnnknBNP2cmDZRPmxe6XaTiiv/f0XVkXlZ3mjOd4kiGpbF85zsn4/HuLnOu OjJfF5YWaL2mqbB63c87Spwp6Ncyb+1B9lXHSVaPT53pICpCK/vIkonb9ioc 1hinQ8TuyD0LW6PA9NvdV13WnvjeyK9/LdE5Q3VY/SnecPCouTNcKuGC8mzx Nm0EH53xu7HRORLmX2kEyB72x+G1FduGyByZrmGTKR+KBt7v2TJKQaEYJSPr lEfmSGJBLllrTygcN7xznpHZBssH4jIeEN063VjOuOwRBrvaZC/tnvZEpfWf tuWS+pzMGke4RiKg25warDZFwdKhMsVUUl8g99mZrEvRYMTaoTplHI5ZIw7n r5L6/wMaDckp "]], Axes->True, BoxRatios->{1, 1, 0.4}, Method->{"RotationControl" -> "Globe"}, PlotRange->{{1., 5.}, {1., 4.}, {0., 0.29022852171423974`}}, PlotRangePadding->{ Scaled[0.02], Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{{3.5281073751765857`*^9, 3.528107399751923*^9}, 3.5281074533890495`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w"], "Input", CellChangeTimes->{3.528106832105688*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "30.`"}], ",", RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]], "Output", CellChangeTimes->{3.528106832826725*^9, 3.5281069057015133`*^9}] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["What is Next?", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.514308863196991*^9, 3.5143088633311243`*^9}, { 3.5279751404946847`*^9, 3.527975148416075*^9}}], Cell["Generic Pricing Engines", "Subsection", CellChangeTimes->{{3.5280775922038307`*^9, 3.5280775991137667`*^9}}], Cell["Generic Instruments", "Subsection", CellChangeTimes->{{3.5280775922038307`*^9, 3.5280776110409164`*^9}}] }, Open ]] }, Open ]] }, AutoGeneratedPackage->None, ScreenStyleEnvironment->"SlideShow", WindowSize->{1405, 856}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, ShowSelection->True, CellContext->Notebook, FrontEndVersion->"8.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (October 5, \ 2011)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]], Cell[ CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[ StyleData[All, "Condensed"], MenuSortingValue -> None], Cell[ StyleData[All, "SlideShow"], DockedCells -> { FEPrivate`FrontEndResource["FEExpressions", "SlideshowToolbar"], Cell[ BoxData[ GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzt3U9oXGe65/HAgEBSIVllV1UQjkEkyGAnYNyy2w43ThzjONyOO3YTbDqI 65tO0rG5gY7s0Ol0B4duQRbugAlO2pmFMY17Ydkh2Wnh3cVcr41hGBjMLGYx i6rFLGYxi4FhHp9H53mf854/daokOXL0/dxqR64657zv+5z36EL9/J4z85vf /eo3/+mpp556W/73r6NPPfXo5w4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAACwubWdNTlI4QErPvoRaU9aA/KjGGLHsm74o5VVyW9W XcaKLesfZIgW64xiuJ7U7OQQRys8lfkj5Hu73kNrZz2GHddEu7a12rHvvuva 7fUzULsbsP8AAAAAAAAAgDV39OjR559/XtMH//7BRP79vXv3yi47ZmbsW2LZ fX5+/pNPPjl79qzssm3btmgvbaLiK2U52tFy2g05QuGnsm++RX9Y62o0Ovmo OnPRkRYe2TvdbN4Y/HWx2dy6dascfOgd29mobue2be9NTfktrzab8o68H9Vn f/aA+aP5w150W8qOcijdUv70DVUcJH+c0+440WY6iqvZHhaOorD+hcWpQ7aX 41zKFlCOdmTr1joHlE+lOOdzJ0veiXouf17NblBxfNn3Ro26VfTquV27jpx6 61f/dk5e8sPufXNlZYx2FHOvHv7FO2d035+9fGh6+/bqfaUt2UWaqF//3Qd+ Lrvkr1B9f+6Vl6Xdvi/ZzC7k4XbURh/tWLmvDNAqUPjbRnev2boczVqPSlen ejpSf5DC8ygb/NPxN/Qk/vOZf5F2bb7l9+pbAf8a6EQDAAAAAAAAADaUdrt9 9+7da9euRSGFvv/w4UNN3/z7i4uL8r5sL+/Lp/pXcf/+ff3h1q1bzz//vA+S 5M1PPvmkIgc5evTow3JyQNlXjlC2gfRBepKPzLRv8/Pz2rT/6Pbt2/KR9FM+ KovGtALNylBG3j/fbD4Y/HWj2dyyZUtz2B19t3du23Zpaqpil4vN5jNTUzoK cWTrVv/pxMRERRFuuC1lR+mwVlI+8gc5n/SqrFDRcQo3llFcrBy4jNFGUVb/ fHH60mTwXmXB99dI8Wr2POrwveTURPPTOuZPq25p9e87qCOn3vrTP/5+5T/+ PXot/nBbPqoYjlxKv/q3c3+9s5zf952/XHx2drYwJZS/yl6yjewo29Q5BY9K 8Z//JrtYaBW9X/+l00mOMNyOel7qbC/Vk2FqVBoNcO7VwwM1Lcexs6Clk9fu fXOFk6GsdP4g0QbSn8JqyAkqHELNCthLDq6zkYgQAAAAAAAAAJ447Xb7q6++ un//vqYq9r30wYMHNXo7fvy4foVu2y8vL9+6dUuzLflZtvn4448709MTifn5 +fuJ6e3bNSOQY2o+WBHcaD54+PDhiZwtKc0Ho0+f27VLWteIMAry5AeNLJeW lqKmLR+8fPlyWaolA9EKSCsVoczQ+eD1yclGoyGtD7ejdWl/s3mnMhzU1/fJ Ejw9xVE+qN0oHKAub7QtXxwbs3LJR1ET+5Nsrs5xPmw0olBS+vZ9jVHISC2q K6x/VJy+ogyu4nW62SxMQ/ZXZouFPX9masrv8mFS//wklJpEm1WcKW/HzMy5 Ly9ZGCQ///KD9+UlP1jqt/DtN4Up3u59c4s/3LYs7Mznn8mOpy8sfHrjugVD /3zmX/Kl8CGXHLxOSmsh1wsHD0S/ZPR96cBHV7/W10LFK21OjqA7Sm8H2lHn s3a+bEd5x0dsO/fsiYK8uVderj5C9Dp08oTFmlY66flApTtx7oP89vLzr39/ wXorbekEkLPpT64NQfe1CtSsnsyKin8SAAAAAAAAAADYyNrttgZh+/bts+hB 3jx79qwuCVxcXPRRzo6ZGQ0ENQrU1XlRkCeH8tGb0F00Usx/mSzv+HxwS1YS yzRt/WAjiZaibTQifG7XLh8MnTx5UnND+fPZ2VkfrMgPt27d0vgv+si6pAGi tlgRyvy4+WAUIVW//pjUTU5HlA+Ojo7WzwdtMuTzwe+npsqWIubzQR2Cblkz HNSXLbiz1alRPlgxnPy5q16xGL2OjY83s8ljzXAw6rk4n32/NToaHTm/zFC2 8UUrI1eoLRv85Qfvb23LfqMN57X5tzUl1IV+Pt/ZvW/OPnrpxJvRjnJky8g0 lorieAu55CWt9A2PbLmf5YMWVOn70v/RRKOS/kLw+eDuAz8faEefD1bvKGWx EnWmp/08tHxwZGSkb9PWuj5Z0pdORl2/dLKx/gMGfyLeXfyzHurcl5fkrFln ZEv589DJEzaEA68fsyFYBWQa1K8e+SAAAAAAAAAAPInaydMDHz58ePbsWfuq XFy7dm15efny5cvyp//+WUM3DfKWlpbu3r1r4aB+Py9/ys+yo628k3csUqyZ D+qaGk/esXxQQ0N9U1u03W0Vkq6LlO7JzzY6H0DcunVLbx96/vz5/LfcunxS N6jOm2Qv2Vc2kI6NOh82Gj60Gkn4DewLdh8hvTg2lt8y0kgX30Whmzbkj3Bs fNxyty8mJnQg65cPPihfCleRD+ZDuu8mJ6XnhaPQ15XJSX9byKHzwagO95KO tUZHtd3ZsTEpWnU0GXWsov7yOjU+rtWTnvddQphfPGinryKO8QvHLODbkrNz z57FH25/euN6Z3racskdMzMaG8n7mirmg3h558znn+nxXzh4wGeaUT4oh5ID NisXcvp80CfLUT6Y70aeXg4+H2wU/UOCsh2jfLCwaL56WigphZ+HP3v5UM0j qGa63jnKB+UlTWypnMO+RA2XGsufb/zmX6MJYHVoJit8Hx356aflLOsqSGso 5INJutq3es1hn/UJAAAAAAAAAPjRabyljyDc4pbSaKKnKwRthV07faKfZoKy 1+XLl6NVJHpAXX7YmZ7Wr5Hr54NbSu6tJ+/Y/UWjb86j3bUnus5RutFoNKST 0tUtbvWi5oNLS0vy0f37931K0nH3XD1//nzffFCPpqmol88H84HF1uRxflE+ WOebef1afn923y8mJjSWst3lh9boqLyv4WAjDaHWLx98UHKX0Yp8cOe2bVE4 2MrmpzoKqaHfbDa506nOyeHywXb2kYj3kmNGp0l+ODU+7tt9b2rK5tjpGvWX o2nIKMfRj0KSVbSEsHBRpF88WD2u53btsuV71hNt0VIwjbNlzreefnqL+ycB v3jnjO6rK870avVJvaX/C8kqwk9vXPehnuWDv/vbFb0Z6UdXvy67nG1W9M0H bdK2KukQogNquers2HHpmD9NeVq9QydPaAZqv9OifLDiCPmm86WLaltRunw+ qNnluS8v2SWfnwCyvUwAOdH+5sktlw8OWj0AAAAAAAAAwBOn1WppHGbRm8Vt z87O6h1E7Sv65eXlpaUlzQct9asO7B5DPqgf6S1SNbuxZFO2P378eHQD1Vaa D+7du9cPUNvVBZXSYc0HG/0e+mbZhIluIGmhVRQZaJYa5YN1ApH8ujmNkLQV jXWUrhiyNZ562HXNB2Ww+WijVZIPyvtRyjabJqTRKJ7JrtSznO5RUDJUPhjl kpbfbUlXwloc5qNJG50c3z+48M7UlIaDhfXX02pTV6sXLSGUDtgkHHrxoGZ8 f72z7OPgaBdtXbNpHalOJ70r6ZmLn1n9W7mlYfJX2eXA68csSdzibkqsIddH f7viY8qKbrfq5YOFvzQKlR2w5r7a5+rrXas3vX17tNAvygfrzEB/zHzp3jz7 2zqli0o09+phOzV1JkDTPbM1ygcHqh4AAAAAAAAA4InTarX8Iwj1Tp4aFzYa Db3LqIYm/uGD8k5Z6hflfRVb5rfPr1ux9M3fX9QHbdJ56a2mlvZ9+O3bt/XO qNoB2cBGoUfTfHB0dPTmzZu6utAWUv3hD3/QxY/6WMO++WBe/UVtUcrmA7i+ TfjETVcI5vfVCFKfeWfFXNd8MFpkV3gcnw9ezBZqZGTEr2myUTST24ralldc TjdcPhgVoZUGaj4U0+pFCaZFddGIKuqvKaG/GaO+73t+Z2qqMDOtv3hQjnnu y0uW8VXniW2n47KhuVcP9w3IHp2LdOMt7o6+KyHX1a/lJP7yg/f73mX0ScwH O2lIajdZtTqvQT7oSld9l9HCEtlxPr1xvXA2Ro3qVewvUvJBAAAAAAAAANg8 2tlHEDabzeXl5WvXrumis8XFRVtaGD0lcM3zQV2ceCtrfn5ec0DNB5cS9unD hLzTmZ62XEmHIztqP+VNvY+oDx81H2w0Grq60JYQ7piZ0TBRPtJ8ML9isU5J 1zsfzCduZU1ESdA65YP3sj/Pjo35VKgsHyxM2SxyinoSldSOMEQ+2M7eHfS7 ZK/Cystfo/u42lLQ6MSV5Uo+iInWVBYuIZQj33ErE2suHtSGotty1p+0tmxN 7zlZPQOlJwvffqMN2cY+5NLVi33vMvqE5oNaAcsHpaE1zAd96SruMlqWD+rT J/XmooXXUZ0KkA8CAAAAAAAAwGbQTh9BqCvs7Ml9moudPHnSlhb6O3yuRz4o Hfg4Rz7SuyBq6/4j6bO8s3fvXrt5o35RbwsA7V6RBw8elHeOHz9uN6XUfNAe pCg/a5Lob0y6wfPBfD5VJ0lZp3zwWPY5fdFdRuvngxUp2+mikg6dD9bcSxeL RaXWqTLcifNHLlxCONziwY7LjF6bf3ugWE3MvfKyf3Zeda7kwyn/AD4LufR6 3LlnT/VdRp/cfHD3vjndeGu7tbb5YFS6sruMluWDQwfEHfJBAAAAAAAAANh8 WskjCO/evTsxMaGB4LOzsxqCNJOnB+rSQsvUqp8qOHQ+KNtb0uf5fDBJkFa2 0SxP/vRP2pKxyEB0/aPd1FH+1DftaH4sehztrWwmH+n7P1Y+2MzeYTV/t9Wy HWvemDSfD9q9OiPyZs18cGRkxN//80H2LqM188Fj4+NleVDU7ceWD3aSxWL5 UsvGq8wHOyVLCIdbPKhH++udZct36sdqspnPB/uuO6uTD+qVe+LcBxV3GX1C 88F2eh9XvY3n2t5fNCpd2V1GC0s0dN2iCpAPAgAAAAAAAMAm0UofQfjs7Ozi 4qIGhT5K07jNP3xQPqrIB/2qw4HyQQsft6Z0uV/LPX/QttE4z3qr8ZkuFZRR HE4cTckQ/KJCnw9uSR5QKBvovUatG3695OPJB7+bnJSNbzSbZS97ht0a5oPX Kxu9V9JKPh9sjY6W3WW0Zj5YMYoNng/qYxMtVrN7ilaHvPklhP51Z2qq/uLB jst3Bk3H8tlW/Xww//A7C7mkA9Pbty/+cLvsLqPrnQ9q3drlCqvnI7882ewX 75zRLV868aZ/ZmVUQ7vtat/WC0snf1bcZfQx5IMDVQ8AAAAAAAAA8CRqp48g nJ+f1xuNWihmwdzhw4dtkZ3mdxaxRfmFHK3mnUhte7/esOx7aX9MWxVoSwjt K/2vvvrqYTl7xmK0FlIPvry8LMPXr+jtzceZD/Z9lcVzq8kH67+q80GpW9ld RgvvI/qk5IOFpY7yQR+rycFvFFVPXz7k7RQtIbTXqfHx+osHO6tY/5XPtqqr VzMf3JawI+fvMlozH7TrvSJvjQ545uJnb579rfSn4qX/8MDva9WT/ki3869f vHPmT//4u24mTfhnVvoaSrerW5ctfdNlpau4y+i65oN9q3fk1Fs15yQAAAAA AAAAYCNrp48gXFpa0uf0+fUjuiLv5s2bunzP1hVqEqd3IvULjlrJHT5tWV+z /E6k1rrPB8vioXxa106eDadtaUPSjfv371++fHk0WXg14chflxN6BJ8Pyl47 ZmZkR3+3UjnyBswHbb3SRssHNSuRvhXeZTS6T+lmzgejJzO2S5YQ3pma0jWJ 9VOejZYP6m8P6cavf3+h8C6jffPBOi/7NTXojvnEreaO8jp9YcEmvP0ushr2 fUmhfLcrSld2l9F1zQf7vha+/aZ+bA0AAAAAAAAA2MhaySMIdZFdu93262Lk B83Obt68aTmIbK9LDpeXl6e3b2+6R+bpcSxk9Hcita++I8Plg53k3o+6hFAX BurP0nThcwxlGws0fT4oR9PjSCf9eqUNmA/acTZgPqgR7c5t2/J3GZWPNk8+ 2MreTDWfD0ZPuJMfmkkg6DcbdPFgZ0Pmg7px2V1G1yQfLDzgmYufSd/09ebZ 3xa+ol81Vr3f/e3KR/K6+vVC+pKf9SMZhRxwx8yMhYN2dnwN33j/3eqmZbzR vmWlK7vL6HqvH6wewqGTJ8gHAQAAAAAAAOCnoZU+gnB5eTl6Bpn8oA/vO3/+ vF/eopna/cTi4uInibt37+rj//wTDOWdpaWljxOf5Mg2Q+eDtoRQ+jC9fbv0 U9ct2rf3llrKzxpoat+WEn6ZpD7zy25w+qPkgy+OjY0kRktYh9cwHxxJFbZ4 3a0H7JsPSpHl0/eyUZeumPtp54OagVo+eDG5j6g+2FFePvvLt6WX0unc4sFB I56NmQ/q6ArvMto3H5Tj27RslCjMB6UC+RXEkbL1g9pi1IpGhIs/3NZP9TL0 u/sa2hEqmm72Wz9opSu8y+i65oO798317T/5IAAAAAAAAAD8NLSTRxAuLS2d PXs2SsTkh5MnT8pHe/fujb7Gl5+f27Xr8uXLGgvqvT0PHz7svwMXulhP3cqR LQ8ePCg/7Nu3r+xrZ3lnfn5eN25mH3co2x89elSOfPz48cL+2xFky8XFRX26 4mLCf1GvGaI9layixTrFHDoftKVJhXxv1zAfLFxuKeTNQfNBXQ0XLaA7Nj7u j1OWD743NbUB80Fpom8++KLLBy1rljFqtiXjrW5Lfi4bXfXZ9DZmPmgFyd9l tE4+qEFV2eUQBW0+H7SniBbSf7fQKnr+YGGL0kP99J+Ov+H/jURZDfu23qp8 /mBUuvxdRtc3H6xXPcJBAAAAAAAAAPgJ0K+Xm82mfh/uwwVN1uyrcn9bPI0I LUsqXCBj2/i1J/kv+bVp/ea8sHvSrm0TfTNvfTCF4YjvrbUbLQKKRl3YYp1i 1oyf8jGffjPvVz5GLArxq9JOjY+vJh/0yxK96LmBdfLBlUVPubuMfu96W5YP fpjElGX5YGFJH0M++Ex2OeRsST444W7Jq6Wzq8m3daWorbL0c6BUWjb+0z/+ fuU//n3u1cOrzAerc8lB88FOyV1GH527fvmgv99v9RXhd9QD2q+gMtGgrALa GTu+/h5Y+PYbXUJYGL3la2iToW/rfUu3JXeXUSvdOuWDg1YPAAAAAAAAAPDk amfX0EUf+bV1+V0sCrHQreXunmdxSeFSFP26u/D4hd3Lb6Pd25oqO44f4Cpb 7FvJofPBmslOK/uQO03W6iQC+Xyw+taaA+WDrfS+iPm7jD7I9tbywavu/T9O TJTlGmubD25tt/z9PO9VFqGwXM3sEwOjfNZSQp0/l3LZ6DrlgxYPDZ0PSmUG ygdt1lWHXO2iu4xKD+vkg/VzrlbJgsSa+2rf8p3XT63zhU/fy+eD9c9dndJF dxmVmhTmg+/85aI+QHD1+eCg/ygCAAAAAAAAAPDkqlgb0vcjv5wnn9/5DfLL f2ouS6nTveqDDLoKZrjFMo8nH/Sp03eTk4W5RmHf1jsf1B2bubuMFuaDvlB3 pqYqCuVXIGqSuJr1g/uzXfIPEIy29Me/5/JBP7ovypPNVm6lZ37Ltc0HT19Y qBkWGxm4ZkMvHDxQJx/8651l2filE2/WzAc7RXcZlW10Ud7Gzwe185q+Lf5w u/X00/kzuE75oLUe3WVUS1d/CWf9CpAPAgAAAAAAAAAwhMeQD8oGp7MJlz0C L4ot9jeb+90z2h5PPtguustoPh9sZZ+79yB5UmF+FNFyP5+yDZcPdpJEzPft yuRkYaa2M7eZ3T3yvdx9RwuTnfxm+VO8Vvmgpm+f3rg+aDz06NGcyc0/X5t/ u+8MfG7XrnyQVCecamXvMir7Pin5oG7w7OysbiMdi2bpuuaDndxdRmWzwnzw yKm3qkdRpwLkgwAAAAAAAAAADGGV+WCz35O/1DNTU9Ez/vYnd3nV2GIlL9i6 9V76kT5S7fHkg53Ku4z6fFC28cvr7mUjQj8Kv03LPSSusNR+90LRbT91DaA9 6k632blt2/fZbfQBkZpLyqf+I9lydmwsOndRrBl1z9dq9fmgHOTA68fqLwPU HtqJtsVx1dGS7PLu4p91DaA+qs9K3TfkaufuMiobPyn5YNstIZSx6xJCH4iv az7Yzt5lVCqjpYvyQYtuXzrxZn6a5Y/pPyUfBAAAAAAAAABgNYbOB7+YmPiw 0ZB9K16n08c7Rkvn9HVpako2OJIEczeymZpFhI8nH+yU32XU8sFHmUtubeCD ZBfpf34UD9LFg5ayRfngnampvgU8nxRQRAGr7n4+qd7ppJLRp3oerQJyhIu1 6/8gXTxYdgPJNckHpWO2xCwKsKIt313885FTb9mzNYUtjjvz+Weak+bjIXln 7pWXLaLyY6kTcnVydxnVtYRRILUx88FO5RLC9c4HO7m7jGrpohJJfyzB1NuQ tkqexCpnX+aAf7gq+SAAAAAAAAAAAKsxdD5Y53UjXSSo6dulogV6ha8/Juvj ZMfHlg9qiLY/1xOfD2rqIX2rOYovJiZGRkb8Y+/O19vRvzT/EvuT5LTOLt9N TrZGRy2+0Qo0k2WDNRvVWLMweVmTfFDP1+59c/pwwE9vXH92draZW4u6Y2ZG QzR5yQZ2d1A5U5pSaUTYmZ72SynVkVNv2cF1LJZM1Qy5Otm7jBYGUmubD1bz +/bNByuWEObzwb4rWNvu3qT1S2d3GfUprZVIa6vnSP6UOjSTNDyaALoCVF5y QvUsd0rywZrVAwAAAAAAAAAA7fXMB6+nT8prJeSwdcI1v+buseWDnTRSiSI8 nw920tSj8E6k+WBxZGTEh3TtofJBPYKUQiPCO/2avp6Eg9GtQdtJpibvfNGv /vdcONgsWtPXXqN8UKu9c88eTYjk9c5fLh54/djPXj6kr1///oJ9dOjkCR/w adyp4ZcuT5ONbccjp96yVPHTG9e3tltWw0HzwXb2LqOPAql9c2ubD742//YL Bw9Y58tec6+8nF891zehK1xC6PPB3Qd+Xqf153btsjk8UOnsLqPyeuP9d32J bAOLXxe+/UbOXeEEOH1hYSL5NwNRPlizenLWChcnAgAAAAAAAACwOeXzwbKv /YfLB+3hfRZRvTg2dmVysnD7LyYmZsfGfDi1mnzQApGa+WAnjf/8OrsPG41o 6ZmOQvpZlrXJ6HQU+VhqiHzQ355UuvFMclfSwoWE301Onhoft1AyWvrn63+9 qP73svWvut9jNh+szokq6IienZ1dSJ5PV/j66OrXz+3aFY3IxnLg9WN+cV/0 +uUH71s46KtRP+TqpDnm6QsLfdcP+nlSZ+wWYtZ8+flcJx/0SwjltWNmxq5E n3jWeUm5dO2eGLR0dpfRfISqG3Smp898/llZ03J+Xzh4oJFehlE+WPMlpbax 1zk7AAAAAAAAAAD8tLXb7Z3JMr0Xx8bkNeuW3UVbalqnm9V8RUezWEfebI2O ygYfNhryOjU+Lj/rqjcNHezL/GeSR/vZAS1tLBzI/uRperplK43V8j2vPsij NU3btvkh5NMlDbYehSNuFPLyo9A4w8LBfKlrvnxv5U/pibTbSNqSumm7x8bH NdezaM+3G41O6z+bHNzXf2RkJF//wjnjT0rFhKnDRrRzz57TFxY+uvq1veSv Lxw8UNYlP5ZDJ0+c+fwz2/Hcl5dem39bk0GtRj4qPXLqrYVvv9FVaWWTwXdy evt2OayGlb688tGvf39BDqUrHOvXwXb0Q16oeH37jQ1Es0V5xy+pq+i5tiI9 tMx39765AZpO99WQetDSyY5aupdOvJkvkU2AHTMzctZ8l+Sczr162K6mqOyP KuA2rh6C9LbsogAAAAAAAAAAYBPyaZd+CR+lWn5LTWR0yzryR9PmNBGw4+j3 /357fytF21iVfcmv3dOBKHtame959UHywywMy3QU1lx+FNZ6fi+/S50CRr31 w6zZbv50169/oeiklE2YmqKCN5zqQfmx2EBsx4rJHM2HvqGezyJtPthHvhT1 62A7RkMu44NO32h15wt7bvOwZtPWul8FPETpJkqS62hKR+3awKN0WN4ZtP/k gwAAAAAAAAAAGEu7VN90SZ+FV0fZ0aLjNJvNsu3r9616Y/9R39sM1my0/ijW toCaENlx6rRbv+d68Jq716xn/f74eFfzrOq4s+NSQr+v7lh9InT4Nftv21uV op5H79ccctTtalaKQSdzvuf2Zs2mLWZVg5ZOR1pRIl/GOhMgirnr9L/vRAIA AAAAAAAAYBOyL//rb1nHQIfqu2X9gazyIJ1VFGTQ7Ycu4KDtrvkRhm634mgt Z9CTHu1Yv3r1m8hvP3QB8+Ot5psYqNHCjQdqvXDf1ZeubLM6E2A11QMAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAKu0FwAAAAAAAAAAAMCmcRwAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAADx2/wUAAAAAAAAAAADApvFfAQAAAAAAAAAAAGwa/w0AAAAA AAAAAADApvHfAQAAAAAAAAAAAGwa/wMAAAAAAAAAAADApvE/AQAAAAAAAAAA AGwavV6325P/e6SXSP4b/v7oP92VP/S/yebpZ+knulH6f72wU2/lsCuH7NrO tsPK31YaSBuJ9nV9tBbtp244SM96sNLV9OC9MCDbI90k0zHX+soxQs97boN0 k25aEevhyptpi91wvJ4dc2XEvlnby8prTVlprSV3oK71I3SzG85StH2352qT diQdSuhYqGA3FNBmg3U8LcpK8z0/BDuRvfhYPfeBFbNnzdt/er4Nq174M9Q7 PfduivZC7dKJECanVbnrRpbOIl+OcELSHf0ZCX/YxApvhnqFieMuLXfVZDoU Trad1FDEbnp9hl5mLkG78uzvtrGb0t3Qa39+wsfxJZr5BeCnf9phuxgzF3KY Lt1sA+FMuV8dbm64C8AuL2s/nQx2zt1e+aGF6WCfWzHSee1mlZ369HIIZ9ed E1e2MG/So/tpZU3YWQhHzbwVZkaYMtak3zLU0lUhHUJ2kFZZm5/WaqiVTT+b va6m0YUeCmuT1c6573A4J242hTGGazJcfe4y8vMpdCPMt3A8d/343V11s7vb PEjLFSayfeh2DNO1Gy44ezt7gfsDukngBpfW11UoO1GtEVfxzKD9VRT6nvY8 TIPMWe1lf+ravt3sgGx696Kxuesgcx35Trh5YW/ZmXdn019wXXds11DadbeV u47dNWZzPMyDcJbCvq6mmV8YmWKEizh/qWYuxvhysB76wttlHPbwo/e/OsJx w7xbqb772e2W6ar70zrr5lh6lqzmdo6ti9Z4N3Qrc4WEM+0OkDk3XWsq7G8T wW1lTYdj2jXXdU2GmWMXTC9sGtXIShhOZVq9cC1mz4Wfs+5K7/ki+E/DZPVF zn7myuZmSTokNzHS3rj6+usjzJvwQbfru2unLfQmned2TVlNbZalRUwL6y6q tNd2/nzx/QXbDXu5C9Q3aucilKMXupt2I1xYdtLTKe3npdvQz9Xw6yS6nl0D aVf8TAw9dtO8l/KTKXMR2DwOBcxOlNBzX7xeGEg32iYz0/2lE00Vt4Hvo2/d rmRXWn8+wwzI1iW3izu6r4n/1E2xsFlmsHYiXK/CYbMt+pL6muSLFs6hv5ys sfwZcc12XVt2qGgXX1WbvzZGfwSbnPHuXSc6P644vdzu3agPNuqVUtgPmcpE c8APO1N1u6yyMzBzBt2sCNPbLl8/EneWsifUTXU/W7IynXQ/xGffF9xdCP74 fmL03MSIehidkcwF66vtO+9OcXyJ+b18r3qZ39vpR+63np6FtI2VPcJwe67p 7C98a3blBHXD/2MJ150vibXXC73ypzT8LvBDtV/NaV/ChFyZRDYSP7Z0CoVO Z+Zb5uq1SR/qbnPfXzDpDAxFz9a8F9oPs3OlKit9T0dg14GVzVU1DNNORi9z iYSehTMY6uBOauaisZ+jeeROYzfU0bpjVbLuWnlcbdNz1A3thIH7k5UpU/jZ RmGdDg2Ec2FdDdeETbKe71s37O6nra9MOIVhqrkz3Muc0zCpuq7zYbZmy+bm UZi1rgp+Trl51/MFSlvs2jjCnEknRXpGQg+i0fptwzhC0cPsDIW0SdMr+Z/v lZ1Dd+7C3zM/ui6kfQgHctVMP89OLZuH7kLpZT8J89nKbafCih4at5/TWtq5 yfU8FNJdkKGb6bTx10/4W5jF3dBUuFAyU6bnTqF1JDNh7S/hZPiz28s0YjXo ht5kRtwLXQuDcB3phQ267mBp8fJdCHPVamA1sivHXWM9P/Uy0yG9rkKlwjVm pzecrqibYT7aibFaujnjpq9NUF+T0CebPJne2SWRHtlOgRtzdPatdnZSwrHt 6nCfu3lqkyUddNfv54vQC1eTTS33Yc+3YhdB+HXSsyvQdTucrMx14KprV2xu ovhzblXpWufjXwjpmQsF74XW3IjTs5ueVPupG0YYpoCfU+HEuXnsrj07/d2w b3aDcNr9BRnqEGZFdC7C5HEH9XMn1MLezRzEeh8unjDeTA39qcrOfzcT/fwL 5ylt3nYJm4RLyPrYDQ2EOqbTxpro+b/YCNyc6rle+evAxmAnywrY/V8AAAAA AAAAAAAANo3/DQAAAAAAAAAAAGDT+D8AAAAAAAAAAAAANo3/CwAAAAAAAAAA AGDT+H8AAAAAAAAAAAAANo3/D2zci8M= "], {{0, 90}, {2400, 0}}, {0, 255}, ColorFunction -> RGBColor], BoxForm`ImageTag[ "Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable -> False], BaseStyle -> "ImageGraphics", ImageSize -> Magnification[1], ImageSizeRaw -> {2400, 90}, PlotRange -> {{0, 2400}, {0, 90}}]], "", CellMargins -> 0, CellChangeTimes -> {{3.516548605022827*^9, 3.516548633085456*^9}, { 3.516616961864057*^9, 3.516616982571135*^9}, 3.518187891728025*^9, {3.518199033657151*^9, 3.5181990340305967`*^9}}]}, CellMargins -> 0, CellBracketOptions -> { "Color" -> RGBColor[0.739193, 0.750317, 0.747173]}], Cell[ BoxData[ GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzt3U9oXGe65/HAgEBSIVllV1UQjkEkyGAnYNyy2w43ThzjONyOO3YTbDqI 65tO0rG5gY7s0Ol0B4duQRbugAlO2pmFMY17Ydkh2Wnh3cVcr41hGBjMLGYx i6rFLGYxi4FhHp9H53mf854/daokOXL0/dxqR64657zv+5z36EL9/J4z85vf /eo3/+mpp556W/73r6NPPfXo5w4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAACwubWdNTlI4QErPvoRaU9aA/KjGGLHsm74o5VVyW9W XcaKLesfZIgW64xiuJ7U7OQQRys8lfkj5Hu73kNrZz2GHddEu7a12rHvvuva 7fUzULsbsP8AAAAAAAAAgDV39OjR559/XtMH//7BRP79vXv3yi47ZmbsW2LZ fX5+/pNPPjl79qzssm3btmgvbaLiK2U52tFy2g05QuGnsm++RX9Y62o0Ovmo OnPRkRYe2TvdbN4Y/HWx2dy6dascfOgd29mobue2be9NTfktrzab8o68H9Vn f/aA+aP5w150W8qOcijdUv70DVUcJH+c0+440WY6iqvZHhaOorD+hcWpQ7aX 41zKFlCOdmTr1joHlE+lOOdzJ0veiXouf17NblBxfNn3Ro26VfTquV27jpx6 61f/dk5e8sPufXNlZYx2FHOvHv7FO2d035+9fGh6+/bqfaUt2UWaqF//3Qd+ Lrvkr1B9f+6Vl6Xdvi/ZzC7k4XbURh/tWLmvDNAqUPjbRnev2boczVqPSlen ejpSf5DC8ygb/NPxN/Qk/vOZf5F2bb7l9+pbAf8a6EQDAAAAAAAAADaUdrt9 9+7da9euRSGFvv/w4UNN3/z7i4uL8r5sL+/Lp/pXcf/+ff3h1q1bzz//vA+S 5M1PPvmkIgc5evTow3JyQNlXjlC2gfRBepKPzLRv8/Pz2rT/6Pbt2/KR9FM+ KovGtALNylBG3j/fbD4Y/HWj2dyyZUtz2B19t3du23Zpaqpil4vN5jNTUzoK cWTrVv/pxMRERRFuuC1lR+mwVlI+8gc5n/SqrFDRcQo3llFcrBy4jNFGUVb/ fHH60mTwXmXB99dI8Wr2POrwveTURPPTOuZPq25p9e87qCOn3vrTP/5+5T/+ PXot/nBbPqoYjlxKv/q3c3+9s5zf952/XHx2drYwJZS/yl6yjewo29Q5BY9K 8Z//JrtYaBW9X/+l00mOMNyOel7qbC/Vk2FqVBoNcO7VwwM1Lcexs6Clk9fu fXOFk6GsdP4g0QbSn8JqyAkqHELNCthLDq6zkYgQAAAAAAAAAJ447Xb7q6++ un//vqYq9r30wYMHNXo7fvy4foVu2y8vL9+6dUuzLflZtvn4448709MTifn5 +fuJ6e3bNSOQY2o+WBHcaD54+PDhiZwtKc0Ho0+f27VLWteIMAry5AeNLJeW lqKmLR+8fPlyWaolA9EKSCsVoczQ+eD1yclGoyGtD7ejdWl/s3mnMhzU1/fJ Ejw9xVE+qN0oHKAub7QtXxwbs3LJR1ET+5Nsrs5xPmw0olBS+vZ9jVHISC2q K6x/VJy+ogyu4nW62SxMQ/ZXZouFPX9masrv8mFS//wklJpEm1WcKW/HzMy5 Ly9ZGCQ///KD9+UlP1jqt/DtN4Up3u59c4s/3LYs7Mznn8mOpy8sfHrjugVD /3zmX/Kl8CGXHLxOSmsh1wsHD0S/ZPR96cBHV7/W10LFK21OjqA7Sm8H2lHn s3a+bEd5x0dsO/fsiYK8uVderj5C9Dp08oTFmlY66flApTtx7oP89vLzr39/ wXorbekEkLPpT64NQfe1CtSsnsyKin8SAAAAAAAAAADYyNrttgZh+/bts+hB 3jx79qwuCVxcXPRRzo6ZGQ0ENQrU1XlRkCeH8tGb0F00Usx/mSzv+HxwS1YS yzRt/WAjiZaibTQifG7XLh8MnTx5UnND+fPZ2VkfrMgPt27d0vgv+si6pAGi tlgRyvy4+WAUIVW//pjUTU5HlA+Ojo7WzwdtMuTzwe+npsqWIubzQR2Cblkz HNSXLbiz1alRPlgxnPy5q16xGL2OjY83s8ljzXAw6rk4n32/NToaHTm/zFC2 8UUrI1eoLRv85Qfvb23LfqMN57X5tzUl1IV+Pt/ZvW/OPnrpxJvRjnJky8g0 lorieAu55CWt9A2PbLmf5YMWVOn70v/RRKOS/kLw+eDuAz8faEefD1bvKGWx EnWmp/08tHxwZGSkb9PWuj5Z0pdORl2/dLKx/gMGfyLeXfyzHurcl5fkrFln ZEv589DJEzaEA68fsyFYBWQa1K8e+SAAAAAAAAAAPInaydMDHz58ePbsWfuq XFy7dm15efny5cvyp//+WUM3DfKWlpbu3r1r4aB+Py9/ys+yo628k3csUqyZ D+qaGk/esXxQQ0N9U1u03W0Vkq6LlO7JzzY6H0DcunVLbx96/vz5/LfcunxS N6jOm2Qv2Vc2kI6NOh82Gj60Gkn4DewLdh8hvTg2lt8y0kgX30Whmzbkj3Bs fNxyty8mJnQg65cPPihfCleRD+ZDuu8mJ6XnhaPQ15XJSX9byKHzwagO95KO tUZHtd3ZsTEpWnU0GXWsov7yOjU+rtWTnvddQphfPGinryKO8QvHLODbkrNz z57FH25/euN6Z3racskdMzMaG8n7mirmg3h558znn+nxXzh4wGeaUT4oh5ID NisXcvp80CfLUT6Y70aeXg4+H2wU/UOCsh2jfLCwaL56WigphZ+HP3v5UM0j qGa63jnKB+UlTWypnMO+RA2XGsufb/zmX6MJYHVoJit8Hx356aflLOsqSGso 5INJutq3es1hn/UJAAAAAAAAAPjRabyljyDc4pbSaKKnKwRthV07faKfZoKy 1+XLl6NVJHpAXX7YmZ7Wr5Hr54NbSu6tJ+/Y/UWjb86j3bUnus5RutFoNKST 0tUtbvWi5oNLS0vy0f37931K0nH3XD1//nzffFCPpqmol88H84HF1uRxflE+ WOebef1afn923y8mJjSWst3lh9boqLyv4WAjDaHWLx98UHKX0Yp8cOe2bVE4 2MrmpzoKqaHfbDa506nOyeHywXb2kYj3kmNGp0l+ODU+7tt9b2rK5tjpGvWX o2nIKMfRj0KSVbSEsHBRpF88WD2u53btsuV71hNt0VIwjbNlzreefnqL+ycB v3jnjO6rK870avVJvaX/C8kqwk9vXPehnuWDv/vbFb0Z6UdXvy67nG1W9M0H bdK2KukQogNquers2HHpmD9NeVq9QydPaAZqv9OifLDiCPmm86WLaltRunw+ qNnluS8v2SWfnwCyvUwAOdH+5sktlw8OWj0AAAAAAAAAwBOn1WppHGbRm8Vt z87O6h1E7Sv65eXlpaUlzQct9asO7B5DPqgf6S1SNbuxZFO2P378eHQD1Vaa D+7du9cPUNvVBZXSYc0HG/0e+mbZhIluIGmhVRQZaJYa5YN1ApH8ujmNkLQV jXWUrhiyNZ562HXNB2Ww+WijVZIPyvtRyjabJqTRKJ7JrtSznO5RUDJUPhjl kpbfbUlXwloc5qNJG50c3z+48M7UlIaDhfXX02pTV6sXLSGUDtgkHHrxoGZ8 f72z7OPgaBdtXbNpHalOJ70r6ZmLn1n9W7mlYfJX2eXA68csSdzibkqsIddH f7viY8qKbrfq5YOFvzQKlR2w5r7a5+rrXas3vX17tNAvygfrzEB/zHzp3jz7 2zqli0o09+phOzV1JkDTPbM1ygcHqh4AAAAAAAAA4InTarX8Iwj1Tp4aFzYa Db3LqIYm/uGD8k5Z6hflfRVb5rfPr1ux9M3fX9QHbdJ56a2mlvZ9+O3bt/XO qNoB2cBGoUfTfHB0dPTmzZu6utAWUv3hD3/QxY/6WMO++WBe/UVtUcrmA7i+ TfjETVcI5vfVCFKfeWfFXNd8MFpkV3gcnw9ezBZqZGTEr2myUTST24ralldc TjdcPhgVoZUGaj4U0+pFCaZFddGIKuqvKaG/GaO+73t+Z2qqMDOtv3hQjnnu y0uW8VXniW2n47KhuVcP9w3IHp2LdOMt7o6+KyHX1a/lJP7yg/f73mX0ScwH O2lIajdZtTqvQT7oSld9l9HCEtlxPr1xvXA2Ro3qVewvUvJBAAAAAAAAANg8 2tlHEDabzeXl5WvXrumis8XFRVtaGD0lcM3zQV2ceCtrfn5ec0DNB5cS9unD hLzTmZ62XEmHIztqP+VNvY+oDx81H2w0Grq60JYQ7piZ0TBRPtJ8ML9isU5J 1zsfzCduZU1ESdA65YP3sj/Pjo35VKgsHyxM2SxyinoSldSOMEQ+2M7eHfS7 ZK/Cystfo/u42lLQ6MSV5Uo+iInWVBYuIZQj33ErE2suHtSGotty1p+0tmxN 7zlZPQOlJwvffqMN2cY+5NLVi33vMvqE5oNaAcsHpaE1zAd96SruMlqWD+rT J/XmooXXUZ0KkA8CAAAAAAAAwGbQTh9BqCvs7Ml9moudPHnSlhb6O3yuRz4o Hfg4Rz7SuyBq6/4j6bO8s3fvXrt5o35RbwsA7V6RBw8elHeOHz9uN6XUfNAe pCg/a5Lob0y6wfPBfD5VJ0lZp3zwWPY5fdFdRuvngxUp2+mikg6dD9bcSxeL RaXWqTLcifNHLlxCONziwY7LjF6bf3ugWE3MvfKyf3Zeda7kwyn/AD4LufR6 3LlnT/VdRp/cfHD3vjndeGu7tbb5YFS6sruMluWDQwfEHfJBAAAAAAAAANh8 WskjCO/evTsxMaGB4LOzsxqCNJOnB+rSQsvUqp8qOHQ+KNtb0uf5fDBJkFa2 0SxP/vRP2pKxyEB0/aPd1FH+1DftaH4sehztrWwmH+n7P1Y+2MzeYTV/t9Wy HWvemDSfD9q9OiPyZs18cGRkxN//80H2LqM188Fj4+NleVDU7ceWD3aSxWL5 UsvGq8wHOyVLCIdbPKhH++udZct36sdqspnPB/uuO6uTD+qVe+LcBxV3GX1C 88F2eh9XvY3n2t5fNCpd2V1GC0s0dN2iCpAPAgAAAAAAAMAm0UofQfjs7Ozi 4qIGhT5K07jNP3xQPqrIB/2qw4HyQQsft6Z0uV/LPX/QttE4z3qr8ZkuFZRR HE4cTckQ/KJCnw9uSR5QKBvovUatG3695OPJB7+bnJSNbzSbZS97ht0a5oPX Kxu9V9JKPh9sjY6W3WW0Zj5YMYoNng/qYxMtVrN7ilaHvPklhP51Z2qq/uLB jst3Bk3H8tlW/Xww//A7C7mkA9Pbty/+cLvsLqPrnQ9q3drlCqvnI7882ewX 75zRLV868aZ/ZmVUQ7vtat/WC0snf1bcZfQx5IMDVQ8AAAAAAAAA8CRqp48g nJ+f1xuNWihmwdzhw4dtkZ3mdxaxRfmFHK3mnUhte7/esOx7aX9MWxVoSwjt K/2vvvrqYTl7xmK0FlIPvry8LMPXr+jtzceZD/Z9lcVzq8kH67+q80GpW9ld RgvvI/qk5IOFpY7yQR+rycFvFFVPXz7k7RQtIbTXqfHx+osHO6tY/5XPtqqr VzMf3JawI+fvMlozH7TrvSJvjQ545uJnb579rfSn4qX/8MDva9WT/ki3869f vHPmT//4u24mTfhnVvoaSrerW5ctfdNlpau4y+i65oN9q3fk1Fs15yQAAAAA AAAAYCNrp48gXFpa0uf0+fUjuiLv5s2bunzP1hVqEqd3IvULjlrJHT5tWV+z /E6k1rrPB8vioXxa106eDadtaUPSjfv371++fHk0WXg14chflxN6BJ8Pyl47 ZmZkR3+3UjnyBswHbb3SRssHNSuRvhXeZTS6T+lmzgejJzO2S5YQ3pma0jWJ 9VOejZYP6m8P6cavf3+h8C6jffPBOi/7NTXojvnEreaO8jp9YcEmvP0ushr2 fUmhfLcrSld2l9F1zQf7vha+/aZ+bA0AAAAAAAAA2MhaySMIdZFdu93262Lk B83Obt68aTmIbK9LDpeXl6e3b2+6R+bpcSxk9Hcita++I8Plg53k3o+6hFAX BurP0nThcwxlGws0fT4oR9PjSCf9eqUNmA/acTZgPqgR7c5t2/J3GZWPNk8+ 2MreTDWfD0ZPuJMfmkkg6DcbdPFgZ0Pmg7px2V1G1yQfLDzgmYufSd/09ebZ 3xa+ol81Vr3f/e3KR/K6+vVC+pKf9SMZhRxwx8yMhYN2dnwN33j/3eqmZbzR vmWlK7vL6HqvH6wewqGTJ8gHAQAAAAAAAOCnoZU+gnB5eTl6Bpn8oA/vO3/+ vF/eopna/cTi4uInibt37+rj//wTDOWdpaWljxOf5Mg2Q+eDtoRQ+jC9fbv0 U9ct2rf3llrKzxpoat+WEn6ZpD7zy25w+qPkgy+OjY0kRktYh9cwHxxJFbZ4 3a0H7JsPSpHl0/eyUZeumPtp54OagVo+eDG5j6g+2FFePvvLt6WX0unc4sFB I56NmQ/q6ArvMto3H5Tj27RslCjMB6UC+RXEkbL1g9pi1IpGhIs/3NZP9TL0 u/sa2hEqmm72Wz9opSu8y+i65oO798317T/5IAAAAAAAAAD8NLSTRxAuLS2d PXs2SsTkh5MnT8pHe/fujb7Gl5+f27Xr8uXLGgvqvT0PHz7svwMXulhP3cqR LQ8ePCg/7Nu3r+xrZ3lnfn5eN25mH3co2x89elSOfPz48cL+2xFky8XFRX26 4mLCf1GvGaI9layixTrFHDoftKVJhXxv1zAfLFxuKeTNQfNBXQ0XLaA7Nj7u j1OWD743NbUB80Fpom8++KLLBy1rljFqtiXjrW5Lfi4bXfXZ9DZmPmgFyd9l tE4+qEFV2eUQBW0+H7SniBbSf7fQKnr+YGGL0kP99J+Ov+H/jURZDfu23qp8 /mBUuvxdRtc3H6xXPcJBAAAAAAAAAPgJ0K+Xm82mfh/uwwVN1uyrcn9bPI0I LUsqXCBj2/i1J/kv+bVp/ea8sHvSrm0TfTNvfTCF4YjvrbUbLQKKRl3YYp1i 1oyf8jGffjPvVz5GLArxq9JOjY+vJh/0yxK96LmBdfLBlUVPubuMfu96W5YP fpjElGX5YGFJH0M++Ex2OeRsST444W7Jq6Wzq8m3daWorbL0c6BUWjb+0z/+ fuU//n3u1cOrzAerc8lB88FOyV1GH527fvmgv99v9RXhd9QD2q+gMtGgrALa GTu+/h5Y+PYbXUJYGL3la2iToW/rfUu3JXeXUSvdOuWDg1YPAAAAAAAAAPDk amfX0EUf+bV1+V0sCrHQreXunmdxSeFSFP26u/D4hd3Lb6Pd25oqO44f4Cpb 7FvJofPBmslOK/uQO03W6iQC+Xyw+taaA+WDrfS+iPm7jD7I9tbywavu/T9O TJTlGmubD25tt/z9PO9VFqGwXM3sEwOjfNZSQp0/l3LZ6DrlgxYPDZ0PSmUG ygdt1lWHXO2iu4xKD+vkg/VzrlbJgsSa+2rf8p3XT63zhU/fy+eD9c9dndJF dxmVmhTmg+/85aI+QHD1+eCg/ygCAAAAAAAAAPDkqlgb0vcjv5wnn9/5DfLL f2ouS6nTveqDDLoKZrjFMo8nH/Sp03eTk4W5RmHf1jsf1B2bubuMFuaDvlB3 pqYqCuVXIGqSuJr1g/uzXfIPEIy29Me/5/JBP7ovypPNVm6lZ37Ltc0HT19Y qBkWGxm4ZkMvHDxQJx/8651l2filE2/WzAc7RXcZlW10Ud7Gzwe185q+Lf5w u/X00/kzuE75oLUe3WVUS1d/CWf9CpAPAgAAAAAAAAAwhMeQD8oGp7MJlz0C L4ot9jeb+90z2h5PPtguustoPh9sZZ+79yB5UmF+FNFyP5+yDZcPdpJEzPft yuRkYaa2M7eZ3T3yvdx9RwuTnfxm+VO8Vvmgpm+f3rg+aDz06NGcyc0/X5t/ u+8MfG7XrnyQVCecamXvMir7Pin5oG7w7OysbiMdi2bpuuaDndxdRmWzwnzw yKm3qkdRpwLkgwAAAAAAAAAADGGV+WCz35O/1DNTU9Ez/vYnd3nV2GIlL9i6 9V76kT5S7fHkg53Ku4z6fFC28cvr7mUjQj8Kv03LPSSusNR+90LRbT91DaA9 6k632blt2/fZbfQBkZpLyqf+I9lydmwsOndRrBl1z9dq9fmgHOTA68fqLwPU HtqJtsVx1dGS7PLu4p91DaA+qs9K3TfkaufuMiobPyn5YNstIZSx6xJCH4iv az7Yzt5lVCqjpYvyQYtuXzrxZn6a5Y/pPyUfBAAAAAAAAABgNYbOB7+YmPiw 0ZB9K16n08c7Rkvn9HVpako2OJIEczeymZpFhI8nH+yU32XU8sFHmUtubeCD ZBfpf34UD9LFg5ayRfngnampvgU8nxRQRAGr7n4+qd7ppJLRp3oerQJyhIu1 6/8gXTxYdgPJNckHpWO2xCwKsKIt313885FTb9mzNYUtjjvz+Weak+bjIXln 7pWXLaLyY6kTcnVydxnVtYRRILUx88FO5RLC9c4HO7m7jGrpohJJfyzB1NuQ tkqexCpnX+aAf7gq+SAAAAAAAAAAAKsxdD5Y53UjXSSo6dulogV6ha8/Juvj ZMfHlg9qiLY/1xOfD2rqIX2rOYovJiZGRkb8Y+/O19vRvzT/EvuT5LTOLt9N TrZGRy2+0Qo0k2WDNRvVWLMweVmTfFDP1+59c/pwwE9vXH92draZW4u6Y2ZG QzR5yQZ2d1A5U5pSaUTYmZ72SynVkVNv2cF1LJZM1Qy5Otm7jBYGUmubD1bz +/bNByuWEObzwb4rWNvu3qT1S2d3GfUprZVIa6vnSP6UOjSTNDyaALoCVF5y QvUsd0rywZrVAwAAAAAAAAAA7fXMB6+nT8prJeSwdcI1v+buseWDnTRSiSI8 nw920tSj8E6k+WBxZGTEh3TtofJBPYKUQiPCO/2avp6Eg9GtQdtJpibvfNGv /vdcONgsWtPXXqN8UKu9c88eTYjk9c5fLh54/djPXj6kr1///oJ9dOjkCR/w adyp4ZcuT5ONbccjp96yVPHTG9e3tltWw0HzwXb2LqOPAql9c2ubD742//YL Bw9Y58tec6+8nF891zehK1xC6PPB3Qd+Xqf153btsjk8UOnsLqPyeuP9d32J bAOLXxe+/UbOXeEEOH1hYSL5NwNRPlizenLWChcnAgAAAAAAAACwOeXzwbKv /YfLB+3hfRZRvTg2dmVysnD7LyYmZsfGfDi1mnzQApGa+WAnjf/8OrsPG41o 6ZmOQvpZlrXJ6HQU+VhqiHzQ355UuvFMclfSwoWE301Onhoft1AyWvrn63+9 qP73svWvut9jNh+szokq6IienZ1dSJ5PV/j66OrXz+3aFY3IxnLg9WN+cV/0 +uUH71s46KtRP+TqpDnm6QsLfdcP+nlSZ+wWYtZ8+flcJx/0SwjltWNmxq5E n3jWeUm5dO2eGLR0dpfRfISqG3Smp898/llZ03J+Xzh4oJFehlE+WPMlpbax 1zk7AAAAAAAAAAD8tLXb7Z3JMr0Xx8bkNeuW3UVbalqnm9V8RUezWEfebI2O ygYfNhryOjU+Lj/rqjcNHezL/GeSR/vZAS1tLBzI/uRperplK43V8j2vPsij NU3btvkh5NMlDbYehSNuFPLyo9A4w8LBfKlrvnxv5U/pibTbSNqSumm7x8bH NdezaM+3G41O6z+bHNzXf2RkJF//wjnjT0rFhKnDRrRzz57TFxY+uvq1veSv Lxw8UNYlP5ZDJ0+c+fwz2/Hcl5dem39bk0GtRj4qPXLqrYVvv9FVaWWTwXdy evt2OayGlb688tGvf39BDqUrHOvXwXb0Q16oeH37jQ1Es0V5xy+pq+i5tiI9 tMx39765AZpO99WQetDSyY5aupdOvJkvkU2AHTMzctZ8l+Sczr162K6mqOyP KuA2rh6C9LbsogAAAAAAAAAAYBPyaZd+CR+lWn5LTWR0yzryR9PmNBGw4+j3 /357fytF21iVfcmv3dOBKHtame959UHywywMy3QU1lx+FNZ6fi+/S50CRr31 w6zZbv50169/oeiklE2YmqKCN5zqQfmx2EBsx4rJHM2HvqGezyJtPthHvhT1 62A7RkMu44NO32h15wt7bvOwZtPWul8FPETpJkqS62hKR+3awKN0WN4ZtP/k gwAAAAAAAAAAGEu7VN90SZ+FV0fZ0aLjNJvNsu3r9616Y/9R39sM1my0/ijW toCaENlx6rRbv+d68Jq716xn/f74eFfzrOq4s+NSQr+v7lh9InT4Nftv21uV op5H79ccctTtalaKQSdzvuf2Zs2mLWZVg5ZOR1pRIl/GOhMgirnr9L/vRAIA AAAAAAAAYBOyL//rb1nHQIfqu2X9gazyIJ1VFGTQ7Ycu4KDtrvkRhm634mgt Z9CTHu1Yv3r1m8hvP3QB8+Ot5psYqNHCjQdqvXDf1ZeubLM6E2A11QMAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAKu0FwAAAAAAAAAAAMCmcRwAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAADx2/wUAAAAAAAAAAADApvFfAQAAAAAAAAAAAGwa/w0AAAAA AAAAAADApvHfAQAAAAAAAAAAAGwa/wMAAAAAAAAAAADApvE/AQAAAAAAAAAA AGwavV6325P/e6SXSP4b/v7oP92VP/S/yebpZ+knulH6f72wU2/lsCuH7NrO tsPK31YaSBuJ9nV9tBbtp244SM96sNLV9OC9MCDbI90k0zHX+soxQs97boN0 k25aEevhyptpi91wvJ4dc2XEvlnby8prTVlprSV3oK71I3SzG85StH2352qT diQdSuhYqGA3FNBmg3U8LcpK8z0/BDuRvfhYPfeBFbNnzdt/er4Nq174M9Q7 PfduivZC7dKJECanVbnrRpbOIl+OcELSHf0ZCX/YxApvhnqFieMuLXfVZDoU Trad1FDEbnp9hl5mLkG78uzvtrGb0t3Qa39+wsfxJZr5BeCnf9phuxgzF3KY Lt1sA+FMuV8dbm64C8AuL2s/nQx2zt1e+aGF6WCfWzHSee1mlZ369HIIZ9ed E1e2MG/So/tpZU3YWQhHzbwVZkaYMtak3zLU0lUhHUJ2kFZZm5/WaqiVTT+b va6m0YUeCmuT1c6573A4J242hTGGazJcfe4y8vMpdCPMt3A8d/343V11s7vb PEjLFSayfeh2DNO1Gy44ezt7gfsDukngBpfW11UoO1GtEVfxzKD9VRT6nvY8 TIPMWe1lf+ravt3sgGx696Kxuesgcx35Trh5YW/ZmXdn019wXXds11DadbeV u47dNWZzPMyDcJbCvq6mmV8YmWKEizh/qWYuxvhysB76wttlHPbwo/e/OsJx w7xbqb772e2W6ar70zrr5lh6lqzmdo6ti9Z4N3Qrc4WEM+0OkDk3XWsq7G8T wW1lTYdj2jXXdU2GmWMXTC9sGtXIShhOZVq9cC1mz4Wfs+5K7/ki+E/DZPVF zn7myuZmSTokNzHS3rj6+usjzJvwQbfru2unLfQmned2TVlNbZalRUwL6y6q tNd2/nzx/QXbDXu5C9Q3aucilKMXupt2I1xYdtLTKe3npdvQz9Xw6yS6nl0D aVf8TAw9dtO8l/KTKXMR2DwOBcxOlNBzX7xeGEg32iYz0/2lE00Vt4Hvo2/d rmRXWn8+wwzI1iW3izu6r4n/1E2xsFlmsHYiXK/CYbMt+pL6muSLFs6hv5ys sfwZcc12XVt2qGgXX1WbvzZGfwSbnPHuXSc6P644vdzu3agPNuqVUtgPmcpE c8APO1N1u6yyMzBzBt2sCNPbLl8/EneWsifUTXU/W7IynXQ/xGffF9xdCP74 fmL03MSIehidkcwF66vtO+9OcXyJ+b18r3qZ39vpR+63np6FtI2VPcJwe67p 7C98a3blBHXD/2MJ150vibXXC73ypzT8LvBDtV/NaV/ChFyZRDYSP7Z0CoVO Z+Zb5uq1SR/qbnPfXzDpDAxFz9a8F9oPs3OlKit9T0dg14GVzVU1DNNORi9z iYSehTMY6uBOauaisZ+jeeROYzfU0bpjVbLuWnlcbdNz1A3thIH7k5UpU/jZ RmGdDg2Ec2FdDdeETbKe71s37O6nra9MOIVhqrkz3Muc0zCpuq7zYbZmy+bm UZi1rgp+Trl51/MFSlvs2jjCnEknRXpGQg+i0fptwzhC0cPsDIW0SdMr+Z/v lZ1Dd+7C3zM/ui6kfQgHctVMP89OLZuH7kLpZT8J89nKbafCih4at5/TWtq5 yfU8FNJdkKGb6bTx10/4W5jF3dBUuFAyU6bnTqF1JDNh7S/hZPiz28s0YjXo ht5kRtwLXQuDcB3phQ267mBp8fJdCHPVamA1sivHXWM9P/Uy0yG9rkKlwjVm pzecrqibYT7aibFaujnjpq9NUF+T0CebPJne2SWRHtlOgRtzdPatdnZSwrHt 6nCfu3lqkyUddNfv54vQC1eTTS33Yc+3YhdB+HXSsyvQdTucrMx14KprV2xu ovhzblXpWufjXwjpmQsF74XW3IjTs5ueVPupG0YYpoCfU+HEuXnsrj07/d2w b3aDcNr9BRnqEGZFdC7C5HEH9XMn1MLezRzEeh8unjDeTA39qcrOfzcT/fwL 5ylt3nYJm4RLyPrYDQ2EOqbTxpro+b/YCNyc6rle+evAxmAnywrY/V8AAAAA AAAAAAAANo3/DQAAAAAAAAAAAGDT+D8AAAAAAAAAAAAANo3/CwAAAAAAAAAA AGDT+H8AAAAAAAAAAAAANo3/D2zci8M= "], {{0, 90}, {2400, 0}}, {0, 255}, ColorFunction -> RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable -> False], BaseStyle -> "ImageGraphics", ImageSize -> Magnification[1], ImageSizeRaw -> {2400, 90}, PlotRange -> {{0, 2400}, {0, 90}}]], "", CellMargins -> 0, CellChangeTimes -> {{3.516548605022827*^9, 3.516548633085456*^9}, { 3.516616961864057*^9, 3.516616982571135*^9}, 3.518187891728025*^9, { 3.518199033657151*^9, 3.5181990340305967`*^9}}], Cell[ BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"Evaluate", " ", "the", " ", "following", " ", "to", " ", "copy", " ", "the", " ", "style", " ", "of", " ", "the", " ", "cell", " ", "above", " ", "into", " ", "\[IndentingNewLine]", "the", " ", "docked", " ", "cell", " ", "style", " ", "of", " ", RowBox[{"the", " ", "'"}], RowBox[{"Notebook", "'"}], " ", "definition", " ", RowBox[{"(", RowBox[{"2", " ", "cells", " ", "above"}], ")"}], " ", "\[IndentingNewLine]", "These", " ", "two", " ", "cell", " ", "can", " ", "be", " ", "removed", " ", "once", " ", "the", " ", "docked", " ", "cell", " ", "is", " ", RowBox[{"created", "."}]}], "\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SelectionMove", "[", RowBox[{ RowBox[{"SelectedNotebook", "[", "]"}], ",", "Previous", ",", "Cell", ",", "2"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"celldata", "=", RowBox[{"NotebookRead", "[", RowBox[{"SelectedNotebook", "[", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SelectionMove", "[", RowBox[{ RowBox[{"SelectedNotebook", "[", "]"}], ",", "Previous", ",", "Cell", ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SetOptions", "[", RowBox[{ RowBox[{"NotebookSelection", "[", RowBox[{"SelectedNotebook", "[", "]"}], "]"}], ",", RowBox[{"DockedCells", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FEPrivate`FrontEndResource", "[", RowBox[{ "\"FEExpressions\"", ",", "\"SlideshowToolbar\""}], "]"}], ",", "celldata"}], "}"}]}]}], "]"}], ";"}]}]}]], "Input", FontWeight -> "Bold"]}, Open]], Cell[ CellGroupData[{ Cell["Notebook Options Settings", "Section"], Cell[ StyleData["Notebook"], CellBracketOptions -> { "Color" -> RGBColor[0.739193, 0.750317, 0.747173]}]}, Open]], Cell[ CellGroupData[{ Cell["Styles for Title and Section Cells", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Title"], ShowCellBracket -> Automatic, ShowGroupOpener -> False, CellMargins -> {{60, 0}, {30, 50}}, CellBracketOptions -> {"Margins" -> {0, 0}}, CellGroupingRules -> {"TitleGrouping", 0}, PageBreakBelow -> False, CellFrameMargins -> {{20, 20}, {20, 20}}, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, CellChangeTimes -> {3.479211616867702*^9, 3.483202458952606*^9}, TextAlignment -> Left, LineSpacing -> {1, 0}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Title", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily -> "Helvetica", FontSize -> 40, FontWeight -> "Plain", FontSlant -> "Plain", FontTracking -> "Plain", FontVariations -> { "Masked" -> False, "Outline" -> False, "Shadow" -> False, "StrikeThrough" -> False, "Underline" -> False}, FontColor -> RGBColor[ 0.8156862745098039, 0.07058823529411765, 0.07058823529411765], Background -> None], Cell[ StyleData["Title", "Presentation", StyleDefinitions -> None], CellMargins -> {{55, 3}, {14, 125}}, LineSpacing -> {1, 5}, FontSize -> 55], Cell[ StyleData[ "Title", "SlideShow", StyleDefinitions -> StyleData["Title", "Presentation"]], CellMargins -> {{55, 3}, {14, 35}}, FontSize -> 55], Cell[ StyleData["Title", "Printout", StyleDefinitions -> None], CellMargins -> {{2, 0}, {0, 10}}, LineSpacing -> {1, 18}, FontSize -> 15]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Subtitle"], ShowCellBracket -> False, CellMargins -> {{60, 0}, {0, 5}}, CellBracketOptions -> {"Margins" -> {0, 0}}, CellGroupingRules -> {"TitleGrouping", 10}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, TextAlignment -> Left, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Subtitle", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subsubtitle", 0}}, FontFamily -> "Helvetica", FontSize -> 20, FontWeight -> "Plain", FontSlant -> "Plain", FontColor -> RGBColor[ 0.34901960784313724`, 0.5254901960784314, 0.5176470588235295], Background -> None], Cell[ StyleData["Subtitle", "Presentation", StyleDefinitions -> None], CellMargins -> {{58, 0}, {0, 5}}, FontSize -> 20], Cell[ StyleData[ "Subtitle", "SlideShow", StyleDefinitions -> StyleData["Subtitle", "Presentation"]]], Cell[ StyleData["Subtitle", "Printout", StyleDefinitions -> None], CellMargins -> {{2, 0}, {0, 5}}, FontSize -> 14, Background -> GrayLevel[1]]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Subsubtitle", StyleDefinitions -> StyleData["Subtitle"]], FontSize -> 17], Cell[ StyleData["Subsubtitle", "Presentation"], FontSize -> Inherited + 3], Cell[ StyleData[ "Subsubtitle", "SlideShow", StyleDefinitions -> StyleData["Subsubtitle", "Presentation"]]], Cell[ StyleData["Subsubtitle", "Printout"], FontSize -> Inherited + 0]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Section"], CellFrame -> {{0, 0}, {0.2, 0}}, ShowGroupOpener -> False, CellMargins -> {{60, 50}, {10, 25}}, FontSize -> 33, FontWeight -> "Plain", FontColor -> RGBColor[ 0.8156862745098039, 0.07058823529411765, 0.07058823529411765]], Cell[ StyleData["Section", "Presentation"], CellFrame -> {{0, 0}, {0.2, 0}}, CellMargins -> {{58, 50}, {10, 35}}], Cell[ StyleData[ "Section", "SlideShow", StyleDefinitions -> StyleData["Section", "Presentation"]], CellMargins -> {{58, 50}, {10, 35}}], Cell[ StyleData["Section", "Printout"], ShowGroupOpener -> False, CellMargins -> {{2, 0}, {7, 22}}, FontSize -> 14]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Subsection"], CellDingbat -> None, ShowGroupOpener -> True, CellMargins -> {{60, Inherited}, {0, 12}}, CellGroupingRules -> {"SectionGrouping", 40}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Subsection", CounterAssignments -> {{"Subsubsection", 0}}, FontFamily -> "Helvetica", FontSize -> 24, FontWeight -> "Plain", FontSlant -> "Plain", FontColor -> RGBColor[ 0.34901960784313724`, 0.5254901960784314, 0.5176470588235295]], Cell[ StyleData["Subsection", "Presentation"], CellMargins -> {{60, 50}, {6, 15}}, LineSpacing -> {1, 0}, FontFamily -> "Helvetica"], Cell[ StyleData["Subsection", "SlideShow"], CellMargins -> {{60, 50}, {8, 12}}, LineSpacing -> {1, 0}, FontFamily -> "Helvetica"], Cell[ StyleData["Subsection", "Printout"], ShowGroupOpener -> False, CellMargins -> {{2, 0}, {2, 22}}, FontSize -> 12]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Subsubsection"], CellDingbat -> None, ShowGroupOpener -> True, CellMargins -> {{60, Inherited}, {0, 12}}, CellGroupingRules -> {"SectionGrouping", 50}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Subsubsection", FontFamily -> "Helvetica", FontSize -> 20, FontWeight -> "Plain", FontSlant -> "Plain", FontColor -> RGBColor[ 0.34901960784313724`, 0.5254901960784314, 0.5176470588235295]], Cell[ StyleData["Subsubsection", "Presentation"], CellMargins -> {{60, 50}, {6, 20}}, LineSpacing -> {1, 0}], Cell[ StyleData[ "Subsubsection", "SlideShow", StyleDefinitions -> StyleData["Subsubsection", "Presentation"]]], Cell[ StyleData["Subsubsection", "Printout"], ShowGroupOpener -> False, CellMargins -> {{2, 0}, {2, 22}}, FontSize -> 11]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell["Styles for Body Text", "Section"], Cell[ CellGroupData[{ Cell["Standard", "Subsection"], Cell[ CellGroupData[{ Cell[ StyleData["Text"], CellMargins -> {{60, 10}, {7, 7}}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, LineSpacing -> {1, 3}, CounterIncrements -> "Text", FontFamily -> "Helvetica", FontSize -> 17], Cell[ StyleData["Text", "Presentation"], CellMargins -> {{60, 50}, {10, 10}}, FontSize -> 17], Cell[ StyleData[ "Text", "SlideShow", StyleDefinitions -> StyleData["Text", "Presentation"]]], Cell[ StyleData["Text", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 0.5, Hyphenation -> True, FontSize -> 10]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell["Display", "Subsection"], Cell[ CellGroupData[{ Cell[ StyleData["Item", StyleDefinitions -> StyleData["Text"]], CellDingbat -> Cell["\[FilledSmallCircle]", FontWeight -> "Bold"], CellMargins -> {{84, 10}, {7, 7}}, ReturnCreatesNewCell -> True, CellGroupingRules -> {"GroupTogetherNestedGrouping", 15000}, CounterIncrements -> "Item"], Cell[ StyleData["Item", "Presentation"], CellMargins -> {{124, 10}, {7, 7}}], Cell[ StyleData[ "Item", "SlideShow", StyleDefinitions -> StyleData["Item", "Presentation"]]], Cell[ StyleData["Item", "Printout"], CellMargins -> {{2, 2}, {0, 6}}]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Subitem", StyleDefinitions -> StyleData["Item"]], CellMargins -> {{108, 10}, {7, 7}}, ReturnCreatesNewCell -> True, CellGroupingRules -> {"GroupTogetherNestedGrouping", 15150}, CounterIncrements -> "Subitem"], Cell[ StyleData["Subitem", "Presentation"], CellMargins -> {{146, 10}, {7, 7}}], Cell[ StyleData[ "Subitem", "SlideShow", StyleDefinitions -> StyleData["Subitem", "Presentation"]]], Cell[ StyleData["Subitem", "Printout"], CellMargins -> {{30, 2}, {0, 6}}]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["ItemNumbered", StyleDefinitions -> StyleData["Text"]], CellDingbat -> Cell[ TextData[{ CounterBox["ItemNumbered"], "."}]], CellMargins -> {{84, 10}, {7, 7}}, ReturnCreatesNewCell -> True, CellGroupingRules -> {"GroupTogetherNestedGrouping", 15000}, CounterIncrements -> "ItemNumbered"], Cell[ StyleData["ItemNumbered", "Presentation"], CellMargins -> {{124, 10}, {7, 7}}], Cell[ StyleData[ "ItemNumbered", "SlideShow", StyleDefinitions -> StyleData["ItemNumbered", "Presentation"]]], Cell[ StyleData["ItemNumbered", "Printout"], CellMargins -> {{2, 2}, {0, 6}}]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData[ "SubitemNumbered", StyleDefinitions -> StyleData["ItemNumbered"]], CellDingbat -> Cell[ TextData[{ CounterBox["SubitemNumbered", CounterFunction :> (Part[ CharacterRange["a", "z"], #]& )], "."}]], CellMargins -> {{108, 10}, {7, 7}}, ReturnCreatesNewCell -> True, CellGroupingRules -> {"GroupTogetherNestedGrouping", 15150}, CounterIncrements -> "SubitemNumbered"], Cell[ StyleData["SubitemNumbered", "Presentation"], CellMargins -> {{146, 10}, {7, 7}}], Cell[ StyleData[ "SubitemNumbered", "SlideShow", StyleDefinitions -> StyleData["SubitemNumbered", "Presentation"]]], Cell[ StyleData["SubitemNumbered", "Printout"], CellMargins -> {{30, 2}, {0, 6}}]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData[ "ItemParagraph", StyleDefinitions -> StyleData["Item"]], CellDingbat -> None, CellMargins -> {{84, 10}, {7, 7}}, ReturnCreatesNewCell -> True, CellGroupingRules -> {"GroupTogetherNestedGrouping", 15100}, CounterIncrements -> "ItemParagraph"], Cell[ StyleData["ItemParagraph", "Presentation"], CellMargins -> {{124, 10}, {7, 7}}], Cell[ StyleData[ "ItemParagraph", "SlideShow", StyleDefinitions -> StyleData["ItemParagraph", "Presentation"]]], Cell[ StyleData["ItemParagraph", "Printout"], CellMargins -> {{14, 2}, {0, 6}}]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData[ "SubitemParagraph", StyleDefinitions -> StyleData["Subitem"]], CellDingbat -> None, ReturnCreatesNewCell -> True, CellGroupingRules -> {"GroupTogetherNestedGrouping", 15200}, CounterIncrements -> "SubitemParagraph"], Cell[ StyleData["SubitemParagraph", "Presentation"]], Cell[ StyleData[ "SubitemParagraph", "SlideShow", StyleDefinitions -> StyleData["SubitemParagraph", "Presentation"]]], Cell[ StyleData["SubitemParagraph", "Printout"]]}, Open]]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell["Styles for Formulas and Programming", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["DisplayFormula"]], Cell[ StyleData["DisplayFormula", "Presentation"], CellMargins -> {{60, Inherited}, {Inherited 1.5, Inherited 1.5}}, FontSize -> 17], Cell[ StyleData[ "DisplayFormula", "SlideShow", StyleDefinitions -> StyleData["DisplayFormula", "Presentation"]]], Cell[ StyleData["DisplayFormula", "Printout"], CellMargins -> {{39, Inherited}, {Inherited, Inherited}}, FontSize -> 10]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData[ "DisplayFormulaNumbered", StyleDefinitions -> StyleData["DisplayFormula"]], CellFrameLabels -> {{None, Cell[ TextData[{"(", CounterBox["DisplayFormulaNumbered"], ")"}]]}, {None, None}}, CounterIncrements -> "DisplayFormulaNumbered"], Cell[ StyleData["DisplayFormulaNumbered", "Presentation"], CellMargins -> {{60, Inherited}, {Inherited 1.5, Inherited 1.5}}, FontSize -> 17], Cell[ StyleData[ "DisplayFormulaNumbered", "SlideShow", StyleDefinitions -> StyleData["DisplayFormulaNumbered", "Presentation"]]], Cell[ StyleData["DisplayFormulaNumbered", "Printout"], CellMargins -> {{39, Inherited}, {Inherited, Inherited}}]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell["Styles for Inline Formatting", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["InlineFormula"]], Cell[ StyleData["InlineFormula", "Presentation"], FontSize -> 17], Cell[ StyleData[ "InlineFormula", "SlideShow", StyleDefinitions -> StyleData["InlineFormula", "Presentation"]]], Cell[ StyleData["InlineFormula", "Printout"]]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell["Styles for Input and Output Cells", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Input"], ShowCellBracket -> True, CellMargins -> {{103, 10}, {5, 7}}, CellBracketOptions -> { "Color" -> RGBColor[0.734936, 0.713848, 0.694041]}, Evaluatable -> True, CellGroupingRules -> "InputGrouping", CellHorizontalScrolling -> True, PageBreakWithin -> False, GroupPageBreakWithin -> False, DefaultFormatType -> DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> "Mathematica", FormatType -> InputForm, ShowStringCharacters -> True, NumberMarks -> True, LinebreakAdjustments -> {0.85, 2, 10, 0, 1}, CounterIncrements -> "Input", FontWeight -> "Bold"], Cell[ StyleData["Input", "Presentation"], CellMargins -> {{110, 50}, {8, 10}}, LineSpacing -> {1, 0}, FontSize -> 17], Cell[ StyleData[ "Input", "SlideShow", StyleDefinitions -> StyleData["Input", "Presentation"]]], Cell[ StyleData["Input", "Printout"], CellMargins -> {{39, 0}, {4, 6}}, LinebreakAdjustments -> {0.85, 2, 10, 1, 1}, FontSize -> 9]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["InputOnly"], ShowCellBracket -> True, CellMargins -> {{103, 10}, {7, 7}}, CellBracketOptions -> { "Color" -> RGBColor[0.734936, 0.713848, 0.694041]}, Evaluatable -> True, CellGroupingRules -> "InputGrouping", CellHorizontalScrolling -> True, DefaultFormatType -> DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> "Mathematica", FormatType -> InputForm, ShowStringCharacters -> True, NumberMarks -> True, LinebreakAdjustments -> {0.85, 2, 10, 0, 1}, CounterIncrements -> "Input", MenuSortingValue -> 1550, FontWeight -> "Bold"], Cell[ StyleData["InputOnly", "Presentation"], CellMargins -> {{110, Inherited}, {8, 10}}, LineSpacing -> {1, 0}, FontSize -> 17], Cell[ StyleData[ "InputOnly", "SlideShow", StyleDefinitions -> StyleData["InputOnly", "Presentation"]]], Cell[ StyleData["InputOnly", "Printout"], CellMargins -> {{39, 0}, {4, 6}}, LinebreakAdjustments -> {0.85, 2, 10, 1, 1}, FontSize -> 9]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Output"], ShowCellBracket -> True, CellMargins -> {{103, 10}, {7, 5}}, CellBracketOptions -> { "Color" -> RGBColor[0.734936, 0.713848, 0.694041]}, CellEditDuplicate -> True, CellGroupingRules -> "OutputGrouping", CellHorizontalScrolling -> True, PageBreakWithin -> False, GroupPageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, DefaultFormatType -> DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> None, FormatType -> InputForm, CounterIncrements -> "Output"], Cell[ StyleData["Output", "Presentation"], CellMargins -> {{110, 50}, {10, 8}}, LineSpacing -> {1, 0}, FontSize -> 17], Cell[ StyleData[ "Output", "SlideShow", StyleDefinitions -> StyleData["Output", "Presentation"]]], Cell[ StyleData["Output", "Printout"], CellMargins -> {{39, 0}, {6, 4}}, FontSize -> 9]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Code"], CellMargins -> {{103, 10}, {5, 10}}], Cell[ StyleData["Code", "Presentation"], CellMargins -> {{110, 50}, {8, 10}}, LineSpacing -> {1, 0}, FontSize -> 17], Cell[ StyleData[ "Code", "SlideShow", StyleDefinitions -> StyleData["Code", "Presentation"]]], Cell[ StyleData["Code", "Printout"], CellMargins -> {{39, 0}, {4, 6}}, LinebreakAdjustments -> {0.85, 2, 10, 1, 1}, FontSize -> 9]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Print"], CellMargins -> {{103, Inherited}, {Inherited, Inherited}}, FontSize -> 14], Cell[ StyleData["Print", "Presentation"], CellMargins -> {{70, Inherited}, {Inherited 1.5, Inherited 1.5}}, FontSize -> 17, Magnification -> Inherited 1.5], Cell[ StyleData[ "Print", "SlideShow", StyleDefinitions -> StyleData["Print", "Presentation"]]], Cell[ StyleData["Print", "Printout"], CellMargins -> {{39, Inherited}, {Inherited, Inherited}}]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData[ "WolframAlphaShortInput", StyleDefinitions -> StyleData["Input"]], CellMargins -> {{98, 10}, {5, 7}}, EvaluationMode -> "WolframAlphaShort", CellEventActions -> {"ReturnKeyDown" :> FrontEndTokenExecute[ EvaluationNotebook[], "HandleShiftReturn"]}, CellFrameLabels -> {{ Cell[ BoxData[ DynamicBox[ FEPrivate`FrontEndResource["WABitmaps", "Equal"]]], CellBaseline -> Baseline], None}, {None, None}}, FormatType -> TextForm, FontFamily -> "Helvetica"], Cell[ StyleData["WolframAlphaShortInput", "Presentation"], CellMargins -> {{107, 50}, {8, 10}}], Cell[ StyleData[ "WolframAlphaShortInput", "SlideShow", StyleDefinitions -> StyleData["WolframAlphaShortInput", "Presentation"]]], Cell[ StyleData["WolframAlphaShortInput", "Printout"], CellFrameLabelMargins -> 3]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData[ "WolframAlphaLong", StyleDefinitions -> StyleData["Input"]], CellMargins -> {{100, 10}, {5, 7}}, StyleKeyMapping -> { "=" -> "Input", "Backspace" -> "WolframAlphaShort"}, EvaluationMode -> "WolframAlphaLong", CellEventActions -> {"ReturnKeyDown" :> FrontEndTokenExecute[ EvaluationNotebook[], "HandleShiftReturn"]}, CellFrameLabels -> {{ Cell[ BoxData[ DynamicBox[ FEPrivate`FrontEndResource["WABitmaps", "SpikeyEqual"]]]], None}, {None, None}}, DefaultFormatType -> TextForm, FormatType -> TextForm, FontFamily -> "Helvetica"], Cell[ StyleData["WolframAlphaLong", "Presentation"], CellMargins -> {{107, 50}, {8, 10}}], Cell[ StyleData[ "WolframAlphaLong", "SlideShow", StyleDefinitions -> StyleData["WolframAlphaLong", "Presentation"]], CellMargins -> {{107, 50}, {8, 10}}], Cell[ StyleData["WolframAlphaLong", "Printout"], CellFrameLabelMargins -> 3]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Program"], CellMargins -> {{60, 4}, {6, 8}}], Cell[ StyleData["Program", "Presentation"], CellMargins -> {{60, 50}, {8, 10}}, LineSpacing -> {1, 0}, FontSize -> 17], Cell[ StyleData[ "Program", "SlideShow", StyleDefinitions -> StyleData["Program", "Presentation"]]], Cell[ StyleData["Program", "Printout"], FontSize -> 9]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["CellLabel"]], Cell[ StyleData["CellLabel", "Presentation"], FontSize -> 12], Cell[ StyleData[ "CellLabel", "SlideShow", StyleDefinitions -> StyleData["CellLabel", "Presentation"]]], Cell[ StyleData["CellLabel", "Printout"], FontSize -> 8, FontColor -> GrayLevel[0.]]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["ManipulateLabel"]], Cell[ StyleData["ManipulateLabel", "Presentation"], FontSize -> 15], Cell[ StyleData[ "ManipulateLabel", "SlideShow", StyleDefinitions -> StyleData["ManipulateLabel", "Presentation"]]], Cell[ StyleData["ManipulateLabel", "Printout"], FontSize -> 8]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["GraphicsLabel"]], Cell[ StyleData["GraphicsLabel", "Presentation"], FontSize -> 14], Cell[ StyleData[ "GraphicsLabel", "SlideShow", StyleDefinitions -> StyleData["GraphicsLabel", "Presentation"]]], Cell[ StyleData["GraphicsLabel", "Printout"], FontSize -> 8]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["Graphics3DLabel"]], Cell[ StyleData["Graphics3DLabel", "Presentation"], FontSize -> 14], Cell[ StyleData[ "Graphics3DLabel", "SlideShow", StyleDefinitions -> StyleData["Graphics3DLabel", "Presentation"]]], Cell[ StyleData["Graphics3DLabel", "Printout"], FontSize -> 8]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell[ "Styles for SlideShow", "Section", CellChangeTimes -> {{3.514665148412793*^9, 3.5146651505550737`*^9}}], Cell[ StyleData["slideshowheader"], ShowCellBracket -> False, CellMargins -> {{0, 0}, {0, -2}}, Evaluatable -> False, CellHorizontalScrolling -> False, PageBreakBelow -> False, CellFrameMargins -> 0, ImageMargins -> {{0, 0}, {0, 0}}, ImageRegion -> {{0, 1}, {0, 1}}, Magnification -> 1, Background -> GrayLevel[1], CellPadding -> 0, CellFramePadding -> 0], Cell[ CellGroupData[{ Cell[ StyleData["hidefromslideshowgraphic"], ShowCellBracket -> False, CellMargins -> {{0, 0}, {0, 0}}, Evaluatable -> False, CellHorizontalScrolling -> False, PageBreakBelow -> False, CellFrameMargins -> 0, ImageMargins -> {{0, 0}, {0, 0}}, ImageRegion -> {{0, 1}, {0, 1}}, Magnification -> 1, Background -> None, CellPadding -> 0], Cell[ StyleData["hidefromslideshowgraphic", "SlideShow"], ShowCellBracket -> False, CellElementSpacings -> { "CellMinHeight" -> 0, "ClosedCellHeight" -> 0, "ClosedGroupTopMargin" -> 0}, CellOpen -> False, CellHorizontalScrolling -> False]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["slideshowheader2"], ShowCellBracket -> False, CellMargins -> {{0, 0}, {0, 0}}, Evaluatable -> False, CellHorizontalScrolling -> False, PageBreakBelow -> False, ImageMargins -> {{0, 0}, {0, 0}}, ImageRegion -> {{0, 1}, {0, 1}}, Magnification -> 1, Background -> GrayLevel[1]], Cell[ StyleData["ConferenceGraphicCell", "SlideShow"], ShowCellBracket -> False, CellElementSpacings -> { "CellMinHeight" -> 0, "ClosedCellHeight" -> 0, "ClosedGroupTopMargin" -> 0}, CellOpen -> False, CellHorizontalScrolling -> True], Cell[ StyleData["slideshowheader", "Printout"], FontSize -> 8, Magnification -> 0.75]}, Open]], Cell[ StyleData[ "ConferenceGraphicCellSlideShowOnly", StyleDefinitions -> StyleData["ConferenceCellGraphic"]], ShowCellBracket -> False, CellMargins -> 0, CellElementSpacings -> { "CellMinHeight" -> 0, "ClosedCellHeight" -> 0, "ClosedGroupTopMargin" -> 0}, CellOpen -> False], Cell[ CellGroupData[{ Cell[ StyleData["SlideShowNavigationBar"], Editable -> True, Selectable -> False, CellFrame -> 0, ShowGroupOpener -> False, CellMargins -> {{0, 0}, {3, 3}}, CellOpen -> True, CellFrameMargins -> 0, CellFrameColor -> None, Background -> None], Cell[ StyleData["SlideShowNavigationBar", "Printout"], PageBreakAbove -> Automatic]}, Open]]}, Open]]}, Visible -> False, FrontEndVersion -> "8.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (October 5, 2011)", StyleDefinitions -> "Default.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "SlideShowHeader"->{ Cell[26509, 465, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[43970, 899, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[47182, 1000, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[66318, 1468, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[283372, 5284, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[358674, 6886, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"]}, "Info3528082130-9836581"->{ Cell[42949, 865, 385, 10, 43, "Print", CellTags->"Info3528082130-9836581"], Cell[43488, 884, 409, 7, 113, "Print", CellTags->"Info3528082130-9836581"]}, "Simple Example"->{ Cell[47808, 1022, 149, 3, 38, "Input", CellTags->"Simple Example"], Cell[47960, 1027, 768, 11, 70, "Print", CellTags->{"Info3528082131-9836581", "Simple Example"}], Cell[48743, 1041, 254, 6, 63, "Text", CellTags->"Simple Example"], Cell[49022, 1051, 163, 3, 38, "Input", CellTags->"Simple Example"], Cell[49188, 1056, 549, 13, 70, "Output", CellTags->"Simple Example"], Cell[49774, 1074, 1560, 40, 176, "Input", CellTags->"Simple Example"], Cell[51337, 1116, 1004, 15, 70, "Output", CellTags->"Simple Example"], Cell[52390, 1137, 352, 5, 28, "Subsection", CellTags->"Simple Example"], Cell[52767, 1146, 265, 4, 53, "Subsubsection", CellTags->"Simple Example"], Cell[57500, 1257, 312, 5, 37, "Subsubsection", CellTags->"Simple Example"]}, "Info3528082131-9836581"->{ Cell[47960, 1027, 768, 11, 70, "Print", CellTags->{"Info3528082131-9836581", "Simple Example"}]}, "Info3528082132-9836581"->{ Cell[56476, 1230, 533, 9, 70, "Print", CellTags->"Info3528082132-9836581"]} } *) (*CellTagsIndex CellTagsIndex->{ {"SlideShowHeader", 425024, 8231}, {"Info3528082130-9836581", 425588, 8244}, {"Simple Example", 425772, 8249}, {"Info3528082131-9836581", 426589, 8270}, {"Info3528082132-9836581", 426721, 8273} } *) (*NotebookFileOutline Notebook[{ Cell[545, 20, 24817, 412, 2, 11930, 200, "CachedBoxData", "BoxData", \ "hidefromslideshowgraphic"], Cell[CellGroupData[{ Cell[25387, 436, 459, 11, 104, "Title"], Cell[25849, 449, 342, 5, 25, "Subtitle"], Cell[26194, 456, 278, 4, 20, "Subsubtitle"] }, Open ]], Cell[CellGroupData[{ Cell[26509, 465, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[26598, 470, 316, 5, 93, "Section"], Cell[CellGroupData[{ Cell[26939, 479, 176, 3, 48, "Subsection"], Cell[27118, 484, 887, 17, 59, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[28042, 506, 171, 3, 48, "Subsection"], Cell[28216, 511, 954, 17, 37, "Text"], Cell[CellGroupData[{ Cell[29195, 532, 737, 10, 31, "Item"], Cell[29935, 544, 805, 13, 31, "Item"], Cell[30743, 559, 752, 12, 31, "Item"] }, Open ]], Cell[31510, 574, 938, 16, 37, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[32485, 595, 232, 4, 48, "Subsection"], Cell[32720, 601, 601, 10, 37, "Text"], Cell[33324, 613, 642, 13, 37, "Text"], Cell[CellGroupData[{ Cell[33991, 630, 278, 5, 51, "Code"], Cell[CellGroupData[{ Cell[34294, 639, 1973, 49, 59, "Print"], Cell[36270, 690, 2840, 71, 77, "Print"], Cell[39113, 763, 905, 12, 131, "Print"], Cell[40021, 777, 314, 10, 43, "Print"], Cell[40338, 789, 150, 2, 22, "Print"], Cell[40491, 793, 362, 8, 22, "Print"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[40914, 808, 510, 14, 47, "Subsection"], Cell[CellGroupData[{ Cell[41449, 826, 185, 4, 24, "Input"], Cell[41637, 832, 306, 4, 24, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[41980, 841, 198, 3, 24, "Input"], Cell[42181, 846, 608, 10, 40, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[42826, 861, 120, 2, 24, "Input"], Cell[42949, 865, 385, 10, 43, "Print", CellTags->"Info3528082130-9836581"] }, Open ]], Cell[CellGroupData[{ Cell[43371, 880, 114, 2, 24, "Input"], Cell[43488, 884, 409, 7, 113, "Print", CellTags->"Info3528082130-9836581"] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[43970, 899, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[44059, 904, 243, 4, 72, "Section"], Cell[CellGroupData[{ Cell[44327, 912, 191, 2, 36, "Subsection"], Cell[CellGroupData[{ Cell[44543, 918, 270, 5, 33, "Item"], Cell[44816, 925, 313, 6, 57, "Item"], Cell[45132, 933, 240, 4, 57, "Item"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[45421, 943, 139, 1, 28, "Subsection"], Cell[CellGroupData[{ Cell[45585, 948, 231, 5, 33, "Item"], Cell[45819, 955, 143, 2, 33, "Item"], Cell[45965, 959, 158, 3, 33, "Item"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[46172, 968, 102, 1, 28, "Subsection"], Cell[CellGroupData[{ Cell[46299, 973, 203, 3, 33, "Item"], Cell[46505, 978, 211, 3, 33, "Item"], Cell[46719, 983, 140, 2, 33, "Item"] }, Open ]], Cell[46874, 988, 247, 5, 39, "Text"] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[47182, 1000, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[47271, 1005, 261, 4, 72, "Section"], Cell[CellGroupData[{ Cell[47557, 1013, 226, 5, 36, "Subsection"], Cell[CellGroupData[{ Cell[47808, 1022, 149, 3, 38, "Input", CellTags->"Simple Example"], Cell[47960, 1027, 768, 11, 70, "Print", CellTags->{"Info3528082131-9836581", "Simple Example"}] }, Open ]], Cell[48743, 1041, 254, 6, 63, "Text", CellTags->"Simple Example"], Cell[CellGroupData[{ Cell[49022, 1051, 163, 3, 38, "Input", CellTags->"Simple Example"], Cell[49188, 1056, 549, 13, 70, "Output", CellTags->"Simple Example"] }, Open ]], Cell[CellGroupData[{ Cell[49774, 1074, 1560, 40, 176, "Input", CellTags->"Simple Example"], Cell[51337, 1116, 1004, 15, 70, "Output", CellTags->"Simple Example"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[52390, 1137, 352, 5, 28, "Subsection", CellTags->"Simple Example"], Cell[CellGroupData[{ Cell[52767, 1146, 265, 4, 53, "Subsubsection", CellTags->"Simple Example"], Cell[CellGroupData[{ Cell[53057, 1154, 680, 14, 64, "Input", CellID->46583927], Cell[53740, 1170, 421, 7, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[54198, 1182, 541, 12, 89, "Input"], Cell[54742, 1196, 520, 7, 70, "Output"], Cell[55265, 1205, 525, 7, 70, "Output"], Cell[55793, 1214, 520, 7, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[56350, 1226, 123, 2, 38, "Input"], Cell[56476, 1230, 533, 9, 70, "Print", CellTags->"Info3528082132-9836581"] }, Open ]], Cell[57024, 1242, 439, 10, 38, "Input", CellID->100207886] }, Closed]], Cell[CellGroupData[{ Cell[57500, 1257, 312, 5, 37, "Subsubsection", CellTags->"Simple Example"], Cell[57815, 1264, 227, 3, 39, "Text", CellID->158078979], Cell[CellGroupData[{ Cell[58067, 1271, 224, 4, 38, "Input", CellID->898507446], Cell[58294, 1277, 755, 13, 70, "Output"] }, Open ]], Cell[59064, 1293, 221, 3, 39, "Text", CellID->172077646], Cell[59288, 1298, 499, 11, 38, "Input", CellID->581215155], Cell[59790, 1311, 156, 3, 39, "Text", CellID->300442781], Cell[CellGroupData[{ Cell[59971, 1318, 461, 11, 38, "Input", CellID->624621587], Cell[60435, 1331, 3005, 55, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[63477, 1391, 187, 3, 38, "Input"], Cell[63667, 1396, 405, 5, 70, "Output"] }, Open ]], Cell[64087, 1404, 235, 5, 38, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[64359, 1414, 114, 1, 37, "Subsubsection"], Cell[CellGroupData[{ Cell[64498, 1419, 194, 3, 38, "Input"], Cell[64695, 1424, 365, 5, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[65097, 1434, 248, 4, 38, "Input"], Cell[65348, 1440, 342, 5, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[65727, 1450, 147, 2, 38, "Input"], Cell[65877, 1454, 356, 5, 70, "Output"] }, Open ]] }, Closed]] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[66318, 1468, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[66407, 1473, 261, 4, 72, "Section"], Cell[CellGroupData[{ Cell[66693, 1481, 111, 1, 36, "Subsection"], Cell[CellGroupData[{ Cell[66829, 1486, 133, 3, 32, "Subsubsection"], Cell[CellGroupData[{ Cell[66987, 1493, 866, 19, 40, "Input"], Cell[67856, 1514, 206, 4, 24, "Output"] }, Open ]], Cell[68077, 1521, 1693, 38, 112, "Input"], Cell[CellGroupData[{ Cell[69795, 1563, 667, 11, 24, "Input"], Cell[70465, 1576, 7099, 125, 220, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[77613, 1707, 171, 2, 32, "Subsubsection"], Cell[77787, 1711, 1355, 39, 70, "Input"] }, Open ]], Cell[CellGroupData[{ Cell[79179, 1755, 121, 1, 32, "Subsubsection"], Cell[79303, 1758, 114, 1, 31, "Subitem"], Cell[CellGroupData[{ Cell[79442, 1763, 1018, 22, 55, "Input"], Cell[80463, 1787, 1667, 27, 24, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[82167, 1819, 675, 17, 55, "Input"], Cell[82845, 1838, 428, 6, 24, "Output"] }, Open ]], Cell[83288, 1847, 148, 2, 31, "Subitem"], Cell[CellGroupData[{ Cell[83461, 1853, 2000, 52, 115, "Input"], Cell[85464, 1907, 1102, 17, 24, "Output"], Cell[86569, 1926, 1038, 14, 24, "Output"] }, Open ]], Cell[87622, 1943, 165, 2, 31, "Subitem"], Cell[CellGroupData[{ Cell[87812, 1949, 1635, 43, 85, "Input"], Cell[89450, 1994, 1980, 31, 24, "Output"], Cell[91433, 2027, 1805, 26, 24, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[93287, 2059, 188, 4, 32, "Subsubsection"], Cell[93478, 2065, 836, 21, 40, "Input"], Cell[94317, 2088, 1194, 23, 55, "Input"], Cell[95514, 2113, 970, 17, 40, "Input"], Cell[CellGroupData[{ Cell[96509, 2134, 470, 11, 40, "Input"], Cell[96982, 2147, 2505, 36, 24, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[99524, 2188, 664, 16, 40, "Input"], Cell[100191, 2206, 3875, 66, 106, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[104103, 2277, 409, 10, 28, "Input"], Cell[104515, 2289, 1434, 27, 27, "Output"] }, Open ]], Cell[105964, 2319, 349, 8, 28, "Input"], Cell[CellGroupData[{ Cell[106338, 2331, 519, 10, 49, "Input"], Cell[106860, 2343, 210, 3, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[107107, 2351, 371, 8, 49, "Input"], Cell[107481, 2361, 183, 2, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[107701, 2368, 493, 9, 49, "Input"], Cell[108197, 2379, 183, 2, 27, "Output"] }, Open ]], Cell[108395, 2384, 350, 10, 28, "Input"], Cell[CellGroupData[{ Cell[108770, 2398, 470, 10, 28, "Input"], Cell[109243, 2410, 562, 10, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[109842, 2425, 1197, 30, 69, "Input", Evaluatable->False], Cell[111042, 2457, 172245, 2818, 267, 121805, 1989, "CachedBoxData", \ "BoxData", "Output"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[283372, 5284, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[283461, 5289, 246, 3, 39, "Subsection"], Cell[283710, 5294, 613, 13, 56, "Text", CellID->214388999], Cell[CellGroupData[{ Cell[284348, 5311, 183, 2, 35, "Subsubsection"], Cell[284534, 5315, 427, 10, 49, "Input"], Cell[284964, 5327, 937, 21, 109, "Input"], Cell[285904, 5350, 1168, 28, 109, "Input"], Cell[287075, 5380, 522, 13, 49, "Input"], Cell[CellGroupData[{ Cell[287622, 5397, 962, 23, 49, "Input"], Cell[288587, 5422, 4025, 72, 251, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[292661, 5500, 117, 1, 35, "Subsubsection"], Cell[CellGroupData[{ Cell[292803, 5505, 333, 6, 49, "Input"], Cell[293139, 5513, 897, 13, 27, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[294085, 5532, 174, 2, 35, "Subsubsection"], Cell[294262, 5536, 172, 2, 33, "ItemNumbered"], Cell[294437, 5540, 142, 1, 33, "Text"], Cell[294582, 5543, 705, 15, 69, "Input"], Cell[CellGroupData[{ Cell[295312, 5562, 484, 12, 28, "Input"], Cell[295799, 5576, 3696, 64, 243, "Output"] }, Open ]], Cell[299510, 5643, 172, 2, 33, "ItemNumbered"], Cell[299685, 5647, 135, 1, 33, "Text"], Cell[299823, 5650, 749, 17, 69, "Input"], Cell[CellGroupData[{ Cell[300597, 5671, 875, 20, 49, "Input"], Cell[301475, 5693, 5314, 89, 244, "Output"] }, Open ]], Cell[306804, 5785, 174, 2, 33, "ItemNumbered"], Cell[306981, 5789, 114, 1, 33, "Text"], Cell[307098, 5792, 600, 15, 69, "Input"], Cell[CellGroupData[{ Cell[307723, 5811, 760, 20, 49, "Input"], Cell[308486, 5833, 4506, 76, 244, "Output"] }, Open ]], Cell[313007, 5912, 131, 1, 33, "ItemNumbered"], Cell[CellGroupData[{ Cell[313163, 5917, 552, 14, 49, "Input"], Cell[313718, 5933, 854, 15, 27, "Output"], Cell[314575, 5950, 839, 15, 27, "Output"] }, Open ]], Cell[315429, 5968, 122, 1, 33, "ItemNumbered"] }, Open ]], Cell[CellGroupData[{ Cell[315588, 5974, 161, 2, 35, "Subsubsection"], Cell[315752, 5978, 327, 7, 55, "Text"], Cell[CellGroupData[{ Cell[316104, 5989, 693, 15, 28, "Input"], Cell[316800, 6006, 1219, 32, 47, "Output"] }, Open ]], Cell[318034, 6041, 671, 18, 49, "Input"], Cell[CellGroupData[{ Cell[318730, 6063, 493, 14, 49, "Input"], Cell[319226, 6079, 523, 11, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[319786, 6095, 175, 3, 28, "Input"], Cell[319964, 6100, 1221, 31, 47, "Output"] }, Open ]], Cell[321200, 6134, 134, 3, 28, "Input"], Cell[321337, 6139, 2056, 47, 129, "Input"], Cell[CellGroupData[{ Cell[323418, 6190, 666, 18, 89, "Input"], Cell[324087, 6210, 206, 5, 27, "Output"] }, Open ]], Cell[324308, 6218, 4136, 99, 329, "Input"], Cell[CellGroupData[{ Cell[328469, 6321, 162, 3, 28, "Input"], Cell[328634, 6326, 214, 5, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[328885, 6336, 497, 13, 28, "Input"], Cell[329385, 6351, 557, 14, 237, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[329979, 6370, 461, 13, 28, "Input"], Cell[330443, 6385, 905, 23, 47, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[331385, 6413, 182, 3, 28, "Input"], Cell[331570, 6418, 26594, 445, 307, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[358201, 6868, 69, 1, 28, "Input"], Cell[358273, 6871, 328, 7, 27, "Output"] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[358674, 6886, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[358763, 6891, 177, 3, 77, "Section"], Cell[358943, 6896, 115, 1, 39, "Subsection"], Cell[359061, 6899, 111, 1, 31, "Subsection"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)