Simple NegaMax chess player in Haskell, just for fun.