{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 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 271 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 273 "" 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 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 Output" -1 12 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 "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.3 " }{TEXT -1 54 " Graphs of Partial Sums of the Fourier Cosine Series \+ " }}{PARA 0 "" 0 "" {TEXT -1 4 "of " }{TEXT 256 1 "f" }{TEXT -1 1 "( " }{TEXT 257 1 "x" }{TEXT -1 4 ") = " }{TEXT 273 1 "x" }{TEXT -1 11 " \+ on (0, +1)" }}{PARA 0 "" 0 "" {TEXT -1 31 "The graphs of the partial s ums " }{TEXT 268 1 "S" }{TEXT -1 3 "3, " }{TEXT 269 1 "S" }{TEXT -1 6 "5 and " }{TEXT 271 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 46 "f(k,x) := -4/Pi^2*cos((2*k-1)*Pi*x)/(2*k-1)^ 2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%\"fG6$%\"kG%\"xG,$**\"\"%\"\" \"%#PiG!\"#-%$cosG6#*(,&*&\"\"#F,F'F,F,F,!\"\"F,F-F,F(F,F,F3F.F6" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "s3(x) := 1/2 + sum(f(k,x),k= 1..2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%#s3G6#%\"xG,(#\"\"\"\"\"# F**(\"\"%F*%#PiG!\"#-%$cosG6#*&F.F*F'F*F*!\"\"*&#F-\"\"*F**&F.F/-F16#, $*(\"\"$F*F.F*F'F*F*F*F*F4" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "plot(s3(x), x=-3..3, y=-1.5..1.5, colour=blue, thickness=2, \ntitl e=`y = S3(x)`);" }}{PARA 13 "" 1 "" {GLPLOT2D 335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7as7$$!\"$\"\"!$\"34MsVIs!fg%*F-7$$!3u**\\7.k&4&HF 1$\"3\"*oL.T#)*yS*F-7$$!3&*****\\P&3Y$HF1$\"3x0;!p?&4N$*F-7$$!3#****\\ i!G\">!HF1$\"3*4UGL%p:L\"*F-7$$!3!******\\2<#pGF1$\"3ueF3#*y&\\'))F-7$ $!3')**\\78.K7GF1$\"3/=_=:w%*z#)F-7$$!3#)***\\7bBav#F1$\"3P%Gh,/qCh(F- 7$$!3'***\\(=>P9p#F1$\"3A!4Ky3\\]&oF-7$$!36++]K3XFEF1$\"3OlK_BO$)fhF-7 $$!3w******H./jDF1$\"3]VGO$yJ`a&F-7$$!3%)****\\F)H')\\#F1$\"3W)H^o]p$) )\\F-7$$!3))**\\(oXDXV#F1$\"3)*\\![n)yzKWF-7$$!3#****\\i3@/P#F1$\"3vEh '4UF%=QF-7$$!3/++vG\"))4J#F1$\"3)fIL.gXF<$F-7$$!3;++Dr^b^AF1$\"3%>UI1J %HrCF-7$$!3/++D'y:+>#F1$\"3G4+AG0QYl&)!#>7$$!3=++D\"GK[1#F1$\"3rpGW_) =4i'Fhq7$$!3O++D^7#*[?F1$\"3Cm)oM0*4F1$\"3wU:IC=Ra]Fhq7$$!3%******\\:o%p>F1$ \"38ZU$fT9)R`Fhq7$$!3#***\\(=:3O&>F1$\"3-6$>5/p;#eFhq7$$!3!****\\([\"[ x$>F1$\"3S&[x]ELS\\'Fhq7$$!3')****\\U\"Gg!>F1$\"3Q\"f6sM'Qv$)Fhq7$$!3/ ++DO\"3V(=F1$\"37k!zW4D%*3\"F-7$$!3)***\\i&G_!4=F1$\"33\\Eos3#pv\"F-7$ $!3#******\\V'zVjo\"F1$\"3)\\&3<<0\\ .KF-7$$!3******\\d;%)G;F1$\"3jt`sV)pf#QF-7$$!3%****\\7tNTc\"F1$\"3>fm_ It$[W%F-7$$!3!******\\!)H%*\\\"F1$\"3\\(pYK(*R[+&F-7$$!3'********=eWV \"F1$\"3gET6Cx!yc&F-7$$!3/+++vl[p8F1$\"3#3aqR)*\\6>'F-7$$!3(******\\Qu oI\"F1$\"39)R;(zaXuoF-7$$!3\"******\\>iUC\"F1$\"3SzHt]1C;wF-7$$!3'*** \\7GVS(=\"F1$\"3M/vpG>/$G)F-7$$!3-++DhkaI6F1$\"3yHvcNd5n))F-7$$!31+vo4 o:!\\&G9*F-7$$!3))**\\7ep$H1\"F1$\"3yV`I$yusM*F-7$$!3!) \\PM#eMg/\"F1$\"3V=PkE48>%*F-7$$!3$**\\il?K\"H5F1$\"3A**pM2XLp%*F-7$$! 31]7yI)HA,\"F1$\"3+BnOXY=(\\*F-7$$!3s******\\XF`**F-$\"3L8*p()[!H-&*F- 7$$!3s*****\\PL0Q*F-$\"37wI@*[l?N*F-7$$!3u*******>#z2))F-$\"3s,[G4dgm* )F-7$$!31++Dc!e:9)F-$\"3@%Q%\\#)p`+$)F-7$$!3S++]7RKvuF-$\"3uEEZbKv*[;='F-7$$! 3A++D1j$)[cF-$\"3!G&[)4(\\)=c&F-7$$!3q)***\\7*3=+&F-$\"3(*yl'GXN:+&F-7 $$!3g)****\\#eo&Q%F-$\"3#\\U\\f=w!pWF-7$$!3[)***\\PFcpPF-$\"3)37h()*Q( [)QF-7$$!3K)**\\7$HqEJF-$\"3#HqWR!f'>>$F-7$$!3;)****\\7VQ[#F-$\"3dWW70 6BLCF-7$$!35)**\\P9(\\$*=F-$\"30#pcT-g)Ql0&QjQ#F-7$$\"3?++v$\\>m1$F-$\"3JE)\\v e*4BJF-7$$\"3E,++vuY)o$F-$\"3hYc(>u\"G-QF-7$$\"3e****\\(G(*3L%F-$\"3Oh =?qq&)>WF-7$$\"3!z******4FL(\\F-$\"3_]&eWaet(\\F-7$$\"30)***\\P$>=g&F- $\"3)QVI$*)*f(>bF-7$$\"3A)****\\d6.B'F-$\"3GUfU*>**\\6'F-7$$\"3(*)**\\ 785%QoF-$\"3gm@WIrKonF-7$$\"3s****\\(o3lW(F-$\"3_E)F-7$$\"3u***\\( =_(zC\"F1$\"3#yRGC]z;d(F-7$$\"3/+](o3Z@J\"F1$\"3(\\5]942S\"oF-7$$\"3M+ ++b*=jP\"F1$\"3H3LNM`c@hF-7$$\"3(***\\(=o*pO9F1$\"31V*o(4NmZbF-7$$\"3g ***\\(3/3(\\\"F1$\"3>/$=EI$yC]F-7$$\"3%)***\\im&>g:F1$\"3geJZLu6![%F-7 $$\"33++vB4JB;F1$\"3i-!*)=Iv@)QF-7$$\"3!***\\PCw,&o\"F1$\"3^n6CoZI=KF- 7$$\"3u*****\\KCnu\"F1$\"3edM(GwX>\\#F-7$$\"3t**\\(=_D8\"=F1$\"3*[-'y1 sCJF1$\"36u )39C\\_I)Fhq7$$\"30+]P\\`9Q>F1$\"3?C,\\<+$\\Z'Fhq7$$\"3C]7.2+q`>F1$\"3 cdiU'*HK=eFhq7$$\"3A+vokYDp>F1$\"3K2QG,q+X`Fhq7$$\"3=]PMA$4[)>F1$\"3'y xzY'zdg]Fhq7$$\"3P+++!)RO+?F1$\"3QM\\<=eTo\\Fhq7$$\"3A+D1k3F;?F1$\"3I6 #[]-WT2&Fhq7$$\"32+]7[xw7#F1$\"3%3/?7[Pl5\"F-7$$\"3=+]i?(>2>#F1$\"3 mPzVq-Mad9MT$[)\\#F-7$$\"3K+]P\\L!=J#F1$\"3 A'o/pAm?=$F-7$$\"3G+++5jypBF1$\"3ErpkSR#>\"QF-7$$\"3B++DE8COCF1$\"3+NL g'GB#[WF-7$$\"3<++]Ujp-DF1$\"3qAi2(3))G-&F-7$$\"33++D,X8iDF1$\"3)*)4CX U:s`&F-7$$\"3++++gEd@EF1$\"3Wc?b_kH+hF-7$$\"31+]PMh%\\o#F1$\"3U0PU/B)3 y'F-7$$\"39++v3'>$[FF1$\"3$=%4KzD?FvF-7$$\"39+++5h(*3GF1$\"3Rv]]Pm@U#) F-7$$\"37++D6EjpGF1$\"3-BmTA/to))F-7$$\"3))*\\P%eWA-HF1$\"3UZES;LTN\"* F-7$$\"31+]i0j\"[$HF1$\"3!zf7!))H9O$*F-7$$\"3%*\\(=#HA6^HF1$\"3fe?aIn \\3%*F-7$$\"3E+D\"G:3u'HF1$\"3!\\*y3\\'f3Y*F-7$$\"39]iSwSq$)HF1$\"3Y16 FCIb#\\*F-7$$\"\"$F*F+-%*THICKNESSG6#\"\"#-%'COLOURG6&%$RGBG$F*F*Feem$ \"*++++\"!\")-%&TITLEG6#%*y~=~S3(x)G-%+AXESLABELSG6$Q\"x6\"Q\"yFafm-%% VIEWG6$;F(F[em;$!#:!\"\"$\"#:Fjfm" 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 34 "s5(x) := 1/2 + sum(f(k,x),k=1..3);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>-%#s5G6#%\"xG,*#\"\"\"\"\"#F**(\"\"%F*%#PiG!\"#-%$co sG6#*&F.F*F'F*F*!\"\"*&#F-\"\"*F**&F.F/-F16#,$*(\"\"$F*F.F*F'F*F*F*F*F 4*&#F-\"#DF**&F.F/-F16#,$*(\"\"&F*F.F*F'F*F*F*F*F4" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "plot(s5(x), x=-3..3, y=-1.5..1.5, colour=bl ue, thickness=2, \ntitle=`y = S5(x)`);" }}{PARA 13 "" 1 "" {GLPLOT2D 335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7]q7$$!\"$\"\"!$\"33u\\E6wFl'*! #=7$$!3&*****\\P&3Y$H!#<$\"32>SYKz%*=%*F-7$$!3!******\\2<#pGF1$\"3#fYn J$*)e*y)F-7$$!3')**\\78.K7GF1$\"3ql'p01g37)F-7$$!3#)***\\7bBav#F1$\"3g v12I**\\)[(F-7$$!3'***\\(=>P9p#F1$\"3e%*y\">T)ywoF-7$$!36++]K3XFEF1$\" 3vk/bB'3rI'F-7$$!3w******H./jDF1$\"3?G7QET)3o&F-7$$!3%)****\\F)H')\\#F 1$\"3[C!)fg1)[)\\F-7$$!3))**\\(oXDXV#F1$\"3EnX)4_XRH%F-7$$!3#****\\i3@ /P#F1$\"35mJ$*Q#*\\tOF-7$$!3/++vG\"))4J#F1$\"3x&ebYG.\\9$F-7$$!3;++Dr^ b^AF1$\"3[Sl\")G>4$e#F-7$$!3/++D'y:+>#F1$\"3y2Sk9[]1>F-7$$!3$****\\7Sw %G@F1$\"3UG@2i?L%=\"F-7$$!3=++D\"GK[1#F1$\"3#*Q*HtYP-x&!#>7$$!3*****\\ 7;)=,?F1$\"3kn)p@\"42[LFdp7$$!3!****\\([\"[x$>F1$\"3_f&p(z%H\")e&Fdp7$ $!3/++DO\"3V(=F1$\"3cshW1u3`6F-7$$!3)***\\i&G_!4=F1$\"3s^&*\\[')R<>F-7 $$!3#******\\V'zVjo\"F1$\"3i(e\")fy>* oJF-7$$!3******\\d;%)G;F1$\"3[nppc,@!o$F-7$$!3%****\\7tNTc\"F1$\"3XbMk _^x2VF-7$$!3!******\\!)H%*\\\"F1$\"3i>zZV>H1]F-7$$!3'********=eWV\"F1$ \"3efY*=U[nq&F-7$$!3/+++vl[p8F1$\"3\"**p<5F'*\\L'F-7$$!3(******\\QuoI \"F1$\"3MrV_dp#>*oF-7$$!3\"******\\>iUC\"F1$\"3QMDP)Rc<\\(F-7$$!3'*** \\7GVS(=\"F1$\"3\"zlnlr!4C\")F-7$$!3-++DhkaI6F1$\"3K6TZ7/F#z)F-7$$!3)) **\\7ep$H1\"F1$\"3-K8lUJTO%*F-7$$!3s******\\XF`**F-$\"3]gy/Dz'Rm*F-7$$ !3s*****\\PL0Q*F-$\"3*)R5o=$*HV%*F-7$$!3u*******>#z2))F-$\"3(>kxph+%=* )F-7$$!31++Dc!e:9)F-$\"3$o?#[RVTU\")F-7$$!3S++]7RKvuF-$\"3.yM8o'\\wS(F -7$$!31,+D1Qf&)oF-$\"3c]kF=j0^oF-7$$!3s,+++P'eH'F-$\"3[_H!HfolK'F-7$$! 3A++D1j$)[cF-$\"3UUN3CZ&**p&F-7$$!3q)***\\7*3=+&F-$\"3)*HB.)3'*>+&F-7$ $!3g)****\\#eo&Q%F-$\"3&pP!e,T\"eL%F-7$$!3[)***\\PFcpPF-$\"3CmO%*=[ELP F-7$$!3K)**\\7$HqEJF-$\"3)on$R]Q\"*fJF-7$$!3;)****\\7VQ[#F-$\"3%)['43( \\t]DF-7$$!35)**\\P9(\\$*=F-$\"3'yR@Bj5()*=F-7$$!32)***\\i6:.8F-$\"3*[ AbG'y507F-7$$!39$***\\(oKQm'Fdp$\"3zT!Qrn$Q,fFdp7$$!3Wb+++v`hH!#?$\"39 +]6ne[_LFdp7$$\"3%[***\\i]2=jFdp$\"3]kFBIL'Hl&Fdp7$$\"3]****\\(QIKH\"F -$\"3%G\\mqb%)Q>\"F-7$$\"3K******\\4+p=F-$\"3c%oDBm!**p=F-7$$\"38**** \\7:xWCF-$\"3p!>13Sr/^#F-7$$\"3?++v$\\>m1$F-$\"3%y7z!=g;1JF-7$$\"3E,++ vuY)o$F-$\"35U$=53%>fOF-7$$\"3e****\\(G(*3L%F-$\"3#Rxh9=`\"zUF-7$$\"3! z******4FL(\\F-$\"3'**GjKLo0(\\F-7$$\"30)***\\P$>=g&F-$\"37\"=TQm%=^cF -7$$\"3A)****\\d6.B'F-$\"3?`o=5'>mE'F-7$$\"3(*)**\\785%QoF-$\"3D&**4xA N!4oF-7$$\"3s****\\(o3lW(F-$\"3Iw,d1ScytF-7$$\"3U***\\iX)p@\")F-$\"32J \"z#R^4>\")F-7$$\"35*****\\A))oz)F-$\"3bG-'pWsk!*)F-7$$\"3X(***\\iid.% *F-$\"3MWmS:-'*e%*F-7$$\"3e******Hk-,5F1$\"3ME8R)R9_m*F-7$$\"3%)****\\ FL!e1\"F1$\"3,.ZipB'fT*F-7$$\"36+++D-eI6F1$\"3e4n4Uw)=z)F-7$$\"3!***\\ (=sx#*=\"F1$\"3xYJJ*>K@5)F-7$$\"3u***\\(=_(zC\"F1$\"3Q.FTq.Y`uF-7$$\"3 /+](o3Z@J\"F1$\"3Ri#fQ/_Z%oF-7$$\"3M+++b*=jP\"F1$\"3#)[T7B@fsiF-7$$\"3 (***\\(=o*pO9F1$\"3S'[5P&yd$o&F-7$$\"3g***\\(3/3(\\\"F1$\"3!Q1Q[P:A.&F -7$$\"3%)***\\im&>g:F1$\"3))zNQ)Gs'[VF-7$$\"33++vB4JB;F1$\"3'yQmE]33t$ F-7$$\"3!***\\PCw,&o\"F1$\"3iX<#Gn.0=$F-7$$\"3u*****\\KCnu\"F1$\"3]uMB *>I0g#F-7$$\"3t**\\(=_D8\"=F1$\"31>-S5D!3*=F-7$$\"3s***\\(=n#f(=F1$\"3 (Hr5of`]8\"F-7$$\"30+]P\\`9Q>F1$\"3GIxYyelgbFdp7$$\"3P+++!)RO+?F1$\"3a LM6wLIZLFdp7$$\"3A++D;:*R1#F1$\"3:Gx\"[P;-r&Fdp7$$\"30++]_!>w7#F1$\"3k AxdRKou6F-7$$\"3=+]i?(>2>#F1$\"3$o;J1uMZ\">F-7$$\"3O++v)Q?QD#F1$\"3`;1 #3\"R.1EF-7$$\"3K+]P\\L!=J#F1$\"3O!))fK:\"=_JF-7$$\"3G+++5jypBF1$\"3) \\b4!fssnOF-7$$\"3B++DE8COCF1$\"3daRVkin6VF-7$$\"3<++]Ujp-DF1$\"3tT3A9 AvH]F-7$$\"33++D,X8iDF1$\"3!yc#p$*))[rcF-7$$\"3++++gEd@EF1$\"3K3G@x9>` iF-7$$\"31+]PMh%\\o#F1$\"3))=__0/')=oF-7$$\"39++v3'>$[FF1$\"3W&Q(o#4Oc T(F-7$$\"39+++5h(*3GF1$\"3Gu7*o[6<3)F-7$$\"37++D6EjpGF1$\"3mrGu0**H%z) F-7$$\"31+]i0j\"[$HF1$\"3q+**)*p![/U*F-7$$\"\"$F*F+-%*THICKNESSG6#\"\" #-%'COLOURG6&%$RGBG$F*F*Fajl$\"*++++\"!\")-%&TITLEG6#%*y~=~S5(x)G-%+AX ESLABELSG6$Q\"x6\"Q\"yF][m-%%VIEWG6$;F(Fgil;$!#:!\"\"$\"#:Ff[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 36 "s50(x) := 1/2 + sum(f(k,x),k =1..25);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>-%$s50G6#%\"xG,V#\"\"\"\" \"#F**(\"\"%F*%#PiG!\"#-%$cosG6#*&F.F*F'F*F*!\"\"*&#F-\"%,CF**&F.F/-F1 6#,$*(\"#\\F*F.F*F'F*F*F*F*F4*&#F-\"%\"o\"F**&F.F/-F16#,$*(\"#TF*F.F*F 'F*F*F*F*F4*&#F-\"\"*F**&F.F/-F16#,$*(\"\"$F*F.F*F'F*F*F*F*F4*&#F-\"#D F**&F.F/-F16#,$*(\"\"&F*F.F*F'F*F*F*F*F4*&#F-F=F**&F.F/-F16#,$*(\"\"(F *F.F*F'F*F*F*F*F4*&#F-\"#\")F**&F.F/-F16#,$*(FIF*F.F*F'F*F*F*F*F4*&#F- \"$@\"F**&F.F/-F16#,$*(\"#6F*F.F*F'F*F*F*F*F4*&#F-\"$p\"F**&F.F/-F16#, $*(\"#8F*F.F*F'F*F*F*F*F4*&#F-\"$D#F**&F.F/-F16#,$*(\"#:F*F.F*F'F*F*F* F*F4*&#F-\"$*GF**&F.F/-F16#,$*(\"#F*F.F*F'F*F*F*F*F4*&#F-\"$T%F**&F.F/-F16#,$*(\"#@F*F.F*F 'F*F*F*F*F4*&#F-\"$H&F**&F.F/-F16#,$*(\"#BF*F.F*F'F*F*F*F*F4*&#F-\"$D' F**&F.F/-F16#,$*(FRF*F.F*F'F*F*F*F*F4*&#F-\"$H(F**&F.F/-F16#,$*(\"#FF* F.F*F'F*F*F*F*F4*&#F-\"$T)F**&F.F/-F16#,$*(\"#HF*F.F*F'F*F*F*F*F4*&#F- \"$h*F**&F.F/-F16#,$*(\"#JF*F.F*F'F*F*F*F*F4*&#F-\"%*3\"F**&F.F/-F16#, $*(\"#LF*F.F*F'F*F*F*F*F4*&#F-\"%D7F**&F.F/-F16#,$*(\"#NF*F.F*F'F*F*F* F*F4*&#F-\"%p8F**&F.F/-F16#,$*(\"#PF*F.F*F'F*F*F*F*F4*&#F-\"%@:F**&F.F /-F16#,$*(\"#RF*F.F*F'F*F*F*F*F4*&#F-\"%\\=F**&F.F/-F16#,$*(\"#VF*F.F* F'F*F*F*F*F4*&#F-\"%D?F**&F.F/-F16#,$*(\"#XF*F.F*F'F*F*F*F*F4*&#F-\"%4 AF**&F.F/-F16#,$*(\"#ZF*F.F*F'F*F*F*F*F4" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "plot(s50(x), x=-3..3, y=-1.5..1.5, colour=blue, thick ness=2, \ntitle=`y = S50(x)`);" }}{PARA 13 "" 1 "" {GLPLOT2D 335 335 335 {PLOTDATA 2 "6(-%'CURVESG6#7]q7$$!\"$\"\"!$\"3!o@P9p#F1$\"3$e.gv,AM\"pF-7$$!36++]K3XFEF1$\"3G#F1$\"3*pP)R:5f,>F-7$$!3$****\\7Sw%G@F1$\"3glgXM5$ GG\"F-7$$!3=++D\"GK[1#F1$\"3(R-kz(eM/l!#>7$$!3*****\\7;)=,?F1$\"3wBgw- a#G7%!#?7$$!3!****\\([\"[x$>F1$\"3e[Qi6svJiFdp7$$!3/++DO\"3V(=F1$\"3)f rJfLAaD\"F-7$$!3)***\\i&G_!4=F1$\"3T,iQV0!4\">F-7$$!3#******\\V'zVjo\"F1$\"3WiUC\"F1$\"3s9;l-B1evF-7$$!3'***\\7GVS(=\"F1$\"3@))G0M&fY7)F-7 $$!3-++DhkaI6F1$\"35h?u&[\\lp)F-7$$!3))**\\7ep$H1\"F1$\"3Ihr;wUbp$*F-7 $$!3s******\\XF`**F-$\"3qpHyG@s[**F-7$$!3s*****\\PL0Q*F-$\"3O-I\"eWo+Q *F-7$$!3u*******>#z2))F-$\"3J#>m:[4t!))F-7$$!31++Dc!e:9)F-$\"3r!R2H)3X S\")F-7$$!3S++]7RKvuF-$\"3=^F>z,RwuF-7$$!31,+D1Qf&)oF-$\"3#>qY%pzj%)oF -7$$!3s,+++P'eH'F-$\"3msm_#4WnH'F-7$$!3A++D1j$)[cF-$\"3+L=skwD[cF-7$$! 3q)***\\7*3=+&F-$\"3W5e*>$>$=+&F-7$$!3g)****\\#eo&Q%F-$\"3/4!eg*f(eQ%F -7$$!3[)***\\PFcpPF-$\"3q66.M\"[\"pPF-7$$!3K)**\\7$HqEJF-$\"3LrYR'\\,w 7$F-7$$!3;)****\\7VQ[#F-$\"3O*z)QdMu#[#F-7$$!35)**\\P9(\\$*=F-$\"37/)3 yO=\\*=F-7$$!32)***\\i6:.8F-$\"3=rc$oVN6I\"F-7$$!39$***\\(oKQm'Fdp$\"3 GbZDvMd#p'Fdp7$$!3Wb+++v`hHFjp$\"3A)RCtr=#)[%Fjp7$$\"3%[***\\i]2=jFdp$ \"3s@9J[#y-L'Fdp7$$\"3]****\\(QIKH\"F-$\"3m$QQE?Q7H\"F-7$$\"3K******\\ 4+p=F-$\"3o1zMz]Cq=F-7$$\"38****\\7:xWCF-$\"3F3Fw*HcSW#F-7$$\"3?++v$\\ >m1$F-$\"3/kTQ]$eu1$F-7$$\"3E,++vuY)o$F-$\"3'\\>@eb,wo$F-7$$\"3e****\\ (G(*3L%F-$\"3/;-h=FjJVF-7$$\"3!z******4FL(\\F-$\"3'etp[Z(*H(\\F-7$$\"3 0)***\\P$>=g&F-$\"3`^c:)\\*y,cF-7$$\"3A)****\\d6.B'F-$\"3GNw!4lC2B'F-7 $$\"3(*)**\\785%QoF-$\"3%yqb&R<%y$oF-7$$\"3s****\\(o3lW(F-$\"3A_i!4s!H ZuF-7$$\"3U***\\iX)p@\")F-$\"3I1a\\**HO?\")F-7$$\"35*****\\A))oz)F-$\" 3m42Y;*znz)F-7$$\"3X(***\\iid.%*F-$\"3L]'G1RDYS*F-7$$\"3e******Hk-,5F1 $\"3#=D\"3G0&*e**F-7$$\"3%)****\\FL!e1\"F1$\"3l`=]rSTR$*F-7$$\"36+++D- eI6F1$\"31xgx'Q6ip)F-7$$\"3!***\\(=sx#*=\"F1$\"3ede6\"z.e5)F-7$$\"3u** *\\(=_(zC\"F1$\"3I(=(G\"=D8_(F-7$$\"3/+](o3Z@J\"F1$\"3CH]e))>gxoF-7$$ \"3M+++b*=jP\"F1$\"3?q\"=ZK+tB'F-7$$\"3(***\\(=o*pO9F1$\"3R>)e;B)eKcF- 7$$\"3g***\\(3/3(\\\"F1$\"3\\W(zNga&H]F-7$$\"3%)***\\im&>g:F1$\"3'46/` &\\2)R%F-7$$\"33++vB4JB;F1$\"3)QWvc1Wkw$F-7$$\"3!***\\PCw,&o\"F1$\"3Oq 0upx_]JF-7$$\"3u*****\\KCnu\"F1$\"3eb_6$p]<`#F-7$$\"3t**\\(=_D8\"=F1$ \"3C8\")=]y8))=F-7$$\"3s***\\(=n#f(=F1$\"3N*fg_]R'R7F-7$$\"30+]P\\`9Q> F1$\"3cYo>l(G&*='Fdp7$$\"3P+++!)RO+?F1$\"3uyI5R2$*eSFjp7$$\"3A++D;:*R1 #F1$\"3#pnndYJfT'Fdp7$$\"30++]_!>w7#F1$\"3mi?n!e`VF\"F-7$$\"3=+]i?(>2> #F1$\"3)*4-^Fei3>F-7$$\"3O++v)Q?QD#F1$\"3,\\goguCPDF-7$$\"3K+]P\\L!=J# F1$\"3N3.wRg(*=JF-7$$\"3G+++5jypBF1$\"3G@>@$4#)pp$F-7$$\"3B++DE8COCF1$ \"3y=[gv'yGO%F-7$$\"3<++]Ujp-DF1$\"3'G*>LCkHF]F-7$$\"33++D,X8iDF1$\"3h &QD[Mn5i&F-7$$\"3++++gEd@EF1$\"3-e!4OS`f@'F-7$$\"31+]PMh%\\o#F1$\"3QY. IY\\w[oF-7$$\"39++v3'>$[FF1$\"3uH&yCs/V[(F-7$$\"39+++5h(*3GF1$\"3].fS^ )R$)3)F-7$$\"37++D6EjpGF1$\"3[m-&\\qT$)p)F-7$$\"31+]i0j\"[$HF1$\"3'p'= $o&Q)eM*F-7$$\"\"$F*F+-%*THICKNESSG6#\"\"#-%'COLOURG6&%$RGBG$F*F*Fajl$ \"*++++\"!\")-%&TITLEG6#%+y~=~S50(x)G-%+AXESLABELSG6$Q\"x6\"Q\"yF][m-% %VIEWG6$;F(Fgil;$!#:!\"\"$\"#:Ff[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 0 "" }}}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{MARK "0 2 1" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }