number slide by 51b

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)

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top