(accumulate) ( seq identity quot -- identity seq quot' )


Vocabulary
sequences.private

Inputs
seqan object
identityan object
quotan object


Outputs
identityan object
seqan object
quot'an object


Definition
USING: kernel ;

IN: sequences.private

: (accumulate) ( seq identity quot -- identity seq quot' )
swapd [ keepd ] curry ; inline