From e54f59ea77900220f4dd424fcc5320ae55037d2b Mon Sep 17 00:00:00 2001 From: Christian Neukirchen Date: Mon, 5 Dec 2016 14:39:57 +0100 Subject: day05 --- day05.k | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 day05.k diff --git a/day05.k b/day05.k new file mode 100644 index 0000000..1b9f4dc --- /dev/null +++ b/day05.k @@ -0,0 +1,15 @@ +/ use q 2016.03.14 +md5: ![-15] + +d:"ffykfhsq" + +r:0 +s:0 +/ { r::(1+)/[{~"00000"~5#s::,/$md5@d,$x};r+1]; 1 s[5] }'!7; +-1""; + +r: 0 +p:8#"_" +{ r::(1+)/[{~"00000"~5#s::,/$md5@d,$x};r+1];$[s[5]<"8";$[p[. s[5]]="_";p[. s[5]]:s[6];];]; 1@p," ",($r)," ",($x),"\n" }'!34; + +\\ -- cgit 1.4.1