KPG_DIMLS

Writes the dimensions of an array in standard notation

Description:

This routine returns a character variable containing the dimensions of an array in the usual notation, that is the dimensions separated by commas and bounded by parentheses. There is an exception; if there is only one dimension, no parentheses and comma are included. This enables calling code to report the dimensions of an array using only one message call.

Invocation

CALL KPG_DIMLS( NDIMS, DIMS, NCHDIM, DIMSTR, STATUS )

Arguments

NDIMS = INTEGER (Given)
Number of dimensions of the array.
DIMS( NDIMS ) = INTEGER (Given)
The dimensions of the array.
NCHDIM = INTEGER (Write)
The number of characters in DIMSTR, excluding trailing blanks.
DIMSTR = CHARACTER() (Write)
A character string containing the dimension list enclosed in parentheses.
STATUS = INTEGER (Given)
Global status value.