9.138 IMAGE_INDEX — Функция преобразования коподстроки в индекс изображения

Описание:

Возвращает индекс изображения, соответствующий коподстроке.

Стандарт:

Fortran 2008 и новее

Класс:

Функция запроса.

Синтаксис:

RESULT = IMAGE_INDEX(COARRAY, SUB)

Аргументы: Отсутствуют.

COARRAY	Комассив любого типа.
SUB	Массив по умолчанию целого типа ранга 1 размером, равным рангу комассива COARRAY.

Значение возврата:

Скалярное значение целого типа по умолчанию, представляющее индекс изображения, соответствующий коподстрокам. Для некорректных коподстрок результат равен нулю.

Пример:

INTEGER :: array[2,-1:4,8,*]
! Writes  28 (or 0 if there are fewer than 28 images)
WRITE (*,*) IMAGE_INDEX (array, [2,0,3,1])

См. также:

THIS_IMAGE, NUM_IMAGES