{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 "Maple Output" -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 "" {MPLTEXT 1 0 40 "restart:w:=exp(-x): \+ A:=0: B:=infinity:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 147 "fo r i from 0 to 6 do L[i]:=x^i-add(int(L[i-k]*x^i*w,x=A..B)/alpha[i-k]*L [i-k],k=1..i):\nalpha[i]:=int(w*L[i]^2,x=A..B): print(L[i],alpha[i]) e nd do:" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"\"\"F#" }}{PARA 11 "" 1 " " {XPPMATH 20 "6$,&%\"xG\"\"\"F%!\"\"F%" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,(*$)%\"xG\"\"#\"\"\"F(F'F(*&\"\"%F(F&F(!\"\"F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,**$)%\"xG\"\"$\"\"\"F(\"\"'!\"\"*&\"\"*F()F&\"\"# F(F**&\"#=F(F&F(F(\"#O" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,,*$)%\"xG\" \"%\"\"\"F(\"#CF(*&\"#;F()F&\"\"$F(!\"\"*&\"#sF()F&\"\"#F(F(*&\"#'*F(F &F(F.\"$w&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,.*$)%\"xG\"\"&\"\"\"F( \"$?\"!\"\"*&\"#DF()F&\"\"%F(F**&\"$+#F()F&\"\"$F(F(*&\"$+'F()F&\"\"#F (F**&F4F(F&F(F(\"&+W\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,0*$)%\"xG\" \"'\"\"\"F(\"$?(F(*&\"#OF()F&\"\"&F(!\"\"*&\"$]%F()F&\"\"%F(F(*&\"%+CF ()F&\"\"$F(F.*&\"%+aF()F&\"\"#F(F(*&\"%?VF(F&F(F.\"'+%=&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "seq(k!^2,k=0..6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"\"\"F#\"\"%\"#O\"$w&\"&+W\"\"'+%=&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "for i to 6 do plot(L[i]/sqrt(alpha[ i]),x=0..3*i,y=-3..10) end do;" }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$\"\"!F)$!\"\"F)7$$\"3s******\\i9Rl !#>$!3[*****\\P&3Y$*!#=7$$\"3/++vVA)GA\"F2$!3C++Dcx6x()F27$$\"3+++]Peu i=F2$!3b++]iTDP\")F27$$\"3A++]i3&o]#F2$!3A****\\P\"\\J\\(F27$$\"3%)*** \\(oX*y9$F2$!3g***\\7V0@&oF27$$\"3z***\\P9CAu$F2$!3w++DcexdiF27$$\"3!) ***\\P*zhdVF2$!3j***\\i+#QUcF27$$\"31++v$>fS*\\F2$!3$****\\i!3%f+&F27$ $\"3$)***\\(=$f%GcF2$!3;++D\"oS:P%F27$$\"3Q+++Dy,\"G'F2$!3h*****\\<#)* =PF27$$\"33++]7&)\\\"Ffp$\"3s****\\7B>&)\\F27$$\"3)***\\P>:mk:Ffp$\"3w** *\\P>:mk&F27$$\"3'***\\iv&QAi\"Ffp$\"3d***\\iv&QAiF27$$\"31++vtLU%o\"F fp$\"3j++]PPBWoF27$$\"3!******\\Nm'[Ffp$\"3a****\\7TW)R*F27$$\"3z*****\\@80+#Ffp$\"3 z*****\\@80+\"Ffp7$$\"31++]7,Hl?Ffp$\"31++]7,Hl5Ffp7$$\"3()**\\P4w)R7# Ffp$\"3()**\\P4w)R7\"Ffp7$$\"3;++]x%f\")=#Ffp$\"3;++]x%f\")=\"Ffp7$$\" 3!)**\\P/-a[AFfp$\"3!)**\\P/-a[7Ffp7$$\"3/+](=Yb;J#Ffp$\"3/+](=Yb;J\"F fp7$$\"3')****\\i@OtBFfp$\"3')****\\i@Ot8Ffp7$$\"3')**\\PfL'zV#Ffp$\"3 ')**\\PfL'zV\"Ffp7$$\"3>+++!*>=+DFfp$\"3>+++!*>=+:Ffp7$$\"3-++DE&4Qc#F fp$\"3-++DE&4Qc\"Ffp7$$\"3=+]P%>5pi#Ffp$\"3=+]P%>5pi\"Ffp7$$\"39+++bJ* [o#Ffp$\"39+++bJ*[o\"Ffp7$$\"33++Dr\"[8v#Ffp$\"33++Dr\"[8v\"Ffp7$$\"3+ +++Ijy5GFfp$\"3++++Ijy5=Ffp7$$\"31+]P/)fT(GFfp$\"31+]P/)fT(=Ffp7$$\"31 +]i0j\"[$HFfp$\"31+]i0j\"[$>Ffp7$$\"\"$F)$\"\"#F)-%'COLOURG6&%$RGBG$\" #5F+F(F(-%+AXESLABELSG6$Q\"x6\"Q\"yFd[l-%%VIEWG6$;F(Ffz;$!\"$F)$F_[lF) " 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }} }{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7S7 $$\"\"!F)$\"\"\"F)7$$\"3%*******\\#HyI\"!#=$\"3)zxdtOi)puF/7$$\"33++]( [kdW#F/$\"3O1eT@#fvS&F/7$$\"3++++v;\\DPF/$\"3^9Z-h5)HC$F/7$$\"3W+++D7$$\"3e** **\\(G[W[(F/$!3'\\\"pem#[!o@F/7$$\"3i****\\()fB:()F/$!3oW#4\"f]qKOF/7$ $\"39++](Q=\"))**F/$!3#)>U')G86))\\F/7$$\"3(****\\P'=pD6!#<$!3Eb_V9k#z <'F/7$$\"33+++lN?c7FY$!3ebkS;V$QB(F/7$$\"3-++]U$e6P\"FY$!3yjK'*[3zA!)F /7$$\"36+++&>q0]\"FY$!3s4$)Q\\$\\Gv)F/7$$\"3'******\\U80j\"FY$!3B\\QZa $)R<$*F/7$$\"35+++0ytb@FY$!3wc43G? $*G**F/7$$\"3'****\\(3wY_AFY$!37%GgE`+8o*F/7$$\"3#)******HOTqBFY$!36:6 b8(oRJ*F/7$$\"37++v3\">)*\\#FY$!3Qs:Hp`<(F/7$$\"3=++v$)[opGFY$!3/VP)[,T #=iF/7$$\"3%*****\\i%Qq*HFY$!3@#=y9_r&H]F/7$$\"3&****\\(QIKHJFY$!3GKBu qt9BOF/7$$\"3#****\\7:xWC$FY$!3eDM3+JQcAF/7$$\"37++]Zn%)oLFY$!3TsN$H4H HJ'FF7$$\"3y******4FL(\\$FY$\"3*3sz@AE+@\"F/7$$\"3#)****\\d6.BOFY$\"3w Z*y5p]6<$F/7$$\"3(****\\(o3lWPFY$\"3\"pl]\"pK.>_F/7$$\"3!*****\\A))ozQ FY$\"3Osr:Z.:mwF/7$$\"3e******Hk-,SFY$\"3!=FznQ`?+\"FY7$$\"36+++D-eITF Y$\"3GE0eZgop7FY7$$\"3u***\\(=_(zC%FY$\"3Ebq0#H'pE:FY7$$\"3M+++b*=jP%F Y$\"3PYh%z)eWB=FY7$$\"3g***\\(3/3(\\%FY$\"3XK:)QG0x6#FY7$$\"33++vB4JBY FY$\"3nRIL,,)3W#FY7$$\"3u*****\\KCnu%FY$\"3K^LxesCsFFY7$$\"3s***\\(=n# f([FY$\"3\"325eCxa8$FY7$$\"3P+++!)RO+]FY$\"3f@2C1?4,NFY7$$\"30++]_!>w7 &FY$\"3'))\\!yo/+\"*QFY7$$\"3O++v)Q?QD&FY$\"3!4gA6ctOH%FY7$$\"3G+++5jy p`FY$\"3q4<`())Hxn%FY7$$\"3<++]Ujp-bFY$\"3CQ9)Q$3WM^FY7$$\"3++++gEd@cF Y$\"3!ztHeE%*yb&FY7$$\"39++v3'>$[dFY$\"3xx)pY%*\\\\-'FY7$$\"37++D6Ejpe FY$\"3QYZ-t#Gq['FY7$$\"\"'F)$\"\"(F)-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-% +AXESLABELSG6$Q\"x6\"Q\"yFd[l-%%VIEWG6$;F(Fez;$!\"$F)$F^[lF)" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7U7$$\"\"!F)$ !\"\"F)7$$\"3#******\\(Quh>!#=$!3];d$oZ^%zYF/7$$\"3S++DJnkoOF/$!3xLZ'* >Y61$*!#>7$$\"3c++]7vB)e&F/$\"3[#HN'4cIrBF/7$$\"36++](e_0_(F/$\"35WFL \\Bx'y%F/7$$\"3)*)**\\iq$oV%*F/$\"3UL(GFyssN'F/7$$\"3****\\7VsmA6!#<$ \"3fhZd)p1E8(F/7$$\"3*)**\\7)R&G28FJ$\"31^qX(=4sI(F/7$$\"3-+]7ex@)\\\" FJ$\"3]\\.qu&f;)oF/7$$\"3%)**\\i&zP&)o\"FJ$\"3Q`)o#yUb7fF/7$$\"3A++]Z` I%)=FJ$\"3tjUm\"fs2U%F/7$$\"3#****\\P^Pn0#FJ$\"3Y@w,zo;]FF/7$$\"3G++]# Hb3D#FJ$\"3e'*Hz/Q[k`F77$$\"3%)****\\P,xXCFJ$!3a#o1Ys!Hq>F/7$$\"3E++]2 ngLEFJ$!31'f9^Zxge%F/7$$\"3&)**\\73.=/GFJ$!3Ok!3oC>_2(F/7$$\"3/++]<)3q +$FJ$!3oLq')oJ^55FJ7$$\"3/+++q6$)yJFJ$!3g;uNnNHn7FJ7$$\"3%***\\789qyLF J$!3#HA*GC-+f:FJ7$$\"3u*****\\W?cb$FJ$!3l\\/&=pU[!=FJ7$$\"3U+]7j'G(\\P FJ$!3%)R!y0ycV0#FJ7$$\"3X+]P*elX$RFJ$!3Q>SL'y/eE#FJ7$$\"3s++DJNUFTFJ$! 3s&e(GiOH_CFJ7$$\"32+]iDt_/VFJ$!3S(f6LR&y'e#FJ7$$\"3[***\\Ppdb\\%FJ$!3 WVM?\\$>eo#FJ7$$\"3#***\\7eX)Rp%FJ$!3S'RKf403t#FJ7$$\"3K+](os:n'[FJ$!3 9,[cJ(Qfr#FJ7$$\"3u***\\77qK0&FJ$!3**y\"ogqorj#FJ7$$\"3Y*****\\1**fC&F J$!3q:pZm/n![#FJ7$$\"3t***\\itYXV&FJ$!3'QE.)fk)oC#FJ7$$\"3'***\\7.j(ph &FJ$!3`L'\\![dPQ>FJ7$$\"3l***\\PBL&>eFJ$!3'QZ2%*\\FN\\\"FJ7$$\"3P***** \\kR:+'FJ$!3+TjJ'3vP&**F/7$$\"3e++]P.(e>'FJ$!3(oR[2q()e`$F/7$$\"3e**\\ 7GG'>P'FJ$\"34xt&*)Q-+K$F/7$$\"3_++]K%yWc'FJ$\"3?Yh$4Lm8?\"FJ7$$\"3S** \\781iXnFJ$\"3XZ!HI'\\()R@FJ7$$\"3n**\\i&Qm\\$pFJ$\"3QwgMt5O_KFJ7$$\"3 1++](['3?rFJ$\"3Ydd`()*ejZ%FJ7$$\"3e**\\7y+*QJ(FJ$\"3DA82x0;4fFJ7$$\"3 ,,++qfa+vFJ$\"3!eTk>m4AW(FJ7$$\"31++vy&G9p(FJ$\"3'\\O7`m\">s\"*FJ7$$\" 3_+]7$eI2)yFJ$\"3H)4Xg*\\m06!#;7$$\"3a*****\\YzY0)FJ$\"3MXU_I4B%H\"F[y 7$$\"3Q***\\P^WSD)FJ$\"3s.4b8->H:F[y7$$\"3*3+++**eBV)FJ$\"3GAPyT)3qv\" F[y7$$\"3L**\\78%zCi)FJ$\"3;\\<>@3&*=?F[y7$$\"3a*****\\;kMr)FJ$\"3ME(Q yha9:#F[y7$$\"3v**\\(o\"*[W!))FJ$\"39ulr[\")o)G#F[y7$$\"3))*\\P%eWA-*) FJ$\"32a^Q%zA:W#F[y7$$\"\"*F)$\"#EF)-%'COLOURG6&%$RGBG$\"#5F+F(F(-%+AX ESLABELSG6$Q\"x6\"Q\"yF^\\l-%%VIEWG6$;F(F`[l;$!\"$F)$Fi[lF)" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7X7$$\"\"!F)$ \"\"\"F)7$$\"3*)*******\\ech#!#=$\"3/!Q<..9DZ\"F/7$$\"3;+++v*G:*[F/$!3 N$Q5;w5W9$F/7$$\"3++++]L)4X(F/$!3Qu&)[>.3ydF/7$$\"34+++X.u-5!#<$!3UF)o D**Q`C'F/7$$\"3%*****\\Fy:f7F?$!3Ios-F[oj]F/7$$\"3#*****\\d'*)o\\\"F?$ !3GF95YyhBHF/7$$\"3$*****\\(>ZIu\"F?$!3)fod9L'oLM!#?7$$\"3-++]xOi(*>F? $\"3y4i2y!\\;I$F/7$$\"3%*****\\FPQ^AF?$\"3rDX2Zt#Qj'F/7$$\"3;+++IrS7DF ?$\"3A?\"4]:#pX(*F/7$$\"3.+++&o;Bu#F?$\"3/,\"*))fKR*>\"F?7$$\"3@+++!RS 6+$F?$\"3i!)eQ>#pbP\"F?7$$\"3#*******\\o-hKF?$\"3Aw]3<9k^9F?7$$\"3>+++ 5cZ6NF?$\"3$z/c0(H3:9F?7$$\"3'*****\\xq!*QPF?$\"3k*QJ4,[,G\"F?7$$\"31+ ++!4X$4SF?$\"3[Fn5'\\DX()*F/7$$\"30+++g:WQUF?$\"3AWkTmAe`iF/7$$\"3#*** **\\<_$\\]%F?$\"3q?MWZ&)>]u!#>7$$\"3m******fs#3u%F?$!3kBX*zPV/C&F/7$$ \"3E++]<#Q'**\\F?$!3=[hD?6_!H\"F?7$$\"3I++]_u3Y_F?$!3e/--kis8@F?7$$\"3 P+++v8B.bF?$!3!4H.k._70$F?7$$\"3R++]n(p$RdF?$!3#y9'=%=)=jRF?7$$\"3))** ***\\#p2%*fF?$!3[xZ@pxIw\\F?7$$\"3!*****\\xgkeiF?$!3!pel7AI'GgF?7$$\"3 %)****\\-V&*)['F?$!3Cm>Y^)pW\"pF?7$$\"3E+++&\\$pPnF?$!3$fXEX1>Y!yF?7$$ \"3e******>am%*pF?$!3Qj#e.')\\)4')F?7$$\"3k*****\\JigC(F?$!3%f*o!)e8*) Q#*F?7$$\"3%*****\\P,Q`R$H!o%F?7$$\"3;++]Z=iY#*F? $!3Y6=L\\47]>F?7$$\"3[******\\'[M\\*F?$\"3ufYnY()oV9F?7$$\"3W****\\PM& =v*F?$\"3gj.#=DOG&eF?7$$\"32+++'zs++\"!#;$\"3lYekm/l,6F`x7$$\"3,++]5Q_ D5F`x$\"3D[&QrOPBt\"F`x7$$\"33++vxSw]5F`x$\"3'Q;'*)>.c`F`x7$$\"3-+](oA*)p8\"F`x$\"3e$=)3t67yfF`x7$$ \"3/++v@Rm\\6F`x$\"3T\"R&HvsYSmF`x7$$\"3%******>A&zh6F`x$\"3M#4X*Q%pOJ (F`x7$$\"3/++DAl#R<\"F`x$\"3kVg'[JLm-)F`x7$$\"35+]7hK'p=\"F`x$\"3)R->- -,(Q))F`x7$$\"#7F)$\"#(*F)-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABEL SG6$Q\"x6\"Q\"yF_]l-%%VIEWG6$;F(F`\\l;$!\"$F)$Fi\\lF)" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 " " {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7en7$$\"\"!F)$!\"\" F)7$$\"3')*****\\7t&pK!#=$\"3)Q>GEj\\=c\"F/7$$\"3$****\\(=7T9hF/$\"3`A 9E'>n[S&F/7$$\"3X****\\(=HPJ*F/$\"3-;`4/$=?:&F/7$$\"3;++DJaU`7!#<$\"3I /?_-p]`?F/7$$\"3)***\\P%GZRd\"F?$!3Slo$**\\:G;#F/7$$\"3%)**\\(=276(=F? $!3>?TbW;>TfF/7$$\"3'***\\(o**3)y@F?$!3IW$y:#*>`5^!=F?7$$\"3/+](o%QjtYF?$\"3-.yc/9U![#F?7$$\"32++]i8o6]F?$\" 3![.V`%[X)=$F?7$$\"3i******\\>0)H&F?$\"3Mvb8sAZSOF?7$$\"3Y**\\(=-p6j&F ?$\"3%Rx\\^R(>9RF?7$$\"3d*****\\2Mg#fF?$\"3#RXFd7gJ'QF?7$$\"35+](=xZ& \\iF?$\"3ea)pwd$*3U$F?7$$\"3;+]i:$4wb'F?$\"3Ak2Q_'>sc#F?7$$\"3-++v=#R! zoF?$\"3ws2oS*y$y6F?7$$\"3q+]P4A@urF?$!3W41QH%zgt&F/7$$\"3I++Dchf#\\(F ?$!3AFL2bx;))HF?7$$\"3))**\\(of2L#yF?$!3kB!yKV#GkgF?7$$\"3M**\\7yG>6\" )F?$!3O!GNI[E[=*F?7$$\"3w++voo6A%)F?$!3s$)>NzEK'H\"!#;7$$\"3q*****\\xJ Lu)F?$!3%4C&=U'GAs\"F_t7$$\"3W++v$*ydd!*F?$!3%HV)HaoZh@F_t7$$\"3#***\\ (=1\"F_t$!3y:H@aPi&)RF_t7$$\"3=++vQ(zS4\"F_t$!3#eodCuy, 3%F_t7$$\"3***\\(=-,FC6F_t$!3-'Q>')3wj*RF_t7$$\"33+v$4tFe:\"F_t$!3g7Xk fex!o$F_t7$$\"3!****\\73\"o'=\"F_t$!3Ssz*p.,M4$F_t7$$\"3-+voz;)*=7F_t$ !3+8_,Ix_=@F_t7$$\"31+++&*44]7F_t$!3pk>\")*QToi(F?7$$\"35+]7jZ!>G\"F_t $\"3HEaEO)HZ7\"F_t7$$\"34+v=(4bMJ\"F_t$\"3kqZ_d?E\"e$F_t7$$\"38]PMP3&z K\"F_t$\"3As&H4zW-$\\F_t7$$\"3;++]xlWU8F_t$\"3:NhV!yG5V'F_t7$$\"3;+DcJ .1f8F_t$\"3OX&Qw[E0N)F_t7$$\"39+]i&3ucP\"F_t$\"3QnI;>Xy\\5!#:7$$\"3-+D JDO`!R\"F_t$\"3EfJ\\\"Q#F_z7$$\"33+D\"G:3uY\"F_t$\"3' >I^V=vPR;HF_z7$$\"3/]iSwSq$[\"F_t$ \"3us;W\\fb>JF_z7$$\"3-DJ?Q?&=\\\"F_t$\"3vMHf;z]JLF_z7$$\"#:F)$\"3++++ ++]_NF_z-%'COLOURG6&%$RGBG$\"#5F+F(F(-%+AXESLABELSG6$Q\"x6\"Q\"yF\\^l- %%VIEWG6$;F(F^]l;$!\"$F)$Fg]lF)" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7[o7$$\"\"!F)$\"\"\"F)7$$\"3$)***** *\\x[BR!#=$!3cwHHlIMlQF/7$$\"3\"3++DY$HPtF/$!3QF!=%pVc1^F/7$$\"36++]-v k<6!#<$!32=U\"yCmG+\"F/7$$\"3-++]<06/:F:$\"3Dw\"G06:EI%F/7$$\"3!)***\\ 7uO())=F:$\"3%RW+P'z%Hy(F/7$$\"3)****\\i[M`C#F:$\"3O;QRT$*3l\")F/7$$\" 3x***\\izqXh#F:$\"3y]q[/%>aY&F/7$$\"3/++D;bV'*HF:$!3OoZ(F/7$$\"3Y+++&p5'oPF:$!3%p\"Q-r-2m9F:7$$\"3$ )****\\F]Z8TF:$!3UD4+5=]**>F:7$$\"3a+++&e5<]%F:$!3arSG8`a#H7%=.J&F:7$$\"3[****** *)3C6rF:$\"3<2._T'R3a(F:7$$\"3%3+]iKd%*\\(F:$\"3Z*=+x\"H1I)*F:7$$\"3!4 +](y68pyF:$\"3OV]=JM\"p:\"!#;7$$\"3W,+]iq%[D)F:$\"3O!e5b&R&zD\"Fbr7$$ \"38++D^Y04')F:$\"3k6Z%*RE+Y7Fbr7$$\"3%*)***\\(Q:6**)F:$\"3cjg)GvGY3\" Fbr7$$\"3')***\\i6pzQ*F:$\"3+o,eo`R[rF:7$$\"3j++v`9VL(*F:$\"3=$)R_JY$z &>F:7$$\"3&****\\U-a1,\"Fbr$!33giuj.0kfF:7$$\"3!******H\")*>\\5Fbr$!3a wba&3Goo\"Fbr7$$\"3'****\\sM4p3\"Fbr$!3c]x8P/kHIFbr7$$\"3****\\ig_RB6F br$!3;V4Xo/@$e%Fbr7$$\"3%****\\nk1R;\"Fbr$!3GCc:-gYulFbr7$$\"3()****** GzI+7Fbr$!3SY1sa9Pd&)Fbr7$$\"37++]nSn\"F_v7$$\"3%***\\7xK*pQ\"Fbr$!3U+'4? >!>.=F_v7$$\"3(**\\7tG0bS\"Fbr$!39'fG[e43%=F_v7$$\"3-++](H4,]\"Fbr$!3Eq9#ePoAf\"F_v7$$\"3-+]([X(>>:Fbr$!3[egPw1L;9F_v7$$\"3-++ v:dGQ:Fbr$!3M.:ru;v$=\"F_v7$$\"37+]i;h9w:Fbr$!3oR!)\\o1**f_Fbr7$$\"3++ D\"[+TNf\"Fbr$!3NV#Q8+R[A\"Fbr7$$\"3\"******H*e$4h\"Fbr$\"3,eF_v7$$\"3r*\\7yN%fL_#)=B\"\\5!#97$$\"3;]P%eWA-z \"Fbr$\"3Sej\"H`z&[6Fg^l7$$\"#=F)$\"3k&*********z`7Fg^l-%'COLOURG6&%$R GBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q\"yF]`l-%%VIEWG6$;F(F^_l;$!\" $F)$Fg_lF)" 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 42 "w:=exp(-x^2): A :=-infinity: B:=infinity:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 148 "for \+ i from 0 to 10 do H[i]:=x^i-add(int(H[i-k]*x^i*w,x=A..B)/alpha[i-k]*H[ i-k],k=1..i):\nalpha[i]:=int(w*H[i]^2,x=A..B): print(H[i],alpha[i]) en d do:" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"\"\"*$%#PiG#F#\"\"#" }} {PARA 11 "" 1 "" {XPPMATH 20 "6$%\"xG,$*&\"\"#!\"\"%#PiG#\"\"\"F&F*" } }{PARA 11 "" 1 "" {XPPMATH 20 "6$,&*$)%\"xG\"\"#\"\"\"F(#F(F'!\"\",$*& F'F*%#PiG#F(F'F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,&*$)%\"xG\"\"$\" \"\"F(*&#F'\"\"#F(F&F(!\"\",$*(F'F(\"\"%F,%#PiG#F(F+F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,(*$)%\"xG\"\"%\"\"\"F(#\"\"$F'F(*&F*F()F&\"\"#F(! \"\",$*(F*F(F-F.%#PiG#F(F-F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,(*$)% \"xG\"\"&\"\"\"F(*&F'F()F&\"\"$F(!\"\"*&#\"#:\"\"%F(F&F(F(,$*(F/F(F0F, %#PiG#F(\"\"#F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,**$)%\"xG\"\"'\"\" \"F(#\"#:\"\")!\"\"*&#F*\"\"#F(*$)F&\"\"%F(F(F,*&#\"#XF2F(*$)F&F/F(F(F (,$*(F5F(F2F,%#PiG#F(F/F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,**$)%\"x G\"\"(\"\"\"F(*&#\"#@\"\"#F(*$)F&\"\"&F(F(!\"\"*&#\"$0\"\"\"%F(*$)F&\" \"$F(F(F(*&#F3\"\")F(F&F(F0,$*(\"$:$F(F:F0%#PiG#F(F,F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,,*$)%\"xG\"\")\"\"\"F(#\"$0\"\"#;F(*&\"#9F()F&\" \"'F(!\"\"*&#F*\"\"#F(*$)F&\"\"%F(F(F(*&#F*F3F(*$)F&F3F(F(F0,$*(\"$:$F (F3F0%#PiG#F(F3F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,,*$)%\"xG\"\"*\" \"\"F(*&\"#=F()F&\"\"(F(!\"\"*&#\"$*=\"\"#F(*$)F&\"\"&F(F(F(*&#\"$:$F1 F(*$)F&\"\"$F(F(F-*&#\"$X*\"#;F(F&F(F(,$*(\"%NGF(\"\"%F-%#PiG#F(F1F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,.*$)%\"xG\"#5\"\"\"F(#\"$X*\"#K!\" \"*&#\"#X\"\"#F(*$)F&\"\")F(F(F,*&#\"$:$F0F(*$)F&\"\"'F(F(F(*&#\"%v:\" \"%F(*$)F&F=F(F(F,*&#\"%DZ\"#;F(*$)F&F0F(F(F(,$*(\"&vT\"F(F=F,%#PiG#F( F0F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "seq(i!/2^i,i=0..10) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6-\"\"\"#F#\"\"#F$#\"\"$\"\"%#F'F%# \"#:F(#\"#XF(#\"$:$\"\")#F/F%#\"%NGF(#\"&vT\"F(" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 64 "for i to 10 do plot(H[i]/sqrt(alpha[i]),x=-4.. 4,y=-4..4) end do;" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$!\"%\"\"!$!39)y3\"Gx+\\U!#<7$$!3ommmmF iDQF-$!3u(*))4v^xjSF-7$$!35LLLo!)*Qn$F-$!3!)p!e6K0E!RF-7$$!3nmmmwxE.NF -$!3g*ysT'HN@PF-7$$!3YmmmOk]JLF-$!3H4-\"*[\"**)QNF-7$$!3_LLL[9cgJF-$!3 WfFy/DJdLF-7$$!3smmmhN2-IF-$!3[&=o4We*)=$F-7$$!3!******\\`oz$GF-$!33Wh Lfvj9IF-7$$!3!omm;)3DoEF-$!3P)o$=aYNMGF-7$$!3?+++:v2*\\#F-$!3_wWf=*\\Y l#F-7$$!3BLLL8>1DBF-$!3s%=@&4:!)pCF-7$$!3kmmmw))yr@F-$!3?UV>Ip)pI#F-7$ $!3;+++S(R#**>F-$!39^0SwipB@F-7$$!30++++@)f#=F-$!3ky?d8IlR>F-7$$!3-+++ gi,f;F-$!3WM&\\uA$Hi3>`%>%F_s7$$\"3yELL$=2Vs\"F`q$\"3m+U!pj[;$=F`q7$$\"3)e***** \\`pfKF`q$\"39mvN$o(******z-6j'F`q$\"34`4xgqM8F-$\"3m\\q.z'*y<9F-7$$\"3%)*******HSu]\"F -$\"3Fd14r8G,;F-7$$\"3'HLL$ep'Rm\"F-$\"3c,!>j6_vw\"F-7$$\"3')******R>4 N=F-$\"3yODre*H$\\>F-7$$\"3#emm;@2h*>F-$\"3'oLE@uo.7#F-7$$\"3]*****\\c 9W;#F-$\"3ea!zLb`\"*H#F-7$$\"3Lmmmmd'*GBF-$\"3AooE&Q[RZ#F-7$$\"3j***** \\iN7]#F-$\"35.:6vB%pl#F-7$$\"3aLLLt>:nEF-$\"3x%[$oOt=LGF-7$$\"35LLL.a #o$GF-$\"3LlY^lKU8IF-7$$\"3ammm^Q40IF-$\"3#y'f&)\\n;#>$F-7$$\"3y****** z]rfJF-$\"31paQ[MTcLF-7$$\"3gmmmc%GpL$F-$\"3G*pI,qeYa$F-7$$\"3/LLL8-V& \\$F-$\"3Fq&zt\\FIr$F-7$$\"3=+++XhUkOF-$\"3[BsH_Pa#*QF-7$$\"3=+++:o 1DBF1$\"3u\"GnsX:8@&F17$$!3kmmmw))yr@F1$\"3Yayf(ei\"zWF17$$!3;+++S(R#* *>F1$\"3r2kXD?l9PF17$$!30++++@)f#=F1$\"3xt+)prX1,$F17$$!3-+++gi,f;F1$ \"3wdI@`ra#R#F17$$!3qmmm\"G&R2:F1$\"3[yM_Kfc#)=F17$$!3XLLLtK5F8F1$\"3r kpiFarR8F17$$!3eLLL$HsV<\"F1$\"3udsHq3zQ$*!#=7$$!3+-++]&)4n**F^q$\"3ZS X#=Rv9C&F^q7$$!37PLLL\\[%R)F^q$\"3%>N;w5^T<#F^q7$$!3G)*****\\&y!pmF^q$ !3Sc#>L2Ls'e!#>7$$!3Y******\\O3E]F^q$!3')H*G9:]yi#F^q7$$!3NKLLL3z6LF^q $!3=_6\"p9'=YTF^q7$$!3sLLL$)[`P(** ****z-6j'F^q$!3fxme7*fPS'F^r7$$\"3q\"******4#32$)F^q$\"3tH?'\\O(3>?F^q 7$$\"3r$*****\\#y'G**F^q$\"3=#GN@nw-;&F^q7$$\"3G******H%=H<\"F1$\"3fLN 'o.SDI*F^q7$$\"35mmm1>qM8F1$\"3Ks%\\=i+7O\"F17$$\"3%)*******HSu]\"F1$ \"3-8xS/,r#)=F17$$\"3'HLL$ep'Rm\"F1$\"3&fPtENA+T#F17$$\"3')******R>4N= F1$\"336.iHP2YIF17$$\"3#emm;@2h*>F1$\"3xft`rtN,PF17$$\"3]*****\\c9W;#F 1$\"3?J:4sa>XWF17$$\"3Lmmmmd'*GBF1$\"3![@t<8:1B&F17$$\"3j*****\\iN7]#F 1$\"341u=cH^9hF17$$\"3aLLLt>:nEF1$\"3uoZ%)H_TDqF17$$\"35LLL.a#o$GF1$\" 3@$4%f/(Hu,)F17$$\"3ammm^Q40IF1$\"3aOLZ2Zjh!*F17$$\"3y******z]rfJF1$\" 3!pZc@U=u+\"F-7$$\"3gmmmc%GpL$F1$\"3zgB'>l9(H6F-7$$\"3/LLL8-V&\\$F1$\" 3]Sk7`-vW7F-7$$\"3=+++XhUkOF1$\"3Ovg/88Gt8F-7$$\"3=+++:o]\"F-7$$\"\"%F*F+-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fa[l-%+AXESLABELS G6$Q\"x6\"Q\"yFf[l-%%VIEWG6$;F(FhzF[\\l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$!\"%\"\"!$!3I\\w Q4a[I]!#;7$$!3ommmmFiDQ!#<$!3K]^6V\"*ReVF-7$$!35LLLo!)*Qn$F1$!3'*=!fWn oH#QF-7$$!3nmmmwxE.NF1$!35)y1w%4JtKF-7$$!3YmmmOk]JLF1$!3Ivf@,9htFF-7$$ !3_LLL[9cgJF1$!3x*>U+XuqK#F-7$$!3smmmhN2-IF1$!3i'p;&=32c>F-7$$!3!***** *\\`oz$GF1$!3D$[x4qWKh\"F-7$$!3!omm;)3DoEF1$!3d3Z$3>-0I\"F-7$$!3?+++:v 2*\\#F1$!3*yWA?\"*o&G5F-7$$!3BLLL8>1DBF1$!3]2tmnLgwyF17$$!3kmmmw))yr@F 1$!3!*H9L7[1fgF17$$!3;+++S(R#**>F1$!36xs`QZqHVF17$$!30++++@)f#=F1$!3Sk a!o:w[!HF17$$!3-+++gi,f;F1$!3*\\A^$pF*>!=F17$$!3qmmm\"G&R2:F1$!3E&)QC. 'G'45F17$$!3XLLLtK5F8F1$!3N]<\"Q'e_1I!#=7$$!3eLLL$HsV<\"F1$\"3uie3M*H4 B\"Fip7$$!3+-++]&)4n**Fip$\"3eEtEv$[\"zVFip7$$!37PLLL\\[%R)Fip$\"3;\\F HI#p0z&Fip7$$!3G)*****\\&y!pmFip$\"3RDbY$GYP5'Fip7$$!3Y******\\O3E]Fip $\"31d-Mw-mPaFip7$$!3NKLLL3z6LFip$\"3[^K_s_b$*RFip7$$!3sLLL$)[`P#Fip7$$\"3)e*****\\`pfKFip$!3vb7s\\UTSRFip7$$\"36HLLLm&z \"\\Fip$!3iY_rp?am`Fip7$$\"3>(******z-6j'Fip$!3CQ\"yGtQ!)4'Fip7$$\"3q \"******4#32$)Fip$!3v#3$QZLXNeFip7$$\"3r$*****\\#y'G**Fip$!3`[0nTO4GWF ip7$$\"3G******H%=H<\"F1$!3sUG&>*G7k7Fip7$$\"35mmm1>qM8F1$\"3/N\"*zm;) yD$Fip7$$\"3%)*******HSu]\"F1$\"3'*f7S0i$)45F17$$\"3'HLL$ep'Rm\"F1$\"3 k7U,SB6J=F17$$\"3')******R>4N=F1$\"3?A[wR?XsHF17$$\"3#emm;@2h*>F1$\"3, >ywvGD,VF17$$\"3]*****\\c9W;#F1$\"3'H+aUIj%yfF17$$\"3Lmmmmd'*GBF1$\"3( 4%fka&Gl#zF17$$\"3j*****\\iN7]#F1$\"3Nl\"ot<)zJ5F-7$$\"3aLLLt>:nEF1$\" 3U%o'>w-h)H\"F-7$$\"35LLL.a#o$GF1$\"3YZMQ%y)*4h\"F-7$$\"3ammm^Q40IF1$ \"3c4-(*Qwwi>F-7$$\"3y******z]rfJF1$\"32Bd%3J&)\\K#F-7$$\"3gmmmc%GpL$F 1$\"3Y!z\")f$)*e)y#F-7$$\"3/LLL8-V&\\$F1$\"3/\\Bb$Ge$\\KF-7$$\"3=+++Xh UkOF1$\"3W)yrs.@5z$F-7$$\"3=+++:o7$$!3m* ***\\AHe)e$F1$\"3W.hcwu]ZyF>7$$!3nmmmwxE.NF1$\"3P<6$=Pjb-(F>7$$!3Mmmm1 rQ7$$!3YmmmOk]JLF1$\"3?MQFej%)ebF>7$$!3+++]UR.YKF1 $\"3;(\\8K(QI;\\F>7$$!3_LLL[9cgJF1$\"3a'3CKgIxK%F>7$$!3smmmhN2-IF1$\"3 ;,C`h$H#pLF>7$$!3!******\\`oz$GF1$\"3T8tM)3ZCa#F>7$$!3!omm;)3DoEF1$\"3 'oj@l5\\Z%=F>7$$!3?+++:v2*\\#F1$\"3a+\"H0df!*G\"F>7$$!3BLLL8>1DBF1$\"3 A\"z))[XKlV)F17$$!3kmmmw))yr@F1$\"3)R\"zu1jvDaF17$$!3;+++S(R#**>F1$\"3 )fp!zwL9\"F17$$!3-+++gi,f;F1$\"3_*>* \\:sS\">%!#>7$$!3qmmm\"G&R2:F1$!3g)e%)))pu>a&!#=7$$!3XLLLtK5F8F1$!3)*y &R](3%4y)F_r7$$!3eLLL$HsV<\"F1$!3K)R$z!\\-)4\"*F_r7$$!3+-++]&)4n**F_r$ !3pISnO$)eDwF_r7$$!37PLLL\\[%R)F_r$!3x+$Q`cM+K&F_r7$$!3G)*****\\&y!pmF _r$!3A/aersDqBF_r7$$!3Y******\\O3E]F_r$\"3%)=H>1e_KMFiq7$$!3NKLLL3z6LF _r$\"3!4?u#\\e\\bEF_r7$$!3sLLL$)[`PCZ3&Fi q7$$\"3>(******z-6j'F_r$!3Mzo.Phs/BF_r7$$\"3q\"******4#32$)F_r$!3OeI( \\zAj<&F_r7$$\"3r$*****\\#y'G**F_r$!3OHKJFRtxvF_r7$$\"3G******H%=H<\"F 1$!3^&*o>NCn/\"*F_r7$$\"35mmm1>qM8F1$!3/N^>[,j8()F_r7$$\"3%)*******HSu ]\"F1$!3(z6gd**)oSbF_r7$$\"3'HLL$ep'Rm\"F1$\"3azP\"phW]t'Fiq7$$\"3')** ****R>4N=F1$\"3n4psNU4>7F17$$\"3#emm;@2h*>F1$\"3%)QC'z$4elGF17$$\"3]** ***\\c9W;#F1$\"3ALb-I&F17$$\"3Lmmmmd'*GBF1$\"39pX&o^zP_)F17$$\"3j* ****\\iN7]#F1$\"3;P?QmyM&H\"F>7$$\"3aLLLt>:nEF1$\"3OLS[\\)42%=F>7$$\"3 5LLL.a#o$GF1$\"33([%osYBPDF>7$$\"3ammm^Q40IF1$\"3W1&fN-ofQ$F>7$$\"3;LL $eY/C3$F1$\"3j`&\\12mU$QF>7$$\"3y******z]rfJF1$\"3i5,6TB;AVF>7$$\"3?LL Lo7$$\"3gmmmc%GpL$F1$\"3CJ!*zjm\\,cF>7$$\"3#)** ***\\LzhT$F1$\"3ur,<>Ic^iF>7$$\"3/LLL8-V&\\$F1$\"311-j)QmK&pF>7$$\"3im m;z\"G*zNF1$\"3?\"3ZGVe6w(F>7$$\"3=+++XhUkOF1$\"3kr8fJ>xL')F>7$$\"3=++ +![,`u$F1$\"3\"\\&*4X,iD`*F>7$$\"3=+++:oF-7$$!35LLLo!)*Q n$F1$!3QP(*y9`)yo\"F-7$$!3nmmmwxE.NF1$!3kV\")30H&QE\"F-7$$!3YmmmOk]JLF 1$!3j87+'yg=B*!#;7$$!3_LLL[9cgJF1$!3m,wI/^OplFM7$$!3smmmhN2-IF1$!3)4hA Z%)=vk%FM7$$!3!******\\`oz$GF1$!34bRlI,[?JFM7$$!3!omm;)3DoEF1$!3;ONR!* =!*\\>FM7$$!3?+++:v2*\\#F1$!34-Tah+X<6FM7$$!3BLLL8>1DBF1$!3%)4#f*\\\"e 3O&F17$$!3kmmmw))yr@F1$!3vXut7*3K.#F17$$!3;+++S(R#**>F1$\"3j\"4=D*>K4? !#=7$$!30++++@)f#=F1$\"39#=(y)poxF\"F17$$!3-+++gi,f;F1$\"3Kl9bAGxn:F17 $$!3qmmm\"G&R2:F1$\"3ud*[TC*QJ9F17$$!3XLLLtK5F8F1$\"35]n\\,f#f+\"F17$$ !3eLLL$HsV<\"F1$\"3A)zg#*e@_m&F`p7$$!3+-++]&)4n**F`p$\"3odExrG[,*)!#>7 $$!37PLLL\\[%R)F`p$!3)eb&[sDwaBF`p7$$!3G)*****\\&y!pmF`p$!3%Q*3*e'ogfW F`p7$$!3Y******\\O3E]F`p$!3W;_[eMqs\\F`p7$$!3NKLLL3z6LF`p$!3%*3>AyS:GT F`p7$$!3sLLL$)[`P(******z-6j 'F`p$\"3S!4f5rxw[%F`p7$$\"3q\"******4#32$)F`p$\"3E=[j-1#)*\\#F`p7$$\"3 r$*****\\#y'G**F`p$!3Cf!)yx'3z(zF_r7$$\"3G******H%=H<\"F1$!3g#>vZ$3NBc F`p7$$\"35mmm1>qM8F1$!3wp!za#e%p-\"F17$$\"3%)*******HSu]\"F1$!3I!y438o 9V\"F17$$\"3'HLL$ep'Rm\"F1$!3k%3C,1=pc\"F17$$\"3')******R>4N=F1$!3u5D( 4.WPC\"F17$$\"3#emm;@2h*>F1$!3Mz/x()f2&H#F`p7$$\"3]*****\\c9W;#F1$\"3E mP#4L\\\"3>F17$$\"3Lmmmmd'*GBF1$\"3q$e1noXbY&F17$$\"3j*****\\iN7]#F1$ \"3/[%G-voi7\"FM7$$\"3aLLLt>:nEF1$\"3)=^#**3$)\\V>FM7$$\"35LLL.a#o$GF1 $\"3(=$Gsi))H6JFM7$$\"3ammm^Q40IF1$\"3ON3UH#y(zYFM7$$\"3y******z]rfJF1 $\"3'y&H?&f*ydlFM7$$\"3gmmmc%GpL$F1$\"3.E%zIqPvK*FM7$$\"3/LLL8-V&\\$F1 $\"3!)*>$\\j+`Y7F-7$$\"3=+++XhUkOF1$\"3aLUws@(=m\"F-7$$\"3=+++![,`u$F1 $\"3?czp;(QS*=F-7$$\"3=+++:oF-7$$!3Mmmm1rQ`txCo7F-7$$!3+++]UR.YKF1$\"3c**[\"\\`ti,\"F-7$$!3_LLL[9cgJ F1$\"3(zYyg5'zO!)!#;7$$!3smmmhN2-IF1$\"3Una!p5J'z\\F_p7$$!3!******\\`o z$GF1$\"3O:pozl)>z#F_p7$$!3!omm;)3DoEF1$\"3an(H5*f$)>8F_p7$$!3?+++:v2* \\#F1$\"3I7yvh2gbVF17$$!3BLLL8>1DBF1$!3)e$yr/h#=0&!#=7$$!3kmmmw))yr@F1 $!3@&HC&G$4OS#F17$$!3;+++S(R#**>F1$!3/kGTT!QF)GF17$$!30++++@)f#=F1$!3? l=IM\">3R#F17$$!3-+++gi,f;F1$!3Dx/@Vu#*R:F17$$!3qmmm\"G&R2:F1$!37!Qa]X -#)R(Fiq7$$!3XLLLtK5F8F1$\"3#)o;lR(oU3$!#>7$$!3eLLL$HsV<\"F1$\"3'3'o)o v;\\Z%Fiq7$$!3+-++]&)4n**Fiq$\"3wf))p_9%*[kFiq7$$!37PLLL\\[%R)Fiq$\"3- 2.InUv(*fFiq7$$!3G)*****\\&y!pmFiq$\"3)QI>=Wj3)QFiq7$$!3Y******\\O3E]F iq$\"3[**3=K\"R'H6Fiq7$$!3NKLLL3z6LFiq$!3!za`.w&zM;Fiq7$$!3sLLL$)[`P%Fiq7$$\"3yELL$=2Vs\" Fiq$!3y1V1bckkMFiq7$$\"3)e*****\\`pfKFiq$!3#*\\)z\"ek*)3(******z-6j'Fiq$\"3O9y2%)4,AQFiq7$$ \"3q\"******4#32$)Fiq$\"3#R%>^!e_U#fFiq7$$\"3r$*****\\#y'G**Fiq$\"3C!* >%GNt,Y'Fiq7$$\"3G******H%=H<\"F1$\"3L:#znBVL]%Fiq7$$\"35mmm1>qM8F1$\" 3AP!\\!>EE(3%F_v7$$\"3%)*******HSu]\"F1$!3/%yG1uM/S(Fiq7$$\"3'HLL$ep'R m\"F1$!3gUI1^v!oc\"F17$$\"3')******R>4N=F1$!3C4T'y261V#F17$$\"3#emm;@2 h*>F1$!3A`uXiAS!)GF17$$\"3]*****\\c9W;#F1$!3K^F)R\"[%RX#F17$$\"3Lmmmmd '*GBF1$!3:(H(Q\"H#z>VFiq7$$\"3j*****\\iN7]#F1$\"3iRl7?(p%RWF17$$\"3aLL Lt>:nEF1$\"3Y]VbLaU78F_p7$$\"35LLL.a#o$GF1$\"3cXx^**ykzFF_p7$$\"3ammm^ Q40IF1$\"3))[n!p\"[UG]F_p7$$\"3y******z]rfJF1$\"3E0R\\=Bb++]7Q'[q$F1$\"3KPzxy*e%oHF-7$$\"3=+++![,`u$F1$\"3L\\zR$Hw`A$F- 7$$\"3=++]Z\"Rdy$F1$\"3#Ga1)*\\r$*\\$F-7$$\"3=+++:o$**)f7%F-7$$\"34++]2%)38RF1$\"3q3-%[# H`$[%F-7$$\"3/++v.UacRF1$\"3#H%>\"\\!H4l[F-7$$\"\"%F*F+-%'COLOURG6&%$R GBG$\"#5!\"\"$F*F*F\\al-%+AXESLABELSG6$Q\"x6\"Q\"yFaal-%%VIEWG6$;F(Fc` lFfal" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve \+ 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG 6$7Y7$$!\"%\"\"!$!3oA4_JNy*o)!#:7$$!3cLLL$Q6G\"R!#<$!3%3?44%Rn,rF-7$$! 3ommmmFiDQF1$!3]*H\"Gu=[bdF-7$$!37++]x:CF-7$$!3YmmmOk]JLF1$!3VBL.Sru.9F-7$$!3_LLL[9cgJF1$!3M&G 7]+U_\\(!#;7$$!3smmmhN2-IF1$!3/k]N`s#zo$FW7$$!3!******\\`oz$GF1$!3]t;4 DJKY8FW7$$!3!omm;)3DoEF1$!3A?TGDQY9x!#=7$$!3?+++:v2*\\#F1$\"36RT4H'3t_ %F17$$!3BLLL8>1DBF1$\"3;yC**)4I5f&F17$$!3kmmmw))yr@F1$\"3k3b(GgjEn%F17 $$!3;+++S(R#**>F1$\"3=@%G<0yX*GF17$$!30++++@)f#=F1$\"3A@$p$RO_]6F17$$! 3-+++gi,f;F1$!3[#R!=LNk*e)!#>7$$!3qmmm\"G&R2:F1$!3mV5tJ)pc#Fao7$ $!3gSnmmmr[R!#?$\"3u7D#H*Gg.iFat7$$\"3yELL$=2Vs\"Fao$!3IUJE_F')\\DFao7 $$\"3)e*****\\`pfKFao$!3gLf4FWtySFao7$$\"36HLLLm&z\"\\Fao$!3Fc**=5HGUV Fao7$$\"3>(******z-6j'Fao$!3kUyDY03+GFao7$$\"3q\"******4#32$)Fao$\"3w& G/?S[<;$F`q7$$\"3r$*****\\#y'G**Fao$\"3%fv@ub!4nTFao7$$\"3G******H%=H< \"F1$\"3aaY$Q+)eH!)Fao7$$\"35mmm1>qM8F1$\"3K&\\1$\\0$o`*Fao7$$\"3%)*** ****HSu]\"F1$\"3oFB)H&*R)*G(Fao7$$\"3'HLL$ep'Rm\"F1$\"3*=BKtu6Ar&F`q7$ $\"3')******R>4N=F1$!3)=cgN3)pK7F17$$\"3#emm;@2h*>F1$!3!)Qwu.L!3'GF17$ $\"3]*****\\c9W;#F1$!3]qB[\"3Tcg%F17$$\"3Lmmmmd'*GBF1$!3)478$Gj(yf&F17 $$\"3j*****\\iN7]#F1$!3O\"*)\\#z$*z\"\\%F17$$\"3aLLLt>:nEF1$\"3'e;E281 L<(Fao7$$\"35LLL.a#o$GF1$\"3e$GG4i2WL\"FW7$$\"3ammm^Q40IF1$\"3A08+2pZW PFW7$$\"3y******z]rfJF1$\"3'*R+^&R@)puFW7$$\"3gmmmc%GpL$F1$\"38\"fX(4I lH9F-7$$\"3/LLL8-V&\\$F1$\"3Mje6_i6gBF-7$$\"3imm;z\"G*zNF1$\"3Hc*)*Q)3 S:IF-7$$\"3=+++XhUkOF1$\"3-)y*\\[sR/QF-7$$\"3=+++![,`u$F1$\"3kMld@g\\. ZF-7$$\"3=+++:oq*!#:7$$!3!******\\2<#pQF1$\"3K\"R`g\"*Gc_)FC7$$!3ommmmFiDQ F1$\"3))e,i['zlY(FC7$$!3=LL3#f\"p(y$F1$\"3O/kiZ#3Jj'FC7$$!37++]:\"FC7$$!3+++]UR.YKF1$\"39U\\'4\"\\$eO(!#;7$$!3_LLL[9cgJF1$\"3&z3 4W3_oK%Fep7$$!3M+++0vJ\"3$F1$\"30;+&3I*f,BFep7$$!3smmmhN2-IF1$\"3;Q1$o tgpx)F17$$!34LLL[5-?HF1$!3R.PYQ,.I5F17$$!3!******\\`oz$GF1$!3SfHQ*oHD, (F17$$!3eLLL3(4Jv#F1$!3%*ov:TERB5Fep7$$!3!omm;)3DoEF1$!31gYx'*GnJ6Fep7 $$!3?+++:v2*\\#F1$!3zjYBS!R8t*F17$$!3BLLL8>1DBF1$!3o![)>30>FgF17$$!3km mmw))yr@F1$!3I)=<)o([c#GF17$$!3;+++S(R#**>F1$!3+.%p29K#p>!#=7$$!30++++ @)f#=F1$\"31Xw,L())f=\"F17$$!3-+++gi,f;F1$\"3`\\=p9?s6:F17$$!3qmmm\"G& R2:F1$\"3)4p)HFfcT7F17$$!3XLLLtK5F8F1$\"3\\;'z$)**oj.'F]t7$$!3eLLL$HsV <\"F1$\"3>2XLEy+La!#>7$$!3+-++]&)4n**F]t$!3U8gw8-]4RF]t7$$!37PLLL\\[%R )F]t$!3'\\2V)y:&eR&F]t7$$!3G)*****\\&y!pmF]t$!3i=ILsWmXXF]t7$$!3Y***** *\\O3E]F]t$!3$*Q!z^Nvt8#F]t7$$!3NKLLL3z6LF]t$\"3UdL*zj\">%[)Fgu7$$!3sL LL$)[`P/@IF]t7$$\"3)e*****\\`pfKF]t$\"3A&R1q\"oaP$*Fgu 7$$\"36HLLLm&z\"\\F]t$!3)*>\"Re\"zW]>F]t7$$\"3>(******z-6j'F]t$!3UnAD0 ]a.XF]t7$$\"3q\"******4#32$)F]t$!3R0=ZRjI5aF]t7$$\"3r$*****\\#y'G**F]t $!35iE@nPDuRF]t7$$\"3G******H%=H<\"F1$\"3_(GRt0S`'\\Fgu7$$\"35mmm1>qM8 F1$\"3wKD$z6!=EjF]t7$$\"3%)*******HSu]\"F1$\"3**)3*44spT7F17$$\"3'HLL$ ep'Rm\"F1$\"3Ou[!)>*QJ^\"F17$$\"3')******R>4N=F1$\"3$[[oYJrD9\"F17$$\" 3#emm;@2h*>F1$!3dB;MBXl3;F]t7$$\"3]*****\\c9W;#F1$!3aVy'R8.))o#F17$$\" 3Lmmmmd'*GBF1$!3uUv#*)f^X6'F17$$\"3j*****\\iN7]#F1$!3o@Sy\")zEq(*F17$$ \"3aLLLt>:nEF1$!3Q3F]\"4+?8\"Fep7$$\"3KLLL)o))>v#F1$!3cd.q`K/E5Fep7$$ \"35LLL.a#o$GF1$!3w8%)R_!=Q2(F17$$\"3#)****\\F'f4#HF1$!3^B*Gdy\"p:%*F] t7$$\"3ammm^Q40IF1$\"3#*zdk/b\"fA*F17$$\"3;LL$eY/C3$F1$\"3:*o9fb$)\\K# Fep7$$\"3y******z]rfJF1$\"3\")e]1!>?:I%Fep7$$\"3gmmmc%GpL$F1$\"3g^[?>S o#=\"FC7$$\"3#)*****\\LzhT$F1$\"3k%*e%om#[+l.F$FC7$$\"3=+++XhUkOF1$\"3af EKyG%)=WFC7$$\"3>++]7Q'[q$F1$\"3eUmL%e^&o]FC7$$\"3=+++![,`u$F1$\"3a^G1 Z?%4z&FC7$$\"3=++]Z\"Rdy$F1$\"3#ym-]g.Bf'FC7$$\"3=+++:o6F-7$$!3!******\\2<#pQF1$!3q(Gz,P9i^*!#:7$$!3om mmmFiDQF1$!37(Rj6'y-R!)F>7$$!37++])*oe+!fF>7$$!35LLLo!) *Qn$F1$!3bo9)y#\\!pA%F>7$$!3m****\\AHe)e$F1$!3mw/`%=>\")z#F>7$$!3nmmmw xE.NF1$!35C9)=76Cv\"F>7$$!3Mmmm1rQ7$$!3YmmmOk]JLF1 $!35/q$o/;n&[!#;7$$!3+++]UR.YKF1$!3O'[5X9<,Z\"F\\o7$$!3_LLL[9cgJF1$\"3 +\\KR[A#**>'F17$$!3M+++0vJ\"3$F1$\"3q!\\aQOW`r\"F\\o7$$!3smmmhN2-IF1$ \"3(\\\")*=KN!\\B#F\\o7$$!3!******\\`oz$GF1$\"35(\\XUr$[2AF\\o7$$!3!om m;)3DoEF1$\"3!R$[h@(zh\\\"F\\o7$$!3?+++:v2*\\#F1$\"3)f1Gwste>(F17$$!3B LLL8>1DBF1$\"3X,,ilkzM8F17$$!3kmmmw))yr@F1$!3de\")*oWbD^\"F17$$!3;+++S (R#**>F1$!3V%G;t%RWVDF17$$!30++++@)f#=F1$!3BENb%)\\f0@F17$$!3-+++gi,f; F1$!3$\\%f]@^G,6F17$$!3qmmm\"G&R2:F1$!3]:.g]yP[>!#=7$$!3XLLLtK5F8F1$\" 3!4D\\Br[.@&F^s7$$!3eLLL$HsV<\"F1$\"3GS4^n\"=EH(F^s7$$!3+-++]&)4n**F^s $\"3#G\\-UxXJ&eF^s7$$!37PLLL\\[%R)F^s$\"3it)>TsVrh#F^s7$$!3G)*****\\&y !pmF^s$!3!4Y2`Qj#f6F^s7$$!3Y******\\O3E]F^s$!3QH!zH\">*za$F^s7$$!3NKLL L3z6LF^s$!3@\"[4'*)zk3SF^s7$$!3sLLL$)[`P(******z-6j'F^s$\"3w*4/Zyj@B\"F^s7$$\"3q\"******4#32$)F^s$!3[> m0Fjw;CF^s7$$\"3r$*****\\#y'G**F^s$!3wM#Q:&)*)))y&F^s7$$\"3G******H%=H <\"F1$!3Kz>Cf]#eH(F^s7$$\"35mmm1>qM8F1$!3%*>$)4:b26]F^s7$$\"3%)******* HSu]\"F1$\"3e$*3%[K\\2&>F^s7$$\"3'HLL$ep'Rm\"F1$\"3,c`4gK0L6F17$$\"3') ******R>4N=F1$\"33IPC$z.1:#F17$$\"3#emm;@2h*>F1$\"3%)>yn=5#ea#F17$$\"3 ]*****\\c9W;#F1$\"3#>$=(HR9))f\"F17$$\"3Lmmmmd'*GBF1$!3?K5B7gMN9F17$$ \"3j*****\\iN7]#F1$!3IMz8]J:&G(F17$$\"3aLLLt>:nEF1$!3WZAT\"y-4\\\"F\\o 7$$\"35LLL.a#o$GF1$!3X9#*\\Dy1/AF\\o7$$\"3ammm^Q40IF1$!30m>>9)pLA#F\\o 7$$\"3;LL$eY/C3$F1$!3TRS#*okn/\\$**F\\o7$$\"3/LLL8-V&\\$F1$\"3_;T 9Ij^s;F>7$$\"3imm;z\"G*zNF1$\"3#G5\"4KD5wEF>7$$\"3=+++XhUkOF1$\"3]:'\\ yf3k/%F>7$$\"3=+++![,`u$F1$\"3_Ta%H-6(*y&F>7$$\"3=+++:o7$$\"37++D6EjpQF1$\"3csqF(=a7`*F>7$$\"34++]2%)38RF1$\"3,%[$G0#Q6 7\"F-7$$\"3/++v.UacRF1$\"3Z:dq!)3%>J\"F-7$$\"\"%F*$\"37FaTI\"pz_\"F--% 'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fd`l-%+AXESLABELSG6$Q\"x6\"Q\"yFi`l-%%V IEWG6$;F(Fi_lF^al" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7]p7$$!\"%\"\"!$\"3;8%)z4qP_:!#97$$!3iLL$e% G?yR!#<$\"31k,:8#H*39F-7$$!3ymmm\"p0k&RF1$\"3gG!p(R%RgF\"F-7$$!3&***** \\P&3Y$RF1$\"31v%=ostI:\"F-7$$!3cLLL$Q6G\"RF1$\"3K-uh'HH%R5F-7$$!3smm; HU,\"*QF1$\"3gT8j,JLX$*!#:7$$!3!******\\2<#pQF1$\"3Y(yzMg;%y$)FH7$$!3] LL$3#*>u%QF1$\"3m$)['*Q!y$)[(FH7$$!3ommmmFiDQF1$\"3qM3o5jJqmFH7$$!3=LL 3#f\"p(y$F1$\"3OljY/;m/aFH7$$!37++]GI9EFH7$$!3m****\\AHe )e$F1$\"3M]]Gks!yG\"FH7$$!3nmmmwxE.NF1$\"3*3sFzz7YI%!#;7$$!3Mmmm1rQ1DBF1$\"36(oU8au*HVF17$$!3kmmmw))yr@F1$\"31SBL$e?(\\T F17$$!3;+++S(R#**>F1$\"3Qb^0A%y3Y#F17$$!30++++@)f#=F1$\"3!4o[tE'4Vf!#= 7$$!3-+++gi,f;F1$!3U&*\\)>hQ1<'F\\u7$$!3qmmm\"G&R2:F1$!3qxL!yJ2l/\"F17 $$!3XLLLtK5F8F1$!3>1p#QDP*=))F\\u7$$!3eLLL$HsV<\"F1$!37Qr#>%)oaM%F\\u7 $$!3+-++]&)4n**F\\u$\"3O.vN%\\$))*4\"F\\u7$$!37PLLL\\[%R)F\\u$\"3Ik!\\ K2Xk8%F\\u7$$!3G)*****\\&y!pmF\\u$\"39sX7$$!3sLLL$)[`P< F\\u$!3'*Q.Ad&ofk#F\\u7$$!3gSnmmmr[R!#?$!3$)37tx.fDPF\\u7$$\"3yELL$=2V s\"F\\u$!3ODsF5EphEF\\u7$$\"3)e*****\\`pfKF\\u$!3X5hPh.OVIFjw7$$\"36HL LLm&z\"\\F\\u$\"3!\\B\")H;=8l#F\\u7$$\"3>(******z-6j'F\\u$\"3\\>80![Qy j%F\\u7$$\"3q\"******4#32$)F\\u$\"39)>j4*)G[B%F\\u7$$\"3r$*****\\#y'G* *F\\u$\"3AK^M-A!**>\"F\\u7$$\"3G******H%=H<\"F1$!3;'f?AdU!)H%F\\u7$$\" 35mmm1>qM8F1$!3gX^H^lj#**)F\\u7$$\"3%)*******HSu]\"F1$!3Q8\"4w1ok/\"F1 7$$\"3'HLL$ep'Rm\"F1$!3JELV7dHBfF\\u7$$\"3')******R>4N=F1$\"3))3!zhN], \"oF\\u7$$\"3#emm;@2h*>F1$\"33^xaq)H_U#F17$$\"3]*****\\c9W;#F1$\"3w87e ,SS)4%F17$$\"3Lmmmmd'*GBF1$\"3?#4xJH&z0VF17$$\"3j*****\\iN7]#F1$\"36]o IEb\")>6F17$$\"3aLLLt>:nEF1$!3)>bQw9$>WqF17$$\"35LLL.a#o$GF1$!3O\"f*3m l9D@F`p7$$\"3ammm^Q40IF1$!3'[:(yXdFjQF`p7$$\"3;LL$eY/C3$F1$!3_g3*4'zbb XF`p7$$\"3y******z]rfJF1$!3qO%GF!=wy\\F`p7$$\"3rmm;C%=S?$F1$!3PE:v6C)f ,&F`p7$$\"3?LLLo++]7Q'[q$F1$\"3AJiUu% yEC$FH7$$\"3=+++![,`u$F1$\"3fS:\"*y\\q.UFH7$$\"3=++]Z\"Rdy$F1$\"3t![5j S/YM&FH7$$\"3=+++:o_+d-p'FH7$$\"3;+]78Z!z%QF1$\"3LAM-aJP2 vFH7$$\"37++D6EjpQF1$\"3O0ca&)[6'R)FH7$$\"35+]P40O\"*QF1$\"3+(zmm,U8O* FH7$$\"34++]2%)38RF1$\"3]&R/lb<3/\"F-7$$\"31+]i0j\"[$RF1$\"3%f+1!))3?a 6F-7$$\"3/++v.UacRF1$\"3gkKW9>&oF\"F-7$$\"3-+](=5s#yRF1$\"3+GEeDzO49F- 7$$\"\"%F*F+-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fcel-%+AXESLABELSG6$Q\"x6 \"Q\"yFhel-%%VIEWG6$;F(FjdlF]fl" 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 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart: " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "Y:=mtaylor(y(xc+Delta), Delta,5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"YG,,-%\"yG6#%#xcG\"\" \"*&--%\"DG6#F'F(F*%&DeltaGF*F**&#F*\"\"#F**&---%#@@G6$F.F3F/F(F*)F0F3 F*F*F**&#F*\"\"'F**&---F86$F.\"\"$F/F(F*)F0FCF*F*F**&#F*\"#CF**&---F86 $F.\"\"%F/F(F*)F0FMF*F*F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "exact:=int(Y,Delta=-h/2..h/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%&exactG,(*&-%\"yG6#%#xcG\"\"\"%\"hGF+F+*&#F+\"#CF+*&---%#@@G6$%\"DG \"\"#6#F(F)F+)F,\"\"$F+F+F+*&#F+\"%?>F+*&---F46$F6\"\"%F8F)F+)F,\"\"&F +F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "(eval(Y,Delta=-h/2 )+eval(Y,Delta=h/2))/2*h;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&#\"\" \"\"\"#F&*&,(*&F'F&-%\"yG6#%#xcGF&F&*&#F&\"\"%F&*&---%#@@G6$%\"DGF'6#F ,F-F&)%\"hGF'F&F&F&*&#F&\"$#>F&*&---F66$F8F1F9F-F&)F;F1F&F&F&F&F;F&F&F &" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "trapezoid:=expand(%); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%*trapezoidG,(*&-%\"yG6#%#xcG\"\" \"%\"hGF+F+*&#F+\"\")F+*&---%#@@G6$%\"DG\"\"#6#F(F)F+)F,\"\"$F+F+F+*&# F+\"$%QF+*&---F46$F6\"\"%F8F)F+)F,\"\"&F+F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "exact-trapezoid;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*&#\"\"\"\"#7F&*&---%#@@G6$%\"DG\"\"#6#%\"yG6#%#xcGF&)%\"hG\" \"$F&F&!\"\"*&#F&\"$![F&*&---F,6$F.\"\"%F0F2F&)F5\"\"&F&F&F7" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "int(sin(x),x=0..Pi/2);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "evalf((sin(0)+sin(Pi/2))/2*Pi/2);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"+N;)R&y!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "f:=x->sin(x): A:=0: B:=Pi/2:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 105 "for k from 0 to 6 do n:=2^k:\nIn[k]:=evalf((f(A)+f(B )+2*add(f(A+(B-A)/n*i),i=1..n-1))/(2*n)*(B-A)) end do;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>& %#InG6#\"\"!$\"+N;)R&y!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\" \"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#InG6#\"\"\"$\"+!\\%f![*!#5 " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"\"%" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#InG6#\"\"#$\"+7!e6()*!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"\")" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#InG6 #\"\"$$\"+A<&y'**!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"#;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#InG6#\"\"%$\"+.o'>***!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"#K" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#>&%#InG6#\"\"&$\"+X>*z***!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\" nG\"#k" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%#InG6#\"\"'$\"++!)\\****! #5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "for i from 0 to 5 do \+ J[i]:=(4*In[i+1]-In[i])/3 end do; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >&%\"JG6#\"\"!$\"+x)zA+\"!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\" JG6#\"\"\"$\"+'eM,+\"!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"JG6# \"\"#$\"+'H3++\"!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"JG6#\"\"$ $\"+;0++5!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"JG6#\"\"%$\"+L++ +5!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"JG6#\"\"&$\"+-+++5!\"* " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "for i from 0 to 4 do K[ i]:=(16*J[i+1]-J[i])/15 end do;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&% \"KG6#\"\"!$\"+lc\"*****!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"KG 6#\"\"\"$\"+p()******!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"KG6# \"\"#$\"+t********!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"KG6#\"\" $$\"+,+++5!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"KG6#\"\"%$\"+++ ++5!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "for i from 0 to \+ 3 do L[i]:=(64*K[i+1]-K[i])/63 end do;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"LG6#\"\"!$\"+4+++5!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#> &%\"LG6#\"\"\"$\"+\"*********!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>& %\"LG6#\"\"#$\"+,+++5!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"LG6# \"\"$$\"+++++5!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}} {MARK "21 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }