filter
(remove number? '(a 1 b 2 c 3)) => (a b c)
(load "filter.scm") (define (remove p a) (filter (lambda (x) (not (p x))) a))