UBOUND(3I) Last changed: 1-6-98
NAMEUBOUND - Returns all the upper bounds of an array or a specified upper
bound
SYNOPSISUBOUND ([ARRAY=] array [,[DIM=]dim])
IMPLEMENTATION
UNICOS, UNICOS/mk, and IRIX systems
STANDARDS
Fortran 90
DESCRIPTION
The UBOUND intrinsic function returns all the upper bounds of an array
or returns a specified upper bound. It accepts the following
arguments:
array Can be of any type. It must not be scalar. It must not be
a pointer that is disassociated or an allocatable array that
is not allocated. If array is an assumed-size array, dim
must be present with a value less than the rank of array.
dim Must be scalar and of type integer with a value in the range
1 <= dim <= n, where n is the rank of array. The
corresponding actual argument must not be an optional dummy
argument.
UBOUND is an inquiry function. The name of this intrinsic cannot be
passed as an argument.
RETURN VALUES
The result type is default integer. It is scalar if dim is present;
otherwise, the result is an array of rank one and size n, where n is
the rank of array.
For an array section or for an array expression, other than a whole
array or array structure component, UBOUND(array,dim) has a value
equal to the number of elements in the given dimension. It has a
value equal to the upper bound for subscript dim of array if dimension
dim of array does not have size zero; it has the value zero if
dimension dim has size zero.
UBOUND(array) has a value whose ith component is equal to
UBOUND(array,i), for i = 1, 2, ..., n, where n is the rank of array.
EXAMPLES
Assume that A is declared by the statement REAL A(2:3, 7:10). In this
case, the following are true:
* UBOUND(A) is [3, 10]
* UBOUND(A, DIM = 2) is 10.
SEE ALSO
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.