(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.2' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 113256, 3004]*) (*NotebookOutlinePosition[ 113945, 3028]*) (* CellTagsIndexPosition[ 113901, 3024]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["\<\ Math 481A California State University, Northridge Heun's Method\ \>", "Section"], Cell["\[Copyright]2005 BE Shapiro", "Subsection"] }, Open ]], Cell[CellGroupData[{ Cell["Heun's Method", "Section"], Cell[BoxData[ RowBox[{\(HeunsMethod[f_, t0_, y0_, \ tmax_, h_, epsilon_: 10^\(-6\)]\), ":=", " ", RowBox[{"Module", "[", RowBox[{\({y, t, solution, yold, ynew, fvalue, i}\), ",", "\[IndentingNewLine]", RowBox[{\(solution = {{t0, y0}}\), ";", "\[IndentingNewLine]", \(y = y0\), ";", "\[IndentingNewLine]", \(t = t0\), ";", "\[IndentingNewLine]", RowBox[{"While", "[", RowBox[{\(t < tmax\), ",", "\[IndentingNewLine]", RowBox[{"(*", " ", StyleBox[\(first\ guess\ from\ Euler\), Background->RGBColor[1, 1, 0]], " ", "*)"}], "\[IndentingNewLine]", \(fvalue = f[t, y]; \[IndentingNewLine]yold = y + h*fvalue; \[IndentingNewLine]t = t + h; \[IndentingNewLine]\[IndentingNewLine] (*\ next\ guess\ from\ Heun\ *) \[IndentingNewLine]ynew = y + \((h/2)\)*\((fvalue + f[t, yold])\); \[IndentingNewLine]i = 0; \[IndentingNewLine]While[ Abs[ynew - yold] > epsilon\ \[And] \(i++\) < 10, \[IndentingNewLine]yold = ynew; \[IndentingNewLine]ynew = y + \((h/2)\)*\((fvalue + f[t, yold])\);\[IndentingNewLine]]; \ \[IndentingNewLine]y = ynew; \[IndentingNewLine]\[IndentingNewLine]solution = Append[solution, {t, y}];\)}], "\[IndentingNewLine]", "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", \(Return[solution]\), ";"}]}], "\[IndentingNewLine]", "]"}]}]], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["Examples", "Section"], Cell[BoxData[ \(f[t_, y_] := \ y*Cos[t] - \(\(t\)\(*\)\(y\)\(\ \)\)\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(e1 = HeunsMethod[f, 0, 3, Pi, .4];\)\ \), "\[IndentingNewLine]", \(\(pe1 = ListPlot[e1, PlotStyle \[Rule] \ {PointSize[ .03], RGBColor[1, 0, 0]}];\)\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.297619 0.0123072 0.135934 [ [.17262 -0.00019 -9 -9 ] [.17262 -0.00019 9 0 ] [.32143 -0.00019 -3 -9 ] [.32143 -0.00019 3 0 ] [.47024 -0.00019 -9 -9 ] [.47024 -0.00019 9 0 ] [.61905 -0.00019 -3 -9 ] [.61905 -0.00019 3 0 ] [.76786 -0.00019 -9 -9 ] [.76786 -0.00019 9 0 ] [.91667 -0.00019 -3 -9 ] [.91667 -0.00019 3 0 ] [.01131 .14824 -6 -4.5 ] [.01131 .14824 0 4.5 ] [.01131 .28417 -6 -4.5 ] [.01131 .28417 0 4.5 ] [.01131 .42011 -6 -4.5 ] [.01131 .42011 0 4.5 ] [.01131 .55604 -6 -4.5 ] [.01131 .55604 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .17262 .01231 m .17262 .01856 L s [(0.5)] .17262 -0.00019 0 1 Mshowa .32143 .01231 m .32143 .01856 L s [(1)] .32143 -0.00019 0 1 Mshowa .47024 .01231 m .47024 .01856 L s [(1.5)] .47024 -0.00019 0 1 Mshowa .61905 .01231 m .61905 .01856 L s [(2)] .61905 -0.00019 0 1 Mshowa .76786 .01231 m .76786 .01856 L s [(2.5)] .76786 -0.00019 0 1 Mshowa .91667 .01231 m .91667 .01856 L s [(3)] .91667 -0.00019 0 1 Mshowa .125 Mabswid .05357 .01231 m .05357 .01606 L s .08333 .01231 m .08333 .01606 L s .1131 .01231 m .1131 .01606 L s .14286 .01231 m .14286 .01606 L s .20238 .01231 m .20238 .01606 L s .23214 .01231 m .23214 .01606 L s .2619 .01231 m .2619 .01606 L s .29167 .01231 m .29167 .01606 L s .35119 .01231 m .35119 .01606 L s .38095 .01231 m .38095 .01606 L s .41071 .01231 m .41071 .01606 L s .44048 .01231 m .44048 .01606 L s .5 .01231 m .5 .01606 L s .52976 .01231 m .52976 .01606 L s .55952 .01231 m .55952 .01606 L s .58929 .01231 m .58929 .01606 L s .64881 .01231 m .64881 .01606 L s .67857 .01231 m .67857 .01606 L s .70833 .01231 m .70833 .01606 L s .7381 .01231 m .7381 .01606 L s .79762 .01231 m .79762 .01606 L s .82738 .01231 m .82738 .01606 L s .85714 .01231 m .85714 .01606 L s .8869 .01231 m .8869 .01606 L s .94643 .01231 m .94643 .01606 L s .97619 .01231 m .97619 .01606 L s .25 Mabswid 0 .01231 m 1 .01231 L s .02381 .14824 m .03006 .14824 L s [(1)] .01131 .14824 1 0 Mshowa .02381 .28417 m .03006 .28417 L s [(2)] .01131 .28417 1 0 Mshowa .02381 .42011 m .03006 .42011 L s [(3)] .01131 .42011 1 0 Mshowa .02381 .55604 m .03006 .55604 L s [(4)] .01131 .55604 1 0 Mshowa .125 Mabswid .02381 .03949 m .02756 .03949 L s .02381 .06668 m .02756 .06668 L s .02381 .09387 m .02756 .09387 L s .02381 .12105 m .02756 .12105 L s .02381 .17543 m .02756 .17543 L s .02381 .20261 m .02756 .20261 L s .02381 .2298 m .02756 .2298 L s .02381 .25699 m .02756 .25699 L s .02381 .31136 m .02756 .31136 L s .02381 .33855 m .02756 .33855 L s .02381 .36573 m .02756 .36573 L s .02381 .39292 m .02756 .39292 L s .02381 .44729 m .02756 .44729 L s .02381 .47448 m .02756 .47448 L s .02381 .50167 m .02756 .50167 L s .02381 .52885 m .02756 .52885 L s .02381 .58323 m .02756 .58323 L s .02381 .61041 m .02756 .61041 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 0 0 r .03 w .02381 .42011 Mdot .14286 .5586 Mdot .2619 .60332 Mdot .38095 .50806 Mdot .5 .32358 Mdot .61905 .1538 Mdot .7381 .05747 Mdot .85714 .0228 Mdot .97619 .01472 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{250, 154.5}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgoooViP03o`00 0?ooi^KoonKV0=_oonKV0ooo000;oooViP003_ooi^H00ol0003oonKVoooViP3JoooViPGoo`002_oo i^H000koonKV00?o0000oooVi_ooi^H0_oooi^H3ool001OoonKV1ooo0009oooViP002Oooi^K6o`00 00Goo`005_l00007ool000?o00001_ooi^H000koonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00?oonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00Co0000oooVi_ooi^KoonKV1ooo0003oooV iP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H01?l0003oonKVoooVi_ooi^H7 ool000WoonKV000>oooViP03o`000?ooi^KoonKV0;goonKV1ooo000FoooViPGoo`002_ooi^H000ko onKV00?o0000oooVi_ooi^H0_Oooi^H7ool001OoonKV0ooo000;oooViP003_ooi^H00ol0003oonKV oooViP2noooViPGoo`009_ooi^H000koonKV00?o0000oooVi_ooi^H0_oooi^H3ool002OoonKV000> oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0Xoooi^H3ool004?oonKV000>oooViP03 o`000?ooi^KoonKV0:;oonKV1Ooo0012oooViP003_ooi^H00ol0003oonKVoooViP2QoooViPOoo`00 @Oooi^H000koonKV00?o0000oooVi_ooi^H0XOooi^H7ool0047oonKV000>oooViP03o`000?ooi^Ko onKV0:7oonKV1ooo0011oooViP003_ooi^H00ol0003oonKVoooViP2RoooViPGoo`00@_ooi^H000ko onKV0_l0002ToooViP?oo`00@oooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_oo i^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0 003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKV oooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooV iP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV0006oooViP?o0000 1Oooi^H00ol0003oonKVoooViP3YoooViP001oooi^H00ol0003oonKVoooViP04oooViP03o`000?oo i^KoonKV08SoonKV0ooo001NoooViP001oooi^H00ol0003oonKVoooViP04oooViP03o`000?ooi^Ko onKV08OoonKV1Ooo001MoooViP001oooi^H00ol0003oonKVoooViP04oooViP?o0000Q_ooi^H7ool0 05coonKV0007oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H0Q_ooi^H7ool005co onKV0006oooViP;o00001_ooi^H00ol0003oonKVoooViP26oooViPOoo`00G?ooi^H000OoonKV00?o 0000oooVi_ooi^H01?ooi^H00ol0003oonKVoooViP27oooViPGoo`00GOooi^H000koonKV00?o0000 oooVi_ooi^H0R?ooi^H3ool005koonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o 0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOoo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooV iP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_oo i^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV 000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooV iP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0 jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000GoonKV1Ol00004oooViP03o`000?ooi^Ko onKV0>WoonKV0006oooViP04o`000?ooi^KoonKVo`0000CoonKV00?o0000oooVi_ooi^H0jOooi^H0 00OoonKV00?o0000oooVi_ooi^H01?ooi^H3o`000>WoonKV0008oooViP03o`000?ooi^KoonKV00?o onKV00?o0000oooVi_ooi^H0jOooi^H000GoonKV00Go0000oooVi_ooi^KoonKVo`000004oooViP03 o`000?ooi^KoonKV0>WoonKV0005oooViP05o`000?ooi^KoonKVoooVi_l000001?ooi^H00ol0003o onKVoooViP3YoooViP001_ooi^H3o`0000GoonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0001]oooV iP?oo`00N_ooi^H000koonKV00?o0000oooVi_ooi^H0Joooi^H5ool007WoonKV000>oooViP03o`00 0?ooi^KoonKV06[oonKV1ooo001hoooViP003_ooi^H00ol0003oonKVoooViP1ZoooViPOoo`00N?oo i^H000koonKV00?o0000oooVi_ooi^H0J_ooi^H7ool007SoonKV000>oooViP03o`000?ooi^KoonKV 06_oonKV1Ooo001ioooViP003_ooi^H2o`0006goonKV0ooo001joooViP003_ooi^H00ol0003oonKV oooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3Y oooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP00 3_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?ooi^Ko onKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>Wo onKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000> oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_oo i^H0jOooi^H000goonKV0ooo003ZoooViP001_ooi^H3o`0000?oonKV1Ooo003YoooViP001Oooi^H0 1_l0003oonKVoooVi_ooi^Ko0000oooViPOoo`00j?ooi^H000WoonKV00?o0000oooVi_oo00001_oo 003XoooViP001oooi^H2o`0000;oonKV1ooo003XoooViP002Oooi^H00ol0003oonKVoooViP05ool0 0>WoonKV0005oooViP05o`000?ooi^KoonKVoooVi_l000000oooi^H3ool00>[oonKV0006oooViP?o 00001Oooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_oo i^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV 000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooV iP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0 jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H0 00koonKV00?o0000oooVi_ooi^H0D?ooi^H3ool009KoonKV000>oooViP;o0000D?ooi^H5ool009Go onKV000>oooViP03o`000?ooi^KoonKV04koonKV1ooo002DoooViP003_ooi^H00ol0003oonKVoooV iP1>oooViPOoo`00U?ooi^H000koonKV00?o0000oooVi_ooi^H0C_ooi^H7ool009CoonKV000>oooV iP03o`000?ooi^KoonKV04ooonKV1Ooo002EoooViP003_ooi^H00ol0003oonKVoooViP1@oooViP?o o`00U_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H0 0ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003o onKVoooViP3YoooViP001oooi^H3o`0000CoonKV00?o0000oooVi_ooi^H06?ooi^H3ool00oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000j_ooi^H0 00koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV 00?o0000oooVi_ooi^H0=?ooi^H3ool00;;oonKV000>oooViP03o`000?ooi^KoonKV03?oonKV1Ooo 002aoooViP003_ooi^H00ol0003oonKVoooViP0boooViPOoo`00/?ooi^H000koonKV00?o0000oooV i_ooi^H0<_ooi^H7ool00;3oonKV000>oooViP;o0000oooViP03o`00 0?ooi^KoonKV03?oonKV1Ooo002aoooViP00\ \>"], ImageRangeCache->{{{0, 249}, {153.5, 0}} -> {-0.213858, -0.375224, \ 0.0143754, 0.031474}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(\(e2 = HeunsMethod[f, 0, 3, Pi, .2];\)\), "\[IndentingNewLine]", \(pe2 = ListPlot[e2, PlotStyle \[Rule] \ {PointSize[ .02], RGBColor[1, 1, 0]}]\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.297619 0.0147151 0.13274 [ [.17262 .00222 -9 -9 ] [.17262 .00222 9 0 ] [.32143 .00222 -3 -9 ] [.32143 .00222 3 0 ] [.47024 .00222 -9 -9 ] [.47024 .00222 9 0 ] [.61905 .00222 -3 -9 ] [.61905 .00222 3 0 ] [.76786 .00222 -9 -9 ] [.76786 .00222 9 0 ] [.91667 .00222 -3 -9 ] [.91667 .00222 3 0 ] [.01131 .14746 -6 -4.5 ] [.01131 .14746 0 4.5 ] [.01131 .2802 -6 -4.5 ] [.01131 .2802 0 4.5 ] [.01131 .41294 -6 -4.5 ] [.01131 .41294 0 4.5 ] [.01131 .54568 -6 -4.5 ] [.01131 .54568 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .17262 .01472 m .17262 .02097 L s [(0.5)] .17262 .00222 0 1 Mshowa .32143 .01472 m .32143 .02097 L s [(1)] .32143 .00222 0 1 Mshowa .47024 .01472 m .47024 .02097 L s [(1.5)] .47024 .00222 0 1 Mshowa .61905 .01472 m .61905 .02097 L s [(2)] .61905 .00222 0 1 Mshowa .76786 .01472 m .76786 .02097 L s [(2.5)] .76786 .00222 0 1 Mshowa .91667 .01472 m .91667 .02097 L s [(3)] .91667 .00222 0 1 Mshowa .125 Mabswid .05357 .01472 m .05357 .01847 L s .08333 .01472 m .08333 .01847 L s .1131 .01472 m .1131 .01847 L s .14286 .01472 m .14286 .01847 L s .20238 .01472 m .20238 .01847 L s .23214 .01472 m .23214 .01847 L s .2619 .01472 m .2619 .01847 L s .29167 .01472 m .29167 .01847 L s .35119 .01472 m .35119 .01847 L s .38095 .01472 m .38095 .01847 L s .41071 .01472 m .41071 .01847 L s .44048 .01472 m .44048 .01847 L s .5 .01472 m .5 .01847 L s .52976 .01472 m .52976 .01847 L s .55952 .01472 m .55952 .01847 L s .58929 .01472 m .58929 .01847 L s .64881 .01472 m .64881 .01847 L s .67857 .01472 m .67857 .01847 L s .70833 .01472 m .70833 .01847 L s .7381 .01472 m .7381 .01847 L s .79762 .01472 m .79762 .01847 L s .82738 .01472 m .82738 .01847 L s .85714 .01472 m .85714 .01847 L s .8869 .01472 m .8869 .01847 L s .94643 .01472 m .94643 .01847 L s .97619 .01472 m .97619 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .14746 m .03006 .14746 L s [(1)] .01131 .14746 1 0 Mshowa .02381 .2802 m .03006 .2802 L s [(2)] .01131 .2802 1 0 Mshowa .02381 .41294 m .03006 .41294 L s [(3)] .01131 .41294 1 0 Mshowa .02381 .54568 m .03006 .54568 L s [(4)] .01131 .54568 1 0 Mshowa .125 Mabswid .02381 .04126 m .02756 .04126 L s .02381 .06781 m .02756 .06781 L s .02381 .09436 m .02756 .09436 L s .02381 .12091 m .02756 .12091 L s .02381 .174 m .02756 .174 L s .02381 .20055 m .02756 .20055 L s .02381 .2271 m .02756 .2271 L s .02381 .25365 m .02756 .25365 L s .02381 .30674 m .02756 .30674 L s .02381 .33329 m .02756 .33329 L s .02381 .35984 m .02756 .35984 L s .02381 .38639 m .02756 .38639 L s .02381 .43948 m .02756 .43948 L s .02381 .46603 m .02756 .46603 L s .02381 .49258 m .02756 .49258 L s .02381 .51913 m .02756 .51913 L s .02381 .57222 m .02756 .57222 L s .02381 .59877 m .02756 .59877 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 1 0 r .02 w .02381 .41294 Mdot .08333 .48982 Mdot .14286 .55503 Mdot .20238 .59629 Mdot .2619 .60332 Mdot .32143 .57164 Mdot .38095 .50497 Mdot .44048 .4147 Mdot .5 .31636 Mdot .55952 .22466 Mdot .61905 .14953 Mdot .67857 .09466 Mdot .7381 .0586 Mdot .79762 .03709 Mdot .85714 .02537 Mdot .91667 .01948 Mdot .97619 .01673 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{250, 154.5}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgoooViP03o`000?ooi^KoonKV0;7oonKV1?ooo`0doooV iP003_ooi^H2o`000;;oonKV1?ooo`0doooViP003_ooi^H00ol0003oonKVoooViP2boooViP;oool0 =Oooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0Y?ooi^H2 oooo04?oonKV000>oooViP03o`000?ooi^KoonKV0:?oonKV1?ooo`12oooViP003_ooi^H00ol0003o onKVoooViP2SoooViPCoool0@_ooi^H000koonKV0_l0002UoooViP;oool0@oooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0 jOooi^H000koonKV00?o0000oooVi_ooi^H0U_ooi^H2oooo057oonKV000>oooViP;o0000U_ooi^H4 oooo053oonKV000>oooViP03o`000?ooi^KoonKV09GoonKV1?ooo`1@oooViP003_ooi^H00ol0003o onKVoooViP2FoooViP;oool0DOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_oo i^H00ol0003oonKVoooViP3YoooViP001_ooi^H3o`0000GoonKV00?o0000oooVi_ooi^H0jOooi^H0 00OoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003oonKVoooViP28oooViP;oool0Goooi^H000Oo onKV00?o0000oooVi_ooi^H01?ooi^H2o`0008SoonKV1?ooo`1NoooViP001oooi^H00ol0003oonKV oooViP04oooViP03o`000?ooi^KoonKV08OoonKV1?ooo`1NoooViP001oooi^H00ol0003oonKVoooV iP04oooViP03o`000?ooi^KoonKV08SoonKV0_ooo`1OoooViP001_ooi^H2o`0000KoonKV00?o0000 oooVi_ooi^H0jOooi^H000OoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003oonKVoooViP3YoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?oo i^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV 000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000j_ooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0 jOooi^H000koonKV00?o0000oooVi_ooi^H0N_ooi^H2oooo06goonKV000>oooViP03o`000?ooi^Ko onKV07WoonKV1?ooo`1/oooViP003_ooi^H2o`0007[oonKV1?ooo`1/oooViP003_ooi^H00ol0003o onKVoooViP1joooViP;oool0KOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_oo i^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP001Oooi^H5o`00 00CoonKV00?o0000oooVi_ooi^H0jOooi^H000KoonKV00Co0000oooVi_ooi^Ko00001?ooi^H00ol0 003oonKVoooViP3YoooViP001oooi^H00ol0003oonKVoooViP04oooViP;o0000j_ooi^H000SoonKV 00?o0000oooVi_ooi^H00oooi^H00ol0003oonKVoooViP3YoooViP001Oooi^H01Ol0003oonKVoooV i_ooi^Ko000000CoonKV00?o0000oooVi_ooi^H0jOooi^H000GoonKV00Go0000oooVi_ooi^KoonKV o`000004oooViP03o`000?ooi^KoonKV0>WoonKV0006oooViP?o00001Oooi^H00ol0003oonKVoooV iP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV06coonKV0_ooo`1koooViP003_oo i^H00ol0003oonKVoooViP1[oooViPCoool0N_ooi^H000koonKV00?o0000oooVi_ooi^H0Joooi^H4 oooo07[oonKV000>oooViP03o`000?ooi^KoonKV06coonKV0_ooo`1koooViP003_ooi^H00ol0003o onKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000> oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000j_oo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooViP3YoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP001_oo i^H3o`0000GoonKV00?o0000oooVi_ooi^H0jOooi^H000GoonKV00Go0000oooVi_ooi^KoonKVo`00 0003oooViP;oool0joooi^H000WoonKV00?o0000oooVi_ooi^H01?ooo`1OoooViP;oool0ROooi^H0 00OoonKV0_l00003oooViPCoool0G_ooi^H4oooo08SoonKV0009oooViP04o`000?ooi^KoonKVoooV iP;oool0Goooi^H4oooo08SoonKV0005oooViP05o`000?ooi^KoonKVoooVi_l000001?ooi^H00ol0 003oonKVoooViP1NoooViP;oool0ROooi^H000KoonKV0ol00005oooViP03o`000?ooi^KoonKV0>Wo onKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000> oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_oo i^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOoo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003o onKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooV iP3YoooViP003_ooi^H00ol0003oonKVoooViP0:oooViP;oool0gOooi^H000koonKV00?o0000oooV i_ooi^H02Oooi^H4oooo0=coonKV000>oooViP;o00002_ooi^H4oooo0=coonKV000>oooViP03o`00 0?ooi^KoonKV00[oonKV0_ooo`3MoooViP003_ooi^H00ol0003oonKVoooViP1@oooViP;oool0Uooo i^H000koonKV00?o0000oooVi_ooi^H0Coooi^H4oooo09KoonKV000>oooViP03o`000?ooi^KoonKV 04ooonKV1?ooo`2FoooViP003_ooi^H00ol0003oonKVoooViP1@oooViP;oool0Uoooi^H000koonKV 0_l0003ZoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3Y oooViP003_ooi^H00ol0003oonKVoooViP3YoooViP001oooi^H3o`0000CoonKV00?o0000oooVi_oo i^H0jOooi^H000SoonKV00?o0000oooVi_ooi^H00oooi^H00ol0003oonKVoooViP3YoooViP001Ooo i^H5o`0000CoonKV00?o0000oooVi_ooi^H0jOooi^H000GoonKV00Co0000oooVi_ooi^Ko00001Ooo i^H2o`000>[oonKV0006oooViP03o`000?ooi^Ko000000GoonKV00?o0000oooVi_ooi^H06?ooi^H2 oooo0oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`00 0?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV02KoonKV0_ooo`31oooViP003_ooi^H0 0ol0003oonKVoooViP0UoooViPCoool0`?ooi^H000koonKV0_l0000VoooViPCoool02oooi^H2oooo 0;?oonKV000>oooViP03o`000?ooi^KoonKV02KoonKV0_ooo`0;oooViPCoool0/_ooi^H000koonKV 00?o0000oooVi_ooi^H0oooViP03o`000?ooi^KoonKV03CoonKV0_oo o`2coooViP003_ooi^H00ol0003oonKVoooViP3YoooViP00\ \>"], ImageRangeCache->{{{0, 249}, {153.5, 0}} -> {-0.206713, -0.383106, \ 0.0143193, 0.0321056}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(\(e3 = HeunsMethod[f, 0, 3, Pi, .1];\)\), "\[IndentingNewLine]", \(pe3 = ListPlot[e3, PlotStyle \[Rule] \ {PointSize[ .01], RGBColor[0, 0, 1]}]\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.297619 0.0147151 0.131832 [ [.17262 .00222 -9 -9 ] [.17262 .00222 9 0 ] [.32143 .00222 -3 -9 ] [.32143 .00222 3 0 ] [.47024 .00222 -9 -9 ] [.47024 .00222 9 0 ] [.61905 .00222 -3 -9 ] [.61905 .00222 3 0 ] [.76786 .00222 -9 -9 ] [.76786 .00222 9 0 ] [.91667 .00222 -3 -9 ] [.91667 .00222 3 0 ] [.01131 .14655 -6 -4.5 ] [.01131 .14655 0 4.5 ] [.01131 .27838 -6 -4.5 ] [.01131 .27838 0 4.5 ] [.01131 .41021 -6 -4.5 ] [.01131 .41021 0 4.5 ] [.01131 .54204 -6 -4.5 ] [.01131 .54204 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .17262 .01472 m .17262 .02097 L s [(0.5)] .17262 .00222 0 1 Mshowa .32143 .01472 m .32143 .02097 L s [(1)] .32143 .00222 0 1 Mshowa .47024 .01472 m .47024 .02097 L s [(1.5)] .47024 .00222 0 1 Mshowa .61905 .01472 m .61905 .02097 L s [(2)] .61905 .00222 0 1 Mshowa .76786 .01472 m .76786 .02097 L s [(2.5)] .76786 .00222 0 1 Mshowa .91667 .01472 m .91667 .02097 L s [(3)] .91667 .00222 0 1 Mshowa .125 Mabswid .05357 .01472 m .05357 .01847 L s .08333 .01472 m .08333 .01847 L s .1131 .01472 m .1131 .01847 L s .14286 .01472 m .14286 .01847 L s .20238 .01472 m .20238 .01847 L s .23214 .01472 m .23214 .01847 L s .2619 .01472 m .2619 .01847 L s .29167 .01472 m .29167 .01847 L s .35119 .01472 m .35119 .01847 L s .38095 .01472 m .38095 .01847 L s .41071 .01472 m .41071 .01847 L s .44048 .01472 m .44048 .01847 L s .5 .01472 m .5 .01847 L s .52976 .01472 m .52976 .01847 L s .55952 .01472 m .55952 .01847 L s .58929 .01472 m .58929 .01847 L s .64881 .01472 m .64881 .01847 L s .67857 .01472 m .67857 .01847 L s .70833 .01472 m .70833 .01847 L s .7381 .01472 m .7381 .01847 L s .79762 .01472 m .79762 .01847 L s .82738 .01472 m .82738 .01847 L s .85714 .01472 m .85714 .01847 L s .8869 .01472 m .8869 .01847 L s .94643 .01472 m .94643 .01847 L s .97619 .01472 m .97619 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .14655 m .03006 .14655 L s [(1)] .01131 .14655 1 0 Mshowa .02381 .27838 m .03006 .27838 L s [(2)] .01131 .27838 1 0 Mshowa .02381 .41021 m .03006 .41021 L s [(3)] .01131 .41021 1 0 Mshowa .02381 .54204 m .03006 .54204 L s [(4)] .01131 .54204 1 0 Mshowa .125 Mabswid .02381 .04108 m .02756 .04108 L s .02381 .06745 m .02756 .06745 L s .02381 .09381 m .02756 .09381 L s .02381 .12018 m .02756 .12018 L s .02381 .17291 m .02756 .17291 L s .02381 .19928 m .02756 .19928 L s .02381 .22565 m .02756 .22565 L s .02381 .25201 m .02756 .25201 L s .02381 .30474 m .02756 .30474 L s .02381 .33111 m .02756 .33111 L s .02381 .35748 m .02756 .35748 L s .02381 .38384 m .02756 .38384 L s .02381 .43658 m .02756 .43658 L s .02381 .46294 m .02756 .46294 L s .02381 .48931 m .02756 .48931 L s .02381 .51567 m .02756 .51567 L s .02381 .56841 m .02756 .56841 L s .02381 .59477 m .02756 .59477 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 0 1 r .01 w .02381 .41021 Mdot .05357 .44944 Mdot .08333 .48733 Mdot .1131 .52239 Mdot .14286 .55305 Mdot .17262 .57771 Mdot .20238 .59487 Mdot .23214 .60332 Mdot .2619 .60219 Mdot .29167 .59114 Mdot .32143 .57034 Mdot .35119 .54057 Mdot .38095 .50312 Mdot .41071 .4597 Mdot .44048 .41227 Mdot .47024 .36294 Mdot .5 .3137 Mdot .52976 .26633 Mdot .55952 .22229 Mdot .58929 .18258 Mdot .61905 .14784 Mdot .64881 .11827 Mdot .67857 .09376 Mdot .70833 .07396 Mdot .7381 .05833 Mdot .76786 .04628 Mdot .79762 .03718 Mdot .82738 .03046 Mdot .85714 .02559 Mdot .8869 .02212 Mdot .91667 .01969 Mdot .94643 .01802 Mdot .97619 .01689 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{250, 154.5}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgoooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP04oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003o onKVoooViP03oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H01?ooi^H2o`00o`Go onKV0_l00?l5oooViP;o003o1Oooi^H2o`00o`_oonKV000>oooViP03o`000?ooi^KoonKV0<3oonKV 0_l00?l5oooViP;o003o1Oooi^H2o`00oaWoonKV000>oooViP03o`000?ooi^KoonKV0;WoonKV0_l0 0?l5oooViP;o003o9oooi^H000koonKV00?o0000oooVi_ooi^H0^Oooi^H2o`00obkoonKV000>oooV iP03o`000?ooi^KoonKV0;;oonKV0_l00?leoooViP003_ooi^H2o`000;?oonKV0_l00?leoooViP00 3_ooi^H00ol0003oonKVoooViP2[oooViP;o003o??ooi^H000koonKV00?o0000oooVi_ooi^H0Zooo i^H2o`00occoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV 0:CoonKV0_l00?m3oooViP003_ooi^H00ol0003oonKVoooViP2ToooViP;o003o@oooi^H000koonKV 0_l0003ZoooViP003_ooi^H00ol0003oonKVoooViP2MoooViP;o003oB_ooi^H000koonKV00?o0000 oooVi_ooi^H0WOooi^H2o`00od[oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000Uooo i^H2o`00oe7oonKV000>oooViP03o`000?ooi^KoonKV09KoonKV0_l00?mAoooViP003_ooi^H00ol0 003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKV oooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP2? oooViP;o003oF?ooi^H000koonKV0_l0002@oooViP;o003oF?ooi^H000koonKV00?o0000oooVi_oo i^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000KoonKV0ol00005oooViP03o`000?oo i^KoonKV0>WoonKV0007oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H0jOooi^H0 00OoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003oonKVoooViP3YoooViP001oooi^H00ol0003o onKVoooViP04oooViP;o0000ROooi^H2o`00oeooonKV0007oooViP03o`000?ooi^KoonKV00CoonKV 00?o0000oooVi_ooi^H0R?ooi^H2o`00oeooonKV0006oooViP;o00001_ooi^H00ol0003oonKVoooV iP3YoooViP001oooi^H00ol0003oonKVoooViP04oooViP03o`000?ooi^KoonKV0>WoonKV000>oooV iP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000 j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0POooi^H2 o`00ofKoonKV000>oooViP03o`000?ooi^KoonKV087oonKV0_l00?mVoooViP003_ooi^H00ol0003o onKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000> oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?oo i^KoonKV07[oonKV0_l00?m]oooViP003_ooi^H2o`0007_oonKV0_l00?m]oooViP003_ooi^H00ol0 003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKV oooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3Y oooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`00 0?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViPGo00001?ooi^H0 0ol0003oonKVoooViP1coooViP;o003oM?ooi^H000KoonKV00Co0000oooVi_ooi^Ko00001?ooi^H0 0ol0003oonKVoooViP1coooViP;o003oM?ooi^H000OoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0 003oonKVoooViP3YoooViP002?ooi^H00ol0003oonKVoooViP03oooViP;o0000j_ooi^H000GoonKV 00Go0000oooVi_ooi^KoonKVo`000004oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViP05o`00 0?ooi^KoonKVoooVi_l000001?ooi^H00ol0003oonKVoooViP3YoooViP001_ooi^H3o`0000GoonKV 00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000 oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP00 3_ooi^H00ol0003oonKVoooViP1/oooViP;o003oNoooi^H000koonKV00?o0000oooVi_ooi^H0K?oo i^H2o`00og_oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o 0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_oo i^H00ol0003oonKVoooViP1UoooViP;o003oP_ooi^H000koonKV00?o0000oooVi_ooi^H0IOooi^H2 o`00oh;oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>Wo onKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000> oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_oo i^H0jOooi^H000KoonKV0ol00005oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViP05o`000?oo i^KoonKVoooVi_l000001?ooi^H00ol0003oonKVoooViP3YoooViP002Oooi^H01?l0003oonKVoooV i_ooi^H2o`00on_oonKV0007oooViP;o00001?ooi^H2o`00o`03o`000?ooi^KoonKV05goonKV0_l0 0?n9oooViP002Oooi^H00ol0003oonKVoooViP02oooViP03o`000?ooi^KoonKV05koonKV0_l00?n9 oooViP001Oooi^H01Ol0003oonKVoooVi_ooi^Ko000000CoonKV00?o0000oooVi_ooi^H0jOooi^H0 00KoonKV0ol00005oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>Wo onKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000j_ooi^H000koonKV00?o0000 oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_oo i^H00oooi^H2o`00onCoonKV000>oooViP03o`000?ooi^KoonKV00?oonKV0_l00?oToooViP003_oo i^H00ol0003oonKVoooViP1GoooViP;o003oT?ooi^H000koonKV0_l0001HoooViP;o003oT?ooi^H0 00koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV 00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000 oooVi_ooi^H02_ooi^H2o`00omgoonKV000>oooViP;o00002oooi^H2o`00omgoonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?oo i^KoonKV053oonKV0_l00?nGoooViP003_ooi^H00ol0003oonKVoooViP1@oooViP;o003oUoooi^H0 00koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKV oooViP3YoooViP003_ooi^H00ol0003oonKVoooViP0AoooViP;o003oe_ooi^H000koonKV00?o0000 oooVi_ooi^H04Oooi^H2o`00omKoonKV0007oooViP?o00001?ooi^H00ol0003oonKVoooViP3YoooV iP002?ooi^H00ol0003oonKVoooViP03oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViPGo0000 1?ooi^H00ol0003oonKVoooViP19oooViP;o003oW_ooi^H000GoonKV00Co0000oooVi_ooi^Ko0000 1Oooi^H2o`0004[oonKV0_l00?nNoooViP001_ooi^H00ol0003oonKVo`000005oooViP03o`000?oo i^KoonKV0>WoonKV0007oooViP;o00001Oooi^H00ol0003oonKVoooViP0HoooViP;o003ocoooi^H0 00SoonKV00?o0000oooVi_ooi^H00oooi^H00ol0003oonKVoooViP0HoooViP;o003ocoooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0 0013oooViP;o003oYOooi^H000koonKV00?o0000oooVi_ooi^H0@_ooi^H2o`00ojGoonKV000>oooV iP03o`000?ooi^KoonKV01ooonKV0_l00?o8oooViP003_ooi^H00ol0003oonKVoooViP0OoooViP;o 003ob?ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0>ooo i^H2o`00ojcoonKV000>oooViP;o00009oooi^H2o`00oa?oonKV0_l00?n/oooViP003_ooi^H00ol0 003oonKVoooViP0VoooViP;o003o3?ooi^H2o`00ok?oonKV000>oooViP03o`000?ooi^KoonKV02go onKV0_l00?l5oooViP;o003o/oooi^H000koonKV00?o0000oooVi_ooi^H0;Oooi^H2o`00ok[oonKV 000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV0000\ \>"], ImageRangeCache->{{{0, 249}, {153.5, 0}} -> {-0.206713, -0.385745, \ 0.0143193, 0.0323268}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["Exact Solution", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(n = NDSolve[{\(y'\)[t] \[Equal] y[t]*Cos[t] - t*y[t], \ y[0] \[Equal] 3}, \ {y[t]}, {t, 0, 4 Pi}];\)\), "\[IndentingNewLine]", \(pn = Plot[y[t] /. n, {t, 0, Pi}]\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.303152 0.0147151 0.131454 [ [.17539 .00222 -9 -9 ] [.17539 .00222 9 0 ] [.32696 .00222 -3 -9 ] [.32696 .00222 3 0 ] [.47854 .00222 -9 -9 ] [.47854 .00222 9 0 ] [.63011 .00222 -3 -9 ] [.63011 .00222 3 0 ] [.78169 .00222 -9 -9 ] [.78169 .00222 9 0 ] [.93327 .00222 -3 -9 ] [.93327 .00222 3 0 ] [.01131 .14617 -6 -4.5 ] [.01131 .14617 0 4.5 ] [.01131 .27762 -6 -4.5 ] [.01131 .27762 0 4.5 ] [.01131 .40908 -6 -4.5 ] [.01131 .40908 0 4.5 ] [.01131 .54053 -6 -4.5 ] [.01131 .54053 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .17539 .01472 m .17539 .02097 L s [(0.5)] .17539 .00222 0 1 Mshowa .32696 .01472 m .32696 .02097 L s [(1)] .32696 .00222 0 1 Mshowa .47854 .01472 m .47854 .02097 L s [(1.5)] .47854 .00222 0 1 Mshowa .63011 .01472 m .63011 .02097 L s [(2)] .63011 .00222 0 1 Mshowa .78169 .01472 m .78169 .02097 L s [(2.5)] .78169 .00222 0 1 Mshowa .93327 .01472 m .93327 .02097 L s [(3)] .93327 .00222 0 1 Mshowa .125 Mabswid .05412 .01472 m .05412 .01847 L s .08444 .01472 m .08444 .01847 L s .11476 .01472 m .11476 .01847 L s .14507 .01472 m .14507 .01847 L s .2057 .01472 m .2057 .01847 L s .23602 .01472 m .23602 .01847 L s .26633 .01472 m .26633 .01847 L s .29665 .01472 m .29665 .01847 L s .35728 .01472 m .35728 .01847 L s .38759 .01472 m .38759 .01847 L s .41791 .01472 m .41791 .01847 L s .44822 .01472 m .44822 .01847 L s .50885 .01472 m .50885 .01847 L s .53917 .01472 m .53917 .01847 L s .56948 .01472 m .56948 .01847 L s .5998 .01472 m .5998 .01847 L s .66043 .01472 m .66043 .01847 L s .69074 .01472 m .69074 .01847 L s .72106 .01472 m .72106 .01847 L s .75138 .01472 m .75138 .01847 L s .81201 .01472 m .81201 .01847 L s .84232 .01472 m .84232 .01847 L s .87264 .01472 m .87264 .01847 L s .90295 .01472 m .90295 .01847 L s .96358 .01472 m .96358 .01847 L s .9939 .01472 m .9939 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .14617 m .03006 .14617 L s [(1)] .01131 .14617 1 0 Mshowa .02381 .27762 m .03006 .27762 L s [(2)] .01131 .27762 1 0 Mshowa .02381 .40908 m .03006 .40908 L s [(3)] .01131 .40908 1 0 Mshowa .02381 .54053 m .03006 .54053 L s [(4)] .01131 .54053 1 0 Mshowa .125 Mabswid .02381 .04101 m .02756 .04101 L s .02381 .0673 m .02756 .0673 L s .02381 .09359 m .02756 .09359 L s .02381 .11988 m .02756 .11988 L s .02381 .17246 m .02756 .17246 L s .02381 .19875 m .02756 .19875 L s .02381 .22504 m .02756 .22504 L s .02381 .25133 m .02756 .25133 L s .02381 .30391 m .02756 .30391 L s .02381 .3302 m .02756 .3302 L s .02381 .35649 m .02756 .35649 L s .02381 .38279 m .02756 .38279 L s .02381 .43537 m .02756 .43537 L s .02381 .46166 m .02756 .46166 L s .02381 .48795 m .02756 .48795 L s .02381 .51424 m .02756 .51424 L s .02381 .56682 m .02756 .56682 L s .02381 .59311 m .02756 .59311 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid .02381 .40908 m .06244 .4589 L .10458 .50997 L .14415 .55123 L .16408 .5684 L .18221 .58141 L .20178 .59231 L .21254 .59679 L .21738 .59844 L .22272 .59998 L .22739 .6011 L .23241 .60205 L .23518 .60246 L .23772 .60277 L .24027 .60301 L .24154 .60311 L .24269 .60318 L .24375 .60323 L .2449 .60327 L .24612 .6033 L .24726 .60332 L .24834 .60332 L .24947 .60331 L .25044 .60328 L .25151 .60325 L .25276 .60319 L .25391 .60312 L .25648 .60292 L .25887 .60267 L .26113 .60237 L .26572 .6016 L .27078 .60048 L .28104 .59736 L .29054 .59345 L .29946 .58889 L .31964 .57548 L .33815 .55957 L .37777 .51513 L .41588 .46177 L .45644 .39795 L .49549 .33421 L .53698 .26864 L .57697 .21118 L .61543 .16333 L .65635 .12145 L .69575 .08986 L .73364 .06683 L .75472 .05673 L .77398 .04898 L .81281 .03699 L Mistroke .83183 .03259 L .85257 .02869 L .87392 .02548 L .89326 .02317 L .91368 .02123 L .93245 .01981 L .95173 .01866 L .97256 .0177 L .97619 .01755 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{250, 154.5}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgoooViP03o`000?ooi^KoonKV0<;oonKV2_l0000MoooViP003_ooi^H00ol0003oonKVoooV iP2moooViPGo00009oooi^H000koonKV00?o0000oooVi_ooi^H0^Oooi^H4o`0002coonKV000>oooV iP03o`000?ooi^KoonKV0;GoonKV1?l0000`oooViP003_ooi^H2o`000;?oonKV0ol0000doooViP00 3_ooi^H00ol0003oonKVoooViP2_oooViP?o0000=oooi^H000koonKV00?o0000oooVi_ooi^H0[?oo i^H3o`0003[oonKV000>oooViP03o`000?ooi^KoonKV0:WoonKV0ol0000moooViP003_ooi^H00ol0 003oonKVoooViP2WoooViP;o0000@?ooi^H000koonKV00?o0000oooVi_ooi^H0Y?ooi^H3o`0004;o onKV000>oooViP;o0000Xoooi^H2o`0004GoonKV000>oooViP03o`000?ooi^KoonKV0:7oonKV00?o 0000oooVi_ooi^H0AOooi^H000koonKV00?o0000oooVi_ooi^H0X?ooi^H00ol0003oonKVoooViP16 oooViP003_ooi^H00ol0003oonKVoooViP2NoooViP;o0000BOooi^H000koonKV00?o0000oooVi_oo i^H0WOooi^H00ol0003oonKVoooViP19oooViP003_ooi^H00ol0003oonKVoooViP2LoooViP03o`00 0?ooi^KoonKV04[oonKV000>oooViP;o0000Voooi^H2o`0004goonKV000>oooViP03o`000?ooi^Ko onKV09WoonKV00?o0000oooVi_ooi^H0COooi^H000koonKV00?o0000oooVi_ooi^H0Uoooi^H2o`00 053oonKV000>oooViP03o`000?ooi^KoonKV09KoonKV00?o0000oooVi_ooi^H0D?ooi^H000koonKV 00?o0000oooVi_ooi^H0UOooi^H00ol0003oonKVoooViP1AoooViP003_ooi^H00ol0003oonKVoooV iP2CoooViP;o0000E?ooi^H000koonKV00?o0000oooVi_ooi^H0T_ooi^H00ol0003oonKVoooViP1D oooViP003_ooi^H2o`0009;oonKV00?o0000oooVi_ooi^H0EOooi^H000koonKV00?o0000oooVi_oo i^H0TOooi^H00ol0003oonKVoooViP1EoooViP003_ooi^H00ol0003oonKVoooViP2@oooViP03o`00 0?ooi^KoonKV05KoonKV0006oooViP?o00001Oooi^H00ol0003oonKVoooViP2?oooViP03o`000?oo i^KoonKV05OoonKV0007oooViP03o`000?ooi^KoonKV00CoonKV00?o0000oooVi_ooi^H0S_ooi^H0 0ol0003oonKVoooViP1HoooViP001oooi^H00ol0003oonKVoooViP04oooViP03o`000?ooi^KoonKV 08goonKV00?o0000oooVi_ooi^H0FOooi^H000OoonKV00?o0000oooVi_ooi^H01?ooi^H2o`0008go onKV00?o0000oooVi_ooi^H0F_ooi^H000OoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003oonKV oooViP2;oooViP03o`000?ooi^KoonKV05_oonKV0006oooViP;o00001_ooi^H00ol0003oonKVoooV iP2:oooViP03o`000?ooi^KoonKV05coonKV0007oooViP03o`000?ooi^KoonKV00CoonKV00?o0000 oooVi_ooi^H0ROooi^H00ol0003oonKVoooViP1MoooViP003_ooi^H00ol0003oonKVoooViP28oooV iP03o`000?ooi^KoonKV05koonKV000>oooViP03o`000?ooi^KoonKV08SoonKV00?o0000oooVi_oo i^H0G_ooi^H000koonKV0_l00028oooViP03o`000?ooi^KoonKV05ooonKV000>oooViP03o`000?oo i^KoonKV08KoonKV00?o0000oooVi_ooi^H0H?ooi^H000koonKV00?o0000oooVi_ooi^H0QOooi^H0 0ol0003oonKVoooViP1QoooViP003_ooi^H00ol0003oonKVoooViP24oooViP03o`000?ooi^KoonKV 06;oonKV000>oooViP03o`000?ooi^KoonKV08?oonKV00?o0000oooVi_ooi^H0Hoooi^H000koonKV 00?o0000oooVi_ooi^H0Poooi^H00ol0003oonKVoooViP1SoooViP003_ooi^H2o`0008?oonKV00?o 0000oooVi_ooi^H0I?ooi^H000koonKV00?o0000oooVi_ooi^H0POooi^H00ol0003oonKVoooViP1U oooViP003_ooi^H00ol0003oonKVoooViP20oooViP03o`000?ooi^KoonKV06KoonKV000>oooViP03 o`000?ooi^KoonKV07ooonKV00?o0000oooVi_ooi^H0Ioooi^H000koonKV00?o0000oooVi_ooi^H0 Ooooi^H00ol0003oonKVoooViP1WoooViP003_ooi^H00ol0003oonKVoooViP1noooViP03o`000?oo i^KoonKV06SoonKV000>oooViP;o0000O_ooi^H00ol0003oonKVoooViP1YoooViP003_ooi^H00ol0 003oonKVoooViP1loooViP03o`000?ooi^KoonKV06[oonKV000>oooViP03o`000?ooi^KoonKV07co onKV00?o0000oooVi_ooi^H0J_ooi^H000koonKV00?o0000oooVi_ooi^H0Noooi^H00ol0003oonKV oooViP1[oooViP003_ooi^H00ol0003oonKVoooViP1joooViP03o`000?ooi^KoonKV06coonKV000> oooViP03o`000?ooi^KoonKV07[oonKV00?o0000oooVi_ooi^H0K?ooi^H000koonKV0_l0001joooV iP03o`000?ooi^KoonKV06goonKV000>oooViP03o`000?ooi^KoonKV07SoonKV00?o0000oooVi_oo i^H0K_ooi^H000koonKV00?o0000oooVi_ooi^H0Moooi^H00ol0003oonKVoooViP1_oooViP003_oo i^H00ol0003oonKVoooViP1goooViP03o`000?ooi^KoonKV06ooonKV0005oooViPGo00001?ooi^H0 0ol0003oonKVoooViP1foooViP03o`000?ooi^KoonKV073oonKV0006oooViP04o`000?ooi^KoonKV o`0000CoonKV00?o0000oooVi_ooi^H0MOooi^H00ol0003oonKVoooViP1aoooViP001oooi^H00ol0 003oonKVoooViP04oooViP03o`000?ooi^KoonKV07GoonKV00?o0000oooVi_ooi^H0LOooi^H000So onKV00?o0000oooVi_ooi^H00oooi^H2o`0007GoonKV00?o0000oooVi_ooi^H0L_ooi^H000GoonKV 00Go0000oooVi_ooi^KoonKVo`000004oooViP03o`000?ooi^KoonKV07?oonKV00?o0000oooVi_oo i^H0Loooi^H000GoonKV00Go0000oooVi_ooi^KoonKVo`000004oooViP03o`000?ooi^KoonKV07?o onKV00?o0000oooVi_ooi^H0Loooi^H000KoonKV0ol00005oooViP03o`000?ooi^KoonKV07;oonKV 00?o0000oooVi_ooi^H0M?ooi^H000koonKV00?o0000oooVi_ooi^H0L_ooi^H00ol0003oonKVoooV iP1doooViP003_ooi^H00ol0003oonKVoooViP1aoooViP03o`000?ooi^KoonKV07GoonKV000>oooV iP;o0000LOooi^H00ol0003oonKVoooViP1foooViP003_ooi^H00ol0003oonKVoooViP1`oooViP03 o`000?ooi^KoonKV07KoonKV000>oooViP03o`000?ooi^KoonKV06ooonKV00?o0000oooVi_ooi^H0 Moooi^H000koonKV00?o0000oooVi_ooi^H0Koooi^H00ol0003oonKVoooViP1goooViP003_ooi^H0 0ol0003oonKVoooViP1^oooViP03o`000?ooi^KoonKV07SoonKV000>oooViP03o`000?ooi^KoonKV 06goonKV00?o0000oooVi_ooi^H0NOooi^H000koonKV0_l0001^oooViP03o`000?ooi^KoonKV07Wo onKV000>oooViP03o`000?ooi^KoonKV06coonKV00?o0000oooVi_ooi^H0N_ooi^H000koonKV00?o 0000oooVi_ooi^H0K?ooi^H00ol0003oonKVoooViP1joooViP003_ooi^H00ol0003oonKVoooViP1[ oooViP03o`000?ooi^KoonKV07_oonKV000>oooViP03o`000?ooi^KoonKV06[oonKV00?o0000oooV i_ooi^H0O?ooi^H000koonKV00?o0000oooVi_ooi^H0J_ooi^H00ol0003oonKVoooViP1loooViP00 3_ooi^H2o`0006[oonKV00?o0000oooVi_ooi^H0OOooi^H000koonKV00?o0000oooVi_ooi^H0J?oo i^H00ol0003oonKVoooViP1noooViP003_ooi^H00ol0003oonKVoooViP1XoooViP03o`000?ooi^Ko onKV07koonKV000>oooViP03o`000?ooi^KoonKV06OoonKV00?o0000oooVi_ooi^H0Ooooi^H000ko onKV00?o0000oooVi_ooi^H0I_ooi^H00ol0003oonKVoooViP20oooViP003_ooi^H00ol0003oonKV oooViP1VoooViP03o`000?ooi^KoonKV083oonKV000>oooViP;o0000I_ooi^H00ol0003oonKVoooV iP21oooViP003_ooi^H00ol0003oonKVoooViP1ToooViP03o`000?ooi^KoonKV08;oonKV000>oooV iP03o`000?ooi^KoonKV06CoonKV00?o0000oooVi_ooi^H0P_ooi^H000koonKV00?o0000oooVi_oo i^H0Hoooi^H00ol0003oonKVoooViP23oooViP001_ooi^H3o`0000GoonKV00?o0000oooVi_ooi^H0 H_ooi^H00ol0003oonKVoooViP24oooViP001Oooi^H01Ol0003oonKVoooVi_ooi^Ko000000CoonKV 00?o0000oooVi_ooi^H0H_ooi^H00ol0003oonKVoooViP24oooViP002Oooi^H00ol0003oonKVoooV iP02oooViP;o0000H_ooi^H00ol0003oonKVoooViP25oooViP001oooi^H2o`0000GoonKV00?o0000 oooVi_ooi^H0H?ooi^H00ol0003oonKVoooViP26oooViP002Oooi^H00ol0003oonKVoooViP02oooV iP;o0000HOooi^H00ol0003oonKVoooViP26oooViP001Oooi^H01Ol0003oonKVoooVi_ooi^Ko0000 00CoonKV00?o0000oooVi_l00000Goooi^H00ol0003oonKVoooViP27oooViP001_ooi^H3o`0000Go onKV00Co0000oooVi_ooi^Ko0000G_ooi^H00ol0003oonKVoooViP27oooViP003_ooi^H01?l0003o onKVoooVi_l0001MoooViP03o`000?ooi^KoonKV08SoonKV000>oooViP05o`000?ooi^KoonKVoooV i_l00000Foooi^H00ol0003oonKVoooViP29oooViP003_ooi^H2o`0000?oonKV00?o0000oooVi_oo i^H0F?ooi^H00ol0003oonKVoooViP29oooViP003_ooi^H00ol0003oonKVoooViP03oooViP03o`00 0?ooi^KoonKV05KoonKV00?o0000oooVi_ooi^H0R_ooi^H000koonKV00?o0000oooVi_ooi^H00ooo i^H00ol0003oonKVoooViP1FoooViP03o`000?ooi^KoonKV08[oonKV000>oooViP03o`000?ooi^Ko onKV00CoonKV00?o0000oooVi_ooi^H0E?ooi^H00ol0003oonKVoooViP2;oooViP003_ooi^H00ol0 003oonKVoooViP05oooViP03o`000?ooi^KoonKV05;oonKV00?o0000oooVi_ooi^H0S?ooi^H000ko onKV00?o0000oooVi_ooi^H01_ooi^H00ol0003oonKVoooViP1AoooViP03o`000?ooi^KoonKV08co onKV000>oooViP;o00001oooi^H00ol0003oonKVoooViP1@oooViP03o`000?ooi^KoonKV08goonKV 000>oooViP03o`000?ooi^KoonKV00OoonKV00?o0000oooVi_ooi^H0Coooi^H00ol0003oonKVoooV iP2=oooViP003_ooi^H00ol0003oonKVoooViP08oooViP03o`000?ooi^KoonKV04goonKV00?o0000 oooVi_ooi^H0S_ooi^H000koonKV00?o0000oooVi_ooi^H02Oooi^H00ol0003oonKVoooViP1;oooV iP03o`000?ooi^KoonKV08ooonKV000>oooViP03o`000?ooi^KoonKV00[oonKV00?o0000oooVi_oo i^H0BOooi^H00ol0003oonKVoooViP2@oooViP003_ooi^H00ol0003oonKVoooViP0;oooViP03o`00 0?ooi^KoonKV04SoonKV00?o0000oooVi_ooi^H0T?ooi^H000koonKV0_l0000oooViP03o`000?ooi^KoonKV 00goonKV00?o0000oooVi_ooi^H0@oooi^H00ol0003oonKVoooViP2CoooViP003_ooi^H00ol0003o onKVoooViP0>oooViP03o`000?ooi^KoonKV04;oonKV00?o0000oooVi_ooi^H0Toooi^H000koonKV 00?o0000oooVi_ooi^H03oooi^H00ol0003oonKVoooViP10oooViP03o`000?ooi^KoonKV09CoonKV 000>oooViP03o`000?ooi^KoonKV013oonKV00?o0000oooVi_ooi^H0?_ooi^H00ol0003oonKVoooV iP2EoooViP003_ooi^H2o`00017oonKV00?o0000oooVi_ooi^H0?Oooi^H00ol0003oonKVoooViP2F oooViP003_ooi^H00ol0003oonKVoooViP0AoooViP03o`000?ooi^KoonKV03coonKV00?o0000oooV i_ooi^H0U_ooi^H000koonKV00?o0000oooVi_ooi^H04_ooi^H00ol0003oonKVoooViP0joooViP03 o`000?ooi^KoonKV09OoonKV000>oooViP03o`000?ooi^KoonKV01?oonKV00?o0000oooVi_ooi^H0 >?ooi^H00ol0003oonKVoooViP2HoooViP001oooi^H3o`0000CoonKV00?o0000oooVi_ooi^H05?oo i^H00ol0003oonKVoooViP0foooViP03o`000?ooi^KoonKV09WoonKV0008oooViP03o`000?ooi^Ko onKV00?oonKV00?o0000oooVi_ooi^H05Oooi^H00ol0003oonKVoooViP0doooViP03o`000?ooi^Ko onKV09[oonKV0005oooViPGo00001?ooi^H2o`0001OoonKV00?o0000oooVi_ooi^H0<_ooi^H00ol0 003oonKVoooViP2KoooViP001Oooi^H01?l0003oonKVoooVi_l00005oooViP03o`000?ooi^KoonKV 01OoonKV00?o0000oooVi_ooi^H0oooViP03o`000?oo i^KoonKV027oonKV00?o0000oooVi_ooi^H07Oooi^H2o`000:KoonKV000>oooViP03o`000?ooi^Ko onKV02;oonKV0_l0000LoooViP03o`000?ooi^KoonKV0:KoonKV000>oooViP03o`000?ooi^KoonKV 02CoonKV0ol0000HoooViP03o`000?ooi^KoonKV0:OoonKV000>oooViP03o`000?ooi^KoonKV02Oo onKV00?o0000oooVi_ooi^H04oooi^H2o`000:[oonKV000>oooViP;o0000:Oooi^H00ol0003oonKV oooViP0@oooViP;o0000[?ooi^H000koonKV00?o0000oooVi_ooi^H0:Oooi^H4o`0000[oonKV1?l0 002^oooViP003_ooi^H00ol0003oonKVoooViP0]oooViP[o0000/_ooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0 jOooi^H00001\ \>"], ImageRangeCache->{{{0, 249}, {153.5, 0}} -> {-0.20294, -0.386854, 0.014058, \ 0.0324197}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(\(euler = EulersMethod[f, 0, 3, Pi, .4];\)\), "\[IndentingNewLine]", \(peuler = ListPlot[euler, PlotStyle \[Rule] \ {PointSize[ .02], RGBColor[1, .2, 1]}]\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.297619 0.0158306 0.115753 [ [.17262 .00333 -9 -9 ] [.17262 .00333 9 0 ] [.32143 .00333 -3 -9 ] [.32143 .00333 3 0 ] [.47024 .00333 -9 -9 ] [.47024 .00333 9 0 ] [.61905 .00333 -3 -9 ] [.61905 .00333 3 0 ] [.76786 .00333 -9 -9 ] [.76786 .00333 9 0 ] [.91667 .00333 -3 -9 ] [.91667 .00333 3 0 ] [.01131 .13158 -6 -4.5 ] [.01131 .13158 0 4.5 ] [.01131 .24734 -6 -4.5 ] [.01131 .24734 0 4.5 ] [.01131 .36309 -6 -4.5 ] [.01131 .36309 0 4.5 ] [.01131 .47884 -6 -4.5 ] [.01131 .47884 0 4.5 ] [.01131 .59459 -6 -4.5 ] [.01131 .59459 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .17262 .01583 m .17262 .02208 L s [(0.5)] .17262 .00333 0 1 Mshowa .32143 .01583 m .32143 .02208 L s [(1)] .32143 .00333 0 1 Mshowa .47024 .01583 m .47024 .02208 L s [(1.5)] .47024 .00333 0 1 Mshowa .61905 .01583 m .61905 .02208 L s [(2)] .61905 .00333 0 1 Mshowa .76786 .01583 m .76786 .02208 L s [(2.5)] .76786 .00333 0 1 Mshowa .91667 .01583 m .91667 .02208 L s [(3)] .91667 .00333 0 1 Mshowa .125 Mabswid .05357 .01583 m .05357 .01958 L s .08333 .01583 m .08333 .01958 L s .1131 .01583 m .1131 .01958 L s .14286 .01583 m .14286 .01958 L s .20238 .01583 m .20238 .01958 L s .23214 .01583 m .23214 .01958 L s .2619 .01583 m .2619 .01958 L s .29167 .01583 m .29167 .01958 L s .35119 .01583 m .35119 .01958 L s .38095 .01583 m .38095 .01958 L s .41071 .01583 m .41071 .01958 L s .44048 .01583 m .44048 .01958 L s .5 .01583 m .5 .01958 L s .52976 .01583 m .52976 .01958 L s .55952 .01583 m .55952 .01958 L s .58929 .01583 m .58929 .01958 L s .64881 .01583 m .64881 .01958 L s .67857 .01583 m .67857 .01958 L s .70833 .01583 m .70833 .01958 L s .7381 .01583 m .7381 .01958 L s .79762 .01583 m .79762 .01958 L s .82738 .01583 m .82738 .01958 L s .85714 .01583 m .85714 .01958 L s .8869 .01583 m .8869 .01958 L s .94643 .01583 m .94643 .01958 L s .97619 .01583 m .97619 .01958 L s .25 Mabswid 0 .01583 m 1 .01583 L s .02381 .13158 m .03006 .13158 L s [(1)] .01131 .13158 1 0 Mshowa .02381 .24734 m .03006 .24734 L s [(2)] .01131 .24734 1 0 Mshowa .02381 .36309 m .03006 .36309 L s [(3)] .01131 .36309 1 0 Mshowa .02381 .47884 m .03006 .47884 L s [(4)] .01131 .47884 1 0 Mshowa .02381 .59459 m .03006 .59459 L s [(5)] .01131 .59459 1 0 Mshowa .125 Mabswid .02381 .03898 m .02756 .03898 L s .02381 .06213 m .02756 .06213 L s .02381 .08528 m .02756 .08528 L s .02381 .10843 m .02756 .10843 L s .02381 .15473 m .02756 .15473 L s .02381 .17788 m .02756 .17788 L s .02381 .20103 m .02756 .20103 L s .02381 .22419 m .02756 .22419 L s .02381 .27049 m .02756 .27049 L s .02381 .29364 m .02756 .29364 L s .02381 .31679 m .02756 .31679 L s .02381 .33994 m .02756 .33994 L s .02381 .38624 m .02756 .38624 L s .02381 .40939 m .02756 .40939 L s .02381 .43254 m .02756 .43254 L s .02381 .45569 m .02756 .45569 L s .02381 .50199 m .02756 .50199 L s .02381 .52514 m .02756 .52514 L s .02381 .54829 m .02756 .54829 L s .02381 .57144 m .02756 .57144 L s .02381 .61774 m .02756 .61774 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 .2 1 r .02 w .02381 .36309 Mdot .14286 .50199 Mdot .2619 .60332 Mdot .38095 .57905 Mdot .5 .39034 Mdot .61905 .14628 Mdot .7381 .02021 Mdot .85714 .01472 Mdot .97619 .01638 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{250, 154.5}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgoooViP03o`000?ooi^KoonKV0;ooonKV1?oo[o onKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000> oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o 0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOoo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooV iP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP001_ooi^H3o`0000GoonKV00?o0000oooV i_ooi^H0jOooi^H000OoonKV00?o0000oooVi_ooi^H01?ooi^H00ol0003oonKVoooViP3YoooViP00 1oooi^H00ol0003oonKVoooViP04oooViP;o0000j_ooi^H000OoonKV00?o0000oooVi_ooi^H01?oo i^H00ol0003oonKVoooViP3YoooViP001oooi^H00ol0003oonKVoooViP04oooViP03o`000?ooi^Ko onKV08SoonKV0_oooooViP03o`000?ooi^KoonKV08SoonKV0_oo[oonKV000> oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000j_oo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0 003ZoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_oo i^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViPGo00001?ooi^H00ol0003oonKV oooViP3YoooViP001_ooi^H01?l0003oonKVoooVi_l00004oooViP03o`000?ooi^KoonKV0>WoonKV 0007oooViP03o`000?ooi^KoonKV00CoonKV0_l0003ZoooViP002?ooi^H00ol0003oonKVoooViP03 oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViP05o`000?ooi^KoonKVoooVi_l000001?ooi^H0 0ol0003oonKVoooViP3YoooViP001Oooi^H01Ol0003oonKVoooVi_ooi^Ko000000CoonKV00?o0000 oooVi_ooi^H0jOooi^H000KoonKV0ol00005oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03 o`000?ooi^KoonKV0>WoonKV000>oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOoo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooV iP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_oo i^H2o`000>[oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV 000>oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooV i_ooi^H0jOooi^H000KoonKV0ol00005oooViP03o`000?ooi^KoonKV0>WoonKV0005oooViP05o`00 0?ooi^KoonKVoooVi_l000000oooi^H2oolcon_oonKV0009oooViP03o`000?ooi^KoonKV00Cooc?o j_ooi^H000OoonKV0_l00003oooViPCooc?oj_ooi^H000WoonKV00Co0000oooVi_ooi^KoonKV0_oo WoonKV000>oooViP03o`000?ooi^KoonKV 0>WoonKV000>oooViP;o0000KOooi^H2oolcog_oonKV000>oooViP03o`000?ooi^KoonKV06_oonKV 1?oooooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP;o 0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOoo i^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000ko onKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0003ZoooViP003_ooi^H00ol0003oonKVoooV iP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP3YoooV iP003_ooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H2o`000>[oonKV000>oooViP03o`000?oo i^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV0007oooViP?o00001?ooi^H00ol0 003oonKVoooViP3YoooViP002?ooi^H00ol0003oonKVoooViP03oooViP03o`000?ooi^KoonKV0>Wo onKV0005oooViPGo00001?ooi^H00ol0003oonKVoooViP3YoooViP001Oooi^H01?l0003oonKVoooV i_l00005oooViP;o0000j_ooi^H000KoonKV00?o0000oooVi_l000001Oooi^H00ol0003oonKVoooV iP3YoooViP001oooi^H2o`0000GoonKV00?o0000oooVi_ooi^H0jOooi^H000SoonKV00?o0000oooV i_ooi^H00oooi^H00ol0003oonKVoooViP3YoooViP003_ooi^H00ol0003oonKVoooViP0HoooViP;o oc?ocoooi^H000koonKV0_l0000HoooViPCooc?oc_ooi^H000koonKV00?o0000oooVi_ooi^H05ooo i^H4oolcolkoonKV000>oooViP03o`000?ooi^KoonKV01SoonKV0_oo[oonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooV iP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`000?ooi^KoonKV0>WoonKV000>oooViP03o`00 0?ooi^KoonKV0>WoonKV000>oooViP;o0000j_ooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H0 00koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV 00?o0000oooVi_ooi^H0jOooi^H000koonKV00?o0000oooVi_ooi^H0jOooi^H000koonKV0_l0001A oooViP;ooc?oUoooi^H000koonKV00?o0000oooVi_ooi^H0Coooi^H4oolcoiKoonKV0006oooViP?o 00001Oooi^H00ol0003oonKVoooViP1?oooViPCooc?oU_ooi^H000GoonKV00Go0000oooVi_ooi^Ko onKVo`000004oooViP03o`000?ooi^KoonKV053oonKV0_ooWoonKV0009oooViP03o`000?ooi^KoonKV00;oonKV0_l0 003ZoooViP001Oooi^H4o`0000GoonKV00?o0000oooVi_ooi^H0=?ooi^H2oolcok?oonKV0005oooV iP03o`000?ooi^KoonKV00KoonKV00?o0000oooVi_ooi^H0oooViP;o0000j_ooi^H00001\ \>"], ImageRangeCache->{{{0, 249}, {153.5, 0}} -> {-0.203422, -0.438778, \ 0.0142935, 0.0367509}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Compare Solutions", "Section"], Cell[CellGroupData[{ Cell[BoxData[ \(\(Show[{pe1, pe2, pe3, pn, peuler}, \ ImageSize \[Rule] \ 600, \ AspectRatio \[Rule] \ 0.5, \ Background \[Rule] RGBColor[ .8, .8, 1]];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .5 %%ImageSize: 600 300 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Background color .8 .8 1 r MFill % Scaling calculations 0.0238095 0.297619 0.0128073 0.0936457 [ [.17262 .00031 -9 -9 ] [.17262 .00031 9 0 ] [.32143 .00031 -3 -9 ] [.32143 .00031 3 0 ] [.47024 .00031 -9 -9 ] [.47024 .00031 9 0 ] [.61905 .00031 -3 -9 ] [.61905 .00031 3 0 ] [.76786 .00031 -9 -9 ] [.76786 .00031 9 0 ] [.91667 .00031 -3 -9 ] [.91667 .00031 3 0 ] [.01131 .10645 -6 -4.5 ] [.01131 .10645 0 4.5 ] [.01131 .2001 -6 -4.5 ] [.01131 .2001 0 4.5 ] [.01131 .29374 -6 -4.5 ] [.01131 .29374 0 4.5 ] [.01131 .38739 -6 -4.5 ] [.01131 .38739 0 4.5 ] [.01131 .48104 -6 -4.5 ] [.01131 .48104 0 4.5 ] [ 0 0 0 0 ] [ 1 .5 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .25 Mabswid [ ] 0 setdash .17262 .01281 m .17262 .01906 L s [(0.5)] .17262 .00031 0 1 Mshowa .32143 .01281 m .32143 .01906 L s [(1)] .32143 .00031 0 1 Mshowa .47024 .01281 m .47024 .01906 L s [(1.5)] .47024 .00031 0 1 Mshowa .61905 .01281 m .61905 .01906 L s [(2)] .61905 .00031 0 1 Mshowa .76786 .01281 m .76786 .01906 L s [(2.5)] .76786 .00031 0 1 Mshowa .91667 .01281 m .91667 .01906 L s [(3)] .91667 .00031 0 1 Mshowa .125 Mabswid .05357 .01281 m .05357 .01656 L s .08333 .01281 m .08333 .01656 L s .1131 .01281 m .1131 .01656 L s .14286 .01281 m .14286 .01656 L s .20238 .01281 m .20238 .01656 L s .23214 .01281 m .23214 .01656 L s .2619 .01281 m .2619 .01656 L s .29167 .01281 m .29167 .01656 L s .35119 .01281 m .35119 .01656 L s .38095 .01281 m .38095 .01656 L s .41071 .01281 m .41071 .01656 L s .44048 .01281 m .44048 .01656 L s .5 .01281 m .5 .01656 L s .52976 .01281 m .52976 .01656 L s .55952 .01281 m .55952 .01656 L s .58929 .01281 m .58929 .01656 L s .64881 .01281 m .64881 .01656 L s .67857 .01281 m .67857 .01656 L s .70833 .01281 m .70833 .01656 L s .7381 .01281 m .7381 .01656 L s .79762 .01281 m .79762 .01656 L s .82738 .01281 m .82738 .01656 L s .85714 .01281 m .85714 .01656 L s .8869 .01281 m .8869 .01656 L s .94643 .01281 m .94643 .01656 L s .97619 .01281 m .97619 .01656 L s .25 Mabswid 0 .01281 m 1 .01281 L s .02381 .10645 m .03006 .10645 L s [(1)] .01131 .10645 1 0 Mshowa .02381 .2001 m .03006 .2001 L s [(2)] .01131 .2001 1 0 Mshowa .02381 .29374 m .03006 .29374 L s [(3)] .01131 .29374 1 0 Mshowa .02381 .38739 m .03006 .38739 L s [(4)] .01131 .38739 1 0 Mshowa .02381 .48104 m .03006 .48104 L s [(5)] .01131 .48104 1 0 Mshowa .125 Mabswid .02381 .03154 m .02756 .03154 L s .02381 .05027 m .02756 .05027 L s .02381 .06899 m .02756 .06899 L s .02381 .08772 m .02756 .08772 L s .02381 .12518 m .02756 .12518 L s .02381 .14391 m .02756 .14391 L s .02381 .16264 m .02756 .16264 L s .02381 .18137 m .02756 .18137 L s .02381 .21883 m .02756 .21883 L s .02381 .23756 m .02756 .23756 L s .02381 .25629 m .02756 .25629 L s .02381 .27502 m .02756 .27502 L s .02381 .31247 m .02756 .31247 L s .02381 .3312 m .02756 .3312 L s .02381 .34993 m .02756 .34993 L s .02381 .36866 m .02756 .36866 L s .02381 .40612 m .02756 .40612 L s .02381 .42485 m .02756 .42485 L s .02381 .44358 m .02756 .44358 L s .02381 .46231 m .02756 .46231 L s .02381 .49977 m .02756 .49977 L s .25 Mabswid .02381 0 m .02381 .5 L s 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath 1 0 0 r .03 w .02381 .29374 Mdot .14286 .38915 Mdot .2619 .41996 Mdot .38095 .35433 Mdot .5 .22725 Mdot .61905 .11028 Mdot .7381 .04392 Mdot .85714 .02004 Mdot .97619 .01447 Mdot 1 1 0 r .02 w .02381 .29374 Mdot .08333 .34798 Mdot .14286 .39399 Mdot .20238 .4231 Mdot .2619 .42806 Mdot .32143 .40571 Mdot .38095 .35867 Mdot .44048 .29499 Mdot .5 .22561 Mdot .55952 .16092 Mdot .61905 .10791 Mdot .67857 .06921 Mdot .7381 .04377 Mdot .79762 .0286 Mdot .85714 .02032 Mdot .91667 .01617 Mdot .97619 .01423 Mdot 0 0 1 r .01 w .02381 .29374 Mdot .05357 .32161 Mdot .08333 .34852 Mdot .1131 .37343 Mdot .14286 .39521 Mdot .17262 .41273 Mdot .20238 .42492 Mdot .23214 .43092 Mdot .2619 .43012 Mdot .29167 .42226 Mdot .32143 .40749 Mdot .35119 .38635 Mdot .38095 .35974 Mdot .41071 .3289 Mdot .44048 .29521 Mdot .47024 .26016 Mdot .5 .22519 Mdot .52976 .19154 Mdot .55952 .16025 Mdot .58929 .13205 Mdot .61905 .10737 Mdot .64881 .08637 Mdot .67857 .06896 Mdot .70833 .05489 Mdot .7381 .04379 Mdot .76786 .03523 Mdot .79762 .02877 Mdot .82738 .02399 Mdot .85714 .02053 Mdot .8869 .01807 Mdot .91667 .01634 Mdot .94643 .01516 Mdot .97619 .01435 Mdot 0 0 0 r .5 Mabswid .02381 .29374 m .06174 .32924 L .10311 .36562 L .14196 .39501 L .16152 .40724 L .17932 .41651 L .19853 .42427 L .2091 .42747 L .21385 .42864 L .21909 .42974 L .22367 .43054 L .2286 .43122 L .23133 .43151 L .23381 .43173 L .23632 .4319 L .23756 .43197 L .2387 .43202 L .23974 .43206 L .24087 .43209 L .24206 .43211 L .24318 .43212 L .24424 .43212 L .24535 .43211 L .24631 .4321 L .24735 .43207 L .24858 .43203 L .24971 .43198 L .25224 .43184 L .25458 .43166 L .2568 .43145 L .2613 .4309 L .26628 .4301 L .27635 .42787 L .28567 .42509 L .29443 .42184 L .31424 .41229 L .33241 .40095 L .37131 .36929 L .40872 .33128 L .44854 .28582 L .48688 .24041 L .52762 .1937 L .56687 .15277 L .60463 .11868 L .64481 .08884 L .68349 .06634 L .72069 .04993 L .74138 .04274 L .76029 .03722 L .7984 .02868 L Mistroke .81708 .02554 L .83744 .02276 L .85841 .02048 L .87739 .01883 L .89744 .01745 L .91586 .01644 L .93479 .01562 L .95525 .01493 L .95881 .01483 L Mfstroke 1 .2 1 r .02 w .02381 .29374 Mdot .14286 .40612 Mdot .2619 .4881 Mdot .38095 .46846 Mdot .5 .31579 Mdot .61905 .11834 Mdot .7381 .01635 Mdot .85714 .0119 Mdot .97619 .01326 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{600, 300}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgolcOo olcolc_oolcolcolcolcolcolcolcolcolcolc3oc3ocooolc?oOoCocCocGocolcool00003o`000?o_oOo_ooo< c?l01?oo003oool0oooo0?ooo`02o`00o`;o000000Co003ooooo0?ooo`3oool00ooo001Yolc"], ImageRangeCache->{{{0, 599}, {299, 0}} -> {-0.133976, -0.29908, 0.00578957, \ 0.0184001}}] }, Open ]] }, Open ]] }, FrontEndVersion->"5.2 for Macintosh", ScreenRectangle->{{0, 1920}, {0, 1174}}, WindowSize->{1059, 712}, WindowMargins->{{Automatic, 153}, {Automatic, 35}}, Magnification->1, StyleDefinitions -> "Demo.nb" ] (******************************************************************* Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. *******************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1776, 53, 90, 4, 134, "Section"], Cell[1869, 59, 49, 0, 42, "Subsection"] }, Open ]], Cell[CellGroupData[{ Cell[1955, 64, 32, 0, 78, "Section"], Cell[1990, 66, 1755, 32, 415, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[3782, 103, 27, 0, 47, "Section"], Cell[3812, 105, 84, 1, 31, "Input"], Cell[CellGroupData[{ Cell[3921, 110, 226, 5, 47, "Input"], Cell[4150, 117, 12636, 369, 171, 3533, 252, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[CellGroupData[{ Cell[16823, 491, 200, 4, 47, "Input"], Cell[17026, 497, 12918, 379, 171, 3640, 260, "GraphicsData", "PostScript", \ "Graphics"], Cell[29947, 878, 130, 3, 46, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[30114, 886, 200, 4, 47, "Input"], Cell[30317, 892, 13260, 395, 171, 3954, 276, "GraphicsData", "PostScript", \ "Graphics"], Cell[43580, 1289, 130, 3, 46, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[43747, 1297, 36, 0, 42, "Subsection"], Cell[CellGroupData[{ Cell[43808, 1301, 239, 5, 47, "Input"], Cell[44050, 1308, 17180, 467, 171, 4295, 303, "GraphicsData", "PostScript", \ "Graphics"], Cell[61233, 1777, 130, 3, 46, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[61400, 1785, 225, 5, 47, "Input"], Cell[61628, 1792, 12672, 382, 171, 3718, 267, "GraphicsData", "PostScript", \ "Graphics"], Cell[74303, 2176, 130, 3, 46, "Output"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[74494, 2186, 36, 0, 47, "Section"], Cell[CellGroupData[{ Cell[74555, 2190, 189, 3, 31, "Input"], Cell[74747, 2195, 38481, 805, 316, 5861, 399, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)