2reduce-from ( ... seq1 seq2 identity quot: ( ... prev elt1 elt2 -- ... next ) i -- ... result )


Vocabulary
sequences.extras

Inputs
seq1an object
seq2an object
identityan object
quota quotation with stack effect ( ... prev elt1 elt2 -- ... next )
ian object


Outputs
resultan object


Definition


: 2reduce-from
( ... seq1 seq2 identity quot: ( ... prev elt1 elt2 -- ... next ) i -- ... result )
[ -rot ] 2dip 2each-from ; inline