通常のmultirember

(define multirember
 (lambda (waha musu)
  (cond
   ((null? musu) (quote ()))
   ((eq? (car musu) waha) (multirember waha (cdr musu)))
   (else (cons (car musu) (multirember waha (cdr musu)))))))

(multirember 'tuna '(tuna octopus cram))