8.228 REAL — Преобразование к вещественному типу

Описание:

REAL(A [, KIND]) преобразует свой аргумент A к вещественному типу. Функция REALPART предоставлена для совместимости с g77, и её использование крайне не рекомендуется.

Стандарт:

Fortran 77 и более поздние версии, с аргументом KIND Fortran 90 и более поздние версии, с расширениями GNU

Класс:

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

Синтаксис:

RESULT = REAL(A [, KIND])

RESULT = REALPART(Z)

Аргументы:

`A`	Должен быть `INTEGER`, `REAL`, или `COMPLEX`.
`KIND`	(Необязательно) Скалярное `INTEGER` константное выражение, указывающее параметр вида результата.

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

Эти функции возвращают вещественную переменную или массив по следующим правилам:

(A): REAL(A) преобразуется к вещественному типу по умолчанию, если A является целочисленной или вещественной переменной.
(B): REAL(A) преобразуется к вещественному типу с параметром вида A, если A является комплексной переменной.
(C): REAL(A, KIND) преобразуется к вещественному типу с параметром вида KIND, если A является комплексной, целочисленной или вещественной переменной.

Пример:

program test_real
  complex :: x = (1.0, 2.0)
  print *, real(x), real(x,8), realpart(x)
end program test_real

Указанные имена:

Имя	Аргумент	Тип возвращаемого значения	Стандарт
`FLOAT(A)`	`INTEGER(4)`	`REAL(4)`	Fortran 77 и более поздние версии
`DFLOAT(A)`	`INTEGER(4)`	`REAL(8)`	Расширение GNU
`FLOATI(A)`	`INTEGER(2)`	`REAL(4)`	Расширение GNU (-fdec)
`FLOATJ(A)`	`INTEGER(4)`	`REAL(4)`	Расширение GNU (-fdec)
`FLOATK(A)`	`INTEGER(8)`	`REAL(4)`	Расширение GNU (-fdec)
`SNGL(A)`	`REAL(8)`	`REAL(4)`	Fortran 77 и более поздние версии

См. также:

DBLE — Функция преобразования к двойной точности

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/REAL.html