Solving Sudoku in Haskell