Description:
This
routine sets a one-dimensional array of values as the dynamic default for a parameter. The dynamic
default may be used as the parameter value by means of appropriate specifications in the interface
file.
If the declared parameter type differs from the type of the array supplied, then conversion is performed.
Invocation
CALL PAR_DEF1x( PARAM, NVAL, VALUES, STATUS )
Arguments
PARAM = CHARACTER
(
)
(Given)
The name of a parameter of primitive type.
NVAL = INTEGER (Given)
The number of
default values.
VALUES( NVAL ) = ? (Given)
The array to contain the default values.
STATUS =
INTEGER (Given and Returned)
The global status.
Notes:
-
There is a routine for each of the data types character, double precision, integer, logical, and real:
replace "x" in the routine name by C, D, I, K, L, or R respectively as appropriate. The VALUES
argument must have the corresponding data type.