W3FS21
The W3FS21 routine calculates the number of minutes since
0000, 1 JANUARY 1978.
USAGE: CALL W3FS21 (IDATE, NMIN)
Input argument list:
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.
Output argument list:
NMIN - INTEGER NUMBER OF MINUTES SINCE 1 JANUARY 1978