A LISP implementation of Tic-Tac-Toe for AI 3460;460