commit fa580e2116da0709c1e48b280722f0c18ef3fd73 from: Russ Cox date: Tue Nov 11 19:01:03 2008 UTC tmac.an: insert spaces after .?? request names 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  \Xhtml [manual index] @@ -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

\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6\Xhtml

 .. -.deSS +.de SS .PD .}X 3n "" "" -.nr)E 2 +.nr )E 2 \Xhtml

\&\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6\Xhtml

 .. -.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