CHARACTER Function Useage Legal/Illegal?

From: dpbozarth (dpbozarth_at_swko.net)
Date: 05/30/04


Date: 30 May 2004 07:32:55 -0700

Is the following a legal useage of a character function in F77?

OPEN(UNIT=2,FILE=GETNAM('FOR002'),STATUS='UNKNOWN')

where the declaration for GETNAM() is

CHARACTER*80 FUNCTION GETNAM(NAMEIN)

GETNAM returns a filename from an environment variable of the name
NAMEIN if it is found or, if not found, the value of NAMEIN.



Relevant Pages

  • Re: CHARACTER Function Useage Legal/Illegal?
    ... > Is the following a legal useage of a character function in F77? ... > where the declaration for GETNAMis ... > GETNAM returns a filename from an environment variable of the name ... > NAMEIN if it is found or, if not found, the value of NAMEIN. ...
    (comp.lang.fortran)
  • Re: CHARACTER Function Useage Legal/Illegal?
    ... > Is the following a legal useage of a character function in F77? ... > where the declaration for GETNAMis ... > GETNAM returns a filename from an environment variable of the name ... appears to be processor-dependent. ...
    (comp.lang.fortran)