A clone of Chips Challenge in Haskell