multiples ( n -- seq )

Vocabulary

project-euler.047.private

Inputs

n

an object

Outputs

seq

an object

Definition

USING: kernel math namespaces ranges sequences ;

IN: project-euler.047.private

: multiples ( n -- seq ) sieve get length 1 - over <range> ;