Open Watcom FORTRAN 77 Language Reference

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