Next: DCMPLX, Previous: DATE_AND_TIME, Up: Intrinsic Procedures
DBLE — Double conversion functionDBLE(X) Converts X to double precision real type.
     RESULT = DBLE(X)
     | X | The type shall be INTEGER(*),REAL(*),
                   orCOMPLEX(*). | 
          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