unneeded imports

Day13_1.hs

@@ -2,8 +2,7 @@ module Day13_1 where
 import System.IO (openFile)
 import Data.Text (unpack, splitOn, pack)
 import Prelude hiding (splitAt)
-import Data.Char (digitToInt)
-import Data.List (nub, transpose)
+import Data.List (nub)
 
 splitAt :: String -> String -> [String]
 splitAt delimiter str = map unpack $ splitOn (pack delimiter) $ pack str
@@ -45,4 +44,4 @@ main = do
     let display x
             | x `elem` result = '#'
             | otherwise = ' '
-        in putStrLn $ insert (width+1) '\n' $ map display field
+        in putStrLn $ insert (width+1) '\n' $ map display field