euler072 ( -- answer )

Vocabulary

project-euler.072

Inputs

None

Outputs

answer

an object

Definition

USING: math.primes.factors ranges sequences ;

IN: project-euler.072

: euler072 ( -- answer ) 2 1000000 [a..b] [ totient ] map-sum ;