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)))) |