max-product ( matrix width -- n )

Vocabulary

project-euler.011.private

Inputs

matrix	an object
width	an object

Outputs

n

an object

Definition

USING: grouping kernel math.order sequences ;

IN: project-euler.011.private

: max-product ( matrix width -- n )
    [ clump ] curry map concat [ product ] [ max ] map-reduce ;
    inline