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