DPROD — Double product function

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

RESULT = DPROD(X, Y)

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

The return value is of type REAL(8).



program test_dprod

    real :: x = 5.2

    real :: y = 2.3

    real(8) :: d

    d = dprod(x,y)

    print *, d

end program test_dprod

Name Argument Return type Standard
DPROD(X,Y) REAL(4) X, Y REAL(8) Fortran 77 and later

Fortran 77 and later

Elemental function

Name	Argument	Return type	Standard
`DPROD(X,Y)`	`REAL(4) X, Y`	`REAL(8)`	Fortran 77 and later