golf
This commit is contained in:
+1
-2
@@ -12,8 +12,7 @@
|
|||||||
pyramid
|
pyramid
|
||||||
(recur (conj pyramid (mapv - (rest last-line) last-line)))))))
|
(recur (conj pyramid (mapv - (rest last-line) last-line)))))))
|
||||||
|
|
||||||
(defn solve [reduction]
|
(defn solve [reduction] (->> (get-puzzle-input 9)
|
||||||
(->> (get-puzzle-input 9)
|
|
||||||
(map parse-line)
|
(map parse-line)
|
||||||
(map generate-pyramid)
|
(map generate-pyramid)
|
||||||
(map reverse)
|
(map reverse)
|
||||||
|
|||||||
Reference in New Issue
Block a user