remove

Conformance: R5.91RS Scheme

Purpose: Remove data from lists.

Arguments:
X - datum to remove
A - list

Model:

(define (remove x a)
  (cond ((null? a) '())
    ((equal? x (car a)) (cdr a))
    (else (cons (car a) (remove x (cdr a))))))

Implementation:

(define (remove x a)
  (filter (lambda (y)
            (not (equal? x y)))
          a))

Example:

(remove '(x) '((x) (y) (z) (x))) 
=> ((y) (z))

See also:
remv, remq, member, equal?.