Simple CSP-backtracking sudoku solver in Scheme