(defun removeEl(l e)
    (cond
         (
            (null l)
            nil
         )
         (
           (listp (car l))
           (cons (removeEl (car l) e) (remove (cdr l) e))
           ;(removeEl (car l) e)
         )
         (
           (and (equal (car l) e) (numberp (car l)))
           (removeEl (cdr l) e)
         )
         (
              t
              (cons (car l) (removeEl (cdr l) e))
         )
     )
)