(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 6.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 166031, 3085] NotebookOptionsPosition[ 149028, 2771] NotebookOutlinePosition[ 165514, 3071] CellTagsIndexPosition[ 165471, 3068] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{"\.10", "\.10", "\.10"}]], "Input", CellChangeTimes->{{3.418438976951013*^9, 3.4184389772367077`*^9}}], Cell["\<\ Dissolution passivation of a metal #2\ \>", "Section", CellChangeTimes->{ 3.404105671464055*^9, {3.4041058687932377`*^9, 3.404105894346611*^9}, { 3.404213587340118*^9, 3.404213726194797*^9}, {3.4042141164993563`*^9, 3.4042141198459053`*^9}, 3.404263543202744*^9, {3.404428502542997*^9, 3.404428526361329*^9}, {3.404803514291835*^9, 3.4048036710571833`*^9}, { 3.4048037326798973`*^9, 3.40480375081988*^9}, {3.404803802948029*^9, 3.404803841092787*^9}, {3.404803900224763*^9, 3.404803903078836*^9}, { 3.404803944287771*^9, 3.404803994883864*^9}, {3.404804025477119*^9, 3.4048040428945847`*^9}, {3.4058481919806213`*^9, 3.405848194745288*^9}, { 3.40920423621765*^9, 3.4092042366118298`*^9}, {3.417949385595129*^9, 3.417949387262097*^9}, {3.418261874355421*^9, 3.418261884667437*^9}, 3.437569675324049*^9, {3.441431903916106*^9, 3.441431944249792*^9}}, TextAlignment->Center], Cell["Reaction", "Subsection", CellChangeTimes->{{3.4059068143867598`*^9, 3.4059068412130404`*^9}, { 3.410151720218337*^9, 3.41015172165478*^9}}], Cell[BoxData[Cell[GraphicsData["CompressedBitmap", "\<\ eJzNWduOFUUUbc6duYkMMIAZ5RaDxifEF0McfBnjLfGRxMSEEGXmwYDD+EKM xlf+QP6AP4Av4Av4Ar6ALzjW6lqre9U51d3nTAZjJ+fS1VW79t61b2v393cP 937+9e7h/r27l746uPtwb//eo0u7Dw7CUP9EURQvwuenSwX+T8Nffr2Yhis8 7P7ZLn/609evX0+fPn1a3v0TH73PRxh++fJlefe1jfGqSPjYJymJN2/eTJ88 eZKQuHHjxhwJHyOJ0+XPqOTgzp07U8o43d3dBckhHz9//ny6vb09ffz4cbkc U8PjHgYC4f39/VLEmvCoZAhURBFLwi6nMryscAmplrvgQ7LrmSWrNqZz6fOb qiBRfA9L7kAOH5AOc4pItzhDUhgGqXpZLTcPqHz+6tWrnh0rZHQlY/cwpbzb 4BiWUXXFuy0KIHmNi36bAsAZxoN5FL3yO7IAQWtJIquUpHD2xdZqszL8ePzC 8qK2QtxyytKCN5DOCb7GsWfPnlUuJYEoNM+8HtMZ9fmNY01ZaBa8B2aKQbkG ioUSA80PjA1sEXywYnchqRvo5kRep0CgaWEAplKMM3ue6j5LsC3PxFaYE0QQ NUQUudWEbgUGNbbGMSq2XLWa4URjEBLbhE+UjfNmx+RnWDVYjNWjkJ5wLcwO 5H0MYnKbQvEN8zBei1QpVyEOZ7FiJHBOsAmZZlNIV9yWWcP9GYAZnHMe073H amatvBKni/VBdZXY7iZOj+sl9iaPRofCMC2zwmxQ1wWlhykKEbwt79ZJSVkH iggMtUWJBuo5l3mHY+LTXUWhEGMSFaIrmlBUpUZpS+QxLTB60qgxq0Rfk7Aw THLL0435RMLigvBhTnNSzNDPiSsC4FMxOIo7LC1KqQ/PkCPWXcSYMMAWDEIa sZBcXCFH0CbGzW/KtbiHBhkIN+y8wJHODOcVpuekzZUoMmFRnpppympwdyEK I8th7sCUJODL0y6TuOaBO8U7jIEFFjPlWK2vWlFB+Iq2Fz/ysEVFs5oqMUUF mxnRJDUsd2Bj2v4cjU2Oq0pO4ihY4RnMgirolVFkXGlDl2IREpXik7SG+DSw sdnM31XCRg2M5U3VnrARafhilF72IueBJyi7q26FAFsc02F6qaM4AFHiWMy8 subwX1NxHoyu1bnjjKX4oc1T8rhVfg9LaeQM+MCh3otSyCmkLE9pYVqfFMC8 jk5cbHEp7q24LXcIpCZcyg0rFdYpaVQy5tU4/oettKvqXDOY4sfI96ekABVg CviXYYSdJlSmQgOBw6EvHibpAjOQkv9Op8iwwD2LKk25afLLhsACK4G/fNa4 inO6oFGMQR1/+p4xnkls86PKzamlP+KqLML7iNaAJYr2X5hfKKl8l0730nvH 3ENIcDPjMp9FEh+b/emRdnQkKBIed0hiizrHbrIKGhe9Y5jog14WnqHsG3m2 rAw2rO/xnBpwnJDh8WHNtYyIx4EMYxxl9B0rrVUWJVONaKs+DSUkRRKpplZr I8RT0eDocT1D+gjAtE1Jx4Uez6QKM9MsL/kTfDqnsLEZjl8tCDOnnP8Bmtx0 RUzmFEGQpzDtKSfRxRKgcy1D420DzAvNUir5yDDDs0Ypu8GdpawQtOYx50qG 9IIQ97/GjYmLDBOd4SixmUKv5RJJlmxzVGx5FKx63DiyQQ2q2TwDIQ4KZaRq WApoRumXhazHDSob5Pa6tE9G9YwyT2yHTqC5SqmWBa3HASqTrFmLwSp1wGFw otQRpPucm3RB0IsZBhcFiFfmGVMFG/QvxlQ7kbGr1GQO84b/PUYjTxLipwuB tsnShQgzsii4BwEcmxCzVOC9Ce/iv1Ri+aELa17g2LKg7qoLUKMtWKKqDUMj xfly7IiQdpRAWpVjYdqa7dQGKa/T3HO47loUxGtpr2pRKo15Ss54ILUcUD05 C1RLYeT0mI/coXB2BHj5QxRkhxRaUeZAAV/5cy9d3IESMSQ9hv/J4jxK/D2d kkOJnHLb+M+gxEc+qx0lHvieC6PEh3FV2+vAb3igfBeWbK5DAzUYxC++pF85 eryL31ZnaXoEghsLu4uUxP7AoJnyzlJGGzOEMpAOs9dM3k8vY30r3Ss7TM91 HB7f98V50ztMp+RMj1O+bDe9A5/Vbnq/xanXKa53EM4uZ46XScIbE99G6mpC eMNhx3ZMUV0a4m+mJLzhcNtMVdNzTQiSiFFwUqUvmaUcg5Es2sx68j5ZFYlE b2gZFG3vpxWvve1VdSFq7B4eFx19jVztJHu1UBxsMJYMjhfbuhDxwJkB+5WZ TK0y0JnX5WMK1MT5Eu0ClZuYKtM7Z9upO5GDXiNjdcHGR5vy1I0HmT67EwZR F+5OJKB8vjuBLVTD5pSonktDW0E1Nf0uUZh3LHIKW20n3fbi3+JL4a8iNG/R jsXpZuU4lo+O1KCchlaDv01m16Oq+7yFIQ3OaWaJFoYqOq/eZAtmdpVaXIbz roK0nUFoXv6fadrkTKSj5+A9Sb1C73qtrrU5s3kLLY7ZtX4+XS2OxM/asb2n eBXgY9umrSXhIZrhIEEjykezZuVsY45S32jBfdtaIaq3sHbRVkiDunLFlHeE UnU1NjBOGheK2QpL3h7JhSV3HAKPysSP0C9Rxe/21dUvSZQz10wQnPEW0awZ zfU4vPnBCFhpxHsoOY30ba1sedi0UZsuFFNhtHpxl2umnJ2XP9OzkFoo+60M 5wNjRo66lWFQUufyhUpN3F2eZ0xVSFDgbJeHjF3jFpIUxGSY/hKKkXujQw6N tcmRawopEqF0Txop/Qo91J2AuiOUCDERpC63U5jExaNV2yxnPs6A6joPMWIe ZGdfR6hTAo+ZYV45BAXQaGZ7CBTnbS6FCmebDSpRKGWrmGIVIezDciyWoDp6 7MPjZztoiyr3Kj/MUrtRXmOFf1IXdwPSSdb2TKANcjDTx+mziwemIBYosmHS AVkVbsQ77u6nK1sha7/yDGCQPV/5v8Ort2m9C2LTB3FVtkdSnPgXP+tKWQ== \ \>"], "Graphics", GeneratedCell->False, CellAutoOverwrite->False, ImageSize->{185, 94}, ImageMargins->{{261, 0}, {0, 0}}]], "Input", CellChangeTimes->{{3.441857752219689*^9, 3.441857771477366*^9}}], Cell["Hypotheses", "Subsection", CellChangeTimes->{{3.4059068143867598`*^9, 3.4059068412130404`*^9}}], Cell[BoxData[Cell[GraphicsData["CompressedBitmap", "\<\ eJzNncuuJMdxhounu8/9zO0MKQ5FyuOLKHvhDQFvvJaGC8uGluMlIRjgGBAs y1oYXHvFR+CKC3vBDWHLMEzbgHc24QeYJ+AT8AnaFZnxRf2ZFVXdZyQKLGD6 dGdlZUbGPSMia/78g19++Fc/++CXL376wdP3f/HBzz988dO/e/rsb34xNm1e G4aTHw3D8JdPB/u+H7/6x3S9bx/a8o03/Ef5vtl//fXX++fPn5dfp13b+Hd4 7G1ffvnl/qOPPiq//lrGuSzfL/YvX77cv3jxojxnf+23jfPs2bPy28b6joxl 6x/bhxNvs7GZ801v++yzz/ZffPFF+fV96Wfj2q/rlTZ9dlc+t+W3zWvzjPB9 z7saiF999ZV03ZQuBqb9et0+T/affPJJtvD33nuPicpf+23AvPPOO/aItQ1n Pqrd82u4Vz7PCkA+U7lsZp57IgvkuT/wNoPY+umite0meZbVGZyGoHGuASzY b57dShvM8YYwh61tnGt4IfiohHxQ1mLP2LxGeBvTvhuWuaf4Yr0ff/yxfT/3 aUQ+nC930Z2hDUUnZRFnhd/sGetj09hfG9bu3pbnz8tzLnzlny3PLm+/En6A ZR86la2rPgpWDeP2e4Q+xEemGcGzz8p60vfUhzVk2lQ6rHMywwxghBUaWLeO EVuhMZW1G9iGEYhs4zjDOUFvSh9WbeMZNu1Z60e7Yc8IbHCN311CTwP7wOoi spNVGw3t14czvrguQ9qUXCgBazPMdArkxBqcGOgdxEh5Q1cLduqUl0E0uz79 9NPAkusZeElXAN125bOVWKQCyO3XibQ5AodLAdPaRyLFsxBL51AJ3XbP6hyG 3VZPXTQqFklzKtB/gNlQzXYhxfx2+Mde8/mPxc+mI4WNB8kwCdrP+rCeusbz Mh7w22XPGZx2jesDPbZUbw6xU2U1Z8AcpSLKo+pa5i5E19DJs8ijkfe7CWvc l6Wb7Bg/3yawXPlMcCSW02T5oi5gBJFZkcDpySojqO7HPpoi0kaz2ZWBWfVJ AvnG8Yra5rI5xj6n3SM2dN+2RAQbDi2hRLBlGXLPpF/LGxtVPqnswENYXi4I 5Tp9l0zxKAH/ntDZeMu8FbwhpZ8aX5va2B7ji5iZeVBvxcUuqGW/wbTNZ/13 TgURsXI5jFu/jZLDbLhJUF0Jb7DydSKdFwjcxAdE/B4hywTl1B+1ofGA7DLG x/KPkMKxr6JqoYexj7fHil5FrUIjEGi27tJ746i4ftCumNS7WY1dTIMBGv8G iW1J+EQgPEi8DYXqtrC6PJvAsS5QdHxDbpSlkruK+Vk4ArjgeKMm1xmtz/xT PT0UF8+9tUJAnB7DQCZQl4IVV+h14irDyBHevNENHQr7oVJMh946uOhwliem MEyS9cGGqHpqTdfZzEzBGJP3sVPylL4jCfz59h5eqjrToE/R/ocJSr8v/Rr0 FZtRuSLYZwTiQlCrmr3jc+MWNk+PfcmuxmJEQDf0YzBsSF2aeyVbH0K1nAJm GhMvE6rYxUpHqoBUve2jp4hT4f+BtDlzuF+/UcfXeX0bxHSkXjlkBg3TuyU0 vgCl1sRtWG1su5mo0eIVk4PPuxeWs7GA6qQOMDapqUYLwZDq6ipqw4E/sS51 hItm82MXUoYJMzZWrP7I59JgAZoB/13XZJhGZK4Eq2w1RhxcOkFtSFQolvKe P4Jza//G4RjdRrKudX9VdaF1wRlTP9TZzTF7VTi49w14Fs1sEE7jXDe+soFq 39mWuCYPfhxXpkGC/3ZQRLk37jxRC/xC3UboOOX6xmNCrwn50CZ/3JHeWOMf k7aeRazt9+vY/1X+nIeDbv906+3kfXOlG6Qc8Vgld6sm3/ivGKUiJmzZs4gU UwLhiQ/WRYbgbSzcvrP3kI1YjAabsgDUTfLsfZnDuW8Ex4DahuvhntObviK0 DhbM/sK8rAglhgpykSOIoHGtPhy3AgHSSlf+mU+8SXA4DpLhcJvgpm6dhv/0 NQK3oQklhlV24XXAl/tK+C1UklpINiuq7uCaLJxnl4blUDAaRsOgCNfGcjUs p3FMv5qdQd+mz6ozlu1kaSN+uhSooC3b9bBv0N30kyPnVVXvmy37CxoMXUZC s4Vr6FI0VHs+/LPjpI93sUNBCuweBqlYByNt8cr3n3/+eYQNrPWRL1cZyDU/ jzfP230iLNOO9ybGhHEwZjAO4PJbrdY8KrIDQ2DA/Th76rZxOe2CSER9DsVZ NSiKPtOwIoHyDs0F3BNbJZxvE2Na1Xd2NzNCYBpKrQg/GIU9826q333YebeL sDf4Dxh3haYu6/JY7lHW9nByyu6PHASYjqGgKmJVw9RzUcuCwOyjANNWW4NO xgGnYZrVXxmXpTENxOnKP5cQuRxN3/bR9Gz16nkqvwoGmlCZr6zZlbbh6RW+ U8PR8x38tJ+Myb/4rZkXLNv9KZR3HqhARmSHat+33UxLW33dHdo0YBGzP2F4 F6KJA2rg7JxioIGtlAfHoq+oqtg3QS3Ugqs5QFJnyi6JGw/Faxq1S7Y1AwSW shCtj6ClM1SYWOWYPlRv2z52jsaUCp+LL49o6LsPUWt4/TcVwiecReTLKGL/ QJH3RQlpZF3CwuV3G4U/nidps3FtCSgrf5bhDkW+6nA34b8wBCyuGxqmILpW 57htTCPMwZYR8WfZ6psqA8GvGomDolcr2BZGZA+XpXUWsOTTXWsMTO+Hm6Ki M46TZZWW2Xej7BtExQLtRVcpj7mu+pUznMZX7HLtXsN2uyadSqSJgJrQZlBn y4asjsY+dISmmn0Vmo9p3bspKSH4mS1w2ki1CRXA0/REZamqImFTT0+U7xO4 LTxryRQV5mtHglql8fsUE+uTDvvQKIskyHJij/wR2FSj8CNeskg7bcK+jX5j x4JGl2fL5ZTfJEPfOFa7VR9MW2VaWqMeIqShLNiQoAp9k8RQtopW4a8TO4vM P63MiWSQA8TueFfIorJHcIC9qGsQdr8aV6sTX4bvjv3HyoFyx9UryFAfhzJX lFCoRAJjmLUcmBo44vvIEroP9EoUMpWltcTWnKs2uiOJNvVtidcv0OnMF6Ce +nj71pvp6UpNE4mGAIuan/oEkANS+X04Gx968jzvJEQ6jAEz/qthJicFlGLo fqPm8ktIqcs6EiXpsEAWz3CmxRluhxiMVIg70SBJjHoI2xo3HBS2KU3FVtLW T9zhOP/3VC1kbI9HRqm8c9XkdTD5qAW1y0pH9ahkFw8dVeuwSFV0ulnRYDcK boo6t0k+Ko/65J1hBd0tCmM1R/kqvmmfR7a1EGXBE/DCmqsOVCUggZ5DziIx CLDNMkwIKyi3ETRDCXo8oaEMATucP6310c0L5INUEwqvdckxxsHM8mmYKSTW ebH4BcUBWCOp2kNI2smHZhFRnr/j99j3wUHGwPf8XifBZZNUN/WXZUzd8PMd heYBcnSFuvJ2+dBaJkG6F4nUmLrsPG8cuCxtuusWzGMV8Bol1gKBsQ96Ikvw KlfDquIYAnXEPdEhE8fnuH/q90AKG1Obu+J+ngmABTE7GmCBLdx3JmKSCfva Miox1nPkCDLJWI8unhiMKs0IOSH+bYeOOWV2QRmhzvB7lZP/1XlChcs50h5+ JyTlXYdPM5t7daNPDGyCw5rbrHJ0meaMbSrV5OPIJGgzHvGKmkCu0ZVshBQT dfyzuDqqXUVrDe96G9urQ9PTXzd4+GIrK26yu/hwv6s0OdNkcAyBKXzbH5es hGcTLrUotzynuWqwOk77JOjXEQzbM09G77RarMxr22o1KK3v3abZr30MHG9J jAcVVZ25Mvbn1vGBhlPjAWk0uHi1AsMPZB0eCQl7PcfFaYMLwYdL1q+cGpKg jtidXcYYsiuhVgE1Y5JbFzBFJLkY0hH+llOty5BrmJQM+ca3WRgUt+tsnrP0 vab5rwVI8vNgVCuIUU5Xd8MBhZM4R8ZcEEVy9VHqqGBoQYwjYVjGwC4wYJdj gRR1aXtNns3S39Qt/pPARzb3h0k/Hbtcv/1THt+ChrpvbLGl1dC4te8n/co4 f9+OY5QBw+QNrA2HYWTKZ0lXHQq3p89EmV6kIjMp+B90a4c3FaLUViSUpEn1 KNSjw98v+8RaECYJK3dCsk3VLgRHUpy1/4nvUbk5eZYbdQNChNAZz8u5iX2I FZi69d5LmbWsYkdLbzW/hAZwr+tCpkPpPEjAwsPJjje84feS4RsC8dwITkXh wxlNqRXodFi6SvcfIhaBT8lYTXFxzgsndUdvlDmPIInOjXMY3VoCls9Kndho EhKp6J+kam2Xt3zGYNfEpTweEQwh/Zu4in53ioUfqmmDdkN8Xhgli1R4P0DS aTERGg7GHWfzJrWN6ZGcbO8N/y4lcqwt6udqBgI29xrI+K57YeNlqEJI0sRF a/8AH6poeuHyTuDv0vm5p4UtLu4R6+2jZH70J9AA99iay9mcfYgxgcHe8GrS Gxmbcpy7jJkGjgpxrw8BSOBHuaF8r2ohlYvvOCtod7ucIuqW4/U8ckIfw/Jt JnZSWroyfEpZjSP/Yob8jN+p6IGJ9ujpNKdRGaRlp4lGVXUaiTEpNoMe1HFH 04tv8rMkr/uI3VgnZbDTZkGQrdQpGGwXunWKUfnt8tvQhRX0ASPNKNqYLTeu cdk27rlV0NgXOz6Q86oc5n2ylXwzHHbe7IkJ8Eu/NaUKk4kn5dZ2YlJquBBJ NqOT730akTnBgP0l8CaVOeRuvMIsPweDR5YM66ULlzN2IxWMMmxWX/WpIab6 DOOgyKcktoLXUL6aA5bwW8M4vwVeu5uVf2We7Ix2FDTJYbzGvOguvuXJ+3o6 ojH6jK2MqDUKxoAaXiLScLcDie1pnsjQtC4+4VqwpjE9CUXCw2BNSmGCh7OD PmdHQgxoyfTO620qRLBeb+9m5uTrcrzF9hrnzflbrVpz30APEcETdddwm/KE 0o3QvqYG4JfOXn8T6vRMCEM2F5eds7KyI4j0Ic4dvi4CizPgCM7K9xhWDzZI 7WkcGai2rLpbevzxwqcC20PdRRBcYXOhkd/H/qAcfSqIwZATsrKVqPxrtsB1 DvsYV95x25POFw6Fbo882+Je6fqBqkyVyOyxAvCsZdUkKSYFuktXqMpVxum1 w5Le5jDMEluQRZr2t7us7C0tDYUdM/SV2S+Wub/3mvf7qdykl4jOrqkLeylt uEWvJ2z8tmORDa8v8VoeJ5JaobheOj0W31Errg/gxL6EzLv2tTJaYkQGWRek eL5ybK8dTnvoUC9MH1pL0ig2Vn/aSrkxWWTDBp/4QQG2n5m7KhHeoIsuLas6 OpZ1yN3ar4VTbVqr2m34y/ea4a4WilrWqslqiZaYmDTHR5sY2fpUd6KZXNw4 PrVbYm8Ns9BP01ASwy+/u9Sa/dYYEszq5cNNWIDzAFrxpnnmCRG7pkIVY4ag HDrH92AFnmz/7ons2CaiAbmSJddxNo5reeHG6u6cYJkN8Ib3Vj1TyiGX119+ VNlszjlB9K2Do6pXU0WAuBBcxRD153JsUMRGLK5nhbZRxu1srye4yRU8FIrn Ac1WgT9vKti3UbTn7JuF/mJzvm2CzWFgs4PPhw84PsoBwN3lcU+xwEBatWvX 8tI2WqUXhUVZxJNKBijB2m2sTF+XiV2B/WlCWbL6f+JLQS/7NvMvkiH/9shp lK8w3UzDPU+j/dibu1qtn+fNKgCB3MV0yD84uNQq2C/2OFKlEXQXl334s+TZ cucn7djqOeim3jVCcwKV3e6Pk2d17Ey0N64W1LI6FR3+i+AYdD72gP41WFzt AvH47jAMCk20T5O4aN8TcpqG1csR8qGJwU/2amhv3AkQFEV33lKyMO09zwb5 vSuFQbNDzZGyCae1EEt3GYzJ2RDAxXw5vZooWauaL8Kqohz1XIBLXqylh7eW cVW8gOyp/wEc2wUTeuBRearDaSjebu1kuNU6RYLtvOfMnvsowjqGEMI7+LtH p+EgxFqGSKIBNd7XpggrBed0XJ66ohm6kuUbv2/0RSIcW6zPTW3tnNsGe+O4 G2cfrVntpunYfdtj+WQC4ypiidz3CF12Nm7oybCEGthJk7CO8aFXCN+bCRX8 CTRrq1xgr4afjtZMmvb7t/K54u9PIQhg7OszK5PU57k3Be8uw3YuHfRxqmHR NZUFCGu5mjYauhYpPRoUTl5ptAtqdFWnPvTb2bQBqnr82BTUX5Kb1Jc9BWU1 IxgRljcbhuA2fpiulu/9vR5cwlUemjocfr7f3JNyqVkEJxvjzAmjIGhQTwPC hYNrllxpJyxXIbp3Z1oMumudJyyXFtGQ4vzQrCceLBXY3W7eP3pGFT0XS9ep p42BIqwXWeWNnk8bKNwV1CnUG4cqme0g/7Ths5uY9pDkSZ+IbyUZqyOk/PVF 2GBOnXNtjXNldtWs4ziN1G4e/r0uNNO3G+EjNEKylH7UKXc3ywQtH0jdRnWL z4Z50wxtf4BUH8cgrGT+DqSpMuDIgGhCcBj00M26dCZ5zTrNxUxwtTtWjG2I KNWotcbK6sGcyda3zNGDoukrj5gegbG1e622SfplitUDh80hHscSuxtN/gqD ZZMu4jqr/TmuEOHiuGk0AEb0uE791tGaVM15jyOKyJ8/j9c19W28W09wpNBq WV03iyPkwaq56CFQ6F189MwAuO7F5248tQxSD94CAu+gmTbSPFMjR2tMeIu2 NU8jG7oHLlKAdcvnJwAZAu5MSgzKTMcs7TgNuQ4HRx6hiqeRjvFeejeruCXP o4JbzshhjHpNjOvkUXsNNPYaU6s4CK8fqzFfTSv+xjUm2yl9w1ejhHaZxmws +aui/lunMSnVQ/B7HJGR1m2otPUak6vTmMksB9VTBoFC34jTLsRJ8fjruZzL +D96deuK6dfUmtvQkB4AJnqFNPe0XhkYx562pRObqjhsuS/jrVb3swKX8uxa iUeL8ceqcWIuZVvCmEfCRkKPW+wRplzWo1RSFASYaukI8oJqtUtLcjzmk6lW oKRmcv4KhieLUPnOrHwnXasIO4TMOdtfzvr1IuClzLwiq9eBsJ8W3sU2vq36 alXrW6+EeyLZhFKylXYVYqpfs+kaiNsj871+XZmlfNdzxXJKvEEUVYdJW8Vx G/vQRQqvZ1Md4p4MCqX62sHtDvdRpb2sbO/flSObMdC2yTJXVNoUyDpCDfWw DPWko+vbB+qlloshYT1JZTYlXX6vRmofNKcBe1vcvyCLIcitvORNDk+WyrAW h+oRe3wR0+WxoG0dUTqNvtwwQcoMhIhuzQ/AR8rCDwv2wyUHc5b1bVs28Nn0 puMFoBSvtQJ4+G4EVqz/AVyGkGUI0NNHPfe45Zid4WaMKXW6bfiheIg1MzPP nJ7PuJDj5g0N7mU0iJV64igrX8yqF2sZ8uk61Wd1lP1LBeY1kqcNimGEcuik TYjXisHaZnB7PVUksOYvQbvuSzMaMITz2ykvm33FEjON01do7s9yTVJVFzKn ryAQ7LvifRxCd4yQHeLNSNVtm7cwJTidWOphc+Rb1XmmPRJyFmLW/2RstVQN EZ94ahOv9dB+ag36VycvVQxm/ynJk6TtcTKv/k8tjPfDI+H7SdIve4duvw77 RWmUntu5SMb7P0Xt2Zo1i8e1bGQNrfOquOk/k5qOQB5GqxadoTZuVmDRF3nd E/hA/x8l/bKXgF2vzJGRaV6Ksw3nwvN/vMVFbaEvK95xoIcC7TJx5tVYMoU+ +7+ViFltDZlgcUmin1ZZ3XeAj6s666tAbI/5JGnTd9VRPKwv9+9R3VYjVMg1 h/1u8uxF0sZhYF3hz3wpVEe5q3zjqE0sqA2pr2FnBQ+Stv+pJAjKfNuOzw+v /T9jS967\ \>"], "Graphics", ImageSize->{581, 89}, ImageMargins->0]], "Input", CellChangeTimes->{{3.4418577920550003`*^9, 3.441857793636548*^9}}], Cell["Steady-state", "Subsection", CellChangeTimes->{{3.4059068143867598`*^9, 3.4059068412130404`*^9}, { 3.405906886040587*^9, 3.40590688927745*^9}}], Cell[BoxData[Cell[GraphicsData["CompressedBitmap", "\<\ eJztXc2vJUUVb+7nu+9zHjPACI6ykigg8IzCwEIUHReGEUzUh4mLyWDCSzQa QE1IRJbCwhgCqCQaB9iMLoyRGBL/gNmouxeN2wkr0WRiNO6ufarOr/pX3dXV Vd33PTGxk7mvuz7OOXXOqapTp07VPHzh6Se++vULTx9cvHDrZ5688M0nDi4+ deu5bzxZJo2vK4rRD4qi+P6thbwvy1f9qZ4fyg+n/D9hpQlfM+/j5TPPPLO8 cuWK+bpP065du7bc39+Xv8XbVOcB876+vHz5ssmXf/Iuj8A4d+6ciBF1NyLF X3jhBfMtVQ4ODqT4rqSPlq+++uqmqTgLVizfR0ZXxsszZ86gZcV7zO9keXh4 aOBJlfLvSBJG8lVMDS4mV1J3TL2F+RbSpa48YIGkSb0yv/gDseJ+rXf16lVT RsrLP3mXNOAQSm1zNlrL7u3tuTqSVnKgmKsoJA9tnGmalJW2i3g2OmCjHcKX Eq78LdYCsC0fpibtrbfeMonyt/wuRiKtsrw8AqPEXaZZGCSaYlvTBDdUahRI Yz7ebd43DVzBDX6DH1ApyZM2aDtHpvFT12Rm92gIyLkHUh4potx0UqGhSqVy wmi0dCY8vdDPPPTyV5V2EcA8UcypmOQRebF8y++xNkNUnxsgYi1B2Oz1VCws cEEgHadLCe7RfCgu1xEqwP6RNlsJR2NQFH2Y9W4gSOGHdDXpkmvUCl/4fjfI Q71eR+1EI/XRrcu/IfTTTFS10dFpBQZvHVUAAtjtVx5DkSZgzZgdV4E9ZadQ ID0Jj1aH+rOIx/Eqa8oh+VRFNFVlBGzvxz6FiSgkGxIDH9q1pROcgJIkeVRS jv0Z1C0CVUIsF0UQECJtDHZleTSAdENHnI4qEzdvS7WSsIlCwnwqg/RU53Aa cILDxDgNoyQBY4l9moWxA/rUyBXdRjCICsUE0gJursSybVFm/7Ehk6nrPUKs YJRp+EQk74aIQgslPoVhGDe2wgiX36XyOpBE4f8l0E6MMEKf1BFVPxHJi7VT WCqTFNMRghFrZzs9YyfJpZt6w+W5nTdraaGLLOMbFKlOLaaogBd2ldk78eyT ESZIcbVhXW9tAXMqAGYer7IdwDKNV/lzgxv+KH6j4kX/woM+J31tO6HM9Qqb uzeYIuW0PypT4rBOBmDNE+ptaT0xhdDjpgn1/kQ8uklr0cLIWbaWV3ZBJe2B RsEUk0kAc25t/ZVQHNKBPbJ0A2QmiOTi66ROOoEpv5JBHDZYN3cdEloKEGKy YC6CJds2M3xcywkZoeUxyH07gF9wChOlF9CgYfCblyepEkYjKYgRBBOhIBFC ZaFqRtuXBNbvA7WlJLQE835XE83vxQAwqGbJYpvxHSpkHnYknCZ0MIG/aH47 F/BYbFuJV3JPcBZY3V64gVVlFHJDFH8NUIuVl3x9QVHH1tDCOLWeu5bcoeX8 hqINLVE47R0i9RFtIuZS/Hv++ee9hVipatprpoZMLlt+61zYcz18srEg5dVk JkiFeYMHUx5aY2etZsE6YUEXOx8173POd22S75LNbl0ArVouc9dYi+hyTspb j0oOzKTVaR7IuavLLMYI8jdi2/kaS2zPld+5qyciwQJE8MucNqnVWy4T1z8T t5xS/9OAdd4opWq7ypxX0NJOzN3gESxMHSidGourLNb2jIVM+Z64/KktuJLW If7KjkX+OfkxjtjgiDWtr+3NRNHe5vzVTCzv30ToI4oTXa2Sy9yzzOUhx67r FyFac1cksbwQrZKvw5vybN1TTwyLQhtoVzrZBeMbaH1XEh3Z/yL6H1XksL/s l/0l29bpiIDD/K30u/Js72E8Gmr/p5T5Z6A9TWaO2fYs7ObBxE0/QnvJHuOo LQ1+cE2eRJO1yLTLM4v/gxppHjXWHjN/7AjDiwv3fMQvBy+UKCGPnSi3RYLm +bpyjkxMPeAqSZ/UrFA7FUramtMV6Iu0FJsRZUtH1iQpU0Zq0ErzwRL5J3jt XG1NHQxOWAFgtyMB+MyN+GyJoqCaWcx6sR2g3DShkhCsi1u3gnbdiMaGlRAK mfKyoT6SYXaHXcd5aKA0DrChKzqSo8NxNXZgysBlB6Ydx0cGDbI60CienQYe lMfuHdtjaLZ2yoZRI1NSxVPrRHK2NYgTK4f9PxCWT9g0wtNZg6fS0BK+5ctG w4YMgAKPlJcLgHB1GIbmadmTUfgCQ2Ql6gKd5vL8zoYh5OVWdSEeagHzNdFf EO3pTx77tL9hLFXzLAXiLIF7Cr2Igt/ywMP9Wt8EqTHR8QDoeVYzzz0+/zA2 L51F8f5OZcHSEoMsZhn5RjpmNPlGJwJchoW2+Ox7nxM+HrWWzHsf+NyRMUAE +MfuYFTRNWRzbGzXwVOGfoyDGDgw6QhNeIfHRHiKNFjBoL0sYzVlwWtTUwTG PEQhdI510iKxe+3iaaIaXtYdW7H73oLHFl/zQGEKQfHyfazqKA0jh8BIpx6a 4Iixd/mMbQ6QvrPvjKZh1l+anrdsLJHghMeo7CO1XjKd6ebBmU6n5lIvK8Kw gxBCeL2yW1jKvU+8GxXisxaxtUtmnl2i3j+p8EGFT/z1/L1wYVVwbdTLuyt6 Z9UJvzJ//Mifs5qmjDNfz2paV9TQ9wJpoXK3+eghJ/kyETZmFfpd9/YAkQSt fTZQ92yg3AcsKls8M4YpFlc05riiaNwOUC6NDWFzQjvyJRmhEKcQaLv63E71 mpp02g3ZUmags3FHDTDjo6b4ooEtFCy1GeFzgLLUeKfE0DD2LM8CoE90inXm hYspePneViZgNIV5GWLCx/oo2yCeIS2kaxnhdCHQO8N5lhJlZ9EUT5k/gwLD 6m7NkYo+x8MciIcLhcO1R3uc9ngyELV5xyyls2Z7XNCgELi2nQz2Pfs+nK2s 1vlLBn++/1APeP4Wg68AwLWCyMCueM2mAqw0MjCwHdUu/yPRdPaRwUrvI39/ heXH0dw+RE6xvn9sordpO736vq/Jc0/uWEzUQ3kZd5+w0MHC7xUfCnmH0nQa eFqzmttaM97WMpgSYoPzohinjU08a/DZ8hQvG+n+c49EeYbgHhFumJyxuNRs tsXjn5lcWBd5LA0HBvPgf3sWvHAEPuivTzIrZkcsjJSMrMjebAf6Zji49qI8 mefqdjMWXKmaZKGYOLmqOynUz+/oy5vcDr5ySSMirLt/Z0s5EvSfF45wpFLm ENhYqL8O5d9SrC2b8dgzSgju74gIwImFxGj3WGD9irAKJ3WvCdwLYZ2nYEiK BglZ1ZM4dHZEFrpGY3NHQd0ZhzKJ08hqkcTPwSczsjGmRfD0Fl+yWvaI+AfL wBttRIj5HWJcdWccLMYeHXHAuZqOQKXjk2TCKZra6NoS8xM7QNNx+iF0HKX9 SMfMm1HADTerdGLDljNFVEaw+RGtiQ1qjxQLD5gJB2RQ5Y54FQQ8hzShB9Hj RL4MOFhTi8VbsSRyTzp1KHdogFt9f1iFJHqgDR0yyztZ9d8UhzdKhSP7WCQI S5x0lg+fzorZdHyOJ3ZeCZ0VnnfZaQ1Z5PNOGlsCNG1T1e0ebWroLN6dCWjZ v142u5ubDUpjc3LqwTKArsW2tptQ+fJmLU05i4bhrcagD69cPbMYmqqZIYa2 LBdjIbjHwFC7z+a6fW4AbftRPZ+yUSaMeSc9NigBPq7Ycb/7Inm7kbxVHGUM wUhpW+pRxvt7yq2drmFyW+Uxzfda1fy2Au4XIR06QwkhSpfyhZgFZi1eZTuA peMo5r3x7BPx7BWdOg2BSWxqxqnTs4OkGqIR6jtQqqs/YGvPXBZf0ZoIe5YF 9arO1obOw/LCHJFn456w1hLqbWo9DgaZZdSTbq9eAJeG0HDh1ekEWDsJZVZ5 DjkEK4VXfc8hbxE+dUe7NPBKYu5SeNX3zDYfThqqV0d5ZtteOGW7Hc5KcQSN peeoDnncYopvm+QeR1BuycOGldCBHmyueJTZPl88oUOxN+WB3cwr/j95xB1s uqqHY5fUKwew7ng17vjZZtlRfMn88f3PtBWJcDoZ1nBETwBh+EPQKixH+YIW 4bD1smYJCYrq4PXUCQluYjmtDFwCMxRIi0YDFyxYicmYhZsEZxBi+2WG/Hyg SfcG0NzGzFq4cHnsOCuF7jyXtA7ulK5rBn4c4CBaAMtII6TgpiKt5k1INJAO uTuMHKj4E2q0Koc7IB9omdutxvQs9Uo5cQxkrIFvMO/8UyyqqrZrvrR87rnn FsphPumEJtZDo9htC87tOkjrEXy8+YtYSw0ZtBOTgbDNhM9gCaFdsDd/Y7I3 WRAmmzePYRzAg1BW+7WpthWE+uKLL7qwIOQBvCzN3vQJgz8Buq4HRPgaw5h8 LikzpBx2xfS94GkpplKX4qRsJpLyht8w6qlOROX3m5otNWF+kL78Nl77dxbH PrWaVw1ClL2e40ju2nhQieOoHEuQ8VjvRzAPD4h+MNLmL2teHZQND7Ki4qjx haLGWNQRGv+Qz3U+R6Xnk/SakaO5N+ST8ssRe8jAiN6GFM0RBvS5p/TBSIMf Uxa2wVNPDMxqdCJSsWBbP2Xx83lm2ub9rEnuGeh5fDeTPKRp0sfVpVCcH0L6 sd+F+okw/20jhsRu+0IAeJTNjTGPhRqqJl3WrNSotmO+jeWV1ZAXGkJW2OKX E0G2BdkgREoeBNm0k7nZiKjrCFv6tBX1L8yf47pL5pV4lRVfavpyWlU+048b npOwBvsOGNoRRhDc/8y6oOZHKYhWcVvpK/Fa2HurHe/t0SJPJfMvwnmtZ73X I3m7kbxHfHJzt4Re61nv9UhebHtNyf0laXb+RsClQbVfi2d37Lec5wYM97X+ fEVwLiWUSfGTP8zqdFROq58eKfSf5RXP9FVaQ/Zdc0L8eBJwOh+OJom5qQo9 zoUmbhI8oItzzHPRlrPiXHO76WA6bW8IgpEZjU95FuaZM9UFQVqMXYUuGEue 2iVHsEpgvEgxHBMyfi+zvV/c5Bay8sD/UHe0hfDVy6JXQZ8O6SIk6BRbxbCo qbxJ38P1RyfcRI+qIKkOKoC6AjNtgBFpWm5PUdTli0sRbiu0nt2NMEW59Vdx I1PlZbHGt6AYu0F1z10zNamTNLJux31zKAIMFkTm9x3WIytYFppeBWbeOToP W8R7gduRQDp706CfGCqpnIvDEVb42543u/U28EO4WD4JHS2uVCctLgufKLvk 9hHSf4e7W4UFD5cpqqDvsNuH3UUgpQ1WAH0UTp3tVNYqzK5XHC6zgFfNVefy KkVdmG545LWRhFBB9H/eFGxq1ZazxfEwLMYBjaruiVrzThZzWS2HrS3OAmfh CUVzDuQkv/SR047irpumUBVdNcYVXJxUFC6YkfSmsVKs0ja8bhfTAz73wnAm yui2unUmU1qBOHydi1APjA1xg9M8OWx7tzDFGHWoJ3zhYZbn76w1E0+cZkVe Ukiuv2qlvO3mMqxWdL1oRIs4k1blWWsoD8yXa/acGmIwAPmgeaOWcnHNTYUo W2s/VtjwM4NgXTDhaBGr26EcKJbedsoxEE+K2tRAYY/EEiOTwoY7xxED42vL osEy5rb6qYL+KMx/ARUqcnQI/BW6WR6eDi0aUzD2xppKdH3rJWF7evUvHahx aoyRjeYdtJAHUr3VyUVd8PwBEHVNakNb0yQEC3H3djPabfAzuZ1QvHOVKxqi zTMad3XoRghWC/oonJAu8Q1xWJITzmRdUvxOl3j8b6OH2y7tAf2qS+sqELBN d//MNw0o9UvUZKMCZhfZpZq265lZzLnQWMVGKr5Fnzg4m4cS64X06alwV2lV uTmXc6tatVlUb3fdnFO3tbk82dqmLG9iVUZDGix0vwAcdeoVBW5W5XJ7ej+e Gj11MVTNtq4xdLFSunzPBzhKRnaQEnlkE2SsaHg71Py+w4pU6fA1d0/z1DOR 5F36B2LHSBtcCDAGHKuazbS7NU1haaua5Sr9s7OcjpxTTywqKu+eTcQ383+R A0RIawb1+Wl3BeBZB03ziF39YrzlyKeXR3qNbnAx2lhQSRd4nNIQcVABvc4C rRKO1TVQXPcfMrQTcA==\ \>"], "Graphics", ImageSize->{654, 136}, ImageMargins->0]], "Input", CellChangeTimes->{{3.441857811510284*^9, 3.441857812882567*^9}}], Cell["Electrochemical impedance spectroscopy", "Subsection", CellChangeTimes->{{3.4059068143867598`*^9, 3.4059068412130404`*^9}, { 3.405906886040587*^9, 3.40590688927745*^9}, {3.405907098097617*^9, 3.405907109932663*^9}}], Cell[BoxData[Cell[GraphicsData["CompressedBitmap", "\<\ eJzlfVusZcl51s4++3JufZ2e7nFfPOPxZeLEN/U4iXOx44sywXYioiSOGhKQ TEDymDiObAfBJEgmjmPJeYiEeGoDMjyYdAISSUCap6AAUisICRQYBYJ4shLC Aw8t4IVADrtW/V+tr2p9VavWZZ/uwJb69Dlr16r666+//vrrv37/xz/3ib/0 qY9/7uUf//hz3/uZj//UJ17+8c8+99KnP7N7dPANi8XyPy0W3/Azzy3c72eL BX60n//sfvCTP5kP/lHz+8HZo0ePzu7du+f+X6zt2cOHD89eeeWV5q+m8Zvp xb/Z/H509tprrzUvun937tzBC2cPHjxonn35y19enFqH9+/fd2h0He/+8s9c GzeQ+2vjfi6bZulwf82a3717F9NYXG9+HjfPXn31Vf/Qd9/Mx/3u/nffff3r Xz+hadlaLpb2DNC6v7aEEjej3asehjcRPD/R/L5uXjTqaP7tpr84tA6IYPzU Fquzl19+uUGR+38HyMq+dGO5Ry+99FIDh/t9h9mlAaRm6BDvaJJXy323A3k3 rV0ny+brVdO3+1gDj/jDZigHPT4JZFgf92i3hi0RvJGw8JM0UyxiafaYh63O ypo6UGzRbUVWzZiYcoOJ3Yx2mKCRmibuVbdIjm4BsusKC7e08d00MFs3Q9fP rt3SQHZ/7poHZCSAomcmk9HIAH25NgZ+NICRbcCOA9fWMNBrd4wLzRQd3Fhv bGla+4A6+zuMoWDhfVI1WXTmBgXHXDc/DwJb8C3ad92gzA7AIkJ/S7cuywSk HUHs9n3zbUPoHg1MzY42HDLcotpbq8Kwg+eaX9hVeObG37VPgXfjPm3P3Bq5 Zrs1DnRhG5tQVezSUboE+/utkUN9ukTM7m8MnJ7bF44mjS6BQmL+YRhwcveX PwTWgTzdyrh3dm3C1G1tm7+WergldZ3dit/naWPXhjcbml+vnPDFZOEcP2GW BUj9zDYNhPhgEXfQb+wV9zW43KF41pnFR60RMOUWCy+6uRi9L54yTLm/HYHY vI5o/TGlS/YMTR0tLmkYY4s7buJX3MFm3L/5uMUADfPBY8dyWEgGuXmRz873 J3hNTqxNIBF8HAS7WSyNgnBS4bRy3IAPcrc27i9sMtcOa3XLwHR/pweuyTs2 +RYhCXwHDF/gIA5GrCSvuJ1hXSx8wBp1T6sDPq3s2RGvePNhmcCOqc5SntFe dH2mXJmlqZdoIjhu+HgAPE1rFs0+aHPOnD/M7bHbsLexCm7+u3+qadPVF2i4 D7kfxPc3EVZ8w0UrwaywhKlgw4NccT9/4Ozzn/9808Hz6XAJpwblu17jKa1B 9WGJeIcxe2P5qrQszc+f7qBb81E+gWOB6jDgGrsG79Nxc/ZFsawZrsYHtjUJ zImffSfNs3QKNf1/d2f8MgtaUkfYQwDCkN/89W4bFhzH7XqcJdljohntfR2I snxhHfEtB6YXWVucQI7+VpsaS2S8lDlG3zR6L0GEI941UMjFgG+n6fVCniLX uG/zFzZucllQ3LcD7BcJEzHDO47Ec4iAJqM1zwwL2NKJeK7YXmf4X2h+z7Ip MBPsaYxs2CgJyh129V007JfcD2JXRxG7wjkMOR24L8mq/cMl7AqkxOyqR7Bk TtUZw2OyLMkxB/JjbVNJrnkXt9jmj/d1BukVqvrYT4YM6iSbPraS6Xyg5GCc wubbTiG6dTNq/pY16tv1TePvphebj2l/Pm6vQWBMb8Bnf9W3+wvWcYfquNGt ZN7+aumnbPcTN9DCo+GkaQeVh2vvpm/k1kDvnjnAWsluFQ5KEzd9V4cs3QZd FHXp3z4JugJIGzxdMCTjKobLNc8GXMNmcBQ4KX0XoPY4WfiV312vTEYNYJZm rmAEVzV1WvN7DM+lCB7AkGAyNzYt5w940P2F8g5uAxHgRP9hOfAcbXGu4xLO A2OdTMsRnsWnzrWw99AnFsk9p7tfWCTA5L5j9u7a7dr4NT3li340Bffh7+x3 SHXGdZqv3HL4je3O6TfJmZcgJDYc9D0J/++AozCZw7pezQNezQUUi+5vnEcY 22AKLIVWIbByhg3jp3ID5taO548bnHlB/baOpm1fGcOdtGIsW/kNuRs7ueQv bRjGZDoMNp3DcDTMYRYaQ1qq1zuLuOcP8QKdRtvNpKhmSOxdjGUCkmcvx0EF 6v7HieZewbpGet9NBzEGGgsEPStkvNIAUNeakat2qFatgSaa8ipMOQIyftsB BN21ax4GuZCFRSHQBg5zxcjxQv5pWsgGhX7vXA5DQURiLgXJHtyK93i0Zs+E U8ZBhfs5dwc9IJgjU09KyGARri97p8QcQZCkesVwS4JOsencpEsQulniO0OO H+ZKBxoIFgqHmaFzR911ufdww0jpFzdp6I3QBpsc5+0OiGZz7DDLqjnACMkl 7S5ILeuAMZzYLXtdhbW0U9yv4TUWPZveeVTXFLYWKL/AJdAOQ5mC0492MTtn AWFY190zv20OAwtT0OwgwDUwxWAJ291VPO6QiPuYgoFXEfZIEJ+nr7OOnPuN 4lk79id47E1HWLKFUBYbjM+a2cui3bE9c9iCDuCWaNeBKS+Pr8P+x1I4CfBZ AgjPTugZBr8p2rWD+xvXk2Xf/naCGOj6pD17mNq3300vvsf9aHRDnwq/dRp5 S8Im2AVZR0u3PrrD2poesS28+QKKBUiDbNBkvdDV5tkq3RbL1kh6wPvaxKh1 B0SvUejChxto19C+UZzKKw18N2A57bAXJWZ48/OOpuv2GwxXakTIueBSOwhO hgN4PBKP6bq5lmqd/xWRiQfvNNxNADkuoFh3Ojg863ALfu0M90A3cUgBGKq2 S5DYojVms80Tsn5X1/d0pCEA7x4yLBsq3P9edHR+IUdhClgZ6EKgW3TXcci5 v/mbv3mGWyM4N67HIKPd/3n/g+f2MZXmd/BI1xfaiqn4mZxkZwLJxZOOt8Sx SQiKnUv0DOzd0+CVmVbnrDn9mM73gaaJfeaICEp8YN5d+rClIb4uwtG8SvfV v6adm0oKrQC2CcIKoI527SYssPvgqh4EKtXjAfcYnmGX+p2Q37lsJ4CmGSK+ Q05G6C6M7UUFxrlHof8OFgBytArv0W337Hd/93cN2V20QF+3+z+/a/czDSyi 0UfUX/AyKM1kG80Es0lXjx2GsGvdO3b0LRqxYjfOfFPqWpXm6JPRNDcFuY9b 3lbZu43wTlqXaBfQplrwnr1gS+v6ZA2/qVAPjKrAn1MQXbd2XQs6k2JX22YW 0MCAG4DJwJbA8jp0LW4Y8pdc1ox2QQo5GJHc4YLwz+sBGoUw256vmzB51nPu kFByBRozgaOsUGd+mrbJHNhHEYN1n74J4IMlIR0cc83Lhg/IkjTnRdUs1moW 8rJX1V1e0iWktJ5ws9FI0zzax6cdFKfUnWwStfVgwXDN0d1uiEMjG/eV68XO 8YOat/Spx4jOy7A9XR82gIAFA2XuYxTE7irQkQS12To6kyBC1fpCTgAaw7IE 2Q/02oB2bzpgSa9XlC9ce8dt/eQ8c+T7DnYZTjcnmvUsLNQbarcU575Wc5+6 1gZ0ca07pNsl/lZmgCrT4eqIesXVd/f7QeEVJnt4HCjHI7b8wgqfii9dUC4G MxKB00zD7KuBPQBfZhpa26CJ+lGdEocDIWN1l4mzwTBQCRXkLVtMZv3Q2l+1 Z8TmKvC1itQOPUunJlJq37ckEICxw2EQtsmDNhPiMtr8PQOGgy/eacCwadKu 0eFozH+n/MvW7MTffO9NpH19baPbGlvDHUNipSyoarPH8ThQJRbbN5HthMbs H3Lsd62TqgL138eryyz7XQYxm89hDtuR2KXy1/B6Zi8adm4k/aZbg0hGFt29 pbCEI7p7g3XHjtPNhJbBQ3jp+unppgcHPV//V8b9OuCeJcF32BJiO+ODLe7a XKxoA19kdkVi65BDHztuH1T0+Wbrk+WQzcQ+n7U+WVV92Xp2+MEpC1wFuXw6 imra/KFeMfeBxOZ9JI/h3hFWFEwX3jQmdpwMaw7Ows5eELeMk5DIVN3t26d3 AfcQdlb3fHcVunAnb3C/3BeKBjb/A7+k/7b5r41DhN6QvR/M+3uH8IeNb2Wy 9H/GMMD+dGwjitxvzfzzOwasG4rvYRA+3cftJbs8sfrRPkFiJqW0vCI0P/8b D7uJzOQYijjs2dk6bk9xZaH9btybNsRi8R7349f5pVUQrs3fDHNgH0bEmAyZ w79r/tt2UEd2/GDAZLOd8iR/jz2DcObefUY8uy3efa949qJ4l29FuKL903gq MKbjA8w5wa/BcaPn8zzgWNrEhPnvpNBcmNCuJONoaxhZJdka9jpb8rw1bB15 C5gQZcJR6zkCNi9sdPyeZ9mH0XAgBVztdqheJ1M66uBCjGO0M2j6B2Ggo8LL D13wiH+Zb77XR+KuHTShJlZ+MjW5yb3O4OVz9sSQgzM7NSthUAe6R+RJtq0y QcGnm03CGwEH6FuZf7BQMPvs/lfdQirO2wwPApG0An9s/YAA21Ur6Gf87qkR Ju811sAZD8Cde+gqYBWZbcZTr8ae8g04KnThPhlLKUMBJcawBdhGCAPNQl79 J37qv2NN3STA6uDWDKfPm4YKUocNshJGNrh1dOTFVr+Rxviy1YfDWIFQv1Ge iWY0dFbCihKQbJxF6V/WhsyJQ7EWj2dgWggIhZWj8E40/WNxd3JIEZaOuf6C NNWwCEE9YWoyFTgDB809EFq6ybtLcm3u1c9rkU/DkQkHAoiO0IMkXQPvZJuV wdF+Jhc6xnYIvYUhFlUUFbs8/IbH7H9v/tPsBnhX9khY3BKjn1J4DzPQZ7sk A1QhJYay29cOrW1GsM6QzSjPlqYN5T6JQUlF4h0MGmoVntnZUGIO3Tjno87V CN3R2bmAWAanfwx3P8TQzk5iDH6JHmZeew/V9exs2BUDWILhJGeOBFYzxmHP Ga7Cph+GZA/y3BCVJKXcKyIOMcgEC3U9c4Eeyz/sUMqKVtpuDFXlELA4salL DbGt606YvxbqgOyB7ij7inq2DeGVKb05Mgdy6KIoDbyVy9i30yoRpfCO2dAQ zYdk/kiYwVkMo6uyFOe3UP4Kk/abX9RuvI+Rqgnlpe2SMaRi6dkwuSq/AsN/ Yp6rNZIrHlrlNBDbxEhQ6huxqve1MtgVN1OmO7jTJCZGtQdAgaRhaiDmawj2 Ey6uZz37qQeFCVSgzVlQmF2gLpzbsCPDEIugIA4ZxmRUjAJ2E0me7pPYjLl3 7LP8etfuM7bcl6zOVwrfPU0QAhUb0X/J5Kz62PbCo2L9dPvLoj2YhJO6HJy4 Mpiu4YKYQglF10dOodv/lgUJlp4ahcdVMY4niMOOZZ7/3r0LfyjCQqCNXbOE NpRVXZmHrxS+K9EG938wsI9toT3WGru7XWvd/pJov7ZRUukd6i0nmcOGVoun EoHk8arwFEf4UFpCRRsbGwicDdZ7MAd2NGAU4JRj54NEqGWbfI+F+3L566cK dMKjrIZ3c1h+RfkXrMuvXMi+oqLMD4Kl0P11It7tQd214ZO6JEa5Jbp5nWgH qNmlIVl31qbWmM0vVbQB6Xa9AOLxViP7Oqx4DwtLSSUCJyi9d5p974B3dkQQ 8P8CQQzFKUh96BwvivFuib5eZ33RnJoPK/jtwPgfzX8XI22g+wzyRag2tCPo s+u6MLCL6ua4yd2nLDjrYV0ciS4gI7KbQKNg8n5HbJs/mYbhW8OAxTZgDH+L mABzCrhqGEn8T/uKfRi+Uzxjgzm6fUY8uy3efa949qJ4l7WqUG2aiTMg8kmI DeYHP2cwszMAwr/Z8L8V7Zbi2TvFu+iPnQveJdpdF+2+WTw7Fs8+KPpT735A tFOODj/r0fPZ5r9Bgc6teRvBvBUhz+GdNhV4288LTT8ntQ4RNqceh4iHOjyY ZUGs6VuGI4GG10EZuVhoOAncNtzl9LGJ88NagH2cnUp9VPh2LOo9/PVh1qvZ gK0P1U7I7MO0DSCP+W26+IwhNGfjfxRHkio3AYgDXdO/NkPlTFOxeBaPsawc 11/0Lg1xBml+5/HhpVQZ86t8DiB1sjY/D2419hW2ctBCHEhmq1xE1AwuGcXl g6l1qBLP+Fg8uyDGQtWDHBakk8e0NVZTHuqpo6b8lmFTOTL8s/cuQO1Zd/Xs eTGr2+IZ81Q888f7wqdbGelLkg0Rz1vzO4lX88aDi2NSQ+Rs4soif5CFct1x dvHOt7snxnmhEVR2rDWNBZWt59oXGgIbiOtB4do8P/9snIMDC+op3+hqXGL3 wCcDX1niVKQwB6rUcrDvj0IfnHgmetPkOXT9yhwMbM8G4ZgaYmdqrOSnP/3p ob5JtpKn0UqSW0/zd7pkD1wU970mnFplKSF7fN/+ydPqTB5pB+w/NHgBoLF7 IpC9wlUkZcK08SQTVoi/ZpiAZhT/XsmUJoIto2f3wr+l+gRqxSY38tKM0sSC F5ku39g8XkBXW+cRU5fQIZ8tpZNUfLqTTjkxhBKIDrLg1dV/yC/GcXAX5KWF +wPNZ6Kr2wG9HisLxzkEweeIjHKlVDGQHB8bkobkFVFYujLabUqtAvtMlTZq HT3X57yAL17Ncgxpm3etarMEIQEWlq7Ob++0s27C26353dYntUwDzAEJSXj1 z9FHcwjCLz9O5J52kNuTiiS/reJntQWgcDL2bEkcYxUHCAydZP8LONhNaq17 sgPxk/Zy0XGtk6Ii70UUu3CNdpXTV0X1jEHIu/V2ygKVbk7QgdJZ0ecnWPLd LGndctDnnPzYcbDEfLuYOh8MZPLwTJu8Qqpa/jy/G+Tfmae2bHGpiqZ599rD SKZnLmZAAzcIbOJXhfen7zsWKnCxcgc5KwhqaHVPjsEVOLvyWPADhjmAkvnZ sIOgfxeoKkF9Wz+1vlFSDNlfchgMcK8supQehNvuQ6o/BPOSkwVGOHluBfw8 p7EHhHtmQf3uu6GFR2EXeRDy8gz1XC4RmDXpTOJe5KoaZwfKO9V2/VRtTGT9 OX9cJDQ1BReZvE0lMu2b2Div5jxVZgsIDmjaBzNGd3Ba8oo6L/xt6vDc9GdY jOQp95rZUiqSZaUbcyIfqPGXr0BnbS6680VnJv3WlDNoJrd1VUVuWMzFJnLG dR/33m44yHvUNb5eKH8Kb1izU6veP5sJwX3MOS4v5uiuoex9+LDNA3cghltm n+nCngoOnPeAo70alz3lGbal9dTjXp73TFdVpJ/IKVyg4UtWrk1heBBO7ZRT QbKvvbLVHNnP1MckT31dVMC89dD7ycGplbE4lNCHouLq/NOAf22XGOJnQ5Uw PYTE4hDNsHTPhEHfXRrcRO2VteEk6Sm6aCOQ2E9lAZch9rBTMv51m9Gw6INO DfQSVZQCLjiy4EAMt8w+a1W/sNN4o3puubrpEu3ALMVrgI10wSwHU+SDMGK+ 8idgKioupKT8UWMzOmqmfjCwfd50fYog+hRVze8C1ppElyon59ANMBQlSGu1 h+lwPEqqo+ZnteyxJtoIvLGCjYA3GoMLB4BxWjDjpKfmXdjOdsh4vUfWh2he kCOY72BerbPvDft7QJgNp3vCLHqidSB0cMTNgeh6WTmc5SlzZu5VQIVrEOTy 3mgoBuW2GGIj2p0DKKBCxkCfoSAbjBZ3fSyeXRBdgyLvUlJHmtSyPLLKF5sX eQdN4PokwJ4TPapIsFo+kCeaTcOq0jw795DDYa3ShkCwwQ5Wl1hlvmT/yuv2 zdDgKDwbGmgFzspez2ly9JwvqBoTx7+bO5g+OFm439fFqTFId8RQ2N1uKNN6 nydIN+wZh9MdiuG3Ff3zVRtTORbPLoj+23PAmBfNbVkx9rNibmoeNdSk5nF9 InyvF/ApX33v6L4KlvFIRxVP5bZ4xvEPEANg0Meeh8GEjZS257+DZm4KuAUV sV+FA98aHBhOhecde3Up97VrRh4T4uRuDOsCOHyZQujWotuleIZEn7gcm5X+ YBgExwKCF+wZ3Cv2Oxof6liJq8O6vSgAPi5Mgl8Pm2VSiuoZAJ4HuNsCOBWo CSaLSAX3111aY2yVXfeqWkgrVSOsExkO2zNtE6JtsP8cnPfjAtnK5ce4gPKf wQnKfrJKX3yH3sUZwgGUMGluRbulePZO8e5baRGNCcl2HEAJAn+bePdYPPuA 6E+9+37RTgW+csBoij+OMvGa8cV3Nf9dCPoovlzhWAFjBm9/mHiUsrVVWSHC 8p99yQ/aBPYuW1f4w4iPf5lqake2x9iwoEa6apNbLP7I/Wj+/Kj77TYNvGjd nN1dHQjrqjA7yj2lVqyl1xYJfDBVr9A6rAwO7vuUKbmrZ+hcvtWdv7MwfqxN 5CoGvOz6U5fCQ/Hs+2iG2F+vE8+wv1hleU20+35aNqg7t+KZCnhWQca3RLv3 iXFfFO+q/n5c9PdG0e4FxvKWz8Pmg8BAR92szYU4iCmz6Nageky291V40V9Z R8TaPpV00RupzAa6sRnggQTW5zzb/DwN4jH2Hdvc2WhofbUhuJwfPoUfsSMP UPVJRTtXB0wjWfyowPZSsvgMmm+MXdx2VFA3z/pN4duIplsP8ESIV3EYsXDE vAUizEcFwQ9JPr8W76tA30v2c+6YVZW0Pj9+Pkm+sgRtRT9zZLNXYSIqLFjF kOfdqsoJ233/h51tB3wbD1WgnRSn3AUnH009Kcq+lAlfrJ6C4nQGIlSqpo8L rCkivCbe9QHTi4/YVyyPsvAH2vk+o4yxueejcGWdTX9NoIyOVd5LMv7amER2 xzvvGXSjbO2IfXzp/GHh6dHm5AG8NCrw3M394eBSACoY8jRIDRiLRRbyJoOX j+KSfjc9FWFhIt6L7G+PFBUlFXi6wwtM9hoSs50Sa6HSwbrTv/fFuzdHhLF6 9oPNz+NI1Eu58922REQuzNvHC3tJiZ5L23cq1bTt2hrnmD377TPYviTf4qv2 FQsAfIbgNjIiSJPlgnONgh0dNlpi1ucC+XExlpOsZecYvMfmgng5e7V7cywl 1syQUuLWDKEyGSJ5g4OyVEGPlaBgUHSBQ3rKdPJ1M6oPaZ2OvSER6puOfB5F Rl4M2xkHgCIfQan58+aoE+U4U2SrWvsfNpTioEmHNNGc1Yy2ttKFWp0/G/Eu ziQV6arATLgykwP7UhTKIyiu2+1mpkDMaWFi+RIVs4GnjI57ilhTHEldjSfO LF8GI5sQHjb8lPaNrwEfpB+LgI0ncD7FMDIxxd0p2t+8CGmAqKKBPFfqltrg 6L+h0ZHq2Q/bOFD2QnSm2JBiyFotH2I9GhLRgmlbCKUCr4IFFWNuYgpXcYx7 DP8bEDw3LLrr3GeQWGIfUxmREiPbw+S3Nnm+S4WbZC9/w1mODWXXWfA3JHXh OSj+1rMwCWx7LE5SmHkhBGstekosFzGc2QCv6cF8JfYHdgyRk+/etewvP6lt NClQhCMBpwQHnbl3SD9TwQ67oWLnHlqmYp9K4tUeQJijlks+JmomDGWLoICA QYHutVd0tXEINSq6SY08rkLMKa9R8xkdhjcq5kt5NXzMcHhXl87hgNehAgqC A2BoN46KpAwiaoxXzywSrLiKPerPPdhJhd70qZJmBmG+AjpVriRjw8F4OOWO AhE81dDALfVRqPmtI2vU2HPU5IEJc1xM2PBoI4Wbj1lf6S2OvYHyS1i7Kw+C mt2LMP4nK6Q5zDaJYmoaGMzJNuVwjp4KPzOF3KjgktKunDjcTHWJsAp9MSqV 8UYqtoi75tI3TFQknAUC7cYuPc56Rn1RLB+zZ6RTDO24WtNBob++LfO0eDeR F9mWXlPXaM7wFBV4oYITVA2msWPOWZeJbwGlII56XJRrHYFbsxoa/dgpsWDx CTDVBMHsu5YTKur0BXr8CD3DnHhbQPzDnGiezQdewu5cOBZwXBNj2lHw9+yr btDDeYZjqPCEq9O7naHeFLuFxAEDk2pQqcgAsH3Hf2HcR340t7pOlvCUd5HB aT6VoMxYkKovzsHTdFWVLZxb6aTsCvIG0btR79+3rzhi4HXiGXs0w158TbRj j2YsFZgze1m9INopr//b4t1S+Sx+V/X3F0V/z4t25v0ZMPmYq2r9PKHrXuIU /vDhPFW13lrZTlXVept490i0+6B4Vqqqxc+Ug7r/ufjp5r9BbtqqPtKzzc8n t74W7i3sRH05GXUQEmjQ4Q7rd2yV0/FYkwxF+jpAieBixvuIemCe0KeUApuj lNYIkNtqWpAv7oVMX2tenABuS1dwV3Xf4Ch9u98BnzOSG+JpPcUjumQV7F4O ntyqWqYegXA6xdm9D1yxBBlwpzm65z3By8EFkJtVcMFcNbUexR7nOe9yiDvJ 6qrZzhEuMKaklpzJEe+HsLjpvquJHIBMwtNSNbVY+Ypn/jC2MLu5HaonuzU/ xnpaE33TdWkoyNwDUDza7f7AlhSEiu96/IzZJmXEWEyG9eRVHcuSY54ABmOp x58/r1y+MIii44nFwSAxC65fCFiIxKaU7c+vaNa1zsKluxsrVOkzX/Jp57iG PG3+P1w16+JYbC8bsmsZEm4+tNMCX+2LHhlaNov1k5ntuoA9sYJXp57tr2Rq ZmXYv9eVLP6y9VLnkVzt4H5uHuZzlswaHSXAVZHsMuavnLZRQGH905lcMgvD pF6JJbfvR486tXVKJbNScU45R++1ZFY1FSoX7SmIAmn1hFdMKZzFDgWCDBat tibUwapZjye1ZhYvHLwE3CcKXrjAfrrFxVG7hFfmHONunoSiWVXY3XSwa1iE Tkxl+6uN2Rmas7lnV2J3VB8j2cJZK92TnYo/YS+PCE8o+SqzZ/UTUD2rFqy0 cBSdFQvQ0ExxJildsRptsciXznIfaD5KQkUXJedVPEzRyhwYqI1pybO+QSEh KiYpg8g8ae67fhYs80kQiu93EacVVjhV1Kpwqq6XM4QiVSBsQvGsschB5HOe 6WU9/G9Qd/2nQD/t11bN4iypqYbMTQOivmKEyUkwLtwjx5X3EncxX9Ws6aC2 d6GghZ4x6qcl3jDsIi2XtUor8wyrY6M5nHtGAQfnXDqL1IBDcQLOBt8kdJnj bMOiq8YG3VSguMQTM037YJ5Q7CkJ72n6i4lcB/MklJ0/RP8/Kpw1FJeqalZg tYOOnmGcoLyxplTMwlKy5677uPcClXQrZvlboO+OnRy8D5udWEOr/TzWilkD QMAxjxm4m/6yAJaKtgLDpIsqX24bCiyViOlO53wrZdXAP0eZLOCgdr75kLDz LZOVRFspVOQl9yenTFYyDfhM0TSaj1FGrYydWiEU8QwojYXrDrp6NS6NxVow 6qn53TVzUMBdwLuchpyR7BI3tDRWvnzPYy2NNSBaLFdKyv1+B5H/9fFsOCXZ jQtH2g5BJW7XndRjK4jVM4s5a2HVzpollTScTbXfUy0s2BPJdS+KIWGUDKX4 x1ALKzcdOFXydFSwXa3aGdwrQ1ADymChJzi8gcEbA8/0xO7wUEYYG/wQfWUn RhQvH+mgakphqYpEE0LTuuFkU0thLf1vO6z1hKcNLYFVD8KTWAKLuznfElg8 cl6WfQwlsPrCIqeUwMKqwBCGj7EIvl8jI4mJTunO5Wu2ckQAStkdsqYElio0 NDau7jxKYAEPId3bvCWwxoAEsfy1J6sEFk/lvEpgYU/xPLZinMdVAutZa1OK /JxY/gp72kHGDmFOxcLfWaxbut/fQ7M2NdqCMudvI89X96HMYSEVZ4+bsXL/ HFgLK1/Q6NxrYbmh7AQ4GAZBqRZWbjT3upn5ZxhtxlpYDPD+a2HNAPD+amH1 RbyqWlgv0hpjq4RaWAfhzulU0lY96NtptPhkOwzaCHzAi103L6NmwF4LYqHY nwofxT3pjLgzh4UuxbNSQay+dqWCWPxuqSCWelcVxOJ2KpSVT6MUfxwi8gm/ yN/R/LcJWij2Er4Hv+p1cN9yH9NCVef9VIaUQBFnX/RwNFXXqEbWaQgahH8z x3Hx5di6nVwz6yYBsohrZqmLdEYLr7JL7a9mVrSIumYWYK9Q7indQGehQDDs JQa87PpTdy5VM+u3aIbYHqpmFpJOsC5T1cyqDXuurXF1X7wLdsC61tczVso1 rjhpMeQ9gMjy2S8ahpXrZENhng7YmHVsC5q8ko1dPbJ14fYAG7LbbuZtfO7o altHAyG7YaScmgLuhXDY2KQqK3ONjdVGwakBsdIzFJz6JUMRYLbDvgULRx0r t7CtH1r0hvsrKTCLy/adUm0qEGBfbapfNMTmImYT88TQiNVjI0hGHysMbGuq uOGpFbKOBoKqAmlR0YkOmubzKA4HVXqBKwIkFUc8d7j1oRHugLhkI/b5azb9 kj1jDVRtMTPc8hkH0EAQNUGoRa3GvtpOf8OQPjEozM/2KVZZT+0ySB649AZR zd/AGel321IssEsr/yXUith7Iasrc9THCWIdEHB2pjWu/TVyVjhUIb4wddrs FkqbgN04KXL4nGKej3qR3iLkOFc0KJCUHdZXenG7l/pDfltW1x/i5TTcRZmn 4qVbs7zd/HOzKUXBgDm1m+gg0lfBuTIhCRWZavzpPyQQPyzG11wsRqixowKQ Y33OELKzNOLCbsUHXfLBgeAYS7cV6P0+pfFkZp2uWxkLA4oyzVL4RSCjVFDO RuggCEuShmQmMUhKSQL208XZHuo0jQ0a7cH1uoOIV0MFnG0pTjEEgPUh9tX5 Kup8ofnZW1EHawBqsasGW6KVFz1oNG/3POCNHJY60bqB2yQUoKLPjNv8R1uo nvALpc6vDORRkRsgK+KUzffk9hpIlFw5CxV+RhQKGlVdRc1mbHUVeDsnkSWK Li7TEPHEzzlKLou09Ey/T+VjVAgM3FdKCJqj/MwXbJwSqYEdQRhzbYztL5Tv /dCdy9fokj6V429S3SmPb4Y07N2i43is2J/gDY89i0UEW2chDhOA7HHWs2eL YKjKOiNKg+jZ5H3Oh9YHUX72wU6uvRr6ogT2E2M0UzhUdgky+Okp0OJapbig 8zXYm2yQMGhmlIqYqDyXOCkRd/M3rgf3qNwsVvNR4t5Y4hb5lbvSIT9wrFd9 NZfwrGAWibhWagvJcpKSR33JzTtbNQOamW7swpNSHoSVqLjG4awdGXExLuij f9IJ5DfrJlhb/+TnyyuJbro46T8FsTVhSLGb+0WNUuZ9sFYlVJp3fy6VuCiX kmCFYeym+WSUzQChsmXuchbmc/baL4N+q6JNbVWQn69YyhMB5zBa7a8KgqC8 BM2YT/OGGWN+z9Y446N5qebr/roOTB9w9RxReESVoECufTbeKmfbEVVEap2j v020U46sSIfdh61jMUYtidwW797mpa6pcFBXBYF2ZjQNMG0setfSM0+VhRsE BywwV8S7Y6tn1HrTfqtotxTPvliJt2MxBuuaTSEf7PXKIZL9PyNdSrUv18mw 5kjHDZHxbj7tP/Da9TGcVKDg3faMr7Mz1JKo9ZKsrY/wxXpEHYthWPOMZ2+x Z+x2Z+y96eimfc+uXqpaAvuyQA2oqiV8o2in3NhqqxvcF++yLwvm9HqaU/N5 Mqob1Ln5bLld82E3nXeJ99AXt3uneHZDvKuqExyLZx8svMvz+oBop9yShlU2 YK1C62/ifdhPwlEHza77ZPxkFqqowULlvp9Q3mCA182V7Pg93awit8Hd4wtj ofZcX1vL2DpptzEVjHYsnr3ZZjHA+etwH1MQL7ZOXS+UgTwQ5IcYK0V0GYpN 3KQ+TNsBEt87/Hb4nE2k5MtCbjjKHabkcsMqkykuN8qwtK8KB8dGFEPce7YC lq2AeYYU/xzvjWPqeIZpK+esct7/7hIri+bQSgeVbnKHe51ydQWFNOOSI9YX emZiugJI9PAoTbXDmXXv8wh7XkxKFTpgtopnVvvkZVukIT42tg6LXHp5awsK OUfvH/e3GcGGef9oRxcRQLV4vLn8h5c9wFxm8GbKm++exOz5WbpUfkVQY+7R UStPJDP5Tyr+XL8wHgOjapP49Xua16/5N6S6R2ZmC/hPsWsofR9AYy+WJ3+h GIQ8A+qwySvngGgo5tE2j+jWipmwXNprkuUqpA8tfNDvtXoYeT1VknLqg/RK sQDCOnSJbt2ULcvnJwkbqaKN3cfgfpp45wXkk5NbwQtwokfbKYPUNMbfMHAl Hm3DqiDUpSzfa4L/iVUQhvjRlf3y8mamx51Kv44GlaMc3t+Tr2HJubjOO7PN KkS38MK9pm4pJlckaVfMrRYcCGmInmnpGo6PhGcznYMBJU/M6hxlHYh5cw5g flfOAbugbzjDxdg9jbD71a9+tcNMKxyYlSpkaPWDni0JW3gFycK7jIx6oceX UP1gLTdKVBioxw214+uZd4577H6d0WF4Xln/h3l61nmPKu/T0r7uIud88u9n HYGZOIZMvBaZpfxsmfVSpQ7yxDWg1EEt2bdpLNxn93sVga1SR/alUUN6yp0z Okvk3+dSCFxdnYCXw+gEgZKPzljl3T3AfV2haRizr/Gk76cdlRcVsLlpxKEZ HbJNWH3R77rjEFxi9bjYPkFOvQn7d1+7Uex+eQ6Z/Ks9eat9gxMP5KEFDhRf S9ByUNnl6DTwWTfz7hkxp8t07bwql5ato7QzBiBYATdmE+X1+IPCKoBxdnN7 ojCejFjLi8Av+wIWRqNxm1YdafrDrWh6xEXtwTN3OMg4agTK2LPVfdx7YdU2 6Z5Ak0KNA39i1Wet37u7+0a6u4fz5nzrA2D39rjSXxHD484AImhnuJ8U/gwD rBuV4KtIgKELOjStfyo2DqQtLC7swvd7ilegMoCbIlQX7oOgzT1gomLXXN3P LFToiorsGKpU6SGjAbUO4PED0/yrqtbBsSIc5ZySlDtg3zn2GYbfXU25g3uP O3BCbeTHVi3gwCZXitNQPJBBq5nK7Cn9Y/4CB/ih4SZDV3pomv+DbPsqomMt BDDkQL/T5PbqW+ltZEzcBzpUQFRmT13e41RUnJQKJKrlijWxWQPKHnCVXcTB 2O3cTRkGGkE/zfvksIKgg4+4/xr3SL7xx9MclDN/j2E8KmTnHAoMqKCmrWg3 f2UAQMNIuCFGzgs/g6oFDCt3sGaVFy5Six78vkEMMQJ6FXt2YzxUzwmoFLFN KXQASnCcia+EdrVGEkFlFjfRBS7+EPRfpkBtdrwERGwMfNowXQqnUmnx9x2a xRKnuWWeZ1UBlZ6e+SBA2kclAPb+BTGBwNRyDl0CVR1gUJUDy2jiSAjU2DqC 1FQRmGceKtqQk7yOge/1Aj4VETix0gEEnvui0gE2vDIv1lU6aNM1++aLSOdW 4TOnvD1HVjk4h/g9jsSMGfI+6g68UBhtWg5+Dh6Gi98NAcEMRQPyVQ4OIDG3 +WmHlziYAK2KD70xHbLbAjIV46nqG9wlWsImCfUNOtafESUOAKddcfIugVUJ 2LBF2DNcKYWxWGPiQ3nLGa8pljngdu+wZ48oPvSGeFeVKiiVOeB3EQjJMKt2 KqYV8+UghOllDlgBa3qVYjomNq8qW1wgnlyZg8MOifHwO0hLo7ORQY1+JfTa lDposqT3lTqAqA1pCBRvRy+by3sUn0rH9VgrIXC4ZXxPLWfyaIH5Eg+SLYGA E5FvN4fi2e8T+qG3/CGaLvCLSgHkttB8+L1/JvpS5Qqe5RmUyxWk6vc01gzg /ePmZ3VpgGNrDqmoJ/oYieHZfze5Hrq/VXjts0ZyiatjtvTATVtWNZF7fUHV RwUsiFhaVJ9UWMiM1QzDrBAH72/YM9cYUjRfIoGPW0k7p2A5Ff1FJS0qywhw 6j/0wwUlcYR4YqlL1s+6i/RIY4vusfVJhNr0A7EdWzgolBb9cZzlmNG6ogCX DLoJUcl9SfpFLGexPgEfMO6TgFCKzmQ559fFKqhAYRXcfCLevSDGsAQbH6Vu lcEHhPUPmp+nQ4MPSynrlzaHSWGalyISdB9IoniVeSXs+l/72tdsk3WRBUvd iHC2mWK9ABVG5OXn4Va2uHuLwL0wqJzAr/3ar1HX5XjTcYFZA+LGNlGcj/vY Nf6XbY3YS8q2doQEkmICeUBQ240OYFMq8S54XYmrFL0KjnR21tq4eEgDJXhv gC44dEwpK2yL/x9CEoSPEdFOyvGn2+XIcLCT5iteLjg2uQ/0WNBXI64OCGq9 gCZE1NQiqDqBf18GvNJQw0P7erPBY/3AnStidiBpKx5Xig6pDlrZ8HHWfIw/ /Urz9aXAW9JR4LlAhNT8znhlXzGjCHmNK0V/pNRkY3EEYKyA01EsSkNhu/OP baRiZIt2Kh4cmrLp4NOuoekOOCMpQPlN8r18dPBMfbr3Tbm7YvTPqDz0KlLg HPLQK2XEL9sQuDomt2fiIJtoJ2CmD1DVVqdIrt0IpB5sPslGMG0KEUk2KoVH NDXhH9MgWTdb5Ww/wj9/E3gIMGniE14hBxkpH+4xqqCUIH6ol+uY8IkR+d87 zs/rLJx7TP1e2jjgaTgaWQzlYHzMzfxmJP9Tuya/MIedCbOzIfk38PAkVGSi Q3o30vBM45dsJODKPd99Dy0OayKg5RvpdFry+rwu2m8K7b1R5XEnNFd62AcG +12d71vVu61lyJl836f2ZclPmCFMCCbvEFZ2FkuldgprDrovHnaAS17JHa5E KbUuqXBCAHuBLAdKem1yPvEN+8QFStz19avWRSqNsTZd1RWulV5r82xzUK1y iDNwOW/p6FTbnJmZ50zsOVBMn4dVj/vTNfHKtvyKctXLZ+veMITNx977VXuF LkORiIRnypWsdnEBFoPK2XJnyJB9wdrwnY7XyjEV1myXfGVqfFieEu9tK95T Llm1mbaxLGxq+RVql97OuxmuD3nuzafCD+aWGDa6Ce4rwfWx4dMRPRSDMD46 YBzPUU4S14cNc3NYc+Ug4xNhd68cZuf4h83XgxJQ83z46g6++mZ7xpYUZnrv o35gcP9Be8aK87sGORnSA83u3v0t0Q0nScbQz9LQzefx5oney4Ofa/6Ljacq YfRWPOMlBOpVYum3VrYrJaDmd4/Fsw+I/t4m2r2/MA9+9rMePZ9t/huUppjv IbGJ9jTcYWDvZOU3xFv3MdU7kkCwOHQW5SYuWX1jpbh1aWfDumPA9c4Vfjps jr2cjNiDizXjIgx62gvsKtXgR5mbK23ubebmkw7UPdZuXsFtL7QatXcyqH0t VIaNDfF1iaaLQK47JOXPyvxS8LUdnF6lnH4nb4DqRL+1dmeOsEpt3uoZW0wR +qRU1pAqlEUWsXK1tm41Nrw6coZqu+hAOlI26tTaVAa3GvN5aIfPOOcKA9C8 vFfn3aBc/4/Fs3yC8GHJvaG7m7LKQ70czAeT+1VeDi8UVlRMJZdqumLh1TPE tPCkVKrpDb2LZ5Z/3jufzZZD1YzKzV9Dk90qOy4yTVaCx/zGjAxFHsQmXehp U3DNTg9FXIWvwj5T77KaOw3meanN9wahH5C2FslyYmlobF5Dgndtzh2ZPXz/ OYljClTL7BF4Go4a+DJAYYRDtMJxhIXl/jzFszr4DIi1mCXju06ZPmTd+rxj bNuxq8Pg5cluC2Vtn9vFx31seOzC1MUnx/mgbOni+Ok59kaKY1v+kyKSmyaC jfbtL/XsacMHzS8oJksh43kutoocJBpJvu5A4aPQ4i0WQ3NJP+9xg+p7U3xb 3LtJVtghuW7zyKv3ScIz01iVjkv2sWCzJoNpiMVxWe0jNDUvbLXvkJpM6nTV qhD6E/JiCd3HtJSlo7Mr0z12JAkizCPpqpQZFovW+6lyHQ4IStwr56DnCh+7 AUmLJyZ3T81F/gTwvivDlu520WGNlm6u9VEksC+/u2TokO+bNTvuo3jgZRp/ GopvSdSMQXHCU9UOk0xVPYNBlgm4Zh1aHrZKeVjJn64v+QdHDiWXDtWdnZWf tB56vNbA0UgjEGm3MP+MH1Te1t3rBMjHXT41Zb9rzDA3vnFJb7V3H+LBCJrm o2iu60S3jk4TaFdKB9n5zzpPHflZszHA/Z26I+YxOTk3svIvrU2bPiW9eprN nISTRRWmW4dKw7RPNt297hhCWVzP4ZInUmIxIwhf4Yr93ohBXDlv1KSbSzE2 xWb42dOCjkoHQN+GzyTGL8lebL7jOFpIRBl+nDD/ot9knJd2RGZdGN3cqTM6 7XQ2xe+UswCSwBB31hGJaUsurnlaq879m+S7HZqE+jEipkRgXYRswxYPYy5S 19wykpVL80TqVH7aazGFEmbnWgG8C4G7zZbRm82Z/Y3DuT8d4WpmdXQ5yV9c HTgJc0JTeKjepTzU5KoXxYWeF05rN0T/aTSMF/RynJkYPbtCuo97LySj7vQe nVXzJBFW+seSkzYXbY69euMxB2SyyGe4q0/rW0rdDDc9TB3ymblplTJPP3bo Y3cDvt673QcXh4cPzyXX8kF90xJWWM4rYeXSAAww5kra+nwcQTwtwKW2zNU9 zCPvLB8/q5WzN/ZND+2P4ww9Sae73X3lK19ZKCcvy+QGflZy3e8ipj7/cSmU AGatbizGhsdsPvd8+MDgjLRjk/Hq1MuwLqrAgxIvu3dvVD7u+acQO8Xh/N+1 w2amsIl9Zko+qG+at5h3E4Qbcvpxk8UDmAGjrqREGRbyovcNwjfmn42KdlIS Q60OGZEBpX0AvjaMQ4zKHJ243sGbH76N7NyrCmQhU1FPYMrEkBjeWQga4RBa EctySYwyIbWxStacTwTcnzR7ZlBmyhutMi8fi2flvNxL/9tuKj0zeU503ReP Xxn9dH04NM+Kbpa5ris2uiIPzMTxodSH5l5bOZFcxLAhP9j8twrmrsgHIHab b3MX37BBcbvGBzfu1zKZhMdGQoHzc3gQn/scbcTesiop9NQsxSoDs0rjy7bv 84ZnzozQKpPysXhWm4Ab5B2SmdYlhebpqamMDYxDsYIJICIvNIOo4uhwScHN wAn+tUmh2Y4GWxnstKzvSrxZ0l3uXrco+1Z80X4cjCQP+aSswgMD5jibJfwz YWeibpuPeSU8Y6+YaDYmE7DKsvyCPZs56fCeEjqrFMnH4hnnwHbdWkq4gZO4 LSYxMgP1/MDdEsAtxTNgHSKp++tFggBS7a59as0G9dFOQ25n8JA7cf7KTVAA 4MA1YwhuEnmP+03k8eM+5vuJpMkcQAmqfUQBlBDSqF3zsXizd4lXECvI4Zzv FO1UjmaVZ/lYPPuA6O9tot37RbulePajtnaJ0cvWB/lF73dyb69CKIf73HdZ T+81wWUsUJlyqiqtFXNVqNnZTVglFA4DndUmLfbCo2VVzqaaHlBnXJlIr/rB Pv/5z/+R+9FEpn/E/WYJM77L/UcJpuOECgMswmrwFidfotEWcQbpVIvajnGo 1HjN76YfVm7ye1gbnR6aJfxUQ6/u1e5jiqBPE9zYJKj+wPfrW+LZTfGuCjRW QbucCB739a1o96JotxTPvijGfYt49kbGZjYPNiDhK+uhePYp97O5zfjbRXVY KxI2F6NDdbTnRVrYdCQECjzQaaUR6phzAoZlzbTY6zA7fxkeGz47Mi/1Gwxa S6QX7bgEneGd9np5VDc0x9/6A+hEviISYRstQsBvfvtZQ1RyE1aLcVM3Za8x MP7nmWjLqc+ZR+PGDGrmm9ynxDOvTayLAQWYzNsu24JVBkOqiMZTI+6UqD0C FtjyKibZQ5+LEj0LDDK++/dHrF4q9ruf6FP4GCOTxss6x7YCl+sEpyph9Yyv aGPyeIuFtY10KfsOEpdiVbHCDIuC72ds4ZIbqKIGhZpj/ToXV4gja0OZCUzk TimRPHsm4YDAduTb2KdsndLosBnDA/PZZa/NHUzGYRxxDNhpOKLQLR8PJK/B OqzceTxSn4pOl7lCRbvj1IfsKQX2yhZ2InwjYhknRZj2ZCqfGDk6LAk9OFQm cAcUwhG3iCvpy6f+IOQ6L4dAE23DXTgfh7jJdZVa4ZilMfTq2U8Z4mq3T6IF yMXdeyL2fItvVvm4e5U/fZUOB3sgKIIjJVUwqLHWjxBxQZjiOx448U/aM+bO abjew+khYftKXi6ih/LRlJebZS6lamdnP1xESGKHPYMlNtB0/wzWagYFblkX nzUlZmyG0M7pCzskVfzE+M5akHx+SzdrZqg4/ZU8hEMlXTHXx2ttJvt8sOu2 FHMYWUWMA1YH0OKDKd1vK9TxDJRG7DOGjcK2WSxbNVzeM91QKCVldeDC4JZu NO+v5sY6ig4j9ymp+ZhijUH+cxo29ggcFHE0IYd8EuqSDVoBVPDsIGS4dhCV KLNA6KZ7uGehOhYjDwj9GZH8vj/arj+uqQrVmfz6U2LsRpQw0KvBmpfmkf9b BRax30hKN2AQfcFJ7BL3alImoHSN5WefMdAz9Jiv+1C77+P7HOd9J4JTFOL1 aMWtPSIABDKiYyijY0s6gQR5GuzN849Q5z7a6gGIVZK7r1W8S0/YRR9mZo6o mjXYJ1NIYO44nhF1HuoYhYWxMDt2TZKosoTosMbm3x3Fy7CWeGDsGmQGg0nR ZImRZMi9lpHk9+k2EhLQvemmgr4qIe4KxtKNItDu809TV0BtTUCD7Ujqf2KB g3miB4ZGJ6jp7DHGY2jX7P0GadZ33V+YATduu0p7Y0NvzMKpGHEpnn2mfs1x YnbXvP+0RTQADIJ2ICAHpiIBFdiRbI57HZ907Xtd2hy1XvmoYpReUOzW2NyT 8vEp87ifl3ZF7TzygubkUIGhUQjsBxzfbvNFKIASGCrcxx3it6wN6wrTNqdi vKV49tmKpc4b6ms3Q3/lCa63ogz/tqxmU8SmUN7rGV/kpwRwPb7byi0cW8P9 zVI6eMqDTNWKHk9p5XCtXMJ7/LYVxGoTjHBaV9BUxhh08RB3/W2i3VI8A62W cK/8HWppFW6UDFui1ujaHcsOsuB6Q12PlWszSI81Uzz9h5kiHDWOvMo/WLk1 1/gaK9jndMFWcNX0hbAjthOvRP/fKtotxbPPVawH4KL1aD7sCM1VBDAfkCLj 0EjxX9hX7DYKjXOlf+jAmhzKYRfE6LY7TGIwsdyNqodc7HgtT/aPnQT5U8O6 UG7FN4Z1AV7D6pe16PZbRLuleAY+WMK9n3nXY9yE0TcJxNjZ+i/tK3ZAZd86 NIcHNJvCXifeVQVNlJMr+9bBFLEV7V4U7Zbi2S8I+N4sYDHfuoChJ60wyhwP UD+efQp/QTxr3vm7/h1vOV8Fadb921HXu+01dgr7EWvKGbJ3r73dmrJTWDPC 3/Ej/Ax9j3MZq8v2EkjLrDp4B4GBFW/6/tu+bx+Zsu6Y8VuNbFvoDdsX8rP3 kXKs+XKAzWYf7Tly4wtO1Wwu2f0Ol8i0G2/W9+pQ1yVj7kFI67VtiNTUP7iu Nl2375+ya0S4jBem5kFapSDh1gpIzNupab00XRaev9KkH3bd+Lg7dAUmFGxh VyVeUrsounUfTBR3ABMtWzD8uKdB71e5GAd2yVfO2eRysFi2GoGnIrsXAGVs gs+zL4jCvDcbxDM4DDNgVOA0CSHGNVR6KbKNMgapO4mYtg+lZI33PvzHaA6b Dl37zWfGxBudsI0SIhXM0AcxNcRwX5IgqIURY/Nqr6IAMlwvjFPdMZ4DPRd7 3bg+4VLIFyHgGm2JewWYIU5i/RysnDod77JwofpxH7ZfQelsbT03uRU1h/st pGX1OtqPmFpka06/8/A8H32npsVqMh47RQ3UiFhB+JekKCLJPJxfAZyr4auh q8Ko2P2urOx2TNlQT4dXeGY4iL/cls4Oq1FagRirR2EaeIfZLu4lnrkc166s 7/oSa44iLVduYahNp05UlyBKxOK/4y3qvVofNdERCo0lWBlFTBA5QnSf3LIk YwfHk9RfheCIpCCOJDSSifgvQrMaJu1XzaSELLjWFcfqQBeC+hG5WaYrSs8C VDgvo+1zJF9F1zaBBeKSembQzzwO5XpSO5ANyNJ9cDlKDcL4RK8eBsGrOMIq fFXAOjAHH25HO7vv/SXwJFoAYA+e6bjUAYPonnZtx+WqfbYKmM4AHVGWttJ2 e12r9Qt0wBsiRR1WQFmFsehTGAQbl/x3juvGaj74eZfgZLfciAceKhCa34UT GLAGe41YV+mo2PT3FT82V8aCMyqwd98SJ7Q763Ivb8C5Dzbt2uL8bAQ7x71O miaQnHp4xQK+zOkCwJMUMcPtYml3iIRZPF5eYfhYwDpIfDVQULpvkfwM4roc 5jh8VbUUbdIx9GpCdY55oBls7yA4D7jvEt6nzOEaf0qvQufugLInh4fEK7MK +LE20+SMbpU7gGk45CqhuEo1F9Tu26B93DoCE8kfv8mC8MBBsMDIYqGrucmi lfxNFfl8kAUZrlQW5HMdQg3ngYOOgpOGgaT7+jGYmZtAPQmjEq5lcF/Oc5P2 XjhiWsZTnpXLxHyEJaQ0GAThqUzKObSwmG5cweZxO1hmyQcxCw9gGLIkjItd W08N38h29ObDzRwIfPlhqQ8KOVwFIDaXliE3lRQ1JK77I/BO9eqCinAWJd0V V8e1gVLNeTghbklwGEkdBpNf0Geir/i+lcNmCWRBHH6Y69ltphYnN7RYdOWq 0nzfK69cj2zEKjACukcOW8YJwW6VrOtrnPW863pfN0GJuePTwAIOVIsowM0O pz4r2/yrV5pXKbRyzIyCuwO+Zx0u+PmurY/UPYqOBW4GhLRZeLZp8g8GLzoy 8XkNwfCHAdcCktYpcltaikWKuDZ+TaUOX0Vca7fNvZr2mSB7p3hlUcm9mmpe 0zUozmQTucjSKe1X50rvqjLh8LahroJEky4LUwZ06h4p1yKoMzOInEOxbgyX +98MHhA6csgUYAOhISwkjZdSRO3HOalanEcWUnNgFMkLDursVZDE5tNn7RlH bFwQz2DBIvZtRsDYbeR5e8bCxVPi2dvFMyRGY1eSZk5mnkJmbqVQNiuKOQAe hFsjz4efgSODKjztngW5G4ZOJENR83bP4C9SO+9LYtxbop1KEse48N9vIlMd tLM7/MAqTimKoukhxhd5XTjq/c0EIpb1OQLHuE+YHvLguGeXxbg3RTteaqC6 mZ6R728QDLBDc96X6B2zvZ6FzxNgSP4rNGms33tpAjAevyieLcWzP6S+fUat VWSNeIQ0pjovjchpghQg4BAsDCb2Qc9j505+09zsFos0NQvHNABz23I38I3k sAEkhUte6c1jww7LYJL/hZCPtGfIKuGOoGebZ/nEGZAWfTc++umExokv+brg xnllb3Ef7F5jmCrI9LCnC3PhhbCgsqJ4tjwt24p69ge0Wt9kY7BN1nQTEbbB xlOlFgQCd+qiPA3l/cItZwFf/fS9qqwMT4dFxAcHumtW2yUtusXd5ojpMeUj mZwtg926sNgIT08zIOTzOKzPPvKRj2QThUBn6A6pfBzp3EXLVWYVJuO3ESSx yiaOwz5Inj2gqttk3x0YlJ/NqkC+JgMTNZSj2jmKKt3pE0Hm3bCvRBAmprN+ QZXQpoXDZYNta7/927+d7RmkczdTuNMjcLb6zSp0XT1jkoVnIob0J7T7uYk2 qvuYFoWLy+Li7iB/jQpxMRVXxnTn44sHRU6XgmQz3cwcpA+dFh31QYGRGjT6 gq+HloJNK06ynGqHILWrD6RXyujfb376sd9Ki5j4V0SSYmw0XkfhDlBBlmio Jz5XRpUOiqfNl/B7HIHgtYU4BwbfJvqaYbHZ8xYHrCUs913i+YXrDiVYAmOG s+bu/wI5lWq+levB7TualzRFYW0h/2J7JYGi+WJIw2uKKT04L8o3ER2RcYAx 4SCFFrdlQtuOtxLWlBmVWql8WGQ5ZFIxnTlCS/OVuobXrMK5wpd1cmxTBZLS s+LsTF2oVkHnZuDzLTU+MI+jU421p2w3WbSWcGg9Wmh6Qu4GBfbNH/Coagvd FN0gzIOhWYpnjG0kAGZhFsITKZFBY5wdFgeFqcmbwwMopoCv6MaLrmE857jD OItdTQBaXcAbbJH7Dg5U9WVuir6wTKx4XYpnvEx+Lkc8l4BHFsycpuA6jYn9 zSevW1J3uvClw7y7IzcKE+RcP821YofQEeFipkqqjsoCyzi/ODpVHATGiC5d xs9Yb+dxfBI5BcFF0H1g7XX08rWvfS2if5aIPk7rAlp4H8EIbTXCSFlbvRTP WLG7MRjTuHIIcaApkkZ3fXrRGmhkwbgqQ/2rHQCy6ZTSy7H7q+GY/8bl9v99 0RFkEeb7d9vsQUSx5hHQ6aMq8wSUqYMnjNDcFONk77eQ1Vgdz2U7cPVpXrwt Oi+FXn+oaVOtT8d2VRd3oePn/BEgVgQ5DlDJ3zQkV1oWmtaNteCijYgNxLc4 Mbvm+UpgMPU5Zu3MB5s2dcrwCwZPqnIGM0iU9EprjT3AyvCTTLcZfXo+Rfi0 PNqcbSA9upiFNS+uCc0Q518rxMZ6ih+p4daqYg/bbGphUpoXVHv7yS/NKmk1 NiIIhoyHuAePwm2EQvfh+bJGNj5thiVldn+brqyKcr7XGs2olR2m6D2SfMx9 WDmdz+83NoFuteZ3Sk5cTqPTo35XaVRTa0A7zCkP08CEvy3IouMw6T4bWvg/ ZTgcoPnsUZaW1LUlJI4YQilSRyQNPSpAnLe+DVI6N9/zhgPeB6gMVzWvdFSc eUXjppPu1iDuGUjpHGvVmcuarquS//UAqVS3DQhd4h+u5cPdT5ExK1xKmj/V R03iO/JmXaRaTW7f9HhFTHaooiwPaH3+s9JkVXtMlsIYw2RV+85kP2xDjFM4 XStMmdVDPXmtVDc9OawuiVHW5Veavy915j5ds8N+YSkWWPtSk2JJ9TUknRJ7 zWwq3mseXCSkeOqv1lYMVKd4z7/RyX4GqlJwS365k1Knuovm2Snh5wvWJ6s+ kPgGO+3sTFyOm495zCHfJfiRl3r9WYDLjz23NBqepirzXmxC7AVfXr9ueTrs 9s+UACR425I/jchmHaRZ9ipqRvMYVd1Q0oR1uBtC+j7DGWguAPhAnQFNeWa+ i3TCJ+FUUxdshE/YbZWW48f8cjxrANE9c6FisNyH5UOSM4PGob3nPRW9m4T/ y75UgDr69EzgqGP3Fu+Z2vRmhNokfioLE45lrGnFfHHvwldj8lU0nx/tWw51 1a+MwI5XMgmx7qzGgySOmgUqCMnpStg7/pVbMjw7hbAPDI7OKsxwSJB5i+0/ Pw7bVeGrMbbRNPW44Wn6adyLoiatDUSBFOFRrOXVUsRjB3EFiBBQvI8wXREQ 1Xz+bN9SvDmIrdhM7jMm6C8J5OusRS7IC23gBtz6KN0M3yGOYECgWGdlCvD5 lXlm77GO4WP8yJ/i606ocfACxNFNUTrodDEoamodaZxNd2UncnvGpUoYdIcT svUQOY2Gw7wxXxFp4w/ltkoyo3AHGsdotdq6WF4YPOlhoWJnauNghVjKjVZo EceVwX7MbP0Fe8a2nnagn+aBDqNjjHYrhDef+nEVHaY77CIIhGNhcFFggb8d 9nM87EEQsvzR5PHejQHwA9iKh8gTjlBpB/jrfoD2wRMQStL/AGXXOdiEk7TC avU9le3eJJ6xug0Wr9p2/5tgfd5GZZMQtM2NzYg1MLjDg856/CCesb5hu7Bm B8W+4QQAYrofStPEdrO23nBKfu5Kosr+tm8wAnz02LYjSfNV9ZB6i8Oo6pwM 8uEWnZKo7MdbGl51CYMT8w0gghXRQDsbq1R/qqCtCj5R/f0Rofhm0s+duJbr KvUkxWmThkW8HCqCbiLRyH3MVd9bWKe7FZTSwGemsYkEAze4wT9hOiPAOIyE BDTCQdocop5+0hAN3GLtWgWssAlrK8BJ9f4JONtYZjk7Y1E0KAMFLFnUGEBM YIjYxFWa7VFs7AWDw3kItTdWiA3GdtBKx/pahw44uUx1ICnZW7pzXvFh6hUw Xs/BxDd26sNAOY5AcZ/MhZ1Tz/ClG2BZU2VWU0SJA6ML0WEHInAtt0Avo9r3 URYShSAG5381P1nBdhjkVWwF8qn0PP8hMlABH8HWCEnYQXhHlza7alMe4CWU N8BucsBuxcigtwog86uUHRE7OL1Y4y7nPlAxpC577F7JfF2Bsa0BYx1YqPsY Q5FmxczKqaZMKw03WLYDttcTRKHBDmxo5VJHONIe6hpVoJAB7l+DSpkR2Koi iiaaCrgPRgJx2DnYwE2N++fX7YClYElCtUCtEqC8kZ8dtVmZujB1j/tE9tsO oqoIyfa7Ixl3nGCFOZ4BdM16BfOolYEBLBD0H3pVfoKXaBg8Y2ES4INdTQE/ v/PjsWCV6RqAO1XFeCVgy1XDHA4a5lBNKdDF7juWfKBaYL0VzBB8a4r1db0l ip62uZT8MHE76HJ0Dc7heHBKdYDVUCfUPrZrd2pgsZ9ySaLYjhouPzMbr7uW G1aZBPLYQc1SFoITDsWzawZvyc01v3bZ4bdiKDV8yXEn0zUqnLC1XNVAKh3e E7vuSm1bdl1vPhzOoWru8BUaXAqLUfKY5SQtMcbKMGwqYVB1i2r6Z6cxmEWx BEo9oZwC5ui/u0fiBDl024yPF+xtjo7gmwGutVikkr+tysyTHXhVOfDVIZ0C NRx5oYoi76VTXgOoNznkgvcDZvc9le04wRF8Flieh8qrth1r95pPtfb2x6xP dnCITMCmj/5zNirLqp1GXinRzXVyt0nD5xEN0T7xIPAmleudGwCUSmwqgfMk ric2RPMd2vI7wc+i9RuEU4l5HvdWUakqnHHYUdwkjg4wxbIXBVxeHM4Ubuas m9Eu2Mc84BCcSTQPIhlWOuNjwJIbpDWwfMg7L7lUiGdnKCiD04Bvt2k9C/4O 1juaDmKwiQwTm3vpu2/GGRmghdyZ84QgGakT35tDEH9XMaWco0lutVbRRYoU SaxsFeMfUDP4UjFoBgLHZPPxDX1lZG2P0zXHYu/YRcqncjYI/WY9z0Tw7Urc y69EIPZDlUFarQRcIbEiFSvhXklys6tm7J7iXnmAYufzL0rkTtEmBk3mwG/v Jb/2QfA2iRfsh2nBVi26nur1WSC3CpXDuvnduEbkiQOQxTtqpeh6CeaAPMUK Gcx7iAW02rZ8nuKccwVIyX2YlYESZZ7iKwqC3IRy7id1HC7sqwvBxMXGV/Zk IH8LcNfgwpSYmg6IXjHzl5FAeJ1GQJlE6YEDZ4hkh2uRd0bGvSKKDsAE8B62 g6UUwWhJQhN4aOBgSlnMa6OSvx6nkwpUkrqk6BXbdMjBVk75dcDbVIuSn8r3 C5gy/bJgD8H4WDxTyU4746MRibLSwUNdPfh2mALSl5a0BeQnPSDtgyfAzeNP xIPFN/xfNhRHQA==\ \>"], "Graphics", ImageSize->{731, 379}, ImageMargins->0]], "Input", CellChangeTimes->{{3.4418578380712643`*^9, 3.441857839497766*^9}}], Cell["References", "Subsection", CellChangeTimes->{{3.4059068143867598`*^9, 3.4059068412130404`*^9}, { 3.405906886040587*^9, 3.40590688927745*^9}, {3.405907098097617*^9, 3.405907109932663*^9}, {3.410151936770359*^9, 3.4101519419755697`*^9}, { 3.4182625411574383`*^9, 3.418262549690422*^9}, {3.4414319868498163`*^9, 3.441431989321639*^9}}], Cell[BoxData[Cell[GraphicsData["CompressedBitmap", "\<\ eJzFnc2OHcd1x9v3e2Y4MxJJUR8UbQGyFcCw44DJIllkJ8iAP5YJuAkQQjZg LmwHild6gRgCvPNKb8A30BvoCfQAgR7A0RN0+nSdX/W/qk/1vUMOpQY4997u qlPnu06dOtX89dM//e63v3/6p2cfP33v5588/a/fPfv4v9/76I+fDLfW3+u6 1f92XffBe51974ev/me6vrY/eudmN/55/L7uv/nmm/7Jkyf22b0V3Bsb/yV1 vOvPnz9/Pj4f/nWr8e+6/+qrrxgm9fm+N7aGX3755fjrbb9nv+2+/Vr5vc8/ /xwgCcD/pEFfF6QePXpkbXKfzz77rP/oo4/mg4Kh/Xo4/t2Nv+0+F1Ta9ec0 1nb82PSPHz/uneWG62rk/WG8bZehaqjY7y+++IJ767HZ+QgUdoAhn59++ul4 f0BkZTCGwawpAw6f64BvK8erGnhl4BAAiKTejfbpoSHhpDnJd0Ysnj17Ng5r n9bN2nz99dcjp+ye/XbimkODqlBkMEYWruxXYuZ+BFwP6h0cyJuZazVC1s/u g5AhCLftHmK2T/ob0QbDkE1jGB7XI4+RNQIGjv1GkgETkpQGYnW8YZzDiP5h bG4gELyiOfzeiaQx8KRDlyOmRqld1tVAgAnKbeABOdxzUzxkcdAP7Ewbhnso h4FzK07qaLevM8+tNZpro7ggM2TljfO5G7VikC0yUcyd6O7g4yg/jVqwPDZW sn+j9DozFX04pb9zpEvc32ZjEHvvsEHjpLU3R3jw9spROL92nca6rR/66lLK hqHmPvBk5WDxRqLS3mWX1ZjLUd6Pj8/Hx0qBjQBVhoVzKTW/yHJHwVEXRcyF lh2tK/b4a2z8n+NXZ+JrMG58hEGhcgYTNbVxTTDGFAxz9CYG5qroamjBDLuw XfQmIeD+OWFpkO2WqZm6TMFgVVmsQ944K1v4Gm8Msg+emt/Jc5KyEFaghwbS 9bIx+NZVIGCik3EooOqIBj03+4eMgF1ww7rZdzUyDFLpgtE6FN/rZ7WcDRbO EwEFDBjhGB7w177bZXgNMHCcpmr4HRsCEI723uVtTRxCljddHVs8EsyAMaZ8 fs+7no3dIMr4Gwjf294fCYNJBsvaK/NdLiM6eAOYb9/xrv57NbqdTe7iE1DC fp3F1Y/uoM/xkLPXsXoHD59HaY1Ym72JCw7hJxf6r+zBXvDAb278Hpww33jw e8zdfY5Pzgp1gmuomn932i4KnK0NQjbcgeGeLztOlTowB5xw5bUGD6Cyx7Mh 8HiJ5dd5WkSJIEnRRiyg5JqdBnmatHLnat6yJhfrxtEkcMWIdTZhNvLu6fa+ gAzGCIk2TPQaQKFQax+aoBwKLXBCyGLbOeCsfD9NmaF6MVRQ9GebhRGPO8gZ ODRAEZJudS83V6aBegpDQbCtYt5py9HNhmhCuaARumm1h4pXdnucJs69GdPg JLlt1jE8qulX8iD7gljFZ1AeH3Sfzcf4XJl7oUGYmyHuSy/nuUG7l0NtXAjs IeyDJ+pK0BocrDvdwRmU9JqSJ3wvRnjWf2mM0gWdFTNPo98AOY0pdp21mwC7 F5crss3tRPZZqxBo9uJz0bAyc9Sz28GbTuDKIfC6zC/TmmGXgyodI4eJd3Iw z6UTqw3rHlAp73+TGh5zWL7GTPHNZZ5GtLl+t2fGI6YUZcCcn6Xd+3DdOAe5 Ac1Q2OXIkRjYA82NE8KimPUPGDtRCHzJb+XIywbcj3QY1GDQV+a/znMvsZqx GVbpzXHnMJ111+RULpuyVbUxkAbaae/gdk28E35VKWs/Wqb9fWsW2vkyK4f4 Gq7QltkKv2QSxK9U/XTh4ubvlD4s3IEGuS03xaJAOQOja9eC4TgaHW5cWYBb A90l+M5Z5/RFlkA9VtA/uzeTHsmweka2dm33No/QWBEzbtICCxnOZv4NnHDf KW4ZejMhzh3bdgxyiKWwka0w0XMpKSzye34ViyV0hOCcORMkC8/2ZqGK6IJd wruR9yxeUEP0h+9ML3YZzVM267hrc5kMz4xTd4psVI2D6oizDN/WQrnwbXdn K0m1BCJNDSHrpZuPmmRzHboP9f2GST2ke60uWv7TDxgae5NPq7yb8cuIl9Dc Qb/RlK/LKE+AZI6OUW+2jXsDbXP1544L2Un+DaQ6Lv84s3EiS9gDa8AL0iPf wBKYdtBD9osliqaQmOAZlzCuZjkJIZY44KY+pg7bppTyma4CQ9jJryVPxXSJ n5TJq+6f/RpjJo73OWwjlOOerMubfk3Vyy3B/dq+0B2B7yGqUbHT7Q9V+ZE9 +MdavTUr6atbXy3vM9/JHTA1aqhEltp+jUA+TiMnuneaZRzxdv1gwue2bleQ G9SkuyTdZrs95t7W7qNRPcSXVhMjvilUswfi0xSWrwYyfKbUPk+X2xm+aUWT AmDJqHn7y5yH0s0FVT995uz1hH45PukhpQ0Xg9q6KXrbewV8giK7tB9iByaq p1ngtMmQaASnKQF+VmQSG+LOCRSm/CqZPuPDtJWw1uXEMCH1xRLFlDq5u3NV RTIeOTGPOcgGFChOLNvopqKxiUUN+QAM1ClbpbTxnAuAMW5Ze+foMAwqV+9/ eAins7RPUDl3hWe2wGPj3cn46cKDvJaaEQttZidXF0GoZqwu9XWPx6HkNaAo jiv9bubXXFC6qjcO4Trh6DQ9bbMs0YtJh0pXSmhLKFSvZgT2mQxvgtHNsCmK 7HOQ516i8GrMttYXqrkniYDuBxU3FVWNwN71exr1XgZ9fypjkBA4c6gy62UP rely13EEzKSraEoqM0+mWGqy/sRRUruurY/8NrFKIefdCFGT5r602QkiZeru wUxz6tR9K4jTyKJ2ZWNmexIr7EMcNpx7rSJI9oVXITb3A8WemE6mmJZdvyk1 hnjPuuuSFC1Sr+SuxIsGyokA8agWXQd9lTy06CqA9xPpi8YzhjpZDNPg6drL vAiqRcpJVUuW0BknSeUVOWSkPXz+wDsYqiiyXcxdOG9vTm4IYXJpOJBzpdti XT9tG/fjDCXbrcUCMohQstAk1+6B4aaYjYaLCZQUZt/7cjM9OBTJAFVt3XJw nRrlPbrueyJRJP+BIIUBvxa0Q8oSDnT/6shLNYDBOatAJlJSxEWRAM0tIP2J g6nuJ9bs8oRPEOJSWjlclg29OEjZG0xcZxsTUfmEgnMR35OlpE4btWPp4vEI YRsaKtKKwqJsBRZDXAaobuQeQ5+77NXPaS1J3qj5bZL2+P1fhC6ftLo3BTje e2z8F+k4Xq0irF85BKaODGG8/lo2IrNgvz506rRGaRDbh95UqjpyFKfRcVTi NHT/W3z73wJtGpokLe5+LdIFPniok/zQ2a6LJ7s0178P+v1fcO/fhW84V0cH BSQ9MLFgq4rNDO27q1P4iNvQ6hUPhLIPhr1MxZMffZjtiugGjWVfWWoxZpVG GI3OwpBIwE4F0xQf7mZlIf4cdIOqkRzUsqRPs++A7JibG2BKOVfGcWiYpppD QSbpLuaJXNZ2v1gRt+q4mAx0idYostu7DiEguiG8lOzpgiKzoHBLCsCmFHs1 eKJjSjBOXdba5ZWNlwly5+/NuqgdMxwZoKnvVJOkMihXGRdN+UQ1b9RNBZWN /mzmRTaurFExJLWBgw+PMFVsAq3oKGq6gSYlLKWAcZ81vq77e1GluiqETAWa 4qQ0SmXiOvDY5D/UB/s6zgV4N6xIbRU/RoQWtnunSHFAgZaN6Rws0UPDLM5b Kl+gnBVhW+zMsQJlF/MGgrZbEUNZwR8pUY0tFWc5hADu/7OXi4SwVFb77VSn RrRf1BN6oZNqnhMur+k039LfJXoTmE0Gk3fqDMur2WLuRH/ULEROlO6btcIt X1qrwSbLqtM19jZS4IaziJiVhj8yFEp/W8XZx13JUo35FjLVL7iWXRVJOCkw X3RFmfLbV/QU5/qMdF7MIXbpWlpy7MiWHJlbfJF56CTJYZcvVDRjxzUVzCSr 0wpBuyRsKtzz1GeXd7RcPydrSsPpCt35lcUcPWNFRq1B3/dFROjoFQUpZZnh Opc/9HnNXWYGKSVn/Kh0t1WpSmKDrLvglHMCVXWuCzlt6uh2pqawynqL1/N4 rSpVJB+VRDgevnl1KPoHfV71kEG7la+ptJka4FRC+GDWHbNQqSxJrEEOu1AK Xmq6o/Ve0ts3W11CYrlfY9vSlYTWZUEp7Y/pGX113WGX6XdUAT3Xu0cvpQSt 73WldlVhHRZ4JHw+aNFa4KmwW3RGNq4b1pQQw1/FsWkz947ZwwztuiptzobX X0T0M1iUqwT4hbUd5bOfFa4K769pTx2fBH50ykDZV4tqSZVeomA/h+ItdaxN 1nFIpL9/VHNbZC6JX0V4Az/VLZ7IODSPTRRedrswz5R1MRSVwJgjSpzDBmAs ca7ss2uNu3PZ1anuFzu50nYsjYM3fz/zm7Vko9Mh1ekbVapvS+mTzudIQyMr lYZdvtGbl5kaGUicqGEkcSKBm660To0hKXQTBmVPhB4Te6dwuS+CRNnLXnxG rn1e0ThV5NhkmXbGrgp8wU1Da52wRWB1XazLSPfClOFTMcK8tkfFXprJrOwW w29pUIHFodikak5itzlIs9m+sDc2hrwYoou4Ni1CJ32MZ6sZAed+uzp8oid9 COk2cdMlMUYI8ezMRawW2+BLR9EBW71Ei/Yc4qmZ1P4qzBMlVlB1XpRM1you hz3a3jM6XHOITqCoJKPStnqJQIkpILm3qMAnHlTaz2ZooTV7zlMkp55TYLxc zFVSAcHsUn8eH9OJun4rB4H2DrFWzNCOotLifaiFkfyPuqBtpOst33D8HFc0 dcz1IvB6OScQBb+yTSM6dD1joPZt2elSLCXjnXJK5ASunOoG0r23Qn9Wy6/S pvC5Xd+iLmcPEGzFFpOoSU8zOmy3klS8WdBkKcqLvHHBpatc+MBxYKggOsxb M30REyGaKJbSZ0vxklb5XPuwxEseq0VnJRBRS7cXrJcojuywMDTXbb9I/OTU cUyFA0GKVa1I5Xx/42Dqlkc8IbJqe8HTA5mT+LdWarLviE7NRSHXeqH9TdFd UpfopGXNyeP9L7Ntyom58NDZLatfCSrVclLypn347ai1vfX95qnC4NjdCLpF pbepD1W7q72l2E3rlt3o9dBFQPpJMVwp8Wm3pIL1qmK5gqqpcrQV8wSSeYXn IaOgLrDSpaAu0tKbBHXyxplTgrrCrk455HpoHkWtJqV2fFcK3r9nwbdsrND6 i5mQI8s+ZVi2KW7pJHDbe7wRUhb5xlqslZIVpH1HB3+DiI8WUKMre8uWgalU VCLbQkC3lTLTyJc9+gneOr+f4NH4jrY+h3d6urIO/epnUein7w2gcvTK+aR4 6l6JKiRG3or9cmo6gZQzcq2DoS6md7OztKvesmE4tQ+qhKKzkrTR/szI3oay ySdSFVp3ueUhsxfRMet1UUbtjdwMbnDGg2gw6k4Orka/NYM1yOGdAdGB4qWo r30A+bUZqvX5es1wBIqiW6e4brtO0bHU970irY5biM7g3pYC6PSQT6Oc43WK t/jYpegN3EmW8XaGZJRynqt1zLoFukVladhTwgKdU/2pN00rVS92TSMzOHI0 PGJBsWt6Q6nPYLFzGE05KuUKdzIf+kj3kJeGj4632xWICatvce9lzopHoV9g qgmF749NKLpkNowU6xiVtcU/kkMVumdaRE+Xx3xTZMWuJ/vwoH7pfu+E7re2 cr7nkPzdo+obgWiZ4wnDJpnd2psSEoPeOdmZaBAdvBVj/F6pmT7/rt6KUMR+ 5zlC5ICcNUUGdeHdaooEbyn224exn2+P5YUWUXHfT6k52Dbd2xZllw5r8dkp qT8rvbxu4Mpe9ON8yv48vwiOOBodV/4MbXgzrYKrztz7VbzPzWN4L4w9hKt8 3FZeSl7M6lOZBwlynzypj6NfZf1RXxD1sWe3MuSmHjJaCLtm50ySMoCj5VqZ rCf46mJ8vJ9W07dEFpBDBEilApibVfCiTPVg7AugOUMf6na5Pcd2m5kyXxpu 6lcukLTRo/q+rmt14QWxLKf4h8lGLyVoKtrVyVJnrVu88qLxyuPy1QNDD63+ QWZUToBjYEtfNd7LEJE5WfRboUXXdOpsFmj40jNWgtHrPlTzW699QA3bQt+F sMeh5+CSt7lfGEDjbRqFwdVUoq72LFfVxC81UQMKXgQSCm3Zlbz8yzQ4ElVX 4jsMUIrkbt/n7wK5U6DfIlk4zVpBz2lD7Qt4q+brUygO0BOR9lmew7B+59nb thTCcalPkhQGuV9SqRzhVp7glFE7jjkpdayJj+jYydwivXMD31O+O2fHqbpC gJUxstUJRVLf+J1YQ3FYY1fEUaLNuGvjK3PIp/Y+exPs24VisVdMzKxnVu0y EGpHKObS0V0LbutCtylzWZ7kpvqTEyy6f4VIXZSt5/nVDlH0CMMttZKix7Pi kBNRLurrL0jJEanmn+8F96jU0HP77wg+vCDnOuj7Y8GR2gXeuKxm4VLNMORZ CPfBiXi+H9yD7uhFMQqvfqWb/fq7AB7jKs7vB30fBO3+KcDlYXDvIugLvEgG UoPa/Wj8mw3KJ8mey8OjXwYaxprI7M8sxEz2bjDqSu7BFTT2VO1C283toF0s tqd1UfyKHn3hCv+tjBTSe/VfqXEemOf8qcKI3ud7Uy1Uet4P7ul6EJ6tAlze CcaINPP1oO+9YNy2tk7lJj4pvRGw7Xl6oVf3OED/YXBvSXFVvPsAfTbIdE78 4fg3KzO5EF08Ds1/IZj4YryT1xqUByHRaNfwQtq6SLoX3BvRHlMVEM97a1Q/ tYe+/KfWWcq2++wld7Nwy/9HgEMAZi33SJlEhDxYJOSH+dvdBVQjkvRe1Pd+ hlynGQzTH4kGMMXebzDheXrr7X8EYPh/q1QOuwCZ9Cqv7hN/RKLNfvX5+kNq NN14yf9oa/FG973/B9Eiad8=\ \>"], "Graphics", ImageSize->{737, 38}, ImageMargins->0]], "Input", CellChangeTimes->{{3.441431978347926*^9, 3.4414319799911957`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{ RowBox[{"Cdl", "=", RowBox[{"10", "^", "logCdl"}]}], ";", RowBox[{"ko1", "=", RowBox[{"10", "^", "logko1"}]}], ";", RowBox[{"kr1", "=", RowBox[{"10", "^", "logkr1"}]}], ";", RowBox[{"ko2", "=", RowBox[{"10", "^", "logko2"}]}], ";", RowBox[{"kr2", "=", RowBox[{"10", "^", "logkr2"}]}], ";", RowBox[{"ko3", "=", RowBox[{"10", "^", "logko3"}]}], ";", "ao1", ";", "ao2", ";", RowBox[{"ar2", "=", RowBox[{"1", "-", "ao2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Epic", "=", RowBox[{"VSta", "/.", RowBox[{"(", RowBox[{ RowBox[{"FindMaximum", "[", RowBox[{ RowBox[{"if", "[", "VSta", "]"}], ",", RowBox[{"{", RowBox[{"VSta", ",", "0"}], "}"}]}], "]"}], "//", "Last"}], ")"}]}]}], ";", "\[IndentingNewLine]", "V", ";", "ao3", ";", " ", RowBox[{"Vmin", "=", RowBox[{"Epic", "-", "0.2"}]}], ";", RowBox[{"Vmax", "=", RowBox[{"Epic", "+", "0.2"}]}], ";", RowBox[{"Ko1V", "=", RowBox[{"Ko1", "[", "V", "]"}]}], ";", RowBox[{"Kr1V", "=", RowBox[{"Kr1", "[", "V", "]"}]}], ";", RowBox[{"Ko2V", "=", RowBox[{"Ko2", "[", "V", "]"}]}], ";", RowBox[{"Ko3V", "=", RowBox[{"Ko3", "[", "V", "]"}]}], ";", RowBox[{"Rct", "=", FractionBox[ RowBox[{ RowBox[{"Ko1V", " ", "Ko3V"}], "+", RowBox[{ RowBox[{"(", RowBox[{"Ko2V", "+", "Ko3V"}], ")"}], " ", "Kr1V"}]}], RowBox[{"4", " ", "f", " ", "F", " ", RowBox[{"(", RowBox[{"Ko1V", "+", RowBox[{ RowBox[{"(", RowBox[{"ao2", "+", "ao3"}], ")"}], " ", "Ko2V"}]}], ")"}], " ", "Ko3V", " ", "Kr1V", " ", "\[CapitalGamma]"}]]}], ";", RowBox[{"lw", "=", RowBox[{"{", RowBox[{"1", "/", RowBox[{"(", RowBox[{"Rct", " ", "Cdl"}], ")"}]}], "}"}]}], ";", RowBox[{"AbsRp", "=", RowBox[{"Abs", "[", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"Ko1V", "+", RowBox[{ RowBox[{"(", RowBox[{"ao2", "+", "ao3"}], ")"}], " ", "Ko2V"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Ko1V", " ", "Ko3V"}], "+", RowBox[{ RowBox[{"(", RowBox[{"Ko2V", "+", "Ko3V"}], ")"}], " ", "Kr1V"}]}], ")"}], " ", "Rct"}], RowBox[{"2", " ", "Ko2V", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "ar2"}], " ", "Ko1V", " ", "Ko3V"}], "+", RowBox[{"ao3", " ", "Ko2V", " ", "Kr1V"}], "+", RowBox[{"ao2", " ", "Ko3V", " ", "Kr1V"}]}], ")"}]}]], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"denZXi", "=", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "ar2", " ", "Ko1V", " ", "Ko2V", " ", "Ko3V"}], "+", RowBox[{"Ko1V", " ", "p", " ", RowBox[{"(", RowBox[{"Ko3V", "+", "p"}], ")"}]}], "+", RowBox[{"ao2", " ", "Ko2V", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Ko3V"}], "+", "p"}], ")"}], " ", RowBox[{"(", RowBox[{"Kr1V", "+", "p"}], ")"}]}], "+", RowBox[{"ao3", " ", "Ko2V", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Ko1V", " ", "p"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Ko2V"}], "+", "p"}], ")"}], " ", RowBox[{"(", RowBox[{"Kr1V", "+", "p"}], ")"}]}]}], ")"}]}]}], ")"}]}], ";", RowBox[{"ZX1Et", "=", FractionBox[ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"Ko1V", "+", "Ko2V"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Ko1V", " ", RowBox[{"(", RowBox[{"Ko3V", "+", "p"}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"ao2", "-", "ao3"}], ")"}], " ", "Ko2V", " ", RowBox[{"(", RowBox[{"Kr1V", "+", "p"}], ")"}]}]}], ")"}], " ", "Rct"}], ")"}], RowBox[{"denZXi", " ", "AbsRp"}]]}], ";", RowBox[{"ZX2Et", "=", FractionBox[ RowBox[{"(", RowBox[{"Ko1V", " ", "Kr1V", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"ao3", "+", "ar2"}], ")"}], " ", "Ko2V"}], "+", "Ko3V", "+", "p"}], ")"}], " ", "Rct"}], ")"}], RowBox[{"denZXi", " ", "AbsRp"}]]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ZX3Et", "=", FractionBox[ RowBox[{"(", RowBox[{"Ko2V", " ", "Ko3V", " ", RowBox[{"(", RowBox[{ RowBox[{"ar2", " ", "Ko1V"}], "-", RowBox[{"ao2", " ", RowBox[{"(", RowBox[{"Kr1V", "+", "p"}], ")"}]}], "+", RowBox[{"ao3", " ", RowBox[{"(", RowBox[{"Ko1V", "+", "Kr1V", "+", "p"}], ")"}]}]}], ")"}], " ", "Rct"}], ")"}], RowBox[{"denZXi", " ", "AbsRp"}]]}], ";", RowBox[{"Zf", "=", RowBox[{"Rct", "+", RowBox[{"AbsRp", RowBox[{"(", RowBox[{"ZX1Et", "+", "ZX2Et", "+", "ZX3Et"}], ")"}]}]}]}], ";", RowBox[{"ZfEt", "=", RowBox[{"Zf", "/", "AbsRp"}]}], ";", RowBox[{"ZEt", "=", FractionBox["Zf", RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"p", " ", "Cdl", " ", "Zf"}]}], ")"}], "AbsRp"}]]}], ";", "\[IndentingNewLine]", RowBox[{"GraphicsGrid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"10", "^", "3"}], RowBox[{"if", "[", "VSta", "]"}]}], ",", RowBox[{"{", RowBox[{"VSta", ",", "Vmin", ",", "Vmax"}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"AbsoluteThickness", "[", "2", "]"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"AbsolutePointSize", "[", "5", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"V", ",", RowBox[{ RowBox[{"10", "^", "3"}], " ", RowBox[{"if", "[", "V", "]"}]}]}], "}"}], "]"}]}], "}"}]}], ",", RowBox[{"FrameLabel", "->", RowBox[{"{", RowBox[{"\"\<\!\(\* StyleBox[\"E\", FontSlant->\"Italic\"]\)/V\>\"", ",", "\"\<\!\(\*SubscriptBox[\"i\", StyleBox[\"\\\"\\\\"\", FontWeight->\"Plain\"]]\)/(mA \!\(\*SuperscriptBox[\(cm\), \(-2\)]\))\>\""}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", RowBox[{"1", "/", "GoldenRatio"}]}], ",", RowBox[{"Axes", "\[Rule]", "None"}], ",", RowBox[{"BaseStyle", "\[Rule]", "monStyle"}], ",", RowBox[{"FrameTicksStyle", "\[Rule]", RowBox[{"Directive", "[", "8", "]"}]}]}], "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]s", "[", "VSta", "]"}], ",", RowBox[{"\[Theta]P", "[", "VSta", "]"}], ",", RowBox[{"\[Theta]Y", "[", "VSta", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"VSta", ",", "Vmin", ",", "Vmax"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "->", RowBox[{"{", RowBox[{"\"\<\!\(\* StyleBox[\"E\", FontSlant->\"Italic\"]\)/V\>\"", ",", "\"\<\[Theta]\>\""}], "}"}]}], ",", RowBox[{"Axes", "\[Rule]", "None"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"AbsoluteThickness", "[", "1.5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Purple", ",", RowBox[{"AbsoluteThickness", "[", "1.5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"lHue", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.5", "]"}]}], "}"}]}], "}"}]}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"AbsolutePointSize", "[", "5", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"V", ",", RowBox[{"\[Theta]s", "[", "V", "]"}]}], "}"}], "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"V", ",", RowBox[{"\[Theta]P", "[", "V", "]"}]}], "}"}], "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"V", ",", RowBox[{"\[Theta]Y", "[", "V", "]"}]}], "}"}], "]"}], ",", "Blue", ",", RowBox[{"Text", "[", RowBox[{ "\"\<\!\(\*SubscriptBox[\(\[Theta]\), \(\"\\"\)]\)\>\"", ",", RowBox[{"Scaled", "[", RowBox[{"{", RowBox[{"0.9", ",", "0.82"}], "}"}], "]"}]}], "]"}], ",", "Purple", ",", RowBox[{"Text", "[", RowBox[{ "\"\<\!\(\*SubscriptBox[\(\[Theta]\), \(\"\\"\)]\)\>\"", ",", RowBox[{"Scaled", "[", RowBox[{"{", RowBox[{"0.9", ",", "0.7"}], "}"}], "]"}]}], "]"}], ",", RowBox[{"lHue", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ "\"\<\!\(\*SubscriptBox[\(\[Theta]\), \(\"\\"\)]\)\>\"", ",", RowBox[{"Scaled", "[", RowBox[{"{", RowBox[{"0.9", ",", "0.58"}], "}"}], "]"}]}], "]"}]}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", "monStyle"}], ",", RowBox[{"AspectRatio", "\[Rule]", RowBox[{"1", "/", "GoldenRatio"}]}], ",", RowBox[{"FrameTicksStyle", "\[Rule]", RowBox[{"Directive", "[", "8", "]"}]}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ParametricPlot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZX1Et", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZX1Et", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logw"}]}]}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"logw", ",", "logwmin", ",", "logwmax"}], "}"}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"AbsoluteThickness", "[", "2", "]"}]}], "}"}]}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\"", ",", "\"\<- Im \!\(\*SubscriptBox[\(Z\), \ \(\"\\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\""}], "}"}]}], ",", RowBox[{"BaseStyle", "->", "monStyle"}], ",", RowBox[{"FrameTicksStyle", "\[Rule]", RowBox[{"Directive", "[", "8", "]"}]}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"AbsolutePointSize", "[", "6", "]"}], ",", RowBox[{"{", RowBox[{"Point", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZX1Et", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZX1Et", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logwc"}]}]}]}], "]"}], "}"}]}], "}"}]}]}], "]"}], ",", RowBox[{"ParametricPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZX2Et", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZX2Et", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logw"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"logw", ",", "logwmin", ",", "logwmax"}], "}"}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Purple", ",", RowBox[{"AbsoluteThickness", "[", "2", "]"}]}], "}"}]}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\"", ",", "\"\<- Im \!\(\*SubscriptBox[\(Z\), \ \(\"\\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\""}], "}"}]}], ",", RowBox[{"BaseStyle", "->", "monStyle"}], ",", RowBox[{"FrameTicksStyle", "\[Rule]", RowBox[{"Directive", "[", "8", "]"}]}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"AbsolutePointSize", "[", "6", "]"}], ",", RowBox[{"{", RowBox[{"Point", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZX2Et", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZX2Et", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logwc"}]}]}]}], "]"}], "}"}]}], "}"}]}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ParametricPlot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZX3Et", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZX3Et", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logw"}]}]}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"logw", ",", "logwmin", ",", "logwmax"}], "}"}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"lHue", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"AbsoluteThickness", "[", "2", "]"}]}], "}"}]}], ",", RowBox[{"BaseStyle", "->", "monStyle"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\"", ",", "\"\<- Im \!\(\*SubscriptBox[\(Z\), \ \(\"\\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\""}], "}"}]}], ",", RowBox[{"FrameTicksStyle", "\[Rule]", RowBox[{"Directive", "[", "8", "]"}]}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"AbsolutePointSize", "[", "6", "]"}], ",", RowBox[{"{", RowBox[{"Point", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZX3Et", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZX3Et", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logwc"}]}]}]}], "]"}], "}"}]}], "}"}]}]}], "]"}], ",", RowBox[{"ParametricPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZEt", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZEt", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logw"}]}]}]}], ",", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZfEt", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZfEt", "]"}]}]}], "}"}], "/.", RowBox[{"p", "->", RowBox[{"I", " ", RowBox[{"10", "^", "logw"}]}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"logw", ",", "logwmin", ",", "logwmax"}], "}"}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"AbsolutePointSize", "[", "6", "]"}], ",", RowBox[{"If", "[", RowBox[{"wc1", ",", RowBox[{"{", RowBox[{"Red", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZEt", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZEt", "]"}]}]}], "}"}], "/.", RowBox[{"p", "->", RowBox[{"I", " ", RowBox[{"lw", "[", RowBox[{"[", "1", "]"}], "]"}]}]}]}], "]"}]}], "}"}], ",", RowBox[{"{", "}"}]}], "]"}], ",", "Black", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZEt", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZEt", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logwc"}]}]}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Re", "[", "ZfEt", "]"}], ",", RowBox[{"-", RowBox[{"Im", "[", "ZfEt", "]"}]}]}], "}"}], "/.", RowBox[{"p", "\[Rule]", RowBox[{"I", " ", RowBox[{"10", "^", "logwc"}]}]}]}], "]"}], ",", "Purple", ",", RowBox[{"Text", "[", RowBox[{"\"\\"", ",", RowBox[{"Scaled", "[", RowBox[{"{", RowBox[{"0.075", ",", "0.9"}], "}"}], "]"}]}], "]"}], ",", "Blue", ",", RowBox[{"Text", "[", RowBox[{ "\"\<\!\(\*SubscriptBox[\(Z\), \(\"\\"\)]\)\>\"", ",", RowBox[{"Scaled", "[", RowBox[{"{", RowBox[{"0.075", ",", "0.75"}], "}"}], "]"}]}], "]"}]}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"Purple", ",", RowBox[{"AbsoluteThickness", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"AbsoluteThickness", "[", "2", "]"}]}], "}"}]}], "}"}]}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"\)]\)\>\"", ",", "\"\<- Im Z/\!\(\*SubscriptBox[\(R\), \(\"\\"\)]\)\>\ \""}], "}"}]}], ",", RowBox[{"BaseStyle", "->", "monStyle"}], ",", RowBox[{"FrameTicksStyle", "\[Rule]", RowBox[{"Directive", "[", "8", "]"}]}]}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"ImageSize", "\[Rule]", "500"}]}], "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", ",", RowBox[{"Style", "[", RowBox[{ "\"\< M,s \!\(\*UnderoverscriptBox[\(\ \[LeftRightArrow]\), SubscriptBox[\(K\), \(r1\)], SubscriptBox[\(K\), \ \(o1\)]]\) P,s + 2 \!\(\*SuperscriptBox[\(e\), \(-\)]\) \>\"", ",", "Bold", ",", "Medium"}], "]"}], ",", RowBox[{"Style", "[", RowBox[{ "\"\< M,s \!\(\*OverscriptBox[\(\ \[RightArrow]\), SubscriptBox[\(K\), \(o2\)]]\) Y,s + 2 \!\(\*SuperscriptBox[\ \(e\), \(-\)]\)\>\"", ",", "Bold", ",", "Medium"}], "]"}], ",", RowBox[{"Style", "[", RowBox[{ "\"\< Y,s \!\(\*OverscriptBox[\(\ \[RightArrow]\), SubscriptBox[\(K\), \(o3\)]]\) Y + s + 2 \ \!\(\*SuperscriptBox[\(e\), \(-\)]\)\>\"", ",", "Bold", ",", "Medium"}], "]"}], ",", "Delimiter", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "logko1", ",", "0", ",", "\"\\""}], "}"}], ",", RowBox[{"-", "2"}], ",", "2", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "logkr1", ",", "0", ",", "\"\\""}], "}"}], ",", RowBox[{"-", "2"}], ",", "2", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "ao1", ",", "0.8", ",", "\"\<\!\(\*SubscriptBox[\(\[Alpha]\), \(o1\)]\)\>\""}], "}"}], ",", "0.2", ",", "0.95", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "logko2", ",", "2", ",", "\"\\""}], "}"}], ",", RowBox[{"-", "1"}], ",", "3", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "ao2", ",", "0.5", ",", "\"\<\!\(\*SubscriptBox[\(\[Alpha]\), \(o2\)]\)\>\""}], "}"}], ",", "0.2", ",", "0.95", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "logko3", ",", "3", ",", "\"\\""}], "}"}], ",", RowBox[{"-", "1"}], ",", "4", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "ao3", ",", "0.3", ",", "\"\<\!\(\*SubscriptBox[\(\[Alpha]\), \(o3\)]\)\>\""}], "}"}], ",", "0.2", ",", "0.8", ",", "0.1", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"logCdl", ",", RowBox[{"-", "6"}], ",", "\"\\""}], "}"}], ",", RowBox[{"-", "6"}], ",", RowBox[{"-", "3"}], ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", "Delimiter", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"V", ",", RowBox[{"-", "0.15"}], ",", "\"\\""}], "}"}], ",", RowBox[{"-", "0.2"}], ",", "0.2", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"logwc", ",", RowBox[{"-", "2"}], ",", "\"\\""}], "}"}], ",", "logwmin", ",", "logwmax", ",", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "wc1", ",", "False", ",", "\"\<\!\(\*SubscriptBox[\(\[Omega]\), \(c1\)]\) = \ 1/(\!\(\*SubscriptBox[\(R\), \(ct\)]\)\!\(\*SubscriptBox[\(C\), \ \(dl\)]\))\>\""}], "}"}], ",", RowBox[{"{", RowBox[{"False", ",", "True"}], "}"}]}], "}"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"Style", "[", RowBox[{ "\"\\"", ",", "Medium"}], "]"}], "}"}]}], ",", RowBox[{"SaveDefinitions", "\[Rule]", "True"}], ",", RowBox[{"Initialization", "\[RuleDelayed]", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Ko1", "[", "V_", "]"}], ":=", RowBox[{"ko1", " ", RowBox[{"Exp", "[", RowBox[{"2", " ", "ao1", " ", "f", " ", "V"}], "]"}]}]}], ";", RowBox[{ RowBox[{"Kr1", "[", "V_", "]"}], ":=", RowBox[{"kr1", " ", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "2"}], RowBox[{"(", RowBox[{"1", "-", "ao1"}], ")"}], " ", "f", " ", "V"}], "]"}]}]}], ";", RowBox[{ RowBox[{"Ko2", "[", "V_", "]"}], ":=", RowBox[{"ko2", " ", RowBox[{"Exp", "[", RowBox[{"2", " ", "ao2", " ", "f", " ", "V"}], "]"}]}]}], ";", RowBox[{ RowBox[{"Ko3", "[", "V_", "]"}], ":=", RowBox[{"ko3", " ", RowBox[{"Exp", "[", RowBox[{"2", " ", "ao3", " ", "f", " ", "V"}], "]"}]}]}], ";", RowBox[{ RowBox[{"\[Theta]s", "[", "V_", "]"}], ":=", FractionBox[ RowBox[{ RowBox[{"Ko3", "[", "V", "]"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Ko1", "[", "V", "]"}], " ", RowBox[{"Ko3", "[", "V", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Ko2", "[", "V", "]"}], "+", RowBox[{"Ko3", "[", "V", "]"}]}], ")"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}]}]]}], ";", RowBox[{ RowBox[{"\[Theta]P", "[", "V_", "]"}], ":=", FractionBox[ RowBox[{ RowBox[{"Ko1", "[", "V", "]"}], " ", RowBox[{"Ko3", "[", "V", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Ko1", "[", "V", "]"}], " ", RowBox[{"Ko3", "[", "V", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Ko2", "[", "V", "]"}], "+", RowBox[{"Ko3", "[", "V", "]"}]}], ")"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}]}]]}], ";", RowBox[{ RowBox[{"\[Theta]Y", "[", "V_", "]"}], ":=", FractionBox[ RowBox[{ RowBox[{"Ko2", "[", "V", "]"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Ko1", "[", "V", "]"}], " ", RowBox[{"Ko3", "[", "V", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Ko2", "[", "V", "]"}], "+", RowBox[{"Ko3", "[", "V", "]"}]}], ")"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}]}]]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"if", "[", "V_", "]"}], ":=", FractionBox[ RowBox[{"4", " ", "F", " ", "\[CapitalGamma]", " ", RowBox[{"Ko2", "[", "V", "]"}], " ", RowBox[{"Ko3", "[", "V", "]"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Ko1", "[", "V", "]"}], " ", RowBox[{"Ko3", "[", "V", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Ko2", "[", "V", "]"}], "+", RowBox[{"Ko3", "[", "V", "]"}]}], ")"}], " ", RowBox[{"Kr1", "[", "V", "]"}]}]}]]}], ";", "\[IndentingNewLine]", RowBox[{"logwmin", "=", RowBox[{"-", "4"}]}], ";", RowBox[{"logwmax", "=", "7"}], ";", RowBox[{"\[CapitalGamma]", "=", RowBox[{"1.", " ", RowBox[{"10", "^", RowBox[{"-", "9"}]}]}]}], ";", RowBox[{"f", "=", "38.9"}], ";", RowBox[{"Farad", "=", RowBox[{"F", "=", "96485."}]}], ";", RowBox[{"lHue", "=", RowBox[{"{", RowBox[{"Blue", ",", "Purple", ",", RowBox[{"Hue", "[", RowBox[{"0.1421359549995791`", ",", "0.6`", ",", "0.6`"}], "]"}]}], "}"}]}], ";", RowBox[{"monStyle", "=", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "->", "\"\\""}], ",", RowBox[{"FontSize", "\[Rule]", "12"}]}], "}"}]}]}], ")"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", Editable->False, CellOpen->False, CellChangeTimes->{{3.404272476373662*^9, 3.404272477958503*^9}, 3.404272668581314*^9, {3.4042727232240887`*^9, 3.404272728454939*^9}, { 3.404272786841215*^9, 3.404272804870813*^9}, {3.404272838309691*^9, 3.4042728618375607`*^9}, {3.4042729526001043`*^9, 3.4042730381516457`*^9}, {3.404273079691609*^9, 3.404273217892606*^9}, { 3.404273294955968*^9, 3.404273298760388*^9}, {3.404273387794849*^9, 3.4042734503165693`*^9}, {3.4042734961086283`*^9, 3.404273547525057*^9}, { 3.404273625605628*^9, 3.404273650497052*^9}, {3.404273731173894*^9, 3.404273767096957*^9}, {3.404273799830763*^9, 3.4042738707648983`*^9}, { 3.40427393239679*^9, 3.404273934883729*^9}, {3.404273974145442*^9, 3.404274003508957*^9}, {3.404274114255464*^9, 3.404274136338912*^9}, { 3.4042741762935133`*^9, 3.404274195910239*^9}, 3.404274257986496*^9, { 3.404274329300447*^9, 3.404274329827894*^9}, {3.404274362144527*^9, 3.4042743661154137`*^9}, {3.404281794664309*^9, 3.404281797246611*^9}, { 3.404281837182343*^9, 3.404281875096817*^9}, {3.4042819679357033`*^9, 3.404282033539279*^9}, 3.404282085939872*^9, {3.404282140862443*^9, 3.404282160336235*^9}, {3.404282299291065*^9, 3.404282345207913*^9}, { 3.404282812673225*^9, 3.404282870347505*^9}, 3.4042829101123857`*^9, { 3.404282941905983*^9, 3.4042829483433933`*^9}, {3.404283073216866*^9, 3.404283082327835*^9}, {3.404283141356715*^9, 3.404283182821355*^9}, { 3.4042832155227327`*^9, 3.404283258833531*^9}, {3.4042833626548147`*^9, 3.404283398426738*^9}, {3.404390659988315*^9, 3.404390689351815*^9}, { 3.4043907568818893`*^9, 3.404390784286687*^9}, {3.404390860657833*^9, 3.40439091742135*^9}, {3.4043910359543037`*^9, 3.404391054714142*^9}, { 3.404391767968842*^9, 3.40439188885679*^9}, {3.404391935788953*^9, 3.404391940364382*^9}, {3.404392002048643*^9, 3.404392004447742*^9}, { 3.404392051525515*^9, 3.404392068363361*^9}, 3.40439214659828*^9, { 3.404392703278009*^9, 3.404392771112996*^9}, {3.4043928035315*^9, 3.404392840756844*^9}, {3.404392972994961*^9, 3.4043929740834846`*^9}, { 3.4044290030768223`*^9, 3.404429021544701*^9}, {3.404429287683379*^9, 3.404429317399768*^9}, {3.404429368432976*^9, 3.404429454063241*^9}, { 3.404429505178494*^9, 3.404429557925486*^9}, {3.4044306288480873`*^9, 3.40443063643995*^9}, {3.404436058103282*^9, 3.40443606382516*^9}, { 3.404442176375844*^9, 3.404442230132934*^9}, {3.404442261628434*^9, 3.404442267453909*^9}, {3.404442314318016*^9, 3.404442328013001*^9}, { 3.4044423891008577`*^9, 3.404442389940579*^9}, {3.4044425469300003`*^9, 3.404442548202819*^9}, {3.404442639671391*^9, 3.404442640118331*^9}, 3.404456693542221*^9, {3.4044731628011703`*^9, 3.404473224992757*^9}, { 3.404473319237414*^9, 3.404473331786914*^9}, {3.404473366700746*^9, 3.404473438662547*^9}, {3.404473479901114*^9, 3.4044735206668663`*^9}, { 3.404473554174704*^9, 3.404473559247058*^9}, {3.404473610185067*^9, 3.404473670607089*^9}, 3.404473917120986*^9, {3.404473956994831*^9, 3.4044739580180397`*^9}, {3.404474088931505*^9, 3.4044741427717657`*^9}, { 3.4044741754491243`*^9, 3.404474290693391*^9}, {3.404474329701288*^9, 3.404474330346374*^9}, {3.404474373890414*^9, 3.404474374373801*^9}, { 3.404474404892201*^9, 3.404474408099757*^9}, {3.4044747799074163`*^9, 3.404474789322126*^9}, {3.4044748366129103`*^9, 3.404474847666203*^9}, { 3.404475972114959*^9, 3.404475987975752*^9}, {3.404476018684896*^9, 3.404476038872746*^9}, {3.4045301344013033`*^9, 3.4045301513930283`*^9}, { 3.404530190584299*^9, 3.404530267364694*^9}, {3.404530412065104*^9, 3.404530421363574*^9}, {3.404532943959751*^9, 3.40453302831153*^9}, { 3.404797302593358*^9, 3.404797348319078*^9}, {3.404797395180875*^9, 3.404797445296929*^9}, {3.404797512936145*^9, 3.404797531923532*^9}, { 3.404797584908869*^9, 3.404797680615205*^9}, {3.404797888873632*^9, 3.404797927843219*^9}, {3.40479798203458*^9, 3.4047979846574163`*^9}, { 3.404799350410967*^9, 3.4047993800733356`*^9}, {3.4047994156019373`*^9, 3.40479946595382*^9}, 3.404799543220315*^9, {3.404799579114188*^9, 3.404799613458438*^9}, {3.4047996653481293`*^9, 3.404799762097822*^9}, { 3.4047998049182034`*^9, 3.404799895494069*^9}, {3.404799942573794*^9, 3.404799954307382*^9}, {3.404800020381646*^9, 3.40480040525935*^9}, { 3.404800550808537*^9, 3.404800608631371*^9}, {3.404800645053679*^9, 3.4048007327873917`*^9}, {3.404800953337172*^9, 3.404800971605794*^9}, { 3.404801514373068*^9, 3.4048015834412746`*^9}, {3.404801626280081*^9, 3.404801679756674*^9}, {3.4048017255455723`*^9, 3.404801764976033*^9}, { 3.4048022738128366`*^9, 3.404802309061829*^9}, {3.404802472835491*^9, 3.404802488648676*^9}, {3.404802873068316*^9, 3.404802940995611*^9}, { 3.404803021397653*^9, 3.404803089530534*^9}, {3.404803131352415*^9, 3.40480331416397*^9}, {3.404803390688555*^9, 3.404803399355961*^9}, { 3.404804076089295*^9, 3.4048040991309633`*^9}, {3.40486865759769*^9, 3.404868695689033*^9}, {3.404868727872806*^9, 3.404868752113332*^9}, { 3.4048689449556093`*^9, 3.404868945390654*^9}, {3.404868977091063*^9, 3.404868999611095*^9}, {3.4048690325438747`*^9, 3.4048691321976748`*^9}, { 3.404870017553321*^9, 3.4048700526476727`*^9}, {3.404870143865489*^9, 3.404870165374588*^9}, {3.404870236586739*^9, 3.404870241266412*^9}, { 3.40487782873768*^9, 3.404877843702971*^9}, {3.40487789143778*^9, 3.4048780145768547`*^9}, {3.404878061361676*^9, 3.4048780949841347`*^9}, { 3.404878133750465*^9, 3.404878280232869*^9}, {3.404878337386598*^9, 3.4048783719798193`*^9}, {3.404878438417426*^9, 3.4048784934083*^9}, { 3.404878523465645*^9, 3.4048785775459213`*^9}, {3.405511207402516*^9, 3.4055112246878357`*^9}, {3.405511272072027*^9, 3.4055113144445868`*^9}, { 3.4055113899812098`*^9, 3.4055114055521107`*^9}, 3.4055114565897427`*^9, { 3.405511542447608*^9, 3.405511544702585*^9}, {3.405511578649404*^9, 3.4055115867779827`*^9}, {3.4058475004512653`*^9, 3.4058475057616663`*^9}, {3.405847683675837*^9, 3.405847742261528*^9}, { 3.405847813034894*^9, 3.405847862566736*^9}, {3.4058479034737253`*^9, 3.405847915737713*^9}, {3.405847972630558*^9, 3.405848071685534*^9}, { 3.405848263832196*^9, 3.405848371901084*^9}, {3.4058484122428207`*^9, 3.405848434439968*^9}, {3.4058485048212976`*^9, 3.4058485149310703`*^9}, { 3.4058488561629763`*^9, 3.405848893735724*^9}, {3.405849690954006*^9, 3.4058497433152037`*^9}, {3.4058497908573227`*^9, 3.40584989515611*^9}, { 3.405849957531012*^9, 3.4058499590584803`*^9}, {3.405849992307493*^9, 3.405850043794392*^9}, {3.405850099359001*^9, 3.40585011759512*^9}, { 3.4058517151923227`*^9, 3.405851779818666*^9}, {3.407381728101392*^9, 3.407381751973065*^9}, {3.407381805775076*^9, 3.407381829965534*^9}, { 3.407381996344166*^9, 3.407382069327729*^9}, {3.4073823592813883`*^9, 3.407382364765223*^9}, {3.4091446948309183`*^9, 3.409144704757983*^9}, { 3.409145150121394*^9, 3.409145169748128*^9}, {3.409145221801231*^9, 3.40914534214545*^9}, {3.409145555864357*^9, 3.409145570587775*^9}, { 3.4091457201985807`*^9, 3.409145810944936*^9}, {3.4091979660446568`*^9, 3.409197989979432*^9}, {3.40919803855297*^9, 3.409198045609851*^9}, { 3.409198098466488*^9, 3.409198112257579*^9}, {3.4091981504837227`*^9, 3.409198153522263*^9}, {3.4091983396772823`*^9, 3.409198394447831*^9}, { 3.409198430147241*^9, 3.4091985144139557`*^9}, {3.4091985569382057`*^9, 3.409198645920292*^9}, {3.409198680357965*^9, 3.409198759343459*^9}, 3.409198797333907*^9, 3.409198858249975*^9, {3.409198898586858*^9, 3.4091989590514393`*^9}, {3.409199010753881*^9, 3.409199011201825*^9}, { 3.409199080287072*^9, 3.4091990871999607`*^9}, {3.4091991313120327`*^9, 3.4091991506497393`*^9}, {3.40919921656496*^9, 3.409199219103196*^9}, { 3.409199254442206*^9, 3.409199358914257*^9}, {3.409199406952813*^9, 3.409199435516676*^9}, {3.409199472250305*^9, 3.4091994758022137`*^9}, { 3.4091997282430983`*^9, 3.409199729777094*^9}, {3.409199856059022*^9, 3.4091998895127573`*^9}, {3.4091999729793043`*^9, 3.409199974582591*^9}, 3.4092000546359787`*^9, {3.4092001436980133`*^9, 3.4092001934302177`*^9}, { 3.409200247031893*^9, 3.409200349184458*^9}, {3.409200427862976*^9, 3.409200432516345*^9}, {3.409200542244075*^9, 3.40920055184779*^9}, { 3.4092005960240927`*^9, 3.409200599302109*^9}, 3.409659897133309*^9, { 3.40966001382692*^9, 3.409660023471949*^9}, {3.4096603583021812`*^9, 3.409660398665349*^9}, {3.409826369914709*^9, 3.409826549832324*^9}, { 3.4098267129596767`*^9, 3.409826763001767*^9}, {3.409827039601323*^9, 3.409827041308535*^9}, 3.4098357049570847`*^9, {3.409836076781519*^9, 3.409836082369824*^9}, {3.4098362001620293`*^9, 3.409836205395507*^9}, { 3.409836243672278*^9, 3.409836250163774*^9}, {3.4098870624197893`*^9, 3.409887079496112*^9}, {3.409887480167531*^9, 3.409887579914795*^9}, { 3.4098876544890757`*^9, 3.409887764519596*^9}, {3.409887859654282*^9, 3.4098879077556553`*^9}, {3.409887976652581*^9, 3.409888061869278*^9}, { 3.40988810046828*^9, 3.409888150048283*^9}, 3.4098882021345673`*^9, { 3.409888254379335*^9, 3.409888294266397*^9}, {3.4098883322826757`*^9, 3.40988833307551*^9}, {3.409888458439542*^9, 3.4098884772445374`*^9}, { 3.409888971709462*^9, 3.409888973717918*^9}, {3.409889033847617*^9, 3.409889034565271*^9}, {3.409889118168438*^9, 3.40988912242384*^9}, { 3.409889184644986*^9, 3.409889245842848*^9}, {3.4098893768829813`*^9, 3.409889398954444*^9}, 3.409889446666225*^9, {3.409889504149583*^9, 3.409889509922298*^9}, {3.409889553883994*^9, 3.409889608326518*^9}, { 3.4098896500586777`*^9, 3.409889656222608*^9}, {3.40988977856738*^9, 3.40988981125292*^9}, {3.409889870395122*^9, 3.4098899106131983`*^9}, { 3.409889969637135*^9, 3.409889974296064*^9}, {3.4098902765772257`*^9, 3.409890283751268*^9}, {3.409890415914304*^9, 3.409890418997225*^9}, { 3.4098905365496683`*^9, 3.409890552736751*^9}, {3.4098906794376574`*^9, 3.409890683419834*^9}, {3.409890862230513*^9, 3.409890862679196*^9}, { 3.409890930368342*^9, 3.409891162540668*^9}, 3.409891262503067*^9, { 3.409891318307454*^9, 3.409891396810326*^9}, {3.40989148470792*^9, 3.409891561310915*^9}, {3.4098916666894617`*^9, 3.409891745151566*^9}, { 3.409891790173766*^9, 3.409891793373557*^9}, {3.409961984636973*^9, 3.409961986696422*^9}, {3.409962096004808*^9, 3.4099627009814453`*^9}, 3.409962748548418*^9, {3.4099629640122538`*^9, 3.4099629663158293`*^9}, { 3.409963014267139*^9, 3.4099630700368023`*^9}, {3.4099631037820683`*^9, 3.409963195971099*^9}, {3.409963538379722*^9, 3.409963546515532*^9}, { 3.409963582654696*^9, 3.409963585095978*^9}, {3.409963619057889*^9, 3.409963652687055*^9}, {3.409963687375931*^9, 3.409963695576548*^9}, { 3.409963766561234*^9, 3.4099637943730783`*^9}, {3.409963830067019*^9, 3.409963905879588*^9}, {3.409964004179577*^9, 3.409964017983913*^9}, { 3.409964114927113*^9, 3.409964125998127*^9}, {3.4099642392248297`*^9, 3.409964267664547*^9}, {3.409964354097486*^9, 3.4099643557036877`*^9}, { 3.4099760538093853`*^9, 3.409976069020897*^9}, {3.409976110760868*^9, 3.4099761636454268`*^9}, {3.4099762146885977`*^9, 3.409976215664937*^9}, { 3.40997630849279*^9, 3.409976396858018*^9}, {3.409976457868639*^9, 3.4099764704991198`*^9}, 3.409976598000903*^9, {3.4099766817519073`*^9, 3.409976687061287*^9}, {3.4099767313396597`*^9, 3.4099767335465918`*^9}, 3.409976823154581*^9, {3.410149429685978*^9, 3.41014953731946*^9}, 3.410149977823204*^9, {3.410150030864727*^9, 3.410150043755621*^9}, 3.410150428436063*^9, {3.410150572093894*^9, 3.410150580297813*^9}, { 3.410150632005249*^9, 3.410150660879929*^9}, {3.4101507708731203`*^9, 3.410150827384691*^9}, {3.410150874753819*^9, 3.410150892525072*^9}, { 3.41059833537533*^9, 3.410598346089198*^9}, {3.4105983867993107`*^9, 3.410598444791081*^9}, {3.410598481020668*^9, 3.410598579557877*^9}, { 3.410598618730739*^9, 3.410598619118001*^9}, 3.417949434178256*^9, { 3.4179496300164223`*^9, 3.417949751883197*^9}, 3.4179511419625874`*^9, { 3.417997763765888*^9, 3.417998089108555*^9}, {3.417998144650931*^9, 3.41799817255051*^9}, 3.41799821111071*^9, {3.417998315871318*^9, 3.417998424440629*^9}, {3.41799846322906*^9, 3.4179985343605967`*^9}, { 3.417998568715629*^9, 3.417998666318487*^9}, {3.41799895543025*^9, 3.417998991102665*^9}, {3.417999047125546*^9, 3.4179990477132893`*^9}, { 3.417999084079496*^9, 3.417999086958641*^9}, {3.417999208176765*^9, 3.41799924973064*^9}, {3.4179992886878853`*^9, 3.41799930197871*^9}, { 3.4180067547576427`*^9, 3.418006829123155*^9}, 3.418006875139551*^9, { 3.41800690547751*^9, 3.418006953337328*^9}, {3.418007004527329*^9, 3.4180070439670343`*^9}, {3.4180070784406013`*^9, 3.418007163954267*^9}, { 3.418007225215246*^9, 3.418007227679633*^9}, {3.418009561320805*^9, 3.4180095728299303`*^9}, {3.4180096827433662`*^9, 3.418009715157667*^9}, { 3.418009802471468*^9, 3.418009834017932*^9}, 3.4180098876280746`*^9, { 3.418009950320879*^9, 3.418010005567071*^9}, {3.4180100426251707`*^9, 3.418010055248555*^9}, {3.418010119838146*^9, 3.4180101203030243`*^9}, { 3.418010228244794*^9, 3.41801024306673*^9}, 3.418010353024486*^9, { 3.418010742756483*^9, 3.418010766446157*^9}, {3.41801099423145*^9, 3.418011001209635*^9}, {3.418011424281515*^9, 3.418011429144436*^9}, { 3.4180115475535917`*^9, 3.418011552858307*^9}, {3.418011614765192*^9, 3.4180116564150467`*^9}, {3.4180117809247303`*^9, 3.4180117829037323`*^9}, {3.418011816960169*^9, 3.418011817355322*^9}, { 3.41801197896872*^9, 3.418011979272894*^9}, {3.418012208373004*^9, 3.418012216646144*^9}, {3.418012364826016*^9, 3.418012405728922*^9}, { 3.418035654018916*^9, 3.418035675430379*^9}, {3.418035883829249*^9, 3.4180358894434633`*^9}, 3.4180360266192827`*^9, {3.418036168777985*^9, 3.4180361798198233`*^9}, {3.418086923584012*^9, 3.418086942770763*^9}, { 3.418087048349567*^9, 3.41808706028839*^9}, {3.418087105703856*^9, 3.418087112652162*^9}, {3.4180872693993998`*^9, 3.418087274047105*^9}, 3.418089190411933*^9, {3.4180892269764643`*^9, 3.4180892293538027`*^9}, 3.4180895091347933`*^9, 3.418091146450473*^9, {3.418091237712615*^9, 3.418091261693074*^9}, {3.418091303719523*^9, 3.41809130883882*^9}, { 3.4180913813914213`*^9, 3.418091394676991*^9}, {3.418091424728513*^9, 3.4180914527430162`*^9}, {3.4182583555829477`*^9, 3.4182583852669897`*^9}, {3.41825861104793*^9, 3.418258611429817*^9}, { 3.418258666096218*^9, 3.4182586691248913`*^9}, {3.418258732377563*^9, 3.418258823462243*^9}, {3.418258899482452*^9, 3.418258966218912*^9}, 3.418259048187232*^9, {3.41826162940084*^9, 3.418261722711376*^9}, { 3.41826177577534*^9, 3.418261861047256*^9}, {3.4182619041599617`*^9, 3.418261970460414*^9}, {3.418262014999312*^9, 3.418262076747902*^9}, 3.418262221302092*^9, 3.418262359725176*^9, 3.418262413623827*^9, { 3.418266512851845*^9, 3.4182665558580437`*^9}, 3.418266619170464*^9, { 3.41826667347593*^9, 3.418266743624466*^9}, {3.4182667959808683`*^9, 3.418266815684431*^9}, {3.418266855596546*^9, 3.418266865538024*^9}, { 3.4182669007574787`*^9, 3.418266918177258*^9}, {3.418267112464221*^9, 3.4182671146252823`*^9}, {3.418267182943376*^9, 3.418267366968749*^9}, { 3.4182726253334837`*^9, 3.418272641986429*^9}, {3.418272681226139*^9, 3.4182727958358517`*^9}, {3.418273103388369*^9, 3.418273125216723*^9}, 3.4182733529002*^9, {3.418273513252945*^9, 3.418273544914019*^9}, { 3.418273619272998*^9, 3.418273623718878*^9}, {3.4184391467337*^9, 3.418439153166453*^9}, 3.418439433776864*^9, 3.418439475571064*^9, { 3.418439518053729*^9, 3.4184395182602053`*^9}, {3.4184396600129347`*^9, 3.418439667138685*^9}, {3.418440018378929*^9, 3.418440099833112*^9}, { 3.418440841038348*^9, 3.4184408498792877`*^9}, 3.4184409668940353`*^9, { 3.418441093862893*^9, 3.418441211621192*^9}, 3.418441378811412*^9, 3.4184414351597967`*^9, {3.4184415326372147`*^9, 3.418441551326521*^9}, { 3.418441601825213*^9, 3.4184416222060204`*^9}, {3.4184418602492123`*^9, 3.4184419338588657`*^9}, 3.418441974306828*^9, {3.4184420153942823`*^9, 3.4184420157667294`*^9}, {3.418442248395273*^9, 3.418442250652368*^9}, { 3.418442611184784*^9, 3.4184426294030046`*^9}, {3.418442726435979*^9, 3.418442735833583*^9}, {3.418442819624752*^9, 3.418442824884239*^9}, 3.418611800142091*^9, {3.418611840785331*^9, 3.418611869215754*^9}, 3.418611901965108*^9, {3.418611960753511*^9, 3.418611972786624*^9}, { 3.4186211496488123`*^9, 3.4186213914877234`*^9}, {3.4186214694426928`*^9, 3.4186214961776543`*^9}, {3.4186215563636417`*^9, 3.418621561535524*^9}, { 3.418621677016721*^9, 3.4186216963327427`*^9}, {3.418621729577548*^9, 3.418621741920219*^9}, 3.4186217919125147`*^9, 3.418621891919629*^9, { 3.418621978003533*^9, 3.4186220000962*^9}, 3.418622129453382*^9, { 3.418622189729357*^9, 3.41862220296904*^9}, {3.4375697087773457`*^9, 3.4375697105913477`*^9}, {3.440333112297378*^9, 3.440333195481803*^9}, { 3.440333237515974*^9, 3.4403332411648684`*^9}, {3.4403332883378897`*^9, 3.440333337315391*^9}, 3.440333427577691*^9, {3.440333485647482*^9, 3.440333492559065*^9}, {3.440333539907604*^9, 3.440333568123352*^9}, 3.440333634747816*^9, {3.440333672833865*^9, 3.440333743567409*^9}, { 3.440333775444263*^9, 3.4403337855310802`*^9}, {3.440333962241824*^9, 3.440333995301579*^9}, {3.440334027662711*^9, 3.440334052068905*^9}, 3.440649939773786*^9, {3.440650035109193*^9, 3.4406500495369864`*^9}, { 3.440655532974112*^9, 3.4406555752105627`*^9}, {3.440655640760964*^9, 3.440655660241892*^9}, {3.440814009199297*^9, 3.440814089808997*^9}, { 3.440814123905827*^9, 3.440814253056011*^9}, {3.440814346674839*^9, 3.4408143493078547`*^9}, 3.440814430401484*^9, {3.441431860752735*^9, 3.4414318886260223`*^9}, {3.441857865321509*^9, 3.4418578905545197`*^9}, 3.44205122716582*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`ao1$$ = 0.8, $CellContext`ao2$$ = 0.5, $CellContext`ao3$$ = 0.3, $CellContext`logCdl$$ = -6, $CellContext`logko1$$ = 0, $CellContext`logko2$$ = 2, $CellContext`logko3$$ = 3, $CellContext`logkr1$$ = 0, $CellContext`logwc$$ = -2, $CellContext`V$$ = -0.15, \ $CellContext`wc1$$ = False, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[ Style[ " M,s \!\(\*UnderoverscriptBox[\(\ \[LeftRightArrow]\), SubscriptBox[\(K\), \(r1\)], SubscriptBox[\(K\), \ \(o1\)]]\) P,s + 2 \!\(\*SuperscriptBox[\(e\), \(-\)]\) ", Bold, Medium]], Manipulate`Dump`ThisIsNotAControl}, { Hold[ Style[ " M,s \!\(\*OverscriptBox[\(\ \[RightArrow]\), SubscriptBox[\(K\), \(o2\)]]\) Y,s + 2 \!\(\*SuperscriptBox[\ \(e\), \(-\)]\)", Bold, Medium]], Manipulate`Dump`ThisIsNotAControl}, { Hold[ Style[ " Y,s \!\(\*OverscriptBox[\(\ \[RightArrow]\), SubscriptBox[\(K\), \(o3\)]]\) Y + s + 2 \ \!\(\*SuperscriptBox[\(e\), \(-\)]\)", Bold, Medium]], Manipulate`Dump`ThisIsNotAControl}, {{ Hold[$CellContext`logko1$$], 0, "log(\!\(\*SubscriptBox[\(k\), \(o1\)]\)/\!\(\*SuperscriptBox[\(s\), \ \(-1\)]\))"}, -2, 2}, {{ Hold[$CellContext`logkr1$$], 0, "log(\!\(\*SubscriptBox[\(k\), \(r1\)]\)/\!\(\*SuperscriptBox[\(s\), \ \(-1\)]\))"}, -2, 2}, {{ Hold[$CellContext`ao1$$], 0.8, "\!\(\*SubscriptBox[\(\[Alpha]\), \(o1\)]\)"}, 0.2, 0.95}, {{ Hold[$CellContext`logko2$$], 2, "log(\!\(\*SubscriptBox[\(k\), \(o2\)]\)/\!\(\*SuperscriptBox[\(s\), \ \(-1\)]\))"}, -1, 3}, {{ Hold[$CellContext`ao2$$], 0.5, "\!\(\*SubscriptBox[\(\[Alpha]\), \(o2\)]\)"}, 0.2, 0.95}, {{ Hold[$CellContext`logko3$$], 3, "log(\!\(\*SubscriptBox[\(k\), \(o3\)]\)/\!\(\*SuperscriptBox[\(s\), \ \(-1\)]\))"}, -1, 4}, {{ Hold[$CellContext`ao3$$], 0.3, "\!\(\*SubscriptBox[\(\[Alpha]\), \(o3\)]\)"}, 0.2, 0.8, 0.1}, {{ Hold[$CellContext`logCdl$$], -6, "log(\!\(\*SubscriptBox[\(C\), \(dl\)]\)/(F \ \!\(\*SuperscriptBox[\(cm\), \(-2\)]\)))"}, -6, -3}, {{ Hold[$CellContext`V$$], -0.15, "E/V"}, -0.2, 0.2}, {{ Hold[$CellContext`logwc$$], -2, "log(\[Omega]/(rd \!\(\*SuperscriptBox[\(s\), \(-1\)]\)))"}, -4, 7}, {{ Hold[$CellContext`wc1$$], False, "\!\(\*SubscriptBox[\(\[Omega]\), \(c1\)]\) = \ 1/(\!\(\*SubscriptBox[\(R\), \(ct\)]\)\!\(\*SubscriptBox[\(C\), \(dl\)]\))"}, \ {False, True}}}, Typeset`size$$ = {500., {208., 213.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`logko1$11058$$ = 0, $CellContext`logkr1$11059$$ = 0, $CellContext`ao1$11060$$ = 0, $CellContext`logko2$11061$$ = 0, $CellContext`ao2$11062$$ = 0, $CellContext`logko3$11063$$ = 0, $CellContext`ao3$11064$$ = 0, $CellContext`logCdl$11065$$ = 0, $CellContext`V$11066$$ = 0, $CellContext`logwc$11067$$ = 0, $CellContext`wc1$11068$$ = False}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`ao1$$ = 0.8, $CellContext`ao2$$ = 0.5, $CellContext`ao3$$ = 0.3, $CellContext`logCdl$$ = -6, $CellContext`logko1$$ = 0, $CellContext`logko2$$ = 2, $CellContext`logko3$$ = 3, $CellContext`logkr1$$ = 0, $CellContext`logwc$$ = -2, $CellContext`V$$ = -0.15, \ $CellContext`wc1$$ = False}, "ControllerVariables" :> { Hold[$CellContext`logko1$$, $CellContext`logko1$11058$$, 0], Hold[$CellContext`logkr1$$, $CellContext`logkr1$11059$$, 0], Hold[$CellContext`ao1$$, $CellContext`ao1$11060$$, 0], Hold[$CellContext`logko2$$, $CellContext`logko2$11061$$, 0], Hold[$CellContext`ao2$$, $CellContext`ao2$11062$$, 0], Hold[$CellContext`logko3$$, $CellContext`logko3$11063$$, 0], Hold[$CellContext`ao3$$, $CellContext`ao3$11064$$, 0], Hold[$CellContext`logCdl$$, $CellContext`logCdl$11065$$, 0], Hold[$CellContext`V$$, $CellContext`V$11066$$, 0], Hold[$CellContext`logwc$$, $CellContext`logwc$11067$$, 0], Hold[$CellContext`wc1$$, $CellContext`wc1$11068$$, False]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> ($CellContext`Cdl = 10^$CellContext`logCdl$$; $CellContext`ko1 = 10^$CellContext`logko1$$; $CellContext`kr1 = 10^$CellContext`logkr1$$; $CellContext`ko2 = 10^$CellContext`logko2$$; $CellContext`kr2 = 10^$CellContext`logkr2; $CellContext`ko3 = 10^$CellContext`logko3$$; $CellContext`ao1$$; $CellContext`ao2$$; \ $CellContext`ar2 = 1 - $CellContext`ao2$$; $CellContext`Epic = ReplaceAll[$CellContext`VSta, Last[ FindMaximum[ $CellContext`if[$CellContext`VSta], {$CellContext`VSta, 0}]]]; $CellContext`V$$; $CellContext`ao3$$; $CellContext`Vmin = \ $CellContext`Epic - 0.2; $CellContext`Vmax = $CellContext`Epic + 0.2; $CellContext`Ko1V = $CellContext`Ko1[$CellContext`V$$]; \ $CellContext`Kr1V = $CellContext`Kr1[$CellContext`V$$]; $CellContext`Ko2V = \ $CellContext`Ko2[$CellContext`V$$]; $CellContext`Ko3V = \ $CellContext`Ko3[$CellContext`V$$]; $CellContext`Rct = ($CellContext`Ko1V \ $CellContext`Ko3V + ($CellContext`Ko2V + $CellContext`Ko3V) \ $CellContext`Kr1V)/(((((( 4 $CellContext`f) $CellContext`F) ($CellContext`Ko1V + \ ($CellContext`ao2$$ + $CellContext`ao3$$) $CellContext`Ko2V)) \ $CellContext`Ko3V) $CellContext`Kr1V) $CellContext`\[CapitalGamma]); \ $CellContext`lw = {1/($CellContext`Rct $CellContext`Cdl)}; $CellContext`AbsRp = Abs[(($CellContext`Ko1V + ($CellContext`ao2$$ + $CellContext`ao3$$) \ $CellContext`Ko2V) ($CellContext`Ko1V $CellContext`Ko3V + ($CellContext`Ko2V + \ $CellContext`Ko3V) $CellContext`Kr1V)) ($CellContext`Rct/(( 2 $CellContext`Ko2V) (((-$CellContext`ar2) $CellContext`Ko1V) \ $CellContext`Ko3V + ($CellContext`ao3$$ $CellContext`Ko2V) $CellContext`Kr1V + \ ($CellContext`ao2$$ $CellContext`Ko3V) $CellContext`Kr1V)))]; \ $CellContext`denZXi = ((((-2) $CellContext`ar2) $CellContext`Ko1V) \ $CellContext`Ko2V) $CellContext`Ko3V + ($CellContext`Ko1V $CellContext`p) \ ($CellContext`Ko3V + $CellContext`p) + (($CellContext`ao2$$ \ $CellContext`Ko2V) ( 2 $CellContext`Ko3V + $CellContext`p)) ($CellContext`Kr1V + \ $CellContext`p) + ($CellContext`ao3$$ $CellContext`Ko2V) (( 2 $CellContext`Ko1V) $CellContext`p + ( 2 $CellContext`Ko2V + $CellContext`p) ($CellContext`Kr1V + \ $CellContext`p)); $CellContext`ZX1Et = (($CellContext`Ko1V + \ $CellContext`Ko2V) ($CellContext`Ko1V ($CellContext`Ko3V + $CellContext`p) + \ (($CellContext`ao2$$ - $CellContext`ao3$$) $CellContext`Ko2V) \ ($CellContext`Kr1V + $CellContext`p))) ($CellContext`Rct/($CellContext`denZXi \ $CellContext`AbsRp)); $CellContext`ZX2Et = (($CellContext`Ko1V \ $CellContext`Kr1V) (($CellContext`ao3$$ + $CellContext`ar2) $CellContext`Ko2V + \ $CellContext`Ko3V + $CellContext`p)) ($CellContext`Rct/($CellContext`denZXi \ $CellContext`AbsRp)); $CellContext`ZX3Et = (($CellContext`Ko2V \ $CellContext`Ko3V) ($CellContext`ar2 $CellContext`Ko1V - $CellContext`ao2$$ \ ($CellContext`Kr1V + $CellContext`p) + $CellContext`ao3$$ ($CellContext`Ko1V + \ $CellContext`Kr1V + $CellContext`p))) ($CellContext`Rct/($CellContext`denZXi \ $CellContext`AbsRp)); $CellContext`Zf = $CellContext`Rct + $CellContext`AbsRp \ ($CellContext`ZX1Et + $CellContext`ZX2Et + $CellContext`ZX3Et); \ $CellContext`ZfEt = $CellContext`Zf/$CellContext`AbsRp; $CellContext`ZEt = \ $CellContext`Zf/(( 1 + ($CellContext`p $CellContext`Cdl) $CellContext`Zf) \ $CellContext`AbsRp); GraphicsGrid[{{ Plot[ 10^3 $CellContext`if[$CellContext`VSta], {$CellContext`VSta, \ $CellContext`Vmin, $CellContext`Vmax}, PlotStyle -> { AbsoluteThickness[2]}, Frame -> True, Epilog -> { AbsolutePointSize[5], Point[{$CellContext`V$$, 10^3 $CellContext`if[$CellContext`V$$]}]}, FrameLabel -> { "\!\(\*\nStyleBox[\"E\",\nFontSlant->\"Italic\"]\)/V", "\!\(\*SubscriptBox[\"i\", \n StyleBox[\"\\\"f\\\"\",\n\ FontWeight->\"Plain\"]]\)/(mA \!\(\*SuperscriptBox[\(cm\), \(-2\)]\))"}, AspectRatio -> 1/GoldenRatio, Axes -> None, BaseStyle -> $CellContext`monStyle, FrameTicksStyle -> Directive[8]], Plot[{ $CellContext`\[Theta]s[$CellContext`VSta], $CellContext`\[Theta]P[$CellContext`VSta], $CellContext`\[Theta]Y[$CellContext`VSta]}, {$CellContext`VSta, \ $CellContext`Vmin, $CellContext`Vmax}, Frame -> True, FrameLabel -> { "\!\(\*\nStyleBox[\"E\",\nFontSlant->\"Italic\"]\)/V", "\[Theta]"}, Axes -> None, PlotStyle -> {{Blue, AbsoluteThickness[1.5]}, {Purple, AbsoluteThickness[1.5]}, { Part[$CellContext`lHue, 3], AbsoluteThickness[1.5]}}, Epilog -> { AbsolutePointSize[5], Point[{$CellContext`V$$, $CellContext`\[Theta]s[$CellContext`V$$]}], Point[{$CellContext`V$$, $CellContext`\[Theta]P[$CellContext`V$$]}], Point[{$CellContext`V$$, $CellContext`\[Theta]Y[$CellContext`V$$]}], Blue, Text["\!\(\*SubscriptBox[\(\[Theta]\), \(\"s\"\)]\)", Scaled[{0.9, 0.82}]], Purple, Text["\!\(\*SubscriptBox[\(\[Theta]\), \(\"X\"\)]\)", Scaled[{0.9, 0.7}]], Part[$CellContext`lHue, 3], Text["\!\(\*SubscriptBox[\(\[Theta]\), \(\"Q\"\)]\)", Scaled[{0.9, 0.58}]]}, BaseStyle -> $CellContext`monStyle, AspectRatio -> 1/GoldenRatio, FrameTicksStyle -> Directive[8]]}, { ParametricPlot[ Evaluate[{ ReplaceAll[{ Re[$CellContext`ZX1Et], - Im[$CellContext`ZX1Et]}, $CellContext`p -> I 10^$CellContext`logw]}], {$CellContext`logw, \ $CellContext`logwmin, $CellContext`logwmax}, AspectRatio -> Automatic, PlotRange -> All, Frame -> True, PlotStyle -> {Blue, AbsoluteThickness[2]}, FrameLabel -> { "Re \!\(\*SubscriptBox[\(Z\), \ \(\"s\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)", "- Im \!\(\*SubscriptBox[\(Z\), \ \(\"s\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)"}, BaseStyle -> $CellContext`monStyle, FrameTicksStyle -> Directive[8], Epilog -> { AbsolutePointSize[6], { Point[ ReplaceAll[{ Re[$CellContext`ZX1Et], - Im[$CellContext`ZX1Et]}, $CellContext`p -> I 10^$CellContext`logwc$$]]}}], ParametricPlot[{ ReplaceAll[{ Re[$CellContext`ZX2Et], - Im[$CellContext`ZX2Et]}, $CellContext`p -> I 10^$CellContext`logw]}, {$CellContext`logw, \ $CellContext`logwmin, $CellContext`logwmax}, AspectRatio -> Automatic, Frame -> True, PlotRange -> All, PlotStyle -> {Purple, AbsoluteThickness[2]}, FrameLabel -> { "Re \!\(\*SubscriptBox[\(Z\), \ \(\"P\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)", "- Im \!\(\*SubscriptBox[\(Z\), \ \(\"P\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)"}, BaseStyle -> $CellContext`monStyle, FrameTicksStyle -> Directive[8], Epilog -> { AbsolutePointSize[6], { Point[ ReplaceAll[{ Re[$CellContext`ZX2Et], - Im[$CellContext`ZX2Et]}, $CellContext`p -> I 10^$CellContext`logwc$$]]}}]}, { ParametricPlot[ Evaluate[{ ReplaceAll[{ Re[$CellContext`ZX3Et], - Im[$CellContext`ZX3Et]}, $CellContext`p -> I 10^$CellContext`logw]}], {$CellContext`logw, \ $CellContext`logwmin, $CellContext`logwmax}, AspectRatio -> Automatic, PlotRange -> All, Frame -> True, PlotStyle -> { Part[$CellContext`lHue, 3], AbsoluteThickness[2]}, BaseStyle -> $CellContext`monStyle, FrameLabel -> { "Re \!\(\*SubscriptBox[\(Z\), \ \(\"Y\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)", "- Im \!\(\*SubscriptBox[\(Z\), \ \(\"Y\"\)]\)/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)"}, FrameTicksStyle -> Directive[8], Epilog -> { AbsolutePointSize[6], { Point[ ReplaceAll[{ Re[$CellContext`ZX3Et], - Im[$CellContext`ZX3Et]}, $CellContext`p -> I 10^$CellContext`logwc$$]]}}], ParametricPlot[{ ReplaceAll[{ Re[$CellContext`ZEt], -Im[$CellContext`ZEt]}, $CellContext`p -> I 10^$CellContext`logw], ReplaceAll[{ Re[$CellContext`ZfEt], -Im[$CellContext`ZfEt]}, $CellContext`p -> I 10^$CellContext`logw]}, {$CellContext`logw, \ $CellContext`logwmin, $CellContext`logwmax}, AspectRatio -> Automatic, Frame -> True, PlotRange -> All, Epilog -> { AbsolutePointSize[6], If[$CellContext`wc1$$, {Red, Point[ ReplaceAll[{ Re[$CellContext`ZEt], - Im[$CellContext`ZEt]}, $CellContext`p -> I Part[$CellContext`lw, 1]]]}, {}], Black, Point[ ReplaceAll[{ Re[$CellContext`ZEt], -Im[$CellContext`ZEt]}, $CellContext`p -> I 10^$CellContext`logwc$$]], Point[ ReplaceAll[{ Re[$CellContext`ZfEt], - Im[$CellContext`ZfEt]}, $CellContext`p -> I 10^$CellContext`logwc$$]], Purple, Text["Z", Scaled[{0.075, 0.9}]], Blue, Text["\!\(\*SubscriptBox[\(Z\), \(\"f\"\)]\)", Scaled[{0.075, 0.75}]]}, PlotStyle -> {{Purple, AbsoluteThickness[1]}, {Blue, AbsoluteThickness[2]}}, FrameLabel -> { "Re Z/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)", "- Im Z/\!\(\*SubscriptBox[\(R\), \(\"p\"\)]\)"}, BaseStyle -> $CellContext`monStyle, FrameTicksStyle -> Directive[8]]}}, ImageSize -> 500]), "Specifications" :> { Style[ " M,s \!\(\*UnderoverscriptBox[\(\ \[LeftRightArrow]\), SubscriptBox[\(K\), \(r1\)], SubscriptBox[\(K\), \ \(o1\)]]\) P,s + 2 \!\(\*SuperscriptBox[\(e\), \(-\)]\) ", Bold, Medium], Style[ " M,s \!\(\*OverscriptBox[\(\ \[RightArrow]\), SubscriptBox[\(K\), \(o2\)]]\) Y,s + 2 \!\(\*SuperscriptBox[\ \(e\), \(-\)]\)", Bold, Medium], Style[ " Y,s \!\(\*OverscriptBox[\(\ \[RightArrow]\), SubscriptBox[\(K\), \(o3\)]]\) Y + s + 2 \ \!\(\*SuperscriptBox[\(e\), \(-\)]\)", Bold, Medium], Delimiter, {{$CellContext`logko1$$, 0, "log(\!\(\*SubscriptBox[\(k\), \ \(o1\)]\)/\!\(\*SuperscriptBox[\(s\), \(-1\)]\))"}, -2, 2, Appearance -> "Labeled"}, {{$CellContext`logkr1$$, 0, "log(\!\(\*SubscriptBox[\(k\), \ \(r1\)]\)/\!\(\*SuperscriptBox[\(s\), \(-1\)]\))"}, -2, 2, Appearance -> "Labeled"}, {{$CellContext`ao1$$, 0.8, "\!\(\*SubscriptBox[\(\[Alpha]\), \(o1\)]\)"}, 0.2, 0.95, Appearance -> "Labeled"}, {{$CellContext`logko2$$, 2, "log(\!\(\*SubscriptBox[\(k\), \ \(o2\)]\)/\!\(\*SuperscriptBox[\(s\), \(-1\)]\))"}, -1, 3, Appearance -> "Labeled"}, {{$CellContext`ao2$$, 0.5, "\!\(\*SubscriptBox[\(\[Alpha]\), \(o2\)]\)"}, 0.2, 0.95, Appearance -> "Labeled"}, {{$CellContext`logko3$$, 3, "log(\!\(\*SubscriptBox[\(k\), \ \(o3\)]\)/\!\(\*SuperscriptBox[\(s\), \(-1\)]\))"}, -1, 4, Appearance -> "Labeled"}, {{$CellContext`ao3$$, 0.3, "\!\(\*SubscriptBox[\(\[Alpha]\), \(o3\)]\)"}, 0.2, 0.8, 0.1, Appearance -> "Labeled"}, {{$CellContext`logCdl$$, -6, "log(\!\(\*SubscriptBox[\(C\), \(dl\)]\)/(F \ \!\(\*SuperscriptBox[\(cm\), \(-2\)]\)))"}, -6, -3, Appearance -> "Labeled"}, Delimiter, {{$CellContext`V$$, -0.15, "E/V"}, -0.2, 0.2, Appearance -> "Labeled"}, {{$CellContext`logwc$$, -2, "log(\[Omega]/(rd \!\(\*SuperscriptBox[\(s\), \(-1\)]\)))"}, -4, 7, Appearance -> "Labeled"}, {{$CellContext`wc1$$, False, "\!\(\*SubscriptBox[\(\[Omega]\), \(c1\)]\) = \ 1/(\!\(\*SubscriptBox[\(R\), \(ct\)]\)\!\(\*SubscriptBox[\(C\), \(dl\)]\))"}, \ {False, True}}}, "Options" :> {FrameLabel -> { Style[ "ER@SE/LEPMI, J.-P. Diard, B. Le Gorrec, C. Montella, 2009. Hosted \ by Bio-Logic@www.bio-logic.info", Medium]}}, "DefaultOptions" :> {}], ImageSizeCache->{873., {243.375, 248.625}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({{$CellContext`Cdl = 1/1000000, $CellContext`ko1 = 1, $CellContext`kr1 = 1, $CellContext`ko2 = 100, $CellContext`kr2 = 10^$CellContext`logkr2, $CellContext`ko3 = 1000, $CellContext`ar2 = 0.5, $CellContext`Epic = 0.0007575819413553653, $CellContext`if[ Pattern[$CellContext`V, Blank[]]] := (((( 4 $CellContext`F) $CellContext`\[CapitalGamma]) \ $CellContext`Ko2[$CellContext`V]) $CellContext`Ko3[$CellContext`V]) \ ($CellContext`Kr1[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])), \ $CellContext`F = 96485., $CellContext`\[CapitalGamma] = 1.*^-9, $CellContext`Ko2[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`ko2 Exp[((2 FE`ao2$$194) $CellContext`f) $CellContext`V$], Attributes[$CellContext`V$] = {Temporary}, FE`ao2$$194 = 0.5, $CellContext`f = 38.9, $CellContext`Ko3[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`ko3 Exp[((2 FE`ao3$$194) $CellContext`f) $CellContext`V$], FE`ao3$$194 = 0.3, $CellContext`Kr1[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`kr1 Exp[(((-2) (1 - FE`ao1$$194)) $CellContext`f) $CellContext`V$], FE`ao1$$194 = 0.8, $CellContext`Ko1[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`ko1 Exp[((2 FE`ao1$$194) $CellContext`f) $CellContext`V$], \ $CellContext`Vmin = -0.19924241805864465`, $CellContext`Vmax = 0.20075758194135537`, $CellContext`Ko1V = 0.17504363382409954`, $CellContext`Kr1V = 1.5460139911078625`, $CellContext`Ko2V = 33.64855745196729, $CellContext`Ko3V = 520.2114060133816, $CellContext`Rct = 2.8958063639245624`, $CellContext`lw = { 345326.9570983133}, $CellContext`AbsRp = 2.967341127344084, $CellContext`denZXi = -3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p)), $CellContext`ZX1Et = ( 33.008203328057355` ( 6.729711490393459 (1.5460139911078625` + $CellContext`p) + 0.17504363382409954` ( 520.2114060133816 + $CellContext`p)))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))), $CellContext`ZX2Et = ( 0.2640959751875682 ( 547.1302519749555 + $CellContext`p))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))), $CellContext`ZX3Et = ( 17082.379377324974` (0.08752181691204977 - 0.5 (1.5460139911078625` + $CellContext`p) + 0.3 (1.721057624931962 + $CellContext`p)))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))), $CellContext`Zf = 2.8958063639245624` + 2.967341127344084 (( 0.2640959751875682 ( 547.1302519749555 + $CellContext`p))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 17082.379377324974` (0.08752181691204977 - 0.5 (1.5460139911078625` + $CellContext`p) + 0.3 (1.721057624931962 + $CellContext`p)))/(-3064.027374234545 + \ (0.17504363382409954` $CellContext`p) (520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 33.008203328057355` ( 6.729711490393459 (1.5460139911078625` + $CellContext`p) + 0.17504363382409954` ( 520.2114060133816 + $CellContext`p)))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p)))), $CellContext`ZfEt = 0.3370020355209544 (2.8958063639245624` + 2.967341127344084 (( 0.2640959751875682 ( 547.1302519749555 + $CellContext`p))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 17082.379377324974` (0.08752181691204977 - 0.5 (1.5460139911078625` + $CellContext`p) + 0.3 (1.721057624931962 + \ $CellContext`p)))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 33.008203328057355` ( 6.729711490393459 (1.5460139911078625` + $CellContext`p) + 0.17504363382409954` ( 520.2114060133816 + $CellContext`p)))/(-3064.027374234545 + \ (0.17504363382409954` $CellContext`p) (520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))))), $CellContext`ZEt = \ (0.3370020355209544 (2.8958063639245624` + 2.967341127344084 (( 0.2640959751875682 ( 547.1302519749555 + $CellContext`p))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 17082.379377324974` (0.08752181691204977 - 0.5 (1.5460139911078625` + $CellContext`p) + 0.3 (1.721057624931962 + \ $CellContext`p)))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 33.008203328057355` ( 6.729711490393459 (1.5460139911078625` + $CellContext`p) + 0.17504363382409954` ( 520.2114060133816 + $CellContext`p)))/(-3064.027374234545 + \ (0.17504363382409954` $CellContext`p) (520.2114060133816 + $CellContext`p) + ( 16.824278725983646` (1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))))))/( 1 + ($CellContext`p (2.8958063639245624` + 2.967341127344084 (( 0.2640959751875682 ( 547.1302519749555 + $CellContext`p))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` ( 1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 17082.379377324974` (0.08752181691204977 - 0.5 (1.5460139911078625` + $CellContext`p) + 0.3 (1.721057624931962 + \ $CellContext`p)))/(-3064.027374234545 + ( 0.17504363382409954` $CellContext`p) ( 520.2114060133816 + $CellContext`p) + ( 16.824278725983646` ( 1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))) + ( 33.008203328057355` ( 6.729711490393459 (1.5460139911078625` + $CellContext`p) + 0.17504363382409954` ( 520.2114060133816 + $CellContext`p)))/(-3064.027374234545 + \ (0.17504363382409954` $CellContext`p) (520.2114060133816 + $CellContext`p) + ( 16.824278725983646` ( 1.5460139911078625` + $CellContext`p)) ( 1040.4228120267633` + $CellContext`p) + 10.094567235590187` ( 0.3500872676481991 $CellContext`p + ( 1.5460139911078625` + $CellContext`p) ( 67.29711490393458 + $CellContext`p))))))/ 1000000), $CellContext`monStyle = { FontFamily -> "Helvetica", FontSize -> 12}, $CellContext`\[Theta]s[ Pattern[$CellContext`V, Blank[]]] := $CellContext`Ko3[$CellContext`V] \ ($CellContext`Kr1[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])), \ $CellContext`\[Theta]P[ Pattern[$CellContext`V, Blank[]]] := $CellContext`Ko1[$CellContext`V] \ ($CellContext`Ko3[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])), \ $CellContext`\[Theta]Y[ Pattern[$CellContext`V, Blank[]]] := $CellContext`Ko2[$CellContext`V] \ ($CellContext`Kr1[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])), \ $CellContext`lHue = { RGBColor[0, 0, 1], RGBColor[0.5, 0, 0.5], Hue[ 0.1421359549995791, 0.6, 0.6]}, $CellContext`logwmin = -4, $CellContext`logwmax = 7}; ($CellContext`Ko1[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`ko1 Exp[((2 $CellContext`ao1$$) $CellContext`f) $CellContext`V$]; \ $CellContext`Kr1[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`kr1 Exp[(((-2) ( 1 - $CellContext`ao1$$)) $CellContext`f) $CellContext`V$]; \ $CellContext`Ko2[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`ko2 Exp[((2 $CellContext`ao2$$) $CellContext`f) $CellContext`V$]; \ $CellContext`Ko3[ Pattern[$CellContext`V$, Blank[]]] := $CellContext`ko3 Exp[((2 $CellContext`ao3$$) $CellContext`f) $CellContext`V$]; \ $CellContext`\[Theta]s[ Pattern[$CellContext`V, Blank[]]] := $CellContext`Ko3[$CellContext`V] \ ($CellContext`Kr1[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])); \ $CellContext`\[Theta]P[ Pattern[$CellContext`V, Blank[]]] := $CellContext`Ko1[$CellContext`V] \ ($CellContext`Ko3[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])); \ $CellContext`\[Theta]Y[ Pattern[$CellContext`V, Blank[]]] := $CellContext`Ko2[$CellContext`V] \ ($CellContext`Kr1[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])); \ $CellContext`if[ Pattern[$CellContext`V, Blank[]]] := (((( 4 $CellContext`F) $CellContext`\[CapitalGamma]) \ $CellContext`Ko2[$CellContext`V]) $CellContext`Ko3[$CellContext`V]) \ ($CellContext`Kr1[$CellContext`V]/($CellContext`Ko1[$CellContext`V] \ $CellContext`Ko3[$CellContext`V] + ($CellContext`Ko2[$CellContext`V] + \ $CellContext`Ko3[$CellContext`V]) $CellContext`Kr1[$CellContext`V])); \ $CellContext`logwmin = -4; $CellContext`logwmax = 7; $CellContext`\[CapitalGamma] = 1. 10^(-9); $CellContext`f = 38.9; $CellContext`Farad = ($CellContext`F = 96485.); $CellContext`lHue = {Blue, Purple, Hue[0.1421359549995791, 0.6, 0.6]}; $CellContext`monStyle = { FontFamily -> "Helvetica", FontSize -> 12})}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.404800717010476*^9, 3.4048007349077883`*^9}, 3.4048009791949453`*^9, 3.404801519837368*^9, 3.404801555665226*^9, 3.404801586035572*^9, 3.4048016282041197`*^9, 3.404801680365943*^9, { 3.4048022954497643`*^9, 3.4048023678537703`*^9}, {3.404802462648266*^9, 3.40480248967946*^9}, 3.4048031341791162`*^9, 3.40480323379039*^9, { 3.404803268741662*^9, 3.4048033374937983`*^9}, {3.4048034005313597`*^9, 3.4048034163819227`*^9}, 3.40486821121375*^9, {3.404868705367366*^9, 3.404868757868535*^9}, {3.404869116901802*^9, 3.4048691363260403`*^9}, 3.404870055608944*^9, 3.404870166776676*^9, 3.404870243061685*^9, 3.404877844114212*^9, 3.404877901483165*^9, 3.4048779518628883`*^9, { 3.404877988725613*^9, 3.404878015229787*^9}, {3.404878065796543*^9, 3.4048780955227013`*^9}, 3.404878134728373*^9, 3.404878205307247*^9, { 3.404878255150634*^9, 3.4048782806989803`*^9}, 3.404878373492175*^9, 3.404878440977964*^9, {3.404878475945093*^9, 3.4048784948480797`*^9}, 3.404878531305519*^9, 3.4048785797733*^9, 3.405510586620102*^9, { 3.405511226161893*^9, 3.4055112429751453`*^9}, 3.405511315608555*^9, 3.405511406172207*^9, 3.405511472547344*^9, {3.405511545883634*^9, 3.405511566517263*^9}, 3.405511767175766*^9, 3.405847507474002*^9, 3.405847744449215*^9, 3.4058478631378736`*^9, 3.405847916222649*^9, { 3.405848055128502*^9, 3.4058480722061043`*^9}, 3.405848328008115*^9, 3.405848372511467*^9, 3.4058484351426363`*^9, 3.405848516234066*^9, 3.405848900003933*^9, 3.405849700382514*^9, 3.405849743957779*^9, { 3.405849874847921*^9, 3.40584989584645*^9}, 3.405849959944483*^9, 3.405849998062675*^9, 3.4058500547477293`*^9, {3.405851762969138*^9, 3.405851788635597*^9}, 3.40738160522288*^9, 3.407381945410864*^9, 3.4073820825499973`*^9, 3.4073823672186813`*^9, 3.408020015022265*^9, 3.40914466508846*^9, 3.409144707297956*^9, {3.4091451509260483`*^9, 3.409145170558647*^9}, {3.409145223827775*^9, 3.409145239764941*^9}, { 3.4091453302658854`*^9, 3.409145343639382*^9}, 3.409145775512993*^9, 3.409145814717046*^9, 3.409198116732567*^9, 3.409198158986372*^9, 3.40919890620217*^9, 3.409198968302579*^9, 3.409199021598887*^9, 3.4091990963038607`*^9, 3.4091991582271976`*^9, 3.409199230560492*^9, 3.409199335067842*^9, 3.4091993664673243`*^9, {3.4091994150096684`*^9, 3.40919944029423*^9}, 3.409199746860559*^9, 3.4091998933768463`*^9, 3.4091999795203*^9, 3.409200064267725*^9, 3.409200197553776*^9, 3.409200358982931*^9, 3.4092004367084093`*^9, 3.409200557175161*^9, 3.409200603518158*^9, 3.409659910568177*^9, 3.4096600327339983`*^9, { 3.409660091707613*^9, 3.409660097899055*^9}, {3.409660202857298*^9, 3.409660213345396*^9}, 3.409826773901395*^9, 3.409827042643901*^9, 3.409827106705249*^9, {3.409835800641861*^9, 3.409835824910121*^9}, 3.4098360875834637`*^9, 3.409836206635317*^9, 3.409836255363801*^9, 3.409836290637307*^9, {3.409886980421564*^9, 3.4098870163768597`*^9}, 3.409887080675951*^9, 3.4098872056308937`*^9, 3.409887587775372*^9, 3.409887769529964*^9, 3.409887802723216*^9, 3.4098880667783337`*^9, 3.409888109798459*^9, 3.4098881546235647`*^9, 3.4098882168726263`*^9, 3.409888300116394*^9, 3.4098883443348207`*^9, 3.409888490297759*^9, 3.40988854350572*^9, 3.409888879062887*^9, 3.409889044272605*^9, 3.409889140962571*^9, {3.4098891907601*^9, 3.4098892469186497`*^9}, 3.4098894210451107`*^9, 3.409889458687312*^9, 3.4098895114643497`*^9, 3.40988955757618*^9, 3.40988961207395*^9, 3.40988965723277*^9, 3.409889722403647*^9, {3.409889796374792*^9, 3.409889812769383*^9}, 3.409889873819603*^9, 3.4098899131234007`*^9, 3.409889998850369*^9, 3.409890284916614*^9, 3.409890424371376*^9, 3.409890566222335*^9, 3.409891189254623*^9, {3.409891244932268*^9, 3.409891263602167*^9}, 3.4098914156815968`*^9, 3.409891570330901*^9, 3.409891754032576*^9, 3.409891810182384*^9, 3.409962711384685*^9, 3.409962754819952*^9, 3.409962880140072*^9, 3.409962967704153*^9, 3.409963550541718*^9, 3.40996359135052*^9, 3.409963919625001*^9, 3.4099640235588093`*^9, 3.409964136843704*^9, 3.409964269321042*^9, 3.4099759540422277`*^9, { 3.4099761509636297`*^9, 3.409976165827221*^9}, 3.409976216870792*^9, 3.409976397857567*^9, 3.409976428273657*^9, 3.4099764729458857`*^9, 3.409976600628902*^9, 3.409976688744515*^9, 3.4099767339461184`*^9, { 3.409976828391384*^9, 3.4099768487425003`*^9}, 3.410149381394435*^9, { 3.4101494908811693`*^9, 3.410149538520008*^9}, 3.410149980132579*^9, 3.410150430112067*^9, {3.4101506490485353`*^9, 3.410150665996497*^9}, 3.410150752988676*^9, 3.4101507989157057`*^9, 3.410150829895742*^9, 3.410150894195256*^9, 3.410594787550206*^9, 3.410598358464679*^9, { 3.410598423230947*^9, 3.4105984453951483`*^9}, {3.4105985300184517`*^9, 3.410598581556423*^9}, 3.41059862025382*^9, 3.4179983568219633`*^9, 3.417998484581305*^9, 3.417998583871489*^9, 3.417998639042677*^9, 3.417998678918503*^9, 3.417999015298149*^9, 3.4179990495983887`*^9, 3.4179990878187017`*^9, 3.4179991248751173`*^9, 3.4179992508867292`*^9, 3.4179993045148706`*^9, 3.41800685244239*^9, {3.41800688280252*^9, 3.418006930352956*^9}, 3.418006968430751*^9, 3.418007012019249*^9, 3.418007049585486*^9, 3.418007098673049*^9, {3.418007138309361*^9, 3.41800716589147*^9}, 3.4180072314397*^9, 3.418009585227479*^9, 3.418009688358447*^9, 3.4180097283138027`*^9, 3.418009857780624*^9, 3.418009890686223*^9, {3.41800998152782*^9, 3.418010006755549*^9}, 3.4180100598223333`*^9, 3.418010121458535*^9, 3.4180102470124407`*^9, 3.418010357152087*^9, 3.418010657550259*^9, 3.418010767641334*^9, 3.418011002554031*^9, 3.418011315944725*^9, 3.418011431367507*^9, 3.418011556069962*^9, {3.4180116335178127`*^9, 3.418011657582323*^9}, 3.418011727003965*^9, 3.4180117841796913`*^9, 3.418011818448697*^9, 3.4180120491984787`*^9, 3.4180122304045486`*^9, 3.4180124083523693`*^9, 3.418035087725815*^9, {3.4180356599341784`*^9, 3.418035676456119*^9}, 3.4180357120628853`*^9, {3.418035838939034*^9, 3.418035892299382*^9}, 3.4180361810941772`*^9, 3.4180869924612007`*^9, 3.418087063684471*^9, 3.418087116162409*^9, 3.418087275661634*^9, {3.4180912255200367`*^9, 3.418091262289029*^9}, {3.418091309332769*^9, 3.41809133537397*^9}, 3.418091395938911*^9, 3.418091453792142*^9, 3.4182583178511763`*^9, 3.418258360451726*^9, 3.4182586130168533`*^9, 3.4182586704137506`*^9, 3.418258784672042*^9, 3.4182588269179688`*^9, {3.418258907415098*^9, 3.418258936185543*^9}, 3.418258967153626*^9, 3.418259049499905*^9, 3.4182619825290203`*^9, {3.418262023607472*^9, 3.418262078174242*^9}, 3.418262222323882*^9, 3.418262423899721*^9, 3.4182665607650957`*^9, 3.418266622436296*^9, 3.418266748954624*^9, 3.418266829711029*^9, 3.418266869127973*^9, 3.418266923833414*^9, 3.4182671154882917`*^9, 3.418272756957287*^9, 3.418272799412898*^9, 3.4182731271175203`*^9, 3.4182733538504963`*^9, 3.418273547200943*^9, {3.418273595848611*^9, 3.418273624903942*^9}, {3.4184389799833403`*^9, 3.4184390074035378`*^9}, 3.418439182277651*^9, 3.418439452623218*^9, {3.4184394951956663`*^9, 3.41843951879667*^9}, 3.418439670038416*^9, {3.418440076915532*^9, 3.418440100843813*^9}, 3.4184408503776903`*^9, 3.4184409676604633`*^9, 3.418441214502418*^9, 3.4184413793085823`*^9, {3.4184414364321947`*^9, 3.418441477281776*^9}, 3.418441555220343*^9, 3.418441622925612*^9, { 3.418441869189312*^9, 3.418441887495408*^9}, 3.4184419366653633`*^9, 3.418441980060174*^9, 3.418442018500353*^9, 3.4184422514052896`*^9, 3.418442515897325*^9, 3.4184426307016983`*^9, 3.4184427367073183`*^9, 3.418442827684363*^9, 3.418611768376277*^9, 3.4186118036418324`*^9, { 3.418611855211772*^9, 3.4186118697779827`*^9}, 3.418611902534253*^9, 3.4186119767246237`*^9, 3.4186214259375277`*^9, {3.41862147153503*^9, 3.41862149676223*^9}, 3.418621562166211*^9, 3.4186215946338367`*^9, 3.4186216481741877`*^9, 3.418621697477644*^9, 3.418621745483803*^9, 3.418621797551803*^9, 3.4186218925257597`*^9, 3.418622001053484*^9, 3.4186221314678183`*^9, 3.4186222068142033`*^9, 3.437569692227414*^9, { 3.440333172610112*^9, 3.440333196032517*^9}, 3.440333242115032*^9, 3.440333337863142*^9, 3.4403334299157867`*^9, 3.4403334969026623`*^9, { 3.440333550817918*^9, 3.440333568463736*^9}, 3.440333790701633*^9, { 3.440333982781537*^9, 3.4403339956783743`*^9}, {3.440334028115321*^9, 3.4403340528480673`*^9}, 3.440649876889765*^9, 3.440649943320249*^9, 3.440650051685453*^9, 3.440650086097959*^9, {3.4406555201548986`*^9, 3.440655581567227*^9}, 3.440655664075467*^9, 3.4408139572084208`*^9, 3.4408140423331957`*^9, 3.4408140933172293`*^9, 3.440814130924367*^9, 3.440814187922255*^9, 3.440814256308708*^9, 3.4408144336726007`*^9, 3.441431811543249*^9, {3.441431868217532*^9, 3.441431889199605*^9}, 3.4418568888051043`*^9, 3.441856938081339*^9, 3.441857891117241*^9, 3.442051153141609*^9, 3.442051227598607*^9, 3.4420512740717907`*^9}] }, Open ]] }, CellGrouping->Manual, WindowSize->{1026, 726}, WindowMargins->{{96, Automatic}, {149, Automatic}}, DockedCells->FEPrivate`If[ FEPrivate`SameQ[FEPrivate`$ProductIDName, "MathematicaPlayer"], FEPrivate`Join[{ Cell[ BoxData[ GraphicsBox[ RasterBox[CompressedData[" 1:eJztXXlYU9e27/fe++Pe9757be9tax1AkUGQAMokiLMWB9Q60Dreaq2tA1Zb LaJ1wjrVjg44KyKCAzIj8zwFSBjCkDCEBAjIKELRKhqSvJ3ssNmckxNGxX7d v+/od7LPPmuvtWJ+a++19jnqbdy5fON/v/XWWybgz//811tvKc9FA4RQmDVv AVdnbMpy5+KEBNgm7kT6t3uleuMbxxrVsqbI7T6WTVsrn7paNvPTRs87VUUC cNREx7e67HlpOVNhYt0x3qJ11LiaS1cGqhIBAQEBwWtHzg0vro5eps5Yjv74 /E9WC27fEeXmivLzM8+eZxtYKsYayMaMe2Y+U+a0S7b8oMz5kHzpfrnjVy+W 7nzh9EWHzbIO8w87TB1emDk817doHG1QFRM71AYREBAQEPQBcPIvSE8vMDQW 6Ojl6+oV6Izj6RrwLOx5do6RJrP4rKkKvTGKMWM7DFjta09Jt17r2HpV+qWH 7LOzslUnpEu+kzp+JbVb9XLS/OesqfW6E+qMLcuzOENtFgEBAQFBHwBjQXlp abb91OLRY4vG6BeNHc83sMgzss+fuCTefnXTBGtlLNA36NAf92TGCrHbrao9 ng/3eDV/6/lsx+WOLz2kq49L5++UOqxsmzBDomsumTRFxOMNtVkEBAQEBL0F KgqA87yNm0Sjxlbqm/KMJ2bOcWQvWpa6Ym2881q+48ziD2cK5s8VLFrIn+WQ vv6LxO2uydt2sbd/m73dNX/rbv7nXwvWbSlyXpuz4COuiW2x9YzygoKhtoyA gICAoFcQY1B+PORerWPEs5hceuFoTcDl6oBrVUFekkDPOr+Ldfcv1gVcrgu8 Wud/ufb+JUnYrapwH8kDn+oHPjXhPg/DbtWGeD8MvFETdE3sezZ2ynRBarr2 octLSrL9A4TpPXQjICAgIHilAPxf0Ql1MPjukGScde5XX9QG3mgIDquLSJTE pLeFR/4REvokLKItMrYtJq4tNq4tLKwlKrohh9eQV9CYndfIyW1iZz9OZIP+ 1YHhkrDwIo+LkSs3Zoc+KBcK8RFLBQJuYmLU6dMRn2/irFojuXCpoqhoiKwn +OtCGBIi9PYeai0ICIYYaCEAo0ClCspwIBKVLFsrMZ+Xf9i1NiywKTGnNjWv IT6Nf/Fic0zis6z8p5m8p5m5Tzh5T9I5TxKS29LYLUWlzcWipkJhU1ZBXSK3 Ijq9PCKlIiGjPDQueJzdzeFjr1ja+i1c4rXc+ecFC/c4TNltPP63d98LGz6i Zt16SWrqUHuC4K8IEAj4b70FDoGODjh/RaOkD9GCNzw83MXF5eTJk3w+f0gU IPgTAY8FIApUqSAuLc0/fKzUdK5w5voc971VUQ+q0/IakjJaElNCJk9JsZ/O v+7VnFPQmlvYkp3fks1rYXPApZa4+OaU1EcpqfVxiVVRCeWhMSWh0WUxifyQ 8O8/GLln2Du/Dnv/0N//8fXf/vf0P4dFvvd+wwjdjgkT6695DrUPCP7SKN28 uWTVKmU4GDasPClp0OXn5ORcuHBh0MX2BiAGBQQE7Nu3z9OT/MoIqBCks1Nu 3ky+dSs3MbEkPx/M/8uFwjI+v4TDKYqN5QcE8c56ZC1emWU4NdPOOWOhC9fd reJBYH1M0u+xSY/SOckLFj3UMc4bZZC0co0gKLQuO7+Ry6tncxpSMhrjkxoj ImtDgiVBASJ/v5K7t/N9bhUEB2beu/PV8A/OjxzvM1zHb/jIsrF6ckMjhZ5e h4VVddiDofYHAYESICKAcFDs4DDokocwFkD4+vqCcDCEChC8mRALBNX3Ajkr Pz2vb3hk5Ae/WVl62NoGWtukWdlmTrLhWNvzJ08rsbARmjlUWs5usJ7J27e9 +r53U0RMU2Law/Ss2PlO5QbmFaY2pXqmKfoTEnd8LQiPrmJzq5LYkrgkSWS0 JChY7O9fcvdOka9Pzs0bOf5+/Lv3ci1mSEwdpJNmyFl2cpOJCv3xHRYTq6Oj X6mlQm/vwcoDl+fmKqW9shwCwZADrAhgsmjQawdDHgvA6sDFxWWo8lQEbz4k Sanir77JMbVINxgfbTSeYz6xzX66YrKDwmKSwshQoT9GYTBOMX5CjpuL+N6t h5HxkvhUUUp6xDynIiOLIpYNn2VbYmqTO9YkYpJt8vEfBFHx5XEpwvCoMv+g 0jv3Cn198ry9Mjyv8e/fb4xKlq8/IluyQzZtldxmvtzERmZq9TA4uPeqAiqG v1NwgHPUDhb1Gn+/cI6HDvARXQITP3z6R/kIoL5lzx7UUnb8OBoI9ASX0C3w nN/50g+gBkUfujRcrFIOi4UPrUxTdBoIExdIeWQUaAfEBRQABwpP4ESgo4Py 3vBeJBwRXdm5c8iloA+0C9xSsnAh1BlqhfxMvxGOArUCfaADgRxgI5AAtaK7 DmpC0QqqDYZW+5bFgo7qugsY6O0NxgInoJHuQ1wZCiia4/4BosCh/Cq734i+ 4m5yGBxF9wwTtMcCwNLh4eGURpjnpwg5efKkiwru7u7x8fGo/bffftu1axdo x3NBuFjQB3wEqwMtOkAAOUAaRR+kDBgUDA17AmVQcAEdoAIBAQF0i9BHmK1C QnArcOGwD/gbSqPI5/P5wJlIVdATnMNqCBwINMKreFqM4g2NntT+pYAhoA6o BZiP5ODeoDtE44javaFFOFzlQUfh3ynFRqAAuJFumhaIU9PEn216PMmm1ca+ berMduspcj0DxVgdhZGR3GySgmWb5ba95M4tcUScMCaxJCHZ33F+qqF5Bsua rToyzGwyTCzDdQzuz56bcsajKCS8ODCI7+PD8/LiXL/Gvnq5LDpRkpT5cs8F 2WcnZU7bZVOWKVjTms5c7JOSiGNxmsUDBE62iDPBCX4Or/YjFiA2A41dxDXg WICqloj8KZ3VQUfFnIiiwUcwND0IIsUgLaP+XVZA2uwUDg2HhkCBQIJI0/SY cqOaz1Xmw3O1EBYLaUVxHdRKyerd3QXG6gqyKrvAgRQA40LFYB+NPoRWMyV2 cM3VgWDYMKVMHR0Ua+hfB2VqweQoumeY0GMsQKSHAFpw2oE/bUAXASoAuoMk AAkKcgJoB3+DPnSxUJoWZgBXgYZIOPgI/kblZqQMoBrUDQwEhoZ9gAJAOGiE lEWxCH2EcsBdUFs4ELwFGgKFgKs4kVLkAwWQBNCI8zMKEEgIHhkRLWv0ZI9f CugGmRn/RqBWSBPQSFeYaUQt3tAiHKoB7ALt4G88xCOdgTPBcECHfmwYEIvF VWc8nk+bLbObLrWdJTWbIRunr9DTlZvbyCd/yHZ1KfLxKg2L4ofHFEbFes2Z e0fP2N/Y4j52BJhY3NMzvjJqzO3lzhmXrxT4+OZd90y5dDHH905hbHJpXGrL gcuy7WdlKw/Kp69tX7ZJ1H1zaY9AHIL/9PAAgX6eKEBQGBVRbl9jARoFMTZg rUGJBegq7Ny1oaWzgomkoYEA+agH6uxM4XYYOJQZrc4OlGAB1aZfhcPBEwr3 UvgWNxkOCiIC5RLV/M5FBGVc1B+NBXNxaoernABaIOVqJHyK/ynANVfP4TsX Fyh04uZD5+NjaXeU9kiEMPBYAG7X+NMGbMD0k8fFAjKBM0kmcqDoACaokFQ1 KgMBRKGJKBP5Uz5COfglQFnQM3DpgbgUfkQ98XNInkgCnDyjbni8g+GAIoHJ k9odAkMVnMDDFigHvwV8RN8yfjvTiFq8oUU4xXyNNsJ1InJmX1FZWVkTFS39 cJHCbGqHnbN03jappb1cV0duYZfqui3P+3pR4ANecHheWMT5mbN+Ga13Tt/4 bPcDtHjoG/8yQveUrt7djRsTzpzJuno1OzQqLzK+KDrxofuVl67nZRuOy2du qL/Xh+wQhPpHpyJhCvOocxSdJAkW7DiTiGhr+T7HAtrsfbByRGh0eBXnImQj kkZXA87JURBUB4thw5gMwTvgUYZJKybJXTaGhOArFwiNqw8kiqIVE5NDJ6Dc C1zj4KYh0B2OA9cc/hNCy8Ou5U9nkk2dslNN/rsCtFZH0X2uEQOPBUwbgQB7 MG0QwmeJkLQ1JqOYdIAKoGwGPRbA5Azs0KdYgLMijGUah9ASC3Dh+I2UcWFm jLJU6eWWKoooSLn4WHQ5yBbK7UwjavEGk3BY98FJnm4j6AlUHUhtqKKioqqq qjY5tWP6Yrntx7IV3z3acrpt2gLFOEO267aiOzdLH0QXRUQXRsZemj3nrK7B RcMJGo9LRqYX9E1+fW/UVXOLhGNH86LiBIlpJXGpVe6Xn7iel288Lpu/tTqp z3pChqEk2NXpdDTtV5G/RnrB+acfOSJ1DFq4EPLGIMYCmMKCVAnvRVwEzYFD w9tRsl2d2FdFPURE9CBI4WGcw9E5kEw5RPQ1SPeJOm6Usl7QGaDVzsEsQh+R KFH3pQRTLEDkD4wCQ6C1nsbavRYPdzM5JAStd+i+RcoAzaEn1QsorY7C5Wv8 fiEGHgvwHA4EmpBT2gEgVyCxMAoAzgFzZjTV740OgFKg2hRlAM+gPJLG27XE AjSJpZjZ+1gAc0TAKMiilFhASf7TVy5MntTiELgogJkcprhD1wRXXuOIWrzB JFxjUMZNg6skpojfS8BYAFYH9UGhcqslsmX7WlzOFu4+1zxlTrabi9DftyIm sSw2qSQ+6bbj/FBDswiWlYbD1CrceGKUuWXmcqe0vS7xly6UxCWJ2dyKtCyJ +6XHbuc6tvykmLez4YZfn3RDVIBOYDv8LSvrlaoTOI18FbEAVg/5WDF6sGKB ms9VVAkJUEmqKiGQLdWTf2wpBMMifqBcCr97KZPOw3wsT0IR0iUNz9LA8jFN Mr5Aw0ur6NCwTEOrKkwrevzCPQNHwQ+N5WOUsoMUDcMH+uLwG/E6NTq6fKtS DC8uwC9Ri6Mo8pkwKLGADqZ2xAwoYwAzJ3Ty0a4DuAtWH3BlYN0WZr+Zbn+l sUCkmiTDMgHuChFDLKB4g8mTWhyC8jD9jgUaR3wVsQDGHbo5vYdYLK7sBDh/ tn6XfOHOZy6nha4X8r/5Ofu7r8QBvtVxyeLEtLLk9MD5C9INzTlmNlks1dF5 kmlixZlgWeg4u8BtS8KFX3kRUVXZ+ZVpmVVsjoTNrfn+8iPXM9LNp+RLvpU6 bqrK6kMuS508UbEHvn5HJIwWCKLByxEhiuimiWpGjRdPBxgLkG7gBIrCAxZo VM+QMT4XoQ2u3t7q5RJlh0/nWBpWCnAmrMqTUDYpdc29vb2ZyJ+yowlPDUFb wL0U8qdXovF9SspaAHNdGLlU6fPuGR4c9DCtXFB0kjNFc7VM1fdISXDh+TqU L9LuKFH34hETeowF+LwRru7pOSI8Sxyg2oJCbxdhfIgoAmWYYT6BadsMPRZA 2seVgXkhes/exwIKlfUjR4QAHAX0gfVTjd1we9ElJk8yWYQWBRQl+5Qj0jii Fm/0O0cE12sDWRegh45hLGg9cEo+98uXX/xUu9uDd+Ay96hbdeDtuoTU6pQM UWpG5DynYgOLElObElNr1d82JSZWJcaTKqY6iF3WZXicSvb1zfa7X8fNrc/m 1Wdw67Jy6tjZdQc9Wveel244IlvqqrBb2b5sS2VOXi/V65aT6Zy8qTMqqh8y 3mGwasdw3wtsAYSGT1whL1GyHJB8ENGp58woDDHPG1FuHI8FaGlAKRMoNcG3 1FJ2+HQvZaLRUcYGJy54FW1hpVCculzLYqmdprpR6RMsEdQVAbEMiYZtSN3Z XmP5GEnGgbfg8ZcC/CtAkRoFMsqNuEzKVis8FiC1lZFRq6PQcFrCWY+xAAee lkG8DRrRBiERNtWnFBlROkjUSUeQvVH2mCl33ctYQN/pqvF2Fyx9JKLFApyp gFGwZ59iAZ5jpxRPKbVjijdEzJ5ksgiXT1kf9b52rHFELd4YSO1Ye2FIO/AX UCjfRFQmbP9og2z2RtmG4627z5fsu5B98kBt6L3mhJSGtKxqdlbcfKcKffOK CdbKw8Sqwmhi9SSb2nVL8391z/T3KwoNLwh9UBQU3MDJfZSd35yR08LNa8nI btlxom3Hz9L17rIF2+TT1ynMHF8sWCNJSu6NhvQJG/gBohMRVnWF/Xu5pxTu MFfvG1dtNcSTJygVA+elkFHxPaWwMyIi9WbFTmnKjywWEqLlzQbIOjwWiLCl Ac48cBMmRROU5Ee7H1FCu0sfHR2UckGhAdVfkDTkQ/QRv1FtV+coXaWK48eV G+9XrVLq0NkZsC5c7KBd/XCnq4hhn5LSLihBta1UpIpH6swPerACq0EjoLUY WsWoBaoWU5SFGxhCaS/4hwEU63QOvKRxCgGDiBZHodoKfZMqQv9yRLtUADcC Psc3GUKKhmEC368IaYGSw6ewCj537VEHuPtIhHEgvvMTjgjfcYGWNmiCCjdV QtaixAKNuyiZYgFdPgCSAE3GGRiGoYCe9pTSPanRIfiigKIk07ZPusJMI2rx xgD3lNKjTC9BeTddXVCYzGxmx/RVspWH2refqXHzyPvxUENEwO/xiY/Tsuqz suMXqGOB2GhSJcuybum80qO7Mm57C+KTHqamP4yNKwwJyw8KauTkNXF5j9jZ LTkFTzLznn5+4I/Ve+Qf75PN+Uxut1xuvURhvVDqML/c06tHDfFdJXBWCX/O +C+XQrngKr6zXeOzZvg+VZwHELGgeoTywa7uueuubAk2KUUjwkeZ0Eft+88R 50DFEKGhpQFlvkrJeCuZE5u64wfwFSofIzrF1zsiVR4JdxRav6D8STe7zp3r Zhe2J0ejf/AHQPDwQd9cRKmDoDiLlyG0vDuOog/KU+FVclRwxwfCTaYEFMr8 n8lRaB6CatN09foXC9AjV/Be9PARZSMNeo4JsiKaM0Ox+GRV1Jnkoe821KgD 5HNR9+UAPhzcKo8vasBHuG0JDATJTdT9WTN4if50FX3FAe+iyxdhD1vRTQaX mJ41QwYyeZLuEBhQ6M9ZUOS4YI+DaVRY44havMEkHELLs2Z4jaMf4QCPBVV8 wfN5S2WsqVK7RS8Xbm1fd+SRyy/5PxxsjPB/EhvXmpL+KJMbscCpYByLb2Ip mjND6PoF58bFvLAIcXxyfWp6fXJyXUxM2YOwvMDA+rSshoycxjROMze/NTPv 0X/2PV228/msTR32q6VWS2Rmc+TmMxQWs+QTpzVv/bqSncGkHn3vH+JAPp6I 6NxohN+r8R0UPeaIKBK6NOnM0jOqquqAFy5hHGHqD4G2A1EsEmGcSZ8SQ5bD hXfbHbR5M9QE3/QI8/l4igk3s2e78LEY7IJy8CHw58tgDgdpojEpRNeQqTMO ypdI4X96RKZ/lailm/J0J9MchYui/ANA6EcsGDj6JJbemak0MJCxNJY+B1G+ lm59dTKkcUpCpvf692a4fntjIIP2CBQOWj//smOC5Qsz+w6ruVIH5xeLdzSu OZh7dF9d6N3WqKjHcQlNySl+cx2TzCcWfrmae/7HnKAgUUx8dUKiKCauIjqm Njq66sGDsuBg7n2/h7GJDxPZkti0OnZOMzuvddOxp8572ud8/txmkdT8Q5mZ o3zCNIWxrcJ4svKJBoupTZ9uqggIFJWWUnRDczzUgnIUeKOW2iIFfYoFrwFd j9l2JqjRJWQ7npTQDsojGPTtoK8f9M02Gol3IKDUL1AOX13e7f5A3OvHny4W wDwMnuUelLH+XLEAf7Aa4q8QCyBKN2+VjjOWmlg+NTRvGm9TbzZbYr+Kt3Br 1hG3Kv+bDcGBDaGhteERwYvmp363I8v3ZnFQqCgiUhgeWRwWXhQaxgsOLggM LLp/n3f3Tuqtm+XBEcKY1LLI5MqkrMZk7vP1x54v2tFuvVxq+uFzm3mt67Y9 3n+08bRHw5Xr9ddvNnpcbtn//eNde+vOUn8yeNq2U0/1Dx/fx0LvxgSNsYCy Uec1A89aUKad+KXe8DksntKfwu7xnTmvFCAKwBoHRSvt2bM+yacko/B/Hhp3 Pb1O9Gkf0QA3h+Ni+xQLKO+gAEyIaBAVkZmQo4J24aIBsJ92+fhAgxgLXGhv cOq9/r1R+M2MBWI+v9Flp3S0XvtovWYd/VpdA/E408oJU/iWC7jzN7MPfyv0 vVJx20d8927F3bvsX37i3fIpuOdX6Ocn9A8QBgQU3L2bdutW0s2b4Ei/cSPj +vWYy5cKfe4JQuMFgTFVCRlNqdkvlu6S2q9qc97SePZKZRaXURVhOaUB/MxR zVHdRZV2oDTCMmVvuIUSC1AGA3DFUE0d4bvX1G/j6T5VVpYtOi/17y2pvXxn zmsG1GqwHA4rI/gBn4ODVylv23v96NM+osF6uXRfYwEaHZYs8as9xoIehQ8w FvR+oEGMBZRFgYh5G1X/8AbGgjqfuy8dZreN1qscz6qcZFNmaSOynsw3NM3V Mc4yskudtSZu6xf8O54lt31L/O6V3vcT+N8vDwoSx8RWZXCqc/Ml3LyatIyq 6LiywED2bd+YG54xntcjr1/NuOldFhYnikx6XF4lCY95OWXNHyu2iAXFg2V4 vwGJF88moULzEE4dXx3o9r4JgKn41/MOcBQphuqV40Pyzup+lA5fNQaXS+nQ YvJfwRsDsVFcUCD0uBS2YWPAvn25AYFlXK6wsFBUVCQqKChLSuKdv5D00epQ qwVBk6eyf/lRxMmqKytrEoubJNVNdfWPGpqaG1VHfcPj2vqW2rpHNbWNVTX1 5aLK0tIygaC8WNAkrnjyuLW5srJg9vJnJrNqb98fRMMJCP4sGPL/v4CAQDvK i4ryORx6Oyoll2Rnh9rM9dU3uG1sFD53Lm/95kK3E5n7T7L3Hc84cDz7yClw cA6dyHU7LNj1XdZ2t+RN38R/4Rqzcfcdp6UHpzlEzV+Yu3RNkdWcJvMZTwys qkPJf2FG8FcE/C8GhloLAoL+AIUD/9mOv777rzMjxwpt5sk2n355wKvu2C3h cW/hiZuiH33EP90S/ehddeTKHztPijYfzV13IH3992mrD+ev2ONtbLv5nbfL jFgS44l1hmaPdA0qfe8MtVkEBAQEBH1GcWrqiVEj3N9+98Jw/fYpzrLl+2Vb zj1zvfJ4v2fDYa8ad6+qIzcq3a/XHLjSvPlEw/rvK1YeKll7VLB8j8Dxy/Ip n0TomcWN1i0bZ1iuZ1Sto1d67MRQG0RAQEBA0EcIhYk//XT83Q8O/t/bybrj ZfYfyeZuki3fK/vsZ9n2Cy++vfJ07/W2vdceuV19vPvi75+ffLrm2O/Lv2te sf/h3M2Vk53LTGcUG1lmjtFLGT2mYIxe8Sjd4sXLROXUbUIEBAQEBG8yyoXC 7ISEI6N03P/x9gsTK/mkWbLJS2TT1ypmb1UsOSBf+4Ns028dm890bDn9cv0P L1cdaV+877mjS9usjU8sltRPW1ppO1swxpA7YnTsiFFxo3TYI3W5hsalmsoT BAQEBARvMtJDQjb+7e/JI0bJTSbKJ9gqTKfLbJ3anbf9sfXwi09c5bO2yRbv lS12kznt7nDc8Xzqhj+sVzw3mdN44ldxfoEIHIFBhavWJI8dF/De8Ij3R8Z+ MCrbq+e3DxEQEBAQvFG4fvDA4X/+U6GvrzAYL2dZtbl8I0lRvyJJXFLa6n5G YbtSPvU/8qmfdtiueG7u1G44/ffPvqII4cfExC9zvv7Ov/3+/X6E02KSJiIg ICD4E6FcKNxuZSkcMUqhp9f+oWNNVDS9T9s37grrJfJJ82TWTs+Mp7cbO1TH JWqUxr569byO7uVh71RpkkNAQEBA8GYiMynpxL/+pdDRa/n6G3H3Z7ERKvIL pbOXKV83ajb9hZHdkyWrRUIhk8CCpKRTxkaxM2aQpQEBAQHBnwW/bNvaNHJM ncdF7d3q7/grJtgpWA5SQ8um33p4ARqfw/nFwlx89drgqUlAQEBA8KrAZbOv vj+i6ezl3nT+Y8knCqOJcmOryti4HjsLcnKiXbZXcLMHrCMBAQEBwavF1W93 N+4/2svODVc9FcbWbVYOpTxeb/qX8HilJBYQEBAQvNnITE8XnPq19/3FZWUd 9rMfLVz66lQiICAgIHjNKC0o6Gt599mqTZyPh+z/jSIgICAg0Ij/B4IFulc= "], {{0, 0}, {516, 41}}, {0, 255}, ColorFunction -> RGBColor], ImageSize -> {516, 41}, PlotRange -> {{0, 516}, {0, 41}}]], "DockedCell", Background -> GrayLevel[0.866682], CellFrame -> {{0, 0}, {0, 4}}, CellFrameColor -> RGBColor[0.690074, 0.12871, 0.194598], CellMargins -> {{0, 0}, {-3, 0}}, CellFrameMargins -> 0, ContextMenu -> None, ComponentwiseContextMenu -> {}], Cell[ BoxData[ GridBox[{{ GraphicsBox[ RasterBox[CompressedData[" 1:eJztWl1Ik1EYFrqNEoLMbHPmNkRrEhJERj93ra4cJvbDRIsyMk1pc03tTL1w aD+LfkQIJBkR/dBFdtHFDLywCykqoqgLIYRu6jbb8me933e+HT/P2fZN+sZ0 vg9n43zfec973nPe57zvOWNFDS2OhnU5OTlG+LyBj1S/ikAgEAgEAoFAIBAI xEpFMBh8jUgPYG0z7d7MAOYedm/Bko4Ca5tp92YGSCokle5AUiGpdAeSCkml O0RS/R1tjEajUIHvyIhdehPyLNZjrVSAgT5CK1Tmf32e+/qcdYEy+/4+vKTd oQJN89PjojbaHcrCzE8qn0RGfIxrEjcF0SomD49hYqDDUUSGKtUKWRMYz42L pFJDg1RPamGdlRWGuuDi2Yl+WHkoiy72W6jjgFeSm/wWKEAScCvtCxWpSzxt 1FPU9dJ76Lt8UnEmcVMQrWImUQE6nKJB7sgUKpb4LcpEtHiFpEpEKim2TI8n IhXv4pAHXCAJEAPIq7d5JFAOYYEGKHEstTbQAJKSx+XH5ZKKE+CmIFq1ZC/E SBVXoboJyMliKZKKgyapwLlK1ohHKgpYYfGRbnNpg4c8dP3prtckFQ0gUm5K miKpVZxnRZP4KcSziiU1bjhOobpJ2TtIqnhITipYZ7byydJfoDzMpT9ZWMo1 EHbgBBLyhOWzlmakUtKQnB/VuUYkFbWNjZXIJHEKnFVL0t+IXSQVU4iRKkUk JxVzhJI7hirpDpXOGzJ5eFLFvMNORxAlaJZhmtmZStQGAvSQA/FECSksH/kt VLMyokw5qHDOFU3ipiBaxZmtTSo8U2lBI1LF/BWNXZ0Y1LckLo9IqQdYIWdA 9T0uvPT2J2qjrUr2lGMRSzrq4eiIVIxFGC5bMZO4KYhWcWYnSn8gv3j7k+vJ GbVaSNXt9fo6O/XVib9Tpa+sClLdvtB0q+WSvjqRVGucVA/q6p9V1+irE0m1 xkk1cuLk2O49+upEUq1xUg1X14yZraSrS0ed+H+q9GFV/J+qx25/u9U40Nqa aUMQ2YMrFRWf8g0vDh9JvUvgYjPR+8KIyA5AyiNeb1Pe5ql840xxSV97eyq9 Hp1y3nE602waYoXC19GRqInIGHC57lY53Lm53/O2RQ3Fr6qqNXUG609/LLX1 ulOiHyL74D/XeLPxvPiexHDtsuulyexbv2GqwLRgNP8xl/W7XAQE1IUQ1nHw zNl5o2XYoc09RLbC5/E8te26V9+gfskY5SPkuss1abLc2Ljpm9E8Z7FFt++c POroJoQWn1wotQAPj9XMFZp/m6y9bndGpoNYCZBikbNuoqBwsPY4IxIrQJu+ trYf5pLRfOOXotJw6d7Zsv0LtkOPzzb1ENKjolagueVD5YGodUfEZH2372Cm p4X4X/wDFcRtOg== "], {{0, 0}, {199, 30}}, {0, 255}, ColorFunction -> RGBColor], ImageSize -> {199, 30}, PlotRange -> {{0, 199}, {0, 30}}], ButtonBox[ GraphicsBox[ RasterBox[CompressedData[" 1:eJztlDFuhFAMRJHS5w45Re6RI+wFcoOUtNtR0lJSUlNSUtNS0m9JXjTKaPQh UfpgCeT1n2+Px15ebu9vt6eqqp55Xnm+/I/L/p+1bbtt277vvJumIcKbnwWs 73vBsHVdE1bXNQ55Ho8HMOEd3L9tWRZ+6tRBrrjEMAwigHO/37M6SII40zRB Q7QLkpQWjKOu63RqGHHVIoOYYAR16oucinYGxUo2jqMIzPNMnpQRPF2nMkeS cCBDXsm7ZNZp6oZRS3wsIBFNIYM2iY8gYmJA8imqawHcOAKqio4KSp4O7Qjp K1nOUygasaG2hoKSaud3krkArggZzyhhTohP3Uz7E0mNu9g98oj26exOSTon fRUtn8IUJL+W80gyuz6OW3mgrSXXEv5dSaRTaRz9KQpY/knxtVomKdFQxvFT JZFR6pFBJWT5tbEvR9+H3F6S+GOSMC+DTHtrHYyh32Qu855cdhn2CUundjY= "], {{0, 0}, {55, 14}}, {0, 255}, ColorFunction -> RGBColor], ImageSize -> {55, 14}, PlotRange -> {{0, 55}, {0, 14}}], ButtonData -> { URL["http://store.wolfram.com/view/app/playerpro/"], None}, ButtonNote -> "http://store.wolfram.com/view/app/playerpro/"], GraphicsBox[ RasterBox[{{{132, 132, 132}, {156, 155, 155}}, {{138, 137, 137}, { 171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{ 138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, {171, 169, 169}}, {{138, 137, 137}, { 171, 169, 169}}, {{135, 135, 135}, {167, 166, 166}}}, {{0, 0}, {2, 14}}, {0, 255}, ColorFunction -> RGBColor], ImageSize -> {2, 14}, PlotRange -> {{0, 2}, {0, 14}}], ButtonBox[ GraphicsBox[ RasterBox[CompressedData[" 1:eJztlSGSg2AMhTuzfu+wB1qzR+gF9gbIWhwSW4lEV1ZWYyvxSPZb3vAmDdDq zpCZdvKH5CUvfwhfx9+f48fhcPjk983vXy922eU9paqqcRx9HGcZhiE+PZ1O KHVd24KOgt0WFKLQ27ZdJrper0JGcS5CVqs6n89yRpGl73tZBK6kkvv97kCe ChOlLEvbVW2kiYPoxKcYRdwWld00jS2EcFSFMYXCqbOcBJzL5aJcxK7SFEFB GQFn8AWupPUkMRfIJEK53W5d1z2hGVP7yohVbfanWoxAJQTfeywbT1+xK9mi GQGTj8FT0uRAN3Tdjl3SlNANP5WoabIIRP+x52ojLEgXs8fxs7+R1cCXNFH6 SVJhKZwx0+BxBZ7nraGNpBSrEFlA1khgRDcCRg1navIWTeVKPVmliaeaL+c4 tCmcknRHfjtWaS6HNtYmC1wYjGJ+6eKjJcficWgVssz1nGbabFtD682gZaIO MHXqkq/vyW3GFaQXliNuOhbz9lOHU3a6SrhWkCmnXC9pUoPBt1aQpquYrtJt 0f6Pazkd497W1MkSlxierkrrN254iz8oHqS0ByzxGzfOHx2yq9plYSl8l13e Xf4ArlmHrg== "], {{0, 0}, {77, 14}}, {0, 255}, ColorFunction -> RGBColor], ImageSize -> {77, 14}, PlotRange -> {{0, 77}, {0, 14}}], ButtonData -> { URL[ "http://www.wolfram.com/solutions/interactivedeployment/\ licensingterms.html"], None}, ButtonNote -> "http://www.wolfram.com/solutions/interactivedeployment/\ licensingterms.html"]}}, ColumnsEqual -> False, GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}]], "DockedCell", Background -> GrayLevel[0.494118], CellFrame -> {{0, 0}, {4, 0}}, CellFrameColor -> RGBColor[0.690074, 0.12871, 0.194598], CellMargins -> 0, CellFrameMargins -> {{0, 0}, {0, -1}}, ContextMenu -> None, ComponentwiseContextMenu -> {}, ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{ NotebookLocate[#2]}]& ), Appearance -> None, ButtonFrame -> None, Evaluator -> None, Method -> "Queued"}]}, FEPrivate`If[ FEPrivate`SameQ[ FrontEnd`CurrentValue[ FrontEnd`EvaluationNotebook[], ScreenStyleEnvironment], "SlideShow"], { Inherited}, {}]], Inherited], PrintingCopies->1, PrintingPageRange->{1, Automatic}, ShowSelection->True, CellLabelAutoDelete->True, Magnification->1., FrontEndVersion->"7.0 for Microsoft Windows (32-bit) (November 10, 2008)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[545, 20, 126, 2, 27, "Input"], Cell[674, 24, 922, 16, 89, "Section"], Cell[1599, 42, 148, 2, 26, "Subsection"], Cell[1750, 46, 3314, 57, 107, "Input"], Cell[5067, 105, 102, 1, 34, "Subsection"], Cell[5172, 108, 8135, 135, 102, "Input"], Cell[13310, 245, 152, 2, 34, "Subsection"], Cell[13465, 249, 6316, 105, 149, "Input"], Cell[19784, 356, 227, 3, 34, "Subsection"], Cell[20014, 361, 27725, 456, 392, "Input"], Cell[47742, 819, 349, 5, 34, "Subsection"], Cell[48094, 826, 7236, 120, 51, "Input"], Cell[CellGroupData[{ Cell[55355, 950, 49965, 1039, 19, "Input", CellOpen->False], Cell[105323, 1991, 43689, 777, 510, "Output"] }, Open ]] } ] *) (* End of internal cache information *) (* NotebookSignature xw0YZZDMdUXPiAwMR29A9Qwz *)