From 54b99d9049559d9c562ed27bdad0dc855141878d Mon Sep 17 00:00:00 2001
From: Christian Neukirchen <chneukirchen@gmail.com>
Date: Fri, 11 Dec 2015 22:20:04 +0100
Subject: day11

---
 day11.k | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 day11.k

diff --git a/day11.k b/day11.k
new file mode 100644
index 0000000..bff5ad5
--- /dev/null
+++ b/day11.k
@@ -0,0 +1,14 @@
+d: "hepxcrrq";
+
+abc: _ci' (_ic "a") + !26;
+
+inc:{abc @ 26 _vs 1+26 _sv abc ?/: x}; / broken with leading "a"...
+
+infix:{:[y>#x;,x;x@(!y)+/:!(1-y)+#x]};
+
+r1:{|/ {(!3)~x-*x}' infix[abc ?/: x; 3]};
+r2:{~|/ (#x)> x ?/: "iol"};
+r3:{1<#?x@&=':x};
+
+p1: (inc)/[{~(r1 x)&(r2 x)&(r3 x)};d]
+p2: (inc)/[{~(r1 x)&(r2 x)&(r3 x)};inc p1]
-- 
cgit 1.4.1