(DEFUN MY_REVERSE(lst)
 (COND ((NULL lst) NIL)
       ((ATOM (CAR LST)) (APPEND (MY_REVERSE (CDR lst)) (LIST(CAR LST))) )
       (1 (APPEND  (MY_REVERSE (CDR lst)) (LIST (MY_REVERSE (CAR LST)))) )
 )
)

(PRINT (MY_REVERSE '(1 2 3 4 5)))