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