define(`UPPERCASE', `translit($1, `a-z', `A-Z')')dnl define(`SUBHYPHON', `translit($1, `-', ` ')')dnl cat >DOC_NAME.html <<@@@@ DOC_NAME index    previous    next

SUBHYPHON(UPPERCASE(DOC_NAME))
@@@@