blob: eef108f4cec4334c866287c881e2a6af5399b4da (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
.help dtf2d Jun99 "Slalib Package"
.nf
SUBROUTINE slDTFD (IHOUR, IMIN, SEC, DAYS, J)
- - - - - -
D T F D
- - - - - -
Convert hours, minutes, seconds to days (double precision)
Given:
IHOUR int hours
IMIN int minutes
SEC dp seconds
Returned:
DAYS dp 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 July 1984
Copyright (C) 1995 Rutherford Appleton Laboratory
Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
.fi
.endhelp
|
