Doing SICP in Common Lisp