XL Fortran for AIX 8.1

Language Reference


Determines if all values in an entire array, or in each vector along a single dimension, are true.

is a logical array.

DIM (optional)
is an integer scalar in the range 1 <= DIM <= rank(MASK). The corresponding actual argument must not be an optional dummy argument.


Transformational function

Result Value

The result is a logical array with the same type and type parameters as MASK, and rank rank(MASK)-1. If the DIM is missing, or MASK has a rank of one, the result is a scalar of type logical.

The shape of the result is (s1, s2, ..., s(DIM-1), s(DIM+1), ..., sn), where n is the rank of MASK.

Each element in the result array is .TRUE. only if all the elements given by MASK(m1, m2, ..., m(DIM-1), :, m(DIM+1), ..., mn), are true. When the result is a scalar, either because DIM is not specified or because MASK is of rank one, it is .TRUE. only if all elements of MASK are true, or MASK has size zero.


! A is the array | 4 3 6 |, and B is the array | 3 5 2 |
!                | 2 4 1 |                     | 7 8 4 |
! Is every element in A less than the
! corresponding one in B?
      RES = ALL(A .LT. B)          ! result RES is false
! Are all elements in each column of A less than the
! corresponding column of B?
      RES = ALL(A .LT. B, DIM = 1) ! result RES is (f,t,f)
! Same question, but for each row of A and B.
      RES = ALL(A .LT. B, DIM = 2) ! result RES is (f,t)

[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]