The routine returns the size in pixels of each dimension of an array, together with the total number of dimensions (the size of a dimension is the difference between that dimension’s upper and lower pixel-index bounds $+$ 1).

CALL ARY_DIMK( IARY, NDIMX, DIM, NDIM, STATUS )

IARY = INTEGER (Given)

NDIMX = INTEGER (Given)

DIM( NDIMX ) = INTEGER*8 (Returned)

NDIM = INTEGER (Returned)

STATUS = INTEGER (Given and Returned)

• If the array has fewer than NDIMX dimensions, then any remaining elements of the DIM argument will be filled with 1’s.

• If the array has more than NDIMX dimensions, then the NDIM argument will return the actual number of dimensions. In this case only the first NDIMX dimension sizes will be returned, and an error will result if the size of any of the excluded dimensions exceeds 1.

• The symbolic constant ARY__MXDIM may be used to declare the size of the DIM argument so that it will be able to hold the maximum number of array dimension sizes that this routine can return. This constant is defined in the include file ARY_PAR.