define(a,(include(../fd/0)))translit(translit(a,5-9h-z)patsubst(a,[^()5h])translit(a,!-5 :-h),())