From 2c0fae1d853e18de24634fcb92061e5d765662d5 Mon Sep 17 00:00:00 2001 From: Christoph Stahl Date: Thu, 1 Dec 2022 20:27:48 +0100 Subject: [PATCH] Day 1: 127 --- day1.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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