REAL
— Convert to real typeREAL(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.
RESULT = REAL(A [, KIND])
|
RESULT = REALPART(Z)
|
A | Shall be INTEGER , REAL , or
COMPLEX .
|
KIND | (Optional) An INTEGER initialization
expression indicating the kind parameter of the result.
|
REAL
variable or array under
the following rules:
REAL(A)
is converted to a default real type if A is an
integer or real variable.
REAL(A)
is converted to a real type with the kind type parameter
of A if A is a complex variable.
REAL(A, KIND)
is converted to a real type with kind type
parameter KIND if A is a complex, integer, or real
variable.
program test_real complex :: x = (1.0, 2.0) print *, real(x), real(x,8), realpart(x) end program test_real
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
|