diff --git a/4/solution.hs b/4/solution.hs
index 9f98676..32c95b7 100644
--- a/4/solution.hs
+++ b/4/solution.hs
@@ -1,6 +1,5 @@
 {-# LANGUAGE TupleSections #-}
-import Data.List
-import Debug.Trace
+import Data.List (transpose, partition)
 
 main :: IO ()
 main = readFile "4/input.txt" >>= print . solve . parse . lines