From f776a85a24c55f9233f1e881dcd8678d3b3f5080 Mon Sep 17 00:00:00 2001
From: Christian Neukirchen <chneukirchen@gmail.com>
Date: Sun, 6 Dec 2015 20:13:05 +0100
Subject: day4

---
 day4.k | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 day4.k

diff --git a/day4.k b/day4.k
new file mode 100644
index 0000000..4070f0c
--- /dev/null
+++ b/day4.k
@@ -0,0 +1,13 @@
+/ use q 2014.03.27, not kona
+d: "ckczppom";
+
+md5: ![-15];
+
+/ naive map
+m:150000;
+h:,/'$md5@/:d,/:$!m;
+i: (5#'h) ? "00000";
+i+1
+
+/ iteration
+(1+)/[{~"000000"~6#,/$md5@d,$x};1]
\ No newline at end of file
-- 
cgit 1.4.1