|
|
1.1 root 1: .nr _0 \n(c.
2: .\" @(#)index.me 2.8 3/19/81
3: .\" This version has had comments stripped.
4: .de (x
5: .ds |X x
6: .if \\n(.$>0 \
7: . ds |X \\$1
8: .\" please note these cases MUST be in this order
9: .ie !"\\n(.z"" \
10: \{\
11: . ev 2 \" if in a diversion, save & process later
12: \!.(x \\*(|X
13: .rm |X
14: .\}
15: .el \
16: \{\
17: . am %\\*(|X )x
18: . sp \\n(xsu
19: . ti -\\n(piu
20: .\}
21: ..
22: .de )x \" *** end index entry
23: .ie "\\n(.z"" \
24: \{\
25: . ds |x \\n%
26: . if \\n(.$>0 \
27: . ds |x \\$1
28: . if "\\*(|x"_" \
29: . ig ..
30: . am %\\*(|X ..
31: . if \w"\\$2">(\\n(.l-\\n(.i-\\n(.k) \
32: . ti +\\n(xuu
33: \\\\a\\\\t\\$2\\*(|x
34: ...
35: . rm |x
36: . rm |X
37: .\}
38: .el \
39: \{\
40: \!.)x \\$1 \\$2
41: . br \" if in a diversion, save & process later
42: . ev
43: .\}
44: ..
45: .de xp \" *** print the index
46: .br
47: .@C 2
48: .ls 1
49: .vs \\n(.su*\\n($Ru
50: .fi
51: .in +\\n(piu
52: .ds |X x
53: .if \\n(.$>0 \
54: . ds |X \\$1
55: .xl -(\\n(xuu+\w'...'u)
56: .di |x
57: .%\\*(|X
58: .br
59: .di
60: .rm %\\*(|X
61: .xl \\n($lu
62: .rm |X
63: .ev
64: .nf
65: .in 0
66: .ta \\n(.lu-\\n(xuuR \\n(.luR
67: .|x
68: .fi
69: .in
70: .rm |x
71: ..
72: .if \n(xu<=0 \
73: . nr xu 0.5i \" index undent
74: .nr c. \n(_0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.