Manual Reference Pages - image_index (3)

image_index(3f) - [FORTRAN:INTRINSIC] Cosubscript to image index conversion

Syntax
Description
Arguments
Return Value
Example
Standard
Class
See Also

result = image_index(coarray, sub)

Returns the image index belonging to a cosubscript.

COARRAY
- Coarray of any type.

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

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

Sample program:

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

[[Fortran 2008]] and later

Inquiry function.

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