From dd0ff0f11ea2696164f3819d3b381c6eca2a4572 Mon Sep 17 00:00:00 2001 From: Neil Smith Date: Fri, 6 Dec 2024 14:21:10 +0000 Subject: [PATCH] Tidying --- advent06/Main.hs | 2 +- advent06/MainPar.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/advent06/Main.hs b/advent06/Main.hs index db5fbae..f83b2ba 100644 --- a/advent06/Main.hs +++ b/advent06/Main.hs @@ -31,7 +31,7 @@ main = print $ part2 grid guard -part1 :: Grid -> Guard -> Int +part1, part2:: Grid -> Guard -> Int part1 grid guard = length $ nub $ walk grid guard part2 grid guard = length $ filter (isLoop guard []) modifiedGrids diff --git a/advent06/MainPar.hs b/advent06/MainPar.hs index ec034d5..40b8fa5 100644 --- a/advent06/MainPar.hs +++ b/advent06/MainPar.hs @@ -31,7 +31,7 @@ main = print $ part2 grid guard -part1 :: Grid -> Guard -> Int +part1, part2 :: Grid -> Guard -> Int part1 grid guard = length $ nub $ walk grid guard part2 grid guard = length $ filter id loopResults -- 2.34.1