Removed a redundant filter

diff --git a/advent04/src/advent04.hs b/advent04/src/advent04.hs
index 9066cbbd2744d58d54cf01aabef5733df24d17da..ac7c1756ba0db88c4d6badc0f240316625a846a0 100644 (file)
--- a/advent04/src/advent04.hs
+++ b/advent04/src/advent04.hs
@@ -9,7 +9,7 @@ upperLimit = 675810
 
 
 part1 = length $ filter inRange $ filter adjacentSame candidates
-part2 = length $ filter isolatedAdjacentSame $ filter inRange $ filter adjacentSame candidates
+part2 = length $ filter inRange $ filter isolatedAdjacentSame candidates
 
 inRange digits = n >= lowerLimit && n <= upperLimit
     where n = numify digits