Naive sudoku solver written in clojure