interleaved

Vocabulary

sequences.interleaved

Definition

IN: sequences.interleaved

TUPLE: interleaved { seq read-only } { elt read-only } ;

Methods

USING: accessors kernel math math.order sequences
sequences.interleaved ;

M: interleaved length seq>> length dup 1 - + 0 max ;


USING: accessors sequences sequences.interleaved ;

M: interleaved like seq>> like ;


USING: accessors sequences sequences.interleaved ;

M: interleaved new-sequence seq>> new-sequence ;


USING: accessors kernel math sequences.interleaved
sequences.private ;

M: interleaved nth-unsafe
    over even?
    [ [ 2/ ] [ seq>> ] bi* nth-unsafe ] [ nip elt>> ] if ;