From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001
From: Joseph Hunkeler <jhunkeler@gmail.com>
Date: Wed, 8 Jul 2015 20:46:52 -0400
Subject: Initial commit

---
 math/slalib/doc/nut.hlp | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)
 create mode 100644 math/slalib/doc/nut.hlp

(limited to 'math/slalib/doc/nut.hlp')

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
-- 
cgit 

