diff options
Diffstat (limited to 'day07.k')
-rw-r--r-- | day07.k | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/day07.k b/day07.k new file mode 100644 index 0000000..38134e6 --- /dev/null +++ b/day07.k @@ -0,0 +1,18 @@ +a:{~~#{(~x[0]=x[1])&(x[1]=x[2])&x[3]=*x}#-4_(1_)\x} +a:|/({[a;b;c;d](~a=b)&(b=c)&a=d}.)'4#'-4_(1_)\ +a:|/{(~*x=x[1])&x~|x}'4#'-4_(1_)\ ++/{{(|/y)&~|/x}.+0N 2#0,a'x}'(,/"]"\'"["\)'0:"day07" + ++/({(|/y)&~|/x}.+0N 2#0,(|/{(~=/2_x)&x~|x}'4#'-4_(1_)\)',/"]"\'"["\)'0:"day07" +/ thx zgrep ++/(0 1~|/0N 2#0,(|/{(~=/2_x)&x~|x}'4#'-4_(1_)\)',/"]"\'"["\)'0:"day07" +#(0 1~|/0N 2#0,(|/{(~=/2_x)&x~|x}'4#'-4_(1_)\)',/"]"\'"["\)#0:"day07" + +/ 115 + ++/{{|/x in\:(3#1_)'y}.,/'({x~|x}#3#'-3_(1_)\)''+0N 2#x}'(,/"]"\'"["\)'0:"day07" ++/({|/x in\:(3#1_)'y}.,/'+0N 2#({x~|x}#3#'-3_(1_)\)',/"]"\'"["\)'0:"day07" +#({|/x in\:(3#1_)'y}.,/'+0N 2#({x~|x}#3#'-3_(1_)\)',/"]"\'"["\)#0:"day07" +/ 231 + +\\ |