products ( seq -- m )

Vocabulary

project-euler.032.private

Inputs

seq

an object

Outputs

m

an object

Definition

USING: math math.functions sequences ;

IN: project-euler.032.private

: products ( seq -- m ) [ 10 4 ^ mod ] map ;