An initialization expression is a constant expression, that is subject to all the same rules. In addition, the following rules apply to items that form primaries for initialization expressions:
You can also specify the generic intrinsic functions and related specific
functions found in the Intrinsic Functions for Initialization
Expressions table. Unless otherwise noted, all table entries are
provided as IBM extensions, though the intrinsic functions themselves are not
extensions.
Table 5. Intrinsic Functions for Initialization Expressions
ABS (ABS, DABS, and QABS specific functions only) | IMAG | NULL(1) |
AIMAG | INDEX | QCMPLX |
CMPLX | INT | QEXT |
CONJG | MAX | REAL |
DBLE | MIN | SCAN |
DCMPLX | MOD | SIGN |
DIM (DIM, DDIM, and QDIM specific functions only) | NEW_LINE(2) | VERIFY |
DPROD | NINT |
|
Notes:
If an initialization expression includes a reference to an inquiry function for a type parameter or an array bound of an object specified in the same specification part, the type parameter or array bound must be specified in a prior specification of the specification part. The prior specification can be to the left of the inquiry function in the same statement.
3.4**3 KIND(57438) (/'desk','lamp'/) 'ab'//'cd'//'ef'