From b003f4793d7c5d5dc60bbdfb6757c9fbec509b68 Mon Sep 17 00:00:00 2001
From: Neil Smith <neil.git@njae.me.uk>
Date: Thu, 15 Dec 2016 11:09:13 +0000
Subject: [PATCH] Tidying

---
 advent15.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/advent15.hs b/advent15.hs
index 31866c0..27793c1 100644
--- a/advent15.hs
+++ b/advent15.hs
@@ -15,7 +15,6 @@ part1 disks = print $ head $ filter (canFall disks) [0..]
 
 part2 :: [Disk] -> IO ()
 part2 disks = print $ head $ filter (canFall disks2) [0..]
-    -- where disks2 = disks ++ [(\i -> (11 + 7 + 0 + i) `mod` 11 == 0)]
     where disks2 = disks ++ [diskify 7 11 0]
 
 canFall :: [Disk] -> Int -> Bool
-- 
2.34.1