SHOW:
|
|
- or go back to the newest paste.
1 | (defn addable? | |
2 | - | "Returns true if a queen at rank extends partial-sol." |
2 | + | |
3 | (every? false? (map (partial apply (partial test? (+ 1 (count list)) rank)) | |
4 | (map-indexed (fn [i v] (vector (inc i) v)) | |
5 | list)))) |