An implementation of Connect 4 using Lisp