{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 Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{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 Plo t" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 " " 0 "" {TEXT -1 26 " Difference between " }{XPPEDIT 18 0 "a/b+c; " "6#,&*&%\"aG\"\"\"%\"bG!\"\"F&%\"cGF&" }{TEXT -1 10 " and " } {XPPEDIT 18 0 "a/(b+c);" "6#*&%\"aG\"\"\",&%\"bGF%%\"cGF%!\"\"" } {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "a/b+c;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#,&*&%\"aG\"\"\"%\"bG!\"\"F&%\"cGF&" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "a/(b+c);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#*&%\"aG\"\"\",&%\"bGF%%\"cGF%!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "solve(a*x^2+b*x+c=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,$*(\"\"#!\"\",&%\"bG\"\"\"*$,&*$)F(F%F)F)*(\"\"%F)% \"aGF)%\"cGF)F&#F)F%F&F)F0F&F&,$*(F%F&,&F(F)F*F)F)F0F&F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "(-b + sqrt(b^2-4*a*c))/(2*a);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#,$*(\"\"#!\"\"%\"aGF&,&%\"bGF&*$,&*$)F )F%\"\"\"F.*(\"\"%F.F'F.%\"cGF.F&#F.F%F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A := b^2+4*a*c;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG,&*$)%\"bG\"\"#\"\"\"F**(\"\"%F*%\"aGF*%\"cGF*F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B := -b + sqrt(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG,&%\"bG!\"\"*$,&*$)F&\"\"#\"\"\"F-*(\"\"%F-% \"aGF-%\"cGF-F-#F-F,F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "C \+ := 2*a;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"CG,$*&\"\"#\"\"\"%\"aGF (F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "B/C;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*(\"\"#!\"\",&%\"bGF&*$,&*$)F(F%\"\"\"F-*(\"\"%F -%\"aGF-%\"cGF-F-#F-F%F-F-F0F&F-" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 26 "On the formula on page 10:" }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "A := c*a1*a2;" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%\"AG*(%\"cG\"\"\"%#a1GF'%#a2GF'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "B := g*(h1-h2)/s;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG*(%\"gG\"\"\",&%#h1GF'%#h2G!\"\"F'%\"sGF+" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "C := a1^2 - a2^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"CG,&*$)%#a1G\"\"#\"\"\"F**$)%#a2GF)F*!\" \"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A*sqrt(B)/(3+sqrt(C)) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*,%\"cG\"\"\"%#a1GF%%#a2GF%*(%\"g GF%,&%#h1GF%%#h2G!\"\"F%%\"sGF-#F%\"\"#,&\"\"$F%*$,&*$)F&F0F%F%*$)F'F0 F%F-F/F%F-" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 19 "Example 1, page 22." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }} {PARA 0 "" 0 "" {TEXT -1 64 "First: How do define and work with a fun ction using one formula" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "f := x -> (x-1)^2 + 5*x + 5;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&arrow GF(,(*$),&9$\"\"\"F1!\"\"\"\"#F1F1*&\"\"&F1F0F1F1F5F1F(F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "f(4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#M" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "f(a+3 );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,(*$),&%\"aG\"\"\"\"\"#F(F)F(F(* &\"\"&F(F'F(F(\"#?F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "f(45 .9);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"'^]A!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "plot(f, -3..3);" }}{PARA 13 "" 1 "" {GLPLOT2D 382 260 260 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$!\"$\"\"!$\"\"'F *7$$!3!******\\2<#pG!#<$\"3\"[br%)RbZi&F07$$!3#)***\\7bBav#F0$\"3ygJ.$ H)3E`F07$$!36++]K3XFEF0$\"3oV\\qz`9@]F07$$!3%)****\\F)H')\\#F0$\"3CzEP K:EZZF07$$!3#****\\i3@/P#F0$\"3XH')QnGj2XF07$$!3;++Dr^b^AF0$\"3T;EVv^$ [J%F07$$!3$****\\7Sw%G@F0$\"39^\"Gpe#)\\9%F07$$!3*****\\7;)=,?F0$\"3Qd r(Hd*=,SF07$$!3/++DO\"3V(=F0$\"3C[H'3e1,*QF07$$!3#******\\V'zViUC\" F0$\"3\\=i!\\#=S:QF07$$!3-++DhkaI6F0$\"3'p*[H#z2))Ffp$\"3o3QQuVVLTF07$$!3S++]7RK vuFfp$\"39Vz@-v?;VF07$$!3s,+++P'eH'Ffp$\"3\"ox*G())>w]%F07$$!3q)***\\7 *3=+&Ffp$\"3AX;A]#Q'\\ZF07$$!3[)***\\PFcpPFfp$\"3K&[p5@F7,&F07$$!3;)** **\\7VQ[#Ffp$\"3T)4'>H=a;`F07$$!32)***\\i6:.8Ffp$\"3._Kx!oOgi&F07$$!3W b+++v`hH!#?$\"3]jV?eT7\"*fF07$$\"3]****\\(QIKH\"Ffp$\"3]L:gkNp/kF07$$ \"38****\\7:xWCFfp$\"3![JL7`+Kz'F07$$\"3E,++vuY)o$Ffp$\"3dH8kl\")eUsF0 7$$\"3!z******4FL(\\Ffp$\"3kUfVazLRxF07$$\"3A)****\\d6.B'Ffp$\"3Q*y:dH hsD)F07$$\"3s****\\(o3lW(Ffp$\"3eH,eAvX)y)F07$$\"35*****\\A))oz)Ffp$\" 3hO9$>*)=HT*F07$$\"3e******Hk-,5F0$\"3KaeN?L^+5!#;7$$\"36+++D-eI6F0$\" 3=0h,K_*p1\"Fju7$$\"3u***\\(=_(zC\"F0$\"3&3T'G!yO,8\"Fju7$$\"3M+++b*=j P\"F0$\"3\\H#*3t5K-7Fju7$$\"3g***\\(3/3(\\\"F0$\"3Y18l(4\\KF\"Fju7$$\" 33++vB4JB;F0$\"3/3;k7r]]8Fju7$$\"3u*****\\KCnu\"F0$\"3LqYD%)=7H9Fju7$$ \"3s***\\(=n#f(=F0$\"3'R,P57)o9:Fju7$$\"3P+++!)RO+?F0$\"3FW\"[#*za-g\" Fju7$$\"30++]_!>w7#F0$\"3g*41!**>'4p\"Fju7$$\"3O++v)Q?QD#F0$\"3e?&*4^n 6%y\"Fju7$$\"3G+++5jypBF0$\"3!=M1&3Y_s=Fju7$$\"3<++]Ujp-DF0$\"3%yGE5!y :x>Fju7$$\"3++++gEd@EF0$\"3SZf;>htt?Fju7$$\"39++v3'>$[FF0$\"3Sv*3)\\># )z@Fju7$$\"37++D6EjpGF0$\"3Q\\*Hd\"*oVG#Fju7$$\"\"$F*$\"#CF*-%'COLOURG 6&%$RGBG$\"#5!\"\"$F*F*Fb[l-%+AXESLABELSG6$Q!6\"Ff[l-%%VIEWG6$;F(Fgz%( DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Cur ve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "read(\"e:/func.txt \");" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%funcGf*6#%\"xG6\"F(F(@'29$ \"\"!O,&*$),&F+\"\"\"F2!\"\"\"\"#F2F3F4F21F+F4O,&*&F4F2F+F2F2F2F2O,$*& \"\"&F2-%$expG6#,$*$),&F+F2F4F3F4F2F3F2F2F(F(F(" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 17 "plot(func,-2..4);" }}{PARA 13 "" 1 "" {GLPLOT2D 381 211 211 {PLOTDATA 2 "6%-%'CURVESG6$7V7$$!\"#\"\"!$!\"(F* 7$$!3!******\\2<#p=!#<$!3]a:ZBmSKiF07$$!31++D^NUbiUCFY$\"3XAy$4!f6=XF Y7$$!3B++]7YY08FY$\"3-B5b*)pk=sFY7$$\"3%z-+++XDn%!#?$\"31+++!4X$45F07$ $\"3C++++y?#>\"FY$\"30+++g:WQ7F07$$\"3h****\\(3wY_#FY$\"3#*****\\<_$\\ ]\"F07$$\"3F)******HOTq$FY$\"3m******fs#3u\"F07$$\"3I,+](3\">)*\\FY$\" 3E++]<#Q'**>F07$$\"3_,+]isVIiFY$\"3I++]_u3YAF07$$\"3&=++](o:;vFY$\"3P+ ++v8B.DF07$$\"3#>++v$)[op)FY$\"3R++]n(p$RFF07$$\"3W*****\\i%Qq**FY$\"3 ))*****\\#p2%*HF07$$\"3&****\\(QIKH6F0$\"3!*****\\xgkeKF07$$\"3#****\\ 7:xWC\"F0$\"3%)****\\-V&*)[$F07$$\"37++]Zn%)o8F0$\"3E+++&\\$pPPF07$$\" 3y******4FL(\\\"F0$\"3e******>am%*RF07$$\"3#)****\\d6.B;F0$\"3k*****\\ JigC%F07$$\"3(****\\(o3lWF0$\"3%*****\\__r!)[F07$$\"3e*** ***Hk-,?F0$\"3)*\\+@KZ****\\F07$$\"3%)****\\FL!e1#F0$\"3U\\O!oT'Ry\\F0 7$$\"36+++D-eI@F0$\"3V'**>'onY:\\F07$$\"3!***\\(=sx#*=#F0$\"3ng7N20/C[ F07$$\"3u***\\(=_(zC#F0$\"3\\(e`1r.=q%F07$$\"3M+++b*=jP#F0$\"3R&GSlis( RVF07$$\"3g***\\(3/3(\\#F0$\"3(>]+\"QhN0RF07$$\"33++vB4JBEF0$\"3uP(HG9 5.R$F07$$\"3u*****\\KCnu#F0$\"3)[5Cf-;H'GF07$$\"3s***\\(=n#f(GF0$\"3S? t*f1Y9K#F07$$\"3P+++!)RO+IF0$\"3/IB,U%e!Q=F07$$\"30++]_!>w7$F0$\"3S4Lo \"y=?S\"F07$$\"3O++v)Q?QD$F0$\"3M;Vys%z!Q5F07$$\"3G+++5jypLF0$\"3WC]BS andwFY7$$\"3<++]Ujp-NF0$\"3kTDn5jYF_FY7$$\"3++++gEd@OF0$\"3T4];EJt0OFY 7$$\"39++v3'>$[PF0$\"3QrO6n(=BN#FY7$$\"37++D6EjpQF0$\"3gTSP1$Rm^\"FY7$ $\"\"%F*$\"3s!4nVW>y:*!#>-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fa\\l-%+AXES LABELSG6$Q!6\"Fe\\l-%%VIEWG6$;F(Fe[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 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "re ad(\"e:/carrental.txt\");" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%*CarRen talGf*6$%\"dG%\"mG6#%$mpdG6\"F+C$>8$*&9%\"\"\"9$!\"\"@%2F.\"$+#O,&*&\" #?F1F2F1F1*&$F1F3F1F0F1F1O,&*&F:F1F2F1F1*(F " 0 "" {MPLTEXT 1 0 17 "CarRental(5,800);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"%+=!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "CarRental(5,1450);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #$\"%+?!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 66 "In class \+ project today. We want to solve a special cubic equation" }}{PARA 0 " " 0 "" {TEXT -1 28 " " }{XPPEDIT 18 0 "x^3+ a*x^2+b = 0;" "6#/,(*$)%\"xG\"\"$\"\"\"F)*&%\"aGF)*$)F'\"\"#F)F)F)%\"b GF)\"\"!" }{TEXT -1 3 " " }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "S : = solve(x^3 + a*x^2 + b = 0, x):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "S[1];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,(*&\"\"'!\" \",(*&\"$3\"\"\"\"%\"bGF*F&*&\"\")F*)%\"aG\"\"$F*F&*&\"#7F*,&*&\"#\")F *)F+\"\"#F*F**(F2F*F+F*F.F*F*#F*F7F*#F*F0F***F7F*F0F&F/F7F'#F&F0F**&F0 F&F/F*F&" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 38 "Problem: Write a program, for input " }{XPPEDIT 18 0 "a ;" "6#%\"aG" }{TEXT -1 7 " and " }{XPPEDIT 18 0 "b;" "6#%\"bG" } {TEXT -1 22 " output that solution" }}{PARA 12 "" 1 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 30 "Homewor k: Chap. 1, #3, 6, 8" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {TEXT -1 0 "" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "31 4 \+ 0" 30 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }