subroutine itime(iarray) integer*4 iarray(3)
itime サブルーチンは、現在の時間を整数配列 iarray に格納します。
順序は、時、分、秒です。
demo% cat iti1.f
integer*4 a(3)
call itime( a )
write(*, (' The time is: ',3i5)"
end
demo% f77 -silent iti1.f
demo% a.out
The time is: 14 55 22
demo%
libfui.a、libV77.a
time (3F) 、 ctime (3C) 、 fdate (3F) 、 idate (3F)
FORTRAN 77 リファレンスマニュアル