tmac.fa: call HD in fa.init
[neatroff_make.git] / tmac / tmac.scover
blob1e15883ef69adc7c5bed64457a7a06952ffddb40
1 .       \"OK - "other keywords" for cover sheet.
2 .de OK
3 .br
4 .di
5 .di OD
6 .nf
7 .ft 3
8 ..
9 .       \"CS - spew out cover sheet
10 .de CS
11 .br
12 .if \\n(AJ>0 .tm Abstract not finished, AE assumed.
13 .if \\n(AJ>0 .AE
14 .di
15 .if t .po 0.5i
16 .ft 2
17 .nr IB \\n(.b
18 .ft P
19 .nr K1 1
20 .if t .sp |.4i
21 .if t .lg
22 .ll 7.0i
23 .vs 12p
24 .nf
25 .if t \{
26 .if \\n(ZZ<1 \h'7n'\s24\(FA\s12\f3  Bell Laboratories             \s16\f1Cover Sheet for Technical Memorandum
27 .if \\n(ZZ>=1 \h'7n'\s24\(FA\s12\f3  Bell Laboratories             \s16\f1Cover Sheet for Technical Memorandum\}
28 .if n Bell Laboratories             Cover Sheet for Technical Memorandum
29 .if t .sp .5v
30 .if n .sp
31 .if t \s6\l'7i'
32 .fi
33 .ps 9
34 .ft 2
35 .if \\n(.$<=6 The information contained herein is for the use of employees of Bell Laboratories and is not for publication.  (See GEI 13.9-3)\p
36 .if \\n(.$>6 Warning: studying this document may cause drowsiness.  Do not read before driving or operating machinery.  (See GEI 13.9-3)\p
37 .ft 1
38 .nf
39 .if \\n(IB>0 .bd 2 \\n(IB
40 .vs 5p
41 .if t \s6\l'7i'
42 .vs
43 .if t .sp .5v
44 .if n .sp
45 .if t .ll 4.0i
46 .if n .ll 30
47 .if t .po 1.0i
48 .ps 9
49 .if t .ta 0.5i 4.5i 4.9i
50 .if n .ta 9 39 46
51 .mk
52 Title- \f3\s10
53 .rt
54 .if t .in 0.5i
55 .if n .in 10
56 .hy 0
57 .WT
58 .hy 14
59 .br
60 .rt
61 .ll \\n(LLu
62 .if t .in 4.5i
63 .if n .in 40
64 .nf
65 \s9\f1Date- \s10\f3
66 .rt
67 .if t .in 4.9i
68 .if n .in 47
69 \\*(DY
70 .sp
71 .if t .ti 4.5i
72 .if n .ti 40
73 .mk
74 \s9\f1TM- \f3\s10
75 .br
76 .rt
77 .CZ \\*(MN
78 .in 0
79 .if n .sp |\\n(.hu+1v
80 .if t .sp |\\n(.hu+.3v
81 .mk
82 \s9\f1Other Keywords- \f3
83 .rt
84 .if t .in 1.1i
85 .if n .in 20
86 .OD
87 .in 0
88 .if t .sp .3i
89 .if n .sp 3
90 .ps 9
91 .if t .ta 1.8i 3.3i 4.3i
92 .if n .ta 19 34 44
93 .ft 1
94 .mk
95 .fi
96 .ll 6.7i
97 .in 4.6i
98 .ti 0
99 .nr SJ \\n(.j
101 Author  Location        Extension       Charging Case- \s10\f3\\*(CA
102 .ps 10
103 .ti 4.3i
104 \f1\s9Filing Case- \s10\f3\\*(CC
106 .in 0
107 .ad \\n(SJ
109 .sp 1
110 .CB 1
111 .if \\n(NA-1 .CB 2
112 .if \\n(NA-2 .CB 3
113 .if \\n(NA-3 .CB 4
114 .if \\n(NA-4 .CB 5
115 .if \\n(NA-5 .CB 6
116 .if \\n(NA-6 .CB 7
117 .if \\n(NA-7 .CB 8
118 .if \\n(NA-8 .CB 9
119 .ft 1
120 .rm OK OD R1 E1 R2 E2 R3 E3 R4 E4 AB AE
121 .ds K1 \\$1
122 .ds K2 \\$2
123 .ds K3 \\$3
124 .ds K4 \\$4
125 .ds K5 \\$5
126 .ds K6 \\$6
127 .if t .wh 9.8i CG
128 .if n .wh 9i CG
129 .ch FO 16i
130 .if t .sp .4i
131 .if n .sp 2
132 .ls 1
133 .pn 2
135 .rm WB
138 .if 9.7i-\\n(nlu-\\n(FPu-1v>0 .sp 9.7i-\\n(nlu-\\n(FPu-1v
139 .if \\n(FP>0 .FA
141 .nr K1 0
142 .if \\n(GA=1 .nr GA 2
143 .if \\n(VS>40 .vs \\n(VSu
144 .if \\n(VS<=39 .vs \\n(VSp
145 .bp 1
146 .rm CG
147 .if t .po \\n(POu
149 .       \" CG - write bottom box on cover sheet
150 .de CG
151 .if t .po 0.5i
152 .vs 12p
153 .ch FO 12i
154 .ch FX 12i
155 .if t .ll 7i
157 .if t \l'7i'
158 .if t .ta 1.4i 2.8i 4.2i
159 .if n .ta 14 29 44
160 .if t .sp 8p
161 .if n .sp
162 Pages Text   \\*(K1     Other   \\*(K2  Total   \\*(K3
163 .if t .sp 8p
164 .if n .sp 
165 .if t .po .5i
166 .if t No. Figures   \\*(K4      No. Tables   \\*(K5     No. Refs.   \\*(K6      \b'|||||\ \ '
167 .if n No. Figures   \\*(K4      No. Tables   \\*(K5     No. Refs.   \\*(K6
169 .if t .po .5i
170 .if t \l'7i'
171 .ps 7
173 .if n .sp
174 .rm K1
175 .rm K2
176 .rm K3
177 .rm K4
178 .rm K5
179 .rm K6
180 .if t .po .5i
181 .if t .tl 'E-1932-U (6-73)'SEE REVERSE SIDE FOR DISTRIBUTION LIST''
182 .if n .tl 'E-1932-U (6-73)  SEE REVERSE SIDE FOR DISTRIBUTION LIST'''
183 .if t .po 0.5i
184 .ll \\n(LLu
185 .ps 10
186 .ch CG 12i
187 .if \\n(K1>0 .bp
189 .       \"CB - help with cover sheet
190 .de CB
193 .A\\$1
195 \&      \\*(R\\$1       \\*(E\\$1
198 .de CZ
200 .if !"\\$1"" \\$1
202 .if !"\\$2"" \\$2
204 .if !"\\$3"" \\$3
206 .if !"\\$4"" \\$4
208 .if !"\\$5"" \\$5
210 .if !"\\$6"" \\$6
212 .if !"\\$7"" \\$7
214 .if !"\\$8"" \\$8
216 .if !"\\$9"" \\$9
218 .       \"S1 - tm style 
219 .de S1
221 .if t .ta 4.25i
222 .if n .ta 43
223 .ll 80
224 .ps 36
226 .if t .vs .15i
227 .if t \{
228 .if \\n(ZZ<1 \t\s36\(FA\s0
229 .if \\n(ZZ>=1 \t\s36\(FA\s0\}
231 .if n .sp 24p
232 \s11\l'7i'\s0
233 .ps 10
235 .if \\n(IM=1 \f(HBBell Laboratories\fP
236 .ft 1
237 .nr SJ \\n(.j
240 .ps 8
241 .vs 12p
242 .sp 2v
245 .ll 4.0i
246 \fHsubject:\fP
247 .ft 3
250 .if n .in +9
251 .if t .in +\w'\fHsubject:\fP 'u
254 .hy 0
256 .hy 14
257 .ft 1
259 .in 0
260 .if !\\(IM .if \\n(MC>0 \\s8Case- \\*(CA\\s10
261 .if !\\(IM .if \\n(MG>0 --\s8 File- \\*(CC\\s10
264 .if n .ll 70
265 .if t .ll 6.5i
266 .if t .in 4.25i+6n
267 .if n .in 52
268 .ps 8
269 .ti -6n
270 .ta 6n
271 \fHdate:\fP\t\\s\\n(PS\\f3\\*(DY
273 .ft 1
274 .ps 8
276 .ti -6n
277 \fHfrom:\fP
282 .ft 3
284 .if \\n(NA>1 .A2
285 .if \\n(NA>2 .A3
286 .if \\n(NA>3 .A4
287 .if \\n(NA>4 .A5
288 .if \\n(NA>5 .A6
289 .if \\n(NA>6 .A7
290 .if \\n(NA>7 .A8
291 .if \\n(NA>8 .A9
292 .ft 1
295 .ps 8
296 .ti -6n
297 .ft 1
298 .if \\n(IM=0 .if \\n(MM .if "\\*(MQ"" \{\
299 .if \\n(MN=0 .ds MQ TM:
300 .if \\n(MN=1 .ds MQ MF:
301 .if \\n(MN=2 .ds MQ MR:
302 .if \\n(MN=3 .ds MQ EN:\}
303 \\*(MQ
305 .ti \\n(.iu
308 .ft 3
309 .hy 0
310 .ll 20i
311 .if t .ll 7.75i-\\n(.ou
314 .if \\n(MM .CZ \\*(MN
315 .hy 14
317 .ft 1
318 .ll \\n(LLu
320 .sp |\\n(.hu
321 .if \\n(IM=0 .sp
322 .ad \\n(SJ
324 .ft 2
325 .if \\n(IM=0 \\*(QF
326 .ft 1
327 .ce 0
328 .if \\n(IM=0 .sp