Just some Common Lisp to demonstrate the uselessness of most OO pattern in dynamic languages