8.45 DPROD — Double product function

Description:

DPROD(X,Y) returns the product X*Y.

Option:

f95, gnu

Class:

elemental function

Syntax:

D = DPROD(X,Y)

Arguments:

X	The type shall be REAL.
Y	The type shall be REAL.

Return value:

The return value is of type REAL(8).

Example:

          program test_dprod
              integer :: i
              real :: x = 5.2
              real :: y = 2.3
              real(8) :: d
              d = dprod(x,y)
              print *, d
          end program test_dprod