diff options
Diffstat (limited to 'day24.k')
-rw-r--r-- | day24.k | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/day24.k b/day24.k new file mode 100644 index 0000000..3bc50bc --- /dev/null +++ b/day24.k @@ -0,0 +1,15 @@ +d:0$'0:"day24"; + +/ n:3; +n:4; + +/ stupid eager brute forcing +r:{b::n#0; p:: (n;0)#(); { p[*<b],:x; b[*<b]+:x }'x; :[b~n#(+/d)%n; p; ()]}; + +s:{x::(); + while[x~();x::r[d@(-#d)?#d]]; + m::m& */x@*<#:'x; + `0:($m),"\n";}; + +m:0I; +while[1;s[]]; |