REAL — Convert to real type

Description

REAL(A [, KIND]) converts its argument A to a real type. The REALPART function is provided for compatibility with g77, and its use is strongly discouraged.

Syntax

RESULT = REAL(A [, KIND])
RESULT = REALPART(Z)

Arguments

A Shall be INTEGER, REAL, or COMPLEX.
KIND (Optional) An INTEGER initialization expression indicating the kind parameter of the result.

Return value

These functions return a REAL variable or array under the following rules:

(A): REAL(A) is converted to a default real type if A is an integer or real variable.
(B): REAL(A) is converted to a real type with the kind type parameter of A if A is a complex variable.
(C): REAL(A, KIND) is converted to a real type with kind type parameter KIND if A is a complex, integer, or real variable.

Example



program test_real

  complex :: x = (1.0, 2.0)

  print *, real(x), real(x,8), realpart(x)

end program test_real

Specific names

Name Argument Return type Standard
FLOAT(A) INTEGER(4) REAL(4) Fortran 77 and later
DFLOAT(A) INTEGER(4) REAL(8) GNU extension
SNGL(A) INTEGER(8) REAL(4) Fortran 77 and later

Standard

Fortran 77 and later

Class

Elemental function

`A`	Shall be `INTEGER`, `REAL`, or `COMPLEX`.
`KIND`	(Optional) An `INTEGER` initialization expression indicating the kind parameter of the result.

Name	Argument	Return type	Standard
`FLOAT(A)`	`INTEGER(4)`	`REAL(4)`	Fortran 77 and later
`DFLOAT(A)`	`INTEGER(4)`	`REAL(8)`	GNU extension
`SNGL(A)`	`INTEGER(8)`	`REAL(4)`	Fortran 77 and later