Haskell Mastermind