Open Watcom FORTRAN 77 Language Reference

FORTRAN Statements
7. A NAMELIST name, indicating namelist-directed formatting.
Output list - An output list may contain one or more of the following:
1. A variable name.
2. An array element name.
3. A character substring name.
4. An array name except an assumed-size dummy array.
5. Any other expression except a character expression involving concatenation of an operand
whose length specification is an asterisk in parentheses unless the operand is the symbol name of
a constant (since the length can be determined at compile time).
6. An implied-DO list of the form:
( dlist, i = e1, e2 [,e3] )
where dlist is composed of one or more of items (1) through (6).
Example:
CHARACTER*5 S
COMPLEX C
S = ’Hello’
I = 123
X = 12.5
C = (12.5,4.58)
PRINT *, S, I, X, C
END
The above example illustrates list-directed formatting using the PRINT statement. The asterisk specifies
that the variables in the output list are to be displayed in some format that is appropriate to the type of the
variable (hence the term "list-directed"). The CHARACTER variable S is printed using a suitable A format
descriptor. The INTEGER variable I is printed using a suitable I format descriptor. The REAL variable X
is printed using a suitable G format descriptor. The COMPLEX variable C is printed using a suitable G
format descriptor and is displayed with enclosing parentheses and a comma. Output from the above
program would resemble the following.
Hello 123 12.5000000 (12.5000000,4.5799999)
Example:
CHARACTER*5 S
COMPLEX C
S = ’Hello’
I = 123
X = 12.5
C = (12.5,4.58)
PRINT, S, I, X, C
END
The above example illustrates a Open Watcom FORTRAN 77 extension of list-directed formatting using
the PRINT statement. The asterisk is omitted but the results are exactly the same as in the previous
example.
PRINT Statement 119