diff --git a/day1.hs b/day1.hs
index 19c1a83..82699dd 100644
--- a/day1.hs
+++ b/day1.hs
@@ -1,3 +1,3 @@
 import Data.List
 w%(h:t)|w>""=(read w+h):t|let=0:h:t
-main=interact$show.((,).head<*>(sum.take 3)).reverse.sort.foldr(%)[0].lines
+main=interact$show.((,).head<*>sum.take 3).reverse.sort.foldr(%)[0].lines