![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tmac.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [MW Coherent from dump] / coherent / c / usr / lib|
Return to tmac.s CVS log | Up to [MW Coherent from dump] / coherent / c / usr / lib |
1.1 root 1: .de It \" Done at initialization
2: .po 1i
3: .wh 0 Hd
4: .nr Ft 0-\\n(FM
5: .wh -\\n(FMu Fo
6: .wh -\\n(FMu Fx
7: .nr Ps \\n(PS
8: .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n 70n 75n 80n 85n 90n
9: .ds Xx **GOK**
10: .if \n(mo=1 .ds Xx January
11: .if \n(mo=2 .ds Xx February
12: .if \n(mo=3 .ds Xx March
13: .if \n(mo=4 .ds Xx April
14: .if \n(mo=5 .ds Xx May
15: .if \n(mo=6 .ds Xx June
16: .if \n(mo=7 .ds Xx July
17: .if \n(mo=8 .ds Xx August
18: .if \n(mo=9 .ds Xx September
19: .if \n(mo=10 .ds Xx October
20: .if \n(mo=11 .ds Xx November
21: .if \n(mo=12 .ds Xx December
22: .ds Ds "\\*(Xx \\n(dy, 19\\n(yr"
23: ..
24: .de Rt \" Reset everything to normal state
25: .ce 0
26: .if \\n(Di \{\
27: .di
28: .nr Di 0
29: .nf
30: .Tl
31: . \}
32: .fi
33: .ps \\n(Ps
34: .vs \\n(VSu
35: .ft R
36: .if \\n(Il \{\
37: .nr Il 0
38: .in -\\n(Iku
39: . \}
40: .if \\n(Qn \{\
41: .nr Qn -1
42: .in -\\n(Qdu
43: .ll +\\n(Qdu
44: . \}
45: ..
46: .de Hd \" Header trap
47: 'nr PN \\n%
48: 'sp \\n(HMu/2u-1v
49: 'ft R
50: 'PT
51: 'ft P
52: 'sp \\n(HMu/2u
53: 'if \\n(Kf \{\
54: 'nr Kf 0
55: 'ev 1
56: 'nf
57: 'Kd
58: 'rm Kd
59: 'ev
60: . \}
61: .nr Fn 0 \" Clear footnote count
62: .ch Fo -\\n(FMu
63: .if \\n(Fh .Fv \" And put out overflow
64: ..
65: .de Fo \" Footer trap
66: .nr dn 0
67: .if \\n(Fn \{\
68: .ev 1
69: .nf
70: .Fn
71: .rm Fn
72: .if "\\n(.z"Fe" .di
73: .di
74: .nr Fn 0
75: .ev
76: .if \\n(dn .nr Fh 1
77: . \}
78: 'sp \\n(FMu/2u
79: 'ft R
80: 'BT
81: 'ft P
82: 'bp
83: ..
84: .de CD \" Centred display
85: .ce 10000
86: ..
87: .de LD \" Left display
88: .nf
89: ..
90: .de ID \" Indented display
91: .in +.5i
92: .nf
93: .nr Bi 1
94: ..
95: .de BD \" Block centred display
96: .nr Bd 1
97: .nf
98: ..
99: .de PP \" Start new paragraph
100: .Rt
101: .sp \\n(PDu
102: .ne 5
103: .ti \\n(PIu
104: ..
105: .de LP \" Left paragraph
106: .Rt
107: .ne 5
108: .sp
109: ..
110: .de IP
111: .LP
112: .if \\n(.$>1 .nr Ik \\$2n
113: .nr Il 1
114: .in +\\n(Iku
115: .ti -\\n(Iku
116: \\$1\h'\\n(Iku-\\w`\\$1`u'\\c
117: ..
118: .de QS \" Start quoted paragraph
119: .sp
120: .ft R
121: .in +\\n(PIu
122: .ll -\\n(PIu*2u
123: ..
124: .de QP \" Quoted paragraph
125: .PP
126: .nr Qn 1
127: ..
128: .de QE \" End quoted paragraph
129: .sp
130: .ft P
131: .in -\\n(PIu
132: .ll +\\n(PIu*2u
133: ..
134: .de RS \" Start relative indent
135: .in +\\n(Iku
136: ..
137: .de RE \" End relative indent
138: .in -\\n(Iku
139: ..
140: . \" Title page and headings
141: .de TL \" Main title
142: .nr Di 1 \" Diverted
143: .di Tl
144: .sp
145: .ce 1000
146: .ps \\n(PS+2
147: .ft B
148: ..
149: .de AU \" Author
150: .if !\\n(Di .da Tl
151: .nr Di 1
152: .sp
153: .ce 1000
154: .ps \\n(PS
155: .ft R
156: ..
157: .de AI \" Author's institution
158: .if !\\n(Di .da Tl
159: .nr Di 1
160: .sp
161: .ce 1000
162: .ps \\n(PS
163: .ft R
164: ..
165: .de AB \" Begin abstract
166: .if \\n(Di \{\
167: .sp
168: .ce 0
169: .ps \\n(PS
170: .ft R
171: .di
172: .nf
173: .Tl
174: .fi
175: .nr Di 0
176: . \}
177: .sp
178: .ce
179: \fIABSTRACT\fP
180: .ll -.5i
181: .in +.5i
182: ..
183: .de AE \" End abstract
184: .ll +.5i
185: .in -.5i
186: .sp .5i
187: .ce 1000
188: \\*(Ds
189: .ce 0
190: .sp .5i
191: .sp
192: ..
193: .de ND \" New (or No) Date
194: .ds Ds \\$1
195: ..
196: .de DA \" Supply date
197: .ds Ds \\$1
198: ..
199: .de SH \" Sub-heading
200: .Rt
201: .sp
202: .ft B
203: ..
204: .de NH \" Numbered section heading
205: .Rt
206: .sp
207: .ft B
208: .nr Xx 1
209: .if \\n(.$>0 .nr Xx \\$1
210: .if \\n(Xx<5 .nr @5 0
211: .if \\n(Xx<4 .nr @4 0
212: .if \\n(Xx<3 .nr @3 0
213: .if \\n(Xx<2 .nr @2 0
214: .if \\n(Xx<1 .nr @1 0
215: .if \\n(Xx=0 .nr Xx 1
216: .if \\n(Xx>5 .tm NH level too large
217: .nr @\\n(Xx +1
218: .ds Yy \\n(@1
219: .if \\n(Xx=1 .as Yy .
220: .if \\n(Xx>1 .as Yy .\\n(@2
221: .if \\n(Xx>2 .as Yy .\\n(@3
222: .if \\n(Xx>3 .as Yy .\\n(@4
223: .if \\n(Xx>4 .as Yy .\\n(@5
224: \\*(Yy
225: ..
226: .de PT \" Page title
227: 'tl '\\*(LT'\\*(CT'\\*(RT'
228: ..
229: .de BT \" Bottom title
230: 'tl '\\*(LF'\\*(CF'\\*(RF'
231: ..
232: . \" Sizes and fonts
233: .de NL \" Normal size
234: .if \\n(.$>0 \s\\n(Ps\\$1\s0
235: .if \\n(.$=0 .nr Ps \\n(Ps
236: ..
237: .de SM \" Smaller size
238: .if \\n(.$>0 \s-2\\$1\s0
239: .if \\n(.$=0 .nr Ps \\n(Ps-2
240: ..
241: .de LG \" Larger size
242: .if \\n(.$>0 \s+2\\$1\s0
243: .if \\n(.$=0 .nr Ps \\n(Ps+2
244: ..
245: .de UL \" Underline
246: \\$1\l'|0\(ul'
247: ..
248: .de B \" Bold face font
249: .if \\n(.$>0 \\fB\\$1\\fP
250: .if \\n(.$=0 .ft B
251: ..
252: .de I \" Italic font
253: .if \\n(.$>0 \\fI\\$1\\fP
254: .if \\n(.$=0 .ft I
255: ..
256: .de R \" Roman font
257: .if \\n(.$>0 \\fR\\$1\\fP
258: .if \\n(.$=0 .ft R
259: ..
260: .de BX \" Draw a box
261: \(br\|\\$1\|\(br\l'|0\(rn'\l'|0\(ul'
262: ..
263: .de DS \" Display start
264: .if \\n(.$=0 .ds Xx LD
265: .if \\n(.$>0 .ds Xx \\$1D
266: .KS
267: .\\*(Xx
268: ..
269: .de DE \" Display end
270: .ce 0
271: .nr Xx 0u
272: .if \\n(Bi \{\
273: .nr Xx -.5i
274: .nr Bi 0
275: . \}
276: .if \\n(Bd \{\
277: .nr Bd 0
278: .di
279: .nr Xx (\\n(.lu-\\n(dlu)/2u
280: .in +\\n(Xxu
281: .da Kd
282: . \}
283: .KE
284: .in -\\n(Xxu
285: ..
286: .de KS \" Start keep
287: .nr Kf 0
288: .Ks
289: ..
290: .de KF \" Start floating keep
291: .nr Kf 1
292: .Ks
293: ..
294: .de Ks \" Internal version of KS/KF
295: .br
296: .ev 1
297: .fi
298: .da Kd
299: ..
300: .de KE \" End keep
301: .br
302: .di
303: .if !\\n(Kf \{\
304: .if \\n(dn>=\\n(.t .bp
305: .nf
306: .Kd
307: .rm Kd
308: . \}
309: .ev
310: ..
311: .de TS \" Table start
312: .tm No tables yet.
313: ..
314: .de TE \" Table end
315: ..
316: .de EQ \" Equation
317: .tm No equations yet.
318: ..
319: . \" Footnotes
320: .de FS \" Footnote start
321: .da Fn
322: .ev 1
323: .ll \\n(FLu
324: .if \\n+(Fn=1 .Fs
325: .fi
326: ..
327: .de FE \" Footnote end
328: .br
329: .nr Fv \\n(.v
330: .ev
331: .di
332: .nr Ft -\\n(dn
333: .if \\n(Fn=1 .nr Ft -(\\n(.v-\\n(Fv)
334: .ch Fo \\n(Ftu
335: .if (\\n(nl+1v)>(\\n(.p+\\n(Ft) .ch Fo \\n(nlu+1v
336: ..
337: .de Fs \" Put out separator
338: \l'1i'
339: .br
340: ..
341: .de Fv \" Catch footnote overflow
342: .nr Fv 0
343: .FS
344: .nf
345: .Fe
346: .FE
347: ..
348: .de Fx \" Divert extra stuff
349: .if \\n(Fn .di Fe
350: ..
351: .de TA \" Set tabs in ens
352: .ta \\$1n \\$2n \\$3n \\$4n \\$5n \\$6n \\$7n \\$8n \\$9n
353: ..
354: .nr PS 10u \" Default pointsize
355: .nr VS 12p \" Vertical spacing
356: .nr LL 6i \" Line length
357: .nr LT 6i \" Length of title
358: .nr PD \n(VSu*3/10 \" Paragraph spacing
359: .nr PD 1v
360: .if \n(PDu<\n(.V .nr PD \n(.V
361: .nr PI 5n \" Paragraph indent
362: .nr FL 11u*\n(LLu/12u \" Footnote length
363: .nr CW 7u*\n(LLu/15u \" Column width
364: .nr GW \n(LLu/15u \" Gutter width
365: .nr PO 26i/27i \" Page offset
366: .nr HM 1i \" Top margin
367: .nr FM 1i \" Bottom margin
368: .nr Qd \n(PI \" Quoted indent difference
369: .nr Ik 5n \" .IP default indent
370: .nr Fn 0 1 \" Footnote count
371: .ds CF "- \\n(PN -"
372: .ds - \(mi
373: .ds ' \z\(aa
374: .ds ` \z\(ga
375: .ds : \z\(:
376: .ds ^ \z^
377: .ds ~ \z~
378: .ds C \z^
379: .ds , \z,
380: .It
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.