|
AequatorHorizontRoutine des AstroIx Paketes |
transform.tcl
set x [AequatorHorizont $ra $de ]
$ra = Rektaszension in Stunde
$de = Deklination in Grad
Azimut und Höhe in Grad (Die Ausgabe erfolgt in einem String mit einem Blank als Trennzeichen!)
Der Azimut des Horizontsystems
wird von Süden aus über Westen gemessen. Vor Aufruf der Routine sollte in der
globalen Variablen 'in_zeit' die aktuelle Sternzeit gesetzt sein.
Die Konstante 'pi' im Array 'const' und die Konstante 'Breite' des Heimatortes muß im Array 'home' gesetzt sein.
Verwendete Literatur: 0002
1997.11.27
AstroIx-Homepage: http://www.arco.de/~wopa/astroix.html