CMPLX
— Complex conversion function ¶RESULT = CMPLX(X [, Y [, KIND]])
CMPLX(X [, Y [, KIND]])
returns a complex number where X is converted to
the real component. If Y is present it is converted to the imaginary
component. If Y is not present then the imaginary component is set to
0.0. If X is complex then Y must not be present.
Elemental function
X | The type may be INTEGER , REAL ,
COMPLEX or UNSIGNED . |
Y | (Optional; only allowed if X is not
COMPLEX .) May be INTEGER , REAL or UNSIGNED . |
KIND | (Optional) A scalar INTEGER constant
expression indicating the kind parameter of the result. |
The return value is of COMPLEX
type, with a kind equal to
KIND if it is specified. If KIND is not specified, the
result is of the default COMPLEX
kind, regardless of the kinds of
X and Y.
program test_cmplx integer :: i = 42 real :: x = 3.14 complex :: z z = cmplx(i, x) print *, z, cmplx(x) end program test_cmplx
Fortran 77 and later, extension for UNSIGNED
(see Unsigned integers)