9.67 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