|
Galaktik2AequatorRoutine des AstroIx Paketes |
transform.tcl
set x [Galaktik2Aequator $jdv $l $b]
$jdv = Julianischer Tag
$l = Galaktische Länge in Grad
$b = Galaktische Breite in Grad
Rektaszension in Stunde und Deklination in Grad. (Die Ausgabe erfolgt in String mit einem Blank als Trennzeichen!)
Die Konstante 'pi' im Array 'const' muß gesetzt sein.
Verwendete Literatur: 0002
1997.11.27
AstroIx-Homepage: http://www.arco.de/~wopa/astroix.html