{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 "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{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 "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{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 24 "# evaluating express ions" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "4*5-3/(5+2)+2^(-3); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"%.6\"#c" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$ \"+dGkp>!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "4.*5-3/(5+2 )+2^(-3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+dGkp>!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "# assigning a value to a named 'var iable'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "a:=(3.+4)*(2-6)+2 /3-4/5;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$!+LLL8G!\")" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "a/7+9;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+\"Q_4)\\!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "a:=14./6;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"+LLLLB!\" *" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "a/7+9;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+LLLL$*!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "a:='a';" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aGF$" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "3+a;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&\"\"$\"\"\"%\"aGF%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "# symbolic computation" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "(a+b)^6;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*$),&%\"aG \"\"\"%\"bGF'\"\"'F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "exp and(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,0*$)%\"aG\"\"'\"\"\"F(*(F' F()F&\"\"&F(%\"bGF(F(*(\"#:F()F&\"\"%F()F,\"\"#F(F(*(\"#?F()F&\"\"$F() F,F6F(F(*(F.F()F&F2F()F,F0F(F(*(F'F(F&F()F,F+F(F(*$)F,F'F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "# build-in functions (sin, . .., arcsin, ... exp, ln, sqrt ...)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "sin(90.);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+Om'*R *)!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "degtorad:=evalf(Pi /180);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%)degtoradG$\"+_#H`u\"!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "sin(45*degtorad);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+7y1rq!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "sin(90*degtorad);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"\"\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "# our own functions" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "f:=x->1/( 1-x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operato rG%&arrowGF(*&\"\"\"F-,&F-F-9$!\"\"F0F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "f(3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##!\"\"\"\" #" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "# differentiation and \+ integration" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "diff(sin(x), x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$cosG6#%\"xG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "diff(sin(x),x,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$-%$sinG6#%\"xG!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "diff(sin(x),x$4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# -%$sinG6#%\"xG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "diff(f(x) ,x,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"#\"\"\",&F&F&%\"xG! \"\"!\"$F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "eval(%,x=5); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6##!\"\"\"#K" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 20 "diff(g(x)*h(x),x$4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,,*&-%%diffG6$-%\"gG6#%\"xG-%\"$G6$F+\"\"%\"\"\"-%\"hGF *F0F0*(F/F0-F&6$F(-F-6$F+\"\"$F0-F&6$F1F+F0F0*(\"\"'F0-F&6$F(-F-6$F+\" \"#F0-F&6$F1F?F0F0*(F/F0-F&6$F(F+F0-F&6$F1F6F0F0*&F(F0-F&6$F1F,F0F0" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "diff(g(x)*h(x)*p(x),x$3); " }}{PARA 12 "" 1 "" {XPPMATH 20 "6#,6*(-%%diffG6$-%\"gG6#%\"xG-%\"$G6 $F+\"\"$\"\"\"-%\"hGF*F0-%\"pGF*F0F0**F/F0-F&6$F(-F-6$F+\"\"#F0-F&6$F1 F+F0F3F0F0**F/F0F6F0F1F0-F&6$F3F+F0F0**F/F0-F&6$F(F+F0-F&6$F1F8F0F3F0F 0**\"\"'F0FAF0F;F0F>F0F0**F/F0FAF0F1F0-F&6$F3F8F0F0*(F(F0-F&6$F1F,F0F3 F0F0**F/F0F(F0FCF0F>F0F0**F/F0F(F0F;F0FHF0F0*(F(F0F1F0-F&6$F3F,F0F0" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "int(sin(x),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$-%$cosG6#%\"xG!\"\"" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 12 "int(f(x),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#,$-%#lnG6#,&\"\"\"F(%\"xG!\"\"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "int(sin(x),x=0..Pi/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "int(f(x),x= 2..3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$-%#lnG6#\"\"#!\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "# plots" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(sin(x),x=0..Pi/2);" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$\"\"!F)F(7$$\"3N GK5j*))QU$!#>$\"3QsLeI+ABMF-7$$\"3DXXYUk*HS'F-$\"3]DS+L@i)R'F-7$$\"3=N 68yVJ`(*F-$\"3_b&ehJeyt*F-7$$\"3%3h%eRSe78!#=$\"3<&Q%f]#=)38F=7$$\"3k+ ,hQPB[;F=$\"3V-yj65yS;F=7$$\"3'H#*ed(RUf>F=$\"3q)*)ys&)4p%>F=7$$\"3kHX [TMk\"G#F=$\"3G3RBS#)*=E#F=7$$\"3Saq%HF=$\"3=7dd?+e/HF=7$$\"3)pq'4OKt)G$F=$\"3c0jx$Rp(HKF=7$$\"3#f/ N#RTo*e$F=$\"3ML>uye38NF=7$$\"3Ut79wN[GRF=$\"3V3zj5M@GQF=7$$\"3/VrOc6q%F=7$$\"31\\,oR/A[_F=$\"3SMGBr+f5]F=7$$\"3uvW/X(*RG,:eF=7$$\"3.n3p46^WlF=$\"33g0zi&Qs3'F=7$$\"3oHyF.C6noF=$\"3h +)=j,t*RjF=7$$\"3(*zx.5Ir.sF=$\"3Qz3MFxj'f'F=7$$\"3'pz!QUu\"G^(F=$\"3$ [8q$y.wDoF=7$$\"3A\"3@7LGi%yF=$\"3wm47uKelqF=7$$\"3)3\"HIT&[D>)F=$\"3M (RvZssjI(F=7$$\"3gv)\\AI@S\\)F=$\"3C>#p\"po&)3vF=7$$\"3vn()=V,i>))F=$ \"3%4zeG%\\()>xF=7$$\"3'G:[dg&*f:*F=$\"31()\\)y]!GHzF=7$$\"3sSt6rL2&[* F=$\"3g&H%*=Uja7)F=7$$\"3mka(*HIZ.)*F=$\"3%3R7+w2pI)F=7$$\"3Em\"[l:+d, \"!#<$\"3Q?Zs+w\\)\\)F=7$$\"3c!3XyEmu/\"F_u$\"3Ih!)R3tfh')F=7$$\"3sJ_* >P$Q\"3\"F_u$\"3VZPF_)*3E))F=7$$\"3.M\"G%4t676F_u$\"3kW#3Hj\"Qm*)F=7$$ \"3co*Q4iq'*z.@\"F_u$\"3Y(Q,up+vN*F=7$$\"34Q$[)>&*oU7F_u$\"3OZ!)zP7am%* F=7$$\"3I^lOFY^w7F_u$\"3-w%)pSt5q&*F=7$$\"3`!)f6EA448F_u$\"3-KPDS[]f'* F=7$$\"3=;T7EvSU8F_u$\"3B\"='y#[C.u*F=7$$\"3a_wiepWv8F_u$\"3$oY$>Q\"*z 4)*F=7$$\"3U$obdw1eS\"F_u$\"3#4Wi\"*p+U')*F=7$$\"3s$)o#3`-1W\"F_u$\"3a Z!3__n`\"**F=7$$\"3-#*)4zFC " 0 " " {MPLTEXT 1 0 18 "plot(f(x),x=2..3);" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$\"\"#\"\"!$!\"\"F*7$$\"3$o mmT:(z@?!#<$!3Eel2l#ymy*!#=7$$\"3OL$e9ui2/#F0$!3*4Q1+\"yL3'*F37$$\"3]m m\"z_\"4i?F0$!3is_(oR%Q:%*F37$$\"3YmmT&phN3#F0$!3i,,vLQ#)G#*F37$$\"3UL $e*=)H\\5#F0$!3CP5qj&[.0*F37$$\"3sm;z/3uC@F0$!3S&HzHKP4*))F37$$\"3!)** \\7LRDX@F0$!3bLwKyzoJ()F37$$\"3#om\"zR'ok;#F0$!3q\"QY(4P)Gd)F37$$\"3-+ ]i5`h(=#F0$!3=U*Qd*\\B?%)F37$$\"3YLL$3En$4AF0$!3I#zmYw'yo#)F37$$\"3cmm T!RE&GAF0$!3Qx%p:GL)R\")F37$$\"3)*****\\K]4]AF0$!3?1hBQ=R**zF37$$\"3)) ****\\PAvrAF0$!3yzYAAo;jyF37$$\"3#)****\\nHi#H#F0$!3%[?C+*y?OxF37$$\"3 bm;z*ev:J#F0$!3o;a'>fD&p?EbqsF37$$\"3WLLLQ*o] R#F0$!3;IR#oa/\"orF37$$\"3C+]7=lj;CF0$!3W-gr`P(*eqF37$$\"3&***\\PaRp(e&oF37$$\"3WL$eR\"3GyCF0 $!3'>(pb:YhknF37$$\"3mmmT5k]*\\#F0$!3oNWD?6')omF37$$\"3Om;zRQb@DF0$!3- Q>$>#)GAd'F37$$\"3%)**\\(=>Y2a#F0$!31$R7Dlh.\\'F37$$\"3%om;zXu9c#F0$!3 57%[#zL?/kF37$$\"3u*****\\y))Ge#F0$!3tS(*GRKcR&F37$$\"35L$e9tOc(GF0$!3.!)H\"4!G_J`F37$$\"3u*****\\Qk\\*GF0$!3'*= mbMS9x_F37$$\"3@LL3dg6!er(Hoh@&F37$$\"3_mmmw(Gp$HF0$!3U*>$[[C \"G;&F37$$\"3-+]7oK0eHF0$!3.CvKdL62^F37$$\"3-+](=5s#yHF0$!3c$p#y`j\"\\ 0&F37$$\"\"$F*$!3++++++++]F3-%'COLOURG6&%$RGBG$\"#5F,$F*F*F_[l-%+AXESL ABELSG6$Q\"x6\"Q!Fd[l-%%VIEWG6$;F(Fez%(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 13 "# polynomials" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "a:=2*x^5-3*x^4+4*x^3-8*x^2+6*x-7;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%\"aG,.*&\"\"#\"\"\")%\"xG\"\"&F(F(*&\"\"$F()F*\"\"% F(!\"\"*&F/F()F*F-F(F(*&\"\")F()F*F'F(F0*&\"\"'F(F*F(F(\"\"(F0" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b:=2*x^2-3*x+4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG,(*&\"\"#\"\"\")%\"xGF'F(F(*&\"\"$F(F*F(! \"\"\"\"%F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "c:=quo(a,b,x ,'d');" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cG,&*$)%\"xG\"\"$\"\"\"F *\"\"%!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "d;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&\"\"*\"\"\"*&\"\"'F%%\"xGF%!\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "expand(c*b+d);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#,.*&\"\"#\"\"\")%\"xG\"\"&F&F&*&\"\"$F&)F(\"\"%F &!\"\"*&F-F&)F(F+F&F&*&\"\")F&)F(F%F&F.*&\"\"'F&F(F&F&\"\"(F." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "fsolve(a,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+@-m1;!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "plot(a,x=-2..3);" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7U7$$!\"#\"\"!$!$&>F*7$$!3smm;HU,\" *=!#<$!3-u,Pt.E2;!#:7$$!3SL$3FH'='z\"F0$!3Gl4/+*oQN\"F37$$!3gmmTgBa*o \"F0$!37d'=Q\\]C6\"F37$$!3amm\"H_\">#e\"F0$!3s5%e9#zG*4*!#;7$$!3ML$3_! 4Nv9F0$!3!)>Ns[rUIuFC7$$!3km;/wfHw8F0$!3G>VSAF#z9'FC7$$!3;+]PM.tt7F0$! 3a?-b-k\"*[]FC7$$!3em;/,oln6F0$!3[JR_Z#G*>TFC7$$!3%)**\\(oWB>1\"F0$!3! GuCFe&))pLFC7$$!3eJLLepjJ&*!#=$!3#[O\\Y9w+v#FC7$$!3Ulm;z/ot&)Fjn$!3$Hx FQpN$4BFC7$$!3u)****\\P[_\\(Fjn$!3)****zDpm&4>FC7$$!3A*****\\7)Q7kFjn$ !3s61E)pm:f\"FC7$$!3e*****\\i^)o`Fjn$!3s&3@Rsw%[8FC7$$!3vlmT50A@WFjn$! 3seoKX61r6FC7$$!3OKLLeaR%H$Fjn$!3fg)fA[*4.5FC7$$!3kJLLLo#)RBFjn$!3>GUN ^T^.*)F07$$!3f***\\PfO%H7Fjn$!3%zo/u#zvmyF07$$!3MSLLL3`lC!#>$!3q4c\"4+ cG:(F07$$\"3+L+]i!f#=$)Fhq$!3],L]%f#4alF07$$\"3+-+v=xpe=Fjn$!3p([,$oMh QhF07$$\"3pxgFjn$!3=UIuQ= $Rl&F07$$\"3w++v$f4t.(Fjn$!3*\\%p,xH/OdF07$$\"3OPL$e*Gst!)Fjn$!3%zc^Aa IS&eF07$$\"3Y+++]#RW9*Fjn$!3eHW;R,BjfF07$$\"3:++DJE>>5F0$!33OY^lSq(*fF 07$$\"3F+]i!RU07\"F0$!3a:bY,*p-*eF07$$\"3+++v=S2L7F0$!3fu1MQ$*3+bF07$$ \"3Jmmm\"p)=M8F0$!3etA!z.'Q'y%F07$$\"3B++](=]@W\"F0$!3yncHS>U)[$F07$$ \"35L$e*[$z*R:F0$!3]=Q)GFWUn\"F07$$\"3e++]iC$pk\"F0$\"33fZba%[H@\"F07$ $\"3[m;H2qcZ]F07$$\"3O+]7.\"fF&=F0$\"3Yw%GNDJ3/\"FC7$$ \"3Ymm;/Ogb>F0$\"3R]v-R8#[Z#F0$\"31t8xwkvh#*FC7$$\" 3SnmT&G!e&e#F0$\"33rEnKX177F37$$\"3#RLLL)Qk%o#F0$\"3\"3rF$Q8>>:F37$$\" 37+]iSjE!z#F0$\"3)p:*)>XAx!>F37$$\"3L+++DM\"3%GF0$\"3v$y0.Bt$=@F37$$\" 3a+]P40O\"*GF0$\"3U9+!)RzOYBF37$$\"3G+voa-oXHF0$\"3;MQ28(**=h#F37$$\" \"$F*$\"$!HF*-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*F]\\l-%+AXESLABELSG6$Q\" x6\"Q!Fb\\l-%%VIEWG6$;F(Fb[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 20 "fsolve(a,x,complex);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6'^$$!+;oGJ\\!#5$!+GA_z7!\"*^$F$$\"+GA_z7F)^$$\"+7d)zR%F&$!+T2&R#) *F&^$F.$\"+T2&R#)*F&$\"+@-m1;F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "?fsolve" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "# save yo ur workspace on a diskette" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "a;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%\"aG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "# lists" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "x:=[2,-5, 4,7,0,-6];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG7(\"\"#!\"&\"\"%\" \"(\"\"!!\"'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "x[4];" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "3*x[2];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#!#:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "i:=12;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"iG\"#7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "add(x[i],i=1..6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"#" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "i;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "seq( sin(x[i]*1.),i=1..6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6($\"+oU(H4*!#5 $\"+ZFC*e*F%$!+`\\-ovF%$\"+()f')plF%$\"\"!F-$\"+#)\\:%z#F%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "y:=[%];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG7($\"+oU(H4*!#5$\"+ZFC*e*F($!+`\\-ovF($\"+()f')pl F($\"\"!F0$\"+#)\\:%z#F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "z:=[seq([x[i],y[i]],i=1..6)];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\" zG7(7$\"\"#$\"+oU(H4*!#57$!\"&$\"+ZFC*e*F*7$\"\"%$!+`\\-ovF*7$\"\"($\" +()f')plF*7$\"\"!$F8F87$!\"'$\"+#)\\:%z#F*" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "pointplot(z);" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6#-%'POINTSG6(7$$\"\"#\"\"!$\"+oU(H4*!#57$$!\"&F)$\"+ZFC* e*F,7$$\"\"%F)$!+`\\-ovF,7$$\"\"(F)$\"+()f')plF,7$$F)F)F=7$$!\"'F)$\"+ #)\\:%z#F," 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "C urve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "# do loops" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "a:=5.;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"\"&\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "for i from 1 to 6 do a:=sin(a) end do;" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%\"aG$!+ZFC*e*!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$!+X9u&=)!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$!+! QB%\"aG$!+q/)*pm!#5" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$!+n>I'='!#5" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%\"aG$!+Cw>*z&!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "i;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "# matrices" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "A:=matrix(3,3,[5,-2,4,6,8,-3,0,5,2]);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7%7%\"\"&!\"#\"\"%7% \"\"'\"\")!\"$7%\"\"!F*\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "evalm(A&*[3,-1,2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vector G6#7%\"#D\"\"%!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "eval m([3,-1,2]&*A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vectorG6#7%\"\"* !\"%\"#>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected names norm and t race have been redefined and unprotected\n" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 7 "det(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"$*H" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "evalm(A^3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"#H\"#'*\"$Q\"7%\"$7'\"$5\"\"$*=7 %\"$]%\"$&G!#_" }}}}{MARK "73" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }