Удалить атом х из простого списка - Lisp

(defun del-atom (lst x)
  (let ((r nil))
    (dolist (i lst (reverse r))
      (if (not (eq i x)) (push i r)))))
 
==> del-atom
 
(del-atom '(q w e r q w e r) 'r)
 
==> (q w e q w e)