From e8ee73c2b058529ee427f89e388dc012bc354fbb Mon Sep 17 00:00:00 2001 From: Christian Neukirchen Date: Mon, 14 Dec 2015 13:55:28 +0100 Subject: day14 --- day14.k | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 day14.k (limited to 'day14.k') diff --git a/day14.k b/day14.k new file mode 100644 index 0000000..995bcfb --- /dev/null +++ b/day14.k @@ -0,0 +1,10 @@ +d:0:"day14"; +t:2503; + +ss:{1 _' (&y=y,x) _ y,x}; / split x at y +l:ss[;" "]' d; + +r:+{t#((0$x@6)#0$x@3),(0$x@13)#0}'l; / incremental distance at second + +|/+/r +|/+/{x=|/x}'+\r -- cgit 1.4.1