DBLE
— Double conversion function ¶RESULT = DBLE(A)
DBLE(A)
Converts A to double precision real type.
Elemental function
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
Fortran 77 and later