From c9ee6ec46d566125469f4a818e745a570c139803 Mon Sep 17 00:00:00 2001
From: Christian Neukirchen <chneukirchen@gmail.com>
Date: Sat, 24 Dec 2016 15:47:36 +0100
Subject: day22

---
 day22.k | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 day22.k

(limited to 'day22.k')

diff --git a/day22.k b/day22.k
new file mode 100644
index 0000000..a67c48d
--- /dev/null
+++ b/day22.k
@@ -0,0 +1,7 @@
+d:{.:@[x;&(x<"0")|x>"9";:;" "]}'2_0:"day22"
++/{(~x[3]>x[10])&(~x[0 1]~x[6 7])&0<x[3]}',/d,/:\:d	/ 985
+
+ms:&/d[;2]
+mx:|/{(*x)*0=x[1]}'d
+`0:"\n"/+(32 32#" "){.[x;2#y;$[(2#y)~mx,0;"G";y[3]>ms;"#";~y[3];"_";"."]]}/d;
+/ 179 manually
-- 
cgit 1.4.1