more Poker hands

Haskell