{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*4Fp#oDnkF07$$\"3um;zpSS\"R\"F3$\"3/%fo1*HVg()F07$$\"3GLL3_?`(\\ \"F3$\"3rMd$o3W%>6F37$$\"3fL$e*)>pxg\"F3$\"3VStZW>Ug8F37$$\"33+]Pf4t.< F3$\"32O\\f(Q&=a:F37$$\"3uLLe*Gst!=F3$\"3Ijg*[&*3.u\"F37$$\"3/+++DRW9> F3$\"3w6(4!)\\I/!>F37$$\"39++DJE>>?F3$\"3MA&>t%)[%=?F37$$\"3F+]i!RU07# F3$\"3i?xS<*H(*3#F37$$\"3+++v=S2LAF3$\"3OCcFEcw6@F37$$\"3Jmmm\"p)=MBF3 $\"3uNdkR;]t?F37$$\"3B++](=]@W#F3$\"3'z:#Gpwrk>F37$$\"35L$e*[$z*RDF3$ \"3)))y&>>!y$*z\"F37$$\"3e++]iC$pk#F3$\"3&H=!*R-M\"R:F37$$\"3Zm;H2qcZF F3$\"3I6lL<:277F37$$\"3O+]7.\"fF&GF3$\"3#=BZ\"z8Q#y(F07$$\"3Xmm;/OgbHF 3$\"32)[aD#o5mDF07$$\"3w**\\ilAFjIF3$!3Af)Qj%z.**RF07$$\"3yLLL$)*pp;$F 3$!3;%f=(G(pe9\"F37$$\"3(RL$3xe,tKF3$!3X-QJvN8J?F37$$\"3Cn;HdO=yLF3$!3 C7RG__IQIF37$$\"3`+++D>#[Z$F3$!3I=+(zBiK3%F37$$\"3RnmT&G!e&e$F3$!31$3K l/,)GaF37$$\"3\"RLLL)Qk%o$F3$!3eS!oRinCx'F37$$\"37+]iSjE!z$F3$!3X$pmqK SxN)F37$$\"3L+++DM\"3%QF3$!3KYJEaT9u\"*F37$$\"3a+]P40O\"*QF3$!3=R'p8*4\"Fjz7$$\"\"%F*$!#7F*-%'COLOURG6 &%$RGBG$\"#5F)$F*F*F[\\l-F$6$7U7$F($!3>G,qq7s[;F37$$!3jLL$e9r]X*F0$!33 (3]5Bxp^\"F37$F.$!3'***>^\\U7\"R\"F37$$!3d**\\P4E+O%)F0$!35p#zL[SiG\"F 37$F5$!3'oej\"Hw]&=\"F37$F:$!3lwI$[-TSt*F07$F?$!3^+i*R'y4*y(F07$FD$!3c \"Q0Imj)GgF07$FI$!3#\\(RZe!Q>a%F07$FN$!3AFBz%G$zQJF07$FS$!3,X&Q&G4@bU\"G8F07$Fbo$ \"3pRR9b/\"*4AF07$Fgo$\"3A.#=F.#[)*HF07$F\\p$\"3$>tG'zn(Qn$F07$Fap$\"3 [:gSlo#3A%F07$Ffp$\"3Qem\"HKIaz%F07$F[q$\"3\"e'z?b'fFA&F07$F`q$\"3l^U( )4@)ol&F07$Feq$\"3D/9AeM9*)fF07$Fjq$\"3ySxS')4>-jF07$F_r$\"3W%)*R\\ANV b'F07$Fdr$\"3\"=g^pnUPx'F07$Fir$\"3SeLCh)o#RpF07$F^s$\"3FqJZ`[d#3(F07$ Fcs$\"3O!e)*e5kh>(F07$Fhs$\"3`UZSf(G%osF07$F]t$\"3UA-I*f!>@tF07$Fbt$\" 3xE!)[q;m]tF07$Fgt$\"3BF#)[0ADdtF07$F\\u$\"3Q]F*3>]ZM(F07$Fau$\"3)Qen2 lW8J(F07$Ffu$\"3Q(z'f93jlsF07$F[v$\"3&*Rx,`o@-sF07$F`v$\"3O&=4:&)QJ8(F 07$Fev$\"3q'ez:6Ck/(F07$Fjv$\"3\"R1i>Q$RbpF07$F_w$\"3XV(*HD$o;&oF07$Fd w$\"3*H: )Gu?rjF07$Fhx$\"3/BONy>2RiF07$F]y$\"34(R%Q " 0 "" {MPLTEXT 1 0 12 "fsolve(f-g);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }}}{PARA 0 "" 0 "" {TEXT -1 246 "This yi eld only one of the three points, what about the other two. Looking a t the graphs we see there should be intersection between x=-1 and x=1, between x=1 and x=2, and between x=2 and x=4. We can include bounds \+ on x in the fsolve command. " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "fsolve(f-g,x=-1..1); fsolve(f-g,x=1..2);fsolve(f-g,x=2..4);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+ngG28!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+j\"pI(G!\"* " }}}{PARA 0 "" 0 "" {TEXT -1 83 "Now we have them all. Use these to \+ find the total area of the regions in question." }}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 51 "x2 := fsolve(f-g,x=1..2); x3 := fsolve(f-g,x=2 ..4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#x2G$\"+ngG28!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#x3G$\"+j\"pI(G!\"*" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 36 "int(f-g, x=0..x2)+int(g-f,x=x2..x3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+'4\\1F#!\"*" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 78 "Similarily find the areas of th e regions determined by the curves given below." }}{PARA 0 "" 0 "" {TEXT -1 5 "a) " }{XPPEDIT 18 0 "y=8*x and y=x^4" "6#3/%\"yG*&\"\") \"\"\"%\"xGF(/F%*$F)\"\"%" }{TEXT -1 14 " " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "f:= 8*x; g := x^4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG,$%\"xG\"\")" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG*$)%\"xG\"\"%\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(\{f,g\}, x=0..3);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-%'CURVESG6$7S7$$\"\"!F)F(7$$\"3s******\\i9Rl!#>$\" 3x********pJJ_!#=7$$\"3/++vVA)GA\"F0$\"3M+++]z0$y*F07$$\"3******\\Peui =F0$\"3++++qm>!\\\"!#<7$$\"3A++]i3&o]#F0$\"3=+++!p![0?F;7$$\"3%)***\\( oX*y9$F0$\"3))*****\\l:$=DF;7$$\"3y***\\P9CAu$F0$\"3#)*****\\JzP*HF;7$ $\"3!)***\\P*zhdVF0$\"3&)*****\\R%4'[$F;7$$\"31++v$>fS*\\F0$\"31+++btC &*RF;7$$\"3$)***\\(=$f%GcF0$\"3')*****\\XnF]%F;7$$\"3P+++Dy,\"G'F0$\"3 J+++gU\"[-&F;7$$\"32++]7Xl\"[ *F;7$$\"31+]Pa&4*\\7F;$\"3_+++NkF****F;7$$\"33+]7j=_68F;$\"31++]!\\<# \\5!#;7$$\"33++vVy!eP\"F;$\"32+++vik+6F`r7$$\"34+](=WU[V\"F;$\"33++]`R (y9\"F`r7$$\"3)****\\7B>&)\\\"F;$\"3)******\\Q:))>\"F`r7$$\"3(***\\P>: mk:F;$\"3)*****\\:#HF;$\"3(*******Gb(=b\"F`r7$$ \"3z*****\\@80+#F;$\"3$)*****>d5/g\"F`r7$$\"30++]7,Hl?F;$\"3/+++!4KAl \"F`r7$$\"3')**\\P4w)R7#F;$\"3!*****\\(3!>*p\"F`r7$$\"3;++]x%f\")=#F;$ \"39+++#eF0v\"F`r7$$\"3!)**\\P/-a[AF;$\"3%)****\\j@$))z\"F`r7$$\"3/+]( =Yb;J#F;$\"3.++]pVK\\=F`r7$$\"3')****\\i@OtBF;$\"3!*******H(*o)*=F`r7$ $\"3')**\\PfL'zV#F;$\"3*)****\\(oq.&>F`r7$$\"3>+++!*>=+DF;$\"3:+++#fX, +#F`r7$$\"3-++DE&4Qc#F;$\"3-+++@w/^?F`r7$$\"3=+]P%>5pi#F;$\"39++]b\"G: 5#F`r7$$\"38+++bJ*[o#F;$\"36+++CX\"z9#F`r7$$\"33++Dr\"[8v#F;$\"32+++P& y5?#F`r7$$\"3++++Ijy5GF;$\"3++++k!H'[AF`r7$$\"31+]P/)fT(GF;$\"31++]VyK *H#F`r7$$\"31+]i0j\"[$HF;$\"30++]WI&yM#F`r7$$\"\"$F)$\"#CF)-%'COLOURG6 &%$RGBG$\"#5!\"\"F(F(-F$6$7SF'7$F+$\"3#)pmS)oa%G=!#A7$F2$\"382:)3tVjB# !#@7$F7$\"3%)*>A%4l'R?\"!#?7$F=$\"3#Qcug@W#\\RF]\\l7$FB$\"3)**Grd;/$>) *F]\\l7$FG$\"3P3^o6y=h>F-7$FL$\"3l$feoQedg$F-7$FQ$\"3;>ofm)[.A'F-7$FV$ \"3Ocb#3;%f.5F07$Fen$\"3%\\oJ9*fRc:F07$Fjn$\"3'eo@Ssw\"4AF07$F_o$\"3\" 4[FUEw)oJF07$Fdo$\"3#=^Xw\"*4vT%F07$Fio$\"3&\\z8$[H2RfF07$F^p$\"3G6%)y oQwLwF07$Fcp$\"3fR?0!*yP45F;7$Fhp$\"3*\\\"=7c=ig7F;7$F]q$\"3hO5K5^%)3; F;7$Fbq$\"3tT.;xZAt>F;7$Fgq$\"3gUBC?(*pSCF;7$F\\r$\"3_hCFB#3(eHF;7$Fbr $\"3Q#>J$41(Ge$F;7$Fgr$\"3(4yAzdX&QUF;7$F\\s$\"3Tef_.#RD/&F;7$Fas$\"3C '*)3)[^^$*fF;7$Ffs$\"3%)4Y?4QiDpF;7$F[t$\"3qM+`E(p,0)F;7$F`t$\"3L[:l+* [.N*F;7$Fet$\"3eL;QMC)o2\"F`r7$Fjt$\"3O')>Q6\\#*G7F`r7$F_u$\"3Ik$y`99g T\"F`r7$Fdu$\"3ftKC?Hk,;F`r7$Fiu$\"37[?8\\NQ>=F`r7$F^v$\"3!\\mf,&Q?N?F `r7$Fcv$\"3!y;KE_MDH#F`r7$Fhv$\"3JBnI,fCcDF`r7$F]w$\"3W]xlZucbGF`r7$Fb w$\"3%e\"Qs2w*G<$F`r7$Fgw$\"31E\"f$pdrKNF`r7$F\\x$\"3eztqhvQ2RF`r7$Fax $\"3Ee)ofr*e?VF`r7$Ffx$\"3CYn$o$p!>w%F`r7$F[y$\"3u-?%)*Glk>&F`r7$F`y$ \"3][h[uROIdF`r7$Fey$\"3MgR#)*H@=C'F`r7$Fjy$\"3(*G#)36F2CoF`r7$F_z$\"3 )e&*[)*oH'=uF`r7$Fdz$\"#\")F)-Fiz6&F[[lF(F\\[lF(-%+AXESLABELSG6$Q\"x6 \"Q!F[el-%%VIEWG6$;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" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "solve(f=g,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6& \"\"!\"\"#,&!\"\"\"\"\"*&^#F'F'-%%sqrtG6#\"\"$F'F',&F&F'*&^#F&F'F*F'F' " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " A := int(f-g, x=0..2); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG#\"#[\"\"&" }}}{PARA 0 "" 0 "" {TEXT -1 4 "b) " }{XPPEDIT 18 0 "x^3-y^2=0 and x+y^4=2" "6#3/,&* $%\"xG\"\"$\"\"\"*$%\"yG\"\"#!\"\"\"\"!/,&F'F)*$F+\"\"%F)F," }{TEXT -1 3 " ." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "r1 := x^3-y^2=0 ; r2:=x+y^4=2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#r1G/,&*$)%\"xG\" \"$\"\"\"F+*$)%\"yG\"\"#F+!\"\"\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#>%#r2G/,&%\"xG\"\"\"*$)%\"yG\"\"%F(F(\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}{PARA 7 "" 1 "" {TEXT -1 50 "War ning, the name changecoords has been redefined\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "implicitplot(\{r1,r2\}, x=-1..3, y=-2..2, gri d=[100,100]);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6 %-%'CURVESG6c\\l7$7$$\"3=M\"444444*!#>$!35xrE\"e.\\W#F*7$$\"3Twh:S`Ljo F*$!3s%)=??????F*7$F-7$$\"3:pl:S`LjoF*$\"3C*y1bIp%p/(ek 6GF*7$7$$\"3U<8888888!#=$!3\"zCJT^hrJ%F*FM7$7$FG$\"3'RGn7e.\\W#F*7$$\" 3EeGI6\"ph:\"FV$\"3#pu'[QS#)*e$F*7$7$FT$\"3(*Rz***pS\"FV$\"3ix@#zR>>7&F*7$7$$\"3%yypCQ!\\;:FV$\"3y'>111111'F *F]p7$Fcp7$$\"3!)fw#)[%epl\"FV$\"3#e\"o/W(QFm'F*7$7$$\"3c@<<<<<<uK\"*\\3#pF*Fip7$7$F`qFdo7$$\"3_`?M\"*>M\"*>FV$!3SW#4B!)3B!))F*7$7 $$\"3rD@@@@@@@FV$!3Sj*)zqh_$p*F*Ffq7$7$$\"3%=srrrrrr\"FVFbq7$$\"3=@*p` wmd!>FV$\"36U#G!>'f]@)F*7$7$F]r$\"3E4*)zqh_$p*F*Fer7$7$$\"3')HDDDDDDDF V$!3Ey&R)Qg[`7FV7$$\"3Jd'[:B\"yh@FV$!3i'*4555555FV7$Fds7$$\"3*f7777777 #FVF_r7$F[s7$$\"3gAVB)RT:9#FV$\"3qq#)yItr(*)*F*7$7$$\"3*3p[:B\"yh@FV$ \"3#Q-,,,,,,\"FVF^t7$Fdt7$$\"3yQ2:)=z%zBFV$\"3!\\\"G?ZV(e:\"FV7$7$F`s$ \"3Vx&R)Qg[`7FVFjt7$7$$\"3sLHHHHHHHFV$!3c^]_ac3t:FV7$$\"3'Rt540t%*p#FV $!3w+9999999FV7$FiuF_s7$F`u7$$\"3OD;CET$)3EFV$\"3uKB:8)f0L\"FV7$7$$\"3 #yw540t%*p#FV$\"3'zUTTTTTT\"FVF`v7$Ffv7$$\"3%p*)RjBK`$GFV$\"3YkW42@53: FV7$7$Feu$\"3R_]_ac3t:FVF\\w7$7$$\"3ePLLLLLLLFV$!3Hpmmmmm;>FV7$$\"3I*G ]j+X#)>$FV$!3\"\\!=======FV7$F[xFdu7$Fbw7$$\"3'ye(f8#Gv0$FV$\"3'z$FV$\"36K=======FVFbx7$Fhx7$$\"3T!4163ujF$FV$ \"3cz!4/2T^(=FV7$7$Fgw$\"3'4nmmmmm\">FVF^y7$7$$\"3,UPPPPPPPFV$!3?;7W43 S!G#FV7$$\"33(=`W0FAm$FV$!314AAAAAAAFV7$F]zFfw7$7$Fgw$\"3oqmmmmm;>FV7$ $\"3?boOH5t\"\\$FV$\"3k=()=EX#Q1#FV7$7$$\"3s=KXaqAiOFV$\"3EOAAAAAAAFVF gz7$7$$\"3G>KXaqAiOFVF`[l7$$\"3>(y'\\&H#e/PFV$\"3^!>*4kO,bAFV7$7$$\"3Y TPPPPPPPFV$\"3(y@T%43S!G#FVFf[l7$7$$\"3KXTTTTTTTFV$!3I&)e\\(RZEm#FV7$$ \"3)RjW>sXs4%FV$!3?8EEEEEEEFV7$Fg\\l7$F]\\lF[z7$F\\\\l7$$\"3]cabbwt8RF V$\"3OD433()*)\\CFV7$7$$\"3_kY%>sXs4%FV$\"3SSEEEEEEEFVF_]l7$Fe]l7$$\"3 9t.BsQY@TFV$\"3-7kW&*G@YEFV7$7$Fc\\l$\"3'p)e\\(RZEm#FVF[^l7$7$$\"3u\\X XXXXXXFV$!3CtU:)3'eiIFV7$$\"3#eR]z91'3XFV$!3];IIIIIIIFV7$7$F[_l$!31dVf$>\"fYGFV7$7$$\"3pC/&z91'3X FV$\"3EWIIIIIIIFVFd_l7$Fj_l7$$\"3MI]p`qCGXFV$\"3,iD1A0^ZIFV7$7$$\"3>\\ XXXXXXXFV$\"3NuU:)3'eiIFVF``l7$7$$\"30`\\\\\\\\\\\\\\FV$!3RW][N6wzMFV7 $$\"3Ld)*yYJn+\\FV$!3#4UVVVVVV$FV7$7$$\"3xc)*yYJn+\\FVFdal7$Fg`lFh^l7$ 7$Ff^lFi`l7$$\"3qt^)zY/rs%FV$\"3iBG\"=^$p_KFV7$7$$\"33&))*yYJn+\\FV$\" 3o[MMMMMMMFVF]bl7$7$Fdbl$\"38[MMMMMMMFV7$$\"3/k<69e'f#\\FV$\"3DQmspD(y X$FV7$7$F]al$\"3]X][N6wzMFVF\\cl7$7$$\"3#pNNNNNNN&FV$!36)RH>4**Q\"RFV7 $$\"3>K\\(y2FpF&FV$!3CCQQQQQQQFV7$7$F\\dl$!3![#QQQQQQQFVF\\al7$7$$\"3] _\\\\\\\\\\\\\\FVFccl7$$\"3%\\mrx9a17&FV$\"3bRr5SYAnOFV7$7$$\"3td\\(y2 FpF&FV$\"3+_QQQQQQQFVFhdl7$F^el7$$\"3#R*4gMk]:`FV$\"3*\\@=tv7k(QFV7$7$ Fgcl$\"3A*RH>4**Q\"RFVFdel7$7$$\"3MhdddddddFV$!3*=Y/a%f#[O%FV7$$\"3-oJ ,$*=7ScFV$!3mGUUUUUUUFV7$FcflFfcl7$Fjel7$$\"3/![etU)f1bFV$\"3IL6go6O*3 %FV7$7$$\"3W#>8I*=7ScFV$\"3'eDCCCCCC%FVFjfl7$F`gl7$$\"3W**p>#QPwp&FV$ \"3wjkkkkkk%FV7$FehlF^fl7$F\\hl7$$\"3z\"G nYzUc)eFV$\"3GRJP4wR=XFV7$7$$\"3]%fG6#4W#*fFV$\"3tfYYYYYYYFVF\\il7$Fbi l7$$\"3Cf)G(R/.tgFV$\"3Cm>No.0NZFV7$7$Fahl$\"3Q&)\\&yoDC$[FVFhil7$7$$ \"3>qlllllllFV$!3c]>,1!=mJ&FV7$$\"3!=*zt'eDcL'FV$!3RO]]]]]]]FV7$FgjlF` hl7$F^jl7$$\"3ye/)p,+%eiFV$\"3.q29&>@P&\\FV7$7$$\"37:!QneDcL'FV$\"3:k] ]]]]]]FVF^[m7$7$$\"3B;!QneDcL'FV$\"3El]]]]]]]FV7$$\"3d*yJefwAW'FV$\"3w W)H.-&)Q<&FV7$7$Fcjl$\"3c]>,1!=mJ&FVF_\\m7$7$$\"3hupppppppFV$!3)3jaK`X t\"eFV7$$\"3qhf'*)ov5n'FV$!3#3WXXXXXX&FV7$7$$\"3fgf'*)ov5n'FVFa]mFbjl7 $Fe\\m7$$\"3Y_6HBvSDmFV$\"3S()3\"p\\%z%R&FV7$7$$\"3z#)f'*)ov5n'FV$\"3d oaaaaaaaFVFh]m7$F^^m7$$\"35];Jt%)*e!oFV$\"33$zI4&RM=cFV7$7$Fj\\m$\"3yH YDLbMy19Sr)pFV$\"3%zk/woU6% eFV7$7$$\"3krR2!)e#***pFV$\"3*H(eeeeeeeFVFf`m7$F\\am7$$\"3/s$QhIgV;(FV $\"3(*z[=EH'z1'FV7$7$$\"3*=PwJHRsJ(FV$\"3TxiiiiiiiFVFbam7$Fham7$$\"3_ \\9E*e$*HM(FV$\"3#p?-r/qLH'FV7$7$F__m$\"3qwkfa*p+L'FVF^bm7$7$$\"3W$yxx xxxx(FV$!3\")G*HWq!RcoFV7$$\"3/8u.l\"Rki(FV$!33ammmmmmmFV7$F]cmF^_m7$7 $$\"3#zPPPPPPP(FVFebm7$$\"3I:#f$p(FV$\"3V!)G\\#H_3v'FV7 $7$Fibm$\"3qF*HWq!RcoFVFcdm7$7$$\"3(y=======)FV$!3ipI*zm`!*R(FV7$$\"3S HZQ&3j=$zFV$!3]eqqqqqqqFV7$Fbem7$Fibm$!3qF*HWq!RcoFV7$Fidm7$$\"3,e&4'e jTnyFV$\"3e5`()*[o5)pFV7$7$$\"3[]ZQ&3j=$zFV$\"3E'3222222(FVF\\fm7$7$Fc fm$\"3P(3222222(FV7$$\"3(fK&3U$**)R!)FV$\"30Z*R/\"fi7sFV7$7$F^em$\"3ip I*zm`!*R(FVF[gm7$7$$\"3H#feeeeee)FV$!300Ii%p#4azFV7$$\"3[88#y=`\"G&)FV $!3MnyyyyyyyFV7$7$$\"3Q78#y=`\"G&)FVF]hm7$$\"3vZ/7*zCPP)FV$!3\"Gs\\?4a mm(FV7$7$$\"3`PoC78-M#)FV$!3#HYZZZZZZ(FVFchm7$7$$\"3kQoC78-M#)FVF\\im7 $F^em$!3uqI*zm`!*R(FV7$Fagm7$$\"38P31!z8F@)FV$\"3VT[]m=&QW(FV7$7$$\"3^ doC78-M#)FV$\"3d*[ZZZZZZ(FVFfim7$F\\jm7$$\"3%e*\\wqiC#Q)FV$\"38(3T)*yf $ywFV7$7$$\"3eM8#y=`\"G&)FV$\"3?'*yyyyyyyFVFbjm7$7$Fijm$\"34&*yyyyyyyF V7$$\"3Ze+![?)=`&)FV$\"3.Ik%)f#e9\"zFV7$7$Ffgm$\"3F2Ii%p#4azFVFa[n7$7$ $\"3s'**)*)*)*)*)*)*)FV$!3'p\"39RSY@&)FV7$$\"32NNp0$Q^\"))FV$!3xr#GGGG GG)FV7$F`\\nFegm7$Fg[n7$$\"3LUmOs3$4s)FV$\"3\\\\-K'*fvZ\")FV7$7$$\"30b Np0$Q^\"))FV$\"3_*HGGGGGG)FVFg\\n7$F]]n7$$\"3qR3,gs,*)))FV$\"3ldkr7+r$ Q)FV7$7$F\\\\n$\"3&e\"39RSY@&)FVFc]n7$7$$\"37,%RRRRRR*FV$!3VJJ1xM`/\"* FV7$$\"3JGM>#*4&RQ*FV$!3i!3444444*FV7$Fb^n7$$\"3Ac!*FV$\"3bIz#esX0i)FV7$7$$\"3kB$)3))ph+\"*FV$\"3%Rqoooooo)FVF^`n7$Fd `n7$$\"3*yW[ouB:A*FV$\"3Ie'fRL%Gf))FV7$7$$\"3I[M>#*4&RQ*FV$\"3O3\"4444 44*FVFj`n7$F`an7$$\"3TPfanh<)Q*FV$\"33sDI$H]]4b*FV$\"3[Yp&fQQzL*FV7$7$$ \"3Rnl)[irll*FV$\"3y7&\\\\\\\\\\\\*FVF\\cn7$7$Fccn$\"3!R^\\\\\\\\\\\\* FV7$$\"3GGpgOO*[r*FV$\"31!RAjlN!y&*FV7$7$Fabn$\"3uQ[-!4,kp*FVF[dn7$7$$ \"3+@??????5!#<$!3rn]>UEXI5Fhdn7$$\"3vJavbs4?5Fhdn$!3QHIIIIII5Fhdn7$F[ en7$$\"3mYa_O8))>5Fhdn$!3/bkiYB)*H5Fhdn7$7$$\"3)>z9k[G*G**FV$!3Y*))*)* )*)*)*)*)*FVFaen7$Fgen7$Fabn$!3uQ[-!4,kp*FV7$7$Fabn$\"3')R[-!4,kp*FV7$ $\"3LdzN)H)*FV7$7$$\"3&3\"[T'[G*G**FV$\"3A<**)*)*) *)*)*)*FVFdfn7$Fjfn7$$\"3#\\Wm:c\")Q+\"Fhdn$\"3\"zcM&[%>i+\"Fhdn7$7$$ \"3`Lavbs4?5Fhdn$\"30KIIIIII5FhdnF`gn7$Ffgn7$$\"3'p03GSS,-\"Fhdn$\"3(e *ppZYOI5Fhdn7$7$Ffdn$\"3rn]>UEXI5FhdnF\\hn7$7$$\"3Whgggggg5Fhdn$!3%y;M =p'3#4\"Fhdn7$$\"3AH\"G`FVi/\"Fhdn$!30qqqqqqq5Fhdn7$7$F\\in$!3$)pqqqqq q5FhdnFedn7$7$$\"3y???????5FhdnFchn7$$\"3_'=7$[T,O5Fhdn$\"3(p!pfU\\*[0 \"Fhdn7$7$$\"3*48G`FVi/\"Fhdn$\"3\\sqqqqqq5FhdnFhin7$F^jn7$$\"3XkQuR[, _5Fhdn$\"3[p#p:H)Hz5Fhdn7$7$Fghn$\"3%y;M=p'3#4\"FhdnFdjn7$7$$\"3)=5555 555\"Fhdn$!3?M?\\].Ab6Fhdn7$$\"3=o#*e0F`)4\"Fhdn$!3r]^^^^^^6Fhdn7$Fc[o 7$$\"3=u`)\\G?S4\"Fhdn$!3,B/\\N`_W6Fhdn7$7$$\"3\")zE!*R!\\C2\"Fhdn$!3F 56666666FhdnFi[o7$F_\\oFfhn7$Fjjn7$$\"3f55i6_!z1\"Fhdn$\"3yjh4g>\"Q5\" Fhdn7$7$$\"3e\"o-*R!\\C2\"Fhdn$\"3%H6666666\"FhdnFf\\o7$F\\]o7$$\"3@Kb `vPl$3\"Fhdn$\"3#Go&eOuYG6Fhdn7$7$$\"3'*p#*e0F`)4\"Fhdn$\"3Q`^^^^^^6Fh dnFb]o7$Fh]o7$$\"3%3q$*)4a_*4\"Fhdn$\"3ka:jU)**H:\"Fhdn7$7$F_[o$\"3UM? \\].Ab6FhdnF^^o7$7$$\"3KUTTTTTT6Fhdn$!3IE4FyiI>7Fhdn7$$\"3_eh;\"\\6Q7 \"Fhdn$!39\">>>>>>>\"Fhdn7$7$$\"3Ieh;\"\\6Q7\"FhdnF`_oF^[o7$Fd^o7$$\"3 N*4BIlt]6\"Fhdn$\"3M'>1*Rc&y<\"Fhdn7$7$$\"33gh;\"\\6Q7\"Fhdn$\"3!Q>>>> >>>\"FhdnFg_o7$F]`o7$$\"3W%ei2p)pI6Fhdn$\"3q^2dUYj-7Fhdn7$7$Fi^o$\"3IE 4FyiI>7FhdnFc`o7$7$$\"3w#=======\"Fhdn$!3%=Qu5sRYG\"Fhdn7$$\"3%3SBSR4U <\"Fhdn$!3/sssssss7Fhdn7$Fbao7$$\"3,')3I*))f=;\"Fhdn$!3Hv*4-)*oFD\"Fhd n7$7$$\"3&**>nRw3#\\6Fhdn$!3gJKKKKKK7FhdnFhao7$F^boFh^o7$7$Fi^o$\"33E4 FyiI>7Fhdn7$$\"3BrSZ?%*GY6Fhdn$\"390LE`zWF7Fhdn7$7$$\"3t,s'Rw3#\\6Fhdn $\"3EMKKKKKK7FhdnFhbo7$F^co7$$\"34[2whNnh6Fhdn$\"3$*o1Q_yY_7Fhdn7$7$$ \"3i-M-%R4U<\"Fhdn$\"3$\\FFFFFFF\"FhdnFdco7$7$F[do$\"3qussssss7Fhdn7$$ \"3.c3_p]\"Fhdn$!3[788888 88Fhdn7$FbeoF]ao7$Fido7$$\"3)>KFGijC>\"Fhdn$\"3#f\"Fhdn$\"3::8888888FhdnFieo7$F_fo7$$\"3$GF2q=Hx?\"Fhdn$\"3u liM[ViF8Fhdn7$7$F^eo$\"3>\"3_HS%=^8FhdnFefo7$7$$\"3ljiiiiii7Fhdn$!3>@G ^JSj=9Fhdn7$$\"3Yc]!=SXvC\"Fhdn$!3O$RRRRRRR\"Fhdn7$Fdgo7$$\"32$4)\\*>] bA\"Fhdn$!3yA7\"3LjoN\"Fhdn7$7$$\"3W^4V#*edB7Fhdn$!3#HNNNNNNN\"FhdnFjg o7$F`ho7$F^eo$!3>\"3_HS%=^8Fhdn7$F[go7$$\"3!zV*og73B7Fhdn$\"3*39o]JwEN \"Fhdn7$7$$\"3*H&4V#*edB7Fhdn$\"3eb``````8FhdnFjho7$F`io7$$\"39X;w3j6Q 7Fhdn$\"35u**R2`/y8Fhdn7$7$$\"3Ce]!=SXvC\"Fhdn$\"3-'RRRRRRR\"FhdnFfio7 $F\\jo7$$\"3Mo<$GIjKD\"Fhdn$\"37\"*Qt`BI.9Fhdn7$7$F`go$\"3>@G^JSj=9Fhd nFbjo7$7$$\"34/......8Fhdn$!3]+!y/='H([\"Fhdn7$$\"3))zL0>7V&H\"Fhdn$!3 Duuuuuuu9Fhdn7$Fa[p7$$\"3g32\"[-KXG\"Fhdn$!3wyy_'>\\iX\"Fhdn7$7$$\"3iG9Fhdn7$7$$\"3ss/TR^ir7Fhdn$\"3ZOMMMMMM9FhdnFd\\p7$Fj\\p 7$$\"3\\KSq!poKG\"Fhdn$\"3&yqpm/0TX\"Fhdn7$7$$\"3U\"Q`!>7V&H\"Fhdn$\"3 #pZZZZZZZ\"FhdnF`]p7$Ff]p7$$\"3-99tVtH)H\"Fhdn$\"3?nj/M/[z9Fhdn7$7$F][ p$\"3]+!y/='H([\"FhdnF\\^p7$7$$\"3`WVVVVVV8Fhdn$!35)3IT))4rb\"Fhdn7$$ \"3k2C3t=]U8Fhdn$!38bbbbbbb:Fhdn7$F[_p7$$\"3&4,ho$**=T8Fhdn$!3b@A)*[6J `:Fhdn7$7$$\"33;'p3E%))=8Fhdn$!3p9:::::::FhdnFa_p7$Fg_pF\\[p7$7$F][p$ \"3s+!y/='H([\"Fhdn7$$\"3fj)fO\"Q888Fhdn$\"33e>_/![]]\"Fhdn7$7$$\"3j<' p3E%))=8Fhdn$\"3O<:::::::FhdnFa`p7$Fg`p7$$\"3&)*eYdzSzK\"Fhdn$\"3/s#RG 1X1`\"Fhdn7$7$$\"3?4C3t=]U8Fhdn$\"3!ybbbbbbb\"FhdnF]ap7$Fcap7$$\"3%=&) \\(>:&GM\"Fhdn$\"3\\]+Cz$Qhb\"Fhdn7$7$Fg^p$\"35)3IT))4rb\"FhdnFiap7$7$ $\"3(\\QQQQQQQ\"Fhdn$!3\\cZSLw\"yi\"Fhdn7$$\"3Z?9#pU!Ql8Fhdn$!3e&fffff ff\"Fhdn7$FhbpFf^p7$F_bp7$$\"3dt:YB$euN\"Fhdn$\"3>pB$fhN>e\"Fhdn7$7$$ \"3!=U@pU!Ql8Fhdn$\"3C)fffffff\"FhdnF_cp7$7$$\"3-A9#pU!Ql8FhdnFhcp7$$ \"37O*4wb^@P\"Fhdn$\"35Z!)=Akk2;Fhdn7$7$Fdbp$\"3scZSLw\"yi\"FhdnF^dp7$ 7$$\"3UDCCCCCC9Fhdn$!3i_U\"*ogf*p\"Fhdn7$$\"3%f+XV\\U6T\"Fhdn$!3Xwwwww ww;Fhdn7$F]ep7$$\"31>C&zhdWR\"Fhdn$!3LqwZqG)pk\"Fhdn7$7$$\"3Ml/(p#*3&) Q\"Fhdn$!3-OOOOOOO;FhdnFcep7$Fiep7$$\"3>&QQQQQQQ\"FhdnFfbp7$Fddp7$$\"3 wa79A%eoQ\"Fhdn$\"3oo21)fVLj\"Fhdn7$7$$\"3nm/(p#*3&)Q\"Fhdn$\"3oQOOOOO O;FhdnFcfp7$7$$\"3!pYqp#*3&)Q\"Fhdn$\"3!*QOOOOOO;Fhdn7$$\"3H$*pe!**Q8S \"Fhdn$\"3\"32>+2n#f;Fhdn7$7$$\"3\\2]M%\\U6T\"Fhdn$\"37zwwwwww;FhdnFdg p7$Fjgp7$$\"3H$Q\\y*)=fT\"Fhdn$\"3-@2;.74&o\"Fhdn7$7$Fidp$\"3%GD9*ogf* p\"FhdnF`hp7$7$$\"3'eYYYYYYY\"Fhdn$!3'>/O&>eWs<<<<<<eWs:=Fhdn7$7$$\"3GiX9,Je+:Fhdn$\"3*3%QQQQQQ=FhdnF]_q7$Fc_q7$$\"3W&p!)f O!>-:Fhdn$\"3w^OXxRCT=Fhdn7$7$Fj\\q$\"3qvf-:OLY=FhdnFi_q7$7$$\"3uYXXXX XX:Fhdn$!37'f!=IFhdn7$$\"3[_$*)f&4KW:Fhdn$!36>>>>>>>>Fhdn7$Fh`q7$$ \"3=W%R#fx'Ha\"Fhdn$!3b;o(H80n\">Fhdn7$7$$\"3?d0$>!\\LA:Fhdn$!3nyyyyyy y=FhdnF^aq7$FdaqFi\\q7$F_`q7$$\"3fhrB+&Gj^\"Fhdn$\"3/E7g$))4v'=Fhdn7$7 $$\"3we0$>!\\LA:Fhdn$\"36\")yyyyyy=FhdnF[bq7$Fabq7$$\"3RS:b%=#[I:Fhdn$ \"3Y()3pR-w$*=Fhdn7$7$$\"3#QN*)f&4KW:Fhdn$\"3y@>>>>>>>FhdnFgbq7$F]cq7$ $\"3xN6I#*esW:Fhdn$\"3vK`Ms0#*>>Fhdn7$7$Fd`q$\"37'f!=IFhdnFccq7$7$ $\"3=(eeeeeee\"Fhdn$!3_.-cO!eq*>Fhdn7$$\"3'*G(osl)ol:Fhdn$!3Lfffffff>F hdn7$7$$\"3=H(osl)ol:Fhdn$!3bfffffff>FhdnFc`q7$7$Fd`q$\"3M'f!=IFhd n7$$\"3*3+XBy,(e:Fhdn$\"3&y]0Fs[j%>Fhdn7$7$$\"3_I(osl)ol:Fhdn$\"3Aifff fff>FhdnFaeq7$Fgeq7$$\"3C(QHmoZFd\"Fhdn$\"3&>;D)eoqs>Fhdn7$7$F^dq$\"3w .-cO!eq*>FhdnF]fq7$7$$\"3*e9\"ovQO(e\"Fhdn$!\"#\"\"!7$$\"3S(eeeeeee\"F hdnF`dq7$7$F^dq$\"3_.-cO!eq*>Fhdn7$$\"3o'*QvqV&oe\"Fhdn$\"3=$p/^@/!**> Fhdn7$7$$\"3AZ6ovQO(e\"Fhdn$\"3m-++++++?FhdnFdgq-%'COLOURG6&%$RGBG\"\" \"F\\gqF\\gq-F$6`cl7$7$$!\"\"F\\gq$!3H4\\-'3^fJ\"Fhdn7$$!3Acx>b>\\u**F V$!3(p`6w6#o:8Fhdn7$7$$!3U=asyBeK(*FVFeeoF\\iq7$7$$!3KI2@,h*FV$!3m$GDa;:Jr_28Fhdn7$7$$!3;\">>>>>>>*FV$!3!*)eF71zoI\"FhdnFe[r7$7$F`jqFhjq7$$ !3'pVX$fX4y&*FV$\"3S**)p%4[M68Fhdn7$7$F\\\\r$\"3o)eF71zoI\"FhdnFb\\r7$ 7$F\\\\r$!37*eF71zoI\"Fhdn7$$!3k2Gh\\4!e)))FV$!3R5z&p4RLI\"Fhdn7$7$$!3 s'yyyyyyy)FV$!3H;\"[4s1AI\"FhdnF_]r7$Fh\\r7$$!3)*3rv<6A@\"*FV$\"3#o5:d ]hgI\"Fhdn7$7$Ff]r$\"3H;\"[4s1AI\"FhdnF[^r7$Fe]r7$$!3ap#4z)3kB&)FV$!3w BUsi5:*H\"Fhdn7$7$$!3J#QQQQQQQ)FV$!3YV'o1QMvH\"FhdnFe^r7$Fa^r7$$!3*4yo hnZVm)FV$\"3o9.'>?y2I\"Fhdn7$7$F\\_r$\"3YV'o1QMvH\"FhdnFa_r7$F[_r7$$!3 cKd?E3[h\")FV$!37P0\\GI'\\H\"Fhdn7$7$$!3)y(zzzzzzzFV$!3iq\"*QS?'GH\"Fh dnF[`r7$Fg_r7$$!3+`/eMUZ2#)FV$\"35Ab?)*[\\&H\"Fhdn7$7$Fb`r$\"3iq\"*QS? 'GH\"FhdnFg`r7$Fa`r7$$!3M$>-Xw?$*z(FV$!3]]oD%*\\x!H\"Fhdn7$7$$!3Ytvvvv vvvFV$!3!yp4,q*=)G\"FhdnFaar7$F]ar7$$!3+D@*Hz+1v(FV$\"3uH2X%f6-H\"Fhdn 7$7$Fhar$\"3!yp4,q*=)G\"FhdnF]br7$Fgar7$$!3Eb')z-2;PuFV$!3'Q;B+'pe'G\" Fhdn7$7$$!3$z;<<<<<<(FV$!3(\\AI)ft^$G\"FhdnFgbr7$Fcbr7$$!3#fz.9NFPH(FV $\"3RPfp!HG\\G\"Fhdn7$7$$!3/prrrrrrrFV$\"3(\\AI)ft^$G\"FhdnFccr7$7$Fjc rF`cr7$$!3<<^4T1+vqFV$!3Bx%*yD*)R#G\"Fhdn7$7$$!3iknnnnnnnFV$!38_2b>]%) y7FhdnF`dr7$Ficr7$$!3.pa\")4R&o$oFV$\"3.X6%p)\\kz7Fhdn7$7$Fgdr$\"38_2b >]%)y7FhdnF\\er7$Ffdr7$$!33z:Rz0%Gr'FV$!3f!zb:*3@y7Fhdn7$7$$!3?gjjjjjj jFV$!3`z7FzEZI,\\kQiFVFado7$FehrFhfr7$F\\hr7$$!3*[1*QsjjKcFV$!3d?R/\">>]E\"Fhdn 7$7$$!3O^bbbbbbbFV$!39S`;n(QSE\"FhdnFjhr7$7$F]hr$\"3\"o*=))HzFHdXFV$!3@&=n^VT8D\"Fhdn7$7$$!3? RVVVVVVVFV$!3mpc,z7i[7FhdnFi]s7$7$Fe]s$\"3MEAtT/w`7Fhdn7$$!3q'=%o4g;IX FV$\"37>#[*)R'*4D\"Fhdn7$7$F`^s$\"3Wpc,z7i[7FhdnFh^s7$7$F`^s$!3Wpc,z7i [7Fhdn7$$!3WAReM[%))>%FV$!3Gt#3K=#yY7Fhdn7$7$$!3*e$RRRRRRRFV$!3a7\"*H; @[V7FhdnFe_s7$7$$!3wRVVVVVVVFV$\"3mpc,z7i[7Fhdn7$$!3]()3.fYCnSFV$\"3`H pG/$3^C\"Fhdn7$7$$!3MNRRRRRRRFV$\"3a7\"*H;@[V7FhdnFf`s7$F[`s7$$!3#ojK, &pRSQFV$!3ch$\\7$HAU7Fhdn7$7$$!3ZJNNNNNNNFV$!3kbDe`HMQ7FhdnFbas7$7$F\\ `sF_as7$$!3>(ex$3LK/OFV$\"3%*Rci4-AR7Fhdn7$7$Fias$\"3kbDe`HMQ7FhdnF_bs 7$Fhas7$$!3?^8ol!\\>[$FV$!3i\\/HzOmP7Fhdn7$7$$!3gFJJJJJJJFV$!3u)*f'3z. KB\"FhdnFibs7$Febs7$$!3)zGCx&>STJFV$\"3O]V'\\6KLB\"Fhdn7$7$$!30FJJJJJJ JFV$\"3u)*f'3z.KB\"FhdnFecs7$F_cs7$$!39m+B\"=,N7$FV$!3\"z`JtU/JB\"Fhdn 7$7$$!3Qy%Hhr$3iIFVFaboFads7$Fgds7$$!3u\")**>8uZoFFV$!3u00tjF?G7Fhdn7$ 7$$!3uBFFFFFFFFV$!3)Rt&[(\\CwA\"FhdnF[es7$7$Fbes$\"3wLd[(\\CwA\"Fhdn7$ $!3Ay'Hhr$3iIFVFaco7$Fjes7$F`csF^ds7$Faes7$$!3rmmJb;;9CFV$!3(pz9\"*HIK A\"Fhdn7$7$$!3g>BBBBBBBFV$!3+W!pv>a>A\"FhdnF`fs7$Fges7$$!3#\\&GdrYhsEF V$\"3\\ZKvEu&oA\"Fhdn7$7$$!3()>BBBBBBBFV$\"3+W!pv>a>A\"FhdnF\\gs7$Fffs 7$$!3%>NLu*e%)f?FV$!3)z3*\\MyD=7Fhdn7$7$$!3X:>>>>>>>FV$!3BaBl(*QG;7Fhd nFhgs7$Fbgs7$$!3u[YNwWh-AFV$\"3=najZ9E?7Fhdn7$7$F_hs$\"3BaBl(*QG;7Fhdn Fdhs7$7$F_hs$!3XaBl(*QG;7Fhdn7$$!3=P+bR,`0lS/M.7Fhdn7$7$$!3>IqqqqqqqF*$!3!\\G-z*HF*>\"FhdnF]\\t 7$Fi[t7$$!3#)3.+2*Qh#zF*$\"3oE@G5NZ+7Fhdn7$7$Fd\\t$\"3!\\G-z*HF*>\"Fhd nFi\\t7$7$Fd\\t$!3o%G-z*HF*>\"Fhdn7$$!3:E4+f'GeU'F*$!3A_i.wzO)>\"Fhdn7 $7$$!3X*)HIIIIIIF*$!39&f&)zp-O>\"FhdnFf]t7$F_]t7$$!3u\\#=[&p8EKF*$\"3e YV;Jv(Q>\"Fhdn7$7$F]^t$\"39&f&)zp-O>\"FhdnFb^t7$F\\^t7$$!3\"yxn,3rE)GF *$!3AV0U6bR$>\"Fhdn7$7$$!3f_#y4L62$=F*F`_oF\\_t7$Fb_t7$$\"3j[Qc\\`(4G' F8$!3gWx;d\"*4)=\"Fhdn7$7$$\"3I^5555555F*$!3b\"46\"FV$!3ep y8(y*zr6Fhdn7$7$FT$!3ii#QC,u'o6FhdnFict7$Fect7$$\"3\\sJcM5)*46FV$\"3'y '>Pz,$=<\"Fhdn7$7$FT$\"3ii#QC,u'o6FhdnFcdt7$F_dt7$$\"3=)eDfVY;Y\"FV$!3 vxXzjmOm6Fhdn7$7$F`q$!38`'yDz'Ri6FhdnF]et7$Fidt7$$\"3aF/BJ)R$)e\"FV$\" 3x#G4,M)Rk6Fhdn7$7$F`q$\"38`'yDz'Ri6FhdnFget7$Fcet7$$\"3[vI`1cN6=FV$!3 ;'G^/aL4;\"Fhdn7$7$F]r$!3kV!>Fd>h:\"FhdnFaft7$F]ft7$$\"3K#o(*yi)pm?FV$ \"3p(fY3]mp:\"Fhdn7$7$F]r$\"3kV!>Fd>h:\"FhdnF[gt7$Fgft7$$\"30j09xZ1h@F V$!3c%*z5$FV$!33!p#Gwa.Q6Fhdn7 $7$Fgw$!3bQE)R7\"Fhdn7$7$Fc\\l$\"3y4t&)\\4w@6FhdnF`^u7$F\\^u7$$\"3:Xm\"*) >OAB%FV$!3Eg8'oJ$>?6Fhdn7$7$Fg`l$!3z0'za,(y96FhdnFj^u7$Ff^u7$$\"3OhYu4 r-,XFV$\"3y,@oaQb:6Fhdn7$7$Fg`l$\"3z0'za,(y96FhdnFd_u7$F`_u7$$\"3&QG># QF!od%FV$!3z$e(QIfC96Fhdn7$7$$\"30*y7C(4UeZFVFb\\oF^`u7$Fd`u7$$\"33KuE R5l=\\FV$!3Be$)3?n-36Fhdn7$7$F]al$!3$y*f3#)HV26FhdnFh`u7$7$F]al$\"3$y* f3#)HV26Fhdn7$$\"3%>k7C(4UeZFVF_]o7$7$$\"3]UETs4UeZFVF_]o7$$\"3j[XXXXX XXFVF[`u7$7$$\"3h`\\\\\\\\\\\\\\FVF_au7$$\"3[!3%zd'puD&FV$!3j#)p`TX],6 Fhdn7$7$Fgcl$!3GKa`*Hb'*4\"FhdnFcbu7$7$F]al$\"3h(*f3#)HV26Fhdn7$$\"3=( z)*>SW]*\\FV$\"3eG2'e;cl5\"Fhdn7$7$Fgcl$\"3GKa`*Hb'*4\"FhdnF`cu7$Fibu7 $$\"3!*G2Kw#)G'f&FV$!3!og&)HO#)\\4\"Fhdn7$7$F_fl$!3_m[)phx=4\"FhdnFjcu 7$Ffcu7$$\"3ieb2vDS&\\&FV$\"3w#4d*)QCp4\"Fhdn7$7$F_fl$\"3_m[)phx=4\"Fh dnFddu7$F`du7$$\"3=wt%[*o5NfFV$!3?JUV%=g%)3\"Fhdn7$7$Fahl$!3u+VVM**4%3 \"FhdnF^eu7$Fjdu7$$\"3=@B:[2w&*fFV$\"33\"Fhdn7$7$Fcjl$!3?NP)=DAj2\"FhdnFefu7$F^fu7$$\"3_\"3H7#*=h\\'FV$\" 3O@)\\^$3mx5Fhdn7$7$Fcjl$\"3UNP)=DAj2\"FhdnF_gu7$F[gu7$$\"3yq1!>8WFh'F V$!3+![Jt#eTv5Fhdn7$7$$\"3wKTcgyNdoFV$!3gpqqqqqq5FhdnFigu7$7$F`huFbin7 $$\"3I6NH-[x\\pFV$!3\\Bn'R&[ro5Fhdn7$7$Fj\\m$!3ixi4&R&Go5FhdnFfhu7$7$F j\\m$\"3ixi4&R&Go5Fhdn7$$\"3k+ScgyNdoFVFajn7$FciuFegu7$F\\iu7$$\"3ZLzm hG;#G(FV$!3FD,]>'\\:1\"Fhdn7$7$F__m$!3:Tn(Gcv&f5FhdnFhiu7$F`iu7$$\"3\" 3Qa>po0+(FV$\"3(=L\"[)*)>w1\"Fhdn7$7$F__m$\"3:Tn(Gcv&f5FhdnFbju7$F^ju7 $$\"3(yNU5#4b9wFV$!3FFN.&Q%Qa5Fhdn7$7$Fibm$!3n/slId'30\"FhdnF\\[v7$Fhj u7$$\"3'zY-@wUc^(FV$\"3gj0(=`;l0\"Fhdn7$7$Fibm$\"3!\\?d1tl30\"FhdnFf[v 7$7$Fibm$!3X/slId'30\"Fhdn7$$\"3/!y;/)*Qp%zFV$!3/Hpc]\">s/\"Fhdn7$7$F^ em$!3?owV)*e:U5FhdnFc\\v7$F\\\\v7$$\"35b0DKorI!)FV$\"35&zf_;8a/\"Fhdn7 $7$F^em$\"3?owV)*e:U5FhdnF]]v7$Fi\\v7$$\"3@-7zRqKz#)FV$!3#3L+h\"R0S5Fh dn7$7$Ffgm$!3tJ\"=i1YM.\"FhdnFg]v7$Fc]v7$$\"3ZW')R-4zX&)FV$\"3$o-\\')z 4V.\"Fhdn7$7$Ffgm$\"3tJ\"=i1YM.\"FhdnFa^v7$F]^v7$$\"3]Dc;*4:%)*FVFcev7$7$Fghn$\"3S#okb0e> %)*FV7$$\"3?uS+qfzR5FhdnF]gn7$F`fv7$$\"3A@??????5FhdnFcdv7$Fiev7$$\"3U i*z$GD%y3\"Fhdn$!3)[\\)osTJn(*FV7$7$F_[o$!39\"e\">2tAJ(*FVFhfv7$F]fv7$ $\"3eSTd?BYo5Fhdn$\"3$o74$*HF/#)*FV7$7$F_[o$\"39\"e\">2tAJ(*FVFbgv7$7$ F_[o$!3-!e\">2tAJ(*FV7$$\"3K*GhqQb&>6Fhdn$!3Tf8YbBS!o*FV7$7$Fi^o$!3wy% =)el\\?'*FVF_hv7$Fhgv7$$\"3bG'>9w>T7\"Fhdn$\"3l^Y*[H$*ym*FV7$7$Fi^o$\" 3wy%=)el\\?'*FVFihv7$Fehv7$$\"3@;EuX#o7:\"Fhdn$!3#RAM#Q0\\$f*FV7$7$$\" 3`#=======\"Fhdn$!3Rw`W5ew4&*FVFciv7$7$Fi^o$\"3()z%=)el\\?'*FV7$$\"3G; ^E-sxz6Fhdn$\"3fx,[!Hf`^*FV7$7$F^ao$\"3hy`W5ew4&*FVFbjv7$7$F^aoF\\jv7$ $\"3KVRU/6)H=\"Fhdn$!3X)325syl]*FV7$7$$\"3IS*f*RWA(=\"FhdnFhbnF][w7$Fc [w7$$\"3Y?P!=R7R@\"Fhdn$!3`dWw!>^=T*FV7$7$F^eo$!3hss!H'o(fQ*FVFg[w7$7$ F^eo$\"3hss!H'o(fQ*FV7$$\"3)4$*f*RWA(=\"Fhdn$\"3m6&\\\\\\\\\\\\*FV7$7$ Fe\\wFecnFhjv7$F]\\w7$$\"3.h()\\YHsW7Fhdn$!3fcWnLj\"fJ*FV7$7$$\"3Vjiii iii7Fhdn$!3(e&)4\"f2#Rq O$*FV7$7$F`go$\"3)p&)4\"f2,N`v7Fhdn$!3 xcWew9)*>#*FV7$7$F][p$!38RCJbYOM\"*FVFc^w7$F^^w7$$\"3Ewruk)>nH\"Fhdn$ \"3l'QSPZ8S:*FV7$7$F][p$\"3CSCJbYOM\"*FVF]_w7$Fi^w7$$\"3]T)))e0WjI\"Fh dn$!3saW\\>m/C\"*FV7$7$$\"3EK\\jWl)pJ\"FhdnFe^nFg_w7$F]`w7$$\"3lM#zG3% \\O8Fhdn$!3%H)zN&[1:-*FV7$7$Fg^p$!3cNi%Q*[\"o**)FVFa`w7$7$$\"3JWVVVVVV 8Fhdn$\"3WMi%Q*[\"o**)FV7$$\"3/C\\jWl)pJ\"FhdnFcan7$7$$\"3#Q#\\jWl)pJ \"Fhdn$\"3E2\"444444*FV7$$\"3K/......8FhdnFd_w7$7$Fg^p$!3oOi%Q*[\"o**) FV7$$\"3nD)Qfb&Hm8Fhdn$!3i([8>\"3[:*)FV7$7$Fdbp$!3%yO&[?\"oI&))FVF`bw7 $F[aw7$$\"3(4a&G,,/e8Fhdn$\"3#R9(R7:&[%*)FV7$7$Fdbp$\"3%yO&[?\"oI&))FV Fjbw7$Ffbw7$$\"3Y;%)**Gq4'R\"Fhdn$!3?\"**o%Q^X4))FV7$7$Fidp$!3,*\\CrM@ $4()FVFdcw7$F`cw7$$\"3wK\"oL@d2U\"Fhdn$\"3]I;h&z?!\\Q\"e%pn:Fhdn$! 3I@94Q#)=,\")FV7$7$F^gq$!3:u/E'y%=:!)FVFdjw7$Fhiw7$$\"30(yIH3`*f:Fhdn$ \"3Q&*e13H%y8)FV7$7$F^dq$\"3Ev/E'y%=:!)FVF^[x7$7$F^dqF[[x7$$\"3%)3j\" \\N:^f\"Fhdn$!3/&3l$pbNrzFV7$7$$\"3yz+3z$p(FV7$7$$\"3Gommmmmm;Fhdn$!3#HzB\"*eL;f( FVFg]x7$F_]x7$$\"3]*46#)yj0k\"Fhdn$\"3OvJIfixNxFV7$7$$\"31ommmmmm;Fhdn $\"3/%zB\"*eL;f(FVFc^x7$7$Fj^x$!3#=zB\"*eL;f(FV7$$\"3?'z)>qp>u;Fhdn$!3 RX(o+^]+b(FV7$7$$\"3>%)p')RO$yo\"FhdnF\\imFb_x7$Fh_x7$$\"3'f5k1q'\\*p \"Fhdn$!3UP9o5u+*R(FV7$7$$\"3_3222222u))[H\"znFV7$$\"3Jx**f7 50]#)=FhdnFb`mF]j x7$Fcjx7$$\"3m%*4#z!p\\$*=Fhdn$!3_#o')o%ek-dFV7$7$$\"3t5444444>Fhdn$!3 vZ5XBN_([&FVFgjx7$7$F^[y$\"33^5XBN_([&FV7$$\"3d&p*3tH>#)=FhdnF_am7$7$$ \"3M&p*3tH>#)=Fhdn$\"3)=(eeeeeeeFV7$$\"3]qoooooo=FhdnFfix7$F][y7$$\"3A <]!>#oZ5>Fhdn$!3'o]'o#e/%oaFV7$7$$\"3z(o%=c9[6>FhdnFa]mFc\\y7$7$Fj\\y$ !3rRaaaaaaaFV7$$\"36pk$HZVa#>Fhdn$!3F?1'*)oIS@&FV7$7$$\"3mu'pxAO\\$>Fh dnFjjlF`]y7$Ff]y7$$\"3PB'\\bj+&R>Fhdn$!3pg<06>c]\\FV7$7$$\"3;^\\\\\\\\ \\\\>Fhdn$!3=&Ra^^CF hdnFg[m7$Fi^y7$$\"39;p\"za*y9>Fhdn$\"3[9aGm!fvR&FV7$7$$\"3,'o%=c9[6>Fh dnFa^mF]_y7$Fc_y7$$\"3&4\"444444>Fhdn$\"3?_5XBN_([&FV7$F`^y7$$\"3_jz\" >*z;_>Fhdn$!3\"yv%pq]>tYFV7$7$$\"3\\^Jir()Q`>Fhdn$!3`KYYYYYYYFVF]`y7$7 $$\"3s^Jir()Q`>FhdnFf`y7$$\"3ECd&QA#*G'>Fhdn$!3Ze>.')pRwVFV7$7$$\"3bdH B6mgn>FhdnFfflF\\ay7$7$$\"3xdHB6mgn>FhdnFffl7$$\"3rL\\KH&pA(>Fhdn$!3o \\OoO'Hh1%FV7$7$$\"3#)ziz4LHy>FhdnFbdlFiay7$7$$\"3gziz4LHy>Fhdn$!3NDQQ QQQQQFV7$$\"3&oDXKFq,)>Fhdn$!3()yk%=n'4TPFV7$7$$\"3j]'>-Z)3')>FhdnFdal Fhby7$F^cy7$$\"3cb@c7Na')>Fhdn$!3Qg](4m)y+MFV7$7$$\"3R\"**)*)*)*)*)*)> Fhdn$!3FZfCBhN`JFVFbcy7$7$$\"3$=**)*)*)*)*)*)>Fhdn$\"3$R&fCBhN`JFV7$$ \"3S]'>-Z)3')>FhdnFjbl7$7$$\"3=]'>-Z)3')>FhdnFjbl7$$\"3hDZfkv<&)>Fhdn$ \"3g2hQ(od:[$FV7$7$$\"3Qziz4LHy>FhdnFaelFjdy7$F`ey7$$\"3eYt\\t(>T(>Fhd n$\"3-/.S-g<'*RFV7$7$$\"3mcHB6mgn>FhdnFcglFdey7$7$$\"3)o&HB6mgn>Fhdn$ \"3UcUUUUUUUFV7$$\"33#Qw&GH]b>Fhdn$\"3e].lb[Q'e%FV7$7$$\"3h]Jir()Q`>Fh dnFeilFcfy7$7$$\"3Q]Jir()Q`>FhdnFeilFf^y7$7$$\"3h\"**)*)*)*)*)*)>Fhdn$ !3#y%fCBhN`JFV7$$\"354!3zXo8*>Fhdn$!3L\">$R5x*\\/$FV7$7$$\"3!)\\*=^tn: *>FhdnFa_lFfgy7$F\\hy7$$\"3w.h\"HD(z%*>Fhdn$!3*etLkDX_n#FV7$7$$\"3//%> oyU_*>FhdnFj\\lF`hy7$Ffhy7$$\"3s!oA.^Xr*>Fhdn$!3'**4fkU(o%H#FV7$7$$\"3 +'ebtMhv*>FhdnF`zFjhy7$F`iy7$$\"399GL%z;')*>Fhdn$!3?I+_i)f`!>FV7$7$$\" 3'eTr%yr!*)*>FhdnF^xFdiy7$Fjiy7$$\"3y)ok\">lV**>Fhdn$!33t$)z1n^4:FV7$7 $$\"3+g,i\"3+'**>FhdnF\\vF^jy7$7$$\"3yf,i\"3+'**>FhdnF\\v7$$\"3QlI.QK# )**>Fhdn$!3]NFhdnFgsF[[z7$7$$\"3oJW'z* e*)**>FhdnFgs7$$\"3O)>\\m$R'***>Fhdn$!3&\\hEct+r1(F*7$7$$\"3I!>w$3l)** *>FhdnFioFh[z7$7$$\"33!>w$3l)***>Fhdn$!3yCfggggggF*7$$\"3'>zCL]'****>F hdn$!3'\\*=yiL&*HIF*7$7$$\"3/VnVL)*****>FhdnF0Fg\\z7$7$$\"3#GuOM$)**** *>FhdnF07$F^]z$\"3d9qUmw655F*7$7$F^]zF=Fd]z7$7$Fb]zF=7$$\"35&Q*GO)*)** *>Fhdn$\"3hdoc@9_^]F*7$7$F_\\zFfpF[^z7$7$Fc\\z$\"34'>111111'F*7$$\"3q$ p(\\n$=***>Fhdn$\"3SN+9TB2*4*F*7$7$Fb[zFgtFf^z7$7$Ff[zFgt7$$\"3C9Fhdn$\"3E-UT(*\\T;8FV7$7$FejyFivF__z7$7$FijyFiv7$$\"3ogUheV1**>Fhdn $\"3[U\"H58Gls\"FV7$7$F[jyF[yFh_z7$F^`z7$$\"35ypnp`#y*>Fhdn$\"3]qBWC%e H9#FV7$7$FaiyF`[lF``z7$Ff`z7$$\"3?XIY0\"ob*>Fhdn$\"3m0@iq9dpDFV7$7$$\" 3#QS>oyU_*>FhdnFh]lFh`z7$F^az7$$\"3O[EX2Zt\"*>Fhdn$\"3Oxkwae%>,$FV7$7$ $\"3e\\*=^tn:*>FhdnF]`lFbaz7$FhazF^dyF_hq-%+AXESLABELSG6$%\"xG%\"yG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Cur ve 2" }}}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 33 "Try y as the independent variable" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "solve(r1,x) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%*$)%\"yG#\"\"#\"\"$\"\"\",&F##!\" \"F'*(^##F)F'F)-%%sqrtG6#F(F)F$F)F),&F#F+*(^#F+F)F0F)F$F)F)" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(y^(2/3), y=-1..1);" }} {PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7D7$ $\"3')******fC&y!R!#@$\"38nfUch8X`!#?7$$\"3/+++#f\\(o7$$\"3$******z$RrYJF-$\"3O>YY=*ft9#F37$$\"3-+++&GyY_%F-$\"3UX5\\2 qjNFF37$$\"3B+++xpg!G(F-$\"3&GdF!RnXcPF37$$\"3\"******pc`O+\"F3$\"3Y\" *y,Jv)Gl%F37$$\"3/+++1$R[b\"F3$\"3e\"z9Kva&HiF37$$\"3;+++X]-1@F3$\"3! \\?b=e9ii(F37$$\"3L+++AlR3KF3$\"3B5m))G#*p45!#=7$$\"3C++++!o2J%F3$\"3W )fR4+G%H7FW7$$\"3#)*******>.+B'F3$\"3%)e@gm-ar:FW7$$\"36++++%Q#\\\")F3 $\"3W&oJWTAeFW$\"31F(eHfI_#[!GX7 tFW7$$\"3B+++I*zym'FW$\"3M*4>)[TNKwFW7$$\"3c******4N1#4(FW$\"3&o'3cW(3 F&zFW7$$\"3u******HYt7vFW$\"3)G%e_i'fTE)FW7$$\"3Y*******p(G**yFW$\"32a =)z7g_a)FW7$$\"3p******R6KU$)FW$\"3=A\")oXU&='))FW7$$\"34+++IbdQ()FW$ \"3g&3;Wc*HS\"*FW7$$\"3F+++g`1h\"*FW$\"3-w5$RT$eK%*FW7$$\"3`******R?Wl &*FW$\"3VcJo\")[:3(*FW7$$\"\"\"\"\"!F[v-%'COLOURG6&%$RGBG$\"#5!\"\"$F] vF]vFev-%+AXESLABELSG6$Q\"y6\"Q!Fjv-%%VIEWG6$;$FdvF]vF[v%(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 114 "Hmm, we seem to be missing half t he graph. This is a problem in interpeting roots of negative numbers. Try this:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "f := surd(y^ 2,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG-%%surdG6$*$)%\"yG\"\"# \"\"\"\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "plot(f, y=-1 ..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURV ESG6$7W7$$!\"\"\"\"!$\"\"\"F*7$$!3ommm;p0k&*!#=$\"3d]2\\mw@2(*F07$$!3v KL$3s%HaF0$\"3(4.Y+\"HObmF07$$!3 Q+++]$*4)*\\F0$\"3;>@N-(3!)H'F07$$!38+++]_&\\c%F0$\"33akoObnGfF07$$!30 +++]1aZTF0$\"3(3&Hg#QB:c&F07$$!3umm;/#)[oPF0$\"3$4!3D]vG<_F07$$!3hLLL$ =exJ$F0$\"3W7#e)y8^#z%F07$$!3)RLLLtIf$HF0$\"36)oXI%4P*[KUZJNF07$$!3c****\\P' psm\"F0$\"30lb\\CZEHIF07$$!3')****\\74_c7F0$\"3.yR&z+(o3DF07$$!3)3LLL3 x%z#)!#>$\"33\\WB*=G'**=F07$$!3gKL$e9d;J'Fdr$\"3E'=[z5U_e\"F07$$!3KMLL 3s$QM%Fdr$\"33BdeKvqN7F07$$!3T,+]ivF@AFdr$\"3V!*=o[r'>!zFdr7$$!3\\^omm ;zr)*!#@$\"3\"*\\Er\"4WV\"**!#?7$$\"3@CL$3-Dg5#Fdr$\"3=rX^BX@EwFdr7$$ \"3%pJL$ezw5VFdr$\"3k#R\\JV(3F&zF07$$\"3Mmm;HYt7vF0$\"3i?Z\">mfTE)F07$$\"3Y*******p(G **yF0$\"32a=)z7g_a)F07$$\"3]mmmT6KU$)F0$\"3EI%ooCa='))F07$$\"3fKLLLbdQ ()F0$\"3=l/um&*HS\"*F07$$\"3Z++]i`1h\"*F0$\"3)*Rrk:MeK%*F07$$\"3W++]P? Wl&*F0$\"3'Ri\"**z[:3(*F07$F+F+-%'COLOURG6&%$RGBG$\"#5F)$F*F*Fa\\l-%+A XESLABELSG6$Q\"y6\"Q!Ff\\l-%%VIEWG6$;F(F+%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 43.000000 7.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 46 "look up the help on \"surd\" for an explanation." }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "g:=solve(r2, x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG,&*$)%\"yG\"\"%\"\"\"!\"\"\"\"#F*" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plot(\{f,g\}, y=-1.5..1.5); " }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-%'CURVESG6$ 7W7$$!3++++++++:!#<$\"3?[W5(pq.J\"F*7$$!3%*****\\P&3YV\"F*$\"335%e!e`+ s7F*7$$!3!***\\iv\" F*7$$!3#****\\P\"\\J\\7F*$\"3+'\\1X=t*f6F*7$$!3&***\\7V0@&=\"F*$\"3i*) Gd'zX*>6F*7$$!33+]i&exd7\"F*$\"3X\")pc_b=#3\"F*7$$!3'***\\i+#QU1\"F*$ \"33e*Q>ezB/\"F*7$$!3****\\i!3%f+5F*$\"3:2da9gR+5F*7$$!3;++D\"oS:P*!#= $\"3FDDz'R6ld*FX7$$!3h*****\\<#)*=()FX$\"3!p!GVG+ ++vGVZoFX$\"3wmPPFX$\"3E/#)3)*pz)=&FX7$$!3'3 +++&=$z9$FX$\"3%eDL=NSvi%FX7$$!3N***\\iX/4]#FX$\"3Zo6vG(f%pRFX7$$!3B** *\\(o8y%)=FX$\"34E&HM%*4tG$FX7$$!33****\\i:#>C\"FX$\"3?0kc9r@*[#FX7$$! 3d!**\\(=d[n%*!#>$\"3d)Qrg![Dx?FX7$$!3O!***\\7ev:lFir$\"3))p:*3%\\B>;F X7$$!3d'**\\PM;>L$Fir$\"3qs96?1XN5FX7$$!3tF++](o2[\"!#?$\"3O(3zyfY\"*H \"Fir7$$\"3U(**\\7`P!fJFir$\"3czeWT!oJ***Fir7$$\"3h(***\\P>:mkFir$\"38 F*\\iT15h\"FX7$$\"3k'*****\\Z+X$*Fir$\"3!GsHtI+$f?FX7$$\"3c***\\iv&QA7 FX$\"3()\\+4'4WIY#FX7$$\"3j++]PPBW=FX$\"3u+e6xA**RKFX7$$\"3%*)*****\\N m'[#FX$\"3g_wV&RFX7$$\"36****\\(yb^6$FX$\"3I$p(f^KO&f%FX7$$\"3')** *\\PMaKs$FX$\"3bu0!G?aa<&FX7$$\"3a****\\7TW)R%FX$\"3G'>HJ8:Oy&FX7$$\"3 *y*****\\@80]FX$\"3'eGV#[_\"RI'FX7$$\"3_+++D6!Hl&FX$\"3=?.yRorOoFX7$$ \"3j)**\\P4w)RiFX$\"3agLz<#[@I(FX7$$\"3r,++vZf\")oFX$\"3c5gU1-e%z(FX7$ $\"3&z**\\P/-a[(FX$\"3M-(fXA.TC)FX7$$\"3R++v=Yb;\")FX$\"3x;y7?*R7q)FX7 $$\"3s)****\\i@Ot)FX$\"3+Z0^4[%o8*FX7$$\"3g)**\\PfL'z$*FX$\"3seh&>)Q-# e*FX7$$\"3>+++!*>=+5F*$\"3NCp)HK@,+\"F*7$$\"3-++DE&4Q1\"F*$\"37@Y)*\\' *4U5F*7$$\"3=+]P%>5p7\"F*$\"3fllrl7\"H3\"F*7$$\"38+++bJ*[=\"F*$\"3'HC% 3Zeu>6F*7$$\"33++Dr\"[8D\"F*$\"3=+2r79Bh6F*7$$\"3++++Ijy58F*$\"39>8]r! =x>\"F*7$$\"31+]P/)fTP\"F*$\"33Sde!4=gB\"F*7$$\"31+]i0j\"[V\"F*$\"3_d# px;G@F\"F*7$$\"3++++++++:F*F+-%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"!Fd\\lFc \\l-F$6$7gn7$F($!3++++++]iIF*7$$!3(****\\(oUIn9F*$!3G]'GZqI`j#F*7$F.$! 3SXh)eU#yNAF*7$$!3$**\\il:ghS\"F*$!3003)=Xh'4>F*7$F3$!3u$*)\\&[Yu-;F*7 $$!3)**\\Pff=dM\"F*$!3*y59;$3dz7F*7$F8$!3kG#ey$oU'y*FX7$$!3()*****\\;? :G\"F*$!3N(G$fLOHrpFX7$F=$!3I-hc@TegVFX7$$!3%**\\P%GFE<7F*$!3Qs%G,'\\> b>FX7$FB$\"3t*)=!H_R]n#Fir7$FG$\"3Z/c[EXFIHc5srFX7$FQ$ \"3%zh/2f:i(**FX7$FV$\"3p\">E\"HLmG7F*7$Ffn$\"3xYR![2'3A9F*7$F[o$\"3r! yT_$z0g:F*7$F`o$\"3a*yyxduSo\"F*7$Feo$\"3$*4Y6jx:!y\"F*7$Fjo$\"3[.XYSX >]=F*7$F_p$\"3=HR^M\")*y*=F*7$Fdp$\"3=e*pW(*f'Q>F*7$Fip$\"3^]nT4hQi>F* 7$F^q$\"3rsAQ$e$[!)>F*7$Fcq$\"3+AnlI-=!*>F*7$Fhq$\"3SV+3%4)3'*>F*7$F]r $\"3AT*\\[/Q()*>F*7$Fbr$\"3cW^t4@w**>F*7$F]s$\"3Ozqmv>)***>F*7$Fgs$\"3 1#>&**********>F*7$Fbt$\"3e3F*7$F\\u$\"3[\\geGnx**>F*7$Fau$\" 39eI;&=V))*>F*7$Ffu$\"3%)**H?Qk<'*>F*7$F[v$\"3kWP\")eGe!*>F*7$F`v$\"3= d.hoFy!)>F*7$Fev$\"3A*4vl-sD'>F*7$Fjv$\"3ED^9(*HCP>F*7$F_w$\"3a=9F*7$F]y$\"3>d1o&[&*fA\"F*7 $Fby$\"3mts`7%=F***FX7$Fgy$\"3=2-469w#>(FX7$F\\z$\"3[\"3splkG(QFX7$Faz $\"39?2'\\j@j)GFir7$$\"36+]7j17=7F*$!3C-nS&3dr,#FX7$Ffz$!3\"3(\\C)*)e& >XFX7$$\"3/+]i]s1\"G\"F*$!3=]o;/^=LpFX7$F[[l$!3;q1tYaw?&*FX7$$\"3.+v=n IZU8F*$!3YNj^gr/[7F*7$F`[l$!3\\qvatTtl:F*7$$\"32+++b!)[/9F*$!3Un>vv#)4 \"*=F*7$Fe[l$!3)oP+*enBQAF*7$$\"3.+D\"G:3uY\"F*$!3U(fbhbVmj#F*7$Fj[lFi \\l-F]\\l6&F_\\lFc\\lF`\\lFc\\l-%+AXESLABELSG6$Q\"y6\"Q!Fail-%%VIEWG6$ ;$!#:Fb\\l$\"#:Fb\\l%(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 "" {MPLTEXT 1 0 14 "solve(f=g, y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$ !\"\"\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "Area := int( g-f, y=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%AreaG-%$intG6$,(* $)%\"yG\"\"%\"\"\"!\"\"\"\"#F--%%surdG6$*$)F+F/F-\"\"$F./F+;F.F-" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 15 "rats. Try this" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "Area := 2*int(g-f, y=0..1);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%%AreaG#\"#7\"\"&" }}}{PARA 0 "" 0 "" {TEXT -1 113 "Let's try some \"definite\" integrals with \"indefinite\" limits \+ of integration. For example compute using MAPLE " }{XPPEDIT 18 0 " int(x^3,x=1..a)" "6#-%$intG6$*$%\"xG\"\"$/F';\"\"\"%\"aG" }{TEXT -1 5 " . " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "int(x^3, x=1..a); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*$)%\"aG\"\"%\"\"\"#F(F'#F(F'!\" \"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 " " 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{PARA 0 "" 0 "" {TEXT -1 15 "In fact try " } {XPPEDIT 18 0 "int(x^3,x=a..b)" "6#-%$intG6$*$%\"xG\"\"$/F';%\"aG%\"bG " }{TEXT -1 4 " . " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "int(x ^3, x=a..b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*$)%\"bG\"\"%\"\"\"# F(F'*&#F(F'F(*$)%\"aGF'F(F(!\"\"" }}}{PARA 0 "" 0 "" {TEXT -1 228 "Thi s result should be suggestive. We'll return to it at the end of the e xercise. But first let's consider some \"improper integrals.\" In p articular we'll look at some integrals with one, or both, limits of in tegration being " }{XPPEDIT 18 0 "infinity" "6#%)infinityG" }{TEXT -1 16 " . Recall that " }}{PARA 256 "" 0 "" {XPPEDIT 18 0 "int(f,x=a. .infinity)" "6#-%$intG6$%\"fG/%\"xG;%\"aG%)infinityG" }{TEXT -1 22 " \+ is defined to be " }{XPPEDIT 18 0 "limit(int(f,x=a..b),b=infinity) " "6#-%&limitG6$-%$intG6$%\"fG/%\"xG;%\"aG%\"bG/F.%)infinityG" }{TEXT -1 4 " ." }}{PARA 0 "" 0 "" {TEXT -1 81 "To demonstrate this definit ion perform the following sequences of MAPLE commands." }}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "int(x^(-2),x=1..a);" "6#-%$intG6$)%\" xG,$\"\"#!\"\"/F';\"\"\"%\"aG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&,&% \"aG\"\"\"F&!\"\"F&F%F'" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "li mit(int(x^(-2),x = 1 .. a),a=infinity);" "6#-%&limitG6$-%$intG6$)%\"xG ,$\"\"#!\"\"/F*;\"\"\"%\"aG/F1%)infinityG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "int( x^(-2),x=1..infinity);" "6#-%$intG6$)%\"xG,$\"\"#!\"\"/F';\"\"\"%)infi nityG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> \+ " 0 "" {XPPEDIT 19 1 "int(1/x,x = 1 .. a);" "6#-%$intG6$*&\"\"\"F'%\"x G!\"\"/F(;F'%\"aG" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#-%#lnG6#%\"aG" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "limit(int(1/x,x = 1 .. a),a=infinity);" "6#-%&limitG6$- %$intG6$*&\"\"\"F*%\"xG!\"\"/F+;F*%\"aG/F/%)infinityG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%)infinityG" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "int(1/x,x=1..infinity);" "6#-%$intG6$*&\"\"\"F'%\"xG!\"\"/F(;F'% )infinityG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%)infinityG" }}}{PARA 0 "" 0 "" {TEXT 260 42 "What is the total area under the graph of " } {TEXT -1 3 " " }{XPPEDIT 18 0 "1/x" "6#*&\"\"\"F$%\"xG!\"\"" }{TEXT -1 5 " , " }{TEXT 261 41 "above the x-axis, and to the right of x=1 " }{TEXT -1 19 "? It's Infinite." }}{PARA 258 "" 0 "" {TEXT -1 133 "What is the total volume of the object gotten from rotating this regi on about the x-axis? (WARNING, the \"obvious\" answer is wrong!) " }} {EXCHG {PARA 0 "" 0 "" {TEXT -1 35 "Using the method of \"washers' it \+ is" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "int(Pi*(1/x)^2, x=1.. infinity);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%#PiG" }}}{PARA 0 "" 0 " " {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 96 "If you have taken stati stics, or probability, you will recognize the following function. Def ine" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "p:=exp((-x^2)/2)/sqrt(2*Pi);" "6#>%\"pG*&-%$expG6#*&,$* $%\"xG\"\"#!\"\"\"\"\"F-F.F/-%%sqrtG6#*&F-F/%#PiGF/F." }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"pG,$*(-%$expG6#,$*$)%\"xG\"\"#\"\"\"#!\"\"F.F/ F.#F/F.%#PiGF0F2" }}}{PARA 0 "" 0 "" {TEXT -1 375 "It's called the \"n ormal distribution\" and its graph is the usual \"bell shaped\" curve \+ in statistics. The total area under its graph and above the x-axis is 1, the area under its graph and between x=-1 and x=1 is the portion \+ of the total population that is 1 \"standard deviation\" form the mean . Plot the graph with suitable range on x to generate a nice bell sha ped curve. " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "plot(p, x=-4 ..4);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURV ESG6$7]o7$$!\"%\"\"!$\"3o`)[wD-$Q8!#@7$$!3ommmmFiDQ!#<$\"30vC4K;uZEF-7 $$!34LLLo!)*Qn$F1$\"3Er6w]K\"pn%F-7$$!3nmmmwxE.NF1$\"3PO)p#p)Qvi)F-7$$ !3YmmmOk]JLF1$\"3:(>8(4qp^:!#?7$$!3_LLL[9cgJF1$\"3m:$=!\\gn-FFC7$$!3sm mmhN2-IF1$\"3(oz$H#QbVS%FC7$$!3!******\\`oz$GF1$\"3X#*y>uQ+7rFC7$$!3zm mm\")3DoEF1$\"3[u2T:IzM6!#>7$$!3?+++:v2*\\#F1$\"3;u_Hlj(ov\"FX7$$!3BLL L8>1DBF1$\"37K)y;=(>tEFX7$$!3jmmmw))yr@F1$\"3\\I*=**p/Jx$FX7$$!3;+++S( R#**>F1$\"3+)*z_n2J2aFX7$$!30++++@)f#=F1$\"3e\">2>'=uJvFX7$$!3-+++gi,f ;F1$\"36VZ_Ar]25!#=7$$!3qmmm\"G&R2:F1$\"3@luPQI&3G\"Fap7$$!3WLLLtK5F8F 1$\"3r*o#*fH\\Pl\"Fap7$$!3_LLL$yP2D\"F1$\"3If8f!p1[#=Fap7$$!3eLLL$HsV< \"F1$\"3wY\")eH$\\=+#Fap7$$!3*ommT2Tb3\"F1$\"3?&4AHT;K@#Fap7$$!3+-++]& )4n**Fap$\"3()=`8/%owU#Fap7$$!3bpmmTnt/GFap7$$!3F)*****\\&y!pmFap$\"3gV-2cj'R>$Fap7$$ !3Y******\\O3E]Fap$\"3!)Q[@DF0;NFap7$$!3NKLLL3z6LFap$\"3lvD88W`wPFap7$ $!3/LLLeGmCDFap$\"3W7_?lgGkQFap7$$!3sLLL$)[`PdnhTlHRFap7$$!3 9nm;aH-88Fap$\"3``zJ\">\"=bRFap7$$!3l0++]-6&)))FX$\"3,$*[dclqtRFap7$$! 3')RLLe4**RYFX$\"3?+R`(fI^)RFap7$$!3gSnmmmr[RFC$\"3P!oq=q\"R*)RFap7$$ \"3n=L$3Fr)4=FX$\"3j%=mIYp())RFap7$$\"3S6LL3Uh9SFX$\"3;wKH(>4i)RFap7$$ \"37/L$e9d$>iFX$\"3\")z=9OYr\")RFap7$$\"3'oHLL3+TU)FX$\"371PdEBHvRFap7 $$\"3AGL$efeLG\"Fap$\"3w8!oZi/n&RFap7$$\"3yELL$=2Vs\"Fap$\"3i=dR-SbIRF ap7$$\"3Khmmm7+#\\#Fap$\"3!p7Q>A`u'QFap7$$\"3)e*****\\`pfKFap$\"35#zPD L/Iy$Fap7$$\"36HLLLm&z\"\\Fap$\"3m_?Goi+NNFap7$$\"3=(******z-6j'Fap$\" 3#o-7@mU??$Fap7$$\"3q\"******4#32$)Fap$\"3_ePs\")GGDGFap7$$\"3q#****\\ AFap7$$\"3G******H%=H<\"F1$\"3p%oH4/ o_+#Fap7$$\"3qKLLo,\"QD\"F1$\"3m<_l%H*z<=Fap7$$\"35mmm1>qM8F1$\"3U(R** \\94rj\"Fap7$$\"3%)*******HSu]\"F1$\"3&>W*z?hw!G\"Fap7$$\"3'HLL$ep'Rm \"F1$\"3;wN3\">QD***FX7$$\"3')******R>4N=F1$\"3SH<6IZ=2uFX7$$\"3#emm;@ 2h*>F1$\"3N-!*QjXDTaFX7$$\"3]*****\\c9W;#F1$\"3A#yB)**[\"R$QFX7$$\"3Km mmmd'*GBF1$\"3mG:[qH-\\EFX7$$\"3j*****\\iN7]#F1$\"3:SLCoCUZ:nEF1$\"3S,!f%4Y7Q6FX7$$\"35LLL.a#o$GF1$\"3)Q]$=S#4^8(FC7$$\"3ammm ^Q40IF1$\"3z(=^:5\"ekVFC7$$\"3y******z]rfJF1$\"3D5hw7W\"*4FFC7$$\"3gmm mc%GpL$F1$\"3la,=tr*Q_\"FC7$$\"3/LLL8-V&\\$F1$\"3<#zn%[cVn))F-7$$\"3=+ ++XhUkOF1$\"3![))p3H7B%[F-7$$\"3=+++:o " 0 "" {MPLTEXT 1 0 26 "int(p, x=-1..1); evalf(% );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$erfG6#,$*$-%%sqrtG6#\"\"#\"\" \"#F,F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+?\\*o#o!#5" }}}{PARA 0 "" 0 "" {TEXT -1 78 "What is the probability of being within 2 standar d deviations from the mean? " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "int(p, x=-2..2); evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-% $erfG6#*$-%%sqrtG6#\"\"#\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+ gt*\\a*!#5" }}}{PARA 0 "" 0 "" {TEXT -1 95 "Finally confirm that the p robability of being in the population is 1 (ie the total area from \+ " }{XPPEDIT 18 0 "-infinity" "6#,$%)infinityG!\"\"" }{TEXT -1 10 " \+ to " }{XPPEDIT 18 0 "+infinity" "6#%)infinityG" }{TEXT -1 9 " is \+ 1)." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "int(p, x=-infinity..i nfinity);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{PARA 0 "" 0 " " {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 78 "Execute the following M APLE command sequences and see what you can conjecture." }}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "diff(int(x^3,x=2..t),t);" "6#-%%diffG 6$-%$intG6$*$%\"xG\"\"$/F*;\"\"#%\"tGF/" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*$)%\"tG\"\"$\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 " diff(int(x^3,x=-6..t),t);" "6#-%%diffG6$-%$intG6$*$%\"xG\"\"$/F*;,$\" \"'!\"\"%\"tGF1" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*$)%\"tG\"\"$\"\"\" " }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "diff(int(sin(t),t=a..x),x );" "6#-%%diffG6$-%$intG6$-%$sinG6#%\"tG/F,;%\"aG%\"xGF0" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#-%$sinG6#%\"xG" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "diff(int(sin(s^2),s=q..u),u);" "6#-%%diffG6$-%$intG6$-% $sinG6#*$%\"sG\"\"#/F-;%\"qG%\"uGF2" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #-%$sinG6#*$)%\"uG\"\"#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "diff(int(exp(x^2),x=10..t),t);" "6#-%%diffG6$-%$intG6$-%$expG6#* $%\"xG\"\"#/F-;\"#5%\"tGF2" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$expG6 #*$)%\"tG\"\"#\"\"\"" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 64 "The derivative with respect to the upper limit \+ is the integrand." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{PARA 0 "" 0 "" {TEXT -1 70 "One version of the FUNDAMENTAL THEOREM OF CALCULUS is the following: " }}{PARA 256 "" 0 "" {TEXT -1 40 "If f is a continuous f unction then " }{XPPEDIT 18 0 "diff(int(f(t),t=a..x),x) = f(x )" "6#/-%%diffG6$-%$intG6$-%\"fG6#%\"tG/F-;%\"aG%\"xGF1-F+6#F1" } {TEXT -1 4 " . " }}{PARA 0 "" 0 "" {TEXT -1 36 "Notice the result is \+ independent of " }{XPPEDIT 18 0 "a" "6#%\"aG" }{TEXT -1 69 ". This ca n be shown to be equivalent to the following other version:" }}{PARA 256 "" 0 "" {TEXT -1 5 " ." }}{PARA 256 "" 0 "" {TEXT -1 4 "If " } {XPPEDIT 18 0 "diff(F(x),x)=f(x)" "6#/-%%diffG6$-%\"FG6#%\"xGF*-%\"fG6 #F*" }{TEXT -1 16 " then " }{XPPEDIT 18 0 "int(f(x),x=a..b)= (F(b)-F(a)" "6#/-%$intG6$-%\"fG6#%\"xG/F*;%\"aG%\"bG,&-%\"FG6#F.\"\"\" -F16#F-!\"\"" }{TEXT -1 1 "." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 100 "In this statement the function F(x) is cal led the (indefinite) integral of f(x) and denoted " }{XPPEDIT 18 0 "int(f(x),x)" "6#-%$intG6$-%\"fG6#%\"xGF)" }{TEXT -1 414 ". \+ We will study techniques for computing indefinite integrals, and see \+ how they are used to solve simple initial valued differential equation s in exercise number 8. In the mean time see if MAPLE knows the genera l statements of the Fundamental Theorem. Perform the following MAPLE \+ commands, note that F(x) and a are undefined symbols. In each case con vert the MAPLE input to the corresponding math symbol." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "Diff(int(F(x),x=a..t),t)=diff(int(F (x),x=a..t),t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%%DiffG6$-%$intG6 $-%\"FG6#%\"xG/F-;%\"aG%\"tGF1-F+6#F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "Int(diff(F(x),x),x=a..b)=int(diff(F(x),x),x=a..b);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%$IntG6$-%%diffG6$-%\"FG6#%\"xGF-/F -;%\"aG%\"bG,&-F+6#F1\"\"\"-F+6#F0!\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 14 "Yup, it knows." }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{MARK "213 \+ 0 0" 14 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }