DPROD — Double product functionDPROD(X,Y) returns the product X*Y.
RESULT = DPROD(X, Y)
| X | The type shall be REAL.
|
| Y | The type shall be REAL.
|
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(4) | Fortran 77 and later
|