PRODUCT — Product of array elements#
-
PRODUCT(ARRAY, DIM, MASK)#
Multiplies the elements of
ARRAY
along dimensionDIM
if the corresponding element inMASK
isTRUE
.- Parameters
ARRAY – Shall be an array of type
INTEGER
,REAL
orCOMPLEX
.DIM – (Optional) shall be a scalar of type
INTEGER
with a value in the range from 1 to n, where n equals the rank ofARRAY
.MASK – (Optional) shall be of type
LOGICAL
and either be a scalar or an array of the same shape asARRAY
.
- Returns
The result is of the same type as
ARRAY
.
- Standard:
Fortran 90 and later
- Class:
Transformational function
- Syntax:
RESULT = PRODUCT(ARRAY[, MASK]) RESULT = PRODUCT(ARRAY, DIM[, MASK])
- Example:
PROGRAM test_product INTEGER :: x(5) = (/ 1, 2, 3, 4 ,5 /) print *, PRODUCT(x) ! all elements, product = 120 print *, PRODUCT(x, MASK=MOD(x, 2)==1) ! odd elements, product = 15 END PROGRAM
- See also: