Update sudoku.hs