X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=src%2Fadvent06%2Fadvent06.hs;h=46252ff2e092b1fcfc0da6256d12cf430d7adcbc;hb=8227e18e534ac192b718bbfe0592e81a30f2a433;hp=5913ccf53fb8fba7d157402620c3811e085b6125;hpb=5e82b80e85013021019aea414d91dc2f0c54194a;p=advent-of-code-18.git

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