IMAGE_INDEX — Function that converts a cosubscript to an image index¶

IMAGE_INDEX()¶

Returns the image index belonging to a cosubscript.

Parameters

COARRAY – Coarray of any type.
SUB – default integer rank-1 array of a size equal to the corank of COARRAY.

Returns

Scalar default integer with the value of the image index which corresponds to the cosubscripts. For invalid cosubscripts the result is zero.

Syntax:

RESULT = IMAGE_INDEX(COARRAY, SUB)

Example:

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])