(* Content-type: application/vnd.wolfram.cdf.text *) (*** Wolfram CDF File ***) (* http://www.wolfram.com/cdf *) (* CreatedBy='Mathematica 8.0' *) (*************************************************************************) (* *) (* The Mathematica License under which this file was created prohibits *) (* restricting third parties in receipt of this file from republishing *) (* or redistributing it by any means, including but not limited to *) (* rights management or terms of use, without the express consent of *) (* Wolfram Research, Inc. *) (* *) (*************************************************************************) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 835, 17] NotebookDataLength[ 179008, 3933] NotebookOptionsPosition[ 102800, 2263] NotebookOutlinePosition[ 169720, 3621] CellTagsIndexPosition[ 169640, 3616] 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}}, Background->None], Cell[CellGroupData[{ Cell[TextData[StyleBox["Publishing with CDF", FontSize->36]], "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.527440875593625*^9, 3.527440908180472*^9}}], Cell["Maryka Trent Baraka", "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.5274408894433537`*^9, 3.5274408927966967`*^9}}], Cell["\<\ Publishing Programs Manager, Wolfram Research\ \>", "Subsubtitle", CellChangeTimes->{ 3.483202458953512*^9, {3.495105345328125*^9, 3.495105347890625*^9}, { 3.49510644571875*^9, 3.495106448390625*^9}, {3.5143083980990458`*^9, 3.514308409442589*^9}, {3.527440895807312*^9, 3.527440905229032*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Introduction\ \>", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.514308340990994*^9, 3.514308352103572*^9}, { 3.528015914225189*^9, 3.528015918299827*^9}, 3.528076346577712*^9}], Cell[CellGroupData[{ Cell["If you:", "Subsubsection", CellChangeTimes->{ 3.483202458956718*^9, {3.514308604990972*^9, 3.514308608117634*^9}, { 3.528057478758195*^9, 3.528057480309353*^9}}], Cell[CellGroupData[{ Cell["\<\ Have visited a Wolfram website recently...\ \>", "Item", CellChangeTimes->{{3.514308685867784*^9, 3.5143086898336887`*^9}, { 3.528057496501933*^9, 3.528057506807272*^9}, {3.528058084166213*^9, 3.52805810337227*^9}, {3.528059743859796*^9, 3.528059745998631*^9}, { 3.528059793578354*^9, 3.528059794543899*^9}, {3.528059832334998*^9, 3.5280598495261593`*^9}}], Cell["\<\ Receive a Wolfram newsletter...\ \>", "Item", CellChangeTimes->{3.528059573656851*^9}], Cell["\<\ Registered for this conference through the website...\ \>", "Item", CellChangeTimes->{{3.528058234303088*^9, 3.5280582607021303`*^9}}], Cell["\<\ Attended Stephen\[CloseCurlyQuote]s keynote, Andre\[CloseCurlyQuote]s \ presentation, or one of a half-dozen other talks yesterday...\ \>", "Item", CellChangeTimes->{{3.5280582498941803`*^9, 3.528058257648562*^9}, { 3.528059894707498*^9, 3.528059897436755*^9}}] }, Open ]], Cell["\<\ Then you\[CloseCurlyQuote]re probably already aware that we released a new \ interactive document format called CDF almost 3 months ago to the day today, \ on July 21, 2011. If you\[CloseCurlyQuote]re at this talk and you...\ \>", "Text", CellChangeTimes->{{3.514308699630146*^9, 3.5143087026260366`*^9}, { 3.528058596430292*^9, 3.528058620663183*^9}, 3.528058734950533*^9, 3.528058884694881*^9, {3.528059427390603*^9, 3.528059428530964*^9}, { 3.528060152218417*^9, 3.528060152717229*^9}, {3.528060206483183*^9, 3.5280602238880377`*^9}, {3.5280602558742847`*^9, 3.528060257081828*^9}}] }, Closed]], Cell[CellGroupData[{ Cell["\<\ ...are interested in the possibilities of publishing with CDF, then you\ \[CloseCurlyQuote]re in the right place.\ \>", "Subsubsection", CellChangeTimes->{ 3.495195152875*^9, {3.514308612183352*^9, 3.514308615549415*^9}, 3.528057641011387*^9, {3.528057840876779*^9, 3.528057871546213*^9}, { 3.5280585059290543`*^9, 3.528058528420569*^9}, {3.528058649203607*^9, 3.528058670146015*^9}, {3.528058831293172*^9, 3.528058863939973*^9}, { 3.528059677941773*^9, 3.528059685123448*^9}}], Cell["\<\ Have visited the Wolfram website since March... Are on any Wolfram mailing list... Registered for this conference... Attended Stephen's keynote or one of a half-dozen other talks yesterday... ...Then you're probably already aware that we released a new format called \ CDF almost 3 months ago to the day today, on July 21, 2011. If you attended You've likely heard a lot about CDF thus far during the \ conference, possibly read Publishing with CDF blog post 1. CDF launched 3 months ago almost to the day 2. Lots of interest thus far, etc. B. Opens new avenues/possibilities for e-publishing of all kinds. I will talk about existing possibilities and what you may have seen already, as well as some future directions we're working towards. \ \>", "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.528015942695285*^9, 3.5280160073534403`*^9}, {3.528056231630727*^9, 3.528056259779005*^9}, { 3.528056995903164*^9, 3.5280573880684547`*^9}, {3.528073307071979*^9, 3.528073311997306*^9}}] }, Closed]], Cell[CellGroupData[{ Cell["But wait...!", "Subsubsection", CellChangeTimes->{ 3.483202458956718*^9, {3.514308604990972*^9, 3.514308608117634*^9}, { 3.528057478758195*^9, 3.528057480309353*^9}, {3.528072718094339*^9, 3.528072720636801*^9}, {3.5280731487546577`*^9, 3.5280731686154327`*^9}}], Cell[CellGroupData[{ Cell["\<\ What do you mean by \ \[OpenCurlyDoubleQuote]publishing\[CloseCurlyDoubleQuote]? Is this session \ only relevant for would-be ebook authors or publishers?\ \>", "Item", CellChangeTimes->{{3.514308685867784*^9, 3.5143086898336887`*^9}, { 3.528057496501933*^9, 3.528057506807272*^9}, {3.528058084166213*^9, 3.52805810337227*^9}, {3.528059743859796*^9, 3.528059745998631*^9}, { 3.528059793578354*^9, 3.528059794543899*^9}, {3.528059832334998*^9, 3.5280598495261593`*^9}, {3.528072727989792*^9, 3.5280727916428127`*^9}, { 3.528073186111518*^9, 3.528073186258778*^9}}], Cell[CellGroupData[{ Cell["\<\ No, with CDF we are looking to service a broad range of publishing needs:\ \>", "ItemParagraph", CellChangeTimes->{ 3.528059573656851*^9, {3.5280728307857313`*^9, 3.528072846417067*^9}, { 3.528072878225512*^9, 3.528072878231333*^9}, {3.5280732023267107`*^9, 3.528073253742496*^9}}], Cell[CellGroupData[{ Cell["Academic or trade e-books", "Subitem", CellChangeTimes->{ 3.528059573656851*^9, {3.5280728307857313`*^9, 3.528072846417067*^9}, { 3.528072878225512*^9, 3.528072893904646*^9}, {3.528072931086759*^9, 3.528072941556067*^9}}], Cell["\<\ Journals, magazines, and news articles\ \>", "Subitem", CellChangeTimes->{{3.5280729432299747`*^9, 3.528072961830151*^9}}], Cell["Reports and presentations", "Subitem", CellChangeTimes->{{3.528072964429645*^9, 3.528072968280442*^9}, { 3.528073534224367*^9, 3.528073534227387*^9}}], Cell["Lecture notes and courseware", "Subitem", CellChangeTimes->{{3.52807353609231*^9, 3.528073540107541*^9}}], Cell["\<\ Blogging and social media communications\ \>", "Subitem", CellChangeTimes->{{3.5280729702851954`*^9, 3.528072984839706*^9}}], Cell["Digital content repositories", "Subitem", CellChangeTimes->{{3.528072987765368*^9, 3.5280730014791613`*^9}}], Cell[TextData[{ "...and more, as shown in the examples on the ", ButtonBox["CDF website", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.wolfram.com/cdf/uses-examples/"], None}, ButtonNote->"http://www.wolfram.com/cdf/uses-examples/"], ".\[LineSeparator]" }], "Subitem", CellChangeTimes->{{3.528073382866754*^9, 3.528073386745611*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell["\<\ CDF opens up new avenues for e-publishing of all kinds. This talk will \ address some existing possibilities and examples you may have seen already, \ as well as some future directions we're working towards. \ \>", "Text", CellChangeTimes->{ 3.528059573656851*^9, {3.5280728307857313`*^9, 3.528072846417067*^9}, { 3.528072878225512*^9, 3.528072893904646*^9}, {3.52807300623048*^9, 3.528073017565426*^9}, 3.5280733740424967`*^9, {3.528073413181055*^9, 3.528073413728898*^9}, {3.52807345096059*^9, 3.528073479654361*^9}}] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Publishing with CDF: Mechanics", "Section", CellChangeTimes->{ 3.483202458956058*^9, {3.514309203943825*^9, 3.514309209861143*^9}, { 3.5280160946643343`*^9, 3.5280161083097897`*^9}, {3.528073709665163*^9, 3.528073732023018*^9}, {3.528074009950199*^9, 3.528074016152954*^9}}], Cell[CellGroupData[{ Cell["\<\ a.k.a. \[OpenCurlyDoubleQuote]What this talk is not about\ \[CloseCurlyDoubleQuote]\ \>", "Subsubsection", CellChangeTimes->{{3.528074047821601*^9, 3.528074055956628*^9}, { 3.52807455821379*^9, 3.528074571229631*^9}}], Cell[TextData[{ "For the purposes of this session, I am not focusing on the mechanics of \ publishing with CDF. Hopefully you caught Andre Kuzniarek\[CloseCurlyQuote]s \ talk yesterday on Getting Started with CDF, or Eric Schulz\[CloseCurlyQuote]s \ Wisdom Gained from Publishing a CDF ebook. If you missed either of those \ presentations, I would strongly encourage you to look for the slides when \ they are posted after the conference.\n\nWhat I will briefly reiterate is \ that, in the context of publishing, there are currently three ways to deploy \ CDF, as outlined on the ", ButtonBox["CDF website", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.wolfram.com/cdf/adopting-cdf/deploying-cdf/"], None}, ButtonNote->"http://www.wolfram.com/cdf/adopting-cdf/deploying-cdf/"], ": " }], "Text", CellChangeTimes->{{3.5143080983732347`*^9, 3.514308102892667*^9}, { 3.514308469349834*^9, 3.5143084713580437`*^9}, {3.514308507511819*^9, 3.514308539833797*^9}, {3.528016110094366*^9, 3.528016143115267*^9}, { 3.528016174635027*^9, 3.528016193892027*^9}, {3.528073737948333*^9, 3.5280737403127317`*^9}, {3.528073778032262*^9, 3.528073780792069*^9}, { 3.528073849333578*^9, 3.528073880010394*^9}, {3.528073970491407*^9, 3.528073970680811*^9}, {3.528074093712203*^9, 3.52807430883685*^9}, { 3.528074891485434*^9, 3.528074950778202*^9}, {3.528077995723*^9, 3.5280779970936213`*^9}, {3.528078093951982*^9, 3.5280781186505423`*^9}, { 3.528091701771183*^9, 3.528091702438335*^9}}], Cell[CellGroupData[{ Cell["\<\ As a full-screen document within a browser\ \>", "ItemNumbered", CellChangeTimes->{{3.5143080983732347`*^9, 3.514308102892667*^9}, { 3.514308469349834*^9, 3.5143084713580437`*^9}, {3.514308507511819*^9, 3.514308539833797*^9}, {3.528016110094366*^9, 3.528016143115267*^9}, { 3.528016174635027*^9, 3.528016193892027*^9}, {3.528073737948333*^9, 3.5280737403127317`*^9}, {3.528073778032262*^9, 3.528073780792069*^9}, { 3.528073849333578*^9, 3.528073880010394*^9}, {3.528073970491407*^9, 3.528073970680811*^9}, {3.528074093712203*^9, 3.5280743443307037`*^9}}], Cell["\<\ As an embedded object in a web page\ \>", "ItemNumbered", CellChangeTimes->{{3.5280743497180443`*^9, 3.528074350377235*^9}}], Cell["\<\ As a standalone desktop application or document\ \>", "ItemNumbered", CellChangeTimes->{3.5280743580221767`*^9}] }, Open ]], Cell[TextData[{ "On the site, we provide ", ButtonBox["instructions", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.wolfram.com/cdf/adopting-cdf/deploying-cdf/web-delivery.\ html"], None}, ButtonNote-> "http://www.wolfram.com/cdf/adopting-cdf/deploying-cdf/web-delivery.html"],\ " for formatting your CDFs for web delivery, and we also provide a ", ButtonBox["WordPress plugin", BaseStyle->"Hyperlink", ButtonData->{ URL["http://wordpress.org/extend/plugins/wolfram-cdf-plugin/"], None}, ButtonNote->"http://wordpress.org/extend/plugins/wolfram-cdf-plugin/"], " for bloggers. That said, we're working to make the web delivery process \ even easier with the CDF Deployment Wizard that will be available soon in our \ next ", StyleBox["Mathematica", FontSlant->"Italic"], " update." }], "Text", CellChangeTimes->{{3.5143080983732347`*^9, 3.514308102892667*^9}, { 3.514308469349834*^9, 3.5143084713580437`*^9}, {3.514308507511819*^9, 3.514308539833797*^9}, {3.528016110094366*^9, 3.528016143115267*^9}, { 3.528016174635027*^9, 3.528016193892027*^9}, {3.528073737948333*^9, 3.5280737403127317`*^9}, {3.528073778032262*^9, 3.528073780792069*^9}, { 3.528073849333578*^9, 3.528073880010394*^9}, {3.528073970491407*^9, 3.528073970680811*^9}, {3.528074093712203*^9, 3.528074293211801*^9}, { 3.528074387982085*^9, 3.528074389690744*^9}, {3.528074424771117*^9, 3.528074545594096*^9}, {3.528074788352333*^9, 3.528074856516164*^9}, { 3.528074998255562*^9, 3.52807502545614*^9}, {3.528078135449749*^9, 3.52807814203332*^9}, {3.5280781938969107`*^9, 3.5280781938999443`*^9}, { 3.528091725118507*^9, 3.528091727534521*^9}}], Cell["\<\ For more detailed instruction on how to deploy CDF, please plan to attend the \ hands-on CDF workshop tomorrow led by Andre and Yu-Sung Chang.\ \>", "Text", CellChangeTimes->{{3.5143080983732347`*^9, 3.514308102892667*^9}, { 3.514308469349834*^9, 3.5143084713580437`*^9}, {3.514308507511819*^9, 3.514308539833797*^9}, {3.528016110094366*^9, 3.528016143115267*^9}, { 3.528016174635027*^9, 3.528016193892027*^9}, {3.528073737948333*^9, 3.5280737403127317`*^9}, {3.528073778032262*^9, 3.528073780792069*^9}, { 3.528073849333578*^9, 3.528073880010394*^9}, {3.528073970491407*^9, 3.528073970680811*^9}, {3.528074093712203*^9, 3.528074293211801*^9}, { 3.528074387982085*^9, 3.528074389690744*^9}, {3.528074424771117*^9, 3.528074545594096*^9}, {3.528074788352333*^9, 3.528074878347803*^9}, { 3.528075037631568*^9, 3.528075040286879*^9}, {3.528091753205289*^9, 3.528091753980879*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[StyleBox["Publishing with CDF: Initial Considerations", \ "Section"]], "Section", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.5280759908578568`*^9}, {3.528076069271784*^9, 3.528076071986939*^9}}], Cell[TextData[{ "Since we launched CDF, we have seen significant interest from many authors, \ publishers, and ", StyleBox["Mathematica", FontSlant->"Italic"], " users in general wanting to enhance and deploy their content with this \ technology. While the introduction of CDF represents a tremendous milestone, \ there are some things to keep in mind:" }], "Text", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, 3.5280772790284986`*^9, {3.5280782410581207`*^9, 3.52807838752982*^9}}], Cell[CellGroupData[{ Cell["Two deployment elements", "Subsubsection", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.5280773071223*^9}, {3.528077485820374*^9, 3.528077490788209*^9}}], Cell[CellGroupData[{ Cell[TextData[{ "CDF content created in ", StyleBox["Mathematica", FontSlant->"Italic"], " (currently the only authoring environment for CDF)" }], "ItemNumbered", CellChangeTimes->{{3.528077334354884*^9, 3.528077347448107*^9}, { 3.5280787541295652`*^9, 3.528078764221871*^9}}], Cell[TextData[{ "The ", ButtonBox["CDF Player", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.wolfram.com/cdf-player/"], None}, ButtonNote->"http://www.wolfram.com/cdf-player/"], ", a free runtime application that must be downloaded and installed to the \ client machine. " }], "ItemNumbered", CellChangeTimes->{{3.528077348936562*^9, 3.5280774667410183`*^9}, { 3.528077698975778*^9, 3.5280777084218607`*^9}, {3.5280780481854153`*^9, 3.528078048189415*^9}, {3.5280918118951893`*^9, 3.528091812531247*^9}}] }, Open ]], Cell[TextData[{ "If you have CDF content in your product or publication and your end user \ does not have the CDF Player installed on their machine, they will not be \ able to view and/or interact with the content. We have provided an array of \ ", ButtonBox["Wolfram CDF icons", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.wolfram.com/cdf/adopting-cdf/deploying-cdf/cdf-icons.\ html"], None}, ButtonNote-> "http://www.wolfram.com/cdf/adopting-cdf/deploying-cdf/cdf-icons.html"], " for download from the site that can be used to direct readers to download \ the CDF Player or to otherwise indicate that your content is enhanced with \ CDF technology. " }], "Text", CellChangeTimes->{{3.528077348936562*^9, 3.5280774667410183`*^9}, { 3.528077698975778*^9, 3.5280778263220987`*^9}, {3.52807785729027*^9, 3.528077929647053*^9}, {3.5280784045848513`*^9, 3.528078443321108*^9}, { 3.528078794409206*^9, 3.528078812271158*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Two overarching types of usage", "Subsubsection", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.528077286556156*^9}, {3.528077385967849*^9, 3.528077386336319*^9}, {3.528077483660859*^9, 3.528077505292053*^9}, { 3.5280775668982677`*^9, 3.528077568977858*^9}, {3.528077619529763*^9, 3.5280776445876427`*^9}}], Cell[CellGroupData[{ Cell["\<\ Noncommercial CDF (aka FreeCDF)\ \>", "ItemNumbered", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.528077286556156*^9}, {3.528077385967849*^9, 3.528077386336319*^9}, {3.528077483660859*^9, 3.528077519219368*^9}, { 3.528077560898185*^9, 3.528077562025979*^9}, {3.528079795926914*^9, 3.528079801134304*^9}}], Cell["Commercial CDF", "ItemNumbered", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.528077286556156*^9}, {3.528077385967849*^9, 3.528077386336319*^9}, {3.528077483660859*^9, 3.5280775222274323`*^9}, { 3.528077556946394*^9, 3.528077559378352*^9}}] }, Open ]], Cell[TextData[{ "Licensing options are outlined under the ", ButtonBox["Adopting CDF ", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.wolfram.com/cdf/adopting-cdf/licensing-options.html"], None}, ButtonNote-> "http://www.wolfram.com/cdf/adopting-cdf/licensing-options.html"], "section of the CDF website." }], "Text", CellChangeTimes->{{3.528077585043351*^9, 3.528077606708222*^9}, { 3.528078577903594*^9, 3.5280786364947643`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Level of CDF enablement", "Subsubsection", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.528077286556156*^9}, {3.528077385967849*^9, 3.528077386336319*^9}, {3.528077483660859*^9, 3.528077505292053*^9}, { 3.5280775668982677`*^9, 3.528077568977858*^9}, {3.528077619529763*^9, 3.5280776445876427`*^9}, {3.528079691460092*^9, 3.5280797146328573`*^9}, { 3.52810172544059*^9, 3.528101728038513*^9}}], Cell[CellGroupData[{ Cell["Publishing-enabled", "ItemNumbered", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.528077286556156*^9}, {3.528077385967849*^9, 3.528077386336319*^9}, {3.528077483660859*^9, 3.528077519219368*^9}, { 3.528077560898185*^9, 3.528077562025979*^9}, {3.528079721257279*^9, 3.5280797274964733`*^9}}], Cell["Pro-enabled", "ItemNumbered", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, 3.528076083646985*^9, {3.528076685454817*^9, 3.528076695752267*^9}, {3.528076958527372*^9, 3.528076968212257*^9}, { 3.5280772790284986`*^9, 3.528077286556156*^9}, {3.528077385967849*^9, 3.528077386336319*^9}, {3.528077483660859*^9, 3.5280775222274323`*^9}, { 3.528077556946394*^9, 3.528077559378352*^9}, {3.5280797303925953`*^9, 3.5280797319841537`*^9}}] }, Open ]], Cell[TextData[{ StyleBox["Mathematica", FontSlant->"Italic"], " 8 produces FreeCDF, which enables a level of functionality equivalent to \ anything you might see on the Wolfram Demonstrations Project. However, there \ are levels of CDF-enablement beyond what ", StyleBox["Mathematica", FontSlant->"Italic"], " 8 allows by default. Publishing-enabled content can be commercially \ distributed without the Wolfram branding elements and redistribution terms \ required for FreeCDF. If you require pro levels of enablement, you will \ either need to use our Player Pro product or contact Wolfram to see if custom \ publishing arrangements can be made." }], "Text", CellChangeTimes->{{3.5280797838726397`*^9, 3.528080188923358*^9}, { 3.528091910659487*^9, 3.528091910912366*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Using FreeCDF\ \>", "Section", CellChangeTimes->{{3.5280761109445677`*^9, 3.528076137469714*^9}}], Cell[TextData[{ "If you do not require any functionality beyond that which is possible by \ default in ", StyleBox["Mathematica", FontSlant->"Italic"], " 8 with FreeCDF, and if you are not planning to restrict access to and/or \ redistribution of your content, FreeCDF may be a good fit for you. Our \ FreeCDF terms essentially follow a Creative Commons Noncommercial/Share-Alike \ license model for open content. Sample use cases include:" }], "Text", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076157206653*^9}, 3.528076389139682*^9, { 3.5280802515804663`*^9, 3.528080330798664*^9}, {3.528080368385808*^9, 3.5280803906926537`*^9}, {3.528080558880294*^9, 3.528080566960167*^9}, { 3.528080816963443*^9, 3.528080886717787*^9}, {3.528090836973721*^9, 3.52809083849664*^9}}], Cell[CellGroupData[{ Cell["\<\ instructor delivery of free course materials to students and/or student \ submission of assignments\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076157206653*^9}, 3.528076389139682*^9, { 3.5280802515804663`*^9, 3.528080334054191*^9}, {3.52808042526753*^9, 3.528080475753934*^9}}], Cell["\<\ presentation and distribution of internal company/organizational reports\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076157206653*^9}, 3.528076389139682*^9, { 3.5280802515804663`*^9, 3.528080336030558*^9}, {3.528080422836855*^9, 3.5280804234355383`*^9}, {3.5280804851011267`*^9, 3.52808053825979*^9}}], Cell["free and redistributable CDF ebooks or apps", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076157206653*^9}, 3.528076389139682*^9, { 3.5280802515804663`*^9, 3.528080364997326*^9}, 3.528080409127592*^9, { 3.528080891304392*^9, 3.528080891310363*^9}}], Cell["\<\ CDF content included in a noncommercial, open-access blog, journal, or news \ article\ \>", "Item", CellChangeTimes->{{3.5280809239898853`*^9, 3.528080980134738*^9}}] }, Open ]], Cell["\<\ If you want to protect your content from redistribution, or plan to monetize \ it, then a commercial CDF licensing arrangement with Wolfram would be needed. \ As these early adopters have done...\ \>", "Text", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076157206653*^9}, 3.528076389139682*^9, { 3.5280802515804663`*^9, 3.528080364997326*^9}, 3.528080409127592*^9, 3.528080554140005*^9, 3.528080808759143*^9, {3.52808099477032*^9, 3.528081070128292*^9}, {3.528088094220623*^9, 3.528088118940021*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Commercial Use Cases\ \>", "Section", CellChangeTimes->{{3.5280761109445677`*^9, 3.528076137469714*^9}, { 3.528076169951091*^9, 3.528076172828483*^9}}], Cell[CellGroupData[{ Cell["CDF-only ebooks", "Subsubsection", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, { 3.528081146153327*^9, 3.528081197772087*^9}, {3.528081380814476*^9, 3.528081386670319*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox[ButtonBox["Calculus", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.pearsonhighered.com/briggscochran1einfo/"], None}, ButtonNote->"http://www.pearsonhighered.com/briggscochran1einfo/"], FontSlant->"Italic"], StyleBox[" ", FontSlant->"Italic"], "by Briggs, Cochran, Gillett, and Schulz, published by Pearson Education in \ 2010" }], "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.5280812380594263`*^9}, { 3.5280813899909697`*^9, 3.5280814013738413`*^9}, {3.528102495035565*^9, 3.5281024950402527`*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Format:", FontWeight->"Bold"], " Print text with CDF-only ebook authored in ", StyleBox["Mathematica", FontSlant->"Italic"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081653782104*^9}, {3.528083253575472*^9, 3.528083258619718*^9}, 3.528083708008624*^9}], Cell[TextData[{ StyleBox["Deployment mode:", FontWeight->"Bold"], " Initially as a desktop application using CDF-beta technology; now \ primarily as full-screen CDF in a browser " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081663878201*^9}, {3.528081696582035*^9, 3.5280816979908953`*^9}, { 3.528082190494864*^9, 3.528082213333809*^9}, 3.5280837080099907`*^9}], Cell[TextData[{ StyleBox["Implementation:", FontWeight->"Bold"], " A pilot project between Wolfram and Pearson as a marketable proof of \ concept, distributed through MyMathLab" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081661262162*^9}, {3.528081881999918*^9, 3.528081884343639*^9}, 3.528083708010448*^9, {3.528087307262803*^9, 3.528087329362658*^9}}], Cell[TextData[{ StyleBox["Project Needs:", FontWeight->"Bold"], " " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.5280817408275213`*^9}, { 3.528082093563984*^9, 3.5280820942089157`*^9}, {3.528082378500332*^9, 3.5280823790255938`*^9}, 3.528083708010852*^9}], Cell[CellGroupData[{ Cell["\<\ Content enablement (\"signing\") for CDF-beta technology delivery\ \>", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, 3.528083708012908*^9}], Cell["\<\ Pearson website infrastructure support for Player download and installation\ \>", "SubitemParagraph", CellChangeTimes->{{3.528081894110939*^9, 3.528081938604598*^9}, 3.528083708013242*^9, {3.528083814312255*^9, 3.528083814318984*^9}}], Cell["", "SubitemParagraph"] }, Open ]] }, Open ]], Cell[TextData[{ StyleBox["Risk and Reward: The Science of Casino Blackjack", FontSlant->"Italic"], " by Richard Werthamer, interactive edition published in 2011" }], "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, 3.5280819408943996`*^9, {3.528081980525824*^9, 3.528082021829032*^9}, {3.528082461993205*^9, 3.528082482017016*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Format:", FontWeight->"Bold"], " CDF-only ebook authored in ", StyleBox["Mathematica", FontSlant->"Italic"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081653782104*^9}, {3.528083266085235*^9, 3.528083277157476*^9}}], Cell[TextData[{ StyleBox["Deployment mode:", FontWeight->"Bold"], " Initially none (available as a print book published by Springer); now as \ full-screen CDF in a browser " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081663878201*^9}, {3.528081696582035*^9, 3.5280816979908953`*^9}, { 3.528082135176279*^9, 3.5280822274850883`*^9}}], Cell[TextData[{ StyleBox["Implementation:", FontWeight->"Bold"], " Werthamer regained digital publication rights and has self-published his \ ebook, distributing it through his own ", ButtonBox["website", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.blackjack-science.net/?page_id=133"], None}, ButtonNote->"http://www.blackjack-science.net/?page_id=133"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081661262162*^9}, {3.528081881999918*^9, 3.528081884343639*^9}, 3.528082165623008*^9, {3.528082233668885*^9, 3.528082302298622*^9}, { 3.528083404753577*^9, 3.528083404757169*^9}}], Cell[TextData[{ StyleBox["Project Needs:", FontWeight->"Bold"], " " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.5280817408275213`*^9}, { 3.528082093563984*^9, 3.5280820942089157`*^9}, {3.52808239391324*^9, 3.528082394524918*^9}}], Cell[CellGroupData[{ Cell["\<\ Content enablement (\"signing\") for CDF delivery\ \>", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, {3.528082314946295*^9, 3.528082315346431*^9}}], Cell["\<\ Commercial runtime licensing agreement\ \>", "SubitemParagraph", CellChangeTimes->{{3.528081894110939*^9, 3.528081938604598*^9}, { 3.528082326033729*^9, 3.528082358336986*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell["\<\ These two projects represent nearly opposite ends of the spectrum in terms of \ the project audiences and specifications. This underscores the range of (web) \ publishing applications that CDF now enables us to advance. Traditional \ publishing budgets and \[OpenCurlyDoubleQuote]interactive\ \[CloseCurlyDoubleQuote] technologies tend to only allow any real degree of \ interactivity to be included in big-budget projects. CDF lowers the cost of \ entry while enabling subject matter experts to create higher quality content.\ \ \>", "Text", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, 3.5280819408943996`*^9, {3.528081980525824*^9, 3.52808202324332*^9}, 3.528082125082673*^9, {3.528082600995429*^9, 3.528083049243889*^9}, {3.528083449540043*^9, 3.528083455231862*^9}, { 3.528083883302834*^9, 3.52808388455678*^9}, {3.528086360037024*^9, 3.528086361289557*^9}}], Cell[TextData[{ "While Werthamer chose to create his own website, it is also possible to \ distribute your fully-CDF ebook in the current Wolfram web store under a \ non-exclusive distribution agreement. This is a longstanding delivery channel \ we\[CloseCurlyQuote]ve had in place for third-party applications and a few ", StyleBox["Mathematica-", FontSlant->"Italic"], "based ebook titles. CDF enables you to leverage this same channel to reach \ a broader audience, as your reader does not need to also purchase ", StyleBox["Mathematica", FontSlant->"Italic"], "--they can use the free CDF Player instead. " }], "Text", CellChangeTimes->{{3.5280882235050898`*^9, 3.528088559333322*^9}, { 3.52808859954255*^9, 3.528088618181403*^9}, {3.528091131912898*^9, 3.5280912247405043`*^9}, {3.5281017741566763`*^9, 3.528101801844665*^9}, 3.528101860420999*^9}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Commercial Use Cases\ \>", "Section", CellChangeTimes->{{3.5280761109445677`*^9, 3.528076137469714*^9}, { 3.528076169951091*^9, 3.528076172828483*^9}}], Cell[CellGroupData[{ Cell["CDF-enhanced ebooks", "Subsubsection", CellChangeTimes->{{3.52808448301902*^9, 3.528084487928335*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox[ButtonBox["Calculus and Its Applications", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.pearsonhighered.com/educator/product/Calculus-and-Its-\ Applications/9780321694331.page"], None}, ButtonNote-> "http://www.pearsonhighered.com/educator/product/Calculus-and-Its-\ Applications/9780321694331.page"], FontSlant->"Italic"], StyleBox[" ", FontSlant->"Italic"], "by Bittinger et. al., published by Pearson Education in 2011" }], "Item", CellChangeTimes->{ 3.528076524821251*^9, {3.5280844915372868`*^9, 3.528084512908708*^9}, { 3.528084708482312*^9, 3.528084723489373*^9}, {3.528084847638536*^9, 3.52808487023709*^9}, {3.528102554693123*^9, 3.52810255469779*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Format:", FontWeight->"Bold"], " Print text with CDF interactive figures authored in ", StyleBox["Mathematica", FontSlant->"Italic"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081653782104*^9}, {3.528083253575472*^9, 3.528083258619718*^9}, 3.528083708008624*^9, {3.528092333381613*^9, 3.528092340339037*^9}}], Cell[TextData[{ StyleBox["Deployment mode:", FontWeight->"Bold"], " Supplementary interactive figures linked from within a Flash ebook; open \ in separate browser window" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081663878201*^9}, {3.528081696582035*^9, 3.5280816979908953`*^9}, { 3.528082190494864*^9, 3.528082213333809*^9}, 3.5280837080099907`*^9, { 3.528084542960908*^9, 3.528084581429727*^9}, {3.528087181384878*^9, 3.528087209971764*^9}}], Cell[TextData[{ StyleBox["Implementation:", FontWeight->"Bold"], " By commercial distribution agreement between Wolfram and Pearson, \ distributed through MyMathLab" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081661262162*^9}, {3.528081881999918*^9, 3.528081884343639*^9}, 3.528083708010448*^9, {3.528084598813266*^9, 3.52808462957232*^9}, 3.528087337184423*^9}], Cell[TextData[{ StyleBox["Project Needs:", FontWeight->"Bold"], " " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.5280817408275213`*^9}, { 3.528082093563984*^9, 3.5280820942089157`*^9}, {3.528082378500332*^9, 3.5280823790255938`*^9}, 3.528083708010852*^9}], Cell[CellGroupData[{ Cell["Content enablement (\"signing\") for CDF delivery", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, 3.528083708012908*^9, { 3.528084644588256*^9, 3.528084644593466*^9}, 3.5280923618501577`*^9}], Cell["CDF runtime licensing", "SubitemParagraph", CellChangeTimes->{{3.528084645019537*^9, 3.528084675906887*^9}}], Cell["\<\ Pearson website infrastructure support for Player download and installation\ \>", "SubitemParagraph", CellChangeTimes->{{3.528081894110939*^9, 3.528081938604598*^9}, 3.528083708013242*^9, {3.528083814312255*^9, 3.528083814318984*^9}, { 3.528084987636553*^9, 3.5280849876408377`*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell["\<\ There are several more such projects in the works, with Pearson and other \ publishers. This approach allows the publisher to add significant value to an \ existing text or new edition without having to recreate their entire \ workflow. \ \>", "Text", CellChangeTimes->{{3.528084751920877*^9, 3.528084818310601*^9}, { 3.528084915127696*^9, 3.528084917140386*^9}, {3.5280849483848*^9, 3.528084950138747*^9}, {3.528085453223013*^9, 3.528085533410008*^9}, { 3.528102592384367*^9, 3.528102621915825*^9}}], Cell["\<\ Be it for CDF-only ebooks or CDF-enhanced ebooks, the cost structure for CDF \ runtime licensing is sensitive to both the amount of CDF content included in \ a project, and the potential scope of distribution of the work. We offer a \ shared risk, shared reward model that can enable a publisher to better manage \ their upfront costs.\ \>", "Text", CellChangeTimes->{{3.528085541624916*^9, 3.528085620022245*^9}, { 3.5280856720541687`*^9, 3.5280857543303022`*^9}, {3.528101896437922*^9, 3.528101905617648*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["A unique use case:", "Subsubsection", CellChangeTimes->{{3.528084751920877*^9, 3.528084818310601*^9}, { 3.528084915127696*^9, 3.528084917140386*^9}, {3.5280849483848*^9, 3.528084950138747*^9}, {3.528085453223013*^9, 3.5280855077939177`*^9}, 3.52808613492212*^9, {3.528089810803617*^9, 3.528089812335332*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Differential Equations", FontSlant->"Italic"], " by Brannan and Boyce, published by Wiley in 2011" }], "Item", CellChangeTimes->{ 3.528076524821251*^9, {3.5280844915372868`*^9, 3.528084512908708*^9}, { 3.528084708482312*^9, 3.528084723489373*^9}, {3.528084847638536*^9, 3.52808487023709*^9}, {3.528084999259364*^9, 3.528085043992832*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Format:", FontWeight->"Bold"], " Print text with ebook version incporating Wolfram Demonstrations authored \ in ", StyleBox["Mathematica", FontSlant->"Italic"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081653782104*^9}, {3.528083253575472*^9, 3.528083258619718*^9}, 3.528083708008624*^9, {3.52808518385336*^9, 3.528085215114606*^9}, { 3.528092453575533*^9, 3.52809246092875*^9}}], Cell[TextData[{ StyleBox["Deployment mode:", FontWeight->"Bold"], " Wolfram Demonstrations \[OpenCurlyDoubleQuote]applets\ \[CloseCurlyDoubleQuote] linked from Flash ebook; open in separate browser \ window" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081663878201*^9}, {3.528081696582035*^9, 3.5280816979908953`*^9}, { 3.528082190494864*^9, 3.528082213333809*^9}, 3.5280837080099907`*^9, { 3.528084542960908*^9, 3.528084581429727*^9}, {3.5280852238345337`*^9, 3.528085236818412*^9}, {3.528087219430262*^9, 3.528087230960579*^9}}], Cell[TextData[{ StyleBox["Implementation:", FontWeight->"Bold"], " Subject to the Submission Policy and Terms of Use of the Wolfram \ Demonstrations Project, accessed from WileyPlus" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081661262162*^9}, {3.528081881999918*^9, 3.528081884343639*^9}, 3.528083708010448*^9, {3.528084598813266*^9, 3.52808462957232*^9}, { 3.528085247657528*^9, 3.528085274440703*^9}, {3.528085322937581*^9, 3.52808532704753*^9}, {3.528087347292696*^9, 3.5280873760094843`*^9}}], Cell[TextData[{ StyleBox["Project Needs:", FontWeight->"Bold"], " " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.5280817408275213`*^9}, { 3.528082093563984*^9, 3.5280820942089157`*^9}, {3.528082378500332*^9, 3.5280823790255938`*^9}, 3.528083708010852*^9}], Cell["\<\ Wolfram Demonstrations curation resources\ \>", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, 3.528083708012908*^9, { 3.528084644588256*^9, 3.528084644593466*^9}, {3.528085341758381*^9, 3.528085353566125*^9}}] }, Open ]] }, Open ]], Cell["\<\ Although this was a commercial work, no runtime licensing was required here \ as a member of the author team created and submitted Demonstrations that are \ freely available for access and redistribution. For this approach, the number \ of Demonstrations should be modest (less than 25 in this case) and they must \ follow our normal submission requirements for form and uniqueness of content.\ \ \>", "Text", CellChangeTimes->{{3.528085788906768*^9, 3.528086105618294*^9}, { 3.528086175479124*^9, 3.528086189741621*^9}, {3.52809252880689*^9, 3.528092529998164*^9}}], Cell["\<\ We will come back to licensing Demonstrations again shortly...\ \>", "Text", CellChangeTimes->{{3.528086167055499*^9, 3.528086307161332*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Commercial Use Cases\ \>", "Section", CellChangeTimes->{{3.5280761109445677`*^9, 3.528076137469714*^9}, { 3.528076169951091*^9, 3.528076172828483*^9}}], Cell[CellGroupData[{ Cell["\<\ Interactive courseware and learning objects\ \>", "Subsubsection", CellChangeTimes->{{3.528086600114435*^9, 3.528086632471283*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox[ButtonBox["Mathematics in Context ", BaseStyle->"Hyperlink", ButtonData->{ URL["http://mathincontext.eb.com/"], None}, ButtonNote->"http://mathincontext.eb.com/"], FontSlant->"Italic"], "from Encyclopedia Brittanica" }], "Item", CellChangeTimes->{ 3.528076524821251*^9, {3.5280844915372868`*^9, 3.528084512908708*^9}, { 3.528084708482312*^9, 3.528084723489373*^9}, {3.528084847638536*^9, 3.52808487023709*^9}, {3.528086762165477*^9, 3.5280867806216393`*^9}, { 3.528102122412395*^9, 3.528102149229542*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Format:", FontWeight->"Bold"], " Custom CDF-only content authored in ", StyleBox["Mathematica", FontSlant->"Italic"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081653782104*^9}, {3.528083253575472*^9, 3.528083258619718*^9}, 3.528083708008624*^9, {3.528086788107815*^9, 3.5280868137609777`*^9}}], Cell[TextData[{ StyleBox["Deployment mode:", FontWeight->"Bold"], " Full CDF dynamic learning modules for browser or desktop delivery \ dependent on school connectivity " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081663878201*^9}, {3.528081696582035*^9, 3.5280816979908953`*^9}, { 3.528082190494864*^9, 3.528082213333809*^9}, 3.5280837080099907`*^9, { 3.528084542960908*^9, 3.528084581429727*^9}, {3.528087054326455*^9, 3.52808706577759*^9}, {3.5280874964131947`*^9, 3.528087516324942*^9}}], Cell[TextData[{ StyleBox["Implementation:", FontWeight->"Bold"], " By services agreement between Wolfram and Brittanica, distributed through \ Brittanica" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081661262162*^9}, {3.528081881999918*^9, 3.528081884343639*^9}, 3.528083708010448*^9, {3.528084598813266*^9, 3.52808462957232*^9}, { 3.528086967225133*^9, 3.528086978293314*^9}, {3.5280870263370237`*^9, 3.528087044838933*^9}, {3.5280874814975243`*^9, 3.528087493045227*^9}, { 3.5280875260123*^9, 3.5280875344602613`*^9}}], Cell[TextData[{ StyleBox["Project Needs:", FontWeight->"Bold"], " " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.5280817408275213`*^9}, { 3.528082093563984*^9, 3.5280820942089157`*^9}, {3.528082378500332*^9, 3.5280823790255938`*^9}, 3.528083708010852*^9}], Cell[CellGroupData[{ Cell["\<\ Wolfram Consulting resources for content creation\ \>", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, 3.528083708012908*^9, { 3.528084644588256*^9, 3.528084644593466*^9}, {3.528086851011239*^9, 3.528086869640306*^9}, {3.528086981780716*^9, 3.52808699030882*^9}}], Cell["Pro-level content enablement", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, 3.528083708012908*^9, { 3.528084644588256*^9, 3.528084644593466*^9}, {3.528086851011239*^9, 3.5280868540326223`*^9}, {3.528086930020553*^9, 3.528086941378332*^9}}], Cell["CDF runtime licensing", "SubitemParagraph", CellChangeTimes->{{3.528084645019537*^9, 3.528084675906887*^9}, { 3.528087091842887*^9, 3.5280870918508263`*^9}}], Cell["", "SubitemParagraph"] }, Open ]] }, Open ]], Cell[TextData[{ StyleBox[ButtonBox["Math Framework Edition", BaseStyle->"Hyperlink", ButtonData->{ URL["http://rmeducation.virtual.vps-host.net/rmmfe"], None}, ButtonNote->"http://rmeducation.virtual.vps-host.net/rmmfe"], FontSlant->"Italic"], " from RM Education (released in 2008!)" }], "Item", CellChangeTimes->{ 3.528076524821251*^9, {3.5280844915372868`*^9, 3.528084512908708*^9}, { 3.528084708482312*^9, 3.528084723489373*^9}, {3.528084847638536*^9, 3.52808487023709*^9}, {3.528086762165477*^9, 3.5280867806216393`*^9}, { 3.5280870984499598`*^9, 3.528087116232766*^9}, {3.528102003109971*^9, 3.528102003114787*^9}, {3.528102057414343*^9, 3.528102074308036*^9}}], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Format:", FontWeight->"Bold"], " CDF-beta technology Demonstrations authored in ", StyleBox["Mathematica", FontSlant->"Italic"] }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081653782104*^9}, {3.528083253575472*^9, 3.528083258619718*^9}, 3.528083708008624*^9, {3.528086788107815*^9, 3.5280868137609777`*^9}, { 3.528087126240829*^9, 3.528087144536046*^9}, {3.5280875754308157`*^9, 3.528087577075141*^9}}], Cell[TextData[{ StyleBox["Deployment mode:", FontWeight->"Bold"], " Demonstrations and custom ", StyleBox["Mathematica", FontSlant->"Italic"], " Player build integrated into RM desktop application" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081663878201*^9}, {3.528081696582035*^9, 3.5280816979908953`*^9}, { 3.528082190494864*^9, 3.528082213333809*^9}, 3.5280837080099907`*^9, { 3.528084542960908*^9, 3.528084581429727*^9}, {3.528087054326455*^9, 3.52808706577759*^9}, {3.528087152928673*^9, 3.528087156047583*^9}, { 3.528087596019807*^9, 3.5280876460570307`*^9}}], Cell[TextData[{ StyleBox["Implementation:", FontWeight->"Bold"], " By commercial agreement between Wolfram and RM, distributed through RM" }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081661262162*^9}, {3.528081881999918*^9, 3.528081884343639*^9}, 3.528083708010448*^9, {3.528084598813266*^9, 3.52808462957232*^9}, { 3.528086967225133*^9, 3.528086978293314*^9}, {3.5280870263370237`*^9, 3.528087044838933*^9}, {3.528087550239588*^9, 3.528087558331462*^9}}], Cell[TextData[{ StyleBox["Project Needs:", FontWeight->"Bold"], " " }], "Subitem", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.5280817408275213`*^9}, { 3.528082093563984*^9, 3.5280820942089157`*^9}, {3.528082378500332*^9, 3.5280823790255938`*^9}, 3.528083708010852*^9}], Cell[CellGroupData[{ Cell["\<\ Wolfram Demonstrations resources for content creation and review\ \>", "SubitemParagraph", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076181443996*^9}, 3.528076406811749*^9, 3.528081146153327*^9, {3.528081209606501*^9, 3.528081377616984*^9}, { 3.528081413089183*^9, 3.528081427605587*^9}, {3.5280814610462923`*^9, 3.528081671549683*^9}, {3.5280817384611073`*^9, 3.528081749865301*^9}, { 3.528081834362825*^9, 3.5280818349793167`*^9}, 3.528083708012908*^9, { 3.528084644588256*^9, 3.528084644593466*^9}, {3.528086851011239*^9, 3.528086869640306*^9}, {3.528086981780716*^9, 3.52808699030882*^9}, { 3.528087722225033*^9, 3.528087727353868*^9}}], Cell["\<\ Custom beta-CDF Player build and integration\ \>", "SubitemParagraph", CellChangeTimes->{{3.528084645019537*^9, 3.528084675906887*^9}, { 3.528087741752041*^9, 3.5280877860919733`*^9}}] }, Open ]] }, Open ]] }, Open ]], Cell["", "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Implications and Benefits\ \>", "Section", CellChangeTimes->{{3.528076202145949*^9, 3.528076232826589*^9}, { 3.5280765957621937`*^9, 3.528076597335709*^9}, {3.5280907608066187`*^9, 3.5280907641706963`*^9}}], Cell[CellGroupData[{ Cell["What does this mean for you?", "Subsection", CellChangeTimes->{{3.528077126183813*^9, 3.528077129847739*^9}, { 3.528103339435062*^9, 3.52810333959897*^9}}], Cell[CellGroupData[{ Cell["For publishers", "Subsubsection", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, 3.528088717090557*^9, 3.528090910420124*^9}], Cell[CellGroupData[{ Cell["\<\ Ability to add live computation more affordably, with higher quality\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, { 3.528088729551848*^9, 3.528088751383354*^9}, {3.528093218706643*^9, 3.5280932426711283`*^9}}], Cell["\<\ Ability to add live computation to smaller scale projects where cost would \ otherwise be prohibitive\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, { 3.528088729551848*^9, 3.528088751383354*^9}, {3.528093218706643*^9, 3.52809323507971*^9}, {3.5280932767501698`*^9, 3.528093276756057*^9}}], Cell["\<\ Ability to publish new offerings that did not lend themselves well to print\ \>", "Item", CellChangeTimes->{{3.5280932778301783`*^9, 3.528093305693478*^9}}], Cell["\<\ Increased value-add to your product offerings\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, { 3.528088729551848*^9, 3.528088751383354*^9}, {3.528093218706643*^9, 3.5280932297039223`*^9}, {3.5280933300142403`*^9, 3.528093348104252*^9}, { 3.5281030719928837`*^9, 3.5281030720013123`*^9}}], Cell["\<\ More frequent revision and update cycles\ \>", "Item", CellChangeTimes->{{3.528103073125572*^9, 3.528103084221567*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "For authors and ", StyleBox["Mathematica", FontSlant->"Italic"], " users" }], "Subsubsection", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, { 3.528088729551848*^9, 3.528088751383354*^9}, 3.528090915502136*^9, { 3.5280933889149427`*^9, 3.528093389341474*^9}, {3.5281027599051037`*^9, 3.5281027806623783`*^9}}], Cell[CellGroupData[{ Cell["\<\ Ability to repurpose/republish/share existing content as CDFs through your \ website or ours\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, 3.528088729551848*^9, {3.528093352828699*^9, 3.5280933691155987`*^9}}], Cell["\<\ New CDF authoring and content creation opportunities\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, 3.528088729551848*^9, {3.528093352828699*^9, 3.5280933711313972`*^9}, { 3.528102770042348*^9, 3.52810277573514*^9}}], Cell["\<\ Ability to communicate ideas and data in a broader, more participatory way\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, 3.528088729551848*^9, {3.528093352828699*^9, 3.528093372819346*^9}, { 3.5281026786774597`*^9, 3.528102703433052*^9}}], Cell["\<\ Rethinking possibilities for written narrative, layout, illustrations\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.528077162646264*^9}, {3.528077204742085*^9, 3.528077207444807*^9}, 3.528088729551848*^9, {3.528093352828699*^9, 3.528093372819346*^9}, { 3.5280935002918262`*^9, 3.5280935106232157`*^9}, {3.5281030868470373`*^9, 3.528103089477353*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["For readers", "Subsubsection", CellChangeTimes->{ 3.528090715380143*^9, {3.5280909224163303`*^9, 3.528090942204886*^9}}], Cell[CellGroupData[{ Cell["\<\ More engaging, informative consumer experience\ \>", "Item", CellChangeTimes->{ 3.528090715380143*^9, {3.5280909224163303`*^9, 3.528090925085478*^9}, { 3.528093396403298*^9, 3.528093401290762*^9}, {3.528093488392082*^9, 3.52809349091991*^9}}], Cell["\<\ Broader, more \[OpenCurlyDoubleQuote]democratized\[CloseCurlyDoubleQuote] \ access to live computation and meaningful interactivity\ \>", "Item", CellChangeTimes->{ 3.528090715380143*^9, {3.5280909224163303`*^9, 3.528090925085478*^9}, { 3.528093396403298*^9, 3.528093444347766*^9}, {3.528102848496315*^9, 3.528102852092256*^9}}], Cell["\<\ Ability to be more of a participant in the information-sharing pipeline and \ provide feedback to authors/publishers\ \>", "Item", CellChangeTimes->{ 3.528090715380143*^9, {3.5280909224163303`*^9, 3.528090925085478*^9}, { 3.528093396403298*^9, 3.528093401290762*^9}, {3.528093442708251*^9, 3.528093455920739*^9}, {3.528102955548593*^9, 3.528103048366577*^9}, { 3.528103113816277*^9, 3.528103143859447*^9}}] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Publishing with CDF: Future Considerations\ \>", "Section", CellChangeTimes->{{3.5280762646718082`*^9, 3.528076271859024*^9}}], Cell["\<\ We are aware of needs in these areas:\ \>", "Text", CellChangeTimes->{{3.528093718474699*^9, 3.5280937444400997`*^9}, { 3.5281032313369627`*^9, 3.528103236408997*^9}}], Cell[CellGroupData[{ Cell["\<\ DRM (Digital Rights Management)\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, {3.528076247554147*^9, 3.528076274873461*^9}, {3.5280929992328787`*^9, 3.528093004094536*^9}, { 3.528093554145994*^9, 3.528093594112463*^9}}], Cell["ePub/Adobe/other connectivity", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, {3.528076247554147*^9, 3.528076274873461*^9}, {3.5280929992328787`*^9, 3.528093004094536*^9}, { 3.528093554145994*^9, 3.528093564853613*^9}, {3.528101597581361*^9, 3.528101603802211*^9}}], Cell["\<\ CDF authoring tools/customization\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, {3.528076247554147*^9, 3.528076274873461*^9}, {3.5280929992328787`*^9, 3.528093004094536*^9}, { 3.528093554145994*^9, 3.528093569109605*^9}}], Cell["\<\ Editorial support for independent publishers\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, {3.528076247554147*^9, 3.528076274873461*^9}, {3.5280929992328787`*^9, 3.528093004094536*^9}, { 3.528093554145994*^9, 3.528093569109605*^9}, {3.528103272746298*^9, 3.528103293119018*^9}}] }, Open ]], Cell["", "Text", CellChangeTimes->{{3.528093756176214*^9, 3.5280937663592253`*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Publishing with CDF: Takeaway", "Section", CellChangeTimes->{{3.5280888440063667`*^9, 3.528088858292017*^9}}], Cell["\<\ Wolfram is looking to build a comprehensive ecosystem around CDF for web, \ cloud, and app publishing. For web publishing, we currently provide:\ \>", "Text", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.528089362644857*^9}, { 3.528089409907362*^9, 3.5280894261867733`*^9}, {3.5280895627451563`*^9, 3.5280895733984137`*^9}, {3.528089902073278*^9, 3.528089910300561*^9}}], Cell[CellGroupData[{ Cell["\<\ CDF creation and deployment environments\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.5280893814281263`*^9}, { 3.5280894283389063`*^9, 3.528089473161663*^9}}], Cell["CDF runtime licensing options", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.528089383452189*^9}, { 3.52808945958605*^9, 3.5280894841451178`*^9}, {3.5280895454712563`*^9, 3.528089546191066*^9}}], Cell["\<\ Demonstrations licensing options\ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.5280893852039967`*^9}, { 3.528089487889019*^9, 3.528089493968873*^9}, {3.528090183432085*^9, 3.528090214137089*^9}}], Cell["Custom consulting services", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.528089387604191*^9}, { 3.5280895354638367`*^9, 3.5280895384393*^9}, {3.528090208573597*^9, 3.5280902130451937`*^9}}], Cell["\<\ CDF website integration services \ \>", "Item", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.5280893895082407`*^9}, { 3.528089497840666*^9, 3.528089522407806*^9}, {3.52808959218194*^9, 3.528089592590019*^9}, {3.528090142648485*^9, 3.528090142656273*^9}, { 3.528090185900036*^9, 3.528090201902227*^9}}], Cell["\<\ Marketing and promotion support\ \>", "Item", CellChangeTimes->{{3.528090143549189*^9, 3.5280901735882797`*^9}, { 3.5280902937720737`*^9, 3.528090293776847*^9}}], Cell["\<\ CDF authoring and collaboration opportunities\ \>", "Item", CellChangeTimes->{{3.5280902945285053`*^9, 3.528090303216449*^9}}] }, Open ]], Cell["\<\ We will be building out our CDF app store and cloud delivery channels as \ technology and development permit. If you have questions or comments about \ needs that you think are key to the success of our CDF initiatives, please \ let us know.\ \>", "Text", CellChangeTimes->{{3.514308300222897*^9, 3.514308306492732*^9}, { 3.514308558074256*^9, 3.514308560186351*^9}, 3.527985710641251*^9, 3.5280160576606483`*^9, 3.528060270345603*^9, {3.52807593580016*^9, 3.528075994004322*^9}, {3.528076083646985*^9, 3.52807608942544*^9}, { 3.528076131079399*^9, 3.528076190582199*^9}, 3.528076247554147*^9, 3.528076619405875*^9, {3.52807699626346*^9, 3.5280770173865347`*^9}, { 3.528077086923773*^9, 3.528077103544363*^9}, {3.5280771485389338`*^9, 3.52807719935732*^9}, {3.5280893422019653`*^9, 3.528089372780788*^9}, { 3.528089603117586*^9, 3.528089693147092*^9}, {3.528089744265081*^9, 3.528089759889139*^9}, {3.528089979854104*^9, 3.528090040552586*^9}, { 3.52809041783042*^9, 3.528090432350938*^9}, {3.528090563601161*^9, 3.528090605015338*^9}, {3.528090978252672*^9, 3.5280910136930847`*^9}, { 3.528091055921834*^9, 3.528091084296886*^9}, {3.528091271748876*^9, 3.528091351721552*^9}, 3.528091389178437*^9, {3.528093057807523*^9, 3.528093062749255*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Publishing with CDF: Resources", "Section", CellChangeTimes->{ 3.483202458955147*^9, {3.514308863196991*^9, 3.5143088633311243`*^9}, { 3.528075135838855*^9, 3.528075148219529*^9}, 3.528090785589573*^9}], Cell[CellGroupData[{ Cell["\<\ Other Wolfram Technology Conference Talks of Interest\ \>", "Subsection", CellChangeTimes->{{3.52807515855576*^9, 3.528075172265851*^9}, { 3.5280755315286922`*^9, 3.528075535583564*^9}}], Cell[CellGroupData[{ Cell[TextData[{ "Theo Gray Keynote: ", StyleBox["Mathematica", FontSlant->"Italic"], " as a Tool in the Sexy World of ebooks, Thursday @ 10:30-11:30am" }], "Item", CellChangeTimes->{{3.514308661619236*^9, 3.514308664754455*^9}, 3.5280753330526667`*^9, {3.528075365547699*^9, 3.5280755381599293`*^9}}], Cell[TextData[{ "Birds of a Feather: Working with ", StyleBox["Mathematica", FontSlant->"Italic"], " Stylesheets: Now and Future Proposals, Thursday @ 2:30-3:30pm" }], "Item", CellChangeTimes->{{3.514308661619236*^9, 3.514308664754455*^9}, 3.5280753330526667`*^9, {3.528075365547699*^9, 3.52807555087113*^9}}], Cell["\<\ John Fultz Keynote: User Interface, Friday @ 9-10am\ \>", "Item", CellChangeTimes->{{3.514308661619236*^9, 3.514308664754455*^9}, 3.5280753330526667`*^9, {3.528075365547699*^9, 3.5280755528149977`*^9}, { 3.5280756776835003`*^9, 3.528075678011663*^9}}], Cell["\<\ Mobile CDF Deployment, Rob Raguet-Schofield, Friday @ 10:30-11:00am\ \>", "Item", CellChangeTimes->{{3.514308661619236*^9, 3.514308664754455*^9}, 3.5280753330526667`*^9, {3.528075365547699*^9, 3.528075623045184*^9}, { 3.5280756761556377`*^9, 3.528075681587269*^9}}], Cell["\<\ CDF Hands-On Workshop, Yu-Sung Chang and Andre Kuzniarek, Friday @ 11am-noon\ \[LineSeparator]\ \>", "Item", CellChangeTimes->{{3.528075693780858*^9, 3.5280756944596233`*^9}, { 3.528075847440083*^9, 3.528075872462615*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Reference Links", "Subsection", CellChangeTimes->{{3.52807515855576*^9, 3.528075190082286*^9}}], Cell[CellGroupData[{ Cell["Wolfram CDF website: http://www.wolfram.com/CDF", "Item", CellChangeTimes->{ 3.5280751215306683`*^9, {3.528075200333493*^9, 3.5280752011427193`*^9}, { 3.528075290967535*^9, 3.528075311199733*^9}, {3.528075699691539*^9, 3.528075700243331*^9}, {3.528075750374528*^9, 3.5280757746257*^9}, { 3.5280914616742*^9, 3.528091467773107*^9}, {3.5280936399498873`*^9, 3.528093647367712*^9}}], Cell["\<\ Putting CDF Into Play blog post: \ http://blog.wolfram.com/2011/08/26/putting-cdf-into-play/\ \>", "Item", CellChangeTimes->{ 3.5280751215306683`*^9, {3.528075200333493*^9, 3.5280752011427193`*^9}, { 3.528075290967535*^9, 3.528075311199733*^9}, {3.528075699691539*^9, 3.528075700243331*^9}, {3.528075750374528*^9, 3.5280757746257*^9}, { 3.5280914616742*^9, 3.528091467773107*^9}, {3.5280936399498873`*^9, 3.528093650019155*^9}}], Cell["\<\ Wolfram Technology Conference: \ http://www.wolfram.com/events/technology-conference-2011/ (talks will be \ posted)\ \>", "Item", CellChangeTimes->{ 3.5280751215306683`*^9, {3.528075200333493*^9, 3.5280752011427193`*^9}, { 3.528075290967535*^9, 3.528075311199733*^9}, {3.528075699691539*^9, 3.528075700243331*^9}, {3.528075750374528*^9, 3.5280757746257*^9}, { 3.5280914616742*^9, 3.528091467773107*^9}, {3.5280936399498873`*^9, 3.528093651931306*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Contacts", "Subsection", CellChangeTimes->{{3.52807515855576*^9, 3.52807522286528*^9}, { 3.5280752825834208`*^9, 3.528075286151422*^9}}], Cell["\<\ Maryka Baraka, Publishing Programs Manager: marykab@wolfram.com Andre Kuzniarek, Director, Document Systems: andre@wolfram.com\ \>", "Text", CellChangeTimes->{{3.5280752417785587`*^9, 3.528075272567597*^9}}] }, Open ]] }, 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 -> {{58, 0}, {30, 0}}, 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 -> 48, 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 -> 28], 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 -> {{58, 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 -> Inherited + 3], 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 -> {{88, 50}, {10, 25}}, FontSize -> 36, 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 -> 24, 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 -> GrayLevel[1], 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[14842, 269, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[22009, 461, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[27695, 589, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[36741, 791, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[40803, 880, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[54507, 1176, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[67607, 1466, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[80009, 1736, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[89482, 1948, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[92318, 2018, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[98848, 2147, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"]} } *) (*CellTagsIndex CellTagsIndex->{ {"SlideShowHeader", 168642, 3590} } *) (*NotebookFileOutline Notebook[{ Cell[1235, 30, 12512, 209, 2, "hidefromslideshowgraphic"], Cell[CellGroupData[{ Cell[13772, 243, 359, 6, 85, "Title"], Cell[14134, 251, 354, 5, 25, "Subtitle"], Cell[14491, 258, 314, 6, 20, "Subsubtitle"] }, Open ]], Cell[CellGroupData[{ Cell[14842, 269, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[14931, 274, 223, 5, 93, "Section"], Cell[CellGroupData[{ Cell[15179, 283, 173, 3, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[15377, 290, 377, 7, 31, "Item"], Cell[15757, 299, 97, 3, 31, "Item"], Cell[15857, 304, 145, 3, 31, "Item"], Cell[16005, 309, 274, 5, 31, "Item"] }, Open ]], Cell[16294, 317, 610, 9, 59, "Text"] }, Closed]], Cell[CellGroupData[{ Cell[16941, 331, 504, 9, 34, "Subsubsection"], Cell[17448, 342, 1376, 26, 323, "Text"] }, Closed]], Cell[CellGroupData[{ Cell[18861, 373, 278, 4, 34, "Subsubsection"], Cell[CellGroupData[{ Cell[19164, 381, 586, 10, 31, "Item"], Cell[CellGroupData[{ Cell[19775, 395, 301, 6, 31, "ItemParagraph"], Cell[CellGroupData[{ Cell[20101, 405, 237, 4, 31, "Subitem"], Cell[20341, 411, 133, 3, 31, "Subitem"], Cell[20477, 416, 159, 2, 31, "Subitem"], Cell[20639, 420, 112, 1, 31, "Subitem"], Cell[20754, 423, 135, 3, 31, "Subitem"], Cell[20892, 428, 115, 1, 31, "Subitem"], Cell[21010, 431, 356, 9, 53, "Subitem"] }, Open ]] }, Open ]] }, Open ]], Cell[21405, 445, 543, 9, 59, "Text"] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[22009, 461, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[22098, 466, 290, 4, 93, "Section"], Cell[CellGroupData[{ Cell[22413, 474, 230, 5, 50, "Subsubsection"], Cell[22646, 481, 1513, 25, 125, "Text"], Cell[CellGroupData[{ Cell[24184, 510, 580, 9, 31, "ItemNumbered"], Cell[24767, 521, 135, 3, 31, "ItemNumbered"], Cell[24905, 526, 123, 3, 31, "ItemNumbered"] }, Open ]], Cell[25043, 532, 1676, 34, 59, "Text"], Cell[26722, 568, 912, 14, 37, "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[27695, 589, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[27784, 594, 380, 5, 93, "Section"], Cell[28167, 601, 800, 14, 59, "Text"], Cell[CellGroupData[{ Cell[28992, 619, 503, 7, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[29520, 630, 284, 7, 31, "ItemNumbered"], Cell[29807, 639, 532, 12, 31, "ItemNumbered"] }, Open ]], Cell[30354, 654, 954, 19, 81, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[31345, 678, 662, 9, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[32032, 691, 666, 11, 31, "ItemNumbered"], Cell[32701, 704, 593, 8, 31, "ItemNumbered"] }, Open ]], Cell[33309, 715, 463, 12, 37, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[33809, 732, 752, 10, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[34586, 746, 647, 9, 31, "ItemNumbered"], Cell[35236, 757, 644, 9, 31, "ItemNumbered"] }, Open ]], Cell[35895, 769, 785, 15, 103, "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[36741, 791, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[36830, 796, 129, 3, 93, "Section"], Cell[36962, 801, 1060, 18, 81, "Text"], Cell[CellGroupData[{ Cell[38047, 823, 578, 10, 31, "Item"], Cell[38628, 835, 601, 9, 31, "Item"], Cell[39232, 846, 537, 7, 31, "Item"], Cell[39772, 855, 177, 4, 31, "Item"] }, Open ]], Cell[39964, 862, 790, 12, 59, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[40803, 880, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[40892, 885, 185, 4, 93, "Section"], Cell[CellGroupData[{ Cell[41102, 893, 494, 7, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[41621, 904, 924, 19, 31, "Item"], Cell[CellGroupData[{ Cell[42570, 927, 771, 15, 31, "Subitem"], Cell[43344, 944, 848, 14, 31, "Subitem"], Cell[44195, 960, 842, 14, 31, "Subitem"], Cell[45040, 976, 790, 14, 31, "Subitem"], Cell[CellGroupData[{ Cell[45855, 994, 751, 11, 31, "SubitemParagraph"], Cell[46609, 1007, 249, 4, 31, "SubitemParagraph"], Cell[46861, 1013, 28, 0, 31, "SubitemParagraph"] }, Open ]] }, Open ]], Cell[46916, 1017, 825, 13, 31, "Item"], Cell[CellGroupData[{ Cell[47766, 1034, 729, 14, 31, "Subitem"], Cell[48498, 1050, 820, 14, 31, "Subitem"], Cell[49321, 1066, 1090, 20, 31, "Subitem"], Cell[50414, 1088, 765, 14, 31, "Subitem"], Cell[CellGroupData[{ Cell[51204, 1106, 763, 12, 31, "SubitemParagraph"], Cell[51970, 1120, 189, 4, 31, "SubitemParagraph"] }, Open ]] }, Open ]] }, Open ]], Cell[52198, 1129, 1371, 22, 125, "Text"], Cell[53572, 1153, 874, 16, 103, "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[54507, 1176, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[54596, 1181, 185, 4, 93, "Section"], Cell[CellGroupData[{ Cell[54806, 1189, 109, 1, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[54940, 1194, 725, 17, 31, "Item"], Cell[CellGroupData[{ Cell[55690, 1215, 826, 15, 31, "Subitem"], Cell[56519, 1232, 939, 16, 31, "Subitem"], Cell[57461, 1250, 855, 15, 31, "Subitem"], Cell[58319, 1267, 790, 14, 31, "Subitem"], Cell[CellGroupData[{ Cell[59134, 1285, 801, 10, 31, "SubitemParagraph"], Cell[59938, 1297, 115, 1, 31, "SubitemParagraph"], Cell[60056, 1300, 301, 5, 31, "SubitemParagraph"] }, Open ]] }, Open ]] }, Open ]], Cell[60396, 1310, 518, 9, 59, "Text"], Cell[60917, 1321, 527, 9, 81, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[61481, 1335, 326, 4, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[61832, 1343, 378, 8, 31, "Item"], Cell[CellGroupData[{ Cell[62235, 1355, 901, 17, 31, "Subitem"], Cell[63139, 1374, 1024, 17, 31, "Subitem"], Cell[64166, 1393, 993, 16, 31, "Subitem"], Cell[65162, 1411, 790, 14, 31, "Subitem"], Cell[65955, 1427, 827, 13, 31, "SubitemParagraph"] }, Open ]] }, Open ]], Cell[66809, 1444, 582, 10, 81, "Text"], Cell[67394, 1456, 152, 3, 37, "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[67607, 1466, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[67696, 1471, 185, 4, 93, "Section"], Cell[CellGroupData[{ Cell[67906, 1479, 142, 3, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[68073, 1486, 557, 13, 31, "Item"], Cell[CellGroupData[{ Cell[68655, 1503, 812, 15, 31, "Subitem"], Cell[69470, 1520, 986, 16, 31, "Subitem"], Cell[70459, 1538, 1018, 17, 31, "Subitem"], Cell[71480, 1557, 790, 14, 31, "Subitem"], Cell[CellGroupData[{ Cell[72295, 1575, 880, 13, 31, "SubitemParagraph"], Cell[73178, 1590, 854, 11, 31, "SubitemParagraph"], Cell[74035, 1603, 166, 2, 31, "SubitemParagraph"], Cell[74204, 1607, 28, 0, 31, "SubitemParagraph"] }, Open ]] }, Open ]], Cell[74259, 1611, 698, 14, 31, "Item"], Cell[CellGroupData[{ Cell[74982, 1629, 925, 17, 31, "Subitem"], Cell[75910, 1648, 1067, 19, 31, "Subitem"], Cell[76980, 1669, 950, 15, 31, "Subitem"], Cell[77933, 1686, 790, 14, 31, "Subitem"], Cell[CellGroupData[{ Cell[78748, 1704, 945, 14, 31, "SubitemParagraph"], Cell[79696, 1720, 197, 4, 31, "SubitemParagraph"] }, Open ]] }, Open ]] }, Open ]], Cell[79932, 1729, 16, 0, 37, "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[80009, 1736, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[80098, 1741, 243, 5, 93, "Section"], Cell[CellGroupData[{ Cell[80366, 1750, 164, 2, 48, "Subsection"], Cell[CellGroupData[{ Cell[80555, 1756, 662, 9, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[81242, 1769, 769, 12, 31, "Item"], Cell[82014, 1783, 847, 13, 31, "Item"], Cell[82864, 1798, 167, 3, 31, "Item"], Cell[83034, 1803, 848, 13, 31, "Item"], Cell[83885, 1818, 130, 3, 31, "Item"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[84064, 1827, 869, 16, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[84958, 1847, 765, 12, 31, "Item"], Cell[85726, 1861, 774, 12, 31, "Item"], Cell[86503, 1875, 797, 12, 31, "Item"], Cell[87303, 1889, 846, 13, 31, "Item"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[88198, 1908, 129, 2, 50, "Subsubsection"], Cell[CellGroupData[{ Cell[88352, 1914, 262, 6, 31, "Item"], Cell[88617, 1922, 348, 7, 31, "Item"], Cell[88968, 1931, 429, 8, 31, "Item"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[89482, 1948, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[89571, 1953, 137, 3, 93, "Section"], Cell[89711, 1958, 180, 4, 37, "Text"], Cell[CellGroupData[{ Cell[89916, 1966, 535, 9, 31, "Item"], Cell[90454, 1977, 575, 8, 31, "Item"], Cell[91032, 1987, 537, 9, 31, "Item"], Cell[91572, 1998, 598, 10, 31, "Item"] }, Open ]], Cell[92185, 2011, 84, 1, 37, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[92318, 2018, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[92407, 2023, 116, 1, 93, "Section"], Cell[92526, 2026, 896, 13, 37, "Text"], Cell[CellGroupData[{ Cell[93447, 2043, 694, 11, 31, "Item"], Cell[94144, 2056, 724, 10, 31, "Item"], Cell[94871, 2068, 734, 12, 31, "Item"], Cell[95608, 2082, 720, 10, 31, "Item"], Cell[96331, 2094, 830, 13, 31, "Item"], Cell[97164, 2109, 174, 4, 31, "Item"], Cell[97341, 2115, 137, 3, 31, "Item"] }, Open ]], Cell[97493, 2121, 1306, 20, 59, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[98848, 2147, 64, 1, 1, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[98937, 2152, 214, 3, 93, "Section"], Cell[CellGroupData[{ Cell[99176, 2159, 199, 4, 48, "Subsection"], Cell[CellGroupData[{ Cell[99400, 2167, 310, 7, 31, "Item"], Cell[99713, 2176, 319, 7, 31, "Item"], Cell[100035, 2185, 269, 5, 31, "Item"], Cell[100307, 2192, 283, 5, 31, "Item"], Cell[100593, 2199, 235, 5, 53, "Item"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[100877, 2210, 102, 1, 48, "Subsection"], Cell[CellGroupData[{ Cell[101004, 2215, 402, 6, 31, "Item"], Cell[101409, 2223, 455, 9, 31, "Item"], Cell[101867, 2234, 478, 10, 31, "Item"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[102394, 2250, 145, 2, 48, "Subsection"], Cell[102542, 2254, 218, 4, 59, "Text"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *) (* NotebookSignature ZwpJ8oNn937M@Ag4@MK2pHsR *)