diff options
| -rw-r--r-- | day14.k | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/day14.k b/day14.k index d516afd..33f3168 100644 --- a/day14.k +++ b/day14.k @@ -1,3 +1,4 @@ +/ use q 2016.03.14 d:"zpqevtbw" k:,/$-15!d,$: @@ -10,7 +11,7 @@ r:() r:() h:(,-1)!,"" -s:{$[~""~h[x];h[x];:h[x]:2016(,/$-15!)/(,/$-15!d,$:x)]} +s:{$[x in !h;h[x];:h[x]:2016(,/$-15!)/(,/$-15!d,$:x)]} {64>#r}{ t::{~|/(1=#?:)'{1_x,y}\[3#0;s x]}(1+)/x -1@($t)," ",($#r) p:: 5#s[t]@*&(1=#?:)'{1_x,y}\[3#0;s t] |