From 03725c8045318ceaa028c96297ee2e4b4be7e9f1 Mon Sep 17 00:00:00 2001
From: Christoph Stahl <christoph.stahl@tu-dortmund.de>
Date: Fri, 3 Dec 2021 21:56:15 +0100
Subject: [PATCH] Day 3: 274

---
 d3golf.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/d3golf.hs b/d3golf.hs
index d8b4cc0..3ab2456 100644
--- a/d3golf.hs
+++ b/d3golf.hs
@@ -5,6 +5,6 @@ m=map
 l=length
 d=foldr(\x y->2*y+x)0.reverse
 (#)q=h.q.sortBy((.l).compare.l).group.sort
-f%x|x==[[]]=[]|i<-f#h(e x)=i:f%m tail(filter((==i).h)x)
+f%x|x==[[]]=[]|i<-f#h(e x)=i:f%[u|y:u<-x,y==i]
 t x=d(last%x)*d(h%x)
 main=interact$show.((,).t<*>((*)<*>(-)4095).d.m(h#).e).m(m((-48+).fromEnum)).lines
\ No newline at end of file