um522 - position of the Sun¶
- subroutine um522(amjd, kunit)¶
- Parameters:
amjd [real8,in] :: modified julian day
kunit [integer4,in] :: file unit for the summary table (see note of
ut990()
).
Description¶
The subroutine
um522()
computes the Greenwich hour angle of equinox as well as the GEO cartesian direction of the Sun. The results are stored in the argument msun of the common blockuc140
. When kunit is greater than zero, a summary table is written by the subroutine. Commonly the calls to the subroutineum522()
are followed by a call to the subroutineum523()
orum524()
to update the coordinate transformation used during the evaluation of the components of the external magnetic field. Note that subroutineum539()
combines the features of subroutinesum522()
,um523()
andum524()
with the features of subroutineum530()
.
References¶
Van Flandern, T.C., and Pulkkinen, K.F., Low precision formulae for planetary positions, Astroph. J. Suppl. 41 (1979) 391-411
Diagnostics¶
The program is aborted when an error occurs on the output device
Common Blocks¶
Dependencies¶
Called by¶
Calls¶
None
See also¶
None
Reported Bugs¶
None
Examples¶
UNILIB/tags/v3.02