DBLE
— Double conversion function ¶DBLE(A)
Converts A to double precision real type.
Fortran 77 and later
Elemental function
RESULT = DBLE(A)
A | The type shall be INTEGER , REAL ,
or COMPLEX . |
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