X-Git-Url: https://git.njae.me.uk/?p=advent-of-code-19.git;a=blobdiff_plain;f=advent16%2Fsrc%2Fadvent16.hs;h=2067d13996fd82c01ef22c7bf1b87a0341627d38;hp=816def5fdbd80a2f9ccdd9cc6e1ff28261af9cd1;hb=2e08baf2e4c65958b9d62322eb50f919a788221f;hpb=70a2317943e3e4aa5dc95d19d9dda961560c0cf5

diff --git a/advent16/src/advent16.hs b/advent16/src/advent16.hs
index 816def5..2067d13 100644
--- a/advent16/src/advent16.hs
+++ b/advent16/src/advent16.hs
@@ -1,14 +1,5 @@
-import Debug.Trace
-
 import Data.Char (digitToInt, intToDigit)
 
--- import qualified Data.Map.Strict as M
--- import Data.Map.Strict ((!))
-import Data.List
--- import qualified Data.Set as S
-
-
-
 main :: IO ()
 main = do 
         text <- readFile "data/advent16.txt"
@@ -21,6 +12,7 @@ main = do
 part1 :: [Int] -> String
 part1 digits = map intToDigit $ take 8 $ (fft digits)!!100
 
+part2 :: [Int] -> String
 part2 digits = map intToDigit signal
     where offset = read @Int $ map intToDigit $ take 7 digits 
           fullDigits = concat $ replicate 10000 digits