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 リファレンスマニュアル