diff options
| author | Joseph Hunkeler <jhunkeler@gmail.com> | 2015-07-08 20:46:52 -0400 |
|---|---|---|
| committer | Joseph Hunkeler <jhunkeler@gmail.com> | 2015-07-08 20:46:52 -0400 |
| commit | fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 (patch) | |
| tree | bdda434976bc09c864f2e4fa6f16ba1952b1e555 /math/slalib/doc/nut.hlp | |
| download | iraf-linux-fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4.tar.gz | |
Initial commit
Diffstat (limited to 'math/slalib/doc/nut.hlp')
| -rw-r--r-- | math/slalib/doc/nut.hlp | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/math/slalib/doc/nut.hlp b/math/slalib/doc/nut.hlp new file mode 100644 index 00000000..95ea2ff0 --- /dev/null +++ b/math/slalib/doc/nut.hlp @@ -0,0 +1,34 @@ +.help nut Jun99 "Slalib Package" +.nf + + SUBROUTINE slNUT (DATE, RMATN) + + - - - - + N U T + - - - - + + Form the matrix of nutation for a given date - IAU 1980 theory + (double precision) + + References: + Final report of the IAU Working Group on Nutation, + chairman P.K.Seidelmann, 1980. + Kaplan,G.H., 1981, USNO circular no. 163, pA3-6. + + Given: + DATE dp TDB (loosely ET) as Modified Julian Date + (=JD-2400000.5) + Returned: + RMATN dp(3,3) nutation matrix + + The matrix is in the sense V(true) = RMATN * V(mean) + + Called: slNUTC, slDEUL + + P.T.Wallace Starlink 1 January 1993 + + Copyright (C) 1995 Rutherford Appleton Laboratory + Copyright (C) 1995 Association of Universities for Research in Astronomy Inc. + +.fi +.endhelp |