NUM_IMAGES — Function that returns the number of images#
-
NUM_IMAGES(DISTANCE, FAILED)#
Returns the number of images.
- Parameters
DISTANCE – (optional, intent(in)) Nonnegative scalar integer
FAILED – (optional, intent(in)) Scalar logical expression
- Returns
Scalar default-kind integer. If
DISTANCE
is not present or has value 0, the number of images in the current team is returned. For values smaller or equal distance to the initial team, it returns the number of images index on the ancestor team which has a distance ofDISTANCE
from the invoking team. IfDISTANCE
is larger than the distance to the initial team, the number of images of the initial team is returned. IfFAILED
is not present the total number of images is returned; if it has the value.TRUE.
, the number of failed images is returned, otherwise, the number of images which do have not the failed status.
- Standard:
Fortran 2008 and later. With
DISTANCE
orFAILED
argument, Technical Specification (TS) 18508 or later- Class:
Transformational function
- Syntax:
RESULT = NUM_IMAGES(DISTANCE, FAILED)
- Example:
INTEGER :: value[*] INTEGER :: i value = THIS_IMAGE() SYNC ALL IF (THIS_IMAGE() == 1) THEN DO i = 1, NUM_IMAGES() WRITE(*,'(2(a,i0))') 'value[', i, '] is ', value[i] END DO END IF
- See also:
THIS_IMAGE — Function that returns the cosubscript index of this image, IMAGE_INDEX — Function that converts a cosubscript to an image index