From 8c182a892186f7ffe832767b8e39564e8133a45c Mon Sep 17 00:00:00 2001 From: Christian Neukirchen Date: Sat, 10 Dec 2016 22:38:09 +0100 Subject: day08: tweaks --- day08.k | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/day08.k b/day08.k index ba3f823..ac37f81 100644 --- a/day08.k +++ b/day08.k @@ -1,9 +1,11 @@ / use KDB+ 3.3 2016.03.14 f: 6 50#0 -r:.q.rotate +r: .q.rotate -{$["rect"~*w:" "\:x;.[`f;(!.:)'|"x"\:*|w;:;1]; "row"~w[1];f[n]::r[-.*|w;f[n:.*|"="\:w 2]]; "column"~w[1]:f[;n]::r[-.*|w;f[;n:.*|"="\:w 2]];]}'0:`day08; +{$["rect"~*w:" "\:x;.[`f;(!.:)'|"x"\:*|w;:;1] + "row"~w[1];f[n]::r[-.*|w;f[n:.*|"="\:w 2]] + f[;n]::r[-.*|w;f[;n:.*|"="\:w 2]]]}'0:`day08; +//f / 106 -1'" #"f; / CFLELOYFCS -- cgit 1.4.1