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

Описание:

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

Стандарт:

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, Вверх: Внутренние процедуры [Оглавление][Индекс]