path: root/day18.k

d:".^"?"^.^^^..^^...^.^..^^^^^.....^...^^^..^^^^.^^.^^^^^^^^.^^.^^^^...^^...^^^^.^.^..^^..^..^.^^.^.^......."

+/+/~39{(2/'-3':x) in 1 3 4 6}\d	/ 1913

(+/~d)++/*399999{((*x)+~r; r:(2/'-3':*|x) in 1 3 4 6)}/(0;d)	/ 19993564