cord-map ( cord quot -- cord' )


Vocabulary
sequences.cords

Inputs
cordan object
quotan object


Outputs
cord'an object


Definition
USING: accessors kernel ;

IN: sequences.cords

: cord-map ( cord quot -- cord' )
[ [ head>> ] dip call ] [ [ tail>> ] dip call ] 2bi
cord-append ; inline