すいません。教えてください。
prologでconnect4のルールを実装しようとしています。
connect4はこことかで遊べます。
http://www.connectfour.org/connect-4-online.php

途中までコードを書いたのですが上手く動いてくれません。
私のコードをデバッグしてもらえないでしょうか。