Closed rtoy closed 3 months ago
rtoy
commented
3 months ago Imported from SourceForge on 2024-07-04 20:21:59 Created by vttoth on 2006-01-16 00:57:58 Original: https://sourceforge.net/p/maxima/bugs/858/#6f6b
Logged In: YES user_id=1023504
Thanks. Corrected in CVS.
rtoy
commented
3 months ago Imported from SourceForge on 2024-07-04 20:22:03 Created by robert_dodier on 2006-01-16 13:10:55 Original: https://sourceforge.net/p/maxima/bugs/858/#ae06
Logged In: YES user_id=501686
Changing status to "closed".
By the way the current cvs version can be found at: http://cvs.sf.net/viewcvs.py/\*checkout\*/maxima/maxima/share/tensor/ctensor.mac Revision history: http://cvs.sf.net/viewcvs.py/maxima/maxima/share/tensor/ctensor.mac
rtoy
commented
3 months ago Imported from SourceForge on 2024-07-04 20:22:06 Created by robert_dodier on 2006-01-16 13:10:55 Original: https://sourceforge.net/p/maxima/bugs/858/#d322
Imported from SourceForge on 2024-07-04 20:21:58 Created by callaham on 2006-01-15 19:26:07 Original: https://sourceforge.net/p/maxima/bugs/858
In Maxima 5.9.2,
load(ctensor); ct_coordsys(kerr_newman);
defines a metric for Kerr (not general Kerr-Newman) spacetime in Boyer-Lindquist coordinates.
A metric for general Kerr-Newman spacetime in the coordinates called Kerr-Newman by Brandon Carter, Phys.Rev. 174:1559 (1968) would be:
dim:4$ ct_coords:[u,r,theta,phi]$ lg:matrix( [ (2*m*r-e^2)/(a^2*cos(theta)^2+r^2)-1, 1, 0, -a*(2*m*r-e^2)*sin(theta)^2/(a^2*cos(theta)^2+r^2) ], [ 1, 0, 0, -a*sin(theta)^2 ], [ 0, 0, a^2*cos(theta)^2+r^2, 0 ], [ -a*(2*m*r-e^2)*sin(theta)^2/(a^2*cos(theta)^2+r^2), -a*sin(theta)^2, 0,
sin(theta)^2*((r^2+a^2)^2-a^2*(r^2-2*m*r+e^2+a^2)*sin(theta)^2)/(a^2*cos(theta)^2+r^2) ] );