![]() |
libTheSky
Routines to compute sky positions of Sun, Moon, planets and more
|
Procedures for VSOP. More...
Functions/Subroutines | |
subroutine | vsop87d_lbr (tm, pl, lon, lat, rad, lbaccur, raccur) |
Calculate true heliocentric ecliptic coordinates l,b,r for planet pl and the mean ecliptic and equinox of date using VSOP87D. | |
Procedures for VSOP.
subroutine thesky_vsop::vsop87d_lbr | ( | real(double), intent(in) | tm, |
integer, intent(in) | pl, | ||
real(double), intent(out) | lon, | ||
real(double), intent(out) | lat, | ||
real(double), intent(out) | rad, | ||
real(double), intent(in), optional | lbaccur, | ||
real(double), intent(in), optional | raccur ) |
Calculate true heliocentric ecliptic coordinates l,b,r for planet pl and the mean ecliptic and equinox of date using VSOP87D.
tm | Dynamical time in Julian Millennia after J2000.0, (tau in Meeus) |
pl | Planet to compute position for |
lon | Heliocentric longitude (rad) (output) |
lat | Heliocentric latitude (rad) (output) |
rad | Heliocentric distance (AU) (output) |
LBaccur | Desired accuracy of L,B (rad, optional) |
Raccur | Desired accuracy of R (AU, optional) |
Definition at line 58 of file vsop.f90.
References thesky_planetdata::vsopdat, thesky_planetdata::vsopnblk, and thesky_planetdata::vsopnls.
Referenced by thesky_comets::cometgc(), and thesky_planets::planet_position().