From 4512b18543f9bb760fc75015e30c91924c227e96 Mon Sep 17 00:00:00 2001
From: KoenDR06 <koen.de.ruiter@hotmail.com>
Date: Mon, 1 Dec 2025 15:13:12 +0100
Subject: [PATCH] final day 1

---
 src/Day2501.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Day2501.hs b/src/Day2501.hs
index e2a4400..77b2202 100644
--- a/src/Day2501.hs
+++ b/src/Day2501.hs
@@ -21,7 +21,7 @@ part2 = go 50 . convertToInts . lines
     edgeCase = if x < 0 && p' `mod` 100 == 0 then 1 else 0
              + if x < 0 && p  `mod` 100 == 0 then -1 else 0
 
-    p' = (p + x)
+    p' = p + x
 
 main :: IO ()
 main = do