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` константная выражение, указывающее параметр вида результата.

Значение результата:

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

(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-14.2.0/gfortran/REAL.html