From 44e641dbd667318a62d21fe8e4b94b0171caaf9a Mon Sep 17 00:00:00 2001
From: Gattix <gattix@cock.li>
Date: Thu, 16 Dec 2021 21:58:39 +0100
Subject: [PATCH] day7: dangling debug print

---
 2021/day07/day07.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/2021/day07/day07.hs b/2021/day07/day07.hs
index 0936a99..113cb34 100644
--- a/2021/day07/day07.hs
+++ b/2021/day07/day07.hs
@@ -9,7 +9,6 @@ main = do
   let middle2 = (sum crabs) `div` genericLength crabs
   print $ fuel middle1 id crabs
   print $ fuel middle2 (\x->last $ take (x+1) $ scanl1 (+) [0..]) crabs
-  print middle2
 
 fuel :: Int -> (Int -> Int) -> [Int] -> Int
 fuel middle f = sum . map (f . abs . subtract middle)