1 13f7391e 2004-05-15 devnull .\" REFER macros .... citations
6 13f7391e 2004-05-15 devnull .if \\$1>5 .tm Bad arg to []
9 13f7391e 2004-05-15 devnull .if n .ds [. [
10 13f7391e 2004-05-15 devnull .if t .ds [. \s-2\v'-.4m'\f1
11 13f7391e 2004-05-15 devnull .if n .ds .] ]
12 13f7391e 2004-05-15 devnull .if t .ds .] \v'.4m'\s+2\fP
13 13f7391e 2004-05-15 devnull .if n .ds [o ""
14 13f7391e 2004-05-15 devnull .if n .ds [c ""
15 13f7391e 2004-05-15 devnull .if t .ds [o ``
16 13f7391e 2004-05-15 devnull .if t .ds [c ''
17 13f7391e 2004-05-15 devnull .\" the next lines deal with the problem of .[1] or [1].
18 13f7391e 2004-05-15 devnull .\" refer will write "linexxx\*(<.[1]\*(>.
19 13f7391e 2004-05-15 devnull .\" and either "<." or ">." should produce the .;
20 13f7391e 2004-05-15 devnull .\" similarly for ,
21 13f7391e 2004-05-15 devnull .if n .ds >. .
22 13f7391e 2004-05-15 devnull .if t .ds <. .
23 13f7391e 2004-05-15 devnull .if n .ds >, ,
24 13f7391e 2004-05-15 devnull .if t .ds <, ,
25 13f7391e 2004-05-15 devnull .de [5 \" tm style
27 13f7391e 2004-05-15 devnull .IP "\\*([F.\0"
29 13f7391e 2004-05-15 devnull \\*([A, \\f2\\*([T\\f1,
30 13f7391e 2004-05-15 devnull .ie \\n(TN \\*([M.
31 13f7391e 2004-05-15 devnull .el Bell Laboratories internal memorandum (\\*([D).
35 13f7391e 2004-05-15 devnull .de [0 \" other
38 13f7391e 2004-05-15 devnull .if !"\\*([F"" .IP "\\*([F.\0"
39 13f7391e 2004-05-15 devnull .if !"\\*([A"" \{.nr [: 1
40 13f7391e 2004-05-15 devnull \\*([A\c\}
41 13f7391e 2004-05-15 devnull .if !"\\*([T"" \{.if \\n([:>0 ,
43 13f7391e 2004-05-15 devnull \\f2\\*([T\\f1\c\}
44 13f7391e 2004-05-15 devnull .if !"\\*([O""\{.if \\n([:>0 ,
46 13f7391e 2004-05-15 devnull .if \\n([O>0 .nr [: 0
48 13f7391e 2004-05-15 devnull .if \\n([O>0 \& \c\}
49 13f7391e 2004-05-15 devnull .if !"\\*([D"" \{.if \\n([:>0 ,
51 13f7391e 2004-05-15 devnull \\*([D\c\}
52 13f7391e 2004-05-15 devnull .if \\n([:>0 \&.
53 13f7391e 2004-05-15 devnull .if !"\\*([%"" Cited p. \\*([%.
57 13f7391e 2004-05-15 devnull .de [1 \" journal article
58 13f7391e 2004-05-15 devnull .nr %T 1 \" title font
60 13f7391e 2004-05-15 devnull .if !"\\*([R"" .rm [C
61 13f7391e 2004-05-15 devnull .if !"\\*([F"" .IP "\\*([F.\0"
62 13f7391e 2004-05-15 devnull .if !"\\*([A"" \\*([A,
63 13f7391e 2004-05-15 devnull .if !"\\*([T"" \\*([o\\*([T,\\*([c
64 13f7391e 2004-05-15 devnull \\f2\\*([J\\f1\c
65 13f7391e 2004-05-15 devnull .if !"\\*([C"" , \\*([C\c
66 13f7391e 2004-05-15 devnull .if !"\\*([V"" .if n ,\& Vol.\&\c
67 13f7391e 2004-05-15 devnull .if !"\\*([V"" \& \\f3\\*([V\\f1\c
68 13f7391e 2004-05-15 devnull .if !"\\*([N"" (\\*([N)\c
69 13f7391e 2004-05-15 devnull .if !"\\*([P"" \{\
70 13f7391e 2004-05-15 devnull .ie \\n([P>0 , pp.\ \&\c
71 13f7391e 2004-05-15 devnull .el , p.\ \&\c
72 13f7391e 2004-05-15 devnull \\*([P\c\}
73 13f7391e 2004-05-15 devnull .if !"\\*([I"" .if "\\*([R"" , \\*([I\c
74 13f7391e 2004-05-15 devnull .if !"\\*([O"" .if \\n([O=0 , \\*([O\c
75 13f7391e 2004-05-15 devnull .if !"\\*([D"" \& (\\*([D)\c
77 13f7391e 2004-05-15 devnull .if !"\\*([O"" .if \\n([O>0 \\*([O
78 13f7391e 2004-05-15 devnull .if !"\\*([%"" Cited p. \\*([%.
82 13f7391e 2004-05-15 devnull .de [2 \" book
85 13f7391e 2004-05-15 devnull .if !"\\*([F"" .IP "\\*([F.\0"
86 13f7391e 2004-05-15 devnull .if !"\\*([A"" \\*([A,
87 13f7391e 2004-05-15 devnull .if !"\\*([T"" \\f2\\*([T,\\f1
89 13f7391e 2004-05-15 devnull .if !"\\*([C"" , \\*([C\c
90 13f7391e 2004-05-15 devnull .if !"\\*([D"" \& (\\*([D)\c
92 13f7391e 2004-05-15 devnull .if !"\\*([G"" Gov't. ordering no. \\*([G.
93 13f7391e 2004-05-15 devnull .if !"\\*([O"" \\*([O
94 13f7391e 2004-05-15 devnull .if !"\\*([%"" Cited p. \\*([%.
98 13f7391e 2004-05-15 devnull .de [4 \" report
100 13f7391e 2004-05-15 devnull .if !"\\*([F"" .IP "\\*([F.\0"
101 13f7391e 2004-05-15 devnull .nr %T 1
102 13f7391e 2004-05-15 devnull \\*([A, \\*([o\\*([T,\\*([c
103 13f7391e 2004-05-15 devnull \\*([R\c
104 13f7391e 2004-05-15 devnull .if !"\\*([G"" \& (\\*([G)\c
105 13f7391e 2004-05-15 devnull .if !"\\*([I"" , \\*([I\c
106 13f7391e 2004-05-15 devnull .if !"\\*([C"" , \\*([C\c
107 13f7391e 2004-05-15 devnull .if !"\\*([D"" \& (\\*([D)\c
109 13f7391e 2004-05-15 devnull .if !"\\*([O"" \\*([O
110 13f7391e 2004-05-15 devnull .if !"\\*([%"" Cited p. \\*([%.
114 13f7391e 2004-05-15 devnull .de [3 \" article in book
116 13f7391e 2004-05-15 devnull .nr %T 1
117 13f7391e 2004-05-15 devnull .if !"\\*([F"" .IP "\\*([F.\0"
118 13f7391e 2004-05-15 devnull .if !"\\*([A"" \\*([A,
119 13f7391e 2004-05-15 devnull .if !"\\*([T"" \\*([o\\*([T,\\*([c
120 13f7391e 2004-05-15 devnull .if !"\\*([P"" pp. \\*([P
121 13f7391e 2004-05-15 devnull in \\f2\\*([B\\f1\c
122 13f7391e 2004-05-15 devnull .if !"\\*([E"" , ed. \\*([E\c
123 13f7391e 2004-05-15 devnull .if !"\\*([I"" , \\*([I\c
124 13f7391e 2004-05-15 devnull .if !"\\*([C"" , \\*([C\c
125 13f7391e 2004-05-15 devnull .if !"\\*([D"" \& (\\*([D)\c
127 13f7391e 2004-05-15 devnull .if !"\\*([O"" \\*([O
128 13f7391e 2004-05-15 devnull .if !"\\*([%"" Cited p. \\*([%.
137 13f7391e 2004-05-15 devnull .rm FS FE
149 13f7391e 2004-05-15 devnull .rm [V [P [A [T
150 13f7391e 2004-05-15 devnull .rm [N [C [B [O
151 13f7391e 2004-05-15 devnull .rm [R [I [E [D
152 13f7391e 2004-05-15 devnull .rm [G [%
155 13f7391e 2004-05-15 devnull .\"this is never executed and just uses up an end-of-file bug.