{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 } {CSTYLE "" 0 21 "" 0 1 0 0 0 1 0 0 0 0 2 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 "Text Output" -1 6 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 2 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 "Map le 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 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 24 "Standard Worksheet SSSPF" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 9 "Heint IIa" }}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 57 "Physical quatities are defined in th e initialization file" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "grt s();" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%=GRTensorII~Version~1.79~(R4) G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%06~February~2001G" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#%ZDeveloped~by~Peter~Musgrave,~Denis~Pollney~and ~Kayll~LakeG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%DCopyright~1994-2001~ by~the~authors.G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%inLatest~version~ available~from:~http://grtensor.phy.queensu.ca/G" }}{PARA 6 "" 1 "" {TEXT -1 32 "Created definition for G(up,dn) " }}{PARA 6 "" 1 "" {TEXT -1 26 "Created definition for rho" }}{PARA 6 "" 1 "" {TEXT -1 26 "Created definition for Iso" }}{PARA 6 "" 1 "" {TEXT -1 24 "Created definition for p" }}{PARA 6 "" 1 "" {TEXT -1 34 "Created definition f or gthetatheta" }}{PARA 6 "" 1 "" {TEXT -1 38 "Created definition for \+ R(dn,dn,up,up) " }}{PARA 6 "" 1 "" {TEXT -1 27 "Created definition for mass" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%FD:/Xitami/webpages/GRTensor J/MetricssG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "qload(heintz );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%2Default~spacetimeG%'heintzG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%:For~the~heintz~spacetime:G" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#%,CoordinatesG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%\"xG6#%#upG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6&/)%#x~ G%\"1G%#xiG/)F%%\"2G%&thetaG/)F%%\"3G%$phiG/)F%%\"4G%\"tG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%-Line~elementG" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#/*$)%$~dsG\"\"#\"\"\",**0%\"RGF',(%&alphaG\"\"$\"\"(!\"\"*$)%#xi GF'F(F(F(*&,(F-F.F/F0*&\"\"%F(F2F(F(F(,&F-F.F/F0F(#F(F'F-F(,,*&-%%sqrt G6#F4F()F-F'F(\"\"'*(\"#9F(F " 0 "" {MPLTEXT 1 0 24 "grcalcd(Iso,rho,p,mass);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%*CPU~Time~G$\"$,#!\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%:For~the~heintz~spacetime:G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# %$IsoG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%$IsoG%8All~components~are~ zeroG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%$rhoG" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#/%$rhoG,$*0,(%&alphaG\"\"$\"\"(!\"\"*$)%#xiG\"\"#\"\"\" F0!\"$,^o**F-F0-%%sqrtG6#*&,&F(F0F0F+F0,&F(F)F*F+F0F0-F56#F)F0F(F0\"'W J'***\"$P'F0)*&,(F(F)F*F+*&\"\"%F0F-F0F0F0F9F0#F)F/F0F-F0F(F0F0**\"'#* 4YF0F-F0F4F0F:F0F+**\"&Z8$F0F4F0F:F0)F(\"\"&F0F+**\"(Bc,\"F0F4F0F:F0F( F0F+**\"'5r=F0F4F0F:F0)F(FCF0F0**\"#:F0)F.FCF0F?F0)F(F/F0F0**\"'3k:F0F RF0F4F0F:F0F0*,\"'kcLF0)F(F)F0F-F0F4F0F:F0F0*,\"'%Q/)F0FSF0F-F0F4F0F:F 0F+*,\"'&fh\"F0FRF0FSF0F4F0F:F0F0*,\"'\\(f#F0FRF0F(F0F4F0F:F0F+*(\"%B8 F0F?F0FSF0F0*(\"%H5F0F?F0F(F0F+*(\"'oLSF0F4F0F:F0F0**FCF0)F.\"\"'F0F?F 0F(F0F0**F)F0F-F0)F@#FJF/F0F(F0F0**\"$<\"F0F-F0F?F0FXF0F0*(\"#\")F0F?F 0FOF0F0*,\"%F2F " 0 "" {MPLTEXT 1 0 28 "pj:=subs(grcomponent(p,[])):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "p1:=subs(R=1,alpha=6,pj): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "p2:=subs(R=1,alpha=5,pj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "p3:=subs(R=1,alpha=4,pj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "p4:=subs(R=1,alpha=3,pj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 84 "plot([p1,p2,p3,p4],xi=0..1,color=[r ed,green,blue,black],title=\"Pressure Heint IIa\");" }}{PARA 13 "" 1 " " {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$\"\"!F)$\"3X^a \\lVQ$\"3$*oXE[t!Rr&F,7$$\"3[LL$e9ui2%F0$\"3y&[ byDG_q&F,7$$\"3nmmm\"z_\"4iF0$\"3I`#o4p&>*o&F,7$$\"3[mmmT&phN)F0$\"3oN \"Q8:ujm&F,7$$\"3CLLe*=)H\\5!#=$\"3M?\\Z7x.PcF,7$$\"3gmm\"z/3uC\"FE$\" 35$*H`3Q(Rg&F,7$$\"3%)***\\7LRDX\"FE$\"3EQ7BDm$Qc&F,7$$\"3]mm\"zR'ok;F E$\"3.cLsH\"og^&F,7$$\"3w***\\i5`h(=FE$\"3eVpkas=iaF,7$$\"3WLLL3En$4#F E$\"3F_P)QS=.S&F,7$$\"3qmm;/RE&G#FE$\"3n#40#RF[S`F,7$$\"3\")*****\\K]4 ]#FE$\"3S'oV,]DsE&F,7$$\"3$******\\PAvr#FE$\"3#z_w?L([(=&F,7$$\"3)**** **\\nHi#HFE$\"3j&*4;:P*[5&F,7$$\"3jmm\"z*ev:JFE$\"3K(H,]e%4D]F,7$$\"3? LLL347TLFE$\"3CwLS(Q*QC\\F,7$$\"3,LLLLY.KNFE$\"39-Rp*4WU$[F,7$$\"3w*** \\7o7Tv$FE$\"3)GzgGvURs%F,7$$\"3'GLLLQ*o]RFE$\"3[-]6I!\\:i%F,7$$\"3A++ D\"=lj;%FE$\"3)ev$=!e5U]%F,7$$\"31++vV&RY2aFE$\"3UgXd=nfNPF,7$$\"39mm;zXu9cFE$\"3CL!4K5jJf$F,7$$\"3l*** ***\\y))GeFE$\"3dsUS9,CUMF,7$$\"3'*)***\\i_QQgFE$\"3Qkm!e]_5H$F,7$$\"3 @***\\7y%3TiFE$\"3+%Rw!zGgTJF,7$$\"35****\\P![hY'FE$\"3?V@)pd2A(HF,7$$ \"3kKLL$Qx$omFE$\"3RH<[/x1F,7$$\"3\"HLL$3s?6zFE$\"3GH%)GI#>A\"=F,7$$\"3a***\\7`Wl7)FE$\"3kAYL DewI;F,7$$\"3#pmmm'*RRL)FE$\"3!p[+^50WX\"F,7$$\"3Qmm;a<.Y&)FE$\"3-'y)3 7*)fs7F,7$$\"3=LLe9tOc()FE$\"37<\">]x:54\"F,7$$\"3u******\\Qk\\*)FE$\" 3$\\WAcdc)H(F`y7$$\"3ImmmmxGp$*FE $\"3Mtbjh(z7c&F`y7$$\"3A++D\"oK0e*FE$\"3UA;7(prIq$F`y7$$\"3A++v=5s#y*F E$\"3ME\">Hrb)>>F`y7$$\"\"\"F)$\"3kx$*>L!#N-%'COLOURG6&%$RGBG$\"* ++++\"!\")F(F(-F$6$7S7$F($\"3q%ydqAj#*e*F,7$F.$\"3wSe:nv*He*F,7$F4$\"3 kac?u*ftc*F,7$F9$\"3XRi66>[Q&*F,7$F>$\"3+X(pB\"\\R(\\*F,7$FC$\"3mXAi'H 7YW*F,7$FI$\"3%ye#p%Qo^Q*F,7$FN$\"3HG-9`@28$*F,7$FS$\"3l?o)H;gtA*F,7$F X$\"3=:fOo/!38*F,7$Fgn$\"3$zx'yz@3?!*F,7$F\\o$\"3zvDKs:;8*)F,7$Fao$\"3 S6u+W3Z#y)F,7$Ffo$\"3VPW\\1W[S')F,7$F[p$\"3%yYD#zdq$\\)F,7$F`p$\"3%p3V mnv@N)F,7$Fep$\"3-tC)3#G'R<)F,7$Fjp$\"3TL[v`;\"[,)F,7$F_q$\"38!\\:4yb0 #yF,7$Fdq$\"36wgxh&*pSwF,7$Fiq$\"3w/:g#f_^V(F,7$F^r$\"3@%*f%42]V.oF,7$F]s$\"3mMWAQ#))=d'F,7$Fbs$ \"3;!f+^r1WK'F,7$Fgs$\"3(***G1(33N5'F,7$F\\t$\"3y&)[-+9bfeF,7$Fat$\"3 \"y`!R4Y,-cF,7$Fft$\"3IL>\"HX<]M&F,7$F[u$\"3u&*QL@.&>4&F,7$F`u$\"3G`k3 VEG1[F,7$Feu$\"3'p@=A%4vXXF,7$Fju$\"3W%\\hZ=LRE%F,7$F_v$\"33hLci'Hc+%F ,7$Fdv$\"3zdCDZ\"*Q?PF,7$Fiv$\"3K'f*yoJg\\MF,7$F^w$\"3EgA]KASkJF,7$Fcw $\"3oz=5\\)eP)GF,7$Fhw$\"39RlDHaP)e#F,7$F]x$\"3(*o.T'\\\"o-BF,7$Fbx$\" 36w_kXbh4?F,7$Fgx$\"3R[29TQQ=V )HF`y7$Ffz$\"3#>ZZese'*)eFjz-F\\[l6&F^[lF(F_[lF(-F$6$7S7$F($\"3#z**yo \\?&z>F07$F.$\"3/G:3;N/y>F07$F4$\"3!>csEUeV(>F07$F9$\"3))QL=`sbn>F07$F >$\"3Kr)*=C**)y&>F07$FC$\"3U9ad&f'[X>F07$FI$\"3,csA`#R:$>F07$FN$\"3SsB g[Nl9>F07$FS$\"3IHDJg>i%*=F07$FX$\"3a>Ys+66s=F07$Fgn$\"3uev45APY=F07$F \\o$\"3ayUd\\(*e@=F07$Fao$\"3A%oIpn&R\"z\"F07$Ffo$\"3?ThOEOre\"F07$F \\t$\"3$H!eW1fmV6F07$Fat$\"3MO0j\\63*3\"F07$Fft$\"3)4'3>ep+N5F07$F[u$ \"3ucXPFtX@)*F,7$F`u$\"3!=UWbIW$H#*F,7$Feu$\"3W'o()o>wNp)F,7$Fju$\"3Y4 u\\B**e=\")F,7$F_v$\"3K9.,`at&f(F,7$Fdv$\"35rPK\\Q(H-(F,7$Fiv$\"3A*))[ L?BP['F,7$F^w$\"3k9BE6V\\?fF,7$Fcw$\"3M#Hy\"\\h+r`F,7$Fhw$\"3eO0[mXu(z %F,7$F]x$\"3y'R`5(4E[UF,7$Fbx$\"3)3wd_a#p*o$F,7$Fgx$\"36s*[)zeuRJF,7$F \\y$\"3lXt*[:M%QEF,7$Fby$\"3O@^ZvY@p?F,7$Fgy$\"3S(3!R)QCac\"F,7$F\\z$ \"3jnMH#p:V.\"F,7$Faz$\"3?\\+kBbZA`F`y7$Ffz$\"3'GsFwvs0P%Fjz-F\\[l6&F^ [lF(F(F_[l-F$6$7S7$F($\"3z8gs]FcHsF07$F.$\"38K](pne>A(F07$F4$\"3)p#yD& 4/I?(F07$F9$\"3a7r'=-)3orF07$F>$\"3(Q=^w50'=rF07$FC$\"3)\\ekcNq`0(F07$ FI$\"3Q#y/'G6g%)pF07$FN$\"3%HdF*yrR**oF07$FS$\"3)=\"Qq)R))*)z'F07$FX$ \"3!er*yD6,(o'F07$Fgn$\"3S*G$)3Qz+c'F07$F\\o$\"3S5uKU['*QkF07$Fao$\"37 *=*yRh%GH'F07$Ffo$\"3WQZdUEXOhF07$F[p$\"3EjP.'*)4t(fF07$F`p$\"3ymrrYnC EeF07$Fep$\"3x2Wtk\"*HRcF07$Fjp$\"3q***[xfl`Z&F07$F_q$\"3S>uT7k/z_F07$ Fdq$\"3BF07$F_v$\"3q%*)R'H&p^9#F07$Fdv $\"37l5gFHSe>F07$Fiv$\"3g!oY[S/ky\"F07$F^w$\"3+;_*3[)p5;F07$Fcw$\"3\\n m!p>EJW\"F07$Fhw$\"3aXU&*p/Ks7F07$F]x$\"3\"ea)[@-U76F07$Fbx$\"3J)36g=B o`*F,7$Fgx$\"3i[#e4*e>6!)F,7$F\\y$\"31ycP*p4Dl'F,7$Fby$\"3'[_1p$[hY^F, 7$Fgy$\"3'z\")*)\\ccj%QF,7$F\\z$\"33T43Whb3DF,7$Faz$\"3#)Q.Qr#G\\F\"F, 7$Ffz$\"3y7d))zETXgFjz-F\\[l6&F^[lF)F)F)-%&TITLEG6#Q3Pressure~Heint~II a6\"-%+AXESLABELSG6$Q#xiF^hmQ!F^hm-%%VIEWG6$;F(Ffz%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "C urve 3" "Curve 4" }}}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 20 "Energy \+ density plots" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "rhoj:=subs (grcomponent(rho,[])):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "r ho1:=subs(R=1,alpha=6,rhoj): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "rho2:=subs(R=1,alpha=5,rhoj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "rho3:=subs(R=1,alpha=4,rhoj):" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 29 "rho4:=subs(R=1,alpha=3,rhoj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 98 "plot([rho1,rho2,rho3,rho4],xi=0..1, color=[red,green,blue,black],title=\"Energy Density Heint IIa\");" }} {PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$ $\"\"!F)$\"3'=!*Gfsocz%!#>7$$\"3emmm;arz@F,$\"3#[Vwi_n[z%F,7$$\"3[LL$e 9ui2%F,$\"3;2U:sy'Gz%F,7$$\"3nmmm\"z_\"4iF,$\"3_;^q.\\<*y%F,7$$\"3[mmm T&phN)F,$\"3?GhO1-#Ry%F,7$$\"3CLLe*=)H\\5!#=$\"3%QJa*y*orx%F,7$$\"3gmm \"z/3uC\"FD$\"3K1!G))pk&pZF,7$$\"3%)***\\7LRDX\"FD$\"3[xR4'RS.w%F,7$$ \"3]mm\"zR'ok;FD$\"3)HWn<'=P\\ZF,7$$\"3w***\\i5`h(=FD$\"3H,(=YD7qt%F,7 $$\"3WLLL3En$4#FD$\"3Yiz8sk$Gs%F,7$$\"3qmm;/RE&G#FD$\"3l$*[1vG94ZF,7$$ \"3\")*****\\K]4]#FD$\"3E)oJ0S*R#p%F,7$$\"3$******\\PAvr#FD$\"3e>,H\"e ,Un%F,7$$\"3)******\\nHi#HFD$\"3s*zf')R\"QbYF,7$$\"3jmm\"z*ev:JFD$\"3c jawHgAPYF,7$$\"3?LLL347TLFD$\"3G*=m?<`Vh%F,7$$\"3,LLLLY.KNFD$\"33uC*o< :Rf%F,7$$\"3w***\\7o7Tv$FD$\"3i+)[rb`*oXF,7$$\"3'GLLLQ*o]RFD$\"3#4*eC& REea%F,7$$\"3A++D\"=lj;%FD$\"36f?6qhP>XF,7$$\"31++vV&RY2aFD$\"3+!)Qi>*RuM%F,7$$\"39mm;zXu9cFD$\"3@'y\\ z$y\"eJ%F,7$$\"3l******\\y))GeFD$\"39tY#\\S)Q#G%F,7$$\"3'*)***\\i_QQgF D$\"3iK&GiDy*[UF,7$$\"3@***\\7y%3TiFD$\"3Lm&\\F$o-;UF,7$$\"35****\\P![ hY'FD$\"3))[7iQ\\wyTF,7$$\"3kKLL$Qx$omFD$\"3tK3^yxrWTF,7$$\"3!)*****\\ P+V)oFD$\"3Dh!3ki(=m)QF,7$$\"3#pmmm'*RRL)FD$\"3E)G(*4'*[&[QF,7$ $\"3Qmm;a<.Y&)FD$\"35V48QPP4QF,7$$\"3=LLe9tOc()FD$\"3#z4PI42'F,7$F8$\"3%e++T\"=mkgF,7$F=$\"3'HMQ\"3%[d0'F,7$FB $\"3'RHLQ^1V/'F,7$FH$\"3%pQ$elBVJgF,7$FM$\"3EX8$3jMe,'F,7$FR$\"3YU9'fs 9t*fF,7$FW$\"3es')Rl8[wfF,7$Ffn$\"3O'zv]aKE&fF,7$F[o$\"3\\6=V#HT'HfF,7 $F`o$\"3,2Mdu4f,fF,7$Feo$\"3ovjMx1=reF,7$Fjo$\"3Igs%)yO\")ReF,7$F_p$\" 3zZpkLXj4eF,7$Fdp$\"3K.KlVXsrdF,7$Fip$\"3\"HV\")34azt&F,7$F^q$\"37+')o ;7%op&F,7$Fcq$\"3WMrNI&y)ecF,7$Fhq$\"3UAN#)oS$[&F,7$F\\s$\"3!o#*>lZ@_V&F ,7$Fas$\"3u:ipvH)QQ&F,7$Ffs$\"3'3.A[S$>Q`F,7$F[t$\"3)zDm?#y(yG&F,7$F`t $\"3`:1Dm&>\\B&F,7$Fet$\"3]8d;F*GA=&F,7$Fjt$\"38Y'H%H;\\I^F,7$F_u$\"3! >rQ%Q(eA2&F,7$Fdu$\"3V#[V*>+I>]F,7$Fiu$\"3+Sav,(o@'\\F,7$F^v$\"3%fH=Op Q*4\\F,7$Fcv$\"31m#HP!QS_[F,7$Fhv$\"3M$\\a+(\\\"zz%F,7$F]w$\"3r%eR+ya1 u%F,7$Fbw$\"3#HEId!3V%o%F,7$Fgw$\"3iFO#**Gu`i%F,7$F\\x$\"3[=5(49j$oXF, 7$Fax$\"3rJ)G%>8)*4XF,7$Ffx$\"3_5=O>`0_WF,7$F[y$\"31Sp?Bc%))R%F,7$F`y$ \"38u:Hw6$zL%F,7$Fey$\"3C.dT0Db$G%F,7$Fjy$\"3+#f@D!HsDUF,7$F_z$\"3kF!p Bd`0<%F,7$Fdz$\"3DI1a'p-:6%F,-Fiz6&F[[lF(F\\[lF(-F$6$7S7$F($\"3q$fLwQ$ Q&Q)F,7$F.$\"3;)*p@+Y`#Q)F,7$F3$\"3o9\"H^0HaP)F,7$F8$\"3!4\"[_![BBO)F, 7$F=$\"3uE\\l'\\8PM)F,7$FB$\"3$\\yV_Oo)>$)F,7$FH$\"3c\\[Pqs4$H)F,7$FM$ \"3uT'G:tX2E)F,7$FR$\"3JMWC13XA#)F,7$FW$\"3#)*4'yNO_z\")F,7$Ffn$\"3c.: d)Qy08)F,7$F[o$\"3m*30X\"))e$3)F,7$F`o$\"3/'HNJA^mF,7$Fjt$\"3SZup$R_#elF,7$F_u$\"3i3._,%4XX'F,7$Fdu$\"3%pl!e60&4O'F,7 $Fiu$\"3EGY$QDZ3E'F,7$F^v$\"3K3or@12qhF,7$Fcv$\"3M=nx\\r(32'F,7$Fhv$\" 3O(o?u'*)pxfF,7$F]w$\"3#)z]&[7p0)eF,7$Fbw$\"3AkDc-(pfy&F,7$Fgw$\"3K/)* Q;cT(o&F,7$F\\x$\"3K(p&3?40$f&F,7$Fax$\"3Ea:0m_>(\\&F,7$Ffx$\"3=PTcXS& GS&F,7$F[y$\"3KlaSfm&oJ&F,7$F`y$\"3#[bZZlu\">_F,7$Fey$\"3(>t\\wHcE8&F, 7$Fjy$\"3A&\\k?]W8/&F,7$F_z$\"3#R.^eH%*[&\\F,7$Fdz$\"3'**o&e0x1j[F,-Fi z6&F[[lF(F(F\\[l-F$6$7S7$F($\"3NT)\\VR<@T\"FD7$F.$\"3jVaIN(\\6T\"FD7$F 3$\"3Tyh8*fR(39FD7$F8$\"3.f$3-52VS\"FD7$F=$\"3=4\"33?T!)R\"FD7$FB$\"31 N46x01!R\"FD7$FH$\"3AON%>!R;\"Q\"FD7$FM$\"3]%e62V+0P\"FD7$FR$\"3M_uM]& **zN\"FD7$FW$\"3/q5gk'RTM\"FD7$Ffn$\"3ILNo-\"H&G8FD7$F[o$\"361D$f))HPJ \"FD7$F`o$\"3Kh.RF_*fH\"FD7$Feo$\"3E)pVad_rF\"FD7$Fjo$\"3YR7_0$>\"e7FD 7$F_p$\"3?CiM&3x,C\"FD7$Fdp$\"36!=E=\"=8=7FD7$Fip$\"3a/13()o$*)>\"FD7$ F^q$\"3EB)H$*y1h<\"FD7$Fcq$\"3/!)e'*Rx_b6FD7$Fhq$\"3aBsq7OjK6FD7$F]r$ \"3l/KtU6g56FD7$Fbr$\"3!3akNNYu3\"FD7$Fgr$\"3'*z-'G0%4m5FD7$F\\s$\"3ED %R#[x-V5FD7$Fas$\"3T5)\\&)Q\"4>5FD7$Ffs$\"3mm&\\y1+K)**F,7$F[t$\"3_Hz( H>!)*f(*F,7$F`t$\"3%[?GCu75`*F,7$Fet$\"3L-h)[<5!4$*F,7$Fjt$\"3gu?+O=T' 4*F,7$F_u$\"3-Vox'>DK'))F,7$Fdu$\"3?g)[#G'Hll)F,7$Fiu$\"3P9e,l$R!R%)F, 7$F^v$\"3,9&*=))R*\\C)F,7$Fcv$\"3x&4%RA-KO!)F,7$Fhv$\"3sEnHSsTVyF,7$F] w$\"3!=?\"egF, 7$F_z$\"3wl?*f2(G1fF,7$Fdz$\"3G'*R(Q$=EZdF,-Fiz6&F[[lF)F)F)-%&TITLEG6# Q9Energy~Density~Heint~IIa6\"-%+AXESLABELSG6$Q#xiF[hmQ!F[hm-%%VIEWG6$; F(Fdz%(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" }}}}{EXCHG {PARA 0 "" 0 " " {MPLTEXT 0 21 10 "Mass plots" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "mj:=subs(grcomponent(mass,[])):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "mj1:=subs(R=1,alpha=6,mj): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "mj2:=subs(R=1,alpha=5,mj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "mj3:=subs(R=1,alpha=4,mj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "mj4:=subs(R=1,alpha=3,mj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 84 "plot([mj1,mj2,mj3,mj4],xi=0..1,colo r=[red,green,blue,black],title=\"Mass Heint IIa\");" }}{PARA 13 "" 1 " " {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$\"\"!F)F(7$$\" 3emmm;arz@!#>$\"3WMDs>^9!3#!#B7$$\"3[LL$e9ui2%F-$\"3C()Rx;_6g8!#A7$$\" 3nmmm\"z_\"4iF-$\"37]&)o\\1([![F67$$\"3[mmmT&phN)F-$\"3/+g%G2i.<\"!#@7 $$\"3CLLe*=)H\\5!#=$\"3JQ(zur0aJ#FA7$$\"3gmm\"z/3uC\"FE$\"3!40nPmPj)QF A7$$\"3%)***\\7LRDX\"FE$\"3)pPV'po0HhFA7$$\"3]mm\"zR'ok;FE$\"3EYF0%>!4 8#*FA7$$\"3w***\\i5`h(=FE$\"3LF:^u*QoJ\"!#?7$$\"3WLLL3En$4#FE$\"3hmti$ *yrE=Ffn7$$\"3qmm;/RE&G#FE$\"3k\\:;c(\\8P#Ffn7$$\"3\")*****\\K]4]#FE$ \"3HcBQG>\\,JFfn7$$\"3$******\\PAvr#FE$\"3)p%Hl(p2(pRFfn7$$\"3)****** \\nHi#HFE$\"3h)*=Xf@cyBsEK5F-7$$\"3'GLLLQ*o]RFE$\"3gUtAtyP*>\"F-7$$\"3A+ +D\"=lj;%FE$\"3$*[7xmcw,9F-7$$\"31++vV&RY2aFE$\"3ko$ye!*HL*HF-7$$\"39mm;zXu9cFE$\"3nW(R,L\\gL$F-7$$\"3l* *****\\y))GeFE$\"3fRh'Q2P[r$F-7$$\"3'*)***\\i_QQgFE$\"3i$oYB4\\-6%F-7$ $\"3@***\\7y%3TiFE$\"3K(G(G(Qym^%F-7$$\"35****\\P![hY'FE$\"3sU9+0:$f* \\F-7$$\"3kKLL$Qx$omFE$\"3!))z*oXG4_aF-7$$\"3!)*****\\P+V)oFE$\"3oOrw9 zAmfF-7$$\"3?mm\"zpe*zqFE$\"3E3l-iyeckF-7$$\"3%)*****\\#\\'QH(FE$\"3Cc qy&*Hj>qF-7$$\"3GKLe9S8&\\(FE$\"3!=()ea'[RvvF-7$$\"3R***\\i?=bq(FE$\"3 M'f-W68N=)F-7$$\"3\"HLL$3s?6zFE$\"3bC'>V6^^!))F-7$$\"3a***\\7`Wl7)FE$ \"3/[J?'[i[[*F-7$$\"3#pmmm'*RRL)FE$\"32K\"FE7$$\"3ImmmmxGp$ *FE$\"3Cj=#zeL$*R\"FE7$$\"3A++D\"oK0e*FE$\"3m:-^'fxf[\"FE7$$\"3A++v=5s #y*FE$\"39jLtuyjr:FE7$$\"\"\"F)$\"3emmmmmmm;FE-%'COLOURG6&%$RGBG$\"*++ ++\"!\")F(F(-F$6$7SF'7$F+$\"3J7wY?#p_j#F07$F2$\"36DqeR&RHs\"F67$F8$\"3 #[[M=()fc3'F67$F=$\"3)o<-/_-?[\"FA7$FC$\"32cEF585JHFA7$FI$\"30d?\"RFfn7 $Fgo$\"3P7\\(*pbH.]Ffn7$F\\p$\"3\\&eL,<'pEiFfn7$Fap$\"3I+P9X/8$\\(Ffn7 $Ffp$\"3Rry&QK=I?*Ffn7$F[q$\"3#>NQj$GR$3\"F-7$F`q$\"3[>B')[<@&H\"F-7$F eq$\"3DW$eqx0M]\"F-7$Fjq$\"3_oh1yX6bLE(zA\"=BF-7$Fir$\"3&[I<0I$)oh#F-7$F^s$\"3GCxh]#o\\'HF-7$Fcs$\"3)oXTt eXcN$F-7$Fhs$\"3c&fJS_V/s$F-7$F]t$\"3/l!3lr139%F-7$Fbt$\"3])\\f`auVg%F -7$Fgt$\"3!3;F\\Q#=(3&F-7$F\\u$\"3'=!e4g&>Be&F-7$Fau$\"3-Hp*okyZ;'F-7$ Ffu$\"39GxPc2$yr'F-7$F[v$\"3e%\\;pop'RtF-7$F`v$\"3YpS)R*y\"FE7$Faz$\"3;FR)\\Iy$*)=FE7$ Ffz$\"3#)**************>FE-F[[l6&F][lF(F^[lF(-F$6$7SF'7$F+$\"3Ae2#=xCo j$F07$F2$\"3kx6j%fWtP#F67$F8$\"3M%3Y=QAWR)F67$F=$\"3&[&yii8JV?FA7$FC$ \"3t&=*yk()*)QSFA7$FI$\"3/ur-@U_snFA7$FN$\"3kzHOR;\"o1\"Ffn7$FS$\"3y?s R$*=N,;Ffn7$FX$\"3?XLz'f._G#Ffn7$Fhn$\"3%fdJ*4!yU;$Ffn7$F]o$\"3r%GV$y2 ^+TFfn7$Fbo$\"3CFq%437;N&Ffn7$Fgo$\"3d(4^6dbQ$oFfn7$F\\p$\"3Y9uI!*pN\" \\)Ffn7$Fap$\"3cm0Z\\F-7$F]t$\"3;2'[uGQ@\\&F- 7$Fbt$\"3Ow`!*Qp!34'F-7$Fgt$\"3Bt&*>BLu6nF-7$F\\u$\"3YZh3L?%fM(F-7$Fau $\"3CF\">,\\&z)3)F-7$Ffu$\"3/2'ear26z)F-7$F[v$\"3kDOq8ITx&*F-7$F`v$\"3 s'QQDETA.\"FE7$Fev$\"3Fn@R$)y@<6FE7$Fjv$\"3]iPFi%H0?\"FE7$F_w$\"35MuU] f2\"H\"FE7$Fdw$\"35m>@rK+$Q\"FE7$Fiw$\"3K$H\"=\\3#G[\"FE7$F^x$\"3)38sR \"*)Q#e\"FE7$Fcx$\"39I%)y'[hwo\"FE7$Fhx$\"3'3hD%G;Z&z\"FE7$F]y$\"3g5y( )3w\\(*=FE7$Fby$\"3*[jc-yty,#FE7$Fgy$\"3f+EV%G9'G@FE7$F\\z$\"3I=Oo)pQ) \\AFE7$Faz$\"3O3xO*\\n)oBFE7$Ffz$\"3++++++++DFE-F[[l6&F][lF(F(F^[l-F$6 $7SF'7$F+$\"3kkM/FUABhF07$F2$\"3\")ef2*)>g+SF67$F8$\"3d.#f=mq7T\"FA7$F =$\"3E%)RS`4eIMFA7$FC$\"3ssfBlEFfn7$FX$\"3m2))Q%QO\"FE7$Ffu$\"3+q;* f&G\"=H\"FE7$F[v$\"3kFD!3l/$)R\"FE7$F`v$\"3Q#zL>-(G)\\\"FE7$Fev$\"3Nw$ p#eCI6;FE7$Fjv$\"3PrT;Or4@FE7$Fiw$\"3!p#=^V>O'3#FE7$F^x$\"3M?(pj'G\"H@#FE7$Fcx$\"3MHk+yX_XBFE7$ Fhx$\"3)pk&\\zr7![#FE7$F]y$\"38=_%[4Pkg#FE7$Fby$\"3I1A'R+)=aFFE7$Fgy$ \"3!p#p\"RLY*))GFE7$F\\z$\"3s\\dB0,CNIFE7$Faz$\"3]#*>c;apxJFE7$Ffz$\"3 :LLLLLLLLFE-F[[l6&F][lF)F)F)-%&TITLEG6#Q/Mass~Heint~IIa6\"-%+AXESLABEL SG6$Q#xiFdgmQ!Fdgm-%%VIEWG6$;F(Ffz%(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" }}}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 8 "Trapping" }}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 25 "Potential impac parameter" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 89 "B:=radsimp(sqrt(grcomponent( g(dn,dn),[theta,theta]))/sqrt(-grcomponent(g(dn,dn),[t,t])));" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG*,%\"RG\"\"\"%#xiGF',(%&alphaG\" \"$\"\"(!\"\"*$)F(\"\"#F'F'F-,&F*F+F,F-F0*&F)F'F1F'#F-F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "Bj:=subs(R=1,B):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "B1:=subs(alpha=3.0,Bj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "B2:=subs(alpha=2.9,Bj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "B3:=subs(alpha=2.8,Bj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "B4:=subs(alpha=2.7,Bj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "plot([B1,B2,B3,B4],xi=0.1..1,color=[red,g reen,blue,black],title=\"Trapping Heint IIa\");" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$\"3/+++++++5!#=$ \"3(Hs@4.ma#**!#>7$$\"3)*****\\(Quh>\"F*$\"3s.Er%y^M=\"F*7$$\"3/+]7tY' oO\"F*$\"3?#Hij'G$zM\"F*7$$\"3+++D^P#)e:F*$\"37lf>-/%3`\"F*7$$\"3!**** \\(e_0_F*$\"3?_>=y<^!*=F*7$$\"3) )**\\7VsmA@F*$\"3!ey!yRW!H0#F*7$$\"3%***\\7)R&G2BF*$\"3g\"=q6rN\"=AF*7 $$\"33+]7ex@)\\#F*$\"3or!*fC;o&Q#F*7$$\"31+]i&zP&)o#F*$\"3s&4=\\70\"\\ DF*7$$\"3A++]Z`I%)GF*$\"3A3m;#3lKr#F*7$$\"3o***\\P^Pn0$F*$\"35_zkX5RaG F*7$$\"31++]#Hb3D$F*$\"3\\,IGO'>#4IF*7$$\"3%*****\\P,xXMF*$\"3iX:C:m@g JF*7$$\"3.++]2ngLOF*$\"3V[vm'=e8I$F*7$$\"3I+]73.=/QF*$\"3^pOIR=rDMF*7$ $\"3g****\\<)3q+%F*$\"3g=$3UJW(oNF*7$$\"3E+++q6$)yTF*$\"3%>Ir8YCdo$F*7 $$\"3;+]789qyVF*$\"3)pa%R>-*o\"QF*7$$\"3I*****\\W?cb%F*$\"3!yLu*4[`GRF *7$$\"3?+]7j'G(\\ZF*$\"3o2I_$zih/%F*7$$\"3n+]P*elX$\\F*$\"3;o5&QO]WF*7$$\"3E**\\7eX)Rp&F*$\"39#y(*fgO^a %F*7$$\"3?**\\(os:n'eF*$\"3C\\7o=eIBYF*7$$\"3_***\\77qK0'F*$\"3[,$f6WR Kq%F*7$$\"3o*****\\1**fC'F*$\"3)R`Y)=&p4y%F*7$$\"3t***\\itYXV'F*$\"3se !\\5)GI_[F*7$$\"3^**\\7.j(ph'F*$\"3n'[o,x\\p\"\\F*7$$\"3?***\\PBL&>oF* $\"33So>#ptP)\\F*7$$\"3#*)****\\kR:+(F*$\"3^3pQe)\\%R]F*7$$\"3%*****\\ P.(e>(F*$\"3GXOtGOU%4&F*7$$\"3Q**\\7GG'>P(F*$\"3V2,N[@LS^F*7$$\"3I++]K %yWc(F*$\"3Estp!3qj=&F*7$$\"3Q**\\781iXxF*$\"3To\\Fb@#eA&F*7$$\"3n**\\ i&Qm\\$zF*$\"3'p@8M%z:j_F*7$$\"3&*)***\\(['3?\")F*$\"35NdMjz!fH&F*7$$ \"39**\\7y+*QJ)F*$\"3&*efkoYLE`F*7$$\"3n******pfa+&)F*$\"3'>okka??N&F* 7$$\"31++vy&G9p)F*$\"3!eq'4EStu`F*7$$\"3_+]7$eI2)))F*$\"3)fM]\"y$GQR&F *7$$\"3a*****\\YzY0*F*$\"3[psg&*QY3aF*7$$\"3O***\\P^WSD*F*$\"3^knI U&F*7$$\"3L*******)*eBV*F*$\"3'\\2d!\\n4JaF*7$$\"3@+]78%zCi*F*$\"3Cmw% >y&)zV&F*7$$\"3J**\\(o\"*[W!)*F*$\"3?ssbs;!>W&F*7$$\"\"\"\"\"!$\"3ct\" =&R0JVaF*-%'COLOURG6&%$RGBG$\"*++++\"!\")$FfzFfzF`[l-F$6$7S7$F($\"3L1@ hr!4C\"**F-7$F/$\"31K(zX-I7=\"F*7$F4$\"3Q*>r!4tjW8F*7$F9$\"3rfK)[.*)f_ \"F*7$F>$\"3m1,7j)[cq\"F*7$FC$\"3#4CB5el7)=F*7$FH$\"3?<\"RIq*)4/#F*7$F M$\"3U\"3S7y)*H?#F*7$FR$\"3s9\"f[O)pmBF*7$FW$\"3$*4z&\\\")[d_#F*7$Ffn$ \"3M50L@p%F*7$F_u$\"3TvMV\"*e&[u%F*7$Fdu$\"37^-*H02yy%F*7$Fi u$\"3NKl2]#f\"H[F*7$F^v$\"3K\"3TBkAF'[F*7$Fcv$\"3qFSg_KH&*[F*7$Fhv$\"3 oDB!e[H@#\\F*7$F]w$\"3K_x*>Zkj%\\F*7$Fbw$\"3k3weuyTm\\F*7$Fgw$\"3a\"R9 h'zp$)\\F*7$F\\x$\"3]&H#y8u)o*\\F*7$Fax$\"3(4Pw\\z7q+&F*7$Ffx$\"3_`\"4 `+OQ,&F*7$F[y$\"3>[VY%e*R<]F*7$F`y$\"3+PaZQwV=]F*7$Fey$\"3@\"3TRdLn,&F *7$Fjy$\"3)*)>$*oI4B,&F*7$F_z$\"3$H)HZaZn0]F*7$Fdz$\"3;\"QW0/hg*\\F*-F jz6&F\\[lF`[lF][lF`[l-F$6$7S7$F($\"3Y&=Kr'e!Q*)*F-7$F/$\"3?Uo/=\"o!y6F *7$F4$\"3%4pt\"3E&*R8F*7$F9$\"3l:q_>G5>:F*7$F>$\"3-:fVF*7$Fet$\"3'3&Ql\")\\ciVF*7$Fjt$\"3)pG[NT_$*R%F*7$F_u$ \"3C_b@B/9NWF*7$Fdu$\"3%)HzzU[\"HY%F*7$Fiu$\"3)HXBd>i\")[%F*7$F^v$\"3T ;'o')3ds]%F*7$Fcv$\"3q(GEzU$=CXF*7$Fhv$\"3zvJA9#)\\OXF*7$F]w$\"3gA+GuD zXXF*7$Fbw$\"31uNnzQ]^XF*7$Fgw$\"3St%oBCzSb%F*7$F\\x$\"3#H&)=7#=V`XF*7 $Fax$\"3g)Q`*\\5w\\XF*7$Ffx$\"3Pk1vdoFVXF*7$F[y$\"3^s6Jb4&o4XF*7$Fjy$\"3'yb2n$*=N\\%F*7$F_z$\"3#H ,f:tigZ%F*7$Fdz$\"3#3^^c#>GbWF*-Fjz6&F\\[lF`[lF`[lF][l-F$6$7S7$F($\"3s NG#=op^')*F-7$F/$\"3aR-l+#4K<\"F*7$F4$\"3(*)[4)=fwK8F*7$F9$\"3ybgVe=c3 :F*7$F>$\"3w\"o\"F*7$FC$\"3G#y'fa+F[=F*7$FH$\"3w.tCS)>')*>F*7$FM $\"3Ol=#oB!Q\\@F*7$FR$\"39sJ].cu*H#F*7$FW$\"3V(=%e@.vVCF*7$Ffn$\"3'=Qn 1g;be#F*7$F[o$\"3CGaGF9)[q#F*7$F`o$\"3U!H@NtXH$GF*7$Feo$\"3o?mB)f#paHF *7$Fjo$\"3_(G$o$*=XlIF*7$F_p$\"3wAmn+ATgJF*7$Fdp$\"31p2*eIbjE$F*7$Fip$ \"3O/>k\"z!>]LF*7$F^q$\"3n#f>v5O4W$F*7$Fcq$\"3S\"3%H\\dC:NF*7$Fhq$\"3# *emn]@P!f$F*7$F]r$\"3=2+\"3H%zbOF*7$Fbr$\"3!=P()4%Q$yr$F*7$Fgr$\"3'*Qb .5`MpPF*7$F\\s$\"3vto;7*3#>QF*7$Fas$\"3ki)*z4Z$\\'QF*7$Ffs$\"3I*G53At) **QF*7$F[t$\"3xp-7kJqKRF*7$F`t$\"3s?,voXZhRF*7$Fet$\"3)Gx!*Qh-n&)RF*7$Fax$\"3i1t%RF*7$F[y$ \"3 " 0 "" {MPLTEXT 1 0 102 "V:=1/((Bj^2))*(6+4*Pi*xi^2*R^2*(grcomponent(rho,[])- grcomponent(p,[]))-6*grcomponent(mass,[])/(xi*R)):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "Vj:=subs(R=1,V):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "V1:=subs(alpha=2.9,Vj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "V2:=subs(alpha=2.8,Vj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "V3:=subs(alpha=2.7,Vj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "V4:=subs(alpha=2.6,Vj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 89 "plot([V1,V2,V3,V4],xi=0.5..1.0,color=[red,green,bl ue,black],title=\"w - modes Heint IIa\");" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$\"3++++++++]!#=$ \"3a'3bC(e$eE$!#;7$$\"30LL$3x&)*3^F*$\"31RKv7sppJF-7$$\"3\"om\"H2P\"Q? &F*$\"3G[Z/bcG\"4$F-7$$\"3hLLeRwX5`F*$\"3raD=(*z[3IF-7$$\"3YLL3x%3yT&F *$\"3@V&GVQw/$HF-7$$\"35n;z%4\\Y_&F*$\"3;x(eR,ax&GF-7$$\"3eL$eR-/Pi&F* $\"3Q(HE,(>S%z#F-7$$\"31+]il'pis&F*$\"3Jl8i?%[Et#F-7$$\"3)HLe*)>VB$eF* $\"3'\\7zMH?En#F-7$$\"3:+]7`l2QfF*$\"3-t%G@;2kh#F-7$$\"3Gnm;/j$o/'F*$ \"3=LU_mc5iDF-7$$\"3zKL3_>jUhF*$\"3\">NXX-Yq^#F-7$$\"3!*****\\i^Z]iF*$ \"3m1/!>VG#pCF-7$$\"3U****\\(=h(ejF*$\"3-*HaJhCTU#F-7$$\"3E++]P[6jkF*$ \"3U8j/[yC$Q#F-7$$\"3wK$e*[z(yb'F*$\"3S#efk!=?[BF-7$$\"3Kmm;a/cqmF*$\" 3.6Zzb-&*3BF-7$$\"3%fmmmJF -7$$\"3Kmmm\"p)=M$)F*$\"3ug(pCF-7$$\"3N****\\(=]@W)F*$\"3SVk.8$eP %>F-7$$\"35L$e*[$z*R&)F*$\"3f6?xcQyL>F-7$$\"3#*****\\iC$pk)F*$\"3KO=B& e*zB>F-7$$\"3el;H2qcZ()F*$\"3Acn@PCD:>F-7$$\"3q**\\7.\"fF&))F*$\"3_pS. Be;2>F-7$$\"3Ymm;/Ogb*)F*$\"3H&)\\F(Qp+!>F-7$$\"3y**\\ilAFj!*F*$\"3cf? VA&pM*=F-7$$\"3!HLLL)*pp;*F*$\"3s%)pb(f*)y)=F-7$$\"3kKL3xe,t#*F*$\"3Su 2Kmn%H)=F-7$$\"3em;HdO=y$*F*$\"3;'RSyZ%yy=F-7$$\"3))*****\\#>#[Z*F*$\" 3?2,TI2fv=F-7$$\"31mmT&G!e&e*F*$\"3-p?n%)Gls=F-7$$\"3gKLL$)Qk%o*F*$\"3 =*R1L&=mq=F-7$$\"37+]iSjE!z*F*$\"3+n'4r%Q=p=F-7$$\"35+]P40O\"*)*F*$\"3 ))3pn:tPo=F-7$$\"\"\"\"\"!$\"3'H1$)\\bd\"o=F--%'COLOURG6&%$RGBG$\"*+++ +\"!\")$FfzFfzF`[l-F$6$7S7$F($\"3K1mRi?t)\\$F-7$F/$\"3iR;nF$o^S$F-7$F4 $\"3!\\sP.*o0HLF-7$F9$\"3;)*[]9L\"*[KF-7$F>$\"3))R]ZxkktJF-7$FC$\"3S1w x-)HP5$F-7$FH$\"3Me,5Mf/VIF-7$FM$\"3O![(HIS7%)HF-7$FR$\"39l>>k#*4FHF-7 $FW$\"3#*=X,6o&R(GF-7$Ffn$\"3?gbFD`*G#GF-7$F[o$\"3Azw8e*e2y#F-7$F`o$\" 3T[z/h8JOFF-7$Feo$\"3%4pJN(pn%p#F-7$Fjo$\"3)p$eZ;hAdEF-7$F_p$\"38p`kSB ODEF-7$Fdp$\"3]g'z4U%)**e#F-7$Fip$\"3_P@jAv.iDF-7$F^q$\"3i=ikFytJDF-7$ Fcq$\"3oH%Qzm+o]#F-7$Fhq$\"39BDWC@P\"[#F-7$F]r$\"3e&4))*=j%*eCF-7$Fbr$ \"3(pN(G+vJPCF-7$Fgr$\"3W([$[(Qv*=CF-7$F\\s$\"3`+!z(e$\\2S#F-7$Fas$\"3 YYKhI^X$Q#F-7$Ffs$\"3Iw7r!\\,(pBF-7$F[t$\"3-H7JB?:cBF-7$F`t$\"3$oKXmd@ NM#F-7$Fet$\"3)))paPidCL#F-7$Fjt$\"3_xX+xQ#HK#F-7$F_u$\"3z8/*38QOJ#F-7 $Fdu$\"3J$eS(G,U1BF-7$Fiu$\"371$ffx[)*H#F-7$F^v$\"3g+qO0X([H#F-7$Fcv$ \"3oZ@\\7%p/H#F-7$Fhv$\"3;K!ep)3G(G#F-7$F]w$\"3I)GkbJ5\\G#F-7$Fbw$\"3? _N(>V]wz$F-7$F4$\"3Ot`'f9?hs$F-7$F9$\"3)Q>X*>/F^OF-7$F>$\"3#Qe$* =a'[\"e$F-7$FC$\"3')4!*4dH=hE$F-7$F[o $\"3%[*4caE))HKF-7$F`o$\"3q5!G+LYA>$F-7$Feo$\"3eT]_D[jdJF-7$Fjo$\"3'Qo E(p!Hr7$F-7$F_p$\"3l1lUNas,JF-7$Fdp$\"3!o9I+^AU2$F-7$Fip$\"3C[X/6Q6`IF -7$F^q$\"3\"Ho^9yk4.$F-7$Fcq$\"3'fh=DR@M,$F-7$Fhq$\"3!\\&4\"y$=I'*HF-7 $F]r$\"3U)GEt(G)>)HF-7$Fbr$\"3%z/Dnv=!pHF-7$Fgr$\"3-xwPO?#)eHF-7$F\\s$ \"31x'Q!)o(e\\HF-7$Fas$\"3z9!4hIj=%HF-7$Ffs$\"3n'*oA=VjOHF-7$F[t$\"3g, O'R-)\\KHF-7$F`t$\"37#*3u]5#)HHF-7$Fet$\"3-;DBIF-7$Ffx$\"3?*pT-QwZ.$F-7$F[y$\"3eEso&[,+0$F-7$F`y $\"3]W'\\&))3hoIF-7$Fey$\"3MVd.KNH'3$F-7$Fjy$\"32%4aS!f@1JF-7$F_z$\"36 y%z^P3j7$F-7$Fdz$\"31a+!\\53!\\JF--Fjz6&F\\[lF`[lF`[lF][l-F$6$7S7$F($ \"3J4!R#\\@YVYF-7$F/$\"33o9\"QPOwc%F-7$F4$\"3I?KOAWT2XF-7$F9$\"3SY6YXo lXWF-7$F>$\"3I%4,j*4Y*Q%F-7$FC$\"3a^lnfp4RVF-7$FH$\"3%*e+Q=a)zD%F-7$FR$\"3neAl]@2AUF-7$FW$\"35=d8E&y0>%F-7$Ffn$\"3o\"z.M PGC;%F-7$F[o$\"3i=-!GtA59%F-7$F`o$\"3QQK\\N=a?TF-7$Feo$\"3(3`k&3cl.TF- 7$Fjo$\"3!Rfrqg924%F-7$F_p$\"3?K&)p9.o\"3%F-7$Fdp$\"3ku&=)Q71kX2%F-7$F]r$\"3=(\\^TnG53%F-7$Fbr$\"3#fgY)\\5K!4%F-7$Fgr$\"3)oWr$ fg3,TF-7$F\\s$\"3?\\Dq/T.:TF-7$Fas$\"3ZP[1P1.KTF-7$Ffs$\"3w[/\\$*H')[T F-7$F[t$\"3]]Z$pUI\"pTF-7$F`t$\"3Q,neNbI#>%F-7$Fet$\"3YDGz_49=0WI%F-7$Fiu$\"3 )*y<#f@p&QVF-7$F^v$\"3uzmAC3PrVF-7$Fcv$\"3;4;DF2A4WF-7$Fhv$\"3'RtmwC=n W%F-7$F]w$\"3+w>(R>ay[%F-7$Fbw$\"340ET%pz*HXF-7$Fgw$\"3'\\Pv-k$4wXF-7$ F\\x$\"38hoq'yYCi%F-7$Fax$\"3EW&=@x8=n%F-7$Ffx$\"3@Ue!3#4tAZF-7$F[y$\" 3s\">pS]P7x%F-7$F`y$\"3g6ymAo&)G[F-7$Fey$\"3unv7emA#)[F-7$Fjy$\"3K7$\\ 7IT5%\\F-7$F_z$\"3GL0KZh=**\\F-7$Fdz$\"3u`t>jdpj]F--Fjz6&F\\[lFfzFfzFf z-%&TITLEG6#Q4w~-~modes~Heint~IIa6\"-%+AXESLABELSG6$Q#xiF]hmQ!F]hm-%%V IEWG6$;$\"\"&!\"\"$\"#5Fihm%(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" }}}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 22 "V:=sqrt(dp/dr/drho/dr) " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "vs:=sqrt(diff(grcompone nt(p,[]),xi)/(diff(grcomponent(rho,[]),xi))):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "vsj:=subs(R=1,vs):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "vs1:=subs(R=1,alpha=6,vsj): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "vs2:=subs(R=1,alpha=5,vsj):" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 27 "vs3:=subs(R=1,alpha=4,vsj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "vs4:=subs(R=1,alpha=3,vsj):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 81 "plot([vs1,vs2,vs3,vs4],xi=0. .1,color=[red,green,blue,black],title=\"V Heint IIa\");" }}{PARA 13 " " 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7fn7$$\"3`**** *\\n5;\"o!#@$\"3+v6-QId(e'!#=7$$\"3#******\\8ABO\"!#?$\"3mg%\\^rtve'F- 7$$\"33+++-K[V?F1$\"3)\\?%pV[d(e'F-7$$\"3#)******pUkCFF1$\"3/V=lBkd(e' F-7$$\"3s*****\\Smp3%F1$\"3SOVyP4e(e'F-7$$\"3k******R&)G\\aF1$\"3?$p*[ dse(e'F-7$$\"3Y******4G$R<)F1$\"3%HgvKJ0we'F-7$$\"3%******zqd)*3\"!#>$ \"3yWQ4!fIwe'F-7$$\"3*)*****>c'yM;FP$\"3K=LL,Gq(e'F-7$$\"3')*****fT:(z @FP$\"338*el(Q!ye'F-7$$\"3#*******zZ*z7$FP$\"3Wyii?&[!)e'F-7$$\"33+++X TFwSFP$\"3;QF$pN!Q)e'F-7$$\"3&******4z_\"4iFP$\"3_VTq\">W%*e'F-7$$\"3o ******R&phN)FP$\"3u?el\"4c4f'F-7$$\"3++++*=)H\\5F-$\"3#GtWfT&*Gf'F-7$$ \"3%******z/3uC\"F-$\"3U.(G,\\v]f'F-7$$\"35+++J$RDX\"F-$\"3uV\"oQ%Qr(f 'F-7$$\"37+++)R'ok;F-$\"3S#)\\n)=U3g'F-7$$\"3-+++1J:w=F-$\"3`!e\\ZabVg 'F-7$$\"33+++3En$4#F-$\"3$o%e2?'p$3mF-7$$\"3-+++/RE&G#F-$\"3v/@lB6B7mF -7$$\"3\")*****\\K]4]#F-$\"3C&z;D(3$ph'F-7$$\"3$******\\PAvr#F-$\"33^& )*z56?i'F-7$$\"3)******\\nHi#HF-$\"3!)y[\")RSBFmF-7$$\"3*)*****p*ev:JF -$\"3'f\"od'*=CKmF-7$$\"3$)*****z!47TLF-$\"35)4s)Gs]QmF-7$$\"3?+++LY.K NF-$\"3(>v#R:L1WmF-7$$\"3u*****4o7Tv$F-$\"3#)3q%eb$z]mF-7$$\"31+++$Q*o ]RF-$\"3!>Yh[:tpl'F-7$$\"3?+++\"=lj;%F-$\"31H!oopsRm'F-7$$\"3++++V&R

Y2aF-$\"3mY)3v1Zvq'F-7$$\"3\\+ ++yXu9cF-$\"3=T)GUGl^r'F-7$$\"3d******[y))GeF-$\"3O_@S]J2BnF-7$$\"3.++ +i_QQgF-$\"3P#y76J@3t'F-7$$\"3A+++!y%3TiF-$\"3E?%*4)e0$QnF-7$$\"35+++O ![hY'F-$\"35FHZ0LdYnF-7$$\"3I+++#Qx$omF-$\"3=t#[zJRRv'F-7$$\"3s*****RP +V)oF-$\"3!zi:Fn6lz'F-7 $$\"3a+++IXaE\")F-$\"3/cy'F-7$FY$\"3-zljE>x&y'F-7$Fhn$\"3%>,oE%49'y 'F-7$F]o$\"3gC/g#QTmy'F-7$Fbo$\"3!)[o&\\+X#)y'F-7$Fgo$\"3g1S\"\\4A0z'F -7$F\\p$\"3i(Q()RdRMz'F-7$Fap$\"3'eS0dp9nz'F-7$Ffp$\"3ro4u==n+oF-7$F[q $\"3+8](\\ea`!oF-7$F`q$\"35ogR\\:g5oF-7$Feq$\"3[D*o;T!e;oF-7$Fjq$\"3P5 eT-eJAoF-7$F_r$\"3FLi<=WFHoF-7$Fdr$\"34^gJ.!pn$oF-7$Fir$\"3%36e$RQWWoF -7$F^s$\"3Mny*p@t<&oF-7$Fcs$\"3#=:V<],4'oF-7$Fhs$\"3QkD3)*o&*ooF-7$F]t $\"31!*z,6MmyoF-7$Fbt$\"3s+MO6\\_()oF-7$Fgt$\"3W+^sJ9](*oF-7$F\\u$\"3% \\aXtE7s!pF-7$Fau$\"34]x\"H.Cv\"pF-7$Ffu$\"3zC'>.b>r#pF-7$F[v$\"3TJet' )ecPpF-7$F`v$\"3)*)4^(>&y%[pF-7$Fev$\"3%Ro9^q#*z&pF-7$Fjv$\"3C5zV9aCop F-7$F_w$\"3s%G-?-r(ypF-7$Fdw$\"3uV')zT3'*))pF-7$Fiw$\"3W[WJQ&z')*pF-7$ F^x$\"3G\\+<@EE4qF-7$Fcx$\"30'RAsyW&=qF-7$Fhx$\"3xg'Gl/v\"GqF-7$F]y$\" 3QjSKz]hOqF-7$Fby$\"3igmB()3\\XqF-7$Fgy$\"3];)\\lgqM0(F-7$F\\z$\"3A&oM A?)QhqF-7$Faz$\"3s!4L:#RnoqF-7$Ffz$\"3=y[l%>!yvqF-7$F[[l$\"3C*z$H+O3#3 (F-7$F`[l$\"3#)p.:.T%z3(F-7$Fe[l$\"3cLe:kb8$4(F-7$Fj[l$\"3e8KRR8L(4(F- 7$F_\\l$\"36?Mgv&G95(F-7$Fd\\l$\"3u)3.8I>W5(F-7$Fi\\l$\"3%>qy!Gf(o5(F- 7$F^]l$\"3S&3h6@\"\\3rF-7$Fc]l$\"3E?tPjOR4rF--Fi]l6&F[^lF_^lF\\^lF_^l- F$6$7fn7$F($\"3m*[>c2!4+sF-7$F/$\"3q\"*[!>(>4+sF-7$F5$\"3!G9oB8&4+sF-7 $F:$\"3**=1*pb*4+sF-7$F?$\"3Q>9g)>7,?(F-7$FD$\"3Mr\"Rk*)H,?(F-7$FI$\"3 @lo+f/=+sF-7$FN$\"3kaU#*R7D+sF-7$FT$\"3#**z&>GMX+sF-7$FY$\"3;N?(\\QO2? (F-7$Fhn$\"3XSH]>5U,sF-7$F]o$\"3'Q&y:@\"\\B?(F-7$Fbo$\"3*oq;6L?`?(F-7$ Fgo$\"3hvJ7M>`4sF-7$F\\p$\"3E'[l1>:\\@(F-7$Fap$\"3))*[))p9T4A(F-7$Ffp$ \"3=J=X`u>GsF-7$F[q$\"3%4/4KZ\\nB(F-7$F`q$\"3aV451kGYsF-7$Feq$\"37)\\O #4V4dsF-7$Fjq$\"3'32f&\\=SnsF-7$F_r$\"3uK@Mas#)zsF-7$Fdr$\"3%>\"['==4J H(F-7$Fir$\"38$)4!\\E+mI(F-7$F^s$\"3@^jV/wP>tF-7$Fcs$\"32$orO)=9NtF-7$ Fhs$\"3M#=5ZE7*[tF-7$F]t$\"3+^sGRSKltF-7$Fbt$\"3sc)H8eG,Q(F-7$Fgt$\"3- =l4+Xe'R(F-7$F\\u$\"3`@yaS&yBT(F-7$Fau$\"3!GWR4f(*)GuF-7$Ffu$\"3*HJ9[h CSW(F-7$F[v$\"3'fnjYh5-Y(F-7$F`v$\"3W^iTDjywuF-7$Fev$\"3Y^#GxkU4\\(F-7 $Fjv$\"3e!=2$>&oe](F-7$F_w$\"3&[z@lJ43_(F-7$Fdw$\"3LC'e(4F([`(F-7$Fiw$ \"37?3c&*R)ya(F-7$F^x$\"3-()RU,*e:c(F-7$Fcx$\"3!H86W1!3tvF-7$Fhx$\"330 #G2#[]%e(F-7$F]y$\"3WOe*GN8Sf(F-7$Fby$\"3_4r7#>CMg(F-7$Fgy$\"36S%=Nz!G 6wF-7$F\\z$\"3l49'*>%)R=wF-7$Faz$\"3Y20H*Q>Ui(F-7$Ffz$\"32XK_PCNwF-7$Fj[l$ \"3&\\]pj1JYj(F-7$F_\\l$\"3+]&\\@6-Cj(F-7$Fd\\l$\"3$o.xii!**GwF-7$Fi\\ l$\"3BAMbW>%Qi(F-7$F^]l$\"3$>G8L*4UXO'))F-7$F5 $\"3A$f%4r^lj))F-7$F:$\"3+i9\"*R\"pO'))F-7$F?$\"3EA2a\\!4P'))F-7$FD$\" 3CTe%)>\\wj))F-7$FI$\"3IzY()GX#R'))F-7$FN$\"3o]NrIz9k))F-7$FT$\"37RR@& *eyk))F-7$FY$\"3cfoXL#yc'))F-7$Fhn$\"3)4C(R=]$y'))F-7$F]o$\"3!*[nW6Ovq ))F-7$Fbo$\"3E`*=/1d+)))F-7$Fgo$\"3!GB#Qi(RJ*))F-7$F\\p$\"3`\\2#oL$o4* )F-7$Fap$\"3WJy3wT'z#*)F-7$Ffp$\"3k()\\52Sk\\*)F-7$F[q$\"3C^ndIqsu*)F- 7$F`q$\"30gPdt45-!*F-7$Feq$\"3Wq4**Q(fB.*F-7$Fjq$\"3;d`Z-.Yg!*F-7$F_r$ \"35+6I8#[L4*F-7$Fdr$\"3A()eLq[IF\"*F-7$Fir$\"3a*QWc$)>0;*F-7$F^s$\"3_ &pLG7\"y!>*F-7$Fcs$\"3eeN8fU\\E#*F-7$Fhs$\"3y;j%oE.iD*F-7$F]t$\"3u#=I& =hw*G*F-7$Fbt$\"39-^y#)HG=$*F-7$Fgt$\"3w)e#[Ww'zM*F-7$F\\u$\"3qJItv&)R u$*F-7$Fau$\"3ajn$\\#[z*R*F-7$Ffu$\"3pID4Jy$4U*F-7$F[v$\"3rQ3xwP>T%*F- 7$F`v$\"3m3&[.2C#f%*F-7$Fev$\"3/9tI<;Fs%*F-7$Fjv$\"3#\\z'=z$fM[*F-7$F_ w$\"3YiJ&=LD<\\*F-7$Fdw$\"31cx&\\'yY'\\*F-7$Fiw$\"3?NHDOk#y\\*F-7$F^x$ \"33_@[\\j`&\\*F-7$Fcx$\"3SE[\"e^;+\\*F-7$Fhx$\"3a'Q'RwSY![*F-7$F]y$\" 3Y=j'*e1_o%*F-7$Fby$\"3egtjV2(=X*F-7$Fgy$\"3w`Y'QOrFV*F-7$F\\z$\"3L7Jl h(\\#4%*F-7$Faz$\"3G!y9]=XFQ*F-7$Ffz$\"3w&>`\\y%H^$*F-7$F[[l$\"3524Lv8 W<$*F-7$F`[l$\"3UZ@c\"=F#z#*F-7$Fe[l$\"3)\\qsJwjxB*F-7$Fj[l$\"33o_K2Wb '>*F-7$F_\\l$\"31]Qew*)oX\"*F-7$Fd\\l$\"3IqzQz\"Hp4*F-7$Fi\\l$\"3X\"\\ JZ0q:/*F-7$$\"33+++[oi\"o*F-$\"3I9parM&Q,*F-7$F^]l$\"3A\\$emJ[`)*)F-7$ $\"3++++30O\"*)*F-$\"3uKU5N%RQ&*)F-7$Fc]l$\"3G5x*>rD9#*)F--Fi]l6&F[^lF e]lFe]lFe]l-%&TITLEG6#Q,V~Heint~IIa6\"-%+AXESLABELSG6$Q#xiFg`nQ!Fg`n-% %VIEWG6$;F_^lFc]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" "Curve 3" "Curve 4" }}}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 " " }}}{MARK "55 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }