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

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

diff --git a/math/slalib/doc/djcal.hlp b/math/slalib/doc/djcal.hlp
new file mode 100644
index 00000000..d65c81bd
--- /dev/null
+++ b/math/slalib/doc/djcal.hlp
@@ -0,0 +1,38 @@
+.help djcal Jun99 "Slalib Package"
+.nf
+
+      SUBROUTINE slDJCA (NDP, DJM, IYMDF, J)
+
+     - - - - - -
+      D J C A
+     - - - - - -
+
+  Modified Julian Date to Gregorian Calendar, expressed
+  in a form convenient for formatting messages (namely
+  rounded to a specified precision, and with the fields
+  stored in a single array)
+
+  Given:
+     NDP      i      number of decimal places of days in fraction
+     DJM      d      modified Julian Date (JD-2400000.5)
+
+  Returned:
+     IYMDF    i(4)   year, month, day, fraction in Gregorian
+                     calendar
+     J        i      status:  nonzero = out of range
+
+  Any date after 4701BC March 1 is accepted.
+
+  NDP should be 4 or less if internal overflows are to be avoided
+  on machines which use 32-bit integers.
+
+  The algorithm is derived from that of Hatcher 1984
+  (QJRAS 25, 53-55).
+
+  P.T.Wallace   Starlink   27 April 1998
+
+  Copyright (C) 1998 Rutherford Appleton Laboratory
+  Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
+
+.fi
+.endhelp
-- 
cgit 

