PROCESSORS_SHAPE() (IBM extension)

Purpose

Returns a zero-sized array. This intrinsic ensures compatibility with programs written for High Performance Fortran (HPF) environments.

Class

System inquiry function

Result type and attributes

Default integer array of rank one, whose size is equal to the rank of the processor array. In a uniprocessor environment, the result is a zero-sized vector.

Result value

The value of the result is the shape of the processor array.

Examples

I=PROCESSORS_SHAPE()
! Zero-sized vector of type default integer