connect4 in f#