#
Fortran Wiki

cmplx

## Description

`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.

## Standard

FORTRAN 77 and later

## Class

Elemental function

## Syntax

`result = cmplx(x [, y [, kind]])`

## Arguments

`x`

- The type may be `integer`

, `real`

, or `complex`

.
`y`

- (Optional; only allowed if `x`

is not `complex`

.) May be `integer`

or `real`

.
`kind`

- (Optional) An `integer`

initialization expression indicating the kind parameter of the result.

## Return value

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`

.

## Example

```
program test_cmplx
integer :: i = 42
real :: x = 3.14
complex :: z
z = cmplx(i, x)
print *, z, cmplx(x)
end program test_cmplx
```

Revised on April 30, 2009 22:37:59
by

Jason Blevins
(71.70.142.190)
(1150 characters / 0.0 pages)