fit-requirements? ( seq -- ? )

Vocabulary

project-euler.070.private

Inputs

seq

an object

Outputs

?

an object

Definition

USING: combinators.short-circuit kernel math math.functions
project-euler.common sequences ;

IN: project-euler.070.private

: fit-requirements? ( seq -- ? )
    first2 { [ drop 7 10^ < ] [ permutations? ] } 2&& ;