QEXT(A) (IBM extension)

Purpose

Convert to extended precision real type.

Elemental function

Extended precision real.

If A is of type extended precision real, QEXT(A) = A.
If A is of type integer or real, the result is the exact extended precision representation of A.

QEXT (-3) has the value -3.0Q0.

Specific Name	Argument Type	Result Type	Pass As Arg?
QFLOAT	any integer	REAL(16)	no
QEXT	default real	REAL(16)	no
QEXTD	double precision real	REAL(16)	no