{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 Input" 2 19 "" 0 1 255 0 0 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 "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 37 "MAT1500-04/06 04F Test 1 M aple checks" }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 2 "1." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "f:=t->10000/(1+19*exp(-t/5));" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "t=solve(P=f(t),t);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "g:=P->-5*ln(-1/19*(P-10000)/ P);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "t=g(1000);\nevalf(%) ;\nf(rhs(%)); #check!" }}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 2 "2." }} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "Limit((sqrt(x)-5)/(x-25),x=2 5)\n=limit((sqrt(x)-5)/(x-25),x=25);" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "simplify(combine((sqrt(x)-5)/(x-25)*(sqrt(x)+5),symboli c))/(sqrt(x)+5);" "6#*&-%)simplifyG6#-%(combineG6$*(,&-%%sqrtG6#%\"xG \"\"\"\"\"&!\"\"F0,&F/F0\"#DF2F2,&-F-6#F/F0F1F0F0%)symbolicGF0,&-F-6#F /F0F1F0F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "plot([(sqrt(x) -5)/(x-25),1/10],x=20..30);" }}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 2 "3 ." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "f:=x->2*x-x^2;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "(f(a+h)-f(a))/h;\nsimplify(% );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 83 "m_tan:=limit((f(a+h)- f(a))/h,h=0);\nslope_at3:=2-2*3;\ny-(-3)=-4*(x-3);\ny=solve(%,y);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "plot([f(x), 9-4*x],x=0..4); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "plot([f(x), 9-4*x],x=2. 99..3.01);" }}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 2 "4." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 96 "f:=x->(2*x^2-6*x+4)/(x^3-6*x^2+12*x -8);\nfactor(numer(f(x))); factor(denom(f(x)));\nfactor (f(x));" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 95 "Limit(f(x),x=infinity)=limit (f(x),x=infinity);\nLimit(f(x),x=-infinity)=limit(f(x),x=-infinity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "Limit(f(x),x=2)=limit(f(x ),x=2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plot(f(x),x=-15. .20,-10..10);" }}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 2 "5." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "f:=x->exp(-x^2)-x;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot(f(x),x=0..1);\nf(0.); f(1.);\n x=fsolve(f(x)=0,x=0..1);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}}}{MARK "0 0 0" 37 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }