54 Poker hands - Handle record types in Haskell (fixed style)