IMAGE_INDEX — Function that converts a cosubscript to an image index
Description
Returns the image index belonging to a cosubscript.
Syntax
RESULT = IMAGE_INDEX(COARRAY, SUB)
Return value
Scalar default integer with the value of the image index which corresponds
to the cosubscripts. For invalid cosubscripts the result is zero.
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])
Standard
Fortran 2008 and later
Class
Inquiry function.
See also
THIS_IMAGE, NUM_IMAGES