seq>2seq ( seq -- seq1 seq2 )

Vocabulary

checksums.interleave

Inputs

seq

an object

Outputs

seq1	an object
seq2	an object

Definition

USING: grouping sequences ;

IN: checksums.interleave

: seq>2seq ( seq -- seq1 seq2 )
    2 group flip [ { } { } ] [ first2 ] if-empty ;