9.17 ANY — Любое значение в MASK по DIM истинно

Описание:

ANY(MASK [, DIM]) определяет, истинно ли любое из значений в логическом массиве MASK по размерности DIM.

Стандарт:

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

Класс:

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

Синтаксис:

RESULT = ANY(MASK [, DIM])

Аргументы:

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

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

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

(A)

ANY(MASK) истинно, если любой элемент MASK истинен; в противном случае, ложно. Также ложно, если MASK имеет нулевой размер.

(B)

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

Пример:

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

Далее: ASIN, Предыдущее: ANINT, Наверх: Встроенные процедуры [Содержание][Индекс]