Commit | Line | Data |
---|---|---|
84f25a89 EA |
1 | .nr _0 \n(c. |
2 | .de sh \" *** section heading | |
3 | .if (\\n(si>0)&(\\n(si<1n) \ | |
4 | . nr si \\n(sin | |
5 | .ce 0 | |
6 | .@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 | |
7 | .if !"\\$2"_" \ | |
8 | \{\ | |
9 | . ds |x \&\\$2 | |
10 | . $p "\\*(|x" "\\*($n" \\n($0 | |
11 | . $0 "\\*(|x" "\\*($n" \\n($0 | |
12 | . rm |x | |
13 | .\} | |
14 | .nr $p 0 1 \" reset .np count | |
15 | .. | |
16 | .de @d \" --- change section depth | |
17 | .if !""\\$1" \ | |
18 | . nr $0 \\$1 | |
19 | .if \\n($0&(\\n(.$>1) \ | |
20 | . nr $\\n($0 \\$2 | |
21 | .ds $n \&\" | |
22 | .ie \\n($0>=1 \ | |
23 | \{\ | |
24 | . if \\n($1=0 \ | |
25 | . nr $1 1 | |
26 | . if (\\n(.$>=3) .if !"\\$3"-" \ | |
27 | . nr $1 \\$3 | |
28 | . as $n \\n($1 | |
29 | .\} | |
30 | .el \ | |
31 | . nr $1 0 | |
32 | .ie \\n($0>=2 \ | |
33 | \{\ | |
34 | . if \\n($2=0 \ | |
35 | . nr $2 1 | |
36 | . if (\\n(.$>=4) .if !"\\$4"-" \ | |
37 | . nr $2 \\$4 | |
38 | . as $n .\\n($2 | |
39 | .\} | |
40 | .el \ | |
41 | . nr $2 0 | |
42 | .ie \\n($0>=3 \ | |
43 | \{\ | |
44 | . if \\n($3=0 \ | |
45 | . nr $3 1 | |
46 | . if (\\n(.$>=5) .if !"\\$5"-" \ | |
47 | . nr $3 \\$5 | |
48 | . as $n .\\n($3 | |
49 | .\} | |
50 | .el \ | |
51 | . nr $3 0 | |
52 | .ie \\n($0>=4 \ | |
53 | \{\ | |
54 | . if \\n($4=0 \ | |
55 | . nr $4 1 | |
56 | . if (\\n(.$>=6) .if !"\\$6"-" \ | |
57 | . nr $4 \\$6 | |
58 | . as $n .\\n($4 | |
59 | .\} | |
60 | .el \ | |
61 | . nr $4 0 | |
62 | .ie \\n($0>=5 \ | |
63 | \{\ | |
64 | . if \\n($5=0 \ | |
65 | . nr $5 1 | |
66 | . if (\\n(.$>=7) .if !"\\$7"-" \ | |
67 | . nr $5 \\$7 | |
68 | . as $n .\\n($5 | |
69 | .\} | |
70 | .el \ | |
71 | . nr $5 0 | |
72 | .ie \\n($0>=6 \ | |
73 | \{\ | |
74 | . if \\n($6=0 \ | |
75 | . nr $6 1 | |
76 | . if (\\n(.$>=8) .if !"\\$8"-" \ | |
77 | . nr $6 \\$8 | |
78 | . as $n .\\n($6 | |
79 | .\} | |
80 | .el \ | |
81 | . nr $6 0 | |
82 | .. | |
83 | .de sx \" *** heading up, no increment (2.1.1 -> 2.1) | |
84 | .ce 0 | |
85 | .ul 0 | |
86 | .nr _0 \\n($0-1 | |
87 | .if \\n(.$ .nr _0 +1 | |
88 | .if \\n(.$ .nr _0 \\$1 | |
89 | .@d \\n(_0 | |
90 | .rr _0 | |
91 | .$p "" "" \\n($0 | |
92 | .nr $p 0 1 \" reset .np count | |
93 | .. | |
94 | .de uh \" *** unnumbered section heading | |
95 | .$p "\\$1" | |
96 | .$0 "\\$1" | |
97 | .. | |
98 | .if \n(sf<=0 \ | |
99 | . nr sf 8 \" section font -- Times Bold | |
100 | .if \n(sp<=0 \ | |
101 | . nr sp 10 \" section title pointsize | |
102 | .if \n(ss<=0 \ | |
103 | . nr ss 12p \" section prespacing | |
104 | .if \n(si<=0 \ | |
105 | . nr si 0 \" section indent | |
106 | .nr c. \n(_0 |