From: Neil Smith <neil.git@njae.me.uk>
Date: Fri, 15 Dec 2017 16:59:48 +0000 (+0000)
Subject: Fixed a bug that isn't a bug in practice
X-Git-Url: https://git.njae.me.uk/?a=commitdiff_plain;h=7bd53fa28f55dc6264d383deb23090799d21dd0c;p=advent-of-code-17.git

Fixed a bug that isn't a bug in practice
---

diff --git a/src/advent15/advent15.hs b/src/advent15/advent15.hs
index 5aba6d7..4b16e08 100644
--- a/src/advent15/advent15.hs
+++ b/src/advent15/advent15.hs
@@ -33,7 +33,7 @@ stream :: (Int -> Int) -> Int -> [Word16]
 stream gen n0 = map toWord16 $ drop 1 $ iterate gen n0
 
 stream' :: Int -> (Int -> Int) -> Int -> [Word16]
-stream' f gen n0 = map toWord16 $ drop 1 $ filter ((== 0) . (`mod` f)) $ iterate gen n0
+stream' f gen n0 = map toWord16 $ filter ((== 0) . (`mod` f)) $ drop 1 $ iterate gen n0
 
 
 -- filteredStream :: Word16 -> [Word16] -> [Word16]