Description.
This is a FORTRAN 77-callable version of the HPF intrinsic SHAPE,
as it would behave as called from HPF_LOCAL.
Arguments.
SHAPE
is a rank-one, integer array of size equal to at least the rank of the
subgrid associated with ARRAY.
Its return value is the shape of that subgrid.