{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 }{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
 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 }{PSTYLE "Title" -1 18 1 {CSTYLE "" 
-1 -1 "Times" 1 18 0 0 0 1 2 1 1 2 2 2 1 1 1 1 }3 1 0 0 12 12 1 0 1 0 
2 2 19 1 }{PSTYLE "Author" -1 19 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 8 8 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 25 "Animation on Riemann Sums
" }}{PARA 19 "" 0 "" {TEXT -1 16 "Dr. Wei-Chi Yang" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 15 "with(student):\n" }}}{PARA 13 "" 1 "" 
{TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "f:=x-> x^3-2
*x^2+x-3 ;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "boxes:=[seq
(i^2,i=3..14)];\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 93 "L:= se
q(leftbox(f(x),x=1..5,n,title=convert(evalf(leftsum(f(x),x=1..5,n)),st
ring)),n=boxes):\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(
plots):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "display(L,insequ
ence=true);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "int(f(x),x
=1..5);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "evalf(int(f(x),x
=1..5));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "11
" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }