8.71 COMPLEX — Функция преобразования в комплексное число

Описание:

COMPLEX(X, Y) возвращает комплексное число, где X преобразуется в действительную часть, а Y — в мнимую.

Стандарт:

Расширение GNU

Класс:

Элементарная функция

Синтаксис:

RESULT = COMPLEX(X, Y)

Аргументы:

X	Тип может быть INTEGER или REAL.
Y	Тип может быть INTEGER или REAL.

Возвращаемое значение:

Если X и Y имеют тип INTEGER, то возвращаемое значение имеет тип по умолчанию COMPLEX.

Если X и Y имеют тип REAL или один из них имеет тип REAL, а другой — INTEGER, то возвращаемое значение имеет тип COMPLEX, а вид соответствует аргументу REAL с наибольшей точностью.

Пример:

program test_complex
    integer :: i = 42
    real :: x = 3.14
    print *, complex(i, x)
end program test_complex

См. также:

CMPLX