From: Neil Smith <neil.git@njae.me.uk>
Date: Tue, 6 Dec 2016 08:59:04 +0000 (+0000)
Subject: More typo fixing
X-Git-Url: https://git.njae.me.uk/?p=advent-of-code-16.git;a=commitdiff_plain;h=5bc8c68da5691e57648112363a1df1eda7f0fe3a

More typo fixing
---

diff --git a/advent06.hs b/advent06.hs
index d275f71..77d4093 100644
--- a/advent06.hs
+++ b/advent06.hs
@@ -4,9 +4,6 @@ import Data.List (transpose)
 import Data.Char (isLetter)
 import qualified Data.Map.Lazy as Map
 
-
-input = "cxdnnyjw"
-
 main :: IO ()
 main = do 
     text <- readFile "advent06.txt" 
@@ -14,7 +11,6 @@ main = do
     part1 message
     part2 message
 
-
 part1 :: [String] -> IO ()
 part1 message = do 
     print $ map (fst) $ map (mostCommon) $ map (countedLetters) $ transpose message
@@ -24,7 +20,6 @@ part2 message = do
     print $ map (fst) $ map (leastCommon) $ map (countedLetters) $ transpose message
 
 
-
 countedLetters :: String -> Map.Map Char Int
 countedLetters name = Map.fromListWith (+) [(c, 1) | c <- filter (isLetter) name]