Open Watcom FORTRAN 77 Language Reference

Language Reference
[lo:] hi
where:
lo
hi
is the lower dimension bound.
is the upper dimension bound.
The lower and upper dimension bounds must be integer expressions and the upper dimension bound must
be greater than or equal to the lower dimension bound. The upper dimension bound of the last dimension
may be an asterisk (*). The meaning of this will be discussed later. If the lower dimension bound is not
specified then a default of 1 is assumed. The size of a dimension is defined as hi − lo + 1. Note that if
the lower dimension bound is not specified the size of the dimension is just hi. The size of the array (or
the number of elements in the array) is defined as the product of all the sizes of the dimensions of the array.
The maximum number of elements in any dimension is limited to 65535. The maximum size of an array is
limited by the amount of available memory.
Arrays are defined by the appearance of an array declarator in a DIMENSION statement, a type statement
or a COMMON statement.
Example:
DIMENSION A(10), B(-5:5,-10:10)
INTEGER C(10,20)
COMMON /DATA/ X,Y(30,30),Z
In the previous example, B is a 2-dimensional array with 11 rows and 21 columns and has 231 elements
(i.e. 11 * 21).
Each array has a data type associated with it. This data type is inherited by all elements of the array.
4.3 Array Elements
Each array is comprised of a sequence of array elements. An array element is referenced by following the
array name with a subscript. Different elements of the array are referenced by simply changing the
subscript. An array element has the following form:
a(s[,s]...)
where:
a
(s[,s]...)
s
is the array name.
is a subscript.
is a subscript expression.
160 Array Elements