projects
/
advent-of-code-16.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
More point-free
[advent-of-code-16.git]
/
advent01.hs
diff --git
a/advent01.hs
b/advent01.hs
index 27a6f21db1c5351d75e3b1ce72ba5656e206cc56..6b3eefd047e5dd21fb79ffb1cf79fb70bd998b48 100644
(file)
--- a/
advent01.hs
+++ b/
advent01.hs
@@
-52,7
+52,8
@@
expandSteps =
-- Execute a series of steps, keeping track of the positions after each step
takeSteps :: Position -> [Step] -> [Position]
-- Execute a series of steps, keeping track of the positions after each step
takeSteps :: Position -> [Step] -> [Position]
-takeSteps pos steps = scanl move pos steps
+-- takeSteps pos steps = scanl move pos steps
+takeSteps = scanl move
-- Make one move, by updating direction then position
move :: Position -> Step -> Position
-- Make one move, by updating direction then position
move :: Position -> Step -> Position