From: Neil Smith <neil.git@njae.me.uk>
Date: Thu, 6 Dec 2018 09:33:56 +0000 (+0000)
Subject: tidying
X-Git-Url: https://git.njae.me.uk/?a=commitdiff_plain;h=d9bed1316d919ba8bdb27317c84c1ebf2644107c;p=advent-of-code-18.git

tidying
---

diff --git a/src/advent06/advent06.hs b/src/advent06/advent06.hs
index 2ff18f5..74e11f7 100644
--- a/src/advent06/advent06.hs
+++ b/src/advent06/advent06.hs
@@ -15,7 +15,7 @@ import qualified Control.Applicative as CA
 import qualified Data.Map.Strict as M
 
 type Coord = (Integer, Integer) -- x, y
-type Bounds = (Integer, Integer, Integer, Integer)
+type Bounds = (Integer, Integer, Integer, Integer) -- minX, maxX, minY, maxY
 type Region = M.Map Coord Int
 
 main :: IO ()
@@ -27,8 +27,6 @@ main = do
         print boundingBox
         print $ part1 coords boundingBox
         print $ part2 coords boundingBox
-        -- print $ part1 activity
-        -- print $ part2 activity
 
 
 part1 coords bounds = largestRegion $ regionSizes $ finite edgeLabels regions