Initial commit

1 files changed, 37 insertions, 0 deletions

diff --git a/math/slalib/doc/ctf2d.hlp b/math/slalib/doc/ctf2d.hlp
new file mode 100644
index 00000000..e8c985c3
--- /dev/null
+++ b/math/slalib/doc/ctf2d.hlp
@@ -0,0 +1,37 @@
+.help ctf2d Jun99 "Slalib Package"
+.nf
+
+      SUBROUTINE slCTFD (IHOUR, IMIN, SEC, DAYS, J)
+
+     - - - - - -
+      C T F D
+     - - - - - -
+
+  Convert hours, minutes, seconds to days (single precision)
+
+  Given:
+     IHOUR       int       hours
+     IMIN        int       minutes
+     SEC         real      seconds
+
+  Returned:
+     DAYS        real      interval in days
+     J           int       status:  0 = OK
+                                    1 = IHOUR outside range 0-23
+                                    2 = IMIN outside range 0-59
+                                    3 = SEC outside range 0-59.999...
+
+  Notes:
+
+  1)  The result is computed even if any of the range checks
+      fail.
+
+  2)  The sign must be dealt with outside this routine.
+
+  P.T.Wallace   Starlink   November 1984
+
+  Copyright (C) 1995 Rutherford Appleton Laboratory
+  Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
+
+.fi
+.endhelp