nod Subroutine

subroutine nod(t, dpsi, deps)

SUBROUTINE NOD VERSION 2. IN LOW-ACCURACY MODE, THIS SUBROUTINE EVALUATES A SHORT NUTATION SERIES AND RETURNS APPROXIMATE VALUES FOR NUTATION IN LONGITUDE AND NUTATION IN OBLIQUITY FOR A GIVEN TDB JULIAN DATE. IN THIS MODE, ONLY THE LARGEST 13 TERMS OF THE IAU 2000A NUTATION SERIES ARE EVALUATED. IN HIGH-ACCURACY MODE, THE STANDARD IERS SUBROUINE IS CALLED TO EVALUATE THE FULL IAU 2000A NUTATION SERIES.

 T    = TDB TIME IN JULIAN CENTURIES SINCE J2000.0 (IN)
 DPSI = NUTATION IN LONGITUDE IN ARCSECONDS (OUT)
 DEPS = NUTATION IN OBLIQUITY IN ARCSECONDS (OUT)

NOTE: IN LOW-ACCURACY MODE, MAX ERROR IN DPSI < 0.05 ARCSEC, MAX ERROR IN DEPS < 0.02 ARCSEC, AVERAGE ERROR ABOUT 1/4 OF MAX.

Arguments

Type IntentOptional Attributes Name
double precision :: t
double precision :: dpsi
double precision :: deps

Calls

proc~~nod~~CallsGraph proc~nod NOVAS_F3.1_alt.f90::nod funarg funarg proc~nod->funarg getmod getmod proc~nod->getmod nu2000a nu2000a proc~nod->nu2000a