Open Watcom FORTRAN 77 Language Reference

FORTRAN Statements
Example:
CHARACTER*20 NAME
CHARACTER*20 STREET
CHARACTER*15 CITY
CHARACTER*20 STATE
CHARACTER*20 COUNTRY
CHARACTER*10 ZIP_CODE
INTEGER AGE
INTEGER MARKS(10)
NAMELIST /PERSON/ NAME, STREET, CITY, STATE,
+ COUNTRY, ZIP_CODE, AGE, MARKS
READ PERSON
PRINT PERSON
END
The input data must be in a special format. The first character in each record must be blank. The second
character in the first record of a group of data records must be an ampersand (&) or dollar sign ($)
immediately followed by the NAMELIST name. The NAMELIST name must be followed by a blank and
must not contain any imbedded blanks. This name is followed by data items separated by commas. The
end of a data group is signaled by the character "&" or "$", optionally followed by the string "END". If the
"&" character was used to start the group, then it must be used to end the group. If the "$" character was
used to start the group, then it must be used to end the group.
The form of the data items in an input record is:
Name = Constant
The name may be a variable name or an array element name. The constant may be integer,
real, complex, logical or character. Logical constants may be in the form "T" or ".TRUE"
and "F" or ".FALSE". Character constants must be contained within apostrophes.
Subscripts must be of integer type.
ArrayName = Set of Constants
The set of constants consists of constants of the type integer, real, complex, logical or
character. The constants are separated by commas. The number of constants must be less
than or equal to the number of elements in the array. Successive occurrences of the same
constant may be represented in the form r*constant, where r is a non-zero integer
constant specifying the number of times the constant is to occur.
The variable and array names specified in the input file must appear in the NAMELIST list, but the order is
not important. A name that has been made equivalent to a name in the input data cannot be substituted for
that name in the NAMELIST list. The list can contain names of items in COMMON but must not contain
dummy argument names.
Each data record must begin with a blank followed by a complete variable or array name or constant.
Embedded blanks are not permitted in name or constants. Trailing blanks after integers and exponents are
treated as zeros.
NAMELIST Statement 109