Open Watcom FORTRAN 77 Language Reference

Language Reference
Example:
PRINT 100, X, Y, Z
100 FORMAT( 3F10.5 )
PRINT ’( 3F10.5 )’, X, Y, Z
The above gives two examples of the PRINT statement. In both cases, the format conversion is identical
but it was specified in different ways. When executed, the effect of both PRINT statements is the same.
Example:
PRINT ’(1X,100A1)’, (’*’,I=1,J)
The above example illustrates a technique for producing histograms using the implied DO-loop. Each time
this statement is executed, a number of asterisks are printed, depending on the value of J.
Notes:
1. The PRINT statement is implicitly a formatted output statement.
2. The unit number that is implicitly used in the PRINT statement is unit number 6.
3. If no output list is specified then the effect of the PRINT statement is to produce one or more
records whose characters are all blanks.
4. FORTRAN 77 leaves the format of output in list-directed formatting to the discretion of Open
Watcom FORTRAN 77. Hence other FORTRAN compilers may produce different results. If
the format of output must be consistent from one compiler to the next then list-directed
formatting should not be used.
5. An implication of point (6) above is that nesting of implied-DO lists is permitted. For example,
the output list
( (A(I,J), B(I,J), J = 1, 5), I = 1, 10 )
may be broken down into the following components:
A(I,J), B(I,J)
(....dlist1...., J = 1, 5)
( .....dlist2..............., I = 1, 10 )
For more information on input/output, see the chapter entitled "Input/Output" on page 215. For more
information on formatted input/output, see the chapter entitled "Format" on page 225.
120 PRINT Statement