9.147 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