This routine dissects a system time into month, day, and so forth, for the local time zone.
call ltime( stime, tarray ) |
|||
---|---|---|---|
stime |
INTEGER*4 |
Input |
System time from time() (standard version) |
tarray |
INTEGER*4(9) |
Output |
System time, local, as day, month, year, ... |
For the meaning of the elements in tarray, see the next section.
integer*4 stime, tarray(9), time stime = time() call ltime( stime, tarray ) write(*,*) 'ltime: ', tarray end demo% f77 -silent tltime.f demo% a.out ltime: 25 49 10 12 7 91 1 223 1 demo%