Intel Fortran Language Reference - NCI National Facility

9 Intel Fortran Language Reference
Syntax:
Class:
Arguments:
vector_a
vector_b
Results:
result = DOT_PRODUCT (vector_a, vector_b)
Transformational function; Generic
Must be a rank-one array of numeric (integer, real, or complex) or logical type.
Must be a rank-one array of numeric type if vector_a is of numeric type, or of
logical type if vector_a is of logical type. It must be the same size as vector_a.
The result is a scalar whose type depends on the types of vector_a and
vector_b.
If vector_a is of type integer or real, the result value is SUM
(vector_a*vector_b).
If vector_a is of type complex, the result value is SUM (CONJG
(vector_a)*vector_b).
If vector_a is of type logical, the result has the value ANY (vector_a .AND.
vector_b).
If either rank-one array has size zero, the result is zero if the array is of numeric
type, and false if the array is of logical type. (For more information on
expressions, see “Expressions”.)
DPROD
Examples
DOT_PRODUCT ((/1, 2, 3/), (/3, 4, 5/)) has the value 26, calculated as follows:
((1 x 3) + (2 x 4) + (3 x 5)) = 26
DOT_PRODUCT ((/ (1.0, 2.0), (2.0, 3.0) /), (/ (1.0, 1.0), (1.0, 4.0) /)) has the value (17.0, 4.0).
DOT_PRODUCT ((/ .TRUE., .FALSE. /), (/ .FALSE., .TRUE. /)) has the value false.
Description: Produces a higher precision product. This is a specific function that has no
generic name associated with it. It cannot be passed as an actual argument.
Syntax: result = DPROD (x, y)
Class: Elemental function; Specific
Arguments:
x
Must be of type REAL(4) or REAL(8).
y Must have the same type and kind parameters as x.
9-52