From 931b8f4140207d95611a9904407226c034713cbd Mon Sep 17 00:00:00 2001 From: Neil Smith Date: Wed, 29 Nov 2017 08:21:02 +0000 Subject: [PATCH] Tweaked --- adventofcode1701/app/advent01.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/adventofcode1701/app/advent01.hs b/adventofcode1701/app/advent01.hs index d6d3782..dc63f9c 100644 --- a/adventofcode1701/app/advent01.hs +++ b/adventofcode1701/app/advent01.hs @@ -20,7 +20,7 @@ part1 instructions = do part2 :: [Int] -> IO () part2 instructions = do - print $ length $ takeWhile (> -1) $ scanl (+) 0 instructions + print $ length $ takeWhile (>= 0) $ scanl (+) 0 instructions -- 2.34.1