Common Lisp Including Nikodemus-style Nicknames