fib-upto ( n -- seq )

Vocabulary

project-euler.002

Inputs

n

an object

Outputs

seq

an object

Definition

USING: kernel project-euler.002.private ;

IN: project-euler.002

: fib-upto ( n -- seq ) V{ 0 } clone 1 rot (fib-upto) ;