Update ai.lisp