Open Watcom FORTRAN 77 Language Reference

FORTRAN Statements
2.70 REAL Statement
The REAL statement is a type declaration statement and can be used to declare a name to be of type real.
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 real, it cannot appear in another type declaration
statement.
There are various forms of the REAL statement. The following sections describe them.
2.70.1 Standard REAL Statement
REAL 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 REAL statement.
Example:
DIMENSION C(-5:5)
REAL A, B(10), C
In the previous example, A is defined to be a variable of type real and B and C are defined to be arrays of
type real.
2.70.2 Extended REAL Statement: Length Specification
REAL[*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.
REAL Statement 127