{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 }{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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "grtw();" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 15 "qload(newkerr);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "grcalc(diWeyl);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "gralter(_,13,6,7);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 13 "grdisplay(_);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 142 "Aman:=-360*m^2*((r-I*a*cos(theta))^(-1)*(r+I*a*cos(theta))^(-
9)+(r-I*a*cos(theta))^(-9)*(r+I*a*cos(theta))^(-1))*(r^2-2*m*r+a^2*cos
(theta)^2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "factor(simpl
ify(Aman));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "simplify(%+g
rcomponent(diWeyl,[]));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}}{MARK "0 0 0" 8 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 
0 1 2 33 1 1 }