{VERSION 4 0 "IBM INTEL LINUX" "4.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 "" 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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "#Maple #1 is due Thu
rsday 11 January 2000\n" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "#0. Enter your name as a com
ment or as maple text." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "#
The good doctor" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 132 "#1. Fin
d a numeric approximation to pi and e, that is find pi and e to\n50 di
gits. [Hint evalf(exp(1),20) would give e to 20 digits.]" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "e:=exp(1);evalf(Pi,50);evalf(e,50);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"eG-%$expG6#\"\"\"" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#$\"S^P*Rpr>%)G]zKQVEYQKz*e`EfTJ!#\\" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#$\"S+q$4Zsv(\\iENruGg`BX!f%G=G=F!#\\" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 123 "#2. Plot e^(-x) sin(4x) fro
m 0 to 2 pi.  [use exp(-x) or define e:=exp(1),the title uses backquot
es and not single quotes.]" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
68 "plot(e^(-x)*sin(4*x),x=0..2*Pi,title=`damped harmonic good doctor`
);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "#3. Find the derivati
ve of 54 x^100 + ln 2x + square root 3x + x^-3." }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 55 "f:=54*x^100 + ln (2*x) + sqrt( 3*x) + x^(-3);d
iff(f,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG,**$)%\"xG\"$+\"\"
\"\"\"#a-%#lnG6#,$F(\"\"#F**&-%%sqrtG6#\"\"$F*-F36#F(F*F**&F*F**$)F(F5
F*!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,**$)%\"xG\"#**\"\"\"\"%+
a*&F(F(F&!\"\"F(*&*&#F(\"\"#F(-%%sqrtG6#\"\"$F(F(*$-F16#F&F(F+F(*&F3F(
*$)F&\"\"%F(F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "#4. Fin
d the integral of x^2 from 2 to 5." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 59 "int(x^2,x);int(x^2,x=2..5);Int(x^2,x=2..5)=int(x^2,x=
2..5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*$)%\"xG\"\"$\"\"\"#F(F'" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#R" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#/-%$IntG6$*$)%\"xG\"\"#\"\"\"/F);F*\"\"&\"#R" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 132 "#5. F=ma. a is 10 m/sec^2, F is 25 Newtons
, enter this info and solve for m. [Hint use colon equal on everything
 but the equation.]\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "eq
n:=F=m*a;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eqnG/\"#D,$%\"mG\"#5" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "a:=10;" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"aG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
6 "F:=25;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FG\"#D" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "solve(eqn,m);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6##\"\"&\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "16 0 0" 
0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }