ajet/advent-of-code
1
0
Fork 0
mirror of https://github.com/Ajetski/advent-of-code.git synced 2025-09-30 09:23:17 -09:00
Code Issues Packages Projects Releases Wiki Activity

improve naming

Browse Source
This commit is contained in:
Adam Jeniski 2023-12-03 12:51:49 -05:00
parent 7396fcc6d1
commit 9ddce5f7a8
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
2023/src/day03.clj
View File

@ -40,7 +40,7 @@
(map #(vector row (:start %) (:group %))
matches)))
(mapcat identity)
(map (fn touching-star [[row-idx col-idx s]]
(map (fn touching-stars [[row-idx col-idx s]]
(let [length (count s)]
(->> (for [r [(dec row-idx) row-idx (inc row-idx)]
c (range (dec col-idx) (+ col-idx length 1))]
@ -51,7 +51,7 @@
(filter seq)
(mapcat identity)
(map #(vector (ffirst %) (second %))))
cogs (->> data
gear (->> data
(map first)
(frequencies)
(filter #(= (second %) 2))
@ -59,7 +59,7 @@
(into #{}))]
(->> data
(group-by first)
(filter #(cogs (first %)))
(filter #(gear (first %)))
(map #(update % 1 (partial map second)))
(map second)
(map (partial map #(Integer/parseInt %)))