From 1f5b481b6a7f5950a6687914947fc2612248242e Mon Sep 17 00:00:00 2001
From: Christoph Stahl <christoph.stahl@uni-dortmund.de>
Date: Mon, 6 Dec 2021 17:01:51 +0100
Subject: [PATCH] Day 6: 125

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

diff --git a/d6golf.hs b/d6golf.hs
new file mode 100644
index 0000000..b659bb7
--- /dev/null
+++ b/d6golf.hs
@@ -0,0 +1,3 @@
+j=(1<$[0..8])<>zipWith(+)j(drop 2 j)
+d n=sum.map(\i->j!!((8-i)+n))
+main=interact$show.((,).d 256<*>d 80).read.('[':).(++"]")