9.229 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.

Standard:

Fortran 77 and later, with KIND argument Fortran 90 and later, has GNU extensions

Class:

Elemental function

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)	GNU extension
DFLOAT(A)	INTEGER(4)	REAL(8)	GNU extension
FLOATI(A)	INTEGER(2)	REAL(4)	GNU extension
FLOATJ(A)	INTEGER(4)	REAL(4)	GNU extension
FLOATK(A)	INTEGER(8)	REAL(4)	GNU extension
SNGL(A)	INTEGER(8)	REAL(4)	GNU extension

See also:

DBLE