|
|
1.1 root 1: . \"DS - display. If .DS C, center; L, left-adjust; I, indent.
2: .de DS
3: .KS
4: .nf
5: .\\$1D \\$2 \\$1
6: .ft 1
7: .ps \\n(PS
8: .if \\n(VS>40 .vs \\n(VSu
9: .if \\n(VS<=39 .vs \\n(VSp
10: ..
11: .de D
12: .ID \\$1
13: ..
14: .de CD
15: .XD
16: .ce 1000
17: ..
18: .de ID
19: .XD
20: .if t .in +0.5i
21: .if n .in +8
22: .if \\n(.$ .if !"\\$1"I" .if !"\\$1"" .in \\n(OIu
23: .if \\n(.$ .if !"\\$1"I" .if !"\\$1"" .in +\\$1n
24: ..
25: .de LD
26: .XD
27: ..
28: .de XD
29: .nf
30: .nr OI \\n(.i
31: .sp \\n(DVu
32: ..
33: .de BD \" block display: save everything, then center it.
34: .XD
35: .nr BD 1
36: .nf
37: .in \\n(OIu
38: .di DD
39: ..
40: . \"DE - display end
41: .de DE
42: .ce 0
43: .if \\n(BD>0 .DF
44: .nr BD 0
45: .in \\n(OIu
46: .KE
47: .sp \\n(DVu
48: .fi
49: ..
50: .de DF \" finish a block display to be recentered.
51: .di
52: .if \\n(dl>\\n(BD .nr BD \\n(dl
53: .if \\n(BD<\\n(.l .in (\\n(.lu-\\n(BDu)/2u
54: .nr EI \\n(.l-\\n(.i
55: .ta \\n(EIuR
56: .nf
57: .DD
58: .in \\n(OIu
59: ..
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.