F diff --git a/g.tmac b/g.tmac --- a/g.tmac +++ b/g.tmac.nr heading_current_number_2 +1.nr heading_current_number_3 0.nr heading_current_number_4 0- \\n[heading_current_number_1].- \\n[heading_current_number_2].+ \\n[heading_current_number_1].\\n[heading_current_number_2].\}.if '\\$2'3' \{\.nr heading_current_number_3 +1.nr heading_current_number_4 0- \\n[heading_current_number_1].- \\n[heading_current_number_2].- \\n[heading_current_number_3].+ \\n[heading_current_number_1].\\n[heading_current_number_2].\\n[heading_current_number_3].\}.if '\\$2'4' \{\.nr heading_current_number_4 +1- \\n[heading_current_number_1].- \\n[heading_current_number_2].- \\n[heading_current_number_3].- \\n[heading_current_number_4].+ \\n[heading_current_number_1].\\n[heading_current_number_2].\\n[heading_current_number_3].\\n[heading_current_number_4].\}\\$1 \f[]\}\#########################################################################.de footnote.ie '\\$1'end' \{\- .br+.boxa.ev.ie !d there_is_a_footnote \{\.wh -(\\n[current_footnote_height]u+\\n[dn]u) paste_footnote.nr current_footnote_height +\\n[dn]u\}- .el \{+ .el \{\.wh -\\n[current_footnote_height]u.wh -(\\n[current_footnote_height]u+\\n[dn]u) paste_footnote.nr current_footnote_height +\\n[dn]u..\#########################################################################.de superscript- \s-\\n[superscript_size_decrease]\v'-0.5v'\h'-0.2v'\\$1\v'+0.5v'\s+\\n[superscript_size_decrease]+ \s-\\n[superscript_size_decrease]\v'-0.3v'\h'-0.3v'\\$1\v'+0.3v'\s+\\n[superscript_size_decrease]..\#########################################################################.de references