CTIME (The GNU Fortran Compiler) (original) (raw)

program test_ctime integer(8) :: i character(len=30) :: date i = time8()

! Do something, main part of the program

call ctime(i,date)
print *, 'Program was started on ', date

end program test_ctime