{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }{CSTYLE "2D Output" -1 20 "Times" 0 1 0 0 255 1 0 0 2 2 2 2 0 0 0 1 }{CSTYLE "_cstyle6" -1 211 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "_cstyle7" -1 212 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "_cstyle8" -1 213 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "_cstyle9" -1 214 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }{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 2 0 2 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 2 0 2 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 2 0 2 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 2 0 2 0 2 2 0 1 }{PSTYLE "_pstyle11" -1 210 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 2 0 2 0 2 2 0 1 }{PSTYLE "_pstyle 12" -1 211 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 2 0 2 0 2 2 0 1 }{PSTYLE "_pstyle13" -1 212 1 {CSTYLE " " -1 -1 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 1 1 1 1 }1 1 0 0 0 0 2 0 2 0 2 2 0 1 }{PSTYLE "_pstyle14" -1 213 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 2 0 2 0 2 2 0 1 }{PSTYLE " _pstyle16" -1 215 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 2 0 2 0 2 2 0 1 }{PSTYLE "_pstyle17" -1 216 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 2 0 2 0 2 2 0 1 }{PSTYLE "_pstyle18" -1 217 1 {CSTYLE "" -1 -1 "Time s" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 2 0 2 0 2 2 0 1 } {PSTYLE "_pstyle19" -1 218 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 }} {SECT 0 {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 8 "restart;" }}} {EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 12 "with(plots):" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warnin g, the name changecoords has been redefined\n" }}}{EXCHG {PARA 210 "> \+ " 0 "" {MPLTEXT 1 211 13 "with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected names norm and trace have been redefined an d unprotected\n" }}}{EXCHG {PARA 211 "> " 0 "" {MPLTEXT 1 212 55 "eq1 \+ := px; eq2 := py; eq3 := -x-2*x*y; eq4 := -y-2*x*y;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%$eq1G%#pxG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq 2G%#pyG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq3G,&%\"xG!\"\"*(\"\"# \"\"\"F&F*%\"yGF*F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq4G,&%\"yG! \"\"*(\"\"#\"\"\"%\"xGF*F&F*F'" }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 28 "eq[1] := diff(x( t),t)=px(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"\"/-%%dif fG6$-%\"xG6#%\"tGF/-%#pxGF." }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 28 "eq[2] := diff(y(t),t)=py(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#>&%#eqG6#\"\"#/-%%diffG6$-%\"yG6#%\"tGF/-%#pyGF." }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 41 "eq[3] := diff(px(t),t)=-x(t)-2*x(t)*y (t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"$/-%%diffG6$-%#px G6#%\"tGF/,&-%\"xGF.!\"\"*(\"\"#\"\"\"F1F6-%\"yGF.F6F3" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 43 "eq[4] := diff(py(t),t)=-y(t)-x( t)^2+y(t)^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#eqG6#\"\"%/-%%diff G6$-%#pyG6#%\"tGF/,(-%\"yGF.!\"\"*$)-%\"xGF.\"\"#\"\"\"F3*$)F1F8F9F9" }}}{EXCHG {PARA 211 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 211 "> " 0 " " {MPLTEXT 1 212 37 "solve(\{eq1,eq2,eq3,eq4\},\{x,y,px,py\});" }} {PARA 11 "" 1 "" {XPPMATH 20 "6$<&/%#pxG\"\"!/%#pyGF&/%\"xGF&/%\"yGF&< &F$F'/F,#!\"\"\"\"#/F*F/" }}}{EXCHG {PARA 211 "" 0 "" {TEXT -1 0 "" }} }{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 52 "init := x(0) = x0,y(0) \+ = y0,px(0) = px0,py(0) = py0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%in itG6&/-%\"xG6#\"\"!%#x0G/-%\"yGF)%#y0G/-%#pxGF)%$px0G/-%#pyGF)%$py0G" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 42 "x0 := 0; y0 := 0; px0 := 0.1; py0 := -0.1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#x0G\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y0G\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$px0G$\"\"\"!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%$py0G$!\"\"F&" }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 90 "#dsolve(\{eq[1],eq[2],eq[3],eq[ 4],init\},\{x(t),y(t),px(t),py(t)\},method=numeric,type=rkf54);" }}} {EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 12 "ic[1] := x0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&% #icG6#\"\"\"\"\"!" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 12 "ic [2] := y0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#icG6#\"\"#\"\"!" }}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 13 "ic[3] := px0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#icG6#\"\"$$\"\"\"!\"\"" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 13 "ic[4] := py0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#icG6#\"\"%$!\"\"F)" }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 7 "m := 4; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"mG\"\"%" }}}{EXCHG {PARA 210 " " 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 24 " H[1] := (a,b,c,d) -> c;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"HG6# \"\"\"f*6&%\"aG%\"bG%\"cG%\"dG6\"6$%)operatorG%&arrowGF.9&F.F.F." }}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 24 "H[2] := (a,b,c,d) -> d; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"HG6#\"\"#f*6&%\"aG%\"bG%\"cG% \"dG6\"6$%)operatorG%&arrowGF.9'F.F.F." }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 31 "H[3] := (a,b,c,d) -> -a-2*a*b;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>&%\"HG6#\"\"$f*6&%\"aG%\"bG%\"cG%\"dG6\"6$%)operator G%&arrowGF.,&9$!\"\"*(\"\"#\"\"\"9%F7F3F7F4F.F.F." }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 33 "H[4] := (a,b,c,d) -> -b-a^2+b^2;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"HG6#\"\"%f*6&%\"aG%\"bG%\"cG%\"dG 6\"6$%)operatorG%&arrowGF.,(9%!\"\"*$)9$\"\"#\"\"\"F4*$)F3F8F9F9F.F.F. " }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 25 "for j from 1 by 1 to m do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 18 " W[j,1] := ic[j];" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 3 "od;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"WG6$\"\" \"F'\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"WG6$\"\"#\"\"\"\"\"! " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"WG6$\"\"$\"\"\"$F(!\"\"" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"WG6$\"\"%\"\"\"$!\"\"F*" }}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 11 "h := 1/2^3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"hG#\"\"\"\"\")" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 18 "time_steps := 500;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%+time_stepsG\"$+&" }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" } }}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 11 "count := 0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&countG\"\"!" }}}{EXCHG {PARA 210 "> " 0 " " {MPLTEXT 1 211 17 "interval := 1000;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%)intervalG\"%+5" }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 34 "for n from 1 by 1 to tim e_steps do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 20 " count := count \+ +1;" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 26 " if (count=interval) th en" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 20 " print(step = n);" }} {PARA 210 "> " 0 "" {MPLTEXT 1 211 15 " count := 0;" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " fi;" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 27 " for j from 1 by 1 to m do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 60 " k[1,j] := h*evalf(H[j](W[1,n],W[2,n],W[3,n],W[4,n]),16):" }} {PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " od:" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 27 " for j from 1 by 1 to m do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 96 " k[2,j] := h*evalf(H[j](W[1,n]+k[1,1]/2,W[2,n]+k [1,2]/2,W[3,n]+k[1,3]/2,W[4,n]+k[1,4]/2),16):" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " od:" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 27 " fo r j from 1 by 1 to m do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 96 " \+ k[3,j] := h*evalf(H[j](W[1,n]+k[2,1]/2,W[2,n]+k[2,2]/2,W[3,n]+k[2,3]/2 ,W[4,n]+k[2,4]/2),16):" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " od: " }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 27 " for j from 1 by 1 to m do " }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 88 " k[4,j] := h*evalf(H[j]( W[1,n]+k[3,1],W[2,n]+k[3,2],W[3,n]+k[3,3],W[4,n]+k[3,4]),16):" }} {PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " od:" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 27 " for j from 1 by 1 to m do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 66 " W[j,n+1] := W[j,n]+(1./6.)*(k[1,j]+2.*k[2,j]+2* k[3,j]+k[4,j]):" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 21 " #print(W [j,n+1]);" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " od:" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 19 " #print(W[1,n+1]);" }}{PARA 210 "> " 0 " " {MPLTEXT 1 211 3 "od:" }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 49 "listplot([seq([W[1,j],W[ 2,j]],j=1..time_steps)]);" }}{PARA 13 "" 1 "" {GLPLOT2D 412 412 412 {PLOTDATA 2 "6#-%'CURVESG6#7`jl7$$\"\"!F)F(7$$\"+#[&yY7!#6$!+#zWnC\"F- 7$$\"+e#zYZ#F-$!+/Y.uCF-7$$\"+A*Qfm$F-$!+F(=Fm$F-7$$\"+*pVU![F-$!+_=D% z%F-7$$\"+sP\"[(eF-$!+<*))4&eF-7$$\"+LaYkoF-$!+\"opk\"oF-7$$\"+)[7;w(F -$!+\"Q)ovwF-7$$\"+miAc&)F-$!+JJM:%)F-7$$\"+yvwR#*F-$!+J#fS-*F-7$$\"+. T50)*F-$!+m.e#\\*F-7$$\"+%fUY-\"!#5$!+m>#R\")*F-7$$\"+zq\"f0\"Fjn$!+v< [$)**F-7$$\"+7o*R2\"Fjn$!+?R5****F-7$$\"+^4my5Fjn$!+XW4h)*F-7$$\"+^\\! )p5Fjn$!+y\")=s&*F-7$$\"+YQWZ5Fjn$!+B*ou8*F-7$$\"+.'=<,\"Fjn$!+EoCk&)F -7$$\"+*4^!H'*F-$!+>&)*='yF-7$$\"+s5D9!*F-$!+^onTqF-7$$\"+N7ey#)F-$!+5 x\\;hF-7$$\"+eH`HuF-$!+(\\625&F-7$$\"+azRwkF-$!+wi')4SF-7$$\"+9^MIaF-$ !+:&o/'GF-7$$\"+jjX/VF-$!+ueup;F-7$$\"+&z3P6$F-$!+uv9aX!#77$$\"+c>*[(= F-$\"+0NYXwFcs7$$\"+;n^kgFcs$\"+r#=@(>F-7$$!+&4[ur'Fcs$\"+'*)e%\\JF-7$ $!+qNsQ>F-$\"+D&>\"zUF-7$$!+M_zsJF-$\"+s>EW`F-7$$!+-V,_VF-$\"+Lz()GjF- 7$$!+PLpaaF-$\"+m3,=sF-7$$!+yT&*fkF-$\"+%**yz*zF-7$$!+-XH[tF-$\"+!='fc ')F-7$$!+-`9-\")F-$\"+@cQ$=*F-7$$!+7NR1()F-$\"+/)z(p&*F-7$$!++V%)[\"*F -$\"+q\"*H4)*F-7$$!+0'*f?%*F-$\"+O;q(*)*F-7$$!+>KL;&*F-$\"+jb4L)*F-7$$ !+rzWM%*F-$\"+J*4gh*F-7$$!+\"*o5x\"*F-$\"+WsT\\#*F-7$$!++t8]()F-$\"+po qQ()F-7$$!+7Q\"G;)F-$\"+l)3;4)F-7$$!+6H`FuF-$\"+Y02=tF-7$$!+$Q(RflF-$ \"+b**3IkF-7$$!+8JtvbF-$\"+0=^TaF-7$$!+&Hjb\\%F-$\"+@AznVF-7$$!+be1RLF -$\"+\\)QdA$F-7$$!+?*Qq7#F-$\"+)fKK.#F-7$$!+^h'R!))Fcs$\"+,hO*3)Fcs7$$ \"++E'G!QFcs$!+>t-!G%Fcs7$$\"+'pm^j\"F-$!+l(e#e;F-7$$\"+\\TXlGF-$!+y!G E'GF-7$$\"+_bl`SF-$!+Z:LASF-7$$\"+xbu$=&F-$!+(z4$>^F-7$$\"+jsETiF-$!+q '4l8'F-7$$\"+l:P8sF-$!+dx:eqF-7$$\"+Tp!))3)F-$!+'R;+(yF-7$$\"+)ory&))F -$!+qphf&)F-7$$\"+mCM7&*F-$!+'*\\Y;\"*F-7$$\"+E#RX+\"Fjn$!+v9@K&*F-7$$ \"+65:X5Fjn$!+Bay+)*F-7$$\"+TLks5Fjn$!+(R$[=**F-7$$\"+R,r'3\"Fjn$!+'=8 S))*F-7$$\"+/O;(3\"Fjn$!+*[!\\)p*F-7$$\"+(QNR2\"Fjn$!+;$*Ql$*F-7$$\"+/ 43Z5Fjn$!+x([/*))F-7$$\"+qly15Fjn$!+b1a\"G)F-7$$\"+7TzL&*F-$!+UO][vF-7 $$\"+%4$Qt))F-$!+j5&Hq'F-7$$\"+v'eI4)F-$!+R$f!edF-7$$\"+xs*4?(F-$!+IUM GZF-7$$\"+;/A2iF-$!+^6VHOF-7$$\"+MulB^F-$!+BY#yZ#F-7$$\"+DH;kRF-$!+`.o !H\"F-7$$\"+5mZWFF-$!*Ex\"e&)Fcs7$$\"+<`6#[\"F-$\"+\"yy'>6F-7$$\"+S[*= '>Fcs$\"+i`J2BF-7$$!+9)fG4\"F-$\"+;AwfMF-7$$!+kIgjBF-$\"+!R)))fXF-7$$! +%yQSf$F-$\"+a^@\"f&F-7$$!+DV2iZF-$\"+Qs8QlF-7$$!+pi0YeF-$\"+)\\ZhQ(F- 7$$!+`7LDoF-$\"+[F1A\")F-7$$!+IX\"3o(F-$\"+umCM()F-7$$!+C7a&R)F-$\"+/R #G@*F-7$$!+xV%F-$\"+z.3RRF-7$$!+o')H2IF-$\"+1P8*y#F-7$$!+[00r O0mF-$!+-zo.kF-7$$\"+dvQevF-$!+E*R. G(F-7$$\"+$QQ1T)F-$!+3U.W!)F-7$$\"+Azt_\"*F-$!+`::$o)F-7$$\"+:vxw(*F-$ !+qX3)=*F-7$$\"+U*F-$!+Z*))yA(F-7$$\"+yqu:()F-$!+)yt$fjF-7$$\" +)RO3*yF-$!+l#[rR&F-7$$\"+4!)4cpF-$!+mc&eN%F-7$$\"+97IAfF-$!+Jg;^KF-7$ $\"+ct9-[F-$!+;Yb*4#F-7$$\"++uE5OF-$!+b:$3=*Fcs7$$\"+)ReJO#F-$\"+F7:eF Fcs7$$\"+[$\\!z5F-$\"+rsak9F-7$$!++/5BAFcs$\"+d3dIEF-7$$!+N.%*>:F-$\"+ B\\gcPF-7$$!+]9+#z#F-$\"+*)R%e#[F-7$$!+JKB;SF-$\"+Mn*F-$\"+1!p6^*F-7$$! +AM%H`*F-$\"+E9]^'*F-7$$!+M-*zp*F-$\"+$o&eT'*F-7$$!+0gg#o*F-$\"+xW0\"[ *F-7$$!+b!fv[*F-$\"+GB)><*F-7$$!+klP<\"*F-$\"+Ho()=()F-7$$!+@.4NF-7$$!+W&e Ym#F-$\"+:S+aBF-7$$!+aOF-$!+&f#***f $F-7$$\"+5Y)F-7$$\"+I!o- W*F-$!+,_\"fy)F-7$$\"+(e^K+\"Fjn$!+W![!R#*F-7$$\"+!43(\\5Fjn$!+C'*R]&* F-7$$\"+`i!H3\"Fjn$!+D`o:(*F-7$$\"+X@[-6Fjn$!+8<$Ht*F-7$$\"+'G&>36Fjn$ !+LA[-'*F-7$$\"+&))G**4\"Fjn$!+o+'pK*F-7$$\"+:Jpx5Fjn$!+=.>6*)F-7$$\"+ 88jT5Fjn$!+>`3i$)F-7$$\"+[nG?**F-$!+5#)\\)o(F-7$$\"+?xA$H*F-$!+Z30,pF- 7$$\"+Q*\\6a)F-$!+XD%>,'F-7$$\"+Uz\"=n(F-$!+#3YZ.&F-7$$\"+*4X[p'F-$!+3 n>%)RF-7$$\"+OUw@cF-$!+B)yf(GF-7$$\"+Tu0mWF-$!+$e8ls\"F-7$$\"+oC8VKF-$ !+'e!\\FbFcs7$$\"+]ZBq>F-$\"+3\"p/G'Fcs7$$\"+aY'Gm'Fcs$\"+tB\\)z\"F-7$ $!+ok_$['Fcs$\"+?vHTHF-7$$!+]S?_>F-$\"+lRZRSF-7$$!+Yb1BKF-$\"+*=\\l2&F -7$$!+\"ou%QWF-$\"+@uyOgF-7$$!+CuAwbF-$\"+dnT0pF-7$$!+JX$\\h'F-$\"+/0' )owF-7$$!+gSfMvF-$\"+v(o\\J)F-7$$!+0d:<$)F-$\"+GWCL))F-7$$!+.60Z*)F-$ \"+3f0:#*F-7$$!+(\\k;T*F-$\"+]&GQX*F-7$$!+B+s,(*F-$\"+5c?X&*F-7$$!+\"e l:\")*F-$\"+w3<([*F-7$$!+(RQ$R(*F-$\"+Vf7!G*F-7$$!+qP+([*F-$\"+[s\"p#* )F-7$$!+*[l-1*F-$\"+/.\"GV)F-7$$!+7ONo%)F-$\"+e6T0yF-7$$!+/?qBxF-$\"+o v`aqF-7$$!+rP`ToF-$\"+8X/#>'F-7$$!+^qPReF-$\"+m-hJ_F-7$$!+zi`OZF-$\"+B -\\)=%F-7$$!+b[a`NF-$\"+IgCzIF-7$$!+3Ui6BF-$\"+#Gd9#>F-7$$!+'yr@.\"F-$ \"+%QCUL(Fcs7$$\"+'fKqj#Fcs$!+HHXhYFcs7$$\"+uCeb:F-$!+HBUe;F-7$$\"+H%p S#GF-$!+^`xCGF-7$$\"+#)e/^SF-$!+I[0ZRF-7$$\"+fM&)>_F-$!+R$yy+&F-7$$\"+ edS:jF-$!+F0!4*fF-7$$\"+K#RUK(F-$!+@k1\")oF-7$$\"+:P^M#)F-$!+[V%[m(F-7 $$\"+?^(f.*F-$!+KWVI$)F-7$$\"+&\\$*)>(*F-$!+[%[z'))F-7$$\"+]*)*y-\"Fjn $!+&*obp#*F-7$$\"+Shtq5Fjn$!+[&*fH&*F-7$$\"+IB/+6Fjn$!+0mlW'*F-7$$\"+* H'[:6Fjn$!+S'yNh*F-7$$\"+`D'o6\"Fjn$!+N]ZP%*F-7$$\"+=E4/6Fjn$!+7@m>\"* F-7$$\"+-$Hs2\"Fjn$!+[Pdl')F-7$$\"+3PYO5Fjn$!+4(QE3)F-7$$\"+!3X8#)*F-$ !+$**H,Q(F-7$$\"+yrQZ\"*F-$!++A**olF-7$$\"+D+V\\$)F-$!+2JlhcF-7$$\"+`P %fV(F-$!+%GD=n%F-7$$\"+Z,HFcs7$$\"+y_Bm:F-$\"+Kx:/(*Fcs 7$$\"+aHmWCFcs$\"+.y)37#F-7$$!+P-?\"3\"F-$\"+'zU*QKF-7$$!+B'H))Q#F-$\" +/A*yI%F-7$$!+8$4fl$F-$\"+FRg6`F-7$$!+JO$)f[F-$\"+\"=EZB'F-7$$!+?&Q%yf F-$\"+!Q=H1(F-7$$!+&Qn0*pF-$\"+Lh3$y(F-7$$!+2bkwyF-$\"+_ah$Q)F-7$$!+I! Q#>')F-$\"+E%*fa))F-7$$!+\"flN?*F-$\"+*=\\!)=*F-7$$!+/B&zh*F-$\"+$G!3y $*F-7$$!+nL=a)*F-$\"+xa1@%*F-7$$!+uOv2**F-$\"+$*fu:$*F-7$$!+GW*zx*F-$ \"+DYHj!*F-7$$!+w82o%*F-$\"+VkKn')F-7$$!+ba&[)*)F-$\"+L`&Q8)F-7$$!+IPn Q$)F-$\"+Rs>ruF-7$$!+!*\\&Ha(F-$\"+fM#)*o'F-7$$!+%p*y8mF-$\"+&Rp@!eF-7 $$!+/yUpbF-$\"+AcSA[F-7$$!+(4S(HWF-$\"+T*yhw$F-7$$!+%zoc@$F-$\"+%GJ.l# F-7$$!+**=p[>F-$\"+4Rg#\\\"F-7$$!+,pA.lFcs$\"+^fL8JFcs7$$\"+%G#Q$e'Fcs $!+CU`[()Fcs7$$\"+&p&)p&>F-$!+W]MZ?F-7$$\"+L+UEKF-$!+z/%y=$F-7$$\"+l=y [WF-$!+ywjyUF-7$$\"+!y8xg&F-$!+iz!HI&F-7$$\"+F\\X)o'F-$!++[&\\C'F-7$$ \"+Tx(yn(F-$!+INX!4(F-7$$\"+g#yWc)F-$!+8&om#yF-7$$\"+sFLQ$*F-$!+*)RkU% )F-7$$\"+dR.\"***F-$!+y[OH*)F-7$$\"+E>c^5Fjn$!+@R))z#*F-7$$\"+5.l!4\"F jn$!+n@T*[*F-7$$\"+!GUf6\"Fjn$!+@1Pb&*F-7$$\"+,19F6Fjn$!+5@Sx%*F-7$$\" +qk2C6Fjn$!+yPMd#*F-7$$\"+C=r16Fjn$!+&4i\"**))F-7$$\"+GX9v5Fjn$!++P&)3 %)F-7$$\"+@hhH5Fjn$!+,mJ%z(F-7$$\"+(R:_q*F-$!+!4(>lqF-7$$\"+%***>%)*)F -$!+L#=FB'F-7$$\"+<-YS\")F-$!+Hc\\4`F-7$$\"+1T>$=(F-$!+wcM4VF-7$$\"+l! HN7'F-$!+E04ZKF-7$$\"+-?cu\\F-$!+JEOQ@F-7$$\"+&R]8v$F-$!+wF5%***Fcs7$$ \"+uF%3Z#F-$\"+a$f4`\"Fcs7$$\"+f#R<:\"F-$\"+>qD-8F-7$$!+;KCd=Fcs$\"+H@ 9JCF-7$$!+4:2?:F-$\"+6.*H_$F-7$$!+wz&*GGF-$\"+I)>9c%F-7$$!+'p:'*3%F-$ \"+glkIbF-7$$!+?tNz_F-$\"+!e6dT'F-7$$!+g[7wjF-$\"+&=;F?(F-7$$!+FD1ftF- $\"+U01zyF-7$$!+&G!44#)F-$\"+c,oL%)F-7$$!+xEX4*)F-$\"+`DFd))F-7$$!+!)p @Y%*F-$\"+0a]U\"*F-7$$!+?gp3)*F-$\"+on>%G*F-7$$!+**Rx*)**F-$\"+`%e%z#* F-7$$!+O$=h)**F-$\"+SYzF\"*F-7$$!+([m#)z*F-$\"+i(\\6$))F-7$$!+,OeI%*F- $\"+;?!RR)F-7$$!+bS4\"*))F-$\"+2;!G#yF-7$$!+3p>\">)F-$\"+&\\bo7(F-7$$! +x9GXtF-$\"+SG;0CCF -7$$\"+ye$3j$F-$!+NOcONF-7$$\"+!\\@o%[F-$!+!p.Sf%F-7$$\"+O$pT*fF-$!+'f P,e&F-7$$\"+N$[%eqF-$!+#p^*zkF-7$$\"+,\"oo-)F-$!+`\"y)zsF-7$$\"+'[g#)) ))F-$!+Ca*z'zF-7$$\"+Y;.L'*F-$!+j2?M&)F-7$$\"+i(4`-\"Fjn$!+3;Nq*)F-7$$ \"+v:=u5Fjn$!+9GPq#*F-7$$\"+.BR46Fjn$!+XuKI%*F-7$$\"+W!\\08\"Fjn$!+G( \\%[%*F-7$$\"+2+RP6Fjn$!+&)*R^K*F-7$$\"+_\\yH6Fjn$!+QE#H1*F-7$$\"+v%Qx 5\"Fjn$!+0)pjm)F-7$$\"+ZgRr5Fjn$!+$>%*>9)F-7$$\"+xB0@5Fjn$!+-g6)\\(F-7 $$\"+MYhr&*F-$!+r\"4Zu'F-7$$\"+,WZ.))F-$!++DB$*eF-7$$\"+6::9zF-$!+Y3Xc \\F-7$$\"+^Cf8pF-$!+&)3D[RF-7$$\"+M]q8eF-$!+!zaM)GF-7$$\"+K5QGYF-$!+/Q jxF-$\"+C7'Hz$F-7$$!+ fQprKF-$\"+(eb'*z%F-7$$!+m(QK_%F-$\"+Z]NLdF-7$$!+LB2'p&F-$\"+cH]zlF-7$ $!+%35$onF-$\"+HPlCtF-7$$!+xbY>xF-$\"+<]rczF-7$$!+6.-J&)F-$\"++f=l%)F- 7$$!+\\0'p=*F-$\"+kFQT))F-7$$!+$HbUn*F-$\"+tMky!*F-7$$!+Y:D$)**F-$\"+g -]s\"*F-7$$!+Xmz55Fjn$\"+gB\"37*F-7$$!+/hi/5Fjn$\"+I3&Q#*)F-7$$!+Pn))* z*F-$\"+Y,L%e)F-7$$!+jDSu$*F-$\"+YPQ2\")F-7$$!+1&o*y()F-$\"+&\\$[+vF-7 $$!+Wq-E!)F-$\"+ddItnF-7$$!+B3*38(F-$\"+O\"\\v$fF-7$$!+2)e76'F-$\"+!z5 n+&F-7$$!+-go')\\F-$\"+M$He*RF-7$$!+SF.yPF-$\"+jG?@HF-7$$!+='=p]#F-$\" +Q/4+=F-7$$!+\"z._>\"F-$\"+Vs//lFcs7$$\"+2W$[N\"Fcs$!+()\\(f4&Fcs7$$\" +]$eTY\"F-$!+@8ih;F-7$$\"+H9#3x#F-$!+!eJwy#F-7$$\"+lcsOSF-$!+'*)Q,(QF- 7$$\"+@*pXC&F-$!+)pqC*[F-7$$\"+$4B'yjF-$!+?W-ReF-7$$\"+XryCuF-$!+(3+bp 'F-7$$\"+F'41P)F-$!+F&4\"\\uF-7$$\"+MzD0#*F-$!+_#f()3)F-7$$\"+1#o%>**F -$!+_T?0')F-7$$\"+j\"[00\"Fjn$!+X#p6**)F-7$$\"+1!)p&4\"Fjn$!+$=P9C*F-7 $$\"+@J!p7\"Fjn$!+R***GN*F-7$$\"+*=0Q9\"Fjn$!+@SdC$*F-7$$\"+4&zh9\"Fjn $!+`(zv:*F-7$$\"+Vk$R8\"Fjn$!+\"R'3b))F-7$$\"+Pc726Fjn$!+agAA%)F-7$$\" +3G%f1\"Fjn$!+10)f'yF-7$$\"+D'Q2,\"Fjn$!+'eX]>(F-7$$\"+\"R*G?%*F-$!+T% y'>kF-7$$\"+'[.YF-7$$\"+S$3si'F-$! +Z[Y*e$F-7$$\"+F5,)[&F-$!+)QlU_#F-7$$\"+F`bnUF-$!+SxPB9F-7$$\"+(4qC)HF -$!+H%p!GIFcs7$$\"+$o-7l\"F-$\"+-,26#)Fcs7$$\"+saDQHFcs$\"+ZQ(=$>F-7$$ !+d_Bo5F-$\"+4]/8IF-7$$!+5)\\DT#F-$\"+)f:%[SF-7$$!+ox5;PF-$\"+)3QA-&F- 7$$!+wh!e&\\F-$\"+D#[%>fF-7$$!+$[()*3hF-$\"+)o,fs'F-7$$!+!=4S:(F-$\"+k zhGuF-7$$!+RF#32)F-$\"+Wd-;!)F-7$$!+cq`T))F-$\"++A?y%)F-7$$!+U/%4X*F-$ \"+sq42))F-7$$!+Je&p))*F-$\"+>5Fjn$!+N\"Hel)F-7$$\"+qsv u5Fjn$!+c8:#**)F-7$$\"+#[]g6\"Fjn$!+;\"fN>*F-7$$\"+*>BJ9\"Fjn$!+![O6Fjn $!+HjuM')F-7$$\"+xx#[5\"Fjn$!+$H)pn\")F-7$$\"+/eue5Fjn$!+bY\"=e(F-7$$ \"+KrV')**F-$!+s67')oF-7$$\"+V'>5D*F-$!+#G:64'F-7$$\"+KM#))Q)F-$!+-mg3 _F-7$$\"+8:P4uF-$!+_?b^UF-7$$\"+C/;CjF-$!+f%))QB$F-7$$\"+=BpY^F-$!+UUO q@F-7$$\"+G%eC*QF-$!+m.Pw5F-7$$\"+)pi)yDF-$\"*$[0BKFcs7$$\"+!Rw]A\"F-$ \"+L\"z#R6F-7$$!+\\x#=[\"Fcs$\"+95]GAF-7$$!+k(\\*=:F-$\"+Z$)p$G$F-7$$! +Y$)QkGF-$\"+&f`*)G%F-7$$!+e\"Q7;%F-$\"+8p%)G_F-7$$!+#)=K'Q&F-$\"+yoo) 3'F-7$$!+Qp4g%GZ)F-7$$!+zBf+(*F-$\"+l8ja()F-7$$!+@AO35Fj n$\"+*\\)3(*))F-7$$!+V\"Q\"G5Fjn$\"+X%4s*))F-7$$!+\"yB!H5Fjn$\"+EzOa() F-7$$!+w%[5,\"Fjn$\"+:JPq%)F-7$$!+;jIY(*F-$\"+]eY\\!)F-7$$!+(=:c?*F-$ \"+aiD)\\(F-7$$!+xLx*\\)F-$\"+EYgDoF-7$$!+M9@VwF-$\"+c,XUgF-7$$!+(=nHl 'F-$\"+1Ufh^F-7$$!+$Ho\"[bF-$\"+'RYu>%F-7$$!+TW[\\VF-$\"+pDulJF-7$$!+U [dyIF-$\"+&yVK3#F-7$$!+!oavv\"F-$\"+Y-Du'*Fcs7$$!+;$4]3%Fcs$!+,lQQ;Fcs 7$$\"+cN')p%*Fcs$!+_=e#H\"F-7$$\"+lh:)G#F-$!+N\"\\5S#F-7$$\"+zeS&f$F-$ !+`9)>Z$F-7$$\"+,n]][F-$!+]`)))[%F-7$$\"+T$en.'F-$!+)3#GOaF-7$$\"+Y)z! RrF-$!+QU$**H'F-7$$\"+Ui/W\")F-$!+9v/nqF-7$$\"+/E))R!*F-$!+fcWExF-7$$ \"+#3Gk\")*F-$!+\\jro#)F-7$$\"+f#3l/\"Fjn$!+0iK'o)F-7$$\"+?[(y4\"Fjn$! +XMqt*)F-7$$\"+#ex^8\"Fjn$!+QsGF\"*F-7$$\"+CE*z:\"Fjn$!+&fVb9*F-7$$\"+ *>Ng;\"Fjn$!+8'[*G!*F-7$$\"+A/;f6Fjn$!+z3%*z()F-7$$\"+4mOP6Fjn$!+pe%GS )F-7$$\"+Q6!35\"Fjn$!+1gx.zF-7$$\"+`%o(\\5Fjn$!+G2^!H(F-7$$\"+(p&RZ)*F -$!+e6OslF-7$$\"+uCij!*F-$!+'*Q-gdF-7$$\"+Zxqa\")F-$!+uzUl[F-7$$\"+RA% 48(F-$!+A\"y:!RF-7$$\"+#>>Y+'F-$!+fjR#)GF-7$$\"+i'[+z%F-$!+'eiD#=F-7$$ \"+?&>N]$F-$!+j@F-$\"+oo@vNFcs7$$\"+Jre*)yFcs$\"+%[# 4Y9F-7$$!+\\zpyfFcs$\"+QmI7DF-7$$!+ca#[(>F-$\"+xEASNF-7$$!+)H<(=LF-$\" +ml@9XF-7$$!+iT41YF-$\"+ZO?>aF-7$$!+m$pP\"eF-$\"+WZ(3C'F-7$$!+#z$Q>pF- $\"+>K%f'pF-7$$!+_k)>!zF-$\"+muR#e(F-7$$!+q&3Eu)F-$\"+`7vz!)F-7$$!+Zb! [U*F-$\"+HEG\\%)F-7$$!+)4T^$**F-$\"+66D%o)F-7$$!+]*ej-\"Fjn$\"+dE3!y)F -7$$!+ONQS5Fjn$\"+UE^M()F-7$$!+EbMN5Fjn$\"+,'ywa)F-7$$!+1sR65Fjn$\"+5o :A#)F-7$$!+V$z2p*F-$\"+s&RHw(F-7$$!+`6%H4*F-$\"+'4`t<(F-" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 49 "listplot([seq([W[3,j],W[4,j]],j =1..time_steps)]);" }}{PARA 13 "" 1 "" {GLPLOT2D 412 412 412 {PLOTDATA 2 "6#-%'CURVESG6#7`jl7$$\"\"\"!\"\"$F*F*7$$\"+#\\sK#**!#6$!+ cn(>#**F/7$$\"+u'y$*p*F/$!+Tj7*o*F/7$$\"+\"yE!R$*F/$!+mK40$*F/7$$\"+%y eT&))F/$!+$*4\"fx)F/7$$\"+2BSd#)F/$!+lj$*4\")F/7$$\"+MdfhvF/$!+S)\\xJ( F/7$$\"+#p0%znF/$!+Xc,7kF/7$$\"+h&[I#fF/$!+_oH2aF/7$$\"+h.7/]F/$!+CD#) >VF/7$$\"+&eKN.%F/$!+cs?nJF/7$$\"+iba@IF/$!+'GF\"o>F/7$$\"+3f)y(>F/$!+ ^Lh>u!#77$$\"+6hI>\"*Fco$\"+G+#f\"\\Fco7$$!+Voiq;Fco$\"+7d!Hr\"F/7$$!+ s:q\\7F/$\"+![3G!HF/7$$!+)H/iK#F/$\"+;_%H/%F/7$$!+1!ohQ$F/$\"+\">*4;^F /7$$!+l@Q=WF/$\"+5RY1hF/7$$!+%f22T&F/$\"+-p&)**pF/7$$!+G'Q+N'F/$\"+*Rs Qy(F/7$$!+A@OAsF/$\"+C\\(zW)F/7$$!+&HAH,)F/$\"+_/a$)*)F/7$$!+'y%\\1()F /$\"+kc&QQ*F/7$$!+&3nxG*F/$\"+Y$)3W'*F/7$$!+Lc\"=u*F/$\"+mHCh(*F/7$$!+ %Hma+\"!#5$\"+NY6M(*F/7$$!+9\"*Q@5Fhs$\"+;BDj&*F/7$$!+=#G4-\"Fhs$\"+X# Q4D*F/7$$!+k\\M.5Fhs$\"+9e=,))F/7$$!+mPU#o*F/$\"+#)Hv>#)F/7$$!+V(\\h:* F/$\"+gL;9vF/7$$!+#)4')e%)F/$\"+rJs$p'F/7$$!+&pdF/7$$!+ y=r!f'F/$\"+KlQaZF/7$$!+*3Q2X&F/$\"++7#Gm$F/7$$!+#Rl4?%F/$\"+aj%3^#F/7 $$!+$)*zj'GF/$\"+sx!eJ\"F/7$$!+=dgu9F/$\"*f]5h*Fco7$$!*r\"3,bFco$!+F05 H6F/7$$\"+YoFi8F/$!+-NISBF/7$$\"+>^j p*F/$!+?y%4[*F/7$$\"+8t^$H*F/$!+0&H-0*F/7$$\"+pOmo()F/$!+*G'oy%)F/7$$ \"+r+dM\")F/$!+q@[vxF/7$$\"++n6/uF/$!+1e!>&pF/7$$\"+JP$**e'F/$!+b-@@gF /7$$\"+\\n:/dF/$!+/'4%)*\\F/7$$\"+')**GeZF/$!+&*3.+RF/7$$\"+'*G**)F/$\"+G\"Q#y$*F/7$$!+am% *Q&*F/$\"+_)HEf*F/7$$!+a]o_**F/$\"+a%H_m*F/7$$!+E<'>-\"Fhs$\"+-/B&f*F/ 7$$!+7RzK5Fhs$\"+%[RNQ*F/7$$!+^q#o-\"Fhs$\"+xSxK!*F/7$$!+!fFM+\"Fhs$\" +&[xsa)F/7$$!+d`AB'*F/$\"+=r9LzF/7$$!+vlXO!*F/$\"+%pl#)>(F/7$$!+>.qz#) F/$\"+e@K_jF/7$$!+^rBjtF/$\"+'>2oS&F/7$$!+^8'=I'F/$\"+I$o\\P%F/7$$!+)* )QY6&F/$\"+&y6RkHFco7$$\"+cCY@RFco$!+9K35:F/7$$\"+&y*Q9=F/$!+8y _.FF/7$$\"+ES3&>$F/$!+r'\\t&QF/7$$\"+Wx/1XF/$!+Ebn_\\F/7$$\"+Jcc@dF/$! +QKdrfF/7$$\"+$RV\">oF/$!+'\\5u*oF/7$$\"+hq3!y(F/$!+O(o^r(F/7$$\"+0N)) *e)F/$!+xXq6%)F/7$$\"+`NPQ#*F/$!+mg&f(*)F/7$$\"+%GB(>(*F/$!+\\`4*R*F/7 $$\"+x6A.5Fhs$!+gEju'*F/7$$\"+)Q'y<5Fhs$!+$Gy%)z*F/7$$\"+0k>;5Fhs$!+,% p*o(*F/7$$\"+u5\\#***F/$!+>w'oe*F/7$$\"+.Z^z'*F/$!+n3Lb#*F/7$$\"+uIfM# *F/$!+!yg)z()F/7$$\"+8b?q')F/$!+YTAo\")F/7$$\"+\\%\\#**zF/$!+t]MIuF/7$ $\"+sIiMsF/$!+3N;ylF/7$$\"+Nz!*)Q'F/$!+\\fXDcF/7$$\"+d#eTZ&F/$!+tbh(e% F/7$$\"+Fnz,XF/$!+Z9R\"[$F/7$$\"+v.h#[$F/$!+8(*eCBF/7$$\"+eZ$oU#F/$!+# 4Vd8\"F/7$$\"+y.JW8F/$\"*kaTi'Fco7$$\"+$**>pW#Fco$\"+'4XCE\"F/7$$!+Ot5 B')Fco$\"+kMHMCF/7$$!+ZUom>F/$\"+\"f&*Qc$F/7$$!+mm(y0$F/$\"+W'[Vj%F/7$ $!+L1gCTF/$\"+'>***HcF/7$$!+%=%pa^F/$\"+]ElOlF/7$$!+e!e]8'F/$\"+![FTSj)F/$\"+ JU%*F/7$$!+\"zjC/\"Fhs$\"+%\\ H5>*F/7$$!+**=$3.\"Fhs$\"+@I6.))F/7$$!+Jn\\,5Fhs$\"+&4MKG)F/7$$!+'GaJa *F/$\"+k[$yj(F/7$$!+Ull&*))F/$\"+lr;voF/7$$!+1-tz!)F/$\"+3ZJ0gF/7$$!+% y2s5(F/$\"+%o#=S]F/7$$!+%o'R%*fF/$\"+!3SM*RF/7$$!+1+xhZF/$\"+9HS!)GF/7 $$!+GOXLMF/$\"+'G^yr\"F/7$$!+#pFl.#F/$\"+%***yP_Fco7$$!+OCu,gFco$!+9=> HoFco7$$\"+6_&GX)Fco$!+%e6G)=F/7$$\"+q@TpAF/$!+2\"Hj0$F/7$$\"+7-nUOF/$ !+E6=%=%F/7$$\"+UWRP\\F/$!+AywZ_F/7$$\"+ixkGhF/$!+c+dHiF/7$$\"+zj#\\>( F/$!+F4]8rF/7$$\"+R+o=\")F/$!+Qv?&)yF/7$$\"+2)Gm)))F/$!+*\\;B`)F/7$$\" +-C()*[*F/$!+5!Q#**F/$!+Er@9%*F/7$$\"+EOy=5Fhs$!+=-eN'* F/7$$\"+^8]G5Fhs$!+#H8cq*F/7$$\"+yw9A5Fhs$!+f(\\Oi*F/7$$\"+J$*e+5Fhs$! +I6V\"R*F/7$$\"+\\%[)['*F/$!+N$eI,*F/7$$\"+J>Di\"*F/$!+(Q=\\\\)F/7$$\" +e#*ye&)F/$!+8^eXyF/7$$\"+NYW^yF/$!+\\4pvqF/7$$\"+QY6`qF/$!+?hw(>'F/7$ $\"+&HCj<'F/$!+g>/E_F/7$$\"+n*\\IB&F/$!+Un@wTF/7$$\"+pmkMUF/$!+m[=lIF/ 7$$\"+x:(=>$F/$!+qLt5>F/7$$\"+o/*\\6#F/$!+A*H@J(Fco7$$\"+E*\\R,\"F/$\" +-.1[XFco7$$!+\\y/95Fco$\"+<5))G;F/7$$!+P\")3@7F/$\"+#=LIx#F/7$$!+c>tM BF/$\"+)zf+(QF/7$$!+x]OJMF/$\"++-\"Q!\\F/7$$!+MpB*\\%F/$\"+fjTfeF/7$$! +t]qDbF/$\"+$RsMs'F/7$$!+!z.s\\'F/$\"+!phT[(F/7$$!+0uI*R(F/$\"+&oM88)F /7$$!+!4(*o@)F/$\"+#RWll)F/7$$!+%yMW$*)F/$\"+\"**\\I0*F/7$$!+Y;MO&*F/$ \"+X2!eJ*F/7$$!+(=Z2+\"Fhs$\"+KITT%*F/7$$!+'emL.\"Fhs$\"+B@:G%*F/7$$!+ ')fB]5Fhs$\"+Zx#fF*F/7$$!+.BK]5Fhs$\"+8&3j)*)F/7$$!+i(yG.\"Fhs$\"+*\\b Dc)F/7$$!+:T.v**F/$\"+V-n4!)F/7$$!+->*=W*F/$\"+IwWMtF/7$$!+vohL()F/$\" +\"R?ba'F/7$$!+(R6!fyF/$\"+s'zLl&F/7$$!+[\"f9$oF/$\"+'yb.n%F/7$$!+*>d( ocF/$\"+u\\a5OF/7$$!+S*RFR%F/$\"+7S]\"Fco$!+RD[i5F/7$$\"+*y-MI\"F/$!+:#QkC#F /7$$\"+\\tKEFF/$!+#=wyR$F/7$$\"+Na:*3%F/$!+f&)o(\\%F/7$$\"+i-$[O&F/$!+ 2=gFbF/7$$\"+82FHlF/$!+eIcqkF/7$$\"+BI-ivF/$!+`A36tF/7$$\"+k(>nW)F/$!+ =(>b.)F/7$$\"+iALr\"*F/$!+'*RJK')F/7$$\"+40+\"Fhs$!+/5Jy\"*F/7$$\"+PJL/'*F /$!+5b)\\v)F/7$$\"+6$*[w!*F/$!+Y))R'>)F/7$$\"+T[TM%)F/$!+Na)=^(F/7$$\" +?Q:\"p(F/$!+l(HFr'F/7$$\"+SeefoF/$!+'e()>\"eF/7$$\"+`d<_fF/$!+WPFC[F/ 7$$\"+C&H3)\\F/$!+?h^lPF/7$$\"+t<&o&RF/$!+Mwn_EF/7$$\"+R]*4*GF/$!+H7X. :F/7$$\"+_he$z\"F/$!+QrNfLFco7$$\"+\"3;ru'Fco$\"+'4rpJ)Fco7$$!+;yebXFc o$\"+2>`\")>F/7$$!+Y@$pe\"F/$\"+%3Bi4$F/7$$!+[&f'3FF/$\"+8(z#fTF/7$$!+ U@L4QF/$\"+c=Jb^F/7$$!+nwsw[F/$\"+\"*4BqgF/7$$!+\"HEx*eF/$\"+(*4S\"*oF /7$$!+PznA*F/$\"+6AET!*F/7$$!+zRE$z*F/$\"+/F#*f#*F/7$$!+:**GA5Fhs$ \"+Q?pU$*F/7$$!+7P>]5Fhs$\"+=F>)G*F/7$$!+?\\%=1\"Fhs$\"+.(fm4*F/7$$!+ \"H'Hc5Fhs$\"+nM(*p()F/7$$!+c!3H.\"Fhs$\"+\"H6$*F/$\"+PoiBqF/7$$!+D>F]&)F/$\"+Y$*)*4iF/7$$!+WWn,g#F/7$$\"+8?6%=$F/$!+#y [ts$F/7$$\"+[#\\N`%F/$!+Wb4(z%F/7$$\"+-oU(y&F/$!+BhY\"z&F/7$$\"+l;fApF /$!+!\\FRp'F/7$$\"+#*Hp>zF/$!+asj*[(F/7$$\"+,#yNw)F/$!+^]rl\")F/7$$\"+ <4[V%*F/$!+T5X6()F/7$$\"+de+`**F/$!+ODX=\"*F/7$$\"+hG**G5Fhs$!+#eL2Q*F /7$$\"+xQeX5Fhs$!+#paZ\\*F/7$$\"+FicX5Fhs$!+I2Uf%*F/7$$\"+$H5(H5Fhs$!+ wV/w#*F/7$$\"+NT/!***F/$!+74G[*)F/7$$\"+9&\\fa*F/$!+Ty.#[)F/7$$\"+(G(H x*)F/$!+S/O&)yF/7$$\"+5p2(H)F/$!+pCHorF/7$$\"+,'p$=vF/$!+3+rUjF/7$$\"+ /p-amF/$!+pi7AaF/7$$\"+HSX;dF/$!+#3m9U%F/7$$\"+'z(\\\"F/7$$!+NFIv\")Fco$\"+0tj>BF/7$$!+I\\^f>F /$\"+WzE.MF/7$$!+%)>/)3$F/$\"+O.8JWF/7$$!+\"G]7>%F/$\"+*H(f)Q&F/7$$!+i =Wc_F/$\"+/zMiiF/7$$!+3w-qiF/$\"+%o\"\\SqF/7$$!+#yhv@(F/$\"+D%[Er(F/7$ $!+ie(Q3)F/$\"+a)*)*p#)F/7$$!+ArJ`))F/$\"+)f__q)F/7$$!+W;45&*F/$\"+FQt 7!*F/7$$!+=0(Q+\"Fhs$\"+Z;G)=*F/7$$!+d)[C/\"Fhs$\"+Q9HH#*F/7$$!+m(=a1 \"Fhs$\"+AqrM\"*F/7$$!+6\"f;2\"Fhs$\"+j=50*)F/7$$!+2kJg5Fhs$\"+N4jU&)F /7$$!+.^'3.\"Fhs$\"+%*))>^!)F/7$$!+K)3;$)*F/$\"+M`[OuF/7$$!+\\3$[<*F/$ \"+=R-1nF/7$$!+')eiX$)F/$\"+n%\\#peF/7$$!+f8#fN(F/$\"+Nj]P\\F/7$$!+y*o @A'F/$\"+*e-S#RF/7$$!+PE/l\\F/$\"+SypVGF/7$$!+A:$*3OF/$\"+/w68aYIAF/$!+6p,VHF/7$$\"+Q*R)F/7$$\"+XWmk))F/$!+S\">Hc(F/7$$\" +M`wY\")F/$!+N&>g\"oF/7$$\"+l,3LtF/$!+@E\"p'fF/7$$\"+&pDkV'F/$!+v\")\\ H]F/7$$\"+2@:paF/$!+be$*=SF/7$$\"+/>1VWF/$!+\\LQ^HF/7$$\"+VIUpLF/$!+>I rV=F/7$$\"+0L1fAF/$!+DM8KrFco7$$\"+f!HD7\"F/$\"+rE;FUFco7$$!*xC6(HFco$ \"+hq'oa\"F/7$$!+0./(=\"F/$\"+c!3Dk#F/7$$!+9UYQBF/$\"+b![Op$F/7$$!+1gS sMF/$\"+/NE&o%F/7$$!+3y,\"*F/7$$!+$Q`*y5Fhs$\"+.gJo*)F/7$$!+5/ gz5Fhs$\"+.(e=q)F/7$$!+^wJi5Fhs$\"+Ch*[I)F/7$$!+=1qE5Fhs$\"+g\\k\"y(F/ 7$$!+mTUF(*F/$\"+h&Q\"QrF/7$$!+0xr3!*F/$\"+Q.I#Q'F/7$$!+J]v>\")F/$\"+E x)R_&F/7$$!+Yn-uqF/$\"+h)*)\\d%F/7$$!+1_[*)eF/$\"+vT'*[NF/7$$!+?c<)e%F /$\"+s6IhCF/7$$!+whm&>$F/$\"+rA\"*G8F/7$$!+.))HS]k$)F/7$$\"+\"f9#[**F/$!+&\\/l!))F/7$$\"+5^/O5Fhs$!+'*oS2\"*F/7$$\" +bS\")f5Fhs$!+K&>KE*F/7$$\"+Rt[m5Fhs$!+[9Us#*F/7$$\"+eisc5Fhs$!+LE\"f8 *F/7$$\"+=fVJ5Fhs$!+OK$p&))F/7$$\"+lK0<**F/$!+\"eb4W)F/7$$\"+%H'\\(Q*F /$!+PDb&*yF/7$$\"+@ddQ()F/$!+4QCIsF/7$$\"+2dY$)zF/$!+#4?jX'F/7$$\"+40F NrF/$!+fVk'e&F/7$$\"+H'pn?'F/$!+M(Haj%F/7$$\"+unE5_F/$!+CX*zh$F/7$$\"+ )GQv:%F/$!+kn\\]DF/7$$\"+?7()fIF/$!+6Gl\\9F/7$$\"+CnF/$!+)HnWK$Fco7 $$\"+\\/hJxFco$\"+n$4;%yFco7$$!+L7mWRFco$\"+i_^$)=F/7$$!+Jvwj:F/$\"+y) H&\\HF/7$$!+s1OBFF/$\"+T:#p'RF/7$$!+d#G7'QF/$\"+^*39#\\F/7$$!+xtdk\\F/ $\"+O6()*z&F/7$$!+ndw>gF/$\"+(4k/f'F/7$$!+`1J7qF/$\"+!)zp#G(F/7$$!+n=* p#zF/$\"+\\0[nyF/7$$!+ej0[()F/$\"+Oc8P$)F/7$$!+-f_f%*F/$\"+FsS&o)F/7$$ !+#QgX+\"Fhs$\"+31Y2*)F/7$$!+9q6\\5Fhs$\"+C8*)***)F/7$$!+(yM#y5Fhs$\"+ +1vg*)F/7$$!+j;r!4\"Fhs$\"+2Df*y)F/7$$!+(Q%f&3\"Fhs$\"+MPa([)F/7$$!+*) )RA1\"Fhs$\"+]>Rd!)F/7$$!+t6P?5Fhs$\"+@Qo.vF/7$$!+^xB,'*F/$\"+B&>G$oF/ 7$$!+!\\!z?))F/$\"+$eFJ0'F/7$$!+'e4G(yF/$\"+.E!\\<&F/7$$!+U&QBx'F/$\"+ $=*Q5UF/7$$!+\"H(zQbF/$\"+A#)ptJF/7$$!+Ita&>%F/$\"+;lk!3#F/7$$!+g6EpFF /$\"+'en^[*Fco7$$!+O>7*G\"F/$!+e0eU?Fco7$$\"+S*y59#Fco$!+L]Ze8F/7$$\"+ &z*44[1g5Fhs$!+,#3n%*)F/7$$\"+'e$4I5Fhs$!+#[B Di)F/7$$\"+!)p.f)*F/$!+'*)pb;)F/7$$\"+Y@Q(G*F/$!+Mq=%e(F/7$$\"+QD,*f)F /$!+W3b))oF/7$$\"+,-;2yF/$!+P9[!4'F/7$$\"+,S#\\#pF/$!+X2B._F/7$$\"+KF/7$$\"+Ag&4'QF/$!+YWQb@F/7$$\" +pc%)RFF/$!+r>2k5F/7$$\"+#3(\\(e\"F/$\"*yV!QPFco7$$\"+H(*4[TFco$\"+VR] K6F/7$$!+^^KswFco$\"+hxB0AF/7$$!+S^MZ>F/$\"+5k;SKF/7$$!+![NP6$F/$\"+=h sAUF/7$$!+=O$RD%F/$\"+2[PR^F/7$$!+lina`F/$\"+oGsxfF/7$$!+:E'=S'F/$\"+E `iEnF/7$$!+\"3'f!Q(F/$\"+X$RiP(F/7$$!+l?Kv#)F/$\"+%>a!=zF/7$$!+yr1q!*F /$\"+mJ!\\M)F/7$$!+m)z([(*F/$\"+j$o4l)F/7$$!+KmdH5Fhs$\"+^$*yJ))F/7$$! +84ip5Fhs$\"+&R&G%)))F/7$$!+^\\n$4\"Fhs$\"+Z$)z1))F/7$$!+]2h+6Fhs$\"+z $f\"*f)F/7$$!++4d*3\"Fhs$\"+#=yFE)F/7$$!+%QG+1\"Fhs$\"+O#[2!yF/7$$!+b' R=,\"Fhs$\"+'4dz@(F/7$$!+=4(GX*F/$\"+-o=@lF/7$$!+&4s5h)F/$\"+Vr=>dF/7$ $!+b_,0wF/$\"+$)RqA[F/7$$!+e$y7X'F/$\"+BkWWQF/7$$!+/yqq^F/$\"+W-)*)z#F /7$$!+Y*=zy$F/$\"+w/a-1(3\\F/7$$\"+CauqiF/$!+wm7ReF/7$$\"+27]6uF /$!+w%oUn'F/7$$\"+>p(oS)F/$!+*=1-S(F/7$$\"+[?KU#*F/$!+P0<0!)F/7$$\"+`1 s2**F/$!+cktz%)F/7$$\"+zItR5Fhs$!+b\"Rp\"))F/7$$\"+,Y&42\"Fhs$!+3SK7!* F/7$$\"+v4l%3\"Fhs$!+s(QR1*F/7$$\"+J?O\"3\"Fhs$!+axFs*)F/7$$\"+fm*=1\" Fhs$!+fs=S()F/7$$\"+:NFF5Fhs$!+!HSFP)F/7$$\"+\\gi'y*F/$!+gl3xyF/7$$\"+ #45L<*F/$!+VdF /7$$\"+aW--nF/$!+%e3!=[F/7$$\"+iUD6dF/$!+jUG[QF/7$$\"+\"[pxl%F/$!+_50E GF/7$$\"+H/O`NF/$!+5RCnb()F/7$$!+$))et5\"Fh s$\"+Dx`S')F/7$$!+[9d36Fhs$\"+Fxj(R)F/7$$!+kYY\"4\"Fhs$\"+7)*=G!)F/7$$ !+2Vjb5Fhs$\"+>5gNvF/7$$!+2d2,5Fhs$\"+jL6DpF/7$$!+e%=AG*F/$\"+Ot!R?'F/ 7$$!+M>mz$)F/$\"+W/<\"Q&F/7$$!+.Vn;tF/$\"+`H6oWF/7$$!+P8M6hF/$\"+&R:zZ $F/7$$!+6p)ey%F/$\"++ofDCF/7$$!+:26mLF/$\"+K')zF8F/7$$!+u]k!)=F/$\"+KT '[-#Fco7$$!+Q,l+OFco$!+#G=UJ*Fco7$$\"+BG5k6F/$!+)f%[a?F/7$$\"+N&=/m#F/ $!+jF?ZJF/7$$\"+7ob)4%F/$!+?%)\\!>%F/7$$\"+prE]aF/$!+TC=m^F/" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 49 "listplot([seq([W[1,j],W[3,j]],j =1..time_steps)]);" }}{PARA 13 "" 1 "" {GLPLOT2D 412 412 412 {PLOTDATA 2 "6#-%'CURVESG6#7`jl7$$\"\"!F)$\"\"\"!\"\"7$$\"+#[&yY7!#6$ \"+#\\sK#**F07$$\"+e#zYZ#F0$\"+u'y$*p*F07$$\"+A*Qfm$F0$\"+\"yE!R$*F07$ $\"+*pVU![F0$\"+%yeT&))F07$$\"+sP\"[(eF0$\"+2BSd#)F07$$\"+LaYkoF0$\"+M dfhvF07$$\"+)[7;w(F0$\"+#p0%znF07$$\"+miAc&)F0$\"+h&[I#fF07$$\"+yvwR#* F0$\"+h.7/]F07$$\"+.T50)*F0$\"+&eKN.%F07$$\"+%fUY-\"!#5$\"+iba@IF07$$ \"+zq\"f0\"F]o$\"+3f)y(>F07$$\"+7o*R2\"F]o$\"+6hI>\"*!#77$$\"+^4my5F]o $!+Voiq;Fjo7$$\"+^\\!)p5F]o$!+s:q\\7F07$$\"+YQWZ5F]o$!+)H/iK#F07$$\"+. '=<,\"F]o$!+1!ohQ$F07$$\"+*4^!H'*F0$!+l@Q=WF07$$\"+s5D9!*F0$!+%f22T&F0 7$$\"+N7ey#)F0$!+G'Q+N'F07$$\"+eH`HuF0$!+A@OAsF07$$\"+azRwkF0$!+&HAH,) F07$$\"+9^MIaF0$!+'y%\\1()F07$$\"+jjX/VF0$!+&3nxG*F07$$\"+&z3P6$F0$!+L c\"=u*F07$$\"+c>*[(=F0$!+%Hma+\"F]o7$$\"+;n^kgFjo$!+9\"*Q@5F]o7$$!+&4[ ur'Fjo$!+=#G4-\"F]o7$$!+qNsQ>F0$!+k\\M.5F]o7$$!+M_zsJF0$!+mPU#o*F07$$! +-V,_VF0$!+V(\\h:*F07$$!+PLpaaF0$!+#)4')e%)F07$$!+yT&*fkF0$!+KL;&*F0$!*r \"3,bFjo7$$!+rzWM%*F0$\"+YoFi8F07$$!+\"*o5x\"*F0$\"+>^jp*F07$$\"+_bl`SF0$\"+8t^$H*F07$$\"+xbu$=&F0$\"+pOmo() F07$$\"+jsETiF0$\"+r+dM\")F07$$\"+l:P8sF0$\"++n6/uF07$$\"+Tp!))3)F0$\" +JP$**e'F07$$\"+)ory&))F0$\"+\\n:/dF07$$\"+mCM7&*F0$\"+')**GeZF07$$\"+ E#RX+\"F]o$\"+'*G**)F07$$\"+DH;kRF0$!+am%*Q&*F07$$\"+5mZWFF0$!+a]o_**F07$$\"+<`6#[ \"F0$!+E<'>-\"F]o7$$\"+S[*='>Fjo$!+7RzK5F]o7$$!+9)fG4\"F0$!+^q#o-\"F]o 7$$!+kIgjBF0$!+!fFM+\"F]o7$$!+%yQSf$F0$!+d`AB'*F07$$!+DV2iZF0$!+vlXO!* F07$$!+pi0YeF0$!+>.qz#)F07$$!+`7LDoF0$!+^rBjtF07$$!+IX\"3o(F0$!+^8'=I' F07$$!+C7a&R)F0$!+)*)QY6&F07$$!+xV$F07$$!+r_4u')F0$\"+Wx/1XF07$$! +ELvL!)F0$\"+Jcc@dF07$$!+3zi[sF0$\"+$RV\">oF07$$!+]%F0$\"+`NPQ#*F07$$!+o')H2IF0$\"+%G B(>(*F07$$!+[00r;5F]o7$$\"+%*p(y-#F0$\"+u5\\#***F07$$\"+uB\")eKF0$\"+.Z^z'*F07 $$\"+;KDUWF0$\"+uIfM#*F07$$\"+t%zCc&F0$\"+8b?q')F07$$\"+g>O0mF0$\"+\\% \\#**zF07$$\"+dvQevF0$\"+sIiMsF07$$\"+$QQ1T)F0$\"+Nz!*)Q'F07$$\"+Azt_ \"*F0$\"+d#eTZ&F07$$\"+:vxw(*F0$\"+Fnz,XF07$$\"+pW#Fjo7$$\"+V%pU4\"F]o$!+Ot5B')Fjo7$$\"+*3!ew5F]o$!+ZUom>F07$$\"+ 5r:X5F]o$!+mm(y0$F07$$\"+p\\B+5F]o$!+L1gCTF07$$\"+kd%>U*F0$!+%=%pa^F07 $$\"+yqu:()F0$!+e!e]8'F07$$\"+)RO3*yF0$!+\"R%o^qF07$$\"+4!)4cpF0$!+gty *)yF07$$\"+97IAfF0$!+#>TSj)F07$$\"+ct9-[F0$!+*)\\#*o#*F07$$\"++uE5OF0$ !+1t;z(*F07$$\"+)ReJO#F0$!+_w-:5F]o7$$\"+[$\\!z5F0$!+=O\"p.\"F]o7$$!++ /5BAFjo$!+\"zjC/\"F]o7$$!+N.%*>:F0$!+**=$3.\"F]o7$$!+]9+#z#F0$!+Jn\\,5 F]o7$$!+JKB;SF0$!+'GaJa*F07$$!+3hXq^F0$!+Ull&*))F07$$!+!f:JB'F0$!+1-tz !)F07$$!+H-&Q=(F0$!+%y2s5(F07$$!+c%fS+)F0$!+%o'R%*fF07$$!+%yXun)F0$!+1 +xhZF07$$!+2b]!>*F0$!+GOXLMF07$$!+AM%H`*F0$!+#pFl.#F07$$!+M-*zp*F0$!+O Cu,gFjo7$$!+0gg#o*F0$\"+6_&GX)Fjo7$$!+b!fv[*F0$\"+q@TpAF07$$!+klP<\"*F 0$\"+7-nUOF07$$!+@.(F07$$!+@kc%4'F0$\"+R+o=\")F07$$!+S+1I]F0$\"+2)Gm)))F07$ $!+rTyzQF0$\"+-C()*[*F07$$!+W&eYm#F0$\"+v>!Q#**F07$$!+aOF0$\"+\\%[)['*F07$$\"+5YDi\"*F07$ $\"+e$)))RfF0$\"+e#*ye&)F07$$\"+m9ampF0$\"+NYW^yF07$$\"+ys&*)*yF0$\"+Q Y6`qF07$$\"+\"R]ls)F0$\"+&HCj<'F07$$\"+I!o-W*F0$\"+n*\\IB&F07$$\"+(e^K +\"F]o$\"+pmkMUF07$$\"+!43(\\5F]o$\"+x:(=>$F07$$\"+`i!H3\"F]o$\"+o/*\\ 6#F07$$\"+X@[-6F]o$\"+E*\\R,\"F07$$\"+'G&>36F]o$!+\\y/95Fjo7$$\"+&))G* *4\"F]o$!+P\")3@7F07$$\"+:Jpx5F]o$!+c>tMBF07$$\"+88jT5F]o$!+x]OJMF07$$ \"+[nG?**F0$!+MpB*\\%F07$$\"+?xA$H*F0$!+t]qDbF07$$\"+Q*\\6a)F0$!+!z.s \\'F07$$\"+Uz\"=n(F0$!+0uI*R(F07$$\"+*4X[p'F0$!+!4(*o@)F07$$\"+OUw@cF0 $!+%yMW$*)F07$$\"+Tu0mWF0$!+Y;MO&*F07$$\"+oC8VKF0$!+(=Z2+\"F]o7$$\"+]Z Bq>F0$!+'emL.\"F]o7$$\"+aY'Gm'Fjo$!+')fB]5F]o7$$!+ok_$['Fjo$!+.BK]5F]o 7$$!+]S?_>F0$!+i(yG.\"F]o7$$!+Yb1BKF0$!+:T.v**F07$$!+\"ou%QWF0$!+->*=W *F07$$!+CuAwbF0$!+vohL()F07$$!+JX$\\h'F0$!+(R6!fyF07$$!+gSfMvF0$!+[\"f 9$oF07$$!+0d:<$)F0$!+*>d(ocF07$$!+.60Z*)F0$!+S*RFR%F07$$!+(\\k;T*F0$!+ QKqGIF07$$!+B+s,(*F0$!+18l/;F07$$!+\"el:\")*F0$!+w*>S]\"Fjo7$$!+(RQ$R( *F0$\"+*y-MI\"F07$$!+qP+([*F0$\"+\\tKEFF07$$!+*[l-1*F0$\"+Na:*3%F07$$! +7ONo%)F0$\"+i-$[O&F07$$!+/?qBxF0$\"+82FHlF07$$!+rP`ToF0$\"+BI-ivF07$$ !+^qPReF0$\"+k(>nW)F07$$!+zi`OZF0$\"+iALr\"*F07$$!+b[a`NF0$\"+40+\"F]o7$$\" +#)e/^SF0$\"+PJL/'*F07$$\"+fM&)>_F0$\"+6$*[w!*F07$$\"+edS:jF0$\"+T[TM% )F07$$\"+K#RUK(F0$\"+?Q:\"p(F07$$\"+:P^M#)F0$\"+SeefoF07$$\"+?^(f.*F0$ \"+`d<_fF07$$\"+&\\$*)>(*F0$\"+C&H3)\\F07$$\"+]*)*y-\"F]o$\"+t<&o&RF07 $$\"+Shtq5F]o$\"+R]*4*GF07$$\"+IB/+6F]o$\"+_he$z\"F07$$\"+*H'[:6F]o$\" +\"3;ru'Fjo7$$\"+`D'o6\"F]o$!+;yebXFjo7$$\"+=E4/6F]o$!+Y@$pe\"F07$$\"+ -$Hs2\"F]o$!+[&f'3FF07$$\"+3PYO5F]o$!+U@L4QF07$$\"+!3X8#)*F0$!+nwsw[F0 7$$\"+yrQZ\"*F0$!+\"HEx*eF07$$\"+D+V\\$)F0$!+PznA*F07$$\"+.$yc6%F0 $!+zRE$z*F07$$\"+'4qJ'GF0$!+:**GA5F]o7$$\"+y_Bm:F0$!+7P>]5F]o7$$\"+aHm WCFjo$!+?\\%=1\"F]o7$$!+P-?\"3\"F0$!+\"H'Hc5F]o7$$!+B'H))Q#F0$!+c!3H. \"F]o7$$!+8$4fl$F0$!+i//9**F07$$!+JO$)f[F0$!+v7=>$*F07$$!+?&Q%yfF0$!+D >F]&)F07$$!+&Qn0*pF0$!+WWn')F0$!+ R'[aK&F07$$!+\"flN?*F0$!+jx@3SF07$$!+/B&zh*F0$!+\"*\\,6EF07$$!+nL=a)*F 0$!+A$zE;\"F07$$!+uOv2**F0$\"+Z=OkIFjo7$$!+GW*zx*F0$\"+q_ZlzF07$$!+/yUpbF0$\"+,#yN w)F07$$!+(4S(HWF0$\"+<4[V%*F07$$!+%zoc@$F0$\"+de+`**F07$$!+**=p[>F0$\" +hG**G5F]o7$$!+,pA.lFjo$\"+xQeX5F]o7$$\"+%G#Q$e'Fjo$\"+FicX5F]o7$$\"+& p&)p&>F0$\"+$H5(H5F]o7$$\"+L+UEKF0$\"+NT/!***F07$$\"+l=y[WF0$\"+9&\\fa *F07$$\"+!y8xg&F0$\"+(G(Hx*)F07$$\"+F\\X)o'F0$\"+5p2(H)F07$$\"+Tx(yn(F 0$\"+,'p$=vF07$$\"+g#yWc)F0$\"+/p-amF07$$\"+sFLQ$*F0$\"+HSX;dF07$$\"+d R.\"***F0$\"+'z(\\c^5F]o$\"+dGVoOF07$$\"+5.l!4\"F]o$\"+OY. !e#F07$$\"+!GUf6\"F]o$\"+)=BFY\"F07$$\"+,19F6F]o$\"+F-fnKFjo7$$\"+qk2C 6F]o$!+NFIv\")Fjo7$$\"+C=r16F]o$!+I\\^f>F07$$\"+GX9v5F]o$!+%)>/)3$F07$ $\"+@hhH5F]o$!+\"G]7>%F07$$\"+(R:_q*F0$!+i=Wc_F07$$\"+%***>%)*)F0$!+3w -qiF07$$\"+<-YS\")F0$!+#yhv@(F07$$\"+1T>$=(F0$!+ie(Q3)F07$$\"+l!HN7'F0 $!+ArJ`))F07$$\"+-?cu\\F0$!+W;45&*F07$$\"+&R]8v$F0$!+=0(Q+\"F]o7$$\"+u F%3Z#F0$!+d)[C/\"F]o7$$\"+f#R<:\"F0$!+m(=a1\"F]o7$$!+;KCd=Fjo$!+6\"f;2 \"F]o7$$!+4:2?:F0$!+2kJg5F]o7$$!+wz&*GGF0$!+.^'3.\"F]o7$$!+'p:'*3%F0$! +K)3;$)*F07$$!+?tNz_F0$!+\\3$[<*F07$$!+g[7wjF0$!+')eiX$)F07$$!+FD1ftF0 $!+f8#fN(F07$$!+&G!44#)F0$!+y*o@A'F07$$!+xEX4*)F0$!+PE/l\\F07$$!+!)p@Y %*F0$!+A:$*3OF07$$!+?gp3)*F0$!+BcC\"=#F07$$!+**Rx*)**F0$!+0ik:rFjo7$$! +O$=h)**F0$\"+I$oKp(Fjo7$$!+([m#)z*F0$\"+>aYIAF07$$!+,OeI%*F0$\"+Q*R\">)F0$\"+$fsU?'F07$$!+x9GXtF0$ \"+7 1VWF07$$\"+v:=u5F]o$\"+VIUpLF07$$\"+.BR46F]o$\"+0L1fAF07$$\"+W!\\08\"F ]o$\"+f!HD7\"F07$$\"+2+RP6F]o$!*xC6(HFjo7$$\"+_\\yH6F]o$!+0./(=\"F07$$ \"+v%Qx5\"F]o$!+9UYQBF07$$\"+ZgRr5F]o$!+1gSsMF07$$\"+xB0@5F]o$!+3F0$!+^wJi5F]o7$$!+ fQprKF0$!+=1qE5F]o7$$!+m(QK_%F0$!+mTUF(*F07$$!+LB2'p&F0$!+0xr3!*F07$$! +%35$onF0$!+J]v>\")F07$$!+xbY>xF0$!+Yn-uqF07$$!+6.-J&)F0$!+1_[*)eF07$$ !+\\0'p=*F0$!+?c<)e%F07$$!+$HbUn*F0$!+whm&>$F07$$!+Y:D$)**F0$!+.))HS**F0$ \"+unE5_F07$$\"+j\"[00\"F]o$\"+)GQv:%F07$$\"+1!)p&4\"F]o$\"+?7()fIF07$ $\"+@J!p7\"F]o$\"+CnF07$$\"+*=0Q9\"F]o$\"+\\/hJxFjo7$$\"+4&zh9\"F]o $!+L7mWRFjo7$$\"+Vk$R8\"F]o$!+Jvwj:F07$$\"+Pc726F]o$!+s1OBFF07$$\"+3G% f1\"F]o$!+d#G7'QF07$$\"+D'Q2,\"F]o$!+xtdk\\F07$$\"+\"R*G?%*F0$!+ndw>gF 07$$\"+%F07$$!+Je&p))*F0$!+g6EpFF07$$!+@1595F]o$!+O>7*G\"F07$$!+Pr#3- \"F]o$\"+S*y59#Fjo7$$!+cAy35F]o$\"+&z*44[1g5F ]o7$$\"+#fs?=$F0$\"+'e$4I5F]o7$$\"+?r[VWF0$\"+!)p.f)*F07$$\"+$G@9k&F0$ \"+Y@Q(G*F07$$\"+ImYgnF0$\"+QD,*f)F07$$\"+t1'oy(F0$\"+,-;2yF07$$\"+`%* [3()F0$\"+,S#\\#pF07$$\"+af&[^*F0$\"+5F]o$\"+k9!)R\\F 07$$\"+qsvu5F]o$\"+Ag&4'QF07$$\"+#[]g6\"F]o$\"+pc%)RFF07$$\"+*>BJ9\"F] o$\"+#3(\\(e\"F07$$\"+*3`c:\"F]o$\"+H(*4[TFjo7$$\"+mVX`6F]o$!+^^KswFjo 7$$\"+&>![O6F]o$!+S^MZ>F07$$\"+xx#[5\"F]o$!+![NP6$F07$$\"+/eue5F]o$!+= O$RD%F07$$\"+KrV')**F0$!+lina`F07$$\"+V'>5D*F0$!+:E'=S'F07$$\"+KM#))Q) F0$!+\"3'f!Q(F07$$\"+8:P4uF0$!+l?Kv#)F07$$\"+C/;CjF0$!+yr1q!*F07$$\"+= BpY^F0$!+m)z([(*F07$$\"+G%eC*QF0$!+KmdH5F]o7$$\"+)pi)yDF0$!+84ip5F]o7$ $\"+!Rw]A\"F0$!+^\\n$4\"F]o7$$!+\\x#=[\"Fjo$!+]2h+6F]o7$$!+k(\\*=:F0$! ++4d*3\"F]o7$$!+Y$)QkGF0$!+%QG+1\"F]o7$$!+e\"Q7;%F0$!+b'R=,\"F]o7$$!+# )=K'Q&F0$!+=4(GX*F07$$!+Qp4p(oS)F07$$!+$Ho\"[bF0$\"+[?KU#*F07$$!+TW[\\VF0$\"+`1s2**F07$$! +U[dyIF0$\"+zItR5F]o7$$!+!oavv\"F0$\"+,Y&42\"F]o7$$!+;$4]3%Fjo$\"+v4l% 3\"F]o7$$\"+cN')p%*Fjo$\"+J?O\"3\"F]o7$$\"+lh:)G#F0$\"+fm*=1\"F]o7$$\" +zeS&f$F0$\"+:NFF5F]o7$$\"+,n]][F0$\"+\\gi'y*F07$$\"+T$en.'F0$\"+#45L< *F07$$\"+Y)z!RrF0$\"+&\\`fW)F07$$\"+Ui/W\")F0$\"+Y*Gyh(F07$$\"+/E))R!* F0$\"+aW--nF07$$\"+#3Gk\")*F0$\"+iUD6dF07$$\"+f#3l/\"F]o$\"+\"[pxl%F07 $$\"+?[(y4\"F]o$\"+H/O`NF07$$\"+#ex^8\"F]o$\"+0zV4CF07$$\"+CE*z:\"F]o$ \"+PpNg;\"F]o$\"*)fQqZFjo7$$\"+A/;f6F]o$!+%3%pZ6F07$$\"+4 mOP6F]o$!+C#etL#F07$$\"+Q6!35\"F]o$!+c%o!4NF07$$\"+`%o(\\5F]o$!+eU*)\\ YF07$$\"+(p&RZ)*F0$!+N]$F0$!+*G$G`5F]o7$$\"+,')>j@F0$!+#*3e)3\"F]o7$ $\"+Jre*)yFjo$!+$))et5\"F]o7$$!+\\zpyfFjo$!+[9d36F]o7$$!+ca#[(>F0$!+kY Y\"4\"F]o7$$!+)H<(=LF0$!+2Vjb5F]o7$$!+iT41YF0$!+2d2,5F]o7$$!+m$pP\"eF0 $!+e%=AG*F07$$!+#z$Q>pF0$!+M>mz$)F07$$!+_k)>!zF0$!+.Vn;tF07$$!+q&3Eu)F 0$!+P8M6hF07$$!+Zb![U*F0$!+6p)ey%F07$$!+)4T^$**F0$!+:26mLF07$$!+]*ej- \"F]o$!+u]k!)=F07$$!+ONQS5F]o$!+Q,l+OFjo7$$!+EbMN5F]o$\"+BG5k6F07$$!+1 sR65F]o$\"+N&=/m#F07$$!+V$z2p*F0$\"+7ob)4%F07$$!+`6%H4*F0$\"+prE]aF0" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 49 "listplot([seq([W[2,j],W[ 4,j]],j=1..time_steps)]);" }}{PARA 13 "" 1 "" {GLPLOT2D 412 412 412 {PLOTDATA 2 "6#-%'CURVESG6#7`jl7$$\"\"!F)$!\"\"F+7$$!+#zWnC\"!#6$!+cn( >#**F/7$$!+/Y.uCF/$!+Tj7*o*F/7$$!+F(=Fm$F/$!+mK40$*F/7$$!+_=D%z%F/$!+$ *4\"fx)F/7$$!+<*))4&eF/$!+lj$*4\")F/7$$!+\"opk\"oF/$!+S)\\xJ(F/7$$!+\" Q)ovwF/$!+Xc,7kF/7$$!+JJM:%)F/$!+_oH2aF/7$$!+J#fS-*F/$!+CD#)>VF/7$$!+m .e#\\*F/$!+cs?nJF/7$$!+m>#R\")*F/$!+'GF\"o>F/7$$!+v<[$)**F/$!+^Lh>u!#7 7$$!+?R5****F/$\"+G+#f\"\\Fco7$$!+XW4h)*F/$\"+7d!Hr\"F/7$$!+y\")=s&*F/ $\"+![3G!HF/7$$!+B*ou8*F/$\"+;_%H/%F/7$$!+EoCk&)F/$\"+\">*4;^F/7$$!+>& )*='yF/$\"+5RY1hF/7$$!+^onTqF/$\"+-p&)**pF/7$$!+5x\\;hF/$\"+*RsQy(F/7$ $!+(\\625&F/$\"+C\\(zW)F/7$$!+wi')4SF/$\"+_/a$)*)F/7$$!+:&o/'GF/$\"+kc &QQ*F/7$$!+ueup;F/$\"+Y$)3W'*F/7$$!+uv9aXFco$\"+mHCh(*F/7$$\"+0NYXwFco $\"+NY6M(*F/7$$\"+r#=@(>F/$\"+;BDj&*F/7$$\"+'*)e%\\JF/$\"+X#Q4D*F/7$$ \"+D&>\"zUF/$\"+9e=,))F/7$$\"+s>EW`F/$\"+#)Hv>#)F/7$$\"+Lz()GjF/$\"+gL ;9vF/7$$\"+m3,=sF/$\"+rJs$p'F/7$$\"+%**yz*zF/$\"+R(>&pdF/7$$\"+!='fc') F/$\"+KlQaZF/7$$\"+@cQ$=*F/$\"++7#Gm$F/7$$\"+/)z(p&*F/$\"+aj%3^#F/7$$ \"+q\"*H4)*F/$\"+sx!eJ\"F/7$$\"+O;q(*)*F/$\"*f]5h*Fco7$$\"+jb4L)*F/$!+ F05H6F/7$$\"+J*4gh*F/$!+-NISBF/7$$\"+WsT\\#*F/$!+'3!*z^$F/7$$\"+poqQ() F/$!+()[1VYF/7$$\"+l)3;4)F/$!+v`B(p&F/7$$\"+Y02=tF/$!+%\\vLm'F/7$$\"+b **3IkF/$!+g'\\e_(F/7$$\"+0=^TaF/$!+N$)yq#)F/7$$\"+@AznVF/$!+P7J')))F/7 $$\"+\\)QdA$F/$!+)o)pi$*F/7$$\"+)fKK.#F/$!+N^^#p*F/7$$\"+,hO*3)Fco$!+W 4pq)*F/7$$!+>t-!G%Fco$!+V\"pX*)*F/7$$!+l(e#e;F/$!+RH#Rw*F/7$$!+y!GE'GF /$!+?y%4[*F/7$$!+Z:LASF/$!+0&H-0*F/7$$!+(z4$>^F/$!+*G'oy%)F/7$$!+q'4l8 'F/$!+q@[vxF/7$$!+dx:eqF/$!+1e!>&pF/7$$!+'R;+(yF/$!+b-@@gF/7$$!+qphf&) F/$!+/'4%)*\\F/7$$!+'*\\Y;\"*F/$!+&*3.+RF/7$$!+v9@K&*F/$!+AI#Qu#F/7$$! +Bay+)*F/$!+IzU[:F/7$$!+(R$[=**F/$!+h6F/$\"+-/B&f*F/7$$\"+i`J2BF/ $\"+%[RNQ*F/7$$\"+;AwfMF/$\"+xSxK!*F/7$$\"+!R)))fXF/$\"+&[xsa)F/7$$\"+ a^@\"f&F/$\"+=r9LzF/7$$\"+Qs8QlF/$\"+%pl#)>(F/7$$\"+)\\ZhQ(F/$\"+e@K_j F/7$$\"+[F1A\")F/$\"+'>2oS&F/7$$\"+umCM()F/$\"+I$o\\P%F/7$$\"+/R#G@*F/ $\"+&y6RkHFco7$$\"+m3al'*F/$!+9K35:F/7$$\"+0\"y=S*F/$!+8y_. FF/7$$\"+D8J\"**)F/$!+r'\\t&QF/7$$\"+\\2)*R%)F/$!+Ebn_\\F/7$$\"+f3LcxF /$!+QKdrfF/7$$\"+I*p4&pF/$!+'\\5u*oF/7$$\"+;u[OgF/$!+O(o^r(F/7$$\"+J`B F]F/$!+xXq6%)F/7$$\"+z.3RRF/$!+mg&f(*)F/7$$\"+1P8*y#F/$!+\\`4*R*F/7$$ \"+iYY&f\"F/$!+gEju'*F/7$$\"+lE/oPFco$!+$Gy%)z*F/7$$!+z!ovZ)Fco$!+,%p* o(*F/7$$!+E<2f?F/$!+>w'oe*F/7$$!+V!R#QKF/$!+n3Lb#*F/7$$!+<#**oO%F/$!+! yg)z()F/7$$!+YH_FaF/$!+YTAo\")F/7$$!+-zo.kF/$!+t]MIuF/7$$!+E*R.G(F/$!+ 3N;ylF/7$$!+3U.W!)F/$!+\\fXDcF/7$$!+`::$o)F/$!+tbh(e%F/7$$!+qX3)=*F/$! +Z9R\"[$F/7$$!+g))Q^&*F/$!+8(*eCBF/7$$!+uZ*yw*F/$!+#4Vd8\"F/7$$!+tjxM) *F/$\"*kaTi'Fco7$$!+0cd^(*F/$\"+'4XCE\"F/7$$!+!Q\"=?&*F/$\"+kMHMCF/7$$ !+Z]wW\"*F/$\"+\"f&*Qc$F/7$$!+KbnJ')F/$\"+W'[Vj%F/7$$!+&)*)H*)zF/$\"+' >***HcF/7$$!+Z*))yA(F/$\"+]ElOlF/7$$!+)yt$fjF/$\"+![FJU%*F/7$$\"+d3dIEF/$\"+%\\H5>*F/7$$\"+B\\gcPF/$\" +@I6.))F/7$$\"+*)R%e#[F/$\"+&4MKG)F/7$$\"+MnHoFco7$$\"+xW0 \"[*F/$!+%e6G)=F/7$$\"+GB)><*F/$!+2\"Hj0$F/7$$\"+Ho()=()F/$!+E6=%=%F/7 $$\"+DzhG\")F/$!+AywZ_F/7$$\"+voM5uF/$!+c+dHiF/7$$\"+F(3`d'F/$!+F4]8rF /7$$\"+pQlOcF/$!+Qv?&)yF/7$$\"+M`?4YF/$!+*\\;B`)F/7$$\"+Q!*>4NF/$!+5'F/7$$!+Qya(>)F/$!+g>/E_F/7$$!+,_ \"fy)F/$!+Un@wTF/7$$!+W![!R#*F/$!+m[=lIF/7$$!+C'*R]&*F/$!+qLt5>F/7$$!+ D`o:(*F/$!+A*H@J(Fco7$$!+8<$Ht*F/$\"+-.1[XFco7$$!+LA[-'*F/$\"+<5))G;F/ 7$$!+o+'pK*F/$\"+#=LIx#F/7$$!+=.>6*)F/$\"+)zf+(QF/7$$!+>`3i$)F/$\"++- \"Q!\\F/7$$!+5#)\\)o(F/$\"+fjTfeF/7$$!+Z30,pF/$\"+$RsMs'F/7$$!+XD%>,'F /$\"+!phT[(F/7$$!+#3YZ.&F/$\"+&oM88)F/7$$!+3n>%)RF/$\"+#RWll)F/7$$!+B) yf(GF/$\"+\"**\\I0*F/7$$!+$e8ls\"F/$\"+X2!eJ*F/7$$!+'e!\\FbFco$\"+KITT %*F/7$$\"+3\"p/G'Fco$\"+B@:G%*F/7$$\"+tB\\)z\"F/$\"+Zx#fF*F/7$$\"+?vHT HF/$\"+8&3j)*)F/7$$\"+lRZRSF/$\"+*\\bDc)F/7$$\"+*=\\l2&F/$\"+V-n4!)F/7 $$\"+@uyOgF/$\"+IwWMtF/7$$\"+dnT0pF/$\"+\"R?ba'F/7$$\"+/0')owF/$\"+s'z Ll&F/7$$\"+v(o\\J)F/$\"+'yb.n%F/7$$\"+GWCL))F/$\"+u\\a5OF/7$$\"+3f0:#* F/$\"+7'F/$!+`A36tF/7$$\"+m-hJ_F/$!+=(>b.)F/7$$\"+B-\\)=%F/ $!+'*RJK')F/7$$\"+IgCzIF/$!+N(\\@4*F/7$$\"+#Gd9#>F/$!+'Rp!3%*F/7$$\"+% QCUL(Fco$!+p_`v&*F/7$$!+HHXhYFco$!+/%\\Cf*F/7$$!+HBUe;F/$!+4(Q\"f%*F/7 $$!+^`xCGF/$!+/5Jy\"*F/7$$!+I[0ZRF/$!+5b)\\v)F/7$$!+R$yy+&F/$!+Y))R'>) F/7$$!+F0!4*fF/$!+Na)=^(F/7$$!+@k1\")oF/$!+l(HFr'F/7$$!+[V%[m(F/$!+'e( )>\"eF/7$$!+KWVI$)F/$!+WPFC[F/7$$!+[%[z'))F/$!+?h^lPF/7$$!+&*obp#*F/$! +Mwn_EF/7$$!+[&*fH&*F/$!+H7X.:F/7$$!+0mlW'*F/$!+QrNfLFco7$$!+S'yNh*F/$ \"+'4rpJ)Fco7$$!+N]ZP%*F/$\"+2>`\")>F/7$$!+7@m>\"*F/$\"+%3Bi4$F/7$$!+[ Pdl')F/$\"+8(z#fTF/7$$!+4(QE3)F/$\"+c=Jb^F/7$$!+$**H,Q(F/$\"+\"*4BqgF/ 7$$!++A**olF/$\"+(*4S\"*oF/7$$!+2JlhcF/$\"+c.u2wF/7$$!+%GD=n%F/$\"+j.y 4#)F/7$$!+qFI9OF/$\"+vwo*o)F/7$$!+%ecZ]#F/$\"+6AET!*F/7$$!+<9`f8F/$\"+ /F#*f#*F/7$$!+-CWa>Fco$\"+Q?pU$*F/7$$\"+Kx:/(*Fco$\"+=F>)G*F/7$$\"+.y) 37#F/$\"+.(fm4*F/7$$\"+'zU*QKF/$\"+nM(*p()F/7$$\"+/A*yI%F/$\"+\"H6,g#F/7$$\"+VkKn')F/$!+#y[ts$F/7$$\"+L`&Q8)F/$!+Wb4(z%F/7$$\"+ Rs>ruF/$!+BhY\"z&F/7$$\"+fM#)*o'F/$!+!\\FRp'F/7$$\"+&Rp@!eF/$!+asj*[(F /7$$\"+AcSA[F/$!+^]rl\")F/7$$\"+T*yhw$F/$!+T5X6()F/7$$\"+%GJ.l#F/$!+OD X=\"*F/7$$\"+4Rg#\\\"F/$!+#eL2Q*F/7$$\"+^fL8JFco$!+#paZ\\*F/7$$!+CU`[( )Fco$!+I2Uf%*F/7$$!+W]MZ?F/$!+wV/w#*F/7$$!+z/%y=$F/$!+74G[*)F/7$$!+ywj yUF/$!+Ty.#[)F/7$$!+iz!HI&F/$!+S/O&)yF/7$$!++[&\\C'F/$!+pCHorF/7$$!+IN X!4(F/$!+3+rUjF/7$$!+8&om#yF/$!+pi7AaF/7$$!+*)RkU%)F/$!+#3m9U%F/7$$!+y [OH*)F/$!+`0\"oN$F/7$$!+@R))z#*F/$!+`[6XAF/7$$!+n@T*[*F/$!+][!R5\"F/7$ $!+@1Pb&*F/$\"*=4R!\\Fco7$$!+5@Sx%*F/$\"+G2+'>\"F/7$$!+yPMd#*F/$\"+0tj >BF/7$$!+&4i\"**))F/$\"+WzE.MF/7$$!++P&)3%)F/$\"+O.8JWF/7$$!+,mJ%z(F/$ \"+*H(f)Q&F/7$$!+!4(>lqF/$\"+/zMiiF/7$$!+L#=FB'F/$\"+%o\"\\SqF/7$$!+Hc \\4`F/$\"+D%[Er(F/7$$!+wcM4VF/$\"+a)*)*p#)F/7$$!+E04ZKF/$\"+)f__q)F/7$ $!+JEOQ@F/$\"+FQt7!*F/7$$!+wF5%***Fco$\"+Z;G)=*F/7$$\"+a$f4`\"Fco$\"+Q 9HH#*F/7$$\"+>qD-8F/$\"+AqrM\"*F/7$$\"+H@9JCF/$\"+j=50*)F/7$$\"+6.*H_$ F/$\"+N4jU&)F/7$$\"+I)>9c%F/$\"+%*))>^!)F/7$$\"+glkIbF/$\"+M`[OuF/7$$ \"+!e6dT'F/$\"+=R-1nF/7$$\"+&=;F?(F/$\"+n%\\#peF/7$$\"+U01zyF/$\"+Nj]P \\F/7$$\"+c,oL%)F/$\"+*e-S#RF/7$$\"+`DFd))F/$\"+SypVGF/7$$\"+0a]U\"*F/ $\"+/w68%G*F/$\"+#4L4]&Fco7$$\"+`%e%z#*F/$!+w@mliFco7$$\"+ SYzF\"*F/$!+A'fuz\"F/7$$\"+i(\\6$))F/$!+6p,VHF/7$$\"+;?!RR)F/$!+e;%R/% F/7$$\"+2;!G#yF/$!+#f\\;3&F/7$$\"+&\\bo7(F/$!+dFoQgF/7$$\"+SG;0CCF/$!+#4a]2*F/7$$! +NOcONF/$!+B!*=-()F/7$$!+!p.Sf%F/$!+h!3_>)F/7$$!+'fP,e&F/$!+S\">Hc(F/7 $$!+#p^*zkF/$!+N&>g\"oF/7$$!+`\"y)zsF/$!+@E\"p'fF/7$$!+Ca*z'zF/$!+v\") \\H]F/7$$!+j2?M&)F/$!+be$*=SF/7$$!+3;Nq*)F/$!+\\LQ^HF/7$$!+9GPq#*F/$!+ >IrV=F/7$$!+XuKI%*F/$!+DM8KrFco7$$!+G(\\%[%*F/$\"+rE;FUFco7$$!+&)*R^K* F/$\"+hq'oa\"F/7$$!+QE#H1*F/$\"+c!3Dk#F/7$$!+0)pjm)F/$\"+b![Op$F/7$$!+ $>%*>9)F/$\"+/NE&o%F/7$$!+-g6)\\(F/$\"+/c[.cF/7$$!+r\"4Zu'F/$\"+#RVdV' F/7$$!++DB$*eF/$\"+LK'3<(F/7$$!+Y3Xc\\F/$\"+p*G\"*z(F/7$$!+&)3D[RF/$\" +5.J7$)F/7$$!+!zaM)GF/$\"+Q'pOq)F/7$$!+/Qjxy,\"*F/7$$\"+'zSHi\"F/$\"+.gJo*)F /7$$\"+m-qGFF/$\"+.(e=q)F/7$$\"+C7'Hz$F/$\"+Ch*[I)F/7$$\"+(eb'*z%F/$\" +g\\k\"y(F/7$$\"+Z]NLdF/$\"+h&Q\"QrF/7$$\"+cH]zlF/$\"+Q.I#Q'F/7$$\"+HP lCtF/$\"+Ex)R_&F/7$$\"+<]rczF/$\"+h)*)\\d%F/7$$\"++f=l%)F/$\"+vT'*[NF/ 7$$\"+kFQT))F/$\"+s6IhCF/7$$\"+tMky!*F/$\"+rA\"*G8F/7$$\"+g-]s\"*F/$\" +7AU*p\"Fco7$$\"+gB\"37*F/$!+Sf&e'**Fco7$$\"+I3&Q#*)F/$!+3l<^@F/7$$\"+ Y,L%e)F/$!+u`IuKF/7$$\"+YPQ2\")F/$!+e)ooM%F/7$$\"+&\\$[+vF/$!+)yE1N&F/ 7$$\"+ddItnF/$!+q=hoiF/7$$\"+O\"\\v$fF/$!+u2\\&3(F/7$$\"+!z5n+&F/$!+cX 'yy(F/7$$\"+M$He*RF/$!+b>]k$)F/7$$\"+jG?@HF/$!+&\\/l!))F/7$$\"+Q/4+=F/ $!+'*oS2\"*F/7$$\"+Vs//lFco$!+K&>KE*F/7$$!+()\\(f4&Fco$!+[9Us#*F/7$$!+ @8ih;F/$!+LE\"f8*F/7$$!+!eJwy#F/$!+OK$p&))F/7$$!+'*)Q,(QF/$!+\"eb4W)F/ 7$$!+)pqC*[F/$!+PDb&*yF/7$$!+?W-ReF/$!+4QCIsF/7$$!+(3+bp'F/$!+#4?jX'F/ 7$$!+F&4\"\\uF/$!+fVk'e&F/7$$!+_#f()3)F/$!+M(Haj%F/7$$!+_T?0')F/$!+CX* zh$F/7$$!+X#p6**)F/$!+kn\\]DF/7$$!+$=P9C*F/$!+6Gl\\9F/7$$!+R***GN*F/$! +)HnWK$Fco7$$!+@SdC$*F/$\"+n$4;%yFco7$$!+`(zv:*F/$\"+i_^$)=F/7$$!+\"R' 3b))F/$\"+y)H&\\HF/7$$!+agAA%)F/$\"+T:#p'RF/7$$!+10)f'yF/$\"+^*39#\\F/ 7$$!+'eX]>(F/$\"+O6()*z&F/7$$!+T%y'>kF/$\"+(4k/f'F/7$$!+.F`^bF/$\"+!)z p#G(F/7$$!+!>'[.YF/$\"+\\0[nyF/7$$!+Z[Y*e$F/$\"+Oc8P$)F/7$$!+)QlU_#F/$ \"+FsS&o)F/7$$!+SxPB9F/$\"+31Y2*)F/7$$!+H%p!GIFco$\"+C8*)***)F/7$$\"+- ,26#)Fco$\"++1vg*)F/7$$\"+ZQ(=$>F/$\"+2Df*y)F/7$$\"+4]/8IF/$\"+MPa([)F /7$$\"+)f:%[SF/$\"+]>Rd!)F/7$$\"+)3QA-&F/$\"+@Qo.vF/7$$\"+D#[%>fF/$\"+ B&>G$oF/7$$\"+)o,fs'F/$\"+$eFJ0'F/7$$\"+kzhGuF/$\"+.E!\\<&F/7$$\"+Wd-; !)F/$\"+$=*Q5UF/7$$\"++A?y%)F/$\"+A#)ptJF/7$$\"+sq42))F/$\"+;lk!3#F/7$ $\"+>KF/7$$!+c8:#**)F/$!+YWQb@F/7$$!+ ;\"fN>*F/$!+r>2k5F/7$$!+a!=zF/7$$!+f%))QB$F/$ \"+mJ!\\M)F/7$$!+UUOq@F/$\"+j$o4l)F/7$$!+m.Pw5F/$\"+^$*yJ))F/7$$\"*$[0 BKFco$\"+&R&G%)))F/7$$\"+L\"z#R6F/$\"+Z$)z1))F/7$$\"+95]GAF/$\"+z$f\"* f)F/7$$\"+Z$)p$G$F/$\"+#=yFE)F/7$$\"+&f`*)G%F/$\"+O#[2!yF/7$$\"+8p%)G_ F/$\"+'4dz@(F/7$$\"+yoo)3'F/$\"+-o=@lF/7$$\"+]AvaoF/$\"+Vr=>dF/7$$\"+q -a9vF/$\"+$)RqA[F/7$$\"+H[,d!)F/$\"+BkWWQF/7$$\"+>g%GZ)F/$\"+W-)*)z#F/ 7$$\"+l8ja()F/$\"+w/a-1(3\\F/7$$\"+EYgDoF/$!+wm7ReF/7$ $\"+c,XUgF/$!+w%oUn'F/7$$\"+1Ufh^F/$!+*=1-S(F/7$$\"+'RYu>%F/$!+P0<0!)F /7$$\"+pDulJF/$!+cktz%)F/7$$\"+&yVK3#F/$!+b\"Rp\"))F/7$$\"+Y-Du'*Fco$! +3SK7!*F/7$$!+,lQQ;Fco$!+s(QR1*F/7$$!+_=e#H\"F/$!+axFs*)F/7$$!+N\"\\5S #F/$!+fs=S()F/7$$!+`9)>Z$F/$!+!HSFP)F/7$$!+]`)))[%F/$!+gl3xyF/7$$!+)3# GOaF/$!+VdF/7$$!+ fcWExF/$!+%e3!=[F/7$$!+\\jro#)F/$!+jUG[QF/7$$!+0iK'o)F/$!+_50EGF/7$$!+ XMqt*)F/$!+5RCnb()F/7$$\"+%[#4Y9F/$\"+Dx`S')F/ 7$$\"+QmI7DF/$\"+Fxj(R)F/7$$\"+xEASNF/$\"+7)*=G!)F/7$$\"+ml@9XF/$\"+>5 gNvF/7$$\"+ZO?>aF/$\"+jL6DpF/7$$\"+WZ(3C'F/$\"+Ot!R?'F/7$$\"+>K%f'pF/$ \"+W/<\"Q&F/7$$\"+muR#e(F/$\"+`H6oWF/7$$\"+`7vz!)F/$\"+&R:zZ$F/7$$\"+H EG\\%)F/$\"++ofDCF/7$$\"+66D%o)F/$\"+K')zF8F/7$$\"+dE3!y)F/$\"+KT'[-#F co7$$\"+UE^M()F/$!+#G=UJ*Fco7$$\"+,'ywa)F/$!+)f%[a?F/7$$\"+5o:A#)F/$!+ jF?ZJF/7$$\"+s&RHw(F/$!+?%)\\!>%F/7$$\"+'4`t<(F/$!+TC=m^F/" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 69 "spacecurve([seq([W[1,j],W[2,j],W[3,j]],j=1..time_st eps)],axes=boxed);" }}{PARA 13 "" 1 "" {GLPLOT3D 412 412 412 {PLOTDATA 3 "6$-%'CURVESG6#7`jl7%$\"\"!F)F($\"\"\"!\"\"7%$\"+#[&yY7!#6 $!+#zWnC\"F0$\"+#\\sK#**F07%$\"+e#zYZ#F0$!+/Y.uCF0$\"+u'y$*p*F07%$\"+A *Qfm$F0$!+F(=Fm$F0$\"+\"yE!R$*F07%$\"+*pVU![F0$!+_=D%z%F0$\"+%yeT&))F0 7%$\"+sP\"[(eF0$!+<*))4&eF0$\"+2BSd#)F07%$\"+LaYkoF0$!+\"opk\"oF0$\"+M dfhvF07%$\"+)[7;w(F0$!+\"Q)ovwF0$\"+#p0%znF07%$\"+miAc&)F0$!+JJM:%)F0$ \"+h&[I#fF07%$\"+yvwR#*F0$!+J#fS-*F0$\"+h.7/]F07%$\"+.T50)*F0$!+m.e#\\ *F0$\"+&eKN.%F07%$\"+%fUY-\"!#5$!+m>#R\")*F0$\"+iba@IF07%$\"+zq\"f0\"F ap$!+v<[$)**F0$\"+3f)y(>F07%$\"+7o*R2\"Fap$!+?R5****F0$\"+6hI>\"*!#77% $\"+^4my5Fap$!+XW4h)*F0$!+Voiq;Fdq7%$\"+^\\!)p5Fap$!+y\")=s&*F0$!+s:q \\7F07%$\"+YQWZ5Fap$!+B*ou8*F0$!+)H/iK#F07%$\"+.'=<,\"Fap$!+EoCk&)F0$! +1!ohQ$F07%$\"+*4^!H'*F0$!+>&)*='yF0$!+l@Q=WF07%$\"+s5D9!*F0$!+^onTqF0 $!+%f22T&F07%$\"+N7ey#)F0$!+5x\\;hF0$!+G'Q+N'F07%$\"+eH`HuF0$!+(\\625& F0$!+A@OAsF07%$\"+azRwkF0$!+wi')4SF0$!+&HAH,)F07%$\"+9^MIaF0$!+:&o/'GF 0$!+'y%\\1()F07%$\"+jjX/VF0$!+ueup;F0$!+&3nxG*F07%$\"+&z3P6$F0$!+uv9aX Fdq$!+Lc\"=u*F07%$\"+c>*[(=F0$\"+0NYXwFdq$!+%Hma+\"Fap7%$\"+;n^kgFdq$ \"+r#=@(>F0$!+9\"*Q@5Fap7%$!+&4[ur'Fdq$\"+'*)e%\\JF0$!+=#G4-\"Fap7%$!+ qNsQ>F0$\"+D&>\"zUF0$!+k\\M.5Fap7%$!+M_zsJF0$\"+s>EW`F0$!+mPU#o*F07%$! +-V,_VF0$\"+Lz()GjF0$!+V(\\h:*F07%$!+PLpaaF0$\"+m3,=sF0$!+#)4')e%)F07% $!+yT&*fkF0$\"+%**yz*zF0$!+KL;&*F0$\"+jb4L)*F0$!*r\"3,bFdq7%$!+rzWM%*F0$\"+J*4 gh*F0$\"+YoFi8F07%$!+\"*o5x\"*F0$\"+WsT\\#*F0$\"+>t-!G%Fdq$ \"+!R5)35Fap7%$\"+'pm^j\"F0$!+l(e#e;F0$\"+@G$\\'**F07%$\"+\\TXlGF0$!+y !GE'GF0$\"+\">^jp*F07%$\"+_bl`SF0$!+Z:LASF0$\"+8t^$H*F07%$\"+xbu$=&F0$ !+(z4$>^F0$\"+pOmo()F07%$\"+jsETiF0$!+q'4l8'F0$\"+r+dM\")F07%$\"+l:P8s F0$!+dx:eqF0$\"++n6/uF07%$\"+Tp!))3)F0$!+'R;+(yF0$\"+JP$**e'F07%$\"+)o ry&))F0$!+qphf&)F0$\"+\\n:/dF07%$\"+mCM7&*F0$!+'*\\Y;\"*F0$\"+')**GeZF 07%$\"+E#RX+\"Fap$!+v9@K&*F0$\"+'*G**)F07%$\"+DH;kRF0$!+`.o!H\"F0$!+am%*Q&*F 07%$\"+5mZWFF0$!*Ex\"e&)Fdq$!+a]o_**F07%$\"+<`6#[\"F0$\"+\"yy'>6F0$!+E <'>-\"Fap7%$\"+S[*='>Fdq$\"+i`J2BF0$!+7RzK5Fap7%$!+9)fG4\"F0$\"+;AwfMF 0$!+^q#o-\"Fap7%$!+kIgjBF0$\"+!R)))fXF0$!+!fFM+\"Fap7%$!+%yQSf$F0$\"+a ^@\"f&F0$!+d`AB'*F07%$!+DV2iZF0$\"+Qs8QlF0$!+vlXO!*F07%$!+pi0YeF0$\"+) \\ZhQ(F0$!+>.qz#)F07%$!+`7LDoF0$\"+[F1A\")F0$!+^rBjtF07%$!+IX\"3o(F0$ \"+umCM()F0$!+^8'=I'F07%$!+C7a&R)F0$\"+/R#G@*F0$!+)*)QY6&F07%$!+xV$F07%$!+r_4u')F0$\"+\\2)*R%)F0$\"+Wx/1XF07%$!+ELvL!)F0$\"+f3Lc xF0$\"+Jcc@dF07%$!+3zi[sF0$\"+I*p4&pF0$\"+$RV\">oF07%$!+]%F0$\" +z.3RRF0$\"+`NPQ#*F07%$!+o')H2IF0$\"+1P8*y#F0$\"+%GB(>(*F07%$!+[00r;5Fap7%$\"+%*p(y-#F0$!+E<2f?F0$\"+u5\\#***F0 7%$\"+uB\")eKF0$!+V!R#QKF0$\"+.Z^z'*F07%$\"+;KDUWF0$!+<#**oO%F0$\"+uIf M#*F07%$\"+t%zCc&F0$!+YH_FaF0$\"+8b?q')F07%$\"+g>O0mF0$!+-zo.kF0$\"+\\ %\\#**zF07%$\"+dvQevF0$!+E*R.G(F0$\"+sIiMsF07%$\"+$QQ1T)F0$!+3U.W!)F0$ \"+Nz!*)Q'F07%$\"+Azt_\"*F0$!+`::$o)F0$\"+d#eTZ&F07%$\"+:vxw(*F0$!+qX3 )=*F0$\"+Fnz,XF07%$\"+pW#Fdq7%$\"+V%pU4\"Fap$!+!Q\"=?&*F0$!+Ot5B')Fd q7%$\"+*3!ew5Fap$!+Z]wW\"*F0$!+ZUom>F07%$\"+5r:X5Fap$!+KbnJ')F0$!+mm(y 0$F07%$\"+p\\B+5Fap$!+&)*)H*)zF0$!+L1gCTF07%$\"+kd%>U*F0$!+Z*))yA(F0$! +%=%pa^F07%$\"+yqu:()F0$!+)yt$fjF0$!+e!e]8'F07%$\"+)RO3*yF0$!+l#[rR&F0 $!+\"R%o^qF07%$\"+4!)4cpF0$!+mc&eN%F0$!+gty*)yF07%$\"+97IAfF0$!+Jg;^KF 0$!+#>TSj)F07%$\"+ct9-[F0$!+;Yb*4#F0$!+*)\\#*o#*F07%$\"++uE5OF0$!+b:$3 =*Fdq$!+1t;z(*F07%$\"+)ReJO#F0$\"+F7:eFFdq$!+_w-:5Fap7%$\"+[$\\!z5F0$ \"+rsak9F0$!+=O\"p.\"Fap7%$!++/5BAFdq$\"+d3dIEF0$!+\"zjC/\"Fap7%$!+N.% *>:F0$\"+B\\gcPF0$!+**=$3.\"Fap7%$!+]9+#z#F0$\"+*)R%e#[F0$!+Jn\\,5Fap7 %$!+JKB;SF0$\"+Mn*F0$\"+1!p6^*F0$!+GOXLMF07%$!+AM%H`*F0$\"+E9]^'*F0$!+#pFl .#F07%$!+M-*zp*F0$\"+$o&eT'*F0$!+OCu,gFdq7%$!+0gg#o*F0$\"+xW0\"[*F0$\" +6_&GX)Fdq7%$!+b!fv[*F0$\"+GB)><*F0$\"+q@TpAF07%$!+klP<\"*F0$\"+Ho()=( )F0$\"+7-nUOF07%$!+@.(F07%$!+@kc%4'F0$ \"+pQlOcF0$\"+R+o=\")F07%$!+S+1I]F0$\"+M`?4YF0$\"+2)Gm)))F07%$!+rTyzQF 0$\"+Q!*>4NF0$\"+-C()*[*F07%$!+W&eYm#F0$\"+:S+aBF0$\"+v>!Q#**F07%$!+

aOF0$!+&f#***f$F0$\"+\\%[)['*F07%$\"+5YDi\"*F07%$\"+e$)))RfF0$!+8%[#=dF0$\"+e#*ye&)F07%$\"+m9ampF0$!+\\,-_ mF0$\"+NYW^yF07%$\"+ys&*)*yF0$!+%fjE[(F0$\"+QY6`qF07%$\"+\"R]ls)F0$!+Q ya(>)F0$\"+&HCj<'F07%$\"+I!o-W*F0$!+,_\"fy)F0$\"+n*\\IB&F07%$\"+(e^K+ \"Fap$!+W![!R#*F0$\"+pmkMUF07%$\"+!43(\\5Fap$!+C'*R]&*F0$\"+x:(=>$F07% $\"+`i!H3\"Fap$!+D`o:(*F0$\"+o/*\\6#F07%$\"+X@[-6Fap$!+8<$Ht*F0$\"+E* \\R,\"F07%$\"+'G&>36Fap$!+LA[-'*F0$!+\\y/95Fdq7%$\"+&))G**4\"Fap$!+o+' pK*F0$!+P\")3@7F07%$\"+:Jpx5Fap$!+=.>6*)F0$!+c>tMBF07%$\"+88jT5Fap$!+> `3i$)F0$!+x]OJMF07%$\"+[nG?**F0$!+5#)\\)o(F0$!+MpB*\\%F07%$\"+?xA$H*F0 $!+Z30,pF0$!+t]qDbF07%$\"+Q*\\6a)F0$!+XD%>,'F0$!+!z.s\\'F07%$\"+Uz\"=n (F0$!+#3YZ.&F0$!+0uI*R(F07%$\"+*4X[p'F0$!+3n>%)RF0$!+!4(*o@)F07%$\"+OU w@cF0$!+B)yf(GF0$!+%yMW$*)F07%$\"+Tu0mWF0$!+$e8ls\"F0$!+Y;MO&*F07%$\"+ oC8VKF0$!+'e!\\FbFdq$!+(=Z2+\"Fap7%$\"+]ZBq>F0$\"+3\"p/G'Fdq$!+'emL.\" Fap7%$\"+aY'Gm'Fdq$\"+tB\\)z\"F0$!+')fB]5Fap7%$!+ok_$['Fdq$\"+?vHTHF0$ !+.BK]5Fap7%$!+]S?_>F0$\"+lRZRSF0$!+i(yG.\"Fap7%$!+Yb1BKF0$\"+*=\\l2&F 0$!+:T.v**F07%$!+\"ou%QWF0$\"+@uyOgF0$!+->*=W*F07%$!+CuAwbF0$\"+dnT0pF 0$!+vohL()F07%$!+JX$\\h'F0$\"+/0')owF0$!+(R6!fyF07%$!+gSfMvF0$\"+v(o\\ J)F0$!+[\"f9$oF07%$!+0d:<$)F0$\"+GWCL))F0$!+*>d(ocF07%$!+.60Z*)F0$\"+3 f0:#*F0$!+S*RFR%F07%$!+(\\k;T*F0$\"+]&GQX*F0$!+QKqGIF07%$!+B+s,(*F0$\" +5c?X&*F0$!+18l/;F07%$!+\"el:\")*F0$\"+w3<([*F0$!+w*>S]\"Fdq7%$!+(RQ$R (*F0$\"+Vf7!G*F0$\"+*y-MI\"F07%$!+qP+([*F0$\"+[s\"p#*)F0$\"+\\tKEFF07% $!+*[l-1*F0$\"+/.\"GV)F0$\"+Na:*3%F07%$!+7ONo%)F0$\"+e6T0yF0$\"+i-$[O& F07%$!+/?qBxF0$\"+ov`aqF0$\"+82FHlF07%$!+rP`ToF0$\"+8X/#>'F0$\"+BI-ivF 07%$!+^qPReF0$\"+m-hJ_F0$\"+k(>nW)F07%$!+zi`OZF0$\"+B-\\)=%F0$\"+iALr \"*F07%$!+b[a`NF0$\"+IgCzIF0$\"+F0$\"+40+\"Fap7%$\"+#)e/^SF0$!+I[0ZRF0$\"+PJL/'*F07%$\"+fM&)>_F0 $!+R$yy+&F0$\"+6$*[w!*F07%$\"+edS:jF0$!+F0!4*fF0$\"+T[TM%)F07%$\"+K#RU K(F0$!+@k1\")oF0$\"+?Q:\"p(F07%$\"+:P^M#)F0$!+[V%[m(F0$\"+SeefoF07%$\" +?^(f.*F0$!+KWVI$)F0$\"+`d<_fF07%$\"+&\\$*)>(*F0$!+[%[z'))F0$\"+C&H3) \\F07%$\"+]*)*y-\"Fap$!+&*obp#*F0$\"+t<&o&RF07%$\"+Shtq5Fap$!+[&*fH&*F 0$\"+R]*4*GF07%$\"+IB/+6Fap$!+0mlW'*F0$\"+_he$z\"F07%$\"+*H'[:6Fap$!+S 'yNh*F0$\"+\"3;ru'Fdq7%$\"+`D'o6\"Fap$!+N]ZP%*F0$!+;yebXFdq7%$\"+=E4/6 Fap$!+7@m>\"*F0$!+Y@$pe\"F07%$\"+-$Hs2\"Fap$!+[Pdl')F0$!+[&f'3FF07%$\" +3PYO5Fap$!+4(QE3)F0$!+U@L4QF07%$\"+!3X8#)*F0$!+$**H,Q(F0$!+nwsw[F07%$ \"+yrQZ\"*F0$!++A**olF0$!+\"HEx*eF07%$\"+D+V\\$)F0$!+2JlhcF0$!+PznA*F07%$\"+.$yc6%F0$!+<9`f8F0$!+zRE$z*F 07%$\"+'4qJ'GF0$!+-CWa>Fdq$!+:**GA5Fap7%$\"+y_Bm:F0$\"+Kx:/(*Fdq$!+7P> ]5Fap7%$\"+aHmWCFdq$\"+.y)37#F0$!+?\\%=1\"Fap7%$!+P-?\"3\"F0$\"+'zU*QK F0$!+\"H'Hc5Fap7%$!+B'H))Q#F0$\"+/A*yI%F0$!+c!3H.\"Fap7%$!+8$4fl$F0$\" +FRg6`F0$!+i//9**F07%$!+JO$)f[F0$\"+\"=EZB'F0$!+v7=>$*F07%$!+?&Q%yfF0$ \"+!Q=H1(F0$!+D>F]&)F07%$!+&Qn0*pF0$\"+Lh3$y(F0$!+WWn')F0$\"+E%*fa))F0$!+R'[aK&F07%$!+\"flN ?*F0$\"+*=\\!)=*F0$!+jx@3SF07%$!+/B&zh*F0$\"+$G!3y$*F0$!+\"*\\,6EF07%$ !+nL=a)*F0$\"+xa1@%*F0$!+A$zE;\"F07%$!+uOv2**F0$\"+$*fu:$*F0$\"+Z=OkIF dq7%$!+GW*zx*F0$\"+DYHj!*F0$\"+q_ZlruF0$ \"+-oU(y&F07%$!+!*\\&Ha(F0$\"+fM#)*o'F0$\"+l;fApF07%$!+%p*y8mF0$\"+&Rp @!eF0$\"+#*Hp>zF07%$!+/yUpbF0$\"+AcSA[F0$\"+,#yNw)F07%$!+(4S(HWF0$\"+T *yhw$F0$\"+<4[V%*F07%$!+%zoc@$F0$\"+%GJ.l#F0$\"+de+`**F07%$!+**=p[>F0$ \"+4Rg#\\\"F0$\"+hG**G5Fap7%$!+,pA.lFdq$\"+^fL8JFdq$\"+xQeX5Fap7%$\"+% G#Q$e'Fdq$!+CU`[()Fdq$\"+FicX5Fap7%$\"+&p&)p&>F0$!+W]MZ?F0$\"+$H5(H5Fa p7%$\"+L+UEKF0$!+z/%y=$F0$\"+NT/!***F07%$\"+l=y[WF0$!+ywjyUF0$\"+9&\\f a*F07%$\"+!y8xg&F0$!+iz!HI&F0$\"+(G(Hx*)F07%$\"+F\\X)o'F0$!++[&\\C'F0$ \"+5p2(H)F07%$\"+Tx(yn(F0$!+INX!4(F0$\"+,'p$=vF07%$\"+g#yWc)F0$!+8&om# yF0$\"+/p-amF07%$\"+sFLQ$*F0$!+*)RkU%)F0$\"+HSX;dF07%$\"+dR.\"***F0$!+ y[OH*)F0$\"+'z(\\c^5Fap$!+@R))z#*F0$\"+dGVoOF07%$\"+5.l!4 \"Fap$!+n@T*[*F0$\"+OY.!e#F07%$\"+!GUf6\"Fap$!+@1Pb&*F0$\"+)=BFY\"F07% $\"+,19F6Fap$!+5@Sx%*F0$\"+F-fnKFdq7%$\"+qk2C6Fap$!+yPMd#*F0$!+NFIv\") Fdq7%$\"+C=r16Fap$!+&4i\"**))F0$!+I\\^f>F07%$\"+GX9v5Fap$!++P&)3%)F0$! +%)>/)3$F07%$\"+@hhH5Fap$!+,mJ%z(F0$!+\"G]7>%F07%$\"+(R:_q*F0$!+!4(>lq F0$!+i=Wc_F07%$\"+%***>%)*)F0$!+L#=FB'F0$!+3w-qiF07%$\"+<-YS\")F0$!+Hc \\4`F0$!+#yhv@(F07%$\"+1T>$=(F0$!+wcM4VF0$!+ie(Q3)F07%$\"+l!HN7'F0$!+E 04ZKF0$!+ArJ`))F07%$\"+-?cu\\F0$!+JEOQ@F0$!+W;45&*F07%$\"+&R]8v$F0$!+w F5%***Fdq$!+=0(Q+\"Fap7%$\"+uF%3Z#F0$\"+a$f4`\"Fdq$!+d)[C/\"Fap7%$\"+f #R<:\"F0$\"+>qD-8F0$!+m(=a1\"Fap7%$!+;KCd=Fdq$\"+H@9JCF0$!+6\"f;2\"Fap 7%$!+4:2?:F0$\"+6.*H_$F0$!+2kJg5Fap7%$!+wz&*GGF0$\"+I)>9c%F0$!+.^'3.\" Fap7%$!+'p:'*3%F0$\"+glkIbF0$!+K)3;$)*F07%$!+?tNz_F0$\"+!e6dT'F0$!+\\3 $[<*F07%$!+g[7wjF0$\"+&=;F?(F0$!+')eiX$)F07%$!+FD1ftF0$\"+U01zyF0$!+f8 #fN(F07%$!+&G!44#)F0$\"+c,oL%)F0$!+y*o@A'F07%$!+xEX4*)F0$\"+`DFd))F0$! +PE/l\\F07%$!+!)p@Y%*F0$\"+0a]U\"*F0$!+A:$*3OF07%$!+?gp3)*F0$\"+on>%G* F0$!+BcC\"=#F07%$!+**Rx*)**F0$\"+`%e%z#*F0$!+0ik:rFdq7%$!+O$=h)**F0$\" +SYzF\"*F0$\"+I$oKp(Fdq7%$!+([m#)z*F0$\"+i(\\6$))F0$\"+>aYIAF07%$!+,Oe I%*F0$\"+;?!RR)F0$\"+Q*R\">)F0$\"+&\\bo7(F0$\"+$fsU?'F07%$!+x9GXtF0$\"+SG;0C CF0$\"+HhIJ5Fap7%$\"+ye$3j$F0$!+NOcONF0$\"+..rg**F07%$\"+!\\@o%[F0$!+! p.Sf%F0$\"+qwnt%*F07%$\"+O$pT*fF0$!+'fP,e&F0$\"+XWmk))F07%$\"+N$[%eqF0 $!+#p^*zkF0$\"+M`wY\")F07%$\"+,\"oo-)F0$!+`\"y)zsF0$\"+l,3LtF07%$\"+'[ g#))))F0$!+Ca*z'zF0$\"+&pDkV'F07%$\"+Y;.L'*F0$!+j2?M&)F0$\"+2@:paF07%$ \"+i(4`-\"Fap$!+3;Nq*)F0$\"+/>1VWF07%$\"+v:=u5Fap$!+9GPq#*F0$\"+VIUpLF 07%$\"+.BR46Fap$!+XuKI%*F0$\"+0L1fAF07%$\"+W!\\08\"Fap$!+G(\\%[%*F0$\" +f!HD7\"F07%$\"+2+RP6Fap$!+&)*R^K*F0$!*xC6(HFdq7%$\"+_\\yH6Fap$!+QE#H1 *F0$!+0./(=\"F07%$\"+v%Qx5\"Fap$!+0)pjm)F0$!+9UYQBF07%$\"+ZgRr5Fap$!+$ >%*>9)F0$!+1gSsMF07%$\"+xB0@5Fap$!+-g6)\\(F0$!+3F0$\"+C7'Hz$F0$!+^wJi5Fap7%$!+fQprKF0$\"+(eb'*z%F0$!+=1qE5F ap7%$!+m(QK_%F0$\"+Z]NLdF0$!+mTUF(*F07%$!+LB2'p&F0$\"+cH]zlF0$!+0xr3!* F07%$!+%35$onF0$\"+HPlCtF0$!+J]v>\")F07%$!+xbY>xF0$\"+<]rczF0$!+Yn-uqF 07%$!+6.-J&)F0$\"++f=l%)F0$!+1_[*)eF07%$!+\\0'p=*F0$\"+kFQT))F0$!+?c<) e%F07%$!+$HbUn*F0$\"+tMky!*F0$!+whm&>$F07%$!+Y:D$)**F0$\"+g-]s\"*F0$!+ .))HS**F0$!+_T?0')F0$\"+unE5_F07 %$\"+j\"[00\"Fap$!+X#p6**)F0$\"+)GQv:%F07%$\"+1!)p&4\"Fap$!+$=P9C*F0$ \"+?7()fIF07%$\"+@J!p7\"Fap$!+R***GN*F0$\"+CnF07%$\"+*=0Q9\"Fap$!+@ SdC$*F0$\"+\\/hJxFdq7%$\"+4&zh9\"Fap$!+`(zv:*F0$!+L7mWRFdq7%$\"+Vk$R8 \"Fap$!+\"R'3b))F0$!+Jvwj:F07%$\"+Pc726Fap$!+agAA%)F0$!+s1OBFF07%$\"+3 G%f1\"Fap$!+10)f'yF0$!+d#G7'QF07%$\"+D'Q2,\"Fap$!+'eX]>(F0$!+xtdk\\F07 %$\"+\"R*G?%*F0$!+T%y'>kF0$!+ndw>gF07%$\"+'[.YF0$!+n=*p#zF07%$\"+S$3si'F0$!+Z[Y*e$F0$!+ej0[()F 07%$\"+F5,)[&F0$!+)QlU_#F0$!+-f_f%*F07%$\"+F`bnUF0$!+SxPB9F0$!+#QgX+\" Fap7%$\"+(4qC)HF0$!+H%p!GIFdq$!+9q6\\5Fap7%$\"+$o-7l\"F0$\"+-,26#)Fdq$ !+(yM#y5Fap7%$\"+saDQHFdq$\"+ZQ(=$>F0$!+j;r!4\"Fap7%$!+d_Bo5F0$\"+4]/8 IF0$!+(Q%f&3\"Fap7%$!+5)\\DT#F0$\"+)f:%[SF0$!+*))RA1\"Fap7%$!+ox5;PF0$ \"+)3QA-&F0$!+t6P?5Fap7%$!+wh!e&\\F0$\"+D#[%>fF0$!+^xB,'*F07%$!+$[()*3 hF0$\"+)o,fs'F0$!+!\\!z?))F07%$!+!=4S:(F0$\"+kzhGuF0$!+'e4G(yF07%$!+RF #32)F0$\"+Wd-;!)F0$!+U&QBx'F07%$!+cq`T))F0$\"++A?y%)F0$!+\"H(zQbF07%$! +U/%4X*F0$\"+sq42))F0$!+Ita&>%F07%$!+Je&p))*F0$\"+>7*G\"F07%$!+Pr#3-\"Fap$\"+edgX*)F0$\"+S*y 59#Fdq7%$!+cAy35Fap$\"+6*)\\/()F0$\"+&z*44 [1g5Fap7%$\"+#fs?=$F0$!+*4:s8$F0$\"+'e$4I5Fap7%$\"+?r[VWF0$!+N?\"y=%F0 $\"+!)p.f)*F07%$\"+$G@9k&F0$!+$H;M<&F0$\"+Y@Q(G*F07%$\"+ImYgnF0$!+t?4z gF0$\"+QD,*f)F07%$\"+t1'oy(F0$!+M/G\"*oF0$\"+,-;2yF07%$\"+`%*[3()F0$!+ _<*zf(F0$\"+,S#\\#pF07%$\"+af&[^*F0$!+'Qq*)=)F0$\"+5F ap$!+N\"Hel)F0$\"+k9!)R\\F07%$\"+qsvu5Fap$!+c8:#**)F0$\"+Ag&4'QF07%$\" +#[]g6\"Fap$!+;\"fN>*F0$\"+pc%)RFF07%$\"+*>BJ9\"Fap$!+![O6Fap$!+HjuM')F0$!+S^MZ>F07%$\"+xx#[5\"Fap$!+ $H)pn\")F0$!+![NP6$F07%$\"+/eue5Fap$!+bY\"=e(F0$!+=O$RD%F07%$\"+KrV')* *F0$!+s67')oF0$!+lina`F07%$\"+V'>5D*F0$!+#G:64'F0$!+:E'=S'F07%$\"+KM#) )Q)F0$!+-mg3_F0$!+\"3'f!Q(F07%$\"+8:P4uF0$!+_?b^UF0$!+l?Kv#)F07%$\"+C/ ;CjF0$!+f%))QB$F0$!+yr1q!*F07%$\"+=BpY^F0$!+UUOq@F0$!+m)z([(*F07%$\"+G %eC*QF0$!+m.Pw5F0$!+KmdH5Fap7%$\"+)pi)yDF0$\"*$[0BKFdq$!+84ip5Fap7%$\" +!Rw]A\"F0$\"+L\"z#R6F0$!+^\\n$4\"Fap7%$!+\\x#=[\"Fdq$\"+95]GAF0$!+]2h +6Fap7%$!+k(\\*=:F0$\"+Z$)p$G$F0$!++4d*3\"Fap7%$!+Y$)QkGF0$\"+&f`*)G%F 0$!+%QG+1\"Fap7%$!+e\"Q7;%F0$\"+8p%)G_F0$!+b'R=,\"Fap7%$!+#)=K'Q&F0$\" +yoo)3'F0$!+=4(GX*F07%$!+Qp4g%GZ)F0$!+/yqq^F07%$!+zBf+(*F0$\"+l8ja()F0$!+Y*=zy$F07%$!+@AO35Fa p$\"+*\\)3(*))F0$!++wgIBF07%$!+V\"Q\"G5Fap$\"+X%4s*))F0$!+km-(G)Fdq7%$ !+\"yB!H5Fap$\"+EzOa()F0$\"+q!yf'oFdq7%$!+w%[5,\"Fap$\"+:JPq%)F0$\"+1a &Q=#F07%$!+;jIY(*F0$\"+]eY\\!)F0$\"+GzUKOF07%$!+(=:c?*F0$\"+aiD)\\(F0$ \"+FfX.]F07%$!+xLx*\\)F0$\"+EYgDoF0$\"+CauqiF07%$!+M9@VwF0$\"+c,XUgF0$ \"+27]6uF07%$!+(=nHl'F0$\"+1Ufh^F0$\"+>p(oS)F07%$!+$Ho\"[bF0$\"+'RYu>% F0$\"+[?KU#*F07%$!+TW[\\VF0$\"+pDulJF0$\"+`1s2**F07%$!+U[dyIF0$\"+&yVK 3#F0$\"+zItR5Fap7%$!+!oavv\"F0$\"+Y-Du'*Fdq$\"+,Y&42\"Fap7%$!+;$4]3%Fd q$!+,lQQ;Fdq$\"+v4l%3\"Fap7%$\"+cN')p%*Fdq$!+_=e#H\"F0$\"+J?O\"3\"Fap7 %$\"+lh:)G#F0$!+N\"\\5S#F0$\"+fm*=1\"Fap7%$\"+zeS&f$F0$!+`9)>Z$F0$\"+: NFF5Fap7%$\"+,n]][F0$!+]`)))[%F0$\"+\\gi'y*F07%$\"+T$en.'F0$!+)3#GOaF0 $\"+#45L<*F07%$\"+Y)z!RrF0$!+QU$**H'F0$\"+&\\`fW)F07%$\"+Ui/W\")F0$!+9 v/nqF0$\"+Y*Gyh(F07%$\"+/E))R!*F0$!+fcWExF0$\"+aW--nF07%$\"+#3Gk\")*F0 $!+\\jro#)F0$\"+iUD6dF07%$\"+f#3l/\"Fap$!+0iK'o)F0$\"+\"[pxl%F07%$\"+? [(y4\"Fap$!+XMqt*)F0$\"+H/O`NF07%$\"+#ex^8\"Fap$!+QsGF\"*F0$\"+0zV4CF0 7%$\"+CE*z:\"Fap$!+&fVb9*F0$\"+PpNg;\"Fap$!+8'[*G!*F0$\"* )fQqZFdq7%$\"+A/;f6Fap$!+z3%*z()F0$!+%3%pZ6F07%$\"+4mOP6Fap$!+pe%GS)F0 $!+C#etL#F07%$\"+Q6!35\"Fap$!+1gx.zF0$!+c%o!4NF07%$\"+`%o(\\5Fap$!+G2^ !H(F0$!+eU*)\\YF07%$\"+(p&RZ)*F0$!+e6OslF0$!+N]$F0$!+ j@F0$\"+oo@vNFdq$!+#*3e)3\"Fap7%$\"+Jre*)yFdq$\"+%[#4Y9F0$!+$))et5\"Fa p7%$!+\\zpyfFdq$\"+QmI7DF0$!+[9d36Fap7%$!+ca#[(>F0$\"+xEASNF0$!+kYY\"4 \"Fap7%$!+)H<(=LF0$\"+ml@9XF0$!+2Vjb5Fap7%$!+iT41YF0$\"+ZO?>aF0$!+2d2, 5Fap7%$!+m$pP\"eF0$\"+WZ(3C'F0$!+e%=AG*F07%$!+#z$Q>pF0$\"+>K%f'pF0$!+M >mz$)F07%$!+_k)>!zF0$\"+muR#e(F0$!+.Vn;tF07%$!+q&3Eu)F0$\"+`7vz!)F0$!+ P8M6hF07%$!+Zb![U*F0$\"+HEG\\%)F0$!+6p)ey%F07%$!+)4T^$**F0$\"+66D%o)F0 $!+:26mLF07%$!+]*ej-\"Fap$\"+dE3!y)F0$!+u]k!)=F07%$!+ONQS5Fap$\"+UE^M( )F0$!+Q,l+OFdq7%$!+EbMN5Fap$\"+,'ywa)F0$\"+BG5k6F07%$!+1sR65Fap$\"+5o: A#)F0$\"+N&=/m#F07%$!+V$z2p*F0$\"+s&RHw(F0$\"+7ob)4%F07%$!+`6%H4*F0$\" +'4`t<(F0$\"+prE]aF0-%*AXESSTYLEG6#%$BOXG" 1 2 0 1 10 0 2 1 1 2 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 69 "spacecurve([seq([W[1,j],W[2,j],W[4,j]],j=1..ti me_steps)],axes=boxed);" }}{PARA 13 "" 1 "" {GLPLOT3D 412 412 412 {PLOTDATA 3 "6$-%'CURVESG6#7`jl7%$\"\"!F)F($!\"\"F+7%$\"+#[&yY7!#6$!+# zWnC\"F/$!+cn(>#**F/7%$\"+e#zYZ#F/$!+/Y.uCF/$!+Tj7*o*F/7%$\"+A*Qfm$F/$ !+F(=Fm$F/$!+mK40$*F/7%$\"+*pVU![F/$!+_=D%z%F/$!+$*4\"fx)F/7%$\"+sP\"[ (eF/$!+<*))4&eF/$!+lj$*4\")F/7%$\"+LaYkoF/$!+\"opk\"oF/$!+S)\\xJ(F/7%$ \"+)[7;w(F/$!+\"Q)ovwF/$!+Xc,7kF/7%$\"+miAc&)F/$!+JJM:%)F/$!+_oH2aF/7% $\"+yvwR#*F/$!+J#fS-*F/$!+CD#)>VF/7%$\"+.T50)*F/$!+m.e#\\*F/$!+cs?nJF/ 7%$\"+%fUY-\"!#5$!+m>#R\")*F/$!+'GF\"o>F/7%$\"+zq\"f0\"F`p$!+v<[$)**F/ $!+^Lh>u!#77%$\"+7o*R2\"F`p$!+?R5****F/$\"+G+#f\"\\F\\q7%$\"+^4my5F`p$ !+XW4h)*F/$\"+7d!Hr\"F/7%$\"+^\\!)p5F`p$!+y\")=s&*F/$\"+![3G!HF/7%$\"+ YQWZ5F`p$!+B*ou8*F/$\"+;_%H/%F/7%$\"+.'=<,\"F`p$!+EoCk&)F/$\"+\">*4;^F /7%$\"+*4^!H'*F/$!+>&)*='yF/$\"+5RY1hF/7%$\"+s5D9!*F/$!+^onTqF/$\"+-p& )**pF/7%$\"+N7ey#)F/$!+5x\\;hF/$\"+*RsQy(F/7%$\"+eH`HuF/$!+(\\625&F/$ \"+C\\(zW)F/7%$\"+azRwkF/$!+wi')4SF/$\"+_/a$)*)F/7%$\"+9^MIaF/$!+:&o/' GF/$\"+kc&QQ*F/7%$\"+jjX/VF/$!+ueup;F/$\"+Y$)3W'*F/7%$\"+&z3P6$F/$!+uv 9aXF\\q$\"+mHCh(*F/7%$\"+c>*[(=F/$\"+0NYXwF\\q$\"+NY6M(*F/7%$\"+;n^kgF \\q$\"+r#=@(>F/$\"+;BDj&*F/7%$!+&4[ur'F\\q$\"+'*)e%\\JF/$\"+X#Q4D*F/7% $!+qNsQ>F/$\"+D&>\"zUF/$\"+9e=,))F/7%$!+M_zsJF/$\"+s>EW`F/$\"+#)Hv>#)F /7%$!+-V,_VF/$\"+Lz()GjF/$\"+gL;9vF/7%$!+PLpaaF/$\"+m3,=sF/$\"+rJs$p'F /7%$!+yT&*fkF/$\"+%**yz*zF/$\"+R(>&pdF/7%$!+-XH[tF/$\"+!='fc')F/$\"+Kl QaZF/7%$!+-`9-\")F/$\"+@cQ$=*F/$\"++7#Gm$F/7%$!+7NR1()F/$\"+/)z(p&*F/$ \"+aj%3^#F/7%$!++V%)[\"*F/$\"+q\"*H4)*F/$\"+sx!eJ\"F/7%$!+0'*f?%*F/$\" +O;q(*)*F/$\"*f]5h*F\\q7%$!+>KL;&*F/$\"+jb4L)*F/$!+F05H6F/7%$!+rzWM%*F /$\"+J*4gh*F/$!+-NISBF/7%$!+\"*o5x\"*F/$\"+WsT\\#*F/$!+'3!*z^$F/7%$!++ t8]()F/$\"+poqQ()F/$!+()[1VYF/7%$!+7Q\"G;)F/$\"+l)3;4)F/$!+v`B(p&F/7%$ !+6H`FuF/$\"+Y02=tF/$!+%\\vLm'F/7%$!+$Q(RflF/$\"+b**3IkF/$!+g'\\e_(F/7 %$!+8JtvbF/$\"+0=^TaF/$!+N$)yq#)F/7%$!+&Hjb\\%F/$\"+@AznVF/$!+P7J')))F /7%$!+be1RLF/$\"+\\)QdA$F/$!+)o)pi$*F/7%$!+?*Qq7#F/$\"+)fKK.#F/$!+N^^# p*F/7%$!+^h'R!))F\\q$\"+,hO*3)F\\q$!+W4pq)*F/7%$\"++E'G!QF\\q$!+>t-!G% F\\q$!+V\"pX*)*F/7%$\"+'pm^j\"F/$!+l(e#e;F/$!+RH#Rw*F/7%$\"+\\TXlGF/$! +y!GE'GF/$!+?y%4[*F/7%$\"+_bl`SF/$!+Z:LASF/$!+0&H-0*F/7%$\"+xbu$=&F/$! +(z4$>^F/$!+*G'oy%)F/7%$\"+jsETiF/$!+q'4l8'F/$!+q@[vxF/7%$\"+l:P8sF/$! +dx:eqF/$!+1e!>&pF/7%$\"+Tp!))3)F/$!+'R;+(yF/$!+b-@@gF/7%$\"+)ory&))F/ $!+qphf&)F/$!+/'4%)*\\F/7%$\"+mCM7&*F/$!+'*\\Y;\"*F/$!+&*3.+RF/7%$\"+E #RX+\"F`p$!+v9@K&*F/$!+AI#Qu#F/7%$\"+65:X5F`p$!+Bay+)*F/$!+IzU[:F/7%$ \"+TLks5F`p$!+(R$[=**F/$!+h6F/ $\"+-/B&f*F/7%$\"+S[*='>F\\q$\"+i`J2BF/$\"+%[RNQ*F/7%$!+9)fG4\"F/$\"+; AwfMF/$\"+xSxK!*F/7%$!+kIgjBF/$\"+!R)))fXF/$\"+&[xsa)F/7%$!+%yQSf$F/$ \"+a^@\"f&F/$\"+=r9LzF/7%$!+DV2iZF/$\"+Qs8QlF/$\"+%pl#)>(F/7%$!+pi0YeF /$\"+)\\ZhQ(F/$\"+e@K_jF/7%$!+`7LDoF/$\"+[F1A\")F/$\"+'>2oS&F/7%$!+IX \"3o(F/$\"+umCM()F/$\"+I$o\\P%F/7%$!+C7a&R)F/$\"+/R#G@*F/$\"+&y6RkHF\\q7%$!+)HV\"3'*F/$\"+m3a l'*F/$!+9K35:F/7%$!+K]&*p%*F/$\"+0\"y=S*F/$!+8y_.FF/7%$!+&H!Gc\"*F/$\" +D8J\"**)F/$!+r'\\t&QF/7%$!+r_4u')F/$\"+\\2)*R%)F/$!+Ebn_\\F/7%$!+ELvL !)F/$\"+f3LcxF/$!+QKdrfF/7%$!+3zi[sF/$\"+I*p4&pF/$!+'\\5u*oF/7%$!+]%F/$\"+z.3RRF/$!+mg&f(*)F/7%$!+o')H2IF/$\"+1P8*y#F/$!+\\`4*R*F/7%$!+[ 00rw' oe*F/7%$\"+uB\")eKF/$!+V!R#QKF/$!+n3Lb#*F/7%$\"+;KDUWF/$!+<#**oO%F/$!+ !yg)z()F/7%$\"+t%zCc&F/$!+YH_FaF/$!+YTAo\")F/7%$\"+g>O0mF/$!+-zo.kF/$! +t]MIuF/7%$\"+dvQevF/$!+E*R.G(F/$!+3N;ylF/7%$\"+$QQ1T)F/$!+3U.W!)F/$!+ \\fXDcF/7%$\"+Azt_\"*F/$!+`::$o)F/$!+tbh(e%F/7%$\"+:vxw(*F/$!+qX3)=*F/ $!+Z9R\"[$F/7%$\"+***HcF/7%$\"+kd%>U*F/$!+Z*))yA( F/$\"+]ElOlF/7%$\"+yqu:()F/$!+)yt$fjF/$\"+![FJU%*F/7%$!++/5BAF\\q$\"+d3dIEF/$\"+%\\H5>*F /7%$!+N.%*>:F/$\"+B\\gcPF/$\"+@I6.))F/7%$!+]9+#z#F/$\"+*)R%e#[F/$\"+&4 MKG)F/7%$!+JKB;SF/$\"+Mn*F/$\"+1!p6^*F/$\"+'G^yr\"F/7%$!+AM%H`*F/$\"+E9 ]^'*F/$\"+%***yP_F\\q7%$!+M-*zp*F/$\"+$o&eT'*F/$!+9=>HoF\\q7%$!+0gg#o* F/$\"+xW0\"[*F/$!+%e6G)=F/7%$!+b!fv[*F/$\"+GB)><*F/$!+2\"Hj0$F/7%$!+kl P<\"*F/$\"+Ho()=()F/$!+E6=%=%F/7%$!+@.4NF/$!+5aOF/$!+&f#***f$F/$!+N$eI,*F/7%$\"+5Y'F/7%$\"+\"R]ls)F/$!+Qya( >)F/$!+g>/E_F/7%$\"+I!o-W*F/$!+,_\"fy)F/$!+Un@wTF/7%$\"+(e^K+\"F`p$!+W ![!R#*F/$!+m[=lIF/7%$\"+!43(\\5F`p$!+C'*R]&*F/$!+qLt5>F/7%$\"+`i!H3\"F `p$!+D`o:(*F/$!+A*H@J(F\\q7%$\"+X@[-6F`p$!+8<$Ht*F/$\"+-.1[XF\\q7%$\"+ 'G&>36F`p$!+LA[-'*F/$\"+<5))G;F/7%$\"+&))G**4\"F`p$!+o+'pK*F/$\"+#=LIx #F/7%$\"+:Jpx5F`p$!+=.>6*)F/$\"+)zf+(QF/7%$\"+88jT5F`p$!+>`3i$)F/$\"++ -\"Q!\\F/7%$\"+[nG?**F/$!+5#)\\)o(F/$\"+fjTfeF/7%$\"+?xA$H*F/$!+Z30,pF /$\"+$RsMs'F/7%$\"+Q*\\6a)F/$!+XD%>,'F/$\"+!phT[(F/7%$\"+Uz\"=n(F/$!+# 3YZ.&F/$\"+&oM88)F/7%$\"+*4X[p'F/$!+3n>%)RF/$\"+#RWll)F/7%$\"+OUw@cF/$ !+B)yf(GF/$\"+\"**\\I0*F/7%$\"+Tu0mWF/$!+$e8ls\"F/$\"+X2!eJ*F/7%$\"+oC 8VKF/$!+'e!\\FbF\\q$\"+KITT%*F/7%$\"+]ZBq>F/$\"+3\"p/G'F\\q$\"+B@:G%*F /7%$\"+aY'Gm'F\\q$\"+tB\\)z\"F/$\"+Zx#fF*F/7%$!+ok_$['F\\q$\"+?vHTHF/$ \"+8&3j)*)F/7%$!+]S?_>F/$\"+lRZRSF/$\"+*\\bDc)F/7%$!+Yb1BKF/$\"+*=\\l2 &F/$\"+V-n4!)F/7%$!+\"ou%QWF/$\"+@uyOgF/$\"+IwWMtF/7%$!+CuAwbF/$\"+dnT 0pF/$\"+\"R?ba'F/7%$!+JX$\\h'F/$\"+/0')owF/$\"+s'zLl&F/7%$!+gSfMvF/$\" +v(o\\J)F/$\"+'yb.n%F/7%$!+0d:<$)F/$\"+GWCL))F/$\"+u\\a5OF/7%$!+.60Z*) F/$\"+3f0:#*F/$\"+7'F/$!+` A36tF/7%$!+^qPReF/$\"+m-hJ_F/$!+=(>b.)F/7%$!+zi`OZF/$\"+B-\\)=%F/$!+'* RJK')F/7%$!+b[a`NF/$\"+IgCzIF/$!+N(\\@4*F/7%$!+3Ui6BF/$\"+#Gd9#>F/$!+' Rp!3%*F/7%$!+'yr@.\"F/$\"+%QCUL(F\\q$!+p_`v&*F/7%$\"+'fKqj#F\\q$!+HHXh YF\\q$!+/%\\Cf*F/7%$\"+uCeb:F/$!+HBUe;F/$!+4(Q\"f%*F/7%$\"+H%pS#GF/$!+ ^`xCGF/$!+/5Jy\"*F/7%$\"+#)e/^SF/$!+I[0ZRF/$!+5b)\\v)F/7%$\"+fM&)>_F/$ !+R$yy+&F/$!+Y))R'>)F/7%$\"+edS:jF/$!+F0!4*fF/$!+Na)=^(F/7%$\"+K#RUK(F /$!+@k1\")oF/$!+l(HFr'F/7%$\"+:P^M#)F/$!+[V%[m(F/$!+'e()>\"eF/7%$\"+?^ (f.*F/$!+KWVI$)F/$!+WPFC[F/7%$\"+&\\$*)>(*F/$!+[%[z'))F/$!+?h^lPF/7%$ \"+]*)*y-\"F`p$!+&*obp#*F/$!+Mwn_EF/7%$\"+Shtq5F`p$!+[&*fH&*F/$!+H7X.: F/7%$\"+IB/+6F`p$!+0mlW'*F/$!+QrNfLF\\q7%$\"+*H'[:6F`p$!+S'yNh*F/$\"+' 4rpJ)F\\q7%$\"+`D'o6\"F`p$!+N]ZP%*F/$\"+2>`\")>F/7%$\"+=E4/6F`p$!+7@m> \"*F/$\"+%3Bi4$F/7%$\"+-$Hs2\"F`p$!+[Pdl')F/$\"+8(z#fTF/7%$\"+3PYO5F`p $!+4(QE3)F/$\"+c=Jb^F/7%$\"+!3X8#)*F/$!+$**H,Q(F/$\"+\"*4BqgF/7%$\"+yr QZ\"*F/$!++A**olF/$\"+(*4S\"*oF/7%$\"+D+V\\$)F/$!+2JlhcF/$\"+c.u2wF/7% $\"+`P%fV(F/$!+%GD=n%F/$\"+j.y4#)F/7%$\"+Z,HF\\q$\"+Q?pU$*F/7%$\"+y_Bm:F/$\"+Kx:/(*F\\q$ \"+=F>)G*F/7%$\"+aHmWCF\\q$\"+.y)37#F/$\"+.(fm4*F/7%$!+P-?\"3\"F/$\"+' zU*QKF/$\"+nM(*p()F/7%$!+B'H))Q#F/$\"+/A*yI%F/$\"+\"H6')F/$\"+E%*fa))F/$\"+$\\SqA $F/7%$!+\"flN?*F/$\"+*=\\!)=*F/$\"+v)3.5#F/7%$!+/B&zh*F/$\"+$G!3y$*F/$ \"+3;_`$*F\\q7%$!+nL=a)*F/$\"+xa1@%*F/$!+p_m#\\#F\\q7%$!+uOv2**F/$\"+$ *fu:$*F/$!+_$zUV\"F/7%$!+GW*zx*F/$\"+DYHj!*F/$!+W!>,g#F/7%$!+w82o%*F/$ \"+VkKn')F/$!+#y[ts$F/7%$!+ba&[)*)F/$\"+L`&Q8)F/$!+Wb4(z%F/7%$!+IPnQ$) F/$\"+Rs>ruF/$!+BhY\"z&F/7%$!+!*\\&Ha(F/$\"+fM#)*o'F/$!+!\\FRp'F/7%$!+ %p*y8mF/$\"+&Rp@!eF/$!+asj*[(F/7%$!+/yUpbF/$\"+AcSA[F/$!+^]rl\")F/7%$! +(4S(HWF/$\"+T*yhw$F/$!+T5X6()F/7%$!+%zoc@$F/$\"+%GJ.l#F/$!+ODX=\"*F/7 %$!+**=p[>F/$\"+4Rg#\\\"F/$!+#eL2Q*F/7%$!+,pA.lF\\q$\"+^fL8JF\\q$!+#pa Z\\*F/7%$\"+%G#Q$e'F\\q$!+CU`[()F\\q$!+I2Uf%*F/7%$\"+&p&)p&>F/$!+W]MZ? F/$!+wV/w#*F/7%$\"+L+UEKF/$!+z/%y=$F/$!+74G[*)F/7%$\"+l=y[WF/$!+ywjyUF /$!+Ty.#[)F/7%$\"+!y8xg&F/$!+iz!HI&F/$!+S/O&)yF/7%$\"+F\\X)o'F/$!++[& \\C'F/$!+pCHorF/7%$\"+Tx(yn(F/$!+INX!4(F/$!+3+rUjF/7%$\"+g#yWc)F/$!+8& om#yF/$!+pi7AaF/7%$\"+sFLQ$*F/$!+*)RkU%)F/$!+#3m9U%F/7%$\"+dR.\"***F/$ !+y[OH*)F/$!+`0\"oN$F/7%$\"+E>c^5F`p$!+@R))z#*F/$!+`[6XAF/7%$\"+5.l!4 \"F`p$!+n@T*[*F/$!+][!R5\"F/7%$\"+!GUf6\"F`p$!+@1Pb&*F/$\"*=4R!\\F\\q7 %$\"+,19F6F`p$!+5@Sx%*F/$\"+G2+'>\"F/7%$\"+qk2C6F`p$!+yPMd#*F/$\"+0tj> BF/7%$\"+C=r16F`p$!+&4i\"**))F/$\"+WzE.MF/7%$\"+GX9v5F`p$!++P&)3%)F/$ \"+O.8JWF/7%$\"+@hhH5F`p$!+,mJ%z(F/$\"+*H(f)Q&F/7%$\"+(R:_q*F/$!+!4(>l qF/$\"+/zMiiF/7%$\"+%***>%)*)F/$!+L#=FB'F/$\"+%o\"\\SqF/7%$\"+<-YS\")F /$!+Hc\\4`F/$\"+D%[Er(F/7%$\"+1T>$=(F/$!+wcM4VF/$\"+a)*)*p#)F/7%$\"+l! HN7'F/$!+E04ZKF/$\"+)f__q)F/7%$\"+-?cu\\F/$!+JEOQ@F/$\"+FQt7!*F/7%$\"+ &R]8v$F/$!+wF5%***F\\q$\"+Z;G)=*F/7%$\"+uF%3Z#F/$\"+a$f4`\"F\\q$\"+Q9H H#*F/7%$\"+f#R<:\"F/$\"+>qD-8F/$\"+AqrM\"*F/7%$!+;KCd=F\\q$\"+H@9JCF/$ \"+j=50*)F/7%$!+4:2?:F/$\"+6.*H_$F/$\"+N4jU&)F/7%$!+wz&*GGF/$\"+I)>9c% F/$\"+%*))>^!)F/7%$!+'p:'*3%F/$\"+glkIbF/$\"+M`[OuF/7%$!+?tNz_F/$\"+!e 6dT'F/$\"+=R-1nF/7%$!+g[7wjF/$\"+&=;F?(F/$\"+n%\\#peF/7%$!+FD1ftF/$\"+ U01zyF/$\"+Nj]P\\F/7%$!+&G!44#)F/$\"+c,oL%)F/$\"+*e-S#RF/7%$!+xEX4*)F/ $\"+`DFd))F/$\"+SypVGF/7%$!+!)p@Y%*F/$\"+0a]U\"*F/$\"+/w68%G*F/$\"+#4L4]&F\\q7%$!+**Rx*)**F/$\"+`%e%z#*F/$!+w@mliF\\q 7%$!+O$=h)**F/$\"+SYzF\"*F/$!+A'fuz\"F/7%$!+([m#)z*F/$\"+i(\\6$))F/$!+ 6p,VHF/7%$!+,OeI%*F/$\"+;?!RR)F/$!+e;%R/%F/7%$!+bS4\"*))F/$\"+2;!G#yF/ $!+#f\\;3&F/7%$!+3p>\">)F/$\"+&\\bo7(F/$!+dFoQgF/7%$!+x9GXtF/$\"+SG;0CCF/$!+#4a]2*F/7%$\"+ye$3j$F/$!+NOcONF/$!+B!*=-()F/7%$\"+!\\@o%[ F/$!+!p.Sf%F/$!+h!3_>)F/7%$\"+O$pT*fF/$!+'fP,e&F/$!+S\">Hc(F/7%$\"+N$[ %eqF/$!+#p^*zkF/$!+N&>g\"oF/7%$\"+,\"oo-)F/$!+`\"y)zsF/$!+@E\"p'fF/7%$ \"+'[g#))))F/$!+Ca*z'zF/$!+v\")\\H]F/7%$\"+Y;.L'*F/$!+j2?M&)F/$!+be$*= SF/7%$\"+i(4`-\"F`p$!+3;Nq*)F/$!+\\LQ^HF/7%$\"+v:=u5F`p$!+9GPq#*F/$!+> IrV=F/7%$\"+.BR46F`p$!+XuKI%*F/$!+DM8KrF\\q7%$\"+W!\\08\"F`p$!+G(\\%[% *F/$\"+rE;FUF\\q7%$\"+2+RP6F`p$!+&)*R^K*F/$\"+hq'oa\"F/7%$\"+_\\yH6F`p $!+QE#H1*F/$\"+c!3Dk#F/7%$\"+v%Qx5\"F`p$!+0)pjm)F/$\"+b![Op$F/7%$\"+Zg Rr5F`p$!+$>%*>9)F/$\"+/NE&o%F/7%$\"+xB0@5F`p$!+-g6)\\(F/$\"+/c[.cF/7%$ \"+MYhr&*F/$!+r\"4Zu'F/$\"+#RVdV'F/7%$\"+,WZ.))F/$!++DB$*eF/$\"+LK'3<( F/7%$\"+6::9zF/$!+Y3Xc\\F/$\"+p*G\"*z(F/7%$\"+^Cf8pF/$!+&)3D[RF/$\"+5. J7$)F/7%$\"+M]q8eF/$!+!zaM)GF/$\"+Q'pOq)F/7%$\"+K5QGYF/$!+/Qjxy,\"*F/7%$\"+\"HhPF(F\\q$\"+'zSHi\"F/$\"+.gJo*)F/7%$!+Rc^N iF\\q$\"+m-qGFF/$\"+.(e=q)F/7%$!+$)G9k>F/$\"+C7'Hz$F/$\"+Ch*[I)F/7%$!+ fQprKF/$\"+(eb'*z%F/$\"+g\\k\"y(F/7%$!+m(QK_%F/$\"+Z]NLdF/$\"+h&Q\"QrF /7%$!+LB2'p&F/$\"+cH]zlF/$\"+Q.I#Q'F/7%$!+%35$onF/$\"+HPlCtF/$\"+Ex)R_ &F/7%$!+xbY>xF/$\"+<]rczF/$\"+h)*)\\d%F/7%$!+6.-J&)F/$\"++f=l%)F/$\"+v T'*[NF/7%$!+\\0'p=*F/$\"+kFQT))F/$\"+s6IhCF/7%$!+$HbUn*F/$\"+tMky!*F/$ \"+rA\"*G8F/7%$!+Y:D$)**F/$\"+g-]s\"*F/$\"+7AU*p\"F\\q7%$!+Xmz55F`p$\" +gB\"37*F/$!+Sf&e'**F\\q7%$!+/hi/5F`p$\"+I3&Q#*)F/$!+3l<^@F/7%$!+Pn))* z*F/$\"+Y,L%e)F/$!+u`IuKF/7%$!+jDSu$*F/$\"+YPQ2\")F/$!+e)ooM%F/7%$!+1& o*y()F/$\"+&\\$[+vF/$!+)yE1N&F/7%$!+Wq-E!)F/$\"+ddItnF/$!+q=hoiF/7%$!+ B3*38(F/$\"+O\"\\v$fF/$!+u2\\&3(F/7%$!+2)e76'F/$\"+!z5n+&F/$!+cX'yy(F/ 7%$!+-go')\\F/$\"+M$He*RF/$!+b>]k$)F/7%$!+SF.yPF/$\"+jG?@HF/$!+&\\/l!) )F/7%$!+='=p]#F/$\"+Q/4+=F/$!+'*oS2\"*F/7%$!+\"z._>\"F/$\"+Vs//lF\\q$! +K&>KE*F/7%$\"+2W$[N\"F\\q$!+()\\(f4&F\\q$!+[9Us#*F/7%$\"+]$eTY\"F/$!+ @8ih;F/$!+LE\"f8*F/7%$\"+H9#3x#F/$!+!eJwy#F/$!+OK$p&))F/7%$\"+lcsOSF/$ !+'*)Q,(QF/$!+\"eb4W)F/7%$\"+@*pXC&F/$!+)pqC*[F/$!+PDb&*yF/7%$\"+$4B'y jF/$!+?W-ReF/$!+4QCIsF/7%$\"+XryCuF/$!+(3+bp'F/$!+#4?jX'F/7%$\"+F'41P) F/$!+F&4\"\\uF/$!+fVk'e&F/7%$\"+MzD0#*F/$!+_#f()3)F/$!+M(Haj%F/7%$\"+1 #o%>**F/$!+_T?0')F/$!+CX*zh$F/7%$\"+j\"[00\"F`p$!+X#p6**)F/$!+kn\\]DF/ 7%$\"+1!)p&4\"F`p$!+$=P9C*F/$!+6Gl\\9F/7%$\"+@J!p7\"F`p$!+R***GN*F/$!+ )HnWK$F\\q7%$\"+*=0Q9\"F`p$!+@SdC$*F/$\"+n$4;%yF\\q7%$\"+4&zh9\"F`p$!+ `(zv:*F/$\"+i_^$)=F/7%$\"+Vk$R8\"F`p$!+\"R'3b))F/$\"+y)H&\\HF/7%$\"+Pc 726F`p$!+agAA%)F/$\"+T:#p'RF/7%$\"+3G%f1\"F`p$!+10)f'yF/$\"+^*39#\\F/7 %$\"+D'Q2,\"F`p$!+'eX]>(F/$\"+O6()*z&F/7%$\"+\"R*G?%*F/$!+T%y'>kF/$\"+ (4k/f'F/7%$\"+'[.YF/$ \"+\\0[nyF/7%$\"+S$3si'F/$!+Z[Y*e$F/$\"+Oc8P$)F/7%$\"+F5,)[&F/$!+)QlU_ #F/$\"+FsS&o)F/7%$\"+F`bnUF/$!+SxPB9F/$\"+31Y2*)F/7%$\"+(4qC)HF/$!+H%p !GIF\\q$\"+C8*)***)F/7%$\"+$o-7l\"F/$\"+-,26#)F\\q$\"++1vg*)F/7%$\"+sa DQHF\\q$\"+ZQ(=$>F/$\"+2Df*y)F/7%$!+d_Bo5F/$\"+4]/8IF/$\"+MPa([)F/7%$! +5)\\DT#F/$\"+)f:%[SF/$\"+]>Rd!)F/7%$!+ox5;PF/$\"+)3QA-&F/$\"+@Qo.vF/7 %$!+wh!e&\\F/$\"+D#[%>fF/$\"+B&>G$oF/7%$!+$[()*3hF/$\"+)o,fs'F/$\"+$eF J0'F/7%$!+!=4S:(F/$\"+kzhGuF/$\"+.E!\\<&F/7%$!+RF#32)F/$\"+Wd-;!)F/$\" +$=*Q5UF/7%$!+cq`T))F/$\"++A?y%)F/$\"+A#)ptJF/7%$!+U/%4X*F/$\"+sq42))F /$\"+;lk!3#F/7%$!+Je&p))*F/$\"+>5F`p$!+N\"Hel)F/$!+[/%*>KF/7%$\"+qsvu5F `p$!+c8:#**)F/$!+YWQb@F/7%$\"+#[]g6\"F`p$!+;\"fN>*F/$!+r>2k5F/7%$\"+*> BJ9\"F`p$!+![O6F`p$!+HjuM')F/$\"+5k; SKF/7%$\"+xx#[5\"F`p$!+$H)pn\")F/$\"+=hsAUF/7%$\"+/eue5F`p$!+bY\"=e(F/ $\"+2[PR^F/7%$\"+KrV')**F/$!+s67')oF/$\"+oGsxfF/7%$\"+V'>5D*F/$!+#G:64 'F/$\"+E`iEnF/7%$\"+KM#))Q)F/$!+-mg3_F/$\"+X$RiP(F/7%$\"+8:P4uF/$!+_?b ^UF/$\"+%>a!=zF/7%$\"+C/;CjF/$!+f%))QB$F/$\"+mJ!\\M)F/7%$\"+=BpY^F/$!+ UUOq@F/$\"+j$o4l)F/7%$\"+G%eC*QF/$!+m.Pw5F/$\"+^$*yJ))F/7%$\"+)pi)yDF/ $\"*$[0BKF\\q$\"+&R&G%)))F/7%$\"+!Rw]A\"F/$\"+L\"z#R6F/$\"+Z$)z1))F/7% $!+\\x#=[\"F\\q$\"+95]GAF/$\"+z$f\"*f)F/7%$!+k(\\*=:F/$\"+Z$)p$G$F/$\" +#=yFE)F/7%$!+Y$)QkGF/$\"+&f`*)G%F/$\"+O#[2!yF/7%$!+e\"Q7;%F/$\"+8p%)G _F/$\"+'4dz@(F/7%$!+#)=K'Q&F/$\"+yoo)3'F/$\"+-o=@lF/7%$!+Qp4dF/7%$!+\")=BKvF/$\"+q-a9vF/$\"+$)RqA[F/7%$!+@V=7%)F/$\"+ H[,d!)F/$\"+BkWWQF/7%$!+N]vR\"*F/$\"+>g%GZ)F/$\"+W-)*)z#F/7%$!+zBf+(*F /$\"+l8ja()F/$\"+w/a-1(3\\F/7%$!+xLx*\\)F/$\"+EYgD oF/$!+wm7ReF/7%$!+M9@VwF/$\"+c,XUgF/$!+w%oUn'F/7%$!+(=nHl'F/$\"+1Ufh^F /$!+*=1-S(F/7%$!+$Ho\"[bF/$\"+'RYu>%F/$!+P0<0!)F/7%$!+TW[\\VF/$\"+pDul JF/$!+cktz%)F/7%$!+U[dyIF/$\"+&yVK3#F/$!+b\"Rp\"))F/7%$!+!oavv\"F/$\"+ Y-Du'*F\\q$!+3SK7!*F/7%$!+;$4]3%F\\q$!+,lQQ;F\\q$!+s(QR1*F/7%$\"+cN')p %*F\\q$!+_=e#H\"F/$!+axFs*)F/7%$\"+lh:)G#F/$!+N\"\\5S#F/$!+fs=S()F/7%$ \"+zeS&f$F/$!+`9)>Z$F/$!+!HSFP)F/7%$\"+,n]][F/$!+]`)))[%F/$!+gl3xyF/7% $\"+T$en.'F/$!+)3#GOaF/$!+VdF/7%$\"+/E))R!*F/$!+fcWExF/$!+%e3! =[F/7%$\"+#3Gk\")*F/$!+\\jro#)F/$!+jUG[QF/7%$\"+f#3l/\"F`p$!+0iK'o)F/$ !+_50EGF/7%$\"+?[(y4\"F`p$!+XMqt*)F/$!+5RCnNg; \"F`p$!+8'[*G!*F/$\"+Co%pY\"F/7%$\"+A/;f6F`p$!+z3%*z()F/$\"+,SS6DF/7%$ \"+4mOP6F`p$!+pe%GS)F/$\"+@;'R^$F/7%$\"+Q6!35\"F`p$!+1gx.zF/$\"+q,ygWF /7%$\"+`%o(\\5F`p$!+G2^!H(F/$\"+@u/R`F/7%$\"+(p&RZ)*F/$!+e6OslF/$\"+-J 3PhF/7%$\"+uCij!*F/$!+'*Q-gdF/$\"+W)3W%oF/7%$\"+Zxqa\")F/$!+uzUl[F/$\" +H*)y^uF/7%$\"+RA%48(F/$!+A\"y:!RF/$\"+Q+D^zF/7%$\"+#>>Y+'F/$!+fjR#)GF /$\"++,4O$)F/7%$\"+i'[+z%F/$!+'eiD#=F/$\"+'4()3g)F/7%$\"+?&>N]$F/$!+j@F/$\"+oo@vNF\\q$\"+&R(>b()F/7%$\"+Jre* )yF\\q$\"+%[#4Y9F/$\"+Dx`S')F/7%$!+\\zpyfF\\q$\"+QmI7DF/$\"+Fxj(R)F/7% $!+ca#[(>F/$\"+xEASNF/$\"+7)*=G!)F/7%$!+)H<(=LF/$\"+ml@9XF/$\"+>5gNvF/ 7%$!+iT41YF/$\"+ZO?>aF/$\"+jL6DpF/7%$!+m$pP\"eF/$\"+WZ(3C'F/$\"+Ot!R?' F/7%$!+#z$Q>pF/$\"+>K%f'pF/$\"+W/<\"Q&F/7%$!+_k)>!zF/$\"+muR#e(F/$\"+` H6oWF/7%$!+q&3Eu)F/$\"+`7vz!)F/$\"+&R:zZ$F/7%$!+Zb![U*F/$\"+HEG\\%)F/$ \"++ofDCF/7%$!+)4T^$**F/$\"+66D%o)F/$\"+K')zF8F/7%$!+]*ej-\"F`p$\"+dE3 !y)F/$\"+KT'[-#F\\q7%$!+ONQS5F`p$\"+UE^M()F/$!+#G=UJ*F\\q7%$!+EbMN5F`p $\"+,'ywa)F/$!+)f%[a?F/7%$!+1sR65F`p$\"+5o:A#)F/$!+jF?ZJF/7%$!+V$z2p*F /$\"+s&RHw(F/$!+?%)\\!>%F/7%$!+`6%H4*F/$\"+'4`t<(F/$!+TC=m^F/-%*AXESST YLEG6#%$BOXG" 1 2 0 1 10 0 2 1 1 2 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 11 "count := 0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&countG\"\"!" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 34 "for j from 1 by 1 to time_steps do" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 29 " if (W[1,j]*W[1,j+1]<0) then" }}{PARA 210 "> " 0 " " {MPLTEXT 1 211 23 " count := count + 1;" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 23 " y[count] := W[2,j];" }}{PARA 212 "> " 0 "" {MPLTEXT 1 0 4 " " }{MPLTEXT 1 213 20 "px[count] := W[3,j];" }} {PARA 212 "> " 0 "" {MPLTEXT 1 0 4 " " }{MPLTEXT 1 213 20 "py[count ] := W[4,j];" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 64 " print(count ,j,W[1,j],W[1,j+1],y[count],px[count],py[count]);" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 5 " fi;" }}{PARA 210 "> " 0 "" {MPLTEXT 1 211 4 "en d;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"\"\"#G$\"+;n^kg!#7$!+&4[ur'F '$\"+r#=@(>!#6$!+9\"*Q@5!#5$\"+;BDj&*F," }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"#\"#^$!+^h'R!))!#7$\"++E'G!QF'$\"+,hO*3)F'$\"+-jj05!#5$!+W4p q)*!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"$\"#z$\"+S[*='>!#7$!+9)f G4\"!#6$\"+i`J2BF*$!+7RzK5!#5$\"+%[RNQ*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"%\"$-\"$!+S_2i]!#7$\"+,2vmwF'$\"+lE/oPF'$\"+)Q'y<5! #5$!+$Gy%)z*!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"&\"$H\"$\"+[$\\ !z5!#6$!++/5BA!#7$\"+rsak9F'$!+=O\"p.\"!#5$\"+!)>JU%*F'" }}{PARA 11 " " 1 "" {XPPMATH 20 "6)\"\"'\"$`\"$!+S#=mC\"!#7$\"+\"fC'e6!#6$!*2Ox&[F' $\"+^8]G5!#5$!+#H8cq*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"(\"$!=$ \"+aY'Gm'!#7$!+ok_$['F'$\"+tB\\)z\"!#6$!+')fB]5!#5$\"+Zx#fF*F," }} {PARA 11 "" 1 "" {XPPMATH 20 "6)\"\")\"$.#$!+'yr@.\"!#6$\"+'fKqj#!#7$ \"+%QCUL(F*$\"+Q:\"H.\"!#5$!+p_`v&*F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"*\"$J#$\"+aHmWC!#7$!+P-?\"3\"!#6$\"+.y)37#F*$!+?\\%=1\"!#5$\"+. (fm4*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#5\"$a#$!+,pA.l!#7$\"+%G# Q$e'F'$\"+^fL8JF'$\"+xQeX5!#5$!+#paZ\\*!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#6\"$\"G$\"+f#R<:\"!#6$!+;KCd=!#7$\"+>qD-8F'$!+m(=a1 \"!#5$\"+AqrM\"*F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#7\"$0$$!+:x=4 E!#7$\"+(G\"oe5!#6$!+\\$)fL5F'$\"+p:yc5!#5$!+\"ewNR*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#8\"$K$$\"+\"HhPF(!#7$!+Rc^NiF'$\"+'zSHi\"!#6$!+ $Q`*y5!#5$\"+.gJo*)F," }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#9\"$b$$!+ \"z._>\"!#6$\"+2W$[N\"!#7$\"+Vs//lF*$\"+bS\")f5!#5$!+K&>KE*F'" }} {PARA 11 "" 1 "" {XPPMATH 20 "6)\"#:\"$$Q$\"+saDQH!#7$!+d_Bo5!#6$\"+ZQ (=$>F*$!+j;r!4\"!#5$\"+2Df*y)F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"# ;\"$1%$!+T\"[s0)!#7$\"+LM8$Q&F'$\"+ZH]#R#F'$\"+t7*H2\"!#5$!+'\\1O<*!#6 " }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#<\"$L%$\"+!Rw]A\"!#6$!+\\x#=[\" !#7$\"+L\"z#R6F'$!+^\\n$4\"!#5$\"+Z$)z1))F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#=\"$d%$!+;$4]3%!#7$\"+cN')p%*F'$!+,lQQ;F'$\"+v4l%3\" !#5$!+s(QR1*!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#>\"$%[$\"+Jre*)y !#7$!+\\zpyfF'$\"+%[#4Y9!#6$!+$))et5\"!#5$\"+Dx`S')F," }}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 53 "listplot([seq([y[j],py[j]],j=1..count)],style=point );" }}{PARA 13 "" 1 "" {GLPLOT2D 412 412 412 {PLOTDATA 2 "6$-%'CURVESG 6#757$$\"+r#=@(>!#6$\"+;BDj&*F*7$$\"+,hO*3)!#7$!+W4pq)*F*7$$\"+i`J2BF* $\"+%[RNQ*F*7$$\"+lE/oPF0$!+$Gy%)z*F*7$$\"+rsak9F*$\"+!)>JU%*F*7$$!*2O x&[F0$!+#H8cq*F*7$$\"+tB\\)z\"F*$\"+Zx#fF*F*7$$\"+%QCUL(F0$!+p_`v&*F*7 $$\"+.y)37#F*$\"+.(fm4*F*7$$\"+^fL8JF0$!+#paZ\\*F*7$$\"+>qD-8F*$\"+Aqr M\"*F*7$$!+\\$)fL5F0$!+\"ewNR*F*7$$\"+'zSHi\"F*$\"+.gJo*)F*7$$\"+Vs//l F0$!+K&>KE*F*7$$\"+ZQ(=$>F*$\"+2Df*y)F*7$$\"+ZH]#R#F0$!+'\\1O<*F*7$$\" +L\"z#R6F*$\"+Z$)z1))F*7$$!+,lQQ;F0$!+s(QR1*F*7$$\"+%[#4Y9F*$\"+Dx`S') F*-%&STYLEG6#%&POINTG" 1 5 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 210 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 210 "> " 0 "" {MPLTEXT 1 211 72 "spacecurve([seq([y[j],px [j],py[j]],j=1..count)],style=point,axes=boxed);" }}{PARA 13 "" 1 "" {GLPLOT3D 412 412 412 {PLOTDATA 3 "6%-%'CURVESG6#757%$\"+r#=@(>!#6$!+9 \"*Q@5!#5$\"+;BDj&*F*7%$\"+,hO*3)!#7$\"+-jj05F-$!+W4pq)*F*7%$\"+i`J2BF *$!+7RzK5F-$\"+%[RNQ*F*7%$\"+lE/oPF3$\"+)Q'y<5F-$!+$Gy%)z*F*7%$\"+rsak 9F*$!+=O\"p.\"F-$\"+!)>JU%*F*7%$!*2Ox&[F3$\"+^8]G5F-$!+#H8cq*F*7%$\"+t B\\)z\"F*$!+')fB]5F-$\"+Zx#fF*F*7%$\"+%QCUL(F3$\"+Q:\"H.\"F-$!+p_`v&*F *7%$\"+.y)37#F*$!+?\\%=1\"F-$\"+.(fm4*F*7%$\"+^fL8JF3$\"+xQeX5F-$!+#pa Z\\*F*7%$\"+>qD-8F*$!+m(=a1\"F-$\"+AqrM\"*F*7%$!+\\$)fL5F3$\"+p:yc5F-$ !+\"ewNR*F*7%$\"+'zSHi\"F*$!+$Q`*y5F-$\"+.gJo*)F*7%$\"+Vs//lF3$\"+bS\" )f5F-$!+K&>KE*F*7%$\"+ZQ(=$>F*$!+j;r!4\"F-$\"+2Df*y)F*7%$\"+ZH]#R#F3$ \"+t7*H2\"F-$!+'\\1O<*F*7%$\"+L\"z#R6F*$!+^\\n$4\"F-$\"+Z$)z1))F*7%$!+ ,lQQ;F3$\"+v4l%3\"F-$!+s(QR1*F*7%$\"+%[#4Y9F*$!+$))et5\"F-$\"+Dx`S')F* -%*AXESSTYLEG6#%$BOXG-%&STYLEG6#%&POINTG" 1 5 0 1 10 0 2 1 1 2 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 213 "" 0 " " {TEXT -1 0 "" }}}{EXCHG {PARA 213 "> " 0 "" {MPLTEXT 1 214 45 "H := \+ a^2/2+b^2/2+pa^2/2+pb^2/2+(a^2*b-b^2/3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"HG,,*&\"\"#!\"\"%\"aGF'\"\"\"*&\"\"'F(%\"bGF'F**&F'F(%#paGF' F**&F'F(%#pbGF'F**&)F)F'F*F-F*F*" }}}{EXCHG {PARA 213 "> " 0 "" {MPLTEXT 1 214 29 "V := a^2/2+b^2/2+a^2*b-b^3/3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"VG,**&#\"\"\"\"\"#F(*$)%\"aGF)F(F(F(*&F'F(*$)%\"bGF )F(F(F(*&F+F(F0F(F(*&#F(\"\"$F(*$)F0F4F(F(!\"\"" }}}{EXCHG {PARA 213 " > " 0 "" {MPLTEXT 1 214 27 "Hf := unapply(H,a,b,pa,pb);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%#HfGf*6&%\"aG%\"bG%#paG%#pbG6\"6$%)operatorG%& arrowGF+,,*&#\"\"\"\"\"#F2*$)9$F3F2F2F2*&#F2\"\"'F2*$)9%F3F2F2F2*&F1F2 *$)9&F3F2F2F2*&F1F2*$)9'F3F2F2F2*&F5F2F " 0 "" {MPLTEXT 1 214 21 "Vf := unapply(V,a,b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#VfGf*6$%\"aG%\"bG6\"6$%)operatorG%&arrowGF),**& #\"\"\"\"\"#F0*$)9$F1F0F0F0*&F/F0*$)9%F1F0F0F0*&F3F0F8F0F0*&#F0\"\"$F0 *$)F8F " 0 "" {MPLTEXT 1 0 28 "H f(ic[1],ic[2],ic[3],ic[4]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"++++ +5!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "Vf(ic[1],ic[2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "K := pa^2/2 + pb^2/2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"KG,&*&\"\"#!\"\"%#paGF'\"\"\"*&F'F(%#pbGF'F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "E := V+K;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"EG,.*&\"\"#!\"\"%\"aGF'\"\"\"*&F'F(%\"bGF'F**&)F)F' F*F,F*F**&\"\"$F(F,F0F(*&F'F(%#paGF'F**&F'F(%#pbGF'F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "Ef := unapply(E,a,b,pa,pb);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#EfGf*6&%\"aG%\"bG%#paG%#pbG6\"6$%)o peratorG%&arrowGF+,.*&#\"\"\"\"\"#F2*$)9$F3F2F2F2*&F1F2*$)9%F3F2F2F2*& F5F2F:F2F2*&#F2\"\"$F2*$)F:F>F2F2!\"\"*&F1F2*$)9&F3F2F2F2*&F1F2*$)9'F3 F2F2F2F+F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "Ef(ic[1],ic [2],ic[3],ic[4]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++5!#6" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 213 "" 0 " " {TEXT -1 0 "" }}}{PARA 215 "" 0 "" {TEXT -1 0 "" }}{PARA 216 "" 0 " " {TEXT -1 0 "" }}{PARA 216 "" 0 "" {TEXT -1 0 "" }}{PARA 217 "" 0 "" {TEXT -1 0 "" }}{PARA 218 "" 0 "" {TEXT -1 0 "" }}}{MARK "64 0 0" 0 } {VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }