HP Fortran Programmer's Reference

Intrinsic procedures
Intrinsic procedure specifications
Result type,
type parameters,
and shape
The result is of type logical with the same kind type parameter as MASK. ItisscalarifDIM is
absent or MASK has rank one; otherwise, the result is an array of rank n-1 and of shape (d 1, d 2,
..., d DIM-1, d DIM+1, ..., d n)where(d 1, d 2,...,d n)istheshapeofMASK.
Result value
Case 1 The result of ALL(MASK) has the value .TRUE. if all elements of MASK are
.TRUE. or if MASK has size zero, and the result has value .FALSE. if any
element of MASK is .FALSE..
Case 2 If MASK has rank one, ALL(MASK, DIM) has a value equal to that of
ALL(MASK). Otherwise,thevalueofelement(s 1, s 2,...,s DIM-1, s DIM+1, ...,
s n )ofALL(MASK, DIM) is equal to ALL(MASK (s 1 , s 2 ,...,s DIM-1 ,:,s DIM+1 , ...,
s n)).
ALLOCATED(ARRAY)
Description
Indicate whether or not an allocatable array is currently allocated.
Class
Inquiry function.
Argument
ARRAY must be an allocatable array.
Result type,
type parameters,
and shape
Default logical scalar.
Result value
The result has the value .TRUE. if ARRAY is currently allocated and has the value .FALSE. if
ARRAY is not currently allocated. The result is undefined if the allocation status of the array is
undefined.
486
Chapter 11