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

Описание:

CMPLX(X [, Y [, KIND]]) возвращает комплексное число, где X преобразуется в действительную часть. Если Y присутствует, оно преобразуется в мнимую часть. Если Y отсутствует, то мнимая часть устанавливается в 0,0. Если X комплексное, то Y не должно присутствовать.

Стандарт:

Fortran 77 и более поздние версии

Класс:

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

Синтаксис:

RESULT = CMPLX(X [, Y [, KIND]])

Аргументы:

X	Тип может быть INTEGER, REAL, или COMPLEX.
Y	(Необязательно; разрешается только если X не COMPLEX.) Может быть INTEGER или REAL.
KIND	(Необязательно) Выражение инициализации, указывающее параметр рода результата.

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

Возвращаемое значение имеет тип COMPLEX, с родом, равным KIND, если он указан. Если KIND не указан, результат имеет род по умолчанию COMPLEX, независимо от родов X и 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

См. также:

COMPLEX