2any? ( ... seq1 seq2 quot: ( ... elt1 elt2 -- ... ? ) -- ... ? )

Vocabulary

sequences

Inputs

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

Outputs

?

a boolean

Word description

Tests if any pairwise elements of seq1 and seq2 fulfill the predicate. If the sequences have different lengths, then only the smallest sequences items are compared with the other.

Examples

USING: math prettyprint sequences ; { 2 4 5 8 } { 2 4 6 8 } [ < ] 2any? .
t

Definition

USING: kernel ;

IN: sequences

: 2any?
    ( ... seq1 seq2 quot: ( ... elt1 elt2 -- ... ? ) -- ... ? )
    negate 2all? not ; inline