该子例程的调用方式如下所示:
|
call ltime( stime, tarray ) |
|||
|
stime |
INTEGER*4 |
输入 |
通过 time()(标准版本)获得的系统时间 |
|
tarray |
INTEGER*4(9) |
输出 |
当地系统时间,包括年份、月份、日期等 |
有关 tarray 中各元素的含义,请参见下一节。
demo% cat tltime.f
integer*4 stime, tarray(9), time
stime = time()
call ltime( stime, tarray )
write(*,*) ’ltime: ’, tarray
end
demo% f95 tltime.f
demo% a.out
ltime: 25 49 10 12 7 91 1 223 1
demo%
|