A data edit descriptor takes one of the following forms:
[r]c [r]cw [r]cw.m [r]cw.d [r]cw.d[Ee]
The number of significant digits is affected if a scale factor is specified for the data edit descriptor.
FORTRAN 77, Fortran 90, and Fortran 95 allow the field width to be
omitted only for the A descriptor. However, Compaq Fortran allows
the field width to be omitted for any data edit descriptor.
The r, w, m, d, and e must all be positive, unsigned, default integer literal constants; or variable format expressions; no kind parameter can be specified. They must not be named constants.
Actual useful ranges for r, w, m, d, and e may be constrained by record sizes (RECL=) and the file system.
The data edit descriptors have the following specific forms:
Integer: | Iw[.m], Bw[.m], Ow[.m], and Zw[.m] |
Real and complex: | Fw.d, Ew.d[Ee], ENw.d[Ee], ESw.d[Ee], Dw.d, and Gw.d[Ee] |
Logical: | Lw |
Character: | A[w] |
The d must be specified with F, E, D, and G field descriptors even if d is zero. The decimal point is also required. You must specify both w and d, or omit them both.
A repeat specification can simplify formatting. For example, the following two statements are equivalent:
20 FORMAT (E12.4,E12.4,E12.4,I5,I5,I5,I5) 20 FORMAT (3E12.4,4I5)