Day 15
This commit is contained in:
7
day15/Part1.hs
Normal file
7
day15/Part1.hs
Normal file
@@ -0,0 +1,7 @@
|
||||
module Part1 where
|
||||
|
||||
import Commons
|
||||
|
||||
|
||||
getHashes :: [Instruction] -> [Int]
|
||||
getHashes = foldr (\ h -> (:) (getHash (raw h) 0)) [0]
|
||||
Reference in New Issue
Block a user