Next: DATE_AND_TIME, Previous: CSHIFT, Up: Intrinsic Procedures
CTIME
— Convert a time into a stringCTIME(T,S)
converts T, a system time value, such as returned
by TIME8()
, to a string of the form `Sat Aug 19 18:13:14
1995', and returns that string into S.
If CTIME
is invoked as a function, it can not be invoked as a
subroutine, and vice versa.
T is an INTENT(IN)
INTEGER(KIND=8)
variable.
S is an INTENT(OUT)
CHARACTER
variable.
CALL CTIME(T,S) .
|
S = CTIME(T) , (not recommended).
|
S | The type shall be of type CHARACTER .
|
T | The type shall be of type INTEGER(KIND=8) .
|
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