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%