reuse core fns

This commit is contained in:
Adam Jeniski 2024-12-03 00:56:46 -05:00
parent 126b3a4768
commit caa9f6415e

View File

@ -9,9 +9,7 @@
"takes in a string containing mul instructions "takes in a string containing mul instructions
returns list of parsed integral multiplication results" returns list of parsed integral multiplication results"
[s] [s]
(->> s (->> (c/get-match-groups #"mul\((\d{1,3}),(\d{1,3})\)" s)
(re-seq #"mul\((\d{1,3}),(\d{1,3})\)")
(map rest)
(map #(map parse-long %)) (map #(map parse-long %))
(map #(reduce * %)))) (map #(reduce * %))))