d:{.:{x in "0123456789-,"}#x}'0:`day20;d:{d[;x]}'|3 3#!9 *<{+/x|-x}'*|1000{+\x}/d / 308 #+1000{+{x@,/{1=#x}#.=x[;2]}@++\x}/d / 504 \\