Connect 4 game in scheme (racket)