{VERSION 5 0 "SUN SPARC SOLARIS" "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 } {CSTYLE "2D Input" 2 19 "" 0 1 255 0 0 1 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 }{CSTYLE "" -1 256 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 257 "" 0 1 0 0 0 0 0 1 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 260 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 261 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 262 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Tim es" 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 "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warni ng" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 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 Plot" 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 }{PSTYLE "Normal" -1 256 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 " Maple Output" -1 257 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Normal" -1 258 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {PARA 256 "" 0 "" {TEXT -1 24 "MAPLE Worksheet Number 8" }} {PARA 256 "" 0 "" {TEXT -1 16 "Integral as Area" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 21 "We recall that " } {XPPEDIT 18 0 " int(f,x=a..b)" "6#-%$intG6$%\"fG/%\"xG;%\"aG%\"bG" } {TEXT -1 382 " is called the \"definite integral of f from a to b\" \+ and is the \"net area\" between the graph of f and the x-axis between \+ a and b, in other words the area above the x-axis minus the area below the x-axis. If the graph of f is made up of straight lines only, we \+ can compute this definite integral using the formulae for the areas of triangles and rectangles. For example compute " }{XPPEDIT 18 0 "in t(f,x=-4..2)" "6#-%$intG6$%\"fG/%\"xG;,$\"\"%!\"\"\"\"#" }{TEXT -1 22 " for the function " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "f :=piecewise(x<=-1,x+1,-x+4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG -%*PIECEWISEG6$7$,&%\"xG\"\"\"F+F+1F*!\"\"7$,&F*F-\"\"%F+%*otherwiseG " }}}{PARA 0 "" 0 "" {TEXT -1 64 "First plot the graph and then use th e appropriate area formulae." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plot(f,x=-5..5,discont=true);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-%'CURVESG6%7S7$$!\"&\"\"!$!\"%F*7$$!3)\\I^NQ6G \"\\!#<$!3)\\I^NQ6G\"RF07$$!3E%HuX.\\p$[F0$!3E%HuX.\\p$QF07$$!3()[U&*) )Qj^ZF0$!3()[U&*))Qj^PF07$$!38]*o\">KvlYF0$!38]*o\">KvlOF07$$!3ukf@D2G !e%F0$!3ukf@D2G!e$F07$$!3aT23#yO5]%F0$!3aT23#yO5]$F07$$!3PRD&*oU)*=WF0 $!3PRD&*oU)*=MF07$$!3y>!)\\Ua7MVF0$!3y>!)\\Ua7MLF07$$!3L`hPf(Q&\\UF0$! 3L`hPf(Q&\\KF07$$!3&*Q.we4`iTF0$!3&*Q.we4`iJF07$$!3H(f=1W%*e3%F0$!3H(f =1W%*e3$F07$$!3=]4]s)>'**RF0$!3=]4]s)>'**HF07$$!3BAvr_5*H\"RF0$!3BAvr_ 5*H\"HF07$$!3rHi#H83&HQF0$!3rHi#H83&HGF07$$!3X*3\\Rk(p`PF0$!3X*3\\Rk(p `FF07$$!3?(y2+k^Nm$F0$!3?(y2+k^Nm#F07$$!3Y,()>]h=(e$F0$!3Y,()>]h=(e#F0 7$$!3!H6a7$\\N)\\$F0$!3!H6a7$\\N)\\#F07$$!3ubth]Us>MF0$!3ubth]Us>CF07$ $!3%\\Om;$RXLLF0$!3%\\Om;$RXLBF07$$!3hR<(o=/8D$F0$!3hR<(o=/8D#F07$$!3h #p_ia*elJF0$!3h#p_ia*el@F07$$!3hu%\\*[n(o3$F0$!3hu%\\*[n(o3#F07$$!3H(R GLOu>+$F0$!3H(RGLOu>+#F07$$!3Wr)[gk%y8HF0$!3Wr)[gk%y8>F07$$!3zhu!zB:q$ GF0$!3zhu!zB:q$=F07$$!3xx![R<-Tv#F0$!3xx![R<-Tv\"F07$$!3s())Ge'[WoEF0$ !3s())Ge'[Wo;F07$$!3J&QQ5!fk%e#F0$!3J&QQ5!fk%e\"F07$$!3T%3TP4mN]#F0$!3 T%3TP4mN]\"F07$$!3(z9m9zSNT#F0$!3(z9m9zSNT\"F07$$!3NW]L`!\\EL#F0$!3NW] L`!\\EL\"F07$$!3K+V)o&)ziC#F0$!3K+V)o&)ziC\"F07$$!3!>H8z_;!o@F0$!3!>H8 z_;!o6F07$$!3okQHPSX#3#F0$!3okQHPSX#3\"F07$$!3$4!=m,k%>+#F0$!3$4!=m,k% >+\"F07$$!3!y^0_s#z<>F0$!3+y^0_s#z<*!#=7$$!3jtydCr^N=F0$!3PO(ydCr^N)Fa w7$$!3^Wli&>#Q\\#Q\\(Faw7$$!3)HFn;-Ckm\"F0$!3#*HFn;-CkmFaw 7$$!3)[OzoI(e\"e\"F0$!3&)[OzoI(e\"eFaw7$$!3[LI#H3`u\\\"F0$!3uM.BH3`u\\ Faw7$$!3NV'\\*oC9?9F0$!3bLk\\*oC9?%Faw7$$!3(p#y$3yN:L\"F0$!3wp#y$3yN:L Faw7$$!30@Eq-\\G_7F0$!3]5i-F!\\G_#Faw7$$!3EK03Ppyn6F0$!3sA`!3Ppyn\"Faw 7$$!3w?FG-;\"p3\"F0$!3!o2s#G-;\"p)!#>7$$!3%*******4+++5F0$!2/HD#R***** ***!#D7S7$$!2%********)*******F0$\"31+++!*******\\F07$$!3%[rz@lq@p)Faw $\"3Prz@lq@p[F07$$!3ttid;aBavFaw$\"3fFwlTNUbZF07$$!3o_\"47B3XF'Faw$\"3 /:47B3XFYF07$$!3DphN$=)H')\\Faw$\"3E6F0$\"3pM?`8#z2)GF07$$\"3K()e*\\hnCD\"F0$\"3o7T+&QKvu#F07$$\"3@ 5$\\gj8/P\"F0$\"3y*o]RO'eHEF07$$\"3/NOe9\">)*\\\"F0$\"3'\\O;a)3=+DF07$ $\"3og#y=tVIi\"F0$\"3KR<7oi&pP#F07$$\"3!R(R\"Hp:;v\"F0$\"35Eg32VQ[AF07 $$\"3v\">n*))[op=F0$\"3C3G.6^JI@F07$$\"3_N\\]n%Qq*>F0$\"3[k]\\K:'H+#F0 7$$\"3AhW`VIKH@F0$\"3xQbYcpnq=F07$$\"3#y`Ue:xWC#F0$\"3=iu:WG_b+V)=x>%p)Faw7$$\"3#3/q;AvzC$F0$\"3w\"f* H$yZ-_(Faw7$$\"3@Nhqd*=jP$F0$\"3%ykQHU5oB'Faw7$$\"3Cl[D6/3(\\$F0$\"3gZ 8X()e>H]Faw7$$\"3-#[Wg#4JBOF0$\"3$)z^bR2*ow$Faw7$$\"3*>z)3FVsYPF0$\"30 !37\"HnvKDFaw7$$\"3)[XB1sEf(QF0$\"34^aw$zK2C\"Faw7$$\"3bggm\")RO+SF0$! 3mKbggm\")RO!#@7$$\"3mnR&R0>w7%F0$!3kw'R&R0>w7Faw7$$\"35LO***Q?QD%F0$! 3+Jj$***Q?QDFaw7$$\"3_c.06jypVF0$!3IlN]5J'yp$Faw7$$\"3RR)GLM'p-XF0$!3! RR)GLM'p-&Faw7$$\"3P72jgEd@YF0$!3qBrI1ms:iFaw7$$\"3Fn%p\"4'>$[ZF0$!3qs Yp\"4'>$[(Faw7$$\"3wysY6Ejp[F0$!3q(ysY6Ejp)Faw7$$\"\"&F*$!\"\"F*-%'COL OURG6&%$RGBG$\"*++++\"!\")$F*F*Fjjl-%'POINTSG6$7$FajlFjjlFcjl-%+AXESLA BELSG6$Q\"x6\"Q!Fc[m-%%VIEWG6$;F(F_jl%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 156 "Use the formula for the area of a triang le, one half the base time the height for the left triangle. Subtract the area of triangles for the right-hand part" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 92 " (1/2)*(-1-(-4))*subs(x=-4,x+1)+ (1/2)*(4-(-1))*subs(x=-1, -x+4)-(1/2)* (4-2)*subs(x=2, -x+4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"'" }}} {PARA 0 "" 0 "" {TEXT -1 0 "" }{TEXT 256 15 "The area equals" }{TEXT 257 23 " " }{TEXT 258 0 "" }}{PARA 0 "" 0 "" {TEXT -1 147 "The MAPLE command syntax for computing the definite inte gral of a function g with respect to the variable var between the valu es var=a and var=b is" }}{PARA 256 "" 0 "" {TEXT -1 16 "int(g,var=a..b );" }}{PARA 0 "" 0 "" {TEXT -1 18 "Try it to compute " }{XPPEDIT 18 0 " int(f,x=-4..2)" "6#-%$intG6$%\"fG/%\"xG;,$\"\"%!\"\"\"\"#" }{TEXT -1 123 " for our f defined above. Notice that x is the integration va riable. (Convert command to math symbolism on your worksheet." }} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "int(f,x=-4..2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"'" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }} {PARA 0 "" 0 "" {TEXT -1 126 "MAPLE has a very nice package designed t o help students of Calculus visualize such area problems. It is loade d by the command" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "with(stu dent);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7@%\"DG%%DiffG%*DoubleintG%$ IntG%&LimitG%(LineintG%(ProductG%$SumG%*TripleintG%*changevarG%/comple tesquareG%)distanceG%'equateG%*integrandG%*interceptG%)intpartsG%(left boxG%(leftsumG%)makeprocG%*middleboxG%*middlesumG%)midpointG%(powsubsG %)rightboxG%)rightsumG%,showtangentG%(simpsonG%&slopeG%(summandG%*trap ezoidG" }}}{PARA 0 "" 0 "" {TEXT -1 163 "Many of these commands should have a familiar ring to them. Let's try the *box and *sum commands. After loading the student package, try the following commands." }} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "leftbox(f,x=-4..2,3);" }} {PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6(-%)POLYGONSG6$7& 7$$!\"%\"\"!$F*F*7$F($!\"$F*7$$!\"#F*F-7$F0F+-%&COLORG6&%$RGBG$\"\"(! \"\"$\"\"*F9F7-F$6$7&F27$F0$F9F*7$F+F@7$F+F+F3-F$6$7&FB7$F+$\"\"%F*7$$ \"\"#F*FG7$FJF+F3-%'CURVESG6&7hnF,7$$!3*)*****\\2<#pQ!#<$!3*)*****\\2< #pGFT7$$!3#)***\\7bBav$FT$!3#)***\\7bBav#FT7$$!36++]K3XFOFT$!36++]K3XF EFT7$$!3%)****\\F)H')\\$FT$!3%)****\\F)H')\\#FT7$$!3\"****\\i3@/P$FT$! 3\"****\\i3@/P#FT7$$!3:++Dr^b^KFT$!3:++Dr^b^AFT7$$!3#****\\7Sw%GJFT$!3 #****\\7Sw%G@FT7$$!3*****\\7;)=,IFT$!3*****\\7;)=,?FT7$$!3!)***\\i83V( GFT$!3!)***\\i83V(=FT7$$!39+++NkzVFFT$!39+++NkzViUC#FT$!37+++&>iUC\"FT7$$!3!)* **\\7YY08#FT$!3!)***\\7YY08\"FT7$$!3)******\\XF`*>FT$!3s******\\XF`**! #=7$$!3(*******>#z2)=FT$!3u*******>#z2))F\\s7$$!3/++D\"RKvu\"FT$!3R++] 7RKvuF\\s7$$!3<+++qjeH;FT$!3s,+++P'eH'F\\s7$$!3()***\\7*3=+:FT$!3q)*** \\7*3=+&F\\s7$$!3%)***\\PFcpP\"FT$!3[)***\\PFcpPF\\s7$$!3\")****\\7VQ[ 7FT$!3:)****\\7VQ[#F\\s7$$!3!)***\\i6:.8\"FT$!32)***\\i6:.8F\\s7$$!3$* **\\(oKQm1\"FT$!39$***\\(oKQm'!#>7$$!31++]P:'H+\"FT$!3Wb+++v`hH!#?7$$! 3Fv=#\\Ww#))**F\\s$\"3)z=#\\Ww#))*\\FT7$$!3**\\P%[^Pp%**F\\s$\"3+vV[^P p%*\\FT7$$!3rCcw%e)f0**F\\s$\"3-ilZe)f0*\\FT7$$!3a+voa'fU')*F\\s$\"3%* \\(oa'fU')\\FT7$$!35^7`%z\"e\"y*F\\s$\"3*[7`%z\"e\"y\\FT7$$!3a+]PMR!*) p*F\\s$\"3$)*\\PMR!*)p\\FT7$$!3_+D19#[N`*F\\s$\"3r\\iS@[N`\\FT7$$!3^++ v$\\#>o$*F\\s$\"3\\+]P\\#>o$\\FT7$$!3]+]7`5[P!*F\\s$\"3F+DJ0\"[P!\\FT7 $$!3[++]7'pnq)F\\s$\"3/++Dhpnq[FT7$$!3n+++]!**48)F\\s$\"3i*****\\!**48 [FT7$$!3'3++v[G_b(F\\s$\"34++v[G_bZFT7$$!3s)****\\_K:J'F\\s$\"3()**** \\_K:JYFT7$$!35-+++HnE]F\\s$\"3x*******GnE]%FT7$$!3y,++D%)opPF\\s$\"3< ++]U)opP%FT7$$!3F++]78\\`DF\\s$\"3.++DJ\"\\`D%FT7$$!3)3++]x6J?\"F\\s$ \"3k****\\x6J?TFT7$$\"3_y&******Hk-\"F[v$\"3U+++qN(*)*RFT7$$\"30,++]A! eI\"F\\s$\"3*)*****\\x>%pQFT7$$\"3E(***\\(=_(zCF\\s$\"3F++D\"yC?v$FT7$ $\"3V.++]&*=jPF\\s$\"3m*****\\/\"oBOFT7$$\"3\"f***\\(3/3(\\F\\s$\"3T++ D\"f>H]$FT7$$\"3y++]P#4JB'F\\s$\"3\"****\\i2*owLFT7$$\"3W(*****\\KCnuF \\s$\"3D+++vcF`KFT7$$\"3A(***\\(=n#f()F\\s$\"3G++D\"GtS7$FT7$$\"3P+++! )RO+5FT$\"3i******>gj**HFT7$$\"30++]_!>w7\"FT$\"3%*****\\Z4QsGFT7$$\"3 N++v)Q?QD\"FT$\"3l***\\7hzhu#FT7$$\"3G+++5jyp8FT$\"3s*******o8-j#FT7$$ \"3<++]Ujp-:FT$\"3#)****\\dOI(\\#FT7$$\"3++++gEd@;FT$\"3********RtUyBF T7$$\"39++v3'>$[ " 0 "" {MPLTEXT 1 0 49 "left sum(f,x=-4..2,3)=value(leftsum(f,x=-4..2,3));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,$-%$SumG6$-%*PIECEWISEG6$7$,&!\"$\"\"\"*&\"\"#F.%\"jG F.F.1,&!\"%F.*&F0F.F1F.F.!\"\"7$,&\"\")F.*&F0F.F1F.F6%*otherwiseG/F1; \"\"!F0F0F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "leftbox(f,x= -4..2,7);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6,-%' CURVESG6&7hn7$$!\"%\"\"!$!\"$F*7$$!3*)*****\\2<#pQ!#<$!3*)*****\\2<#pG F07$$!3#)***\\7bBav$F0$!3#)***\\7bBav#F07$$!36++]K3XFOF0$!36++]K3XFEF0 7$$!3%)****\\F)H')\\$F0$!3%)****\\F)H')\\#F07$$!3\"****\\i3@/P$F0$!3\" ****\\i3@/P#F07$$!3:++Dr^b^KF0$!3:++Dr^b^AF07$$!3#****\\7Sw%GJF0$!3#** **\\7Sw%G@F07$$!3*****\\7;)=,IF0$!3*****\\7;)=,?F07$$!3!)***\\i83V(GF0 $!3!)***\\i83V(=F07$$!39+++NkzVFF0$!39+++NkzViUC#F0$!37+++&>iUC\"F07$$!3!)***\\ 7YY08#F0$!3!)***\\7YY08\"F07$$!3)******\\XF`*>F0$!3s******\\XF`**!#=7$ $!3(*******>#z2)=F0$!3u*******>#z2))Fhp7$$!3/++D\"RKvu\"F0$!3R++]7RKvu Fhp7$$!3<+++qjeH;F0$!3s,+++P'eH'Fhp7$$!3()***\\7*3=+:F0$!3q)***\\7*3=+ &Fhp7$$!3%)***\\PFcpP\"F0$!3[)***\\PFcpPFhp7$$!3\")****\\7VQ[7F0$!3:)* ***\\7VQ[#Fhp7$$!3!)***\\i6:.8\"F0$!32)***\\i6:.8Fhp7$$!3$***\\(oKQm1 \"F0$!39$***\\(oKQm'!#>7$$!31++]P:'H+\"F0$!3Wb+++v`hH!#?7$$!3Fv=#\\Ww# ))**Fhp$\"3)z=#\\Ww#))*\\F07$$!3**\\P%[^Pp%**Fhp$\"3+vV[^Pp%*\\F07$$!3 rCcw%e)f0**Fhp$\"3-ilZe)f0*\\F07$$!3a+voa'fU')*Fhp$\"3%*\\(oa'fU')\\F0 7$$!35^7`%z\"e\"y*Fhp$\"3*[7`%z\"e\"y\\F07$$!3a+]PMR!*)p*Fhp$\"3$)*\\P MR!*)p\\F07$$!3_+D19#[N`*Fhp$\"3r\\iS@[N`\\F07$$!3^++v$\\#>o$*Fhp$\"3 \\+]P\\#>o$\\F07$$!3]+]7`5[P!*Fhp$\"3F+DJ0\"[P!\\F07$$!3[++]7'pnq)Fhp$ \"3/++Dhpnq[F07$$!3n+++]!**48)Fhp$\"3i*****\\!**48[F07$$!3'3++v[G_b(Fh p$\"34++v[G_bZF07$$!3s)****\\_K:J'Fhp$\"3()****\\_K:JYF07$$!35-+++HnE] Fhp$\"3x*******GnE]%F07$$!3y,++D%)opPFhp$\"3<++]U)opP%F07$$!3F++]78\\` DFhp$\"3.++DJ\"\\`D%F07$$!3)3++]x6J?\"Fhp$\"3k****\\x6J?TF07$$\"3_y&** ****Hk-\"Fgs$\"3U+++qN(*)*RF07$$\"30,++]A!eI\"Fhp$\"3*)*****\\x>%pQF07 $$\"3E(***\\(=_(zCFhp$\"3F++D\"yC?v$F07$$\"3V.++]&*=jPFhp$\"3m*****\\/ \"oBOF07$$\"3\"f***\\(3/3(\\Fhp$\"3T++D\"f>H]$F07$$\"3y++]P#4JB'Fhp$\" 3\"****\\i2*owLF07$$\"3W(*****\\KCnuFhp$\"3D+++vcF`KF07$$\"3A(***\\(=n #f()Fhp$\"3G++D\"GtS7$F07$$\"3P+++!)RO+5F0$\"3i******>gj**HF07$$\"30++ ]_!>w7\"F0$\"3%*****\\Z4QsGF07$$\"3N++v)Q?QD\"F0$\"3l***\\7hzhu#F07$$ \"3G+++5jyp8F0$\"3s*******o8-j#F07$$\"3<++]Ujp-:F0$\"3#)****\\dOI(\\#F 07$$\"3++++gEd@;F0$\"3********RtUyBF07$$\"39++v3'>$[ " 0 "" {MPLTEXT 1 0 49 "leftsum(f,x=-4..2,7)=value(leftsum(f,x=-4..2,7));" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#/,$-%$SumG6$-%*PIECEWISEG6$7$,&!\"$\" \"\"*&#\"\"'\"\"(F.%\"jGF.F.1,&!\"%F.*&F0F.F3F.F.!\"\"7$,&\"\")F.*&#F1 F2F.F3F.F8%*otherwiseG/F3;\"\"!F1F0#\"$!=\"#\\" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 23 "leftbox(f,x=-4..2,100);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6cq-%'CURVESG6&7hn7$$!\"%\"\"!$!\"$ F*7$$!3*)*****\\2<#pQ!#<$!3*)*****\\2<#pGF07$$!3#)***\\7bBav$F0$!3#)** *\\7bBav#F07$$!36++]K3XFOF0$!36++]K3XFEF07$$!3%)****\\F)H')\\$F0$!3%)* ***\\F)H')\\#F07$$!3\"****\\i3@/P$F0$!3\"****\\i3@/P#F07$$!3:++Dr^b^KF 0$!3:++Dr^b^AF07$$!3#****\\7Sw%GJF0$!3#****\\7Sw%G@F07$$!3*****\\7;)=, IF0$!3*****\\7;)=,?F07$$!3!)***\\i83V(GF0$!3!)***\\i83V(=F07$$!39+++Nk zVFF0$!39+++NkzViUC#F0$!37+++&>iUC\"F07$$!3!)***\\7YY08#F0$!3!)***\\7YY08\"F07$ $!3)******\\XF`*>F0$!3s******\\XF`**!#=7$$!3(*******>#z2)=F0$!3u****** *>#z2))Fhp7$$!3/++D\"RKvu\"F0$!3R++]7RKvuFhp7$$!3<+++qjeH;F0$!3s,+++P' eH'Fhp7$$!3()***\\7*3=+:F0$!3q)***\\7*3=+&Fhp7$$!3%)***\\PFcpP\"F0$!3[ )***\\PFcpPFhp7$$!3\")****\\7VQ[7F0$!3:)****\\7VQ[#Fhp7$$!3!)***\\i6:. 8\"F0$!32)***\\i6:.8Fhp7$$!3$***\\(oKQm1\"F0$!39$***\\(oKQm'!#>7$$!31+ +]P:'H+\"F0$!3Wb+++v`hH!#?7$$!3Fv=#\\Ww#))**Fhp$\"3)z=#\\Ww#))*\\F07$$ !3**\\P%[^Pp%**Fhp$\"3+vV[^Pp%*\\F07$$!3rCcw%e)f0**Fhp$\"3-ilZe)f0*\\F 07$$!3a+voa'fU')*Fhp$\"3%*\\(oa'fU')\\F07$$!35^7`%z\"e\"y*Fhp$\"3*[7`% z\"e\"y\\F07$$!3a+]PMR!*)p*Fhp$\"3$)*\\PMR!*)p\\F07$$!3_+D19#[N`*Fhp$ \"3r\\iS@[N`\\F07$$!3^++v$\\#>o$*Fhp$\"3\\+]P\\#>o$\\F07$$!3]+]7`5[P!* Fhp$\"3F+DJ0\"[P!\\F07$$!3[++]7'pnq)Fhp$\"3/++Dhpnq[F07$$!3n+++]!**48) Fhp$\"3i*****\\!**48[F07$$!3'3++v[G_b(Fhp$\"34++v[G_bZF07$$!3s)****\\_ K:J'Fhp$\"3()****\\_K:JYF07$$!35-+++HnE]Fhp$\"3x*******GnE]%F07$$!3y,+ +D%)opPFhp$\"3<++]U)opP%F07$$!3F++]78\\`DFhp$\"3.++DJ\"\\`D%F07$$!3)3+ +]x6J?\"Fhp$\"3k****\\x6J?TF07$$\"3_y&******Hk-\"Fgs$\"3U+++qN(*)*RF07 $$\"30,++]A!eI\"Fhp$\"3*)*****\\x>%pQF07$$\"3E(***\\(=_(zCFhp$\"3F++D \"yC?v$F07$$\"3V.++]&*=jPFhp$\"3m*****\\/\"oBOF07$$\"3\"f***\\(3/3(\\F hp$\"3T++D\"f>H]$F07$$\"3y++]P#4JB'Fhp$\"3\"****\\i2*owLF07$$\"3W(**** *\\KCnuFhp$\"3D+++vcF`KF07$$\"3A(***\\(=n#f()Fhp$\"3G++D\"GtS7$F07$$\" 3P+++!)RO+5F0$\"3i******>gj**HF07$$\"30++]_!>w7\"F0$\"3%*****\\Z4QsGF0 7$$\"3N++v)Q?QD\"F0$\"3l***\\7hzhu#F07$$\"3G+++5jyp8F0$\"3s*******o8-j #F07$$\"3<++]Ujp-:F0$\"3#)****\\dOI(\\#F07$$\"3++++gEd@;F0$\"3******** RtUyBF07$$\"39++v3'>$[Fg_l7$$!++++?HF g_lFejl7$FhjlFg^lFi_l-F`_l6$7&Fjjl7$Fhjl$!++++?>Fg_l7$$!++++gGFg_lF_[m 7$Fb[mFg^lFi_l-F`_l6$7&Fd[m7$Fb[m$!++++g=Fg_l7$$!+++++GFg_lFi[m7$F\\\\ mFg^lFi_l-F`_l6$7&F^\\m7$F\\\\m$!+++++=Fg_l7$$!++++SFFg_lFc\\m7$Ff\\mF g^lFi_l-F`_l6$7&Fh\\m7$Ff\\m$!++++SFg_lFedm7$FhdmFg^lFi _l-F`_l6$7&Fjdm7$Fhdm$!+++++'*!#57$$!+++++>Fg_lF_em7$FcemFg^lFi_l-F`_l 6$7&Feem7$Fcem$!+++++!*Faem7$$!++++S=Fg_lFjem7$F]fmFg^lFi_l-F`_l6$7&F_ fm7$F]fm$!+++++%)Faem7$$!++++!y\"Fg_lFdfm7$FgfmFg^lFi_l-F`_l6$7&Fifm7$ Fgfm$!+++++yFaem7$$!++++?Fg_lF\\\\p7$F_\\pFg^lFi_l-F`_l6$7&Fa\\p7$F_\\p$\"++++g?Fg_l7$F^^l Ff\\p7$F^^lFg^lFi_l-%+AXESLABELSG6$Q\"x6\"Q!F^]p-%%VIEWG6$;F(F^^l%(DEF AULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve \+ 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" "Curve 7" "Curve \+ 8" "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Curve 13" "Curve 14" "C urve 15" "Curve 16" "Curve 17" "Curve 18" "Curve 19" "Curve 20" "Curve 21" "Curve 22" "Curve 23" "Curve 24" "Curve 25" "Curve 26" "Curve 27 " "Curve 28" "Curve 29" "Curve 30" "Curve 31" "Curve 32" "Curve 33" "C urve 34" "Curve 35" "Curve 36" "Curve 37" "Curve 38" "Curve 39" "Curve 40" "Curve 41" "Curve 42" "Curve 43" "Curve 44" "Curve 45" "Curve 46 " "Curve 47" "Curve 48" "Curve 49" "Curve 50" "Curve 51" "Curve 52" "C urve 53" "Curve 54" "Curve 55" "Curve 56" "Curve 57" "Curve 58" "Curve 59" "Curve 60" "Curve 61" "Curve 62" "Curve 63" "Curve 64" "Curve 65 " "Curve 66" "Curve 67" "Curve 68" "Curve 69" "Curve 70" "Curve 71" "C urve 72" "Curve 73" "Curve 74" "Curve 75" "Curve 76" "Curve 77" "Curve 78" "Curve 79" "Curve 80" "Curve 81" "Curve 82" "Curve 83" "Curve 84 " "Curve 85" "Curve 86" "Curve 87" "Curve 88" "Curve 89" "Curve 90" "C urve 91" "Curve 92" "Curve 93" "Curve 94" "Curve 95" "Curve 96" "Curve 97" "Curve 98" "Curve 99" "Curve 100" "Curve 101" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "leftsum(f,x=-4..2,100)=value(leftsum(f,x=-4 ..2,100));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,$-%$SumG6$-%*PIECEWISE G6$7$,&!\"$\"\"\"*&#\"\"$\"#]F.%\"jGF.F.1,&!\"%F.*&F0F.F3F.F.!\"\"7$,& \"\")F.*&#F1F2F.F3F.F8%*otherwiseG/F3;\"\"!\"#**F0#\"#d\"#5" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 154 "Notice how the more boxes we use the closer the answer agrees with the actual answer above. Continue with the following command sequences using rightbox. " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "rightbox(f,x=-4..4,7);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6,-%'CURVESG6&7h n7$$!\"%\"\"!$!\"$F*7$$!3ommmmFiDQ!#<$!3ommmmFiDGF07$$!34LLLo!)*Qn$F0$ !34LLLo!)*Qn#F07$$!3nmmmwxE.NF0$!3nmmmwxE.DF07$$!3YmmmOk]JLF0$!3YmmmOk ]JBF07$$!3_LLL[9cgJF0$!3_LLL[9cg@F07$$!3smmmhN2-IF0$!3smmmhN2-?F07$$!3 !******\\`oz$GF0$!3!******\\`oz$=F07$$!3zmmm\")3DoEF0$!3zmmm\")3Do;F07 $$!3?+++:v2*\\#F0$!3?+++:v2*\\\"F07$$!3BLLL8>1DBF0$!3BLLL8>1D8F07$$!3j mmmw))yr@F0$!3jmmmw))yr6F07$$!3;+++S(R#**>F0$!3a,+++uR#***!#=7$$!30+++ +@)f#=F0$!3_++++5#)f#)Fdo7$$!3-+++gi,f;F0$!3?++++E;!f'Fdo7$$!3qmmm\"G& R2:F0$!3(pmmm\"G&R2&Fdo7$$!3WLLLtK5F8F0$!3WMLLLF.rKFdo7$$!3_LLL$yP2D\" F0$!3>NLLLyP2DFdo7$$!3eLLL$HsV<\"F0$!3%fLLL$HsV7$$!3;+]PpKLj5F0$!3u; +]PpKLjF]r7$$!3mLLeka7T5F0$!3'fOL$eka7TF]r7$$!3=+v=i:-I5F0$!3P=+v=i:-I F]r7$$!3$pm\"zfw\"*=5F0$!3)Hpm\"zfw\"*=F]r7$$!3>]Pf3dO85F0$!3=>]Pf3dO8 F]r7$$!3oLeRdP\"y+\"F0$!3!fnLeRdP\"y!#?7$$!3%p\"z>1=E-5F0$!3%z$p\"z>1= E#F\\t7$$!3+-++]&)4n**Fdo$\"3k+++b)4n*\\F07$$!3bpmmTqM8F0$\"3*QLLL4)HlEF07$$\"3%)*******HSu]\"F0$\"3;++++(f D\\#F07$$\"3'HLL$ep'Rm\"F0$\"3-nmmTI.OBF07$$\"3')******R>4N=F0$\"37+++ g!3\\;#F07$$\"3#emm;@2h*>F0$\"3:nEF0$\"3YmmmE![GL\"F07$$\"35LLL.a#o$GF0$\"3)o mmmfuJ;\"F07$$\"3ammm^Q40IF0$\"3iMLL$[h!\\**Fdo7$$\"3y******z]rfJF0$\" 38-+++#\\GS)Fdo7$$\"3gmmmc%GpL$F0$\"3-MLLLarImFdo7$$\"3/LLL8-V&\\$F0$ \"3kpmmmypX]Fdo7$$\"3=+++XhUkOF0$\"35)*****\\&QdN$Fdo7$$\"3=+++:o " 0 "" {MPLTEXT 1 0 51 "rightsum(f,x=-4..2,7)= value(rightsum(f,x=-4..2,7));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,$-% $SumG6$-%*PIECEWISEG6$7$,&!\"$\"\"\"*&#\"\"'\"\"(F.%\"jGF.F.1,&!\"%F.* &F0F.F3F.F.!\"\"7$,&\"\")F.*&#F1F2F.F3F.F8%*otherwiseG/F3;F.F2F0#\"$!R \"#\\" }}}{PARA 0 "" 0 "" {TEXT -1 151 "Notice this is a lot closer th an was leftsum using only 7 boxes. Let's use the average of the leftb ox and rightbox idea. In other words we will use " }{XPPEDIT 18 0 "( area of the leftbox + the area of the right box)/2" "6#*&,&**%%areaG\" \"\"%#ofGF'%$theGF'%(leftboxGF'F'*.F)F'F&F'F(F'F)F'%&rightGF'%$boxGF'F 'F'\"\"#!\"\"" }{TEXT -1 3 ". " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 101 "(leftsum(f,x=-4..2,7)+rightsum(f,x=-4..2,7))/2=value((leftsum (f,x=-4..2,7)+rightsum(f,x=-4..2,7))/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,&-%$SumG6$-%*PIECEWISEG6$7$,&!\"$\"\"\"*&#\"\"'\"\"(F.%\"jGF.F .1,&!\"%F.*&F0F.F3F.F.!\"\"7$,&\"\")F.*&#F1F2F.F3F.F8%*otherwiseG/F3; \"\"!F1#\"\"$F2*&FBF.-F&6$F(/F3;F.F2F.F.#\"$&G\"#\\" }}}{PARA 0 "" 0 " " {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 163 "This is pretty close. \+ I seem to recall that the average of the leftbox area and the rightbo x area is the area of the obvious trapezoid. Try the trapezoid command ." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "trapezoid(f,x=-4..2,7)= value(trapezoid(f,x=-4..2,7));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,&# !\"$\"\"(\"\"\"*&#\"\"'F'F(-%$SumG6$-%*PIECEWISEG6$7$,&F&F(*&F*F(%\"jG F(F(1,&!\"%F(*&F*F(F5F(F(!\"\"7$,&\"\")F(*&#F+F'F(F5F(F:%*otherwiseG/F 5;F(F+F(F(#\"$&G\"#\\" }}}{PARA 0 "" 0 "" {TEXT -1 66 "I guess I remem bered correctly. Now we try the middlebox approach." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "middlebox(f,x=-4..2);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6&7hn7$$!\"%\"\"!$!\"$F *7$$!3*)*****\\2<#pQ!#<$!3*)*****\\2<#pGF07$$!3#)***\\7bBav$F0$!3#)*** \\7bBav#F07$$!36++]K3XFOF0$!36++]K3XFEF07$$!3%)****\\F)H')\\$F0$!3%)** **\\F)H')\\#F07$$!3\"****\\i3@/P$F0$!3\"****\\i3@/P#F07$$!3:++Dr^b^KF0 $!3:++Dr^b^AF07$$!3#****\\7Sw%GJF0$!3#****\\7Sw%G@F07$$!3*****\\7;)=,I F0$!3*****\\7;)=,?F07$$!3!)***\\i83V(GF0$!3!)***\\i83V(=F07$$!39+++Nkz VFF0$!39+++NkzViUC#F0$!37+++&>iUC\"F07$$!3!)***\\7YY08#F0$!3!)***\\7YY08\"F07$$ !3)******\\XF`*>F0$!3s******\\XF`**!#=7$$!3(*******>#z2)=F0$!3u******* >#z2))Fhp7$$!3/++D\"RKvu\"F0$!3R++]7RKvuFhp7$$!3<+++qjeH;F0$!3s,+++P'e H'Fhp7$$!3()***\\7*3=+:F0$!3q)***\\7*3=+&Fhp7$$!3%)***\\PFcpP\"F0$!3[) ***\\PFcpPFhp7$$!3\")****\\7VQ[7F0$!3:)****\\7VQ[#Fhp7$$!3!)***\\i6:.8 \"F0$!32)***\\i6:.8Fhp7$$!3$***\\(oKQm1\"F0$!39$***\\(oKQm'!#>7$$!31++ ]P:'H+\"F0$!3Wb+++v`hH!#?7$$!3Fv=#\\Ww#))**Fhp$\"3)z=#\\Ww#))*\\F07$$! 3**\\P%[^Pp%**Fhp$\"3+vV[^Pp%*\\F07$$!3rCcw%e)f0**Fhp$\"3-ilZe)f0*\\F0 7$$!3a+voa'fU')*Fhp$\"3%*\\(oa'fU')\\F07$$!35^7`%z\"e\"y*Fhp$\"3*[7`%z \"e\"y\\F07$$!3a+]PMR!*)p*Fhp$\"3$)*\\PMR!*)p\\F07$$!3_+D19#[N`*Fhp$\" 3r\\iS@[N`\\F07$$!3^++v$\\#>o$*Fhp$\"3\\+]P\\#>o$\\F07$$!3]+]7`5[P!*Fh p$\"3F+DJ0\"[P!\\F07$$!3[++]7'pnq)Fhp$\"3/++Dhpnq[F07$$!3n+++]!**48)Fh p$\"3i*****\\!**48[F07$$!3'3++v[G_b(Fhp$\"34++v[G_bZF07$$!3s)****\\_K: J'Fhp$\"3()****\\_K:JYF07$$!35-+++HnE]Fhp$\"3x*******GnE]%F07$$!3y,++D %)opPFhp$\"3<++]U)opP%F07$$!3F++]78\\`DFhp$\"3.++DJ\"\\`D%F07$$!3)3++] x6J?\"Fhp$\"3k****\\x6J?TF07$$\"3_y&******Hk-\"Fgs$\"3U+++qN(*)*RF07$$ \"30,++]A!eI\"Fhp$\"3*)*****\\x>%pQF07$$\"3E(***\\(=_(zCFhp$\"3F++D\"y C?v$F07$$\"3V.++]&*=jPFhp$\"3m*****\\/\"oBOF07$$\"3\"f***\\(3/3(\\Fhp$ \"3T++D\"f>H]$F07$$\"3y++]P#4JB'Fhp$\"3\"****\\i2*owLF07$$\"3W(*****\\ KCnuFhp$\"3D+++vcF`KF07$$\"3A(***\\(=n#f()Fhp$\"3G++D\"GtS7$F07$$\"3P+ ++!)RO+5F0$\"3i******>gj**HF07$$\"30++]_!>w7\"F0$\"3%*****\\Z4QsGF07$$ \"3N++v)Q?QD\"F0$\"3l***\\7hzhu#F07$$\"3G+++5jyp8F0$\"3s*******o8-j#F0 7$$\"3<++]Ujp-:F0$\"3#)****\\dOI(\\#F07$$\"3++++gEd@;F0$\"3********RtU yBF07$$\"39++v3'>$[ " 0 "" {MPLTEXT 1 0 49 "middlesum(f,x=-4..2) =value(middlesum(f,x=-4..2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,$-% $SumG6$-%*PIECEWISEG6$7$,&#!\"*\"\"%\"\"\"*&#\"\"$\"\"#F0%\"jGF0F01,&# !#8F/F0*&F2F0F5F0F0!\"\"7$,&#\"#HF/F0*&#F3F4F0F5F0F;%*otherwiseG/F5;\" \"!F3F2\"\"'" }}}{PARA 0 "" 0 "" {TEXT -1 208 "Look at the correct pic ture and say why this \"approximation\" to the definite integral actua lly gives the exact answer. Apparently middlebox drew the picture inco rrectly but middlesum computed the correct sum." }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 121 "If you cut off the triangles that stick up above or down below the graph, you can put them into the holes in the figure. " }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 471 "Of \+ course the more interesting area problems occur when the graphs are no t straight line segments, but are curves. For each of the following fu nctions find the area of the region in the first quadrant, to the left of the line x=10, above the x-axis, and below the graph. Then use on e of the \"box\" commands to plot the graph with the indicated area ap proximated by boxes. Use the corresponding \"sum\" and evalf commands to approximate the area to within 2 decimal places." }}{PARA 0 "" 0 " " {TEXT -1 7 "a. " }{XPPEDIT 18 0 "3*sin(2*x)" "6#*&\"\"$\"\"\"-%$ sinG6#*&\"\"#F%%\"xGF%F%" }{TEXT -1 3 " " }}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 16 "f := 3*sin(2*x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>%\"fG,$-%$sinG6#,$%\"xG\"\"#\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "plot(f, x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7ct7$$\"\"!F)F(7$$\"3VmmmT&)G\\a!#> $\"3*y!G[eV5jK!#=7$$\"3GLLL3x&)*3\"F0$\"3w+SpW#)[(['F07$$\"3$*****\\il yM;F0$\"3wsO8\\1*[j*F07$$\"3dmmm;arz@F0$\"3+3$zNS'zm7!#<7$$\"3u***\\7y %*z7$F0$\"3Sxo;)p[nv\"F@7$$\"3ZLL$e9ui2%F0$\"3Ud4si5q$=#F@7$$\"3z***\\ (oMrU^F0$\"358'z6\\V'pDF@7$$\"3nmmm\"z_\"4iF0$\"3ejb3>48RGF@7$$\"3/nm; zp!fu'F0$\"3(QJ8MDJm#HF@7$$\"3Tnmmm6m#G(F0$\"3k#fiW(oV!)HF@7$$\"3.nmTg #Q5b(F0$\"3)fedI?&\\%*HF@7$$\"3ynm;a`T>yF0$\"3EPNi5$G***HF@7$$\"3_om\" zW#z(3)F0$\"3!f\\gya?n*HF@7$$\"39ommT&phN)F0$\"3F9mFa6)[)HF@7$$\"3A,+v =ddC%*F0$\"3#=.%GWq?`GF@7$$\"3JLLe*=)H\\5F@$\"3#RO*z&Q^%)GXHqF07$$\"3 !om;z4wb]\"F@$\"3iV)QZ8E@!RF07$$\"3[LLekGhe:F@$\"33/A**eRN4tF-7$$\"3;+ +DJ'\\;h\"F@$!3=MNAB=Z[CF07$$\"3$om;zR'ok;F@$!3ok:n^cN+cF07$$\"34+++vI b</x\"F@$!34,o61OF @$!35,MYmK@5AF@7$$\"3oLLL3En$4#F@$!3OV!\\v,1ff#F@7$$\"3^++Dc#o%*=#F@$! 3+WlCyQvMGF@7$$\"3\"pmmT!RE&G#F@$!3e?%\\Fqj)pHF@7$$\"3ZL3x1ZA7BF@$!3q] )pDU2%))HF@7$$\"3Y+]P4b=RBF@$!39O\"=[Lk#)*HF@7$$\"3-n\"z>JYhO#F@$!3]Je 2(y0%**HF@7$$\"3eLLe9r5$R#F@$!3Mc%H8YG=*HF@7$$\"3pm;z>(GqW#F@$!3\\BR** f3j]HF@7$$\"3D+++D.&4]#F@$!3*e-Q7?]^(GF@7$$\"3?+++]jB4EF@$!3Drm(p%*[Ri #F@7$$\"3;+++vB_%e%=&F07$$\"3'o;HdlzZG$F@$\"3x)z95%HFu%)F07 $$\"3_LLL347TLF@$\"3Fi%3/ZZc;\"F@7$$\"3#QLL3xxlV$F@$\"3k9C(y')3!p;F@7$ $\"3nLLLLY.KNF@$\"3!Gqd$*oA<6#F@7$$\"3mm;HdO2VOF@$\"3ke)[<,.#HDF@7$$\" 33++D\"o7Tv$F@$\"3SSh-X#eC#GF@7$$\"39L3xcoD.QF@$\"3q9@\\%G2'3HF@7$$\"3 jm;HK5S_QF@$\"3Zl()HY+omHF@7$$\"3Q$3_+7tp(QF@$\"3-s8\\$*=+&)HF@7$$\"39 +D\"y?X:!RF@$\"3ib\"GU'f6'*HF@7$$\"3)o\"Hd&HjLLL$Q*o]RF@$\"3+\\-^)*3j'*HF@7$$\"39n;H#GF&eSF@$\"378Twxiy'*GF@7$ $\"3l++D\"=lj;%F@$\"37m'*3=hriEF@7$$\"33++]iB0pUF@$\"3sJ4tP1#\\K#F@7$$ \"3R++vV&R6`U%F@$\"3u7awyyPH;F@7$$ \"3Kn;zWG))yWF@$\"3&y&z=6:m]8F@7$$\"3y+DJ&\\aC`%F@$\"3@rqZ*zak0\"F@7$$ \"3BML$e9Ege%F@$\"31eXh[\">8](F07$$\"3'QL3F96UF07$$\"3Km\"H28se$[F@$!3/5mU!4.RL(F07$$\"3 .+](=7O*))[F@$!3L&=\"zQ&3u.\"F@7$$\"3uL3-8,+U\\F@$!3M+Y([C`(H8F@7$$\"3 emm;/T1&*\\F@$!3mZIz%zMrg\"F@7$$\"3Vm;/^7I0^F@$!31LX&[jCA7#F@7$$\"3=nm \"zRQb@&F@$!3E3X&RjsX`#F@7$$\"3mLLLe,]6`F@$!37KMl6/=%z#F@7$$\"3:++v=>Y 2aF@$!3o3&[&F@$!3c@p$HO[!**HF@7$$\"3PL$e*[K56bF@$!3e W*R4:O*)*HF@7$$\"3n;/^\"e8q`&F@$!33ka!QXs2*HF@7$$\"3(**\\iS\"R#Hc&F@$! 3U:zE*=zX(HF@7$$\"3F$e9mCM))e&F@$!3y*G(oK)*R]HF@7$$\"3Znm;zXu9cF@$!3kN tK+$*H=HF@7$$\"3yLLe9i\"=s&F@$!3OKXwO,(Qq#F@7$$\"34+++]y))GeF@$!3S[r'e y@fO#F@7$$\"3k++DcljLfF@$!3_HB'*o9eI>F@7$$\"3H++]i_QQgF@$!313_u))*=3T \"F@7$$\"3!3](=U,1*3'F@$!3mVo1X'3d8\"F@7$$\"3U+](=-N(RhF@$!3eJR09aU*[) F07$$\"3-+Dc,*4/>'F@$!3_P#yx`PY`&F07$$\"3a++D\"y%3TiF@$!3\\gxRjx/BDF07 $$\"3S+DJ&f]tH'F@$\"3UK+#)))f.)\\)F-7$$\"3F+]P4kh`jF@$\"3!f05v$\\!>@%F 07$$\"39+vVBA))4kF@$\"3P:USQcs?vF07$$\"3+++]P![hY'F@$\"3D5f!)34Wt5F@7$ $\"3JmmT5FEnlF@$\"3vA9?#)HB9;F@7$$\"3iKLL$Qx$omF@$\"3`#\\')G#HB*3#F@7$ $\"3bmm;z)Qjx'F@$\"3:b45]@)>]#F@7$$\"3Y+++v.I%)oF@$\"3KG\")G@\\Q#F@7$$\"3%HL$e9S8&\\(F@$\"3F ZLbo0&H(>F@7$$\"3%om;/6E.g(F@$\"3_[$F-7$$\"3\"HLL$3s?6zF@$!3 N?Y5aL/EMF07$$\"3!*)\\i!R:/lzF@$!3<\"fLnXN*3mF07$$\"3yl;zpe()=!)F@$!3$ yX#o!>(G:(*F07$$\"3lK3_+-rs!)F@$!3g[/:#G74F\"F@7$$\"3a***\\7`Wl7)F@$!3 4y\"o-(pdb:F@7$$\"3cL$e*[ACI#)F@$!3>(*>cUSW]?F@7$$\"3enmmm*RRL)F@$!3mk o;98VdCF@7$$\"3wnmTge)*R%)F@$!3z8m:CqfkFF@7$$\"3$zmmTvJga)F@$!3`<1EV&o y%HF@7$$\"3D^(=#*pBBd)F@$!3HZlN\"HhI(HF@7$$\"3eM3FWch)f)F@$!3[g&4VAN+* HF@7$$\"3!z\"HK*e2\\i)F@$!3a>p*)=Mu)*HF@7$$\"3A,]PM&*>^')F@$!3wxz$>!=; **HF@7$$\"3`%3F%z9\\x')F@$!3]iF%o@*G\"*HF@7$$\"3'y;zWU$y.()F@$!3!**G4o UZ^(HF@7$$\"3=^7`p`2I()F@$!3zd2ma5y]HF@7$$\"3]MLe9tOc()F@$!3mX*)[fuD=H F@7$$\"3no;H#e0I&))F@$!3_j;DmTKIFF@7$$\"31,++]Qk\\*)F@$!3$*3MQ'[92W#F@ 7$$\"3#)omT5ASg!*F@$!3UPVO(H;y*>F@7$$\"3zML$3dg6<*F@$!3!>-8'ehGd9F@7$$ \"3K,+voTAq#*F@$!3o8H3A\"fi7*F07$$\"3%ymmmw(Gp$*F@$!3-*GnFK\"eALF07$$ \"3%4]7`**)4A%*F@$!3mh'=Nertg\"F-7$$\"3/M$eRA5\\Z*F@$\"3C\\;'*R&)*G+$F 07$$\"39nTg_9sF&*F@$\"3cDXbCZ1LhF07$$\"3B++D\"oK0e*F@$\"3[q[;!Rt[>*F07 $$\"3m+++]oi\"o*F@$\"3>:'QMN.UZ\"F@7$$\"35,+v=5s#y*F@$\"3/44;y(e)o>F@7 $$\"3W,]P40O\"*)*F@$\"3#3)HWvV_5CF@7$$\"#5F)$\"3+$)G=_d$)QFF@-%'COLOUR G6&%$RGBG$Fbjm!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F_[n-%%VIEWG6$;F(Fajm% (DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Cu rve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "A := 3*int(f, x=0 ..Pi/2)+int(f, x=3*Pi..10); A:= evalf(A);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG,&#\"#@\"\"# \"\"\"*&#\"\"$F(F)-%$cosG6#\"#?F)!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"+2p(y))*!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "g := max(f,0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG-%$maxG6$ \"\"!,$-%$sinG6#,$%\"xG\"\"#\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "plot(g, x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7\\v7$$\"\"!F)F(7$$\"3ALL$3FWYs#!#> $\"3%Q0LkgxRj\"!#=7$$\"3VmmmT&)G\\aF-$\"3*y!G[eV5jKF07$$\"3l****\\7G$R <)F-$\"3dE0p-Qa#)[F07$$\"3GLLL3x&)*3\"F0$\"3w+SpW#)[(['F07$$\"3YmmTN@K i8F0$\"3?P7-AIF0$\"32#fs#z/!o6\"!#<7$$\"3dmmm;arz@F0$\"3+3$zNS'zm7FO7$$\"3:L$e*) 4bQl#F0$\"3%*RBh'H&f=:FO7$$\"3u***\\7y%*z7$F0$\"3Sxo;)p[nv\"FO7$$\"3Lm ;ajW8-OF0$\"3(=$**ycm6z>FO7$$\"3ZLL$e9ui2%F0$\"3Ud4si5q$=#FO7$$\"3\"pm \"H2Q\\4YF0$\"3EN7Oz9D!R#FO7$$\"3z***\\(oMrU^F0$\"358'z6\\V'pDFO7$$\"3 nK$3-8Lfn&F0$\"3Nq`b=)Q)>FFO7$$\"3nmmm\"z_\"4iF0$\"3ejb3>48RGFO7$$\"3/ nm;zp!fu'F0$\"3(QJ8MDJm#HFO7$$\"3Tnmmm6m#G(F0$\"3k#fiW(oV!)HFO7$$\"3mm ;a8(\\oT(F0$\"3,q6$=CU&))HFO7$$\"3.nmTg#Q5b(F0$\"3)fedI?&\\%*HFO7$$\"3 Sn;H2oA&o(F0$\"3E&f.2Z\"H)*HFO7$$\"3ynm;a`T>yF0$\"3EPNi5$G***HFO7$$\"3 _om\"zW#z(3)F0$\"3!f\\gya?n*HFO7$$\"39ommT&phN)F0$\"3F9mFa6)[)HFO7$$\" 3A,+v=ddC%*F0$\"3#=.%GWq?`GFO7$$\"3JLLe*=)H\\5FO$\"3#RO*z&Q^\"FO$\"3+le*fP[d.#FO7$$\"3rmm\"z/3uC\"FO$\"3'RfaxS^y!=FO7$$\" 31++vo3p)H\"FO$\"3ZaC(f[HKb\"FO7$$\"3TLLe*ot*\\8FO$\"3-^[,eBG#G\"FO7$$ \"3xmmT5lD,9FO$\"3-y7=:\"y&y**F07$$\"3*)***\\7LRDX\"FO$\"3O)Q\">%)GXHq F07$$\"3YLLe9x0z9FO$\"3a[.c&)e[taF07$$\"3!om;z4wb]\"FO$\"3iV)QZ8E@!RF0 7$$\"39++D\"[%4K:FO$\"3$>7%RrEz>BF07$$\"3[LLekGhe:FO$\"33/A**eRN4tF-7$ $\"3\"om;/YU_c\"FO$\"3!\\4)z-8DKLF-7$$\"39++Dc?(=d\"FOF(7$$\"3[LL3_;]y :FOF(7$$\"3\"om;zCJ^e\"FOF(7$$\"3[LLeR/R)f\"FOF(7$$\"3;++DJ'\\;h\"FOF( 7$$\"3]LLe9!o\"Q;FOF(7$$\"3$om;zR'ok;FOF(7$$\"3NLL3_(>/x\"FOF(7$$\"33+ +D1J:w=FOF(7$$\"3oLLL3En$4#FOF(7$$\"3\"pmmT!RE&G#FOF(7$$\"3D+++D.&4]#F OF(7$$\"3;+++vB_%e%=&F07$ $\"3_$3F%H!4mD$FO$\"3'4)[`yBGSoF07$$\"3'o;HdlzZG$FO$\"3x)z95%HFu%)F07$ $\"3>]7.#G]HJ$FO$\"3sl9EUq835FO7$$\"3_LLL347TLFO$\"3Fi%3/ZZc;\"FO7$$\" 3WLLeR$\\))Q$FO$\"3+dL&G85QU\"FO7$$\"3#QLL3xxlV$FO$\"3k9C(y')3!p;FO7$$ \"3vLL3-iI%[$FO$\"3ozO`<6,**=FO7$$\"3nLLLLY.KNFO$\"3!Gqd$*oA<6#FO7$$\" 3;+DJXTb(e$FO$\"3[qi!o(>%[L#FO7$$\"3mm;HdO2VOFO$\"3ke)[<,.#HDFO7$$\"3e L3FpJf)p$FO$\"31*G&**[=T#p#FO7$$\"33++D\"o7Tv$FO$\"3SSh-X#eC#GFO7$$\"3 9L3xcoD.QFO$\"3q9@\\%G2'3HFO7$$\"3jm;HK5S_QFO$\"3Zl()HY+omHFO7$$\"3Q$3 _+7tp(QFO$\"3-s8\\$*=+&)HFO7$$\"39+D\"y?X:!RFO$\"3ib\"GU'f6'*HFO7$$\"3 )o\"Hd&HjLLL$Q*o]RFO$\"3+\\-^)*3j'*HFO7$ $\"39n;H#GF&eSFO$\"378Twxiy'*GFO7$$\"3l++D\"=lj;%FO$\"37m'*3=hriEFO7$$ \"3P+](=x3x@%FO$\"3)>w)zCY-2DFO7$$\"33++]iB0pUFO$\"3sJ4tP1#\\K#FO7$$\" 3p+]7`fR?VFO$\"3'f6`U%FO$\"3u7awyyPH;FO7$$\"3Kn;zWG))yWFO$\"3&y&z=6:m]8FO7$$\"30%3 _+noc]%FO$\"3)=E@=G(G07FO7$$\"3y+DJ&\\aC`%FO$\"3@rqZ*zak0\"FO7$$\"3]8](F07$$\"3gL3 FW;ANYFO$\"3N)[&z49o6YF07$$\"3'QL3F9 *[,4ZFO$\"3gG5r4xVC?F-7$$\"39Me9TEhLZFOF(7$$\"3P$ek.R5#eZFOF(7$$\"3]LL eR\"3Gy%FOF(7$$\"3.+](=7O*))[FOF(7$$\"3emm;/T1&*\\FOF(7$$\"3=nm\"zRQb@ &FOF(7$$\"3:++v=>Y2aFOF(7$$\"3Znm;zXu9cFOF(7$$\"34+++]y))GeFOF(7$$\"3H ++]i_QQgFOF(7$$\"3U+](=-N(RhFOF(7$$\"3a++D\"y%3TiFOF(7$$\"3HDcwM7:biFO F(7$$\"3.]7G)o<#piFOF(7$$\"3Si!R]\"4DwiFOF(7$$\"3xuozTTG$G'FO$\"3Nr-o) *p2If!#@7$$\"39(oa&otJ!H'FO$\"3(4!)3Rr\"4zUF-7$$\"3S+DJ&f]tH'FO$\"3UK+ #)))f.)\\)F-7$$\"3y]PM-N[DjFO$\"3%[4q;ql[`#F07$$\"3F+]P4kh`jFO$\"3!f05 v$\\!>@%F07$$\"3v\\iS;$\\(fY8c(eF07$$\"39+vVBA))4kFO$\"3P: USQcs?vF07$$\"3^](o/8:!QkFO$\"3C$eYPmM?9*F07$$\"3+++]P![hY'FO$\"3D5f!) 34Wt5FO7$$\"3rK$eRP0n^'FO$\"3y&=`q9O2N\"FO7$$\"3JmmT5FEnlFO$\"3vA9?#)H B9;FO7$$\"3#***\\(o/?yh'FO$\"3#>bE0nR7'=FO7$$\"3iKLL$Qx$omFO$\"3`#\\') G#HB*3#FO7$$\"39***\\78eBs'FO$\"3\\..Zd704BFO7$$\"3bmm;z)Qjx'FO$\"3:b4 5]@)>]#FO7$$\"3'RL$3F'>.$oFO$\"3Xgy^U!zdm#FO7$$\"3Y+++v.I%)oFO$\"3K#=WtFO$\"3m$R5=0%pbDFO7$$\"3gm;zp%*\\%R(FO$\"3Z %>G\")G@\\Q#FO7$$\"3A+v=Un\"[W(FO$\"3p)=R,1;+>#FO7$$\"3%HL$e9S8&\\(FO$ \"3FZLbo0&H(>FO7$$\"3W****\\i+tZvFO$\"3#\\Y,#y?vC\"F07$$\"3&)*\\7y&\\yfy FOF(7$$\"3Q;H2$3'\\&)yFOF(7$$\"3\"HLL$3s?6zFOF(7$$\"3yl;zpe()=!)FOF(7$ $\"3a***\\7`Wl7)FOF(7$$\"3enmmm*RRL)FOF(7$$\"3$zmmTvJga)FOF(7$$\"3]MLe 9tOc()FOF(7$$\"31,++]Qk\\*)FOF(7$$\"3zML$3dg6<*FOF(7$$\"3K,+voTAq#*FOF (7$$\"3%ymmmw(Gp$*FOF(7$$\"3Q%e*)4Q$p&R*FOF(7$$\"3%4]7`**)4A%*FOF(7$$ \"3\\*F07$$ \"3c**\\il(z5j*FO$\"3ujZx'R()H?\"FO7$$\"3m+++]oi\"o*FO$\"3>:'QMN.UZ\"F O7$$\"3y,]PMRFO 7$$\"3Q+D1k2/P)*FO$\"3A=f%**QxE?#FO7$$\"3W,]P40O\"*)*FO$\"3#3)HWvV_5CF O7$$\"3s+voa-oX**FO$\"36UCKC!\\**e#FO7$$\"#5F)$\"3+$)G=_d$)QFFO-%'COLO URG6&%$RGBG$Fd\\n!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fa]n-%%VIEWG6$;F(Fc \\n%(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 67 "middlebox(g, x=0..10, 60); evalf(value(middlesum(g, x=0..10,60)));" }}{PARA 13 " " 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6[o-%)POLYGONSG6$7&7$$\"\"!F )F(7$F($\"+\")R)o(\\!#57$$\"+nmmm;F-F+7$F/F(-%&COLORG6&%$RGBG$\"\"(!\" \"$\"\"*F8F6-F$6$7&F17$F/$\"+;mFQ9!\"*7$$\"+LLLLLF-F?7$FCF(F2-F$6$7&FE 7$FC$\"+g0`?AFA7$$\"+++++]F-FJ7$FMF(F2-F$6$7&FO7$FM$\"+Q\\LeFFA7$$\"+n mmmmF-FT7$FWF(F2-F$6$7&FY7$FW$\"+g\\[#*HFA7$$\"+LLLL$)F-Fhn7$F[oF(F2-F $6$7&F]o7$F[o$\"+hR?(*GFA7$$\"\"\"F)Fbo7$FeoF(F2-F$6$7&Fgo7$Feo$\"+c5) H[#FA7$$\"+nmmm6FAF\\p7$F_pF(F2-F$6$7&Fap7$F_p$\"+KkT&z\"FA7$$\"+LLLL8 FAFfp7$FipF(F2-F$6$7&F[q7$Fip$\"+JS,-\"*F-7$$\"+++++:FAF`q7$FcqF(F2-F$ 6$7&FeqFeq7$$F0FAF(FiqF2-F$6$7&FiqFiq7$$\"+LLLL=FAF(F^rF2-F$6$7&F^rF^r 7$$\"\"#F)F(FdrF2-F$6$7&FdrFdr7$$\"+nmmm@FAF(FjrF2-F$6$7&FjrFjr7$$\"+L LLLBFAF(F`sF2-F$6$7&F`sF`s7$$\"+++++DFAF(FfsF2-F$6$7&FfsFfs7$$\"+nmmmE FAF(F\\tF2-F$6$7&F\\tF\\t7$$\"+LLLLGFAF(FbtF2-F$6$7&FbtFbt7$$\"\"$F)F( FhtF2-F$6$7&FhtFht7$$\"+nmmmJFAF(F^uF2-F$6$7&F^u7$F_u$\"+V'*f`kF-7$$FD FAFeu7$FhuF(F2-F$6$7&Fiu7$Fhu$\"+c-Wo:FA7$$\"+++++NFAF^v7$FavF(F2-F$6$ 7&Fcv7$Fav$\"+pq&)=BFA7$$\"+nmmmOFAFhv7$F[wF(F2-F$6$7&F]w7$F[w$\"+I*** R\"GFA7$$\"+LLLLQFAFbw7$FewF(F2-F$6$7&Fgw7$Few$\"+%\\g$**HFA7$$\"\"%F) F\\x7$F_xF(F2-F$6$7&Fax7$F_x$\"+OJ`aGFA7$$\"+nmmmTFAFfx7$FixF(F2-F$6$7 &F[y7$Fix$\"+Q8Y&R#FA7$$\"+LLLLVFAF`y7$FcyF(F2-F$6$7&Fey7$Fcy$\"+EDos; FA7$$\"+++++XFAFjy7$F]zF(F2-F$6$7&F_z7$F]z$\"+JgkdwF-7$$\"+nmmmYFAFdz7 $FgzF(F2-F$6$7&FizFiz7$$\"+LLLL[FAF(F][lF2-F$6$7&F][lF][l7$$\"\"&F)F(F c[lF2-F$6$7&Fc[lFc[l7$$\"+nmmm^FAF(Fi[lF2-F$6$7&Fi[lFi[l7$$\"+LLLL`FAF (F_\\lF2-F$6$7&F_\\lF_\\l7$$\"+++++bFAF(Fe\\lF2-F$6$7&Fe\\lFe\\l7$$\"+ nmmmcFAF(F[]lF2-F$6$7&F[]lF[]l7$$\"+LLLLeFAF(Fa]lF2-F$6$7&Fa]lFa]l7$$ \"\"'F)F(Fg]lF2-F$6$7&Fg]lFg]l7$$\"+nmmmhFAF(F]^lF2-F$6$7&F]^lF]^l7$$ \"+LLLLjFAF(Fc^lF2-F$6$7&Fc^l7$Fd^l$\"+Q*)39zF-7$$\"+++++lFAFj^l7$F]_l F(F2-F$6$7&F__l7$F]_l$\"+#QgYp\"FA7$$FXFAFd_l7$Fg_lF(F2-F$6$7&Fh_l7$Fg _l$\"+!G`8T#FA7$$\"+LLLLoFAF]`l7$F``lF(F2-F$6$7&Fb`l7$F``l$\"+(o*eiGFA 7$$F7F)Fg`l7$Fj`lF(F2-F$6$7&F[al7$Fj`l$\"+WZp)*HFA7$$\"+nmmmrFAF`al7$F calF(F2-F$6$7&Feal7$Fcal$\"+m^o/GFA7$$\"+LLLLtFAFjal7$F]blF(F2-F$6$7&F _bl7$F]bl$\"+B(=>I#FA7$$\"+++++vFAFdbl7$FgblF(F2-F$6$7&Fibl7$Fgbl$\"+) )HuX:FA7$$\"+nmmmwFAF^cl7$FaclF(F2-F$6$7&Fccl7$Facl$\"+dW-%>'F-7$$\"+L LLLyFAFhcl7$F[dlF(F2-F$6$7&F]dlF]dl7$$\"\")F)F(FadlF2-F$6$7&FadlFadl7$ $\"+nmmm\")FAF(FgdlF2-F$6$7&FgdlFgdl7$$F\\oFAF(F]elF2-F$6$7&F]elF]el7$ $\"+++++&)FAF(FbelF2-F$6$7&FbelFbel7$$\"+nmmm')FAF(FhelF2-F$6$7&FhelFh el7$$\"+LLLL))FAF(F^flF2-F$6$7&F^flF^fl7$$F:F)F(FdflF2-F$6$7&FdflFdfl7 $$\"+nmmm\"*FAF(FiflF2-F$6$7&FiflFifl7$$\"+LLLL$*FAF(F_glF2-F$6$7&F_gl F_gl7$$\"+++++&*FAF(FeglF2-F$6$7&Fegl7$Ffgl$\"+[,oa$*F-7$$\"+nmmm'*FAF \\hl7$F_hlF(F2-F$6$7&Fahl7$F_hl$\"+4'>m\"=FA7$$\"+LLLL)*FAFfhl7$FihlF( F2-F$6$7&F[il7$Fihl$\"+Emy(\\#FA7$$\"#5F)F`il7$FcilF(F2-%'CURVESG6&7\\ vF'7$$\"3ALL$3FWYs#!#>$\"3%Q0LkgxRj\"!#=7$$\"3VmmmT&)G\\aF]jl$\"3*y!G[ eV5jKF`jl7$$\"3l****\\7G$R<)F]jl$\"3dE0p-Qa#)[F`jl7$$\"3GLLL3x&)*3\"F` jl$\"3w+SpW#)[(['F`jl7$$\"3YmmTN@Ki8F`jl$\"3?P7-AIF`jl$\"32#fs#z/!o6\"!#<7 $$\"3dmmm;arz@F`jl$\"3+3$zNS'zm7F_\\m7$$\"3:L$e*)4bQl#F`jl$\"3%*RBh'H& f=:F_\\m7$$\"3u***\\7y%*z7$F`jl$\"3Sxo;)p[nv\"F_\\m7$$\"3Lm;ajW8-OF`jl $\"3(=$**ycm6z>F_\\m7$$\"3ZLL$e9ui2%F`jl$\"3Ud4si5q$=#F_\\m7$$\"3\"pm \"H2Q\\4YF`jl$\"3EN7Oz9D!R#F_\\m7$$\"3z***\\(oMrU^F`jl$\"358'z6\\V'pDF _\\m7$$\"3nK$3-8Lfn&F`jl$\"3Nq`b=)Q)>FF_\\m7$$\"3nmmm\"z_\"4iF`jl$\"3e jb3>48RGF_\\m7$$\"3/nm;zp!fu'F`jl$\"3(QJ8MDJm#HF_\\m7$$\"3Tnmmm6m#G(F` jl$\"3k#fiW(oV!)HF_\\m7$$\"3mm;a8(\\oT(F`jl$\"3,q6$=CU&))HF_\\m7$$\"3. nmTg#Q5b(F`jl$\"3)fedI?&\\%*HF_\\m7$$\"3Sn;H2oA&o(F`jl$\"3E&f.2Z\"H)*H F_\\m7$$\"3ynm;a`T>yF`jl$\"3EPNi5$G***HF_\\m7$$\"3_om\"zW#z(3)F`jl$\"3 !f\\gya?n*HF_\\m7$$\"39ommT&phN)F`jl$\"3F9mFa6)[)HF_\\m7$$\"3A,+v=ddC% *F`jl$\"3#=.%GWq?`GF_\\m7$$\"3JLLe*=)H\\5F_\\m$\"3#RO*z&Q^\"F_\\m$\"3+le*fP[d.#F_\\m7$$\"3rmm\"z/3uC\"F_ \\m$\"3'RfaxS^y!=F_\\m7$$\"31++vo3p)H\"F_\\m$\"3ZaC(f[HKb\"F_\\m7$$\"3 TLLe*ot*\\8F_\\m$\"3-^[,eBG#G\"F_\\m7$$\"3xmmT5lD,9F_\\m$\"3-y7=:\"y&y **F`jl7$$\"3*)***\\7LRDX\"F_\\m$\"3O)Q\">%)GXHqF`jl7$$\"3YLLe9x0z9F_\\ m$\"3a[.c&)e[taF`jl7$$\"3!om;z4wb]\"F_\\m$\"3iV)QZ8E@!RF`jl7$$\"39++D \"[%4K:F_\\m$\"3$>7%RrEz>BF`jl7$$\"3[LLekGhe:F_\\m$\"33/A**eRN4tF]jl7$ $\"3\"om;/YU_c\"F_\\m$\"3!\\4)z-8DKLF]jl7$$\"39++Dc?(=d\"F_\\mF(7$$\"3 [LL3_;]y:F_\\mF(7$$\"3\"om;zCJ^e\"F_\\mF(7$$\"3[LLeR/R)f\"F_\\mF(7$$\" 3;++DJ'\\;h\"F_\\mF(7$$\"3]LLe9!o\"Q;F_\\mF(7$$\"3$om;zR'ok;F_\\mF(7$$ \"3NLL3_(>/x\"F_\\mF(7$$\"33++D1J:w=F_\\mF(7$$\"3oLLL3En$4#F_\\mF(7$$ \"3\"pmmT!RE&G#F_\\mF(7$$\"3D+++D.&4]#F_\\mF(7$$\"3;+++vB_%e%=&F`jl7$$\"3_$3F%H!4mD$F_\\m$\"3'4)[`yBGSoF`jl7$$\"3'o;HdlzZG$F_\\ m$\"3x)z95%HFu%)F`jl7$$\"3>]7.#G]HJ$F_\\m$\"3sl9EUq835F_\\m7$$\"3_LLL3 47TLF_\\m$\"3Fi%3/ZZc;\"F_\\m7$$\"3WLLeR$\\))Q$F_\\m$\"3+dL&G85QU\"F_ \\m7$$\"3#QLL3xxlV$F_\\m$\"3k9C(y')3!p;F_\\m7$$\"3vLL3-iI%[$F_\\m$\"3o zO`<6,**=F_\\m7$$\"3nLLLLY.KNF_\\m$\"3!Gqd$*oA<6#F_\\m7$$\"3;+DJXTb(e$ F_\\m$\"3[qi!o(>%[L#F_\\m7$$\"3mm;HdO2VOF_\\m$\"3ke)[<,.#HDF_\\m7$$\"3 eL3FpJf)p$F_\\m$\"31*G&**[=T#p#F_\\m7$$\"33++D\"o7Tv$F_\\m$\"3SSh-X#eC #GF_\\m7$$\"39L3xcoD.QF_\\m$\"3q9@\\%G2'3HF_\\m7$$\"3jm;HK5S_QF_\\m$\" 3Zl()HY+omHF_\\m7$$\"3Q$3_+7tp(QF_\\m$\"3-s8\\$*=+&)HF_\\m7$$\"39+D\"y ?X:!RF_\\m$\"3ib\"GU'f6'*HF_\\m7$$\"3)o\"Hd&HjLLL$Q*o]RF_\\m$\"3+\\-^)*3j'*HF_\\m7$$\"39n;H#GF&eSF_\\m$ \"378Twxiy'*GF_\\m7$$\"3l++D\"=lj;%F_\\m$\"37m'*3=hriEF_\\m7$$\"3P+](= x3x@%F_\\m$\"3)>w)zCY-2DF_\\m7$$\"33++]iB0pUF_\\m$\"3sJ4tP1#\\K#F_\\m7 $$\"3p+]7`fR?VF_\\m$\"3'f6`U%F_\\m$\"3u7awyyPH;F_\\m7$$\"3Kn;zWG))yWF_\\m $\"3&y&z=6:m]8F_\\m7$$\"30%3_+noc]%F_\\m$\"3)=E@=G(G07F_\\m7$$\"3y+DJ& \\aC`%F_\\m$\"3@rqZ*zak0\"F_\\m7$$\"3]8](F`jl7$$\"3gL3FW;ANYF_\\m$\"3N)[&z 49o6YF`jl7$$\"3'QL3F9*[,4ZF_\\m $\"3gG5r4xVC?F]jl7$$\"39Me9TEhLZF_\\mF(7$$\"3P$ek.R5#eZF_\\mF(7$$\"3]L LeR\"3Gy%F_\\mF(7$$\"3.+](=7O*))[F_\\mF(7$$\"3emm;/T1&*\\F_\\mF(7$$\"3 =nm\"zRQb@&F_\\mF(7$$\"3:++v=>Y2aF_\\mF(7$$\"3Znm;zXu9cF_\\mF(7$$\"34+ ++]y))GeF_\\mF(7$$\"3H++]i_QQgF_\\mF(7$$\"3U+](=-N(RhF_\\mF(7$$\"3a++D \"y%3TiF_\\mF(7$$\"3HDcwM7:biF_\\mF(7$$\"3.]7G)o<#piF_\\mF(7$$\"3Si!R] \"4DwiF_\\mF(7$$\"3xuozTTG$G'F_\\m$\"3Nr-o)*p2If!#@7$$\"39(oa&otJ!H'F_ \\m$\"3(4!)3Rr\"4zUF]jl7$$\"3S+DJ&f]tH'F_\\m$\"3UK+#)))f.)\\)F]jl7$$\" 3y]PM-N[DjF_\\m$\"3%[4q;ql[`#F`jl7$$\"3F+]P4kh`jF_\\m$\"3!f05v$\\!>@%F `jl7$$\"3v\\iS;$\\(fY8c(eF`jl7$$\"39+vVBA))4kF_\\m$\"3P :USQcs?vF`jl7$$\"3^](o/8:!QkF_\\m$\"3C$eYPmM?9*F`jl7$$\"3+++]P![hY'F_ \\m$\"3D5f!)34Wt5F_\\m7$$\"3rK$eRP0n^'F_\\m$\"3y&=`q9O2N\"F_\\m7$$\"3J mmT5FEnlF_\\m$\"3vA9?#)HB9;F_\\m7$$\"3#***\\(o/?yh'F_\\m$\"3#>bE0nR7'= F_\\m7$$\"3iKLL$Qx$omF_\\m$\"3`#\\')G#HB*3#F_\\m7$$\"39***\\78eBs'F_\\ m$\"3\\..Zd704BF_\\m7$$\"3bmm;z)Qjx'F_\\m$\"3:b45]@)>]#F_\\m7$$\"3'RL$ 3F'>.$oF_\\m$\"3Xgy^U!zdm#F_\\m7$$\"3Y+++v.I%)oF_\\m$\"3K#=WtF_ \\m$\"3m$R5=0%pbDF_\\m7$$\"3gm;zp%*\\%R(F_\\m$\"3Z%>G\")G@\\Q#F_\\m7$$ \"3A+v=Un\"[W(F_\\m$\"3p)=R,1;+>#F_\\m7$$\"3%HL$e9S8&\\(F_\\m$\"3FZLbo 0&H(>F_\\m7$$\"3W****\\i+tZvF_\\m$\"3#\\Y,#y?vC\"F`jl7$$\"3&)*\\7y&\\yfyF_\\mF(7$$\"3Q;H2$3'\\&)yF_ \\mF(7$$\"3\"HLL$3s?6zF_\\mF(7$$\"3yl;zpe()=!)F_\\mF(7$$\"3a***\\7`Wl7 )F_\\mF(7$$\"3enmmm*RRL)F_\\mF(7$$\"3$zmmTvJga)F_\\mF(7$$\"3]MLe9tOc() F_\\mF(7$$\"31,++]Qk\\*)F_\\mF(7$$\"3zML$3dg6<*F_\\mF(7$$\"3K,+voTAq#* F_\\mF(7$$\"3%ymmmw(Gp$*F_\\mF(7$$\"3Q%e*)4Q$p&R*F_\\mF(7$$\"3%4]7`**) 4A%*F_\\mF(7$$\"3\\*F`jl7$$\"3c**\\il(z5j*F_\\m$\"3uj Zx'R()H?\"F_\\m7$$\"3m+++]oi\"o*F_\\m$\"3>:'QMN.UZ\"F_\\m7$$\"3y,]PMR< K(*F_\\m$\"3AK$=Mtl.t\"F_\\m7$$\"35,+v=5s#y*F_\\m$\"3/44;y(e)o>F_\\m7$ $\"3Q+D1k2/P)*F_\\m$\"3A=f%**QxE?#F_\\m7$$\"3W,]P40O\"*)*F_\\m$\"3#3)H WvV_5CF_\\m7$$\"3s+voa-oX**F_\\m$\"36UCKC!\\**e#F_\\m7$Fcil$\"3+$)G=_d $)QFF_\\m-%'COLOURG6&F5$\"*++++\"!\")F(F(-%&STYLEG6#%%LINEG-%*THICKNES SG6#Ffr-%+AXESLABELSG6$Q\"x6\"Q!F\\\\p-%%VIEWG6$;F(Fcil%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" "Curve 7" "Curve 8" "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Curve 13" "Curve 14" "Curve 15" "Curve 16" "Curve 17" "Curve 18" "Curve 19" "Curve 20" "Curve 21" "Cur ve 22" "Curve 23" "Curve 24" "Curve 25" "Curve 26" "Curve 27" "Curve 2 8" "Curve 29" "Curve 30" "Curve 31" "Curve 32" "Curve 33" "Curve 34" " Curve 35" "Curve 36" "Curve 37" "Curve 38" "Curve 39" "Curve 40" "Curv e 41" "Curve 42" "Curve 43" "Curve 44" "Curve 45" "Curve 46" "Curve 47 " "Curve 48" "Curve 49" "Curve 50" "Curve 51" "Curve 52" "Curve 53" "C urve 54" "Curve 55" "Curve 56" "Curve 57" "Curve 58" "Curve 59" "Curve 60" "Curve 61" }}}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+m8l%))*!\"*" }} }{PARA 0 "" 0 "" {TEXT -1 5 "b. " }{XPPEDIT 18 0 "5*x-5*x^3" "6#,&*& \"\"&\"\"\"%\"xGF&F&*&F%F&*$F'\"\"$F&!\"\"" }{TEXT -1 2 " " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "f:= 5*x-5*x^3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG,&%\"xG\"\"&*&F'\"\"\")F&\"\"$F)!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "plot(f, x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$\"\"!F)F(7$$ \"3dmmm;arz@!#=$\"3[^E\\Ko2Q5!#<7$$\"3ZLL$e9ui2%F-$\"3oM&zW**z%*p\"F07 $$\"3nmmm\"z_\"4iF-$\"3\")f,Q,6l2>F07$$\"39ommT&phN)F-$\"3f)*\\?*G82E \"F07$$\"3JLLe*=)H\\5F0$!3;rng!=c.I&F-7$$\"3rmm\"z/3uC\"F0$!3b@'RHwhzY $F07$$\"3*)***\\7LRDX\"F0$!3kIqLLGlg!)F07$$\"3$om;zR'ok;F0$!3kWG%eHIUZ \"!#;7$$\"33++D1J:w=F0$!3p#zL&ek!RO#FT7$$\"3oLLL3En$4#F0$!3`xcL')R$>a$ FT7$$\"3\"pmmT!RE&G#F0$!3]/Wo.ZoC[FT7$$\"3D+++D.&4]#F0$!3p]^\\@v$4d'FT 7$$\"3;+++vB_LLL$Q*o]RF0$!3@AP&z(Hd&)GF]p7$$\"3l++D\"=lj;%F0$!3P?,iF[z2MF]p7$$ \"3R++vV&RY2aF0$!3+HlVe/^NwF]p7$$\"3Znm ;zXu9cF0$!3L1O\"*\\Sgp&)F]p7$$\"34+++]y))GeF0$!3k]/\"e#4l5'*F]p7$$\"3H ++]i_QQgF0$!3zA6y1!p12\"!#97$$\"3a++D\"y%3TiF0$!3im*>zQ\"G%=\"Fit7$$\" 3+++]P![hY'F0$!3HK?E:@X>8Fit7$$\"3iKLL$Qx$omF0$!3(exA]O!G\\9Fit7$$\"3Y +++v.I%)oF0$!3yt%z?5Ppf\"Fit7$$\"3?mm\"zpe*zqF0$!3cG.#=rV!RFit7$$\"3%HL$e9S8&\\(F0$!3ku(4zJ'zn?Fit7$$\"3s ++D1#=bq(F0$!3xw;eV&[!\\AFit7$$\"3\"HLL$3s?6zF0$!33_x&G[XhV#Fit7$$\"3a ***\\7`Wl7)F0$!3iajm\"y\"yUEFit7$$\"3enmmm*RRL)F0$!3*[-4Wx![_GFit7$$\" 3$zmmTvJga)F0$!3R-350C0yIFit7$$\"3]MLe9tOc()F0$!35T$)yB`98LFit7$$\"31, ++]Qk\\*)F0$!3K*z(>X2TRNFit7$$\"3zML$3dg6<*F0$!3]WVH9V36QFit7$$\"3%ymm mw(Gp$*F0$!3a)R\"G>/]lSFit7$$\"3B++D\"oK0e*F0$!3_q8)3D?*[VFit7$$\"35,+ v=5s#y*F0$!3GQD^d\")>KYFit7$$\"#5F)$!%]\\F)-%'COLOURG6&%$RGBG$Ffz!\"\" F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fc[l-%%VIEWG6$;F(Fez%(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 13 "solve(f=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%\"\"!\"\"\"!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "plot(f, x=0..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7U7$$\"\"!F)F(7$$\"3dmmm;arz@!#>$\"3\\E\\d* *)R$*3\"!#=7$$\"3[LL$e9ui2%F-$\"3O&HK@]]Z.#F07$$\"3nmmm\"z_\"4iF-$\"3M ,)))G92E4$F07$$\"3[mmmT&phN)F-$\"3,]q,c5\"*[TF07$$\"3BLLe*=)H\\5F0$\"3 y#*oD#oD()=&F07$$\"3fmm\"z/3uC\"F0$\"3a.\"e&>-**RhF07$$\"3%)***\\7LRDX \"F0$\"3EHTNhJY4rF07$$\"3]mm\"zR'ok;F0$\"379K5SYx#4)F07$$\"3v***\\i5`h (=F0$\"3,?T3Isc]!*F07$$\"3WLLL3En$4#F0$\"3JV;E,'[4+\"!#<7$$\"3pmm;/RE& G#F0$\"3%flDbyeH3\"Fhn7$$\"3\")*****\\K]4]#F0$\"3Y[+mN5Es6Fhn7$$\"3$** ****\\PAvr#F0$\"3p>@.awTe7Fhn7$$\"3)******\\nHi#HF0$\"3'3r\\f%4$yL\"Fh n7$$\"3jmm\"z*ev:JF0$\"3&*G*pJ\">qX:Fhn7$$\"3v***\\7o7Tv$F0$\"3CV_: &*f^7;Fhn7$$\"3&GLLLQ*o]RF0$\"3eFY&p%R.n;Fhn7$$\"3@++D\"=lj;%F0$\"3OQn &>Gr:s\"Fhn7$$\"31++vV&RY2aF0 $\"3%pfPRgUJ\">Fhn7$$\"39mm;zXu9cF0$\"3\"*Rhph\"QB#>Fhn7$$\"3k******\\ y))GeF0$\"3]a*oJRMU#>Fhn7$$\"3'*)***\\i_QQgF0$\"3Qxj:)pJ$=>Fhn7$$\"3@* **\\7y%3TiF0$\"3^$y)zyb00>Fhn7$$\"35****\\P![hY'F0$\"32o/Ij6H\")=Fhn7$ $\"3jKLL$Qx$omF0$\"3cBssRkc^=Fhn7$$\"3!)*****\\P+V)oF0$\"3QEba$e\"z5=F hn7$$\"3?mm\"zpe*zqF0$\"3?@%[O%e`l]HU;Fhn7$$\"3R***\\i?=bq(F0$\"3 ;u?^oH=l:Fhn7$$\"3\"HLL$3s?6zF0$\"3aZsE&3-*z9Fhn7$$\"3a***\\7`Wl7)F0$ \"3n&R-8wd)z8Fhn7$$\"3#pmmm'*RRL)F0$\"3jw444&>GF\"Fhn7$$\"3Qmm;a<.Y&)F 0$\"3>)p6KJLA:\"Fhn7$$\"3 " 0 "" {MPLTEXT 1 0 30 "A := int(f, x=0..1); evalf(A);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG#\"\"&\"\"%" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"++++]7!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "leftbox(f, x=0..1, 40); evalf(leftsum(f, x=0..1, 40));" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6M-%)POLYGONSG6$7&7$$\" \"!F)F(F'7$$\"+++++D!#6F(F*-%&COLORG6&%$RGBG$\"\"(!\"\"$\"\"*F4F2-F$6$ 7&F*7$F+$\"+](=#\\7!#57$$\"+++++]F-F;7$F?F(F.-F$6$7&FA7$F?$\"+++v$\\#F =7$$\"+++++vF-FF7$FIF(F.-F$6$7&FK7$FI$\"+]i!*GPF=7$$\"+++++5F=FP7$FSF( F.-F$6$7&FU7$FS$\"++++]\\F=7$$\"++++]7F=FZ7$FgnF(F.-F$6$7&Fin7$Fgn$\"+ ]PM_hF=7$$\"+++++:F=F^o7$FaoF(F.-F$6$7&Fco7$Fao$\"+++DJtF=7$$\"++++]Fhq 7$$\"+++++bF=F]y7$F`yF(F.-F$6$7&Fby7$F`y$\"++]7=>Fhq7$$\"++++]dF=Fgy7$ FjyF(F.-F$6$7&F\\z7$Fjy$\"+DJXC>Fhq7$$\"+++++gF=Faz7$FdzF(F.-F$6$7&Ffz 7$Fdz$\"++++?>Fhq7$$\"++++]iF=F[[l7$F^[lF(F.-F$6$7&F`[l7$F^[l$\"+voH/> Fhq7$$\"+++++lF=Fe[l7$Fh[lF(F.-F$6$7&Fj[l7$Fh[l$\"++](o(=Fhq7$$\"++++] nF=F_\\l7$Fb\\lF(F.-F$6$7&Fd\\l7$Fb\\l$\"+DcEP=Fhq7$$\"+++++qF=Fi\\l7$ F\\]lF(F.-F$6$7&F^]l7$F\\]l$\"++++&y\"Fhq7$$\"++++]sF=Fc]l7$Ff]lF(F.-F $6$7&Fh]l7$Ff]l$\"+v$4'>$\"3\\E\\d**)R$*3\"!#=7$$\"3[LL$e9ui2%F]el$\"3O&HK @]]Z.#F`el7$$\"3nmmm\"z_\"4iF]el$\"3M,)))G92E4$F`el7$$\"3[mmmT&phN)F]e l$\"3,]q,c5\"*[TF`el7$$\"3BLLe*=)H\\5F`el$\"3y#*oD#oD()=&F`el7$$\"3fmm \"z/3uC\"F`el$\"3a.\"e&>-**RhF`el7$$\"3%)***\\7LRDX\"F`el$\"3EHTNhJY4r F`el7$$\"3]mm\"zR'ok;F`el$\"379K5SYx#4)F`el7$$\"3v***\\i5`h(=F`el$\"3, ?T3Isc]!*F`el7$$\"3WLLL3En$4#F`el$\"3JV;E,'[4+\"!#<7$$\"3pmm;/RE&G#F`e l$\"3%flDbyeH3\"F^hl7$$\"3\")*****\\K]4]#F`el$\"3Y[+mN5Es6F^hl7$$\"3$* *****\\PAvr#F`el$\"3p>@.awTe7F^hl7$$\"3)******\\nHi#HF`el$\"3'3r\\f%4$ yL\"F^hl7$$\"3jmm\"z*ev:JF`el$\"3&*G*pJ\">qX:F^hl7$$\"3v***\\ 7o7Tv$F`el$\"3CV_:&*f^7;F^hl7$$\"3&GLLLQ*o]RF`el$\"3eFY&p%R.n;F^hl7$$ \"3@++D\"=lj;%F`el$\"3OQn&>Gr:s\"F^hl7$$\"31++vV&RY2aF`el$\"3%pfPRgUJ\">F^hl7$$\"39m m;zXu9cF`el$\"3\"*Rhph\"QB#>F^hl7$$\"3k******\\y))GeF`el$\"3]a*oJRMU#> F^hl7$$\"3'*)***\\i_QQgF`el$\"3Qxj:)pJ$=>F^hl7$$\"3@***\\7y%3TiF`el$\" 3^$y)zyb00>F^hl7$$\"35****\\P![hY'F`el$\"32o/Ij6H\")=F^hl7$$\"3jKLL$Qx $omF`el$\"3cBssRkc^=F^hl7$$\"3!)*****\\P+V)oF`el$\"3QEba$e\"z5=F^hl7$$ \"3?mm\"zpe*zqF`el$\"3?@%[O%e`l]HU;F^hl7$$\"3R***\\i?=bq(F` el$\"3;u?^oH=l:F^hl7$$\"3\"HLL$3s?6zF`el$\"3aZsE&3-*z9F^hl7$$\"3a***\\ 7`Wl7)F`el$\"3n&R-8wd)z8F^hl7$$\"3#pmmm'*RRL)F`el$\"3jw444&>GF\"F^hl7$ $\"3Qmm;a<.Y&)F`el$\"3>)p6KJLA:\"F^hl7$$\"3 \+ " 0 "" {MPLTEXT 1 0 18 "f := exp(x^2/100);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG-%$expG6#,$*$)%\"xG\"\"#\"\"\"#F-\"$+\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plot(f, x=0..10, y=0..3);" } }{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7S7 $$\"\"!F)$\"\"\"F)7$$\"3dmmm;arz@!#=$\"3*e@:)G_Z+5!#<7$$\"3ZLL$e9ui2%F /$\"3d+_J#)Hm,5F27$$\"3nmmm\"z_\"4iF/$\"3(*R6H*ziQ+\"F27$$\"39ommT&phN )F/$\"3!o=J=*p+25F27$$\"3JLLe*=)H\\5F2$\"3oSS'H5r5,\"F27$$\"3rmm\"z/3u C\"F2$\"3m4,sf>o:5F27$$\"3*)***\\7LRDX\"F2$\"3%>=Dk&GK@5F27$$\"3$om;zR 'ok;F2$\"3]%z\\Xkw5F27$$\"33+++ v'Hi#HF2$\"3,e`$[@,%*3\"F27$$\"3&om;z*ev:JF2$\"3;qkn2y%>5\"F27$$\"3_LL L347TLF2$\"3!pQ*p\"3+\"=6F27$$\"3nLLLLY.KNF2$\"3dF+#[CoG8\"F27$$\"33++ D\"o7Tv$F2$\"3KRTA>#[8:\"F27$$\"3>LLL$Q*o]RF2$\"3')y`w)3>*o6F27$$\"3l+ +D\"=lj;%F2$\"3v)f#zqHc*=\"F27$$\"3R++vV&R*H(=$4.d7F27$$\" 3emm;/T1&*\\F2$\"35P#zT5#R$G\"F27$$\"3=nm\"zRQb@&F2$\"3WuVPj6h78F27$$ \"3:++v=>Y2aF2$\"3?!\\&o)RZ'R8F27$$\"3Znm;zXu9cF2$\"3>ixS2ogq8F27$$\"3 4+++]y))GeF2$\"3g$*))[5&4YS\"F27$$\"3H++]i_QQgF2$\"3(z@:v5o*R9F27$$\"3 a++D\"y%3TiF2$\"3!o!z@1$fiZ\"F27$$\"3+++]P![hY'F2$\"39`b&\\$))3>:F27$$ \"3iKLL$Qx$omF2$\"3vFL-F$z*f:F27$$\"3Y+++v.I%)oF2$\"3Aab>YSI1;F27$$\"3 ?mm\"zpe*zqF2$\"37$fRv\"pz];F27$$\"3;,++D\\'QH(F2$\"3W7&*\\)\\TBq\"F27 $$\"3%HL$e9S8&\\(F2$\"3rm/0HXx`F 27$$\"3enmmm*RRL)F2$\"3?t$*f-()z-?F27$$\"3$zmmTvJga)F2$\"3hW.=H**zv?F2 7$$\"3]MLe9tOc()F2$\"35u;#G?OF:#F27$$\"31,++]Qk\\*)F2$\"3'fGt\"f7oFAF2 7$$\"3zML$3dg6<*F2$\"3s(4p0q?*=BF27$$\"3%ymmmw(Gp$*F2$\"3$*Q5$e.(o0CF2 7$$\"3B++D\"oK0e*F2$\"3#y.[aVTR]#F27$$\"35,+v=5s#y*F2$\"3z-)*=#e:Rg#F2 7$$\"#5F)$\"3`X!f%G=G=FF2-%'COLOURG6&%$RGBG$Fez!\"\"F(F(-%+AXESLABELSG 6$Q\"x6\"Q\"yFb[l-%%VIEWG6$;F(Fdz;F($\"\"$F)" 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 29 "A:=int(f, x=0..10); evalf(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG*(^#!\"&\"\"\"-%$erfG6#^#F(F(-%%sqrtG6#%#PiGF(" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+Y \+ " 0 "" {MPLTEXT 1 0 59 "middlebox(f,x=0..10, 50); evalf(middlesum(f, x =0..10, 50));" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6 W-%'CURVESG6&7S7$$\"\"!F)$\"\"\"F)7$$\"3dmmm;arz@!#=$\"3*e@:)G_Z+5!#<7 $$\"3ZLL$e9ui2%F/$\"3d+_J#)Hm,5F27$$\"3nmmm\"z_\"4iF/$\"3(*R6H*ziQ+\"F 27$$\"39ommT&phN)F/$\"3!o=J=*p+25F27$$\"3JLLe*=)H\\5F2$\"3oSS'H5r5,\"F 27$$\"3rmm\"z/3uC\"F2$\"3m4,sf>o:5F27$$\"3*)***\\7LRDX\"F2$\"3%>=Dk&GK @5F27$$\"3$om;zR'ok;F2$\"3]%z\\ Xkw5F27$$\"33+++v'Hi#HF2$\"3,e`$[@,%*3\"F27$$\"3&om;z*ev:JF2$\"3;qkn2y %>5\"F27$$\"3_LLL347TLF2$\"3!pQ*p\"3+\"=6F27$$\"3nLLLLY.KNF2$\"3dF+#[C oG8\"F27$$\"33++D\"o7Tv$F2$\"3KRTA>#[8:\"F27$$\"3>LLL$Q*o]RF2$\"3')y`w )3>*o6F27$$\"3l++D\"=lj;%F2$\"3v)f#zqHc*=\"F27$$\"3R++vV&R *H(=$4.d7F27$$\"3emm;/T1&*\\F2$\"35P#zT5#R$G\"F27$$\"3=nm\"zRQb@&F2$\" 3WuVPj6h78F27$$\"3:++v=>Y2aF2$\"3?!\\&o)RZ'R8F27$$\"3Znm;zXu9cF2$\"3>i xS2ogq8F27$$\"34+++]y))GeF2$\"3g$*))[5&4YS\"F27$$\"3H++]i_QQgF2$\"3(z@ :v5o*R9F27$$\"3a++D\"y%3TiF2$\"3!o!z@1$fiZ\"F27$$\"3+++]P![hY'F2$\"39` b&\\$))3>:F27$$\"3iKLL$Qx$omF2$\"3vFL-F$z*f:F27$$\"3Y+++v.I%)oF2$\"3Aa b>YSI1;F27$$\"3?mm\"zpe*zqF2$\"37$fRv\"pz];F27$$\"3;,++D\\'QH(F2$\"3W7 &*\\)\\TBq\"F27$$\"3%HL$e9S8&\\(F2$\"3rm/0HXx`F27$$\"3enmmm*RRL)F2$\"3?t$*f-()z-?F27$$\"3$zmmTvJga)F2$ \"3hW.=H**zv?F27$$\"3]MLe9tOc()F2$\"35u;#G?OF:#F27$$\"31,++]Qk\\*)F2$ \"3'fGt\"f7oFAF27$$\"3zML$3dg6<*F2$\"3s(4p0q?*=BF27$$\"3%ymmmw(Gp$*F2$ \"3$*Q5$e.(o0CF27$$\"3B++D\"oK0e*F2$\"3#y.[aVTR]#F27$$\"35,+v=5s#y*F2$ \"3z-)*=#e:Rg#F27$$\"#5F)$\"3`X!f%G=G=FF2-%'COLOURG6&%$RGBG$\"*++++\"! \")F(F(-%&STYLEG6#%%LINEG-%*THICKNESSG6#\"\"#-%)POLYGONSG6$7&7$F(F(7$F ($\"+0+5+5!\"*7$$\"+++++?!#5F]\\l7$Fa\\lF(-%&COLORG6&F[[l$\"\"(!\"\"$ \"\"*Fj\\lFh\\l-Fh[l6$7&Fd\\l7$Fa\\l$\"+0/!4+\"F_\\l7$$\"+++++SFc\\lFa ]l7$Fd]lF(Fe\\l-Fh[l6$7&Ff]l7$Fd]l$\"+GJ]-5F_\\l7$$\"+++++gFc\\lF[^l7$ F^^lF(Fe\\l-Fh[l6$7&F`^l7$F^^l$\"+D?\"\\+\"F_\\l7$$\"+++++!)Fc\\lFe^l7 $Fh^lF(Fe\\l-Fh[l6$7&Fj^l7$Fh^l$\"+%*G835F_\\l7$F*F__l7$F*F(Fe\\l-Fh[l 6$7&Fb_l7$F*$\"+,N<75F_\\l7$$\"+++++7F_\\lFg_l7$Fj_lF(Fe\\l-Fh[l6$7&F \\`l7$Fj_l$\"+8O/<5F_\\l7$$\"+++++9F_\\lFa`l7$Fd`lF(Fe\\l-Fh[l6$7&Ff`l 7$Fd`l$\"+M]vA5F_\\l7$$\"+++++;F_\\lF[al7$F^alF(Fe\\l-Fh[l6$7&F`al7$F^ al$\"+d;KH5F_\\l7$$\"+++++=F_\\lFeal7$FhalF(Fe\\l-Fh[l6$7&Fjal7$Fhal$ \"+<&fn.\"F_\\l7$$Ff[lF)F_bl7$FbblF(Fe\\l-Fh[l6$7&Fcbl7$Fbbl$\"+eo3X5F _\\l7$$\"+++++AF_\\lFhbl7$F[clF(Fe\\l-Fh[l6$7&F]cl7$F[cl$\"+2UKa5F_\\l 7$$\"+++++CF_\\lFbcl7$FeclF(Fe\\l-Fh[l6$7&Fgcl7$Fecl$\"+fW\\k5F_\\l7$$ \"+++++EF_\\lF\\dl7$F_dlF(Fe\\l-Fh[l6$7&Fadl7$F_dl$\"+pHiv5F_\\l7$$\"+ ++++GF_\\lFfdl7$FidlF(Fe\\l-Fh[l6$7&F[el7$Fidl$\"+iwt(3\"F_\\l7$$\"\"$ F)F`el7$FcelF(Fe\\l-Fh[l6$7&Feel7$Fcel$\"+X\"p35\"F_\\l7$$\"+++++KF_\\ lFjel7$F]flF(Fe\\l-Fh[l6$7&F_fl7$F]fl$\"+S30:6F_\\l7$$\"+++++MF_\\lFdf l7$FgflF(Fe\\l-Fh[l6$7&Fifl7$Fgfl$\"+?\">.8\"F_\\l7$$\"+++++OF_\\lF^gl 7$FaglF(Fe\\l-Fh[l6$7&Fcgl7$Fagl$\"+rMrY6F_\\l7$$\"+++++QF_\\lFhgl7$F[ hlF(Fe\\l-Fh[l6$7&F]hl7$F[hl$\"+emFk6F_\\l7$$\"\"%F)Fbhl7$FehlF(Fe\\l- Fh[l6$7&Fghl7$Fehl$\"+5\\0$=\"F_\\l7$$\"+++++UF_\\lF\\il7$F_ilF(Fe\\l- Fh[l6$7&Fail7$F_il$\"+C\")4.7F_\\l7$$\"+++++WF_\\lFfil7$FiilF(Fe\\l-Fh [l6$7&F[jl7$Fiil$\"+&3gWA\"F_\\l7$$\"+++++YF_\\lF`jl7$FcjlF(Fe\\l-Fh[l 6$7&Fejl7$Fcjl$\"+/()>Z7F_\\l7$$\"+++++[F_\\lFjjl7$F][mF(Fe\\l-Fh[l6$7 &F_[m7$F][m$\"+#Gw8F\"F_\\l7$$\"\"&F)Fd[m7$Fg[mF(Fe\\l-Fh[l6$7&Fi[m7$F g[m$\"+'yfqH\"F_\\l7$$\"+++++_F_\\lF^\\m7$Fa\\mF(Fe\\l-Fh[l6$7&Fc\\m7$ Fa\\m$\"+l6KC8F_\\l7$$\"+++++aF_\\lFh\\m7$F[]mF(Fe\\l-Fh[l6$7&F]]m7$F[ ]m$\"+wwB`8F_\\l7$$\"+++++cF_\\lFb]m7$Fe]mF(Fe\\l-Fh[l6$7&Fg]m7$Fe]m$ \"+]A*QQ\"F_\\l7$$\"+++++eF_\\lF\\^m7$F_^mF(Fe\\l-Fh[l6$7&Fa^m7$F_^m$ \"+!)QP;9F_\\l7$$\"\"'F)Ff^m7$Fi^mF(Fe\\l-Fh[l6$7&F[_m7$Fi^m$\"+_!y2X \"F_\\l7$$\"+++++iF_\\lF`_m7$Fc_mF(Fe\\l-Fh[l6$7&Fe_m7$Fc_m$\"+-s?([\" F_\\l7$$\"+++++kF_\\lFj_m7$F]`mF(Fe\\l-Fh[l6$7&F_`m7$F]`m$\"+?7xD:F_\\ l7$$\"+++++mF_\\lFd`m7$Fg`mF(Fe\\l-Fh[l6$7&Fi`m7$Fg`m$\"+\"*zem:F_\\l7 $$\"+++++oF_\\lF^am7$FaamF(Fe\\l-Fh[l6$7&Fcam7$Faam$\"+')Ry4;F_\\l7$$F i\\lF)Fham7$F[bmF(Fe\\l-Fh[l6$7&F\\bm7$F[bm$\"+/\\\\b;F_\\l7$$\"+++++s F_\\lFabm7$FdbmF(Fe\\l-Fh[l6$7&Ffbm7$Fdbm$\"+jj'Qq\"F_\\l7$$\"+++++uF_ \\lF[cm7$F^cmF(Fe\\l-Fh[l6$7&F`cm7$F^cm$\"+dY0bF_\\l7$$\"+++++#)F_\\lFcem7$FfemF(Fe \\l-Fh[l6$7&Fhem7$Ffem$\"+_O_\"*>F_\\l7$$\"+++++%)F_\\lF]fm7$F`fmF(Fe \\l-Fh[l6$7&Fbfm7$F`fm$\"+>ddf?F_\\l7$$\"+++++')F_\\lFgfm7$FjfmF(Fe\\l -Fh[l6$7&F\\gm7$Fjfm$\"+GylJ@F_\\l7$$\"+++++))F_\\lFagm7$FdgmF(Fe\\l-F h[l6$7&Ffgm7$Fdgm$\"+@%G!3AF_\\l7$$F\\]lF)F[hm7$F^hmF(Fe\\l-Fh[l6$7&F_ hm7$F^hm$\"+rb'*)G#F_\\l7$$\"+++++#*F_\\lFdhm7$FghmF(Fe\\l-Fh[l6$7&Fih m7$Fghm$\"+(foZP#F_\\l7$$\"+++++%*F_\\lF^im7$FaimF(Fe\\l-Fh[l6$7&Fcim7 $Faim$\"+7)fdY#F_\\l7$$\"+++++'*F_\\lFhim7$F[jmF(Fe\\l-Fh[l6$7&F]jm7$F [jm$\"+RkGiDF_\\l7$$\"+++++)*F_\\lFbjm7$FejmF(Fe\\l-Fh[l6$7&Fgjm7$Fejm $\"+,FskEF_\\l7$FdzF\\[n7$FdzF(Fe\\l-%+AXESLABELSG6$Q\"x6\"Q!Fd[n-%%VI EWG6$;F(Fdz%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" "Curve 7" "Curve 8" "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Cu rve 13" "Curve 14" "Curve 15" "Curve 16" "Curve 17" "Curve 18" "Curve \+ 19" "Curve 20" "Curve 21" "Curve 22" "Curve 23" "Curve 24" "Curve 25" "Curve 26" "Curve 27" "Curve 28" "Curve 29" "Curve 30" "Curve 31" "Cur ve 32" "Curve 33" "Curve 34" "Curve 35" "Curve 36" "Curve 37" "Curve 3 8" "Curve 39" "Curve 40" "Curve 41" "Curve 42" "Curve 43" "Curve 44" " Curve 45" "Curve 46" "Curve 47" "Curve 48" "Curve 49" "Curve 50" "Curv e 51" }}}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+Z6ci9!\")" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 152 "Notice if you want \+ to find the total area, not the net area, between the graph of a funct ion f and the x-axis between x=a and x=b, you simply compute " } {XPPEDIT 18 0 " int(abs(f),x=a..b) " "6#-%$intG6$-%$absG6#%\"fG/%\"xG; %\"aG%\"bG" }{TEXT -1 36 " . Compute the total area for the " }} {PARA 0 "" 0 "" {TEXT -1 11 "functon " }{XPPEDIT 18 0 "3*sin(2*x)" "6#*&\"\"$\"\"\"-%$sinG6#*&\"\"#F%%\"xGF%F%" }{TEXT -1 21 " from x=0 to x=10. " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "f := abs(3*sin (2*x));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG,$-%$absG6#-%$sinG6#, $%\"xG\"\"#\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "int(f,x =0..10); evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&-%$cosG6#\"#?# !\"$\"\"##\"#RF*\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+\"p(y))= !\")" }}}{PARA 0 "" 0 "" {TEXT -1 20 "Plot the graph of " }{XPPEDIT 18 0 "abs(3*sin(2*x))" "6#-%$absG6#*&\"\"$\"\"\"-%$sinG6#*&\"\"#F(%\"x GF(F(" }{TEXT -1 69 " and use one of the \"box\" commands to \"shade \" the area in question. " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "plot(f, x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7_z7$$\"\"!F)F(7$$\"3ALL$3FWYs#!#>$\"3%Q0Lk gxRj\"!#=7$$\"3VmmmT&)G\\aF-$\"3*y!G[eV5jKF07$$\"3l****\\7G$R<)F-$\"3d E0p-Qa#)[F07$$\"3GLLL3x&)*3\"F0$\"3w+SpW#)[(['F07$$\"3YmmTN@Ki8F0$\"3? P7-AIF0$\" 32#fs#z/!o6\"!#<7$$\"3dmmm;arz@F0$\"3+3$zNS'zm7FO7$$\"3:L$e*)4bQl#F0$ \"3%*RBh'H&f=:FO7$$\"3u***\\7y%*z7$F0$\"3Sxo;)p[nv\"FO7$$\"3Lm;ajW8-OF 0$\"3(=$**ycm6z>FO7$$\"3ZLL$e9ui2%F0$\"3Ud4si5q$=#FO7$$\"3\"pm\"H2Q\\4 YF0$\"3EN7Oz9D!R#FO7$$\"3z***\\(oMrU^F0$\"358'z6\\V'pDFO7$$\"3nK$3-8Lf n&F0$\"3Nq`b=)Q)>FFO7$$\"3nmmm\"z_\"4iF0$\"3ejb3>48RGFO7$$\"3/nm;zp!fu 'F0$\"3(QJ8MDJm#HFO7$$\"3Tnmmm6m#G(F0$\"3k#fiW(oV!)HFO7$$\"3mm;a8(\\oT (F0$\"3,q6$=CU&))HFO7$$\"3.nmTg#Q5b(F0$\"3)fedI?&\\%*HFO7$$\"3Sn;H2oA& o(F0$\"3E&f.2Z\"H)*HFO7$$\"3ynm;a`T>yF0$\"3EPNi5$G***HFO7$$\"3_om\"zW# z(3)F0$\"3!f\\gya?n*HFO7$$\"39ommT&phN)F0$\"3F9mFa6)[)HFO7$$\"3A,+v=dd C%*F0$\"3#=.%GWq?`GFO7$$\"3JLLe*=)H\\5FO$\"3#RO*z&Q^\"FO$\"3+le*fP[d.#FO7$$\"3rmm\"z/3uC\"FO$\"3'RfaxS^y!=FO7$$\"31++vo3p )H\"FO$\"3ZaC(f[HKb\"FO7$$\"3TLLe*ot*\\8FO$\"3-^[,eBG#G\"FO7$$\"3xmmT5 lD,9FO$\"3-y7=:\"y&y**F07$$\"3*)***\\7LRDX\"FO$\"3O)Q\">%)GXHqF07$$\"3 YLLe9x0z9FO$\"3a[.c&)e[taF07$$\"3!om;z4wb]\"FO$\"3iV)QZ8E@!RF07$$\"39+ +D\"[%4K:FO$\"3$>7%RrEz>BF07$$\"3[LLekGhe:FO$\"33/A**eRN4tF-7$$\"3\"om ;/YU_c\"FO$\"3!\\4)z-8DKLF-7$$\"39++Dc?(=d\"FO$\"3@ZAJ^6p\"FO$\"3b=#=]qD*\\rF07$$\"34+++vIb</x\"FO$\"34,o61OFO$\"3<;+\"e$e'p(>FO7$$\"3+n;HdG\"\\)>FO$\"35,MYmK@5AFO7$$\"37 +D\"Gt#HR?FO$\"3))4>bWDMJYhO#FO$\"3]Je2(y0%**HFO7$$\"3eLLe9r5$R#FO$\"3Mc%H8YG=*HFO7$$\"3p m;z>(GqW#FO$\"3\\BR**f3j]HFO7$$\"3D+++D.&4]#FO$\"3*e-Q7?]^(GFO7$$\"3A+ +]PL4bDFO$\"3&pYVL8\\dw#FO7$$\"3?+++]jB4EFO$\"3Drm(p%*[Ri#FO7$$\"3<++] i$zLm#FO$\"358hhZ2T^CFO7$$\"3;+++vB_*ppFFO$\"3WRT!fuQ7.#FO7$$\"3!******\\-w=#GFO$\"3yPvR!HA-z\"FO7$$\"3)* ******\\G0uGFO$\"3wMr6k&G(H:FO7$$\"33+++v'Hi#HFO$\"3\"[n/#)o\"f_7FO7$$ \"3*o;H2B6O(HFO$\"3o:Z)G;].*)*F07$$\"3pL$eky#*4-$FO$\"3k3S!e2Mg;(F07$$ \"3/+v=UVPoIFO$\"3eR***e![TxVF07$$\"3&om;z*ev:JFO$\"3F_e*=b:&\\:F07$$ \"3_3x167%)HJFO$\"3:*)*4%)R;-0(F-7$$\"3=](=U_ER9$FO$\"3&f3(Q#H<.S\"F-7 $$\"3&=zpt$=,eJFO$\"3([u8qyR(\\)*F-7$$\"3^L3_]r4sJFO$\"3qU?3?Y8H=F07$$ \"3&o\"H#oxn-?$FO$\"3q%e%=&F07$ $\"3_$3F%H!4mD$FO$\"3'4)[`yBGSoF07$$\"3'o;HdlzZG$FO$\"3x)z95%HFu%)F07$ $\"3>]7.#G]HJ$FO$\"3sl9EUq835FO7$$\"3_LLL347TLFO$\"3Fi%3/ZZc;\"FO7$$\" 3WLLeR$\\))Q$FO$\"3+dL&G85QU\"FO7$$\"3#QLL3xxlV$FO$\"3k9C(y')3!p;FO7$$ \"3vLL3-iI%[$FO$\"3ozO`<6,**=FO7$$\"3nLLLLY.KNFO$\"3!Gqd$*oA<6#FO7$$\" 3;+DJXTb(e$FO$\"3[qi!o(>%[L#FO7$$\"3mm;HdO2VOFO$\"3ke)[<,.#HDFO7$$\"3e L3FpJf)p$FO$\"31*G&**[=T#p#FO7$$\"33++D\"o7Tv$FO$\"3SSh-X#eC#GFO7$$\"3 9L3xcoD.QFO$\"3q9@\\%G2'3HFO7$$\"3jm;HK5S_QFO$\"3Zl()HY+omHFO7$$\"3Q$3 _+7tp(QFO$\"3-s8\\$*=+&)HFO7$$\"39+D\"y?X:!RFO$\"3ib\"GU'f6'*HFO7$$\"3 )o\"Hd&HjLLL$Q*o]RFO$\"3+\\-^)*3j'*HFO7$ $\"39n;H#GF&eSFO$\"378Twxiy'*GFO7$$\"3l++D\"=lj;%FO$\"37m'*3=hriEFO7$$ \"3P+](=x3x@%FO$\"3)>w)zCY-2DFO7$$\"33++]iB0pUFO$\"3sJ4tP1#\\K#FO7$$\" 3p+]7`fR?VFO$\"3'f6`U%FO$\"3u7awyyPH;FO7$$\"3Kn;zWG))yWFO$\"3&y&z=6:m]8FO7$$\"30%3 _+noc]%FO$\"3)=E@=G(G07FO7$$\"3y+DJ&\\aC`%FO$\"3@rqZ*zak0\"FO7$$\"3]8](F07$$\"3gL3 FW;ANYFO$\"3N)[&z49o6YF07$$\"3'QL3F9*[,4ZFO$\"3gG5r4xVC?F-7$$\"3^fk`mPJ @ZFO$\"3yv3XXtea`F-7$$\"39Me9TEhLZFO$\"3t::[xs.t7F07$$\"3P$ek.R5#eZFO$ \"3FY_=YzVXFF07$$\"3]LLeR\"3Gy%FO$\"39I2+aa>6UF07$$\"3Z\\i:N,M4[FO$\"3 DUBJ`fo!y&F07$$\"3Km\"H28se$[FO$\"3/5mU!4.RL(F07$$\"3=$3-j7/C'[FO$\"3 \"GODEOuk'))F07$$\"3.+](=7O*))[FO$\"3L&=\"zQ&3u.\"FO7$$\"3uL3-8,+U\\FO $\"3M+Y([C`(H8FO7$$\"3emm;/T1&*\\FO$\"3mZIz%zMrg\"FO7$$\"31mTgxE=]]FO$ \"3(o1aaPng(=FO7$$\"3Vm;/^7I0^FO$\"31LX&[jCA7#FO7$$\"3!o;zW#)>/;&FO$\" 3_c')zT#=EM#FO7$$\"3=nm\"zRQb@&FO$\"3E3X&RjsX`#FO7$$\"3mLLLe,]6`FO$\"3 7KMl6/=%z#FO7$$\"3:++v=>Y2aFO$\"3o3&[&FO$\"3c@p$HO [!**HFO7$$\"3PL$e*[K56bFO$\"3eW*R4:O*)*HFO7$$\"3(**\\iS\"R#Hc&FO$\"3U: zE*=zX(HFO7$$\"3Znm;zXu9cFO$\"3kNtK+$*H=HFO7$$\"3i+](oR!GocFO$\"3%p/#G fcFFGFO7$$\"3yLLe9i\"=s&FO$\"3OKXwO,(Qq#FO7$$\"3$pm\"HK?NvdFO$\"3Y-o%R 9'\\\\DFO7$$\"34+++]y))GeFO$\"3S[r'ey@fO#FO7$$\"3!3+DJ?i7)eFO$\"3pk#p< P\"4g@FO7$$\"3k++DcljLfFO$\"3_HB'*o9eI>FO7$$\"3Z+]P44,')fFO$\"3ebWDD!3 *z;FO7$$\"3H++]i_QQgFO$\"313_u))*=3T\"FO7$$\"3!3](=U,1*3'FO$\"3mVo1X'3 d8\"FO7$$\"3U+](=-N(RhFO$\"3eJR09aU*[)F07$$\"3m](='FO$\"3_P#yx`PY`&F07$$\"3H]iSTtu:iFO$\"3/MoG66-MSF 07$$\"3a++D\"y%3TiFO$\"3\\gxRjx/BDF07$$\"3HDcwM7:biFO$\"3p!*\\\"R>j6o \"F07$$\"3.]7G)o<#piFO$\"3k.]'*z8[z$)F-7$$\"3Si!R]\"4DwiFO$\"3=p`H2>]g TF-7$$\"3xuozTTG$G'FO$\"3Nr-o)*p2If!#@7$$\"39(oa&otJ!H'FO$\"3(4!)3Rr\" 4zUF-7$$\"3S+DJ&f]tH'FO$\"3UK+#)))f.)\\)F-7$$\"3y]PM-N[DjFO$\"3%[4q;ql [`#F07$$\"3F+]P4kh`jFO$\"3!f05v$\\!>@%F07$$\"3v\\iS;$\\(fY 8c(eF07$$\"39+vVBA))4kFO$\"3P:USQcs?vF07$$\"3^](o/8:!QkFO$\"3C$eYPmM?9 *F07$$\"3+++]P![hY'FO$\"3D5f!)34Wt5FO7$$\"3rK$eRP0n^'FO$\"3y&=`q9O2N\" FO7$$\"3JmmT5FEnlFO$\"3vA9?#)HB9;FO7$$\"3#***\\(o/?yh'FO$\"3#>bE0nR7'= FO7$$\"3iKLL$Qx$omFO$\"3`#\\')G#HB*3#FO7$$\"39***\\78eBs'FO$\"3\\..Zd7 04BFO7$$\"3bmm;z)Qjx'FO$\"3:b45]@)>]#FO7$$\"3'RL$3F'>.$oFO$\"3Xgy^U!zd m#FO7$$\"3Y+++v.I%)oFO$\"3K#=WtFO$\"3m$R5=0 %pbDFO7$$\"3gm;zp%*\\%R(FO$\"3Z%>G\")G@\\Q#FO7$$\"3A+v=Un\"[W(FO$\"3p) =R,1;+>#FO7$$\"3%HL$e9S8&\\(FO$\"3FZLbo0&H(>FO7$$\"3W****\\i+tZvFO$\"3 #\\Y,#y?vC\"F07$$\"3&)*\\7y&\\yfyFO$\"3$z/$GCh\">[$F-7$$\"3Q;H2$3'\\&)yF O$\"3?HxJQ_h*)=F07$$\"3\"HLL$3s?6zFO$\"3N?Y5aL/EMF07$$\"3Y:zptV7QzFO$ \"3_0!zn()oZ-&F07$$\"3!*)\\i!R:/lzFO$\"3<\"fLnXN*3mF07$$\"3M#3FWqe>*zF O$\"3FyyztI&R<)F07$$\"3yl;zpe()=!)FO$\"3$yX#o!>(G:(*F07$$\"3lK3_+-rs!) FO$\"3g[/:#G74F\"FO7$$\"3a***\\7`Wl7)FO$\"34y\"o-(pdb:FO7$$\"3llT5!R$R y\")FO$\"3k,*))G@[F\"=FO7$$\"3cL$e*[ACI#)FO$\"3>(*>cUSW]?FO7$$\"3Y,D\" y5\"4#G)FO$\"3U>>9a26mAFO7$$\"3enmmm*RRL)FO$\"3mko;98VdCFO7$$\"3nn;a8H 'pQ)FO$\"3/w'H.mkdi#FO7$$\"3wnmTge)*R%)FO$\"3z8m:CqfkFFO7$$\"3%ym\"H2) 3I\\)FO$\"3Y;wt'foB(GFO7$$\"3$zmmTvJga)FO$\"3`<1EV&oy%HFO7$$\"3D^(=#*p BBd)FO$\"3HZlN\"HhI(HFO7$$\"3eM3FWch)f)FO$\"3[g&4VAN+*HFO7$$\"3!z\"HK* e2\\i)FO$\"3a>p*)=Mu)*HFO7$$\"3A,]PM&*>^')FO$\"3wxz$>!=;**HFO7$$\"3'y; zWU$y.()FO$\"3!**G4oUZ^(HFO7$$\"3]MLe9tOc()FO$\"3mX*)[fuD=HFO7$$\"3no; H#e0I&))FO$\"3_j;DmTKIFFO7$$\"31,++]Qk\\*)FO$\"3$*3MQ'[92W#FO7$$\"3%\\ L3-.B]+*FO$\"3(\\5vJkZHB#FO7$$\"3#)omT5ASg!*FO$\"3UPVO(H;y*>FO7$$\"3q- ]i!R\"y:\"*FO$\"3siA3b>?Q-8'ehGd9FO7$$\"3\"FO7$$\"3K,+voTAq#*FO$\"3o8H3A\"fi7*F07$$\"3[N $3x'fv>$*FO$\"3ja$\\He(3biF07$$\"3%ymmmw(Gp$*FO$\"3-*GnFK\"eALF07$$\"3 Q%e*)4Q$p&R*FO$\"3/s(fD$34W*F07$$ \"3c**\\il(z5j*FO$\"3ujZx'R()H?\"FO7$$\"3m+++]oi\"o*FO$\"3>:'QMN.UZ\"F O7$$\"3y,]PMRFO 7$$\"3Q+D1k2/P)*FO$\"3A=f%**QxE?#FO7$$\"3W,]P40O\"*)*FO$\"3#3)HWvV_5CF O7$$\"3s+voa-oX**FO$\"36UCKC!\\**e#FO7$$\"#5F)$\"3+$)G=_d$)QFFO-%'COLO URG6&%$RGBG$F`go!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F]ho-%%VIEWG6$;F(F_g o%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 223.000000 -186.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "middlebox(f, x=0..10, 50);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 " 6W-%'CURVESG6&7_z7$$\"\"!F)F(7$$\"3ALL$3FWYs#!#>$\"3%Q0LkgxRj\"!#=7$$ \"3VmmmT&)G\\aF-$\"3*y!G[eV5jKF07$$\"3l****\\7G$R<)F-$\"3dE0p-Qa#)[F07 $$\"3GLLL3x&)*3\"F0$\"3w+SpW#)[(['F07$$\"3YmmTN@Ki8F0$\"3?P7-AIF0$\"32#fs#z/!o6 \"!#<7$$\"3dmmm;arz@F0$\"3+3$zNS'zm7FO7$$\"3:L$e*)4bQl#F0$\"3%*RBh'H&f =:FO7$$\"3u***\\7y%*z7$F0$\"3Sxo;)p[nv\"FO7$$\"3Lm;ajW8-OF0$\"3(=$**yc m6z>FO7$$\"3ZLL$e9ui2%F0$\"3Ud4si5q$=#FO7$$\"3\"pm\"H2Q\\4YF0$\"3EN7Oz 9D!R#FO7$$\"3z***\\(oMrU^F0$\"358'z6\\V'pDFO7$$\"3nK$3-8Lfn&F0$\"3Nq`b =)Q)>FFO7$$\"3nmmm\"z_\"4iF0$\"3ejb3>48RGFO7$$\"3/nm;zp!fu'F0$\"3(QJ8M DJm#HFO7$$\"3Tnmmm6m#G(F0$\"3k#fiW(oV!)HFO7$$\"3mm;a8(\\oT(F0$\"3,q6$= CU&))HFO7$$\"3.nmTg#Q5b(F0$\"3)fedI?&\\%*HFO7$$\"3Sn;H2oA&o(F0$\"3E&f. 2Z\"H)*HFO7$$\"3ynm;a`T>yF0$\"3EPNi5$G***HFO7$$\"3_om\"zW#z(3)F0$\"3!f \\gya?n*HFO7$$\"39ommT&phN)F0$\"3F9mFa6)[)HFO7$$\"3A,+v=ddC%*F0$\"3#=. %GWq?`GFO7$$\"3JLLe*=)H\\5FO$\"3#RO*z&Q^\"FO$\"3+le *fP[d.#FO7$$\"3rmm\"z/3uC\"FO$\"3'RfaxS^y!=FO7$$\"31++vo3p)H\"FO$\"3Za C(f[HKb\"FO7$$\"3TLLe*ot*\\8FO$\"3-^[,eBG#G\"FO7$$\"3xmmT5lD,9FO$\"3-y 7=:\"y&y**F07$$\"3*)***\\7LRDX\"FO$\"3O)Q\">%)GXHqF07$$\"3YLLe9x0z9FO$ \"3a[.c&)e[taF07$$\"3!om;z4wb]\"FO$\"3iV)QZ8E@!RF07$$\"39++D\"[%4K:FO$ \"3$>7%RrEz>BF07$$\"3[LLekGhe:FO$\"33/A**eRN4tF-7$$\"3\"om;/YU_c\"FO$ \"3!\\4)z-8DKLF-7$$\"39++Dc?(=d\"FO$\"3@ZAJ^6p\" FO$\"3b=#=]qD*\\rF07$$\"34+++vIb</x\"FO$\"34,o61OFO$ \"3<;+\"e$e'p(>FO7$$\"3+n;HdG\"\\)>FO$\"35,MYmK@5AFO7$$\"37+D\"Gt#HR?F O$\"3))4>bWDMJYhO#F O$\"3]Je2(y0%**HFO7$$\"3eLLe9r5$R#FO$\"3Mc%H8YG=*HFO7$$\"3pm;z>(GqW#FO $\"3\\BR**f3j]HFO7$$\"3D+++D.&4]#FO$\"3*e-Q7?]^(GFO7$$\"3A++]PL4bDFO$ \"3&pYVL8\\dw#FO7$$\"3?+++]jB4EFO$\"3Drm(p%*[Ri#FO7$$\"3<++]i$zLm#FO$ \"358hhZ2T^CFO7$$\"3;+++vB_*ppFFO$ \"3WRT!fuQ7.#FO7$$\"3!******\\-w=#GFO$\"3yPvR!HA-z\"FO7$$\"3)*******\\ G0uGFO$\"3wMr6k&G(H:FO7$$\"33+++v'Hi#HFO$\"3\"[n/#)o\"f_7FO7$$\"3*o;H2 B6O(HFO$\"3o:Z)G;].*)*F07$$\"3pL$eky#*4-$FO$\"3k3S!e2Mg;(F07$$\"3/+v=U VPoIFO$\"3eR***e![TxVF07$$\"3&om;z*ev:JFO$\"3F_e*=b:&\\:F07$$\"3_3x167 %)HJFO$\"3:*)*4%)R;-0(F-7$$\"3=](=U_ER9$FO$\"3&f3(Q#H<.S\"F-7$$\"3&=zp t$=,eJFO$\"3([u8qyR(\\)*F-7$$\"3^L3_]r4sJFO$\"3qU?3?Y8H=F07$$\"3&o\"H# oxn-?$FO$\"3q%e%=&F07$$\"3_$3F% H!4mD$FO$\"3'4)[`yBGSoF07$$\"3'o;HdlzZG$FO$\"3x)z95%HFu%)F07$$\"3>]7.# G]HJ$FO$\"3sl9EUq835FO7$$\"3_LLL347TLFO$\"3Fi%3/ZZc;\"FO7$$\"3WLLeR$\\ ))Q$FO$\"3+dL&G85QU\"FO7$$\"3#QLL3xxlV$FO$\"3k9C(y')3!p;FO7$$\"3vLL3-i I%[$FO$\"3ozO`<6,**=FO7$$\"3nLLLLY.KNFO$\"3!Gqd$*oA<6#FO7$$\"3;+DJXTb( e$FO$\"3[qi!o(>%[L#FO7$$\"3mm;HdO2VOFO$\"3ke)[<,.#HDFO7$$\"3eL3FpJf)p$ FO$\"31*G&**[=T#p#FO7$$\"33++D\"o7Tv$FO$\"3SSh-X#eC#GFO7$$\"39L3xcoD.Q FO$\"3q9@\\%G2'3HFO7$$\"3jm;HK5S_QFO$\"3Zl()HY+omHFO7$$\"3Q$3_+7tp(QFO $\"3-s8\\$*=+&)HFO7$$\"39+D\"y?X:!RFO$\"3ib\"GU'f6'*HFO7$$\"3)o\"Hd&H< h#RFO$\"3c'>jLLL$Q*o]RFO$\"3+\\-^)*3j'*HFO7$$\"39n;H# GF&eSFO$\"378Twxiy'*GFO7$$\"3l++D\"=lj;%FO$\"37m'*3=hriEFO7$$\"3P+](=x 3x@%FO$\"3)>w)zCY-2DFO7$$\"33++]iB0pUFO$\"3sJ4tP1#\\K#FO7$$\"3p+]7`fR? VFO$\"3'f6`U %FO$\"3u7awyyPH;FO7$$\"3Kn;zWG))yWFO$\"3&y&z=6:m]8FO7$$\"30%3_+noc]%FO $\"3)=E@=G(G07FO7$$\"3y+DJ&\\aC`%FO$\"3@rqZ*zak0\"FO7$$\"3]8](F07$$\"3gL3FW;ANYFO$ \"3N)[&z49o6YF07$$\"3'QL3F9*[,4ZFO$\"3gG5r4xVC?F-7$$\"3^fk`mPJ@ZFO$\"3 yv3XXtea`F-7$$\"39Me9TEhLZFO$\"3t::[xs.t7F07$$\"3P$ek.R5#eZFO$\"3FY_=Y zVXFF07$$\"3]LLeR\"3Gy%FO$\"39I2+aa>6UF07$$\"3Z\\i:N,M4[FO$\"3DUBJ`fo! y&F07$$\"3Km\"H28se$[FO$\"3/5mU!4.RL(F07$$\"3=$3-j7/C'[FO$\"3\"GODEOuk '))F07$$\"3.+](=7O*))[FO$\"3L&=\"zQ&3u.\"FO7$$\"3uL3-8,+U\\FO$\"3M+Y([ C`(H8FO7$$\"3emm;/T1&*\\FO$\"3mZIz%zMrg\"FO7$$\"31mTgxE=]]FO$\"3(o1aaP ng(=FO7$$\"3Vm;/^7I0^FO$\"31LX&[jCA7#FO7$$\"3!o;zW#)>/;&FO$\"3_c')zT#= EM#FO7$$\"3=nm\"zRQb@&FO$\"3E3X&RjsX`#FO7$$\"3mLLLe,]6`FO$\"37KMl6/=%z #FO7$$\"3:++v=>Y2aFO$\"3o3&[&FO$\"3c@p$HO[!**HFO7$ $\"3PL$e*[K56bFO$\"3eW*R4:O*)*HFO7$$\"3(**\\iS\"R#Hc&FO$\"3U:zE*=zX(HF O7$$\"3Znm;zXu9cFO$\"3kNtK+$*H=HFO7$$\"3i+](oR!GocFO$\"3%p/#GfcFFGFO7$ $\"3yLLe9i\"=s&FO$\"3OKXwO,(Qq#FO7$$\"3$pm\"HK?NvdFO$\"3Y-o%R9'\\\\DFO 7$$\"34+++]y))GeFO$\"3S[r'ey@fO#FO7$$\"3!3+DJ?i7)eFO$\"3pk#pFO7$$\"3Z+]P44,')fFO$\"3ebWDD!3*z;FO7$$ \"3H++]i_QQgFO$\"313_u))*=3T\"FO7$$\"3!3](=U,1*3'FO$\"3mVo1X'3d8\"FO7$ $\"3U+](=-N(RhFO$\"3eJR09aU*[)F07$$\"3m](='FO$\"3_P#yx`PY`&F07$$\"3H]iSTtu:iFO$\"3/MoG66-MSF07$$\"3a ++D\"y%3TiFO$\"3\\gxRjx/BDF07$$\"3HDcwM7:biFO$\"3p!*\\\"R>j6o\"F07$$\" 3.]7G)o<#piFO$\"3k.]'*z8[z$)F-7$$\"3Si!R]\"4DwiFO$\"3=p`H2>]gTF-7$$\"3 xuozTTG$G'FO$\"3Nr-o)*p2If!#@7$$\"39(oa&otJ!H'FO$\"3(4!)3Rr\"4zUF-7$$ \"3S+DJ&f]tH'FO$\"3UK+#)))f.)\\)F-7$$\"3y]PM-N[DjFO$\"3%[4q;ql[`#F07$$ \"3F+]P4kh`jFO$\"3!f05v$\\!>@%F07$$\"3v\\iS;$\\(fY8c(eF07$ $\"39+vVBA))4kFO$\"3P:USQcs?vF07$$\"3^](o/8:!QkFO$\"3C$eYPmM?9*F07$$\" 3+++]P![hY'FO$\"3D5f!)34Wt5FO7$$\"3rK$eRP0n^'FO$\"3y&=`q9O2N\"FO7$$\"3 JmmT5FEnlFO$\"3vA9?#)HB9;FO7$$\"3#***\\(o/?yh'FO$\"3#>bE0nR7'=FO7$$\"3 iKLL$Qx$omFO$\"3`#\\')G#HB*3#FO7$$\"39***\\78eBs'FO$\"3\\..Zd704BFO7$$ \"3bmm;z)Qjx'FO$\"3:b45]@)>]#FO7$$\"3'RL$3F'>.$oFO$\"3Xgy^U!zdm#FO7$$ \"3Y+++v.I%)oFO$\"3K#=WtFO$\"3m$R5=0%pbDFO7$ $\"3gm;zp%*\\%R(FO$\"3Z%>G\")G@\\Q#FO7$$\"3A+v=Un\"[W(FO$\"3p)=R,1;+># FO7$$\"3%HL$e9S8&\\(FO$\"3FZLbo0&H(>FO7$$\"3W****\\i+tZvFO$\"3#\\Y,#y? vC\"F07$$\"3&)*\\7y&\\yfyFO$\"3$z/$GCh\">[$F-7$$\"3Q;H2$3'\\&)yFO$\"3?H xJQ_h*)=F07$$\"3\"HLL$3s?6zFO$\"3N?Y5aL/EMF07$$\"3Y:zptV7QzFO$\"3_0!zn ()oZ-&F07$$\"3!*)\\i!R:/lzFO$\"3<\"fLnXN*3mF07$$\"3M#3FWqe>*zFO$\"3Fyy ztI&R<)F07$$\"3yl;zpe()=!)FO$\"3$yX#o!>(G:(*F07$$\"3lK3_+-rs!)FO$\"3g[ /:#G74F\"FO7$$\"3a***\\7`Wl7)FO$\"34y\"o-(pdb:FO7$$\"3llT5!R$Ry\")FO$ \"3k,*))G@[F\"=FO7$$\"3cL$e*[ACI#)FO$\"3>(*>cUSW]?FO7$$\"3Y,D\"y5\"4#G )FO$\"3U>>9a26mAFO7$$\"3enmmm*RRL)FO$\"3mko;98VdCFO7$$\"3nn;a8H'pQ)FO$ \"3/w'H.mkdi#FO7$$\"3wnmTge)*R%)FO$\"3z8m:CqfkFFO7$$\"3%ym\"H2)3I\\)FO $\"3Y;wt'foB(GFO7$$\"3$zmmTvJga)FO$\"3`<1EV&oy%HFO7$$\"3D^(=#*pBBd)FO$ \"3HZlN\"HhI(HFO7$$\"3eM3FWch)f)FO$\"3[g&4VAN+*HFO7$$\"3!z\"HK*e2\\i)F O$\"3a>p*)=Mu)*HFO7$$\"3A,]PM&*>^')FO$\"3wxz$>!=;**HFO7$$\"3'y;zWU$y.( )FO$\"3!**G4oUZ^(HFO7$$\"3]MLe9tOc()FO$\"3mX*)[fuD=HFO7$$\"3no;H#e0I&) )FO$\"3_j;DmTKIFFO7$$\"31,++]Qk\\*)FO$\"3$*3MQ'[92W#FO7$$\"3%\\L3-.B]+ *FO$\"3(\\5vJkZHB#FO7$$\"3#)omT5ASg!*FO$\"3UPVO(H;y*>FO7$$\"3q-]i!R\"y :\"*FO$\"3siA3b>?Q-8'ehGd9FO7$$\"3\"FO7$$\"3K,+voTAq#*FO$\"3o8H3A\"fi7*F07$$\"3[N$3x'fv> $*FO$\"3ja$\\He(3biF07$$\"3%ymmmw(Gp$*FO$\"3-*GnFK\"eALF07$$\"3Q%e*)4Q $p&R*FO$\"3/s(fD$34W*F07$$\"3c**\\ il(z5j*FO$\"3ujZx'R()H?\"FO7$$\"3m+++]oi\"o*FO$\"3>:'QMN.UZ\"FO7$$\"3y ,]PMRFO7$$\"3Q+ D1k2/P)*FO$\"3A=f%**QxE?#FO7$$\"3W,]P40O\"*)*FO$\"3#3)HWvV_5CFO7$$\"3s +voa-oX**FO$\"36UCKC!\\**e#FO7$$\"#5F)$\"3+$)G=_d$)QFFO-%'COLOURG6&%$R GBG$\"*++++\"!\")F(F(-%&STYLEG6#%%LINEG-%*THICKNESSG6#\"\"#-%)POLYGONS G6$7&F'7$F($\"+C*z+'f!#57$$\"+++++?FihoFgho7$F[ioF(-%&COLORG6&Ffgo$\" \"(!\"\"$\"\"*FcioFaio-Fcho6$7&F]io7$F[io$\"+?u#Rp\"!\"*7$$\"+++++SFih oFjio7$F^joF(F^io-Fcho6$7&F`jo7$F^jo$\"+aHTCDF\\jo7$$\"+++++gFihoFejo7 $FhjoF(F^io-Fcho6$7&Fjjo7$Fhjo$\"+!>\\j&HF\\jo7$$\"+++++!)FihoF_[p7$Fb [pF(F^io-Fcho6$7&Fd[p7$Fb[p$\"+$*Ga@HF\\jo7$$\"\"\"F)Fi[p7$F\\\\pF(F^i o-Fcho6$7&F^\\p7$F\\\\p$\"+6#*[DCF\\jo7$$\"+++++7F\\joFc\\p7$Ff\\pF(F^ io-Fcho6$7&Fh\\p7$Ff\\p$\"+:T]Y:F\\jo7$$\"+++++9F\\joF]]p7$F`]pF(F^io- Fcho6$7&Fb]p7$F`]p$\"+V-gLUFiho7$$\"+++++;F\\joFg]p7$Fj]pF(F^io-Fcho6$ 7&F\\^p7$Fj]p$\"+gIBmwFiho7$$\"+++++=F\\joFa^p7$Fd^pF(F^io-Fcho6$7&Ff^ p7$Fd^p$\"+tOdN=F\\jo7$$FahoF)F[_p7$F^_pF(F^io-Fcho6$7&F__p7$F^_p$\"+< ts9EF\\jo7$$\"+++++AF\\joFd_p7$Fg_pF(F^io-Fcho6$7&Fi_p7$Fg_p$\"+6I2\") HF\\jo7$$\"+++++CF\\joF^`p7$Fa`pF(F^io-Fcho6$7&Fc`p7$Fa`p$\"+CGxwGF\\j o7$$\"+++++EF\\joFh`p7$F[apF(F^io-Fcho6$7&F]ap7$F[ap$\"+jMH=BF\\jo7$$ \"+++++GF\\joFbap7$FeapF(F^io-Fcho6$7&Fgap7$Feap$\"+Ql!QR\"F\\jo7$$\" \"$F)F\\bp7$F_bpF(F^io-Fcho6$7&Fabp7$F_bp$\"+&3#o#\\#Fiho7$$\"+++++KF \\joFfbp7$FibpF(F^io-Fcho6$7&F[cp7$Fibp$\"+04CY$*Fiho7$$\"+++++MF\\joF `cp7$FccpF(F^io-Fcho6$7&Fecp7$Fccp$\"+'zf4(>F\\jo7$$\"+++++OF\\joFjcp7 $F]dpF(F^io-Fcho6$7&F_dp7$F]dp$\"+(GChp#F\\jo7$$\"+++++QF\\joFddp7$Fgd pF(F^io-Fcho6$7&Fidp7$Fgdp$\"+O+j&*HF\\jo7$$\"\"%F)F^ep7$FaepF(F^io-Fc ho6$7&Fcep7$Faep$\"+q;>AGF\\jo7$$\"+++++UF\\joFhep7$F[fpF(F^io-Fcho6$7 &F]fp7$F[fp$\"+%H\">.AF\\jo7$$\"+++++WF\\joFbfp7$FefpF(F^io-Fcho6$7&Fg fp7$Fefp$\"+caNO7F\\jo7$$\"+++++YF\\joF\\gp7$F_gpF(F^io-Fcho6$7&Fagp7$ F_gp$\"+NwiKu!#67$$\"+++++[F\\joFfgp7$FjgpF(F^io-Fcho6$7&F\\hp7$Fjgp$ \"+)QP%*4\"F\\jo7$$\"\"&F)Fahp7$FdhpF(F^io-Fcho6$7&Ffhp7$Fdhp$\"+jSi*4 #F\\jo7$$\"+++++_F\\joF[ip7$F^ipF(F^io-Fcho6$7&F`ip7$F^ip$\"+liKoFF\\j o7$$\"+++++aF\\joFeip7$FhipF(F^io-Fcho6$7&Fjip7$Fhip$\"+?1(***HF\\jo7$ $\"+++++cF\\joF_jp7$FbjpF(F^io-Fcho6$7&Fdjp7$Fbjp$\"+xb)zv#F\\jo7$$\"+ ++++eF\\joFijp7$F\\[qF(F^io-Fcho6$7&F^[q7$F\\[q$\"+a_d!3#F\\jo7$$\"\"' F)Fc[q7$Ff[qF(F^io-Fcho6$7&Fh[q7$Ff[q$\"+Zyou5F\\jo7$$\"+++++iF\\joF] \\q7$F`\\qF(F^io-Fcho6$7&Fb\\q7$F`\\q$\"+<9p35Fiho7$$\"+++++kF\\joFg\\ q7$Fj\\qF(F^io-Fcho6$7&F\\]q7$Fj\\q$\"+56]g7F\\jo7$$\"+++++mF\\joFa]q7 $Fd]qF(F^io-Fcho6$7&Ff]q7$Fd]q$\"+qw7@AF\\jo7$$\"+++++oF\\joF[^q7$F^^q F(F^io-Fcho6$7&F`^q7$F^^q$\"+3q3JGF\\jo7$$FbioF)Fe^q7$Fh^qF(F^io-Fcho6 $7&Fi^q7$Fh^q$\"+e*zS*HF\\jo7$$\"+++++sF\\joF^_q7$Fa_qF(F^io-Fcho6$7&F c_q7$Fa_q$\"+;NP%o#F\\jo7$$\"+++++uF\\joFh_q7$F[`qF(F^io-Fcho6$7&F]`q7 $F[`q$\"+@N'3&>F\\jo7$$\"+++++wF\\joFb`q7$Fe`qF(F^io-Fcho6$7&Fg`q7$Fe` q$\"+,2b$4*Fiho7$$\"+++++yF\\joF\\aq7$F_aqF(F^io-Fcho6$7&Faaq7$F_aq$\" +2b?dFFiho7$$\"\")F)Ffaq7$FiaqF(F^io-Fcho6$7&F[bq7$Fiaq$\"+ffE<9F\\jo7 $$\"+++++#)F\\joF`bq7$FcbqF(F^io-Fcho6$7&Febq7$Fcbq$\"+Oi0NBF\\jo7$$\" +++++%)F\\joFjbq7$F]cqF(F^io-Fcho6$7&F_cq7$F]cq$\"+wC>%)GF\\jo7$$\"+++ ++')F\\joFdcq7$FgcqF(F^io-Fcho6$7&Ficq7$Fgcq$\"+U\"yz(HF\\jo7$$\"+++++ ))F\\joF^dq7$FadqF(F^io-Fcho6$7&Fcdq7$Fadq$\"+Qlg,EF\\jo7$$FeioF)Fhdq7 $F[eqF(F^io-Fcho6$7&F\\eq7$F[eq$\"+n%)\\9=F\\jo7$$\"+++++#*F\\joFaeq7$ FdeqF(F^io-Fcho6$7&Ffeq7$Fdeq$\"+^)4#4uFiho7$$\"+++++%*F\\joF[fq7$F^fq F(F^io-Fcho6$7&F`fq7$F^fq$\"+\"H;j\\%Fiho7$$\"+++++'*F\\joFefq7$FhfqF( F^io-Fcho6$7&Fjfq7$Fhfq$\"+'H(>p:F\\jo7$$\"+++++)*F\\joF_gq7$FbgqF(F^i o-Fcho6$7&Fdgq7$Fbgq$\"+77-TCF\\jo7$F_goFigq7$F_goF(F^io-%+AXESLABELSG 6$Q\"x6\"Q!Fahq-%%VIEWG6$;F(F_go%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve \+ 4" "Curve 5" "Curve 6" "Curve 7" "Curve 8" "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Curve 13" "Curve 14" "Curve 15" "Curve 16" "Curve 17 " "Curve 18" "Curve 19" "Curve 20" "Curve 21" "Curve 22" "Curve 23" "C urve 24" "Curve 25" "Curve 26" "Curve 27" "Curve 28" "Curve 29" "Curve 30" "Curve 31" "Curve 32" "Curve 33" "Curve 34" "Curve 35" "Curve 36 " "Curve 37" "Curve 38" "Curve 39" "Curve 40" "Curve 41" "Curve 42" "C urve 43" "Curve 44" "Curve 45" "Curve 46" "Curve 47" "Curve 48" "Curve 49" "Curve 50" "Curve 51" }}}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 255 "We can use this to estimate the total possible error in using the Taylor polynomial to approximate the values of a f unction near a point. For example to compute the error from using the 3rd degree Taylor polynomial to approximate sin(x) in the interval \+ " }{XPPEDIT 18 0 "-1/10" "6#,$*&\"\"\"F%\"#5!\"\"F'" }{TEXT -1 5 " to \+ " }{XPPEDIT 18 0 "1/10" "6#*&\"\"\"F$\"#5!\"\"" }{TEXT -1 26 " we com pute the integral. " }}{PARA 256 "" 0 "" {XPPEDIT 18 0 " int(abs(sin(x )-taylor(sin(x),x=0,4)),x=-0.1..0.1)" "6#-%$intG6$-%$absG6#,&-%$sinG6# %\"xG\"\"\"-%'taylorG6%-F+6#F-/F-\"\"!\"\"%!\"\"/F-;,$-%&FloatG6$F.F7F 7-F<6$F.F7" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 83 "Compute this error, remember to convert the taylor expression \+ to a polynomial. " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "merr or:=sin(x)-convert(taylor(sin(x),x=0,4),polynom);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'merrorG,(-%$sinG6#%\"xG\"\"\"F)!\"\"*&#F*\"\"'F*)F) \"\"$F*F*" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 58 "Int(abs(merror),x=-0.1..0.1)=int(abs(merror),x=-0.1 ..0.1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%$IntG6$-%$absG6#,(-%$sin G6#%\"xG\"\"\"F.!\"\"*&#F/\"\"'F/)F.\"\"$F/F//F.;$F0F0$F/F0$\"+,=GxF!# =" }}}{PARA 0 "" 0 "" {TEXT -1 40 "Next try computing the exact error \+ from " }{XPPEDIT 18 0 "-1/10" "6#,$*&\"\"\"F%\"#5!\"\"F'" }{TEXT -1 4 " to " }{XPPEDIT 18 0 "1/10" "6#*&\"\"\"F$\"#5!\"\"" }{TEXT -1 1 "." } }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "Int(abs(merror),x = -1/10 . . 1/10)=int(abs(merror),x=-1/10..1/10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%$IntG6$-%$absG6#,(-%$sinG6#%\"xG\"\"\"F.!\"\"*&#F/\"\"'F/)F. \"\"$F/F//F.;#F0\"#5#F/F9-%$intGF&" }}}{PARA 0 "" 0 "" {TEXT -1 37 "We ll Duh! Try evaluating the answer." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "Int(abs(merror),x = -1/10 .. 1/10)=evalf(int(abs(merr or),x=-1/10..1/10));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%$IntG6$-%$a bsG6#,(-%$sinG6#%\"xG\"\"\"F.!\"\"*&#F/\"\"'F/)F.\"\"$F/F//F.;#F0\"#5# F/F9$\"+,=GxF!#=" }}}{PARA 0 "" 0 "" {TEXT 259 65 "Explain why this sh ould be the same as the following calculations" }{XPPEDIT 18 0 "2*int( error,x=0..h)" "6#%#%?G" }{TEXT -1 94 " The function inside the abso lute value signs is odd. Taking the absolute value produces an" }} {PARA 0 "" 0 "" {TEXT -1 14 "even function." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "2*Int(merror,x=0.. 1/10)=2*int(merror,x=0..1/10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,$- %$IntG6$,(-%$sinG6#%\"xG\"\"\"F,!\"\"*&#F-\"\"'F-)F,\"\"$F-F-/F,;\"\"! #F-\"#5\"\"#,&-%$cosG6#F7!\"##\"',)Q#\"'++7F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "evalf(2*int(merror,x=0..1/10));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"#!\"*" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }} {PARA 0 "" 0 "" {TEXT -1 291 "Now we consider some interesting example s in which MAPLE shows us some of its limitations. In each case plo t the function and compute the definite integral for x=0 to x=10 using the int(f,x=a..b) command. For which of these does MAPLE give the co rrect answer and for which does it not. " }{TEXT 262 23 "Explain your reasoning." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 " " {XPPEDIT 19 1 "f[1]:=floor(sin(x));" "6#>&%\"fG6#\"\"\"-%&floorG6#-% $sinG6#%\"xG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"fG6#\"\"\"-%&floo rG6#-%$sinG6#%\"xG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot( f[1], x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7^p7$$\"\"!F)F(7$$\"3dmmm;arz@!#=F(7$$\"3ZLL$e9ui2%F-F( 7$$\"3nmmm\"z_\"4iF-F(7$$\"39ommT&phN)F-F(7$$\"3JLLe*=)H\\5!#LLL$Q*o]RF:Fbo7$$\"3l++D\"=lj;%F:Fbo7$$\"3R++vV&RY2aF:Fbo7$$\"3Znm;zXu9cF:Fbo7$$\"34+++] y))GeF:Fbo7$$\"3H++]i_QQgF:Fbo7$$\"3U+](=-N(RhF:Fbo7$$\"3a++D\"y%3TiF: Fbo7$$\"3HDcwM7:biF:Fbo7$$\"3.]7G)o<#piF:Fbo7$$\"3Si!R]\"4DwiF:Fbo7$$ \"3xuozTTG$G'F:F(7$$\"39(oa&otJ!H'F:F(7$$\"3S+DJ&f]tH'F:F(7$$\"3y]PM-N [DjF:F(7$$\"3F+]P4kh`jF:F(7$$\"39+vVBA))4kF:F(7$$\"3+++]P![hY'F:F(7$$ \"3JmmT5FEnlF:F(7$$\"3iKLL$Qx$omF:F(7$$\"3Y+++v.I%)oF:F(7$$\"3?mm\"zpe *zqF:F(7$$\"3;,++D\\'QH(F:F(7$$\"3%HL$e9S8&\\(F:F(7$$\"3s++D1#=bq(F:F( 7$$\"3\"HLL$3s?6zF:F(7$$\"3a***\\7`Wl7)F:F(7$$\"3enmmm*RRL)F:F(7$$\"3$ zmmTvJga)F:F(7$$\"3]MLe9tOc()F:F(7$$\"31,++]Qk\\*)F:F(7$$\"3zML$3dg6<* F:F(7$$\"3K,+voTAq#*F:F(7$$\"3%ymmmw(Gp$*F:F(7$$\"3Q%e*)4Q$p&R*F:F(7$$ \"3%4]7`**)4A%*F:F(7$$\"3_IK*))R+(G%*F:Fbo7$$\"3LeRZ-=IN%*F:Fbo7$$\"3 \"zoag?.>W*F:Fbo7$$\"3\\ " 0 "" {MPLTEXT 1 0 19 "int(f[1], x=0..10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$intG6$-%&floorG6#-%$sinG6#%\"xG/F,;\"\"!\"#5" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 30 "Can't find the antiderivative." }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$!+$p9or$!\"*" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 23 "Here's the plot of sin:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "plot(sin(x),x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7bp7$$\"\"!F)F(7$$\"3GLLL3x&)*3\"!#=$\"3r-w #GX,x3\"F-7$$\"3dmmm;arz@F-$\"3#omk:3'\\i@F-7$$\"3u***\\7y%*z7$F-$\"3Z 5PuXZBxIF-7$$\"3ZLL$e9ui2%F-$\"3X%>(=1EKkRF-7$$\"3nmmm\"z_\"4iF-$\"3!e t=0V)zc;***F-7$$\"3$om;zR'ok;FL$\"3xv)3Dkbf&**F-7$$\"3NLL 3_(>/x\"FL$\"3dE_%>A89!)*F-7$$\"33++D1J:w=FL$\"3EcBEMvRP&*F-7$$\"3+n;H dG\"\\)>FL$\"3IhFB$p@Z:*F-7$$\"3oLLL3En$4#FL$\"3(4J8vCkQm)F-7$$\"3\"pm mT!RE&G#FL$\"3A'y&=(*>UavF-7$$\"3D+++D.&4]#FL$\"3[Ywmr_5xfF-7$$\"3?+++ ]jB4EFL$\"3I(*3>8(\\c2&F-7$$\"3;+++vB__d.-P@F-7$$\"3p L$eky#*4-$FL$\"3$yDI)*QxI?\"F-7$$\"3&om;z*ev:JFL$\"3Wz2mE\")Q$e#!#>7$$ \"3=+]7.%Q%GKFL$!340zC#HiOn)Fhs7$$\"3_LLL347TLFL$!3*31o%p'p?)>F-7$$\"3 #QLL3xxlV$FL$!3K.=Q-hD2HF-7$$\"3nLLLLY.KNFL$!3:ewW!prf!QF-7$$\"33++D\" o7Tv$FL$!3ku9$eu6$\\dF-7$$\"3>LLL$Q*o]RFL$!3)>plbvSmB(F-7$$\"3l++D\"=l j;%FL$!3ivrBn3'fa)F-7$$\"3R++vV&R4hG(*F-7$$\"3BML$e9Ege%FL$!31\"HW$[$o-#**F-7$$\"3gL3FW;ANYFL $!39FK4$yS-(**F-7$$\"3'QL3F9UV&f@v**F-7$$\"3.+](=7O*))[FL $!3t'*RX0*fX%)*F-7$$\"3emm;/T1&*\\FL$!3\">JC$[r7.'*F-7$$\"3Vm;/^7I0^FL $!3yAnMw#zzB*F-7$$\"3=nm\"zRQb@&FL$!3d`.(*3Iog()F-7$$\"3:++v=>Y2aFL$!3 Ys&>3\"*p+o(F-7$$\"3Znm;zXu9cFL$!3[e$[XTIw>'F-7$$\"3yLLe9i\"=s&FL$!3-O kE/nXB`F-7$$\"34+++]y))GeFL$!3]kkp&Q6$)Q%F-7$$\"3k++DcljLfFL$!3@f)\\\\ \")QZU$F-7$$\"3H++]i_QQgFL$!3S^C@eLiBCF-7$$\"3U+](=-N(RhFL$!3ag=t\\!)e H9F-7$$\"3a++D\"y%3TiFL$!3:Bva:!4)3UFhs7$$\"3F+]P4kh`jFL$\"3!R40^s)GPq Fhs7$$\"3+++]P![hY'FL$\"3XJ%4'pkV>=F-7$$\"3JmmT5FEnlFL$\"3+L>G5&>F!GF- 7$$\"3iKLL$Qx$omFL$\"3CT&opXrtv$F-7$$\"3Y+++v.I%)oFL$\"3Wf1etUibcF-7$$ \"3?mm\"zpe*zqFL$\"3\\yt\"GgV5:(F-7$$\"3;,++D\\'QH(FL$\"3#39p/6J>Z)F-7 $$\"3%HL$e9S8&\\(FL$\"3(*e%p:c@IO*F-7$$\"3%om;/6E.g(FL$\"3G#GQ,f:+o*F- 7$$\"3s++D1#=bq(FL$\"3mi/mI`***))*F-7$$\"3xL3xc/%pv(FL$\"3,&*Q\"z)>&H& **F-7$$\"3#om\"H2FO3yFL$\"36Rn1sjf*)**F-7$$\"3&)*\\7y&\\yfyFL$\"33dZj2 ;$)****F-7$$\"3\"HLL$3s?6zFL$\"34k:3O1j$)**F-7$$\"3!*)\\i!R:/lzFL$\"3] =Q%4&=RQ**F-7$$\"3yl;zpe()=!)FL$\"3)p4G%=sNk)*F-7$$\"3lK3_+-rs!)FL$\"3 %H5#4\\7uh(*F-7$$\"3a***\\7`Wl7)FL$\"3Ntx1m7%3j*F-7$$\"3cL$e*[ACI#)FL$ \"3K&3#QS:X+$*F-7$$\"3enmmm*RRL)FL$\"35TM/J;9q))F-7$$\"3$zmmTvJga)FL$ \"3%zM2T<%R*p(F-7$$\"3]MLe9tOc()FL$\"3C>j(GL%R(>'F-7$$\"3no;H#e0I&))FL $\"3vKvTvOB6aF-7$$\"31,++]Qk\\*)FL$\"3#*>#pz1xXd%F-7$$\"3#)omT5ASg!*FL $\"3\">%*p`)4mjNF-7$$\"3zML$3dg6<*FL$\"3A!Q?&pE24DF-7$$\"3K,+voTAq#*FL $\"3ee82`ARR:F-7$$\"3%ymmmw(Gp$*FL$\"3]#p#QF@ " 0 "" {MPLTEXT 1 0 40 "-1*(3*Pi/2-Pi /2) -1*(10-3*Pi); evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&%#PiG \"\"#\"#5!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+#p9or$!\"*" }}} {EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "f[2]:=floor(x^2);" "6#>&%\"fG6 #\"\"#-%&floorG6#*$%\"xGF'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"fG6 #\"\"#-%&floorG6#*$)%\"xGF'\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(f[2], x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7[p7$$\"\"!F)F(7$$\"3dmmm;arz@! #=F(7$$\"3ZLL$e9ui2%F-F(7$$\"3nmmm\"z_\"4iF-F(7$$\"3Tnmmm6m#G(F-F(7$$ \"39ommT&phN)F-F(7$$\"37M$3-js.*))F-F(7$$\"3A,+v=ddC%*F-F(7$$\"3wM3-js n\"p*F-F(7$$\"3?n;H2)y(e**F-F(7$$\"3hPfL>ab-5!#<$\"\"\"F)7$$\"3S3F%z&H B45FIFJ7$$\"3=z%\\l\\5f,\"FIFJ7$$\"3'*\\i:N!)eA5FIFJ7$$\"3v\"zpB6Vf.\" FIFJ7$$\"3JLLe*=)H\\5FIFJ7$$\"3,++v=JN[6FIFJ7$$\"3rmm\"z/3uC\"FIFJ7$$ \"31++vo3p)H\"FIFJ7$$\"3TLLe*ot*\\8FIFJ7$$\"33++++^hv8FIFJ7$$\"3xmmT5l D,9FIFJ7$$\"3KL3-jom29FIFJ7$$\"35+]i:s299FIFJ7$$\"3)o;H#ov[?9FI$\"\"#F )7$$\"3WLL$3#z*oU\"FIF`p7$$\"3cm;/E'=(R9FIF`p7$$\"3*)***\\7LRDX\"FIF`p 7$$\"3[LLekGhe:FIF`p7$$\"3$om;zR'ok;FIF`p7$$\"3YL$ekt>6p\"FIF`p7$$\"34 +++vIb</x\"FIF`r7$$\"3hmm;HkGB=FIF`r7$$\"33++D1J:w=FIF`r7$$\"3oLLL3En$4#FI$ \"\"%F)7$$\"3\"pmmT!RE&G#FI$\"\"&F)7$$\"3D+++D.&4]#FI$\"\"'F)7$$\"3;++ +vB_LLL$Q*o]RFI$\"#:F)7$$\"3l++D\"=lj;%FI$\"#F)7$$\"3BML$e9Ege%FI$\"#@F)7$$\"3]LLeR\"3Gy%FI$\"#AF)7$$\"3emm;/ T1&*\\FI$\"#CF)7$$\"3=nm\"zRQb@&FI$\"#FF)7$$\"3:++v=>Y2aFI$\"#HF)7$$\" 3Znm;zXu9cFI$\"#JF)7$$\"34+++]y))GeFI$\"#LF)7$$\"3H++]i_QQgFI$\"#OF)7$ $\"3a++D\"y%3TiFI$\"#QF)7$$\"3+++]P![hY'FI$\"#TF)7$$\"3iKLL$Qx$omFI$\" #WF)7$$\"3Y+++v.I%)oFI$\"#ZF)7$$\"3?mm\"zpe*zqFI$\"#]F)7$$\"3;,++D\\'Q H(FI$\"#`F)7$$\"3%HL$e9S8&\\(FI$\"#cF)7$$\"3s++D1#=bq(FI$\"#fF)7$$\"3 \"HLL$3s?6zFI$\"#iF)7$$\"3a***\\7`Wl7)FI$\"#mF)7$$\"3enmmm*RRL)FI$\"#p F)7$$\"3$zmmTvJga)FI$\"#tF)7$$\"3]MLe9tOc()FI$\"#wF)7$$\"31,++]Qk\\*)F I$\"#!)F)7$$\"3zML$3dg6<*FI$\"#%)F)7$$\"3%ymmmw(Gp$*FI$\"#()F)7$$\"3B+ +D\"oK0e*FI$\"#\"*F)7$$\"35,+v=5s#y*FI$\"#&*F)7$$\"#5F)$\"$+\"F)-%'COL OURG6&%$RGBG$Fa_l!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F^`l-%%VIEWG6$;F(F` _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 19 "int(f[2], x=0. .10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$intG6$-%&floorG6#*$)%\"xG \"\"#\"\"\"/F+;\"\"!\"#5" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 45 "again , can't find an analytic antiderivative." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+H0P&G $!\"(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 18 "Correct should be " }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "int(x^2, x=1..10); " }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"$L$" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "f[3]:=x-floor(x);" "6#>&%\"fG6#\"\"$,&%\"xG\"\"\"-%&flo orG6#F)!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"fG6#\"\"$,&%\"xG \"\"\"-%&floorG6#F)!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(f[3], x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7[z7$$\"\"!F)F(7$$\"3VmmmT&)G\\a!#>F+7$$\"3 GLLL3x&)*3\"!#=F/7$$\"3$*****\\ilyM;F1F37$$\"3dmmm;arz@F1F67$$\"3u*** \\7y%*z7$F1F97$$\"3ZLL$e9ui2%F1F<7$$\"3\"pm\"H2Q\\4YF1F?7$$\"3z***\\(o MrU^F1FB7$$\"3nK$3-8Lfn&F1FE7$$\"3nmmm\"z_\"4iF1FH7$$\"3/nm;zp!fu'F1FK 7$$\"3Tnmmm6m#G(F1FN7$$\"3ynm;a`T>yF1FQ7$$\"39ommT&phN)F1FT7$$\"37M$3- js.*))F1FW7$$\"3A,+v=ddC%*F1FZ7$$\"3wM3-jsn\"p*F1Fgn7$$\"3?n;H2)y(e**F 1Fjn7$$\"3hPfL>ab-5!#<$\"3G9w$fL>ab#!#?7$$\"3S3F%z&HB45F_o$\"3U(R3F%z& HB*Fbo7$$\"3=z%\\l\\5f,\"F_o$\"31=z%\\l\\5f\"F-7$$\"3'*\\i:N!)eA5F_o$ \"3P'*\\i:N!)eAF-7$$\"3v\"zpB6Vf.\"F_o$\"3Av\"zpB6Vf$F-7$$\"3JLLe*=)H \\5F_o$\"3%=LL$e*=)H\\F-7$$\"3wmm;ac#))4\"F_o$\"3lxmm;ac#))*F-7$$\"3,+ +v=JN[6F_o$\"38++](=JN[\"F17$$\"3CLLL$e!)y>\"F_o$\"3[KLLLe!)y>F17$$\"3 rmm\"z/3uC\"F_o$\"31nm;z/3uCF17$$\"31++vo3p)H\"F_o$\"3f++](o3p)HF17$$ \"3TLLe*ot*\\8F_o$\"37ML$e*ot*\\$F17$$\"3xmmT5lD,9F_o$\"3nnm;/^c7SF17$ $\"3*)***\\7LRDX\"F_o$\"3**)***\\7LRDXF17$$\"3!om;z4wb]\"F_o$\"3+om;z4 wb]F17$$\"3[LLekGhe:F_o$\"3zML$ekGhe&F17$$\"3;++DJ'\\;h\"F_o$\"3e,+]7j \\;hF17$$\"3$om;zR'ok;F_o$\"3Qom;zR'ok'F17$$\"34+++vIb</x\"F_o$\"3`LL$3_(>/xF17$$\"3hmm;HkGB=F_o$\"36mmm\"H kGB)F17$$\"33++D1J:w=F_o$\"3\"4++D1J:w)F17$$\"3VL3x\")H`I>F_o$\"3MM$3x \")H`I*F17$$\"3+n;HdG\"\\)>F_o$\"3**pm\"HdG\"\\)*F17$$\"3?rF_ o$\"3%>rF_o$\"3o^(=h5`I0? F_o$\"3cT\"z>h5`I&Fbo7$$\"3M$3_]z-@,#F_o$\"3sL$3_]z-@\"F-7$$\"3s\"HKRw (pD?F_o$\"3%G,]7Gt#HRF-7$$\"3!p\"H dqE[m?F_o$\"3@!p\"HdqE[mF-7$$\"3oLLL3En$4#F_o$\"3YoLLL3En$*F-7$$\"3^++ Dc#o%*=#F_o$\"3?0+]iDo%*=F17$$\"3\"pmmT!RE&G#F_o$\"3:pmmT!RE&GF17$$\"3 Y+]P4b=RBF_o$\"3q/+v$4b=R$F17$$\"3eLLe9r5$R#F_o$\"3%eLLe9r5$RF17$$\"3p m;z>(GqW#F_o$\"3±z>(GqWF17$$\"3D+++D.&4]#F_o$\"3_-++]K]4]F17$$\"3A+ +]PL4bDF_o$\"3F-++vL$4b&F17$$\"3?+++]jB4EF_o$\"3/-+++NO#4'F17$$\"3<++] i$zLm#F_o$\"3!=++]i$zLmF17$$\"3;+++vB_*ppFF_o$\"3/)*******>*pp(F17$$\"3!******\\-w=#GF_o$\"3**)*****\\-w =#)F17$$\"3)*******\\G0uGF_o$\"3#********\\G0u)F17$$\"33+++v'Hi#HF_o$ \"3&3+++v'Hi#*F17$$\"3q$ekGX?*\\HF_o$\"33PekGX?*\\*F17$$\"3*o;H2B6O(HF _o$\"3))o;H2B6O(*F17$$\"3De9m>mX&)HF_o$\"3b#e9m>mX&)*F17$$\"31]Pf3?I(* HF_o$\"3m+v$f3?I(**F17$$\"3(f*)fIqCK+$F_o$\"3]sf*)fIqCKFbo7$$\"3)=/EvR Z\"4IF_o$\"3Gy=/EvRZ\"*Fbo7$$\"3y(=#*>4q],$F_o$\"3Ty(=#*>4q]\"F-7$$\"3 pL$eky#*4-$F_o$\"3)*oL$eky#*4#F-7$$\"3/+v=UVPoIF_o$\"3z/+v=UVPoF-7$$\" 3&om;z*ev:JF_o$\"3]om;z*ev:\"F17$$\"3^L3_]r4sJF_o$\"3>N$3_]r4s\"F17$$ \"3=+]7.%Q%GKF_o$\"3*=+]7.%Q%G#F17$$\"3'o;HdlzZG$F_o$\"3eo;HdlzZGF17$$ \"3_LLL347TLF_o$\"3GNLL$347T$F17$$\"3#QLL3xxlV$F_o$\"3AQLL3xxlVF17$$\" 3nLLLLY.KNF_o$\"3tOLLLjM?`F17$$\"3;+DJXTb(e$F_o$\"3k,]7`9aveF17$$\"3mm ;HdO2VOF_o$\"3cmm\"HdO2V'F17$$\"3eL3FpJf)p$F_o$\"3\"fL3FpJf)pF17$$\"33 ++D\"o7Tv$F_o$\"3$3++D\"o7TvF17$$\"3jm;HK5S_QF_o$\"3Qmm\"HK5S_)F17$$\" 3>LLL$Q*o]RF_o$\"3$>LLL$Q*o]*F17$$\"3)[7.27pT'RF_o$\"3#)[7.27pT'*F17$$ \"3-6`U%F_o$\"3eQ$3F% >6`UF17$$\"3Kn;zWG))yWF_o$\"3+&F_o$ \"3,lXNYe#R&>Fbo7$$\"3nTg_ZP%)3]F_o$\"3en;/EvuV))Fbo7$$\"3xGd?pNt:]F_o $\"3-xGd?pNt:F-7$$\"3(eT&)3RBE-&F_o$\"3F(eT&)3RBE#F-7$$\"3'4zWU..k.&F_ o$\"3h'4zWU..k$F-7$$\"31mTgxE=]]F_o$\"3%fg;/wn#=]F-7$$\"3C;HKk>ux]F_o$ \"3hC;HKk>uxF-7$$\"3Vm;/^7I0^F_o$\"3KkmT5D,`5F17$$\"3!o;zW#)>/;&F_o$\" 31o;zW#)>/;F17$$\"3=nm\"zRQb@&F_o$\"3zrm;zRQb@F17$$\"3mLLLe,]6`F_o$\"3 mOLL$e,]6$F17$$\"3:++v=>Y2aF_o$\"3^,+](=>Y2%F17$$\"3vmT&Qe#GfaF_o$\"3e n;aQe#Gf%F17$$\"3PL$e*[K56bF_o$\"3nLLe*[K56&F17$$\"3(**\\iS\"R#Hc&F_o$ \"3u**\\iS\"R#HcF17$$\"3Znm;zXu9cF_o$\"3rumm\"zXu9'F17$$\"3i+](oR!GocF _o$\"3E1+voR!Go'F17$$\"3yLLe9i\"=s&F_o$\"3#yLLe9i\"=sF17$$\"3$pm\"HK?N vdF_o$\"3Opm\"HK?Nv(F17$$\"34+++]y))GeF_o$\"3#4+++]y))G)F17$$\"3!3+DJ? i7)eF_o$\"343+DJ?i7))F17$$\"3k++DcljLfF_o$\"3Q1+]ibOO$*F17$$\"3b+D\"Gt B)ffF_o$\"3]0]7GtB)f*F17$$\"3Z+]P44,')fF_o$\"3m/+v$44,')*F17$$\"3)ei:N qdD*fF_o$\"3))ei:NqdD**F17$$\"3U]il(\\/\"**fF_o$\"3A/Dcw\\/\"***F17$$ \"3'\\(oz\"H^c+'F_o$\"3ld\\(oz\"H^cFbo7$$\"3Q+v$f3)>7gF_o$\"3.Q+v$f3)> 7F-7$$\"3M](=Un\"HDgF_o$\"3uL](=Un\"HDF-7$$\"3H++]i_QQgF_o$\"3YH++]i_Q QF-7$$\"3!3](=U,1*3'F_o$\"3:!3](=U,1*)F-7$$\"3U+](=-N(RhF_o$\"3?/+v=-N (R\"F17$$\"3-+Dc,*4/>'F_o$\"3R+]i:!*4/>F17$$\"3a++D\"y%3TiF_o$\"3Y0+]7 y%3T#F17$$\"3S+DJ&f]tH'F_o$\"34/]7`f]tHF17$$\"3F+]P4kh`jF_o$\"3u-+v$4k h`$F17$$\"39+vVBA))4kF_o$\"3O,]PMA#))4%F17$$\"3+++]P![hY'F_o$\"3++++v. [hYF17$$\"3rK$eRP0n^'F_o$\"39FLeRP0n^F17$$\"3JmmT5FEnlF_o$\"3:jm;/risc F17$$\"3#***\\(o/?yh'F_o$\"3;***\\(o/?yhF17$$\"3iKLL$Qx$omF_o$\"3IELLL Qx$o'F17$$\"39***\\78eBs'F_o$\"3Z\"***\\78eBsF17$$\"3bmm;z)Qjx'F_o$\"3 ]lmm\"z)QjxF17$$\"3'RL$3F'>.$oF_o$\"3bRL$3F'>.$)F17$$\"3Y+++v.I%)oF_o$ \"3r/++]P+V))F17$$\"3Ym\"Hd&\\@LpF_o$\"3ik;Hd&\\@L*F17$$\"3ML$ek`H@)pF _o$\"3TLLek`H@)*F17$$\"3Jz%\\!fQC))pF_o$\"37$z%\\!fQC))*F17$$\"3SC1k\" =eV*pF_o$\"3%RC1k\"=eV**F17$$\"3Pq-](=#=WtF_o $\"3))Q$eR(>#=W$F17$$\"3gm;zp%*\\%R(F_o$\"37mm\"zp%*\\%RF17$$\"3A+v=Un \"[W(F_o$\"3D-](=Un\"[WF17$$\"3%HL$e9S8&\\(F_o$\"3\\HL$e9S8&\\F17$$\"3 W****\\i+tZvF_o$\"3[%****\\i+tZ&F17$$\"3%om;/6E.g(F_o$\"3Oom;/6E.gF17$ $\"3AMLLe@#Hl(F_o$\"3CULL$e@#HlF17$$\"3s++D1#=bq(F_o$\"3B2+]i?=bqF17$$ \"3xL3xc/%pv(F_o$\"3pP$3xc/%pvF17$$\"3#om\"H2FO3yF_o$\"3;om\"H2FO3)F17 $$\"3&)*\\7y&\\yfyF_o$\"3g)*\\7y&\\yf)F17$$\"3\"HLL$3s?6zF_o$\"33HLL$3 s?6*F17$$\"3Y:zptV7QzF_o$\"3ea\"zptV7Q*F17$$\"3!*)\\i!R:/lzF_o$\"3)*)) \\i!R:/l*F17$$\"3i!zW<7+&yzF_o$\"3>1zW<7+&y*F17$$\"3M#3FWqe>*zF_o$\"3Q B3FWqe>**F17$$\"3?G#od*zo)*zF_o$\"3)>G#od*zo)**F17$$\"31u$4rG0Xyl97!)F_o$\"3+.>0Xyl97F-7$$\"3yl;zpe()=!)F_o$ \"3!ydm\"zpe()=F-7$$\"3lK3_+-rs!)F_o$\"3ulK3_+-rsF-7$$\"3a***\\7`Wl7)F _o$\"3O&***\\7`Wl7F17$$\"3llT5!R$Ry\")F_o$\"3gc;/,R$Ry\"F17$$\"3cL$e*[ ACI#)F_o$\"3iNLe*[ACI#F17$$\"3Y,D\"y5\"4#G)F_o$\"3i9]7y5\"4#GF17$$\"3e nmmm*RRL)F_o$\"3(enmmm*RRLF17$$\"3nn;a8H'pQ)F_o$\"3uwmTN\"H'pQF17$$\"3 wnmTge)*R%)F_o$\"3ixm;/'e)*R%F17$$\"3%ym\"H2)3I\\)F_o$\"3]ym\"H2)3I\\F 17$$\"3$zmmTvJga)F_o$\"3PzmmTvJgaF17$$\"3eM3FWch)f)F_o$\"3zX$3FWch)fF1 7$$\"3A,]PM&*>^')F_o$\"3@7+vV`*>^'F17$$\"3'y;zWU$y.()F_o$\"3iy;zWU$y.( F17$$\"3]MLe9tOc()F_o$\"3/XL$e9tOc(F17$$\"3no;H#e0I&))F_o$\"3u'o;H#e0I &)F17$$\"31,++]Qk\\*)F_o$\"3m5+++&Qk\\*F17$$\"3a%3_]k)[j*)F_o$\"3OX3_] k)[j*F17$$\"3,oT5SMLx*)F_o$\"30!oT5SMLx*F17$$\"3u4-jPeD%)*)F_o$\"3S(4- jPeD%)*F17$$\"3[^i:N#y6**)F_o$\"3v9Dc^By6**F17$$\"3?$H#oK15)**)F_o$\"3 4KH#oK15)**F17$$\"3%\\L3-.B]+*F_o$\"3IW\\L3-.B]Fbo7$$\"3)=]7.i7F.*F_o$ \"3L)=]7.i7F$F-7$$\"3#)omT5ASg!*F_o$\"3B#)omT5ASgF-7$$\"3q-]i!R\"y:\"* F_o$\"3+F+D1R\"y:\"F17$$\"3zML$3dg6<*F_o$\"3-[LL3dg6$*F_o$\"3waL3x'fv>$F17$$\"3%ymmmw(Gp$*F_o$\"3[ymmmw(Gp$F17$$\"3%4]7`* *)4A%*F_o$\"3Y4]7`**)4A%F17$$\"3/M$eRA5\\Z*F_o$\"3VSLeRA5\\ZF17$$\"39n Tg_9sF&*F_o$\"3Sr;/EX@x_F17$$\"3B++D\"oK0e*F_o$\"3Q-+]7oK0eF17$$\"3c** \\il(z5j*F_o$\"3n&**\\il(z5jF17$$\"3m+++]oi\"o*F_o$\"3s1+++&oi\"oF17$$ \"3y,]PMR]7.#Q?&=**F_o$\"3$>]7.#Q?&=*F17$$\"3s+voa-oX**F_o$\"3@2](oa-oX *F17$$\"3(oi:5>g#f**F_o$\"3soi:5>g#f*F17$$\"3D^PMF,%G(**F_o$\"3[7vVt7S G(*F17$$\"3W8y]&4I'z**F_o$\"3OM\"y]&4I'z*F17$$\"3iv=nj+U')**F_o$\"3Cc( =nj+U')*F17$$\"3#y$f$=.5K***F_o$\"37y$f$=.5K**F17$$\"#5F)F(-%'COLOURG6 &%$RGBG$Fhco!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fcdo-%%VIEWG6$;F(Fgco%(D EFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curv e 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "int(f[3], x=0..10); evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"&" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"\"&\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 25 "C orrect answer should be:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "10*(1/2)*1*1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "f[4]:=abs(floor(x));" "6#>&%\"fG6#\" \"%-%$absG6#-%&floorG6#%\"xG" }}{PARA 11 "" 1 "" {TEXT -1 0 "" } {XPPMATH 20 "6#>&%\"fG6#\"\"%-%$absG6#-%&floorG6#%\"xG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(f[4], x=0..10);" }}{PARA 13 " " 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7jt7$$\"\"!F)F (7$$\"3dmmm;arz@!#=F(7$$\"3ZLL$e9ui2%F-F(7$$\"3nmmm\"z_\"4iF-F(7$$\"3T nmmm6m#G(F-F(7$$\"39ommT&phN)F-F(7$$\"37M$3-js.*))F-F(7$$\"3A,+v=ddC%* F-F(7$$\"3wM3-jsn\"p*F-F(7$$\"3?n;H2)y(e**F-F(7$$\"3hPfL>ab-5!#<$\"\" \"F)7$$\"3S3F%z&HB45FIFJ7$$\"3=z%\\l\\5f,\"FIFJ7$$\"3'*\\i:N!)eA5FIFJ7 $$\"3v\"zpB6Vf.\"FIFJ7$$\"3JLLe*=)H\\5FIFJ7$$\"3,++v=JN[6FIFJ7$$\"3rmm \"z/3uC\"FIFJ7$$\"3*)***\\7LRDX\"FIFJ7$$\"3$om;zR'ok;FIFJ7$$\"3NLL3_(> /x\"FIFJ7$$\"33++D1J:w=FIFJ7$$\"3VL3x\")H`I>FIFJ7$$\"3+n;HdG\"\\)>FIFJ 7$$\"3?rFIFJ7$$\"3;v=FIFJ7$$\"39z>h5`I0?FI$\"\"#F)7$$ \"3M$3_]z-@,#FIFfp7$$\"3s\"HKRw(pD?FIFfp7$$\"37+D\"Gt#HR?FIFfp7$$\"3!p \"HdqE[m?FIFfp7$$\"3oLLL3En$4#FIFfp7$$\"3^++Dc#o%*=#FIFfp7$$\"3\"pmmT! RE&G#FIFfp7$$\"3D+++D.&4]#FIFfp7$$\"3;+++vB_mX&)HFIFfp7$$\"31]Pf3?I(*HFIFfp7$$\"3(f*)fIqCK+$FI$\"\"$F)7 $$\"3)=/EvRZ\"4IFIFhs7$$\"3y(=#*>4q],$FIFhs7$$\"3pL$eky#*4-$FIFhs7$$\" 3/+v=UVPoIFIFhs7$$\"3&om;z*ev:JFIFhs7$$\"3=+]7.%Q%GKFIFhs7$$\"3_LLL347 TLFIFhs7$$\"3nLLLLY.KNFIFhs7$$\"33++D\"o7Tv$FIFhs7$$\"3jm;HK5S_QFIFhs7 $$\"3>LLL$Q*o]RFIFhs7$$\"3)[7.27pT'RFIFhs7$$\"3-+&FI$\"\"&F)7$$\"3nTg_ZP%)3]FIF`y7$$\"3 xGd?pNt:]FIF`y7$$\"3(eT&)3RBE-&FIF`y7$$\"3'4zWU..k.&FIF`y7$$\"31mTgxE= ]]FIF`y7$$\"3C;HKk>ux]FIF`y7$$\"3Vm;/^7I0^FIF`y7$$\"3!o;zW#)>/;&FIF`y7 $$\"3=nm\"zRQb@&FIF`y7$$\"3mLLLe,]6`FIF`y7$$\"3:++v=>Y2aFIF`y7$$\"3Znm ;zXu9cFIF`y7$$\"3yLLe9i\"=s&FIF`y7$$\"34+++]y))GeFIF`y7$$\"3!3+DJ?i7)e FIF`y7$$\"3k++DcljLfFIF`y7$$\"3b+D\"GtB)ffFIF`y7$$\"3Z+]P44,')fFIF`y7$ $\"3)ei:NqdD*fFIF`y7$$\"3U]il(\\/\"**fFIF`y7$$\"3'\\(oz\"H^c+'FI$\"\"' F)7$$\"3Q+v$f3)>7gFIFa]l7$$\"3M](=Un\"HDgFIFa]l7$$\"3H++]i_QQgFIFa]l7$ $\"3U+](=-N(RhFIFa]l7$$\"3a++D\"y%3TiFIFa]l7$$\"3+++]P![hY'FIFa]l7$$\" 3iKLL$Qx$omFIFa]l7$$\"3bmm;z)Qjx'FIFa]l7$$\"3Y+++v.I%)oFIFa]l7$$\"3Ym \"Hd&\\@LpFIFa]l7$$\"3ML$ek`H@)pFIFa]l7$$\"3Jz%\\!fQC))pFIFa]l7$$\"3SC 1k\"=eV*pFIFa]l7$$\"3Pq*zFIF]`l7$$\"3?G#od*zo)*zFIF]`l7$$\"31u$4rG0Xyl97!)FIFbcl7$$\"3yl;zpe()=!)FIFbcl7$$\"3lK3_+-rs!) FIFbcl7$$\"3a***\\7`Wl7)FIFbcl7$$\"3cL$e*[ACI#)FIFbcl7$$\"3enmmm*RRL)F IFbcl7$$\"3$zmmTvJga)FIFbcl7$$\"3]MLe9tOc()FIFbcl7$$\"3no;H#e0I&))FIFb cl7$$\"31,++]Qk\\*)FIFbcl7$$\"3a%3_]k)[j*)FIFbcl7$$\"3,oT5SMLx*)FIFbcl 7$$\"3u4-jPeD%)*)FIFbcl7$$\"3[^i:N#y6**)FIFbcl7$$\"3?$H#oK15)**)FIFbcl 7$$\"3%\\L3-.B]+*FI$\"\"*F)7$$\"3)=]7.i7F.*FIFdfl7$$\"3#)omT5ASg!*FIFd fl7$$\"3q-]i!R\"y:\"*FIFdfl7$$\"3zML$3dg6<*FIFdfl7$$\"3K,+voTAq#*FIFdf l7$$\"3%ymmmw(Gp$*FIFdfl7$$\"3B++D\"oK0e*FIFdfl7$$\"3m+++]oi\"o*FIFdfl 7$$\"35,+v=5s#y*FIFdfl7$$\"3Q+D1k2/P)*FIFdfl7$$\"3W,]P40O\"*)*FIFdfl7$ $\"3>]7.#Q?&=**FIFdfl7$$\"3s+voa-oX**FIFdfl7$$\"3(oi:5>g#f**FIFdfl7$$ \"3D^PMF,%G(**FIFdfl7$$\"3W8y]&4I'z**FIFdfl7$$\"3iv=nj+U')**FIFdfl7$$ \"3#y$f$=.5K***FIFdfl7$$\"#5F)F]jl-%'COLOURG6&%$RGBG$F^jl!\"\"F(F(-%+A XESLABELSG6$Q\"x6\"Q!Fijl-%%VIEWG6$;F(F]jl%(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 18 "int(f[4],x=0..10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$intG6$-%$absG6#-%&floorG6#%\"xG/F,;\"\"!\"#5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"+++++X!\")" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 24 "Correct answer should be" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "add(i*1, i=0..9);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#X" }}}{PARA 257 "" 1 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "f[5]:=floor(abs(x));" "6#>&%\"fG6#\" \"&-%&floorG6#-%$absG6#%\"xG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"f G6#\"\"&-%&floorG6#-%$absG6#%\"xG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(f[5], x=0..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7jt7$$\"\"!F)F(7$$\"3dmmm;arz@! #=F(7$$\"3ZLL$e9ui2%F-F(7$$\"3nmmm\"z_\"4iF-F(7$$\"3Tnmmm6m#G(F-F(7$$ \"39ommT&phN)F-F(7$$\"37M$3-js.*))F-F(7$$\"3A,+v=ddC%*F-F(7$$\"3wM3-js n\"p*F-F(7$$\"3?n;H2)y(e**F-F(7$$\"3hPfL>ab-5!#<$\"\"\"F)7$$\"3S3F%z&H B45FIFJ7$$\"3=z%\\l\\5f,\"FIFJ7$$\"3'*\\i:N!)eA5FIFJ7$$\"3v\"zpB6Vf.\" FIFJ7$$\"3JLLe*=)H\\5FIFJ7$$\"3,++v=JN[6FIFJ7$$\"3rmm\"z/3uC\"FIFJ7$$ \"3*)***\\7LRDX\"FIFJ7$$\"3$om;zR'ok;FIFJ7$$\"3NLL3_(>/x\"FIFJ7$$\"33+ +D1J:w=FIFJ7$$\"3VL3x\")H`I>FIFJ7$$\"3+n;HdG\"\\)>FIFJ7$$\"3?rFIFJ7$$\"3;v=FIFJ7$$\"39z>h5`I0?FI$\"\"#F)7$$\"3M$3_]z-@,#FIFf p7$$\"3s\"HKRw(pD?FIFfp7$$\"37+D\"Gt#HR?FIFfp7$$\"3!p\"HdqE[m?FIFfp7$$ \"3oLLL3En$4#FIFfp7$$\"3^++Dc#o%*=#FIFfp7$$\"3\"pmmT!RE&G#FIFfp7$$\"3D +++D.&4]#FIFfp7$$\"3;+++vB_mX&)HF IFfp7$$\"31]Pf3?I(*HFIFfp7$$\"3(f*)fIqCK+$FI$\"\"$F)7$$\"3)=/EvRZ\"4IF IFhs7$$\"3y(=#*>4q],$FIFhs7$$\"3pL$eky#*4-$FIFhs7$$\"3/+v=UVPoIFIFhs7$ $\"3&om;z*ev:JFIFhs7$$\"3=+]7.%Q%GKFIFhs7$$\"3_LLL347TLFIFhs7$$\"3nLLL LY.KNFIFhs7$$\"33++D\"o7Tv$FIFhs7$$\"3jm;HK5S_QFIFhs7$$\"3>LLL$Q*o]RFI Fhs7$$\"3)[7.27pT'RFIFhs7$$\"3-+&FI$\"\"&F)7$$\"3nTg_ZP%)3]FIF`y7$$\"3xGd?pNt:]FIF`y7$ $\"3(eT&)3RBE-&FIF`y7$$\"3'4zWU..k.&FIF`y7$$\"31mTgxE=]]FIF`y7$$\"3C;H Kk>ux]FIF`y7$$\"3Vm;/^7I0^FIF`y7$$\"3!o;zW#)>/;&FIF`y7$$\"3=nm\"zRQb@& FIF`y7$$\"3mLLLe,]6`FIF`y7$$\"3:++v=>Y2aFIF`y7$$\"3Znm;zXu9cFIF`y7$$\" 3yLLe9i\"=s&FIF`y7$$\"34+++]y))GeFIF`y7$$\"3!3+DJ?i7)eFIF`y7$$\"3k++Dc ljLfFIF`y7$$\"3b+D\"GtB)ffFIF`y7$$\"3Z+]P44,')fFIF`y7$$\"3)ei:NqdD*fFI F`y7$$\"3U]il(\\/\"**fFIF`y7$$\"3'\\(oz\"H^c+'FI$\"\"'F)7$$\"3Q+v$f3)> 7gFIFa]l7$$\"3M](=Un\"HDgFIFa]l7$$\"3H++]i_QQgFIFa]l7$$\"3U+](=-N(RhFI Fa]l7$$\"3a++D\"y%3TiFIFa]l7$$\"3+++]P![hY'FIFa]l7$$\"3iKLL$Qx$omFIFa] l7$$\"3bmm;z)Qjx'FIFa]l7$$\"3Y+++v.I%)oFIFa]l7$$\"3Ym\"Hd&\\@LpFIFa]l7 $$\"3ML$ek`H@)pFIFa]l7$$\"3Jz%\\!fQC))pFIFa]l7$$\"3SC1k\"=eV*pFIFa]l7$ $\"3Pq*zFIF]`l7$$\"3?G#od*zo)*zFIF]`l7$$\"31u$4rG0Xyl97!)FIFbcl7$$\"3yl;zpe()=!)FIFbcl7$$\"3lK3_+-rs!)FIFbcl7$$\"3a*** \\7`Wl7)FIFbcl7$$\"3cL$e*[ACI#)FIFbcl7$$\"3enmmm*RRL)FIFbcl7$$\"3$zmmT vJga)FIFbcl7$$\"3]MLe9tOc()FIFbcl7$$\"3no;H#e0I&))FIFbcl7$$\"31,++]Qk \\*)FIFbcl7$$\"3a%3_]k)[j*)FIFbcl7$$\"3,oT5SMLx*)FIFbcl7$$\"3u4-jPeD%) *)FIFbcl7$$\"3[^i:N#y6**)FIFbcl7$$\"3?$H#oK15)**)FIFbcl7$$\"3%\\L3-.B] +*FI$\"\"*F)7$$\"3)=]7.i7F.*FIFdfl7$$\"3#)omT5ASg!*FIFdfl7$$\"3q-]i!R \"y:\"*FIFdfl7$$\"3zML$3dg6<*FIFdfl7$$\"3K,+voTAq#*FIFdfl7$$\"3%ymmmw( Gp$*FIFdfl7$$\"3B++D\"oK0e*FIFdfl7$$\"3m+++]oi\"o*FIFdfl7$$\"35,+v=5s# y*FIFdfl7$$\"3Q+D1k2/P)*FIFdfl7$$\"3W,]P40O\"*)*FIFdfl7$$\"3>]7.#Q?&=* *FIFdfl7$$\"3s+voa-oX**FIFdfl7$$\"3(oi:5>g#f**FIFdfl7$$\"3D^PMF,%G(**F IFdfl7$$\"3W8y]&4I'z**FIFdfl7$$\"3iv=nj+U')**FIFdfl7$$\"3#y$f$=.5K***F IFdfl7$$\"#5F)F]jl-%'COLOURG6&%$RGBG$F^jl!\"\"F(F(-%+AXESLABELSG6$Q\"x 6\"Q!Fijl-%%VIEWG6$;F(F]jl%(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 "" {TEXT -1 54 "Really the same as the last function on this interval." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "int(f[4], x=0..10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$intG6$-%$absG6#-%&floorG6#%\"xG/F,;\"\"!\"#5" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++X!\")" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }} {PARA 0 "" 0 "" {TEXT -1 286 "The moral of this story is \"When workin g with piecewise defined functions, be very careful to check the valid ity of the MAPLE results.\" We saw other examples in exercise number \+ 5 where MAPLE had trouble with piecewise defined functions and floor i s defined with infinitely many pieces." }}{PARA 0 "" 0 "" {TEXT -1 0 " " }}{PARA 0 "" 0 "" {TEXT -1 80 "Suppose we want to find the area of t he finite regions bounded by f and g below." }}{EXCHG {PARA 0 "> " 0 " " {XPPEDIT 19 1 "f:=x*exp(-.5*x);g:=-x^3+4*x^2-3*x;" "6#C$>%\"fG*&%\"x G\"\"\"-%$expG6#,$*&-%&FloatG6$\"\"&!\"\"F(F'F(F2F(>%\"gG,(*$F'\"\"$F2 *&\"\"%F(*$F'\"\"#F(F(*&F7F(F'F(F2" }{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG*&%\"xG\"\"\"-%$ expG6#,$F&$!\"&!\"\"F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG,(*$)% \"xG\"\"$\"\"\"!\"\"*&\"\"%F*)F(\"\"#F*F**&F)F*F(F*F+" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{PARA 0 "" 0 "" {TEXT -1 70 "Ploting \+ their graphs on the same axes shows the regions in question. " }} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "plot(\{f,g\},x=-1..4,y=-2..3 );" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-%'CURVESG 6$7U7$$!\"\"\"\"!$\"\")F*7$$!3Fnmm\"HU,\"*)!#=$\"3Wni9u*\\gb'!#<7$$!3) HL$3FH'='zF0$\"3P]b\">'=#*GaF37$$!35mm;/OU&*oF0$\"3E(e,``d$)H%F37$$!3P lm;H_\">#eF0$\"3w$[^%)\\%p*H$F37$$!3SLL3_!4Nv%F0$\"3nRsU'!#>$\"3X$oa**ReM,#F07$$\"3B %ommTIOo%FZ$!3z$Q'4p4P=8F07$$\"3eML$3_>jU\"F0$!3/#=ilZ?U\\$F07$$\"3E,+ +D;v/DF0$!3su(Hz@&)=;&F07$$\"3x+++v=h(e$F0$!3)zI@547i2'F07$$\"3U+++v$[ 6j%F0$!3#3p'o(>)p2jF07$$\"3DMLe*[z(ybF0$!314TsJv\\BgF07$$\"3knmmTXg0nF 0$!3:GI#*oY%f9&F07$$\"3OommmJ+](=xpe=\"F3$\"3+dQ-lwl)*RF07$$\"37nm\"H28IH\"F 3$\"38