2map! ( ... seq1 seq2 quot: ( ... elt1 elt2 -- ... newelt ) -- ... seq1 )

Vocabulary

sequences.extras

Inputs

seq1	a sequence
seq2	a sequence
quot	a quotation with stack effect ( ... elt1 elt2 -- ... newelt )

Outputs

seq1	a sequence

Word description

Applies the quotation to each pair of elements from seq1 and seq2, yielding a new element, and storing it back into seq1. Returns seq1.

See also

2map, map!

Definition

USING: kernel ;

IN: sequences.extras

: 2map!
    ( ... seq1 seq2 quot: ( ... elt1 elt2 -- ... newelt ) -- ... seq1 )
    pick [ 2map-into ] keep ; inline