3each-from ( ... seq1 seq2 seq3 quot: ( ... elt1 elt2 elt3 -- ... ) i -- ... )


Vocabulary
sequences.extras

Inputs
seq1a sequence
seq2a sequence
seq3a sequence
quota quotation
ian integer


Outputs
None

Definition


: 3each-from
( ... seq1 seq2 seq3 quot: ( ... elt1 elt2 elt3 -- ... ) i -- ... )
[ 3length-operator ] dip -rot each-integer-from ; inline