Adding haskell bot that does valid moves (finally)