{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 10 "Tolman VII" }}}
{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 57 "Physical quatities are define
d in the initialization file" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 7 "grts();" }}{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~P
ollney~and~Kayll~LakeG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%DCopyright~
1994-2001~by~the~authors.G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%inLates
t~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 "Crea
ted definition for p" }}{PARA 6 "" 1 "" {TEXT -1 34 "Created definitio
n for gthetatheta" }}{PARA 6 "" 1 "" {TEXT -1 38 "Created definition f
or R(dn,dn,up,up) " }}{PARA 6 "" 1 "" {TEXT -1 27 "Created definition \+
for mass" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%FD:/Xitami/webpages/GRTen
sorJ/MetricssG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "qload(tvi
ia);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%2Default~spacetimeG%&tviiaG
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%9For~the~tviia~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\"\"#\"\"\",**.%\"RGF'%\"KGF'%\"AG\"\"%,(*&)F,F'F()F-F
.F(F(*&)%#xiGF'F(F2F(!\"\"*(F.F()F5F.F(F1F(F(F6%#~dGF()F5%#2~GF(F(**)F
+F'F(F4F(F9F()%&thetaGF;F(F(*,F=F(F4F()-%$sinG6#F?F'F(F9F()%$phiGF;F(F
(*()-FC6#-%#lnG6#,$**F-F6F,F6%\"CGF6*&,(*&F,F(-%%sqrtG6#F/F(F.*(\"\")F
(F4F(F1F(F(*$F2F(F6F(FPF(#F(F'FZF'F(F9F()%\"tGF;F(F6" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#/%,ConstraintsG7%/%\"AG,$*()\"\"$#F+\"\"%\"\"\")\"\"
##F.F-F.)*&%&alphaGF.,&%&gammaG\"\"&F+!\"\"F.F1F.#F.F+/%\"KG,$*(\"#5#F
.F0F3F?F6#F8F0#F.F>/%\"CG,$*0,(*,-%%sqrtG6#F6F.-FI6#F+F.-FI6#F0F.-FI6#
,$*&F4F.,&F6!\"&F+F.F.F8F.-FI6#*(F4F.,&F4F.F0F8F.F6F.F.F8*(F7F.F4F.)F6
F0F.F.*(\"\"'F.F4F.F6F.F8F.F+F?F0F?F4F8-%$expG6#,$-%'arctanG6#*0F4F.F6
F?FXF.F+F?F0F?FWF@F3F@F0F8F3F@F6F8#F8Ffn" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#%ZTolman~VII~form~a~(R.~Tolman,~Phys.~Rev.,~55,~364~(1939))G" }}
}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 19 "Physical parameters" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "grcalcd(Iso,rho,p,mass);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#/%*CPU~Time~G$\"$S\"!\"$" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#%9For~the~tviia~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 11 "" 1 "" {XPPMATH 20 "6#/%$rhoG,$*,,&*&)%#xiG\"\"#\"\"\")%\"KG
F+F,\"#?*&\"\"$F,)%\"AG\"\"%F,!\"\"F,%\"RG!\"#F.F7F3!\"%%#PiGF5#F5\"\"
)" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%\"pG" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#/%\"pG,$*.%\"RG!\"#%\"KGF(%\"AG!\"%,(*(-%$sinG6#-%#lnG6
#,$**F*!\"\"F)F6%\"CGF6*&,(*&F)\"\"\"-%%sqrtG6#,(*&)F)\"\"#F;)F*\"\"%F
;F;*&)%#xiGFBF;FCF;F6*(FDF;)FGFDF;FAF;F;F;FD*(\"\")F;FFF;FAF;F;*$FCF;F
6F;F7F;#F;FBFMF;FAF;FFF;FD**FDF;-%$cosGF0F;F<F;F)F;F;*&F.F;FCF;F6F;F.F
6%#PiGF6#F;FK" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%%massG" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#/%%massG,$*,*&)%\"RG\"\"#\"\"\")%#xiGF*F+#\"\"$F
*F)!\"#,&*$)%\"AG\"\"%F+!\"\"*(F5F+F,F+)%\"KGF*F+F+F+F9F0F4!\"%#F6F*" 
}}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 0 21 19 "Junction conditions" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "A:=1/3*3^(3/4)*2^(1/4)*(alph
a*(5*gamma-3))^(1/4):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "K:
= 1/10*10^(1/2)*(alpha*(5*gamma-3))^(1/2)/gamma^(1/2):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 290 "C:=-1/6*(-sqrt(gamma)*sqrt(3)*sqrt
(2)*sqrt(alpha*(5*gamma-3))*sqrt(alpha*(alpha-2)*gamma)+5*alpha*gamma^
2-6*alpha*gamma)*3^(1/2)*2^(1/2)/alpha/exp(2*arctan(alpha*gamma^(1/2)*
(alpha-2)*3^(1/2)*2^(1/2)/(alpha*(alpha-2)*gamma)^(1/2)/(alpha*(5*gamm
a-3))^(1/2)))/(alpha*(5*gamma-3))^(1/2)/gamma:" }}}{EXCHG {PARA 0 "" 
0 "" {MPLTEXT 0 21 24 "Perssure plots (gamma=1)" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 36 "pj:=subs(gamma=1,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 85 "plot([p1,p2,p3,p4],
xi=0..1,color=[red,green,blue,black],title=\"Pressure Tolman VII\");" 
}}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S
7$$\"\"!F)$\"3s*4b,:@rM\"!#>7$$\"3emmm;arz@F,$\"3YK0zk&\\bM\"F,7$$\"3[
LL$e9ui2%F,$\"3MTv%=tH;M\"F,7$$\"3nmmm\"z_\"4iF,$\"3Ae.1S-SM8F,7$$\"3[
mmmT&phN)F,$\"33+6/x^8C8F,7$$\"3CLLe*=)H\\5!#=$\"3'o6xVM%)4J\"F,7$$\"3
gmm\"z/3uC\"FD$\"3Op(zs.BiH\"F,7$$\"3%)***\\7LRDX\"FD$\"3!os27]!Ry7F,7
$$\"3]mm\"zR'ok;FD$\"3U>UeO@Hd7F,7$$\"3w***\\i5`h(=FD$\"3u$o(oY!eOB\"F
,7$$\"3WLLL3En$4#FD$\"3ELcUBmt17F,7$$\"3qmm;/RE&G#FD$\"3o6O:9B#4=\"F,7
$$\"3\")*****\\K]4]#FD$\"3[\\77:)='\\6F,7$$\"3$******\\PAvr#FD$\"3s#e
\\+TFf6\"F,7$$\"3)******\\nHi#HFD$\"3a6(*H@WX\"3\"F,7$$\"3jmm\"z*ev:JF
D$\"3Wz6gwTc[5F,7$$\"3?LLL347TLFD$\"3oVh))4+l25F,7$$\"3,LLLLY.KNFD$\"3
W=%oQecfr*!#?7$$\"3w***\\7o7Tv$FD$\"3OZ68([RAG*F]q7$$\"3'GLLLQ*o]RFD$
\"3q%*R65)oq)))F]q7$$\"3A++D\"=lj;%FD$\"3.?[I)R-KW)F]q7$$\"31++vV&R<P%
FD$\"3d@^.hQM7!)F]q7$$\"3WLL$e9Ege%FD$\"3IgR(3)HGcvF]q7$$\"3GLLeR\"3Gy
%FD$\"3o4$)f*HJM8(F]q7$$\"3cmm;/T1&*\\FD$\"3Y\"GOr!4*\\n'F]q7$$\"3&em;
zRQb@&FD$\"3O6c5-k\\)>'F]q7$$\"3\\***\\(=>Y2aFD$\"3SI?uKRM&y&F]q7$$\"3
9mm;zXu9cFD$\"3\\<@YVj\"GM&F]q7$$\"3l******\\y))GeFD$\"3+)*ftQa!=*[F]q
7$$\"3'*)***\\i_QQgFD$\"3mTx\")o9!)eWF]q7$$\"3@***\\7y%3TiFD$\"31$)yoX
3f\\SF]q7$$\"35****\\P![hY'FD$\"3.1(z\"4\"p(3OF]q7$$\"3kKLL$Qx$omFD$\"
3*zM'fdH#oA$F]q7$$\"3!)*****\\P+V)oFD$\"3`G*RcLle$GF]q7$$\"3?mm\"zpe*z
qFD$\"3[`]8L-J)\\#F]q7$$\"3%)*****\\#\\'QH(FD$\"3kU[\"oX7#\\@F]q7$$\"3
GKLe9S8&\\(FD$\"39Me$[.!GT=F]q7$$\"3R***\\i?=bq(FD$\"3)[bf_rk@a\"F]q7$
$\"3\"HLL$3s?6zFD$\"3e,))[>>\\t7F]q7$$\"3a***\\7`Wl7)FD$\"3)=O=LTs&=5F
]q7$$\"3#pmmm'*RRL)FD$\"3[Qxz:ub%*z!#@7$$\"3Qmm;a<.Y&)FD$\"3-g25\"yo&G
gFax7$$\"3=LLe9tOc()FD$\"3cLSvCbRdVFax7$$\"3u******\\Qk\\*)FD$\"3)oMb+
>%RnIFax7$$\"3CLL$3dg6<*FD$\"3qw]gMrQw=Fax7$$\"3ImmmmxGp$*FD$\"3Scp.O
\"on1\"Fax7$$\"3A++D\"oK0e*FD$\"3iKS&*o*)\\9Y!#A7$$\"3A++v=5s#y*FD$\"3
m(y.Bf]'37F`z7$$\"\"\"F)$\"30_QfaZgK:!#M-%'COLOURG6&%$RGBG$\"*++++\"!
\")F(F(-F$6$7S7$F($\"3\")H0%*[dnPAF,7$F.$\"36Sn#*Qi/NAF,7$F3$\"3`(Hlu!
z[GAF,7$F8$\"3Jx/))fFR;AF,7$F=$\"3YWXx+/A*>#F,7$FB$\"3!4kqW#GAx@F,7$FH
$\"3[tHQSX`_@F,7$FM$\"3DWs'>09F7#F,7$FR$\"3WT_'**[Qu3#F,7$FW$\"3[7:1T7
$z/#F,7$Ffn$\"3Ti7)[%*QH+#F,7$F[o$\"3EkQTXp!)f>F,7$F`o$\"3S@:N\\j^2>F,
7$Feo$\"3%\\z!*3r_7&=F,7$Fjo$\"3oK.y=1q$z\"F,7$F_p$\"3v3z#*>l!)Q<F,7$F
dp$\"397nEv9aq;F,7$Fip$\"3N')*328//h\"F,7$F_q$\"37$=m7=&3Q:F,7$Fdq$\"3
5dUaoc@s9F,7$Fiq$\"33`[+5UD)R\"F,7$F^r$\"3lzTZ3a[E8F,7$Fcr$\"3I4B15ca]
7F,7$Fhr$\"3q`R^.0;!=\"F,7$F]s$\"3ZCDs:!zQ5\"F,7$Fbs$\"3r=b3[WiC5F,7$F
gs$\"3e!zH(4$>$f&*F]q7$F\\t$\"3pD+UC(RQ#))F]q7$Fat$\"3#z^(3BZeu!)F]q7$
Fft$\"3[q_7JydbtF]q7$F[u$\"3mxsT&\\6kn'F]q7$F`u$\"3)f#Q3hl=XfF]q7$Feu$
\"3d4w$>#R,7`F]q7$Fju$\"3mZ<]`EMkYF]q7$F_v$\"3@rSt\"oib5%F]q7$Fdv$\"33
d\\nL7<GNF]q7$Fiv$\"3!4K>Z!GP>IF]q7$F^w$\"3RF%)G)*QqDDF]q7$Fcw$\"3Oinh
#GjG3#F]q7$Fhw$\"3'4NxblOLm\"F]q7$F]x$\"3p4;pZ,P.8F]q7$Fcx$\"3t]F=aMW5
)*Fax7$Fhx$\"3=D0Z]=$o2(Fax7$F]y$\"3%)HE)ySU>(\\Fax7$Fby$\"3P8zq\"3jS.
$Fax7$Fgy$\"3?@EF*RK4s\"Fax7$F\\z$\"3**=qH@upCuF`z7$Fbz$\"3<^f51'y&R>F
`z7$Fgz$\"3t#*Gz,I`<6F[[l-F][l6&F_[lF(F`[lF(-F$6$7S7$F($\"3ytTLy7X'f%F
,7$F.$\"3)p<!o8w(3f%F,7$F3$\"3w%o4t(y(pd%F,7$F8$\"3')3q8I(\\8b%F,7$F=$
\"3>pt%Rmx\\^%F,7$FB$\"3)=C[&*f4%oWF,7$FH$\"3A6MZzv<;WF,7$FM$\"3cE&*RO
G8`VF,7$FR$\"31:Kk&4>'yUF,7$FW$\"3]s*\\!p%[_>%F,7$Ffn$\"3*pC^S#zS+TF,7
$F[o$\"3#>G:iJ$f4SF,7$F`o$\"3Q0Pqo>j**QF,7$Feo$\"3'G)GU*R#[\"y$F,7$Fjo
$\"3%Q[!zu]!3m$F,7$F_p$\"3AMP6.!oea$F,7$Fdp$\"3Z_la(4hJS$F,7$Fip$\"3)=
#pj'z^wF$F,7$F_q$\"3@1j:QU(p7$F,7$Fdq$\"3umaq2d(**)HF,7$Fiq$\"3Lytg\"
\\?k$GF,7$F^r$\"3+;N1-Jp(o#F,7$Fcr$\"3RL&Rm)phIDF,7$Fhr$\"3505ow4I&Q#F
,7$F]s$\"3([Hb=%e5GAF,7$Fbs$\"3'3)*)GP*4^1#F,7$Fgs$\"3c0E!*Gq5C>F,7$F
\\t$\"3;vbS5,Ut<F,7$Fat$\"3hutQ]r@?;F,7$Fft$\"39$ff!*)y\\t9F,7$F[u$\"3
Fry.?s=N8F,7$F`u$\"315s%=0$f'=\"F,7$Feu$\"3a&RE*4!3#e5F,7$Fju$\"3_![&
\\$*=yr#*F]q7$F_v$\"3K;Eef-&R9)F]q7$Fdv$\"3!pB7bU?9)pF]q7$Fiv$\"3Yzz+V
SuffF]q7$F^w$\"3/\\B$zl38(\\F]q7$Fcw$\"3gs<9@yZ(3%F]q7$Fhw$\"3i#\\DC.p
JD$F]q7$F]x$\"30ihq'=j,a#F]q7$Fcx$\"3e#3QX`GX!>F]q7$Fhx$\"33DTg:'>\"o8
F]q7$F]y$\"3GUd58m^s&*Fax7$Fby$\"3W>J$**Q$>7eFax7$Fgy$\"3m;z5l!))4G$Fa
x7$F\\z$\"3Z?lQGZ'zS\"Fax7$Fbz$\"3uDb:XcUeOF`z7$Fgz$\"3]R/h2lE*y\"F[[l
-F][l6&F_[lF(F(F`[l-F$6$7S7$F($\"3Lbka#4?q\">FD7$F.$\"3W)y^7P8S\">FD7$
F3$\"3/9'3V&R_1>FD7$F8$\"3'4wp'yzu#*=FD7$F=$\"3]#G8oupK(=FD7$FB$\"3;N8
r([b%[=FD7$FH$\"3cETceyy?=FD7$FM$\"3_jaN(fAwy\"FD7$FR$\"3AE;W=\\u[<FD7
$FW$\"3E)QkER`cq\"FD7$Ffn$\"3k*>/7G\\rl\"FD7$F[o$\"3;=@0X8@6;FD7$F`o$
\"3'>.&*)R>Cc:FD7$Feo$\"3=p^)\\-kz\\\"FD7$Fjo$\"3OCJ/%Hj#R9FD7$F_p$\"3
!=:\"[a\\6%Q\"FD7$Fdp$\"3:Uo)3_amJ\"FD7$Fip$\"3uz8;%oK#e7FD7$F_q$\"35%
o&3\")e>*=\"FD7$Fdq$\"3`K9qwuWF6FD7$Fiq$\"3/([cm$zOf5FD7$F^r$\"3swnwYE
XX**F,7$Fcr$\"3!3$)*y1V^s#*F,7$Fhr$\"3)4%p+wRUg')F,7$F]s$\"3OjPt%>)R4!
)F,7$Fbs$\"3o;g^sxHYtF,7$Fgs$\"3=ne6AuI#y'F,7$F\\t$\"3yz\"GYR/$*='F,7$
Fat$\"3Sq@cE=b'f&F,7$Fft$\"3u*f](QeOQ]F,7$F[u$\"3!)yg&Qi\"f?XF,7$F`u$
\"3YB)[TP\"RtRF,7$Feu$\"3Sd1,o9>3NF,7$Fju$\"3[ZDutJsSIF,7$F_v$\"3**\\J
Wz$zVk#F,7$Fdv$\"32UI0Jo&=C#F,7$Fiv$\"3!*f\"RWFpL*=F,7$F^w$\"3q(*R#\\9
07c\"F,7$Fcw$\"3)\\m,b#Rpo7F,7$Fhw$\"37$fE!pi0p**F]q7$F]x$\"3Ok+nP$[Vo
(F]q7$Fcx$\"3))4b$3=GAo&F]q7$Fhx$\"3Y7Qs!4IL-%F]q7$F]y$\"3'y)e6Hr?wFF]
q7$Fby$\"3Q*\\Nzl-yl\"F]q7$Fgy$\"3(zaj`!HT9#*Fax7$F\\z$\"3#e*HO:<O()QF
ax7$Fbz$\"3iV*zVo2R$**F`z7$Fgz$\"3u(G*3\"eh8])!#N-F][l6&F_[lF)F)F)-%&T
ITLEG6#Q4Pressure~Tolman~VII6\"-%+AXESLABELSG6$Q#xiF`hmQ!F`hm-%%VIEWG6
$;F(Fgz%(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 20 "Energy density plots" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "rhoj:=subs(gamma=1,grcomponent(rho,
[])):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "rho1:=subs(R=1,alp
ha=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 99 "plot([rho1,rho2,rho3,rho4],xi=0..1,color=[red,green,blue,black
],title=\"Energy Density Tolman VII\");" }}{PARA 13 "" 1 "" {GLPLOT2D 
400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$\"\"!F)$\"3YfMCVR=Z**!#>7$
$\"3emmm;arz@F,$\"3)yr&pxyXU**F,7$$\"3[LL$e9ui2%F,$\"324!\\:pb1$**F,7$
$\"3nmmm\"z_\"4iF,$\"3UT;l*)R$)3**F,7$$\"3[mmmT&phN)F,$\"3!y2e\\;Fx()*
F,7$$\"3CLLe*=)H\\5!#=$\"3E=!fIziw$)*F,7$$\"3gmm\"z/3uC\"FD$\"3OT1Y\"4
.Cz*F,7$$\"3%)***\\7LRDX\"FD$\"3TsgwU7JP(*F,7$$\"3]mm\"zR'ok;FD$\"37P&
G8\\H:n*F,7$$\"3w***\\i5`h(=FD$\"3%zhwW*z/(f*F,7$$\"3WLLL3En$4#FD$\"33
=C^<E:6&*F,7$$\"3qmm;/RE&G#FD$\"3UrZD9\"*pF%*F,7$$\"3\")*****\\K]4]#FD
$\"3bHp2/A,D$*F,7$$\"3$******\\PAvr#FD$\"3JP,2&e\"f7#*F,7$$\"3)******
\\nHi#HFD$\"3i0\")3wWU&4*F,7$$\"3jmm\"z*ev:JFD$\"3+,_15y^\")*)F,7$$\"3
?LLL347TLFD$\"3$)z^@a4xO))F,7$$\"3,LLLLY.KNFD$\"3dC\"3J-Yiq)F,7$$\"3w*
**\\7o7Tv$FD$\"3?,l(*)H\"HX&)F,7$$\"3'GLLLQ*o]RFD$\"3qn=#[yKYR)F,7$$\"
3A++D\"=lj;%FD$\"3o,qH)=#\\?#)F,7$$\"31++vV&R<P%FD$\"3[9U\\Sv1Y!)F,7$$
\"3WLL$e9Ege%FD$\"3]XJ#HWG^&yF,7$$\"3GLLeR\"3Gy%FD$\"3GJW@!QS<n(F,7$$
\"3cmm;/T1&*\\FD$\"3-C8Pg`HluF,7$$\"3&em;zRQb@&FD$\"3a3W*[!oOTsF,7$$\"
3\\***\\(=>Y2aFD$\"3XTSJeKcQqF,7$$\"39mm;zXu9cFD$\"3zDqfC()H6oF,7$$\"3
l******\\y))GeFD$\"3#HZ7[LNvc'F,7$$\"3'*)***\\i_QQgFD$\"3n,#Hq7K-K'F,7
$$\"3@***\\7y%3TiFD$\"3!pI!QuCksgF,7$$\"35****\\P![hY'FD$\"3crDld)f\")
y&F,7$$\"3kKLL$Qx$omFD$\"3Z8ZC-T%R_&F,7$$\"3!)*****\\P+V)oFD$\"3Fwu=/i
&GB&F,7$$\"3?mm\"zpe*zqFD$\"3-z'4e!p2h\\F,7$$\"3%)*****\\#\\'QH(FD$\"3
#RZ0pxN_l%F,7$$\"3GKLe9S8&\\(FD$\"3I/SpZ5:fVF,7$$\"3R***\\i?=bq(FD$\"3
_]f(**RU5/%F,7$$\"3\"HLL$3s?6zFD$\"3;\"eJZ3?:s$F,7$$\"3a***\\7`Wl7)FD$
\"3[O3u[9*zP$F,7$$\"3#pmmm'*RRL)FD$\"3'zAEQc6%QIF,7$$\"3Qmm;a<.Y&)FD$
\"39GZt&4#H#o#F,7$$\"3=LLe9tOc()FD$\"3Uy))>bKG?BF,7$$\"3u******\\Qk\\*
)FD$\"3mn5#R0v)z>F,7$$\"3CLL$3dg6<*FD$\"3eRDL0!*e!e\"F,7$$\"3ImmmmxGp$
*FD$\"3XcB4HC>:7F,7$$\"3A++D\"oK0e*FD$\"3ia\\aPO,q\")!#?7$$\"3A++v=5s#
y*FD$\"3c3=swrmvUF^z7$$\"\"\"F)F(-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-
F$6$7S7$F($\"3-:#*=t?m$>\"FD7$F.$\"3'f[B`%\\4$>\"FD7$F3$\"33\")e)Hoy;>
\"FD7$F8$\"3u'>e(y+1*=\"FD7$F=$\"3Kp\\zfsK&=\"FD7$FB$\"3=#3n^`>0=\"FD7
$FH$\"3'oFv4P)3v6FD7$FM$\"3kG>8\\tZo6FD7$FR$\"3MC%f*QNeg6FD7$FW$\"3+%>
P$fdk^6FD7$Ffn$\"3<!\\,TJQ89\"FD7$F[o$\"3as0r$*QKJ6FD7$F`o$\"3bJ#*[k9+
>6FD7$Feo$\"3[;%3-*4^06FD7$Fjo$\"3ks08P4X\"4\"FD7$F_p$\"3!R#y?P@yx5FD7
$Fdp$\"3s@e]9DTg5FD7$Fip$\"3'[(HxA&\\Z/\"FD7$F^q$\"37!=xe&\\VD5FD7$Fcq
$\"3'RiyT$fN25FD7$Fhq$\"33+k&fi!fk)*F,7$F]r$\"3kdIf[5Gb'*F,7$Fbr$\"3@t
x]JT:E%*F,7$Fgr$\"3.:tDc%)31#*F,7$F\\s$\"3+)eXCVa$e*)F,7$Fas$\"3)**Gte
;S'*o)F,7$Ffs$\"3u\\o(*4fFY%)F,7$F[t$\"3uGk^p%eN<)F,7$F`t$\"3Il\\x,C/
\")yF,7$Fet$\"3-U]V_&yUe(F,7$Fjt$\"3gmjDp4<(G(F,7$F_u$\"3'e3$=H=zXpF,7
$Fdu$\"3)el$pAHtGmF,7$Fiu$\"3)4(\\-XuUziF,7$F^v$\"3_:;(pG#H`fF,7$Fcv$
\"3%)olGKHG'e&F,7$Fhv$\"3-0GBd7)4B&F,7$F]w$\"3!)R6(*z3D\\[F,7$Fbw$\"39
'*yn,T#eY%F,7$Fgw$\"35.!*[Q(*e`SF,7$F\\x$\"3)=Z\"fwQ4YOF,7$Fax$\"3\\t;
)[^](=KF,7$Ffx$\"3=a'Qi!*RVy#F,7$F[y$\"3g\"G0Z1]eP#F,7$F`y$\"3CY!*R1oq
'*=F,7$Fey$\"3;H3\"\\\"4Be9F,7$Fjy$\"3`GR0lj,/)*F^z7$F`z$\"3elh171!38&
F^zFdz-Fhz6&FjzF(F[[lF(-F$6$7S7$F($\"3#*=l[\"fx?\\\"FD7$F.$\"3adVl\"oo
8\\\"FD7$F3$\"3]^Bt`$)f*[\"FD7$F8$\"3!euZ%)4Dj[\"FD7$F=$\"3o6Puu!f;[\"
FD7$FB$\"3g_)e*=%\\cZ\"FD7$FH$\"31'4>PYg)o9FD7$FM$\"3e5\\T'o'fg9FD7$FR
$\"3U!G*pB%H2X\"FD7$FW$\"3b#\\r\"*>d&R9FD7$Ffn$\"3kioi#*GnE9FD7$F[o$\"
3k:#Qr'[:99FD7$F`o$\"3eR:hI=v)R\"FD7$Feo$\"3Y?0wP())=Q\"FD7$Fjo$\"3#f@
89n8VO\"FD7$F_p$\"3-!y4:nFsM\"FD7$Fdp$\"3/xA8Vc^D8FD7$Fip$\"3b=iY.p$fI
\"FD7$F^q$\"3Ivk%[p$z\"G\"FD7$Fcq$\"3-!GBx\"\\>f7FD7$Fhq$\"36]XCGQ2L7F
D7$F]r$\"3<KT2J,\"p?\"FD7$Fbr$\"3#=ZQkEp#y6FD7$Fgr$\"3ck@.d5w]6FD7$F\\
s$\"3g)pbSI%z>6FD7$Fas$\"3UhTt?]?'3\"FD7$Ffs$\"3G1ru)[%yb5FD7$F[t$\"3t
`&*o3[p@5FD7$F`t$\"3K2(=A+.8&)*F,7$Fet$\"3_-Qa!>[.[*F,7$Fjt$\"3)*f/d6P
'*3\"*F,7$F_u$\"3gb)ykyRAo)F,7$Fdu$\"3;pqO`h\"fG)F,7$Fiu$\"3K77G1VG\\y
F,7$F^v$\"3&y^9(e`hTuF,7$Fcv$\"3=5#e`m`G)pF,7$Fhv$\"3205arlsQlF,7$F]w$
\"3wCR'**fj:1'F,7$Fbw$\"3sqt4F,G#e&F,7$Fgw$\"3Qa76tr)p1&F,7$F\\x$\"3cS
$RdM<wb%F,7$Fax$\"3N\"4-O9QM-%F,7$Ffx$\"3#yJ)z#)[U![$F,7$F[y$\"3i+;)3e
7)pHF,7$F`y$\"3-4))*z]$)3P#F,7$Fey$\"31O&QOk)yA=F,7$Fjy$\"3\"=uJc/-bA
\"F,7$F`z$\"3g<F3l2]8kF^zFdz-Fhz6&FjzF(F(F[[l-F$6$7S7$F($\"3)=p[')yO%*
)>FD7$F.$\"3cV\"Rbd\"\\))>FD7$F3$\"3!=!)4$Q68')>FD7$F8$\"3GG.$zzm<)>FD
7$F=$\"3c:;*HVXb(>FD7$FB$\"3m.=heD`n>FD7$FH$\"3GG@H=1[e>FD7$FM$\"3[9Kb
[AYZ>FD7$FR$\"3U2dE)*eIM>FD7$FW$\"3fB`*))f4%>>FD7$Ffn$\"3i$[-N_IA!>FD7
$F[o$\"3Ga4&G#)Rb)=FD7$F`o$\"3!fQ:3W-]'=FD7$Feo$\"3YFS,<$=D%=FD7$Fjo$
\"37@w@&*[3>=FD7$F_p$\"3?SI,iNI'z\"FD7$Fdp$\"3'f.V3>atw\"FD7$Fip$\"3\"
\\i@Y?\\7u\"FD7$F^q$\"3C+`zf#e!4<FD7$Fcq$\"3atV'pbE*y;FD7$Fhq$\"3M+%fw
V)4W;FD7$F]r$\"3*G%))43N@4;FD7$Fbr$\"35HYe)oD5d\"FD7$Fgr$\"3D')G/w![V`
\"FD7$F\\s$\"3![Eu?2fI\\\"FD7$Fas$\"3q\"))y4Ot#[9FD7$Ffs$\"3H3Gm^Er29F
D7$F[t$\"3;0%>\\ufAO\"FD7$F`t$\"3e%\\ip12NJ\"FD7$Fet$\"3MSeSDk/k7FD7$F
jt$\"3Qhg([\\GX@\"FD7$F_u$\"3K90`r>jd6FD7$Fdu$\"3pU*[/#))y/6FD7$Fiu$\"
3E&\\P3Crl/\"FD7$F^v$\"31e$>;\"Q:A**F,7$Fcv$\"3#y%4\"Qbr/J*F,7$Fhv$\"3
g3!)Q&4-$=()F,7$F]w$\"3/,>&**z%3#3)F,7$Fbw$\"3LiJYp,/VuF,7$Fgw$\"3)Hn
\"[(*G)fv'F,7$F\\x$\"3#fX_w7Bo2'F,7$Fax$\"3Gc%p9>%ek`F,7$Ffx$\"3%ov(R5
lcSYF,7$F[y$\"3IN@%y5](fRF,7$F`y$\"39z]m5!y6;$F,7$Fey$\"3*Gr%=e[QICF,7
$Fjy$\"3#4**3vs-Sj\"F,7$F`z$\"35<OW`VL^&)F^zFdz-Fhz6&FjzF)F)F)-%&TITLE
G6#Q:Energy~Density~Tolman~VII6\"-%+AXESLABELSG6$Q#xiFagmQ!Fagm-%%VIEW
G6$;F(Fez%(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 39 "mj:=subs(gamma=1,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,m
j):" }}}{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,alp
ha=3,mj):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 85 "plot([mj1,mj2,
mj3,mj4],xi=0..1,color=[red,green,blue,black],title=\"Mass Tolman VII
\");" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVE
SG6$7S7$$\"\"!F)F(7$$\"3emmm;arz@!#>$\"3$y,v2*G%QJ%!#B7$$\"3[LL$e9ui2%
F-$\"3TnSXb(G$>G!#A7$$\"3nmmm\"z_\"4iF-$\"3]`H>xXI^**F67$$\"3[mmmT&phN
)F-$\"3!*>G6Xv&4U#!#@7$$\"3CLLe*=)H\\5!#=$\"3WJ@n)er>y%FA7$$\"3gmm\"z/
3uC\"FE$\"3kE\\(3X&*>,)FA7$$\"3%)***\\7LRDX\"FE$\"3YXm?\\1yg7!#?7$$\"3
]mm\"zR'ok;FE$\"3%zv[!=\\=!*=FR7$$\"3w***\\i5`h(=FE$\"3CnHJE%QNp#FR7$$
\"3WLLL3En$4#FE$\"3]Fr[s;SBPFR7$$\"3qmm;/RE&G#FE$\"3D)fC!zV%p\"[FR7$$
\"3\")*****\\K]4]#FE$\"3'4%f`**)QKF'FR7$$\"3$******\\PAvr#FE$\"3y(R`WC
Y9*zFR7$$\"3)******\\nHi#HFE$\"3O37z#eKR!**FR7$$\"3jmm\"z*ev:JFE$\"3U)
o(yuW!p=\"F-7$$\"3?LLL347TLFE$\"3%G4w'oJ'*\\9F-7$$\"3,LLLLY.KNFE$\"3id
we7q`)p\"F-7$$\"3w***\\7o7Tv$FE$\"3?&*z)ft*3=?F-7$$\"3'GLLLQ*o]RFE$\"3
XS[*QK^'GBF-7$$\"3A++D\"=lj;%FE$\"3gsUP!Hu&*p#F-7$$\"31++vV&R<P%FE$\"3
!RS%pe@;#3$F-7$$\"3WLL$e9Ege%FE$\"3+&Gg-4%o6NF-7$$\"3GLLeR\"3Gy%FE$\"3
cDCR:4)H$RF-7$$\"3cmm;/T1&*\\FE$\"3C\"=MMWAbT%F-7$$\"3&em;zRQb@&FE$\"3
GPDl*)paY\\F-7$$\"3\\***\\(=>Y2aFE$\"3W@uzY1PKaF-7$$\"39mm;zXu9cFE$\"3
;*Ro3dL-)fF-7$$\"3l******\\y))GeFE$\"3S.N+N9eplF-7$$\"3'*)***\\i_QQgFE
$\"3#RTAgAco;(F-7$$\"3@***\\7y%3TiFE$\"3c()o@ip#=w(F-7$$\"35****\\P![h
Y'FE$\"3O7K6>F))Q%)F-7$$\"3kKLL$Qx$omFE$\"3m3!GF?y(e!*F-7$$\"3!)*****
\\P+V)oFE$\"36eU;dy&)G(*F-7$$\"3?mm\"zpe*zqFE$\"3ZU\"f_yvR.\"FE7$$\"3%
)*****\\#\\'QH(FE$\"3?b/VMrs+6FE7$$\"3GKLe9S8&\\(FE$\"3'o&p;WO0j6FE7$$
\"3R***\\i?=bq(FE$\"3FQ8rc\"*=F7FE7$$\"3\"HLL$3s?6zFE$\"3Y]\"Q[Z[$)G\"
FE7$$\"3a***\\7`Wl7)FE$\"3AlMBVb5]8FE7$$\"3#pmmm'*RRL)FE$\"3%oi&3!RKnS
\"FE7$$\"3Qmm;a<.Y&)FE$\"3'y$)Q()oD5Y\"FE7$$\"3=LLe9tOc()FE$\"3+S`uiY
\\5:FE7$$\"3u******\\Qk\\*)FE$\"3Oo&3T\"HT^:FE7$$\"3CLL$3dg6<*FE$\"3yg
O!p+x?f\"FE7$$\"3ImmmmxGp$*FE$\"34.>*zht>i\"FE7$$\"3A++D\"oK0e*FE$\"3k
-lxA=<Y;FE7$$\"3A++v=5s#y*FE$\"3QK%\\pKw4m\"FE7$$\"\"\"F)$\"3'ommmmmmm
\"FE-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-F$6$7SF'7$F+$\"3C@+$*o9hw^F07
$F2$\"3i!)[a1X>$Q$F67$F8$\"3KaJE\\l:%>\"FA7$F=$\"3K%QNT0\\^!HFA7$FC$\"
3GdlS1fOQdFA7$FI$\"3a6*\\5a%R9'*FA7$FN$\"3Xuz/zn$H^\"FR7$FT$\"3a4&e;!>
AoAFR7$FY$\"3ogbd6hCKKFR7$Fhn$\"3m_X)p+#3oWFR7$F]o$\"3M;&H[DL.y&FR7$Fb
o$\"3jGJWzm)y_(FR7$Fgo$\"3UzSM$\\N(*e*FR7$F\\p$\"3!\\%\\$*4>Z)=\"F-7$F
ap$\"3CE_up`GC9F-7$Ffp$\"3L68T-e&*R<F-7$F[q$\"3%*)=0^TW#Q?F-7$F`q$\"3B
%f&=$o2<U#F-7$Feq$\"3g3Qn)e\"Q%z#F-7$Fjq$\"3'o7\\%[\"*[RKF-7$F_r$\"33&
GL/f%f)p$F-7$Fdr$\"3eTBJ34-9UF-7$Fir$\"3R54Z)4x&>ZF-7$F^s$\"3A<57Kpi)H
&F-7$Fcs$\"3IXIe(Qce$fF-7$Fhs$\"3$o!p:wZ%)=lF-7$F]t$\"3+z?/&G!GwrF-7$F
bt$\"3o-U+Ax\\$)yF-7$Fgt$\"3'p*oAruA+')F-7$F\\u$\"3di-maB>9$*F-7$Fau$
\"3S&e$HEfm75FE7$Ffu$\"3'4OFVQ`q3\"FE7$F[v$\"3%4rfG%HYn6FE7$F`v$\"3rq4
JU4xS7FE7$Fev$\"3=YlJhD(3K\"FE7$Fjv$\"3!zM+IPkcR\"FE7$F_w$\"331O0))pis
9FE7$Fdw$\"3Q!y0)p\"=ga\"FE7$Fiw$\"3\")e,)=lE,i\"FE7$F^x$\"3E_F5o)y!)o
\"FE7$Fcx$\"3M0m[E3B`<FE7$Fhx$\"313WH&f$f7=FE7$F]y$\"3_\"GIp\\&ph=FE7$
Fby$\"3V#R%G3C\\5>FE7$Fgy$\"3c$G!fT$oj%>FE7$F\\z$\"3C.=L(=1a(>FE7$Faz$
\"3Q=$RBfrJ*>FE7$Ffz$\"35+++++++?FE-F[[l6&F][lF(F^[lF(-F$6$7SF'7$F+$\"
3[DD;OVwqkF07$F2$\"3F+6=LJ**GUF67$F8$\"3iU*ylo&p#\\\"FA7$F=$\"3FI#pwJO
9j$FA7$FC$\"3M'>3IQdH<(FA7$FI$\"3%*Q7j<$*z,7FR7$FN$\"3'z'*4Q(4<\"*=FR7
$FT$\"3POJ2xtFNGFR7$FY$\"3T]%p%RwISSFR7$Fhn$\"3/\"pI(3D5&e&FR7$F]o$\"3
l&*o`olTDsFR7$Fbo$\"3$)3RI\\$e)4%*FR7$Fgo$\"3%)4!om$pr)>\"F-7$F\\p$\"3
5\"o=u))*e&[\"F-7$Fap$\"3!G`\"=7nN!y\"F-7$Ffp$\"3URT,`Z%\\<#F-7$F[q$\"
3E'[\"))=b!ya#F-7$F`q$\"3G#*>)RgMr-$F-7$Feq$\"3MgA%e)p(H\\$F-7$Fjq$\"3
s29cN9O\\SF-7$F_r$\"3n0;/QKCBYF-7$Fdr$\"3!oU!RNh_n_F-7$Fir$\"3mP')3t8Z
**eF-7$F^s$\"3#3F^^m$GBmF-7$Fcs$\"3)[!)yW[?)>uF-7$Fhs$\"3;Kh>qfb[\")F-
7$F]t$\"3q(f-jN].(*)F-7$Fbt$\"3-`_]_@Pa)*F-7$Fgt$\"3%>O.RVG]2\"FE7$F\\
u$\"3#H`KV/uU;\"FE7$Fau$\"3k\")p'ySKeE\"FE7$Ffu$\"33,#4/t;)e8FE7$F[v$
\"3WQYdy'G$f9FE7$F`v$\"3U8())ynj4b\"FE7$Fev$\"3s#oX;q!4^;FE7$Fjv$\"3&
\\V]iY!eW<FE7$F_w$\"3)p+n]t$yS=FE7$Fdw$\"3FDsD7F_K>FE7$Fiw$\"35)>][Je^
-#FE7$F^x$\"3cR%G^e)45@FE7$Fcx$\"3)fD3J`Q:>#FE7$Fhx$\"3I4!=T*>ulAFE7$F
]y$\"3G^G;r$>rK#FE7$Fby$\"3#**[b.^:\")Q#FE7$Fgy$\"3\"Q&y)pUgHV#FE7$F\\
z$\"3'GvkTtd#pCFE7$Faz$\"3'y9C/\\k9\\#FE7$Ffz$\"3W*************\\#FE-F
[[l6&F][lF(F(F^[l-F$6$7SF'7$F+$\"3lN+b\"y&oF')F07$F2$\"3$[834^d'QcF67$
F8$\"3q!fQa\"4E!*>FA7$F=$\"3\")RcA!4:>%[FA7$FC$\"3'GEWt<VRc*FA7$FI$\"3
L&)\\<!4*R-;FR7$FN$\"3!4H8%)Hh:_#FR7$FT$\"3)e^(4O)p.y$FR7$FY$\"3YMfi_o
2(Q&FR7$Fhn$\"3+bU(\\M.oW(FR7$F]o$\"3^'>\\!e())Qj*FR7$Fbo$\"3?)=2*zxka
7F-7$Fgo$\"3az1*)[#*G)f\"F-7$F\\p$\"3oT#el^'y!)>F-7$Fap$\"3%oPv&\\*3QP
#F-7$Ffp$\"3o&=_tLE***GF-7$F[q$\"3C:`<DS2(R$F-7$F`q$\"3R!*f(>Zzh.%F-7$
Feq$\"3!4o*yZEIdYF-7$Fjq$\"3AX&[2e[\"*R&F-7$F_r$\"3!y!))Q<VKkhF-7$Fdr$
\"3+q0_!=oL-(F-7$Fir$\"37^[yI='f'yF-7$F^s$\"3[i$oo)[/J))F-7$Fcs$\"3cu]
IzR4$*)*F-7$Fhs$\"3G%[f$HTZ'3\"FE7$F]t$\"3#)zO<9n/'>\"FE7$Fbt$\"3o+2+(
G;RJ\"FE7$Fgt$\"3y#[/_CrLV\"FE7$F\\u$\"3_xLW#RlBb\"FE7$Fau$\"3[UE#Qawx
o\"FE7$Ffu$\"3t,caScv6=FE7$F[v$\"3i^GVr:xX>FE7$F`v$\"3%\\G=0d^z1#FE7$F
ev$\"3R54')oUX,AFE7$Fjv$\"3t8RL)G2hK#FE7$F_w$\"3awEU8$yVX#FE7$Fdw$\"3#
4Iw'\\ppwDFE7$Fiw$\"3UIpY'36-q#FE7$F^x$\"3o`7<!ykM\"GFE7$Fcx$\"3uvwZx8
0AHFE7$Fhx$\"3+!o!\\D$*)4-$FE7$F]y$\"3rOr@Ge#G5$FE7$Fby$\"3c@t!Q,aT=$F
E7$Fgy$\"3>1Q)fBZRC$FE7$F\\z$\"3G0IbXOM#H$FE7$Faz$\"3uk))*Ql_>K$FE7$Ff
z$\"3qLLLLLLLLFE-F[[l6&F][lF)F)F)-%&TITLEG6#Q0Mass~Tolman~VII6\"-%+AXE
SLABELSG6$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]))):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "Bj:=subs(R=1,gamma=1,B):" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "B1:=subs(alpha=3.17,Bj):" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "B2:=subs(alpha=3.18,Bj):" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "B3:=subs(alpha=3.19,Bj):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "B4:=subs(alpha=3.2,Bj):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 88 "plot([B1,B2,B3,B4],xi=0
.85..1,color=[red,green,blue,black],title=\"Trapping Tolman VII\");" }
}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7
$$\"3w*************\\)!#=$\"3!Q5Qy:J#H6!#<7$$\"3e***\\7t&pK&)F*$\"3w[.
p'p*3H6F-7$$\"3#)*\\(=7T9h&)F*$\"3B/TX,q'*G6F-7$$\"3I**\\(=HPJf)F*$\"3
!flKa2I)G6F-7$$\"3r**\\7VDMD')F*$\"3T%QLl.%pG6F-7$$\"3q*\\P%GZRd')F*$
\"3%y>[$=6cG6F-7$$\"31+v=276(o)F*$\"36&QnsoS%G6F-7$$\"38+vo**3)yr)F*$
\"3E5P!=U>$G6F-7$$\"3y*\\(ofHq\\()F*$\"3#\\@:gJ)>G6F-7$$\"3#)*\\Pf'HU
\"y)F*$\"3H)[V%3E3G6F-7$$\"3T++D\"*309))F*$\"3hqkh'\\pz7\"F-7$$\"3R**
\\i&e*yU))F*$\"3jq&>xQvy7\"F-7$$\"3?++v[D9v))F*$\"3&y3_eDwx7\"F-7$$\"3
F++Dc$Gw!*)F*$\"3z!G(>RYoF6F-7$$\"3>++D^W$*Q*)F*$\"3F]>)=]/w7\"F-7$$\"
3/+vo%Qjt'*)F*$\"3fas'4=Rv7\"F-7$$\"3c***\\i8o6+*F*$\"31k*)\\'Qru7\"F-
7$$\"3B+++&>0)H!*F*$\"3Sgw5#)GUF6F-7$$\"3A+v=-p6j!*F*$\"3d;(z.Sxt7\"F-
7$$\"3]****\\2Mg#4*F*$\"32Y!*H+vMF6F-7$$\"3[*\\(=xZ&\\7*F*$\"3%)QW')*[
Et7\"F-7$$\"3#**\\i:$4wb\"*F*$\"3]yAh=&=t7\"F-7$$\"3E+](=#R!z=*F*$\"36
z,v9LKF6F-7$$\"3\\*\\P4A@u@*F*$\"3@_j()G+MF6F-7$$\"3a**\\i:'f#\\#*F*$
\"3WU+/?=PF6F-7$$\"3W+vof2L#G*F*$\"3eq\"eyc?u7\"F-7$$\"3J*\\7yG>6J*F*$
\"3<^!zs`wu7\"F-7$$\"3O**\\(oo6AM*F*$\"39b\"fQj^v7\"F-7$$\"3]++]xJLu$*
F*$\"3*4td)>dkF6F-7$$\"3'***\\P*yddS*F*$\"3U]\\u?XvF6F-7$$\"3b*\\(=<F;
O%*F*$\"3V]9XZg(y7\"F-7$$\"3))**\\i0A#*p%*F*$\"3ay&>qEI!G6F-7$$\"3X***
*\\2mD+&*F*$\"3EDFGIm=G6F-7$$\"3\")***\\i0XE`*F*$\"3(>H?:ns$G6F-7$$\"3
s*\\(o/Q*>c*F*$\"3Ao+K'pe&G6F-7$$\"3')***\\(Q(zSf*F*$\"3fu)*H*\\\"yG6F
-7$$\"3!**\\(=-,FC'*F*$\"3j*Qo535!H6F-7$$\"3e*\\P4tFel*F*$\"3DLLVq!p#H
6F-7$$\"3Q++D\"3\"o'o*F*$\"3x<by+DaH6F-7$$\"3\\*\\(oz;)*=(*F*$\"3lM!z?
g])H6F-7$$\"3K+++&*44](*F*$\"3KJpVg)o,8\"F-7$$\"3-+]7jZ!>y*F*$\"3u]E#p
b;08\"F-7$$\"34+v=(4bM\")*F*$\"3lx&=D&R)38\"F-7$$\"3I++]xlWU)*F*$\"3!G
XnhoT78\"F-7$$\"3E+]i&3uc()*F*$\"3SKd:mdnJ6F-7$$\"3W+++lJR0**F*$\"3oYP
(p5'3K6F-7$$\"3/+v=-*zq$**F*$\"3z.x*Q\"paK6F-7$$\"3E+D\"G:3u'**F*$\"3
\\?[wq2,L6F-7$$\"\"\"\"\"!$\"35>Bm@W`L6F--%'COLOURG6&%$RGBG$\"*++++\"!
\")$FfzFfzF`[l-F$6$7S7$F($\"3gtrO-u[E6F-7$F/$\"3%>t%oY4RE6F-7$F4$\"3JF
se$>2j7\"F-7$F9$\"3B^W.8Q@E6F-7$F>$\"3\"He=OL@h7\"F-7$FC$\"3G9-v&[Jg7
\"F-7$FH$\"3EGecF2&f7\"F-7$FM$\"3T_0Vr-(e7\"F-7$FR$\"3`M&*[u5zD6F-7$FW
$\"3_3G%Q$orD6F-7$Ffn$\"3HJlRZgkD6F-7$F[o$\"3\"3*GMO*)eD6F-7$F`o$\"3)>
hZ;8Jb7\"F-7$Feo$\"3)3a&[f1[D6F-7$Fjo$\"3V*H'HJ)Ra7\"F-7$F_p$\"3')e$35
\"*4a7\"F-7$Fdp$\"3M\">\")y$QQD6F-7$Fip$\"3\"z*3&RNq`7\"F-7$F^q$\"3GR'
***H_OD6F-7$Fcq$\"3FY&>vqq`7\"F-7$Fhq$\"3TXkGK\")QD6F-7$F]r$\"3%3&Qx&Q
;a7\"F-7$Fbr$\"3-b(*Q$eea7\"F-7$Fgr$\"3C$pING4b7\"F-7$F\\s$\"3h\\#*pTt
dD6F-7$Fas$\"3;\"Gk`Kjc7\"F-7$Ffs$\"3z*pnMM^d7\"F-7$F[t$\"39[Epn1'e7\"
F-7$F`t$\"3*oB'R*o*)f7\"F-7$Fet$\"3^+JXYA8E6F-7$Fjt$\"3EyjuLgGE6F-7$F_
u$\"3;t\"*Q3cZE6F-7$Fdu$\"3E`Uh>LmE6F-7$Fiu$\"3dJTi*Q#)o7\"F-7$F^v$\"3
VPH4Zz4F6F-7$Fcv$\"3Px#fPg_t7\"F-7$Fhv$\"3(=AzAu5w7\"F-7$F]w$\"38a#Q^>
+z7\"F-7$Fbw$\"3D.g2\")H?G6F-7$Fgw$\"32*4K.OT&G6F-7$F\\x$\"3]$=1&R$)))
G6F-7$Fax$\"3l\"**='f\\EH6F-7$Ffx$\"3sc83#fg'H6F-7$F[y$\"3\\9JxzQ/I6F-
7$F`y$\"35x/F&y108\"F-7$Fey$\"3#zu$4!\\U48\"F-7$Fjy$\"3>EAW1*H98\"F-7$
F_z$\"3FK)QM\")=>8\"F-7$Fdz$\"3b*QS\"H*oC8\"F--Fjz6&F\\[lF`[lF][lF`[l-
F$6$7S7$F($\"3;!)G9\\uzB6F-7$F/$\"3pTxk'*[uB6F-7$F4$\"3;Bo?O\"*pB6F-7$
F9$\"3Z#\\]TC[O7\"F-7$F>$\"3b<m&>F)fB6F-7$FC$\"3,1q'*e/bB6F-7$FH$\"3T*
[eVU3N7\"F-7$FM$\"3ht*>b!yYB6F-7$FR$\"39O'zR_HM7\"F-7$FW$\"3%y,&4sdRB6
F-7$Ffn$\"3?\\1g<jOB6F-7$F[o$\"3))RP<S`MB6F-7$F`o$\"3Ayj&>!zKB6F-7$Feo
$\"3**o(pFi<L7\"F-7$Fjo$\"3WEoG*>:L7\"F-7$F_p$\"39S32p)>L7\"F-7$Fdp$\"
3yI3'ocML7\"F-7$Fip$\"3GbAs4`NB6F-7$F^q$\"3q(fKOj*QB6F-7$Fcq$\"3!=8J`p
HM7\"F-7$Fhq$\"3`Vj#yp%[B6F-7$F]r$\"3'H**oAP[N7\"F-7$Fbr$\"3DI3*f9FO7
\"F-7$Fgr$\"3(o;#>'36P7\"F-7$F\\s$\"3x&[h'>Y\"Q7\"F-7$Fas$\"3am-.Jq$R7
\"F-7$Ffs$\"3r%3OhScS7\"F-7$F[t$\"3KPALB#*>C6F-7$F`t$\"3=**eBNCOC6F-7$
Fet$\"3I*Q!RK!QX7\"F-7$Fjt$\"3%zk1**RBZ7\"F-7$F_u$\"3Kxxa)eZ\\7\"F-7$F
du$\"3U*f+Z*f;D6F-7$Fiu$\"3Y\\li4uTD6F-7$F^v$\"34D2+#*=mD6F-7$Fcv$\"3h
ws\"3vZf7\"F-7$Fhv$\"3v*p/`%[BE6F-7$F]w$\"3[\\(4j9al7\"F-7$Fbw$\"3h:Qk
)p&)o7\"F-7$Fgw$\"3*fQ<@v`s7\"F-7$F\\x$\"3)R#H>$))Gw7\"F-7$Fax$\"36G()
ydQ.G6F-7$Ffx$\"3[60AvrXG6F-7$F[y$\"3Ah,t?b')G6F-7$F`y$\"30B'Rdpc$H6F-
7$Fey$\"3(G7)oys\")H6F-7$Fjy$\"3\">Za\")zI.8\"F-7$F_z$\"3Bm&3>GW38\"F-
7$Fdz$\"3Ia&4eO?98\"F--Fjz6&F\\[lF`[lF`[lF][l-F$6$7S7$F($\"3z,1JA(f67
\"F-7$F/$\"3<z(o#4+:@6F-7$F4$\"3O>)o]KT67\"F-7$F9$\"3UU%)>,>8@6F-7$F>$
\"3#3[1.UB67\"F-7$FC$\"3<YHOUm6@6F-7$FH$\"3Uep^9C6@6F-7$FM$\"3mT44%p56
7\"F-7$FR$\"3y.jBoB6@6F-7$FW$\"3^Dv,g\"=67\"F-7$Ffn$\"3:@!yu2H67\"F-7$
F[o$\"3U]!>%)RV67\"F-7$F`o$\"3GJi.)Rl67\"F-7$Feo$\"33A_!>R%>@6F-7$Fjo$
\"3R,Qg)\\H77\"F-7$F_p$\"3wP1euzE@6F-7$Fdp$\"3&oZ**R_A87\"F-7$Fip$\"3b
2J'esw87\"F-7$F^q$\"3wFCD<'\\97\"F-7$Fcq$\"3*[gO`\\B:7\"F-7$Fhq$\"3YyP
lX_h@6F-7$F]r$\"3=!*=)Hc8<7\"F-7$Fbr$\"36-Gr8\"G=7\"F-7$Fgr$\"3F/9lrX%
>7\"F-7$F\\s$\"33#*\\n8G3A6F-7$Fas$\"3a:m%*p3CA6F-7$Ffs$\"31R^&>$4RA6F
-7$F[t$\"3C-tDIlcA6F-7$F`t$\"3-!fy)4KwA6F-7$Fet$\"3R\"[`I:rH7\"F-7$Fjt
$\"3VSk@Tu=B6F-7$F_u$\"36%\\'HDbWB6F-7$Fdu$\"3aPM2$*RpB6F-7$Fiu$\"3a#Q
1'*3xR7\"F-7$F^v$\"31WAG2*\\U7\"F-7$Fcv$\"3(4TsgLmX7\"F-7$Fhv$\"3+RL\\
.=)[7\"F-7$F]w$\"3BGGPb.BD6F-7$Fbw$\"3Zp57-,fD6F-7$Fgw$\"3)\\2%fVs)f7
\"F-7$F\\x$\"38(HsS(**QE6F-7$Fax$\"3Pm*H.vAo7\"F-7$Ffx$\"3i(zkl@ts7\"F
-7$F[y$\"3QipsPhqF6F-7$F`y$\"3Usu!>/D#G6F-7$Fey$\"3.pkpI+rG6F-7$Fjy$\"
3'[.`5;\\#H6F-7$F_z$\"3xREFhnyH6F-7$Fdz$\"3w'z,/L)QI6F--Fjz6&F\\[lFfzF
fzFfz-%&TITLEG6#Q4Trapping~Tolman~VII6\"-%+AXESLABELSG6$Q#xiF]hmQ!F]hm
-%%VIEWG6$;$\"#&)!\"#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 9 "w - modes" }}}{EXCHG {PARA 0 "
" 0 "" {MPLTEXT 0 21 9 "Potential" }}}{EXCHG {PARA 0 "> " 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 24 "Vj:=subs(R=1,gamma=1,V):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 23 "V1:=subs(alpha=2.8,Vj):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 23 "V2:=subs(alpha=2.9,Vj):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 23 "V3:=subs(alpha=3.0,Vj):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 24 "V4:=subs(alpha=3.02,Vj):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 90 "plot([V1,V2,V3,V4],xi=0.7..1.0,colo
r=[red,green,blue,black],title=\"w - modes Tolamn VII\");" }}{PARA 13 
"" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7S7$$\"3a****
**********p!#=$\"3muvBY)Q$f@!#<7$$\"3;****\\i9RlqF*$\"3McQc&QtQ<#F-7$$
\"3k**\\PC#)GArF*$\"33m<%)pi(o=#F-7$$\"3s***\\Peui=(F*$\"3Y\"3*R!ey=?#
F-7$$\"3U***\\i3&o]sF*$\"31ECZ/mO<AF-7$$\"3P**\\(oX*y9tF*$\"3vr3!ozWJB
#F-7$$\"39+]P9CAutF*$\"3yHyMK!y![AF-7$$\"3:**\\P*zhdV(F*$\"3g;'*p,\"HQ
E#F-7$$\"3c**\\P>fS*\\(F*$\"3[DeV$[//G#F-7$$\"3m**\\(=$f%Gc(F*$\"35[(p
dD!>(H#F-7$$\"3q****\\#y,\"GwF*$\"3rT!phI-ZJ#F-7$$\"3!****\\7<zbo(F*$
\"3a#eZwn3.L#F-7$$\"3G****\\(4&G]xF*$\"3;F=Wy=0[BF-7$$\"3V****\\7nD:yF
*$\"3Ur(\\E??gO#F-7$$\"3Q++]-*oy(yF*$\"3i[*\\#GhW$Q#F-7$$\"35+]PpnsMzF
*$\"3eEJh?ZL*R#F-7$$\"3C++]siL-!)F*$\"3YTduP$o#=CF-7$$\"3M*******Q5'f!
)F*$\"3MO()\\,$3VV#F-7$$\"3K**\\P/QBE\")F*$\"3sbsf6W#HX#F-7$$\"39+++:o
?&=)F*$\"3[;ugnkKpCF-7$$\"31+]Pa&4*\\#)F*$\"33#H&=GX>([#F-7$$\"3&)**\\
7j=_6$)F*$\"3%))>VJmSS]#F-7$$\"3a++vVy!eP)F*$\"3u#*Q/TMR@DF-7$$\"34+](
=WU[V)F*$\"3jba:gD3PDF-7$$\"3=++DJ#>&)\\)F*$\"3)3@&>q<p`DF-7$$\"3w**\\
P>:mk&)F*$\"3%4To>BV0d#F-7$$\"3t**\\iv&QAi)F*$\"3UO:1rF$[e#F-7$$\"3%)*
**\\PPBWo)F*$\"3;n([#=#>)*f#F-7$$\"3!******\\Nm'[()F*$\"3p^(f?SgZh#F-7
$$\"3\"****\\(yb^6))F*$\"3#[>_'R+zGEF-7$$\"3?+]PMaKs))F*$\"3='4(*\\+g<
k#F-7$$\"3t***\\7TW)R*)F*$\"3/ussoXSbEF-7$$\"3,+++:K^+!*F*$\"3;n_anM$p
m#F-7$$\"3i****\\7,Hl!*F*$\"3I\"GgG.C%yEF-7$$\"3U**\\P4w)R7*F*$\"3g$=B
?Ng!)o#F-7$$\"3s****\\x%f\")=*F*$\"3A3^dSGq(p#F-7$$\"3!)**\\P/-a[#*F*$
\"3!o\"Hye6)eq#F-7$$\"3E+](=Yb;J*F*$\"3_I/0'RfMr#F-7$$\"3k****\\i@Ot$*
F*$\"3-?,*y)*p)>FF-7$$\"33+]PfL'zV*F*$\"3#4Wb<+%[DFF-7$$\"3j+++!*>=+&*
F*$\"3x?2`KazHFF-7$$\"3-++DE&4Qc*F*$\"3Rlo$GShIt#F-7$$\"3<+]P%>5pi*F*$
\"3/L+k#)=8NFF-7$$\"3g+++bJ*[o*F*$\"3e\\v\\)=*)ft#F-7$$\"3_++Dr\"[8v*F
*$\"3V&R*QY?sNFF-7$$\"3*3+++L'y5)*F*$\"3YeUrz*RVt#F-7$$\"33+]P/)fT()*F
*$\"3QJM)=xo;t#F-7$$\"3^+]i0j\"[$**F*$\"3!)[_p91&zs#F-7$$\"\"\"\"\"!$
\"3^K4Gv!*oAFF--%'COLOURG6&%$RGBG$\"*++++\"!\")$FfzFfzF`[l-F$6$7S7$F($
\"3A_:2-?KfEF-7$F/$\"3/AuKTj'\\m#F-7$F4$\"3=upH$f$GqEF-7$F9$\"3_\\:\"
\\b\"pwEF-7$F>$\"3Eyg<UVd$o#F-7$FC$\"3?R5#Q3G3p#F-7$FH$\"3Y\")=G*y))yp
#F-7$FM$\"3)z::x2:bq#F-7$FR$\"3%fRicB7Pr#F-7$FW$\"3V&3lg`n@s#F-7$Ffn$
\"3n\\Cu=*G6t#F-7$F[o$\"3w%*>I;o@RFF-7$F`o$\"3u!*G`=%3&[FF-7$Feo$\"3[
\"p\"f\"3-!eFF-7$Fjo$\"3-]kU?7FnFF-7$F_p$\"3%\\F``1hdx#F-7$Fdp$\"3o_>M
/x!fy#F-7$Fip$\"3kuK$y69Xz#F-7$F^q$\"3:!ys\"yo\\/GF-7$Fcq$\"3Y-t$pYrK
\"GF-7$Fhq$\"3l,aq\\**yAGF-7$F]r$\"39!=H6d2<$GF-7$Fbr$\"3V$o46v:3%GF-7
$Fgr$\"3CXiuoP'*[GF-7$F\\s$\"3s.5%)HqZdGF-7$Fas$\"3#Qv4(3$of'GF-7$Ffs$
\"3K$3>ppFI(GF-7$F[t$\"3W]`***Hi-)GF-7$F`t$\"3it/@'fls)GF-7$Fet$\"3u)R
.;#zg$*GF-7$Fjt$\"3c%HH9cA#**GF-7$F_u$\"3k<&3*=g![!HF-7$Fdu$\"3@#Qz&ph
>4HF-7$Fiu$\"3JQRAlT=8HF-7$F^v$\"31!))>!*\\Ph\"HF-7$Fcv$\"3vZv#R)*3'=H
F-7$Fhv$\"3_3:B`x<?HF-7$F]w$\"30sy/T*)*4#HF-7$Fbw$\"3[tcH)oh4#HF-7$Fgw
$\"39y-^D<+?HF-7$F\\x$\"30@iH$pf\"=HF-7$Fax$\"3g$3ZIb?`\"HF-7$Ffx$\"3G
0y3V+`6HF-7$F[y$\"3Qkc(\\<wr!HF-7$F`y$\"325(H0SY6!HF-7$Fey$\"3gEDwfK![
*GF-7$Fjy$\"3GjvxRd/()GF-7$F_z$\"3A'4\"zDrlyGF-7$Fdz$\"37y1[HFfoGF--Fj
z6&F\\[lF`[lF][lF`[l-F$6$7U7$F($\"3aIJ[f?i>JF-7$F/$\"3#zQ_=6fh6$F-7$F4
$\"3/%pl(ygj8JF-7$F9$\"3d<LyuUJ6JF-7$F>$\"3%GxOY;(\\4JF-7$FC$\"3&[ENIB
u\"3JF-7$FH$\"3wIB**G=N2JF-7$FM$\"3wY*e69\")o5$F-7$FR$\"3\"H=Snpqn5$F-
7$FW$\"3wK*\\lj3q5$F-7$Ffn$\"3XQIL/0e2JF-7$F[o$\"3D8sd#pH$3JF-7$F`o$\"
3?2+JzXT4JF-7$Feo$\"3YbYQ(zC26$F-7$Fjo$\"3pGG@r1;7JF-7$F_p$\"3AH#>Z$=e
8JF-7$Fdp$\"3[2oNH&y`6$F-7$Fip$\"3g?\"*[I!fp6$F-7$F^q$\"3^Cwah]#)=JF-7
$Fcq$\"3If?KjnY?JF-7$Fhq$\"3z9%)3&[<A7$F-7$F]r$\"33vkj*[(zBJF-7$Fbr$\"
3q>=h1WJDJF-7$Fgr$\"3)Q[L+%GbEJF-7$F\\s$\"3Q9$o'*H$oFJF-7$Fas$\"3Xj%fM
%zeGJF-7$Ffs$\"330\"Gwj:\"HJF-7$F[t$\"3X8=^!ew$HJF-7$F`t$\"3%ofPU9p#HJ
F-7$Fet$\"33ho/7KvGJF-7$Fjt$\"38RiV@/$y7$F-7$F_u$\"3OUN]ZaFEJF-7$Fdu$
\"3:$='RrcOCJF-7$Fiu$\"3\\]%y4K`<7$F-7$F^v$\"3SR4!e,W)=JF-7$Fcv$\"3B?*
*yn4/:JF-7$Fhv$\"3#p<[+<S36$F-7$F]w$\"3,c)GARvd5$F-7$Fbw$\"3[LI;%)>8+J
F-7$Fgw$\"3avbMlaY$4$F-7$F\\x$\"3'e\"QB)>*G'3$F-7$Fax$\"3')QiSCN;yIF-7
$Ffx$\"3sTJK`@IpIF-7$F[y$\"3[Adl7AWgIF-7$F`y$\"3'3nNHDJ%\\IF-7$Fey$\"3
M?v$3J+)QIF-7$Fjy$\"3%>d94HYm-$F-7$$\"3H+++b!)[/**F*$\"3E^KiE*H0-$F-7$
F_z$\"31=d[n$>U,$F-7$$\"3E+D\"G:3u'**F*$\"3.4z:>:A2IF-7$Fdz$\"3'Hdc)**
******HF--Fjz6&F\\[lF`[lF`[lF][l-F$6$7S7$F($\"3v!4>k=5q?$F-7$F/$\"3U?Y
$f2P<?$F-7$F4$\"3#Q'oL^&ew>$F-7$F9$\"3!pu[\\,3O>$F-7$F>$\"3s'p]+hr+>$F
-7$FC$\"3/vFy7t0(=$F-7$FH$\"3YItIgNo%=$F-7$FM$\"3oO+wsFi#=$F-7$FR$\"3M
6w(4[%)3=$F-7$FW$\"3+1hLaf^zJF-7$Ffn$\"3qdMI'e^%yJF-7$F[o$\"3)Q<)ymFxx
JF-7$F`o$\"3w'G#)4Wks<$F-7$Feo$\"3#3hK$4**)p<$F-7$Fjo$\"3A(*=*Qe7p<$F-
7$F_p$\"3O!)o^99(p<$F-7$Fdp$\"3_-AKQF;xJF-7$Fip$\"3ws=17dRxJF-7$F^q$\"
3q5?sW(3x<$F-7$Fcq$\"3K<P;'**))z<$F-7$Fhq$\"3)eW9Mfg#yJF-7$F]r$\"3)Q$*
4KrY%yJF-7$Fbr$\"3EDtAN\\_yJF-7$Fgr$\"3'GI.0\"oXyJF-7$F\\s$\"3CIZo#G%>
yJF-7$Fas$\"3KB(zJqqw<$F-7$Ffs$\"3W\"zP<Lrp<$F-7$F[t$\"3u@ReFZ#f<$F-7$
F`t$\"3cV'Q\\n'[uJF-7$Fet$\"3MtbM/)*osJF-7$Fjt$\"3+:BZP\"[0<$F-7$F_u$
\"3%y#*og^kw;$F-7$Fdu$\"3]fe\\WSekJF-7$Fiu$\"3!*=R/jpugJF-7$F^v$\"3OTZ
9d7vcJF-7$Fcv$\"3)o3wG)oy^JF-7$Fhv$\"3[SRb-%>l9$F-7$F]w$\"3#zjPX[n.9$F
-7$Fbw$\"3'pr!)G^*oLJF-7$Fgw$\"3eU%z'*oqf7$F-7$F\\x$\"3(R-A#)Q6y6$F-7$
Fax$\"3lFk$)[>r3JF-7$Ffx$\"3Y=$>?)o\"*)4$F-7$F[y$\"3W07$\\VF#*3$F-7$F`
y$\"3wJ\\3>'*HxIF-7$Fey$\"3_*RUWXze1$F-7$Fjy$\"3s%eR/7;H0$F-7$F_z$\"3[
rH4icuRIF-7$Fdz$\"3BELYM5wCIF--Fjz6&F\\[lFfzFfzFfz-%&TITLEG6#Q5w~-~mod
es~Tolamn~VII6\"-%+AXESLABELSG6$Q#xiFghmQ!Fghm-%%VIEWG6$;$\"\"(!\"\"$
\"#5Fcim%(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(grcomponent(p,[]),xi)
/(diff(grcomponent(rho,[]),xi))):" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 26 "vsj:=subs(R=1,gamma=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 82 "plot([vs1,vs2,vs3,vs4],xi=0.
.1,color=[red,green,blue,black],title=\"V Tolman VII\");" }}{PARA 13 "
" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6)-%'CURVESG6$7hn7$$\"3`****
*\\n5;\"o!#@$\"3Ao#o$H-gnd!#=7$$\"3#******\\8ABO\"!#?$\"3!)>b!>I%fndF-
7$$\"33+++-K[V?F1$\"3=ZfzAWendF-7$$\"3#)******pUkCFF1$\"3S'*>.#fqvw&F-
7$$\"3s*****\\Smp3%F1$\"3Alf\\v5`ndF-7$$\"3k******R&)G\\aF1$\"3our<_dZ
ndF-7$$\"3Y******4G$R<)F1$\"3G\\)pWo<tw&F-7$$\"3%******zqd)*3\"!#>$\"3
W5f)pQ'4ndF-7$$\"3*)*****>c'yM;FP$\"33%)=9\"4kkw&F-7$$\"3')*****fT:(z@
FP$\"3_;x%Q$)ybw&F-7$$\"3#*******zZ*z7$FP$\"3m#3!ym]VjdF-7$$\"33+++XTF
wSFP$\"33y,U8[_gdF-7$$\"3&******4z_\"4iFP$\"3Kxc&Q$e<^dF-7$$\"3o******
R&phN)FP$\"3^%)oQF\"Ryt&F-7$$\"3++++*=)H\\5F-$\"3oHiKC]k?dF-7$$\"3%***
***z/3uC\"F-$\"3Wu:U+#)>,dF-7$$\"35+++J$RDX\"F-$\"3Ku*Qy]$\\xcF-7$$\"3
7+++)R'ok;F-$\"3M0$=g(49\\cF-7$$\"3-+++1J:w=F-$\"3RxUn=[(ph&F-7$$\"33+
++3En$4#F-$\"3)Hr\"y_TzzbF-7$$\"3-+++/RE&G#F-$\"3:n.*42#eVbF-7$$\"3\")
*****\\K]4]#F-$\"3!3&GY@K!*)\\&F-7$$\"3$******\\PAvr#F-$\"3Ua=(H9M)\\a
F-7$$\"3)******\\nHi#HF-$\"31))ygN$=&)R&F-7$$\"3*)*****p*ev:JF-$\"3yX,
zUoX[`F-7$$\"3$)*****z!47TLF-$\"3)=#y$QX!f%G&F-7$$\"3?+++LY.KNF-$\"3q7
4^u[vE_F-7$$\"3u*****4o7Tv$F-$\"3G@z/E;6b^F-7$$\"31+++$Q*o]RF-$\"3;<:1
F<s(3&F-7$$\"3?+++\"=lj;%F-$\"3\"oiZpSC%4]F-7$$\"3++++V&R<P%F-$\"3;#4F
!3\"e0$\\F-7$$\"3/+++Xh-'e%F-$\"3jK+.Y)4P%[F-7$$\"3!*******Q\"3Gy%F-$
\"3wUosH6yfZF-7$$\"3!)*****H5k]*\\F-$\"3?1+-:lokYF-7$$\"3A+++(RQb@&F-$
\"3%)edzf9zgXF-7$$\"3`+++=>Y2aF-$\"3s^!*[Ch,mWF-7$$\"3\\+++yXu9cF-$\"3
;E5/*yF!fVF-7$$\"3d******[y))GeF-$\"3#ep9?&*RLC%F-7$$\"3.+++i_QQgF-$\"
3u1(**4_q\\7%F-7$$\"3A+++!y%3TiF-$\"3q7M(**\\Pa+%F-7$$\"35+++O![hY'F-$
\"3=$=u`)Q!o'QF-7$$\"3I+++#Qx$omF-$\"3wQjz&3!zOPF-7$$\"3s*****RP+V)oF-
$\"3KYc&*[N7#f$F-7$$\"3Y*****ppe*zqF-$\"3%es6[**ocX$F-7$$\"3u*****R#\\
'QH(F-$\"3S7hj)*zY+LF-7$$\"3#******H,M^\\(F-$\"3W#4\"[4&)\\[JF-7$$\"3S
+++0#=bq(F-$\"3Y&=rY(yC$)HF-7$$\"3Y*****p?27\"zF-$\"3<lF*e-o]\"GF-7$$
\"3a+++IXaE\")F-$\"3S1s)oXz:j#F-7$$\"37+++l*RRL)F-$\"3e5h'=)3:ZCF-7$$
\"3i*****HvJga)F-$\"3A5pRMB&*\\AF-7$$\"3s*****HJnjv)F-$\"3?e6.ANmW?F-7
$$\"3k******[Qk\\*)F-$\"3q%*HlGl'f%=F-7$$\"3w******o0;r\"*F-$\"3D))yiu
RM.;F-7$$\"3[*****\\w(Gp$*F-$\"3oY-X(HqzO\"F-7$$\"37+++!oK0e*F-$\"3ymH
'pH\"*p3\"F-7$$\"33+++[oi\"o*F-$\"3DI%GMW-VM*FP7$$\"33+++<5s#y*F-$\"37
2<B&Q&H7wFP7$$\"3++++30O\"*)*F-$\"3c(3g![$Q&)H&FP7$$\"\"\"\"\"!$\"3oB
\"Hd9Kj?'!#E-%'COLOURG6&%$RGBG$\"*++++\"!\")$F_^lF_^lFj^l-F$6$7hn7$F($
\"3jQ)eQ**H/\"oF-7$F/$\"3e+F@\\GU5oF-7$F5$\"33x]YT4T5oF-7$F:$\"3.`)41F
%R5oF-7$F?$\"3@?,aRmM5oF-7$FD$\"33Ig!f&*z-\"oF-7$FI$\"3t9)f.V*35oF-7$F
N$\"3eJ6T#pA)4oF-7$FT$\"3*3vU*p014oF-7$FY$\"3o')z^jN*z!oF-7$Fhn$\"3lP
\"z!\\(4a!oF-7$F]o$\"3ZF.l)H->!oF-7$Fbo$\"3qDic2jj!z'F-7$Fgo$\"3-1a<%o
oXx'F-7$F\\p$\"3-iC@(GgQv'F-7$Fap$\"3.BA#HVZ/t'F-7$Ffp$\"3rbp#oj?>q'F-
7$F[q$\"33-yC7z\"ym'F-7$F`q$\"32Z7'*Q0:HmF-7$Feq$\"3wNv6fS[%e'F-7$Fjq$
\"3i%QFp355a'F-7$F_r$\"3M^WwH%4u['F-7$Fdr$\"3nd5mz$)eGkF-7$Fir$\"3#4Sk
s)Q7njF-7$F^s$\"3=;/.L&3sI'F-7$Fcs$\"3>+;q_W$3B'F-7$Fhs$\"3[ND@5,thhF-
7$F]t$\"3wxkQq))>wgF-7$Fbt$\"3o(zp<47e*fF-7$Fgt$\"3o(*QRo&)[-fF-7$F\\u
$\"3QtL9+-c3eF-7$Fau$\"3!)y@E*e,_q&F-7$Ffu$\"30YeFlXQ0cF-7$F[v$\"315'>
d&oN#\\&F-7$F`v$\"3K5Qqv*R*o`F-7$Fev$\"3'*e!3\"R&4kD&F-7$Fjv$\"3Pe(Hi]
E%H^F-7$F_w$\"3OG-?3=;#*\\F-7$Fdw$\"3'[]FJ\"zu^[F-7$Fiw$\"3vW$)>YR(*4Z
F-7$F^x$\"3_eOU6kbXXF-7$Fcx$\"3y:*=-Vh8R%F-7$Fhx$\"34UL]%*)y(>UF-7$F]y
$\"3i)*\\*RpAz0%F-7$Fby$\"33NNkWY\"Q(QF-7$Fgy$\"3)z#>1?-`$p$F-7$F\\z$
\"3_i)\\S/%\\(\\$F-7$Faz$\"3'QnZ>Z6!)H$F-7$Ffz$\"37eYe&pU/3$F-7$F[[l$
\"3)Gj/@w')='GF-7$F`[l$\"3;/!ow,4%GEF-7$Fe[l$\"3AeFRZ=n&Q#F-7$Fj[l$\"3
c()ySi)H6:#F-7$F_\\l$\"3O*pfu1,a'=F-7$Fd\\l$\"37&HulsK!*e\"F-7$Fi\\l$
\"3S$40'HpJg7F-7$F^]l$\"3GSiP)Q7C3\"F-7$Fc]l$\"3[]d(*37D4))FP7$Fh]l$\"
3?H=\")=Q0DhFP7$F]^l$\"3eKav,6Qv)*Fb^l-Fd^l6&Ff^lFj^lFg^lFj^l-F$6$7hn7
$F($\"3'e(yJ5Aqo))F-7$F/$\"3OW'=<+#po))F-7$F5$\"3]:3R()\\no))F-7$F:$\"
3!)42Mn6lo))F-7$F?$\"3;')=65Jeo))F-7$FD$\"3UWP8Iy[o))F-7$FI$\"3AR)QDg:
#o))F-7$FN$\"3I\\.='[My'))F-7$FT$\"3s#=5pfXn'))F-7$FY$\"3wWjD)=@_'))F-
7$Fhn$\"3?np3m,`h))F-7$F]o$\"3aCB^d1_c))F-7$Fbo$\"3?T8.ftVS))F-7$Fgo$
\"3'oCU4_=v\"))F-7$F\\p$\"3)eLD7E8!)y)F-7$Fap$\"3;_)*4<$*pa()F-7$Ffp$
\"3iX*Q^8sTr)F-7$F[q$\"3K.5o%f8em)F-7$F`q$\"3'GWLIP*46')F-7$Feq$\"3#H3
uqq[![&)F-7$Fjq$\"39*\\-u>No[)F-7$F_r$\"3b=E<dsc6%)F-7$Fdr$\"3e,%>NHA#
H$)F-7$Fir$\"3Td(G`f_MC)F-7$F^s$\"3ouYF$=3,;)F-7$Fcs$\"3)\\u/!=TBa!)F-
7$Fhs$\"3)QC\\2:y(ezF-7$F]t$\"3R?K1H61TyF-7$Fbt$\"3YI/OD)R3t(F-7$Fgt$
\"3hfkRM7O.wF-7$F\\u$\"3=dp%GS^bZ(F-7$Fau$\"3?Up`d0XNtF-7$Ffu$\"3I#4Ib
Jb1?(F-7$F[v$\"3#)*3tDhy&[qF-7$F`v$\"31>t9.-:$)oF-7$Fev$\"3yaS`=z$Gt'F
-7$Fjv$\"3SDE@txwjlF-7$F_w$\"3Gus,S%)f\"Q'F-7$Fdw$\"3e^c)GU;e>'F-7$Fiw
$\"3!*)e&y'e\\(3gF-7$F^x$\"3]t>g*QrBz&F-7$Fcx$\"35tjR9f#**e&F-7$Fhx$\"
3uR+\"*p87l`F-7$F]y$\"3e^TdoFX`^F-7$Fby$\"3%R<o#[))38\\F-7$Fgy$\"3_*[L
mx\"4yYF-7$F\\z$\"3I`zNJl&HU%F-7$Faz$\"3g5og[XvjTF-7$Ffz$\"3#\\.%fbKc
\")QF-7$F[[l$\"3/XJ?rip)f$F-7$F`[l$\"3/H**f;=I(H$F-7$Fe[l$\"3g]\\F#f!)
\\)HF-7$Fj[l$\"3k=L$[6&Q%o#F-7$F_\\l$\"3B/\\%yRM+K#F-7$Fd\\l$\"3w4nS/C
$)p>F-7$Fi\\l$\"31Ha]:]Vc:F-7$F^]l$\"3[V!\\j2xTL\"F-7$Fc]l$\"33:-J!f&o
$3\"F-7$Fh]l$\"31i<DD8V=vFP7$F]^l$\"3jM_\"o*HJVxFb^l-Fd^l6&Ff^lFj^lFj^
lFg^l-F$6$7`o7$F($\"3+t9NL\\=%y\"!#<7$F/$\"3[d&R\"=6=%y\"Fcfm7$F5$\"3)
)z'y%fZ<%y\"Fcfm7$F:$\"3=(G2u&e;%y\"Fcfm7$F?$\"3kvPEB/9%y\"Fcfm7$FD$\"
3+yVK;[5%y\"Fcfm7$FI$\"3y%z\\x3.Sy\"Fcfm7$FN$\"3y#yE:ogQy\"Fcfm7$FT$\"
39C*p^*QX$y\"Fcfm7$FY$\"3ET!yXh%)Gy\"Fcfm7$Fhn$\"3-oh9Cs]\"y\"Fcfm7$F]
o$\"3e6D.m+kz<Fcfm7$Fbo$\"3]!oZg%Hmt<Fcfm7$Fgo$\"3a6#=cF\">l<Fcfm7$F\\
p$\"35hf&))QjVv\"Fcfm7$Fap$\"3@sk#QUUAu\"Fcfm7$Ffp$\"3qN8e[UkF<Fcfm7$F
[q$\"33tJJJFV5<Fcfm7$F`q$\"3)pvmI_D7p\"Fcfm7$Feq$\"3M3[=lPVp;Fcfm7$Fjq
$\"3wAw\\:yh[;Fcfm7$F_r$\"34[xSU\"pMi\"Fcfm7$Fdr$\"3M=3]v;]'f\"Fcfm7$F
ir$\"37*f?A8(**o:Fcfm7$F^s$\"3ev;+h/#Ga\"Fcfm7$Fcs$\"3S[^M^!=.^\"Fcfm7
$Fhs$\"37C!*4(o.<[\"Fcfm7$F]t$\"3)RV&[\")\\FZ9Fcfm7$Fbt$\"3F)Q3BxdeT\"
Fcfm7$Fgt$\"3uIgxU&e/Q\"Fcfm7$F\\u$\"3Gtw`:D#fM\"Fcfm7$Fau$\"3_Np\\>25
48Fcfm7$Ffu$\"3y%p(\\E_ju7Fcfm7$F[v$\"3ep)ewH7oB\"Fcfm7$F`v$\"3%))eQ!3
1'o>\"Fcfm7$Fev$\"37X*R#=4ch6Fcfm7$Fjv$\"3N6P')y9\"H7\"Fcfm7$F_w$\"3w
\\%*GO9U#3\"Fcfm7$Fdw$\"3Z``4itDU5Fcfm7$Fiw$\"3Cv!zl5lG+\"Fcfm7$F^x$\"
3'*\\K(Qpy[e*F-7$Fcx$\"3/_=o\\q/!=*F-7$Fhx$\"3,7?q8#f4u)F-7$F]y$\"3([m
`I!*pkL)F-7$Fby$\"3'p$>t$)fT')yF-7$Fgy$\"3+ku_+?![X(F-7$F\\z$\"37t#yf
\"RV%*pF-7$Faz$\"3s(o_N0mW`'F-7$Ffz$\"3!*3H:$e&fTgF-7$F[[l$\"3)RO)R122
bbF-7$F`[l$\"3q1JK\"[*[W]F-7$Fe[l$\"3y/FZL2uBXF-7$Fj[l$\"3UHIne4rISF-7
$F_\\l$\"3k'G]X&QNWMF-7$Fd\\l$\"3ECzR+?,$*GF-7$Fi\\l$\"3%p%y0U%R#eAF-7
$F^]l$\"3B![zb%o8C>F-7$Fc]l$\"3_-u&4cALb\"F-7$$\"3*******>wSq$)*F-$\"3
Qs],[K>G8F-7$Fh]l$\"3wK3\"z6$[q5F-7$$\"3++++\"Q?&=**F-$\"3#370\\hk)4#*
FP7$$\"3++++a-oX**F-$\"3/3\"=N9i+Z(FP7$$\"3/+++\">g#f**F-$\"3;cgPNxnZk
FP7$$\"3++++F,%G(**F-$\"3se2L`='oC&FP7$$\"3]*****f4I'z**F-$\"3o>&3Skoi
`%FP7$$\"3/+++k+U')**F-$\"3kdmGH2g(p$FP7$$\"3Y*****>.5K***F-$\"3yNRP(z
y,h#FP7$%%FAILGF[dn-Fd^l6&Ff^lF_^lF_^lF_^l-%&TITLEG6#Q-V~Tolman~VII6\"
-%+AXESLABELSG6$Q#xiFbdnQ!Fbdn-%%VIEWG6$;Fj^lF]^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" "C
urve 3" "Curve 4" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{MARK "59 0 0" 0 }{VIEWOPTS 1 1 0 1 
1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }