Remove unused import

Day1/puzzle1.hs

@@ -1,5 +1,4 @@
 import Data.List (transpose, sort)
-import System.IO
 
 listDistance :: [Int] -> [Int] -> Int
 listDistance xs ys = sum $ map abs $ zipWith (-) (sort xs) (sort ys)

Day1/puzzle2.hs

@@ -1,5 +1,4 @@
 import Data.List (transpose, sort, group)
-import System.IO
 
 similarityScore :: [Int] -> [Int] -> Int
 similarityScore xs ys = let elemsY = [ (head y, length y) | y <- (group . sort) ys ]

Day2/puzzle1.hs

@@ -1,5 +1,4 @@
 import Data.List (sort)
-import System.IO
 
 isSafe :: [Int] -> Bool
 isSafe xs = (isAscending xs || isDescending xs) && maximum distances <= 3 && minimum distances >= 1

Day2/puzzle2.hs

@@ -1,5 +1,4 @@
 import Data.List (sort, inits, tails)
-import System.IO
 
 isSafe :: [Int] -> Bool
 isSafe xs = (isAscending xs || isDescending xs) && maximum distances <= 3 && minimum distances >= 1