itime - return time in numerical form
subroutine itime(iarray) integer*4 iarray(3)
The itime subroutine puts the current time into the integer array iarray.
The order is: hour, minute, second.
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 Reference Manual