Update hanoi.lisp