From 47cd154d5e55ddadc6486e44ed149936e3c43c76 Mon Sep 17 00:00:00 2001 From: Christoph Stahl Date: Fri, 3 Dec 2021 21:36:06 +0100 Subject: [PATCH] Day 3: 293 --- d3golf.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/d3golf.hs b/d3golf.hs index ff26dcd..104a5c4 100644 --- a/d3golf.hs +++ b/d3golf.hs @@ -7,4 +7,4 @@ d=foldr(\x y->2*y+x)0.reverse c q=h.q.sortBy((.l).compare.l).group.sort f%xs|xs==[[]]=[]|i<-c f$h$e xs=i:f%m tail((filter.(.h).(==))i xs) t x=d(last%x)*d(h%x) -main=interact$show.((,).t<*>(\i->i*(4095-i)).d.m(c h).e).m(m((-48+).fromEnum)).lines \ No newline at end of file +main=interact$show.((,).t<*>((*)<*>(-)4095).d.m(c h).e).m(m((-48+).fromEnum)).lines \ No newline at end of file