euler036 ( -- answer )

Vocabulary

project-euler.036

Inputs

None

Outputs

answer

an object

Definition

USING: project-euler.036.private ranges sequences ;

IN: project-euler.036

: euler036 ( -- answer )
    1 1000000 2 <range> [ both-bases? ] filter sum ;