define(_,`ifelse($1,,,`$1:format(%3d,len(patsubst($2,[^$1])))
_(translit($1,ZA-z,aB-z),$2)')')_(A,include(../fd/0))