该子例程的调用方式如下所示:
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% |