From cf1b023ab2938f8705e6c9aa7c4c703b03882835 Mon Sep 17 00:00:00 2001
From: Christoph Stahl <christoph.stahl@tu-dortmund.de>
Date: Tue, 7 Dec 2021 10:17:49 +0100
Subject: [PATCH] Day 7:128

---
 d7golf.hs | 3 +++
 1 file changed, 3 insertions(+)
 create mode 100644 d7golf.hs

diff --git a/d7golf.hs b/d7golf.hs
new file mode 100644
index 0000000..0bc191e
--- /dev/null
+++ b/d7golf.hs
@@ -0,0 +1,3 @@
+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.('[':).(++"]")