9.146 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