A sudoku solver in racket