{VERSION 4 0 "IBM INTEL NT" "4.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Input" 2 19 "" 0 1 255 0 0 1 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "" -1 256 "" 1 16 108 191 108 0 0 1 0 0 0 0 0 0 0 1 }{CSTYLE " " -1 257 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 261 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{PSTYLE "Normal " -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 " Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple O utput" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT 256 13 "Lorentz force" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 836 "We simulate the \+ motion of a charged particle exposed to an electric and magnetic field . The situation corresponds to that encountered in a vacuum tube with \+ a long filament surrounded by a cylindrical anode with a solenoid plac ed on top. This is more complicated than the usual discussion of a cha rged particle with constant velocity (acquired, e.g., upon acceleratio n in an electric field) entering a homogeneous magnetic field (circula r trajectory) or an electric field aligned with the magnetic field (he lical motion as a result of independent influence of the fields on the position variables). In this example the motion is confined to a plan e, the particles are accelerated by an electric field acting in the ra dial direction. Once they acquire a non-zero velocity the Lorentz forc e deflects the particle away from the radial path." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 481 "The Verlet algorithm use d for the Coulomb problem requires a modification to account for the v elocity dependence of the Lorentz force. The equations of motion are w ritten in Cartesian coordinates (E and B are the magnitudes of the ele ctric field acting in the radial direction and the magnetic field acti ng in the z direction respectively). The radial dependence of the elec tric field strength was determined from a solution to the Laplace equa tion in cylindrical coordinates (see " }{TEXT 19 11 "Laplace.mws" } {TEXT -1 23 "), or from Gauss' law (" }{TEXT 19 9 "Gauss.mws" }{TEXT -1 2 ")." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 258 1 "m" }{TEXT -1 18 " diff(x(t),t$2) = " }{TEXT 260 1 "q" }{TEXT -1 35 " [E*x(t)/(x(t)^2+y(t)^2) + vy(t)*B]" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 259 1 "m" }{TEXT -1 18 " diff(y(t),t$2) = " } {TEXT 261 1 "q" }{TEXT -1 35 " [E*y(t)/(x(t)^2+y(t)^2) - vx(t)*B]" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected names norm and trace have bee n redefined and unprotected\n" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 73 " The Cartesian components for the Lorentz force are calculated as follo ws:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "v:=vector([vx,vy,vz] );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"vG-%'vectorG6#7%%#vxG%#vyG%# vzG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "Bf:=vector([Bx,By,Bz ]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#BfG-%'vectorG6#7%%#BxG%#ByG% #BzG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "crossprod(v,Bf);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vectorG6#7%,&*&%#vyG\"\"\"%#BzGF*F **&%#vzGF*%#ByGF*!\"\",&*&F-F*%#BxGF*F**&%#vxGF*F+F*F/,&*&F4F*F.F*F**& F)F*F2F*F/" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 77 "Now we restrict the homogeneous magnetic field to be aligned with the z axis:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "subs(Bx=0,By=0,%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vectorG6#7%*&%#vyG\"\"\"%#BzGF),$*&%#vxGF)F*F)! \"\"\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 43 "We choose the mass ( units) and charge sign:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " m:=1; q:=-1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"mG\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"qG!\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 131 "We worry about the step-size for small distances r as th e force is inversely proportional to r. We should try various small va lues." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "dt:=0.05; dt2:=dt^ 2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dtG$\"\"&!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$dt2G$\"#D!\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "vx0:=0; vy0:=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% $vx0G\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$vy0G\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 181 "We have to start the trajectories at a f inite distance (filament thickness or larger). We can also choose fini te initial velocities (they depend on the temperature of the filament) ." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 60 "Let' s measure distances in multiples of the filament radius." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "rx[0]:=1; rx[1]:=rx[0]+dt*vx0;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#rxG6#\"\"!\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#rxG6#\"\"\"$F'\"\"!" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 30 "ry[0]:=1; ry[1]:=ry[0]+dt*vy0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#ryG6#\"\"!\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>&%#ryG6#\"\"\"$F'\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "E:='E'; B:='B';" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"EGF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BGF$" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 178 "The electric field varies with distance according to the follo wing functions. To obtain the electric force one needs to multiply wit h the charge of the probe particle (electron)." }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 17 "Ex:=-x/(x^2+y^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#ExG,$*&%\"xG\"\"\",&*$)F'\"\"#F(F(*$)%\"yGF,F(F(!\" \"F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "Ey:=-y/(x^2+y^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#EyG,$*&%\"yG\"\"\",&*$)%\"xG\"\"# F(F(*$)F'F-F(F(!\"\"F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "V erlet:=proc(n1,E0,B0) local Fx,Fy,vx,vy; global rx,ry,dt,dt2,m,q,Ex,Ey ;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "vx:=(rx[n1]-rx[n1-1])/dt; vy:= (ry[n1]-ry[n1-1])/dt;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "Fx:=evalf( q*subs(x=rx[n1],y=ry[n1],E0*Ex)+q*B0*vy);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "Fy:=evalf(q*subs(x=rx[n1],y=ry[n1],E0*Ey)-q*B0*vx);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "rx[n1+1]:=2*rx[n1]-rx[n1-1]+dt2/m *Fx;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "ry[n1+1]:=2*ry[n1]-ry[n1-1] +dt2/m*Fy;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "N:=200;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>%\"NG\"$+#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from \+ 1 to N do:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "Verlet(i,1,2); od:" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "nops(convert(rx,list));" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#\"$-#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "rx[40],ry[40];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\" +%zs)fa!#5$\"+7$>4u\"!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "plot([seq([rx[i],ry[i]],i=0..N)],style=point,scaling=constrained); " }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$ 7ew7$$\"\"\"\"\"!F(F'7$$\"3(**********\\7+\"!#3d8-\"F.$\"3-+++zU0I5F.7$$\"3-+++\"G1q-\"F.$\"3)*******Rb'3/\"F.7$ $\"33+++q^xK5F.$\"3/+++T(eM0\"F.7$$\"3(******H2r%Q5F.$\"3#******R#*Qy1 \"F.7$$\"36+++\"4**Q/\"F.$\"31+++A>*R3\"F.7$$\"3%******f8k)[5F.$\"34++ +1V)=5\"F.7$$\"3++++&)H<`5F.$\"30+++7NY@6F.7$$\"31+++Kjjc5F.$\"3/+++a \"eE9\"F.7$$\"3%******H\"32f5F.$\"33+++;&y`;\"F.7$$\"3++++#)4Ig5F.$\"3 1+++Fs^*=\"F.7$$\"3-+++;7;g5F.$\"3++++8,&\\@\"F.7$$\"3/+++Hv\\e5F.$\"3 \"******HAP:C\"F.7$$\"3!******\\Fp^0\"F.$\"3-+++?S7p7F.7$$\"33+++@20]5 F.$\"3-+++GFa(H\"F.7$$\"3!******pZKI/\"F.$\"3-+++HQhE8F.7$$\"3$******R wAS.\"F.$\"3'******>pZhN\"F.7$$\"3.+++3&[H-\"F.$\"31+++Cj%fQ\"F.7$$\"3 0+++\\iv45F.$\"3%******\\A0eT\"F.7$$\"3H+++U>%**!#=$\"3'******4L:bW \"F.7$$\"3%)*****pGg!p(*Fjr$\"3-+++E]'[Z\"F.7$$\"3=+++jhWs&*Fjr$\"3&** ****p?UO]\"F.7$$\"3')*****p'oea$*Fjr$\"3-+++wjjJ:F.7$$\"3L+++PS*f6*Fjr $\"33+++W2ke:F.7$$\"3')*****\\#oQd))Fjr$\"35+++BVX%e\"F.7$$\"35++++joz &)Fjr$\"32+++&)R))3;F.7$$\"3Y*****fu2SG)Fjr$\"3,+++okuJ;F.7$$\"3')**** *f$4lrzFjr$\"3%******pIqGl\"F.7$$\"3E+++Y%)3WwFjr$\"33+++qw4s;F.7$$\"3 ')*****\\6_HI(Fjr$\"3'******>3'G*o\"F.7$$\"3'******4x<+&pFjr$\"3'***** *H,5Vq\"F.7$$\"3))*****\\N)=(e'Fjr$\"3#*******>B1<J>4u\"F.7$$\"3G+++K*o$y]Fjr$\"3&*******)4ARu\"F.7$$ \"35+++00r(p%Fjr$\"3*)*****fLJWu\"F.7$$\"3,+++n79?VFjr$\"32+++;-ZUM%)y%RFjr$\"3\"******>1&3QJe$Fjr$\"3)**** **\\8X8t\"F.7$$\"3?+++z*fzA$Fjr$\"3#******f@UBs\"F.7$$\"3%******>cJW)G Fjr$\"3,+++g**=6Fjr$\"3++++s?Gm;F.7$$\"37+++A?)Gm \"Fjr$\"31+++$fr![;F.7$$\"3'*******3wO.9Fjr$\"3.+++^.dG;F.7$$\"3-+++,v mk6Fjr$\"3)*******Qx*zg\"F.7$$\"3Q+++J@gw%*!#>$\"3-+++TZe'e\"F.7$$\"3/ +++Iu.IvF\\\\l$\"33+++!yrXc\"F.7$$\"3$******z\"\\F6eF\\\\l$\"3)******H W1Aa\"F.7$$\"3?+++/bEAVF\\\\l$\"3)*******)4T(>:F.7$$\"3/+++4VeiIF\\\\l $\"3!******HVIu\\\"F.7$$\"3&)*****f!HUH?F\\\\l$\"33+++9*GbZ\"F.7$$\"3# ******4e1w@\"F\\\\l$\"35+++@#)Ga9F.7$$\"3y*****fnjj>'!#?$\"3.+++XY&RV \"F.7$$\"3))******fEbdAF`^l$\"3,+++(\\mZT\"F.7$$\"33+++?F\\\\l$\"3,+++3CrH8F.7$$\"3-+++l7_&f#F\\\\l$\"3+++ +k3]E8F.7$$\"3u*****Hs=nG$F\\\\l$\"3++++_'GeK\"F.7$$\"3;+++])4$*)RF\\ \\l$\"31+++$4KxK\"F.7$$\"3G+++k)=&yYF\\\\l$\"3&******pL>AL\"F.7$$\"33+ ++&\\P%H`F\\\\l$\"3*******f/q#R8F.7$$\"3y*****p^ls\"fF\\\\l$\"3/+++6a$ )[8F.7$$\"3#)*****>DbvT'F\\\\l$\"35+++&\\Q3O\"F.7$$\"3U******z%ek!oF\\ \\l$\"3++++&*[frF\\\\l$\"3,+++n()H59F.7$$\"3'******f&R`!3(F\\\\l$\"3\"******H ;]2V\"F.7$$\"3++++^())f!oF\\\\l$\"3++++of'GX\"F.7$$\"3?+++!oG$=jF\\\\l $\"31+++(>CkZ\"F.7$$\"3r*****>V>Bg&F\\\\l$\"3$******4&\\=,:F.7$$\"3J++ +s*3\\k%F\\\\l$\"3++++JF*o_\"F.7$$\"3++++>pRNMF\\\\l$\"3%*******)*)yKb \"F.7$$\"3!******R=\"el>F\\\\l$\"3%******fEk+e\"F.7$$\"35++++tz)H#F`^l $\"3#******pyhpg\"F.7$$!39+++%QuXx\"F\\\\l$\"3)******RLzOj\"F.7$$!3M++ +Qg'y/%F\\\\l$\"3!******R`A*f;F.7$$!3Q+++_-E(e'F\\\\l$\"33+++UwR&o\"F. 7$$!3c+++!>%>(Q*F\\\\l$\"33+++BW\")4Fjr $\"3)******f3DRx\"F.7$$!3++++!><%)H#Fjr$\"3/+++geP\"z\"F.7$$!3')*****p \\g2p#Fjr$\"3(******zHok!=F.7$$!3w*****H'G@+JFjr$\"3!******4=\"**==F.7 $$!34+++QWYCNFjr$\"3&******>8b(G=F.7$$!35+++b--hRFjr$\"3$*******fYfN=F .7$$!3$)*****\\zBsS%Fjr$\"31+++))*p$R=F.7$$!33+++oCGg[Fjr$\"3$******zk o*R=F.7$$!3P+++nZH<`Fjr$\"3#*******=oIP=F.7$$!3Y*****4#)y_x&Fjr$\"3-++ +'RI8$=F.7$$!3I+++'4-7B'Fjr$\"31+++xd,A=F.7$$!39+++:>,#o'Fjr$\"3!***** *RNq$4=F.7$$!3A+++KlmCrFjr$\"31+++0FV$z\"F.7$$!3I+++Bk;cvFjr$\"3%***** *fZsUx\"F.7$$!3w*****R_&etzFjr$\"33+++c**)>v\"F.7$$!3O+++K?5u$)Fjr$\"3 !******\\M:ns\"F.7$$!3S+++D&G]v)Fjr$\"3++++16gv*Fjr$\"33+++]1G*f\"F.7$$!3#*******oz`.5F.$\"3++++2n&>c\"F.7$$!33 +++:.ZG5F.$\"31+++#)>(H_\"F.7$$!3)******H_l-0\"F.$\"31+++<9i#[\"F.7$$! 3/+++N5#)o5F.$\"3-+++8T@T9F.7$$!3#******>ylS3\"F.$\"31+++&Rq!*R\"F.7$$ !3/+++28'f4\"F.$\"3%******Ru=lN\"F.7$$!3*******Hd-X5\"F.$\"34+++JE*QJ \"F.7$$!30+++T%=(46F.$\"3-+++\"GF:F\"F.7$$!3,+++2=n66F.$\"3.+++-kvH7F. 7$$!32+++*Qf/6\"F.$\"3)******R\"*3*)=\"F.7$$!3\"******>;6i5\"F.$\"3-++ +6dI\\6F.7$$!3#******RV*3*4\"F.$\"32+++*[c76\"F.7$$!3/+++ovG*3\"F.$\"3 )******fnc]2\"F.7$$!3'*******\\$Gq2\"F.$\"3'*******)[%)4/\"F.7$$!37+++ /?ci5F.$\"3.+++`\")H45F.7$$!3-+++tQ;Y5F.$\"3_+++'*HL-)*Fjr7$$!3++++m<8 G5F.$\"38+++Od+S&*Fjr7$$!3/+++)*Hy35F.$\"3_+++#fMyI*Fjr7$$!3]+++l8^%)) *Fjr$\"3u*****fOjt5*Fjr7$$!3c*****z*[#[n*Fjr$\"3P+++nx#)R*)Fjr7$$!3k** ***prBBY*Fjr$\"3`*****zrSh!))Fjr7$$!3!******z)=h]#*Fjr$\"3m*****R.!)oq )Fjr7$$!3Y*****p:/L/*Fjr$\"3q*******RyAk)Fjr7$$!3[*****4<&)R%))Fjr$\"3 (******Rr:Ah)Fjr7$$!31+++l!phl)Fjr$\"3S+++YQ@;')Fjr7$$!3O+++\\,E$[)Fjr $\"3')********RV`')Fjr7$$!3b+++Mb^G$)Fjr$\"3')*****4/xEs)Fjr7$$!3o**** *4Q5]>)Fjr$\"3N+++(=(QA))Fjr7$$!3_+++zig&3)Fjr$\"3++++@'f1&*)Fjr7$$!3( )*****R/BH+)Fjr$\"3********=DD0\"*Fjr7$$!3%)*****H#RJ\\zFjr$\"3)****** >)Qg$G*Fjr7$$!3]+++lS%o#zFjr$\"3_+++pL&G[*Fjr7$$!3i******=>FPzFjr$\"3; +++6\"p)*p*Fjr7$$!3m*****pDL?)zFjr$\"3B+++*3z7$**Fjr7$$!3?+++/vAi!)Fjr $\"35+++f1N<5F.7$$!3[*****HG1'y\")Fjr$\"35+++\"*3GU5F.7$$!3++++0TcJ$)F jr$\"3%******z&=`n5F.7$$!3Z*****zQJ6_)Fjr$\"3'******>i3F4\"F.7$$!3)*** ***H.qpu)Fjr$\"3!*******HCT<6F.7$$!3>+++(yr$3!*Fjr$\"3#******46X79\"F. 7$$!3=+++5(fUI*Fjr$\"3++++NM\"Q;\"F.7$$!3\")******)*H>L'*Fjr$\"3-+++*Q LZ=\"F.7$$!3'******fHvL***Fjr$\"3&******HKMO?\"F.7$$!3#******Hmm#Q5F.$ \"3.+++KH;?7F.7$$!3'******\\!*f)z5F.$\"32+++Rq)RB\"F.7$$!3.+++&eRQ7\"F .$\"3*******H:*zW7F.7$$!3#******4V**)p6F.$\"3/+++r(>BD\"F.7$$!3%****** z<2x@\"F.$\"33+++,/Ic7F.7$$!31+++*[2pE\"F.$\"3++++wi_c7F.7$$!3-+++g^7< 8F.$\"3-+++T(=GD\"F.7$$!3-+++z&ozO\"F.$\"3-+++)GP]C\"F.7$$!36+++/M.>9F .$\"3&******4A\"3L7F.7$$!3-+++Dk!*p9F.$\"3.+++M4*o@\"F.7$$!3%******pcp ,_\"F.$\"3%*******)y[k>\"F.7$$!33+++)*RSp:F.$\"3++++\"ez<<\"F.7$$!3,++ +&H%><;F.$\"30+++%e]H9\"F.7$$!33+++JE8j;F.$\"3\"******HK12#=F.$\"3Z+++4$ RlT*Fjr7$$!3)******4S>=&=F.$\"38+++YOd:*)Fjr7$$!31+++0)=!z=F.$\"3o**** *4]r()Q)Fjr7$$!3$******zbf?!>F.$\"3,+++qEsRyFjr7$$!3-+++ALt?>F.$\"3!)* ****p\"QEssFjr7$$!3&******>*3([$>F.$\"3K+++w8W!p'Fjr7$$!34+++DVMW>F.$ \"3m*****>*>Z)4'Fjr7$$!31+++#oo!\\>F.$\"3#)*****f$3q+bFjr7$$!3/+++lL+ \\>F.$\"30+++D#e:!\\Fjr7$$!3.+++FI:W>F.$\"38+++C\\^0VFjr7$$!3,+++X!oX$ >F.$\"36+++*eOqr$Fjr7$$!3&*******[XM?>F.$\"3&)*****4zP09$Fjr7$$!3,+++. Si,>F.$\"3=+++zgL!e#Fjr7$$!3-+++QBfy=F.$\"36+++ZlgS?Fjr7$$!3++++U'y9&= F.$\"3(******fPP`_\"Fjr7$$!34+++CMb?=F.$\"3++++@oGQ5Fjr7$$!3%******pXE hy\"F.$\"3))******\\5UHeF\\\\l7$$!3/+++IUa[`/ Zd\"F.$!30+++'=T(>6Fjr7$$!33+++cagF:F.$!3()*****4g&GJ8Fjr7$$!3!******z 9:+[\"F.$!37+++ " 0 "" {MPLTEXT 1 0 111 "rx:='rx': ry:='ry': dt:='dt': q:='q': i:='i': m:= 1: B:='B': f:='f': g:='g': rx_ip1:='rx_ip1': ry_ip1:='ry_ip1':" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "eq1:=m*(rx_ip1+rx[i-1]-2*rx[ i])/dt^2=f+B*(ry_ip1-ry[i-1])/(2*dt);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq1G/*&,(%'rx_ip1G\"\"\"&%#rxG6#,&%\"iGF)F)!\"\"F)*&\"\"#F)&F+6# F.F)F/F)*$)%#dtGF1F)F/,&%\"fGF)*&*(#F)F1F)%\"BGF),&%'ry_ip1GF)&%#ryGF, F/F)F)F6F/F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "eq2:=m*(ry_ ip1+ry[i-1]-2*ry[i])/dt^2=g-B*(rx_ip1-rx[i-1])/(2*dt);" }{TEXT -1 0 " " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq2G/*&,(%'ry_ip1G\"\"\"&%#ryG6 #,&%\"iGF)F)!\"\"F)*&\"\"#F)&F+6#F.F)F/F)*$)%#dtGF1F)F/,&%\"gGF)*&#F)F 1F)*&*&%\"BGF),&%'rx_ip1GF)&%#rxGF,F/F)F)F6F/F)F/" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 38 "sol:=solve(\{eq1,eq2\},\{rx_ip1,ry_ip1\});" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$solG<$/%'rx_ip1G*&,0&%#rxG6#,&%\" iG\"\"\"F/!\"\"!\"%*(F*F/)%\"BG\"\"#F/)%#dtGF5F/F/*&\"\")F/&F+6#F.F/F/ *(\"\"%F/%\"fGF/F6F/F/**F=F/F4F/F7F/&%#ryGF,F/F0**F=F/F4F/F7F/&FAF;F/F /**F5F/F4F/)F7\"\"$F/%\"gGF/F/F/,&F=F/*&F3F/F6F/F/F0/%'ry_ip1G,$*&,0*( F4F/F7F/F*F/F1*&F=F/F@F/F/*&F9F/FCF/F0*(F=F/FGF/F6F/F0*(F3F/F6F/F@F/F0 **F=F/F4F/F7F/F:F/F/**F5F/F4F/FEF/F>F/F/F/FHF0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "assign(sol);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "rx_ip1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&,0&%#rxG6 #,&%\"iG\"\"\"F*!\"\"!\"%*(F%F*)%\"BG\"\"#F*)%#dtGF0F*F**&\"\")F*&F&6# F)F*F**(\"\"%F*%\"fGF*F1F*F***F8F*F/F*F2F*&%#ryGF'F*F+**F8F*F/F*F2F*&F " 0 "" {MPLTEXT 1 0 80 "Verlet:=proc(n1,E0,B0) local Fx,Fy; global r x,ry,dt,dt2,m,q,Ex,Ey,rx_ip1,ry_ip1;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "Fx:=evalf(q*subs(x=rx[n1],y=ry[n1],E0*Ex));" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 43 "Fy:=evalf(q*subs(x=rx[n1],y=ry[n1],E0*Ey));" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "rx[n1+1]:=subs(f=Fx,g=Fy,B=B0,rx_ip 1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "ry[n1+1]:=subs(f=Fy,g=Fy,B=B 0,ry_ip1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "q:=-1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%\"qG!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "dt:=0.05; dt 2:=dt^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dtG$\"\"&!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$dt2G$\"#D!\"%" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 15 "vx0:=0; vy0:=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%$vx0G\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$vy0G\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "rx[0]:=1; rx[1]:=rx[0]+dt*vx 0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#rxG6#\"\"!\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#rxG6#\"\"\"$F'\"\"!" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 30 "ry[0]:=1; ry[1]:=ry[0]+dt*vy0;" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>&%#ryG6#\"\"!\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#ryG6#\"\"\"$F'\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 41 "Now we carry out a large number of steps." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "N:=1000;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"NG\"%+5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from 1 to N do:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "Verlet (i,1,2); od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "nops(conver t(rx,list));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"%-5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "rx[4],ry[4];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+[*z#35!\"*$\"+kIa15F%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "plot([seq([rx[i],ry[i]],i=0..N)],style=point,scaling= constrained);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6 '-%'CURVESG6$7ein7$$\"\"\"\"\"!F(F'7$$\"3\"******pA48+\"!#<$\"3/+++RX= ,5F.7$$\"3)******HvPS+\"F.$\"3)******Rc:M+\"F.7$$\"3)******z%*z#35F.$ \"3$******R1Vl+\"F.7$$\"3++++jN695F.$\"3,+++8mS55F.7$$\"32+++$)*)f@5F. $\"3*)*****4.P[,\"F.7$$\"3$******ply2.\"F.$\"3/+++Y\"e'>5F.7$$\"3#**** **pqw;/\"F.$\"32+++R')oC5F.7$$\"31+++:()Ha5F.$\"30+++ZRuH5F.7$$\"3'*** ***zoJ'o5F.$\"31+++3#QY.\"F.7$$\"31++++Uk%3\"F.$\"3%*******>i=R5F.7$$ \"31+++3nG-6F.$\"3$*******)Q0K/\"F.7$$\"33+++U?\\@6F.$\"3#******>lVA?@\"F.$\"3)** ******Q(R\\5F.7$$\"30+++,@ZP7F.$\"3%******z$*)yY5F.7$$\"3++++\"**ePE\" F.$\"3-+++_))fU5F.7$$\"33+++)Q>2H\"F.$\"36+++kxsO5F.7$$\"31+++R7==8F.$ \"3$******fx#4H5F.7$$\"3'******f$e'fM\"F.$\"35+++%HG'>5F.7$$\"33+++j&* )QP\"F.$\"3'******4o'G35F.7$$\"31+++%pl0R()z*Fir7$$\"3-+++tPic9F.$\"3]******f\\+G'*Fir 7$$\"31+++DLB$[\"F.$\"3Y+++hVXQ%*Fir7$$\"3++++tT04:F.$\"3$)******3/aI# *Fir7$$\"3$******4l6R`\"F.$\"3m*****p8&*[+*Fir7$$\"3!******f))Qwb\"F.$ \"3G+++$zABw)Fir7$$\"33+++c%y+e\"F.$\"3^+++H9z.&)Fir7$$\"3#******>'R3, ;F.$\"3E+++bGUI#)Fir7$$\"3!******R\\@0i\"F.$\"3e*****\\.\"[VzFir7$$\"3 3+++r4FQ;F.$\"3G+++x!fVk(Fir7$$\"3/+++ctAa;F.$\"3E+++G\\cMtFir7$$\"3'* *****Hr,$o;F.$\"32+++:fq:qFir7$$\"3%******46A/o\"F.$\"3Y+++KBZ*o'Fir7$ $\"3)******\\OM0p\"F.$\"3=+++%=?wN'Fir7$$\"3'******ff-')p\"F.$\"3?+++* H`>-'Fir7$$\"3\"******Hh4Yq\"F.$\"3[+++&)\\I%o&Fir7$$\"35+++5rb3lM&Fir7$$\"3,+++$ol/r\"F.$\"3()*****\\$HV5]Fir7$$\"3%******z ku.r\"F.$\"3y*****4Xbyn%Fir7$$\"36+++(oT$3\"Fir7$$\"3)******pFOVa\"F.$\"3/+++=;8p5Fir7$$\"31+++\"4\"eH:F.$ \"3;+++kB1l&*!#>7$$\"3*******z80a^\"F.$\"3J+++WuD,')Fi]l7$$\"3*******f Y$)>]\"F.$\"3u******=.^#z(Fi]l7$$\"3%******z:#[*[\"F.$\"3r******\\,%)H rFi]l7$$\"37+++-m0y9F.$\"3V+++hDx-mFi]l7$$\"3'******>()\\yY\"F.$\"3-++ +%G]%*>'Fi]l7$$\"3++++87**e9F.$\"3<+++Vov1fFi]l7$$\"3!*******oYf^9F.$ \"3w*****>._/r&Fi]l7$$\"31+++oyvX9F.$\"3M+++@xJ&f&Fi]l7$$\"36+++o4cT9F .$\"3I+++@CJXbFi]l7$$\"3)******4zl!R9F.$\"3++++-LtVbFi]l7$$\"3&****** \\::$Q9F.$\"3o*****>7%QtbFi]l7$$\"3&******RSK$R9F.$\"3>+++=wu;cFi]l7$$ \"3!*******f67U9F.$\"3s*****p+hhl&Fi]l7$$\"33+++(GlmW\"F.$\"3C+++_I*Rn &Fi]l7$$\"33+++p!HHX\"F.$\"3u*****RD@Gl&Fi]l7$$\"3#******>gd3Y\"F.$\"3 K+++OxgvbFi]l7$$\"3/+++(Rx.Z\"F.$\"3G+++4A(eU&Fi]l7$$\"3'******H<(R\"[ \"F.$\"35+++*Rgy=&Fi]l7$$\"33+++Q)3Q\\\"F.$\"3#)*****RL1n%[Fi]l7$$\"35 +++Y')[2:F.$\"3#)*****z$oe)Q%Fi]l7$$\"30+++1&)HA:F.$\"3&******4Ym3!QFi ]l7$$\"34+++Gu3Q:F.$\"3/+++*HJA2$Fi]l7$$\"3#******p4$pa:F.$\"37+++?,\" G>#Fi]l7$$\"3'******RbV>d\"F.$\"3++++R8Ga6Fi]l7$$\"3/+++`*e'*e\"F.$!30 +++*Q_N+&!#@7$$\"3$*******)R`wg\"F.$!3%******p$\\5D9Fi]l7$$\"3++++JotD ;F.$!3=+++i!=T(HFi]l7$$\"30+++NprV;F.$!3M+++jPX)p%Fi]l7$$\"35+++s5Sh;F .$!3m+++>%ewf'Fi]l7$$\"3/+++/#)fy;F.$!3))******R[Wp')Fi]l7$$\"3/+++!z? ^p\"F.$!3'******z.r44\"Fir7$$\"3'*******\\my5W1uy\"F.$!39+++R89 )Q%Fir7$$\"33+++$)\\w%y\"F.$!3<+++mN^EZFir7$$\"3)******\\!)\\+y\"F.$!3 -+++l\"[Q1&Fir7$$\"3!*******R3FtEQgC(Fir7$$ \"3%******zlHFn\"F.$!3o******eBm7vFir7$$\"33+++6E'>l\"F.$!3')*****pF\" )Qw(Fir7$$\"3/+++F1+I;F.$!3[*****4b_')*zFir7$$\"31+++x!4qg\"F.$!39+++, P4;#)Fir7$$\"3/+++$*>;$e\"F.$!3M+++99\\:%)Fir7$$\"3++++a.ke:F.$!3]**** *p**3jf)Fir7$$\"30+++9.jL:F.$!3[*****\\/#>e()Fir7$$\"35+++u8K3:F.$!33+ ++_A(4!*)Fir7$$\"3++++EX!H[\"F.$!3Z*****pIpY-*Fir7$$\"3%******zQqvX\"F .$!3j*****H&3\\H\"*Fir7$$\"3\"*******Rt]K9F.$!3A+++@0$e@*Fir7$$\"3,+++ &p**yS\"F.$!3G+++KSE%G*Fir7$$\"3-+++,f#RQ\"F.$!3Y+++,MaN$*Fir7$$\"3'** *****3ovg8F.$!3Y+++%G*eq$*Fir7$$\"3/+++6SbQ8F.$!3[*****zd\"[!R*Fir7$$ \"30+++w#ouJ\"F.$!3')*****pK[kR*Fir7$$\"3'******>3QwH\"F.$!3!)*****>1` )*Q*Fir7$$\"33+++s#)=z7F.$!3E+++)o!=s$*Fir7$$\"3++++L)GAE\"F.$!3;+++-@ -X$*Fir7$$\"3!*******>Q&oC\"F.$!3&******znd+J*Fir7$$\"3'*******H/9L7F. $!3s*****zyR!p#*Fir7$$\"36+++G#[6A\"F.$!3z*****HhuPA*Fir7$$\"3,+++V&=4 @\"F.$!3k*****fQ.h<*Fir7$$\"33+++ISZ-7F.$!3Q+++FL)y7*Fir7$$\"3-+++8%=e >\"F.$!3y******[%o43*Fir7$$\"3/+++1k$4>\"F.$!3,+++/0>P!*Fir7$$\"3/+++= Qz(=\"F.$!3')*****pBS$)**)Fir7$$\"3-+++YyL'=\"F.$!3a+++#=\\h'*)Fir7$$ \"3++++av\\'=\"F.$!3$)******e@FU*)Fir7$$\"33+++RX=)=\"F.$!3E+++$oq#G*) Fir7$$\"31+++!y$H\">\"F.$!3c*****fT(fD*)Fir7$$\"3!******fm/d>\"F.$!3@+ ++0=eN*)Fir7$$\"3.+++%>#G,7F.$!3o*****>+<%f*)Fir7$$\"31+++G$yy?\"F.$!3 K+++-#[\")**)Fir7$$\"3&******R]L`@\"F.$!31+++TCm_!*Fir7$$\"3/+++o#yMA \"F.$!3X+++d*zO7*Fir7$$\"36+++B]8K7F.$!3\\+++_ru6#*Fir7$$\"32+++s)>6C \"F.$!3K+++-7B<$*Fir7$$\"33+++GXC]7F.$!3-+++mjJS%*Fir7$$\"3!******fF=$ f7F.$!3_+++D?+\"e*Fir7$$\"3#*******f*\\\"o7F.$!3H+++mC5R(*Fir7$$\"35++ +o*\\lF\"F.$!3?+++>%[U\"**Fir7$$\"3++++,AL%G\"F.$!3(******\\.*e55F.7$$ \"3!*********fJ\"H\"F.$!3.+++^.LJ5F.7$$\"33+++1!GtH\"F.$!31+++m%fN0\"F .7$$\"3++++UR?-8F.$!3%*******[5H!z08F.$!3)*******eZ /-6F.7$$\"3'******>'e%zI\"F.$!3,+++'RY!G6F.7$$\"3********3Ka38F.$!3)** ****>>H]:\"F.7$$\"31+++C*puI\"F.$!31+++G_$G=\"F.7$$\"31+++d(HYI\"F.$!3 .+++qpH67F.7$$\"3'******HdV**H\"F.$!3#******R!*Q-C\"F.7$$\"3!******\\7 ]LH\"F.$!3!******fDz%p7F.7$$\"3'******Hl1[G\"F.$!3)*******z<$))H\"F.7$ $\"3'******RG*Gu7F.$!34+++&f2\"G8F.7$$\"35+++YKzh7F.$!3-+++bq6d8F.7$$ \"31+++&)GLZ7F.$!3)******>jrcQ\"F.7$$\"3.+++)[T4B\"F.$!3!******>z&e89F .7$$\"3$******z\"4n77F.$!3,+++W)y1W\"F.7$$\"3'******>1\"f#>\"F.$!3-+++ [nxm9F.7$$\"35+++(4*yq6F.$!3))*****>'Qr\"\\\"F.7$$\"3%******\\eot9\"F. $!3%*******3YL::F.7$$\"3$******HS[C7\"F.$!3&*******Q]\\P:F.7$$\"3!**** **H_hh4\"F.$!3/+++*Gk!e:F.7$$\"31+++_Olo5F.$!3-+++6f#pd\"F.7$$\"3&**** **\\u\"3S5F.$!35+++g!zRf\"F.7$$\"3$*******3Ch55F.$!3,+++D&R\"4;F.7$$\" 3Y*****>8-U!)*Fir$!36+++,1MA;F.7$$\"31+++>#fo\\*Fir$!3/+++)yLNj\"F.7$$ \"3')*****znYf=*Fir$!3*******\\I*oU;F.7$$\"3!)*****\\(3Mt))Fir$!3#**** **zU'z\\;F.7$$\"3/+++RV#4c)Fir$!31+++HO'[l\"F.7$$\"3S+++goc]#)Fir$!3)* *****4`=zl\"F.7$$\"31+++$y1T%zFir$!3!******4n2!f;F.7$$\"3#******4lKLk( Fir$!3-+++qg>e;F.7$$\"3a*****RSl*\\tFir$!3!******Himbl\"F.7$$\"3Y***** >JTc1(Fir$!3++++1$>7l\"F.7$$\"3C+++3e*=z'Fir$!31+++=-FX;F.7$$\"3_***** fR[,`'Fir$!3$******pW]yj\"F.7$$\"3m*****4z)o\"G'Fir$!3-+++'z/\"H;F.7$$ \"3#)*****fRkw/'Fir$!30+++c.>>;F.7$$\"3C+++%Gp!HeFir$!3++++h\\F3;F.7$$ \"3.+++`ZtEcFir$!33+++Cb`'f\"F.7$$\"3$)*****Rd@8W&Fir$!3++++vi:%e\"F.7 $$\"3?+++vRJt_Fir$!3)******H#pKr:F.7$$\"3N+++6a,B^Fir$!3#******puS#e:F .7$$\"3y******pha!*\\Fir$!3!******>l#4X:F.7$$\"3!******4yUe([Fir$!3#** ****z=x?`\"F.7$$\"39+++U#f'yZFir$!3\"*******olQ>:F.7$$\"3E+++F+d)p%Fir $!3&******>r3s]\"F.7$$\"3.+++0[(\\j%Fir$!3)******fIDd\\\"F.7$$\"39+++= [5(e%Fir$!3'******f$*4^[\"F.7$$\"37+++L3.aXFir$!33+++#HEbZ\"F.7$$\"3!* *****RdsY`%Fir$!3!******>ZErY\"F.7$$\"33+++Y&4y_%Fir$!3%******zS\\+Y\" F.7$$\"3y*****p7$4KXFir$!33+++E%>WX\"F.7$$\"3=+++g)fga%Fir$!35+++p\\M] 9F.7$$\"35+++yd9oXFir$!3'******4[&)HmYFir$!33+++F #e6X\"F.7$$\"3'******4qjPq%Fir$!3-+++%zkeX\"F.7$$\"3#)*****\\%GeSZFir$ !3-+++e]Ri9F.7$$\"3)******\\/N\\x%Fir$!3++++wfsq9F.7$$\"37+++.*=]![Fir $!33+++H_\"3[\"F.7$$\"3<+++V22H[Fir$!3)******Rp,E\\\"F.7$$\"3#*******y DQX[Fir$!3,+++3h+1:F.7$$\"3G+++G'>B&[Fir$!3(******4!>$4_\"F.7$$\"3'*** *****=P$[[Fir$!3#********>ms`\"F.7$$\"3B+++$p'*>$[Fir$!3%******4)4)[b \"F.7$$\"3:+++=2)>![Fir$!3)******\\OMOd\"F.7$$\"3A+++Io5dZFir$!31+++T? P$f\"F.7$$\"3!)*****\\/Sjp%Fir$!3%******R!)GRh\"F.7$$\"3\"******zy.)=Y Fir$!3,+++\">I^j\"F.7$$\"3%******RA*yBXFir$!3'******\\?%zc;F.7$$\"3'** ****z%Gw5WFir$!33++++Jty;F.7$$\"3A+++UAPzUFir$!31+++E_v++++1C.4JFir$!3)******pz&)Q#=F.7$$\"3' )*****4qiZ&GFir$!3\"******\\0\">T=F.7$$\"3/+++'\\))ee#Fir$!31+++\\,8d= F.7$$\"33+++4:j.BFir$!3#******>6f:(=F.7$$\"3)******Rh[$4?Fir$!33+++>vM %)=F.7$$\"3*)*****p,=Xq\"Fir$!3-+++e(z`*=F.7$$\"3))*****\\>C2R\"Fir$!3 3+++jhb/>F.7$$\"31+++QF.7$$\"3V+++)y#=IuFi]l$! 3*)*****>AGq\">F.7$$\"3p*****4tml7%Fi]l$!3(******R@7-#>F.7$$\"3Y*****> ,i'R!)!#?$!3,+++O\"=8#>F.7$$!3)******\\*3/>DFi]l$!35+++asL?>F.7$$!3C++ +N^)Q#eFi]l$!3&*******3+G<>F.7$$!3]+++?[>#4*Fi]l$!3&******\\\"f<7>F.7$ $!3-+++@$)fI7Fir$!3!******pEt]!>F.7$$!3&*******yJyW:Fir$!3#******fmQg* =F.7$$!3#******4x1,&=Fir$!3%******4Oc^)=F.7$$!38+++gL*\\9#Fir$!3'***** *HUFD(=F.7$$!3))*****RzuzU#Fir$!31+++\\(o#e=F.7$$!3A+++Oaq(p#Fir$!3-++ +=>^U=F.7$$!3u******\\e(H&HFir$!3%******\\*=SD=F.7$$!3)******\\1DF>$Fi r$!30+++6c42=F.7$$!3%)*****RJ^gT$Fir$!3!*******>/w(y\"F.7$$!3t*****>8@ Ai$Fir$!3!******fXsvw\"F.7$$!3!)*****zqw1\"QFir$!3-+++1\\rY=;F.7$$!36+++ f&pbi%Fir$!3/+++*e$)zf\"F.7$$!3!)*****zf[Un%Fir$!31+++i7gy:F.7$$!3++++ %fx$3ZFir$!3#******>!)4-c\"F.7$$!3B+++AT9HZFir$!30+++D8'Ha\"F.7$$!39++ +='oyt%Fir$!3,+++'G&*p_\"F.7$$!3x*****RR!*ft%Fir$!3\"******42PC^\"F.7$ $!3$)*****f[_]s%Fir$!3'******>s'R*\\\"F.7$$!3t*****4[&o1ZFir$!3)****** p!y'z[\"F.7$$!3++++f0f#o%Fir$!3/+++[kAy9F.7$$!3%)*****H\">_aYFir$!3-++ +>0Bq9F.7$$!3%)*****HvoUi%Fir$!3%******>.>SY\"F.7$$!3'******>5POf%Fir$ !3#******\\q6'f9F.7$$!3E+++h:VkXFir$!3)******fs3qX\"F.7$$!3\")*****p>P %QXFir$!35+++I2>c9F.7$$!3')*****fy,u^%Fir$!3'******>(*=rX\"F.7$$!34+++ %\\=I]%Fir$!3%******HrN(f9F.7$$!3C+++(>4p\\%Fir$!3'******R!['RY\"F.7$$ !3-+++R&31]%Fir$!33+++xCrp9F.7$$!3;+++q)[b^%Fir$!3/+++>$ooZ\"F.7$$!3$) *****>(*)*)G:F.7$$!3%*********4F0\\F ir$!3'******zn<9a\"F.7$$!3b+++:]vF]Fir$!31+++n5Aa:F.7$$!3k******)eCy;& Fir$!3)********p=rc\"F.7$$!3X+++\\:^D`Fir$!3-+++s#=*z:F.7$$!3*)******* )fm+bFir$!3++++uvU#f\"F.7$$!31+++us&Hp&Fir$!35+++KkX/;F.7$$!3I+++=o(=! fFir$!3#*******H'=eh\"F.7$$!3-+++\"pUn7'Fir$!3$*******oPLE;F.7$$!3y*** ***ffqmjFir$!3++++q!Hej\"F.7$$!3@+++G(e2i'Fir$!3.+++)3TTk\"F.7$$!3))** ***H#Qu()oFir$!3-+++Bt6^;F.7$$!3_+++DgOmrFir$!3'******Rs\"REC;F.7$$!35+++bHxB5F.$!33+++)p@ 3h\"F.7$$!3/+++'\\AM0\"F.$!3%*******yIY&f\"F.7$$!3%******4Dl@3\"F.$!3+ +++#ed#y:F.7$$!31+++t!R)46F.$!35+++G=Hf:F.7$$!32+++^;HO6F.$!3!******Hj o'Q:F.7$$!33+++h?Qh6F.$!3'******H'f];:F.7$$!31+++0A)\\=\"F.$!3!******* Hd$H\\\"F.7$$!32+++B\"yp?\"F.$!33+++dC5o9F.7$$!3%******H;rsA\"F.$!3)** ****z\"=;U9F.7$$!3)**********ydC\"F.$!34+++m!z_T\"F.7$$!31+++$\\OCE\"F .$!3-+++#QFwQ\"F.7$$!3%******pO'>x7F.$!3'******R8'Qf8F.7$$!35+++A(H+H \"F.$!3/+++&3R2L\"F.7$$!3&******zME4I\"F.$!3,+++iD(=I\"F.7$$!36+++c[*) 48F.$!3)******>gtHF\"F.7$$!3++++BE'pJ\"F.$!3!******R4GUC\"F.7$$!3)**** **z`v@K\"F.$!3/+++R*=e@\"F.7$$!34+++jvfD8F.$!3'******RCCz=\"F.7$$!30++ +3,JF8F.$!33+++obrg6F.7$$!3&******fA6uK\"F.$!32+++QiNM6F.7$$!33+++MY,E 8F.$!3,+++[(***36F.7$$!3/+++n&[KK\"F.$!33+++j#)y%3\"F.7$$!3&******f[a# >8F.$!37+++R7&=1\"F.7$$!33+++Nc=98F.$!3.+++oTIS5F.7$$!3#******fZ0#38F. $!30+++muC?5F.7$$!36+++8g[,8F.$!36+++6bw,5F.7$$!3'******f,1UH\"F.$!3K+ ++%Qe#\\)*Fir7$$!3++++v\"\\lG\"F.$!3U+++?]y(p*Fir7$$!3%******p=-(y7F.$ !3a+++]gbj&*Fir7$$!35+++;G&3F\"F.$!3E+++_+rY%*Fir7$$!3/+++Jz=j7F.$!3K+ ++]>?Z$*Fir7$$!3'******Rb\"*eD\"F.$!3-+++tN![E*Fir7$$!3-+++PH9\\7F.$!3 ]+++!*f5*>*Fir7$$!36+++$p9JC\"F.$!3i*****fcB&\\\"*Fir7$$!3\"******p*4( zB\"F.$!3Y*****4t*H:\"*Fir7$$!3%******\\)e'QB\"F.$!3#)*****fU9b4*Fir7$ $!35+++m;%4B\"F.$!3W*****R;$4*3*Fir7$$!3!******\\YF$H7F.$!31+++^w\"[4* Fir7$$!3++++;z8H7F.$!3++++!)yL6\"*Fir7$$!3.+++6?ZI7F.$!3^*****fi&=P\"* Fir7$$!3#******H77MB\"F.$!3q*****R>*yq\"*Fir7$$!3'******\\?B!Q7F.$!3J+ ++K$*[5#*Fir7$$!3$******><_VC\"F.$!3c+++Ahba#*Fir7$$!3!*******ouU_7F.$ !3X+++@n?,$*Fir7$$!3)******\\#)eAE\"F.$!31+++@Pi[$*Fir7$$!3!******f>PQ F\"F.$!3G+++sR(\\R*Fir7$$!31+++*)[8(G\"F.$!3P+++JwUQ%*Fir7$$!3#****** \\'e5-8F.$!3;+++x8F.$!3)******4_63b*Fir7$$!3))*****zAR#*R\"F.$!3Z+++#>.5a*Fir7 $$!35+++isLA9F.$!3[+++L<8<&*Fir7$$!3-+++gNLY9F.$!3!)******3s.y%*Fir7$$ !3%******\\$f1r9F.$!3'******fW5FU*Fir7$$!33+++)fjj\\\"F.$!35+++1MI]$*F ir7$$!30+++H)[?_\"F.$!3i*****\\(y8g#*Fir7$$!3)******RsQza\"F.$!31+++aB r^\"*Fir7$$!3/+++()p%Qd\"F.$!3A+++:rqC!*Fir7$$!3%******4w&e*f\"F.$!3!* *****fN()*y))Fir7$$!36+++tu'\\i\"F.$!31+++aWg9()Fir7$$!33+++%o1)\\;F.$ !3q*****RH&zJ&)Fir7$$!3%*******>>#Rn\"F.$!3\\*****zpz4L)Fir7$$!33+++ku 8(p\"F.$!3*)*****p)fv7\")Fir7$$!3,+++#4&G>Iz'Fir7$$!3%* *****paV)3=F.$!3]+++Mj!>\\'Fir7$$!3++++&[o;#=F.$!3e*****RUP=='Fir7$$!3 ,+++5\\eK=F.$!3Y*****4azW'eFir7$$!3$******pNN:%=F.$!3_******RzcTbFir7$ $!3!******z^![[=F.$!32+++a&))[@&Fir7$$!31+++]'*R`=F.$!3E+++3)fi)[Fir7$ $!31+++13Hc=F.$!33+++XT^dXFir7$$!33+++w3[=F.$!3=+++YMYxKFir7$$!3!******H?k:%=F.$!3%)*****>P<[(HFir7 $$!3\"*******37GL=F.$!3?+++()pJ#o#Fir7$$!3++++CLYB=F.$!32+++0*)Q,CFir7 $$!3\"******fEXA\"=F.$!36+++%=PL8#Fir7$$!3#******4du(*z\"F.$!37+++3.Lz =Fir7$$!31+++],@'y\"F.$!35+++t&*QS;Fir7$$!3%******\\t?M&eW Fago7$$!3++++4]Qu:F.$!3;+++8Gz?QFago7$$!3++++.(puc\"F.$!3$******4v\"eN SFago7$$!3%******fX,Ac\"F.$!3/+++8n*H%\\Fago7$$!3!******>bY'e:F.$!3-++ +z^>wjFago7$$!33+++)f_ob\"F.$!3]*****RBnI;)Fago7$$!3#******p+[ob\"F.$! 30+++#Q&z75Fi]l7$$!3-+++'pT'e:F.$!32+++S(R$47Fi]l7$$!3'*******yHAi:F.$ !3%******\\#4>)Q\"Fi]l7$$!3#******4ohvc\"F.$!33+++**RxJ:Fi]l7$$!3!**** **HY3Yd\"F.$!3&)*****4tjGi\"Fi]l7$$!3-+++X`H$e\"F.$!3')*****RbdZk\"Fi] l7$$!3%******fVONf\"F.$!31+++.UW\"e\"Fi]l7$$!3/+++U)G_g\"F.$!3%******* fjw<9Fi]l7$$!3$******Rv`#=;F.$!3'******>yv&R6Fi]l7$$!3&******\\pxCj\"F .$!3m*****zd#zQtFago7$$!3'******p\"RvZ;F.$!3#******>RQ(*)=Fago7$$!33++ +@R#Rm\"F.$\"3i******GAIa]Fago7$$!35+++*3>3o\"F.$\"3)******R?+\"e8Fi]l 7$$!3/+++7CE)p\"F.$\"3')*****Hg'=wBFi]l7$$!3\"******pHqgr\"F.$\"3')*** ***z\\9lNFi]l7$$!35+++?W0M=F.$\"3(******>GfnV\"Fir7$$!3,+++Q&)*\\$=F.$\"37+++[@[v;Fir7$ $!3++++Me%*[=F.$\"38+++rz?H>Fir7$$!3+++++*>;'=F.$\"3/+++zL!p>#Fir7$$!3 ++++[Q(G(=F.$\"3')*****fE(QxCFir7$$!35+++(ytD)=F.$\"33+++pDMpFFir7$$!3 ++++R,g!*=F.$\"3#)******o%H82$Fir7$$!3))*******z[o*=F.$\"3s*****z&)*z \"Q$Fir7$$!3(******H;K7!>F.$\"3')*****\\%H6*p$Fir7$$!3*)*****f'*zO!>F. $\"3********R=b@SFir7$$!3'******f(*RT!>F.$\"3u*****\\\"4MZVFir7$$!3)** ****p[yD!>F.$\"3E+++3QmuYFir7$$!3%******>k!)*)*=F.$\"3E+++[=o,]Fir7$$! 31+++m0N$*=F.$\"3z*****ft_lK&Fir7$$!31+++88r&)=F.$\"3q******y#\\uk&Fir 7$$!3#******pi/h(=F.$\"3_*****p)zdifFir7$$!3%******H_!fk=F.$\"3a+++Zt> qiFir7$$!33+++ymC^=F.$\"3!)*****ffN'olFir7$$!3&******4mnh$=F.$\"3C+++! z2j&oFir7$$!3#******R*RY>=F.$\"3\")*****p,K<8(Fir7$$!31+++\\5E,=F.$\"3 /+++oXa$R(Fir7$$!3#******4\"yp\"y\"F.$\"3\")*****\\#R^SwFir7$$!3)***** *f]D4w\"F.$\"3++++HMbryFir7$$!3$******f51\"R;0i\"F.$\"39+++v)RJ)))Fir7$$!35+++!z1if\"F .$\"3++++2^M')*)Fir7$$!3#******p1U@d\"F.$\"3c+++$eJ62*Fir7$$!33+++At][ :F.$\"3w*****fb8!Q\"*Fir7$$!31+++KD[D:F.$\"39+++%\\#o(=*Fir7$$!3/++++1 C.:F.$\"3u******>++@#*Fir7$$!3-+++lc%>[\"F.$\"3[*****\\5*)*Q#*Fir7$$!3 /+++-:vh9F.$\"3$******fdBGC*Fir7$$!3$******p,+GW\"F.$\"3c*****>.;QB*Fi r7$$!31+++a)>_U\"F.$\"3[*****>K/M@*Fir7$$!3&******f7D\"49F.$\"3C+++$pO J=*Fir7$$!3'******>H9YR\"F.$\"3U+++0elW\"*Fir7$$!33+++n\"p:u**)Fir7$$!3)******HP!y`8F.$\"33+++ByyV*)Fir7$$!33+++pz0[8 F.$\"3!******p=g4*))Fir7$$!30+++'oPTM\"F.$\"3&******\\6l2%))Fir7$$!3&* *****>6!*>M\"F.$\"3Y*****\\'=+&z)Fir7$$!3\"******>2n:M\"F.$\"3E+++7!=a v)Fir7$$!3'******f1-GM\"F.$\"3g******>>pB()Fir7$$!33+++&*3hX8F.$\"3U++ +5gT,()Fir7$$!3#******HZ#*)\\8F.$\"3y*******)43!p)Fir7$$!3-+++>)HbN\"F .$\"3W*****>9h5p)Fir7$$!3/+++F7Ri8F.$\"3'******z\"3g0()Fir7$$!3)****** zeJ.P\"F.$\"3y*****RB-[t)Fir7$$!3%******>'Q>z8F.$\"3u*****4o9'z()Fir7$ $!31+++#p5))Q\"F.$\"3c+++#=D3%))Fir7$$!3'******z61!*R\"F.$\"39+++Y20>* )Fir7$$!31+++!R(f49F.$\"3D+++%>KZ,*Fir7$$!3&******4'oR?9F.$\"3_+++'oH \"G\"*Fir7$$!30+++BR@J9F.$\"3O+++S*>$f#*Fir7$$!3,+++up&=W\"F.$\"3!)*** **>A&>3%*Fir7$$!3++++&RN@X\"F.$\"3-+++xSYu&*Fir7$$!33+++5:'=Y\"F.$\"35 +++`Qld(*Fir7$$!3)*******3D&3Z\"F.$\"3))*****\\(\\6d**Fir7$$!3%******p JK*y9F.$\"35+++(p-s,\"F.7$$!3++++(QLf[\"F.$\"3\"******zhS,/\"F.7$$!3'* *****pR)p\"\\\"F.$\"3++++5:Tk5F.7$$!31+++Q=3'\\\"F.$\"35+++Gt))*3\"F.7 $$!3#******\\Z^*)\\\"F.$\"3*******p'pU;6F.7$$!3&******Hn*=+:F.$\"3)*** ****Hw(Q9\"F.7$$!3/+++jXp*\\\"F.$\"33+++>j2s6F.7$$!33+++^5Q(\\\"F.$\"3 -+++J9&3?\"F.7$$!33+++_;=$\\\"F.$\"3(******\\WC+B\"F.7$$!3#******49Zq[ \"F.$\"3/+++%o6%f7F.7$$!37+++?q%*y9F.$\"3%******H8E))G\"F.7$$!3+++++)p )o9F.$\"3!******RHz!=8F.7$$!3)******f3BoX\"F.$\"33+++lI)pM\"F.7$$!3+++ +sM$GW\"F.$\"3-+++:;Nv8F.7$$!3*)*****\\CYpU\"F.$\"3!******HC.IS\"F.7$$ !3(******4!\\A49F.$\"3$******z>i(H9F.7$$!3)******\\[](*Q\"F.$\"3'***** *zWgaX\"F.7$$!3'*******[2io8F.$\"3'******4PR*z9F.7$$!3/+++]\"\\fM\"F.$ \"34+++f80.:F.7$$!3/+++!pj=K\"F.$\"33+++48mC:F.7$$!3))*****Hh0lH\"F.$ \"3-++++![Ya\"F.7$$!31+++sz-q7F.$\"3!*******G`!Hc\"F.7$$!30+++%3%fU7F. $\"3++++)RV$z:F.7$$!3%******p(eP97F.$\"3!******HW*)Qf\"F.7$$!35+++j@b& =\"F.$\"3*******Rf)[1;F.7$$!3#******4%oIc6F.$\"3%******pX/rh\"F.7$$!30 +++aq#o7\"F.$\"3,+++6&>di\"F.7$$!3'******zJ,t4\"F.$\"3!******pJNBj\"F. 7$$!3)******4kw9.,\"F.$\"3*******H=)[S;F.7$$!3v*****RfBX#)*Fir$\"3&**** **z&4]R;F.7$$!3A++++4Ua&*Fir$\"34+++xD!oj\"F.7$$!3M+++X?U%H*Fir$\"3)** ****z!H]K;F.7$$!3_+++0,+Y!*Fir$\"36+++FrsE;F.7$$!3A+++xV]5))Fir$\"32++ +'\\9'>;F.7$$!3k*****RJZ\"*e)Fir$\"34+++\")pJ6;F.7$$!3;+++eG*HQ)Fir$\" 3.+++Xx*>g\"F.7$$!3W+++*GYH>)Fir$\"3-+++>&H=f\"F.7$$!3B+++$oX(>!)Fir$ \"33+++rG*4e\"F.7$$!35+++D]&R'yFir$\"3-+++#Ru'p:F.7$$!3V+++s!ffs(Fir$ \"3#******z![1e:F.7$$!3N+++e*ffg(Fir$\"3%******\\/dja\"F.7$$!3p*****Rf vR](Fir$\"35+++rUuM:F.7$$!3b+++N)R)>uFir$\"31+++@zTB:F.7$$!39+++1W?`tF ir$\"3-+++Rdc7:F.7$$!3-+++cDa.tFir$\"3&******>&)pB]\"F.7$$!3g*****pQa, F(Fir$\"3'******R!\\+$\\\"F.7$$!3_*****\\!Q<_sFir$\"3!******4EOY[\"F.7 $$!3]+++Fqd[sFir$\"3-+++=$=uZ\"F.7$$!3')******)e#>esFir$\"3!*******=H \\r9F.7$$!3G+++BFrzsFir$\"3!******f\"z)pY\"F.7$$!3v*****p21\\\"F .7$$!36+++,(*4WxFir$\"3*******zKkJ]\"F.7$$!3e*****p=.Kz(Fir$\"3(****** *))*=h^\"F.7$$!3P+++rmF.7$$!3m*****RJ4Fz&Fir$\"3*******z/4Z$>F.7$$!3z*****H'[U>bFir$\"35 ++++8X]>F.7$$!34+++(QeXB&Fir$\"3-+++$e8X'>F.7$$!3<+++I5lR\\Fir$\"3'*** ****f,zw>F.7$$!39+++N>MOYFir$\"3'********z\">()>F.7$$!3))*****fb^jK%Fi r$\"3/+++jmk&*>F.7$$!3@+++NTY6SFir$\"3%)*****z,,@+#F.7$$!3;+++h&4Np$Fi r$\"31+++&y>l+#F.7$$!3=+++rZMuLFir$\"3&******4*o))3?F.7$$!3C+++))[$e0$ Fir$\"3?+++Ta?4?F.7$$!3x*****RJM)RFFir$\"30++++x\\2?F.7$$!32+++F.7$$!3\"*******y \"z[#=Fir$\"3%******>9@2*>F.7$$!3.+++*R&fO:Fir$\"3%******\\(H]\")>F.7$ $!3/+++M#*Gf7Fir$\"31+++%eV1(>F.7$$!3c+++emtV**Fi]l$\"3#******H]p#e>F. 7$$!3l+++$zC8V(Fi]l$\"3*)*****pD@X%>F.7$$!3;+++AV2n]Fi]l$\"3-+++$*>bH> F.7$$!3!******z&*o3'GFi]l$\"30+++tf_8>F.7$$!3T+++r&4'4#)Fago$\"3/+++rp h'*=F.7$$\"3-+++%e4h/\"Fi]l$\"3%******fc1!z=F.7$$\"3%******4oxbt#Fi]l$ \"3!******RN#)3'=F.7$$\"3w******zz\\WUFi]l$\"3-++++hVU=F.7$$\"3;+++W/x rbFi]l$\"3&******z%='Q#=F.7$$\"3*)*****p+Z\"=nFi]l$\"3$******\\*RN0=F. 7$$\"33+++A\">io(Fi]l$\"31+++p`5(y\"F.7$$\"3)******f_'Q![)Fi]l$\"3))** ***HI0$pg15Fir$\"3,+++r0:1E!Go\")Fi]l$\"3-+++XT:Z;F.7$$\"3a******\\q^lxFi]l $\"3)******>^Exk\"F.7$$\"3S+++r%R^Q(Fi]l$\"35+++$QK,l\"F.7$$\"3[+++o*[ \\/(Fi]l$\"35+++-&QVl\"F.7$$\"3')*****R^UBw'Fi]l$\"3'******HV#Hg;F.7$$ \"3S*****f[TTb'Fi]l$\"3/+++5J#zm\"F.7$$\"3^+++zbUOkFi]l$\"3++++'fTrn\" F.7$$\"3e*****>QtVU'Fi]l$\"3++++=?%yo\"F.7$$\"3,+++)*46KlFi]l$\"3!**** **\\n-**p\"F.7$$\"3Y+++S,dsnFi]l$\"3\"*******4t=8Gu\"F.7$$\"3k*****\\#p ,*R)Fi]l$\"3)******HjM)eKy9F*Fi]l$\"3%******zO8ax\"F. 7$$\"3.+++J\"G>.\"Fir$\"3%******4))pBz\"F.7$$\"3-+++6=fa6Fir$\"3(***** *H-9&4=F.7$$\"3++++[rI&H\"Fir$\"30+++0IlE=F.7$$\"3%******4MfSX\"Fir$\" 3.+++ALfV=F.7$$\"36+++T-lI;Fir$\"33+++vE9g=F.7$$\"3\"******f%**pC=Fir$ \"3/+++p=6w=F.7$$\"3(******\\D]c.#Fir$\"3'******Ro;8*=F.7$$\"3'******> '*pFE#Fir$\"36+++%ozb!>F.7$$\"3)*******H>;0DFir$\"3/+++f>t=>F.7$$\"3w* ****\\(=xhFFir$\"34+++wZhI>F.7$$\"3)******Hy)RJIFir$\"3$*******H63T>F. 7$$\"3B+++Xoq7LFir$\"33+++tr**\\>F.7$$\"3')*****zyQUg$Fir$\"3'******R^ Vs&>F.7$$\"35+++m/V/RFir$\"3'*******yjri>F.7$$\"3!******fdE;@%Fir$\"31 +++4'Gj'>F.7$$\"3))*****RI(4CXFir$\"3++++'\\5!o>F.7$$\"3,+++\"yb+%[Fir $\"33+++^/rn>F.7$$\"3i*****p6ww:&Fir$\"3/+++'[&Rl>F.7$$\"3%******z'=6v aFir$\"3-+++<:0h>F.7$$\"3k*****4s90z&Fir$\"3++++\"[$oa>F.7$$\"3C+++PK0 -hFir$\"3-+++j_JY>F.7$$\"3Y+++@9$zS'Fir$\"3&*******R%*)f$>F.7$$\"3\")* *****fpS1nFir$\"3.+++UowB>F.7$$\"3i*****z%*3e*pFir$\"3-+++Ifs4>F.7$$\" 3_*****H)[busFir$\"3++++,?'R*=F.7$$\"3^*****fzm6a(Fir$\"3!******RB'ew= F.7$$\"3++++>jG%z(Fir$\"3!******RdCx&=F.7$$\"33+++k&)oK!)Fir$\"34+++xk ^P=F.7$$\"3')*****fk%Hb#)Fir$\"31+++BN6;=F.7$$\"3Q+++^F=h%)Fir$\"31+++ .zn$z\"F.7$$\"3Y*****Re(f\\')Fir$\"3%******p\"3Qq)) Fir$\"3-+++z2SYs\"F.7$$\"3%******\\ *z40\"*Fir$\"35+++2=8(p\"F.7$$\"3X+++W9j>#*Fir$\"33+++G.As;F.7$$\"3C++ +>:i:$*Fir$\"3++++#3xtk\"F.7$$\"3w******R6T$R*Fir$\"35+++*))*yA;F.7$$ \"3#******>=DNX*Fir$\"3%******>'Gk)f\"F.7$$\"3?+++g]m'\\*Fir$\"33+++1Y 6v:F.7$$\"3=+++*\\,P_*Fir$\"3)*******ekP_:F.7$$\"3*)*****R_lc`*Fir$\"3 %******4\"3fI:F.7$$\"3f*****4wPP`*Fir$\"3!******>^4*4:F.7$$\"3-+++xhB> &*Fir$\"3)******zPs/\\\"F.7$$\"39+++zBg$\\*Fir$\"3-+++6eSs9F.7$$\"3/++ +%f'Qe%*Fir$\"35+++f:#eX\"F.7$$\"3>+++f:B:%*Fir$\"3%******4g:3W\"F.7$$ \"3%)******=a&eO*Fir$\"3\"******p>nuU\"F.7$$\"3^*****\\)Q.7$*Fir$\"35+ ++)3QeT\"F.7$$\"3#******\\#=eb#*Fir$\"3-+++m=(fS\"F.7$$\"3K+++6XL)>*Fi r$\"3)******z_$*yR\"F.7$$\"3=+++@(G@9*Fir$\"3'******p>4;R\"F.7$$\"3k** ***z\"Ry)3*Fir$\"3/+++Wg5(Q\"F.7$$\"3')*****4r$3S!*Fir$\"35+++#Q_VQ\"F .7$$\"3m*****Hzdx**)Fir$\"3)******f'zH$Q\"F.7$$\"3[+++WXYj*)Fir$\"3!** ****zYuQQ\"F.7$$\"3E+++aWxQ*)Fir$\"3!*******[h*fQ\"F.7$$\"3>+++WX:D*)F ir$\"31+++82c*Q\"F.7$$\"3m*****z!R&R#*)Fir$\"3/+++J.X%R\"F.7$$\"35+++* [!RO*)Fir$\"3.+++RG`+9F.7$$\"3s*****p?RN'*)Fir$\"3$******43jwS\"F.7$$ \"3')*****f^@j+*Fir$\"3)******HS%o:9F.7$$\"33+++wk\\l!*Fir$\"3#******4 EIWU\"F.7$$\"3S+++*R`;9*Fir$\"33+++WfsL9F.7$$\"3%******p61_B*Fir$\"3*) *****\\P!RV9F.7$$\"3S+++X*)QY$*Fir$\"3)******f)zB`9F.7$$\"3M+++WVDv%*F ir$\"3))******H13j9F.7$$\"3v******=Bn@'*Fir$\"3++++@&HFZ\"F.7$$\"3#)** ***fbJ`y*Fir$\"31+++vr*>[\"F.7$$\"3m*****>KUd'**Fir$\"3!*******G$*p!\\ \"F.7$$\"32+++3TA;5F.$\"3++++Col)\\\"F.7$$\"35+++y'*RP5F.$\"34+++Fup0: F.7$$\"31+++%)=+g5F.$\"3&******fdd;^\"F.7$$\"3++++nm\"R3\"F.$\"3(***** *p-%Q;:F.7$$\"35+++rg,46F.$\"3-+++%RN(>:F.7$$\"30+++'[f^8\"F.$\"3*)*** **zb$e@:F.7$$\"3'*******>]>i6F.$\"3&******R%\\\"=_\"F.7$$\"3++++')4'** =\"F.$\"3)*******R;L?:F.7$$\"3%*******)[(G=7F.$\"3*******fN_q^\"F.7$$ \"3)******45)*pC\"F.$\"3,+++9K\">^\"F.7$$\"3'******Hg6fF\"F.$\"35+++d$ o[]\"F.7$$\"3!*******zP%[I\"F.$\"3%******4Q!*e\\\"F.7$$\"35+++`#4OL\"F .$\"3-+++t0(\\[\"F.7$$\"35+++=L-i8F.$\"3'******\\'*=@Z\"F.7$$\"3#***** *>z.**Q\"F.$\"35+++/UOd9F.7$$\"31+++MG2<9F.$\"33+++FKvS9F.7$$\"3$***** *>seLW\"F.$\"30+++g2NA9F.7$$\"3!******>e(fo9F.$\"34+++O'QAS\"F.7$$\"3# ******>.NE\\\"F.$\"3)******p%\\^!Q\"F.7$$\"3&*******QxK::F.$\"3)****** 4.$Hd8F.7$$\"34+++p[aO:F.$\"3(******4J+FL\"F.7$$\"3)******RTphb\"F.$\" 3,+++%*p(oI\"F.7$$\"33+++$Q*4u:F.$\"3%******Rku*z7F.7$$\"33+++X)[-f\"F .$\"3-+++ZY:_7F.7$$\"3-+++:)[Xg\"F.$\"3#******zd'eB7F.7$$\"3*******p'z %ph\"F.$\"3)******p[YW>\"F.7$$\"3$*******yJTF;F.$\"33+++G^\"\\;\"F.7$$ \"3*)*******))Hfj\"F.$\"3%******>9w^8\"F.7$$\"3/+++yA]U;F.$\"3++++;UT0 6F.7$$\"3%******\\C`rk\"F.$\"3/+++NK\"e2\"F.7$$\"3-+++@U#*\\;F.$\"3%** ****\\Wal/\"F.7$$\"3++++wZ(3l\"F.$\"3-+++ZY\"y,\"F.7$$\"3))******[?3]; F.$\"39+++>Wk(*)*Fir7$$\"3++++++kZ;F.$\"3\"*******)Qlci*Fir7$$\"3%**** **\\\\eOk\"F.$\"3%******R[TPO*Fir7$$\"3'******4Ai#Q;F.$\"3R+++[ZH8\"*F ir7$$\"3(******4X*eJ;F.$\"3]******=Kiv))Fir7$$\"3(******pm!zB;F.$\"35+ ++s#))=l)Fir7$$\"3-+++aq-:;F.$\"37+++UL5V%)Fir7$$\"3,+++z)oag\"F.$\"3w *****REqT\"zFir7$$\"3/+++^#HQd\"F.$\"3=+++mL0sxFir7$$ \"3/+++0a\"Hc\"F.$\"3;+++&4]uk(Fir7$$\"3%******f#>8_:F.$\"3()*****\\6R .a(Fir7$$\"32+++b_mT:F.$\"3_+++A\"=0X(Fir7$$\"35+++;ypJ:F.$\"39+++(41w P(Fir7$$\"36+++JhSA:F.$\"3g*****RGZ5K(Fir7$$\"34+++()*eR^\"F.$\"3y**** *\\%o6!G(Fir7$$\"3********)o:l]\"F.$\"3a+++Z\"GRD(Fir7$$\"3!******RSC- ]\"F.$\"3?+++)fT9C(Fir7$$\"3/+++M1A&\\\"F.$\"3()*****\\'\\ZTsFir7$$\"3 -+++>ei\"\\\"F.$\"3_+++#4:FD(Fir7$$\"3/+++%4Y&*[\"F.$\"3')*****\\!4tts Fir7$$\"3-+++472*[\"F.$\"3h*****Hg()HI(Fir7$$\"3)******4jt-\\\"F.$\"3j ******\\>')QtFir7$$\"3)******p#y?$\\\"F.$\"3[*****fZe'ztFir7$$\"3-+++R (4z\\\"F.$\"3!)*****f\\EOU(Fir7$$\"3%******>X'R/:F.$\"3++++lx(*ouFir7$ $\"3.+++kgm7:F.$\"3z*****Hh/R^(Fir7$$\"3(******zt(pA:F.$\"3[*****pN)fc vFir7$$\"3!******R&>XM:F.$\"3_+++DyE&f(Fir7$$\"33+++U4(ya\"F.$\"3X**** **fx:GwFir7$$\"3)******fHzGc\"F.$\"3i*****\\&pc`wFir7$$\"33+++^ZQz:F.$ \"3o*****H&e')pwFir7$$\"31+++J\"zsf\"F.$\"3++++kM^vwFir7$$\"3#******\\ WRkh\"F.$\"3)******RRt!pwFir7$$\"3/+++?\"Hnj\"F.$\"3%)*****zyG#\\wFir7 $$\"37+++p$**zl\"F.$\"3w******fgz9wFir7$$\"3#*******o14!o\"F.$\"3w**** *>APZc(Fir7$$\"3(******4MMGq\"F.$\"35+++\"pq\")\\(Fir7$$\"3(*******>U0 Et(Fir7$$\"35+++)*Rt'z\"F.$\"33+++g^8bqFir7$ $\"3/+++n\"4+#=F.$\"3]******oV#))*oFir7$$\"35+++.)HG%=F.$\"3R+++s-RCnF ir7$$\"3-+++NE,l=F.$\"3N+++-A?KlFir7$$\"37+++@'zj)=F.$\"3*******p83GK' Fir7$$\"3++++-(fn!>F.$\"3Y+++v!Hp4'Fir7$$\"33+++\"\\!*f#>F.$\"3!****** zj^a&eFir7$$\"3'******\\()>R%>F.$\"3'******p)*=%*f&Fir7$$\"3)******H_2 /'>F.$\"3P+++b,-I`Fir7$$\"3-+++viKv>F.$\"3))*****\\(yd[]Fir7$$\"3#**** **fSj&))>F.$\"3y*****p2Nlv%Fir7$$\"3#)*****fu@++#F.$\"3/+++i,WbWFir7$$ \"37+++Y1i4?F.$\"3/+++/7$p9%Fir7$$\"3\")*****py'HF$QFir 7$$\"3)******z\"[+B?F.$\"3'*******p4d9NFir7$$\"3z*****>\"yrE?F.$\"3%)* ****fa!H%>$Fir7$$\"3')*****RbF%G?F.$\"37+++p9qtGFir7$$\"3<+++GY9G?F.$ \"3%*******RziaDFir7$$\"3A+++L$)*e-#F.$\"3/+++nj()QAFir7$$\"3&)******3 kt@?F.$\"3-+++\\q@G>Fir7$$\"3!******HeCd,#F.$\"33+++CiOC;Fir7$$\"3/+++ Of%z+#F.$\"3&******fpo*G8Fir7$$\"33+++,,])*>F.$\"3,+++27eV5Fir7$$\"3++ ++%H-v)>F.$\"3W+++Aqc'p(Fi]l7$$\"3%******\\>#3v>F.$\"3#******H*oH&3&Fi ]l7$$\"3-+++&o#Qh>F.$\"3#*******4\"GSh#Fi]l7$$\"3%*******\\%el%>F.$\"3 >+++<\"yM$HFago7$$\"3*******pYu2$>F.$!3))*****4%>qn=Fi]l7$$\"34+++!R/U \">F.$!3;+++#*RrhQFi]l7$$\"35+++U)Gq*=F.$!31+++v!*)Ho&Fi]l7$$\"3/+++VO Vz=F.$!3*)******\\6fFtFi]l7$$\"3#******H(zgh=F.$!3#)*****fj%Q$z)Fi]l7$ $\"3(******p]UP%=F.$!3*******\\I0!35Fir7$$\"32+++Ev-E=F.$!3)******>!*4 *=6Fir7$$\"36+++?5l3=F.$!3++++oDQ77Fir7$$\"3-+++9oz\"z\"F.$!3%******\\ '*H*)G\"Fir7$$\"31+++EFkv@0YU\"Fir7$$\"3)**** **\\8KIt\"F.$!33+++lv\"=W\"Fir7$$\"3$******zVv7s\"F.$!3!******p#G.Z9Fi r7$$\"35+++Hz&4r\"F.$!39+++VOkT9Fir7$$\"3)*******)y'=-?M^S\"Fir7$$\"3-+++())G'*o\"F.$ !3#******fbksP\"Fir7$$\"3++++O.(fo\"F.$!3!******\\**e_M\"Fir7$$\"31+++ (>8To\"F.$!3,+++[x(3J\"Fir7$$\"3#********QuSo\"F.$!3/+++PQ!fF\"Fir7$$ \"3)******zS^eo\"F.$!3)******\\OD@C\"Fir7$$\"3'*******HBU*o\"F.$!3(*** ***\\v<8@\"Fir7$$\"3#******4/YZp\"F.$!3/+++ChA&=\"Fir7$$\"3*******>li< q\"F.$!3/+++Dzal6Fir7$$\"3,+++CTR5B=\"Fir7$$\"3))*****p3B*edFI#=F. $!3-+++r4*H^\"Fir7$$\"3\"*******G'>-%=F.$!3\"*******)*Q@H;Fir7$$\"3'** ****HE0v&=F.$!3-+++`s8j-$pu=F.$!3$*******))\\$[\">Fi r7$$\"3/+++J;f\"*=F.$!3)******4Z)>%3#Fir7$$\"32+++,>,3>F.$!33+++9r$4F# Fir7$$\"3/+++;'oP#>F.$!3!******H*3euCFir7$$\"3/+++wBoQ>F.$!3-+++,Z[%p# Fir7$$\"3!******HP\"e_>F.$!3')*****4_M)HHFir7$$\"31+++*3.`'>F.$!3++++M `lzJFir7$$\"3!******>!fpw>F.$!3z*****zp?GW$Fir7$$\"3++++z0i')>F.$!3,++ +&*Q1=PFir7$$\"33+++Q;&\\*>F.$!34+++k0*R+%Fir7$$\"30+++#ey:+#F.$!3%*** ***4h#4*H%Fir7$$\"3.+++\")pS1?F.$!3B+++ZLw,YFir7$$\"3%******pQf$4?F.$! 32+++JOJ5\\Fir7$$\"37+++)3w.,#F.$!3*)*******))))HA&Fir7$$\"3?+++#o:%4? F.$!3c*****H#o)z`&Fir7$$\"3********yaX1?F.$!3q*****4hvM&eFir7$$\"3/+++ -<\\,?F.$!3!)*****fY7w;'Fir7$$\"31+++=&RX*>F.$!3O+++(Gi&ykFir7$$\"3-++ +pGj&)>F.$!3Y+++#G;Xy'Fir7$$\"3-+++IT#[(>F.$!3W*****>L5P3(Fir7$$\"35++ +yN=i>F.$!3))*****\\#HWutFir7$$\"31+++'o)zZ>F.$!3o******yC4bwFir7$$\"3 6+++aKxJ>F.$!3A+++jQ8CzFir7$$\"3/+++rjA9>F.$!3]******fR:!=)Fir7$$\"3)* *****zB\"H&*=F.$!3w*****p6m=U)Fir7$$\"31+++VQ6v=F.$!3#)******3L7[')Fir 7$$\"3%******4_^Q&=F.$!3W+++0*Hz&))Fir7$$\"3#******4Sr;$=F.$!3#)*****z \">X]!*Fir7$$\"3,+++a([(3=F.$!3Q+++3c-D#*Fir7$$\"33+++o_E&y\"F.$!3]*** **4Ok6Q*Fir7$$\"33+++isShU Ky[\"F.$!3Z+++CLYI(*Fir7$$\"3)******R>o$y9F.$!33+++l!p!o'*Fir7$$\"3!** ****zW;2Z\"F.$!3++++[e)Qg*Fir7$$\"3!******R+$*[Y\"F.$!3i*****4Rk(R&*Fi r7$$\"33+++*o%*3Y\"F.$!3Y*****RH\\vZ*Fir7$$\"3++++D$*pe9F.$!3L+++//1>% *Fir7$$\"3%*******4fEe9F.$!3I+++;X2m$*Fir7$$\"3/+++%)\\`f9F.$!3q*****z e2.K*Fir7$$\"3/+++'=HCY\"F.$!3[+++^wR$G*Fir7$$\"3-+++**R&oY\"F.$!3u*** **Hc))oD*Fir7$$\"3/+++o')ps9F.$!3s*****\\w9AC*Fir7$$\"3-++++t$)z9F.$!3 t*****>;(oS#*Fir7$$\"3++++C,8)[\"F.$!3O+++_-[`#*Fir7$$\"3#******p*[U( \\\"F.$!3O+++.1i\"G*Fir7$$\"30+++_%ev]\"F.$!3$)*****HxwfK*Fir7$$\"3'** ****zNe$=:F.$!3#*******f2D(Q*Fir7$$\"3)******RoW'H:F.$!3'*******H5(fY* Fir7$$\"3,+++[=BT:F.$!3++++2s[i&*Fir7$$\"3#******z^IHb\"F.$!3g*****fZm pn*Fir7$$\"3++++c&\\Xc\"F.$!3k*****fs\"R4)*Fir7$$\"3!******p(z*ed\"F.$ !3#)*****fYh&f**Fir7$$\"3)******4!py'e\"F.$!3++++_\"4F,\"F.7$$\"3#**** **4[Jqf\"F.$!3.+++]=9J5F.7$$\"3(******fy_kg\"F.$!3'******R]!=^5F.7$$\" 32+++;'z[h\"F.$!3))*****RnMF2\"F.7$$\"3.+++M-:A;F.$!31+++y!)p&4\"F.7$$ \"3&******f*R6G;F.$!35+++7'\\*>6F.7$$\"32+++kGjK;F.$!3-+++@XNX6F.7$$\" 3)******\\y#eN;F.$!3/+++2dwr6F.7$$\"3\"******p#\\&oj\"F.$!3'******f;D! *>\"F.7$$\"33+++cnNO;F.$!3-+++Ob'pA\"F.7$$\"3(******R%H,M;F.$!3))***** Ru6aD\"F.7$$\"3%******f5m(H;F.$!35+++KF=%G\"F.7$$\"3.+++atdB;F.$!3\"** ****HD$488F.7$$\"32+++emU:;F.$!33+++/d&>M\"F.7$$\"31+++DIJ0;F.$!3-+++) *>eq8F.7$$\"3-+++%[aKf\"F.$!3!******pV&y)R\"F.7$$\"3#******z(yGz:F.$!3 $******4e#QE9F.7$$\"37+++q%oMc\"F.$!3)*******z]>`9F.7$$\"3'******zOpea \"F.$!3)******zY^!z9F.7$$\"3,+++n2eE:F.$!3-+++()))y.:F.7$$\"3#*******G !4d]\"F.$!3#******Htas_\"F.7$$\"3'******RfvL[\"F.$!3%******4>3$\\:F.7$ $\"3#******>v:(f9F.$!3#******4n@)p:F.7$$\"3!******HFx[V\"F.$!31+++,@o) e\"F.7$$\"3$******H\"*=!49F.$!34+++$3#z0;F.7$$\"3%******>#)3BQ\"F.$!3, +++\"*32@;F.7$$\"35+++bG#\\N\"F.$!30+++7`XM;F.7$$\"30+++0G/F8F.$!3!*** ***HI+fk\"F.7$$\"3#********ea))H\"F.$!3/+++r%z`l\"F.7$$\"33+++'RY0F\"F .$!3%******HP&)Gm\"F.7$$\"3/+++/oIU7F.$!31+++;'H%o;F.7$$\"3*)*****\\\" HK97F.$!3#******pxU?n\"F.7$$\"3++++)\\yn=\"F.$!3'******>7uPn\"F.7$$\"3 /+++r@&)f6F.$!3/+++X6pt;F.7$$\"3\"*******RcrL6F.$!3!******p\"*y=n\"F.7 $$\"3'******>,K&36F.$!3++++j#R%o;F.7$$\"3/+++'>aW3\"F.$!3/+++g(*[j;F.7 $$\"3%*******4Mih5F.$!3++++#eirl\"F.7$$\"3++++2y;S5F.$!33+++(=.'\\;F.7 $$\"3!******fB,--\"F.$!33+++o)o4k\"F.7$$\"3++++X@#=+\"F.$!3!*******yrU J;F.7$$\"3))*****pQE6&)*Fir$!35+++fU:@;F.7$$\"3K+++ypP,(*Fir$!3/+++aIL 5;F.7$$\"3w*****4nX%p&*Fir$!35+++r9:*f\"F.7$$\"3s*****\\l>Xa\"F.7$$\"3K+++sKTb\"*Fir$!3#******f$p:N:F.7$$\"3e*** **Rbig9*Fir$!34+++`isE:F.7$$\"3)******\\-o<:*Fir$!3'*******oiQ>:F.7$$ \"3]*****zv=9<*Fir$!3********RRG8:F.7$$\"3********y.w.#*Fir$!3\"****** z-`&3:F.7$$\"3W+++PsSZ#*Fir$!33+++eFJ0:F.7$$\"3g*****H*e&3I*Fir$!3++++ Mmm.:F.7$$\"33+++5)*\\i$*Fir$!3)*******=9q.:F.7$$\"3n*****p9X1V*Fir$!3 &******zG'[0:F.7$$\"3Z*****R[FN]*Fir$!3*******R;s!4:F.7$$\"3U+++d$H$z& *Fir$!3$******HC\"\\9:F.7$$\"3U+++J%)>c'*Fir$!35+++.nv@:F.7$$\"3Z+++?h EK(*Fir$!3/+++0E'3`\"F.7$$\"3m*****4Zmc!)*Fir$!3(******H)RyT:F.7$$\"3c *****p4bX()*Fir$!31+++7rZa:F.7$$\"3n*****\\(z7P**Fir$!31+++o*z)o:F.7$$ \"3Y******z)R;***Fir$!3'*******[G\"\\e\"F.7$$\"30+++FAk.5F.$!31+++y\"z Cg\"F.7$$\"3(******>/!*p+\"F.$!33+++fkY@;F.7$$\"31+++e4145F.$!31+++*QZ i6@+\"F.$! 3/+++7o\"Gt\"F.7$$\"3a*****\\#e$3'**Fir$!3%******\\hKsv\"F.7$$\"3o**** *RI_?))*Fir$!3!*******yc%>y\"F.7$$\"3!)*****4k5Wy*Fir$!3-+++*Rmn!=F.7$ $\"3q******>Jun'*Fir$!3,+++FK]J=F.7$$\"3t*****H(42K&*Fir$!35+++_X'f&=F .7$$\"3]*****>3/wP*Fir$!35+++!eg*z=F.7$$\"3!******fxQZ?*Fir$!3++++,_I. >F.7$$\"3L+++1P09!*Fir$!32+++Ey\"e#>F.7$$\"3c*****H)QI1))Fir$!33+++l^K Z>F.7$$\"3e*****H!HT#e)Fir$!33+++SHmn>F.7$$\"3\")*****f\\jMM)Fir$!31++ +8vn')>F.7$$\"3%)*****4X'o!4)Fir$!3'******\\SFU+#F.7$$\"3d*****p0[a#yF ir$!3')*****pq%=??F.7$$\"3k******zhB\\vFir$!3++++]jVM?F.7$$\"3y*****>7 XOE(Fir$!3;+++K_)o/#F.7$$\"39+++E%f.(pFir$!3)******R>^u0#F.7$$\"3'**** **4yO6n'Fir$!39+++B=2m?F.7$$\"3K+++2-znjFir$!3#******z3.F2#F.7$$\"3!** ****Hqp@1'Fir$!39+++*y>t2#F.7$$\"3++++MN9cdFir$!3')*****z#e\"*z?F.7$$ \"37+++n$z:X&Fir$!39+++#G/03#F.7$$\"3[*****fVD.:&Fir$!3!******zH<\"z?F .7$$\"3++++?>>a[Fir$!3#)*****zy0e2#F.7$$\"3%)*****4vK\\c%Fir$!3?+++]*Q 12#F.-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fdd^l-%+AXESLABELSG6$Q!6\"Fhd^l- %&STYLEG6#%&POINTG-%(SCALINGG6#%,CONSTRAINEDG-%%VIEWG6$%(DEFAULTGFee^l " 1 5 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }} }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 190 "We see that the motion is that \+ of a regularly shaped rosette. To achieve better accuracy (we note tha t the solution is slipping after a complete round) we would need to re duce the step-size." }}{PARA 0 "" 0 "" {TEXT -1 72 "We can try cases w here the solution gets further away from the filament:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "dt:=0.02;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dtG$\"\"#!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "N:=5000;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"NG\"%+]" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from 1 to N do:" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Verlet(i,10,1/2); od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "plot([seq([rx[i*10],ry[i*10]],i=1.. N/10)],style=point,scaling=constrained);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7`jl7$$\"3'******f26: 4\"!#<$\"3++++7k\"e3\"F*7$$\"3/+++^/!GQ\"F*$\"3-+++#>(zL8F*7$$\"37+++w I\"[&=F*$\"37+++AQ>)o\"F*7$$\"3%******>nXR[#F*$\"33+++y@a&4#F*7$$\"3A+ ++mIF\\KF*$\"3z*****pxFJ^#F*7$$\"3()*******>()G8%F*$\"3\")*****4Qj#3HF *7$$\"3&)*****>83)=^F*$\"33+++/xvbKF*7$$\"3')*****z4n?>'F*$\"3++++E>(e `$F*7$$\"3!******R[Q\"QtF*$\"35+++*>oHt$F*7$$\"3:*****p\"3jU&)F*$\"3') *****>WbY$QF*7$$\"3u*****R]U6z*F*$\"3=+++%o[7$QF*7$$\"3#******40Ap5\"! #;$\"3?+++L)=ar$F*7$$\"3********[#QiB\"F\\o$\"3)******R$z&>[$F*7$$\"3% ******H&zhl8F\\o$\"31+++:LhFJF*7$$\"3)******>WGO\\\"F\\o$\"3!)*****fXi 4l#F*7$$\"3=+++?&f)=;F\\o$\"3!******4I5B0#F*7$$\"3<+++bZ$*R)fL8F*7$$\"3/+++8K_b=F\\o$\"3'******pEpJ)\\!#=7$$\"3/+++U7Nk>F\\o $!39+++6&4e[%F]q7$$\"35+++[T@l?F\\o$!31+++bBx+:F*7$$\"3%)*****\\@()p:# F\\o$!3%)*****4Ig1l#F*7$$\"3<+++mkjQAF\\o$!3?+++aoZ*)QF*7$$\"3(******* Q%G#4BF\\o$!3h*****f5$R2_F*7$$\"3++++9\"RzO#F\\o$!3s*****H^NOf'F*7$$\" 3*)*****f%=19CF\\o$!3#)*****R94m.)F*7$$\"3))*****z99qW#F\\o$!3')*****4 ?ES_*F*7$$\"35+++@LMmCF\\o$!3#******4'RI/6F\\o7$$\"3!******p\"3trCF\\o $!3/+++!3Q!e7F\\o7$$\"3%)*****HE&*HY#F\\o$!3'******R/]AT\"F\\o7$$\"32+ ++PS4SCF\\o$!33+++W4dl:F\\o7$$\"3\"******zyBJS#F\\o$!31+++kAj;BN#F\\o$!37+++j+3k=F\\o7$$\"3#******pd]!)G#F\\o$!3.+++&)))e1 ?F\\o7$$\"35+++W+#3@#F\\o$!3*******4QvG9#F\\o7$$\"32+++'Rc77#F\\o$!3!* ******Q9rrAF\\o7$$\"32+++\"y3,-#F\\o$!3-+++fn$>R#F\\o7$$\"3!********)* Q#3>F\\o$!3-+++J2Z-DF\\o7$$\"3;+++&y7my\"F\\o$!3\"******>RBBg#F\\o7$$ \"3))*****R4!Hc;F\\o$!3))******\\`g!p#F\\o7$$\"3#******>N9%=:F\\o$!3)* *****>0Plw#F\\o7$$\"3++++i3?u8F\\o$!3&******Rdc%HGF\\o7$$\"31+++kW#\\A \"F\\o$!3))*****\\ME)yGF\\o7$$\"3%******Hf1>2\"F\\o$!3-+++b&QU\"HF\\o7 $$\"3]*****\\I>];*F*$!3%)*****z=>a$HF\\o7$$\"3G+++Jf%3g(F*$!35+++g3BUH F\\o7$$\"3W+++48MSgF*$!3(******4HuY$HF\\o7$$\"3Q+++dX@(\\%F*$!37+++1\" ))G\"HF\\o7$$\"3))*****R)y%\\)HF*$!3')*****pdZr(GF\\o7$$\"3#*******f!e m^\"F*$!31+++a:'y#GF\\o7$$\"31+++b!4'\\5F]q$!33+++Y&obw#F\\o7$$!3-+++K )f\"Q7F*$!3-+++!3J4p#F\\o7$$!3>+++G!y9]#F*$!3')*****>&)GZg#F\\o7$$!3!* *****42WYn$F*$!32+++44&y]#F\\o7$$!3S+++viH[ZF*$!3'******\\a'G,CF\\o7$$ !3E+++YO;9dF*$!3/+++,^6'G#F\\o7$$!3-+++r$f^c'F*$!33+++&)[\\j@F\\o7$$!3 q*****zWkaH(F*$!3%)*****fE^Y.#F\\o7$$!3\"******pS,1!zF*$!3:+++:S'3!>F \\o7$$!3#3++Ij(\\x$)F*$!35+++xSXj\"*p Pi\"F\\o7$$!3Y+++s>hT*)F*$!3)******\\MtJ[\"F\\o7$$!3\"*******)pV,.*F*$ !3++++]_-V8F\\o7$$!3c*****pyEJ**)F*$!33+++06n/7F\\o7$$!3G*****fOZ^$))F *$!3%*******zmUp5F\\o7$$!3S******f1Ti&)F*$!3))*****faPcQ*F*7$$!3C***** HZtF=)F*$!3L*****\\;hH8)F*7$$!3p*****\\P#z0xF*$!3W+++X)fw%pF*7$$!3A+++ I5!G9(F*$!3z*****HH4.%eF*7$$!3%*******Qz.2lF*$!3-+++&o90#[F*7$$!3r**** **o)eQ\"eF*$!33+++'e&z'*QF*7$$!3M+++)R)3\"3&F*$!3#)*****Hu$[wIF*7$$!3y *****\\5*fHVF*$!3))*****HfTcO#F*7$$!3-+++wAE%e$F*$!3))*******f=!pDi:%pF]q7$$!3\"******>t69S\"F*$! 3*)*****4b-Y!eF]q7$$!3\"******>?dwI\"F*$!3)******z;PJ*eF]q7$$!3!****** fjV3Z\"F*$!3%)*****p(p(*zqF]q7$$!3++++0:#)p=F*$!3>+++B&e%R!*F]q7$$!3-+ ++R+gkCF*$!3!******f5?U8\"F*7$$!3#)*******e(H#3(4%F*$!33+++'ohxa\"F*7$$!3Q+++)zh(y]F*$!35+++!4$QE(F*$!33+++iY$Go\"F*7$$!3d+ ++DE**H%)F*$!3%******HD*4Q:F*7$$!3Q+++t=GA'*F*$!3/+++si$RG\"F*7$$!31++ +t$RC3\"F\\o$!3]+++5*ef:*F]q7$$!3.+++o%f??\"F\\o$!3E+++hY>0VF]q7$$!31+ ++)ep&>8F\\o$\"36+++\"fv'=F\\o$\"3S+++v]UogF*7$$!3;+++\\T=p>F\\o$\"33+++u[ (3P(F*7$$!37+++(p*[B?F\\o$\"36+++h#H+u)F*7$$!3-+++\\U[l?F\\o$\"3$***** ***4Yk,\"F\\o7$$!3')*****>5oX4#F\\o$\"3)******R'G?j6F\\o7$$!3*)*****pa t-6#F\\o$\"3.+++C8+88F\\o7$$!33+++X(oA6#F\\o$\"33+++[e_k9F\\o7$$!38+++ %[g.5#F\\o$\"3!*******)QJkh\"F\\o7$$!3#******4s&\\u?F\\o$\"3)******\\$ yNnF\\o7$$!3'********R%Q\")>F \\o$\"3'*******fQ%31#F\\o7$$!37+++ens9>F\\o$\"3$)*****4mO2?#F\\o7$$!36 +++KRGN=F\\o$\"3-+++qXMMBF\\o7$$!33+++#eyOu\"F\\o$\"3'******f'QWgCF\\o 7$$!38+++CVlS;F\\o$\"39+++'*z(yd#F\\o7$$!3(*******H\"oq_\"F\\o$\"33+++ %Qpbo#F\\o7$$!3&********e\")QS\"F\\o$\"39+++(\\IDy#F\\o7$$!3'******\\3 ^@F\"F\\o$\"3%)*****fyty'GF\\o7$$!30+++\\q,L6F\\o$\"39+++g6#3%HF\\o7$$ !3C+++uX#p()*F*$\"3!******H[62+$F\\o7$$!3#******p$[]u$)F*$\"3#******HV 2q/$F\\o7$$!3K+++!=;h$oF*$\"39+++L5IzIF\\o7$$!3#*******zGIv_F*$\"35+++ $y45$F\\o7$$!3))*****zp]99#F*$\"37 +++X[5!4$F\\o7$$!3c******GS_ffF]q$\"37+++$G6]1$F\\o7$$\"3Y+++31pr\"*F] q$\"33+++Q:\"f-$F\\o7$$\"3%******\\,aZQ#F*$\"35+++8>@tHF\\o7$$\"3?+++U ?8%z$F*$\"36+++WzW2HF\\o7$$\"3d*****4*=DL^F*$\"3.+++k(y#HGF\\o7$$\"3o* ******Q03R'F*$\"32+++V/[RFF\\o7$$\"3/+++RZMcvF*$\"3#******p#z$*QEF\\o7 $$\"3^*****H^\"R?')F*$\"39+++&*fjGDF\\o7$$\"33+++%4PXd*F*$\"3%*******) =\\'4CF\\o7$$\"30+++)H`6/\"F\\o$\"37+++/18$G#F\\o7$$\"3.+++Vq`76F\\o$ \"3!*******H**H]@F\\o7$$\"31+++4\\8r6F\\o$\"3<+++.3V7?F\\o7$$\"31+++FM h;7F\\o$\"3#*******Hu$3(=F\\o7$$\"33+++n-y[7F\\o$\"3%)*****>'3'os\"F\\ o7$$\"33+++Ewen7F\\o$\"33+++TZ&=e\"F\\o7$$\"3++++eW8t7F\\o$\"3*******p yqrV\"F\\o7$$\"31+++Owml7F\\o$\"3)******p8WTH\"F\\o7$$\"3/+++HAeX7F\\o $\"3#******ppyS:\"F\\o7$$\"3.+++V4U87F\\o$\"34+++OCB=5F\\o7$$\"33+++3I ()p6F\\o$\"3y*****H,G!y))F*7$$\"3/+++WFx:6F\\o$\"3l*****fBB\"RwF*7$$\" 3)******\\X)4_5F\\o$\"3#)*****H^VfZ'F*7$$\"3S*****>,B(*z*F*$\"3=+++w*) y(R&F*7$$\"3_*****Rn>m+*F*$\"3<+++E^y7WF*7$$\"3i*****Rxfe:)F*$\"3y**** *>8Rx_$F*7$$\"3s*****4M[KE(F*$\"37+++B,*zu#F*7$$\"3)******\\$*=kM'F*$ \"3))*****4Z[s2#F*7$$\"3F+++]e=AF*$\"3()*****H>0B]$F]q7$$\"35+ ++BLS@?7M=#F*$\"3&)*****z>EC%yF]q7$$\"31+++'**fH&GF*$\"3,+++JRrA )*F]q7$$\"31+++o3EnOF*$\"3/+++Scm\\6F*7$$\"3#)******Q'Rcf%F*$\"3!***** *\\WM9E\"F*7$$\"3n*****4#y%Hh&F*$\"3'******>6bm,\"F\\o$\"3(****** \\T<*>YF]q7$$\"32+++0bvL6F\\o$!3)******RmVod#!#>7$$\"31+++A2$*[7F\\o$! 3A+++W8o'H'F]q7$$\"3%******R'))og8F\\o$!3!******>[w&[8F*7$$\"3%******R G3wY\"F\\o$!3%******HjY'z@F*7$$\"33+++dKMo:F\\o$!3:+++(3Y%=JF*7$$\"3/+ ++v5jh;F\\o$!3u*****RSy!fTF*7$$\"31+++\"3+ju\"F\\o$!3m*****z.-VH&F*7$$ \"3()*****R#yF@=F\\o$!3V+++b&\\c^'F*7$$\"3')******)=*f&)=F\\o$!3U+++b% \\N\"yF*7$$\"3*******p%QTQ>F\\o$!3S+++0@Xx\"*F*7$$\"3'******>=$**y>F\\ o$!3-+++^fff5F\\o7$$\"3\"********GOn+#F\\o$!3.+++Qfp07F\\o7$$\"3****** *p%[<@?F\\o$!3)******>FwZN\"F\\o7$$\"3;+++(*p(>-#F\\o$!3#*******eW_0:F \\o7$$\"3&)*****p**\\*3?F\\o$!33+++F()fc;F\\o7$$\"39+++G9/#)>F\\o$!3(* *****zRUm!=F\\o7$$\"33+++*GR8%>F\\o$!3=+++%H)Ha>F\\o7$$\"3!******ztqq) =F\\o$!31+++DIA)4#F\\o7$$\"35+++^$*f>=F\\o$!3))*****>-,rB#F\\o7$$\"3,+ ++Q8UR[P!GIF\\o7$$\"3!*******ft)eQ(F*$!3!******>gcJ 2$F\\o7$$\"3'******>aCt%eF*$!36+++fyF/JF\\o7$$\"33+++]75(G%F*$!3)***** *p%48@JF\\o7$$\"34+++Jx%*=FF*$!3(******4W\"eBJF\\o7$$\"31+++0[lc6F*$!3 6+++xBj6JF\\o7$$!3E+++T@mgQF]q$!3=++++TU&3$F\\o7$$!3)******fpAd*=F*$!3 !*******4GBXIF\\o7$$!3'******4-y\"fLF*$!3!******fqn9*HF\\o7$$!3!****** Hc&yjZF*$!3*******fzmY#HF\\o7$$!3%)*****\\!y^(4'F*$!3'******4V\"\\XGF \\o7$$!3c*****z4!4\\tF*$!31+++l$>Zv#F\\o7$$!3P*****4*p23&)F*$!3;+++!*o B`EF\\o7$$!3')******y1-l&*F*$!3%)*****>sH?a#F\\o7$$!35+++_I:^5F\\o$!3* )******))H[H#F\\o7$$!31+++>Zb/7F\\o $!33+++p&*=h@F\\o7$$!3%******\\\"fBi7F\\o$!3,+++=^bA?F\\o7$$!3%******* pqu18F\\o$!3%)*****pbH-)=F\\o7$$!3'******\\p%*yL\"F\\o$!3=+++HCbN\"F\\o$!3))*****R?4Ro( F*7$$!3)******4xm08\"F\\o$!30+++]KO:lF*7$$!3/+++^mhc5F\\o$!3!)******4> #>V&F*7$$!3o*****pb:Hv*F*$!3S+++J5pTWF*7$$!3Y*****>JG'z))F*$!3'******4 jn9b$F*7$$!31+++O_ZhzF*$!3?+++\"f&fmFF*7$$!3,+++p,A:qF*$!33+++5G\"34#F *7$$!3'******z'\\ZfgF*$!3,+++%)R3E:F*7$$!3*)******)yZ^6&F*$!3++++LGTs5 F*7$$!38+++Zm?1UF*$!39+++&*zNwsF]q7$$!3#******R8W4O$F*$!3A+++j0Ls[F]q7 $$!3A+++1/%Rh#F*$!3)******4olJW$F]q7$$!3#)*****RU2&3?F*$!3>+++ZGD.HF]q 7$$!3/+++!Gtqf\"F*$!3s*****z`@i<$F]q7$$!36+++DnuI9F*$!3y*****4H!eQUF]q 7$$!3,+++7U\"=`\"F*$!3%******4\\924'F]q7$$!35+++m[%*y=F*$!3#******pv&> *f)F]q7$$!3%)*****\\a'**HCF*$!31++++=$f9\"F*7$$!3?+++IrhXJF*$!36+++C.M K9F*7$$!3/+++Oim%*RF*$!3%******R.L))o\"F*7$$!3I+++$GnA&\\F*$!33+++k+A \"*=F*7$$!3?+++0.S(*fF*$!3$)******f;j??F*7$$!3G+++NqI6rF*$!3?+++@SXi?F *7$$!3g*****H%fcw#)F*$!3/+++wW]0?F*7$$!31+++&[%ew%*F*$!3++++K\"f9%=F*7 $$!33+++!yL&p5F\\o$!3-+++?EYk:F*7$$!3-+++4as\">\"F\\o$!3!******p\"f&3< \"F*7$$!3)******H#)=FJ\"F\\o$!3u******)=%y*e'F]q7$$!3,+++f[/J9F\\o$!3# ******RL\\9!HFg_n7$$!35+++:eGX:F\\o$\"3'******z/Q8<(F]q7$$!3-+++F\\o$\"3O+++qGjrZF*7$$!33+++ G@F5?F\\o$\"3\"******R4!y#F\\o$\"3%******4CyQ;\"F\\o7$$!3$******HP\"[0AF\\o$ \"3&******fAcVJ\"F\\o7$$!3<+++J=s/AF\\o$\"3/+++BjBm9F\\o7$$!3;++++'=+> #F\\o$\"3%)*****H))p\"=;F\\o7$$!3)******>yd8;#F\\o$\"3)******fH(zoF\\o7$$!3))*****z#G!G1#F\\o$\"3/+++ $)fsg?F\\o7$$!3'*******f*pN*>F\\o$\"3#******f'3Q*>#F\\o7$$!3++++h]p6>F \\o$\"3()*****zEk9L#F\\o7$$!3'******\\CKy\"=F\\o$\"3))*****>SrdX#F\\o7 $$!37+++#=aFr\"F\\o$\"33+++'on6d#F\\o7$$!3'******>@Wtf\"F\\o$\"3=+++D/ gwEF\\o7$$!3'******fI(es9F\\o$\"3;+++![46x#F\\o7$$!3)******\\5g&R8F\\o $\"39+++dq$Q&GF\\o7$$!3)*******[*>%*>\"F\\o$\"3&*******fk.CHF\\o7$$!31 +++]KR`5F\\o$\"3#******4!)z5)HF\\o7$$!3q+++7)Hw-*F*$\"3-+++EVYCIF\\o7$ $!37+++*)pb)[(F*$\"3')*****\\VGIF\\o7$$\"3)******zD\"=2A F]q$\"3%******p#=a')HF\\o7$$\"3++++%[c1n\"F*$\"3&)*****R'GZJHF\\o7$$\" 3?+++Rb#)fIF*$\"3%******p2_N'GF\\o7$$\"3W+++!*)3kP%F*$\"39+++w!oMy#F\\ o7$$\"34+++$Ql$4cF*$\"3++++:U-#p#F\\o7$$\"3%)*****4YW&[nF*$\"3))****** 4-8!f#F\\o7$$\"3w*****z%Hz%y(F*$\"3-+++rHzyCF\\o7$$\"3'******4@`+r)F*$ \"3!*******Rf5fBF\\o7$$\"3u*****46^u^*F*$\"3-+++!)zBKAF\\o7$$\"3****** *ROP,-\"F\\o$\"35+++Y8U*4#F\\o7$$\"3#******Rb`d2\"F\\o$\"3#******4%)Q> '>F\\o7$$\"30+++oMI=6F\\o$\"3<+++#Q56#=F\\o7$$\"3%******\\kRw9\"F\\o$ \"3#******z8z#y;F\\o7$$\"3/+++P1wj6F\\o$\"3$******HB(zM:F\\o7$$\"3%*** ***\\D8o;\"F\\o$\"3)********[6?R\"F\\o7$$\"3-+++pQ4d6F\\o$\"33+++[([7D \"F\\o7$$\"3.+++=*[]8\"F\\o$\"30+++k8!Q6\"F\\o7$$\"33+++!zu75\"F\\o$\" 3V+++Rp74)*F*7$$\"3++++:v^c5F\\o$\"30+++$eGw`)F*7$$\"34+++!fs;+\"F\\o$ \"3A+++8oaMtF*7$$\"3g+++Wt&yP*F*$\"36+++/$***4iF*7$$\"3M+++9bbg')F*$\" 3!******p;fI<&F*7$$\"3o*****\\g&RyyF*$\"3g*****H(RiJUF*7$$\"3S+++.+mYq F*$\"3-+++Y))G#R$F*7$$\"3K+++@9b#='F*$\"33+++X^AgEF*7$$\"3j*****42hbI& F*$\"3=+++)pq!R?F*7$$\"3i*****zD)3QWF*$\"3$******zE^3`\"F*7$$\"3!***** *RBfkg$F*$\"3*)*****\\&**)f8\"F*7$$\"3(*******GG_UGF*$\"3U+++vXmN&)F]q 7$$\"3/+++`:z&=#F*$\"3y*****f<:E#oF]q7$$\"3%******z*\\q%o\"F*$\"3b**** *fTB*GiF]q7$$\"3)******R\"e)3R\"F*$\"3F+++Pn0EoF]q7$$\"3#******\\&GFP8 F*$\"3Z*****zWT,t)F]q7$$\"3,+++oT\"p^\"F*$\"33+++*yX8>\"F*7$$\"3-+++Je Q(*=F*$\"3&*******4:V3;F*7$$\"3++++#*\\^YCF*$\"3/+++/1,$3#F*7$$\"3#*** ****\\>))RJF*$\"3!)*****HQ*\\wDF*7$$\"3y******>bzeRF*$\"3#******RXgr0$ F*7$$\"3w*****fISw)[F*$\"3-+++dqa*\\$F*7$$\"3'******R$=B7fF*$\"37+++_K ;$)QF*7$$\"3)******R+L*=qF*$\"33+++**4P\">%F*7$$\"3!)*****pZ1U>)F*$\"3 t*****pcS1T%F*7$$\"3=+++FxSC%*F*$\"3-+++9\"e+`%F*7$$\"3#*******y8dp5F \\o$\"3v*****zG.5a%F*7$$\"3'******f:8%*>\"F\\o$\"3g*****p)H$pV%F*7$$\" 30+++\"Rb0L\"F\\o$\"3/+++28B8UF*7$$\"3)******4_%eh9F\\o$\"3#******fu)4 nQF*7$$\"3-+++^W4\"f\"F\\o$\"3#*******3LY(R$F*7$$\"3%******f)zp<**Q+%=F\\o$\"3))*****fss:4#F*7$$\"35 +++oX!o&>F\\o$\"33+++(yG6E\"F*7$$\"35+++0stm?F\\o$\"3')*****z'=^'=$F]q 7$$\"3%)******=nko@F\\o$!3k*****4Z6WH(F]q7$$\"3!*******f;UhAF\\o$!3-++ +7<[v=F*7$$\"3!******R**RSM#F\\o$!3.+++%[b16$F*7$$\"39+++s*ybT#F\\o$!3 :+++c_5DWF*7$$\"3=+++UUAvCF\\o$!32+++]e/3eF*7$$\"3:+++,xFADF\\o$!33+++ %[%)yC(F*7$$\"3#)*****zWkhb#F\\o$!3r******4wMK()F*7$$\"3/+++H#Qkd#F\\o $!32++++8'[-\"F\\o7$$\"3!******H-'y#e#F\\o$!35+++lXMy6F\\o7$$\"3=+++p4 .vDF\\o$!3'*******)pLBL\"F\\o7$$\"3))*****p+MJb#F\\o$!3++++aXY&[\"F\\o 7$$\"3++++$Q%>F\\o7$$\"3')*****Hy^\"GBF\\o$ !3!*******QcWi?F\\o7$$\"3)******\\iI(RAF\\o$!3%******4pR8>#F\\o7$$\"38 +++Z/vR@F\\o$!3.+++H2p6BF\\o7$$\"32+++C,2H?F\\o$!3=+++YTUACF\\o7$$\"3& ******ph^'3>F\\o$!3++++idbADF\\o7$$\"3'******zF]&z/Hk\"F\\o$!3%)*****HA)e(o#F\\o7$$\"3-+++eE#**\\\"F\\o$! 33+++7x0^FF\\o7$$\"3'******pxt=N\"F\\o$!3-+++us2,GF\\o7$$\"33+++H<2+7F \\o$!3<+++4ICPGF\\o7$$\"3++++9L'e/\"F\\o$!39+++)R%GfGF\\o7$$\"3B+++WI9 1*)F*$!3/+++Hq1nGF\\o7$$\"3w*****R`apN(F*$!35+++3TfgGF\\o7$$\"3A+++)e% oCeF*$!3#******z71+%GF\\o7$$\"3=+++P)>FK%F*$!3:+++['zb!GF\\o7$$\"37+++ h\"yS'GF*$!3#*******fVsdFF\\o7$$\"3/+++WOFh9F*$!3++++`*ypp#F\\o7$$\"35 +++7j&=E\"F]q$!3&)*****zv0Si#F\\o7$$!35+++Jn1I6F*$!3*)*****f#ReRDF\\o7 $$!3/+++COC(H#F*$!33+++i:gWCF\\o7$$!3'*******Rg4mLF*$!3\"******HrY+M#F \\o7$$!3*)*****f7p%GVF*$!3\"*******>t*pA#F\\o7$$!3=+++!o'Rx^F*$!33+++Y .h1@F\\o7$$!3$)*****\\9'=2fF*$!3')******=*4,)>F\\o7$$!3t*****z5%\\8lF* $!3)******H$\\x[=F\\o7$$!3U+++0BR$*pF*$!3$)*****\\2ERr\"F\\o7$$!3g**** **3WUXtF*$!3++++CC\"pd\"F\\o7$$!3s*****4@b'pvF*$!3++++2x4R9F\\o7$$!3'* *****\\y7xm(F*$!3/+++Ol%=I\"F\\o7$$!3H+++Wp#Gk(F*$!3++++B0^m6F\\o7$$!3 M+++hs')*\\(F*$!34+++7\\TM5F\\o7$$!3W+++enQXsF*$!3[+++0cXo!*F*7$$!3'** ****H\")yw)oF*$!3g*****>Hn.&yF*7$$!3l*****H(3'oV'F*$!3g******e;g,nF*7$ $!3P+++:M+0fF*$!3k*****>VhJj&F*7$$!3E+++F]L1`F*$!3#******4dw_l%F*7$$!3 K+++=.ddYF*$!3!******Hy*RxPF*7$$!3;+++HVVyRF*$!3$)*****HP*H3IF*7$$!3++ ++=&*[#H$F*$!3)******fERjN#F*7$$!3*)*****zCz$GEF*$!3$*******=$R,$=F*7$ $!31+++d4T@?F*$!32+++F;,S9F*7$$!3#********eIV^\"F*$!34+++U)[2?\"F*7$$! 31+++:Fh_6F*$!3!*******fU(\\8\"F*7$$!3;+++$f#3p'*F]q$!3!******f%)R'o7F *7$$!35+++f0$Rb*F]q$!3&*******=ka2;F*7$$!3/+++&*o<(4\"F*$!3))*****fn6< 7#F*7$$!3)******R'z=v8F*$!3')******yUXjFF*7$$!3#******pY,-y\"F*$!3#*** ***f!QP([$F*7$$!3\"******Hh2pI#F*$!33+++1!*)fD%F*7$$!3'******Hgz4&HF*$ !38+++t&**)Q]F*7$$!3#********\\=xq$F*$!3E+++Tv)4\"eF*7$$!3y*****>s2:d% F*$!3E+++.*>5b'F*7$$!3D+++P^iNbF*$!3;+++NJtSsF*7$$!3s*****>Q8Af'F*$!3m *****>HkU'yF*7$$!3*******p'[KKxF*$!3c+++^T!yS)F*7$$!3?+++I`+Y*)F*$!3)3 ++?i)Qf))F*7$$!3,+++t)RA-\"F\\o$!3h*****pxv(3#*F*7$$!3'******>g')\\:\" F\\o$!39*****>;utW*F*7$$!3'******RH6;H\"F\\o$!3K******=9?o&*F*7$$!30++ +/C$3V\"F\\o$!3Y+++&zeec*F*7$$!3++++P,Lr:F\\o$!3%)*****f18lV*F*7$$!3:+ ++_0w6Gzy<*F*7$$!3)******zwp2&=F\\o$!3]*****pw*>*y)F*7$ $!37+++q#3q)>F\\o$!3u*****RD<7F)F*7$$!3%******R1X\">@F\\o$!3M+++j%Rhi( F*7$$!3%)*****z^\")eC#F\\o$!3s******GWfdoF*7$$!3#******4ykfO#F\\o$!37+ ++sddqfF*7$$!35+++u2?yCF\\o$!3/+++avPr\\F*7$$!3=+++`kY\"e#F\\o$!3A+++[ %=v'QF*7$$!31+++Z:suEF\\o$!3++++pdlnEF*7$$!3)******\\'*=qv#F\\o$!3'*** ***pz*[\"Q\"F*7$$!3-+++XX^FGF\\o$!3/+++/(4f'>Fg_n7$$!37+++GdZ&)GF\\o$ \"3-+++;DP19F*7$$!38+++j\"*GIHF\\o$\"3)******\\HOW)GF*7$$!33+++LoYhHF \\o$\"3-+++w_y,WF*7$$!33+++W5lyHF\\o$\"3-+++!)fAXfF*7$$!3')*****\\6=;) HF\\o$\"3I+++vSD,vF*7$$!3))******\\2GqHF\\o$\"3Y*****p\"G>c!*F*7$$!32+ ++D))oWHF\\o$\"33+++lKjf5F\\o7$$!3%)*****>1H]!HF\\o$\"3.+++1r!3@\"F\\o 7$$!3%)******)*Gi^GF\\o$\"3%******420yN\"F\\o7$$!3%*******oM#\\y#F\\o$ \"35+++(\\H$*\\\"F\\o7$$!3\"******p&4^0FF\\o$\"3!******H,MTj\"F\\o7$$! 3<+++No39EF\\o$\"3!******f2O5w\"F\\o7$$!30+++elY6DF\\o$\"3;+++R!H*y=F \\o7$$!3'*******=9d)R#F\\o$\"3')*****fI$z')>F\\o7$$!39+++F\">kF#F\\o$ \"39+++Enq$3#F\\o7$$!3;+++*\\8h9#F\\o$\"3))*****H%R&)o@F\\o7$$!3++++e'=F\\o$\"3$)*****f[q6I#F \\o7$$!3#******R!RO=F\\o7$$!3w******QFD.\")F]q$ \"3#******\\!*>*o=F\\o7$$\"36+++!G\"))H))Fg_n$\"3++++U^afW0Sk\"F\\o7$$\"34+++5z*Qa\"F*$\"3-+++[6gB:F\\ o7$$\"3!******RB(o$4#F*$\"3/+++R\")o*R\"F\\o7$$\"3*)*****zE&fADF*$\"33 +++Qrmt7F\\o7$$\"3++++(*)Q5$GF*$\"3/+++%\\tp9\"F\\o7$$\"3/+++0-@@IF*$ \"3&******>Co5-\"F\\o7$$\"3?+++)3\">(4$F*$\"3G+++aBJu*)F*7$$\"3++++Lx4 lIF*$\"3/+++9ydvxF*7$$\"3&******f\"[FLHF*$\"3Q+++6(3'HmF*7$$\"3@+++c%p Dr#F*$\"3Q+++l'G=b&F*7$$\"39+++Frs;CF*$\"3G+++d>BeXF*7$$\"3/+++,(fH1#F *$\"3++++_*Rfm$F*7$$\"33+++n3qs;F*$\"3)*******y@D%*GF*7$$\"3%******pnJ BF\"F*$\"3-+++_e_mAF*7$$\"3_+++:[?F*)F]q$\"3%******4_\\I\"=F*7$$\"3!** ******>\"pRcF]q$\"3))*****>*=#Gd\"F*7$$\"3#)*****fzK:(**Fg_n$\"3w*****Rt!*) )y%F*7$$\"3')*****zI'*Qj&Fg_n$\"3#)*****p')fWy&F*7$$\"3')*****H5&*>:$F ]q$\"3!)*****z\"3WGoF*7$$\"3b*****4$eZEoF]q$\"3m*****z>A&**yF*7$$\"3'* *******[m?;\"F*$\"3S*****Hc_%y*)F*7$$\"3%******4.xYv\"F*$\"3++++L7v/5F \\o7$$\"3=+++g'Q(fCF*$\"3'*******yB-46F\\o7$$\"3/+++F*>ZF$F*$\"3)***** *\\b?\"47F\\o7$$\"39+++YxW&>%F*$\"33+++39h.8F\\o7$$\"3I+++rMC;_F*$\"3% ******H#Q;\"R\"F\\o7$$\"37+++*e_+L'F*$\"3/+++BEbq9F\\o7$$\"3o*****4+s& GvF*$\"3*******\\)HmS:F\\o7$$\"3,+++YzP-))F*$\"33+++?e\\+;F\\o7$$\"3%* *****>i0T,\"F\\o$\"3#******fGt\"\\;F\\o7$$\"33+++\"\\LL:\"F\\o$\"3'*** ***\\@Wfo\"F\\o7$$\"3'******>3AnH\"F\\o$\"35+++(*))=5Oq\"F\\o7$$\"3))*****\\**fh)=F\\o$ \"3/+++IZJu;F\\o7$$\"3<+++S`#3.#F\\o$\"3-+++)zk9j\"F\\o7$$\"37+++%)Rtr @F\\o$\"3++++.&)Gv:F\\o7$$\"3)******zszvI#F\\o$\"3%******HKTh]\"F\\o7$ $\"3()*****Ra(4PCF\\o$\"3,+++v:^C9F\\o7$$\"3%)*****Hww!fDF\\o$\"3++++y ^,J8F\\o7$$\"3/+++'[tBn#F\\o$\"3-+++Q*)QE7F\\o7$$\"3%******RYAfx#F\\o$ \"32+++PH[66F\\o7$$\"3))******ezuoGF\\o$\"3S******=r^s)*F*7$$\"31+++'4 u*\\HF\\o$\"39+++5RWZ&)F*7$$\"31+++%eL)=IF\\o$\"3A+++I%R4:(F*7$$\"3+++ +hanuIF\\o$\"3I+++Nj0&p&F*-%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"!FahtF`ht-% +AXESLABELSG6$Q!6\"Feht-%&STYLEG6#%&POINTG-%(SCALINGG6#%,CONSTRAINEDG- %%VIEWG6$%(DEFAULTGFbit" 1 5 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 69 "Is thi s solution accurate? Let us re-compute with half the step-size:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "dt:=0.01;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%#dtG$\"\"\"!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "N:=10000;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"NG\"& ++\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from 1 to N d o:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Verlet(i,10,1/2); od:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "plot([seq([rx[i*20],ry[i*20] ],i=1..N/20)],style=point,scaling=constrained);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7`jl7$$\"3-+++Gbd'4\" !#<$\"3!******Hr1/4\"F*7$$\"33+++4Tg#R\"F*$\"3#******R;\"oT8F*7$$\"3++ ++(*Rvo=F*$\"3#******4)3#zp\"F*7$$\"3$)*****zSd9]#F*$\"38+++J)))e5#F*7 $$\"3A+++GV()pKF*$\"37+++B,9BDF*7$$\"3;+++kg:cTF*$\"3z*******4)>iF*$\"3?+++kL*4a$F*7 $$\"3G+++t75ntF*$\"3&)******>abNPF*7$$\"3K*****\\AKFd)F*$\"3z*****>w#R MQF*7$$\"3w*****\\:&*>#)*F*$\"36+++\"3%)y#QF*7$$\"3%******f6V+6\"!#;$ \"33+++Qxv3PF*7$$\"3(******4Ob$R7F\\o$\"37+++O!f=Z$F*7$$\"3%******f9\" po8F\\o$\"3/+++0b)R6$F*7$$\"3'******4\"yh'\\\"F\\o$\"3<+++CGwLEF*7$$\" 3()*****z^D F\\o$!3')*****zllfz%F]q7$$\"3#******4i5s1#F\\o$!3.+++zc\"\\`\"F*7$$\"3 ')*****R_r&*F*7$$\"3;+++VKolCF\\o$!3,+++F:;46F\\o7$$\"3++++ 1.iqCF\\o$!3/+++Hg'HE\"F\\o7$$\"37+++ouUhCF\\o$!3(******\\n4sT\"F\\o7$ $\"3,+++`g1QCF\\o$!3#******H1B0d\"F\\o7$$\"3*******p_O1S#F\\o$!37+++yu `@F\\o$!31+++))QI1DF\\o7$$\"3')*****pTb7y\"F\\o$!38 +++e,'eg#F\\o7$$\"3!******4X81l\"F\\o$!3'******4==Qp#F\\o7$$\"3%****** >%*\\C^\"F\\o$!3=+++97SpFF\\o7$$\"3/+++4C)zO\"F\\o$!3\"******zW]>$GF\\ o7$$\"3$******zf([=7F\\o$!3;+++*oJ4)GF\\o7$$\"3)******pf)Gl5F\\o$!3()* ****\\qSf\"HF\\o7$$\"3Q*****fz6u4*F*$!37+++)42n$HF\\o7$$\"3x*****4h-A` (F*$!3*)*****zA(4VHF\\o7$$\"3!)*****HSe5(fF*$!3#******zd:^$HF\\o7$$\"3 !)*****R])oFWF*$!3#******>r/H\"HF\\o7$$\"37+++09d:HF*$!37+++`OuwGF\\o7 $$\"3/+++$e;yW\"F*$!35+++\"4Xq#GF\\o7$$\"3I+++Ke$Gq$!#>$!33+++[6NkFF\\ o7$$!3'******fcC[I\"F*$!3#*******yxK*o#F\\o7$$!3%******>#[`mDF*$!3'*** ***z@eFg#F\\o7$$!3&******4'\\xPPF*$!3$)*****\\kMb]#F\\o7$$!3(******\\] 3#4[F*$!31+++=!\\')R#F\\o7$$!3o*****f\\#fsdF*$!31+++#*H=$G#F\\o7$$!3J+ ++(yq3i'F*$!3!******H>(Hg@F\\o7$$!3))*****4Pd#[tF*$!31+++;(=7.#F\\o7$$ !3c*****f')4.&zF*$!3!******psGs*=F\\o7$$!3R+++.?*RU)F*$!3;+++8#\\'f;F\\o7$$!3q*****4)>W\")*)F*$!3/+ ++l28z9F\\o7$$!3#)******e;gm!*F*$!3-+++*39*Q8F\\o7$$!3<*****R\")Qi-*F* $!3*******4&Q_+7F\\o7$$!3')*****4Kz\\'))F*$!3/+++(Hu_1\"F\\o7$$!3G+++ \"*z1*e)F*$!3D+++U.NW$*F*7$$!3K*****>$4S1#)F*$!31+++O)p@4)F*7$$!39+++/ KdExF*$!35+++Uje2pF*7$$!39+++kl&4;(F*$!3'******HCG6!eF*7$$!3H+++Zy#G_' F*$!3C+++e,M#y%F*7$$!3K+++?BeFeF*$!3%*******oHmfQF*7$$!3k*****z(p3$4&F *$!3#)*****\\kA./$F*7$$!3f*****z%RESVF*$!3@+++.PBIBF*7$$!37+++D%\\Sf$F *$!3\"******4_BRt\"F*7$$!3=+++7m$\\)GF*$!37+++7,]a7F*7$$!3))*****\\`!H ^AF*$!3'******4&p)p$*)F]q7$$!3'******zgv>u\"F*$!3')*****z\"3A?lF]q7$$! 32+++&=GeT\"F*$!3_+++!Q,gG&F]q7$$!3/+++#\\,#G8F*$!3%)******39y&=&F]q7$ $!3$******zt,>]\"F*$!3I+++3Z_\\gF]q7$$!30+++v1c:>F*$!3*******>lxK`(F]q 7$$!3A+++_m#p_#F*$!3P+++>o8;#*F]q7$$!3w*****H!p<&H$F*$!3!******pr8A2\" F*7$$!3S+++l/%o=%F*$!3++++V&Qe<\"F*7$$!3g*****Re@Y<&F*$!3%******Rbr0@ \"F*7$$!3@+++u1NNiF*$!3'******\\()f,;\"F*7$$!35+++dZ\\[tF*$!3'******HA tE,\"F*7$$!3q******pBC&\\)F*$!31+++Ih*ff(F]q7$$!3'3++]#z(zl*F*$!37+++K Y]_RF]q7$$!3)*******)y**>3\"F\\o$\"3g*****zRsQO)F\\[l7$$!3)*******Gu`' >\"F\\o$\"3w*****\\B')=y'F]q7$$!34+++L3*yI\"F\\o$\"3-+++YXe(Q\"F*7$$!3 ,++++Th99F\\o$\"3')*****fkU#4AF*7$$!3(******zeR`^\"F\\o$\"3=+++\"Q_*QJ F*7$$!3)******fB%y3;F\\o$\"37+++;b+rTF*7$$!3'******H:dPp\"F\\o$\"3Q+++ e-K)H&F*7$$!35+++9v;pF\\o$\"3%******RgTx0\"F\\o7$$!35+++\\#*Gd>F\\o$\"3(******HZXN?\"F\\ o7$$!3#*******=6as>F\\o$\"3)******zjYCN\"F\\o7$$!31+++oC=u>F\\o$\"3+++ +#QMJ]\"F\\o7$$!3/+++GY+i>F\\o$\"3')*******4nUl\"F\\o7$$!31+++e)Rf$>F \\o$\"32+++)o'[/=F\\o7$$!3;+++r91'*=F\\o$\"3')*****\\'HV_>F\\o7$$!3=++ +FEeU=F\\o$\"33+++*3en4#F\\o7$$!37+++yP&ex\"F\\o$\"3%******zqShB#F\\o7 $$!3;+++$yejp\"F\\o$\"3-+++m%*HpBF\\o7$$!3))*****>#)4Zg\"F\\o$\"3/+++h m+&\\#F\\o7$$!3)******\\0T;]\"F\\o$\"33+++%y+@h#F\\o7$$!3)******R'3+)Q \"F\\o$\"3')*****H9)\\>FF\\o7$$!3'******R:VZE\"F\\o$\"3)******Rp/i\"GF \\o7$$!3*******H(z\"H8\"F\\o$\"3#)*****RaD8!HF\\o7$$!3L+++^UgO**F*$\"3 %******RDuS(HF\\o7$$!3y*****R/$z\"[)F*$\"3*)*****4S\"yLIF\\o7$$!37+++8 xWxpF*$\"3=++++4!*zIF\\o7$$!3*******H'[vOaF*$\"31+++-d,7JF\\o7$$!3=+++ :EDtQF*$\"3!******zmT)HJF\\o7$$!38+++sNp+BF*$\"39+++U4BLJF\\o7$$!3^*** **z@_!HtF]q$\"3/+++YM_F*$\"3!******>L]!QHF\\o7$$\"3C+++!zAGc'F*$\"39 +++/#[$fGF\\o7$$\"3T+++dm)[#yF*$\"39+++9Y$*oFF\\o7$$\"3]*****\\#e#[**) F*$\"31+++dzonEF\\o7$$\"3&******p#[I15F\\o$\"3')*****48(ecDF\\o7$$\"3$ ******p--@5\"F\\o$\"3%)*****>=,nV#F\\o7$$\"31+++Nd8'=\"F\\o$\"3))***** *o*y\"4BF\\o7$$\"3)******\\I!zd7F\\o$\"3=+++ylBv@F\\o7$$\"3'******4!)z lJ\"F\\o$\"32+++&3Xh.#F\\o7$$\"33++++O:i8F\\o$\"3'******\\==9F\\o$\"33+++T;([X\"F\\o7$$\"3#******>%GB59F\\ o$\"3$******zLk+J\"F\\o7$$\"3'******\\T]%*Q\"F\\o$\"3'*******RA6o6F\\o 7$$\"3-+++PmNc8F\\o$\"34+++@uFI5F\\o7$$\"3)*******)p2;J\"F\\o$\"3#3++? AAw(*)F*7$$\"31+++['**fD\"F\\o$\"3=+++M,&pr(F*7$$\"3-+++jeY!>\"F\\o$\" 3\")*****H)p:JlF*7$$\"3-+++uW2;6F\\o$\"3*)*******>;'HaF*7$$\"3-+++wk-M 5F\\o$\"3v******eD`?WF*7$$\"3C+++z,cc%*F*$\"3++++s$)z5NF*7$$\"3\")**** *\\dQV_)F*$\"3$******f,Teq#F*7$$\"3U+++c\\wfvF*$\"30+++D%e%4?F*7$$\"3G +++e^k!e'F*$\"33++++(GOU\"F*7$$\"37+++02w1cF*$\"35+++]:y#[*F]q7$$\"3E+ ++_6XgYF*$\"39+++6I\")4eF]q7$$\"3?+++0.gnPF*$\"3#******\\Jwb;$F]q7$$\" 3/+++x3CfHF*$\"3)******\\wp`Y\"F]q7$$\"3-+++V5\"RF#F*$\"3C+++L@\\beF\\ [l7$$\"3++++*oS*f(G -AAF]q7$$\"3K+++24W;mF*$!3!******4@^$>cF]q7$$\"3s*****Hi(RgwF*$!3,+++z y255F*7$$\"3G*****zGsaq)F*$!3/+++`jTp:F*7$$\"3C*****>dPOt*F*$!3#****** 4JF/C#F*7$$\"35+++x$GG2\"F\\o$!3-+++Smb@IF*7$$\"3++++y]Sn6F\\o$!3))*** **4jM%4RF*7$$\"3++++/^nb7F\\o$!3%)*****zx`!**[F*7$$\"3#*******4^LO8F\\ o$!3!******H]CR)fF*7$$\"3$******R])>39F\\o$!3S+++'=>i:(F*7$$\"3%****** H\"*)>q9F\\o$!3w*****fr6pS)F*7$$\"3%******zG%R@:F\\o$!3F******pZ\"fs*F *7$$\"33+++#[r4c\"F\\o$!3'******Hx@-6\"F\\o7$$\"3%******p'4D)e\"F\\o$! 3++++iFS_7F\\o7$$\"33+++t.p-;F\\o$!3++++,5*yR\"F\\o7$$\"3\"******4m()Q g\"F\\o$!31+++^LRX:F\\o7$$\"33+++MLe\"f\"F\\o$!3%)*****>b\"e$p\"F\\o7$ $\"3++++-8ml:F\\o$!32+++lo5T=F\\o7$$\"3$******p<\\h_\"F\\o$!3%*******f Xh')>F\\o7$$\"3)******Rf;KZ\"F\\o$!3-+++B%e(G@F\\o7$$\"31+++yE<29F\\o$ !33+++J`@mAF\\o7$$\"3-+++eDYG8F\\o$!3))******e*)p(R#F\\o7$$\"3-+++S?mP 7F\\o$!32+++]I(>_#F\\o7$$\"3(******zOra8\"F\\o$!3$)*****z`kyj#F\\o7$$ \"3)******fs2F-\"F\\o$!3*******4vvUu#F\\o7$$\"3$)*****fPmH+*F*$!30+++a c>SGF\\o7$$\"35+++J\\i#p(F*$!3)******H)*4Z#HF\\o7$$\"34+++?#zrI'F*$!3- +++z2,(*HF\\o7$$\"3G+++nS_e[F*$!3++++:]ScIF\\o7$$\"3?+++K7?fLF*$!3))** ***\\U@B5$F\\o7$$\"3/+++p;FA=F*$!3()*****\\P;V8$F\\o7$$\"3B+++JB$=h#F] q$!3=+++s%y?:$F\\o7$$!3(*******)[m.J\"F*$!31+++od$*)=JF\\o7$$!3 G+++lp(*\\fF*$!39+++>gLzIF\\o7$$!3u*****zGliU(F*$!3=+++!*R.EIF\\o7$$!3 #)*****\\%HkX))F*$!3'******Hb([fHF\\o7$$!3*********p\"e>5F\\o$!3)***** **p>K!)GF\\o7$$!3++++r!>l9\"F\\o$!37+++<9G*y#F\\o7$$!3'******RH)Hk7F\\ o$!3'******pN@so#F\\o7$$!3++++*eL>P\"F\\o$!3-+++o'*4vDF\\o7$$!33+++#)= ao9F\\o$!3'******HCnRX#F\\o7$$!3-+++G>N`:F\\o$!3%******z*o&\\K#F\\o7$$ !39+++W?rD;F\\o$!3%)******o9F*=#F\\o7$$!3%)*****z6(4&o\"F\\o$!3/+++0<< [?F\\o7$$!3!******HK96t\"F\\o$!3.+++GJ'H!>F\\o7$$!3%*******\\v]j()4(y\"F\\o$!3)******HL?hX\"F\\o7$$!35+++P&*[y;v;F\\o$!3_******okaS))F*7$$!3,+++O9$oh\"F\\o$!3,+ ++'=Vq`(F*7$$!3-+++Tu&ya\"F\\o$!3x*****\\rjnI'F*7$$!35+++Qg?p9F\\o$!3q *****4>R%f^F*7$$!33+++i'e>Q\"F\\o$!3))*****R_,P5%F*7$$!3)*******HhI(G \"F\\o$!3#******Ra_p9$F*7$$!3/+++HEa'=\"F\\o$!3!)*****4zL_H#F*7$$!3)** ****R,h53\"F\\o$!3#*******)y#4`:F*7$$!3m*****4M-Ns*F*$!3(******\\i-WB* F]q7$$!3>*****zCh*>')F*$!3#)*****z^=R2%F]q7$$!3++++CB)o^(F*$!3E+++DB5z S!#?7$$!3Q+++)piBV'F*$\"3)******HB+f*GF]q7$$!3o*****\\BBgQ&F*$\"3')*** **fYTDz%F]q7$$!3i*****H'4f*R%F*$\"3e*****z>Kbt&F]q7$$!3y*****H70z\\$F* $\"3C+++M%ox%eF]q7$$!3\")*****40m0r#F*$\"3))******=SQ(H&F]q7$$!3?+++;Z Gu?F*$\"3$)*****fpUmI%F]q7$$!30+++WvjM;F*$\"3C+++YyS\\JF]q7$$!34+++U&f 4W\"F*$\"3'******z%)p\"3@F]q7$$!30+++D+zB:F*$\"33+++Wg9\"R\"F]q7$$!3++ ++.6!*o=F*$\"3(******4a]p7\"F]q7$$!37+++k*fqU#F*$\"3))*****>8q([9F]q7$ $!3')*****\\SWO9$F*$\"3y*****>\"z]3DF]q7$$!3=+++J**psRF*$\"3)******RIi CW%F]q7$$!3K+++*=!ox[F*$\"3o*****p?%\\atF]q7$$!3%)*****p>a*GeF*$\"3(** ****fVG:8\"F*7$$!3p********Hh,oF*$\"3.+++gxhO;F*7$$!3q*****>!e-uxF*$\" 3-+++9%>BD#F*7$$!3;*****4'R'ps)F*$\"37+++N&H!yHF*7$$!3Z+++;c3V'*F*$\"3 8+++AU>6QF*7$$!3/+++HUm]5F\\o$\"3u*****\\F;vu%F*7$$!34+++\\?LI6F\\o$\" 3'******zdI6y&F*7$$!32+++'\\;??\"F\\o$\"3E+++q/w/pF*7$$!31+++'GbXE\"F \\o$\"35+++h^')4\")F*7$$!3(******4e>pJ\"F\\o$\"3y*****>!=y'Q*F*7$$!3'* ******zf@e8F\\o$\"3-+++wl[s5F\\o7$$!3-+++N!*o(Q\"F\\o$\"3$******REj7@ \"F\\o7$$!3.+++!4CZS\"F\\o$\"3-+++_,z`8F\\o7$$!3)******fQ\\)39F\\o$\"3 5+++8Rz)\\\"F\\o7$$!3'******p/Q(*R\"F\\o$\"35+++c/'\\k\"F\\o7$$!3'**** ***z(3sP\"F\\o$\"3'******Hs\\4z\"F\\o7$$!3$******R'eAT8F\\o$\"3-+++v.T N>F\\o7$$!35+++))y*=H\"F\\o$\"3=+++AV*p2#F\\o7$$!3)******4Ev%H7F\\o$\" 3)*******p5P9AF\\o7$$!35+++!oYV:\"F\\o$\"3')******Hc8a<\"F\\o$\" 3%)*******46g(GF\\o7$$\"3&******>n4YI\"F\\o$\"39+++x-n(y#F\\o7$$\"30++ +7+&\\U\"F\\o$\"3#******\\F>!)o#F\\o7$$\"3)******zv8a`\"F\\o$\"3'***** *\\;!)zd#F\\o7$$\"3&)*****H[y]j\"F\\o$\"31+++59deCF\\o7$$\"39+++L)HJs \"F\\o$\"37+++dv*3L#F\\o7$$\"3#******R$)p))z\"F\\o$\"3/+++*oPh>#F\\o7$ $\"33+++MUsh=F\\o$\"3#******\\JLb0#F\\o7$$\"37+++]\"[7\">F\\o$\"3!**** **>Uv.\">F\\o7$$\"3#******H)48Z>F\\o$\"3;+++89*>w\"F\\o7$$\"3#)*****>. +#p>F\\o$\"3/+++05t6;F\\o7$$\"3'******RqAu(>F\\o$\"33+++wA&4Y\"F\\o7$$ \"3%******p<2>(>F\\o$\"3&********=25J\"F\\o7$$\"31+++<=!H&>F\\o$\"3-++ +:qAj6F\\o7$$\"3-+++CMz?>F\\o$\"33+++T!3*=5F\\o7$$\"3')*****fR/h(=F\\o $\"3?+++cV(Hz)F*7$$\"3<+++Z%)[>=F\\o$\"3I+++r?zbuF*7$$\"3'******\\KD7 F*7$$\"3-+++\"=,*o6F\\o$\"3g*****4iF\"eaF]q7$$\"3/+++Y;3a5F\\o$!3(**** ***R8Y,8F\\[l7$$\"3w*****pcM0Q*F*$!3'******\\r/Fc%F]q7$$\"34+++6bFC#)F *$!3!******>f=c&yF]q7$$\"3E+++*Gb*)3(F*$!33+++b!fY+\"F*7$$\"3w*****>'> Z#*fF*$!3*******4&Rx>6F*7$$\"3')*****p^dS&\\F*$!3,+++'=^*R6F*7$$\"39++ +i!>\\*RF*$!33+++z@jx5F*7$$\"3'******>?b$RJF*$!3%)*****RF]X\\*F]q7$$\" 3$******z1tlT#F*$!3!)*****felDx(F]q7$$\"33+++586j=F*$!3w******GrD()eF] q7$$\"3#*******=%[O_\"F*$!3-+++S4;bTF]q7$$\"30+++j7pT9F*$!3A+++2&z7&GF ]q7$$\"34+++'>fEj\"F*$!3))*****R?Bg6#F]q7$$\"3-+++_d$p1#F*$!34+++@WQ6? F]q7$$\"3))*****R%4&4p#F*$!36+++LGuGEF]q7$$\"3#)*****>+;HX$F*$!3')**** *z*HZ&3%F]q7$$\"35+++\"=(p5VF*$!3Y+++!o'\\'G+#F*7$$\"3o+++Q2q1\")F*$!3;+++LLCuEF*7$$\"3o*****HT& pM!*F*$!3/+++K:\\aMF*7$$\"3Q+++F\"z!=**F*$!3M+++_=2SVF*7$$\"3++++qjiP`8F\\o$!3/+++FW 3[6F\\o7$$\"3++++bX(fP\"F\\o$!3/+++$4]')G\"F\\o7$$\"3'******HC-fQ\"F\\ o$!3&*******>))GK9F\\o7$$\"3%******4,jFQ\"F\\o$!3'******H$[qx:F\\o7$$ \"3)******f?1jO\"F\\o$!3++++*fpNs\"F\\o7$$\"3,+++4sUO8F\\o$!3%)******p l`o=F\\o7$$\"3-+++>j;$H\"F\\o$!3'******4zb7,#F\\o7$$\"33+++#>2nB\"F\\o $!3%******47)Q]@F\\o7$$\"3)******f[tt;\"F\\o$!31+++#y>YG#F\\o7$$\"3-++ +7[i&3\"F\\o$!3(******f8wET#F\\o7$$\"3[+++WB^?**F*$!3(******RnML`#F\\o 7$$\"3O*****p]mO())F*$!37+++J!Qak#F\\o7$$\"3&)*****\\@5Ss(F*$!3%)***** zN1zu#F\\o7$$\"31+++**[\"4['F*$!3&******4hZ(RGF\\o7$$\"3o*****HTEZ:&F* $!3()******Q!o+#HF\\o7$$\"3A+++QnlcPF*$!3;+++f>3))HF\\o7$$\"3-+++m(o') H#F*$!3')*****zQ>J/$F\\o7$$\"3Q+++5Y`LzF]q$!3++++)3LY3$F\\o7$$!3W+++5= *>Y(F]q$!34+++%y.A6$F\\o7$$!3?+++]K`1BF*$!35+++`]aDJF\\o7$$!3/+++yT'R( QF*$!3))*****p'e]CJF\\o7$$!3'******H06R\"F\\o$!3,+++2iUI FF\\o7$$!3$******4z&31:F\\o$!35+++m//DEF\\o7$$!3++++45n5;F\\o$!3$***** **[W\")4DF\\o7$$!3*)*****>H5Sq\"F\\o$!3)******4:8eQ#F\\o7$$!3#******RO ^`y\"F\\o$!35+++$\\\"=aAF\\o7$$!3#******R'>1a=F\\o$!3\"******4HKh6#F\\ o7$$!3%)******zmj4>F\\o$!3)******>2MH(>F\\o7$$!3-+++_@q^>F\\o$!3))**** *p(y*e#=F\\o7$$!3%******4<@+)>F\\o$!39+++[NOw;F\\o7$$!31+++4b\\%*>F\\o $!31+++5eoD:F\\o7$$!3)******p,n^*>F\\o$!3)******H'*>_P\"F\\o7$$!3=+++` \"=A)>F\\o$!3.+++_wIE7F\\o7$$!37+++;1(f&>F\\o$!3'******fJi-3\"F\\o7$$! 3'******z#G)o\">F\\o$!3W+++n*\\NQ*F*7$$!3/+++Aial=F\\o$!3\"******p5,!= !)F*7$$!37+++-0o-=F\\o$!3=+++BzT+++MC` 1LF*7$$!33+++aAYa9F\\o$!3=+++F6ahBF*7$$!3++++\\_y[8F\\o$!3-+++,3hB:F*7 $$!3.+++@`@Q7F\\o$!3a*****\\teF(zF]q7$$!3)******HGuT7\"F\\o$!3'******* f/%\\&=F]q7$$!3-+++`o:35F\\o$\"3=+++#*[$[5$F]q7$$!3C*****pm\"G<*)F*$\" 3O+++%\\'e7pF]q7$$!3A+++7VElxF*$\"3M+++Y$GYf*F]q7$$!3++++SdtUmF*$\"3*) *****z&Q)*>6F*7$$!3m*****H0))zc&F*$\"3)******z_u-=\"F*7$$!39+++5#R3c%F *$\"3-+++z!)y]6F*7$$!3,+++$=YMk$F*$\"3'******4.&fX5F*7$$!3()******)='p TGF*$\"3#)*****\\F**>$))F]q7$$!3#******p_vt=#F*$\"3S+++2HHtoF]q7$$!3** *****4$\\`?EYF\\[l7$$!3%)******G]HbIF* $\"3e+++$4XAV(F\\[l7$$!3-+++Y)3%zQF*$\"3!******fLE'==F]q7$$!3=+++**3#= z%F*$\"3$)*****4T01\"QF]q7$$!3I+++)GPFw&F*$\"3w*****pFp*4oF]q7$$!3s*** **4S9rw'F*$\"35+++1:w(3\"F*7$$!3c*****\\mZJy(F*$\"34+++F\"*y/;F*7$$!3a +++RIN\"z)F*$\"3@+++>3=LAF*7$$!3I+++?'HSx*F*$\"37+++=p'>(HF*7$$!3)**** **4s&\\r5F\\o$\"3$)*****\\n?$=QF*7$$!31+++(fB*f6F\\o$\"3)******REPxw%F *7$$!3(******p7@8C\"F\\o$\"32+++@5>9eF*7$$!3*******4QXWJ\"F\\o$\"3S+++ b(z-&pF*7$$!3)******4>x\"y8F\\o$\"3C*****f^kt;)F*7$$!3$*******\\O_J9F \\o$\"3)3++!*f1dX*F*7$$!33+++3?it9F\\o$\"33+++3/Y!3\"F\\o7$$!3,+++7Ku. :F\\o$\"3,+++kJD?7F\\o7$$!3,+++=dH@:F\\o$\"35+++4!GPO\"F\\o7$$!3.+++?% Ge_\"F\\o$\"3&*******y+h4:F\\o7$$!32+++&)G.<:F\\o$\"33+++/]ec;F\\o7$$! 33+++XWu%\\\"F\\o$\"3/+++gMJ.=F\\o7$$!3'******\\?U*e9F\\o$\"3/+++!fX%[ >F\\o7$$!31+++5#[(49F\\o$\"3%)******Rej!4#F\\o7$$!33+++D]UZ8F\\o$\"3') *****H:d&GAF\\o7$$!3++++aBPs7F\\o$\"3;+++_[\"4O#F\\o7$$!3#*******pA7&= \"F\\o$\"3'******zGgk[#F\\o7$$!3'******>BLj3\"F\\o$\"33+++vQ+/EF\\o7$$ !3k+++@'Hyw*F*$\"33+++IvU7FF\\o7$$!31+++->gt&)F*$\"3%)*****4z&p5GF\\o7 $$!3/+++PQb!H(F*$\"3++++6n'y*GF\\o7$$!3&)*****H=0&HfF*$\"37+++$*=5tHF \\o7$$!3R+++q'y?]%F*$\"3++++zZnNIF\\o7$$!34+++^;e?IF*$\"3=+++*3y\\3$F \\o7$$!33+++g-)y\\\"F*$\"35+++R.`?JF\\o7$$\"3C+++)[UJF&F\\[l$\"3%)**** *HA!)>9$F\\o7$$\"3/+++Wmm<;F*$\"33+++]16\\JF\\o7$$\"3/+++.S=$=$F*$\"3, +++V7%=9$F\\o7$$\"3&)*****\\*p_NZF*$\"37+++m&G-7$F\\o7$$\"3U+++VD1hiF* $\"3#******pglW3$F\\o7$$\"35+++i'>ku(F*$\"3-+++F-)[.$F\\o7$$\"3g*****R ;D'y\"*F*$\"3')*****HOJ>(HF\\o7$$\"3-+++oM_a5F\\o$\"3-+++rZ?'*GF\\o7$$ \"33+++GfW$=\"F\\o$\"37+++XpS3GF\\o7$$\"3'******fcGNI\"F\\o$\"3$)***** Rvd$4FF\\o7$$\"3&******RzePT\"F\\o$\"35+++`?)**f#F\\o7$$\"3/+++]IA8:F \\o$\"3%)******H.I\"[#F\\o7$$\"3++++Ej6,;F\\o$\"3!******4>=WN#F\\o7$$ \"3/+++#\\]nn\"F\\o$\"31+++W]^?AF\\o7$$\"36+++c8cRF\\o7$$\"33+++v76D=F\\o $\"3%)*****H**=$*y\"F\\o7$$\"3#******\\r*QZ=F\\o$\"3&*******H3;S;F\\o7 $$\"3%******fAHf&=F\\o$\"3/+++&HP0\\\"F\\o7$$\"3++++(=]3&=F\\o$\"3$*** ***p)\\zT8F\\o7$$\"30+++8PTK=F\\o$\"3++++#)*e_>\"F\\o7$$\"3')******p+- ,=F\\o$\"3'******zI=A0\"F\\o7$$\"3#)*****Rx0sv\"F\\o$\"3\"3++]N=\"R\"* F*7$$\"3:+++2&R;q\"F\\o$\"3W+++)pS^\"yF*7$$\"3-+++$f<^j\"F\\o$\"3s**** *pS:7c'F*7$$\"3-+++lwbe:F\\o$\"3w*****f)GR(Q&F*7$$\"3-+++BE*HZ\"F\\o$ \"39+++@$yEI%F*7$$\"33+++=Ocz8F\\o$\"37+++xU!\\J$F*7$$\"3#******>j8&z7 F\\o$\"3$******\\*\\gICF*7$$\"33+++N6=u6F\\o$\"3%******H'4*[l\"F*7$$\" 31+++h^*\\1\"F\\o$\"35+++?:?8**F]q7$$\"3G+++b*GZ`*F*$\"37+++gEgL;T3#F*$\"3++++%p)QZIF]q7$$\"3!******>Q\"p(p#F*$\"3%)***** \\i:gN%F]q7$$\"31+++9]tnMF*$\"3*)******[g4/_F]q7$$\"3-+++'[#pcVF*$\"3_ *****H'yD#R&F]q7$$\"3l*****pP&\\M`F*$\"3=+++#)*)pfZF]q7$$\"3')*****Rv% 3wjF*$\"33+++49Y%=$F]q7$$\"3M+++U5kfuF*$\"3?+++5-\\$y&F\\[l7$$\"3u**** *Hy/bc)F*$!3w*****>R`!=JF]q7$$\"3G*****z\"Hbv'*F*$!3[+++WkERzF]q7$$\"3 )******4S&Gx5F\\o$!3#******zz#y*Q\"F*7$$\"33+++D\"\\T=\"F\\o$!3%****** f,_')4#F*7$$\"3-+++x)[mG\"F\\o$!3*********e:!=HF*7$$\"33+++r(zLQ\"F\\o $!3********)35P%QF*7$$\"3)******HHKIZ\"F\\o$!3o*****pfj+([F*7$$\"3)*** ****fqRa:F\\o$!3;+++0e-!*fF*7$$\"3.+++c2PE;F\\o$!39+++/ZH&>(F*7$$\"3!* *****\\[izo\"F\\o$!3M******=UWw%)F*7$$\"36+++9,IQEp\\\"=F\\o$!3,+++iJ$RT\"F\\o7$$\"37+++^! QT\"=F\\o$!3/+++o+%Gc\"F\\o7$$\"3))******4_l*z\"F\\o$!38+++$fm?r\"F\\o 7$$\"3')*****zGd9x\"F\\o$!3'******\\/j-'=F\\o7$$\"3&******p\"=iH\"GK9F\\o$!38+++CYERDF\\o7$$\"32+++#y!>G8F\\o$!3/+++BQ&Q l#F\\o7$$\"33+++EIs87F\\o$!3/+++0$3(eFF\\o7$$\"3++++$[K)*3\"F\\o$!3')* ****p&p%G&GF\\o7$$\"3[+++Hfov&*F*$!3&*******QzQNHF\\o-%'COLOURG6&%$RGB G$\"#5!\"\"$\"\"!FbhtFaht-%+AXESLABELSG6$Q!6\"Ffht-%&STYLEG6#%&POINTG- %(SCALINGG6#%,CONSTRAINEDG-%%VIEWG6$%(DEFAULTGFcit" 1 5 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 " " 0 "" {TEXT -1 27 "Now we should be concerned:" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 10 "dt:=0.005;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%#dtG$\"\"&!\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "N:=20000 ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"NG\"&++#" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 21 "for i from 1 to N do:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Verlet(i,10,1/2); od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "plot([seq([rx[i*40],ry[i*40]],i=1..N/40)],style=point ,scaling=constrained);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7`jl7$$\"3%******Hl7\"*4\"!#<$\"3++++O1q#4 \"F*7$$\"3!******>Y?vR\"F*$\"3++++BeiX8F*7$$\"31+++G9vv=F*$\"36+++*e$z -+++`_A2JF*7$$ \"3)******fEG\")\\\"F\\o$\"3()*****4I=_i#F*7$$\"3')******=\\F\\o$!3#******H0D/&\\F] q7$$\"3)******R5F#o?F\\o$!3#******HDC>b\"F*7$$\"33+++laaf@F\\o$!3!**** **>`$>1FF*7$$\"33+++)p%pSAF\\o$!3A+++.9.\\RF*7$$\"3*******p/X2J#F\\o$! 3I+++NLcq_F*7$$\"3!******p?x)oBF\\o$!3i******eS(*fmF*7$$\"3:+++&H*Q9CF \\o$!3\"******4-Kc5)F*7$$\"33+++9RqYCF\\o$!3O*****f>=_f*F*7$$\"3!***** *>rt`Y#F\\o$!3$******z%fe66F\\o7$$\"3'******4(f3qCF\\o$!33+++InUl7F\\o 7$$\"3')*****p$[mgCF\\o$!3*******Ri(o>9F\\o7$$\"3++++2L2PCF\\o$!3++++5 ))*Hd\"F\\o7$$\"37+++0RT*R#F\\o$!38+++L9*Rs\"F\\o7$$\"3++++sr#zM#F\\o$ !3#******Rj68(=F\\o7$$\"3-+++K$*)HG#F\\o$!31+++A]j8?F\\o7$$\"3'******z )z50AF\\o$!39+++\\'z'\\@F\\o7$$\"39+++Uu\"\\6#F\\o$!33+++*\\>#yAF\\o7$ $\"32+++/B<8?F\\o$!3))*****>!o4)R#F\\o7$$\"3.+++9#R2!>F\\o$!3#******44 M#3DF\\o7$$\"3')*****zk)ey1\"F\\o$!38+++N&>o\"HF\\o7$$\"3M+++Txbj!*F*$!36+ ++$=\"QPHF\\o7$$\"3A+++_Xz(\\(F*$!3++++EIcVHF\\o7$$\"3m*****>>\"HOfF*$ !3)******4Rr`$HF\\o7$$\"37+++rqv#R%F*$!3*)*****f)4&H\"HF\\o7$$\"37+++@ zm!)GF*$!35+++`KewGF\\o7$$\"3-+++\"GHJT\"F*$!3')*****4<#oEGF\\o7$$\"3& ******fBM)RF!#?$!3;+++4?zjFF\\o7$$!3&******>dR&Q8F*$!37+++#4!e)o#F\\o7 $$!33+++Q0^*f#F*$!38+++-5$=g#F\\o7$$!3#******p6d)pPF*$!3/+++i#QW]#F\\o 7$$!3(******p&\\DS[F*$!33+++8_R(R#F\\o7$$!3%******4juC!eF*$!3')*****z% [y\"G#F\\o7$$!3))*****\\\"\\Z\\mF*$!3;+++;(o(e@F\\o7$$!3A+++ee[vtF*$!3 9+++=\\dH?F\\o7$$!3++++I@3wzF*$!3++++^][&*=F\\o7$$!3k+++2ZC[%)F*$!35++ +,:#yv\"F\\o7$$!39*****>09/z)F*$!30+++PN$zh\"F\\o7$$!3c+++4f`-!*F*$!3- +++%>$=x9F\\o7$$!3M******zR4'3*F*$!3,+++`0$pL\"F\\o7$$!3O*****4NST/*F* $!3)******pz>&)>\"F\\o7$$!3m+++e'>8)))F*$!33+++*HkK1\"F\\o7$$!3Z*****4 /&*Qg)F*$!3!******RODVK*F*7$$!38+++W.y>#)F*$!39+++V'QB2)F*7$$!3t*****4 ])eQxF*$!33+++t*[!))oF*7$$!3k******[\"3<<(F*$!3-+++%*3'>y&F*7$$!3#**** **H3LC`'F*$!3E+++U$)ejZF*7$$!3d*****4lvh$eF*$!33+++[6LTQF*7$$!3T+++:&> 35&F*$!34+++=+OAIF*7$$!3#******pk1tM%F*$!3(******\\\">^7BF*7$$!3>+++Pe f+OF*$!3%******4k(>;a:7*GF*$!3\"******4+MjB\"F*7$$!3++ ++tEfdAF*$!3I+++sS7V()F]q7$$!3)******py>([6]F]q7$$!32+++6x`Q8F*$!3%)*****\\bvp![F]q7$$!36++ +,5f;:F*$!3/+++3&RJ\\&F]q7$$!3++++a&>j$>F*$!3X*****\\M1`r'F]q7$$!3'*** ****[5EaDF*$!3G+++'eMv0)F]q7$$!32+++i31GLF*$!3K+++w!f`:*F]q7$$!3*)**** *>a*)GA%F*$!3')*****4Ub\"G(*F]q7$$!3$)******3EQ5_F*$!3Y*****fQ]\"o&*F] q7$$!3g*****H'3cmiF*$!3c*****f#f@B&)F]q7$$!39+++,RHqtF*$!3I+++2@n$['F] q7$$!3L+++IRM-&)F*$!3%)******)QVMP$F]q7$$!3B+++xI\"[k*F*$\"39+++!\\evb )!#>7$$!3-+++VP3y5F\\o$\"36+++E2MGiF]q7$$!3'******\\*QW*=\"F\\o$\"33++ +nEwu7F*7$$!33+++>n/(H\"F\\o$\"3%)*****f'=zR?F*7$$!31+++5,Y*R\"F\\o$\" 33+++\"*zh9HF*7$$!3%******\\LQ`\\\"F\\o$\"3-+++t+N%*QF*7$$!31+++Y!GMe \"F\\o$\"3++++^;ks\\F*7$$!3#******>5vDm\"F\\o$\"3*)******G%>=9'F*7$$!3 ,+++d5tJ!R t=F\\o$\"33+++$R,6v\"F\\o7$$!39++++[rR=F\\o$\"39+++$[g)**=F\\o7$$!3!** ****z1`Bz\"F\\o$\"3!*******e)\\c/#F\\o7$$!3=+++YieJvQ)F*$\"3(******4fi1-$F\\o7$$!3++++\"z=M!pF*$\"3)* *****R_YH2$F\\o7$$!3Q+++Oqpw`F*$\"36+++6ES6JF\\o7$$!3#******HjT2#QF*$ \"36+++@7oNJF\\o7$$!31+++rEA\\AF*$\"3%*******4ncXJF\\o7$$!39+++^?dfnF] q$\"30+++$*3)49$F\\o7$$\"3%******zTDB&))F]q$\"3'******>:$)>7$F\\o7$$\" 3<+++i$e1U#F*$\"3-+++9(p()3$F\\o7$$\"36+++SZ!p\"RF*$\"36+++.CnTIF\\o7$ $\"3y*****H,n4O&F*$\"39+++(3b6)HF\\o7$$\"3!******4z\"QSnF*$\"35+++F!3y !HF\\o7$$\"3m+++s]NV!)F*$\"33+++))RMAGF\\o7$$\"3c+++oJ))e#*F*$\"3))*** **pv)eDFF\\o7$$\"34+++$o'oP5F\\o$\"3++++'zs%=EF\\o7$$\"3%*******=9#)Q6 F\\o$\"3;+++8I--DF\\o7$$\"34+++VN\\G7F\\o$\"3'*******>4NxBF\\o7$$\"3'* *****41BgI\"F\\o$\"3%)******e6kXAF\\o7$$\"33+++(Qc3P\"F\\o$\"3&)*****R ))R\"3@F\\o7$$\"3++++I9dA9F\\o$\"3!******RdTh'>F\\o7$$\"33+++^P)3Y\"F \\o$\"3%******p5v4#=F\\o7$$\"3'*******e+l&[\"F\\o$\"39+++k.*Rn\"F\\o7$ $\"3%******4kqo\\\"F\\o$\"30+++,QaE:F\\o7$$\"31+++F2p%\\\"F\\o$\"3)*** ***\\;$)*z8F\\o7$$\"33+++#\\+%z9F\\o$\"3#******4c**eF*7$$\"3++++*eL5$F]q7$ $\"3$)*****f=bQ!QF*$\"3s******[E1')))F]gl7$$\"3A+++4\\=$)HF*$!3z****** >!4zL%F]gl7$$\"3?+++P'p\")G#F*$!3-+++m$RQ,\"F]q7$$\"3/++++Xnl=xf0\"F]q7$$\"3-+++!*pyp9F*$!3$)*****HK3%G\")F]gl7$$\"3&******RGh WW\"F*$!3o*****>k9hZ&F]gl7$$\"33+++*o$R$p\"F*$!39+++%H&p%)\\F]gl7$$\"3 =+++'\\5f<#F*$!3U+++UK$o*))F]gl7$$\"3$******Rr8e$GF*$!32+++bk]I>F]q7$$ \"3z*****pkTFi$F*$!3++++If*>z$F]q7$$\"3u*****>s\"Q'\\%F*$!3s*****>P-\" *f'F]q7$$\"3\"******R:_WU&F*$!36+++zocV5F*7$$\"3i*****4rQ-Q'F*$!3!**** ***R\"o^`\"F*7$$\"3Q+++X;'3M(F*$!3y*****\\<'G)F* $!33+++P>l[GF*7$$\"3Q*****z6G#)>*F*$!3++++>(e\"oOF*7$$\"33+++b(og+\"F \\o$!3y*****4u59f%F*7$$\"3'******zJ$)e3\"F\\o$!3K+++QKw7cF*7$$\"3'**** ***pZ$z:\"F\\o$!3L+++SH7DnF*7$$\"3/+++Z!H5A\"F\\o$!3;+++E%*4?zF*7$$\"3 '******>r3TF\"F\\o$!3i******GV:)=*F*7$$\"3)******fBaiJ\"F\\o$!3/+++1V( =0\"F\\o7$$\"3)******\\H&oY8F\\o$!3'*******))e/!>\"F\\o7$$\"3'******\\ RjZO\"F\\o$!3)******pp<@L\"F\\o7$$\"33+++[U**p8F\\o$!3%******z$)>oZ\"F \\o7$$\"3%******H@H?O\"F\\o$!3.+++2,%Gi\"F\\o7$$\"3$******f^m1M\"F\\o$ !3++++&GQ)oF\\o7$$\"3++++' \\swD\"F\\o$!3;+++EdNb?F\\o7$$\"31+++lNO'>\"F\\o$!35+++Ls=$>#F\\o7$$\" 33+++]lHA6F\\o$!38+++]$\\cK#F\\o7$$\"3********H\"yf.\"F\\o$!3'******fP ![^CF\\o7$$\"3')*****4kS/Q*F*$!3-+++I^ZpDF\\o7$$\"3e*****z$z^#H)F*$!35 +++y$)\\yEF\\o7$$\"3#)*****R>AZ5(F*$!3#******zL'\\xFF\\o7$$\"3\")***** z\"f!o#eF*$!3')*****H22b'GF\\o7$$\"3))******))GYpWF*$!3;+++k5nTHF\\o7$ $\"33+++Tv@WIF*$!3.+++s#R_+$F\\o7$$\"3!******H=1Lc\"F*$!3++++r9ebIF\\o 7$$\"3u*****z'o,bRF]gl$!3'******4m$>#4$F\\o7$$!32++++Ux8:F*$!3$)****** ))=q9JF\\o7$$!3'*******p22$3$F*$!3*******fhlG7$F\\o7$$!3#)*****\\rhXl% F*$!31+++6Ae;JF\\o7$$!3E+++q$GW@'F*$!3'******\\A&)e4$F\\o7$$!3')*****p z\\*[xF*$!3%******z)f%41$F\\o7$$!3q*****\\%>kW#*F*$!3%)*****R+s?,$F\\o 7$$!3)*******>'R)o5F\\o$!3#*******[Hq\\HF\\o7$$!3-+++b4w17F\\o$!3/+++s nSuGF\\o7$$!3(******fKJqL\"F\\o$!31+++yT(oy#F\\o7$$!31+++c&H&e9F\\o$!3 %)******z-\"zo#F\\o7$$!3-+++\\8Aq:F\\o$!3#******f-G%yDF\\o7$$!33+++4+< r;F\\o$!31+++lzVfCF\\o7$$!3)******RpX0w\"F\\o$!3/+++'*z.KBF\\o7$$!3(** *****eXjP=F\\o$!3%)*****p)=S(>#F\\o7$$!33+++!RX=!>F\\o$!3=+++_vwc?F\\o 7$$!3;+++F\\o$!30+++kUU6>F\\o7$$!3)******>D>**)>F\\o$!31+++&G*pi< F\\o7$$!38+++MOE8?F\\o$!3.+++AR%>h\"F\\o7$$!38+++S')pA?F\\o$!3-+++@(>0 Y\"F\\o7$$!3*)*****>a9$=?F\\o$!3(******>`$y48F\\o7$$!33+++??M+?F\\o$!3 3+++HL2h6F\\o7$$!3')*****zr]\"p>F\\o$!3*******zu$p:5F\\o7$$!3++++mcCD> F\\o$!3_*****HQ?!\\()F*7$$!3%******>nj#p=F\\o$!3O+++d*Q*)R(F*7$$!3#*** ***4;o>!=F\\o$!3x******Qt*y6'F*7$$!3(******fgUUs\"F\\o$!3Q+++\"Q8i\"\\ F*7$$!33+++:J3P;F\\o$!3\"******HI*=.QF*7$$!3(*******H8fT:F\\o$!37+++jd )py#F*7$$!34+++)zl*Q9F\\o$!3!******R(=]u=F*7$$!3*******z)Q\\I8F\\o$!3/ +++qMDr5F*7$$!3)******>rVv@\"F\\o$!33+++OTa7QF]q7$$!3.+++:qb,6F\\o$\"3 2+++GQ4J>F]q7$$!3g+++Z2WS)*F*$\"3-+++LB;7lF]q7$$!3S*****p4:em)F*$\"3)* *****RVvO%**F]q7$$!3&*******G-:3vF*$\"30+++&)e)fA\"F*7$$!3;+++/Uq%Q'F* $\"3'******zgz=N\"F*7$$!3v*****pdxPJ&F*$\"3'******Rd<1Q\"F*7$$!3c***** z6s^J%F*$\"31+++p\\3C8F*7$$!33+++jc+6MF*$\"3!*******)z@$)>\"F*7$$!38++ +$*p1FEF*$\"35+++?OwC5F*7$$!3#******zQ'z%*>F*$\"3m*****44p$=$)F]q7$$!3 %******Rs[Hb\"F*$\"3=+++HtTflF]q7$$!30+++@s(RM\"F*$\"3u*****HMOAQ&F]q7 $$!3)******f))z^R\"F*$\"3b+++!=A*H^F]q7$$!35+++$=6Fp\"F*$\"35+++>7=sfF ]q7$$!3y*****>Dse=#F*$\"3_*****pk.g&zF]q7$$!3*******HU+f\"GF*$\"3&**** **Rsk&46F*7$$!3()*****z1%fKNF*$\"30+++)3^(R:F*7$$!33+++ZuG'H%F*$\"31++ +@Gs&3#F*7$$!3e*****p'*fa2&F*$\"3%*******R\"=cu#F*7$$!3L+++\"4`V%eF*$ \"3&******R5Yg^$F*7$$!3%)******G`L\"e'F*$\"3!******z)Q6#R%F*7$$!35+++Y A)yE(F*$\"3A+++E0^n`F*7$$!3I+++oQ&z)yF*$\"3@+++R9hMkF*7$$!3%3++qR>wU)F *$\"3s*****>p&f%e(F*7$$!3q*****fOK[())F*$\"3!******>@qv!))F*7$$!3L+++P zH>#*F*$\"3-+++K)p#45F\\o7$$!3U*****zm&R_%*F*$\"31+++\"GLG9\"F\\o7$$!3 q+++OJ8n&*F*$\"3'******pW:-G\"F\\o7$$!3e+++Qw6e&*F*$\"3&*******=78?9F \\o7$$!3b*****4*e`@%*F*$\"3'******\\yc7c\"F\\o7$$!3k+++vQ8b\"*F*$\"3-+ ++MMC-e()F*$\"33+++dItT=F\\o7$$!39+++mW^J#)F*$\"35 +++%3s$y>F\\o7$$!39+++$*oNxvF*$\"3&******>@D36#F\\o7$$!3')*****4Y;%*z' F*$\"3')*****z%3zPAF\\o7$$!3Q+++K!eF!fF*$\"35+++NI,eBF\\o7$$!3?+++@6v$ *[F*$\"3-+++D`HqCF\\o7$$!3;+++C`**zPF*$\"3=+++iK^tDF\\o7$$!3#)*****p?I -d#F*$\"3++++ueimEF\\o7$$!3)******R5SUF\"F*$\"3%******z='o[FF\\o7$$\"3 A+++xU>D(*F]gl$\"39+++^/&)=GF\\o7$$\"3&*******ptpK:F*$\"3%******4Q)QwG F\\o7$$\"3y*****4TW)>IF*$\"3=+++d')o?HF\\o7$$\"3s******fZ'ea%F*$\"3/++ +;hE^HF\\o7$$\"3O+++:d[(4'F*$\"3#******H2nx'HF\\o7$$\"3k*****>gF6m(F*$ \"3')******zC(*pHF\\o7$$\"3M*****4lVIA*F*$\"3)******4.,y&HF\\o7$$\"3-+ ++Jf%p2\"F\\o$\"3++++q$38$HF\\o7$$\"3********o7nG7F\\o$\"3#******4D)o! *GF\\o7$$\"3'******HKRhP\"F\\o$\"3&)******3\"pi$GF\\o7$$\"3'******zD[! =:F\\o$\"3%)*****RD7&oFF\\o7$$\"3'******4&y9`;F\\o$\"3))******pa+)o#F \\o7$$\"3++++kED!y\"F\\o$\"35+++#[eaf#F\\o7$$\"3'*******pND)*=F\\o$\"3 ;+++;cp\"\\#F\\o7$$\"3:+++2+81?F\\o$\"31+++BmkxBF\\o7$$\"3&******4:fH5 #F\\o$\"3%*******o!QVD#F\\o7$$\"39+++hb#z=#F\\o$\"3-+++XB)G7#F\\o7$$\" 3')*****f1I.E#F\\o$\"3%)******4qY%)>F\\o7$$\"3')*****pY'f>BF\\o$\"3)** ****\\QT.%=F\\o7$$\"3!******fGx_O#F\\o$\"3++++*30=p\"F\\o7$$\"3'****** zHeqR#F\\o$\"3%*******pU>S:F\\o7$$\"3()******3Aw9CF\\o$\"3)******f'z'o Q\"F\\o7$$\"31+++m/N=CF\\o$\"30+++nK>L7F\\o7$$\"33+++sO#zS#F\\o$\"3#** ****R)>`!3\"F\\o7$$\"3#*******\\3s$Q#F\\o$\"3p*****R\\hAI*F*7$$\"33+++ [k6YBF\\o$\"3s*****>:Oe$yF*7$$\"3;+++]wh&H#F\\o$\"3T+++EHk=kF*7$$\"32+ ++$))fGB#F\\o$\"31+++Snmi]F*7$$\"3)******p$**fe@F\\o$\"3y*****H*H9zPF* 7$$\"3!******z;4P2#F\\o$\"3#)*****fXK%yDF*7$$\"3++++)4l\"z>F\\o$\"3)** *****z7!*p9F*7$$\"3)******>WUg(=F\\o$\"3=+++_)\\!=YF]q7$$\"3!******f/. bw\"F\\o$!3++++4Q>)Q%F]q7$$\"37+++YZy[;F\\o$!3$******RoaiA\"F*7$$\"3#* *****Rm!>F:F\\o$!3/+++)o*>'*=F*7$$\"30+++\")z2-9F\\o$!3!******\\dheW#F *7$$\"3'******HdY[F\"F\\o$!3y*****>vXS(GF*7$$\"3)******z'z#p9\"F\\o$!3 %)*******\\\\7=$F*7$$\"30+++Mbx>5F\\o$!3++++8TwpLF*7$$\"3y*****H(zb[*) F*$!3#******R(fzVMF*7$$\"3x*****pWGkt(F*$!35+++S3i4MF*7$$\"3!)*******3 khd'F*$!3=+++4fzvKF*7$$\"3A+++'HqE[&F*$!35+++R0Z`IF*7$$\"3s******G>7rW F*$!3=+++]F&ov#F*7$$\"3'******pJ0tb$F*$!3%)*******[NRS#F*7$$\"3-+++tJE eFF*$!3(******RP@w,#F*7$$\"3%******H$zS$4#F*$!3(******R*HQF;F*7$$\"3!* *****>Ohhe\"F*$!3!******p=`7F\"F*7$$\"3-+++!z8^E\"F*$!3#******\\JGD'** F]q7$$\"3/+++=4hf6F*$!3t******[B$H^)F]q7$$\"35+++Z@Ac/'F*7$$\"3s******R&Gg(fF*$!37+++\"*z;prF*7$$\"3v*****p4qsJ'F* $!3k+++FQDk$)F*7$$\"3;+++dZ)*elF*$!3x*****4$**)*='*F*7$$\"37+++hq;#p'F *$!33+++/\"*3#4\"F\\o7$$\"3<+++Hep4nF*$!3-+++\"e(pD7F\\o7$$\"3m*****\\ I#))*F*$!3=+++=^))yFF\\o7$ $!3$******>spO9\"F\\o$!3%******z#p$3x#F\\o7$$!35+++D$*4)H\"F\\o$!3')** ***z(o^[FF\\o7$$!3++++p)\\,X\"F\\o$!3/+++I/07FF\\o7$$!3)******z%*p%)f \"F\\o$!31+++Y6qhEF\\o7$$!3.+++-)RV#F \\o7$$!35+++8(3)G@F\\o$!3$)*****p\"fLJBF\\o7$$!3\"******f1x(RAF\\o$!3< +++#*>/?AF\\o7$$!39+++kX-SBF\\o$!3'******f'H2*4#F\\o7$$!34+++lKoGCF\\o $!3%******>o,&p>F\\o7$$!39+++\"H'*\\]#F\\o$!34+++$R#[K=F\\o7$$!3-+++aa KoDF\\o$!39+++tvB*o\"F\\o7$$!3&)******G'e\"=EF\\o$!33+++`m/T:F\\o7$$!3 1+++$4:Tl#F\\o$!3/+++gCB*Q\"F\\o7$$!35+++9![fn#F\\o$!3/+++It9N7F\\o7$$ !35+++W$[No#F\\o$!3'*******R)f,3\"F\\o7$$!3;+++_X%pn#F\\o$!3)3++I#fSc# *F*7$$!3')******RSIcEF\\o$!3')*****fwz%HxF*7$$!35+++Q,$>i#F\\o$!3y**** *p=UTB'F*7$$!3/+++L)eUd#F\\o$!3K+++7NJ$y%F*7$$!30+++!HbQ^#F\\o$!3?+++9 zP*Q$F*7$$!3!******>v39W#F\\o$!3'******H#)\\S1#F*7$$!3#*******z^sdBF\\ o$!3y*****f%>[#=)F]q7$$!3/+++0'=PE#F\\o$\"35+++9rC!Q$F]q7$$!3-+++=@Sg@ F\\o$\"3%******He&z&R\"F*7$$!3')*****p'y()[?F\\o$\"3#)******H_AZBF*7$$ !3$******RiE.$>F\\o$\"3%)******4cq&=$F*7$$!3%)*****z6'*f!=F\\o$\"3/+++ q'\\f!RF*7$$!33+++hx=x;F\\o$\"32+++:52/XF*7$$!31+++)zW_a\"F\\o$\"3?+++ )[dw(\\F*7$$!3/+++.!R:T\"F\\o$\"3))*****R%)ReK&F*7$$!3++++wzXx7F\\o$\" 3I+++qRN\\bF*7$$!3/+++q>RW6F\\o$\"3O+++/Xg]cF*7$$!31+++Q3s85F\\o$\"3Q+ ++DEtLcF*7$$!3'******4QE!o))F*$\"3w*****p/)p/bF*7$$!37+++&[N'\\wF*$\"3 U+++,cQr_F*7$$!37+++#)=*[\\'F*$\"3w*****z*QvV\\F*7$$!37+++5W>;aF*$\"36 +++\"\\hS`%F*7$$!39+++$z'[DWF*$\"3!******f1=s0%F*7$$!3/+++QEMMNF*$\"3! ******zgJ8`$F*7$$!3-+++x)*>aFF*$\"37+++R>eyHF*7$$!35+++(GZo4#F*$\"3'** ****Hk(eECF*7$$!31+++q5Lv:F*$\"33+++d?Q5>F*7$$!3\"******\\on`?\"F*$\"3 /+++(Q\"\\u9F*7$$!3&*******fPE15F*$\"3/+++3='><\"F*7$$!3_+++,12h**F]q$ \"33+++\")GH_5F*7$$!33+++3IIu6F*$\"33+++248Q6F*7$$!3$******>`sy]\"F*$ \"34+++7\\?>9F*7$$!3-+++O(z`%>F*$\"3)******puq?(=F*7$$!3*)******\\%ztV #F*$\"3#)*****p07]Z#F*7$$!3%******zvEP%HF*$\"30+++r0`5KF*7$$!3!)*****f k0IV$F*$\"3u*****z-CR1%F*7$$!3!******pmD/)QF*$\"3v*****R?j=-&F*7$$!3E+ ++#y)4mUF*$\"3m*****R7<:2'F*7$$!3k*****fa&)Qd%F*$\"3#******f@!3+sF*7$$ !3!*******Rml!z%F*$\"3o*****>>WXR)F*7$$!3g*****\\:De!\\F*$\"3]*****f#> hT'*F*7$$!3Q+++;^/6\\F*$\"33+++e%pF4\"F\\o7$$!3=+++X-,+[F*$\"32+++(='* QA\"F\\o7$$!3G+++kQJoXF*$\"31+++tC9c8F\\o7$$!3i*****>tXL@%F*$\"3'***** *\\T.\")[\"F\\o7$$!3?+++y&4Ut$F*$\"3'******RN!Q=;F\\o7$$!3A+++/jkJJF*$ \"3#******>E#fXY&)>F\\o7$$!3x*****fix'QhF]q$\"3#******Rmgb 4#F\\o7$$\"39+++3[xZWF]q$\"3/+++6/](>#F\\o7$$\"3$******\\\\!=,;F*$\"3) )*****>&fx\\ qTF*$\"3#******\\ntPW#F\\o7$$\"3-+++y,cibF*$\"3)*******yX(H]#F\\o7$$\" 3i*****Hc64,(F*$\"3)******>?&[\\DF\\o7$$\"3F*****4S&>.&)F*$\"3/+++i)RF e#F\\o7$$\"3*******4j^E+\"F\\o$\"3\"******>?-Bg#F\\o7$$\"33+++)odn:\"F \\o$\"3%*******4(pyg#F\\o7$$\"3%*******H:G68F\\o$\"37+++@hF*f#F\\o7$$ \"3'******f@b[Y\"F\\o$\"37+++*)H\\wDF\\o7$$\"3()*****pF7hh\"F\\o$\"3!* ******f*H'RDF\\o7$$\"3#******\\*>qjF\\o$\"3$*******p!*yCCF\\o7$$\"3&******R\"3kU?F\\o$\"3/+++WeqZBF\\ o7$$\"3))******[D\\r@F\\o$\"3')*****4>B$eAF\\o7$$\"3++++Ysq\"H#F\\o$\" 3=+++s()Rd@F\\o7$$\"3\"*******yM@-CF\\o$\"3#*******p5!e/#F\\o7$$\"30++ +L8.-DF\\o$\"3))*****p7-X#>F\\o7$$\"35+++tEG!f#F\\o$\"3%)*****pFmXz\"F \\o7$$\"37+++-(*>mEF\\o$\"3%******zmRrl\"F\\o7$$\"30+++3A8HFF\\o$\"3)* *****48RM^\"F\\o7$$\"31+++a[byFF\\o$\"3'******4ARZO\"F\\o7$$\"3-+++LB2 9GF\\o$\"3++++p+O77F\\o7$$\"3')*****>XBa$GF\\o$\"3)*******oLld5F\\o7$$ \"3\"******4T$[UGF\\o$\"3G******4f))>!*F*7$$\"3%*******fUENGF\\o$\"3i* ****\\h#RnuF*7$$\"37+++$3Ktrc\"F*7$$\"3!*********R&\\f#F\\o$\"3()*****f$4dI BF]q7$$\"3#******z!4')4DF\\o$!3%*******yvW@5F*7$$\"3&*******RXD9CF\\o$ !3%******42bh=#F*7$$\"3'*******[A84BF\\o$!39+++#p#)=D$F*7$$\"3/+++B1e& >#F\\o$!3h******yPb5UF*7$$\"37+++8Wwu?F\\o$!3++++([#Hb]F*7$$\"39+++$o9 z%>F\\o$!3e*****Ru30y&F*7$$\"31+++`lJ;=F\\o$!3++++zM(>Q'F*7$$\"3'***** *H#eH\"o\"F\\o$!3k*****>B%)o&oF*7$$\"3,+++x_?W:F\\o$!3;+++U[#R?(F*7$$ \"3********3]&oTtF*7$$\"3?*****pB8Bv)F*$!3I+++$ol[3(F*7$$\"3I+++!zU# RvF*$!3N+++6%egs'F*7$$\"3S+++)=*H'R'F*$!3G+++&3=dF'F*7$$\"3()*****H&=O M`F*$!3S+++PCLYdF*7$$\"31+++d'zMO%F*$!3)*******Qem_^F*7$$\"3%******p#e $G\\$F*$!3))*****HW`@^%F*7$$\"3!******H+w2t#F*$!3!)******e'Qb%QF*7$$\" 37+++@F'\\3#F*$!3=+++#G#*y<$F*7$$\"33+++Fsvi:F*$!3++++H)3-a#F*7$$\"37+ ++R%H?<\"F*$!37+++[(4;(>F*7$$\"3b*******p\"eD#*F]q$!34+++[l8@:F*7$$\"3 ))*****p;9%p#)F]q$!3%******RhqUC\"F*7$$\"35+++K6\"4&*)F]q$!3%******fw( 4&=\"F*7$$\"3.+++`$zs6\"F*$!3%******f\\4CN\"F*7$$\"33+++*e5kX\"F*$!3&* *****f4wNs\"F*7$$\"31+++5I@k=F*$!3?+++M?ZoAF*7$$\"3!)*****pO4qH#F*$!3! ******\\.2:'HF*7$$\"3#)******zs&)>FF*$!31+++)GYAy$F*7$$\"3*)*******QUa 5$F*$!3T+++\"f/Nr%F*7$$\"30+++?wCKMF*$!3;+++It\")RdF*7$$\"3++++S.9$o$F *$!3s*****HVWQF*$!3!)*****4gr#>!)F*7$$\"3$)*****z3p _!RF*$!3*)*****z`lPC*F*7$$\"3y*****40Ss&QF*$!3%*******=rc]5F\\o7$$\"3? +++=R6%p$F*$!3-+++L+1z6F\\o7$$\"3)******>(zl6MF*$!3,+++RaT38F\\o7$$\"3 ))*****zc/v+$F*$!3++++1(*>P9F\\o7$$\"39+++(*\\/\"[#F*$!3)******>[&*Rc \"F\\o7$$\"3'******fzRL$=F*$!37+++2@T(o\"F\\o7$$\"3++++QJ.n5F*$!3;+++t n41=F\\o7$$\"3-+++caoi=F]q$!31+++lpu=>F\\o7$$!35+++fa(R.)F]q$!3:+++TG7 C?F\\o7$$!3++++Uw3&*=F*$!38+++St0@@F\\o7$$!31+++c8q!3$F*$!3;+++myY3AF \\o7$$!3u*****p,?5N%F*$!3%)*****z5m`G#F\\o7$$!3C+++&==ep&F*$!33+++gz'3 N#F\\o7$$!3++++NJ)R5(F*$!3-+++)4-US#F\\o7$$!3m*****>7ROc)F*$!3*******z n;ZW#F\\o7$$!3%******HsFi+\"F\\o$!3!******>!e)=Z#F\\o7$$!3++++@!*oe6F \\o$!3))*****fc:`[#F\\o7$$!31+++%>6CJ\"F\\o$!3))*****>gYZ[#F\\o7$$!33+ ++8`.m9F\\o$!3#)*****pVd+Z#F\\o7$$!3$)******>\\>=;F\\o$!3:+++n]ETCF\\o 7$$!33+++]-`nF\\o$!3'******z') H@M#F\\o7$$!3#******f60C0#F\\o$!35+++rY]sAF\\o-%'COLOURG6&%$RGBG$\"#5! \"\"$\"\"!FbhtFaht-%+AXESLABELSG6$Q!6\"Ffht-%&STYLEG6#%&POINTG-%(SCALI NGG6#%,CONSTRAINEDG-%%VIEWG6$%(DEFAULTGFcit" 1 5 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 121 "It appears as if the motion should be quite regular, i.e ., the 'circles' should be progressing steadily in the x-y plane." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "dt:=0.002;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dtG$\"\"#!\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "N:=50000;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"NG\"& ++&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from 1 to N do :" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Verlet(i,10,1/2); od:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 78 "plot([seq([rx[i*100],ry[i*10 0]],i=1..N/100)],style=point,scaling=constrained);" }}{PARA 13 "" 1 " " {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7`jl7$$\"3.+++okj+6 !#<$\"3'******fYwS4\"F*7$$\"3!******R8v/S\"F*$\"3#******R#H*zM\"F*7$$ \"3!******p$z&*z=F*$\"3.+++?*=dq\"F*7$$\"30+++MBa:DF*$\"3&)*****pZ%>9@ F*7$$\"33+++rSX'G$F*$\"3(******>O)=JDF*7$$\"3m*****4x#*[<%F*$\"3\"**** **4o\"RCHF*7$$\"3')******y6$\\;&F*$\"3!)*****zy())oKF*7$$\"3l*****p3A; C'F*$\"35+++'zS^a$F*7$$\"33+++(GV/R(F*$\"3:+++QVnPPF*7$$\"3?+++^i*pf)F *$\"3-+++a2BMQF*7$$\"39+++$epo%)*F*$\"3))*****RaN_#QF*7$$\"3++++=*fD6 \"!#;$\"3'******R4jMq$F*7$$\"31+++`$p=C\"F\\o$\"3A+++i\\!QY$F*7$$\"3'* ******o/K*4.JF*7$$\"3%*******)oI!*\\\"F\\o$\"3\"*** ***>M4+i#F*7$$\"3++++B:/C;F\\o$\"33+++z=#\\,#F*7$$\"35+++`i#[u\"F\\o$ \"3-+++4&f)*G\"F*7$$\"39+++ht0g=F\\o$\"3!)*****RZ'*Q[%!#=7$$\"3))***** fsj%o>F\\o$!3\\+++O/jW]F]q7$$\"3/+++fJ%)o?F\\o$!35++++mIi:F*7$$\"39+++ iX2g@F\\o$!3'******H>zur#F*7$$\"31+++'>F6C#F\\o$!31+++b>:hRF*7$$\"3$)* ****H0s5J#F\\o$!3e*****pqSMG&F*7$$\"3#)*****>V*3pBF\\o$!3u*****RN>Nn'F *7$$\"30+++#y![9CF\\o$!3j+++Bbu>\")F*7$$\"39+++>(pmW#F\\o$!3-+++Xlz4'* F*7$$\"3-+++6%4_Y#F\\o$!3/+++#RzI6\"F\\o7$$\"33+++LxypCF\\o$!3%******H MWpE\"F\\o7$$\"37+++\"zG-Y#F\\o$!3$******>G<7U\"F\\o7$$\"3()*****>9+lV #F\\o$!3-+++P*GXd\"F\\o7$$\"31+++,Oq)R#F\\o$!3,+++!>4bs\"F\\o7$$\"39++ +\"z!3ZBF\\o$!3-+++3^!G(=F\\o7$$\"3%)*******e4?G#F\\o$!3\"******zb#4:? F\\o7$$\"36+++K!**R?#F\\o$!33+++W(*3^@F\\o7$$\"3')******eZo8@F\\o$!3-+ ++a0dzAF\\o7$$\"30+++]2#=,#F\\o$!3++++A#y$*R#F\\o7$$\"3'******H(fF**=F \\o$!38+++lmV4DF\\o7$$\"3++++B5-x#y$HF\\o7$$\"3;+++r*)\\xuF*$!3!******p:!)Q%HF\\o7$$\"3=+++4Vy: fF*$!3/+++>'eb$HF\\o7$$\"3!******pof@P%F*$!31+++Cz+8HF\\o7$$\"3#)***** >(>5gGF*$!37+++=2^wGF\\o7$$\"33++++\\r#R\"F*$!3*******4]![EGF\\o7$$!3' ******\\]N.u\"!#>$!3'******RHjMw#F\\o7$$!3!*******HmHe8F*$!3'******HwF \")o#F\\o7$$!3,+++D@x=EF*$!3!******pug7g#F\\o7$$!3%******H!*=&)y$F*$!3 8+++x_v.DF\\o7$$!3))*****H)o@e[F*$!3%******H,0mR#F\\o7$$!3!)*****H/Z'> eF*$!39+++$4zd@F\\o7$$!3!)*** **>T]3R(F*$!3:+++&\\=&G?F\\o7$$!3Q+++(e[/*zF*$!3-+++k/O%*=F\\o7$$!39** ***>pn:Y)F*$!33+++f2kc\"F\\o7$$!3m+++0![#*)))F*$!35+++)*p (>1\"F\\o7$$!3^+++0!*z5')F*$!3r+++0ra6$*F*7$$!3w*****f<5dA)F*$!3)***** *z1S(f!)F*7$$!32+++sVgVxF*$!3c******)o,d(oF*7$$!3C+++'\\&)e<(F*$!39+++ L[#*pdF*7$$!3c******Qz&e`'F*$!3++++Xp!>v%F*7$$!3A+++Ln%*QeF*$!30+++DQ- IQF*7$$!36+++A60.^F*$!30+++]sT6IF*7$$!3))*****HgI\"\\VF*$!34+++;.)=I#F *7$$!3%)******=.<-OF*$!32+++T0w0$pe A\"F*7$$!3))*****f4-$fAF*$!3K+++,98M')F]q7$$!3!******flm4v\"F*$!3Q+++= KryhF]q7$$!34+++)pCqU\"F*$!33+++\\S`j[F]q7$$!3$******HQhOM\"F*$!3\")** ***4()Reg%F]q7$$!30+++'etW_\"F*$!3Q+++BJG)>&F]q7$$!3!******pWYw%>F*$!3 _+++FfE!G'F]q7$$!3?+++3,.pDF*$!3Z*******\\1&QuF]q7$$!33+++cPZXLF*$!3)* *****f9L^J)F]q7$$!3&)*****p$)f9C%F*$!34+++jdfO')F]q7$$!3l*****H*f3G_F* $!3%)*****>=];?)F]q7$$!3++++x\\'4G'F*$!3a+++183koF]q7$$!3))******z4nyt F*$!3$)******fNj>XF]q7$$!3b*****>$*e<])F*$!3/+++!*oG(4\"F]q7$$!3$3++! \\/?K'*F*$\"35+++`/ZYMF]q7$$!31+++AkIv5F\\o$\"3i*****\\\"H^J\"*F]q7$$! 3++++$=O[=\"F\\o$\"33+++PHo&f\"F*7$$!3)******4l)H!H\"F\\o$\"3/+++87E!R #F*7$$!3++++L7F!R\"F\\o$\"3!)******y4>$H$F*7$$!3)******4(4U$[\"F\\o$\" 3k*******o4#*H%F*7$$!31+++R>^o:F\\o$\"3')*****\\\"*G;S&F*7$$!3()*****p !3TW;F\\o$\"3#)*****R)>Y#f'F*7$$!32+++#>$45$y&=N\"F\\o7$$!3=+++_x\"z&=F\\o$\"32+++g-e,:F\\o7$$!3')*****H@Hx %=F\\o$\"3/+++OC-_;F\\o7$$!35+++\"3?P#=F\\o$\"3()******o-$=!=F\\o7$$!3 %)*****f0Gfy\"F\\o$\"3')*****RNU'\\>F\\o7$$!30+++4L`MGF\\o7$$!3(******RSfo.\"F\\o$\"3!**** **H#RR1HF\\o7$$!3u*****z=Nk)*)F*$\"3-+++Pe7/'F*$\"3'******>&o%34$F\\o7$$!3y*****pe@R ]%F*$\"3#*******)f#3DJF\\o7$$!3z*****>6n7%HF*$\"35+++Yf0XJF\\o7$$!3%** ****fDEqO\"F*$\"3#******\\.&f]JF\\o7$$\"35+++#='p\\?F]q$\"3-+++F!p;9$F \\o7$$\"3)******z-A4w\"F*$\"3()*****Hwm$=JF\\o7$$\"3)******4?'>(G$F*$ \"3-+++Fk\"43$F\\o7$$\"3u*****p:h/x%F*$\"39+++$*)z'HIF\\o7$$\"3o*****z xLy>'F*$\"3')*****Rhp^'HF\\o7$$\"3)******z0?qb(F*$\"3))*****Hg9!))GF\\ o7$$\"3j+++;pUO))F*$\"3#******z^d*)z#F\\o7$$\"3(******R&z_-5F\\o$\"3)) *****H`]))p#F\\o7$$\"3/+++uJP66F\\o$\"31+++.$\\')e#F\\o7$$\"3/+++itH47 F\\o$\"3%)*****4C.%pCF\\o7$$\"3)******\\-KbH\"F\\o$\"38+++nzCUBF\\o7$$ \"3)******fLH%p8F\\o$\"36+++VxQ3AF\\o7$$\"3(******Hlo/V\"F\\o$\"3#**** **>d$3p?F\\o7$$\"33+++KNEy9F\\o$\"37+++$)=kD>F\\o7$$\"33+++)QnD^\"F\\o $\"3!******p%4SzM:F\\o$\"3*******\\S>uL\"F \\o7$$\"3$******\\-7\\^\"F\\o$\"3-+++/#oM>\"F\\o7$$\"3'******H;[I[\"F \\o$\"3/+++1DO`5F\\o7$$\"3)******\\$>@R9F\\o$\"3M*****>>2K=*F*7$$\"3-+ ++)G]TQ\"F\\o$\"3#******4?4\\*yF*7$$\"34+++oMu=8F\\o$\"35+++gCOzmF*7$$ \"3%******zm,SC\"F\\o$\"3S+++8(3ia&F*7$$\"3++++]A1h6F\\o$\"3&******pea R]%F*7$$\"3'******R![=r5F\\o$\"39+++![M)fNF*7$$\"3?+++^[]d(*F*$\"3)*** ***zsm'>FF*7$$\"3C+++#>TEw)F*$\"35+++8Ap()>F*7$$\"3M+++2uhVxF*$\"35+++ o))Rm8F*7$$\"3j*****\\eu#=nF*$\"39+++*\\#4j&)F]q7$$\"3%)*****HrAiq&F*$ \"3-+++t_5dXF]q7$$\"3k*****\\K*QHZF*$\"3++++7$)z-;F]q7$$\"3*)******yw \"H\"QF*$!3u*****RB%RXPF\\[l7$$\"3%******z.%o')HF*$!3/+++n@+*[\"F]q7$$ \"3;+++h,^(G#F*$!3%*******ef30>F]q7$$\"3)******H^!Qh7'o!R%F*$!3++++BR$=0\"F*7$$\"3q***** HU)fx_F*$!34+++c7=?:F*7$$\"39+++*zBD='F*$!3;+++K8W)4#F*7$$\"3A+++nFO#3 (F*$!3)******zTsny#F*7$$\"3=+++\"47q&zF*$!3;+++ip>$e$F*7$$\"3I+++&Q\"o )y)F*$!3%)******G0(Q[%F*7$$\"3-+++?8\\h&*F*$!3g*****Rs*G$[&F*7$$\"3%** ****>>Dh-\"F\\o$!3y*****fFyWd'F*7$$\"33+++JI`(3\"F\\o$!3G+++!HW\"\\xF* 7$$\"3#******\\\"*e#R6F\\o$!3u*****z.Gy**)F*7$$\"3-+++YlL!=\"F\\o$!3++ ++fZ+J5F\\o7$$\"3'******4+Y*47F\\o$!3'******4&[Wn6F\\o7$$\"3$******\\I 9uA\"F\\o$!3.+++bX*yI\"F\\o7$$\"32+++Jx@K7F\\o$!31+++Rh3^9F\\o7$$\"34+ ++D1)RA\"F\\o$!3'*******['4df\"F\\o7$$\"3)******R1xC?\"F\\o$!32+++fZUS 6F\\o$!32++ +];rC?F\\o7$$\"3++++EwKe5F\\o$!3!******RX!fh@F\\o7$$\"3))*****fNGW%)*F *$!33+++cL?$H#F\\o7$$\"3=*****>2cM)*)F*$!32+++#e%G=CF\\o7$$\"3S+++\")) zl+)F*$!3')*****RyBc`#F\\o7$$\"3D+++#3]7#pF*$!3)*******)ouSk#F\\o7$$\" 36+++$Qogt&F*$!3++++n*zDu#F\\o7$$\"3')*****\\)zogWF*$!3#******\\(=+++Tcr0JF*$!3,+++,2)f!HF\\o7$$\"3++++ZFg#o\"F*$!39+++L'[#pHF \\o7$$\"3.+++/mDN?F]q$!36+++])Q$>IF\\o7$$!3'******>MU(=8F*$!3++++>!Qd0 $F\\o7$$!37+++1j$GF\\o7$$!3'******\\5!=t9F\\o$!3!******z&pW[FF\\o7$$ !3#******z*G%[f\"F\\o$!37+++:b5\\EF\\o7$$!3++++5;q1CF\\o7$$!3%)*****H2It*=F\\o$!33+++0*G F\\o$!3')*****zo`k:#F\\o7$$!3$)*****4R>)Q?F\\o$!3 (******\\03^,#F\\o7$$!39+++RFr*3#F\\o$!3++++p)z*o=F\\o7$$!3#)*****>6to 7#F\\o$!3*)*****H:(R>t%Hr '*F*7$$!3!******Hxs(f?F\\o$!3u+++K=J^#)F*7$$!3#******4a$)G+#F\\o$!3c** ***zma)))oF*7$$!3*******>1#\\M>F\\o$!3u******))zC&f&F*7$$!3#*******\\C Yb=F\\o$!3k******p![4Q%F*7$$!39+++a*onw\"F\\o$!33+++\")yTbKF*7$$!3#*** ***>k*[p;F\\o$!3?+++#[.qA#F*7$$!3-+++S#)zk:F\\o$!3++++Dj\"GI\"F*7$$!3+ +++t.&RX\"F\\o$!3#******f&o=')[F]q7$$!3'******>!)y#Q8F\\o$\"32+++vk&G6 #F]q7$$!3$*******\\J=>7F\\o$\"3B+++U`lTzF]q7$$!3#******zB?\")4\"F\\o$ \"3/+++N7)*e7F*7$$!3'3++!e*zfw*F*$\"3\"******>;;lg\"F*7$$!3Y*****\\u7< c)F*$\"35+++0F`R=F*7$$!3;+++fkU%Q(F*$\"3%******pLrH'>F*7$$!3-+++&*>q]i F*$\"3'******f[IU)>F*7$$!37+++e/(y<&F*$\"36+++Wqc8>F*7$$!3G+++;/R%=%F* $\"3/+++x=qkDF*$\"3\" ******z852J\"F*7$$!3#******zJc%**=F*$\"35+++-gJh5F*7$$!3#******>#*[SY \"F*$\"3/+++[r#y[)F]q7$$!35+++kH$*\\7F*$\"33+++d@s6sF]q7$$!3%******>XT #z7F*$\"3u*****fs]S?(F]q7$$!30+++'H7b`\"F*$\"3C+++\\Ogi')F]q7$$!35+++L H(p'>F*$\"3#******RPo$e6F*7$$!3z*****fx\\S^#F*$\"3/+++)>b\"*e\"F*7$$!3 z*****4MBg7$F*$\"3))*****>')\\/:#F*7$$!3%)*****p&z;jPF*$\"39+++%*>XMGF *7$$!3%******fqcVR%F*$\"3<+++-2JLOF*7$$!3C+++M$>Y*\\F*$\"3Q+++$p4(QXF* 7$$!3.+++A>XVbF*$\"3o*****p`C;a&F*7$$!3\"******RqaP-'F*$\"3x*****pSIAj 'F*7$$!39+++I#o6U'F*$\"3A+++)Q%*)*z(F*7$$!3<+++ZFnBnF*$\"3F+++#[;K.*F* 7$$!3m******>*G8#pF*$\"3-+++g9,K5F\\o7$$!30+++\"3;h+(F*$\"3'******\\Z# zk6F\\o7$$!39+++&zE=(pF*$\"3\"******f#>N+8F\\o7$$!3=+++%p%)R\"oF*$\"3- +++PHMP9F\\o7$$!3++++ByzHlF*$\"3)******fd(Ru:F\\o7$$!3K+++SY5=hF*$\"3! ******fOS,r\"F\\o7$$!3))******>zKzbF*$\"37+++=E?V=F\\o7$$!3n******e>U: \\F*$\"3))******fkBs>F\\o7$$!3Q+++GZ\")HTF*$\"3')******\\(Gf4#F\\o7$$! 3z*****42XtA$F*$\"3\"******RT8I@#F\\o7$$!3&)******Re=9AF*$\"35+++@LGAB F\\o7$$!3#*******o4x(4\"F*$\"30+++5_gACF\\o7$$\"3(*******H(*)H8\"F]q$ \"34+++z#HH^#F\\o7$$\"3'******p'*e$49F*$\"3%******>g*H#f#F\\o7$$\"3#** ****zQ(yzFF*$\"3++++go')fEF\\o7$$\"3L+++>-78UF*$\"3&)*****4)H*[r#F\\o7 $$\"3g*****f*p<(p&F*$\"3/+++J=wcFF\\o7$$\"3))*****HU&=>sF*$\"3'******R c!)\\y#F\\o7$$\"3#*******3$=fw)F*$\"3-+++j@>*z#F\\o7$$\"3(*******HMQK5 F\\o$\"3=+++qW<*z#F\\o7$$\"33+++U6#z=\"F\\o$\"3'******4HM[y#F\\o7$$\"3 1+++\\&G=M\"F\\o$\"31+++BaAcFF\\o7$$\"33+++E&RF\\\"F\\o$\"3********)*o `8FF\\o7$$\"35+++5FJR;F\\o$\"3%******f>$4dEF\\o7$$\"3%)*****\\SW-y\"F \\o$\"3%******z*QN(e#F\\o7$$\"30+++oJG9>F\\o$\"30+++O[!\\]#F\\o7$$\"3$ ******RRS-/#F\\o$\"37+++CYX5CF\\o7$$\"31+++va+d@F\\o$\"3-+++/^#[I#F\\o 7$$\"3/+++2AbjAF\\o$\"3;+++jj%*)=#F\\o7$$\"3')*****>;a*eBF\\o$\"39+++) 4YQ1#F\\o7$$\"3&******Rb\"RUCF\\o$\"3.+++nujI>F\\o7$$\"3(*******y'fJ^# F\\o$\"3)******zX50z\"F\\o7$$\"39+++PgnqDF\\o$\"38+++,urW;F\\o7$$\"37+ ++>')[9EF\\o$\"3'******4?hX\\\"F\\o7$$\"32+++HzFWEF\\o$\"3.+++&4\"QT8F \\o7$$\"39+++b(e)fEF\\o$\"31+++5>a'=\"F\\o7$$\"3/+++!3#=hEF\\o$\"3/+++ SsTJ5F\\o7$$\"3;+++&oS$[EF\\o$\"39+++*plPx)F*7$$\"3!******pkl:i#F\\o$ \"33+++)*HqdsF*7$$\"35+++:SA\"e#F\\o$\"3))*****\\Zd\"zdF*7$$\"38+++OO \"y_#F\\o$\"3Q+++l0%3N%F*7$$\"35+++e!e>Y#F\\o$\"3!)*****4+f[)HF*7$$\"3 7+++NFS%Q#F\\o$\"3))******yIf#p\"F*7$$\"3;+++_m+'H#F\\o$\"3#)*****RMpc %[F]q7$$\"3))*****pZLx>#F\\o$!3++++E@q'H'F]q7$$\"33+++E8k!4#F\\o$!3)** *****e9lT;F*7$$\"39+++,M(e(>F\\o$!33+++4a4WDF*7$$\"37+++urka=F\\o$!3@+ ++U)**4L$F*7$$\"35+++71CGt(*RF*7$$\"31+++6'zzf\"F\\o $!3k*******o,6a%F*7$$\"3-+++%zD_Y\"F\\o$!3g*****zsL%f\\F*7$$\"3/+++YaO J8F\\o$!3!******p#oj__F*7$$\"31+++gPz(>\"F\\o$!3i******3VFAaF*7$$\"3-+ ++lW!f1\"F\\o$!3y*****>SC;Z&F*7$$\"3M+++ndvq$*F*$!3u*****45pdS&F*7$$\" 3(3++I<%fE\")F*$!3d*****\\s(oJ_F*7$$\"3e*****z(RtRpF*$!3m******RxRe\\F *7$$\"34+++9)HH#eF*$!3o*****z@erf%F*7$$\"3/+++VS\\)y%F*$!3g******RqxhT F*7$$\"3=+++3vL[QF*$!3-+++S*)4pOF*7$$\"30+++OS69IF*$!35+++BAyRJF*7$$\" 3#)*****HBYvH#F*$!3?+++oU`*f#F*7$$\"3)******H$Q,6F*7$$\"33+++U-'=$=F*$!3')*****zy1la#F*7$$\"31+++%4Pb>#F*$!3&) *****\\mD!>LF*7$$\"3!******pkS<`#F*$!3<+++Z#**4@%F*7$$\"3*)******)y(z: GF*$!3k*****R\"=>/_F*7$$\"3@+++=taGIF*$!31+++P`)>G'F*7$$\"3y*****4Y(* \\:$F*$!3s*****\\[?'GuF*7$$\"3))*****>IdM=$F*$!3b+++0GxG')F*7$$\"36+++ EO)\\5$F*$!3))*****4LPt')*F*7$$\"3++++*>F\\o7$$!3)******z TkCX.#F\\o7$$!3w*****zJJn0%F*$!3;+++1%[*=@F\\o7$$!3H+ ++n<7S`F*$!33+++YXw#>#F\\o7$$!37+++uM%ep'F*$!3#)*****>8)4bAF\\o7$$!3\\ *****R7sE6)F*$!3&)*****H(y=0BF\\o7$$!3s*****\\*ziy&*F*$!3&)*****Ru'RUB F\\o7$$!30+++q9636F\\o$!3%)*****fw:iO#F\\o7$$!3'******fG02E\"F\\o$!3%) *****4coiP#F\\o7$$!33+++pJI99F\\o$!3;+++pWJsBF\\o7$$!35+++b>an:F\\o$!3 )******4s^UN#F\\o7$$!3:+++%y_!>\"p3wAF\\o7$$!3:+++-cZ6?F\\o$!3*******\\*[Z;AF\\o7$$!3%)*** **Re^(\\@F\\o$!3!*******4(GP9#F\\o7$$!3-+++&[_5G#F\\o$!39+++pLUe?F\\o7 $$!39+++5&*=/CF\\o$!3#******RZe7'>F\\o7$$!3!******z;]!=DF\\o$!3/+++)\\ \\I&=F\\o7$$!3))******4Xg@EF\\o$!31+++P3sMuz:HF\\o$!3'******>>'*==\"F\\o7$$!3%)*****4E -h&HF\\o$!3#******H[#))H5F\\o7$$!37+++(eeA)HF\\o$!3%********oU'\\()F*7 $$!37+++@L2%*HF\\o$!3q*****4#>4&=(F*7$$!37+++ZE[\"*HF\\o$!3-+++8b'*=cF *7$$!39+++RncuHF\\o$!3K+++%eN]1%F*7$$!39+++*z]N%HF\\o$!3#)*****4`,p`#F *7$$!35+++jay)*GF\\o$!3-+++`,'y/\"F*7$$!3&******>Db2%GF\\o$\"37+++peM# *QF]q7$$!39+++d?2qFF\\o$\"3'*******y^5iF\\o$\"3p+++3A5>()F*7$$!37+++Wq6e=F\\o$\"3k*****pYXRC*F*7$$!3&) *****zA,zr\"F\\o$\"3C*****\\@y%Q'*F*7$$!3)******f2mhd\"F\\o$\"3y+++sy& =!**F*7$$!3++++/.FM9F\\o$\"3.+++:TZ.5F\\o7$$!3%******>fjNH\"F\\o$\"3/+ ++J6$R+\"F\\o7$$!31+++I%o`:\"F\\o$\"3p*****zF+$>**F*7$$!3/+++;'o4-\"F \\o$\"3Q+++bf+!o*F*7$$!3x+++/*Qf\"*)F*$\"3P*****HP+$G$*F*7$$!3')****** eM1%o(F*$\"3i+++M)\\E())F*7$$!3K+++,(e[_'F*$\"35+++p@:B$)F*7$$!3'***** **>6;[aF*$\"3!)******\\If\"p(F*7$$!3k*****pA5FY%F*$\"3y*****pFb:*pF*7$ $!3#******z;7#F*$\"3C+++G==[YF*7$$!3!******HM$Hi:F*$\"3 #)*****f\"*=d&QF*7$$!34+++8$pj6\"F*$\"3,+++-6h-JF*7$$!3Z*****4wBb$yF]q $\"3.+++%f&\\DCF*7$$!3j*****RkXGh&F]q$\"3#*******Q4*3(=F*7$$!3%******* >V(=X%F]q$\"3-+++'fld\\\"F*7$$!3))*****\\i'4\"G%F]q$\"3#******H%3Hd8F* 7$$!3++++$G1\"[\\F]q$\"3)******zvt][\"F*7$$!3#)*****fBBe:'F]q$\"3++++# R#*G'=F*7$$!3R+++^`G$F*7$$!39+++2aAI$*F]q$\"3?+++&p&RqSF*7$$!3S+++dsm!G*F]q$\"3e ******o\">?/&F*7$$!3O+++uFKk$)F]q$\"31+++,<(f3'F*7$$!3[+++1eumkF]q$\"3 ?+++<*\\1=(F*7$$!3$******H4%)y]$F]q$\"3x*****He)\\1$)F*7$$\"3/+++V\"G' RcF\\[l$\"3G+++hARX%*F*7$$\"3O+++t2AwdF]q$\"33+++8'H!e5F\\o7$$\"3.+++y ?\\87F*$\"33+++)\\3&p6F\\o7$$\"3)******>,%oi>F*$\"3#******piZuF\"F\\o7 $$\"3?+++_L7AGF*$\"33+++k=S!Q\"F\\o7$$\"33+++$QFry$F*$\"31+++gA,x9F\\o 7$$\"3I+++D#\\:&[F*$\"31+++3M,m:F\\o7$$\"3#******4'*))y+'F*$\"35+++xaB Y;F\\o7$$\"3)******fQLuC(F*$\"3))*****Hu9mr\"F\\o7$$\"3i*****>oy.c)F*$ \"3'******f`,ix\"F\\o7$$\"3x*****f*['f$**F*$\"3&******pYkT#=F\\o7$$\"3 &******z4hi8\"F\\o$\"35+++?szf=F\\o7$$\"3)******>00GG\"F\\o$\"31+++8]_ #)=F\\o7$$\"3)******4rY>V\"F\\o$\"3'*******[\"4>*=F\\o7$$\"3++++KRO#e \"F\\o$\"3'******zX[w)=F\\o7$$\"35+++*y4Ft\"F\\o$\"3!*******3@ep=F\\o7 $$\"3%*******>Zi\")=F\\o$\"3&)*****>]\"pP=F\\o7$$\"3,+++T>vF?F\\o$\"3# ******pf,@z\"F\\o7$$\"39+++THvp@F\\o$\"39+++`J2LOCF\\o$\"3++++jaUw:F\\o7$$\" 3%)******pe;eDF\\o$\"3-+++5V**z9F\\o7$$\"3=+++bt5rEF\\o$\"3-+++1t[s8F \\o7$$\"3;+++sM'Rx#F\\o$\"31+++'*=za7F\\o7$$\"3%)*****f\"3ylGF\\o$\"34 +++G()*y7\"F\\o7$$\"33+++M$)pXHF\\o$\"3V+++bT))G**F*7$$\"3:+++93)H,$F \\o$\"3Y******\\nB4&)F*7$$\"3))*****4i&*p1$F\\o$\"3u*****RXrB.(F*7$$\" 36+++'o\\s5$F\\o$\"3r*****\\8%=6bF*7$$\"3#*******)GwL8$F\\o$\"39+++I7+ fRF*7$$\"3')******e[8XJF\\o$\"3%******p%\\X*Q#F*7$$\"3$******>:UC9$F\\ o$\"3!******R[5M;)F]q7$$\"3\"******RfM`7$F\\o$!3S+++EfGluF]q7$$\"3++++ K9)R4$F\\o$!3#******40[aG#F*7$$\"3%******H)[p[IF\\o$!39+++T)epy$F*7$$ \"3!******zwK**)HF\\o$!3/+++GT+Q_F*7$$\"3$******z>l#=HF\\o$!3h*****z/ \\gi'F*7$$\"3(*******3:QMGF\\o$!3!******\\P4#RzF*7$$\"3()*****\\^*3RFF \\o$!3s+++'=pj;*F*7$$\"31+++keJLEF\\o$!3.+++)>I(H5F\\o7$$\"3!*******Hx 2=DF\\o$!33+++u(yA8\"F\\o7$$\"39+++\"4rWR#F\\o$!30+++D%pMA\"F\\o7$$\"3 7+++>kmjAF\\o$!3-+++Lig-8F\\o7$$\"3:+++[***o7#F\\o$!3-+++^r6p8F\\o7$$ \"3%)*****\\Gia)>F\\o$!3.+++>BcA9F\\o7$$\"3;+++c%z1%=F\\o$!3#******4AQ EY\"F\\o7$$\"3!*******>w*Qp\"F\\o$!31+++!>\"=*[\"F\\o7$$\"3'******zksk a\"F\\o$!3#******z\"3<-:F\\o7$$\"3)******z0_(*R\"F\\o$!3(******44M<]\" F\\o7$$\"3%******p,k]D\"F\\o$!33+++q49)[\"F\\o7$$\"30+++*f+P6\"F\\o$!3 -+++T[!=Y\"F\\o7$$\"3[*****H4U!p(*F*$!34+++\"H$GB9F\\o7$$\"3M+++Q$>&e% )F*$!3%******RNqKP\"F\\o7$$\"3K+++[nT;sF*$!3(******4t(f78F\\o7$$\"39++ +H5y_gF*$!3'******fNIAC\"F\\o7$$\"3Q+++.jew\\F*$!31+++E-Ej6F\\o7$$\"35 +++uee&*RF*$!35+++qu!p2\"F\\o7$$\"34+++ju<;JF*$!3c+++'4l^%)*F*7$$\"3<+ ++\\#[KM#F*$!3Q*****R['ev))F*7$$\"31+++$)H+!o\"F*$!3q*****Hd(QwyF*7$$ \"3*)*****>drx7\"F*$!3m*****4Q,^'oF*7$$\"3#******zfSw&oF]q$!37+++S3-he F*7$$\"3(******Hihu]$F]q$!3W+++4`q&)[F*7$$\"3%******f)4'e;\"F]q$!3-+++ s^$Q'RF*7$$!3'******H/r%QEF\\[l$!3$)******[aiCJF*7$$!3!******\\^,=A*F \\[l$!3-+++Ya(RS#F*7$$!30+++rfR,5F]q$!3#******H(y!p%=F*7$$!3a******os9 7uF\\[l$!3*******z%R%o]\"F*7$$!3#******4zUa%RF\\[l$!3$******43bF\\[l$!31+++$f.Vj\"F*7$$!3'******fu&*oZ$F\\[l$!3;+++# 3N/3#F*7$$!3/+++6.;%3\"F]q$!3*******fY+^r#F*7$$!3w*****favie#F]q$!3#)* ****f*Qw'[$F*7$$!3=+++Wu)[*\\F]q$!3%*******31\"QN%F*7$$!34+++Odk2%)F]q $!3;+++n3+$G&F*7$$!3))*****f$Hi)G\"F*$!3C+++'>]pC'F*7$$!31+++zvp;H$F*$!3%)* ****fK(3F\"*F*7$$!3U+++aVnuTF*$!3#******\\H`@+\"F\\o7$$!3')*****\\TP%e ^F*$!3++++:im&3\"F\\o7$$!3')*****zcYkB'F*$!31+++qW(=;\"F\\o7$$!3G+++:W $3S(F*$!3++++!yR&H7F\\o7$$!3K+++P=_U')F*$!3)******z3dvG\"F\\o7$$!3E*** **\\2m8&**F*$!32+++xk&\\L\"F\\o7$$!33+++d0jJ6F\\o$!3++++%G04P\"F\\o7$$ !3%******R5]DF\"F\\o$!3%******\\W5ZR\"F\\o7$$!3&*******Rvk;9F\\o$!3$** ****Rn?eS\"F\\o7$$!3#******>%eii:F\\o$!3)******RKHQS\"F\\o7$$!3:+++6[: 4F\\o$!3+++++HO<8F\\o7$$!3(******f$R`Q@F\\o$!3'******pp5=E \"F\\o7$$!3/+++C-ztAF\\o$!3++++H8I$>\"F\\o7$$!39+++]_%HS#F\\o$!3-+++5e G76F\\o7$$!32+++T(pZ_#F\\o$!32+++LnM>5F\\o7$$!3$******zY$4QEF\\o$!3u** ****47\">:*F*7$$!32+++#QC=u#F\\o$!3i*****zHUk+)F*7$$!3-+++h(o\\$GF\\o$ !3)******4w)QmnF*7$$!3;+++LWh;HF\\o$!3P+++RH1UaF*7$$!33+++Qq'f)HF\\o$! 3R+++Y'fY/%F*7$$!35+++C\"[B/$F\\o$!3++++,v7'e#F*-%'COLOURG6&%$RGBG$\"# 5!\"\"$\"\"!FahtF`ht-%+AXESLABELSG6$Q!6\"Feht-%&STYLEG6#%&POINTG-%(SCA LINGG6#%,CONSTRAINEDG-%%VIEWG6$%(DEFAULTGFbit" 1 5 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 53 "We seem to be getting a different answer each time..." }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "dt:=0.001;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "N:=100000;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from 1 to N do:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Verlet(i, 10,1/2); od:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 78 "plot([seq([rx[i*200 ],ry[i*200]],i=1..N/200)],style=point,scaling=constrained);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dtG$\"\"\"!\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"NG\"'++5" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7`jl7$$\"3++++s]9,6!#<$\"3'******>]OX4\"F*7 $$\"3\"******f^h9S\"F*$\"3%********)zy[8F*7$$\"35+++8>O\")=F*$\"35+++n wq1&[^r8F\\o$\"3***** **f!Gr-JF*7$$\"3-+++tuP*\\\"F\\o$\"3-+++RtU>EF*7$$\"3'******>w'QC;F\\o $\"3*******foXT,#F*7$$\"3#******R(*o^u\"F\\o$\"3#******pA\"*))G\"F*7$$ \"3=+++)f'Rg=F\\o$\"3y*****4V,BZ%!#=7$$\"33+++5!)zo>F\\o$!3q******)G_ \"e]F]q7$$\"3;+++s0FF*7$$\"3!*******=@VTAF\\o$!3%)*****zL+J'RF*7$$\"3.+++PQO6B F\\o$!3U+++S[g&G&F*7$$\"3=+++]5PpBF\\o$!3i*****4!o\"fn'F*7$$\"39+++ybu 9CF\\o$!3;*****HI+C7)F*7$$\"3-+++rK\"pW#F\\o$!3D+++]-t7'*F*7$$\"3)**** **pPFaY#F\\o$!3%******z'HS86F\\o7$$\"3#)******ym(*pCF\\o$!3)******>Z+t E\"F\\o7$$\"31+++iTRgCF\\o$!31+++v0h@9F\\o7$$\"3)******R9LmV#F\\o$!3)* *****z0j\\d\"F\\o7$$\"3))*****>e)z)R#F\\o$!3)******>L*)fs\"F\\o7$$\"33 +++lD8ZBF\\o$!3%******RBOL(=F\\o7$$\"3))******\\$4?G#F\\o$!3.+++$>!o:? F\\o7$$\"3%)******[b$R?#F\\o$!3'******>fO<:#F\\o7$$\"38+++8![N6#F\\o$! 39+++2\"z-G#F\\o7$$\"38+++;Wg6?F\\o$!30+++Z6:+CF\\o7$$\"3')*****H;r*)* =F\\o$!36+++TtF5DF\\o7$$\"3%)*****>W=mx\"F\\o$!3))******znm4EF\\o7$$\" 3++++^`hX;F\\o$!3/+++\\$p=HF\\o7$$\"3i+++ D,2K!*F*$!37+++fI>RHF\\o7$$\"3%)*****fotWY(F*$!3#******R$oDXHF\\o7$$\" 3;+++EpB,fF*$!39+++\\A&p$HF\\o7$$\"3Q+++$*o1cVF*$!3++++3ZS9HF\\o7$$\"3 <+++l0ZUGF*$!33+++$f!)y(GF\\o7$$\"3#******HheNP\"F*$!3(******RCCy#GF\\ o7$$!3m*****p7+_!Q!#>$!3=+++DgukFF\\o7$$!3++++3[P!Q\"F*$!3++++lsL*o#F \\o7$$!3,+++I$GAk#F*$!36+++L)4Cg#F\\o7$$!3#*******o')H8QF*$!3%*******3 O$[]#F\\o7$$!3')*****\\bfU)[F*$!3;+++RPh(R#F\\o7$$!33+++0I*o%eF*$!3%)* ****>FI=G#F\\o7$$!3S+++KO;%p'F*$!37+++Krke@F\\o7$$!3&******R-5.U(F*$!3 -+++0XHH?F\\o7$$!3@+++1A\"4-)F*$!3++++LF0&*=F\\o7$$!3G*****p!\\'H\\)F* $!3')*****R!\\Cd\\$))F*$!3*)******H&=sh\"F\\o7$$!3U++ +]@tY!*F*$!3/+++%GLjZ\"F\\o7$$!3&******p<-*H\"*F*$!3%******\\9^fL\"F\\ o7$$!3[*****p&QY(3*F*$!3++++ooT(>\"F\\o7$$!3))******fZ2C*)F*$!3-+++*\\ U?1\"F\\o7$$!3g+++Kp+Y')F*$!3w******)GU4J*F*7$$!3c*****f`o6E)F*$!3%3++ ]%Qzd!)F*7$$!3))*****Rgw\"zxF*$!3I+++H4LsoF*7$$!35+++A-U6sF*$!31+++b5- ldF*7$$!3M+++\\$z6d'F*$!3=+++rlLXZF*7$$!39+++)[[Q(eF*$!3()*****>q=;#QF *7$$!3k******)H\"GP^F*$!3!*******fu%4+$F*7$$!39+++mVQ#Q%F*$!3!)*****fK F!*G#F*7$$!3y*********\\Sj$F*$!3-+++'fk+p\"F*7$$!3*******>B8F#HF*$!3** ******ebg17F*7$$!37+++g+o'G#F*$!3c*****433NR)F]q7$$!3#*******GG'[x\"F* $!3c+++1TcneF]q7$$!3'******fVdmW\"F*$!3C+++J_(*QWF]q7$$!3/+++>%[#f8F*$ !3#)*****f7L5*RF]q7$$!34+++rl*z`\"F*$!3w*****\\=f1G%F]q7$$!3%******>^d :'>F*$!3w*****>))oE$\\F]q7$$!3!******HI=Te#F*$!3^+++-;lUbF]q7$$!3#**** **\\o\"3gLF*$!3_+++]6brdF]q7$$!3s*****R()\\F]q 7$$!3@+++aDPQtF*$\"3++++a\")fK7F]q7$$!3$)*****frv!H%)F*$\"3w******R:5I bF]q7$$!3_*****\\+'e=&*F*$\"3#*******Rh'\\4\"F*7$$!3#*******f=)*e5F\\o $\"3)******>\")H)\\>\"R$F*7$$!3/+++$yDRN\"F\\o$\"37+++()*y(p VF*7$$!3'*******z=zQ9F\\o$\"3E+++3ywXaF*7$$!3%******p^v[^\"F\\o$\"3-++ +5T`6mF*7$$!3#******4\\56e\"F\\o$\"3A+++X*R#eyF*7$$!3=+++\"F\\o7$$!3%******\\7F/t\"F\\o$\"3&******p:aUM\"F\\ o7$$!3%)******\\mqNF\\o7$$!3&*******\\9D?;F\\o$\"3#******z'o]$3#F\\ o7$$!3-+++G\"*fd:F\\o$\"3()*****f,PNA#F\\o7$$!35+++g&o?[\"F\\o$\"31+++ r(oyN#F\\o7$$!3/+++U*3UR\"F\\o$\"31+++tHD&[#F\\o7$$!3/+++;9p%H\"F\\o$ \"3$******>p*[/EF\\o7$$!31+++GPJ%=\"F\\o$\"36+++m1X9FF\\o7$$!3-+++Du)R 1\"F\\o$\"3$******pX#49GF\\o7$$!3U*****f&\\BZ$*F*$\"3,+++'p]C!HF\\o7$$ !3y*****4&*\\i(zF*$\"33+++*3@(yHF\\o7$$!3>+++c/nQlF*$\"3++++8fCUIF\\o7 $$!3!)*****\\q,p/&F*$\"3%)*****\\:8C4$F\\o7$$!3&******\\Y2R^$F*$\"33++ +xFuGJF\\o7$$!3-+++(piI&>F*$\"3))*****4a/4:$F\\o7$$!3w*****R1++y$F]q$ \"3#)******RHseJF\\o7$$\"3!******\\L)\\(>\"F*$\"33+++`02_JF\\o7$$\"3-+ ++eshfFF*$\"32+++v%H58$F\\o7$$\"3K+++slp%H%F*$\"3;+++W;!e4$F\\o7$$\"3- +++@#[$*y&F*$\"3%******\\<:n/$F\\o7$$\"3S+++@MeIsF*$\"3!*******)*\\B%) HF\\o7$$\"3!3++]ybfg)F*$\"3'******4_d*3HF\\o7$$\"3n*****R\"po.**F*$\"3 %******4V3;#GF\\o7$$\"32+++\")3G66F\\o$\"3-+++$\\FIs#F\\o7$$\"3.+++\"f EBA\"F\\o$\"3))*****RzaTh#F\\o7$$\"3'******zk)fA8F\\o$\"3'******>*R,' \\#F\\o7$$\"3++++4))H69F\\o$\"33+++&>+(pBF\\o7$$\"3#******zO[x[\"F\\o$ \"3!******f4!QOAF\\o7$$\"3'******>'))Q^:F\\o$\"3!******4s*H(4#F\\o7$$ \"34+++'>'z,;F\\o$\"3=+++=[v`>F\\o7$$\"3*)*****p_$oQ;F\\o$\"3!******\\ Zvq!=F\\o7$$\"37+++Ha!>m\"F\\o$\"3%******>n7'e;F\\o7$$\"3)*******))zWr ;F\\o$\"3/+++,Ns4:F\\o7$$\"31+++c;Yn;F\\o$\"3)******>yc,\"F\\o$\"30+++dX.V>F*7$$\"3g+++;Rlo!*F*$ \"3%*******\\%QgG\"F*7$$\"3W*****>eF3+)F*$\"3W+++7#eCT(F]q7$$\"36+++S\"F*$!36+++@TvAGF]q7$$\"31+++>`'ef\"F*$!3F+++-! =&>KF]q7$$\"3-+++LBJ@?F*$!3'******p/AaT%F]q7$$\"3\"******4uw(>EF*$!3b* *****eq)>a'F]q7$$\"3.+++R@nOLF*$!3w*****zXJ,p*F]q7$$\"3-+++\\`3GTF*$!3 #*******fQs\"R\"F*7$$\"39+++!pc#f\\F*$!3)******45'=D>F*7$$\"3=+++g2)>! eF*$!3-+++x')ypDF*7$$\"3\"******\\#pjKmF*$!35+++0)*yBLF*7$$\"3u*****z[ W4V(F*$!31+++9Zc$=%F*7$$\"3w+++6(*>z\")F*$!36+++RK$Q9&F*7$$\"3w******[ A\"='))F*$!3%******zaDy>'F*7$$\"3C*****H?Z]Y*F*$!3y*****p,NuL(F*7$$\"3 a******os'o(**F*$!3%******RM\"Q`&)F*7$$\"3/+++v[oQ5F\\o$!3M+++CULN)*F* 7$$\"33+++(Q8'o5F\\o$!3)******\\O2s6\"F\\o7$$\"3-+++(3Un3\"F\\o$!3/+++ @L;b7F\\o7$$\"3)*******3G\\#4\"F\\o$!3)*******oL9'R\"F\\o7$$\"3)****** *Q'Ra3\"F\\o$!3#******4KU)Q:F\\o7$$\"3/+++82Jl5F\\o$!3=+++I'G>o\"F\\o7 $$\"34+++c&*)>.\"F\\o$!3%******>mYS#=F\\o7$$\"39+++M].b)*F*$!3%)*****> 4TQ'>F\\o7$$\"3g+++JFFg#*F*$!31+++*3o**4#F\\o7$$\"3W+++4I!)Q&)F*$!39++ +`N6JAF\\o7$$\"3i******oO?&p(F*$!3)******fw,gN#F\\o7$$\"3R+++7`PNnF*$! 39+++m&4MZ#F\\o7$$\"3;+++\"eokm&F*$!3)******4B(=#e#F\\o7$$\"3-+++Wcy' \\%F*$!3-+++0@G\"o#F\\o7$$\"36+++)*oqNKF*$!35+++-5opFF\\o7$$\"3%****** pKSO*=F*$!37+++_JYYGF\\o7$$\"3)******frV&=[F]q$!3%)*****f$)y3\"HF\\o7$ $!3a*****zCHm()*F]q$!3#)*****z;!HiHF\\o7$$!3))*****f5(H-DF*$!3;+++lm7+ IF\\o7$$!3M+++#)y*)[SF*$!34+++w*fR-$F\\o7$$!3h*****RFjRh&F*$!30+++E,dL IF\\o7$$!3#)*****fNWQ=(F*$!3(******HHg)GIF\\o7$$!3N*****fL-[u)F*$!3,++ +v*z(4IF\\o7$$!3,+++xjIG5F\\o$!3)*******)4!RwHF\\o7$$!3++++Yc]y6F\\o$! 3=+++F\"3!HHF\\o7$$!33+++MmvB8F\\o$!3#)*****R9c!oGF\\o7$$!3++++BVyi9F \\o$!3;+++^0/%z#F\\o7$$!3-+++k!oVf\"F\\o$!38+++;ge2FF\\o7$$!3)*******) Rhtr\"F\\o$!39+++N>\\4EF\\o7$$!36+++tvqI=F\\o$!3#)******G!y1]#F\\o7$$! 3(*******GEWL>F\\o$!31+++](4@Q#F\\o7$$!3=+++ZkpC?F\\o$!3!******>?b[D#F \\o7$$!3++++aFs.@F\\o$!3<+++(Rt+7#F\\o7$$!37+++6()))p@F\\o$!3-+++s)*)* y>F\\o7$$!37+++hJpAAF\\o$!3%*******Q)zG$=F\\o7$$!3)*******[BwhAF\\o$!3 ;+++'\\iIo\"F\\o7$$!3%)*****\\LdoG#F\\o$!3$******HR\"*3`\"F\\o7$$!35++ +&o\"*yH#F\\o$!3'******>/IxP\"F\\o7$$!39+++K\")*[H#F\\o$!31+++9Q%\\A\" F\\o7$$!31+++5'\\!yAF\\o$!3)******>@$)Q2\"F\\o7$$!3-+++i3nZAF\\o$!3m++ +njpe#*F*7$$!3#******p%>A/AF\\o$!3k*****R+B=#yF*7$$!3;+++o`G[@F\\o$!3& ******f>S/W'F*7$$!3#******pGv03#F\\o$!3*)*****zO%3E^F*7$$!3++++m!=>+#F \\o$!3?+++2rY*)QF*7$$!3&******\\bXK\">F\\o$!3z*****RCX.u#F*7$$!30+++:J g:=F\\o$!3'*******z=T(o\"F*7$$!3)******>jG,r\"F\\o$!3Q+++fon\"Q(F]q7$$ !33+++W4/)f\"F\\o$\"3-+++qn&=,\"F]q7$$!3'******\\VI1[\"F\\o$\"3q*****p xk%e#)F]q7$$!3/+++(4`#f8F\\o$\"3!******>::DV\"F*7$$!3(*******4,KN7F\\o $\"31+++Vn\\>>F*7$$!30+++%o#G56F\\o$\"33+++`k!oG#F*7$$!3%)*****fcVi&)* F*$\"33+++4+IODF*7$$!3T*****z0x&G')F*$\"3%******48(zrEF*7$$!3T+++.'3_V (F*$\"3y******Q#o#*p#F*7$$!3'******>C2=H'F*$\"3;+++/e5FEF*7$$!3I+++p$[ W@&F*$\"37+++zu]mCF*7$$!3l*****R,-*>UF*$\"33+++.>,KAF*7$$!3-+++F*7$$!3-+++)\\QLb#F*$\"35+++4,3A;F*7$$!3*)******>p;D>F*$ \"3*)*****p(o%HI\"F*7$$!3++++?s]q9F*$\"3#******>U:j-\"F*7$$!3/+++0!eAA \"F*$\"3>+++5[89%)F]q7$$!34+++)pSa?\"F*$\"3a+++U3aOzF]q7$$!3++++7uP89F *$\"3Q++++kef!*F]q7$$!3&******4Dg:!=F*$\"3'******>nfo<\"F*7$$!31+++1IU 6BF*$\"33+++QAH&f\"F*7$$!3)******p'oj!*GF*$\"3)******\\gT*\\@F*7$$!3#) ******oRx(\\$F*$\"3/+++QF!3$GF*7$$!31+++TPZ+TF*$\"3@+++;k`GOF*7$$!3S++ +&)p'Hn%F*$\"3*******pRzP`%F*7$$!3S+++$4mU>&F*$\"3R+++P9vObF*7$$!3%*** ***\\Q0qk&F*$\"3Q+++f'fqi'F*7$$!3k*****4E2n,'F*$\"3/+++/)HOz(F*7$$!3K+ ++ICbX'F*$\"33+++DN!z H\"F\\o7$$!3#******z7T+F'F*$\"3/+++L7+M9F\\o7$$!3o*****zAi'efF*$\"3#** ****f\"p'*p:F\\o7$$!3S+++vGU?bF*$\"3$******\\3?Wq\"F\\o7$$!3%******HBa f&\\F*$\"3%******f$)))f$=F\\o7$$!31+++'R=uE%F*$\"3++++$HGL'>F\\o7$$!3y *****ffX%eMF*$\"37+++ZM8&3#F\\o7$$!3.+++u_1MDF*$\"3%******HWW,?#F\\o7$ $!3*******f#*[1]\"F*$\"3!******f5grI#F\\o7$$!3-+++M!\\\"eOF]q$\"3<+++V &e]S#F\\o7$$\"3>+++'yomh)F]q$\"33+++=e!G\\#F\\o7$$\"3')******\\s(><#F* $\"3!******>(oZpDF\\o7$$\"31+++y&oVb$F*$\"39+++6ABMEF\\o7$$\"3e*****\\ zes*\\F*$\"3'******\\.ejo#F\\o7$$\"3#******pf!Q)['F*$\"3.+++_&e_s#F\\o 7$$\"3g*****>6&*[,)F*$\"31+++1MZ]FF\\o7$$\"3G******H[bj&*F*$\"3%)***** \\I)ohFF\\o7$$\"3$******4/!376F\\o$\"31+++!Rf'eFF\\o7$$\"3#******>N)Gn 7F\\o$\"3.+++1oJTFF\\o7$$\"3)******4541U\"F\\o$\"3%******4$yv4FF\\o7$$ \"3%******\\n#oq:F\\o$\"37+++,6>kEF\\o7$$\"3)******HGphr\"F\\o$\"33+++ !4V\\g#F\\o7$$\"39+++5[xb=F\\o$\"38+++kW^KDF\\o7$$\"35+++nyD))>F\\o$\" 33+++i3\\ZCF\\o7$$\"3.+++f'QC6#F\\o$\"3%)******R%>1N#F\\o7$$\"3*)***** pf=sA#F\\o$\"39+++'[WFC#F\\o7$$\"38+++T2fJBF\\o$\"31+++a:\"[7#F\\o7$$ \"3))*****HH\\YU#F\\o$\"3++++vd'y*>F\\o7$$\"30+++mVf0DF\\o$\"3'******4 [FI'=F\\o7$$\"3))*****R@NPd#F\\o$\"30+++-P]@;eXd\"F\\o7$$\"3/+++^U]pEF\\o$\"3++++>()\\B9F\\o7$$\"3#**** ***GuS'p#F\\o$\"3%*******\\*p'p7F\\o7$$\"3$******H`f!4FF\\o$\"31+++J#R W6\"F\\o7$$\"3()*****f'eb2FF\\o$\"3C+++*Gdp#F\\ o$\"3O******>fP_!)F*7$$\"3#******R8?Cm#F\\o$\"3$)*****RD-(RlF*7$$\"31+ ++'yf$>EF\\o$\"3o******Gp'o1&F*7$$\"3++++!=(HjDF\\o$\"35+++b#3lk$F*7$$ \"39+++#>^[\\#F\\o$\"3?+++jYl!H#F*7$$\"3-+++\"R=[T#F\\o$\"3#*******G>d 55F*7$$\"37+++sH1CBF\\o$!38+++:aVL=F]q7$$\"3(******p()eNA#F\\o$!3'**** ***H:o\"G\"F*7$$\"3!******f\"3Q9@F\\o$!37+++4y7wAF*7$$\"3#******z]yw*> F\\o$!3=+++!pg&fJF*7$$\"3/+++!fF*7$$\"3%******zM&py5F\\o$!3m******z,VEfF*7 $$\"3G+++%[g<\\*F*$!3N+++LmTNeF*7$$\"3e*****\\]oN0*\\qF*$!3r*****R$=)oL&F*7$$\"37+++iCfGfF*$!3#*******[/^ \\\\F*7$$\"3I+++*G>(*)[F*$!3u*****\\Vpt[%F*7$$\"3/+++,]kWRF*$!3%)***** >$y)o'RF*7$$\"31+++.\\I/JF*$!3\"*******z#G!3MF*7$$\"3))*****pB`%zBF*$! 3?+++mjPNGF*7$$\"3!******f%G:\"y\"F*$!3-+++)*p%)zAF*7$$\"3&******>=B;K \"F*$!33+++;?0\"y\"F*7$$\"3\"******pd0_,\"F*$!3'******f0i#*Q\"F*7$$\"3 S+++d]dt()F]q$!31+++(G$*=;\"F*7$$\"3E+++0f#[:*F]q$!31+++m^QX6F*7$$\"3& ******>G^<6\"F*$!3#******fD]7N\"F*7$$\"3,+++:rj@9F*$!3/+++ko?f6L$F*$!3I+++g2UdqF*7 $$\"3-+++6,^?MF*$!3k+++B\\rV#)F*7$$\"3\")*****\\jYhS$F*$!3K*****fNF`Z* F*7$$\"3;+++#3v/G$F*$!3-+++Tjut5F\\o7$$\"3-+++ez7QIF*$!32+++l&Q:?\"F\\ o7$$\"3++++5euvEF*$!3,+++4_WH8F\\o7$$\"3;+++>9%=>#F*$!31+++W.-c9F\\o7$ $\"3-+++M\"yme\"F*$!33+++[^%)z:F\\o7$$\"3X*****f'4!=i)F]q$!31+++0<`*p \"F\\o7$$\"3)******>ZcH=#F\\[l$!31+++o7u8=F\\o7$$!3O+++a)*>%H*F]q$!3++ ++o()>@>F\\o7$$!31+++$zU_)>F*$!34+++7Dq??F\\o7$$!33+++\\r.QJF*$!35+++j r76@F\\o7$$!3!******4/H!zVF*$!3++++p#Q9>#F\\o7$$!3G+++f0Q)p&F*$!3++++r BqgAF\\o7$$!3S+++](4`3(F*$!32+++nq4=BF\\o7$$!3)******>'y@G&)F*$!3++++r =#HO#F\\o7$$!3+++++=[,5F\\o$!3'******>S#f%R#F\\o7$$!3/+++;kA`6F\\o$!3 \"******zqhET#F\\o7$$!3'*******=!HnI\"F\\o$!3<+++`u\"oT#F\\o7$$!3)**** **HJK1Y\"F\\o$!3-+++.O(oS#F\\o7$$!3()*****zrmNh\"F\\o$!3#******4&Qz#Q# F\\o7$$!39++++q;kF\\o$!3')**** *\\`uFH#F\\o7$$!33+++6R*H0#F\\o$!36+++3-YFAF\\o7$$!31+++L#=')=#F\\o$!3 ++++5&Q#\\@F\\o7$$!3*******HUGnJ#F\\o$!3')*****H-W(e?F\\o7$$!3&)****** \\=F\\o7$$!3=+++6*oea#F\\o$!3!*******)\\bS%=F \\o7$$!3*)******zw\"[k#F\\o$!3&******H6,(HF\\o$!3m+++q=@)[)F*7$$!3%)*****47rw (HF\\o$!3U+++L47ApF*7$$!3!******p\"H+pHF\\o$!3%******z7([g`F*7$$!3))** ***zBZg%HF\\o$!3%)*****pLlq\"QF*7$$!3;+++;O54HF\\o$!3\")*****\\Ck`I#F* 7$$!39+++O*\\'eGF\\o$!3!)*****pBz\\Q)F]q7$$!3/+++LFF\\o$\"3$*******fo,6>F*7$$!3')*****\\pp?j#F\\o$ \"3?+++PjZqJF*7$$!3<+++>r2MDF\\o$\"34+++**G,RVF*7$$!3&******p.'RECF\\o $\"36+++&)*psS&F*7$$!3$)*****>[U,J#F\\o$\"3M+++g)*)pO'F*7$$!3#******** fxk=#F\\o$\"3z*****\\-:6@(F*7$$!31+++!)pic?F\\o$\"3!*********>&Q$zF*7$ $!3#******p*y'=#>F\\o$\"3R+++bCuI&)F*7$$!3-+++A?_$y\"F\\o$\"3C+++YLs)* *)F*7$$!31+++%QOHk\"F\\o$\"3r+++K')=O$*F*7$$!31+++@)p9]\"F\\o$\"3p**** **>I-V&*F*7$$!31+++kJ[g8F\\o$\"3B*****pLL1i*F*7$$!3#******p&eJ@7F\\o$ \"3i+++v)p>d*F*7$$!3++++<'y_3\"F\\o$\"3U+++B+b,%*F*7$$!3d*****Rgaj`*F* $\"3t*****4J'[:\"*F*7$$!3[******>b#fF)F*$\"3G+++@')\\@()F*7$$!3#)***** *z\\#G3(F*$\"3B*****RV`*G#)F*7$$!3;+++NS]nfF*$\"3Q+++$)G\"*[wF*7$$!3C+ ++EhTR\\F*$\"3s*****f3TU*pF*7$$!3c*****p;%*o+%F*$\"39+++^WwziF*7$$!35+ ++C^.xJF*$\"3d******HjbAbF*7$$!3#)******GsebCF*$\"3n*****pQ/Cu%F*7$$!3 -+++vA)o%=F*$\"3=+++?rdiRF*7$$!3!******f\\%z`8F*$\"3++++:c36KF*7$$!3_* ****fSr&y(*F]q$\"3'******HVWE_#F*7$$!35+++8-i'>(F]q$\"3$*******ohET>F* 7$$!3;+++D!Quz&F]q$\"3'******>H)f@:F*7$$!3E+++`*>')e&F]q$\"3,+++$zV;K \"F*7$$!3S+++s5LBlF]q$\"31+++,&3zP\"F*7$$!3[+++/x)*y$)F]q$\"3-+++S!*=$ o\"F*7$$!3)******H:gj2\"F*$\"3*)*****4pu2?#F*7$$!3-+++$>>iK\"F*$\"3=++ +:Tr!*GF*7$$!3'******p`dFb\"F*$\"3')******zC\")>PF*7$$!3,+++B@7Hc#Hp&F*7$$!3%******fD^W&= F*$\"3')*****4QuZz'F*7$$!35+++tK;wF*$\"33+++4LE7;F\\o7$$\"3\"** ****\\+*3CHF*$\"3))*****HMVEr\"F\\o7$$\"3;+++N*fx+%F*$\"3-+++Q1'\\!=F \\o7$$\"3))*****f\")GR=&F*$\"39+++%H#4))=F\\o7$$\"3o*****pg2OW'F*$\"31 +++,t,h>F\\o7$$\"3q*****Rihnx(F*$\"32+++T:#G-#F\\o7$$\"3[*****p?NC<*F* $\"3++++`Sqs?F\\o7$$\"3%******R0))=1\"F\\o$\"3')*****pb')*4@F\\o7$$\"3 '******zRo.@\"F\\o$\"3$)*****pADT8#F\\o7$$\"3-+++)Q\"Rh8F\\o$\"3&)**** *4F.Z9#F\\o7$$\"3(******flDO^\"F\\o$\"31+++PnWT@F\\o7$$\"3-+++-*>dm\"F \\o$\"38+++(Q.k>F\\o$\"31+++yJ-[?F\\o7$$\"39+++vVb2@F\\o$\"3)******f& *o%*)>F\\o7$$\"31+++o=cXAF\\o$\"38+++$3$y<>F\\o7$$\"3=+++NmzwBF\\o$\"3 ')*****>K1N$=F\\o7$$\"3%)******Gt0+DF\\o$\"3.+++%3$e\"\\(\\F*7 $$\"3'******RUiW4$F\\o$\"3,+++X6X.MF*7$$\"37+++qHEyIF\\o$\"3%********) *4C%=F*7$$\"3))*****p5jy/$F\\o$\"3E+++>$pZ0$F]q7$$\"3=+++#zvN+$F\\o$!3 %******pSXR>\"F*7$$\"3')*****f%y%e%HF\\o$!3@+++[K&Gk#F*7$$\"39+++5MFvG F\\o$!3-+++hSxGSF*7$$\"37+++8Pf#z#F\\o$!3?+++9q$*R`F*7$$\"3++++'z:')p# F\\o$!3))*****Hmg`c'F*7$$\"3!******\\?dUf#F\\o$!3E+++!om\\p(F*7$$\"3)* *****fCJ0[#F\\o$!3.+++B*y'>()F*7$$\"3#******fYZ&eBF\\o$!3D******)*4_J' *F*7$$\"39+++c?\\HAF\\o$!3/+++c>PU5F\\o7$$\"3)******fe4Y4#F\\o$!3$**** ***3v246F\\o7$$\"3#******\\z$>b>F\\o$!3++++I?&G;\"F\\o7$$\"3&)*****f0q D\"=F\\o$!3++++ElT.7F\\o7$$\"3=+++Ov3o;F\\o$!3-+++E\"Q1B\"F\\o7$$\"3#* *****\\'\\5B:F\\o$!31+++\\l_W7F\\o7$$\"33+++M3(*y8F\\o$!3'*******f/CX7 F\\o7$$\"3-+++!R5qB\"F\\o$!33+++d\")3L7F\\o7$$\"31+++]%4&)4\"F\\o$!3(* ******HY_37F\\o7$$\"3;+++AU3Z'*F*$!33+++;Y:s6F\\o7$$\"3]******Hjyn$)F* $!3%******HLIZ7\"F\\o7$$\"3O+++`#)4erF*$!3/+++F#[r1\"F\\o7$$\"3c*****4 [#)z-'F*$!31+++c@X+5F\\o7$$\"3O+++rmI')\\F*$!3c******\\IKe#*F*7$$\"3'* *****pZ-2/%F*$!3=*****z$))GY%)F*7$$\"3;+++)z=u>$F*$!3k*****pZ>Me(F*7$$ \"3;+++aS;hCF*$!3K+++N$yko'F*7$$\"3*******zMM\\$=F*$!3!)*****>-%GudF*7 $$\"3/+++N<\")>8F*$!3S+++J0Ao[F*7$$\"3%)*****4zbu9*F]q$!3%)*****4q4J*R F*7$$\"3A+++_n'G;'F]q$!33+++()4kyJF*7$$\"31+++Qh\"R=%F]q$!39+++^YbhCF* 7$$\"3w******>58EJF]q$!35+++&\\u#))=F*7$$\"3++++uMA%*GF]q$!3,+++@5!\\^ \"F*7$$\"36+++NP`-MF]q$!3/+++?W([R\"F*7$$\"3C+++uy8TXF]q$!3/+++\"*HW\\ :F*7$$\"3O+++NB@!3'F]q$!33+++yC(Q&>F*7$$\"3k*******>&\\(o(F]q$!3++++to lhDF*7$$\"3e******RI@O!*F]q$!35+++b9rGLF*7$$\"3W+++'[M*f)*F]q$!3J+++u> \\>UF*7$$\"3U+++o*>`&**F]q$!3=+++?'4a?&F*7$$\"3i*****RMD1<*F]q$!3U+++a FYiiF*7$$\"3y******f)*z%R(F]q$!3e******>JcptF*7$$\"3w*****H=c&\\XF]q$! 3t+++z+_2&)F*7$$\"3A+++d#>+%eF\\[l$!3s*****p&>Ze'*F*7$$!3*)*****>1g!HX F]q$!3/+++nnb!3\"F\\o7$$!3-+++(Q!ez5F*$!3%******pU#G$>\"F\\o7$$!31+++h fL?=F*$!3&******Ha-DI\"F\\o7$$!3=+++8]9sEF*$!3%******4%\\x19F\\o7$$!3 \")*****H^#QIOF*$!3-+++Ndu/:F\\o7$$!35+++Fr&*)o%F*$!3#*******f\"[^f\"F \\o7$$!3?+++(pN/%eF*$!3=+++y6\"on\"F\\o7$$!3!******z*>;wqF*$!3)******4 ,k'[i!Qg(*F*$ !3;+++hMCf=F\\o7$$!3++++,6m=6F\\o$!35+++e,U'*=F\\o7$$!3++++&yp?>F\\o7$$!34+++Ndi99F\\o$!31+++-tiJ>F\\o7$$!3++++QnOl:F\\o $!3:+++mS*)G>F\\o7$$!37+++:'fhr\"F\\o$!38+++\"pFB\">F\\o7$$!33+++/Tkl= F\\o$!33+++`t!>)=F\\o7$$!3()******f\"fC,#F\\o$!3\"*******)[Ox$=F\\o7$$ !3)******zsh_:#F\\o$!3=+++*zk+y\"F\\o7$$!3%******4)3u#H#F\\o$!3******* *\\%*G4 " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "q:=-1; m:=1: E 0:=1; B0:=2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"qG!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#E0G\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B0G\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 67 "de1:=m *diff(x(t),t$2)=-q*E0*x(t)/(x(t)^2+y(t)^2)+diff(y(t),t)*q*B0;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%$de1G/-%%diffG6$-%\"xG6#%\"tG-%\"$G6 $F,\"\"#,&*&F)\"\"\",&*$)F)F0F3F3*$)-%\"yGF+F0F3F3!\"\"F3*&F0F3-F'6$F9 F,F3F;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 67 "de2:=m*diff(y(t), t$2)=-q*E0*y(t)/(x(t)^2+y(t)^2)-diff(x(t),t)*q*B0;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%$de2G/-%%diffG6$-%\"yG6#%\"tG-%\"$G6$F,\"\"#,&*&F) \"\"\",&*$)-%\"xGF+F0F3F3*$)F)F0F3F3!\"\"F3*&F0F3-F'6$F7F,F3F3" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "#dsolve(\{de1,de2,x(0)=1,D(x )(0)=0,y(0)=1,D(y)(0)=0\},\{x(t),y(t)\});" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 104 "Maple tries for a long time to obtain an analytic soluti on - to no avail. The pair of ODEs is nonlinear." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 98 "sol:=dsolve(\{de1,de2,x(0)=1,D(x)(0)=0,y(0)=1 ,D(y)(0)=0\},\{x(t),y(t)\},numeric,output=listprocedure):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "X:=subs(sol,x(t)): Y:=subs(sol,y(t) ):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "plot(['X(t)','Y(t)',t =0..40],scaling=constrained,thickness=2);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7cv7$$\"\"\"\"\"!F(7$ $\"+Z!e*45!\"*$\"+@uP85F.7$$\"+$oE4.\"F.$\"+=)3v0\"F.7$$\"+SP.[5F.$\"+ ZO`L6F.7$$\"+,xwY5F.$\"+&e9hB\"F.7$$\"+A=z@5F.$\"+&oP'Q8F.7$$\"+I9)3q* !#5$\"+bToV9F.7$$\"+#[N?\"*)FH$\"+$[$4T:F.7$$\"+Jvd%)yFH$\"+\\cR@;F.7$ $\"+Pq0FlFH$\"+4A7#o\"F.7$$\"+kPAz]FH$\"+C1/1U\"F. 7$$\"+(eJ]l$F[p$\"+&ys$R9F.7$$!+:+njGF[p$\"+n'e$f:F.7$$!+0R$>&)*F[p$\" +\\p4E;F.7$$!+a1E\\>FH$\"+**R'Qo\"F.7$$!+Bk-LJFH$\"+yG(=s\"F.7$$!+!H([ aWFH$\"+g`+KmX\"F.$\"+j=ql\"F.$\"+MQ:!3%FH7$$!+9+[4;F.$ \"+KV_IHFH7$$!+$*\\\\Y:F.$\"+Ungv?FH7$$!+AD1$[\"F.$\"+65%)Q:FH7$$!+-gh L9F.$\"+&*H,#G\"FH7$$!+Gf**49F.$\"+\"G9g@\"FH7$$!+'RJ$=9F.$\"+V%eE@\"F H7$$!+9\"4\"e9F.$\"+*>7:8\"FH7$$!+-4m>:F.$\"+#>%e6')F[p7$$!+lb0$f\"F.$ \"+,\\x1KF[p7$$!+kt#\\m\"F.$!+p)>dA&F[p7$$!+Nyq@Z;FH7$$!+r%) \\]`9F.$!+/vn'e)FH7 $$!+?f$fL\"F.$!+^.L7!*FH7$$!+S?IL7F.$!+.uz7\"*FH7$$!+l/kD6F.$!+]#[&*)) )FH7$$!+dy)G6\"F.$!+\"\\5%Q))FH7$$!+6XsN6F.$!+WX:^\"*FH7$$!+Agmj6F.$!+ 0&eZz*FH7$$!+ech!=\"F.$!+O@Hv5F.7$$!+z#eA<\"F.$!+B,I%>\"F.7$$!+YF&e8\" F.$!+\\>M38F.7$$!+iy^p5F.$!+O.0>9F.7$$!+EZE_(*FH$!+$)eU::F.7$$!+E\\K!f )FH$!+$H5#)e\"F.7$$!+$R]I<(FH$!+m)*zL;F.7$$!+#Rwiu&FH$!+&z/9k\"F.7$$!+ 7\"e4X%FH$!+zo3:;F.7$$!+d$='*R$FH$!+.jgk:F.7$$!+$\\PTo#FH$!+wzf1:F.7$$ !+(3MDD#FH$!+1XA_9F.7$$!+-M\"*f?FH$!+\"[$f89F.7$$!+;()>??FH$!+]Br*R\"F .7$$!+>[&*>?FH$!+X'GiT\"F.7$$!+&ROv#>FH$!+F[p$!+h'RBo\"F.7$$\"+)4IJ*)) F[p$!+cuhP(ok%\\FH$!+&\\ZUt\"F.7$$\"+%er!GiFH$!+9Q'[m\"F.7$$\"++JCYsFH$!+.16q:F.7 $$\"+N\"4$RzFH$!+G')ei9F.7$$\"+%4y5J)FH$!+JCl_8F.7$$\"+kPd*Q)FH$!+OoBf 7F.7$$\"+Bnt\"H)FH$!+1t\\$>\"F.7$$\"+WFEm\")FH$!+Bfqg6F.7$$\"+!\\J^J)F H$!+Dgmt6F.7$$\"+VWB`$*FH$!+rf'fA\"F.7$$\"+1)p/.\"F.$!+ErYU7F.7$$\"+kx (\\9\"F.$!+jAmN7F.7$$\"+,Ezn7F.$!+3U%z>\"F.7$$\"+D\\%fQ\"F.$!+g?uE6F.7 $$\"+Z;j*[\"F.$!+W\\6@5F.7$$\"+Ss]j:F.$!+>v+:*)FH7$$\"+as3,;F.$!+$))3_ ](FH7$$\"+gE*=g\"F.$!+uPOChFH7$$\"+TB]s:F.$!+3DNH\\FH7$$\"+v?TB:F.$!+w y\"G)RFH7$$\"+\\_tn9F.$!+9ISJLFH7$$\"+u^K>9F.$!+Z9dnHFH7$$\"+L*f3R\"F. $!+*=IN$GFH7$$\"+^(>\")Q\"F.$!+s;NAGFH7$$\"+v;#RT\"F.$!+=P7AGFH7$$\"+! R'*eY\"F.$!+aZ1=FFH7$$\"+(>'[X:F.$!+'yg?O#FH7$$\"+d%QPj\"F.$!+Y0nq;FH7 $$\"+a.a8M\"F.$\"+SW5HwFH7$$\"+^Tqk7F.$\"+v&*yNwFH7$$\"+9F.7$$\"+!=w 'GMFH$\"+!fV\")[\"F.7$$\"+sJE#)HFH$\"+ODAN\"F.7$$!+\\i1!)oFH$\"+GQM'G\"F.7$$!+^_B'z'FH$\"+APh \\7F.7$$!+*HG+x'FH$\"+4y$HC\"F.7$$!+x=]**oFH$\"+Bk=f7F.7$$!+5oEYsFH$\" +bt<*G\"F.7$$!+(f9O%yFH$\"+wz&HK\"F.7$$!+U]X&o)FH$\"+1[r\\8F.7$$!+>tS \"*)*FH$\"+6'H*e8F.7$$!+Tt\"R7\"F.$\"+w+mM8F.7$$!+$o'fd7F.$\"+)o[=F\"F .7$$!+fxXu8F.$\"+nW]s6F.7$$!+wR!RX\"F.$\"+UTjf5F.7$$!+JXP.:F.$\"+P&=&R $*FH7$$!+G]>@:F.$\"+kDsm!)FH7$$!+\\OE5:F.$\"+FQ!*))oFH7$$!+mC%\\Z\"F.$ \"+h9NTeFH7$$!+:RMF9F.$\"+pSix]FH7$$!+!f2;Q\"F.$\"+O+2:YFH7$$!+*[<6N\" F.$\"+gl2:WFH7$$!+<%y!o8F.$\"+xik>WFH7$$!+vT!)*[\"F.$\"+hoI#>%FH7$$!+. a!3e\"F.$\"+$ym:q$FH7$$!+*))*fr;F.$\"++ODwGFH7$$!+'osou\"F.$\"+<='=t\" FH7$$!+U5b$z\"F.$\"+ytI\\MF[p-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*F]en-%*T HICKNESSG6#\"\"#-%+AXESLABELSG6$Q!6\"Feen-%(SCALINGG6#%,CONSTRAINEDG-% %VIEWG6$%(DEFAULTGF^fn" 1 2 0 1 10 2 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 91 "It pay s off to use a sophisticated differential equation solver. Let us try \+ the other case:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart; " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "q:=-1; m:=1: E0:=10; B0 :=1/2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"qG!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#E0G\"#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B 0G#\"\"\"\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 67 "de1:=m*di ff(x(t),t$2)=-q*E0*x(t)/(x(t)^2+y(t)^2)+diff(y(t),t)*q*B0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$de1G/-%%diffG6$-%\"xG6#%\"tG-%\"$G6$F,\" \"#,&*&F)\"\"\",&*$)F)F0F3F3*$)-%\"yGF+F0F3F3!\"\"\"#5*&#F3F0F3-F'6$F9 F,F3F;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 67 "de2:=m*diff(y(t), t$2)=-q*E0*y(t)/(x(t)^2+y(t)^2)-diff(x(t),t)*q*B0;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%$de2G/-%%diffG6$-%\"yG6#%\"tG-%\"$G6$F,\"\"#,&*&F) \"\"\",&*$)-%\"xGF+F0F3F3*$)F)F0F3F3!\"\"\"#5*&#F3F0F3-F'6$F7F,F3F3" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 98 "sol:=dsolve(\{de1,de2,x(0) =1,D(x)(0)=0,y(0)=1,D(y)(0)=0\},\{x(t),y(t)\},numeric,output=listproce dure):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "X:=subs(sol,x(t)) : Y:=subs(sol,y(t)):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "plo t(['X(t)','Y(t)',t=0..200],scaling=constrained,thickness=2);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7[cl7$$\" \"\"\"\"!F(7$$\"+OK'>g\"!\"*$\"+O;)Rt\"F.7$$\"+.lO9FF.$\"+![#[wOF.7$$ \"+cX*fe$F.$\"+qUHUkF.7$$\"+(y21$QF.$\"+9*G[s*F.7$$\"+\\F#4D$F.$\"+%=! =B8!\")7$$\"+GB!=x\"F.$\"+.k=n;FE7$$!+\\C2Re!#5$\"+-y[w>FE7$$!+&GC*4PF .$\"+x?%eA#FE7$$!+'3G9#pF.$\"+*z6xP#FE7$$!+n:`V5FE$\"+h@FeCFE7$$!+Ro>3 9FE$\"+pEOhCFE7$$!+pC6oB#FE7$$!+q ?g-CFE$\"+t'y&3?FE7$$!+%p(>XEFE$\"+^cbDl#FE$!+sN3?>F.7$$!+Jjd&Q#FE$!+MF.7$$!+N1<,XFN$!+zfHi8F.7$$!+#z \"\\coFN$!+=&yQ\\#F.7$$!+[trdvFN$!+mrn(z%F.7$$!+UyV*G#FN$!+-2kRwF.7$$ \"+Cf(*o5F.$!+;w5i5FE7$$\"+]MbqJF.$!+KYuT8FE7$$\"+70C5gF.$!+V*pad\"FE7 $$\"+*>RtW*F.$!+fO*3u\"FE7$$\"+c!R%G8FE$!+6CS@=FE7$$\"+OxbG@FE$!+M*=Xp\"FE7$$\"+#3J=X#FE$!+mWG1:FE7$$\"+F8bNFFE$!+t, *eC\"FE7$$\"+zvdaHFE$!+T%[LE*F.7$$\"+^yQ'4$FE$!+qXfUcF.7$$\"+i@!H:$FE$ !+eF4*y\"F.7$$\"+)>')47$FE$\"++$*e!4#F.7$$\"+(*fk-IFE$\"+J.b)y&F.7$$\" +4D!\\!GFE$\"+;)3%3\"*F.7$$\"+ka()GDFE$\"+$zzj>\"FE7$$\"+@UP(>#FE$\"+E El29FE7$$\"+#[c3$=FE$\"+tfUM:FE7$$\"+BUk^9FE$\"+CJ?s:FE7$$\"+-$yB3\"FE $\"+dNhA:FE7$$\"+P51WuF.$\"+rmX$R\"FE7$$\"+(fA\"FE7$$\"+ gVW;BF.$\"+=-?o&*F.7$$\"+0&>dZ(FN$\"+$Hp(RoF.7$$!+=f(\\4'!#6$\"+=kJ9UF .7$$!+gveGDFN$\"+vb%y:#F.7$$!+0:r!3#FN$\"+<7w19F.7$$!+lRN*p%FN$\"+P;F@ CF.7$$!+(3zrP\"F.$\"+@&)=ZWF.7$$!+\"e_'[IF.$\"+TM4MnF.7$$!+/F8naF.$\"+ ]!*)G$))F.7$$!+riW9&)F.$\"+,MBV5FE7$$!+@Hi-7FE$\"++YKK6FE7$$!+fgoy:FE$ \"+<3\\O6FE7$$!+%Gza&>FE$\"+uV1\\5FE7$$!+`@:3BFE$\"+?))y1()F.7$$!+\"y; Ih#FE$\"+(\\u\"*3'F.7$$!+lvF\\GFE$\"+6;F.$!+E+zHF.$!+DFE$!+e'fHd#F.7$$\"+0**3$G#FE $\"+e3;R9FN7$$\"+v)GQ]#FE$\"+Qv\"*eNF.7$$\"+$[mjj#FE$\"+/z_ruF.7$$\"+C cDpEFE$\"+2)))Q;\"FE7$$\"+X]5)f#FE$\"+LbZz:FE7$$\"+Ug*eU#FE$\"+tL(p'>F E7$$\"+J+xi@FE$\"+si8,BFE7$$\"+![\\&Q=FE$\"+k[W_DFE7$$\"+*o#fk9FE$\"+4 TB>FFE7$$\"+&[.M1\"FE$\"+m-;#z#FE7$$\"+CP(3f'F.$\"+GH+oFFE7$$\"+EYqcFF .$\"+q^*)\\EFE7$$!+WL@ekFN$\"+g&3rW#FE7$$!+PTaFMF.$\"+tzTu@FE7$$!+c_tY aF.$\"+g94^=FE7$$!+DlJ\\lF.$\"+&*ySK:FE7$$!+3C`SpF.$\"+G9Z37FE7$$!+iyD dmF.$\"+;`)R(*)F.7$$!+p=%4z&F.$\"+ZP-khF.7$$!+Pnt3IF.$\"+*3E%R?F.7$$!+ o()yf7F.$\"+jf%ou'FN7$$!+JCB!R#F.$\"+kiq>6F.7$$!+yD\"f![F.$\"+h1$ye\"F .7$$!+f4^**yF.$\"+]QE![\"F.7$$!+dxXC6FE$\"+dq&fM&FN7$$!+_=\"zW\"FE$!+_ =QI8F.7$$!+^*p\"GFE$!+w=V\\vF.7$$!+ea.c?FE$!+x uza6FE7$$!+x<;u?FE$!+<'*[9:FE7$$!+piD8?FE$!+8,Ju=FE7$$!+C(pV(=FE$!+oI' e@#FE7$$!+5?+j;FE$!+\">g9_#FE7$$!+v'f()Q\"FE$!+T!y^x#FE7$$!+RYzk5FE$!+ IsyjHFE7$$!+*4W/2(F.$!+k,_xIFE7$$!+g?RLLF.$!+uHj5JFE7$$\"+[F[y'*FN$!+Z &Hh/$FE7$$\"+>$zX%\\F.$!+_C>wGFE7$$\"+]6\\N$)F.$!+FE4 \"FE$!+?iuyAFE7$$\"+8iqc7FE$!+>=l&*=FE7$$\"+0T^=8FE$!+9(GC\\\"FE7$$\"+ VUCz7FE$!+)*e!y4\"FE7$$\"+QKz[6FE$!+W2&)*Q(F.7$$\"+6Y**=(*F.$!+>c%**p% F.7$$\"+:MwivF.$!+o)*)Rf#F.7$$\"+L6af_F.$!+lGCR6F.7$$\"+$)G\\JJF.$!+Ed Q3LFN7$$\"+JEYp;F.$!+Op^*[&Fh]l7$$\"+p(\\(y:F.$!+bZtWMFh]l7$$\"+pD%G$H F.$\"+)*[Ck7FN7$$\"+aLX]]F.$\"++#p%)e(FN7$$\"+:\"\\-l(F.$\"+df6x@F.7$$ \"+#Q7?,\"FE$\"+^t6'Q%F.7$$\"+&3iS@\"FE$\"+qa<6tF.7$$\"+'*4,Z8FE$\"+!) H\")z5FE7$$\"+v3%RR\"FE$\"+m/ej9FE7$$\"+@fTX8FE$\"+]?nd=FE7$$\"+T'y'*> \"FE$\"+H[zNAFE7$$\"+R(=ai*F.$\"+4fFE$\"+<(*e&)=FE7$$!+(fOI+#FE$ \"+M,N#[\"FE7$$!+)fz^'>FE$\"+76#H3\"FE7$$!+b\\!\\$=FE$\"+Z(eQ7(F.7$$!+ 'QCai\"FE$\"+-poHRF.7$$!+$)e-c8FE$\"+dBj@9F.7$$!+qR0^5FE$!+yg--HFN7$$! +-3L*Q(F.$!+9,8y6F.7$$!+Bzr$f#F.$!+2r&G.\"F.7$$!+-&zFd\"F.$!+F!z9h(FN7 $$!+*>L#fGF.$!+Fx1o;F.7$$!+&GA&*[%F.$!+Q#3cK$F.7$$!+!4r#*)fF.$!+(fcvj& F.7$$!+ku(=2(F.$!+EU;v%)F.7$$!+_0uevF.$!+rs\"R>\"FE7$$!+&*QN/sF.$!+I/= f:FE7$$!+D\"eK&fF.$!+r')4=>FE7$$!+9TLGQF.$!+l=^XAFE7$$!+s82P#*FN$!+xI7 =DFE7$$\"+^7%[g#F.$!+nZ;;FFE7$$\"+7ne_lF.$!+@'3[#GFE7$$\"+zt3o5FE$!+Y% R_$GFE7$$\"+i()*))[\"FE$!+sysRFFE7$$\"+#F E$!+)\\IBD#FE7$$\"+7#RhV#FE$!+9nW#*=FE7$$\"+P]RxDFE$!+6E$e[\"FE7$$\"+E z87EFE$!+v7'*f5FE7$$\"+xX8SDFE$!+ed\\LkF.7$$\"+L*3!pBFE$!+y-pLEF.7$$\" +M&>3:#FE$\"+ftG*)=FN7$$\"+x%[C)=FE$\"+ihjDCF.7$$\"+7jS!e\"FE$\"+13Z!* RF.7$$\"+0v1j7FE$\"+t-sV[F.7$$\"+#QKo\\*F.$\"+O^\\)*\\F.7$$\"+q9@%f'F. $\"+fyEFXF.7$$\"+saI1TF.$\"+HI\"Hd$F.7$$\"+hf;3AF.$\"+?7owBF.7$$\"+\") )f?\\\"F.$\"+AWYmFE7$$!+P\"['QoF.$\"+n;9&=#FE7$$!+;%R42\"FE$\"+^+`%H#FE7$$!+x2Gz9FE$\" +I#zrI#FE7$$!+_x>$)=FE$\"+G&\\$>AFE7$$!+vo\"oD#FE$\"+QfSM?FE7$$!+.++wD FE$\"+,Gbi3?GFE$\"+,#\\,U\"FE7$$!+'=V7(HFE$\"+6-2P5FE7$$!+^S fEIFE$\"+-\"*f(H'F.7$$!+AtX$)HFE$\"+R5kEAF.7$$!+')HbXGFE$!+cE-*f\"F.7$ $!+\"HnFi#FE$!+QG9b\\F.7$$!+M&f/L#FE$!+sS>_wF.7$$!+VOQ))>FE$!+&[d!\\&* F.7$$!+*Q;$>;FE$!+Y@Mc5FE7$$!+G\\=f7FE$!+nW4p5FE7$$!+RJ[8x#F .7$$!+c0%GG$FN$!+1GdL#Qi$F.7$$\"+@!z2=#FN$!+OR6 ejF.7$$\"+&QF[g\"F.$!+%>%oM$*F.7$$\"+7]bnQF.$!+9mF87FE7$$\"+!*p@FpF.$! +-K(=W\"FE7$$\"+4vFE$\"+3&*\\!o\"FE7$$\"+oNWb:FE$\"+&f7*\\3\")f\"FE7$$\"+R$pWp%F.$\"+qAX(R\"FE7$$\" +zZq)>#F.$\"+%)**pQ6FE7$$\"+T2v9iFN$\"+#4\"Rf()F.7$$!+.MVjGFN$\"+\\k2/ hF.7$$!+1zC8fFN$\"+#)zW.PF.7$$!+AF.7$$!+V)z&>tFN$\"+s0 /)G#F.7$$!+-?FE$\"+W?F(G)F.7$$!+OGZdBFE$\"+LwsxhF.7$$!+\"\\R(REFE$\"+L0_jKF .7$$!+g/uXGFE$!+\")=>IHFN7$$!+x*Hj&HFE$!+*Qr//%F.7$$!+'=t$yHFE$!+sM?mz F.7$$!+^%)f4HFE$!+ABU&=\"FE7$$!+I8A`FFE$!+\\b\")[:FE7$$!+r&Rx^#FE$!+!) Rhm=FE7$$!+$R\"R;AFE$!+DGP@@FE7$$!+z$3j'=FE$!+q@]*H#FE7$$!+a=]([\"FE$! +G23#R#FE7$$!+4T#Q3\"FE$!+[\\w$R#FE7$$!+)>[t'pF.$!+i]]+BFE7$$!+@3j!\\$ F.$!+:`>@@FE7$$!+DsbOgFN$!+!pe0(=FE7$$\"+;l>Z:F.$!+@qCo:FE7$$\"+zOSyGF .$!+\\))fP7FE7$$\"+53h\"Q$F.$!+=7iU!*F.7$$\"+3+FPJF.$!+tGo\\fF.7$$\"+g hyiBF.$!+yKM?MF.7$$\"+S-%>T\"F.$!+7`vk;F.7$$\"+hyCk5F.$!+qi9!>\"F.7$$ \"++>\"=\\*FN$!+Yt&>0\"F.7$$\"+hi-V6F.$!+M&*eY7F.7$$\"+Sj_T;F.$!+njL#o \"F.7$$\"+k=r(Q$F.$!+Bs=CGF.7$$\"+qi\\$*eF.$!+]XKPH!*F.7$$\"+'R)>GDFE$\"+3nH;8FE7$$\"+9!>xW#FE$\"+`wYE< FE7$$\"+[5CoAFE$\"+pM&p5#FE7$$\"+v/26?FE$\"+B0gACFE7$$\"+*H_io\"FE$\"+ !))=*oEFE7$$\"+'RBFJ\"FE$\"+FQYJGFE7$$\"+#>+f7*F.$\"++!R5!HFE7$$\"+#3A `4&F.$\"+;*=W(GFE7$$\"+)e*)=F\"F.$\"+t\\caFFE7$$!+F^mC@F.$\"+#e@/b#FE7 $$!+zBd0\\F.$\"+\"oDjF#FE7$$!+JG$z'pF.$\"+^48V>FE7$$!+sR$p9)F.$\"+Yerz :FE7$$!+.zJB%)F.$\"+wK867FE7$$!+(z8O&yF.$\"+RVXB')F.7$$!+2]?wlF.$\"+l1 _jbF.7$$!+)QH7#[F.$\"+fkTCJF.7$$!+q'*GWHF.$\"+$\\6rW\"F.7$$!+v=*Ha\"F. $\"+HR+S%F.$!+0B,AIFE7$$\"+s$)fp\")F.$!+ z>b6GFE7$$\"+O17E6FE$!+SHn:DFE7$$\"+F.7$$ \"+m*49!eF.$!+g#)3%f'FN7$$\"+&R$z*\\$F.$!+Tbxue!#77$$\"+O:XL=F.$\"+ca- #\\\"FN7$$\"+KCA$f\"F.$\"+0*GGX\"FN7$$\"+j()e[9F.$\"+FcQ!Q\"FN7$$\"+OB m39F.$\"+.Ii\\8FN7$$\"+&)R!eZ\"F.$\"+KD7I9FN7$$\"+4p%G!>F.$\"+I0xk@FN7 $$\"+Z>ILEF.$\"+'=k)*)RFN7$$\"+=BZaZF.$\"+B\"HKF\"F.7$$\"+yuJ;rF.$\"+l sE(*GF.7$$\"+M:5%H*F.$\"+\"z@`E&F.7$$\"+$z/*)4\"FE$\"+d/6z#)F.7$$\"+B> T)>\"FE$\"+p\"4u<\"FE7$$\"+mX]87FE$\"+nn\"Rb\"FE7$$\"+^&*)p8\"FE$\"+#) oaL>FE7$$\"+\"oc.p*F.$\"+OUY\"H#FE7$$\"+Syp&G(F.$\"+$zp=f#FE7$$\"+1@z@ UF.$\"+GO(>$GFE7$$\"+.ShnlFN$\"+F\"fn*HFE7$$!+WW&f@$F.$\"+*QUc2$FE7$$! +U/x\"=(F.$\"+4PAjIFE7$$!+o&*)=5\"FE$\"+96kfHFE7$$!+$=m7X\"FE$\"+qYcqF FE7$$!+TgxYFE$\"+Nevd@FE7$$!+lgbJ@FE$\"+gffj 1N\"FE7$$!+Oto:@FE$\"+?Kbf%*F.7$$!+wSni>FE$\"+#* 3%\\v&F.7$$!+S#*=I " 0 "" {MPLTEXT 1 0 113 "sol:=dsolve(\{de1,de2, x(0)=1,D(x)(0)=0,y(0)=1,D(y)(0)=0\},\{x(t),y(t)\},numeric,method=dverk 78,output=listprocedure):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "X:=subs(sol,x(t)): Y:=subs(sol,y(t)):" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 63 "plot(['X(t)','Y(t)',t=0..200],scaling=constrained,t hickness=2);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6' -%'CURVESG6$7[cl7$$\"\"\"\"\"!F(7$$\"+Bx!>g\"!\"*$\"+?N.MB8!\")7$$\"+9&y7x\"F.$\"+D>>n;FE7$$!+H&y_%e!#5$\"+3 f[w>FE7$$!+l#FE$!+ER\"4#>F.7$$!+32c&Q#FE$!+M$)4l \\F.7$$!+d))Qf?FE$!+f#e'QsF.7$$!+l'pkp\"FE$!+<+\"=j)F.7$$!+)zJ?K\"FE$! +ZbF/\"*F.7$$!+#*47#f*F.$!+k\")R)o)F.7$$!+;LA\\jF.$!+P;h'\\(F.7$$!+-&o ')p$F.$!+o[?QdF.7$$!+5rJ$z\"F.$!+j=hJPF.7$$!+Y*\\<:(FN$!+$3sC)>F.7$$!+ o%)z+XFN$!+k*3BO\"F.7$$!+M!fe&oFN$!+=o*Q\\#F.7$$!+AnwdvFN$!+G1,'F.$!+@_Xv:FE7$$\"+.swZ%*F.$!+\"\\q3u\"FE7$$\"+,Q[G8FE$!+@) p8#=FE7$$\"+%4-'G@FE$!+g7_%p\"FE7$$\"+.!o=X# FE$!+EVA1:FE7$$\"+O=eNFFE$!+&4BeC\"FE7$$\"+F-gaHFE$!+jTii#*F.7$$\"+5;S '4$FE$!+Le$=k&F.7$$\"+dk!H:$FE$!+b/K)y\"F.7$$\"+\")4)47$FE$\"+TMN\"4#F .7$$\"+?\"FE7$$\"+$pRt>#FE$\"+!G1xS\"FE7$$\"+#))=3$=FE$\"+E1ZM:FE7$$ \"+Pdg^9FE$\"+\"[QAd\"FE7$$\"+u5M#3\"FE$\"+k)RE_\"FE7$$\"+J3sVuF.$\"+6 ZZ$R\"FE7$$\"+*eI9c%F.$\"+I\"FE7$$\"+1_X;BF.$\"+Sr>o&*F.7$$\"+4y1u uFN$\"+8oyRoF.7$$!+OH-0h!#6$\"+\\YJ9UF.7$$!+a23HDFN$\"+A)Ry:#F.7$$!+p* ))43#FN$\"+jzv19F.7$$!+ukw*p%FN$\"+(\\l7U#F.7$$!+.;Dx8F.$\"+j&orW%F.7$ $!+23w[IF.$\"+Ru/MnF.7$$!+cQ5naF.$\"+!e3H$))F.7$$!+AAh9&)F.$\"+A-AV5FE 7$$!+#*3k-7FE$\"+5fIK6FE7$$!+sSqy:FE$\"+GiYO6FE7$$!+.f\\b>FE$\"+#)Q.\\ 5FE7$$!+Zf;3BFE$\"+p'Gkq)F.7$$!+[k-8EFE$\"+Bnw)3'F.7$$!+;?G\\GFE$\"+4r fvFF.7$$!+n9`+IFE$!+Z]`U5F.7$$!+<_/cIFE$!+VJ$)e_F.7$$!+niR0IFE$!+L.Z( \\*F.7$$!+%*HD^GFE$!+#H\\%[8FE7$$!+)*)[Ng#FE$!+oiA'p\"FE7$$!+/-uyAFE$! +U'H4(>FE7$$!+%Gu&)*=FE$!+fwnb@FE7$$!+pTX)[\"FE$!+]*=,C#FE7$$!+(4hb2\" FE$!+/p>@AFE7$$!+-$*43tF.$!+;FE7$$!+0;T>;F.$ !+LAzHF.$!+3&z%F.7$$\"+]*)G&Q*F.$!+uH#e \\&F.7$$\"+wF&HH\"FE$!+tD[;aF.7$$\"+CBj_;FE$!+xFE$!+ (\\hGd#F.7$$\"+-.4$G#FE$\"+f%)GS9FN7$$\"+Hv#Q]#FE$\"+w7/fNF.7$$\"+]JOO EFE$\"+(4e;Z(F.7$$\"+u,DpEFE$\"+k>!R;\"FE7$$\"+(\\(4)f#FE$\"+)H)[z:FE7 $$\"+Xl)eU#FE$\"+O_)p'>FE7$$\"+(*eyi@FE$\"+i97,BFE7$$\"+oq`Q=FE$\"+,PX _DFE7$$\"+q%zXY\"FE$\"+S5C>FFE7$$\"+Q**Qj5FE$\"+g^;#z#FE7$$\"+:*R2f'F. $\"+'y0!oFFE7$$\"+MsdcFF.$\"+-h*)\\EFE7$$!+#o!QfkFN$\"+-y5ZCFE7$$!+Mnk FMF.$\"+\\eTu@FE7$$!+0lgYaF.$\"+-]4^=FE7$$!+'G'Q\\lF.$\"+/VSK:FE7$$!+m deSpF.$\"+/xY37FE7$$!+,cHdmF.$\"+d-&R(*)F.7$$!+,d'4z&F.$\"+$)Q*R;'F.7$ $!+.5u3IF.$\"+KETR?F.7$$!+dEyf7F.$\"+'eopu'FN7$$!+()3B!R#F.$\"+wFs>6F. 7$$!+E\"4f![F.$\"+Gf'ye\"F.7$$!+)>4&**yF.$\"+:=K![\"F.7$$!+*GeW7\"FE$ \"+4%ynM&FN7$$!+tP\"zW\"FE$!+?kFI8F.7$$!+dQ FE$!+96H\\vF.7$$!+W!\\g0#FE$!+*>uZ:\"FE7$$!+`O![9_#FE7$$!+p1y)Q \"FE$!+?y;vFFE7$$!+wGFE7$$ \"+f1HN$)F.$!+N&\\Qh#FE7$$\"+J&4E4\"FE$!+cRvyAFE7$$\"+%G\"pc7FE$!+&zgc *=FE7$$\"+y?]=8FE$!+3#QC\\\"FE7$$\"+u]Bz7FE$!+#>:y4\"FE7$$\"+/Vy[6FE$! +J5)**Q(F.7$$\"+g$\\*=(*F.$!+y\"=+q%F.7$$\"+GUtivF.$!+:x/%f#F.7$$\"+*y B&f_F.$!+`]GR6F.7$$\"+eN[JJF.$!+adm3LFN7$$\"+u#f%p;F.$!+nQ^\"\\&Fh]l7$ $\"+cHvy:F.$!+i7bZMFh]l7$$\"+NT&G$HF.$\"+n#[OE\"FN7$$\"+1@Z]]F.$\"+2:i (e(FN7$$\"+%)*3.l(F.$\"+cX&p<#F.7$$\"+8K-75FE$\"+JI!fQ%F.7$$\"+m#zS@\" FE$\"+;z\"4J(F.7$$\"+6d.Z8FE$\"+$Q%yz5FE7$$\"+uQ(RR\"FE$\"+s3bj9FE7$$ \"+=uXX8FE$\"+1Nkd=FE7$$\"+!HG(*>\"FE$\"+C%pdB#FE7$$\"+KU'ei*F.$\"+1)f @d#FE7$$\"+t6ULmF.$\"+z5RKGFE7$$\"+\"o#p(3$F.$\"+p%Gr,$FE7$$!+tP\">8)F N$\"+4;Z9JFE7$$!+,^TY[F.$\"+;w$z6$FE7$$!+>Mbz()F.$\"+))\\!p-$FE7$$!+KV gQ7FE$\"+lwlYGFE7$$!+UV-Y:FE$\"+8N.)e#FE7$$!+;d4$y\"FE$\"+&\\7nE#FE7$$ !+SW0U>FE$\"+O@j&)=FE7$$!+PH+.?FE$\"+MRR#[\"FE7$$!+gX:l>FE$\"+pT'H3\"F E7$$!+Tz)[$=FE$\"+2?ECrF.7$$!+;VTD;FE$\"+2e/IRF.7$$!+88-c8FE$\"+=R$>U \"F.7$$!+AK0^5FE$!+Q:m**GFN7$$!+SYM*Q(F.$!+R%**z<\"F.7$$!+>Zt$f#F.$!+B 3zK5F.7$$!+P@\"Gd\"F.$!+b]'4h(FN7$$!+=kIfGF.$!+3!pzm\"F.7$$!+T4m*[%F.$ !+v%\\aK$F.7$$!+B%)\\*)fF.$!+WDMPcF.7$$!+()*)3sqF.$!+.7+v%)F.7$$!+)\\1 #fvF.$!+G,*Q>\"FE7$$!+Mw&\\?(F.$!+xY:f:FE7$$!+Kr*R&fF.$!+ow2=>FE7$$!+* \\'>HQF.$!+#*))\\XAFE7$$!+bAsY#*FN$!+c57=DFE7$$\"+w9!Qg#F.$!+Yg<;FFE7$ $\"+we]^lF.$!+xZ$[#GFE7$$\"+3'=!o5FE$!+feENGFE7$$\"+PQz)[\"FE$!+ZayRFF E7$$\"+X][t=FE$!+c=DTDFE7$$\"+.LN'>#FE$!+&y9CD#FE7$$\"+Qh1OCFE$!+\"3SD *=FE7$$\"+ksLxDFE$!+`8$f[\"FE7$$\"+.i47EFE$!+$Rh+1\"FE7$$\"+v&3,a#FE$! +N0ZMkF.7$$\"+w<+pBFE$!+LsEMEF.7$$\"+\"f=3:#FE$\"+dH*4)=FN7$$\"+ZgX#)= FE$\"+;t!\\U#F.7$$\"+)))>/e\"FE$\"+l`&)*)RF.7$$\"+LW3j7FE$\"+RUAV[F.7$ $\"+#>4q\\*F.$\"+es6)*\\F.7$$\"+1EP%f'F.$\"+c)**p_%F.7$$\"+rLV1TF.$\"+ 6*RFd$F.7$$\"+)*4A3AF.$\"+i+iwBF.7$$\"+vm7#\\\"F.$\"+mSRm]#F.$\"+c7IB\\F.7$$\"+A1\\FE7$$!+$*>UPoF.$\"+#Q#=&=#F E7$$!+M2\"32\"FE$\"+.Bf%H#FE7$$!+)R^\"z9FE$\"+)>ksI#FE7$$!+]K2$)=FE$\" +fpX>AFE7$$!+XEqcAFE$\"+cT`M?FE7$$!+s3!fd#FE$\"+&y)piT-U\"FE7$$!+jV=rHFE$\"+U#Qs.\"FE7$$!+wybEIFE$\"+32J*H'F.7$$!+&zVM )HFE$\"+\\#H$GAF.7$$!+l2cXGFE$!+00T(f\"F.7$$!+\"y$zAEFE$!+LRl`\\F.7$$! +)4,0L#FE$!+pr'3l(F.7$$!+aeV))>FE$!+p.#za*F.7$$!++*\\$>;FE$!+Y&)Gc5FE7 $$!+hPCf7FE$!+-8-p5FE7$$!+;isz\"*F.$!+%[3E+\"FE7$$!+IV:_hF.$!+J<1$o)F. 7$$!+VfrsOF.$!+%fk#RoF.7$$!+l.N\"[(FN$!+tvGrFF.7$$!+uaa$G$FN$!+_ccLW\"FE7$$\"+Gx0h5FE$!+jn <$f\"FE7$$\"+\"3c!o9FE$!+qTd[;FE7$$\"+BBT&)=FE$!+4U2)f\"FE7$$\"+1!pXC# FE$!+O)f7Y\"FE7$$\"+**\\pmDFE$!+aT6V7FE7$$\"+W7_KGFE$!+B-'>a*F.7$$\"+* *R-EIFE$!+Rji'4'F.7$$\"+lgYNJFE$!+3?#GG#F.7$$\"+.G;aJFE$\"+o!fyo\"F.7$ $\"+Jt\"43$FE$\"+&f#e$f&F.7$$\"+eO4?HFE$\"+36u;#*F.7$$\"+b!3Fm#FE$\"+8 oza7FE7$$\"+uX6MBFE$\"+**=j7:FE7$$\"+Jqhc>FE$\"+O\"[.o\"FE7$$\"++gdb:F E$\"+<9z\\=*>#F.$\"+v*)oQ6FE7$$\"+-%*[@iFN$\"+U 5Jf()F.7$$!+,JoeGFN$\"++)oS5'F.7$$!+E!)H5fFN$\"+b'pMq$F.7$$!+P*G4([FN$ \"+&fL%Q>F.7$$!+:pXUm\"*F.7$$!+*eg3F\"FE$\"+uVlq(*F. 7$$!+^GJ[;FE$\"+*o.^\\*F.7$$!+n!H!>?FE$\"+KUF*G)F.7$$!+-_TdBFE$\"+p$e+ ='F.7$$!+,-rREFE$\"+w_7mKF.7$$!+SLuXGFE$!+JhA:HFN7$$!+k;PcHFE$!+B#fv.% F.7$$!+9IXyHFE$!+z(pK'zF.7$$!+egr4HFE$!+7c8&=\"FE7$$!+gUP`FFE$!++Sa[:F E7$$!+,M#z^#FE$!+o_Om=FE7$$!+@+g;AFE$!+aL:@@FE7$$!+zV`m=FE$!+wmJ*H#FE7 $$!+\"HFw[\"FE$!+D9+#R#FE7$$!+l%fS3\"FE$!+jal$R#FE7$$!+*Q7'ppF.$!+EKV+ BFE7$$!+A@s#\\$F.$!+Rt:@@FE7$$!+gx/bgFN$!++*[0(=FE7$$\"+N+kX:F.$!+B$e# o:FE7$$\"+jw;xGF.$!+bLiP7FE7$$\"+J%)p!Q$F.$!+N)=H/*F.7$$\"+!4Wp8$F.$!+ <8$)\\fF.7$$\"+-LUiBF.$!+YSb?MF.7$$\"+7Qv69F.$!+$f&)[m\"F.7$$\"+yB6k5F .$!+hED!>\"F.7$$\"+#QQ1\\*FN$!+=m1_5F.7$$\"+A4*G9\"F.$!+ybtY7F.7$$\"+? TMT;F.$!+;fQ#FE $\"+zD%G7&F.7$$\"+#Q&Q1DFE$\"+qSJE!*F.7$$\"++AOGDFE$\"++$))fJ\"FE7$$\" +fB$zW#FE$\"+v*ohs\"FE7$$\"+\"Rx$oAFE$\"+\\z!o5#FE7$$\"+9zO6?FE$\"+]XN ACFE7$$\"+B&zlo\"FE$\"+9@roEFE7$$\"+/.288FE$\"+\\@IJGFE7$$\"+]SXH\"*F. $\"+Vc#4!HFE7$$\"++Z%))4&F.$\"+WUNuGFE7$$\"+)[o_F\"F.$\"+>laaFFE7$$!+' pJ:7#F.$\"+EUW]DFE7$$!+1\"*4/\\F.$\"+p_NwAFE7$$!+p4`lpF.$\"+\"Q7K%>FE7 $$!+T0(\\9)F.$\"+X<\")z:FE7$$!+6(*z@%)F.$\"+.GB67FE7$$!+`y^_yF.$\"+GVQ C')F.7$$!+U4[vlF.$\"+F2IkbF.7$$!+\"Q/3#[F.$\"+2**)\\7$F.7$$!+,f2WHF.$ \"+fbYZ9F.7$$!+c:%Ha\"F.$\"+Gv.=hFN7$$!+w7A%4$F.$\"+y-XT\"*FN7$$!+M>C! [)F.$\"+6qT%y$FN7$$!+RWyY6FE$!+`v(\\n*FN7$$!+Es+C9FE$!+YOk&4$F.7$$!+Qz Na;FE$!+Yi%e$fF.7$$!+6\")*p\"=FE$!+Tx\")\\$*F.7$$!+t5U$*=FE$!+A***GG\" FE7$$!+E42#*=FE$!+7mtX;FE7$$!+DI>5=FE$!+P1j/?FE7$$!+@q!)\\;FE$!+I@eSBF E7$$!+#fivT\"FE$!+xqeNEFE7$$!+WKKC6FE$!+CbstGFE7$$!+_X7XyF.$!+Xc6UIFE7 $$!+Cf._TF.$!+`\")oJJFE7$$\"+wz.&)>FN$!+,O]JJFE7$$\"+*y)[(R%F.$!+Wf2AI FE7$$\"+l%>a;)F.$!+?2n6GFE7$$\"+))euD6FE$!+^p$e^#FE7$$\"+S^?[8FE$!+n8= c@FE7$$\"+MFir9FE$!+#[m'e4h1\"FE$!+Dn%H$RF.7$ $\"+c2[\"H)F.$!+(o8-'>F.7$$\"+CwD,eF.$!+Air-mFN7$$\"+!G[(*\\$F.$!+WKF.$\"+$)3ah@FN7$$\"+m0OLEF.$\"+z(Hv)RFN7$$\"+P9vaZF.$\"+;TTs7F. 7$$\"+)=()o6(F.$\"+Gf/'*GF.7$$\"+$=(3&H*F.$\"+#4EPE&F.7$$\"+?f0*4\"FE$ \"+3QAx#)F.7$$\"+UQi)>\"FE$\"+=N?x6FE7$$\"+i=y87FE$\"+=(3Pb\"FE7$$\"+4 FLP6FE$\"+wANL>FE7$$\"+,5Y#p*F.$\"+'ey8H#FE7$$\"+J3F!H(F.$\"+Liu\"f#FE 7$$\"+58yEUF.$\"+lK!>$GFE7$$\"+dEO?mFN$\"+G1v'*HFE7$$!+ZFa5KF.$\"+&3,d 2$FE7$$!+5,QwrF.$\"+17NjIFE7$$!+n%o85\"FE$\"+#>N)fHFE7$$!+Kyx]9FE$\"+! R>3x#FE7$$!+ZiaYFE$\"+wN5e@FE7$$!+WACJ@FE$\"+ !**oRw\"FE7$$!+%*\\Hu@FE$\"+6,+^8FE7$$!+6a^:@FE$\"+W)fKY*F.7$$!+Slci>F E$\"+$R%QedF.7$$!+Vj8I@EF.7$$!+As**Q9FE$\"+$GO.D#FN7$$!+^:u 96FE$!+S[@F8F.-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fgcr-%+AXESLABELSG6$Q!6 \"F[dr-%(SCALINGG6#%,CONSTRAINEDG-%*THICKNESSG6#\"\"#-%%VIEWG6$%(DEFAU LTGFhdr" 1 2 0 1 10 2 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curv e 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 13 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }