From: Neil Smith <neil.git@njae.me.uk>
Date: Thu, 6 Dec 2018 10:26:16 +0000 (+0000)
Subject: Even better bounding box
X-Git-Url: https://git.njae.me.uk/?p=advent-of-code-18.git;a=commitdiff_plain;h=f6fbd7fbb9200497415c9f61b226521b4b4c2c44

Even better bounding box
---

diff --git a/advent-of-code.cabal b/advent-of-code.cabal
index f4fb19a..ee5a633 100644
--- a/advent-of-code.cabal
+++ b/advent-of-code.cabal
@@ -66,4 +66,5 @@ executable advent06
   build-depends:       base >= 4.7 && < 5
                      , text
                      , megaparsec
-                     , containers
\ No newline at end of file
+                     , containers
+          
\ No newline at end of file
diff --git a/src/advent06/advent06.hs b/src/advent06/advent06.hs
index 5913ccf..46252ff 100644
--- a/src/advent06/advent06.hs
+++ b/src/advent06/advent06.hs
@@ -70,10 +70,10 @@ largestRegion = maximum . map snd
 
 
 findBounds :: [Coord] -> (Integer, Integer, Integer, Integer)
-findBounds coords = ( minX - (maxY - minY) `div` 2 -- small x edge
-                    , maxX + (maxY - minY) `div` 2 -- large x edge
-                    , minY - (maxX - minX) `div` 2-- small x edge
-                    , maxY + (maxX - minX) `div` 2 -- large y edge
+findBounds coords = ( minX -- small x edge
+                    , maxX -- large x edge
+                    , minY -- small x edge
+                    , maxY -- large y edge
                     )
     where maxX = maximum $ map fst coords
           minX = minimum $ map fst coords