cycle-from ( seq length start -- new-seq )

Vocabulary

sequences.repeating

Inputs

seq	an object
length	an object
start	an object

Outputs

new-seq

an object

Definition

USING: kernel sequences ;

IN: sequences.repeating

: cycle-from ( seq length start -- new-seq )
    [ dup ] 2dip <cycles-from> swap like ;