Recursive LISP Function to Reverse a List

(DEFUN REVERSE(R)
     (REV-AUX R()))
(DEFUN REV-AUX (REM-LIST REVERSES-SO-FAR)
     (COND ((NULL REM-LIST) REVERSE-SO-FAR)
          (T(REV-AUX(CDR REM-LIST)
             (CONS(CAR REM-LIST) REVERSED-SO-FAR)))))