1 files changed, 1 insertions, 4 deletions

diff --git a/execs/Day06.hs b/execs/Day06.hs
index c35fd21..475f819 100644
--- a/execs/Day06.hs
+++ b/execs/Day06.hs
@@ -1,11 +1,8 @@
 
 module Main where
 
-import Data.Char (digitToInt)
-import Data.List (sort)
-import Data.Set (Set)
+import           Data.Set (Set)
 import qualified Data.Set as Set
-import Control.Monad
 
 parseLines :: [String] -> [String]
 parseLines allLines = unwords first : next