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/caldj.hlp | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 math/slalib/doc/caldj.hlp

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

diff --git a/math/slalib/doc/caldj.hlp b/math/slalib/doc/caldj.hlp
new file mode 100644
index 00000000..1504c667
--- /dev/null
+++ b/math/slalib/doc/caldj.hlp
@@ -0,0 +1,38 @@
+.help caldj Jun99 "Slalib Package"
+.nf
+
+      SUBROUTINE slCADJ (IY, IM, ID, DJM, J)
+
+     - - - - - -
+      C A D J
+     - - - - - -
+
+  Gregorian Calendar to Modified Julian Date
+
+  (Includes century default feature:  use slCLDJ for years
+   before 100AD.)
+
+  Given:
+     IY,IM,ID     int    year, month, day in Gregorian calendar
+
+  Returned:
+     DJM          dp     modified Julian Date (JD-2400000.5) for 0 hrs
+     J            int    status:
+                           0 = OK
+                           1 = bad year   (MJD not computed)
+                           2 = bad month  (MJD not computed)
+                           3 = bad day    (MJD computed)
+
+  Acceptable years are 00-49, interpreted as 2000-2049,
+                       50-99,     "       "  1950-1999,
+                       100 upwards, interpreted literally.
+
+  Called:  slCLDJ
+
+  P.T.Wallace   Starlink   November 1985
+
+  Copyright (C) 1995 Rutherford Appleton Laboratory
+  Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
+
+.fi
+.endhelp
-- 
cgit 

