diff options
| author | Christian Neukirchen <chneukirchen@gmail.com> | 2016-12-14 15:45:03 +0100 |
|---|---|---|
| committer | Christian Neukirchen <chneukirchen@gmail.com> | 2016-12-14 15:45:03 +0100 |
| commit | 0309be83336daed08bd09d06d4d079edd13f1fdf (patch) | |
| tree | 81f8487b37a51664bc43f4249ee34480298ca835 | |
| parent | b0b91e6128d48be95f21cc6172b0403256fc55e1 (diff) | |
| download | adventofcode2016-0309be83336daed08bd09d06d4d079edd13f1fdf.tar.gz adventofcode2016-0309be83336daed08bd09d06d4d079edd13f1fdf.tar.xz adventofcode2016-0309be83336daed08bd09d06d4d079edd13f1fdf.zip | |
day13
| -rw-r--r-- | day13.k | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/day13.k b/day13.k new file mode 100644 index 0000000..ce394ea --- /dev/null +++ b/day13.k @@ -0,0 +1,9 @@ +d:1350 + +f:{(x*x) + (3*x) + (2*x*y) + y + (y*y)} + +w:~2!(+/2\{+/(d;x*x;3*x;2*x*y;y;y*y)}.)''(!50),/:\:!50 +m:w*{1 1~x}''(!50),/:\:!50 + +-1+|/|/{~x . 31 39}{w*(x+x>0)|(+-1_'0,'+x)|(+1_'(+x),'0)|(1_'x,'0)|(0,'-1_'x)}/m ++/+/0<50{w*(x+x>0)|(+-1_'0,'+x)|(+1_'(+x),'0)|(1_'x,'0)|(0,'-1_'x)}/m |