length-operator ( seq quot -- n quot' )


Vocabulary
sequences.private

Inputs
seqan object
quotan object


Outputs
nan object
quot'an object


Definition
USING: kernel ;

IN: sequences.private

: length-operator ( seq quot -- n quot' )
[ length-iterator ] dip compose ; inline