{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 "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 1 3 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 50 "Phi0:=1; alpha0:=in t(Phi0^2/sqrt(1-X^2),X=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%P hi0G\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'alpha0G%#PiG" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "Phi1:=X; alpha1:=int(Phi1^2 /sqrt(1-X^2),X=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi1G%\"X G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'alpha1G,$*&\"\"#!\"\"%#PiG\"\" \"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "Phi2:=X^2+c;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi2G,&*$)%\"XG\"\"#\"\"\"F*$\"+&)o #42#!#5!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "int(Phi2*Ph i0/sqrt(1-X^2),X=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+!ea>?* !#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "solve(%,c);" }} {PARA 8 "" 1 "" {TEXT -1 68 "Error, (in solve) a constant is invalid a s a variable, -.2070926885\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "Phi2:=X^2-1/2; alpha2:=int(Phi2^2/sqrt(1-X^2),X=-1..1);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi2G,&*$)%\"XG\"\"#\"\"\"F*#F*F)! \"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'alpha2G,$*&\"\")!\"\"%#PiG \"\"\"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "Phi3:=X^3+c*X; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi3G,&*$)%\"XG\"\"$\"\"\"F**&$ \"+&)o#42#!#5F*F(F*!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "int(Phi3*Phi1/sqrt(1-X^2),X=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#$\"+2\"oz_)!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "solve(% ,c);" }}{PARA 8 "" 1 "" {TEXT -1 68 "Error, (in solve) a constant is i nvalid as a variable, -.2070926885\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "Phi3:=X^3-3/4*X; alpha3:=int(Phi3^2/sqrt(1-X^2),X=-1. .1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi3G,&*$)%\"XG\"\"$\"\"\"F **&#F)\"\"%F*F(F*!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'alpha3G,$ *&\"#K!\"\"%#PiG\"\"\"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "Phi4:=X^4-c2*X^2+c0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi4G,(*$) %\"XG\"\"%\"\"\"F**&%#c2GF*)F(\"\"#F*!\"\"%#c0GF*" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 88 "solve(\{int(Phi4*Phi2/sqrt(1-X^2),X=-1..1),i nt(Phi4*Phi0/sqrt(1-X^2),X=-1..1)\},\n\{c0,c2\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<$/%#c2G\"\"\"/%#c0G#F&\"\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "Phi4:=X^4-X^2+1/8; alpha4:=int(Phi4^2/sqrt(1-X^2), X=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Phi4G,(*$)%\"XG\"\"%\" \"\"F**$)F(\"\"#F*!\"\"#F*\"\")F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#> %'alpha4G,$*&\"$G\"!\"\"%#PiG\"\"\"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "plot(\{Phi0,Phi1,Phi2,Phi3,Phi4\},X=-1..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$!\"\" \"\"!$\"\"\"F*7$$!3ommm;p0k&*!#=F+7$$!3wKL$3s%HaF0F+7$$!3Q+++]$*4)*\\F0F+7$$!39+++]_&\\c%F0F+7$$! 31+++]1aZTF0F+7$$!3umm;/#)[oPF0F+7$$!3hLLL$=exJ$F0F+7$$!3*RLLLtIf$HF0F +7$$!3]++]PYx\"\\#F0F+7$$!3EMLLL7i)4#F0F+7$$!3c****\\P'psm\"F0F+7$$!3' )****\\74_c7F0F+7$$!3)3LLL3x%z#)!#>F+7$$!3KMLL3s$QM%FjoF+7$$!3]^omm;zr )*!#@F+7$$\"3%pJL$ezw5VFjoF+7$$\"3s*)***\\PQ#\\\")FjoF+7$$\"3GKLLe\"*[ H7F0F+7$$\"3I*******pvxl\"F0F+7$$\"3#z****\\_qn2#F0F+7$$\"3U)***\\i&p@ [#F0F+7$$\"3B)****\\2'HKHF0F+7$$\"3ElmmmZvOLF0F+7$$\"3i******\\2goPF0F +7$$\"3UKL$eR<*fTF0F+7$$\"3m******\\)Hxe%F0F+7$$\"3ckm;H!o-*\\F0F+7$$ \"3y)***\\7k.6aF0F+7$$\"3#emmmT9C#eF0F+7$$\"33****\\i!*3`iF0F+7$$\"3%Q LLL$*zym'F0F+7$$\"3wKLL3N1#4(F0F+7$$\"3Nmm;HYt7vF0F+7$$\"3Y*******p(G* *yF0F+7$$\"3]mmmT6KU$)F0F+7$$\"3fKLLLbdQ()F0F+7$$\"3[++]i`1h\"*F0F+7$$ \"3W++]P?Wl&*F0F+7$F+F+-%'COLOURG6&%$RGBG$\"#5F)$F*F*F^u-F$6$7ao7$F($! 3++++++++DF07$$!3!RLL$e%G?y*F0$!3_$G\"RZRrB?F07$F.$!3A,%e+[8`d\"F07$$! 3E++vV5Su$*F0$!3<(eeE8mt?\"F07$F2$!3?g(Q1_-lf)Fjo7$$!39***\\iId9(*)F0$ !3ke!e,2!oA\\Fjo7$F5$!3I@*=szLP\\\"Fjo7$$!3&emmmwnMa)F0$\"3>#f7`5=lr\" Fjo7$F8$\"3s:7ZXSZ!p%Fjo7$$!3)****\\i&[3:\")F0$\"3rZz_**yc@uFjo7$F;$\" 3rX?&Q\\U.$**Fjo7$$!3'3++Dw$H.xF0$\"3k<'p+?zi?\"F07$F>$\"3![kc?/%Q,9F0 7$FA$\"37cX'=(fv\\d&R#F07$$!3%)****\\([j5i&F0$\"3Lnv[ckuRCF07$FM$\"3yY$['**3arCF0 7$$!3]LL$3x&y8_F0$\"3m/!>sjYI\\#F07$FP$\"3?(4)>e%****\\#F07$$!3E++++t_ \"y%F0$\"3gQMiHZ%H\\#F07$FS$\"3Q7`j#zLCZ#F07$$!33+++]zCcVF0$\"3L4?t5`] SCF07$FV$\"39+RGp;>(R#F07$FY$\"3ywkvuT=\"H#F07$Ffn$\"37o&\\Iw:J7#F07$F in$\"3E&*odV*z)[>F07$F\\o$\"3fIY\"\\;=Tr\"F07$F_o$\"37nL4;#Q:[\"F07$Fb o$\"3Tv$ygm0T?\"F07$Feo$\"3bmZU#p@bA*Fjo7$Fho$\"3+$y><@_G:'Fjo7$F\\p$ \"3?*4PQb\"o\\KFjo7$F_p$\"3O**\\rHT$QS(Fap7$Fcp$!3IWh=*Ql]A$Fjo7$Ffp$! 3iFF/>'4y0'Fjo7$Fip$!34Dm#pu8`.*Fjo7$F\\q$!3mCk:ZCx(>\"F07$F_q$!3]pYI$ G2!o9F07$Fbq$!3SqfD\"f'p3F07$Fhq$!3)esIe0a58#F07$ F[r$!33#f)4L1A\"H#F07$F^r$!3.RMYrz1+CF07$$\"3/mm\"HiBQP%F0$!3Ov+g*oSOW #F07$Far$!3EP`Q?d?vCF07$$\"37KLeR*)**)y%F0$!3K(y,Os:M\\#F07$Fdr$!3%o#) GD!e)**\\#F07$$\"3nJL$3A_1?&F0$!3)42@x,!)Q\\#F07$Fgr$!3!RW)G5H'RZ#F07$ $\"3IKLe9as;cF0$!3#))3vyu,1W#F07$Fjr$!3AX;$>l#)HR#F07$F]s$!3Ee/Gi()yWA F07$F`s$!39)3FP+Hj.#F07$Fcs$!3iNQv\"F07$Ffs$!3#)**)ygxuUR\"F07$$ \"3\"HL$ek6,1xF0$!3WES%e'zZ.7F07$Fis$!3a\">m/%H4a**Fjo7$$\"3)HLL3U/37) F0$!3E*p\"QyqQ^tFjo7$F\\t$!3_`W$3;!f4XFjo7$$\"3a****\\P$[/a)F0$!3=8y*[ Am*f\"Fjo7$$\"3amm\"zW?)\\*)F0$\"3=K%ffXpPc%Fjo7 $Fbt$\"3#HQxUYfj<)Fjo7$$\"3Y++++PDj$*F0$\"37Srr=HP'=\"F07$Fet$\"3YbRC \\h2y:F07$$\"3A++v=5s#y*F0$\"3,v+:hF=D?F07$F+$\"3++++++++DF0-Fit6&F[uF ^uF\\uF^u-F$6$7gp7$F($\"3+++++++]7F07$$!3%pmm\"HU,\"*)*F0$\"3;FSmnd\"z .\"F07$Ffu$\"3M0o*\\B2SP)Fjo7$$!3u****\\(oUIn*F0$\"3G`r#Hh#\\\"['Fjo7$ F.$\"3G?4c3;f)p%Fjo7$$!3#HL3-)*G#p%*F0$\"31x\\Td::MKFjo7$F^v$\"35$z<>g &[[=Fjo7$$!3_m;H2Jdz#*F0$\"3kZdk.`l'R&!#?7$F2$!3pa?P?YyU'fIn%*>Fjo7$Ffv$!3#ya\"HT,S0KFjo7$$!3YL$eRP8['))F0$!3q 6I0%oD!HVFjo7$F5$!3k'>dDiX\"o`Fjo7$F^w$!3Yl=Q!37U@(Fjo7$F8$!3KG/!3Fs'[ ()Fjo7$Ffw$!3!RbVJ)eJ')**Fjo7$F;$!3))GL&3#4W&4\"F07$F^x$!3[jsbt1vi6F07 $F>$!3C:S[J\"f*47F07$$!3K++]i#=ES(F0$!3=M%3*H>(pA\"F07$$!3tKL$3i_+I(F0 $!3CHL@W3(F0$!3gk;oPiuY7F07$FA$!3#)3Gl(>7F07$$!3uLL$e\\g\"fkF0$!3Y!3? 34a9=\"F07$FG$!3#=6(Qu(R(H6F07$FJ$!3U>:jA>Pr)*Fjo7$FM$!33BzAbY&*)G)Fjo 7$FP$!3'*py8X\\\\SiFjo7$FS$!3K@OfIPD'*RFjo7$FV$!3zOp/bK(Hu\"Fjo7$FY$\" 3];0@wiB`JF^gl7$Ffn$\"3Vv%4AYNTq#Fjo7$Fin$\"3adGMg6IBYFjo7$F\\o$\"3u:c '*>'oln'Fjo7$F_o$\"3E*Gi9nf(*G)Fjo7$Fbo$\"3#fYt:<%[(z*Fjo7$Feo$\"3/8(e 0F3Y4\"F07$Fho$\"3yoD#f;?>=\"F07$$!3gKL$e9d;J'Fjo$\"3EWs&Go@.@\"F07$F \\p$\"3o#3G>om6B\"F07$$!3T,+]ivF@AFjo$\"3On*)\\g$o]C\"F07$F_p$\"3)fU#y a-**\\7F07$$\"3&yK$3_Nl.5Fjo$\"3)*Ro,\"y#**[7F07$$\"3@CL$3-Dg5#Fjo$\"3 ;Zp$eimbC\"F07$$\"3e?Le*['R3KFjo$\"3@9S@)y;(R7F07$Fcp$\"3I=\"f8\"=XJ7F 07$$\"3L`mmmJ+IiFjo$\"3?]-(\\qP8@\"F07$Ffp$\"3y44'Q%4.%=\"F07$Fip$\"3x b')H227,6F07$F\\q$\"3.Dp4voIF)*Fjo7$F_q$\"37\\.yWi9R7F07$$\"3eLL3Fe#Rx'F0$!3tC [4*evIB\"F07$$\"3ILL$3sr*zoF0$!3K'>4?]#*GC\"F07$$\"3-LLe9w,')pF0$!3E#p M8kq&[7F07$Fcs$!3/9?(F0$!3uZhQ-&fnC\"F07$$\" 3c***\\(o!*R-tF0$!3\"yuR6;W*Q7F07$$\"3^L$e*[oc2uF0$!3FR^rhJEE7F07$Ffs$ !3lb\"*[z6^37F07$Fjal$!3G&[Hemm>;\"F07$Fis$!3#e4xM4ri4\"F07$Fbbl$!3)zY %*)yPyc**Fjo7$F\\t$!3#zxs:WD1m)Fjo7$Fjbl$!3c)3DL^/zB(Fjo7$F_t$!3w)y=rC z+b&Fjo7$Fbcl$!3[%[MGzH.W$Fjo7$Fbt$!3kMEXgHj3**F^gl7$$\"3Y++DJ&f@E*F0$ \"3=5mZBbAvIF^gl7$Fjcl$\"3_Qr6e1o!p\"Fjo7$$\"3Y++voyMk%*F0$\"3Gx];U-#4 ;$Fjo7$Fet$\"3xC7;$fv0s%Fjo7$$\"3K+]7G:3u'*F0$\"3U]bO^'4!*\\'Fjo7$Fbdl $\"37[(R;L!R'Q)Fjo7$$\"35+]P40O\"*)*F0$\"3R())Q'Q6dQ5F07$F+F_el-Fit6&F [uF\\uF\\uF^u-F$6$7S7$F(F(7$F.F.7$F2F27$F5F57$F8F87$F;F;7$F>F>7$FAFA7$ FDFD7$FGFG7$FJFJ7$FMFM7$FPFP7$FSFS7$FVFV7$FYFY7$FfnFfn7$FinFin7$F\\oF \\o7$F_oF_o7$FboFbo7$FeoFeo7$FhoFho7$F\\pF\\p7$F_pF_p7$FcpFcp7$FfpFfp7 $FipFip7$F\\qF\\q7$F_qF_q7$FbqFbq7$FeqFeq7$FhqFhq7$F[rF[r7$F^rF^r7$Far Far7$FdrFdr7$FgrFgr7$FjrFjr7$F]sF]s7$F`sF`s7$FcsFcs7$FfsFfs7$FisFis7$F \\tF\\t7$F_tF_t7$FbtFbt7$FetFetFgt-Fit6&F[uF^uF^uF\\u-F$6$7S7$F($\"3++ ++++++]F07$F.$\"3c]R_q%=r9%F07$F2$\"3QAYJ&QafV$F07$F5$\"3w!Q%*o>`0n#F0 7$F8$\"32V'p4YMo$>F07$F;$\"3Z6=$z\"z@V7F07$F>$\"3n4CONayFjFjo7$FA$\"3] /z7`y3zLF^gl7$FD$!37$fJIqKF]&Fjo7$FG$!3!**QjPBKm4\"F07$FJ$!3M7#zpV/8i \"F07$FM$!3WO=*><$3_?F07$FP$!3MdHv)G+>]#F07$FS$!3%Ru\\lN=h\"HF07$FV$!3 !yvfcl!zzKF07$FY$!3')oc]l'\\)zNF07$Ffn$!3!)pCpj![#**QF07$Fin$!3Azo!H2J !QTF07$F\\o$!3Mu6f:f5zVF07$F_o$!3!yC+>*)y&fXF07$Fbo$!3Ciqe&>@?s%F07$Fe o$!3j;]k>b6U[F07$Fho$!3+elAf-XJ\\F07$F\\p$!37*\\2$y58\")\\F07$F_p$!37H Hxa-****\\F07$Fcp$!3%pS4'zsT\")\\F07$Ffp$!3TFu!R\"**eL\\F07$Fip$!3]zS& 4kN)[[F07$F\\q$!3D^*[G(zx$RbFjo 7$Fcs$\"3/BILi![O(HF^gl7$Ffs$\"336+G3;=TkFjo7$Fis$\"3tFrt;Y()R7F07$F\\ t$\"3+j)pI?K%f>F07$F_t$\"3$Q>x^Bqij#F07$Fbt$\"31F(*fd=^#R$F07$Fet$\"3] :sFP\"o(\\TF07$F+Fe]n-Fit6&F[uF\\uF^uF\\u-%+AXESLABELSG6$Q\"X6\"Q!F[gn -%%VIEWG6$;F(F+%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" }}}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "plot(\{Phi3*Phi4,Phi2*Phi4\} ,X=-1..1);" }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6&-% 'CURVESG6$7_r7$$!\"\"\"\"!$!3+++++++DJ!#>7$$!3/MLe9r]X**!#=$!3=SiIMt;< FF-7$$!3%pmm\"HU,\"*)*F1$!3uzy(z%)eRM#F-7$$!3()***\\PM@l$)*F1$!33N-XyC n.?F-7$$!3!RLL$e%G?y*F1$!3Cb=qB&fYp\"F-7$$!3u****\\(oUIn*F1$!3uG?&GS>T ;\"F-7$$!3ommm;p0k&*F1$!3C/`D)paOay.\" FM7$$!3'fmT&Q75y!*F1$\"3Hq.y)GR@M\"FM7$$!36LeRs#zZ-*F1$\"3rxeh$4=\">:F M7$$!39***\\iId9(*)F1$\"3us g-9F-7$$!3\"ommT!R=0vF1$!3];CS=uh&p\"F-7$$!3u****\\P8#\\4(F1$!3-;oet^* p=#F-7$$!3#RLL3FuF)oF1$!3Co$)*z9*yjBF-7$$!3+nm;/siqmF1$!3urx@:Hz\"[#F- 7$$!3#)******\\Q*[c'F1$!3l#y=m+b\"=DF-7$$!3uLL$e\\g\"fkF1$!3w\"p=lK1'R DF-7$$!3q++v=QH1kF1$!3ho&fXI\"zWDF-7$$!3mnmmTrU`jF1$!3#p5&)o@Cja#F-7$$ !3_LLek/c+jF1$!3O$305([CWDF-7$$!3[++](y$pZiF1$!37T;X\"[*fQDF-7$$!3YM$e k.M*QhF1$!30py#=1+g^#F-7$$!3MnmT&Gu,.'F1$!3+q1'=vl!zCF-7$$!3?+]PMXT@fF 1$!3K9_HNyTGCF-7$$!33LLL$yaE\"eF1$!3y-w#H@eZO#F-7$$!3hmmm\">s%HaF1$!3A PEdW!\\'[?F-7$$!3Q+++]$*4)*\\F1$!3)QEt\")RB,c\"F-7$$!39+++]_&\\c%F1$!3 c.YYnFZ!))*FM7$$!31+++]1aZTF1$!3MfJym4CyTFM7$$!3umm;/#)[oPF1$\"3Hy:Kb] kCsFX7$$!3hLLL$=exJ$F1$\"3Tn#Q_i#>TdFM7$$!3*RLLLtIf$HF1$\"3c#)z]/*e-,* FM7$$!3CnmT&o_Qr#F1$\"38s8*oS,@/\"F-7$$!3]++]PYx\"\\#F1$\"3%p?y]vUW9\" F-7$$!3%RLekG'[$R#F1$\"3]U*o'z03x6F-7$$!3QnmTNz>&H#F1$\"34_!*e3'**=?\" F-7$$!3%3+vVe4p>#F1$\"3QMy:W0\"*=7F-7$$!3EMLLL7i)4#F1$\"3r(4]bdf\"G7F- 7$$!3g+]PMLy!*>F1$\"3g$RR^du%H7F-7$$!3#pm;aVXH)=F1$\"3I_/gMzp@7F-7$$!3 CL$ek`2^x\"F1$\"3$4,'Q44.07F-7$$!3c****\\P'psm\"F1$\"3'3[I/i?(z6F-7$$! 3s*****\\F&*=Y\"F1$\"3[z<,.^p36F-7$$!3')****\\74_c7F1$\"3^'puWBL)45F-7 $$!3)3LLL3x%z#)F-$\"3C!*G(p5!=ssFM7$$!3KMLL3s$QM%F-$\"3G<0'fl**3+%FM7$ $!3]^omm;zr)*FX$\"3-t#p,^?ZD*!#A7$$\"3%pJL$ezw5VF-$!3Ax[E:E^rRFM7$$\"3 s*)***\\PQ#\\\")F-$!3!*e['4/ME<(FM7$$\"3GKLLe\"*[H7F1$!3Q86oj5(*[**FM7 $$\"3ylm;HCjV9F1$!3\\\"G%)[#=*45\"F-7$$\"3I*******pvxl\"F1$!37+UZSx3x6 F-7$$\"3'*)**\\iSCDw\"F1$!3%)R#G#*z7F-7$$\"3G)**\\(==-s>F1$!3cbD7F)p(G7F-7$$\"3#z****\\_qn2#F1$!3/W%Q Jjo\"H7F-7$$\"3/)*\\P%G?\"y@F1$!31S$Reqw7A\"F-7$$\"3=)**\\P/q%zAF1$!3* yE?OjX^?\"F-7$$\"3I)*\\7.)>3Q#F1$!3!eV7K.=2=\"F-7$$\"3U)***\\i&p@[#F1$ !3UgDc4l(z9\"F-7$$\"3L)**\\(=GB2FF1$!3Ai()fZ%>d/\"F-7$$\"3B)****\\2'HK HF1$!3V=0-)yuj.*FM7$$\"3ElmmmZvOLF1$!3Spci)R8Hb&FM7$$\"3i******\\2goPF 1$!3pRk&>\"[%3@(FX7$$\"3UKL$eR<*fTF1$\"30mDJ2N([M%FM7$$\"3m******\\)Hx e%F1$\"3Hf;4!4R\">5F-7$$\"3ckm;H!o-*\\F1$\"37.uMRWJ]:F-7$$\"3y)***\\7k .6aF1$\"3Mk&zthl-.#F-7$$\"3#emmmT9C#eF1$\"3sY='3b#)4P#F-7$$\"38**\\7yI 3IfF1$\"3T`#HJgTHV#F-7$$\"3WKLeRRYa#F-7$$\"3Ymm\"z\\%[gkF1$\"3rpu5&HH%RDF-7$$\"3q+]i:A=klF 1$\"3XNzj#4\\$=DF-7$$\"3%QLLL$*zym'F1$\"3k%pz16FH[#F-7$$\"3ILL$3sr*zoF 1$\"3C&HUhyOdO#F-7$$\"3wKLL3N1#4(F1$\"3#eAfYI`(*=#F-7$$\"3Nmm;HYt7vF1$ \"3e*3rTl'*\\o\"F-7$$\"3\"HL$ek6,1xF1$\"3iM5Pz7S)R\"F-7$$\"3Y*******p( G**yF1$\"3E^tFM7$$\"3]mmmT6K U$)F1$\"3a9*)zFre0RFM7$$\"3a****\\P$[/a)F1$\"3'*f([#[n%QF\"FM7$$\"3fKL LLbdQ()F1$!3q=-'>Mx!4mFX7$$\"3Mm\"z>w'Q\"z)F1$!3!RN3UC(o;5FM7$$\"36+]i !*z>W))F1$!3KnpmSv#=H\"FM7$$\"3yK3F>#4q*))F1$!3i4*eEpz)y9FM7$$\"3amm\" zW?)\\*)F1$!3?Elp-s3q:FM7$$\"3I+Dcw;j-!*F1$!3?\\YRB(ytb\"FM7$$\"3'HL3_ !HWb!*F1$!3>;d'ongBV\"FM7$$\"3rmT&Q8a#3\"*F1$!3'Gcbix4j=\"FM7$$\"3[++] i`1h\"*F1$!3VsZU)[a;5)FX7$$\"3Y++++PDj$*F1$\"34X!*)puxd+#FM7$$\"3W++]P ?Wl&*F1$\"3/m3FaxU\\uFM7$$\"3K+]7G:3u'*F1$\"3%zXneda'o6F-7$$\"3A++v=5s #y*F1$\"3)yC\"z7tR)p\"F-7$$\"3;+D1k2/P)*F1$\"3#>^_u%ew1?F-7$$\"35+]P40 O\"*)*F1$\"3g0!pQsCiM#F-7$$\"31+voa-oX**F1$\"3JVCX$R2%=FF-7$$\"\"\"F*$ \"3+++++++DJF--%'COLOURG6&%$RGBG$\"#5F)$F*F*F\\`m-F$6$7gq7$F($\"3+++++ ++]iF-7$F/$\"3Q#\\YuM'G)e&F-7$F5$\"3q'p4TcvX'\\F-7$F:$\"3+63%Q#GF-7$FI$\"39$=JXgh&[>F-7$$!3#HL3-)* G#p%*F1$\"3%>!fqx\"oGG\"F-7$FO$\"3EHFd8;&>+(FM7$$!3_m;H2Jdz#*F1$\"3W/L 3vzv[>FM7$FT$!3oB([I`*H&Q#FM7$Fco$!3I@.->#=Bx*FM7$Fgp$!3tp9PX=fL9F-7$$ !3qlm;/'=3l)F1$!3[MbkM*3Dd\"F-7$F\\q$!3Q@oVj!3'e;F-7$$!3#fm;zM#z*[)F1$ !3SJ(R$eWh$o\"F-7$$!3+mm;Hp6O%)F1$!3;kqulY\\(p\"F-7$$!33mmT5:W#Q)F1$!3 ->5EuB!4q\"F-7$Faq$!3;\"e\"=%*HZ%p\"F-7$$!3iL$eRZD>A)F1$!3w!GshFC[l\"F -7$Ffq$!3GK$=,m!H$e\"F-7$$!3Mm;aQUC3!)F1$!3aNw38ME%[\"F-7$F[r$!3'=eS3y r=O\"F-7$Fer$!3O-$)epK5&pV`k\"F-7$$!3%)****\\([j5i&F1$\"3'RC+E%\\8x;F-7$$ !3BLLeRyEDbF1$\"3!==]XV&p&p\"F-7$F[w$\"3]h'RhVi4q\"F-7$$!3]***\\7)*G;K &F1$\"3]wyy%>()4p\"F-7$$!3]LL$3x&y8_F1$\"3[)*zNkTDk;F-7$$!3]nmTgD%f5&F 1$\"3Es#o.9T4i\"F-7$F`w$\"3u!=?0h48c\"F-7$$!3E++++t_\"y%F1$\"3e6w\\K6r $R\"F-7$Few$\"3OX97')[Nl6F-7$Fjw$\"3%\\\"y'\\R(e;dFM7$F_x$!3*eDlG=6)G6 FM7$Fdx$!3#QC)\\'\\4W0\"F-7$Fix$!3b<04'QOJ\">F-7$Fcy$!3E$=aR6SP#HF-7$F gz$!3qQDp@8yzPF-7$F[\\l$!3\\l)f@z#REYF-7$Fe\\l$!3_NT![p>-I&F-7$Fj\\l$! 3R[Ri30eGeF-7$$!3gKL$e9d;J'F-$!3$**)*H,\"GR.gF-7$F_]l$!3C'pG>i-E8'F-7$ $!3'ym;aQdDG$F-$!33*Rp!Q\"HG='F-7$$!3T,+]ivF@AF-$!34Tq0V&)>>iF-7$$!3' \\L$eRx**f6F-$!3SV-Z[FfTiF-7$Fd]l$!3]gKZ#4R*\\iF-7$$\"3&yK$3_Nl.5F-$!3 l>26pdqViF-7$$\"3@CL$3-Dg5#F-$!3x\"=xfh3BA'F-7$$\"3e?Le*['R3KF-$!394_V MD#e='F-7$Fj]l$!3k:16K`PMhF-7$$\"3L`mmmJ+IiF-$!35^m%y%Hn4gF-7$F_^l$!3 \"eZ'QAJ_TeF-7$Fd^l$!3D(GU0L`\"R`F-7$F^_l$!3x/N'yRxNk%F-7$Fb`l$!3tX,#y i$RDQF-7$Ffal$!3EPwY+JGXHF-7$F`bl$!3A(3lgfK9#>F-7$Febl$!33pG#y$yt75F-7 $Fjbl$!3R7+dY.hE6FM7$F_cl$\"3;jU/RJ$)=fFM7$Fdcl$\"3'*4YwJu4#>\"F-7$$\" 37KLeR*)**)y%F1$\"3&)oFT)*)G0S\"F-7$Ficl$\"3A'QG0X_jb\"F-7$$\"3c(**** \\7ga4&F1$\"3^?j$)Qg&eh\"F-7$$\"3nJL$3A_1?&F1$\"35(z6)o\"F-7$F^dl$\"3g?/ds'\\/q\"F-7$$\"3al;a84)Q^&F1 $\"3q#Ro(Q#=qp\"F-7$$\"3IKLe9as;cF1$\"3'Hedc;i#y;F-7$$\"31**\\i:*p&>dF 1$\"3I?2B&o_Uk\"F-7$Fcdl$\"3!))z3\\#y9&f\"F-7$F]el$\"3\"p$\\NmwlW9F-7$ Fgel$\"30_Htjn*GB\"F-7$Fegl$\"3Ap[antCanFM7$F_hl$!3KGUiIrz;PFX7$Fdhl$! 3qKjs#)*RUy(FM7$F^il$!311\\'=qQ#f8F-7$$\"3ymmTgg/5!)F1$!3'[@wJSQh[\"F- 7$Fcil$!3y())[Ebaye\"F-7$$\"3=***\\7yi:B)F1$!3#\\uc?fw(f;F-7$Fhil$!3;& Q%*)Q3*pp\"F-7$$\"3w**\\iSH&=R)F1$!3=Y.oJQ.,^R')F1$!3IR[0/g'Re\"F-7$Fbjl$!3I\"R0A(3:j9F-7$Ff[m$!3G5oS 0Z^N5F-7$Fj\\m$!3+0R4\"[::O$FM7$$\"3Y++DJ&f@E*F1$\"3'=P%H%Q\\05\"FM7$F _]m$\"3#pdc#H>))ojFM7$$\"3Y++voyMk%*F1$\"3_\")f)=!))*3D\"F-7$Fd]m$\"35 %*3h=%H*e>F-7$Fi]m$\"3`Z:7+)yF$GF-7$F^^m$\"35gxACrrKQF-7$Fc^m$\"3aR&oO ;xHQ%F-7$Fh^m$\"33jT'=z@%o\\F-7$F]_m$\"3SNcPAzK!f&F-7$Fb_mFa`m-Fg_m6&F i_mF\\`mFj_mF\\`m-%+AXESLABELSG6$Q\"X6\"Q!Fain-%%VIEWG6$;F(Fb_m%(DEFAU LTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1 " "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "int(Phi2*Phi 4/sqrt(1-X^2),X=-1..1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}} {EXCHG {PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "f:=eval(sin(x),x=Pi/4*(1+X));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG-%$sinG6#,$*(\"\"%!\"\"%#PiG\"\"\",&%\"XGF-F-F-F- F-" }}}{EXCHG {PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "int(f*Phi0/sqrt(1-X^2),X=-1..1)/alpha0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$-%$intG6$*&-%$sinG6#,$*(\"\"%!\"\"%#PiG\" \"\",&%\"XGF0F0F0F0F0F0,&F0F0*$)F2\"\"#F0F.#F.F6/F2;F.F0*$F/F." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "a:=evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"+5q%>-'!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "b:=evalf(int(f*Phi1/sqrt(1-X^2),X=-1..1)/alpha1);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG$\"+m;DO^!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "c:=evalf(int(f*Phi2/sqrt(1-X^2),X=-1..1.)/a lpha2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cG$!+&)o#42#!#5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "P2:=a*Phi0+b*Phi1+c*Phi2;" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#P2G,($\"+_/Tdq!#5\"\"\"*&$\"+m;DO^ F(F)%\"XGF)F)*&$\"+&)o#42#F(F))F-\"\"#F)!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "p2:=expand(eval(P2,X=4/Pi*x-1)):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,($\"**4o(\\\"!#5!\"\"*&$\"+u]K\"=\"!\"*\"\"\"%\"xGF,F, *&$\"+5-EdLF&F,)F-\"\"#F,F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "plot(\{sin(x),p2\},x=0..Pi/2);" }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6&-%'CURVESG6$7S7$$\"\"!F)F(7$$\"3NGK5j*))QU$!#>$ \"3QsLeI+ABMF-7$$\"3DXXYUk*HS'F-$\"3]DS+L@i)R'F-7$$\"3=N68yVJ`(*F-$\"3 _b&ehJeyt*F-7$$\"3%3h%eRSe78!#=$\"3<&Q%f]#=)38F=7$$\"3k+,hQPB[;F=$\"3V -yj65yS;F=7$$\"3'H#*ed(RUf>F=$\"3q)*)ys&)4p%>F=7$$\"3kHX[TMk\"G#F=$\"3 G3RBS#)*=E#F=7$$\"3Saq%HF=$\" 3=7dd?+e/HF=7$$\"3)pq'4OKt)G$F=$\"3c0jx$Rp(HKF=7$$\"3#f/N#RTo*e$F=$\"3 ML>uye38NF=7$$\"3Ut79wN[GRF=$\"3V3zj5M@GQF=7$$\"3/VrO c6q%F=7$$\"31\\,oR/A[_F=$\"3SMGBr+f5]F=7$$\"3uvW/X(*RG,:eF =7$$\"3.n3p46^WlF=$\"33g0zi&Qs3'F=7$$\"3oHyF.C6noF=$\"3h+)=j,t*RjF=7$$ \"3(*zx.5Ir.sF=$\"3Qz3MFxj'f'F=7$$\"3'pz!QUu\"G^(F=$\"3$[8q$y.wDoF=7$$ \"3A\"3@7LGi%yF=$\"3wm47uKelqF=7$$\"3)3\"HIT&[D>)F=$\"3M(RvZssjI(F=7$$ \"3gv)\\AI@S\\)F=$\"3C>#p\"po&)3vF=7$$\"3vn()=V,i>))F=$\"3%4zeG%\\()>x F=7$$\"3'G:[dg&*f:*F=$\"31()\\)y]!GHzF=7$$\"3sSt6rL2&[*F=$\"3g&H%*=Uja 7)F=7$$\"3mka(*HIZ.)*F=$\"3%3R7+w2pI)F=7$$\"3Em\"[l:+d,\"!#<$\"3Q?Zs+w \\)\\)F=7$$\"3c!3XyEmu/\"F_u$\"3Ih!)R3tfh')F=7$$\"3sJ_*>P$Q\"3\"F_u$\" 3VZPF_)*3E))F=7$$\"3.M\"G%4t676F_u$\"3kW#3Hj\"Qm*)F=7$$\"3co*Q4iq'*z.@ \"F_u$\"3Y(Q,up+vN*F=7$$\"34Q$[)>&*oU7F_u$\"3OZ!)zP7am%*F=7$$\"3I^lOFY ^w7F_u$\"3-w%)pSt5q&*F=7$$\"3`!)f6EA448F_u$\"3-KPDS[]f'*F=7$$\"3=;T7Ev SU8F_u$\"3B\"='y#[C.u*F=7$$\"3a_wiepWv8F_u$\"3$oY$>Q\"*z4)*F=7$$\"3U$o bdw1eS\"F_u$\"3#4Wi\"*p+U')*F=7$$\"3s$)o#3`-1W\"F_u$\"3aZ!3__n`\"**F=7 $$\"3-#*)4zFC3(pGfF-7$F6$\"3'y4FGF(y/(*F-7$F;$\"3WtONz)yHM\"F =7$FA$\"3?3P#F=7$FP$\"3'\\ (=zlDq4FF=7$FU$\"3J$\\P%e(y+/$F=7$FZ$\"3?$35g^\"=sLF=7$Fin$\"3WiOSk[?e OF=7$F^o$\"3CtFhZE#H(RF=7$Fco$\"3'eN\\4*y<\"G%F=7$Fho$\"3y!)[93k)3d%F= 7$F]p$\"375;[5trF[F=7$Fbp$\"3#R=2^mo`7&F=7$Fgp$\"3%)4+wn]$4P&F=7$F\\q$ \"3+lsW`'*)*[cF=7$Faq$\"3#f#*f(pxH))eF=7$Ffq$\"3:;f;=9\\VhF=7$F[r$\"3/ %4&pcHLzjF=7$F`r$\"3z?'z7^fzh'F=7$Fer$\"3%[^eTT#RIoF=7$Fjr$\"3'y%\\\"> -QB0(F=7$F_s$\"3!*H^:')R(\\F(F=7$Fds$\"3u]y0*yAAY(F=7$Fis$\"3?vft!)>gd wF=7$F^t$\"3Om\\3G@(>&yF=7$Fct$\"3Z*z!orMxM!)F=7$Fht$\"3'\\vwy&>s/#)F= 7$F]u$\"3IdU1YdW&Q)F=7$Fcu$\"31\\pqkgnS&)F=7$Fhu$\"3Y76)4JQ*)p)F=7$F]v $\"3_SH-;mnN))F=7$Fbv$\"3+nG^w/\"z(*)F=7$Fgv$\"3Q%*>]E%>[5*F=7$F\\w$\" 3*po2Jr,.B*F=7$Faw$\"3W\"f'G[U*eM*F=7$Ffw$\"3?y,p)o)Rf%*F=7$F[x$\"3Uw> 7$Ra9c*F=7$F`x$\"3%)zIb$4^%e'*F=7$Fex$\"3'H$)RXT%GZ(*F=7$Fjx$\"3c-$zT* 4XA)*F=7$F_y$\"3D!oW[+*)4!**F=7$Fdy$\"3EV]ZDqMk**F=7$Fiy$\"3&Q_7CjtC+ \"F_u7$F^z$\"3ANcG77c25F_u7$Fcz$\"3ZA=qANF75F_u-Fhz6&FjzF(F[[lF(-%+AXE SLABELSG6$Q\"x6\"Q!Fjdl-%%VIEWG6$;F($\"+Fjzq:!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }} }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "plot(sin(x)-p2,x=0..Pi/2); " }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$ 7ao7$$\"\"!F)$\"3/+++!*4o(\\\"!#>7$$\"3)32exSA(f&)!#?$\"3AU,KL6#\\M\"F ,7$$\"3=9;b\"[W>r\"F,$\"3OL=V8#=q>\"F,7$$\"3W@uKAn\"zc#F,$\"3kH\"z*>&4 R0\"F,7$$\"3NGK5j*))QU$F,$\"3Y&)z&z^B`:*F07$$\"3X')Qy-FW8\\F,$\"3Kwk:F dCeoF07$$\"3DXXYUk*HS'F,$\"3As%>2^]#*p%F07$$\"3!4%yH5a:y!)F,$\"3R1c(4; #4KCF07$$\"3=N68yVJ`(*F,$\"3^Ae9LV52L!#@7$$\"3Di))pQx&R9\"!#=$!3b$)QUb 5\">i\"F07$$\"3%3h%eRSe78FZ$!3BD)Gf(G1;MF07$$\"3ubt4*))3/[\"FZ$!3;7)># RH1\\]F07$$\"3k+,hQPB[;FZ$!3J([,z>!\\MlF07$$\"3!=^%=d)GQ!=FZ$!3')f2)H` 2Ry(F07$$\"3'H#*ed(RUf>FZ$!3(o)ph!\\+U\"*)F07$$\"3kHX[TMk\"G#FZ$!3G\\( )4kw?*3\"F,7$$\"3y_o^C\"F,7$$\"3%y-->Saq%HFZ$!3))4 yhyt)\\N\"F,7$$\"3on$***=Q*y6$FZ$!3M_D6Zj([R\"F,7$$\"3)pq'4OKt)G$FZ$!3 ;zxLA77C9F,7$$\"3twem(o3#RMFZ$!3f@joQ+WT9F,7$$\"3#f/N#RTo*e$FZ$!3E!H)FZ$\"3xqn-iQ()RJF07$$\"3gv)\\AI@S\\)FZ $\"3Y@o86!3Mm%F07$$\"3vn()=V,i>))FZ$\"3+I;G7iHFiF07$$\"3'G:[dg&*f:*FZ$ \"3!*p?+!)z$3t(F07$$\"3sSt6rL2&[*FZ$\"3!Hh\\8-&**o!*F07$$\"3mka(*HIZ.) *FZ$\"3RkjN@!e=-\"F,7$$\"3Em\"[l:+d,\"!#<$\"3!3j/ma=08\"F,7$$\"3c!3XyE mu/\"F_y$\"3!o66pV7#47F,7$$\"3sJ_*>P$Q\"3\"F_y$\"31bj#HT::F\"F,7$$\"3) Ho62M]n4\"F_y$\"3]AiW;)f=H\"F,7$$\"3.M\"G%4t676F_y$\"3:TI&)o,028F,7$$ \"3=^N=lu\"*G6F_y$\"3TN;Uutc<8F,7$$\"3co*Q4i8F,7$$\"3[cr`&*GLx6F_y$\"3OqEw4;[58F,7$$\" 3Qg$y7VcQ>\"F_y$\"3U;[Ov@w%H\"F,7$$\"3Hk&>q'*z.@\"F_y$\"3o/q$H%)*)>F\" F,7$$\"34Q$[)>&*oU7F_y$\"3:fX6&*)pk?\"F,7$$\"3I^lOFY^w7F_y$\"3DyH3?l32 6F,7$$\"3`!)f6EA448F_y$\"3:fb<8Z/0)*F07$$\"3=;T7EvSU8F_y$\"3/R,JB*Qt=) F07$$\"3a_wiepWv8F_y$\"3O'Qj`Os9D'F07$$\"3U$obdw1eS\"F_y$\"3qBPJ)\\q\\ <%F07$$\"3s$)o#3`-1W\"F_y$\"3lGnLO?&yV\"F07$$\"3w(QoVSjhX\"F_y$\"3c=1B $G%Qu))!#A7$$\"3-#*)4zFCTO#Q?YHF07$$\"3y<;V^l!\\]\"F_y$!38dg=H%yNk%F07$$\"3D8JH'Q'y?:F_y $!3;QQio&=BN'F07$$\"3\\3Y:@imO:F_y$!3/$=*[0yeV\")F07$$\"3C/BSs7t`:F_y$ !36\\N6yS2;5F,7$$\"3+++lBjzq:F_y$!3-ZA=qANF7F,-%'COLOURG6&%$RGBG$\"#5! \"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F[bl-%%VIEWG6$;F($\"+Fjzq:!\"*%(DEFAU LTG" 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 49 "d:=evalf(int(f*Phi3/sq rt(1-X^2),X=-1..1)/alpha3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"dG$ !+$p8G\\&!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "P3:=P2+d*Ph i3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#P3G,*$\"+_/Tdq!#5\"\"\"*&$\" +$p7#[bF(F)%\"XGF)F)*&$\"+&)o#42#F(F))F-\"\"#F)!\"\"*&$\"+$p8G\\&!#6F) )F-\"\"$F)F3" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "p3:=evalf(e xpand(eval(P3,X=4/Pi*x-1)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#p3G ,*$\"*nvZC\"!#6!\"\"*&$\"+`v'R-\"!\"*\"\"\"%\"xGF.F.*&$\"+M'f(eoF(F.)F /\"\"#F.F)*&$\"+(oqP8\"!#5F.)F/\"\"$F.F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "plot(sin(x)-p3,x=0..Pi/2);" }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7cp7$$\"\"!F)$\"3(*** ****pcxW7!#?7$$\"3)32exSA(f&)F,$\"3$=[-H)>hW5F,7$$\"3=9;b\"[W>r\"!#>$ \"3q$R'['[%)Ha)!#@7$$\"3W@uKAn\"zc#F5$\"3+*))>t(fMOnF87$$\"3NGK5j*))QU $F5$\"3*HlJa_+U-&F87$$\"3X')Qy-FW8\\F5$\"3kkm!\\%[3kAF87$$\"3DXXYUk*HS 'F5$!3kX0#)p'=[E#!#A7$$\"3!4%yH5a:y!)F5$!3.lO'R:V%=FF87$$\"3=N68yVJ`(* F5$!3GcKgOup(*[F87$$\"3Di))pQx&R9\"!#=$!35z$[#enf!z'F87$$\"3%3h%eRSe78 Fen$!3C)*o/\"4HnR)F87$$\"3ubt4*))3/[\"Fen$!3(Hf'eR+MD(*F87$$\"3k+,hQPB [;Fen$!3%3VM77Q*z5F,7$$\"3!=^%=d)GQ!=Fen$!3G\"=APnS!e6F,7$$\"3'H#*ed(R Uf>Fen$!3RNS#f3fm@\"F,7$$\"3IES aq%HFen$!3$p&H`u1;27F,7$$\"3)pq'4OKt)G$Fen$!3g;.HF;y#3\"F,7$$\"3#f/N#R To*e$Fen$!3G$fLVI\\=O*F87$$\"3Ut79wN[GRFen$!39vY0=]#*)Q(F87$$\"3/@e^F87$$\"3wMbk:3^'f%Fen$!37qLZo$H)eGF87$$\"3%[IQ)4z@%* [Fen$!3+.Up*eeY5(FM7$$\"31\\,oR/A[_Fen$\"3uClKs))>S=F87$$\"3uvW/'ouC\"F,7$$\"3'pz!QU u\"G^(Fen$\"3y8;_uey@8F,7$$\"33R4!o)G_zwFen$\"33f4S?;O[8F,7$$\"3A\"3@7 LGi%yFen$\"3c1+59I>l8F,7$$\"3jQ:u$Q3G$zFen$\"3afO\"*zn.q8F,7$$\"30'*>E O%)Q>!)Fen$\"3ExX]^R>s8F,7$$\"3Y`Cy)[of5)Fen$\"3=#4_!\\Flr8F,7$$\"3)3 \"HIT&[D>)Fen$\"3qhd?JaSo8F,7$$\"3p#Rw<#\\GV$)Fen$\"3a3exRiGc8F,7$$\"3 gv)\\AI@S\\)Fen$\"3'Ry22%f'fL\"F,7$$\"3o@$>Fs?ol)Fen$\"3HT!)pLY'[I\"F, 7$$\"3vn()=V,i>))Fen$\"3'Gg`XemVE\"F,7$$\"3'G:[dg&*f:*Fen$\"3)p\\P\\%p p^6F,7$$\"3sSt6rL2&[*Fen$\"3u-!30O/b+\"F,7$$\"3mka(*HIZ.)*Fen$\"3hd[9q +GI$)F87$$\"3Em\"[l:+d,\"!#<$\"3nQ#GRfz;5'F87$$\"3c!3XyEmu/\"Fc[l$\"3_ Z8]!\\7k'QF87$$\"3sJ_*>P$Q\"3\"Fc[l$\"3)RC#47\"e!*H\"F87$$\"3.M\"G%4t6 76Fc[l$!3l1Om%4[i7\"F87$$\"3co*Q4iq'*z.@\"Fc[l$!3C:c]RJ>\"p)F87$$\"34Q$ [)>&*oU7Fc[l$!3m)HY<9F,7$$ \"3E#3A6qySL\"Fc[l$!3HT&))>G$3H9F,7$$\"3=;T7EvSU8Fc[l$!3%*R`(H'zmN9F,7 $$\"3Oeq=bu`Y8Fc[l$!3U\\I@([&)pV\"F,7$$\"3K++D%Qn1N\"Fc[l$!3gRbFJ*opV \"F,7$$\"3GUHJ8tza8Fc[l$!3P2&)o**eeN9F,7$$\"3C%)ePUs#*e8Fc[l$!3`*H!38P !GV\"F,7$$\"3So<]+r=n8Fc[l$!3.ZVFO(4HU\"F,7$$\"3a_wiepWv8Fc[l$!3(=9*=y )>qS\"F,7$$\"3'zm\">ioi!R\"Fc[l$!31)>:@1t7O\"F,7$$\"3U$obdw1eS\"Fc[l$! 3=96-D!GEH\"F,7$$\"3Y$G\"H[Y?B9Fc[l$!3o-:EI^\\$=\"F,7$$\"3s$)o#3`-1W\" Fc[l$!3A'3g+i#=R5F,7$$\"3w(QoVSjhX\"Fc[l$!3anuq#[O(z()F87$$\"3-#*)4zFC 6%R%F87$$\"3y< ;V^l!\\]\"Fc[l$!37j7IxXdC:F87$$\"3^lB')ok%G^\"Fc[l$\"3gZ$zG\"Q3*y&!#C7 $$\"3D8JH'Q'y?:Fc[l$\"3qCNID&e?k\"F87$$\"3)4'Qs.jsG:Fc[l$\"3Q;&p6uotQ$ F87$$\"3\\3Y:@imO:Fc[l$\"3V6Bh=W*[C&F87$$\"3[c%ynu)>X:Fc[l$\"3'>)\\%)G P#)ptF87$$\"3C/BSs7t`:Fc[l$\"3._Vm(R(4K'*F87$$\"3+_h-)zjAc\"Fc[l$\"3%= 12H(3e.7F,7$$\"3+++lBjzq:Fc[l$\"3%\\$=H-/^e9F,-%'COLOURG6&%$RGBG$\"#5! \"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Ffgl-%%VIEWG6$;F($\"+Fjzq:!\"*%(DEFAU LTG" 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 49 "e:=evalf(int(f*Phi4/sq rt(1-X^2),X=-1..1)/alpha4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"eG$ \"+qe$p3\"!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "P4:=P3+e*P hi4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#P4G,,$\"+]r*42(!#5\"\"\"*&$ \"+$p7#[bF(F)%\"XGF)F)*&$\"+s/iz@F(F))F-\"\"#F)!\"\"*&$\"+$p8G\\&!#6F) )F-\"\"$F)F3*&$\"+qe$p3\"F7F))F-\"\"%F)F)" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 39 "p4:=evalf(expand(eval(P4,X=4/Pi*x-1)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#p4G,,$\")8%*Q6!#6\"\"\"*&$\"+$e*)G'**!#5F )%\"xGF)F)*&$\"+t1h^>F(F))F.\"\"#F)F)*&$\"+Qw=J?F-F))F.\"\"$F)!\"\"*&$ \"+toccGF(F))F.\"\"%F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "plot(p4-sin(x),x=0..Pi/2);" }}{PARA 13 "" 1 "" {GLPLOT2D 494 494 494 {PLOTDATA 2 "6%-%'CURVESG6$7er7$$\"\"!F)$\"3,++++8%*Q6!#@7$$\"3WN!zQ?h )zU!#?$\"3h8,3<>gO)*!#A7$$\"3)32exSA(f&)F0$\"3[g$G*[de`$)F37$$\"3s5P;h $eRG\"!#>$\"3ZDfs>UoQpF37$$\"3=9;b\"[W>r\"F<$\"3#ppE*o(R-f&F37$$\"3)z^ R>gI*R@F<$\"3m#))pwSvX?'3$F37$$\"3!\\ K:F%G!f*HF<$\"3#yIz_*4TF>F37$$\"3NGK5j*))QU$F<$\"3OPekE`o'G)!#B7$$\"3w dN%H$emoTF<$!3!zoGpv)fZ%*FX7$$\"3X')Qy-FW8\\F<$!3'\\CL_A***[DF37$$\"3' e@CEd>#ecF<$!3#\\HU[uT=*RF37$$\"3DXXYUk*HS'F<$!3aU,PMQ)3G&F37$$\"33$> \"QEfdSsF<$!3svHd%f4gb'F37$$\"3!4%yH5a:y!)F<$!3OQ*H#[j@cwF37$$\"3t)[9U *[t:*)F<$!3')4W\")=GW\"f)F37$$\"3=N68yVJ`(*F<$!3KSG&>.I8P*F37$$\"3Di)) pQx&R9\"!#=$!3yVrCW&*y]5F,7$$\"3%3h%eRSe78F^q$!3EVt9Yq^76F,7$$\"3#pzi> DSXN\"F^q$!3!**p$Qg6h?6F,7$$\"3I$)4Mkk\\'R\"F^q$!3y6axb\\,E6F,7$$\"3lp \">nn_%Q9F^q$!3aO23&HF)G6F,7$$\"3ubt4*))3/[\"F^q$!3'R:mzMX\"H6F,7$$\"3 $=av95lB_\"F^q$!3Wz'zQgkq7\"F,7$$\"3?GP&QJ@Vc\"F^q$!3LvI\"\\))yE7\"F,7 $$\"3b9>BEvF1;F^q$!3&G!\\le.3;6F,7$$\"3k+,hQPB[;F^q$!3?L\"R5bft5\"F,7$ $\"3!=^%=d)GQ!=F^q$!3%Ht'4()y%z0\"F,7$$\"3'H#*ed(RUf>F^q$!332&=bV%*)[) *F37$$\"3IESaq%HF^q$!33O=aPqSz ?F37$$\"3on$***=Q*y6$F^q$!3=&)e)R]W*e`FX7$$\"3)pq'4OKt)G$F^q$\"3P,KwN( Rn#)*FX7$$\"3twem(o3#RMF^q$\"3)HWzs,j'zAF37$$\"3#f/N#RTo*e$F^q$\"3e>uiVOXZF^q$\"3 '4EK_'H\\95F,7$$\"3%[IQ)4z@%*[F^q$\"3]D>*=c,K0\"F,7$$\"3Km()HU&=F)\\F^ q$\"3]*y_&33vq5F,7$$\"3CF#fZ<>72&F^q$\"3;baL&3DU3\"F,7$$\"39)o>s!)>(f^ F^q$\"3w\\D?d'RO4\"F,7$$\"31\\,oR/A[_F^q$\"31$oCL0A!*4\"F,7$$\"3,J7-%3 #>B`F^q$\"3\\6)4<#eX+6F,7$$\"3%HJi$GP;)R&F^q$\"3M$)yV!Ga!*4\"F,7$$\"3! \\R.FPNJZ&F^q$\"35PF)RL`[4\"F,7$$\"3uvW/`+eNeF37$$\"3(*zx.5Ir.sF^q$\"3)3gYRyo-s$F37$ $\"3[)G4iAl#etF^q$\"3y!*G)fW#*=p#F37$$\"3'pz!QUu\"G^(F^q$\"3*z&\\)eKB8 k\"F37$$\"33R4!o)G_zwF^q$\"3-nU()>\"=x%\\FX7$$\"3A\"3@7LGi%yF^q$!3Mw;) *GX*Q`'FX7$$\"30'*>EO%)Q>!)F^q$!3w7_/XNIM=F37$$\"3)3\"HIT&[D>)F^q$!3'[ ![%3fT'*)HF37$$\"3p#Rw<#\\GV$)F^q$!3+3\\#G0(*R'RF37$$\"3gv)\\AI@S\\)F^ q$!3)3#>b)>P+!\\F37$$\"3vn()=V,i>))F^q$!3?yq*>88>v'F37$$\"3'G:[dg&*f:* F^q$!3%yy(\\\"o&=`$)F37$$\"3sSt6rL2&[*F^q$!3[YXi?n&3a*F37$$\"3p-ka+KFW '*F^q$!3'44)\\f+'G'**F37$$\"3mka(*HIZ.)*F^q$!3W3W$[([xF5F,7$$\"3o9?&Q; b=*)*F^q$!3N:Y6Y=YS5F,7$$\"3gj&GxHP-)**F^q$!3ARi#eeS'\\5F,7$$\"3D60;V> 'o+\"!#<$!3cVcT_[Db5F,7$$\"3Em\"[l:+d,\"Facl$!3ck%*z]yDd5F,7$$\"3y%RsV oTO-\"Facl$!3]r*ofgYf0\"F,7$$\"3IBm>7KeJ5Facl$!3+t*\\`kp;0\"F,7$$\"3#= &3-SZ_R5Facl$!3,zB,wOTW5F,7$$\"3c!3XyEmu/\"Facl$!3]lyTnA[Uk5Facl$!3p1,$=P$Q\"3\"Facl$!3!Qg2_DN)p&*F37$$ \"3.M\"G%4t676Facl$!3G*)QIwkZ9%)F37$$\"3co*Q4i\\+p% F37$$\"3Qg$y7VcQ>\"Facl$!3)Rkq'*z.@\"Facl$!3?GX%)y L$yG#F37$$\"3I^RVVZ`E7Facl$!33#o@$>$[=.\"F37$$\"34Q$[)>&*oU7Facl$\"3?l es4:4mDFX7$$\"3qWugt?gf7Facl$\"3M39Fn]\"3i\"F37$$\"3I^lOFY^w7Facl$\"3k H?kS&)QyHF37$$\"3-m7uEM!GH\"Facl$\"3]JaXYy\\cUF37$$\"3`!)f6EA448Facl$ \"3_lToaXQ\"[&F37$$\"3O[+7w)\\dK\"Facl$\"3/6TY&yC=l'F37$$\"3=;T7EvSU8F acl$\"3\"zZynq$R4xF37$$\"3C%)ePUs#*e8Facl$\"3?_'H13b]h)F37$$\"3a_wiepW v8Facl$\"3VR$)3w.aW$*F37$$\"3'zm\">ioi!R\"Facl$\"3]6![F!y%*G)*F37$$\"3 U$obdw1eS\"Facl$\"36Yk:MI^55F,7$$\"3V$e*QOi:59Facl$\"3$zT!*R9eT,\"F,7$ $\"3W$[Bqq0XT\"Facl$\"3F(Hb4sld,\"F,7$$\"3X$Qdw\\h-`f_, \"F,7$$\"3Y$G\"H[Y?B9Facl$\"3IYdZbAc75F,7$$\"3[$3f&*e.>V\"Facl$\"3dn2O l(z-+\"F,7$$\"3s$)o#3`-1W\"Facl$\"3#*[m9q*zFy*F37$$\"3w(QoVSjhX\"Facl$ \"36[f*z^Xf7*F37$$\"3-#*)4zFCF37 $$\"3)4'Qs.jsG:Facl$\"3hDLf)oBW$[FX7$$\"3\\3Y:@imO:Facl$!3)o71%G=OR6F3 7$$\"3[c%ynu)>X:Facl$!3+m=#eIF37$$\"3C/BSs7t`:Facl$!3G]rNc#Qj;&F37 $$\"37GU@Nv*zb\"Facl$!3;4j;Q%))RH'F37$$\"3+_h-)zjAc\"Facl$!3izm0#)[6su F37$$\"37w!Q31Ilc\"Facl$!3u3)=]s#z,()F37$$\"3+++lBjzq:Facl$!31%)*y(=v5 %)**F3-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F`bm-%% VIEWG6$;F($\"+Fjzq:!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 85 "int(f^2/sqrt(1-X^2),X=-1..1)\n-a^2*alpha0-b^2*alpha1- c^2*alpha2-d^2*alpha3-e^2*alpha4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#, &-%$intG6$*&-%$sinG6#,$*(\"\"%!\"\"%#PiG\"\"\",&%\"XGF0F0F0F0F0\"\"#,& F0F0*$)F2F3F0F.#F.F3/F2;F.F0F0*&$\"+R******\\!#5F0F/F0F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"#>!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "evalf(sqrt(%/Pi));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+Bn\"ox(!#9 " }}}}{MARK "39" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }