all-positions-combinations ( seq -- combinations )

Vocabulary

project-euler.051.private

Inputs

seq

an object

Outputs

combinations

an object

Definition

USING: kernel math.combinatorics ranges sequences ;

IN: project-euler.051.private

: all-positions-combinations ( seq -- combinations )
    dup length [1..b] [ all-combinations ] with map concat ;