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