any?

any?

Test if any member of a list matches the predicate.

(proc is-1 (x)
   (= x 1))

(any? is-1 '(1 1 1)) ; true
(any? is-1 '(0 1 0)) ; true
(any? is-1 '(2 3 5)) ; false