(*********************************************************************** 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[ 79456, 2870]*) (*NotebookOutlinePosition[ 80352, 2901]*) (* CellTagsIndexPosition[ 80308, 2897]*) (*WindowFrame->Normal*) Notebook[{ Cell[TextData["\n"], "Text", Evaluatable->False], Cell["THE PENDULUM", "Section", Evaluatable->False], Cell[TextData["\n"], "Text", Evaluatable->False], Cell[TextData["\n"], "Text", Evaluatable->False], Cell[CellGroupData[{ Cell[TextData["theta''[t] + g/l Sin[theta[t]] == 0"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ (g*Sin[theta[t]])/l + Derivative[2][theta][t] == 0 \ \>", "\<\ g Sin[theta[t]] --------------- + theta''[t] == 0 l\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[TextData[ "L[ theta_, thetaDot_] :=\n 1/2 m ( l thetaDot)^2 - m g ( l - l \ Cos[theta])"], "Input", PageWidth->Infinity], Cell[CellGroupData[{ Cell[TextData["D[ L[ theta[t], thetaDot[t] ], theta[t] ]"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ -(g*l*m*Sin[theta[t]]) \ \>", "\<\ -(g l m Sin[theta[t]])\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData[ "Dt[ D[ L[theta[t],thetaDot[t]], thetaDot[t] ], t,\n \ Constants -> {m,g,l} ]"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ l^2*m*Derivative[1][thetaDot][t] \ \>", "\<\ 2 l m thetaDot'[t]\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["% - %% == 0"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ g*l*m*Sin[theta[t]] + l^2*m*Derivative[1][thetaDot][t] == 0 \ \>", "\<\ 2 g l m Sin[theta[t]] + l m thetaDot'[t] == 0\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["% /. thetaDot -> theta'"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ g*l*m*Sin[theta[t]] + l^2*m*Derivative[2][theta][t] == 0 \ \>", "\<\ 2 g l m Sin[theta[t]] + l m theta''[t] == 0\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["eq = Apart /@ Map[ # / (l^2 m) &, % ]"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ (g*Sin[theta[t]])/l + Derivative[2][theta][t] == 0 \ \>", "\<\ g Sin[theta[t]] --------------- + theta''[t] == 0 l\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["?/@"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ Map[f, expr] or f /@ expr applies f to each element on the first level in expr. Map[f, expr, levelspec] applies f to parts of expr specified by levelspec. \ \>", "\<\ Map[f, expr] or f /@ expr applies f to each element on the first level in expr. Map[f, expr, levelspec] applies f to parts of expr specified by levelspec.\ \>"], "Print", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["?Map"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ Map[f, expr] or f /@ expr applies f to each element on the first level in expr. Map[f, expr, levelspec] applies f to parts of expr specified by levelspec. \ \>", "\<\ Map[f, expr] or f /@ expr applies f to each element on the first level in expr. Map[f, expr, levelspec] applies f to parts of expr specified by levelspec.\ \>"], "Print", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["?#"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ # represents the first argument supplied to a pure function. #n represents the nth argument. \ \>", "\<\ # represents the first argument supplied to a pure function. #n represents the nth argument.\ \>"], "Print", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["?&"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ Function[body] or body& is a pure function. The formal parameters are # (or #1), #2, etc. Function[x, body] is a pure function with a single formal parameter x. Function[{x1, x2, ...}, body] is a pure function with a list of formal parameters. Function[{x1, x2, ...}, body, {attributes}] has the given attributes during evaluation. \ \>", "\<\ Function[body] or body& is a pure function. The formal parameters are # (or #1), #2, etc. Function[x, body] is a pure function with a single formal parameter x. Function[{x1, x2, ...}, body] is a pure function with a list of formal parameters. Function[{x1, x2, ...}, body, {attributes}] has the given attributes during evaluation.\ \>"], "Print", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["?Apart"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ Apart[expr] rewrites a rational expression as a sum of terms with minimal denominators. Apart[expr, var] treats all variables other than var as constants. \ \>", "\<\ Apart[expr] rewrites a rational expression as a sum of terms with minimal denominators. Apart[expr, var] treats all variables other than var as constants.\ \>"], "Print", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["Series[ #, {theta[t],0,1} ] & /@ eq"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ SeriesData[theta[t], 0, {Derivative[2][theta][t], g/l}, 0, 2, 1] == 0 \ \>", "\<\ g theta[t] 2 theta''[t] + ---------- + O[theta[t]] == 0 l\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell[TextData["eqLinear = Normal[%]"], "Input", PageWidth->Infinity], Cell[OutputFormData["\<\ (g*theta[t])/l + Derivative[2][theta][t] == 0 \ \>", "\<\ g theta[t] ---------- + theta''[t] == 0 l\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[TextData[ "NDSolve[ {eqLinear, theta[0]==Pi/2, theta'[0]==0}\n /. g/l -> 1 \ //Flatten, theta, {t,0,20} ] ;"], "Input", PageWidth->Infinity], Cell[CellGroupData[{ Cell["\<\ plotlin = Plot[ Evaluate[ theta[t] /. % ], {t,0,20}, PlotStyle -> Dashing[{0.01,0.01}] ] ;\ \>", "Input", PageWidth->Infinity], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.047619 0.309014 0.18736 [ [(5)] .2619 .30901 0 2 Msboxa [(10)] .5 .30901 0 2 Msboxa [(15)] .7381 .30901 0 2 Msboxa [(20)] .97619 .30901 0 2 Msboxa [(-1.5)] .01131 .02797 1 0 Msboxa [(-1)] .01131 .12165 1 0 Msboxa [(-0.5)] .01131 .21533 1 0 Msboxa [(0.5)] .01131 .40269 1 0 Msboxa [(1)] .01131 .49637 1 0 Msboxa [(1.5)] .01131 .59005 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 .61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath [ ] 0 setdash 0 g p p .002 w .2619 .30901 m .2619 .31526 L s P [(5)] .2619 .30901 0 2 Mshowa p .002 w .5 .30901 m .5 .31526 L s P [(10)] .5 .30901 0 2 Mshowa p .002 w .7381 .30901 m .7381 .31526 L s P [(15)] .7381 .30901 0 2 Mshowa p .002 w .97619 .30901 m .97619 .31526 L s P [(20)] .97619 .30901 0 2 Mshowa p .001 w .07143 .30901 m .07143 .31276 L s P p .001 w .11905 .30901 m .11905 .31276 L s P p .001 w .16667 .30901 m .16667 .31276 L s P p .001 w .21429 .30901 m .21429 .31276 L s P p .001 w .30952 .30901 m .30952 .31276 L s P p .001 w .35714 .30901 m .35714 .31276 L s P p .001 w .40476 .30901 m .40476 .31276 L s P p .001 w .45238 .30901 m .45238 .31276 L s P p .001 w .54762 .30901 m .54762 .31276 L s P p .001 w .59524 .30901 m .59524 .31276 L s P p .001 w .64286 .30901 m .64286 .31276 L s P p .001 w .69048 .30901 m .69048 .31276 L s P p .001 w .78571 .30901 m .78571 .31276 L s P p .001 w .83333 .30901 m .83333 .31276 L s P p .001 w .88095 .30901 m .88095 .31276 L s P p .001 w .92857 .30901 m .92857 .31276 L s P p .002 w 0 .30901 m 1 .30901 L s P p .002 w .02381 .02797 m .03006 .02797 L s P [(-1.5)] .01131 .02797 1 0 Mshowa p .002 w .02381 .12165 m .03006 .12165 L s P [(-1)] .01131 .12165 1 0 Mshowa p .002 w .02381 .21533 m .03006 .21533 L s P [(-0.5)] .01131 .21533 1 0 Mshowa p .002 w .02381 .40269 m .03006 .40269 L s P [(0.5)] .01131 .40269 1 0 Mshowa p .002 w .02381 .49637 m .03006 .49637 L s P [(1)] .01131 .49637 1 0 Mshowa p .002 w .02381 .59005 m .03006 .59005 L s P [(1.5)] .01131 .59005 1 0 Mshowa p .001 w .02381 .04671 m .02756 .04671 L s P p .001 w .02381 .06545 m .02756 .06545 L s P p .001 w .02381 .08418 m .02756 .08418 L s P p .001 w .02381 .10292 m .02756 .10292 L s P p .001 w .02381 .14039 m .02756 .14039 L s P p .001 w .02381 .15913 m .02756 .15913 L s P p .001 w .02381 .17786 m .02756 .17786 L s P p .001 w .02381 .1966 m .02756 .1966 L s P p .001 w .02381 .23407 m .02756 .23407 L s P p .001 w .02381 .25281 m .02756 .25281 L s P p .001 w .02381 .27154 m .02756 .27154 L s P p .001 w .02381 .29028 m .02756 .29028 L s P p .001 w .02381 .32775 m .02756 .32775 L s P p .001 w .02381 .34649 m .02756 .34649 L s P p .001 w .02381 .36522 m .02756 .36522 L s P p .001 w .02381 .38396 m .02756 .38396 L s P p .001 w .02381 .42143 m .02756 .42143 L s P p .001 w .02381 .44017 m .02756 .44017 L s P p .001 w .02381 .4589 m .02756 .4589 L s P p .001 w .02381 .47764 m .02756 .47764 L s P p .001 w .02381 .51511 m .02756 .51511 L s P p .001 w .02381 .53385 m .02756 .53385 L s P p .001 w .02381 .55258 m .02756 .55258 L s P p .001 w .02381 .57132 m .02756 .57132 L s P p .001 w .02381 .00924 m .02756 .00924 L s P p .001 w .02381 .60879 m .02756 .60879 L s P p .002 w .02381 0 m .02381 .61803 L s P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath p p [ .01 .01 ] 0 setdash p .004 w .02381 .60332 m .02505 .60322 L .02629 .60292 L .02753 .60242 L .02877 .60172 L .03125 .59973 L .03373 .59696 L .03869 .58907 L .04365 .57814 L .05357 .54768 L .06349 .50691 L .10317 .28084 L .12302 .16469 L .13294 .11476 L .14286 .07323 L .14782 .0562 L .15278 .0419 L .15774 .0305 L .16022 .02593 L .1627 .02212 L .16518 .0191 L .16642 .01788 L .16766 .01685 L .1689 .01603 L .17014 .0154 L .17138 .01498 L .17262 .01475 L .17386 .01472 L .1751 .0149 L .17634 .01527 L .17758 .01584 L .18006 .01758 L .1813 .01874 L .18254 .0201 L .1875 .0275 L .19246 .03795 L .20238 .06752 L .2123 .10753 L .22222 .15626 L .2619 .3925 L .28175 .49957 L .29167 .54184 L .29663 .55929 L .30159 .57404 L .30655 .58591 L .31151 .59477 L .31399 .59805 L .31523 .5994 L .31647 .60054 L .31771 .60149 L Mistroke .31895 .60225 L .32019 .6028 L .32143 .60315 L .32267 .60331 L .32391 .60326 L .32515 .60302 L .32639 .60257 L .32763 .60193 L .32887 .60109 L .33135 .59881 L .33383 .59575 L .33631 .59191 L .34127 .58194 L .34623 .56901 L .35119 .55326 L .36111 .51402 L .38095 .41103 L .42063 .17328 L .43056 .12221 L .44048 .07921 L .4504 .04615 L .45536 .03382 L .45784 .02876 L .46032 .02446 L .4628 .02094 L .46528 .01819 L .46652 .01712 L .46776 .01624 L .469 .01556 L .47024 .01508 L .47148 .0148 L .47272 .01472 L .47396 .01483 L .4752 .01515 L .47644 .01567 L .47768 .01638 L .48016 .01841 L .48264 .02122 L .48512 .02481 L .49008 .0343 L .49504 .04677 L .5 .06208 L .51984 .148 L .53968 .26148 L .55952 .38309 L .57937 .49202 L .58929 .53573 L .59425 .55402 L .59921 .56964 L .60417 .58244 L Mistroke .60913 .59228 L .61161 .59605 L .61409 .59904 L .61657 .60125 L .61781 .60206 L .61905 .60266 L .62029 .60307 L .62153 .60328 L .62277 .60329 L .62401 .6031 L .62525 .60271 L .62649 .60212 L .62773 .60134 L .62897 .60035 L .63145 .59779 L .63393 .59444 L .63889 .58544 L .64385 .57344 L .64881 .55857 L .65873 .52091 L .67857 .42013 L .69841 .30033 L .71825 .18202 L .72817 .12986 L .7381 .08544 L .74306 .06675 L .74802 .05069 L .75298 .03743 L .75546 .0319 L .75794 .02712 L .76042 .0231 L .7629 .01986 L .76414 .01853 L .76538 .0174 L .76662 .01647 L .76786 .01573 L .7691 .0152 L .77034 .01486 L .77158 .01472 L .77282 .01479 L .77406 .01505 L .7753 .01551 L .77654 .01617 L .77778 .01703 L .78026 .01934 L .78274 .02244 L .78522 .02631 L .7877 .03095 L .79762 .05691 L .80754 .09376 L Mistroke .81746 .13992 L .85714 .3736 L .87698 .48427 L .8869 .52938 L .89187 .54847 L .89683 .56496 L .90179 .57868 L .90675 .58947 L .90923 .59373 L .91171 .59722 L .91419 .59993 L .91543 .60099 L .91667 .60185 L .91791 .60251 L .91915 .60298 L .92039 .60324 L .92163 .6033 L .92287 .60317 L .92411 .60283 L .92535 .6023 L .92659 .60157 L .92907 .59951 L .93155 .59666 L .93403 .59303 L .93651 .58863 L .94643 .5636 L .95139 .54688 L .95635 .52757 L .97619 .42911 L Mfstroke P P P % End of Graphics MathPictureEnd\ \>"], "Graphics", PageWidth->Infinity, Evaluatable->False, ImageSize->{300, 185}, ImageMargins->{{100, Inherited}, {Inherited, 0}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgI06JI09VI0IIIVJIIYVII/bII_nIIP3IVFJIVIVIVLbIVOnIV@3Ic6JIc9VIcI ofJIoiVIolbIoonIo`33Pl?3a0@414A4A8B4Qol000Oo00<0ool0 1_l00`3oo`04o`030?oo02?o00<0ool0F_l00`3oo`1Bo`030?oo03[o0006o`802?l300Co00<0ool0 M_l00`3oo`1Bo`030?oo00Oo00<0ool0>_l001Oo00<0ool08Ol00`3oo`09o`030?oo04Go00<0ool0 Dol00`3oo`14o`005ol00`3oo`0Qo`030?oo00Wo00<0ool0AOl00`3oo`0:o`030?oo04Go00<0ool0 2Ol00`3oo`0io`005ol2027o00<0ool02ol00`3oo`14o`030?oo00[o00<0ool0AOl00`3oo`09o`03 0?oo03Wo000Go`030?oo023o00<0ool02ol00`3oo`1Ao`030?oo05;o00<0ool0>?l001Oo00<0ool0 bOl00`3oo`0;o`030?oo03So000Go`030?oo02oo00<0ool0@_l00`3oo`1Bo`030?oo04Ko000Go`03 0?oo023o00<0ool03?l00`3oo`11o`030?oo00go00<0ool0@_l00`3oo`17o`005ol2023o00<0ool0 3Ol00`3oo`11o`030?oo00go00<0ool0@_l00`3oo`0=o`030?oo03Oo000Go`030?oo01oo00<0ool0 3Ol00`3oo`1Bo`030?oo057o00<0ool0=ol001Oo00<0ool0Q?l00`3oo`1Ao`030?oo03Oo000Go`03 0?oo07?o00<0ool0DOl00`3oo`18o`005ol00`3oo`0No`030?oo00oo00<0ool0?ol00`3oo`1Ao`03 0?oo04Wo000Go`807ol00`3oo`0@o`030?oo03ko00<0ool04?l00`3oo`0no`030?oo013o00<0ool0 =_l001Oo00<0ool07Ol00`3oo`0Ao`030?oo03ko00<0ool04?l00`3oo`1Ao`030?oo03Ko000Go`03 0?oo01go00<0ool0IOl00`3oo`1Bo`030?oo03Go000Go`030?oo0_l00`3oo`0Eo`030?oo03?o000Ao`030?oo00?o00<0ool06ol00`3oo`0Eo`03 0?oo03[o00<0ool05Ol00`3oo`1Ao`030?oo03?o000Ao`030?oo00?o00<0ool06ol00`3oo`1Zo`03 0?oo08Oo000@o`801Ol00`3oo`33o`030?oo04co000Go`030?oo01[o00<0ool05ol00`3oo`0ho`03 0?oo057o00<0ool05ol00`3oo`0bo`005ol201_o00<0ool05ol00`3oo`0go`030?oo01Oo00<0ool0 >?l00`3oo`0Go`030?oo03;o000Go`030?oo01[o00<0ool05ol00`3oo`0go`030?oo01So00<0ool0 =ol00`3oo`0Go`030?oo03;o000Go`030?oo01[o00<0ool05ol00`3oo`1Bo`030?oo057o00<0ool0 <_l001Oo00<0ool0ROl00`3oo`26o`005ol00`3oo`1^o`030?oo057o00<0ool0COl001Oo0P0Jo`03 0?oo01Wo00<0ool0=_l00`3oo`1Ao`030?oo01Wo00<0ool0o`005ol00`3oo`0fo`030?oo03Co00<0ool0 DOl00`3oo`0Ko`030?oo033o000Go`806Ol00`3oo`0Ko`030?oo03?o00<0ool06ol00`3oo`0do`03 0?oo01_o00<0ool0?l00`3o o`0`o`030?oo057o00<0ool07_l00`3oo`0_o`001_l00`3o0007o`801Ol00`3oo`0Fo`030?oo01oo 00<0ool0o`030?oo02oo00<0ool08?l00`3oo`0_o`030?oo01oo00<0ool0;ol00`3oo`0Vo`00 1_l00`3o0007o`030?l000Co00<0ool03Ol00`3oo`0ao`030?oo01ko00<0ool0?l00`3oo`0Fo`030?oo03So00<0ool0 5_l00`3oo`0ho`030?oo01Oo00<0ool02?l001Oo00<0ool02Ol00`3oo`0io`030?oo01Ko00<0ool0 >?l00`3oo`1Ao`030?oo02;o000Go`030?oo00Wo00<0ool0SOl00`3oo`1fo`003ol500?o00<0ool0 GOl00`3oo`1Bo`030?oo057o00<0ool02Ol0017o00<0ool00ol00`3oo`09o`030?oo03Wo00<0ool0 5Ol00`3oo`1Bo`030?oo03Wo00<0ool05Ol00`3oo`09o`004Ol00`3oo`03o`<02Ol00`3oo`0jo`03 0?oo01Co00<0ool0>_l00`3oo`0Do`030?oo03[o00<0ool05Ol00`3oo`09o`004Ol00`3oo`03o`03 0?oo00So00<0ool0>ol00`3oo`0Do`030?oo03[o00<0ool05?l00`3oo`0ko`030?oo023o000Ao`03 0?oo00?o00<0ool02?l00`3oo`0ko`030?oo057o00<0ool0D_l00`3oo`0Po`004?l200Go00<0ool0 V_l00`3oo`1Xo`030?oo00[o000Go`030?oo05co00<0ool0D_l00`3oo`1Ao`030?oo00[o000Go`03 0?oo00So00<0ool0>ol00`3oo`0Co`030?oo057o00<0ool0??l00`3oo`0Co`030?oo00[o000Go`80 2Ol00`3oo`0lo`030?oo01;o00<0ool0??l00`3oo`0Bo`030?oo03go00<0ool04_l00`3oo`0:o`00 5ol00`3oo`07o`030?oo03go00<0ool04_l00`3oo`0mo`030?oo057o00<0ool07ol001Oo00<0ool0 1ol00`3oo`2Bo`030?oo07?o000Go`030?oo05_o00<0ool0DOl00`3oo`1Bo`030?oo00_o000Go`03 0?oo00Ko00<0ool0?ol00`3oo`0@o`030?oo057o00<0ool0?_l00`3oo`0@o`030?oo00co000Go`80 1ol00`3oo`0oo`030?oo00oo00<0ool0?ol00`3oo`0@o`030?oo03ko00<0ool04?l00`3oo`0o`005ol200Co00<0ool0 AOl00`3oo`0:o`030?oo057o00<0ool0AOl00`3oo`09o`030?oo00oo000Go`030?oo00?o00<0ool0 AOl00`3oo`09o`030?oo04Ko00<0ool02Ol00`3oo`15o`030?oo00Wo00<0ool03ol001Oo00<0ool0 0ol00`3oo`16o`030?oo00So00<0ool0A_l00`3oo`09o`030?oo04Ko00<0ool06_l001Oo00<0ool0 0_l00`3oo`17o`030?oo05;o00<0ool0DOl00`3oo`0Jo`001Ol500;o00<0ool00_l00`3oo`03o`03 0?oo0:7o00<0ool01_l00`3oo`1Bo`030?oo013o0007o`030?oo00Ko00<0o`001?l01@3oool004_o 00<0ool01_l00`3oo`18o`030?oo00Ko00<0ool0BOl00`3oo`05o`030?oo017o0007o`030?oo00So 00<0ool00_l30003o`3o04_o00<0ool01?l00`3oo`1:o`030?oo00Co00<0ool0B_l00`3oo`05o`03 0?oo017o0007o`030?oo00Ko0P05o`040?oo04go00<0ool01?l00`3oo`1;o`030?oo00?o00<0ool0 Bol00`3oo`0Ho`001ol00`3oo`06o`030?oo00Co00@0ool0C_l01@3oool005?o00<0ool0COl00`3o o`0Ho`001_l200So0`04o`030?oo053o101Ao`<0DOl401Go000Go`030?oo0?oo4ol001Oo0P3ooaCo 000Go`030?oo0?oo4ol001Oo00<0ool0oolCo`005ol00`3oo`3ooa?o003oobgo003oobgo003oobgo 003oobgo0000\ \>"], ImageRangeCache->{{{0, 299}, {184, 0}} -> {-1.75247, -1.74184, 0.0744936, 0.0189331}}], Cell[OutputFormData["\<\ Graphics[\"<<>>\"] \ \>", "\<\ -Graphics-\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[TextData[ "NDSolve[ {eq, theta[0]==Pi/2, theta'[0]==0}\n /. g/l -> 1 \ //Flatten, theta, {t,0,20} ] ;"], "Input", PageWidth->Infinity, FontFamily->"Courier New", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[0], Background->GrayLevel[1]], Cell[CellGroupData[{ Cell["plotnon = Plot[ Evaluate[ theta[t] /. % ], {t,0,20} ] ;", "Input", PageWidth->Infinity, FontFamily->"Courier New", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[0], Background->GrayLevel[1]], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.047619 0.309019 0.187357 [ [(5)] .2619 .30902 0 2 Msboxa [(10)] .5 .30902 0 2 Msboxa [(15)] .7381 .30902 0 2 Msboxa [(20)] .97619 .30902 0 2 Msboxa [(-1.5)] .01131 .02798 1 0 Msboxa [(-1)] .01131 .12166 1 0 Msboxa [(-0.5)] .01131 .21534 1 0 Msboxa [(0.5)] .01131 .4027 1 0 Msboxa [(1)] .01131 .49638 1 0 Msboxa [(1.5)] .01131 .59005 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 .61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath [ ] 0 setdash 0 g p p .002 w .2619 .30902 m .2619 .31527 L s P [(5)] .2619 .30902 0 2 Mshowa p .002 w .5 .30902 m .5 .31527 L s P [(10)] .5 .30902 0 2 Mshowa p .002 w .7381 .30902 m .7381 .31527 L s P [(15)] .7381 .30902 0 2 Mshowa p .002 w .97619 .30902 m .97619 .31527 L s P [(20)] .97619 .30902 0 2 Mshowa p .001 w .07143 .30902 m .07143 .31277 L s P p .001 w .11905 .30902 m .11905 .31277 L s P p .001 w .16667 .30902 m .16667 .31277 L s P p .001 w .21429 .30902 m .21429 .31277 L s P p .001 w .30952 .30902 m .30952 .31277 L s P p .001 w .35714 .30902 m .35714 .31277 L s P p .001 w .40476 .30902 m .40476 .31277 L s P p .001 w .45238 .30902 m .45238 .31277 L s P p .001 w .54762 .30902 m .54762 .31277 L s P p .001 w .59524 .30902 m .59524 .31277 L s P p .001 w .64286 .30902 m .64286 .31277 L s P p .001 w .69048 .30902 m .69048 .31277 L s P p .001 w .78571 .30902 m .78571 .31277 L s P p .001 w .83333 .30902 m .83333 .31277 L s P p .001 w .88095 .30902 m .88095 .31277 L s P p .001 w .92857 .30902 m .92857 .31277 L s P p .002 w 0 .30902 m 1 .30902 L s P p .002 w .02381 .02798 m .03006 .02798 L s P [(-1.5)] .01131 .02798 1 0 Mshowa p .002 w .02381 .12166 m .03006 .12166 L s P [(-1)] .01131 .12166 1 0 Mshowa p .002 w .02381 .21534 m .03006 .21534 L s P [(-0.5)] .01131 .21534 1 0 Mshowa p .002 w .02381 .4027 m .03006 .4027 L s P [(0.5)] .01131 .4027 1 0 Mshowa p .002 w .02381 .49638 m .03006 .49638 L s P [(1)] .01131 .49638 1 0 Mshowa p .002 w .02381 .59005 m .03006 .59005 L s P [(1.5)] .01131 .59005 1 0 Mshowa p .001 w .02381 .04672 m .02756 .04672 L s P p .001 w .02381 .06546 m .02756 .06546 L s P p .001 w .02381 .08419 m .02756 .08419 L s P p .001 w .02381 .10293 m .02756 .10293 L s P p .001 w .02381 .1404 m .02756 .1404 L s P p .001 w .02381 .15913 m .02756 .15913 L s P p .001 w .02381 .17787 m .02756 .17787 L s P p .001 w .02381 .19661 m .02756 .19661 L s P p .001 w .02381 .23408 m .02756 .23408 L s P p .001 w .02381 .25281 m .02756 .25281 L s P p .001 w .02381 .27155 m .02756 .27155 L s P p .001 w .02381 .29028 m .02756 .29028 L s P p .001 w .02381 .32775 m .02756 .32775 L s P p .001 w .02381 .34649 m .02756 .34649 L s P p .001 w .02381 .36523 m .02756 .36523 L s P p .001 w .02381 .38396 m .02756 .38396 L s P p .001 w .02381 .42143 m .02756 .42143 L s P p .001 w .02381 .44017 m .02756 .44017 L s P p .001 w .02381 .4589 m .02756 .4589 L s P p .001 w .02381 .47764 m .02756 .47764 L s P p .001 w .02381 .51511 m .02756 .51511 L s P p .001 w .02381 .53385 m .02756 .53385 L s P p .001 w .02381 .55258 m .02756 .55258 L s P p .001 w .02381 .57132 m .02756 .57132 L s P p .001 w .02381 .00925 m .02756 .00925 L s P p .001 w .02381 .60879 m .02756 .60879 L s P p .002 w .02381 0 m .02381 .61803 L s P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath p p p .004 w .02381 .60332 m .02505 .60325 L .02629 .60306 L .02753 .60275 L .02877 .6023 L .03125 .60103 L .03373 .59925 L .03621 .59697 L .03869 .59417 L .04365 .58706 L .04861 .57792 L .05357 .56677 L .06349 .53852 L .08333 .45984 L .10317 .35839 L .14286 .14909 L .15278 .10759 L .1627 .07321 L .17262 .04654 L .17758 .0362 L .18254 .02788 L .1875 .02158 L .18998 .01919 L .19246 .01731 L .19494 .01594 L .19618 .01545 L .19742 .01508 L .19866 .01484 L .1999 .01473 L .20114 .01474 L .20238 .01488 L .20362 .01515 L .20486 .01554 L .2061 .01607 L .20734 .01671 L .20982 .01839 L .2123 .02058 L .21726 .02648 L .22222 .0344 L .23214 .05631 L .24206 .08612 L .2619 .16755 L .30159 .37998 L .32143 .47781 L .33135 .51795 L .34127 .55081 L .34623 .56435 L .35119 .57589 L .35615 .58542 L .36111 .59294 L Mistroke .36359 .59593 L .36607 .59842 L .36855 .6004 L .36979 .60119 L .37103 .60187 L .37227 .60241 L .37351 .60283 L .37475 .60312 L .37599 .60328 L .37723 .60332 L .37847 .60323 L .37971 .60301 L .38095 .60267 L .38343 .6016 L .38467 .60087 L .38591 .60002 L .39087 .59533 L .39335 .59223 L .39583 .58862 L .40079 .57988 L .41071 .55637 L .42063 .52501 L .44048 .44092 L .46032 .33645 L .48016 .22744 L .5 .13162 L .50992 .09289 L .51984 .06155 L .52976 .03807 L .53472 .02935 L .5372 .02575 L .53968 .02266 L .54216 .02007 L .54464 .01799 L .54588 .01714 L .54712 .01642 L .54836 .01583 L .5496 .01536 L .55084 .01502 L .55208 .0148 L .55332 .01472 L .55456 .01476 L .5558 .01493 L .55704 .01522 L .55952 .01619 L .56076 .01687 L .562 .01767 L .56448 .01966 L .56944 .02515 L .5744 .03268 L Mistroke .57937 .04223 L .58929 .06734 L .59921 .10024 L .61905 .1869 L .65873 .40108 L .67857 .49475 L .68849 .53206 L .69841 .56184 L .70337 .57378 L .70833 .58371 L .71329 .59162 L .71825 .5975 L .72073 .59968 L .72197 .60058 L .72321 .60135 L .72445 .60199 L .72569 .60251 L .72693 .6029 L .72817 .60317 L .72941 .6033 L .73065 .60331 L .73189 .60319 L .73313 .60295 L .73438 .60258 L .73562 .60208 L .7381 .6007 L .74058 .59881 L .74306 .59642 L .74802 .5901 L .75298 .58176 L .75794 .5714 L .76786 .5447 L .77778 .51029 L .79762 .42116 L .81746 .31434 L .8373 .20663 L .84722 .15801 L .85714 .11522 L .86706 .07938 L .87698 .05116 L .88194 .04003 L .8869 .03091 L .89187 .02381 L .89435 .02103 L .89683 .01875 L .89931 .01698 L .90055 .01628 L .90179 .01572 L .90303 .01527 L .90427 .01496 L Mistroke .90551 .01477 L .90675 .01472 L .90799 .01478 L .90923 .01498 L .91047 .0153 L .91171 .01575 L .91419 .01703 L .91667 .01881 L .91915 .02111 L .92163 .02391 L .92659 .03104 L .93155 .04019 L .93651 .05136 L .94643 .07964 L .95635 .11554 L .97619 .20704 L Mfstroke P P P % End of Graphics MathPictureEnd\ \>"], "Graphics", PageWidth->Infinity, Evaluatable->False, ImageSize->{300, 185}, ImageMargins->{{100, Inherited}, {Inherited, 0}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgI06JI09VI0IIIVJIIYVII/bII_nIIP3IVFJIVIVIVLbIVOnIV@3Ic6JIc9VIcI ofJIoiVIolbIoonIo`33Pl?3a0@414A4A8B4Qo`030?oo00oo00<0ool0Col00`3oo`0?o`030?oo013o000Go`030?oo02Go00<0ool0 4Ol00`3oo`1=o`030?oo013o00<0ool0C_l00`3oo`0?o`030?oo013o000Go`809_l00`3oo`0Ao`03 0?oo04go00<0ool04?l00`3oo`1=o`030?oo017o00<0ool03ol001Oo00<0ool09?l00`3oo`0Bo`03 0?oo04co00<0ool04Ol00`3oo`1=o`030?oo017o00<0ool03ol001Oo00<0ool09?l00`3oo`0Co`03 0?oo04_o00<0ool04_l00`3oo`1o`005ol00`3oo`0So`030?oo01Go00<0ool0 BOl00`3oo`0Do`030?oo04Wo00<0ool05Ol00`3oo`0=o`005ol00`3oo`0Ro`030?oo01Ko00<0ool0 B?l00`3oo`0Eo`030?oo04Wo00<0ool05Ol00`3oo`0=o`005ol00`3oo`0Ro`030?oo01Ko00<0ool0 B?l00`3oo`0Eo`030?oo04Wo00<0ool05Ol00`3oo`0=o`005ol00`3oo`0Ro`030?oo01Oo00<0ool0 Aol00`3oo`0Fo`030?oo04Oo00<0ool05ol00`3oo`0_l00`3oo`0So`030?oo00Ko000Go`03 0?oo01co00<0ool08ol00`3oo`0jo`030?oo02Co00<0ool0>Ol00`3oo`0Uo`030?oo00Go000Go`03 0?oo01co00<0ool08ol00`3oo`0jo`030?oo02Co00<0ool0>Ol00`3oo`0Uo`030?oo00Go0007o`03 0?oo00;o00<0ool00_l00`3oo`03o`030?oo01co00<0ool08ol00`3oo`0jo`030?oo02Co00<0ool0 >Ol00`3oo`0Uo`030?oo00Go0006o`030?l000Oo00<0o`001?l00`3oo`0Ko`030?oo02Co00<0ool0 >_l00`3oo`0To`030?oo03Wo00<0ool0;Ol00004o`0000;o00<0o`002Ol00`3oo`02o`<06ol00`3o o`0To`030?oo03[o00<0ool09?l00`3oo`0io`030?oo02go0006o`030?l000Oo0P05o`030?oo01_o 00<0ool09Ol00`3oo`0io`030?oo02Go00<0ool0=ol00`3oo`0^o`001_l00`3o0007o`030?oo00Co 00<0ool06ol00`3oo`0Uo`030?oo03So00<0ool09_l00`3oo`0go`030?oo02ko0007o`030?oo00Ko 0`04o`030?oo01_o00<0ool09Ol00`3oo`0ho`030?oo02Ko00<0ool0=ol00`3oo`0^o`005ol00`3o o`0Jo`030?oo02Ko00<0ool0>?l00`3oo`0Vo`030?oo03Oo00<0ool0;_l001Oo0P0Ko`030?oo02Ko 00<0ool0>?l00`3oo`0Vo`030?oo03Oo00<0ool0;_l001Oo00<0ool06_l00`3oo`0Vo`030?oo03So 00<0ool09ol00`3oo`0fo`030?oo02ko000Go`030?oo01[o00<0ool09ol00`3oo`0fo`030?oo02So 00<0ool0=Ol00`3oo`0_o`005ol00`3oo`0Jo`030?oo02Oo00<0ool0=_l00`3oo`0Xo`030?oo03Go 00<0ool0;ol001Oo00<0ool06Ol00`3oo`0Xo`030?oo03Ko00<0ool0:?l00`3oo`0eo`030?oo02oo 000Go`030?oo01Wo00<0ool0:?l00`3oo`0fo`030?oo02So00<0ool0=Ol00`3oo`0_o`005ol201[o 00<0ool0:?l00`3oo`0fo`030?oo02So00<0ool0=Ol00`3oo`0_o`005ol00`3oo`0Io`030?oo02Co 00<0ool00_l00`3oo`0do`030?l000@00_l00`3oo`0Qo`030?oo01Go1@02o`030?oo01Go00<0ool0 8ol300?o00<0ool00ol001Oo00<0ool06?l00`3oo`0To`030?l000?o00<0ool0=?l01@3oool000?o 00<0o`008_l00`3oo`0Go`070?ooo`3o000Eo`030?oo02Co00<0ool00_l00`3o0004o`005ol00`3o o`0Ho`030?oo02Ko00D0oooo000fo`050?ooo`000ol00`3o000Ro`030?oo01Oo00<0ool00ol00`3o o`0Co`030?oo02Go00L0oooo0?l000Co000Go`030?oo01So00<0ool09?l200Co00<0ool0=?l01@3o ool000?o00<0o`008_l00`3oo`0Go`040?ooo`805_l00`3oo`0Uo`070?ooo`3o0004o`005ol201Wo 00<0ool09?l00`3oo`03o`030?oo03Co00D0oooo0003o`030?l002;o00<0ool05ol01@3oool001Oo 00<0ool09?l00`3o0002o`030?l000Co000Go`030?oo01So00<0ool09?l300Co00<0ool0<_l0103o ool200Co00<0ool08_l00`3oo`0Eo`800ol301Go00<0ool09Ol00`3oo`02o`030?oo00?o000Go`03 0?oo01Oo00<0ool0;?l00`3oo`0bo`030?oo02co00<0ool0<_l00`3oo`0`o`005ol00`3oo`0Go`03 0?oo02co00<0ool0<_l00`3oo`0/o`030?oo037o00<0ool0?l00`3oo`0Uo`030?oo03Oo 0006o`030?l000Oo00<0o`001?l00`3oo`0Ao`030?oo03So00<0ool09Ol00`3oo`0io`030?oo02Go 00<0ool0=ol000Ko00<0o`002Ol00`3oo`02o`<04Ol00`3oo`0ho`030?oo02Go00<0ool0>Ol00`3o o`0Uo`030?oo03Oo0006o`030?l000Oo0P05o`030?oo017o00<0ool0>Ol00`3oo`0To`030?oo03Wo 00<0ool09Ol00`3oo`0go`001_l00`3o0007o`030?oo00Co00<0ool04?l00`3oo`0jo`030?oo02Co 00<0ool0>_l00`3oo`0To`030?oo03Oo0007o`030?oo00Ko0`04o`030?oo013o00<0ool0>_l00`3o o`0To`030?oo03[o00<0ool08ol00`3oo`0ho`005ol00`3oo`0@o`030?oo03[o00<0ool08ol00`3o o`0ko`030?oo02?o00<0ool0>?l001Oo0P0Ao`030?oo03[o00<0ool08ol00`3oo`0ko`030?oo02?o 00<0ool0>?l001Oo00<0ool04?l00`3oo`0ko`030?oo02;o00<0ool0??l00`3oo`0Ro`030?oo03So 000Go`030?oo013o00<0ool0>ol00`3oo`0Ro`030?oo03co00<0ool08_l00`3oo`0ho`005ol00`3o o`0?o`030?oo03co00<0ool08_l00`3oo`0lo`030?oo027o00<0ool0>Ol001Oo00<0ool03ol00`3o o`0lo`030?oo027o00<0ool0?Ol00`3oo`0Qo`030?oo03Wo000Go`804?l00`3oo`0mo`030?oo023o 00<0ool0?Ol00`3oo`0Qo`030?oo03Wo000Go`030?oo00oo00<0ool0?Ol00`3oo`0Po`030?oo03ko 00<0ool08?l00`3oo`0io`005ol00`3oo`0?o`030?oo03go00<0ool08?l00`3oo`0no`030?oo023o 00<0ool0>Ol001Oo00<0ool03ol00`3oo`0mo`030?oo023o00<0ool0?_l00`3oo`0Oo`030?oo03[o 000Go`030?oo00ko00<0ool0?_l00`3oo`0Oo`030?oo03oo00<0ool07ol00`3oo`0jo`005ol00`3o o`0>o`030?oo03oo00<0ool07_l00`3oo`10o`030?oo01ko00<0ool0>_l001Oo0P0?o`030?oo03oo 00<0ool07_l00`3oo`10o`030?oo01ko00<0ool0>_l001Oo00<0ool03_l00`3oo`0oo`030?oo01ko 00<0ool0@?l00`3oo`0No`030?oo03[o000Go`030?oo00go00<0ool0@?l00`3oo`0Mo`030?oo047o 00<0ool07Ol00`3oo`0ko`005ol00`3oo`0=o`030?oo047o00<0ool07?l00`3oo`11o`030?oo01go 00<0ool0>ol001Oo00<0ool03Ol00`3oo`11o`030?oo01co00<0ool0@_l00`3oo`0Lo`030?oo03_o 000Go`803_l00`3oo`11o`030?oo01co00<0ool0@_l00`3oo`0Lo`030?oo03_o000Go`030?oo00co 00<0ool0@_l00`3oo`0Lo`030?oo04;o00<0ool07?l00`3oo`0ko`005ol00`3oo`0o`030?oo013o 00<0ool0COl00`3oo`0Ao`030?oo047o000Go`030?oo00Ko00<0ool0C_l00`3oo`0@o`030?oo04go 00<0ool04Ol00`3oo`11o`005ol00`3oo`06o`030?oo04oo00<0ool03ol00`3oo`1>o`030?oo00oo 00<0ool0@_l001Oo00<0ool01Ol00`3oo`1@o`030?oo00ko00<0ool0Col00`3oo`0?o`030?oo04;o 000Go`030?oo00Go00<0ool0D?l00`3oo`0>o`030?oo053o00<0ool03Ol00`3oo`13o`005ol200Ko 00<0ool0DOl00`3oo`0"], ImageRangeCache->{{{0, 299}, {184, 0}} -> {-1.75247, -1.7419, 0.0744936, 0.0189334}}], Cell[OutputFormData["\<\ Graphics[\"<<>>\"] \ \>", "\<\ -Graphics-\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]], Cell[CellGroupData[{ Cell["Show[ plotnon, plotlin] ;", "Input", PageWidth->Infinity], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.047619 0.309019 0.187357 [ [(5)] .2619 .30902 0 2 Msboxa [(10)] .5 .30902 0 2 Msboxa [(15)] .7381 .30902 0 2 Msboxa [(20)] .97619 .30902 0 2 Msboxa [(-1.5)] .01131 .02798 1 0 Msboxa [(-1)] .01131 .12166 1 0 Msboxa [(-0.5)] .01131 .21534 1 0 Msboxa [(0.5)] .01131 .4027 1 0 Msboxa [(1)] .01131 .49638 1 0 Msboxa [(1.5)] .01131 .59005 1 0 Msboxa [ -0.001 -0.001 0 0 ] [ 1.001 .61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath [ ] 0 setdash 0 g p p .002 w .2619 .30902 m .2619 .31527 L s P [(5)] .2619 .30902 0 2 Mshowa p .002 w .5 .30902 m .5 .31527 L s P [(10)] .5 .30902 0 2 Mshowa p .002 w .7381 .30902 m .7381 .31527 L s P [(15)] .7381 .30902 0 2 Mshowa p .002 w .97619 .30902 m .97619 .31527 L s P [(20)] .97619 .30902 0 2 Mshowa p .001 w .07143 .30902 m .07143 .31277 L s P p .001 w .11905 .30902 m .11905 .31277 L s P p .001 w .16667 .30902 m .16667 .31277 L s P p .001 w .21429 .30902 m .21429 .31277 L s P p .001 w .30952 .30902 m .30952 .31277 L s P p .001 w .35714 .30902 m .35714 .31277 L s P p .001 w .40476 .30902 m .40476 .31277 L s P p .001 w .45238 .30902 m .45238 .31277 L s P p .001 w .54762 .30902 m .54762 .31277 L s P p .001 w .59524 .30902 m .59524 .31277 L s P p .001 w .64286 .30902 m .64286 .31277 L s P p .001 w .69048 .30902 m .69048 .31277 L s P p .001 w .78571 .30902 m .78571 .31277 L s P p .001 w .83333 .30902 m .83333 .31277 L s P p .001 w .88095 .30902 m .88095 .31277 L s P p .001 w .92857 .30902 m .92857 .31277 L s P p .002 w 0 .30902 m 1 .30902 L s P p .002 w .02381 .02798 m .03006 .02798 L s P [(-1.5)] .01131 .02798 1 0 Mshowa p .002 w .02381 .12166 m .03006 .12166 L s P [(-1)] .01131 .12166 1 0 Mshowa p .002 w .02381 .21534 m .03006 .21534 L s P [(-0.5)] .01131 .21534 1 0 Mshowa p .002 w .02381 .4027 m .03006 .4027 L s P [(0.5)] .01131 .4027 1 0 Mshowa p .002 w .02381 .49638 m .03006 .49638 L s P [(1)] .01131 .49638 1 0 Mshowa p .002 w .02381 .59005 m .03006 .59005 L s P [(1.5)] .01131 .59005 1 0 Mshowa p .001 w .02381 .04672 m .02756 .04672 L s P p .001 w .02381 .06546 m .02756 .06546 L s P p .001 w .02381 .08419 m .02756 .08419 L s P p .001 w .02381 .10293 m .02756 .10293 L s P p .001 w .02381 .1404 m .02756 .1404 L s P p .001 w .02381 .15913 m .02756 .15913 L s P p .001 w .02381 .17787 m .02756 .17787 L s P p .001 w .02381 .19661 m .02756 .19661 L s P p .001 w .02381 .23408 m .02756 .23408 L s P p .001 w .02381 .25281 m .02756 .25281 L s P p .001 w .02381 .27155 m .02756 .27155 L s P p .001 w .02381 .29028 m .02756 .29028 L s P p .001 w .02381 .32775 m .02756 .32775 L s P p .001 w .02381 .34649 m .02756 .34649 L s P p .001 w .02381 .36523 m .02756 .36523 L s P p .001 w .02381 .38396 m .02756 .38396 L s P p .001 w .02381 .42143 m .02756 .42143 L s P p .001 w .02381 .44017 m .02756 .44017 L s P p .001 w .02381 .4589 m .02756 .4589 L s P p .001 w .02381 .47764 m .02756 .47764 L s P p .001 w .02381 .51511 m .02756 .51511 L s P p .001 w .02381 .53385 m .02756 .53385 L s P p .001 w .02381 .55258 m .02756 .55258 L s P p .001 w .02381 .57132 m .02756 .57132 L s P p .001 w .02381 .00925 m .02756 .00925 L s P p .001 w .02381 .60879 m .02756 .60879 L s P p .002 w .02381 0 m .02381 .61803 L s P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath p p p p .004 w .02381 .60332 m .02505 .60325 L .02629 .60306 L .02753 .60275 L .02877 .6023 L .03125 .60103 L .03373 .59925 L .03621 .59697 L .03869 .59417 L .04365 .58706 L .04861 .57792 L .05357 .56677 L .06349 .53852 L .08333 .45984 L .10317 .35839 L .14286 .14909 L .15278 .10759 L .1627 .07321 L .17262 .04654 L .17758 .0362 L .18254 .02788 L .1875 .02158 L .18998 .01919 L .19246 .01731 L .19494 .01594 L .19618 .01545 L .19742 .01508 L .19866 .01484 L .1999 .01473 L .20114 .01474 L .20238 .01488 L .20362 .01515 L .20486 .01554 L .2061 .01607 L .20734 .01671 L .20982 .01839 L .2123 .02058 L .21726 .02648 L .22222 .0344 L .23214 .05631 L .24206 .08612 L .2619 .16755 L .30159 .37998 L .32143 .47781 L .33135 .51795 L .34127 .55081 L .34623 .56435 L .35119 .57589 L .35615 .58542 L .36111 .59294 L Mistroke .36359 .59593 L .36607 .59842 L .36855 .6004 L .36979 .60119 L .37103 .60187 L .37227 .60241 L .37351 .60283 L .37475 .60312 L .37599 .60328 L .37723 .60332 L .37847 .60323 L .37971 .60301 L .38095 .60267 L .38343 .6016 L .38467 .60087 L .38591 .60002 L .39087 .59533 L .39335 .59223 L .39583 .58862 L .40079 .57988 L .41071 .55637 L .42063 .52501 L .44048 .44092 L .46032 .33645 L .48016 .22744 L .5 .13162 L .50992 .09289 L .51984 .06155 L .52976 .03807 L .53472 .02935 L .5372 .02575 L .53968 .02266 L .54216 .02007 L .54464 .01799 L .54588 .01714 L .54712 .01642 L .54836 .01583 L .5496 .01536 L .55084 .01502 L .55208 .0148 L .55332 .01472 L .55456 .01476 L .5558 .01493 L .55704 .01522 L .55952 .01619 L .56076 .01687 L .562 .01767 L .56448 .01966 L .56944 .02515 L .5744 .03268 L Mistroke .57937 .04223 L .58929 .06734 L .59921 .10024 L .61905 .1869 L .65873 .40108 L .67857 .49475 L .68849 .53206 L .69841 .56184 L .70337 .57378 L .70833 .58371 L .71329 .59162 L .71825 .5975 L .72073 .59968 L .72197 .60058 L .72321 .60135 L .72445 .60199 L .72569 .60251 L .72693 .6029 L .72817 .60317 L .72941 .6033 L .73065 .60331 L .73189 .60319 L .73313 .60295 L .73438 .60258 L .73562 .60208 L .7381 .6007 L .74058 .59881 L .74306 .59642 L .74802 .5901 L .75298 .58176 L .75794 .5714 L .76786 .5447 L .77778 .51029 L .79762 .42116 L .81746 .31434 L .8373 .20663 L .84722 .15801 L .85714 .11522 L .86706 .07938 L .87698 .05116 L .88194 .04003 L .8869 .03091 L .89187 .02381 L .89435 .02103 L .89683 .01875 L .89931 .01698 L .90055 .01628 L .90179 .01572 L .90303 .01527 L .90427 .01496 L Mistroke .90551 .01477 L .90675 .01472 L .90799 .01478 L .90923 .01498 L .91047 .0153 L .91171 .01575 L .91419 .01703 L .91667 .01881 L .91915 .02111 L .92163 .02391 L .92659 .03104 L .93155 .04019 L .93651 .05136 L .94643 .07964 L .95635 .11554 L .97619 .20704 L Mfstroke P P P p p [ .01 .01 ] 0 setdash p .004 w .02381 .60332 m .02505 .60322 L .02629 .60292 L .02753 .60242 L .02877 .60172 L .03125 .59973 L .03373 .59695 L .03869 .58907 L .04365 .57814 L .05357 .54768 L .06349 .50691 L .10317 .28085 L .12302 .1647 L .13294 .11477 L .14286 .07324 L .14782 .05621 L .15278 .04191 L .15774 .03051 L .16022 .02594 L .1627 .02213 L .16518 .01911 L .16642 .01789 L .16766 .01686 L .1689 .01604 L .17014 .01542 L .17138 .01499 L .17262 .01476 L .17386 .01474 L .1751 .01491 L .17634 .01528 L .17758 .01585 L .18006 .01759 L .1813 .01875 L .18254 .02012 L .1875 .02751 L .19246 .03796 L .20238 .06753 L .2123 .10754 L .22222 .15627 L .2619 .3925 L .28175 .49957 L .29167 .54184 L .29663 .55929 L .30159 .57404 L .30655 .58591 L .31151 .59477 L .31399 .59805 L .31523 .5994 L .31647 .60054 L .31771 .60149 L Mistroke .31895 .60225 L .32019 .6028 L .32143 .60315 L .32267 .60331 L .32391 .60326 L .32515 .60302 L .32639 .60257 L .32763 .60193 L .32887 .60109 L .33135 .59881 L .33383 .59575 L .33631 .59191 L .34127 .58194 L .34623 .56901 L .35119 .55326 L .36111 .51402 L .38095 .41103 L .42063 .17329 L .43056 .12221 L .44048 .07922 L .4504 .04616 L .45536 .03383 L .45784 .02877 L .46032 .02447 L .4628 .02095 L .46528 .01821 L .46652 .01713 L .46776 .01625 L .469 .01557 L .47024 .01509 L .47148 .01481 L .47272 .01473 L .47396 .01484 L .4752 .01516 L .47644 .01568 L .47768 .01639 L .48016 .01842 L .48264 .02123 L .48512 .02482 L .49008 .03431 L .49504 .04678 L .5 .06209 L .51984 .14801 L .53968 .26148 L .55952 .38309 L .57937 .49202 L .58929 .53573 L .59425 .55402 L .59921 .56964 L .60417 .58244 L Mistroke .60913 .59228 L .61161 .59605 L .61409 .59904 L .61657 .60125 L .61781 .60205 L .61905 .60266 L .62029 .60307 L .62153 .60328 L .62277 .60329 L .62401 .6031 L .62525 .60271 L .62649 .60212 L .62773 .60133 L .62897 .60035 L .63145 .59779 L .63393 .59444 L .63889 .58544 L .64385 .57344 L .64881 .55857 L .65873 .52091 L .67857 .42013 L .69841 .30034 L .71825 .18203 L .72817 .12986 L .7381 .08545 L .74306 .06676 L .74802 .0507 L .75298 .03744 L .75546 .03191 L .75794 .02713 L .76042 .02311 L .7629 .01987 L .76414 .01854 L .76538 .01741 L .76662 .01648 L .76786 .01574 L .7691 .01521 L .77034 .01487 L .77158 .01473 L .77282 .0148 L .77406 .01506 L .7753 .01552 L .77654 .01618 L .77778 .01704 L .78026 .01935 L .78274 .02245 L .78522 .02632 L .7877 .03097 L .79762 .05692 L .80754 .09377 L Mistroke .81746 .13993 L .85714 .3736 L .87698 .48427 L .8869 .52938 L .89187 .54847 L .89683 .56496 L .90179 .57868 L .90675 .58947 L .90923 .59373 L .91171 .59722 L .91419 .59993 L .91543 .60099 L .91667 .60185 L .91791 .60251 L .91915 .60297 L .92039 .60324 L .92163 .6033 L .92287 .60317 L .92411 .60283 L .92535 .6023 L .92659 .60157 L .92907 .59951 L .93155 .59666 L .93403 .59303 L .93651 .58863 L .94643 .56361 L .95139 .54688 L .95635 .52757 L .97619 .42911 L Mfstroke P P P P % End of Graphics MathPictureEnd\ \>"], "Graphics", PageWidth->Infinity, Evaluatable->False, ImageSize->{300, 185}, ImageMargins->{{100, Inherited}, {Inherited, 0}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgI06JI09VI0IIIVJIIYVII/bII_nIIP3IVFJIVIVIVLbIVOnIV@3Ic6JIc9VIcI ofJIoiVIolbIoonIo`33Pl?3a0@414A4A8B4Qol00`3oo`0:o`03 0?oo00Ko00<0ool03Ol00`3oo`0/o`030?oo00Wo00<0ool05Ol00`3oo`0=o`030?oo017o000Go`03 0?oo023o00<0ool01?l00`3oo`04o`030?oo00Oo00<0ool0Aol00`3oo`05o`030?oo00ko00<0ool0 >Ol00`3oo`0Do`030?oo00go00<0ool04Ol001Oo00<0ool09_l00`3oo`0?o`030?oo04oo00<0ool0 3_l00`3oo`0[o`030?oo00_o00<0ool05?l00`3oo`0=o`030?oo017o000Go`030?oo02Ko00<0ool0 1_l00`3oo`06o`030?oo03Wo00<0ool04_l00`3oo`0?o`030?oo02_o00<0ool08Ol00`3oo`0?o`03 0?oo013o000Go`030?oo023o00<0ool00_l00`3oo`07o`030?oo00Oo00<0ool0=ol00`3oo`0=o`03 0?oo00?o00<0ool04?l00`3oo`0Yo`030?oo02;o00<0ool03ol00`3oo`0@o`005ol2023o00<0ool0 0ol00`3oo`07o`030?oo00Oo00<0ool0=ol00`3oo`0=o`030?oo00?o00<0ool04?l00`3oo`0Yo`03 0?oo00go00<0ool04Ol00`3oo`0Ao`030?oo00oo000Go`030?oo01oo00<0ool00_l00`3oo`08o`03 0?oo00Oo00<0ool0B?l01@3oool001?o00<0ool0>Ol00`3oo`0Ao`030?oo017o00<0ool03ol001Oo 00<0ool09?l00`3oo`0Co`030?oo04Oo00D0oooo000Do`030?oo03So00<0ool04Ol00`3oo`0Ao`03 0?oo00oo000Go`030?oo02Co00<0ool04ol00`3oo`0fo`030?oo01;o00<0ool04_l00`3oo`0Wo`03 0?oo027o00<0ool04ol00`3oo`0>o`005ol00`3oo`0No`030?oo00;o00<0ool02_l00`3oo`07o`03 0?oo03Go00<0ool04_l00`3oo`0Co`030?oo02Ko00<0ool08_l00`3oo`0Co`030?oo00ko000Go`80 7ol00`3oo`02o`030?oo00_o00<0ool01ol00`3oo`0do`030?oo013o00<0o`005_l00`3oo`0Uo`03 0?oo013o00<0ool03ol00`3oo`0Co`030?oo00ko000Go`030?oo01go00<0ool00ol00`3oo`0;o`03 0?oo00Oo00<0ool0=?l00`3oo`0@o`030?l001Ko00<0ool0>?l00`3oo`0>o`030?oo01Go00<0ool0 3Ol001Oo00<0ool07Ol00`3oo`02o`030?oo01Ko00<0ool0Aol201Oo00<0ool0>Ol00`3oo`0=o`03 0?oo01Go00<0ool03Ol001Oo00<0ool08_l00`3oo`0Fo`030?oo04So00<0ool05Ol00`3oo`0Uo`03 0?oo017o00<0ool03Ol00`3oo`0Eo`030?oo00go000Go`030?oo01go00<0ool00_l00`3oo`0o`030?oo00Oo00<0ool0<_l00`3oo`0Ao`806?l00`3oo`0So`030?oo01?o00<0ool0 2ol00`3oo`0Go`030?oo00co000Go`030?oo01co00<0ool00_l00`3oo`0>o`030?oo00Oo00<0ool0 A_l201Wo00<0ool0>?l00`3oo`0;o`030?oo01Oo00<0ool03?l001Oo00<0ool08Ol00`3oo`0Io`03 0?oo04Co00<0o`006Ol00`3oo`15o`030?oo01Wo00<0ool02ol000oo1@03o`030?oo027o00<0ool0 6Ol00`3oo`0`o`030?oo017o00<0ool06Ol00`3oo`0Ro`030?oo023o00<0ool06Ol00`3oo`0;o`00 4Ol00`3oo`03o`030?oo01co00D0oooo000Bo`030?oo00Oo00<0ool0?l00`3oo`06o`030?oo01go00<0ool02Ol001Oo00<0ool07ol00`3oo`0Mo`03 0?oo043o00<0ool01?l00`3oo`0Go`030?oo03oo00<0ool07_l00`3oo`09o`005ol00`3oo`0Oo`03 0?oo01go00<0ool0;?l00`3oo`0Ao`030?oo01ko00<0ool07?l00`3oo`0Po`030?oo01oo00<0ool0 2?l001Oo0P0Jo`030?oo00;o00<0ool05?l00`3oo`07o`030?oo02co00<0ool04Ol00`3oo`0No`03 0?oo01co00<0ool06Ol00`3oo`04o`030?oo01oo00<0ool02?l001Oo00<0ool06Ol00`3oo`02o`03 0?oo01Co00<0ool02?l00`3oo`0Zo`030?oo017o00<0ool01Ol00`3oo`0Go`030?oo01co00<0ool0 6Ol00`3oo`04o`030?oo01oo00<0ool02?l001Oo00<0ool06Ol00`3oo`02o`030?oo01Co00<0ool0 2?l00`3oo`0Zo`030?oo017o00<0ool01_l00`3oo`0Go`030?oo03Oo00<0ool01?l00`3oo`0Oo`03 0?oo00So000Go`030?oo01Wo00<0ool00_l00`3oo`0Oo`030?oo03ko00<0ool01_l00`3oo`0Go`03 0?oo03Oo00<0ool00ol00`3oo`0Po`030?oo00So000Go`030?oo01ko00<0ool07ol00`3oo`0no`03 0?oo023o00<0ool06_l00`3oo`0Po`030?oo027o00<0ool01ol001Oo00<0ool07Ol00`3oo`0Fo`03 0?oo00Oo00<0ool0:_l00`3oo`0Ao`030?oo023o00<0ool06_l00`3oo`0Ko`030?oo00;o00<0ool0 8Ol00`3oo`07o`005ol201Wo00<0ool00_l00`3oo`0Fo`030?oo00So00<0ool0:?l00`3oo`0Ao`03 0?oo00Oo00<0ool06?l00`3oo`0Io`030?oo01_o00<0ool00_l00`3oo`0Qo`030?oo00Oo000Go`03 0?oo01So00<0ool00_l00`3oo`0Fo`030?oo00So00<0ool0:?l00`3oo`0Ao`030?oo00Oo00<0ool0 6?l00`3oo`0Io`030?oo01_o00D0oooo000To`030?oo00Oo000Go`030?oo01So00<0ool00_l00`3o o`0Fo`030?oo00So00<0ool0??l00`3oo`08o`030?oo01Oo00<0ool0=ol01@3oool002Go00<0ool0 1_l001Oo00<0ool07Ol00`3oo`0Qo`030?oo03co00<0ool02?l00`3oo`0Go`030?oo03_o00<0ool0 8ol00`3oo`06o`005ol00`3oo`0Lo`030?oo02;o00<0ool0:?l00`3oo`0Ao`030?oo02;o00<0ool0 6?l00`3oo`0Po`030?oo02?o00<0ool01_l001Oo0P0Ho`030?oo00;o00<0ool06?l00`3oo`07o`03 0?oo02So00<0ool04Ol00`3oo`0So`030?oo01Oo00<0ool07?l01@3oool002Go00<0ool01_l001Oo 00<0ool05ol00`3oo`02o`030?oo01So00<0ool02?l00`3oo`0Vo`030?oo017o00<0ool02Ol00`3o o`0Ho`030?oo01Oo00<0ool07?l0103oo`0Wo`030?oo00Go000Go`030?oo01Oo00<0ool00_l00`3o o`0Ho`030?oo00So00<0ool09_l00`3oo`0Ao`030?oo00Wo00<0ool06?l00`3oo`0Go`030?oo01go 00<0o`009ol00`3oo`05o`001ol00`3oo`02o`030?oo00;o00<0ool00ol00`3oo`0Go`030?oo00;o 00<0ool06?l00`3oo`08o`030?oo03[o00<0ool02_l00`3oo`0Go`030?oo03Oo00<0o`009ol00`3o o`05o`001_l00`3o0007o`030?l000Co00<0ool06ol00`3oo`0To`030?oo03[o00<0ool02_l00`3o o`0Go`030?oo01Ko00<0ool08?l00`3oo`0]o`0000Co00000_l00`3o0009o`030?oo00;o0`0Ko`03 0?oo01[o00<0ool01ol00`3oo`0Vo`030?oo017o00<0ool09?l00`3oo`0Fo`030?oo01ko00<0o`00 ;ol000Ko00<0o`001ol200Go00<0ool05_l00`3oo`02o`030?oo01[o00<0ool02?l00`3oo`0To`03 0?oo01;o00<0ool02_l00`3oo`0Ho`030?oo01Go00<0ool07_l2033o0006o`030?l000Oo00<0ool0 1?l00`3oo`0Fo`030?oo00;o00<0ool06_l00`3oo`08o`030?oo02Co00<0ool04Ol00`3oo`0;o`03 0?oo01So00<0ool05Ol00`3oo`0Oo`030?oo02ko0007o`030?oo00Ko0`04o`030?oo01Ko00<0ool0 0_l00`3oo`0Jo`030?oo00So00<0ool0>?l00`3oo`0?l00`3oo`0o`030?oo01oo00<0ool0o`050?ooo`00;Ol00`3o o`08o`030?oo01Go00<0ool03ol00`3oo`0Lo`030?oo01So00<0ool01Ol00`3oo`0Oo`030?oo00co 00<0ool09ol001Oo0P0?o`050?ooo`00;Ol00`3oo`08o`030?oo02Oo00<0ool07?l00`3oo`0Ho`03 0?oo02Oo00<0ool03?l00`3oo`0Wo`005ol00`3oo`0Ao`030?oo03Oo00<0ool09ol00`3oo`0Lo`03 0?oo01So00<0ool01Ol00`3oo`0Oo`030?oo03Ko000Go`030?oo017o00<0ool0;?l00`3oo`09o`03 0?oo01Co00<0ool03ol00`3oo`0ho`030?oo00Co00<0ool07ol00`3oo`0fo`001ol00`3oo`02o`03 0?oo00;o00<0ool00ol00`3oo`0>o`040?oo02ko00<0ool02Ol00`3oo`0Do`030?oo00oo00<0ool0 7Ol00`3oo`0Ho`030?oo00Co00<0ool07_l00`3oo`0>o`030?oo02Ko0006o`030?l000Oo00<0o`00 1?l00`3oo`0=o`050?ooo`00;ol00`3oo`08o`030?oo01?o00<0ool03ol00`3oo`0No`030?oo01So 00<0ool01?l00`3oo`0No`030?oo00ko00<0ool09_l000Ko00<0o`002Ol00`3oo`02o`<03Ol01@3o ool002oo00<0ool02?l00`3oo`0Co`030?oo00oo00<0ool07_l00`3oo`0Ho`030?oo02Go00<0ool0 3_l00`3oo`0Vo`001_l00`3o0007o`801Ol00`3oo`0Ao`030?oo03Wo00<0ool09?l00`3oo`0No`03 0?oo01So00<0ool09Ol00`3oo`0go`001_l00`3o0007o`030?oo00Co00<0ool04?l00`3oo`0jo`03 0?oo01;o00<0ool03ol00`3oo`0jo`030?oo00;o00<0ool07ol00`3oo`0go`001ol00`3oo`06o`<0 1?l00`3oo`0=o`040?oo033o00<0ool02Ol00`3oo`0Bo`030?oo00oo00<0ool0>_l00`3oo`02o`03 0?oo01ko00<0ool04?l00`3oo`0Uo`005ol00`3oo`0=o`040?oo033o00<0ool02Ol00`3oo`0Ao`03 0?oo00oo00<0ool08?l00`3oo`0Ho`030?oo00;o00<0ool07_l00`3oo`0@o`030?oo02Go000Go`80 3Ol01@3oool0037o00<0ool02?l00`3oo`0Ao`030?oo00oo00<0ool08?l00`3oo`0Ho`030?oo00;o 00<0ool07_l00`3oo`0@o`030?oo02Go000Go`030?oo00co00D0oooo000ao`030?oo00Wo00<0ool0 8_l00`3oo`0Po`030?oo01Wo00<0ool08_l00`3oo`0@o`030?oo02Go000Go`030?oo013o00<0ool0 >ol00`3oo`0Ro`030?oo023o00<0ool06Ol00`3oo`0Ro`030?oo033o00<0ool01Ol001Oo00<0ool0 3ol00`3oo`0lo`030?oo013o00<0ool03ol00`3oo`0lo`040?oo023o00<0ool0Ol001Oo00<0ool03ol00`3oo`0mo`030?oo00ko00<0ool0 3ol00`3oo`0no`808?l00`3oo`0`o`030?oo00Oo000Go`030?oo00_o00@0ool0=?l00`3oo`09o`03 0?oo00ko00<0ool03_l00`3oo`0oo`808?l00`3oo`0Do`030?oo01Wo00<0ool01ol001Oo00<0ool0 2ol0103oo`0do`030?oo00[o00<0ool03?l00`3oo`0?o`030?oo02Co00<0ool06?l2023o00<0ool0 5?l00`3oo`0Io`030?oo00Oo000Go`802ol01@3oool003Go00<0ool02Ol00`3oo`0_l00`3oo`0:o`030?oo01So00<0ool0:Ol00`3oo`0Io`030?oo01Wo00<0ool06_l00`3oo`0Po`00 4?l200Go00<0ool02_l00`3oo`16o`030?oo01So00<0ool0:Ol00`3oo`0Jo`030?oo01So00<0ool0 o`005ol200Co00<0o`00AOl00`3oo`0:o`803_l00`3oo`11o`03 0?oo00go00<0ool03Ol00`3oo`0Uo`030?oo00Wo00<0ool03ol001Oo00<0ool00ol204Ko00<0ool0 2Ol00`3o000>o`030?oo03Go00<0ool02Ol00`3oo`0>o`030?oo00co00<0ool09Ol00`3oo`09o`03 0?oo00oo000Go`030?oo00?o0P17o`030?oo00So00<0o`003Ol00`3oo`0fo`030?oo00Wo00<0ool0 3_l00`3oo`0;o`030?oo02Oo00<0ool06_l001Oo00<0ool00_l00`3o0017o`030?oo00_o00<0ool0 2_l00`3oo`0go`030?oo01[o00<0ool02_l00`3oo`0Wo`030?oo01[o0005o`D00_l00`3oo`02o`03 0?oo00?o00<0ool00ol00`3oo`1Eo`030?oo00So00<0ool0>?l00`3oo`06o`030?oo017o00<0ool0 2Ol00`3oo`0bo`030?oo013o0007o`030?oo00Ko00<0o`001?l01`3oool0o`00BOl00`3oo`06o`03 0?oo00;o00<0ool02?l00`3oo`0ho`030?oo00Ko00<0ool04_l00`3oo`08o`030?oo02Wo00<0ool0 1Ol00`3oo`0Ao`001ol00`3oo`08o`030?oo00;o0`000ol0001;o`030?oo00Co00<0ool01?l00`3o o`06o`030?oo03[o00<0ool01?l00`3oo`0Co`030?oo00Oo00<0ool0:_l00`3oo`05o`030?oo017o 0007o`030?oo00Ko0P05o`030?oo0080C?l00`3oo`04o`030?oo00Co0P07o`030?oo03_o00<0ool0 0ol00`3oo`0Do`030?oo00Go00<0ool0;?l00`3oo`0Ho`001ol00`3oo`06o`030?oo00Co00<0ool0 0P1=o`050?ooo`002_l00`3oo`03o`030?oo043o00<0ool05ol00`3oo`03o`80;_l00`3oo`0Ho`00 1_l200So0`04o`<0D?l400[o1P11o`<06_l503;o100Eo`005ol00`3oo`3ooa?o000Go`80oolDo`00 5ol00`3oo`3ooa?o000Go`030?oo0?oo4ol001Oo00<0ool0oolCo`00ool]o`00ool]o`00ool]o`00 ool]o`00\ \>"], ImageRangeCache->{{{0, 299}, {184, 0}} -> {-1.75247, -1.7419, 0.0744936, 0.0189334}}], Cell[OutputFormData["\<\ Graphics[\"<<>>\"] \ \>", "\<\ -Graphics-\ \>"], "Output", PageWidth->Infinity, Evaluatable->False] }, Open ]] }, FrontEndVersion->"Microsoft Windows 3.0", ScreenRectangle->{{0, 1024}, {0, 740}}, WindowToolbars->{}, CellGrouping->Manual, WindowSize->{480, 433}, WindowMargins->{{16, Automatic}, {Automatic, 5}}, PrivateNotebookOptions->{"ColorPalette"->{RGBColor, -1}}, ShowCellLabel->True, ShowCellTags->False, RenderingOptions->{"ObjectDithering"->True, "RasterDithering"->False}, StyleDefinitions -> "Report.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[1709, 49, 50, 1, 46, "Text"], Cell[1762, 52, 53, 1, 67, "Section"], Cell[1818, 55, 50, 1, 46, "Text"], Cell[1871, 58, 50, 1, 46, "Text"], Cell[CellGroupData[{ Cell[1946, 63, 85, 1, 35, "Input"], Cell[2034, 66, 209, 10, 68, "Output"] }, Open ]], Cell[2258, 79, 137, 3, 53, "Input"], Cell[CellGroupData[{ Cell[2420, 86, 91, 1, 35, "Input"], Cell[2514, 89, 145, 8, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[2696, 102, 160, 3, 48, "Input"], Cell[2859, 107, 153, 9, 38, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[3049, 121, 61, 1, 30, "Input"], Cell[3113, 124, 233, 10, 38, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[3383, 139, 73, 1, 30, "Input"], Cell[3459, 142, 228, 10, 38, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[3724, 157, 87, 1, 30, "Input"], Cell[3814, 160, 209, 10, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[4060, 175, 53, 1, 30, "Input"], Cell[4116, 178, 420, 12, 44, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[4573, 195, 54, 1, 30, "Input"], Cell[4630, 198, 420, 12, 44, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[5087, 215, 52, 1, 30, "Input"], Cell[5142, 218, 290, 10, 34, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[5469, 233, 52, 1, 30, "Input"], Cell[5524, 236, 798, 20, 84, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[6359, 261, 56, 1, 30, "Input"], Cell[6418, 264, 420, 12, 44, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[6875, 281, 85, 1, 30, "Input"], Cell[6963, 284, 275, 11, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7275, 300, 70, 1, 30, "Input"], Cell[7348, 303, 191, 10, 48, "Output"] }, Open ]], Cell[7554, 316, 156, 3, 48, "Input"], Cell[CellGroupData[{ Cell[7735, 323, 154, 4, 48, "Input"], Cell[7892, 329, 19461, 731, 193, 6387, 564, "GraphicsData", "PostScript", "Graphics"], Cell[27356, 1062, 129, 8, 28, "Output"] }, Open ]], Cell[27500, 1073, 272, 8, 64, "Input"], Cell[CellGroupData[{ Cell[27797, 1085, 217, 6, 46, "Input"], Cell[28017, 1093, 20968, 738, 193, 6166, 550, "GraphicsData", "PostScript", "Graphics"], Cell[48988, 1833, 129, 8, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[49154, 1846, 65, 1, 30, "Input"], Cell[49222, 1849, 30086, 1008, 193, 9079, 743, "GraphicsData", "PostScript", "Graphics"], Cell[79311, 2859, 129, 8, 28, "Output"] }, Open ]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)