golf

2023-12-09 10:00:06 -05:00
parent dd3943eddd
commit 3bfcd41f4f
1 changed files with 1 additions and 3 deletions
@@ -12,9 +12,7 @@
        (recur (conj pyramid (mapv - (rest last-line) last-line)))))))

 (defn solve [reduction] (->> (get-puzzle-input 9)
-                             (map parse-line)
-                             (map generate-pyramid)
-                             (map reverse)
+                             (map (comp reverse generate-pyramid parse-line))
                             (map #(reduce reduction 0 %))
                             (reduce +)))