Haskell implementation of pinochle.