Number of minutes since jan 1, 1978.
More...
Go to the source code of this file.
|
subroutine | w3fs21 (idate, nmin) |
| Calculates the number of minutes since 0000, 1 January 1978.
|
|
Number of minutes since jan 1, 1978.
- Author
- A. Desmarais
- Date
- 1984-06-21
Definition in file w3fs21.f.
◆ w3fs21()
subroutine w3fs21 |
( |
integer, dimension(5) |
idate, |
|
|
integer |
nmin |
|
) |
| |
Calculates the number of minutes since 0000, 1 January 1978.
Program History Log:
Date | Programmer | Comments |
1984-06-21 | A. Desmarais | Initial. |
1989-07-14 | Ralph Jones | Convert to cyber 205 fortran 200, change logic so it will work in 21 century. |
1989-11-02 | Ralph Jones | Convert to cray cft77 fortran. |
- Parameters
-
[in] | IDATE | (INTEGER Size 5) Array containing year of century, month, day, hour and minute. IDATE(1) may be a two digit year or 4. If 2 digits and GE than 78 1900 is added to it. If LT 78 then 2000 is added to it. If 4 digits the subroutine will work correctly to the year 3300 A.D. |
[out] | NMIN | (INTEGER) Number of minutes since 1 January 1978. |
- Author
- A. Desmarais
- Date
- 1984-06-21
Definition at line 21 of file w3fs21.f.