Intel fortran-80 Interpretation of do Statements, Default Data Lengths, Including Source Files

FORTRAN-SO SOSO/SOS5 Processor Dependencies

If the FREEFORM compiler control is set, column 1 is interpreted as follows:

Column 1	Meaning
Cor *	Comment line (same as standard)
0-9	Label followed by statement
Space or TAB	Unlabeled initial line of statement
&	Continuation line of statement
$	Compiler control line

Note in this format that a statement label, if present must begin in column 1. Statements can be written in columns 2-72. They can begin in column 1 if the first letter of the statement is not a 'C.'

F.2.5 Interpretation of DO Statements

The 1966 ANSI FORTRAN standard states that all DO loops must be executed at least once. The 1977 ANS standard allows zero iterations, if so specified by the values of the initial and terminal expressions ('el' and 'e2' in the DO statement for- mat). The preferred interpretation can be specified by choosing either the D066 compiler control or the D077 compiler control in the form

$0077

If neither is specified, D077 is assumed by the compiler. If specified, this control must precede all FORTRAN code.

F.2.6 Default Data Lengths

The STORAGE compiler control can be used to specify the default lengths (in bytes) to be used for integer or logical variables, array elements, and constants. The default can still be overriden by INTEGER or LOGICAL type statements or, in the case of integer constants, by the number of digits in an explicit number base specification. This compiler control is coded in the form

$STORAG E(I NTEG ER * length, lOG ICAl * length)

where

length can be 1,2, or 4

The '$' must appear in column one and the control must precede all program units in the source file.

If no STORAGE control is specified, the compiler assumes the following defaults:

$STORAGE(INTEGER*2,lOGICAl *1)

These defaults do not conform to the ANSI standard memory allocation. To be totally ANSI compatible, specify

$STORAGE(INTEGER*4,lOGICAl *4)

F.2.7 Including Source Files

Specified files can be included in a FORTRAN source file using the INCLUDE com- piler control. This control causes subsequent source code to be input from the specified 'file' until an end-of-file is reached. At end-of-file, input resumes from the file being processed when the INCLUDE was encountered.

F-3