(*********************************************************************** Mathematica-Compatible Notebook This notebook can be used on any computer system with Mathematica 3.0, MathReader 3.0, or any compatible application. The data for the notebook starts with the line of 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[ 266142, 4700]*) (*NotebookOutlinePosition[ 267059, 4731]*) (* CellTagsIndexPosition[ 267015, 4727]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[ \(eq1 = \((2 \(\( r'\)'\)[t] == r[t]\ \ \(th'\)[t]^2\ - \ g\ /2\ th[t]^2)\)\)], "Input"], Cell[BoxData[ RowBox[{ RowBox[{"2", " ", RowBox[{ SuperscriptBox["r", "\[DoublePrime]", MultilineFunction->None], "[", "t", "]"}]}], "==", RowBox[{\(\(-\(1\/2\)\)\ g\ th[t]\^2\), "+", RowBox[{\(r[t]\), " ", SuperscriptBox[ RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "t", "]"}], "2"]}]}]}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(eq2 = \((r[t]\ \ \(\(th'\)'\)[t]\ + 2\ \(r'\)[t]\ \(th'\)[t]\ == \ \(-g\)\ th[t])\)\)], "Input"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"2", " ", RowBox[{ SuperscriptBox["r", "\[Prime]", MultilineFunction->None], "[", "t", "]"}], " ", RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{\(r[t]\), " ", RowBox[{ SuperscriptBox["th", "\[DoublePrime]", MultilineFunction->None], "[", "t", "]"}]}]}], "==", \(\(-g\)\ th[t]\)}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(DSolve[{eq1, eq2, r[0] == l, \(r'\)[0] == 0, th[0] == eps, \ \(th'\)[0] == 0}, {r[t], th[t]}, t]\)], "Input"], Cell[BoxData[ RowBox[{"DSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"2", " ", RowBox[{ SuperscriptBox["r", "\[DoublePrime]", MultilineFunction->None], "[", "t", "]"}]}], "==", RowBox[{\(\(-\(1\/2\)\)\ g\ th[t]\^2\), "+", RowBox[{\(r[t]\), " ", SuperscriptBox[ RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "t", "]"}], "2"]}]}]}], ",", RowBox[{ RowBox[{ RowBox[{"2", " ", RowBox[{ SuperscriptBox["r", "\[Prime]", MultilineFunction->None], "[", "t", "]"}], " ", RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{\(r[t]\), " ", RowBox[{ SuperscriptBox["th", "\[DoublePrime]", MultilineFunction->None], "[", "t", "]"}]}]}], "==", \(\(-g\)\ th[t]\)}], ",", \(r[0] == l\), ",", RowBox[{ RowBox[{ SuperscriptBox["r", "\[Prime]", MultilineFunction->None], "[", "0", "]"}], "==", "0"}], ",", \(th[0] == eps\), ",", RowBox[{ RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "0", "]"}], "==", "0"}]}], "}"}], ",", \({r[t], th[t]}\), ",", "t"}], "]"}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(g = 10\)], "Input"], Cell[BoxData[ \(10\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(l = 1\)], "Input"], Cell[BoxData[ \(1\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(eps = .01\)], "Input"], Cell[BoxData[ StyleBox["0.01`", StyleBoxAutoDelete->True, PrintPrecision->1]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NDSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"2", " ", RowBox[{ SuperscriptBox["r", "\[DoublePrime]", MultilineFunction->None], "[", "t", "]"}]}], "==", RowBox[{\(\(-\(1\/2\)\)\ g\ th[t]\^2\), "+", RowBox[{\(r[t]\), " ", SuperscriptBox[ RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "t", "]"}], "2"]}]}]}], ",", RowBox[{ RowBox[{ RowBox[{"2", " ", RowBox[{ SuperscriptBox["r", "\[Prime]", MultilineFunction->None], "[", "t", "]"}], " ", RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{\(r[t]\), " ", RowBox[{ SuperscriptBox["th", "\[DoublePrime]", MultilineFunction->None], "[", "t", "]"}]}]}], "==", \(\(-g\)\ th[t]\)}], ",", \(r[0] == l\), ",", RowBox[{ RowBox[{ SuperscriptBox["r", "\[Prime]", MultilineFunction->None], "[", "0", "]"}], "==", "0"}], ",", \(th[0] == eps\), ",", RowBox[{ RowBox[{ SuperscriptBox["th", "\[Prime]", MultilineFunction->None], "[", "0", "]"}], "==", "0"}]}], "}"}], ",", \({r, th}\), ",", \({t, 0, 200}\), ",", \(MaxSteps -> 10000\)}], "]"}]], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"r", "\[Rule]", TagBox[\(InterpolatingFunction[{{0.`, 200.`}}, "<>"]\), False, Editable->False]}], ",", RowBox[{"th", "\[Rule]", TagBox[\(InterpolatingFunction[{{0.`, 200.`}}, "<>"]\), False, Editable->False]}]}], "}"}], "}"}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(Plot[{Evaluate[{r[t]} /. %[\([1]\)]], 2}, {t, 0, 150}]\)], "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 /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.00634921 -0.514202 0.528921 [ [.15079 .00222 -6 -9 ] [.15079 .00222 6 0 ] [.27778 .00222 -6 -9 ] [.27778 .00222 6 0 ] [.40476 .00222 -6 -9 ] [.40476 .00222 6 0 ] [.53175 .00222 -6 -9 ] [.53175 .00222 6 0 ] [.65873 .00222 -9 -9 ] [.65873 .00222 9 0 ] [.78571 .00222 -9 -9 ] [.78571 .00222 9 0 ] [.9127 .00222 -9 -9 ] [.9127 .00222 9 0 ] [.01131 .1205 -18 -4.5 ] [.01131 .1205 0 4.5 ] [.01131 .22629 -18 -4.5 ] [.01131 .22629 0 4.5 ] [.01131 .33207 -18 -4.5 ] [.01131 .33207 0 4.5 ] [.01131 .43786 -18 -4.5 ] [.01131 .43786 0 4.5 ] [.01131 .54364 -6 -4.5 ] [.01131 .54364 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 .15079 .01472 m .15079 .02097 L s [(20)] .15079 .00222 0 1 Mshowa .27778 .01472 m .27778 .02097 L s [(40)] .27778 .00222 0 1 Mshowa .40476 .01472 m .40476 .02097 L s [(60)] .40476 .00222 0 1 Mshowa .53175 .01472 m .53175 .02097 L s [(80)] .53175 .00222 0 1 Mshowa .65873 .01472 m .65873 .02097 L s [(100)] .65873 .00222 0 1 Mshowa .78571 .01472 m .78571 .02097 L s [(120)] .78571 .00222 0 1 Mshowa .9127 .01472 m .9127 .02097 L s [(140)] .9127 .00222 0 1 Mshowa .125 Mabswid .05556 .01472 m .05556 .01847 L s .0873 .01472 m .0873 .01847 L s .11905 .01472 m .11905 .01847 L s .18254 .01472 m .18254 .01847 L s .21429 .01472 m .21429 .01847 L s .24603 .01472 m .24603 .01847 L s .30952 .01472 m .30952 .01847 L s .34127 .01472 m .34127 .01847 L s .37302 .01472 m .37302 .01847 L s .43651 .01472 m .43651 .01847 L s .46825 .01472 m .46825 .01847 L s .5 .01472 m .5 .01847 L s .56349 .01472 m .56349 .01847 L s .59524 .01472 m .59524 .01847 L s .62698 .01472 m .62698 .01847 L s .69048 .01472 m .69048 .01847 L s .72222 .01472 m .72222 .01847 L s .75397 .01472 m .75397 .01847 L s .81746 .01472 m .81746 .01847 L s .84921 .01472 m .84921 .01847 L s .88095 .01472 m .88095 .01847 L s .94444 .01472 m .94444 .01847 L s .97619 .01472 m .97619 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .1205 m .03006 .1205 L s [(1.2)] .01131 .1205 1 0 Mshowa .02381 .22629 m .03006 .22629 L s [(1.4)] .01131 .22629 1 0 Mshowa .02381 .33207 m .03006 .33207 L s [(1.6)] .01131 .33207 1 0 Mshowa .02381 .43786 m .03006 .43786 L s [(1.8)] .01131 .43786 1 0 Mshowa .02381 .54364 m .03006 .54364 L s [(2)] .01131 .54364 1 0 Mshowa .125 Mabswid .02381 .04117 m .02756 .04117 L s .02381 .06761 m .02756 .06761 L s .02381 .09406 m .02756 .09406 L s .02381 .14695 m .02756 .14695 L s .02381 .1734 m .02756 .1734 L s .02381 .19984 m .02756 .19984 L s .02381 .25273 m .02756 .25273 L s .02381 .27918 m .02756 .27918 L s .02381 .30563 m .02756 .30563 L s .02381 .35852 m .02756 .35852 L s .02381 .38496 m .02756 .38496 L s .02381 .41141 m .02756 .41141 L s .02381 .4643 m .02756 .4643 L s .02381 .49075 m .02756 .49075 L s .02381 .51719 m .02756 .51719 L s .02381 .57009 m .02756 .57009 L s .02381 .59653 m .02756 .59653 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 .01472 m .02499 .01472 L .02605 .01472 L .02729 .01472 L .02846 .01473 L .03056 .01476 L .03171 .01477 L .03279 .01478 L .03395 .01479 L .03524 .01482 L .0375 .01487 L .04262 .01501 L .05217 .01537 L .05754 .01564 L .06244 .01594 L .07277 .01668 L .08405 .01768 L .10458 .02005 L .12425 .02296 L .14523 .02674 L .18681 .03628 L .22687 .04801 L .26542 .06154 L .30643 .07829 L .34592 .0966 L .38389 .11614 L .42431 .13893 L .46322 .16268 L .50458 .1898 L .54443 .21764 L .58276 .2459 L .62354 .27748 L .6628 .30928 L .70055 .34107 L .74076 .37615 L .77945 .41102 L .82059 .44925 L .86021 .48712 L .89832 .52445 L .93888 .56512 L .97619 .60332 L s .02381 .54364 m .06244 .54364 L .10458 .54364 L .14415 .54364 L .18221 .54364 L .22272 .54364 L .26171 .54364 L .30316 .54364 L .34309 .54364 L .3815 .54364 L .42237 .54364 L .46172 .54364 L .49955 .54364 L .53984 .54364 L .57861 .54364 L .61984 .54364 L .65954 .54364 L .69774 .54364 L .73838 .54364 L .77751 .54364 L .81909 .54364 L .85916 .54364 L .89771 .54364 L .93871 .54364 L .97619 .54364 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{450, 278}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol0 0`00Oomoo`0dOol00`00Oomoo`0dOol00`00Oomoo`0dOol00`00Oomoo`0eOol00`00Oomoo`0dOol0 0`00Oomoo`0dOol00`00Oomoo`0UOol001Moo`03001oogoo02Moo`L00?moog]oo`005goo00<007oo Ool0;Woo1`00ogooM7oo000GOol00`00Oomoo`0eOol4003oOom`Ool001Moo`03001oogoo03Uoo`D0 0?moof]oo`005goo00<007ooOol0?Woo1000ogooIgoo000GOol00`00Oomoo`12Ool4003oOomSOol0 01Moo`03001oogoo04Ioo`@00?mooemoo`005goo0`00BWoo0`00ogooG7oo000GOol00`00Oomoo`1= Ool4003oOomHOol001Moo`03001oogoo055oo`@00?mooeAoo`005goo00<007ooOol0EGoo0`00ogoo DGoo000GOol00`00Oomoo`1HOol2003oOom?Ool001Moo`03001oogoo05Yoo`<00?moodaoo`005goo 00<007ooOol0GGoo0`00ogooBGoo000GOol00`00Oomoo`1POol2003oOom7Ool001Moo`03001oogoo 069oo`<00?moodAoo`005goo00<007ooOol0IGoo0`00ogoo@Goo000GOol00`00Oomoo`1XOol2003o OoloOol001Moo`03001oogoo06Yoo`800?mooceoo`005goo0`00K7oo0P00ogoo>goo000GOol00`00 Oomoo`1^Ool3003oOolhOol001Moo`03001oogoo075oo`800?moocIoo`005goo00<007ooOol0Lgoo 0P00ogoo=7oo000GOol00`00Oomoo`1eOol2003oOolbOol001Moo`03001oogoo07Moo`<00?moobmo o`005goo00<007ooOol0NWoo0P00ogoo;Goo000GOol00`00Oomoo`1lOol2003oOol[Ool001Moo`03 001oogoo07ioo`800?moobUoo`005goo00<007ooOol0P7oo0P00ogoo9goo000GOol00`00Oomoo`22 Ool2003oOolUOol001Moo`<008Aoo`800?moob=oo`005goo00<007ooOol0QWoo0P00ogoo8Goo000G Ool00`00Oomoo`28Ool3003oOolNOol001Moo`03001oogoo08]oo`800?mooaaoo`005goo00<007oo Ool0SGoo0P00ogoo6Woo000GOol00`00Oomoo`2?Ool2003oOolHOol001Moo`03001oogoo095oo`80 0?mooaIoo`005goo00<007ooOol0Tgoo0P00ogoo57oo000GOol00`00Oomoo`2EOol2003oOolBOol0 01Moo`03001oogoo09Moo`800?mooa1oo`005goo00<007ooOol0VGoo0P00ogoo3Woo00000goo0000 00020003Ool00`00Oomoo`02Ool40006Ool00`00Oomoo`2KOol2003oOol]oo`005goo00<007ooOol0_Goo00<007ooOol0j7oo000G Ool00`00Oomoo`2nOol2003XOol001Moo`03001oogoo0<1oo`03001oogoo0>Eoo`005goo00<007oo Ool0`Goo0P00iGoo000GOol00`00Oomoo`33Ool00`00Oomoo`3ROol001Moo`<009oo`00 5goo00<007ooOol0aWoo00<007ooOol0ggoo000GOol00`00Oomoo`37Ool2003OOol001Moo`03001o ogoo09o o`800Ioo`800<1oo`000goo00<007ooOol01Woo00@0 07ooOol000Moo`03001oogoo0>Qoo`03001oogoo0;eoo`000goo00<007ooOol01goo00<007oo0000 1goo00<007ooOol0jGoo00<007ooOol0_7oo000017oo000000002Woo0P001goo00<007ooOol0jWoo 0P00_7oo0003Ool00`00Oomoo`09Ool00`00Oomoo`05Ool00`00Oomoo`3/Ool00`00Oomoo`2iOol0 01Moo`03001oogoo0>eoo`03001oogoo0;Qoo`005goo00<007ooOol0kWoo0P00^7oo000GOol00`00 Oomoo`3`Ool00`00Oomoo`2eOol001Moo`03001oogoo0?5oo`03001oogoo0;Aoo`005goo00<007oo Ool0lWoo00<007ooOol0/goo000GOol00`00Oomoo`3cOol2002cOol001Moo`<00?Eoo`03001oogoo 0;1oo`005goo00<007ooOol0mWoo00<007ooOol0[goo000GOol00`00Oomoo`3gOol2002_Ool001Mo o`03001oogoo0?Uoo`03001oogoo0:aoo`005goo00<007ooOol0nWoo00<007ooOol0Zgoo000GOol0 0`00Oomoo`3kOol2002[Ool001Moo`03001oogoo0?eoo`03001oogoo0:Qoo`005goo00<007ooOol0 oWoo00<007ooOol0Ygoo000GOol00`00Oomoo`3oOol2002WOol001Moo`03001oogoo0?moo`9oo`03 001oogoo0:Aoo`005goo00<007ooOol0ogoo0goo00<007ooOol0Xgoo000GOol3003oOol4Ool00`00 Oomoo`2ROol001Moo`03001oogoo0?moo`Eoo`800:9oo`005goo00<007ooOol0ogoo1goo00<007oo Ool0Wgoo000GOol00`00Oomoo`3oOol8Ool00`00Oomoo`2NOol001Moo`03001oogoo0?moo`Uoo`03 001oogoo09eoo`005goo00<007ooOol0ogoo2Woo00<007ooOol0W7oo000GOol00`00Oomoo`3oOol; Ool2002LOol001Moo`03001oogoo0?moo`eoo`03001oogoo09Uoo`005goo00<007ooOol0ogoo3Woo 00<007ooOol0V7oo000GOol00`00Oomoo`3oOol?Ool00`00Oomoo`2GOol001Moo`03001oogoo0?mo oa1oo`03001oogoo09Ioo`005goo00<007ooOol0ogoo4Goo0P00UWoo000GOol3003oOolCOol00`00 Oomoo`2COol001Moo`03001oogoo0?mooaAoo`03001oogoo099oo`005goo00<007ooOol0ogoo5Goo 00<007ooOol0TGoo000GOol00`00Oomoo`3oOolFOol2002AOol001Moo`03001oogoo0?mooaQoo`03 001oogoo08ioo`005goo00<007ooOol0ogoo6Goo00<007ooOol0SGoo000GOol00`00Oomoo`3oOolJ Ool00`00Oomoo`27oo 00<007ooOol0KWoo000GOol00`00Oomoo`3oOoliOol00`00Oomoo`1]Ool001Moo`<00?moocYoo`80 06eoo`005goo00<007ooOol0ogoo?7oo00<007ooOol0JWoo000GOol00`00Oomoo`3oOolmOol00`00 Oomoo`1YOol001Moo`03001oogoo0?moocioo`03001oogoo06Qoo`005goo00<007ooOol0ogoo?goo 00<007ooOol0Igoo000GOol00`00Oomoo`3oOom0Ool00`00Oomoo`1VOol001Moo`03001oogoo0?mo od5oo`03001oogoo06Eoo`005goo00<007ooOol0ogoo@Woo0P00IGoo000GOol00`00Oomoo`3oOom4 Ool00`00Oomoo`1ROol001Moo`03001oogoo0?moodEoo`03001oogoo065oo`005goo00<007ooOol0 ogooAWoo00<007ooOol0H7oo000GOol00`00Oomoo`3oOom7Ool00`00Oomoo`1OOol001Moo`<00?mo odQoo`03001oogoo05ioo`005goo00<007ooOol0ogooBGoo00<007ooOol0GGoo000GOol00`00Oomo o`3oOom:Ool00`00Oomoo`1LOol001Moo`03001oogoo0?mood]oo`03001oogoo05]oo`005goo00<0 07ooOol0ogooC7oo00<007ooOol0FWoo000GOol00`00Oomoo`3oOom=Ool00`00Oomoo`1IOol001Mo o`03001oogoo0?moodioo`03001oogoo05Qoo`005goo00<007ooOol0ogooCgoo00<007ooOol0Egoo 000GOol00`00Oomoo`3oOom@Ool2001GOol001Moo`03001oogoo0?mooe9oo`03001oogoo05Aoo`00 00=oo`0000000P000goo00<007ooOol00goo0P001goo00<007ooOol0ogooDgoo00<007ooOol0Dgoo 0003Ool00`00Oomoo`07Ool01000Oomoo`001Woo1000ogooDgoo00<007ooOol0DWoo0003Ool00`00 Oomoo`07Ool01000Oomoo`001Woo00<007ooOol0ogooEGoo00<007ooOol0DGoo0003Ool00`00Oomo o`08Ool20007Ool00`00Oomoo`3oOomFOol00`00Oomoo`1@Ool000=oo`03001oogoo00Moo`04001o ogoo0006Ool00`00Oomoo`3oOomGOol00`00Oomoo`1?Ool00004Ool000000009Ool01000Oomoo`00 1Woo00<007ooOol0ogooF7oo00<007ooOol0CWoo0003Ool00`00Oomoo`08Ool20007Ool00`00Oomo o`3oOomIOol00`00Oomoo`1=Ool001Moo`03001oogoo0?mooeYoo`03001oogoo04aoo`005goo00<0 07ooOol0ogooFgoo00<007ooOol0Bgoo000GOol00`00Oomoo`3oOomLOol00`00Oomoo`1:Ool001Mo o`03001oogoo0?mooeeoo`03001oogoo04Uoo`005goo00<007ooOol0ogooGWoo00<007ooOol0B7oo 000GOol00`00Oomoo`3oOomOOol00`00Oomoo`17Ool001Moo`<00?moof1oo`03001oogoo04Ioo`00 5goo00<007ooOol0ogooHGoo00<007ooOol0AGoo000GOol00`00Oomoo`3oOomROol00`00Oomoo`14 Ool001Moo`03001oogoo0?moof=oo`03001oogoo04=oo`005goo00<007ooOol0ogooI7oo00<007oo Ool0@Woo000GOol00`00Oomoo`3oOomUOol00`00Oomoo`11Ool001Moo`03001oogoo0?moofIoo`03 001oogoo041oo`005goo00<007ooOol0ogooIgoo00<007ooOol0?goo000GOol00`00Oomoo`3oOomX Ool00`00Oomoo`0nOol001Moo`03001oogoo0?moofUoo`03001oogoo03eoo`005goo00<007ooOol0 ogooJWoo00<007ooOol0?7oo000GOol3003oOom[Ool00`00Oomoo`0kOol001Moo`03001oogoo0?mo ofaoo`03001oogoo03Yoo`005goo00<007ooOol0ogooKGoo00<007ooOol0>Goo000GOol00`00Oomo o`3oOom^Ool00`00Oomoo`0hOol001Moo`03001oogoo0?moofmoo`03001oogoo03Moo`005goo00<0 07ooOol0ogooL7oo00<007ooOol0=Woo000GOol00`00Oomoo`3oOomaOol00`00Oomoo`0eOol001Mo o`03001oogoo0?moog9oo`8003Eoo`005goo00<007ooOol0ogooM7oo00<007ooOol0Ool00`00Oomo o`06Ool00`00Oomoo`3oOon4Ool2000SOol000moo`03001oogoo00Eoo`03001oogoo0?moohIoo`03 001oogoo021oo`0047oo00<007ooOol017oo00<007ooOol0ogooQgoo00<007ooOol07goo000=Ool0 1000Oomoo`001Woo00<007ooOol0ogooR7oo00<007ooOol07Woo000>Ool20007Ool00`00Oomoo`3o Oon9Ool00`00Oomoo`0MOol001Moo`03001oogoo0?moohYoo`03001oogoo01aoo`005goo00<007oo Ool0ogooRgoo00<007ooOol06goo000GOol00`00Oomoo`3oOon"], ImageRangeCache->{{{101, 550}, {375, 98}} -> {-45.1672, 1.36301, 0.361907, 0.00434436}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(Plot[{Evaluate[{\(th'\)[t]\ r[t]} /. %%[\([1]\)]], Evaluate[{\(r'\)[t]} /. %%[\([1]\)]]}, {t, 0, 150}]\)], "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 /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.00634921 0.308683 9.3167 [ [.15079 .29618 -6 -9 ] [.15079 .29618 6 0 ] [.27778 .29618 -6 -9 ] [.27778 .29618 6 0 ] [.40476 .29618 -6 -9 ] [.40476 .29618 6 0 ] [.53175 .29618 -6 -9 ] [.53175 .29618 6 0 ] [.65873 .29618 -9 -9 ] [.65873 .29618 9 0 ] [.78571 .29618 -9 -9 ] [.78571 .29618 9 0 ] [.9127 .29618 -9 -9 ] [.9127 .29618 9 0 ] [.01131 .02918 -30 -4.5 ] [.01131 .02918 0 4.5 ] [.01131 .12235 -30 -4.5 ] [.01131 .12235 0 4.5 ] [.01131 .21552 -30 -4.5 ] [.01131 .21552 0 4.5 ] [.01131 .40185 -24 -4.5 ] [.01131 .40185 0 4.5 ] [.01131 .49502 -24 -4.5 ] [.01131 .49502 0 4.5 ] [.01131 .58818 -24 -4.5 ] [.01131 .58818 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 .15079 .30868 m .15079 .31493 L s [(20)] .15079 .29618 0 1 Mshowa .27778 .30868 m .27778 .31493 L s [(40)] .27778 .29618 0 1 Mshowa .40476 .30868 m .40476 .31493 L s [(60)] .40476 .29618 0 1 Mshowa .53175 .30868 m .53175 .31493 L s [(80)] .53175 .29618 0 1 Mshowa .65873 .30868 m .65873 .31493 L s [(100)] .65873 .29618 0 1 Mshowa .78571 .30868 m .78571 .31493 L s [(120)] .78571 .29618 0 1 Mshowa .9127 .30868 m .9127 .31493 L s [(140)] .9127 .29618 0 1 Mshowa .125 Mabswid .05556 .30868 m .05556 .31243 L s .0873 .30868 m .0873 .31243 L s .11905 .30868 m .11905 .31243 L s .18254 .30868 m .18254 .31243 L s .21429 .30868 m .21429 .31243 L s .24603 .30868 m .24603 .31243 L s .30952 .30868 m .30952 .31243 L s .34127 .30868 m .34127 .31243 L s .37302 .30868 m .37302 .31243 L s .43651 .30868 m .43651 .31243 L s .46825 .30868 m .46825 .31243 L s .5 .30868 m .5 .31243 L s .56349 .30868 m .56349 .31243 L s .59524 .30868 m .59524 .31243 L s .62698 .30868 m .62698 .31243 L s .69048 .30868 m .69048 .31243 L s .72222 .30868 m .72222 .31243 L s .75397 .30868 m .75397 .31243 L s .81746 .30868 m .81746 .31243 L s .84921 .30868 m .84921 .31243 L s .88095 .30868 m .88095 .31243 L s .94444 .30868 m .94444 .31243 L s .97619 .30868 m .97619 .31243 L s .25 Mabswid 0 .30868 m 1 .30868 L s .02381 .02918 m .03006 .02918 L s [(-0.03)] .01131 .02918 1 0 Mshowa .02381 .12235 m .03006 .12235 L s [(-0.02)] .01131 .12235 1 0 Mshowa .02381 .21552 m .03006 .21552 L s [(-0.01)] .01131 .21552 1 0 Mshowa .02381 .40185 m .03006 .40185 L s [(0.01)] .01131 .40185 1 0 Mshowa .02381 .49502 m .03006 .49502 L s [(0.02)] .01131 .49502 1 0 Mshowa .02381 .58818 m .03006 .58818 L s [(0.03)] .01131 .58818 1 0 Mshowa .125 Mabswid .02381 .04782 m .02756 .04782 L s .02381 .06645 m .02756 .06645 L s .02381 .08508 m .02756 .08508 L s .02381 .10372 m .02756 .10372 L s .02381 .14098 m .02756 .14098 L s .02381 .15962 m .02756 .15962 L s .02381 .17825 m .02756 .17825 L s .02381 .19688 m .02756 .19688 L s .02381 .23415 m .02756 .23415 L s .02381 .25278 m .02756 .25278 L s .02381 .27142 m .02756 .27142 L s .02381 .29005 m .02756 .29005 L s .02381 .32732 m .02756 .32732 L s .02381 .34595 m .02756 .34595 L s .02381 .36458 m .02756 .36458 L s .02381 .38322 m .02756 .38322 L s .02381 .42048 m .02756 .42048 L s .02381 .43912 m .02756 .43912 L s .02381 .45775 m .02756 .45775 L s .02381 .47638 m .02756 .47638 L s .02381 .51365 m .02756 .51365 L s .02381 .53228 m .02756 .53228 L s .02381 .55092 m .02756 .55092 L s .02381 .56955 m .02756 .56955 L s .02381 .01055 m .02756 .01055 L s .02381 .60682 m .02756 .60682 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 .30864 m .02499 .14588 L .02605 .04374 L .02729 .01792 L .02846 .09187 L .02954 .22459 L .03053 .3692 L .03163 .5099 L .03279 .59476 L .03395 .58662 L .0352 .47729 L .03638 .31483 L .03746 .16297 L .03873 .04016 L .03944 .01472 L .04011 .02406 L .04132 .11813 L .04262 .29162 L .04387 .46644 L .04519 .5857 L .04588 .60332 L .04664 .58297 L .04733 .53076 L .04797 .45846 L .04933 .26717 L .05061 .10148 L .05176 .02103 L .05302 .03817 L .05416 .14396 L .05538 .31237 L .05643 .45916 L .05757 .57127 L .05876 .6009 L .05989 .53697 L .06054 .46594 L .06122 .37371 L .06244 .1977 L .0631 .11654 L .0638 .05148 L .06509 .01671 L .06633 .09332 L .06748 .23639 L .06884 .42975 L .0701 .56435 L .07142 .60035 L .07212 .56921 L .07287 .50112 L .07411 .33631 L .07477 .24085 L .07547 .14733 L Mistroke .07675 .03253 L .07794 .02248 L .07919 .11624 L .08037 .27132 L .08151 .43363 L .08257 .55075 L .08385 .60281 L .08453 .58329 L .08525 .52837 L .08601 .44057 L .08673 .34013 L .08739 .24504 L .08808 .15163 L .08934 .0356 L .09051 .02025 L .09177 .10817 L .09248 .19528 L .09315 .28998 L .09455 .48223 L .09525 .55296 L .09602 .59632 L .09668 .60063 L .09739 .5711 L .09865 .44301 L .10025 .21667 L .10104 .11764 L .10176 .05146 L .10242 .01948 L .10311 .01886 L .10381 .05255 L .10458 .12431 L .10579 .2861 L .10708 .46533 L .10776 .53798 L .1085 .58869 L .10981 .58541 L .11104 .47931 L .11173 .38909 L .11237 .29781 L .11361 .1303 L .11477 .03234 L .11581 .01944 L .11693 .08891 L .11817 .2409 L .1193 .40222 L .12047 .53966 L .12175 .60193 L .12295 .55687 L .12407 .43862 L .12526 .27031 L Mistroke .12639 .1216 L .1277 .02334 L .1289 .03393 L .13021 .15182 L .13095 .25118 L .13164 .35052 L .13289 .5102 L .13359 .57016 L .13422 .59817 L .13489 .59734 L .1356 .56214 L .13688 .42704 L .13837 .21694 L .13909 .12519 L .13976 .06163 L .14096 .01583 L .14224 .077 L .14291 .1478 L .14364 .24425 L .14497 .43128 L .14619 .56007 L .14731 .60144 L .14854 .54765 L .14983 .40073 L .15096 .23978 L .15203 .1063 L .15326 .02199 L .15438 .03384 L .15561 .13994 L .15631 .22979 L .15695 .3209 L .15818 .48536 L .15934 .58285 L .16059 .59112 L .16126 .55193 L .16197 .48144 L .16342 .28597 L .16412 .18871 L .16476 .11263 L .16607 .02204 L .16678 .02016 L .16746 .05063 L .16819 .11564 L .16887 .19752 L .1704 .41081 L .17164 .54884 L .17234 .59085 L .173 .60005 L .17369 .57735 L .17432 .52984 L Mistroke .17505 .44934 L .17574 .35673 L .17696 .18749 L .17824 .05456 L .17934 .01712 L .18055 .07072 L .18185 .21698 L .18325 .41213 L .18457 .55505 L .18577 .60001 L .18706 .54003 L .18827 .40198 L .18937 .24758 L .19054 .10404 L .19181 .02181 L .19297 .04023 L .19423 .15398 L .19495 .24734 L .19561 .34137 L .1968 .49373 L .19792 .58341 L .19893 .59607 L .20002 .53327 L .20121 .39548 L .20248 .21937 L .20356 .09272 L .20475 .02146 L .20606 .05109 L .20671 .10631 L .20743 .18984 L .20872 .36759 L .20989 .51139 L .21061 .56991 L .21128 .59675 L .21199 .5919 L .21276 .54901 L .21344 .48392 L .21415 .39486 L .21544 .21741 L .21663 .08207 L .2179 .01906 L .21911 .05835 L .22021 .16773 L .22163 .3606 L .22233 .45202 L .22297 .52199 L .22417 .59464 L .22547 .56774 L .22658 .46518 L .22779 .30389 L Mistroke .22908 .13664 L .23025 .0388 L .23152 .0278 L .23222 .06675 L .23288 .12877 L .23407 .28076 L .23534 .45055 L .23642 .55733 L .23761 .59762 L .2387 .5532 L .23972 .45165 L .24082 .30504 L .242 .15079 L .24329 .03962 L .24448 .0258 L .24517 .05989 L .24582 .1166 L .24702 .26626 L .2477 .35955 L .24841 .45217 L .2497 .57026 L .25079 .5961 L .25199 .53603 L .25327 .39197 L .25447 .2286 L .25513 .14575 L .25586 .07455 L .25718 .02048 L .25846 .07478 L .25965 .2024 L .26104 .39021 L .26235 .5363 L .26301 .57953 L .26371 .59655 L .2645 .57738 L .26522 .52679 L .26649 .38059 L .26769 .21783 L .26877 .09524 L .26994 .02557 L .27122 .04763 L .27186 .09618 L .27257 .1723 L .27384 .33993 L .275 .48499 L .27616 .57778 L .27727 .59181 L .27843 .52412 L .2797 .37805 L .28081 .22899 L Mistroke .28199 .09481 L .2831 .02765 L .28411 .03281 L .28541 .12863 L .28606 .20517 L .28678 .30014 L .28806 .4653 L .28923 .56811 L .28994 .59366 L .29061 .5885 L .29132 .55265 L .29209 .483 L .29336 .32404 L .29404 .23362 L .29476 .14498 L .29607 .03953 L .29729 .03035 L .29797 .06559 L .29869 .12946 L .29998 .28824 L .30109 .43392 L .30228 .55133 L .30358 .59387 L .3048 .53944 L .30603 .40928 L .30739 .23021 L .30807 .14762 L .3088 .07747 L .3095 .03615 L .31013 .02338 L .31134 .06754 L .31265 .20032 L .31388 .36227 L .31504 .49952 L .31575 .55784 L .31651 .59043 L .3172 .5893 L .31784 .56247 L .31853 .5082 L .31928 .42531 L .32081 .22662 L .32149 .1448 L .32214 .08272 L .32289 .03711 L .32357 .02416 L .32481 .07269 L .32551 .13601 L .32615 .21081 L .32731 .36204 L .32855 .50654 L Mistroke .32973 .58384 L .3308 .58405 L .33206 .4994 L .33277 .42053 L .33343 .33614 L .33463 .18219 L .33593 .06023 L .33664 .02936 L .33728 .02725 L .33856 .09539 L .33972 .22172 L .34095 .38108 L .34227 .52545 L .3435 .58969 L .34421 .58633 L .34485 .55738 L .3456 .49681 L .3463 .41879 L .34738 .28101 L .34851 .14384 L .34975 .04542 L .35089 .02903 L .35213 .09739 L .35284 .16882 L .35349 .24875 L .35467 .40015 L .35595 .53322 L .35664 .57577 L .35728 .59098 L .35854 .55021 L .35969 .44353 L .3609 .29141 L .36211 .14447 L .36342 .04353 L .36417 .02662 L .36485 .04015 L .36554 .08033 L .36619 .13953 L .36841 .41133 L .36964 .53628 L .37076 .58844 L .37181 .57169 L .37295 .48694 L .37402 .36323 L .375 .23746 L .37615 .11005 L .37723 .03959 L .37841 .03596 L .37967 .1176 L .38031 .1846 L Mistroke .381 .26902 L .38226 .42627 L .38348 .54346 L .38461 .58884 L .38579 .55859 L .38703 .45107 L .38925 .17958 L .39049 .06666 L .39164 .02837 L .3929 .0725 L .39361 .13219 L .39425 .20217 L .39533 .33746 L .39648 .47234 L .39774 .56912 L .3989 .58534 L .39998 .53294 L .40099 .43592 L .40219 .28964 L .40329 .15823 L .40457 .05416 L .40524 .03135 L .40596 .03509 L .40664 .06522 L .40729 .11468 L .40849 .24625 L .4096 .38463 L .41077 .50956 L .41205 .58272 L .41323 .57136 L .41451 .47844 L .41522 .39993 L .41587 .32021 L .41715 .16706 L .41832 .06525 L .41899 .03616 L .4197 .0319 L .42041 .05548 L .42119 .11081 L .42187 .17816 L .42259 .26361 L .4239 .42353 L .42459 .49467 L .42523 .54587 L .42644 .58668 L .42774 .54244 L .42847 .48166 L .42914 .4093 L .43035 .26108 L .43166 .11862 L Mistroke .43288 .04101 L .434 .03858 L .43532 .11887 L .43656 .25389 L .43802 .42941 L .43866 .49476 L .43937 .54923 L .44068 .58515 L .4414 .56528 L .44208 .52275 L .44282 .45435 L .4435 .3777 L .44503 .19369 L .4462 .08393 L .44745 .03269 L .44863 .06029 L .44971 .14348 L .451 .28982 L .45237 .45007 L .45353 .5488 L .45482 .58444 L .45613 .53143 L .45736 .41519 L .4588 .24328 L .46012 .10711 L .46136 .03885 L .46253 .04647 L .46377 .12853 L .46447 .20037 L .46512 .27625 L .46641 .42834 L .46712 .49821 L .46778 .54717 L .46894 .58379 L .47021 .54344 L .47093 .48778 L .4716 .41898 L .47287 .26968 L .47353 .19355 L .47423 .12345 L .475 .06679 L .47571 .03857 L .47689 .04917 L .47816 .13541 L .47936 .26502 L .48045 .39479 L .48167 .51491 L .48236 .55921 L .483 .5802 L .4843 .55831 L Mistroke .48502 .51076 L .48568 .45017 L .48792 .19432 L .48904 .09074 L .49028 .0368 L .49093 .03907 L .49162 .06496 L .49288 .16443 L .49412 .30491 L .49526 .43499 L .49642 .53562 L .49748 .57961 L .49866 .5623 L .4999 .4743 L .502 .23961 L .50311 .12556 L .5043 .04999 L .50553 .04203 L .50667 .10077 L .50798 .2274 L .50918 .3656 L .51028 .48109 L .51148 .56251 L .51261 .5789 L .51365 .53832 L .51486 .4361 L .51598 .3096 L .51667 .23051 L .51732 .16159 L .51855 .06688 L .51975 .03737 L .52105 .0846 L .52173 .13755 L .52245 .2095 L .52374 .3572 L .5249 .47773 L .52611 .5608 L .52675 .57832 L .52745 .57465 L .52868 .51277 L .52984 .40356 L .53108 .26223 L .53225 .14074 L .53333 .06414 L .53444 .03829 L .53566 .07821 L .53673 .16405 L .53787 .28689 L .53882 .39419 L .53984 .4939 L Mistroke .54096 .56337 L .54201 .57715 L .54327 .52529 L .54441 .4255 L .54564 .28903 L .54629 .21697 L .54698 .14832 L .54821 .0616 L .54935 .03984 L .55042 .07496 L .55159 .1668 L .55293 .31134 L .5542 .44831 L .5549 .50919 L .55567 .5556 L .55636 .57586 L .557 .5744 L .55829 .51496 L .55946 .40957 L .5607 .27162 L .56141 .19547 L .56206 .13331 L .56271 .08556 L .56339 .05234 L .56412 .04022 L .56479 .05102 L .56608 .12624 L .56729 .2454 L .56861 .39091 L .56933 .46282 L .57 .51775 L .57073 .55834 L .57153 .57644 L .57221 .56845 L .57294 .53673 L .57425 .4306 L .57568 .27582 L .57694 .14713 L .57764 .0924 L .57828 .05868 L .57958 .04566 L .58081 .10282 L .58194 .20234 L .58317 .33509 L .58438 .46044 L .58554 .54444 L .58617 .56888 L .58687 .57497 L .58808 .53387 L .58923 .44276 L Mistroke .59046 .31369 L .59161 .19106 L .59267 .10108 L .59389 .04612 L .59454 .04364 L .59522 .06128 L .59637 .13335 L .59762 .25543 L .59899 .40318 L .59974 .47455 L .60046 .52746 L .60112 .56004 L .60184 .5743 L .60309 .54417 L .61312 .27768 L .61443 .41586 L .61511 .47897 L .61585 .53126 L .61655 .56281 L .61719 .57334 L .61844 .54276 L .61918 .49547 L .61998 .42561 L .62142 .27376 L .62273 .146 L .62347 .0916 L .62415 .05839 L .62541 .04898 L .62611 .07327 L .62676 .11212 L .62743 .16734 L .62817 .23913 L .6295 .38043 L .63074 .49384 L .63205 .56358 L .63318 .56728 L .63441 .51077 L .63566 .40395 L .6368 .28466 L .63803 .16267 L .63872 .10771 L .63937 .07069 L .64047 .04558 L .64163 .07462 L .64288 .16163 L .64402 .27288 L .64533 .40935 L .64605 .47444 L .64672 .52283 L .64791 .56866 L Mistroke .64921 .55201 L .64994 .51322 L .65063 .46033 L .65193 .33384 L .65334 .18979 L .65412 .12413 L .65484 .07845 L .65605 .04672 L .65669 .05433 L .65738 .08116 L .65861 .1691 L .65973 .27935 L .66107 .41635 L .66232 .51737 L .66363 .56813 L .66432 .56725 L .66506 .54487 L .66762 .33678 L .66887 .20917 L .67002 .11308 L .67122 .05547 L .67252 .05729 L .67319 .08481 L .67393 .13299 L .67527 .25529 L .67672 .40238 L .67752 .47308 L .67826 .52492 L .67896 .55634 L .67972 .56904 L .68104 .53621 L .68168 .49708 L .68239 .44034 L .68381 .30028 L .68503 .18066 L .68568 .12787 L .68636 .08462 L .68707 .05719 L .68771 .04882 L .68899 .08138 L .69013 .1585 L .69139 .27719 L .69273 .41084 L .69343 .47201 L .69417 .52291 L .69482 .55288 L .69553 .56745 L .69678 .54479 L .69806 .46442 L .69922 .35766 L Mistroke .70046 .23237 L .70112 .17189 L .70182 .11784 L .70307 .058 L .70423 .05523 L .70531 .09894 L .7065 .18923 L .709 .43108 L .70968 .48665 L .71041 .5319 L .71172 .56683 L .71236 .55981 L .71306 .53469 L .71432 .44943 L .71667 .22335 L .71779 .12854 L .71902 .064 L .72031 .05525 L .72151 .10282 L .72263 .18738 L .72366 .28445 L .72475 .39182 L .72595 .49238 L .72725 .55627 L .72796 .56579 L .72863 .55719 L .72982 .50221 L .7311 .39881 L .73251 .26113 L .73383 .14486 L .73449 .10034 L .73519 .06776 L .73598 .05245 L .73669 .05857 L .738 .11727 L .73874 .17274 L .73942 .23353 L .74065 .35287 L .7413 .4138 L .74199 .47179 L .74321 .54329 L .74435 .56463 L .74566 .53025 L .74685 .45124 L .74804 .34331 L .74932 .21978 L .75053 .12212 L .75165 .06673 L .75283 .0552 L .75407 .09753 L Mistroke .75535 .18933 L .75675 .32056 L .75793 .43002 L .75904 .51157 L .76032 .56022 L .76149 .5535 L .76259 .50353 L .76361 .42734 L .76591 .21245 L .7671 .11916 L .76839 .06185 L .7696 .06019 L .77071 .10377 L .772 .19863 L .77341 .33047 L .77474 .44921 L .77599 .52975 L .77666 .55403 L .77739 .56244 L .77867 .53169 L .77939 .49088 L .78016 .43326 L .78152 .30831 L .78271 .19928 L .78398 .10665 L .7847 .07292 L .78537 .05743 L .78666 .07187 L .78916 .24028 L .79047 .36314 L .79118 .42646 L .79185 .47787 L .79306 .543 L .7937 .55873 L .79438 .55974 L .7956 .52169 L .79671 .4492 L .79914 .22973 L .79981 .17313 L .80052 .1225 L .80178 .06566 L .80249 .0566 L .80315 .06392 L .80388 .08897 L .80466 .13352 L .80608 .24861 L .80738 .36876 L .80856 .46704 L .80982 .53811 L .81101 .5602 L Mistroke .81208 .53876 L .81335 .46768 L .81407 .4112 L .81472 .35297 L .81601 .23475 L .81721 .1391 L .81825 .08183 L .81937 .05781 L .82061 .08054 L .82175 .14249 L .82292 .23716 L .82421 .35422 L .82542 .45637 L .82653 .52467 L .82768 .55761 L .82891 .54451 L .83005 .48973 L .83114 .40843 L .83241 .29437 L .83377 .17688 L .83505 .09504 L .83621 .06057 L .83742 .07186 L .83873 .13542 L .83997 .23167 L .84111 .3344 L .84246 .44859 L .84372 .52552 L .84503 .55783 L .84573 .55218 L .84647 .52892 L .84884 .36337 L .85009 .25111 L .85077 .1932 L .85142 .14524 L .85257 .08293 L .85385 .06003 L .85493 .08192 L .8561 .14403 L .85717 .2264 L .85833 .32985 L .85947 .427 L .86068 .5086 L .86182 .55081 L .86286 .55397 L .8639 .52288 L .86488 .46591 L .86711 .27938 L .86834 .17665 L .86951 .10256 L Mistroke .87017 .07608 L .87088 .06207 L .87214 .07688 L .87342 .13952 L .8746 .22926 L .87583 .33746 L .87717 .4474 L .87843 .52279 L .87958 .55432 L .88023 .55386 L .88094 .5383 L .88168 .50639 L .88237 .46415 L .88489 .25445 L .88604 .16291 L .88729 .09137 L .88846 .06278 L .88955 .07452 L .89053 .11506 L .89161 .18655 L .8938 .3721 L .89496 .46191 L .89617 .52842 L .89681 .54764 L .8975 .55463 L .89872 .53096 L .89988 .47042 L .90112 .37647 L .90334 .18881 L .90458 .10926 L .90528 .08017 L .90594 .0657 L .90663 .06466 L .90726 .07646 L .90799 .10436 L .90868 .14336 L .91107 .33394 L .91238 .4399 L .9136 .51464 L .91492 .5521 L .91561 .55121 L .91637 .53391 L .91702 .50627 L .9177 .46603 L .91893 .37335 L .92026 .25946 L .92169 .15025 L .92251 .10384 L .92326 .07632 L .92401 .06475 L Mistroke .92472 .06927 L .92597 .11234 L .92716 .18778 L .92852 .2992 L .92977 .40353 L .93095 .48541 L .93204 .53517 L .93323 .55219 L .93451 .52426 L .93515 .49367 L .93584 .45027 L .9371 .35279 L .93822 .25835 L .93944 .16402 L .94016 .12044 L .94082 .09014 L .94152 .0708 L .94228 .06587 L .94298 .07617 L .94364 .09856 L .94488 .16904 L .94683 .32463 L .94866 .46535 L .94958 .51553 L .95057 .54612 L .95167 .54752 L .95268 .51863 L .95371 .46332 L .95483 .38115 L .95592 .29068 L .95709 .19727 L .95819 .12512 L .9592 .08241 L .96021 .06672 L .96116 .07865 L .96203 .11105 L .96299 .16677 L .96492 .31784 L .96584 .39321 L .96672 .45691 L .96751 .50273 L .96837 .53623 L .96939 .55013 L .97032 .53727 L .97133 .49706 L .97241 .42972 L .97619 .14085 L Mfstroke .02381 .30868 m .06244 .31538 L .10458 .32396 L .14415 .33048 L .18221 .33734 L .22272 .34357 L .26171 .35003 L .30316 .35691 L .34309 .36279 L .3815 .36853 L .42237 .37441 L .46172 .37923 L .49955 .38431 L .53984 .38816 L .57861 .39261 L .61984 .3973 L .65954 .40094 L .69774 .40461 L .73838 .40807 L .77751 .41093 L .81909 .41396 L .85916 .41668 L .89771 .41951 L .93871 .42188 L .97619 .42405 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{450, 277.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol00`00Oomoo`3oOoljOol002=oo`8000Ao o`8000Aoo`03001oogoo009oo`03001oogoo00=oo`03001oogoo009oo`03001oogoo009oo`03001o ogoo00=oo`03001oogoo009oo`03001oogoo009oo`03001oogoo00=oo`03001oogoo009oo`03001o ogoo00=oo`03001oogoo009oo`03001oogoo009oo`03001oogoo00=oo`03001oogoo00ioo`03001o ogoo01=oo`03001oogoo00=oo`03001oogoo0?mooaioo`0027oo0P0017oo00<007ooOol00goo0P00 17oo0P001goo0P0017oo0P0017oo00<007ooOol00Woo00<007ooOol00goo00<007ooOol00Woo00<0 07ooOol00Woo00<007ooOol00goo00<007ooOol00Woo00<007ooOol00Woo00<007ooOol00goo00<0 07ooOol00Woo00<007ooOol00goo00<007ooOol00Woo00<007ooOol00Woo00<007ooOol00goo00<0 07ooOol027oo00<007ooOol00goo00<007ooOol00Woo00<007ooOol03Woo00<007ooOol00goo00<0 07ooOol03Woo00<007ooOol0ogoo3Goo0007Ool01000Oomoo`0027oo00@007ooOol0009oo`04001o ogoo0006Ool30003Ool20004Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00 Oomoo`02Ool00`00Oomoo`02Ool20004Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`02 Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`03 Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`08 Ool00`00Oomoo`03Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`09 Ool00`00Oomoo`3oOol1Ool000Moo`04001oogoo0008Ool01000Oomoo`001Goo00<007ooOol017oo 0P0017oo0P0017oo00<007ooOol00Woo00<007ooOol00Woo0P0017oo00<007ooOol00Woo00<007oo Ool00Woo0P0017oo00<007ooOol00Woo00<007ooOol00goo00<007ooOol00Woo00<007ooOol00goo 00<007ooOol00Woo00<007ooOol00Woo00<007ooOol00goo00<007ooOol00goo00<007ooOol00Woo 00<007ooOol00goo00<007ooOol00Woo00<007ooOol00goo00<007ooOol00goo00<007ooOol00Woo 00<007ooOol00goo00<007ooOol00Woo0P0017oo00<007ooOol00goo00<007ooOol02Goo00<007oo Ool00Woo00<007ooOol0ngoo00000goo000000020002Ool01000Oomoo`0027oo00@007ooOol000=o o`8000Moo`8000Aoo`8000Aoo`03001oogoo009oo`03001oogoo009oo`8000Aoo`03001oogoo009o o`03001oogoo009oo`8000Aoo`03001oogoo009oo`03001oogoo00=oo`03001oogoo009oo`03001o ogoo00=oo`03001oogoo009oo`03001oogoo009oo`03001oogoo00=oo`03001oogoo00=oo`03001o ogoo009oo`03001oogoo00=oo`03001oogoo009oo`03001oogoo00=oo`03001oogoo00=oo`03001o ogoo009oo`03001oogoo00=oo`03001oogoo009oo`8000Aoo`03001oogoo00=oo`03001oogoo00Uo o`03001oogoo009oo`03001oogoo00Aoo`03001oogoo00Qoo`03001oogoo0>Uoo`001goo00@007oo Ool000Qoo`04001oogoo0005Ool00`00Oomoo`04Ool20004Ool20004Ool00`00Oomoo`02Ool00`00 Oomoo`02Ool20004Ool00`00Oomoo`02Ool00`00Oomoo`02Ool20004Ool00`00Oomoo`02Ool00`00 Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`02Ool00`00 Oomoo`03Ool00`00Oomoo`02Ool20004Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`03 Ool00`00Oomoo`03Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`02Ool20004Ool00`00 Oomoo`03Ool00`00Oomoo`03Ool00`00Oomoo`03Ool00`00Oomoo`02Ool20004Ool2000:Ool00`00 Oomoo`3YOol000Moo`04001oogoo0008Ool01000Oomoo`000Woo00@007ooOol000Ioo`8000Aoo`80 00Aoo`03001oogoo009oo`03001oogoo009oo`8000Aoo`03001oogoo009oo`8000=oo`8000Aoo`03 001oogoo009oo`03001oogoo00=oo`03001oogoo009oo`8000=oo`8000Aoo`03001oogoo009oo`80 00Aoo`03001oogoo009oo`8000Aoo`03001oogoo00=oo`03001oogoo009oo`8000Aoo`03001oogoo 009oo`8000Aoo`03001oogoo00=oo`03001oogoo009oo`8000Aoo`03001oogoo00=oo`03001oogoo 00=oo`03001oogoo00=oo`03001oogoo009oo`8000Aoo`8000Eoo`03001oogoo009oo`03001oogoo 00Uoo`03001oogoo00=oo`03001oogoo00Yoo`03001oogoo00=oo`03001oogoo07oo0008Ool2000:Ool20004Ool20007Ool00`00Oomoo`06Ool00`00Oomoo`03Ool0 0`00Oomoo`02Ool00`00Oomoo`02Ool00`00Oomoo`02Ool20009Ool00`00Oomoo`03Ool00`00Oomo o`02Ool00`00Oomoo`08Ool00`00Oomoo`02Ool00`00Oomoo`3oOomIOol002=oo`03001oogoo00Io o`03001oogoo00=oo`03001oogoo00Moo`03001oogoo00=oo`03001oogoo00Moo`03001oogoo00Qo o`03001oogoo0?moofUoo`008goo00<007ooOol01Woo00<007ooOol03Goo00<007ooOol0ogooQ7oo 000SOol2003oOonNOol002=oo`03001oogoo0?mooieoo`008goo00<007ooOol0ogooWGoo000SOol0 0`00Oomoo`3oOonMOol002=oo`03001oogoo0?mooieoo`008goo00<007ooOol0ogooWGoo003oOoo3 Ool00?mool=oo`00ogoo`goo003oOoo3Ool00?mool=oo`00ogoo`goo003oOoo3Ool00001\ \>"], ImageRangeCache->{{{101, 550}, {374.938, 98}} -> {-50.6552, -0.010214, 0.371647, 0.000253273}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(T = 2\ Sqrt[2\ l/g]\ /\ eps\ \ NIntegrate[1/\((y^3\ Sqrt[1 - y])\), {y, 1/Sqrt[2], 1}]\)], "Input"], Cell[BoxData[ \(140.38977858459245`\)], "Output"] }, Open ]] }, FrontEndVersion->"X 3.0", ScreenRectangle->{{0, 1280}, {0, 1024}}, WindowSize->{744, 751}, WindowMargins->{{Automatic, 152}, {Automatic, 90}}, PrintingPageRange->{Automatic, Automatic}, PrintingOptions->{"PrintingMargins"->{{54, 54}, {72, 72}}, "PaperSize"->{612, 792}, "PaperOrientation"->"Portrait", "PrintCellBrackets"->False, "PrintRegistrationMarks"->False, "PrintMultipleHorizontalPages"->False, "Magnification"->1} ] (*********************************************************************** 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[1731, 51, 117, 3, 22, "Input"], Cell[1851, 56, 443, 12, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[2331, 73, 136, 3, 22, "Input"], Cell[2470, 78, 531, 14, 22, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[3038, 97, 138, 2, 22, "Input"], Cell[3179, 101, 1714, 40, 57, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[4930, 146, 39, 1, 22, "Input"], Cell[4972, 149, 36, 1, 22, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[5045, 155, 38, 1, 22, "Input"], Cell[5086, 158, 35, 1, 22, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[5158, 164, 42, 1, 22, "Input"], Cell[5203, 167, 104, 3, 22, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[5344, 175, 1757, 41, 60, "Input"], Cell[7104, 218, 418, 11, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7559, 234, 87, 1, 22, "Input"], Cell[7649, 237, 18788, 490, 286, 4429, 308, "GraphicsData", "PostScript", "Graphics"], Cell[26440, 729, 130, 3, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[26607, 737, 144, 2, 27, "Input"], Cell[26754, 741, 239011, 3940, 286, 18533, 1214, "GraphicsData", "PostScript", "Graphics"], Cell[265768, 4683, 130, 3, 27, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[265935, 4691, 135, 3, 27, "Input"], Cell[266073, 4696, 53, 1, 27, "Output"] }, Open ]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)