GNU Info

(g77-300.info)Cmplx Intrinsic

---

Next: Complex Intrinsic Prev: CLog Intrinsic Up: Table of Intrinsic Functions

---

Enter node , (file) or (file)node

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.