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).