From 7a7c6df04a4d7088c08e0b6bebdcf311c492036a Mon Sep 17 00:00:00 2001
From: Neil Smith <neil.git@njae.me.uk>
Date: Sun, 1 Dec 2019 13:15:59 +0000
Subject: [PATCH] Part 2 now point-free

---
 advent01/src/advent01.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/advent01/src/advent01.hs b/advent01/src/advent01.hs
index 5c70f59..014fbb2 100644
--- a/advent01/src/advent01.hs
+++ b/advent01/src/advent01.hs
@@ -28,7 +28,7 @@ fuelRequired :: Int -> Int
 fuelRequired m = (m `div` 3) - 2
 
 fuelForFuel :: Int -> Int
-fuelForFuel m = sum $ takeWhile (> 0) $ drop 1 $ iterate fuelRequired m
+fuelForFuel = sum . takeWhile (> 0) . drop 1 . iterate fuelRequired
 
 
 -- Parse the input file
-- 
2.34.1