VMS Help FORTRAN, Intrinsic Procedures, DBLE  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  DBLE (number)

  A function that converts the argument into a REAL*8 value.

  +------+---------+----------+------------+-------------+
  | Args | Generic | Specific |  Argument  | Result Type |
  +------+---------+----------+------------+-------------+
  |  1   |  DBLE   | DBLE     | INTEGER*2  | REAL*8      |
  |      |         | DBLE     | INTEGER*4  | REAL*8      |
  |      |         | DBLE     | REAL*4     | REAL*8      |
  |      |         | DBLE     | REAL*8     | REAL*8      |
  |      |         | DBLEQ    | REAL*16    | REAL*8      |
  |      |         | DBLE     | COMPLEX*8  | REAL*8      |
  |      |         | DBLE     | COMPLEX*16 | REAL*8      |
  +------+---------+----------+------------+-------------+