The routine returns the numeric type of a scaled array as an upper-case character string (e.g. ’_REAL’). The returned type describes the values stored in the array, before they are unscaled using the associated scale and zero values. Use ARY_TYPE if you need the data type of the array after it has been unscaled.

CALL ARY_SCTYP( IARY, TYPE, STATUS )

IARY = INTEGER (Given)

TYPE = CHARACTER $\ast$ ( $\ast$ ) (Returned)

STATUS = INTEGER (Given and Returned)

• If the array is not stored in SCALED form, then this routine returns the same type as the ARY_TYPE routine.

• The symbolic constant ARY__SZTYP may be used for declaring the length of a character variable which is to hold the numeric type of an array. This constant is defined in the include file ARY_PAR.