у меня везде ошибка подобного рода:
> (defun fe(a  (cons(list(car(a ))(list(cdr(a ))))
FE                                                      
> (fe'(aw1 aw2))                                        
error: too few arguments  

Случайно не знаешь, что там не так?