rads-upto ( n -- seq )

Vocabulary

project-euler.124.private

Inputs

n

an object

Outputs

seq

an object

Definition

USING: arrays kernel ranges sequences ;

IN: project-euler.124.private

: rads-upto ( n -- seq ) [0..b] [ dup rad 2array ] map ;