Lahey/Fujitsu Fortran

List Directed Editing

List-Directed Formatting

List-directed formatting is indicated when an input/output statement uses an asterisk instead of an explicit format. For example,

read*, a
print*, x,y,z
read (unit=1, fmt=*) i,j,k

all use list-directed formatting.

List-Directed Input

List-directed records consist of a sequence of values and value separators. Values are either null or any of the following forms:

c
r*c
r*
Where:

c is a literal constant or a non-delimited CHARACTER string.

r is a positive INTEGER literal constant with no kind type parameter specified.

r*c is equivalent to r successive instances of c.

r* is equivalent to r successive instances of null.

Separators are either commas or slashes with optional preceding or following blanks; or one or more blanks between two non-blank values. A slash separator causes termination of the input statement after transfer of the previous value.

Editing occurs based on the type of the list item as explained below. On input the following formatting applies:

List-Directed Input Editing

Type

Editing

INTEGER

I

REAL

F

COMPLEX

As for COMPLEX literal constant

LOGICAL

L

CHARACTER

As for CHARACTER string. CHARACTER string can be continued from one record to the next. Delimiting apostrophes or quotation marks are not required if the CHARACTER string does not cross a record boundary and does not contain value separators or CHARACTER string delimiters, or begin with r*.

List-Directed Output

For list-directed output the following formatting applies:

List-Directed Output Editing

Type

Editing

INTEGER

G w

REAL

G w.d

COMPLEX

(G w.d , G w.d )

LOGICAL

T for value true and F for value false

CHARACTER

As CHARACTER string, except as overridden by the DELIM= specifier