define(f,`$1ifelse($1
,$2,,`ifelse($3,0,`
f(incr($1),$2,$4,incr($4))',` f(incr($1),$2,decr($3),$4)')')')f(1,include(/dev/fd/0),0,1)