aboutsummaryrefslogtreecommitdiff
path: root/execs
diff options
context:
space:
mode:
Diffstat (limited to 'execs')
-rw-r--r--execs/Day02.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/execs/Day02.hs b/execs/Day02.hs
index b06b44d..a2815b7 100644
--- a/execs/Day02.hs
+++ b/execs/Day02.hs
@@ -37,5 +37,6 @@ parseLine parser line = right $ parse parser "input" line
37 37
38main :: IO () 38main :: IO ()
39main = do 39main = do
40 n <- map (doCheck2 . parseLine parseProp) . lines <$> readFile "input/02" 40 n <- map (parseLine parseProp) . lines <$> readFile "input/02"
41 print $ countElem True n 41 print $ countElem True (map doCheck1 n)
42 print $ countElem True (map doCheck2 n)