Poker 7 card hand evaluator for Haskell