LISP - Remover todas ocorrencias de um elemento na lista

Estou utilizando XLISP...

o exercicio é o seguinte:

- Escreva um procedimento que, dados um elemento e uma lista, apaga todas as ocorrências desse elemento na lista.

A minha resposta foi a seguinte:

(defun apaga (elemento lista)
(cond
((null lista) nil)
((equal elemento (car lista)) (cdr lista))
(t (apaga(elemento (cdr lista))))))
mas nao esta dando certo.alguem poderia me ajudar?