2022/day15.golfm4

   1 define(x000000,ifdef(`hack',`hack',2000000))dnl hack for tmp file
   2 define(m,(l($1,$3)+l($2,$4)))define(l,`translit(eval($1- $2),-)')define(S,
   3 `ifelse(eval(m($@)>=l($2,x000000)),1,`,eval($1-m($@)+l($2,x000000)),eval(
   4 $1+m($@)-l($2,x000000)+1),ifelse($4,x000000,`ifdef($3.$4,0,`define($3.$4)1')',
   5 0)')')define(n,`ifelse(eval($1$2$3),1,$1,$3)')define(M, `ifelse($3,,``,$@'',
   6 `ifelse(eval($2<$3),1,``,$@'',eval($4<$1),1,``,$3,$4'M($1,$2,shift(shift(
   7 shift(shift($@)))))',`M(n($1,<,$3),n($2,>,$4),shift(shift(shift(shift(
   8 $@)))))')')')define(o,`ifelse($2,,$1,`o(eval($1+$3- $2),shift(shift(shift(
   9 $@))))')')translit(C(,0include(i)),r:
  10 = a-z,(,)define(C,`ifelse($3,,`o(-$2$1)',`C(M($3,$4$1),eval($2+$5),shift(
  11 shift(shift(shift(shift($@))))))')'))