Astro::Time::HJD - Perl extension for calculating heliocentric julian date adjustment.
use Astro::Time::HJD qw( correction ); ($correction, $jd, $hjd ) = correction( $jd, $ra, $dec ); $correction = correction( $jd, $ra, $dec );
Given an observation date, right ascention and declination, calculates the correction to be added to the julian date of the observation to adjust it's observation time to a heliocentric julian date.
(SCALAR, SCALAR, SCALAR) = correction( SCALAR, SCALAR, SCALAR )SCALAR = correction( SCALAR, SCALAR, SCALAR )
The algorithms implemented have a stated accuracy of ``better than .1 seconds from 1900 through 2050'' per Patrick Wallace. Write me in 2049 and I'll see about updating this.
Robert Creager <Astro-HJD at LogicalChaos.org>
Patrick Wallace, personal communication Michael Koppelman, personal communication