9.58 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	(Необязательно) Выражение инициализации INTEGER, указывающее параметр вида результата.

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

Возвращаемое значение имеет тип 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