diff --git a/d6golf.hs b/d6golf.hs
index 33f0c8f..61928b4 100644
--- a/d6golf.hs
+++ b/d6golf.hs
@@ -1,3 +1,3 @@
-j=(1<$[0..8])++zipWith(+)j(drop 2 j)
 d x n=sum[j!!(8-i+n)|i<-x]
+j=(1<$[0..8])++zipWith(+)j(drop 2 j)
 main=interact$show.(<$>[256,80]).d.read.('[':).(++"]")
diff --git a/d7golf.hs b/d7golf.hs
index 0bc191e..7e9b268 100644
--- a/d7golf.hs
+++ b/d7golf.hs
@@ -1,3 +1 @@
-m d i=minimum[sum$map(d.abs.(x-))i|x<-[0..maximum i]]
-g n=(n^2+n)`div`2
-main=interact$show.((,).m g<*>m id).read.('[':).(++"]")
+main=interact$show.(<$>[\n->(n^2+2)`div`2,id]).(\i d->minimum[sum$map(d.abs.(x-))i|x<-[0..maximum i]]).read.('[':).(++"]")