day 23 support more inputs

[aoc_eblake.git] / 2023 / day02.golfm4

define(_,`ifelse(index($1,^),0,`shift($@)',$1,~,`eval($2+($3>$2)*($3-$2))',$1,
,`_(/,_(/,$@))',$1,/,`_(^_(^_(^_(^$@))))',$5,r,`*($4<13)_(_(~,$1,$4),$2,$3,_(,
$@))',$5,_r,`*($4<14)_($1,_(~,$2,$4),$3,_(,$@))',$5,b,`*($4<15)_($1,$2,_(~,$3,
$4),_(,$@))',$4,m,`+$6_(0,0,0,_(,$@))+$1*$2*$3',$4,.,`) _(~,0,$1*$2*$3',`_($1,
$2,$3,_(^_(/,$@)))')')_(~,0,translit(g(0,0,0,include(I).),e g;:Gadnlu,`,,_'))