{VERSION 3 0 "IBM INTEL NT" "3.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 
0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 
0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "f:=(t-4*b/3/Pi)^2*a*
sqrt(1-t^2/b^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG*(),&%\"tG\"
\"\"*&%\"bG\"\"\"%#PiG!\"\"#!\"%\"\"$\"\"#F,%\"aGF)-%%sqrtG6#,&F)F)*&*
$)F(F2F,F,*$)F+\"\"#F,F.!\"\"F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 22 "moment:=int(f,t=0..b);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'m
omentG-%&limitG6%,$*&*(%\"aG\"\"\")%\"bG\"\"#\"\"\",0**%\"tGF,),$*&,&*
$F-F0!\"\"*$)F3F/F0F,F0*$)F.\"\"#F0!\"\"F9#\"\"$F/F0)%#PiGF/F0-%%sqrtG
6#*&F0F0*$)F.\"\"#F0F?F0\"#=**F3F0-FE6#F5F0FBF0FDF0!\"**&-%'arctanG6#*
&*&FDF0F3F0F0*$-FE6#F5F0F?F,FBF0FO**F.F,F4F0FCF,FDF0!#k*(F3F0FMF0FDF0F
ZFQFZ*(F.F0FCF0FDF0\"#kF,F0*&)FC\"\"#F0-FE6#FGF0F?#F9\"#s/F3F.%%leftG
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "moment:=subs(a=2,b=4,mo
ment);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'momentG-%&limitG6%,$*&*&,
0**%\"tG\"\"\"),&F.F.*$)F-\"\"#\"\"\"#!\"\"\"#;#\"\"$F3F4)%#PiGF3F4-%%
sqrtG6#F7F4#\"\"*\"\")**F-F4-F=6#F0F4F:F4F<F4#!\"*F7*&-%'arctanG6#,$*&
*&F<F4F-F4F4*$-F=6#F0F4!\"\"#F.F7F.F:F4FF*(F/F4F;F.F<F4!#;*(F-F4FCF4F<
F4!\"%FH!#k*&F;F4F<F4F7F.F<F4F4*$)F;\"\"#F4FQ#FVF@/F-\"\"%%%leftG" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#$\"+!\\XW-(!\"*" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "4 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }