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