{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D 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 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
257 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "SymbolPi" 0 1 0 0 0 0 1 0 
0 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "SymbolPi" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 261 "SymbolPi" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 
}{CSTYLE "" -1 262 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
263 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "SymbolPi" 
0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 265 "SymbolPi" 0 1 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 266 "" 0 1 0 0 0 0 0 1 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 268 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 269 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
270 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 271 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 272 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 
1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Out
put" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 
1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "
" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 
2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT 266 25 "ENGI 3424  Example 5.10.1
" }{TEXT -1 43 "  Graphs of Partial Sums of Fourier Series " }}{PARA 
0 "" 0 "" {TEXT -1 4 "of  " }{TEXT 256 1 "f" }{TEXT -1 1 "(" }{TEXT 
257 1 "x" }{TEXT -1 10 ") = 0 on (" }{TEXT 264 1 "-" }{TEXT 259 1 "p" 
}{TEXT -1 12 ", 0); \n     " }{TEXT 262 1 "f" }{TEXT -1 1 "(" }{TEXT 
263 1 "x" }{TEXT -1 5 ") = (" }{TEXT 260 1 "p" }{TEXT -1 1 " " }{TEXT 
265 1 "-" }{TEXT -1 1 " " }{TEXT 258 1 "x" }{TEXT -1 10 ") on (0, +" }
{TEXT 261 1 "p" }{TEXT -1 2 ")." }}{PARA 0 "" 0 "" {TEXT -1 31 "The gr
aphs of the partial sums " }{TEXT 268 1 "S" }{TEXT -1 3 "2, " }{TEXT 
269 1 "S" }{TEXT -1 3 "3, " }{TEXT 270 1 "S" }{TEXT -1 3 "5, " }{TEXT 
271 1 "S" }{TEXT -1 7 "10 and " }{TEXT 272 1 "S" }{TEXT -1 21 "50  are
 plotted here." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "f(k,x) := (1 - (-1)^k)*co
s(k*x)/(k*k*Pi) + sin(k*x)/k;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%\"
fG6$%\"kG%\"xG,&**,&\"\"\"F,)!\"\"F'F.F,-%$cosG6#*&F'F,F(F,F,F'!\"#%#P
iGF.F,*&-%$sinGF1F,F'F.F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
35 "s2(x) := Pi/4 + sum(f(k,x),k=1..2);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>-%#s2G6#%\"xG,**&\"\"%!\"\"%#PiG\"\"\"F-*(\"\"#F--%$cosGF&F-F,F
+F--%$sinGF&F-*&#F-F/F--F36#,$*&F/F-F'F-F-F-F-" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 82 "plot(s2(x), x=-Pi..Pi, y=-0.5..3.5, colour=blu
e, thickness=2, \ntitle=`y = S2(x)`);" }}{PARA 13 "" 1 "" {GLPLOT2D 
335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7[o7$$!3*****4tk#fTJ!#<$\"3'*o'
)H5Ry([\"!#=7$$!3w\"*pr)3PY+$F*$\"3-qiDP8hM:F-7$$!3?3E[*ysa)GF*$\"3=8c
c$f7Gh\"F-7$$!3gX&))>2g9v#F*$\"3eY8hkxP!o\"F-7$$!3)4577.flh#F*$\"3oI,n
R!G,n\"F-7$$!3u\"QM::*H#[#F*$\"3@$)RnC,@Q:F-7$$!3y\\AhcI#yN#F*$\"3s]g&
Gk0bG\"F-7$$!3&e=d-FN*GAF*$\"39J@M%)=Hx))!#>7$$!3u%*GBP$Rc4#F*$\"3%)QK
:&HSLY$FQ7$$!3mCj&f)3xi>F*$!3o*Qy>^K:*GFQ7$$!3(or4AN*4E=F*$!3U)=@8)*o1
')*FQ7$$!3QQQ*3**=dq\"F*$!3%3mW9ek&y:F-7$$!3e!>jg@*>q:F*$!3oA@Ykj=[@F-
7$$!3b.*R+5h@]\"F*$!3#p%*o?)*p+P#F-7$$!3`;m,%)H7M9F*$!3l*\\'y#Hf^`#F-7
$$!39d=2_cbo8F*$!3[Jh%Gzs6j#F-7$$!3v(4F,K))HI\"F*$!3?wo>1MzcEF-7$$!3Z)
fe7!pWV7F*$!3Ku-*\\M[Eh#F-7$$!3S*4!R#[0R=\"F*$!3#H:M)o\\2*\\#F-7$$!3%H
7'Qw\\586F*$!3'>^_A!QmnAF-7$$!3pY@QqWIU5F*$!3U4Sa&\\]g#>F-7$$!3Wp3w$R)
\\B#*F-$!3!4y\"[5?+&3\"F-7$$!3EJc8o39GyF-$\"3$zTs4N`Z9$FQ7$$!3'=[BP-8I
f'F-$\"3O!=;?=q%=>F-7$$!3CB3<@?)yB&F-$\"3U$eVJH`R.%F-7$$!3_*)R<YoZZRF-
$\"3'=-*4%GN[L'F-7$$!38TqX=W2,EF-$\"3kiGE\"fe)[*)F-7$$!3S\"4gMblG)>F-$
\"3klW1ETU>5F*7$$!3qTJY)ocYO\"F-$\"3Gx,lr!z_9\"F*7$$!3c.@Z/\"\\$ypFQ$
\"3#3]\"e_W=\"G\"F*7$$!38,z7VKJ,J!#?$\"3x:$)esA\"eT\"F*7$$\"3p0t!3)GF;
mFQ$\"39[i+@$4Fb\"F*7$$\"39SFf3xEa8F-$\"3!yE9X3z\\o\"F*7$$\"312**yIK@d
>F-$\"3#\\0L.n)4&z\"F*7$$\"3'R2()Hve,c#F-$\"3[$p05Kr%**=F*7$$\"3IcwR<T
biQF-$\"3ZUwB+f!35#F*7$$\"3*4*=Jof03_F-$\"3as]\\bC!oE#F*7$$\"3q]1XIqOC
lF-$\"37n\">,;53Q#F*7$$\"3#o;([[j;hrF-$\"3*oHqq+2tT#F*7$$\"3%HoBlmlzz(
F-$\"3nzY%QDu6W#F*7$$\"3%3o2A?%\\^\")F-$\"33%y\"*=^4*[CF*7$$\"3ty;*ytA
]])F-$\"3%y+laW&p_CF*7$$\"3iwcdt7be))F-$\"3%f/?)o)RDX#F*7$$\"3^u'f#4)z
?@*F-$\"3qhH@1[Y[CF*7$$\"3%H[<b.-u%)*F-$\"3!Q!=,3VTJCF*7$$\"39Hv<ECF[5
F*$\"3QdXJh=:-CF*7$$\"3DZ>^Mm5;6F*$\"3mpUo&z\\zN#F*7$$\"3Olj%G%3%R=\"F
*$\"3uMrpx\"y5I#F*7$$\"3\\-)REfwoI\"F*$\"3ysmci)z'o@F*7$$\"3cM2vQyFT9F
*$\"33$)4.Y4K()>F*7$$\"3!y32s$*Qxc\"F*$\"3ib:v^sR!z\"F*7$$\"35+K?Bs#**
p\"F*$\"3m*f&[^JRn:F*7$$\"3<#H$eMa;H=F*$\"33Kkl8P_U8F*7$$\"3%>>CZ'eYk>
F*$\"3U$f!pMCZ56F*7$$\"3kYuyfix%4#F*$\"3U2J&ok(4&**)F-7$$\"3T4q))fu.GA
F*$\"3R#p$*)>2![/(F-7$$\"3y?w'**=&>gBF*$\"3I#)Q\"[y3tP&F-7$$\"3!*>3a=W
j\"[#F*$\"3\"34RdhQ>6%F-7$$\"3A?c*)yu\"3i#F*$\"3y@\\cCQJ\"*HF-7$$\"3-i
-HnWIXFF*$\"3#\\?c#R3J!G#F-7$$\"3u=RWhN.yGF*$\"3'\\0b4rvvz\"F-7$$\"3ss
(*RSA20IF*$\"3O![Wu!4of:F-7$$\"3!)***\\/l#fTJF*F+-%*THICKNESSG6#\"\"#-
%'COLOURG6&%$RGBG$\"\"!Fg_lFf_l$\"*++++\"!\")-%+AXESLABELSG6$Q\"x6\"Q
\"yF_`l-%&TITLEG6#%*y~=~S2(x)G-%%VIEWG6$;$!+aEfTJ!\"*$\"+aEfTJF[al;$!
\"&!\"\"$\"#NFaal" 1 2 0 1 10 2 2 6 1 4 2 1.000000 45.000000 
45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "
s3(x) := Pi/4 + sum(f(k,x),k=1..3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
#>-%#s3G6#%\"xG,.*&\"\"%!\"\"%#PiG\"\"\"F-*(\"\"#F--%$cosGF&F-F,F+F--%
$sinGF&F-*&#F-F/F--F36#,$*&F/F-F'F-F-F-F-*&#F/\"\"*F-*&-F16#,$*&\"\"$F
-F'F-F-F-F,F+F-F-*&#F-FBF--F3F?F-F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 82 "plot(s3(x), x=-Pi..Pi, y=-0.5..3.5, colour=blue, thic
kness=2, \ntitle=`y = S3(x)`);" }}{PARA 13 "" 1 "" {GLPLOT2D 335 335 
335 {PLOTDATA 2 "6(-%'CURVESG6#7`p7$$!3*****4tk#fTJ!#<$\"3!G*3q[aG/y!#
>7$$!3w\"*pr)3PY+$F*$!3sLXR18@_WF-7$$!3)**z*4R\\0XHF*$!3#)>$>b#RQ'o)F-
7$$!3?3E[*ysa)GF*$!3<x\"GU_MB@\"!#=7$$!3!pdN2Vm%=GF*$!3OGa#f(yv&\\\"F=
7$$!3gX&))>2g9v#F*$!3s(=`;rC]m\"F=7$$!3VMWz6[t<FF*$!3G8kK@Ha1<F=7$$!3G
B.g^&4So#F*$!3<eCT&)H7><F=7$$!397iS\"H%G]EF*$!3%3dM!R#eLq\"F=7$$!3)457
7.flh#F*$!3Yz5!>eH,m\"F=7$$!3OTKP\"4H%\\DF*$!3CTs&o%=@(\\\"F=7$$!3u\"Q
M::*H#[#F*$!3-!zwJ)[lU7F=7$$!3y\\AhcI#yN#F*$!3-4()zYUy_eF-7$$!3&e=d-FN
*GAF*$\"3AuBIQrw!H#F-7$$!3u%*GBP$Rc4#F*$\"3Zvz#[3U7/\"F=7$$!3q4Yf6^?H?
F*$\"3AXxBPV>z8F=7$$!3mCj&f)3xi>F*$\"3y?O6g+2Y;F=7$$!3'3-$3>^V%*=F*$\"
3EnF3=qJH=F=7$$!3(or4AN*4E=F*$\"3'y5=pzun!>F=7$$!3ix<br\"4fw\"F*$\"3e2
B(RLm1)=F=7$$!3QQQ*3**=dq\"F*$\"3Wk$Qw7vRw\"F=7$$!3f9&yM5fzj\"F*$\"3nL
p*>'yME:F=7$$!3e!>jg@*>q:F*$\"33E\\58X(Q=\"F=7$$!3`;m,%)H7M9F*$\"3W8#p
i*37*R#F-7$$!3v(4F,K))HI\"F*$!3)yQZkd)[<&)F-7$$!3S*4!R#[0R=\"F*$!3n2!f
59%p==F=7$$!3%H7'Qw\\586F*$!3GZKJj!\\kI#F=7$$!3pY@QqWIU5F*$!3C@/#*R'eA
o#F=7$$!3vJ1j7eJ75F*$!39!>+*yDs)z#F=7$$!3:o6z[:FB)*F=$!3[b1_Jn#f)GF=7$
$!3!)=gFr\\QB&*F=$!3?)QAQ:(RTHF=7$$!3Wp3w$R)\\B#*F=$!3G5/ve5\"G'HF=7$$
!3!*fXN7!fY())F=$!3\\(>RR\"e-UHF=7$$!3N]#[4j>e_)F=$!31EU&R9)=pGF=7$$!3
!3%>a\\-)p<)F=$!3$4%G1nQhTFF=7$$!3EJc8o39GyF=$!39<%f_qJqb#F=7$$!3cc&Hf
%pd5sF=$!3;0kc4&*4&3#F=7$$!3'=[BP-8If'F=$!3mr))[I/^A9F=7$$!3CB3<@?)yB&
F=$\"3K2S5D_=-qF-7$$!3Q1CnL%zEf%F=$\"3h\">(GsnA=?F=7$$!3_*)R<YoZZRF=$
\"3_pjQ,r79NF=7$$!3K:bJKcFuKF=$\"3l^0I/7xS_F=7$$!38TqX=W2,EF=$\"3:uho^
#Ql5(F=7$$!3S\"4gMblG)>F=$\"3R+E%4-<@\"*)F=7$$!3qTJY)ocYO\"F=$\"3y'4<p
n$[x5F*7$$!3c.@Z/\"\\$ypF-$\"3[B*yZo+6G\"F*7$$!38,z7VKJ,J!#?$\"3Y!>BGZ
VM[\"F*7$$\"3p0t!3)GF;mF-$\"3;E&e%e^y(o\"F*7$$\"39SFf3xEa8F=$\"3!>js!o
#)o\")=F*7$$\"312**yIK@d>F=$\"3'\\X>!zWlQ?F*7$$\"3'R2()Hve,c#F=$\"31d
\"*R\"eE>=#F*7$$\"38lB>NkN6KF=$\"3BcaJ`(3(=BF*7$$\"3IcwR<TbiQF=$\"3UOk
xb*pXV#F*7$$\"3ltZ&G/0``%F=$\"3!3#o\"RF0/`#F*7$$\"3*4*=Jof03_F=$\"3W3D
85or+EF*7$$\"3#4eYQtLr`&F=$\"3Fc+(3'*4ci#F*7$$\"3%3F\"Q*\\6i'eF=$\"3kw
jBm)RUk#F*7$$\"3wgf\"\\E*G&>'F=$\"3e%e@uCTml#F*7$$\"3q]1XIqOClF=$\"3e1
b2G&))Gm#F*7$$\"3sz(f*foc$o'F=$\"3e036!>MPm#F*7$$\"3w3*o%*omF%oF=$\"3A
2th&Q\"=jEF*7$$\"3zP!y*=l'>+(F=$\"3?!>I!\\![7m#F*7$$\"3#o;([[j;hrF=$\"
3)[Wvf0azl#F*7$$\"3)[U0v+m&zuF=$\"3MVG(G*HPZEF*7$$\"3%HoBlmlzz(F=$\"3
\"f*3&)eRjJEF*7$$\"3ty;*ytA]])F=$\"3Gt6YT#*RzDF*7$$\"3^u'f#4)z?@*F=$\"
3^Y0BnJt0DF*7$$\"39Hv<ECF[5F*$\"3cXVpD=MIBF*7$$\"3Olj%G%3%R=\"F*$\"3/7
0O'erK5#F*7$$\"3\\-)REfwoI\"F*$\"3m*GJ\"\\p9%)=F*7$$\"3cM2vQyFT9F*$\"3
w?(R'))o._;F*7$$\"3!y32s$*Qxc\"F*$\"3!yYU1:HkX\"F*7$$\"35+K?Bs#**p\"F*
$\"3[g[79H[&G\"F*7$$\"3<#H$eMa;H=F*$\"35%*HA8'3R:\"F*7$$\"3%>>CZ'eYk>F
*$\"3'frw[0Q#\\5F*7$$\"3kYuyfix%4#F*$\"3pO?:gSE1(*F=7$$\"3T4q))fu.GAF*
$\"3oU(*=L$pp**)F=7$$\"3y?w'**=&>gBF*$\"3]wRsdoec#)F=7$$\"3!*>3a=Wj\"[
#F*$\"333lb,<f^uF=7$$\"3A?c*)yu\"3i#F*$\"3G3KAsd`=jF=7$$\"3-i-HnWIXFF*
$\"3GL9SoV#)4^F=7$$\"3u=RWhN.yGF*$\"3E6kV7,[pOF=7$$\"3ss(*RSA20IF*$\"3
LW*H:H$=QAF=7$$\"3!)***\\/l#fTJF*$\"3$Qgf1R'G/yF--%*THICKNESSG6#\"\"#-
%'COLOURG6&%$RGBG$\"\"!FbflFafl$\"*++++\"!\")-%+AXESLABELSG6$Q\"x6\"Q
\"yFjfl-%&TITLEG6#%*y~=~S3(x)G-%%VIEWG6$;$!+aEfTJ!\"*$\"+aEfTJFfgl;$!
\"&!\"\"$\"#NF\\hl" 1 2 0 1 10 2 2 6 1 4 2 1.000000 45.000000 
45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "
s5(x) := Pi/4 + sum(f(k,x),k=1..5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
#>-%#s5G6#%\"xG,4*&\"\"%!\"\"%#PiG\"\"\"F-*(\"\"#F--%$cosGF&F-F,F+F--%
$sinGF&F-*&#F-F/F--F36#,$*&F/F-F'F-F-F-F-*&#F/\"\"*F-*&-F16#,$*&\"\"$F
-F'F-F-F-F,F+F-F-*&#F-FBF--F3F?F-F-*&#F-F*F--F36#,$*&F*F-F'F-F-F-F-*&#
F/\"#DF-*&-F16#,$*&\"\"&F-F'F-F-F-F,F+F-F-*&#F-FTF--F3FQF-F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "plot(s5(x), x=-Pi..Pi, y=-0.
5..3.5, colour=blue, thickness=2, \ntitle=`y = S5(x)`);" }}{PARA 13 "
" 1 "" {GLPLOT2D 335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7fq7$$!3*****4
tk#fTJ!#<$\"3_x0Bfj!yD&!#>7$$!35'\\8!o[6tIF*$!3=[Horx[k5F-7$$!3w\"*pr)
3PY+$F*$!3Ygw-XX*Q0'F-7$$!3)**z*4R\\0XHF*$!3)GJ*e1!3![!*F-7$$!3?3E[*ys
a)GF*$!3)H<ri7la1\"!#=7$$!3c#44,hp>&GF*$!3YDL0]@r$4\"FB7$$!3!pdN2Vm%=G
F*$!31gG>x#>&y5FB7$$!3Ch?O^K'\\y#F*$!3+,'*QK'4A-\"FB7$$!3gX&))>2g9v#F*
$!33K?@#4@;G*F-7$$!3GB.g^&4So#F*$!3\\$*f)ptd*GkF-7$$!3)4577.flh#F*$!3%
\\(p%[L[Qo#F-7$$!3u\"QM::*H#[#F*$\"3Ef)=jWWqD&F-7$$!3w:L2/61?CF*$\"3'z
B3a:1?>)F-7$$!3y\\AhcI#yN#F*$\"3%y>'yF<=:5FB7$$!3\"R[B+6,cK#F*$\"31%eH
bHn,2\"FB7$$!3/=ZVj\"zLH#F*$\"3g<jAeas!4\"FB7$$!3s^f%o@d6E#F*$\"3S00mX
S/w5FB7$$!3&e=d-FN*GAF*$\"3jgd>!Htj-\"FB7$$!3IS]u.tGi@F*$\"3k!**H'RYF%
>)F-7$$!3u%*GBP$Rc4#F*$\"3WFeLyU:Z\\F-7$$!3mCj&f)3xi>F*$!3*zvE(ywm3LF-
7$$!3'3-$3>^V%*=F*$!3/Ktnko.btF-7$$!3(or4AN*4E=F*$!3O&\\fX\\%))[5FB7$$
!3CZ2)=E/gz\"F*$!3'fS@0xf\\9\"FB7$$!3ix<br\"4fw\"F*$!3\\tR4B$*e57FB7$$
!3,3GA\"39et\"F*$!3Bo!f*\\ANV7FB7$$!3QQQ*3**=dq\"F*$!3:Kc!zV];C\"FB7$$
!3gwh=Z!R=n\"F*$!3'Q:Tx%pj(>\"FB7$$!3f9&yM5fzj\"F*$!3$eI&\\%)4V46FB7$$
!3e_3xf\"zSg\"F*$!37(f;KN%**)y*F-7$$!3e!>jg@*>q:F*$!3-0Uky?&Q4)F-7$$!3
b.*R+5h@]\"F*$!3h7DC#Rcqr$F-7$$!3`;m,%)H7M9F*$\"3][65*H%f%\\\"F-7$$!3v
(4F,K))HI\"F*$\"38?,I#*[>J6FB7$$!3Z)fe7!pWV7F*$\"3uPWIh28^9FB7$$!3S*4!
R#[0R=\"F*$\"3'Qk4/=;+j\"FB7$$!3W0\"*)eN0i;\"F*$\"3[>P,A?*4l\"FB7$$!3G
6\")QH_][6F*$\"3k1&e&Gk.c;FB7$$!36<r)G5038\"F*$\"3*z\\^()*3pW;FB7$$!3%
H7'Qw\\586F*$\"3)RNmdvJmh\"FB7$$!3#[8%QBZqx5F*$\"3OB7\"f1(y4:FB7$$!3pY
@QqWIU5F*$\"3FOL\"ox7eL\"FB7$$!3:o6z[:FB)*FB$\"3m+YjyTnn*)F-7$$!3Wp3w$
R)\\B#*FB$\"3!R$*z6')\\_.$F-7$$!3EJc8o39GyFB$!3;83f;GUp8FB7$$!3cc&Hf%p
d5sFB$!3Sr]%)3,na?FB7$$!3'=[BP-8If'FB$!3_(*QpZqptDFB7$$!3`*R/%[;iBkFB$
!3aF4tu8SuEFB7$$!3?<`3t-BaiFB$!3cxyJpYh`FFB7$$!3)[Bmx*)Q[3'FB$!3>-8\"G
XT&4GFB7$$!3b_rWAvW:fFB$!35_Cpx6YSGFB7$$!3Aq!Gr9cgu&FB$!3g&y*)GjRZ%GFB
7$$!3!z)*3=xkmd&FB$!3Y'=9+'*R3#GFB7$$!3d0**['RtsS&FB$!3qfF#y?Ltw#FB7$$
!3CB3<@?)yB&FB$!3%o\"**ya$3Ho#FB7$$!3Q1CnL%zEf%FB$!3E(yt5$\\\"*e?FB7$$
!3_*)R<YoZZRFB$!3#\\!>HQwla#*F-7$$!3K:bJKcFuKFB$\"3d%z([>&R,8)F-7$$!38
TqX=W2,EFB$\"3S9)Gaom04$FB7$$!3S\"4gMblG)>FB$\"3!)GhC?:]'f&FB7$$!3qTJY
)ocYO\"FB$\"3u/^YY\"yLT)FB7$$!3.w^X*zX7.\"FB$\"3VcT!Qk-D+\"F*7$$!3c.@Z
/\"\\$ypF-$\"3i%fh^5ux;\"F*7$$!3%oW#R9-CWOF-$\"31*oeo!G=N8F*7$$!38,z7V
KJ,J!#?$\"3un7dzFq-:F*7$$\"3!yDZ#y22`JF-$\"3I$R8)Qiju;F*7$$\"3p0t!3)GF
;mF-$\"3t3K$y#[AU=F*7$$\"3ONnL)\\Zz+\"FB$\"3g=ZayHG.?F*7$$\"39SFf3xEa8
FB$\"3C'y(QBqub@F*7$$\"312**yIK@d>FB$\"3'=/(***RW^R#F*7$$\"3'R2()Hve,c
#FB$\"3!Qz\\2V!R%f#F*7$$\"38lB>NkN6KFB$\"3E^LB5h_dFF*7$$\"3IcwR<TbiQFB
$\"3c(*)phM]E'GF*7$$\"3kN>w[=uISFB$\"3o&yA;ga-)GF*7$$\"3)\\@E,eH*)>%FB
$\"3w1Msxz)R*GF*7$$\"3K%\\!\\6t6nVFB$\"3PfQt*[.R!HF*7$$\"3ltZ&G/0``%FB
$\"3zcnOw*p+\"HF*7$$\"3*H0>Ux#\\.ZFB$\"3Iv;tI:d7HF*7$$\"3KKLe00or[FB$
\"3y6%3(\\o]6HF*7$$\"356w%pBo)R]FB$\"3'3gii]))p!HF*7$$\"3*4*=Jof03_FB$
\"3]uxn\\@9**GF*7$$\"3%3F\"Q*\\6i'eFB$\"3]<ei)G2#RGF*7$$\"3q]1XIqOClFB
$\"3%**HP1=I.u#F*7$$\"3%HoBlmlzz(FB$\"39o;z&3E8[#F*7$$\"3^u'f#4)z?@*FB
$\"3;C[U\\@$\\<#F*7$$\"39Hv<ECF[5F*$\"3E-*H&Gc[`>F*7$$\"3DZ>^Mm5;6F*$
\"3e^jZD;8o=F*7$$\"3Olj%G%3%R=\"F*$\"3+#e?k\"\\.1=F*7$$\"3%R3Vxr3aC\"F
*$\"3#H@V9,>sw\"F*7$$\"3\\-)REfwoI\"F*$\"3vi2*\\lm4u\"F*7$$\"3cM2vQyFT
9F*$\"3f%=mku/Jq\"F*7$$\"3=6*yzQ3X]\"F*$\"3#H`/vY9Eo\"F*7$$\"3!y32s$*Q
xc\"F*$\"31)49CtPPl\"F*7$$\"3&R90-3LQj\"F*$\"3Z))H1u(p4h\"F*7$$\"35+K?
Bs#**p\"F*$\"3wMA#>\\mLb\"F*7$$\"3<#H$eMa;H=F*$\"3'QJC2[o#*R\"F*7$$\"3
%>>CZ'eYk>F*$\"3us)Qw'\\K)>\"F*7$$\"3kYuyfix%4#F*$\"33SU<Qi&3+\"F*7$$
\"3T4q))fu.GAF*$\"3QClQ3hr!G)FB7$$\"3y?w'**=&>gBF*$\"3^r4[krc9qFB7$$\"
3!*>3a=Wj\"[#F*$\"3YZ5ze!eb='FB7$$\"3A?c*)yu\"3i#F*$\"3eXG4gtb#Q&FB7$$
\"3-i-HnWIXFF*$\"3q,-sC\\YXXFB7$$\"3u=RWhN.yGF*$\"3CK/TJ?EoLFB7$$\"3ss
(*RSA20IF*$\"3$*)Q(*=(['Q+#FB7$$\"3!)***\\/l#fTJF*$\"3!3E*=,t!yD&F--%*
THICKNESSG6#\"\"#-%'COLOURG6&%$RGBG$\"\"!F`]mF_]m$\"*++++\"!\")-%+AXES
LABELSG6$Q\"x6\"Q\"yFh]m-%&TITLEG6#%*y~=~S5(x)G-%%VIEWG6$;$!+aEfTJ!\"*
$\"+aEfTJFd^m;$!\"&!\"\"$\"#NFj^m" 1 2 0 1 10 2 2 6 1 4 2 1.000000 
45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 37 "s10(x) := Pi/4 + sum(f(k,x),k=1..10):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 84 "plot(s10(x), x=-Pi..Pi, y=-0.5..3.5
, colour=blue, thickness=2, \ntitle=`y = S10(x)`);" }}{PARA 13 "" 1 "
" {GLPLOT2D 335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7cw7$$!3*****4tk#fT
J!#<$\"35`ZCV(fo)>!#>7$$!3E[<mdPN2JF*$!3#eEt?n4=1\"F-7$$!35'\\8!o[6tIF
*$!3I$[Z.\\'Q)4$F-7$$!3+q$*=Ba*f0$F*$!3Mn+(35_9l$F-7$$!3#RCl$yf()QIF*$
!31'o$pOB^yQF-7$$!3%y6TN`c<-$F*$!3%)Rz()yk'))y$F-7$$!3w\"*pr)3PY+$F*$!
3!*G^B#of(3MF-7$$!3)**z*4R\\0XHF*$!3Kx>\"[6LxD&!#?7$$!3?3E[*ysa)GF*$\"
3Hc+2BaEMEF-7$$!3Q]ez*>@(oGF*$\"3+&yJd-:U>$F-7$$!3c#44,hp>&GF*$\"35'Ru
6A*HINF-7$$!3tMBU?!=_$GF*$\"3oMIc#ywCi$F-7$$!3!pdN2Vm%=GF*$\"3%4cZA#p*
pY$F-7$$!3Ch?O^K'\\y#F*$\"3S'\\Ppa`*yCF-7$$!3gX&))>2g9v#F*$\"3I-/aP-#e
R)FQ7$$!3VMWz6[t<FF*$!3+%*p(y4vS-\"F-7$$!3GB.g^&4So#F*$!3+azKucb.EF-7$
$!3qnK]@p9nEF*$!3+7qiG*R*[JF-7$$!397iS\"H%G]EF*$!3#Qf!y%e9$yMF-7$$!3cc
\"48m@Mj#F*$!3C2-an[apNF-7$$!3)4577.flh#F*$!3tPaqKUg;MF-7$$!3OTKP\"4H%
\\DF*$!3auCeX2L`\")FQ7$$!3u\"QM::*H#[#F*$\"3:1wOm#4uh#F-7$$!3[:\"p'R'R
nY#F*$\"3s\\e\"3z%[PJF-7$$!3w[Q!y7!=^CF*$\"3#Gi[ghmkZ$F-7$$!3.#eQfh?cV
#F*$\"3\"pV#R-<=9OF-7$$!3w:L2/61?CF*$\"3h+N8-m,UNF-7$$!3w#yU.3U*)Q#F*$
\"3e?aPad)Qz#F-7$$!3y\\AhcI#yN#F*$\"3'oX(oWQO(R\"F-7$$!3\"R[B+6,cK#F*$
!3eoJ]2$>j&RFQ7$$!3/=ZVj\"zLH#F*$!3@g-wu#)R4@F-7$$!3)[LS,>osF#F*$!3f#Q
Qk])G,GF-7$$!3s^f%o@d6E#F*$!3t')3+<\"[BK$F-7$$!3eo:bVi/XAF*$!3b(4\"=(3
!>ROF-7$$!3&e=d-FN*GAF*$!3%z%HiZ&))3t$F-7$$!3p\\\"H'yKF7AF*$!3'GYhp*oZ
\"e$F-7$$!3186+(G6c>#F*$!3)R'Q3Oj/#>$F-7$$!3YwIP&H\\*y@F*$!3q)4:J_aoe#
F-7$$!3IS]u.tGi@F*$!3Ym!e#QBj/=F-7$$!3`n*)[?L'*G@F*$\"3I!y;LTsl\"z!#@7
$$!3u%*GBP$Rc4#F*$\"3S.5X^n#>(>F-7$$!3qBL#3yI!z?F*$\"3?Psd]klgFF-7$$!3
A_PTCAUi?F*$\"3yE$e(>W#HP$F-7$$!3u!=/!oO\"e/#F*$\"3qRu8+CrmPF-7$$!3q4Y
f6^?H?F*$\"3>&fQJcRS\"RF-7$$!3mQ]=blf7?F*$\"3(o))zF&[#H!QF-7$$!3=nax)*
z)f*>F*$\"3)GEFE))=$QMF-7$$!3#f*eOU%z$z>F*$\"3EaB46`$>%GF-7$$!3mCj&f)3
xi>F*$\"3Mq5!))f#)40#F-7$$!3'3-$3>^V%*=F*$!3_`+MVTCI?F-7$$!3(or4AN*4E=
F*$!3MCc^&f%GtTF-7$$!3%>BXq!=06=F*$!3;te4+>cqSF-7$$!3CZ2)=E/gz\"F*$!3b
OG$Q-gWu$F-7$$!3aiir;n&4y\"F*$!3yTA9)4F-@$F-7$$!3ix<br\"4fw\"F*$!3uN+,
]ic%\\#F-7$$!3,3GA\"39et\"F*$!3OFX7^)=hu'FQ7$$!3QQQ*3**=dq\"F*$\"3!)\\
F$\\Y'zN8F-7$$!3gwh=Z!R=n\"F*$\"3;.+,5.,#H$F-7$$!3f9&yM5fzj\"F*$\"3]IH
#[0KGS%F-7$$!3f$oC;8>5i\"F*$\"3hH2q!R**o_%F-7$$!3e_3xf\"zSg\"F*$\"3J3`
k^P?RVF-7$$!3e@q\"z=Rre\"F*$\"3M>`C(pBy%QF-7$$!3e!>jg@*>q:F*$\"3El@+;)
R=3$F-7$$!3b.*R+5h@]\"F*$!370dA1/Bg:F-7$$!3`;m,%)H7M9F*$!3ALG'pxn^*[F-
7$$!3oE/.^6t<9F*$!3<SV5Laa5]F-7$$!3%oBW!=$R8S\"F*$!3H\"=J$)H\"4-[F-7$$
!3)p/e][Z\\Q\"F*$!3]6'y$ef>xUF-7$$!39d=2_cbo8F*$!3Aa#*f,xxjMF-7$$!3Xx%
*4')>xN8F*$!3!)esb@R0w6F-7$$!3v(4F,K))HI\"F*$\"37;>f$*)3-^\"F-7$$!37[G
p5w@t7F*$\"3=DT[PaCFPF-7$$!3Z)fe7!pWV7F*$\"3k7*[bQ-OB&F-7$$!3lt9aY:cG7
F*$\"3**zg`<kH.cF-7$$!3$)[V#=>wO@\"F*$\"3#=kxx`q!zcF-7$$!3ACs5P3z)>\"F
*$\"3I(47!)3%p]aF-7$$!3S*4!R#[0R=\"F*$\"3H$on2a))Q#\\F-7$$!3%H7'Qw\\58
6F*$!3#e)eX!\\:P(eFQ7$$!3pY@QqWIU5F*$!3+r_-Sn4kgF-7$$!3A*Q1:95t-\"F*$!
3'HJ!oxXMKlF-7$$!3vJ1j7eJ75F*$!3wMWGwnUamF-7$$!3%Gu[v$[@t**!#=$!3<')z)
GnXWT'F-7$$!3:o6z[:FB)*F]el$!33pHGr=h:eF-7$$!3!)=gFr\\QB&*F]el$!3E@5'H
C73l$F-7$$!3Wp3w$R)\\B#*F]el$!3!4r-HN-bb&FQ7$$!3!*fXN7!fY())F]el$\"3s(
=Y&RL5'Q$F-7$$!3N]#[4j>e_)F]el$\"3*)ynva304mF-7$$!3e&4X-%**R^$)F]el$\"
3g.xP#>@>i(F-7$$!3!3%>a\\-)p<)F]el$\"3Cg5x6bv.\")F-7$$!3.'yQ)e0c-!)F]e
l$\"31(R[A)4g(*zF-7$$!3EJc8o39GyF]el$\"3S%\\!*o#4;(G(F-7$$!3cc&Hf%pd5s
F]el$\"3k#p`O)z=hrFQ7$$!3'=[BP-8If'F]el$!3C!)y:OjEiwF-7$$!3`*R/%[;iBkF
]el$!3Q)pzv!=n`#*F-7$$!3?<`3t-BaiF]el$!3i9ysR\")QE5F]el7$$!3)[Bmx*)Q[3
'F]el$!3Q>/,x(R\"f5F]el7$$!3b_rWAvW:fF]el$!3)R*[e*RDw,\"F]el7$$!3!z)*3
=xkmd&F]el$!3Qmtr\"[w-7(F-7$$!3CB3<@?)yB&F]el$!3')eGqUz[5;F-7$$!3\"[h@
us!G:\\F]el$\"3w$4Q*RGHoZF-7$$!3Q1CnL%zEf%F]el$\"3sQ[e(*\\(42\"F]el7$$
!3<-yz'yy8V%F]el$\"3/P0T>YT+8F]el7$$!3'z>B*R\"y+F%F]el$\"3g.[rH[\\f9F]
el7$$!3u$f[I\\x(3TF]el$\"3eIyz7]nK:F]el7$$!3_*)R<YoZZRF]el$\"3MB&zAO1&
3:F]el7$$!3K:bJKcFuKF]el$\"3YJIU\"3'41KF-7$$!38TqX=W2,EF]el$!3*>)G_\"=
a=%=F]el7$$!3q.y?-A_YCF]el$!3YsrrD\"*3fAF]el7$$!3Em&ef)*p>H#F]el$!3]+@
x?vcxDF]el7$$!3cZR$y(Qp9AF]el$!3slE1RZQ*o#F]el7$$!3%)G$4(pxTP@F]el$!3?
c#Ry^\\Uw#F]el7$$!375Zeh;9g?F]el$!3[Hk7H(f$)z#F]el7$$!3S\"4gMblG)>F]el
$!3=1m(=7C\")y#F]el7$$!3c;;'47hPn\"F]el$!3@W9w[OYTAF]el7$$!3qTJY)ocYO
\"F]el$!3!**o:R:]0y(F-7$$!3%)e\"fRC^z>\"F]el$\"3Y$\\!\\vI4hTF-7$$!3.w^
X*zX7.\"F]el$\"3QU1e9!='*)=F]el7$$!3#>$>^\\NSX')F-$\"3R%*oWAWOEOF]el7$
$!3c.@Z/\"\\$ypF-$\"3yS$4Fw?,g&F]el7$$!3>vAVfYH6`F-$\"3]mxH$)eNvxF]el7
$$!3%oW#R9-CWOF-$\"3_FeUb&[3,\"F*7$$!3[=ENpd=x>F-$\"3[O)=s.]\\D\"F*7$$
!38,z7VKJ,JFQ$\"3M!R5zp*Q/:F*7$$\"3%QBnpsp9U\"F-$\"3K8;Xe;/j<F*7$$\"3!
yDZ#y22`JF-$\"3*4-!3r?%\\,#F*7$$\"3u\"GF&H=n%)[F-$\"3)*)*)[KhwRD#F*7$$
\"3p0t!3)GF;mF-$\"3yn=:RQbuCF*7$$\"3kHt3KR(yM)F-$\"3[v()40!R=n#F*7$$\"
3ONnL)\\Zz+\"F]el$\"3ddSuw(\\>%GF*7$$\"3uPZY.w5\"=\"F]el$\"3=3x8sT5#)H
F*7$$\"39SFf3xEa8F]el$\"3um)R%=Pr!4$F*7$$\"3)=.U\"*3/]]\"F]el$\"3[N.)=
9l#fJF*7$$\"3gB8pp/ub;F]el$\"3vqQ^bx7/KF*7$$\"3Ypf'*f'36t\"F]el$\"3***
*)*)o19!=KF*7$$\"3L:1C]oZ1=F]el$\"3T(=S;mgkA$F*7$$\"3=h_^S]%=)=F]el$\"
3)\\UqX0/(HKF*7$$\"312**yIK@d>F]el$\"3Q-l&zc7!GKF*7$$\"3]!\\))=*foeAF]
el$\"3?B^?)G.#yJF*7$$\"3'R2()Hve,c#F]el$\"3g@/7M4'p2$F*7$$\"38lB>NkN6K
F]el$\"3qGGyT2***z#F*7$$\"3IcwR<TbiQF]el$\"3KSNZ*[%p2EF*7$$\"3kN>w[=uI
SF]el$\"3)zl.N\"*4Ye#F*7$$\"3)\\@E,eH*)>%F]el$\"3C2:se2WsDF*7$$\"3K%\\
!\\6t6nVF]el$\"35i+2@L.qDF*7$$\"3ltZ&G/0``%F]el$\"3wr[#4<=dd#F*7$$\"3K
KLe00or[F]el$\"3;-Qm4M$Hg#F*7$$\"3*4*=Jof03_F]el$\"38/E.Z<\"ej#F*7$$\"
3SN#z5&[fs`F]el$\"3[+%=d?!e[EF*7$$\"3#4eYQtLr`&F]el$\"3E+5Jlj#ol#F*7$$
\"3WERh;En,dF]el$\"3KL\\K!of#fEF*7$$\"3%3F\"Q*\\6i'eF]el$\"3IK@UG!=]l#
F*7$$\"3wgf\"\\E*G&>'F]el$\"3<Fr>pFMDEF*7$$\"3q]1XIqOClF]el$\"3))Q))[%
>Y)pDF*7$$\"3#o;([[j;hrF]el$\"32))3*\\)\\%=U#F*7$$\"3%HoBlmlzz(F]el$\"
3K,*e6tM+H#F*7$$\"3!>olV$*HZ(zF]el$\"3;\">sAGM^E#F*7$$\"3%3o2A?%\\^\")
F]el$\"3YixS_@PYAF*7$$\"3zz'\\+Ze#G$)F]el$\"3!e**RGQvNB#F*7$$\"3ty;*yt
A]])F]el$\"324>c(3[hA#F*7$$\"3mxOt0qy\"o)F]el$\"3?W;,V18BAF*7$$\"3iwcd
t7be))F]el$\"3$yCNk>#GBAF*7$$\"3dvwTTbJN!*F]el$\"3!y\"Rl/*z^A#F*7$$\"3
^u'f#4)z?@*F]el$\"3[:fo&QFtA#F*7$$\"3iET#eO54P*F]el$\"3\"oLe:Ak#GAF*7$
$\"3ty&)QA4uH&*F]el$\"3Y/`NHbDFAF*7$$\"3%3.`*y9d)o*F]el$\"3cf>'oQzMA#F
*7$$\"3%H[<b.-u%)*F]el$\"3(*4v'[u,j@#F*7$$\"3sQY'[J1l,\"F*$\"3M'e+W\"*
=.>#F*7$$\"39Hv<ECF[5F*$\"3yD8wvb$)[@F*7$$\"3DZ>^Mm5;6F*$\"3u.Ke1?7E?F
*7$$\"3Olj%G%3%R=\"F*$\"3vS&3>q8&3>F*7$$\"3kCZH!yuY@\"F*$\"3%3%3f'GH9(
=F*7$$\"3%R3Vxr3aC\"F*$\"3/C$*ff8xY=F*7$$\"3AV9>bE9w7F*$\"3.pK^<gnK=F*
7$$\"3\\-)REfwoI\"F*$\"3nPR(y*G2D=F*7$$\"3^Nv;/pZS8F*$\"37!G6qF?z\"=F*
7$$\"3_o_p:s2u8F*$\"3)=08;hl_!=F*7$$\"3b,IAFvn29F*$\"3%oKl[Z1>y\"F*7$$
\"3cM2vQyFT9F*$\"3q8'[z#)>cu\"F*7$$\"3=6*yzQ3X]\"F*$\"3g&>19HW)[;F*7$$
\"3!y32s$*Qxc\"F*$\"3lF*fV[GUa\"F*7$$\"35+K?Bs#**p\"F*$\"3WIDC!\\VnU\"
F*7$$\"38B#[gxOAt\"F*$\"3WrM4(o1]T\"F*7$$\"39YK*)Gjak<F*$\"3TdR.V0J,9F
*7$$\"3;p#Q<)e&oz\"F*$\"3g)*>.Tv?\"Q\"F*7$$\"3<#H$eMa;H=F*$\"3Mt>\\?)>
>N\"F*7$$\"3/UPl\\c\"o*=F*$\"3i$[==VG:E\"F*7$$\"3%>>CZ'eYk>F*$\"35dRb6
#4f:\"F*7$$\"3kYuyfix%4#F*$\"3S)=p7@&)*G5F*7$$\"3-Gs$)foSh@F*$\"3a$3(
\\,:ou**F]el7$$\"3T4q))fu.GAF*$\"3A-;.\"fZ*z%*F]el7$$\"35:t#\\K;TH#F*$
\"3Kz!*4$3Jql)F]el7$$\"3y?w'**=&>gBF*$\"3%\\]A*4)\\#owF]el7$$\"3!*>3a=
Wj\"[#F*$\"3#Q6xk**QzO'F]el7$$\"3A?c*)yu\"3i#F*$\"3+a>$p%3\")4bF]el7$$
\"3-i-HnWIXFF*$\"3W<L(oMh\\#RF]el7$$\"3u=RWhN.yGF*$\"3+2<l2\\Y)R#F]el7
$$\"3ss(*RSA20IF*$\"39bg!337Yd\"F]el7$$\"3!)***\\/l#fTJF*$\"31%R._ogo)
>F--%*THICKNESSG6#\"\"#-%'COLOURG6&%$RGBG$\"\"!FbjnFajn$\"*++++\"!\")-
%+AXESLABELSG6$Q\"x6\"Q\"yFjjn-%&TITLEG6#%+y~=~S10(x)G-%%VIEWG6$;$!+aE
fTJ!\"*$\"+aEfTJFf[o;$!\"&!\"\"$\"#NF\\\\o" 1 2 0 1 10 2 2 6 1 4 2 
1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{PARA 11 "" 1 "" {TEXT 
-1 0 "" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 70 "The Gibbs phenomenon bec
omes quite pronounced by the 50th partial sum:" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 37 "s50(x) := Pi/4 + sum(f(k,x),k=1..50):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 84 "plot(s50(x), x=-Pi..Pi, y=-0
.5..3.5, colour=blue, thickness=2, \ntitle=`y = S50(x)`);" }}{PARA 13 
"" 1 "" {GLPLOT2D 335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7ct7$$!3*****
4tk#fTJ!#<$\"3E0c0s$\\`O'!#?7$$!3w\"*pr)3PY+$F*$\"3SHa'oi%Q9cF-7$$!3?3
E[*ysa)GF*$\"357D=ZsFaNF-7$$!3gX&))>2g9v#F*$\"3:MUi)yc@V(F-7$$!3)4577.
flh#F*$\"3[nwqDA(Q&)*F-7$$!3u\"QM::*H#[#F*$\"3;4NGC)>[v*F-7$$!3y\\AhcI
#yN#F*$\"37P.vOOx+5!#>7$$!3&e=d-FN*GAF*$\"3aPXM7+/$H*F-7$$!3u%*GBP$Rc4
#F*$\"3)*3cj(Qxh8'F-7$$!3mCj&f)3xi>F*$\"3h$RGa<)H@<F-7$$!3(or4AN*4E=F*
$!3O(QPN\"\\`acF-7$$!3QQQ*3**=dq\"F*$!3)o/j#)HdG[$F-7$$!3e!>jg@*>q:F*$
!3:MoY_hiG5FL7$$!3`;m,%)H7M9F*$!3W`i7M,G\"[\"FL7$$!3v(4F,K))HI\"F*$!3U
41>hhY%f\"FL7$$!3S*4!R#[0R=\"F*$!3)y#[TVM'4w\"FL7$$!3pY@QqWIU5F*$!3uIn
xa#GwQ\"FL7$$!3Wp3w$R)\\B#*!#=$!3wX1!4>:S'=FL7$$!3EJc8o39GyF\\q$!3P,(G
EinD%fF-7$$!3e7Te())\\Pn(F\\q$\"3[>u0='*ft8FL7$$!3\"RfKq!*e$>vF\\q$\"3
VW&R`>O#3EFL7$$!38Nov;M;UuF\\q$\"3ucIbNrk$o#FL7$$!3Cv5[Ez'\\O(F\\q$\"3
e\\kf@?G`BFL7$$!3M:`?OCx(G(F\\q$\"37`4*HrN!f;FL7$$!3cc&Hf%pd5sF\\q$\"3
yc()**QWB()pF-7$$!3)y.y`'f=cqF\\q$!3l8'H*=rvP9FL7$$!3@>l#[)\\z,pF\\q$!
3a,'=%)[Rh\"GFL7$$!3Vg2b%\\*fCoF\\q$!3mer\"*)HhR#HFL7$$!3a+]F/SSZnF\\q
$!3e>O&['f%)*e#FL7$$!3kS#**R^3-n'F\\q$!3Y=bv$['oa=FL7$$!3'=[BP-8If'F\\
q$!3!>#*)*[x*G5#)F-7$$!3b_rWAvW:fF\\q$!3!H)=g-wEjO!#@7$$!3CB3<@?)yB&F
\\q$\"3Uhv:*[v%36FL7$$!3'3_LxpJs:&F\\q$\"3c?%*fpxZ+DFL7$$!3[=iHu8ew]F
\\q$\"3V/*ph:W!>NFL7$$!3k;*e30Jf*\\F\\q$\"3'pM]r=>K)RFL7$$!3\"[h@us!G:
\\F\\q$\"3)*y=P$zs\")z$FL7$$!3g5qa!3!)Rv%F\\q$\"3%G#=*H#z^D;FL7$$!3Q1C
nL%zEf%F\\q$!3YqEOw00b<FL7$$!3+/^B5\"H?^%F\\q$!3&*ff'*QBbPKFL7$$!3<-yz
'yy8V%F\\q$!38FAkGR$=B%FL7$$!3M+0Oj%G2N%F\\q$!3[yF(enVYb%FL7$$!3'z>B*R
\"y+F%F\\q$!3s)*RiW:XFTFL7$$!3u$f[I\\x(3TF\\q$!3'y?Z7M4TJ\"FL7$$!3_*)R
<YoZZRF\\q$\"3k#p&>C2P'e#FL7$$!3)*z;W%pEL'QF\\q$\"3jdFt_\\)GA%FL7$$!3)
4P4Faw\"zPF\\q$\"3ojjRVPaf^FL7$$!3'>1x4RE]p$F\\q$\"3_]%4&p/'[>&FL7$$!3
V_ZCRi(3h$F\\q$\"3msp&zfM8G%FL7$$!3)Q8!yNfdUMF\\q$\"3z$H$zWs_7DF-7$$!3
K:bJKcFuKF\\q$!3'ot)p.emmVFL7$$!3bg$\\kb+AB$F\\q$!3Ogn13M)\\@&FL7$$!3y
0Ke![D,>$F\\q$!3iJ-'QgCg%eFL7$$!3+^qr//0[JF\\q$!3qx7o]:JDiFL7$$!3y'*3&
)G`(f5$F\\q$!3pX*G]<O)GjFL7$$!3cUZ)HD+R1$F\\q$!3x:A^2WTWhFL7$$!3y(e=r<
D=-$F\\q$!3%R+L_4]Dn&FL7$$!3+LCD,,vzHF\\q$!3+Lx'e)yvE\\FL7$$!3ByiQD]nP
HF\\q$!3\\xLQmnJLRFL7$$!3of;#>su$pFF\\q$\"3]^;f_Zh0;FL7$$!38TqX=W2,EF
\\q$\"3+9:7,,;xmFL7$$!3TACL5$)zBDF\\q$\"3'*zhdahE`xFL7$$!3q.y?-A_YCF\\
q$\"3Y-Mr%3#Q!o(FL7$$!3)\\=$3%4Y#pBF\\q$\"3/>Y4#*zT'R'FL7$$!3Em&ef)*p>
H#F\\q$\"3#RIoX#3(3-%FL7$$!3%)G$4(pxTP@F\\q$!3U#44*HD!Go#FL7$$!3S\"4gM
blG)>F\\q$!3??&G'4)>Cr)FL7$$!31#y(R*\\FU%>F\\q$!3bwH!oQ*3G'*FL7$$!3qsa
LX%*e0>F\\q$!3b+\")H7./?5F\\q7$$!3MjJF\"R^p'=F\\q$!35VF[UuJR5F\\q7$$!3
*R&3@PLJG=F\\q$!3;l'yFt5$=5F\\q7$$!3GNi3Hs.^<F\\q$!3S!yL$z,fL&)FL7$$!3
c;;'47hPn\"F\\q$!3K#H)))f\"HTO&FL7$$!38zBr/*3#>:F\\q$\"3w+H_qiX)*QFL7$
$!3qTJY)ocYO\"F\\q$\"3ytEf<'e7E\"F\\q7$$!3*f9PtK!)HK\"F\\q$\"3vir(z&*
\\'39F\\q7$$!3G]6@mRI\"G\"F\\q$\"3w&*GIWgt)\\\"F\\q7$$!3da^30wiR7F\\q$
\"3:p%f\"fliB:F\\q7$$!3%)e\"fRC^z>\"F\\q$\"3kLsgqNtx9F\\q7$$!3Xnrq@&)f
96F\\q$\"3'[PKn'4%\\;\"F\\q7$$!3.w^X*zX7.\"F\\q$\"3%***))pvH@RdFL7$$!3
#>$>^\\NSX')FL$!3=k$=&GfLL6F\\q7$$!3c.@Z/\"\\$ypFL$!39n[r?Ri(f#F\\q7$$
!3YY@@$\\&ehlFL$!3Gx([hAX;w#F\\q7$$!3P*=_>)=#[9'FL$!3q4PqiQ)3!GF\\q7$$
!3GKApq#e!GdFL$!3M!\\E]0qfp#F\\q7$$!3>vAVfYH6`FL$!3#*=a]!f:,V#F\\q7$$!
3-hB\"pVnxZ%FL$!3_rnV_&y[O\"F\\q7$$!3%oW#R9-CWOFL$\"3K#3`y7%znXFL7$$!3
u*[KJgwuA$FL$\"3IF](R%[o^;F\\q7$$!3lKD(=*Hr5GFL$\"3.FtRwP*p-$F\\q7$$!3
cvDh!Q\\RR#FL$\"3G_;tsoFqXF\\q7$$!3[=ENpd=x>FL$\"3k-ior@\"[E'F\\q7$$!3
QhE4e@Ug:FL$\"3yrF]\\!f**3)F\\q7$$!3H/F$oaeO9\"FL$\"3\\q.'GQl@+\"F*7$$
!3/susb$\\*osF-$\"3F#**p\"H7I.7F*7$$!38,z7VKJ,JF-$\"3;s;Tr?]49F*7$$\"3
ve@2&Q*oF7F-$\"3,$[0t@!zD;F*7$$\"3k=AF8?pcbF-$\"31Ty6FezS=F*7$$\"3_yAZ
TYp&))*F-$\"33@_&y3$3^?F*7$$\"3%QBnpsp9U\"FL$\"3E3@#e%pM`AF*7$$\"3#)Rs
y*)*pV&=FL$\"351?k#o1XW#F*7$$\"3#eC2EDqsG#FL$\"3lmq%4\">z@EF*7$$\"3!=D
Fa^q,s#FL$\"3u&=sP5=Gy#F*7$$\"3!yDZ#y22`JFL$\"3.Q`Ed\"\\c#HF*7$$\"3xps
)QIr)=SFL$\"3#pO:U^#\\^JF*7$$\"3u\"GF&H=n%)[FL$\"3c\\]]c8>%H$F*7$$\"3t
(GZB4svJ&FL$\"3WE:$y])3NLF*7$$\"3s$Hn^Ns/v&FL$\"3!)*=I.*32dLF*7$$\"3s*
H()zhsL='FL$\"3Y@U1K_shLF*7$$\"3p0t!3)GF;mFL$\"37UJT=3+^LF*7$$\"3kHt3K
R(yM)FL$\"3L-e@[;k,KF*7$$\"3ONnL)\\Zz+\"F\\q$\"3EQ#)[\\y'=+$F*7$$\"3aO
2!4bFX4\"F\\q$\"3sRQc.:eDHF*7$$\"3uPZY.w5\"=\"F\\q$\"3/Uk)GH6%yGF*7$$
\"3NQnuHwRC7F\\q$\"3Yi#Q)>LzmGF*7$$\"3'*Q(Ggl(on7F\\q$\"39E(*>ti(H'GF*
7$$\"3TR2J#ox4J\"F\\q$\"3a*4+![ITmGF*7$$\"39SFf3xEa8F\\q$\"3%f%Qc^\\Fw
GF*7$$\"3)=.U\"*3/]]\"F\\q$\"3x(ee&*)\\IWHF*7$$\"3gB8pp/ub;F\\q$\"30Hu
\"[We=-$F*7$$\"3Ypf'*f'36t\"F\\q$\"3Iu->/@<[IF*7$$\"3L:1C]oZ1=F\\q$\"3
=Q)eLUI01$F*7$$\"3SQzPX4;W=F\\q$\"3A1Y.)=!*31$F*7$$\"3=h_^S]%=)=F\\q$
\"3-do)zwRt0$F*7$$\"3)Re_c8H&>>F\\q$\"338O$f2E+0$F*7$$\"312**yIK@d>F\\
q$\"3jS![Qa?#RIF*7$$\"3]!\\))=*foeAF\\q$\"3!QV!f_VL()GF*7$$\"3'R2()Hve
,c#F\\q$\"3/fR(\\3l=\"GF*7$$\"3IcwR<TbiQF\\q$\"3h7QQKjA8FF*7$$\"3*4*=J
of03_F\\q$\"3\"[6*)**=RYg#F*7$$\"3q]1XIqOClF\\q$\"3SU8`RhD([#F*7$$\"3%
HoBlmlzz(F\\q$\"3M;6i8u>kBF*7$$\"3^u'f#4)z?@*F\\q$\"35\"4V'RngQAF*7$$
\"39Hv<ECF[5F*$\"3hSXa/X#46#F*7$$\"3Olj%G%3%R=\"F*$\"3y6zWqCRv>F*7$$\"
3\\-)REfwoI\"F*$\"3)HPPbzu5&=F*7$$\"3cM2vQyFT9F*$\"3HcmFNDQ8<F*7$$\"3!
y32s$*Qxc\"F*$\"3yb$>m*\\F&e\"F*7$$\"35+K?Bs#**p\"F*$\"3-_Wr\\*)f[9F*7
$$\"3<#H$eMa;H=F*$\"3#z;Rgy7iJ\"F*7$$\"3%>>CZ'eYk>F*$\"3I:.U*f3U<\"F*7
$$\"3kYuyfix%4#F*$\"3z#fQ/%z$3/\"F*7$$\"3T4q))fu.GAF*$\"3f(4W!\\42U!*F
\\q7$$\"3y?w'**=&>gBF*$\"39O.\"oS\"=2xF\\q7$$\"3!*>3a=Wj\"[#F*$\"3a3;4
?9-*\\'F\\q7$$\"3A?c*)yu\"3i#F*$\"3`_66qsc6^F\\q7$$\"3-i-HnWIXFF*$\"3y
,D3&34w'QF\\q7$$\"3u=RWhN.yGF*$\"3[&os9YYdc#F\\q7$$\"3ss(*RSA20IF*$\"3
t]v(GrvdI\"F\\q7$$\"3!)***\\/l#fTJF*$\"3)4Tb?P\\`O'F--%*THICKNESSG6#\"
\"#-%'COLOURG6&%$RGBG$\"\"!Fb[nFa[n$\"*++++\"!\")-%+AXESLABELSG6$Q\"x6
\"Q\"yFj[n-%&TITLEG6#%+y~=~S50(x)G-%%VIEWG6$;$!+aEfTJ!\"*$\"+aEfTJFf\\
n;$!\"&!\"\"$\"#NF\\]n" 1 2 0 1 10 2 2 6 1 4 2 1.000000 45.000000 
45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}}{MARK "0 2 10" 21 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }