X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=src%2Fadvent04%2Fadvent04.hs;h=673933704237e71caf31bd3bb52e58d79bc50f16;hb=39f66aef92beb2f8b7bd96b2e03d54a98187cfab;hp=d1edcba1cb3513725f24a6ee2bb0f89197a459e1;hpb=b81981da235d8d23698766c0716fa23c43f896e3;p=advent-of-code-18.git

diff --git a/src/advent04/advent04.hs b/src/advent04/advent04.hs
index d1edcba..6739337 100644
--- a/src/advent04/advent04.hs
+++ b/src/advent04/advent04.hs
@@ -1,7 +1,6 @@
 {-# LANGUAGE OverloadedStrings #-}
 
 import Data.List
--- import Data.Tuple (swap)
 
 import Data.Text (Text)
 import qualified Data.Text.IO as TIO
@@ -14,7 +13,6 @@ import qualified Text.Megaparsec.Char.Lexer as L
 import qualified Control.Applicative as CA
 
 import Data.Time
--- import Data.Time.LocalTime
 
 import qualified Data.Set as S
 import qualified Data.Map.Strict as M
@@ -35,7 +33,6 @@ type SleepFrequency = M.Map Int Int -- key = minute, value = times spent asleep
 type GuardSleepFrequency = M.Map (GuardId, Int) Int -- key = (guardID, minute), value = times spent asleep
 
 
-
 main :: IO ()
 main = do 
         text <- TIO.readFile "data/advent04.txt"