Lahey/GNU Fortran

Next: , Previous: RAN, Up: Intrinsic Procedures


8.203 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
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) Fortran 77 and later
DFLOAT(A) INTEGER(4) REAL(8) GNU extension
SNGL(A) INTEGER(8) REAL(4) Fortran 77 and later

See also:
DBLE