{VERSION 5 0 "IBM INTEL NT" "5.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 Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 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 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 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 "" {MPLTEXT 1 0 65 "# MAPLE \n\n# KNUDSE N 04.01 prep (EXAMPLE: functions and plotting)\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "restart; " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 87 "f:= t -> 3*sin(t/2); #define a function f of one vari able (the t is a dummy variable!)" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%\"fGf*6#%\"tG6\"6$%)operatorG%&arrowGF(,$*&\"\"$\"\"\"-%$sinG6#,$*&# F/\"\"#F/9$F/F/F/F/F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 91 "f(t); f(anything); f( exp(t^2)^3 ); f(0); f(Pi); f(1); f(1.) ; f( \+ f(t) ); #some evaluations" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$ \"\"\"-%$sinG6#,$*&\"\"#!\"\"%\"tGF&F&F&F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$\"\"\"-%$sinG6#,$*&\"\"#!\"\"%)anythingGF&F&F& F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$\"\"\"-%$sinG6#,$*&#F& \"\"#F&*$)-%$expG6#*$)%\"tGF-F&F%F&F&F&F&F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"$" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$\"\"\"-%$sinG6##F&\"\"#F&F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+;mFQ9!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$\"\"\"-%$sinG6#,$*&#F%\"\"#F&-F(6#,$*&F-!\"\"% \"tGF&F&F&F&F&F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "plot(f) ; #plot the function f (the running variable is implicit here)" }} {PARA 13 "" 1 "" {GLPLOT2D 468 468 468 {PLOTDATA 2 "6%-%'CURVESG6$7`p7 $$!#5\"\"!$\"3C:%*)R#GxwG!#<7$$!3cKLLe%G?y*F-$\"3MY\\R_mE_HF-7$$!3!pmm m\"p0k&*F-$\"3sWy3a%GF*HF-7$$!3QL$3-)*G#p%*F-$\"3gisdq!f#**HF-7$$!3#)* **\\P/,WP*F-$\"3!Q)Hli$[!**HF-7$$!3Im;H2Jdz#*F-$\"3ina\"R!o4#*HF-7$$!3 uKL$3+UyHF-7$$!3s)**\\iId9(*)F-$\"3!)o4>-qEBHF-7$$!3Wm mmT%p\"e()F-$\"3)z!z5w$**[$GF-7$$!3/nmm\"4m(G$)F-$\"3I#\\W=\"F-7$$!3 #RLL3FuF)oF-$\"3E\"=^B%erf))!#=7$$!3Kmm;/siqmF-$\"3q.l>*)pMvdF^p7$$!3S KL$e\\g\"fkF-$\"3IZJ!)GKAOEF^p7$$!3Q****\\(y$pZiF-$!3NO$3(Q&[MK&!#>7$$ !3+mmT&Gu,.'F-$!3m\"=>un]]y$F^p7$$!3jKLL$yaE\"eF-$!3;#>f-XGI*pF^p7$$!3 '*)***\\([j5i&F-$!3%)z3LW`R^(*F^p7$$!3s%HaF-$!3T#=4')RM?C\"F-7$ $!3]******\\$*4)*\\F-$!3Sx8lh'*p(z\"F-7$$!3o******\\_&\\c%F-$!3cI)3Jj% zrAF-7$$!3%)******\\1aZTF-$!3\\c^-<'e%GEF-7$$!31LL3FW,eRF-$!3mJ,bNv\\` FF-7$$!3Imm;/#)[oPF-$!3=fhB9%GQ&GF-7$$!3i***\\P>BJa$F-$!33Ju`lFuRHF-7$ $!3%HLLL=exJ$F-$!3G0fGi'p$))HF-7$$!34LL$3K,BA$F-$!3U^\"4Jidv*HF-7$$!3! GLL$eW%o7$F-$!39leRM%=***HF-7$$!3]KL$ef(QJIF-$!3?N8B>nW&*HF-7$$!3lKLLL 2$f$HF-$!3W#=jAm_T)HF-7$$!3CmmT&o_Qr#F-$!3%3jH\"p0lJHF-7$$!3%)****\\PY x\"\\#F-$!3z%Gn5LRI%GF-7$$!3gLLLL7i)4#F-$!3,it$p+S7g#F-7$$!3o)***\\P'p sm\"F-$!32'y>hiQ6A#F-7$$!3?****\\74_c7F-$!3se$4U![@j****\\ivF@AF^p$!3tK$f)*fq]K$F^p7$$!3]^omm ;zr)*!#?$!3;S\"Htti2[\"F^q7$$\"3aPL$3-Dg5#F^p$\"37p?nzE?`JF^p7$$\"3fVL Lezw5VF^p$\"3%QkmA)>?;kF^p7$$\"3JtmmmJ+IiF^p$\"350ib8$3Y>*F^p7$$\"3-.+ +v$Q#\\\")F^p$\"3]bNGe4%))=\"F-7$$\"3%\\LL$e\"*[H7F-$\"3=_'Qvk\\-t\"F- 7$$\"3=++++dxd;F-$\"3Z<$oa0T:@#F-7$$\"3e+++D0xw?F-$\"3w)))y82dZe#F-7$$ \"35,+]i&p@[#F-$\"3JqAZFtSQGF-7$$\"3b++v=GB2FF-$\"3@gdX!)p_HHF-7$$\"3+ +++vgHKHF-$\"3yQU7*3)e$)HF-7$$\"3Kmm\"zu5M.$F-$\"3M/&)=BBh&*HF-7$$\"3j KL$3UDX8$F-$\"3CECNq7)***HF-7$$\"3&*)**\\P4ScB$F-$\"3G(4sdw$o'*HF-7$$ \"3ElmmmZvOLF-$\"3!3/?iBGd)HF-7$$\"35LLLexn_NF-$\"3n9%RP=^o$HF-7$$\"3% 4+++v+'oPF-$\"3meA5cjx`GF-7$$\"3UKL$eR<*fTF-$\"3e3wOQ$f%>EF-7$$\"3K-++ ])Hxe%F-$\"3WI!e#=kL\\AF-7$$\"3!fmm\"H!o-*\\F-$\"3@5J))*=!42=F-7$$\"3X ,+]7k.6aF-$\"3EYL6EO:n7F-7$$\"3jLLe9as;cF-$\"33\"H))F^p7$$\"3 'eLL$3N1#4(F-$!3os!QK_40=\"F-7$$\"3W-+vo!*R-tF-$!3%))>-'\\B]j9F-7$$\"3 ,pm;HYt7vF-$!3[r[;qLKI " 0 "" {MPLTEXT 1 0 72 "plot(f, -7..7); #plot the function \+ f within a specified horizontal range" }}{PARA 13 "" 1 "" {GLPLOT2D 468 468 468 {PLOTDATA 2 "6%-%'CURVESG6$7en7$$!\"(\"\"!$\"3Yf)oIo\\B0\" !#<7$$!3+nmmT)R[p'F-$\"3L)Q(4d5JJh!#=7$$!3#HL$e>;KHkF-$\"3#)zw_oY4!>#F 37$$!3Lmm;4'=28'F-$!3Si3Gafy%G#F37$$!3vmm;ki8IeF-$!3%3Sfg!fwPnF37$$!3+ LLeMD)4`&F-$!3RH0@l9*=5\"F-7$$!3)om;HtGOD&F-$!3Us#3bkDqZ\"F-7$$!3S*** \\i$\\Wm\\F-$!3iuoB#\\&[N=F-7$$!3Mmm\"H/R%pYF-$!3;m-\")**HQm@F-7$$!3W+ +D^cQtVF-$!3]#)fJGww[CF-7$$!3[KLL[$e)oSF-$!3=')4^x8I$o#F-7$$!3Tmm;M0j+ QF-$!3fxpIaVfQGF-7$$!3!HL$eR+l\\OF-$!3V9;vSNs.HF-7$$!3Q*****\\ap')\\$F -$!3e.\"o*4HJ_HF-7$$!3i******4\"pqM$F-$!3o&)3=17=%)HF-7$$!3')*****\\no a>$F-$!3oS%*=\"e6*)*HF-7$$!3y*****\\ct$\\IF-$!3G4(z)H9\"o*HF-7$$!3q*** **\\XyK!HF-$!3=:#zfcF(yHF-7$$!35L$e*)451x#F-$!3;39x*GP&[HF-7$$!3]mm\"H uTzj#F-$!3Gc4@[vP0HF-7$$!3(HLL$G2VABF-$!3!3e\"\\BL'=v#F-7$$!3oKLL8::b? F-$!3)[;;`FX\"oDF-7$$!3!)***\\iCUUu\"F-$!3'oRV#>\\3(H#F-7$$!3WLLLj[.p9 F-$!3P))Gi!G(o5?F-7$$!3C***\\iu)3n6F-$!3gL33sc&Hl\"F-7$$!3/*)**\\(QYcz )F3$!3e&[0U_FsF\"F-7$$!31ELLeRj&z&F3$!3I(pa(\\4Hs&)F37$$!3NFL$e/'oSIF3 $!3bgQ>M%yMa%F37$$!3/'zmm;a-\"p!#?$!3xBElig`O5!#>7$$\"3=NL$3dPv,$F3$\" 3'Q3?:@`\"4XF37$$\"3!R++D'oY/dF3$\"3t0xSVL:T%)F37$$\"3ERLL3TU1')F3$\"3 c&)\\#pB)[^7F-7$$\"3'********)HWg6F-$\"3%[*e#peFYk\"F-7$$\"3w++]n$RPX \"F-$\"3kHB'*>7g$*>F-7$$\"37,+v$p=vt\"F-$\"3C/RxG]e!H#F-7$$\"3k****\\_ sg_?F-$\"3q?#[=_qhc#F-7$$\"3olmmO$GdL#F-$\"3M#zc(*fX(fFF-7$$\"3t,++D0- QEF-$\"3w41U\"*pS0HF-7$$\"3An;/^8)\\x#F-$\"3#eYAu_R(\\HF-7$$\"3qKL3x@% >\"HF-$\"3oRvUnWC!)HF-7$$\"3Mn;/OlnhIF-$\"3uV:&*[`g(*HF-7$$\"3*>++]*3T 6KF-$\"3;Htc:A<)*HF-7$$\"39M$3xD*H_LF-$\"3?W(ziTmL)HF-7$$\"3ImmT?w=$\\ $F-$\"3!R5/B8iP&HF-7$$\"3RLLealXSOF-$\"3<\"RC#4%er!HF-7$$\"3[++v)[Dxy$ F-$\"3a*eDJ4*zWGF-7$$\"3'pmm;4!pvSF-$\"3K-*pV*HqyEF-7$$\"3M***\\PMirP% F-$\"3'fir]i!\\XCF-7$$\"3oNLL`f^nYF-$\"3W`?9suPo@F-7$$\"31ML$eXWW'\\F- $\"3;@2,:\"ey$=F-7$$\"3momTSU\"*e_F-$\"3;N#))>s>,Z\"F-7$$\"3&=+++R,&Hb F-$\"3e1=$)*edR5\"F-7$$\"3lnm;*zC'ReF-$\"3IS&y1l)**)f'F37$$\"3#RLLL(G+ F37$$\"3=,+DE%4ep' F-$!3a'*>[=raXhF37$$\"\"(F*$!3Yf)oIo\\B0\"F--%'COLOURG6&%$RGBG$\"#5!\" \"$F*F*Fj]l-%+AXESLABELSG6$Q!6\"F^^l-%%VIEWG6$;F(F_]l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 91 "plot(f, -7..7, -2..2); #plot the function f within specified horizontal and vertical ranges" }} {PARA 13 "" 1 "" {GLPLOT2D 468 468 468 {PLOTDATA 2 "6%-%'CURVESG6$7en7 $$!\"(\"\"!$\"3Yf)oIo\\B0\"!#<7$$!3+nmmT)R[p'F-$\"3L)Q(4d5JJh!#=7$$!3# HL$e>;KHkF-$\"3#)zw_oY4!>#F37$$!3Lmm;4'=28'F-$!3Si3Gafy%G#F37$$!3vmm;k i8IeF-$!3%3Sfg!fwPnF37$$!3+LLeMD)4`&F-$!3RH0@l9*=5\"F-7$$!3)om;HtGOD&F -$!3Us#3bkDqZ\"F-7$$!3S***\\i$\\Wm\\F-$!3iuoB#\\&[N=F-7$$!3Mmm\"H/R%pY F-$!3;m-\")**HQm@F-7$$!3W++D^cQtVF-$!3]#)fJGww[CF-7$$!3[KLL[$e)oSF-$!3 =')4^x8I$o#F-7$$!3Tmm;M0j+QF-$!3fxpIaVfQGF-7$$!3!HL$eR+l\\OF-$!3V9;vSN s.HF-7$$!3Q*****\\ap')\\$F-$!3e.\"o*4HJ_HF-7$$!3i******4\"pqM$F-$!3o&) 3=17=%)HF-7$$!3')*****\\noa>$F-$!3oS%*=\"e6*)*HF-7$$!3y*****\\ct$\\IF- $!3G4(z)H9\"o*HF-7$$!3q*****\\XyK!HF-$!3=:#zfcF(yHF-7$$!35L$e*)451x#F- $!3;39x*GP&[HF-7$$!3]mm\"HuTzj#F-$!3Gc4@[vP0HF-7$$!3(HLL$G2VABF-$!3!3e \"\\BL'=v#F-7$$!3oKLL8::b?F-$!3)[;;`FX\"oDF-7$$!3!)***\\iCUUu\"F-$!3'o RV#>\\3(H#F-7$$!3WLLLj[.p9F-$!3P))Gi!G(o5?F-7$$!3C***\\iu)3n6F-$!3gL33 sc&Hl\"F-7$$!3/*)**\\(QYcz)F3$!3e&[0U_FsF\"F-7$$!31ELLeRj&z&F3$!3I(pa( \\4Hs&)F37$$!3NFL$e/'oSIF3$!3bgQ>M%yMa%F37$$!3/'zmm;a-\"p!#?$!3xBElig` O5!#>7$$\"3=NL$3dPv,$F3$\"3'Q3?:@`\"4XF37$$\"3!R++D'oY/dF3$\"3t0xSVL:T %)F37$$\"3ERLL3TU1')F3$\"3c&)\\#pB)[^7F-7$$\"3'********)HWg6F-$\"3%[*e #peFYk\"F-7$$\"3w++]n$RPX\"F-$\"3kHB'*>7g$*>F-7$$\"37,+v$p=vt\"F-$\"3C /RxG]e!H#F-7$$\"3k****\\_sg_?F-$\"3q?#[=_qhc#F-7$$\"3olmmO$GdL#F-$\"3M #zc(*fX(fFF-7$$\"3t,++D0-QEF-$\"3w41U\"*pS0HF-7$$\"3An;/^8)\\x#F-$\"3# eYAu_R(\\HF-7$$\"3qKL3x@%>\"HF-$\"3oRvUnWC!)HF-7$$\"3Mn;/OlnhIF-$\"3uV :&*[`g(*HF-7$$\"3*>++]*3T6KF-$\"3;Htc:A<)*HF-7$$\"39M$3xD*H_LF-$\"3?W( ziTmL)HF-7$$\"3ImmT?w=$\\$F-$\"3!R5/B8iP&HF-7$$\"3RLLealXSOF-$\"3<\"RC #4%er!HF-7$$\"3[++v)[Dxy$F-$\"3a*eDJ4*zWGF-7$$\"3'pmm;4!pvSF-$\"3K-*pV *HqyEF-7$$\"3M***\\PMirP%F-$\"3'fir]i!\\XCF-7$$\"3oNLL`f^nYF-$\"3W`?9s uPo@F-7$$\"31ML$eXWW'\\F-$\"3;@2,:\"ey$=F-7$$\"3momTSU\"*e_F-$\"3;N#)) >s>,Z\"F-7$$\"3&=+++R,&HbF-$\"3e1=$)*edR5\"F-7$$\"3lnm;*zC'ReF-$\"3IS& y1l)**)f'F37$$\"3#RLLL(G+F37$$\"3=,+DE%4ep'F-$!3a'*>[=raXhF37$$\"\"(F*$!3Yf)oIo\\B0\"F-- %'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fj]l-%+AXESLABELSG6$Q!6\"F^^l-%%VIEWG6 $;F(F_]l;$!\"#F*$\"\"#F*" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 148 "plot(f(t), t=-2*Pi..2*Pi, 'position'=-3..3); #plot the function f wit hin a explicitly specified axes-labels and their horizontal and vertic al ranges" }}{PARA 13 "" 1 "" {GLPLOT2D 470 470 470 {PLOTDATA 2 "6%-%' CURVESG6$7en7$$!3)****>YH&=$G'!#<$!3AjRsvz$R)=!#D7$$!3dp3dxTF4gF*$!3'* o_jDZ$e4%!#=7$$!3W07Azb%4x&F*$!3'*yZ?Xq')*f(F37$$!3[DqOW,#H]&F*$!3;)ev D6L49\"F*7$$!3()o*[H1=JB&F*$!3E>bB&HEP]\"F*7$$!3gAxs.$)fk\\F*$!3WF)oDr vw$=F*7$$!3/sy+9hk:ZF*$!3?EX1?G'y6#F*7$$!3ellUT0(yX%F*$!3A$>8Gs&RtBF*7 $$!3!>@6bny7>%F*$!35=DsZy?'f#F*7$$!3/t34t_OF*$!3y^(zHWgF!HF*7$$!3:T&yWM==`$F*$!3\"H^(*GRxI%HF*7$$!35AGA$)z V6MF*$!37LLU5_tsHF*7$$!3!***)f%3#=fF$F*$!3y)fm]GOK*HF*7$$!3pxppL%)RSJF *$!3g$e*=l%*****HF*7$$!3.2%=bq!f#F*7$$!38\"Hq4o*pW=F*$!35kRq3!p5R#F*7$$!3%zq%)f-PH@%pP=F*7$$!3YT1&oSwv/\"F*$!3YMg,@@\\+:F* 7$$!3q(\\-)>P&\\*yF3$!3='o#zues`6F*7$$!3WCVrl)[@?&F3$!30\"QycZJbr(F37$ $!3S5B'pS8$HFF3$!3;$)3r=]F\"3%F37$$!3.VX:B'HE?'!#?$!3xPzF?&HRI*Fct7$$ \"3b6>V%QN&3FF3$\"3)3EJya&R]SF37$$\"3H.`,suJ?^F3$\"3mn!*4d!\\of(F37$$ \"30FZ`*>3^s(F3$\"3<3)pu0n,8\"F*7$$\"3)y$=+!>6;/\"F*$\"3'*eD)>EPF\\\"F *7$$\"3tD!)H-M([I\"F*$\"3(33>kFt8#=F*7$$\"3oO`QHJff:F*$\"3=XJ?RVS4@F*7 $$\"3g&>\"zdfTU=F*$\"3Ov#Q?d)**)Q#F*7$$\"3M=t;[[a'4#F*$\"3Wuw_>qo*f#F* 7$$\"3!3Rp8o\")yO#F*$\"3QJFsy**HyFF*7$$\"3q#RL3=`Ph#F*$\"3[#f#H1Y7'*GF *7$$\"31er(oUa\"[FF*$\"3r>t@S$R@%HF*7$$\"3SB4#HnbD)GF*$\"3[bBd'fs[(HF* 7$$\"3IySJrn,4IF*$\"3/(pSkF6M*HF*7$$\"3>LsqpyZNJF*$\"3a)pU&yf)***HF*7$ $\"3Y&GPc:mwE$F*$\"3gM!)[D:/%*HF*7$$\"3sPtcTW&)*R$F*$\"3![N#3bD-vHF*7$ $\"3CVG)Gl#4HNF*$\"3u8'RQLnQ%HF*7$$\"3u[$)>k3LeOF*$\"3T)oS@*QU+HF*7$$ \"3+;\\MC<$*GRF*$\"3ifr$H;B0x#F*7$$\"3Oz6M9Db*=%F*$\"3cf\"y/H/vf#F*7$$ \"3o8rS9\\2cWF*$\"3qCC+(>U]P#F*7$$\"3wWiVu.R?ZF*$\"31#fa(Hm\"G6#F*7$$ \"3Im7YJ)oK'\\F*$\"3CVe,z:DR=F*7$$\"3M`<._\\jT_F*$\"3o.\\O2\"eE\\\"F*7 $$\"3w8mpG*31\\&F*$\"332lK!f!*z:\"F*7$$\"3Ql7(o6ngv&F*$\"3MC+U3YH&=$G'F*$\"3AjRsvz$R)=F --%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"!Fj]lFi]l-%+AXESLABELSG6$Q\"t6\"Q)po sitionF_^l-%%VIEWG6$;$!+3`=$G'!\"*$\"+3`=$G'Fg^l;$!\"$Fj]l$\"\"$Fj]l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 143 "Diff( f(t),t) = diff( f(t) \+ ,t );\nplot( diff( f(t) ,t ) , t=-2*Pi..2*Pi, 'velocity'=-3..3, thickn ess=3, color=blue); #plot the t-derivative of f" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%%DiffG6$,$*&\"\"$\"\"\"-%$sinG6#,$*&\"\"#!\"\"%\"tGF *F*F*F*F2,$*&#F)F0F*-%$cosGF-F*F*" }}{PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6'-%'CURVESG6#7en7$$!3)****>YH&=$G'!#<$!3++++++++ :F*7$$!3ANa4O(Hi9'F*$!3;1@uoW['\\\"F*7$$!3dp3dxTF4gF*$!3mSy'[Naf[\"F*7 $$!3]PgRy)4,*eF*$!3c@6bny7>%F*$!3c?i&=Gdh^(FZ7$$!3/t34t_OF*$!3?Gl%QOz!)y$FZ7$$!35AGA$)zV6MF*$!3E&GIg= 0x,#FZ7$$!3pxppL%)RSJF*$\"3!eE#)Qm[m&*)!#@7$$!3OO)R(pfCoGF*$\"3to'[\"y NsV?FZ7$$!3In=4Um(fg#F*$\"3K,*Q(fKFpRFZ7$$!3=$*otm4\"yO#F*$\"3[x)>fUj' fcFZ7$$!3I;D'G%*3Y3#F*$\"3'y^rQ$HZjvFZ7$$!38\"Hq4o*pW=F*$\"3qu=6LUBf!* FZ7$$!3%zq%)fP&\\*yFZ$\"3u_(=7WSY Q\"F*7$$!3WCVrl)[@?&FZ$\"3O=gYENa\\9F*7$$!3U<$Qj8Jd'RFZ$\"3M1WS@$31Z\" F*7$$!3S5B'pS8$HFFZ$\"3yR\"))G]ag[\"F*7$$!3#z#pf^)pcR\"FZ$\"3E'RF+=\\j \\\"F*7$$!3.VX:B'HE?'!#?$\"3]61R'y#***\\\"F*7$$\"31$=+TaaKK\"FZ$\"3IL? jn!=n\\\"F*7$$\"3b6>V%QN&3FFZ$\"3KP*\\Hqli[\"F*7$$\"3U2OAGkU9RFZ$\"3m4 Uep9Or9F*7$$\"3H.`,suJ?^FZ$\"3uI4X?)46X\"F*7$$\"30FZ`*>3^s(FZ$\"3Or:lK $*[*Q\"F*7$$\"3)y$=+!>6;/\"F*$\"39o'[4#z7,8F*7$$\"3tD!)H-M([I\"F*$\"3U H3Ln,\">>\"F*7$$\"3oO`QHJff:F*$\"3/`xu#*[em5F*7$$\"3g&>\"zdfTU=F*$\"3U N#4NnzG2*FZ7$$\"3M=t;[[a'4#F*$\"3+Q'HFZ7$$\"3>LsqpyZNJF*$\"3!RQpqw!3'e%Fct7$$\"3sPtcTW&)*R$F*$! 3e<))\\?[eJ>FZ7$$\"3u[$)>k3LeOF*$!3>[%=h&>cKQFZ7$$\"3+;\\MC<$*GRF*$!3S 9Xq9vp`dFZ7$$\"3Oz6M9Db*=%F*$!3\\gR)3!3&\\](FZ7$$\"3o8rS9\\2cWF*$!3Ss! =!Qb-k\"*FZ7$$\"3wWiVu.R?ZF*$!3AmsA_]*[1\"F*7$$\"3Im7YJ)oK'\\F*$!3]m6# QvE]=\"F*7$$\"3M`<._\\jT_F*$!3)**4gHi]6I\"F*7$$\"3w8mpG*31\\&F*$!37*** f$R,v$Q\"F*7$$\"3Ql7(o6ngv&F*$!3U^\"GyK.#[9F*7$$\"3YJOw&z0J)eF*$!3[e-C =!)3q9F*7$$\"3b(*fluW95gF*$!3E8Z+HL/'[\"F*7$$\"3w)*zj%)[mYhF*$!3O:cOkn ]'\\\"F*7$$\"3)****>YH&=$G'F*F+-%*THICKNESSG6#\"\"$-%'COLOURG6&%$RGBG$ \"\"!Fi]lFh]l$\"*++++\"!\")-%+AXESLABELSG6$Q\"t6\"Q)velocityFa^l-%%VIE WG6$;$!+3`=$G'!\"*$\"+3`=$G'Fi^l;$!\"$Fi]l$Fc]lFi]l" 1 2 0 1 10 3 2 6 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "f2:=t -> f(t+1); # define a new function usin g an old one\nf2(t); f2(1); f2(1.); " }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#>%#f2Gf*6#%\"tG6\"6$%)operatorG%&arrowGF(-%\"fG6#,&9$\"\"\"F1F1F(F(F (" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$\"\"\"-%$sinG6#,&*&\"\"# !\"\"%\"tGF&F&#F&F,F&F&F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"$ \"\"\"-%$sinG6#F&F&F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+aHTCD!\"* " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "plot(f2(t), t=-2*Pi..2* Pi, 'position'=-3..3);" }}{PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6%-%'CURVESG6$7en7$$!3)****>YH&=$G'!#<$!37?dMKmFQ9F*7$$!3 dp3dxTF4gF*$!3;1y+ZAD%y\"F*7$$!3W07Azb%4x&F*$!37g*R:T6$e?F*7$$!3[DqOW, #H]&F*$!3hDd3nbYJBF*7$$!3()o*[H1=JB&F*$!3OY3eE\\>kDF*7$$!3gAxs.$)fk\\F *$!3#pY,>Ci&\\FF*7$$!3/sy+9hk:ZF*$!3wlULb&ps(GF*7$$!3O=srF$ene%F*$!3Tu N\")H;*f#HF*7$$!3ellUT0(yX%F*$!35/..@iciHF*7$$!3v)))o%3YdCVF*$!3Y%>$\\ dGX()HF*7$$!3!>@6bny7>%F*$!3'>y@[Gu!**HF*7$$!3/U5IC-TeSF*$!3EYOJIcS(*H F*7$$!3/t34tx7D)HF*7$$!3SmDTR-())y$F*$!3Q\"Rk$))eY`HF*7$ $!3wfUt0()>_OF*$!3W@<'RMK1\"HF*7$$!35AGA$)zV6MF*$!3zPk*3Y)G-GF*7$$!3px ppL%)RSJF*$!3&)o)3rS))=j#F*7$$!3OO)R(pfCoGF*$!3$)R,,VRB7CF*7$$!3In=4Um (fg#F*$!3!=[CVg/$e@F*7$$!3=$*otm4\"yO#F*$!3?>Zfa]Z&*=F*7$$!3I;D'G%*3Y3 #F*$!3cRLipNL[:F*7$$!38\"Hq4o*pW=F*$!3nR[+;[rH7F*7$$!3%zq%)f7$$!3q(\\-)>P&\\*yFer$\"3op9*opU<:$Fer7$$!3WCVrl)[@?&Fer$\" 3)3\\_$Ry%z7(Fer7$$!3S5B'pS8$HFFer$\"3_ZZ@#QRn1\"F*7$$!3.VX:B'HE?'!#?$ \"38B9tKZ5I9F*7$$\"3b6>V%QN&3FFer$\"3!z'\\W?Jc!y\"F*7$$\"3H.`,suJ?^Fer $\"3%yTp-W%3e?F*7$$\"30FZ`*>3^s(Fer$\"3d15/X#GTK#F*7$$\"3)y$=+!>6;/\"F *$\"3CQu=*4)edDF*7$$\"3tD!)H-M([I\"F*$\"38O$fRxp7u#F*7$$\"3oO`QHJff:F* $\"3sffSPD(Q(GF*7$$\"39m#)eVX+,\"zdfTU=F *$\"3y\\W.Kv\\mHF*7$$\"3)pDzHS![p>F*$\"3)3)Hso$)*)))HF*7$$\"3M=t;[[a'4 #F*$\"3M@>)G/R#**HF*7$$\"3ea$oZE8AB#F*$\"3g\"RQ6*4#p*HF*7$$\"3!3Rp8o\" )yO#F*$\"396]5bz\"3)HF*7$$\"3w\"R,6V<3\\#F*$\"3#oh.O&=QaHF*7$$\"3q#RL3 =`Ph#F*$\"3f([#QEny;HF*7$$\"3SB4#HnbD)GF*$\"39Z)='[$fkz#F*7$$\"3>Lsqpy ZNJF*$\"3:n$o\"\\F8PEF*7$$\"3sPtcTW&)*R$F*$\"3zX`)ppk 3LeOF*$\"3!*eO#Q\"e(y<#F*7$$\"3+;\\MC<$*GRF*$\"3-Ok64*o'z=F*7$$\"3Oz6M 9Db*=%F*$\"3%4pwPX6*f:F*7$$\"3o8rS9\\2cWF*$\"3sHP(*R?g07F*7$$\"3wWiVu. R?ZF*$\"3*f,E!GE&4L)Fer7$$\"3Im7YJ)oK'\\F*$\"376V^K$4$yZFer7$$\"3M`<._ \\jT_F*$\"3<'o/_%\\5KiF`s7$$\"3w8mpG*31\\&F*$!3/f$*3G'zd5$Fer7$$\"3Ql7 (o6ngv&F*$!39)G'==8KFqFer7$$\"3b(*fluW95gF*$!3YH/[weem5F*7$$\"3)****>Y H&=$G'F*$!3p(\\z#*fw#Q9F*-%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"!Fj]lFi]l-%+ AXESLABELSG6$Q\"t6\"Q)positionF_^l-%%VIEWG6$;$!+3`=$G'!\"*$\"+3`=$G'Fg ^l;$!\"$Fj]l$\"\"$Fj]l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 " f3:=t -> f(t)+1;\nplot(f3(t), t=-2*Pi..2*Pi, 'position'=-3..3);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#f3Gf*6#%\"tG6\"6$%)operatorG%&arrow GF(,&-%\"fG6#9$\"\"\"F1F1F(F(F(" }}{PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6%-%'CURVESG6$7en7$$!3)****>YH&=$G'!#<$\"2G?1;\")**** ***F*7$$!3dp3dxTF4gF*$\"3/JZOu_;/f!#=7$$!3W07Azb%4x&F*$\"3/@_zaH8+CF27 $$!3[DqOW,#H]&F*$!3g\")evD6L49F27$$!3()o*[H1=JB&F*$!3h#>bB&HEP]F27$$!3 gAxs.$)fk\\F*$!3Yu#)oDrvw$)F27$$!3/sy+9hk:ZF*$!3?EX1?G'y6\"F*7$$!3ellU T0(yX%F*$!3A$>8Gs&Rt8F*7$$!3!>@6bny7>%F*$!35=DsZy?'f\"F*7$$!3/t34t_OF*$!3y^(zHWgF!>F*7$$!3:T&yWM==`$F*$!3 \"H^(*GRxI%>F*7$$!35AGA$)zV6MF*$!37LLU5_ts>F*7$$!3!***)f%3#=fF$F*$!3y) fm]GOK*>F*7$$!3pxppL%)RSJF*$!3g$e*=l%*****>F*7$$!3.2%=F*7$$!3OO)R(pfCoGF*$!3]A_?&=C?(>F*7$$!3%=&e\"fI6rt#F*$!3!4WF*7$$!3In=4Um(fg#F*$!3w3v(GwfI*=F*7$$!3=$*otm4\"yO#F*$!3!RUd$e*f#ybq!f\"F*7$$!38\"Hq4o*pW=F*$!35kRq3!p5R\"F* 7$$!3%zq%)f-PH@%pP)F27$$! 3YT1&oSwv/\"F*$!3kW.;57#\\+&F27$$!3q(\\-)>P&\\*yF2$!3zho#zues`\"F27$$! 3WCVrl)[@?&F2$\"3'*=;KC&oWG#F27$$!3S5B'pS8$HFF2$\"3G;\"*G\")\\s=fF27$$ !3.VX:B'HE?'!#?$\"3!3A(z/2'p!**F27$$\"3b6>V%QN&3FF2$\"3.EJya&R]S\"F*7$ $\"3H.`,suJ?^F2$\"3m1*4d!\\of3^s(F2$\"3<3)pu0n,8#F*7$$ \"3)y$=+!>6;/\"F*$\"3=fD)>EPF\\#F*7$$\"3tD!)H-M([I\"F*$\"3(33>kFt8#GF* 7$$\"3oO`QHJff:F*$\"3=XJ?RVS4JF*7$$\"3g&>\"zdfTU=F*$\"3Ov#Q?d)**)Q$F*7 $$\"3M=t;[[a'4#F*$\"3Wuw_>qo*f$F*7$$\"3!3Rp8o\")yO#F*$\"3QJFsy**HyPF*7 $$\"3q#RL3=`Ph#F*$\"3[#f#H1Y7'*QF*7$$\"31er(oUa\"[FF*$\"3r>t@S$R@%RF*7 $$\"3SB4#HnbD)GF*$\"3[bBd'fs[(RF*7$$\"3IySJrn,4IF*$\"3/(pSkF6M*RF*7$$ \"3>LsqpyZNJF*$\"3a)pU&yf)***RF*7$$\"3Y&GPc:mwE$F*$\"3gM!)[D:/%*RF*7$$ \"3sPtcTW&)*R$F*$\"3![N#3bD-vRF*7$$\"3CVG)Gl#4HNF*$\"3u8'RQLnQ%RF*7$$ \"3u[$)>k3LeOF*$\"3T)oS@*QU+RF*7$$\"3+;\\MC<$*GRF*$\"3ifr$H;B0x$F*7$$ \"3Oz6M9Db*=%F*$\"3cf\"y/H/vf$F*7$$\"3o8rS9\\2cWF*$\"3qCC+(>U]P$F*7$$ \"3wWiVu.R?ZF*$\"31#fa(Hm\"G6$F*7$$\"3Im7YJ)oK'\\F*$\"3CVe,z:DRGF*7$$ \"3M`<._\\jT_F*$\"3o.\\O2\"eE\\#F*7$$\"3w8mpG*31\\&F*$\"332lK!f!*z:#F* 7$$\"3Ql7(o6ngv&F*$\"3K-?%3YH&=$G'F*$\"3$)z$R)=+++5F*-%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"! Fi]lFh]l-%+AXESLABELSG6$Q\"t6\"Q)positionF^^l-%%VIEWG6$;$!+3`=$G'!\"*$ \"+3`=$G'Ff^l;$!\"$Fi]l$\"\"$Fi]l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "tnew:=t -> t+1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% %tnewGf*6#%\"tG6\"6$%)operatorG%&arrowGF(,&9$\"\"\"F.F.F(F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "fnew:= tnew -> f(tnew)+1;" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%fnewGf*6#%%tnewG6\"6$%)operatorG%& arrowGF(,&-%\"fG6#9$\"\"\"F1F1F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot( fnew(tnew), tnew=-2*Pi..2*Pi, 'position'=-3..3 \+ );" }}{PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6%-%'CURVESG 6$7en7$$!3)****>YH&=$G'!#<$\"2G?1;\")*******F*7$$!3dp3dxTF4gF*$\"3/JZO u_;/f!#=7$$!3W07Azb%4x&F*$\"3/@_zaH8+CF27$$!3[DqOW,#H]&F*$!3g\")evD6L4 9F27$$!3()o*[H1=JB&F*$!3h#>bB&HEP]F27$$!3gAxs.$)fk\\F*$!3Yu#)oDrvw$)F2 7$$!3/sy+9hk:ZF*$!3?EX1?G'y6\"F*7$$!3ellUT0(yX%F*$!3A$>8Gs&Rt8F*7$$!3! >@6bny7>%F*$!35=DsZy?'f\"F*7$$!3/t34t_OF*$!3y^(zHWgF!>F*7$$!3:T&yWM==`$F*$!3\"H^(*GRxI%>F*7$$!35AGA$)zV6M F*$!37LLU5_ts>F*7$$!3!***)f%3#=fF$F*$!3y)fm]GOK*>F*7$$!3pxppL%)RSJF*$! 3g$e*=l%*****>F*7$$!3.2%=F*7$$!3OO)R(pfCoGF*$!3]A _?&=C?(>F*7$$!3%=&e\"fI6rt#F*$!3!4WF*7$$!3In=4Um(fg#F*$!3w3v(G wfI*=F*7$$!3=$*otm4\"yO#F*$!3!RUd$e*f#yb q!f\"F*7$$!38\"Hq4o*pW=F*$!35kRq3!p5R\"F*7$$!3%zq%)f-PH@%pP)F27$$!3YT1&oSwv/\"F*$!3kW.;57#\\+&F 27$$!3q(\\-)>P&\\*yF2$!3zho#zues`\"F27$$!3WCVrl)[@?&F2$\"3'*=;KC&oWG#F 27$$!3S5B'pS8$HFF2$\"3G;\"*G\")\\s=fF27$$!3.VX:B'HE?'!#?$\"3!3A(z/2'p! **F27$$\"3b6>V%QN&3FF2$\"3.EJya&R]S\"F*7$$\"3H.`,suJ?^F2$\"3m1*4d!\\of 3^s(F2$\"3<3)pu0n,8#F*7$$\"3)y$=+!>6;/\"F*$\"3=fD)>EPF \\#F*7$$\"3tD!)H-M([I\"F*$\"3(33>kFt8#GF*7$$\"3oO`QHJff:F*$\"3=XJ?RVS4 JF*7$$\"3g&>\"zdfTU=F*$\"3Ov#Q?d)**)Q$F*7$$\"3M=t;[[a'4#F*$\"3Wuw_>qo* f$F*7$$\"3!3Rp8o\")yO#F*$\"3QJFsy**HyPF*7$$\"3q#RL3=`Ph#F*$\"3[#f#H1Y7 '*QF*7$$\"31er(oUa\"[FF*$\"3r>t@S$R@%RF*7$$\"3SB4#HnbD)GF*$\"3[bBd'fs[ (RF*7$$\"3IySJrn,4IF*$\"3/(pSkF6M*RF*7$$\"3>LsqpyZNJF*$\"3a)pU&yf)***R F*7$$\"3Y&GPc:mwE$F*$\"3gM!)[D:/%*RF*7$$\"3sPtcTW&)*R$F*$\"3![N#3bD-vR F*7$$\"3CVG)Gl#4HNF*$\"3u8'RQLnQ%RF*7$$\"3u[$)>k3LeOF*$\"3T)oS@*QU+RF* 7$$\"3+;\\MC<$*GRF*$\"3ifr$H;B0x$F*7$$\"3Oz6M9Db*=%F*$\"3cf\"y/H/vf$F* 7$$\"3o8rS9\\2cWF*$\"3qCC+(>U]P$F*7$$\"3wWiVu.R?ZF*$\"31#fa(Hm\"G6$F*7 $$\"3Im7YJ)oK'\\F*$\"3CVe,z:DRGF*7$$\"3M`<._\\jT_F*$\"3o.\\O2\"eE\\#F* 7$$\"3w8mpG*31\\&F*$\"332lK!f!*z:#F*7$$\"3Ql7(o6ngv&F*$\"3K-?%3YH&=$G'F*$\"3$)z$R)=+++5 F*-%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"!Fi]lFh]l-%+AXESLABELSG6$Q%tnew6\"Q )positionF^^l-%%VIEWG6$;$!+3`=$G'!\"*$\"+3`=$G'Ff^l;$!\"$Fi]l$\"\"$Fi] l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" } }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot( fnew(tnew(t)), t=-2 *Pi..2*Pi, 'position'=-3..3 );" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6%-%'CURVESG6$7e n7$$!3)****>YH&=$G'!#<$!3=,sXBjw#Q%!#=7$$!3dp3dxTF4gF*$!3eh!y+ZAD%yF-7 $$!3W07Azb%4x&F*$!37g*R:T6$e5F*7$$!3[DqOW,#H]&F*$!3hDd3nbYJ8F*7$$!3()o *[H1=JB&F*$!3OY3eE\\>k:F*7$$!3gAxs.$)fk\\F*$!3#pY,>Ci&\\F*7$$!3ellUT0(yX%F *$!35/..@ici>F*7$$!3v)))o%3YdCVF*$!3Y%>$\\dGX()>F*7$$!3!>@6bny7>%F*$!3 '>y@[Gu!**>F*7$$!3/U5IC-TeSF*$!3EYOJIcS(*>F*7$$!3/t34tx7 D)>F*7$$!3SmDTR-())y$F*$!3Q\"Rk$))eY`>F*7$$!3wfUt0()>_OF*$!3W@<'RMK1\" >F*7$$!35AGA$)zV6MF*$!3zPk*3Y)G-=F*7$$!3pxppL%)RSJF*$!3&)o)3rS))=j\"F* 7$$!3OO)R(pfCoGF*$!3$)R,,VRB79F*7$$!3In=4Um(fg#F*$!3!=[CVg/$e6F*7$$!3= $*otm4\"yO#F*$!35#>Zfa]Z&*)F-7$$!3I;D'G%*3Y3#F*$!3m&RLipNL[&F-7$$!38\" Hq4o*pW=F*$!3s'R[+;[rH#F-7$$!3%zq%)f P&\\*yF-$\"3'o9*opU<:8F*7$$!3WCVrl)[@?&F-$\"34\\_$Ry%z7V%QN&3F F-$\"3on\\W?Jc!y#F*7$$\"3H.`,suJ?^F-$\"3%yTp-W%3eIF*7$$\"30FZ`*>3^s(F- $\"3d15/X#GTK$F*7$$\"3)y$=+!>6;/\"F*$\"3CQu=*4)edNF*7$$\"3tD!)H-M([I\" F*$\"38O$fRxp7u$F*7$$\"3oO`QHJff:F*$\"3sffSPD(Q(QF*7$$\"39m#)eVX+,\"zdfTU=F*$\"3y\\W.Kv\\mRF*7$$\"3)pDzHS![p>F *$\"3)3)Hso$)*)))RF*7$$\"3M=t;[[a'4#F*$\"3M@>)G/R#**RF*7$$\"3ea$oZE8AB #F*$\"3g\"RQ6*4#p*RF*7$$\"3!3Rp8o\")yO#F*$\"396]5bz\"3)RF*7$$\"3w\"R,6 V<3\\#F*$\"3#oh.O&=QaRF*7$$\"3q#RL3=`Ph#F*$\"3f([#QEny;RF*7$$\"3SB4#Hn bD)GF*$\"39Z)='[$fkz$F*7$$\"3>LsqpyZNJF*$\"3:n$o\"\\F8POF*7$$\"3sPtcTW &)*R$F*$\"3zX`)ppk3LeOF*$\"3!*eO#Q\"e(y<$F*7$$\"3+;\\ MC<$*GRF*$\"3-Ok64*o'zGF*7$$\"3Oz6M9Db*=%F*$\"3%4pwPX6*fDF*7$$\"3o8rS9 \\2cWF*$\"3%*HP(*R?g0AF*7$$\"3wWiVu.R?ZF*$\"3g,E!GE&4L=F*7$$\"3Im7YJ)o K'\\F*$\"3AJ9DL4$yZ\"F*7$$\"3M`<._\\jT_F*$\"3wY?X\\5Ki5F*7$$\"3w8mpG*3 1\\&F*$\"3'4k5>P?U*oF-7$$\"3Ql7(o6ngv&F*$\"3'=r8=oyE(HF-7$$\"3b(*fluW9 5gF*$!3CYH/[weem!#>7$$\"3)****>YH&=$G'F*$!3#p(\\z#*fw#Q%F--%'COLOURG6& %$RGBG$\"#5!\"\"$\"\"!Fj]lFi]l-%+AXESLABELSG6$Q\"t6\"Q)positionF_^l-%% VIEWG6$;$!+3`=$G'!\"*$\"+3`=$G'Fg^l;$!\"$Fj]l$\"\"$Fj]l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "F := (A,B,C,t) -> A*t^2+B*t+C; #define a \+ function of 4 parameters" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FGf*6& %\"AG%\"BG%\"CG%\"tG6\"6$%)operatorG%&arrowGF+,(*&9$\"\"\")9'\"\"#F2F2 *&9%F2F4F2F29&F2F+F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "F (1,0,3,t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*$)%\"tG\"\"#\"\"\"F( \"\"$F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "F(this,that,some thing_else,stuff);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,(*&%%thisG\"\" \")%&stuffG\"\"#F&F&*&%%thatGF&F(F&F&%/something_elseGF&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "g1:= t -> F(1,0,3,t); g1(t);\ng2:= \+ t -> F(1,1,3,t); g2(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#g1Gf*6#% \"tG6\"6$%)operatorG%&arrowGF(-%\"FG6&\"\"\"\"\"!\"\"$9$F(F(F(" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#,&*$)%\"tG\"\"#\"\"\"F(\"\"$F(" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#g2Gf*6#%\"tG6\"6$%)operatorG%&arrow GF(-%\"FG6&\"\"\"F/\"\"$9$F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,( *$)%\"tG\"\"#\"\"\"F(F&F(\"\"$F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "plot([g1,g2],color=[red, blue], thickness=[1,3]);" }} {PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6&-%'CURVESG6%7S7$ $!#5\"\"!$\"$.\"F*7$$!3!pmmm\"p0k&*!#<$\"3'3&R_q%=rW*!#;7$$!3uKL$3`0(zF37$$!3/nmm\"4m(G $)F0$\"3.X'p4YMoB(F37$$!3OLL$3i.9!zF0$\"3?6=$z\"z@VlF37$$!3fmm;/R=0vF0 $\"3zSi`V&yF$fF37$$!3k++]P8#\\4(F0$\"3&)z7`y3zL`F37$$!3Kmm;/siqmF0$\"3 cRopHns\\ZF37$$!3Q****\\(y$pZiF0$\"3#)3mBmxO.UF37$$!3jKLL$yaE\"eF0$\"3 1(y?Ic&pyOF37$$!3s%HaF0$\"3/j\"3!Go\"zC$F37$$!3]******\\$*4)*\\ F0$\"3#>/Z7r*4)z#F37$$!3o******\\_&\\c%F0$\"3!eD]Mk\")QQ#F37$$!3%)**** **\\1aZTF0$\"3?U-MW$4--#F37$$!3Imm;/#)[oPF0$\"3[IV\\M.:?v+9F37$$!3lKLLL2$f$HF0$\"3/?J4F*o>;\"F37$$!3%)****\\ PYx\"\\#F0$\"3Ub#)3W3%*3#*F07$$!3gLLLL7i)4#F0$\"3dAv*436US(F07$$!3o)** *\\P'psm\"F0$\"3Ux$HT/)yzdF07$$!3?****\\74_c7F0$\"3OI)\\N![%)yXF07$$!3 M:LL$3x%z#)!#=$\"3O:Wt2u\\&o$F07$$!3()HLL3s$QM%Fer$\"3%4,Dp@*o)=$F07$$ !3]^omm;zr)*!#?$\"3,52F_u4+IF07$$\"3fVLLezw5VFer$\"35Mf!R?Fe=$F07$$\"3 -.++v$Q#\\\")Fer$\"31Fd#4'35kOF07$$\"3%\\LL$e\"*[H7F0$\"3[7#f/fV;^%F07 $$\"3=++++dxd;F0$\"3U!\\5:F?#[dF07$$\"3e+++D0xw?F0$\"3Ny(3N\"e(HJ(F07$ $\"35,+]i&p@[#F0$\"3)pW,qtl6;*F07$$\"3++++vgHKHF0$\"3eSg9Fg$)f6F37$$\" 3ElmmmZvOLF0$\"3?rsGPKR89F37$$\"3%4+++v+'oPF0$\"39d+Hh^B?rbBG7,@%F37$$\"3; NLLL*zym'F0$\"3'f$\\`!Gigu%F37$$\"3'eLL$3N1#4(F0$\"3nMLi![O(H`F37$$\"3 ,pm;HYt7vF0$\"3r/!G3;=T%fF37$$\"37-+++xG**yF0$\"3UJrt;Y()RlF37$$\"3gpm mT6KU$)F0$\"3;p)pI?K%fsF37$$\"3qNLLLbdQ()F0$\"3j)>x^Bqi$zF37$$\"3[++]i `1h\"*F0$\"3+E(*fd=^#p)F37$$\"3A-+]P?Wl&*F0$\"3=>sFP\"o(\\%*F37$$\"#5F *F+-%'COLOURG6&%$RGBG$\"*++++\"!\")$F*F*F`[l-%*THICKNESSG6#\"\"\"-F$6% 7S7$F($\"#$*F*7$F.$\"3k$Gd)yFr!\\)F37$F5$\"3F)GJ#o)zu\"yF37$F:$\"3e8xs _it%4(F37$F?$\"3]yH!=&y&RS'F37$FD$\"3qx%[ebxIv&F37$FI$\"3Su&>J:gA=&F37 $FN$\"3Vz7yW()HCYF37$FS$\"3?t,G4Sm#3%F37$FX$\"314m[(Q)fyNF37$Fgn$\"3!Q X(o%3Iu4$F37$F\\o$\"3^'\\T)3'p\\q#F37$Fao$\"3)=/Zix*G)H#F37$Ffo$\"3ub- X=hQF>F37$F[p$\"3@U-Mz_X0;F37$F`p$\"3%RmxS^,LM\"F37$Fep$\"3W'>uz6w*o5F 37$Fjp$\"3knyfP&ePo)F07$F_q$\"3eb#)e1i;nWPi\"R&p'F37$F^y$\"3kJrt'Q.)HtF37$Fcy$\"3[OlBs-TBJ1/\"!#:7$Fgz$\"$8\"F*- Fjz6&F\\[lF`[lF`[lF][l-Fb[l6#\"\"$-%+AXESLABELSG6$Q!6\"Fdel-%%VIEWG6$; F(Fgz%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 " plot([g1,g2],-1..1,color=[red, blue], thickness=[1,3]);" }}{PARA 13 " " 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 "6&-%'CURVESG6%7S7$$!\"\"\"\" !$\"\"%F*7$$!3ommm;p0k&*!#=$\"3%\\R_q%=r9R!#<7$$!3wKL$3`0nPF37$$!3:mmm\"4m(G$)F0$\"3Ikp4Y Mo$p$F37$$!3\"QLL3i.9!zF0$\"3P\"=$z\"z@Vi$F37$$!3\"ommT!R=0vF0$\"35CON ayFjNF37$$!3u****\\P8#\\4(F0$\"38GJ&y3zL]$F37$$!3+nm;/siqmF0$\"3!RopHn s\\W$F37$$!3[++](y$pZiF0$\"3%4mBmxO.R$F37$$!33LLL$yaE\"eF0$\"3gy?Ic&py L$F37$$!3hmmm\">s%HaF0$\"3O;3!Go\"z%H$F37$$!3Q+++]$*4)*\\F0$\"3;/Z7r*4 )\\KF37$$!39+++]_&\\c%F0$\"3$e-XV;)Q3KF37$$!31+++]1aZTF0$\"3ACSVM4-sJF 37$$!3umm;/#)[oPF0$\"3BL%\\M.:?9$F37$$!3hLLL$=exJ$F0$\"3\"HvIO>v+6$F37 $$!3*RLLLtIf$HF0$\"3'>J4F*o>'3$F37$$!3]++]PYx\"\\#F0$\"3u#)3W3%*3iIF37 $$!3EMLLL7i)4#F0$\"36v*436US/$F37$$!3c****\\P'psm\"F0$\"3s$HT/)yzFIF37 $$!3')****\\74_c7F0$\"3<)\\N![%)y:IF37$$!3)3LLL3x%z#)!#>$\"3EWt2u\\&o+ $F37$$!3KMLL3s$QM%Fer$\"3J]#p@*o)=+$F37$$!3]^omm;zr)*!#@$\"3)pqAX(4++I F37$$\"3%pJL$ezw5VFer$\"3>f!R?Fe=+$F37$$\"3s*)***\\PQ#\\\")Fer$\"3Vd#4 '35k1IF37$$\"3GKLLe\"*[H7F0$\"3*=f/fV;^,$F37$$\"3I*******pvxl\"F0$\"3r /^r-A[FIF37$$\"3#z****\\_qn2#F0$\"3d(3N\"e(HJ/$F37$$\"3U)***\\i&p@[#F0 $\"3]9+Pd;hhIF37$$\"3B)****\\2'HKHF0$\"39/Yr-O)f3$F37$$\"3ElmmmZvOLF0$ \"3,F(GPKR86$F37$$\"3i******\\2goPF0$\"3x0!Hh^B?9$F37$$\"3UKL$eR<*fTF0 $\"3un:SF\"\\I<$F37$$\"3m******\\)Hxe%F0$\"3U5ew^EZ5KF37$$\"3ckm;H!o-* \\F0$\"3GH#H+vF!\\KF37$$\"3y)***\\7k.6aF0$\"3Y3Sd]Jz#H$F37$$\"3#emmmT9 C#eF0$\"3FySR'40!RLF37$$\"33****\\i!*3`iF0$\"35rbBG7,\"R$F37$$\"3%QLLL $*zym'F0$\"3E$\\`!GigWMF37$$\"3wKLL3N1#4(F0$\"3-LB1[O(H]$F37$$\"3Nmm;H Yt7vF0$\"3A+G3;=TkNF37$$\"3Y*******p(G**yF0$\"3m7Pnhu)Ri$F37$$\"3]mmmT 6KU$)F0$\"3=')pI?K%fp$F37$$\"3fKLLLbdQ()F0$\"3Q>x^BqijPF37$$\"3[++]i`1 h\"*F0$\"3qs*fd=^#RQF37$$\"3W++]P?Wl&*F0$\"3W@xs8o(\\\"RF37$$\"\"\"F*F +-%'COLOURG6&%$RGBG$\"*++++\"!\")$F*F*F`[l-%*THICKNESSG6#Fhz-F$6%7S7$F ($\"\"$F*7$F.$\"3gGdQbhIeHF37$F5$\"32H\"[9#47DHF37$F:$\"3_rF_v$Q7*GF37 $F?$\"3o(HIp$o!3'GF37$FD$\"3wZ)4(H9=MGF37$FI$\"3`dp$RYfF\"GF37$FN$\"3q FJ5ap)Qz#F37$FS$\"3auHv$*HyFF37$Fjp$\"3yyf P>Qg#z#F37$F_q$\"3d#)3pW>\"H\"GF37$Fdq$\"3,UmZ()*zT$GF37$Fiq$\"3w$H\"p ;42hGF37$F^r$\"3])\\&ycj8!*GF37$Fcr$\"3%3,WK?gS#HF37$Fir$\"3u;f3?&[%eH F37$F^s$\"3GSgN&z8!**HF37$Fds$\"3O#RA;&f'\\/$F37$Fis$\"35d#fBRL\")3$F3 7$F^t$\"36Dzt^`1QJF37$Fct$\"3i/^rs(fK>$F37$Fht$\"3O(3N1\"o!3D$F37$F]u$ \"3N9+i8'G)4LF37$Fbu$\"3'Rg9-@8#zLF37$Fgu$\"3a$R&R+[,XMF37$F\\v$\"3^0! H6f$))=NF37$Fav$\"3)4!\\)p'3/*e$F37$Ffv$\"3%*4ewOcCpOF37$F[w$\"3'f*e%H ba![PF37$F`w$\"3L3S#=z'*Q$QF37$Few$\"3'[ug!QlC@RF37$Fjw$\"3Yrb[M,K;SF3 7$F_x$\"3'o#oQ@UR6TF37$Fdx$\"3_mc*))**z@@%F37$Fix$\"3In%***y_o:VF37$F^ y$\"3h7PnJi\"RT%F37$Fcy$\"31`OZM`sxu,@:([F37$Fgz$\"\"&F*-Fjz6&F\\[lF`[lF`[lF][l-Fb [l6#Fi[l-%+AXESLABELSG6$Q!6\"Fael-%%VIEWG6$;F(Fgz%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }} }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 107 "plot( [diff(g1(t),t), dif f(g2(t),t)], t=-1..1 ,color=[red, blue], thickness=[1,3], title=\"Velo city plots\");" }}{PARA 13 "" 1 "" {GLPLOT2D 604 604 604 {PLOTDATA 2 " 6'-%'CURVESG6%7S7$$!\"\"\"\"!$!\"#F*7$$!3ommm;p0k&*!#=$!3MLLL$Q6G\">!# <7$$!3wKL$3s%HaF0$!3KLLLQW*e3\"F37$$!3Q+++] $*4)*\\F0$!3w++++()>'***F07$$!39+++]_&\\c%F0$!3E++++0\"*H\"*F07$$!31++ +]1aZTF0$!35++++83&H)F07$$!3umm;/#)[oPF0$!3\\LLL3k(p`(F07$$!3hLLL$=exJ $F0$!3Anmmmj^NmF07$$!3*RLLLtIf$HF0$!3)zmmmYh=(eF07$$!3]++]PYx\"\\#F0$! 3+,++v#\\N)\\F07$$!3EMLLL7i)4#F0$!3commmCC(>%F07$$!3c****\\P'psm\"F0$! 39*****\\FRXL$F07$$!3')****\\74_c7F0$!3t*****\\#=/8DF07$$!3)3LLL3x%z#) !#>$!3=mmm;a*el\"F07$$!3KMLL3s$QM%Fer$!3komm;Wn(o)Fer7$$!3]^omm;zr)*!# @$!3IqLLL$eV(>!#?7$$\"3%pJL$ezw5VFer$\"3)Qjmm\"f`@')Fer7$$\"3s*)***\\P Q#\\\")Fer$\"3%z****\\nZ)H;F07$$\"3GKLLe\"*[H7F0$\"3ckmm;$y*eCF07$$\"3 I*******pvxl\"F0$\"3f)******R^bJ$F07$$\"3#z****\\_qn2#F0$\"3'e*****\\5 a`TF07$$\"3U)***\\i&p@[#F0$\"3'o****\\7RV'\\F07$$\"3B)****\\2'HKHF0$\" 3Y'*****\\@fkeF07$$\"3ElmmmZvOLF0$\"3_ILLL&4Nn'F07$$\"3i******\\2goPF0 $\"3A*******\\,s`(F07$$\"3UKL$eR<*fTF0$\"3%[mm;zM)>$)F07$$\"3m******\\ )Hxe%F0$\"3M*******pfa<*F07$$\"3ckm;H!o-*\\F0$\"39HLLeg`!)**F07$$\"3y) ***\\7k.6aF0$\"3w****\\#G2A3\"F37$$\"3#emmmT9C#eF0$\"3;LLL$)G[k6F37$$ \"33****\\i!*3`iF0$\"3#)****\\7yh]7F37$$\"3%QLLL$*zym'F0$\"3xmmm')fdL8 F37$$\"3wKLL3N1#4(F0$\"3bmmm,FT=9F37$$\"3Nmm;HYt7vF0$\"3FLL$e#pa-:F37$ $\"3Y*******p(G**yF0$\"3!*******Rv&)z:F37$$\"3]mmmT6KU$)F0$\"3ILLLGUYo ;F37$$\"3fKLLLbdQ()F0$\"3_mmm1^rZF37$$\"\"\"F*$\"\"#F*-%'COLOURG6&%$RGB G$\"*++++\"!\")$F*F*Fc[l-%*THICKNESSG6#Fiz-F$6%7S7$F(F(7$F.$!3PLLLLQ6G \"*F07$F5$!3]lmmT.\\p$)F07$F:$!3LLLL$))Qj^(F07$F?$!3IKLL$=Kvl'F07$FD$! 3hnmmTs!G!eF07$FI$!3iLLL3yO5]F07$FN$!3_*****\\nU)*=%F07$FS$!3)RLL$3WDT LF07$FX$!3'4++]d(Q&\\#F07$Fgn$!3:mmmm&4`i\"F07$F\\o$!3GKLLLQW*e)Fer7$F ao$\"3HI#*******H,QF`s7$Ffo$\"3Q(*******\\*3q)Fer7$F[p$\"3!********p= \\q\"F07$F`p$\"3_mmm\"fBIY#F07$Fep$\"3yKLLLO[kLF07$Fjp$\"3.KLLL&Q\"GTF 07$F_q$\"3+*****\\s]k,&F07$Fdq$\"3WJLLLvv-eF07$Fiq$\"3'3++]sgam'F07$F^ r$\"3G+++v\"ep[(F07$Fcr$\"3#QLLLe/TM)F07$Fir$\"39LLLeDBJ\"*F07$F^s$\"3 Immm;kD!)**F07$Fes$\"3Mmm;f`@'3\"F37$Fjs$\"3y****\\nZ)H;\"F37$F_t$\"3Y mmmJy*eC\"F37$Fdt$\"3')******R^bJ8F37$Fit$\"3f*****\\5a`T\"F37$F^u$\"3 o****\\7RV'\\\"F37$Fcu$\"3k*****\\@fke\"F37$Fhu$\"3/LLL`4Nn;F37$F]v$\" 3#*******\\,s`$=F37$Fgv$\"3$*******pfa<>F37$F\\w$ \"3#HLLeg`!)*>F37$Faw$\"3w****\\#G2A3#F37$Ffw$\"3;LLL$)G[k@F37$F[x$\"3 #)****\\7yh]AF37$F`x$\"3xmmm')fdLBF37$Fex$\"3bmmm,FT=CF37$Fjx$\"3FLL$e #pa-DF37$F_y$\"3!*******Rv&)zDF37$Fdy$\"3ILLLGUYoEF37$Fiy$\"3_mmm1^rZF F37$F^z$\"34++]sI@KGF37$Fcz$\"34++]2%)38HF37$Fhz$\"\"$F*-F][l6&F_[lFc[ lFc[lF`[l-Fe[l6#Fjdl-%+AXESLABELSG6$Q\"t6\"Q!Fcel-%&TITLEG6#Q/Velocity ~plotsFcel-%%VIEWG6$;F(Fhz%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}}{MARK "23 0 0" 0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }