euler029 ( -- answer )

Vocabulary

project-euler.029

Inputs

None

Outputs

answer

an object

Definition

USING: kernel math.functions ranges sequences sets ;

IN: project-euler.029

: euler029 ( -- answer )
    2 100 [a..b] dup [ ^ ] cartesian-map concat members length ;