{VERSION 5 0 "IBM INTEL NT" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Heading 1" -1 3 1 
{CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 
4 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Ti
mes" 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 3 "" 0 "" {TEXT -1 46 "November, 2004. Convergenc
e of Fourier series." }}{PARA 0 "" 0 "" {TEXT -1 32 " The function, f(
x)=2x+1, -L<x<L" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "f := x -> 2*x+1; L:=4;" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&9$\"
\"#\"\"\"F/F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"\"%" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "a1 := k -> 1/L*int(f(x)*cos(
k*Pi*x/L),x=-L..L);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#a1Gf*6#%\"kG
6\"6$%)operatorG%&arrowGF(*&%\"LG!\"\"-%$intG6$*&-%\"fG6#%\"xG\"\"\"-%
$cosG6#**9$F7%#PiGF7F6F7F-F.F7/F6;,$F-F.F-F7F(F(F(" }}}{EXCHG {PARA 0 
"" 0 "" {TEXT -1 87 "Note that the integral has not been evaluated.\nN
ext we can calculate some partial sums." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 58 "cs1 := (x,n) -> a1(0)/2 + sum(a1(k)*cos(k*Pi*x/L),k=1
..n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$cs1Gf*6$%\"xG%\"nG6\"6$%)o
peratorG%&arrowGF),&-%#a1G6#\"\"!#\"\"\"\"\"#-%$sumG6$*&-F/6#%\"kGF3-%
$cosG6#**F;F3%#PiGF39$F3%\"LG!\"\"F3/F;;F39%F3F)F)F)" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 47 "b1 := k -> 1/L*int(f(x)*sin(k*Pi*x/L),x=-
L..L);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#b1Gf*6#%\"kG6\"6$%)operat
orG%&arrowGF(*&%\"LG!\"\"-%$intG6$*&-%\"fG6#%\"xG\"\"\"-%$sinG6#**9$F7
%#PiGF7F6F7F-F.F7/F6;,$F-F.F-F7F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 48 "ss1 := (x,n) -> sum(b1(k)*sin(k*Pi*x/L),k=1..n);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ss1Gf*6$%\"xG%\"nG6\"6$%)operatorG%
&arrowGF)-%$sumG6$*&-%#b1G6#%\"kG\"\"\"-%$sinG6#**F4F5%#PiGF59$F5%\"LG
!\"\"F5/F4;F59%F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "pl
ot(ss1(x,10)+cs1(x,10),x=-10..10,y=-10..10);" }}{PARA 13 "" 1 "" 
{GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7cx7$$!#5\"\"!$!3em`Q
we@_K!#<7$$!3!pmmm\"p0k&*F-$!3\"=\"\\')fCeA?F-7$$!3uKL$3<XZ=*F-$!35V)>
KX'3n9F-7$$!3WmmmT%p\"e()F-$!30e9oMgr/_!#=7$$!3/nmm\"4m(G$)F-$\"3**f7F
\\V-HWF=7$$!3OLL$3i.9!zF-$\"3lMp&Q3\")4-\"F-7$$!3`****\\iPH.xF-$\"3E?*
RWD&[Q9F-7$$!3fmm;/R=0vF-$\"3m]A#)fR'**=#F-7$$!3CLLL$3,RX(F-$\"3#o*>LW
C%\\L#F-7$$!3x++]i#=ES(F-$\"3<@SSNEAPCF-7$$!3UnmmTaL^tF-$\"33v;f,.Y'\\
#F-7$$!31ML$3i_+I(F-$\"3M)[&fyz()>DF-7$$!3s++++)p([sF-$\"3*))[^2nw5_#F
-7$$!3Mnm;zp[(>(F-$\"3jO:&yjBx^#F-7$$!3+MLLeT?YrF-$\"3SqJy6`]GDF-7$$!3
k++]P8#\\4(F-$\"3q0w7&[l)pDF-7$$!3#RLL3FuF)oF-$\"3=6(HLM)>%=$F-7$$!3Km
m;/siqmF-$\"3TWJw'=,w$RF-7$$!3\"))*\\ilQ>WmF-$\"3G'o98N0e)RF-7$$!3=KL3
F0w<mF-$\"36*H.%ee%3-%F-7$$!3al;a)=F8f'F-$\"3h-(p:'eSVSF-7$$!3#*)*****
\\Q*[c'F-$\"3UQ\"yJgmZ0%F-7$$!3mlm\"H<F?^'F-$\"3C>UiwUm^SF-7$$!3SKL$e
\\g\"fkF-$\"3!y#41Q%G6.%F-7$$!3:***\\(=QH1kF-$\"3%*p(G+/ul,%F-7$$!3)em
m;9FMN'F-$\"3=O5t_J(4.%F-7$$!3jKLek/c+jF-$\"3Sqty8oa#4%F-7$$!3Q****\\(
y$pZiF-$\"31QuB[-@6UF-7$$!3+mmT&Gu,.'F-$\"3['GaC'e2D^F-7$$!3jKLL$yaE\"
eF-$\"3ENo4b&Q!GcF-7$$!3zlmTN\"for&F-$\"3OJ&4B1+?b&F-7$$!3'*)***\\([j5
i&F-$\"3'HIK.p%yeaF-7$$!3al;ajc;tbF-$\"35(y**H%R^iaF-7$$!37KLeRyEDbF-$
\"31haEFg\"Q_&F-7$$!3q)*\\i:+PxaF-$\"3E@v(\\;P8l&F-7$$!3<mmm\">s%HaF-$
\"3POebrI*Q%eF-7$$!31***\\7)*G;K&F-$\"3#*)=K')>f=W'F-7$$!3$GLL3x&y8_F-
$\"36Z?N?'R4.(F-7$$!3s**\\ilT')f^F-$\"30l.860(GA(F-7$$!3hmmTgD%f5&F-$
\"3A(3Nk0B*4tF-7$$!3g*\\7yv\")*y]F-$\"3\"oh54!Rc6tF-7$$!3iK$3_&4-_]F-$
\"3%)**Q=e`c'G(F-7$$!3hlTg_,1D]F-$\"3_tFnd$*fPsF-7$$!3]******\\$*4)*\\
F-$\"3kb*>/0V'orF-7$$!3a*****\\K8)*)[F-$\"3Y><8m)o\"3oF-7$$!3g*******H
F:y%F-$\"3[_`.WV!zl'F-7$$!3k*****\\FTKn%F-$\"3g([dSKD94(F-7$$!3o******
\\_&\\c%F-$\"3X2B&f=*)z6)F-7$$!3Q++++;ggWF-$\"3%zdo1jd$=#*F-7$$!3?+++]
zCcVF-$\"3[/n<i`A!p*F-7$$!36+++D62/VF-$\"3sMVeWr*RY*F-7$$!3-++++V*=D%F
-$\"3'\\6pz/y%[))F-7$$!3!******\\Z<(*>%F-$\"3<?eyro,DyF-7$$!3%)******
\\1aZTF-$\"33$G-t[X]T'F-7$$!3@;a8s)\\Q7%F-$\"3O)QBcuBCm&F-7$$!3eK3F%4f
,5%F-$\"3#fUlfv$[][F-7$$!3'*[iS;$ok2%F-$\"35$)Q!ydt())RF-7$$!3Am;aQvx_
SF-$\"3/#Q^WKdz3$F-7$$!3\\$3x1w'3HSF-$\"3[PHZj4ef@F-7$$!3()*\\7G)fR0SF
-$\"3Jd[4RW\"e@\"F-7$$!3C;z%\\?0<)RF-$\"3qqm)3/q<p#F=7$$!31LL3FW,eRF-$
!3S$o8egoun'F=7$$!3))\\(=#\\OKMRF-$!3!zF(p%G$f#e\"F-7$$!3EmTNrGj5RF-$!
3OXa>,*)\\jCF-7$$!33$e*[$4Up)QF-$!37mc$4En$*H$F-7$$!3!***\\i:8DjQF-$!3
wTW'Gj9,3%F-7$$!35Le*)f(pe\"QF-$!3B'yl<4aAW&F-7$$!3Imm;/#)[oPF-$!3#yWl
m,^p\\'F-7$$!3j*\\i:&p97PF-$!3'QvIoE2gJ(F-7$$!3'HLe*)p0el$F-$!3)fM&p71
@qwF-7$$!3H\"H2eQ?<k$F-$!3gV*pxi-=p(F-7$$!3j\\ils]jFOF-$!3IeI9C1-*o(F-
7$$!3'z?0&f(\\Nh$F-$!3;S0h`TLjwF-7$$!3GmTNYWY*f$F-$!3#owj9fRjh(F-7$$!3
'H3_+#QHrNF-$!3!G9E38W`Y(F-7$$!3i***\\P>BJa$F-$!3iH9$y*\\o]sF-7$$!3Gm;
a)oS/V$F-$!3K0d:<z7ngF-7$$!3%HLLL=exJ$F-$!3P+%o\\5]'H]F-7$$!3-LL3_(H+F
$F-$!3Gm=f\")egzZF-7$$!34LL$3K,BA$F-$!3?%fMJ0l=m%F-7$$!3!HL3_5P%)>$F-$
!3I3byd>Y\\YF-7$$!3sKLe*)GduJF-$!3Q,J2ftHkYF-7$$!3aK$eRn32:$F-$!3>dhvy
h_-ZF-7$$!3!GLL$eW%o7$F-$!3))4&4O`u'fZF-7$$!3]KL$ef(QJIF-$!3e*fjoZck2&
F-7$$!3lKLLL2$f$HF-$!3DlZ@q$*)3I&F-7$$!3CmmT&o_Qr#F-$!3)p@dQs'*Gl%F-7$
$!3%)****\\PYx\"\\#F-$!3MxA'G\"=WhNF-7$$!3smmTNz>&H#F-$!330'=Fv.u`$F-7
$$!3gLLLL7i)4#F-$!3%3\"RPA74^NF-7$$!39mmTNa%H)=F-$!3%3D#3oHA@FF-7$$!3o
)***\\P'psm\"F-$!3o+&=.w'p[?F-7$$!3v)*\\(o/Efh\"F-$!3tlMZ0^*y,#F-7$$!3
#))**\\iX#ek:F-$!3,RBk7%=C-#F-7$$!3())*\\il)QK^\"F-$!3>knZ>yiU?F-7$$!3
%*)****\\F&*=Y\"F-$!3;'\\HEtFn0#F-7$$!3+**\\P%o^0T\"F-$!3,g(40_kX/#F-7
$$!31***\\P43#f8F-$!3!>n2rzW5*>F-7$$!38**\\7.X'yI\"F-$!3WT+r;Jg))=F-7$
$!3?****\\74_c7F-$!39WH2\"4B$Q<F-7$$!3PlmT5VBU5F-$!3T(Rw1q9m$*)F=7$$!3
M:LL$3x%z#)F=$!3$)4f)z(o*=?&F=7$$!3()HLL3s$QM%F=$\"3k=3hxq^rC!#>7$$!3]
^omm;zr)*!#?$\"3=sD<\"[#y****F=7$$\"3fVLLezw5VF=$\"3eotFrJci>F-7$$\"3-
.++v$Q#\\\")F=$\"3$)o=VF2N=DF-7$$\"3inm\"z\\1A-\"F-$\"3NpyO#zkp#GF-7$$
\"3%\\LL$e\"*[H7F-$\"3xJQ*et`Gk$F-7$$\"35o;/w\\-$G\"F-$\"3h5.5.UZ@QF-7
$$\"3D,+v$zglL\"F-$\"3m?Fj9s-_RF-7$$\"3#y;/EqGLO\"F-$\"3!zbKR?*4(*RF-7
$$\"3SM$e9h'4!R\"F-$\"374fbw%3)GSF-7$$\"3)4]7._koT\"F-$\"3kF,=n*[![SF-
7$$\"3cnm;HCjV9F-$\"3wQv3J+LcSF-7$$\"3s+](oCor\\\"F-$\"3#3+_448([SF-7$
$\"3)QL$ekSq]:F-$\"38t%)e]mBFSF-7$$\"3.n;H#))RUg\"F-$\"3i\\v,L$ek,%F-7
$$\"3=++++dxd;F-$\"3Np'z%3GgRSF-7$$\"3Q++]7JFn=F-$\"3=O#zZxf)[YF-7$$\"
3e+++D0xw?F-$\"3lMBdmHU.bF-7$$\"3%3vV['z5-@F-$\"3CcV14/jdbF-7$$\"3l+vo
/aWF@F-$\"37T^)RHgif&F-7$$\"3Y]7`WGy_@F-$\"3W^v_h\")\\>cF-7$$\"3q+]P%G
?\"y@F-$\"34uyrXC?GcF-7$$\"3y+D1k^zGAF-$\"3A*36Xo['3cF-7$$\"3%3+]P/q%z
AF-$\"3_kw5,)*RcbF-7$$\"3!4]PM#\\9IBF-$\"3Mk&ee'y'o\\&F-7$$\"3'4+DJ!)>
3Q#F-$\"3Q.>$f>H!eaF-7$$\"3A^(oHCdhS#F-$\"3'QM#[LBmaaF-7$$\"3.,D\"Go%
\\JCF-$\"3#G@003UdY&F-7$$\"3%3DcE7KoX#F-$\"3Yu&ok**=M\\&F-7$$\"35,+]i&
p@[#F-$\"3$pJPl;%=RbF-7$$\"3b++v=GB2FF-$\"3`I!QOsHTh'F-7$$\"3++++vgHKH
F-$\"3I'>Lj%\\A/tF-7$$\"3Kmm\"zu5M.$F-$\"3?kojU#z'pqF-7$$\"3jKL$3UDX8$
F-$\"3KG*[@E4&RnF-7$$\"3+*\\i!*3/)fJF-$\"3/H(*\\O+Z&o'F-7$$\"3yl;HdF3&
=$F-$\"3!HuV3;PYl'F-7$$\"3fK3_D9O5KF-$\"3y&\\+_wV?l'F-7$$\"3&*)**\\P4S
cB$F-$\"3%zR\\EiL=o'F-7$$\"35K$3-V(>'G$F-$\"3U/p8a\\S\\oF-7$$\"3ElmmmZ
vOLF-$\"39\\,#)3\"*=lrF-7$$\"3=****\\iirWMF-$\"3>^QQ$RxbA)F-7$$\"35LLL
exn_NF-$\"3u#>xvrs'H$*F-7$$\"3Om;HK\"o'zNF-$\"3%*\\;+5Xc<&*F-7$$\"31++
D1&emg$F-$\"37Y-9Q3!Hk*F-7$$\"3xL$3-))[Oj$F-$\"3i!Q'pl*)4$p*F-7$$\"3-n
m;a#R1m$F-$\"3G#*Q)[SSpl*F-7$$\"3)RL$3-+i9PF-$\"3KWW%G$o/!H*F-7$$\"3%4
+++v+'oPF-$\"3)f.pp\\O[\\)F-7$$\"3Qn\"H2L:v\"QF-$\"33(em/ql)*R(F-7$$\"
3!QLe9\"*Hk'QF-$\"3)RF-Q&o*)yfF-7$$\"3!o\"H#=?()3*QF-$\"3/*3vG]TP;&F-7
$$\"3D+v=#\\W`\"RF-$\"3=1W>G?b\"H%F-7$$\"3o$3_Dy,)RRF-$\"3ydjR;MktLF-7
$$\"3omm\"H2fU'RF-$\"3'R,!R?tUACF-7$$\"3o\\7Gjjr))RF-$\"3[bK(>2=6X\"F-
7$$\"3nKek`O<8SF-$\"3^y5cGp:MZF=7$$\"3c;/,W4jPSF-$!3!p-()=N]#o\\F=7$$
\"3c**\\PM#)3iSF-$!3!yiAe%*HfW\"F-7$$\"3a#eRZ_Xl3%F-$!3'>xKanN2O#F-7$$
\"3VmT5:G+6TF-$!3]jV9!>0*GKF-7$$\"3V\\(oa5ga8%F-$!3&4g\"QP'>#RSF-7$$\"
3UKL$eR<*fTF-$!3#)zg)QCQ=y%F-7$$\"3;mTg_RR8UF-$!3Slrpc!eA8'F-7$$\"3!**
*\\P40(oE%F-$!3E(z8aA/o1(F-7$$\"3kLe9mqM?VF-$!3i!o28%*RWd(F-7$$\"3Qnm
\"HiBQP%F-$!3'[i\"Q$R(R(o(F-7$$\"3'[Lektw2[%F-$!3j[mauw?IqF-7$$\"3K-++
])Hxe%F-$!31ra$\\)H*)peF-7$$\"3yn;z%Rk$)o%F-$!3AK.tk'4-*\\F-7$$\"37MLe
R*)**)y%F-$!3%3K.6%HQ_YF-7$$\"3W+]P%[L'*)[F-$!3@*Goz-:w![F-7$$\"3!fmm
\"H!o-*\\F-$!3CNe<KvdX^F-7$$\"3f**\\7`gc;]F-$!3'e6osV4y@&F-7$$\"3GLL3x
S'G/&F-$!3#)z!yW[\\CF&F-7$$\"35m;/,@;p]F-$!3b6@@2<V0`F-7$$\"3y*****\\7
ga4&F-$!3.E1ou+%QJ&F-7$$\"3[L$e*[\"e<7&F-$!3)f(*>T'G)fH&F-7$$\"3Gmm\"H
<c![^F-$!3)[]cke79D&F-7$$\"3)***\\(o>aV<&F-$!3u#R>sl#*3=&F-7$$\"3nLL$3
A_1?&F-$!3'z[$p@TJ'3&F-7$$\"3cnmm;V%eI&F-$!3#fl)ROJaOXF-7$$\"3X,+]7k.6
aF-$!3qg@/+HCLRF-7$$\"3]M3-j'eCY&F-$!3l>SV8tk/PF-7$$\"3an;a84)Q^&F-$!3
)>nn)*f1![NF-7$$\"31%3-)Q?fRbF-$!31nh=#*fv)\\$F-7$$\"3e+D1kJIlbF-$!3g!
)p7ifGoMF-7$$\"35<HK*G95f&F-$!3uwT#f6Q^X$F-7$$\"3jLLe9as;cF-$!3CBoCBB9
dMF-7$$\"3s**\\i:*p&>dF-$!3e)*zd'\\__b$F-7$$\"3#emmmT9C#eF-$!37-^wz'f
\"GOF-7$$\"3WKLeR<vPgF-$!3AO!y`f:94$F-7$$\"33****\\i!*3`iF-$!3![jWlY6k
>#F-7$$\"37nm\"z\\%[gkF-$!3Py6#**>q;.#F-7$$\"3;NLLL*zym'F-$!3Msn7z4BV>
F-7$$\"3_NL$3sr*zoF-$!3?*>&*z<te>\"F-7$$\"3'eLL$3N1#4(F-$!3Zq)H&y%*GLd
F=7$$\"3_-vV)RZY9(F-$!3%)fn)*RKQ#H&F=7$$\"39p;a)GJs>(F-$!3yIL!>1ss<&F=
7$$\"3!e$eky^\")\\sF-$!3jc+'o<;;@&F=7$$\"3W-+vo!*R-tF-$!3O0#pA+WT>&F=7
$$\"3w&3-Q,\"pGtF-$!3`_]T6)p`5&F=7$$\"33pT&)eH)\\N(F-$!3%Qc[)4&fb$\\F=
7$$\"3S_i!R!\\F\"Q(F-$!3Q@ou%Rk&oYF=7$$\"3tN$e*[oc2uF-$!3#)G&3U')GGH%F
=7$$\"3O-D1R2:guF-$!3c74:g'*p%>$F=7$$\"3,pm;HYt7vF-$!3eFp_*fYRl\"F=7$$
\"3dNLek6,1xF-$\"3YR![XzK6r&F=7$$\"37-+++xG**yF-$\"3yyd^%p1nx*F=7$$\"3
gpmmT6KU$)F-$\"3j/l=\\lk4;F-7$$\"3qNLLLbdQ()F-$\"3T#)>5W$G>_#F-7$$\"3[
++]i`1h\"*F-$\"3A-$HL^a&oLF-7$$\"3A-+]P?Wl&*F-$\"33&3$[)o`@-%F-7$$\"#5
F*$\"3em`Qwe@__F--%'COLOURG6&%$RGBG$Ff^o!\"\"$F*F*F__o-%+AXESLABELSG6$
Q\"x6\"Q\"yFd_o-%%VIEWG6$;F(Fe^oFi_o" 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 31 "g:=x->cs1(x,10)+ss1(x,10)-f(x);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"gGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,(-%$cs1G6$9$
\"#5\"\"\"-%$ss1GF/F2-%\"fG6#F0!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 29 "plot(g(x),x=-4..4,y=-10..10);" }}{PARA 13 "" 1 "" 
{GLPLOT2D 354 265 265 {PLOTDATA 2 "6%-%'CURVESG6$7cw7$$!\"%\"\"!$\"3y$
*************z!#<7$$!3iLL$e%G?yRF-$\"3))))*G`edh3(F-7$$!3ymmm\"p0k&RF-
$\"3)QMnDp0@='F-7$$!3&*****\\P&3Y$RF-$\"3CTbHplW(H&F-7$$!3cLLL$Q6G\"RF
-$\"35x`$>@59W%F-7$$!3!******\\2<#pQF-$\"3q()3;kSA\\GF-7$$!3ommmmFiDQF
-$\"3')o?l_Vhl9F-7$$!3=LL3#f\"p(y$F-$\"3%RDogLq^m%!#=7$$!37++]</w\\PF-
$!3#Gi\"\\-LcFKFQ7$$!3gmm\"HCH=r$F-$!3Ee8yNH=c*)FQ7$$!35LLLo!)*Qn$F-$!
3?Vn3&*[!oD\"F-7$$!3_**\\(=GpDl$F-$!3k9z;G=Es8F-7$$!3QmmT&\\S7j$F-$!3-
(G3\\t$\\H9F-7$$!3CL$e*3<\"*4OF-$!3]uPuQpML9F-7$$!3m****\\AHe)e$F-$!33
;&ySLb$*Q\"F-7$$!3QLLe\\`#fa$F-$!3#y(R`'H,E=\"F-7$$!3nmmmwxE.NF-$!3\\Q
MZ*)*=*>')FQ7$$!3Mmmm1rQ<MF-$!3/\"fYPFo!***)!#>7$$!3YmmmOk]JLF-$\"3qaZ
UP@=s`FQ7$$!3&***\\78$Q,J$F-$\"3]-EDvR*QR'FQ7$$!3WLLe*=q()G$F-$\"3O&=Y
o+%4crFQ7$$!3%pmTg1-uE$F-$\"39:%RU7$*3l(FQ7$$!3+++]UR.YKF-$\"3+kE'Q\\-
%yyFQ7$$!3/L$e*=emCKF-$\"3Sx0'*Q'3j%yFQ7$$!3ammT&p(H.KF-$\"3EFBs>&z#pv
FQ7$$!3-+](=dH>=$F-$\"3ATIW,7AoqFQ7$$!3_LLL[9cgJF-$\"3S^[=\")zSpjFQ7$$
!3M+++0vJ\"3$F-$\"3-Pq^tCP%f#FQ7$$!3smmmhN2-IF-$!30Tzxyr**R;FQ7$$!37++
+0t/hHF-$!3;fse'3I^V$FQ7$$!34LLL[5-?HF-$!3u(QK-Xx%>ZFQ7$$!3c******>z]*
*GF-$!3(R94K//Z8&FQ7$$!3]mmm\"z%**yGF-$!3=aagHyw)Q&FQ7$$!3ULLLj;[eGF-$
!3EmX(GjI+[&FQ7$$!3!******\\`oz$GF-$!3S.)e'o`N6aFQ7$$!3eLLL3(4Jv#F-$!3
c\"H6i5Ctk$FQ7$$!3!omm;)3DoEF-$!3s(>cl+VDX%F^q7$$!3$*******Rv&fi#F-$\"
33:LWb@k%>\"FQ7$$!3]LLL)>kOe#F-$\"3H@dx?FO0EFQ7$$!32nmmc3PTDF-$\"3)*\\
;:V'4Sj$FQ7$$!3?+++:v2*\\#F-$\"3)*\\C#=%zlzTFQ7$$!3An;zkbKxCF-$\"3;1&)
3$R0mD%FQ7$$!3yLLe9OdbCF-$\"3c(4_'4T?&>%FQ7$$!3O+]Pk;#QV#F-$\"3(4J!*))
\\#z+SFQ7$$!3$pmmTrp?T#F-$\"3y!*[4\"zFFo$FQ7$$!33++v8ecoBF-$\"3DZ(Qm))
f2t#FQ7$$!3BLLL8>1DBF-$\"3yrv>(*3cx9FQ7$$!3%******\\RD%[AF-$!3qY^\\\"R
4^T*F^q7$$!3kmmmw))yr@F-$!3s!zWOe*RPGFQ7$$!3ALLeM-A]@F-$!3kNb8Ll(Q<$FQ
7$$!3!)****\\#f^'G@F-$!3v%4n+m!3/MFQ7$$!3QmmT]H32@F-$!3(Ga[/LAG_$FQ7$$
!3SLLL3V^&3#F-$!3;eX^#3]%GNFQ7$$!3U++Dmc%R1#F-$!3#=:Q#*eOGU$FQ7$$!3+nm
;CqPU?F-$!3R$Qq(o\"e7@$FQ7$$!3eLL3#Q33-#F-$!303%p)pK<-HFQ7$$!3;+++S(R#
**>F-$!3KNjww#3p]#FQ7$$!35+++?4h7>F-$!3-\\>s'yWJd$F^q7$$!30++++@)f#=F-
$\"3`n87,DWJ=FQ7$$!3;+++S1C%y\"F-$\"3ao6oOx$pd#FQ7$$!3/+++!=*\\U<F-$\"
3/zw\"=j*Q-IFQ7$$!3')******\\%G;s\"F-$\"3)Qq0udw23$FQ7$$!3#*******>xv+
<F-$\"3CN!3BOTs1$FQ7$$!3'********)p))z;F-$\"3m%R**pRrL'HFQ7$$!3-+++gi,
f;F-$\"39)\\h!\\1OtFFQ7$$!3OLL$3x0Ke\"F-$\"33;a5Lgi&[\"FQ7$$!3qmmm\"G&
R2:F-$!3m0#\\O))*e:IF^q7$$!3GLLezAKi9F-$!3o[U?]#*[?8FQ7$$!32++]x#\\sT
\"F-$!3F+!)QxvUP@FQ7$$!3ML$ekx7ZR\"F-$!3=BmTN;cNCFQ7$$!3'om;aFw@P\"F-$
!3K:Rx#*=vYEFQ7$$!3;+]Pu(R'\\8F-$!3)e&Qe?QqkFFQ7$$!3XLLLtK5F8F-$!3a_2P
xoN'y#FQ7$$!3gLLLG0#*)G\"F-$!3#>Ka#>)Hbg#FQ7$$!3_LLL$yP2D\"F-$!39%z!3!
)4js@FQ7$$!3XLLLQ]b77F-$!3$yT()3*z(Q`\"FQ7$$!3eLLL$HsV<\"F-$!3yzu<n,wY
vF^q7$$!3!pmmT2Tb3\"F-$\"3qG%*G:`Be6FQ7$$!3+-++]&)4n**FQ$\"3ILW'H3eZU#
FQ7$$!3))om\"z%=_q(*FQ$\"3Mg$fqNQQa#FQ7$$!3yNL$e9XRd*FQ$\"3c'4nGE&[&f#
FQ7$$!3m-+vV%otP*FQ$\"3/DLMNgwyDFQ7$$!3cpmmT<z!=*FQ$\"3c_Y*G`FX\\#FQ7$
$!3K.+]P$Qwy)FQ$\"3]'\\RBfQb8#FQ7$$!37PLLL\\[%R)FQ$\"3)zd*e<Gbe:FQ7$$!
3qnmmT<yJvFQ$!3OInv&=,dX\"F^q7$$!3G)*****\\&y!pmFQ$!3A?)et!\\#\\u\"FQ7
$$!3e)****\\#)H$eiFQ$!3K9OwPmTMAFQ7$$!3'))******4\"eZeFQ$!3QZ)>kC8kY#F
Q7$$!3c****\\Pn?UcFQ$!3CI-/bz/xCFQ7$$!3;*****\\PKoV&FQ$!3`U=mcCr;CFQ7$
$!3w)***\\7!e9B&FQ$!3_.dT+!ztG#FQ7$$!3Y******\\O3E]FQ$!39mn@b-(H4#FQ7$
$!3!fmm;CP*oTFQ$!3'R/z*f/MXtF^q7$$!3NKLLL3z6LFQ$\"3yE$zq`q\"*f*F^q7$$!
3pKL$e%oA=HFQ$\"3DZ,[>/_B;FQ7$$!3/LLLeGmCDFQ$\"3#R$39BH::@FQ7$$!3QLL$3
())4J@FQ$\"35T#)[*)HC%Q#FQ7$$!3sLLL$)[`P<FQ$\"3Mh^3u@U.CFQ7$$!3m0++]-6
&)))F^q$\"3d:8()H/`A;FQ7$$!3gSnmmmr[R!#?$\"3cx.nH3/'*yF\\[m7$$\"3'oHLL
3+TU)F^q$!3'yKMpw&z_:FQ7$$\"3yELL$=2Vs\"FQ$!3c697]Pj*R#FQ7$$\"30%****
\\Aa\"3@FQ$!3!3uG)4(fBR#FQ7$$\"3Khmmm7+#\\#FQ$!3y%*HWm@\\Y@FQ7$$\"3gGL
L3$[e(GFQ$!3[&\\Pa8\"z&o\"FQ7$$\"3)e*****\\`pfKFQ$!3SMO=,VKb5FQ7$$\"3]
imm\"*f#))3%FQ$\"3K_&RfR'3ydF^q7$$\"36HLLLm&z\"\\FQ$\"3E4$\\fbXj'>FQ7$
$\"39'****\\<ViM&FQ$\"3s()=7v5)zO#FQ7$$\"3;jmm;(HXx&FQ$\"3_&\\9a(*o$yC
FQ7$$\"3<ILLei\"G?'FQ$\"3efl+fmn\"G#FQ7$$\"3>(******z-6j'FQ$\"3QBZaE$[
(*z\"FQ7$$\"3W%*****\\C4puFQ$\"3!*y)3u^.&fFF^q7$$\"3q\"******4#32$)FQ$
!32$)\\\"*Q8b19FQ7$$\"3?#***\\P6[7()FQ$!3qr=!)z#f//#FQ7$$\"3q#****\\<!
)y6*FQ$!3q$3iHd#o`CFQ7$$\"3'H**\\Ppz0K*FQ$!3kXj-AQGhDFQ7$$\"3@$***\\7#
zK_*FQ$!3+jUEYEr(f#FQ7$$\"3Y$**\\7tyfs*FQ$!3e6nV!y6:c#FQ7$$\"3r$*****
\\#y'G**FQ$!3Q'[c()yIKX#FQ7$$\"3K****\\FJ*G3\"F-$!3mp?Ywpr47FQ7$$\"3G*
*****H%=H<\"F-$\"3[hsr,I_KsF^q7$$\"3*fmm\"*HkL@\"F-$\"3k#[1+*38\\:FQ7$
$\"3qKLLo,\"QD\"F-$\"3@ng>.R$e@#FQ7$$\"31mm\"H5LSF\"F-$\"3%)Husk#oYY#F
Q7$$\"3S****\\PgD%H\"F-$\"3my^8%fFnk#FQ7$$\"3vKL3s*yWJ\"F-$\"37C$[;;hj
v#FQ7$$\"35mmm1>qM8F-$\"3MlKB8-()*y#FQ7$$\"3qKL$e?%Hc8F-$\"3_75\"Gh?)R
FFQ7$$\"3a*****\\]')yP\"F-$\"3&R2h6Zm=g#FQ7$$\"3Omm;/)y%*R\"F-$\"3=2w9
!)4\\zBFQ7$$\"3(HLLL5r5U\"F-$\"3Y%\\;#QR()y?FQ7$$\"3Ummm,dDk9F-$\"3!\\
-oj*=/!G\"FQ7$$\"3%)*******HSu]\"F-$\"3-\"4&))z!R[+$F^q7$$\"3Smm;HOq&e
\"F-$!3,FDL-VdR:FQ7$$\"3'HLL$ep'Rm\"F-$!3a;IgH5\"f#GFQ7$$\"3Km;/\"ed`o
\"F-$!3q0FHyL9**HFQ7$$\"3p***\\P?[nq\"F-$!35-To)>*[!3$FQ7$$\"30L$ek#)Q
\"G<F-$!35_![&=9>mIFQ7$$\"3Umm;\\%H&\\<F-$!39\\M(pQ-a&HFQ7$$\"39LLe%p5
Bz\"F-$!3U7cgOy!eX#FQ7$$\"3')******R>4N=F-$!33n4GP4ML;FQ7$$\"3&GLLed*f
:>F-$\"3!)p%4`X))))Q%F^q7$$\"3#emm;@2h*>F-$\"38n#4\\YFJW#FQ7$$\"3.****
**\\S=Q?F-$\"3s\"*><y=\\eJFQ7$$\"3mKLL))3E!3#F-$\"3pR%QX+GG^$FQ7$$\"3r
****\\2$*H,@F-$\"37C&H<]:a`$FQ7$$\"3JmmmExLA@F-$\"3e0\")*3I?0X$FQ7$$\"
3\"HLLe9wL9#F-$\"35NY[\\>veKFQ7$$\"3]*****\\c9W;#F-$\"3UKx&=5IR'HFQ7$$
\"3#HLLe;!pYAF-$\"3!\\ki\"z'*oM**F^q7$$\"3Lmmmmd'*GBF-$!3'oCftta!)f\"F
Q7$$\"3k***\\7BL?P#F-$!3<F%Q%))zv>GFQ7$$\"3)HLLep+^T#F-$!3.,82\"4:St$F
Q7$$\"3k**\\7GWjOCF-$!38Df'*=#HJ.%FQ7$$\"3ImmTg\"o\"eCF-$!33+yfbtl4UFQ
7$$\"3)HL3F*=qzCF-$!3I@mYKn)\\D%FQ7$$\"3j*****\\iN7]#F-$!3u$eGEn,W;%FQ
7$$\"3emm;*z$>%e#F-$!3)*>9)HY*y*e#FQ7$$\"3aLLLt>:nEF-$\"3kRk)[a(o7SF^q
7$$\"3KLLL)o))>v#F-$\"3![&Rq$>L6h$FQ7$$\"35LLL.a#o$GF-$\"3P>kR-![HS&FQ
7$$\"3o**\\Pf*ey&GF-$\"3+%Gc!\\SF![&FQ7$$\"3CmmT:D*)yGF-$\"3E8@IXhi*Q&
FQ7$$\"3CL$e92E***GF-$\"3sDZ*3_Ny7&FQ7$$\"3#)****\\F'f4#HF-$\"3_5/wfpq
'p%FQ7$$\"3SLLeRn-jHF-$\"3;e)Q))[?\"fLFQ7$$\"3ammm^Q40IF-$\"3ynY%egV>
\\\"FQ7$$\"3;LL$eY/C3$F-$!3!4dLsQ_Nl#FQ7$$\"3y******z]rfJF-$!3u$3l&RQ2
QjFQ7$$\"3CLL3_n'==$F-$!3c`'RObUk1(FQ7$$\"3rmm;C%=S?$F-$!3]#Q!R[uS#e(F
Q7$$\"3t***\\i4qhA$F-$!3k9Mo>3zcyFQ7$$\"3?LLLo<K[KF-$!3Ouitc%\\m'yFQ7$
$\"3mmmTSMZqKF-$!3CeKT.&3jf(FQ7$$\"3m****\\7^i#H$F-$!3c&*fk.iBQqFQ7$$
\"39LLe%ywZJ$F-$!3OK!oNYIP>'FQ7$$\"3gmmmc%GpL$F-$!3-tay@ERt]FQ7$$\"3#)
*****\\LzhT$F-$\"33\"[4F;G,%zF^q7$$\"3/LLL8-V&\\$F-$\"3i#4J3&GY]zFQ7$$
\"30++D'>zw`$F-$\"3c4ljXX!y7\"F-7$$\"3imm;z\"G*zNF-$\"3mu$R!o_Bf8F-7$$
\"37+]iqE0,OF-$\"3Gsfw#GY0U\"F-7$$\"3=LL3ir<AOF-$\"32rl^nhMP9F-7$$\"3;
+D\"ySRFj$F-$\"3y\"pBf9wsU\"F-7$$\"3pm;a`;IVOF-$\"3Gm)Q2q:SS\"F-7$$\"3
AL3F**Q'Ql$F-$\"3Quq#3]epO\"F-7$$\"3=+++XhUkOF-$\"3:cj'p!Ra:8F-7$$\"3>
++]7Q'[q$F-$\"3Y:,P\">N\\x*FQ7$$\"3=+++![,`u$F-$\"3@'Q:lOEL,%FQ7$$\"3=
++]Z\"Rdy$F-$!3^_t#p!)Rm?%FQ7$$\"3=+++:o<EQF-$!31f&\\z)oo\"[\"F-7$$\"3
7++D6EjpQF-$!3kga1+.]jGF-7$$\"34++]2%)38RF-$!3%*>[v+M2_WF-7$$\"31+]i0j
\"[$RF-$!3&o/HM@edI&F-7$$\"3/++v.UacRF-$!3m6u4i$*z(='F-7$$\"3-+](=5s#y
RF-$!31wfu%y]!*3(F-7$$\"\"%F*$!3y$*************zF--%'COLOURG6&%$RGBG$
\"#5!\"\"$F*F*F`jn-%+AXESLABELSG6$Q\"x6\"Q\"yFejn-%%VIEWG6$;F(Fein;$!#
5F*$F^jnF*" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "C
urve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "a := k -> 2/L*in
t(f(x)*cos(k*Pi*x/L),x=0..L);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"a
Gf*6#%\"kG6\"6$%)operatorG%&arrowGF(,$*&%\"LG!\"\"-%$intG6$*&-%\"fG6#%
\"xG\"\"\"-%$cosG6#**9$F8%#PiGF8F7F8F.F/F8/F7;\"\"!F.F8\"\"#F(F(F(" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "cs := (x,n) -> a(0)/2 + sum
(a(k)*cos(k*Pi*x/L),k=1..n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#csG
f*6$%\"xG%\"nG6\"6$%)operatorG%&arrowGF),&-%\"aG6#\"\"!#\"\"\"\"\"#-%$
sumG6$*&-F/6#%\"kGF3-%$cosG6#**F;F3%#PiGF39$F3%\"LG!\"\"F3/F;;F39%F3F)
F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "plot(cs(x,5),x=-10.
.10,y=-1..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 354 265 265 {PLOTDATA 2 "
6%-%'CURVESG6$7ar7$$!#5\"\"!$\"\"&F*7$$!3cKLLe%G?y*!#<$\"3Q<H.EjpEXF07
$$!3!pmmm\"p0k&*F0$\"3cYjUR(f84%F07$$!3#)***\\P/,WP*F0$\"3CY\"H1a%yYPF
07$$!3uKL$3<XZ=*F0$\"35Ow(H36\"4MF07$$!3s)**\\iId9(*)F0$\"3-K8Eu!z\\*H
F07$$!3WmmmT%p\"e()F0$\"3=T,W#[s2_#F07$$!3&emmmwnMa)F0$\"3XQ;V@Jx9?F07
$$!3/nmm\"4m(G$)F0$\"3[IjT5$Q>d\"F07$$!3tK$eRZD>A)F0$\"3$RnTcra7T\"F07
$$!3?++Dc[3:\")F0$\"3?)eQ?h(>28F07$$!3%R$eRZXmh!)F0$\"3CDN:([f\"z7F07$
$!3nn;aQUC3!)F0$\"3m`V30=)zE\"F07$$!3_+voHR#[&zF0$\"3QGNbbI*QF\"F07$$!
3OLL$3i.9!zF0$\"3#p6q'4Bx'H\"F07$$!3`****\\iPH.xF0$\"32b`(*4nV=:F07$$!
3fmm;/R=0vF0$\"3avJAUDw/>F07$$!31ML$3i_+I(F0$\"3+40NfHY$Q#F07$$!3k++]P
8#\\4(F0$\"3UD6+h/n`GF07$$!3#RLL3FuF)oF0$\"3%\\SL(R\\#QG$F07$$!3Kmm;/s
iqmF0$\"3OFw9d6GnOF07$$!3SKL$e\\g\"fkF0$\"3q]*e5tux/%F07$$!3Q****\\(y$
pZiF0$\"3!)zD')**=ckWF07$$!3+mmT&Gu,.'F0$\"3#o;EAYGM$\\F07$$!3jKLL$yaE
\"eF0$\"37wBn='y%3aF07$$!3'*)***\\([j5i&F0$\"3[@O:/AV*z&F07$$!3<mmm\">
s%HaF0$\"3/#*3N'zO`:'F07$$!3$GLL3x&y8_F0$\"32)p0!oJ@QlF07$$!3]******\\
$*4)*\\F0$\"3'\\XjB/v+&pF07$$!3g*******HF:y%F0$\"3#[]@\\`pZU(F07$$!3o*
*****\\_&\\c%F0$\"3O3l![Zfb$zF07$$!3?+++]zCcVF0$\"35l[2JO)*y$)F07$$!3%
)******\\1aZTF0$\"3[EV]IAwn')F07$$!3eK3F%4f,5%F0$\"3#zcYj'oI-()F07$$!3
Am;aQvx_SF0$\"3lV@VE'zQs)F07$$!3()*\\7G)fR0SF0$\"3],dkSZ8K()F07$$!31LL
3FW,eRF0$\"3\"Q<I1JRps)F07$$!3!***\\i:8DjQF0$\"3G,&=ZxXnn)F07$$!3Imm;/
#)[oPF0$\"3i)RW!*)Q[w&)F07$$!3i***\\P>BJa$F0$\"3-Y)\\2@cz<)F07$$!3%HLL
L=exJ$F0$\"3s3L9/ucewF07$$!3!GLL$eW%o7$F0$\"3CY&o8'eZ;sF07$$!3lKLLL2$f
$HF0$\"38_6Tv3G=oF07$$!3CmmT&o_Qr#F0$\"3HJ)H<av!4kF07$$!3%)****\\PYx\"
\\#F0$\"3YT6u*)>l7gF07$$!3smmTNz>&H#F0$\"3FF:`T%4Ij&F07$$!3gLLLL7i)4#F
0$\"3d_$*\\cg!p@&F07$$!39mmTNa%H)=F0$\"3-IBZ*z3Hu%F07$$!3o)***\\P'psm
\"F0$\"3!o$)>%RI]\"H%F07$$!3%*)****\\F&*=Y\"F0$\"3\\c\"fF0EH!RF07$$!3?
****\\74_c7F0$\"3ep8b$HO$QNF07$$!3PlmT5VBU5F0$\"3%p3g\"p3vQJF07$$!3M:L
L$3x%z#)!#=$\"3?vNF<:%>o#F07$$!3gAL$e9d;J'Fj[l$\"3[\\u,Er6?AF07$$!3()H
LL3s$QM%Fj[l$\"3_IUpMcdu<F07$$!3>****\\ivF@AFj[l$\"3!)*>4ht3:T\"F07$$!
3]^omm;zr)*!#?$\"3![W92Dq!o7F07$$\"3)*HL3x\"yY_%!#>$\"3)*y+Q!>7RF\"F07
$$\"3^ML3_Nl.5Fj[l$\"3]n+*zs:yH\"F07$$\"3-O$ekGR[b\"Fj[l$\"3oS,GiEER8F
07$$\"3aPL$3-Dg5#Fj[l$\"3SvM$eHjtR\"F07$$\"3cSLe*['R3KFj[l$\"3OC>%y,A$
e:F07$$\"3fVLLezw5VFj[l$\"37Y\"3:$oqn<F07$$\"3JtmmmJ+IiFj[l$\"3L=#[m#H
x+AF07$$\"3-.++v$Q#\\\")Fj[l$\"3iJ8;V(GAl#F07$$\"3inm\"z\\1A-\"F0$\"3W
Oju+qx)4$F07$$\"3%\\LL$e\"*[H7F0$\"3!G^dZ_K+\\$F07$$\"3cnm;HCjV9F0$\"3
i7I]Cp.qQF07$$\"3=++++dxd;F0$\"3-(zyWPQEF%F07$$\"3Q++]7JFn=F0$\"3EI6U1
B))3ZF07$$\"3e+++D0xw?F0$\"3[SVtg`2p^F07$$\"3%3+]P/q%zAF0$\"3?vLf>2&4g
&F07$$\"35,+]i&p@[#F0$\"3?aUb-#[\\*fF07$$\"3b++v=GB2FF0$\"3!e1>RLhtR'F
07$$\"3++++vgHKHF0$\"3UM#yGo)=6oF07$$\"3jKL$3UDX8$F0$\"3vaNAAabLsF07$$
\"3ElmmmZvOLF0$\"3haGv64r.xF07$$\"35LLLexn_NF0$\"3'fPnb![F)>)F07$$\"3%
4+++v+'oPF0$\"31)pV9ZImd)F07$$\"3!QLe9\"*Hk'QF0$\"3%=7uwin#z')F07$$\"3
omm\"H2fU'RF0$\"3_T6n\"y#RG()F07$$\"3nKek`O<8SF0$\"3T([Vx],<t)F07$$\"3
c**\\PM#)3iSF0$\"3zXa:ORo?()F07$$\"3VmT5:G+6TF0$\"3qZ-Vr*Gbp)F07$$\"3U
KL$eR<*fTF0$\"3w19.2cmc')F07$$\"3Qnm\"HiBQP%F0$\"3kMyqRf:Y$)F07$$\"3K-
++])Hxe%F0$\"3!f:#z,xP#)yF07$$\"37MLeR*)**)y%F0$\"3^**)f^!*[uS(F07$$\"
3!fmm\"H!o-*\\F0$\"3sUh#p7@h'pF07$$\"3nLL$3A_1?&F0$\"3#[_TMkf>c'F07$$
\"3X,+]7k.6aF0$\"3?A*oq'zA)='F07$$\"3jLLe9as;cF0$\"3>;V&*4o&y!eF07$$\"
3#emmmT9C#eF0$\"3kgVzaHm(Q&F07$$\"3WKLeR<vPgF0$\"3JLDB\\gs;\\F07$$\"33
****\\i!*3`iF0$\"3OpRW)=qLX%F07$$\"37nm\"z\\%[gkF0$\"3K#e&yGRIXSF07$$
\"3;NLLL*zym'F0$\"3Ki&e74G@n$F07$$\"3_NL$3sr*zoF0$\"33Yt)og;\"*G$F07$$
\"3'eLL$3N1#4(F0$\"3s;]PnC))fGF07$$\"3W-+vo!*R-tF0$\"3Ym+-(=(*yP#F07$$
\"3,pm;HYt7vF0$\"3-B'fU6f!))=F07$$\"3dNLek6,1xF0$\"3rqLn#\\)49:F07$$\"
37-+++xG**yF0$\"3Q]g/&\\A!)H\"F07$$\"3-O$3-)omazF0$\"39x4?%fNRF\"F07$$
\"3*)pmTgg/5!)F0$\"3gKKli13o7F07$$\"3w.]iS_Ul!)F0$\"3As&e7R'e!G\"F07$$
\"3(eLL3U/37)F0$\"3>cHit\"y6J\"F07$$\"3&=+]7yi:B)F0$\"3(HqRg`#eB9F07$$
\"3gpmmT6KU$)F0$\"3?cPiE0z&f\"F07$$\"3l-+]P$[/a)F0$\"3d&p1[=Sy+#F07$$
\"3qNLLLbdQ()F0$\"3=-Oa+MxuCF07$$\"33om\"zW?)\\*)F0$\"3mNFPMyg\\HF07$$
\"3[++]i`1h\"*F0$\"3K&=SIZjcO$F07$$\"3M,+++PDj$*F0$\"3R([g')yzqs$F07$$
\"3A-+]P?Wl&*F0$\"3YuB[3d(R4%F07$$\"35,+v=5s#y*F0$\"3<rT'G_`\"GXF07$$
\"#5F*F+-%'COLOURG6&%$RGBG$F\\`m!\"\"$F*F*Fc`m-%+AXESLABELSG6$Q\"x6\"Q
\"yFh`m-%%VIEWG6$;F(F[`m;$Fb`mF*F[`m" 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 "g:=x->cs(x,5)-f(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%\"gGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&-%#csG6$9$\"\"&\"\"\"-%\"
fG6#F0!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "plot(g
(x),x=0..4,y=-0.5..0.5);" }}{PARA 13 "" 1 "" {GLPLOT2D 354 265 265 
{PLOTDATA 2 "6%-%'CURVESG6$7aq7$$\"\"!F)$\"3i&>!))4\"zxn#!#=7$$\"3emmm
;arz@!#>$\"3')z[$RW&3cAF,7$$\"39LLLL3VfVF0$\"3iVC:D>%G'=F,7$$\"3s*****
*\\i9RlF0$\"3=?gsyF!z\\\"F,7$$\"3Hmmmm;')=()F0$\"3%*z7![+E5;\"F,7$$\"3
-++]7z>^7F,$\"3LUQ\"G'R^1kF07$$\"3RLLLe'40j\"F,$\"3p2a>l]^<?F07$$\"3/+
+](Q&3d?F,$!3=2kbnsn&)>F07$$\"3mmmm;6m$[#F,$!3-`I\\:\\/d]F07$$\"3jmmmm
W18HF,$!3+Kt`P=cwsF07$$\"3fmmm;yYULF,$!3%eKZR-<'*p)F07$$\"3KLL3_!\\hb$
F,$!3+Yu]tqaP\"*F07$$\"3/++](GI)pPF,$!3Z;:L:#*y5%*F07$$\"37L$3_!4nwQF,
$!39e1DG:C*[*F07$$\"3Amm\"H_6N)RF,$!3jL_9Q)f3`*F07$$\"3')**\\iS@N!4%F,
$!3AJ\"e>\"*=r`*F07$$\"3%HLL$eF>(>%F,$!3M:rgaQ]4&*F07$$\"3Wmmm;EI&R%F,
$!3#*[rW'ySPP*F07$$\"3Q*****\\Z7Mf%F,$!3jtKp-/AO\"*F07$$\"3)GLLLLA:z%F
,$!3PQ>W))fa1))F07$$\"3Qmmm\">K'*)\\F,$!3%*G$>MC4VR)F07$$\"3IKLLeZ*)*R
&F,$!3cvy*f_G\">tF07$$\"3P*****\\Kd,\"eF,$!3syt&)H+v8gF07$$\"3-mmm\"fX
(emF,$!37!zkFt$4@HF07$$\"3.*****\\U7Y](F,$\"3/+SYRVI&y\"!#?7$$\"3'QLLL
V!pu$)F,$\"3AA7zT\\RgGF07$$\"3K+++DI(yv)F,$\"31MnHmJRyPF07$$\"3xmmm;c0
T\"*F,$\"3:x4)okDU]%F07$$\"3+LLLe%GCd*F,$\"3e\"z5\\(f@w]F07$$\"3#*****
**H,Q+5!#<$\"3Ez+&4wd@Q&F07$$\"3#)*****\\LP?-\"Fht$\"3=ZhHuaBOaF07$$\"
3&*******RXpV5Fht$\"3L:&eK\"=]DaF07$$\"33+++X<Nl5Fht$\"3#oPOUz-?N&F07$
$\"3)*******\\*3q3\"Fht$\"3;aB0LdM=_F07$$\"3()******4/vG6Fht$\"3KG%3+,
\"*H![F07$$\"3)*******p=\\q6Fht$\"3(p&QfhrN.UF07$$\"3mmm;fBIY7Fht$\"3S
+'faa19v#F07$$\"3GLLLj$[kL\"Fht$\"3eN\\mp;gnoF`s7$$\"3?LLL`Q\"GT\"Fht$
!3wDJX\\V4p5F07$$\"3!*****\\s]k,:Fht$!3ZrAIio$G!GF07$$\"3_mm\"HTg4a\"F
ht$!3y-C'Q@Q?R$F07$$\"39LLL`dF!e\"Fht$!3R09o.kgWQF07$$\"3^mm\"H\"4TB;F
ht$!3Ma&4T%ysoTF07$$\"33++]sgam;Fht$!3(o%e(=<8II%F07$$\"3&******\\%4i2
<Fht$!3A;gwjsP_UF07$$\"3/++]<ep[<Fht$!3^5T=s7?KSF07$$\"3qmm\"z8`:z\"Fh
t$!3P[;\"zd=Lj$F07$$\"3QLLLe/TM=Fht$!3Ot$3So\"3!3$F07$$\"3JLL$eDBJ\">F
ht$!3gp=x5nzY<F07$$\"3immmTc-)*>Fht$!3-$pxCQXe3%!#@7$$\"3Mmm;f`@'3#Fht
$\"3Xo&yZ#>EM<F07$$\"3y****\\nZ)H;#Fht$\"3<CLxY^*>/$F07$$\"3NLLe*HTW?#
Fht$\"3sG(*QYN\"ye$F07$$\"3YmmmJy*eC#Fht$\"3-KAxx>4\"*RF07$$\"3;LL$e[E
()G#Fht$\"3$y=C]&3bRUF07$$\"3')******R^bJBFht$\"3\"\\$=^i%*\\/VF07$$\"
3s****\\AYXtBFht$\"3WDT\\`H&\\=%F07$$\"3f*****\\5a`T#Fht$\"3a9i`x@'e)Q
F07$$\"3k***\\(3S*eX#Fht$\"3r)Rj\\.![LMF07$$\"3o****\\7RV'\\#Fht$\"3yU
mn8*\\X$GF07$$\"3k*****\\@fke#Fht$\"3g,X*Qf8]3\"F07$$\"3/LLL`4NnEFht$!
31u2%Q_`Kw(F`s7$$\"3#*******\\,s`FFht$!3o6T/\\,*=v#F07$$\"3[mm;zM)>$GF
ht$!3p_\"Qx1#\\VUF07$$\"3?LLeCZwuGFht$!3)\\EYA`#\\X[F07$$\"3$*******pf
a<HFht$!3][cK)\\/8D&F07$$\"3HL$e*yGnPHFht$!37X//Xp%fO&F07$$\"3kmm\"zy*
zdHFht$!3M#p'G,]GGaF07$$\"3c**\\(opEz(HFht$!3\"3`@@*3FOaF07$$\"3#HLLeg
`!)*HFht$!3]N!oqex#)Q&F07$$\"3cmm;W/8SIFht$!3+X(\\k=lC5&F07$$\"3w****
\\#G2A3$Fht$!3?Yg)RJ;Mc%F07$$\"3Ymm\"H3XL7$Fht$!3q^!*)3C9qz$F07$$\"3;L
LL$)G[kJFht$!3.-%G*Rm\")3GF07$$\"3#)****\\7yh]KFht$!3-GEc)=@7T\"F`s7$$
\"3xmmm')fdLLFht$\"3(Gk**46&R+HF07$$\"3bmmm,FT=MFht$\"3'fSI??@V*fF07$$
\"39++v8)z/Y$Fht$\"3y$ej?h%)GL(F07$$\"3FLL$e#pa-NFht$\"3/[e0oTUG%)F07$
$\"3#***\\PzX(=_$Fht$\"3\\(*eLsVuD))F07$$\"3emm\"HB-7a$Fht$\"3+D*HDi4S
9*F07$$\"3CL$ek))H0c$Fht$\"3!Rzag$=Ju$*F07$$\"3!*******Rv&)zNFht$\"3jR
&3@]Lx]*F07$$\"3%omTgPL4f$Fht$\"3xp:hVm3P&*F07$$\"3OLL37#4?g$Fht$\"3Ke
vu/1/I&*F07$$\"3()**\\7[]38OFht$\"3%R*pxD5%\\[*F07$$\"3#ommT)3;COFht$
\"3z,'3RcX,S*F07$$\"3%)***\\ib7jk$Fht$\"3GOOA9>(\\5*F07$$\"3ILLLGUYoOF
ht$\"3vQ<r%*4rJ')F07$$\"3\"*****\\n'*33PFht$\"3<xo:x>!>I(F07$$\"3_mmm1
^rZPFht$\"3c#ea;,oZH&F07$$\"33LLe*3k**y$Fht$\"32&QfB5h'QBF07$$\"34++]s
I@KQFht$!3s*zjOn.__\"F07$$\"35++D1>V_QFht$!3u'3]=FDDr$F07$$\"33+++S2ls
QFht$!35QG9DfGEhF07$$\"33++vt&pG*QFht$!3+(G;ph)>r()F07$$\"34++]2%)38RF
ht$!3GU#y!yE8l6F,7$$\"31+]i0j\"[$RFht$!3c#pJ0T[7]\"F,7$$\"3/++v.UacRFh
t$!3ytj.j7Dl=F,7$$\"3-+](=5s#yRFht$!3iN%Q\\=!QdAF,7$$\"\"%F)$!3G2-))4
\"zxn#F,-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q\"yFj[
m-%%VIEWG6$;F(F[[m;$!\"&Fe[m$\"\"&Fe[m" 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 32 "Now let us find the sine series." }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 45 "b := k -> 2/L*int(f(x)*sin(k*Pi*x/L),x=0..L);" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bGf*6#%\"kG6\"6$%)operatorG%&arro
wGF(,$*&%\"LG!\"\"-%$intG6$*&-%\"fG6#%\"xG\"\"\"-%$sinG6#**9$F8%#PiGF8
F7F8F.F/F8/F7;\"\"!F.F8\"\"#F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 46 "ss := (x,n) -> sum(b(k)*sin(k*Pi*x/L),k=1..n);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#ssGf*6$%\"xG%\"nG6\"6$%)operatorG%&
arrowGF)-%$sumG6$*&-%\"bG6#%\"kG\"\"\"-%$sinG6#**F4F5%#PiGF59$F5%\"LG!
\"\"F5/F4;F59%F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plo
t(ss(x,10),x=-10..10,y=-11..11);" }}{PARA 13 "" 1 "" {GLPLOT2D 354 
265 265 {PLOTDATA 2 "6%-%'CURVESG6$7b[l7$$!#5\"\"!$!3W3<[X)p_J&!#<7$$!
3Gmm;HU,\"*)*F-$!3aQMwip2+[F-7$$!3cKLLe%G?y*F-$!3/0H<!)**>$H%F-7$$!3gm
m\"HdNvs*F-$!3z62zl))R7TF-7$$!3i++](oUIn*F-$!3]dZh]nZ**RF-7$$!3)GL$3-)
\\&='*F-$!3%e%Q:or*H&RF-7$$!3!pmmm\"p0k&*F-$!3q>X2bQ2fRF-7$$!39+vV[Hk;
&*F-$!3kJ(Q(>g6*)RF-7$$!3QL$3-)*G#p%*F-$!3bj%z!ym$G-%F-7$$!3gm\"z>,:=U
*F-$!3*QioiQc;/%F-7$$!3#)***\\P/,WP*F-$!3H$yQ`Vw&HSF-7$$!3Im;H2Jdz#*F-
$!3c_ap5D2uQF-7$$!3uKL$3<XZ=*F-$!3v'z`ZWaPa$F-7$$!3im;aQ75y!*F-$!3!)f5
zG$H#oIF-7$$!3s)**\\iId9(*)F-$!3!RGdYM,zl#F-7$$!3vkT5S`8=*)F-$!3-q!3\"
*\\'zADF-7$$!3eK$eRP8['))F-$!3,(z_I*GNVCF-7$$!3S+D\"yS\"\\6))F-$!3%4')
o0b/WT#F-7$$!3WmmmT%p\"e()F-$!3fV\")=%GNBU#F-7$$!3Imm\"H-%\\/()F-$!3Wc
36*4%zZCF-7$$!3;mm;/'=3l)F-$!3oe)3D-o$oCF-7$$!3+mmT&=Vrf)F-$!3e36\\Eky
iCF-7$$!3&emmmwnMa)F-$!3W-oq4sG9CF-7$$!3clm;Hp6O%)F-$!3A`z>O^Yc@F-7$$!
3/nmm\"4m(G$)F-$!3bLR1:E'Qq\"F-7$$!3?++Dc[3:\")F-$!3fk%)=Oh]Je!#=7$$!3
OLL$3i.9!zF-$\"3[QgEG!o)z\\Fes7$$!3`****\\iPH.xF-$\"3eo?kx+\\V:F-7$$!3
fmm;/R=0vF-$\"3)H$Gx6SwCBF-7$$!3[***\\P\\U&zuF-$\"37fHFRBhxBF-7$$!3CLL
L$3,RX(F-$\"3`o'QLFYyT#F-7$$!3+nm\"Hnf#GuF-$\"39sOSE*ofW#F-7$$!3x++]i#
=ES(F-$\"3uWQ+Lg*GY#F-7$$!3UnmmTaL^tF-$\"3A+Nf[$y(oCF-7$$!31ML$3i_+I(F
-$\"3/9V[EE/]CF-7$$!3s++++)p([sF-$\"3r)**)zOP5DCF-7$$!3Mnm;zp[(>(F-$\"
3\"Q@TYZLOT#F-7$$!3+MLLeT?YrF-$\"3/^h'ofpNV#F-7$$!3k++]P8#\\4(F-$\"3I+
R<\">P#)\\#F-7$$!3#RLL3FuF)oF-$\"3l<wbkU%[C$F-7$$!3Kmm;/siqmF-$\"3%4q&
p\"*Q@zRF-7$$!3=KL3F0w<mF-$\"3')H$\\,&*\\U.%F-7$$!3#*)*****\\Q*[c'F-$
\"3o&[F_>\"))QSF-7$$!3mlm\"H<F?^'F-$\"3mp<=B\\G5SF-7$$!3SKL$e\\g\"fkF-
$\"3]J@W-h7sRF-7$$!3:***\\(=QH1kF-$\"3#e!\\HO4[]RF-7$$!3)emm;9FMN'F-$
\"3'pz>rH$>pRF-7$$!3jKLek/c+jF-$\"3iHmvG\"za/%F-7$$!3Q****\\(y$pZiF-$
\"3I#y*zG\"yl=%F-7$$!3+mmT&Gu,.'F-$\"3#[R8b>]j=&F-7$$!3jKLL$yaE\"eF-$
\"3BB;'zbbMj&F-7$$!3zlmTN\"for&F-$\"3)*y!ezqU;^&F-7$$!3'*)***\\([j5i&F
-$\"3cb=)[U?NR&F-7$$!3al;ajc;tbF-$\"3)H4@y3FyR&F-7$$!37KLeRyEDbF-$\"3o
8gpYv**oaF-7$$!3q)*\\i:+PxaF-$\"3[Cr4YMb9cF-7$$!3<mmm\">s%HaF-$\"3hb)>
()zH5$eF-7$$!31***\\7)*G;K&F-$\"37s$RC!=@(['F-7$$!3$GLL3x&y8_F-$\"3A`)
[Dj;x5(F-7$$!3#e;H#o\\#o=&F-$\"35q]@X))p:sF-7$$!3s**\\ilT')f^F-$\"3uX(
o@VnhH(F-7$$!3hL3-jL!H8&F-$\"3%z4ndu5mM(F-7$$!3hmmTgD%f5&F-$\"3)\\tl4y
eeO(F-7$$!3g*\\7yv\")*y]F-$\"3cpwD:s>atF-7$$!3iK$3_&4-_]F-$\"3#*e3v0'>
MJ(F-7$$!3hlTg_,1D]F-$\"3#3o2c-8oC(F-7$$!3]******\\$*4)*\\F-$\"3s`]ca^
2frF-7$$!3a*****\\K8)*)[F-$\"3.*e7+M&QGnF-7$$!3g*******HF:y%F-$\"3wpPO
uk%\\b'F-7$$!3k*****\\FTKn%F-$\"3\"*z2rjQyTqF-7$$!3o******\\_&\\c%F-$
\"3S6n@g.&*z\")F-7$$!3Q++++;ggWF-$\"3iv`u0fyz$*F-7$$!3?+++]zCcVF-$\"3K
a4=OZef)*F-7$$!36+++D62/VF-$\"3sD\"**y<3,e*F-7$$!3-++++V*=D%F-$\"3!*oz
#*f>+m))F-7$$!3!******\\Z<(*>%F-$\"3Mzhu'HIyp(F-7$$!3%)******\\1aZTF-$
\"3$QV3RQk.5'F-7$$!3@;a8s)\\Q7%F-$\"3E$Hy-JF.D&F-7$$!3eK3F%4f,5%F-$\"3
!R&\\lw1aMVF-7$$!3'*[iS;$ok2%F-$\"3/8)[T#)4OO$F-7$$!3Am;aQvx_SF-$\"3Wz
%4nuj$\\BF-7$$!3\\$3x1w'3HSF-$\"33TeLgzf/8F-7$$!3()*\\7G)fR0SF-$\"30>V
K\")o\"zU#Fes7$$!3C;z%\\?0<)RF-$!3g5-'ziJ>A)Fes7$$!31LL3FW,eRF-$!3ss!Q
'HKUw=F-7$$!3))\\(=#\\OKMRF-$!3NFhxGo?1HF-7$$!3EmTNrGj5RF-$!3C\\^YV1S)
*QF-7$$!33$e*[$4Up)QF-$!31gfD(z,2%[F-7$$!3!***\\i:8DjQF-$!3GHLGpv\">s&
F-7$$!35Le*)f(pe\"QF-$!37aU,?(yKE(F-7$$!3Imm;/#)[oPF-$!3i^ob'>ULY)F-7$
$!3j*\\i:&p97PF-$!3N_(*H\\vW1%*F-7$$!3'HLe*)p0el$F-$!3]n-]q46J)*F-7$$!
3j\\ils]jFOF-$!3=#)y1K#)Gm)*F-7$$!3GmTNYWY*f$F-$!3AJUXzfm)z*F-7$$!3'H3
_+#QHrNF-$!3oV(\\*)*poU'*F-7$$!3i***\\P>BJa$F-$!3/oVhoYY9%*F-7$$!3Gm;a
)oS/V$F-$!3t<uXLI#R7)F-7$$!3%HLLL=exJ$F-$!3Mz*RBfWF(pF-7$$!3-LL3_(H+F$
F-$!3E6a5S=L#p'F-7$$!34LL$3K,BA$F-$!33J+?C#Q%flF-7$$!3!HL3_5P%)>$F-$!3
y$Rkv))e`a'F-7$$!3sKLe*)GduJF-$!3]KFG6.IilF-7$$!3aK$eRn32:$F-$!3-*Hcf$
*fhg'F-7$$!3!GLL$eW%o7$F-$!3YK6s9h5smF-7$$!3]KL$ef(QJIF-$!3_pW2Kq)f/(F
-7$$!3lKLLL2$f$HF-$!3g2#f!QW1NtF-7$$!3CmmT&o_Qr#F-$!3SdDhKDK8nF-7$$!3%
)****\\PYx\"\\#F-$!3QB,\\X**>7bF-7$$!33$eR(\\D?nCF-$!33#)Rt\"f\\HX&F-7
$$!3Lm\"z>YIEW#F-$!3M^(\\:rFLT&F-7$$!3e\\(=UPe!=CF-$!3O(pKg=@CR&F-7$$!
3EL$ekG'[$R#F-$!33i<\"3:5')Q&F-7$$!3A+v$46UVM#F-$!3i7FI_9xAaF-7$$!3smm
TNz>&H#F-$!3Cv.-YrJ#\\&F-7$$!3ALe*)fP0YAF-$!39Rw]Y.]pbF-7$$!3;+]P%e4p>
#F-$!3dS'=/pHni&F-7$$!37nT&)3awZ@F-$!3aHq)H#euScF-7$$!3gLLLL7i)4#F-$!3
'z@Nw-dff&F-7$$!39mmTNa%H)=F-$!3-5z#>2k\"fZF-7$$!3o)***\\P'psm\"F-$!3e
)Rq@]_:*RF-7$$!3v)*\\(o/Efh\"F-$!3A`)*4B<C_RF-7$$!3#))**\\iX#ek:F-$!3[
Iu[eE$)eRF-7$$!3())*\\il)QK^\"F-$!3qw3!H$=k\"*RF-7$$!3%*)****\\F&*=Y\"
F-$!3(zPhnlmr-%F-7$$!3+**\\P%o^0T\"F-$!3xgG%za'4USF-7$$!31***\\P43#f8F
-$!3wiHi\\\"or,%F-7$$!38**\\7.X'yI\"F-$!3,9k%f6P-%RF-7$$!3?****\\74_c7
F-$!3Wi&*yZw33QF-7$$!3PlmT5VBU5F-$!3!e\\zSm\"H9HF-7$$!3M:LL$3x%z#)Fes$
!3`q9TVji=CF-7$$!3'*=Le9rc&H(Fes$!3k&3kYiK^V#F-7$$!3gAL$e9d;J'Fes$!3Cw
n'Rgr.Z#F-7$$!3UC$e9;-(>eFes$!3[t#)>m'**RX#F-7$$!3BEL3xruF`Fes$!35id5q
B\\)R#F-7$$!30G$3F>#zN[Fes$!3/PY_l2f(H#F-7$$!3()HLL3s$QM%Fes$!3Wht[fW`
]@F-7$$!3>****\\ivF@AFes$!3U*Gl$QuM]6F-7$$!3]^omm;zr)*!#?$!3R_DC$QRk$
\\!#>7$$\"3aPL$3-Dg5#Fes$\"3MJd^L]g)3\"F-7$$\"3fVLLezw5VFes$\"35)>Xwst
!R@F-7$$\"3-wmTgnd!z%Fes$\"3kdkQ7*pfG#F-7$$\"3W3+]ibQq_Fes$\"3!yLQ<5H
\"*Q#F-7$$\"3)3M$ekV>]dFes$\"3-\"pfb?M([CF-7$$\"3JtmmmJ+IiFes$\"3%f$)*
49!Q*pCF-7$$\"3=QL$3x?'*=(Fes$\"3c$*H+O!o/W#F-7$$\"3-.++v$Q#\\\")Fes$
\"3aN0!Qyu\\T#F-7$$\"3inm\"z\\1A-\"F-$\"3N9(Q$H6BMGF-7$$\"3%\\LL$e\"*[
H7F-$\"3pO:b**4,=PF-7$$\"35o;/w\\-$G\"F-$\"3;(yC2PPI)QF-7$$\"3D,+v$zgl
L\"F-$\"35uB&H\"=0!*RF-7$$\"3SM$e9h'4!R\"F-$\"3Vr#\\EY0y.%F-7$$\"3cnm;
HCjV9F-$\"3ih(*Goi&f.%F-7$$\"3s+](oCor\\\"F-$\"3ww')eTsg.SF-7$$\"3)QL$
ekSq]:F-$\"3sV[?z+1mRF-7$$\"3.n;H#))RUg\"F-$\"3eq%>-Y?.&RF-7$$\"3=++++
dxd;F-$\"3+)zigoR,)RF-7$$\"3Q++]7JFn=F-$\"3A7vEo;E!o%F-7$$\"3e+++D0xw?
F-$\"3=xxs@4CbbF-7$$\"3%3+]P/q%zAF-$\"3I%)4lZGb<bF-7$$\"35,+]i&p@[#F-$
\"3g8ghIcn'[&F-7$$\"3b++v=GB2FF-$\"3ErjfLW.smF-7$$\"3++++vgHKHF-$\"3z;
gf/k_StF-7$$\"3Kmm\"zu5M.$F-$\"394NVw')yPqF-7$$\"3jKL$3UDX8$F-$\"3')[?
<K!*y[mF-7$$\"3+*\\i!*3/)fJF-$\"3_^%Q!\\Fc'e'F-7$$\"3yl;HdF3&=$F-$\"3!
*)e(or0E^lF-7$$\"3fK3_D9O5KF-$\"3is-k%o$H[lF-7$$\"3&*)**\\P4ScB$F-$\"3
/mhUY,0#e'F-7$$\"35K$3-V(>'G$F-$\"3w;SbJPzqnF-7$$\"3ElmmmZvOLF-$\"3f$y
z6%>7CrF-7$$\"3=****\\iirWMF-$\"3W7]/h&Q$)H)F-7$$\"35LLLexn_NF-$\"3#RE
<i\"o\"*)\\*F-7$$\"3Om;HK\"o'zNF-$\"3#*y'ppGatp*F-7$$\"31++D1&emg$F-$
\"3<s\\3TV%\\#)*F-7$$\"3xL$3-))[Oj$F-$\"3Wio--1'y')*F-7$$\"3-nm;a#R1m$
F-$\"3>\"HW\"*R<Q\")*F-7$$\"3)RL$3-+i9PF-$\"3Y]>9$e!=w$*F-7$$\"3%4+++v
+'oPF-$\"3;6))>ee#4Y)F-7$$\"3Qn\"H2L:v\"QF-$\"3q69mcZ?:sF-7$$\"3!QLe9
\"*Hk'QF-$\"3Wx&fFY.wg&F-7$$\"3!o\"H#=?()3*QF-$\"3qs&*Hhwt(o%F-7$$\"3D
+v=#\\W`\"RF-$\"3oa4:@/n/PF-7$$\"3o$3_Dy,)RRF-$\"3IaK%p7e4n#F-7$$\"3om
m\"H2fU'RF-$\"3H649i#f.g\"F-7$$\"3o\\7Gjjr))RF-$\"3)o/y$4*=^2&Fes7$$\"
3nKek`O<8SF-$!3I\"G![a!QT#fFes7$$\"3c;/,W4jPSF-$!3;'4n%3\"ySo\"F-7$$\"
3c**\\PM#)3iSF-$!3IQM$=;RBv#F-7$$\"3a#eRZ_Xl3%F-$!3%R(\\7YZh#y$F-7$$\"
3VmT5:G+6TF-$!3%pLdr:G7w%F-7$$\"3V\\(oa5ga8%F-$!3o@5U2%Gdn&F-7$$\"3UKL
$eR<*fTF-$!3J;'e8wv^^'F-7$$\"3;mTg_RR8UF-$!3G<?]r!\\t/)F-7$$\"3!***\\P
40(oE%F-$!3:=)*)*yqQ<\"*F-7$$\"3kLe9mqM?VF-$!3%\\%pak6)=r*F-7$$\"3Qnm
\"HiBQP%F-$!33U<r=Y>l)*F-7$$\"3'[Lektw2[%F-$!3#yaRinXp<*F-7$$\"3K-++])
Hxe%F-$!3j^)G)R#*H1zF-7$$\"3yn;z%Rk$)o%F-$!3$>!p$G\\B'GpF-7$$\"37MLeR*
)**)y%F-$!3Ej;b')*y'[lF-7$$\"3W+]P%[L'*)[F-$!3[Zy\"=&4uFnF-7$$\"3!fmm
\"H!o-*\\F-$!3`m(\\kC`/8(F-7$$\"3GLL3xS'G/&F-$!3]QtLup[$H(F-7$$\"3y***
**\\7ga4&F-$!3El10_A$\\O(F-7$$\"3[L$e*[\"e<7&F-$!3-E7]ZvOetF-7$$\"3Gmm
\"H<c![^F-$!3nVVR>p0AtF-7$$\"3)***\\(o>aV<&F-$!3C>f[c8_csF-7$$\"3nLL$3
A_1?&F-$!3;swb5&[N;(F-7$$\"3cnmm;V%eI&F-$!3m')3W&yb!*e'F-7$$\"3X,+]7k.
6aF-$!3j*fC!\\]]IfF-7$$\"3]M3-j'eCY&F-$!3kw*pt\\8[n&F-7$$\"3an;a84)Q^&
F-$!3'[_yzO.o\\&F-7$$\"31%3-)Q?fRbF-$!3b9E[R`0SaF-7$$\"3e+D1kJIlbF-$!3
*)**[NEif/aF-7$$\"35<HK*G95f&F-$!31U%e]/I\"*Q&F-7$$\"3jLLe9as;cF-$!3CT
DDgCa\"R&F-7$$\"3s**\\i:*p&>dF-$!3[f4B1v+;bF-7$$\"3#emmmT9C#eF-$!3vPB)
>=f%QcF-7$$\"3WKLeR<vPgF-$!3#QI$zM5p^^F-7$$\"33****\\i!*3`iF-$!3Ougm6:
CpTF-7$$\"34mTN@z$\\I'F-$!3,;FQ)4En.%F-7$$\"35L$3-y'ycjF-$!3qad)RBFk'R
F-7$$\"36+D1Rcj3kF-$!3qyKx]Ku]RF-7$$\"37nm\"z\\%[gkF-$!3_T6w\\#))H(RF-
7$$\"39M3xcLL7lF-$!3yrga\\H]5SF-7$$\"39,]i:A=klF-$!3fyM/H%p'QSF-7$$\"3
;o\"zW2Jgh'F-$!33\"pp`4G^.%F-7$$\"3;NLLL*zym'F-$!3wZ1@v[[$)RF-7$$\"3_N
L$3sr*zoF-$!3#o=6k\"[gdKF-7$$\"3'eLL$3N1#4(F-$!3!)3p&[9CL]#F-7$$\"3_-v
V)RZY9(F-$!392J.#zA[V#F-7$$\"39p;a)GJs>(F-$!3*pM@6aTOT#F-7$$\"3!e$eky^
\")\\sF-$!3uo!4weVbU#F-7$$\"3W-+vo!*R-tF-$!3?yA7:X=^CF-7$$\"33pT&)eH)
\\N(F-$!3UZvWJ@PpCF-7$$\"3tN$e*[oc2uF-$!3?3EWM[WgCF-7$$\"3O-D1R2:guF-$
!3*eqR\"[B=4CF-7$$\"3,pm;HYt7vF-$!3'G$pb/Nx1BF-7$$\"3dNLek6,1xF-$!3r@
\"4A]i&H:F-7$$\"37-+++xG**yF-$!3_RI>0!o()3&Fes7$$\"3(eLL3U/37)F-$\"3Fe
0'fvk&GhFes7$$\"3gpmmT6KU$)F-$\"3!o$*[z7J!p<F-7$$\"38OLeRZQT%)F-$\"3k?
'HR$f;u@F-7$$\"3l-+]P$[/a)F-$\"3(*QZj'QW+T#F-7$$\"3!oLek8!)**e)F-$\"35
ck*pj*3fCF-7$$\"3=pmTN>^R')F-$\"3)\\?MM)e,qCF-7$$\"3a,]PMP/*o)F-$\"3O(
Qz1y1_X#F-7$$\"3qNLLLbdQ()F-$\"3$3T9Hif2V#F-7$$\"3[++]i`1h\"*F-$\"3&[/
UBh$3UMF-7$$\"3#4+]7`f@E*F-$\"3/-'Q/()*=DQF-7$$\"3M,+++PDj$*F-$\"3p7&p
<K94-%F-7$$\"3X-]P%y+QT*F-$\"3sUKuJ;;USF-7$$\"3y,+voyMk%*F-$\"3-iR(z\"
HwDSF-7$$\"36,]7`\\*[^*F-$\"3Kr=#>56/*RF-7$$\"3A-+]P?Wl&*F-$\"3YpoKeTW
eRF-7$$\"3],D\"Gyh(>'*F-$\"3/Xp9kxQ`RF-7$$\"3w+]7G:3u'*F-$\"34e$\\W$G)
4+%F-7$$\"3$=]PMF,%G(*F-$\"3$oI%)ogaZ6%F-7$$\"35,+v=5s#y*F-$\"3Gu(pKP(
*eH%F-7$$\"3W,]P40O\"*)*F-$\"3d&*zmX[$=![F-7$$\"#5F*$\"3W3<[X)p_J&F--%
'COLOURG6&%$RGBG$Fa]p!\"\"$F*F*Fj]p-%+AXESLABELSG6$Q\"x6\"Q\"yF_^p-%%V
IEWG6$;F(F`]p;$!#6F*$\"#6F*" 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 21 "g3:=x->ss(x,10)-f(x);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%#g3Gf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&-%#ssG6$9$\"#5\"\"\"-
%\"fG6#F0!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plo
t(g3(x),x=0..4,y=-10..10);" }}{PARA 13 "" 1 "" {GLPLOT2D 354 265 265 
{PLOTDATA 2 "6%-%'CURVESG6$7^r7$$\"\"!F)$!\"\"F)7$$\"3Hmmmm;')=()!#>$!
3Kv(H<J;\"\\t!#=7$$\"3RLLLe'40j\"F2$!3MI.gRK)H\"\\F27$$\"3mmmm;6m$[#F2
$!3Ei#4t#yYi?F27$$\"3fmmm;yYULF2$\"3SW.<m*\\K>'F/7$$\"3/++](GI)pPF2$\"
3RW&p5a`bs\"F27$$\"3%HLL$eF>(>%F2$\"3qiw=Mt\\)e#F27$$\"3Q*****\\Z7Mf%F
2$\"3$eHe(*)Ql?JF27$$\"3Qmmm\">K'*)\\F2$\"3e*\\FlS)[iLF27$$\"3IKLLeZ*)
*R&F2$\"3WgJE*fdSH$F27$$\"3P*****\\Kd,\"eF2$\"3Bnk8i\\#H\"HF27$$\"39KL
Le9XMiF2$\"3%H%\\E;I#4B#F27$$\"3-mmm\"fX(emF2$\"3^-+'y,'HE8F27$$\"3.**
***\\U7Y](F2$!3I!e>vWu&\\vF/7$$\"3Wmm;H9lRzF2$!3a#\\3etU7u\"F27$$\"3'Q
LLLV!pu$)F2$!3jK8$)z6a?DF27$$\"3K+++DI(yv)F2$!3ga^sx)\\I'HF27$$\"3xmmm
;c0T\"*F2$!3;VLq.5bLJF27$$\"3+LLLe%GCd*F2$!3q^*4MAS'zHF27$$\"3#*******
H,Q+5!#<$!3/?md[dyuCF27$$\"3&*******RXpV5Feq$!3=wDD=sqq;F27$$\"3)*****
**\\*3q3\"Feq$!3Z-1eK>g1mF/7$$\"3)*******p=\\q6Feq$\"3-5ppS#)o@9F27$$
\"3@LLe9rR37Feq$\"3yI><%fr^A#F27$$\"3mmm;fBIY7Feq$\"32)ot<oi'HGF27$$\"
3OL$3-')Q)o7Feq$\"3%*Qj1OBupIF27$$\"33++Dh`P\"H\"Feq$\"3,j!RCLv&4KF27$
$\"3dm;Hi=\"RJ\"Feq$\"3L;py+)oOC$F27$$\"3GLLLj$[kL\"Feq$\"3qn/,V%R*pJF
27$$\"3MLLL36ju8Feq$\"3E'Qvq/yY!GF27$$\"3?LLL`Q\"GT\"Feq$\"3')3gp8/Jl@
F27$$\"3!*****\\s]k,:Feq$!3gT%yvV\"f**H!#?7$$\"39LLL`dF!e\"Feq$!3'G__#
o9Mv?F27$$\"3^mm\"H\"4TB;Feq$!3c]%e$*)['4#HF27$$\"33++]sgam;Feq$!3IuDQ
J\"*zCMF27$$\"3+++v3N3(o\"Feq$!3iXH@7UQANF27$$\"3&******\\%4i2<Feq$!3m
kO\\8Y$>_$F27$$\"35++D\"Qe\"G<Feq$!3BB!eSp[AU$F27$$\"3/++]<ep[<Feq$!3Z
h/ay='[A$F27$$\"3qmm\"z8`:z\"Feq$!3j7#e'R-<?DF27$$\"3QLLLe/TM=Feq$!3O9
.z-l`'[\"F27$$\"3JLL$eDBJ\">Feq$\"3'>\"==fcV\"f)F/7$$\"3)****\\([Wdb>F
eq$\"3%4nZ(*>3Q4#F27$$\"3immmTc-)*>Feq$\"3H@#e.]IG6$F27$$\"3ym;/rI2??F
eq$\"3$4>ai9*o7NF27$$\"3[mmT+07U?Feq$\"3Ch)4N+ZT!QF27$$\"3=m;zHz;k?Feq
$\"3Y!RG#4j\"e(RF27$$\"3Mmm;f`@'3#Feq$\"3qOX$))))f*>SF27$$\"3\")***\\7
r2a5#Feq$\"3a0HMo0_^RF27$$\"3HLLLj+gC@Feq$\"3Y.*pK\\(f$y$F27$$\"3wmmT:
CzV@Feq$\"3JoB,.Zp=NF27$$\"3y****\\nZ)H;#Feq$\"3m`tW(HE<;$F27$$\"3NLLe
*HTW?#Feq$\"3A<IIMTu8@F27$$\"3YmmmJy*eC#Feq$\"3'\\s3\"os;$z(F/7$$\"3')
******R^bJBFeq$!37\\kC%RvcC#F27$$\"3s****\\AYXtBFeq$!3H4%QYD#)H]$F27$$
\"3f*****\\5a`T#Feq$!3-@V(elz]R%F27$$\"3h**\\(o0CcV#Feq$!3i'=Z3M4tl%F2
7$$\"3k***\\(3S*eX#Feq$!3C`3]5Bt%z%F27$$\"3m**\\igR;wCFeq$!3EM4)zj%o+[
F27$$\"3o****\\7RV'\\#Feq$!3Of())zMP>n%F27$$\"3m***\\PcY9a#Feq$!3A!\\!
>8/(=\"RF27$$\"3k*****\\@fke#Feq$!3Ik')fbTzjDF27$$\"3/LLL`4NnEFeq$\"3[
hV&H4a84)F/7$$\"3#*******\\,s`FFeq$\"3)z\"ejVSt)Q%F27$$\"3)HL$e9=&Gz#F
eq$\"3W$>j'\\oo4bF27$$\"3[mm;zM)>$GFeq$\"3%>%\\k&\\^%4hF27$$\"30L3_!zy
E%GFeq$\"3E*\\bvg(yohF27$$\"3i**\\(=5uL&GFeq$\"3W$**Rn>b/='F27$$\"3?m
\"HKTpS'GFeq$\"3?v\"e)zZ`VhF27$$\"3?LLeCZwuGFeq$\"3KmcBkoXdgF27$$\"3ym
;HZ`:'*GFeq$\"3fRE$>Uftt&F27$$\"3$*******pfa<HFeq$\"3v;7$)>U$HA&F27$$
\"3kmm\"zy*zdHFeq$\"3!e7Y!\\OIjPF27$$\"3#HLLeg`!)*HFeq$\"3!*yw`?hml<F2
7$$\"3w****\\#G2A3$Feq$!3)[src_xZG$F27$$\"3Ymm\"H3XL7$Feq$!3;(4H^XWPj&
F27$$\"3;LLL$)G[kJFeq$!38IJS\\lS6vF27$$\"3#)**\\i:m,'=$Feq$!3>zWSx%y[@
)F27$$\"3\\mm\"zM]v?$Feq$!3/SqI$\\;Ao)F27$$\"3/+D19sJ=KFeq$!3Q(\\HXz=&
=))F27$$\"3:L$3-3%3HKFeq$!3#)4U`3N)f)))F27$$\"3EmTNY4&)RKFeq$!3INk$Qb0
A)))F27$$\"3#)****\\7yh]KFeq$!3!*>7EZfC0))F27$$\"3Wm;/ctNrKFeq$!3S3Z2
\\l&eW)F27$$\"31LLe**o4#H$Feq$!3v;<\"[CO^!yF27$$\"3q**\\7Vk$GJ$Feq$!3)
p4.'3wz&)oF27$$\"3xmmm')fdLLFeq$!3i,g!zOn%)p&F27$$\"3bmmm,FT=MFeq$\"3n
Xo,CG#HU\"F27$$\"3FLL$e#pa-NFeq$\"35$pfu,UL))*F27$$\"3emm\"HB-7a$Feq$
\"3'3/'>yLH98Feq7$$\"3!*******Rv&)zNFeq$\"3O8K]A$)zQ:Feq7$$\"3%omTgPL4
f$Feq$\"3])\\zVky\"y:Feq7$$\"3OLL37#4?g$Feq$\"3g^Fu\")eh/;Feq7$$\"3()*
*\\7[]38OFeq$\"3/k^LO@;<;Feq7$$\"3#ommT)3;COFeq$\"3T\"oef\"4\"\\h\"Feq
7$$\"3LL$3-sO_j$Feq$\"3QrY>xG+(f\"Feq7$$\"3%)***\\ib7jk$Feq$\"3%oAcoOJ
Ec\"Feq7$$\"3!om\"H#R)QdOFeq$\"3sWa\\Ex/6:Feq7$$\"3ILLLGUYoOFeq$\"3ts(
GbKm:W\"Feq7$$\"3\"*****\\n'*33PFeq$\"3a$>(>-@uP5Feq7$$\"3_mmm1^rZPFeq
$\"3A$ob,,qgx$F27$$\"3-+]7)fR)oPFeq$!356\\wY`$))=)F/7$$\"33LLe*3k**y$F
eq$!3_xfZ&**)*f:'F27$$\"3fm;/\"e)36QFeq$!38h>f-&z:A\"Feq7$$\"34++]sI@K
QFeq$!3+uWFL!pm*=Feq7$$\"35++D1>V_QFeq$!3HYNC`lb.EFeq7$$\"33+++S2lsQFe
q$!3?%R)=I!Q]O$Feq7$$\"33++vt&pG*QFeq$!3_3U\"zJ*[vTFeq7$$\"34++]2%)38R
Feq$!3MKDHw4]G]Feq7$$\"31+]i0j\"[$RFeq$!3c`2-%*>]%)fFeq7$$\"3/++v.UacR
Feq$!3w0')=\"p2>(pFeq7$$\"3-+](=5s#yRFeq$!3Ec@F_^e!)zFeq7$$\"\"%F)$!3!
H**************)Feq-%'COLOURG6&%$RGBG$\"#5F+F(F(-%+AXESLABELSG6$Q\"x6
\"Q\"yFi_m-%%VIEWG6$;F(F[_m;$!#5F)$Fd_mF)" 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 0 "" }}}}{MARK "22 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 
1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }