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

format

Browse Source
This commit is contained in:
Adam Jeniski 2024-12-05 01:37:41 -05:00
parent 79952a609f
commit d5e9f85dc8
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
2024/src/day04.clj
View File

@ -30,10 +30,10 @@
(->> (c/get-coords input)
(filter #(= (get-char %) \A))
(filter (fn [[row col]]
(->> [[[(dec row) (dec col)] [(inc row) (inc col)]]
[[(inc row) (dec col)] [(dec row) (inc col)]]]
(map (partial map get-char))
(map set)
(apply = #{\M \S}))))
(->> [[[(dec row) (dec col)] [(inc row) (inc col)]]
[[(inc row) (dec col)] [(dec row) (inc col)]]]
(map (partial map get-char))
(map set)
(apply = #{\M \S}))))
count)