ANY— Any value in MASK along DIM is true
ANY(MASK [, DIM]) determines if any of the values in the logical array
MASK along dimension DIM are
Fortran 95 and later
RESULT = ANY(MASK [, DIM])
|MASK||The type of the argument shall be |
|DIM||(Optional) DIM shall be a scalar integer with a value that lies between one and the rank of MASK.|
ANY(MASK) returns a scalar value of type
the kind type parameter is the same as the kind type parameter of
MASK. If DIM is present, then
ANY(MASK, DIM) returns
an array with the rank of MASK minus 1. The shape is determined from
the shape of MASK where the DIM dimension is elided.
ANY(MASK) is true if any element of MASK is true;
otherwise, it is false. It also is false if MASK has zero size.
If the rank of MASK is one, then
ANY(MASK,DIM) is equivalent
ANY(MASK). If the rank is greater than one, then
is determined by applying
ANY to the array sections.
program test_any logical l l = any((/.true., .true., .true./)) print *, l call section contains subroutine section integer a(2,3), b(2,3) a = 1 b = 1 b(2,2) = 2 print *, any(a .eq. b, 1) print *, any(a .eq. b, 2) end subroutine section end program test_any