How to Solve it in LISP