{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 86 "ds:=cos(v)*sqrt((b*c )^2*cos(u)^2*cos(v)^2+(a*c)^2*sin(u)^2*cos(v)^2+(a*b)^2*sin(v)^2);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dsG*&-%$cosG6#%\"vG\"\"\",(**)%\"bG \"\"#F*)%\"cGF/F*)-F'6#%\"uGF/F*)F&F/F*F***)%\"aGF/F*F0F*)-%$sinGF4F/F *F6F*F**(F8F*F-F*)-F " 0 "" {MPLTEXT 1 0 19 "assume(a,positive);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "ds1:=simplify(8*subs(b=1,a=1,c=Pi,ds),trig);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ds1G,$*(\"\")\"\"\"-%$cosG6#%\"vGF( ,(*&)%#PiG\"\"#F()F)F1F(F(F(F(*$F2F(!\"\"#F(F1F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "A:=expand(int(int(ds1,u=0..Pi/2),v=0..Pi/2)); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG,(*(\"\"#!\"\"%#PiG\"\"%,&*$ )F)F'\"\"\"F.F.F(#F(F'F.*&F'F.F)F.F.*(F+F/F)\"\"$-%'arctanG6#,&*&F.F.* $F+#F.F'F(F(*(F'F(F+F/F)F'F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "Pi*expand(b^2*subs(Pi=a/b,A/Pi));" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#*&%#PiG\"\"\",(**\"\"#!\"\"%\"bGF)%#a|irG\"\"$,&*&F+F (F*!\"#F%F%F)#F)F(F%*&F(F%)F*F(F%F%*(F+F(F-F0-%'arctanG6#,&*&F%F%*$F-# F%F(F)F%**F(F)F-F0F+F(F*F/F)F%F)F%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "ds1:=simplify(8*subs(b=1,a=1,c=1/Pi,ds),trig);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ds1G,$**\"\")\"\"\"-%$cosG6#%\"vGF( %#PiG!\"\",(*$)F)\"\"#F(F(*$)F-F2F(F(*&F4F(F1F(F.#F(F2F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "ds1:=simplify(8*subs(b=1,a=1,c=1/2, ds),trig);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ds1G,$*(\"\"%\"\"\"-% $cosG6#%\"vGF(,&*&\"\"$F()F)\"\"#F(!\"\"F'F(#F(F1F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "A:=expand(int(int(ds1,u=0..Pi/2),v=0..Pi/ 2));A1:=A;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG,&*&\"\"#\"\"\"%#P iGF(F(*&#F(\"\"'F(*(F)F(\"\"$#F(F'-%#ReG6#-%(arctanhG6#,$*(\"\"(F(\"#7 !\"\"F.F/F(F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#A1G,&*&\"\"#\" \"\"%#PiGF(F(*&#F(\"\"'F(*(F)F(\"\"$#F(F'-%#ReG6#-%(arctanhG6#,$*(\"\" (F(\"#7!\"\"F.F/F(F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "A1:=simplify(Pi*expand(b^2*subs(Pi=a/b,A/Pi)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#A1G,$*,%#PiG\"\"\"%\"bG\"\"#,&*(F*F(%#a|irGF(,$*&,&* $)F-F*F(!\"\"*$)F)F*F(F(F(F)!\"#F3#F(F*F3*&F)F(-%#ReG6#-%(arctanhG6#,$ *,F*F3F.#F3F*,&*&F*F(F2F(F3F4F(F(F)F3F-F3F(F(F(F(F-F3F.FAF3" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "e:=sqrt(a^2-b^2)/a;A2:=2*Pi* (a^2+b*a/e*arctanh(e)) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"eG*&,& *$)%#a|irG\"\"#\"\"\"F+*$)%\"bGF*F+!\"\"#F+F*F)F/" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#A2G,$*(\"\"#\"\"\"%#PiGF(,&*$)%#a|irGF'F(F(**%\"bGF( F-F',&F+F(*$)F/F'F(!\"\"#F3F'-%(arctanhG6#*&F0#F(F'F-F3F(F(F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "simplify(subs(a=1,b=1/2,[A1, A2,A1-A2]));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7%,$*&#\"\"\"\"\"'F'*& %#PiGF',&\"#7F'*&\"\"$#F'\"\"#-%#ReG6#-%(arctanhG6#,$*(\"\"(F'F,!\"\"F .F/F'F'F'F'F'F',$*&#F0F.F'*&F*F',&F.F'*&F.F/-F56#,$*&F0F:F.F/F'F'F'F'F 'F',$*&F&F'*(F*F'F.F/,&F1F'*&\"\"%F'FAF'F:F'F'F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "plot([arctanh(x),x/sqrt(1-x^2)],x=0..0.9,colo r=[red,blue]);" }}{PARA 13 "" 1 "" {GLPLOT2D 624 624 624 {PLOTDATA 2 " 6&-%'CURVESG6$7S7$$\"\"!F)F(7$$\"3s*****\\(Quh>!#>$\"3E<8=)e&*>'>F-7$$ \"3')***\\7tY'oOF-$\"3q Z*F-7$$\"3'***\\7VsmA6!#=$\"3/\\i#p')>u7\"FG7$$\"3*)**\\7)R&G28FG$\"3G ^$[N&)4[J\"FG7$$\"3-+]7ex@)\\\"FG$\"3l\"GiQ9\"e4:FG7$$\"3++]i&zP&)o\"F G$\"3jPA8xc'[q\"FG7$$\"3;++]Z`I%)=FG$\"3Wy3gkU42>FG7$$\"3#****\\P^Pn0# FG$\"3])*[c]x\\'3#FG7$$\"3+++]#Hb3D#FG$\"3'p>%)pQm+H#FG7$$\"3))****\\P ,xXCFG$\"3'*ohg?eO'\\#FG7$$\"3D++]2ngLEFG$\"3U[Ivj7;(p#FG7$$\"3(***\\7 3.=/GFG$\"3QDhgDsN\")GFG7$$\"3#)****\\<)3q+$FG$\"3wF?%3#)**G5$FG7$$\"3 %*******p6$)yJFG$\"3EWS*e,0HH$FG7$$\"3%)**\\789qyLFG$\"3L:m'*=C'o^$FG7 $$\"3_*****\\W?cb$FG$\"3tL,-^W'zr$FG7$$\"3')**\\7j'G(\\PFG$\"3$o.0\"o5 (>%RFG7$$\"3M+]P*elX$RFG$\"3W@ui.;$)eTFG7$$\"3<++DJNUFTFG$\"3eM(=R!>7* Q%FG7$$\"3'***\\iDt_/VFG$\"3Sq/%)eC_/YFG7$$\"3o***\\Ppdb\\%FG$\"34R@J \"*QVT[FG7$$\"3[**\\7eX)Rp%FG$\"3)He9;:&)H4&FG7$$\"3W**\\(os:n'[FG$\"3 6v0AMg*oJ&FG7$$\"3u***\\77qK0&FG$\"3a1#=%=EMkbFG7$$\"3!******\\1**fC&F G$\"3Wk-7LFlEeFG7$$\"3&****\\itYXV&FG$\"3mis!oX_/4'FG7$$\"3u**\\7.j(ph &FG$\"3Y0k\"ef)4`jFG7$$\"3U***\\PBL&>eFG$\"3')**[2^F6amFG7$$\"3:***** \\kR:+'FG$\"3u02D[y(Q$pFG7$$\"39++]P.(e>'FG$\"3oq2&=JXLC(FG7$$\"3e**\\ 7GG'>P'FG$\"3Jd+r]DRMvFG7$$\"3_++]K%yWc'FG$\"3[nf=z*ea'yFG7$$\"3i**\\7 81iXnFG$\"39qt7wen!>)FG7$$\"3!***\\i&Qm\\$pFG$\"3'RvAV#)4ma)FG7$$\"3<* ***\\(['3?rFG$\"3+(**GhzgC\"*)FG7$$\"3O**\\7y+*QJ(FG$\"3w<())QEvqJ*FG7 $$\"3!*******pfa+vFG$\"3([^ANz)zI(*FG7$$\"3I++vy&G9p(FG$\"3mfo;!oD#=5! #<7$$\"3u+]7$eI2)yFG$\"3'3mFt5Ej1\"Fcx7$$\"3w*****\\YzY0)FG$\"3Dy(p\"p !*)R6\"Fcx7$$\"3g***\\P^WSD)FG$\"3'**GQ^NUN<\"Fcx7$$\"3b*******)*eBV)F G$\"3-,JQ1zEK7Fcx7$$\"3V+]78%zCi)FG$\"3)eKvs5U?I\"Fcx7$$\"3`**\\(o\"*[ W!))FG$\"3O%RA\\7VxP\"Fcx7$$\"3A+++++++!*FG$\"3O?Ke*[>AZ\"Fcx-%'COLOUR G6&%$RGBG$\"*++++\"!\")F(F(-F$6$7UF'7$F+$\"3cNPdm97i>F-7$F1$\"3uHIAO!= 6n$F-7$F6$\"31\"yzwe$)pf&F-7$F;$\"3t&='=o3\">a(F-7$F@$\"3UTLKj$yg[*F-7 $FE$\"3VhtNy(4)H6FG7$FK$\"31&=4.P,'=8FG7$FP$\"3'*H`0e6K::FG7$FU$\"3_$) )y;`OJr\"FG7$FZ$\"3!G6T>]v'=>FG7$Fin$\"3mc0KC*p;5#FG7$F^o$\"3kg!zGmN,J #FG7$Fco$\"34#*3e%*\\PADFG7$Fho$\"3SRJv`?)*HFFG7$F]p$\"30]%=*)[#R@HFG7 $Fbp$\"3KP\\o)>JH:$FG7$Fgp$\"39Ejm&*zt_LFG7$F\\q$\"3]L[s4#3)*e$FG7$Faq $\"3(*\\EG[d@/QFG7$Ffq$\"3\"zp!f)ee[/%FG7$F[r$\"3arkNfqvzUFG7$F`r$\"3H T!R(y%39`%FG7$Fer$\"35!yNmhh*oZFG7$Fjr$\"3!)=T&[T(zK]FG7$F_s$\"36iZe9B .;`FG7$Fds$\"3)Q`fAyp4d&FG7$Fis$\"3uH-yw%ef&eFG7$F^t$\"3;M*4p%\\)>;'FG 7$Fct$\"3il!G1(f-ukFG7$Fht$\"3Ik0\"*y\"y\"*y'FG7$F]u$\"372%H`rTh:(FG7$ Fbu$\"3uI@Vqx+.vFG7$Fgu$\"3)HWc)=Gb$*yFG7$F\\v$\"3=^jZ,Nun#)FG7$Fav$\" 3VwOYN$=>q)FG7$Ffv$\"3^^0SgjqP\"*FG7$F[w$\"3M>%>B#)\\di*FG7$F`w$\"3nzC \"f8Fcx7$F_y$\"3#*4JvJ% y?Y\"Fcx7$Fdy$\"31F?^mMoo:Fcx7$Fiy$\"3^[!z'*z5Cq\"Fcx7$$\"3)******\\;k Mr)FG$\"3#4f!y:e$ex\"Fcx7$F^z$\"3A'o]a&p*o&=Fcx7$$\"3))*\\P%eWA-*)FG$ \"3I:\"H\"QLFa>Fcx7$Fcz$\"3Uc]$[gTZ1#Fcx-Fhz6&FjzF(F(F[[l-%+AXESLABELS G6$Q\"x6\"Q!Fael-%%VIEWG6$;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" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "plot([arcsin(x),2*x],x=0..1,color=[ red,blue]);" }}{PARA 13 "" 1 "" {GLPLOT2D 624 624 624 {PLOTDATA 2 "6&- %'CURVESG6$7U7$$\"\"!F)F(7$$\"3emmm;arz@!#>$\"3q`%*\\c!)))z@F-7$$\"3[L L$e9ui2%F-$\"3O%omw%QSxSF-7$$\"3nmmm\"z_\"4iF-$\"3%piP/[\\J@'F-7$$\"3[ mmmT&phN)F-$\"39[r%pzCfO)F-7$$\"3CLLe*=)H\\5!#=$\"3[Y&*f,LB^5FB7$$\"3g mm\"z/3uC\"FB$\"3k%3+D\"fm]7FB7$$\"3%)***\\7LRDX\"FB$\"3Q-LwFipd9FB7$$ \"3]mm\"zR'ok;FB$\"3i-,?nCZs;FB7$$\"3w***\\i5`h(=FB$\"3%z;47!yL()=FB7$ $\"3WLLL3En$4#FB$\"3^qKAX$y#4@FB7$$\"3qmm;/RE&G#FB$\"3a*pCn[PcI#FB7$$ \"3\")*****\\K]4]#FB$\"3G^()HbSyFDFB7$$\"3$******\\PAvr#FB$\"3c1*fEAL@ v#FB7$$\"3)******\\nHi#HFB$\"3E_s5osopHFB7$$\"3jmm\"z*ev:JFB$\"3#>Ie(= r]oJFB7$$\"3?LLL347TLFB$\"3<#3nDFImS$FB7$$\"3,LLLLY.KNFB$\"3K5[kB1$*4O FB7$$\"3w***\\7o7Tv$FB$\"3!zwsQd/%[QFB7$$\"3'GLLLQ*o]RFB$\"33Tk9G*G91% FB7$$\"3A++D\"=lj;%FB$\"3UR=4qEU(H%FB7$$\"31++vV&RVzFdgp) \\FB7$$\"3cmm;/T1&*\\FB$\"3%*z\\_6#*GI_FB7$$\"3&em;zRQb@&FB$\"3]m@'\\! 4r'[&FB7$$\"3\\***\\(=>Y2aFB$\"3B2#\\9GRKr&FB7$$\"39mm;zXu9cFB$\"3[H4N ,cmhfFB7$$\"3l******\\y))GeFB$\"3Sbp]lPzAiFB7$$\"3'*)***\\i_QQgFB$\"3w ](\\u\\zI['FB7$$\"3@***\\7y%3TiFB$\"3h!erL#***)RnFB7$$\"35****\\P![hY' FB$\"3\\Pl2^GQJqFB7$$\"3kKLL$Qx$omFB$\"3Y%>v^'>d*H(FB7$$\"3!)*****\\P+ V)oFB$\"3Yt<%GhAKf(FB7$$\"3?mm\"zpe*zqFB$\"3KWBnjJcmyFB7$$\"3%)*****\\ #\\'QH(FB$\"3!QF659ZU<)FB7$$\"3GKLe9S8&\\(FB$\"3wwr\\wrEt%)FB7$$\"3R** *\\i?=bq(FB$\"39(4&3nY1(z)FB7$$\"3\"HLL$3s?6zFB$\"3hI/jM4RE\"*FB7$$\"3 a***\\7`Wl7)FB$\"3Aj7*)H$Gp[*FB7$$\"3#pmmm'*RRL)FB$\"3O!**p^O0A&)*FB7$ $\"3Qmm;a<.Y&)FB$\"3W,sYyhyC5!#<7$$\"3=LLe9tOc()FB$\"3kEqp5Evm5Fcx7$$ \"3u******\\Qk\\*)FB$\"3(4j\\nO^$36Fcx7$$\"3CLL$3dg6<*FB$\"3w:$f5P%yg6 Fcx7$$\"3ImmmmxGp$*FB$\"3WR2GAst87Fcx7$$\"3A++D\"oK0e*FB$\"3EB*3))\\I, G\"Fcx7$$\"3C+++]oi\"o*FB$\"3%e\"=RzOy<8Fcx7$$\"3A++v=5s#y*FB$\"3m1'*) )zk&>O\"Fcx7$$\"35+]P40O\"*)*FB$\"3/%e9**oeKU\"Fcx7$$\"\"\"F)$\"3c'*[z Ejzq:Fcx-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-F$6$7SF'7$F+$\"39LLLL3VfV F-7$F1$\"3'pmm;H[D:)F-7$F6$\"3LLLLe0$=C\"FB7$F;$\"3ILLL3RBr;FB7$F@$\"3 Ymm;zjf)4#FB7$FF$\"3=LL$e4;[\\#FB7$FK$\"3p****\\i'y]!HFB7$FP$\"3,LL$ez s$HLFB7$FU$\"3_****\\7iI_PFB7$FZ$\"3#pmmm@Xt=%FB7$Fin$\"3QLLL3y_qXFB7$ F^o$\"3i******\\1!>+&FB7$Fco$\"3()******\\Z/NaFB7$Fho$\"3'*******\\$fC &eFB7$F]p$\"3ELL$ez6:B'FB7$Fbp$\"3Smmm;=C#o'FB7$Fgp$\"3-mmmm#pS1(FB7$F \\q$\"3]****\\i`A3vFB7$Faq$\"3slmmm(y8!zFB7$Ffq$\"3V++]i.tK$)FB7$F[r$ \"39++](3zMu)FB7$F`r$\"3#pmm;H_?<*FB7$Fer$\"3emm;zihl&*FB7$Fjr$\"39LLL 3#G,***FB7$F_s$\"3Fcx7$Fcz$\"3/++ v.Uac>Fcx7$F][l$\"\"#F)-Fb[l6&Fd[lF(F(Fe[l-%+AXESLABELSG6$Q\"x6\"Q!Fae l-%%VIEWG6$;F(F][l%(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 0 "" }}}}{MARK "13 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }