{VERSION 6 0 "IBM INTEL NT" "6.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 89 "# You can use Maple \+ like a calculator. \n# Remember to end input with a ;\n234324.434*384; \n" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+m#e!)**)!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 92 "# Define a mathematical function\n# Don't forget to specify EVERY opera tion\nf:= x-> -2*x^2+1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#% \"xG6\"6$%)operatorG%&arrowGF(,&*&\"\"#\"\"\")9$F.F/!\"\"F/F/F(F(F(" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "# We can check what we def ined f as by typing the\n# following:\nf(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*&\"\"#\"\"\")%\"xGF%F&!\"\"F&F&" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 47 "# Suppose we want to find the y intercept\nf (0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 62 "# Now we want to find the x interecept(s)\nsol ve(-2*x^2+1=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,$*&\"\"#!\"\"F%# \"\"\"F%F&,$*&F%F&F%F'F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "solve( f(x)=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,$*&\"\"#!\"\"F% #\"\"\"F%F&,$*&F%F&F%F'F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "XM:=fsolve(f(x)=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#XMG6$$ !+7y1rq!#5$\"+7y1rqF(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "XM[ 1];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+7y1rq!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "XM[2];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$ \"+7y1rq!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "# To find the vertex -b/(2a):\n- 0/( 2*(-2) );\n" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "# To make a graph\nplot(\{f(x)\},x=-1..1,y=-2..2);" } }{PARA 13 "" 1 "" {GLPLOT2D 266 132 132 {PLOTDATA 2 "6%-%'CURVESG6$7S7 $$!\"\"\"\"!F(7$$!3ommm;p0k&*!#=$!35,z/TpB%H)F.7$$!3wKL$3(oF.7$$!3mmmmT%p\"e()F.$!3^h()y$R16M&F.7$$!3:mmm\"4m(G$)F.$!39'GR >#*oO(QF.7$$!3\"QLL3i.9!zF.$!3%Hije$eV'[#F.7$$!3\"ommT!R=0vF.$!3%>[sq3 dbE\"F.7$$!3u****\\P8#\\4(F.$!3+4eD1d#F.7$$!33LLL$yaE\"eF.$\"3oC%eR()3EC $F.7$$!3hmmm\">s%HaF.$\"3'Gn$)RMmT5%F.7$$!3Q+++]$*4)*\\F.$\"3n9f]x0!Q+ &F.7$$!39+++]_&\\c%F.$\"3)y[*48nBKeF.7$$!31+++]1aZTF.$\"3i:&>8J\"eflF. 7$$!3umm;/#)[oPF.$\"3qP8,J$*pfrF.7$$!3hLLL$=exJ$F.$\"3cR\\QFh\\)z(F.7$ $!3*RLLLtIf$HF.$\"3WeP\"e9igF)F.7$$!3]++]PYx\"\\#F.$\"3q[B=J=@e()F.7$$ !3EMLLL7i)4#F.$\"3d&\\+Qyd\">\"*F.7$$!3c****\\P'psm\"F.$\"3[CT<\"RUSW* F.7$$!3')****\\74_c7F.$\"3EL+HR5B%o*F.7$$!3)3LLL3x%z#)!#>$\"3+;JX=0!H' )*F.7$$!3KMLL3s$QM%Fcr$\"3E)*\\hc@Ei**F.7$$!3]^omm;zr)*!#@$\"3Eeea40)* ****F.7$$\"3%pJL$ezw5VFcr$\"3!R\")=#fX$G'**F.7$$\"3s*)***\\PQ#\\\")Fcr $\"3#[&[\"y#)zr')*F.7$$\"3GKLLe\"*[H7F.$\"3)*e\"3>Grwp*F.7$$\"3I****** *pvxl\"F.$\"3]-zpXfN]%*F.7$$\"3#z****\\_qn2#F.$\"3QY#)HP[SP\"*F.7$$\"3 U)***\\i&p@[#F.$\"3A8(*f_own()F.7$$\"3B)****\\2'HKHF.$\"3_@zqXzK!G)F.7 $$\"3ElmmmZvOLF.$\"3_daUDN@txF.7$$\"3i******\\2goPF.$\"3+)))>unH&frF.7 $$\"3UKL$eR<*fTF.$\"3.X'o>X]F.7$$\"3y)***\\7k.6aF.$\"3qG)>&))p 8WTF.7$$\"3#emmmT9C#eF.$\"3PL%=@2)*)>KF.7$$\"33****\\i!*3`iF.$\"3ww&)G Naxz@F.7$$\"3%QLLL$*zym'F.$\"3_J,$*Qa(y5\"F.7$$\"3wKLL3N1#4(F.$!33YgmC hHZfFO7$$\"3Nmm;HYt7vF.$!3?-gl@jB)G\"F.7$$\"3Y*******p(G**yF.$!3YbUZL# \\(zCF.7$$\"3]mmmT6KU$)F.$!3(fsRhSk)=RF.7$$\"3fKLLLbdQ()F.$!3m(Qa.ZSDF &F.7$$\"3[++]i`1h\"*F.$!37a%*>:P-&y'F.7$$\"3W++]P?Wl&*F.$!3)4VaXFO&*H) F.7$$\"\"\"F*F(-%'COLOURG6&%$RGBG$\"#5F)$F*F*F][l-%+AXESLABELSG6$Q\"x6 \"Q\"yFb[l-%%VIEWG6$;F(Fez;$!\"#F*$\"\"#F*" 1 2 0 1 10 0 2 9 1 4 2 1.000000 59.000000 49.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 11 "g:=x-> x+1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\" gGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&9$\"\"\"F.F.F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "plot( \{ f(x),g(x)\},x=-1..1,y=-2.. 2);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 13 "" 1 "" {GLPLOT2D 252 141 141 {PLOTDATA 2 "6&-%'CURVESG6$7S7$$!\"\"\"\"!F(7$$! 3ommm;p0k&*!#=$!35,z/TpB%H)F.7$$!3wKL$3(oF.7$$!3mmmm T%p\"e()F.$!3^h()y$R16M&F.7$$!3:mmm\"4m(G$)F.$!39'GR>#*oO(QF.7$$!3\"QL L3i.9!zF.$!3%Hije$eV'[#F.7$$!3\"ommT!R=0vF.$!3%>[sq3dbE\"F.7$$!3u**** \\P8#\\4(F.$!3+4eD1d#F.7$$!33LLL$yaE\"eF.$\"3oC%eR()3EC$F.7$$!3hmmm\">s% HaF.$\"3'Gn$)RMmT5%F.7$$!3Q+++]$*4)*\\F.$\"3n9f]x0!Q+&F.7$$!39+++]_&\\ c%F.$\"3)y[*48nBKeF.7$$!31+++]1aZTF.$\"3i:&>8J\"eflF.7$$!3umm;/#)[oPF. $\"3qP8,J$*pfrF.7$$!3hLLL$=exJ$F.$\"3cR\\QFh\\)z(F.7$$!3*RLLLtIf$HF.$ \"3WeP\"e9igF)F.7$$!3]++]PYx\"\\#F.$\"3q[B=J=@e()F.7$$!3EMLLL7i)4#F.$ \"3d&\\+Qyd\">\"*F.7$$!3c****\\P'psm\"F.$\"3[CT<\"RUSW*F.7$$!3')****\\ 74_c7F.$\"3EL+HR5B%o*F.7$$!3)3LLL3x%z#)!#>$\"3+;JX=0!H')*F.7$$!3KMLL3s $QM%Fcr$\"3E)*\\hc@Ei**F.7$$!3]^omm;zr)*!#@$\"3Eeea40)*****F.7$$\"3%pJ L$ezw5VFcr$\"3!R\")=#fX$G'**F.7$$\"3s*)***\\PQ#\\\")Fcr$\"3#[&[\"y#)zr ')*F.7$$\"3GKLLe\"*[H7F.$\"3)*e\"3>Grwp*F.7$$\"3I*******pvxl\"F.$\"3]- zpXfN]%*F.7$$\"3#z****\\_qn2#F.$\"3QY#)HP[SP\"*F.7$$\"3U)***\\i&p@[#F. $\"3A8(*f_own()F.7$$\"3B)****\\2'HKHF.$\"3_@zqXzK!G)F.7$$\"3ElmmmZvOLF .$\"3_daUDN@txF.7$$\"3i******\\2goPF.$\"3+)))>unH&frF.7$$\"3UKL$eR<*fT F.$\"3.X'o>X]F.7$$\"3y)***\\7k.6aF.$\"3qG)>&))p8WTF.7$$\"3#emm mT9C#eF.$\"3PL%=@2)*)>KF.7$$\"33****\\i!*3`iF.$\"3ww&)GNaxz@F.7$$\"3%Q LLL$*zym'F.$\"3_J,$*Qa(y5\"F.7$$\"3wKLL3N1#4(F.$!33YgmChHZfFO7$$\"3Nmm ;HYt7vF.$!3?-gl@jB)G\"F.7$$\"3Y*******p(G**yF.$!3YbUZL#\\(zCF.7$$\"3]m mmT6KU$)F.$!3(fsRhSk)=RF.7$$\"3fKLLLbdQ()F.$!3m(Qa.ZSDF&F.7$$\"3[++]i` 1h\"*F.$!37a%*>:P-&y'F.7$$\"3W++]P?Wl&*F.$!3)4VaXFO&*H)F.7$$\"\"\"F*F( -%'COLOURG6&%$RGBG$\"#5F)$F*F*F][l-F$6$7S7$F(F][l7$F,$\"39LLLL3VfVFcr7 $F2$\"3]smm\"H[D:)Fcr7$F7$\"3LLLLe0$=C\"F.7$F<$\"3'QLL$3RBr;F.7$FA$\"3 =mm;zjf)4#F.7$FF$\"3=LL$e4;[\\#F.7$FK$\"3C++]i'y]!HF.7$FQ$\"3,LL$ezs$H LF.7$FV$\"3_****\\7iI_PF.7$Fen$\"3#pmmm@Xt=%F.7$Fjn$\"3QLLL3y_qXF.7$F_ o$\"3i******\\1!>+&F.7$Fdo$\"3()******\\Z/NaF.7$Fio$\"3'*******\\$fC&e F.7$F^p$\"3ELL$ez6:B'F.7$Fcp$\"3Smmm;=C#o'F.7$Fhp$\"3-mmmm#pS1(F.7$F]q $\"3]****\\i`A3vF.7$Fbq$\"3slmmm(y8!zF.7$Fgq$\"3V++]i.tK$)F.7$F\\r$\"3 9++](3zMu)F.7$Far$\"3#pmm;H_?<*F.7$Fgr$\"3emm;zihl&*F.7$F\\s$\"39LLL3# G,***F.7$Fbs$\"3F]`l7$F`z$\"3/++v.Uac>F]`l7$Fez$\"\"#F*-Fhz6&FjzF][lF[[lF][l-%+AXESL ABELSG6$Q\"x6\"Q\"yFidl-%%VIEWG6$;F(Fez;$!\"#F*Fadl" 1 2 0 1 10 0 2 9 1 4 2 1.000000 46.000000 32.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "exp( x^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$expG6#*$)%\"xG\"\"#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "log(x^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%#lnG 6#*$)%\"xG\"\"#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "# \+ To horizontal asymptote:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "s:=x-> 1/(x-1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"sGf*6#%\"xG6\" 6$%)operatorG%&arrowGF(*&\"\"\"F-,&9$F-F-!\"\"F0F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "limit(s(x),x=infinity);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 60 "# To find vertical asymptote ( set Den=0 )\nsolve(x-1=0,x);\n \n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "# Finding intersection points involving\n# non p olynomial functions using fsolve:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "a:=x-> exp(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% \"aGf*6#%\"xG6\"6$%)operatorG%&arrowGF(-%$expG6#9$F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "b:=x->x+2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&9$\"\"\"\"\" #F.F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot( \{a(x),b(x) \},x=-3..3,y=0..4 );" }}{PARA 13 "" 1 "" {GLPLOT2D 284 136 136 {PLOTDATA 2 "6&-%'CURVESG 6$7V7$$!\"$\"\"!$\"3W%R'yOoqy\\!#>7$$!3!******\\2<#pG!#<$\"3M-!*)o\\LV n&F-7$$!3#)***\\7bBav#F1$\"3aWlPp$3#ejF-7$$!36++]K3XFEF1$\"3S4#R.nViA( F-7$$!3%)****\\F)H')\\#F1$\"3SKY*=ja(>#)F-7$$!3#****\\i3@/P#F1$\"3(yI7 ;6PTM*F-7$$!3;++Dr^b^AF1$\"3#Hb!4\"QaB0\"!#=7$$!3$****\\7Sw%G@F1$\"3it ^1A\\=!>\"FM7$$!3*****\\7;)=,?F1$\"3[tt(eyXFM7$$!3!******\\!)H%*\\\"F1$\"3]/HHTUdKAFM7$$!3/+++vl [p8F1$\"3pJ?;zXPUDFM7$$!3\"******\\>iUC\"F1$\"3'Q$)HwIM:)GFM7$$!3-++Dh kaI6F1$\"3G9X)[zn&GKFM7$$!3s******\\XF`**FM$\"3K!*[tlR-'p$FM7$$!3u**** ***>#z2))FM$\"3rMf7&HVk\"F17$$ \"3A)****\\d6.B'FM$\"3crX*RHrX'=F17$$\"3s****\\(o3lW(FM$\"32%Q9)Qhq0@F 17$$\"35*****\\A))oz)FM$\"3G]rQ0'\\,T#F17$$\"3e******Hk-,5F1$\"3p03!pQ t5s#F17$$\"36+++D-eI6F1$\"39!y6')>`u4$F17$$\"3u***\\(=_(zC\"F1$\"3'zx1 k#HG$[$F17$$\"3M+++b*=jP\"F1$\"3A=?'Gt'HgRF17$$\"3g***\\(3/3(\\\"F1$\" 3[;db_MioWF17$$\"33++vB4JB;F1$\"37&=I/W[)p]F17$$\"3u*****\\KCnu\"F1$\" 3+K(zxI$yNdF17$$\"3s***\\(=n#f(=F1$\"3[\"3/m)['o_'F17$$\"3P+++!)RO+?F1 $\"3%zK&3dgu\"R(F17$$\"30++]_!>w7#F1$\"3y#f*)zGb[R)F17$$\"3O++v)Q?QD#F 1$\"3EDhP-?0C&*F17$$\"3G+++5jypBF1$\"3K?wDg1^p5!#;7$$\"3<++]Ujp-DF1$\" 3Y$=shkQ:A\"Fby7$$\"3++++gEd@EF1$\"3]RVI?Utv8Fby7$$\"31+]PMh%\\o#F1$\" 3I-\\$G=TdY\"Fby7$$\"39++v3'>$[FF1$\"3!\\GC:#ojh:Fby7$$\"39+++5h(*3GF1 $\"3%*)3;$>?Hf;Fby7$$\"37++D6EjpGF1$\"3'4_*yuR0jq0]FM7$Fgo$\"3h******\\U80jFM7$F\\p$\"3'4+++0ytb(FM7$Fap$\"3w ****\\(QNXp)FM7$Ffp$\"3.+++XDn/5F17$F[q$\"3.+++!y?#>6F17$F`q$\"3'**** \\(3wY_7F17$Feq$\"3#)******HOTq8F17$Fjq$\"37++v3\">)*\\\"F17$F_r$\"3:+ +DEP/B;F17$Fdr$\"3=++](o:;v\"F17$Fir$\"3=++v$)[op=F17$F^s$\"3%*****\\i %Qq*>F17$Fds$\"3&****\\(QIKH@F17$Fis$\"3#****\\7:xWC#F17$F^t$\"37++]Zn %)oBF17$Fct$\"3y******4FL(\\#F17$Fht$\"3#)****\\d6.BEF17$F]u$\"3(**** \\(o3lWFF17$Fbu$\"3!*****\\A))ozGF17$Fgu$\"3e******Hk-,IF17$F\\v$\"36+ ++D-eIJF17$Fav$\"3u***\\(=_(zC$F17$Ffv$\"3M+++b*=jP$F17$F[w$\"3g***\\( 3/3(\\$F17$F`w$\"33++vB4JBOF17$Few$\"3u*****\\KCnu$F17$Fjw$\"3s***\\(= n#f(QF17$F_x$\"3P+++!)RO+SF17$Fdx$\"30++]_!>w7%F17$Fix$\"3O++v)Q?QD%F1 7$F^y$\"3G+++5jypVF17$Fdy$\"3<++]Ujp-XF17$Fiy$\"3++++gEd@YF17$Fcz$\"39 ++v3'>$[ZF17$F][l$\"37++D6Ejp[F17$Fg[l$\"\"&F*-F\\\\l6&F^\\lFb\\lF_\\l Fb\\l-%+AXESLABELSG6$Q\"x6\"Q\"yF^fl-%%VIEWG6$;F(Fg[l;Fb\\l$\"\"%F*" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Cur ve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "fsolve( a(x)=b(x), x=-3..0);\nfsolve( a(x)=b(x),x=0..3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+gcST=!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+@K>Y6!\"*" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 34 "To find a derivative of a function " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "f(x); # remind you what f(x) \+ was defined as" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*&\"\"#\"\"\")%\"x GF%F&!\"\"F&F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "diff(f(x) ,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"%\"\"\"%\"xGF&!\"\"" } }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 22 "A square root in Maple" } {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "f:= sqr t( x + 1 );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG*$,&%\"xG\"\"\"F( F(#F(\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "3 2" 0 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }