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

  DPROD (number, number)

  A function that returns the product of two real values using the
  next higher precision data type.

  +------+---------+----------+------------+-------------+
  | Args | Generic | Specific |  Argument  | Result Type |
  +------+---------+----------+------------+-------------+
  |  2   |  DPROD  | DPROD    | REAL*4     | REAL*8      |
  |      |         | none     | REAL*8     | REAL*16     |
  +------+---------+----------+------------+-------------+
  3 DREAL
  DREAL (complex-number)

  A function that returns the real part of a complex number.  The
  argument must be a COMPLEX*16 data type.  The result is a REAL*8
  data type.