product-length ( sequences -- length )


Vocabulary
sequences.product.private

Inputs
sequencesan object


Outputs
lengthan object


Definition
USING: math sequences ;

IN: sequences.product.private

: product-length ( sequences -- length )
[ length ] [ * ] map-reduce integer>fixnum-strict ; inline