9.14 ALL — Все значения в MASK вдоль DIM истинны

Описание:

ALL(MASK [, DIM]) определяет, истинны ли все значения в MASK в массиве вдоль измерения DIM.

Стандарт:

Fortran 95 и более поздние версии

Класс:

Трансформационная функция

Синтаксис:

RESULT = ALL(MASK [, DIM])

Аргументы:

MASK	Тип аргумента должен быть LOGICAL и не должен быть скалярным.
DIM	(Необязательно) DIM должен быть скалярным целым числом со значением от одного до ранга MASK.

Возвращаемое значение:

ALL(MASK) возвращает скалярное значение типа LOGICAL, где параметр типа kind совпадает с параметром типа kind MASK. Если DIM присутствует, то ALL(MASK, DIM) возвращает массив с рангом MASK минус 1. Форма определяется формой MASK, где измерение DIM опущено.

(A)

ALL(MASK) истинно, если все элементы MASK истинны. Оно также истинно, если MASK имеет нулевой размер; в противном случае оно ложно.

(B)

Если ранг MASK равен одному, то ALL(MASK,DIM) эквивалентно ALL(MASK). Если ранг больше одного, то ALL(MASK,DIM) определяется применением ALL к секциям массива.

Пример:

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

Далее: ALLOCATED, Предыдущее: ALARM, Вверх: Встроенные процедуры [Оглавление][Указатель]