You get a print file by using the nonstandard FORM='PRINT' in OPEN. @
OPEN ( ..., FORM='PRINT', ... )
This specifier works for sequential access files only.
A print file has the following features:
With formatted output, you get vertical format control for that logical unit:
Column one is not printed.
If column one is blank, 0, or 1, then vertical spacing is one line, two lines, or top of page, respectively.
If column 1 is +, it is replaced by a control sequence that causes a return to the beginning of the previous line.
With list-directed output, you get for that logical unit, column one is not printed.
In general, if you open a file with FORM='PRINT', then for that file list-directed output does not provide the FORTRAN Standard blank in column one; otherwise, it does provide that blank. FORM='PRINT' is for one file per call.
If you open a file with FORM='PRINT', then that file has the same content as if it was opened with FORM='FORMATTED', and filtered with the output filter, asa.
If you compile with the -oldldo option (old list-directed output), then all the files written by the program do list-directed output without that blank in column one; otherwise, they all get that blank. The -oldldo option is global.
The INQUIRE statement returns 'PRINT' in the FORM variable for logical units opened as print files. It returns -1 for the unit number of an unopened file.