(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 6.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 136435, 3063] NotebookOptionsPosition[ 132175, 2925] NotebookOutlinePosition[ 132910, 2951] CellTagsIndexPosition[ 132867, 2948] WindowFrame->Normal ContainsDynamic->False*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ StyleBox[ RowBox[{"1.4", ".1", " ", RowBox[{ StyleBox["Mathematica", FontSlant->"Italic"], ":", "\:30d9\:30ad\:7d1a\:6570\:3092\:4f7f\:3063\:3066\:5fae\:5206\:65b9\:7a0b\ \:5f0f\:3092\:89e3\:304f"}]}], FontSize->18]], "Input"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\:4f8b1", " ", RowBox[{"(", RowBox[{"p", ".25"}], ")"}], " ", "\:306e", " \:3000", RowBox[{"y", "''"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", FractionBox["1", RowBox[{"3", "x"}]]}], ")"}], RowBox[{"y", "'"}]}], "+", RowBox[{ FractionBox["1", "x"], "y"}]}], "=", "0"}], "\:3000"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\:6307\:6570\:7a4d\:5206\:95a2\:6570", ":", RowBox[{"ExpIntegralE", "[", RowBox[{"n", ",", "x"}], "]"}]}], "=", RowBox[{ SubsuperscriptBox["\[Integral]", "1", "\[Infinity]"], RowBox[{ FractionBox[ SuperscriptBox["e", RowBox[{"-", "xt"}]], SuperscriptBox["t", "n"]], RowBox[{"\[DifferentialD]", "t\:ff0e"}]}]}]}], "\[IndentingNewLine]", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Subfactorial", "[", "n", "]"}], "=", FractionBox[ RowBox[{"Gamma", "[", RowBox[{ RowBox[{"n", "+", "1"}], ",", RowBox[{"-", "1"}]}], "]"}], "\[ExponentialE]"]}], "\:3000", ";", RowBox[{"\:975e\:6574\:6570\:306e", " ", "n"}]}], ")"}]}], "Input", CellDingbat->"\[FilledSquare]", CellChangeTimes->{{3.4094503839208*^9, 3.4094505020718*^9}}, Background->RGBColor[ 0.4666666666666667, 0.8352941176470589, 0.8235294117647058]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Clear", "[", "y", "]"}], ";", RowBox[{ RowBox[{"DSolve", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"y", "''"}], "[", "x", "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", FractionBox["1", RowBox[{"3", "x"}]]}], ")"}], RowBox[{ RowBox[{"y", "'"}], "[", "x", "]"}]}], "+", RowBox[{ FractionBox["1", "x"], " ", RowBox[{"y", "[", "x", "]"}]}]}], "\[Equal]", "0"}], ",", RowBox[{"y", "[", "x", "]"}], ",", "x"}], "]"}], "//", "Simplify"}]}]], "Input", CellChangeTimes->{{3.409398848429671*^9, 3.409398853658671*^9}}, CellLabel->"In[1]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"y", "[", "x", "]"}], "\[Rule]", RowBox[{ FractionBox["1", "4"], " ", SuperscriptBox["\[ExponentialE]", RowBox[{"-", "x"}]], " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", SuperscriptBox["x", RowBox[{"4", "/", "3"}]], " ", RowBox[{"C", "[", "1", "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["\[ExponentialE]", "x"], " ", RowBox[{"C", "[", "2", "]"}]}], "-", RowBox[{"9", " ", SuperscriptBox["\[ExponentialE]", "x"], " ", "x", " ", RowBox[{"C", "[", "2", "]"}]}], "+", RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"-", "x"}], ")"}], RowBox[{"1", "/", "3"}]], " ", "x", " ", RowBox[{"C", "[", "2", "]"}], " ", RowBox[{"Gamma", "[", RowBox[{ FractionBox["2", "3"], ",", RowBox[{"-", "x"}]}], "]"}]}]}], ")"}]}]}], "}"}], "}"}]], "Output",\ CellChangeTimes->{3.409398709073671*^9, 3.4093988561286707`*^9, 3.4094002927556705`*^9, 3.4110435753292*^9, 3.411355521117879*^9, 3.411356180032879*^9, 3.411356302526879*^9, 3.413806040409647*^9, 3.413859056111271*^9, 3.413945875889*^9}, CellLabel->"Out[1]="] }, Open ]], Cell["\<\ \:521d\:671f\:5024 y[1]==1,y'[1]\[Equal]-1 \:3092\:5165\:308c\:3066\:89e3\ \:3044\:305f\:5834\:5408\ \>", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"exmp", "=", RowBox[{ RowBox[{"DSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"y", "''"}], "[", "x", "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", FractionBox["1", RowBox[{"3", "x"}]]}], ")"}], RowBox[{ RowBox[{"y", "'"}], "[", "x", "]"}]}], "+", RowBox[{ FractionBox["1", "x"], " ", RowBox[{"y", "[", "x", "]"}]}]}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{"y", "[", "1", "]"}], "==", "1"}], ",", RowBox[{ RowBox[{ RowBox[{"y", "'"}], "[", "1", "]"}], "\[Equal]", RowBox[{"-", "1"}]}]}], "}"}], ",", RowBox[{"y", "[", "x", "]"}], ",", "x"}], "]"}], "//", "FullSimplify"}]}]], "Input", CellLabel->"In[2]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"y", "[", "x", "]"}], "\[Rule]", RowBox[{"1", "+", RowBox[{"3", " ", "x"}], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", "x"}]], " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", SuperscriptBox["x", "2"], " ", RowBox[{"ExpIntegralE", "[", RowBox[{ FractionBox["1", "3"], ",", RowBox[{"-", "x"}]}], "]"}]}], "+", RowBox[{"3", " ", "\[ExponentialE]", " ", SuperscriptBox["x", RowBox[{"4", "/", "3"}]], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"-", "1"}], ")"}], RowBox[{"1", "/", "3"}]], " ", RowBox[{"Subfactorial", "[", RowBox[{"-", FractionBox["1", "3"]}], "]"}]}]}], ")"}]}]}], ")"}]}]}]}], "}"}], "}"}]], "Output", CellChangeTimes->{3.4093988994466705`*^9, 3.4094002982696705`*^9, 3.4110435836342*^9, 3.411355542696879*^9, 3.411356185532879*^9, 3.4113563087228785`*^9, 3.4138060483566465`*^9, 3.413859061325271*^9, 3.413945883851*^9}, CellLabel->"Out[2]="] }, Open ]], Cell["", "PageBreak", PageBreakBelow->True], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"zu1", "=", RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"y", "[", "x", "]"}], "/.", "\[InvisibleSpace]", "exmp"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "->", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5"}], ",", "1.5"}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Black"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.409400214093671*^9, 3.4094002221616707`*^9}, { 3.4094003351516705`*^9, 3.409400380867671*^9}, {3.4110433774622*^9, 3.4110434007882*^9}, 3.4110443245882*^9}, CellLabel->"In[3]:="], Cell[BoxData[ GraphicsBox[InsetBox[ GraphicsBox[{{}, {}, {GrayLevel[0], LineBox[CompressedData[" 1:eJwV1HlUjdsfBvDT6HLoIhLSrELoEirypIRI0qAklXORDEmkSeJWMjTIkKKU hCYNhpDkVNKsU6f5NDoUic707lD4vb8/9trrs/b6rr33s79ra7CO2u2TZjAY 0fT4/5x8miX/z95LayPsxu8yGAK84apbO6l7oVHJ91KAlgB/3paEqasHwnqu gBllKUAyO1pNTv0CxvlL69QjBThs6ndkVC0Rb6Ibfc5LC/G4uS9dYpGErBPU Bml1IX4esu4SeqbgmN7h52NrhFhfHzeftKUhTW1C/mk/IbhjB64J1DJRqfhv h2a/ECcrVQ1GCrIgn3EmbfynEHOuNtd+tchBVXfbQe8ZIrAWmsl88cyDcq10 rsYGEQJymC9EbY9gnaUXQ9JFmMB7r/tV7QX0zzJLr24Xo539ym/40wuU79h8 6N4+MbLuJ5R/KSiCykXN6r2BYtj42rgPWRRDztzGS5AiRvzEovhBz9fIj/nk 4PBZjCf+m32PK7OR79A0NPxTjKShVbPFp9iYGly+0GSyBN6c6Z4iy1KcuOJe Ri2WYHpSlbSwrQwvF2/TkPeWYEyhMNNnTTlcze5/dw6R4MPZu7aC1HLkJj20 2h8lQaHn6dsjXm9ACUMYjzMlcFluaPJtrAJzKhcW6fRLcKcm5dgXtWp4HGLI /rGgIEl4urA3qhp1Fuxny20pbPCs5Tf9qIavqFqg4UphWGbUsYhbA9aJ4tuL j1MwMrUxuRBZh9MyWhozblO4xNwrPiWpwyaDpRt1Myj0dATm+Oyph2nD7uk/ CiiEn7yn6rz6HdLrpaR5byhw8saldUca4MYxr8wYpDAdE92mLOFAqjA/vXSE wmqdayaRezkoePKyPnmUQowkUxzUyAFjUs/KNHmC5zxDjmRCIxiLtkbXTiHo L3ud4722ES7Os12LZhAYxrXsY2U3ouN2YuiQBoFbgId5V38jcnrMevX1CCLd v6juUG6Cmb9x/colBJ2LpdqtIprQvI61664xgczMqCflL5tQHCQ1Lg8C/XGl OFNRE7KXdi0yXE8QWqO/+R93Lkrexup/3UqQUfBMJ/s6Fz1OMyWBdgRNCeYy 8+u4sLMyMWraQaDt6VysbNwMJSjNGnQjsLHhJ1w52gxrZ4+UdBaB/wpvv8n3 mxFmHBi6dD9BjUz4EoZiCybXeyrlHSaQDCkwg6xa0K+y5VH6UYJ5TYmD4tAW xCep+3j5Emx4of3mSGEL0rMHXv86QeCTmpc6ONyCSaYpU1n+BDcjTUL2aLUi 6Lw9Jz6QoNy7YidvZyuM7sw6nBRMMOxou9LxcitGxFNsj4cQKJnypje8bYVZ zsHBuaEEZtr7Rzb9aoWTjH9S/BkCL6awtmx5G+YGXGvnnyW4IgrOWHOwDWoi yMqGERR3yEcUprbhe8OMyFHaA+y4PQZtbejpb6gsCSf4O0NlbdaUdthst9N3 iSAwin0wR3t9O9xPps+uoc06uWw0Oagd5259FyucI4ja/Yo7q6AdrvkPVRfQ frp+U37cYDvUh7ePK9PuWcSNYqp2wNvj3rceuv4vRTevCIcOlJ1K2hFMe9nP T5Z/LnbgSBjr2jd6/139xzUDSztgI9g1wZh2eNXv36LRDvxu1FPYRZ83N+8C 7/CSThTPfCDv+B/B0PShqM17OsHZOStiDX1f3ZOb1+pd60RMV85jKTqPvR1Z I3KVnShKn9adfpogdQ3zDv9HJ5hxrC06dJ5dKYfsSvV5iOEYbDpH5z1bpk4m xZ2H5/ZhKhX0e1ypjtrvUsFDrrbOkT4/gnf6X2cZfeeh/Ul3wKvjBMzLW6tn LurCW/ZQUNAx+rw7FPQbL3choVM7+DrdH+wX3t255V0YTUqWlXgR/FJpiIki XXCtlLu13JPgJD9WuNG1G7KFb/7s2EPwaIMgbX5sNzi8446r6X4cybR1kCnr hlJExVupXQQHfKY9K9Htwa3NJXIrHQhcfl05tULcg8dsvoqFJUG8h3ixok4v XqzqC8I6Am65fa/AuRfKcc5jaqYE1hdnmOeU9CIkLsEtxpAghVkbNs2yDyw5 aV9dTYK1psGuZ9z6MP+/jKwt8+h8vBetGPHvQ3iAncBRmUC56dJAXVYfso+N xs5TIIhLsLY6P7UfaTbPz4V+pxA2/53CH14/bHyCVrGrKGg6nR48QvXj7uOs 1R5lFNjnl7C7FN7j6adtzZ9fUhj/EnOsaN17/N6ZdqMol4Lfo23Nfg/eI/Zv OS3nqxQ80Zg47MvHkHnh5HxnCow0UsS7xIfxjW5rve0UEmRVumrS+QiJPjQp xopCVfV+1cxWPp4pZxdomlDQcxhP22fyAR/vd17ym0Ph0wHdnB6pj1iupec0 2CbBwSshJZzLA3iqlaOislECaSqt93XmADJsPT5cN5XgplMVI69sAOJl/ubS hhLUqChaREsGwHV6Zf9YXYJFDzIqrZwHYSrPeBn0Q4zhl1xOmdonhAeHuL7K EMP74wL+k9zPeBSze/X4bxH63Dr+Kq3+jBnjDI95YhHs288vqf9AW/gxafmg CEa1g4Ef5wyh56kLQYMIMgX3pipFDqGvxdy467YICac01vq7f8FwQ/lD8zUi lCrOTjSe+hVvTR2vPfMRYpJGuG6vkQBVPgtzGTEjiJlau/COhxh1bv5timqf weI5vJapo/+hnaVViZbvcawinHVU9yfYH+X4vEntKPCZbK9s9Qt9Zbs9FmjW 4k7woSEDJ4YZY1RWf4vlQxiwJ36P3M0wO7OvbcMTwxywZTPkev+lvTLRvlo7 G33RH9SjfWh/3cIclc+Eaupup88X6Pr3Wrbu3HTkfhjba3aZXg8Yc9GpugvT BTd9b8TTFhd3JrxKg+uj1mjLu7QbkgWhWamYyF2pk5lB1xusYhhcTYFXBTOP l0t733nV2bHJ+B9yyHyT "]], LineBox[CompressedData[" 1:eJwV1nk8VV0XB/BrHjM3SHFNhZQSUqpnG1KICGWKSxJCExKpGxWJCOENoUxJ A6GnwjJmniXDvYdkKM0USU+9y1/38/381l5773P2OffIux3ff4STRqMJcNBo i78NbqyZ/ww5CK1lco+b/w34kv/+y6o9aJm+1JiyeBDRXCPUYoPWPKLmEJ8E UQdWBIVHoHe8M78wcQfCMn5bff/IQYgGV/e3rsdgufHfk+tmOEjVv9MKAwZF IFt9+obbPNZ//rb15JMieD461dnJw0nItd18JQnFMK08sO+BLCeh/b1heMWy BNwKS809LDkJs+b5kN+Lp6D/zM+k/8linuQ0dqASaD0jpDyYi1TpCA8U2dTD pfeVWcEXuQj5Wq8YG1EPArR0zq2RXIQ5qKGl/7weJNbb15Xe5CL0pwHvFeVe gnJE1+5Hj3F8iC9zfOIlmOrVWNyZ4CIMayGGp18jJNy96xS5n5vQOGguk4da YI2/R5CNGg/5Ki1Y5+LaCeu3DVtnbOQh9ELbPiv/TtCi2WlM6fAQ5v4O0c0R nWAQbTJxwZCHWFZbL68t7ATnbHWb+048pIpDZ//KuU5I6p3W4IzlITQ606Qw sgt4tC9MPppB37658mZGNwgvzNX8muchjBKyJeRxN0hUn7i9i8ZLMi9KBVpV dwPd3M12SJiXVK1hn20f7YbtR3bV8q5Bt+edEVLuAf+bQhmH7HgJc1mWXkpu D4z9SD4gVMFLGAcT/LVu98Id/c2n2bW8hCZo43P8YS+4xLTHPmrG/ncLplIq e2FQiafJuh99I+buU6oXuqxP6aXNoH0M5JVlX0Fl0V76ejU+QpdKVmz63ytI 9uWYskjmIwzNrP6QS31g8yyNV/42WkJhY2p8H0jw6CrOZPMRWtNVy4LMPrie 5ueUXMyH84lLpZT3waWWofbhNvS+9orimT44oVr25AQ3P8k0PGD7yfk1mI57 h8af5Ce0J9G8Far9YByqWGgUxE+YxtGTj7T7wWApa3D2PD+pcpS3T9Tvh227 zHUdo9FrhCQ17ftBLUdjRjEPXes6Vh3RD0JHvnuWsvgJXVVDUG+0H1rHQm36 dwuQKo9y657oAWg8pxMeZSFAaDXqAoLJA1An9aVouy3mS4ZObc4agHIjhmiW mwBh7K654lw6AIXZBs1eoQKEGc0qWMYegBh3PrJQLEDo5FThMrVBsBiLWycr K4jnLc8o4fkgtK4b63VSEiSZh4Lt0msGwez0lvOpaugN3zvSmgdhDyfVuWKL IKHb1PKcGxwEA/q6QElLzE+k7yufHwRtp/oq/jBBwrzCd8xUZwhW9c7bzowL Esac5vPWvCG4JWP+d9NHQUILWXcr7uEQSB/OzD8xjfP/Cv7XtHQIlk0bL3z6 g/btas6qGQIxscTMd8uFCHNHEY3FGgKuvRs+sE2ECGNJWsgVURZM1boxGx8I EfoZ7pA3viyQu9Hvfb1EiNDKU+5Pn2aBjbOFrc0LIUIeqNnNn2VB5c+taiON OF61aNfkZRbErxfvnXuL45ucbYzTWaCXDGvXrhTG6zlmtKKZBSfctSU+0YUJ gybz61IHC3I33f9dvFaYkHdm9yd7WSDWmtS1U1uYjNhLy8cOs2CM5hdywBLd yalz9DsLor1XdVy+Ikxo23teGaxiQ/WW+GdmMejhhzMS8myY5ebPFk/EfvnN VweU2cDImAlKz8Jc0mqHqQYbtHqbFUrLhQnd737Sc302sHecDRybFibMnY0P 2e5s2CDet9rQZQkhdZWxrtlsmIiZCLt5ZAmhZY3UdOaxIV1wbnLy2BLCyG0J 1L3PBmHuFcXRQUvIiJ950LciNkzN2hv33VhCqo7GXRIENuSw2H5edVi/UaGN /ZoNTvafe140LyH0IeOa14NskOr7oyvShfVH1iY2s9kQ1iHH9YSN8396Mnbr La6/xjX59yz2d2b2TXxmw6r8cYhVFSGZ9+4Mb+SmoFdpVmlUQwSff0fygpeC a1m8UVo6IoTG86ZvpwAFv26ttRkwECEMov1ikwgF/TFe7xScsL4gdP7lcgoS Tn8SK7suQsjkKr4SVQpMv/4XwH9ThNDVFyx611HA6Ssy5JCK89kMKnxeT8EJ D42cv3kiZESjLlxEkwIL+5NbTaqxf1ddBec2CgT/+eHKmsHcdVVOxR4KgvRV +Mt+iZCqVqUP6aYUTBg6PozlECUMl9G/gXspqNlT/ctAVJSMpF54JGlJQfD+ mIR7amiVENbcAQre2VRtDd8kSkgz0zzDjoIDB2eGnXRFCW1gqOofBwo0nezV xYzRz1c0HjtEwYcjyvWBrqIkMz5M8ORhChw87Y5ZemJeo0jeuFPQ6H1NXO24 KKH/qikw9aAg+/i3Q+xzooSZzasr4EWB09mKWcMUrO+WfqPtR0FzyNe01RlY r7LD98RxCnTPKxrO5WC+XJyRfYICqfCrsQVPcL32jvE/T1HQGm2rIt6B+3NM 6d1/hoJtsZHtU6+wv0ywvn0QBfk3XvjXsURJ1dPmXfZnKbiUJF99Zgod0aFu HELBdIrNUatv2K/hsszmcxQwUiOWrPuJ/vPwmXQoBbKds+pfOMXIyJjWqt7z FNhaidGceMVI5smAj3kXKIjuVu1pFMC85Gt4ABPvf6/T2TtimFdo0/9cpKBv oKbeVlaMMLLOFddfomCJIyulRl6MVM1ouHpepsCI9eOYhjLaa56H5woFxZSK hIA69rv2Y496BAXvXQzGAzRwvGXxdBma/sbx31FNMcI8/r97epEUXH973bl8 K+Zy3babr1JQ756/SXUHzq8YdyAX/Xu8mjuJiBGat1WIZBQFm48OveY0wvrP NU3BaO933wuO78Z+HNd3s9BZXiLnWaY43tDu15ZreH6n1lqZWOD6cmsnY9C7 PznMKdhivnsmUiWagttS4T0X7HB8JFPKB/1d7/4jlqMYIQpnlQvQpod7rm11 wfkD6dWj6MyohaNJbphfLPu4NIaC2SJFo5kj2I995oEh2nzAjG7pheurTef3 QWfT/H8X+uD1EHTmikX/WpvWL3AC16P+4U4h2nJfXYnHaazX9/9Yh84N/BhX G4jmUx5/jf6dLuVLDxYjdJZy/Djaun67SWgo5o2pPz+hCz66Kw8ycf7T+au/ oWlSMRxbLuF+NnnzfkEf0CtlJ0RgvrDwdBJd6MZ+9jUK1+MfsGUIzRnFk2R+ HffzaepqE9quaP2pghtY7+xbUox+2G9rwXcT5/cRLE9C89DOq7mnYO7TmhOA dlqby1udiuNdnwfuQxdbtI+uzsDrRevfrITmD5ytDL6D+y1QHp3B6+ecLpv6 Ogf7hWReqUSX1Bmf0bqH3maw5hJa8KOf9Y1CHO/J8dIIzZBM1vj8COfb2uVN Qz/dBkJmT9BpWdJP8X6KuE1O5pVhvY7La0+0+1XROu7nuJ7DM/lL0WL9Lucq q9BpWqkMPB8efyPsZOrw+olm1//B81W+5rFWUAN60m95CtorgPZpUzvWN50x KsfzWZWm0nS9C9en7ay6G72szjLnQy/up+3rnjY8zzUSWYdyhvB6lu42a8Hz v2Jb01bOYewXdWuLIdrP9dtSl1Hsl1J2sgyfF5nH+u0r3i+eB6PR6/g8+ZuP 7oyexf0wenX5w/D94S8o834efS9vuSM+f/Q0zbld/+H9NB/zuofPZ9tU2KO/ XOKkSm19iC4+v2siFemnxcUJ855NNx2f//4adw4HdXHCGHaxlg2g4Kv+4MpQ DXFCZnuE9fwp4Kvep5WpifUXx0VtTlOgA9uOTuiiA2w4Qk5SkPhCrO3ULrQp 32yaLwX7SspTrjljvwYTI60jeP02axY/dMV+cmZGy/H9eL44r6XLXZxkahe8 nHXD8/U4/s/yY5j/YTDuM/B+PvB0zz6D47/s3fPBkYKXOVIbK+LEycjxa5ON VhRQSlEmIwlYz36TH4Dv8x93/7pxJWO/RGFFuX0UKN2ZummSLk7o1Pp9nvj+ D7tdtfDqHu7feO/bHmMKdib7NHyuwfqplQMSehSURtY503+gc7afNZbH96dp y4qIn+KEFrcx/ZgcBbeEu7s/LeD8zTtdYlZTwIwbNn7BKUEytXa0vZSmYG/K rw0HxCRI1QalCnEJCkbzNv69tk6C0Lm1jYU48bw1pGXMuUoQRl2oVt4wGzx4 Akba29EHKWmzeDaslGt6vdCFFnB8MBLLhnbd1R0qr3B8ML+UfwwbdHzqK8KG JAjT3/tIYiQbeHuWpuq8wzxHzPXFefz/zyyzvc0hSTJ/1C9ke7NhTO9ns6+W JKE7azn8JGw4fCqkVPiWJP5/dV5a844FGkfXte91lcL/n4A34Sos6JBQFwrY upQwd71lhu8aghcPw1LVuZaRqkYVDSePQQjhULNsZaNVM/NW+w2AICt4j1/J ckJzX9uRF9QP47nyiRnnVuD3hdomz5uvIVFFmvuZrTQhodFuzLt9EHfLo8GV vhK/h5vyXza8AofEQ+3CkysJ88LeD1ZzvfDTKGc+o1KGMO09W/pW98LbcYOg mohVhPndl3nPsQfu7Ngk0+a6mtCsuCR5E7rhweUA8aPrZfH7U+wj35suiLA9 bMb1Q5YwQ7oEdup1gTYr615Emxwh0zZZ83GdkKKa+qDNjE5oxyuiY350wIWq mBSzZ3TCbHrktKemHcxlbHOaleQJU7C1jeS2gb5fg6P4VXlCs2HuMCxshYxV bkqtPzDXn/4ns7AFlGrzkiwcFQjTJuHfzJZmiFtfo9ZdqUBoGsmC0gtN4DHD 3dWkpkiYJRZ/wpSbwK1omn41VpHQvpsrHPRqhMZm/vDy34u5A09ZfgP4GL6J a1q0Y05BBlqs/NntvkWrrbC8irZ74P3866IPBaY6oSdjW78p/YeektLiQvPa xjFiFm0y6GOZ1wCGw8t3Ov9BD4X/nsppgImDX82OoWmlPbm96KjORvugRVeY WVWiu6vPBsQv1tNLcm+g3bKHCl8u+q6HtS6a6ZUho/EX/cqq5HJ2AyiNnlHd jqbVKroeRzc6WG4xWcwHVovYo8X2clgfXswdojzV0RkbDkclL+YlRnI9dxvA IE8vJXvRKQfbytETclK5RYv1CfEhuegN4vXVLYv5a2b/WXT31fSO/sVcVivi MDqQM5A9vuhIUR1z9MoQiw/Ti/U8kuM66MqZNfN/F/PsnYl09P8Buuob3w== "]], LineBox[{{2.096284653963217, 0.021812128280755516`}, { 2.0982968773548376`, 0.020517362774826964`}, {2.104488333944442, 0.016546951388614062`}, {2.107584062239244, 0.014569372471592068`}, { 2.110679790534046, 0.012596874469140928`}, {2.1133111595846272`, 0.010924243968731595`}, {2.115269207731089, 0.00968198991077518}}], LineBox[{{2.1325124143331378`, -0.0011701387038050015`}, { 2.135600403307203, -0.0030970052198870945`}, { 2.1385413451872646`, -0.004927440940762473}, { 2.1411727142378463`, -0.006561335232423637}}]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"x\"", TraditionalForm], FormBox["\"y\"", TraditionalForm]}, AxesOrigin->{0, 0}, Background->None, ImageMargins->0., ImageSize->{181., Automatic}, PlotRange->{{0, 10}, {-0.5, 1.5}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Automatic}], {0., 0.09342123470160146}, ImageScaled[{0., 0.}], {181., 116.}, ContentSelectable->True], AspectRatio->0.3729903536977492, Background->None, ContentSelectable->True, ImageMargins->0., ImagePadding->0., ImageSize->{311., 116.}, PlotRange->{{-129.99999999999983`, 181.}, {0., 116.}}, PlotRangePadding->None]], "Output", CellChangeTimes->{{3.4113559936618786`*^9, 3.411356032533879*^9}, 3.4113561908668785`*^9, {3.4113562375558786`*^9, 3.4113562710748787`*^9}, 3.411356313809879*^9, 3.4138060692096467`*^9, 3.4138590681172714`*^9, 3.41394588775*^9}, CellLabel->"Out[3]="] }, Open ]], Cell[BoxData[""], "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{{3.4138593361032715`*^9, 3.4138593420342712`*^9}, 3.413859378302271*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\:4f8b\:ff11", "\:3000", "\:306e", "\:3000", RowBox[{"y", "''"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", FractionBox["1", RowBox[{"3", "x"}]]}], ")"}], RowBox[{"y", "'"}]}], "+", RowBox[{ FractionBox["1", "x"], "y"}]}], "=", RowBox[{"0", " ", "\:3000", "\:306b\:3064\:3044\:3066"}]}], " "}], "\[IndentingNewLine]", RowBox[{" ", RowBox[{"x", "=", RowBox[{ "0", " ", "\:306b\:304a\:3051\:308b\:7d1a\:6570\:89e3\:3092\:6c42\:3081\:307e\:3059\ \:ff0e"}]}]}]}], "Input", CellDingbat->"\[FilledSquare]", Background->RGBColor[ 0.4666666666666667, 0.8352941176470589, 0.8235294117647058]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"p", "[", "0", "]"}], "=", RowBox[{"-", FractionBox["1", "3"]}]}], ";", RowBox[{ RowBox[{"p", "[", "1", "]"}], "=", "1"}], ";", RowBox[{ RowBox[{"q", "[", "0", "]"}], "=", "0"}], ";", RowBox[{ RowBox[{"q", "[", "1", "]"}], "=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"p", "[", "i", "]"}], "=", "0"}], ",", RowBox[{ RowBox[{"q", "[", "i", "]"}], "=", "0"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "2", ",", "20"}], "}"}]}], "]"}], ";"}]}], "Input", CellLabel->"In[4]:="], Cell[BoxData[ RowBox[{ RowBox[{"\:6c7a\:5b9a\:65b9\:7a0b\:5f0f\:306e\:89e3", " ", SubscriptBox["\[Lambda]", "1"]}], "-", RowBox[{ SubscriptBox["\[Chi]", "2"], " ", "\:304c\:6574\:6570\:3067\:306a\:3044\:5834\:5408"}]}]], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"s", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{ SuperscriptBox["\[Lambda]", "2"], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"p", "[", "0", "]"}], "-", "1"}], ")"}], "\[Lambda]"}], "+", RowBox[{"q", "[", "0", "]"}]}], "\[Equal]", "0"}], ",", "\[Lambda]"}], "]"}]}]], "Input", CellLabel->"In[6]:="], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[Lambda]", "\[Rule]", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Lambda]", "\[Rule]", FractionBox["4", "3"]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.409400003329671*^9, 3.4110436327841997`*^9, 3.411355778631879*^9, { 3.411356278775879*^9, 3.411356287612879*^9}, 3.411356322546879*^9, 3.4138060873476467`*^9, 3.413859087648271*^9, 3.413945955363*^9}, CellLabel->"Out[6]="] }, Open ]], Cell["\:4fc2\:6570\:306e\:8a08\:7b97", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{"y", ",", "a"}], "]"}], ";", RowBox[{ RowBox[{"y", "[", "x_", "]"}], ":=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"a", "[", "k", "]"}], " ", SuperscriptBox["x", RowBox[{"k", "+", "\[Lambda]"}]]}], ",", RowBox[{"{", RowBox[{"k", ",", "0", ",", "10"}], "}"}]}], "]"}]}], ";", RowBox[{ RowBox[{"a", "[", "0", "]"}], "=", SubscriptBox["a", "0"]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"a", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"-", FractionBox["1", RowBox[{"n", RowBox[{"(", RowBox[{"n", "+", RowBox[{"2", "\[Lambda]"}], "-", "1", "+", RowBox[{"p", "[", "0", "]"}]}], ")"}]}]]}], RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"k", "=", "0"}], RowBox[{"n", "-", "1"}]], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Lambda]", "+", "k"}], ")"}], RowBox[{"p", "[", RowBox[{"n", "-", "k"}], "]"}]}], "+", RowBox[{"q", "[", RowBox[{"n", "-", "k"}], "]"}]}], ")"}], RowBox[{"a", "[", "k", "]"}]}]}], ")"}]}]}]}], "Input", CellLabel->"In[7]:="], Cell["\[Lambda]\[Rule]0\:3000\:306e\:3068\:304d\:306e\:7d1a\:6570\:89e3", \ "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell["Table[a[i]/.s[[1]],{i,1,10}];y1=y[x]/.s[[1]];y1", "Input", CellLabel->"In[9]:="], Cell[BoxData[ RowBox[{ SubscriptBox["a", "0"], "+", RowBox[{"3", " ", "x", " ", SubscriptBox["a", "0"]}], "-", FractionBox[ RowBox[{"9", " ", SuperscriptBox["x", "2"], " ", SubscriptBox["a", "0"]}], "2"], "+", FractionBox[ RowBox[{"27", " ", SuperscriptBox["x", "3"], " ", SubscriptBox["a", "0"]}], "10"], "-", FractionBox[ RowBox[{"81", " ", SuperscriptBox["x", "4"], " ", SubscriptBox["a", "0"]}], "80"], "+", FractionBox[ RowBox[{"243", " ", SuperscriptBox["x", "5"], " ", SubscriptBox["a", "0"]}], "880"], "-", FractionBox[ RowBox[{"729", " ", SuperscriptBox["x", "6"], " ", SubscriptBox["a", "0"]}], "12320"], "+", FractionBox[ RowBox[{"2187", " ", SuperscriptBox["x", "7"], " ", SubscriptBox["a", "0"]}], "209440"], "-", FractionBox[ RowBox[{"6561", " ", SuperscriptBox["x", "8"], " ", SubscriptBox["a", "0"]}], "4188800"], "+", FractionBox[ RowBox[{"19683", " ", SuperscriptBox["x", "9"], " ", SubscriptBox["a", "0"]}], "96342400"], "-", FractionBox[ RowBox[{"59049", " ", SuperscriptBox["x", "10"], " ", SubscriptBox["a", "0"]}], "2504902400"]}]], "Output", CellChangeTimes->{3.4094000202136707`*^9, 3.4110436545732*^9, 3.411355788608879*^9, 3.411356331466879*^9, 3.4138060980116467`*^9, 3.4138590980772715`*^9, 3.4139459610880003`*^9}, CellLabel->"Out[9]="] }, Open ]], Cell[BoxData[ RowBox[{"\[Lambda]", "\[Rule]", RowBox[{ FractionBox["4", "3"], "\:3000", "\:306e\:3068\:304d\:306e\:7d1a\:6570\:89e3"}]}]], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell["Table[a[i]/.s[[2]],{i,1,10}];y2=y[x]/.s[[2]];y2", "Input", CellLabel->"In[10]:="], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["x", RowBox[{"4", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "-", RowBox[{ SuperscriptBox["x", RowBox[{"7", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "+", RowBox[{ FractionBox["1", "2"], " ", SuperscriptBox["x", RowBox[{"10", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "-", RowBox[{ FractionBox["1", "6"], " ", SuperscriptBox["x", RowBox[{"13", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "+", RowBox[{ FractionBox["1", "24"], " ", SuperscriptBox["x", RowBox[{"16", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "-", RowBox[{ FractionBox["1", "120"], " ", SuperscriptBox["x", RowBox[{"19", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "+", RowBox[{ FractionBox["1", "720"], " ", SuperscriptBox["x", RowBox[{"22", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "-", FractionBox[ RowBox[{ SuperscriptBox["x", RowBox[{"25", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "5040"], "+", FractionBox[ RowBox[{ SuperscriptBox["x", RowBox[{"28", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "40320"], "-", FractionBox[ RowBox[{ SuperscriptBox["x", RowBox[{"31", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "362880"], "+", FractionBox[ RowBox[{ SuperscriptBox["x", RowBox[{"34", "/", "3"}]], " ", SubscriptBox["a", "0"]}], "3628800"]}]], "Output", CellChangeTimes->{3.409400031395671*^9, 3.4110436637072*^9, 3.411355791770879*^9, 3.411356344610879*^9, 3.413806103056647*^9, 3.413859101335271*^9, 3.4139459660889997`*^9}, CellLabel->"Out[10]="] }, Open ]], Cell["", "PageBreak", PageBreakBelow->True], Cell["\<\ \:521d\:671f\:6761\:4ef6\:3000y[1]==1,y'[1]\[Equal]-1\:3000\:3092\:6e80\:305f\ \:3059\:7d1a\:6570\:89e3\:3092\:56f3\:793a\:3059\:308b\ \>", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"con1", "=", RowBox[{ RowBox[{ RowBox[{"C1", " ", "y1"}], "+", RowBox[{"C2", " ", "y2"}]}], "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "1"}], ",", RowBox[{ SubscriptBox["a", "0"], "\[Rule]", "1"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"con2", "=", RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{ RowBox[{"C1", " ", "y1"}], "+", RowBox[{"C2", " ", "y2"}]}], ",", "x"}], "]"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "1"}], ",", RowBox[{ SubscriptBox["a", "0"], "\[Rule]", "1"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Solve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"con1", "\[Equal]", "1"}], ",", RowBox[{"con2", "\[Equal]", RowBox[{"-", "1"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"C1", ",", "C2"}], "}"}]}], "]"}]}], "Input", CellLabel->"In[11]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"C1", "\[Rule]", FractionBox["22292992609888", "22293391929595"]}], ",", RowBox[{"C2", "\[Rule]", RowBox[{"-", FractionBox["25057711306656", "22293391929595"]}]}]}], "}"}], "}"}]], "Output", CellChangeTimes->{3.4094000695506706`*^9, 3.4094001117016706`*^9, 3.4110436739202003`*^9, 3.411355797549879*^9, 3.411356048049879*^9, 3.411356093506879*^9, 3.411356357862879*^9, 3.413806111171647*^9, 3.4138591044092712`*^9, 3.413945969509*^9}, CellLabel->"Out[13]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"y3", "=", RowBox[{ RowBox[{ RowBox[{"C1", " ", "y1"}], "+", RowBox[{"C2", " ", "y2"}]}], "/.", "\[InvisibleSpace]", "%"}]}], ";", RowBox[{"y4", "=", RowBox[{"y3", "/.", "\[InvisibleSpace]", RowBox[{ SubscriptBox["a", "0"], "\[Rule]", "1"}]}]}], ";", RowBox[{"zu2", "=", RowBox[{"Plot", "[", RowBox[{"y4", ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Black"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.4094000765526705`*^9, 3.409400084400671*^9}, 3.4110434235572*^9}, CellLabel->"In[14]:="], Cell[BoxData[ GraphicsBox[{{}, {}, {GrayLevel[0], LineBox[CompressedData[" 1:eJwV1Xk4lF8bB3BLjZlhmEFly5bsKVr1w32K7BGRFlEIEUq2mFKUJSkkpEKl LJVK9uR5QsguspMtu2wzY2t55/3ruT7XOdc513Of732OjIOX5TkuDg6Om5wc HP//PrnmQFB3CtJxN34i1PNvFipbpU1tpE+A3eWzapO0OfhXVRYqLX0eTP49 szq3ZQ6e4NFS66WvwO443eKAQ3NwQdvXY0kqEsySow0p4XPQuuYaPyf1EJQk X6b4cM2DX7Xkjtn3yVDyI7z3AG0exO631c3oPob4ARunX1Lz4KCMuKdcUsF+ k2/VmNY8BLzmLV7oeAa5O1yeufnOA0/PkMKMVBa0fjiQyj84D534J9/p8SzQ diGlEX/NQ/bLpIqp99kgnK1vP746D2beZvaTuq/h/p5DUieFFyCBVJIw5vIW 3i8OH6XoL4Dg4xqu+Y5cqAoakRxKX4CntamXpqSKoaDGUDfYYhEYSfnKP+4U w/JFmreb7SLou9QNf1sphnunJSy0XRZhmnvJuqS1BEYZvGXJ9EXYp222PzK8 FHp54kP3vVyE5re/uRRmMchImPKRYi6CIJDsKGo4dCRXcif+XYT/5OP3hzvh EFZTR1/mYcBdRtZiYAsOon5Sr6+IMWBX7PdzDq8+Q3BWgUOADgOCa1WN1e0r YPrd+PYbIQzIfF8o/+pBBbQ6FIS/uM2Ab0kHubfWV4BQTUpKfhwD5FyOl4po VkKP6qrPw2cMqOW+qcYh9AU6v06le39mwEbtHsGmqipgEVNtb6wxAMk5zxr+ qYIxJdVPHlxMOM87X1e+sxr+Bbd6GZCYUNpFuFWQVg2vB1SUKjYywcFPY+lJ YA34dZl49+9gQs7byJ4LarXgw/V7XdFZJkwKTt4xPlsLnf1Tx2VdmKDgZ6yj GF8L53rKkq5eYEKaFu/T4ZVaME7SlObxZ0Lc1zvOJ7/UAUFhcqtrFBP8hu/N G9g2wFbM2efieybk6s8923qvAfboPjebz2fCbNYRK+7yBnCO4hNzKmGC60Va YZlCI1wzCimXqmDCyT9x9N2LjXBWkEKcb2VCKm9dKO1QM+RJrsUSF5mgox1k e92uGUjHmMlvWUzo9VTZPevfDNafNG4arTJB5FvUaH12Myjej9txjJMFsUmm RhHUFlhJe0tv42fBjtrfMktKLbD/gICwsCALGtder57TbYHDIpt+629gAdme 8lrXrwXkrAnMMHEWhG5t5P/X0wKrEUSeSwoskLW5NubBbIGEP9VppsoswCPU 8F7+bzC33WxJfBsLfk/dvVRy4Btwx94WSNBggW+ueZtvBns8y/bUihYLXKDl 4bR3K5x86/U83JwFHM9YJT1RrbBtZCwp2YIFSeskemvTW2Hx/M3IZ0dZUPPV WTKrvRVIVSG3Y21YoGj1+9m5/W1AK9M6PGPH3r9AptLqaBuY1HadzjrDguOi Bj91L7RB72vCl5MOLIjoj1WQTWkDncbeiifnWDDuqvC6n/M7vMQCS164s+B6 nWlDg9h3MPs4VUDxYIGImvev0p3fIS7/qIO7JwsMF0t3PDr3HYx8zszzXGLB gPWQxe1r30F2On5S35sFAUU8l68kfoeFuR+fgi6zIOuqZb7N1+8Q/dBuc7Uv Cw4O+LfrD32HNoOvZX1+LOg++GRp9xp7/U9FTpP+7HoTxzWFt7XDt1GJ8Z9X WPDMjXKKW78dvlt5d7cFsmB/gwZ9wa4dKFv414qDWOAWd7WsOaYduMB5zvkq C7iYz35gWe3grvG2S+0aC5JtajjelrfD0UUbsRm2NUpmZFJ62qF+Y3Tp02AW 1EoI6UYz2qGf+1Kt6XUWOATvc6JTOqCCW8LsF9urg6dvuct3wHrLxxZhN1ig kpFZbXS8A44PbeFIDmFBJalxfN+lDvg3sgHbEMoC2wuLJMXbHcDfnrs1gm1G o4jKpucdoJzYoT3P9h11HVNCaQd0H7ehWdxkgVy8owezrQPsstayMtguZUXc HZnpAMvQmzQm21Ynct62EjpB2TbTQvMWC6Y/tjaXS3VCqIawjw/bNyVX5t/v 6wTrx+4hL9mWuCEp9NSiE0bbDMOa2M4b1t0V49YJJbVakbNsm+qftw4O7YTt 25riCWEsGMm86+f5uBMkAq/lCrNN581LPJ3fCbt48SlRtoU9u4pMGzvBcAuH 8Ua23zT/7fpvrBOc1562k9jW3ym3pszRBZ1N/5IZ7PX7HxhJiIl2wfK0W1o7 237LntokjS6Y/agy95Zt/lPxdsvGXaDVdOP+dbZffioOHnPsgp2zz+8bsq0j /SOtnd4Fh+TxFR6220PWlX950AX/Naw1lrHr4flTaTgvpwv0Ei9LeLA9YNdF /Py1C57vjh0is320M0KtYaQL9D3181PY9a6y2GfV9a8LDmYKpimyva9u7MpP sW5IeHA+J5N9fq/0ElPnd3eDmd6HKUm2Jcv0v/w50g2Ptps6RrHPm/v9C+rG 8G6Q3J6uZsDOg5+y9R7ZZ92wMD+UlMDOz/jzdbZqn7rhnNdFt152vhoTHDP0 F7tB7vOqlwk7j4gq1GDJ3wMvYHOJD50FHyLLF+yUeiBruisxnp3fJLqMjr99 D9zLWtQsYuedzGp2DA3sgXU2ksKlASy46nU98t6DHjh259qbAnZ/ODj8aMuo 6wGVSW6jGHY/qRo+ce/c2wvluvVm7RdZkPLZNHbEshdefUkyi/ViAe2/3wVz Hr1go9rsoMvuX9a2U1yk9F6wmz+6cIfd75+FRB9qUvsgQPFAcwH7PtgVXVN2 SKUPLmpDgooT+3wIASMW+n3wIsewIpF9f9xZad/uRu+DzdcFgo7Zs+DYj/iq 5PE+iLTTC/I8zoLJbCpjDe+HiWVrD5oRux/kcFFibz+Y5PJbcBqwoOmJFwgv 9QOv8CfNCT12PmMab6tu+wE3WKroKWJBsN8dmdMPf4Bx8UflD3vZ9ZC5qfBj 3wCIyJulO8ux7z+t2O3XDg3Aop3tAkGWBWHHU/ZuthwADfU/DWlS7P6PKTI4 5T4AM+JaJp/F2P37d9ql48kAtESqKRVQWTDVa53ZxDUIC5MyJb5rTKhPUlDC 6wchaet5+av1TLidt0vdvmsQ9u++2W/7lQmGzQc0//4cBKpOEtfeKiZU8tga af0bhJpHU5ndGPs99Ys5X6Q+BFHnq+QGcpnwxmol613CEPTe1AqaSGTCXWqd 8tMzw3B41594GTsmFO/dnG/mOQzl0cYrpJNMGLHzgt9Bw+C64crHaWsm/PdG yMomcRjeL1zxf3qYCeNGtlcpjcPw6eztlBotJuiGzjRd+W8EyghhG4XFmLDM FPC13PgTKkujP7U0M8Chxwrjrh+FCZ7fdxx3MID8aNDjUtcoZDyd2rBThQG5 Jz0lfoyOQqu0UtPfrQzg7g6/UsI5Bm2szRO3xRmQ3lmy89LeMVCtqrTxIzBg 9Lt0Zv+zMZDcbcxK6VkEt+bpmOIr4+B7UH7CNnQRLn256eClMAlTztMVWV8X 4P1FvqMiRjNQtFXJ3N16Hp4GuU/usJkD17x2ZaLFLISk/rZgTM9DLs3vv9VN 08DROoBKAxeBLlil+nJiHOR9nAOslNl16o8isa79hBFm4jHeT+x3jkSuXjo7 BMY/3a7GXVoG08F9KxtQP5iNxKhISq6CwniWsZVcJ0xWOFyvebMGldIGa39L voEarX2zrv0fcNJxjm+xrwUyMM/2Lv6FEY4Svr/PcDCYObkka82BiFTr8NKe bOgsd+I8qcqJ3j34YFVYfB/Lj6i0k2ZyIpEa8wEt/XzMeb3vQGMjF1oc1cux 1anAHL2D8vmSuVGZ0mzhgl4dtt1FpdH07Drkl5rR153fgjUJqvL6aq5HNaVZ w3tD2zEdD4+JR1rrUennjxTdhHYspzqnuhzWo4M5y2LHs9qxu3T1m1T99ahl nLQtrakdMx3d8+eV5XrU+GfiWLZEB1ZbfGB2yH09auLq1Csq6sC+nLFpPZKy Hr088fSgyUon9jEn5JEqNwFZDRQpyzztwQim1mKJBAKKlvXFlYp7MIsJhYec ZAJaPbEnUq+lBxvb0pDQTiWg8HT6nvecvZjQw01x1yUJSBzzeOTm2Iu5h76O aNMkoE0FM+OByn2Y+PF2X/pFAmpslI9eV9OPOTMzGaOXCeha7OWSB0P92Pu4 oMsW/gQ0e1mfrv2nHzNokL4kf42A2g/ctWrR+IFdPuh+oTmKgJLfPQnhT/2B 1alyOMplEJDGgXw7Dp0BLIhT+Uh9HwGJylqleMoNYqN6vJ3ygwR0gRy6n3Pn IHYkYtr+xggBBWovKTw9MIjJCbz12jNFQOVHNhmR7Aexeold99KWCUi5VHiS njyISe7TafQR4kEjKmdk1wkPYeWelqabjXhQEbeWiorgMKaau7PN35QHTZ3u SIyVHcYSmMK238zZ8++e20jcOYy50zvcw4/xIJGR2YytVsOY8G3bqHlHHvQy OaRoa+Iw5vzCufbLNR50KmlHpZn0CEbuDTT0zONBQ20S7xfhJ7bHP4tyr5AH JWnY65pY/MTOCnZ+e1vCg3o0Oe9+cPiJFRnuPj2P86DCSwfTC279xJzzZy/5 NPAgumsGiqz/iX2+6/QocJQHBcbyDl0+PYoFHDD7FSZCRKOTjys4osew9F76 hwxxIhrM2ZvyKG0Ma/J/FVAjSUQjqd/EjfPGMPkcIjd5KxF52Sc4DvWMYa1i FZui1YnITCN1mEt1HFNj7D1w35iIMjX0JkWbx7GfL2XiU+lExMmd5mejOIlN 3xxc4b5ORK7C934HoklsweGpvWsoEXE17Q4uPj6JcUjJqKjfJqKH8cfJEZGT mFiidHl5Int/s01qXtOT2JFwqbmfuUR0TPV1z63CKazUZbOp6gQRvSC2Xux3 nMEqDvW9j5kmootcT8jZwTNY7ZYnm5izRFQqxOv24NEM1vFDYvgTi4j8eAo3 17fOYAs2EoHm60ioYOlX76dDvzBFQ/FMbykSUgh67tmxfRaLVxRdV2xNQiKr 7o3Ee3OYrZ18xvBxEvoWHH+NK2UOk4vfacxvS0K8S/bn+N7MYXn/Dsc4OpBQ 8/kiWYu6OaytPUSC34uEBIpsL6cR5zGhW9O7HCNI6NDfiDMuYfNY3CB2jvKR hGi7/03I3FvATm5qIO4rI6H2irg7hmkLmOzh7lcOn0loOCB0/Mb7BSy3iDFf WM0evz0ns61tAft2T+maQxsJFdIeMl3EFjGazv2EwhkSKja+tS8kexGLSXau PitNRum/JLVGuxiYv1/IZfoWMloVtktXmWFgdpYpUonyZGSoMv35FgcTUyW3 +9erktFBn2D/AAUm9vXKIcW9mmRUsLfT+KQfE+M6IRfJZ0lGZpF/v24RYWG+ m4aMC0PJ6MUF+cM+F5Yw28U/rJYwMvLxjam7GrKE6TWJPp+OJCO/Lp/fKUlL mGC4xZpMDBlZJkn2KH5ZwnJY+Ks7j8loMU3c5rTUMjb+PZXPIZ+MUlfkZ+07 l7GT8acb+cbIyG3e6+Wt06uYxAeyuPskGREurA/vD1jFfrQUunydIaPzOsIH beJXMScBQc4wBhntan3XmVm3innertr5j5MXVQ5Khjf/t4aFXN/+cF6CF7nj bjaWsr+xrAucTu2WvEjmcl6OMukvdiEq592uY7zIID+yrlrxL6aWfepP3Ale NJryOibS8C+WO5afYH6GF5185lkYFPEXK3Vw+1rjwYu45AKXJcn/sObjrWof I3iR6EjC1EEyB76s92IltYwXaY4TB69v4cTpH1NDKz/zIvojkknkLk6cQyOZ MlHJi3I4TnGnH+LEeaTuyWjU8aJzfa+zqK6c+MaVAKPKDl6U+ry5p+YNJ77z jenD8TlelNuYE/JFiwv33MDYp76FD+nknSkMOM+NL0T9KreW50Punh9OzdG5 cV+uCdNAJT6k5OFfSY/hxumzfWcqtvOhArfMPW2F3HjU1+oIay0+ZFuxNB7M sw7PvPqo84o1H+qLvy7el70OH/55MKA8nA8Zfz2w34CLgB9MbXymHMWHXv3x Dj4jRsDTjp9siLvLh0re17o80CDgdnWXZB0f8KGWD9uTLB0JePe7tHru53zI 5lda8eYqAv4t6K/0oTI+xLUjx5UWy4OX00q+VjP4kHri/lgDbRIuU3eIsX2Z D+nX1MRTT5Dw6zdbJJPW+JBQo8+WFR8SrrM0ftmVi4IUreqdld6Q8JLeTZIk KgUdq8lQJUuR8dwMX29jFQqqF1A4OknkxZ9pq4s3nKWgXEbSOREWH15uRg5d c6KgrkKPMaYQBR+yH55UcqWgiYNmxQvqFHxLyIOSME8KmrQRqTL2pODpVSsn UBAFJVzL7vAfp+AvzMuTPsRTkLzOfMPAED+eefboxuRqCmoJ3Rx8LoCK13ir XquppSCPRvpVl0gqPh66fpTVQEH9es7SQclUXPFlYf7RNgoyoc8mdJRS8axJ cWvKIAXl9d6VcuGi4dmXR+5fX6WgjuiWuNkYGv7mli/NZRs/6uCRjJEuFcSn tU6H3NrBj1I4C102NQniqgy9xec7+RFzwcxSZkgQz3YQ/j6gyY8yF6JfehKF 8Ez4kHRSnx+53OnbN28thKevzEmZ2fOjeQ+RtBcMITzZ44La7lh+FPpjh4nJ gQ14t5xV6tF4flTyMimk+tgGXLT3P6p3Ij/6eFVG9MSFDXiSMe9CzhN+xFj+ 9640cQP+QCE7XzGbn52PHW/CZzfgMYNjWhIV/GihyVxY5/lGPNza0YSbyY8S l9DnYnER/Jl5r+25ZX6U8PjEa5E9InipkbVn9Ro/8vOuLLl/RARf0DaIjeIS QMlGaTn9t0RwW3mVDiGqADLgXVionRfBNZYWHORUBNCXwRmdDU2ieH9SSOCh swIoOuX4kX1p4vhK3FpUhpMAwt8q7bMsE8eFo32ekFwF0AsFna6oXnHc6IYz 3uApgML67XA7UQk877wx4RhdANXWmQeExUvgt/cLxjknCiAb1dLY5ZjN+O7e p1nhDQJI9V9tn95zKZyq5rr8tlkAGadt/mxQIYVPB6sZdLYKIFszr9Lzw1J4 +paPI4rdAqhnQilvvaA0LuzeJlU7KoA6w8xMnI5K46t0bhMCBxW5pV81l+mS xrt493w2FKWiTe6Htv+dk8Grdj0c7xWjojf1Zx34uGXxvNO/BS5JUFF7/o4p lQ2yeMzbcruHUlT014awP1VTFjc8av57YisVcecxLx8PlcWLkl33RmlQ0XI/ pURWbAuepPToTYMJFU0aeXLdtJbDGYv6L0IPU9Gazye3e+5yuHnZwmNNcyp6 ytoR/P6GHE44anznhSUVCadmc+zPkcN96StuV09QkTUhr8COuBW3bLJR3OZC RbShKzmkz1txPl/h53dCqOiL63mXYD0F3BXw5IM3qYhy+NHZ26cV8ArShbjl W1QU+fxrbY6fAh6YUnHDKZKK5Nw0DfSyFPCJau8zWjFUtLvZMiBdQBGvEmvZ PP2EilaXNl0xG1TEg/HoJJNiKnr13bRjIUkZn+zD41dKqGj9BzGP73nK+LG1 xZiMUiqS+lji39qsjKvuORnJjbP/b7bZVJakgne+kg/8WEVFhwsk0ylBKrhG InZKpY2KmlBS3g4nVXzUY16Sd5aKEo+8/nrCVA0/LG79olaOhvK9bhdwaavj SSNq+Cl5GlIRDo9KOKyOj7wh9kwr0FCAKYeWpp06TkelVAEVGgqzMrd/FayO vz63hX5UnYaeh0Zz6FWo4+R385a92jSUbbvtqMVhDbxa7y7Hr2M09CBi146d HjvxA57Vp2iRNMQ6v2HdRP9ufLVzQr/yNg1lbIz/dIy5G8/T5dPwv0NDWbqP qtlZweVFLYh992io1Vtoo7TmHpyvsjsvM4GGrE/aP3kbvwfvFP1FQek0NLt8 I2LSfC9+8Ysw7onRUPPM9sNWHfvwVAkHuXomDc3wrt9qoqaF79+pouawREN8 78Uiyg218DYjxt7lZRqan2nqOOKohRP9w0zkftNQuJjXzdwkLfxiS7Y3nUsQ lXFFEu+s08ZR2CKuKiCI6NHrHmQMaON3e5zMTcUFkeeWGe+Ujzr4/wCfzduS "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"x\"", TraditionalForm], FormBox["\"y\"", TraditionalForm]}, AxesOrigin->{0, 0}, ImageMargins->0., ImageSize->{361., 95.}, PlotRange->{{0, 5}, {-30.732886488814465`, 1.4077395638457348`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{{3.4094000726746707`*^9, 3.409400086698671*^9}, 3.4094001187066708`*^9, 3.4110436782651997`*^9, 3.4113558004118786`*^9, { 3.4113560421928787`*^9, 3.411356051006879*^9}, {3.4113560863568788`*^9, 3.4113560967678785`*^9}, 3.411356362346879*^9, 3.413806124789647*^9, 3.413859112350271*^9, 3.4139459865629997`*^9}, CellLabel->"Out[14]="] }, Open ]], Cell["\:8fd1\:4f3c\:306e\:69d8\:5b50\:3092\:898b\:308b", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"zu1", ",", "zu2", ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "3.5"}], ",", "1.5"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.4110438167972*^9, 3.4110438682911997`*^9}, 3.4110443577992*^9}, CellLabel->"In[15]:="], Cell[BoxData[ GraphicsBox[{{{}, {}, {GrayLevel[0], LineBox[CompressedData[" 1:eJwV1HlUjdsfBvDT6HLoIhLSrELoEirypIRI0qAklXORDEmkSeJWMjTIkKKU hCYNhpDkVNKsU6f5NDoUic707lD4vb8/9trrs/b6rr33s79ra7CO2u2TZjAY 0fT4/5x8miX/z95LayPsxu8yGAK84apbO6l7oVHJ91KAlgB/3paEqasHwnqu gBllKUAyO1pNTv0CxvlL69QjBThs6ndkVC0Rb6Ibfc5LC/G4uS9dYpGErBPU Bml1IX4esu4SeqbgmN7h52NrhFhfHzeftKUhTW1C/mk/IbhjB64J1DJRqfhv h2a/ECcrVQ1GCrIgn3EmbfynEHOuNtd+tchBVXfbQe8ZIrAWmsl88cyDcq10 rsYGEQJymC9EbY9gnaUXQ9JFmMB7r/tV7QX0zzJLr24Xo539ym/40wuU79h8 6N4+MbLuJ5R/KSiCykXN6r2BYtj42rgPWRRDztzGS5AiRvzEovhBz9fIj/nk 4PBZjCf+m32PK7OR79A0NPxTjKShVbPFp9iYGly+0GSyBN6c6Z4iy1KcuOJe Ri2WYHpSlbSwrQwvF2/TkPeWYEyhMNNnTTlcze5/dw6R4MPZu7aC1HLkJj20 2h8lQaHn6dsjXm9ACUMYjzMlcFluaPJtrAJzKhcW6fRLcKcm5dgXtWp4HGLI /rGgIEl4urA3qhp1Fuxny20pbPCs5Tf9qIavqFqg4UphWGbUsYhbA9aJ4tuL j1MwMrUxuRBZh9MyWhozblO4xNwrPiWpwyaDpRt1Myj0dATm+Oyph2nD7uk/ CiiEn7yn6rz6HdLrpaR5byhw8saldUca4MYxr8wYpDAdE92mLOFAqjA/vXSE wmqdayaRezkoePKyPnmUQowkUxzUyAFjUs/KNHmC5zxDjmRCIxiLtkbXTiHo L3ud4722ES7Os12LZhAYxrXsY2U3ouN2YuiQBoFbgId5V38jcnrMevX1CCLd v6juUG6Cmb9x/colBJ2LpdqtIprQvI61664xgczMqCflL5tQHCQ1Lg8C/XGl OFNRE7KXdi0yXE8QWqO/+R93Lkrexup/3UqQUfBMJ/s6Fz1OMyWBdgRNCeYy 8+u4sLMyMWraQaDt6VysbNwMJSjNGnQjsLHhJ1w52gxrZ4+UdBaB/wpvv8n3 mxFmHBi6dD9BjUz4EoZiCybXeyrlHSaQDCkwg6xa0K+y5VH6UYJ5TYmD4tAW xCep+3j5Emx4of3mSGEL0rMHXv86QeCTmpc6ONyCSaYpU1n+BDcjTUL2aLUi 6Lw9Jz6QoNy7YidvZyuM7sw6nBRMMOxou9LxcitGxFNsj4cQKJnypje8bYVZ zsHBuaEEZtr7Rzb9aoWTjH9S/BkCL6awtmx5G+YGXGvnnyW4IgrOWHOwDWoi yMqGERR3yEcUprbhe8OMyFHaA+y4PQZtbejpb6gsCSf4O0NlbdaUdthst9N3 iSAwin0wR3t9O9xPps+uoc06uWw0Oagd5259FyucI4ja/Yo7q6AdrvkPVRfQ frp+U37cYDvUh7ePK9PuWcSNYqp2wNvj3rceuv4vRTevCIcOlJ1K2hFMe9nP T5Z/LnbgSBjr2jd6/139xzUDSztgI9g1wZh2eNXv36LRDvxu1FPYRZ83N+8C 7/CSThTPfCDv+B/B0PShqM17OsHZOStiDX1f3ZOb1+pd60RMV85jKTqPvR1Z I3KVnShKn9adfpogdQ3zDv9HJ5hxrC06dJ5dKYfsSvV5iOEYbDpH5z1bpk4m xZ2H5/ZhKhX0e1ypjtrvUsFDrrbOkT4/gnf6X2cZfeeh/Ul3wKvjBMzLW6tn LurCW/ZQUNAx+rw7FPQbL3choVM7+DrdH+wX3t255V0YTUqWlXgR/FJpiIki XXCtlLu13JPgJD9WuNG1G7KFb/7s2EPwaIMgbX5sNzi8446r6X4cybR1kCnr hlJExVupXQQHfKY9K9Htwa3NJXIrHQhcfl05tULcg8dsvoqFJUG8h3ixok4v XqzqC8I6Am65fa/AuRfKcc5jaqYE1hdnmOeU9CIkLsEtxpAghVkbNs2yDyw5 aV9dTYK1psGuZ9z6MP+/jKwt8+h8vBetGPHvQ3iAncBRmUC56dJAXVYfso+N xs5TIIhLsLY6P7UfaTbPz4V+pxA2/53CH14/bHyCVrGrKGg6nR48QvXj7uOs 1R5lFNjnl7C7FN7j6adtzZ9fUhj/EnOsaN17/N6ZdqMol4Lfo23Nfg/eI/Zv OS3nqxQ80Zg47MvHkHnh5HxnCow0UsS7xIfxjW5rve0UEmRVumrS+QiJPjQp xopCVfV+1cxWPp4pZxdomlDQcxhP22fyAR/vd17ym0Ph0wHdnB6pj1iupec0 2CbBwSshJZzLA3iqlaOislECaSqt93XmADJsPT5cN5XgplMVI69sAOJl/ubS hhLUqChaREsGwHV6Zf9YXYJFDzIqrZwHYSrPeBn0Q4zhl1xOmdonhAeHuL7K EMP74wL+k9zPeBSze/X4bxH63Dr+Kq3+jBnjDI95YhHs288vqf9AW/gxafmg CEa1g4Ef5wyh56kLQYMIMgX3pipFDqGvxdy467YICac01vq7f8FwQ/lD8zUi lCrOTjSe+hVvTR2vPfMRYpJGuG6vkQBVPgtzGTEjiJlau/COhxh1bv5timqf weI5vJapo/+hnaVViZbvcawinHVU9yfYH+X4vEntKPCZbK9s9Qt9Zbs9FmjW 4k7woSEDJ4YZY1RWf4vlQxiwJ36P3M0wO7OvbcMTwxywZTPkev+lvTLRvlo7 G33RH9SjfWh/3cIclc+Eaupup88X6Pr3Wrbu3HTkfhjba3aZXg8Yc9GpugvT BTd9b8TTFhd3JrxKg+uj1mjLu7QbkgWhWamYyF2pk5lB1xusYhhcTYFXBTOP l0t733nV2bHJ+B9yyHyT "]], LineBox[CompressedData[" 1:eJwV1nk8VV0XB/BrHjM3SHFNhZQSUqpnG1KICGWKSxJCExKpGxWJCOENoUxJ A6GnwjJmniXDvYdkKM0USU+9y1/38/381l5773P2OffIux3ff4STRqMJcNBo i78NbqyZ/ww5CK1lco+b/w34kv/+y6o9aJm+1JiyeBDRXCPUYoPWPKLmEJ8E UQdWBIVHoHe8M78wcQfCMn5bff/IQYgGV/e3rsdgufHfk+tmOEjVv9MKAwZF IFt9+obbPNZ//rb15JMieD461dnJw0nItd18JQnFMK08sO+BLCeh/b1heMWy BNwKS809LDkJs+b5kN+Lp6D/zM+k/8linuQ0dqASaD0jpDyYi1TpCA8U2dTD pfeVWcEXuQj5Wq8YG1EPArR0zq2RXIQ5qKGl/7weJNbb15Xe5CL0pwHvFeVe gnJE1+5Hj3F8iC9zfOIlmOrVWNyZ4CIMayGGp18jJNy96xS5n5vQOGguk4da YI2/R5CNGg/5Ki1Y5+LaCeu3DVtnbOQh9ELbPiv/TtCi2WlM6fAQ5v4O0c0R nWAQbTJxwZCHWFZbL68t7ATnbHWb+048pIpDZ//KuU5I6p3W4IzlITQ606Qw sgt4tC9MPppB37658mZGNwgvzNX8muchjBKyJeRxN0hUn7i9i8ZLMi9KBVpV dwPd3M12SJiXVK1hn20f7YbtR3bV8q5Bt+edEVLuAf+bQhmH7HgJc1mWXkpu D4z9SD4gVMFLGAcT/LVu98Id/c2n2bW8hCZo43P8YS+4xLTHPmrG/ncLplIq e2FQiafJuh99I+buU6oXuqxP6aXNoH0M5JVlX0Fl0V76ejU+QpdKVmz63ytI 9uWYskjmIwzNrP6QS31g8yyNV/42WkJhY2p8H0jw6CrOZPMRWtNVy4LMPrie 5ueUXMyH84lLpZT3waWWofbhNvS+9orimT44oVr25AQ3P8k0PGD7yfk1mI57 h8af5Ce0J9G8Far9YByqWGgUxE+YxtGTj7T7wWApa3D2PD+pcpS3T9Tvh227 zHUdo9FrhCQ17ftBLUdjRjEPXes6Vh3RD0JHvnuWsvgJXVVDUG+0H1rHQm36 dwuQKo9y657oAWg8pxMeZSFAaDXqAoLJA1An9aVouy3mS4ZObc4agHIjhmiW mwBh7K654lw6AIXZBs1eoQKEGc0qWMYegBh3PrJQLEDo5FThMrVBsBiLWycr K4jnLc8o4fkgtK4b63VSEiSZh4Lt0msGwez0lvOpaugN3zvSmgdhDyfVuWKL IKHb1PKcGxwEA/q6QElLzE+k7yufHwRtp/oq/jBBwrzCd8xUZwhW9c7bzowL Esac5vPWvCG4JWP+d9NHQUILWXcr7uEQSB/OzD8xjfP/Cv7XtHQIlk0bL3z6 g/btas6qGQIxscTMd8uFCHNHEY3FGgKuvRs+sE2ECGNJWsgVURZM1boxGx8I EfoZ7pA3viyQu9Hvfb1EiNDKU+5Pn2aBjbOFrc0LIUIeqNnNn2VB5c+taiON OF61aNfkZRbErxfvnXuL45ucbYzTWaCXDGvXrhTG6zlmtKKZBSfctSU+0YUJ gybz61IHC3I33f9dvFaYkHdm9yd7WSDWmtS1U1uYjNhLy8cOs2CM5hdywBLd yalz9DsLor1XdVy+Ikxo23teGaxiQ/WW+GdmMejhhzMS8myY5ebPFk/EfvnN VweU2cDImAlKz8Jc0mqHqQYbtHqbFUrLhQnd737Sc302sHecDRybFibMnY0P 2e5s2CDet9rQZQkhdZWxrtlsmIiZCLt5ZAmhZY3UdOaxIV1wbnLy2BLCyG0J 1L3PBmHuFcXRQUvIiJ950LciNkzN2hv33VhCqo7GXRIENuSw2H5edVi/UaGN /ZoNTvafe140LyH0IeOa14NskOr7oyvShfVH1iY2s9kQ1iHH9YSN8396Mnbr La6/xjX59yz2d2b2TXxmw6r8cYhVFSGZ9+4Mb+SmoFdpVmlUQwSff0fygpeC a1m8UVo6IoTG86ZvpwAFv26ttRkwECEMov1ikwgF/TFe7xScsL4gdP7lcgoS Tn8SK7suQsjkKr4SVQpMv/4XwH9ThNDVFyx611HA6Ssy5JCK89kMKnxeT8EJ D42cv3kiZESjLlxEkwIL+5NbTaqxf1ddBec2CgT/+eHKmsHcdVVOxR4KgvRV +Mt+iZCqVqUP6aYUTBg6PozlECUMl9G/gXspqNlT/ctAVJSMpF54JGlJQfD+ mIR7amiVENbcAQre2VRtDd8kSkgz0zzDjoIDB2eGnXRFCW1gqOofBwo0nezV xYzRz1c0HjtEwYcjyvWBrqIkMz5M8ORhChw87Y5ZemJeo0jeuFPQ6H1NXO24 KKH/qikw9aAg+/i3Q+xzooSZzasr4EWB09mKWcMUrO+WfqPtR0FzyNe01RlY r7LD98RxCnTPKxrO5WC+XJyRfYICqfCrsQVPcL32jvE/T1HQGm2rIt6B+3NM 6d1/hoJtsZHtU6+wv0ywvn0QBfk3XvjXsURJ1dPmXfZnKbiUJF99Zgod0aFu HELBdIrNUatv2K/hsszmcxQwUiOWrPuJ/vPwmXQoBbKds+pfOMXIyJjWqt7z FNhaidGceMVI5smAj3kXKIjuVu1pFMC85Gt4ABPvf6/T2TtimFdo0/9cpKBv oKbeVlaMMLLOFddfomCJIyulRl6MVM1ouHpepsCI9eOYhjLaa56H5woFxZSK hIA69rv2Y496BAXvXQzGAzRwvGXxdBma/sbx31FNMcI8/r97epEUXH973bl8 K+Zy3babr1JQ756/SXUHzq8YdyAX/Xu8mjuJiBGat1WIZBQFm48OveY0wvrP NU3BaO933wuO78Z+HNd3s9BZXiLnWaY43tDu15ZreH6n1lqZWOD6cmsnY9C7 PznMKdhivnsmUiWagttS4T0X7HB8JFPKB/1d7/4jlqMYIQpnlQvQpod7rm11 wfkD6dWj6MyohaNJbphfLPu4NIaC2SJFo5kj2I995oEh2nzAjG7pheurTef3 QWfT/H8X+uD1EHTmikX/WpvWL3AC16P+4U4h2nJfXYnHaazX9/9Yh84N/BhX G4jmUx5/jf6dLuVLDxYjdJZy/Djaun67SWgo5o2pPz+hCz66Kw8ycf7T+au/ oWlSMRxbLuF+NnnzfkEf0CtlJ0RgvrDwdBJd6MZ+9jUK1+MfsGUIzRnFk2R+ HffzaepqE9quaP2pghtY7+xbUox+2G9rwXcT5/cRLE9C89DOq7mnYO7TmhOA dlqby1udiuNdnwfuQxdbtI+uzsDrRevfrITmD5ytDL6D+y1QHp3B6+ecLpv6 Ogf7hWReqUSX1Bmf0bqH3maw5hJa8KOf9Y1CHO/J8dIIzZBM1vj8COfb2uVN Qz/dBkJmT9BpWdJP8X6KuE1O5pVhvY7La0+0+1XROu7nuJ7DM/lL0WL9Lucq q9BpWqkMPB8efyPsZOrw+olm1//B81W+5rFWUAN60m95CtorgPZpUzvWN50x KsfzWZWm0nS9C9en7ay6G72szjLnQy/up+3rnjY8zzUSWYdyhvB6lu42a8Hz v2Jb01bOYewXdWuLIdrP9dtSl1Hsl1J2sgyfF5nH+u0r3i+eB6PR6/g8+ZuP 7oyexf0wenX5w/D94S8o834efS9vuSM+f/Q0zbld/+H9NB/zuofPZ9tU2KO/ XOKkSm19iC4+v2siFemnxcUJ855NNx2f//4adw4HdXHCGHaxlg2g4Kv+4MpQ DXFCZnuE9fwp4Kvep5WpifUXx0VtTlOgA9uOTuiiA2w4Qk5SkPhCrO3ULrQp 32yaLwX7SspTrjljvwYTI60jeP02axY/dMV+cmZGy/H9eL44r6XLXZxkahe8 nHXD8/U4/s/yY5j/YTDuM/B+PvB0zz6D47/s3fPBkYKXOVIbK+LEycjxa5ON VhRQSlEmIwlYz36TH4Dv8x93/7pxJWO/RGFFuX0UKN2ZummSLk7o1Pp9nvj+ D7tdtfDqHu7feO/bHmMKdib7NHyuwfqplQMSehSURtY503+gc7afNZbH96dp y4qIn+KEFrcx/ZgcBbeEu7s/LeD8zTtdYlZTwIwbNn7BKUEytXa0vZSmYG/K rw0HxCRI1QalCnEJCkbzNv69tk6C0Lm1jYU48bw1pGXMuUoQRl2oVt4wGzx4 Akba29EHKWmzeDaslGt6vdCFFnB8MBLLhnbd1R0qr3B8ML+UfwwbdHzqK8KG JAjT3/tIYiQbeHuWpuq8wzxHzPXFefz/zyyzvc0hSTJ/1C9ke7NhTO9ns6+W JKE7azn8JGw4fCqkVPiWJP5/dV5a844FGkfXte91lcL/n4A34Sos6JBQFwrY upQwd71lhu8aghcPw1LVuZaRqkYVDSePQQjhULNsZaNVM/NW+w2AICt4j1/J ckJzX9uRF9QP47nyiRnnVuD3hdomz5uvIVFFmvuZrTQhodFuzLt9EHfLo8GV vhK/h5vyXza8AofEQ+3CkysJ88LeD1ZzvfDTKGc+o1KGMO09W/pW98LbcYOg mohVhPndl3nPsQfu7Ngk0+a6mtCsuCR5E7rhweUA8aPrZfH7U+wj35suiLA9 bMb1Q5YwQ7oEdup1gTYr615Emxwh0zZZ83GdkKKa+qDNjE5oxyuiY350wIWq mBSzZ3TCbHrktKemHcxlbHOaleQJU7C1jeS2gb5fg6P4VXlCs2HuMCxshYxV bkqtPzDXn/4ns7AFlGrzkiwcFQjTJuHfzJZmiFtfo9ZdqUBoGsmC0gtN4DHD 3dWkpkiYJRZ/wpSbwK1omn41VpHQvpsrHPRqhMZm/vDy34u5A09ZfgP4GL6J a1q0Y05BBlqs/NntvkWrrbC8irZ74P3866IPBaY6oSdjW78p/YeektLiQvPa xjFiFm0y6GOZ1wCGw8t3Ov9BD4X/nsppgImDX82OoWmlPbm96KjORvugRVeY WVWiu6vPBsQv1tNLcm+g3bKHCl8u+q6HtS6a6ZUho/EX/cqq5HJ2AyiNnlHd jqbVKroeRzc6WG4xWcwHVovYo8X2clgfXswdojzV0RkbDkclL+YlRnI9dxvA IE8vJXvRKQfbytETclK5RYv1CfEhuegN4vXVLYv5a2b/WXT31fSO/sVcVivi MDqQM5A9vuhIUR1z9MoQiw/Ti/U8kuM66MqZNfN/F/PsnYl09P8Buuob3w== "]], LineBox[{{2.096284653963217, 0.021812128280755516`}, { 2.0982968773548376`, 0.020517362774826964`}, {2.104488333944442, 0.016546951388614062`}, {2.107584062239244, 0.014569372471592068`}, { 2.110679790534046, 0.012596874469140928`}, {2.1133111595846272`, 0.010924243968731595`}, {2.115269207731089, 0.00968198991077518}}], LineBox[{{2.1325124143331378`, -0.0011701387038050015`}, { 2.135600403307203, -0.0030970052198870945`}, { 2.1385413451872646`, -0.004927440940762473}, { 2.1411727142378463`, -0.006561335232423637}}]}}, {{}, {}, {GrayLevel[0], LineBox[CompressedData[" 1:eJwV1Xk4lF8bB3BLjZlhmEFly5bsKVr1w32K7BGRFlEIEUq2mFKUJSkkpEKl LJVK9uR5QsguspMtu2wzY2t55/3ruT7XOdc513Of732OjIOX5TkuDg6Om5wc HP//PrnmQFB3CtJxN34i1PNvFipbpU1tpE+A3eWzapO0OfhXVRYqLX0eTP49 szq3ZQ6e4NFS66WvwO443eKAQ3NwQdvXY0kqEsySow0p4XPQuuYaPyf1EJQk X6b4cM2DX7Xkjtn3yVDyI7z3AG0exO631c3oPob4ARunX1Lz4KCMuKdcUsF+ k2/VmNY8BLzmLV7oeAa5O1yeufnOA0/PkMKMVBa0fjiQyj84D534J9/p8SzQ diGlEX/NQ/bLpIqp99kgnK1vP746D2beZvaTuq/h/p5DUieFFyCBVJIw5vIW 3i8OH6XoL4Dg4xqu+Y5cqAoakRxKX4CntamXpqSKoaDGUDfYYhEYSfnKP+4U w/JFmreb7SLou9QNf1sphnunJSy0XRZhmnvJuqS1BEYZvGXJ9EXYp222PzK8 FHp54kP3vVyE5re/uRRmMchImPKRYi6CIJDsKGo4dCRXcif+XYT/5OP3hzvh EFZTR1/mYcBdRtZiYAsOon5Sr6+IMWBX7PdzDq8+Q3BWgUOADgOCa1WN1e0r YPrd+PYbIQzIfF8o/+pBBbQ6FIS/uM2Ab0kHubfWV4BQTUpKfhwD5FyOl4po VkKP6qrPw2cMqOW+qcYh9AU6v06le39mwEbtHsGmqipgEVNtb6wxAMk5zxr+ qYIxJdVPHlxMOM87X1e+sxr+Bbd6GZCYUNpFuFWQVg2vB1SUKjYywcFPY+lJ YA34dZl49+9gQs7byJ4LarXgw/V7XdFZJkwKTt4xPlsLnf1Tx2VdmKDgZ6yj GF8L53rKkq5eYEKaFu/T4ZVaME7SlObxZ0Lc1zvOJ7/UAUFhcqtrFBP8hu/N G9g2wFbM2efieybk6s8923qvAfboPjebz2fCbNYRK+7yBnCO4hNzKmGC60Va YZlCI1wzCimXqmDCyT9x9N2LjXBWkEKcb2VCKm9dKO1QM+RJrsUSF5mgox1k e92uGUjHmMlvWUzo9VTZPevfDNafNG4arTJB5FvUaH12Myjej9txjJMFsUmm RhHUFlhJe0tv42fBjtrfMktKLbD/gICwsCALGtder57TbYHDIpt+629gAdme 8lrXrwXkrAnMMHEWhG5t5P/X0wKrEUSeSwoskLW5NubBbIGEP9VppsoswCPU 8F7+bzC33WxJfBsLfk/dvVRy4Btwx94WSNBggW+ueZtvBns8y/bUihYLXKDl 4bR3K5x86/U83JwFHM9YJT1RrbBtZCwp2YIFSeskemvTW2Hx/M3IZ0dZUPPV WTKrvRVIVSG3Y21YoGj1+9m5/W1AK9M6PGPH3r9AptLqaBuY1HadzjrDguOi Bj91L7RB72vCl5MOLIjoj1WQTWkDncbeiifnWDDuqvC6n/M7vMQCS164s+B6 nWlDg9h3MPs4VUDxYIGImvev0p3fIS7/qIO7JwsMF0t3PDr3HYx8zszzXGLB gPWQxe1r30F2On5S35sFAUU8l68kfoeFuR+fgi6zIOuqZb7N1+8Q/dBuc7Uv Cw4O+LfrD32HNoOvZX1+LOg++GRp9xp7/U9FTpP+7HoTxzWFt7XDt1GJ8Z9X WPDMjXKKW78dvlt5d7cFsmB/gwZ9wa4dKFv414qDWOAWd7WsOaYduMB5zvkq C7iYz35gWe3grvG2S+0aC5JtajjelrfD0UUbsRm2NUpmZFJ62qF+Y3Tp02AW 1EoI6UYz2qGf+1Kt6XUWOATvc6JTOqCCW8LsF9urg6dvuct3wHrLxxZhN1ig kpFZbXS8A44PbeFIDmFBJalxfN+lDvg3sgHbEMoC2wuLJMXbHcDfnrs1gm1G o4jKpucdoJzYoT3P9h11HVNCaQd0H7ehWdxkgVy8owezrQPsstayMtguZUXc HZnpAMvQmzQm21Ynct62EjpB2TbTQvMWC6Y/tjaXS3VCqIawjw/bNyVX5t/v 6wTrx+4hL9mWuCEp9NSiE0bbDMOa2M4b1t0V49YJJbVakbNsm+qftw4O7YTt 25riCWEsGMm86+f5uBMkAq/lCrNN581LPJ3fCbt48SlRtoU9u4pMGzvBcAuH 8Ua23zT/7fpvrBOc1562k9jW3ym3pszRBZ1N/5IZ7PX7HxhJiIl2wfK0W1o7 237LntokjS6Y/agy95Zt/lPxdsvGXaDVdOP+dbZffioOHnPsgp2zz+8bsq0j /SOtnd4Fh+TxFR6220PWlX950AX/Naw1lrHr4flTaTgvpwv0Ei9LeLA9YNdF /Py1C57vjh0is320M0KtYaQL9D3181PY9a6y2GfV9a8LDmYKpimyva9u7MpP sW5IeHA+J5N9fq/0ElPnd3eDmd6HKUm2Jcv0v/w50g2Ptps6RrHPm/v9C+rG 8G6Q3J6uZsDOg5+y9R7ZZ92wMD+UlMDOz/jzdbZqn7rhnNdFt152vhoTHDP0 F7tB7vOqlwk7j4gq1GDJ3wMvYHOJD50FHyLLF+yUeiBruisxnp3fJLqMjr99 D9zLWtQsYuedzGp2DA3sgXU2ksKlASy46nU98t6DHjh259qbAnZ/ODj8aMuo 6wGVSW6jGHY/qRo+ce/c2wvluvVm7RdZkPLZNHbEshdefUkyi/ViAe2/3wVz Hr1go9rsoMvuX9a2U1yk9F6wmz+6cIfd75+FRB9qUvsgQPFAcwH7PtgVXVN2 SKUPLmpDgooT+3wIASMW+n3wIsewIpF9f9xZad/uRu+DzdcFgo7Zs+DYj/iq 5PE+iLTTC/I8zoLJbCpjDe+HiWVrD5oRux/kcFFibz+Y5PJbcBqwoOmJFwgv 9QOv8CfNCT12PmMab6tu+wE3WKroKWJBsN8dmdMPf4Bx8UflD3vZ9ZC5qfBj 3wCIyJulO8ux7z+t2O3XDg3Aop3tAkGWBWHHU/ZuthwADfU/DWlS7P6PKTI4 5T4AM+JaJp/F2P37d9ql48kAtESqKRVQWTDVa53ZxDUIC5MyJb5rTKhPUlDC 6wchaet5+av1TLidt0vdvmsQ9u++2W/7lQmGzQc0//4cBKpOEtfeKiZU8tga af0bhJpHU5ndGPs99Ys5X6Q+BFHnq+QGcpnwxmol613CEPTe1AqaSGTCXWqd 8tMzw3B41594GTsmFO/dnG/mOQzl0cYrpJNMGLHzgt9Bw+C64crHaWsm/PdG yMomcRjeL1zxf3qYCeNGtlcpjcPw6eztlBotJuiGzjRd+W8EyghhG4XFmLDM FPC13PgTKkujP7U0M8Chxwrjrh+FCZ7fdxx3MID8aNDjUtcoZDyd2rBThQG5 Jz0lfoyOQqu0UtPfrQzg7g6/UsI5Bm2szRO3xRmQ3lmy89LeMVCtqrTxIzBg 9Lt0Zv+zMZDcbcxK6VkEt+bpmOIr4+B7UH7CNnQRLn256eClMAlTztMVWV8X 4P1FvqMiRjNQtFXJ3N16Hp4GuU/usJkD17x2ZaLFLISk/rZgTM9DLs3vv9VN 08DROoBKAxeBLlil+nJiHOR9nAOslNl16o8isa79hBFm4jHeT+x3jkSuXjo7 BMY/3a7GXVoG08F9KxtQP5iNxKhISq6CwniWsZVcJ0xWOFyvebMGldIGa39L voEarX2zrv0fcNJxjm+xrwUyMM/2Lv6FEY4Svr/PcDCYObkka82BiFTr8NKe bOgsd+I8qcqJ3j34YFVYfB/Lj6i0k2ZyIpEa8wEt/XzMeb3vQGMjF1oc1cux 1anAHL2D8vmSuVGZ0mzhgl4dtt1FpdH07Drkl5rR153fgjUJqvL6aq5HNaVZ w3tD2zEdD4+JR1rrUennjxTdhHYspzqnuhzWo4M5y2LHs9qxu3T1m1T99ahl nLQtrakdMx3d8+eV5XrU+GfiWLZEB1ZbfGB2yH09auLq1Csq6sC+nLFpPZKy Hr088fSgyUon9jEn5JEqNwFZDRQpyzztwQim1mKJBAKKlvXFlYp7MIsJhYec ZAJaPbEnUq+lBxvb0pDQTiWg8HT6nvecvZjQw01x1yUJSBzzeOTm2Iu5h76O aNMkoE0FM+OByn2Y+PF2X/pFAmpslI9eV9OPOTMzGaOXCeha7OWSB0P92Pu4 oMsW/gQ0e1mfrv2nHzNokL4kf42A2g/ctWrR+IFdPuh+oTmKgJLfPQnhT/2B 1alyOMplEJDGgXw7Dp0BLIhT+Uh9HwGJylqleMoNYqN6vJ3ygwR0gRy6n3Pn IHYkYtr+xggBBWovKTw9MIjJCbz12jNFQOVHNhmR7Aexeold99KWCUi5VHiS njyISe7TafQR4kEjKmdk1wkPYeWelqabjXhQEbeWiorgMKaau7PN35QHTZ3u SIyVHcYSmMK238zZ8++e20jcOYy50zvcw4/xIJGR2YytVsOY8G3bqHlHHvQy OaRoa+Iw5vzCufbLNR50KmlHpZn0CEbuDTT0zONBQ20S7xfhJ7bHP4tyr5AH JWnY65pY/MTOCnZ+e1vCg3o0Oe9+cPiJFRnuPj2P86DCSwfTC279xJzzZy/5 NPAgumsGiqz/iX2+6/QocJQHBcbyDl0+PYoFHDD7FSZCRKOTjys4osew9F76 hwxxIhrM2ZvyKG0Ma/J/FVAjSUQjqd/EjfPGMPkcIjd5KxF52Sc4DvWMYa1i FZui1YnITCN1mEt1HFNj7D1w35iIMjX0JkWbx7GfL2XiU+lExMmd5mejOIlN 3xxc4b5ORK7C934HoklsweGpvWsoEXE17Q4uPj6JcUjJqKjfJqKH8cfJEZGT mFiidHl5Int/s01qXtOT2JFwqbmfuUR0TPV1z63CKazUZbOp6gQRvSC2Xux3 nMEqDvW9j5kmootcT8jZwTNY7ZYnm5izRFQqxOv24NEM1vFDYvgTi4j8eAo3 17fOYAs2EoHm60ioYOlX76dDvzBFQ/FMbykSUgh67tmxfRaLVxRdV2xNQiKr 7o3Ee3OYrZ18xvBxEvoWHH+NK2UOk4vfacxvS0K8S/bn+N7MYXn/Dsc4OpBQ 8/kiWYu6OaytPUSC34uEBIpsL6cR5zGhW9O7HCNI6NDfiDMuYfNY3CB2jvKR hGi7/03I3FvATm5qIO4rI6H2irg7hmkLmOzh7lcOn0loOCB0/Mb7BSy3iDFf WM0evz0ns61tAft2T+maQxsJFdIeMl3EFjGazv2EwhkSKja+tS8kexGLSXau PitNRum/JLVGuxiYv1/IZfoWMloVtktXmWFgdpYpUonyZGSoMv35FgcTUyW3 +9erktFBn2D/AAUm9vXKIcW9mmRUsLfT+KQfE+M6IRfJZ0lGZpF/v24RYWG+ m4aMC0PJ6MUF+cM+F5Yw28U/rJYwMvLxjam7GrKE6TWJPp+OJCO/Lp/fKUlL mGC4xZpMDBlZJkn2KH5ZwnJY+Ks7j8loMU3c5rTUMjb+PZXPIZ+MUlfkZ+07 l7GT8acb+cbIyG3e6+Wt06uYxAeyuPskGREurA/vD1jFfrQUunydIaPzOsIH beJXMScBQc4wBhntan3XmVm3innertr5j5MXVQ5Khjf/t4aFXN/+cF6CF7nj bjaWsr+xrAucTu2WvEjmcl6OMukvdiEq592uY7zIID+yrlrxL6aWfepP3Ale NJryOibS8C+WO5afYH6GF5185lkYFPEXK3Vw+1rjwYu45AKXJcn/sObjrWof I3iR6EjC1EEyB76s92IltYwXaY4TB69v4cTpH1NDKz/zIvojkknkLk6cQyOZ MlHJi3I4TnGnH+LEeaTuyWjU8aJzfa+zqK6c+MaVAKPKDl6U+ry5p+YNJ77z jenD8TlelNuYE/JFiwv33MDYp76FD+nknSkMOM+NL0T9KreW50Punh9OzdG5 cV+uCdNAJT6k5OFfSY/hxumzfWcqtvOhArfMPW2F3HjU1+oIay0+ZFuxNB7M sw7PvPqo84o1H+qLvy7el70OH/55MKA8nA8Zfz2w34CLgB9MbXymHMWHXv3x Dj4jRsDTjp9siLvLh0re17o80CDgdnWXZB0f8KGWD9uTLB0JePe7tHru53zI 5lda8eYqAv4t6K/0oTI+xLUjx5UWy4OX00q+VjP4kHri/lgDbRIuU3eIsX2Z D+nX1MRTT5Dw6zdbJJPW+JBQo8+WFR8SrrM0ftmVi4IUreqdld6Q8JLeTZIk KgUdq8lQJUuR8dwMX29jFQqqF1A4OknkxZ9pq4s3nKWgXEbSOREWH15uRg5d c6KgrkKPMaYQBR+yH55UcqWgiYNmxQvqFHxLyIOSME8KmrQRqTL2pODpVSsn UBAFJVzL7vAfp+AvzMuTPsRTkLzOfMPAED+eefboxuRqCmoJ3Rx8LoCK13ir XquppSCPRvpVl0gqPh66fpTVQEH9es7SQclUXPFlYf7RNgoyoc8mdJRS8axJ cWvKIAXl9d6VcuGi4dmXR+5fX6WgjuiWuNkYGv7mli/NZRs/6uCRjJEuFcSn tU6H3NrBj1I4C102NQniqgy9xec7+RFzwcxSZkgQz3YQ/j6gyY8yF6JfehKF 8Ez4kHRSnx+53OnbN28thKevzEmZ2fOjeQ+RtBcMITzZ44La7lh+FPpjh4nJ gQ14t5xV6tF4flTyMimk+tgGXLT3P6p3Ij/6eFVG9MSFDXiSMe9CzhN+xFj+ 9640cQP+QCE7XzGbn52PHW/CZzfgMYNjWhIV/GihyVxY5/lGPNza0YSbyY8S l9DnYnER/Jl5r+25ZX6U8PjEa5E9InipkbVn9Ro/8vOuLLl/RARf0DaIjeIS QMlGaTn9t0RwW3mVDiGqADLgXVionRfBNZYWHORUBNCXwRmdDU2ieH9SSOCh swIoOuX4kX1p4vhK3FpUhpMAwt8q7bMsE8eFo32ekFwF0AsFna6oXnHc6IYz 3uApgML67XA7UQk877wx4RhdANXWmQeExUvgt/cLxjknCiAb1dLY5ZjN+O7e p1nhDQJI9V9tn95zKZyq5rr8tlkAGadt/mxQIYVPB6sZdLYKIFszr9Lzw1J4 +paPI4rdAqhnQilvvaA0LuzeJlU7KoA6w8xMnI5K46t0bhMCBxW5pV81l+mS xrt493w2FKWiTe6Htv+dk8Grdj0c7xWjojf1Zx34uGXxvNO/BS5JUFF7/o4p lQ2yeMzbcruHUlT014awP1VTFjc8av57YisVcecxLx8PlcWLkl33RmlQ0XI/ pURWbAuepPToTYMJFU0aeXLdtJbDGYv6L0IPU9Gazye3e+5yuHnZwmNNcyp6 ytoR/P6GHE44anznhSUVCadmc+zPkcN96StuV09QkTUhr8COuBW3bLJR3OZC RbShKzmkz1txPl/h53dCqOiL63mXYD0F3BXw5IM3qYhy+NHZ26cV8ArShbjl W1QU+fxrbY6fAh6YUnHDKZKK5Nw0DfSyFPCJau8zWjFUtLvZMiBdQBGvEmvZ PP2EilaXNl0xG1TEg/HoJJNiKnr13bRjIUkZn+zD41dKqGj9BzGP73nK+LG1 xZiMUiqS+lji39qsjKvuORnJjbP/b7bZVJakgne+kg/8WEVFhwsk0ylBKrhG InZKpY2KmlBS3g4nVXzUY16Sd5aKEo+8/nrCVA0/LG79olaOhvK9bhdwaavj SSNq+Cl5GlIRDo9KOKyOj7wh9kwr0FCAKYeWpp06TkelVAEVGgqzMrd/FayO vz63hX5UnYaeh0Zz6FWo4+R385a92jSUbbvtqMVhDbxa7y7Hr2M09CBi146d HjvxA57Vp2iRNMQ6v2HdRP9ufLVzQr/yNg1lbIz/dIy5G8/T5dPwv0NDWbqP qtlZweVFLYh992io1Vtoo7TmHpyvsjsvM4GGrE/aP3kbvwfvFP1FQek0NLt8 I2LSfC9+8Ysw7onRUPPM9sNWHfvwVAkHuXomDc3wrt9qoqaF79+pouawREN8 78Uiyg218DYjxt7lZRqan2nqOOKohRP9w0zkftNQuJjXzdwkLfxiS7Y3nUsQ lXFFEu+s08ZR2CKuKiCI6NHrHmQMaON3e5zMTcUFkeeWGe+Ujzr4/wCfzduS "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"x\"", TraditionalForm], FormBox["\"y\"", TraditionalForm]}, AxesOrigin->{0, 0}, ImageMargins->0., ImageSize->{413., 117.}, PlotRange->{-3.5, 1.5}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Automatic}]], "Output", CellChangeTimes->{{3.4113559522458787`*^9, 3.4113559760768785`*^9}, 3.4113560789048786`*^9, {3.411356117690879*^9, 3.411356156164879*^9}, 3.4113563671008787`*^9, 3.413806136175647*^9, 3.413859115469271*^9, 3.413945992317*^9}, CellLabel->"Out[15]="] }, Open ]], Cell[BoxData[""], "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{3.410856047489835*^9, 3.410856136264835*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\:4f8b\:ff13", " ", RowBox[{"(", RowBox[{"p", ".29"}], ")"}], "\:3000", "\:306e", "\:3000", RowBox[{"xy", "''"}]}], "+", RowBox[{"y", "'"}], "+", "xy"}], "=", RowBox[{"0", " \:3000", "\:306b\:3064\:3044\:3066"}]}], " "}], "\[IndentingNewLine]", RowBox[{" ", RowBox[{"x", "=", RowBox[{ "0", " ", "\:306b\:304a\:3051\:308b\:7d1a\:6570\:89e3\:306e1\:3064\:3092\:6c42\:3081\ \:307e\:3059\:ff0e"}]}]}]}], "Input", CellDingbat->"\[FilledSquare]", Background->RGBColor[ 0.4666666666666667, 0.8352941176470589, 0.8235294117647058]], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{"a", ",", "\[Lambda]", ",", "\[Lambda]1", ",", "\[Lambda]2"}], "]"}], ";", RowBox[{ RowBox[{"y", "[", "x_", "]"}], ":=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ SuperscriptBox["x", "\[Lambda]"], RowBox[{"a", "[", "n", "]"}], SuperscriptBox["x", "n"]}], ",", RowBox[{"{", RowBox[{"n", ",", "0", ",", "10"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"expr", "=", RowBox[{ RowBox[{ RowBox[{"x", " ", RowBox[{ RowBox[{"y", "''"}], "[", "x", "]"}]}], "+", RowBox[{ RowBox[{"y", "'"}], "[", "x", "]"}], "+", RowBox[{"x", " ", RowBox[{"y", "[", "x", "]"}]}]}], "//", "Expand"}]}], ";"}]}], "Input", CellLabel->"In[16]:="], Cell[BoxData[ RowBox[{"\:6c7a\:5b9a\:65b9\:7a0b\:5f0f\:306e\:89e3", " ", "\:304c\:91cd\:89e3", RowBox[{"(", RowBox[{"\[Lambda]1", "=", RowBox[{"\[Lambda]2", "=", "0"}]}], ")"}], "\:306b\:306a\:308a\:307e\:3059\:ff0e"}]], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"a", "[", "0", "]"}], "=", "1"}], ";", RowBox[{"kettei", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"Coefficient", "[", RowBox[{"expr", ",", SuperscriptBox["x", RowBox[{"\[Lambda]", "-", "1"}]]}], "]"}], "\[Equal]", "0"}], ",", "\[Lambda]"}], "]"}], "//", "Flatten"}]}], ";", RowBox[{"{", RowBox[{ RowBox[{"\[Lambda]1", "=", RowBox[{"\[Lambda]", "/.", RowBox[{"kettei", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], ",", RowBox[{"\[Lambda]2", "=", RowBox[{"\[Lambda]", "/.", RowBox[{"kettei", "[", RowBox[{"[", "2", "]"}], "]"}]}]}]}], "}"}]}]], "Input", CellLabel->"In[18]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]], "Output", CellChangeTimes->{3.4110439421792*^9, 3.411355816211879*^9, 3.4113563755578785`*^9, 3.4138061511986465`*^9, 3.413859124206271*^9, 3.413946022646*^9}, CellLabel->"Out[18]="] }, Open ]], Cell[TextData[StyleBox["\[Lambda]=0 \:306e\:3068\:304d\:306e1\:3064\:306e\ \:89e3\:3092\:6c42\:3081\:307e\:3059\:ff0e", Background->RGBColor[0.671885, 0.972671, 0.898451]]], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell["", "PageBreak", PageBreakBelow->True], Cell[CellGroupData[{ Cell["\<\ sol[k_]:=Solve[Coefficient[expr,x,\[Lambda]-1+k]==0,a[k]];\[Lambda]=\[Lambda]\ 1; tabl=Table[sol[i],{i,1,10}]//Flatten\ \>", "Input", CellLabel->"In[19]:="], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", "[", "1", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"a", "[", "2", "]"}], "\[Rule]", RowBox[{"-", FractionBox["1", "4"]}]}], ",", RowBox[{ RowBox[{"a", "[", "3", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "1", "]"}], "9"]}]}], ",", RowBox[{ RowBox[{"a", "[", "4", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "2", "]"}], "16"]}]}], ",", RowBox[{ RowBox[{"a", "[", "5", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "3", "]"}], "25"]}]}], ",", RowBox[{ RowBox[{"a", "[", "6", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "4", "]"}], "36"]}]}], ",", RowBox[{ RowBox[{"a", "[", "7", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "5", "]"}], "49"]}]}], ",", RowBox[{ RowBox[{"a", "[", "8", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "6", "]"}], "64"]}]}], ",", RowBox[{ RowBox[{"a", "[", "9", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "7", "]"}], "81"]}]}], ",", RowBox[{ RowBox[{"a", "[", "10", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", "[", "8", "]"}], "100"]}]}]}], "}"}]], "Output", CellChangeTimes->{3.4110439472492*^9, 3.411355820790879*^9, 3.4113563805978785`*^9, 3.413806155741647*^9, 3.4138591270862713`*^9, 3.4139460262349997`*^9}, CellLabel->"Out[20]="] }, Open ]], Cell[CellGroupData[{ Cell["Table[a[k]=a[k]/.tabl[[k]],{k,1,10}];y[x]", "Input", CellLabel->"In[21]:="], Cell[BoxData[ RowBox[{"1", "-", FractionBox[ SuperscriptBox["x", "2"], "4"], "+", FractionBox[ SuperscriptBox["x", "4"], "64"], "-", FractionBox[ SuperscriptBox["x", "6"], "2304"], "+", FractionBox[ SuperscriptBox["x", "8"], "147456"], "-", FractionBox[ SuperscriptBox["x", "10"], "14745600"]}]], "Output", CellChangeTimes->{3.4110439568882*^9, 3.4113558251468787`*^9, 3.411356384214879*^9, 3.413806161270647*^9, 3.413859130328271*^9, 3.413946029465*^9}, CellLabel->"Out[21]="] }, Open ]], Cell["\:8fd1\:4f3c\:306e\:69d8\:5b50\:3092\:898b\:308b", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"y", "[", "x", "]"}], ",", RowBox[{"BesselJ", "[", RowBox[{"0", ",", "x"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1.5"}]}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Black"}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Text", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8"}], ",", "0.5"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<\:8fd1\:4f3c\:5f0f\>\"", ",", "10"}], "]"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.4110430696731997`*^9, 3.4110431122862*^9}, 3.4110431571362*^9, {3.4110432233382*^9, 3.4110432728612003`*^9}, 3.4110434492892*^9, {3.4110440103901997`*^9, 3.4110440227742*^9}, { 3.4110440559172*^9, 3.4110441296172*^9}, {3.4110447958322*^9, 3.4110448079852*^9}}, CellLabel->"In[22]:="], Cell[BoxData[ GraphicsBox[{{}, {}, {GrayLevel[0], LineBox[CompressedData[" 1:eJw1Wnk41F/Ulz3LGMwwaJE2IpVKKnxvWStJmyRll7RJlopKJYk2LZaiZClL SQj1k3NlT5YZY8xYsss+9rXl/b7v87zzx8zzec6553zO595zl+eZZU7nD7gK CggIpJBf//ur8TAv4b+rSljg/z4z8KbsMufiMSWMxO9x5s9OQbSOr1HKISXM 0LJ1dVWbgnuxXhk/9yrhMzVWntAwCV4XT4fuQko4Sq4WbzeZBIOlxw2XrlTC WuJ/K+iaE8D2RW++DzNwyBGN1c6qY1DWri8v0MvAnvvj0yo6RuGLxdbAze0M nCemOvwnaRTi1HRs4+pIu39RbJn2KJyuXk7xzWPgGa8b2sm7RkBwlZjvspsM nKybvr/NZAgmHwl1WvszsF5GLuNJxyD0zv/bd8+bgVUZgx8SAwehmjmjMe3G wCPfGgw4eACir/a3/NjDwOUGMZJy+/vhXm/PbkETBqZabt9vO9MH1w525m4x ZGD1r/YLe+L6wEWjOTx+PQMHbq9I/zLZC+vrq0wu0Rk4Lnvh2b/vf8Fy9D3z PYWBGRCSKWb/CxTSSpd2ijHwpYmklm2yv+B3IMzunVPEvdt+vJa73ANlWh/f L29VxHnvebc2WnfDiaCn9JpkRaxvU6X63qgTqokpsUvxithB1TJVWKITiPkj c6oxipiah35sYXaAqpdKq9dDcvz0gtXqTh3QYR+frOCriDFnq9Xk/XY4oCL8 As4rYvGa18+GbNuhiON63/2UIh5pcbyRod4OiXs1vL7YKWJ2pdTKB6Vt4LY9 Y/sJo/+N7+nnKdkGnClZbTEDRRy45s8Rya+tYJZ5UTVDl8SmsrvTXFpBXWOL iOAaRXzpe8IN/byf0K9QUJ1EVcTm0VsEt3u2wLmxSsehFgU8E+bywE+1CX6+ X3sookEBq/+lLkHNjbDv1ENTgqmA3Wv/u28c3Qjr2w5ohhcr4Ci1wvhxhUYY q+JNbEpTwJcUFhMPVHngdHf7r5ZEBYwMsvR43VyoM47lBb9UwCGrREZM3nEh +z+HAm64Au71NxW9pM8F35RfdwIukf5/Mnb0nmqAHpddV1Z6KeA2RZnT/Vsa 4Ihq2pnq02Q+1lbOpGgD6EWe269qT+a7H5G2KJkDc0GTysUmCphBT9t2dKoe PNAR6bOEAh5Rl1x36Ec9NM3n/aNvJePBTp8dCfWQ7xXQdVJLAa8XteX/OlgP 1xyE0iXlFfDvzqB4BmZDRo3ZA7aUAuaeUW4WfcmGDsN752JFyfH13XYVAWww XUxft26OjmO0VvkV6rOB0rgq40A7HYcEKs1sK60DtOv0I5UmOhbwLtkQkloH XnkfPLvYJNaczI14WAecCL0NvuV0XJt/987wsTp4eXB3ZvQHOk4cf2G6+w8L ar89eOyUQseqD005Tr9YIKhT56WZQMeH3NW617BY4Ea12/g1go6LFy3j4xQW RF2Pkw9+RMcuyXfehUaw4Ptw17hlKB3/mHh6dv4WC7Srzma3XaVj9XrP9AoH FjjoZz5N8aPj3zG5csutWPA4bcrb6wIdO+gHGakgFkzdvb5Z2JWOH211W9C2 jAXqs0X0qhN0vN5I/mmyPAts3cWnntnQsecnl79ioiwA0/Cc1RZ0PPPPL/zW IBPGPtVHjJjQccadrtYXbUxYsVLZ7zNBxysitu03qmdCiFDClj0b6Tif2i2n h5nwxeuXIm0tHVstHn97I4cJg+2aM82r6NhOx7LvwHsmWOHsvHPKdMwW5C+/ HcOEm+tmo7bQSH6nFgR2PGVC9kuDywIUUp/R/r34PhN6pG8erRCj4+aEbeWL 7jCBcbV06+MFdJw9oLJ2KpAJuwcllI/N0/DTNfsKdvszIeDYvrnlkzQ846BW yPBlQvr3J42DwzT8o/PUtRMXmNC2lfvlUy8NT6he3ql8lglyKYteXOugYTsf leO7TzHBmOHob9ZMw+sp95cNuTLB907SMSqHhg2bL/YIODMheapvO6+Ghq2f ckWCHJjQ6Kq9KL6Chr/B0hbvE0yQqvf67VFEw9t4glVMOyYYGuc2b/xKw2NX 7m6NPsYEz6z5/N85NFweJRhaYcuEeDUUW5JBw6zvf9QdScwOD7r6IJW0JxgH nSCx6IKK40cSSf4MthQmsZ6ntKHqSxq+Nl6vG0TG82jdv6QvkoZ/H3p+OYXM F2MZ8fdjOA1zTcL3aZN8qr82/rwSRsOLDhrrypJ8BdYuBaPbNHxzq1W6lROp l8KOE7ev0bB2f4KkOlnv9D+nP6V+ZH15ndjdnQlefUEx4hdoGO/1HKGeYcIw 68323R40LH61Ai/xZMKp/PLGMGdS/xW37R55M6Erqf9ylR0NN6ubjjlfZkLT Je08q300LOB2vlEjiAnWTlZHHpvTcK035SUjlAmsPV5TdTtoOEBextDpERPK l+RsOrKJhmMywlT/xZLzIc6ti1pLwxQ583HLJCbA6KxX4yoa3jlR/23sHRNy ig0+Hlei4RD/Y/HrvjJBJ93e6pUcDQfnP3QoKWHC+8gb/DZJGpYK/OuXXM2E RI+StS5/5bHadbktVu1MeEzdm+rRKY8Ns5cen13IAsrcuV3vmuVxKk7SqaKx 4G7no96henl8ZkKltH0pCwJz2KsulMtjW5lU5TJdFpy1s0vwey+Pq5fpt9qc ZEGvybWdn9/I4+ALh0fFvVngsi6ufe6VPEbmcX+HAsl+E+xaeu2xPH4Z/8xt /wsWmCefjgnyk8fnpJ7HWJP7wYqJK8/Cd8jjizGCNG3zOmgMi76TVi+HI29J lBntZkNdieo7hxo5bO+UuIt/lA0//r2tpVfIYW7wqP+bU2wouJijFJgvh5PX +lzadJcN8cfq0g4lyOEpp5iJnHI2eGhK1/7xlMN1K7X6YszrYf57IMNKSg7f Md3gd9WUAxPC4gYionLYu3xKSM6aA8OGDx2//JPFLiWPS6NdOdCWGZu6YlwW hyf8MwsM4kDx8y/6szxZvPP8T7HIQg7c85hwiH8ri6PuTN85odcAiyTcUyZ2 ymJ+XVH6ZhoXThT8uKemL4u9ObECdDUuvPba4Gm1WRZzehW9atZxYVXTnO67 1bK4aSlFu243F9a9u1/sLCWL71XX5gtf54KXw9jbcBFZ/PdlaWZaGHn+0I6E wV8qfikx36MexQW9q6oHVEapeGVgW25CBhd2Wma1suqpmFjpIB/WyoUgQUaR QA0Vu1QPiLH7uVCWE/BGu5yK/wQ8LBie5ILFUtOzoV+oeMlN6v5ISR5Yj3Dn dryi4ldFsn5vNvEgKtHg5/koKjbcx2s5Z8iDJpv4wthw0l976YCwOQ8cCk+H zN6iYhsFObEoWx6cevyX/tGdigWtuiYtrvLgnanz7E9HKo4tq9jic5sHw3Nl zVLHqHgi6qfDyfs88HIOT3DfS8VWbZcT3sbwIFtxKjjClMSxrS0TCTyYrrT1 KCao+MybdTsk0ngQsGnFBlUdKt5nt70uLI8HBb0hNEtNKn62MmXtdAEPFsQO TfuvoOJFQk7iGiU8CBbJLWhQoOIYpf8Sf9byoPyzSrwIlYq91qfEOHJ4IHEu 8PbGhVR8sPrKjZQmHix5/yRqybQM9j//9V5wNw8S6Mftr/TJ4IbrnePK/TxQ v7ZqFadJBodSDlV4DZP19fAHN1TL4AAUm3F/jAcb9n3Ouo9lsML+x5anp3iQ k3vzSl+mDD5E3b1Lco4H21QtdpgkyeAa18XmZ//wAELo4q8jZXBkQ9L4I4FG MB79Wf37rgwuo+dP+gg1QsXR5Gc2ATJ4+K7vrIpoI1h+u2CXfU4GF/evTrsp 3gh1a7YvpzrKYCH28bwUiUaweSLcf/qgDNZyaq15JNUILfNVGWUmMtiMlfZ6 C6URnFwi/ZbryeDclbM/Y2UaoeeHg+H1NTI4qEJnWxG1EU5vXiPStEgG9+yY cXsr2wheIp/f+srI4C2nT+SayTXClXqz3XKCMvj9yttvk0l8M4kz+H6CgqeM g8YqSBzq4/pw1y8KLhO8fyiNxI9NJjZ08yg4gtsbakHi5/Rb7MAfFPzcbubg ezJ+fLes3yKg4IfLdM5XkflTP8Up5X2k4PzoZbHvSH6Zt9flH0yk4Obfrq92 k/y/HC44wY+g4Nn1H/XekvV9W7l3QdhdCu78VKr1jaz/+2RTwqoACp55cgW9 IPVhlXiYfjtHwRZ7M7bqkPo1PpvtPe5Iwd+YR1uDSX07XEPCZg+S/Hx8Z6NI /fs2K2o/M6VghQHZ/e7k/IyIvKldv5WCDQ2NMiZmeTBTv+niD00Ktq3T7DAg 51fgTRHdfQkFu7lPZRqR8y/ueyBPSJaCJRgcvgi5Pqim7bavhCh43l7kZFAf DxgKnn+2TUnjtRolvwq6yPWUc3+nV5M01jakmZ9s5MH64EXd0tXSeEGbfiWb zQM967Q7KVga69SuevWnmgfmU+U/2pKk8bU3oWGB33hwUlf4yD5PaTzNixs2 fcODc6JPZvudpLFGSK176Ese+HKWxQQflsYbduiP3Ykg+8GXaP+6TRqXwbfE DLIf3+RcOa0lIo0f6Tc3ZzvwID14IaV8Wgq3BNstKbEm1691VIZzvxR+VW5w 5oEFD0qnPk0+r5HCTR1jX/ds4UG37uj1hc+l8BW7JudzC3kwKBqolnRPCsuL u2kZ/+HCBIdSgq5L4WXf/bazRrgg7KclcclFCreaizcrNHBhRe7Jpz3aUrjH wVMNxXHBecvP5KIiSczytYkTWckFt+Qt1qa5ktje4d2mK3QueCiFC1WkSmK/ 9OnkDyJc8Jw3OlEdLonl9HSWHO9ugABIkefZS+JTx1/xCl83wFMzn2vD8xLY 14Ob8ZHSAJF51ZoX+BJYfirLYeM8B55rqPPGOySw5EAh3+cXB+IkmzbOVkhg p4XDhQbAgfc1qE8oSgIXFrpNc09zoPSI1CGlTRK4uiawwORzPVSUuy6IWS2B e9Lm9vNe18OPrZC+REUCaxmdPqkdWg8sFa+FKwQlcKDfXevFtvXQ2tpQoF27 EBvvVl1EnWbDzMkEDeMzC3G9Sv7I0ZVsWHNp279zieL4/rJupeWHWIBbLNd0 RojjRxn7X5/RYYG1kfPhI3fF8SGWvqknlQU3KffSiHPi+Nb3Q5FvKpnAS2w5 QtUTx/kdt83ZhuR9lRmY8bFSDPvrNQwdZ9RCz5oyx4kxUfw5KFVi58ZKCHjU dM+9WxQvOCXMXtb6HeSm+LnNDaL4aEZ6+K3Q72BYyKCU5Ivia/uu/qturYBn Rzy+PAsWxX9jkoKfBpWDcZC0/BZlUby8xiLhcG4JvG45WHx5hwhOX3T2bkwY gE6Xzhx7kwi+VFmlSdQVQHG/7Pr16iJ4l9CFU6uVC6BnuuZFD0UEb+25vqgq KR/WyFlcPNgsjPVcNe/dy/4MmabGamv9hPHUQtELjRlZUPxhU2DbOyEsteLq 3vmsGPh1g65vxhDEmYVLpoxuZxFfnqmb9Fr/AbELA4LTgWxifR9vYl3sFCwV ep+s0dtOeI+s1VAMmoKXp7wFfYQ6iLzpG8f/ekzBbGr3ucwlHcQO0TWlP/Sm IGNW4avg4Q7iwPIrkafYk5Dy+G3bOO4gfI4rb0uQnIT/bgouHX7WSXxh2l5X uDIOetvDfKd0uom/3PSsPw7j8CNz56vVFt3EzjbB3i6zcTBbMT9h7NpNVA6n WmXRx6H57CEvo8huollyfpnVxzGY/LqzfPdcN/HP5EXx3d5R+Fl5i38sv4cw /tK08I/1CHhYHta0WddLpKcmbS3bPgK3nwptfmHWSzBenD8VrjoCGgVLorB9 L8GZFn28h82HRcuDYz4+7CVW+ltTY+eGgbJzVHz1cC/x7cakFDIbgtfxfs82 JvURvx9sFA1u64PEVseVN+f6idrzZa7KqX1QJj22+yNlgEiwOlaSfrGPfLe6 cPLVBojdcreCGkT7QF1owMt99wAR/YwlqLG2F4x+85ZIRw0QujEX/lVe7oGw 49Rl7lqDhGfKhxlZ+U64/Fjv30G9IWI95dytnW0dsN9i6OZX0yFi1EuLcvF9 BzgaqdQJHR4ivPRTlrPNOmBQM/vsqgtDhE9NvGVEQDts7P+bht8OEeP9mrs2 /2gFLeeP6hspw4R3dvKJCLdWyP4rc+648jAxdXWl97RAK4xMnxp1WjVMzFCX vvq8+SckyOUc+WcwTPzWlZs0eNUMEWdstvqfHiZEb83EmXrxwNu/sP8MDBN3 LHxy3krxwNLTYuGOimFCXGGsUvwtFyq3Sy7is4YJiZSBqe9NDaD22K6e2z1M yNT8tNhnwgHr3aEpbQv5xKOoY04ZrfWAv/y+fFOOT8g5cf1kr9RDpK9j9h9l PkGbZMbXpbPh0WfD1YGafIKhUjJzhFEHEgkd1lm7+UR01w7K50wWtFkEly45 wCeU0wuWK+9lQZOogLrzUT6xeEeeZfMNJizN5d71PcknjKqtdxVyakDZaNa2 9AafMHW08r4lWQOj5iv7pu/wCfOJXa9MUDVk+Z8XEnzAJyyUDSYrUn5AGBL+ 8CqaT1i7LX/NCqiADdkLP/1L5xOhFy6GPP5UDj7V2YNNWXzia0DR+QPD5GnR /6AvPI9PrHjibMiyL4VinSZqWCGfsHmZtfJxVAmcCxXQrC7hE2EpQtIHmMXw 2+6/vv4KPjEGCU3MnUXgvP3wlo9MPrGqcvxbuP83+HqelmdbzyeOcoxS92cX QsA9jcIWLp/Ag52XmCsxJBTRD3q28ole/kms9rUA9lXO11zv4BP7RMUfxmt/ Ban0w1/du/nEko3mWvGyX+DuRBC7tJ9P3N7VO7fsVh4w7kVPbB/iE4P2IRWv J3JA8ErchVA+nzjoqx61zO0TuIO7WeYon/hyr9ztdUMWXI8Q88oa5xPLEtw3 L9uVCZeucIfuT/KJkM/iwq+/ZECT9tXcHdN84uer/Uk7bNLhcGlLZfUMn3j/ I3znju1pMJesrr55jk/4zzJb0ZJkGIpmVXjP84ldq+SuogVJEJYfkX7/N59Q PHhAGXW9hn9Rvuzrf/hE5b8V568/iAVz1S9b9/zlE+5Hk1KuHYqE9x/4zXwS C2et7LqqHA4f5Qfzz/7jE0jJwmAO3waX0O/cYhKPREW7jEZ7wdaSwXWTJA4Q fFpiqneUMO2fK/xLYu3nzmU03evE0NPOB+0k/qn0cVhS5h4hxmmKiCXxwY3c /OAdT4krG+0bdUicwzty847/c0L37Trb12R+aTywvNg2jsiNPazYR/IlnqQF F/slEEPjS+UlSHzB7XRf8dM3xOOJ5fuEyfrit2palHxMIf4cMqhqIPVgSw2k l1S/I1w2PHgYNMsnRNtSZUsHPhDB4tejJEj9Yo5u3uYc9JFg5RT0n5riE5uN np3ulMsi/njuvBs/wSeqtSZjnF9nE2IFJn7ZY3xCQODTP+eCXMI/jmHlMkz2 Sx9tQ5fFZ+Ln64KdgoN8QqfO28ml6Qux7e+jp5f7+ITLm00lLjNfiQ/4tPtE J5/48/DpVFcwEA4j/hPTbaT++nNPMkMxMTtbNs5uIf1X2ZboKH0j+HErnVUa +MR6FYmfXm3fiKvLzrcG1ZHjZb5MZb4tIjI1XH6V1fCJiFkl9Y26JcS/Ofyp sYxPlP3ghW48WE6YREWobMoh5/NSY9kxzQrCTWqp2IKPfEJ8RZNwkNB3wijw 5VxcGp/Y7d98jZ1VSdx25q62jeMTPzRavXxoNcTXVXcmMsn+PVPf+iF2sIaw IS+oSmR/ByPPKSenWsLWp8Dt4BU+sXrQc2PYNiZRX5H4Y8cZMp+R1/umfhYR GOdqK2HJJ/Sixyr51nVEbpH2rLQpmZ/v1S9UVEc0ul4O6jbgEynPL67WesEm lqolvaGu5RP9o96vA/ZwCI8oC8ZRcj87E+f3bPE7HrHRoJhX9HmY0J+aztrA aCQ01kZvkfkwTEhZXGKZBDUSLSr7itclDhPvpy/JnLNrIrKTb5eN3B8mhi2v 3C2QaiGebP9L87EfJvKuFRR80G0jcg0TRmPmhoi4lL9Vn8+0EV3zRztMh4aI ELZhS1F8G+F6SuNVWesQYbMG5hso7cSmWq+RvcVDxGw96An8aifqvu3QuhA2 RGxbW5hpFdlJeIt6TmnJDRGb2ZyIgopOwvGgkJGTEHne+A9e0frdSchsum/v MzFIrKpQNBJ37CJuStv6beYMEvKu5+pgTTeBlY22qEYNEoMxKhPaBT3EtaIF Zz/TB4lXUr6bpbv7iK6x6RjWTD/xPCtMyV+xn/CPGZP53d1PRNi+/tO7q5+w rMrfLlbXT9xL/lFSnN5PPKhn7Sp6109cMl5uHXBpgPC4bK3KOdFPHAio9R2Q HCKGhjVPBn/tIwR96c0uSiPElqrs40puvYStQyorb9MIUSV0SrJ9by+RuZuo kLIaIf4kaBWFbu4lnJaeyskOHiH+lXDVbguT53l5/iPhiRHCZlHZWZXXv4hb Ki4midWjhI9H2Z4/7B5CuDAzvfPWOGFwYslpZY1uQkzK6obT8BRBtVbrufqw nbjVxjHySvhDZD7M62dV1xEZL4Ktro0tQHvjbbbxVHKISvngXzICguiKp67D 9bWfiJ6w29deSwuittaY4RdENrEoIOhdsbog8jn+6CzhmkmE2N0Ul7QXRELu 8oFFZ94TDouv4chKQVSExMe9S2MJ6iuf9R8ThRAtu+CJXdxz0FT0KduZKYSY El11K2RfgulD7xNsEELRFyvXx0IcBFy/eG+6UQgdTXaSfK6RCL32F3oNZIXR Vp6xHm8wFbDq2bjvV4WR686jpj8VsuF8vAu1y1oEyTYQu5UdMTy4HB3zwFkE pY4apHrnY0i3qlbf6imCtpw4cOO8YiEM/92y48FdESSNlC8Y/yiEM8ckvfTy RVCNtMkjuw1F4EHLrLu3TBTdevM6mtVbAm7B/yI2D4oi+5YnU2cXVkLw8U3L 22ZEUTv7R2TrkUp4s+nUh1ARMTQfHeTQkVQJ3R2sstYlYigrQqYwGv0AF+LN zN39Ysj+ebBrsWcVOM1Y2P7MEUOKFi1DH/+rgRMezxffuSGONluXGeX8ZsI8 b2H16H1xlPLC66vwIhZE7bp8ze65OLo98SaSsZ0FTHWb1g1ZpD+7u/fhJRYY /6K/bu4SRwts8/0/j7BAwyV8hY75QjR/fb/iz/o6KK0TqI85tBAJaOzX8h6t Aycjz9tijguRI3GtukqKDTFq+3qaL5P+nxWOVu5kA6VdKvlO2kKkhjX/Dqax YeJ4iGYLRQLFHBhXy/Oqh0dV001mKhLovPErdgD53llrcPJe5moJ1CNgwBSK rwe3RaZDd5AEerF+53mb2nrgNQp90PGSQNtiX/ynvIYDBUeu64TUSyBL8UeX Z5kcOFY23DHWLoFmmkWpLd0cmNE98eT4sASSirIzuznLgQ0KBhM6YpLoNvH8 lqxqAySy5z616EmiG5OLvu30aIC7+323boyRRJxS71/DYw3w+MeaM+9SJNHb P7GlxsJciDFrfbkyVxJZOC/R2E++JzMMzIUZLEmUUdEdfl+XC1wN5ZrfYlJo u2cG75kPFzoSqxf40qXQb2/37LggLgwuvbWJryaFDMPTjjs94YKAwmB0u4EU Yg13HJDI4IK6YIFL6UUpdEM4+epwNxd0rnpFEjek0CUpjv/HMS7oz6z6nvdA CpmazFVr/uOC1fDDdWkpUujOx50Vpoo88Gt0nHvYKoWM9y+KZBjzIPCwwtqF Q1LIfuEbiLLkQWjtd/ubc1IoZ8NeAaYND16WbizxpksjuZW/DDzOkO/zTJFH R/dIo/mLDVJGj3hQu/bLN5aNNEKnZA7cieJBY/K5yT1u0qh/TUdGUBwPhl82 2BrekEZafpOWaR94MKN0737uA2mkLhvSyM7hgeAzhNfHkNj+GCPvKw8UwlJW Ls+VRnqOoZbvvvNAVfSETUyxNNofd/jF11oerLkhF0ZnSaPUmzuN7nJ4YOjn PyI2JI2ed6baWLXzwHxs3fIbc9Io8U+tmkUPDw6c7To8J0ZBhc3nFwgN8MDV ee9/g2oUVP2uHceP8+DczwXDruspaHw6T/TeNA8uHc1RbTWgIN0v8pob5nlw k+1x0GYPBRUwGM6P//Lg3r6lwUwbCjp6/nfXhwWNEPG9Lm+3GwVtsRHvvSvc CHEmIQNFFylIL+dZoqpYI6Ri/SUGNyhovlD2kPfCRsjePmqV84CCwpT+rr8t 2QgFOUm31sVQUB5r1PegdCOUb7DNSU6hoKJHz51aKY3AekfpW5ZLQVMvvm7Q oDZC8+oilRfFFLTqj97yDbKN0BPvZ0ljUdDFF8J+0yQeWax1434rBTke33gu QK4R5qLaskSHKOi7xcRuTGJh2rOe63MURC94YlVEYrnhaxQ5MRkkv0qtJ4zE y8rddRPlZdDT0w1XF5F4ffyBE7qqMqi9aMF+HzK+YYB+cLmWDPKQroyOIPns tV6VbrtVBpmkbX0SKNMIduupnEETGbTHecPljSR/D4m5P9cOyCA9Q++QD1KN cLmrc6WsvQzS8kj4OyHRCCEFVXsTTsug1KVIWZjUJyIq12fzJRn0IOSdcoto IyR5vY4tC5JBpSlaKJDUN9sirORouAwy2/ercojU/9sqn6GBWBn0eK7n38p/ PGAK2NOvpZL865SXavwm11+2jmt8kQwSeWOzLnySB38eLLq/qVYGBVfi1KlR HkidEv1U2iyDOB4qq9SHeaCxuFF4YFIGzSu6bR/p5kHMvGOE4QIqOnde4OQd cn0l9Fqn3hGjIsWWzk8DzTzI/IZYSjQqOvJZfGBRHQ8+f9jc46RMRYtWOXr0 V/EAx6yZS1OlIrcSHSK4nAc1vjQ1w7VUdGLjj5VryPU+uKb3gpMpFW1LFSrW TOTBhGLL7TQLKnJvyi/xjuXBvDAreuIAFZ0X4Kc/iOCBROt/hcH2VPQvfu0T 3RAerH7yUDbtEhXtMr1r63CKB9qBQSsnrlGRWGqa+TZHHuievbzV4DYVHbou zP9F9rOxmbNjTTgVTTq3toIZD5zmdT+Op1JRWtaNwTPLeXCqV7NE/yMVpXrf WcdX4oFnvSrvdi5pn8/VN6fy4PoHiQWMYio63HjzQOBvcr9z/mml30JFcjUa Y/J1XGiovD0SJCOL5IQmytUvc+GpYazJYQVZ5F2WY7PrDBcOfMx+vnKxLPoZ 9CRjhz0XqiM6jUvXyKITrVpq+cZcKHXcES1mKouSva7u7pPmQs707x2hAbJI tShWLDu6ASKWez952CeLTt7N1G17wYFDEWG99iOyKOB0XpVxGAfkFiYYrJ+W RXN/9XDkFQ48GGb+qhWWQ8VfvotIHeVA8Od1+nKqcujiUt83JnQO+O4b6Hpq LYe05/AzHFYPh/2ddJ8XyaG1Po09Dn5siIiliU5XyCGFCWmbiyfZwIHS+oO1 cijppOfMoyNssBbW9JFukUOHclsdRrewweb+eFbglBzql13h7TBbB7avgjac 1JBHCtx/eyqv18HzQt0FxevkUdhEOU/gQh00dfbWqurKI7rY3V9WTnVgp77X s3GnPPI5vCzO2KQOjn+kf9hrJ4+UKtWqIqXqwKHojdamh/LIV3tRzs/XLIjr tvn96Jk8Kv+564D+Mxa0i0n+GHohj3Zf7+4rCWGBk8X502+T5dG2BX35jp4s cK7fkqr8TR5Rjq21adnBgsTpvst+5fJIMI+1Il+XBV1KMbvY1fJInGIWXqvJ ApcTAn33m+RRdUK0xSsFFrj9Kl+9YJLMf/Xq1PQwE94s9J8+Pi+PoiJljr7t ZsIvzbVlXxbQ0IEBhbcRzUxw9wx386bQ0JkWe/ttlUxIfmyky6TRUAjj+dXR b0zozZ4U0VahIZ2rpvyhL0w4NXs06ddqGvJ95XIoP40JqSpSPsbaNKR+ii0X nsiEfoMC49ebaEghuuBLRiwTPG6qddnuoKGZ27evch6R/onsrFwzGmKLqfu3 hjJhoDT4Fs2ShowpLau33mbCGckBtWpbGtLPTfTpukLaL38RlnQk8y0VfL/P l4zXe7fH7CQNeSZ9WUnxIvlZHy0POktD5xqrLJedY8LJEvXUwos0tOLeuueh Hkzo2TgT9vcyDQk3VgXsOckEl/iys9sDacjySOQ5VxcmdFIj910KpqFy/Rv9 PEcmOF132/DpHg2pJd0/l2rPhPahzfJjj2lItJHpzz3OBAc7kUntaBoaTguI cLVjQut3Nuf0Kxoaa2w2OXiMCSe2JuYlJ9EQ9+5JWoItE1reXnzenUbyKSp4 aE1iOwWjALVMGqItzDM/T+LGILkT9nk01DHhVDdM4qPj7URMAVl/t0wZh4zH dfy4jFdMQz8/Wxeok/mtawOFFCppSO/l4iM9J5hQb2jVfYBJQ3Ydr3RkSf6H 3i8te9hAQ6qd3pOpzkyoU+En/2gh/QUizT65MeFAaEHowi4aan7twd5A6sOc uX/GtJ/UZ2/JbjVSP6uTxy1vjZDzUTZhF0LqW1OvtR5P0ZCDeSl29WOCpfFv 2T+/Sf2/3l+XH8CEH5mV41uF6MiGsdbt/k0m7Fn2ot53IR2tz1RZ2RTChO8P PXKzZOgo+fPZ9W8fMsH879boETodHcpu2jcewQTTJq6dhxod5X+0+i33lgkl u5IN36rTEaN8p2b/ByYY5/mpdmnTUYCbbqb5ZybseKbQdXw7HQmYXtqcUMUE LNRT8nwHHTnIiY/Fc5lg6PXpbYMZHUWd1bqzoYsJ+vsOnd5/iI703j3uEfzD hP++Lt/7wJbkF3v60S4JFmzTGteudKAj9feKrFUMFmxZ+HjM+Czpf8BO/P1m FugU1VzWC6Yj7+mpCFXyfv1xw6tjPvfo6HdT9tZDoSxYH3fOIPMxHT2Kk83V jmXB2qvSC7Re0ZGUUnxWWzEL3g00d7gn0VFQx3+++TwWrLF9V5yURkfU2gMx ZnwWqG/ZE7I0j448Xe6WeS+qg7dJyh52BSRenLNJZVMdrKL174kupqO4int1 ly3qYMVoiIw8k45WiGa8dSf3q6VppRGi/XRkV/Hvs8VwHRx6lff5+wgdlTPG xwIpbAh9ktr8YJqOQp4pdCSsI+/v/g/UFEUUULGhmfo3bzZ8t7BOX62qgIzX aX7NlagHgR3mzIFVCmiR16H2PJ162Lx528SHtQqozU3+d+GxeohbvGSb3nYF RK28YDCbUQ++w90l5tYKKJtf9/aoOwfedTT0Sh1XQFFuO0RnojjQzqmQZDqT 4w+bnPv8nQMW8H7/0QsKJB9D36wNDaD2yKfl1D0FxH21rb2XPE+qNohMhn5T QDN7BH5ECjaC4KppxX0VpN1wS+ESs0bQU+7bJl9L2suY3cL3GyFesCrwRYsC uvQuf/zvoia4VPdU6t2MAlI1ffdysWUzpJcFr/P8p4BQN2Ov7Mtm6Pzv0oFN oooIr7G9c5vfDJaJdlH58oooZEuYwILIFljhs2JFlbYi4gYdq4WZn2B7SsEs fLMiyrB85rrxcCs8PC7ucVhfEamab9y1J6sV5kwGP7TsUkTNIZssDba1Qa1C 9vZhF0WkHuhNTRdpB/88o4MyLxTR4DFK/OeyDtCxqx2xf62I3NvKv6wW6IT+ f3YPMt4qokRvuX3nt3aCrZlvxf5sRcTYpPj8SXonbOMkE0+rSH/akdvnErpg ZlxaS0mAgUYMkojTn3sgI/J5xSlRBlp/y23jdYFf4L599ckvUgzk+a3narj5 L+DeRPHHlEj7TOH0l6ZfkCt7kfFSh4HExxwLT1L6wHcdV3i5KwNxBY35p98O gHadS/zF0wyEvi8/FfVvAHp8R4niCwxUu75gyZDNIBwukPB3vcZAgbe2+CrL DMGmvQajbyPJ+JV1yey7wzDuEd+i9Z2BHm28HPquZQRSKev8r9YyUF76dbks +VFwyvyPUc1hoLh74zddd48Ca5Z98HwnGW/TkD/78yhkhoh9//ibgazs4lXE X4+B55szObrrlJB55n/u2x9PwM8alWcUXSX0qOKF/h7eBOyd/X6xR18JWZn1 Mo2XTcIaC40NEbuVkH6mpM/frEnoGu1Om3RVQgEKkququqaAbvvO5v5VJfT/ /z/9H+d374U= "]]}, {GrayLevel[0], LineBox[CompressedData[" 1:eJw1m3k01d/3/2We5/Hea7xSChkb6Rwp0lulMoWUMUUTkZRCSCUVElKRoghl JjnHnJl7TZcMmTJfIqTi+/qs9fv9dddjvc45e5/n3vuc117rvhSdLh13ZWVh YbFlY2H532/Aj8M/19epOOvAnSiafwsauyH5q/cvFf8uY1WbvdKCjggPLBf+ pmLZb/ytJe4tSGHX5X+XFqhYWrrwzFnLFlRxP4p7cIyKtdLUZgS3tqCt8nZ8 pcNU/KQmXC5PvgXF5FIF4wap2Pf+EOIVb0Gu3/LEzHuo+POGh9GNf5oRt0aX HG6i4s28+Zfe1DajKxWvFBPrqdhlOJe/q7gZ9Vi5K/vVUnGGinr254xmlHH7 t6pmORW/tbt/6nlkMzrSRtZLyqPip4dzVwrMm1HM1TP/BT6n4ksco46+NU3o H7fqEfs4Kq72aTvakduE3F7Mm+98SsVmHR///UhqQjtqgq3mIqm4Ao0pqvo3 oR6pt45ngqmYuaHzipxqE1L4PHENnqPi8LcuNUt+jeje0Rx/ihsVc5Uv7Ulx bEQ/h/0DVpyo+NY56gTHoUZUyc9/56M9Fdv+K0qelWlEbg4akQrmVNxMUy06 XtCAMjZ4v2HZQcVq6Y3bn3yvRztPpHPG61BxbqYVOFVZj2refHfX0qRi1tUq y8439WjQxFzdSZWKB3Bka6tbPZKMVC+oJFPxodqbWsyxOhRMGq8NY6Hi3bbb T0t2f0U2Oqem+OuVMPPwerBrYA0aC4k5/LZGCZeJ/cr0sqlB3p0N2QaVSvj3 wqu2HZo1KPL67qsXS5Ww0tXhxKn+alSJpP61ZClh/ec/0th3VSMNM5pgdLQS dlPwD7AdrEQcribaMqeUsMpk6sfsNYxoDlrWUyeVcOkXV/2qNoxe2pBvfrFS wrp6B26mvsFouxmz2tFcCbfPfS3qMMXITefZyXQjJaw1ccKsg4rQ1w0/Avds UcIbtGp3x2mXooiXYS2nlhXxWXj41IxQARLrrvZ8/UQRB6Vn8A+tJqPjlQnO qvUK+AC3zZY8oRyg3D7SX1ujgG0nSgdRSA5YGtGwdatUwFLFe0DW7xwQz1lp nlKqgG8M0QrUh3PBoOmUgWy2Ag5Ft0aj8vLBhdY90iIxCviqZplt29FiEN73 rXHllAI+73YjMmgbBrazKgef2Spgc/O0zFk3DNTWL1fqWSvgqk0XTu98iUGL AkeJl7kC/qK7MOvAXw4kXdTTpvcp4Gb53atjY+UgZTIgaHATMT/aK94yphLc YBp4Ph6WxxTT6P8sG2tAouOOcdgnj9UrC8SaV2tAKV3TZb5THjdd4GVIqtaC tUKq/fF6ecwZxbgkGVoLggN5zMQ/yeOxhWEvvPsruC/SsTXuljz2Pxyzwyqx DiToeE69kpHHWx0D04/pNYLPb13PmovJYznD4wnD9o3gm9TpYRYBeUw1Klzc HtII5P4e63VkkcfJ9zP1FGiN4HXVjgbqDzl8wUOFMn++Cby3ZMtIy5PDq9pG 7dseN4Oiawnns4/KYa6cw7ZqJ1qBksuVt90H5bDXOZa8eedW8ND84OCGfXL4 cmPh+P2rrcBJdcnSQlcOx0r++rvjaSvg6z1m+FtaDjsH5b3wbW8FDnt5pI2G ZLEAeJZieagNfN0yeNyzVxb/V6yctNemDWhLFT582i6Lu2f3iq24tgGuORe2 8RpZHMFzIqY3sA18TMazERmy+MWxD69O57UBNg6/6s6rstjsrqKbtigNXJw/ wsJyURa3Kwof5Jelge6+jXtUz8ri/Iu5BbmbaOBDAf3jjZOyeNDo5JPz+jRg 5b4tUWGvLD6kIl/q7UwD2IKzy3SHLJbwlwjM96SBLYZ9It6aspi3YSii0ocG 1mUe3K1WksUHRZQnjO7SwLuGMa/zXLLYwOVYSlsaDYgWfcmMZpHFFKZl8pVs Ggh4EzNe+puCpZKDa74V0MDxgH0OQtMU/Ca9d12smgZKz8nE7xyl4Nzt6rSB BhpQsZqjO/ZT8Md9P018aTTwR+OlaV4rBZN2gyTWARpwI/uE9NVRcFyk44GV ERpo5TJDnJUUzCajLlY0SQNvBn/rnsynYDcPlbynv2hAsKn1UnAWwbJeR3JX aeB6cVp6RhoFb8lLeZWwTgNHoiwV1uIpWHB9559qbjrw1xYyNYmmYK1joq5L /HSQSvt65XEEBfdJZkr9FKYDmldwAiOUgj8HJP8pEqeDNVH9SqXbFFx6WGT1 kDQdbMn9NeXhR8E0o3d/08h0YHUiWzz/CmHvbOJMixwdZEYruZm4UPDlVlXj QGU66Nb5Fvn4FAX7Jo2GcG+iA/b2p4UMKwq2sd5/xk6VDjSvHh1UMqfgd+66 1X5b6cBenIfH05SCQ0M0k8+o00F4XoVW/j4KLhsDQ6Lb6CDP4qbt2h4KfpW8 5PtIkw4GF/XumOhRMN+Uz5FOLTrgf8rMeKxBwTqunjY/tOlgp977dsYmCq51 lwyt0KEDlw6nf0qKFLzn0N7qs7p08NiHouJJomD/JH3eLoJLJTqP5ItR8Nvw lQPCenQwnv/o2ho/oc/kj/NiBItbmSaZcFJwWLGQ5yAxHi6x1j1eJ2NDHXaD awR7xJbOM1bI+JD8RFsXYS92uy+J+pOM4wW95FkJrujcZuQ5Rcbno4dIS4S/ s74THvkjZPzstmBJLrEfklRKzFofGW8n2S7sJvZrXGj/xaSLjL/blnx5QOjh ZS059riVjF+R84VTCb1eLrcI9tSRcdMxx5F7hJ71z+7toFYSz/ee1dpB6L20 w+iMZykZjySzzGcS8VDq/huen0/GflMrlFlFOjjiV/BpLYuMv5zNzF4m4ucv fbnH5B0ZW1wSeFNPxDe1SJXtSTIZF0Yn/HIj4k+zGd7ak0DGajXuSY1EfqjG WwV4PiTjq6y/FheIfLLYJZyaH0bGRw4WxecT+RbIqGteu03Glg61DyE7kQ8y BgpPvMhYfUL5TA6Rr+EJ1Mp8azI2ePgyj2OUBvJ2902tmZNxjM7NThGiHgZ7 YsUPHiJjXvaTR39008BOMq9bjz4Zv9Aespgl6mn8+Rz3uiIZnyy323GBqEdx /XStg2Ti+djRp1VEvcJvzrZPxAk9LZZ8R1/RQBylK4PKRcaMrsKxO49owOTF lyMHp0k4hEsxWJc4D+YefvvLPkbw3eX8G8R5kXDrT3r5AAmf9O2pjbalgenT u7j20Em4gV6Qvf0gDUQp5SP1EhLWubeh+aAiDeiLtV+YzCXh2F2n1aWlaGCU bYGclknCR6dl6ov4Cf9HNf0Ukonxo2kLF5bbQH/aB02xcBKe7K5Ke1/fBsLj Gvpbgkh4/7enj9hRG9C6NxkRcYOEv9ZoaGrltoGQ85snOC4R/tXg7+sJbWCL +pvkFUsSLqaTeHzc24BvznPRfioJyx1Nmm5ZbQUKKSU4QZaEk5a2BBydbgV1 0YyL1lIkXLKkJvK6rxVQfKQaWnlJ+Dz1yluMWkHFjug7lfMyeMJUcP9YUCsQ /HJ/8R2Swcdavrd3/GkBqbXXO73tZHD4RW7HkxlNIF7b1+i9hQw2y+17szmw CUS88PrYf1gGJ+ndMHhm0QS8vD3um0IZ3JruP3fibyMwkD+1V36jDG48Y6Vr ZdII2n1hav2sNFb/p/u4u6EesKpw+SoGS2P7/J8Ng09qwa/HbMNWN6TxmTwl OQ+7WjD+Z/1oxFVpLB2u+Ou1ci1obltRXXaTxjsbePfKFtSA+IDJvsb/pHGA uGrDoY5qoNnRdMBPQhrLJJ58uIGjCjiExEi0vJPCfzySuprUMWgGS1x+r6Ww 1yotNXMEAfDHelUhUQp/uWMXfvQCAgpe5AGvR1J41eCnvElAGRg6/fqdpK8U Bg/Jd5XiSoHbno97HIyk8MwmjVs+JUXg4s8Gx5k+SVwWcENtY/FHcOsMWxaf mCReX3PNqwqAiEVdHhmFimMtx9T6oK3l6KakoUPoLXFMYj7+kHm1HC2vO/2r uSaONU1zWfCXcjRLS91z6Lw4bv9+uizmaAXq9dMoMj8qjj2SLb7+uFKJCqoM Pp2SEcfq8KfArY/V6IK9fcq1TDHcdCs7CwvVo/EDt/YVp4phnZ2xDZst6pHL tqTvq6/EML0r/c6puHpkyzoifytKDNd+2v1MVaEBHXznkRhyTQxLRlBktqs3 IuVF/6dPDMWw8MfDK5f0iff3B/F3MzpE8cr2U12r4m2IXq3w4UyLKP7huTiq pdWGGtfTWiXqRPHbayN0k8NtqMy7QCawVBTfy+GSFgptQ6/t6BkWKcT8AbN2 1oU2dH6rQOu/y6I43uyxm/5XGnJ2jVnMOS+K/aoyIgyGaMj+FVnG3UUU8ww3 06X/0tARsS1ONGtivVdRL+y30ZH2H+PF1L2i+LrCGymRGDr6Ux8obc4vikf0 lOCsZTtaZOc24OAUxfSDl2wuXWhHs3sfOZasi+D4LD6RmpB2NJjzIl15QQQ7 iHibLeS0o6qEEv3fDBG8K6fZ/oBAB4o4v3jmdZoINvxY4RhR3IFC39wItU4W wZo6RZdMmjvQrX7WdP7nBPvYjNKHOtDl4yILvpEi+MhhQ/YzfJ3IYrdG6H8+ IjhSLJRvr20novC6v1/cJ4K3yQ2r98x2IoeyxgglfREMn1F3cbN2oWQvrcvm eiI48OXriVXxLqTSu7r9wyYR/N9NEr/67i607cPDKmd+ERy9lbqtNKgLeZ35 mfaEQwTbOJF3cUV3oTxx6wdoTRirZ47Fib/pQjsDFI6T54Vx06W/e3yqu9C+ I7kDtA5hfMm7xM6YoxuFsEpXsrQIYwvt/faJ4t2otuBmqsZXYSxccCEkh9qN zOSNL9wvEcbWFp/3yhl2I6u57lXDV8K4+sFX+Wm/bhT3xqD/UpwwvtMgKKcf 1o16bV6Xv3gijA1rInYeiu5GZ8o9wn/fEcZxm5VrX33oRuei1iQ+uQvjHxZB D1W/daMPxs6/+x2FcUr28Q/OP7rR7GrtN347YbzaaMBi+7MbeTk/SXE/LIxt Un44+HMxUJ7UUlisMWHv38hSiggDLTfYnq8Cwjgo378/nMxAN3WVtRS0hbH0 m8AvdzQYqGw8XPzIVmF8KPOPcfwOBtrwYmb5hrIwnuVU2X8OMlAYR2FZl6Qw 7t1/tGrHMQaSy4yOk1sWwn+DWlXvXWKgFIlTp/0nhDBlxjHB05eBNt9SUens FcJSA3tHuAMYSOtoce5DLITPLoTs87jHQAWFwf4TOUIYJXUtaz5ioN0KZoYH 3grhGfFDX7NiGGj/fH/z33tCOLnCiY32koHqTr57anNTCGtlCYhfS2GgIxVX 7PMuCuHDQ0MP6GkMRN+yhyrsKIRzPwWBHxkMZBPNPulxQgiHPN/GnpPNQH1/ mj7WHhDCqe3d2Tq5DOTk8uwadacQftgiLONZwEBjjWf23t4ihN9XiErZFTOQ h94Wjl6KEGaoVQSxlDKQF0dxmq+QEJ7itW47VsZA/h0mh0RZhfCk87kZO8xA wW87pzMXBfG38e+f5CoY6L6P6yPTH4L4srfJn/hKBoo6sKg1yhDEHddQalMV AyVI3GkPbBTEq1cFo4qrGej1qMg1ChLEjs5xz0/VMFB6fpJM0SdBHKXk+LqY 4JzQbaUn3gjifyP8YU0El1iWOTBjifUTBlXiCa7YeHjDg3uCeOPJClcKwfW/ elNUbgriXdW7lK2J9WnV540rLgriz76X95sS9nue/h4/5SiIVRy03/8k/B1y DX/w+4QgfrFpVu9EOQNN6ElpPDUWxCcT85vPIwaa40ht1dwliCtY99rs+sJA Kx263o1bBbFAwGBhWQkDsaRWSrjLCWJjtwT6aiEDcfseL2ITEcRTmQJRM3kM JGz83fYVmyDu1Qrqif3EQNKSl//tXhLALFLfY5YyiXwpeLjPq1cAd7GdYGW8 ZSDNMMqoQLMAzkT+4XbJDLTTKuPueyyAjadKVGISGejg0tfGwbcCeGMHw2ZT FAOZ11hfuhkngAViOKqDIoj4x46JSD8QwGunRn4/CWOgs9vZrY9eFsAfrCN8 6NcZ6CJn9O9JJwG8yWc4nt2bgXw7FRPDLAVwMyfvvikPIt99wfcvuwVw2l/l wW57Boo0br5zUl0AO0vMFw1YMFCs5CmVX/ICODpCv/e5GQOlFvh7qHEIYJ++ o3U6exgoK4xH8OsyP84wMgwQ0iby3Sruo/MkP254yvFf0mYGqlnK/5XQwo/T lXL5vosz0Oj2+ds8CfxYS7tfrX+iG01zBiq9jeDHqoFL+Y793WixU7Aa3ubH AQ4fZBJo3Yj9mhqvnws/tvSVd1At6UbKhWdjxjT4cV0UDCgP7UbOO/rfVVby 4WEBN4cuwW7k9m6HlXEhH/bvsHYoX+9C52WesNWl8+Et75bZz891oct/jBya n/Bhv8e/Ty63dqGb6L0Y4zQf9vi8UMf6qAvFmPjcmv3DiyMKutKH1zrRs6Lm rVeYvLjdutX381QnSlDdzFgY4sV8Z3dfPd7diZL4enV+1/Fi1X6VnWUfO1Fm C5xgi+PFB8LeeEU6dKIaa34LGV1ebGB7rkM+qwPVfXXdkLiJF3uHVa/Mx3ag xl0oS47Mix+dv2AfcrsD0chePMqsvLhy1XL35NEONDDQVabRyoPrT2tUl860 o5WzKar7PXnw0bekc1Gy7WiL3+71i2+48Wev7QrVR2gI9x3ZMhzLjSV4A05r qdOQlZGzpfU9bhz8wGnWio+GggUjMsBFbvxBROhzc00bYrzpsxbeyY3lF2V9 fXe3ofC2wI+fGrjwPcGnvXTxVjS2pdZx8ScnhuYUtfcaDejm494I91FOfKF7 9+i7nnokusQs/NbFibXNtWpVw+rR3nJpwepSTiyXf1v9U28demp9vuRpGCfe QbIcHA38ivaHCIjtIHFi1hv5za551Si570TVdUMObPvJv236LkLaI9qr7boc uNle++D7ljJUNSmiqbmZA/ekb8pLlyxDY8stz8cEOTDn0OBg4OtStEXUzPvE N3aceXe/bMKnYpRjvF9J/Ro7lkxlzgZl5aKqbN3AwQ9s+ArvWZJcViL6ESSh byLNirkzhTc0h+aCkqebD4xb/UOfja+2/Q5sB5oTjMVtL5bQ7tiYItXx7+Dq nLqqVMgSenXroYgP2xAoWg46tXZ+CTWP7ArIkRsChpxbahp3LqGu6r91rJZD 4DjV/9m59l8oV15sagEPAZ9TpN0pfL/QRePPG2efDoOSNtvbkv4LqN9J5/qS 9ihY687K/XdmAe2dq0jeZDYK9g2yjo+YLKDSV5bL+11HQcNsunmuxALa5XXu qtGzUfCN74+i+aefyMtqqO7Q6ihYP/C86t74PHL0uDlnVzoG9pf08vyzmkPG m99ttdk2DrLS3+6q3TOHRLTN9Z6bjAPp55fOPVGYQzqRrnH49DjoXOaM+q+d iVrDKxI/PRoHG29YCb9YnUXaExSeTbPjoCLoFz80mUE8bQ+f6rydAH8jdTjD BicQx5TbxuDVSdB6qdaVlD6B7rxaOvRJcAqkmNtVZ3lPoNFi985SpSlwSPRO SBfnBNrsMuvlfmgKxD+lsaqqj6OPO77JCcRNge2JV9Ybro+h2v9EFN3VpsHl 99krImLDqDx35/qJnTNAU/DinX2DQ+jDuZngL8YzYN5LTdA7cwjpnyLT2Sxn gJf+e2q7yRD6AfIuqFyZAT4tr4/E3vyOZn+tZeC0GbAwudVUr3EATbt92qwj OAuu5r1ziHUbQDMbhC+eIs2CpYCNV5dZBlD+6rl5J5VZsCIs/6pYrx+lixdY rxvMgr/bRX8ZvPqGUi/Y7LrhMQs476wkGXsR59yN8klPNAvumvkUpPEzUOhl Mx7DulnALfmzgTutG63s4aMwabOA9/3UUn1vFzKMsu/oHp0FQi39ZkcPdCLn Q/ffD/IwweM4O6ePAx2ooeTv9WBRJhB16r4m4t+Bknwd8/6RmED8V9trelY7 ii3euylwKxNIk6tXrKXpiD9lyCr3EBPEjxgKFufQ0KBZWI3ccSYgZZVRSYdp qJeTZbPzSSaQNSw68i2oDckXdt/zPcsERs1WpuWdLYhk9Nu2JogJjB3Nr97h a0HzBzdOLN9lgoOLpq8OwGaUe+MSG2skE5iRDH7VvW9EDyB79qt4JrByoybT btYhrTye/PUsJrh/xTs8Kv8r8mnOm+7NZYIvNysvHZ+tRRWTkRNPiphAOdp5 L+10DarS7hV+UM4ENi9zN0bFVaOL91m2NlczwYP3bALH26rQX/vPE5N1TPAT pfS27atEznssd3xqYwKVhoWKJzcq0JdL4kW2HUxwstMo/Vge0SdFqJb3dTMB nh72a9uIUUqlxInLA0wwzjyLlb6UoaMNf1puDzHBUU7uR681viD+LMsv7qNM IKdzUO21SAm6txjSXjPJBKGm46uKd4qQdET84p4ZJtHPh9clLxYgVv+kK/eZ THDCd3Ocols+ckfuJjnzTFAS8dUtuSsX3Y7l8spdYALFFHc9RdMc5OffPfPw FxOEF3OzJ5d8RL0aAYWGy0zQ/+rYW0ObLGRZ09fQvMIEmY1P9hnuyUCr7zZv 1ltlghu/2wag3Ds0E0+ru/qHCUxVRAPghrfoQWls1sO/TCB14jgJjiSj9Tjf 9tv/mKBhXfnS7cgX6KBCya7/1pjA/eTb97csnqHMbOY3JsHsuRtHAkhP0Cex 6dIL60wAZcwMVnEocrlf311F8FxcvMt8vBfaVT297RfBN1ljqo13ngTGk6vl awRrJDjXim+/DWZihiO/E9wv82mWTygCcHX2xr4g+IROd2mYYQzw1zndo01w AcM6+O6NBLA9bZttMmFfAE9Rq2yTQOELS6kJwl8QnRFWdS0FzCzIi/ESfMXN Y6IqJhVELVKPshP7e71rq1n1p/fgn4VBUxehRzv/VFZ18wfgohX5KOQ3E3AO povUTGWDMO7bcbyEfokn9XY7h3wCtIKyyXNLTKBn9NRjWDQX/Lu8797rRSZo VvuV6JycB7jKDlzL+8kELCz5685lheBGkrS5yyxRLxPiWiNmxaA/uWwf6zQT aNOvOrn0loDda49jrk8wgUuqbrXLyheQjT3cF4eZ4N+jmKWRMATOzN1YXB4k 9Ndfjc65j8Hv37UL7X3EeBXbam2ZCsBM2uhM7mICTTJvv9dgBQhQvDQQQifm C5Us5aRVghxVlx+1LUwQ+1tms872arC+ivN7apmgtpFxX+fEV3AgLpasW0DE 06+n1m5rHXDjl+fa8IkJuJV72UPY6oFR4MvVpAwmOHTj26323AYQ6ty9yTaJ CRpVB7x8xFvAF5W7izlE/Xp2DGS/mG4BNrE+vjJEfYfBy0tOTq3A1qfM7YQ/ E2yavqzzYHcb6Kh702joSdgz8srsnaSBwCRXW94jTLAz/mcD04oOiis1fgsY E/aZXpNslXTQ53o9ZNSACd4neG9Se94OlJXepgqrM8Hk/NXkm/91Ar84M+mT xHnmmXTtqewHBggwqGJUFs8C/aXlXC3pHnBHPX6HUPYs4Dfzox0I6QGHKEer tr2ZBZnLfkIX7XvB8fehtXMPZ8HsEf97Zfx9oEt/Tdzn9CwoulVWlr19EPgY pcwnrs6ApPdrTcWeg8Bzg+2Q8cwMCG/f21f5ehB0X1J9VTswA2y2oD9dgt/B ZLfX3OGqGfC7A+1k+fEdnKEZql15MAN2q5fnmD8bBua6l5fURGeAXntnbFnd MJC4y2bkxEbcNzem/dX+DgPTiw9P+yxOA5U6KSNuxxFAsra9ptc5DcRcL9LR llFQHmm0QyFuGkwnkhc1ysYASyfrhWKJafCK31dPYHQCjHH/S6StTIKE3Acy N6QmwWmNFaG/o5Mg1jb537jpJGgerdjDRZ8EEe8aq6uyJgFdrse08sMk8NtP tbrpNwVqms4odDpMguM3W32n+GbAVhl4NuzLBGD1lfjmIjMHNm9aPSXjNg5s z6TTinTnQLVEHt/3w+Mg5xCo4zefA/29AZX39caBk/y5grywOfDs0w5qKDtx n38tfcy+OAc0/5lcJCf/AHfILgfeNM+DoMJss3/tY4C9PCdr+M4CeFfUeYGk Ogq4+M2DnGaXQNDumZWAR9/BncFOI6+Uf2BmJ1Ois5kOPj4PM7/1cwN0DP7g ZkUpAA1iYT+EWFjhnvlWng0a+WDsQeitZAFW2BEgt0cJ5gHKzZAPVZtZoVHh Xp8W1xwQbh/MzXeaFVZ6HDsneDETnJG9hZ81sEK/Qx829dS9AMKvfDQ/vWGD Wi+q9yYmJKCtUj61+3LY4JLSUztdvpfI+NFVh3bEBkUFRLZGlCahm7e9I5Z7 2OCBlKbtlipv0PjpK+MGIuxQ6pTjfupEOsIKF5LqA9ihc1Nm2k3xPHTptYvw iBUHtAt827D1NEaR1+MTI505oNhtdMyvBKMs8+bNuy5zwAsdcNFFohzNru0w jLzHAdMiXZ0o9eXI047Pa2cpB/Te3tC/qFGJzovn0CMUOaGm0rBw12g1cgtb j9Wb5oS7ZDqlR9kbUNgpXergCid80RIXvPNEA0rVPZd9n4MLPjbmtqckN6DR IVrtgBwXbNiZnhq9pxG5gNSVe8e44Aetc826Hk3IacXMtr+AC36h8O0ay2tB DucTZO8GcUObthz5j8tt6A+Dp3n+ITfUyuFcGpCkoTjT67fsE7jhnZcngtv1 aKhts82AVi43HP0Wt4XPm4b2/5BI/jbCDdW6SR3pkzSk6vJEWfsgDxTfNMkW 20xHNXSWjkQLHtjGoiW1YZKOnIwuh3I58sChqq8tGhztKFHp6Ni36zxQO3j4 S9vudiT4nf/d3QweeHbnnhDtlHa0eCp8a58gLxwNeyRg6t6BHjct95qQeeET 1/ANNKLfUTc4G5GziRfycO3lpjzrQG4U45m7kBfWv8xc/VnVgRg9bNnaXrzQ qfa4abpsJyqzvq0d3sELVfL1vmtUdiK72tmhn995IYf21v9wZyda2e4QfWqW Fx5yts0XmexEWpIGi9pcfLDJ2sV6UagLvWlfze/byQfFUuzuFdp0oXvHfHfp JPJBfUMbTvX+LhTVuMXzw3s+OLLjwEEeZhdKNBl4ubGQD4YIn7sTT/STHw0O skvT+ODPiw1NHfLdqFuV1PKXix9q7DTT+2LfjYbeNG/wleCHMdynynZ6EP2t /B1dphI/DA7Oo7pf70YsktPx3w34YZ3O36ChmG60mbXMpcabH2pm7s448LUb aQd4PQNB/HBbw/S2M+3dSH9Fpb4okh/+eHczSWOwG5nPPtqW8Z4fhqpttf2x 1I1sz+13Ui7khy3xt7LbNjCQy8hKzIsqfpi/Ks1zmXgvvdbjuPpogB+WSypO fFVgoEBLSXWeGX6YvN046M4WBrrfWn86eJUfGmcoGP7UYaCXNTrVVyUEYGLY nNP0AaJ/z+F4fPI/Abg5RDnYwo2BWtVLKmg2AvCV7ZHUTxcYqOfdxV//uQnA eYGRk5VXGWj2ZZft3iABiKtIH9mDGWhFJuJhYaQA7E9pvaobzkCsTyHWTBSA UXfJAjKRDCT54P1GaqEAtFbkYN8Qz0AKnA42iVUCkMOCcp/9JQNtCRJ9IEET gLzjRdpfXjOQ7t+aL5EDApBCNxLbmsZAe6/dmOOaEYD/FlsNj2Qw0MGf26hB qwIwp1KuQyWbgY5fGLFc5RKEG5eejuTlMJD9eFy4t4Qg/KZmGr6Sz0Cuzoc/ TysJwhfxi93zRQx0sX/DrKumIKS8/cdM+sxAficLFAYMBKFxtNcPjjIGCm4/ f8LmP0FYtZG3RwEzUMRR+bA2G0EIDKjD8+UMFFtPLzrkJgjr/arkrlcyUNKB 8KlKb0HYR3/+vqCKgdKxvpxBkCDE+9aS0qsZKG/PvHlBpCA8e/iHkmUNA5UV vL2zLVEQoncrhwsI/qplW/DuvSC81HzdsJlg2gfBCcVCQSgZbS37guBvmyrJ z6sEIctnKiuV4LHX146I0wSh5UNxkTPE+nOyakEPBwThW1d2TwvC/mrcYC7n jCBU3X9Fj4Xwj1386djtVUFoZX/zsTPhv+jsLUFRLiG4nqTqkIwYSPGr+/Y3 YkIw3pDbLukLA2m+Pu6wXUEIbu6Re3uG0GfvTf2wr2pCUNV+1naI0O+wlUqW 7S4haF585fnGAkJvTeHO6QNCcN9D2bAtuQx0fWR4o8hpIWh9WL7n+gcGCi9r OpziIQSdP3wOqXpH6BdX6KPnJwTz8vjt294Q+pg9qD75RAjKG9+R1k5koAoV n5mpF0LwdmLWvrBnDNTGclriVroQLLwRT30RReRfnrbr60ohuCBJjxMj8u1f JOWhbqsQjDzU6+NN5CP/Oc78mm9C8IWOxPPYmwykKtvDPvVLCH6QS7DYdJmB Ev84xu7dIAyvyRjrPT3HQCnjVul3uYSh+fzIUo0TA+VUQJqMuDAMn8sr8bVg oOJsvTEnkjB8N/+d/5cZA+HELasZCsLw76eVgR1E/bT4iivtVReGAZzlmXx6 DDS9ZfyKk7EwdC4NCJ4TYaBFqb7QDDNhOPtfgvczbgb6w06LXzwuDNP/Vu9m X+9GvAOfy8NOC0PUJre2baobbYp+JJLhJww/5zy26MDdSCMwZOPiLWEofZEx m53fjbZfuL7LIFQY6iz/aDmW3o32mzg7tjwh5tdnqUxHdSOnP9s/LaQLw+tU z8BAx250bnxrtf4nYXiccistwaIbXe5QYIQWCkO1H7lJASbd6HY27wbpKmFo +my286VaN0p07jfX7xOGKv2JnBaLXairIXQuREgE3ku1siu63oVi9r44YCkp AgvvFd6Wdu9Cxz/lJWyUFYE6CosNe6y6UHPs8P6aLSJQ1Fx/Q5NWF6pxNIzn MhaBclod64pjnahg+a/h/ZsicKZx+3y3USe6el78me0dEXiQ/91SpEYn0u7b Or3lvgj8cLd6nl+mE2VV2MY2PCOeG7EJOM10oNSHRZP8uSKQNvWm8Xp0B4ql Xo1+NCECXb4duveuox1ZxD4YPz0nAje86Kpn/9KORHlSDDSXRaBpS8x+jTft KHK27Ucruyj8frsTTF5pR2HF2/RFFUQh+fYghzBfO/I9OjUSYyUKWd3tohx1 6cjyhtP2hEpR2HWqzOutaxuKfSHOuVwnCiPPuSXbm7ahTlTTcaJVFNo8o2bO q7UhK/atPgJ9ovBzcWpiwUIrsnm4kBu4JAr94ecPebdbke2rEK2zqmIwyqXx 2hNqCzpTmaqm+0gM2ufGOKkYNiBPvimlZltxGBe30nltqQLJZ9TEck5KQLf8 ny9Y+R8ii1dFxfVzEtDg7vuuoXPh6H50+rfIZQnoFRjZNvn1Dlq8EakkxSEJ QUdiqImED6o3s8rapCAJYycC57PuXgK+s6PVB60kIff+Nx6qO2NBkxbHr/sV krBMfNH2FlsmYFVZljpaJwm7l+Nuj1GywE7SxG6xVkkY0ezN/lYvG7xmbQp8 3icJG0vEJyJyPgI/egz/hxVJyJXDrKzrywHKPsrKTRpSsOQRMlZTIvqyIqMT Qs+lYF/MdVvlkwho27fOnU6WglEvHfUorQhMrttHfkyTgvyFPKHHqRjYmvjW HcuTgu6bs5q14zHY3fkOxDRJwU706rBRcDlYWRBQk2GRhp/ZIwe2m1YC323d 7FRXaah8SIxMTasBGnSX194e0jDP4IR7RU8NGPOdB1VXpOHjm78ukgVrgWUZ 7w3XW9LwNb1lfcW7FugeNphPeyYNpe8rl1npfwUL51/3qdVLQz0bu2QjVAcu p3oWbN8mA1stQjKMHjSC/hbyU8HtMvBZ2o6Jb0WN4PDveu8xfRlYpJFSITHW CLaYqWrFHpKB/PduZrmAJjAyP5rxy1UGrht99/acaQLWBqeT8xJl4FvDkI6W 7S2gxk0wMCJFBp5A91X0HFqA7uMvDi7pMvDlTn5t3dAWIDxMpogXycAYnkeq a20toD68O9abLgNvlsfY2uu0gr3txyK0eUlQ/2hwyL6yVvDhH4sHrwgJyhwT SPrY3ArImz6aDkmR4I7zrIYT/a1g5bogV9RGEgwOvBdVvNYKcuQbguYhCQoa S4nS97QBBVP/M3UmJNhxJO/nk0Nt4JGXKkg+QoLiYrfOkk62Ac/qu3/N7UlQ 4GJh0l2fNrDRY/+1j9dI8GDjGf/WjDYQE7NgGX6LBKXyMxUYRW2Atey17plQ EjzQ9/BJenUb6Bfe8FMomgQ/3RPyT+tvA3EFXzwvZZHg8tn9JC5BGuAc9PzP JJ8E2w+vVp2QoQEfHsoW+VISFGY8jnNXpoHj9v4/musI+8vuPpO7aICfdYeT xigJ8hVLGx92ooHia2wnxqZI0GRfmnumBw24zbQYvfxJgifYXI26rtIA7nbf KMhChqkRIgt3w2jAOzthfIZEhqba+6Ts02hAYeNZxltFMnwlcojOnU0DjQk6 9ac2k2GB8NTvWwU0oBLWmNGkR4ZK5Xs8aqtooMd+7WKmORnmtvjrf+2ngbu0 +tOu1mQ4Vfo8DY3QgO7BZ+ayDmS4nLpkEUj04ZE6mtoPPciw8qjmhVO/aGDP +79KB7zIMP3KdPv1VRoYl6sT++dHhp2yL/xOr9OAIa/TL88wMpS6/tM7jJsO Zm9rjCk/JENKqlhTLT8dJPxa7fwWTYaPpZVcacJ0YOJRWxuTQIZa1WZ7U8Xp YHEwusgsmQyr+yztjKTpINnqzHv2d2SomxqF3pPp4EijWkJpFhlePTZ1kSFH B+8Kq2+olZLhbOXF8hhlOrBUj/IcqSBDe0mTSwqb6IA1xeFUYh0Z1vDGBvio 0kG29NYjFq1kWDotvxD9v/9zRS7v5e8iw0vju7tuqNMBD3vVtqo+wt/uZi31 bXRQcP2xws0RMrwvZMn3TpMOnJj2IrpTZNio2u05rUUHQq6qrNPzZHiuZeH0 qjYdlPb8+pmyQugX2D7bpkMH7uYVw3brZLjp1A5lb106kKiJbBfjpECvH+f4 +gmu2GNX3cBPgfl1ph9F9ejg0qdNBXfEKJAvfr+8CMGUTYupe0jE+BhrVwYx vi4RP1tQoMBRN6HHHgT7ij4Mz9hEgZojdzNrCXvU8JPXnTUosLfGo3GG8Kf1 38bzZD0KlDi/+KeP8DfA+6ctfQ8FyoRO/BdH7GfLRNl/D/ZRYPxwUiOF2G+X wwN9I1MKPEJei/Qg9Ahpt1b/c5QC/Q54vQkh9NI6pCyXa0WBM1l/5NwJPfvR nKDHKQqMfLRRRJLQ+4Hel3UlFwr8VcAVGUnEY2fGvbme8xT4zdD4fZsiHYwq WH2PukKB7w6IXBsg4hcVq0Q75EeBQbeU+YuI+AJ+ZgXrbQo8+K8mwI6I/3TQ 59ySUArkaq3/Xkfkx4ELFk+3RFNgT/xCD5cAHVyN+sxyKZ4Cp+qqTRV56OBN oZJn7isK5G863cfPQcSfdX6f/gdCv4uowvYvDWhvsskKzKHAKhEvgy/LNOBo hmSqiyhwUKBG4+dPot5iH84dribsdcQ30MdpgPl50S6qgQJ1WgxSAodpQO67 XW1nGwUGM+tNWYj6Cdi65eXpfgpMyjt0xo9GA7txzX9XlilwiCPj2JFiGjg3 ql6Y/48CRffH6cfk0EAc71OlVTZZKJ6zoSQzgwaWLZx/BwvLQrJyYIfdCxrI m1hPjVGVhe13TEPTbtGAhtgu1iI7WdjT21QsQZwfp3YmXfjrKAv7+3unkrfR QMQpLgZ0l4U5Gr5BbCo0MJXWkV13VRamcWXYmIjSwDt9r1O9D2XhJyMWy47x NkB1yyhaQ7IwNFs0ZXNkGzj+QFTZqEYWPvb9/YsU3AaCP15/dLdRFurtv907 QpyXg6smbsIMWZhg6bO0bt8GXj4aEVP6KQtNe6+lWau2Aeli2UsHlOUgyTF/ MrukFaw5p5FFtsrBsmgtqYX0VjAiqPX1m5YcnLtdXMTzvBV8dNmveBXIwUtr jB05/q3ARNiD/tpWDk63iJgu7WgFvmeLdrA8kYMHRZocVy1aQIfECZbP/+Tg WtUdL4ehRlCCv30IY5eHW6j+ZWnEfZbk4XbyOJ88zC+/bp4W2Qg8y6/nTEjL w7P/+bk07GoE7BeSXKR15eGUda5RQUQD0K2a+epznhj/9HPF4431IMor/Ilm lzxkUF1dDm6qBauNH4rC++ShVpoxKFupAU6b2gYGh+WhRxApnq2+Buh8k9F4 MicPz7VpoTWPGjD52nJ0hV0BLrKaJ1VlVoMI/h9BJ+UUoLcV+7a1zVWgeYDn M+mYAhzsk3qRt6EcHA87qv6iQAH69fy8XJGTB7bYhVi+CVCEazr3Lj06Go9O XikQZQ9ShMKv5lvNZJ+j8LvjLc4hinBSZY+Uy2QiGs01O0R9oAjtKmwOGxsm oSR+CfA6ThHebojmletIQRJlbzcn5SrCjVkWOecm0hGLYu2f5xOK8B7bzq3f T+ahbTt+F/2ZVoTm+wr3N1TnIYfDW33t5hTh/PfuZVetfPT5+qM50rIiVPOO ynrHVYB8adaj8exK8FpMrc7+j4Vo6s548zN5JSikdfRf31wJ6hzjeR1tqQTX GhyEpGIwqrG4l1hsowT5++KduzBGBRXczwbslKDfVYP7bjMYxb7kitjqpATf iZSUMg+UI0srDt/Ki0pwZT248/ViOWqvZjm0cFcJtl/VeL/9YCWivVmeP16i BF923JsLr65GFaLXpv2+KEGFaOYZj6lqlBO4NPYSK8Gr4oxNIiI1KMr+V+9k jRK8aF535a1dDTomvlAdTFeC2wz8N47P1KDWO7PxOdNKsHXQMukJ51fU7DRq KCpPhfSp7CFvznoUL7b07YYSFV4HSXrpKvXIpYrTb3QjFd4PG8+KNK5HfzZu zipSo8LM+ITBM6H1aPPEedLp3VToK+fLp7Rej4Iuzf3MsKRCP+15XsZQAzJT 2BApcZIK9asWclr+NSDpNhHV2/ZUWCa9mXpZuhFlaeucPu5MhbU+JmczzRpR zy+fhpXLVKKenrCLfWpEujf/pByIoBL3xbqE7bkmtK7GD7IfEeNJHKm0W02o vo/SIx1NhevhCknz0U3IEewVno6nwhX7BjmlL00okjXoZlQaFV7m/xdzkK8Z ncx9IvU3nQptfz76wpRtRsour3Ncs6gw/shFNn3NZlRSXTm+M58Kdb3MLSpP NKMf4ZyWAxVUeE/8neG92GaUs0tq7mANFX6UtAixTG1GtyY3Pcipo0KOzG5G dX4zEjczLQ9tpUKNPX//i6I3IygUoa7WT4WuJ0kXunhbEB9O/Pr0OxXK5WWc LpdqQZ2XM53XR6gwUePMiyPKLegCrTmeNkWF3M/00o/rt6CEpyKc139TYZT/ QfH1sy1oKKxCMZpgS+qTDYfdW5Cqn7dBJsGaPQ8YCQQX2XZc/U7wyo5nptvP EevLxw+brlLh2ArrFs/zLUgsXaGc9IfQK4A0TfdsQRFl226W/qXCR1bpV6Ov tKD27MFnnQQXXuEp6ieYnPwkd47ggTqpMVWvFpR+Z2FS+R8Vji8bsmKCvx4s PPmQ4Axct3vKuwWx0/fucFijwmy3mA8Gvi3IrIp53I9g8fS+hLsER+cnXYwi eGd/u3cbwUpxrKk1BNd/ahx1udaC4Kka8W3rVHiCd7Duvl8LCj9yTdOU4Pf+ sQLtBLeAzWbOBMftXt0je70FOSjdv/OM4KQ9dTbZBKeK7Xn1iWAPe12TFYJn 2adLGv4339dMwdC/BW1fSuwcJXjkisjIPYL/3/dY8P9/j/V/66AUCg== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"x\"", TraditionalForm], FormBox["\"y\"", TraditionalForm]}, AxesOrigin->{0, 0}, Epilog->{ InsetBox[ FormBox["\"BesselJ\"", TraditionalForm], {-8, 0.5}], InsetBox[ FormBox[ StyleBox["\"\:8fd1\:4f3c\:5f0f\"", 10, StripOnInput -> False], TraditionalForm], {5, -1}]}, ImageMargins->0., ImageSize->{313., 145.}, PlotRange->{{-10, 10}, {1, -1.5}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Automatic}]], "Output", CellChangeTimes->{3.4113561671428785`*^9, 3.4113563907538786`*^9, 3.4138061881766467`*^9, 3.4138591345792713`*^9, 3.413946067024*^9}, CellLabel->"Out[22]="] }, Open ]], Cell[TextData[{ StyleBox["\:4e0a\:306e\:89e3y[x]\:30681\:6b21\:72ec\:7acb\:306a\:89e3\:306f\ \:ff0cy[x]u[x]\:3068\:304a\:3044\:3066\:6c42\:3081\:307e\:3059\:ff0e", Background->RGBColor[0.671885, 0.972671, 0.898451]], "\n(1.9) p.27 \:4ee5\:964d\:3092\:53c2\:7167\:3057\:3066\:4e0b\:3055\:3044\ \:ff0e" }], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"2", FractionBox[ RowBox[{ RowBox[{"y", "'"}], "[", "x", "]"}], RowBox[{"y", "[", "x", "]"}]]}], "+", RowBox[{ FractionBox["1", "x"], " ", "\:306e", " ", "x"}]}], "=", RowBox[{ "0", " ", "\:306b\:304a\:3051\:308b\:30d9\:30ad\:7d1a\:6570\:5c55\:958b\:3092\:6c42\ \:3081\:307e\:3059\:ff0e"}]}], "\[IndentingNewLine]"}]], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"s1", "=", RowBox[{ RowBox[{"Series", "[", RowBox[{ RowBox[{ FractionBox[ RowBox[{"2", RowBox[{"D", "[", RowBox[{ RowBox[{"y", "[", "x", "]"}], ",", "x"}], "]"}]}], RowBox[{"y", "[", "x", "]"}]], "+", FractionBox["1", "x"]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "10"}], "}"}]}], "]"}], "//", "Normal"}]}]], "Input", CellLabel->"In[23]:="], Cell[BoxData[ RowBox[{ FractionBox["1", "x"], "-", "x", "-", FractionBox[ SuperscriptBox["x", "3"], "8"], "-", FractionBox[ SuperscriptBox["x", "5"], "48"], "-", FractionBox[ RowBox[{"11", " ", SuperscriptBox["x", "7"]}], "3072"], "-", FractionBox[ RowBox[{"19", " ", SuperscriptBox["x", "9"]}], "30720"]}]], "Output", CellChangeTimes->{3.4110442268632*^9, 3.411355840740879*^9, 3.4113564022228785`*^9, 3.4138062557126465`*^9, 3.4138591411172714`*^9, 3.413946082082*^9}, CellLabel->"Out[23]="] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"u", "'"}], "[", "x", "]"}], "=", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", RowBox[{"\[Integral]", RowBox[{"s1", RowBox[{"\[DifferentialD]", "x"}]}]}]}]], " ", "\:306e", " ", "x"}], "=", RowBox[{ "0", " ", "\:306b\:304a\:3051\:308b\:30d9\:30ad\:7d1a\:6570\:5c55\:958b\:3092\:6c42\ \:3081\:307e\:3059\:ff0e"}]}]}]], "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"s2", "=", RowBox[{"-", RowBox[{"\[Integral]", RowBox[{"s1", RowBox[{"\[DifferentialD]", "x"}]}]}]}]}], ";", RowBox[{"s3", "=", RowBox[{ RowBox[{"Series", "[", RowBox[{ SuperscriptBox["\[ExponentialE]", "s2"], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "10"}], "}"}]}], "]"}], "//", "Normal"}]}]}]], "Input", CellLabel->"In[24]:="], Cell[BoxData[ RowBox[{ FractionBox["1", "x"], "+", FractionBox["x", "2"], "+", FractionBox[ RowBox[{"5", " ", SuperscriptBox["x", "3"]}], "32"], "+", FractionBox[ RowBox[{"23", " ", SuperscriptBox["x", "5"]}], "576"], "+", FractionBox[ RowBox[{"677", " ", SuperscriptBox["x", "7"]}], "73728"], "+", FractionBox[ RowBox[{"7313", " ", SuperscriptBox["x", "9"]}], "3686400"]}]], "Output", CellChangeTimes->{3.4110442305572*^9, 3.4113558463148785`*^9, 3.4113564055908785`*^9, 3.413806260975647*^9, 3.413859143890271*^9, 3.413946085656*^9}, CellLabel->"Out[24]="] }, Open ]], Cell["\<\ u[x]y[x] \:306e x=0 \:306b\:304a\:3051\:308b\:30d9\:30ad\:7d1a\:6570\:5c55\ \:958b\:3092\:6c42\:3081\:307e\:3059\:ff0e\ \>", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell["", "PageBreak", PageBreakBelow->True], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"s4", "=", RowBox[{ RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{"y", "[", "x", "]"}], " ", RowBox[{"\[Integral]", RowBox[{"s3", RowBox[{"\[DifferentialD]", "x"}]}]}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "10"}], "}"}]}], "]"}], "//", "Normal"}]}]], "Input", CellLabel->"In[25]:="], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["x", "2"], " ", RowBox[{"(", RowBox[{ FractionBox["1", "4"], "-", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "4"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "6"], " ", RowBox[{"(", RowBox[{ FractionBox["11", "13824"], "-", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "2304"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "10"], " ", RowBox[{"(", RowBox[{ FractionBox["137", "884736000"], "-", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "14745600"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "8"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox["25", "1769472"]}], "+", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "147456"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox["3", "128"]}], "+", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "64"]}], ")"}]}], "+", RowBox[{"Log", "[", "x", "]"}]}]], "Output", CellChangeTimes->{3.4110444563962*^9, 3.4113558495108786`*^9, 3.411356411328879*^9, 3.413806267096647*^9, 3.413859149575271*^9, 3.4139460908780003`*^9}, CellLabel->"Out[25]="] }, Open ]], Cell["\<\ 0\:6b21\:306e\:7b2c2\:7a2e\:30d9\:30c3\:30bb\:30eb\:95a2\:6570\:8fd1\:4f3c\ \:5f0f newmann \:306e\:4f5c\:6210\:ff0e \:3000[\:53c2\:7167: 5.4\:3000Bessel \:95a2\:6570 (P.181\:301c)]\ \>", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"newmann", "=", RowBox[{ FractionBox["2", "\[Pi]"], RowBox[{"(", RowBox[{"s4", "+", RowBox[{ RowBox[{"(", RowBox[{"EulerGamma", "-", RowBox[{"Log", "[", "2", "]"}]}], ")"}], RowBox[{"y", "[", "x", "]"}]}]}], ")"}]}]}]], "Input", CellLabel->"In[26]:="], Cell[BoxData[ RowBox[{ FractionBox["1", "\[Pi]"], RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", FractionBox[ SuperscriptBox["x", "2"], "4"], "+", FractionBox[ SuperscriptBox["x", "4"], "64"], "-", FractionBox[ SuperscriptBox["x", "6"], "2304"], "+", FractionBox[ SuperscriptBox["x", "8"], "147456"], "-", FractionBox[ SuperscriptBox["x", "10"], "14745600"]}], ")"}], " ", RowBox[{"(", RowBox[{"EulerGamma", "-", RowBox[{"Log", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "2"], " ", RowBox[{"(", RowBox[{ FractionBox["1", "4"], "-", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "4"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "6"], " ", RowBox[{"(", RowBox[{ FractionBox["11", "13824"], "-", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "2304"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "10"], " ", RowBox[{"(", RowBox[{ FractionBox["137", "884736000"], "-", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "14745600"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "8"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox["25", "1769472"]}], "+", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "147456"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["x", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox["3", "128"]}], "+", FractionBox[ RowBox[{"Log", "[", "x", "]"}], "64"]}], ")"}]}], "+", RowBox[{"Log", "[", "x", "]"}]}], ")"}]}]}]], "Output", CellChangeTimes->{3.4110444599012003`*^9, 3.4113558548268785`*^9, 3.4113564159708786`*^9, 3.4138062745736465`*^9, 3.413859153061271*^9, 3.4139461053529997`*^9}, CellLabel->"Out[26]="] }, Open ]], Cell["\:8fd1\:4f3c\:306e\:69d8\:5b50\:3092\:898b\:308b", "Input", CellDingbat->"\[FilledSmallSquare]"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"newmann", ",", RowBox[{"BesselY", "[", RowBox[{"0", ",", "x"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"PlotStyle", "\[Rule]", "Black"}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Text", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"9", ",", "0.5"}], "}"}]}], "]"}], ",", RowBox[{"Text", "[", RowBox[{ RowBox[{"Style", "[", RowBox[{"\"\<\:8fd1\:4f3c\:5f0f\>\"", ",", "10"}], "]"}], ",", RowBox[{"{", RowBox[{"6", ",", "1.2"}], "}"}]}], "]"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{ 3.4110434697712*^9, {3.4110444752562*^9, 3.4110445076062*^9}, { 3.4110445412702*^9, 3.4110445599242*^9}, {3.4110448553512*^9, 3.4110448654152*^9}}, CellLabel->"In[27]:="], Cell[BoxData[ GraphicsBox[InsetBox[ GraphicsBox[{{}, {}, {GrayLevel[0], LineBox[CompressedData[" 1:eJwVl3k4VV8XgO9FMvwI95qFJFIylgxpL5qQJCGVKA2GSkhSKYQMkaGBJFQU FSIUYZtn95oy696MmULGCN/5/jrP+5xnr7P32u9a++xNdtfMLrKQSCQGmUT6 /zNmYJOSRcln9K9NbMxCcxlLeJaYTztmo8wWkZbcn0u4eN/NqcnlHBS76/Rl J8klvL67T35CKg+Nj/GeoRcu4o7iwhvjv/JQ9bZEE4cri/j925iyscx8ZF0e HHV24yI2cTOxHd1XgO64heweCFjAzzjznw3bY9Q8Rx1lcZ7H2TeN3K6LFCMy m3SXgeI8jhvdLTrjVYzyuH0rhMbnsHOjgP2fAyXIOeCGLdllDgvEVbNMt5ci ny+8ZscDZ/Eyb26qy54yVBf4+x6f6Swe8H1jOpVYhjjTa4QYorM41/5e/KRj OdLItz0b8GkGn1Lfqf17uQKpUr+EjPz6g1/VJriOSdWgmPPP+HZ5T+PZmJxt jNAa9PYEl4zPsWl80L6uv/lvDYLDxht8ZKfxOOuCRX5LLbp38vPMg/oprKlr oh0cWI84DkYdFJedwo0Z/1jkJ+mIIeL+oaNrAgsgThsepUYk76+Z6h05gXXk nmgHXmhE1P1+X9gNJ/Cj2dSZ202N6BektL3MH8c7I79ftPvQhPKHNw2efDeG vWsVjVRtW9Clu9mqf16P4JTML3IfnragPv22twYXR3BzjD7rlvoWVG6vbb97 6wiWtbcqENFqRTYZzPLGjF+4ltVfiUT5jq4+LPZ/WTGMhXS7BeiVbUhFJTll L+cQTs8I7r6i1IVcbqVGmv7sw6MCo6FG57rQlUZNQc6cPizvYbR365MutBZ0 sI8ruA8n7uF+1f+3C1ksjgoOqfbhqJrQS6cqutEii9alHw9+Yo/+8OlD1r1o C01CbJ0uEydw1/nxH2AiS6NvD7enduO9unesfWyY6NW4pH6kbTfucd6+a/Im Ey27BhWdEOrGIs0Ph+rfM9HLXenZLAFdODLG2DCI7yfq2xBg//lSJ/bbQuNd 6/6JrObcNd9qt2N71PR83K0fzWb+s2ZItmDS6/n87of9KGe1n9bGbMYxbBI9 tUn96EGuXwn/m2ZcXXNJMrWtH4G8bPfRrc14q/m/1xe1B5Bn9Zp+764m/MtB /uMP8iCa9/7r/iiPhp2i7hY1Rgwh091JKTJpVdh5UKE/O30EjdzQVS99nIOZ Np0cJTUjqNSR/la2JBsf7whSahgYQUVZHiXmk5+xZt3wrUGxUXRNB1uImmRh 1sxkPqHAUVTk6/FIYVs6jvHatPem7RgKT1E1aAx/hUsoos+1+CYQ3Z4/7ciO EMS1yV+eoTmFIj7V6NmfJOpsT6TyvQNTaFDBS/bWbB56YBW/e6PZFDpfuL2B JTwfsUR8PXT68hR6+3KY3bv0G1paHbdvfzmFNNQFF7dsLkJjPRYpdJZppGX8 MKT4Ygmqj5FXKK6fRlPBdg8deitQSPZOVdvOaSS50mFUKVOJDBr1tFYHp9FT 94Ijg/aVqHy9teGetWlUtVn3o/10JSrwiHD8qvoHnRO3j/MlV6M087+pn579 Qf0mRxLkhWrRI766ba/OziCbzf+eCQrQUN7ujTkmzjPooNi7O6wWNDRgcw39 uzODVMzZVT9G05BOGsX8RPQMyk1qiFCSoKNfhtZ3eWgzqFhe7vgKXyPa5zdB v6Uziw65qDy7yNeEFuc23DATmkNPvViBe74Zbd5ot7a2eQ4Nb6ykGFNakMn+ 7OA01TmU77abekWlBSVHWcVzHJlD/3Qs6wydWpCZ8quqIr85FJ8uYHO3pwWl OaiJbZ+eQwM+LVL0/FZk122OWevnkZ/qxSIH2zbE9eLnVdfOeSQmQdup7NmG sk45SzCG5tFz0SXT9og2xNoVeCufvIA6lg/H15e0oaSOfHXX3QuoTi7Qz1im HQ19l0758XoBXWw7SE7tbUdOjeMRebcWkfAB+mPevZ1IIOIWkg9cRPsUr4uK He9E+UfZfz95soiq1nMd5nDoRNx0qcMuGYvIla7TGBrZiT42mK2TH1xEIxM7 d+7u70S/a7/eemL6F73JCW0X9u1CrhX+dtfkl1Cf/fEF7XfdSHLgIPu8+hIy 0a7i8v7SjepYON97wRIqyP5z9n1VN9oCYdPBJ5dQUG3tWO5wN+rMf+qT9HAJ pSV7CafI9SC9T2/jOyeXkOWJyMTJhB7E/6K6a9/XZaSyfHBFy6cXFeWF3Kst X0azeiDhGtaLLncYyxxrWkaDS+xKEbG9qEKwydFmdBm1XPuOHmT3olsRnYue Ev+QAOlajtlwL/oZMCqU7vMPmc9nZroa/ECZLv8dFzFcQSU587a/F3+g+ljK rTTLFbRtdKyci42BhsrFEvQvrCC5fRWZ3BsYSExUYeyK9wq6G/QRfZNlIP+S A34lOStodcPL2SYTBrIU8P7sJLOKYuQ5Nwy8ZCCXPQ8615RXkexXcVPjdwwU cils7YnuKspiCwp9/omBcP6Lw9hqFZ1qL6T2lzLQ1vNf+ynhq8g1IU5FfYiB lj5PUwqXV9GnF7acwxQmov5Y1DLjXEPdbieLy4WZSImDdHZYaA2tJPiqPBVn ovPWvB/51daQruaDw7ybmaiebfv+Sw5riD6/2nZOlYmGlNSclm+sEf13qeT7 TiYindSKiPBbQ4sJWf57NJloV9qhnvz4NRR6tCaxby8TxVtccN/wfQ3Nsegl Rh5moq/el2OT+tZQNiU/J86EiVpS3Yq1poh4mwRLY48xEZs3sGetI0FkuTr9 2gkm0mwxMeuRJoFw/ZzCPTuiL9+5PKpyggT9UkfOKXswkUox52LgGRIEaF2Q PujJRMVsKesY50nQd647/9htJmKGDUiHuZDgsqBB+KF7TCSZeObESDAJ3hbL U9MDmCh9YPkCRJDASkz3vyuBTKSrEOsW/YwElsHvliSDmcg6qy3swBsSyPBI V58PZaLY8qPlrwpIELErLsAxiom2cf5uWiwlQbzuoQj6YybKOxLKOFpDgrrG 2o/bnjJRR1v10sp3EmSnGigURzORg7g9h0UPCf4gFLEUw0QLtuuEPvaR4A37 euFtsUwkNKKnemqSBEcuSEQ5xDHR2x3MvZlzRLwFz7CbL4n8ut0z5vhHgq6v 5bl34pnIfDnfPpeDDCPZ516dT2SiAXTyBs8GMtzobHU89IqJrvsv3L8gSIbb LHecpV8zURTPzngBGTJ0+hZpZ71hIhmz5g+OW8nwaSyC83ISE2U+c8krViKD nz9ps2gyE0E3b5XwLjKE/EwLKSC4USqt1VmHDBvY9+y3eMtEZy8c7qvQI4Pk RdPj/QRPpoxMShiQYWt/1LdL75jo3kTgynUTMiS3p/kwCOZVk+OuMydDAq/J 2yMphB8e5SIyp8lgVCujkknwjm92crfOkSGwvHcTVyoTFayRdjbak+G8irq3 FcHG+xP05J3JEPat83AcwT1BukfvuZOhNjzk4XeCLzd0W3+/TQZrc7I+G3FO L/HfdlL0JYOj8j+3rQSHWIp4+gWS4UiVjow+wWIvcgO6wsgwv8/v+DGCUxnm j1WfkGGHaQyXJcGasjOJQbFkYIrtO2xKcLVDZDojkQxnrExEgWCrNOUCjXdE fvYFem4heHi6oSYsjQziCYVXSAR7aFxpH/hMhrzcsr+NxPzY73AN6uSTQe6s 8+Zogp/hlD9RxWQ4/e/JhBnBW9gOkUYrifx48luzEZxtMMij10CG50eL3T4Q +dkf5ice00IG0xCfXQYEtzZtUpjsJINuiXpKF5Hf80LFGgeZZNDcWESzI/h+ wr9js+NkCMZzB82J/TFV+eq6fYYMzs9dPxUT+ylZcj3S7i8Zur3d9m0mOL9v tLFxHQvYb2bO1hJ+BF1/O7X+PxZoUi0R4yPYks2ODwmwAH1qw63DhE9/tnQe TZNkAdFbfyeSCP+Kc59cG5BlAYci8f/KEpjo0SHTcPHtLBCTlu/aTvi6zbGK FrybBfxmo2X6Cb/tPuYcuWTKAgd4bgU8IOpBRdf16ktLFtDOFTE6QdTLaoNi WKs1CyzHVrpLPiPqb/JNvb4jC8w2l3FHEPXWrBZ1WOo+C1AnudJIj5gosezI ZcsgFtjh0cwbQNSrsznnw7BHLLCurnVuLYSJuDx8apdjWYD9hMn5TqLe9fKc DTs+s8B8xr9t4r6En0bbHDfkE/M1d91i7k341TUYdLCYBRjUkXK/u0zk+c+6 OrueBT5cmmWpusVEn9DhQ5GDLLDvrv94ryvheyO7ffUYCzCFuX3qrxG+nit9 sDbNAkcM/nZkXmWiX/e1Kq+uskAC39Wxs45MJF0pf8BImBVORzPWHTvLRL8t +y/4bmQFCUm8e/4M4f9wvP/XzawQxbneNOo04RunULmcCiuI9dzbn2HJRBHG bPtYDVmhKtsmy8uY6MctTCi4zQoRGufMHTWYyH+k6NVtX1bw4o7gQupMxEl6 yaIVxAoctWGnuFSYSGDHyfKcp6wguMLzw1eB8C+w6VDGJ1ZIpATwzhHngZFO qcnrIVbwUfs+/3OFgWjHEjPOTrCCuHR4x4F5BjrucI9PapYVpE9mvHr6m4Gs n2o3vyCzwVPeVeG/PxjIeTLL4qkEG0j1HWxvLGKgx2/eWAeZsYF/R0FNw20G Esn3LTx4kg0c9HXC51wZKK7RVnLdWeJ9T/A8pyMDvV0RZ/peZQOTbcJdi5YM 9PXEk/N3gthg6Xen/pQqA/VwBzg5F7GBzQkHKdOBH0jO/ZKn+bZ1UDuw/qaC zg+0Q5txPEFlHSx/rB8pUPmBdpKslEc11oFZ6NVWkPuB9EMNh7z3rQO6m4O2 GP8PZJOkaP7Beh2EqBg4UYd60bPWP8os4etAW+G3izLxv7Bul/dwxsw62P02 o8SwsQcNzEVbcheyw9X1x8UvK3aj13rq13vL2IHStUt/38ZuZBtGC8+oZYe7 0hZW//F2oy7ZdTXHO9iB9bl8qOtkF2o67qYTN8MOHVJnUoIzu1BRprH0jm3r YVbV1mNFrQtFXyWPmkSvB3atO5Gntncio0Gnu1GuHNA3OfPfzrk2ZDIQsV1S kgu+iBp9YEg3o9EyO5/qNG7waDn5Dq7VIiX+to37bHmg5Ujy5dVvRYgLzZ3r meEFJ53501a2SejQxKkFGQs+iBKM623+lYzjqX4t3lZ88Nz4uIN74Fs8q/Mh o+c0H9xe4TJp2vIOJ4Ys2z+z44Pz/xa2fjuXgpfk4zo4XfhgG9yj6LW9xx/t evOmQvhArtPWPzkzA/N12HoVFfOBYGbVlq3R2bij9AL5lCI/2H14tu5lZCGe 0usSu6vMD2wL/hUVTYV4fcnRnYlq/GA8era8lL8Ia2Bt+yFNflD/T/OTZmQR fvKNr8HtAD+oDfc/532E8dHsgpiHNvygF3WzJBYX48pkqkphBD9xW7WhsCaU 4h+yIYbMx/wwa/DaSqGgFM+9WbNjjeaHJ1f+3NfoLMWyr0efGr7kB/0IO6l1 lDJ8P754+XsqP1ju4klyCSjDe6OvVP0u5YeGOCpyuliOc4LKbaTn+CEpUS1V jb8SpxjViQQu8sPVz4fSlXZU4tj/mpsnlvlhI/3qWU7DSuwTwTj4jUUA5D1f HTrlU4mNY5aULPkEQBtJ+l2aqMR971TWHm4XANGtL7K4S6owb1VcwsI5Afhl ZROUeKQGk4PfnLS5KADpb16PqV6swbNG7ykVDgLwZ9q39aVXDe6kfQmMuiYA 4wt6mWwfanBSW/O1HXcFgLtZeYKLvRZrD3HA+RgB6NG6T+nJrsWX1t1g0mgC sD93I0qercNiUjXty00C8ENLaCM3ez2maW6kb/0uALZeHEnGwvVY40pF4f1u Afjyu1rXTqses7cIvtD4JQASkZuetd6px8mJuRbxZAoELPy9Xvi3Hlvlcx2p Y6OAbX9scyNHA/6v1Wb/4noKvBz3FS8SbsDu69erm/FS4IxP2vKWXQ14v/MJ PnZxCmjdnmTKOzfgAZ3F2qs7KSC5tzGgu6MBx1gYl8bupgBfJJuJz2ADNr6W mFelTQH2pyU6K9MNOPu1QcomPQoU8H0V9OaiYX/O5wHfj1BAOV/pTYIWDWtu nvBiOUaBz6xuN1kO0PD4Hj13ZXMKfMT6oXtMadjcZcQu+BQFzFrusWlcomHZ di3QtafAtsWDHDoRNNwxFbbbyYkCnAL8+eaxNBzK1acUfZWId/duxf4kGp7V Ddk4fZ0CdusVb7z7QsPlSV1LST4U6JkP5nTvoWHPIqU/TX4UCE01OqU7SMOK HfdHVh9QoFb/g3jPBA0/4d7eYRVGgaNo853nqzR83u1Ozn+xFDjeS/Pgk6Rj DbUfOQovKeCuXCF4Zgsdc/2B3IOJFFjL9R/zVqTjT67sX3zeUmBW/GfdIW06 /ucS+XU2iwL7eRKO9R6nY7rK7Ff+XArUlHyM6ThJx6+nLPOU8iig1hmjkWpL x4YuEvkOmAI5eRfYa53o+Nm1d9966ihgvyTMYPemY0dlroK/NAqE57yrTPWj 4z2TVwqEmilgdLFaZlMQHfc7qxWadhDc014ZGkHHuUpPC692U8D7Qf53nyd0 HPJ7oTDkBwWESwWHDWLoWMW5sKh8gALy+H28eQIdsypJ45/DFHhs488d85qO 2ybu49VRCmRLC3FkJNNxatogFv9NgSLOpzefp9Cx11WDYs1pCuiob9c98YGO j+74UGwxS4GHuQs6v9LoWGaCp8RtgQLB0bwnjD/R8fxHl5LwJQo4pXu6+mXR cc2VlpKPKxRYjVJ3Dsum4zhFjdIaEhW+BaiqOOXSsct4TOkQKxX+nDoZK/qV jvd9XC5lXU8FsQsPwl/k0bHQFZsyaS4qBJ0K+jOZT8cj20vKdHmo8NJg81uh AjouGNtcfoqPCqruG8I2FNJx+IcH5TcpVCg99De4i2C7yyPlT4SoIKvr632z iI53bTeuyBSlQmKFjukQwRxj6RU0CSr83pn5Qw7Tcc97/soxKSrkpp7h0SI4 w8m9kmMzFWwWPhVJEHx/W3vlFjkqSIfzfm8ixluOalXpK1DB0LFBzYpghfdx VbaKVIj+vTs/g/j+P8e1Ki9lKvxkPjzSQcyXrmBX/VyNCrv2L9GavhF+jJRX 5+6iwvChd9JxxPo8UuVrWjSpcFn5vexuYv2GjiE1UzpUKNPmKXz9hY4lFCZq eBAxPryh7kcOHU/9Olq7TZ8KR6S71cY+03FZSlbtoQNUwNEirVWZhF8OgnUX DKhgv/d0pHsG4ddWzzrfw1RQHHAynv5I+PWrqy7ehArF1eRh3fd03GefWN9h ToWQUUe9g0l0nCPP2jB3gsjnilM5+RUdBw1fbBA4TYXIOrO00Jd0rGy/nWZ8 jgp2EXEafM/o+Iej1LW0C8T+JfPQ0yPpOPQKhY/XgQrbe4RfUcKI/XNdPkZ3 pkLMq3xzZcLvGPfJP8puVFDWvD88eJeOD97sfxxxg1jPFxCy86TjN1513495 UYFyTSr1/RU6NvPGHlneVPi7r7bQ4xIdk+5/Fqb4UWH/bx/6+rN0fCbwxcnW YCo8uoOMPM3oWDjqcq9lNBXYtkRqPdpJx5VPbO99iaWChU5hy12int2jj0uJ xFPhbr2kgqosHTfF6ZzrTKKC3OqsXZ8AHT98xz14OosKD7dIxDkR/UP7/VpA QQ4VzvUUPr/eT8O/Ps7IbcyjQju/AjfqpOEDWd0OPzCxvhfjbyTKaXit4MP4 2QYqtMT1b/r9jIbTcUJYSSMV3oSrqLM/pGHr0sdKMq1UcKHPOzHu0XBe1R2X /i4q0JZvJLdepOHrzYdnL/6iwmF/5+QKFRqW+Y6eVo4RPi+eM+qToeHGdnUN +UkqKJQalhZRaXhHr7jnrzkqNF8w8s5daMDDw2PLTqyCMPr6sUdcfgN+NsqI q2MXhAdbzv/Lek+cBxMtuopcgtDyTWw5MLYBv/rzzXuCTxC2vtTKvnKrAZ9e ecjqIikId+OGD0jsbMB0AUXuG1qCkHc0fcNEXD3ee/XqyIs9grAja46iElKP 06vSq0qRIDiGG7zcfbMeP/JS9ec7KAgzrivvH5vWY+MhjZUPZoIg9Yj31R1S Pa7N05vsuywI+2NXN46a12Ftql8D5zVB+PkBfp3fW4ffO5d/UHETJO6bET0J 8nU4ePMhh3uegsC21TD1zN9abBBm/FM0QBB0XihEjz+vxRVnT7SYxgtCZr96 5C56Dd75LSbz5itBsF/IyMPZxHkt2BUenyQIk7tPxXDG1mD/Wmvj8feC4Nbz rr37fA3W32lXEfhFEMLktWZvzFbj4vVXvxQ1CkI879qSNWc1/pZ+/4UiqxAI X7URbCFVYnZjC7FodiEYOPhii1B3BT42Iv+czCUEqWopQetzKvDw5oZnbXxC UM4UcJi1r8CU58JRPpJCcGew2GGqphxf9vsY1KolBDnaD8vRvTIsbtV2w8tF CEYu7pRMfluML82lzA5dF4KZ7Rmb9nkU48yoO9eP3RQC68FJ+aADxfhQg7Sr 3D0hEBW5EPpfJcbX9S9faXwoBOap5uQY9SJcp0g6L/tOCNxlfBdDx/PxHfI2 0/peIQhBJFun5s94aD93h9xPIUiy3rv02vozNg0at/UdEAKO4WBX6aEsLLsh 45rGmBDs6I/6PTyfiesldoYnLgpBj1JnX+yGT1hScy/NnSIMZz6EvtbWTsGl zmbGGw2FwcepmsEvH4YVs9RbbxoLw8/3XlYvcoLwszmqdfNRYfBWkH9RpuuP L3u1Xw60FAarT/4bCm94YGqI9cPp88KgNHrWguXcFXQp+VJtxT1h8LugMjNy 5xni6rlt4JxNsMEmhuG1DKRxM5Un/IswhCZw+glafELnBDqaM/KFIcTgmajB zCf01WDXmeliYejdsMdyTjULXcqZdHVvIPiPp+m9r9mo5NGFF7eHhOE1tf9z 4Wge8tQz+f1ARASaRTySm66XoqQer8/vxEWAVsYTtJ1eiug3P3hWS4pAK8Vu 9Pe2MiSXzsHKtUUEuqbMjT/3l6EWsTLhMFUR8G09fkH7VAVSmt2t99hIBOb1 U6J9T1ejwbebniR4iUD1WsSjlU80NO7/8y+rjwhYKEDqsgwd/bF7ZevgJwJ5 OLbf5ykdkaQ2bVcNEYHpl8uy/HsbkVi0dGlptAhY8+j9HZRvQqaBUlODWSKg e+SLTghHCyqw32isOCICWukFmjvW2lDZgd7MiHERCAx3WWLRa0e1m18Kz02K AHOP8KiMXztqZ0j0F84T33/XoKbP0YH+nJC4fZRNFEwGSJFsQp1oq4F4ipuU KHj4eRyvRd3oyVZRtjwLUaAZ2Br/aSDunzZy7/qtREGS/9tpbS4mkn2ibsRr LQojj+WoCTuYKHvtSMR5O1HQ+Wvq1uLORK1t9yV4r4lC4Bhr6ijbT0QJGN95 PkgUPIUs7Ee296Gon/gizzdRuGPUasN4OoAiYi9VnZMWA/1V1z0pjBF00+P+ da/NYpAqczEtj3sU2ZjFS0XLiUHC7B7GzO5RpMjVdrNeUQz4Wu8v9EWMoppb B7bu1hKDIxVUiYz9Y4jlpGzwf2ZioOS64CeSPY5uCPcZffETg9vXLM6tZk2i U0/O0P4bFoNkjVszQ+IzSOIzl/jlUTHQLrp8s0NrBjGavtjXTIjBe+nM4KET M+jCBgHyg1ki/n7VDKsnM8g5pFJ9jSwOyVjtdDTvLLrvo/x8WkIcDky8PhbJ MYdSr5AvtJmJQ+ii9CsKZQEt7k/+m1AkDkdf8y/bBS4jr28JfuUl4pBRJjD6 6v0yIqnF8oyUi8Ppaa3q1YZltF4qfJNanTg0ftVMEhD8h4T+ehqWt4vDcKb+ xuSkf0g9zfj5rylxqH9TaBxYs4KcBWc1VTdLwJGs2StOgiRIf96hZnhRAnq7 dMqsK8nwP+rhpgE= "]]}, {GrayLevel[0], LineBox[CompressedData[" 1:eJwV2Hk4lG8XB/BBZCnZZkhiBr8kRVSS0n0sIaQSSsnWgiyhQvZKoZIlWVso QqGUFpTbvi8zGLJP1ijZyxbv8/5jrs8145nznPM99+NCs7tscoGdRCJ5Ez/+ /5o4SFM0K3mPltvEf5qpLWEJ7xLTKcc89K5FrOXj90VcrO01ObH0ASXtOeN0 SXIRr+3qlxuXyke/fvKfbfo6j78Vf73260c+qt2WbOzgPI9fvYwv+5lbgCzL w6JtNs9jYw9j6zHtL8jf4+7ewdt/cSxPQeyIPUbNcyJj7K5/cJ6XgccVsWLE tobaqb/9D348tnfjjF8xyue7UUH5NYdd6UL204dKkMvta9ZsbnNY6HE1+1R7 KQr6xG9yImQWL/F/zHQ7UIZqQ34HCBybxYM3XhybTC5DPDk1lL6Ns/ijfcDT CcdytLfA2ub22xl8etdu9d9LFUhF5NPd0R/TOKX2mftPqRoUdy5WYE/gFJ6N /7Ct734NSjvJKx10fArr2tcNNC/UIGRotCFIdgr/4vhrVtBSiwIs3s/cqZ/E ahrG6mEh9YhHN1p3k+wkpr9ZZpebaEK9Yldff+scx0KIx2q9Ih3JB6tlBkaN 4/1bYtRDztMRRefWJ67D4/jBbOaMD4OOxiCj7UnBL7w7innB7jUDfRmhDVmk /8SBtdsNlK1bkIt/nvL081Gckftpy+tHLWhMq+2l/oVR3ByvxfFffQuqs1e3 37t1FMvan/oitq8VXXrDKqe/+YFrOYIVScJM5HevOPhJxQimaHQJNVW2oVM7 0zIO8gzjnDdhXc6KnUjDJzPq2Pd+PCY0dt/AthMdYaiReT70YzlPg4NbYzrR bJhuP29YP04+wJcysNCJri+MkYeV+3F0zf2Lpyu6UNSafRd773zHngMRU3qW PWg3Q0KcU4OFn/HV3RI8xEIFVoX3FDK78EENX8sgKxYKZZfSirLuwt2uCnsm vFjIJyy06CSlC4s13xuuf8VCacdy8thvd+KoeKPDoQLf0fVdt+3fX+zAt/5r 5F/t+o5+K19Te6neju0RI+GXxwDqNvtn2SfZgknP/xR03RtAV7MGG9tYzTh+ jUR3beoAynANLhF80Yyray5KZrYNoLY52a6jW5vxVtPl5xfUB1FOHUm7Zw8D /3CQy+plG0IRactXH+Q34kvR/kX0yGHk4Pk6Qzq7CrsOyQ/k5YyiFy0Bu0of fsAsqw7ukppRJLoonC5bkodPfAtVbBgcRUKJRSWmE++xWt3I9SHxMbSgzW++ 0fgd5shNE6CEjCHMvSdCflsOjvejHfSy/olS1+ocpkek4BLhjQn7BMZRgrNX 6pEddxEvLViuT20S7bj6W8PeIh9VH4hSCjg0ifSi/KnXZ/PRnVNP9242mUTZ Kdw17BEFiD3ys94Zp0kkOujFHlhaiBZXftm3P5lEd3qXp/+TKUI/u80ymtin 0PMzu0KKL5Sg+ng5+eL6KSThXXjboacC3c3brWzdMYXkm9kPVUpXIn265r6V oSl0t+6D3pB9JSpfa3n4wOoUcpdnpNlPVaIvnpGOn5WnUYqA5KMbbNUo23Qh 823sNCpu/fNIjlKLHgjUbUuxmUExm/tDyEKNKH/v5g/GrjNoikPAmcOsEQ1a XUbLvjPoWuBvalZcI9qfLWx6Mm4GHRnKCFSUaEI/Dlv6r2+cQSeiXA//E6Aj 7VvjTdf3z6K67OKwCwIMND+34ZoJZQ6VfZtV4PvTjGQ2262uysyhnzpSq4bC LchYJy8sW3kOGRjMrjjtbEFp0aeech+ZQ7a4Ie/wpRZkopRSVXRrDj2pqtHx 725B2Q4q4gpTc6jFdiOpqaAV2XWZYo76P2itzMZwB+s2xJv03cW94w+SN1Ri V/JuQ+9Ou0r0Df9BhZqkze2RbYijM+R6Adtf9Cn8pn19SRtK/Vawy33vX5Ql /l7XSLodDTOpGb3P/yIt8s2PGT3t6BL9V2T+9Xm0rkhElv9gBxKKvI7kQubR iu7Ey40nOlDBUa7fMTHzqCcui7nWoQPxNUkZur2ZR1HuC6b3ozpQVoMJp9zQ PLJ6dzJLdaAD/a79fD3m2AIKsBlQEb3Ridwrgu0uyy2ixMXKterpXUhyUJfr z65F9KJyLSXgUxeqY+d55QeLaOv80MXMqi70H4RPhVksokvM5uEPI12oo+BR UOq9RWQsZbX0cks30nz78mnHxCK67eNx7PezbiSYVN2p/XkJ+cqd2KYW1IOK 8u8G1JYvIY8HJehyeA9y+mYkfZyxhLx56HoPEntQBZnhaDW2hNx7nh8KzutB 1yM75r0llpFMBnvUsZEe9P32GCUnaBmtj+VXuqzfi3Ld1p0QO/wPCatbz4zN 96L6ROHr2eb/EHf530Nr1/Sh4XLxZ1rn/yEJ0iYq94Y+JL5R/qdz4D+UEHEr 5JNsHwouOXSr5MM/hBxJPxuM+5C5UOD7S9IryHhq99G+J33I7cCdjlUlwrce eOml96G7F8NXYzRWkMJ4fWLM2z6EC5IM8akV1H8LJnpK+9DWc58HhCNW0JHW 6ic7hvvQ4vsp4a9LK2gbG3/lgDALifTO7zPhWUV7vUKcS0RZSJGbZDNCWUX5 1wfqojax0DlL/ixBlVX01tu+nFeGherXKOhcdFhFg8/F11ops9CwosqlpWur iO+xSB9jNwuRLPZFRt5aRUd9rz5QU2OhPdl63QVPV1HSk5abvQdZ6KnZ+asb mKtoaeWRYrghC30OdEpM7V9FvUf2KMYbs1BLpkfxvslV9InPTDb2OAutCQSu d5wkeKzVzOF0koXUWoxNuqkk8BL3WfG2Y6EUX6exnSdJ4FRbZyPvyUI7i3nm Q86SgBeLcYI3CxWvyeDsO0eCVSWLYEMfFmKFD1LD3Ujw4t46mmYAC0kmnz05 GkaCMqfNyum3WShncOk8RJLA+HM774UQFtKQT/SIiyWBxzOXTtEwFrJ81xZ+ 6AUJntXVOFjeZ6HE8qPlKV9IkMG74bltNAtt4/nNmC8lQbO63d2qhyyUf+R+ 39EaEuzazxUs/YiFvrVVL/5jkkBAeUv+pzgWcthkz23WTQJGSuLSVDwL/bXm pGT1k+B2z7GztEQWooxqKp+eIEHM2vD71o9Z6OUO1sHcORLY/dps6/qE6K9H gBH3MgkW7nOd83jKQqZLBfYfudlAKIX/n0UyCw0ii2vrN7CBeIXhY40UFroS /PfmeTIbZPJIeFGes1D0+t1PhaTZ4LNF3Xj6CxaSNml+7biVDSJ4uyJtUlko N9Ytv1iRDbi39fnzp7EQdPFXie5hA0lOz8+5hOlS2a2u+9mAdRR0DF6ykM15 w/4KTTYQlvsu+43wRMbohIQ+cX3BlbNn0lkoYDzk3xVjNkhhRzMthPlVtvDV mbLBTwvjH5oZRD48y8Wkz7CB3/A3SCO8o9Buy3VbNvAeCSetEP6yStpNt2eD rPVSCkaZLGSk80xTzpUNfvtBeQTh7lCNowFX2SCgIaOpmrBTQ5cl04cNTq8X PP6X8KKgz6XtN9jgbsluo03Ec/uuuZj3rRA2cB5hlO8mLJ708XZnOFHPXEaR NuHMPtOHyjFsUN7rp6FPWE12Jjk0kQ1ebhA+pEW42iEqpy+ZDRyv7OpQJnwq W+mLajobKF7J+EchPDLVUBOezQZX/x78OEV8v6eqc/vgezbQcKzkKiXM5cs7 tL+ADda9F5gJIRyLM6aji9ngl+Z0gDbh/9bokcYqiX5waeXMEvefpz+0XrOB DQavdQQnEdYJv7UpvoUNyu7GcKkRbmXQ5Cc62ECq8vjeWqK/5yjFqrosNtDf OS1uQvjms+Xjs7/YYPaMC682MZ9jOz+7K8ywgYuvh9IbYp6SJVei7BbY4P4A p78g4YL+MTqdkx3Ofk1P/kzkI/TKy8m169jhgLxswD8iP+Zr7ASQEDvYt/A+ VCM8/V/H0WxJdoiqXucRReSv+GPM5UFZdlj9naH95hkLPdA7FrFJgR0+8OWe KSPyus2xqjFsLzs4jVJdG4l822V9OHLxGDvIWVbecSP2YaeGu8sTc3YYrp6f A2JfVhq2h7dassMJp3W1a2OJ/Zt4Ua/lyA4XZYgjiti3ZpVoQ6mb7MCXqfh9 JJyFksuOOJmHskOqzccBJ2JfXU157oU/IO5ncful4bssxOsZVLuUyA7f+JKE MLHvmvmuh7+9Z4eKTb/RahCRT4NtjhsK2OHPk6P0vYFEvjqHQnWL2eFQqu4a e38W8l62rM6rZ4e/XH8uZl5nobfIUC9qiOhP/lBIkTuRdzqXffVPdris6JqW dZnIq23pndUpdhidr7sT5cJCP27uq3RZYYe0CdM05MhC1Eq5QwaiHKDGDuU7 bFjot/nA+RubOeDICueV5rNE/keeBn+W4YC9B324XM8QeeOhlG/ZyQF7Lqz9 FWbOQpFGa7Q5DnPAkwHXLWZGxHncwoIvPhxwIlyUS0OVhYJHi1J8bnCA36L8 eqFdLMRDesK+L5QDXJriXncrsZDQDovyD484wJ0cUG4iT+QvhKH35i0HdIz/ IZURzwOD/aXGz4c5YNInj8v9Xx9qPJ78xmacAyLWre5qmetDJxwCBKRmOWCb 4Cct2u8+ZPlIvTmJbQ3sT1tVvtHbh1wn3pk9klgDQtGG8ceL+tDDFy8sQ03W wMrY7aSDPn1IrODGV12LNVDTX6193r0PPaZbS3LarAF625M7ng596OW/Tawb LmugT1SWz9a8D30+GXPON3QNPPBad+aoch/q5rt9ybVoDfz1/3c7aaAXbbl6 0dt0Gyfoel2t0lXvRTvU+04828kJ+nz3DrQr9aLdpFNKY6qcwB5nTj31Xy/S un94OFCbE1bG6y0VBHqRVep209eWnNBf51olNtSDYlunldgjiPe9Is6J3e9B nHsCR97McILH3GjcTGM3GpyLM+f7ygVaX+o9XLd1oeeau670lHFBt2xEJ9rU hazDGyPe1HKBjWizBPu6LtQpy1lz4hsX7CtrcbQY70SMEx77H89wwcBE5gfT N52oKNeIumPbWuBJ2/fi7s5OFOfCNmYctxaeq/GqW2ztQAZDl/yj3bmBLs1h WTDZhowHIxUkJXnhngq0+ok2o7Eyu6DqbD44nyEW6WxYixQF2zZrW6+HcwcH rz5RLkK8aM62e4YfLj+u4vzr/hzpjZ/+K20mAFnevoh5LhN/Kz3Pdnq7IPxJ 7tomZlCMJzU7xf2VBOFMuavjDpdivLbk6O5kFUHQMPWVU4ksxqpY3X5YTRCC Vp9187QV45hCgQaPQ4IgeYZXf9KmBB/N+xJ/z0oQaoaUVO5eKcWVaSI7v0YK wivun7r+98rxh9ByK+qcIKzNi11g3azGGQZ1YiHzgiD3U6hy8EU1TlzX3Dy+ JAi3JEyC6eXVOCiyT7eQXQj254yEW3PVYKP4RUVzASGoD1RgWYTW4P70nav3 FITAQKlQ5G1ILeavevzsr60QnEVKWk5X6jFb2AsLqwtCkLYrIs8wqh7PGrwS rnAQAmXJC0uCb+pxR+OnkOjLQrA63lF1dKwep7Y1X97hLwR/NHlePbBuwOrD 3HAuXgh6b4QdWneoEV/kvMZqbBQCOfr3G8lLTVhcqqZ9iSEEkx0dTYq8dNyo trlpK1MIar+f3XGDQseqzhVfb3YJgRONcZBNiY65WshJqj+EQNHWWM7Vmo7T kj+aPWUThhOlSSF/vtLx4P75WpfdwpBav3nsqTsDx5sZlSbuFYbyBolbLn4M bHQ5Ob9KXRg6E24aK4UwcN5z/QyapjB4Jmxwuv+YgYN5Em4zjwjDu9FaraxK BpZt3wca9sKgw7ZUFiDWjM95+H5YlyhM/H301+XEu2asqtL7Qf6JMBxzyvMy KWzGvNPwUTdZGLhS/hbqlDfjt+5cn4JeCkM9w2WEva0ZL7tFfZ59JwyvPPWv DM0349jL6YXddcLA1jBRDAdacI1zS0nWP2FoCHvZfCC/BT/erlpaQxIBX0/8 +ElxC3b7FV86zCECYhVZBlNVLZjibFVG5RWBsL3bDru3tWA7p9HyGIoIrJmw jWmZbsHLjqtVfkoi4P5VJ1FKvhUr2Ss0GtmKQK+HeXr1vVbc6yh1Ofu8CJzL iZz4F9WK7zsLC/A7iMBbvoAQmfhWPOq+dLzJVQTaSVzJKLUVv/CrYx73E4HD WOZwYWErFo126jGPE4EW03F9PNKKK2OsAz4likBdgO/3+V+t+GrcCSmxpyIw VszIk55uxYzH+207UkXgM886br3lVnwvnW/ozDsRMDjro9+8gYlXv7z+ZdNA 3F97WdT0LibOwc/CS+gioP69xUdJjYktSx8qSreKgNk27RjLA0ycX+XrNtAp AkyW8MkQHSa+0mw4e+GHCAyVP6JImTKxNBM9qvwpAr89XP16TjIxvX2XqtyE CES9tRK8f4aJd/Rs8v4xJwJ6ShnV+XZMPDLyc+kSBxkO+lPcTroxcexY3+M6 LjJYTCYcj7vCxDrjLRrbecnAvSn0XJUnE6dMFwaOC5AhI0JYfN6Pic/8u8fh JkmGQdXdvUmhTMxLCkql08jQMi949Ow9Jv7MfvWQ8n9keJR3aJb/AROTuS1D phXIILXPsVfrIRM3CW3nu7aPDNbT87rjj5n4oIvLaNIBMox71B7gfUb0oyqn qhSR4e2bcs+NKUz8wE85WECXDLaRHgX8aUy80uZht/cwGUy1OypmXzKxi3Ie WBmRoaChUawhg4mNhlX/vTYhwzy3dIJpFhN/Ae+uZjPCU27VHDlMvD0pP3/h FBmKpJS1094wMd+xA5561mTgXDkghd8xcW2+5kS/ExmWZ/IjjT8zsbrIrQae y2TgH3uoHpnPxK9cy1/v9CDDgRDRfeUFTBwmo+cQ4E2G3V4G+zi+MvG8f6hu mi8ZvC6kavAXMbHDtxrZ+gAyCCv+S+LDTKwfbvR9420y0FZNnXuKiX6NhGMI JYMP74HvuSVMLKfV9MT+Hhnipqc+eJcS83ks4PfgARmUu//9VC5jYq6/x09/ iCKDWOTv4B7CnscfqnXHkMHe5/RN33ImHn7dSuGIJwNfRt8QXwUTm3NR5uST yGBeIZP7gHCFzcmWY0/JsFeidYijkol3F8bneqWQ4VB02m0nwqnkzoinqWTQ SzeNriAs4rbJtSKdDA0eaeuFqpg4uNbS6NcrMsw8P7dwjPCs7NNtwjlksPGx O3mT8LnAPm71XDJIN/rJvyTc3EEdsckjwyLHI/cvhLV221WEfCJDrMAj5QrC 7x68eJFTQAaja65OxYSlRwdvML+SIfegOC2HcLT2FpvlYjIAe4LpA8JsT+0P ypSTwbF7eq0tYbf5DAmDKjK8cd2rsYUwy2Rs0a2WDO09/n96iPqPZSt0xDUQ n28a3BNKuHity6ciOpEfh+h/soR32uU8Gmoh5meQdzSP6E/yl4kr69rJMBwV qKhKWEBU2WRXJ5GX1p2PXxH9DXT32Hm6hwznpNYlCRL+Xfee/waLDK+mLXc4 EfOw2jL3K32A6IeWp9knYn4Hu7wy50bJ4Gx2xU2OmG/OnvwQiXEyFMtLOxgS 898cuXhBe5IM/XFKq7ZEPpZ1/KWj/pBB4ccRsj2RJ+dnRaTPC2TQ2XghwewL E3cvrPb2LpPhgf9IpWohExfm3EzazkGBwuR7WxlEXrmMzMTjuCjgrMM45/qJ iY+PyiWw8VJAsgqTlj8Q+y/TENsmQIGHay+4/CDyrlLyjKwpQoGQ1k06erlM 7G/lEfNalAIlcb53Y4n9EE4QjQ6SpEDNeOpVLmKfrFTHBH7SKBAkjKXkXjFx ZsuXCLP/KKBqLHNYjdg/xG8Xvm07BainOv7bnsrETreyQlv3USBh5JHH6SQm /kgNXIs0KMD8YOq7Gk/Ms+j4nUygwIpeIO1RLBPHzf+5FaBHgVTyBfPoKCYu c9EM3GpGXE8gv631DhNvOtV2zc+NAoNS32f8XZn44lzG7PAVCoTPlNIVnZg4 N9r3ynEvCiR1fIyk2zOxXgPVfUsABSZ8o+uHbYjzU8vJmX6PApq6dvlWJkxc t510TjadAku+HLlBKkxMqW3+/uAVBZAHH6eWIhPb2qfZLGRToD/A9d6sPBP/ TTGwasyjQHqRnc4OGhPLiD6y8C6lgKzet+Vxfib2Zdt2rL6HApXmHGa5xPNi WIfv25bvFLB9J5KY3N+Kj4X+sr4xSAHFC1MTN3paseyGN5dVf1Lgh/SuQfGW VlwvsTsieZ4C0/T8ey+/tmJJtYONV4VF4VPMng75yFYc6itl3kQRhfzBotYD d1vxdBGpV15cFHp83TW0gltx1aGy8V6qKHQlh7nKerditxP66w8risJsTf2i rnUrLnU1Mdp8WBT0Tu/cyavQire/29XqZSQKJxudhnRlW3HsnIhl81FR2Lb1 qLPn5lbs5NfuFGIuCiZ7tXhyNrRikbuW96bOiUKr2Ipa0EwLvph2sbYiQBTi QsDk4+cWzNvto++aJwoM49/rE/e1YFWvzPURn0Shvrb3YaNyC7YV+tb8pkAU wt0qzs/Lt+DP+nvOThWLwqk7RasK4sT1Pky4X20QBatjDyqEF5txyYPzST7D ohCsFrs09qkZe2sa/74jJgYHbB74Dio046GXtJhnfmJg8+fkM68/dPwr+PsC R5AYMJp9Lp/4ScfTdinWDrfEwDZJM1mWRcckKZqC8l0xaBCc1E+voWPxOGpp aZwYkJqjvig+puNjIVKTQ+/EYOGCiqsxouMv9puNto+Kgblzoc3W5UYcs3Xj mnyzjYDL3/dU4zocmXixypYqDmXNzV1v+Svw6ZizjetGxIFZ5hJ5s7EQz+uk LTwr2gSmrSMKMzvT8cCQlndpiATIPpC0ave/j55rKG9qsN0M+7P3Xoo68x5l 374maL9DEr6RrdwTvYrRrwNnb97eKQlSNfHcOLIYbZ/VmXmxSxIyXA7OtWUW o1d2IkzWPkkIfr85ntVVjDLQ+/jTupIw8MI2xAKVoNSFSSlja0kYLVvQauMo RYkuzop7oiQhf8tE2dObZSjE7Jwhxxzx+cjvN9JNK9Hzo92WF+Yl4dBHhXJ+ 50r05bCZa9WSJEyfJF0+d6sSTWvoRd1jl4IPUszy1txKZLlFoV1YQAq8XeX7 meurkMrfaTtZBSmIjxNJOlRahXrjb/ocspWCb44rVb4SNWgheule+nkp+Bgz duaacg0SCb/6hMdBCgpr6RmndWvQ4RsXixtcpWBqKXT/j8s1KM/RgMvcTwq2 5syNri+tQXfVhaIvxklB0evJKm+7WrSnOyUzpEEKFgvrXvo8rEMCig7zb+hS wDPikp6UWod+BSrqfWuRAiNp1y+ZH+pQqkzh4NZOov5d2mzh7XVIxKlVqnZY Chay1vJcFq9Hi34chlwkKjw9+qIp4XE96uBTLdHfSAV1u6Z8k+gGVLk74Ue3 OBUOLfDGcqU0oLyzyxvcJahAW9x0/+WbBhT5ptQqQYoKF/o/ZL6qb0D6J44u j/5HhU/G5qOlnI3oc6LD3nsqVAhTCYzfcbURxcsnZTcYUqH4VKA+1mxCszO6 abeOUEGSxGM9btyEjhZNP953lAo3BSS2c1g2Ia4TBvfTTKjgveNS49C1JnTN b+GSvwUVfGUuet3JaEImTSe37rCnQsOF6Y64NXSUk8BBHXCgwsOzxwSceOmI 5/wb0YRLVCBdlZxQFqCj4nmutZyuVNCtj0pM3ERHStIfh7qvUsFzd9DpdmU6 WndN5MX9m1SQGkyQXz5DRw6oOFErmAq/IDyF25aOynico+dvU0G+aGs890U6 8nladuN8GBUc3WXn+y/T0WiVh82BSCqc+FCmw3aLjirFGZt/PaFChfn+/f0v 6Uh6yI/8/BkVqE/vPP7vNR35v9m6/lQKFUqkG89YvqGj3TpBy2WpVEivuDj+ 4hMdPXdR6kp6TYV/3McVk6roKLA4PN4wnwoHj6cztg7R0VhPccxCARXq/BM0 o37QkfnSTGT6F+L7Xr9xGf9JR9tVT4dxFFNhk+PQXNA0HX17vcWnsJIKppeT M0VW6Ui7xsLTsZoKshIpPeLsDJQzfN9DtJYKrgU9FSKcDHSbNnPpSgMVLM5/ fjPAy0AqcfiMQisVxBgPWsbJDPQkb/pkB5MKG783PowSYyDu5v9MQ9qJfsne YpffxEB96+4bDXRSgTnEOapCZaD7N09pJH2nwvWDgfXv5Bno77N7+w4PUMHD duf0jAID2X0t2vN3kApnC7JLtyoy0L55WcUTP6iQYdRp56LCQMMuU5J8E1Qo tPdIsFNnoOP3ZDflT1Jhv0EJv+YBBvqScVLUfpoK3/ae2CF8kIEeDnzdUDZH hZqbEhejNRlohTTF5/6XCte2nwxC2gx0SVKWW2qBmJ93lzZLh4HA4i7Jd5kK c6GyVct6DPTa8+vy1hUqvNi1M8T7MANRYibn21apwGsoPDViwEDjjeZTKhw0 4nw2KEs5wkCJOjL9Yzw0mIoucrxhwkCcdua98Xw0MFq+H5R4goHcAsM6ddfT wJI6oJ1uykB6BRPNzwVooJAs2ZxkzkDv2qWbjgnRIHNV5OmtkwwkOWdWtyJM A5rUBzHrUww0q/Sl7LQoDS7MuElMWTCQ9ZEJzL2RBpeqWC/TTzNQ7SXpLx/F aeAW97z/+BkG2hNq9vm8BA1k7K7RJwgnp4XmCUnSIPIW1f2GJQPxlRW+LZai Aev9lQquswzkyfqd5UqjAR+XXmMg4f5/tEwJGRrcHva5/4vwkU1mabWyNBjd OE86YsVA8YOKxWe20GCny9hIEuHBbO6uX3I0iHghLcUivNOrf85fngY8Ru7p G60ZyA++CGxQoIGgdvYNfcLVPLEKydtpEJL7PseZsEjLZV1lRRq85nNQukPY 5vFh21IlGggJ5K15RDjrgozfCWUaxFeGKCUQnlf8FzuoQvQ3sONtNGGd+bbc a7tpYMZIC7tBOLLkbT2XKg26EyYKLhDuunt3JG4vDX4u4kOI8BbT8+zy+2hw 5PQWBX7CHpsPbi5Qp8FFGzXnZqL+omFRNcMDNFj/V5D3PmHet1Mm3Ro0sNJn cu4nbH69zsUFEfV/fWXTR/TnuVZa6ArQ4PG/4k3XCf/mC3wRoUWDk7+M1LgJ 72OeKqLq0GAwI+zTfaL/wU9VOnIP0SD5/udELsJ0+3WzWno0aJWnDVwj5uWw iOUvGNBg4Hd3xm5ivnllCTp/DGkQZNS7NZiYPyn8inXIERrcqL8mXEPkI15K 7lHmMRocb1mruIvIz+AP0lt1EyJvMv02p4h87XzXWVt3ggZh/wmtuWLGQFU6 D0i/zWngWOeZEkrkU4jfYVPgKaKfyV+e3iLya9WuqSpwmgadd3yErh5noD+O c04qZ2mw9WX5uT1HGUhrV9OdMisaVBk81OEyZqAHyxkppjY06GdaPa83Ivob YdnueY4GHVN5XfuIffE4pTq99gINDi2+K2DpE/2lCaxPuEgDYMZs9if2zSyv TKvQkQZz8oqescQ+Bndsy1m9TIOo7F0vDYl9pj9fUxPpToO43pT2p8S+Szj3 DtCu0KDdczhphDgP3q9EbdTxpMHbgL5Bi71EfmUWgkP9CNeeyS1RYiBN16oz gmE0eEqJ40+WZKDFb6O65Xdp0Jv+u0Fcguiv9joVr/tEPSrNV8I2EvVvPM7d E0EDOblDgVoiDLSuvDMvI5bYP6OeMRkeBvq28fd6SKWBx7P3fS8n6Sg6WGBh Oo2ox/jFDdtxOjKcUBlMS6dBfsKkhsAYHRWVexXwvSau9/i9sMEAHaVeZrNv zyX2Yz1PvBKTjtwqRIpdMQ3e7LqNKj7S0bade1/TSv5fT7pG2Ts6Gki0iG0t pcGrZFL0hxzivHd76qxeSYOeq+ePeBHPlwObtm7kaqBBwIWJoMuP6Ijbfb/H k04acCwGBau609EzCTvZ+jlifykJXRpUOlLfpaBo95c4L9onXisQz8PWw7N7 5+dpUJe/vXEDhfh9rzuGssvEPMg+YoV8RH2MVx5+7NKQHMXlcmC8CcGdmeLt G6Rh8sVPz92PmlD/RPDZ8K3S8PujtOaG9kbkx2VsL7NNGm7mrdRG1DYiymZR 93wFaaj3v7th5WsjMjDIDB5SlIbNqqd+v0htRO9SG15r7JEG/efP1lHcG9Et C8riuKY0bKEqH3jM1Yhky9Jjjc9IA5XevXxNtgE1bp9P7baUBqOPTdx8lAbk Hav//pKVNHifs8yPWNuA6hxHm+7YSkOTustOh7F65CGgwIPtpUFAPDDK/E09 wmdzfJWuSgPvCS8RFdV6dHo+z0YgXBrEzCZv71CrQ5E7Src1F0lDgs5N9ccb alCG2hmem8XSsE5qub1/qRph7dkR5VJp0LLvu7bxRzX6bbElLapC+v//X580 L65GhnfuSh2vl4bCTaaRIm7ViKvPRITeIQ3ue5FkRn0V8o0c+NcwKw1/f6Zc eOZTiS7OrGHUbJOB7aH0crvsMmSXO00Ni5CBb5f/xn6cKUTVtdy3vizLQNuQ 9qehY9nIWft7ZA3hUh411ZdHspHAl/ynbYStui+9u2iQjU5lXyqYJNz0+cHz Ee1sNBJRPyX7TwZW/HptR1WzEZdZpE044ZLnomd/SWQj7T7Rg1YrMsDzp/Dw 5I8sNHxy0tCJ8FxHtPvboSx0l15t4U24tiI/1q0/CzWXXL8WTZj6feHbZFcW skvtyqokvGJqojHVmIWCHJ9tUlqVAdGXPben8rKQbL+X/AHC7yX+3MzNzULV p4/tPUz4pL69v3tOFhIwYjtxjvD0qNmlqfQs9Ezx3N04wsdvX5GdSsxCWun7 41MJr2uxWZcbR9QnJfIyl/Da7a+n3GKykKJgRUkd4QIFi7zJcKK+sCdN3wgL /fga9fZuFv