commit - d3e79f5b611ac9f0b9eedbb4cdeaa167ec84b2ba
commit + fa580e2116da0709c1e48b280722f0c18ef3fd73
blob - 140c7e24bd5f8824f13ea2951bc2b13a8acdf472
blob + 6d2e9c590fd0bcdc43e350967891d1d9d9b11c07
--- tmac/tmac.an
+++ tmac/tmac.an
@@ -13,107 +13,107 @@
 '''\"  Option -rp# set no. of first page, put no. of pgs. on stderr
 '''\"  Option -rd1 give modified date instead of printed date
 ... temporary fixes for neat manual printing...
-.deth
-.tmwrong version of man entry macros - use -man6
-.ab
+.de th
+.tm wrong version of man entry macros - use -man6
+.ab 
 ..
-.ifn .ds Tm \uTM\d
-.ift .ds Tm \v'-0.5m'\s-4TM\s+4\v'0.5m'
-.de}E
+.if n .ds Tm \uTM\d
+.if t .ds Tm \v'-0.5m'\s-4TM\s+4\v'0.5m'
+.de }E
 .}f
-.in\\n()Ru+\\n(INu
-.ll\\n(LLu
-.lt\\n(LLu
-.pl\\n()Lu
+.in \\n()Ru+\\n(INu
+.ll \\n(LLu
+.lt \\n(LLu
+.pl \\n()Lu
 ..
-.deDT
-.ift .ta 3.6m 7.2m 10.8m 14.4m 18m 21.6m 25.2m 28.8m 32.4m 36m 39.6m 43.2m 46.8m
-.ifn .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n
+.de DT
+.if t .ta 3.6m 7.2m 10.8m 14.4m 18m 21.6m 25.2m 28.8m 32.4m 36m 39.6m 43.2m 46.8m
+.if n .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n
 ..
 .de HY
-.hy14
+.hy 14
 ..
-.de}f
-.ift .vs \\n()Vp
-.ps\\n()S
-.ft1
+.de }f
+.if t .vs \\n()Vp
+.ps \\n()S
+.ft 1
 ..
-.de}H
-.ev1
+.de }H
+.ev 1
 .}C
 .}E
-.ie\\n()s 'sp |2v
-.el'sp |3v
-.".ps\\n()S-1
+.ie \\n()s 'sp |2v
+.el 'sp |3v
+.". ps\\n()S-1
 .tl \\*(]H\\*(]L\\*(]H
-.ft1
-.ps\\n()S
-.ie\\n()s 'sp 1.5v
-.el'sp 3v
+.ft 1
+.ps \\n()S
+.ie \\n()s 'sp 1.5v
+.el 'sp 3v
 .ev
 .ns
 .if \\n(CL .2C
 ..
-.de}F
-.ev1
+.de }F
+.ev 1
 .}E
-.if\\n()s 'sp |\\n(.pu-1v-1p
-.if\\n()t 'sp |\\n(.pu-3v
-.ifn 'sp |\\n(.pu-4v
-.ifn .tl Page %\\*(]D\\*(]W
-.ift .tl %
+.if \\n()s 'sp |\\n(.pu-1v-1p
+.if \\n()t 'sp |\\n(.pu-3v
+.if n 'sp |\\n(.pu-4v
+.if n .tl Page %\\*(]D\\*(]W
+.if t .tl %
 .ev
 'bp
 ..
-.ifn .ig
-.de}C
+.if n .ig
+.de }C
 .if "\\*(.T"aps"\{\
-.	po0i
-.	lt7.5i
-.	if\\n()s .tl \l0.25i\l0.25i\h1i\l0.25i
-.	if\\n()t .tl \l0.25i\l0.25i
-.	lt
-.	po\}
+.	p o0i
+.	l t7.5i
+.	i f\\n()s .tl \l0.25i\l0.25i\h1i\l0.25i
+.	i f\\n()t .tl \l0.25i\l0.25i
+.	l t
+.	p o\}
 ..
-.de}M
+.de }M
 .}N
-.wh-.5p }C
-.ll\\n(LLu
+.wh -.5p }C
+.ll \\n(LLu
 .}P
 ..
-.de}K
+.de }K
 .}N
-.pl1
-.ll\\n(LLu
+.pl 1
+.ll \\n(LLu
 ..
-.de}P
+.de }P
 .nr )P \\n%+1-\\np
 .if \\nq .tm \\n(.F \\n()P \\np
 .bp
 .if \\nq .nr p \\n%
 ..
-.deTH
+.de TH
 .PD
-.nrIN \\n()Mu
-.ift .ds ]H \\$1\^(\^\\$2\^)
-.ifn .ds ]H \\$1(\\$2)
-.if\\n()s .ds ]D
-.if\\n()t .ds ]D Plan 9
-.ifn .ds ]D Plan 9
-.ds]L
-.if!\\$3 .ds ]L (\^\\$3\^)
-.if!\\$4 .ds ]D \\$4
-.wh0 }H
-.wh-\\n(:mu }F
-.em}M
-.if\\n(nl .}P
-.nr)I \\n()Mu
-.nr)R 0
+.nr IN \\n()Mu
+.if t .ds ]H \\$1\^(\^\\$2\^)
+.if n .ds ]H \\$1(\\$2)
+.if \\n()s .ds ]D
+.if \\n()t .ds ]D Plan 9
+.if n .ds ]D Plan 9
+.ds ]L
+.if !\\$3 .ds ]L (\^\\$3\^)
+.if !\\$4 .ds ]D \\$4
+.wh 0 }H
+.wh -\\n(:mu }F
+.em }M
+.if \\n(nl .}P
+.nr )I \\n()Mu
+.nr )R 0
 .}E
 .DT
-.ifn \{.na
-.nh\}
-.ift \{.bd S 3 3
+.if n \{.na
+.nh \}
+.if t \{.bd S 3 3
 .HY \}
 \Xhtml <B>
 \Xhtml [<A HREF="/sys/man/index.html">manual index</A>]
@@ -124,72 +124,72 @@
 .ie '\\$2'' \\$4\X'html href \\$1'\fL\\$1\fP\X'html /href'\\$3
 .el \\$4\X'html href \\$1'\\$2\X'html /href'\\$3
 ..
-.deSH
+.de SH
 .PD
 .}X 0 "\\$1"
-.nr)E 2
+.nr )E 2
 \&\Xhtml <H4>\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6\Xhtml </H4>
 ..
-.deSS
+.de SS
 .PD
 .}X 3n "" ""
-.nr)E 2
+.nr )E 2
 \Xhtml <H4>\&\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6\Xhtml </H4>
 ..
-.de}X
+.de }X
 .}E
-.ti\\$1
-.sp\\n(PDu
-.ne1.1v
-.nr)R 0
+.ti \\$1
+.sp \\n(PDu
+.ne 1.1v
+.nr )R 0
 .fi
 '''ss12
 '''if\\$2SYNOPSIS .ss 18
-.it1 }N
-.if!\\$3 .SM
+.it 1 }N
+.if !\\$3 .SM
 .ft 3
 ..
-.de}2
-.nr)E 0
+.de }2
+.nr )E 0
 .}E
-.nr)I \\n()Mu
+.nr )I \\n()Mu
 .ns
-.ft1
+.ft 1
 ..
-.deSM
+.de SM
 .nh
-.ps\\n()S-1
-.if!\\$1 \&\\$1
-.if!\\$2 \&\\$2
-.if!\\$3 \&\\$3
-.if!\\$4 \&\\$4
-.if!\\$5 \&\\$5
-.if!\\$6 \&\\$6
-.if!\\$1 .ps \\n()S
-.if\\$1 .it 1 }N
+.ps \\n()S-1
+.if !\\$1 \&\\$1
+.if !\\$2 \&\\$2
+.if !\\$3 \&\\$3
+.if !\\$4 \&\\$4
+.if !\\$5 \&\\$5
+.if !\\$6 \&\\$6
+.if !\\$1 .ps \\n()S
+.if \\$1 .it 1 }N
 .HY
 ..
-.deI
+.de I
 .nh
-.ft2
-.it1 }N
-.if!\\$1 \&\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
+.ft 2
+.it 1 }N
+.if !\\$1 \&\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
 .HY
 ..
-.deB
+.de B
 .nh
-.it1 }N
-.ie!\\$1 \%\&\f5\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
+.it 1 }N
+.ie !\\$1 \%\&\f5\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
 .el .ft5
 .HY
 ..
-.deL
+.de L
 .nh
-.it1 }N
-.ift \{.ie!\\$1 \%\&\f5\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
+.it 1 }N
+.if t \{.ie!\\$1 \%\&\f5\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
 .el .ft5 \}
-.ifn \{.ft5
-.if!\\$1 \{.ie\\$2 `\\$1'
+.if n \{.ft5
+.if !\\$1 \{.ie\\$2 `\\$1'
 .el .ie\\$3 `\\$1 \\$2'
 .el .ie\\$4 `\\$1 \\$2 \\$3'
 .el .ie\\$5 `\\$1 \\$2 \\$3 \\$4'
@@ -197,169 +197,169 @@
 .el `\\$1 \\$2 \\$3 \\$4 \\$5 \\$6'\}\}
 .HY
 ..
-.deRI
+.de RI
 .nh
 .}S 1 2 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
 .HY
 .}f
 ..
-.deIR
+.de IR
 .nh
 .}S 2 1 \& "\Xhtml manref start \\$1 \\$2\\$1" "\\$2\Xhtml manref end \\$1 \\$2" "\\$3" "\\$4" "\\$5" "\\$6"
 .HY
 .}f
 ..
-.deIB
+.de IB
 .nh
-.ift .}S 2 5 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
-.ifn .}S 2 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if t .}S 2 5 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if n .}S 2 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
 .HY
 .}f
 ..
-.deRB
+.de RB
 .nh
-.ift .}S 1 5 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
-.ifn .}S 1 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if t .}S 1 5 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if n .}S 1 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
 .HY
 .}f
 ..
-.deBR
+.de BR
 .nh
-.ift .}S 5 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
-.ifn .}S 1 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if t .}S 5 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if n .}S 1 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
 .HY
 .}f
 ..
-.deBI
+.de BI
 .nh
-.ift .}S 5 2 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
-.ifn .}S 1 2 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if t .}S 5 2 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
+.if n .}S 1 2 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
 .HY
 .}f
 ..
 .de LR
 .nh
-.ift \%\&\f5\\$1\f1\\$2
-.ifn \%`\\$1'\\$2
+.if t \%\&\f5\\$1\f1\\$2
+.if n \%`\\$1'\\$2
 .HY
 ..
 .de RL
 .nh
-.ift \%\&\f1\\$1\\f5\\$2\\f1\\$3
-.ifn \%\\$1`\\$2'\\$3
+.if t \%\&\f1\\$1\\f5\\$2\\f1\\$3
+.if n \%\\$1`\\$2'\\$3
 .HY
 ..
-.de}S
-.ds]F
-.if\\$12 .if !\\$5 .ds ]F \^
-.if\\$22 .if !\\$5 .ds ]F \^
-.ie!\\$4 .}S \\$2 \\$1 "\\$3\f\\$1\\$4\\*(]F" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
-.el\\$3
+.de }S
+.ds ]F
+.if \\$12 .if !\\$5 .ds ]F \^
+.if \\$22 .if !\\$5 .ds ]F \^
+.ie !\\$4 .}S \\$2 \\$1 "\\$3\f\\$1\\$4\\*(]F" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
+.el \\$3
 .}f
 ..
-.deEX
-.ift .ft5
+.de EX
+.if t .ft5
 .nf
 ..
-.deEE
-.ft1
+.de EE
+.ft 1
 .fi
 ..
-.de}p
-.sp\\n(PDu
-.ne1.1v
+.de }p
+.sp \\n(PDu
+.ne 1.1v
 .}E
-.nr)I \\n()Mu
+.nr )I \\n()Mu
 .ns
 ..
-.dePP  \"indirect PP so we can attach html - see tmac.anhtml
+.de PP  \"indirect PP so we can attach html - see tmac.anhtml
 .}p
 ..
-.deP
+.de P
 .PP
 ..
-.deLP
+.de LP
 .PP
 ..
-.dePD
-.ift .nr PD .4v
-.ifn .nr PD 1v
-.if!\\$1 .nr PD \\$1v
+.de PD
+.if t .nr PD .4v
+.if n .nr PD 1v
+.if !\\$1 .nr PD \\$1v
 ..
-.deHP
-.sp\\n(PDu
-.ne1.1v
-.if!\\$1 .nr )I \\$1n
-.ll\\n(LLu
-.in\\n()Ru+\\n(INu+\\n()Iu
-.ti\\n()Ru+\\n(INu
+.de HP
+.sp \\n(PDu
+.ne 1.1v
+.if !\\$1 .nr )I \\$1n
+.ll \\n(LLu
+.in \\n()Ru+\\n(INu+\\n()Iu
+.ti \\n()Ru+\\n(INu
 .}f
 ..
-.deIP
-.ie!\\$1 \{.TP "\\$2"
+.de IP
+.ie !\\$1 \{.TP "\\$2"
 \&\\$1\}
-.el\{.sp\\n(PDu
-.ne1.1v
-.if!\\$2 .nr )I \\$2n
+.el \{.sp\\n(PDu
+.ne 1.1v
+.if !\\$2 .nr )I \\$2n
 .}f
-.ll\\n(LLu
-.in\\n()Ru+\\n(INu+\\n()Iu
-.lg\}
+.ll \\n(LLu
+.in \\n()Ru+\\n(INu+\\n()Iu
+.lg \}
 ..
-.deTP
-.if!\\$1 \{.nr )I \\$1n
-.if\\$10 .nr )I \\n()M\}
-.sp\\n(PDu
-.ne1.1v
-.in\\n()Ru
-.lg0
+.de TP
+.if !\\$1 \{.nr )I \\$1n
+.if \\$10 .nr )I \\n()M\}
+.sp \\n(PDu
+.ne 1.1v
+.in \\n()Ru
+.lg 0
 .ns
-.it1 }N
-.nr)E 1
-.di]B
+.it 1 }N
+.nr )E 1
+.di ]B
 ..
-.deTF
+.de TF
 .IP "" "\w'\f5\\$1\ \ \fP'u"
-.PD0
+.PD 0
 ..
-.de}1
-.ds]X \&\\*(]B\\
-.rm]B
-.nr)E 0
-.if!\\$1 .nr )I \\$1n
+.de }1
+.ds ]X \&\\*(]B\\
+.rm ]B
+.nr )E 0
+.if !\\$1 .nr )I \\$1n
 .}f
-.ll\\n(LLu
-.in\\n()Ru+\\n(INu+\\n()Iu
-.ti\\n(INu
-.ie!\\n()Iu+\\n()Ru-\w\\*(]Xu-3p \{\\*(]X
-.br\}
-.el\\*(]X\h|\\n()Iu+\\n()Ru\c
+.ll \\n(LLu
+.in \\n()Ru+\\n(INu+\\n()Iu
+.ti \\n(INu
+.ie !\\n()Iu+\\n()Ru-\w\\*(]Xu-3p \{\\*(]X
+.br \}
+.el \\*(]X\h|\\n()Iu+\\n()Ru\c
 .}f
 .lg
 ..
-.de}N
-.if\\n()E .br
-.if\\n()E1 .di
-.if\\n()E0 .}f
-.if\\n()E1 .}1
-.if\\n()E2 .}2
+.de }N
+.if \\n()E .br
+.if \\n()E1 .di
+.if \\n()E0 .}f
+.if \\n()E1 .}1
+.if \\n()E2 .}2
 ..
-.deRS
-.nr]\\n+()p \\n()I
-.nr)\\n()p \\n()R
-.ie!\\$1 .nr )R +\\$1n
-.el.nr )R +\\n()I
-.nr)I \\n()Mu
+.de RS
+.nr ]\\n+()p \\n()I
+.nr )\\n()p \\n()R
+.ie !\\$1 .nr )R +\\$1n
+.el .nr )R +\\n()I
+.nr )I \\n()Mu
 .}E
 ..
-.deRE
-.if!\\$1 \{.ie \\$10 .nr )p 1 1
-.el.nr )p \\$1 1 \}
-.ds]i \\*(]I\\n()p
-.ds]r \\*(]R\\n()p
-.nr)I \\*(]i
-.nr)R \\*(]r
-.if\\n()p .nr )p -1
+.de RE
+.if !\\$1 \{.ie \\$10 .nr )p 1 1
+.el .nr )p \\$1 1 \}
+.ds ]i \\*(]I\\n()p
+.ds ]r \\*(]R\\n()p
+.nr )I \\*(]i
+.nr )R \\*(]r
+.if \\n()p .nr )p -1
 .}E
 ..
 '''\"	.2C begin 2-column display, by diversion
@@ -414,117 +414,117 @@
 .if \\n(CC>\\n(nl .sp |\\n(CCu
 .ne 2
 ..
-.dePM
-.if\\$1 .nr !K 0
-.if\w\\$1 \{\
-.ie\\$1P .nr !K 1
-.el.ie \\$1BP .nr !K 3
-.el.ie \\$1BR .nr !K 4
-.el.nr !K 2 \}
-.if\\n(!K .wh -(\\n(:mu+5v) )G
+.de PM
+.if \\$1 .nr !K 0
+.if \w\\$1 \{\
+.ie \\$1P .nr !K 1
+.el .ie \\$1BP .nr !K 3
+.el .ie \\$1BR .nr !K 4
+.el .nr !K 2 \}
+.if \\n(!K .wh -(\\n(:mu+5v) )G
 ..
-.de)G
-.if\\n(!K 'sp 2v
-.ie\\n(!K=1 \{\
-.iet .bd1 3
-.el.bd1 0
-.tlPRIVATE
-.bd1
-.tlThis information should not be disclosed to unauthorized persons.
-.tlIt is meant solely for use by authorized Bell System employees. \}
-.el.ie \\n(!K=3 \{\
-.iet .bd1 3
-.el.bd1 0
-.tlBELL LABORATORIES PROPRIETARY
-.bd1
-.tlNot for use or disclosure outside Bell Laboratories except by
-.tlwritten approval of the director of the distributing organization. \}
-.el.ie \\n(!K=4 \{\
-.iet .bd1 3
-.el.bd1 0
-.tlBELL LABORATORIES RESTRICTED
-.bd1
-.tlThe information herein is meant solely for use by authorized
-.tlBell Laboratories employees and is not to be disclosed to others. \}
-.el.if \\n(!K=2 \{\
-.iet .bd1 3
-.el.bd1 0
-.tlNOTICE
-.bd1
-.tlNot for use or disclosure outside the
-.tlBell System except under written agreement. \}
+.de )G
+.if \\n(!K 'sp 2v
+.ie \\n(!K=1 \{\
+.ie t .bd1 3
+.el .bd1 0
+.tl PRIVATE
+.bd 1
+.tl This information should not be disclosed to unauthorized persons.
+.tl It is meant solely for use by authorized Bell System employees. \}
+.el .ie \\n(!K=3 \{\
+.ie t .bd1 3
+.el .bd1 0
+.tl BELL LABORATORIES PROPRIETARY
+.bd 1
+.tl Not for use or disclosure outside Bell Laboratories except by
+.tl written approval of the director of the distributing organization. \}
+.el .ie \\n(!K=4 \{\
+.ie t .bd1 3
+.el .bd1 0
+.tl BELL LABORATORIES RESTRICTED
+.bd 1
+.tl The information herein is meant solely for use by authorized
+.tl Bell Laboratories employees and is not to be disclosed to others. \}
+.el .if \\n(!K=2 \{\
+.ie t .bd1 3
+.el .bd1 0
+.tl NOTICE
+.bd 1
+.tl Not for use or disclosure outside the
+.tl Bell System except under written agreement. \}
 ..
-.nr)s 0
-.ift .if \ns .nr )s 1
-.nr)t 0
-.ift .if !\ns .nr )t 1
-.if\n()s \{.nr )L 9i
-.nrLL 4.75i
-.nr)O .75i
-.nr)S 8
-.nr)V 9 \}
-.if\n()t \{.nr )L 11i
-.nrLL 6.5i
-.nr)O 1i
-.nr)S 9
-.nr)V 11 \}
-.ift \{.ds R ®
-.dsS \s\n()S
+.nr )s 0
+.if t .if \ns .nr )s 1
+.nr )t 0
+.if t .if !\ns .nr )t 1
+.if \n()s \{.nr )L 9i
+.nr LL 4.75i
+.nr )O .75i
+.nr )S 8
+.nr )V 9 \}
+.if \n()t \{.nr )L 11i
+.nr LL 6.5i
+.nr )O 1i
+.nr )S 9
+.nr )V 11 \}
+.if t \{.ds R ®
+.ds S \s\n()S
 ..\}
-.ifn \{.nr )L 11i
-.nrLL 6.5i
-.nr)O .463i
+.if n \{.nr )L 11i
+.nr LL 6.5i
+.nr )O .463i
 .if '\*(.T'think' \{.nrLL 80n
-.nr)O 0\}
+.nr )O 0\}
 .if '\*(.T'thinksmall' \{.nrLL 142n
 .vs 9p
-.nr)O 0\}
-.dsR (Reg.)
-.dsS
+.nr )O 0\}
+.ds R (Reg.)
+.ds S
 ..\}
-.if\nT .nr LL 80n
-.if\nV>1 \{
-.nrLL 82n
-.nr)L 84v
-.rmul \}
-.nr)p 0 1
-.ds]I \\\\n(]
-.ds]R \\\\n()
-.if\nd0 .nr m \n(mo-1
-.if\nm0 .ds ]m January
-.if\nm1 .ds ]m February
-.if\nm2 .ds ]m March
-.if\nm3 .ds ]m April
-.if\nm4 .ds ]m May
-.if\nm5 .ds ]m June
-.if\nm6 .ds ]m July
-.if\nm7 .ds ]m August
-.if\nm8 .ds ]m September
-.if\nm9 .ds ]m October
-.if\nm10 .ds ]m November
-.if\nm11 .ds ]m December
-.ifn \{.nr m \nm+1
+.if \nT .nr LL 80n
+.if \nV>1 \{
+.nr LL 82n
+.nr )L 84v
+.rm ul \}
+.nr )p 0 1
+.ds ]I \\\\n(]
+.ds ]R \\\\n()
+.if \nd0 .nr m \n(mo-1
+.if \nm0 .ds ]m January
+.if \nm1 .ds ]m February
+.if \nm2 .ds ]m March
+.if \nm3 .ds ]m April
+.if \nm4 .ds ]m May
+.if \nm5 .ds ]m June
+.if \nm6 .ds ]m July
+.if \nm7 .ds ]m August
+.if \nm8 .ds ]m September
+.if \nm9 .ds ]m October
+.if \nm10 .ds ]m November
+.if \nm11 .ds ]m December
+.if n \{.nr m \nm+1
 .nr yD (\n(yr%100
 .af yD 01
-.ie\nd .ds ]W (last mod. \nm/\nd/\ny)
-.el.ds ]W (printed \n(mo/\n(dy/\n(yD)
+.ie \nd .ds ]W (last mod. \nm/\nd/\ny)
+.el .ds ]W (printed \n(mo/\n(dy/\n(yD)
 ..\}
-.if\n()s .ds ]W
-.if\n()t \{.ie \nd .ds ]W \*(]m \nd, 20\ny
-.el.ds ]W \*(]m \n(dy, 20\n(yr
+.if \n()s .ds ]W
+.if \n()t \{.ie \nd .ds ]W \*(]m \nd, 20\ny
+.el .ds ]W \*(]m \n(dy, 20\n(yr
 ..\}
-.pl\n()Lu
-.ll\n(LLu
-.lt\n(LLu
-.po\n()Ou
-.ift .tr \``\''
+.pl \n()Lu
+.ll \n(LLu
+.lt \n(LLu
+.po \n()Ou
+.if t .tr \``\''
 .}f
-.if\n()s .nr :m 3.5v
-.if\n()t .nr :m 6v
-.ifn .nr :m 7v
-.ift .nr )M 3.6m
-.ifn .nr )M 5n
-.em}K
+.if \n()s .nr :m 3.5v
+.if \n()t .nr :m 6v
+.if n .nr :m 7v
+.if t .nr )M 3.6m
+.if n .nr )M 5n
+.em }K
 .nr q \np
-.if!\np .nr p 1
+.if !\np .nr p 1
 .pn \np