Next: DCMPLX, Previous: DATE_AND_TIME, Up: Intrinsic Procedures [Contents][Index]
DBLE — Double conversion functionDBLE(A) Converts A to double precision real type.
Fortran 77 and later
Elemental function
RESULT = DBLE(A)
| A | The type shall be INTEGER,REAL,
orCOMPLEX. | 
The return value is of type double precision real.
program test_dble
    real    :: x = 2.18
    integer :: i = 5
    complex :: z = (2.3,1.14)
    print *, dble(x), dble(i), dble(z)
end program test_dble