Elemental Intrinsic Function (Generic): Converts a value to real type.
result = REAL (a[,kind])
a |
(Input) Must be of type integer, real, or complex. |
kind |
(Input; optional) Must be a scalar integer initialization expression. |
The result type is real. If kind is present, the kind parameter is that specified by kind; otherwise, the kind parameter of the result is shown in the following table. If the processor cannot represent the result value in the kind of the result, the result is undefined.
Functions that cause conversion of one data type to another type have the same affect as the implied conversion in assignment statements.
If a is integer or real, the result is equal to an approximation of a. If a is complex, the result is equal to an approximation of the real part of a.
Specific Name 1 |
Argument Type |
Result Type |
|---|---|---|
INTEGER(1) |
REAL(4) |
|
FLOATI |
INTEGER(2) |
REAL(4) |
FLOAT 2, 3 |
INTEGER(4) |
REAL(4) |
REAL 2 |
INTEGER(4) |
REAL(4) |
FLOATK |
INTEGER(8) |
REAL(4) |
REAL(4) |
REAL(4) |
|
SNGL 2, 4 |
REAL(8) |
REAL(4) |
SNGLQ |
REAL(16) |
REAL(4) |
COMPLEX(4) |
REAL(4) |
|
COMPLEX(8) |
REAL(8) |
|
1 These specific functions cannot be passed as actual arguments. 2 The setting of compiler options specifying real size can affect FLOAT, REAL, and SNGL. 3 Or FLOATJ. For compatibility with older versions of Fortran, FLOAT is generic, allowing any kind of INTEGER argument, and returning a default real result. 4 For compatibility with older versions of Fortran, SNGL is generic, allowing any kind of REAL argument, and returning a default real result. |
||
REAL (-4) has the value -4.0.
REAL (Y) has the same kind parameter and value as the real part of complex variable Y.