QCMPLX(X, Y) (IBM extension)

Purpose

Convert to extended complex type.

Class

Elemental function

Argument type and attributes

X

An INTENT(IN) INTEGER, REAL, or COMPLEX

Y (optional)

An INTENT(IN) INTEGER or REAL. It must not be present if X is of type COMPLEX.

Result type and attributes

It is of type extended complex.

Result value

• If Y is absent and X is not complex, it is as if Y were present with the value of zero.
• If Y is absent and X is complex, it is as if Y were present with the value AIMAG(X) and X were present with the value REAL(X).
• QCMPLX(X, Y) has the complex value whose real part is REAL(X, KIND=16) and whose imaginary part is REAL(Y, KIND=16).

Related information

CMPLX(X, Y, KIND), DCMPLX(X, Y) (IBM extension).