Full code of tic tac toe, written with vectors in Scheme