### 6.2.2.2 Character Functions

The CHARACTER FUNCTION statement takes the following form:

    CHARACTER[*len] FUNCTION nam [*len] [([p [,p] . . . ])]

len
  Is an unsigned, nonzero integer constant, or an asterisk within parentheses (*) indicating a passed-length function name.

  If you specify CHARACTER*(*), the function assumes the length declared for it in the program unit that invokes it. A passed- length character function can have different lengths when it is invoked by different program units. If len is an integer constant, the value of len must agree with the length of the function specified in the program unit that invokes the function. If you do not specify len, a length of one is assumed. The optional length specification following nam is not permitted if the length has already been specified following the keyword CHARACTER.

nam
  Is the symbolic name of the function.
p
  Is a dummy argument.

Previous Page Next Page Table of Contents