rotated

Vocabulary

sequences.rotated

Definition

USING: math ;

IN: sequences.rotated

TUPLE: rotated
    { seq read-only } { n integer read-only initial: 0 } ;

Methods

USING: accessors sequences sequences.rotated ;

M: rotated length seq>> length ;


USING: accessors sequences sequences.rotated ;

M: rotated virtual-exemplar seq>> ;


USING: accessors kernel math sequences sequences.rotated ;

M: rotated virtual@
    [ n>> + ] [ seq>> ] bi
    [ length over 0 < [ + ] [ 2dup >= [ - ] [ drop ] if ] if ]
    keep ;