diff options
-rw-r--r-- | day13.k | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/day13.k b/day13.k index ce394ea..764fc31 100644 --- a/day13.k +++ b/day13.k @@ -1,9 +1,10 @@ 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 +/ 92 + +/+/0<50{w*(x+x>0)|(+-1_'0,'+x)|(+1_'(+x),'0)|(1_'x,'0)|(0,'-1_'x)}/m +/ 124 |