Example 1: Some real, character, and logical parameters:
CHARACTER HEADING*10 LOGICAL T PARAMETER (EPSILON=1.0E-6, PI=3.141593, & HEADING=' IO Error #', & T=.TRUE.) ...
Example 2: Let the compiler count the characters:
CHARACTER HEADING*(*) PARAMETER (HEADING='I/O Error Number') ...
Example 3: The alternate syntax, if the -xl compilation flag is specified:
PARAMETER FLAG1 = .TRUE.
The above statement is treated as:
LOGICAL FLAG1 PARAMETER (FLAG1 = .TRUE.)
An ambiguous statement that could be interpreted as either a PARAMETER statement or an assignment statement is always taken to be the former, as long as either the -xl or -xld option is specified.
Example: An ambiguous statement:
PARAMETER S = .TRUE.
With -xl, the above statement is a PARAMETER statement about the variable S.
PARAMETER S = .TRUE.
It is not an assignment statement about the variable PARAMETERS.
PARAMETERS = .TRUE.