NDF_MTYPN

Match the types of the array components of a number of NDFs

Description:

The routine matches the types of the array components of a number of NDFs, selecting a type which an application may use to process these components. It also returns the numeric type which should be used for storing the result of this processing.

Invocation

CALL NDF_MTYPN( TYPLST, N, NDFS, COMP, ITYPE, DTYPE, STATUS )

Arguments

TYPLST = CHARACTER ( ) (Given)
A comma-separated list of the numeric types which the application can process explicitly; e.g. _INTEGER,_REAL. The first type which has sufficient precision will be selected from this list, so they should normally be given in order of increasing computational cost.
N = INTEGER (Given)
Number of NDFs whose types are to be matched.
NDFS( N ) = INTEGER (Given)
Array of identifiers for the NDFs to be matched.
COMP = CHARACTER ( ) (Given)
Name of the NDF array component whose type is to be considered.
ITYPE = CHARACTER ( ) (Returned)
Numeric type which the application should use to process the NDF components. This value is returned as an upper case character string of maximum length NDF__SZTYP. Its value is the first entry in the TYPLST list to which the NDF array components may be converted without unnecessary loss of information.
DTYPE = CHARACTER ( ) (Returned)
Data type required to hold the result of processing the NDF array components. This result is returned as an upper case character string of maximum length NDF__SZFTP. It is intended to be used as input to the NDF_STYPE routine to set the type of the output NDF component into which the result will be written.
STATUS = INTEGER (Given and Returned)
The global status.

Notes: