Next: DREAL, Previous: DOT_PRODUCT, Up: Intrinsic Procedures [Contents][Index]
DPROD — Double product functionDPROD(X,Y) returns the product X*Y.
Fortran 77 and later
Elemental function
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 |