test

Fortran Library Reference

fdate: Return Date and Time in an ASCII String

The subroutine or function is called by:

call fdate( string )

string

character*24

Output  

or:

CHARACTER fdate*24

string = fdate()

If used as a function, the calling routine must define the type and size of fdate.

Return value 

character*24

Output  

Example 1: fdate as a subroutine: 

    character*24 string
    call fdate( string )
    write(*,*) string
    end

Output: 

 Wed Aug  3 15:30:23 1994

Example 2: fdate as a function, same output: 

    character*24 fdate
    write(*,*)  fdate()
    end

See also: ctime(3), time(3F), and idate(3F).