Examples

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. 

---