Fortran Wiki
image_index (changes)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Showing changes from revision #1 to #2: (追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)

Description

Returns the image index belonging to a cosubscript.

Standard

Fortran 2008 and later

Class

Inquiry function.

Syntax

result = image_index(coarray, sub)

Arguments(削除) None. (削除ここまで)

• coarray - Coarray of any type.
• sub - default integer rank-1 array of a size equal to the corank of coarray.

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

See also

this_image, num_images

Revised on April 4, 2016 14:45:16 by Jason Blevins (128.146.137.52) (844 characters / 0.0 pages)

Edit | Back in time (1 revision) | Hide changes | History | Views: Print | TeX | Source | Linked from: Intrinsic procedures, Fortran 2008, this_image, num_images