{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 }{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 }
{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 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 94 "This template can be used \+
to demonstrate and to calculate left sums and right sums for a given" 
}}{PARA 0 "" 0 "" {TEXT -1 56 "function on an arbitrary interval.  The
 demo is set for " }{XPPEDIT 18 0 "f(x) = x^2;" "6#/-%\"fG6#%\"xG*$)F'
\"\"#\"\"\"" }{TEXT -1 10 " on [0,1]." }}{PARA 0 "> " 0 "" {MPLTEXT 1 
0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "with(stude
nt):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "f := x -> x^2;" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a := 0:  b:= 1:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "n := 4: \nleftbox(f(x),x=a..b,n); \+
\nrightbox(f(x),x=a..b,n);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
66 "leftsum(f(x),x=a..b,n);evalf(%);\nrightsum(f(x),x=a..b,n);evalf(%)
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 94 "a := 0: b := 1:\nn:= 4
;\nleftsum(f(x),x=a..b,n):   evalf(%);\nrightsum(f(x),x=a..b,n):  eval
f(%);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 
1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }