String Matching
> (search "line" "This is a line of text.")
> (search "line" "THIS IS A LINE OF TEXT.")
> (search "line" "THIS IS A LINE OF TEXT."
> (search "xy9" "abcde01234" :key #'digit-char-p)
; SEARCH works not only on strings but all sequences.
> (search '(0 1) '(0 0 0 1 1 1))
> (search '(0 1) '(2 4 8 7 5 3) :key #'evenp)