From 7d84c1af0ce5c4412cd2af0b50a3fe93b8cf627c Mon Sep 17 00:00:00 2001
From: Christian Neukirchen <chneukirchen@gmail.com>
Date: Thu, 17 Dec 2015 15:16:39 +0100
Subject: day17.k5

---
 day17.k5 | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 day17.k5

diff --git a/day17.k5 b/day17.k5
new file mode 100644
index 0000000..cbb6603
--- /dev/null
+++ b/day17.k5
@@ -0,0 +1,7 @@
+/ works in oK
+d:{x@<x}@.:'-1_0:"day17"
+g:150
+r:{$[g=t:+/x; ,x; (t<g)&(0<#y); ,/{[v]r[x,*v;1_v]}'(!#y)_\:y; ()]}
+s:r[(); d]
+#s
+#&{x=&/x}@#:'s
-- 
cgit 1.4.1