9.218 REAL — Преобразование в вещественный тип

Описание:

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

Стандарт:

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

Класс:

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

Синтаксис:

RESULT = REAL(A [, KIND])

RESULT = REALPART(Z)

Аргументы:

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

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

Эти функции возвращают переменную или массив 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
SNGL(A)	INTEGER(8)	REAL(4)	Fortran 77 и более поздние версии

См. также:

DBLE