(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 9.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 157, 7] NotebookDataLength[ 215266, 4354] NotebookOptionsPosition[ 210017, 4170] NotebookOutlinePosition[ 210396, 4186] CellTagsIndexPosition[ 210353, 4183] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ Os m\[EAcute]todos para ajuste de par\[AHat]metros em modelos lineares - \ 12/9/2013\ \>", "Subtitle", CellChangeTimes->{{3.5879222633628693`*^9, 3.587922319680138*^9}, { 3.587928415908676*^9, 3.5879284250344486`*^9}}], Cell[CellGroupData[{ Cell[TextData[StyleBox["simulando dados: fun\[CCedilla]\[ATilde]o e gera\ \[CCedilla]\[ATilde]o de valores (pseudo)aleat\[OAcute]rios", "Subsection"]], \ "Subsubsection", CellChangeTimes->{{3.58792238737337*^9, 3.5879224349086447`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"w", "[", RowBox[{"\[Theta]_", ",", "a_"}], "]"}], ":=", RowBox[{"a", ".", RowBox[{"Table", "[", RowBox[{ RowBox[{"LegendreP", "[", RowBox[{ RowBox[{"2", "i"}], ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", RowBox[{ RowBox[{"Length", "[", "a", "]"}], "-", "1"}]}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.5879224386277103`*^9, 3.5879224698803563`*^9}, { 3.5879225861870794`*^9, 3.587922595531621*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.5", ",", "0.5"}], "}"}]}], "]"}], ",", RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "0.5"}], ",", "0.5"}], "}"}]}], "]"}], ",", RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.5", ",", RowBox[{"-", "0.5"}]}], "}"}]}], "]"}], ",", RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.6", ",", RowBox[{"-", "0.5"}]}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.58792261211115*^9, 3.5879226508800573`*^9}, { 3.587922863694953*^9, 3.5879228981197424`*^9}, {3.587922937544956*^9, 3.5879229952217145`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk0VO//APAZxKgUWcpSWSJJypIkvJ+0WJKKUKEkRZLsyVaphBBCJYWs aUFkLUkUQpKUZAlhxgxjnxnM/T6f3zk/f3Be515z733ey73ve0bO8ZLFWR4S iZSEf/33l/f90paB7Z4GNcT//YAitWrXunuHQPgi68cCNqdgq1Nn/Cng05E+ NoVdOAs/RF45A/+JS2ED2P/EXFgl8ZfguRfpdDN2lGS90KtKb6j+3DNcgJ2t bJdKenUZVu5bLx2DXb2Duc0yLRBCg7o4Tti/99+syYq/Cj1Z6re3/3c8leUq QTXXoenJ3mqCS8BtjQ6vrMob8Ii2K/sjtphuWmVL8S3Y9nrPzuvY6btd+Vgv b8O/j1FXdLDVTLQOyuVEgME9M2fqIgGVh7mJpml34IfOO54E7B+n4jc+jr8L VukFezoW8PVoqukM1MVCfVMV9SL25R33/lyuiYPtqQkGxDwBfGCvmF55D+5L /J1Zgd1oWNOwvSwBVu6hHI/mEBC3f6N7Y3EiDG045rYEe535RMnUy/sgu5o/ q59FwOARa9vwvAcgWbvzixH2c6tKQibnIfSe3J2RPUeAjv0t4/1pj8AyLM/1 yCwBFm6Svx/Ep8JQA8fJdoqA5TrwPskoDVyyP26MmSSAWe4p8rcuDQbmE9Iq JggoedfxxrcmHXZLfSwhMQnYU5fGfVKZAXGxF2/vphOgZPT9MHVnJliYByw3 HCVgacOSDM2yTPh5ZtRMj0ZAa5OrUX1xFjRMEjzrRgiwb9eKnXiZA0P6kieS BghA1s79u1Rz4bXioVanfgI2/HqoFZaXC5SzFyhb/hJA6+L+ksp5BnpjYx/y evD6DdTL7U17Dsb8pj62nXh9Ju2KkuLzocA3tCS+mYBo8WS9aqEC0K4Wdun6 QkBb4a312y0K4MaL5g6ZRgJsaXb/1nUVwEBE90TEJwLcbZd5TtILIfsry0To PQEJ+i7hD4WLob8xYar8FQGdnZYXVlgVg9vr1bp3X+D19wPzGw+LYaGv+ph9 HgE5ryTELsq/gc150kqDWQRUrK9LRVolYG3isCMlhYBesnzpsE0Z+B4Kny8N x9f3RCjZLqUMFL/eK5YOI8BFlx30ra8Mnmp0n/O/QcCkV6th5flyOP3OsFom BOfHYEhLTGAFXCHb3BbxJkDlU9e/7alvgU9LLPSlLQG76kyXGnpXg90Psu6H jQQIt2d/3XGvGjIu8C65uQHnRz9P4paiarjY8o2F5AiIIVWul5yqBp49D52e SRHQv2vzdqbXBxg7IRuvJURA+OtlDk+8aqDE2TVYe4ILHalNbzietaCYX6U5 X8yF56+UA5lxtdC7XEKBUsiFa+9uoqHCWlh8fzxu5UsubOrS+/JtohayuIGz QllcCJJ42ZfrWQfhzf3aDQlcUIiOXmbj+QnUijp09by54BFgfrrIox7OxZIv qahywdRdL5cSWw81tkpXMjfi/R1Vxu3z66ExhJ0sqYDPx4Q/mDJWD50FjzRm JLmgL1n1wP5CA1zVlBXyEuDC0rItrQLnGuHY/ctHb/1dhKyZ5WBn2wTf894S m+IX4WLZ2RgehVYYvFDqpzW0gOv5iCxZqxUqEl8YivctALNT7zWxtxU4xp+P TXQugM+8aMfCuVaAf+WXHzUvQIBBzdq5vFagr/dYWVa8AGG1616OanyDZOf9 yqtDFyCt9eeXdsM2iDU6WBUnuQDtIyaCOY7tcEd3q1uu3jxEbp0llRz/Bare wr4xIWzw3FyfWJ31B2hnWOMvguaAc+bCq273PljnsSC2PXgGHN9ZH4491w8u Ky8eDHk1BWcm2qurwwfBUf9meNufCYjaVnopO2wIRg6NaQ/YMqFR4+eQb8wQ bJ3t6nS3ZgJl+5z9vqQh0MywWMc9zISbO3eYDWYNwfOWnoSN+5kQaFiqLF83 BDeU3vllb2OC69HSv495hyHDonDKip8JRv6llonXhuFrc0WQ2PlxuBnws9Ep fBik/HUtZU6NQ03Q3G6t2GFw0KoY22w1DgbXd2z7njoMQUKcUMfd46AdWbpc 5P0w/MqJCt0iNQ4bUkrrohaHod9U+Yd+8xjwVJfuuBkwAnWco1T7nWOQJ7Qq ezF0BJp3q7Wkbx0DC1s3sct3RiAqIfHguOIYZMzKTpxPGYFYQbQpZ9UY7N0S mXeoagToAvMvI+kMCEu2WyvNQwWJlfUPFJ4yYKkvmfd1BBUWzr4VLhBjwOsa W8/N8VS4eX3VH9XlDDghXNKbmUyF6VX3kop4GfD8uevb+8+p8Kurtq9nkg5m /d99g5upsKfp+OKLb3SIOZQ9YixCgyrbiBblODqIqBxo6X1Ag3PG641zV9Nh SCBVpD6NBtvkoul/helQ8W/yaEEuDR4cdD+xYSkdnNKTu66V0SBw0Srh48Io lK2hjcj9ooHK4JU7F/pH4aRABK/T6lE4Sh78cDp/FF4MftIZSRyFJQX9PsOH RuF6jVRQ6+NRuDquEalrOgrWae7vy7JGIUo62Tlp7yiQ7CT2R7wZBckse3+X naNg+f2spcqPURgz+NzrqzAKnA987m5idDh3WFpmO5sGxqmGGcx4OjQt51gZ PKfB7frW7tBHdFDY9SdufzYNPk2cXCOeSQfXaMe5Y+k02Lc3MHrnGzqwblnu SLlPA0Nq0eXQn/jzrm8/nHKTBnqaimZiMgxIWn1p7JoDvk67orDsDQz4MHjj nYodDSpu7f6gs4UBn0ON43psaLDzl722vQED6j5o6DkdooF2cJJstgMDZvtD LIYN8Dp+FpjZkcUAi7qU2Yb1NLjETNza+JIBgt8+V6ySocEryQ2udiUMaOHT PXp2DQ22uKHea58Z0CNWzN6I46QicqWhgcoA4vHyAnleGmywpT22VRuD5EhW IW2ECmdu+v9iaI/BjMxZ5a//qPD0Jb/oNRgDnakE3Xf9VJAjKYRnHh4DQ5Fb 8iV/qLAuy9aL4TUGcNQ/VuobFVaPN+2/WjoGCRJ1e/IqqfAg7v1p6vsxCHct 0tUop8IarddBlvVjQIu8o/mxBPvK/dcbO8cg91qXJOk1FaR4Hde1csbgi4cp /MulQnLW0Z26vOMgMiTaVJxNBWljo6OZy8Yht/TljuhMKshEq0b6y4xDUdOG h8fS8PmsnpuRNRgH2j4hvuMPqPCknCp8Zz+us53X+S8lUWG93Z/NM+bjsOZL XE10AhVk0z+cbsB1K6pkcfRfLBXkN0c1e14fB7tcQesFXCdPm0NGuiLGYdly 68c24VRQ8PDk3R8/DnrrCL/KMCpseGO9UypjHBjdas0pN6igBHJZNbXjYC79 3rcumArZf0WrVZvHQUN7oNopCG+/yd+V9GMcZEKVfJcHUmFjw6jwhSHcR+g/ eX39qZCwybZKkI8J9dE/FPK8qdAe0P7FgMIEQ+4a+SgvKog1Hez0Xs6E6OpD J/08qZDojqa7xZhwZcgz4MwlKiQVKaq8VmSCJt9gZuoFKnTwpe4Y3sSEV/+O zNa44j5gvWafjBoTLG7lHhs7T4X7rKUOYdpMCBMl7bR3wXVucvNipS4Tjq52 fp7mjOPzaDGAacAEU7Ebq+nncDz1mYknjJig3m5Tl3wW7x9zPuPuAdwn+/Xn F53w/n39BbWHmCATpyl6HvuYul0V25IJrwUNBP6cocLD0B9f1I4xYV+Y7Tdr 7N/fzTvP2DFB+sSNC52OOP6K9UMPHJiwnpP19Qx28ucKMu95JiwcDOy+e5oK zL6CK+NuTFBWPfxwB7YRJ3uiy4MJXt3+/EMOON6ij8/X+zDBanp8/SPsadV7 f4v9mWA5l9dnjW26P+J4ehC+Dzgn75HETj919Vv0NSY41D7b03+KCix/X5OA m0woSHrfVYhtHn/hw7lwJsx4vuMPx858fnqnZRQTuAtX3zthz9faFEIsE3Lm ekjG2BY9BzepJjBh9e6XderYuXN70tc8YAKru4wij80V1pVcksKET9zG2jXY Virb4iZSmSDGnzstjv1ij5JgTwYTOmJW3pPE5rGXud6Yw4Ryr7fJCtjH/Fax S54zwbfViV8LO/8uxTMjH6/HqopWU2z+Z9yRu0V4vadcpp2x7WqmHYJKcTwi JN3uYL/uov1yqWQCZ+8ljTfYgjN9h63eM6GLSzH8h+2w4mf97o9MKGRfS5TG 61OysRmpfWaCMc1t4zHs5bs/lkl9YULVov1kMvaZE+XbBL7i+PT2MQewK7zz c6famKBWE7xWE8dHODpLtq+DCdany7zCsZ2zHz1o+s2Ej8uFRwewq97HCZf3 MCH7BXFtH473hclgUvwQE1RjgsalcH7ULPPxD6Ex4cFP6tsY7DWKrkzXMSZo a+THUXB+fbKx7tszywRRVpvuCpyPMp5mx7ZxmBC3c5z3v/z0jjRsleEyYen+ 3nebcf7KvlOrnlkyAXonwxkOOL/9Ojbo9AtOQMRAtw0fzv/mcamCFqEJOK+F Ul5iB8gLpOWIT0D23h0pIrh+2m/3Xj2uOAHPKx1/rrtIBZX0H3P7Nk3A1t5X Hkzs6xVfLmlsmYABu7I3n92poMYoPbVsO34ucYjbfNuDCuEWsfBu7wQYJbrI mfhQoedCWOkz4wmQq/7sbeRLhe23grYmmU1Ap94TwwN+VOgvdVl/6egEsBif 9c/g/qC3djch6zQBG9oGye24nxjbtXs5ukyAdMQ4RyKECkcfOQ9luE2AjMIf NYereD0lY5qVfCegRtFIeUkorifxrkeqYRPw1PBH2IPbON+FfHV0cidgkBK5 suceFfgOUl5ceTEBt9/NUq4n4vhFPVpfWTABKdcYVZvu4361tIbfoHwC3i8z R1H4OcGaf+WPPY0TsCahpSQhnQrF3FzPQ/QJGOJvtXpRQIVqfb1/scwJ8An+ YpqD+3tT0NdjbdMToLSfdiWnmAoDnBmwWpwAx/KAs6VlVFg1Z7jCdsUkeFyI jhD7QAWP8T9557ZNQuV667K3bVTY3Cc8GOwzCTfLFAsi2Lg+h2Vr/PwnwUCO UTg+j/cf25Z2KWgStPfHWB/n4vNZOGx3+uYkOPCecduB73d6knHtexMm4e91 Ff51QjQwsxCpW1Y8CV1nPJpi5GjgViuS/XBqEn4M9O5sNqPBy9xVLm+8psCl zKptK34eCOqx/745bBruF9b1L0SNgqeezoEnCTMQ5v6hyuQCHUjuCVfvPpiB Jy8jvBzc8fNRKrPoWsoMqKqbhPh60iGP55nMmcwZuBtvdjv5Mh366yXHNhbP QGRM/sevN+hw1Go+tvD7DIRYdkj04+cObfeqjtpVs1DQtSv1WiMdalOllpVI zMK+6M2tNs10sPjmBzlSszB6p/aVaisd3LW25kbIz0Lw7KjD1x90yOGkXjHX mIUzqqQVrD46rLl9XebXkVnYfDd7T9ssHTipex1HY2fhxPLQmXBZBhjM6cer J85CpazQI0MFBlw331Fz+eEsGI7y/WApMoCyuEme7+ksOE1sZJ7YzADxEyv7 ZYpmQSDdW2VmOwO2if0+bf5jFsyPSfIGmzLgbPil04WSc3A5yDa2xIMBub0u cXNr5yCbNpvH8mIAXdvxg778HDy4PV6m7csAr39H5RpV5qCoQPBx9hUGXDPU /du/aw4UNAyXWoUyIHmB77TYyTnYkRpWNhLPgFaPZIfLT+fgusDa7V8LGKAS Kzzvkz0HB22lnri+ZsCN/LBEr7w5qHKwFOEpZoD2mFfjxddzkKB+a5liKQMe Xzig5VQzB88eNvHuescA13MLAkf65yBL0aEms54Btbe8npoPzQH/nv2JRAMD 1maN6JnR5gDVfTex/oKPP9DuaTSJP/9bhflcMwN2nH7Zpc/DAgHHjREC3xnA Z3cyX0WeBb1WnwdO/mHAycB2E2UlFiyI6jX7dTOgNNl0UFGFBbH+836RPfj4 ndqSchosqDXl5cvqY8A365U3VhuyIL7buy17EF+f36214vtZoCZjFJXyjwE3 E+dLV5myQNLgMit6iAE67cN0IQsWePDf/HtmhAFPjlRb8zmy4M8qwS9dowxg eWhPkM+xQGfUmP4KzwcWsS/uEOdZ0DLUVhTMYMCSrw+qOZ4sOJdnsm3FOAPc zDxVJq6zwOEwXwVnggGfLgzXjt3C5zP0dCRvkgHr79ifokewYIuWTZH1FAPa GkwShuNYIOPouyZ9mgE7jeS53ekssIiz4yXPMUArozH8cxYLYlQyde9gqxFe ooXPWJDRWaEuwmKAfOlH5ZuF+HwCxm2F2QyQEXUruviGBan9uCFgS1wSM7Ap Z4HfQZ9ALvayjfh5/gMLrrA1Irs4DOC/IdQjWseCkCdXn+2ZZwCp943LYj0L ilfeCs3Bnk7iD2ltZcFPOa1TjgsMGJt8RaloZ0Gi6ovT5dgj5jb3Mn6xwPXX Fenliwzo5s/N9evD8eInFWVi/3I8rOkwyIJXQu/v0rDbqljvTEZYcLGqT06V y4AmqXRjTToLHg+zXc5jf/Iz+S7DZIG7fbbTU+zqtgl7/mkW7OaEi/3ErlBL HhmfY4Fw6gF/AYIBxZGG3p3zLPikmXpXEzt/iLZYQ7AgIWfXCVvsPMN74S94 2aAz0fszBDvzyS7RJAE2mKy0oDzBfsIZeHx1GRvcKadGy7AfWEcpn1/Jhoej v699xY5/rVVkIcoG9da0+r/YUSu69fVWs0G/I75mHDvM9Va9ojQbriolu7Ox r3/aYrlyPRtiJ7ObuNhB8h3dLHk2jPsU/CGw/UJCXPqV2LB8ovjJArbHb6Wp Lyps2FdUvmoG21X7a/AbNTYMCX/RoWI7xV+mpGqwQcplQbgT++TY+nvh2mxo X+/yqBb7mGn9Wi9dNpTnbP31HNsy2yPX1oAN05cDP8dgm/NIau4zZMMakcDz F7GNT354p7afDT3zTlVG2IYV543XmLKBU+/3aS22nsSq72RzNrQIz1wfx+ut 7VVhP3qEDZu9N0+8xd7W4jjSbsUG0n03sTBsxbCixRx7Nqj2Bfkvw5bttw2P O82Gl95iFZ9xvKUM+EQDz7JhQ6ZR4VXsFbNHlc0vsiFl6mRNP84fisXi6x2e bAh9tqc7GpvnVZa+nC8bJDbV5Wthz52dtZgOYsPUT3qwL87HyQ9PuruvsYH+ 5kvASmz6WiOXzzfZ8Ky8TD0L53Pfj/vByVFskHsY2PoR53vDvp25KIUNIQdO DzXj+vH/HKJ2NY0N0n+cBHWxlU1qi99lskHmmYVq+iyOp9mhD7ov2XA0LNbP YYYBey3P/taqwuufpgIZuH6n2/McvGvY8Lv0241hXN8Z1syhwk9skBzMbFPC 5jkROKX2Fcf/YE5CEu4H1Q5xyzf1scHvmcwPXdw/PPo74p0Hcf5Z/E20wf1l vZOMZPYIG25RAi9eojEgxDlHUWGCDW7/drjE4n6k5/7OYC0PB6Z3bX9/H/ez 0kCqh8gGDhR+tnv5rosB5xbV5g4pc0D3oU1N1G9c71d9gmNUOUC2eLLCppMB PqFExLLtHJivvGzd3cEAjQjxjCX7OTDARcMF3xjwKmn3D7YzB3Yi0gG/Tzi/ 1ty21XHjQHyfEQ+nlgFCyU1//Tw4wGW+kbryEfe3xzZjU/4c2M54H3C+GvfX zIsCYxEcOLox+4BoBQOyCh/u7H/OgZnXV8ajX+B8nrdV+ZXPAdUWs5jhPJw/ +9ZJtxRxwCXLyFL/GQPe/nq6UF7JgR/HhG278Zz+nXj+Pu4L3n+e9nr8CQPI 5lX7do9yQKusXM4hlgH2tP4jaSrzkPvwt1EYvj/Ka2UZJqnNQ1esTp6rO+5H wc6aURrzwLy1N/mAG75+EbqYv+48vJNdqsHrwoA7OjM/D5nOg0HCxlyTUwwo DxM4SZyfB5XPq3h2HMT3ZwVV15PP5oH7wPBAvhIDYuPvWD97OQ8BmozZWXx/ X8ozajhdOA/Z29hbdsnhfvn3mXRkxTxMm5UfLZfG+fhkY/ObL/PgflljQ7Qw vh9KKWwTGpsH9PBO7302HXxWSc1WaixAqakV90wDHdrIlFDJtwuQy9X0Rqfp 8Ibind3asAi9kUFhfaGjoCou7OpYx4WBXxxdz2IaiOZXvshq4IJVHtlfppAG HGPn8ZFmLqgWFrQ1vKRBfVCVz6UOLqwrUOfbnEMDp0G3q0HDXBBQXWZOSabB 46KGhCRBAljeEura12iwwuLG+8aDBBh8e9CbYk6DmVE1nhUWBPzqyu9LOUCD P7d+7z1iTUADU00yzZgGeeXqjT9PEtCmEGVZYEiD/XJ97YOXCMjenj3A0qZB CFOPxo0jQNXUdq2GLA3GY2bFNDsIyAp6JBE6QwU6c13Nlt8EvAv+wtwwRQWa hdEl5R4CThpS7nxhUmFQ4kHD2iECjO/lSm+g43n3yc4Qyiz+fJFNnrwDVHC0 qZoaW0pCcpHufNe/UeF0uIUpfTkJnShpVTjzFc9j5UNp1BUkJHHtkpdJMxXs pVeaD64iIdXH1DL5BjwP9p7K7ZQiob1L+J5T8PPyQWeyfa0KCen/Hl2bW0gF sweJRR9USejoWrVzrfl4/m3YtPS9Gglp3Kk0XXyJ54fNFqXlGiR072sm79k8 KhiOPxXJ1yWhb9UJTLcMKuhc3vvpoSkJVR0eiHJKosKO3F8y981ISKWlv7Iz gQranW7eCeYkFJjwaMISzw+auxJl71qQUM59tzs2sXj+If4F3DxBQh5/9mxN iaSCwu3bWy+5klDCs7p+2WtU8OrQCnF0I6GeISJlHM8v1Yr9TVbuJNSnPh7z MZgKJ2v1XPW8SMi/oVU9MBDPL+TJTMEAEioVXSelcpkK1MOpUwuBJKTdm6ij gOclnTQzQ2YwCXkz1avk8DzVYZDT23GdhDaFmEls9cbzRZCdVGYECaHGK4/v XMLr/UXw/P07JBTTmvygAM9rBVKlpZHRJEQ7dnFTF57nzMtFrDzjSCgzaqPC bjcqPKa8z3C6R0IU8bD7QRdw/G3cJm0S8ec13Sh7h+fDyNlPdw0eklDSWdnV R85ToXOfT4/6IxKyPrPaIQPPk8qJclsUH5OQYIW92zyePz9pBjUuSyehsQv2 /97i+VT8xiZJ4ikJfTQ/ZK+E7dTW4TyZSUI1UeT8RDzP8niqL+nMJSGDptGZ W3j+PVLdY9mU99/17prlx05bGfX0/QsSOpAbNBSN52WDV0OQXUBCTY/bXrzE 83X04r2Yh69JSLSxJ3o/9h+z3d1RxSTkcKLB5x+exwNGHwV4l5EQa4x1fjt2 g65Jw7kKEnLsW3Xjv/crayJnV594i/fnfVP6GNu5M+PcwSqcn/MGQrb/vS9Q PvIGVZNQ2dLlEeuwl/hzebVqcL6t9N42cgrPp5+fW2ysJaE//p8oZdgZEsfT pT7h69l3dHUM9uRZfqZQPQm9ZZ097Yq9+02RAbmRhJwfILoZdizf6ejpLyRU lLHh3XbsXssVf4abSch4hXnnBmy1jEqVrq8k1LJzep8UdvCky5WWbyRUPm5C kcBu2i1R/+E7CcnaBiv+9/5FOu6jxJsfJHSfp+ypLLZrn8fZ3J8kxF+z7tZW 7PKt64ofdeL6qP32bS825eoXnrtdJBQQQo92wLZp8T8S2k1CPDm3qkKxs9cq pfn2kpCTRr7Lc+wZt+9jLn/x9Rzwi/uNvfftNX27ARIiHxrQF8brc2+ZWtSh fyTErWF7mWH3n+j6bThMQuaWZdvv/ve+Rd8mx4FKQpPkexK92NvXf/cOGcXH Z89WaOP4nCQfQikMEvI5rLEpCTt8oHF5xTgJuUGU8yL267r9nT8nSEhozb4g t//inVOTNTNFQjp6SRcHsLe6VRios0jo/dJa7gjOl2Pm2ssOcUjoWgAz7zLO p9Btr3+6LeD1yD9q9t/7lY7pZx65JDI6vih+2xLnJ+mnov4nHjLq40ao8uB8 3lSeLjjIR0YHb5zpLcMOCn74dL0gGWV4Kd4ywPWQfUr8kv4yMgpqo90QwvXy dXfcLlshMqLEfM0ZxJbnj2hPEiGjxtUOfs9xvZmN8KUXi5JRR8dL1Ue4Hn0b r11sEycjj5qT6+/heq2P8edfIUVGVhldrY88cP54TLdtliGjmctCj1544vha eqSarCMj1Y3uZXVeVHBf7aJzS56M7lC0eEVwfxBPs3FdUCGjWWVXn+UBuF5C v2tLbSEj9pk+bwfcb1ycDvHqbCWjsk0vJt8GUeGtslGKtyYZlfB/vHH3Ku7f hdottF1k1HwlJ/zRLSpE3XudTDEgI9lbFau1blPhja+asxIiI4nPhw//CMf5 o6tEctxLRusv3GxTj6LCqxpxjU4zMtpw/3nuf/3zV2Ycd9acjBIDi0U0EqlA vi30RewIGS3GnDWTvI/r58ASp8NWZDT4W8uU5xEV5r9PJ362JyMfoT6GAe7X xv++s9+4k9H+qxr0c29w/m+OCcz3IKP6V3mleaU4HzyNF3O9yCjX8b7HbDle H+5bUoofGUX29ZRlVVFhTCJbIDSEjOTT5Pic6qmQYOwvbh5DRj0fV1127Mb9 IEbjvlEsGYW9/1Co1EcFbjt9ze54vP2F6MqpftwPTp+W0Uoio8NUjn7mCBV0 A0wVpJ6Q0ZRl/QeXaSr0PZdRH3pJRkU7qiaChGggPtnxujefjIaH0ypqhWlg qhOn1VmIr+eUXbuYGA2KapfoNL0hI+sQJl+LFA3CuscMXr8jI6djnKeZyjRQ XfnBLKSZjDSG5hYH99HA3+usiwSDjCQLC5fUhNEg/MCYs+44jrdw8k6/OzS4 v+Gy88kJMnKlGIVpxdKgpCP8XPYMPv6ex15fH9JgSveFkzaXjIo7n38Lwc8f 7rxTDtYredApneLjdR00OJNw7XiSOg8ayfj2Z2HbKHhdFDxeocmD7I6Hxs9p j0Lo/vhjPdt5kP+WtrgFvVFIY2XYKOni7TF3PBRNRqHH7rNViSEPatmUUjN5 ehSOKa6w6LDkQb9r9mgHJY6CeckjUwk/HvRDW3n2AB8dXKYcCXF/HtR9fdcq 8WV0uLFNpVg8gAeVPkhUGRahQ1le2VrxEB6kLbDFPHs9HeRTfzBFw3iQSaPr kdhddJi9vfK+SBIP2qCel7/Klw5Pjt8YWF7Cg+7fpRg0jtFhbME1iHeWB63P c79bhOeT48cObGLP8SDPEqkdt5aMQW3R5o4xNg9SX+Ihf2rFGDx0pW/9vciD njxfWrFZdgz2/ro4ULCEFymsY2Ru3DsGj4o8TE+K86IVa2NW5EaPgbGr35py LV6kps5fVqI0Duk/rxe7e/OibVfbfynpMGGobltvjC8v6tbs/ksyYIJqca9g /mVe9OW7297ePUwoidU/NR7Ii3Z1lS59dogJTSZsQY+bvGhDEcfUw5kJrEqP U56JvKhySIH85T4TzNNOLfUp5UXBe0vdH80zgeOi73BlnheRYtfsprZMwNrF OFvPAD70uSRLVzh4CoaM7jRS+Jagka2butp9ZuCjUhOsu7MEXVZ20Y/0mQNX SjafnCA/mnfeGfTYjA2laRv0P8bxo4+iiXNJW+ehZZdenYWIAFLW1bsZU7MA kWW+8/tFBdAGWkTt3voFMNqer75LXAB97tsjOde8ANVq8k8UJAWQuK4E81Dn AhTJUS5PywogLwGfwW/jC/BAoF05aZsAerL2QoCozCKc+X4hqvOQADI5u8Tf y3MRZA9n1TQfEUBffbZ8zPBbhD9NPawPlvj/X9/NbQ1cBOtPR87m2Qig/Q98 NdeGLYJx+Q6DwFMCSDMsZvBa8iKopfIyZS4JoBv3Bu5dqlkElusjS4cYAXQz Jafu2wou3A3IELgaK4AiyStffRflglLk88rH8QJIVLtq6Osa/Jz+rFKhK0kA leSf0CmV58Lr4a4pq1QBRPw6TkXaXHBzkkk4UCCApIKWsPTsuNBn/7hdu00A NQ3ouL3N4MLli1nhVu0C6J+j/3NSLhdWBL/U8+kQQGFctfcGL7ign/Ius/C3 AEoSarHKLeZC8u9uH9UBAbRCJax7G54bjtqsE5efFkAGf9WsxP5xof5wqpWQ BAWFz1BGhGQJcK39VyWwhoI+TjzgPaBAgJCOqjKPFAU9Hc89G6pEgMX6cs7s WgpqUe2d6lUloIvRltqnSEGrLHLnrHYSMBbJTyvaTkFVnZefbj5CQCzXzPLV Dgo6OofElh8lQNPr3tvcnRS0fN3n3CE8R/gfl737WJ+Cvpi9VI+0I4BHWVfr 9j4KEgjZExHpTIB43cWQE1YUtGPP21j3IALKdIqHj9pQUIaxkR4zhIATLziH Dx2noOkLy0cvXCfgyb3bCnvtKci8a970SBgByo7p9VvOUpAqyan/+10C9Ij2 VWRfCvKqOs8oSSegx0s6aN6PgmRsJed/ZhBwfej0vxl/CiIF/mFOZhHwqXms lBZEQXNZ7jESeQQcSqHYt9+kIL3bfs5irwlw3KmXk5NAQesuuB6kVhNwntE8 8yeJgp4f5qnqqiHAI/3U3lUPKaguYn/Ap1oCrgre+Bv0mIKOnG1tuVlPQEpn g7RFNgW1qdmVZX4lICPa1vV2Lvav+9bHvxGQt5tR9jaPggyvbdPk/05A+TNh 6435eHujTboxnqM6rtjELpRSUPCUorLHHwK6t1B71CsoKDfk/d2hbgIG/wZs cX5LQVkmW1SsegmYMnnS+K2agvaOGU9K9RMgLPWPL6eBguvL5YXxMAGrW/ws /3yhoJ7mE7evjRCwLpTyVKSFgijCjncKqARsoW2GoDYK6sg6vpQ9SoBphdeV I114u7zs581MAo6489WHdVOQ7Pl3zRsmCDgmnyTxtpeCynOCZ8QnCXCOLC9S GqSg7NVzmX1TBLgbHOCxG8LxPLd0c8U0AX6Tfw7HjVCQGW265c4MAXj2GZun U9C+K5YXV88RcGdFvJ76OAXVPLQ99w07vkbhzrkJvB5SZwJusAhIVzFS/jZD Qbt2jTC/sgnI7fnlx8+ioDKSloUrh4CCeNe6XRwKOukj3bSAXcWJdszmUhBf xjOBpQsE1L1aX9hFEkRhecfqb2I3ORYSwryCyJRTlDqH3S6xx3z/EkG0knok 2nER539je0qggCCaFmuNrcPuDzk3WiAoiCScvj+T5RJA02DtHFomiKr4KL+8 sSeGIsKlVwiisYty0u+xWcnSPw8LC6KHp3578RAEEOYvFcNWCSJO/3SPPjY/ L/hUigmiQVPdU57YQqWtNUwJ/P+agVMp2GIXHEWUJAXRi5t3H1VjS6+fPmUr LYhGLlrb/MGW/37rVexaQVThWqLExFa5vXqxbr0geo4eC/73fUn1Xc8OzMsJ ov//PuX/AKMt5VA= "]]}, {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk8VN//B3BmRoasRQuJtCmlLGX3PvlIpFTWNkuURAkVLWiPKCGErGVL peyikJCEhOy7OzPWmWxjBvE73z9+/sjj+Xg099xzzuv9PvfOwwaHy2bnSDw8 PPH4n//9JpcK1g/u8dD7vPS/HxZsHi7RXv/8CCQov3mxgD33cdfZ9jA7QFsI 20nsLDb8Ec88DxGZny37sWkSzpz8sMsg4mPo8wP7ydpq4cziKxAlF9eYgZ2q cDqBJ9MbTEWI4w+xy9T/7jZPvAVxLwxFT2B3GD4oTwm7DfXM2ZnN/xtvu9B2 n/K7sGKLqvDYIgv8VVo8U4rvw6pd2pZvsSW0Eovrcx9CZ8fJekfspH0uFM57 f3BrJ65LYisZqx3ekPYY3D+pWpb9Y0Hx0cWIg4lB0MN443gW+49d2Na4sGdg pfllTdQCno+qksZgZQigQMOyrdje6s+7vMtDIfjBr5cf51lAAZvNScXPwdBY dOL9HAtq9Mt/7CkMB9qGCVd57FDDrW41uRGgUKogE8JlwXrTifyp9y9A/Nv+ zdYcFhDHrE4FZETBCb4I34+zLHhrWby0Li0axMqFRcnYGjYPjQwTX4LTq5S+ 5zMsMLu4tiMqLAEoziZWZydZIKQBpZEHEmEtz5Nn/hMs+PvJQ7y/MhFqgiUF kv+yIP9LS9618iSw7dn6tZrJgv8qExfji18Dsltw/DrCgi0Hmo4OaybDalHe ksxhFgj+4HutWpgMfqIOZyKGWNBQ63KgOjcFmDFWj03pLLBpVguZeJ8GQv1B 9937WYCszg9o70iHglclhxX6WLCpLVrtUUY6cBLNLrb3sGCkc7FNKu0NOI/m vNvahddvsHqDQeJb2KH42ulqC16fydM5kWEf4OOyHK2GHyx4KhmjUyb8EcYc 6cD9zoLGrIeye8w+gunxZc+kqlhwauQ0bX3nR+jZYiBpWM4Ct1PLPSbHssDS 9cnyfUUsCNd1DogWywV5icNiP9JZ0N5u7ipimQs/JZ8seKfi9fcC0/vRudA2 YGEvm8yCtMxVEpfk88At1OqldQILimQrE5BaPuxbI6PtFsGCXl75AoZ1Iawy dtyofgfPL1445nRsIbS0b1l/2ZcFzlpcn999hVArdqY64SYLJj0b9IsvfIIV 115ojV7F+SD86oNvFcFeg19kxQss2F7VSduT8BmSBlQKjx1lgXblQUH9K2Uw UBG78eRaFog1p/5Sf14GJcdyI5mSOB8DpIidOWWQKuq9yXcFC4J5imXXTpWB eZhnYsByFgxoK+756/kVjPmXgk/8Y0JA9nL7eM9yEGr1IzN6mdCSUJs351EB yzpMEn4lMsH9pumZHPdq8NE+ZDa0ggkH3XTSqSHVEFGhLYBEmLDRYTvL5kM1 iNks3/9cAH/eeJkvlVkNRa1/7XfwMEF3bUmUjesP8At5Ur5tfBwEC3c28DvV wF59RYpV1TikzAjB6VO1oOdy2zj22jhcKjwXTNrYALszS7cp/RiD5iFjgTSH ZmDGmnU5K41C4C42T/6JNgh3fONX+nIYPBSrI8pSuuBIUJql0SwDiHPEncT8 LtgoZl66bYIBVok8F+987wL3H98CREYZoCWpqY+Gu8BHssxuoIcBpKU3zNId 3aB7W0I2t4oBYY1BB0pzuuF7AqeP/wUDsm8c4X752gNz23ryP2gxYFOuKxHX 2AP3B9ZniexhQCTT/5fvYA/IWNgpeu5iwE3HshRdvl4QSpooN9zEAP3DymZf jHqhOGnSc6sIA5rkVr79/KsXNmVQL9UP0GHO0TWz260PXkgZhjCf0cFefOr6 Z68+MOG/JmEQRIfKkpv/vfTrg9VVcpfjH9EhZG1g2/HgPvDZe7P8jC8dtv5K JzW/7wPzYNmYja50sNCiW9WM9QFl/c+q6AN0yBQ7s5Tv0g//eTb886HQQaJk 6EeEZz8s7LjYdYOHDjdc3cOv3uyHjtIXNj4LNDCour1NJbAfiv+O2IVN06Dz Vrz5+zf9EPf2gTCZRgMqozPt9VA/vFHebrBQRQOHL1ZHQ5wG4FHaxjqvZzRQ yV+zYu3lAWB9slYdD6IB6UNHU5L3AIQImK50DaDBq0Rb65yAASiPXHPa9y4N Bu472bZkDEDj2eCGhSv4ege9Lq5jDYCmodCWSyfx9f7TUEqZHYCXi/Hmttb4 ejpzrJ08g9Dq9+GctQW+3k6/KyA+CFeVO46eMcXXE3t000F1EIylPaeb9fH1 WiMC0r0Hoa09sRvtxNdrsD6ofGcQFva7opzt+Ho/1goVBQzCZ9KakZ0K+HpF cc9+Rg9Cwa2723Q24uvFpUQyiwfheNfduc9raZAdef64d8Ug8PQ93uu5mgb3 nm2T4qkbBEd9W8YuSRrI330fJ94zCCqy+V8qxPD4Z/OS1XgICHXc1mpBxePb eDt9oRLg/aPD3HQZHt9KU8FQnACrsEX3oxQ8/oEvb63lCXhI+ZrkxoPH316Z fdOAgGEfucsruQRkb/S/Sj5MQG5X+F2zWQLurTPe+8SSgEDvXzYxMwTIi9R9 inMi4NHEU3+DSQIcJ5rLygIIOOrYuo08RoD9zRDrwhACLpwpGksaIeA0+RDz QxQBV0L5bhoN4/uQ/CadkE7Ac4Y0+T2dACPNLC/fagLO1sRpNPcTsL/8ovC1 BgI+bDQpzOojQN9EIfliGwF+L5TkXvQSoG2T8PvUEAEq83/zb3QToHT36Q4t PG+HPUqO8e0EbBc0/qaM1+XW/iD/Yvy5rc8pJ7etocGy+0If+1oJkEu55b8G 78NKswGp/1oIkFFSXy+2mwa7FVsd7/whQKpgMpdfgwYKn3aXVDYTsPLHhQH2 ARocEVvMcW4iQMxs8w3mERpMvGq2rGokQKizT5SOc1N+7Y/kDmyBs7Gp3XY0 ePli/Wz0bwKWjVvr/jlPgzcWVQui2CSvlc21l2lQptK5LRjPc2mx3qXCmwbv xh3vSmBzxAyjcvxpcKm/oljzFwHT0by73uLcm96+n9xWT8CE/JfKVy9osPD5 3rfb2My310/HJNDASemV9C7sETW1qdA0GmwI+PSBXkcA4wvr8eMPOAexUfdS sQnDt3J3C2iQbsn/wg2775dTwfVSnKuCSpYedvdxeVP37zR48ifo2Wrsjv5u 4vwvGlT+EbjBqSWgxSX6ll0rDdYNMzL7sZumLFZY99JA6GCVahN2g4/YG1MG DQQ1dQXrsGv5asGQRQNjbpfaL+wfwf4turM08K/bmd+OXbX6v0t7lmgwN/0h ZAy7PHGRvJMf9530zip+PH7JtqKYTaJ0aJDccEoRuzj7mvK61XQYsxs6Yo1d qK1cvVKWDvFRoWlB2LkVY7bLt9JBvfTq2WrsrMPpM6RddDD80h8gjNcns8Xx ydxeOrxxlFt9CjvDTnbjpB4dUs+7i2dhpw11fBo2pMMKe4Gbonj9kz0ij/ab 0uFmuZS5F3bi3DFGmxUdrPp+xtOw4+4L+zXY0sGI0LazwfsXI/RDotqJDid+ 3Y3sxo6MePC21I0Oxl7vDJ3w/j9fj/QLvOjQ7VfuMYv9ZHfB5VTcdz2OvUKq OF81Kq30a8F0eB7Q692BTd0za7M/kg6k5YyuxziPDzTVDxEpdLjLZ6XOi/Nb rm39Lec9HWIWtu/+gc2j5611P48ObzVSbKJx3m/pFyjIV9JB96GYjRmuj0KD 1oSJWjqQOcoq2h0EsA1nV31tpoOU+wn9HZ0EeJqo89kTdFDprVq7FdeXi0VB fxyZAeX7Kupu4/pMt2o9fmk5Az6KTL/OGCCAfnz2l85KBtxPvlnWPUjAGRv1 kk55BpT8Tfp9Gtf3caeCmLX62B/Aq2QUr4dzq/iwMQN8fPSTFMcJaHaZDSg8 xoAhvkXpJCbuI5fVva3PMOBV0mdKygQBB64XmEfcYcC3OPcSMQ6e/83WmrMB DBB0CrhXhvtVuc/sPrUQ/PmM6rjr8wTo3VXf3ZTAAJ15WhfvEgF7AwuExEsZ 8K6xKfQ67oebYgsqn/xjQCORZzu7CveN+Fad03xD8HqF+uAO3H8TE2dzFIWH INO+57uLNM55ivqrmnVDUDFSk70ki/tGZoEfVWcImr6HSgZvw3VVVqD+4OYQ /NZ+qqCrR4MM4RWp/+4Nwb7jjnFq+2hgduqihHfQEDxgv2HtMaDBa7bcxIXY Iei6ckPR6iA+D3cGZhwpGQKRZaZsIdxHHsWclpEmDYPhR2Enc08aKA3lB4UL DkNhpcWtoWs0aNkjPie8chgWgn+f9b9Bg62/K1t4Ng0Dvfflx4E7NKjm3xVC 3z8MY0xrEdEQXIfXeMnZj4fhkIzbH92P+HwpP+WhGDYMF+daky/n0uCkWH5v csww8JdqqL0tpMHbty6fX7wdhgdHTZ/AVxocGmi65ls3DE0ibhNdjTQIPpI6 ZCQ+AqmHMoaGcB2Lbzep740aAZJy+Kq9xnSg8yeIVyeOQICVw2bAdVNEm7T4 mD4C1/fEeBw1p8PZpJjOO4UjoOH6uDDIhg6Fa0aGNrSNwMq9l4rOetLBlv8x +ezqUYg91/5ffBwd3hFVGkMRoyBu8dBDeg7nvlzKpyFuFDhfwru28Pzv+cut tDBlFCRkP23VWsYAntOrDB/njULK+ttHr69ggHnTOfPtf0Zhy8L8YzNFBsx9 pbhdlBiDNCGG5y1bBhgl6L/+GzYGu1sz9z6oYYB/dUP3vZdjAAdOa0g3MqBq wnaNZPIYqIxUMoraGbDf4NZTzbwxIL2w0ZQYxs9fwzne91rHYKn7EFWJOgQ6 qpsPSawbB493EprcA0Ow+zv/jHrKOPQ8CZsurxuC1axaw9sFTHhbi7Te/R2G qNDSM8OlTDitf99VdG4Y1qhl+5hXMyEy85jVDfIIrLnxIntrOxOMSCe1zqwa ASmyw/qGOSaM+v12uqMzAutXz87I6eH3pJ0Xn848HoEtsCGlvAK/l748Z39/ 2yjEfC/iJV/4CwGnzOusb4yBjsy+JbmzE/DOXJSTgZ/vFfvECN+rk8Dy3HrG aPkEvE9f4ZznOQWU7Kw9Mm6T4NNj06T4aBqqXu+W+tgyBdMHdOPOBU7DCany wOHOKbiYte58QvA0bC19qiDXPwWnHnTOrXgxDapbRlsfjE6B1vYT8nNp08Cu YN1U5JkG7jULj+of03CrRPrBsMI0eAmbiJ4TnoFAt8CyZdenwUNHwyQ+fAaS 1aauly2fAR638NvPomZA9vCG+mbRGQhO+JtzJ3YGLokIvaetnIEM0pt1jskz 0JZ2ZW5BegYGqtcyt+bOgPTxzKu8O2bAwnI+JKtpBgSUzbm2JjOw162kpWIF GzKluzws/WegIkFqef4qNrTYycdMB86A2W8vSJNig+yOROJZ8Ay4qe1KfyzP BnuKbHNRxAykzSXcMFVhw6pEWnX/6xlY4393XdsxNrzykfT0KJ2BuQQDh9EQ NqRwL+Ten5oBvVndMOUINpRsN/Ql2DNw11S93DuaDa5eiUfQ3AxQ/22Tp7xi w0iQL3mYhw2SJ0UH1uWwIflMpsmiMBt2S3ScMf3Dhl774id7trLhimtTaHg7 Gyp9xZz3b2dDfnnt145uNtxcbFt7dCcbdD1KN5yns2H058dpS1U2HKxP7r89 ywanAHG1jcCGcwGXz2StnYXjzpuOfLVkQ3qvc+iszCwwnAVUfI+zYWyvw1dd +VnY5Hjhi+opNnjSLDbUbJ+FntjG8hB7NtzR1+of0J6FMdI/XUFXNj53KGck bGdBNb4yl+PHhgb3GHvvV7PQZyJdmI3ntT1EbP5q6ixYxAtBbDIb7n94FOGZ MQuKL3903kllw16mZ82l7FmIkVh1VDuDDXGuJmpny2fBy3GafTWLDS5OC/zH BmZBjOfjILeEDRUPPV+Z0mfhiqLx8vAyNsikDOkcGpkFpo3N7m3lePzBZo8D k7NArr9xyaCSDepn3nfqkjiALiwP1vvJBspp2w/b5TlQ8H2HCWphg+2tZmOF LRwY0G3PfNzKhoKYg8Tm7Ryw+MW/UNeGx2/fu3aDCgeiJh+ZHuhkw28r0fur 9TnAN2KYv9CL5+f1UEbSkAN/eWWNZPrZ8CBivmDFQQ58rNlYrDHABo1mxpiw GQc467uRPcGG+GNlVhQHDrjAjiyPITZw3PdO8DpxYHCbs8qFYTaYhbwLWrrA AaONUU9PjbCB71dU2ZwHB572PanfPcaGi4c8tk/c5UA20XA2jsWGKldGBfMh B7jmEQmuf3Fug2zsxh5zwDBXNVNtgg2NP4zDGaEcuBhraFAwyQbNA/KL3Ukc 6H1VvM9vhg1qr2sCvqdwwFcitF2WzQalJc+VWW84kGvOvfIZW77gm8KDLA74 77qZScc5WrfyYs6lPA5cVY8+fJWD6+CyhJ71Jw7cJ6zHF7CXb8X99isHPJaY O5a4bPzcLdyzspIDliasn9fn2MDTm+f8r5oDCtyeC+PY05HL/BoaOLCgL5j0 fZ4NzMlMalEzB7brPNPcucCGIVPr56/bOHDALPLXU+zuZenpXn0coGeMTsI/ NrQ5HFW1Jziwvzn5dih2Ywnni/EQBxqH8qg92LVSSUaqYxzQbO95unkRr5eX cdO6vxz4UD0o4oxd1jhhs2yaA/LCT4NSsIuUYoZYsxzw2pVG7sHODdS/0j6P //8oyVt8iQ0f6CP/ypc4IKWMD2PsDP3nAe/IXLgj32p6ATs5XntlJD8XNFYt y3mKHT83GHd7ORdsIgfF32NHWT1RuCDKhUZ7S9fv2GHZajlmK7ngeX5/aRf2 E5FuXZ3VXBBvSBIex37k8rB6szQXXkyftuJg363aaS4qywVBx0vRi9g+8i3d HHkuRHbXtSxhe/n5OQ9s4ULYSV+RBWz3ji1TP7dz8fvebTSF7bL3l2+eEhek tTou0rDPhnlTE1S4sDk45nkjti1T9nnAXi4Efv+VW4R9/GC1jKcWF/T6nzbE YZunuqef0uPi96xx+i1sU9Ja1f36XFiTIsCxwDay/fpFyZALEUYUyjZs/aIL RmsOcqG7hHc5B6+nzqoVTbymXPjApyhcjr3Xs8hm9BgXdpi+F/TH3l3vMNRs yYX0hU/kA9ibH+X8S7PhAs+6w8MFeD/lBk4FhJ7hAtPcpMUZW0qPsvLWOS5E 3/5WKoEtwrZQML3EhYYL8NgG54Vq9i9b3YMLX+50XZjD+SJlpuhuuMaFl9pb jMKwZ8+xzaZ9uJDvKreUjfM4+TW+u/sOF2q/BrVpY4/JHHD+/oALv33WZpXi PPf9eeEb84QLNZNwphDn/cd+zXQUywXTTpmaS7hern/3U7qdyAX1WK/xMlxf CsYVuV+Sufh9okJZBPvRoSNftd5zwbeVIvdiig0G5uc61Eq4sHxHVZoDrt/p 5gz7K+VcSNtlwniE6/u11V96VhUXEgUZh1OY+P5P3ppS+sWFsbT+5w24H5TZ hwpt6+NC03TUun7cT9wHWsLOE1z43O6Q2cLA/eDsurWpQ3i/X/1xq8Lngt/5 tM0bJ7iwtWr0djjuRzpuX/RkSHOgl/ycdxT3s4Jbw+7im+bw+//hoHv43HH6 pzR7RGEOvOsqQqWbcb3fvuobvGMOyFVHOzIb2XD13tLj5XvmoG2rsXrFLzao PJZ8zWc4B8P69sYZP/A5G7nvD/f8HCzFZW8+9xnna43/KY2Lc6AxwEN6XcQG 4Zjafi/3OYi6f0WzsxD3tzhr5tT1OWAE1ZZp5eH+mnyJn/l4Dv7ezHLMf4/P 1axozYG3cxAe5JqQFIfzPH9qe9uHOXjnyf0v4yXOz/710vU5c2Ci82NNJj5n P7e9WvhUPAe3bBZPpOFzuGnpbWnozzk4Pmnmav+UDbymJfv3jc6B1GDsKeYt NtiMDBxL3D4P9JHXfx7h81FeLUU/Umkextffkeaa4X7ke171ico8ZNCrfzkd xfMXH5O4rjUPW6cuPVEzYUOQxkzrkYPzUCDiFx6N2PDpEb/t0oV52FhF6QvC 57Xkxh0utm/mwdtPdaf8/AyEhAVZvXk/D/fjT/z9NjsDgqRR/emseThydU2W /TR+/ul/Ix1YNA+PKLMaQeMzMBa/tS7v5zzM73IpT+7Fzy9SG3cLM+fBc1VO 3Vj5DFxdIcUuVlkANuvRoZGHM9DIS7239vMCdPUvyngtTgPzfbTt0bIFKOhr FBWcmwaBk4ra/hULIGlYuCFmZhpQtun0dO0CfF9ekp85Ng2ZDhFODd0LYCT9 ViajYxqCvsmb+C8twH6eTRnjedNg8FBXYkb/H5zgV/hedWEa8qhXUht+/IMO 4660b9+nYIekmItD5SJErQuSPeaHnzOD2RKqLUuwxfaWzHfeCdjo77/rsgsP aghfuZmswYKBk50d+gweFPzdIOtk9BgY0Zq4eW68CAKEuuupI+CrGHzrgzsv msgon5leGoZsD6N/6Z68KLxn76zc7DBIL37mifXiRYHu+nWBtGFgrkrlv+fH i/5MMTxTy4ch3Oi6pGkwL7LSqZsl+Q1D39t1yvT3vCiz5p7yTe4QSE62ZPd+ 4EXLPwfNOU8MwUGNULX2LF7kbH/6vO3wEORU8GnU5vEiFzfuPpv2IXjUzdTL /sKL/v6WD337aQh2iH495FfHi2RsfXY/uzUE1z3POa8a50VvzrvXRlCGIMCE eV6LxYvWa624Vr3AgBebvM/bTvCiVSLuaeQZBuS3BDilzvCiSP6zZc9pDJjS end27yIvyj0g6iD9nQFu5Cl7K1ESsuj5plkXxADH8DsnIpVJaMnSr7xXmgGe lwROFKmSUEWUEp+SJAPuGYYd79lDQsdTGdceijAgkfPaeosWCT2o2Tt1hJcB Pae/W+brkxApRLfVnEGH45tFzFrMSWhVR+9fqTw6mOa/PLjKi4TUmMaBX63p 4DzlsCR5nYSSSgefx5jR4f7u7bmSN0kot12Y6nMYv89lFMpI+pFQj6Co1vH/ 6CCf8OfvykckhOp/Ur120YHtL/pCPJKEFDYYWhoL0EGsssVEPIqE3EgFGzIo dFAkxfOIx+D7Ca7yWclDB3ufHS5i8STkIRtFX2LToMbdWFc0lYSsUhe/AI0G 8SfuDwrlkxBFT4/f5hsNCiMPRgkV4vklNEYeKKVBU5P4YaEiEjr035UGrWIa UE0T85eX4PVgPjignUMDT/0vjwWrSMigJMcl+TUNDBVnd1FbSOjmVW7kmkc0 sHcuIfjbSEg/xcku+B4NbqU8jObvICHr2ZeE0G0afJSVIPP3kNCxrC6FTddp ICWh3MJHJ6H4i7ofil1owFxw8SGzSYgVLGTy7BgNThw32cadJSHNnzc2J5rS oCJHsYXJJaE4La/Ln0xoEO0ytqvjHwnpXTxhzmdIA4O2S4Mf+chItSbzDEmb Bi9z3A/aSpKRIbLIC91Cg2Wix2bNV5PRGrdNcds20cDdRTnZeC0ZCXg2zPzY gOezYfKfmgwZJafMcDbK0GAy+ErW8s1ktHvBEHQlaGDk4rXmkxoZvZk2uU6h 0CCn0qoycy8ZxfwmGW4k0WD9BnXPZA0yuk3v8D3IQ4Op1tmfz3Tw/VxS2Ja9 QED8/hu3nQzI6JCy6An6DAECSSd2nDYko/yBbgejaQKuLmi2HzMiI6a7Z0P2 JAHGOXMquofIyPGVQlMii4BpOR/6Sgsyko/KPNk/TICdz+nnAlZkZMeudno0 REBNqw5asiYjjUizelUGAQnB/6JHTpGR1ZnJjDSCAMGRbsM+GzJqNgiXcRvE 4+0vmfpjR0YT3Z/pOgMEHFzwO/zVkYwqdB29p3oJyLO2m8s/R0YDEzt1OnsI kMuBtHfnyUhNa63Zz24C2Bd4eKNcySjyaIRrRScBSa13c92ukNEvQWNFqTYC 6JW7e4OvkVGHatJzlVYCduT2CnzwJiNJzpV8ixYC8kN07Vi3yGhF75R8fjMB C35jj0X9yOiOr7bzTBMB+y69zN11h4yU81Ts9LBrjbkC7g/IaIcp6/j4bwJW aKSrhTwio648rpU5tvUWa7uPAWTcn3T/lTcQECuxLLAhkIzsvf8z1sEeIOXl /n1CRm0CARqlvwhQmHDsFXtGRn17/apNsC/1rhBUDiWjQZlgdn89Adl1X9WO PSej8kOSZXexOcXudh4RZJT6zUleEVsvQzYw9AUZjXNqpHrqCLgfVZ+bFU1G q7tvp8ZgVz/y7f39koyqewrL7bFFru0QnIwjo3pm/MXd2OaOnWorEvF6Pjia JIAddSzQTuUVGbkk9tv87/vdHtAMNEsmI+emUwlt2BuVhnI9U8noL5Q41GM7 r3vRG5ZORjUJ/5L/9/1xpqChYE4GGUkZURxbsKc402pN78gob2d29BC2BuO1 3VQmGT0b7tpPweP5/TELXJlFRlu+HDm7DfvbN9481Rwyorz4OfG/74up2R97 zfPI6OBq/tFn2KaJdoJXC8hIPzzz0G/s8GCRPeGfyIgke3blOrwe7T5f7HKL 8f4GlGq7Y693vRjY/IWM1M+altdhnz0hnTdditdHPPy1Gl7vNwdqeiXKcZ6L BLqSsZl7bgjuqcD7ZbPeeT3erxsrWu2uVZORSOX7izvx/pbwPAqMqMH7Xd/U XY5NYanl5dWSUdJ51vMzjQQE/wwTZDfg/NcyS4twXpo/7duzqomMCM2dStdw vtam/7Xb+4eMoh+satT4Q0DyA9M8r3YyEmra/bYT53HE819vZCcZcW5ebCvC ed115p1gQTeen7mz4muc5yJdQfvZfjIKTDZSedZBwJLip8DVBBnNXR7qDsP5 N5ByzlOn4/xKlcYndBHwi10peH2EjGJdpY804/qRoF3dEzVGRvRy4b0LuL5O Nm20L2TifuQktmFnPwHEh7t5nEky0kzNnXiD63POWdf+xjwer/o0jyiu94PF 29G1f9h1y7+eGyHgpfAaOY8lMvpD4tWtGCVAJ3uy15lMQYOuftZRTLy/82l2 x5dTkKPc1YxY3F/qD0eAhTAFfb28t303mwDZxHuyR0Up6Hk2Jbl2loAyA5ve AyspSEU28Z/UPAHk4BV26tIUtCfvP9MVuL9Z9C3pqcpQkMEb6ugAmQbJKuPr d8lSkBxqIxXz4f7Z+r1ny0YKuhUeGnZXgAYBcr62qxQpSPt52afz4jQQymHY zGhRUMzFzSbh8jQ4zfdHd0KHgkSS0oM6cD9+b10uM65HQc6mFB6FrTQwXYjt JvQpiNj/xKNNkQYh+81smg9SUEWK7VTwHhpItH0+nXOSgthdIRqmB2kg8y/0 lMdNCvI2PP9uEp8vRgOHP73woaDHq/47dcKHBle/C6wu8aOgYMfYsu/4PKoJ vdsoeJ+CqnvHw4rx+eW1xcM4OYiCTqgcC10Mp0HDkaPqrbEU9KCdyB3NpsG9 VyIrdUspqGBn6rzSNL5f/xp3x68U1GZx8LwfhwZtFx/VP/5GQfmhn142L9BA SX3xcct3ChpvOAYRfHTo/DnO495AQcPnjoQ5raaD2kwt81U/BQnFGhzX16ED /UBQDZXCh7i9ySHJgXRwMLGX27yMD60rNb+U8owO3aZ7vPZR+VDv6LLmt+F0 aLbs3XBTiA8lZ99f/yOeDuWOqjdGJfjQ2+ipUoMcOsTd7txav5kPvVf8Smh0 08GiQPHh8wN86DHtzt52NQZ821IL64P4kIpkeZzoBANcqKmUDQLLUN/P6yJZ 7sNQkLhJ91voMqT0x3FASX4U6rV1Ks3E+dFRfr0TfSljEFh4bd5wJT8yyuOt e/h2DA7s+aCsLcmPXlzhcVLIGoMyJfn4jWv5kfMa+/Gzn8cgZwPVe1qOHw3c t4gpahyDKP5mhcjd/EjIG5U2Lo6BY5Prk/Yj/Egwwu3lY4txkDuaUl53jB89 +uf13/cT49BV28P5as6PTq3l7ue1GwerqmPnMqz50WWyqr7LhXEw+qSud8uO HykFzbuJ+o2DUgL577rL/Ggkaeu5pNRx4Li8NLcP5ke5bqrSxdPj8Ozma/7b IfwoO1o4opc7DlsC3xbHhfEj/dv7RhYXx8HyTfHGzkh+FOoyLagkwIRsRueU ZQI/0tP4c/awDBMunl0XbvKRHx34fetpoAET+mzimvc28qMGkkdXQzATvC+l BFg28yOu3OOe/54zQcT3vc7VFn4koX137OMLJujGfknO6uBHUeIaEjcSmRDT 0X11xyA/qgpPHC/LYoKF9XpJ+Wl+9E6DWbStiQnVRxMshVdRkbPOOUlNcRa4 VNBK+NdQkW18vUKyBAuENXYokKSoSFrlxjWBNSwwk/00x5ahotyYvIzy9Szo HG9M6NtMRTSrA6tZiixgBi4bydlDRReXXX+9Yz8LQhYPmWeqU9FEoK+vphEL VD2ff07XpCKL7BsWyIQF10/IPYvTpaKEm5qj2sdYQFLQUvPfT0U1FgknR06z QLLykt9JSyrSu9BkuuEKCwo1chkW1lQUP/rNrvYaC06+mzt65AQVqeff1PC4 zoL45/4bDWyoaGFmTC3dlwUKDknVO89RUQXzFN9PfxboLDWv4L1GRX1Sx6/3 x7Cgx1PaZ96Lim44Vb7eGseCu/QztJnrVNQ1uebC+QQWVNUxC0Z8qKj83FJ+ 02sWHIml2jQ/wJ8fN1xj944FDpo6aWnhVOR90KNO7zMLLozXzXRFUpEDb3iG RQkL3JPsDFZEU5HUoomtQxkLbgvc7/eJo6IB4XjdcxUsiG3/IW2WSkXnr1oG UWtZ8PrpKRf/dCrapHKytquOBRn7xgs/Z1DRkx63uvRfLPj0Rsxq6wcqMnrn zKfQxIKWG9YhCwVU9LX+9bJv7Szo3jnco1xERYXN7byWnSwg+m/uPP+ZisK4 0W96ulgwZRxf87uMigzYHTNtvSwQk6JR0n5QUb49e/8FGgtW13uZd/2kokmP 0guFdBasv0d9JV6P1/dx2LYlBgt2jiiCTyMVxcb+u3ZlhAUHizxvHOukosNl G8RnmSw45kapftRNReEGcgTpLwuOy0eu+txLRSppOfuXTbDgfOCnnC0EFSVl VGVOTbLATc+EdJqO8/b5Vk73FAu8JruOhg5RUXXo7n2l0yx4cJKHOT9GRSMm QZPObBYEiYTpKLOoaKi8eqXyLAvCyjcGOU1Q0dbNez79xU7afkDh9wwV7Zk9 +sSKy4L0njavZRwqum4yV7CA/THMpVJ7DufTqsoxZo4FJXNPHVIX8XoV7dP4 PM+CykzZrE4eAZR35bAdWmBBrUPWkhhZAFUkq5E/Yzev+s/UkE8ANR4y2Ljr H85/TXPsLX4BpFH6pyQae8DPafSjgAAqTDb9M489osLRpC8XQGILck6WiyyY oD8OkBYRQM1SP91TsTkx0q1HxQQQT2brNBN7yfT95kcrBNCDou4JpSUWLCPD 1WIJATQRd+e8E7ZwQUP531UCqEzE3TICW8LVQXzLWnx/65yLi7GlZaftTkkL oBfKytHt2PJNDzNDZARQtVgik4m93X/1v0pZASTfFlE8j62s/cZkfoMA+v+/ 5/w/DOM6Cg== "]]}, {Hue[0.1421359549995791, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk81M8bAHB2sUvkFnJFJGfJlfBMKtGhcpZcIYQk5QgpHa5KjlKUo8OR cp9RrlKSpJwdwlq3tNhll+Q33z9+/uD1fi0zn5l5nmdmPi8bXM9YniSwsbFl 4G///STW87QP65w1lmf774sGihN1O2SSD8EWT9VyduylYk33b0nOMDh9q4ML u2QBugULPaEyb4MNP/aIiBezMukMsBp/7lyPfVOiha+w9hyUnylJUcHOUXbI ZCsMhm/MW1ZG2A16tC1WWWGgVe4QYoX93fRaU3bSJUgjc3Ce/q8/FV6V8KZI YPp6sGKxo7V6ArJrr0Kgl6tNPraIQVZte/l1SEr6Kt6O/WinNwezIBrMk2/t YmBrmGsf3JAbC2YKHt2y7DSoPfzv7r6sGyDIq9p+ELvbOWlTetJtsHF7NF+G XbJNQ3+4OQEGa37KTmMH6yX/DG5KhJdG4qWbCDTgAEfFR7XJ4Hg8hPQMu9Wk 6YNO9R3gO0NqncFONN3k11p+F3yzfGb1iDSQsZitnC+4ByEyjqe7sKlHbI/H 5N8Hq4s6jZs4aPDcpnZVKjcVWDIXQiKw9R2vm5lmPYBPGgX8upw0sPSV+H4/ KRP+7f/e9YmLBrz6UJ+yNwvoq9v1DUk0oL08KzjUnAUP9AOXC7ArX/dUBDY9 gi8CvpkPyDTY1Zz1L6P2CTh3sFtk8tBAaW/n4YntT+F8yGqW8hoa8HzgfLKt +insZFocqsDuaPPe21KeDbGl1rV9vDRw7NJOmC3IhVB+g7q9/DRAtp6UHWp5 8LRQ7tsU9sa+VO2o/Dy4VtRjnixAg8kf//okc5/BAZ6czdOCeP6GWzbsznoO 3t6Fbc0ieH7mHMpSkoogLzyHsm49DW6Jphk28BUDTzuvC1GKBl9LrsvqWBbD t87w6jns45MOIzI/iiFx2pHxU4YGfsfXnJ2bLgHb1u2hA/I0uGPkFZMqUA4z gd+CH6jS4Ns3K5+1NuUgyXjJ/lYNz38QWFxNLYc78d2HaOo0yC0UEzktXwHm VdZa1ltoUCPbnIm0K2Hw3FmKmQ4NBtjlq8bsqiHwuIUfFfD4MvjSHB5Wg2jy tL/ZThp4GbDCvwxWQ1rw5/XFJjSYC+gwqT31EoL3lLvG7cHxQY1ojw+rgRFH 8Qjv/TRQefdjRCfzFRTHjyr02tFgR/M+HpNzDZCQvnXG8hwNBLpyPuslN8CG 3uxyciCODwrhrnpZA6iHvD3dGESDeLZaWYn5BuipfFe0I5QGlB2qOrSARnAI v6xvFUmDmNI1LhkBTRB6B0XwJtCgJ7OtYunsW1gRst9yv4gG/qEWJ8r8W8CE 8q3nxgIN9vkZ5pETWqBS2nV5gEkDBVeVP45FLRByJNRRdxn/vTnXRfJMCyjc if48sUoDI4m6+44+H6Cx6qWMD/cs8FSrd5A8WoHqNLnSJTUL2QxecDjeBkP7 0I+te2bhdPXJeIJCB4wry015PZiFrnFz7lzXLogt6Un86DUHcZoLbJXH+kDX 4jmS05qHs6otdxuyf8JRA7Xu4xx0oJ6kXs6q/AkzwbZyPiQ62Gax+V5+/xPM 1mfUhvDQwUB0uwma+AkmDNmOeAE6EFafzdSr9cOJhkBathQdkr7e2Ftf1g/S xVf5w7XpUHrhEOt14y8gTiVszHOlw8ZyH2r6119QF++fG3KSDikz0Z8vDv+C OZvDk6ZedAh1a8g24hyAUM3ojJ+n6WBycKvla7MBkC+KMp0OoUOnnPDzV58H YCY/7MP9eDosufkU9vsNQvnczypyNR1cBOdDXgUNgn14M8Oxhg7NdaG7HkQM Av3hmZbiV3RIkIjrOxo/CE3UJplDjXTY9DmP0FUwCD36NC2/VjpYG4zatk4P wj//NKltP+lQKHBitdJ7CH69WxfZuEIHkbrxD3cDhuDKxAfBN6t0uODjf+d8 6BCIyGl/aWRnwO53lzZrxQ3Bk2iejkpOBvwIy7AqeDYEW/ONLkTwMYA89iP3 yfgQqI1N9kdKMcD1te3hBA8KGKr5pe7WZ4BWpbiQxBkKkBWsPbgNGEAo+t75 KJgC+stHg1p3MOBxlpNdWQwFMsvnj+wEBlCuejj15FPg3qfqe+ymuL19Qb5S fygw/JPl+8ESt7dLXyN7kQJll7f0HLbG7Rku/VFnG4a7SPlglw1uTz3iHAgO w56xJLvPR3F7AlGhrtuG4fjcu+t3nXB7vXdj8oKHQThZM9H5FG6vw27f1svD QHBsdc7xxu19kOCtiRmGx//meSZ8cHs16bc/pg6DoglMnfDD7aVnp8zUDkOX YP2VDecYUJrieTT47TCs8tdSTc8z4MrtzZJsn4bh86/DvF6BDJCPLEgX/DUM nrSNj9KDcf/uFU+12aigb+FzpzsM9+8Y7PGaTIXdD4R6+sJx/7bblU0FqdBd efl970Xc/97Xz+3kqVB3Ubao5RLuX6W5NHQ3FW40njELuor7V4g+TzxIhZxE nXrba7h/KXPdmzZU2LFb/IvWddz/2k8v0z2oYETa/qo/igFus10NDTFUOGoh 4vMvlgEuoQl21QlUOPD5MXdRHAMciAdmiu5TYa/eStPxGwywFX2zPjOPCnq8 ARHPbjLAbHtJ0MUWKrRLlgyL3mbAniZfvsAOKij7fVfIxTbZr/zUt48KO8vH z2gnMGCHY+aX4+NU8LwSvXFXIgM0Im+pGZBH4PCIV/uWZAao8Ji/2SowAiaO BoaPsTclc9hvFh+Bi3WsXP47DJDLDosWVx6BhZ74gF/Y0hp6MgJbRsDLW6Qd 7jJAsmqunKQ/Ar5PxuTSsYU/nKIs7B2Bb4tsOftTGCBgqXhh5tAIRBeKdj/E 5v0xyD9qNwKye0QZE9jc7g9z+p1HYFu5P8e2ewzg+m1n1O05As+7H7KHYBOC hLvazoxAlofQVDX26r9277fBI6DCbVHPwGYKmN4vix4B89vS8m73GUBPZdd8 fnsEjqG6gmTsWfnXzY/vjcDVR8YyDdgzz0Mc0jJH4NO4RsA49qS29nxi7gj8 2aGQx5vKgLHXf2Jji0aArbSsTg2bavpcLrJqBNRswsvNsAc/e1SF1I+A/0bp GBfs/qPyFv7vR3AdM9A/j/19qJ/q+XkEZETD3lzF7vFODXPuHYGANTeVb2N3 zlsL2Q2MwNJ3KY8U7I5wgWcWYyMQ5jYUmordxtkGpn9GwOFq4sn72B/io3uM Fkdw3Z7YmIz9bt2u0zqrI3CNM68qFrsp6x9RnTQK06pJUuHYdZtr0jbyj4J4 4BlLb+za0sCtUutGgadjzVFr7OodW1uEZUfxuUhPzQC7/O2005pNo+Ce1fxp PXbJwTwGQXMUHDfc3sHC81PY43ZzSXcU1NrPnP+Kne8sqzBnPArqbXuDc7Fz x7+/nDAdhcVDyyYh2E/PphweshiFNxkBPbuxs5aOjPXZjkIXf9oWPuz0q3wR HU6j8JPP9fAXvH5pvB9EWjxGwUq8XjsRO+Xutef1fvjzt89+HsBOlkEmVUGj kNQgs5cD++aWqjM5UaNg1lvo7IHjp1WrdzQwfhSqdgi8FcIm6yw67kkZhUuh NwVrcTxe2653gJo9CrBi7b6K47dph92bsoJRKIuc9HyAzWYcbHC1YhTy3dSP bMMOM6lSlm8ehROvg7/Y4nyo3t2bOds2Cv+IYx6UJAYsmC6KNXaNAn1v569T 2AH79ThdqKPglSB1zhfnl7d11VA6cQxkB6QlEM7HPNveo6fXjEEek7MwP54B o0cXPxsKj0FdQZOsIPYJR726H/Jj8Iikee8Lzu+jHlVpEiZjsEF58K0crgcp Xr2CE+Zj8KbRSdMb14su78WY6iNjwLvCFlAUw4DDZ/SC7U6MgUbRo4vq0QzY G1Jldfcy7r/kfdYirk/XQntb3WPGYLmttk4Wuyl8cad2whjczF9fsusKA4wj 9bZ0Zo6BK+GW4KXLDNCNq+IVrB+DfDGxqje4Hm58WNV8c2UM7vFlH76G66tr Rq+hA+c4FAW5x5/C9Tcra7FMlW8cnn0WeLgvgAFS2XqPW6XGISMuTYnNH9eD wqoIsuE4rJPSY+jjek5oqNK7FjoO4q4vfYZccDzxCeWsXBmHQSuLkpPODLA8 7isSfGMc6jhUySOODHiyIDd76uE4CJnumuyyx/uhelz+obpxWPrbd+0C3n+i 0hyk1xMmoH8T60AP3q80xitv3OGZgI3pNk1r9uD80xFc4hOegCv69w4a7sL1 7UtzD9vGCVgrUJobj/e7FpJmwuieCYgjd4Uw9RjAE8hOLI2dAPtZM9GhTbi+ Nx0/q5o0Aa2EO+otigywF6gceJo2AeFZwyfzFRjw/Ln3q3vPJ6Cut2+7iywD DlA6Ay9+moAUpll0ohgD4g/ljJsJTkLBt/wbazgYIKiyv33g/iRcGqugu/+g wygpU7AlaxJedVmcHuyjQ83InHVx3iTsHtF6b9dDB/dHaT8uV0+C+75aBYMv dKgWnxzf0DcJi+4fHn96RwcnUizRfd0UaB0U/rWlhA4vqO/0x+9OAdPGaO/c FTpENkmGd6RPAcejisTpS/+dv/zqq7OnIMhfYZoSTgc2BzHT2IopKPBv6H0T RAerzpNWKt1T8JudUGvrjc9DjRx+viLTUHDhpmnTYTqYZZo8oSVNg9edPOpr STpEt3T0X3kwDS4/v7jNidHh3ayTuOjTaRjjkb4pL0yHPbvDbm2vmIbL2keG A9fg89dEWfCV3mlgT/y2PL48D4bbFA+ISP2G988C3Yg/52HLexJDL/s3JL6s vC6TOg/r/rSZXqqageepA5RnpHm4n1h/YqJ+Br46Ge9jEuZBXLs03KplBiqU e613/ZsD8Qv3Sjd9m4Gf/766fqbPgSTRVaZjaQbi0L22+qE5kFm3yJAz/gNh E+bbOWvnQAk2ZDe9/QNErU+HjH3mIO19DTvxFA0MLW0lrN/MgqH0zlU591lQ sWVeVcHne9VBAerF83MgL1lidGbiNxTkCXlVBMwD88HDO80KUxD+y7FTNYoO gdUZHzMtx3GdMEo/GUeHQx/DJtXMxsG3RMozE58zyyKphfVG43D82o8loXt0 eFC2+fCC8jgYqByTX8qlg3CQHM+z1TFgBVqfbflAB+6rLYtqhWMQxLef/yQ+ 903JT0XM8Y/BWUP9/Rm4blWnSKy9NI73Lb87l27jOtt08rWb7eAIxGfSyi4/ ZIDS8Fi2dt8I5BOeSbk9ZcChYvE1XC0jQGmRmNlUjvPg0BOxFbwPWtssJ5R0 MmA6/RifyakR0PWr63krtABPW/ZK2cxS4W2m5JpKsQWwQrUfxSapYPklCHIl F6Axt153kEIFP23NvFj5BYDFRru4LirkLmVesNBagO56bT/DaiqIR0dK9R1Z gFqu7vXSkVRYytztOpWwAJW8aveY4lQwXjRK2np3Aa7nn+PUE6JCpIVeU3Dq AqgI17tcWkMF8spmeY7HCzjPOVjq/4ZB1J6fIlW2AFWGT7yI1GHYIvL9hEX3 ApgYx47eKRmGcz6diXe+LUAgx4Bm4PNhqGxqa/zevwB8RIs25+xhMDpbv8Fz dAE2e2WIWeNz5r72p0OXFhdA+8/Pey8jh+FkzJkTJRKLcEiz6sRF62HIG/BK XJReBC2N3w84Dw3DtK5ro5H8IlRvV79+33wYAkasN7SqLMKud/ahv4yH4bKJ wRBlxyJsXuK8NrV5GNL+cpwQcVqEB2/Op6wlDEOHf5pL8ONF2On14XZaDQVU EgSWz+csgt2b0cj3lRS4WhR1NyB/EfI/+Jr9K6WA7kxA6+nSRWjr6XSOfU6B dJ/92u5NiyC8fZ2QWDoFvD3+ko5QFmFgNVOf9woF3l4PeGwxugiSz05P9EZQ QDp73PDA5CLI796TWRBGgY7hrrN75xbxvYdXMTiQAnonCn4YEZgQqT4xfOUU BTgcnIpU5JmQ6J9z6pIVBZzCusyVlZhgeO3g4+nDFKhK20dVVGGC/Qkayd0C 9/9NV2KDFhM6JOdcz5pT4Ist/9V1JkxgqgYkcyE8vqDr0qKmTJD723im2YgC 1+4uVwntY8Ij7+rY+B34XtI1Ns1nyQSBpj0RoEeBjCMNthyuTHxuzU2X0qQA 0193lt2DCQYvNB+oq1PAMuHFjdVTTPB/+ZlqpkoBzs/3G5bOMmHceNQ1YxMF fA+cVZmNZMJDXSfdZjkKvPMZeztznQm8R7sblGUpIHvD0Xk6lgmB9+4/SZGm wNcP5nfGEpmg/D4gOFGSAtv3yv/rf8QEk5qYcKIoBbSftMa8z2YCV2//gQZh CmisBgiXPGNC6lE+8WghCshXvVG+VsKEuaw1T7QEKCAl7Ft2uoIJ6xI/ua/j p4DYGRFju5dMWNI9rMi1lgJrNuF628gEaXb5HHZeCnBd5fsl3MwE21MbvNau oQDbQIXXSgsTivlM1BR5KEBP4Yro6GACKXTqtT+ZAjNzheSaLiY8jx66mU2i wLiFXfKTPiYEHO90oXJRoJ8rLy9okAla+cqSlzkp0Od6eJsLlQlBdpVs/Rx4 vHXM1+bjTDiucWdmF3ab5COzbdNMuHXQhFpOxPMVZN4pRWPCYz99iiZ2w9dZ Ry46E2pHRsbLCRSo0Ugb/7PIBJFHJcxd2OVxJue+LePfV14S7GenQNHo5ErT KhPa0kV1LmPnmyTHvCCygFB7xFUd+2nGDuEUEgtud86nUtnwei8Np19awwKz Tv2f2dj3bW8qn+JnwXFjm81nsZNKtcsshVmwfmtgpCn2zbX9RobrWDDg/Iqq iB3lfb1FcT0LOsVMrfixI9+pW/HLsmB6u+InAna4fE8/U54F3bvdLdmwgyIi vChKLPi+j3OYhO3/XWn+owoLGAvslySwvXU/X6zQYEHrjf1KOtjuScHkTC0W VA639tljO83IJsfosmDS3yUlDvvovhbpAAMWXDWiOr3FtsrxzztuzIIXU4pa ZDxeC4LEtj0mLPhaMc1vi23m1Phaw5QFPX6LiwXYJjWnzMT3scD0yt8Jfjyf hmJCnewWLHhMfzYShq0bUOM4dYQFz9yyJ2ext7S7jnfZsKCY6ybzLF4fxaiy lVxHFrC1nFRPwOspRzkek3iCBQpHT1lp4PWXNOYQDjvJgna2C5d7sNcuWCtb nGaBq1rk7904fsiWK6V6Z1kQ9c9UbQ2OL0JhttGGQDz+mLIzP7AXTy5Y0sNZ kKxcz56G43GuMaO//zILvMPHLWJwvE5L7/V6f40Fjlyf0i/jeB7svncx7SYL TkteNrqN4/3Dnu156CEL3M3f+mzE+RPyPkLjUhZu772QYoQIBZTN35a/fsqC nxD8cBjnW9SBQ40GBSzgOrJQ/0WcArutTn7XrsPznXuu2ADnL70r3+VcEwvK s05tncP5/cSWNlryjgX1k1vdK+Tx89uHzWt8ZoFysWGfkxKOX5dE3s2DLLAX a39npIHXm9KT5EllQfQBgyeWW3A9cJeSyBlnwYdaa/lzWhSI8MxVVJhlQek5 ZbZeXbwefq+NpQlLcK2q7+9mXM+qwib8BTcuwT1T94klawp4rGgsHlJeAqGT QT9b7HC+Xzp/MV5tCZbPOe1/bE+B81dWY9foLOH993RisAsFtGJFn3CaLoF6 KJx+7kuBwpSd3SzPJWB/m1auE43jSzz6uL7vEiTs+Lf8Mo4CfGltQ0H+S9DB FL9lHo/rW7rdzHzIEmwb94iIu4vr69PTpJnYJZDjSddPfkqB7JLU7ZTnS9A7 rtz46i2O5+XjKn1FS5AnyRfyvAXHzx6Z9e1lS+Adfbr9SRsFXvU9/vuydgnW 7CEeKOmiQOfq8/rEj0tgsd5+M4xQgN2ibs/OqSVo3f7OTIE8DI6TlCNZKsug rVJtPYf3R3ntbJMUjWVQbFpt4bMfhvGLnttuai3DCy0/Fy3nYTgvOC0SYrAM ZRIbx1JODcMNfUbvoX3LkEAh9rZFDMPLKJLT6qlleHVuAcbz8f6uoObt9GwZ BIip2bXcVEhIumH7rGAZlpoOyIYIUIGHMGVCL1kG13Wf043XUYFt6Nn6uJpl mFsQjJ/YSIXpjE2fKj4uA0+WalglwucXSYUtfDPLINWZ6q4USoXzQpILtVp/ QVRuzkOVToWv7OQrEq/+gpkh4a0wcRRmClKdDjf8hSRj+8GpNaPAba+6I/rt X+g+d/vVR5FRQKUWdHrbXwgYv5r0WGkUCl3venT0/wX/D8/ePt83CjfeyO+P Xv0LgatVzzfeGYXd141EGCYrYDFbdDZAbQwqyOdyOj6swEHfvcUh/uOgJirg 7dr8D768m2hwJE7Bn/gFkW09q1Cxi7v57N/foBAdrXnGmw3d1wk6/c+NBhT7 H99NxtjQ9oeOuZZls2A20smq8GNHg7UXEu8vz8FF1fiwIn92FJ0vc52TbR5K z5qt5AWwo8oE92tnOOZh/b9XbA+D2FHte6dUA755mBHLIV2JYEeiXDffvZCZ hztmIaIW8eyo+4TEtX9oHgafS20dLWBHeWnGYyZX50F0rqd0oIgdLW2oubI/ eh726SdqfythR22fj7QdvjEPZW859dsq2NFHM6LzkeR5iOqfMS59zY7I9/z0 VJ7Mgxp/44GIT+xotqPRU79pHkICTnqJ/WZHam3vJSpW5iFm/4ynwR/8OSWo +QE7He5tDPZ0mmVHDOZetQhOOlT2xHjkMNiR9t9Psrp8dJg3eOGu+48dKTkw LQKk6OBHnHex5SegHgEZNwkDOrjduXwsZSsBsXU3yAgE0CHgNPexmm0ElFHm teIVSIcrpklHf+kQUJca757XIXTIYj6xUzIgoLo0d66j+P70y+G9TaUJAa3q nRCxvUmHo4prLXusCIghlBAdkE0Hi8oH+8SCCGiE/MNAtosOXvOuq6IhBKQp t7ayFN/nrm5RKRcNJSAlYdbyzm/4PpdfLS0aQUCJoUyK1S86yGd204SjCGhQ PG159zgdFqL57wmmEJDvHweb48t0EGju2S94n4A+RGz8k79CB1VCBptgGn6e 6oc7F1bp4BKu5i2QQUBmtDLey/i+2epvbsSfQ0DdL9g2uOB7Q8axq8O8lfj3 B13Cj8j8d2/Yd5+3moCMi1O0HeQY0NkpeJC3hoCOOb275yrPALJFVuWaOjwf MUYOrkoMCDB5HcvzjoB+yeW0qmswwFR1UZPcQ0Bv9lwtnzdkgItXHZXUR0Au BQc6qo0ZEJZ9PZX0nYCsOUpvXUAMKJYVIZJ+EdDR3MSp3/g+LimytYdzlIBK zE8oP97HgJm/3uHEBQKKrb5gr2/HgGNH929mLRKQm+Su30VHGfC2TLVnhkVA pZTdZgr2DEj1ntb8vkJAQ+ZWtisODNjdd3q4mJOIxtKUP0e4MvC9yn+fkygR 9Q/YKFb5MoCL/8ii1Toiorec3jp1mgH+3lufmksQ0fK7dZzrz+DxbJhb0ZYm Ig3160S/swyYiz9XskaRiMYjHVyGAhlg5h0k/lKbiJ5zfn+zcpEBZc22zYW6 RLTt3j+HmQgGyGzQC3iqT0QNN4Uav19iwHzv4sfbhkTk+cFnKicSz/+eC5c8 dhORvWdIJ+91BnA/OqbmYEpE2WsT239gn/+7/dsRMyKKff/uXk4UA8zLlrSM DhBRe6FPimYMA+hy4aPC1kT0pyzPkv8GA5zDHZK5bYnoy7UHba+wW3sN0aod EVHLe8Q9bjIgM34ldfI4EVl/jlJ5cYsBPJP9poOORJTSrzNrFo/721M33+1M ROTERzeHsPf9jTjY6EZEMicsdnMlMKDCznmp8iQR8ZMmTiRhy5VB7gtPIhpx nbeVTGTAwik29vs+RFRpp9MqncSAR72R5X7niOh+6PHJuWQGjDZvGYgPJCJh D81KD3xPVSsf4C4KJiIG8d3TbuzKBCPnP2FEFCwQNfP0LgP+RkzH8kcQEdpJ 2c+ZwoCdpx+Ua14mIq9sjw4X7DZzFrf/NSKaPBpjxX2PAUL6edoJUbh9xavW tth2SnbOxTFE9EzyRGQG9kMRrriOOCI6stvpxxA2hVBRTrtJRKLLtW5y+J6s POs2IHCbiBKoDevtsU8PCPFsTSSitbPVHP/do0s/NWofSSaizGMM2XpsZq2/ 89m7RKSe0eY3iW2cLxuXeI+I4q6mzQmkMuDq/fbyklQiOi/Y8EILuyXq4sCX B0T0IOFJxiHstYFqPHPpRJQaU/zBE9vK7Ye2UBYRjb620wzDvn8kzlnrMRF9 1OT/8t/73V+wPc7yKREdELMs/u/9r4LGeHlADl6vwaz2/94Pe0ndG0jKI6L1 WyLV/3t/XMhjylOWT0TzPy6238GeZ9K1O18QkeKEUtkNbP2xJ87zhUSkf0Ow /yJ2RLdlnHAJEflu6Dvog/3mDXvFtjIiitCWJP33vphcWjxgVUFEx8+H8+hj W2Q585yvIqKBirxj67DvxK/VufOSiC7TDi7M4vn4Fv7aubyWiBZ2yFHeY8v4 +MZ1vcbx8qlPJhXb/dj6Cno9EQUu6hSexH62t3VApAnHs/xyovp/7+d1LvDo vCWiw19oH2l4vS4I9ToHthDRBeln5qew69ii4u62ElGSuFiiDDbHH+2KijYi 0jxA1v2M4yP+YxLPQgeO/1Ryljx218udOmKdeD3dJryacXxJ5NGcdbuJqOw1 PcUN++k1i4qgb0QUmuKpkoTjcTJgZSDlBxFdbfqQLI+teeIFT1U/Hl/Pfu9C HM81Rjwui0NEVFvww6Max/uq6su4dVQiIrasSdTF3i3pVaE3ivM/IGtLMc6P zwvNPCGTRKS1L6DvLs4fkZHzOvenieiWDIvKjm3fqeBSPYPrUVvwmVO3GUAt iqxgzuHnf6FIUsX5uORl5HJhmYhqHny5FILze1+tCgpcISIDiVDZT3G4vvGJ y51dxfkccWlIGtuwdG7Ai8iB+FtRVxmuFxHLuc5H13Cg9j/N+SW4vrQfvAvW fBxIrsU9eewaA2Szrsge5udAlTkrBRLYDbsdB/YKcyBPmmZkwBUGEOOFnPXW c6CTir/6FnB9sx5cNd4mzYEcn4fFrcV+qvVbRlOWA9EGkiPkcT007X3/S0mB A73RqdKFMAbEyF10ElPlQK6VsgoHghnAWzbmyDDgQGXmp79X+DHAgbPbaNaQ A10oUq1JwvW4wK5J+rcxB2rrW1n1wfXa4u/DfqoJB1rbv/29sDcDEvZYOnbt 40AyBYej9E/i+ex75VBmz4GuJ1YN9+H9QHol8fjZUA7U7ND2LArvL2aUgy/v hXOgV+edLDt34nr3nntdXQQH2t5eIiuF96PWxMivPFc5kJRArO5jvH8FKZ01 f3qDA3V52FVd1mFAx6HDer0POZBx8i3FOLz/XXm8VtiongPnk9qVcU78vNGt /m6NHOhOt31bA5EBfb5R7bFv8Od6CqV32Rmgofcvtuc9B4pbZ+eig/frHx9/ s/l3cCDeg32VB+h00Ga0zTwe4kBLJf2dv4boMLr3RiuZgxNxJBRUFdTQwXW/ i5wiFycKkLM1V6+mQ7+FTtBOMicSjPsrml9Bhy6bgQ2hvJyoSKnO/0ExHZrc tl2YEuFEqtu4shxz6JB+6cemdkVOtNk785ZbIh2sq1SvJ+/lRDtu1bsnn6TD G6U2kLnBiTwZMltDSHTwJudwbODmQoJpb0Jy985DVdZGozeJXOiUaHv8uN8c tO8wbLYUJKGjf106+QtmIa46cNlUmIQcFC9JGOXPwl6doq07RElI591qm0/u LDRoyGcoSJDQx/lDsZ8ezULZBnIwXY6E1tZ1lz5OmYX7pC7llC0kFPrWOSvl 8iy4dfrc/HaIhMIqzLRqbWZB7nB206cjJGQUudtJymoWfrb9YjZakZDlOaLj pcOzYPvuyMl8OxIyixj9tW8/Pv++1DMOcyahUwZXzJhoFjQyiTSpMyS0RtP3 YJHaLDC9H1i5xJNQjplHwGPOWbgd+oR0KYGElLZd0BEgzoJS3PPa9CQSckYD cZfZZsHmWa3CjxQSqm69vuS1TIPSsR/zNpkkNOR29+CxWRr4ukvd2V+Mx7/O 5GVNPw0GHdO7dL+S0P2I94n3qmkQfDo7xqaLhK6eqRVwqqTB2osFhud7SCjI tT52UzkNjB6+flrynYS0F4cD3xTRIO17/3m1YRLKqNCMlc2lgbWdjKg8nYTy h2PkfVJo0HI404ZPjIzaThwMdAumgffbkTqSOBl9Kb4/VRBIAz59NWWCJBnN eezas3yOBpayL5cWpMkoRys7P8OfBj9+f80cVCSjeGuH82RvGszEcU2W6ZBR 699dhaccaZDw74BVoR4ZxRjs3Dl8nAbbApJf5W0nox6lN93O9jQIOSZ3O92I jEpM3Hhc7WhAUDbQjt5DRg9sir/GHaGBaPPpCHsbMjqxP+XoGVMaVOuXj1nb kdFWHpkOiT00sH+xdPjQMTKiPm1ye7+LBhnJ0Qq7HcmIcD12RHUnDZRdH7Wo nySjDLLlRUlDGhiudgmxB5JRwlznrttaNPgVsD58OYiM3h6Q1vDdSoPI0RMj jBAySoo6t//AFhq8+zRTNRlORrIHL28U06DBoYdkx65rZCQQ+/Ncx2YauG43 zM29g//efm/q4AYanPr9ifEzhYwOrVbkd8vRwP+R826hVDKaZ/ve0S5Lg0vc V4fC08mIn7XlxCdpGjz89mG9ZQ6e/z02NcsSNHhy67h3dB4ZzYx+TRXEzt/5 u/pVPhnVJJilqorT4OUzAdtNRWT089n+FR8xGvRcsEv4W0VGmeKF4TLCNOhX n/i1tYaMnooKX7IRogF1KFTd8xUZ6RG3PU8QpMG8eUbrlwYy+nVN6LqwAA0E JEc4cj+QUfZnDsf9fDRY1x5k9fMjGXHtlfv4hJcGMlfIjwXbyci9VteHDVt9 UhXCv5JR6Vb2Pe94aLCvJuDCkR9k9F32TPA1Mg2O+HG0RPWTUWX/n1v/SDQ4 Kp8i9mqAjDzVlPrDsT3jXpYpUcmoOP+hchQXDfyM9xMcRnG8bTBREsQOmvt5 OHGcjKSqPJ2zOGlwzZ5tZnmajNbY10R95KDBjbVJhlv/kNHNjPVBnthJTQo3 PGbJyPf0ySck7Ecqe5W/MMjo5LXel9ZEGuT96gviYpLR7u+Ep+zYxUnezTuW cHx2SbWXEmhQt3TLNecfni/5geEN2M2FsiU/2LiRkumxjgF2GrS5lqwKELlR RsHJf4+wu8R2WZhycqN73xz9vLB/tHY9DCNxI3e5u3LbsCkRHlPF3NzoacFR UQL2pBZz++gabsSM/HOgm40Gs6OxMevXcqOUgLT3L7CZaet7Dwtwo1XlO9dj sFctChSjhLhRnbxgtBc2FxHO14pwI3IJtB3A5qvqaKKJcaMs5l4bnf/+v9HH VVBJAj/f7H55eez1snTn4+u5kban5zZhbPnO64UJ0tzo4WJRDBlbJXrdSrMs N/ojrCNPwN6649n+5Q3c6P//z/k/WZxl5Q== "]]}, {Hue[0.37820393249936934`, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk4lN/bAHDMYAhZkhSyZEkSRchyn2SJpFKihFIiyVaoLEW21Ff2SlnK GmVfE0mUJKmEQgZjTTJjZswQ3vP74/UH1+d6PHPOc8597nOfBzkXbxtXLg4O jnT87X8/Ca/5O0e1fY1qH/7viwqKU436MkmH4PEOF5VH2IulO879SHQGZk9G dyZ2GRO+ixS7QWqzRUY+9tg6d1Z1ojcYmp+ILMe+K9kmWFx/GfL6X99uws5T OZXJURwI2Rs8i75gN+nMaRzNCgLhuv3TY9g/zSKacxNvgECagdny/9pTFVAN bg4D2kvV1xJpVIje2eOXW38L4g1px7Sx1+3Jqu+sjAR03ov3OPaTvR5E1oto 4Hwc0HMNW91C66Bc/m2od//1Jgu7/vBKimXWHXC45v+hHfu7c6JyeuI92Nl+ Sk3lEX6eXeq6o63xYCSuF+2AHaiTNBDYnAC6L08tJ2ATwVHxSX0S3Ktw20N6 TIV24+YP2rXJIKL1imM/doKZsld7ZQo4uO0cjsWWsaZWz7+4Dzy9u/5KplOB cuS4Q0zhAzD1EJQ6j11kW78qlf8Q3jjlnqnC1nWM3G+W9QimmsK1HTOoYOMp +fNBYia0uRnQv2RSQUAXXqeaZ8E/pmf/7iwqzNX5igy3ZsHenIHeDOzqhp4q /+YnYNPmI3T1CRX2tWatZNRnQ2DTibOHsqmgZP7t8JReDszm3hnrwOb/wJ29 qzYHAjhjrh7MoUJXh4d5W2UuXN3q2GmXSwXHbq146ot86NJYq5yQTwV03G1E X60A1gWaSisXUGFL30OtqMICUDswKNOEPd2/0rcx/xnQ/mrtXXqGx2+0Tc4k qwiCjd/PpDzH40M7VZGaWAKUZFXFU+VU+E88zaBJsBQC7w2gXRVU+FoWuVnb phSCXniQBSup4DB9akymvxQIohJ5n6qo4OWwxpc2UwZzAn7KgXVUSDZ0j3ko XAkewec++7yhwo8fRy8K2VZCgU1V9I1mPP4BYH3rYSXY7gp9kfCWCvnF69dd kq8C0hs1/aZWKrzc3JqJtKphRe+bplk7FYY45Wsm7GrhrmeIKP0bfr4MwbRT j2vBmiDWr/udCu572MFfyLWQFfOCcbOHCjS/LuP6C3XwX+J5yU0/cHxQQjvj gl6C1wTfWMAvKqi+6x/TznwFzfqSne1TVNBvteQ3vtwEec27ad1cNBDuzvus k9QEnAmE5LNEGlBGuFK2VzRBz4ZLv+jcNIjjqN8sOd8EPLcIrpv5aDCiv017 zu8NWLKYq0lraRBTvuZ0hl8zWJlfvM+WokFPZkfVom8LcDTd+5OnRwOf69Zn KnzaQLbbO5B4nQaWXgYFpPg2uPLW+5JsMA0UXFT/Opa0Qahk3SmjUHy/BU8I abYN+DbdkboZTgNDycYHjhc/QFD4oZ6Nd2jAX7u9i/d8O9Sq0r8WPqZBLkMA Tjl0wOWzSr5yb2hwqdY1jkuhC/5NT15pFZqH7kkLvnyXbjgRzM9SeDcPsTuY HNUn+uC/Yf6olQA6XA+02Dbu0QdjJVu0adfocOH1Y9v1wX1gJSKtMBZMh/2H 9hUGZPRBSDFHQVs4HXi944/qjPaBqwr7Y2QcHSKKVfNqPX8Ao9deozuXDqHb nQ/U3/gJiR9SJTK/0cF3W1tKU+4AtI6WVA2oMoDiSrmZVT0AGX9Hgy5tZ8Dx LA7Pm+8H4DZr5tS/HQzYI65njKYGINc913GdNgO4Vp/NvlYbhFeT4oNqwIDE r3fMX1cMQs7enfQlGwaUXzvEbnjzC3jnPgzMX2XAlsqLlPSvv6AjiCcQghiQ Ohv9OWT0F1gcD82KCWHA9bNNuYbcQ3CIphovFs4A44OaNg37h6BG2MBzzR0G fJMVK3r1eQiufknxvPGYAYtnLxYPepEhNfh1uUMDA06LzF99FUAGHorx3R2v GdDaeH3fo1Ay7NTf1c3xhgHxkrF99nFkKDub+PRRCwOUPxdwdb8gw/ttpuSy jww4tmf8ePsMGfyUrGWcfjDg5cQluWd0MoSwbp/l7WfA5hTG7+h/ZNh+kW/s xQADpv8Sw0wFhsFMLTWeNsSAsFyFoqZtw/Al45XWyXEGFAufWa32GIZSdsra LBoD1jVOfkjxG4aVazXFm+gMuHbRJ/nK9WGoq9c9mcxggMm7G1t3xg7DVqHq 9mAWA/qDMo6+eDYMQvUFTVtXGECa6M/PnhwGntKtYVQSE7ySz/qFzw3Dczej OAN+Jnzb+9vgDGsYgkP2X49Yw4SMx4tfZEgj8DHJkMIvxARtG8l/D5VH4PBf 8wqqKBNcGo4fjj8/Ap8O1IxukWLCzuoNopLeI6D2cIPQMWkmcJX8/PYkcASq 7gvb35BhwtMsJ7uKmBHoj8k2bJdlwsit8049hSOgddiKrqHIhPJgFVnnihGY rzZqQkpMCPefHp6oH4FbCX8SrJSZIO/m5cruGAG9U2Q9+624fcsAT6m/I0B9 lmEC23H7+3TVcxdGQDljYFxdHbdvsPh3O8coxA9zBmzcgdvfHnoZREahVnjC ekwDty8cdd1l1ygUxVvet9DC7fPtN/itPwpXFLutNmjj9rn4Vy6bjMLX7SG9 I9jy9P/CIm1H4f3xR6cv6uD2e1NiCgJHwd//H9ViD26/y85S8+YomPTbcSxg c32QFHgZMwpPeWU/Zerj9l+m3/v4cBTcD1NTKQZM8KtwPnLs6SgsT4TH3TRk gvFzObHBwlEY2Jeot8EI9y89N3W2fhQev/TM3AO4f6lu9oEtoyBzmnKsFTv8 3taNHJ9G4dz4zooDCPcv7EW6yK9RuNA65HxgL+7fuaocLQ4K3IL9muv34f45 Bp5vIFGgPVxpLASb67ieipkIBfK+XNg+jP3UvKHITp4C5BEj3zQT3D904xJZ lQIipBm3OWxjvb07LuyigCG39tReU9w/1dby6yYU8NDgDu/FLleIvkI4SIHS uE/Jm8xw/6Qsdt+1pQC3WqWKA7aN+BrWOicKiN1x1U/Flhf6VJd+ngL3WInt Hdg0nntBSt4UuBRH+7aC3bx62LAkkALiOmCrZs6ERJboqs5NCkSX6lrZYp+l djc1xVAg4l529TXs09fj7Wrj8fWRRw/uY58iWM2WPKCAJmPmRhn2ibu8kflZ FPh4/IvHe+zj4m83ZRZQ4KFVtN0PbJuM0PLUUgpwdh82mcA+pLzHIq6WApU5 l3dQsa1KGUORTRRo26knsYC9X68sIKSNAj9LZ9ksbNNmT0H/LgqoiI59Z2Ib H1DJ8eyjQK6A77M5bKPu0T3nyBSc/3/7jWPrO2Z+cZikwFhoiUYftu74Sfej cxQoMpYZbsXW8l6/asmiQLX+o/ASbE3WlxRjjjGwFIgTS8FWD/tPbQ9pDB4o uiQGYKvyW7zVFB6Dlx+ilo9iKycRT27dMAbPBL2PbsfeItU0Jys7Bjv7ExK5 sGVzg6I3qIzBFO1C3Tc83tLqOjLCGmMgNuv/Lgt7Yw2tkld3DOKRbu0FbLEP F0aY5mNwZc3yvr94voVtFK/NHsKf/0aivwhboJ+8dtxuDCKsJY+cw+b5Y2f4 3W0MjJTUuttw/HAFiHV3eI/B2c4rv65gr650erQEjoH1GrFmKWyWsNmDiugx 2CwwvfY0jkf6Q84dRffG4GTUtcAlYyZQ5Rtan94fg0hugYpE7GktrfmE/DHw +in6pBLH+0TD39u3S8bALHD5MGBTzIpkw2rG4GFh7+dWvD4G7eWtfd6PgQPp svY7vH5+Dg9S3D6PgRtql0TYPR4Pg5x7x+D8dsO2Krz+uoKFn1lPjEGqemdo Ml6fzVkrhO284/AyfmznZryeG7e+TNuydhyqjc33B+L1Xl/uryklMQ4/lQdl PuoxobJlxmmN8jjscA9dc16XCfmTP+umzMZh6q/bO3ecT+5q1HjnRY3D+bjG 2Sycr9p39o77x41DmGD/0Tqcz0jaC46mqeMQuGyb+kmNCRF6OlaU3HHobblc OqXKhCDjGhX51nFw5g1RnMP50uNYzXA6YQLGNTpuauN8W3C81/7Smgk4SdG5 uAbn43H7hc8GYhPAcZmqMriJCWccdRr75ScArRyWuiLJBPvzNWmSxhOwqFHy 3XsdE8yv1hxNuTkBUbs26GTw4fav97afi5kAi8oWeU28fzQHL+zVip+AjC1x /a95cHyH6Wh8y5yA8gtXKroITNgdWyMg8noC6qJtmK+X8f79uKb17vIESLAd s7vn8P7fVKMTcX0SjFq3Gvd8Y0ChoGjecvgk/DfUOF/zhQE2Dp7rAu9Mgt/D fRXJnxmQzZSlXng8Cc0cJx0B77cm22MLDzVOwtXsJ24nmhkQlXZKehPXFHQO TVZllTCA35+TUH57Cs72C7jejML1RLOD77bEKbA/3tDTcosBJ4Wrh3LSpkD8 TqcHMYwBRUUer+4XTcEhlsjKFVxfWI188w/5NAXGDPPZTT4MiDuUN7lfZBqe fGqeC7NngIjqgc6hB9MgslYjsEaRAeO8mSJtWdNwlSXc8kge7/9jtGOlBdMg etOQHbSZAeeepPXfrJ2Gg79/y2lIMqB2w/SkXN80/MrKTnITYIAT723COYnf 4KK/aLiORofnlHe6kym/oeVT5wvvl7heyzTOnkucgZCGr6tJQIfotq7B8Ecz wBIae6OsT4d3VKcN4jkzICy2AdXspoOpSdB/elUzkFfRFfxhOx2MpyoCw3tn wLnDyKp+Ex0MdilarZP6Aw1tR9k9zHnQeM/L0Mn9A8vfu0y5C+dB4m+H2Y2a WVD1OHGWwD0Pae9fchIuzMG9I/YHG/B5zUB676rsOSpYXHi2YLNtDraRhSkh V2jQ0XbNtl7yD7woEHWv8puHz/yTMr9kpiH4l+O3bVF0EH5bELBDagLo5obp rrF06I0pEhMQmQDPMim3TFx3rthvH5/lngCHiP5F0ft0GFTed+z933HYo3pC fjEfP8elZ94tb8eB7X/Mt+0DHXwEYi+wPMchQPDAWldBBkjv3RZ4t2UMfA10 D2QkM8DH8l/MtVgKcHgl37j3AM9rWIvo5zAKxGXOVdzEdWDKx5m1atcoUMj1 TOpsDgMedsnf/OdGgZE2yVnlSgZ82WnKXjClwDHbpfgyHKeiu7eZOBMosNur sacF10FkRVKJdMQotGRuXFO9ngklcpsLvIJHweZLAORvZMJmstXE+yuj4KW1 o+C2PK6rVLIOJ7mOQv5i5jXrnUwQ9M26Hmc+Chuiw6T6juB9aIe63ybBUVjM NHH5HY/3hbW9jbUZI2C0YJiomcKENbTxpXv3RyDMWqc58CETx3tkh2/8CJCW t8oTn+J97dztfbbhIyB+cu2IVAUTJKIUTR7jOk1j3c8z1t+ZILOxwlJDcwQu X/yWkPyDCSam3/sqVEegurnjzc9BJrwaOOFivGUEDH1fy7mN432DY+PNmxIj YNmZM3xjAffHTCY+bGUYXGO8z5RJLkDp5c3bH3cOQ8GQe8KC9AKsu59u8LVt GGZ2u7wxlF+A/PF/OWJvh8Fv7Jhcu+oC3NM9kFpbMww3jfcMj+gvwMo5lHjn yTCk/SOeWee0AJYb30ScDByGLp+004FPF+BpnlhDI66LVeOFl67kLcCjazd/ lysPw62SqBS/wgWoSnsYUaYwDLtn/dovlS9AT+xWYuemYUi/eEDrXPMC0NLM kyNwne1x/h/vkZEFyCLI1k7/JUNLpN9T6/EFOPKzfG00rtulcycNrKYX4LnT GYL6FBm6Rrt9zWkLcHJKr/3RCBl0zrzoN+RiwVpvovzCdzIQTzmVqMqzoMtD 06ikkQxOQd0WKkosKDDrT2LWk6EmzZKiqMoCe1X94v11ZPD4sVtSbicLWDn8 ewQryfDl+NpbEsYsOJrkPS1RSAbVgEhpcTMWvCm797QqnwwRKUs1opYsONh2 XMMplwy63RMzgjYsiHiV1/05iwwZR5qOE11Y8OHUzBXtB2Rg+eymcp5nwTs5 +bWqqWSwiX9+Z/UCCwI/PP9vazIZuD8/aFr0ZYEX30Uji3gyeFr5qlLDWFA9 qPVozW0yvLs40TIbyYKphcUIu2gybL7j6DxzmwXcziHOxZFk+PrBInkigQWl moYzweFk0DOXXxl8wgKPfpvb6cFk0Mpuj3mfywL1Xo+f5kFkUF/1Eyt7hu9v 4a37d40M8jVvVSLKWCAbS5WPCiSDlJhnxaUqFuyr1is9ic9d673XGdnVscAz cLlTz58Ma5Rdj6q+YQF7PL5F4jI+l90S/CXWiu+flkhf70cGjqEq9+U2Fs4L t/llfclAT+UJ7epiAdFHP9/GmwyztGLSy24WHKj42xuEz3mT1nZJ2X34+V9c ySq5RIZBnoKCADILamKuLe32JEOfy+FdpyksUAtSuRd7ET9vI6vBYpIFfGY8 DZMeZOjY+GT/rhkWFG1OiTyC/S7A4pvUHAsMqq2nWi6Qoekr1ZGHjudzR86k MfZL9bTJvwssCFVeufXRnQyVscaXfyyxgFz2qt4Ju2R8erl5lQWzdjrx/9zI UGicFPOcwAYeyQbOXOycDH2xVF42gEeysD12xuJo+o01bBDcvfRKHPvB8bsq F9ayQXlAiffXeTIklmtV2IixwVDT5G8p9l2hQUMDCTYMhwb6x2FHeUS2KW5i g8OtgYcB2GHvth9du5kNib5Rpy5gB8v3DLLk2UCg3mg4jx0QGuo+osSGXOmP r7ywfX4qzX9UZcNS9JmTYdgeuz+HVKmzQUhbKzUD+1xiIClzJxtCM7b5vMN2 mt2cFLObDffLlSdZ2PaWbdJ+e9jg3b26rI37fzTPp8DBiA2kgfCyEGxrLsld psZsuLU+kKsLe7/TmwZ1MzZYm6XNqeHxMn55Yf8GSzacz34SlIxtsF70G6c1 G5L79bJ58Hjv9nvp+PsIG16L8rrdwtbodJnstmUDGs15x4/nSzGqYjnfkQ1E gVQ7PTy/siMOMQln2BA5w4gmY280IooFubKhMhBsEnE8CDGPqVhfYsOOD5bl 4jh+SDbL5Tq+bJAd6DabwOYqzjWU82eDutYPv7c43hZcmTb0YDbw3rsV9wjH I+1NxuDgTTx+lS+C7+N4nZE2d38fwQan8ydX03E8k7/fD0m7y4Y20fHGdhzv H0z1CtBjNuzvSxbMvk6Gq+9D1W9kscG+USZeGK8vFYuWyoYcNsQZ2ofEhuD5 tDr0Zs8LNqhy6CRm3ySDyVHXn1qNbIgQTw/ywOuX3l14+nIzGxj3/m7Vx+s7 +/jceNk73L+H13dvuIP7fzJoXv0zG6IsZM8uxOH4PZ0gsJXMhtl7rj0W9/F8 j/QkulHYcGHgtnHIQ5wPzklJ5k2yQVfq1vKrR2QIdctXVKDi6xaudmdwPjLw ajCS5loEk+rLpwxxPqsJmvIR2bIIF9VFElETGc4vqy8cUlmEcs3Grzpv8Xq/ cSUkTm0R3ke37NF/R4Yr4au312gvwhzvRf/zHWTYeVs8m9tsESyibhhb/yBD cere72y3RXgS6Bh2moHja0O0g67nIiz2ZrRtYJNBMK1jOMBnEVz3mRMH/+H8 lm43O391EahnIyxvE/H+kXOJd/b2IpAdDJ/7rBuG3LKHeiNFi/DVydMzcDfe H5YcVPtKFiH2gEVi1p5h0DCV2dRZsQjja87//mY0DK/6nv6rq18Eff3IrSfM h+HbatHrhI+LoKKT7DdoPwyc1o2me38vwvKXTJ72kGFwnB45kqW6BKn8i8sS n4dBXivXOFV9Cfzaf++52T0MkyFuu+7uXAJ50wo12o9huCIys+7qniWwn+mX mqcMwx1dRu8hyyVA+jGl7kvDUBfF67R6YQk83zkmyeD9WlxBzcPp2RJcdRbf khQ3AvGJd44/e7EEX+NsvKpTRoCf67cxvQy3L3PWlfJ4BDiGn22KfbkEDSEn jE4XjcBMhvKnqo9L8E9/srenbQRaNipoCM4uAc3R42Id9yhcEd3IrN/5D7aK mG2RjR6Fr5ykcMlX/yCpIPpDVR4FZl88dDrc9A+Y6rqCm/C5me/kNv3oln9w PkS2MKaOAqjcmk7v+Ac/nf90BHdQoNgl5XzXILaidvN7GgXuvJU/EL36D4aM OMvJaAxMIg3XMYyX4cSMp8/QyBhUkS7ndX1Yhi9flB9zGkyAmriwh0vrCizz TeQp/puCv3HMdbt6VqFRgcPBUP0PKERH7/D24EAGh2nVHRvnYORk/0/jCQ50 ITXVXDyWCvvHvrGrvDjRHtJTlucCDUK2xQWV+HAiGREdbfd/NCj33b9c4MeJ apeN75/mnIdNK684HgdwovpdTY3718zD7Po83vBQTnRzE9depsw8JO+/Km4d x4ku+AdYvjWdB3KRlOb4C050KGlv79qEeRCn9ZQPlXAilkZ9+bOUebDUTdD6 UcaJ5rlaj6C0eaho4dbtqOJE7QZbP5/NnoeowVmj8gZO5LBgc/VW1TyorX1j FfqJE90957VB4cc8XPVzdV//hxMZBfhOdUnTIebArNuev5xIeB2lwE6eDve3 BLo5UTmRmY2nzk8lOlT3xJzPY3AiboGIqq876DC/5/m53Suc6MeHE8Pxe+ng RZg/fXwtF1IYqT4H5+hwNvnmiVRNLmS1apJ0JI8Ofpf4TrzcxYV+rCcXWhXS Idws0f6XNhdKrcjR21dMhyxWtp3SHi4kb7S2Qr6aDr9OvbetNuZC65VOfCts pYO9opBNz1EutGJC+jg4Sgfr6keW6wO40MvX0PRaigHu8y6r4le50AZpNb4Z fD66paFaKX4dtx8guWWdAj4fFdZKi4dyobbTp9vttjJAPvP7nFgUFyru8yp/ rs0AZvTa+yKpXMhTQfzTnYMMyDhxa1SgmguJuR6hrb+O70+1fCBQy4XK39tK 1Acz4Ns3kYMCL7lQ8PbvUydvMIBknVW9ppEL+VK/J/0XwQA/44bb/O+4kL3f B0pjHAPMti3sIPVwIRVj0a7DTxkw+88jmMDkQmU8Y47b3zHghP2BrewFLkSj 2Z3Rb2NAS8W2nlk2F+I5/UXVtB2fIzxmdvxc5kKX5wuErDrxebXv0mgpNwEd tIkUVe5hwKMKH0sncQKaUF0dEBljAM/aIwtHJQhIdaFacWAcn1s8NHMsJAlI IeU/zaeTuD9ytGUtaQLq1vNIlJthAC3uctkaRQLyex119Q+NAfs9AjbUaRHQ Ddtsct0qAypaj7cW7yYgq+RDTogT1/1yOn45ugT0Kl8nq5mLCfO9Cx/vGRBQ REKc70tufC4xvXbjvAkBLdxePhy4hgl02eBxsWME5G4gY6qEzzXOwaeS+I4T 0O2N0coXJJjQ3muAVu0IiGeD2bf8DUzIjFt+OO1AQBr592M2bGKC5b/Qg2/O ElCkjszV95uZ8KQ3rNLrMgGpvTCjOKgwYbxVYyjOn4CeF2iI+m5lglrlEF9J IAH9vVFmG6bKhOp4Q+e/QQT0dK+AXJIaEzos2Hw+EfjzkMtokAYTRHULtOKj CMggXrLvgiYT7JTsnEtjCAi2SE3b4HPVCFdV5dxdAlLsNfZYr8UEVr2Ps28K AYmYrrBddJhgVLg5NuE+AQ3pfF3YqsuEWw86K8seEpDDxOKmGWwhfzV+Wjoe n+JdA2f2MOHo2X4t0SwCWo5svS6uz4QHR2Kddz7F45lSYtKCraA+WemXh33v g7OYIRPcpe4PJRYQ0G7F3IoK7GJ+M/6KQgLSM9XQPWSEz1ET2c7zxQRE+TLW FwhMsM5y5r9SQ0Cbwsey7u1lQnKckHZyHQEVW2k85TNmwo/gBufKegJye/51 KBT73IlNVfTXBKS17dh6h31MeGbePrSumYDWb3QQbcae1b7Gr91CQCQ9viNb TJhwTbTX2b8Nt/d15PFP7EaOqNiUdgLK+u30Qt2UCcS/WlVVHQSkdFGBNxTb YnB06HsnAekcHCtqw477mMjP7CIg7kdO6UJmTOiu26u9/hsBFblbDx7CliyY c979nYAyvl69dBfbKTUz9ngvAckt5R1qwc6JsK4K+IHb482PXMCe9lseSu0n IGkZKxElcybsOPOcv2aQgKJcvOiHsK8cctDuHSIgAfq0hj/2S0P+0wvDBBQ4 nd32v/efq9vqYiUoBOR19GbD/97vmmx0r9IZJ6CGHZ4iH7BjSRJku0kCSvOx f9eP/ZnZyn91moD66Ht+TWGvG8PHphkcH1FCDvPYJ78pnK6dJaCdPV+N/vc+ N/PN19i+OQIaDbp753+mlIRVsWgE5D9nso/+v/etGRrkDQwCSrnL7/4b2/vu EL/eAu5/5NzSIHbl9TjtE2wC2jotxNmBvehuePraEgFtzAq/VoVtWa+K/JcJ aE9Y04nH2I8EN8j6rhLQ5V5J8xvYM87cHJc4ieh37ZF9TtgG5bQhdwIRDf9S P6yHfZdIfn2Om4huZQd5C2MPHv+UeZqXiJpXubNH8fiGLuU7268hoiJvaetQ 7M6DKXBMkIjOBdl/MMXenBW++fBaIvLg336aD7vJxHHIXIyI5NYoTUbg+Ra5 b/l6nzgRZYuKDxpgu0zpZIIEEd1p2cn4398DCHGizjqbiMjJvjr1IPYx8qrR LmkiMlYkbGHi+MvZ+Udmx2Yi+nnJaiAN26z3/S8lBSLynmj73ofjN3VrVaO8 IhEZCq1u9MOeCHqaIaNMROn3dZJ4sWNkQ5zWb8PPT+/foozXQ5+fh5HodiK6 EXLeuAwxYWurnYzQDiIS+6TxSAe7/cLOX9y7iOjwwgSPHl5PAhUTjow9RPSQ acu1Fq+/U9zfDakGRDQka6AdZMCEF3bN0n+MiIg+crNyFK9f63+PBynG+Hox I+sZXu/xpjaO3ZZE5B86782H8wH5Phh2WRFRGVPaxB7nD81pNekOayJqPPk4 IHs3E9ddvINvbYjIRLZzVV0bx1ffq1MVJ4lozS4rykacj86pFhqUnCKilmzT GSucr6qC70sVORFR0pMTrv/LZ8fl/AaeuhDR+jjfyk/qOL94KJ9K9CAio3NX +PdvY4L0coKD73UimknIaUpRYML+kYN194OJ6JEXef6aPF4v7/kkGkOJSHH5 rspJOTweCWFf+W/h8RQNyBbC+TdAydci5w6Oj6ebDfdvZELXocM6vY+JiNNo gM0hzIQlLYGU5Qwi4l3u+pEnxASljW00hSdEpLyPQNsvyIRgXML55BKRFNnx Rxg/Hv9rOxT5i4kocK3P5DsiE8KfCokZviaiqqlY3ScsBryIbvc5+4aIFATO HBJYYECfZ1Tn7bdEZG0r8+MygwHqOiu3e97j/lRePaaL96/+j384fLrw+Aen 2d7/zQAtRsfs02Ecv66OlNJBBoyb32knEbmRe8899qXXDHA5cFpWkYcbvWev nrrawIBBa+2AvSRu5LlO4/ONegZ02w7JXRfgRlNCZX8jaxjQfHbXtd/ruFHp BDXeu4QB6Tf6lTsVuZGy0tDP+gwGHKvZFplkzo02yz81tg1iwFulDpC5w41S i5y9r25ngGXckOX6/7iRpenOq2LbGNDFoNkK3eNG1QaDg89VGPCrRdJzJZEb sTssO3/i+oXl4vbgVxo3cj2d80xhIwPUMrmoGYXcqMcgIdSThwGpEnpPN7dz I9Mnnn70QTp4kPKIcnw8yHSjsFPxbTrUZG0xfJvAg+R2rZmK+zgPnfoGrTYi vGilcq4gE9efsbX+S2ZivKj68vjIeql5MNcu0dQX50Vhc56W9yTnoUldPkNB khd9cBIsubUO15typEC6LC96LOOoEsQ/Dw94u1VSNXjRSL5gdj6TBme/Xbz7 4xAvaj4iHS/QRQPZw7nNn47wotzxz8kln2gw0PGL9eYoL9qw4KR67CMNjr87 4lpox4saK/6KPX1Hg/11OkZBzrzo+UGPXUcaaKCeSZiT8uZFFYwmjdVCGrA8 Hh09HceL4ofSRIqjaXDvejbvjXhelHExa+fJSBooxRbVpyfyIp0O/VTSLRrY PqtX6E/Fv+/zeadnKK7PJ/rnbTN5UcIt8uZD/jTwPCeVfKCUF1n/cCmLOksD smN69+6vvKhndvu2b3tpEHgpN8a2mxe90Tk59wloIBTywuBKDy9i6vY6fjSk geHjhpyyn7woqMXfsFOPBmk/B6+ojfKilLG9p+maNDhmJyMuT+dFcYVhxS3y NGg7nGkruJ6Ejunwucbw0MCjZayRdwMJDQlGEBaJNBDUVVPh2khCj7zfGHgR aGCzuW6RKU1CKySraCcOGvT/+ZpJViShjI+nyp0WqTAbyzNdoU1CRokKhKFZ KsSvWB0t1iGh6VwtjaA/VNjll/SqQI+Ejr5PF984Q4WrJ2TvpRuSUPb0OeHT U1TgUtmjFW1KQi3TQQwBChXEWy+FnrTF10/8/vv7BxVqdSsnjtnh/rHoHpV9 VDj5fPHwoRMkdHrep/ZGLxUykqIVTBxJKEeovUvmOxVUXJ60bXclIaueENkb XVQwWO0W5fQnocCa+aAP76nwy29T8FIACSktfP/4+h0VwsbPjDGuktCfumJi XSsV3n2arZkOJiHe1XO7K99S4dBjkmN3BAlt8F159ek1FVz0DPLzk0mIeezu 2bhaKlz484kxkEpC4XtSHqXVUMHnibOJ6EMS0vOPv1NYTYUbfLeGg9NJSFJK 8+H3Sio8/vFhk00eCQ3opCXal1Eh+z8Hj+gCEqpKGiwLL6VC4d4/ta8KSaj7 qlxyaQkV6p4JH1cuIaGX7s15EsVU6LlmF/+vhoT4Dr5VEiuiwuD2qV+aL/H4 xMbddCikAmX4+na3VyRU0fs3L/8ZFeYtMtq/NJGQ+mCn44ECKghvHCPmfyAh izNbE5pyqSDRGXB04CMJ1biwPZWxZcJJT0U6SUh+9zXpxBwqbJ/eBsFfSegH WYHjcjYVLF/6XTvST0I9AhIUlydUOOJFbIsaJKEHmmEhk1lUsJdPXf9qiIQu xO2m+WK7xdZVKFFIKCLHySc+kwpeRge4To3j+dihEaSIHUAbOJwwSUKCyfzn GjOoEHGSY3ZphoSSbG2/LqVT4Y5QooHmXxI6Y0e3z8JObFa4c55KQgJB7Nf7 sZ+omqt8YZDQPYkjmrmPqVDwqy+Ah0VCqnNPDE5glyZ6tOovktBEga2qCHbj 4n8ueSskpEXIKr77iAqtxZvL+jn4ELGIaHYYu8OlbFWYwIfcjdzfSGB3r99n bcbNh/ZmycuNplGhv737cRAvH3qZG+lajj0Sev53KR8f6hIfjIvEnt7J0htf w4fWPPNKP4VNHb8ds0mID/HzXU/QwWalbeo9LMyHjLt0L67HXrV+oRglyoeq b/9SZT+kAg8BrtSv40OZpQ+6hrAFa7qa59bzof2lcafasddddBFRkuRDP0aH O2uxN22mOzts4kMyqS+Ui7Dlv0UWx0vzIV9OXrcn2KrREsutm/nQg0PLd//3 /5ma+s8OLMnxof///83/AyCyihs= "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{0, 0.5}, Method->{}, PlotRange-> NCache[{{0, Pi}, {0.5125001622359665, 1.9999999999999862`}}, {{ 0, 3.141592653589793}, {0.5125001622359665, 1.9999999999999862`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.5879226520520287`*^9, {3.5879228719925284`*^9, 3.5879228997761307`*^9}, { 3.5879229529993873`*^9, 3.5879229961124125`*^9}, 3.587927459324891*^9}] }, Open ]], Cell["\<\ s\[OAcute] um lembrete de f\[IAcute]sica - essa forma tem uma normaliza\ \[CCedilla]\[ATilde]o pouco evidente...\ \>", "Text", CellChangeTimes->{{3.5879227344808865`*^9, 3.5879227711714935`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.5", ",", "0.5"}], "}"}]}], "]"}], RowBox[{"Sin", "[", "q", "]"}]}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5879226780542336`*^9, 3.587922718026368*^9}}], Cell[BoxData["2.`"], "Output", CellChangeTimes->{3.587922719307724*^9, 3.5879274594342747`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"\[Alpha]0", ",", "\[Alpha]2", ",", "\[Sigma]4"}], "}"}]}], "]"}], RowBox[{"Sin", "[", "q", "]"}]}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5879227806097927`*^9, 3.5879227917982397`*^9}, { 3.5879230734314623`*^9, 3.5879230829010143`*^9}}], Cell[BoxData[ RowBox[{"2", " ", "\[Alpha]0"}]], "Output", CellChangeTimes->{3.5879227932514853`*^9, 3.587923084541775*^9, 3.5879274594967804`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a0", "=", RowBox[{"{", RowBox[{"1", ",", "0.6", ",", RowBox[{"-", "0.5"}]}], "}"}]}]], "Input", CellChangeTimes->{{3.587923025208629*^9, 3.587923035772023*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"1", ",", "0.6`", ",", RowBox[{"-", "0.5`"}]}], "}"}]], "Output", CellChangeTimes->{3.587923037053379*^9, 3.5879274594967804`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"y0", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"q", ",", RowBox[{"w", "[", RowBox[{"q", ",", "a0"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi", ",", RowBox[{"Pi", "/", "6"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.587922823566555*^9, 3.5879228529127893`*^9}, { 3.587923042319453*^9, 3.5879230424600897`*^9}, {3.587923097136594*^9, 3.5879231034808817`*^9}, {3.5879231339365854`*^9, 3.587923146187623*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1.1`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "6"], ",", "1.36328125`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "3"], ",", "1.06953125`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "2"], ",", "0.5125`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"2", " ", "\[Pi]"}], "3"], ",", "1.06953125`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"5", " ", "\[Pi]"}], "6"], ",", "1.36328125`"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Pi]", ",", "1.1`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.587923104168437*^9, 3.5879231489847345`*^9, 3.5879274595124063`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ListPlot", "[", "y0", "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.6", ",", RowBox[{"-", "0.5"}]}], "}"}]}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input", CellChangeTimes->{{3.5879231614076614`*^9, 3.587923195816826*^9}}], Cell[BoxData[ GraphicsBox[{{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., 1.1}, {0.5235987755982988, 1.36328125}, { 1.0471975511965976`, 1.06953125}, {1.5707963267948966`, 0.5125}, { 2.0943951023931953`, 1.06953125}, {2.6179938779914944`, 1.36328125}, { 3.141592653589793, 1.1}}]}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk4lN/bAHDMYAhZkhSyZEkSRchyn2SJpFKihFIiyVaoLEW21Ff2SlnK GmVfE0mUJKmEQgZjTTJjZswQ3vP74/UH1+d6PHPOc8597nOfBzkXbxtXLg4O jnT87X8/Ca/5O0e1fY1qH/7viwqKU436MkmH4PEOF5VH2IulO879SHQGZk9G dyZ2GRO+ixS7QWqzRUY+9tg6d1Z1ojcYmp+ILMe+K9kmWFx/GfL6X99uws5T OZXJURwI2Rs8i75gN+nMaRzNCgLhuv3TY9g/zSKacxNvgECagdny/9pTFVAN bg4D2kvV1xJpVIje2eOXW38L4g1px7Sx1+3Jqu+sjAR03ov3OPaTvR5E1oto 4Hwc0HMNW91C66Bc/m2od//1Jgu7/vBKimXWHXC45v+hHfu7c6JyeuI92Nl+ Sk3lEX6eXeq6o63xYCSuF+2AHaiTNBDYnAC6L08tJ2ATwVHxSX0S3Ktw20N6 TIV24+YP2rXJIKL1imM/doKZsld7ZQo4uO0cjsWWsaZWz7+4Dzy9u/5KplOB cuS4Q0zhAzD1EJQ6j11kW78qlf8Q3jjlnqnC1nWM3G+W9QimmsK1HTOoYOMp +fNBYia0uRnQv2RSQUAXXqeaZ8E/pmf/7iwqzNX5igy3ZsHenIHeDOzqhp4q /+YnYNPmI3T1CRX2tWatZNRnQ2DTibOHsqmgZP7t8JReDszm3hnrwOb/wJ29 qzYHAjhjrh7MoUJXh4d5W2UuXN3q2GmXSwXHbq146ot86NJYq5yQTwV03G1E X60A1gWaSisXUGFL30OtqMICUDswKNOEPd2/0rcx/xnQ/mrtXXqGx2+0Tc4k qwiCjd/PpDzH40M7VZGaWAKUZFXFU+VU+E88zaBJsBQC7w2gXRVU+FoWuVnb phSCXniQBSup4DB9akymvxQIohJ5n6qo4OWwxpc2UwZzAn7KgXVUSDZ0j3ko XAkewec++7yhwo8fRy8K2VZCgU1V9I1mPP4BYH3rYSXY7gp9kfCWCvnF69dd kq8C0hs1/aZWKrzc3JqJtKphRe+bplk7FYY45Wsm7GrhrmeIKP0bfr4MwbRT j2vBmiDWr/udCu572MFfyLWQFfOCcbOHCjS/LuP6C3XwX+J5yU0/cHxQQjvj gl6C1wTfWMAvKqi+6x/TznwFzfqSne1TVNBvteQ3vtwEec27ad1cNBDuzvus k9QEnAmE5LNEGlBGuFK2VzRBz4ZLv+jcNIjjqN8sOd8EPLcIrpv5aDCiv017 zu8NWLKYq0lraRBTvuZ0hl8zWJlfvM+WokFPZkfVom8LcDTd+5OnRwOf69Zn KnzaQLbbO5B4nQaWXgYFpPg2uPLW+5JsMA0UXFT/Opa0Qahk3SmjUHy/BU8I abYN+DbdkboZTgNDycYHjhc/QFD4oZ6Nd2jAX7u9i/d8O9Sq0r8WPqZBLkMA Tjl0wOWzSr5yb2hwqdY1jkuhC/5NT15pFZqH7kkLvnyXbjgRzM9SeDcPsTuY HNUn+uC/Yf6olQA6XA+02Dbu0QdjJVu0adfocOH1Y9v1wX1gJSKtMBZMh/2H 9hUGZPRBSDFHQVs4HXi944/qjPaBqwr7Y2QcHSKKVfNqPX8Ao9deozuXDqHb nQ/U3/gJiR9SJTK/0cF3W1tKU+4AtI6WVA2oMoDiSrmZVT0AGX9Hgy5tZ8Dx LA7Pm+8H4DZr5tS/HQzYI65njKYGINc913GdNgO4Vp/NvlYbhFeT4oNqwIDE r3fMX1cMQs7enfQlGwaUXzvEbnjzC3jnPgzMX2XAlsqLlPSvv6AjiCcQghiQ Ohv9OWT0F1gcD82KCWHA9bNNuYbcQ3CIphovFs4A44OaNg37h6BG2MBzzR0G fJMVK3r1eQiufknxvPGYAYtnLxYPepEhNfh1uUMDA06LzF99FUAGHorx3R2v GdDaeH3fo1Ay7NTf1c3xhgHxkrF99nFkKDub+PRRCwOUPxdwdb8gw/ttpuSy jww4tmf8ePsMGfyUrGWcfjDg5cQluWd0MoSwbp/l7WfA5hTG7+h/ZNh+kW/s xQADpv8Sw0wFhsFMLTWeNsSAsFyFoqZtw/Al45XWyXEGFAufWa32GIZSdsra LBoD1jVOfkjxG4aVazXFm+gMuHbRJ/nK9WGoq9c9mcxggMm7G1t3xg7DVqHq 9mAWA/qDMo6+eDYMQvUFTVtXGECa6M/PnhwGntKtYVQSE7ySz/qFzw3Dczej OAN+Jnzb+9vgDGsYgkP2X49Yw4SMx4tfZEgj8DHJkMIvxARtG8l/D5VH4PBf 8wqqKBNcGo4fjj8/Ap8O1IxukWLCzuoNopLeI6D2cIPQMWkmcJX8/PYkcASq 7gvb35BhwtMsJ7uKmBHoj8k2bJdlwsit8049hSOgddiKrqHIhPJgFVnnihGY rzZqQkpMCPefHp6oH4FbCX8SrJSZIO/m5cruGAG9U2Q9+624fcsAT6m/I0B9 lmEC23H7+3TVcxdGQDljYFxdHbdvsPh3O8coxA9zBmzcgdvfHnoZREahVnjC ekwDty8cdd1l1ygUxVvet9DC7fPtN/itPwpXFLutNmjj9rn4Vy6bjMLX7SG9 I9jy9P/CIm1H4f3xR6cv6uD2e1NiCgJHwd//H9ViD26/y85S8+YomPTbcSxg c32QFHgZMwpPeWU/Zerj9l+m3/v4cBTcD1NTKQZM8KtwPnLs6SgsT4TH3TRk gvFzObHBwlEY2Jeot8EI9y89N3W2fhQev/TM3AO4f6lu9oEtoyBzmnKsFTv8 3taNHJ9G4dz4zooDCPcv7EW6yK9RuNA65HxgL+7fuaocLQ4K3IL9muv34f45 Bp5vIFGgPVxpLASb67ieipkIBfK+XNg+jP3UvKHITp4C5BEj3zQT3D904xJZ lQIipBm3OWxjvb07LuyigCG39tReU9w/1dby6yYU8NDgDu/FLleIvkI4SIHS uE/Jm8xw/6Qsdt+1pQC3WqWKA7aN+BrWOicKiN1x1U/Flhf6VJd+ngL3WInt Hdg0nntBSt4UuBRH+7aC3bx62LAkkALiOmCrZs6ERJboqs5NCkSX6lrZYp+l djc1xVAg4l529TXs09fj7Wrj8fWRRw/uY58iWM2WPKCAJmPmRhn2ibu8kflZ FPh4/IvHe+zj4m83ZRZQ4KFVtN0PbJuM0PLUUgpwdh82mcA+pLzHIq6WApU5 l3dQsa1KGUORTRRo26knsYC9X68sIKSNAj9LZ9ksbNNmT0H/LgqoiI59Z2Ib H1DJ8eyjQK6A77M5bKPu0T3nyBSc/3/7jWPrO2Z+cZikwFhoiUYftu74Sfej cxQoMpYZbsXW8l6/asmiQLX+o/ASbE3WlxRjjjGwFIgTS8FWD/tPbQ9pDB4o uiQGYKvyW7zVFB6Dlx+ilo9iKycRT27dMAbPBL2PbsfeItU0Jys7Bjv7ExK5 sGVzg6I3qIzBFO1C3Tc83tLqOjLCGmMgNuv/Lgt7Yw2tkld3DOKRbu0FbLEP F0aY5mNwZc3yvr94voVtFK/NHsKf/0aivwhboJ+8dtxuDCKsJY+cw+b5Y2f4 3W0MjJTUuttw/HAFiHV3eI/B2c4rv65gr650erQEjoH1GrFmKWyWsNmDiugx 2CwwvfY0jkf6Q84dRffG4GTUtcAlYyZQ5Rtan94fg0hugYpE7GktrfmE/DHw +in6pBLH+0TD39u3S8bALHD5MGBTzIpkw2rG4GFh7+dWvD4G7eWtfd6PgQPp svY7vH5+Dg9S3D6PgRtql0TYPR4Pg5x7x+D8dsO2Krz+uoKFn1lPjEGqemdo Ml6fzVkrhO284/AyfmznZryeG7e+TNuydhyqjc33B+L1Xl/uryklMQ4/lQdl PuoxobJlxmmN8jjscA9dc16XCfmTP+umzMZh6q/bO3ecT+5q1HjnRY3D+bjG 2Sycr9p39o77x41DmGD/0Tqcz0jaC46mqeMQuGyb+kmNCRF6OlaU3HHobblc OqXKhCDjGhX51nFw5g1RnMP50uNYzXA6YQLGNTpuauN8W3C81/7Smgk4SdG5 uAbn43H7hc8GYhPAcZmqMriJCWccdRr75ScArRyWuiLJBPvzNWmSxhOwqFHy 3XsdE8yv1hxNuTkBUbs26GTw4fav97afi5kAi8oWeU28fzQHL+zVip+AjC1x /a95cHyH6Wh8y5yA8gtXKroITNgdWyMg8noC6qJtmK+X8f79uKb17vIESLAd s7vn8P7fVKMTcX0SjFq3Gvd8Y0ChoGjecvgk/DfUOF/zhQE2Dp7rAu9Mgt/D fRXJnxmQzZSlXng8Cc0cJx0B77cm22MLDzVOwtXsJ24nmhkQlXZKehPXFHQO TVZllTCA35+TUH57Cs72C7jejML1RLOD77bEKbA/3tDTcosBJ4Wrh3LSpkD8 TqcHMYwBRUUer+4XTcEhlsjKFVxfWI188w/5NAXGDPPZTT4MiDuUN7lfZBqe fGqeC7NngIjqgc6hB9MgslYjsEaRAeO8mSJtWdNwlSXc8kge7/9jtGOlBdMg etOQHbSZAeeepPXfrJ2Gg79/y2lIMqB2w/SkXN80/MrKTnITYIAT723COYnf 4KK/aLiORofnlHe6kym/oeVT5wvvl7heyzTOnkucgZCGr6tJQIfotq7B8Ecz wBIae6OsT4d3VKcN4jkzICy2AdXspoOpSdB/elUzkFfRFfxhOx2MpyoCw3tn wLnDyKp+Ex0MdilarZP6Aw1tR9k9zHnQeM/L0Mn9A8vfu0y5C+dB4m+H2Y2a WVD1OHGWwD0Pae9fchIuzMG9I/YHG/B5zUB676rsOSpYXHi2YLNtDraRhSkh V2jQ0XbNtl7yD7woEHWv8puHz/yTMr9kpiH4l+O3bVF0EH5bELBDagLo5obp rrF06I0pEhMQmQDPMim3TFx3rthvH5/lngCHiP5F0ft0GFTed+z933HYo3pC fjEfP8elZ94tb8eB7X/Mt+0DHXwEYi+wPMchQPDAWldBBkjv3RZ4t2UMfA10 D2QkM8DH8l/MtVgKcHgl37j3AM9rWIvo5zAKxGXOVdzEdWDKx5m1atcoUMj1 TOpsDgMedsnf/OdGgZE2yVnlSgZ82WnKXjClwDHbpfgyHKeiu7eZOBMosNur sacF10FkRVKJdMQotGRuXFO9ngklcpsLvIJHweZLAORvZMJmstXE+yuj4KW1 o+C2PK6rVLIOJ7mOQv5i5jXrnUwQ9M26Hmc+Chuiw6T6juB9aIe63ybBUVjM NHH5HY/3hbW9jbUZI2C0YJiomcKENbTxpXv3RyDMWqc58CETx3tkh2/8CJCW t8oTn+J97dztfbbhIyB+cu2IVAUTJKIUTR7jOk1j3c8z1t+ZILOxwlJDcwQu X/yWkPyDCSam3/sqVEegurnjzc9BJrwaOOFivGUEDH1fy7mN432DY+PNmxIj YNmZM3xjAffHTCY+bGUYXGO8z5RJLkDp5c3bH3cOQ8GQe8KC9AKsu59u8LVt GGZ2u7wxlF+A/PF/OWJvh8Fv7Jhcu+oC3NM9kFpbMww3jfcMj+gvwMo5lHjn yTCk/SOeWee0AJYb30ScDByGLp+004FPF+BpnlhDI66LVeOFl67kLcCjazd/ lysPw62SqBS/wgWoSnsYUaYwDLtn/dovlS9AT+xWYuemYUi/eEDrXPMC0NLM kyNwne1x/h/vkZEFyCLI1k7/JUNLpN9T6/EFOPKzfG00rtulcycNrKYX4LnT GYL6FBm6Rrt9zWkLcHJKr/3RCBl0zrzoN+RiwVpvovzCdzIQTzmVqMqzoMtD 06ikkQxOQd0WKkosKDDrT2LWk6EmzZKiqMoCe1X94v11ZPD4sVtSbicLWDn8 ewQryfDl+NpbEsYsOJrkPS1RSAbVgEhpcTMWvCm797QqnwwRKUs1opYsONh2 XMMplwy63RMzgjYsiHiV1/05iwwZR5qOE11Y8OHUzBXtB2Rg+eymcp5nwTs5 +bWqqWSwiX9+Z/UCCwI/PP9vazIZuD8/aFr0ZYEX30Uji3gyeFr5qlLDWFA9 qPVozW0yvLs40TIbyYKphcUIu2gybL7j6DxzmwXcziHOxZFk+PrBInkigQWl moYzweFk0DOXXxl8wgKPfpvb6cFk0Mpuj3mfywL1Xo+f5kFkUF/1Eyt7hu9v 4a37d40M8jVvVSLKWCAbS5WPCiSDlJhnxaUqFuyr1is9ic9d673XGdnVscAz cLlTz58Ma5Rdj6q+YQF7PL5F4jI+l90S/CXWiu+flkhf70cGjqEq9+U2Fs4L t/llfclAT+UJ7epiAdFHP9/GmwyztGLSy24WHKj42xuEz3mT1nZJ2X34+V9c ySq5RIZBnoKCADILamKuLe32JEOfy+FdpyksUAtSuRd7ET9vI6vBYpIFfGY8 DZMeZOjY+GT/rhkWFG1OiTyC/S7A4pvUHAsMqq2nWi6Qoekr1ZGHjudzR86k MfZL9bTJvwssCFVeufXRnQyVscaXfyyxgFz2qt4Ju2R8erl5lQWzdjrx/9zI UGicFPOcwAYeyQbOXOycDH2xVF42gEeysD12xuJo+o01bBDcvfRKHPvB8bsq F9ayQXlAiffXeTIklmtV2IixwVDT5G8p9l2hQUMDCTYMhwb6x2FHeUS2KW5i g8OtgYcB2GHvth9du5kNib5Rpy5gB8v3DLLk2UCg3mg4jx0QGuo+osSGXOmP r7ywfX4qzX9UZcNS9JmTYdgeuz+HVKmzQUhbKzUD+1xiIClzJxtCM7b5vMN2 mt2cFLObDffLlSdZ2PaWbdJ+e9jg3b26rI37fzTPp8DBiA2kgfCyEGxrLsld psZsuLU+kKsLe7/TmwZ1MzZYm6XNqeHxMn55Yf8GSzacz34SlIxtsF70G6c1 G5L79bJ58Hjv9nvp+PsIG16L8rrdwtbodJnstmUDGs15x4/nSzGqYjnfkQ1E gVQ7PTy/siMOMQln2BA5w4gmY280IooFubKhMhBsEnE8CDGPqVhfYsOOD5bl 4jh+SDbL5Tq+bJAd6DabwOYqzjWU82eDutYPv7c43hZcmTb0YDbw3rsV9wjH I+1NxuDgTTx+lS+C7+N4nZE2d38fwQan8ydX03E8k7/fD0m7y4Y20fHGdhzv H0z1CtBjNuzvSxbMvk6Gq+9D1W9kscG+USZeGK8vFYuWyoYcNsQZ2ofEhuD5 tDr0Zs8LNqhy6CRm3ySDyVHXn1qNbIgQTw/ywOuX3l14+nIzGxj3/m7Vx+s7 +/jceNk73L+H13dvuIP7fzJoXv0zG6IsZM8uxOH4PZ0gsJXMhtl7rj0W9/F8 j/QkulHYcGHgtnHIQ5wPzklJ5k2yQVfq1vKrR2QIdctXVKDi6xaudmdwPjLw ajCS5loEk+rLpwxxPqsJmvIR2bIIF9VFElETGc4vqy8cUlmEcs3Grzpv8Xq/ cSUkTm0R3ke37NF/R4Yr4au312gvwhzvRf/zHWTYeVs8m9tsESyibhhb/yBD cere72y3RXgS6Bh2moHja0O0g67nIiz2ZrRtYJNBMK1jOMBnEVz3mRMH/+H8 lm43O391EahnIyxvE/H+kXOJd/b2IpAdDJ/7rBuG3LKHeiNFi/DVydMzcDfe H5YcVPtKFiH2gEVi1p5h0DCV2dRZsQjja87//mY0DK/6nv6rq18Eff3IrSfM h+HbatHrhI+LoKKT7DdoPwyc1o2me38vwvKXTJ72kGFwnB45kqW6BKn8i8sS n4dBXivXOFV9Cfzaf++52T0MkyFuu+7uXAJ50wo12o9huCIys+7qniWwn+mX mqcMwx1dRu8hyyVA+jGl7kvDUBfF67R6YQk83zkmyeD9WlxBzcPp2RJcdRbf khQ3AvGJd44/e7EEX+NsvKpTRoCf67cxvQy3L3PWlfJ4BDiGn22KfbkEDSEn jE4XjcBMhvKnqo9L8E9/srenbQRaNipoCM4uAc3R42Id9yhcEd3IrN/5D7aK mG2RjR6Fr5ykcMlX/yCpIPpDVR4FZl88dDrc9A+Y6rqCm/C5me/kNv3oln9w PkS2MKaOAqjcmk7v+Ac/nf90BHdQoNgl5XzXILaidvN7GgXuvJU/EL36D4aM OMvJaAxMIg3XMYyX4cSMp8/QyBhUkS7ndX1Yhi9flB9zGkyAmriwh0vrCizz TeQp/puCv3HMdbt6VqFRgcPBUP0PKERH7/D24EAGh2nVHRvnYORk/0/jCQ50 ITXVXDyWCvvHvrGrvDjRHtJTlucCDUK2xQWV+HAiGREdbfd/NCj33b9c4MeJ apeN75/mnIdNK684HgdwovpdTY3718zD7Po83vBQTnRzE9depsw8JO+/Km4d x4ku+AdYvjWdB3KRlOb4C050KGlv79qEeRCn9ZQPlXAilkZ9+bOUebDUTdD6 UcaJ5rlaj6C0eaho4dbtqOJE7QZbP5/NnoeowVmj8gZO5LBgc/VW1TyorX1j FfqJE90957VB4cc8XPVzdV//hxMZBfhOdUnTIebArNuev5xIeB2lwE6eDve3 BLo5UTmRmY2nzk8lOlT3xJzPY3AiboGIqq876DC/5/m53Suc6MeHE8Pxe+ng RZg/fXwtF1IYqT4H5+hwNvnmiVRNLmS1apJ0JI8Ofpf4TrzcxYV+rCcXWhXS Idws0f6XNhdKrcjR21dMhyxWtp3SHi4kb7S2Qr6aDr9OvbetNuZC65VOfCts pYO9opBNz1EutGJC+jg4Sgfr6keW6wO40MvX0PRaigHu8y6r4le50AZpNb4Z fD66paFaKX4dtx8guWWdAj4fFdZKi4dyobbTp9vttjJAPvP7nFgUFyru8yp/ rs0AZvTa+yKpXMhTQfzTnYMMyDhxa1SgmguJuR6hrb+O70+1fCBQy4XK39tK 1Acz4Ns3kYMCL7lQ8PbvUydvMIBknVW9ppEL+VK/J/0XwQA/44bb/O+4kL3f B0pjHAPMti3sIPVwIRVj0a7DTxkw+88jmMDkQmU8Y47b3zHghP2BrewFLkSj 2Z3Rb2NAS8W2nlk2F+I5/UXVtB2fIzxmdvxc5kKX5wuErDrxebXv0mgpNwEd tIkUVe5hwKMKH0sncQKaUF0dEBljAM/aIwtHJQhIdaFacWAcn1s8NHMsJAlI IeU/zaeTuD9ytGUtaQLq1vNIlJthAC3uctkaRQLyex119Q+NAfs9AjbUaRHQ Ddtsct0qAypaj7cW7yYgq+RDTogT1/1yOn45ugT0Kl8nq5mLCfO9Cx/vGRBQ REKc70tufC4xvXbjvAkBLdxePhy4hgl02eBxsWME5G4gY6qEzzXOwaeS+I4T 0O2N0coXJJjQ3muAVu0IiGeD2bf8DUzIjFt+OO1AQBr592M2bGKC5b/Qg2/O ElCkjszV95uZ8KQ3rNLrMgGpvTCjOKgwYbxVYyjOn4CeF2iI+m5lglrlEF9J IAH9vVFmG6bKhOp4Q+e/QQT0dK+AXJIaEzos2Hw+EfjzkMtokAYTRHULtOKj CMggXrLvgiYT7JTsnEtjCAi2SE3b4HPVCFdV5dxdAlLsNfZYr8UEVr2Ps28K AYmYrrBddJhgVLg5NuE+AQ3pfF3YqsuEWw86K8seEpDDxOKmGWwhfzV+Wjoe n+JdA2f2MOHo2X4t0SwCWo5svS6uz4QHR2Kddz7F45lSYtKCraA+WemXh33v g7OYIRPcpe4PJRYQ0G7F3IoK7GJ+M/6KQgLSM9XQPWSEz1ET2c7zxQRE+TLW FwhMsM5y5r9SQ0Cbwsey7u1lQnKckHZyHQEVW2k85TNmwo/gBufKegJye/51 KBT73IlNVfTXBKS17dh6h31MeGbePrSumYDWb3QQbcae1b7Gr91CQCQ9viNb TJhwTbTX2b8Nt/d15PFP7EaOqNiUdgLK+u30Qt2UCcS/WlVVHQSkdFGBNxTb YnB06HsnAekcHCtqw477mMjP7CIg7kdO6UJmTOiu26u9/hsBFblbDx7CliyY c979nYAyvl69dBfbKTUz9ngvAckt5R1qwc6JsK4K+IHb482PXMCe9lseSu0n IGkZKxElcybsOPOcv2aQgKJcvOiHsK8cctDuHSIgAfq0hj/2S0P+0wvDBBQ4 nd32v/efq9vqYiUoBOR19GbD/97vmmx0r9IZJ6CGHZ4iH7BjSRJku0kCSvOx f9eP/ZnZyn91moD66Ht+TWGvG8PHphkcH1FCDvPYJ78pnK6dJaCdPV+N/vc+ N/PN19i+OQIaDbp753+mlIRVsWgE5D9nso/+v/etGRrkDQwCSrnL7/4b2/vu EL/eAu5/5NzSIHbl9TjtE2wC2jotxNmBvehuePraEgFtzAq/VoVtWa+K/JcJ aE9Y04nH2I8EN8j6rhLQ5V5J8xvYM87cHJc4ieh37ZF9TtgG5bQhdwIRDf9S P6yHfZdIfn2Om4huZQd5C2MPHv+UeZqXiJpXubNH8fiGLuU7268hoiJvaetQ 7M6DKXBMkIjOBdl/MMXenBW++fBaIvLg336aD7vJxHHIXIyI5NYoTUbg+Ra5 b/l6nzgRZYuKDxpgu0zpZIIEEd1p2cn4398DCHGizjqbiMjJvjr1IPYx8qrR LmkiMlYkbGHi+MvZ+Udmx2Yi+nnJaiAN26z3/S8lBSLynmj73ofjN3VrVaO8 IhEZCq1u9MOeCHqaIaNMROn3dZJ4sWNkQ5zWb8PPT+/foozXQ5+fh5HodiK6 EXLeuAwxYWurnYzQDiIS+6TxSAe7/cLOX9y7iOjwwgSPHl5PAhUTjow9RPSQ acu1Fq+/U9zfDakGRDQka6AdZMCEF3bN0n+MiIg+crNyFK9f63+PBynG+Hox I+sZXu/xpjaO3ZZE5B86782H8wH5Phh2WRFRGVPaxB7nD81pNekOayJqPPk4 IHs3E9ddvINvbYjIRLZzVV0bx1ffq1MVJ4lozS4rykacj86pFhqUnCKilmzT GSucr6qC70sVORFR0pMTrv/LZ8fl/AaeuhDR+jjfyk/qOL94KJ9K9CAio3NX +PdvY4L0coKD73UimknIaUpRYML+kYN194OJ6JEXef6aPF4v7/kkGkOJSHH5 rspJOTweCWFf+W/h8RQNyBbC+TdAydci5w6Oj6ebDfdvZELXocM6vY+JiNNo gM0hzIQlLYGU5Qwi4l3u+pEnxASljW00hSdEpLyPQNsvyIRgXML55BKRFNnx Rxg/Hv9rOxT5i4kocK3P5DsiE8KfCokZviaiqqlY3ScsBryIbvc5+4aIFATO HBJYYECfZ1Tn7bdEZG0r8+MygwHqOiu3e97j/lRePaaL96/+j384fLrw+Aen 2d7/zQAtRsfs02Ecv66OlNJBBoyb32knEbmRe8899qXXDHA5cFpWkYcbvWev nrrawIBBa+2AvSRu5LlO4/ONegZ02w7JXRfgRlNCZX8jaxjQfHbXtd/ruFHp BDXeu4QB6Tf6lTsVuZGy0tDP+gwGHKvZFplkzo02yz81tg1iwFulDpC5w41S i5y9r25ngGXckOX6/7iRpenOq2LbGNDFoNkK3eNG1QaDg89VGPCrRdJzJZEb sTssO3/i+oXl4vbgVxo3cj2d80xhIwPUMrmoGYXcqMcgIdSThwGpEnpPN7dz I9Mnnn70QTp4kPKIcnw8yHSjsFPxbTrUZG0xfJvAg+R2rZmK+zgPnfoGrTYi vGilcq4gE9efsbX+S2ZivKj68vjIeql5MNcu0dQX50Vhc56W9yTnoUldPkNB khd9cBIsubUO15typEC6LC96LOOoEsQ/Dw94u1VSNXjRSL5gdj6TBme/Xbz7 4xAvaj4iHS/QRQPZw7nNn47wotzxz8kln2gw0PGL9eYoL9qw4KR67CMNjr87 4lpox4saK/6KPX1Hg/11OkZBzrzo+UGPXUcaaKCeSZiT8uZFFYwmjdVCGrA8 Hh09HceL4ofSRIqjaXDvejbvjXhelHExa+fJSBooxRbVpyfyIp0O/VTSLRrY PqtX6E/Fv+/zeadnKK7PJ/rnbTN5UcIt8uZD/jTwPCeVfKCUF1n/cCmLOksD smN69+6vvKhndvu2b3tpEHgpN8a2mxe90Tk59wloIBTywuBKDy9i6vY6fjSk geHjhpyyn7woqMXfsFOPBmk/B6+ojfKilLG9p+maNDhmJyMuT+dFcYVhxS3y NGg7nGkruJ6Ejunwucbw0MCjZayRdwMJDQlGEBaJNBDUVVPh2khCj7zfGHgR aGCzuW6RKU1CKySraCcOGvT/+ZpJViShjI+nyp0WqTAbyzNdoU1CRokKhKFZ KsSvWB0t1iGh6VwtjaA/VNjll/SqQI+Ejr5PF984Q4WrJ2TvpRuSUPb0OeHT U1TgUtmjFW1KQi3TQQwBChXEWy+FnrTF10/8/vv7BxVqdSsnjtnh/rHoHpV9 VDj5fPHwoRMkdHrep/ZGLxUykqIVTBxJKEeovUvmOxVUXJ60bXclIaueENkb XVQwWO0W5fQnocCa+aAP76nwy29T8FIACSktfP/4+h0VwsbPjDGuktCfumJi XSsV3n2arZkOJiHe1XO7K99S4dBjkmN3BAlt8F159ek1FVz0DPLzk0mIeezu 2bhaKlz484kxkEpC4XtSHqXVUMHnibOJ6EMS0vOPv1NYTYUbfLeGg9NJSFJK 8+H3Sio8/vFhk00eCQ3opCXal1Eh+z8Hj+gCEqpKGiwLL6VC4d4/ta8KSaj7 qlxyaQkV6p4JH1cuIaGX7s15EsVU6LlmF/+vhoT4Dr5VEiuiwuD2qV+aL/H4 xMbddCikAmX4+na3VyRU0fs3L/8ZFeYtMtq/NJGQ+mCn44ECKghvHCPmfyAh izNbE5pyqSDRGXB04CMJ1biwPZWxZcJJT0U6SUh+9zXpxBwqbJ/eBsFfSegH WYHjcjYVLF/6XTvST0I9AhIUlydUOOJFbIsaJKEHmmEhk1lUsJdPXf9qiIQu xO2m+WK7xdZVKFFIKCLHySc+kwpeRge4To3j+dihEaSIHUAbOJwwSUKCyfzn GjOoEHGSY3ZphoSSbG2/LqVT4Y5QooHmXxI6Y0e3z8JObFa4c55KQgJB7Nf7 sZ+omqt8YZDQPYkjmrmPqVDwqy+Ah0VCqnNPDE5glyZ6tOovktBEga2qCHbj 4n8ueSskpEXIKr77iAqtxZvL+jn4ELGIaHYYu8OlbFWYwIfcjdzfSGB3r99n bcbNh/ZmycuNplGhv737cRAvH3qZG+lajj0Sev53KR8f6hIfjIvEnt7J0htf w4fWPPNKP4VNHb8ds0mID/HzXU/QwWalbeo9LMyHjLt0L67HXrV+oRglyoeq b/9SZT+kAg8BrtSv40OZpQ+6hrAFa7qa59bzof2lcafasddddBFRkuRDP0aH O2uxN22mOzts4kMyqS+Ui7Dlv0UWx0vzIV9OXrcn2KrREsutm/nQg0PLd//3 /5ma+s8OLMnxof///83/AyCyihs= "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{0, 0.5125}, Method->{}, PlotRange->All, PlotRangeClipping->True, PlotRangePadding->{{0.06283185307179587, 0.06283185307179587}, { 0.017015625000000003`, 0.017015625000000003`}}]], "Output", CellChangeTimes->{{3.587923185175297*^9, 3.5879231968012815`*^9}, 3.587927459574926*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"sy", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Round", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"0.07", "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{"0.1", RowBox[{"Cos", "[", "q", "]"}]}], ")"}], "^", "2"}]}], "]"}], ",", "0.01"}], "]"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi", ",", RowBox[{"Pi", "/", "6"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5879232116619167`*^9, 3.587923326062229*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.12`", ",", "0.11`", ",", "0.09`", ",", "0.07`", ",", "0.09`", ",", "0.11`", ",", "0.12`"}], "}"}]], "Output", CellChangeTimes->{{3.58792328868406*^9, 3.587923326812292*^9}, 3.587927459590539*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Conjunto simulado", "Subsubsection", CellChangeTimes->{{3.587923441088123*^9, 3.5879234467761045`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ys", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"y0", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"Round", "[", RowBox[{ RowBox[{"RandomVariate", "[", RowBox[{"NormalDistribution", "[", RowBox[{ RowBox[{"y0", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"sy", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], "]"}], ",", "0.01"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "y0", "]"}]}], "}"}]}], "]"}], ",", "sy"}], "}"}], " ", "]"}]}]], "Input", CellChangeTimes->{{3.5879234710594115`*^9, 3.5879237896332617`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1.01`", ",", "0.12`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "6"], ",", "1.33`", ",", "0.11`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "3"], ",", "1.2`", ",", "0.09`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "2"], ",", "0.5`", ",", "0.07`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"2", " ", "\[Pi]"}], "3"], ",", "1.07`", ",", "0.09`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"5", " ", "\[Pi]"}], "6"], ",", "1.35`", ",", "0.11`"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Pi]", ",", "1.16`", ",", "0.12`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.587923707938841*^9, {3.587923751895688*^9, 3.5879237902270613`*^9}, 3.587923852482331*^9, 3.5879240452330265`*^9, 3.587927459606165*^9}] }, Open ]], Cell[BoxData[ RowBox[{"Needs", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.587923793821116*^9, 3.587923806697204*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ErrorListPlot", "[", "ys", "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.6", ",", RowBox[{"-", "0.5"}]}], "}"}]}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input", CellChangeTimes->{{3.587923810400645*^9, 3.587923843294055*^9}}], Cell[BoxData[ GraphicsBox[{{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., 1.01}, {0.5235987755982988, 1.33}, {1.0471975511965976`, 1.2}, {1.5707963267948966`, 0.5}, {2.0943951023931953`, 1.07}, { 2.6179938779914944`, 1.35}, {3.141592653589793, 1.16}}], {{LineBox[{{0., 1.13}, {0., 0.89}}], LineBox[{Offset[{1.5, 0}, {0., 1.13}], Offset[{-1.5, 0}, {0., 1.13}]}], LineBox[{ Offset[{1.5, 0}, {0., 0.89}], Offset[{-1.5, 0}, {0., 0.89}]}]}, { LineBox[{{0.5235987755982988, 1.4400000000000002`}, { 0.5235987755982988, 1.22}}], LineBox[{ Offset[{1.5, 0}, {0.5235987755982988, 1.4400000000000002`}], Offset[{-1.5, 0}, {0.5235987755982988, 1.4400000000000002`}]}], LineBox[{ Offset[{1.5, 0}, {0.5235987755982988, 1.22}], Offset[{-1.5, 0}, {0.5235987755982988, 1.22}]}]}, { LineBox[{{1.0471975511965976`, 1.29}, {1.0471975511965976`, 1.1099999999999999`}}], LineBox[{ Offset[{1.5, 0}, {1.0471975511965976`, 1.29}], Offset[{-1.5, 0}, {1.0471975511965976`, 1.29}]}], LineBox[{ Offset[{1.5, 0}, {1.0471975511965976`, 1.1099999999999999`}], Offset[{-1.5, 0}, {1.0471975511965976`, 1.1099999999999999`}]}]}, { LineBox[{{1.5707963267948966`, 0.5700000000000001}, { 1.5707963267948966`, 0.43}}], LineBox[{ Offset[{1.5, 0}, {1.5707963267948966`, 0.5700000000000001}], Offset[{-1.5, 0}, {1.5707963267948966`, 0.5700000000000001}]}], LineBox[{ Offset[{1.5, 0}, {1.5707963267948966`, 0.43}], Offset[{-1.5, 0}, {1.5707963267948966`, 0.43}]}]}, { LineBox[{{2.0943951023931953`, 1.1600000000000001`}, { 2.0943951023931953`, 0.9800000000000001}}], LineBox[{ Offset[{1.5, 0}, {2.0943951023931953`, 1.1600000000000001`}], Offset[{-1.5, 0}, {2.0943951023931953`, 1.1600000000000001`}]}], LineBox[{ Offset[{1.5, 0}, {2.0943951023931953`, 0.9800000000000001}], Offset[{-1.5, 0}, {2.0943951023931953`, 0.9800000000000001}]}]}, { LineBox[{{2.6179938779914944`, 1.4600000000000002`}, { 2.6179938779914944`, 1.24}}], LineBox[{ Offset[{1.5, 0}, {2.6179938779914944`, 1.4600000000000002`}], Offset[{-1.5, 0}, {2.6179938779914944`, 1.4600000000000002`}]}], LineBox[{ Offset[{1.5, 0}, {2.6179938779914944`, 1.24}], Offset[{-1.5, 0}, {2.6179938779914944`, 1.24}]}]}, { LineBox[{{3.141592653589793, 1.2799999999999998`}, {3.141592653589793, 1.04}}], LineBox[{ Offset[{1.5, 0}, {3.141592653589793, 1.2799999999999998`}], Offset[{-1.5, 0}, {3.141592653589793, 1.2799999999999998`}]}], LineBox[{ Offset[{1.5, 0}, {3.141592653589793, 1.04}], Offset[{-1.5, 0}, {3.141592653589793, 1.04}]}]}}}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk4lN/bAHDMYAhZkhSyZEkSRchyn2SJpFKihFIiyVaoLEW21Ff2SlnK GmVfE0mUJKmEQgZjTTJjZswQ3vP74/UH1+d6PHPOc8597nOfBzkXbxtXLg4O jnT87X8/Ca/5O0e1fY1qH/7viwqKU436MkmH4PEOF5VH2IulO879SHQGZk9G dyZ2GRO+ixS7QWqzRUY+9tg6d1Z1ojcYmp+ILMe+K9kmWFx/GfL6X99uws5T OZXJURwI2Rs8i75gN+nMaRzNCgLhuv3TY9g/zSKacxNvgECagdny/9pTFVAN bg4D2kvV1xJpVIje2eOXW38L4g1px7Sx1+3Jqu+sjAR03ov3OPaTvR5E1oto 4Hwc0HMNW91C66Bc/m2od//1Jgu7/vBKimXWHXC45v+hHfu7c6JyeuI92Nl+ Sk3lEX6eXeq6o63xYCSuF+2AHaiTNBDYnAC6L08tJ2ATwVHxSX0S3Ktw20N6 TIV24+YP2rXJIKL1imM/doKZsld7ZQo4uO0cjsWWsaZWz7+4Dzy9u/5KplOB cuS4Q0zhAzD1EJQ6j11kW78qlf8Q3jjlnqnC1nWM3G+W9QimmsK1HTOoYOMp +fNBYia0uRnQv2RSQUAXXqeaZ8E/pmf/7iwqzNX5igy3ZsHenIHeDOzqhp4q /+YnYNPmI3T1CRX2tWatZNRnQ2DTibOHsqmgZP7t8JReDszm3hnrwOb/wJ29 qzYHAjhjrh7MoUJXh4d5W2UuXN3q2GmXSwXHbq146ot86NJYq5yQTwV03G1E X60A1gWaSisXUGFL30OtqMICUDswKNOEPd2/0rcx/xnQ/mrtXXqGx2+0Tc4k qwiCjd/PpDzH40M7VZGaWAKUZFXFU+VU+E88zaBJsBQC7w2gXRVU+FoWuVnb phSCXniQBSup4DB9akymvxQIohJ5n6qo4OWwxpc2UwZzAn7KgXVUSDZ0j3ko XAkewec++7yhwo8fRy8K2VZCgU1V9I1mPP4BYH3rYSXY7gp9kfCWCvnF69dd kq8C0hs1/aZWKrzc3JqJtKphRe+bplk7FYY45Wsm7GrhrmeIKP0bfr4MwbRT j2vBmiDWr/udCu572MFfyLWQFfOCcbOHCjS/LuP6C3XwX+J5yU0/cHxQQjvj gl6C1wTfWMAvKqi+6x/TznwFzfqSne1TVNBvteQ3vtwEec27ad1cNBDuzvus k9QEnAmE5LNEGlBGuFK2VzRBz4ZLv+jcNIjjqN8sOd8EPLcIrpv5aDCiv017 zu8NWLKYq0lraRBTvuZ0hl8zWJlfvM+WokFPZkfVom8LcDTd+5OnRwOf69Zn KnzaQLbbO5B4nQaWXgYFpPg2uPLW+5JsMA0UXFT/Opa0Qahk3SmjUHy/BU8I abYN+DbdkboZTgNDycYHjhc/QFD4oZ6Nd2jAX7u9i/d8O9Sq0r8WPqZBLkMA Tjl0wOWzSr5yb2hwqdY1jkuhC/5NT15pFZqH7kkLvnyXbjgRzM9SeDcPsTuY HNUn+uC/Yf6olQA6XA+02Dbu0QdjJVu0adfocOH1Y9v1wX1gJSKtMBZMh/2H 9hUGZPRBSDFHQVs4HXi944/qjPaBqwr7Y2QcHSKKVfNqPX8Ao9deozuXDqHb nQ/U3/gJiR9SJTK/0cF3W1tKU+4AtI6WVA2oMoDiSrmZVT0AGX9Hgy5tZ8Dx LA7Pm+8H4DZr5tS/HQzYI65njKYGINc913GdNgO4Vp/NvlYbhFeT4oNqwIDE r3fMX1cMQs7enfQlGwaUXzvEbnjzC3jnPgzMX2XAlsqLlPSvv6AjiCcQghiQ Ohv9OWT0F1gcD82KCWHA9bNNuYbcQ3CIphovFs4A44OaNg37h6BG2MBzzR0G fJMVK3r1eQiufknxvPGYAYtnLxYPepEhNfh1uUMDA06LzF99FUAGHorx3R2v GdDaeH3fo1Ay7NTf1c3xhgHxkrF99nFkKDub+PRRCwOUPxdwdb8gw/ttpuSy jww4tmf8ePsMGfyUrGWcfjDg5cQluWd0MoSwbp/l7WfA5hTG7+h/ZNh+kW/s xQADpv8Sw0wFhsFMLTWeNsSAsFyFoqZtw/Al45XWyXEGFAufWa32GIZSdsra LBoD1jVOfkjxG4aVazXFm+gMuHbRJ/nK9WGoq9c9mcxggMm7G1t3xg7DVqHq 9mAWA/qDMo6+eDYMQvUFTVtXGECa6M/PnhwGntKtYVQSE7ySz/qFzw3Dczej OAN+Jnzb+9vgDGsYgkP2X49Yw4SMx4tfZEgj8DHJkMIvxARtG8l/D5VH4PBf 8wqqKBNcGo4fjj8/Ap8O1IxukWLCzuoNopLeI6D2cIPQMWkmcJX8/PYkcASq 7gvb35BhwtMsJ7uKmBHoj8k2bJdlwsit8049hSOgddiKrqHIhPJgFVnnihGY rzZqQkpMCPefHp6oH4FbCX8SrJSZIO/m5cruGAG9U2Q9+624fcsAT6m/I0B9 lmEC23H7+3TVcxdGQDljYFxdHbdvsPh3O8coxA9zBmzcgdvfHnoZREahVnjC ekwDty8cdd1l1ygUxVvet9DC7fPtN/itPwpXFLutNmjj9rn4Vy6bjMLX7SG9 I9jy9P/CIm1H4f3xR6cv6uD2e1NiCgJHwd//H9ViD26/y85S8+YomPTbcSxg c32QFHgZMwpPeWU/Zerj9l+m3/v4cBTcD1NTKQZM8KtwPnLs6SgsT4TH3TRk gvFzObHBwlEY2Jeot8EI9y89N3W2fhQev/TM3AO4f6lu9oEtoyBzmnKsFTv8 3taNHJ9G4dz4zooDCPcv7EW6yK9RuNA65HxgL+7fuaocLQ4K3IL9muv34f45 Bp5vIFGgPVxpLASb67ieipkIBfK+XNg+jP3UvKHITp4C5BEj3zQT3D904xJZ lQIipBm3OWxjvb07LuyigCG39tReU9w/1dby6yYU8NDgDu/FLleIvkI4SIHS uE/Jm8xw/6Qsdt+1pQC3WqWKA7aN+BrWOicKiN1x1U/Flhf6VJd+ngL3WInt Hdg0nntBSt4UuBRH+7aC3bx62LAkkALiOmCrZs6ERJboqs5NCkSX6lrZYp+l djc1xVAg4l529TXs09fj7Wrj8fWRRw/uY58iWM2WPKCAJmPmRhn2ibu8kflZ FPh4/IvHe+zj4m83ZRZQ4KFVtN0PbJuM0PLUUgpwdh82mcA+pLzHIq6WApU5 l3dQsa1KGUORTRRo26knsYC9X68sIKSNAj9LZ9ksbNNmT0H/LgqoiI59Z2Ib H1DJ8eyjQK6A77M5bKPu0T3nyBSc/3/7jWPrO2Z+cZikwFhoiUYftu74Sfej cxQoMpYZbsXW8l6/asmiQLX+o/ASbE3WlxRjjjGwFIgTS8FWD/tPbQ9pDB4o uiQGYKvyW7zVFB6Dlx+ilo9iKycRT27dMAbPBL2PbsfeItU0Jys7Bjv7ExK5 sGVzg6I3qIzBFO1C3Tc83tLqOjLCGmMgNuv/Lgt7Yw2tkld3DOKRbu0FbLEP F0aY5mNwZc3yvr94voVtFK/NHsKf/0aivwhboJ+8dtxuDCKsJY+cw+b5Y2f4 3W0MjJTUuttw/HAFiHV3eI/B2c4rv65gr650erQEjoH1GrFmKWyWsNmDiugx 2CwwvfY0jkf6Q84dRffG4GTUtcAlYyZQ5Rtan94fg0hugYpE7GktrfmE/DHw +in6pBLH+0TD39u3S8bALHD5MGBTzIpkw2rG4GFh7+dWvD4G7eWtfd6PgQPp svY7vH5+Dg9S3D6PgRtql0TYPR4Pg5x7x+D8dsO2Krz+uoKFn1lPjEGqemdo Ml6fzVkrhO284/AyfmznZryeG7e+TNuydhyqjc33B+L1Xl/uryklMQ4/lQdl PuoxobJlxmmN8jjscA9dc16XCfmTP+umzMZh6q/bO3ecT+5q1HjnRY3D+bjG 2Sycr9p39o77x41DmGD/0Tqcz0jaC46mqeMQuGyb+kmNCRF6OlaU3HHobblc OqXKhCDjGhX51nFw5g1RnMP50uNYzXA6YQLGNTpuauN8W3C81/7Smgk4SdG5 uAbn43H7hc8GYhPAcZmqMriJCWccdRr75ScArRyWuiLJBPvzNWmSxhOwqFHy 3XsdE8yv1hxNuTkBUbs26GTw4fav97afi5kAi8oWeU28fzQHL+zVip+AjC1x /a95cHyH6Wh8y5yA8gtXKroITNgdWyMg8noC6qJtmK+X8f79uKb17vIESLAd s7vn8P7fVKMTcX0SjFq3Gvd8Y0ChoGjecvgk/DfUOF/zhQE2Dp7rAu9Mgt/D fRXJnxmQzZSlXng8Cc0cJx0B77cm22MLDzVOwtXsJ24nmhkQlXZKehPXFHQO TVZllTCA35+TUH57Cs72C7jejML1RLOD77bEKbA/3tDTcosBJ4Wrh3LSpkD8 TqcHMYwBRUUer+4XTcEhlsjKFVxfWI188w/5NAXGDPPZTT4MiDuUN7lfZBqe fGqeC7NngIjqgc6hB9MgslYjsEaRAeO8mSJtWdNwlSXc8kge7/9jtGOlBdMg etOQHbSZAeeepPXfrJ2Gg79/y2lIMqB2w/SkXN80/MrKTnITYIAT723COYnf 4KK/aLiORofnlHe6kym/oeVT5wvvl7heyzTOnkucgZCGr6tJQIfotq7B8Ecz wBIae6OsT4d3VKcN4jkzICy2AdXspoOpSdB/elUzkFfRFfxhOx2MpyoCw3tn wLnDyKp+Ex0MdilarZP6Aw1tR9k9zHnQeM/L0Mn9A8vfu0y5C+dB4m+H2Y2a WVD1OHGWwD0Pae9fchIuzMG9I/YHG/B5zUB676rsOSpYXHi2YLNtDraRhSkh V2jQ0XbNtl7yD7woEHWv8puHz/yTMr9kpiH4l+O3bVF0EH5bELBDagLo5obp rrF06I0pEhMQmQDPMim3TFx3rthvH5/lngCHiP5F0ft0GFTed+z933HYo3pC fjEfP8elZ94tb8eB7X/Mt+0DHXwEYi+wPMchQPDAWldBBkjv3RZ4t2UMfA10 D2QkM8DH8l/MtVgKcHgl37j3AM9rWIvo5zAKxGXOVdzEdWDKx5m1atcoUMj1 TOpsDgMedsnf/OdGgZE2yVnlSgZ82WnKXjClwDHbpfgyHKeiu7eZOBMosNur sacF10FkRVKJdMQotGRuXFO9ngklcpsLvIJHweZLAORvZMJmstXE+yuj4KW1 o+C2PK6rVLIOJ7mOQv5i5jXrnUwQ9M26Hmc+Chuiw6T6juB9aIe63ybBUVjM NHH5HY/3hbW9jbUZI2C0YJiomcKENbTxpXv3RyDMWqc58CETx3tkh2/8CJCW t8oTn+J97dztfbbhIyB+cu2IVAUTJKIUTR7jOk1j3c8z1t+ZILOxwlJDcwQu X/yWkPyDCSam3/sqVEegurnjzc9BJrwaOOFivGUEDH1fy7mN432DY+PNmxIj YNmZM3xjAffHTCY+bGUYXGO8z5RJLkDp5c3bH3cOQ8GQe8KC9AKsu59u8LVt GGZ2u7wxlF+A/PF/OWJvh8Fv7Jhcu+oC3NM9kFpbMww3jfcMj+gvwMo5lHjn yTCk/SOeWee0AJYb30ScDByGLp+004FPF+BpnlhDI66LVeOFl67kLcCjazd/ lysPw62SqBS/wgWoSnsYUaYwDLtn/dovlS9AT+xWYuemYUi/eEDrXPMC0NLM kyNwne1x/h/vkZEFyCLI1k7/JUNLpN9T6/EFOPKzfG00rtulcycNrKYX4LnT GYL6FBm6Rrt9zWkLcHJKr/3RCBl0zrzoN+RiwVpvovzCdzIQTzmVqMqzoMtD 06ikkQxOQd0WKkosKDDrT2LWk6EmzZKiqMoCe1X94v11ZPD4sVtSbicLWDn8 ewQryfDl+NpbEsYsOJrkPS1RSAbVgEhpcTMWvCm797QqnwwRKUs1opYsONh2 XMMplwy63RMzgjYsiHiV1/05iwwZR5qOE11Y8OHUzBXtB2Rg+eymcp5nwTs5 +bWqqWSwiX9+Z/UCCwI/PP9vazIZuD8/aFr0ZYEX30Uji3gyeFr5qlLDWFA9 qPVozW0yvLs40TIbyYKphcUIu2gybL7j6DxzmwXcziHOxZFk+PrBInkigQWl moYzweFk0DOXXxl8wgKPfpvb6cFk0Mpuj3mfywL1Xo+f5kFkUF/1Eyt7hu9v 4a37d40M8jVvVSLKWCAbS5WPCiSDlJhnxaUqFuyr1is9ic9d673XGdnVscAz cLlTz58Ma5Rdj6q+YQF7PL5F4jI+l90S/CXWiu+flkhf70cGjqEq9+U2Fs4L t/llfclAT+UJ7epiAdFHP9/GmwyztGLSy24WHKj42xuEz3mT1nZJ2X34+V9c ySq5RIZBnoKCADILamKuLe32JEOfy+FdpyksUAtSuRd7ET9vI6vBYpIFfGY8 DZMeZOjY+GT/rhkWFG1OiTyC/S7A4pvUHAsMqq2nWi6Qoekr1ZGHjudzR86k MfZL9bTJvwssCFVeufXRnQyVscaXfyyxgFz2qt4Ju2R8erl5lQWzdjrx/9zI UGicFPOcwAYeyQbOXOycDH2xVF42gEeysD12xuJo+o01bBDcvfRKHPvB8bsq F9ayQXlAiffXeTIklmtV2IixwVDT5G8p9l2hQUMDCTYMhwb6x2FHeUS2KW5i g8OtgYcB2GHvth9du5kNib5Rpy5gB8v3DLLk2UCg3mg4jx0QGuo+osSGXOmP r7ywfX4qzX9UZcNS9JmTYdgeuz+HVKmzQUhbKzUD+1xiIClzJxtCM7b5vMN2 mt2cFLObDffLlSdZ2PaWbdJ+e9jg3b26rI37fzTPp8DBiA2kgfCyEGxrLsld psZsuLU+kKsLe7/TmwZ1MzZYm6XNqeHxMn55Yf8GSzacz34SlIxtsF70G6c1 G5L79bJ58Hjv9nvp+PsIG16L8rrdwtbodJnstmUDGs15x4/nSzGqYjnfkQ1E gVQ7PTy/siMOMQln2BA5w4gmY280IooFubKhMhBsEnE8CDGPqVhfYsOOD5bl 4jh+SDbL5Tq+bJAd6DabwOYqzjWU82eDutYPv7c43hZcmTb0YDbw3rsV9wjH I+1NxuDgTTx+lS+C7+N4nZE2d38fwQan8ydX03E8k7/fD0m7y4Y20fHGdhzv H0z1CtBjNuzvSxbMvk6Gq+9D1W9kscG+USZeGK8vFYuWyoYcNsQZ2ofEhuD5 tDr0Zs8LNqhy6CRm3ySDyVHXn1qNbIgQTw/ywOuX3l14+nIzGxj3/m7Vx+s7 +/jceNk73L+H13dvuIP7fzJoXv0zG6IsZM8uxOH4PZ0gsJXMhtl7rj0W9/F8 j/QkulHYcGHgtnHIQ5wPzklJ5k2yQVfq1vKrR2QIdctXVKDi6xaudmdwPjLw ajCS5loEk+rLpwxxPqsJmvIR2bIIF9VFElETGc4vqy8cUlmEcs3Grzpv8Xq/ cSUkTm0R3ke37NF/R4Yr4au312gvwhzvRf/zHWTYeVs8m9tsESyibhhb/yBD cere72y3RXgS6Bh2moHja0O0g67nIiz2ZrRtYJNBMK1jOMBnEVz3mRMH/+H8 lm43O391EahnIyxvE/H+kXOJd/b2IpAdDJ/7rBuG3LKHeiNFi/DVydMzcDfe H5YcVPtKFiH2gEVi1p5h0DCV2dRZsQjja87//mY0DK/6nv6rq18Eff3IrSfM h+HbatHrhI+LoKKT7DdoPwyc1o2me38vwvKXTJ72kGFwnB45kqW6BKn8i8sS n4dBXivXOFV9Cfzaf++52T0MkyFuu+7uXAJ50wo12o9huCIys+7qniWwn+mX mqcMwx1dRu8hyyVA+jGl7kvDUBfF67R6YQk83zkmyeD9WlxBzcPp2RJcdRbf khQ3AvGJd44/e7EEX+NsvKpTRoCf67cxvQy3L3PWlfJ4BDiGn22KfbkEDSEn jE4XjcBMhvKnqo9L8E9/srenbQRaNipoCM4uAc3R42Id9yhcEd3IrN/5D7aK mG2RjR6Fr5ykcMlX/yCpIPpDVR4FZl88dDrc9A+Y6rqCm/C5me/kNv3oln9w PkS2MKaOAqjcmk7v+Ac/nf90BHdQoNgl5XzXILaidvN7GgXuvJU/EL36D4aM OMvJaAxMIg3XMYyX4cSMp8/QyBhUkS7ndX1Yhi9flB9zGkyAmriwh0vrCizz TeQp/puCv3HMdbt6VqFRgcPBUP0PKERH7/D24EAGh2nVHRvnYORk/0/jCQ50 ITXVXDyWCvvHvrGrvDjRHtJTlucCDUK2xQWV+HAiGREdbfd/NCj33b9c4MeJ apeN75/mnIdNK684HgdwovpdTY3718zD7Po83vBQTnRzE9depsw8JO+/Km4d x4ku+AdYvjWdB3KRlOb4C050KGlv79qEeRCn9ZQPlXAilkZ9+bOUebDUTdD6 UcaJ5rlaj6C0eaho4dbtqOJE7QZbP5/NnoeowVmj8gZO5LBgc/VW1TyorX1j FfqJE90957VB4cc8XPVzdV//hxMZBfhOdUnTIebArNuev5xIeB2lwE6eDve3 BLo5UTmRmY2nzk8lOlT3xJzPY3AiboGIqq876DC/5/m53Suc6MeHE8Pxe+ng RZg/fXwtF1IYqT4H5+hwNvnmiVRNLmS1apJ0JI8Ofpf4TrzcxYV+rCcXWhXS Idws0f6XNhdKrcjR21dMhyxWtp3SHi4kb7S2Qr6aDr9OvbetNuZC65VOfCts pYO9opBNz1EutGJC+jg4Sgfr6keW6wO40MvX0PRaigHu8y6r4le50AZpNb4Z fD66paFaKX4dtx8guWWdAj4fFdZKi4dyobbTp9vttjJAPvP7nFgUFyru8yp/ rs0AZvTa+yKpXMhTQfzTnYMMyDhxa1SgmguJuR6hrb+O70+1fCBQy4XK39tK 1Acz4Ns3kYMCL7lQ8PbvUydvMIBknVW9ppEL+VK/J/0XwQA/44bb/O+4kL3f B0pjHAPMti3sIPVwIRVj0a7DTxkw+88jmMDkQmU8Y47b3zHghP2BrewFLkSj 2Z3Rb2NAS8W2nlk2F+I5/UXVtB2fIzxmdvxc5kKX5wuErDrxebXv0mgpNwEd tIkUVe5hwKMKH0sncQKaUF0dEBljAM/aIwtHJQhIdaFacWAcn1s8NHMsJAlI IeU/zaeTuD9ytGUtaQLq1vNIlJthAC3uctkaRQLyex119Q+NAfs9AjbUaRHQ Ddtsct0qAypaj7cW7yYgq+RDTogT1/1yOn45ugT0Kl8nq5mLCfO9Cx/vGRBQ REKc70tufC4xvXbjvAkBLdxePhy4hgl02eBxsWME5G4gY6qEzzXOwaeS+I4T 0O2N0coXJJjQ3muAVu0IiGeD2bf8DUzIjFt+OO1AQBr592M2bGKC5b/Qg2/O ElCkjszV95uZ8KQ3rNLrMgGpvTCjOKgwYbxVYyjOn4CeF2iI+m5lglrlEF9J IAH9vVFmG6bKhOp4Q+e/QQT0dK+AXJIaEzos2Hw+EfjzkMtokAYTRHULtOKj CMggXrLvgiYT7JTsnEtjCAi2SE3b4HPVCFdV5dxdAlLsNfZYr8UEVr2Ps28K AYmYrrBddJhgVLg5NuE+AQ3pfF3YqsuEWw86K8seEpDDxOKmGWwhfzV+Wjoe n+JdA2f2MOHo2X4t0SwCWo5svS6uz4QHR2Kddz7F45lSYtKCraA+WemXh33v g7OYIRPcpe4PJRYQ0G7F3IoK7GJ+M/6KQgLSM9XQPWSEz1ET2c7zxQRE+TLW FwhMsM5y5r9SQ0Cbwsey7u1lQnKckHZyHQEVW2k85TNmwo/gBufKegJye/51 KBT73IlNVfTXBKS17dh6h31MeGbePrSumYDWb3QQbcae1b7Gr91CQCQ9viNb TJhwTbTX2b8Nt/d15PFP7EaOqNiUdgLK+u30Qt2UCcS/WlVVHQSkdFGBNxTb YnB06HsnAekcHCtqw477mMjP7CIg7kdO6UJmTOiu26u9/hsBFblbDx7CliyY c979nYAyvl69dBfbKTUz9ngvAckt5R1qwc6JsK4K+IHb482PXMCe9lseSu0n IGkZKxElcybsOPOcv2aQgKJcvOiHsK8cctDuHSIgAfq0hj/2S0P+0wvDBBQ4 nd32v/efq9vqYiUoBOR19GbD/97vmmx0r9IZJ6CGHZ4iH7BjSRJku0kCSvOx f9eP/ZnZyn91moD66Ht+TWGvG8PHphkcH1FCDvPYJ78pnK6dJaCdPV+N/vc+ N/PN19i+OQIaDbp753+mlIRVsWgE5D9nso/+v/etGRrkDQwCSrnL7/4b2/vu EL/eAu5/5NzSIHbl9TjtE2wC2jotxNmBvehuePraEgFtzAq/VoVtWa+K/JcJ aE9Y04nH2I8EN8j6rhLQ5V5J8xvYM87cHJc4ieh37ZF9TtgG5bQhdwIRDf9S P6yHfZdIfn2Om4huZQd5C2MPHv+UeZqXiJpXubNH8fiGLuU7268hoiJvaetQ 7M6DKXBMkIjOBdl/MMXenBW++fBaIvLg336aD7vJxHHIXIyI5NYoTUbg+Ra5 b/l6nzgRZYuKDxpgu0zpZIIEEd1p2cn4398DCHGizjqbiMjJvjr1IPYx8qrR LmkiMlYkbGHi+MvZ+Udmx2Yi+nnJaiAN26z3/S8lBSLynmj73ofjN3VrVaO8 IhEZCq1u9MOeCHqaIaNMROn3dZJ4sWNkQ5zWb8PPT+/foozXQ5+fh5HodiK6 EXLeuAwxYWurnYzQDiIS+6TxSAe7/cLOX9y7iOjwwgSPHl5PAhUTjow9RPSQ acu1Fq+/U9zfDakGRDQka6AdZMCEF3bN0n+MiIg+crNyFK9f63+PBynG+Hox I+sZXu/xpjaO3ZZE5B86782H8wH5Phh2WRFRGVPaxB7nD81pNekOayJqPPk4 IHs3E9ddvINvbYjIRLZzVV0bx1ffq1MVJ4lozS4rykacj86pFhqUnCKilmzT GSucr6qC70sVORFR0pMTrv/LZ8fl/AaeuhDR+jjfyk/qOL94KJ9K9CAio3NX +PdvY4L0coKD73UimknIaUpRYML+kYN194OJ6JEXef6aPF4v7/kkGkOJSHH5 rspJOTweCWFf+W/h8RQNyBbC+TdAydci5w6Oj6ebDfdvZELXocM6vY+JiNNo gM0hzIQlLYGU5Qwi4l3u+pEnxASljW00hSdEpLyPQNsvyIRgXML55BKRFNnx Rxg/Hv9rOxT5i4kocK3P5DsiE8KfCokZviaiqqlY3ScsBryIbvc5+4aIFATO HBJYYECfZ1Tn7bdEZG0r8+MygwHqOiu3e97j/lRePaaL96/+j384fLrw+Aen 2d7/zQAtRsfs02Ecv66OlNJBBoyb32knEbmRe8899qXXDHA5cFpWkYcbvWev nrrawIBBa+2AvSRu5LlO4/ONegZ02w7JXRfgRlNCZX8jaxjQfHbXtd/ruFHp BDXeu4QB6Tf6lTsVuZGy0tDP+gwGHKvZFplkzo02yz81tg1iwFulDpC5w41S i5y9r25ngGXckOX6/7iRpenOq2LbGNDFoNkK3eNG1QaDg89VGPCrRdJzJZEb sTssO3/i+oXl4vbgVxo3cj2d80xhIwPUMrmoGYXcqMcgIdSThwGpEnpPN7dz I9Mnnn70QTp4kPKIcnw8yHSjsFPxbTrUZG0xfJvAg+R2rZmK+zgPnfoGrTYi vGilcq4gE9efsbX+S2ZivKj68vjIeql5MNcu0dQX50Vhc56W9yTnoUldPkNB khd9cBIsubUO15typEC6LC96LOOoEsQ/Dw94u1VSNXjRSL5gdj6TBme/Xbz7 4xAvaj4iHS/QRQPZw7nNn47wotzxz8kln2gw0PGL9eYoL9qw4KR67CMNjr87 4lpox4saK/6KPX1Hg/11OkZBzrzo+UGPXUcaaKCeSZiT8uZFFYwmjdVCGrA8 Hh09HceL4ofSRIqjaXDvejbvjXhelHExa+fJSBooxRbVpyfyIp0O/VTSLRrY PqtX6E/Fv+/zeadnKK7PJ/rnbTN5UcIt8uZD/jTwPCeVfKCUF1n/cCmLOksD smN69+6vvKhndvu2b3tpEHgpN8a2mxe90Tk59wloIBTywuBKDy9i6vY6fjSk geHjhpyyn7woqMXfsFOPBmk/B6+ojfKilLG9p+maNDhmJyMuT+dFcYVhxS3y NGg7nGkruJ6Ejunwucbw0MCjZayRdwMJDQlGEBaJNBDUVVPh2khCj7zfGHgR aGCzuW6RKU1CKySraCcOGvT/+ZpJViShjI+nyp0WqTAbyzNdoU1CRokKhKFZ KsSvWB0t1iGh6VwtjaA/VNjll/SqQI+Ejr5PF984Q4WrJ2TvpRuSUPb0OeHT U1TgUtmjFW1KQi3TQQwBChXEWy+FnrTF10/8/vv7BxVqdSsnjtnh/rHoHpV9 VDj5fPHwoRMkdHrep/ZGLxUykqIVTBxJKEeovUvmOxVUXJ60bXclIaueENkb XVQwWO0W5fQnocCa+aAP76nwy29T8FIACSktfP/4+h0VwsbPjDGuktCfumJi XSsV3n2arZkOJiHe1XO7K99S4dBjkmN3BAlt8F159ek1FVz0DPLzk0mIeezu 2bhaKlz484kxkEpC4XtSHqXVUMHnibOJ6EMS0vOPv1NYTYUbfLeGg9NJSFJK 8+H3Sio8/vFhk00eCQ3opCXal1Eh+z8Hj+gCEqpKGiwLL6VC4d4/ta8KSaj7 qlxyaQkV6p4JH1cuIaGX7s15EsVU6LlmF/+vhoT4Dr5VEiuiwuD2qV+aL/H4 xMbddCikAmX4+na3VyRU0fs3L/8ZFeYtMtq/NJGQ+mCn44ECKghvHCPmfyAh izNbE5pyqSDRGXB04CMJ1biwPZWxZcJJT0U6SUh+9zXpxBwqbJ/eBsFfSegH WYHjcjYVLF/6XTvST0I9AhIUlydUOOJFbIsaJKEHmmEhk1lUsJdPXf9qiIQu xO2m+WK7xdZVKFFIKCLHySc+kwpeRge4To3j+dihEaSIHUAbOJwwSUKCyfzn GjOoEHGSY3ZphoSSbG2/LqVT4Y5QooHmXxI6Y0e3z8JObFa4c55KQgJB7Nf7 sZ+omqt8YZDQPYkjmrmPqVDwqy+Ah0VCqnNPDE5glyZ6tOovktBEga2qCHbj 4n8ueSskpEXIKr77iAqtxZvL+jn4ELGIaHYYu8OlbFWYwIfcjdzfSGB3r99n bcbNh/ZmycuNplGhv737cRAvH3qZG+lajj0Sev53KR8f6hIfjIvEnt7J0htf w4fWPPNKP4VNHb8ds0mID/HzXU/QwWalbeo9LMyHjLt0L67HXrV+oRglyoeq b/9SZT+kAg8BrtSv40OZpQ+6hrAFa7qa59bzof2lcafasddddBFRkuRDP0aH O2uxN22mOzts4kMyqS+Ui7Dlv0UWx0vzIV9OXrcn2KrREsutm/nQg0PLd//3 /5ma+s8OLMnxof///83/AyCyihs= "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{0, 0.5}, Method->{}, PlotRange->All, PlotRangeClipping->True, PlotRangePadding->{{0.06283185307179587, 0.06283185307179587}, {0.017, 0.017}}]], "Output", CellChangeTimes->{{3.5879238182138042`*^9, 3.5879238549200377`*^9}, 3.5879274596842957`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju0", "=", RowBox[{"LinearModelFit", "[", RowBox[{ RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"LegendreP", "[", RowBox[{"2", ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}], ",", RowBox[{"LegendreP", "[", RowBox[{"4", ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", "\[Theta]", "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.587923877343814*^9, 3.5879239832121525`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ RowBox[{"1.02169696969697`", "\[VeryThinSpace]", "+", RowBox[{"0.2900865800865802`", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", " ", RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}]}], ")"}]}], "-", RowBox[{"0.06659740259740259`", " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"30", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], "+", RowBox[{"35", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "4"]}]}], ")"}]}]}], Short[#, 2]& ], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Linear", {1.02169696969697, 0.5801731601731605, -0.5327792207792207}, {{$CellContext`\[Theta]}, { 1, Rational[1, 2] (-1 + 3 Cos[$CellContext`\[Theta]]^2), Rational[1, 8] (3 - 30 Cos[$CellContext`\[Theta]]^2 + 35 Cos[$CellContext`\[Theta]]^4)}}, {0, 0}}, {{1., 1., 1., 1., 1., 1., 1.}}, {{0, 1.01}, {Rational[1, 6] Pi, 1.33}, {Rational[1, 3] Pi, 1.2}, { Rational[1, 2] Pi, 0.5}, {Rational[2, 3] Pi, 1.07}, { Rational[5, 6] Pi, 1.35}, {Pi, 1.16}}, {{1., 1., 1.}, {1., 0.6250000000000002, 0.023437500000000444`}, { 1., -0.12499999999999983`, -0.2890625000000002}, {1., -0.5, 0.375}, { 1., -0.12500000000000033`, -0.28906249999999956`}, {1., 0.6250000000000002, 0.023437500000000444`}, {1., 1., 1.}}, Function[Null, Internal`LocalizedBlock[{$CellContext`\[Theta]}, #], {HoldAll}]]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{{3.5879239691953382`*^9, 3.5879239865718117`*^9}, 3.587924048858334*^9, 3.5879250348014946`*^9, 3.5879274596999245`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["intervalo para decorar o gr\[AAcute]fico", \ "Section"]], "Subsubtitle", CellChangeTimes->{{3.587924081251704*^9, 3.587924103206688*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ErrorListPlot", "[", RowBox[{"ys", ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Theta]", ",", "\[Omega]"}], "}"}]}]}], "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"1", ",", "0.6", ",", RowBox[{"-", "0.5"}]}], "}"}]}], "]"}], ",", RowBox[{"aju0", "[", "q", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "14"}], "}"}]}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.58792400302633*^9, 3.5879240241687455`*^9}, { 3.5879242328739176`*^9, 3.5879243160684624`*^9}, {3.587924412920413*^9, 3.587924442985459*^9}, {3.5879245845130677`*^9, 3.5879246036553135`*^9}, { 3.587924641268175*^9, 3.5879246466436305`*^9}, {3.587924742589255*^9, 3.587924806141511*^9}, {3.587924868709309*^9, 3.5879249457783327`*^9}}], Cell[BoxData[ TemplateBox[{GraphicsBox[{{{}, { RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., 1.01}, {0.5235987755982988, 1.33}, {1.0471975511965976`, 1.2}, {1.5707963267948966`, 0.5}, {2.0943951023931953`, 1.07}, { 2.6179938779914944`, 1.35}, {3.141592653589793, 1.16}}], {{ LineBox[{{0., 1.13}, {0., 0.89}}], LineBox[{ Offset[{1.5, 0}, {0., 1.13}], Offset[{-1.5, 0}, {0., 1.13}]}], LineBox[{ Offset[{1.5, 0}, {0., 0.89}], Offset[{-1.5, 0}, {0., 0.89}]}]}, { LineBox[{{0.5235987755982988, 1.4400000000000002`}, { 0.5235987755982988, 1.22}}], LineBox[{ Offset[{1.5, 0}, {0.5235987755982988, 1.4400000000000002`}], Offset[{-1.5, 0}, {0.5235987755982988, 1.4400000000000002`}]}], LineBox[{ Offset[{1.5, 0}, {0.5235987755982988, 1.22}], Offset[{-1.5, 0}, {0.5235987755982988, 1.22}]}]}, { LineBox[{{1.0471975511965976`, 1.29}, {1.0471975511965976`, 1.1099999999999999`}}], LineBox[{ Offset[{1.5, 0}, {1.0471975511965976`, 1.29}], Offset[{-1.5, 0}, {1.0471975511965976`, 1.29}]}], LineBox[{ Offset[{1.5, 0}, {1.0471975511965976`, 1.1099999999999999`}], Offset[{-1.5, 0}, {1.0471975511965976`, 1.1099999999999999`}]}]}, { LineBox[{{1.5707963267948966`, 0.5700000000000001}, { 1.5707963267948966`, 0.43}}], LineBox[{ Offset[{1.5, 0}, {1.5707963267948966`, 0.5700000000000001}], Offset[{-1.5, 0}, {1.5707963267948966`, 0.5700000000000001}]}], LineBox[{ Offset[{1.5, 0}, {1.5707963267948966`, 0.43}], Offset[{-1.5, 0}, {1.5707963267948966`, 0.43}]}]}, { LineBox[{{2.0943951023931953`, 1.1600000000000001`}, { 2.0943951023931953`, 0.9800000000000001}}], LineBox[{ Offset[{1.5, 0}, {2.0943951023931953`, 1.1600000000000001`}], Offset[{-1.5, 0}, {2.0943951023931953`, 1.1600000000000001`}]}], LineBox[{ Offset[{1.5, 0}, {2.0943951023931953`, 0.9800000000000001}], Offset[{-1.5, 0}, {2.0943951023931953`, 0.9800000000000001}]}]}, { LineBox[{{2.6179938779914944`, 1.4600000000000002`}, { 2.6179938779914944`, 1.24}}], LineBox[{ Offset[{1.5, 0}, {2.6179938779914944`, 1.4600000000000002`}], Offset[{-1.5, 0}, {2.6179938779914944`, 1.4600000000000002`}]}], LineBox[{ Offset[{1.5, 0}, {2.6179938779914944`, 1.24}], Offset[{-1.5, 0}, {2.6179938779914944`, 1.24}]}]}, { LineBox[{{3.141592653589793, 1.2799999999999998`}, { 3.141592653589793, 1.04}}], LineBox[{ Offset[{1.5, 0}, {3.141592653589793, 1.2799999999999998`}], Offset[{-1.5, 0}, {3.141592653589793, 1.2799999999999998`}]}], LineBox[{ Offset[{1.5, 0}, {3.141592653589793, 1.04}], Offset[{-1.5, 0}, {3.141592653589793, 1.04}]}]}}}, {}}, {{}, {}, { Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12nk4lN/bAHDMYAhZkhSyZEkSRchyn2SJpFKihFIiyVaoLEW21Ff2SlnK GmVfE0mUJKmEQgZjTTJjZswQ3vP74/UH1+d6PHPOc8597nOfBzkXbxtXLg4O jnT87X8/Ca/5O0e1fY1qH/7viwqKU436MkmH4PEOF5VH2IulO879SHQGZk9G dyZ2GRO+ixS7QWqzRUY+9tg6d1Z1ojcYmp+ILMe+K9kmWFx/GfL6X99uws5T OZXJURwI2Rs8i75gN+nMaRzNCgLhuv3TY9g/zSKacxNvgECagdny/9pTFVAN bg4D2kvV1xJpVIje2eOXW38L4g1px7Sx1+3Jqu+sjAR03ov3OPaTvR5E1oto 4Hwc0HMNW91C66Bc/m2od//1Jgu7/vBKimXWHXC45v+hHfu7c6JyeuI92Nl+ Sk3lEX6eXeq6o63xYCSuF+2AHaiTNBDYnAC6L08tJ2ATwVHxSX0S3Ktw20N6 TIV24+YP2rXJIKL1imM/doKZsld7ZQo4uO0cjsWWsaZWz7+4Dzy9u/5KplOB cuS4Q0zhAzD1EJQ6j11kW78qlf8Q3jjlnqnC1nWM3G+W9QimmsK1HTOoYOMp +fNBYia0uRnQv2RSQUAXXqeaZ8E/pmf/7iwqzNX5igy3ZsHenIHeDOzqhp4q /+YnYNPmI3T1CRX2tWatZNRnQ2DTibOHsqmgZP7t8JReDszm3hnrwOb/wJ29 qzYHAjhjrh7MoUJXh4d5W2UuXN3q2GmXSwXHbq146ot86NJYq5yQTwV03G1E X60A1gWaSisXUGFL30OtqMICUDswKNOEPd2/0rcx/xnQ/mrtXXqGx2+0Tc4k qwiCjd/PpDzH40M7VZGaWAKUZFXFU+VU+E88zaBJsBQC7w2gXRVU+FoWuVnb phSCXniQBSup4DB9akymvxQIohJ5n6qo4OWwxpc2UwZzAn7KgXVUSDZ0j3ko XAkewec++7yhwo8fRy8K2VZCgU1V9I1mPP4BYH3rYSXY7gp9kfCWCvnF69dd kq8C0hs1/aZWKrzc3JqJtKphRe+bplk7FYY45Wsm7GrhrmeIKP0bfr4MwbRT j2vBmiDWr/udCu572MFfyLWQFfOCcbOHCjS/LuP6C3XwX+J5yU0/cHxQQjvj gl6C1wTfWMAvKqi+6x/TznwFzfqSne1TVNBvteQ3vtwEec27ad1cNBDuzvus k9QEnAmE5LNEGlBGuFK2VzRBz4ZLv+jcNIjjqN8sOd8EPLcIrpv5aDCiv017 zu8NWLKYq0lraRBTvuZ0hl8zWJlfvM+WokFPZkfVom8LcDTd+5OnRwOf69Zn KnzaQLbbO5B4nQaWXgYFpPg2uPLW+5JsMA0UXFT/Opa0Qahk3SmjUHy/BU8I abYN+DbdkboZTgNDycYHjhc/QFD4oZ6Nd2jAX7u9i/d8O9Sq0r8WPqZBLkMA Tjl0wOWzSr5yb2hwqdY1jkuhC/5NT15pFZqH7kkLvnyXbjgRzM9SeDcPsTuY HNUn+uC/Yf6olQA6XA+02Dbu0QdjJVu0adfocOH1Y9v1wX1gJSKtMBZMh/2H 9hUGZPRBSDFHQVs4HXi944/qjPaBqwr7Y2QcHSKKVfNqPX8Ao9deozuXDqHb nQ/U3/gJiR9SJTK/0cF3W1tKU+4AtI6WVA2oMoDiSrmZVT0AGX9Hgy5tZ8Dx LA7Pm+8H4DZr5tS/HQzYI65njKYGINc913GdNgO4Vp/NvlYbhFeT4oNqwIDE r3fMX1cMQs7enfQlGwaUXzvEbnjzC3jnPgzMX2XAlsqLlPSvv6AjiCcQghiQ Ohv9OWT0F1gcD82KCWHA9bNNuYbcQ3CIphovFs4A44OaNg37h6BG2MBzzR0G fJMVK3r1eQiufknxvPGYAYtnLxYPepEhNfh1uUMDA06LzF99FUAGHorx3R2v GdDaeH3fo1Ay7NTf1c3xhgHxkrF99nFkKDub+PRRCwOUPxdwdb8gw/ttpuSy jww4tmf8ePsMGfyUrGWcfjDg5cQluWd0MoSwbp/l7WfA5hTG7+h/ZNh+kW/s xQADpv8Sw0wFhsFMLTWeNsSAsFyFoqZtw/Al45XWyXEGFAufWa32GIZSdsra LBoD1jVOfkjxG4aVazXFm+gMuHbRJ/nK9WGoq9c9mcxggMm7G1t3xg7DVqHq 9mAWA/qDMo6+eDYMQvUFTVtXGECa6M/PnhwGntKtYVQSE7ySz/qFzw3Dczej OAN+Jnzb+9vgDGsYgkP2X49Yw4SMx4tfZEgj8DHJkMIvxARtG8l/D5VH4PBf 8wqqKBNcGo4fjj8/Ap8O1IxukWLCzuoNopLeI6D2cIPQMWkmcJX8/PYkcASq 7gvb35BhwtMsJ7uKmBHoj8k2bJdlwsit8049hSOgddiKrqHIhPJgFVnnihGY rzZqQkpMCPefHp6oH4FbCX8SrJSZIO/m5cruGAG9U2Q9+624fcsAT6m/I0B9 lmEC23H7+3TVcxdGQDljYFxdHbdvsPh3O8coxA9zBmzcgdvfHnoZREahVnjC ekwDty8cdd1l1ygUxVvet9DC7fPtN/itPwpXFLutNmjj9rn4Vy6bjMLX7SG9 I9jy9P/CIm1H4f3xR6cv6uD2e1NiCgJHwd//H9ViD26/y85S8+YomPTbcSxg c32QFHgZMwpPeWU/Zerj9l+m3/v4cBTcD1NTKQZM8KtwPnLs6SgsT4TH3TRk gvFzObHBwlEY2Jeot8EI9y89N3W2fhQev/TM3AO4f6lu9oEtoyBzmnKsFTv8 3taNHJ9G4dz4zooDCPcv7EW6yK9RuNA65HxgL+7fuaocLQ4K3IL9muv34f45 Bp5vIFGgPVxpLASb67ieipkIBfK+XNg+jP3UvKHITp4C5BEj3zQT3D904xJZ lQIipBm3OWxjvb07LuyigCG39tReU9w/1dby6yYU8NDgDu/FLleIvkI4SIHS uE/Jm8xw/6Qsdt+1pQC3WqWKA7aN+BrWOicKiN1x1U/Flhf6VJd+ngL3WInt Hdg0nntBSt4UuBRH+7aC3bx62LAkkALiOmCrZs6ERJboqs5NCkSX6lrZYp+l djc1xVAg4l529TXs09fj7Wrj8fWRRw/uY58iWM2WPKCAJmPmRhn2ibu8kflZ FPh4/IvHe+zj4m83ZRZQ4KFVtN0PbJuM0PLUUgpwdh82mcA+pLzHIq6WApU5 l3dQsa1KGUORTRRo26knsYC9X68sIKSNAj9LZ9ksbNNmT0H/LgqoiI59Z2Ib H1DJ8eyjQK6A77M5bKPu0T3nyBSc/3/7jWPrO2Z+cZikwFhoiUYftu74Sfej cxQoMpYZbsXW8l6/asmiQLX+o/ASbE3WlxRjjjGwFIgTS8FWD/tPbQ9pDB4o uiQGYKvyW7zVFB6Dlx+ilo9iKycRT27dMAbPBL2PbsfeItU0Jys7Bjv7ExK5 sGVzg6I3qIzBFO1C3Tc83tLqOjLCGmMgNuv/Lgt7Yw2tkld3DOKRbu0FbLEP F0aY5mNwZc3yvr94voVtFK/NHsKf/0aivwhboJ+8dtxuDCKsJY+cw+b5Y2f4 3W0MjJTUuttw/HAFiHV3eI/B2c4rv65gr650erQEjoH1GrFmKWyWsNmDiugx 2CwwvfY0jkf6Q84dRffG4GTUtcAlYyZQ5Rtan94fg0hugYpE7GktrfmE/DHw +in6pBLH+0TD39u3S8bALHD5MGBTzIpkw2rG4GFh7+dWvD4G7eWtfd6PgQPp svY7vH5+Dg9S3D6PgRtql0TYPR4Pg5x7x+D8dsO2Krz+uoKFn1lPjEGqemdo Ml6fzVkrhO284/AyfmznZryeG7e+TNuydhyqjc33B+L1Xl/uryklMQ4/lQdl PuoxobJlxmmN8jjscA9dc16XCfmTP+umzMZh6q/bO3ecT+5q1HjnRY3D+bjG 2Sycr9p39o77x41DmGD/0Tqcz0jaC46mqeMQuGyb+kmNCRF6OlaU3HHobblc OqXKhCDjGhX51nFw5g1RnMP50uNYzXA6YQLGNTpuauN8W3C81/7Smgk4SdG5 uAbn43H7hc8GYhPAcZmqMriJCWccdRr75ScArRyWuiLJBPvzNWmSxhOwqFHy 3XsdE8yv1hxNuTkBUbs26GTw4fav97afi5kAi8oWeU28fzQHL+zVip+AjC1x /a95cHyH6Wh8y5yA8gtXKroITNgdWyMg8noC6qJtmK+X8f79uKb17vIESLAd s7vn8P7fVKMTcX0SjFq3Gvd8Y0ChoGjecvgk/DfUOF/zhQE2Dp7rAu9Mgt/D fRXJnxmQzZSlXng8Cc0cJx0B77cm22MLDzVOwtXsJ24nmhkQlXZKehPXFHQO TVZllTCA35+TUH57Cs72C7jejML1RLOD77bEKbA/3tDTcosBJ4Wrh3LSpkD8 TqcHMYwBRUUer+4XTcEhlsjKFVxfWI188w/5NAXGDPPZTT4MiDuUN7lfZBqe fGqeC7NngIjqgc6hB9MgslYjsEaRAeO8mSJtWdNwlSXc8kge7/9jtGOlBdMg etOQHbSZAeeepPXfrJ2Gg79/y2lIMqB2w/SkXN80/MrKTnITYIAT723COYnf 4KK/aLiORofnlHe6kym/oeVT5wvvl7heyzTOnkucgZCGr6tJQIfotq7B8Ecz wBIae6OsT4d3VKcN4jkzICy2AdXspoOpSdB/elUzkFfRFfxhOx2MpyoCw3tn wLnDyKp+Ex0MdilarZP6Aw1tR9k9zHnQeM/L0Mn9A8vfu0y5C+dB4m+H2Y2a WVD1OHGWwD0Pae9fchIuzMG9I/YHG/B5zUB676rsOSpYXHi2YLNtDraRhSkh V2jQ0XbNtl7yD7woEHWv8puHz/yTMr9kpiH4l+O3bVF0EH5bELBDagLo5obp rrF06I0pEhMQmQDPMim3TFx3rthvH5/lngCHiP5F0ft0GFTed+z933HYo3pC fjEfP8elZ94tb8eB7X/Mt+0DHXwEYi+wPMchQPDAWldBBkjv3RZ4t2UMfA10 D2QkM8DH8l/MtVgKcHgl37j3AM9rWIvo5zAKxGXOVdzEdWDKx5m1atcoUMj1 TOpsDgMedsnf/OdGgZE2yVnlSgZ82WnKXjClwDHbpfgyHKeiu7eZOBMosNur sacF10FkRVKJdMQotGRuXFO9ngklcpsLvIJHweZLAORvZMJmstXE+yuj4KW1 o+C2PK6rVLIOJ7mOQv5i5jXrnUwQ9M26Hmc+Chuiw6T6juB9aIe63ybBUVjM NHH5HY/3hbW9jbUZI2C0YJiomcKENbTxpXv3RyDMWqc58CETx3tkh2/8CJCW t8oTn+J97dztfbbhIyB+cu2IVAUTJKIUTR7jOk1j3c8z1t+ZILOxwlJDcwQu X/yWkPyDCSam3/sqVEegurnjzc9BJrwaOOFivGUEDH1fy7mN432DY+PNmxIj YNmZM3xjAffHTCY+bGUYXGO8z5RJLkDp5c3bH3cOQ8GQe8KC9AKsu59u8LVt GGZ2u7wxlF+A/PF/OWJvh8Fv7Jhcu+oC3NM9kFpbMww3jfcMj+gvwMo5lHjn yTCk/SOeWee0AJYb30ScDByGLp+004FPF+BpnlhDI66LVeOFl67kLcCjazd/ lysPw62SqBS/wgWoSnsYUaYwDLtn/dovlS9AT+xWYuemYUi/eEDrXPMC0NLM kyNwne1x/h/vkZEFyCLI1k7/JUNLpN9T6/EFOPKzfG00rtulcycNrKYX4LnT GYL6FBm6Rrt9zWkLcHJKr/3RCBl0zrzoN+RiwVpvovzCdzIQTzmVqMqzoMtD 06ikkQxOQd0WKkosKDDrT2LWk6EmzZKiqMoCe1X94v11ZPD4sVtSbicLWDn8 ewQryfDl+NpbEsYsOJrkPS1RSAbVgEhpcTMWvCm797QqnwwRKUs1opYsONh2 XMMplwy63RMzgjYsiHiV1/05iwwZR5qOE11Y8OHUzBXtB2Rg+eymcp5nwTs5 +bWqqWSwiX9+Z/UCCwI/PP9vazIZuD8/aFr0ZYEX30Uji3gyeFr5qlLDWFA9 qPVozW0yvLs40TIbyYKphcUIu2gybL7j6DxzmwXcziHOxZFk+PrBInkigQWl moYzweFk0DOXXxl8wgKPfpvb6cFk0Mpuj3mfywL1Xo+f5kFkUF/1Eyt7hu9v 4a37d40M8jVvVSLKWCAbS5WPCiSDlJhnxaUqFuyr1is9ic9d673XGdnVscAz cLlTz58Ma5Rdj6q+YQF7PL5F4jI+l90S/CXWiu+flkhf70cGjqEq9+U2Fs4L t/llfclAT+UJ7epiAdFHP9/GmwyztGLSy24WHKj42xuEz3mT1nZJ2X34+V9c ySq5RIZBnoKCADILamKuLe32JEOfy+FdpyksUAtSuRd7ET9vI6vBYpIFfGY8 DZMeZOjY+GT/rhkWFG1OiTyC/S7A4pvUHAsMqq2nWi6Qoekr1ZGHjudzR86k MfZL9bTJvwssCFVeufXRnQyVscaXfyyxgFz2qt4Ju2R8erl5lQWzdjrx/9zI UGicFPOcwAYeyQbOXOycDH2xVF42gEeysD12xuJo+o01bBDcvfRKHPvB8bsq F9ayQXlAiffXeTIklmtV2IixwVDT5G8p9l2hQUMDCTYMhwb6x2FHeUS2KW5i g8OtgYcB2GHvth9du5kNib5Rpy5gB8v3DLLk2UCg3mg4jx0QGuo+osSGXOmP r7ywfX4qzX9UZcNS9JmTYdgeuz+HVKmzQUhbKzUD+1xiIClzJxtCM7b5vMN2 mt2cFLObDffLlSdZ2PaWbdJ+e9jg3b26rI37fzTPp8DBiA2kgfCyEGxrLsld psZsuLU+kKsLe7/TmwZ1MzZYm6XNqeHxMn55Yf8GSzacz34SlIxtsF70G6c1 G5L79bJ58Hjv9nvp+PsIG16L8rrdwtbodJnstmUDGs15x4/nSzGqYjnfkQ1E gVQ7PTy/siMOMQln2BA5w4gmY280IooFubKhMhBsEnE8CDGPqVhfYsOOD5bl 4jh+SDbL5Tq+bJAd6DabwOYqzjWU82eDutYPv7c43hZcmTb0YDbw3rsV9wjH I+1NxuDgTTx+lS+C7+N4nZE2d38fwQan8ydX03E8k7/fD0m7y4Y20fHGdhzv H0z1CtBjNuzvSxbMvk6Gq+9D1W9kscG+USZeGK8vFYuWyoYcNsQZ2ofEhuD5 tDr0Zs8LNqhy6CRm3ySDyVHXn1qNbIgQTw/ywOuX3l14+nIzGxj3/m7Vx+s7 +/jceNk73L+H13dvuIP7fzJoXv0zG6IsZM8uxOH4PZ0gsJXMhtl7rj0W9/F8 j/QkulHYcGHgtnHIQ5wPzklJ5k2yQVfq1vKrR2QIdctXVKDi6xaudmdwPjLw ajCS5loEk+rLpwxxPqsJmvIR2bIIF9VFElETGc4vqy8cUlmEcs3Grzpv8Xq/ cSUkTm0R3ke37NF/R4Yr4au312gvwhzvRf/zHWTYeVs8m9tsESyibhhb/yBD cere72y3RXgS6Bh2moHja0O0g67nIiz2ZrRtYJNBMK1jOMBnEVz3mRMH/+H8 lm43O391EahnIyxvE/H+kXOJd/b2IpAdDJ/7rBuG3LKHeiNFi/DVydMzcDfe H5YcVPtKFiH2gEVi1p5h0DCV2dRZsQjja87//mY0DK/6nv6rq18Eff3IrSfM h+HbatHrhI+LoKKT7DdoPwyc1o2me38vwvKXTJ72kGFwnB45kqW6BKn8i8sS n4dBXivXOFV9Cfzaf++52T0MkyFuu+7uXAJ50wo12o9huCIys+7qniWwn+mX mqcMwx1dRu8hyyVA+jGl7kvDUBfF67R6YQk83zkmyeD9WlxBzcPp2RJcdRbf khQ3AvGJd44/e7EEX+NsvKpTRoCf67cxvQy3L3PWlfJ4BDiGn22KfbkEDSEn jE4XjcBMhvKnqo9L8E9/srenbQRaNipoCM4uAc3R42Id9yhcEd3IrN/5D7aK mG2RjR6Fr5ykcMlX/yCpIPpDVR4FZl88dDrc9A+Y6rqCm/C5me/kNv3oln9w PkS2MKaOAqjcmk7v+Ac/nf90BHdQoNgl5XzXILaidvN7GgXuvJU/EL36D4aM OMvJaAxMIg3XMYyX4cSMp8/QyBhUkS7ndX1Yhi9flB9zGkyAmriwh0vrCizz TeQp/puCv3HMdbt6VqFRgcPBUP0PKERH7/D24EAGh2nVHRvnYORk/0/jCQ50 ITXVXDyWCvvHvrGrvDjRHtJTlucCDUK2xQWV+HAiGREdbfd/NCj33b9c4MeJ apeN75/mnIdNK684HgdwovpdTY3718zD7Po83vBQTnRzE9depsw8JO+/Km4d x4ku+AdYvjWdB3KRlOb4C050KGlv79qEeRCn9ZQPlXAilkZ9+bOUebDUTdD6 UcaJ5rlaj6C0eaho4dbtqOJE7QZbP5/NnoeowVmj8gZO5LBgc/VW1TyorX1j FfqJE90957VB4cc8XPVzdV//hxMZBfhOdUnTIebArNuev5xIeB2lwE6eDve3 BLo5UTmRmY2nzk8lOlT3xJzPY3AiboGIqq876DC/5/m53Suc6MeHE8Pxe+ng RZg/fXwtF1IYqT4H5+hwNvnmiVRNLmS1apJ0JI8Ofpf4TrzcxYV+rCcXWhXS Idws0f6XNhdKrcjR21dMhyxWtp3SHi4kb7S2Qr6aDr9OvbetNuZC65VOfCts pYO9opBNz1EutGJC+jg4Sgfr6keW6wO40MvX0PRaigHu8y6r4le50AZpNb4Z fD66paFaKX4dtx8guWWdAj4fFdZKi4dyobbTp9vttjJAPvP7nFgUFyru8yp/ rs0AZvTa+yKpXMhTQfzTnYMMyDhxa1SgmguJuR6hrb+O70+1fCBQy4XK39tK 1Acz4Ns3kYMCL7lQ8PbvUydvMIBknVW9ppEL+VK/J/0XwQA/44bb/O+4kL3f B0pjHAPMti3sIPVwIRVj0a7DTxkw+88jmMDkQmU8Y47b3zHghP2BrewFLkSj 2Z3Rb2NAS8W2nlk2F+I5/UXVtB2fIzxmdvxc5kKX5wuErDrxebXv0mgpNwEd tIkUVe5hwKMKH0sncQKaUF0dEBljAM/aIwtHJQhIdaFacWAcn1s8NHMsJAlI IeU/zaeTuD9ytGUtaQLq1vNIlJthAC3uctkaRQLyex119Q+NAfs9AjbUaRHQ Ddtsct0qAypaj7cW7yYgq+RDTogT1/1yOn45ugT0Kl8nq5mLCfO9Cx/vGRBQ REKc70tufC4xvXbjvAkBLdxePhy4hgl02eBxsWME5G4gY6qEzzXOwaeS+I4T 0O2N0coXJJjQ3muAVu0IiGeD2bf8DUzIjFt+OO1AQBr592M2bGKC5b/Qg2/O ElCkjszV95uZ8KQ3rNLrMgGpvTCjOKgwYbxVYyjOn4CeF2iI+m5lglrlEF9J IAH9vVFmG6bKhOp4Q+e/QQT0dK+AXJIaEzos2Hw+EfjzkMtokAYTRHULtOKj CMggXrLvgiYT7JTsnEtjCAi2SE3b4HPVCFdV5dxdAlLsNfZYr8UEVr2Ps28K AYmYrrBddJhgVLg5NuE+AQ3pfF3YqsuEWw86K8seEpDDxOKmGWwhfzV+Wjoe n+JdA2f2MOHo2X4t0SwCWo5svS6uz4QHR2Kddz7F45lSYtKCraA+WemXh33v g7OYIRPcpe4PJRYQ0G7F3IoK7GJ+M/6KQgLSM9XQPWSEz1ET2c7zxQRE+TLW FwhMsM5y5r9SQ0Cbwsey7u1lQnKckHZyHQEVW2k85TNmwo/gBufKegJye/51 KBT73IlNVfTXBKS17dh6h31MeGbePrSumYDWb3QQbcae1b7Gr91CQCQ9viNb TJhwTbTX2b8Nt/d15PFP7EaOqNiUdgLK+u30Qt2UCcS/WlVVHQSkdFGBNxTb YnB06HsnAekcHCtqw477mMjP7CIg7kdO6UJmTOiu26u9/hsBFblbDx7CliyY c979nYAyvl69dBfbKTUz9ngvAckt5R1qwc6JsK4K+IHb482PXMCe9lseSu0n IGkZKxElcybsOPOcv2aQgKJcvOiHsK8cctDuHSIgAfq0hj/2S0P+0wvDBBQ4 nd32v/efq9vqYiUoBOR19GbD/97vmmx0r9IZJ6CGHZ4iH7BjSRJku0kCSvOx f9eP/ZnZyn91moD66Ht+TWGvG8PHphkcH1FCDvPYJ78pnK6dJaCdPV+N/vc+ N/PN19i+OQIaDbp753+mlIRVsWgE5D9nso/+v/etGRrkDQwCSrnL7/4b2/vu EL/eAu5/5NzSIHbl9TjtE2wC2jotxNmBvehuePraEgFtzAq/VoVtWa+K/JcJ aE9Y04nH2I8EN8j6rhLQ5V5J8xvYM87cHJc4ieh37ZF9TtgG5bQhdwIRDf9S P6yHfZdIfn2Om4huZQd5C2MPHv+UeZqXiJpXubNH8fiGLuU7268hoiJvaetQ 7M6DKXBMkIjOBdl/MMXenBW++fBaIvLg336aD7vJxHHIXIyI5NYoTUbg+Ra5 b/l6nzgRZYuKDxpgu0zpZIIEEd1p2cn4398DCHGizjqbiMjJvjr1IPYx8qrR LmkiMlYkbGHi+MvZ+Udmx2Yi+nnJaiAN26z3/S8lBSLynmj73ofjN3VrVaO8 IhEZCq1u9MOeCHqaIaNMROn3dZJ4sWNkQ5zWb8PPT+/foozXQ5+fh5HodiK6 EXLeuAwxYWurnYzQDiIS+6TxSAe7/cLOX9y7iOjwwgSPHl5PAhUTjow9RPSQ acu1Fq+/U9zfDakGRDQka6AdZMCEF3bN0n+MiIg+crNyFK9f63+PBynG+Hox I+sZXu/xpjaO3ZZE5B86782H8wH5Phh2WRFRGVPaxB7nD81pNekOayJqPPk4 IHs3E9ddvINvbYjIRLZzVV0bx1ffq1MVJ4lozS4rykacj86pFhqUnCKilmzT GSucr6qC70sVORFR0pMTrv/LZ8fl/AaeuhDR+jjfyk/qOL94KJ9K9CAio3NX +PdvY4L0coKD73UimknIaUpRYML+kYN194OJ6JEXef6aPF4v7/kkGkOJSHH5 rspJOTweCWFf+W/h8RQNyBbC+TdAydci5w6Oj6ebDfdvZELXocM6vY+JiNNo gM0hzIQlLYGU5Qwi4l3u+pEnxASljW00hSdEpLyPQNsvyIRgXML55BKRFNnx Rxg/Hv9rOxT5i4kocK3P5DsiE8KfCokZviaiqqlY3ScsBryIbvc5+4aIFATO HBJYYECfZ1Tn7bdEZG0r8+MygwHqOiu3e97j/lRePaaL96/+j384fLrw+Aen 2d7/zQAtRsfs02Ecv66OlNJBBoyb32knEbmRe8899qXXDHA5cFpWkYcbvWev nrrawIBBa+2AvSRu5LlO4/ONegZ02w7JXRfgRlNCZX8jaxjQfHbXtd/ruFHp BDXeu4QB6Tf6lTsVuZGy0tDP+gwGHKvZFplkzo02yz81tg1iwFulDpC5w41S i5y9r25ngGXckOX6/7iRpenOq2LbGNDFoNkK3eNG1QaDg89VGPCrRdJzJZEb sTssO3/i+oXl4vbgVxo3cj2d80xhIwPUMrmoGYXcqMcgIdSThwGpEnpPN7dz I9Mnnn70QTp4kPKIcnw8yHSjsFPxbTrUZG0xfJvAg+R2rZmK+zgPnfoGrTYi vGilcq4gE9efsbX+S2ZivKj68vjIeql5MNcu0dQX50Vhc56W9yTnoUldPkNB khd9cBIsubUO15typEC6LC96LOOoEsQ/Dw94u1VSNXjRSL5gdj6TBme/Xbz7 4xAvaj4iHS/QRQPZw7nNn47wotzxz8kln2gw0PGL9eYoL9qw4KR67CMNjr87 4lpox4saK/6KPX1Hg/11OkZBzrzo+UGPXUcaaKCeSZiT8uZFFYwmjdVCGrA8 Hh09HceL4ofSRIqjaXDvejbvjXhelHExa+fJSBooxRbVpyfyIp0O/VTSLRrY PqtX6E/Fv+/zeadnKK7PJ/rnbTN5UcIt8uZD/jTwPCeVfKCUF1n/cCmLOksD smN69+6vvKhndvu2b3tpEHgpN8a2mxe90Tk59wloIBTywuBKDy9i6vY6fjSk geHjhpyyn7woqMXfsFOPBmk/B6+ojfKilLG9p+maNDhmJyMuT+dFcYVhxS3y NGg7nGkruJ6Ejunwucbw0MCjZayRdwMJDQlGEBaJNBDUVVPh2khCj7zfGHgR aGCzuW6RKU1CKySraCcOGvT/+ZpJViShjI+nyp0WqTAbyzNdoU1CRokKhKFZ KsSvWB0t1iGh6VwtjaA/VNjll/SqQI+Ejr5PF984Q4WrJ2TvpRuSUPb0OeHT U1TgUtmjFW1KQi3TQQwBChXEWy+FnrTF10/8/vv7BxVqdSsnjtnh/rHoHpV9 VDj5fPHwoRMkdHrep/ZGLxUykqIVTBxJKEeovUvmOxVUXJ60bXclIaueENkb XVQwWO0W5fQnocCa+aAP76nwy29T8FIACSktfP/4+h0VwsbPjDGuktCfumJi XSsV3n2arZkOJiHe1XO7K99S4dBjkmN3BAlt8F159ek1FVz0DPLzk0mIeezu 2bhaKlz484kxkEpC4XtSHqXVUMHnibOJ6EMS0vOPv1NYTYUbfLeGg9NJSFJK 8+H3Sio8/vFhk00eCQ3opCXal1Eh+z8Hj+gCEqpKGiwLL6VC4d4/ta8KSaj7 qlxyaQkV6p4JH1cuIaGX7s15EsVU6LlmF/+vhoT4Dr5VEiuiwuD2qV+aL/H4 xMbddCikAmX4+na3VyRU0fs3L/8ZFeYtMtq/NJGQ+mCn44ECKghvHCPmfyAh izNbE5pyqSDRGXB04CMJ1biwPZWxZcJJT0U6SUh+9zXpxBwqbJ/eBsFfSegH WYHjcjYVLF/6XTvST0I9AhIUlydUOOJFbIsaJKEHmmEhk1lUsJdPXf9qiIQu xO2m+WK7xdZVKFFIKCLHySc+kwpeRge4To3j+dihEaSIHUAbOJwwSUKCyfzn GjOoEHGSY3ZphoSSbG2/LqVT4Y5QooHmXxI6Y0e3z8JObFa4c55KQgJB7Nf7 sZ+omqt8YZDQPYkjmrmPqVDwqy+Ah0VCqnNPDE5glyZ6tOovktBEga2qCHbj 4n8ueSskpEXIKr77iAqtxZvL+jn4ELGIaHYYu8OlbFWYwIfcjdzfSGB3r99n bcbNh/ZmycuNplGhv737cRAvH3qZG+lajj0Sev53KR8f6hIfjIvEnt7J0htf w4fWPPNKP4VNHb8ds0mID/HzXU/QwWalbeo9LMyHjLt0L67HXrV+oRglyoeq b/9SZT+kAg8BrtSv40OZpQ+6hrAFa7qa59bzof2lcafasddddBFRkuRDP0aH O2uxN22mOzts4kMyqS+Ui7Dlv0UWx0vzIV9OXrcn2KrREsutm/nQg0PLd//3 /5ma+s8OLMnxof///83/AyCyihs= "]]}, { Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12ms4lE8bAHB2F0shiVLkFAnp4JhwT5JQIULlmAohoVApJYqQhCTlUDlF SM5JSZQkKSLJYdc6VvKwu3ZJ3vl/eL9w/a5dM8/M3Pc9M89F3v2UzXESDw9P Ev7x32/yK6G2Ie0AI2OiRGxxNQFK4y+3r02ygr+Jte08awiYe7rpWE+iKxhP 1gnzY5ey4atYsSccaXzaLII9vMKLU5l4CsafXOddgx0n1SxcXHsa6iX0q1Wx c1WcMnmKQ2DzzpJfhtj1ulObbbNCYcLqS8YB7O+mkQ05iZdAa2N0m99//aku Vb3QEA7Ew9LQOOyorV2BObUR0GOllluEvUI/q7at/CpcfPxx3xfsBzu8KZyi KLj21zdwDlvDXGuffN51GPTtEVeWJqDW+t9ti6xYoLP6t9hhf3VNXJ+eeBNy g9rpddilmhp6Q00JoJcGQbPYIbpJP0IabkG0pmWElgwBFHBWelCbBMonFcRq sFuMG95rVyeDJ49FAs9aAm6ZrvdrKb8NpD+d1/dgr7UkKmeK7kDm2sKJn9iM /faO0QWp0Cmvu3+HLAGFdrWL0nl3IY4vf3Matp7zVTPTrHuQ4xx30F6OABtf qe+piZmwU+gNcOQJWKoHr1J2Z4HQJ7bbCQUCpmoCxGhNWUCq3zPbh11Z11UR 1PAAlr5XCf+sSMDOpqx/GbWPIPJfEJemRIDy7g7r8W3ZcPt2SpmfMgFC7/ke aVZnw8tzS/v/Ybe3eu9uLs+BaWGT8A0qBDh3aiUQRXmg0iv6O0+VAGTvSd+u ng+MVUqS1moErPt2V+taQT4c+/Li8Tz2RO+/b6vzHkPsTQNh5414/oaa5U2y CuHJA8lis814fqadylISS8DHIC++QYeAGxJpBvXCT+Ea41hHmS4BX0qvymrb PIXGSwlCj/UIcJxwGl7b+xRS+T9YZOoT4Oe4JGD6Vync/9j887kRAcmGXtF3 l5XDadnM40W7CejpsfURsSuHg7pvFPvM8PwHg2XE3XI8r/ovllkQkFcsueKk QgX0SzkGRewl4LlsUybSqoTbf992p+wnYIBXoWrUoRomvG6+Pe2Ex5chnOZ0 vxq8w4/bDjoT4KXPvfB5sBoS1HjTrV0JmA5sN649UQM/PL1dDNxxfDDC2uJD n0PMNYob8iJA9W3vsHbmC2i3X3GRc4aA7U0WQsan60HbspwsdYuAZZ25n3ST 6kG/U3HqWyKODzrp9sayerC5mNF3L5mAeJ5aWamZeth1h1ymmkoAfbua9lTg a9iye0DQN5OA6GdL3DICG8D6no5faDEBXZmtFXMBjXA0oSLiRRsB/uctj5T5 N0Osa16n7sppsPAzyKcmNEP9z7cnU6WmQdFd9Y9zSTMY1pabz6+Zhi5z/ovU yWbolYp7+U5uGgylXqY6+7yHw6zwPaGq0yBUvbFdwKMFalrWHrMwmoYc1lJw cmyFtIjGG6c9p+Fk9fF4kmI7fPXJNdzxaho6x8wF89w7wUA+vajw5gzEbGLz VB76BsvODFy9e5gJAWrNt+tzfkBE6UbrbeosYBxnXM6q/AH76n/9g00ssM/i 8b387gf0quo1m2xlgb7ENmM0/gOyrkvfMdNjAWnx8eQr9T64cnFppp4JCxK/ xO5+VdYHM4V26yodWfDsnBW37nU/bBU9/5bvOgvWlfsw0r/0w3jvkui3sSxI mYz6dHGoHy431rVGxrPg/NH6HEO+AdAuXvWRm8QC431bbOrMBsC+ZfeGpgwW dMiJF774NAAy/AIH+spYMHfUp7jPbxBCfdavZPaywE1s5uyL4EFY+fHOBs1+ FjS9PL/zXtgg1Pnyp5waZEGCVMy3g/GD8NCB5TfIYMH6T/mkzqJBsGrXrn/w mwUH9EfsW34NwuiD8MHMfywoXnZksdKbBqdtJpID17Jhxcux97cDacDITLaz l2PDOR//5DPnaWD4yoNPV4ENJm8vbdgaQ4OVnz4q/VFiQ29ohm3RYxqQPluI 6W9kA3W0N+/RGA1SvCe/6W5ng3udvXWCBx0MlFJ+1h1gw9bKVculTtHBVKLn wiF7NpBKvnc8CKED9U4+L+HAhodZLg5l0XTYPBfTLe7IBnqEh0tXAR1C1e5a qxzB7VkE+0r/oYOiRoPndV/c3k49jZxZOuSIrYmln8TtGcz92cgzBCQfL2/d U7i9jWGnQWwIsl8lWXUG4PaWXTvvrjkEw0GiB78H4/a6b0fnhwwBv+z9mysu 4/baHSy2XB6CH38e/Fofjtt7L7X0efQQHOY7/0XnCm7vefrND3eHYAl/qPru SNxeek7KZO0Q6L6qb9oSzYZnKZ4HQxqH4JKinoT8dTZcublhNc/HIYgcLv26 JIYNCuFF6WL9Q9AzJ5vREYv7P1aRrcXDgBePZBfUbuL+nUM86qgMmHB9HcnG JtlvUzEVY4Bf0gePFwm4/911hQ4KDEhepbpJPxH3r9r07LwJAxRF7l9dSMb9 K0adIe9jwDe7n8kPb+P+pc114uwY0FVgOm6cgvsX+ViT7sGAtFUd9kF32HCU 6Kyvj2ZAeO/2f1l32eB2PsGhOoEBEbK5OSvT2OBE3jtZksoA6Zb90jHY9hJv 1mTm4+cNjD/lfo8NNhlhz1KeMuBV3zazZmyr9frm8dUMIG44jm24zwazbaXB F5sZYL7ZPWQQe1eDr3BQOwMqrMLdtdPZYLxHJdv3GwMcxGOFr2EbdQ7pHxtk wNzN3OAv2NudMz87jjGguO/fvdUZbNAbOexlO8UArtSbUBdsrVOSixYcBvB6 K6/IwNYIv6GuTx0GBeFCz2WZbFAVMn+zZdkwbGKYyu7EXp9EObxh1TAo9wZH B2Cvk66fkpMbhhTnKw/uYcvlhEatUhmGMz/LvV5jy2jorl22eRj017j8oGOv rpouF9AbBsa9z3OL2JKoeM8iDAO/rmfDqiw2iL8/QWfvHoYvX85v2Yi9zEbp 3KTVMKw842tqiL20d1B0xGEYAGUtmmELHruf2+c6DNaXwhytsfl/Oxh+9RyG /vTTB22xScHina2nhmFBY4q5H3vxX5t3Y8gwbJ702rQX+29UDO+LS8Ng99qe 3xibs8w0tSxqGG481zmric28y7up8OYwSK6OiZDDJhTqmh7eGYYt1l3KgtiT hWed0jKHcbvZbr/xeCa0tGZu5Q2D6d+ITR+xR+v+XL9eMgyHbPkS87EZpoVy 4VXD0GX66tol7MFPHlVnXw1DkM3epTbYfQcVLP3fDUOL+h55OezvtD6G56dh EHnv0jiO16fL+26oazeen4MazGLsjpkDyx0GhqF+3/GSU9jtF5Y9thwdhj2O ZUw17Fa+VjD9MwyuZ1sbhnA8vI+P6jKcHQZxmteqO9gNWf/IGwVG4PC4vN0U jq+XG56nrRMdgZITjdtSsGufBW2RXjkCbnOsLF3s8sZfLkvWj8A6ux3Tvjhe S/fls0ibRkDIm/ydB7u462jcnM4ILFXJgQQc73lj32vGTUfgcr3A5Qc4P7ID UqxpliPgG550UBE7a27/6Df7EThSm1yQlcqGtKXvVzR7jEC0Vl3lDZxfcZur TuVew/094LXdgvOxZWv3SFA8/v7M75WJOF+p2rPOu1JGYIfum9DJJDZEbtPd y8gZgaNKT6XTcH6HGlepKDSNQKSp+pMXuB5Um3RnEq0jIHf6h/VcPBvYprOS rztHwOzG5A1N7MA9unxujBGg3DNuS41jg/eBKlo6eRRom7psNXA9yrfvPnhy yShYGeXkmeF6NXJw9pOB+CgoS9rFu0Sx4Yiz7stehVEcTwyxi1fZcNCjKk3K eBRMKmJokbge7j5bZXv78igYdNVpvDqLn/d8d8ux6FHYzXxzKjEEr8eF2R1a CaPwldqw/Qiur0bhups7MkdB4YrhaeI0G3RiqpaKvRqF8Q/g8MMP59/9qqa4 hVEQHsyq6T2K62FGt4ET3xhMLk2I9nTH85s1W6YmPAaN48/7J93YIJ2j+7BF egxESj3lppxxvhVXhVENxqDM7+rsC7x/kOqrdCPPj0H2/DjrkgUbCoSX5y5c GQO7j+rmGWa4Xjn6rgiJHQO6/6FDVaZseMSWI07cHwMLdYfSHmO8v22MKbB6 OQaP/17cPaDPhmtpTjJrSOOg9CPKaXIDri9jlbHJQuNQqJ+VU70ex7O22Jyw +DhsMB8tvYj3w/Wfm7p41o3DL3U3SQ7eP5sFNiWM7BqHppYfcsUr2SAUxEt+ dn0cTo5DvywF1+sGxwC1xHEwf32lKIWXDYeXVQ5kp42DaN7KvdRFFhQWer+4 UzgOf6KF53u5LNhL7wi6+HEcZBItDHb9YUG8Ve6YmdgESO/VR3I9LBBT3dM2 kDoBvwtF5Xkfs2BEIFOsOWsCNNq2lwnlsuD58PSBp/kTEBc+wBB9xIJjD9J6 L1dPgJYGRV04nQXVqybG5L9NwM5nM/4dCSxwEbhOPrbyJ+TarZdJCGHBE8Zb vbHbPyHt2c21X3ewILxh9YX29J+g0ZKaYmf033nK71V1zk/IIXjon/VZwOMk aXq94ie4KUbP1WmywLbjuK3q158wfSjB65gSPt+8pvj5rvgF7dNKsz8FWGCW afxoKvEXZGguFjLfMyGqub3vyr1f4KNitje9iQlvCZdVEtm/YFBw0G7Haybs Mgm9sa3iF8Q5mpWGVjPBeLws5Er3L2BvRoM1uUww0FTau0L6N1Dc30+4XGHC 5ncCLN2c35Bn5q12VIcJK/+0ml6qmgQlZQd1+cQZSHv3nJd8YgoS3te48K+f BgOZHYtyxwhgfVR7f710CtQGlzEunpmG6LXm20slJqEof7lXReAMPNkSd8GC +hMu9Dt3qF1jgqV/6sujU6PA3G2YfjyGCa9qynt+M0bBt1TaMzOeCayIw4Zh PaPgGNk7t/wOE4gnSwWfNYyCvuohhbk8JvTccP/hcXsUuEEHAprxPMwu2JSJ GIxCsPAe0ePCeN2ErJmZuI4EGOjtyUhmwc6w62fnLIaBxy/50s1UfM6c2OK0 xHgY4jOnyi7fZ8FKy7BBxW3DUEB6LH00mwWzwtZjPuuHgd4sNbm+HJ9DRTPq D1KG4YDdfEJpBwvWbu/pK3zFAB2/l12Ny9nQv1u8zcuAAY2Zq5dUSrLhQJ93 eKgWA2w+B0PeajZskX1dlqKOzylam/Kv43Ni/qHQkhFpBuTNZZ6z3Iq//0mu +vfCEKyKCpf+th/vy49VMtNfD8Fcpon7T3yuicyidJdYDYHRrGHif3USmX3j 7jEbgnBL3YYQXGe/8GotTqMhoC5sUKA8xHWzRabtyNYhkDgsSpcuY4PfaI7x G4kh2Lzi+xHLr7huUxWT7vXT4bRPx63kHjYoeeYpjHfTobKh9fX3PrwvM/aR jD/TwTDglbznCBsWqH8+SDTSwaItm3ZpFtdR5fTtpvjceTz61JFSqVlgGJjy tp+lQ/6A161ZmVlYFsy9+jWQDr903F8bKsxCkXFE3YgvHQKHD8i3qM7CxCtw Uj9Ch8vG+jT69lk4kDk0a2JBh7S/lCMrXGbhy/vLYU/X0qHdP80t5OEsGLV/ lrndTgPVhGXzZ3JnYe1JZ65HKw0iSq7dDiyYhfmO8Ns7m2mgMxnYcvLZLBg2 PpGRqadBus8erWMNs7CpcHPb/qc08Pb4K7CfPgvmIr9TGhNp0Hg18KHlyCzo T70TNblJA5mcMYO9E7Pwp8rvYlssDdqHOgN2T8/Crp1jxpSrNNA9UtRrSOKA 6nvu25kQGlCcXEpUFThgqbJj1bArDVxCO81VlDnQVzWhJuFMg6o0C4aSKgfe 70Ku1odx/z06UvJbOaA55aQxdoAGn+1FI1Yac+Cc2e7idAs8vuCrMhKmHAic vLiobEaDyNvzVcstOFDjaHKldhcN9DpHfwnbcOAwqlvHv4MGGfvr7SnuHFDe ObVCQY8GHH8dgtcD90c9p8qnQwObhCexiyfw9+fFwmc0acD3KbV+LoADEyZh HGITDXz3BqgS4Xg84d4QrEKDtz6jjZNXOSBJpseVKdNANtbZ9dd1DrjxRqj8 XUfD62KePHqLA7taJa1L5GmwbbfCv74HHKCHGEalr6GB1qOW6Hc5HHj2yu6o wWoaaCwGipc+5sBqHfP1I6tooFD1RiWylAMcylqfw5I0kBb3LTtZwYEra1f+ XidBA8lTK4wcajgwMLLacU6cBkvW43r4mgMONqKLTWI04I8Q7hdv4oDL+Ced F8towDNQ4bXQzAEPie0udaI0YKbwh7W3c4Cpb3lpUJgGk9PF1OedHHiIws6T sMcsHZIefeOA4bSX16alNOjjz88PHuTAobNrZAuEaPDN3VrTjcGBt4cVx2cF 8XhfcurMxzjwmeyRb43duvqBmeYvDiC2r3M5Fc9XsHmH9BQHTJ5VUxWx678Q zvxMDvBU1BfcF6DBc420sT+zHJA5O7NTHrs8xvh0zzwHjgVUdj7lp0HJyMRC wyIHnJZ7OO/BLjBOin5C5gJPs13/FB8NsjO2i6cIcMFn7pPDA+yMuaH0S0u4 kLhUssUJO9U+TuWEKBdEnNy0FbETn2mV2YhzgYH67zIpNIgT6TM0WMmFw8KV s+3Y17yvNiut4UKXMJ9VNXb42422orJceBM9kFmAfUGhq4+jwIULL60n8rCD w8K86MpcQOOHNZ5i+39XnvmgygVdw1mfN9jeOp8uVmhwIWhM4hEN+1hiCDVz KxdI4hkdQvh5XCZlk6J1uPC3/+SCEfZBi2aZQH0uFHkdlgvDts31z3c04kLV 200GzdiWJCnNXcZc2ClUai2D58PM5XWdhikX9CDV+SK28fMTZqssuHDeN8V9 DNtAcnkHryV+nmRbVxc8vzqBz51/7ueCZrmf7QD25jb3sU47Lii8vWjkg9dH 6VrZQp4zF8qTH84+wuspR3eMvnWECwJaVY3WeP1XG1HEQ49zISu27hp1CQ1E 2AdULE9y4aCY/mgqjheqzcIz3QAuPBb3jAzA8UQqzjGUD+LCl5AZcTsRGswe Z9swL3DhjKi2gCGOz+nXGX19l7lwac2hEztw/P6S2e31LpIL3O3Pn1svp8Hg 1zsX0+LweGKL1yesoOE6sS0f3ecCVa9RNFGKBmffhWlcysLz/5rZsQTnl4p5 Y3ldNhfSUtecTJTG67nX6rV+ERce7Tu46q0sDUxsj3/XesmFO2fVld/h/GV2 FridbuCCJInPIw/n9yP7qZHSt7h9UsHJZFX8/IdDZzQ+cUHoQk9rsgaOX7db SzcMckFN+X6Shi5eb3pXoieDC+uq/34/sw3Xg2PSUrljeH4Dx3vebadBmGee kiLBhX3BzqwkhNfDr85IhjQHrDu1bo24nlWFjvuLrZsD3Zi4zxFHaOCxoDFr pTIHH3I3nUg+hvP90pmL8epzsMqiKL7UkwZnrixeX6I9B2lc+RAxPxpsvS7x iM90DhK0Sz08Q2lQnLLjK9dzDrZKjfV7peL4WhXlqOc7BzHR+e3oPg2E01pp wf5zkOQWslopC9e3dIfJmbNzcHBUNW95Pq6v2ScFJq/PwQGRF3rh1TTIKb27 jV44B+HqXuX5vTie5x1Vv5XMwa7uO9KsARw/u9auaSubg9f7WpfsZdDgxbeH f2tq56DsySN/qd806FgsfHXrwxwYGL7+uWWRBryWL3ft+Imft+G5mb0SHZwn 6PuzVOfB5aHSoNU5Oiho5RinaMyDSkrgqeEwOoxd9NSM2zoPr1v28FyNpMMZ sV8rzurPQ+FkrTj9Jh1i9VjdVhbzEOMTGCqeR4eaawIuiyfmob5uG8kK79cS iureLo/noZlVMESBIUhIjLV/XDQPFIhQOmo6BEKkn8bM0nnYkzV1tHXfEPDQ Hq+JeT4P20871bxyGoJfGes/VnyYB5GLw7MqoUPQuFpxs/DkPDRs7FJfrBmC M8tXs2u3/oWtUc+yI4CBzxnUK1Iv/kLLdws+Sa9hmCy662Jd/xfiFlcENwUM g+Bhte1RjX/hdva5gIuhw4CeWTKZrX9BtSpsiB/fs4vdb3u09/2FQvM3z8Iq hyH2jcKeqMW/kHhktpvLPwImVw1XsIwXYOcH9fjeohGooJ7ObX+/AG9divnk xcZAXWKZt3vTP9h5g/vzMWMC/sSzV2h2LUJoA098vuokKEZFbTrlzYO8vofz 1GZNAf1w73fjUR4Euzr5N0tMg9lwB7fCjxct+BtPxEXOwEW1+NASf16EPnsk RV2fgWcBZgv5gbxI9X6nwqX4GVjz7wXP/WBe9EaBb/RY6gxMSuYKXAnjRVJr 63OFnsxAstlZCct4XnQn/v3aF19mYLBQestIES/SCH13MUuGCRLTXc8GSngR Y/7kwy0KTLDQu6XVU8qLvvQ92v1KmQlljXx6rRW8KO7xtED7JiZc65s0elbH i0qIwyLvdjBBXfT13rCPvCg3zvkp9TgTzgYe95L8zYtEZdIW3uYzIXrPpKf+ H15U7fxjUb+ICXfWhXi6ELzI7a3opYJSJlR2RXvksnhRzMeS0dDnTJjRf3JM 5x8vmpP6KDT2gQl+5Bk3e1ES0jPZOk3/zYSjyZcPpWwhIZXbkjpWGiwIPCl4 6LkmCQl9blDcuJUFV0wTD/Zrk5Dlq9Va/DosyOI8clDWJ6EGvcVnjw1Z0O/0 zq7SmITCBnRHKvay4KCSiE2XLQkZJFitpp1ggWXlPQvJYBJyMKsvOJ3FAq8Z 90WJsyS0uevkx/P4vhWxWbVc4jwJiennhVzE97HqgmoZiTASUrVUdA56wgKF zK9T4tdIiIclYLqpmgXsKNE7YikkdHB5hW9LGwuWNXXtEUsloYX7F09c/8wC NVIGj1gaCXmdP9+zs5MFbhfUvZdlkNCHh/dECvF9sMXf3FA0l4Sq401LjBks yDgUMbS0koQeKlWO3ubg/lMsUpdWk1DEk6h7S+ZZ0NEhtm/pcxI6qt/27MIC C6iWWZVLXpJQwTFf6n4SPhcb110XektCn13btjUsYYOp2uwmahcJxaz2E38r w4bJv94XyGwSevlIL9rKiA2HDu7ZwJ0loYrXY/zrERsay9S6Jrm4P7EFvrkd bLjr/WvT9wUScpU4Hpm4C9+/v50cespHRp/puRdu7GXDvTJ/CxcJMhoMemxQ eIgN/KL7Z21XktGPuPJifUc2+HtvyTaXIiMW1y2zyQk/j/z0gpYMGQWpvPn7 0ZUN0/GnS5cokRE548Hj/ONsMPMOXlWjRUYSIQHjV/3ZUNZk31Ssgz83bbH5 GMCGtfK6gdl6ZLR+mbnhstNsmOme/XDTgIySOiZTooPYkLHr3CUPEzLy8DDx 2HmeDYIPDqk7mZJR671VdI9QNpz5u61nvxkZOV77Tbt6gQ3mZXNbDfeSUeFO h1OVYWxgyl0YET9ARp6au9toV9jgesEpSdCejIws5EJoEWxo6TZAiw5kVG0+ lPcjkg2Z8Qt3JxzJiOemz6Oma2yw+Bu27/VRMrLptxJ3j2FDhYPrXOVxMnIO UVpqFMsGuTLIe+JJRk//fr8lEccG9gke3lQfMgrTempadYMND7rDy/1Ok1Ht 3iDvJnzvGmnaPBAfREbcUVGLG7fYoF4+IFgSQkZHHOOYVolsqEwwdP0TSkZs Dc/ipiQ2/A37dV00jIwWl0y/OpvMhh0n75VvuozHW1WVpYzvba3mXEH/SDxe jdjOwBQ2LNfL10q4RkarRGY2iN1hg4Oyg+vTaDJaMWBuW4BNJ1WUT8WR0crR SuWPqWzg1Pq7BtzG66t2ktmZxgajAtmYW3fISC6YLGxxjw0RqW3lpXfJaOM9 HspzbJEgdaHpdDJKM+lKjLnPBtujvVrLs8hIdmPCxp/YqftjXLc+xOMpP/3E NJ0Nihpj5YG5ZGT2psppEttL+s5AYj4ZFe9UvqWfwYZiIVOhsgIy6rT6XhKO PcNhanU8IaO4eq/nb/57/zz6yHWmmIx+sXye8WSyIeyrTYx4KRmNdUbc1cN+ 84a3QrOMjGYb7QJ8sKnPng7YVpBRaVHc9rvYllmuQmeqyOgo8xv3v/fLyfEi 2sk1ZJR6bqpoGLvnQp1reS2ev5T4Q5QsHI8+vjGddWS0Y82ZfzLYxw6tqWC+ IqM2C8+MrdiPd7cMrGggI9J3ze3/vf+d1D4npN2Iv/+roOu/98Na61S07d6S 0RKxR4E22OeWd7sGNeP52MFZ9t/75Zc812Jut5DRmr7YMktsyh+tiopWMrLM N3HahW3eNzTwtY2MkptFhHWx4z8kCrHb8Xo39L5TxO6s2aEt2UFG6sEP45dg S+VPuep8JaNxGdejk3g8LimZMfbdZCRkIW7Wip0daVkR3IOfv7/JKOe/982B CwMpvWTkLRZhfg5705EnQlV9ZKRz3MnbDPuMlaN29wAZNeV7PVqO/dxQyG2W RkYiM2/Y3Xg9FtVqYlYyyOhs1k2PVGyT1V4VuiNkNGU1zbTF/sRuEjo7QUaJ PluCX+D1XjF8Rjv1F64Pu4NOnsA+3KHoVj1JRp/+rY0Tw2aUhFdwpslIRu2J mS2OH9WMzYOrWGT0pFDu5y8cb6fiBoS2zWKvknkZjj3nZeh2bh7nZxJ18T6O V4taVRS0QEa/o0XK1LDvCa+SC1gko6yAi0aVd9lg8Gx6wItMQSOlAUMvcbyH zee5HlyCTY9Lz8D50rbvNhwQpqAF3VSTpdiyWVdkrUUpqPX++o4gnF/1Js4D u8UpyKhMpcQA5x85frmr7hoKarhJT7+L8/fA4KKRpgwFfdZWeDGC8zt76++1 m2QpaPM65pdN2Kbd7/qVFSlIXlxmpiKeDdFyF10k1SioUYq9PRHXj6Vlo84s fQrq2ufxJw7XHye+r4aEAQU5qybmpuH6VOTQIPPbiIJa1m4Nzcb1y/Lv/T6G MQXVCl699uQyGxJ22Th3WlDQ63/bveNx/Vvx7YVT2WEK6s9MunMP19NjqgUG JU4U5B5XbO0biOvXhTvShS4UJFVTZLUN1197+cAfD90pyGzp7w3Nfjh/vdc7 JXpTkOqqbWk1J9ggs3DLMeA8BXmr6Hz47YLrOX1fzZ0LFJQt2Vx73BnHyzvB lS/DKOhUWc6lHrw/tNwK/yIUQUE/b727WX6QDcHKAebZsRT0UllTb5sNG9qt rHW771PQ+UqNX5dM2HDloYi44SsKilu0b5dRxuONavE/+pqCwnauu7JyHRu+ +V5ru/4Gf37XNkJYgQ0auv+ud72joKe3jkdO4v2v98NvHv92CupZRWZHSuD8 Y7VOPqRRUHBurJkABdfb3bEtVAofipZz/3OpnwXue9zklPj5ED0wxGrlDxb0 WWoH76DyobSklXn/7d+ddgPy55fyIeKPkeUHvL83HNU893MFH1rTWskaaWFB +qXe9W1KfOhGW01YUiULDlSpXU3azYfs+ncUD8ay4I1yK6yN5UPfIgMm9m5i gTc1lyIvyI8gTXP/Fn8mVGWtM3xzix+5b02ifb89A23bDZpsxASQ4X0BEZ3P 0xBTHTRvKi6Adt3WXrRvm4bd2iVbtksIIEm1UIdzH6ahXkMhQ1FKAPkrb97T 0DQNZfLUEKacAPo+yJd1/Pk0pAp0qqRsFkCr6z/8Yz6ahqMdPnE9VgLoKqEj bXl2GuSscxo+7hdAMbfeXnkYNA0/Wvs5r20F0AubkFpO4DTYv91/vMBBAIWF 8T0tOInPtzW6RqGuAmi+7OO/dUenQSOTPCV9SgBllTRMB1lOA8f7nq1bvADa N5L9JEN5Gm6efyRwKUEA1dqe7P6nOA3KMYW16YkCaKp35O4R+Wmwe1yr2Jsi gCy3pjA1pKfh2WjvjF2mAJISKPQYF5sG32PSyXue4vHYjLkMLhAw6JzeqfMF /32Nx9fJbgJCTuZE23UKIB25+sb8rwS+ZxQZnOkSQG2TbjXHOwgwvF+XXfpd ABGTYq/G2ghI+953Rn1IAFEWfJLE3xJwwGGthAJTADVeM1+yWE5As3WmnbAk FQ3seJ+94zYB3o3DLwVWUdGdPa/nwpMIENZTVyGtpiL1e+uNm24RYCNbM8eW oaJI66yiA/EE9P7+kjmoREVpgrJb7kQRMBnDP1GmTUX5+ZuLnpwnIOHfXtti XSoKK+gXljlH4Htu0ov8bVS0hq/rUkIIAWcPyd1MN6Sig1clMi+fIYCkoq8V tYuKpkk6/676ESDRdDLssB0VWdRc+qh8lIBqvfLRAw5UxBC8v/r9EQIOP5mz tjpERT9uSN/2cyMgIylK0cSZigbft6x640yAivuD5o3HqchkXVRU4kECDBY7 l/MGURHvb2HHVksC+gPXXJgPpiKqg/+2h/sICB85Msw6S0W3Pp1xDt1LwNuP k1UTF6joeNV4qK4FAVb3qc6dkVT08vw+ve5dBLhvM8jLS6aioyd02isMCTjx +yPrRwoV5bqmHM42IMD/gavJ8rtU1Hlw6/I72wm4JBhBu5BORS55R0WvbyPg fs/7NTa5VNQavdk3U5uARzccvaPyqWi5tXxsiRYBBTt+V78ooCL6kNbQG00C ah4vs19fQkUCVWDC3UJA1zmHhL9VVPTEYmAyRYOAvo3j/VueU1GMgMjf5o0E MGjnN3q+wON5/3TvojoBM+YZLZ/rqWhlF2/dWTUClq0epuS9p6JKQpeboULA yrZg2x8fqMjZ6+6OmfUErL1CfSjWRkVvdqzv2oO9cUINLnzB629RMCqoTIDF 88Bz+3upKFFzxdsaRQL2+1Gar/VRkTu0Xt+MfVAhRfLFABV99/qYVahAgGdM TZkyA6/385cfiuUJ8DPaQ3IaoSLTayo0Hezg6R/Wt8ao6EtF2943cgREHuaZ nP+F48HowoZxWQJiRRINtvyhon1u7+9dwU5sUIz1IKhI53S/hxz2A9XdKp9Z eH4SsgVPrCUgv/9bMD+HirJ8POni2E8TvZu2z1FR03cJyTcyBLycu+Ge+4+K SLFiCRrYTcWypb08gujHLYPuCWkCWt1LF5eRBVF5pUhoIXan5E5LUz5BpJI8 EuqP3dvSeT9UQBBlIenv27DpYR4/nwoKosF9vCkC2BNbOdtGlgiix82DJT1r CCBGrkevERFEFnqL659ic9LWdFsvE0SOGWn/YrAXLYuUri0XRAeDJzS9sfnJ cKZ2hSDyq5Bt3octXNXeMCUpiLRbjtVq//f/gj7uYspSgujs/T5hBew1skxX xzWCiP9G3qvl2AodV4sTZARRSlBPuwC2atTKhSZZQZSWH7GDF3vL9sd75uUF 0f//P/J/hokv5w== "]]}}}, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> True, AxesLabel -> { FormBox["\[Theta]", TraditionalForm], FormBox["\[Omega]", TraditionalForm]}, AxesOrigin -> {0, 0.5}, BaseStyle -> {FontSize -> 14}, GridLines -> Automatic, Method -> {}, PlotLabel -> FormBox["\"distribui\[CCedilla]\[ATilde]o angular\"", TraditionalForm], PlotRange -> All, PlotRangeClipping -> True, PlotRangePadding -> {{0.06283185307179587, 0.06283185307179587}, {0.017, 0.017}}],TemplateBox[{"\"exato\"", "\"simulado\""}, "LineLegend", DisplayFunction -> (StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{ Directive[ EdgeForm[{ Opacity[0.3], GrayLevel[0]}], Hue[0.67, 0.6, 0.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[{ Opacity[0.3], GrayLevel[0]}], Hue[0.67, 0.6, 0.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> 1, BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { GraphicsBox[{{ Directive[ EdgeForm[{ Opacity[0.3], GrayLevel[0]}], Hue[0.9060679774997897, 0.6, 0.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[{ Opacity[0.3], GrayLevel[0]}], Hue[0.9060679774997897, 0.6, 0.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> 1, BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "Columns" -> {{False}}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, GridBoxSpacings -> {"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> False]& ), Editable -> True, InterpretationFunction :> (RowBox[{"LineLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{"Hue", "[", RowBox[{"0.67`", ",", "0.6`", ",", "0.6`"}], "]"}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{"Hue", "[", RowBox[{"0.9060679774997897`", ",", "0.6`", ",", "0.6`"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )]}, "Legended", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"], ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> Automatic, BaselinePosition -> {1, 1}]& ), Editable->True, InterpretationFunction->(RowBox[{"Legended", "[", RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", CellChangeTimes->{{3.587924027168995*^9, 3.5879240514523015`*^9}, { 3.587924235342874*^9, 3.587924245499984*^9}, 3.5879242846595497`*^9, 3.587924316943532*^9, {3.5879244337346735`*^9, 3.5879244440949254`*^9}, 3.587924604749152*^9, {3.587924647456197*^9, 3.5879246504408245`*^9}, 3.587924747136512*^9, 3.587924806891572*^9, 3.5879248767881155`*^9, 3.587924913181822*^9, 3.5879249468252954`*^9, 3.587927459903065*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju1", "=", RowBox[{"LinearModelFit", "[", RowBox[{ RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"LegendreP", "[", RowBox[{"2", ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}], ",", RowBox[{"LegendreP", "[", RowBox[{"4", ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", "\[Theta]", "}"}], ",", RowBox[{"Weights", "\[Rule]", RowBox[{"1", "/", RowBox[{"sy", "^", "2"}]}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.587925006971017*^9, 3.587925029613559*^9}}], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ RowBox[{"1.0218000000000003`", "\[VeryThinSpace]", "+", RowBox[{"0.29723809523809536`", " ", RowBox[{"(", RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], ")"}]}], "-", RowBox[{"0.06940952380952385`", " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"30", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], "+", RowBox[{"35", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "4"]}]}], ")"}]}]}], Short[#, 2]& ], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Linear", {1.0218000000000003`, 0.5944761904761907, -0.5552761904761908}, {{$CellContext`\[Theta]}, { 1, Rational[1, 2] (-1 + 3 Cos[$CellContext`\[Theta]]^2), Rational[1, 8] (3 - 30 Cos[$CellContext`\[Theta]]^2 + 35 Cos[$CellContext`\[Theta]]^4)}}, {0, 0}}, {{69.44444444444444, 82.64462809917356, 123.4567901234568, 204.0816326530612, 123.4567901234568, 82.64462809917356, 69.44444444444444}}, {{0, 1.01}, {Rational[1, 6] Pi, 1.33}, { Rational[1, 3] Pi, 1.2}, {Rational[1, 2] Pi, 0.5}, { Rational[2, 3] Pi, 1.07}, {Rational[5, 6] Pi, 1.35}, {Pi, 1.16}}, {{1., 1., 1.}, {1., 0.6250000000000002, 0.023437500000000444`}, { 1., -0.12499999999999983`, -0.2890625000000002}, {1., -0.5, 0.375}, { 1., -0.12500000000000033`, -0.28906249999999956`}, {1., 0.6250000000000002, 0.023437500000000444`}, {1., 1., 1.}}, Function[Null, Internal`LocalizedBlock[{$CellContext`\[Theta]}, #], {HoldAll}]]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{{3.5879250255663376`*^9, 3.5879250303323684`*^9}, 3.5879274599499445`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"(", RowBox[{ RowBox[{"aju0", "[", "q", "]"}], "-", RowBox[{"aju1", "[", "q", "]"}]}], ")"}], "}"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Theta]", ",", "\[Omega]"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.587925040942642*^9, 3.5879251444826603`*^9}, { 3.5879280437650065`*^9, 3.587928082471793*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwt2nk0VV8bB/AbipRkiqKERjIkhQxbMisNCoVIZSzzlPEY770H9yJz5jlC 5il2iX7SnKkSSUiSUhlCeZ/Wev+p9VnfZz9nn73P2ffeVmI2LqevsFAolBz4 49/frJjz2ceDbuqUoQiX+TgC7fzcqrLtxglE0XUQnAIv3pG9/CbeChGbxri7 wJVzqJen3A5RXEXOxYHH+O0X6uJdEGVc/+cRcPTmTq7yZg9E8cVDA7EEKtxj kUUp90GUxHFhK/A9xe9yxtn+iCKgUfqYSaC3OuFtBfHBiKJ2OUYMvCi5XjKg LQQRrSwPrBkEosr3uRc0hyGibuQYPYZA/Iezm5/VRCDi1ojUzWgC5RxxZFso oyKCumCdFEUgGX2F42JFdES5tf+rH0mg5pN/Ew2yoxClq+qlHp1AvVbxuzPi mYjCnlicHQn3c0BG6WNHLCJu1mRIRhDIR/HGO5+2OEQIp37PCCMQG7LcmdN8 A1FWydZpEATq0mx7dLAhAREfzu1zDSJQnM5u566aRETJU2WnBxBom9FM3c+y ZEQp3vrT25dAo6dMzGklKYhy6CTHMW8ClZ5tXhEpSkUUhTyS05NASpYRejrZ NxFRwDd81IVAp69ufpsSn4WI7YICxZcJtF4J4STdbOiX+6bzIoG+N7rxfOgA 2wdt775AoLqWvlqvthxEueh7JN+MQEc7sv9mNuchytJDKWVDAu3S7T75WTkf EYqhloW6BOJ8tDrvQEM+ovhH7/tzlEAvnjjqdtYUIAqjo9JOlUCWPQqxM2VF iCJo0Sm3j0AaJnYjKvuKESUn2PjLbgLteJ2qEFkCtmxMZ0oQaHLg7+stRbcQ 5SXNP3ELrN/HTjGt7FJEKT0xncQO6/PDojopvgJRGnrFJ5uCUYxAmuo9rjuI ouMjWlgejF5VRogePA2OOsqQyQ1G5pMWY9sGwI6SK/m0YORsvs7tx1QlovwI HdtrHIwS1OxpqRtrEKX3rGHuUBB688bYacNZMOfYOunnQWibNzIKSwWXrzeK wEGoqHwT/zXxWkR57ZmXmRWEmkQ7sjQU6hClSbXO2zIIvV8lXv/JtAHmY239 7Hkg2pHJlWaRDt66r+RwSyCyP/w74OUweNG+zaskEP1wf6HZ7NCIKNvLG83C AxHbaNAzhn8TonjdP9lzMBBJPhwYO5h1F1EsWozqmQFIpcOAU9PjHqJ8QpQR UX+0safwueIN8Izt1UUOfzQ6wpIoXQ2uS3k1OeOHGJRm0c0/wUHC34wf+KER FamD393vI4rUB1GDy36IVrXOOtO9DVGkn+W/y7yO+rKe1C66tSPKutMjZ+Z9 UGn5Hv/vceAQ4a1ZAz6IaAnXGK8E/+KqbMc+aO+A6uOXM+C+kfO5VB8UsKls uNitA1HesS+XCPggiZiYdaZuDxGF7N2+XsobufoZXax27UQUoT1bv6h4IgNn 1WKOWPBc8mKgiCeSsJH8ZlkBdjzmNrPsgfr01wRyTIO/5JT6tXggtc2tKZZO jxClc3xks5oH4myQfsFu2wXXu6NSfMgdFcyuRxbmTxDlbPTsDJ8rutZwhcEi 8QJRMtfbcP61RT0T+muLbHoQhXiUkjAkgkjZOUrdudeIomXnPq98BbtJdSbe K3iHKGkTRwOY3njxklP5oPMwotxvYUaWE9ia56fvXe9hRHxtMjp6n8AdrX5H bwaB3awrf3YTOHYz+dqMAfVdGzfK/ibw7ufFLD1lYIXARa6jIfjM4XGTrimo 148fO98Tgss3Xlypc/yAKGh1fuFUKOZvnXiU6P4BEYLshyr/hOLrTq4Jnn7g 3apztzeEYa2HwXvlSaifnq31kQvDA/6ZxmW3IBco3WXmEYY5Pg0U5U386xd0 U2EuDNu0mJyMtR1BxJnuI4PfwrF8nRDvZpcRRNmh7yZDicAsFW+7c3wgn6Uy nDZG4NzsC6bVNMiPzKjckovAI2G2F/pKwLt1OeVcI7CNgfdVkW9Qn9v9x+wL uD+RVuzzEVES9uvTX0Zi+RemBvsJcEEdm9z7SMzyaPP6JtpHROjV7bo3FYlz mzKYj1Mhb2EYp7NT8UhGQdJ0M3hk/TFNVSq2uVybr0AZRRQ+3U8KOVR8aabn 3j0aWG9vkso5Grb2izVtiB1FhMXVR4qXaNiC9dh0RQo4h+687RoNmwg8EM4q hnoWi3clBA3rKVd6B3ZC/knta2shDcuExOw7zDGGKP/dtH40TcOSnPoP9m8E mxMsdvM0vPsG2/m9QmOI0OUwm16h4e0F/lShPeD9tjONG+mY75HDyJwu1FsN 3Tq6n44XNuqkVFPB3txDgs50/Ct1lWwpE+r3mZcZetHxjHhLR24yWLmXah9A x5MKCj/jiqCeXVPRkqTjQTNxI9f/wFFXPfYX0PHbD4Ojds+hXmiZcbuUjvsc U/2t+iFPGXbYWEXHLwI23jL6BPlbR+X4Vjpuy/7LKs0+joj5Hp3APjpu3duU toN7HFE8Wy6pvaPj5iqv/SKC4KlXv8c+0HFN+9SFdbuhPmun6/cpOi6aeNv4 WQdy//fZn1eROFqu3qUwEjyeeNh2N4m75PvHvRhgA4WZBCkScxyct9ROgvEz NxNvy5I4XFnx2GgBOK47JkmRxP6a9XvEO8ClLFFndEjcoNWfNfMEfNXt7yN9 Es/pzG+63wNesyS95ziJ3Q0VV1uPQn/TPSWZxiR2PFP/IYP1EyLUNK57WJG4 2KTf7No6OOzGNWRlbEg8bjb/XJUPvEPa6+VlEl+0VGwdEId6gbPpLx1InGll erBUElzI8JC5SuJ3F31u+8mD4yoeejiT2My2Pm2zJowfSn5a707iJPt+ns/6 kEtx+9Z5krjHcZ7WcAryO0+jMrxJfNJF0cf0IuSdXoM7/EjMcDOd3uUA+ex9 3g5/Ej/x8Lky5wpO2pJ9PJDEur71xokE+NHtKkEC1sevv+syDayyLHsuhMRt AfNHFGKh30TYbGgoiSnBgo2sKeAvkSsJYSRWD1GU684CD1wwYIaTOCDMtCi3 CMb3+L9yiyBxU4TPNvcKsNflBNVIEi9QkxOP1P8bXxv9DXyIrF/PgyH/IdFA UknsGd0fNvwQ8h5fvg00Elcx5hcrnoG9E29eB3+PFXQP7gOfcTv+FCx9Q/Gz 0RCYumXXWjrsR6Kp9bZx6Pe4VlwaXJzs0//1K9g/SEMZPJ6abNQyC856GPAv 35Fe3xH9B8aPzvX8G2+T2a9qsXoCPr8ZOs+gf3b2fLUUF/iPxHM/8FCuoNQS Pzjj0lVusEiBYm6XCJiVRyQa5n++yHRz2o4JRFiuefcd7i/llk+swz5wqkKJ GrivNJldWQFsnRfuDuvDV14fxKEK47e5Ofxbv5N3+mf7j0L+95XJv/VlVM1f LTKEfIHfMATW/0mN4Ki3Mbg9VcsE9oezXtFcxxzqJ94e4YP902s0fSVwCfJ6 +yMNQSSObPbRH3MEn5g8og37zXKvXjHcD2zfryEIz0cJF2/hn1Cwykffg74k Pm1+ld8nCsze6KQIz1Pe3PYZh3ToL2ESOO5G4mNa/lYf88GOh9JuuJD4V1zv U4syqL/J67zjGom1pMmSE63/7ue40owdiaf8RoUePQS/vy8tfYXECZ3qVM3n YAer18fg/Ri79PPSwWHo5555TNEC5ptmsVWY5TOcx+9rGoxILDNRF5XA+RkR LK4mvIawfgd5Frn4wBxeFSd0Sbz7ZUcfZQfUP7SM8kIk7mSXjR3XBjuJcjrL kNj1LP2vlRHYZSpibC+JhfI+Xn1jAuNP2j/Q2EliB/UU/Sd2kNuMkrnCsJ5e q1ir6GA5CSofOzx/beZuUvFQ799qcAvOm/Mb697np4El5UbEl+m4tNTxbnIp 1J9nS7n/nY6PjXR7BT6F3MHcu+w1nK+yMqNzvZAn1MvYvKLj9EDaadchyJ8v 9Sw+puOvQmqyl76B2zIW++F8ZJwonNDjmUTEkX4RzTw6PpRBMW3bDA7ZVbcp nY6HJs93qIiDlc9YPU+gY9lI7lyZA+CU9F9TEXDe3vU15z8LJpYa3tjSMY+k 4bP3KeD4UiJIgo7H2bN4OrPBt3ZwyAnTcdPYjzN3isGqH6Me8dLx5Zy0AaJh Er7f7c+sWUXHDUKTE2KvIc9WinEaouEL7HTWy4JfEOFpNHDxBg0fGHunc0z0 C6JMPv+SSKdhjgdypMJuyKcOm1cF03BV0OuNqxUhVyl2z3ei4dVzu7cVmoDf fjV01qTh26MPlSYSoV7KUyHrCxWHtG0JeJEB5hIsshimYpNsZ9xQAD4f+YOl l4opFpt06LXgfNuDnK1UbNx9xViyF/pJuZqzMal48T6b81X+Kfj+KDJbvo+K 9bI0877Hg28pX9huGompnS8GQ2+C2ya3D+hG4oczF4QE8qfgfSzYFqAUibW1 /GOUayHfq8PmtjkSa36u9gnth/z3rg173kZg1QM7j/GLfEWUQi3p1yYRWO4/ 9lnFAvBetL1CLRwLfnuiE1w/jQiFMrS2IwSnxOGLnzG47lqV0p0QLKRQFWDc CdY1SzS+Cb6eXLX7DXjvqyVDtxC8hdVm24vFaXh/rofoi4TgbYLzs9vVvyEi HDvRnQm8C4kVtLV/g8/vZTubtUE47b+mVawO3xHFqJiP/7cPVt16ZGX75Rn4 /alVI7pki6WGN44Gev5AFI7El+X39VBZMa99rftPRCzyc5z54IoChiy7pSJ/ wXlxYc96vmD0S1ct4woJXq8g8Vc3GF2tFLHLYoCtbgb1BsDvk/CBRd7kX/B9 8u31A+PB6LDkOfHFIshlktW6zQn02+uMW+cjyPMbbdMlQ5A3lyH3Fa5ZpMGX 9rXrbihyU1UyzEwAs9ZZTpZFIIpzQjAzZRY+D8vU77VFIEbW92oifRa+72b+ CO+PQCUst0Qu5UN+w4P6lhKJRjo3T++ugTzB7kzN6Uh05uxSbGU35EXeUrw/ I9Eh59a+dt45pLEimT+/k4bas7asq9s0hyhUK+1wJRo6/dIbFW2ZQ4Rstu8f AxpyVpAtpouDb6WcqnWhoaLFrOtG8uDxqHmlBhoSooaIvD4F47Xjs0K06Wgx S8vmS+wculemFVZ8kkTq82rx+xMhf3f4zcpFEoUYKbb5pMJ4K2dWdQ8ScfzZ K86WC3mIKumcSCKB89wjItUwvwUZq8zXJJLjf3vRqBesssN57/ko5OHUHZfw BurpG6LGHKJQXduT+28HoV+JjRX1ehRSc8NiduNw/Zcjk/4pUcjgWf6H4HnI F+807+qNQldoLhcrN88jitJbAS/9aFT83j5ufus8IhJS/4abRqOpQzb31cTn kUb8nszrV6KR+9gZsS7JeXTvb2THxpBoRGge/jCiAvkmz02zddEobZntIv8F 6Hd0Xoq+NQa9cE2z9skFiykWE70xSDJ245JnIfRPk9Q5/z4GhVVEJrqXwPiF vltbPsegQ9PuXdeqoN7vTsaJ5RiU4WSocLkN8rFZFboYAznaLrOfGgE313Yc sGOg9gj3XKNx6Gffmu/lwkBbCyZUj01CXlVxP8OHgV587HHT/QHzdctLyqYy kOLFsgE1lgVE0QwfcClkIDaLCxWS4guI4B5MknnPQBf8e/T37FpAGq7i316M MVB9msHoTklwUYvAuSm4/ptDm8XkF9A9rau1W34z0EsT7jBBTXDYqRQbHiaS 9I7YKqAD/dQ17soLMlF44lI9rwGMz5sNnhBhIqWeT1Ncp+H60lov2fYwUeap eyZsNuDKF5wUNSZacD00s8oW+p0surl8hIlOx96OWnGAfotf8oZ0mGj185R7 i27g8GscxieZ6OoxN8mZEDCNUbh8kYkeOn1qn44AZ1zy2WHLRKJRllZTdLg+ g5Gx35GJXj3ST/gUB/2/1b1dcmMiZV3xv4M5UH+DXn2CYCKFvC7afwXgFMr5 uDAmkllx56u8BfN7l6HVGMlE4vUP9oRXgo/OvG2OZiIRvqvV12qh/wuFkCQm E21y4Vc3bYT+Ho3WpvFMtG43nLf3Ia/LuR+VzERrwriG+Dqgf/Zx9ZVUJnzO 19r/6YRc7fGkWToT/UpaE/TiBfR3edrVms1E0z/KOZp6oJ/v2cWuXCaaMDK9 kfcaLF53qiWfiQbXFBd7D4M/rHU7U8xEr21OHrAehfEvmw/+vgX327rQoj8B 3tIuHF7KRE+25OgdmILrd9wVm70N6+Wt3y3yHfLTpjrHypno3qsZyzW/oF+V BY1ewURNMmkT3+ah/nTZ+O07TFRDanq8WYL58h2xrqtkoorxyT9tK1BvtPtX QRUTlWjeoN1m/Y003kTm+FczUX6mCl8S+290b1WmnWIN7Pfix4zgdb/h+3qb 9htwikn0Hgfu34jy9KLKxVomiq9SqD7NB/XeFL3n4OgNg2qqglD/+LCTRB0T RTpGdO4Uhnpqe74lOOShtDG3KNR/sP8VCA4Q7xtcEP/Xn/N8ONg7KMh+ZBf4 UV6vK9j17a6fjyXBh3XsjoIdDz0PrJWBfgLC3MtwvcvxPhxZ8mDWS0/TwBem RW/QDsH9yHrnioLNDDq3uh+G8aidQcL8jQtdi83VITfpiR+A+zVi2XxAWxNy Xu0KXrDehfstMjqQM56MysL6aDY56AkZQG6ppHAA1k91E2/3KiPIY69lisD6 HnJvsvxyCu7ntv2OKdgPuWc2Ez1nob5a7b+cMibaGVn9p8gS8leH7XEJE20f MafFXQQrUxx2w35vUWfj878C9bveRnkVMdGGuTN7jK5Bf3EO9fY8JuI4/adK 0Q3yjbUv2nOYiKW8QE3MC3LNPdGlWUw0f2Xu9K8A6DfEHyF1k4l+3M8cHCQg p+U+bE9hoqmtuvb/hYO/bVPWSmKi4d7kwLRo8HOuptlYJnqkrVyskQ7r177a TSKCiXz/C5IJzoZ+vm2FRSFMtEe/vaYlH3Iv7USuINjPYyfuHy4Dz4jcDvJm Ii3jK28VWqGfdrLC3BV4H3pKrD3awIZ782jwfueZfB+vfAje0TG1bAHzP+// U+Y5jM/N2hFlDM+vddz6vcPgUrJOHcF+j/TF243C/a4oRA8rw3lwWWRz4QTM p/mg3WUFJgqyK9opMQP9Zu9p8e6F/XBuUd/Ksgjne6E+O5xn9f6fXXl2LCIN fmsNiwEGsv0jM39iD+Td213EehhoU7BnIGPfIux3M/ejJwzkGbpCX3cQ8uPf O3ALA8nTBfJW64CFnD4bZjJQedKR3t92i4gi8jBq/Byct0JUc6Wr4Jn0zr6T DMSV9uSDtyt41IC1RJeBrmaYTv/0hesfdEr9rcBAkvnX2KfpcL3yAzbqGxio oDJVeaQU8gGpJLvmGOS4ZC75ugKud/4Sr25lDJLT3ib8rBr6RWe85yqKQXdf 5y43NkO99c4bp+JjUPdKKY57DDnj2bUquxi0yqhV+8gXyJv06ka4YpDl5Mip bMklpKEVZqynF43EFQo0k2SW4PfdVfZdKtFoItDuQLT8EiL4fO2mpKORJ88U v+9hqH8saHmALxpFKc32nzCAeumD/qXvolBjJPuFFQewNbP8hFMUEpDY53jh Fox3SM7o8CFRbHyUya2yJXSv5M68ny2JOFm+aP6qhH7rND5vOksiyodbwmQT WD1+iEWeRFOZu5/WPobxv2skyybpqH2LhBzXNPSvkLSzMKUjT94tc83yy//+ ve1l9TYaerWKI3Tz3WWksfSEXO8YgabLUi+cvAc5qwLLdeMItPa8lAq1HfJQ ruOvVCPgc9To168ny/D97muzIXcEKrdJtH0xCPlb7zSL6nAU9UDckLoCXrT3 W7cQhrQi1PhnNf8gSmNQrIFnKKrl8Ch88Qg8btL2xj8I7RPY6GjT8RcRRx8+ KgtzQ98Yc/wH+lYQJaWjNrxbG0lQqbIujhQNCtso69m+K3jk/MBbzU/g9J1c Zpd88Ho10yLrz+D2az/dk3zwQdFuj6AvYDX/YZdHPpj2sWt90zewegALt6wv lr3apL5/Abzzb9+7BV8cEJiaK7p2lQblZdA9MtIPC2SbOi5LguNUNPtpgVg9 tPvQFmlwjEHjq/pAbH/5BKuSLDjyunDJeCC+u0c33eMA2FR64svRIGxTeejZ pAqY82N63XIQLm8TkH9zDOw6bZd9gMB6Y92/a53/5bISfswQHCjF8K9wBQt/ aRHPC8FVbnp/it1XaRAH47Ub60Kw8N+7lHRv8JmkNxWDIXh6UyF7aBDUG0kY 3JcMxQl6vgJGDPBGAUW7+6F4uFRk/3gZ1C9K2J0eDsMCP/qq3ldAXtJPSZsJ wwZKcQpvKsF6PWlPWcJxdftqpSe1UO8skbywIxxHDk6rV7WApfr2WtiH433c 948FPQUbxeDjX8Kxr/sV+01fYfy3O1uDP0RgmuG03eFvkCe53bebicDJO3zs LsxAPj/059CqSFzXR7MtnIW8d3k1fXsk/nn49uVDf8HvnFp/W0ZiZ9af1ibc LBoUUcWoVT2ROPCdv7UfD/hjIv/xkUgcXctmnckHzt12Luh7JC6122Q1Lgju vDYct56KJx4rW3pvZ9EgdL5T/Y9S8aUE4lzSfsi12jONblOx+7W155oOQL63 Teh7AxWH6sSbDR2EvPA1w7uDirMX8kx3HQZXdB6VH6LiIYv/ztZpQj3nh8JL G2jYbOeG033G4KJUxwIHGrb/m3Rq8SzUv3R5GudJwz79oqe2mUFeQI+2gd+r SfT9J20tIN/0eelOAg13fz1jNHcZzL90m9JKw0Z1Nw02eYP3vpC5vI6O7X/a rAj4gkXM8uf56DhMTrJGwA/suTvOXQR+P5c0bBUIAr8QadomTcfiWb3f+SLB RYaVJ47T8RyVO5knCSwr28FNp+ONHX2GPClgpiMSiqVjKZZMCk8azK9+5wh7 Mh1bB+xz3JgJvvEsNj2fjrtc9dW4C8EzWrtuttJx5rmwj+vrYDw9fNvkV7h+ kkHK+gbwNnunSz/puLub5/j6JvCOzyUPFuiYwyi7bl0r+FPdvBIrid01W+ic D8GuBdS5TSSODg5X5+yE/qafdxcJk7joruHPtV3gB2q31LeT+N2htxZrn4Gr ZfTE95JYR2pelqMPnHz8SbMyia3tW0fZX4NDQ/Xz1EjsXxCRyv4WfDI03e0I ie+I8rOyD8H1zmy916ZH4i6Lgfo1w5C38jO1j5F4LDX36poRyK8z5SpOkHgL //6+1ePgvoGJQyYkVji1QK6eAD9+9ffMORKfYGC0ehJcnzx2zoLE4RxGt9im oV/65A4hGxJPLzsGsM5B/vupk+1VEp8zM9z7ex4sFp9Q4Uzi9mqpvunfUL+5 hD7sSuJUxynZt38gl5Mb+O1JYraHT949X/n3PK9WHvEmsbNYGb1jFasGhfbn SpUvibVeX/t4ZzXYVHw/ZwCJKw4YxRayg3+7vIwLhPkzZdTS14IjxLRXBZM4 YnLDZNw6sGpIjBlB4u/a35KoXKywXt9Lk0NIbJ7z/GggN+QfP+W0hpL44XLF d3ceyFfPuz4NI7GcWWyGPR/kVe1b2sNJfLPa1eCCAPjJhpzcCBKv4T41bywI PlWy2iGSxK6O+/P1N8N4kzADQSqJBzp4TiFhMFuGWxlYR+zHH4WtUJ/GEyhF I3FlwKsSSVGwDa9L3L9/73xdZbpdDFz3Sf89mHrgBtsmCfDCd24BOol/MDwq 1+0EJ+Q/kAdbThpfWLUb+s8z7ZTAndoK6+b3gG+Y/t0Jls/hb5iSBPfWkUvQ L2P51+WRfeCdBHcjmMOsl+e1DHg0nXkB7F5d2/pUDvrbcW2YgvkObkhyeiAP /jYRcxGs5+gt1KgA9RWWvBjut7rDpKP8EPj+nUw28DYxRfd8JfAu9UPysD60 AEHRtMPgFt93urB+P/vnHzNVwdqTCdqwvhcOvPaNUIf+ZgcuScH6dzIadvpr gC+uM/wN+5WpfT3YVgss2uB9PIjEa3PO7bPQgfE119q6Yf89l5XfnNKDfM5D UdOfxPrVi/JqxyBPlSnv9yFxzYaB9/JGkPdeb/jrBfNzbI7ecxJyx6N/uOB5 +7U9YJzvDHjYV2/MhcRWARY31pqAV+TMyq7B+9KvqrFiCuM/r9RYOpE4i/En ddIcrOXh4GNLYs7JQZ1hy3/Ph9Dj4UswH+3Wn71W4Hd9MfIXSWywHHT8/iXo J5JsyDQnca2p1WLdFfARo1NpZiTeXo2KbtuBD9Kexpwl8ZwDZVWKE9hpDMnA +5jTH1Lj7AH9eF+UnYX3ebxD7j3D69/9ivw0hvd9X837tRU+UE/MtB6C86Au Vs3qmz+Yac1ZIkfiJ/q/17qGgz+eNdPbRmJepWKF2EhwGXuj02YSm+4ytbpD g37FzR89+Ek8wlJb8z0a8ktSzfKcJF5odrVyS4T8Ya+n0y86Vi8RJeOSIY90 2V03DedxyrOaylRwhNi3sQk63uC1j/NHBtSHJ439ekfHEjITNe6FYImnUS8f 0LFRthWnZz14E52dGU3HCYwNBxMawQ7TP2Qj6PhNQItVTTP0E16fXRdIx5fP Cdf+wpD75Th7OdPxdd5+K69OcM1n6SYjOs4PN6r1fgP13lmbnTjpeNL9z/uk AchFjo9eW0XHshdvc9YPgp/HHjZdoOEmNU7r+Q/g+sP3Bsdo+PlcB6fvJIyv Gq1qxjS8aK9mfX0JcsXaov+cadigWVLD6w/kU+LN05dp+CaX0Ha3FcjFZh0o 5jSsWvXjvT0rmwaFO+HxRx0aDloqsjJbx6ZBhPWtlG6lYVYGr5WiMOTPZH2P /0fF66s/Wc4ehnzwtcSBdVRssbpXbUYV3L7vyH9/I3GZadvWr+pg+fhy3R+R 2Gg5fXBUE9yvUcv1JhLHap+27DGAfo18QncKIjH/67sW1efBq9uyzFUi8dY/ ceZufuCPfj13zSKw3sjxxuQAGG/0ef9dvQjs+d9awdYgsOb840KlCNwVF/KK Mwzqc4y41IUisPcuN/38KLBQsLRPXzh+ceKkYn86mMnisftEOA7N3cCnhmE8 X+9GMfkwPK4b1cXBtlqD0FdxbH9AYBtD6+0714BV0zbcriDwoNFB7yMcq+Hz vIgZcZPAPWffi/mtB5NrYzZ4ELjt0oHrX/ihvu+1qr8YgTOCB3Y/2wn5H82W 0vkgfKZeKuKGLthJpS3aKAA/2PUEbYsCdwVbDbR4Y0eOQjaxtWtgfeUvieTY 4frsHWoP4sCUqjqD63/Vn6modpzmYdegXG3+MCp8BZENXks6fODJzIfrHa4g 3YMV+1UEwEoPz6ytu4LuyYhnSmz+V39aPviELaoW4/D5tR2secvmLGGHUth7 9iTJgb131Nm9cUCXup2i35wAR7LLcts5o+0nC9qengIzWNwUy53RuydDC/eN wTWBY5Kzzsjk4akrJaZgSoeWe6gL0mtUVPe3At89TKgdd0UyWazfRVzAL/XF ha3d0ILjTWNrBniTnomiqwdi+uWxB8eCm7d7zcR7oF1kaXNGPLjT9Sq11gOd vdUsMZAE5hhT11n0QFWfBn6ezQLTX8xyhnqiq5dFEgzvgLdGn4khvdCwZUbP oVfgtaHk5SAf5HOtgHa2B/xg5/CxdB+0IbBM1bMPbK2mvL7JB6mlt+RXvgU/ LrLjnvVBaW8HPfd9BFfYD0o4+KIzptsExH+B7QN57PSvo86TWWe5NnFoUAZT NF0/+yHH9rFWdiGw2dPLZyn+iEtp3x6WLeB3Tif4BP3RadHGxbmt4PPuopu1 /NHA11dZwzvBXd7bDNL90TS5ZrL6INjzV6u0dgCK/XvMuFwRnPCiNOFcADrg fuNusTJ4mG/x1bUA5HtuOzNDDezxxLY3MQCx7DmsQNUGK6mof/sYgAQ6rgWd Pwv+sc/8im8galCq+XTGFJwdPaREBqLztxdPnjgHdq+IHLkZiDJvUCW0LMFX VpbqWwPRHpucTukr/+aXHebAEoRUV3p4V3mB3WYH+0OC0JC7cMCSN5iL22N1 XBAKGb84NusLfjwszJEdhB4+na6fDABX+zlGtwShE+kclj3h4FNzp5hzQchG WbWoKOFfzhPnZh2MHL4+nX2XBI5i9JxzDkauOVZavKlg4lnAuoBgFLw27ENA Bth6uaYrKRilv3kkfLoQXGI8VvcoGOXFmDtSi8Gu6s4TvcGo5MjXhrsl4KEv vSMfglHjrY0muyvAb/pZ5X8Ho77rprHL9f/W66lIOi+BBqU/D+1vAjftiuoX JNDoBz9pu7vgl09l5kUI9FM/s+vlPQ4Ngr9gaWQXgTZuGWMrevRv/ncXnZQJ JPjM2/jdY8hnHl/sVCPQtlCOXJ5n//aH7ymHJoGkJ6VQwCtwuEvaQQMCGTS5 Xz81AB7XC1Y/R6BTzmydkYP/npe13k0WBDITT9p09z3YcklvizWB7MjG6l2j 4Plt7hG2BHJWN2SxGAcXst6LdSCQ9493J+Mm4PqCQW+CrxIo/DxlemkKXCJp vdadQFEb4lX3fwMfO/Awz5NA8W0SUbYz/+436LOYD4FyJHX3vJyFfEXE/JE/ gYqHXnuvWQA/c8z7EUigO/GOHSqLYOuZ9JVgArUuxtgU/oXx1/antocRqKNc tHKAslaD8pQzOSCCQE9sKlc2sq6F7/sWqkJUAvVsOmqksxryT7zUZBqBBrp6 0v3ZwX5qXot0Ao0E2X65sxbswrP6SBSBJuUXlMfXgR0nFJyiCTQzTqcJbwC3 abBejyHQQppw/8mN0D+0xdmRQaAVo7KdkbyQO+/yRkwCrWFFns384FX2Qgtg rvoXbd83Qf21G2cSYgnE72TDs2sz5IVDe/njCCQs+svKXBhsnJ/sAxbvjiiP 3Qp+fymjFSxJFfzTIQp2un/4M3i/yi3DJTHw////5/8AjDOhUA== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\[Theta]", TraditionalForm], FormBox["\[Omega]", TraditionalForm]}, AxesOrigin->{0, 0}, Method->{}, PlotLabel->FormBox[ "\"diferen\[CCedilla]a devida aos pesos\"", TraditionalForm], PlotRange-> NCache[{{0, Pi}, {-0.012957045822813651`, 0.015484842298356893`}}, {{ 0, 3.141592653589793}, {-0.012957045822813651`, 0.015484842298356893`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{{3.5879250635226774`*^9, 3.587925145560874*^9}, 3.5879274601687126`*^9, 3.5879280841906843`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "=", RowBox[{"LinearModelFit", "[", RowBox[{ RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"LegendreP", "[", RowBox[{"2", ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}], ",", RowBox[{"LegendreP", "[", RowBox[{"4", ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", "\[Theta]", "}"}], ",", RowBox[{"Weights", "\[Rule]", RowBox[{"1", "/", RowBox[{"sy", "^", "2"}]}]}], ",", RowBox[{"VarianceEstimatorFunction", "\[Rule]", RowBox[{"(", RowBox[{"1", "&"}], ")"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5879251652812967`*^9, 3.587925175875943*^9}}], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ RowBox[{"1.0218000000000005`", "\[VeryThinSpace]", "+", RowBox[{"0.2972380952380953`", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", " ", RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}]}], ")"}]}], "-", RowBox[{"0.0694095238095238`", " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"30", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], "+", RowBox[{"35", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "4"]}]}], ")"}]}]}], Short[#, 2]& ], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Linear", {1.0218000000000005`, 0.5944761904761906, -0.5552761904761904}, {{$CellContext`\[Theta]}, { 1, Rational[1, 2] (-1 + 3 Cos[$CellContext`\[Theta]]^2), Rational[1, 8] (3 - 30 Cos[$CellContext`\[Theta]]^2 + 35 Cos[$CellContext`\[Theta]]^4)}}, {0, 0}}, {{69.44444444444444, 82.64462809917356, 123.4567901234568, 204.0816326530612, 123.4567901234568, 82.64462809917356, 69.44444444444444}}, {{0, 1.01}, {Rational[1, 6] Pi, 1.33}, { Rational[1, 3] Pi, 1.2}, {Rational[1, 2] Pi, 0.5}, { Rational[2, 3] Pi, 1.07}, {Rational[5, 6] Pi, 1.35}, {Pi, 1.16}}, {{1., 1., 1.}, {1., 0.6250000000000002, 0.023437500000000444`}, { 1., -0.12499999999999983`, -0.2890625000000002}, {1., -0.5, 0.375}, { 1., -0.12500000000000033`, -0.28906249999999956`}, {1., 0.6250000000000002, 0.023437500000000444`}, {1., 1., 1.}}, Function[Null, Internal`LocalizedBlock[{$CellContext`\[Theta]}, #], {HoldAll}], VarianceEstimatorFunction -> (1& )]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{3.587925176688509*^9, 3.5879274601687126`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.5879252180670156`*^9, 3.5879252222861233`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"1", ",", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}]}], ")"}]}], ",", RowBox[{ FractionBox["1", "8"], " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"30", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], "+", RowBox[{"35", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "4"]}]}], ")"}]}]}], "}"}]], "Output", CellChangeTimes->{3.5879252230674357`*^9, 3.5879274601844873`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.587925239584463*^9, 3.587925243741065*^9}}], Cell[BoxData[ RowBox[{"1.0218000000000005`", "\[VeryThinSpace]", "+", RowBox[{"0.2972380952380953`", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}]}], ")"}]}], "-", RowBox[{"0.0694095238095238`", " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"30", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], "+", RowBox[{"35", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "4"]}]}], ")"}]}]}]], "Output", CellChangeTimes->{3.587925244538005*^9, 3.5879274601999655`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"D", "[", RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], ",", "\[Theta]"}], "]"}]], "Input", CellChangeTimes->{{3.5879252551795344`*^9, 3.587925266618002*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "1.7834285714285718`"}], " ", RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "-", RowBox[{"0.0694095238095238`", " ", RowBox[{"(", RowBox[{ RowBox[{"60", " ", RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "-", RowBox[{"140", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "3"], " ", RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}]}]], "Output", CellChangeTimes->{3.5879252677430954`*^9, 3.5879274602155924`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Plot", "[", RowBox[{"%", ",", RowBox[{"{", RowBox[{"\[Theta]", ",", "0", ",", "Pi"}], "}"}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"parece", " ", "assim\[EAcute]trica"}], ",", " ", RowBox[{ "mas", " ", "\[EAcute]", " ", "antisim\[EAcute]trica", " ", "em", " ", "torno", " ", "de", " ", RowBox[{"\[Pi]", "/", "2"}]}]}], " ", "*)"}]}]], "Input", CellChangeTimes->{{3.5879252754625015`*^9, 3.587925354203543*^9}, { 3.587927480404804*^9, 3.5879274808735933`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVmnk4VO8bxscyYy8UCqFSRGlPCs+btEtSVFRkKSFL9UX2pJJKEiJJ0SJl V0K8ksq+7/vOzFjHNsc2v/P7Z+b6XGfmPc973/fzvGeua9ZaOBpac1MolGTy 5f/vPFiwone3s/aTMEn5avVg7Q30vP1yL07Bw3rx+dn8GzCXstWqOcQMzpeV e37I94L+lTbs7yGO8KaI/Vw7/ym0HPYv+BDiA4VDTOeVOBrqzUKUokOegaS+ xsj77EQwtF/dEhESA0SK12va51x4zrqYHh6SDEdfXtKotiiHpxKvNPNFUoCR fHQNV2c51KTel99tmAJOU9bn+UwrwJRxsV+uNQVKaO1rQg0rwcFUyJk1nArU 9wfnymOqIFTLJiBSNANCk1UWrgbUQCfXuszBcz+ApuZ/LuBQA+z/c1xQ51Y+ 2HrIvdW/1A6idR8r1V/kQ9evxXGu4Hbo6+EO25KeD9TGRcnnBe0QRMmRXz2Z DwbBtwYOKHVAz37V3eM3f4Hem9U/BkY7ICBNyPzNzQIY16m/em9/FzTElH2b cy4EqRNKmzwyuuFLkrLH+PNCuGfGF2lc2g2+uf5oILUQ8l0cVWR7umFTq2Zp 9UQhEEcva1sv7wFPycSueOc/ECPnzDds0wPrnz4VOuf8F+re7j6dLtULTu76 V9KdiiCgw0r/mmUfHHfQjOcPLoKGjVXcIy59sN5CZexSchEYvhG+ZhLYBw3H aF78o0Vg3VvVzkzpA63VeRGX7IrB1aqqe2ChDwR/bKniu1oCfol/fZSD++HD tDBcNC0DC0r0Vo24AfCmz91PdS8DIxGDLw/TB+B8+1AZ7VUZKFQpLmX/HgDh P4UmqU1l0KAlUF/ZOwA3Qz1daMblIKz8ipKybhDQzuHEFIMKCP/U7LQ3ahBu /LAO4l5fBa8e+z/vchkCtWOnFbh2VcF2EbeC7/5DMN6smcbRrYKif0fX24YM we35FQ0LV6ugdYuLjE3iELhrF6yZTaiC4NICn7zuIXhQKJfI3FEN2rtcHQsO 0uGokSAwDlbDFvtT96+cooPAwHTV0NlqGI6tvtNmQocnfOVT/S7VEL/9bIq1 Mx1eHPfQ7MquBrcQUP/9mg5vqxpL63RqIKDJ2eTVMB0srvy+VHumBqIcwu+O TtNhPStprNqqBn7eXXFlDYcOH1c8WFH5oAaq99+jCokxINF4l2lxSQ2cNhla qbiTAQ6D8iP/Wmvg6rPjanr7GbDNTcjn73ANZO+y8tI/yICMyJ7Y38tqwVg0 37vbkAHZbcGMXMNaoCryXQUnBnje8PT8aVkLgvWN99RdGaC1dG1Zzu1akN8w bybgzYB8edjxI7wWhM71S+97zIB/FiN30lpqwVx7VroijgEBk01CqcxaeNlX /jnkMwOO+xdGJy/UQsrAZOC2ZAZUfIj69VWuDuZaQsXYWQyoGzom8MmiDgZG VjZllDNgLFL50L2bdaD8ol5wppoBgif47pr51UGO56KGRAMDUGIhWyq2DmQo tOsj7QwwvRy3ayq1DuAm5dzHbga4LPdzqvpVBwdHwtZo9TPgizMMBXTXwWnP E+K8wwz4u05O0XqiDvxWvdu6a4wBXbULZge46oG3e4FHh8UAyT3ZjYRCPXx2 z0qdmWXA9sGIFQ3b6iEt3d4jeo4BehGup9JQPVTOlbStXWSA39yuf7bm9RB+ 7/vR31xMiP6ygueIUz3wqGbodvEw4cdFlvZ633qI/6mV00JlQo1ItTvnWT24 LbP+kMbHhJG85O+tMfWQ0mm2cE2ACfxOQazM5Hqo6XqYNSfIhHVrb6iF4nrw yDFpsBVmglbNCVunynqYWe2u90OECefvqXzU66yHqKQvEr3LmHBrl0CP8lg9 6O1vVmUuZ0JQ/+AaKqcePkaIPqoSZcLn8L8Xupc1QO3Pe0ovxJhQeORDWK5c A/wsCODaKc6ETva96ki1Bvg2HimWQvLcZwsRF+0GkMNGhoIrmLDS9MAxQ/0G KO/wzjtA8lZhhftqlxvgESwYGJN8PHcpX9ChAdZKNvMeJdnKoX1hwKsBEnp0 6yVJ9pH/uff30wbY7vIit4Bc/1XVq9sx0Q2QxNbMOkHyt7t3UjwSG+DTaPvv VLK+qh3nh8/lNkCYtnrzFFk/s3eP8q7yBjDboza9kmRamISVaHsDeAeXrRAn 97v28FTM8HADrL+Dtg+T+mjO1rQWLTSAwIu2Y3GkfsbxqVIfhBvh+oKUiboQ E5wvBJ+5K9sI7meCLseT+j8RdHx2aXMjLM/hnJkh/fmYc7JUQ7MR2joM1NfS mNC2Ruggy7QRBKpac0S4mTBbQfeusGuE5r9h5yo5DBD3LcpO8GiEhLqtDTfI fBztub/DMqoRepVf3jzAZoDlCysH+NIIwl4CT1ymGeCtezBBJqcRFAU/+gSQ +Uv/SFlX19IIPxX2j+qQea0413kphdEIadQla+YQA4b48yKfzJGf7/JJdSLz LWfnIXZIuglcOobyxDoYELh1hvL9QhP8tbkVmUj2k7vrMdUB2yYopM0UtxYx 4Dp+bSTp2QTPaized/0m6zt1MMHlTRMYqP0xdiD7kc8x+Ix6bxOYyZ7MiYxl wMz3Xq9rU03gfO7yQa/XDBhY2hP/ktoMdSoS7urhZD8FtS/MKjXD9bNhxNZH DPBPUvn4w74ZElC/y/YbDLg941U15NUM9c/+xJdYk/vXrp5b9awZUiS/v9p3 mQE6Fa6n7qQ2g9kQKn2jzwCu0UK2xkwz3Hlq9cttC6nPFrMTOT4tkJR4Icel lw4O/6X9xwxugRU9xuVezXS4lEt9KxPbAtqPNYdMK+mgefLrlEdhC0he7j4d nU2HeXsiWlOgFdZnuifvfkYHt68vxnNDWsH1yB3R39voYDM1ID0aR15nLRPS VqTDOc19h+S+tUKMcvujYCk67CnrivRubIXh5FqNn4tDMMXcchBk20Czkf7f 1qIhcFYtCsv/0AZzqyEiyGgI+qz7fN9+b4PC+Efbyg8PgfFbir3vvzbYVH3b tl99CPZJaOggehu46z5nxa4eAm7O51G8uR1aSmM/n2kdhJCax0dwejtQvPBM +LlBSLtzisj91QEbtqU48+8aAMUMu77omg5IsfV9EqYwAOGjDyu9ejsggXVB ekl4ANwt8z9oUTuhHfHWX+nvB52T2w1zj3ZCRXXpj/9C+6FWYcWXn5WdMLzU e6mT2QdzlnZJ7Q5doH7wywpd314wF5t0++nSBSNOP2wotr3wJ8/9YJR3F7zk /Skbc6YXglcHNp0P6oL8lxHMext7QakynrsusQtiNVZtHynpgbP7BoxLhrsg queA4qllPZAkeoXz3bYbPB7q7W736QKLXGOD4Ks9cPXpf4kVG1pgx/dV4qsd e2Bf6MmixoFm4E5uqX3n2gMr1X32xX9qhti3l8+lB/TAaL+U6lvlZui5d/Vy Q0IPFI0OuE4qNYHFcRd72bEe4A844m0h2wAWjWEB8a69oHJS4vThjmqwnKjL zw/og4ynmsZ7vv6CJ9syHT8+GADZt8pVu2m/MXd+prq/+xAkmnkkt7q3YTGV ExWdEQyw2NSpHeQwhI/G6MSNhwzDz8vJTiffjOOHRVXtflHDMFXPtNqdMo7/ TlxeJfF+GJJmPvuLFYzjQ7oeTzW+DQPHZd/Eh/5xrENPd/VrHIZTlYqqWpsn sObODXorZUdg44GtieKZE3jbP75p9Q8jcPHqlYaiAhZ2HA/bWpI4AseP6+aL 1LJw0mpF24vfR2ChRVBHt5eFt9ijTt9/I8B73CTvPs8kVhG7U1xMHwGH7823 zx+cxIqmjGhTtVFI1pfsVs2fxFJjZYd9MkchvoChQEuawhHP8RU6HgVavh2f 5M8pvGpXmueZolGw5Pz+J1FC8p2XaUrNoxD2vimkr38KS/NYyFXNjcKFAjXf XNlpLCc1O62gPQYhuzaa6D+cxhth7YeCwjFIOJ8S4nlqBn/sXpG/uXwM9vJf uW5jOoM3+tNaw+vHoG1Xh4LOtRmsVMwUtRsYA12H9Nk87xkcusk0T4B3HNaV cye3fZ3B4ekbVNI2jJPPR901UdRZ/OpfNhfP9XHY5XfmSHH8LB7vSrkzZj8O ujbMVWmps/jI3MeJVqdxeG5/JOVR9iye2vyiO8NtHBT6wvmpZbNYP8Tu19WA cTiZMKenOjqLuS/J3i35NA7qL9MLtmxl4/Mu4sT3L+PAFaN9fWkPGyc/43eO Sx6HfRtytHK12fhiwZS5Z+Y4XBzJ1KPqs/F3pXKk9o+sJ+C+UJ4dG9uxvCgh A+T6qmsflsSxcYHQbTdvxjjIa1nN30lg41UbbMdtR8fBf3ukhFQqG/89Z9x1 cGYcRqREZaXz2FghVy1/mjoB4uInw3Ua2bjuYafPhQ0TsDxEIkaSRmCVd/Wz hzZNwBhHpvW1EIHvZpc67tgyAUn3nQ6JihFYbSTTTGj3BBSYWz7KkyFwgGEw 5OpOAEUYi+7dRmDNNQc4ClYTMB1351qkEYGPXqy7aWEzAVxJDBc9EwKfjbo2 EGc/Ad4XbtOHLhPYbnVQ+cb/JoCWLNrSfo3AryRaozY/mADpCUu5TDcCfzzr sNwhcAJW5NPdMzwJnPaC615y0AToz//HFeVL4GIxZdsdLyeAl7/HeX0Agdki /+3dGz8B456SKmvDCcx7kv/rna8TsLlzl8K1SAKLPomSz0mZgGOZBiLhrwms JFhA086agJJHJRlJsQTecczI3Sd3gpyDgZYRHwisHTA0kv9rAqaahFi28QQ2 pi2vP1gyARe3KkaUJBLY4lDs0fsVE+Cv1P3+XAqBHfx3//xbQ+r15otHeRqB 73NfjDvWOgHZkb9v3sokcPCBMcnHnRMAvAsBcVkEfu3rF1jWOwEV/6SMfuYQ OGMp3vnUMLnf6o75T5jA+Vqa/cHjE+CWvK/c/ReByzwrz9dMTYCyYuuBPb8J 3JRjUbaCmACdW8ZGLYUE7p2bBqPFCcjPMOW59pfAoxqP0sO5WCDYknak7R+B 59xklZqoLHBL15TbV0xg8VmdZabLWPBVe8g5uZTAcnsa7r4WZ8F1maODf8vI PPx3fbpdkgVXhc91/i0n8J6MBRt5GRa0BN40Tq4g8IHJZ23m8ixwFBE75ltJ YL0d6w1i17OAJlKQrlFF4PPO33/3KrHguIDai1aSrVKOqW/YzILtTyX7rKsJ 7DTWlnB1GwvMdhrHNZHsqeYkF7+LXC+hq3xnDZmvGzwh9L0skM4qMHclOfRr OFVViwUnddZdiCM5hrnpjv0BFogf087IJDlBJXc48RALbk85OGaQ/P26gfnY MRbsfLEhIJLkgvje2m36LLCIGZ6/SnLFoMuRm4YsGP91rUiW5JaNgjnpxqRe DWeY2WQ9/dbRatMmLLAdfmBxgOTx99ti95ixwF9/XDWF3M9C728JN0sWvLob cYiPZP715x5lXWNB2rF3iYdJPVZaMBbm7Fjg8PWQhQOpl8I7LydNJxY0TDZf 8Sb1VO0S7fO6zYLhlNIEF1Jv/UGFAhc3FrQd7JOzI/1wGt321tGT1JN3aPB4 CYFDppG3jS8LnpuW8kqS/mUsGFy84s+CPkbY7TLS3waeK/tMAligHGixx4H0 ny3ovOrME9Lf42bH5sl8aK5+XqcbyoLAV1zmjWSeLiu8S9OKYIGoi6XFxnwC +yqlBu95zQJfEYd08zwCF+6u1lN+z4KAzGJ4mU36ayj2RyiDBfT1g4QQmW+H C2vjeH+wQO3s2evfksl8m2+/u5jDAlnf2Q3Hyf6oczitNfabBQlOoQ93k/1z 8fHzbzW1LOByNZheEU1g75B3L0obWbDMalmj1CsCv41MdS5sZUFQsrkA30sC 932q3vK9lwWKfzstPgUT2L5Q7GPkJAv8+vV4xv0IHFS61j9klgU2par39H0I nFKz3eLxPAtU2ypMIzwIPNV1Ws6LZxIM7QZlR2+R+Vp8Hm6+YhICBg8IxFoS +A1v7O0LUpMgz3p1x9SM7DehNENDmUkIdPtximJKzg/pmmW66ydhb5zabmFD Aj/ZI/5QaeckZOzKUdgCBE7SWmetoD4J/7St5w7sI3CV7o6Dq/dPQvyj2BM6 u0n/zxhyBA9OgsOQihlVlex3xxDXUcNJkOSMhYdJEDgxXtzm281JuHl9kdk1 wMb+9fgAj+skuNjVrNnURZ4H3DdkTntMQuQS2+FCMxsLXvxXMXxvEvJ7ffxu lrLx1eWeuxXDJiHlsPj8gyRyvrv0c7/InARlb+awlhMbz8aGtHXlTIKOt/AT QRs2rqiE72r5kyDjey0Om7Gx16ZX10uKJgFpvzjbS543LW36VVwtk8DKbXcX 28zGoQd/RDstTML9qZCFZT2z2M7J2jWPMgXiJctMrjbNYp1o8dPC1CkQ+R0Y +7FiFk/M2PPGi0wBNk5f2UOej/oJa+065aZAecV7q0Mhs5hf7PFe/QNTkOSQ q/lHcxZ7dlyqVX0wBX3+RZpM3xk8dUQr2jpwChgH2gq/3J7B9qmy12KCpsCt bd3OczYz2NS/dU785RQsaLkOO5Dn/z6VC+vmPk3B6+arS7GyM5j476xzUfEU JFS8OqaUPo1dRE4stxaZBmXmL31W1RR21tx74k3oNBB/noddrWFhikOoz7MI 8npHqIUN+TwUFDOe7vt6GhgmJ5JM0lg4gfuzrOX7aVA6PDYlGsLCPUWrR5Uy pqHt8eKnPwYsfNZoPji1dhqW7nOkTUsn8B6HvIZC8Rnwed6RHfptHM/F6Fow g2dgF2e59J+CYVzl9MrcNXYWXheveTrk0o01jqxban/HhqO7GhneBf9w8SGN ePSagIT7uobqSX/hQ2qkRs+XOSgsUBnqZHSDxPrNtpc/z8M6G5t1qpbDEBzy 2Phz4jy43+s//enpMAhyM3WmUudB82bOWb4fw0Dp/iwTmD0P/DIC224Kj8Dw G6Xyb6XzEPF165/R9BEolF6/TWR0HoI2l4mbL47CbXHpmZwdC6DNWPPx4c9x GLt7p4emvgAa8gFGbZXjYDvRVHF6/wLsDbzlqdA7DuZVLz8NHiQ/f0Fy0EVg AvSCJC6sMFqAiczHW02MJmC9oNhPW9cFEN99roRBn4AaLn6/1T8X4ALr0nwW dRJGEyMvG+QvgGZDytXHkpMgYKK6/2HhAiSbvSg/rkTmMk1/aqpsAfT+8zz9 4ugkJFmEXa1qX4A7/44EHQuchMe/1514yFmA0De1S1qCU6B7X2vltM4iaGSy e3vnp8B8e+W46pFFUD2e2XVecBo82s3LLU4sgna5lXT2qmlI2+3/oOrMIhSF LhM/sHsaFAZK2F+sFuGq0J9vZjemYeHw+XaLB4sQdvjplvrmafjGf+tjVfEi xHtmaBnEzcCA592RvPJFoF22zLyeNAOrJp7tSqxehA9DbwudsmbAs/lrwaPm RUhYH3HnSOUM6CYMdOjQF8Emp8tRcm4Gak6YSH3jX4JOK63mnXqzwJtvczlO eAlK9ofS1xnPwp5drh+eiy6BwQqPlRyzWXglG7rTYdUSUP6tfON9axaujJSf UlJegtgvQr8iI2dhPOhAQOSRJfj9m+a/r2cW1vEYVD48sQT5tjWybMYsnHW9 LOlyagmCHj+xiZ2chR9mHu8Nzy1B9HM9rlxeNvhs+5YvdG0JajLNXwpsZMOy GmXC6wF5/arn43krNqDD6sg+cAkuV0pl3rVnw83sQw9NgpZg3ZdMmLrFhoZY Cwn18CV4l7Z49o0fG6Jvvd4+/mEJ5GlWy2gxbNgsIWpr8WcJsl7Oj8jXsWFF cs7XD8VLoO0l0T3ewoa5o9fGhsqXoGCZgH1CNxuKPPNuOzYswUr6MvXGUTZY 9dn7eA4uQcsBqY1S/ASc8F5VgJlLsIpeabp5GQE7VhXy8owvwccgST6VlQRQ 9GQCH7GX4Hs9f3KHPAHR6cWh4QIcGOhS6dy8hwD/k/81NotwQCfnhOn9/QTY DypIrxHnwDUv3u1/EQH7ZNxi4qQ5cPnBhnbKCQIa/DYmpKhyQG1QhH7hMgG5 sjXDk1s54Kuh2DNlQcD7715b1XdxIGHvXnm3awTcZNRl5GqS37/pdFHdiYBl hvdwyUkO3Le/kBDhS8A0U417mSEH/u7tefSfPwFt91t0TxtzwKxS7c2+AHIO ZG0vabzMgXdJpmZezwh4fqZdWMaSAxE8bwXmQwhwGwk4dfkaB/o1nXrNwwk4 vLarrs+RAzgqbG0/OUe25DyWUr7NIXWV8ed5S8BKI3UTOzcOmDOeigvGEdAT ENQ54csB6ZMZKZXxBHiPazKWnnMgbGqqXzOdAOvAoc064RywSJSLev2NAD3F UMf7rzgw6V5wpy+TAOnzzCmhOA4E/6eYsfknAVyscPVTnziwLdhNdEseAUOP ddxDvnAgIOLmS4l8Ar7jSM6qDA7M74xWivlN+nHhkM7FHxzQZm/dgf6QfkyO +8f85ICTwBbb4r8E2D19/a8nnwPGx+5X7SsiwFDpqODGPxzYIX3wamgxARq/ JvWuF3Og6mLg5oYSAhRMY559LeeAl0OEIqWMAP7p4zVj1Rxo2Vh4SrycgLGg mZU7GzgQUu+VLFxBwPC4XMGWFg743VQc7yKZYXjEUbmDA3sOXnV9W0nAYIaj 7Poe0m9mwuETVQT0SUYUrxkg9bt0w6yb5B63fJdVDA4otOz/bVFNQGfL0PoV o6SeI5m3Kklu0xSrFmFxYKdd+E2lGgJa3mh4889wQNcp5pctyU0UC1WeOQ50 XUyyIJ9Pod4isGlxkQNDtann0km+btGss0ChIJUfX2J/kGzz4kYkwU1BdZtS D30m+Woh1/gMLwX13WPo3CfZejrs8BSNgvwuvHitR7LVRpXoCX4KQrfmznLI eizO5U2OClKQcdldh2iSrwQYHh8WpqDsZ2+YG0k2zxp4S19GQdslmiuiyP1d ZrjPDohS0PGOMukFUo9LMsv1+8QpSOeFcs0Rki/qxb3vXklBg5zEWW9SPxMv 9fkOSQrSE90R9I7U+0JS6em2VRTkWf46Ipn043ynWXyzNAUpmNBXfy4lwFh0 aqlBloIExjZIBJH+GR0IMKqTo6DoxltPL5P+GsalcFeuo6CyVcrcBWQeTtfp XihTJPenu41qRObFgNqcXLyRgoItnobUknk6eY3rUqEKBYXvNjV5QeZNLyIs /ddmCtL/SX1dR+bxePEmQaxGQclVbi5cuQQcVTXMzNpBrpe0wCuXRfbPxQGR zF0URPvbkS9C5vvQU3erjD0U9H5JdQM9gwCdsVix5H0UpCbtPmuRQsABBXWb r5oURNXsvcGVRAA6XZr3WZuCAiYfRj/+QoBW+qTdex0Kqrm7fp/lRwL2uur+ jTxOQeISq4fkowhQj2+SfalHQauUT3+SjSBgT7P9rVB9CnrzgaFLDSNg5/4w hWeGFMSTpb71VRABapx+d38TCnp5i9eglpwf6x8+3OpoS0EbvO96PbxCzpuG Xd4W9hT03TtRz+QSAfkbesqMHEj/nvVJSV8g/SzUtNW8SUHem15mmRsQ8IqL 9V7AnYIMrqRXCmoTIO55Ufr9IwrKs+9LaJQg81EqcP3lYwr6cy9yhZcoASnS mZmBTymoKcKjbbkQAfpZYkbOzymoR2FlwiKHDYEzf59pR1JQStOJ2bkhNnA7 b6c2x1OQ6dDKD36ZbDid33GmLIGCRHLvW3OlsuHt8iex+Ct5v+O5czcS2KCd NAAfUyjI61FbgWg0G9yZUe63flBQW3VbvNddNrCsaeMiRRRkxZycnT/Mhh6T 1hadQVLPrm97/xXOgrDWuU/mdLJfcjWNDHNmYbd87S1vJgWF+maeL06dhYDe EuHsMQqiKD047PFmFrbaZ2tvZ1OQ++kZ+XGXWfD0ioyVF+BCe3/4KGxSnAWJ t+dsF1S4kGbn1Y3qTjOg7Ve7R3oLF/q1kF1/3moGbKxO8ezdyoX6QG6dzfkZ +Kl85PWtnVyo1HWw/BSaAYvUPRWM/VzohbDtqkPLZyCpQGJHsx4XGrR9PVz3 eRqO9tcS3xy4UOpXzxZ29RR4qQZ5JDtxofZNGoPthVOQ5nx0Mf4mF4qKn0jO yJwCmaWflNcuXGhfGX+ievQUjEp+5PPz5kJtn650hF6bgtCjbhL6QeT9svcG /iAmoeuL7PaBRC70e2GsQXDlJLjdtLaRHOFCeYX1mmqKE6D/Peq4pAs32tYb 4xjWNASjC7aePDPcaOzW13gp/w5413g3w+EWD6rSe1ag2/MX5my0zO/M8yBF veOVjp75+HiOCvpvkQe9n1BOl+X/haNEVik4c3hQmU3pfw9f/MKaaaxOGx5e xD+Mn4V+LsDe85/MzgvxonE1YHnXFGKeIHEzdRleVHRUyFhRqhgLpw9emt7H i4ajdFsUMqrwmsXnps7uvKhtle6qbw+b8NGek1kvPXkRsu5/e7moCd/+JyCV 582LXokuVlbyN+OS53drBO/xor0Ph8T4HzVjl43Ox94/5kV/BeBf0YMWXHXK QL3xNS8yTDThOu3ahv1il63QwrzocdWQ0WWJLpz4sMTJ8hcvYmvw3x3d3oWb 7B9UPPrNi8IDHj+6rN+F1dSXHjX840X1cZZ57Q+6cGvpCMWpiheNbaQ/N5rp wrumy0Zju3nRQVFXLfHKbjxw5HEJPy8VjTy6rcNzrRdbnDBX2ECjos3qYlFD 3r24XX+3ywF+KhrYcfjfl/BeXGfUudZdmIrmVqWh0j+9uMBy5x3mSirKK0F6 9uv6cLRPq1LFBio6EBwwvb6+D6+6l+LFUKIiqVCVC22MPhz64H4tTYWKhPvO aTpT+nHg060+oEZF5a/X7tim2o/dou41pOyhoq3+HtkUn358NlP1/osjVAS5 LYWt8gO4KpvSmnyMivxcOnac2TmAT+TVbys7QdYbqzf74fAA1vnj08ZrQEW8 6mug3X4Ab6ut3elynooeyO+YCc4cwMJjHj3nr1MR7bDexNKhQfx7YxnIPaai 8NDrxU8PD+HjQZ3HJZ9SUbHl/QdGZ4dw1TTLaNkzKnqbq1I2f2UIdxSutl8K oaJE3qHSXs8hzLa4FtHxioqIu/FvFVKH8OYY7ok3CVR0vZO55fAKOk6jSS6E f6Ui13aJKyw5OtZw2MT3LImK3KMXX3qq0PFhLYM1PmlU1J3wbkrlAB1faY0+ ZpZNRfq/dyWM2tNxuJRGrHwJFVWEXPcTzqNjWR+9RKkyKnpY0joQ9o+O4wbM fiyvoKJKpt/IQhUdp3x7UMGppqJRmaFyy146Lj1TN9fZTEXrItaahNIY2DBn kNrUSkWqD430BZczcNO6edGqdrL+ab1fl6QYeGBirVJ+NxVtk7q1MlqJgSnB jmfe0qnouFi/iNdhBn4w63c5gkklz8N7YR0nGVjELPx68AhZ7znzu2uMGFha LdfHd4KKlufu9thpycC7ywS/mhNUdGlndwb2YuCfO+Uyz89TUbYvRUbYn4F1 orYXGCxSEWPrv9rdgQxsYHu+CXHR0HZzJfW14Qxsy/+Rd60ADb3OXx577isD l3IHPD0oREPOgX62i6kMvHnxuuRVERoqHQmxdM9k4LGJLcpfxGhIbHVAP/GL XG94eWr5ChryNBi4sfCXgdMGJjTGJWiofbFuQ0MpA99u/XZitzQN7fBy2bC8 noHr61/WnZOlIXxQzcGhmYH3VN255C5HQ2VWvkPv2xmYXajliNfR0IjSGpeX /Qx8AcuzuxVpyHph9vEZOgNnZ3Hd5VWiIeHAp00DwwzslfQn5JgqDW3Yr7zm xSQDd8R/krHfQkNqdkdXf51hYBT36H3QVhr6bH3h7GuCgd9F221J3U5DU9O9 VZYLDMwdcfJ77U4auqQW+5ybw8CWIVthZjcNaVj6RLpxMXHhE7GiVXtpqH9D BPMPDxM/uFvffEmThha/9HkM8DHxoEemha82DZ16ceRXlgATH3WJZMYiGorR 1TWzEmLiBCeP2390aOjP1pELA8JMLGR3aXFQl4b+dtz/BsuY2N4aHggeoaE3 Y34uTsuZuMJs7fItx2hITiTwnZsoE2814Yk4dYKGNIec958XY+Lgs/0KN0/S kM82nWPLxZl4Qv/f59BTNDT7ZGdVNMmGxz7vyDxN+huaXM+zgokzDj7OaT5D Q/cKDcwOkCyhfUN3wYiGeDx7bhqT7LL3VLnceRpijZlLHiS5acd24wMmNGSp SJziI1ljy4pOy4s05NXLvzGOXP+V0vS1B5dpCGXIxUiSPL+2cTzenIaCq4lf V8j6Lspm3Sm1oKGPCoFh/mT9eZJR3KNWNOShNK7gQ+5PXszrseg1GvrG7WV3 mty/r5DZyp3XSb9N0zznSX16qAeijexoaIWZzkUvUr+DlPUb3W7Q0GjycvFG Ut/3c7zJrxxpKMhsy0d+fiamTg+o5zrTkGp3h4I4jYmvjhXld96iocmll4GT pF9F9IRj3C409LtigfmV9HNT35MaRTcaMvvYfVKb9Duww8H0iDsNVS4/kfWJ zMNwk0HfdU8aksm9oU4n85JUvnImyZeG9FRin0+R+VpeNONd7UdDhz+J3M0b Z2Cngia+KX8ayi7q/2w+wsA7Ml+v1nhEQ91lb6q2DDBw5ltFrd/PyXxGLUQO k/lX5Oh6/HpBI5+X0s//rWbg4EvWWTiM3F9s53evcga2kf64+2ckDdUEPHG9 X0j2e6iS2rd3NMS3LU1mLoWcD6wj9ulxpD6bIgZ+fWFgloFNQuoHMj/rvN9e +0j2r8jnjUmfaajubqbQySgG9nyoIv8plYa4P8eP+95j4KH+45c+pNOQFPWS pQY5L4x07aLivtGQ8kTAmioXBlbj+ir1NouG8gMVX0ZcZ+BO9y2ikb9oaJeQ 6lg4OY90HLZxPa6moRlPv/VnyfmWVGYAj2ppaIn3YN0MOf9kVJ29HtbTkMLJ ipduS3Q8NZhK3GumIff7zUGrR+j4w5WdLM9uGvrkeLa4poiO+Y329DpM0JCf wm3dre50fDvdeO2NSRrq+i4yXOxIx91irmZ206QeX9RDda3pOLsis/UaQerV fmJjyyk6tjuqUWfOxYfadDatDlhPxxX7Nf8YivEhueKR3sXCIRz447/5wyv4 kJvC456OH0P4yO7k7fsl+JDJn3HF2K9DOF9t3Zv1q/lQS7VSVuWLIZy+lt91 SoEPucQd5S42H8IRfHXK4dv40BWXHcEHpwexZa3dk+ZTfGiH+HLjFv5BrGDw oaD8NB/6u858bCMxgNvKOti/zvChn28cFc/TB7Dx39PWCef4kPjS5gyb4gF8 NEtd28OMDynqV6boBgxgtRiecVlHPrS3p+jrHGUAs22jzpgH8SFHkeEgdkcf fuYex+cTzIfq0vfwW5f04Y2BX3KiQ/jQ2umFgIxvfdjoc8761nA+pLe3R3rx cR9OG2ydNIrhQx9d8tvU1fuwvZVs6IkU8n6vWlQdA3px16Xouj01JAtX7P0r 2YOLDGKMRCT5kXS2Xw9/fTu2LezP41vFjwrnNUx549qxyN7NytzS/Cjg7U7d Nqd2bCifNTezhh9lnUcX1wm349aRmpiuDfxIcK75yrIDbXg0kMZI382Pxqck 5F+/b8ESf254mxiR378Xvf7o2UZsoaH56VMoP7r477DUSqsqfH2kfLotnB8N vmvQ9VOswk7vzHTFI8n1DgsPphRXYh+Be92e0fxIfUThnWdJBX7dXCxj+JEf dZr/Y04Vl+GGO+eCFzJJVvS/KPqrCB/PvnnndCs/KlpXRNMIy8enHXiLHrTz o3DP5qVHYvn4/LpwyZ+d/Mii56zmAxmMrwVmpW/s40ddHha/u4VyMfnbanR+ mB+daFVujmH8wHlzTy0+LvEjtUP3y5+9S8F/kuRTWykCaMjpp2b71mRcZpHK EeURQCn2ga/sZRNxa0ndaw8+AXR9rL9NeDoes1/JNBqICqAtS9+KPr9/izn6 iRseiAsgGs851ZcK0ZjGA7dzVgogw0tRwcmzEXilnYXYxtUCqJqQsnf9EIxl 5KfMTGUE0LM7VrevsgPwutr7ScFrBJDMvgxa1gdfrPJQavGPvADaJrmlsv+D E96+//OJ+bUCaOnu8///vzXvf+rbHHU= "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{0, 0}, Method->{}, PlotRange-> NCache[{{0, Pi}, {-1.6139447251085284`, 1.6139456133200931`}}, {{ 0, 3.141592653589793}, {-1.6139447251085284`, 1.6139456133200931`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.5879252885729823`*^9, {3.587925343702654*^9, 3.587925351500187*^9}, 3.587927460278098*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.5879253754397144`*^9, 3.587925379174408*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"1.0218000000000005`", ",", "0.5944761904761906`", ",", RowBox[{"-", "0.5552761904761904`"}]}], "}"}]], "Output", CellChangeTimes->{3.587925379721326*^9, 3.587927460293724*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"w", "[", RowBox[{"q", ",", RowBox[{"aju2", "[", "\"\\"", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"q", ",", "0", ",", "Pi"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Theta]", ",", "\[Omega]"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.5879253846436234`*^9, 3.5879254110833597`*^9}, { 3.587927900627887*^9, 3.5879279031906033`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJw12mk4lF8bAHBmhhlK2VokJQqpSNkS7pOEKEWWFluKpAhlqaRSWfsLRVKh xR7ZKZEU2UKRJWGMGVvCYB6D5D19eL9w/a7r6dxnuc99zumywfGCuROJh4fn Pv7x7zf5vWBjv5qnbgirWaZrdgI2DZfvXnf/EHhU3OX+xJ7LUT7dGW0PqzYm XGZg5xLwXST7DASG/03+hc0Sd+EWRV8AaYkX17jYdyVqhLJLL0JzrD+PwNwE pCjYJPJk+wK/j6+SFHaFxsT2I0lXoaLpKlUN+4fB7crk6OtQetot/DD2nOJS Rf/Km+DzdMvbC9jBO9q8kktvgXtY1P1obHGtpNLGgjuwlem96g32sz2uFG5W MPgtydzXj620X/XghtRQiBRYlBKZn4DSw39jjJPCwTxyd5Ie9nf7aPmn0fcg zuT6sxzs3J1Kmv1VkUBRoUj/xvbVuP/TtzIKLHjdDLf9mQAK2G56VnofZJcX 3SvBrtOrrFUreQDpB9ivyQsTEGUg715XEAMV3tW+5tjrTNlFU1kPwbz/0585 bKaZ1YmQjDg4f1PujcXfCci0LF1cm/oINr2PlszD1rS9Y2SQ9Bhs1BuafRcn wPy8xI+46EQg/YwbV+Jlw1JNeB9rmATvQvc2JWNPvPEU6atKAtWPgmbSJDYU lbUVelc+A+OOZE1pMhv2ViX9TSh9AZEe64JN+NggZ9hyeHjXS1CI6nLuxRas 5Xuxs+Ql1Dvk9/vws6G5wdWwpiAZOgLpuTlUNti2qkays1Lhr8z18EOCbEBW Zxi7t6bBS4kA4FnCho0dj1SDMtIgy/5WWAH2SNffjjWp6TBybR9DXogNvv01 G/STMuEoSevGLmE2RE3a5MdGv4Y859svqavY8N+KeO0KoRzQc9u3jW81G77l 3lmvZp4Dmtqkn/wSbDgxYsNa15UDyj/rk1dKssH9xBLPydFceGXc/+HMejY8 0HEJeSRcAM9rj3xsVGBDZ+eRc8ssC8DcvJgQUmTDOh8wvfWoAP47PKputoUN qdkrxd1kCkEgubitfxsb3q6vSkSqRdDzXvjkrp1s6OWVKR60LoEUmjL3hS4e X4JQvM2TEjC1LF0ti9jgojXr/5VeAnGVuvIpe9gw6dWsV3r2Dbx/k8NXos8G CjOgMeLqW5Coyg8XNGGDYnUXSy3xHfg9qqpyOcqG3VXGgnoXK8BsWcGGWW82 CLemNGncrwATt2JOky8bmAxSzLb8Ckhg1k+mX2ZDBE/peompCqi7Km5/5hob GLu3qE14fQCa8/v31DtsCMlb4pDgVQkbv0RF/XzAhrbEhsI5z09go9uiVFXE Bo8rpifzPWrgkkbY8DxpEozdtdNokTXQcKRh/CrfJMg6Ko7bvq6B7+57j/6l TkLbfv5rtLEaYPvS9woKTYKORHmc7blaeLAsUUV31SQIlmxrpjrXQY9Ef6nY 1klI5iwFmxMNYDjT+NjeehLcSpwiSLLNEOzkrVmZPwmtQ/sFUh1bYXW58U7N e1MQpkzwFB3rgPzUuJvqTtPguaUmpiL5J6yP92yo0eMA04l5I6noJ9hxvVYt 7OOAVRLP+Ruff0Lku3E35f0c0FqxSw8N/4RE342bIw5xgLSYPvZ+azeE/zQ3 2WnDgehv4Ybv87th95U/P1Z5cyDv8qHZsg898KHNyUU+mQMbC84xn37rgbHG 1ZfF0jgQOxbcdK2/B1bq88z8yeDAlVMVyTp8vcA22SZfk8MBvYMq5mVGveDR X/1N9x0HWqTFMt819cIwS3Rb+jcOzJ06l93tToeFAYONZgsccBCZ8nvnQ4cp PbWcwkUOVJVf2fs4gA7Ptp29topEQKREWMfRCDqoX17x5Rs/AfJNaaTWLDqU 1Cn+lBcmwEJrwKpulA5Xqw/EGskQkC18crHItQ8mbHYwTPQJEC8fqo3x6gPR bJ4SMwMCLp/zeHDpSh/c1Thib2FEgH719c07wvpg+u2uFYcPENB1NeFIVnof KMnHfZC2IIA22JX6Ygj/+zOb9DaeIsCxzOpwpDMDWPUSKU8DCNhRtFpU4gID 7qWWdh67QQDp9Y+WZ74MmEyp6hAJJOB5kp11fggD8n6SFL3vEMC45WzXlsGA ujdZObS7uD1jn/Nrxxlw9nuZhEMcbm+vplLyDAOI6f372x/h9rTnxrfx9MOf LVRB48e4vW0BF0GkH5xK5VRkEnB7wkFXHHf2w9q71wqfvMDttceEpPn2g3Kg 0vPiLNxes7Wxyo1+2GSbeWAgG7dXK7H0bUg//PL8bC6cg9t7+/Re/aN+uCMr 42SVh9t7mhw7VorjdRw1zigiIC/2zFHfT/2Qferl5fxiAgLvbV7D86UfIoTi fxWXECBzM+upSE8/aJ91Cc97i+OfLnypysMEhsqYs3s5jm/r61xGY8KIxydr s/c4vtUuBQMRJmTERl9UrsDxDcsyrWWYkC+YKN39AcdXrMq7os+E1C9WvH8/ 4fiywZfIB5mQ6JIy96YKx1+7X/2uJRMsTwXRPKtx/GVf3jx1ZkJeoLx182cC TrFbKypCmCCi5OJ9pI4AhyuR1iWRTNDmaq7owbYhHxh7HccE+26lY6frCbBa 8VEyMY0JFYqGVacaCDBPCMiLzWFCqJf58E/sQ/Ja+yNKmLDjkUW62RcCjHbl +lyrYYLEK23OtkYC9lWeF/JuZsLm8K3XYrD1TBRenu9gwoWd8o+42LttE7+e GGLCfGzAndwmAjQHjrscmWBC2At+c2ozAaoXVi4ac5ngIz2RcRRb6eZ/W7Vo LMjRPz/3G1tRcP9HFWEWsJgmv1W+4vy/Tzm+eTULCn/JOXlib1xbMSEtzYLa c0oOr7Clk68Gr1ZgQUfxw58MbCkljXXC21nw8fSTDvFvBKwpniygauLvTa6Y 62GvRNkmi8CChLsXjc5hi9WeZRCGLIi811hyD1vYfNPlsUMseEJte/Yae2kX ffmANQuCpzt467EFTj9J6bZnwfBLxfY+bP7f1jrfz7AAlchIT2OTfMRaGy6w YEZaqou3hYDFv42un3xZcEruCv8S7D/BYbzvrrOgxTkhaTk2V9ggLj+YBZc7 J1P/efoRr3LmPRZcaGau+fc9W6as6vlDFiTPsWb+tTeW6WcTn8iCJqfzOv/i jaiqTkWlssDixuTwv/4Mlo2Hhr5mgYrkzHwdNtMgU/pmMQvazi14/hsPvcm5 2O89C8SW/Wf8b7zdR2VMPT6zgM6347Yr9o++buaZJhbAB3+pPdhtro+u2rez gLyGtEIMu2XKQtS6lwUvrU+cpeP5bvYXTjcdZAFJRU4iHbuBrwEMxlmwtZEi 64ZdGxHcpjPDgnV1T+9sxa5M+kveRh0A4/uvDz3F612++W38xuUDEMcMLzDF Ls3zVlm7agA0k4bPz+P8Kfg0ardEfgBOJ21oMcDOPZjGISkPgIL+rQAWzrfs tlN359QHYFzM2+86durQjzfDBgPgc33/kWScvy89Yw/3mQ6AQ2i7igp20pzZ YIfVALxNOHC8BOd7/NJa8RrnAdgee+l2Cd4fd7cXX0gJGoCJBp/1N2oJqNvR PuAdMQDEieY9wzW4PqrN2O6LHYCNF8ZaD2Lf3qVxgJk8AMEN9fsF8H68qles IFM1AD9N9Cz34/1cot+eyG4YAK5lJ/O/jwQQBjMrP7QOgOUt454vlQR4mWjw OTAHIO9X7BKE64GrRXHfU/Ig2OTUaP0uIyDNqv2o25JBkKwgU4SwB47ONGmL DYK7B6govCPgpK1GeZfMIFw/J1V4GNejo87F8RJ6g0BibTJzxfXM0K/4SMyN QWhUlrV7j+vj7SvtdadDBuHdqKxMzCu8Hv4ze1QjByFZOGuPcyYBujc1trck DsIP+BY1l0aAeljxUpH3g9AglnP+F663G58UV91dGIS2L8ZffuP67ZjQrm3D NwR7FaU2XX6I5zdpJn+L0BCUqxxrXYwhYG2yxvO6tUMg1pKouRiN91t2cQBN ewjGDh9dWY3PA1JFscbtK0PgnXFu46XrBGQIiaYsBA5B/f11BRHXcH06cV7c N3wIJhjba15cJeAFIc0++2QIIjvMAsp88Xm2LSzjUPkQsGLHNr++QEBQvI2U JGkYLjxmfwm3w/VlqCj8geAwvF5zsM7UBuezmsickNgw7N5pYLb0OK4vX6va eDYOg9+QD6+vJQE1VOXIgX3D8FiA/UcQn4+C3rzkvNBhPH+mfEqauD5XnvDc Ej0MSHc1T7waAceFi3pfxg/DaerPKJ6dBGRmur57mDkML6J0Asq2EXCA0eJ9 7cswjBtpPCTweR1xKGXISGQEEucufnJeSoCIokljb9wIiJFF1hl1cWCAmihS kzQCgasOiO3p4MBb1qRFTtoI8BnN+Kp958DpZ/FdN0pG4FIkihFu4kDJ6pGh DR0jcFt2mVFkJQfsqKHk06t+QcRkN70I319eMas1h2J+wWQ81+aVJwduVq7x b376C/ZzBw6tdP93f3J/X5L8C479ZQ1edeUAj81Kg9DCX5AxMblM6xQHjrQ4 HVH8/gsMtQw9Ay3wfeYDxf28+CjUbxG23KfOAaNEvRcT0aMwkVI6+pyYhuCa 5u7Ax6MwvhBK2jY5DdVsu9UrXo7Ccwsp07zf07BP/+p/uwpHoXfw8P1s5jTo Def7BraPwnCAzXb3b9OgvXPTAfG1v+HwL9nHS7OmYftnKkcj+TfMVWeE9thN w6rxBoPrxWNw70abbmbhFMR/fstLPjsBvZ5fvBZ1J0Fbas+i9Gk27JjgO0Yt m4AtdGHmtUuTYPjmQdON5WOQlSbqUug1BW+o/q3BAyPg32PbsiVoGvrzDFN0 8gZh2lDnqVPYNKSbuXfbpgzC+dy1ZxIjpkHroG307fhBOHG7a0704TRIzKx+ zgocBC3FYzJzqdOwSeX8vZkjgzDrbeFZUzsNZ1eV7Dk9g+uQkMlyJyEOrHn+ qObV3gHw1NY0SXjAgV0pok1600zgcX9w/V4cB+TVNU7w/GJCROJE/o0n+PvW /IaqPnxvIKWvPfWSA5mwI8ClCd8zaiTG5As4wPE4MC6UyQQLy/nI3BYO3HbY EtN7ignq7uVtn0Rx3X8cON7c1Q+fEtcsKVpJgLa9pcejln4w/+oDqWsI8E3o KXOt7wd3VeW0UJyXfDOqP+TxPSh1LvGy6Q5clxP1Wpc+7ofVwTfXdpgRIOGQ ERds0w9zifqOvyIJ+PrfjKrbAAN0Z3SiVfA+b7G5OPexhwE3TTUqffE9ztpI jirXzgDawmYZynMCqB3TYktrGLDi+HLG2nx8z92yudYB3wu3i/84afodx/N1 /b3DkwEXz7VEPegkgLLt6t09rgwoqmz48KObgHPHmpknTjFAx/P9hjMDBLy5 tvdnviUDjBtf9l2fISDcMTuJrcUAp5ALJ3MlZoDWOrY1g8qAtF6XqBmpGahc vujpy8uAUXXHDzoyM3AmSbD98HwfeLEsNtQpzsDki80SCuN9cENPq4+xewb+ NobKnm3vg/g/lJPidjNQP9p8TCujD5o94h18n8/Au6ntknCsDxQjhecvpcxA SaV+5LBFH9x6HRTjlTED6/x+KCYe7gP1Ma86t7wZ/L5V791i1AdPz5monq6c gYQWlF6v0Qeuzn+oZowZsNdo+ywv0Qef7ng9Nx2YgceE6q6gFX0glTykfWBk BhRnz/BPiOD4/a2ehpMzEFj4XwVLsA80TmZ16ZC4IFcSTj2+QAeKjd1rRRku iBewbF2YdLC72rpfQY4L0kpKQ9f66FAcb8zcpMiFHYeG5xJ66ODaqS6xYQcX NkLwR3InHb5aLb+1So8LbqQB2aONdFD0uSO1woALV3/fVa2rp8PtmPliUWMu qNzRpxvW0kGzdXBUyJwLmcp+Is6f6JBgVmFFceSCE0+VuFIpHbge6mxeZy6E nRPUXCihg3nkq/DFs1y4ZBLI31FEB76muIo5Ty70RNi8ysmjw/kDnorsm1xY Yth8YCyDDtXnBj+N3eHC80uU+TXpdFgfbms/GsoFxc9LHY+k0uFb7f4Hg1G4 /YlMh8EXdNhlKPO3+xkXHppdMHrylA6qL+pCPidzwbLst5TSEzooLXqJ5aZz IbtcXa8+ng4yxR8VbudyYRzyrsrH0WGt2Pl8t0Iu6JuI3h+IpcPKC+K61m/w fPLGLeTE0GGJPK6HH7gQWE9rPnOfDvy3hHrEqrhAz2vbZRFNB57eQpeFGjy+ oXtzJlF0mI7lD2hu5oIun+xt23t0GJvMpr1t5ULlyANTX/zOGzK1vv+igwtF EjIXn/xHh27+tDQfOhfaDlt/od2lQ4fj4Z0OTC7cPneAcjgcj7ecW7Z/iAvn p4iHz8Po0LDmmdHOUS4okwdCeLCrffa3rJ3gAo9lYvvZUDpUfGPb8k9zYZde 4u2eEDq8VYofGp/hQkfl0Ug77IIwvYud81yQdFObHw6mw+uBkYXKRZxP3jFV N7Az9O6HvCLPQsKrpnEZ7JcJu8ViqbPgEqhypTkIr/dc/9PrS2bhMGnxdCh2 nNVdhbPLZ6G71SvnIHZ0nmq+udgsLIVyGynsu8u6dbRXzYKyjIAr9w4dglzv 1GySnIWyec+OHuyb1duOLF8/C8ASSmvG9pdp6+bKzILWg6GOL9g+AQEuDLlZ kDpOOdeG7fFDbqpeEcffeNxuBNtVvelaodIsyPl35gngeKejfWmJO2ZhLsjF RRXbbmz9/RD1WdjDzwxwxT5qXCPlpTULedbriUzsIykeaSd0Z8HRm/mFi21K kti5T28W/nCm+Mzw+I3sPpQpGcwCSYgvoQBb7+1Zo9XGs0ANr4qRxfOpvVK0 hdcUf9/dOfoUW93rre0vs1m4LdL9XBavx/ZGx6FWy1k42uRQXIC9KSh/IdV2 FtzSeee4eP2kGSdCok7i/u8Uk3+F13uNLkXsqtMs0GQjclxxPiwjLBRM3Wah dWJPmwDOH5r5Qp6G5yycg42eI9ik7GSdDd6z8KWt0qkN59uME2E+7Y/7Uyp9 rBnn4+SHhO7uG3h8UbpWPThfR6UMXT7fxvNd8T19Bucz/fvDa/F3Z0HPovrw AZz/tft2paEns7AgzRN47TEd/D4HKF1PmgWH4mNqfHh/Kez/VFD2chbqAqvV 4xPweh449EEraxb6O1OlRp/RQf+I0w/V8lkIkjx+UBnv3+nWDIeLlbMwauO3 d0MmHV5YTQzkVs/Cld/EZeks3P/jV6eUmmbhzoJBkkEuzl+HqKWb6bMQOP8h TuUtXm9GW/QZ5iwoMuuP/vcO14PTayVShmbB8PEBI6KcDgFnUjfJsmfB38v4 1fhHvB7uZbpSpDn4O/9g7w1cz4qvDnuIbJyDEYFwh5UDdHBeUJo5pDAH12Uv 9u8dxvv9+qVrEVvnoMXW3TVglA6XAhdDl6jNgbOmoN+aKTrsCF3xgs9gDraH LtEY4+mD7Ng932fPzEE1zxt93vV9YLc6+ITm+TmoFQ/yXpDpA6H4hj4fjzng V3P14pfvg/NPrcem/OYgWKuqQlcZnx8v3ahjoXPwBHaCEeqD5NxHuxiZc7Dq 2vKVpafx+TB/QrHj9Rz07Dfl2X62D7bvWyfZmD8HD9oPtr5264N3Hc//vCmd A9VV1orNPn3Qspj5Pqp+DmhkQZn7oX3Aa1q+b8+vOXiV2Fe2LrcPbEcYZkmK 83A4pr1cicYAGdVkvViledBgWLRzhRgwdO3Mzrs75sFnJMv0ixgDLomMivtp zUPgPUODmPUMCNfktB8ynocfsXe+JGkw4E0Q1W7x7Dzo37j+8dlZfL7LbnW1 S58HuTjVL5u+MyAyOtwqPWsebPxf7qr9yQBB0i+96dx5kEkyofkxGcDTly4Z 9nYeDBQZWTNT+HxOkP9SWD8PW9O19gaI4fvLGtntQmPzIHBrV+kzi364JLqG KN3xB9pd3b/TevvhGy8tUOLdH+hNWd/iJsqCsaxHdocr/sBN5aXRvmtZIHB8 y+7gT38g0n2fQpgcfqfnmU5PN/yBv6R7BbVaLMh2jHFu7v4D+9yPodxTLAj/ KGMSvPgHXpUJZUjgd7P+HR1xjt4CnGweOSV4egAKaRdTmmsX4G/OZvPNrYOw dYWwq2PVXyjncY58/mEExiMI8Z1ti7DKrOXVzk1jIBscrHzBlQe5NpC3pGRO AON41w+9QR7U5dpnd3/rJBixWmYL3XmRcFNIT2bqFFzbEnH1tQcv8klldHx5 NQV5nkYLaV68KLbCPmY0dwok/77jeeLDi84fKjGQfjcFYytTqIEBvKjwtMVm h+YpeGDkt8I0ghcVl2j81uVOAT1zrcpAFi+S/Rgjc3LfNKyYbMvrfc2LNDMv tIkbT4OxZpRqZy4vcgzqZHwynYb8T3yaDYW86OyE9KzE0WkI6h7TzSvjRfwJ 2dUPXadh6/IPBwK+8CL91J8mvfhe7Ofl5LLyNy/6HfB9PrR1GkJMxs5ojfMi FrJvkuqchocbfc/YsXnRodtLfr/qnoaithDnFA4vUvtcOvtuYBqmtF6dVv/L i/LZ+/++4E6DO3nKwWo5CXnnGXHCJDlw6sGNY7EqJJQrZdGSassBLzeBY293 kpCd5TQ58SQHAg2ij/aokdBjD80NUU4cSOK+sJbTIiHpuqBVzm4c6LH5bFmk R0L3n93J+ubPgaOblpm3HSGhux83OhXEc8C06LHxSh8SyhiSuhj2jQMuU46L K/xIyCWo6N1z/N66tV2xYMUVEuKG1NoU4fdYSUaJ1IoAEqoLfhjf1MMBmcTv E2JBJHToriurdoQDRPDyhyKxJFToAXd/8hIgXNVmIhJHQmu8/jxKpxCwhZTA IxJPQu1VusOeVAIc/Le6CieQ0BSUGU7j92Cdx36d5Sl4PKvvs96vIiDh2K3+ pUUkVKA0Veq5lYCSWOO4pSUkVO5v5ziphO/dLSIHl74locylG7XcVQigmSYV LSknIb9vJ65YqxPgpVcWKlhNQjkZ3XITQIDBlhllWhsJvS3kD99lTsDYH1d/ MkFCr0HYUuEiAceOmmyenSGhGZaIM8WbgE/5W9rGZkmoyEn4c5cPAY9cR5V/ LJDQe29JP/8r+P3d4dafw0dG1+UFou7cJOBxvoex3Qoy8r3/62ZRBAH8y81m jqwio4C+9zcM8bvBw1Xl5X4JMkriIb60ROH+bJhcUJUiowyTsiM9DwiYjLiY u2QTGW0ZVFheGk+AkavP6jeqZHRpR+yZ+8kE5FdZVWWrk1FwKtWmM4WAdRs0 vF5qktHFu4XP1qQRMNU+U39Pm4zWp62WuZeB52/f5evO+mT0sk2FF70mQODZ sa02BmSk7vs01CGHgEt/dnWaGZGRgbuNs38uAfvz53boHCCj7qT8dSn4nTIt 7T8gZkFGmzd1xH0oJsDe3+a+gBUZ6b5q/vquBK9XuzZatCajsP0HT+W/ISAx YuHRyAkyCvHWjY4uJcD4T8DBD6fIKHzpoIrEewIKre3nipzIiC5Wg8axpfMh 9dUZMlor5JNVUUEAcZaHN+4cGVksKr+wrCTgWfvNAveLZNQ72rzCqIqAgart vRHeZMTaQLCp1QRsLegVeO1LRqd0BR0rsYsidezHr5LRyomrJPkaAv4EjIYu DyCj/Do5ta/Ye9weFyjfIKN+sRM8PrUENOyfFfC4TUZeP3Y7va4jQFQzTTUy CM+nlBOvfj1+x8lZ2+eEkNFpK5HdLdgMUmHBxF0y6tHZdrevgQAF9qle4Xtk 9H3KKMXhCwFuvaKCKlFk5JMBp35gc0s97D1jyMil3aq+rJEA3Yz1YVEPyUjJ 0vyyfBMBt+IaC3IfkdGunp6mcOyaoGu9Xx/j9Yvxax7BXua9VXDyKRk993zm r99MwJFTXaqiSWTkrdv3PQ47zizMfsdzMhqJreoexJZVGirwSiGjCNumRe+v BLisfdgbnUZGnTzbpAqxswUNBPMzyOhgTOL4GPYUd1q15RXOp5SvfrLfCNAc fGE/lU1GCYEX35pjB3w3DxPLJaMCjd1F/tgfP/IW7swnoytRTLdn2LS8nN4j hTh/V6r0V2CbJtkLXiomo0j+oVVd2A8ilqk9eENGZ63ahCawO/3L7AtKyYiR 3Vi9iL3u3Pmw1jI832fT9QVbCDh9TLJw+j0ZVf6nH/rv/4PTDet6xSvJaLHx Vuw/j6ldFlT7REZqoYfd/32vulFBzbKajOLKH4nyYF8Wbbf3riGjWnGLO//i lfMEhcXU4fz6drnmX38o46qFhQ1k1PBDsOcD9v7u/t7vjWSkmr205jl2RH20 INFMRtxTYSEB2K1v9qitbCGj7ekPNlhiS6RN2Kt/x/NVtidGDtsuNjHMqp2M rD2yWJN4Pl/eNi306SSjt1Kz4m+xR7wWemO78Pplmmzyx1Y++UqwuJuMWoO+ rt6FfenQCbX2XjKaTnzHnsDr91ZH0GGmj4z8XfTzXmAvbnkTtopJRiVNyTZm 2PprXAo1BsgoE2SnZnF+NBFVgn4juL+qD3/vxhZnXVKLGyUj+Y5tVt9xvh1v kXUoGSMjtzfSBWexma9vFnIncfwND4/dwvk556LjcHmejNwXrCOu4Pw2LlVE 3gtkVN14O5KD98NjodXSnot4vU6YwXls7bzJXhcyBVF+0DIP4P0TMJ9qf3QJ Bf2+d5fTifdf48EYsBCioNuS6g93YK9PClx/eDkFkXuciCC8fyv0bXsNxSjI 4sdKQuYTAeQIUXsNSQqyG/+mqfCBAAv6ou5OKQqayUyh2ON68HLH73XK6ylo nxUzMQrXC4P2zz1yshQk6th5cKSMgBDpa3Yrt1DQ8c+bas++JWBp/qAtR4uC ohazLF/kEWDD912HrU1Bg7fE1eJwfcuyrpT6rUtBynvvCYbi+mf650k3U4+C XMPHn9llExC5z9y21ZiCVOXO13Wm4/nseGeTf5yCRmRbTEWTcH4qZmi/tqGg eFnvms8JuJ75P1ybaUdBDU2hjpefEmC1wevnc0cKcp5eT/6K63ecq7xNtCsF td+30DePIUBqIeqE5xUK2r6uVz8xFNd3xsE3D/0paM/wFtWZYJwPnwVWlQdQ 0PQznS/GQbi+Rt38JngL91eZsYQVSICPnOf+l+EUNL4xQm7gKgHNhw5rtD+h oLhS8d3r3AgIfL5MTOc9BeWn+4kGHsDjDa7zOPWBglKMVo1YGRPQcT6oMfQj BUluOvFb3ogAJY2/oW2fKcimSzakfC8BXfW/eTyaKWjySn1IuRbeX5yGsed9 FOSEgu8LKeD6axheR6PwoTUP1f2oPAQ4mjhIb+LnQ7apD1J9FjjQbarms4fG h8b61PMYcxxotezdcGUpH6KSj53L5XCg8tTOy7/E+VDtte2jm39x4On1LvnG TXwoTMRXMRzfNyyKt9y5b8iHPkhQdiunceCjXAOsC+dDLyhfqwQNOOBKS6Fs EOBHqTudenn9p6E4aaPOxyh+lH/VyOVdzBQ07tauMhehopDyWMm06kkIK/Ge NxCjouZ93/yef5wEQ7XXKrtXUNH852bzhIpJqFCSSZCVoKLdC7Hh8W8nIX8D zXdaGvuuhXdy9iTEUVsVYrdTESNrwpj2cBJOtZy723mIij65JT5Yc3YSpA8n V34xoyJ94WVnTJwn4WdDD/fDESrqv0+RCzg1CVbVZk4Z1lT0V7LfZ9gW33ff aOhetacidPngh3bzSVBKJE+svUBFTU5J7St0JoHr+viIQwQV7Uow9VYSm4R7 V15Qr0dSEe9OLuuc8CTIhWWWPo2mIsVzV0RfCU2CZXqpbFcsFRketM5WpU1C 3mDXlGUiFT1QLzxxZoEN50+vfWCSQ0Xl1fe/Wg6xgW77tFX9GxUNafz08Khg g69bcohlKxX5zvX6Li1nw7JrWdqX2qjoYq58VmYpG3SelL3M/YHjGWa8nipi Q/yP7ktb+6nI6kHEhYwsNlhYr1shM01F9gKaLwsfs6HmcKKl0EoaoqQHqR69 wgbXT6xy6moa2htgk3zTjw1CmlsVSGto6Ihyh1K2DxvM17+ZI6RoSLHnxgPh i2zo+v0tkb6JhlqjeQbnzrFhLIx/JF+NhjQLPK/jizRE/j1wJFuDhkY6d1z+ aMOGnV7336XtoiFddtcrmRNs8Dsmfe+pDg0NlWTXjlizgaSgpRq8j4bKP88s e27GhhVVbgHHLWnI5u5Gl+x9bCjRLBi0sKYho2tlfbr6bDj+au7woWM0dL4n Ju+bHhsS7gfL6tvS0I26RgcKYoOC47OabU405H+LvC5Siw3ai62ivN40FD2j fMt4Oxt6vCT9531o6I/hwk4RZTbcHDjJ4vjRUPXYUcuubWyo/jJWPOJPQwXa 18cvb2HDoSc029bbNHTh9nwaXY4Njru0U1Mf0FCedbKd5To2nP39hfMzloak vn7gUZdig8cze33RRzRkFVbIL7mWDdcFbvX5P6UhUma2/qQEG5501kqap9DQ RjWTwu8r2PDivxOuwWk0lCKS/7xTnA0Ze36XvMvA68O142GIseFNurCV/Gsa UundLcojyoa2y9aRf4rxfOYkF3kuY0P3tuEelbc0tPrtzIFHQmxg9l3ZduYd DY1vO2JXtZQNU/sT6r5W0NBEuOCM4hI2CK9hUVJracjMT2/DVhobVjX6HPlZ T0MBzd9zfKlsWBdIey7SSEN9a/779JmfDdtGtoD/Nxq6fs7b35uPDcZvvS6b ddFQ/bMV+6lkNpi5U2qCumno1Ra6uC+JDUdlYle+66UhGa/d53/xsuFM2Jt8 OSZeL/8fFX08bHDXNSHZDOD5D0h7fwrbZ/Ln4aghPP43kgdHFifg9nGesflR GkoaLl3Jhx2+LFpbZZyGima1LR79nYDoStlwZzYNffJeIrsD+5miocJXDg0t tRrz8VyYgLSeDh9+Lp6/WOmFVdg50a5Vu+doiMbtWvnxzwSUz/3nmPIX57NC L788dlX2+twuHgGk57+sp3d+AhoccxeFyQJox0KM8VPs1pV7TQ34BJCte8cB e+yuutYnV6kCKLdKhbUJmxHg/CtHQABRt8yIsecmYGQHd9fAEgHUMePTWYHN HggNkVwmgOqLuGox2Nx4yfbDwgLISrZsszv2omnWpiBRARSw+W+BCTY/GS6V igsgD9ZY+zZsoeLmyomVAuj4i9Jo8X9/L3jOUUROQgBt7Q1lLc5OgOT6afsT kgLopL5f8zi2TMud7EgpAfQjK+EIE1sxeNVC1XoBVL1p2YVubJXd6SbzGwTQ //8+8n/91KXR "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\[Theta]", TraditionalForm], FormBox["\[Omega]", TraditionalForm]}, AxesOrigin->{0, 0.5}, Method->{}, PlotRange-> NCache[{{0, Pi}, {0.5163335072035189, 1.4265286026471513`}}, {{ 0, 3.141592653589793}, {0.5163335072035189, 1.4265286026471513`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.5879254120990677`*^9, 3.587927460543743*^9, 3.587927903971917*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.587925428287942*^9, 3.5879254341009336`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1.01`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "6"], ",", "1.33`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "3"], ",", "1.2`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "2"], ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"2", " ", "\[Pi]"}], "3"], ",", "1.07`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"5", " ", "\[Pi]"}], "6"], ",", "1.35`"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Pi]", ",", "1.16`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5879254347416105`*^9, 3.5879274605593696`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Theta]", ",", "\[Omega]"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.587925438023141*^9, 3.587925448445898*^9}, { 3.5879279111600285`*^9, 3.587927911956971*^9}}], Cell[BoxData[ GraphicsBox[{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., 1.01}, {0.5235987755982988, 1.33}, {1.0471975511965976`, 1.2}, {1.5707963267948966`, 0.5}, {2.0943951023931953`, 1.07}, { 2.6179938779914944`, 1.35}, {3.141592653589793, 1.16}}]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\[Theta]", TraditionalForm], FormBox["\[Omega]", TraditionalForm]}, AxesOrigin->{0, 0.5}, Method->{}, PlotRange->{{0, 3.141592653589793}, {0.5, 1.35}}, PlotRangeClipping->True, PlotRangePadding->{{0.06283185307179587, 0.06283185307179587}, {0.017, 0.017}}]], "Output", CellChangeTimes->{3.587925449211588*^9, 3.587927460574997*^9, 3.5879279133320847`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1.01`", ",", "1.33`", ",", "1.2`", ",", "0.5`", ",", "1.07`", ",", "1.35`", ",", "1.16`"}], "}"}]], "Output", CellChangeTimes->{3.5879258390414724`*^9, 3.5879274605906234`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], ",", RowBox[{"aju2", "[", "\"\\"", "]"}], ",", "sy"}], "}"}], "]"}]], "Input", CellChangeTimes->{{3.5879257046550927`*^9, 3.5879257416738524`*^9}, { 3.5879258492610855`*^9, 3.5879258567304697`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1.01`", ",", "0.12`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "6"], ",", "1.33`", ",", "0.11`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "3"], ",", "1.2`", ",", "0.09`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox["\[Pi]", "2"], ",", "0.5`", ",", "0.07`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"2", " ", "\[Pi]"}], "3"], ",", "1.07`", ",", "0.09`"}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"5", " ", "\[Pi]"}], "6"], ",", "1.35`", ",", "0.11`"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Pi]", ",", "1.16`", ",", "0.12`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.5879256900444775`*^9, 3.5879257422520237`*^9}, 3.587925859261932*^9, 3.5879274605906234`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ErrorListPlot", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], ",", RowBox[{"aju2", "[", "\"\\"", "]"}], ",", "sy"}], "}"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Theta]", ",", "\[Omega]"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.587925455508997*^9, 3.5879254782765493`*^9}, 3.5879257697699814`*^9, 3.587925875825837*^9, {3.5879279218015547`*^9, 3.587927922223465*^9}}], Cell[BoxData[ GraphicsBox[{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., 1.01}, {0.5235987755982988, 1.33}, {1.0471975511965976`, 1.2}, {1.5707963267948966`, 0.5}, {2.0943951023931953`, 1.07}, { 2.6179938779914944`, 1.35}, {3.141592653589793, 1.16}}], {{LineBox[{{0., 1.13}, {0., 0.89}}], LineBox[{Offset[{1.5, 0}, {0., 1.13}], Offset[{-1.5, 0}, {0., 1.13}]}], LineBox[{Offset[{1.5, 0}, {0., 0.89}], Offset[{-1.5, 0}, {0., 0.89}]}]}, { LineBox[{{0.5235987755982988, 1.4400000000000002`}, {0.5235987755982988, 1.22}}], LineBox[{Offset[{1.5, 0}, {0.5235987755982988, 1.4400000000000002`}], Offset[{-1.5, 0}, {0.5235987755982988, 1.4400000000000002`}]}], LineBox[{Offset[{1.5, 0}, {0.5235987755982988, 1.22}], Offset[{-1.5, 0}, {0.5235987755982988, 1.22}]}]}, { LineBox[{{1.0471975511965976`, 1.29}, {1.0471975511965976`, 1.1099999999999999`}}], LineBox[{Offset[{1.5, 0}, {1.0471975511965976`, 1.29}], Offset[{-1.5, 0}, {1.0471975511965976`, 1.29}]}], LineBox[{Offset[{1.5, 0}, {1.0471975511965976`, 1.1099999999999999`}], Offset[{-1.5, 0}, {1.0471975511965976`, 1.1099999999999999`}]}]}, { LineBox[{{1.5707963267948966`, 0.5700000000000001}, { 1.5707963267948966`, 0.43}}], LineBox[{Offset[{1.5, 0}, {1.5707963267948966`, 0.5700000000000001}], Offset[{-1.5, 0}, {1.5707963267948966`, 0.5700000000000001}]}], LineBox[{Offset[{1.5, 0}, {1.5707963267948966`, 0.43}], Offset[{-1.5, 0}, {1.5707963267948966`, 0.43}]}]}, { LineBox[{{2.0943951023931953`, 1.1600000000000001`}, { 2.0943951023931953`, 0.9800000000000001}}], LineBox[{Offset[{1.5, 0}, {2.0943951023931953`, 1.1600000000000001`}], Offset[{-1.5, 0}, {2.0943951023931953`, 1.1600000000000001`}]}], LineBox[{Offset[{1.5, 0}, {2.0943951023931953`, 0.9800000000000001}], Offset[{-1.5, 0}, {2.0943951023931953`, 0.9800000000000001}]}]}, { LineBox[{{2.6179938779914944`, 1.4600000000000002`}, { 2.6179938779914944`, 1.24}}], LineBox[{Offset[{1.5, 0}, {2.6179938779914944`, 1.4600000000000002`}], Offset[{-1.5, 0}, {2.6179938779914944`, 1.4600000000000002`}]}], LineBox[{Offset[{1.5, 0}, {2.6179938779914944`, 1.24}], Offset[{-1.5, 0}, {2.6179938779914944`, 1.24}]}]}, { LineBox[{{3.141592653589793, 1.2799999999999998`}, {3.141592653589793, 1.04}}], LineBox[{Offset[{1.5, 0}, {3.141592653589793, 1.2799999999999998`}], Offset[{-1.5, 0}, {3.141592653589793, 1.2799999999999998`}]}], LineBox[{Offset[{1.5, 0}, {3.141592653589793, 1.04}], Offset[{-1.5, 0}, {3.141592653589793, 1.04}]}]}}}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\[Theta]", TraditionalForm], FormBox["\[Omega]", TraditionalForm]}, AxesOrigin->{0, 0.5}, Method->{}, PlotRange->{{0, 3.141592653589793}, {0.5, 1.35}}, PlotRangeClipping->True, PlotRangePadding->{{0.06283185307179587, 0.06283185307179587}, {0.017, 0.017}}]], "Output", CellChangeTimes->{3.587925479120369*^9, 3.587925770879449*^9, 3.587925877497851*^9, 3.587927460621876*^9, 3.5879279231610427`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.587925798834941*^9, 3.5879258334628735`*^9}, { 3.5879275387066154`*^9, 3.5879275425663176`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "0.05100000000000082`"}], ",", RowBox[{"-", "0.050333333333333785`"}], ",", "0.0919999999999992`", ",", RowBox[{"-", "0.016333333333333755`"}], ",", RowBox[{"-", "0.03799999999999981`"}], ",", RowBox[{"-", "0.030333333333333767`"}], ",", "0.09899999999999909`"}], "}"}]], "Output", CellChangeTimes->{3.587927543206997*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", RowBox[{"Pi", "/", "2"}], "]"}]], "Input", CellChangeTimes->{{3.58792767031151*^9, 3.5879276780621653`*^9}}], Cell[BoxData["0.5163333333333338`"], "Output", CellChangeTimes->{3.5879276787340975`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", RowBox[{"ys", "[", RowBox[{"[", RowBox[{"4", ",", "1"}], "]"}], "]"}], " ", "]"}]], "Input", CellChangeTimes->{{3.587927681999999*^9, 3.587927698282628*^9}}], Cell[BoxData["0.5163333333333338`"], "Output", CellChangeTimes->{3.5879276989389305`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "/@", RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], " "}]], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1.0610000000000008`", ",", "1.380333333333334`", ",", "1.1080000000000005`", ",", "0.5163333333333338`", ",", "1.1080000000000005`", ",", "1.380333333333334`", ",", "1.0610000000000008`"}], "}"}]], "Output", CellChangeTimes->{3.587927713033873*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], "-", RowBox[{"aju2", "/@", RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.587927573787711*^9, 3.587927624588888*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "0.05100000000000082`"}], ",", RowBox[{"-", "0.05033333333333401`"}], ",", "0.09199999999999942`", ",", RowBox[{"-", "0.016333333333333755`"}], ",", RowBox[{"-", "0.03800000000000048`"}], ",", RowBox[{"-", "0.03033333333333399`"}], ",", "0.09899999999999909`"}], "}"}]], "Output", CellChangeTimes->{{3.587927606868635*^9, 3.5879276253233232`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], " ", ",", RowBox[{"aju2", "[", "\"\\"", "]"}]}], "}"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\[Theta]", ",", "\"\<\[Omega] ajustado - \[Omega] experimental\>\""}], "}"}]}], ",", RowBox[{"PlotLabel", "\[Rule]", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.5879277285820684`*^9, 3.5879277735546265`*^9}, { 3.587927928802145*^9, 3.5879279633050685`*^9}, {3.5879281205843954`*^9, 3.587928142898785*^9}}], Cell[BoxData[ GraphicsBox[{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., -0.05100000000000082}, { 0.5235987755982988, -0.050333333333333785`}, {1.0471975511965976`, 0.0919999999999992}, {1.5707963267948966`, -0.016333333333333755`}, { 2.0943951023931953`, -0.03799999999999981}, { 2.6179938779914944`, -0.030333333333333767`}, {3.141592653589793, 0.09899999999999909}}]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\[Theta]", TraditionalForm], FormBox["\"\[Omega] ajustado - \[Omega] experimental\"", TraditionalForm]}, AxesOrigin->{0, 0.}, Method->{}, PlotLabel->FormBox["\"res\[IAcute]duos absolutos\"", TraditionalForm], PlotRange->{{0, 3.141592653589793}, {-0.05100000000000082, 0.09899999999999909}}, PlotRangeClipping->True, PlotRangePadding->{{0.06283185307179587, 0.06283185307179587}, { 0.0029999999999999983`, 0.0029999999999999983`}}]], "Output", CellChangeTimes->{3.587927774601666*^9, 3.587927964977083*^9, 3.5879281438207345`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.5879277978379335`*^9, 3.5879278032602673`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "0.5636330018762479`"}], ",", RowBox[{"-", "0.5353773269017603`"}], ",", "1.263751252163085`", ",", RowBox[{"-", "0.7637626158259923`"}], ",", RowBox[{"-", "0.5219842128499715`"}], ",", RowBox[{"-", "0.3226446142255659`"}], ",", "1.0941111212891592`"}], "}"}]], "Output", CellChangeTimes->{3.5879278039165707`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], "/", "sy"}]], "Input", CellChangeTimes->{{3.587927821261791*^9, 3.58792783541924*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "0.4250000000000069`"}], ",", RowBox[{"-", "0.45757575757576174`"}], ",", "1.0222222222222133`", ",", RowBox[{"-", "0.23333333333333933`"}], ",", RowBox[{"-", "0.4222222222222201`"}], ",", RowBox[{"-", "0.27575757575757975`"}], ",", "0.8249999999999925`"}], "}"}]], "Output", CellChangeTimes->{3.5879278366849685`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"ys", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], " ", ",", RowBox[{"aju2", "[", "\"\\"", "]"}]}], "}"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\[Theta]", ",", "\"\<(\[Omega] aju - \[Omega] exp)/\[Sigma]\>\""}], "}"}]}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.5879278564053917`*^9, 3.5879278603119726`*^9}, { 3.587927983759926*^9, 3.5879280110122333`*^9}, {3.587928154243496*^9, 3.587928164431858*^9}}], Cell[BoxData[ GraphicsBox[{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{0., -0.5636330018762479}, { 0.5235987755982988, -0.5353773269017603}, {1.0471975511965976`, 1.263751252163085}, {1.5707963267948966`, -0.7637626158259923}, { 2.0943951023931953`, -0.5219842128499715}, { 2.6179938779914944`, -0.3226446142255659}, {3.141592653589793, 1.0941111212891592`}}]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\[Theta]", TraditionalForm], FormBox["\"(\[Omega] aju - \[Omega] exp)/\[Sigma]\"", TraditionalForm]}, AxesOrigin->{0, 0.}, Method->{}, PlotRange->{{0, 3.141592653589793}, {-0.7637626158259923, 1.263751252163085}}, PlotRangeClipping->True, PlotRangePadding->{{0.06283185307179587, 0.06283185307179587}, { 0.04055027735978154, 0.04055027735978154}}]], "Output", CellChangeTimes->{3.58792786132768*^9, 3.5879280124967318`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], "//", "MatrixForm"}]], "Input", CellChangeTimes->{{3.5879282070760946`*^9, 3.5879282248588505`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.0015708308994709012`", RowBox[{"-", "0.0001747978835978845`"}], RowBox[{"-", "0.001129975873015875`"}]}, { RowBox[{"-", "0.0001747978835978845`"}], "0.005234309901738478`", RowBox[{"-", "0.002974940589569159`"}]}, { RowBox[{"-", "0.001129975873015875`"}], RowBox[{"-", "0.002974940589569159`"}], "0.00796685931972789`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.587928217967639*^9, 3.5879282259058104`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"aju2", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.587928245316106*^9, 3.5879282495352135`*^9}}], Cell[BoxData[ StyleBox[ TagBox[GridBox[{ {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\ \[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"}, {"1", "1.0218000000000005`", "0.03963370913087622`", "25.781084395252275`", "0.000013446306669847363`"}, { RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}]}], ")"}]}], "0.5944761904761906`", "0.0723485307503786`", "8.216838466662015`", "0.0011956982157289107`"}, { RowBox[{ FractionBox["1", "8"], " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"30", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], "+", RowBox[{"35", " ", SuperscriptBox[ RowBox[{"Cos", "[", "\[Theta]", "]"}], "4"]}]}], ")"}]}], RowBox[{"-", "0.5552761904761904`"}], "0.08925726480084346`", RowBox[{"-", "6.221075580964286`"}], "0.0033989996145685816`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxDividers->{ "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, "RowsIndexed" -> {2 -> GrayLevel[0.7]}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{ "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}], "Grid"], "DialogStyle", StripOnInput->False]], "Output", CellChangeTimes->{3.5879282500821323`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Sqrt", "[", RowBox[{"Diagonal", "[", RowBox[{"aju2", "[", "\"\\"", "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.5879282648177576`*^9, 3.587928297804926*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.03963370913087622`", ",", "0.0723485307503786`", ",", "0.08925726480084346`"}], "}"}]], "Output", CellChangeTimes->{3.587928298492484*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"aju2", "[", "\"\\"", "]"}], "//", "MatrixForm"}]], "Input", CellChangeTimes->{{3.5879283167440276`*^9, 3.5879283212912893`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1.`", RowBox[{"-", "0.06095954773976319`"}], RowBox[{"-", "0.3194190977687925`"}]}, { RowBox[{"-", "0.0609595477397632`"}], "1.`", RowBox[{"-", "0.4606859921265237`"}]}, { RowBox[{"-", "0.3194190977687925`"}], RowBox[{"-", "0.4606859921265237`"}], "1.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5879283221194825`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"aju2", "[", "\"\\"", "]"}], " ", "]"}]], "Input", CellChangeTimes->{{3.5879283655294104`*^9, 3.5879283807650757`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1.0218000000000005`", "0.03963370913087622`", "25.781084395252275`", "0.000013446306669847363`"}, {"0.5944761904761906`", "0.0723485307503786`", "8.216838466662015`", "0.0011956982157289107`"}, { RowBox[{"-", "0.5552761904761904`"}], "0.08925726480084346`", RowBox[{"-", "6.221075580964286`"}], "0.0033989996145685816`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5879283702016783`*^9, 3.5879283814995127`*^9}}] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{1414, 878}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification->1.5000001192092896`, FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (January 25, 2013)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[579, 22, 231, 5, 84, "Subtitle"], Cell[CellGroupData[{ Cell[835, 31, 237, 3, 60, "Subsubsection"], Cell[1075, 36, 579, 17, 45, "Input"], Cell[CellGroupData[{ Cell[1679, 57, 969, 28, 75, "Input"], Cell[2651, 87, 55105, 915, 368, "Output"] }, Open ]], Cell[57771, 1005, 206, 4, 45, "Text"], Cell[CellGroupData[{ Cell[58002, 1013, 389, 11, 45, "Input"], Cell[58394, 1026, 96, 1, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[58527, 1032, 470, 13, 45, "Input"], Cell[59000, 1047, 151, 3, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[59188, 1055, 197, 5, 45, "Input"], Cell[59388, 1062, 174, 4, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[59599, 1071, 536, 13, 45, "Input"], Cell[60138, 1086, 809, 25, 65, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[60984, 1116, 602, 17, 45, "Input"], Cell[61589, 1135, 14393, 242, 369, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[76019, 1382, 565, 17, 45, "Input"], Cell[76587, 1401, 249, 6, 44, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[76885, 1413, 110, 1, 58, "Subsubsection"], Cell[CellGroupData[{ Cell[77020, 1418, 866, 25, 104, "Input"], Cell[77889, 1445, 961, 28, 110, "Output"] }, Open ]], Cell[78865, 1476, 145, 2, 45, "Input"], Cell[CellGroupData[{ Cell[79035, 1482, 605, 17, 45, "Input"], Cell[79643, 1501, 16959, 293, 349, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[96639, 1799, 643, 18, 45, "Input"], Cell[97285, 1819, 1934, 46, 75, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[99268, 1871, 162, 2, 75, "Subsubtitle"], Cell[CellGroupData[{ Cell[99455, 1877, 1537, 38, 133, "Input"], Cell[100995, 1917, 35013, 610, 395, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[136045, 2532, 742, 21, 75, "Input"], Cell[136790, 2555, 1912, 44, 75, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[138739, 2604, 616, 17, 45, "Input"], Cell[139358, 2623, 13769, 234, 367, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[153164, 2862, 857, 24, 75, "Input"], Cell[154024, 2888, 2016, 48, 75, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[156077, 2941, 148, 2, 45, "Input"], Cell[156228, 2945, 681, 22, 65, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[156946, 2972, 137, 2, 45, "Input"], Cell[157086, 2976, 665, 18, 50, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[157788, 2999, 201, 5, 45, "Input"], Cell[157992, 3006, 622, 16, 50, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[158651, 3027, 557, 14, 45, "Input"], Cell[159211, 3043, 14860, 252, 342, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[174108, 3300, 149, 2, 45, "Input"], Cell[174260, 3304, 220, 4, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[174517, 3313, 486, 12, 45, "Input"], Cell[175006, 3327, 14030, 239, 383, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[189073, 3571, 136, 2, 45, "Input"], Cell[189212, 3575, 758, 24, 65, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[190007, 3604, 347, 8, 45, "Input"], Cell[190357, 3614, 777, 18, 378, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[191171, 3637, 72, 1, 45, "Input"], Cell[191246, 3640, 224, 5, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[191507, 3650, 424, 11, 45, "Input"], Cell[191934, 3663, 916, 27, 110, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[192887, 3695, 654, 17, 45, "Input"], Cell[193544, 3714, 3304, 58, 378, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[196885, 3777, 197, 3, 45, "Input"], Cell[197085, 3782, 398, 9, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[197520, 3796, 148, 3, 45, "Input"], Cell[197671, 3801, 90, 1, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[197798, 3807, 206, 5, 45, "Input"], Cell[198007, 3814, 90, 1, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[198134, 3820, 138, 4, 45, "Input"], Cell[198275, 3826, 304, 7, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[198616, 3838, 276, 7, 45, "Input"], Cell[198895, 3847, 423, 9, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[199355, 3861, 735, 19, 75, "Input"], Cell[200093, 3882, 1092, 23, 343, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[201222, 3910, 155, 2, 45, "Input"], Cell[201380, 3914, 390, 9, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[201807, 3928, 165, 3, 45, "Input"], Cell[201975, 3933, 394, 9, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[202406, 3947, 751, 21, 75, "Input"], Cell[203160, 3970, 969, 21, 342, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[204166, 3996, 186, 4, 45, "Input"], Cell[204355, 4002, 999, 25, 111, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[205391, 4032, 146, 2, 45, "Input"], Cell[205540, 4036, 1629, 42, 151, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[207206, 4083, 218, 5, 45, "Input"], Cell[207427, 4090, 188, 5, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[207652, 4100, 187, 4, 45, "Input"], Cell[207842, 4106, 908, 25, 111, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[208787, 4136, 200, 4, 45, "Input"], Cell[208990, 4142, 987, 23, 167, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)