From 5ab4cd7856a770400de09cd31b45ee5863344290 Mon Sep 17 00:00:00 2001
From: Gattix <gattix@cock.li>
Date: Sun, 12 Dec 2021 01:15:18 +0100
Subject: [PATCH] =?UTF-8?q?=E2=80=A6=20forgot=20to=20remove=20a=20line?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

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

diff --git a/2021/day05/day05.hs b/2021/day05/day05.hs
index 2278ad5..1c4190e 100644
--- a/2021/day05/day05.hs
+++ b/2021/day05/day05.hs
@@ -6,7 +6,6 @@ import Control.Monad
 main :: IO ()
 main = do
   input <-  map (map read . filter (/="->")) <$> map (splitOneOf ", ") <$> lines <$> readFile "input"
-  let part1inp = filterOrth input
   let process = length . M.filter (> 1) . M.fromListWith (+) . toMap
   print $ join (***) process $ (filterOrth input,input)