HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11546
Case 2 If VECTOR_A is of type complex, the result has the value
SUM(CONJG(VECTOR_A)*VECTOR_B). If the vectors have size zero, the result
has the value zero.
Case 3 If VECTOR_A is of type logical, the result has the value ANY(VECTOR_A .AND.
VECTOR_B). If the vectors have size zero, the result has the value .FALSE..
DPROD(X, Y)
Description
Double precision real product.
Class
Elemental function.
Arguments
X must be of type default real.
Y must be of type default real.
Result type/
type parameters
Double precision real.
Result value
The result has a value equal to a processor-dependent approximation to the product of X and
Y.
DREAL(A)
Description
Convert to double precision.
Class
Elemental nonstandard function.