split-shuffle ( shuf -- sh uf )


Vocabulary
sequences.cords.private

Inputs
shufan object


Outputs
shan object
ufan object


Definition
USING: kernel math sequences ;

IN: sequences.cords.private

: split-shuffle ( shuf -- sh uf ) dup length 2 /i cut* ;
foldable flushable