Open Watcom FORTRAN 77 Language Reference

FORTRAN Statements
2.58 LOGICAL Statement
The LOGICAL statement is a type declaration statement and can be used to declare a name to be of type
logical. The implicit type of the name, whether defined by the "first letter rule" (see the chapter entitled
"Names, Data Types and Constants" on page 151) or by an IMPLICIT statement, is either confirmed or
overridden. However, once a name has been declared to be of type logical, it cannot appear in another type
declaration statement.
There are various forms of the LOGICAL statement. The following sections describe them.
2.58.1 Standard LOGICAL Statement
LOGICAL name [,name] ...
where:
name
is a variable name, array name, array declarator, symbolic name of a constant, function name or
dummy procedure name.
This form is the standard form of the LOGICAL statement.
Example:
DIMENSION C(-5:5)
LOGICAL A, B(10), C
In the previous example, A is defined to be a variable of type logical and B and C are defined to be arrays of
type logical.
2.58.2 Extended LOGICAL Statement: Length Specification
LOGICAL[*len[,]] name [,name] ...
where:
name
is one of the following forms:
v[*len]
a[*len](d)
a(d)[*len]
v
is a variable name, array name, symbolic name of a constant, function name or dummy
procedure name.
LOGICAL Statement 103