cord-both ( cord quot -- h t )


Vocabulary
sequences.cords

Inputs
cordan object
quotan object


Outputs
han object
tan object


Definition
USING: accessors kernel ;

IN: sequences.cords

: cord-both ( cord quot -- h t )
[ [ head>> ] [ tail>> ] bi ] dip bi@ ; inline