about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--day4.k13
1 files changed, 13 insertions, 0 deletions
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