Cmplx Intrinsic
...............
Cmplx(X, Y)
Cmplx: `COMPLEX(KIND=1)' function.
X: `INTEGER', `REAL', or `COMPLEX'; scalar; INTENT(IN).
Y: `INTEGER' or `REAL'; OPTIONAL (must be omitted if X is `COMPLEX');
scalar; INTENT(IN).
Intrinsic groups: (standard FORTRAN 77).
Description:
If X is not type `COMPLEX', constructs a value of type
`COMPLEX(KIND=1)' from the real and imaginary values specified by X and
Y, respectively. If Y is omitted, `0.' is assumed.
If X is type `COMPLEX', converts it to type `COMPLEX(KIND=1)'.
Note:Complex Intrinsic, for information on easily constructing a
`COMPLEX' value of arbitrary precision from `REAL' arguments.