DPROD intrinsic function
Standard: F77 F90 F95 F2003 F2008 F2018 Example program
＜Syntax＞
DPROD ( X, Y )
X : Real with default kind;
Y : Same type and kind as X, conformable with X;
Result : Same type and kind as X.
＜Semantics＞
The result is the double precision product of X and Y; this is essentially the same as X*DBLE(Y) or DBLE(X)*Y or DBLE(X)*DBLE(Y).
Like many intrinsic functions, this is elemental; if either (or both) of X and Y is an array, the result will be an array with that shape, with the value being computed elementwise.