1728 lines
21 KiB
Plaintext
1728 lines
21 KiB
Plaintext
|
.\" -*- nroff -*-
|
||
|
.\"
|
||
|
.\" @(#)e.tmac 2.31 (Berkeley) 5/21/88
|
||
|
.\" Modified by James Clark for use with groff.
|
||
|
.\"
|
||
|
.\" Copyright (c) 1988 Regents of the University of California.
|
||
|
.\" All rights reserved.
|
||
|
.\"
|
||
|
.\" Redistribution and use in source and binary forms are permitted
|
||
|
.\" provided that this notice is preserved and that due credit is given
|
||
|
.\" to the University of California at Berkeley. The name of the University
|
||
|
.\" may not be used to endorse or promote products derived from this
|
||
|
.\" software without specific prior written permission. This software
|
||
|
.\" is provided ``as is'' without express or implied warranty.
|
||
|
.do nr need_eo_h 0
|
||
|
.do nr need_eo_tl 0
|
||
|
.do nr need_tl 1
|
||
|
.do mso devtag.tmac
|
||
|
.if !\n(.g .ig
|
||
|
.de @R
|
||
|
.if !r\\$1 .nr \\$1 0
|
||
|
..
|
||
|
.de @html_check_need_title
|
||
|
.do if (\\n[need_eo_tl] == 1) \
|
||
|
\{\
|
||
|
.do nr need_eo_tl 0
|
||
|
.do DEVTAG-EO-TL
|
||
|
.\}
|
||
|
.do if (\\n[need_tl] == 1) \
|
||
|
\{\
|
||
|
.do DEVTAG-TL
|
||
|
.do nr need_tl 0
|
||
|
.do nr need_eo_tl 1
|
||
|
.\}
|
||
|
.do if \\n[need_eo_h]>0 .do DEVTAG-EO-H
|
||
|
.do nr need_eo_h 0
|
||
|
..
|
||
|
.de @check_need_title
|
||
|
..
|
||
|
.ie '\*(.T'html' \
|
||
|
.do als check_need_title @html_check_need_title
|
||
|
.el \
|
||
|
.do als check_need_title @check_need_title
|
||
|
.@R pf
|
||
|
.if \n(pf .nx
|
||
|
.if !\n(.g .ig
|
||
|
.de @S
|
||
|
.if !d\\$1 .ds \\$1
|
||
|
..
|
||
|
.@R @
|
||
|
.de @C
|
||
|
.nr _S \\n(.s
|
||
|
.nr _V \\n(.v
|
||
|
.nr _F \\n(.f
|
||
|
.nr _J \\n(.j
|
||
|
.do ds _A \\n[.fam]
|
||
|
.nr _I \\n(.i
|
||
|
.ev \\$1
|
||
|
.ps \\n(_S
|
||
|
.vs \\n(_Vu
|
||
|
.ft \\n(_F
|
||
|
.ad \\n(_J
|
||
|
.do @fam \\*(_A
|
||
|
'in \\n(_Iu
|
||
|
.xl \\n($lu
|
||
|
.lt \\n($lu
|
||
|
.rr _S
|
||
|
.rr _V
|
||
|
.rr _F
|
||
|
.rr _I
|
||
|
.rr _J
|
||
|
.ls 1
|
||
|
'ce 0
|
||
|
..
|
||
|
.de @D
|
||
|
.ds |p "\\$3
|
||
|
.nr _d 0
|
||
|
.if "\\$2"C" \
|
||
|
.nr _d 1
|
||
|
.if "\\$2"L" \
|
||
|
.nr _d 2
|
||
|
.if "\\$2"I" \
|
||
|
.nr _d 3
|
||
|
.if "\\$2"M" \
|
||
|
.nr _d 4
|
||
|
.if !\\n(_d \
|
||
|
\{\
|
||
|
.nr _d \\$1
|
||
|
.ds |p "\\$2
|
||
|
.\}
|
||
|
..
|
||
|
.de @z
|
||
|
.if \n@>1 .tm >> @z, .z=\\n(.z ?a=\\n(?a
|
||
|
.if !"\\n(.z"" \
|
||
|
\{\
|
||
|
.tm Line \\n(c. -- Unclosed block, footnote, or other diversion (\\n(.z)
|
||
|
.di
|
||
|
.ex
|
||
|
.\}
|
||
|
.if \\n(?a \
|
||
|
.bp
|
||
|
.ds bp
|
||
|
.ds @b
|
||
|
.br
|
||
|
.if \n@>1 .tm << @z
|
||
|
..
|
||
|
.ie \n(.g .ds $* \\\\$*
|
||
|
.el .ds $* \\\\$1 \\\\$2 \\\\$3 \\\\$4 \\\\$5 \\\\$6 \\\\$7 \\\\$8 \\\\$9
|
||
|
.de he
|
||
|
.ie !\\n(.$ \
|
||
|
\{\
|
||
|
.rm |4
|
||
|
.rm |5
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.ds |4 "\*($*
|
||
|
.ds |5 "\*($*
|
||
|
.\}
|
||
|
..
|
||
|
.de eh
|
||
|
.ie !\\n(.$ \
|
||
|
.rm |4
|
||
|
.el \
|
||
|
.ds |4 "\*($*
|
||
|
..
|
||
|
.de oh
|
||
|
.ie !\\n(.$ \
|
||
|
.rm |5
|
||
|
.el \
|
||
|
.ds |5 "\*($*
|
||
|
..
|
||
|
.de fo
|
||
|
.ie !\\n(.$ \
|
||
|
\{\
|
||
|
.rm |6
|
||
|
.rm |7
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.ds |6 "\*($*
|
||
|
.ds |7 "\*($*
|
||
|
.\}
|
||
|
..
|
||
|
.de ef
|
||
|
.ie !\\n(.$ \
|
||
|
.rm |6
|
||
|
.el \
|
||
|
.ds |6 "\*($*
|
||
|
..
|
||
|
.de of
|
||
|
.ie !\\n(.$ \
|
||
|
.rm |7
|
||
|
.el \
|
||
|
.ds |7 "\*($*
|
||
|
..
|
||
|
.de ep
|
||
|
.if \\n(nl>0 \
|
||
|
\{\
|
||
|
.wh 0
|
||
|
.rs
|
||
|
.@b
|
||
|
.\}
|
||
|
..
|
||
|
.de @h
|
||
|
.if \n@>1 .tm >> @h %=\\n% ?a=\\n(?a ?b=\\n(?b ?w=\\n(?w
|
||
|
.if (\\n(.i+\\n(.o)>=\\n(.l \
|
||
|
.tm Line \\n(c. -- Offset + indent exceeds line length
|
||
|
.nr ?h \\n(?H
|
||
|
.nr ?H 0
|
||
|
.nr ?c \\n(?C
|
||
|
.nr ?C 0
|
||
|
.rn |4 |0
|
||
|
.rn |5 |1
|
||
|
.rn |6 |2
|
||
|
.rn |7 |3
|
||
|
.nr _w 0
|
||
|
.nr ?W 0
|
||
|
.nr ?I 1
|
||
|
.ev 2
|
||
|
.rs
|
||
|
.if \\n(hm>0 \
|
||
|
.if !'\*(.T'html' \
|
||
|
.sp |\\n(hmu
|
||
|
.@t $h
|
||
|
.if \\n(tm<=0 \
|
||
|
.nr tm \n(.Vu
|
||
|
.if !'\*(.T'html' \
|
||
|
.sp |\\n(tmu
|
||
|
.ev
|
||
|
.mk _k
|
||
|
.if \\n(?n=1 .nm 1
|
||
|
.nr $c 1
|
||
|
.if \n@>4 .tm -- @h >> .ns nl=\\n(nl %=\\n% _k=\\n(_k tm=\\n(tm
|
||
|
.ie \\n(?s \
|
||
|
\{\
|
||
|
.nr ?s 0
|
||
|
.rs
|
||
|
' @b
|
||
|
.\}
|
||
|
.el \
|
||
|
.@n
|
||
|
.if \n@>2 .tm << @h
|
||
|
..
|
||
|
.de @n
|
||
|
.if \n@>3 .tm >> @n nl=\\n(nl %=\\n% ?f=\\n(?f ?o=\\n(?o
|
||
|
.if \\n(bm<=0 \
|
||
|
.nr bm \\n(.Vu
|
||
|
.if (\\n(_w<=\\n($l)&(\\n(?W=0) \
|
||
|
\{\
|
||
|
.nr _b (\\n(ppp*\\n($vu)/200u
|
||
|
.if \\n(_bu>((\\n(bmu-\\n(fmu-((\\n(tpp*\\n($vu)/100u))/2u) \
|
||
|
.nr _b (\\n(ppp*\\n($vu)/100u-\n(.Vu
|
||
|
.nr _b +\\n(bmu
|
||
|
.\}
|
||
|
.nr _B \\n(_bu
|
||
|
.ch @f
|
||
|
.wh -\\n(_bu @f
|
||
|
.nr _b +(\\n(ppp*\\n($vu)/100u
|
||
|
.if \n@>2 .tm @n .p=\\n(.p bm=\\n(bm _b=\\n(_b _B=\\n(_B
|
||
|
.nr ?f 0
|
||
|
.if \\n(?o \
|
||
|
\{\
|
||
|
.(f _
|
||
|
.nf
|
||
|
.|o
|
||
|
.fi
|
||
|
.)f
|
||
|
.rm |o
|
||
|
.\}
|
||
|
.nr ?o 0
|
||
|
.if \\n(?T \
|
||
|
\{\
|
||
|
.nr _i \\n(.i
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.in 0
|
||
|
.|h
|
||
|
.in \\n(_iu
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.rr _i
|
||
|
.mk #T
|
||
|
.ns
|
||
|
.\}
|
||
|
.if (\\n(?a)&((\\n($c<2):(\\n(?w=0)) \
|
||
|
\{\
|
||
|
.nr ?a 0
|
||
|
.@k |t
|
||
|
.if \\n(?w \
|
||
|
.mk _k
|
||
|
.nr ?w 0
|
||
|
.\}
|
||
|
.os
|
||
|
.$H
|
||
|
.ns
|
||
|
..
|
||
|
.de @f
|
||
|
.if \n@>1 .tm >> @f %=\\n% nl=\\n(nl ?a=\\n(?a ?b=\\n(?b ?f=\\n(?f
|
||
|
.if \n@>2 .nr VL \\n(.pu-\\n(nlu
|
||
|
.if \n@>2 .tm @f bm=\\n(bm _B=\\n(_B _b=\\n(_b .p-nl=\\n(VL
|
||
|
.ec
|
||
|
.if \\n(?T \
|
||
|
\{\
|
||
|
.nr T. 1
|
||
|
.T# 1
|
||
|
.br
|
||
|
.\}
|
||
|
.ev 2
|
||
|
.ce 0
|
||
|
.if \\n(?b \
|
||
|
\{\
|
||
|
.nr ?b 0
|
||
|
.@k |b
|
||
|
.\}
|
||
|
.if \\n(?f \
|
||
|
.@o
|
||
|
.ie \\n($c<\\n($m \
|
||
|
.@c
|
||
|
.el \
|
||
|
.@e
|
||
|
.ev
|
||
|
.if \n@>2 .tm << @f
|
||
|
..
|
||
|
.de @o
|
||
|
.nf
|
||
|
.ls 1
|
||
|
.in 0
|
||
|
.if \n@>2 .tm @o last printed text = \\n(nl placing @r trap at -\\n(_B
|
||
|
.wh -\\n(_Bu @r
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.|f
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.fi
|
||
|
.if \n@>2 .tm @o triggered @r (?o) = \\n(?o
|
||
|
.if \\n(?o \
|
||
|
\{\
|
||
|
.di
|
||
|
.if \\n(dn=0 \
|
||
|
\{\
|
||
|
.rm |o
|
||
|
.nr ?o 0
|
||
|
.\}
|
||
|
.nr dn \\n(_D
|
||
|
.rr _D
|
||
|
.\}
|
||
|
.rm |f
|
||
|
.ch @r
|
||
|
..
|
||
|
.de @c
|
||
|
.if \n@>2 .tm >> @c %=\\n%
|
||
|
.rs
|
||
|
.sp |\\n(_ku
|
||
|
.@O +\\n($lu+\\n($su
|
||
|
.nr $c +1
|
||
|
.@n
|
||
|
..
|
||
|
.de @e
|
||
|
.if \n@>2 .tm >> @e
|
||
|
.@O \\n(_ou
|
||
|
.rs
|
||
|
.sp |\\n(.pu-\\n(fmu-((\\n(tpp*\\n($vu)/100u)
|
||
|
.@t $f
|
||
|
.nr ?h 0
|
||
|
.bp
|
||
|
..
|
||
|
.de @t
|
||
|
.if !\\n(?h \
|
||
|
\{\
|
||
|
.sz \\n(tp
|
||
|
.@F \\n(tf
|
||
|
.lt \\n(_Lu
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.nf
|
||
|
.\\$1
|
||
|
.br
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.\}
|
||
|
..
|
||
|
.de $h
|
||
|
.ds |z
|
||
|
.if !\\n(?c \
|
||
|
\{\
|
||
|
.if e .ds |z "\\*(|0
|
||
|
.if o .ds |z "\\*(|1
|
||
|
.\}
|
||
|
.if !\(ts\\*(|z\(ts\(ts \
|
||
|
' tl \\*(|z
|
||
|
.rm |z
|
||
|
..
|
||
|
.de $f
|
||
|
.ds |z
|
||
|
.if \\n(?c \
|
||
|
\{\
|
||
|
.if e .ds |z "\\*(|0
|
||
|
.if o .ds |z "\\*(|1
|
||
|
.\}
|
||
|
.if \(ts\\*(|z\(ts\(ts \
|
||
|
\{\
|
||
|
.if e .ds |z "\\*(|2
|
||
|
.if o .ds |z "\\*(|3
|
||
|
.\}
|
||
|
.if !\(ts\\*(|z\(ts\(ts \
|
||
|
' tl \\*(|z
|
||
|
.rm |z
|
||
|
..
|
||
|
.de @r
|
||
|
.if \n@>3 .tm >> @r .z=\\n(.z ?f=\\n(?f ?a=\\n(?a ?b=\\n(?b _b=\\n(_b
|
||
|
.di |o
|
||
|
.nr ?o 1
|
||
|
.nr _D \\n(dn
|
||
|
.ns
|
||
|
..
|
||
|
.if !'\*(.T'html' .rn bp @b
|
||
|
.de bp
|
||
|
.nr $c \\n($m
|
||
|
.ie \\n(nl>0 \
|
||
|
.@b \\$1
|
||
|
.el \
|
||
|
\{\
|
||
|
.if \\n(.$>0 \
|
||
|
.pn \\$1
|
||
|
.if \\n(?I \
|
||
|
.@h
|
||
|
.\}
|
||
|
.br
|
||
|
.wh 0 @h
|
||
|
..
|
||
|
.rn ll xl
|
||
|
.de ll
|
||
|
.xl \\$1
|
||
|
.lt \\$1
|
||
|
.nr $l \\n(.l
|
||
|
.if (\\n($m<=1):(\\n($l>\\n(_L) \
|
||
|
.nr _L \\n(.l
|
||
|
..
|
||
|
.rn po @O
|
||
|
.de po
|
||
|
.@O \\$1
|
||
|
.nr _o \\n(.o
|
||
|
..
|
||
|
.if !\n(.g .ig
|
||
|
.do rn fam @fam
|
||
|
.do de fam
|
||
|
.do @fam \\$1
|
||
|
.ev 2
|
||
|
.do @fam \\$1
|
||
|
.ev
|
||
|
..
|
||
|
.de hx
|
||
|
.nr ?H 1
|
||
|
..
|
||
|
.de ix
|
||
|
'in \\$1
|
||
|
..
|
||
|
.de bl
|
||
|
.br
|
||
|
.@s \\$1
|
||
|
.sp \\$1
|
||
|
..
|
||
|
.de @s
|
||
|
.ne \\$1
|
||
|
.rs
|
||
|
.if !'\\n(.z'' \!.@s \\$1
|
||
|
..
|
||
|
.de n1
|
||
|
.nm 1
|
||
|
.ll -\w'0000'u
|
||
|
.nr ?n 1
|
||
|
..
|
||
|
.de n2
|
||
|
.ie \\n(.$ \
|
||
|
\{\
|
||
|
.ie !`\\$2`c` \
|
||
|
.po -\w'0000'u
|
||
|
.el \
|
||
|
.ll -\w'0000'u
|
||
|
.ie \\B`\\$1` \
|
||
|
\{\
|
||
|
.ds |i \\$1
|
||
|
.ds |j \\$1
|
||
|
.do substring |i 0 0
|
||
|
.do substring |j 1
|
||
|
.ie `\\*(|i`+` \
|
||
|
.nr ln (\\n[_ln])+\\*(|j
|
||
|
.el \
|
||
|
.ie `\\*(|i`-` \
|
||
|
.nr ln (\\n[_ln])-\\*(|j
|
||
|
.el \
|
||
|
.nr ln \\$1
|
||
|
.nm \\n(ln
|
||
|
.nr ?n 2
|
||
|
.rm |i |j
|
||
|
.\}
|
||
|
.el \
|
||
|
.tm Line \\n(.c -- Bad .n2 value
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.nm
|
||
|
.nr _ln \\n(ln
|
||
|
.po +\w'0000'u
|
||
|
.ll \\n($lu
|
||
|
.nr ?n 0
|
||
|
.nr ln 0
|
||
|
.\}
|
||
|
..
|
||
|
.de pa
|
||
|
.bp \\$1
|
||
|
..
|
||
|
.de ro
|
||
|
.af % i
|
||
|
..
|
||
|
.de ar
|
||
|
.af % 1
|
||
|
..
|
||
|
.de m1
|
||
|
.nr _0 \\n(hmu
|
||
|
.nr hm \\$1v
|
||
|
.nr tm +\\n(hmu-\\n(_0u
|
||
|
.rr _0
|
||
|
..
|
||
|
.de m2
|
||
|
.nr tm \\n(hmu+\\n(tpp+\\$1v
|
||
|
..
|
||
|
.de m3
|
||
|
.nr bm \\n(fmu+\\n(tpp+\\$1v
|
||
|
..
|
||
|
.de m4
|
||
|
.nr _0 \\n(fmu
|
||
|
.nr fm \\$1v
|
||
|
.nr bm +\\n(fmu-\\n(_0u
|
||
|
..
|
||
|
.de sk
|
||
|
.if \\n(.$>0 \
|
||
|
.tm Line \\n(c. -- I cannot skip multiple pages
|
||
|
.nr ?s 1
|
||
|
..
|
||
|
.if !\n(.g .ig
|
||
|
.de re
|
||
|
.ta T 0.5i
|
||
|
..
|
||
|
.if \n(.g .ig
|
||
|
.de re
|
||
|
.ta 0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i
|
||
|
..
|
||
|
.de ba
|
||
|
.ie \\n(.$ \
|
||
|
.nr $i \\$1n
|
||
|
.el \
|
||
|
.nr $i \\n(siu*\\n($0u
|
||
|
..
|
||
|
.de hl
|
||
|
.br
|
||
|
.if '\*(.T'html' \
|
||
|
\{\
|
||
|
.HR
|
||
|
.do return
|
||
|
.\}
|
||
|
.ie \n(.g .do nr _I \\n[.in]
|
||
|
.el .nr _I \\n(.i
|
||
|
\l'\\n(.lu-\\n(_Iu'
|
||
|
.sp
|
||
|
..
|
||
|
.de pp
|
||
|
.lp \\n(piu
|
||
|
..
|
||
|
.de lp
|
||
|
.@p
|
||
|
.if \\n(.$ \
|
||
|
.ti +\\$1
|
||
|
.nr $p 0 1
|
||
|
..
|
||
|
.de ip
|
||
|
.if (\\n(ii>0)&(\\n(ii<1n) \
|
||
|
.nr ii \\n(iin
|
||
|
.nr _0 \\n(ii
|
||
|
.if \\n(.$>1 \
|
||
|
.nr _0 \\$2n
|
||
|
.@p \\n(_0u
|
||
|
.nr _I \\n(.iu
|
||
|
.in 0
|
||
|
.di |i
|
||
|
\&\\$1
|
||
|
.br
|
||
|
.di
|
||
|
.in \\n(_Iu
|
||
|
.ds |j \\*(|i\\
|
||
|
.ie \\w"\\*(|j" \
|
||
|
\{\
|
||
|
.ti -\\n(_0u
|
||
|
.ie \\w"\\*(|j">=\\n(_0 \
|
||
|
\{\
|
||
|
.do DEVTAG-COL 1
|
||
|
\\*(|j
|
||
|
.do DEVTAG-COL-NEXT 2
|
||
|
.br
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.do DEVTAG-COL 1
|
||
|
\\*(|j\h'|\\n(_0u'\c
|
||
|
.do DEVTAG-COL 2
|
||
|
.\}
|
||
|
.\}
|
||
|
.el .do DEVTAG-COL 2
|
||
|
.rr _0
|
||
|
.rm |i |j
|
||
|
..
|
||
|
.de np
|
||
|
.if '\\n($p'-1' \
|
||
|
.nr $p 0
|
||
|
.nr $p +1
|
||
|
.@p \w'\0(000)\0'u
|
||
|
.ti -\w'\0(000)\0'u
|
||
|
\0(\\n($p)\h'|\w'\0(000)\0'u'\c
|
||
|
..
|
||
|
.de bu
|
||
|
.br
|
||
|
.if '\\n($p'-1' \
|
||
|
.ns
|
||
|
.nr $p 0-1
|
||
|
.@p \w'\0\(bu\0'u
|
||
|
.ti -\w'\0\(bu\0'u
|
||
|
\0\(bu\0\c
|
||
|
..
|
||
|
.de @p
|
||
|
.do check_need_title
|
||
|
.if "\\n(.z"|e" .tm Line \\n(c. -- Unmatched continued equation
|
||
|
.in \\n($iu+\\n(pou
|
||
|
.if \\n(.$ \
|
||
|
.in +\\$1n
|
||
|
.ce 0
|
||
|
.fi
|
||
|
.@F \\n(pf
|
||
|
.sz \\n(pp
|
||
|
.sp \\n(psu
|
||
|
.ne \\n(.Lv+\\n(.Vu
|
||
|
.ns
|
||
|
..
|
||
|
.de sh
|
||
|
.fi
|
||
|
.do check_need_title
|
||
|
.if (\\n(si>0)&(\\n(si<1n) \
|
||
|
.nr si \\n(sin
|
||
|
.if '\*(.T'html' .nr si 0
|
||
|
.ce 0
|
||
|
.if '\*(.T'html' \
|
||
|
\{\
|
||
|
.do DEVTAG-SH \\$1
|
||
|
.do nr need_eo_h 1
|
||
|
.\}
|
||
|
.@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
|
||
|
.if !"\\$2"_" \
|
||
|
\{\
|
||
|
.ds |n \&\\$2
|
||
|
.$p "\\*(|n" "\\*($n" \\n($0
|
||
|
.$0 "\\*(|n" "\\*($n" \\n($0
|
||
|
.rm |n
|
||
|
.\}
|
||
|
.nr $p 0 1
|
||
|
..
|
||
|
.de @d
|
||
|
.if !""\\$1" \
|
||
|
.nr $0 \\$1
|
||
|
.if \\n($0&(\\n(.$>1) \
|
||
|
.nr $\\n($0 \\$2
|
||
|
.ds $n \&
|
||
|
.ie \\n($0>=1 \
|
||
|
\{\
|
||
|
.if '\\n($1'0' \
|
||
|
.nr $1 1
|
||
|
.if (\\n(.$>=3) .if !"\\$3"-" \
|
||
|
.nr $1 \\$3
|
||
|
.as $n \\n($1
|
||
|
.\}
|
||
|
.el \
|
||
|
.nr $1 0
|
||
|
.ie \\n($0>=2 \
|
||
|
\{\
|
||
|
.if '\\n($2'0' \
|
||
|
.nr $2 1
|
||
|
.if (\\n(.$>=4) .if !"\\$4"-" \
|
||
|
.nr $2 \\$4
|
||
|
.as $n .\\n($2
|
||
|
.\}
|
||
|
.el \
|
||
|
.nr $2 0
|
||
|
.ie \\n($0>=3 \
|
||
|
\{\
|
||
|
.if '\\n($3'0' \
|
||
|
.nr $3 1
|
||
|
.if (\\n(.$>=5) .if !"\\$5"-" \
|
||
|
.nr $3 \\$5
|
||
|
.as $n .\\n($3
|
||
|
.\}
|
||
|
.el \
|
||
|
.nr $3 0
|
||
|
.ie \\n($0>=4 \
|
||
|
\{\
|
||
|
.if '\\n($4'0' \
|
||
|
.nr $4 1
|
||
|
.if (\\n(.$>=6) .if !"\\$6"-" \
|
||
|
.nr $4 \\$6
|
||
|
.as $n .\\n($4
|
||
|
.\}
|
||
|
.el \
|
||
|
.nr $4 0
|
||
|
.ie \\n($0>=5 \
|
||
|
\{\
|
||
|
.if '\\n($5'0' \
|
||
|
.nr $5 1
|
||
|
.if (\\n(.$>=7) .if !"\\$7"-" \
|
||
|
.nr $5 \\$7
|
||
|
.as $n .\\n($5
|
||
|
.\}
|
||
|
.el \
|
||
|
.nr $5 0
|
||
|
.ie \\n($0>=6 \
|
||
|
\{\
|
||
|
.if '\\n($6'0' \
|
||
|
.nr $6 1
|
||
|
.if (\\n(.$>=8) .if !"\\$8"-" \
|
||
|
.nr $6 \\$8
|
||
|
.as $n .\\n($6
|
||
|
.\}
|
||
|
.el \
|
||
|
.nr $6 0
|
||
|
..
|
||
|
.de sx
|
||
|
.ce 0
|
||
|
.ul 0
|
||
|
.nr _0 \\n($0-1
|
||
|
.if \\n(.$ .nr _0 +1
|
||
|
.if \\n(.$ .nr _0 \\$1
|
||
|
.@d \\n(_0
|
||
|
.rr _0
|
||
|
.$p "" "" \\n($0
|
||
|
.nr $p 0 1
|
||
|
..
|
||
|
.de uh
|
||
|
.$p "\\$1"
|
||
|
.$0 "\\$1"
|
||
|
..
|
||
|
.de $p
|
||
|
.if (\\n(si>0)&(\\n(.$>2) \
|
||
|
.nr $i \\$3*\\n(si
|
||
|
.in \\n($iu
|
||
|
.ie !"\\$1\\$2"" \
|
||
|
\{\
|
||
|
.sp \\n(ssu
|
||
|
.ne \\n(.Lv+\\n(.Vu+\\n(psu+((\\n(spp*\\n($vu*\\n(.Lu)/100u)
|
||
|
.ie 0\\$3 \
|
||
|
.ti -(\\n(siu-\\n(sou)
|
||
|
.el \
|
||
|
.ti +\\n(sou
|
||
|
.@F \\n(sf
|
||
|
.sz \\n(sp
|
||
|
.if 0\\$3 \
|
||
|
.$\\$3
|
||
|
.if \w"\\$2">0 \\$2.
|
||
|
.if \w"\\$1">0 \\$1\f1\ \ \&
|
||
|
.\}
|
||
|
.el \
|
||
|
.sp \\n(psu
|
||
|
.@F \\n(pf
|
||
|
.sz \\n(pp
|
||
|
..
|
||
|
.de 2c
|
||
|
.br
|
||
|
.if \\n($m>1 \
|
||
|
.1c
|
||
|
.nr $c 1
|
||
|
.nr $m 2
|
||
|
.if \\n(.$>1 \
|
||
|
.nr $m \\$2
|
||
|
.if \\n(.$>0 \
|
||
|
.nr $s \\$1n
|
||
|
.nr $l (\\n(.l-((\\n($m-1)*\\n($s))/\\n($m
|
||
|
.xl \\n($lu
|
||
|
.mk _k
|
||
|
.ns
|
||
|
..
|
||
|
.de 1c
|
||
|
.br
|
||
|
.nr $c 1
|
||
|
.nr $m 1
|
||
|
.ll \\n(_Lu
|
||
|
.sp |\\n(.hu
|
||
|
.@O \\n(_ou
|
||
|
..
|
||
|
.de bc
|
||
|
.sp 24i
|
||
|
..
|
||
|
.de (z
|
||
|
.if \n@>4 .tm >> (z, .z=\n(.z
|
||
|
.@D 4 \\$1 \\$2
|
||
|
.@(
|
||
|
..
|
||
|
.de )z
|
||
|
.if \n@>4 .tm >> )z, .z=\n(.z
|
||
|
.sp \\n(zsu
|
||
|
.@)
|
||
|
.if \n@>4 .tm -- )z << @), .z=\n(.z
|
||
|
.rr _0
|
||
|
.if !\\n(?b \
|
||
|
.nr dn +(\\n(ppp*\\n($vu)/200u+\\n(zsu
|
||
|
.nr dl -\n(.H
|
||
|
.ie ((\\n(dn+\n(.V)>=\\n(.t):(\\n(?a):((\\n(dl>\\n($l)&(\\n($c>1)) \
|
||
|
\{\
|
||
|
.nr ?a 1
|
||
|
.if (\\n(dl>\\n($l)&(\\n($m>1) \
|
||
|
.nr ?w 1
|
||
|
.ds |x |t
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.nr ?b 1
|
||
|
.if (\\n(dl>\\n($l)&(\\n($m>1) \
|
||
|
.nr ?W 1
|
||
|
.nr _b +\\n(dnu
|
||
|
.if \\n(.p-\\n(nl-\n(.V<\\n(_b \
|
||
|
.nr _b \\n(.p-\\n(nl-\n(.V
|
||
|
.ch @f -\\n(_bu
|
||
|
.ds |x |b
|
||
|
.\}
|
||
|
.da \\*(|x
|
||
|
.nf
|
||
|
.ls 1
|
||
|
.nr ?k 1
|
||
|
.if \n@>4 .tm -- )z >> \\*(|x
|
||
|
\!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
|
||
|
.|k
|
||
|
.ec
|
||
|
.if \n@>4 .tm -- )z << \\*(|x, .z=\\n(.z
|
||
|
.nr ?k 0
|
||
|
.rm |k
|
||
|
.da
|
||
|
.in 0
|
||
|
.ls 1
|
||
|
.xl \\n($lu
|
||
|
.ev
|
||
|
.if \n@>4 .tm << )z, .z=\\n(.z
|
||
|
..
|
||
|
.de @k
|
||
|
.if \n@>4 .tm >> @k, $1=\\$1, .z=\\n(.z
|
||
|
.ev 1
|
||
|
.nf
|
||
|
.ls 1
|
||
|
.in 0
|
||
|
.sp \\n(zsu
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.\\$1
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.ec
|
||
|
.br
|
||
|
.rm \\$1
|
||
|
.ev
|
||
|
..
|
||
|
.de (t
|
||
|
.(z \\$1 \\$2
|
||
|
..
|
||
|
.de )t
|
||
|
.)z \\$1 \\$2
|
||
|
..
|
||
|
.de (b
|
||
|
.br
|
||
|
.@D 3 \\$1 \\$2
|
||
|
.sp \\n(bsu
|
||
|
.@(
|
||
|
.if '\*(.T'html' .sp \\n(bsu
|
||
|
..
|
||
|
.de )b
|
||
|
.br
|
||
|
.@)
|
||
|
.if (\\n(bt=0):(\\n(.t<\\n(bt) \
|
||
|
.ne \\n(dnu
|
||
|
.@k |k
|
||
|
.ev
|
||
|
.sp \\n(bsu+\\n(.Lv-1v
|
||
|
..
|
||
|
.de @(
|
||
|
.if !"\\n(.z"" .tm Line \\n(c. -- Invalid nested keep \\n(.z
|
||
|
.@M
|
||
|
.di |k
|
||
|
\!'rs
|
||
|
..
|
||
|
.de @M
|
||
|
.nr ?k 1
|
||
|
.@C 1
|
||
|
.@F \\n(df
|
||
|
.if \\n($R .@V
|
||
|
.vs \\n(.sp*\\n($Vu/100u
|
||
|
.nf
|
||
|
.if "\\*(|p"F" \
|
||
|
.fi
|
||
|
.if \\n(_d=4 \
|
||
|
.in 0
|
||
|
.if \\n(_d=3 \
|
||
|
\{\
|
||
|
.in +\\n(biu
|
||
|
.xl -\\n(biu
|
||
|
.\}
|
||
|
.if \\n(_d=1 \
|
||
|
.ce 10000
|
||
|
..
|
||
|
.de @)
|
||
|
.br
|
||
|
.if !"\\n(.z"|k" .tm Line \\n(c. -- Close of a keep which has never been opened
|
||
|
.nr ?k 0
|
||
|
.di
|
||
|
.in 0
|
||
|
.ce 0
|
||
|
..
|
||
|
.de (c
|
||
|
.br
|
||
|
.if "\\n(.z"|c" .tm Line \\n(c. -- Nested .(c requests
|
||
|
.if \\n(?n .nm
|
||
|
.di |c
|
||
|
..
|
||
|
.de )c
|
||
|
.if !"\\n(.z"|c" .tm Line \\n(c. -- Unmatched .)c
|
||
|
.br
|
||
|
.di
|
||
|
.if \n@>4 .tm >> .)c .l=\\n(.l .i=\\n(.i $i=\\n($i dl=\\n(dl
|
||
|
.ev 1
|
||
|
.ls 1
|
||
|
.in (\\n(.lu-\\n(.iu-\\n(dlu)/2u
|
||
|
.if \n@>4 .tm -- .)c << .in .l=\\n(.l .i=\\n(.i dl=\\n(dl
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.nf
|
||
|
.|c
|
||
|
.ec
|
||
|
.in
|
||
|
.ls
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.ev
|
||
|
.rm |c
|
||
|
..
|
||
|
.de (q
|
||
|
.br
|
||
|
.@C 1
|
||
|
.fi
|
||
|
.sp \\n(qsu
|
||
|
.in +\\n(qiu
|
||
|
.xl -\\n(qiu
|
||
|
.sz \\n(qp
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
..
|
||
|
.de )q
|
||
|
.br
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.ev
|
||
|
.sp \\n(qsu+\\n(.Lv-1v
|
||
|
.nr ?k 0
|
||
|
..
|
||
|
.de (l
|
||
|
.br
|
||
|
.sp \\n(bsu
|
||
|
.@D 3 \\$1 \\$2
|
||
|
.@M
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.if '\*(.T'html' .sp \\n(bsu
|
||
|
..
|
||
|
.de )l
|
||
|
.br
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.ev
|
||
|
.sp \\n(bsu+\\n(.Lv-1v
|
||
|
.nr ?k 0
|
||
|
..
|
||
|
.de EQ
|
||
|
.do if \\n[need_eo_h]>0 .do DEVTAG-EO-H
|
||
|
.do nr need_eo_h 0
|
||
|
.ec
|
||
|
.if "\*(.T"html" \
|
||
|
\{\
|
||
|
.do nr e-EQ-ll \\n(.l
|
||
|
.ll 1000n
|
||
|
.\}
|
||
|
.do HTML-IMAGE
|
||
|
.if !\\n(?e \
|
||
|
\{\
|
||
|
.if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
|
||
|
.@D 1 "\\$1" "\\$2"
|
||
|
.@C 2
|
||
|
.di |e
|
||
|
.\}
|
||
|
.ls 1
|
||
|
.in 0
|
||
|
.nf
|
||
|
..
|
||
|
.de EN
|
||
|
.br
|
||
|
.do HTML-IMAGE-END
|
||
|
.if "\*(.T"html" \
|
||
|
.do ll \\n[e-EQ-ll]u
|
||
|
.ie "\\$1"C" \
|
||
|
\{\
|
||
|
.nr ?e 1
|
||
|
.sp \\n(esu
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.nr ?e 0
|
||
|
.di
|
||
|
.if \\n(dn \
|
||
|
.@q
|
||
|
.rm |e
|
||
|
.ev
|
||
|
.\}
|
||
|
..
|
||
|
.de @q
|
||
|
.nr _Q \\n(dnu
|
||
|
.ev
|
||
|
.sp \\n(esu
|
||
|
.if !"\\n(.z"" \!.ne \\n(_Qu
|
||
|
.ne \\n(_Qu+\n(.Vu
|
||
|
.@C 2
|
||
|
.if \\n(_d=1 \
|
||
|
.in (\\n(.lu+\\n($iu-\\n(dlu)/2u
|
||
|
.if \\n(_d=2 \
|
||
|
.in \\n($iu
|
||
|
.if \\n(_d=3 \
|
||
|
.in \\n(biu+\\n($iu
|
||
|
.if \\n(_d=4 \
|
||
|
.in 0
|
||
|
.mk _q
|
||
|
.if \n@>1 .tm --@e: _Q=\\n(_Q _q=\\n(_q nl=\\n(nl |p=\\*(|p
|
||
|
.if !"\\*(|p"" \
|
||
|
\{\
|
||
|
.rs
|
||
|
.sp (\\n(_Qu-\\n(.vu)/2u
|
||
|
.tl """\\*(|p"
|
||
|
.rt \\n(_qu
|
||
|
.\}
|
||
|
.if \\n(?n \
|
||
|
.nm \\n(ln
|
||
|
.|e
|
||
|
.if \\n(?n \
|
||
|
.nm
|
||
|
.sp |\\n(_qu+\\n(_Qu
|
||
|
.sp \\n(esu+\\n(.Lv-1v
|
||
|
.rr _q
|
||
|
.rr _Q
|
||
|
..
|
||
|
.de TS
|
||
|
.sp \\n(bsu
|
||
|
.if "\*(.T"html" \
|
||
|
\{\
|
||
|
.do nr e-TS-ll \\n(.l
|
||
|
.ll 1000n
|
||
|
.\}
|
||
|
.do HTML-IMAGE
|
||
|
.@C 1
|
||
|
.fi
|
||
|
.if "\\$1"H" \
|
||
|
\{\
|
||
|
.di |h
|
||
|
.nr ?T 1
|
||
|
.\}
|
||
|
.ls 1
|
||
|
.ch @f -(\\n(_bu+1v)
|
||
|
.if \\n(.p-\\n(_b-1v<=\\n(nl \
|
||
|
.ch @f \\n(nlu+\n(.Vu
|
||
|
..
|
||
|
.de TH
|
||
|
.nr T. 0
|
||
|
.T# 0
|
||
|
.if \\n(?n \!.nm
|
||
|
.di
|
||
|
.nr _T \\n(?T
|
||
|
.nr ?T 0
|
||
|
.ne \\n(dnu+1v
|
||
|
.nr ?T \\n(_T
|
||
|
.nr _i \\n(.i
|
||
|
.if \\n(?n .nm \\n(ln
|
||
|
.in 0
|
||
|
.|h
|
||
|
.in \\n(_iu
|
||
|
.rr _i
|
||
|
.mk #T
|
||
|
..
|
||
|
.de TE
|
||
|
.nr ?T 0
|
||
|
.ch @f -\\n(_bu
|
||
|
.if \\n(.p-\\n(_b<=\\n(nl \
|
||
|
.ch @f \\n(nlu+\n(.Vu
|
||
|
.ev
|
||
|
.do HTML-IMAGE-END
|
||
|
.if "\*(.T"html" \
|
||
|
.do ll \\n[e-TS-ll]u
|
||
|
.sp \\n(bsu+\\n(.Lv-1v
|
||
|
.re
|
||
|
..
|
||
|
.de T&
|
||
|
..
|
||
|
.mso refer-me.tmac
|
||
|
.de IS
|
||
|
.nr g7 \\n(.u
|
||
|
.ls 1
|
||
|
..
|
||
|
.de IF
|
||
|
.if \\n(g7 .fi
|
||
|
.ls
|
||
|
..
|
||
|
.de IE
|
||
|
.if \\n(g7 .fi
|
||
|
.ls
|
||
|
..
|
||
|
.de PS
|
||
|
.sp 0.3
|
||
|
.do HTML-IMAGE
|
||
|
.nr g7 \\$2
|
||
|
.in (u;\\n(.l-\\n(g7>?0/2)
|
||
|
.ne \\$1u
|
||
|
.nr g7 \\n(.u
|
||
|
.ls 1
|
||
|
.if \\n(?n \
|
||
|
\{\
|
||
|
.de PS_nm_check &&
|
||
|
.if \n@>4 .tm -- PS: \\\\$1 \\\\$2 .z=\\\\n(.z PS_nm_cnt=\\\\n[PS_nm_cnt]
|
||
|
.if `\\\\$2`init` \
|
||
|
.do nr PS_nm_cnt \\\\n[PS_nm_cnt]+1
|
||
|
.ie `\\\\n(.z`` \
|
||
|
\{\
|
||
|
.if `\\\\$1`suspend` \
|
||
|
.nm
|
||
|
.if `\\\\$1`resume` \
|
||
|
\{\
|
||
|
.nm \\\\n(ln
|
||
|
.do nr PS_nm_cnt \\\\n[PS_nm_cnt]-1
|
||
|
.do if !\\\\n[PS_nm_cnt] \
|
||
|
\{\
|
||
|
.do rm PS_nm_check
|
||
|
.do rr PS_nm_cnt
|
||
|
.\}
|
||
|
.\}
|
||
|
.\}
|
||
|
.el \!.PS_nm_check \\\\$1
|
||
|
.&&
|
||
|
.mk _q
|
||
|
.rs
|
||
|
\&\
|
||
|
.br
|
||
|
.rt \\n(_qu
|
||
|
.PS_nm_check suspend init
|
||
|
.\}
|
||
|
..
|
||
|
.de PE
|
||
|
.if \\n(?n .PS_nm_check resume
|
||
|
.ls
|
||
|
.in
|
||
|
.if \\n(g7 .fi
|
||
|
.do HTML-IMAGE-END
|
||
|
.sp .6
|
||
|
..
|
||
|
.de GS
|
||
|
.ie '\*(.T'html' \
|
||
|
\{\
|
||
|
.ie "\\$1"L" .do HTML-IMAGE-LEFT
|
||
|
.el .ie "\\$1"R" .do HTML-IMAGE-RIGHT
|
||
|
.el .do HTML-IMAGE
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.nr g7 (\\n(.lu-\\n(g1u)/2u
|
||
|
.if "\\$1"L" .nr g7 \\n(.iu
|
||
|
.if "\\$1"R" .nr g7 \\n(.lu-\\n(g1u
|
||
|
.in \\n(g7u
|
||
|
.nr g7 \\n(.u
|
||
|
.ls 1
|
||
|
.nf
|
||
|
.ne \\n(g2u
|
||
|
.\}
|
||
|
..
|
||
|
.de GE
|
||
|
.ie '\*(.T'html' .do HTML-IMAGE-END
|
||
|
.el \
|
||
|
\{\
|
||
|
.GF
|
||
|
.sp .6
|
||
|
.\}
|
||
|
..
|
||
|
.de GF
|
||
|
.ls
|
||
|
.in
|
||
|
.if \\n(g7 .fi
|
||
|
..
|
||
|
.de sz
|
||
|
.ps \\$1
|
||
|
.if \\n($r .@v
|
||
|
.vs \\n(.sp*\\n($vu/100u
|
||
|
..
|
||
|
.de @v
|
||
|
.if (1i>=240u)&(1p<=\\n($r)&(\\n($r<=4p) .nr $v \\n($r00/1p
|
||
|
..
|
||
|
.de @V
|
||
|
.if (1i>=240u)&(1p<=\\n($R)&(\\n($R<=4p) .nr $V \\n($R00/1p
|
||
|
..
|
||
|
.de @E
|
||
|
.ie \\n(.f<10 \
|
||
|
.ds _F \\n(.f
|
||
|
.el \
|
||
|
\{\
|
||
|
.ie \\n(.f<100&\n(.g \
|
||
|
.ds _F (\\n(.f
|
||
|
.el \
|
||
|
.ds _F P
|
||
|
.\}
|
||
|
..
|
||
|
.de r
|
||
|
.do check_need_title
|
||
|
.@E
|
||
|
.ft 1
|
||
|
.if \\n(.$ \&\\$1\f\\*(_F\\$2
|
||
|
.do check_need_title
|
||
|
..
|
||
|
.de i
|
||
|
.do check_need_title
|
||
|
.@E
|
||
|
.ft 2
|
||
|
.if \\n(.$ \&\\$1\f\\*(_F\\$2
|
||
|
.do check_need_title
|
||
|
..
|
||
|
.de b
|
||
|
.do check_need_title
|
||
|
.@E
|
||
|
.ft 3
|
||
|
.if \\n(.$ \&\\$1\f\\*(_F\\$2
|
||
|
.do check_need_title
|
||
|
..
|
||
|
.de rb
|
||
|
.do check_need_title
|
||
|
.@E
|
||
|
.ft 3
|
||
|
.if \\n(.$ \&\\$1\f\\*(_F\\$2
|
||
|
.do check_need_title
|
||
|
..
|
||
|
.de bi
|
||
|
.do check_need_title
|
||
|
.@E
|
||
|
.ft 4
|
||
|
.if \\n(.$ \&\\$1\f\\*(_F\\$2
|
||
|
.do check_need_title
|
||
|
..
|
||
|
.de u
|
||
|
\&\\$1\l'|0\(ul'\\$2
|
||
|
..
|
||
|
.if !\n(.g .ig
|
||
|
.de u
|
||
|
\Z'\\$1'\v'.25m'\D'l \w'\\$1'u 0'\v'-.25m'\\$2
|
||
|
..
|
||
|
.de q
|
||
|
\&\\*(lq\\$1\\*(rq\\$2
|
||
|
..
|
||
|
.de bx
|
||
|
.ie '\*(.T'html' \\$1\\$2
|
||
|
.el \k~\(br\|\\$1\|\(br\l'|\\n~u\(rn'\l'|\\n~u\(ul'\^\\$2
|
||
|
..
|
||
|
.de sm
|
||
|
\s-1\\$1\\s0\\$2
|
||
|
..
|
||
|
.de @F
|
||
|
.nr ~ \\$1
|
||
|
.if \\n~>0 \
|
||
|
.ft \\n~
|
||
|
.rr ~
|
||
|
..
|
||
|
.de (f
|
||
|
.ec
|
||
|
.if "\\n(.z"|f" .tm Line \\n(c. -- Invalid footnote nesting
|
||
|
.ie "\\n(.z"" \
|
||
|
\{\
|
||
|
.nr _D \\n(dn
|
||
|
.nr _0 1v+\\n(nlu
|
||
|
.ev 2
|
||
|
.nm
|
||
|
.da |f
|
||
|
.in 0
|
||
|
.xl \\n($lu-\\n(fuu
|
||
|
.@F \\n(ff
|
||
|
.sz \\n(fp
|
||
|
.vs \\n(.sp*\\n($Vu/100u
|
||
|
.if !\\n(?f \
|
||
|
\{\
|
||
|
.nr _b +1v
|
||
|
.$s
|
||
|
.\}
|
||
|
.br
|
||
|
.if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
|
||
|
\{\
|
||
|
.da
|
||
|
.bc
|
||
|
.if !\\n(?f \
|
||
|
.rm |f
|
||
|
.da |f
|
||
|
.in 0
|
||
|
.xl \\n($lu-\\n(fuu
|
||
|
.@F \\n(ff
|
||
|
.sz \\n(fp
|
||
|
.vs \\n(.sp*\\n($Vu/100u
|
||
|
.if !\\n(?f \
|
||
|
.$s
|
||
|
.br
|
||
|
.\}
|
||
|
.rr _0
|
||
|
.sp \\n(fsu
|
||
|
.nr ?f 1
|
||
|
.fi
|
||
|
.if !"\\$1"_" \
|
||
|
.ti \\n(fiu
|
||
|
.if \n@>2 .tm << (f $f=\\n($f
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.ev 2
|
||
|
.nm
|
||
|
.in 0
|
||
|
.xl \\n($lu-\\n(fuu
|
||
|
.@F \\n(ff
|
||
|
.sz \\n(fp
|
||
|
.vs \\n(.sp*\\n($Vu/100u
|
||
|
.fi
|
||
|
\!.(f \\$1
|
||
|
\!.@N
|
||
|
.\}
|
||
|
..
|
||
|
.de @N
|
||
|
.ie "\\n(.z"" .nf
|
||
|
.el \!.@N
|
||
|
..
|
||
|
.de )f
|
||
|
.ie "\\n(.z"|f" \
|
||
|
\{\
|
||
|
.if \\n* \
|
||
|
.nr $f +1
|
||
|
.ds * \\*{\\n($f\\*}\k*
|
||
|
.nr * 0
|
||
|
.in 0
|
||
|
.da
|
||
|
.ev
|
||
|
.if \\n(_w<\\n(dl \
|
||
|
.nr _w \\n(dl
|
||
|
.nr _b +\\n(dn
|
||
|
.ch @f -\\n(_bu
|
||
|
.if \\n(.p-\\n(_b<=\\n(nl \
|
||
|
.ch @f \\n(nlu+\n(.Vu
|
||
|
.nr dn \\n(_D
|
||
|
.rr _D
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
.br
|
||
|
\!.)f
|
||
|
.ev
|
||
|
.\}
|
||
|
..
|
||
|
.@R ff
|
||
|
.if \n(ff<=0 \
|
||
|
.nr ff 1
|
||
|
.@R fp
|
||
|
.if \n(fp<=0 \
|
||
|
.nr fp 8
|
||
|
.de $s
|
||
|
\l'2i'
|
||
|
..
|
||
|
.de (d
|
||
|
.am |d )d
|
||
|
.sp \\n(bsu
|
||
|
..
|
||
|
.de )d
|
||
|
.if \\n# \
|
||
|
.nr $d +1
|
||
|
.ds # [\\n($d]\k#
|
||
|
.rr #
|
||
|
..
|
||
|
.de pd
|
||
|
.|d
|
||
|
.rm |d
|
||
|
.nr $d 1 1
|
||
|
.ds # [1]\k#
|
||
|
..
|
||
|
.nr _x 0 1
|
||
|
.do nr _xn 0
|
||
|
.af _x a
|
||
|
.de (x
|
||
|
.if \n@>4 .tm >> (x, .z=\\n(.z
|
||
|
.ds |X x
|
||
|
.if \\n(.$>0 \
|
||
|
.ds |X \\$1
|
||
|
.ie "\\n(.z"" \
|
||
|
.nr _z 0
|
||
|
.el \
|
||
|
.nr _z 1
|
||
|
.@\\n(_z
|
||
|
..
|
||
|
.de @0
|
||
|
.am %\\*(|X )x
|
||
|
.sp \\n(xsu
|
||
|
.ti -\\n(piu
|
||
|
..
|
||
|
.de @1
|
||
|
.if "\\n(_x"z" .nr _x 0
|
||
|
.de =\\n+(_x )x
|
||
|
..
|
||
|
.de )x
|
||
|
.if \n@>4 .tm >> )x, .z=\\n(.z
|
||
|
.ie "\\n(.z"" \
|
||
|
\{\
|
||
|
.ds |x \\n%
|
||
|
.if \\n(.$>0 \
|
||
|
.ds |x \\$1
|
||
|
.if "\\*(|x"_" \
|
||
|
.ig ..
|
||
|
.am %\\*(|X ..
|
||
|
.if \w"\\$2">(\\n(.l-\\n(.i-\\n(.k) \
|
||
|
.ti +\\n(xuu
|
||
|
\\\\a\\\\t\\$2\\*(|x
|
||
|
...
|
||
|
.rm |x
|
||
|
.rm |X
|
||
|
.\}
|
||
|
.el \
|
||
|
\{\
|
||
|
\!.(x \\*(|X
|
||
|
\!\\\\*(=\\n(_x\\\\
|
||
|
\!.)x \\$1 \\$2
|
||
|
\!.rm =\\n(_x
|
||
|
.\}
|
||
|
..
|
||
|
.de xp
|
||
|
.br
|
||
|
.@C 2
|
||
|
.ls 1
|
||
|
.vs \\n(.sp*\\n($Vu/100u
|
||
|
.fi
|
||
|
.in +\\n(piu
|
||
|
.ds |X x
|
||
|
.if \\n(.$>0 \
|
||
|
.ds |X \\$1
|
||
|
.xl -(\\n(xuu+\w'...'u)
|
||
|
.di |x
|
||
|
.%\\*(|X
|
||
|
.br
|
||
|
.di
|
||
|
.rm %\\*(|X
|
||
|
.xl \\n($lu
|
||
|
.rm |X
|
||
|
.ev
|
||
|
.nf
|
||
|
.in 0
|
||
|
.ta \\n(.lu-\\n(xuuR \\n(.luR
|
||
|
.|x
|
||
|
.fi
|
||
|
.in
|
||
|
.rm |x
|
||
|
..
|
||
|
.de (x-html
|
||
|
.nr _x +1
|
||
|
.do nr _xn +1
|
||
|
.do TAG "_x\\n[_x]
|
||
|
.br
|
||
|
.do di |x\\n[_xn]
|
||
|
.br
|
||
|
..
|
||
|
.de )x-html
|
||
|
.br
|
||
|
.di
|
||
|
..
|
||
|
.de xp-html
|
||
|
.do nr _xx 1
|
||
|
.br
|
||
|
.do ev xp-html-ev
|
||
|
.sp
|
||
|
.do ULS
|
||
|
.do while \\n[_xx]<=\\n[_xn] \
|
||
|
\{\
|
||
|
.br
|
||
|
.do unformat |x\\n[_xx]
|
||
|
.do di xp-html-div
|
||
|
.br
|
||
|
.ll 100i
|
||
|
.fi
|
||
|
.do |x\\n[_xx]
|
||
|
.br
|
||
|
.di
|
||
|
.do asciify xp-html-div
|
||
|
.do rm xp-html-as
|
||
|
.do as xp-html-as #
|
||
|
.do as xp-html-as _x\\n[_xx]
|
||
|
.ll
|
||
|
.LI
|
||
|
.do URL \\*[xp-html-as] "\\*[xp-html-div]
|
||
|
.do rm xp-html-as
|
||
|
.do nr _xx +1
|
||
|
.\}
|
||
|
.do ULE
|
||
|
.sp
|
||
|
.ev
|
||
|
..
|
||
|
.if '\*(.T'html' \
|
||
|
\{\
|
||
|
.rm (x
|
||
|
.do als (x (x-html
|
||
|
.rm )x
|
||
|
.do als )x )x-html
|
||
|
.rm xp
|
||
|
.do als xp xp-html
|
||
|
.\}
|
||
|
.de +c
|
||
|
.ep
|
||
|
.if \\n(?o:\\n(?a \
|
||
|
\{\
|
||
|
.bp
|
||
|
.rs
|
||
|
.ep
|
||
|
.\}
|
||
|
.nr ?C 1
|
||
|
.nr $f 1 1
|
||
|
.ds * \\*{1\\*}\k*
|
||
|
.if \\n(?R \
|
||
|
.pn 1
|
||
|
.bp
|
||
|
.in \\n($iu
|
||
|
.rs
|
||
|
.ie \\n(.$ \
|
||
|
.$c "\\$1"
|
||
|
.el \
|
||
|
.sp 3
|
||
|
..
|
||
|
.de ++
|
||
|
.nr _0 0
|
||
|
.if "\\$1"C" \
|
||
|
.nr _0 1
|
||
|
.if "\\$1"RC" \
|
||
|
.nr _0 11
|
||
|
.if "\\$1"A" \
|
||
|
.nr _0 2
|
||
|
.if "\\$1"RA" \
|
||
|
.nr _0 12
|
||
|
.if "\\$1"P" \
|
||
|
.nr _0 3
|
||
|
.if "\\$1"B" \
|
||
|
.nr _0 4
|
||
|
.if "\\$1"AB" \
|
||
|
.nr _0 5
|
||
|
.if \\n(_0=0 \
|
||
|
.tm Line \\n(c. -- Bad mode to .++
|
||
|
.nr ?R 0
|
||
|
.if \\n(_0>10 \
|
||
|
.\{
|
||
|
.nr ?R 1
|
||
|
.nr _0 -10
|
||
|
.\}
|
||
|
.nr ch 0 1
|
||
|
.if (\\n(_0=3):(\\n(_0=5) \
|
||
|
.pn 1
|
||
|
.if !\\n(_0=\\n(_M .if \\n(_M=3 \
|
||
|
.pn 1
|
||
|
.ep
|
||
|
.if \\n(_0=1 \
|
||
|
\{\
|
||
|
.af ch 1
|
||
|
.af % 1
|
||
|
.\}
|
||
|
.if \\n(_0=2 \
|
||
|
\{\
|
||
|
.af ch A
|
||
|
.af % 1
|
||
|
.\}
|
||
|
.if \\n(_0=3 \
|
||
|
.af % i
|
||
|
.if \\n(_0=4 \
|
||
|
.af % 1
|
||
|
.if \\n(_0=5 \
|
||
|
.af % 1
|
||
|
.if \\n(.$>1 \
|
||
|
.he \\$2
|
||
|
.nr _M \\n(_0
|
||
|
.rr _0
|
||
|
..
|
||
|
.de $c
|
||
|
.sz 12
|
||
|
.ft 3
|
||
|
.ce 1000
|
||
|
.if \\n(_M<3 \
|
||
|
.nr ch +1
|
||
|
.ie \\n(_M=1 CHAPTER\ \ \\n(ch
|
||
|
.el .if \\n(_M=2 APPENDIX\ \ \\n(ch
|
||
|
.if \w"\\$1" .sp 3-\\n(.L
|
||
|
.if \w"\\$1" \\$1
|
||
|
.if (\\n(_M<3):(\w"\\$1") \
|
||
|
.sp 4-\\n(.L
|
||
|
.ce 0
|
||
|
.ft
|
||
|
.sz
|
||
|
.ie \\n(_M=1 \
|
||
|
.$C Chapter \\n(ch "\\$1"
|
||
|
.el .if \\n(_M=2 \
|
||
|
.$C Appendix \\n(ch "\\$1"
|
||
|
..
|
||
|
.de tp
|
||
|
.hx
|
||
|
.bp
|
||
|
.br
|
||
|
.rs
|
||
|
.pn \\n%
|
||
|
..
|
||
|
.if \n(mo=1 .ds mo January
|
||
|
.if \n(mo=2 .ds mo February
|
||
|
.if \n(mo=3 .ds mo March
|
||
|
.if \n(mo=4 .ds mo April
|
||
|
.if \n(mo=5 .ds mo May
|
||
|
.if \n(mo=6 .ds mo June
|
||
|
.if \n(mo=7 .ds mo July
|
||
|
.if \n(mo=8 .ds mo August
|
||
|
.if \n(mo=9 .ds mo September
|
||
|
.if \n(mo=10 .ds mo October
|
||
|
.if \n(mo=11 .ds mo November
|
||
|
.if \n(mo=12 .ds mo December
|
||
|
.if \n(dw=1 .ds dw Sunday
|
||
|
.if \n(dw=2 .ds dw Monday
|
||
|
.if \n(dw=3 .ds dw Tuesday
|
||
|
.if \n(dw=4 .ds dw Wednesday
|
||
|
.if \n(dw=5 .ds dw Thursday
|
||
|
.if \n(dw=6 .ds dw Friday
|
||
|
.if \n(dw=7 .ds dw Saturday
|
||
|
.nr y2 \n(yr%100
|
||
|
.af y2 00
|
||
|
.nr y4 \n(yr+1900
|
||
|
.ds td \*(mo \n(dy, \n(y4
|
||
|
.rr x
|
||
|
.nr $v \n(.v00+\n(.sp-1/\n(.sp
|
||
|
.nr $V \n($v
|
||
|
.nr hm 4v
|
||
|
.nr tm 7v
|
||
|
.nr bm 6v
|
||
|
.nr fm 3v
|
||
|
.nr tf 3
|
||
|
.nr tp 10
|
||
|
.hy 14
|
||
|
.nr bi 4m
|
||
|
.nr pi 5n
|
||
|
.nr pf 1
|
||
|
.nr pp 10
|
||
|
.nr qi 4n
|
||
|
.nr qp -1
|
||
|
.nr ii 5n
|
||
|
.nr $m 1
|
||
|
.nr $s 4n
|
||
|
.nr sf 3
|
||
|
.nr sp 10
|
||
|
.nr ss 12p
|
||
|
.nr si 0
|
||
|
.@R 0x
|
||
|
.ds { \v'-0.4m'\x'\\n(0x=0*-0.2m'\s-3
|
||
|
.ds } \s0\v'0.4m'
|
||
|
.ds [ \*{
|
||
|
.ds ] \*}
|
||
|
.ds < \v'0.4m'\x'\\n(0x=0*0.2m'\s-3
|
||
|
.ds > \s0\v'-0.4m'
|
||
|
.ds - \(em
|
||
|
.@S |0
|
||
|
.@S |1
|
||
|
.@S |2
|
||
|
.@S |3
|
||
|
.@S $H
|
||
|
.@S $0
|
||
|
.@S $1
|
||
|
.@S $2
|
||
|
.@S $3
|
||
|
.@S $4
|
||
|
.@S $5
|
||
|
.@S $6
|
||
|
.@S $7
|
||
|
.@S $8
|
||
|
.@S $9
|
||
|
.@S ..
|
||
|
.@R po
|
||
|
.@R $0
|
||
|
.@R $i
|
||
|
.@R $p
|
||
|
.@R $r
|
||
|
.@R $R
|
||
|
.@R df
|
||
|
.@R so
|
||
|
.@R fu
|
||
|
.@R bt
|
||
|
.@R *
|
||
|
.@R ?a
|
||
|
.@R ?b
|
||
|
.@R ?C
|
||
|
.@R ?e
|
||
|
.@R ?H
|
||
|
.@R ?I
|
||
|
.@R ?n
|
||
|
.@R ?o
|
||
|
.@R ?R
|
||
|
.@R ?s
|
||
|
.@R ?T
|
||
|
.@R ?W
|
||
|
.@R ?w
|
||
|
.nr fi 0.3i
|
||
|
.nr _o \n(.o
|
||
|
.nr $b 3
|
||
|
.nr ps 0.35v
|
||
|
.if \n(ps<\n(.V .nr ps \n(.V
|
||
|
.nr bs \n(ps
|
||
|
.nr qs \n(ps
|
||
|
.nr zs 1v
|
||
|
.nr xs 0.2v
|
||
|
.nr xu 0.5i
|
||
|
.nr fs 0.2v
|
||
|
.nr es 0.5v
|
||
|
.if \n(es<\n(.V .nr es \n(.V
|
||
|
.wh 0 @h
|
||
|
.nr $l \n(.lu
|
||
|
.nr _L \n(.lu
|
||
|
.nr $c 1
|
||
|
.nr $f 1 1
|
||
|
.ds * \*{1\*}\k*
|
||
|
.nr $d 1 1
|
||
|
.ds # [1]\k#
|
||
|
.nr _M 1
|
||
|
.ds lq \(lq
|
||
|
.ds rq \(rq
|
||
|
.em @z
|
||
|
.ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
|
||
|
.ds #v 0.6m
|
||
|
.ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\(aa\h'|\\n_u'
|
||
|
.ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\(ga\h'|\\n_u'
|
||
|
.ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m)'\v'-\*(#v'\z.\h'0.2m'.\h'|\\n_u'\v'\*(#v'
|
||
|
.ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'^\h'|\\n_u'
|
||
|
.ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'~\h'|\\n_u'
|
||
|
.ds , \k_\h'-(\\n(.wu)',\h'|\\n_u'
|
||
|
.ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\s-4v\s0\v'\*(#v'\h'|\\n_u'
|
||
|
.ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\z\(de\v'0.4n'\h'|\\n_u'
|
||
|
.ds qe \s-2\v'0.45m'\z\(em\v'-0.625m'\z\(em\v'-0.625m'\(em\v'0.8m'\s0\h'-0.1m'\v'-0.05m'\(br\v'0.05m'\h'0.1m'
|
||
|
.ds qa \z\e\h'0.35m'\z\(sl\h'-0.33m'\v'-0.3m'\s-4\(em\s0\v'0.3m'\h'0.15m'
|
||
|
.rm #h #v
|
||
|
.ll 6.0i
|
||
|
.lt 6.0i
|
||
|
.de @U
|
||
|
.tm The \\$1 macro has been removed from this version of the -me macros.
|
||
|
..
|
||
|
.de lo
|
||
|
.@U lo
|
||
|
..
|
||
|
.de th
|
||
|
.@U th
|
||
|
..
|
||
|
.de ac
|
||
|
.@U ac
|
||
|
..
|