day 1 more robust

[aoc_eblake.git] / 2022 / day01.golfm4

define(m,`ifelse(eval($1>$2+0),1,``$*'',``$2,'m($1,$3,$4)')')define(_,
`ifelse($2,,`o(eval,$1',$3,,`_(m($2,$1)',`_(`$1',$3+$2'),shift(shift(shift(
$@))))')_(,translit(include(i),define(o,$1($2) $1($2+$3+$4))
,`,'))