define(p,`ifelse($1,0,,$1`p(decr($1))')')p(82)