| Description: | Converts a number to double-precision real type. | ||
| Class: | Elemental function; Generic | ||
| Arguments: | A must be of type integer, real, or complex. | ||
| Results: | The result type is double precision real
(REAL(8) or REAL*8). Functions that cause
conversion of one data type to another type have the same effect as
the implied conversion in assignment statements.
If A is of type double precision, the result is the value of the A with no conversion (DBLE(A) = A). If A is of type integer or real, the result has as much precision of the significant part of A as a double precision value can contain. If A is of type complex, the result has as much precision of the significant part of the real part of A as a double precision value can contain. | ||
| Specific Name1 | Argument Type | Result Type |
|---|---|---|
| INTEGER(1) | REAL(8) | |
| INTEGER(2) | REAL(8) | |
| INTEGER(4) | REAL(8) | |
| INTEGER(8) | REAL(8) | |
| DBLE 2 | REAL(4) | REAL(8) |
| REAL(8) | REAL(8) | |
| DBLEQ | REAL(16) | REAL(8) |
| COMPLEX(4) | REAL(8) | |
| COMPLEX(8) | REAL(8) | |
| COMPLEX(16) | REAL(8) | |
|
1 These specific functions cannot be passed as actual
arguments.
2 For compatibility with older versions of Fortran, DBLE can also be specified as a specific function. | ||
Examples
DBLE (4) has the value 4.0.
DBLE ((3.4, 2.0)) has the value 3.4.