ALL — All values in MASK along DIM are true
ALL(MASK [, DIM])determines if all the values are true in MASK in the array along dimension DIM.
Fortran 95 and later
RESULT = ALL(MASK [, DIM])
MASK The type of the argument shall be
LOGICALand it shall not be scalar.
DIM (Optional) DIM shall be a scalar integer with a value that lies between one and the rank of MASK.
- Return value:
ALL(MASK)returns a scalar value of type
LOGICALwhere the kind type parameter is the same as the kind type parameter of MASK. If DIM is present, then
ALL(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.
ALL(MASK)is true if all elements of MASK are true. It also is true if MASK has zero size; otherwise, it is false.
If the rank of MASK is one, then
ALL(MASK,DIM)is equivalent to
ALL(MASK). If the rank is greater than one, then
ALL(MASK,DIM)is determined by applying
ALLto the array sections.
program test_all logical l l = all((/.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 *, all(a .eq. b, 1) print *, all(a .eq. b, 2) end subroutine section end program test_all