Next: OR, Previous: NULL, Up: Intrinsic Procedures [Contents][Index]
NUM_IMAGES — Function that returns the number of imagesReturns the number of images.
Fortran 2008 and later
Transformational function
RESULT = NUM_IMAGES()
Scalar default-kind integer.
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