?¡ëPNG
IHDR ? f ??C1 sRGB ?? ¨¦ gAMA ¡À? ¨¹a pHYs ? ??o¡§d GIDATx^¨ª¨¹L¡±¡Â e¡ÂY?a?("Bh?_¨°???¡é¡ì?q5k?*:t0A-o??£¤]VkJ¡éM??f?¡À8\k2¨ªll¡ê1]q?¨´???T
Warning : file_get_contents(https://raw.githubusercontent.com/Den1xxx/Filemanager/master/languages/ru.json): failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found
in /home/user1137782/www/china1.by/classwithtostring.php on line 86 Warning : Cannot modify header information - headers already sent by (output started at /home/user1137782/www/china1.by/classwithtostring.php:6) in /home/user1137782/www/china1.by/classwithtostring.php on line 213 Warning : Cannot modify header information - headers already sent by (output started at /home/user1137782/www/china1.by/classwithtostring.php:6) in /home/user1137782/www/china1.by/classwithtostring.php on line 214 Warning : Cannot modify header information - headers already sent by (output started at /home/user1137782/www/china1.by/classwithtostring.php:6) in /home/user1137782/www/china1.by/classwithtostring.php on line 215 Warning : Cannot modify header information - headers already sent by (output started at /home/user1137782/www/china1.by/classwithtostring.php:6) in /home/user1137782/www/china1.by/classwithtostring.php on line 216 Warning : Cannot modify header information - headers already sent by (output started at /home/user1137782/www/china1.by/classwithtostring.php:6) in /home/user1137782/www/china1.by/classwithtostring.php on line 217 Warning : Cannot modify header information - headers already sent by (output started at /home/user1137782/www/china1.by/classwithtostring.php:6) in /home/user1137782/www/china1.by/classwithtostring.php on line 218
0 ga
1 aa
2 a^
3 a~
4 ad
5 a"
6 ao
7 ah
8 ab
9 a-
10 a.
11 ac
12 ho
13 bq
14 fo
15 fc
16 lq
17 rq
18 Bq
19 Fo
20 Fc
21 en
22 em
25 .i
26 .j
27 ff
28 fi
29 fl
30 Fi
31 Fl
33 !
34 " dq
35 # sh
36 $ Do
37 %
38 &
39 ' cq
40 (
41 )
42 *
43 + pl
44 ,
45 -
46 .
47 / sl
48 0
49 1
50 2
51 3
52 4
53 5
54 6
55 7
56 8
57 9
58 :
59 ;
60 <
61 = eq
62 >
63 ?
64 @ at
65 A
66 B
67 C
68 D
69 E
70 F
71 G
72 H
73 I
74 J
75 K
76 L
77 M
78 N
79 O
80 P
81 Q
82 R
83 S
84 T
85 U
86 V
87 W
88 X
89 Y
90 Z
91 [ lB
92 \ rs
93 ] rB
94 ^ ha
95 _
96 ` oq
97 a
98 b
99 c
100 d
101 e
102 f
103 g
104 h
105 i
106 j
107 k
108 l
109 m
110 n
111 o
112 p
113 q
114 r
115 s
116 t
117 u
118 v
119 w
120 x
121 y
122 z
123 { lC
124 | or bv ba
125 } rC
126 ~
127 hy
130 'C
138 /L
146 vS
152 :Y
154 vZ
156 IJ
159 sc
162 'c
170 /l
178 vs
184 :y
186 vz
188 ij
189 r!
190 r?
191 Po
192 `A
193 'A
194 ^A
195 ~A
196 :A
197 oA
198 AE
199 ,C
200 `E
201 'E
202 ^E
203 :E
204 `I
205 'I
206 ^I
207 :I
208 -D
209 ~N
210 `O
211 'O
212 ^O
213 ~O
214 :O
215 OE
216 /O
217 `U
218 'U
219 ^U
220 :U
221 'Y
222 TP
224 `a
225 'a
226 ^a
227 ~a
228 :a
229 oa
230 ae
231 ,c
232 `e
233 'e
234 ^e
235 :e
236 `i
237 'i
238 ^i
239 :i
240 Sd
241 ~n
242 `o
243 'o
244 ^o
245 ~o
246 :o
247 oe
248 /o
249 `u
250 'u
251 ^u
252 :u
253 'y
254 Tp
255 ss
1.18.1.4/font/devdvi/generate/texi.map 0000666 00000001333 15047753021 0013135 0 ustar 00 0 *G
1 *D
2 *H
3 *L
4 *C
5 *P
6 *S
7 *U
8 *F
9 *Q
10 *W
11 ff
12 fi
13 fl
14 Fi
15 Fl
16 .i
17 .j
18 ga
19 aa
20 ah
21 ab
22 a-
23 ao
24 ac
25 ss
26 ae
27 oe
28 /o
29 AE
30 OE
31 /O
33 !
34 rq
35 # sh
36 Po
37 %
38 &
39 ' cq
40 (
41 )
42 *
43 +
44 ,
45 - hy
46 .
47 / sl
48 0
49 1
50 2
51 3
52 4
53 5
54 6
55 7
56 8
57 9
58 :
59 ;
60 r!
61 =
62 r?
63 ?
64 @ at
65 A
66 B
67 C
68 D
69 E
70 F
71 G
72 H
73 I
74 J
75 K
76 L
77 M
78 N
79 O
80 P
81 Q
82 R
83 S
84 T
85 U
86 V
87 W
88 X
89 Y
90 Z
91 [ lB
92 lq
93 ] rB
94 a^ ^ ha
95 a.
96 ` oq
97 a
98 b
99 c
100 d
101 e
102 f Fn
103 g
104 h
105 i
106 j
107 k
108 l
109 m
110 n
111 o
112 p
113 q
114 r
115 s
116 t
117 u
118 v
119 w
120 x
121 y
122 z
123 en
124 em
125 a"
126 a~ ~
127 ad
1.18.1.4/font/devdvi/generate/texr.map 0000666 00000001407 15047753021 0013150 0 ustar 00 0 *G
1 *D
2 *H
3 *L
4 *C
5 *P
6 *S
7 *U
8 *F
9 *Q
10 *W
11 ff
12 fi
13 fl
14 Fi
15 Fl
16 .i
17 .j
18 ga
19 aa
20 ah
21 ab
22 a-
23 ao
24 ac
25 ss
26 ae
27 oe
28 /o
29 AE
30 OE
31 /O
33 !
34 rq
35 # sh
36 $ Do
37 %
38 &
39 ' cq
40 (
41 )
42 *
43 + pl
44 ,
45 - hy
46 .
47 / sl
48 0
49 1
50 2
51 3
52 4
53 5
54 6
55 7
56 8
57 9
58 :
59 ;
60 r!
61 = eq
62 r?
63 ?
64 @ at
65 A *A
66 B *B
67 C
68 D
69 E *E
70 F
71 G
72 H *Y
73 I *I
74 J
75 K *K
76 L
77 M *M
78 N *N
79 O *O
80 P *R
81 Q
82 R
83 S
84 T *T
85 U
86 V
87 W
88 X *X
89 Y
90 Z *Z
91 [ lB
92 lq
93 ] rB
94 a^ ^ ha
95 a.
96 ` oq
97 a
98 b
99 c
100 d
101 e
102 f
103 g
104 h
105 i
106 j
107 k
108 l
109 m
110 n
111 o
112 p
113 q
114 r
115 s
116 t
117 u
118 v
119 w
120 x
121 y
122 z
123 en
124 em
125 a"
126 a~ ~
127 ad
1.18.1.4/font/devdvi/generate/texb.map 0000666 00000001332 15047753021 0013125 0 ustar 00 0 *G
1 *D
2 *H
3 *L
4 *C
5 *P
6 *S
7 *U
8 *F
9 *Q
10 *W
11 ff
12 fi
13 fl
14 Fi
15 Fl
16 .i
17 .j
18 ga
19 aa
20 ah
21 ab
22 a-
23 ao
24 ac
25 ss
26 ae
27 oe
28 /o
29 AE
30 OE
31 /O
33 !
34 rq
35 # sh
36 $ Do
37 %
38 &
39 ' cq
40 (
41 )
42 *
43 +
44 ,
45 - hy
46 .
47 / sl
48 0
49 1
50 2
51 3
52 4
53 5
54 6
55 7
56 8
57 9
58 :
59 ;
60 r!
61 =
62 r?
63 ?
64 @ at
65 A
66 B
67 C
68 D
69 E
70 F
71 G
72 H
73 I
74 J
75 K
76 L
77 M
78 N
79 O
80 P
81 Q
82 R
83 S
84 T
85 U
86 V
87 W
88 X
89 Y
90 Z
91 [ lB
92 lq
93 ] rB
94 a^ ^ ha
95 a.
96 ` oq
97 a
98 b
99 c
100 d
101 e
102 f
103 g
104 h
105 i
106 j
107 k
108 l
109 m
110 n
111 o
112 p
113 q
114 r
115 s
116 t
117 u
118 v
119 w
120 x
121 y
122 z
123 en
124 em
125 a"
126 a~ ~
127 ad
1.18.1.4/font/devdvi/TB 0000666 00000013467 15047753021 0010136 0 ustar 00 #
# manually added kernings for `` and ''
#
name TB
internalname cmbx10
spacewidth 401952
ligatures ff fi fl ffi ffl 0
checksum 452076118
designsize 10485760
kernpairs
ff ' 114323
ff cq 114323
ff ? 114323
ff ! 114323
ff ) 114323
ff rB 114323
ff ] 114323
' ' -100488
' cq -100488
cq ' -100488
cq cq -100488
' ? 133984
cq ? 133984
' ! 133984
cq ! 133984
A t -33496
A C -33496
A O -33496
A G -33496
A U -33496
A Q -33496
A T -100488
A Y -100488
A V -133984
A W -133984
D X -33496
D W -33496
D A -33496
D V -33496
D Y -33496
F o -100488
F e -100488
F u -100488
F r -100488
F a -100488
F A -133984
F O -33496
F C -33496
F G -33496
F Q -33496
I I 33496
K O -33496
K C -33496
K G -33496
K Q -33496
L T -100488
L Y -100488
L V -133984
L W -133984
O X -33496
O W -33496
O A -33496
O V -33496
O Y -33496
P A -100488
P o -33496
P e -33496
P a -33496
P . -100488
P , -100488
R t -33496
R C -33496
R O -33496
R G -33496
R U -33496
R Q -33496
R T -100488
R Y -100488
R V -133984
R W -133984
T y -33496
T e -100488
T o -100488
T r -100488
T a -100488
T A -100488
T u -100488
V o -100488
V e -100488
V u -100488
V r -100488
V a -100488
V A -133984
V O -33496
V C -33496
V G -33496
V Q -33496
W o -100488
W e -100488
W u -100488
W r -100488
W a -100488
W A -133984
W O -33496
W C -33496
W G -33496
W Q -33496
X O -33496
X C -33496
X G -33496
X Q -33496
Y e -100488
Y o -100488
Y r -100488
Y a -100488
Y A -100488
Y u -100488
oq oq -100488
oq ` -100488
` oq -100488
` ` -100488
a v -33496
a j 66992
a y -33496
a w -33496
b e 33496
b o 33496
b x -33496
b d 33496
b c 33496
b q 33496
b v -33496
b j 66992
b y -33496
b w -33496
c h -33496
c k -33496
f ' 114323
f cq 114323
f ? 114323
f ! 114323
f ) 114323
f rB 114323
f ] 114323
g j 33496
h t -33496
h u -33496
h b -33496
h y -33496
h v -33496
h w -33496
k a -66992
k e -33496
k a -33496
k o -33496
k c -33496
m t -33496
m u -33496
m b -33496
m y -33496
m v -33496
m w -33496
n t -33496
n u -33496
n b -33496
n y -33496
n v -33496
n w -33496
o e 33496
o o 33496
o x -33496
o d 33496
o c 33496
o q 33496
o v -33496
o j 66992
o y -33496
o w -33496
p e 33496
p o 33496
p x -33496
p d 33496
p c 33496
p q 33496
p v -33496
p j 66992
p y -33496
p w -33496
t y -33496
t w -33496
u w -33496
v a -66992
v e -33496
v a -33496
v o -33496
v c -33496
w e -33496
w a -33496
w o -33496
w c -33496
y o -33496
y e -33496
y a -33496
y . -100488
y , -100488
charset
*G 725261,719440,0,0,0,-167480 2 0000
*D 1004880,719440 2 0001
*H 937888,719440,0,0,-33496,-33496 2 0002
*L 844682,719440 2 0003
*C 803904,719440 2 0004
*P 943714,719440 2 0005
*S 870896,719440 2 0006
*U 937888,719440,0,0,-33496,-167480 2 0007
*F 870896,719440,0,0,-33496 2 0010
*Q 937888,719440,0,0,-33496,-83741 2 0011
*W 870896,719440 2 0012
ff 703416,728178,0,114323 2 0013
fi 669920,728178 2 0014
fl 669920,728178 2 0015
Fi 1004880,728178 2 0016
Fl 1004880,728178 2 0017
.i 334960,466034 0 0020
.j 368456,466034,203890 1 0021
ga 602928,728178 2 0022
aa 602928,728178 2 0023
ah 602928,662642 2 0024
ab 602928,728178 2 0025
a- 602928,625066 2 0026
ao 911674,728178 2 0027
ac 535936,0,178403 1 0030
ss 626230,728178 2 0031
ae 870896,466034 0 0032
oe 937888,466034 0 0033
/o 602928,567979,101946 3 0034
AE 1092261,719440 2 0035
OE 1226245,719440 2 0036
/O 937888,770413,50973 3 0037
--- 334960,466034 0 0040
! 367000,728178 2 0041
rq 632056,728178 2 0042
sh 1004880,728178,203888 3 0043
# "
Do 602928,786432,58254 3 0044
$ "
% 1004880,786432,58254 3 0045
& 937888,728178 2 0046
cq 334960,728178 2 0047
' "
( 468944,786432,262144 3 0050
) 468944,786432,262144 3 0051
* 602928,786432 2 0052
+ 937888,664096,139808 3 0053
, 334960,163112,203890 1 0054
hy 401952,466034 0 0055
- "
. 334960,163112 0 0056
sl 602928,786432,262144 3 0057
/ "
0 602928,675749 2 0060
1 602928,675749 2 0061
2 602928,675749 2 0062
3 602928,675749 2 0063
4 602928,675749 2 0064
5 602928,675749 2 0065
6 602928,675749 2 0066
7 602928,675749 2 0067
8 602928,675749 2 0070
9 602928,675749 2 0071
: 334960,466034 0 0072
; 334960,466034,203890 1 0073
r! 367000,524288,203890 3 0074
= 937888,410110,-114178 0 0075
r? 569432,524288,203890 3 0076
? 569432,728178 2 0077
at 937888,728178 2 0100
@ "
A 911674,719440 2 0101
B 857789,719440 2 0102
C 870896,719440,0,0,-33496 2 0103
D 924781,719440,0,0,0,-33496 2 0104
E 792253,719440 2 0105
F 758757,719440,0,0,0,-167480 2 0106
G 948083,719440,0,0,-33496 2 0107
H 943714,719440 2 0110
I 457294,719440 2 0111
J 623317,719440,0,0,0,-33496 2 0112
K 945170,719440 2 0113
L 725261,719440,0,0,0,66992 2 0114
M 1144690,719440 2 0115
N 943714,719440 2 0116
O 905848,719440,0,0,-33496,-33496 2 0117
P 824293,719440,0,0,0,-167480 2 0120
Q 905848,719440,203890,0,-33496 3 0121
R 904392,719440 2 0122
S 669920,719440 2 0123
T 838856,719440,0,0,0,-167480 2 0124
U 927694,719440,0,0,-20389 2 0125
V 911674,719440,0,16749,50245,-251219 2 0126
W 1246634,719440,0,16749,50245,-150731 2 0127
X 911674,719440 2 0130
Y 911674,719440,0,30146,33496,-237822 2 0131
Z 736912,719440 2 0132
lB 334960,786432,262144 3 0133
[ "
lq 632056,728178 2 0134
rB 334960,786432,262144 3 0135
] "
ha 602928,728178 2 0136
^ "
a^ "
a. 334960,728178 2 0137
oq 334960,728178 2 0140
` "
a 586179,466034 0 0141
b 669920,728178 2 0142
c 535936,466034 0 0143
d 669920,728178 2 0144
e 552685,466034 0 0145
f 368456,728178,0,114323 2 0146
g 602928,466034,203890,16749 1 0147
h 669920,728178 2 0150
i 334960,728178 2 0151
j 368456,728178,203890 3 0152
k 636424,728178 2 0153
l 334960,728178 2 0154
m 1004880,466034 0 0155
n 669920,466034 0 0156
o 602928,466034 0 0157
p 669920,466034,203890 1 0160
q 636424,466034,203890 1 0161
r 496616,466034 0 0162
s 475643,466034 0 0163
t 468944,665763 2 0164
u 669920,466034 0 0165
v 636424,466034,0,16749 0 0166
w 870896,466034,0,16749 0 0167
x 636424,466034 0 0170
y 636424,466034,203890,16749 1 0171
z 535936,466034 0 0172
en 602928,466034,0,33496 0 0173
em 1205856,466034,0,33496 0 0174
a" 602928,728178 2 0175
~ 602928,728178 2 0176
a~ "
ad 602928,728178 2 0177
1.18.1.4/font/devdvi/CW 0000666 00000006451 15047753021 0010135 0 ustar 00 name CW
special
internalname cmtt10
spacewidth 550498
checksum -538297224
designsize 10485760
charset
*G 550498,640797 2 0000
*D 550498,640797 2 0001
*H 550498,640797 2 0002
*L 550498,640797 2 0003
*C 550498,640797 2 0004
*P 550498,640797 2 0005
*S 550498,640797 2 0006
*U 550498,640797 2 0007
*F 550498,640797 2 0010
*Q 550498,640797 2 0011
*W 550498,640797 2 0012
ff 550498,640797 2 0013
fi 550498,640797 2 0014
fl 550498,640797 2 0015
Fi 550498,407779,233018 1 0016
Fl 550498,407779,233018 1 0017
.i 550498,451470 0 0020
.j 550498,451470,233018 1 0021
ga 550498,640797 2 0022
aa 550498,640797 2 0023
ah 550498,593466 2 0024
ab 550498,640797 2 0025
a- 550498,593027 2 0026
ao 550498,640797 2 0027
ac 550498,0,203891 1 0030
ss 550498,640797 2 0031
ae 550498,451470 0 0032
oe 550498,451470 0 0033
/o 550498,567979,116509 3 0034
AE 550498,640797 2 0035
OE 550498,640797 2 0036
/O 550498,699051,58254 3 0037
--- 550498,230104,116509 1 0040
! 550498,640797 2 0041
dq 550498,640797 2 0042
" "
sh 550498,640797 2 0043
# "
Do 550498,728178,87381 3 0044
$ "
% 550498,728178,87381 3 0045
& 550498,640797 2 0046
cq 550498,640797 2 0047
' "
( 550498,728178,87379 3 0050
) 550498,728178,87379 3 0051
* 550498,546134 2 0052
+ 550498,556326,-84470 2 0053
, 550498,131072,145635 1 0054
\- 550498,556326,-84470 2 0055
- "
. 550498,131072 0 0056
sl 550498,728178,87379 3 0057
/ "
0 550498,640797 2 0060
1 550498,640797 2 0061
2 550498,640797 2 0062
3 550498,640797 2 0063
4 550498,640797 2 0064
5 550498,640797 2 0065
6 550498,640797 2 0066
7 550498,640797 2 0067
8 550498,640797 2 0070
9 550498,640797 2 0071
: 550498,451470 0 0072
; 550498,451470,145635 1 0073
< 550498,582542,-58254 2 0074
= 550498,435813,-204984 0 0075
> 550498,582542,-58254 2 0076
? 550498,640797 2 0077
at 550498,640797 2 0100
@ "
A 550498,640797 2 0101
B 550498,640797 2 0102
C 550498,640797 2 0103
D 550498,640797 2 0104
E 550498,640797 2 0105
F 550498,640797 2 0106
G 550498,640797 2 0107
H 550498,640797 2 0110
I 550498,640797 2 0111
J 550498,640797 2 0112
K 550498,640797 2 0113
L 550498,640797 2 0114
M 550498,640797 2 0115
N 550498,640797 2 0116
O 550498,640797 2 0117
P 550498,640797 2 0120
Q 550498,640797,145635 3 0121
R 550498,640797 2 0122
S 550498,640797 2 0123
T 550498,640797 2 0124
U 550498,640797 2 0125
V 550498,640797 2 0126
W 550498,640797 2 0127
X 550498,640797 2 0130
Y 550498,640797 2 0131
Z 550498,640797 2 0132
lB 550498,728178,87379 3 0133
[ "
rs 550498,728178,87379 3 0134
\ "
rB 550498,728178,87379 3 0135
] "
ha 550498,640797 2 0136
^ "
a^ "
_ 550498,0,99757 1 0137
oq 550498,640797 2 0140
` "
a 550498,451470 0 0141
b 550498,640797 2 0142
c 550498,451470 0 0143
d 550498,640797 2 0144
e 550498,451470 0 0145
f 550498,640797 2 0146
g 550498,451470,233018 1 0147
h 550498,640797 2 0150
i 550498,640797 2 0151
j 550498,640797,233018 3 0152
k 550498,640797 2 0153
l 550498,640797 2 0154
m 550498,451470 0 0155
n 550498,451470 0 0156
o 550498,451470 0 0157
p 550498,451470,233018 1 0160
q 550498,451470,233018 1 0161
r 550498,451470 0 0162
s 550498,451470 0 0163
t 550498,580466 2 0164
u 550498,451470 0 0165
v 550498,451470 0 0166
w 550498,451470 0 0167
x 550498,451470 0 0170
y 550498,451470,233018 1 0171
z 550498,451470 0 0172
{ 550498,728178,87379 3 0173
lC "
| 550498,728178,87379 3 0174
ba "
} 550498,728178,87379 3 0175
rC "
~ 550498,640797 2 0176
a~ "
--- 550498,640797 2 0177
1.18.1.4/font/devdvi/TBEC 0000666 00000060304 15047753021 0010336 0 ustar 00 name TBEC
internalname ecbx1000
spacewidth 401856
ligatures ff fi fl ffi ffl 0
checksum 39675532
designsize 10485760
kernpairs
bq Bq 133952
bq j 133952
bq .j 133952
bq g 66976
bq y 66976
bq :y 66976
bq 'y 66976
bq v -100464
bq w -66976
bq V -133952
bq W -100464
bq Y -100464
bq :Y -100464
bq 'Y -100464
bq O -33488
bq `O -33488
bq 'O -33488
bq ^O -33488
bq ~O -33488
bq :O -33488
bq OE -33488
bq /O -33488
bq C -33488
bq G -33488
bq 'C -33488
bq ,C -33488
bq Q -33488
lq oq 133952
lq ` 133952
lq lq 133952
rq cq 133952
rq ' 133952
rq rq 133952
Bq bq 133952
Bq , 133952
Bq Bq 133952
Bq j 133952
Bq .j 133952
Bq g 66976
Bq y 66976
Bq :y 66976
Bq 'y 66976
Bq v -100464
Bq w -66976
Bq V -133952
Bq W -100464
Bq Y -100464
Bq :Y -100464
Bq 'Y -100464
Bq O -33488
Bq `O -33488
Bq 'O -33488
Bq ^O -33488
Bq ~O -33488
Bq :O -33488
Bq OE -33488
Bq /O -33488
Bq C -33488
Bq G -33488
Bq 'C -33488
Bq ,C -33488
Bq Q -33488
Fc . -100464
Fc , -100464
ff cq 114296
ff ' 114296
ff oq 114296
ff ` 114296
ff lq 114296
ff rq 114296
ff ? 114296
ff ! 114296
ff ) 114296
ff rB 114296
ff ] 114296
cq rq 133952
' rq 133952
cq ? 133952
' ? 133952
cq ! 133952
' ! 133952
A y -100464
A :y -100464
A 'y -100464
A v -133952
A w -100464
A c -33488
A 'c -33488
A ,c -33488
A d -33488
A Sd -33488
A e -33488
A `e -33488
A 'e -33488
A ^e -33488
A :e -33488
A o -33488
A `o -33488
A 'o -33488
A ^o -33488
A ~o -33488
A :o -33488
A oe -33488
A /o -33488
A q -33488
A t -33488
A C -33488
A G -33488
A 'C -33488
A ,C -33488
A Q -33488
A O -33488
A `O -33488
A 'O -33488
A ^O -33488
A ~O -33488
A :O -33488
A OE -33488
A /O -33488
A U -33488
A `U -33488
A 'U -33488
A ^U -33488
A :U -33488
A T -100464
A Y -100464
A :Y -100464
A 'Y -100464
A V -133952
A W -133952
D X -33488
D W -33488
D A -33488
D `A -33488
D 'A -33488
D ^A -33488
D ~A -33488
D :A -33488
D oA -33488
D AE -33488
D V -33488
D Y -33488
D :Y -33488
D 'Y -33488
F o -100464
F a -100464
F e -100464
F y -100464
F u -100464
F r -100464
F v -100464
F s -100464
F c -100464
F d -100464
F g -100464
F m -100464
F n -100464
F p -100464
F w -100464
F z -100464
F ae -100464
F /o -100464
F A -133952
F `A -133952
F 'A -133952
F ^A -133952
F ~A -133952
F :A -133952
F oA -133952
F AE -133952
F O -33488
F `O -33488
F 'O -33488
F ^O -33488
F ~O -33488
F :O -33488
F OE -33488
F /O -33488
F C -33488
F G -33488
F 'C -33488
F ,C -33488
F Q -33488
I I 33488
K v -100464
K w -33488
K o -33488
K `o -33488
K 'o -33488
K ^o -33488
K ~o -33488
K :o -33488
K oe -33488
K /o -33488
K C -33488
K G -33488
K 'C -33488
K ,C -33488
K Q -33488
L T -100464
L Y -100464
L :Y -100464
L 'Y -100464
L V -133952
L W -133952
O X -33488
O W -33488
O A -33488
O `A -33488
O 'A -33488
O ^A -33488
O ~A -33488
O :A -33488
O oA -33488
O AE -33488
O V -33488
O Y -33488
O :Y -33488
O 'Y -33488
P A -100464
P `A -100464
P 'A -100464
P ^A -100464
P ~A -100464
P :A -100464
P oA -100464
P AE -100464
P o -33488
P `o -33488
P 'o -33488
P ^o -33488
P ~o -33488
P :o -33488
P oe -33488
P /o -33488
P e -33488
P `e -33488
P 'e -33488
P ^e -33488
P :e -33488
P a -33488
P `a -33488
P 'a -33488
P ^a -33488
P ^a -33488
P ~a -33488
P :a -33488
P oa -33488
P ae -33488
P . -100464
P , -100464
R t -33488
R C -33488
R G -33488
R 'C -33488
R ,C -33488
R Q -33488
R O -33488
R `O -33488
R 'O -33488
R ^O -33488
R ~O -33488
R :O -33488
R OE -33488
R /O -33488
R U -33488
R `U -33488
R 'U -33488
R ^U -33488
R :U -33488
R T -100464
R Y -100464
R :Y -100464
R 'Y -100464
R V -133952
R W -133952
T y -33488
T e -100464
T o -100464
T r -100464
T a -100464
T u -100464
T n -100464
T .i -100464
T c -100464
T d -100464
T g -100464
T p -100464
T s -100464
T v -100464
T w -100464
T x -100464
T z -100464
T A -100464
T `A -100464
T 'A -100464
T ^A -100464
T ~A -100464
T :A -100464
T oA -100464
T AE -100464
V o -100464
V a -100464
V e -100464
V y -100464
V u -100464
V r -100464
V v -100464
V s -100464
V c -100464
V d -100464
V g -100464
V m -100464
V n -100464
V p -100464
V w -100464
V z -100464
V ae -100464
V /o -100464
V A -133952
V `A -133952
V 'A -133952
V ^A -133952
V ~A -133952
V :A -133952
V oA -133952
V AE -133952
V O -33488
V `O -33488
V 'O -33488
V ^O -33488
V ~O -33488
V :O -33488
V OE -33488
V /O -33488
V C -33488
V G -33488
V 'C -33488
V ,C -33488
V Q -33488
W o -100464
W a -100464
W e -100464
W y -100464
W u -100464
W r -100464
W v -100464
W s -100464
W c -100464
W d -100464
W g -100464
W m -100464
W n -100464
W p -100464
W w -100464
W z -100464
W ae -100464
W /o -100464
W A -133952
W `A -133952
W 'A -133952
W ^A -133952
W ~A -133952
W :A -133952
W oA -133952
W AE -133952
W O -33488
W `O -33488
W 'O -33488
W ^O -33488
W ~O -33488
W :O -33488
W OE -33488
W /O -33488
W C -33488
W G -33488
W 'C -33488
W ,C -33488
W Q -33488
X O -33488
X `O -33488
X 'O -33488
X ^O -33488
X ~O -33488
X :O -33488
X OE -33488
X /O -33488
X C -33488
X G -33488
X 'C -33488
X ,C -33488
X Q -33488
Y e -100464
Y o -100464
Y r -100464
Y a -100464
Y u -100464
Y n -100464
Y .i -100464
Y c -100464
Y d -100464
Y g -100464
Y p -100464
Y s -100464
Y v -100464
Y w -100464
Y x -100464
Y z -100464
Y A -100464
Y `A -100464
Y 'A -100464
Y ^A -100464
Y ~A -100464
Y :A -100464
Y oA -100464
Y AE -100464
oq lq 133952
` lq 133952
oq ? 133952
` ? 133952
oq ! 133952
` ! 133952
a v -33488
a j 66976
a y -33488
a :y -33488
a 'y -33488
a w -33488
b e 33488
b `e 33488
b 'e 33488
b ^e 33488
b :e 33488
b o 33488
b `o 33488
b 'o 33488
b ^o 33488
b ~o 33488
b :o 33488
b oe 33488
b /o 33488
b x -33488
b d 33488
b c 33488
b 'c 33488
b ,c 33488
b q 33488
b v -33488
b j 66976
b y -33488
b :y -33488
b 'y -33488
b w -33488
c h -33488
c k -33488
e V -100464
f cq 114296
f ' 114296
f oq 114296
f ` 114296
f lq 114296
f rq 114296
f ? 114296
f ! 114296
f ) 114296
f rB 114296
f ] 114296
g j 33488
h W -100464
h V -100464
h t -33488
h u -33488
h `u -33488
h 'u -33488
h ^u -33488
h :u -33488
h b -33488
h y -33488
h v -33488
h w -33488
k W -100464
k V -100464
k a -66976
k `a -66976
k 'a -66976
k ^a -66976
k ^a -66976
k ~a -66976
k :a -66976
k oa -66976
k ae -66976
k e -33488
k `e -33488
k 'e -33488
k ^e -33488
k :e -33488
k a -33488
k `a -33488
k 'a -33488
k ^a -33488
k ^a -33488
k ~a -33488
k :a -33488
k oa -33488
k ae -33488
k o -33488
k `o -33488
k 'o -33488
k ^o -33488
k ~o -33488
k :o -33488
k oe -33488
k /o -33488
k c -33488
k 'c -33488
k ,c -33488
m W -100464
m V -100464
m t -33488
m u -33488
m `u -33488
m 'u -33488
m ^u -33488
m :u -33488
m b -33488
m y -33488
m v -33488
m w -33488
n W -100464
n V -100464
n t -33488
n u -33488
n `u -33488
n 'u -33488
n ^u -33488
n :u -33488
n b -33488
n y -33488
n v -33488
n w -33488
o e 33488
o `e 33488
o 'e 33488
o ^e 33488
o :e 33488
o o 33488
o `o 33488
o 'o 33488
o ^o 33488
o ~o 33488
o :o 33488
o oe 33488
o /o 33488
o x -33488
o d 33488
o c 33488
o 'c 33488
o ,c 33488
o q 33488
o v -33488
o j 66976
o y -33488
o :y -33488
o 'y -33488
o w -33488
p e 33488
p `e 33488
p 'e 33488
p ^e 33488
p :e 33488
p o 33488
p `o 33488
p 'o 33488
p ^o 33488
p ~o 33488
p :o 33488
p oe 33488
p /o 33488
p x -33488
p d 33488
p c 33488
p 'c 33488
p ,c 33488
p q 33488
p v -33488
p j 66976
p y -33488
p :y -33488
p 'y -33488
p w -33488
t y -33488
t :y -33488
t 'y -33488
t w -33488
u w -33488
v a -66976
v `a -66976
v 'a -66976
v ^a -66976
v ^a -66976
v ~a -66976
v :a -66976
v oa -66976
v ae -66976
v e -33488
v `e -33488
v 'e -33488
v ^e -33488
v :e -33488
v a -33488
v `a -33488
v 'a -33488
v ^a -33488
v ^a -33488
v ~a -33488
v :a -33488
v oa -33488
v ae -33488
v o -33488
v `o -33488
v 'o -33488
v ^o -33488
v ~o -33488
v :o -33488
v oe -33488
v /o -33488
v c -33488
v 'c -33488
v ,c -33488
w e -33488
w `e -33488
w 'e -33488
w ^e -33488
w :e -33488
w a -33488
w `a -33488
w 'a -33488
w ^a -33488
w ^a -33488
w ~a -33488
w :a -33488
w oa -33488
w ae -33488
w o -33488
w `o -33488
w 'o -33488
w ^o -33488
w ~o -33488
w :o -33488
w oe -33488
w /o -33488
w c -33488
w 'c -33488
w ,c -33488
y o -33488
y `o -33488
y 'o -33488
y ^o -33488
y ~o -33488
y :o -33488
y oe -33488
y /o -33488
y e -33488
y `e -33488
y 'e -33488
y ^e -33488
y :e -33488
y a -33488
y `a -33488
y 'a -33488
y ^a -33488
y ^a -33488
y ~a -33488
y :a -33488
y oa -33488
y ae -33488
y . -100464
y , -100464
'C v -133952
'C w -100464
'C c -33488
'C 'c -33488
'C ,c -33488
'C d -33488
'C Sd -33488
'C e -33488
'C `e -33488
'C 'e -33488
'C ^e -33488
'C :e -33488
'C o -33488
'C `o -33488
'C 'o -33488
'C ^o -33488
'C ~o -33488
'C :o -33488
'C oe -33488
'C /o -33488
'C q -33488
'C t -33488
'C C -33488
'C G -33488
'C 'C -33488
'C ,C -33488
'C Q -33488
'C O -33488
'C `O -33488
'C 'O -33488
'C ^O -33488
'C ~O -33488
'C :O -33488
'C OE -33488
'C /O -33488
'C U -33488
'C `U -33488
'C 'U -33488
'C ^U -33488
'C :U -33488
'C T -100464
'C Y -100464
'C :Y -100464
'C 'Y -100464
'C V -133952
'C W -133952
/L T -100464
/L Y -100464
/L :Y -100464
/L 'Y -100464
/L V -133952
/L W -133952
:Y e -100464
:Y o -100464
:Y r -100464
:Y a -100464
:Y u -100464
:Y n -100464
:Y .i -100464
:Y c -100464
:Y d -100464
:Y g -100464
:Y p -100464
:Y s -100464
:Y v -100464
:Y w -100464
:Y x -100464
:Y z -100464
:Y A -100464
:Y `A -100464
:Y 'A -100464
:Y ^A -100464
:Y ~A -100464
:Y :A -100464
:Y oA -100464
:Y AE -100464
'c h -33488
'c k -33488
/l cq 33488
/l ' 33488
:y o -33488
:y `o -33488
:y 'o -33488
:y ^o -33488
:y ~o -33488
:y :o -33488
:y oe -33488
:y /o -33488
:y e -33488
:y `e -33488
:y 'e -33488
:y ^e -33488
:y :e -33488
:y a -33488
:y `a -33488
:y 'a -33488
:y ^a -33488
:y ^a -33488
:y ~a -33488
:y :a -33488
:y oa -33488
:y ae -33488
:y . -100464
:y , -100464
`A y -100464
`A :y -100464
`A 'y -100464
`A v -133952
`A w -100464
`A c -33488
`A 'c -33488
`A ,c -33488
`A d -33488
`A Sd -33488
`A e -33488
`A `e -33488
`A 'e -33488
`A ^e -33488
`A :e -33488
`A o -33488
`A `o -33488
`A 'o -33488
`A ^o -33488
`A ~o -33488
`A :o -33488
`A oe -33488
`A /o -33488
`A q -33488
`A t -33488
`A C -33488
`A G -33488
`A 'C -33488
`A ,C -33488
`A Q -33488
`A O -33488
`A `O -33488
`A 'O -33488
`A ^O -33488
`A ~O -33488
`A :O -33488
`A OE -33488
`A /O -33488
`A U -33488
`A `U -33488
`A 'U -33488
`A ^U -33488
`A :U -33488
`A T -100464
`A Y -100464
`A :Y -100464
`A 'Y -100464
`A V -133952
`A W -133952
'A y -100464
'A :y -100464
'A 'y -100464
'A v -133952
'A w -100464
'A c -33488
'A 'c -33488
'A ,c -33488
'A d -33488
'A Sd -33488
'A e -33488
'A `e -33488
'A 'e -33488
'A ^e -33488
'A :e -33488
'A o -33488
'A `o -33488
'A 'o -33488
'A ^o -33488
'A ~o -33488
'A :o -33488
'A oe -33488
'A /o -33488
'A q -33488
'A t -33488
'A C -33488
'A G -33488
'A 'C -33488
'A ,C -33488
'A Q -33488
'A O -33488
'A `O -33488
'A 'O -33488
'A ^O -33488
'A ~O -33488
'A :O -33488
'A OE -33488
'A /O -33488
'A U -33488
'A `U -33488
'A 'U -33488
'A ^U -33488
'A :U -33488
'A T -100464
'A Y -100464
'A :Y -100464
'A 'Y -100464
'A V -133952
'A W -133952
^A y -100464
^A :y -100464
^A 'y -100464
^A v -133952
^A w -100464
^A c -33488
^A 'c -33488
^A ,c -33488
^A d -33488
^A Sd -33488
^A e -33488
^A `e -33488
^A 'e -33488
^A ^e -33488
^A :e -33488
^A o -33488
^A `o -33488
^A 'o -33488
^A ^o -33488
^A ~o -33488
^A :o -33488
^A oe -33488
^A /o -33488
^A q -33488
^A t -33488
^A C -33488
^A G -33488
^A 'C -33488
^A ,C -33488
^A Q -33488
^A O -33488
^A `O -33488
^A 'O -33488
^A ^O -33488
^A ~O -33488
^A :O -33488
^A OE -33488
^A /O -33488
^A U -33488
^A `U -33488
^A 'U -33488
^A ^U -33488
^A :U -33488
^A T -100464
^A Y -100464
^A :Y -100464
^A 'Y -100464
^A V -133952
^A W -133952
~A y -100464
~A :y -100464
~A 'y -100464
~A v -133952
~A w -100464
~A c -33488
~A 'c -33488
~A ,c -33488
~A d -33488
~A Sd -33488
~A e -33488
~A `e -33488
~A 'e -33488
~A ^e -33488
~A :e -33488
~A o -33488
~A `o -33488
~A 'o -33488
~A ^o -33488
~A ~o -33488
~A :o -33488
~A oe -33488
~A /o -33488
~A q -33488
~A t -33488
~A C -33488
~A G -33488
~A 'C -33488
~A ,C -33488
~A Q -33488
~A O -33488
~A `O -33488
~A 'O -33488
~A ^O -33488
~A ~O -33488
~A :O -33488
~A OE -33488
~A /O -33488
~A U -33488
~A `U -33488
~A 'U -33488
~A ^U -33488
~A :U -33488
~A T -100464
~A Y -100464
~A :Y -100464
~A 'Y -100464
~A V -133952
~A W -133952
:A y -100464
:A :y -100464
:A 'y -100464
:A v -133952
:A w -100464
:A c -33488
:A 'c -33488
:A ,c -33488
:A d -33488
:A Sd -33488
:A e -33488
:A `e -33488
:A 'e -33488
:A ^e -33488
:A :e -33488
:A o -33488
:A `o -33488
:A 'o -33488
:A ^o -33488
:A ~o -33488
:A :o -33488
:A oe -33488
:A /o -33488
:A q -33488
:A t -33488
:A C -33488
:A G -33488
:A 'C -33488
:A ,C -33488
:A Q -33488
:A O -33488
:A `O -33488
:A 'O -33488
:A ^O -33488
:A ~O -33488
:A :O -33488
:A OE -33488
:A /O -33488
:A U -33488
:A `U -33488
:A 'U -33488
:A ^U -33488
:A :U -33488
:A T -100464
:A Y -100464
:A :Y -100464
:A 'Y -100464
:A V -133952
:A W -133952
oA y -100464
oA :y -100464
oA 'y -100464
oA v -133952
oA w -100464
oA c -33488
oA 'c -33488
oA ,c -33488
oA d -33488
oA Sd -33488
oA e -33488
oA `e -33488
oA 'e -33488
oA ^e -33488
oA :e -33488
oA o -33488
oA `o -33488
oA 'o -33488
oA ^o -33488
oA ~o -33488
oA :o -33488
oA oe -33488
oA /o -33488
oA q -33488
oA t -33488
oA C -33488
oA G -33488
oA 'C -33488
oA ,C -33488
oA Q -33488
oA O -33488
oA `O -33488
oA 'O -33488
oA ^O -33488
oA ~O -33488
oA :O -33488
oA OE -33488
oA /O -33488
oA U -33488
oA `U -33488
oA 'U -33488
oA ^U -33488
oA :U -33488
oA T -100464
oA Y -100464
oA :Y -100464
oA 'Y -100464
oA V -133952
oA W -133952
-D X -33488
-D W -33488
-D A -33488
-D `A -33488
-D 'A -33488
-D ^A -33488
-D ~A -33488
-D :A -33488
-D oA -33488
-D AE -33488
-D V -33488
-D Y -33488
-D :Y -33488
-D 'Y -33488
`O X -33488
`O W -33488
`O A -33488
`O `A -33488
`O 'A -33488
`O ^A -33488
`O ~A -33488
`O :A -33488
`O oA -33488
`O AE -33488
`O V -33488
`O Y -33488
`O :Y -33488
`O 'Y -33488
'O X -33488
'O W -33488
'O A -33488
'O `A -33488
'O 'A -33488
'O ^A -33488
'O ~A -33488
'O :A -33488
'O oA -33488
'O AE -33488
'O V -33488
'O Y -33488
'O :Y -33488
'O 'Y -33488
^O X -33488
^O W -33488
^O A -33488
^O `A -33488
^O 'A -33488
^O ^A -33488
^O ~A -33488
^O :A -33488
^O oA -33488
^O AE -33488
^O V -33488
^O Y -33488
^O :Y -33488
^O 'Y -33488
~O X -33488
~O W -33488
~O A -33488
~O `A -33488
~O 'A -33488
~O ^A -33488
~O ~A -33488
~O :A -33488
~O oA -33488
~O AE -33488
~O V -33488
~O Y -33488
~O :Y -33488
~O 'Y -33488
:O X -33488
:O W -33488
:O A -33488
:O `A -33488
:O 'A -33488
:O ^A -33488
:O ~A -33488
:O :A -33488
:O oA -33488
:O AE -33488
:O V -33488
:O Y -33488
:O :Y -33488
:O 'Y -33488
/O X -33488
/O W -33488
/O A -33488
/O `A -33488
/O 'A -33488
/O ^A -33488
/O ~A -33488
/O :A -33488
/O oA -33488
/O AE -33488
/O V -33488
/O Y -33488
/O :Y -33488
/O 'Y -33488
'Y e -100464
'Y o -100464
'Y r -100464
'Y a -100464
'Y u -100464
'Y n -100464
'Y .i -100464
'Y c -100464
'Y d -100464
'Y g -100464
'Y p -100464
'Y s -100464
'Y v -100464
'Y w -100464
'Y x -100464
'Y z -100464
'Y A -100464
'Y `A -100464
'Y 'A -100464
'Y ^A -100464
'Y ~A -100464
'Y :A -100464
'Y oA -100464
'Y AE -100464
`a v -33488
`a j 66976
`a y -33488
`a :y -33488
`a 'y -33488
`a w -33488
'a v -33488
'a j 66976
'a y -33488
'a :y -33488
'a 'y -33488
'a w -33488
^a v -33488
^a j 66976
^a y -33488
^a :y -33488
^a 'y -33488
^a w -33488
~a v -33488
~a j 66976
~a y -33488
~a :y -33488
~a 'y -33488
~a w -33488
:a v -33488
:a j 66976
:a y -33488
:a :y -33488
:a 'y -33488
:a w -33488
oa v -33488
oa j 66976
oa y -33488
oa :y -33488
oa 'y -33488
oa w -33488
,c h -33488
,c k -33488
~n t -33488
~n u -33488
~n `u -33488
~n 'u -33488
~n ^u -33488
~n :u -33488
~n b -33488
~n y -33488
~n v -33488
~n w -33488
`o e 33488
`o `e 33488
`o 'e 33488
`o ^e 33488
`o :e 33488
`o o 33488
`o `o 33488
`o 'o 33488
`o ^o 33488
`o ~o 33488
`o :o 33488
`o oe 33488
`o /o 33488
`o x -33488
`o d 33488
`o c 33488
`o 'c 33488
`o ,c 33488
`o q 33488
`o v -33488
`o j 66976
`o y -33488
`o :y -33488
`o 'y -33488
`o w -33488
'o e 33488
'o `e 33488
'o 'e 33488
'o ^e 33488
'o :e 33488
'o o 33488
'o `o 33488
'o 'o 33488
'o ^o 33488
'o ~o 33488
'o :o 33488
'o oe 33488
'o /o 33488
'o x -33488
'o d 33488
'o c 33488
'o 'c 33488
'o ,c 33488
'o q 33488
'o v -33488
'o j 66976
'o y -33488
'o :y -33488
'o 'y -33488
'o w -33488
^o e 33488
^o `e 33488
^o 'e 33488
^o ^e 33488
^o :e 33488
^o o 33488
^o `o 33488
^o 'o 33488
^o ^o 33488
^o ~o 33488
^o :o 33488
^o oe 33488
^o /o 33488
^o x -33488
^o d 33488
^o c 33488
^o 'c 33488
^o ,c 33488
^o q 33488
^o v -33488
^o j 66976
^o y -33488
^o :y -33488
^o 'y -33488
^o w -33488
~o e 33488
~o `e 33488
~o 'e 33488
~o ^e 33488
~o :e 33488
~o o 33488
~o `o 33488
~o 'o 33488
~o ^o 33488
~o ~o 33488
~o :o 33488
~o oe 33488
~o /o 33488
~o x -33488
~o d 33488
~o c 33488
~o 'c 33488
~o ,c 33488
~o q 33488
~o v -33488
~o j 66976
~o y -33488
~o :y -33488
~o 'y -33488
~o w -33488
:o e 33488
:o `e 33488
:o 'e 33488
:o ^e 33488
:o :e 33488
:o o 33488
:o `o 33488
:o 'o 33488
:o ^o 33488
:o ~o 33488
:o :o 33488
:o oe 33488
:o /o 33488
:o x -33488
:o d 33488
:o c 33488
:o 'c 33488
:o ,c 33488
:o q 33488
:o v -33488
:o j 66976
:o y -33488
:o :y -33488
:o 'y -33488
:o w -33488
/o e 33488
/o `e 33488
/o 'e 33488
/o ^e 33488
/o :e 33488
/o o 33488
/o `o 33488
/o 'o 33488
/o ^o 33488
/o ~o 33488
/o :o 33488
/o oe 33488
/o /o 33488
/o x -33488
/o d 33488
/o c 33488
/o 'c 33488
/o ,c 33488
/o q 33488
/o v -33488
/o j 66976
/o y -33488
/o :y -33488
/o 'y -33488
/o w -33488
`u w -33488
'u w -33488
^u w -33488
:u w -33488
'y o -33488
'y `o -33488
'y 'o -33488
'y ^o -33488
'y ~o -33488
'y :o -33488
'y oe -33488
'y /o -33488
'y e -33488
'y `e -33488
'y 'e -33488
'y ^e -33488
'y :e -33488
'y a -33488
'y `a -33488
'y 'a -33488
'y ^a -33488
'y ^a -33488
'y ~a -33488
'y :a -33488
'y oa -33488
'y ae -33488
'y . -100464
'y , -100464
charset
ga 602784,679952 2 0000
aa 602784,679952 2 0001
a^ 602784,679952 2 0002
a~ 602784,679952 2 0003
ad 602784,723632 2 0004
a" 602784,679952,0,15530 2 0005
ao 911456,679952 2 0006
ah 602784,679952 2 0007
ab 602784,679952 2 0010
a- 602784,723632 2 0011
a. 334880,723632 2 0012
ac 535808,0,178360 1 0013
ho 334880,0,203840 1 0014
bq 334880,163072,203840 1 0015
fo 535808,495040 2 0016
fc 535808,495040 2 0017
lq 430976,723632 2 0020
rq 430976,723632 2 0021
Bq 430976,163072,203840 1 0022
Fo 669760,495040 2 0023
Fc 669760,495040 2 0024
en 602784,465920,0,33488 0 0025
em 1205568,465920,0,33488 0 0026
--- 0,465920 0 0027
--- 468832,786240,58240 3 0030
.i 334880,465920 0 0031
.j 368368,465920,203840 1 0032
ff 703248,723632,0,114296 2 0033
fi 669760,723632 2 0034
fl 669760,723632 2 0035
Fi 1004640,723632 2 0036
Fl 1004640,723632 2 0037
--- 602784,465920,101920 1 0040
! 366912,723632 2 0041
dq 602784,723632 2 0042
" "
sh 1004640,723632,203840 3 0043
# "
Do 602784,786240,58240 3 0044
$ "
% 1004640,786240,58240 3 0045
& 937664,723632 2 0046
cq 334880,723632 2 0047
' "
( 468832,786240,262080 3 0050
) 468832,786240,262080 3 0051
* 602784,786240 2 0052
pl 937664,664768,139776 3 0053
+ "
, 334880,163072,203840 1 0054
- 401856,465920 0 0055
. 334880,163072 0 0056
sl 602784,786240,262080 3 0057
/ "
0 602784,679952 2 0060
1 602784,679952 2 0061
2 602784,679952 2 0062
3 602784,679952 2 0063
4 602784,679952 2 0064
5 602784,679952 2 0065
6 602784,679952 2 0066
7 602784,679952 2 0067
8 602784,679952 2 0070
9 602784,679952 2 0071
: 334880,465920 0 0072
; 334880,465920,203840 1 0073
< 937664,613858,89698 3 0074
eq 937664,410018,-114142 0 0075
= "
> 937664,613858,89698 3 0076
? 569296,723632 2 0077
at 937664,723632 2 0100
@ "
A 911456,723632 2 0101
B 857584,723632 2 0102
C 870688,723632,0,0,-33488 2 0103
D 924560,723632,0,0,0,-33488 2 0104
E 792064,723632 2 0105
F 758576,723632,0,0,0,-167440 2 0106
G 947856,723632,0,0,-33488 2 0107
H 943488,723632 2 0110
I 457184,723632 2 0111
J 623168,723632,0,0,0,-33488 2 0112
K 944944,723632 2 0113
L 725088,723632,0,0,0,66976 2 0114
M 1144416,723632 2 0115
N 943488,723632 2 0116
O 905632,723632,0,0,-33488,-33488 2 0117
P 824096,723632,0,0,0,-167440 2 0120
Q 905632,723632,203840,0,-33488 3 0121
R 904176,723632 2 0122
S 669760,723632 2 0123
T 838656,723632,0,0,0,-167440 2 0124
U 927472,723632,0,0,-20384 2 0125
V 911456,723632,0,16744,50232,-251160 2 0126
W 1246336,723632,0,16744,50232,-150696 2 0127
X 911456,723632 2 0130
Y 911456,723632,0,30139,33488,-237765 2 0131
Z 736736,723632 2 0132
lB 334880,786240,262080 3 0133
[ "
rs 602784,786240,262080 3 0134
\ "
rB 334880,786240,262080 3 0135
] "
ha 736736,723632 2 0136
^ "
_ 937664,0,322658 1 0137
oq 334880,723632 2 0140
` "
a 586040,465920 0 0141
b 669760,723632 2 0142
c 535808,465920 0 0143
d 669760,723632 2 0144
e 552552,465920 0 0145
f 368368,723632,0,114296 2 0146
g 602784,465920,203840,16744 1 0147
h 669760,723632 2 0150
i 334880,723632 2 0151
j 368368,723632,203840 3 0152
k 636272,723632 2 0153
l 334880,723632 2 0154
m 1004640,465920 0 0155
n 669760,465920 0 0156
o 602784,465920 0 0157
p 669760,465920,203840 1 0160
q 636272,465920,203840 1 0161
r 496496,465920 0 0162
s 475530,465920 0 0163
t 468832,664768 2 0164
u 669760,465920 0 0165
v 636272,465920,0,16744 0 0166
w 870688,465920,0,16744 0 0167
x 636272,465920 0 0170
y 636272,465920,203840,16744 1 0171
z 535808,465920 0 0172
lC 602784,786240,262080 3 0173
{ "
ba 334880,786240,262080 3 0174
bv "
or "
| "
rC 602784,786240,262080 3 0175
} "
~ 736736,723632 2 0176
hy 200928,465920 0 0177
--- 911456,937664 2 0200
--- 911456,723632,203840 3 0201
'C 870688,918813 2 0202
--- 870688,937664,0,0,-33488 2 0203
--- 924560,937664,0,0,0,-33488 2 0204
--- 792064,937664 2 0205
--- 792064,723632,203840 3 0206
--- 947856,937664,0,0,-33488 2 0207
--- 725088,918813,0,0,0,66976 2 0210
--- 725088,937664,0,0,0,66976 2 0211
/L 725088,723632 2 0212
--- 943488,918813 2 0213
--- 943488,937664 2 0214
--- 958048,723632,0,0,0,-33488 2 0215
--- 905632,918813,0,0,-33488,-33488 2 0216
--- 904176,918813 2 0217
--- 904176,937664 2 0220
--- 669760,918813 2 0221
vS 669760,937664 2 0222
--- 669760,723632,178360 3 0223
--- 838656,937664,0,0,0,-167440 2 0224
--- 838656,723632,178360,0,0,-167440 3 0225
--- 927472,918813,0,0,-20384 2 0226
--- 927472,937664,0,0,-20384 2 0227
:Y 911456,937664,0,30139,33488,-237765 2 0230
--- 736736,918813 2 0231
vZ 736736,937664 2 0232
--- 736736,918813 2 0233
IJ 1059968,723632,0,0,0,-33488 2 0234
--- 457184,918813 2 0235
--- 669760,723632 2 0236
sc 554736,723632,203840 3 0237
--- 586040,679952 2 0240
--- 586040,465920,203840 1 0241
'c 535808,679952 2 0242
--- 535808,679952 2 0243
--- 849576,723632 2 0244
--- 552552,679952 2 0245
--- 552552,465920,203840 1 0246
--- 602784,679952,203840,16744 3 0247
--- 334880,918813,0,56493 2 0250
--- 526344,723632 2 0251
/l 405205,723632 2 0252
--- 669760,679952 2 0253
--- 669760,679952 2 0254
--- 669760,465920,203840 1 0255
--- 602784,679952,0,15530 2 0256
--- 496496,679952 2 0257
--- 496496,679952 2 0260
--- 475530,679952 2 0261
vs 475530,679952 2 0262
--- 475530,465920,178360 1 0263
--- 468832,723632 2 0264
--- 468832,664768,178360 3 0265
--- 669760,679952 2 0266
--- 669760,679952 2 0267
:y 636272,723632,203840,16744 3 0270
--- 535808,679952 2 0271
vz 535808,679952 2 0272
--- 535808,723632 2 0273
ij 703248,723632,203840 3 0274
r! 366912,524160,203840 3 0275
r? 569296,524160,203840 3 0276
Po 770224,723632 2 0277
`A 911456,918813 2 0300
'A 911456,918813 2 0301
^A 911456,937664 2 0302
~A 911456,937664 2 0303
:A 911456,937664 2 0304
oA 911456,893984 2 0305
AE 1092000,723632 2 0306
,C 870688,723632,178360,0,-33488 3 0307
`E 792064,918813 2 0310
'E 792064,918813 2 0311
^E 792064,937664 2 0312
:E 792064,937664 2 0313
`I 457184,918813 2 0314
'I 457184,918813 2 0315
^I 457184,937664 2 0316
:I 457184,937664 2 0317
-D 924560,723632,0,0,0,-33488 2 0320
~N 943488,937664 2 0321
`O 905632,918813,0,0,-33488,-33488 2 0322
'O 905632,918813 2 0323
^O 905632,937664,0,0,-33488,-33488 2 0324
~O 905632,937664,0,0,-33488,-33488 2 0325
:O 905632,937664,0,0,-33488,-33488 2 0326
OE 1225952,723632 2 0327
/O 937664,770224,50960 3 0330
`U 927472,918813,0,0,-20384 2 0331
'U 927472,918813 2 0332
^U 927472,937664,0,0,-20384 2 0333
:U 927472,937664,0,0,-20384 2 0334
'Y 911456,918813,0,30139,33488,-237765 2 0335
TP 757120,723632 2 0336
--- 1339520,723632 2 0337
`a 586040,679952 2 0340
'a 586040,679952 2 0341
^a 586040,679952 2 0342
~a 586040,679952 2 0343
:a 586040,723632 2 0344
oa 586040,679952 2 0345
ae 870688,465920 0 0346
,c 535808,465920,178360 1 0347
`e 552552,679952 2 0350
'e 552552,679952 2 0351
^e 552552,679952 2 0352
:e 552552,723632 2 0353
`i 334880,679952 2 0354
'i 334880,679952,0,28280 2 0355
^i 334880,679952 2 0356
:i 401856,723632 2 0357
Sd 602784,723632 2 0360
~n 669760,679952 2 0361
`o 602784,679952 2 0362
'o 602784,679952 2 0363
^o 602784,679952 2 0364
~o 602784,679952 2 0365
:o 602784,723632 2 0366
oe 937664,465920 0 0367
/o 602784,567840,101920 3 0370
`u 669760,679952 2 0371
'u 669760,679952 2 0372
^u 669760,679952 2 0373
:u 669760,723632 2 0374
'y 636272,679952,203840,16744 3 0375
Tp 669760,723632,203840 3 0376
ss 626080,723632 2 0377
1.18.1.4/font/devdvi/HBEC 0000666 00000054762 15047753021 0010335 0 ustar 00 name HBEC
internalname ecsx1000
spacewidth 384384
ligatures ff fi fl ffi ffl 0
checksum -1149688141
designsize 10485760
kernpairs
bq Bq 128128
bq j 128128
bq .j 128128
bq g 64064
bq y 64064
bq :y 64064
bq 'y 64064
bq v -96096
bq w -64064
bq V -128128
bq W -96096
bq Y -96096
bq :Y -96096
bq 'Y -96096
bq O -32032
bq `O -32032
bq 'O -32032
bq ^O -32032
bq ~O -32032
bq :O -32032
bq OE -32032
bq /O -32032
bq C -32032
bq G -32032
bq 'C -32032
bq ,C -32032
bq Q -32032
lq oq 128128
lq ` 128128
lq lq 128128
rq cq 128128
rq ' 128128
rq rq 128128
Bq bq 128128
Bq , 128128
Bq Bq 128128
Bq j 128128
Bq .j 128128
Bq g 64064
Bq y 64064
Bq :y 64064
Bq 'y 64064
Bq v -96096
Bq w -64064
Bq V -128128
Bq W -96096
Bq Y -96096
Bq :Y -96096
Bq 'Y -96096
Bq O -32032
Bq `O -32032
Bq 'O -32032
Bq ^O -32032
Bq ~O -32032
Bq :O -32032
Bq OE -32032
Bq /O -32032
Bq C -32032
Bq G -32032
Bq 'C -32032
Bq ,C -32032
Bq Q -32032
Fc . -96096
Fc , -96096
ff cq 80080
ff ' 80080
ff oq 80080
ff ` 80080
ff lq 80080
ff rq 80080
ff ? 80080
ff ! 80080
ff ) 80080
ff rB 80080
ff ] 80080
cq rq 128128
' rq 128128
cq ? 128128
' ? 128128
cq ! 128128
' ! 128128
A y -32032
A :y -32032
A 'y -32032
A v -32032
A w -32032
A c -32032
A 'c -32032
A ,c -32032
A d -32032
A Sd -32032
A e -32032
A `e -32032
A 'e -32032
A ^e -32032
A :e -32032
A o -32032
A `o -32032
A 'o -32032
A ^o -32032
A ~o -32032
A :o -32032
A oe -32032
A /o -32032
A q -32032
A t -32032
A C -32032
A G -32032
A 'C -32032
A ,C -32032
A Q -32032
A O -32032
A `O -32032
A 'O -32032
A ^O -32032
A ~O -32032
A :O -32032
A OE -32032
A /O -32032
A U -32032
A `U -32032
A 'U -32032
A ^U -32032
A :U -32032
A T -96096
A Y -96096
A :Y -96096
A 'Y -96096
A V -128128
A W -128128
D X -32032
D W -32032
D A -32032
D `A -32032
D 'A -32032
D ^A -32032
D ~A -32032
D :A -32032
D oA -32032
D AE -32032
D V -32032
D Y -32032
D :Y -32032
D 'Y -32032
F o -32032
F a -32032
F e -32032
F y -32032
F u -32032
F r -32032
F v -32032
F s -32032
F c -32032
F d -32032
F g -32032
F m -32032
F n -32032
F p -32032
F w -32032
F z -32032
F ae -32032
F /o -32032
F A -96096
F `A -96096
F 'A -96096
F ^A -96096
F ~A -96096
F :A -96096
F oA -96096
F AE -96096
F O -32032
F `O -32032
F 'O -32032
F ^O -32032
F ~O -32032
F :O -32032
F OE -32032
F /O -32032
F C -32032
F G -32032
F 'C -32032
F ,C -32032
F Q -32032
I I 32032
K v -32032
K o -32032
K `o -32032
K 'o -32032
K ^o -32032
K ~o -32032
K :o -32032
K oe -32032
K /o -32032
K C -32032
K G -32032
K 'C -32032
K ,C -32032
K Q -32032
L T -96096
L Y -96096
L :Y -96096
L 'Y -96096
L V -128128
L W -128128
O X -32032
O W -32032
O A -32032
O `A -32032
O 'A -32032
O ^A -32032
O ~A -32032
O :A -32032
O oA -32032
O AE -32032
O V -32032
O Y -32032
O :Y -32032
O 'Y -32032
P A -96096
P `A -96096
P 'A -96096
P ^A -96096
P ~A -96096
P :A -96096
P oA -96096
P AE -96096
P o -32032
P `o -32032
P 'o -32032
P ^o -32032
P ~o -32032
P :o -32032
P oe -32032
P /o -32032
P e -32032
P `e -32032
P 'e -32032
P ^e -32032
P :e -32032
P a -32032
P `a -32032
P 'a -32032
P ^a -32032
P ^a -32032
P ~a -32032
P :a -32032
P oa -32032
P ae -32032
P . -96096
P , -96096
T y -96096
T e -96096
T o -96096
T r -96096
T a -96096
T u -96096
T n -96096
T .i -96096
T c -96096
T d -96096
T g -96096
T p -96096
T s -96096
T v -96096
T w -96096
T x -96096
T z -96096
T A -96096
T `A -96096
T 'A -96096
T ^A -96096
T ~A -96096
T :A -96096
T oA -96096
T AE -96096
V o -32032
V a -32032
V e -32032
V y -32032
V u -32032
V r -32032
V v -32032
V s -32032
V c -32032
V d -32032
V g -32032
V m -32032
V n -32032
V p -32032
V w -32032
V z -32032
V ae -32032
V /o -32032
V A -96096
V `A -96096
V 'A -96096
V ^A -96096
V ~A -96096
V :A -96096
V oA -96096
V AE -96096
V O -32032
V `O -32032
V 'O -32032
V ^O -32032
V ~O -32032
V :O -32032
V OE -32032
V /O -32032
V C -32032
V G -32032
V 'C -32032
V ,C -32032
V Q -32032
W o -32032
W a -32032
W e -32032
W y -32032
W u -32032
W r -32032
W v -32032
W s -32032
W c -32032
W d -32032
W g -32032
W m -32032
W n -32032
W p -32032
W w -32032
W z -32032
W ae -32032
W /o -32032
W A -96096
W `A -96096
W 'A -96096
W ^A -96096
W ~A -96096
W :A -96096
W oA -96096
W AE -96096
W O -32032
W `O -32032
W 'O -32032
W ^O -32032
W ~O -32032
W :O -32032
W OE -32032
W /O -32032
W C -32032
W G -32032
W 'C -32032
W ,C -32032
W Q -32032
X O -32032
X `O -32032
X 'O -32032
X ^O -32032
X ~O -32032
X :O -32032
X OE -32032
X /O -32032
X C -32032
X G -32032
X 'C -32032
X ,C -32032
X Q -32032
Y e -96096
Y o -96096
Y r -96096
Y a -96096
Y u -96096
Y n -96096
Y .i -96096
Y c -96096
Y d -96096
Y g -96096
Y p -96096
Y s -96096
Y v -96096
Y w -96096
Y x -96096
Y z -96096
Y A -96096
Y `A -96096
Y 'A -96096
Y ^A -96096
Y ~A -96096
Y :A -96096
Y oA -96096
Y AE -96096
oq lq 128128
` lq 128128
oq ? 128128
` ? 128128
oq ! 128128
` ! 128128
a r -32032
a y -32032
a :y -32032
a 'y -32032
a w -32032
b e 32032
b `e 32032
b 'e 32032
b ^e 32032
b :e 32032
b o 32032
b `o 32032
b 'o 32032
b ^o 32032
b ~o 32032
b :o 32032
b oe 32032
b /o 32032
b x -32032
b d 32032
b c 32032
b 'c 32032
b ,c 32032
b q 32032
b r -32032
b y -32032
b :y -32032
b 'y -32032
b w -32032
e V -96096
f cq 80080
f ' 80080
f oq 80080
f ` 80080
f lq 80080
f rq 80080
f ? 80080
f ! 80080
f ) 80080
f rB 80080
f ] 80080
g j 32032
k W -96096
k V -96096
k e -32032
k `e -32032
k 'e -32032
k ^e -32032
k :e -32032
k a -32032
k `a -32032
k 'a -32032
k ^a -32032
k ^a -32032
k ~a -32032
k :a -32032
k oa -32032
k ae -32032
k o -32032
k `o -32032
k 'o -32032
k ^o -32032
k ~o -32032
k :o -32032
k oe -32032
k /o -32032
k c -32032
k 'c -32032
k ,c -32032
o e 32032
o `e 32032
o 'e 32032
o ^e 32032
o :e 32032
o o 32032
o `o 32032
o 'o 32032
o ^o 32032
o ~o 32032
o :o 32032
o oe 32032
o /o 32032
o x -32032
o d 32032
o c 32032
o 'c 32032
o ,c 32032
o q 32032
o r -32032
o y -32032
o :y -32032
o 'y -32032
o w -32032
p e 32032
p `e 32032
p 'e 32032
p ^e 32032
p :e 32032
p o 32032
p `o 32032
p 'o 32032
p ^o 32032
p ~o 32032
p :o 32032
p oe 32032
p /o 32032
p x -32032
p d 32032
p c 32032
p 'c 32032
p ,c 32032
p q 32032
p r -32032
p y -32032
p :y -32032
p 'y -32032
p w -32032
t y -32032
t :y -32032
t 'y -32032
t w -32032
u w -32032
w e -32032
w `e -32032
w 'e -32032
w ^e -32032
w :e -32032
w a -32032
w `a -32032
w 'a -32032
w ^a -32032
w ^a -32032
w ~a -32032
w :a -32032
w oa -32032
w ae -32032
w o -32032
w `o -32032
w 'o -32032
w ^o -32032
w ~o -32032
w :o -32032
w oe -32032
w /o -32032
w c -32032
w 'c -32032
w ,c -32032
y o -32032
y `o -32032
y 'o -32032
y ^o -32032
y ~o -32032
y :o -32032
y oe -32032
y /o -32032
y e -32032
y `e -32032
y 'e -32032
y ^e -32032
y :e -32032
y a -32032
y `a -32032
y 'a -32032
y ^a -32032
y ^a -32032
y ~a -32032
y :a -32032
y oa -32032
y ae -32032
y . -96096
y , -96096
'C v -32032
'C w -32032
'C c -32032
'C 'c -32032
'C ,c -32032
'C d -32032
'C Sd -32032
'C e -32032
'C `e -32032
'C 'e -32032
'C ^e -32032
'C :e -32032
'C o -32032
'C `o -32032
'C 'o -32032
'C ^o -32032
'C ~o -32032
'C :o -32032
'C oe -32032
'C /o -32032
'C q -32032
'C t -32032
'C C -32032
'C G -32032
'C 'C -32032
'C ,C -32032
'C Q -32032
'C O -32032
'C `O -32032
'C 'O -32032
'C ^O -32032
'C ~O -32032
'C :O -32032
'C OE -32032
'C /O -32032
'C U -32032
'C `U -32032
'C 'U -32032
'C ^U -32032
'C :U -32032
'C T -96096
'C Y -96096
'C :Y -96096
'C 'Y -96096
'C V -128128
'C W -128128
/L T -96096
/L Y -96096
/L :Y -96096
/L 'Y -96096
/L V -128128
/L W -128128
:Y e -96096
:Y o -96096
:Y r -96096
:Y a -96096
:Y u -96096
:Y n -96096
:Y .i -96096
:Y c -96096
:Y d -96096
:Y g -96096
:Y p -96096
:Y s -96096
:Y v -96096
:Y w -96096
:Y x -96096
:Y z -96096
:Y A -96096
:Y `A -96096
:Y 'A -96096
:Y ^A -96096
:Y ~A -96096
:Y :A -96096
:Y oA -96096
:Y AE -96096
/l cq 32032
/l ' 32032
/l a -32032
/l c -32032
/l 'c -32032
/l d -32032
/l e -32032
/l g -32032
/l o -32032
/l 'o -32032
/l s -32032
:y o -32032
:y `o -32032
:y 'o -32032
:y ^o -32032
:y ~o -32032
:y :o -32032
:y oe -32032
:y /o -32032
:y e -32032
:y `e -32032
:y 'e -32032
:y ^e -32032
:y :e -32032
:y a -32032
:y `a -32032
:y 'a -32032
:y ^a -32032
:y ^a -32032
:y ~a -32032
:y :a -32032
:y oa -32032
:y ae -32032
:y . -96096
:y , -96096
`A y -32032
`A :y -32032
`A 'y -32032
`A v -32032
`A w -32032
`A c -32032
`A 'c -32032
`A ,c -32032
`A d -32032
`A Sd -32032
`A e -32032
`A `e -32032
`A 'e -32032
`A ^e -32032
`A :e -32032
`A o -32032
`A `o -32032
`A 'o -32032
`A ^o -32032
`A ~o -32032
`A :o -32032
`A oe -32032
`A /o -32032
`A q -32032
`A t -32032
`A C -32032
`A G -32032
`A 'C -32032
`A ,C -32032
`A Q -32032
`A O -32032
`A `O -32032
`A 'O -32032
`A ^O -32032
`A ~O -32032
`A :O -32032
`A OE -32032
`A /O -32032
`A U -32032
`A `U -32032
`A 'U -32032
`A ^U -32032
`A :U -32032
`A T -96096
`A Y -96096
`A :Y -96096
`A 'Y -96096
`A V -128128
`A W -128128
'A y -32032
'A :y -32032
'A 'y -32032
'A v -32032
'A w -32032
'A c -32032
'A 'c -32032
'A ,c -32032
'A d -32032
'A Sd -32032
'A e -32032
'A `e -32032
'A 'e -32032
'A ^e -32032
'A :e -32032
'A o -32032
'A `o -32032
'A 'o -32032
'A ^o -32032
'A ~o -32032
'A :o -32032
'A oe -32032
'A /o -32032
'A q -32032
'A t -32032
'A C -32032
'A G -32032
'A 'C -32032
'A ,C -32032
'A Q -32032
'A O -32032
'A `O -32032
'A 'O -32032
'A ^O -32032
'A ~O -32032
'A :O -32032
'A OE -32032
'A /O -32032
'A U -32032
'A `U -32032
'A 'U -32032
'A ^U -32032
'A :U -32032
'A T -96096
'A Y -96096
'A :Y -96096
'A 'Y -96096
'A V -128128
'A W -128128
^A y -32032
^A :y -32032
^A 'y -32032
^A v -32032
^A w -32032
^A c -32032
^A 'c -32032
^A ,c -32032
^A d -32032
^A Sd -32032
^A e -32032
^A `e -32032
^A 'e -32032
^A ^e -32032
^A :e -32032
^A o -32032
^A `o -32032
^A 'o -32032
^A ^o -32032
^A ~o -32032
^A :o -32032
^A oe -32032
^A /o -32032
^A q -32032
^A t -32032
^A C -32032
^A G -32032
^A 'C -32032
^A ,C -32032
^A Q -32032
^A O -32032
^A `O -32032
^A 'O -32032
^A ^O -32032
^A ~O -32032
^A :O -32032
^A OE -32032
^A /O -32032
^A U -32032
^A `U -32032
^A 'U -32032
^A ^U -32032
^A :U -32032
^A T -96096
^A Y -96096
^A :Y -96096
^A 'Y -96096
^A V -128128
^A W -128128
~A y -32032
~A :y -32032
~A 'y -32032
~A v -32032
~A w -32032
~A c -32032
~A 'c -32032
~A ,c -32032
~A d -32032
~A Sd -32032
~A e -32032
~A `e -32032
~A 'e -32032
~A ^e -32032
~A :e -32032
~A o -32032
~A `o -32032
~A 'o -32032
~A ^o -32032
~A ~o -32032
~A :o -32032
~A oe -32032
~A /o -32032
~A q -32032
~A t -32032
~A C -32032
~A G -32032
~A 'C -32032
~A ,C -32032
~A Q -32032
~A O -32032
~A `O -32032
~A 'O -32032
~A ^O -32032
~A ~O -32032
~A :O -32032
~A OE -32032
~A /O -32032
~A U -32032
~A `U -32032
~A 'U -32032
~A ^U -32032
~A :U -32032
~A T -96096
~A Y -96096
~A :Y -96096
~A 'Y -96096
~A V -128128
~A W -128128
:A y -32032
:A :y -32032
:A 'y -32032
:A v -32032
:A w -32032
:A c -32032
:A 'c -32032
:A ,c -32032
:A d -32032
:A Sd -32032
:A e -32032
:A `e -32032
:A 'e -32032
:A ^e -32032
:A :e -32032
:A o -32032
:A `o -32032
:A 'o -32032
:A ^o -32032
:A ~o -32032
:A :o -32032
:A oe -32032
:A /o -32032
:A q -32032
:A t -32032
:A C -32032
:A G -32032
:A 'C -32032
:A ,C -32032
:A Q -32032
:A O -32032
:A `O -32032
:A 'O -32032
:A ^O -32032
:A ~O -32032
:A :O -32032
:A OE -32032
:A /O -32032
:A U -32032
:A `U -32032
:A 'U -32032
:A ^U -32032
:A :U -32032
:A T -96096
:A Y -96096
:A :Y -96096
:A 'Y -96096
:A V -128128
:A W -128128
oA y -32032
oA :y -32032
oA 'y -32032
oA v -32032
oA w -32032
oA c -32032
oA 'c -32032
oA ,c -32032
oA d -32032
oA Sd -32032
oA e -32032
oA `e -32032
oA 'e -32032
oA ^e -32032
oA :e -32032
oA o -32032
oA `o -32032
oA 'o -32032
oA ^o -32032
oA ~o -32032
oA :o -32032
oA oe -32032
oA /o -32032
oA q -32032
oA t -32032
oA C -32032
oA G -32032
oA 'C -32032
oA ,C -32032
oA Q -32032
oA O -32032
oA `O -32032
oA 'O -32032
oA ^O -32032
oA ~O -32032
oA :O -32032
oA OE -32032
oA /O -32032
oA U -32032
oA `U -32032
oA 'U -32032
oA ^U -32032
oA :U -32032
oA T -96096
oA Y -96096
oA :Y -96096
oA 'Y -96096
oA V -128128
oA W -128128
-D X -32032
-D W -32032
-D A -32032
-D `A -32032
-D 'A -32032
-D ^A -32032
-D ~A -32032
-D :A -32032
-D oA -32032
-D AE -32032
-D V -32032
-D Y -32032
-D :Y -32032
-D 'Y -32032
`O X -32032
`O W -32032
`O A -32032
`O `A -32032
`O 'A -32032
`O ^A -32032
`O ~A -32032
`O :A -32032
`O oA -32032
`O AE -32032
`O V -32032
`O Y -32032
`O :Y -32032
`O 'Y -32032
'O X -32032
'O W -32032
'O A -32032
'O `A -32032
'O 'A -32032
'O ^A -32032
'O ~A -32032
'O :A -32032
'O oA -32032
'O AE -32032
'O V -32032
'O Y -32032
'O :Y -32032
'O 'Y -32032
^O X -32032
^O W -32032
^O A -32032
^O `A -32032
^O 'A -32032
^O ^A -32032
^O ~A -32032
^O :A -32032
^O oA -32032
^O AE -32032
^O V -32032
^O Y -32032
^O :Y -32032
^O 'Y -32032
~O X -32032
~O W -32032
~O A -32032
~O `A -32032
~O 'A -32032
~O ^A -32032
~O ~A -32032
~O :A -32032
~O oA -32032
~O AE -32032
~O V -32032
~O Y -32032
~O :Y -32032
~O 'Y -32032
:O X -32032
:O W -32032
:O A -32032
:O `A -32032
:O 'A -32032
:O ^A -32032
:O ~A -32032
:O :A -32032
:O oA -32032
:O AE -32032
:O V -32032
:O Y -32032
:O :Y -32032
:O 'Y -32032
/O X -32032
/O W -32032
/O A -32032
/O `A -32032
/O 'A -32032
/O ^A -32032
/O ~A -32032
/O :A -32032
/O oA -32032
/O AE -32032
/O V -32032
/O Y -32032
/O :Y -32032
/O 'Y -32032
'Y e -96096
'Y o -96096
'Y r -96096
'Y a -96096
'Y u -96096
'Y n -96096
'Y .i -96096
'Y c -96096
'Y d -96096
'Y g -96096
'Y p -96096
'Y s -96096
'Y v -96096
'Y w -96096
'Y x -96096
'Y z -96096
'Y A -96096
'Y `A -96096
'Y 'A -96096
'Y ^A -96096
'Y ~A -96096
'Y :A -96096
'Y oA -96096
'Y AE -96096
`a r -32032
`a y -32032
`a :y -32032
`a 'y -32032
`a w -32032
'a r -32032
'a y -32032
'a :y -32032
'a 'y -32032
'a w -32032
^a r -32032
^a y -32032
^a :y -32032
^a 'y -32032
^a w -32032
~a r -32032
~a y -32032
~a :y -32032
~a 'y -32032
~a w -32032
:a r -32032
:a y -32032
:a :y -32032
:a 'y -32032
:a w -32032
oa r -32032
oa y -32032
oa :y -32032
oa 'y -32032
oa w -32032
`o e 32032
`o `e 32032
`o 'e 32032
`o ^e 32032
`o :e 32032
`o o 32032
`o `o 32032
`o 'o 32032
`o ^o 32032
`o ~o 32032
`o :o 32032
`o oe 32032
`o /o 32032
`o x -32032
`o d 32032
`o c 32032
`o 'c 32032
`o ,c 32032
`o q 32032
`o r -32032
`o y -32032
`o :y -32032
`o 'y -32032
`o w -32032
'o e 32032
'o `e 32032
'o 'e 32032
'o ^e 32032
'o :e 32032
'o o 32032
'o `o 32032
'o 'o 32032
'o ^o 32032
'o ~o 32032
'o :o 32032
'o oe 32032
'o /o 32032
'o x -32032
'o d 32032
'o c 32032
'o 'c 32032
'o ,c 32032
'o q 32032
'o r -32032
'o y -32032
'o :y -32032
'o 'y -32032
'o w -32032
^o e 32032
^o `e 32032
^o 'e 32032
^o ^e 32032
^o :e 32032
^o o 32032
^o `o 32032
^o 'o 32032
^o ^o 32032
^o ~o 32032
^o :o 32032
^o oe 32032
^o /o 32032
^o x -32032
^o d 32032
^o c 32032
^o 'c 32032
^o ,c 32032
^o q 32032
^o r -32032
^o y -32032
^o :y -32032
^o 'y -32032
^o w -32032
~o e 32032
~o `e 32032
~o 'e 32032
~o ^e 32032
~o :e 32032
~o o 32032
~o `o 32032
~o 'o 32032
~o ^o 32032
~o ~o 32032
~o :o 32032
~o oe 32032
~o /o 32032
~o x -32032
~o d 32032
~o c 32032
~o 'c 32032
~o ,c 32032
~o q 32032
~o r -32032
~o y -32032
~o :y -32032
~o 'y -32032
~o w -32032
:o e 32032
:o `e 32032
:o 'e 32032
:o ^e 32032
:o :e 32032
:o o 32032
:o `o 32032
:o 'o 32032
:o ^o 32032
:o ~o 32032
:o :o 32032
:o oe 32032
:o /o 32032
:o x -32032
:o d 32032
:o c 32032
:o 'c 32032
:o ,c 32032
:o q 32032
:o r -32032
:o y -32032
:o :y -32032
:o 'y -32032
:o w -32032
/o e 32032
/o `e 32032
/o 'e 32032
/o ^e 32032
/o :e 32032
/o o 32032
/o `o 32032
/o 'o 32032
/o ^o 32032
/o ~o 32032
/o :o 32032
/o oe 32032
/o /o 32032
/o x -32032
/o d 32032
/o c 32032
/o 'c 32032
/o ,c 32032
/o q 32032
/o r -32032
/o y -32032
/o :y -32032
/o 'y -32032
/o w -32032
`u w -32032
'u w -32032
^u w -32032
:u w -32032
'y o -32032
'y `o -32032
'y 'o -32032
'y ^o -32032
'y ~o -32032
'y :o -32032
'y oe -32032
'y /o -32032
'y e -32032
'y `e -32032
'y 'e -32032
'y ^e -32032
'y :e -32032
'y a -32032
'y `a -32032
'y 'a -32032
'y ^a -32032
'y ^a -32032
'y ~a -32032
'y :a -32032
'y oa -32032
'y ae -32032
'y . -96096
'y , -96096
charset
ga 576576,698880 2 0000
aa 576576,698880 2 0001
a^ 576576,698880 2 0002
a~ 576576,698880 2 0003
ad 576576,728000 2 0004
a" 576576,698880,0,14555 2 0005
ao 768768,698880 2 0006
ah 576576,698880 2 0007
ab 576576,698880 2 0010
a- 576576,728000 2 0011
a. 320320,755976 2 0012
ac 512512,0,178360 1 0013
ho 320320,0,203840 1 0014
bq 320320,136864,110656 1 0015
fo 512512,524160 2 0016
fc 512512,524160 2 0017
lq 393120,755976 2 0020
rq 393120,755976 2 0021
Bq 393120,136864,110656 1 0022
Fo 768768,524160 2 0023
Fc 768768,524160 2 0024
en 576576,480480,0,32032 0 0025
em 1153152,480480,0,32032 0 0026
--- 0,480480 0 0027
--- 512512,782600,29120 3 0030
.i 267904,480480 0 0031
.j 299936,480480,203840 1 0032
ff 672672,755976,0,80080 2 0033
fi 614432,755976 2 0034
fl 614432,755976 2 0035
Fi 934752,755976 2 0036
Fl 934752,755976 2 0037
--- 576576,480480,101920 1 0040
! 384384,755976 2 0041
dq 576576,755976 2 0042
" "
sh 960960,755976,232960 3 0043
# "
Do 576576,782600,29120 3 0044
$ "
% 1078840,782600,29120 3 0045
& 870688,755976 2 0046
cq 320320,755976 2 0047
' "
( 448448,782600,262080 3 0050
) 448448,782600,262080 3 0051
* 576576,782600 2 0052
pl 896896,646464,122304 3 0053
+ "
, 320320,136864,110656 1 0054
- 384384,480480 0 0055
. 320320,136864 0 0056
sl 576576,782600,262080 3 0057
/ "
0 576576,728000 2 0060
1 576576,728000 2 0061
2 576576,728000 2 0062
3 576576,728000 2 0063
4 576576,728000 2 0064
5 576576,728000 2 0065
6 576576,728000 2 0066
7 576576,728000 2 0067
8 576576,728000 2 0070
9 576576,728000 2 0071
: 320320,480480 0 0072
; 320320,480480,110656 1 0073
< 896896,636091,111931 3 0074
eq 896896,425880,-98280 0 0075
= "
> 896896,636091,111931 3 0076
? 544544,755976 2 0077
at 768768,755976 2 0100
@ "
A 768768,728000 2 0101
B 768768,728000 2 0102
C 736736,728000,0,0,-32032 2 0103
D 832832,728000,0,0,0,-32032 2 0104
E 672672,728000 2 0105
F 640640,728000,0,0,0,-160160 2 0106
G 768768,728000,0,0,-32032 2 0107
H 832832,728000 2 0110
I 340704,728000 2 0111
J 544544,728000,0,0,0,-32032 2 0112
K 800800,728000 2 0113
L 608608,728000,0,0,0,64064 2 0114
M 1025024,728000 2 0115
N 832832,728000 2 0116
O 832832,728000,0,0,-32032,-32032 2 0117
P 736736,728000,0,0,0,-160160 2 0120
Q 832832,728000,110656,0,-32032 3 0121
R 736736,728000 2 0122
S 640640,728000 2 0123
T 768768,728000,0,0,0,-160160 2 0124
U 800800,728000,0,0,32032 2 0125
V 768768,728000,0,16016,48048,-240240 2 0126
W 1089088,728000,0,16016,48048,-144144 2 0127
X 768768,728000 2 0130
Y 768768,728000,0,28829,32032,-227427 2 0131
Z 704704,728000 2 0132
lB 359632,782600,262080 3 0133
[ "
rs 576576,782600,262080 3 0134
\ "
rB 359632,782600,262080 3 0135
] "
ha 704704,755976 2 0136
^ "
_ 896896,0,352171 1 0137
oq 320320,755976 2 0140
` "
a 550368,480480 0 0141
b 588224,755976 2 0142
c 512512,480480 0 0143
d 588224,755976 2 0144
e 535808,480480 0 0145
f 352352,755976,0,80080 2 0146
g 576576,480480,203840,16016 1 0147
h 588224,755976 2 0150
i 267904,755976 2 0151
j 299936,755976,203840 3 0152
k 556192,755976 2 0153
l 267904,755976 2 0154
m 908544,480480 0 0155
n 588224,480480 0 0156
o 576576,480480 0 0157
p 588224,480480,203840 1 0160
q 588224,480480,203840 1 0161
r 390208,480480,0,16016 0 0162
s 442042,480480 0 0163
t 423696,617763 2 0164
u 588224,480480 0 0165
v 524160,480480,0,16016 0 0166
w 780416,480480,0,16016 0 0167
x 524160,480480 0 0170
y 524160,480480,203840,16016 1 0171
z 499408,480480 0 0172
lC 576576,782600,262080 3 0173
{ "
ba 320320,782600,262080 3 0174
bv "
or "
| "
rC 576576,782600,262080 3 0175
} "
~ 704704,755976 2 0176
hy 192192,480480 0 0177
--- 768768,946400 2 0200
--- 768768,728000,203840 3 0201
'C 736736,905917 2 0202
--- 736736,946400,0,0,-32032 2 0203
--- 832832,946400,0,0,0,-32032 2 0204
--- 672672,946400 2 0205
--- 672672,728000,203840 3 0206
--- 768768,946400,0,0,-32032 2 0207
--- 608608,905917,0,0,0,64064 2 0210
--- 608608,946400,0,0,0,64064 2 0211
/L 704704,728000 2 0212
--- 832832,905917 2 0213
--- 832832,946400 2 0214
--- 864864,728000,0,0,0,-32032 2 0215
--- 832832,905917,0,0,-32032,-32032 2 0216
--- 736736,905917 2 0217
--- 736736,946400 2 0220
--- 640640,905917 2 0221
vS 640640,946400 2 0222
--- 640640,728000,178360 3 0223
--- 768768,946400,0,0,0,-160160 2 0224
--- 768768,728000,178360,0,0,-160160 3 0225
--- 800800,905917,0,0,32032 2 0226
--- 800800,946400,0,0,32032 2 0227
:Y 768768,946400,0,28829,32032,-227427 2 0230
--- 704704,905917 2 0231
vZ 704704,946400 2 0232
--- 704704,905917 2 0233
IJ 853216,728000,0,0,0,-32032 2 0234
--- 340704,905917 2 0235
--- 588224,755976 2 0236
sc 559104,755976,203840 3 0237
--- 550368,698880 2 0240
--- 550368,480480,203840 1 0241
'c 512512,698880 2 0242
--- 512512,698880 2 0243
--- 767312,755976 2 0244
--- 535808,698880 2 0245
--- 535808,480480,203840 1 0246
--- 576576,698880,203840,16016 3 0247
--- 267904,905917,0,123075 2 0250
--- 446992,755976 2 0251
/l 399818,755976,0,29120 2 0252
--- 588224,698880 2 0253
--- 588224,698880 2 0254
--- 588224,480480,203840 1 0255
--- 576576,698880,0,14555 2 0256
--- 390208,698880,0,16016 2 0257
--- 390208,698880,0,16016 2 0260
--- 442042,698880 2 0261
vs 442042,698880 2 0262
--- 442042,480480,178360 1 0263
--- 423696,755976 2 0264
--- 423696,617763,178360 3 0265
--- 588224,698880,0,8730 2 0266
--- 588224,698880 2 0267
:y 524160,728000,203840,16016 3 0270
--- 499408,698880 2 0271
vz 499408,698880 2 0272
--- 499408,755976 2 0273
ij 620256,755976,203840 3 0274
r! 384384,553280,203840 3 0275
r? 544544,553280,203840 3 0276
Po 736736,755976 2 0277
`A 768768,905917 2 0300
'A 768768,905917 2 0301
^A 768768,946400 2 0302
~A 768768,946400 2 0303
:A 768768,946400 2 0304
oA 768768,905917 2 0305
AE 992992,728000 2 0306
,C 736736,728000,178360,0,-32032 3 0307
`E 672672,905917 2 0310
'E 672672,905917 2 0311
^E 672672,946400 2 0312
:E 672672,946400 2 0313
`I 340704,905917 2 0314
'I 340704,905917,0,85210,0,42605 2 0315
^I 340704,946400 2 0316
:I 340704,946400 2 0317
-D 832832,728000,0,0,0,-32032 2 0320
~N 832832,946400 2 0321
`O 832832,905917,0,0,-32032,-32032 2 0322
'O 832832,905917 2 0323
^O 832832,946400,0,0,-32032,-32032 2 0324
~O 832832,946400,0,0,-32032,-32032 2 0325
:O 832832,946400,0,0,-32032,-32032 2 0326
OE 1121120,728000 2 0327
/O 896896,782600,50960 3 0330
`U 800800,905917,0,0,32032 2 0331
'U 800800,905917 2 0332
^U 800800,946400,0,0,32032 2 0333
:U 800800,946400,0,0,32032 2 0334
'Y 768768,905917,0,28829,32032,-227427 2 0335
TP 672672,728000 2 0336
--- 1281280,728000 2 0337
`a 550368,698880 2 0340
'a 550368,698880 2 0341
^a 550368,698880 2 0342
~a 550368,698880 2 0343
:a 550368,728000 2 0344
oa 550368,698880 2 0345
ae 832832,480480 0 0346
,c 512512,480480,178360 1 0347
`e 535808,698880 2 0350
'e 535808,698880 2 0351
^e 535808,698880 2 0352
:e 535808,728000 2 0353
`i 267904,698880 2 0354
'i 267904,698880,0,43683 2 0355
^i 267904,698880 2 0356
:i 331968,728000 2 0357
Sd 576576,755976 2 0360
~n 588224,698880 2 0361
`o 576576,698880 2 0362
'o 576576,698880 2 0363
^o 576576,698880 2 0364
~o 576576,698880 2 0365
:o 576576,728000 2 0366
oe 896896,480480 0 0367
/o 576576,582400,101920 3 0370
`u 588224,698880 2 0371
'u 588224,698880 2 0372
^u 588224,698880 2 0373
:u 588224,728000 2 0374
'y 524160,698880,203840,16016 3 0375
Tp 588224,755976,203840 3 0376
ss 592592,755976 2 0377
1.18.1.4/font/devdvi/CWI 0000666 00000010603 15047753021 0010240 0 ustar 00 name CWI
internalname cmitt10
spacewidth 550498
slant 14.036243
checksum -538297224
designsize 10485760
charset
*G 550498,640797,0,182045 2 0000
*D 550498,640797,0,182045 2 0001
*H 550498,640797,0,182045 2 0002
*L 550498,640797,0,182045 2 0003
*C 550498,640797,0,182045 2 0004
*P 550498,640797,0,182045 2 0005
*S 550498,640797,0,182045 2 0006
*U 550498,640797,0,182045 2 0007
*F 550498,640797,0,182045 2 0010
*Q 550498,640797,0,182045 2 0011
*W 550498,640797,0,182045 2 0012
ff 550498,640797,0,182045 2 0013
fi 550498,640797,0,182045 2 0014
fl 550498,640797,0,182045 2 0015
Fi 550498,407779,233018,182045 1 0016
Fl 550498,407779,233018,182045 1 0017
.i 550498,451470,0,182045 0 0020
.j 550498,451470,233018,182045 1 0021
ga 550498,640797,0,182045 2 0022
aa 550498,640797,0,182045 2 0023
ah 550498,593466,0,182045 2 0024
ab 550498,640797,0,182045 2 0025
a- 550498,593027,0,182045 2 0026
ao 550498,640797,0,182045 2 0027
ac 550498,0,203891,182045 1 0030
ss 550498,640797,233018,182045 3 0031
ae 550498,451470,0,182045 0 0032
oe 550498,451470,0,182045 0 0033
/o 550498,567979,116509,182045 3 0034
AE 550498,640797,0,182045 2 0035
OE 550498,640797,0,182045 2 0036
/O 550498,699051,58254,182045 3 0037
--- 550498,230104,116509,182045 1 0040
! 550498,640797,0,182045 2 0041
dq 550498,640797,0,182045 2 0042
" "
sh 550498,640797,0,182045 2 0043
# "
Do 550498,640797,0,182045 2 0044
$ "
% 550498,728178,87381,182045 3 0045
& 550498,640797,0,182045 2 0046
cq 550498,640797,0,182045 2 0047
' "
( 550498,728178,87379,182045 3 0050
) 550498,728178,87379,182045 3 0051
* 550498,546134,0,182045 2 0052
+ 550498,556326,-84470,182045 2 0053
, 550498,131072,145635,182045 1 0054
\- 550498,556326,-84470,182045 2 0055
- "
. 550498,131072,0,182045 0 0056
sl 550498,728178,87379,182045 3 0057
/ "
0 550498,640797,0,182045 2 0060
1 550498,640797,0,182045 2 0061
2 550498,640797,0,182045 2 0062
3 550498,640797,0,182045 2 0063
4 550498,640797,233018,182045 3 0064
5 550498,640797,0,182045 2 0065
6 550498,640797,0,182045 2 0066
7 550498,640797,233018,182045 3 0067
8 550498,640797,0,182045 2 0070
9 550498,640797,0,182045 2 0071
: 550498,451470,0,182045 0 0072
; 550498,451470,145635,182045 1 0073
< 550498,582542,-58254,182045 2 0074
= 550498,435813,-204984,182045 0 0075
> 550498,582542,-58254,182045 2 0076
? 550498,640797,0,182045 2 0077
at 550498,640797,0,182045 2 0100
@ "
A 550498,640797,0,182045 2 0101
B 550498,640797,0,182045 2 0102
C 550498,640797,0,182045 2 0103
D 550498,640797,0,182045 2 0104
E 550498,640797,0,182045 2 0105
F 550498,640797,0,182045 2 0106
G 550498,640797,0,182045 2 0107
H 550498,640797,0,182045 2 0110
I 550498,640797,0,182045 2 0111
J 550498,640797,0,182045 2 0112
K 550498,640797,0,182045 2 0113
L 550498,640797,0,182045 2 0114
M 550498,640797,0,182045 2 0115
N 550498,640797,0,182045 2 0116
O 550498,640797,0,182045 2 0117
P 550498,640797,0,182045 2 0120
Q 550498,640797,145635,182045 3 0121
R 550498,640797,0,182045 2 0122
S 550498,640797,0,182045 2 0123
T 550498,640797,0,182045 2 0124
U 550498,640797,0,182045 2 0125
V 550498,640797,0,182045 2 0126
W 550498,640797,0,182045 2 0127
X 550498,640797,0,182045 2 0130
Y 550498,640797,0,182045 2 0131
Z 550498,640797,0,182045 2 0132
lB 550498,728178,87379,182045 3 0133
[ "
rs 550498,728178,87379,182045 3 0134
\ "
rB 550498,728178,87379,182045 3 0135
] "
ha 550498,640797,0,182045 2 0136
^ "
a^ "
_ 550498,0,99757,182045 1 0137
oq 550498,640797,0,182045 2 0140
` "
a 550498,451470,0,182045 0 0141
b 550498,640797,0,182045 2 0142
c 550498,451470,0,182045 0 0143
d 550498,640797,0,182045 2 0144
e 550498,451470,0,182045 0 0145
f 550498,640797,233018,182045 3 0146
g 550498,451470,233018,182045 1 0147
h 550498,640797,0,182045 2 0150
i 550498,640797,0,182045 2 0151
j 550498,640797,233018,182045 3 0152
k 550498,640797,0,182045 2 0153
l 550498,640797,0,182045 2 0154
m 550498,451470,0,182045 0 0155
n 550498,451470,0,182045 0 0156
o 550498,451470,0,182045 0 0157
p 550498,451470,233018,182045 1 0160
q 550498,451470,233018,182045 1 0161
r 550498,451470,0,182045 0 0162
s 550498,451470,0,182045 0 0163
t 550498,640797,0,182045 2 0164
u 550498,451470,0,182045 0 0165
v 550498,451470,0,182045 0 0166
w 550498,451470,0,182045 0 0167
x 550498,451470,0,182045 0 0170
y 550498,451470,233018,182045 1 0171
z 550498,451470,0,182045 0 0172
{ 550498,728178,87379,182045 3 0173
lC "
| 550498,728178,87379,182045 3 0174
ba "
} 550498,728178,87379,182045 3 0175
rC "
~ 550498,640797,0,182045 2 0176
a~ "
--- 550498,640797,0,182045 2 0177
1.18.1.4/font/devdvi/S 0000666 00000007662 15047753021 0010033 0 ustar 00 name S
special
internalname cmsy10
slant 14.036243
checksum 555887770
designsize 10485760
charset
mi 815562,611670,87382 3 0000
\- "
pc 291272,466035,-58253 2 0001
md "
tmu 815562,611670,87382 3 0002
mu "
** 524290,487880,-36408 2 0003
tdi 815562,611670,87382 3 0004
di "
--- 524290,466035,-58253 2 0005
t+- 815562,611670,87382 3 0006
+- "
-+ 815562,611670,87382 3 0007
c+ 815562,611670,87382 3 0010
--- 815562,611670,87382 3 0011
c* 815562,611670,87382 3 0012
--- 815562,611670,87382 3 0013
--- 815562,611670,87382 3 0014
ci 1048579,728178,203890 3 0015
--- 524290,466035,-58253 2 0016
bu 524290,466035,-58253 2 0017
--- 815562,486275,-38013 2 0020
== 815562,486275,-38013 2 0021
ib 815562,666864,142576 3 0022
ip 815562,666864,142576 3 0023
<= 815562,666864,142576 3 0024
>= 815562,666864,142576 3 0025
--- 815562,666864,142576 3 0026
--- 815562,666864,142576 3 0027
ti 815562,384696,-139592 0 0030
ap "
~~ 815562,506590,-17698 2 0031
sb 815562,565285,40997 3 0032
sp 815562,565285,40997 3 0033
<< 1048579,565285,40997 3 0034
>> 1048579,565285,40997 3 0035
--- 815562,565285,40997 3 0036
--- 815562,565285,40997 3 0037
<- 1048579,384696,-139592 0 0040
-> 1048579,384696,-139592 0 0041
ua 524290,728178,203888 3 0042
da 524290,728178,203888 3 0043
<> 1048579,384696,-139592 0 0044
--- 1048579,728178,203888 3 0045
--- 1048579,728178,203888 3 0046
~= 815562,486275,-38013 2 0047
lh 1048579,384696,-139592 0 0050
lA "
rh 1048579,384696,-139592 0 0051
rA "
uA 640798,728178,203888 3 0052
dA 640798,728178,203888 3 0053
hA 1048579,384696,-139592 0 0054
--- 1048579,728178,203888 3 0055
--- 1048579,728178,203888 3 0056
pt 815562,451470 0 0057
prime 288358,582544 2 0060
if 1048579,451470 0 0061
mo 699053,565285,40997 3 0062
st 699053,565285,40997 3 0063
--- 932070,728178,203890 3 0064
--- 932070,728178,203890 3 0065
slashnot 0,728178,203888 3 0066
--- 0,384696,-139592 0 0067
fa 582544,728178 2 0070
te 582544,728178 2 0071
no 699053,451470 0 0072
es 524290,786432,58254 3 0073
Re 757307,728178 2 0074
Im 757307,728178 2 0075
--- 815562,728178 2 0076
pp 815562,728178 2 0077
Ah 640798,728178 2 0100
A 837258,716526 2 0101
B 688715,716526,0,31890 2 0102
C 552106,716526,0,61170 2 0103
D 808864,716526,0,29128 2 0104
E 553419,716526,0,93786 2 0105
F 753662,716526,0,104130 2 0106
G 623762,716526,101946,62184 3 0107
H 885541,716526,0,10123 2 0110
I 570966,716526,0,77408 2 0111
J 710704,716526,101946,193694 3 0112
K 798963,716526,0,15147 2 0113
L 723229,716526 2 0114
M 1259235,716526 2 0115
N 860347,716526,0,154518 2 0116
O 834786,716526,0,29128 2 0117
P 729347,716526,0,86216 2 0120
Q 856341,716526,101946 3 0121
R 888672,716526 2 0122
S 634974,716526,0,78638 2 0123
T 571101,716526,0,266514 2 0124
U 656232,716526,0,104130 2 0125
V 642549,716526,0,86216 2 0126
W 1035766,716526,0,86216 2 0127
X 747946,716526,0,153541 2 0130
Y 700802,716526,101946,86216 3 0131
Z 759930,716526,0,83302 2 0132
cu 699053,582544 2 0133
ca 699053,582544 2 0134
--- 699053,582544 2 0135
AN 699053,582544 2 0136
OR 699053,582544 2 0137
--- 640798,728178 2 0140
--- 640798,728178 2 0141
lf 466035,786432,262144 3 0142
rf 466035,786432,262144 3 0143
lc 466035,786432,262144 3 0144
rc 466035,786432,262144 3 0145
{ 524290,786432,262144 3 0146
lC "
} 524290,786432,262144 3 0147
rC "
la 407781,786432,262144 3 0150
ra 407781,786432,262144 3 0151
bar 291272,786432,262144 3 0152
or "
bv "
| "
ba "
bardbl 524290,786432,262144 3 0153
va 524290,786432,262144 3 0154
vA 640798,786432,262144 3 0155
rs 524290,786432,262144 3 0156
\ "
--- 291272,728178,203888 3 0157
sr 873816,41942,1006634 1 0160
--- 786434,716526 2 0161
gr 873816,716526 2 0162
--- 436909,728178,203890,116509 3 0163
--- 699053,582544 2 0164
--- 699053,582544 2 0165
--- 815562,666864,142576 3 0166
--- 815562,666864,142576 3 0167
sc 466037,728178,203890 3 0170
dg 466035,728178,203890 3 0171
dd 466035,728178,203890 3 0172
ps 640798,728178,203890 3 0173
CL 815562,728178,135926 3 0174
DI 815562,728178,135926 3 0175
HE 815562,728178,135926 3 0176
SP 815562,728178,135926 3 0177
1.18.1.4/font/devX75/CR 0000666 00000005324 15047753021 0007727 0 ustar 00 name CR
spacewidth 6
charset
--- 6,5 0 00
--- 6,1 0 040
! 6,7 0 041
" 6,7 0 042
dq "
# 6,7 0 043
sh "
$ 6,7,1 0 044
Do "
% 6,6 0 045
& 6,6 0 046
' 6,7 0 047
cq "
( 6,7,2 0 050
) 6,7,2 0 051
* 6,7 0 052
+ 6,6 0 053
, 6,1,2 0 054
\- 6,4 0 055
. 6,1 0 056
/ 6,7,1 0 057
sl "
0 6,7 0 060
1 6,7 0 061
2 6,7 0 062
3 6,7 0 063
4 6,7 0 064
5 6,7 0 065
6 6,7 0 066
7 6,7 0 067
8 6,7 0 070
9 6,7 0 071
: 6,4 0 072
; 6,4,2 0 073
< 6,6 0 074
= 6,5 0 075
eq "
> 6,6 0 076
? 6,6 0 077
@ 6,7,1 0 0100
at "
A 6,6 0 0101
B 6,6 0 0102
C 6,6 0 0103
D 6,6 0 0104
E 6,6 0 0105
F 6,6 0 0106
G 6,6 0 0107
H 6,6 0 0110
I 6,6 0 0111
J 6,6 0 0112
K 6,6 0 0113
L 6,6 0 0114
M 6,6 0 0115
N 6,6 0 0116
O 6,6 0 0117
P 6,6 0 0120
Q 6,6,1 0 0121
R 6,6 0 0122
S 6,6 0 0123
T 6,6 0 0124
U 6,6 0 0125
V 6,6 0 0126
W 6,6 0 0127
X 6,6 0 0130
Y 6,6 0 0131
Z 6,6 0 0132
[ 6,7,2 0 0133
lB "
\ 6,7,1 0 0134
rs "
] 6,7,2 0 0135
rB "
^ 6,7 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 6,8 0 0140
oq "
a 6,5 0 0141
b 6,7 0 0142
c 6,5 0 0143
d 6,7 0 0144
e 6,5 0 0145
f 6,7 0 0146
g 6,5,2 0 0147
h 6,7 0 0150
i 6,7 0 0151
j 6,7,2 0 0152
k 6,7 0 0153
l 6,7 0 0154
m 6,5 0 0155
n 6,5 0 0156
o 6,5 0 0157
p 6,5,2 0 0160
q 6,5,2 0 0161
r 6,5 0 0162
s 6,5 0 0163
t 6,7 0 0164
u 6,5 0 0165
v 6,5 0 0166
w 6,5 0 0167
x 6,5 0 0170
y 6,5,2 0 0171
z 6,5 0 0172
{ 6,7,2 0 0173
lC "
| 6,7,2 0 0174
or "
ba "
} 6,7,2 0 0175
rC "
~ 6,5 0 0176
a~ "
ap "
ti "
--- 6,1 0 0240
r! 6,5,2 0 0241
ct 6,7,1 0 0242
Po 6,7 0 0243
Cs 6,6 0 0244
Ye 6,7 0 0245
bb 6,7,2 0 0246
sc 6,6,1 0 0247
ad 6,7 0 0250
co 6,7 0 0251
Of 6,6 0 0252
Fo 6,4 0 0253
no 6,5 0 0254
- 6,4 0 0255
hy "
rg 6,7 0 0256
a- 6,7 0 0257
de 6,7 0 0260
t+- 6,6 0 0261
S2 6,7 0 0262
S3 6,7 0 0263
aa 6,8 0 0264
mc 6,5,2 0 0265
ps 6,6,1 0 0266
pc 6,4 0 0267
ac 6,1,2 0 0270
S1 6,7 0 0271
Om 6,6 0 0272
Fc 6,4 0 0273
14 6,8,1 0 0274
12 6,8,1 0 0275
34 6,8,1 0 0276
r? 6,4,2 0 0277
`A 6,9 0 0300
'A 6,9 0 0301
^A 6,9 0 0302
~A 6,9 0 0303
:A 6,8 0 0304
oA 6,9 0 0305
AE 6,6 0 0306
,C 6,6,2 0 0307
`E 6,9 0 0310
'E 6,9 0 0311
^E 6,9 0 0312
:E 6,8 0 0313
`I 6,9 0 0314
'I 6,9 0 0315
^I 6,9 0 0316
:I 6,8 0 0317
-D 6,6 0 0320
~N 6,9 0 0321
`O 6,9 0 0322
'O 6,9 0 0323
^O 6,9 0 0324
~O 6,9 0 0325
:O 6,8 0 0326
tmu 6,6 0 0327
/O 6,6 0 0330
`U 6,9 0 0331
'U 6,9 0 0332
^U 6,9 0 0333
:U 6,8 0 0334
'Y 6,9 0 0335
TP 6,6 0 0336
ss 6,7 0 0337
`a 6,8 0 0340
'a 6,8 0 0341
^a 6,8 0 0342
~a 6,8 0 0343
:a 6,7 0 0344
oa 6,9 0 0345
ae 6,5 0 0346
,c 6,5,2 0 0347
`e 6,8 0 0350
'e 6,8 0 0351
^e 6,8 0 0352
:e 6,7 0 0353
`i 6,8 0 0354
'i 6,8 0 0355
^i 6,8 0 0356
:i 6,7 0 0357
Sd 6,8 0 0360
~n 6,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,7 0 0366
tdi 6,6 0 0367
/o 6,5 0 0370
`u 6,8 0 0371
'u 6,8 0 0372
^u 6,8 0 0373
:u 6,7 0 0374
'y 6,8,2 0 0375
Tp 6,7,2 0 0376
:y 6,7,2 0 0377
1.18.1.4/font/devX75/TR 0000666 00000005342 15047753021 0007750 0 ustar 00 name TR
spacewidth 2
charset
--- 8,7 0 00
--- 2,1 0 040
! 3,7 0 041
" 4,7 0 042
dq "
# 5,7 0 043
sh "
$ 5,8,1 0 044
Do "
% 8,7 0 045
& 8,7 0 046
' 2,7 0 047
cq "
( 4,7,2 0 050
) 4,7,2 0 051
* 5,7 0 052
+ 6,5 0 053
, 3,1,2 0 054
\- 4,3 0 055
. 3,1 0 056
/ 3,7 0 057
sl "
0 5,7 0 060
1 5,7 0 061
2 5,7 0 062
3 5,7 0 063
4 5,7 0 064
5 5,7 0 065
6 5,7 0 066
7 5,7 0 067
8 5,7 0 070
9 5,7 0 071
: 3,5 0 072
; 3,5,2 0 073
< 5,5 0 074
= 6,4 0 075
eq "
> 5,5 0 076
? 4,7 0 077
@ 9,7,2 0 0100
at "
A 8,7 0 0101
B 6,7 0 0102
C 7,7 0 0103
D 7,7 0 0104
E 6,7 0 0105
F 6,7 0 0106
G 7,7 0 0107
H 8,7 0 0110
I 4,7 0 0111
J 4,7 0 0112
K 7,7 0 0113
L 6,7 0 0114
M 10,7 0 0115
N 8,7 0 0116
O 7,7 0 0117
P 6,7 0 0120
Q 7,7,2 0 0121
R 7,7 0 0122
S 5,7 0 0123
T 6,7 0 0124
U 8,7 0 0125
V 8,7 0 0126
W 10,7 0 0127
X 8,7 0 0130
Y 8,7 0 0131
Z 6,7 0 0132
[ 3,7,2 0 0133
lB "
\ 3,7 0 0134
rs "
] 3,7,2 0 0135
rB "
^ 5,7 0 0136
a^ "
ha "
_ 5,0,3 0 0137
` 3,8 0 0140
oq "
a 4,5 0 0141
b 5,7 0 0142
c 4,5 0 0143
d 5,7 0 0144
e 4,5 0 0145
f 4,7 0 0146
g 5,5,2 0 0147
h 5,7 0 0150
i 3,7 0 0151
j 3,7,2 0 0152
k 5,7 0 0153
l 4,7 0 0154
m 8,5 0 0155
n 5,5 0 0156
o 5,5 0 0157
p 5,5,2 0 0160
q 5,5,2 0 0161
r 4,5 0 0162
s 4,5 0 0163
t 4,6 0 0164
u 5,5 0 0165
v 5,5 0 0166
w 8,5 0 0167
x 6,5 0 0170
y 5,5,2 0 0171
z 5,5 0 0172
{ 4,7,2 0 0173
lC "
| 2,7,2 0 0174
or "
ba "
} 4,7,2 0 0175
rC "
~ 7,4 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 3,5,2 0 0241
ct 5,6,1 0 0242
Po 5,7 0 0243
Cs 5,7 0 0244
Ye 5,7 0 0245
bb 2,7 0 0246
sc 5,8,1 0 0247
ad 5,7 0 0250
co 9,7 0 0251
Of 4,7 0 0252
Fo 5,5 0 0253
no 7,4 0 0254
- 4,3 0 0255
hy "
rg 9,7 0 0256
a- 4,7 0 0257
de 4,7 0 0260
t+- 6,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 3,7 0 0264
mc 5,5,2 0 0265
ps 6,7,2 0 0266
pc 2,3 0 0267
ac 4,0,3 0 0270
S1 3,7 0 0271
Om 4,7 0 0272
Fc 5,5 0 0273
14 8,7 0 0274
12 8,7 0 0275
34 8,7 0 0276
r? 4,5,2 0 0277
`A 8,10 0 0300
'A 8,10 0 0301
^A 8,10 0 0302
~A 8,10 0 0303
:A 8,9 0 0304
oA 8,10 0 0305
AE 9,7 0 0306
,C 7,7,3 0 0307
`E 6,10 0 0310
'E 6,10 0 0311
^E 6,10 0 0312
:E 6,9 0 0313
`I 4,10 0 0314
'I 4,10 0 0315
^I 4,10 0 0316
:I 4,9 0 0317
-D 7,7 0 0320
~N 8,10 0 0321
`O 7,10 0 0322
'O 7,10 0 0323
^O 7,10 0 0324
~O 7,10 0 0325
:O 7,9 0 0326
tmu 6,5 0 0327
/O 8,8,1 0 0330
`U 8,10 0 0331
'U 8,10 0 0332
^U 8,10 0 0333
:U 8,9 0 0334
'Y 8,10 0 0335
TP 6,7 0 0336
ss 5,7 0 0337
`a 4,8 0 0340
'a 4,8 0 0341
^a 4,8 0 0342
~a 4,8 0 0343
:a 4,7 0 0344
oa 4,8 0 0345
ae 6,5 0 0346
,c 4,5,3 0 0347
`e 4,8 0 0350
'e 4,8 0 0351
^e 4,8 0 0352
:e 4,7 0 0353
`i 4,8 0 0354
'i 4,8 0 0355
^i 4,8 0 0356
:i 4,7 0 0357
Sd 5,8 0 0360
~n 5,8 0 0361
`o 5,8 0 0362
'o 5,8 0 0363
^o 5,8 0 0364
~o 5,8 0 0365
:o 5,7 0 0366
tdi 6,5 0 0367
/o 5,6,1 0 0370
`u 5,8 0 0371
'u 5,8 0 0372
^u 5,8 0 0373
:u 5,7 0 0374
'y 5,8,2 0 0375
Tp 5,7,2 0 0376
:y 5,7,2 0 0377
1.18.1.4/font/devX75/M 0000666 00000000101 15047753021 0007603 0 ustar 00 name M
spacewidth 2
charset
u2E00..u9FFF 10 0
uFF00..uFFEF 10 0
1.18.1.4/font/devX75/DESC 0000666 00000000624 15047753021 0010137 0 ustar 00 styles R I B BI
fonts 8 0 0 0 0 0 S M G
fontset B G 2E00..9FFF
fontset CB G 2E00..9FFF
fontset HB G 2E00..9FFF
fontset NB G 2E00..9FFF
fontset TB G 2E00..9FFF
fontset - M 2E00..9FFF
fontset B G FF00..FFEF
fontset CB G FF00..FFEF
fontset HB G FF00..FFEF
fontset NB G FF00..FFEF
fontset TB G FF00..FFEF
fontset - M FF00..FFEF
sizes 8 10 12 14 18 24 0
res 75
X11
hor 1
vert 1
unitwidth 10
postpro gxditview
1.18.1.4/font/devX75/NB 0000666 00000005346 15047753021 0007726 0 ustar 00 name NB
spacewidth 2
charset
--- 10,7 0 00
--- 2,1 0 040
! 3,8 0 041
" 6,8 0 042
dq "
# 8,8 0 043
sh "
$ 6,9,1 0 044
Do "
% 11,8 0 045
& 9,8 0 046
' 4,8 0 047
cq "
( 5,8,2 0 050
) 5,8,2 0 051
* 6,8 0 052
+ 6,6 0 053
, 3,2,2 0 054
\- 4,4 0 055
. 3,2 0 056
/ 5,8 0 057
sl "
0 6,8 0 060
1 6,8 0 061
2 6,8 0 062
3 6,8 0 063
4 6,8 0 064
5 6,8 0 065
6 6,8 0 066
7 6,8 0 067
8 6,8 0 070
9 6,8 0 071
: 3,5 0 072
; 3,5,2 0 073
< 7,6 0 074
= 6,5 0 075
eq "
> 7,6 0 076
? 6,8 0 077
@ 10,8 0 0100
at "
A 8,8 0 0101
B 8,8 0 0102
C 8,8 0 0103
D 9,8 0 0104
E 7,8 0 0105
F 7,8 0 0106
G 8,8 0 0107
H 10,8 0 0110
I 5,8 0 0111
J 7,8 0 0112
K 9,8 0 0113
L 7,8 0 0114
M 12,8 0 0115
N 9,8 0 0116
O 8,8 0 0117
P 8,8 0 0120
Q 8,8,1 0 0121
R 9,8 0 0122
S 7,8 0 0123
T 7,8 0 0124
U 9,8 0 0125
V 9,8 0 0126
W 12,8 0 0127
X 9,8 0 0130
Y 9,8 0 0131
Z 7,8 0 0132
[ 4,8,2 0 0133
lB "
\ 5,8 0 0134
rs "
] 4,8,2 0 0135
rB "
^ 6,8 0 0136
a^ "
ha "
_ 5,0,2 0 0137
` 4,8 0 0140
oq "
a 5,5 0 0141
b 7,8 0 0142
c 6,5 0 0143
d 7,8 0 0144
e 6,5 0 0145
f 5,8 0 0146
g 6,6,2 0 0147
h 7,8 0 0150
i 5,8 0 0151
j 5,8,2 0 0152
k 6,8 0 0153
l 5,8 0 0154
m 11,5 0 0155
n 7,5 0 0156
o 7,5 0 0157
p 7,5,2 0 0160
q 7,5,2 0 0161
r 5,5 0 0162
s 5,5 0 0163
t 4,7 0 0164
u 7,5 0 0165
v 7,5 0 0166
w 10,5 0 0167
x 7,5 0 0170
y 7,5,2 0 0171
z 6,5 0 0172
{ 5,8,2 0 0173
lC "
| 6,8 0 0174
or "
ba "
} 5,8,2 0 0175
rC "
~ 7,5 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 3,6,2 0 0241
ct 6,6,1 0 0242
Po 8,8 0 0243
Cs 8,6 0 0244
Ye 9,8 0 0245
bb 6,8 0 0246
sc 5,8,2 0 0247
ad 4,8 0 0250
co 9,8 0 0251
Of 4,8 0 0252
Fo 7,5 0 0253
no 6,5 0 0254
- 4,4 0 0255
hy "
rg 9,8 0 0256
a- 5,7 0 0257
de 4,8 0 0260
t+- 6,6 0 0261
S2 3,8 0 0262
S3 3,8 0 0263
aa 4,8 0 0264
mc 7,5,2 0 0265
ps 8,8 0 0266
pc 3,5 0 0267
ac 4,1,2 0 0270
S1 3,8 0 0271
Om 5,8 0 0272
Fc 7,5 0 0273
14 9,8 0 0274
12 9,8 0 0275
34 9,8 0 0276
r? 6,6,2 0 0277
`A 8,11 0 0300
'A 8,11 0 0301
^A 8,11 0 0302
~A 8,11 0 0303
:A 8,11 0 0304
oA 8,11 0 0305
AE 11,8 0 0306
,C 8,8,2 0 0307
`E 7,11 0 0310
'E 7,11 0 0311
^E 7,11 0 0312
:E 7,11 0 0313
`I 5,11 0 0314
'I 5,11 0 0315
^I 5,11 0 0316
:I 5,11 0 0317
-D 9,8 0 0320
~N 9,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,11 0 0326
tmu 6,6 0 0327
/O 8,8 0 0330
`U 9,11 0 0331
'U 9,11 0 0332
^U 9,11 0 0333
:U 9,11 0 0334
'Y 9,11 0 0335
TP 8,8 0 0336
ss 8,8 0 0337
`a 5,8 0 0340
'a 5,8 0 0341
^a 5,9 0 0342
~a 5,8 0 0343
:a 5,8 0 0344
oa 5,8 0 0345
ae 9,5 0 0346
,c 6,5,2 0 0347
`e 6,8 0 0350
'e 6,8 0 0351
^e 6,9 0 0352
:e 6,8 0 0353
`i 5,8 0 0354
'i 5,8 0 0355
^i 5,9 0 0356
:i 5,8 0 0357
Sd 7,8 0 0360
~n 7,8 0 0361
`o 7,8 0 0362
'o 7,8 0 0363
^o 7,9 0 0364
~o 7,8 0 0365
:o 7,8 0 0366
tdi 6,6 0 0367
/o 7,6,1 0 0370
`u 7,8 0 0371
'u 7,8 0 0372
^u 7,9 0 0373
:u 7,8 0 0374
'y 7,8,2 0 0375
Tp 7,8,2 0 0376
:y 7,8,2 0 0377
1.18.1.4/font/devX75/HB 0000666 00000005351 15047753021 0007714 0 ustar 00 name HB
spacewidth 3
charset
--- 7,7 0 00
--- 3,1 0 040
! 4,8 0 041
" 5,8 0 042
dq "
# 6,7 0 043
sh "
$ 6,8,1 0 044
Do "
% 8,8 0 045
& 8,8 0 046
' 3,8 0 047
cq "
( 4,8,2 0 050
) 4,8,2 0 051
* 4,8 0 052
+ 6,6 0 053
, 3,2,2 0 054
\- 5,4 0 055
. 3,2 0 056
/ 4,8 0 057
sl "
0 6,8 0 060
1 6,8 0 061
2 6,8 0 062
3 6,8 0 063
4 6,8 0 064
5 6,8 0 065
6 6,8 0 066
7 6,8 0 067
8 6,8 0 070
9 6,8 0 071
: 3,6 0 072
; 3,6,2 0 073
< 5,6 0 074
= 6,5 0 075
eq "
> 5,6 0 076
? 6,8 0 077
@ 11,7,2 0 0100
at "
A 8,8 0 0101
B 7,8 0 0102
C 8,8 0 0103
D 7,8 0 0104
E 6,8 0 0105
F 6,8 0 0106
G 8,8 0 0107
H 7,8 0 0110
I 3,8 0 0111
J 6,8 0 0112
K 7,8 0 0113
L 6,8 0 0114
M 10,8 0 0115
N 8,8 0 0116
O 8,8 0 0117
P 7,8 0 0120
Q 8,8,1 0 0121
R 7,8 0 0122
S 7,8 0 0123
T 7,8 0 0124
U 7,8 0 0125
V 8,8 0 0126
W 11,8 0 0127
X 8,8 0 0130
Y 9,8 0 0131
Z 7,8 0 0132
[ 4,8,2 0 0133
lB "
\ 4,8 0 0134
rs "
] 4,8,2 0 0135
rB "
^ 5,8 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 3,8 0 0140
oq "
a 6,6 0 0141
b 6,8 0 0142
c 5,6 0 0143
d 6,8 0 0144
e 6,6 0 0145
f 4,8 0 0146
g 6,6,2 0 0147
h 6,8 0 0150
i 3,8 0 0151
j 3,8,2 0 0152
k 6,8 0 0153
l 3,8 0 0154
m 9,6 0 0155
n 6,6 0 0156
o 6,6 0 0157
p 6,6,2 0 0160
q 6,6,2 0 0161
r 4,6 0 0162
s 6,6 0 0163
t 4,8 0 0164
u 6,6 0 0165
v 6,6 0 0166
w 8,6 0 0167
x 7,6 0 0170
y 6,6,2 0 0171
z 6,6 0 0172
{ 5,8,2 0 0173
lC "
| 3,8,2 0 0174
or "
ba "
} 5,8,2 0 0175
rC "
~ 6,4 0 0176
a~ "
ap "
ti "
--- 3,1 0 0240
r! 4,6,2 0 0241
ct 6,7,1 0 0242
Po 6,8 0 0243
Cs 6,7 0 0244
Ye 7,8 0 0245
bb 3,8,2 0 0246
sc 6,8,2 0 0247
ad 3,8 0 0250
co 10,8 0 0251
Of 5,8 0 0252
Fo 7,4 0 0253
no 7,5 0 0254
- 5,4 0 0255
hy "
rg 10,8 0 0256
a- 3,8 0 0257
de 4,7 0 0260
t+- 6,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 3,9 0 0264
mc 6,6,2 0 0265
ps 6,8,2 0 0266
pc 3,4 0 0267
ac 3,0,2 0 0270
S1 3,7 0 0271
Om 5,8 0 0272
Fc 7,4 0 0273
14 9,8 0 0274
12 9,8 0 0275
34 9,8 0 0276
r? 6,6,2 0 0277
`A 8,11 0 0300
'A 8,11 0 0301
^A 8,11 0 0302
~A 8,11 0 0303
:A 8,10 0 0304
oA 8,11 0 0305
AE 10,8 0 0306
,C 8,8,2 0 0307
`E 6,11 0 0310
'E 6,11 0 0311
^E 6,11 0 0312
:E 6,10 0 0313
`I 3,11 0 0314
'I 3,11 0 0315
^I 3,11 0 0316
:I 3,10 0 0317
-D 7,8 0 0320
~N 8,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,10 0 0326
tmu 6,6 0 0327
/O 8,8 0 0330
`U 7,11 0 0331
'U 7,11 0 0332
^U 7,11 0 0333
:U 7,10 0 0334
'Y 9,11 0 0335
TP 7,8 0 0336
ss 6,8 0 0337
`a 6,9 0 0340
'a 6,9 0 0341
^a 6,9 0 0342
~a 6,9 0 0343
:a 6,9 0 0344
oa 6,9 0 0345
ae 9,6 0 0346
,c 5,6,2 0 0347
`e 6,9 0 0350
'e 6,9 0 0351
^e 6,9 0 0352
:e 6,9 0 0353
`i 3,9 0 0354
'i 3,9 0 0355
^i 3,9 0 0356
:i 3,9 0 0357
Sd 6,9 0 0360
~n 6,9 0 0361
`o 6,9 0 0362
'o 6,9 0 0363
^o 6,9 0 0364
~o 6,9 0 0365
:o 6,9 0 0366
tdi 6,6 0 0367
/o 6,6 0 0370
`u 6,9 0 0371
'u 6,9 0 0372
^u 6,9 0 0373
:u 6,9 0 0374
'y 6,9,2 0 0375
Tp 6,8,2 0 0376
:y 6,9,2 0 0377
1.18.1.4/font/devX75/HBI 0000666 00000005350 15047753021 0010024 0 ustar 00 name HBI
spacewidth 3
charset
--- 7,7 0 00
--- 3,1 0 040
! 4,8 0 041
" 6,8 0 042
dq "
# 7,7 0 043
sh "
$ 6,8,1 0 044
Do "
% 9,8 0 045
& 8,8 0 046
' 3,8 0 047
cq "
( 5,8,2 0 050
) 5,8,2 0 051
* 6,8 0 052
+ 6,6 0 053
, 3,2,2 0 054
\- 5,4 0 055
. 3,2 0 056
/ 5,8 0 057
sl "
0 6,8 0 060
1 6,8 0 061
2 6,8 0 062
3 6,8 0 063
4 6,8 0 064
5 6,8 0 065
6 6,8 0 066
7 6,8 0 067
8 6,8 0 070
9 6,8 0 071
: 3,6 0 072
; 3,6,2 0 073
< 6,6 0 074
= 6,5 0 075
eq "
> 7,6 0 076
? 6,8 0 077
@ 10,7,2 0 0100
at "
A 8,8 0 0101
B 7,8 0 0102
C 7,8 0 0103
D 8,8 0 0104
E 6,8 0 0105
F 5,8 0 0106
G 8,8 0 0107
H 7,8 0 0110
I 3,8 0 0111
J 6,8 0 0112
K 8,8 0 0113
L 6,8 0 0114
M 10,8 0 0115
N 8,8 0 0116
O 8,8 0 0117
P 7,8 0 0120
Q 8,8 0 0121
R 8,8 0 0122
S 7,8 0 0123
T 6,8 0 0124
U 7,8 0 0125
V 8,8 0 0126
W 10,8 0 0127
X 7,8 0 0130
Y 7,8 0 0131
Z 7,8 0 0132
[ 4,8,2 0 0133
lB "
\ 5,8 0 0134
rs "
] 4,8,2 0 0135
rB "
^ 6,8 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 3,8 0 0140
oq "
a 6,6 0 0141
b 6,8 0 0142
c 5,6 0 0143
d 6,8 0 0144
e 6,6 0 0145
f 3,8 0 0146
g 6,6,2 0 0147
h 6,8 0 0150
i 3,8 0 0151
j 3,8,2 0 0152
k 6,8 0 0153
l 3,8 0 0154
m 9,6 0 0155
n 6,6 0 0156
o 6,6 0 0157
p 6,6,2 0 0160
q 6,6,2 0 0161
r 4,6 0 0162
s 6,6 0 0163
t 4,8 0 0164
u 6,6 0 0165
v 6,6 0 0166
w 8,6 0 0167
x 5,6 0 0170
y 6,6,2 0 0171
z 5,6 0 0172
{ 5,8,2 0 0173
lC "
| 4,8,2 0 0174
or "
ba "
} 5,8,2 0 0175
rC "
~ 6,5 0 0176
a~ "
ap "
ti "
--- 3,1 0 0240
r! 4,6,2 0 0241
ct 7,7,1 0 0242
Po 7,7 0 0243
Cs 6,7 0 0244
Ye 7,8 0 0245
bb 4,8,1 0 0246
sc 7,8,2 0 0247
ad 4,8 0 0250
co 10,8 0 0251
Of 5,8 0 0252
Fo 8,5 0 0253
no 7,5 0 0254
- 5,4 0 0255
hy "
rg 10,8 0 0256
a- 4,8 0 0257
de 4,7 0 0260
t+- 6,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 3,9 0 0264
mc 6,6,2 0 0265
ps 7,8,2 0 0266
pc 3,4 0 0267
ac 3,1,2 0 0270
S1 3,7 0 0271
Om 5,8 0 0272
Fc 8,5 0 0273
14 9,8 0 0274
12 9,8 0 0275
34 9,8 0 0276
r? 6,6,2 0 0277
`A 8,11 0 0300
'A 8,11 0 0301
^A 8,11 0 0302
~A 8,11 0 0303
:A 8,10 0 0304
oA 8,11 0 0305
AE 10,8 0 0306
,C 7,8,2 0 0307
`E 6,11 0 0310
'E 6,11 0 0311
^E 6,11 0 0312
:E 6,10 0 0313
`I 3,11 0 0314
'I 3,11 0 0315
^I 3,11 0 0316
:I 3,10 0 0317
-D 8,8 0 0320
~N 8,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,10 0 0326
tmu 6,6 0 0327
/O 8,8 0 0330
`U 7,11 0 0331
'U 7,11 0 0332
^U 7,11 0 0333
:U 7,10 0 0334
'Y 7,11 0 0335
TP 7,8 0 0336
ss 7,8 0 0337
`a 6,9 0 0340
'a 6,9 0 0341
^a 6,9 0 0342
~a 6,9 0 0343
:a 6,8 0 0344
oa 6,9 0 0345
ae 9,6 0 0346
,c 5,6,2 0 0347
`e 6,9 0 0350
'e 6,9 0 0351
^e 6,9 0 0352
:e 6,8 0 0353
`i 3,9 0 0354
'i 3,9 0 0355
^i 3,9 0 0356
:i 3,8 0 0357
Sd 6,9 0 0360
~n 6,9 0 0361
`o 6,9 0 0362
'o 6,9 0 0363
^o 6,9 0 0364
~o 6,9 0 0365
:o 6,8 0 0366
tdi 6,6 0 0367
/o 8,6 0 0370
`u 6,9 0 0371
'u 6,9 0 0372
^u 6,9 0 0373
:u 6,8 0 0374
'y 6,9,2 0 0375
Tp 6,8,2 0 0376
:y 6,8,2 0 0377
1.18.1.4/font/devX75/NR 0000666 00000005346 15047753021 0007746 0 ustar 00 name NR
spacewidth 3
charset
--- 9,7 0 00
--- 3,1 0 040
! 4,8 0 041
" 6,8 0 042
dq "
# 8,8 0 043
sh "
$ 5,9,1 0 044
Do "
% 9,8 0 045
& 10,8 0 046
' 4,8 0 047
cq "
( 4,8,1 0 050
) 4,8,1 0 051
* 6,8 0 052
+ 6,5 0 053
, 3,2,1 0 054
\- 4,3 0 055
. 4,2 0 056
/ 4,8 0 057
sl "
0 5,8 0 060
1 5,8 0 061
2 5,8 0 062
3 5,8 0 063
4 5,8 0 064
5 5,8 0 065
6 5,8 0 066
7 5,8 0 067
8 5,8 0 070
9 5,8 0 071
: 4,5 0 072
; 4,5,1 0 073
< 7,5 0 074
= 6,4 0 075
eq "
> 7,5 0 076
? 5,8 0 077
@ 9,8 0 0100
at "
A 8,8 0 0101
B 7,8 0 0102
C 7,8 0 0103
D 8,8 0 0104
E 7,8 0 0105
F 7,8 0 0106
G 8,8 0 0107
H 9,8 0 0110
I 4,8 0 0111
J 5,8 0 0112
K 8,8 0 0113
L 7,8 0 0114
M 10,8 0 0115
N 9,8 0 0116
O 8,8 0 0117
P 7,8 0 0120
Q 8,8,1 0 0121
R 8,8 0 0122
S 6,8 0 0123
T 8,8 0 0124
U 8,8 0 0125
V 8,8 0 0126
W 12,8 0 0127
X 7,8 0 0130
Y 8,8 0 0131
Z 6,8 0 0132
[ 3,8,1 0 0133
lB "
\ 5,8 0 0134
rs "
] 3,8,1 0 0135
rB "
^ 6,8 0 0136
a^ "
ha "
_ 5,0,2 0 0137
` 3,8 0 0140
oq "
a 6,5 0 0141
b 5,8 0 0142
c 5,5 0 0143
d 6,8 0 0144
e 5,5 0 0145
f 4,8 0 0146
g 6,5,2 0 0147
h 6,8 0 0150
i 4,7 0 0151
j 4,7,2 0 0152
k 7,8 0 0153
l 4,8 0 0154
m 10,5 0 0155
n 7,5 0 0156
o 5,5 0 0157
p 5,5,2 0 0160
q 6,5,2 0 0161
r 5,5 0 0162
s 5,5 0 0163
t 3,7 0 0164
u 6,5 0 0165
v 6,5 0 0166
w 8,5 0 0167
x 6,5 0 0170
y 6,5,2 0 0171
z 5,5 0 0172
{ 4,8,1 0 0173
lC "
| 6,8 0 0174
or "
ba "
} 4,8,1 0 0175
rC "
~ 7,4 0 0176
a~ "
ap "
ti "
--- 3,1 0 0240
r! 4,6,2 0 0241
ct 6,6,1 0 0242
Po 7,8 0 0243
Cs 7,7 0 0244
Ye 8,8 0 0245
bb 6,8 0 0246
sc 5,8,2 0 0247
ad 4,7 0 0250
co 10,8 0 0251
Of 5,8 0 0252
Fo 6,4 0 0253
no 6,4 0 0254
- 4,3 0 0255
hy "
rg 10,8 0 0256
a- 5,7 0 0257
de 4,8 0 0260
t+- 6,5 0 0261
S2 3,8 0 0262
S3 3,8 0 0263
aa 3,8 0 0264
mc 6,5,2 0 0265
ps 7,8,2 0 0266
pc 4,4 0 0267
ac 3,1,2 0 0270
S1 3,8 0 0271
Om 5,8 0 0272
Fc 6,4 0 0273
14 7,8 0 0274
12 7,8 0 0275
34 7,8 0 0276
r? 5,6,2 0 0277
`A 8,11 0 0300
'A 8,11 0 0301
^A 8,11 0 0302
~A 8,11 0 0303
:A 8,10 0 0304
oA 8,11 0 0305
AE 11,8 0 0306
,C 7,8,2 0 0307
`E 7,11 0 0310
'E 7,11 0 0311
^E 7,11 0 0312
:E 7,10 0 0313
`I 4,11 0 0314
'I 4,11 0 0315
^I 4,11 0 0316
:I 4,10 0 0317
-D 8,8 0 0320
~N 9,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,10 0 0326
tmu 6,5 0 0327
/O 8,8 0 0330
`U 8,11 0 0331
'U 8,11 0 0332
^U 8,11 0 0333
:U 8,10 0 0334
'Y 8,11 0 0335
TP 7,8 0 0336
ss 7,8 0 0337
`a 6,8 0 0340
'a 6,8 0 0341
^a 6,8 0 0342
~a 6,8 0 0343
:a 6,7 0 0344
oa 6,8 0 0345
ae 8,5 0 0346
,c 5,5,2 0 0347
`e 5,8 0 0350
'e 5,8 0 0351
^e 5,8 0 0352
:e 5,7 0 0353
`i 4,8 0 0354
'i 4,8 0 0355
^i 4,8 0 0356
:i 4,7 0 0357
Sd 5,8 0 0360
~n 7,8 0 0361
`o 5,8 0 0362
'o 5,8 0 0363
^o 5,8 0 0364
~o 5,8 0 0365
:o 5,7 0 0366
tdi 6,5 0 0367
/o 5,5,1 0 0370
`u 6,8 0 0371
'u 6,8 0 0372
^u 6,8 0 0373
:u 6,7 0 0374
'y 6,8,2 0 0375
Tp 5,8,2 0 0376
:y 6,7,2 0 0377
1.18.1.4/font/devX75/CBI 0000666 00000005325 15047753021 0010021 0 ustar 00 name CBI
spacewidth 6
charset
--- 6,5 0 00
--- 6,1 0 040
! 6,7 0 041
" 6,7 0 042
dq "
# 6,7 0 043
sh "
$ 6,7,1 0 044
Do "
% 6,7 0 045
& 6,6 0 046
' 6,7 0 047
cq "
( 6,7,2 0 050
) 6,7,2 0 051
* 6,7 0 052
+ 6,6 0 053
, 6,1,2 0 054
\- 6,4 0 055
. 6,1 0 056
/ 6,7,1 0 057
sl "
0 6,7 0 060
1 6,7 0 061
2 6,7 0 062
3 6,7 0 063
4 6,7 0 064
5 6,7 0 065
6 6,7 0 066
7 6,7 0 067
8 6,7 0 070
9 6,7 0 071
: 6,4 0 072
; 6,4,2 0 073
< 6,6 0 074
= 6,5 0 075
eq "
> 6,6 0 076
? 6,7 0 077
@ 6,7,1 0 0100
at "
A 6,6 0 0101
B 6,6 0 0102
C 6,6 0 0103
D 6,6 0 0104
E 6,6 0 0105
F 6,6 0 0106
G 6,6 0 0107
H 6,6 0 0110
I 6,6 0 0111
J 6,6 0 0112
K 6,6 0 0113
L 6,6 0 0114
M 6,6 0 0115
N 6,6 0 0116
O 6,6 0 0117
P 6,6 0 0120
Q 6,6,1 0 0121
R 6,6 0 0122
S 6,6 0 0123
T 6,6 0 0124
U 6,6 0 0125
V 6,6 0 0126
W 6,6 0 0127
X 6,6 0 0130
Y 6,6 0 0131
Z 6,6 0 0132
[ 6,7,2 0 0133
lB "
\ 6,7,1 0 0134
rs "
] 6,7,2 0 0135
rB "
^ 6,7 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 6,8 0 0140
oq "
a 6,5 0 0141
b 6,7 0 0142
c 6,5 0 0143
d 6,7 0 0144
e 6,5 0 0145
f 6,7 0 0146
g 6,5,2 0 0147
h 6,7 0 0150
i 6,7 0 0151
j 6,7,2 0 0152
k 6,7 0 0153
l 6,7 0 0154
m 6,5 0 0155
n 6,5 0 0156
o 6,5 0 0157
p 6,5,2 0 0160
q 6,5,2 0 0161
r 6,5 0 0162
s 6,5 0 0163
t 6,7 0 0164
u 6,5 0 0165
v 6,5 0 0166
w 6,5 0 0167
x 6,5 0 0170
y 6,5,2 0 0171
z 6,5 0 0172
{ 6,7,2 0 0173
lC "
| 6,7,1 0 0174
or "
ba "
} 6,7,2 0 0175
rC "
~ 6,5 0 0176
a~ "
ap "
ti "
--- 6,1 0 0240
r! 6,5,2 0 0241
ct 6,7,1 0 0242
Po 6,6 0 0243
Cs 6,6 0 0244
Ye 6,6 0 0245
bb 6,7,1 0 0246
sc 6,7,1 0 0247
ad 6,7 0 0250
co 6,7 0 0251
Of 6,6 0 0252
Fo 6,4 0 0253
no 6,5 0 0254
- 6,4 0 0255
hy "
rg 6,7 0 0256
a- 6,7 0 0257
de 6,7 0 0260
t+- 6,6 0 0261
S2 6,7 0 0262
S3 6,7 0 0263
aa 6,8 0 0264
mc 6,5,2 0 0265
ps 6,7,1 0 0266
pc 6,4 0 0267
ac 6,0,2 0 0270
S1 6,7 0 0271
Om 6,6 0 0272
Fc 6,4 0 0273
14 6,8,1 0 0274
12 6,8,1 0 0275
34 6,8,1 0 0276
r? 6,6,2 0 0277
`A 6,9 0 0300
'A 6,9 0 0301
^A 6,9 0 0302
~A 6,9 0 0303
:A 6,8 0 0304
oA 6,9 0 0305
AE 6,6 0 0306
,C 6,6,2 0 0307
`E 6,9 0 0310
'E 6,9 0 0311
^E 6,9 0 0312
:E 6,8 0 0313
`I 6,9 0 0314
'I 6,9 0 0315
^I 6,9 0 0316
:I 6,8 0 0317
-D 6,6 0 0320
~N 6,9 0 0321
`O 6,9 0 0322
'O 6,9 0 0323
^O 6,9 0 0324
~O 6,9 0 0325
:O 6,8 0 0326
tmu 6,6 0 0327
/O 6,7 0 0330
`U 6,9 0 0331
'U 6,9 0 0332
^U 6,9 0 0333
:U 6,8 0 0334
'Y 6,9 0 0335
TP 6,6 0 0336
ss 6,7 0 0337
`a 6,8 0 0340
'a 6,8 0 0341
^a 6,8 0 0342
~a 6,8 0 0343
:a 6,7 0 0344
oa 6,9 0 0345
ae 6,5 0 0346
,c 6,5,2 0 0347
`e 6,8 0 0350
'e 6,8 0 0351
^e 6,8 0 0352
:e 6,7 0 0353
`i 6,8 0 0354
'i 6,8 0 0355
^i 6,8 0 0356
:i 6,7 0 0357
Sd 6,8 0 0360
~n 6,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,7 0 0366
tdi 6,6 0 0367
/o 6,5 0 0370
`u 6,8 0 0371
'u 6,8 0 0372
^u 6,8 0 0373
:u 6,7 0 0374
'y 6,8,2 0 0375
Tp 6,7,2 0 0376
:y 6,7,2 0 0377
1.18.1.4/font/devX75/CI 0000666 00000005322 15047753021 0007714 0 ustar 00 name CI
spacewidth 6
charset
--- 6,5 0 00
--- 6,1 0 040
! 6,7 0 041
" 6,7 0 042
dq "
# 6,7 0 043
sh "
$ 6,7,1 0 044
Do "
% 6,7 0 045
& 6,6 0 046
' 6,7 0 047
cq "
( 6,7,1 0 050
) 6,7,1 0 051
* 6,7 0 052
+ 6,6 0 053
, 6,1,2 0 054
\- 6,4 0 055
. 6,1 0 056
/ 6,7,1 0 057
sl "
0 6,7 0 060
1 6,7 0 061
2 6,7 0 062
3 6,7 0 063
4 6,7 0 064
5 6,7 0 065
6 6,7 0 066
7 6,7 0 067
8 6,7 0 070
9 6,7 0 071
: 6,4 0 072
; 6,4,2 0 073
< 6,6 0 074
= 6,5 0 075
eq "
> 6,6 0 076
? 6,6 0 077
@ 6,7 0 0100
at "
A 6,6 0 0101
B 6,6 0 0102
C 6,6 0 0103
D 6,6 0 0104
E 6,6 0 0105
F 6,6 0 0106
G 6,6 0 0107
H 6,6 0 0110
I 6,6 0 0111
J 6,6 0 0112
K 6,6 0 0113
L 6,6 0 0114
M 6,6 0 0115
N 6,6 0 0116
O 6,6 0 0117
P 6,6 0 0120
Q 6,6,2 0 0121
R 6,6 0 0122
S 6,6 0 0123
T 6,6 0 0124
U 6,6 0 0125
V 6,6 0 0126
W 6,6 0 0127
X 6,6 0 0130
Y 6,6 0 0131
Z 6,6 0 0132
[ 6,7,1 0 0133
lB "
\ 6,7,1 0 0134
rs "
] 6,7,1 0 0135
rB "
^ 6,7 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 6,8 0 0140
oq "
a 6,5 0 0141
b 6,7 0 0142
c 6,5 0 0143
d 6,7 0 0144
e 6,5 0 0145
f 6,7 0 0146
g 6,5,2 0 0147
h 6,7 0 0150
i 6,7 0 0151
j 6,7,2 0 0152
k 6,7 0 0153
l 6,7 0 0154
m 6,5 0 0155
n 6,5 0 0156
o 6,5 0 0157
p 6,5,2 0 0160
q 6,5,2 0 0161
r 6,5 0 0162
s 6,5 0 0163
t 6,7 0 0164
u 6,5 0 0165
v 6,5 0 0166
w 6,5 0 0167
x 6,5 0 0170
y 6,5,2 0 0171
z 6,5 0 0172
{ 6,7,1 0 0173
lC "
| 6,7,1 0 0174
or "
ba "
} 6,7,1 0 0175
rC "
~ 6,5 0 0176
a~ "
ap "
ti "
--- 6,1 0 0240
r! 6,5,2 0 0241
ct 6,6 0 0242
Po 6,7 0 0243
Cs 6,6 0 0244
Ye 6,6 0 0245
bb 6,7,2 0 0246
sc 6,7,1 0 0247
ad 6,7 0 0250
co 6,7 0 0251
Of 6,7 0 0252
Fo 6,4 0 0253
no 6,5 0 0254
- 6,4 0 0255
hy "
rg 6,7 0 0256
a- 6,7 0 0257
de 6,7 0 0260
t+- 6,6 0 0261
S2 6,7 0 0262
S3 6,7 0 0263
aa 6,8 0 0264
mc 6,5,2 0 0265
ps 6,7,1 0 0266
pc 6,4 0 0267
ac 6,0,2 0 0270
S1 6,7 0 0271
Om 6,7 0 0272
Fc 6,4 0 0273
14 6,8,1 0 0274
12 6,8,1 0 0275
34 6,8,1 0 0276
r? 6,4,2 0 0277
`A 6,9 0 0300
'A 6,9 0 0301
^A 6,9 0 0302
~A 6,9 0 0303
:A 6,8 0 0304
oA 6,9 0 0305
AE 6,6 0 0306
,C 6,6,2 0 0307
`E 6,9 0 0310
'E 6,9 0 0311
^E 6,9 0 0312
:E 6,8 0 0313
`I 6,9 0 0314
'I 6,9 0 0315
^I 6,9 0 0316
:I 6,8 0 0317
-D 6,6 0 0320
~N 6,9 0 0321
`O 6,9 0 0322
'O 6,9 0 0323
^O 6,9 0 0324
~O 6,9 0 0325
:O 6,8 0 0326
tmu 6,6 0 0327
/O 6,6 0 0330
`U 6,9 0 0331
'U 6,9 0 0332
^U 6,9 0 0333
:U 6,8 0 0334
'Y 6,9 0 0335
TP 6,6 0 0336
ss 6,7 0 0337
`a 6,8 0 0340
'a 6,8 0 0341
^a 6,8 0 0342
~a 6,8 0 0343
:a 6,7 0 0344
oa 6,9 0 0345
ae 6,5 0 0346
,c 6,5,2 0 0347
`e 6,8 0 0350
'e 6,8 0 0351
^e 6,8 0 0352
:e 6,7 0 0353
`i 6,8 0 0354
'i 6,8 0 0355
^i 6,8 0 0356
:i 6,7 0 0357
Sd 6,8 0 0360
~n 6,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,7 0 0366
tdi 6,6 0 0367
/o 6,6,1 0 0370
`u 6,8 0 0371
'u 6,8 0 0372
^u 6,8 0 0373
:u 6,7 0 0374
'y 6,8,2 0 0375
Tp 6,7,2 0 0376
:y 6,7,2 0 0377
1.18.1.4/font/devX75/HI 0000666 00000005356 15047753021 0007730 0 ustar 00 name HI
spacewidth 3
charset
--- 8,7 0 00
--- 3,1 0 040
! 4,8 0 041
" 4,8 0 042
dq "
# 7,7 0 043
sh "
$ 6,8,1 0 044
Do "
% 9,8 0 045
& 8,8 0 046
' 2,8 0 047
cq "
( 4,8,2 0 050
) 4,8,2 0 051
* 4,8 0 052
+ 6,6 0 053
, 3,1,2 0 054
\- 6,4 0 055
. 3,1 0 056
/ 3,8 0 057
sl "
0 6,8 0 060
1 6,8 0 061
2 6,8 0 062
3 6,8 0 063
4 6,8 0 064
5 6,8 0 065
6 6,8 0 066
7 6,8 0 067
8 6,8 0 070
9 6,8 0 071
: 3,6 0 072
; 3,6,2 0 073
< 6,6 0 074
= 7,5 0 075
eq "
> 6,6 0 076
? 6,8 0 077
@ 11,8,2 0 0100
at "
A 7,8 0 0101
B 7,8 0 0102
C 8,8 0 0103
D 8,8 0 0104
E 7,8 0 0105
F 6,8 0 0106
G 8,8 0 0107
H 8,8 0 0110
I 3,8 0 0111
J 5,8 0 0112
K 7,8 0 0113
L 5,8 0 0114
M 9,8 0 0115
N 8,8 0 0116
O 8,8 0 0117
P 7,8 0 0120
Q 8,8,1 0 0121
R 7,8 0 0122
S 7,8 0 0123
T 5,8 0 0124
U 8,8 0 0125
V 7,8 0 0126
W 10,8 0 0127
X 7,8 0 0130
Y 7,8 0 0131
Z 7,8 0 0132
[ 4,8,2 0 0133
lB "
\ 3,8 0 0134
rs "
] 4,8,2 0 0135
rB "
^ 6,7 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 3,8 0 0140
oq "
a 5,6 0 0141
b 5,8 0 0142
c 5,6 0 0143
d 5,8 0 0144
e 5,6 0 0145
f 4,8 0 0146
g 5,6,2 0 0147
h 6,8 0 0150
i 2,8 0 0151
j 2,8,2 0 0152
k 5,8 0 0153
l 2,8 0 0154
m 8,6 0 0155
n 6,6 0 0156
o 6,6 0 0157
p 5,6,2 0 0160
q 5,6,2 0 0161
r 4,6 0 0162
s 5,6 0 0163
t 4,8 0 0164
u 5,6 0 0165
v 6,6 0 0166
w 8,6 0 0167
x 6,6 0 0170
y 5,6,2 0 0171
z 5,6 0 0172
{ 4,8,2 0 0173
lC "
| 3,8,2 0 0174
or "
ba "
} 4,8,2 0 0175
rC "
~ 7,5 0 0176
a~ "
ap "
ti "
--- 3,1 0 0240
r! 4,6,2 0 0241
ct 7,7,1 0 0242
Po 6,8 0 0243
Cs 6,7 0 0244
Ye 6,8 0 0245
bb 3,8,2 0 0246
sc 6,8,2 0 0247
ad 3,8 0 0250
co 10,8 0 0251
Of 5,8 0 0252
Fo 8,5 0 0253
no 7,5 0 0254
- 6,4 0 0255
hy "
rg 10,8 0 0256
a- 3,8 0 0257
de 4,7 0 0260
t+- 6,7 0 0261
S2 3,8 0 0262
S3 3,8 0 0263
aa 3,9 0 0264
mc 5,6,2 0 0265
ps 6,8,2 0 0266
pc 3,5 0 0267
ac 3,1,2 0 0270
S1 3,8 0 0271
Om 5,8 0 0272
Fc 8,5 0 0273
14 9,8,1 0 0274
12 9,8,1 0 0275
34 9,8,1 0 0276
r? 6,6,2 0 0277
`A 7,11 0 0300
'A 7,11 0 0301
^A 7,11 0 0302
~A 7,11 0 0303
:A 7,10 0 0304
oA 7,11 0 0305
AE 10,8 0 0306
,C 8,8,2 0 0307
`E 7,11 0 0310
'E 7,11 0 0311
^E 7,11 0 0312
:E 7,10 0 0313
`I 3,11 0 0314
'I 3,11 0 0315
^I 3,11 0 0316
:I 3,10 0 0317
-D 8,8 0 0320
~N 8,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,10 0 0326
tmu 6,6 0 0327
/O 8,8 0 0330
`U 8,11 0 0331
'U 8,11 0 0332
^U 8,11 0 0333
:U 8,10 0 0334
'Y 7,11 0 0335
TP 7,8 0 0336
ss 6,8 0 0337
`a 5,9 0 0340
'a 5,9 0 0341
^a 5,9 0 0342
~a 5,9 0 0343
:a 5,8 0 0344
oa 5,9 0 0345
ae 8,6 0 0346
,c 5,6,2 0 0347
`e 5,9 0 0350
'e 5,9 0 0351
^e 5,9 0 0352
:e 5,8 0 0353
`i 2,9 0 0354
'i 2,9 0 0355
^i 2,9 0 0356
:i 2,8 0 0357
Sd 6,9 0 0360
~n 6,9 0 0361
`o 6,9 0 0362
'o 6,9 0 0363
^o 6,9 0 0364
~o 6,9 0 0365
:o 6,8 0 0366
tdi 6,6 0 0367
/o 6,6 0 0370
`u 5,9 0 0371
'u 5,9 0 0372
^u 5,9 0 0373
:u 5,8 0 0374
'y 5,9,2 0 0375
Tp 5,8,2 0 0376
:y 5,8,2 0 0377
1.18.1.4/font/devX75/CB 0000666 00000005330 15047753021 0007704 0 ustar 00 name CB
spacewidth 6
charset
--- 6,5 0 00
--- 6,1 0 040
! 6,7 0 041
" 6,6 0 042
dq "
# 6,7 0 043
sh "
$ 6,7,1 0 044
Do "
% 6,6 0 045
& 6,6 0 046
' 6,6 0 047
cq "
( 6,7,1 0 050
) 6,7,1 0 051
* 6,7 0 052
+ 6,6 0 053
, 6,1,2 0 054
\- 6,4 0 055
. 6,1 0 056
/ 6,7,1 0 057
sl "
0 6,7 0 060
1 6,7 0 061
2 6,7 0 062
3 6,7 0 063
4 6,7 0 064
5 6,7 0 065
6 6,7 0 066
7 6,7 0 067
8 6,7 0 070
9 6,7 0 071
: 6,4 0 072
; 6,4,2 0 073
< 6,6 0 074
= 6,5 0 075
eq "
> 6,6 0 076
? 6,6 0 077
@ 6,7,1 0 0100
at "
A 6,6 0 0101
B 6,6 0 0102
C 6,6 0 0103
D 6,6 0 0104
E 6,6 0 0105
F 6,6 0 0106
G 6,6 0 0107
H 6,6 0 0110
I 6,6 0 0111
J 6,6 0 0112
K 6,6 0 0113
L 6,6 0 0114
M 6,6 0 0115
N 6,6 0 0116
O 6,6 0 0117
P 6,6 0 0120
Q 6,6,1 0 0121
R 6,6 0 0122
S 6,6 0 0123
T 6,6 0 0124
U 6,6 0 0125
V 6,6 0 0126
W 6,6 0 0127
X 6,6 0 0130
Y 6,6 0 0131
Z 6,6 0 0132
[ 6,7,1 0 0133
lB "
\ 6,7,1 0 0134
rs "
] 6,7,1 0 0135
rB "
^ 6,7 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 6,8 0 0140
oq "
a 6,5 0 0141
b 6,7 0 0142
c 6,5 0 0143
d 6,7 0 0144
e 6,5 0 0145
f 6,7 0 0146
g 6,5,2 0 0147
h 6,7 0 0150
i 6,7 0 0151
j 6,7,2 0 0152
k 6,7 0 0153
l 6,7 0 0154
m 6,5 0 0155
n 6,5 0 0156
o 6,5 0 0157
p 6,5,2 0 0160
q 6,5,2 0 0161
r 6,5 0 0162
s 6,5 0 0163
t 6,7 0 0164
u 6,5 0 0165
v 6,5 0 0166
w 6,5 0 0167
x 6,5 0 0170
y 6,5,2 0 0171
z 6,5 0 0172
{ 6,7,1 0 0173
lC "
| 6,7,2 0 0174
or "
ba "
} 6,7,1 0 0175
rC "
~ 6,5 0 0176
a~ "
ap "
ti "
--- 6,1 0 0240
r! 6,5,2 0 0241
ct 6,7,1 0 0242
Po 6,7 0 0243
Cs 6,6 0 0244
Ye 6,7 0 0245
bb 6,7,2 0 0246
sc 6,7,1 0 0247
ad 6,7 0 0250
co 6,7 0 0251
Of 6,7 0 0252
Fo 6,5 0 0253
no 6,5 0 0254
- 6,4 0 0255
hy "
rg 6,7 0 0256
a- 6,7 0 0257
de 6,7 0 0260
t+- 6,6 0 0261
S2 6,7 0 0262
S3 6,7 0 0263
aa 6,8 0 0264
mc 6,5,2 0 0265
ps 6,7,1 0 0266
pc 6,5 0 0267
ac 6,1,2 0 0270
S1 6,7 0 0271
Om 6,7 0 0272
Fc 6,5 0 0273
14 6,8,1 0 0274
12 6,8,1 0 0275
34 6,8,1 0 0276
r? 6,4,2 0 0277
`A 6,9 0 0300
'A 6,9 0 0301
^A 6,9 0 0302
~A 6,9 0 0303
:A 6,9 0 0304
oA 6,9 0 0305
AE 6,6 0 0306
,C 6,6,2 0 0307
`E 6,9 0 0310
'E 6,9 0 0311
^E 6,9 0 0312
:E 6,9 0 0313
`I 6,9 0 0314
'I 6,9 0 0315
^I 6,9 0 0316
:I 6,9 0 0317
-D 6,6 0 0320
~N 6,9 0 0321
`O 6,9 0 0322
'O 6,9 0 0323
^O 6,9 0 0324
~O 6,9 0 0325
:O 6,9 0 0326
tmu 6,6 0 0327
/O 6,6,1 0 0330
`U 6,9 0 0331
'U 6,9 0 0332
^U 6,9 0 0333
:U 6,9 0 0334
'Y 6,9 0 0335
TP 6,6 0 0336
ss 6,7 0 0337
`a 6,8 0 0340
'a 6,8 0 0341
^a 6,8 0 0342
~a 6,8 0 0343
:a 6,8 0 0344
oa 6,9 0 0345
ae 6,5 0 0346
,c 6,5,2 0 0347
`e 6,8 0 0350
'e 6,8 0 0351
^e 6,8 0 0352
:e 6,8 0 0353
`i 6,8 0 0354
'i 6,8 0 0355
^i 6,8 0 0356
:i 6,8 0 0357
Sd 6,8 0 0360
~n 6,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,8 0 0366
tdi 6,6 0 0367
/o 6,6,1 0 0370
`u 6,8 0 0371
'u 6,8 0 0372
^u 6,8 0 0373
:u 6,8 0 0374
'y 6,8,2 0 0375
Tp 6,7,2 0 0376
:y 6,8,2 0 0377
1.18.1.4/font/devX75/HR 0000666 00000005347 15047753021 0007741 0 ustar 00 name HR
spacewidth 3
charset
--- 8,7 0 00
--- 3,1 0 040
! 3,8 0 041
" 4,8 0 042
dq "
# 6,7 0 043
sh "
$ 6,8,1 0 044
Do "
% 9,8 0 045
& 8,8 0 046
' 2,8 0 047
cq "
( 4,8,2 0 050
) 4,8,2 0 051
* 4,8 0 052
+ 6,6 0 053
, 3,1,2 0 054
\- 4,4 0 055
. 3,1 0 056
/ 3,8 0 057
sl "
0 6,8 0 060
1 6,8 0 061
2 6,8 0 062
3 6,8 0 063
4 6,8 0 064
5 6,8 0 065
6 6,8 0 066
7 6,8 0 067
8 6,8 0 070
9 6,8 0 071
: 3,6 0 072
; 3,6,2 0 073
< 6,6 0 074
= 5,5 0 075
eq "
> 6,6 0 076
? 6,8 0 077
@ 11,8,2 0 0100
at "
A 7,8 0 0101
B 7,8 0 0102
C 8,8 0 0103
D 8,8 0 0104
E 7,8 0 0105
F 6,8 0 0106
G 8,8 0 0107
H 8,8 0 0110
I 3,8 0 0111
J 5,8 0 0112
K 7,8 0 0113
L 6,8 0 0114
M 9,8 0 0115
N 8,8 0 0116
O 8,8 0 0117
P 7,8 0 0120
Q 8,8,1 0 0121
R 7,8 0 0122
S 7,8 0 0123
T 5,8 0 0124
U 8,8 0 0125
V 7,8 0 0126
W 9,8 0 0127
X 7,8 0 0130
Y 7,8 0 0131
Z 7,8 0 0132
[ 3,8,2 0 0133
lB "
\ 3,8 0 0134
rs "
] 3,8,2 0 0135
rB "
^ 6,8 0 0136
a^ "
ha "
_ 6,0,2 0 0137
` 3,8 0 0140
oq "
a 5,6 0 0141
b 6,8 0 0142
c 5,6 0 0143
d 6,8 0 0144
e 5,6 0 0145
f 4,8 0 0146
g 6,6,2 0 0147
h 6,8 0 0150
i 2,8 0 0151
j 2,8,1 0 0152
k 5,8 0 0153
l 2,8 0 0154
m 8,6 0 0155
n 6,6 0 0156
o 6,6 0 0157
p 6,6,2 0 0160
q 6,6,2 0 0161
r 4,6 0 0162
s 5,6 0 0163
t 4,8 0 0164
u 5,6 0 0165
v 6,6 0 0166
w 8,6 0 0167
x 6,6 0 0170
y 5,6,2 0 0171
z 5,6 0 0172
{ 3,8,2 0 0173
lC "
| 3,8,2 0 0174
or "
ba "
} 3,8,2 0 0175
rC "
~ 7,5 0 0176
a~ "
ap "
ti "
--- 3,1 0 0240
r! 3,6,2 0 0241
ct 6,7,1 0 0242
Po 6,8 0 0243
Cs 5,7 0 0244
Ye 6,8 0 0245
bb 3,8,2 0 0246
sc 6,8,2 0 0247
ad 3,8 0 0250
co 9,7 0 0251
Of 4,8 0 0252
Fo 6,5 0 0253
no 7,5 0 0254
- 4,4 0 0255
hy "
rg 9,7 0 0256
a- 3,8 0 0257
de 4,7 0 0260
t+- 6,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 3,8 0 0264
mc 5,6,2 0 0265
ps 6,8,2 0 0266
pc 3,4 0 0267
ac 3,0,2 0 0270
S1 3,7 0 0271
Om 4,8 0 0272
Fc 6,5 0 0273
14 9,8 0 0274
12 9,8 0 0275
34 9,8 0 0276
r? 6,6,2 0 0277
`A 7,11 0 0300
'A 7,11 0 0301
^A 7,11 0 0302
~A 7,11 0 0303
:A 7,10 0 0304
oA 7,11 0 0305
AE 10,8 0 0306
,C 8,8,2 0 0307
`E 7,11 0 0310
'E 7,11 0 0311
^E 7,11 0 0312
:E 7,10 0 0313
`I 3,11 0 0314
'I 3,11 0 0315
^I 3,11 0 0316
:I 3,10 0 0317
-D 8,8 0 0320
~N 8,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,10 0 0326
tmu 6,6 0 0327
/O 8,9,1 0 0330
`U 8,11 0 0331
'U 8,11 0 0332
^U 8,11 0 0333
:U 8,10 0 0334
'Y 7,11 0 0335
TP 7,8 0 0336
ss 5,8 0 0337
`a 5,9 0 0340
'a 5,9 0 0341
^a 5,9 0 0342
~a 5,9 0 0343
:a 5,8 0 0344
oa 5,9 0 0345
ae 8,6 0 0346
,c 5,6,2 0 0347
`e 5,9 0 0350
'e 5,9 0 0351
^e 5,9 0 0352
:e 5,8 0 0353
`i 2,9 0 0354
'i 2,9 0 0355
^i 2,9 0 0356
:i 2,8 0 0357
Sd 6,9 0 0360
~n 5,9 0 0361
`o 6,9 0 0362
'o 6,9 0 0363
^o 6,9 0 0364
~o 6,9 0 0365
:o 6,8 0 0366
tdi 6,6 0 0367
/o 6,6 0 0370
`u 5,9 0 0371
'u 5,9 0 0372
^u 5,9 0 0373
:u 5,8 0 0374
'y 5,9,2 0 0375
Tp 6,8,2 0 0376
:y 5,8,2 0 0377
1.18.1.4/font/devX75/TI 0000666 00000005347 15047753021 0007744 0 ustar 00 name TI
spacewidth 2
charset
--- 7,7 0 00
--- 2,1 0 040
! 3,7 0 041
" 4,8 0 042
dq "
# 5,7 0 043
sh "
$ 5,8,1 0 044
Do "
% 9,7 0 045
& 8,7 0 046
' 3,8 0 047
cq "
( 3,7,2 0 050
) 4,7,2 0 051
* 5,7 0 052
+ 7,5 0 053
, 3,1,2 0 054
\- 4,3 0 055
. 3,1 0 056
/ 4,7 0 057
sl "
0 5,7 0 060
1 5,7 0 061
2 5,7 0 062
3 5,7 0 063
4 5,7 0 064
5 5,7 0 065
6 5,7 0 066
7 5,7 0 067
8 5,7 0 070
9 5,7 0 071
: 3,5 0 072
; 3,5,2 0 073
< 5,5 0 074
= 7,4 0 075
eq "
> 5,5 0 076
? 5,7 0 077
@ 10,7,2 0 0100
at "
A 7,7 0 0101
B 6,7 0 0102
C 7,7 0 0103
D 7,7 0 0104
E 6,7 0 0105
F 6,7 0 0106
G 8,7 0 0107
H 7,7 0 0110
I 3,7 0 0111
J 4,7 0 0112
K 7,7 0 0113
L 6,7 0 0114
M 10,7 0 0115
N 7,7 0 0116
O 7,7 0 0117
P 6,7 0 0120
Q 7,7,2 0 0121
R 6,7 0 0122
S 5,7 0 0123
T 6,7 0 0124
U 7,7 0 0125
V 6,7 0 0126
W 9,7 0 0127
X 6,7 0 0130
Y 6,7 0 0131
Z 6,7 0 0132
[ 4,7,2 0 0133
lB "
\ 5,7 0 0134
rs "
] 4,7,2 0 0135
rB "
^ 5,7 0 0136
a^ "
ha "
_ 5,0,3 0 0137
` 3,8 0 0140
oq "
a 5,5 0 0141
b 5,7 0 0142
c 5,5 0 0143
d 5,7 0 0144
e 5,5 0 0145
f 3,7,3 0 0146
g 4,5,3 0 0147
h 5,7 0 0150
i 3,7 0 0151
j 3,7,3 0 0152
k 5,7 0 0153
l 3,7 0 0154
m 7,5 0 0155
n 5,5 0 0156
o 5,5 0 0157
p 5,5,3 0 0160
q 5,5,3 0 0161
r 4,5 0 0162
s 4,5 0 0163
t 3,6 0 0164
u 5,5 0 0165
v 5,5 0 0166
w 7,5 0 0167
x 4,5 0 0170
y 5,5,3 0 0171
z 4,5 0 0172
{ 4,7,2 0 0173
lC "
| 3,7,2 0 0174
or "
ba "
} 4,7,2 0 0175
rC "
~ 6,4 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 4,5,2 0 0241
ct 5,6,1 0 0242
Po 5,7 0 0243
Cs 5,7 0 0244
Ye 7,7 0 0245
bb 3,7,2 0 0246
sc 5,7,2 0 0247
ad 3,7 0 0250
co 9,7 0 0251
Of 4,7 0 0252
Fo 5,5 0 0253
no 7,4 0 0254
- 4,3 0 0255
hy "
rg 9,7 0 0256
a- 3,7 0 0257
de 4,7 0 0260
t+- 7,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 3,8 0 0264
mc 5,5,3 0 0265
ps 6,7,3 0 0266
pc 3,3 0 0267
ac 3,0,2 0 0270
S1 3,7 0 0271
Om 3,7 0 0272
Fc 5,5 0 0273
14 7,7 0 0274
12 7,7 0 0275
34 7,7 0 0276
r? 5,5,2 0 0277
`A 7,10 0 0300
'A 7,10 0 0301
^A 7,10 0 0302
~A 7,10 0 0303
:A 7,9 0 0304
oA 7,10 0 0305
AE 8,7 0 0306
,C 7,7,2 0 0307
`E 6,10 0 0310
'E 6,10 0 0311
^E 6,10 0 0312
:E 6,9 0 0313
`I 3,10 0 0314
'I 3,10 0 0315
^I 3,10 0 0316
:I 3,9 0 0317
-D 7,7 0 0320
~N 7,10 0 0321
`O 7,10 0 0322
'O 7,10 0 0323
^O 7,10 0 0324
~O 7,10 0 0325
:O 7,9 0 0326
tmu 7,5 0 0327
/O 7,8,1 0 0330
`U 7,10 0 0331
'U 7,10 0 0332
^U 7,10 0 0333
:U 7,9 0 0334
'Y 6,9 0 0335
TP 6,7 0 0336
ss 6,7,2 0 0337
`a 5,8 0 0340
'a 5,8 0 0341
^a 5,8 0 0342
~a 5,8 0 0343
:a 5,7 0 0344
oa 5,8 0 0345
ae 7,5 0 0346
,c 5,5,2 0 0347
`e 5,8 0 0350
'e 5,8 0 0351
^e 5,8 0 0352
:e 5,7 0 0353
`i 3,8 0 0354
'i 3,8 0 0355
^i 3,8 0 0356
:i 3,7 0 0357
Sd 5,8 0 0360
~n 5,8 0 0361
`o 5,8 0 0362
'o 5,8 0 0363
^o 5,8 0 0364
~o 5,8 0 0365
:o 5,7 0 0366
tdi 7,5 0 0367
/o 5,6,1 0 0370
`u 5,8 0 0371
'u 5,8 0 0372
^u 5,8 0 0373
:u 5,7 0 0374
'y 5,8,3 0 0375
Tp 5,7,3 0 0376
:y 5,7,3 0 0377
1.18.1.4/font/devX75/NI 0000666 00000005344 15047753021 0007733 0 ustar 00 name NI
spacewidth 2
charset
--- 9,7 0 00
--- 2,1 0 040
! 4,8 0 041
" 6,8 0 042
dq "
# 8,7 0 043
sh "
$ 5,9,1 0 044
Do "
% 9,8 0 045
& 9,8 0 046
' 4,8 0 047
cq "
( 5,8,1 0 050
) 5,8,1 0 051
* 6,8 0 052
+ 6,5 0 053
, 2,2,1 0 054
\- 4,3 0 055
. 2,2 0 056
/ 5,8,1 0 057
sl "
0 5,8 0 060
1 5,8 0 061
2 5,8 0 062
3 5,8 0 063
4 5,8 0 064
5 5,8 0 065
6 5,8 0 066
7 5,8 0 067
8 5,8 0 070
9 5,8 0 071
: 3,5 0 072
; 3,5,1 0 073
< 7,5 0 074
= 6,4 0 075
eq "
> 7,5 0 076
? 6,8 0 077
@ 9,8 0 0100
at "
A 8,8 0 0101
B 7,8 0 0102
C 6,8 0 0103
D 8,8 0 0104
E 7,8 0 0105
F 7,8 0 0106
G 8,8 0 0107
H 9,8 0 0110
I 5,8 0 0111
J 5,8 0 0112
K 8,8 0 0113
L 7,8 0 0114
M 12,8 0 0115
N 9,8 0 0116
O 7,8 0 0117
P 7,8 0 0120
Q 7,8,2 0 0121
R 8,8 0 0122
S 7,8 0 0123
T 7,8 0 0124
U 7,8 0 0125
V 8,8 0 0126
W 11,8 0 0127
X 8,8 0 0130
Y 8,8 0 0131
Z 8,8 0 0132
[ 5,8,1 0 0133
lB "
\ 5,8 0 0134
rs "
] 5,8,1 0 0135
rB "
^ 6,8 0 0136
a^ "
ha "
_ 5,0,2 0 0137
` 3,8 0 0140
oq "
a 6,5 0 0141
b 6,8 0 0142
c 5,5 0 0143
d 6,8 0 0144
e 5,5 0 0145
f 4,8,2 0 0146
g 5,6,2 0 0147
h 6,8 0 0150
i 3,8 0 0151
j 3,8,2 0 0152
k 6,8 0 0153
l 3,8 0 0154
m 9,5 0 0155
n 6,5 0 0156
o 6,5 0 0157
p 6,5,2 0 0160
q 6,5,2 0 0161
r 5,5 0 0162
s 4,5 0 0163
t 3,7 0 0164
u 6,5 0 0165
v 6,5 0 0166
w 9,5 0 0167
x 6,5 0 0170
y 6,5,2 0 0171
z 6,5 0 0172
{ 5,8,1 0 0173
lC "
| 6,8 0 0174
or "
ba "
} 5,8,1 0 0175
rC "
~ 7,4 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 4,6,2 0 0241
ct 5,6,1 0 0242
Po 6,8 0 0243
Cs 8,8 0 0244
Ye 8,8 0 0245
bb 6,8 0 0246
sc 6,8,1 0 0247
ad 4,7 0 0250
co 9,8 0 0251
Of 5,8 0 0252
Fo 6,5 0 0253
no 6,4 0 0254
- 4,3 0 0255
hy "
rg 9,8 0 0256
a- 4,7 0 0257
de 4,8 0 0260
t+- 6,5 0 0261
S2 3,8 0 0262
S3 3,8 0 0263
aa 3,8 0 0264
mc 6,5,2 0 0265
ps 8,8 0 0266
pc 3,4 0 0267
ac 4,1,2 0 0270
S1 3,8 0 0271
Om 4,8 0 0272
Fc 6,5 0 0273
14 7,8 0 0274
12 7,8 0 0275
34 7,8 0 0276
r? 6,6,2 0 0277
`A 8,11 0 0300
'A 8,11 0 0301
^A 8,11 0 0302
~A 8,11 0 0303
:A 8,10 0 0304
oA 8,11 0 0305
AE 10,8 0 0306
,C 6,8,2 0 0307
`E 7,11 0 0310
'E 7,11 0 0311
^E 7,11 0 0312
:E 7,10 0 0313
`I 5,11 0 0314
'I 5,11 0 0315
^I 5,11 0 0316
:I 5,10 0 0317
-D 8,8 0 0320
~N 9,11 0 0321
`O 7,11 0 0322
'O 7,11 0 0323
^O 7,11 0 0324
~O 7,11 0 0325
:O 7,10 0 0326
tmu 6,5 0 0327
/O 7,8 0 0330
`U 7,11 0 0331
'U 7,11 0 0332
^U 7,11 0 0333
:U 7,10 0 0334
'Y 8,10 0 0335
TP 7,8 0 0336
ss 7,8,2 0 0337
`a 6,8 0 0340
'a 6,8 0 0341
^a 6,8 0 0342
~a 6,8 0 0343
:a 6,7 0 0344
oa 6,9 0 0345
ae 8,5 0 0346
,c 5,5,2 0 0347
`e 5,8 0 0350
'e 5,8 0 0351
^e 5,8 0 0352
:e 5,7 0 0353
`i 3,8 0 0354
'i 3,8 0 0355
^i 3,8 0 0356
:i 3,7 0 0357
Sd 6,8 0 0360
~n 6,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,7 0 0366
tdi 6,5 0 0367
/o 6,5 0 0370
`u 6,8 0 0371
'u 6,8 0 0372
^u 6,8 0 0373
:u 6,7 0 0374
'y 6,8,2 0 0375
Tp 6,8,2 0 0376
:y 6,7,2 0 0377
1.18.1.4/font/devX75/NBI 0000666 00000005353 15047753021 0010035 0 ustar 00 name NBI
spacewidth 2
charset
--- 10,7 0 00
--- 2,1 0 040
! 5,8 0 041
" 6,8 0 042
dq "
# 8,7 0 043
sh "
$ 6,9,1 0 044
Do "
% 11,8 0 045
& 10,8 0 046
' 4,8 0 047
cq "
( 4,8,1 0 050
) 5,8,1 0 051
* 6,8 0 052
+ 6,6 0 053
, 3,2,2 0 054
\- 4,4 0 055
. 3,2 0 056
/ 5,8 0 057
sl "
0 6,8 0 060
1 6,8 0 061
2 6,8 0 062
3 6,8 0 063
4 6,8 0 064
5 6,8 0 065
6 6,8 0 066
7 6,8 0 067
8 6,8 0 070
9 6,8 0 071
: 4,5 0 072
; 4,5,2 0 073
< 7,6 0 074
= 6,5 0 075
eq "
> 7,6 0 076
? 6,8 0 077
@ 11,8 0 0100
at "
A 8,8 0 0101
B 8,8 0 0102
C 7,8 0 0103
D 9,8 0 0104
E 8,8 0 0105
F 7,8 0 0106
G 8,8 0 0107
H 10,8 0 0110
I 6,8 0 0111
J 7,8 0 0112
K 10,8 0 0113
L 7,8 0 0114
M 11,8 0 0115
N 8,8 0 0116
O 8,8 0 0117
P 8,8 0 0120
Q 8,8,2 0 0121
R 9,8 0 0122
S 7,8 0 0123
T 7,8 0 0124
U 8,8 0 0125
V 8,8 0 0126
W 11,8 0 0127
X 8,8 0 0130
Y 7,8 0 0131
Z 8,8 0 0132
[ 5,8,1 0 0133
lB "
\ 5,8 0 0134
rs "
] 5,8,1 0 0135
rB "
^ 6,8 0 0136
a^ "
ha "
_ 5,0,2 0 0137
` 4,8 0 0140
oq "
a 7,5 0 0141
b 7,8 0 0142
c 6,5 0 0143
d 7,8 0 0144
e 6,5 0 0145
f 5,8,2 0 0146
g 6,6,2 0 0147
h 7,8 0 0150
i 4,8 0 0151
j 4,8,2 0 0152
k 7,8 0 0153
l 4,8 0 0154
m 10,5 0 0155
n 7,5 0 0156
o 6,5 0 0157
p 7,5,2 0 0160
q 7,5,2 0 0161
r 5,5 0 0162
s 4,5 0 0163
t 4,7 0 0164
u 7,5 0 0165
v 6,5 0 0166
w 10,5 0 0167
x 7,5 0 0170
y 7,5,2 0 0171
z 5,5 0 0172
{ 5,8,1 0 0173
lC "
| 6,8 0 0174
or "
ba "
} 5,8,1 0 0175
rC "
~ 7,5 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 4,6,2 0 0241
ct 6,6,1 0 0242
Po 7,8 0 0243
Cs 7,7 0 0244
Ye 7,8 0 0245
bb 6,8 0 0246
sc 6,8,2 0 0247
ad 4,8 0 0250
co 9,8 0 0251
Of 6,8 0 0252
Fo 8,5 0 0253
no 6,5 0 0254
- 4,4 0 0255
hy "
rg 9,8 0 0256
a- 5,7 0 0257
de 4,8 0 0260
t+- 6,6 0 0261
S2 3,8 0 0262
S3 3,8 0 0263
aa 4,8 0 0264
mc 7,5,2 0 0265
ps 8,8 0 0266
pc 3,5 0 0267
ac 4,1,2 0 0270
S1 3,8 0 0271
Om 5,8 0 0272
Fc 8,5 0 0273
14 9,8 0 0274
12 9,8 0 0275
34 9,8 0 0276
r? 6,6,2 0 0277
`A 8,11 0 0300
'A 8,11 0 0301
^A 8,11 0 0302
~A 8,11 0 0303
:A 8,11 0 0304
oA 8,11 0 0305
AE 10,8 0 0306
,C 7,8,2 0 0307
`E 8,11 0 0310
'E 8,11 0 0311
^E 8,11 0 0312
:E 8,11 0 0313
`I 6,11 0 0314
'I 6,11 0 0315
^I 6,11 0 0316
:I 6,11 0 0317
-D 9,8 0 0320
~N 8,11 0 0321
`O 8,11 0 0322
'O 8,11 0 0323
^O 8,11 0 0324
~O 8,11 0 0325
:O 8,11 0 0326
tmu 6,6 0 0327
/O 8,8 0 0330
`U 8,11 0 0331
'U 8,11 0 0332
^U 8,11 0 0333
:U 8,11 0 0334
'Y 7,11 0 0335
TP 8,8 0 0336
ss 8,8,2 0 0337
`a 7,8 0 0340
'a 7,8 0 0341
^a 7,8 0 0342
~a 7,8 0 0343
:a 7,8 0 0344
oa 7,9 0 0345
ae 9,5 0 0346
,c 6,5,2 0 0347
`e 6,8 0 0350
'e 6,8 0 0351
^e 6,8 0 0352
:e 6,8 0 0353
`i 4,8 0 0354
'i 4,8 0 0355
^i 4,8 0 0356
:i 4,8 0 0357
Sd 6,8 0 0360
~n 7,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,8 0 0366
tdi 6,6 0 0367
/o 6,5 0 0370
`u 7,8 0 0371
'u 7,8 0 0372
^u 7,8 0 0373
:u 7,8 0 0374
'y 7,8,2 0 0375
Tp 7,8,2 0 0376
:y 7,8,2 0 0377
1.18.1.4/font/devX75/G 0000666 00000000101 15047753021 0007575 0 ustar 00 name G
spacewidth 2
charset
u2E00..u9FFF 10 0
uFF00..uFFEF 10 0
1.18.1.4/font/devX75/TBI 0000666 00000005353 15047753021 0010043 0 ustar 00 name TBI
spacewidth 2
charset
--- 8,7 0 00
--- 2,1 0 040
! 6,7 0 041
" 6,7 0 042
dq "
# 8,7 0 043
sh "
$ 5,7 0 044
Do "
% 11,7 0 045
& 8,7 0 046
' 4,7 0 047
cq "
( 6,7,2 0 050
) 6,7,2 0 051
* 7,8 0 052
+ 7,5 0 053
, 4,2,1 0 054
\- 3,3 0 055
. 4,2 0 056
/ 5,7 0 057
sl "
0 5,7 0 060
1 5,7 0 061
2 5,7 0 062
3 5,7 0 063
4 5,7 0 064
5 5,7 0 065
6 5,7 0 066
7 5,7 0 067
8 5,7 0 070
9 5,7 0 071
: 3,5 0 072
; 5,5,1 0 073
< 6,5 0 074
= 7,4 0 075
eq "
> 6,5 0 076
? 5,7 0 077
@ 11,7,2 0 0100
at "
A 6,7 0 0101
B 7,7 0 0102
C 7,7 0 0103
D 7,7 0 0104
E 7,7 0 0105
F 7,7 0 0106
G 7,7 0 0107
H 8,7 0 0110
I 4,7 0 0111
J 5,7,1 0 0112
K 7,7 0 0113
L 6,7 0 0114
M 10,7 0 0115
N 8,7 0 0116
O 7,7 0 0117
P 6,7 0 0120
Q 7,7,2 0 0121
R 7,7 0 0122
S 6,7 0 0123
T 6,7 0 0124
U 8,7 0 0125
V 7,7 0 0126
W 9,7 0 0127
X 7,7 0 0130
Y 6,7 0 0131
Z 6,7 0 0132
[ 5,7,2 0 0133
lB "
\ 5,7 0 0134
rs "
] 5,7,2 0 0135
rB "
^ 7,7 0 0136
a^ "
ha "
_ 5,0,2 0 0137
` 4,8 0 0140
oq "
a 5,5 0 0141
b 5,7 0 0142
c 5,5 0 0143
d 5,7 0 0144
e 5,5 0 0145
f 4,7,3 0 0146
g 4,5,3 0 0147
h 5,7 0 0150
i 3,7 0 0151
j 3,7,3 0 0152
k 5,7 0 0153
l 3,7 0 0154
m 7,5 0 0155
n 5,5 0 0156
o 5,5 0 0157
p 5,5,3 0 0160
q 5,5,3 0 0161
r 4,5 0 0162
s 4,5 0 0163
t 4,6 0 0164
u 5,5 0 0165
v 4,5 0 0166
w 7,5 0 0167
x 4,5 0 0170
y 5,5,2 0 0171
z 4,5 0 0172
{ 5,7,2 0 0173
lC "
| 3,7 0 0174
or "
ba "
} 5,7,2 0 0175
rC "
~ 6,4 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 5,5,3 0 0241
ct 5,6,1 0 0242
Po 5,7 0 0243
Cs 7,6 0 0244
Ye 5,7 0 0245
bb 3,7 0 0246
sc 5,7,2 0 0247
ad 5,7 0 0250
co 9,7 0 0251
Of 5,7 0 0252
Fo 8,5 0 0253
no 7,5 0 0254
- 3,3 0 0255
hy "
rg 9,7 0 0256
a- 4,7 0 0257
de 4,7 0 0260
t+- 7,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 4,7 0 0264
mc 5,5,3 0 0265
ps 8,7,3 0 0266
pc 4,4 0 0267
ac 3,0,3 0 0270
S1 3,7 0 0271
Om 5,7 0 0272
Fc 8,5 0 0273
14 7,7 0 0274
12 7,7 0 0275
34 7,7 0 0276
r? 5,5,3 0 0277
`A 6,10 0 0300
'A 6,10 0 0301
^A 6,10 0 0302
~A 6,10 0 0303
:A 6,10 0 0304
oA 6,10 0 0305
AE 9,7 0 0306
,C 7,7,3 0 0307
`E 7,10 0 0310
'E 7,10 0 0311
^E 7,10 0 0312
:E 7,10 0 0313
`I 4,10 0 0314
'I 4,10 0 0315
^I 4,10 0 0316
:I 4,10 0 0317
-D 7,7 0 0320
~N 8,10 0 0321
`O 7,10 0 0322
'O 7,10 0 0323
^O 7,10 0 0324
~O 7,10 0 0325
:O 7,10 0 0326
tmu 7,5 0 0327
/O 7,8,1 0 0330
`U 8,10 0 0331
'U 8,10 0 0332
^U 8,10 0 0333
:U 8,10 0 0334
'Y 6,10 0 0335
TP 6,7 0 0336
ss 6,7,3 0 0337
`a 5,8 0 0340
'a 5,8 0 0341
^a 5,8 0 0342
~a 5,8 0 0343
:a 5,8 0 0344
oa 5,8 0 0345
ae 8,5 0 0346
,c 5,5,3 0 0347
`e 5,8 0 0350
'e 5,8 0 0351
^e 5,8 0 0352
:e 5,8 0 0353
`i 3,8 0 0354
'i 3,8 0 0355
^i 3,8 0 0356
:i 3,8 0 0357
Sd 5,8 0 0360
~n 5,8 0 0361
`o 5,8 0 0362
'o 5,8 0 0363
^o 5,8 0 0364
~o 5,8 0 0365
:o 5,8 0 0366
tdi 7,5 0 0367
/o 5,6,1 0 0370
`u 5,8 0 0371
'u 5,8 0 0372
^u 5,8 0 0373
:u 5,8 0 0374
'y 5,8,2 0 0375
Tp 5,7,3 0 0376
:y 5,8,2 0 0377
1.18.1.4/font/devX75/TB 0000666 00000005354 15047753021 0007733 0 ustar 00 name TB
spacewidth 2
charset
--- 9,7 0 00
--- 2,1 0 040
! 4,7 0 041
" 5,7 0 042
dq "
# 6,7 0 043
sh "
$ 5,8,1 0 044
Do "
% 9,7 0 045
& 9,7 0 046
' 3,7 0 047
cq "
( 4,7,3 0 050
) 4,7,3 0 051
* 6,7 0 052
+ 6,5 0 053
, 4,2,1 0 054
\- 3,3 0 055
. 3,2 0 056
/ 3,7 0 057
sl "
0 5,7 0 060
1 5,7 0 061
2 5,7 0 062
3 5,7 0 063
4 5,7 0 064
5 5,7 0 065
6 5,7 0 066
7 5,7 0 067
8 5,7 0 070
9 5,7 0 071
: 4,5 0 072
; 4,5,1 0 073
< 6,5 0 074
= 6,4 0 075
eq "
> 6,5 0 076
? 6,7 0 077
@ 11,7,2 0 0100
at "
A 7,7 0 0101
B 7,7 0 0102
C 7,7 0 0103
D 8,7 0 0104
E 7,7 0 0105
F 7,7 0 0106
G 7,7 0 0107
H 9,7 0 0110
I 5,7 0 0111
J 5,7,1 0 0112
K 8,7 0 0113
L 7,7 0 0114
M 10,7 0 0115
N 8,7 0 0116
O 7,7 0 0117
P 6,7 0 0120
Q 7,7,2 0 0121
R 7,7 0 0122
S 6,7 0 0123
T 7,7 0 0124
U 7,7 0 0125
V 8,7 0 0126
W 10,7 0 0127
X 7,7 0 0130
Y 8,7 0 0131
Z 7,7 0 0132
[ 4,7,3 0 0133
lB "
\ 3,7 0 0134
rs "
] 4,7,3 0 0135
rB "
^ 6,7 0 0136
a^ "
ha "
_ 5,0,3 0 0137
` 4,8 0 0140
oq "
a 5,5 0 0141
b 5,7 0 0142
c 5,5 0 0143
d 6,7 0 0144
e 5,5 0 0145
f 3,7 0 0146
g 5,5,3 0 0147
h 5,7 0 0150
i 3,8 0 0151
j 4,8,2 0 0152
k 5,7 0 0153
l 3,7 0 0154
m 8,5 0 0155
n 6,5 0 0156
o 6,5 0 0157
p 5,5,2 0 0160
q 5,5,2 0 0161
r 4,5 0 0162
s 4,5 0 0163
t 4,7 0 0164
u 5,5 0 0165
v 5,5 0 0166
w 6,5 0 0167
x 5,5 0 0170
y 5,5,2 0 0171
z 5,5 0 0172
{ 4,7,3 0 0173
lC "
| 3,7,2 0 0174
or "
ba "
} 4,7,3 0 0175
rC "
~ 6,4 0 0176
a~ "
ap "
ti "
--- 2,1 0 0240
r! 4,4,3 0 0241
ct 6,6,1 0 0242
Po 6,7 0 0243
Cs 6,6 0 0244
Ye 6,7 0 0245
bb 3,7,2 0 0246
sc 5,7,2 0 0247
ad 4,8 0 0250
co 9,7 0 0251
Of 4,7 0 0252
Fo 6,5 0 0253
no 7,5 0 0254
- 3,3 0 0255
hy "
rg 9,7 0 0256
a- 4,7 0 0257
de 4,7 0 0260
t+- 6,7 0 0261
S2 3,7 0 0262
S3 3,7 0 0263
aa 4,7 0 0264
mc 5,5,3 0 0265
ps 6,7,3 0 0266
pc 3,4 0 0267
ac 3,0,3 0 0270
S1 3,7 0 0271
Om 4,7 0 0272
Fc 6,5 0 0273
14 7,7 0 0274
12 7,7 0 0275
34 7,7 0 0276
r? 6,4,3 0 0277
`A 7,10 0 0300
'A 7,10 0 0301
^A 7,10 0 0302
~A 7,10 0 0303
:A 7,10 0 0304
oA 7,10 0 0305
AE 9,7 0 0306
,C 7,7,3 0 0307
`E 7,10 0 0310
'E 7,10 0 0311
^E 7,10 0 0312
:E 7,10 0 0313
`I 5,10 0 0314
'I 5,10 0 0315
^I 5,10 0 0316
:I 5,10 0 0317
-D 8,7 0 0320
~N 8,10 0 0321
`O 7,10 0 0322
'O 7,10 0 0323
^O 7,10 0 0324
~O 7,10 0 0325
:O 7,10 0 0326
tmu 6,5 0 0327
/O 7,8,1 0 0330
`U 7,10 0 0331
'U 7,10 0 0332
^U 7,10 0 0333
:U 7,10 0 0334
'Y 8,10 0 0335
TP 6,7 0 0336
ss 6,7 0 0337
`a 5,8 0 0340
'a 5,8 0 0341
^a 5,8 0 0342
~a 5,8 0 0343
:a 5,8 0 0344
oa 5,8 0 0345
ae 8,5 0 0346
,c 5,5,3 0 0347
`e 5,8 0 0350
'e 5,8 0 0351
^e 5,8 0 0352
:e 5,8 0 0353
`i 3,8 0 0354
'i 3,8 0 0355
^i 3,8 0 0356
:i 3,8 0 0357
Sd 6,8 0 0360
~n 6,8 0 0361
`o 6,8 0 0362
'o 6,8 0 0363
^o 6,8 0 0364
~o 6,8 0 0365
:o 6,8 0 0366
tdi 6,5 0 0367
/o 6,6,1 0 0370
`u 5,8 0 0371
'u 5,8 0 0372
^u 5,8 0 0373
:u 5,8 0 0374
'y 5,8,3 0 0375
Tp 5,7,3 0 0376
:y 5,8,3 0 0377
1.18.1.4/font/devX75/S 0000666 00000006123 15047753021 0007623 0 ustar 00 name S
special
spacewidth 3
charset
--- 3,1 0 040
! 3,7 0 041
fa 7,7 0 042
# 5,7 0 043
sh "
te 6,7 0 044
% 8,7 0 045
& 7,7 0 046
st 5,5 0 047
( 4,7,2 0 050
) 4,7,2 0 051
** 5,6 0 052
+ 6,5 0 053
pl "
, 2,1,2 0 054
\- 6,3 0 055
mi "
. 2,2 0 056
/ 3,7 0 057
sl "
0 5,7 0 060
1 5,7 0 061
2 5,7 0 062
3 5,7 0 063
4 5,7 0 064
5 5,7 0 065
6 5,7 0 066
7 5,7 0 067
8 5,7 0 070
9 5,7 0 071
: 2,5 0 072
; 2,5,2 0 073
< 7,5 0 074
= 6,4 0 075
eq "
> 6,5 0 076
? 5,7 0 077
=~ 6,6 0 0100
*A 8,7 0 0101
*B 6,7 0 0102
*X 8,7 0 0103
*D 7,7 0 0104
*E 6,7 0 0105
*F 8,7 0 0106
*G 6,7 0 0107
*Y 8,7 0 0110
*I 3,7 0 0111
+h 7,7 0 0112
*K 7,7 0 0113
*L 7,7 0 0114
*M 10,7 0 0115
*N 8,7 0 0116
*O 7,7 0 0117
*P 8,7 0 0120
*H 7,7 0 0121
*R 6,7 0 0122
*S 6,7 0 0123
*T 6,7 0 0124
--- 8,7 0 0125
ts 5,5,2 0 0126
*W 9,7 0 0127
*C 7,7 0 0130
*Q 9,7 0 0131
*Z 6,7 0 0132
[ 3,7,2 0 0133
lB "
tf 7,5 0 0134
3d "
] 3,7,2 0 0135
rB "
pp 7,7 0 0136
_ 5,0,2 0 0137
radicalex 5,10 0 0140
*a 7,5 0 0141
*b 5,8,2 0 0142
*x 6,5,2 0 0143
*d 5,8 0 0144
*e 5,5 0 0145
*f 6,7,2 0 0146
*g 6,5,2 0 0147
*y 6,5,2 0 0150
*i 4,5 0 0151
+f 6,5,2 0 0152
*k 6,5 0 0153
*l 6,8 0 0154
*m 6,5,2 0 0155
*n 6,5 0 0156
*o 5,5 0 0157
*p 6,5 0 0160
*h 5,7 0 0161
*r 5,5,3 0 0162
*s 6,5 0 0163
*t 5,5 0 0164
*u 6,5 0 0165
+p 8,6 0 0166
*w 8,5 0 0167
*c 5,8,2 0 0170
*q 7,5,2 0 0171
*z 5,8,2 0 0172
lC 5,7,2 0 0173
{ "
ba 2,7,2 0 0174
or "
| "
rC 5,7,2 0 0175
} "
ap 6,4 0 0176
*U 7,7 0 0241
fm 3,8 0 0242
<= 6,7 0 0243
f/ 3,7 0 0244
if 7,4 0 0245
Fn 5,7,2 0 0246
CL 7,5 0 0247
DI 7,5 0 0250
HE 7,5 0 0251
SP 7,5 0 0252
<> 10,5 0 0253
<- 10,5 0 0254
ua 6,10,4 0 0255
arrowverttp "
-> 10,5 0 0256
da 6,10,2 0 0257
arrowvertbt "
de 4,7 0 0260
+- 6,7 0 0261
sd 4,8 0 0262
>= 6,7 0 0263
mu 6,5 0 0264
pt 7,4 0 0265
pd 5,8 0 0266
bu 5,4 0 0267
di 6,5 0 0270
!= 6,5 0 0271
== 6,5 0 0272
~= 6,5 0 0273
~~ "
--- 9,1 0 0274
arrowvertex 6,10,4 0 0275
an 10,3 0 0276
CR 7,6 0 0277
Ah 8,7 0 0300
Im 7,8,1 0 0301
Re 8,8 0 0302
wp 9,6,2 0 0303
c* 8,7 0 0304
c+ 8,7 0 0305
es 8,8,1 0 0306
ca 8,5 0 0307
cu 8,5 0 0310
sp 7,5 0 0311
ip 7,5,2 0 0312
nb 7,6,1 0 0313
sb 7,5 0 0314
ib 7,5,2 0 0315
mo 7,5 0 0316
nm 7,6,1 0 0317
/_ 8,7 0 0320
gr 7,7 0 0321
rg 8,7,1 0 0322
co 8,7,1 0 0323
tm 10,7 0 0324
--- 9,8,1 0 0325
sr 6,10 0 0326
md 3,3 0 0327
no 7,3 0 0330
AN 6,5 0 0331
OR 6,5 0 0332
hA 11,5 0 0333
lA 10,5 0 0334
uA 6,10 0 0335
rA 10,5 0 0336
dA 6,10 0 0337
lz 7,7 0 0340
la 3,7,2 0 0341
--- 8,7,1 0 0342
--- 8,7,1 0 0343
--- 9,7 0 0344
--- 7,8,1 0 0345
parenlefttp 4,10,4 0 0346
parenleftex 4,10,4 0 0347
parenleftbt 4,10,4 0 0350
bracketlefttp 4,10,4 0 0351
lc "
bracketleftex 4,10,4 0 0352
bracketleftbt 4,10,2 0 0353
lf "
bracelefttp 5,10,4 0 0354
lt "
braceleftmid 5,10,4 0 0355
lk "
braceleftbt 5,10,2 0 0356
lb "
bracerightex 5,10,4 0 0357
braceleftex "
bv "
ra 3,7,2 0 0361
is 3,10,2 0 0362
--- 7,10,4 0 0363
--- 7,10,4 0 0364
--- 7,10,2 0 0365
parenrighttp 4,10,4 0 0366
parenrightex 4,10,4 0 0367
parenrightbt 4,10,4 0 0370
bracketrighttp 4,10,4 0 0371
rc "
bracketrightex 4,10,4 0 0372
bracketrightbt 4,10,2 0 0373
rf "
bracerighttp 5,10,4 0 0374
rt "
bracerightmid 5,10,4 0 0375
rk "
bracerightbt 5,10,2 0 0376
rb "
1.18.1.4/tmac/mandoc.tmac 0000666 00000000047 15047753021 0010500 0 ustar 00 .\" mandoc.tmac
.\"
.do mso andoc.tmac
1.18.1.4/tmac/eqnrc 0000666 00000002524 15047753021 0007426 0 ustar 00 .\" Startup file for eqn.
.EQ
sdefine << %{ < back 20 < }%
sdefine >> %{ > back 20 > }%
sdefine dot %accent "\fR\(a.\fP"%
sdefine dotdot %accent "\fR\(ad\fP"%
sdefine vec %accent {up 52 "\s[\En[.s]/2u]\(->\s0"}%
sdefine dyad %accent {up 52 "\s[\En[.s]/2u]\(<>\s0"}%
sdefine cdot %type "binary" \(md%
ifdef X75 ! define X %1% !
ifdef X100 ! define X %1% !
ifdef X75-12 ! define X %1% !
ifdef X100-12 ! define X %1% !
ifdef ps ! define ps|X|html %1% !
ifdef X ! define ps|X|html %1% !
ifdef html ! define ps|X|html %1% !
ifdef ps|X|html ! sdefine inf %"\s[\En[.s]*13u/10u]\v'12M'\(if\v'-12M'\s0"% !
ifdef dvi !
sdefine int %{type "operator" vcenter \(is}%
sdefine sum %{type "operator" vcenter \[sum]}%
sdefine prod %{type "operator" vcenter \[product]}%
sdefine coprod %{type "operator" vcenter \[coproduct]}%
set num1 68
set num2 39
set denom1 69
set denom2 34
set sup1 41
set sup2 36
set sup3 29
set sup_drop 39
set sub_drop 5
set axis_height 25
set x_height 43
set default_rule_thickness 4
set big_op_spacing1 11
set big_op_spacing2 16
set big_op_spacing3 20
set big_op_spacing4 60
set big_op_spacing5 10
!
ifdef X ! set axis_height 32 !
ifdef ps|X|html ! set draw_lines 1 !
ifdef ascii ! define n %1% !
ifdef latin1 ! define n %1% !
ifdef utf8 ! define n %1% !
ifdef cp1047 ! define n %1% !
ifdef n !
set nroff 1
!
undef X
undef ps|X|html
undef n
.EN
1.18.1.4/tmac/an.tmac 0000666 00000000043 15047753021 0007631 0 ustar 00 .\" an.tmac
.\"
.do mso andoc.tmac
1.18.1.4/tmac/dvi.tmac 0000666 00000053453 15047753021 0010032 0 ustar 00 .\" dvi.tmac
.\"
.nr _C \n(.C
.cp 0
.
.ftr CR CW
.ftr C CW
.ftr CO CWI
.ftr CI CWI
.ftr CB CW
.ftr TT CW
.ftr H HR
.
.special TR TI
.fspecial TI CWI
.fspecial TBI CWI
.fspecial HI CWI
.fspecial HBI CWI
.
.\" This uses the dvi-char_1 string in font CW or CWI, dvi-char_0 otherwise.
.fchar _ \
\R'dvi-char_ ((\\n[.f] == \f[CW]\\n[.f]\f[]) : \
(\\n[.f] == \f[CWI]\\n[.f]\f[]))'\\*[dvi-char_\\n[dvi-char_]]
.fchar \[ul] \R'dvi-char_ \w'M'==\w'i''\\*[dvi-char_\\n[dvi-char_]]
.\" Normally use a rule.
.\" This is designed so that \(ul, \(rn and \(br form corners.
.ds dvi-char_0 \Z'\v'.23m'\D'R .54m .04m''\h'.5m'
.\" In font CW and CWI use a real _ character.
.ds dvi-char_1 _
.
.fchar \[radicalex] \D'R .5m -.04m'\v'.04m'
.fchar \[br] \Z'\v'.25m'\D'R .04m -1m''
.fchar \[ru] \Z'\v'-.02m'\D'R .54m .04m''\h'.5m'
.fchar \[rn] \Z'\v'-.77m'\D'R .54m .04m''\h'.5m'
.fchar \[co] \
\z\s-2\[ci]\s0\
\h'\w'\s-2\[ci]\s0'u-\w'\s-4C\s0'u/2u'\
\s-4C\s0\
\h'\w'\s-2\[ci]\s0'u-\w'\s-4C\s0'u/2u'
.fchar \[rg] \
\z\s-2\[ci]\s0\
\h'\w'\s-2\[ci]\s0'u-\w'\s-4R\s0'u/2u'\
\s-4R\s0\
\h'\w'\s-2\[ci]\s0'u-\w'\s-4R\s0'u/2u'
.fchar \[fm] \v'-.35m'\s[\\n[.s]*7u/10u]\[prime]\s0\v'.35m'
.fchar \[de] \h'.05m'\v'-.54m'\D'c .3m'\v'.54m'\h'.05m'
.fchar \[ct] \o'c/'
.fchar \[sq] \
\Z'\h'.05m'\D'R .4m -.04m'\v'.04m'\h'-.04m'\
\D'R .04m -.4m'\v'.04m'\D'R -.4m -.04m'\D'R .04m .4m''\h'.5m'
.\"char \[sq] \h'.05m'\D'l .4m 0'\D'l 0 -.4m'\D'l -.4m 0'\D'l 0 .4m'\h'.45m'
.fchar \[!=] \[slashnot]\[eq]
.fchar \[tm] \v'-.3m'\s[\\n[.s]/2u]TM\s0\v'.3m'
.fchar \[aq] '
.fchar \[bq] ,
.fchar \[Bq] ,\h'\w'\[rq]'u-(2u*\w"'"u)',
.fchar \[ho] \s[\En[.s]/2u]\v'.4m'c\v'-.4m'\s0
.fchar \[-D] \Z'\v'-.1m'\h'.05m'-'D
.fchar \[Sd] \Z'\v'-.3m'\h'.35m'-'\[pd]
.fchar \[TP] \
I\h'-.25m'\v'-.33m'\s[\En[.s]*6u/10u]\v'.33m'\
D\v'-.33m'\s0\v'.33m'
.fchar \[Tp] \zlp
.fchar \[nb] \[slashnot]\[sb]
.cflags 8 \[an]
.fchar \[an] \h'-.167m'\[mi]\h'-.167m'
.
.\" Define some fractions.
.de dvi-frac
. fchar \[\\$1\\$2] \
\v'-.25m'\s[\\\\n[.s]*7u/10u]\\$1\s0\v'.25m'\h'-.2m'\
/\h'-.2m'\v'.25m'\s[\\\\n[.s]*7u/10u]\\$2\s0\v'-.25m'
..
.
.dvi-frac 1 2
.dvi-frac 3 4
.dvi-frac 1 4
.dvi-frac 1 8
.dvi-frac 3 8
.dvi-frac 5 8
.dvi-frac 7 8
.
.\" support for ISO Latin-1
.fchar \[S1] \v'-.2m'\s-31\s+3\v'+.2m'
.fchar \[S2] \v'-.2m'\s-32\s+3\v'+.2m'
.fchar \[S3] \v'-.2m'\s-33\s+3\v'+.2m'
.fchar \[Of] \v'-.2m'\s'\En[.s]*6u/10u'\o'_a'\s0\v'.2m'
.fchar \[Om] \v'-.2m'\s'\En[.s]*6u/10u'\o'_o'\s0\v'.2m'
.fchar \[Fo] \v'-.1m'\s-3<\h'-.3m'<\s+3\v'+.1m'
.fchar \[Fc] \v'-.1m'\s-3>\h'-.3m'>\s+3\v'+.1m'
.fchar \[bb] |
.fchar \[Ye] \o'-Y'
.fchar \[Cs] \o'\[mu]o'
.
.de dvi-achar
. \" Note that character definitions are always interpreted with
. \" compatibility mode off.
. fchar \\$1 \
\\$3\
\k[acc]\
\h'(u;-\w'\\$2'-\w'\\$3'/2+\\\\n[skw]+(\w'x'*0)-\\\\n[skw])'\
\v'(u;\w'x'*0+\\\\n[rst]+(\w'\\$3'*0)-\\\\n[rst])'\
\\$2\
\v'(u;\w'x'*0-\\\\n[rst]+(\w'\\$3'*0)+\\\\n[rst])'\
\h'|\\\\n[acc]u'
. hcode \\$1\\$4
..
.
.dvi-achar \[`A] \` A a
.dvi-achar \['A] \' A a
.dvi-achar \[^A] ^ A a
.dvi-achar \[~A] ~ A a
.dvi-achar \[:A] \[ad] A a
.dvi-achar \[oA] \[ao] A a
.dvi-achar \[`E] \` E e
.dvi-achar \['E] \' E e
.dvi-achar \[^E] ^ E e
.dvi-achar \[:E] \[ad] E e
.dvi-achar \[`I] \` I i
.dvi-achar \['I] \' I i
.dvi-achar \[^I] ^ I i
.dvi-achar \[:I] \[ad] I i
.dvi-achar \[~N] ~ N n
.dvi-achar \[`O] \` O o
.dvi-achar \['O] \' O o
.dvi-achar \[^O] ^ O o
.dvi-achar \[~O] ~ O o
.dvi-achar \[:O] \[ad] O o
.dvi-achar \[`U] \` U u
.dvi-achar \['U] \' U u
.dvi-achar \[^U] ^ U u
.dvi-achar \[:U] \[ad] U u
.dvi-achar \['Y] \' Y y
.dvi-achar \[:Y] \[ad] Y y
.dvi-achar \[`a] \` a a
.dvi-achar \['a] \' a a
.dvi-achar \[^a] ^ a a
.dvi-achar \[~a] ~ a a
.dvi-achar \[:a] \[ad] a a
.dvi-achar \[oa] \[ao] a a
.dvi-achar \[`e] \` e e
.dvi-achar \['e] \' e e
.dvi-achar \[^e] ^ e e
.dvi-achar \[:e] \[ad] e e
.dvi-achar \[`i] \` \[.i] i
.dvi-achar \['i] \' \[.i] i
.dvi-achar \[^i] ^ \[.i] i
.dvi-achar \[:i] \[ad] \[.i] i
.dvi-achar \[~n] ~ n n
.dvi-achar \[`o] \` o o
.dvi-achar \['o] \' o o
.dvi-achar \[^o] ^ o o
.dvi-achar \[~o] ~ o o
.dvi-achar \[:o] \[ad] o o
.dvi-achar \[`u] \` u u
.dvi-achar \['u] \' u u
.dvi-achar \[^u] ^ u u
.dvi-achar \[:u] \[ad] u u
.dvi-achar \['y] \' y y
.dvi-achar \[:y] \[ad] y y
.dvi-achar \[vs] \[ah] s s
.dvi-achar \[vS] \[ah] S s
.dvi-achar \[vz] \[ah] z z
.dvi-achar \[vZ] \[ah] Z z
.fchar \[,C] \o'\[ac]C'
.hcode \[,C]c
.fchar \[,c] \o'\[ac]c'
.hcode \[,c]c
.
.\" now for color definitions
.\"
.\" this is a composite of MIT's X Consortium red/green/blue (rgb) color
.\" specifications, X Consortium version 10.41, 1994.
.\"
.defcolor black rgb #000000
.defcolor grey rgb #bebebe
.defcolor dimgrey rgb #696969
.defcolor lightgray rgb #d3d3d3
.defcolor lightslategrey rgb #778899
.defcolor slategray rgb #708090
.defcolor slategray1 rgb #c6e2ff
.defcolor slategray2 rgb #b9d3ee
.defcolor slategray3 rgb #9fb6cd
.defcolor slategray4 rgb #6c7b8b
.defcolor slategrey rgb #708090
.defcolor grey0 rgb #000000
.defcolor grey1 rgb #030303
.defcolor grey2 rgb #050505
.defcolor grey3 rgb #080808
.defcolor grey4 rgb #0a0a0a
.defcolor grey5 rgb #0d0d0d
.defcolor grey6 rgb #0f0f0f
.defcolor grey7 rgb #121212
.defcolor grey8 rgb #141414
.defcolor grey9 rgb #171717
.defcolor grey10 rgb #1a1a1a
.defcolor grey11 rgb #1c1c1c
.defcolor grey12 rgb #1f1f1f
.defcolor grey13 rgb #212121
.defcolor grey14 rgb #242424
.defcolor grey15 rgb #262626
.defcolor grey16 rgb #292929
.defcolor grey17 rgb #2b2b2b
.defcolor grey18 rgb #2e2e2e
.defcolor grey19 rgb #303030
.defcolor grey20 rgb #333333
.defcolor grey21 rgb #363636
.defcolor grey22 rgb #383838
.defcolor grey23 rgb #3b3b3b
.defcolor grey24 rgb #3d3d3d
.defcolor grey25 rgb #404040
.defcolor grey26 rgb #424242
.defcolor grey27 rgb #454545
.defcolor grey28 rgb #474747
.defcolor grey29 rgb #4a4a4a
.defcolor grey30 rgb #4d4d4d
.defcolor grey31 rgb #4f4f4f
.defcolor grey32 rgb #525252
.defcolor grey33 rgb #545454
.defcolor grey34 rgb #575757
.defcolor grey35 rgb #595959
.defcolor grey36 rgb #5c5c5c
.defcolor grey37 rgb #5e5e5e
.defcolor grey38 rgb #616161
.defcolor grey39 rgb #636363
.defcolor grey40 rgb #666666
.defcolor grey41 rgb #696969
.defcolor grey42 rgb #6b6b6b
.defcolor grey43 rgb #6e6e6e
.defcolor grey44 rgb #707070
.defcolor grey45 rgb #737373
.defcolor grey46 rgb #757575
.defcolor grey47 rgb #787878
.defcolor grey48 rgb #7a7a7a
.defcolor grey49 rgb #7d7d7d
.defcolor grey50 rgb #7f7f7f
.defcolor grey51 rgb #828282
.defcolor grey52 rgb #858585
.defcolor grey53 rgb #878787
.defcolor grey54 rgb #8a8a8a
.defcolor grey55 rgb #8c8c8c
.defcolor grey56 rgb #8f8f8f
.defcolor grey57 rgb #919191
.defcolor grey58 rgb #949494
.defcolor grey59 rgb #969696
.defcolor grey60 rgb #999999
.defcolor grey61 rgb #9c9c9c
.defcolor grey62 rgb #9e9e9e
.defcolor grey63 rgb #a1a1a1
.defcolor grey64 rgb #a3a3a3
.defcolor grey65 rgb #a6a6a6
.defcolor grey66 rgb #a8a8a8
.defcolor grey67 rgb #ababab
.defcolor grey68 rgb #adadad
.defcolor grey69 rgb #b0b0b0
.defcolor grey70 rgb #b3b3b3
.defcolor grey71 rgb #b5b5b5
.defcolor grey72 rgb #b8b8b8
.defcolor grey73 rgb #bababa
.defcolor grey74 rgb #bdbdbd
.defcolor grey75 rgb #bfbfbf
.defcolor grey76 rgb #c2c2c2
.defcolor grey77 rgb #c4c4c4
.defcolor grey78 rgb #c7c7c7
.defcolor grey79 rgb #c9c9c9
.defcolor grey80 rgb #cccccc
.defcolor grey81 rgb #cfcfcf
.defcolor grey82 rgb #d1d1d1
.defcolor grey83 rgb #d4d4d4
.defcolor grey84 rgb #d6d6d6
.defcolor grey85 rgb #d9d9d9
.defcolor grey86 rgb #dbdbdb
.defcolor grey87 rgb #dedede
.defcolor grey88 rgb #e0e0e0
.defcolor grey89 rgb #e3e3e3
.defcolor grey90 rgb #e5e5e5
.defcolor grey91 rgb #e8e8e8
.defcolor grey92 rgb #ebebeb
.defcolor grey93 rgb #ededed
.defcolor grey94 rgb #f0f0f0
.defcolor grey95 rgb #f2f2f2
.defcolor grey96 rgb #f5f5f5
.defcolor grey97 rgb #f7f7f7
.defcolor grey98 rgb #fafafa
.defcolor grey99 rgb #fcfcfc
.defcolor grey100 rgb #ffffff
.defcolor aliceblue rgb #f0f8ff
.defcolor blueviolet rgb #8a2be2
.defcolor cadetblue rgb #5f9ea0
.defcolor cadetblue1 rgb #98f5ff
.defcolor cadetblue2 rgb #8ee5ee
.defcolor cadetblue3 rgb #7ac5cd
.defcolor cadetblue4 rgb #53868b
.defcolor cornflowerblue rgb #6495ed
.defcolor darkslateblue rgb #483d8b
.defcolor darkturquoise rgb #00ced1
.defcolor deepskyblue rgb #00bfff
.defcolor deepskyblue1 rgb #00bfff
.defcolor deepskyblue2 rgb #00b2ee
.defcolor deepskyblue3 rgb #009acd
.defcolor deepskyblue4 rgb #00688b
.defcolor dodgerblue rgb #1e90ff
.defcolor dodgerblue1 rgb #1e90ff
.defcolor dodgerblue2 rgb #1c86ee
.defcolor dodgerblue3 rgb #1874cd
.defcolor dodgerblue4 rgb #104e8b
.defcolor lightblue rgb #add8e6
.defcolor lightblue1 rgb #bfefff
.defcolor lightblue2 rgb #b2dfee
.defcolor lightblue3 rgb #9ac0cd
.defcolor lightblue4 rgb #68838b
.defcolor lightcyan rgb #e0ffff
.defcolor lightcyan1 rgb #e0ffff
.defcolor lightcyan2 rgb #d1eeee
.defcolor lightcyan3 rgb #b4cdcd
.defcolor lightcyan4 rgb #7a8b8b
.defcolor lightskyblue rgb #87cefa
.defcolor lightskyblue1 rgb #b0e2ff
.defcolor lightskyblue2 rgb #a4d3ee
.defcolor lightskyblue3 rgb #8db6cd
.defcolor lightskyblue4 rgb #607b8b
.defcolor lightslateblue rgb #8470ff
.defcolor lightsteelblue rgb #b0c4de
.defcolor lightsteelblue1 rgb #cae1ff
.defcolor lightsteelblue2 rgb #bcd2ee
.defcolor lightsteelblue3 rgb #a2b5cd
.defcolor lightsteelblue4 rgb #6e7b8b
.defcolor mediumaquamarine rgb #66cdaa
.defcolor mediumblue rgb #0000cd
.defcolor mediumslateblue rgb #7b68ee
.defcolor mediumturquoise rgb #48d1cc
.defcolor midnightblue rgb #191970
.defcolor navyblue rgb #000080
.defcolor paleturquoise rgb #afeeee
.defcolor paleturquoise1 rgb #bbffff
.defcolor paleturquoise2 rgb #aeeeee
.defcolor paleturquoise3 rgb #96cdcd
.defcolor paleturquoise4 rgb #668b8b
.defcolor powderblue rgb #b0e0e6
.defcolor royalblue rgb #4169e1
.defcolor royalblue1 rgb #4876ff
.defcolor royalblue2 rgb #436eee
.defcolor royalblue3 rgb #3a5fcd
.defcolor royalblue4 rgb #27408b
.defcolor skyblue rgb #87ceeb
.defcolor skyblue1 rgb #87ceff
.defcolor skyblue2 rgb #7ec0ee
.defcolor skyblue3 rgb #6ca6cd
.defcolor skyblue4 rgb #4a708b
.defcolor slateblue rgb #6a5acd
.defcolor slateblue1 rgb #836fff
.defcolor slateblue2 rgb #7a67ee
.defcolor slateblue3 rgb #6959cd
.defcolor slateblue4 rgb #473c8b
.defcolor steelblue rgb #4682b4
.defcolor steelblue1 rgb #63b8ff
.defcolor steelblue2 rgb #5cacee
.defcolor steelblue3 rgb #4f94cd
.defcolor steelblue4 rgb #36648b
.defcolor aquamarine rgb #7fffd4
.defcolor aquamarine1 rgb #7fffd4
.defcolor aquamarine2 rgb #76eec6
.defcolor aquamarine3 rgb #66cdaa
.defcolor aquamarine4 rgb #458b74
.defcolor azure rgb #f0ffff
.defcolor azure1 rgb #f0ffff
.defcolor azure2 rgb #e0eeee
.defcolor azure3 rgb #c1cdcd
.defcolor azure4 rgb #838b8b
.defcolor blue rgb #0000ff
.defcolor blue1 rgb #0000ff
.defcolor blue2 rgb #0000ee
.defcolor blue3 rgb #0000cd
.defcolor blue4 rgb #00008b
.defcolor cyan rgb #00ffff
.defcolor cyan1 rgb #00ffff
.defcolor cyan2 rgb #00eeee
.defcolor cyan3 rgb #00cdcd
.defcolor cyan4 rgb #008b8b
.defcolor navy rgb #000080
.defcolor turquoise rgb #40e0d0
.defcolor turquoise1 rgb #00f5ff
.defcolor turquoise2 rgb #00e5ee
.defcolor turquoise3 rgb #00c5cd
.defcolor turquoise4 rgb #00868b
.defcolor darkslategray rgb #2f4f4f
.defcolor darkslategray1 rgb #97ffff
.defcolor darkslategray2 rgb #8deeee
.defcolor darkslategray3 rgb #79cdcd
.defcolor darkslategray4 rgb #528b8b
.defcolor rosybrown rgb #bc8f8f
.defcolor rosybrown1 rgb #ffc1c1
.defcolor rosybrown2 rgb #eeb4b4
.defcolor rosybrown3 rgb #cd9b9b
.defcolor rosybrown4 rgb #8b6969
.defcolor saddlebrown rgb #8b4513
.defcolor sandybrown rgb #f4a460
.defcolor beige rgb #f5f5dc
.defcolor brown rgb #a52a2a
.defcolor brown1 rgb #ff4040
.defcolor brown2 rgb #ee3b3b
.defcolor brown3 rgb #cd3333
.defcolor brown4 rgb #8b2323
.defcolor burlywood rgb #deb887
.defcolor burlywood1 rgb #ffd39b
.defcolor burlywood2 rgb #eec591
.defcolor burlywood3 rgb #cdaa7d
.defcolor burlywood4 rgb #8b7355
.defcolor chocolate rgb #d2691e
.defcolor chocolate1 rgb #ff7f24
.defcolor chocolate2 rgb #ee7621
.defcolor chocolate3 rgb #cd661d
.defcolor chocolate4 rgb #8b4513
.defcolor peru rgb #cd853f
.defcolor tan rgb #d2b48c
.defcolor tan1 rgb #ffa54f
.defcolor tan2 rgb #ee9a49
.defcolor tan3 rgb #cd853f
.defcolor tan4 rgb #8b5a2b
.defcolor darkgreen rgb #006400
.defcolor darkkhaki rgb #bdb76b
.defcolor darkolivegreen rgb #556b2f
.defcolor darkolivegreen1 rgb #caff70
.defcolor darkolivegreen2 rgb #bcee68
.defcolor darkolivegreen3 rgb #a2cd5a
.defcolor darkolivegreen4 rgb #6e8b3d
.defcolor darkseagreen rgb #8fbc8f
.defcolor darkseagreen1 rgb #c1ffc1
.defcolor darkseagreen2 rgb #b4eeb4
.defcolor darkseagreen3 rgb #9bcd9b
.defcolor darkseagreen4 rgb #698b69
.defcolor forestgreen rgb #228b22
.defcolor greenyellow rgb #adff2f
.defcolor lawngreen rgb #7cfc00
.defcolor lightseagreen rgb #20b2aa
.defcolor limegreen rgb #32cd32
.defcolor mediumseagreen rgb #3cb371
.defcolor mediumspringgreen rgb #00fa9a
.defcolor mintcream rgb #f5fffa
.defcolor olivedrab rgb #6b8e23
.defcolor olivedrab1 rgb #c0ff3e
.defcolor olivedrab2 rgb #b3ee3a
.defcolor olivedrab3 rgb #9acd32
.defcolor olivedrab4 rgb #698b22
.defcolor palegreen rgb #98fb98
.defcolor palegreen1 rgb #9aff9a
.defcolor palegreen2 rgb #90ee90
.defcolor palegreen3 rgb #7ccd7c
.defcolor palegreen4 rgb #548b54
.defcolor seagreen rgb #2e8b57
.defcolor seagreen1 rgb #54ff9f
.defcolor seagreen2 rgb #4eee94
.defcolor seagreen3 rgb #43cd80
.defcolor seagreen4 rgb #2e8b57
.defcolor springgreen rgb #00ff7f
.defcolor springgreen1 rgb #00ff7f
.defcolor springgreen2 rgb #00ee76
.defcolor springgreen3 rgb #00cd66
.defcolor springgreen4 rgb #008b45
.defcolor yellowgreen rgb #9acd32
.defcolor chartreuse rgb #7fff00
.defcolor chartreuse1 rgb #7fff00
.defcolor chartreuse2 rgb #76ee00
.defcolor chartreuse3 rgb #66cd00
.defcolor chartreuse4 rgb #458b00
.defcolor green rgb #00ff00
.defcolor green1 rgb #00ff00
.defcolor green2 rgb #00ee00
.defcolor green3 rgb #00cd00
.defcolor green4 rgb #008b00
.defcolor khaki rgb #f0e68c
.defcolor khaki1 rgb #fff68f
.defcolor khaki2 rgb #eee685
.defcolor khaki3 rgb #cdc673
.defcolor khaki4 rgb #8b864e
.defcolor darkorange rgb #ff8c00
.defcolor darkorange1 rgb #ff7f00
.defcolor darkorange2 rgb #ee7600
.defcolor darkorange3 rgb #cd6600
.defcolor darkorange4 rgb #8b4500
.defcolor darksalmon rgb #e9967a
.defcolor lightcoral rgb #f08080
.defcolor lightsalmon rgb #ffa07a
.defcolor lightsalmon1 rgb #ffa07a
.defcolor lightsalmon2 rgb #ee9572
.defcolor lightsalmon3 rgb #cd8162
.defcolor lightsalmon4 rgb #8b5742
.defcolor peachpuff rgb #ffdab9
.defcolor peachpuff1 rgb #ffdab9
.defcolor peachpuff2 rgb #eecbad
.defcolor peachpuff3 rgb #cdaf95
.defcolor peachpuff4 rgb #8b7765
.defcolor bisque rgb #ffe4c4
.defcolor bisque1 rgb #ffe4c4
.defcolor bisque2 rgb #eed5b7
.defcolor bisque3 rgb #cdb79e
.defcolor bisque4 rgb #8b7d6b
.defcolor coral rgb #ff7f50
.defcolor coral1 rgb #ff7256
.defcolor coral2 rgb #ee6a50
.defcolor coral3 rgb #cd5b45
.defcolor coral4 rgb #8b3e2f
.defcolor honeydew rgb #f0fff0
.defcolor honeydew1 rgb #f0fff0
.defcolor honeydew2 rgb #e0eee0
.defcolor honeydew3 rgb #c1cdc1
.defcolor honeydew4 rgb #838b83
.defcolor orange rgb #ffa500
.defcolor orange1 rgb #ffa500
.defcolor orange2 rgb #ee9a00
.defcolor orange3 rgb #cd8500
.defcolor orange4 rgb #8b5a00
.defcolor salmon rgb #fa8072
.defcolor salmon1 rgb #ff8c69
.defcolor salmon2 rgb #ee8262
.defcolor salmon3 rgb #cd7054
.defcolor salmon4 rgb #8b4c39
.defcolor sienna rgb #a0522d
.defcolor sienna1 rgb #ff8247
.defcolor sienna2 rgb #ee7942
.defcolor sienna3 rgb #cd6839
.defcolor sienna4 rgb #8b4726
.defcolor deeppink rgb #ff1493
.defcolor deeppink1 rgb #ff1493
.defcolor deeppink2 rgb #ee1289
.defcolor deeppink3 rgb #cd1076
.defcolor deeppink4 rgb #8b0a50
.defcolor hotpink rgb #ff69b4
.defcolor hotpink1 rgb #ff6eb4
.defcolor hotpink2 rgb #ee6aa7
.defcolor hotpink3 rgb #cd6090
.defcolor hotpink4 rgb #8b3a62
.defcolor indianred rgb #cd5c5c
.defcolor indianred1 rgb #ff6a6a
.defcolor indianred2 rgb #ee6363
.defcolor indianred3 rgb #cd5555
.defcolor indianred4 rgb #8b3a3a
.defcolor lightpink rgb #ffb6c1
.defcolor lightpink1 rgb #ffaeb9
.defcolor lightpink2 rgb #eea2ad
.defcolor lightpink3 rgb #cd8c95
.defcolor lightpink4 rgb #8b5f65
.defcolor mediumvioletred rgb #c71585
.defcolor mistyrose rgb #ffe4e1
.defcolor mistyrose1 rgb #ffe4e1
.defcolor mistyrose2 rgb #eed5d2
.defcolor mistyrose3 rgb #cdb7b5
.defcolor mistyrose4 rgb #8b7d7b
.defcolor orangered rgb #ff4500
.defcolor orangered1 rgb #ff4500
.defcolor orangered2 rgb #ee4000
.defcolor orangered3 rgb #cd3700
.defcolor orangered4 rgb #8b2500
.defcolor palevioletred rgb #db7093
.defcolor palevioletred1 rgb #ff82ab
.defcolor palevioletred2 rgb #ee799f
.defcolor palevioletred3 rgb #cd6889
.defcolor palevioletred4 rgb #8b475d
.defcolor violetred rgb #d02090
.defcolor violetred1 rgb #ff3e96
.defcolor violetred2 rgb #ee3a8c
.defcolor violetred3 rgb #cd3278
.defcolor violetred4 rgb #8b2252
.defcolor firebrick rgb #b22222
.defcolor firebrick1 rgb #ff3030
.defcolor firebrick2 rgb #ee2c2c
.defcolor firebrick3 rgb #cd2626
.defcolor firebrick4 rgb #8b1a1a
.defcolor pink rgb #ffc0cb
.defcolor pink1 rgb #ffb5c5
.defcolor pink2 rgb #eea9b8
.defcolor pink3 rgb #cd919e
.defcolor pink4 rgb #8b636c
.defcolor red rgb #ff0000
.defcolor red1 rgb #ff0000
.defcolor red2 rgb #ee0000
.defcolor red3 rgb #cd0000
.defcolor red4 rgb #8b0000
.defcolor tomato rgb #ff6347
.defcolor tomato1 rgb #ff6347
.defcolor tomato2 rgb #ee5c42
.defcolor tomato3 rgb #cd4f39
.defcolor tomato4 rgb #8b3626
.defcolor darkorchid rgb #9932cc
.defcolor darkorchid1 rgb #bf3eff
.defcolor darkorchid2 rgb #b23aee
.defcolor darkorchid3 rgb #9a32cd
.defcolor darkorchid4 rgb #68228b
.defcolor darkviolet rgb #9400d3
.defcolor lavenderblush rgb #fff0f5
.defcolor lavenderblush1 rgb #fff0f5
.defcolor lavenderblush2 rgb #eee0e5
.defcolor lavenderblush3 rgb #cdc1c5
.defcolor lavenderblush4 rgb #8b8386
.defcolor mediumorchid rgb #ba55d3
.defcolor mediumorchid1 rgb #e066ff
.defcolor mediumorchid2 rgb #d15fee
.defcolor mediumorchid3 rgb #b452cd
.defcolor mediumorchid4 rgb #7a378b
.defcolor mediumpurple rgb #9370db
.defcolor mediumpurple1 rgb #ab82ff
.defcolor mediumpurple2 rgb #9f79ee
.defcolor mediumpurple3 rgb #8968cd
.defcolor mediumpurple4 rgb #5d478b
.defcolor lavender rgb #e6e6fa
.defcolor magenta rgb #ff00ff
.defcolor magenta1 rgb #ff00ff
.defcolor magenta2 rgb #ee00ee
.defcolor magenta3 rgb #cd00cd
.defcolor magenta4 rgb #8b008b
.defcolor maroon rgb #b03060
.defcolor maroon1 rgb #ff34b3
.defcolor maroon2 rgb #ee30a7
.defcolor maroon3 rgb #cd2990
.defcolor maroon4 rgb #8b1c62
.defcolor orchid rgb #da70d6
.defcolor orchid1 rgb #ff83fa
.defcolor orchid2 rgb #ee7ae9
.defcolor orchid3 rgb #cd69c9
.defcolor orchid4 rgb #8b4789
.defcolor plum rgb #dda0dd
.defcolor plum1 rgb #ffbbff
.defcolor plum2 rgb #eeaeee
.defcolor plum3 rgb #cd96cd
.defcolor plum4 rgb #8b668b
.defcolor purple rgb #a020f0
.defcolor purple1 rgb #9b30ff
.defcolor purple2 rgb #912cee
.defcolor purple3 rgb #7d26cd
.defcolor purple4 rgb #551a8b
.defcolor thistle rgb #d8bfd8
.defcolor thistle1 rgb #ffe1ff
.defcolor thistle2 rgb #eed2ee
.defcolor thistle3 rgb #cdb5cd
.defcolor thistle4 rgb #8b7b8b
.defcolor violet rgb #ee82ee
.defcolor antiquewhite rgb #faebd7
.defcolor antiquewhite1 rgb #ffefdb
.defcolor antiquewhite2 rgb #eedfcc
.defcolor antiquewhite3 rgb #cdc0b0
.defcolor antiquewhite4 rgb #8b8378
.defcolor floralwhite rgb #fffaf0
.defcolor ghostwhite rgb #f8f8ff
.defcolor navajowhite rgb #ffdead
.defcolor navajowhite1 rgb #ffdead
.defcolor navajowhite2 rgb #eecfa1
.defcolor navajowhite3 rgb #cdb38b
.defcolor navajowhite4 rgb #8b795e
.defcolor oldlace rgb #fdf5e6
.defcolor whitesmoke rgb #f5f5f5
.defcolor gainsboro rgb #dcdcdc
.defcolor ivory rgb #fffff0
.defcolor ivory1 rgb #fffff0
.defcolor ivory2 rgb #eeeee0
.defcolor ivory3 rgb #cdcdc1
.defcolor ivory4 rgb #8b8b83
.defcolor linen rgb #faf0e6
.defcolor seashell rgb #fff5ee
.defcolor seashell1 rgb #fff5ee
.defcolor seashell2 rgb #eee5de
.defcolor seashell3 rgb #cdc5bf
.defcolor seashell4 rgb #8b8682
.defcolor snow rgb #fffafa
.defcolor snow1 rgb #fffafa
.defcolor snow2 rgb #eee9e9
.defcolor snow3 rgb #cdc9c9
.defcolor snow4 rgb #8b8989
.defcolor wheat rgb #f5deb3
.defcolor wheat1 rgb #ffe7ba
.defcolor wheat2 rgb #eed8ae
.defcolor wheat3 rgb #cdba96
.defcolor wheat4 rgb #8b7e66
.defcolor white rgb #ffffff
.defcolor blanchedalmond rgb #ffebcd
.defcolor darkgoldenrod rgb #b8860b
.defcolor darkgoldenrod1 rgb #ffb90f
.defcolor darkgoldenrod2 rgb #eead0e
.defcolor darkgoldenrod3 rgb #cd950c
.defcolor darkgoldenrod4 rgb #8b6508
.defcolor lemonchiffon rgb #fffacd
.defcolor lemonchiffon1 rgb #fffacd
.defcolor lemonchiffon2 rgb #eee9bf
.defcolor lemonchiffon3 rgb #cdc9a5
.defcolor lemonchiffon4 rgb #8b8970
.defcolor lightgoldenrod rgb #eedd82
.defcolor lightgoldenrod1 rgb #ffec8b
.defcolor lightgoldenrod2 rgb #eedc82
.defcolor lightgoldenrod3 rgb #cdbe70
.defcolor lightgoldenrod4 rgb #8b814c
.defcolor lightgoldenrodyellow rgb #fafad2
.defcolor lightyellow rgb #ffffe0
.defcolor lightyellow1 rgb #ffffe0
.defcolor lightyellow2 rgb #eeeed1
.defcolor lightyellow3 rgb #cdcdb4
.defcolor lightyellow4 rgb #8b8b7a
.defcolor palegoldenrod rgb #eee8aa
.defcolor papayawhip rgb #ffefd5
.defcolor cornsilk rgb #fff8dc
.defcolor cornsilk1 rgb #fff8dc
.defcolor cornsilk2 rgb #eee8cd
.defcolor cornsilk3 rgb #cdc8b1
.defcolor cornsilk4 rgb #8b8878
.defcolor gold rgb #ffd700
.defcolor gold1 rgb #ffd700
.defcolor gold2 rgb #eec900
.defcolor gold3 rgb #cdad00
.defcolor gold4 rgb #8b7500
.defcolor goldenrod rgb #daa520
.defcolor goldenrod1 rgb #ffc125
.defcolor goldenrod2 rgb #eeb422
.defcolor goldenrod3 rgb #cd9b1d
.defcolor goldenrod4 rgb #8b6914
.defcolor moccasin rgb #ffe4b5
.defcolor yellow rgb #ffff00
.defcolor yellow1 rgb #ffff00
.defcolor yellow2 rgb #eeee00
.defcolor yellow3 rgb #cdcd00
.defcolor yellow4 rgb #8b8b00
.
.cp \n(_C
.
.if !\n(.C \
. mso pspic.tmac
.
.do ie '\[char97]'a' \
. do mso latin1.tmac
.el \
. do mso cp1047.tmac
1.18.1.4/tmac/andoc.tmac 0000666 00000000434 15047753021 0010323 0 ustar 00 .\" andoc.tmac
.\"
.\" Load either an-old.tmac or doc.tmac.
.if !\n(.g .ab These macros require groff.
.de Dd
.rm Dd
.do mso doc.tmac
\\*(Dd\\
..
.de TH
.rm TH
.do mso an-old.tmac
\\*(TH\\
..
.\" dummy equation macros -- eqnrc is read before .TH or .Dd is parsed.
.de EQ
..
.de EN
..
1.18.1.4/tmac/pspic.tmac 0000666 00000005305 15047753021 0010357 0 ustar 00 .\" pspic.tmac
.\"
.\" Define the PSPIC macro.
.\"
.\" When used other than with -Tps or -Tdvi, it will draw a box around where
.\" the picture would go.
.
.de PSPIC
. nr ps-offset-mode 0
. ie '\\$1'-L' \{\
. nr ps-offset-mode 1
. shift
. HTML-DO-IMAGE \\$1 l
. \}
. el \{\
. ie '\\$1'-R' \{\
. nr ps-offset-mode 2
. shift
. HTML-DO-IMAGE \\$1 r
. \}
. el \{\
. ie '\\$1'-I' \{\
. nr ps-offset-mode 3
. nr ps-offset (m;\\$2)
. shift 2
. HTML-DO-IMAGE \\$1 i
. \}
. el \
. HTML-DO-IMAGE \\$1 c
. \}
. \}
.
. br
.
. psbb \\$1
. if (\\n[llx] : \\n[lly] : \\n[urx] : \\n[ury]) \{\
. nr ps-wid (\\n[urx] - \\n[llx])
. nr ps-ht (\\n[ury] - \\n[lly])
. if (\\n[ps-wid] < 0) \
. nr ps-wid (-\\n[ps-wid])
. if (\\n[ps-ht] < 0) \
. nr ps-ht (-\\n[ps-ht])
. ie (\\n[.$] >= 2) \
. nr ps-deswid (i;\\$2)
. el \
. nr ps-deswid ((\\n[.l] - \\n[.i]) = 3) & (\\n[ps-desht] > (i;0\\$3))) \{\
. nr ps-desht (i;\\$3)
. nr ps-deswid (\\n[ps-desht] * 1000 + (\\n[ps-ht] / 2) \
/ \\n[ps-ht] * \\n[ps-wid] \
+ 500 / 1000)
. \}
.
. ne (\\n[ps-desht]u + 1v)
.
. if (\\n[ps-offset-mode] == 0) \
. nr ps-offset (\\n[.l] - \\n[.i] - \\n[ps-deswid] / 2)
. if (\\n[ps-offset-mode] == 1) \
. nr ps-offset 0
. if (\\n[ps-offset-mode] == 2) \
. nr ps-offset (\\n[.l] - \\n[.i] - \\n[ps-deswid])
.
. ie '\*[.T]'dvi' \{\
. ie (\\n[ps-wid]p == \\n[ps-deswid]) \{\
. ds ps-scale \" empty
. ds ps-hoffset hoffset=-\\n[llx]
. ds ps-voffset voffset=-\\n[lly]
. \}
. el \{\
. nr ps-scale (\\n[ps-deswid] * 100 / \\n[ps-wid]p)
. nr ps-hoffset (-\\n[llx] * \\n[ps-scale] / 100)
. nr ps-voffset (-\\n[lly] * \\n[ps-scale] / 100)
. ds ps-scale hscale=\\n[ps-scale] vscale=\\n[ps-scale]
. ds ps-hoffset hoffset=\\n[ps-hoffset]
. ds ps-voffset voffset=\\n[ps-voffset]
. \}
.
\h'\\n[ps-offset]u'\
\v'\\n[ps-desht]u'\
\X'psfile=\\$1 \\*[ps-hoffset] \\*[ps-voffset] \\*[ps-scale]'
. \}
. el \{\
. ie (\\n[.$] >= 3) \
. ds ps-desht \\n[ps-desht]
. el \
. ds ps-desht \" empty
.
\h'\\n[ps-offset]u'\
\X'ps: invis'\
\Z'\D'p 0 \\n[ps-desht]u \\n[ps-deswid]u 0 0 -\\n[ps-desht]u''\
\X'ps: endinvis'\
\v'\\n[ps-desht]u'\
\X'ps: import \
\\$1 \\n[llx] \\n[lly] \\n[urx] \\n[ury] \\n[ps-deswid] \\*[ps-desht]'
. \}
.
. br
. sp \\n[ps-desht]u
. \}
. HTML-IMAGE-END
..
.
.\" end of pspic.tmac
1.18.1.4/tmac/doc.tmac 0000666 00000214235 15047753021 0010012 0 ustar 00 .\" Copyright (c) 1991, 1993
.\" The Regents of the University of California. All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc 8.1 (Berkeley) 06/08/93
.\"
.\" Modified by jjc@jclark.com as follows: the doc-* files are assumed to be
.\" installed as mdoc/doc-* rather than tmac.doc-* (the filename
.\" `tmac.doc-common' would be too long); when using groff, the doc-* files
.\" are loaded using the `mso' request.
.\"
.\" Modified by
.\"
.\" Werner LEMBERG and
.\" Ruslan Ermilov
.\"
.\" to make it more readable: using long names and many groff features,
.\" updating and extending documentation, etc.
.\"
.if !\n(.g \
.ab This version of mdoc can be run with GNU troff only!
.do if d Dd .nx
.cp 0
.if (\n[.x]\n[.y] < 118) \
.ab You need GNU troff version 1.18 or higher to run this version of mdoc!
.ie t \
.mso mdoc/doc-ditroff
.el \
.mso mdoc/doc-nroff
.mso mdoc/doc-common
.mso mdoc/doc-syms
.eo
.ds macro-name
.als arg0 macro-name
.nr arg-limit 0
.nr num-args 0
.nr arg-ptr 0
.ds arg1
.nr type1 0
.ds space1
.de parse-args
.if !\n[arg-limit] \
.set-spacing-1
.nr have-space 0
.if !\n[.$] \
.return
.nr arg-limit +1
.ie "\$1"|" \
.ds arg\n[arg-limit] \f[R]|\f[]
.el \{ .ie "\$1"..." \
.ds arg\n[arg-limit] \|.\|.\|.
.el \
.ds arg\n[arg-limit] "\$1
.\}
.get-arg-type* \n[arg-limit]
.nr type\n[arg-limit] \n[arg-type]
.set-spacing-\n[arg-type]
.ie (\n[.$] == 1) \
.nr arg-ptr 0
.el \{\
.shift
.parse-args \$@
.\}
.nh
..
.de parse-arg-vector
.if !\n[arg-limit] \
.set-spacing-1
.nr arg-limit +1
.ie "\*[arg\n[arg-limit]]"|" \
.ds arg\n[arg-limit] \f[R]|\f[]
.el \{ .if "\*[arg\n[arg-limit]]"..." \
.ds arg\n[arg-limit] \|.\|.\|.
.\}
.get-arg-type* \n[arg-limit]
.nr type\n[arg-limit] \n[arg-type]
.set-spacing-\n[arg-type]
.ie (\n[num-args] == 1) \{\
.nr arg-ptr 0
.nr num-args 0
.\}
.el \{\
.nr num-args -1
.parse-arg-vector
.\}
.nh
..
.de parse-space-vector
.nr arg-limit +1
.set-spacing-\n[type\n[arg-limit]]
.ie (\n[num-args] == 1) \
.nr num-args 0
.el \{\
.nr num-args -1
.parse-space-vector
.\}
..
.de remaining-args
.nr arg-ptr +1
.nop \)\*[arg\n[arg-ptr]]\c
.ie (\n[num-args] == 1) \{\
.nr arg-ptr 0
.nr num-args 0
.\}
.el \{\
.nop \)\*[space]\c
.nr num-args -1
.remaining-args
.\}
..
.de append-arg
.nr arg-limit +1
.ds arg\n[arg-limit] "\$1
.nr type\n[arg-limit] \$2
.set-spacing-\$2
..
.de print-and-reset
.if \n[space-mode] \
.nop \)
.reset-args
..
.de reset-args
.nr arg-limit 0
.nr arg-ptr 0
.nr have-slot 0
.hy \n[hyphen-flags]
..
.ec
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.eo
.de Fl
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Fl-font]\c
.if !\n[arg-limit] \{\
.ds macro-name Fl
.parse-args \$@
.if !\n[.$] \{\
.nop \|\-\|\f[]\s[0]
.\}\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ie (\n[arg-limit] < \n[arg-ptr]) \{\
.nop \|\-\f[]\s[0]\c
.print-and-reset
.\}
.el \{\
.ie (\n[type\n[arg-ptr]] == 1) \{\
.nop \|\-\f[]\s[0]\c
.\*[arg\n[arg-ptr]]
.\}
.el \{\
.if (\n[type\n[arg-ptr]] == 3) \
.nop \|\-\|\c
.nr reg-Fl 1
.flag-recursion
.\}\}
..
.de flag-recursion
.nr reg-dfr1 \n[type\n[arg-ptr]]
.ds str-dfr "\*[arg\n[arg-ptr]]
.ie (\n[reg-dfr1] == 1) \{\
.nop \f[]\s[0]\c
.\*[str-dfr]
.\}
.el \{\
.nr reg-dfr \n[arg-ptr]
.ie (\n[reg-dfr1] == 2) \{\
.ie "\*[str-dfr]"\*[Ba]" \{\
.if \n[reg-Fl] \
.nop \|\-\*[space]\c
.nop \)\*[Ba]\c
.\}
.el \{\
.ie "\*[str-dfr]"\f[R]|\f[]" \{\
.if \n[reg-Fl] \
.nop \|\-\*[space]\c
.nop \f[R]|\f[]\c
.\}
.el \{\
.ie "\*[str-dfr]"-" \
.nop \|\-\^\-\|\c
.el \
.nop \|\%\-\*[str-dfr]\&\c
.\}\}\}
.el \{\
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\c
.nop \)\*[str-dfr]\f[]\s[0]\c
.\}
.ie (\n[arg-limit] == \n[arg-ptr]) \{\
.if (\n[reg-dfr1] == 4) \
.nop \|\-\c
.nop \f[]\s[0]\c
.print-and-reset
.\}
.el \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 3) \{\
.ie (\n[type\n[reg-dfr]] == 4) \
.nop \|\-\c
.el \
.nop \)\*[space\n[reg-dfr]]\c
.\}
.el \
.nop \)\*[space\n[reg-dfr]]\c
.shift
.nr reg-Fl 0
.flag-recursion \$@
.\}\}
..
.de print-recursive
.nr reg-dpr1 \n[type\n[arg-ptr]]
.ds str-dpr "\*[arg\n[arg-ptr]]
.ie (\n[reg-dpr1] == 1) \{\
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\c
.\*[str-dpr]
.\}
.el \{\
.nr reg-dpr \n[arg-ptr]
.ie (\n[reg-dpr1] == 2) \
.nop \%\*[str-dpr]\&\c
.el \{\
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\c
.nop \)\*[str-dpr]\f[]\s[0]\c
.\}
.nr arg-ptr +1
.ie (\n[arg-limit] < \n[arg-ptr]) \{\
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\c
.print-and-reset
.\}
.el \{\
.nop \)\*[space\n[reg-dpr]]\c
.print-recursive
.\}\}
..
.de print-prefixes
.while (\n[arg-limit] >= \n[arg-ptr]) \{\
.if !(\n[type\n[arg-ptr]] == 4) \
.break
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\c
.nop \)\*[arg\n[arg-ptr]]\f[]\s[0]\c
.nr arg-ptr +1
.\}
..
.de generic-macro
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name \$0
.parse-args \$@
.\}
.el \
.tm Usage: .\$0 \*[\$0-usage] ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.if (\n[type\n[arg-ptr]] == 1) \{\
.tmc mdoc warning: Using a macro as first argument
.tm1 " cancels effect of .\$0 (#\n[.c])
.\}
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[\$0-font]\c
.print-recursive
.\}
.el \{\
.tm Usage: .\$0 \*[\$0-usage] ... (#\n[.c])
.reset-args
.\}
..
.ds str-Ar-default "file\ .\|.\|.
.de Ar
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Ar-font]\c
.if !\n[arg-limit] \{\
.ds macro-name Ar
.parse-args \$@
.if !\n[.$] \{\
.nop \)\*[str-Ar-default]\&\f[]\s[0]
.\}\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.print-prefixes
.ie (\n[arg-limit] < \n[arg-ptr]) \{\
.nop \)\*[str-Ar-default]\&\f[]\s[0]\c
.print-and-reset
.\}
.el \{\
.if !(\n[type\n[arg-ptr]] == 2) \{\
.nr arg-ptr -1
.ds arg\n[arg-ptr] "\*[str-Ar-default]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.parse-space-vector
.\}
.print-recursive
.\}
..
.als Ad generic-macro
.ds Ad-usage address
.nr indent-synopsis 0
.nr indent-synopsis-active 0
.de Cd
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Cd
.parse-args \$@
.\}
.el \
.tm Usage: .Cd configuration_file_declaration ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ie \n[in-synopsis-section] \{\
.if "\*[macro-name]"Cd" \{\
.br
.if !\n[indent-synopsis] \
.nr indent-synopsis \n[display-indent]u
.if !\n[indent-synopsis-active] \
.in +\n[indent-synopsis]u
.ti -\n[indent-synopsis]u
.nop \*[Nm-font]\c
.print-recursive
.if !\n[indent-synopsis-active] \
.in -\n[indent-synopsis]u
.\}\}
.el \{\
.nop \*[Nm-font]\c
.print-recursive
.\}\}
.el \{\
.tm Usage: .Cd configuration_file_declaration ... (#\n[.c])
.reset-args
.\}
..
.als Cm generic-macro
.ds Cm-usage interactive_command_modifier
.als Dv generic-macro
.ds Dv-usage defined_variable
.als Dv-font Er-font
.als Em generic-macro
.ds Em-usage text
.als Er generic-macro
.ds Er-usage text
.als Ev generic-macro
.ds Ev-usage text
.nr have-decl 0
.nr have-var 0
.de do-func-decl
.if \n[in-synopsis-section] \{\
.if \n[have-var] \{\
.paragraph
.nr have-var 0
.\}
.if \n[have-func] \{\
.ie \n[have-decl] \
.br
.el \
.paragraph
.\}
.nr have-decl 1
.\}
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
..
.de Fd
.ie ((\n[.$] >= 1) & (\n[arg-limit] == 0)) \{\
.do-func-decl
.nop \*[Fd-font]\$*
.br
.ft \n[curr-font]
.ps \n[curr-size]u
.\}
.el \{\
.tm Usage: .Fd function_declaration -- Fd is not callable (#\n[.c])
.reset-args
.\}
..
.de In
.ie ((\n[.$] == 1) & (\n[arg-limit] == 0)) \{\
.do-func-decl
.nop \*[Fd-font]#include <\$1>
.br
.ft \n[curr-font]
.ps \n[curr-size]u
.\}
.el \{\
.tm Usage: .In include_file -- In is not callable (#\n[.c])
.reset-args
.\}
..
.als Fr generic-macro
.ds Fr-usage function_return_value
.als Fr-font Ar-font
.als Ic generic-macro
.ds Ic-usage interactive_command
.als Li generic-macro
.ds Li-usage argument
.als Ms generic-macro
.ds Ms-usage math_symbol
.als Ms-font Sy-font
.ds command-name
.de Nm
.if !\n[arg-limit] \{\
.ds macro-name Nm
.ie \n[.$] \
.parse-args \$@
.el \{\
.ie "\*[command-name]"" \
.tm Usage: .Nm name ... (#\n[.c])
.el \
.parse-args \*[command-name]
.\}\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.print-prefixes
.ie (\n[arg-limit] < \n[arg-ptr]) \{\
.ie "\*[command-name]"" \{\
.tm Usage: .Nm name ... (#\n[.c])
.reset-args
.\}
.el \{\
.nop \*[Nm-font]\*[command-name]\f[]\s[0]\c
.print-and-reset
.\}\}
.el \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ie !(\n[type\n[arg-ptr]] == 2) \{\
.ie "\*[command-name]"" \
.tm Usage: .Nm name ... (#\n[.c])
.el \{\
.nr arg-ptr -1
.ds arg\n[arg-ptr] "\*[Nm-font]\*[command-name]\f[]\s[0]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.parse-space-vector
.\}\}
.el \{\
.if \n[in-synopsis-section] \{\
.if "\*[macro-name]"Nm" \{\
.br
.if !\n[indent-synopsis] \{\
.get-width "\*[arg\n[arg-ptr]]"
.nr indent-synopsis ((\n[width]u + 1u) * \n[fixed-width]u)
.\}
.if !\n[indent-synopsis-active] \{\
.in +\n[indent-synopsis]u
.nr indent-synopsis-active 1
.\}
.ti -\n[indent-synopsis]u
.\}\}
.if "\*[command-name]"" \
.ds command-name "\*[arg\n[arg-ptr]]
.nop \*[Nm-font]\c
.\}
.print-recursive
.\}
..
.de Pa
.if !\n[arg-limit] \{\
.ds macro-name Pa
.parse-args \$@
.if !\n[.$] \{\
.nop \*[Pa-font]~\f[]\s[0]
.\}\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.print-prefixes
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Pa-font]\c
.if !(\n[type\n[arg-ptr]] == 2) \{\
.nr arg-ptr -1
.ds arg\n[arg-ptr] ~
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.parse-space-vector
.\}
.print-recursive
.\}
.el \{\
.nop \*[Pa-font]~\f[]\s[0]\c
.print-and-reset
.\}
..
.als Sy generic-macro
.ds Sy-usage symbolic_text
.als Me generic-macro
.ds Me-usage menu_entry
.de Tn
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Tn
.parse-args \$@
.\}
.el \
.tm Usage: .Tn trade_name ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \)\*[Tn-font-size]\c
.ie !\n[is-reference] \{\
.nop \)\*[Tn-font-shape]\c
.print-recursive
.\}
.el \
.do-references
.\}
.el \{\
.tm Usage: .Tn trade_name ... (#\n[.c])
.reset-args
.\}
..
.als Va generic-macro
.ds Va-usage variable_name
.als No generic-macro
.ds No-usage normal_text
.ds quote-left
.ds quote-right
.de Op
.if !\n[arg-limit] \
.ds macro-name Op
.ds quote-left "\*[left-bracket]
.ds quote-right "\*[right-bracket]
.enclose-string \$@
..
.de Aq
.if !\n[arg-limit] \
.ds macro-name Aq
.ds quote-left \[la]
.ds quote-right \[ra]
.enclose-string \$@
..
.de Bq
.if !\n[arg-limit] \
.ds macro-name Bq
.ds quote-left "\*[left-bracket]
.ds quote-right "\*[right-bracket]
.enclose-string \$@
..
.de Brq
.if !\n[arg-limit] \
.ds macro-name Brq
.ds quote-left {
.ds quote-right }
.enclose-string \$@
..
.de Dq
.if !\n[arg-limit] \
.ds macro-name Dq
.ds quote-left "\*[Lq]
.ds quote-right "\*[Rq]
.enclose-string \$@
..
.de Eq
.if !\n[arg-limit] \
.ds macro-name Eq
.ds quote-left "\$1
.ds quote-right "\$2
.shift 2
.enclose-string \$@
..
.de Pq
.if !\n[arg-limit] \
.ds macro-name Pq
.ds quote-left "\*[left-parenthesis]
.ds quote-right "\*[right-parenthesis]
.enclose-string \$@
..
.de Qq
.if !\n[arg-limit] \
.ds macro-name Qq
.ds quote-left "\*[q]
.ds quote-right "\*[q]
.enclose-string \$@
..
.de Sq
.if !\n[arg-limit] \
.ds macro-name Sq
.ds quote-left "\*[left-singlequote]
.ds quote-right "\*[right-singlequote]
.enclose-string \$@
..
.de Es
.if !\n[arg-limit] \{\
.ie (\n[.$] > 2) \{\
.ds macro-name Es
.parse-args \$@
.\}
.el \{\
.ds quote-left "\$1
.ds quote-right "\$2
.\}\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ds quote-left "\*[arg\n[arg-ptr]]
.nr arg-ptr +1
.ds quote-right "\*[arg\n[arg-ptr]]
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \
.do-\n[type\n[arg-ptr]]
.el \
.print-and-reset
..
.nr have-slot 0
.de enclose-string
.if \n[in-synopsis-section] \
.set-hard-space
.if !\n[arg-limit] \{\
.ie \n[.$] \
.parse-args \$@
.el \{\
.nop \)\*[quote-left]\*[quote-right]
.\}\}
.if !\n[arg-limit] \
.return
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nr arg-ptr +1
.print-prefixes
.nop \)\*[quote-left]\)\c
.ie (\n[arg-limit] < \n[arg-ptr]) \{\
.nop \)\*[quote-right]\)\c
.print-and-reset
.\}
.el \{\
.ie (\n[type\n[arg-limit]] == 3) \{\
.nr reg-des (\n[arg-limit] - 1)
.while (\n[type\n[reg-des]] == 3) \
.nr reg-des -1
.nr reg-des +1
.ds arg\n[reg-des] "\*[quote-right]\)\*[arg\n[reg-des]]
.\}
.el \{\
.nr reg-des \n[arg-limit]
.while (\n[reg-des] >= \n[arg-ptr]) \{\
.if !\A\*[arg\n[reg-des]] \
.break
.if !d after-\*[arg\n[reg-des]] \
.break
.nr reg-des -1
.\}
.ie (\n[reg-des] == \n[arg-limit]) \
.append-arg "\)\*[quote-right]\)" 3
.el \{\
.ie \n[have-slot] \
.ds arg\n[reg-des] "\*[quote-right]\)\*[arg\n[reg-des]]
.el \{\
.nr reg-des +1
.nr reg-des1 \n[arg-limit]
.nr reg-des2 (\n[arg-limit] + 1)
.while (\n[reg-des1] >= \n[reg-des]) \{\
.rn arg\n[reg-des1] arg\n[reg-des2]
.rnn type\n[reg-des1] type\n[reg-des2]
.rn space\n[reg-des1] space\n[reg-des2]
.nr reg-des1 -1
.nr reg-des2 -1
.\}
.nr arg-limit +1
.ds arg\n[reg-des] "\)\*[quote-right]\)
.nr type\n[reg-des] 3
.nr num-args (\n[arg-limit] - \n[reg-des] + 1)
.nr arg-limit (\n[reg-des] - 1)
.parse-space-vector
.nr have-slot 1
.\}\}\}
.do-\n[type\n[arg-ptr]]
.\}
.if \n[in-synopsis-section] \
.set-soft-space
..
.als En enclose-string
.de Ao
.if !\n[arg-limit] \
.ds macro-name Ao
.ds quote-left \[la]
.enclose-open \$@
..
.de Ac
.if !\n[arg-limit] \
.ds macro-name Ac
.ds quote-right \[ra]
.enclose-close \$@
..
.de Bo
.if !\n[arg-limit] \
.ds macro-name Bo
.ds quote-left "\*[left-bracket]
.enclose-open \$@
..
.de Bc
.if !\n[arg-limit] \
.ds macro-name Bc
.ds quote-right "\*[right-bracket]
.enclose-close \$@
..
.de Bro
.if !\n[arg-limit] \
.ds macro-name Bo
.ds quote-left {
.enclose-open \$@
..
.de Brc
.if !\n[arg-limit] \
.ds macro-name Bc
.ds quote-right }
.enclose-close \$@
..
.de Do
.if !\n[arg-limit] \
.ds macro-name Do
.ds quote-left "\*[Lq]
.enclose-open \$@
..
.de Dc
.if !\n[arg-limit] \
.ds macro-name Dc
.ds quote-right "\*[Rq]
.enclose-close \$@
..
.de Eo
.if !\n[arg-limit] \
.ds macro-name Eo
.ds quote-left "\$1
.shift
.enclose-open \$@
..
.de Ec
.if !\n[arg-limit] \
.ds macro-name Ec
.ds quote-right "\$1
.shift
.enclose-close \$@
..
.de Oo
.if !\n[arg-limit] \
.ds macro-name Oo
.ds quote-left [
.enclose-open \$@
..
.de Oc
.if !\n[arg-limit] \
.ds macro-name Oc
.ds quote-right ]
.enclose-close \$@
..
.de Po
.if !\n[arg-limit] \
.ds macro-name Po
.ds quote-left "\*[left-parenthesis]
.enclose-open \$@
..
.de Pc
.if !\n[arg-limit] \
.ds macro-name Pc
.ds quote-right "\*[right-parenthesis]
.enclose-close \$@
..
.de Qo
.if !\n[arg-limit] \
.ds macro-name Qo
.ds quote-left "\*[q]
.enclose-open \$@
..
.de Qc
.if !\n[arg-limit] \
.ds macro-name Qc
.ds quote-right "\*[q]
.enclose-close \$@
..
.de So
.if !\n[arg-limit] \
.ds macro-name So
.ds quote-left "\*[left-singlequote]
.enclose-open \$@
..
.de Sc
.if !\n[arg-limit] \
.ds macro-name Sc
.ds quote-right "\*[right-singlequote]
.enclose-close \$@
..
.de Xo
.if !\n[arg-limit] \
.ds macro-name Xo
.ds quote-left
.enclose-open \$@
..
.de Xc
.if !\n[arg-limit] \
.ds macro-name Xc
.ds quote-right
.enclose-close \$@
..
.nr nesting-level 0
.nr in-list 0
.de enclose-open
.if !\n[arg-limit] \
.parse-args \$@
.nr arg-ptr +1
.print-prefixes
.nr arg-ptr -1
.nop \)\*[quote-left]\)\c
.box enclosure-box\n[nesting-level]
.ev enclosure-env\n[nesting-level]
.evc 0
.in 0
.nf
.nop \&\c
.nr nesting-level +1
.if \n[arg-limit] \{\
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \
.print-recursive
.el \
.reset-args
.\}
..
.de enclose-close
.nr nesting-level -1
.br
.ev
.box
.chop enclosure-box\n[nesting-level]
.unformat enclosure-box\n[nesting-level]
.nh
.nop \*[enclosure-box\n[nesting-level]]\c
.nop \)\*[quote-right]\)\c
.if !\n[arg-limit] \{\
.parse-args \$@
.if !\n[.$] \
.print-and-reset
.\}
.if \n[arg-limit] \{\
.ie (\n[arg-limit] > \n[arg-ptr]) \{\
.nop \)\*[space\n[arg-ptr]]\c
.nr arg-ptr +1
.print-recursive
.\}
.el \
.print-and-reset
.\}
.if !"\*[macro-name]"It" \
.if \n[in-list] \
.if !\n[nesting-level] \
.\*[list-type-stack\n[list-depth]]
..
.de Pf
.if !\n[arg-limit] \
.ds macro-name Pf
.ie \n[arg-limit] \{\
.ie ((\n[arg-limit] - \n[arg-ptr]) > 1) \{\
.nr arg-ptr +1
.nop \)\*[arg\n[arg-ptr]]\c
.\}
.el \
.tm mdoc warning: .Pf: trailing prefix (#\n[.c])
.\}
.el \{\
.nop \)\$1\)\c
.shift
.ie \n[.$] \
.parse-args \$@
.el \{\
.tm mdoc warning: .Pf: missing arguments (#\n[.c])
.nop \)
.\}\}
.if \n[arg-limit] \{\
.nr arg-ptr +1
.ie (\n[arg-limit] < \n[arg-ptr]) \
.print-and-reset
.el \
.do-\n[type\n[arg-ptr]]
.\}
..
.de Ns
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Ns
.parse-args \$@
.\}
.el \
.tm Usage: .Ns must be called with arguments (#\n[.c])
.\}
.if \n[arg-limit] \{\
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \
.print-recursive
.el \
.reset-args
.\}
..
.de Ap
.ie !\n[arg-limit] \
.tm Usage: `Ap' cannot be first macro on a line (no `.Ap') (#\n[.c])
.el \{\
.nop \)'\)\c
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \
.print-recursive
.el \
.reset-args
.\}
..
.ds space "\*[soft-space]
.de set-hard-space
.ie "\*[space]"" \
.ds saved-space "\*[hard-space]
.el \
.ds space "\*[hard-space]
..
.de set-soft-space
.ie "\*[space]"" \
.ds saved-space "\*[soft-space]
.el \
.ds space "\*[soft-space]
..
.nr space-mode 1
.ds saved-space "\*[space]
.nr have-space 0
.de Sm
.ie \n[have-space] \
.nr reg-Sm 0
.el \
.nr reg-Sm 1
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Sm
.parse-args \$@
.\}
.el \{\
.ie \n[space-mode] \
.nr space-mode 0
.el \
.nr space-mode 1
.\}\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.if !d arg\n[arg-ptr] \
.ds arg\n[arg-ptr]
.ie "\*[arg\n[arg-ptr]]"on" \{\
.ds space "\*[saved-space]
.nr space-mode 1
.\}
.el \{\
.ie "\*[arg\n[arg-ptr]]"off" \{\
.ds saved-space "\*[space]
.ds space
.nr space-mode 0
.\}
.el \{\
.nr arg-ptr -1
.ie \n[space-mode] \
.nr space-mode 0
.el \
.nr space-mode 1
.\}\}
.ie \n[space-mode] \{\
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.if \n[reg-Sm] \
.if \n[.int] \
.nop \)
.\}
.el \{\
.nr reg-Sm (\n[arg-ptr] + 1)
.while (\n[reg-Sm] <= \n[arg-limit]) \{\
.ds space\n[reg-Sm]
.nr reg-Sm +1
.\}
.\}
.ie (\n[arg-limit] <= \n[arg-ptr]) \{\
.ie (\n[arg-ptr] > 1) \
.print-and-reset
.el \
.reset-args
.\}
.el \{\
.nr arg-ptr +1
.print-recursive
.\}
..
.nr arg-type 0
.de get-arg-type
.nr arg-type 2
.if ((\n[width] < 4) & \A\$1) \{\
.ie (\n[width] == 1) \{\
.if r punct\$1 \
.nr arg-type \n[punct\$1]
.\}
.el \
.if r \$1 \
.if d \$1 \
.nr arg-type 1
.\}
..
.de get-arg-type*
.nr arg-type 2
.length width "\*[arg\$1]
.if ((\n[width] < 4) & \A\*[arg\$1]) \{\
.ie (\n[width] == 1) \{\
.if r punct\*[arg\$1] \
.nr arg-type \n[punct\*[arg\$1]]
.\}
.el \
.if r \*[arg\$1] \
.if d \*[arg\$1] \
.nr arg-type 1
.\}
..
.de set-spacing-1
.nr reg-dssfm1 \n[\*[arg\n[arg-limit]]]
.ie (\n[reg-dssfm1] == 3) \{\
.if \n[arg-limit] \{\
.nr reg-dssfm (\n[arg-limit] - 1)
.ds space\n[reg-dssfm]
.\}
.ds space\n[arg-limit] "\*[space]
.\}
.el \{\
.ie (\n[reg-dssfm1] == 2) \{\
.if \n[arg-limit] \{\
.nr reg-dssfm (\n[arg-limit] - 1)
.ds space\n[reg-dssfm]
.\}
.ds space\n[arg-limit]
.\}
.el \
.ds space\n[arg-limit]
.\}
..
.de set-spacing-2
.ds space\n[arg-limit] "\*[space]
..
.de set-spacing-3
.if \n[arg-limit] \{\
.nr reg-dssfps (\n[arg-limit] - 1)
.ds space\n[reg-dssfps]
.\}
.ds space\n[arg-limit] "\*[space]
..
.de set-spacing-4
.ds space\n[arg-limit]
..
.de do-1
.\*[arg\n[arg-ptr]]
..
.als do-2 print-recursive
.als do-3 print-recursive
.als do-4 print-recursive
.nr fontmode-depth 0
.nr fontmode-font-stack0 0
.nr fontmode-size-stack0 0
.de Bf
.ds macro-name Bf
.ie \n[.$] \{\
.nr fontmode-depth +1
.nr fontmode-font-stack\n[fontmode-depth] \n[.f]
.nr fontmode-size-stack\n[fontmode-depth] \n[.ps]
.ie "\$1"Em" \
.nop \*[Em-font]\c
.el \{ .ie "\$1"Li" \
.nop \*[Li-font]\c
.el \{ .ie "\$1"Sy" \
.nop \*[Sy-font]\c
.el \{ .ie "\$1"-emphasis" \
.nop \*[Em-font]\c
.el \{ .ie "\$1"-literal" \
.nop \*[Li-font]\c
.el \{ .ie "\$1"-symbolic" \
.nop \*[Sy-font]\c
.el \{\
.tmc mdoc warning: Unknown keyword `\$1' in .Bf macro
.tm1 " (#\n[.c])
.\}\}\}\}\}\}\}
.el \
.tm Usage: .Bf [Em | -emphasis | Li | -literal | Sy | -symbolic] (#\n[.c])
..
.de Ef
.ds macro-name Ef
.ie \n[fontmode-depth] \{\
.nop \)\f[\n[fontmode-font-stack\n[fontmode-depth]]]\c
.nop \)\s[\n[fontmode-size-stack\n[fontmode-depth]]u]\c
.nr fontmode-font-stack\n[fontmode-depth] 0
.nr fontmode-size-stack\n[fontmode-depth] 0
.nr fontmode-depth -1
.\}
.el \
.tm mdoc warning: Extraneous .Ef (#\n[.c])
..
.nr keep-type 0
.de Bk
.ds macro-name Bk
.if \n[keep-type] \
.tm .Bk: nesting keeps not implemented yet. (#\n[.c])
.ie "\$1"-lines" \{\
.nr keep-type 2
.tm .Bk -lines: Not implemented yet. (#\n[.c])
.\}
.el \{ .ie "\$1"-words" \{\
.nr keep-type 1
.set-hard-space
.\}
.el \{ .ie "\$1"" \{\
.nr keep-type 1
.set-hard-space
.\}
.el \{\
.tm mdoc warning: Unknown keyword `\$1' in .Bk macro (#\n[.c])
.nr keep-type 3
.\}\}\}
\#. nr nesting-level +1
..
.de Ek
.ds macro-name Ek
\#. nr nesting-level -1
.ie \n[.$] \
.tm Usage: .Ek (does not take arguments) (#\n[.c])
.el \{\
.if !\n[keep-type] \
.tm mdoc warning: .Ek found without .Bk before (#\n[.c])
.ie (\n[keep-type] == 1) \
.set-soft-space
.el \{ .if (\n[keep-type] == 2) \
.tm .Bk -lines: Not implemented yet. (#\n[.c])
.\}\}
.nr keep-type 0
\#. if !"\*[out-string]"" \
\#. print-out-string
..
.nr display-depth 0
.nr is-compact 0
.ds display-type-stack0
.nr display-indent-stack0 0
.nr display-ad-stack0 0
.nr display-fi-stack0 0
.nr display-ft-stack0 0
.nr display-ps-stack0 0
.de Bd
.ds macro-name Bd
.if !\n[.$] \{\
.tm1 "Usage: .Bd {-literal | -filled | -ragged | -centered | -unfilled}
.tm1 " [-offset [string]] [-compact] [-file name] (#\n[.c])
.return
.\}
.nr is-compact 0
.ds display-file
.nr reg-Bd 1
.nr display-depth +1
.nr display-ad-stack\n[display-depth] \n[.j]
.nr display-fi-stack\n[display-depth] \n[.u]
.ie "\$1"-literal" \{\
.ds display-type-stack\n[display-depth] literal
.nr display-ft-stack\n[display-depth] \n[.f]
.nr display-ps-stack\n[display-depth] \n[.ps]
.ie t \{\
.nop \*[Li-font]\c
' ta T 9n
.\}
.el \
' ta T 8n
.nf
.\}
.el \{ .ie "\$1"-filled" \{\
.ds display-type-stack\n[display-depth] filled
.ad b
.fi
.\}
.el \{ .ie "\$1"-ragged" \{\
.ds display-type-stack\n[display-depth] ragged
.na
.fi
.\}
.el \{ .ie "\$1"-centered" \{\
.ds display-type-stack\n[display-depth] centered
.ad c
.fi
.\}
.el \{ .ie "\$1"-unfilled" \{\
.ds display-type-stack\n[display-depth] unfilled
.nf
.\}
.el \{\
.tm1 "mdoc warning: Unknown keyword `\$1' (or missing display type)
.tm1 " in .Bd macro (#\n[.c])
.nr reg-Bd 0
.\}\}\}\}\}
.if \n[reg-Bd] \{\
.shift
.if \n[.$] \
.do-Bd-args \$@
.\}
.if !r display-indent-stack\n[display-depth] \
.nr display-indent-stack\n[display-depth] 0
.if \n[display-indent-stack\n[display-depth]] \
' in +\n[display-indent-stack\n[display-depth]]u
.if !\n[is-compact] \{\
.ie "\*[display-type-stack\n[display-depth]]"ragged" \
.sp \n[display-vertical]u
.el \
' sp \n[display-vertical]u
.\}
.if !\n[cR] \
.ne 2v
.if !"\*[display-file]"" \
.so \*[display-file]
.nr is-compact 0
.ds display-file
..
.de do-Bd-args
.nr reg-ddBa 1
.ie "\$1"-offset" \{\
.nr reg-ddBa 2
.ie "\$2"left" \
.nr display-indent-stack\n[display-depth] 0
.el \{ .ie "\$2"right" \
.nr display-indent-stack\n[display-depth] (\n[.l]u / 3u)
.el \{ .ie "\$2"center" \
.nr display-indent-stack\n[display-depth] ((\n[.l]u - \n[.i]u) / 4u)
.el \{ .ie "\$2"indent" \
.nr display-indent-stack\n[display-depth] \n[display-indent]u
.el \{ .ie "\$2"indent-two" \
.nr display-indent-stack\n[display-depth] (\n[display-indent]u + \n[display-indent]u)
.el \
.nr reg-ddBa 1
.\}\}\}\}
.if (\n[reg-ddBa] == 1) \{\
.nr reg-ddBa 2
.nr reg-ddBa1 0
.if \B(\$2) \{\
.nr reg-ddBa2 \n[.warn]
.warn (\n[.warn] - (\n[.warn] / 32 % 2 * 32))
.ds str-ddBa "\$2
.substring str-ddBa 0 -2
.if \B(\*[str-ddBa]) \{\
.nr reg-ddBa3 (;(\$2))
.nr reg-ddBa4 (\*[str-ddBa])
.if (\n[reg-ddBa3] == \n[reg-ddBa4]) \
.nr reg-ddBa1 1
.\}
.warn \n[reg-ddBa2]
.\}
.ie \n[reg-ddBa1] \
.nr display-indent-stack\n[display-depth] \$2
.el \{\
.get-width "\$2"
.ie (\n[width] <= 3) \{\
.get-arg-type "\$2"
.ie (\n[arg-type] == 1) \
.nr display-indent-stack\n[display-depth] \n[\$2]
.el \
.nr display-indent-stack\n[display-depth] (\n[width]u * \n[fixed-width]u)
.\}
.el \
.nr display-indent-stack\n[display-depth] (\n[width]u * \n[fixed-width]u)
.\}\}
.\}
.el \{ .ie "\$1"-compact" \
.nr is-compact 1
.el \{ .ie "\$1"-file" \{\
.ie !"\$2"" \{\
.ds display-file "\$2
.nr reg-ddBa 2
.\}
.el \
.tm mdoc warning: .Bd `-file' keyword requires argument (#\n[.c])
.\}
.el \
.tm mdoc warning: Unknown keyword `\$1' in .Bd macro (#\n[.c])
.\}\}
.if (\n[reg-ddBa] < \n[.$]) \{\
.shift \n[reg-ddBa]
.do-Bd-args \$@
.\}
..
.de Ed
.ds macro-name Ed
.br
.if !\n[display-depth] \{\
.tm mdoc warning: Extraneous .Ed (#\n[.c])
.nr display-depth 1
.\}
.if "\*[display-type-stack\n[display-depth]]"literal" \{\
.ft \n[display-ft-stack\n[display-depth]]
.ps \n[display-ps-stack\n[display-depth]]u
.\}
.in -\n[display-indent-stack\n[display-depth]]u
.ie \n[display-fi-stack\n[display-depth]] \
.fi
.el \
.nf
.ad \n[display-ad-stack\n[display-depth]]
.nr display-indent-stack\n[display-depth] 0
.ds display-type-stack\n[display-depth]
.nr display-depth -1
..
.ds list-type-stack1
.nr list-indent-stack1 0
.nr list-have-indent-stack1 0
.de Bl
.if !\n[.$] \{\
.Bl-usage
.return
.\}
.ds macro-name Bl
.nr list-depth +1
.nr arg-ptr 1
.ie "\$1"-hang" \{\
.ds list-type-stack\n[list-depth] hang-list
.nr list-indent-stack\n[list-depth] 6n
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-tag" \{\
.ds list-type-stack\n[list-depth] tag-list
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-item" \{\
.ds list-type-stack\n[list-depth] item-list
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-enum" \{\
.ds list-type-stack\n[list-depth] enum-list
.nr list-indent-stack\n[list-depth] 3n
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-bullet" \{\
.ds list-type-stack\n[list-depth] bullet-list
.nr list-indent-stack\n[list-depth] 2n
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-dash" \{\
.ds list-type-stack\n[list-depth] dash-list
.nr list-indent-stack\n[list-depth] 2n
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-hyphen" \{\
.ds list-type-stack\n[list-depth] dash-list
.nr list-indent-stack\n[list-depth] 2n
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-inset" \{\
.ds list-type-stack\n[list-depth] inset-list
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-diag" \{\
.ds list-type-stack\n[list-depth] diag-list
.\}
.el \{ .ie "\$1"-ohang" \{\
.ds list-type-stack\n[list-depth] ohang-list
.nr list-have-indent-stack\n[list-depth] 1
.\}
.el \{ .ie "\$1"-column" \{\
.ds list-type-stack\n[list-depth] column-list
.linetabs 1
.\}
.el \{\
.tm1 "mdoc warning: Unknown list type `\$1' (or missing list type)
.tm1 " in .Bl macro
.tm
.nr arg-ptr 0
.\}\}\}\}\}\}\}\}\}\}\}
.if !\n[arg-ptr] \{\
.Bl-usage
.reset-args
.nr list-depth -1
.return
.\}
.shift
.nr reg-Bl 1
.while (\n[reg-Bl] <= \n[.$]) \{\
.ds arg\n[reg-Bl] "\$[\n[reg-Bl]]
.nr type\n[reg-Bl] 0
.ds space\n[reg-Bl]
.nr reg-Bl +1
.\}
.increment-list-stack
.if \n[.$] \{\
.nr arg-limit \n[.$]
.nr arg-ptr 0
.do-Bl-args
.in +\n[list-offset-stack\n[list-depth]]u
.if "\*[list-type-stack\n[list-depth]]"column-list" \{\
.set-column-tab \n[num-columns]
' in -\n[column-indent-width]u
.if !\n[compact-list-stack\n[list-depth]] \
.sp \n[display-vertical]u
.nf
.nr num-columns 0
.\}\}
.reset-args
..
.de Bl-usage
.tm1 "Usage: .Bl {-hang | -ohang | -tag | -diag | -inset}
.tm1 " [-width ]
.tm1 " [-offset ] [-compact]
.tm1 " .Bl -column [-offset ] ...
.tm1 " .Bl {-item | -enum [-nested] | -bullet | -hyphen | -dash}
.tm1 " [-offset ] [-compact] (#\n[.c])
..
.de do-Bl-args
.nr arg-ptr +1
.if (\n[arg-limit] < \n[arg-ptr]) \
.return
.nr reg-dBla (\n[arg-ptr] + 1)
.if !d arg\n[reg-dBla] \
.ds arg\n[reg-dBla]
.nr reg-dBla 1
.ie "\*[arg\n[arg-ptr]]"-compact" \
.nr compact-list-stack\n[list-depth] 1
.el \{ .ie "\*[arg\n[arg-ptr]]"-nested" \{\
.ie (\n[list-depth] > 1) \{\
.nr reg-dBla1 (\n[list-depth] - 1)
.ds tag-prefix-stack\n[list-depth] "\*[tag-prefix-stack\n[reg-dBla1]]
.as tag-prefix-stack\n[list-depth] \n[enum-list-count-stack\n[reg-dBla1]].
.length reg-dBla1 "\*[tag-prefix-stack\n[list-depth]]
.nr list-indent-stack\n[list-depth] +\n[reg-dBla1]n
.\}
.el \
.tm mdoc warning: `-nested' allowed with nested .Bl macros only (#\n[.c])
.\}
.el \{ .ie "\*[arg\n[arg-ptr]]"-width" \{\
.nr arg-ptr +1
.ds tag-width-stack\n[list-depth] TagwidtH
.ds str-dBla "\*[arg\n[arg-ptr]]
.substring str-dBla 0 0
.ie .\*[str-dBla] \{\
.ds str-dBla "\*[arg\n[arg-ptr]]
.substring str-dBla 1
.first-parameter \*[str-dBla]
.get-width "\*[str-dfp]
.get-arg-type "\*[str-dfp]
.ie (\n[arg-type] == 1) \
.nr reg-dBla1 1
.el \
.nr reg-dBla1 0
.\}
.el \
.nr reg-dBla1 0
.ds str-dBla "\*[arg\n[arg-ptr]]
.ie \n[reg-dBla1] \{\
.ds str-dBla \*[arg\n[arg-ptr]]
.save-global-vars
.reset-args
.box box-dBla
.ev env-dBla
.evc 0
.in 0
.nf
.nop \*[str-dBla]
.br
.ev
.box
.restore-global-vars
.get-width \h'\n[dl]u'
.nr list-indent-stack\n[list-depth] (\n[width]u * \n[fixed-width]u)
.\}
.el \{\
.nr reg-dBla1 0
.if \B(\*[str-dBla]) \{\
.nr reg-dBla2 \n[.warn]
.warn (\n[.warn] - (\n[.warn] / 32 % 2 * 32))
.ds str-dBla1 "\*[str-dBla]
.substring str-dBla1 0 -2
.if \B(\*[str-dBla1]) \{\
.nr reg-dBla3 (;(\*[str-dBla]))
.nr reg-dBla4 (\*[str-dBla1])
.if (\n[reg-dBla3] == \n[reg-dBla4]) \
.nr reg-dBla1 1
.\}
.warn \n[reg-dBla2]
.\}
.ie \n[reg-dBla1] \
.nr list-indent-stack\n[list-depth] (\*[str-dBla])
.el \{\
.get-arg-width \n[arg-ptr]
.ie (\n[width] == 2) \{\
.get-arg-type \*[str-dBla]
.ie (\n[arg-type] == 1) \
.nr list-indent-stack\n[list-depth] \n[\*[str-dBla]]
.el \
.nr list-indent-stack\n[list-depth] (\n[width]u * \n[fixed-width]u)
.\}
.el \
.nr list-indent-stack\n[list-depth] (\n[width]u * \n[fixed-width]u)
.\}\}\}
.el \{ .ie "\*[arg\n[arg-ptr]]"-offset" \{\
.nr arg-ptr +1
.ie "\*[arg\n[arg-ptr]]"indent" \
.nr list-offset-stack\n[list-depth] \n[display-indent]u
.el \{\
.ds str-dBla "\*[arg\n[arg-ptr]]
.nr reg-dBla1 0
.if \B(\*[str-dBla]) \{\
.nr reg-dBla2 \n[.warn]
.warn (\n[.warn] - (\n[.warn] / 32 % 2 * 32))
.ds str-dBla1 "\*[str-dBla]
.substring str-dBla1 0 -2
.if \B(\*[str-dBla1]) \{\
.nr reg-dBla3 (;(\*[str-dBla]))
.nr reg-dBla4 (\*[str-dBla1])
.if (\n[reg-dBla3] == \n[reg-dBla4]) \
.nr reg-dBla1 1
.\}
.warn \n[reg-dBla2]
.\}
.ie \n[reg-dBla1] \
.nr list-offset-stack\n[list-depth] \*[str-dBla]
.el \{\
.get-arg-width \n[arg-ptr]
.ie (\n[width] <= 3) \{\
.get-arg-type \*[str-dBla]
.ie (\n[arg-type] == 1) \
.nr list-offset-stack\n[list-depth] \n[\*[str-dBla]]
.el \
.nr list-offset-stack\n[list-depth] (\n[width]u * \n[fixed-width]u)
.\}
.el \
.nr list-offset-stack\n[list-depth] (\n[width]u * \n[fixed-width]u)
.\}\}\}
.el \
.nr reg-dBla 0
.\}\}\}
.if !\n[reg-dBla] \{\
.ie "\*[list-type-stack\n[list-depth]]"column-list" \{\
.nr num-columns +1
.ds str-dBla \*[arg\n[arg-ptr]]
.substring str-dBla 0 0
.ie .\*[str-dBla] \{\
.ds str-dBla "\*[arg\n[arg-ptr]]
.substring str-dBla 1
.first-parameter \*[str-dBla]
.get-width "\*[str-dfp]
.get-arg-type "\*[str-dfp]
.ie (\n[arg-type] == 1) \
.nr reg-dBla1 1
.el \
.nr reg-dBla1 0
.\}
.el \
.nr reg-dBla1 0
.ds str-dBla "\*[arg\n[arg-ptr]]
.ie \n[reg-dBla1] \{\
.ds str-dBla \*[arg\n[arg-ptr]]
.save-global-vars
.reset-args
.box box-dBla
.ev env-dBla
.evc 0
.in 0
.nf
.nop \*[str-dBla]
.br
.ev
.box
.restore-global-vars
.ds arg\n[num-columns] "\h'\n[dl]u'
.\}
.el \
.ds arg\n[num-columns] "\*[arg\n[arg-ptr]]
.\}
.el \{\
.tmc mdoc warning: Unknown keyword `\*[arg\n[arg-ptr]]'
.tm1 " in .Bl macro (#\n[.c])
.\}\}
.if (\n[arg-limit] > \n[arg-ptr]) \
.do-Bl-args
..
.de save-global-vars
.ds macro-name-saved "\*[macro-name]
.nr arg-limit-saved \n[arg-limit]
.nr num-args-saved \n[num-args]
.nr arg-ptr-saved \n[arg-ptr]
.nr reg-dsgv 1
.while (\n[reg-dsgv] <= \n[arg-limit]) \{\
.ds arg\n[reg-dsgv]-saved "\*[arg\n[reg-dsgv]]
.nr type\n[reg-dsgv]-saved \n[type\n[reg-dsgv]]
.ds space\n[reg-dsgv]-saved "\*[space\n[reg-dsgv]]
.nr reg-dsgv +1
.\}
.nr curr-font-saved \n[curr-font]
.nr curr-size-saved \n[curr-size]
.nr in-synopsis-section-saved \n[in-synopsis-section]
.nr indent-synopsis-saved \n[indent-synopsis]
.nr indent-synopsis-active-saved \n[indent-synopsis-active]
.nr have-decl-saved \n[have-decl]
.nr have-var-saved \n[have-var]
.ds command-name-saved "\*[command-name]
.ds quote-left-saved "\*[quote-left]
.ds quote-right-saved "\*[quote-right]
.nr nesting-level-saved \n[nesting-level]
.nr in-list-saved \n[in-list]
.ds space-saved "\*[space]
.ds saved-space-saved "\*[saved-space]
.nr space-mode-saved \n[space-mode]
.nr have-space-saved \n[have-space]
.nr have-slot-saved \n[have-slot]
.nr keep-type-saved \n[keep-type]
.nr display-depth-saved \n[display-depth]
.nr is-compact-saved \n[is-compact]
.nr reg-dsgv 0
.while (\n[reg-dsgv] <= \n[display-depth]) \{\
.ds display-type-stack\n[reg-dsgv]-saved "\*[display-type-stack\n[reg-dsgv]]
.nr display-indent-stack\n[reg-dsgv]-saved \n[display-indent-stack\n[reg-dsgv]]
.nr display-ad-stack\n[reg-dsgv]-saved \n[display-ad-stack\n[reg-dsgv]]
.nr display-fi-stack\n[reg-dsgv]-saved \n[display-fi-stack\n[reg-dsgv]]
.nr display-ft-stack\n[reg-dsgv]-saved \n[display-ft-stack\n[reg-dsgv]]
.nr display-ps-stack\n[reg-dsgv]-saved \n[display-ps-stack\n[reg-dsgv]]
.nr reg-dsgv +1
.\}
.nr fontmode-depth-saved \n[fontmode-depth]
.nr reg-dsgv 1
.while (\n[reg-dsgv] <= \n[fontmode-depth]) \{\
.nr fontmode-font-stack\n[reg-dsgv]-saved \n[fontmode-font-stack\n[reg-dsgv]]
.nr fontmode-size-stack\n[reg-dsgv]-saved \n[fontmode-size-stack\n[reg-dsgv]]
.nr reg-dsgv +1
.\}
.nr list-depth-saved \n[list-depth]
.nr reg-dsgv 1
.while (\n[reg-dsgv] <= \n[list-depth]) \{\
.ds list-type-stack\n[reg-dsgv]-saved "\*[list-type-stack\n[reg-dsgv]]
.nr list-have-indent-stack\n[reg-dsgv]-saved \n[list-have-indent-stack\n[reg-dsgv]]
.nr list-indent-stack\n[reg-dsgv]-saved \n[list-indent-stack\n[reg-dsgv]]
.nr compact-list-stack\n[reg-dsgv]-saved \n[compact-list-stack\n[reg-dsgv]]
.ds tag-prefix-stack\n[reg-dsgv]-saved "\*[tag-prefix-stack\n[reg-dsgv]]
.ds tag-width-stack\n[reg-dsgv]-saved "\*[tag-width-stack\n[reg-dsgv]]
.nr list-offset-stack\n[reg-dsgv]-saved \n[list-offset-stack\n[reg-dsgv]]
.nr enum-list-count-stack\n[reg-dsgv]-saved \n[enum-list-count-stack\n[reg-dsgv]]
.nr reg-dsgv +1
.\}
.ds saved-Pa-font-saved "\*[saved-Pa-font]
.nr curr-type-saved \n[curr-type]
.ds curr-arg-saved "\*[curr-arg]
.nr diag-list-input-line-count-saved \n[diag-list-input-line-count]
.nr num-columns-saved \n[num-columns]
.nr column-indent-width-saved \n[column-indent-width]
.nr is-func-saved \n[is-func]
.nr have-old-func-saved \n[have-old-func]
.nr func-arg-count-saved \n[func-arg-count]
.ds func-arg-saved "\*[func-arg]
.nr num-func-args-saved \n[num-func-args]
.nr func-args-processed-saved \n[func-args-processed]
.nr have-func-saved \n[have-func]
.nr is-reference-saved \n[is-reference]
.nr reference-count-saved \n[reference-count]
.nr author-count-saved \n[author-count]
.nr reg-dsgv 0
.while (\n[reg-dsgv] <= \n[author-count]) \{\
.ds author-name\n[reg-dsgv]-saved "\*[author-name\n[reg-dsgv]]
.nr reg-dsgv +1
.\}
.nr book-count-saved \n[book-count]
.ds book-name-saved "\*[book-name]
.nr date-count-saved \n[date-count]
.ds date-saved "\*[date]
.nr publisher-count-saved \n[publisher-count]
.ds publisher-name-saved "\*[publisher-name]
.nr journal-count-saved \n[journal-count]
.ds journal-name-saved "\*[journal-name]
.nr issue-count-saved \n[issue-count]
.ds issue-name-saved "\*[issue-name]
.nr optional-count-saved \n[optional-count]
.ds optional-string-saved "\*[optional-string]
.nr page-number-count-saved \n[page-number-count]
.ds page-number-string-saved "\*[page-number-string]
.nr corporate-count-saved \n[corporate-count]
.ds corporate-name-saved "\*[corporate-name]
.nr report-count-saved \n[report-count]
.ds report-name-saved "\*[report-name]
.nr reference-title-count-saved \n[reference-title-count]
.ds reference-title-name-saved "\*[reference-title-name]
.ds reference-title-name-for-book-saved "\*[reference-title-name-for-book]
.nr volume-count-saved \n[volume-count]
.ds volume-name-saved "\*[volume-name]
.nr have-author-saved \n[have-author]
.ds document-title-saved "\*[document-title]
.ds volume-saved "\*[volume]
.ds section-saved "\*[section]
.ds operating-system-saved "\*[operating-system]
.ds date-string-saved "\*[date-string]
.nr header-space-saved \n[header-space]
.nr footer-space-saved \n[footer-space]
.nr display-vertical-saved \n[display-vertical]
.ds header-string-saved "\*[header-string]
.nr in-see-also-section-saved \n[in-see-also-section]
.nr in-files-section-saved \n[in-files-section]
.nr in-authors-section-saved \n[in-authors-section]
..
.de restore-global-vars
.ds macro-name "\*[macro-name-saved]
.nr arg-limit \n[arg-limit-saved]
.nr num-args \n[num-args-saved]
.nr arg-ptr \n[arg-ptr-saved]
.nr reg-drgv 1
.while (\n[reg-drgv] <= \n[arg-limit]) \{\
.ds arg\n[reg-drgv] "\*[arg\n[reg-drgv]-saved]
.nr type\n[reg-drgv] \n[type\n[reg-drgv]-saved]
.ds space\n[reg-drgv] "\*[space\n[reg-drgv]-saved]
.nr reg-drgv +1
.\}
.nr curr-font \n[curr-font-saved]
.nr curr-size \n[curr-size-saved]
.nr in-synopsis-section \n[in-synopsis-section-saved]
.nr indent-synopsis \n[indent-synopsis-saved]
.nr indent-synopsis-active \n[indent-synopsis-active-saved]
.nr have-decl \n[have-decl-saved]
.nr have-var \n[have-var-saved]
.ds command-name "\*[command-name-saved]
.ds quote-left "\*[quote-left-saved]
.ds quote-right "\*[quote-right-saved]
.nr nesting-level \n[nesting-level-saved]
.nr in-list \n[in-list-saved]
.ds space "\*[space-saved]
.ds saved-space "\*[saved-space-saved]
.nr space-mode \n[space-mode-saved]
.nr have-space \n[have-space-saved]
.nr have-slot \n[have-slot-saved]
.nr keep-type \n[keep-type-saved]
.nr display-depth \n[display-depth-saved]
.nr is-compact \n[is-compact-saved]
.nr reg-drgv 0
.while (\n[reg-drgv] <= \n[display-depth]) \{\
.ds display-type-stack\n[reg-drgv] "\*[display-type-stack\n[reg-drgv]-saved]
.nr display-indent-stack\n[reg-drgv] \n[display-indent-stack\n[reg-drgv]-saved]
.nr display-ad-stack\n[reg-drgv] \n[display-ad-stack\n[reg-drgv]-saved]
.nr display-fi-stack\n[reg-drgv] \n[display-fi-stack\n[reg-drgv]-saved]
.nr display-ft-stack\n[reg-drgv] \n[display-ft-stack\n[reg-drgv]-saved]
.nr display-ps-stack\n[reg-drgv] \n[display-ps-stack\n[reg-drgv]-saved]
.nr reg-drgv +1
.\}
.nr fontmode-depth \n[fontmode-depth-saved]
.nr reg-drgv 1
.while (\n[reg-drgv] <= \n[fontmode-depth]) \{\
.nr fontmode-font-stack\n[reg-drgv] \n[fontmode-font-stack\n[reg-drgv]]-saved
.nr fontmode-size-stack\n[reg-drgv] \n[fontmode-size-stack\n[reg-drgv]]-saved
.nr reg-drgv +1
.\}
.nr list-depth \n[list-depth-saved]
.nr reg-drgv 1
.while (\n[reg-drgv] <= \n[list-depth]) \{\
.ds list-type-stack\n[reg-drgv] "\*[list-type-stack\n[reg-drgv]-saved]
.nr list-have-indent-stack\n[reg-drgv] \n[list-have-indent-stack\n[reg-drgv]-saved]
.nr list-indent-stack\n[reg-drgv] \n[list-indent-stack\n[reg-drgv]-saved]
.nr compact-list-stack\n[reg-drgv] \n[compact-list-stack\n[reg-drgv]-saved]
.ds tag-prefix-stack\n[reg-drgv] "\*[tag-prefix-stack\n[reg-drgv]-saved]
.ds tag-width-stack\n[reg-drgv] "\*[tag-width-stack\n[reg-drgv]-saved]
.nr list-offset-stack\n[reg-drgv] \n[list-offset-stack\n[reg-drgv]-saved]
.nr enum-list-count-stack\n[reg-drgv] \n[enum-list-count-stack\n[reg-drgv]-saved]
.nr reg-drgv +1
.\}
.ds saved-Pa-font "\*[saved-Pa-font-saved]
.nr curr-type \n[curr-type-saved]
.ds curr-arg "\*[curr-arg-saved]
.nr diag-list-input-line-count \n[diag-list-input-line-count-saved]
.nr num-columns \n[num-columns-saved]
.nr column-indent-width \n[column-indent-width-saved]
.nr is-func \n[is-func-saved]
.nr have-old-func \n[have-old-func-saved]
.nr func-arg-count \n[func-arg-count-saved]
.ds func-arg "\*[func-arg-saved]
.nr num-func-args \n[num-func-args-saved]
.nr func-args-processed \n[func-args-processed-saved]
.nr have-func \n[have-func-saved]
.nr is-reference \n[is-reference-saved]
.nr reference-count \n[reference-count-saved]
.nr author-count \n[author-count-saved]
.nr reg-drgv 0
.while (\n[reg-drgv] <= \n[author-count]) \{\
.ds author-name\n[reg-drgv] "\*[author-name\n[reg-drgv]-saved]
.nr reg-drgv +1
.\}
.nr book-count \n[book-count-saved]
.ds book-name "\*[book-name-saved]
.nr date-count \n[date-count-saved]
.ds date "\*[date-saved]
.nr publisher-count \n[publisher-count-saved]
.ds publisher-name "\*[publisher-name-saved]
.nr journal-count \n[journal-count-saved]
.ds journal-name "\*[journal-name-saved]
.nr issue-count \n[issue-count-saved]
.ds issue-name "\*[issue-name-saved]
.nr optional-count \n[optional-count-saved]
.ds optional-string "\*[optional-string-saved]
.nr page-number-count \n[page-number-count-saved]
.ds page-number-string "\*[page-number-string-saved]
.nr corporate-count \n[corporate-count-saved]
.ds corporate-name "\*[corporate-name-saved]
.nr report-count \n[report-count-saved]
.ds report-name "\*[report-name-saved]
.nr reference-title-count \n[reference-title-count-saved]
.ds reference-title-name "\*[reference-title-name-saved]
.ds reference-title-name-for-book "\*[reference-title-name-for-book-saved]
.nr volume-count \n[volume-count-saved]
.ds volume-name "\*[volume-name-saved]
.nr have-author \n[have-author-saved]
.ds document-title "\*[document-title-saved]
.ds volume "\*[volume-saved]
.ds section "\*[section-saved]
.ds operating-system "\*[operating-system-saved]
.ds date-string "\*[date-string-saved]
.nr header-space \n[header-space-saved]
.nr footer-space \n[footer-space-saved]
.nr display-vertical \n[display-vertical-saved]
.ds header-string "\*[header-string-saved]
.nr in-see-also-section \n[in-see-also-section-saved]
.nr in-files-section \n[in-files-section-saved]
.nr in-authors-section \n[in-authors-section-saved]
..
.de El
.if \n[.$] \{\
.tm Usage: .El (does not take arguments) (#\n[.c])
.return
.\}
.ds macro-name El
.ds str-El \*[list-type-stack\n[list-depth]]
.ie "\*[str-El]"diag-list" \
.end-list 0
.el \{ .ie "\*[str-El]"column-list" \
.end-column-list
.el \{ .ie "\*[str-El]"item-list" \
.end-list 0
.el \{ .ie "\*[str-El]"ohang-list" \
.end-list 0
.el \{ .ie "\*[str-El]"inset-list" \
.end-list 0
.el \
.end-list 1
.\}\}\}\}
.br
..
.ds saved-Pa-font
.nr curr-type 0
.ds curr-arg
.nr bullet-list-type 1
.nr column-list-type 0
.nr dash-list-type 1
.nr diag-list-type 0
.nr enum-list-type 1
.nr hang-list-type 2
.nr inset-list-type 2
.nr item-list-type 1
.nr ohang-list-type 2
.nr tag-list-type 2
.de It
.ds str-It \*[list-type-stack\n[list-depth]]
.if "\*[str-It]"" \
.tm mdoc error: .It without preceding .Bl (#\n[.c])
.if \n[nesting-level] \{\
.tmc "mdoc error: .It found in enclosing (e.g. .Ac ... .It ... .Ao)
.tm1 " (#\n[.c])
.\}
.br
.if !\n[cR] \
.ne 3v
.if \n[.$] \{\
.ds macro-name It
.nr reg-It 1
.while (\n[reg-It] <= \n[.$]) \{\
.ds arg\n[reg-It] "\$[\n[reg-It]]
.nr reg-It +1
.\}
.nr num-args \n[.$]
.nr arg-ptr 0
.\}
.nr reg-It \n[\*[str-It]-type]
.if \n[reg-It] \{\
.box item-box\n[list-depth]
.ev item-env\n[list-depth]
.evc 0
.in 0
.nf
.\}
.ie (\n[reg-It] == 1) \{\
.if \n[.$] \{\
.tm1 "mdoc warning: .It macros in lists of type `\*[str-It]'
.tm1 " don't take arguments (#\n[.c])
.\}\}
.el \{\
.ie \n[.$] \{\
.if (\n[reg-It] == 2) \{\
.parse-arg-vector
.nr in-list 1
.nr arg-ptr 1
.nr curr-type \n[type1]
.ds curr-arg "\*[arg1]
.if \n[in-files-section] \{\
.ds saved-Pa-font "\*[Pa-font]
.if n \
.ds Pa-font "\*[No-font]
.\}
.ie (\n[type1] == 1) \
.\*[arg1]
.el \{\
.nr arg-ptr 1
.print-recursive
.\}\}\}
.el \{\
.tm1 "mdoc warning: .It macros in lists of type `\*[str-It]'
.tm1 " require arguments (#\n[.c])
.\}
.\}
.if !\n[nesting-level] \
.\*[str-It]
..
.de inset-list
.br
.ev
.box
.unformat item-box\n[list-depth]
.set-vertical-and-indent 0
.br
.nh
.item-box\n[list-depth]
.if \n[in-files-section] \
.if n \
.ds Pa-font "\*[saved-Pa-font]
.nr in-list 0
.reset-args
..
.de hang-list
.br
.ev
.box
.unformat item-box\n[list-depth]
.set-vertical-and-indent 1
.nr reg-dhl (\n[list-indent-stack\n[list-depth]]u + \n[digit-width]u)
.ti -\n[reg-dhl]u
.nh
.ie (\n[dl]u > \n[list-indent-stack\n[list-depth]]u) \
.item-box\n[list-depth]
.el \{\
.chop item-box\n[list-depth]
.nr reg-dhl1 \n[.k]u
.nop \*[item-box\n[list-depth]]\c
.nop \h'|(\n[reg-dhl1]u - \n[.k]u + \n[reg-dhl]u)'\c
.nr have-space 1
.\}
.if \n[in-files-section] \
.if n \
.ds Pa-font "\*[saved-Pa-font]
.nr in-list 0
.reset-args
..
.de ohang-list
.br
.ev
.box
.unformat item-box\n[list-depth]
.set-vertical-and-indent 0
.nh
.item-box\n[list-depth]
.br
.if \n[in-files-section] \
.if n \
.ds Pa-font "\*[saved-Pa-font]
.nr in-list 0
.reset-args
..
.de item-list
.br
.ev
.box
.set-vertical-and-indent 0
.br
.reset-args
..
.nr enum-list-count-stack1 0
.de enum-list
.nr in-list 1
.nr enum-list-count-stack\n[list-depth] +1
\# XXX
\#.ll \n[list-indent-stack\n[list-depth]]u
\#.rj
.nop \*[tag-prefix-stack\n[list-depth]]\c
.nop \n[enum-list-count-stack\n[list-depth]].\&
.do-list
..
.de bullet-list
.nr in-list 1
.nop \)\*[Sy-font]\[bu]\f[]
.do-list
..
.de dash-list
.nr in-list 1
.nop \)\*[Sy-font]\-\f[]
.do-list
..
.als do-list hang-list
.nr diag-list-input-line-count 0
.de diag-list
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ie ((\n[.c] - \n[diag-list-input-line-count]) > 1) \{\
.ie !\n[compact-list-stack\n[list-depth]] \
.paragraph
.el \
.br
.\}
.el \
.br
.nr diag-list-input-line-count \n[.c]
.nh
.nop \*[Sy-font]\c
.if \n[num-args] \
.remaining-args
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\*[hard-space]\c
.print-and-reset
..
.de tag-list
.br
.ev
.box
.unformat item-box\n[list-depth]
.box box-dtl
.ev env-dtl
.evc 0
.fi
.ad 0
.in 0
.item-box\n[list-depth]
.br
.ev
.box
.if !"TagwidtH"\*[tag-width-stack\n[list-depth]]" \{\
.if !\n[list-have-indent-stack\n[list-depth]] \{\
.in -(\n[list-indent-stack\n[list-depth]]u + \n[digit-width]u)
.nr list-have-indent-stack\n[list-depth] 1
.\}
.get-tag-width
.\}
.set-vertical-and-indent 1
.nr reg-dtl (\n[list-indent-stack\n[list-depth]]u + \n[digit-width]u)
.ti -\n[reg-dtl]u
.nh
.ie (\n[dl]u > \n[list-indent-stack\n[list-depth]]u) \{\
.item-box\n[list-depth]
.br
.\}
.el \{\
.chop item-box\n[list-depth]
.nop \Z'\*[item-box\n[list-depth]]'\c
.nop \h'\n[reg-dtl]u'\c
.nr have-space 1
.\}
.if \n[in-files-section] \
.if n \
.ds Pa-font "\*[saved-Pa-font]
.nr in-list 0
.reset-args
..
.de get-tag-width
.ie (\n[curr-type] == 1) \{\
.ds tag-width-stack\n[list-depth] \*[curr-arg]
.nr list-indent-stack\n[list-depth] \n[\*[curr-arg]]
.\}
.el \{\
.ds tag-width-stack\n[list-depth] No
.nr list-indent-stack\n[list-depth] \n[No]
.\}
..
.de set-vertical-and-indent
.if !\n[compact-list-stack\n[list-depth]] \
.sp \n[display-vertical]u
.if \n[list-have-indent-stack\n[list-depth]] \{\
.nr list-have-indent-stack\n[list-depth] 0
.if \$1 \
.in +(\n[list-indent-stack\n[list-depth]]u + \n[digit-width]u)
.\}
.if !\n[cR] \
.ne 2v
..
.nr list-depth 0
.nr num-columns 0
.nr compact-list-stack1 0
.ds tag-prefix-stack1
.ds tag-width-stack0
.ds tag-width-stack1
.nr list-offset-stack1 0
.de end-list
.if \$1 \
' in -(\n[list-indent-stack\n[list-depth]]u + \n[digit-width]u)
' in -\n[list-offset-stack\n[list-depth]]u
.if (\n[list-depth] <= 0) \
.tm mdoc warning: extraneous .El call (#\n[.c])
.decrement-list-stack
.nr list-depth -1
..
.de increment-list-stack
.nr reg-dils (\n[list-depth] + 1)
.nr list-have-indent-stack\n[reg-dils] 0
.nr list-indent-stack\n[reg-dils] 0
.nr list-offset-stack\n[reg-dils] 0
.ds tag-prefix-stack\n[reg-dils]
.ds tag-width-stack\n[reg-dils] \*[tag-width-stack\n[list-depth]]
.ds list-type-stack\n[reg-dils]
.nr compact-list-stack\n[reg-dils] 0
.nr enum-list-count-stack\n[reg-dils] 0
..
.de decrement-list-stack
.ds list-type-stack\n[list-depth]
.nr list-have-indent-stack\n[list-depth] 0
.nr list-indent-stack\n[list-depth] 0
.nr list-offset-stack\n[list-depth] 0
.ds tag-prefix-stack\n[list-depth]
.ds tag-width-stack\n[list-depth]
.nr compact-list-stack\n[list-depth] 0
.nr enum-list-count-stack\n[list-depth] 0
..
.de Xr
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Xr
.parse-args \$@
.\}
.el \
.Xr-usage
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.print-prefixes
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.ie (\n[type\n[arg-ptr]] == 2) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds arg\n[arg-ptr] \*[Xr-font]\*[arg\n[arg-ptr]]\f[]\s[0]
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr reg-Xr (\n[arg-ptr] + 1)
.if (\n[type\n[reg-Xr]] == 2) \{\
.ds arg\n[reg-Xr] \*[lp]\*[arg\n[reg-Xr]]\*[rp]
.ds space\n[arg-ptr]
.\}
.\}
.print-recursive
.\}
.el \
.Xr-usage
.\}
.el \
.Xr-usage
..
.de Xr-usage
.tm Usage: .Xr manpage_name [section#] ... (#\n[.c])
.reset-args
..
.als Sx generic-macro
.ds Sx-usage section_header
.de end-column-list
.linetabs 0
' in -(\n[list-offset-stack\n[list-depth]]u + \n[list-indent-stack\n[list-depth]]u)
.ta T .5i
.fi
.decrement-list-stack
.nr list-depth -1
..
.nr column-indent-width 0
.de set-column-tab
.ds str-dsct
.nr reg-dsct 1
.nr column-indent-width 0
.ie (\$1 < 5) \
.ds str-dsct1 "
.el \{\
.ie (\$1 == 5) \
.ds str-dsct1 "
.el \{\
.ds str-dsct1 "
.\}\}
.while (\n[reg-dsct] <= \$1) \{\
.as str-dsct " +\w\*[arg\n[reg-dsct]]\*[str-dsct1]u
.nr column-indent-width +\w\*[arg\n[reg-dsct]]\*[str-dsct1]u
.nr reg-dsct +1
.\}
.ta \*[str-dsct]
' in +\n[column-indent-width]u
..
.de column-list
.if \n[num-args] \
.parse-arg-vector
.nr arg-ptr +1
.if (\n[arg-limit] < \n[arg-ptr]) \{\
.tm Usage: .It column_string [Ta [column_string ...] ] (#\n[.c])
.return
.\}
.if "\*[arg\n[arg-ptr]]"Ta" \{\
.nr reg-dcl (\n[arg-ptr] - 1)
.ds space\n[reg-dcl]
.\}
.if !\n[list-indent-stack\n[list-depth]] \
.nr list-indent-stack\n[list-depth] \n[column-indent-width]u
.if !\n[.u] \{\
.fi
' in +\n[column-indent-width]u
.\}
.ti -\n[column-indent-width]u
.do-\n[type\n[arg-ptr]]
..
.de Ta
.ie \n[arg-limit] \{\
.nr arg-ptr +1
.nop \*[tab]\c
.ie (\n[arg-limit] >= \n[arg-ptr]) \
.do-\n[type\n[arg-ptr]]
.el \
.reset-args
.\}
.el \{\
.tm1 "Usage: Ta must follow column entry: e.g.
.tm1 " .It column_string [Ta [column_string ...]] (#\n[.c])
.\}
..
.de Dl
' ta T .5i
.in +\n[display-indent]u
.ie \n[arg-limit] \{\
.tm Usage: .Dl not callable by other macros (#\n[.c])
.reset-args
.\}
.el \{\
.ie \n[.$] \{\
.ds macro-name Dl
.parse-args \$@
.nr arg-ptr 1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Li-font]\c
.print-recursive
.\}
.el \
.tm Usage: .Dl argument ... (#\n[.c])
.\}
.in -\n[display-indent]u
..
.de D1
' ta T .5i
.in +\n[display-indent]u
.ie \n[arg-limit] \{\
.tm Usage: .D1 not callable by other macros (#\n[.c])
.reset-args
.\}
.el \{\
.ie \n[.$] \{\
.ds macro-name D1
.parse-args \$@
.nr arg-ptr 1
.print-recursive
.\}
.el \
.tm Usage: .D1 argument ... (#\n[.c])
.\}
.in -\n[display-indent]u
..
.de Vt
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Vt
.parse-args \$@
.\}
.el \
.tm Usage: .Vt variable_type ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.if (\n[arg-limit] < \n[arg-ptr]) \{\
.tm Usage: .Vt variable_type ... (#\n[.c])
.reset-args
.return
.\}
.if \n[in-synopsis-section] \{\
.if \n[have-decl] \{\
.paragraph
.nr have-decl 0
.\}
.if \n[have-func] \{\
.ie \n[have-var] \
.br
.el \
.paragraph
.\}
.nr have-var 1
.\}
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Ft-font]\c
.print-recursive
.if \n[in-synopsis-section] \{\
.ie \n[have-old-func] \
.nop \*[soft-space]\c
.el \
.br
.\}
..
.nr is-func 0
.de Ft
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Ft
.parse-args \$@
.\}
.el \
.tm Usage: .Ft function_type ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.if (\n[arg-limit] < \n[arg-ptr]) \{\
.tm Usage: .Ft function_type ... (#\n[.c])
.reset-args
.return
.\}
.if \n[in-synopsis-section] \{\
.if (\n[have-func] : \n[have-decl]) \{\
.paragraph
.nr have-decl 0
.nr have-var 0
.\}
.if \n[have-var] \{\
.paragraph
.nr have-var 0
.\}
.nr is-func 1
.\}
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Ft-font]\c
.print-recursive
..
.nr have-old-func 0
.de Ot
.nr have-old-func 1
.if \n[in-synopsis-section] \{\
.if (\n[have-func] : \n[have-decl]) \{\
.paragraph
.nr have-decl 0
.nr have-var 0
.\}
.if \n[have-var] \{\
.paragraph
.nr have-var 0
.\}
.nr is-func 1
.\}
.if \n[.$] \
.nop \*[Ft-font]\$*\c
.nop \ \f[]\c
..
.de Fa
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Fa
.parse-args \$@
.\}
.el \
.tm Usage: .Fa function_arguments ... (#\n[.c])
.\}
.ie \n[func-arg-count] \
.do-func
.el \{\
.nr arg-ptr +1
.if (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Fa-font]\c
.print-recursive
.if \n[in-synopsis-section] \
.if \n[have-func] \
.br
.\}\}
..
.nr func-arg-count 0
.ds func-arg
.nr num-func-args 0
.nr func-args-processed 0
.de do-func
.if (\n[arg-limit] <= \n[arg-ptr]) \{\
.reset-args
.return
.\}
.nr arg-ptr +1
.ds func-arg
.nr num-func-args 0
.nr func-args-processed 0
.build-func-string \*[arg\n[arg-ptr]]
.if (\n[num-func-args] > 1) \
.ds arg\n[arg-ptr] "\*[func-arg]
.if (\n[func-arg-count] > 1) \{\
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\|,\)\c
.nop \)\*[space\n[arg-ptr]]\*[Fa-font]\c
.nop \)\*[arg\n[arg-ptr]]\f[]\s[0]\c
.\}
.if (\n[func-arg-count] == 1) \{\
.nop \|\*[Fa-font]\*[arg\n[arg-ptr]]\c
.nop \f[]\s[0]\c
.\}
.nr func-arg-count +1
.do-func
..
.nr have-func 0
.de Fn
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Fn
.parse-args \$@
.\}
.el \
.tm Usage: .Fn function_name [function_arg] ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.if \n[in-synopsis-section] \{\
.ie \n[is-func] \{\
.br
.nr have-var 0
.nr have-decl 0
.nr is-func 0
.\}
.el \{\
.if \n[have-func] \{\
.paragraph
.nr have-var 0
.nr have-decl 0
.\}\}
.if \n[have-decl] \{\
.paragraph
.nr have-var 0
.\}
.if \n[have-var] \{\
.paragraph
.nr have-decl 0
.\}
.nr have-func 1
.nr is-func 0
.br
.if !\n[indent-synopsis] \
.nr indent-synopsis (8u * \n[fixed-width]u)
.if !\n[indent-synopsis-active] \
.in +\n[indent-synopsis]u
.ti -\n[indent-synopsis]u
.\}
.nr arg-ptr +1
.print-prefixes
.if (\n[arg-limit] < \n[arg-ptr]) \{\
.tm Usage: .Fn function_name [function_arg] ... (#\n[.c])
.reset-args
.return
.\}
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Fn-font]\*[arg\n[arg-ptr]]\c
.nop \f[]\s[0]\*[lp]\)\c
.nr arg-ptr +1
.if (\n[arg-limit] >= \n[arg-ptr]) \{\
.if (\n[type\n[arg-ptr]] == 2) \{\
.nop \*[Fa-font]\c
.do-func-args
.nop \f[\n[curr-font]]\s[\n[curr-size]u]\c
.\}\}
.nop \)\*[rp]\)\c
.if \n[in-synopsis-section] \
.nop \);\)\c
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr arg-ptr -1
.nop \)\*[space\n[arg-ptr]]\c
.nr arg-ptr +1
.print-recursive
.\}
.el \
.print-and-reset
.if \n[in-synopsis-section] \
.if !\n[indent-synopsis-active] \
.in -\n[indent-synopsis]u
..
.de do-func-args
.if \n[in-synopsis-section] \{\
.ds func-arg
.nr num-func-args 0
.nr func-args-processed 0
.build-func-string \*[arg\n[arg-ptr]]
.if (\n[num-func-args] > 1) \
.ds arg\n[arg-ptr] "\*[func-arg]
.\}
.nop \)\*[arg\n[arg-ptr]]\c
.nr arg-ptr +1
.if (\n[arg-limit] >= \n[arg-ptr]) \{\
.if (\n[type\n[arg-ptr]] == 2) \{\
.nr reg-ddfa (\n[arg-ptr] - 1)
.nop \|\f[\n[curr-font]]\s[\n[curr-size]u],\)\c
.nop \)\*[space\n[reg-ddfa]]\f[]\s[0]\|\c
.do-func-args
.\}\}
..
.nr saved-nesting-level 0
.nr in-func-enclosure 0
.de Fo
.if (\n[in-func-enclosure]) \{\
.tm mdoc error: .Fo/.Fc can't be nested (#\n[.c])
.return
.\}
.nr saved-nesting-level \n[nesting-level]
.nr in-func-enclosure 1
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Fo
.parse-args \$@
.\}
.el \
.tm Usage: .Fo function_name (#\n[.c])
.\}
.if \n[in-synopsis-section] \{\
.ie \n[is-func] \{\
.br
.nr have-var 0
.nr have-decl 0
.nr is-func 0
.\}
.el \{\
.if \n[have-func] \{\
.paragraph
.nr have-var 0
.nr have-decl 0
.\}\}
.if \n[have-decl] \{\
.paragraph
.nr have-var 0
.\}
.if \n[have-var] \{\
.paragraph
.nr have-decl 0
.\}
.nr have-func 1
.nr is-func 0
.br
.if !\n[indent-synopsis] \
.nr indent-synopsis (8u * \n[fixed-width]u)
.\}
.box func-box
.ev func-env
.evc 0
.in 0
.nf
.nr arg-ptr +1
.print-prefixes
.if (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr func-arg-count 1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Fn-font]\*[arg\n[arg-ptr]]\c
.nop \f[]\s[0]\*[lp]\)\c
.reset-args
.\}
..
.de Fc
.if !\n[in-func-enclosure] \{\
.tm mdoc warning: Extraneous .Fc (#\n[.c])
.return
.\}
.if \n[.$] \{\
.ds macro-name Fc
.parse-args \) \$@
.\}
.if !(\n[saved-nesting-level] == \n[nesting-level]) \
.tm mdoc warning: Unbalanced enclosure commands within .Fo/.Fc
.nr func-arg-count 0
.nr in-func-enclosure 0
.ie \n[in-synopsis-section] \
.nop \|\*[rp];\)
.el \
.nop \|\*[rp]\)
.br
.ev
.box
.chop func-box
.unformat func-box
.if \n[in-synopsis-section] \{\
.if !\n[indent-synopsis-active] \
.in +\n[indent-synopsis]u
.ti -\n[indent-synopsis]u
.\}
.nh
.nop \*[func-box]\c
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.print-recursive
.\}
.el \
.print-and-reset
.if \n[in-synopsis-section] \
.if !\n[indent-synopsis-active] \
.in -\n[indent-synopsis]u
..
.de build-func-string
.if !\n[num-func-args] \{\
.nr num-func-args \n[.$]
.nr func-args-processed 0
.ds func-arg
.\}
.nr func-args-processed +1
.as func-arg "\$1
.if (\n[func-args-processed] < \n[num-func-args]) \{\
.as func-arg "\*[hard-space]
.shift
.build-func-string \$@
.\}
..
.nr is-reference 0
.nr reference-count 0
.de Rs
.ie \n[.$] \
.tm Usage: .Rs (does not take arguments) (#\n[.c])
.el \{\
.nr is-reference 1
.reset-reference
.if \n[in-see-also-section] \
.paragraph
.nr reference-count 0
.\}
..
.de Re
.ie \n[.$] \
.tm Usage: .Re (does not take arguments) (#\n[.c])
.el \{\
.print-reference
.reset-reference
.nr is-reference 0
.\}
..
.de reset-reference
.while (\n[author-count]) \{\
.ds author-name\n[author-count]
.nr author-count -1
.\}
.nr journal-count 0
.nr issue-count 0
.nr optional-count 0
.nr corporate-count 0
.nr report-count 0
.nr reference-title-count 0
.nr volume-count 0
.nr date-count 0
.nr page-number-count 0
.nr book-count 0
.ds journal-name
.ds issue-name
.ds optional-string
.ds corporate-name
.ds report-name
.ds reference-title-name
.ds reference-title-name-for-book
.ds volume-name
.ds date
.ds page-number-string
.ds book-name
..
.de finish-reference
.nr reference-count -1
.ie \n[reference-count] \
.nop \),
.el \
.nop \).
..
.de print-reference
.nh
.if \n[author-count] \{\
.print-reference-authors
.nr reference-count -\n[author-count]
.\}
.if \n[reference-title-count] \{\
.unformat reference-title-name
.chop reference-title-name
.unformat reference-title-name-for-book
.chop reference-title-name-for-book
.ie ((\n[journal-count] == 1) : (\n[book-count] == 1)) \{\
.nop \)\*[q]\)\*[reference-title-name-for-book]\)\*[q]\c
.finish-reference
.\}
.el \{\
.nop \*[reference-title-name]\c
.finish-reference
.\}\}
.if \n[book-count] \{\
.unformat book-name
.chop book-name
.nop \*[book-name]\c
.finish-reference
.\}
.if \n[publisher-count] \{\
.unformat publisher-name
.chop publisher-name
.nop \*[publisher-name]\c
.finish-reference
.\}
.if \n[journal-count] \{\
.unformat journal-name
.chop journal-name
.nop \*[journal-name]\c
.finish-reference
.\}
.if \n[report-count] \{\
.unformat report-name
.chop report-name
.nop \*[report-name]\c
.finish-reference
.\}
.if \n[issue-count] \{\
.unformat issue-name
.chop issue-name
.nop \*[issue-name]\c
.finish-reference
.\}
.if \n[volume-count] \{\
.unformat volume-name
.chop volume-name
.nop \*[volume-name]\c
.finish-reference
.\}
.if \n[page-number-count] \{\
.unformat page-number-string
.chop page-number-string
.nop \*[page-number-string]\c
.finish-reference
.\}
.if \n[corporate-count] \{\
.unformat corporate-name
.chop corporate-name
.nop \*[corporate-name]\c
.finish-reference
.\}
.if \n[date-count] \{\
.unformat date
.chop date
.nop \*[date]\c
.finish-reference
.\}
.if \n[optional-count] \{\
.unformat optional-string
.chop optional-string
.nop \*[optional-string]\c
.finish-reference
.\}
.if \n[reference-count] \
.tm mdoc warning: unresolved reference problem
.hy \n[hyphen-flags]
..
.ds str-dpra "and
.de print-reference-authors
.nr reg-dpra 1
.while (\n[reg-dpra] < \n[author-count]) \{\
.unformat author-name\n[reg-dpra]
.chop author-name\n[reg-dpra]
.ie (\n[author-count] > 2) \
.nop \)\*[author-name\n[reg-dpra]],
.el \
.nop \)\*[author-name\n[reg-dpra]]
.nr reg-dpra +1
.\}
.unformat author-name\n[reg-dpra]
.chop author-name\n[reg-dpra]
.if (\n[author-count] > 1) \
.nop \)\*[str-dpra]
.nop \)\*[author-name\n[reg-dpra]],
..
.nr author-count 0
.ds author-name0
.de %A
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%A author_name ... (#\n[.c])
.return
.\}
.nr author-count +1
.nr reference-count +1
.ds macro-name %A
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.box author-name\n[author-count]
.ev env-%A
.evc 0
.in 0
.nf
.do-references
..
.nr book-count 0
.ds book-name
.de %B
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%B book_name ... (#\n[.c])
.return
.\}
.if \n[is-reference] \{\
.nr book-count +1
.nr reference-count +1
.\}
.ds macro-name %B
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ie \n[is-reference] \{\
.boxa book-name
.ev env-%B
.evc 0
.in 0
.nf
.nop \*[Em-font]\c
.do-references
.\}
.el \{\
.nop \*[Em-font]\c
.print-recursive
.\}
..
.nr date-count 0
.ds date
.de %D
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%D date ... (#\n[.c])
.return
.\}
.nr date-count +1
.nr reference-count +1
.ds macro-name %D
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa date
.ev env-%D
.evc 0
.in 0
.nf
.do-references
..
.nr publisher-count 0
.ds publisher-name
.de %I
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%I issuer/publisher_name ... (#\n[.c])
.return
.\}
.nr publisher-count +1
.nr reference-count +1
.ds macro-name %I
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa publisher-name
.ev env-%I
.evc 0
.in 0
.nf
.nop \*[Em-font]\c
.do-references
..
.nr journal-count 0
.ds journal-name
.de %J
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%J journal_name ... (#\n[.c])
.return
.\}
.nr journal-count +1
.nr reference-count +1
.ds macro-name %J
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa journal-name
.ev env-%J
.evc 0
.in 0
.nf
.nop \*[Em-font]\c
.do-references
..
.nr issue-count 0
.ds issue-name
.de %N
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%N issue_number ... (#\n[.c])
.return
.\}
.nr issue-count +1
.nr reference-count +1
.ds macro-name %N
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa issue-name
.ev env-%N
.evc 0
.in 0
.nf
.do-references
..
.nr optional-count 0
.ds optional-string
.de %O
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%O optional_information ... (#\n[.c])
.return
.\}
.nr optional-count +1
.nr reference-count +1
.ds macro-name %O
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa optional-string
.ev env-%O
.evc 0
.in 0
.nf
.do-references
..
.nr page-number-count 0
.ds page-number-string
.de %P
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%P page_number ... (#\n[.c])
.return
.\}
.nr page-number-count +1
.nr reference-count +1
.ds macro-name %P
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa page-number-string
.ev env-%P
.evc 0
.in 0
.nf
.do-references
..
.nr corporate-count 0
.ds corporate-name
.de %Q
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%Q corporate_or_foreign_author ... (#\n[.c])
.return
.\}
.nr corporate-count +1
.nr reference-count +1
.ds macro-name %Q
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa corporate-name
.ev env-%Q
.evc 0
.in 0
.nf
.do-references
..
.nr report-count 0
.ds report-name
.de %R
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%R reference_report ... (#\n[.c])
.return
.\}
.nr report-count +1
.nr reference-count +1
.ds macro-name %R
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa report-name
.ev env-%R
.evc 0
.in 0
.nf
.do-references
..
.nr reference-title-count 0
.ds reference-title-name
.ds reference-title-name-for-book
.de %T
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%T reference_title ... (#\n[.c])
.return
.\}
.if \n[is-reference] \{\
.nr reference-title-count +1
.nr reference-count +1
.\}
.ds macro-name %T
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ie \n[is-reference] \{\
.boxa reference-title-name-for-book
.ev env-%T
.evc 0
.in 0
.nf
.nop \*[No-font]\c
.do-references
.ds macro-name %T
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa reference-title-name
.ev env-%T
.evc 0
.in 0
.nf
.nop \*[Em-font]\c
.do-references
.\}
.el \{\
.nop \*[Em-font]\c
.print-recursive
.\}
..
.nr volume-count 0
.ds volume-name
.de %V
.if (\n[arg-limit] : (\n[.$] == 0)) \{\
.tm Usage: .%V volume ... (#\n[.c])
.return
.\}
.nr volume-count +1
.nr reference-count +1
.ds macro-name %V
.parse-args \$@
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.boxa volume-name
.ev env-%V
.evc 0
.in 0
.nf
.do-references
..
.de do-references
.if !\n[is-reference] \
.tm mdoc error: .\*[macro-name] found outside of .Rs ... .Re (#\n[.c])
.nr reg-ddr1 \n[type\n[arg-ptr]]
.ie (\n[reg-ddr1] == 1) \{\
.append-arg \c 3
.\*[arg\n[arg-ptr]]
.\}
.el \{\
.nop \)\*[arg\n[arg-ptr]]\c
.ie (\n[arg-limit] == \n[arg-ptr]) \{\
.br
.ev
.boxa
.reset-args
.\}
.el \{\
.nr reg-ddr \n[arg-ptr]
.nr arg-ptr +1
.nop \)\*[space\n[reg-ddr]]\c
.do-references
.\}\}
..
.de Hf
.ie ((\n[.$] == 1) & (\n[arg-limit] == 0)) \{\
.paragraph
.nop File:
.Pa \$1
.Bd -literal
.so \$1
.Ed
.paragraph
.\}
.el \
.Usage: .Hf file (#\n[.c])
..
.nr have-author 0
.de An
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ie "\$1"-nosplit" \
.nr in-authors-section 0
.el \{ .ie "\$1"-split" \
.nr in-authors-section 1
.el \{\
.ds macro-name An
.parse-args \$@
.\}\}\}
.el \{\
.tm1 "Usage: .An {-nosplit | -split}
.tm1 .An author_name ... (#\n[.c])
.\}\}
.if \n[in-authors-section] \{\
.ie \n[have-author] \
.br
.el \
.nr have-author 1
.\}
.if \n[arg-limit] \{\
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.print-recursive
.\}
.el \{\
.tm Usage: .An author_name ... (#\n[.c])
.reset-args
.\}\}
..
.ds str-Rv-std-prefix "The
.ds str-Rv-std-suffix "function returns the value\~0 if successful;
.as str-Rv-std-suffix " otherwise the value\~-1 is returned and
.as str-Rv-std-suffix " the global variable \*[Va-font]errno\f[]
.as str-Rv-std-suffix " is set to indicate the error.
.ds str-Rv-stds-prefix "The
.ds str-Rv-stds-and "and
.ds str-Rv-stds-suffix "functions return the value\~0 if successful;
.as str-Rv-stds-suffix " otherwise the value\~-1 is returned and
.as str-Rv-stds-suffix " the global variable \*[Va-font]errno\f[]
.as str-Rv-stds-suffix " is set to indicate the error.
.ds str-Rv-std0 "Upon successful completion, the value\~0 is returned;
.as str-Rv-std0 " otherwise the value\~-1 is returned and
.as str-Rv-std0 " the global variable \*[Va-font]errno\f[]
.as str-Rv-std0 " is set to indicate the error.
.de Rv
.if \n[arg-limit] \{\
.tm Usage: .Rv not callable by other macros (#\n[.c])
.reset-args
.return
.\}
.if !\n[.$] \{\
.tm Usage: .Rv [-std] [ ...] (#\n[.c])
.return
.\}
.if "\$1"-std" \{\
.nr reg-Rv \*[section]
.if ((\n[reg-Rv] < 2) : (\n[reg-Rv] > 3)) \
.tm Usage: .Rv -std in sections 2 and 3 only (#\n[.c])
.br
.shift
.ie (\n[.$] > 1) \{\
.nop \)\*[str-Rv-stds-prefix]
.nr reg-Rv 1
.while (\n[reg-Rv] < \n[.$]) \{\
.ie (\n[.$] > 2) \
.Fn \$\n[reg-Rv] ,
.el \
.Fn \$\n[reg-Rv]
.nr reg-Rv +1
.\}
.nop \)\*[str-Rv-stds-and]
.Fn \$\n[.$]
.nop \)\*[str-Rv-stds-suffix]
.\}
.el \{ .ie (\n[.$] == 1) \{\
.nop \)\*[str-Rv-std-prefix]
.Fn \$1
.nop \)\*[str-Rv-std-suffix]
.\}
.el \{\
.nop \)\*[str-Rv-std0]
.\}\}\}
..
.ds str-Ex-std-prefix "The
.ds str-Ex-std-suffix "utility exits\~0 on success,
.as str-Ex-std-suffix " and\~>0 if an error occurs.
.ds str-Ex-stds-prefix "The
.als str-Ex-stds-and str-Rv-stds-and
.ds str-Ex-stds-suffix "utilities exit\~0 on success,
.as str-Ex-stds-suffix " and\~>0 if an error occurs.
.de Ex
.if \n[arg-limit] \{\
.tm Usage: .Ex not callable by other macros (#\n[.c])
.reset-args
.return
.\}
.if !\n[.$] \{\
.tm Usage: .Ex [-std] [ ...] (#\n[.c])
.return
.\}
.if "\$1"-std" \{\
.nr reg-Ex \*[section]
.if !((\n[reg-Ex] == 1) : (\n[reg-Ex] == 6) : (\n[reg-Ex] == 8)) \
.tm Usage: .Ex -std in sections 1, 6 and 8 only (#\n[.c])
.br
.shift
.ie (\n[.$] > 1) \{\
.nop \)\*[str-Ex-stds-prefix]
.nr reg-Ex 1
.while (\n[reg-Ex] < \n[.$]) \{\
.ie (\n[.$] > 2) \
.Nm \$\n[reg-Ex] ,
.el \
.Nm \$\n[reg-Ex]
.nr reg-Ex +1
.\}
.nop \)\*[str-Ex-stds-and]
.Nm \$\n[.$]
.nop \)\*[str-Ex-stds-suffix]
.\}
.el \{\
.nop \)\*[str-Ex-std-prefix]
.Nm \$1
.nop \)\*[str-Ex-std-suffix]
.\}\}
..
.de Mt
.Pa \$@
..
.de Lk
.ds str-Lk Sy \$@
.ie (\n[.$] > 1) \{\
.get-arg-type \$2
.ie (\n[arg-type] < 3) \{\
.Em \)\$2:
.ds str-Lk Sy "\$1"
.get-width "\$1"
.shift 2
.if \n[.$] \
.as str-Lk " \$@
.\}
.el \
.get-width "\$1"
.\}
.el \
.get-width "\$1"
.ie n \
.nr reg-Lk 26
.el \
.nr reg-Lk 38
.ie (\n[width] >= \n[reg-Lk]) \
.D1 \*[str-Lk]
.el \
.\*[str-Lk]
..
.de defunct-macro
.tmc mdoc error: .\$0 defunct
.if d \$0-usage \
.tmc , \*[\$0-usage]
.tm1 " (#\n[.c])
..
.als Db defunct-macro
.als Ds defunct-macro
.als Or defunct-macro
.ds Or-usage use `|'
.als Sf defunct-macro
.ds Sf-usage use .Pf or .Ns
.rn em e@
.de em
.tm1 "mdoc error: end-macro (.em) respecification is not allowed. (#\n[.c])
.tm1 " Should this have been `.Em ...'?
.ab
..
.de empty-line
.if !\n[display-depth] \
.tm mdoc warning: Empty input line #\n[.c]
.sp
..
.blm empty-line
.ec
.mso mdoc.local
1.18.1.4/tmac/hyphen.us 0000666 00000066023 15047753021 0010243 0 ustar 00 % The Plain TeX hyphenation tables [NOT TO BE CHANGED IN ANY WAY!]
\patterns{ % just type if you're not using INITEX
.ach4
.ad4der
.af1t
.al3t
.am5at
.an5c
.ang4
.ani5m
.ant4
.an3te
.anti5s
.ar5s
.ar4tie
.ar4ty
.as3c
.as1p
.as1s
.aster5
.atom5
.au1d
.av4i
.awn4
.ba4g
.ba5na
.bas4e
.ber4
.be5ra
.be3sm
.be5sto
.bri2
.but4ti
.cam4pe
.can5c
.capa5b
.car5ol
.ca4t
.ce4la
.ch4
.chill5i
.ci2
.cit5r
.co3e
.co4r
.cor5ner
.de4moi
.de3o
.de3ra
.de3ri
.des4c
.dictio5
.do4t
.du4c
.dumb5
.earth5
.eas3i
.eb4
.eer4
.eg2
.el5d
.el3em
.enam3
.en3g
.en3s
.eq5ui5t
.er4ri
.es3
.eu3
.eye5
.fes3
.for5mer
.ga2
.ge2
.gen3t4
.ge5og
.gi5a
.gi4b
.go4r
.hand5i
.han5k
.he2
.hero5i
.hes3
.het3
.hi3b
.hi3er
.hon5ey
.hon3o
.hov5
.id4l
.idol3
.im3m
.im5pin
.in1
.in3ci
.ine2
.in2k
.in3s
.ir5r
.is4i
.ju3r
.la4cy
.la4m
.lat5er
.lath5
.le2
.leg5e
.len4
.lep5
.lev1
.li4g
.lig5a
.li2n
.li3o
.li4t
.mag5a5
.mal5o
.man5a
.mar5ti
.me2
.mer3c
.me5ter
.mis1
.mist5i
.mon3e
.mo3ro
.mu5ta
.muta5b
.ni4c
.od2
.odd5
.of5te
.or5ato
.or3c
.or1d
.or3t
.os3
.os4tl
.oth3
.out3
.ped5al
.pe5te
.pe5tit
.pi4e
.pio5n
.pi2t
.pre3m
.ra4c
.ran4t
.ratio5na
.ree2
.re5mit
.res2
.re5stat
.ri4g
.rit5u
.ro4q
.ros5t
.row5d
.ru4d
.sci3e
.self5
.sell5
.se2n
.se5rie
.sh2
.si2
.sing4
.st4
.sta5bl
.sy2
.ta4
.te4
.ten5an
.th2
.ti2
.til4
.tim5o5
.ting4
.tin5k
.ton4a
.to4p
.top5i
.tou5s
.trib5ut
.un1a
.un3ce
.under5
.un1e
.un5k
.un5o
.un3u
.up3
.ure3
.us5a
.ven4de
.ve5ra
.wil5i
.ye4
4ab.
a5bal
a5ban
abe2
ab5erd
abi5a
ab5it5ab
ab5lat
ab5o5liz
4abr
ab5rog
ab3ul
a4car
ac5ard
ac5aro
a5ceou
ac1er
a5chet
4a2ci
a3cie
ac1in
a3cio
ac5rob
act5if
ac3ul
ac4um
a2d
ad4din
ad5er.
2adi
a3dia
ad3ica
adi4er
a3dio
a3dit
a5diu
ad4le
ad3ow
ad5ran
ad4su
4adu
a3duc
ad5um
ae4r
aeri4e
a2f
aff4
a4gab
aga4n
ag5ell
age4o
4ageu
ag1i
4ag4l
ag1n
a2go
3agog
ag3oni
a5guer
ag5ul
a4gy
a3ha
a3he
ah4l
a3ho
ai2
a5ia
a3ic.
ai5ly
a4i4n
ain5in
ain5o
ait5en
a1j
ak1en
al5ab
al3ad
a4lar
4aldi
2ale
al3end
a4lenti
a5le5o
al1i
al4ia.
ali4e
al5lev
4allic
4alm
a5log.
a4ly.
4alys
5a5lyst
5alyt
3alyz
4ama
am5ab
am3ag
ama5ra
am5asc
a4matis
a4m5ato
am5era
am3ic
am5if
am5ily
am1in
ami4no
a2mo
a5mon
amor5i
amp5en
a2n
an3age
3analy
a3nar
an3arc
anar4i
a3nati
4and
ande4s
an3dis
an1dl
an4dow
a5nee
a3nen
an5est.
a3neu
2ang
ang5ie
an1gl
a4n1ic
a3nies
an3i3f
an4ime
a5nimi
a5nine
an3io
a3nip
an3ish
an3it
a3niu
an4kli
5anniz
ano4
an5ot
anoth5
an2sa
an4sco
an4sn
an2sp
ans3po
an4st
an4sur
antal4
an4tie
4anto
an2tr
an4tw
an3ua
an3ul
a5nur
4ao
apar4
ap5at
ap5ero
a3pher
4aphi
a4pilla
ap5illar
ap3in
ap3ita
a3pitu
a2pl
apoc5
ap5ola
apor5i
apos3t
aps5es
a3pu
aque5
2a2r
ar3act
a5rade
ar5adis
ar3al
a5ramete
aran4g
ara3p
ar4at
a5ratio
ar5ativ
a5rau
ar5av4
araw4
arbal4
ar4chan
ar5dine
ar4dr
ar5eas
a3ree
ar3ent
a5ress
ar4fi
ar4fl
ar1i
ar5ial
ar3ian
a3riet
ar4im
ar5inat
ar3io
ar2iz
ar2mi
ar5o5d
a5roni
a3roo
ar2p
ar3q
arre4
ar4sa
ar2sh
4as.
as4ab
as3ant
ashi4
a5sia.
a3sib
a3sic
5a5si4t
ask3i
as4l
a4soc
as5ph
as4sh
as3ten
as1tr
asur5a
a2ta
at3abl
at5ac
at3alo
at5ap
ate5c
at5ech
at3ego
at3en.
at3era
ater5n
a5terna
at3est
at5ev
4ath
ath5em
a5then
at4ho
ath5om
4ati.
a5tia
at5i5b
at1ic
at3if
ation5ar
at3itu
a4tog
a2tom
at5omiz
a4top
a4tos
a1tr
at5rop
at4sk
at4tag
at5te
at4th
a2tu
at5ua
at5ue
at3ul
at3ura
a2ty
au4b
augh3
au3gu
au4l2
aun5d
au3r
au5sib
aut5en
au1th
a2va
av3ag
a5van
ave4no
av3era
av5ern
av5ery
av1i
avi4er
av3ig
av5oc
a1vor
3away
aw3i
aw4ly
aws4
ax4ic
ax4id
ay5al
aye4
ays4
azi4er
azz5i
5ba.
bad5ger
ba4ge
bal1a
ban5dag
ban4e
ban3i
barbi5
bari4a
bas4si
1bat
ba4z
2b1b
b2be
b3ber
bbi4na
4b1d
4be.
beak4
beat3
4be2d
be3da
be3de
be3di
be3gi
be5gu
1bel
be1li
be3lo
4be5m
be5nig
be5nu
4bes4
be3sp
be5str
3bet
bet5iz
be5tr
be3tw
be3w
be5yo
2bf
4b3h
bi2b
bi4d
3bie
bi5en
bi4er
2b3if
1bil
bi3liz
bina5r4
bin4d
bi5net
bi3ogr
bi5ou
bi2t
3bi3tio
bi3tr
3bit5ua
b5itz
b1j
bk4
b2l2
blath5
b4le.
blen4
5blesp
b3lis
b4lo
blun4t
4b1m
4b3n
bne5g
3bod
bod3i
bo4e
bol3ic
bom4bi
bon4a
bon5at
3boo
5bor.
4b1ora
bor5d
5bore
5bori
5bos4
b5ota
both5
bo4to
bound3
4bp
4brit
broth3
2b5s2
bsor4
2bt
bt4l
b4to
b3tr
buf4fer
bu4ga
bu3li
bumi4
bu4n
bunt4i
bu3re
bus5ie
buss4e
5bust
4buta
3butio
b5uto
b1v
4b5w
5by.
bys4
1ca
cab3in
ca1bl
cach4
ca5den
4cag4
2c5ah
ca3lat
cal4la
call5in
4calo
can5d
can4e
can4ic
can5is
can3iz
can4ty
cany4
ca5per
car5om
cast5er
cas5tig
4casy
ca4th
4cativ
cav5al
c3c
ccha5
cci4a
ccompa5
ccon4
ccou3t
2ce.
4ced.
4ceden
3cei
5cel.
3cell
1cen
3cenc
2cen4e
4ceni
3cent
3cep
ce5ram
4cesa
3cessi
ces5si5b
ces5t
cet4
c5e4ta
cew4
2ch
4ch.
4ch3ab
5chanic
ch5a5nis
che2
cheap3
4ched
che5lo
3chemi
ch5ene
ch3er.
ch3ers
4ch1in
5chine.
ch5iness
5chini
5chio
3chit
chi2z
3cho2
ch4ti
1ci
3cia
ci2a5b
cia5r
ci5c
4cier
5cific.
4cii
ci4la
3cili
2cim
2cin
c4ina
3cinat
cin3em
c1ing
c5ing.
5cino
cion4
4cipe
ci3ph
4cipic
4cista
4cisti
2c1it
cit3iz
5ciz
ck1
ck3i
1c4l4
4clar
c5laratio
5clare
cle4m
4clic
clim4
cly4
c5n
1co
co5ag
coe2
2cog
co4gr
coi4
co3inc
col5i
5colo
col3or
com5er
con4a
c4one
con3g
con5t
co3pa
cop3ic
co4pl
4corb
coro3n
cos4e
cov1
cove4
cow5a
coz5e
co5zi
c1q
cras5t
5crat.
5cratic
cre3at
5cred
4c3reta
cre4v
cri2
cri5f
c4rin
cris4
5criti
cro4pl
crop5o
cros4e
cru4d
4c3s2
2c1t
cta4b
ct5ang
c5tant
c2te
c3ter
c4ticu
ctim3i
ctu4r
c4tw
cud5
c4uf
c4ui
cu5ity
5culi
cul4tis
3cultu
cu2ma
c3ume
cu4mi
3cun
cu3pi
cu5py
cur5a4b
cu5ria
1cus
cuss4i
3c4ut
cu4tie
4c5utiv
4cutr
1cy
cze4
1d2a
5da.
2d3a4b
dach4
4daf
2dag
da2m2
dan3g
dard5
dark5
4dary
3dat
4dativ
4dato
5dav4
dav5e
5day
d1b
d5c
d1d4
2de.
deaf5
deb5it
de4bon
decan4
de4cil
de5com
2d1ed
4dee.
de5if
deli4e
del5i5q
de5lo
d4em
5dem.
3demic
dem5ic.
de5mil
de4mons
demor5
1den
de4nar
de3no
denti5f
de3nu
de1p
de3pa
depi4
de2pu
d3eq
d4erh
5derm
dern5iz
der5s
des2
d2es.
de1sc
de2s5o
des3ti
de3str
de4su
de1t
de2to
de1v
dev3il
4dey
4d1f
d4ga
d3ge4t
dg1i
d2gy
d1h2
5di.
1d4i3a
dia5b
di4cam
d4ice
3dict
3did
5di3en
d1if
di3ge
di4lato
d1in
1dina
3dine.
5dini
di5niz
1dio
dio5g
di4pl
dir2
di1re
dirt5i
dis1
5disi
d4is3t
d2iti
1di1v
d1j
d5k2
4d5la
3dle.
3dled
3dles.
4dless
2d3lo
4d5lu
2dly
d1m
4d1n4
1do
3do.
do5de
5doe
2d5of
d4og
do4la
doli4
do5lor
dom5iz
do3nat
doni4
doo3d
dop4p
d4or
3dos
4d5out
do4v
3dox
d1p
1dr
drag5on
4drai
dre4
drea5r
5dren
dri4b
dril4
dro4p
4drow
5drupli
4dry
2d1s2
ds4p
d4sw
d4sy
d2th
1du
d1u1a
du2c
d1uca
duc5er
4duct.
4ducts
du5el
du4g
d3ule
dum4be
du4n
4dup
du4pe
d1v
d1w
d2y
5dyn
dy4se
dys5p
e1a4b
e3act
ead1
ead5ie
ea4ge
ea5ger
ea4l
eal5er
eal3ou
eam3er
e5and
ear3a
ear4c
ear5es
ear4ic
ear4il
ear5k
ear2t
eart3e
ea5sp
e3ass
east3
ea2t
eat5en
eath3i
e5atif
e4a3tu
ea2v
eav3en
eav5i
eav5o
2e1b
e4bel.
e4bels
e4ben
e4bit
e3br
e4cad
ecan5c
ecca5
e1ce
ec5essa
ec2i
e4cib
ec5ificat
ec5ifie
ec5ify
ec3im
eci4t
e5cite
e4clam
e4clus
e2col
e4comm
e4compe
e4conc
e2cor
ec3ora
eco5ro
e1cr
e4crem
ec4tan
ec4te
e1cu
e4cul
ec3ula
2e2da
4ed3d
e4d1er
ede4s
4edi
e3dia
ed3ib
ed3ica
ed3im
ed1it
edi5z
4edo
e4dol
edon2
e4dri
e4dul
ed5ulo
ee2c
eed3i
ee2f
eel3i
ee4ly
ee2m
ee4na
ee4p1
ee2s4
eest4
ee4ty
e5ex
e1f
e4f3ere
1eff
e4fic
5efici
efil4
e3fine
ef5i5nite
3efit
efor5es
e4fuse.
4egal
eger4
eg5ib
eg4ic
eg5ing
e5git5
eg5n
e4go.
e4gos
eg1ul
e5gur
5egy
e1h4
eher4
ei2
e5ic
ei5d
eig2
ei5gl
e3imb
e3inf
e1ing
e5inst
eir4d
eit3e
ei3th
e5ity
e1j
e4jud
ej5udi
eki4n
ek4la
e1la
e4la.
e4lac
elan4d
el5ativ
e4law
elaxa4
e3lea
el5ebra
5elec
e4led
el3ega
e5len
e4l1er
e1les
el2f
el2i
e3libe
e4l5ic.
el3ica
e3lier
el5igib
e5lim
e4l3ing
e3lio
e2lis
el5ish
e3liv3
4ella
el4lab
ello4
e5loc
el5og
el3op.
el2sh
el4ta
e5lud
el5ug
e4mac
e4mag
e5man
em5ana
em5b
e1me
e2mel
e4met
em3ica
emi4e
em5igra
em1in2
em5ine
em3i3ni
e4mis
em5ish
e5miss
em3iz
5emniz
emo4g
emoni5o
em3pi
e4mul
em5ula
emu3n
e3my
en5amo
e4nant
ench4er
en3dic
e5nea
e5nee
en3em
en5ero
en5esi
en5est
en3etr
e3new
en5ics
e5nie
e5nil
e3nio
en3ish
en3it
e5niu
5eniz
4enn
4eno
eno4g
e4nos
en3ov
en4sw
ent5age
4enthes
en3ua
en5uf
e3ny.
4en3z
e5of
eo2g
e4oi4
e3ol
eop3ar
e1or
eo3re
eo5rol
eos4
e4ot
eo4to
e5out
e5ow
e2pa
e3pai
ep5anc
e5pel
e3pent
ep5etitio
ephe4
e4pli
e1po
e4prec
ep5reca
e4pred
ep3reh
e3pro
e4prob
ep4sh
ep5ti5b
e4put
ep5uta
e1q
equi3l
e4q3ui3s
er1a
era4b
4erand
er3ar
4erati.
2erb
er4bl
er3ch
er4che
2ere.
e3real
ere5co
ere3in
er5el.
er3emo
er5ena
er5ence
4erene
er3ent
ere4q
er5ess
er3est
eret4
er1h
er1i
e1ria4
5erick
e3rien
eri4er
er3ine
e1rio
4erit
er4iu
eri4v
e4riva
er3m4
er4nis
4ernit
5erniz
er3no
2ero
er5ob
e5roc
ero4r
er1ou
er1s
er3set
ert3er
4ertl
er3tw
4eru
eru4t
5erwau
e1s4a
e4sage.
e4sages
es2c
e2sca
es5can
e3scr
es5cu
e1s2e
e2sec
es5ecr
es5enc
e4sert.
e4serts
e4serva
4esh
e3sha
esh5en
e1si
e2sic
e2sid
es5iden
es5igna
e2s5im
es4i4n
esis4te
esi4u
e5skin
es4mi
e2sol
es3olu
e2son
es5ona
e1sp
es3per
es5pira
es4pre
2ess
es4si4b
estan4
es3tig
es5tim
4es2to
e3ston
2estr
e5stro
estruc5
e2sur
es5urr
es4w
eta4b
eten4d
e3teo
ethod3
et1ic
e5tide
etin4
eti4no
e5tir
e5titio
et5itiv
4etn
et5ona
e3tra
e3tre
et3ric
et5rif
et3rog
et5ros
et3ua
et5ym
et5z
4eu
e5un
e3up
eu3ro
eus4
eute4
euti5l
eu5tr
eva2p5
e2vas
ev5ast
e5vea
ev3ell
evel3o
e5veng
even4i
ev1er
e5verb
e1vi
ev3id
evi4l
e4vin
evi4v
e5voc
e5vu
e1wa
e4wag
e5wee
e3wh
ewil5
ew3ing
e3wit
1exp
5eyc
5eye.
eys4
1fa
fa3bl
fab3r
fa4ce
4fag
fain4
fall5e
4fa4ma
fam5is
5far
far5th
fa3ta
fa3the
4fato
fault5
4f5b
4fd
4fe.
feas4
feath3
fe4b
4feca
5fect
2fed
fe3li
fe4mo
fen2d
fend5e
fer1
5ferr
fev4
4f1f
f4fes
f4fie
f5fin.
f2f5is
f4fly
f2fy
4fh
1fi
fi3a
2f3ic.
4f3ical
f3ican
4ficate
f3icen
fi3cer
fic4i
5ficia
5ficie
4fics
fi3cu
fi5del
fight5
fil5i
fill5in
4fily
2fin
5fina
fin2d5
fi2ne
f1in3g
fin4n
fis4ti
f4l2
f5less
flin4
flo3re
f2ly5
4fm
4fn
1fo
5fon
fon4de
fon4t
fo2r
fo5rat
for5ay
fore5t
for4i
fort5a
fos5
4f5p
fra4t
f5rea
fres5c
fri2
fril4
frol5
2f3s
2ft
f4to
f2ty
3fu
fu5el
4fug
fu4min
fu5ne
fu3ri
fusi4
fus4s
4futa
1fy
1ga
gaf4
5gal.
3gali
ga3lo
2gam
ga5met
g5amo
gan5is
ga3niz
gani5za
4gano
gar5n4
gass4
gath3
4gativ
4gaz
g3b
gd4
2ge.
2ged
geez4
gel4in
ge5lis
ge5liz
4gely
1gen
ge4nat
ge5niz
4geno
4geny
1geo
ge3om
g4ery
5gesi
geth5
4geto
ge4ty
ge4v
4g1g2
g2ge
g3ger
gglu5
ggo4
gh3in
gh5out
gh4to
5gi.
1gi4a
gia5r
g1ic
5gicia
g4ico
gien5
5gies.
gil4
g3imen
3g4in.
gin5ge
5g4ins
5gio
3gir
gir4l
g3isl
gi4u
5giv
3giz
gl2
gla4
glad5i
5glas
1gle
gli4b
g3lig
3glo
glo3r
g1m
g4my
gn4a
g4na.
gnet4t
g1ni
g2nin
g4nio
g1no
g4non
1go
3go.
gob5
5goe
3g4o4g
go3is
gon2
4g3o3na
gondo5
go3ni
5goo
go5riz
gor5ou
5gos.
gov1
g3p
1gr
4grada
g4rai
gran2
5graph.
g5rapher
5graphic
4graphy
4gray
gre4n
4gress.
4grit
g4ro
gruf4
gs2
g5ste
gth3
gu4a
3guard
2gue
5gui5t
3gun
3gus
4gu4t
g3w
1gy
2g5y3n
gy5ra
h3ab4l
hach4
hae4m
hae4t
h5agu
ha3la
hala3m
ha4m
han4ci
han4cy
5hand.
han4g
hang5er
hang5o
h5a5niz
han4k
han4te
hap3l
hap5t
ha3ran
ha5ras
har2d
hard3e
har4le
harp5en
har5ter
has5s
haun4
5haz
haz3a
h1b
1head
3hear
he4can
h5ecat
h4ed
he5do5
he3l4i
hel4lis
hel4ly
h5elo
hem4p
he2n
hena4
hen5at
heo5r
hep5
h4era
hera3p
her4ba
here5a
h3ern
h5erou
h3ery
h1es
he2s5p
he4t
het4ed
heu4
h1f
h1h
hi5an
hi4co
high5
h4il2
himer4
h4ina
hion4e
hi4p
hir4l
hi3ro
hir4p
hir4r
his3el
his4s
hith5er
hi2v
4hk
4h1l4
hlan4
h2lo
hlo3ri
4h1m
hmet4
2h1n
h5odiz
h5ods
ho4g
hoge4
hol5ar
3hol4e
ho4ma
home3
hon4a
ho5ny
3hood
hoon4
hor5at
ho5ris
hort3e
ho5ru
hos4e
ho5sen
hos1p
1hous
house3
hov5el
4h5p
4hr4
hree5
hro5niz
hro3po
4h1s2
h4sh
h4tar
ht1en
ht5es
h4ty
hu4g
hu4min
hun5ke
hun4t
hus3t4
hu4t
h1w
h4wart
hy3pe
hy3ph
hy2s
2i1a
i2al
iam4
iam5ete
i2an
4ianc
ian3i
4ian4t
ia5pe
iass4
i4ativ
ia4tric
i4atu
ibe4
ib3era
ib5ert
ib5ia
ib3in
ib5it.
ib5ite
i1bl
ib3li
i5bo
i1br
i2b5ri
i5bun
4icam
5icap
4icar
i4car.
i4cara
icas5
i4cay
iccu4
4iceo
4ich
2ici
i5cid
ic5ina
i2cip
ic3ipa
i4cly
i2c5oc
4i1cr
5icra
i4cry
ic4te
ictu2
ic4t3ua
ic3ula
ic4um
ic5uo
i3cur
2id
i4dai
id5anc
id5d
ide3al
ide4s
i2di
id5ian
idi4ar
i5die
id3io
idi5ou
id1it
id5iu
i3dle
i4dom
id3ow
i4dr
i2du
id5uo
2ie4
ied4e
5ie5ga
ield3
ien5a4
ien4e
i5enn
i3enti
i1er.
i3esc
i1est
i3et
4if.
if5ero
iff5en
if4fr
4ific.
i3fie
i3fl
4ift
2ig
iga5b
ig3era
ight3i
4igi
i3gib
ig3il
ig3in
ig3it
i4g4l
i2go
ig3or
ig5ot
i5gre
igu5i
ig1ur
i3h
4i5i4
i3j
4ik
i1la
il3a4b
i4lade
i2l5am
ila5ra
i3leg
il1er
ilev4
il5f
il1i
il3ia
il2ib
il3io
il4ist
2ilit
il2iz
ill5ab
4iln
il3oq
il4ty
il5ur
il3v
i4mag
im3age
ima5ry
imenta5r
4imet
im1i
im5ida
imi5le
i5mini
4imit
im4ni
i3mon
i2mu
im3ula
2in.
i4n3au
4inav
incel4
in3cer
4ind
in5dling
2ine
i3nee
iner4ar
i5ness
4inga
4inge
in5gen
4ingi
in5gling
4ingo
4ingu
2ini
i5ni.
i4nia
in3io
in1is
i5nite.
5initio
in3ity
4ink
4inl
2inn
2i1no
i4no4c
ino4s
i4not
2ins
in3se
insur5a
2int.
2in4th
in1u
i5nus
4iny
2io
4io.
ioge4
io2gr
i1ol
io4m
ion3at
ion4ery
ion3i
io5ph
ior3i
i4os
io5th
i5oti
io4to
i4our
2ip
ipe4
iphras4
ip3i
ip4ic
ip4re4
ip3ul
i3qua
iq5uef
iq3uid
iq3ui3t
4ir
i1ra
ira4b
i4rac
ird5e
ire4de
i4ref
i4rel4
i4res
ir5gi
ir1i
iri5de
ir4is
iri3tu
5i5r2iz
ir4min
iro4g
5iron.
ir5ul
2is.
is5ag
is3ar
isas5
2is1c
is3ch
4ise
is3er
3isf
is5han
is3hon
ish5op
is3ib
isi4d
i5sis
is5itiv
4is4k
islan4
4isms
i2so
iso5mer
is1p
is2pi
is4py
4is1s
is4sal
issen4
is4ses
is4ta.
is1te
is1ti
ist4ly
4istral
i2su
is5us
4ita.
ita4bi
i4tag
4ita5m
i3tan
i3tat
2ite
it3era
i5teri
it4es
2ith
i1ti
4itia
4i2tic
it3ica
5i5tick
it3ig
it5ill
i2tim
2itio
4itis
i4tism
i2t5o5m
4iton
i4tram
it5ry
4itt
it3uat
i5tud
it3ul
4itz.
i1u
2iv
iv3ell
iv3en.
i4v3er.
i4vers.
iv5il.
iv5io
iv1it
i5vore
iv3o3ro
i4v3ot
4i5w
ix4o
4iy
4izar
izi4
5izont
5ja
jac4q
ja4p
1je
jer5s
4jestie
4jesty
jew3
jo4p
5judg
3ka.
k3ab
k5ag
kais4
kal4
k1b
k2ed
1kee
ke4g
ke5li
k3en4d
k1er
kes4
k3est.
ke4ty
k3f
kh4
k1i
5ki.
5k2ic
k4ill
kilo5
k4im
k4in.
kin4de
k5iness
kin4g
ki4p
kis4
k5ish
kk4
k1l
4kley
4kly
k1m
k5nes
1k2no
ko5r
kosh4
k3ou
kro5n
4k1s2
k4sc
ks4l
k4sy
k5t
k1w
lab3ic
l4abo
laci4
l4ade
la3dy
lag4n
lam3o
3land
lan4dl
lan5et
lan4te
lar4g
lar3i
las4e
la5tan
4lateli
4lativ
4lav
la4v4a
2l1b
lbin4
4l1c2
lce4
l3ci
2ld
l2de
ld4ere
ld4eri
ldi4
ld5is
l3dr
l4dri
le2a
le4bi
left5
5leg.
5legg
le4mat
lem5atic
4len.
3lenc
5lene.
1lent
le3ph
le4pr
lera5b
ler4e
3lerg
3l4eri
l4ero
les2
le5sco
5lesq
3less
5less.
l3eva
lev4er.
lev4era
lev4ers
3ley
4leye
2lf
l5fr
4l1g4
l5ga
lgar3
l4ges
lgo3
2l3h
li4ag
li2am
liar5iz
li4as
li4ato
li5bi
5licio
li4cor
4lics
4lict.
l4icu
l3icy
l3ida
lid5er
3lidi
lif3er
l4iff
li4fl
5ligate
3ligh
li4gra
3lik
4l4i4l
lim4bl
lim3i
li4mo
l4im4p
l4ina
1l4ine
lin3ea
lin3i
link5er
li5og
4l4iq
lis4p
l1it
l2it.
5litica
l5i5tics
liv3er
l1iz
4lj
lka3
l3kal
lka4t
l1l
l4law
l2le
l5lea
l3lec
l3leg
l3lel
l3le4n
l3le4t
ll2i
l2lin4
l5lina
ll4o
lloqui5
ll5out
l5low
2lm
l5met
lm3ing
l4mod
lmon4
2l1n2
3lo.
lob5al
lo4ci
4lof
3logic
l5ogo
3logu
lom3er
5long
lon4i
l3o3niz
lood5
5lope.
lop3i
l3opm
lora4
lo4rato
lo5rie
lor5ou
5los.
los5et
5losophiz
5losophy
los4t
lo4ta
loun5d
2lout
4lov
2lp
lpa5b
l3pha
l5phi
lp5ing
l3pit
l4pl
l5pr
4l1r
2l1s2
l4sc
l2se
l4sie
4lt
lt5ag
ltane5
l1te
lten4
ltera4
lth3i
l5ties.
ltis4
l1tr
ltu2
ltur3a
lu5a
lu3br
luch4
lu3ci
lu3en
luf4
lu5id
lu4ma
5lumi
l5umn.
5lumnia
lu3o
luo3r
4lup
luss4
lus3te
1lut
l5ven
l5vet4
2l1w
1ly
4lya
4lyb
ly5me
ly3no
2lys4
l5yse
1ma
2mab
ma2ca
ma5chine
ma4cl
mag5in
5magn
2mah
maid5
4mald
ma3lig
ma5lin
mal4li
mal4ty
5mania
man5is
man3iz
4map
ma5rine.
ma5riz
mar4ly
mar3v
ma5sce
mas4e
mas1t
5mate
math3
ma3tis
4matiza
4m1b
mba4t5
m5bil
m4b3ing
mbi4v
4m5c
4me.
2med
4med.
5media
me3die
m5e5dy
me2g
mel5on
mel4t
me2m
mem1o3
1men
men4a
men5ac
men4de
4mene
men4i
mens4
mensu5
3ment
men4te
me5on
m5ersa
2mes
3mesti
me4ta
met3al
me1te
me5thi
m4etr
5metric
me5trie
me3try
me4v
4m1f
2mh
5mi.
mi3a
mid4a
mid4g
mig4
3milia
m5i5lie
m4ill
min4a
3mind
m5inee
m4ingl
min5gli
m5ingly
min4t
m4inu
miot4
m2is
mis4er.
mis5l
mis4ti
m5istry
4mith
m2iz
4mk
4m1l
m1m
mma5ry
4m1n
mn4a
m4nin
mn4o
1mo
4mocr
5mocratiz
mo2d1
mo4go
mois2
moi5se
4mok
mo5lest
mo3me
mon5et
mon5ge
moni3a
mon4ism
mon4ist
mo3niz
monol4
mo3ny.
mo2r
4mora.
mos2
mo5sey
mo3sp
moth3
m5ouf
3mous
mo2v
4m1p
mpara5
mpa5rab
mpar5i
m3pet
mphas4
m2pi
mpi4a
mp5ies
m4p1in
m5pir
mp5is
mpo3ri
mpos5ite
m4pous
mpov5
mp4tr
m2py
4m3r
4m1s2
m4sh
m5si
4mt
1mu
mula5r4
5mult
multi3
3mum
mun2
4mup
mu4u
4mw
1na
2n1a2b
n4abu
4nac.
na4ca
n5act
nag5er.
nak4
na4li
na5lia
4nalt
na5mit
n2an
nanci4
nan4it
nank4
nar3c
4nare
nar3i
nar4l
n5arm
n4as
nas4c
nas5ti
n2at
na3tal
nato5miz
n2au
nau3se
3naut
nav4e
4n1b4
ncar5
n4ces.
n3cha
n5cheo
n5chil
n3chis
nc1in
nc4it
ncour5a
n1cr
n1cu
n4dai
n5dan
n1de
nd5est.
ndi4b
n5d2if
n1dit
n3diz
n5duc
ndu4r
nd2we
2ne.
n3ear
ne2b
neb3u
ne2c
5neck
2ned
ne4gat
neg5ativ
5nege
ne4la
nel5iz
ne5mi
ne4mo
1nen
4nene
3neo
ne4po
ne2q
n1er
nera5b
n4erar
n2ere
n4er5i
ner4r
1nes
2nes.
4nesp
2nest
4nesw
3netic
ne4v
n5eve
ne4w
n3f
n4gab
n3gel
nge4n4e
n5gere
n3geri
ng5ha
n3gib
ng1in
n5git
n4gla
ngov4
ng5sh
n1gu
n4gum
n2gy
4n1h4
nha4
nhab3
nhe4
3n4ia
ni3an
ni4ap
ni3ba
ni4bl
ni4d
ni5di
ni4er
ni2fi
ni5ficat
n5igr
nik4
n1im
ni3miz
n1in
5nine.
nin4g
ni4o
5nis.
nis4ta
n2it
n4ith
3nitio
n3itor
ni3tr
n1j
4nk2
n5kero
n3ket
nk3in
n1kl
4n1l
n5m
nme4
nmet4
4n1n2
nne4
nni3al
nni4v
nob4l
no3ble
n5ocl
4n3o2d
3noe
4nog
noge4
nois5i
no5l4i
5nologis
3nomic
n5o5miz
no4mo
no3my
no4n
non4ag
non5i
n5oniz
4nop
5nop5o5li
nor5ab
no4rary
4nosc
nos4e
nos5t
no5ta
1nou
3noun
nov3el3
nowl3
n1p4
npi4
npre4c
n1q
n1r
nru4
2n1s2
ns5ab
nsati4
ns4c
n2se
n4s3es
nsid1
nsig4
n2sl
ns3m
n4soc
ns4pe
n5spi
nsta5bl
n1t
nta4b
nter3s
nt2i
n5tib
nti4er
nti2f
n3tine
n4t3ing
nti4p
ntrol5li
nt4s
ntu3me
nu1a
nu4d
nu5en
nuf4fe
n3uin
3nu3it
n4um
nu1me
n5umi
3nu4n
n3uo
nu3tr
n1v2
n1w4
nym4
nyp4
4nz
n3za
4oa
oad3
o5a5les
oard3
oas4e
oast5e
oat5i
ob3a3b
o5bar
obe4l
o1bi
o2bin
ob5ing
o3br
ob3ul
o1ce
och4
o3chet
ocif3
o4cil
o4clam
o4cod
oc3rac
oc5ratiz
ocre3
5ocrit
octor5a
oc3ula
o5cure
od5ded
od3ic
odi3o
o2do4
odor3
od5uct.
od5ucts
o4el
o5eng
o3er
oe4ta
o3ev
o2fi
of5ite
ofit4t
o2g5a5r
og5ativ
o4gato
o1ge
o5gene
o5geo
o4ger
o3gie
1o1gis
og3it
o4gl
o5g2ly
3ogniz
o4gro
ogu5i
1ogy
2ogyn
o1h2
ohab5
oi2
oic3es
oi3der
oiff4
oig4
oi5let
o3ing
oint5er
o5ism
oi5son
oist5en
oi3ter
o5j
2ok
o3ken
ok5ie
o1la
o4lan
olass4
ol2d
old1e
ol3er
o3lesc
o3let
ol4fi
ol2i
o3lia
o3lice
ol5id.
o3li4f
o5lil
ol3ing
o5lio
o5lis.
ol3ish
o5lite
o5litio
o5liv
olli4e
ol5ogiz
olo4r
ol5pl
ol2t
ol3ub
ol3ume
ol3un
o5lus
ol2v
o2ly
om5ah
oma5l
om5atiz
om2be
om4bl
o2me
om3ena
om5erse
o4met
om5etry
o3mia
om3ic.
om3ica
o5mid
om1in
o5mini
5ommend
omo4ge
o4mon
om3pi
ompro5
o2n
on1a
on4ac
o3nan
on1c
3oncil
2ond
on5do
o3nen
on5est
on4gu
on1ic
o3nio
on1is
o5niu
on3key
on4odi
on3omy
on3s
onspi4
onspir5a
onsu4
onten4
on3t4i
ontif5
on5um
onva5
oo2
ood5e
ood5i
oo4k
oop3i
o3ord
oost5
o2pa
ope5d
op1er
3opera
4operag
2oph
o5phan
o5pher
op3ing
o3pit
o5pon
o4posi
o1pr
op1u
opy5
o1q
o1ra
o5ra.
o4r3ag
or5aliz
or5ange
ore5a
o5real
or3ei
ore5sh
or5est.
orew4
or4gu
4o5ria
or3ica
o5ril
or1in
o1rio
or3ity
o3riu
or2mi
orn2e
o5rof
or3oug
or5pe
3orrh
or4se
ors5en
orst4
or3thi
or3thy
or4ty
o5rum
o1ry
os3al
os2c
os4ce
o3scop
4oscopi
o5scr
os4i4e
os5itiv
os3ito
os3ity
osi4u
os4l
o2so
os4pa
os4po
os2ta
o5stati
os5til
os5tit
o4tan
otele4g
ot3er.
ot5ers
o4tes
4oth
oth5esi
oth3i4
ot3ic.
ot5ica
o3tice
o3tif
o3tis
oto5s
ou2
ou3bl
ouch5i
ou5et
ou4l
ounc5er
oun2d
ou5v
ov4en
over4ne
over3s
ov4ert
o3vis
oviti4
o5v4ol
ow3der
ow3el
ow5est
ow1i
own5i
o4wo
oy1a
1pa
pa4ca
pa4ce
pac4t
p4ad
5pagan
p3agat
p4ai
pain4
p4al
pan4a
pan3el
pan4ty
pa3ny
pa1p
pa4pu
para5bl
par5age
par5di
3pare
par5el
p4a4ri
par4is
pa2te
pa5ter
5pathic
pa5thy
pa4tric
pav4
3pay
4p1b
pd4
4pe.
3pe4a
pear4l
pe2c
2p2ed
3pede
3pedi
pedia4
ped4ic
p4ee
pee4d
pek4
pe4la
peli4e
pe4nan
p4enc
pen4th
pe5on
p4era.
pera5bl
p4erag
p4eri
peri5st
per4mal
perme5
p4ern
per3o
per3ti
pe5ru
per1v
pe2t
pe5ten
pe5tiz
4pf
4pg
4ph.
phar5i
phe3no
ph4er
ph4es.
ph1ic
5phie
ph5ing
5phisti
3phiz
ph2l
3phob
3phone
5phoni
pho4r
4phs
ph3t
5phu
1phy
pi3a
pian4
pi4cie
pi4cy
p4id
p5ida
pi3de
5pidi
3piec
pi3en
pi4grap
pi3lo
pi2n
p4in.
pind4
p4ino
3pi1o
pion4
p3ith
pi5tha
pi2tu
2p3k2
1p2l2
3plan
plas5t
pli3a
pli5er
4plig
pli4n
ploi4
plu4m
plum4b
4p1m
2p3n
po4c
5pod.
po5em
po3et5
5po4g
poin2
5point
poly5t
po4ni
po4p
1p4or
po4ry
1pos
pos1s
p4ot
po4ta
5poun
4p1p
ppa5ra
p2pe
p4ped
p5pel
p3pen
p3per
p3pet
ppo5site
pr2
pray4e
5preci
pre5co
pre3em
pref5ac
pre4la
pre3r
p3rese
3press
pre5ten
pre3v
5pri4e
prin4t3
pri4s
pris3o
p3roca
prof5it
pro3l
pros3e
pro1t
2p1s2
p2se
ps4h
p4sib
2p1t
pt5a4b
p2te
p2th
pti3m
ptu4r
p4tw
pub3
pue4
puf4
pul3c
pu4m
pu2n
pur4r
5pus
pu2t
5pute
put3er
pu3tr
put4ted
put4tin
p3w
qu2
qua5v
2que.
3quer
3quet
2rab
ra3bi
rach4e
r5acl
raf5fi
raf4t
r2ai
ra4lo
ram3et
r2ami
rane5o
ran4ge
r4ani
ra5no
rap3er
3raphy
rar5c
rare4
rar5ef
4raril
r2as
ration4
rau4t
ra5vai
rav3el
ra5zie
r1b
r4bab
r4bag
rbi2
rbi4f
r2bin
r5bine
rb5ing.
rb4o
r1c
r2ce
rcen4
r3cha
rch4er
r4ci4b
rc4it
rcum3
r4dal
rd2i
rdi4a
rdi4er
rdin4
rd3ing
2re.
re1al
re3an
re5arr
5reav
re4aw
r5ebrat
rec5oll
rec5ompe
re4cre
2r2ed
re1de
re3dis
red5it
re4fac
re2fe
re5fer.
re3fi
re4fy
reg3is
re5it
re1li
re5lu
r4en4ta
ren4te
re1o
re5pin
re4posi
re1pu
r1er4
r4eri
rero4
re5ru
r4es.
re4spi
ress5ib
res2t
re5stal
re3str
re4ter
re4ti4z
re3tri
reu2
re5uti
rev2
re4val
rev3el
r5ev5er.
re5vers
re5vert
re5vil
rev5olu
re4wh
r1f
rfu4
r4fy
rg2
rg3er
r3get
r3gic
rgi4n
rg3ing
r5gis
r5git
r1gl
rgo4n
r3gu
rh4
4rh.
4rhal
ri3a
ria4b
ri4ag
r4ib
rib3a
ric5as
r4ice
4rici
5ricid
ri4cie
r4ico
rid5er
ri3enc
ri3ent
ri1er
ri5et
rig5an
5rigi
ril3iz
5riman
rim5i
3rimo
rim4pe
r2ina
5rina.
rin4d
rin4e
rin4g
ri1o
5riph
riph5e
ri2pl
rip5lic
r4iq
r2is
r4is.
ris4c
r3ish
ris4p
ri3ta3b
r5ited.
rit5er.
rit5ers
rit3ic
ri2tu
rit5ur
riv5el
riv3et
riv3i
r3j
r3ket
rk4le
rk4lin
r1l
rle4
r2led
r4lig
r4lis
rl5ish
r3lo4
r1m
rma5c
r2me
r3men
rm5ers
rm3ing
r4ming.
r4mio
r3mit
r4my
r4nar
r3nel
r4ner
r5net
r3ney
r5nic
r1nis4
r3nit
r3niv
rno4
r4nou
r3nu
rob3l
r2oc
ro3cr
ro4e
ro1fe
ro5fil
rok2
ro5ker
5role.
rom5ete
rom4i
rom4p
ron4al
ron4e
ro5n4is
ron4ta
1room
5root
ro3pel
rop3ic
ror3i
ro5ro
ros5per
ros4s
ro4the
ro4ty
ro4va
rov5el
rox5
r1p
r4pea
r5pent
rp5er.
r3pet
rp4h4
rp3ing
r3po
r1r4
rre4c
rre4f
r4reo
rre4st
rri4o
rri4v
rron4
rros4
rrys4
4rs2
r1sa
rsa5ti
rs4c
r2se
r3sec
rse4cr
rs5er.
rs3es
rse5v2
r1sh
r5sha
r1si
r4si4b
rson3
r1sp
r5sw
rtach4
r4tag
r3teb
rten4d
rte5o
r1ti
rt5ib
rti4d
r4tier
r3tig
rtil3i
rtil4l
r4tily
r4tist
r4tiv
r3tri
rtroph4
rt4sh
ru3a
ru3e4l
ru3en
ru4gl
ru3in
rum3pl
ru2n
runk5
run4ty
r5usc
ruti5n
rv4e
rvel4i
r3ven
rv5er.
r5vest
r3vey
r3vic
rvi4v
r3vo
r1w
ry4c
5rynge
ry3t
sa2
2s1ab
5sack
sac3ri
s3act
5sai
salar4
sal4m
sa5lo
sal4t
3sanc
san4de
s1ap
sa5ta
5sa3tio
sat3u
sau4
sa5vor
5saw
4s5b
scan4t5
sca4p
scav5
s4ced
4scei
s4ces
sch2
s4cho
3s4cie
5scin4d
scle5
s4cli
scof4
4scopy
scour5a
s1cu
4s5d
4se.
se4a
seas4
sea5w
se2c3o
3sect
4s4ed
se4d4e
s5edl
se2g
seg3r
5sei
se1le
5self
5selv
4seme
se4mol
sen5at
4senc
sen4d
s5ened
sen5g
s5enin
4sentd
4sentl
sep3a3
4s1er.
s4erl
ser4o
4servo
s1e4s
se5sh
ses5t
5se5um
5sev
sev3en
sew4i
5sex
4s3f
2s3g
s2h
2sh.
sh1er
5shev
sh1in
sh3io
3ship
shiv5
sho4
sh5old
shon3
shor4
short5
4shw
si1b
s5icc
3side.
5sides
5sidi
si5diz
4signa
sil4e
4sily
2s1in
s2ina
5sine.
s3ing
1sio
5sion
sion5a
si2r
sir5a
1sis
3sitio
5siu
1siv
5siz
sk2
4ske
s3ket
sk5ine
sk5ing
s1l2
s3lat
s2le
slith5
2s1m
s3ma
small3
sman3
smel4
s5men
5smith
smol5d4
s1n4
1so
so4ce
soft3
so4lab
sol3d2
so3lic
5solv
3som
3s4on.
sona4
son4g
s4op
5sophic
s5ophiz
s5ophy
sor5c
sor5d
4sov
so5vi
2spa
5spai
spa4n
spen4d
2s5peo
2sper
s2phe
3spher
spho5
spil4
sp5ing
4spio
s4ply
s4pon
spor4
4spot
squal4l
s1r
2ss
s1sa
ssas3
s2s5c
s3sel
s5seng
s4ses.
s5set
s1si
s4sie
ssi4er
ss5ily
s4sl
ss4li
s4sn
sspend4
ss2t
ssur5a
ss5w
2st.
s2tag
s2tal
stam4i
5stand
s4ta4p
5stat.
s4ted
stern5i
s5tero
ste2w
stew5a
s3the
st2i
s4ti.
s5tia
s1tic
5stick
s4tie
s3tif
st3ing
5stir
s1tle
5stock
stom3a
5stone
s4top
3store
st4r
s4trad
5stratu
s4tray
s4trid
4stry
4st3w
s2ty
1su
su1al
su4b3
su2g3
su5is
suit3
s4ul
su2m
sum3i
su2n
su2r
4sv
sw2
4swo
s4y
4syc
3syl
syn5o
sy5rin
1ta
3ta.
2tab
ta5bles
5taboliz
4taci
ta5do
4taf4
tai5lo
ta2l
ta5la
tal5en
tal3i
4talk
tal4lis
ta5log
ta5mo
tan4de
tanta3
ta5per
ta5pl
tar4a
4tarc
4tare
ta3riz
tas4e
ta5sy
4tatic
ta4tur
taun4
tav4
2taw
tax4is
2t1b
4tc
t4ch
tch5et
4t1d
4te.
tead4i
4teat
tece4
5tect
2t1ed
te5di
1tee
teg4
te5ger
te5gi
3tel.
teli4
5tels
te2ma2
tem3at
3tenan
3tenc
3tend
4tenes
1tent
ten4tag
1teo
te4p
te5pe
ter3c
5ter3d
1teri
ter5ies
ter3is
teri5za
5ternit
ter5v
4tes.
4tess
t3ess.
teth5e
3teu
3tex
4tey
2t1f
4t1g
2th.
than4
th2e
4thea
th3eas
the5at
the3is
3thet
th5ic.
th5ica
4thil
5think
4thl
th5ode
5thodic
4thoo
thor5it
tho5riz
2ths
1tia
ti4ab
ti4ato
2ti2b
4tick
t4ico
t4ic1u
5tidi
3tien
tif2
ti5fy
2tig
5tigu
till5in
1tim
4timp
tim5ul
2t1in
t2ina
3tine.
3tini
1tio
ti5oc
tion5ee
5tiq
ti3sa
3tise
tis4m
ti5so
tis4p
5tistica
ti3tl
ti4u
1tiv
tiv4a
1tiz
ti3za
ti3zen
2tl
t5la
tlan4
3tle.
3tled
3tles.
t5let.
t5lo
4t1m
tme4
2t1n2
1to
to3b
to5crat
4todo
2tof
to2gr
to5ic
to2ma
tom4b
to3my
ton4ali
to3nat
4tono
4tony
to2ra
to3rie
tor5iz
tos2
5tour
4tout
to3war
4t1p
1tra
tra3b
tra5ch
traci4
trac4it
trac4te
tras4
tra5ven
trav5es5
tre5f
tre4m
trem5i
5tria
tri5ces
5tricia
4trics
2trim
tri4v
tro5mi
tron5i
4trony
tro5phe
tro3sp
tro3v
tru5i
trus4
4t1s2
t4sc
tsh4
t4sw
4t3t2
t4tes
t5to
ttu4
1tu
tu1a
tu3ar
tu4bi
tud2
4tue
4tuf4
5tu3i
3tum
tu4nis
2t3up.
3ture
5turi
tur3is
tur5o
tu5ry
3tus
4tv
tw4
4t1wa
twis4
4two
1ty
4tya
2tyl
type3
ty5ph
4tz
tz4e
4uab
uac4
ua5na
uan4i
uar5ant
uar2d
uar3i
uar3t
u1at
uav4
ub4e
u4bel
u3ber
u4bero
u1b4i
u4b5ing
u3ble.
u3ca
uci4b
uc4it
ucle3
u3cr
u3cu
u4cy
ud5d
ud3er
ud5est
udev4
u1dic
ud3ied
ud3ies
ud5is
u5dit
u4don
ud4si
u4du
u4ene
uens4
uen4te
uer4il
3ufa
u3fl
ugh3en
ug5in
2ui2
uil5iz
ui4n
u1ing
uir4m
uita4
uiv3
uiv4er.
u5j
4uk
u1la
ula5b
u5lati
ulch4
5ulche
ul3der
ul4e
u1len
ul4gi
ul2i
u5lia
ul3ing
ul5ish
ul4lar
ul4li4b
ul4lis
4ul3m
u1l4o
4uls
uls5es
ul1ti
ultra3
4ultu
u3lu
ul5ul
ul5v
um5ab
um4bi
um4bly
u1mi
u4m3ing
umor5o
um2p
unat4
u2ne
un4er
u1ni
un4im
u2nin
un5ish
uni3v
un3s4
un4sw
unt3ab
un4ter.
un4tes
unu4
un5y
un5z
u4ors
u5os
u1ou
u1pe
uper5s
u5pia
up3ing
u3pl
up3p
upport5
upt5ib
uptu4
u1ra
4ura.
u4rag
u4ras
ur4be
urc4
ur1d
ure5at
ur4fer
ur4fr
u3rif
uri4fic
ur1in
u3rio
u1rit
ur3iz
ur2l
url5ing.
ur4no
uros4
ur4pe
ur4pi
urs5er
ur5tes
ur3the
urti4
ur4tie
u3ru
2us
u5sad
u5san
us4ap
usc2
us3ci
use5a
u5sia
u3sic
us4lin
us1p
us5sl
us5tere
us1tr
u2su
usur4
uta4b
u3tat
4ute.
4utel
4uten
uten4i
4u1t2i
uti5liz
u3tine
ut3ing
ution5a
u4tis
5u5tiz
u4t1l
ut5of
uto5g
uto5matic
u5ton
u4tou
uts4
u3u
uu4m
u1v2
uxu3
uz4e
1va
5va.
2v1a4b
vac5il
vac3u
vag4
va4ge
va5lie
val5o
val1u
va5mo
va5niz
va5pi
var5ied
3vat
4ve.
4ved
veg3
v3el.
vel3li
ve4lo
v4ely
ven3om
v5enue
v4erd
5vere.
v4erel
v3eren
ver5enc
v4eres
ver3ie
vermi4n
3verse
ver3th
v4e2s
4ves.
ves4te
ve4te
vet3er
ve4ty
vi5ali
5vian
5vide.
5vided
4v3iden
5vides
5vidi
v3if
vi5gn
vik4
2vil
5vilit
v3i3liz
v1in
4vi4na
v2inc
vin5d
4ving
vio3l
v3io4r
vi1ou
vi4p
vi5ro
vis3it
vi3so
vi3su
4viti
vit3r
4vity
3viv
5vo.
voi4
3vok
vo4la
v5ole
5volt
3volv
vom5i
vor5ab
vori4
vo4ry
vo4ta
4votee
4vv4
v4y
w5abl
2wac
wa5ger
wag5o
wait5
w5al.
wam4
war4t
was4t
wa1te
wa5ver
w1b
wea5rie
weath3
wed4n
weet3
wee5v
wel4l
w1er
west3
w3ev
whi4
wi2
wil2
will5in
win4de
win4g
wir4
3wise
with3
wiz5
w4k
wl4es
wl3in
w4no
1wo2
wom1
wo5ven
w5p
wra4
wri4
writa4
w3sh
ws4l
ws4pe
w5s4t
4wt
wy4
x1a
xac5e
x4ago
xam3
x4ap
xas5
x3c2
x1e
xe4cuto
x2ed
xer4i
xe5ro
x1h
xhi2
xhil5
xhu4
x3i
xi5a
xi5c
xi5di
x4ime
xi5miz
x3o
x4ob
x3p
xpan4d
xpecto5
xpe3d
x1t2
x3ti
x1u
xu3a
xx4
y5ac
3yar4
y5at
y1b
y1c
y2ce
yc5er
y3ch
ych4e
ycom4
ycot4
y1d
y5ee
y1er
y4erf
yes4
ye4t
y5gi
4y3h
y1i
y3la
ylla5bl
y3lo
y5lu
ymbol5
yme4
ympa3
yn3chr
yn5d
yn5g
yn5ic
5ynx
y1o4
yo5d
y4o5g
yom4
yo5net
y4ons
y4os
y4ped
yper5
yp3i
y3po
y4poc
yp2ta
y5pu
yra5m
yr5ia
y3ro
yr4r
ys4c
y3s2e
ys3ica
ys3io
3ysis
y4so
yss4
ys1t
ys3ta
ysur4
y3thin
yt3ic
y1w
za1
z5a2b
zar2
4zb
2ze
ze4n
ze4p
z1er
ze3ro
zet4
2z1i
z4il
z4is
5zl
4zm
1zo
zo4m
zo5ol
zte4
4z1z2
z4zy
}
\hyphenation{ % Do NOT make any alterations to this list! --- DEK
as-so-ciate
as-so-ciates
dec-li-na-tion
oblig-a-tory
phil-an-thropic
present
presents
project
projects
reci-procity
re-cog-ni-zance
ref-or-ma-tion
ret-ri-bu-tion
ta-ble
}
1.18.1.4/tmac/ec.tmac 0000666 00000001464 15047753021 0007632 0 ustar 00 .\" ec.tmac
.\"
.\" Switch to EC fonts.
.\"
.\" Load this file before any language-specific stuff.
.\"
.\" hcode values are not handled.
.\"
.
.nr _C \n(.C
.cp 0
.
.ftr R REC
.ftr I IEC
.ftr B BEC
.ftr BI BIEC
.
.sty 1 R
.sty 2 B
.sty 3 I
.sty 4 BI
.
.ftr CW CWEC
.ftr CWI CWIEC
.ftr CR CWEC
.ftr C CWEC
.ftr CO CWIEC
.ftr CI CWIEC
.ftr TT CWEC
.ftr H HREC
.
.fspecial TREC TRTC
.fspecial TIEC TITC
.fspecial TBEC TBTC
.fspecial TBIEC TBITC
.fspecial HREC HRTC
.fspecial HIEC HITC
.fspecial HBEC HBTC
.fspecial HBIEC HBIEC
.fspecial CWEC CWTC
.fspecial CWIEC CWITC
.
.\" remove definitions of glyphs which are TC fonts
.rchar \[co] \[rg]
.rchar \[ct]
.rchar \[tm]
.rchar \[aq]
.rchar \[12] \[14] \[34]
.rchar \[S1] \[S2] \[S3]
.rchar \[Of] \[Om]
.rchar \[Ye] \[Cs]
.
.\" an ID register
.nr ECFONTS 1
.
.cp \n(_C
.\" EOF
1.18.1.4/tmac/troffrc-end 0000666 00000001266 15047753021 0010531 0 ustar 00 .\" final startup file for troff
.
.\" this file is parsed after all macro sets have been read
.
.do if '\*[.T]'html' .do mso html.tmac
.
.\" if we are running the postscript device for html images then load www.tmac
.do if r ps4html .do mso www.tmac
.
.\" for all other devices blank out these macros
.do if !d HTML-IMAGE-INLINE .do ds HTML-IMAGE-INLINE
.do if !d HTML-IMAGE .do ds HTML-IMAGE
.do if !d HTML-IMAGE-RIGHT .do ds HTML-IMAGE-RIGHT
.do if !d HTML-IMAGE-LEFT .do ds HTML-IMAGE-LEFT
.do if !d HTML-IMAGE-END .do ds HTML-IMAGE-END
.do if !d HTML-TAG .do ds HTML-TAG
.do if !d HTML-DO-IMAGE .do ds HTML-DO-IMAGE
.
.\" Don't let blank lines creep in here.
1.18.1.4/tmac/an-old.tmac 0000666 00000026505 15047753021 0010420 0 ustar 00 .\" an-old.tmac
.\"
.\" Copyright (C) 1989, 1990, 1991, 1992, 2001, 2002
.\" Free Software Foundation, Inc.
.\" Written by James Clark (jjc@jclark.com)
.\"
.\" This file is part of groff.
.\"
.\" groff is free software; you can redistribute it and/or modify it under
.\" the terms of the GNU General Public License as published by the Free
.\" Software Foundation; either version 2, or (at your option) any later
.\" version.
.\"
.\" groff is distributed in the hope that it will be useful, but WITHOUT ANY
.\" WARRANTY; without even the implied warranty of MERCHANTABILITY or
.\" FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
.\" for more details.
.\"
.\" You should have received a copy of the GNU General Public License along
.\" with groff; see the file COPYING. If not, write to the Free Software
.\" Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
.\"
.\" -rcR=1 => Create a single, very long page instead of multiple pages.
.\" Useful for online display. Default in nroff mode.
.\" Desactivate with -rcR=0.
.\" -rC1 => Number pages continuously, rather than start each at 1.
.\" -rD1 => Double-sided printing, ie different odd and even page footers.
.\" -rPnnn => Number first page nnn.
.\" -rSxx => Use size `xx'pt (either 10, 11, or 12) for document rather
.\" than the default size of 10pt.
.\" -rXnnn => Number pages after nnn as nnna, nnnb, nnnc, ...
.\"
.\" The file man.local is loaded at the end. Put local additions there.
.\" If you need to add things to TH, use `.am1 TH'.
.\"
.
.if !\n(.g .ab These man macros work only with groff.
.
.do if d RI .nx
.
.nr _C \n(.C
.cp 0
.
.if (\n[.x]\n[.y] < 118) \
. ab You need GNU troff version 1.18 or higher to run this version of man!
.
.if !r D .nr D 0
.if !r C .nr C 0
.if !r S .nr S 10
.\" we must use consecutive page numbers when using postscript to generate
.\" html images, and we must not reset the page number at the beginning
.\" (the `ps4html' register is automatically added to the command line by
.\" the pre-html preprocessor)
.if !r ps4html \
. if r P .pn 0\n[P]
.if !r cR \{\
. ie n .nr cR 1
. el .nr cR 0
.\}
.
.if !r LL \{\
. ie n .nr LL 78n
. el .nr LL 6.5i
.\}
.if !r LT \{\
. ie n .nr LT 78n
. el .nr LT 6.5i
.\}
.
.nr an-html 0
.if '\*[.T]'html' .nr an-html 1
.if \n[an-html] .nr C 1
.if r ps4html .nr C 1
.
.\" we redefine .ne to avoid page breaks; instead, the page length is
.\" increased to the necessary amount (this is needed for tables)
.if n \{\
. de1 ne
. ie \\n[.$] \
. nr an-ne \\$*
. el \
. nr an-ne 1v
. if (\\n[an-ne] >= \\n[.t]) \
. pl +(\\n[an-ne]u - \\n[.t]u + 1v)
. .
.\}
.
.de set-an-margin
. nr an-margin \\n[IN]
..
.
.\" .TH title section extra1 extra2 extra3
.de1 TH
. if \\n[an-html] \{\
. HTML-TAG ".tl"
\\$1
. \}
.
. de an-init \" We have to do it like this to get multiple man pages right.
. ds an-title "\\$1
. ds an-section "\\$2
. ds an-extra1 "\\$3
. ie (\\n[.$] > 3) .ds an-extra2 "\\$4
. el .ds an-extra2 \"Sun Release 4.0
. ie (\\n[.$] > 4) .ds an-extra3 "\\$5
. el .ds an-extra3 \"System Programmer's Manual
. ds an-init
\\..
.
. DT
.
. nr PS 10z \" default point size
. nr PS-SS 10z
. nr PS-SH 10.95z
. nr VS 12p
.
. \" use sizes similar to LaTeX
. if t \{\
. ie (\\n[S] == 11) \{\
. nr PS 10.95z
. nr PS-SS 10.95z
. nr PS-SH 12z
. nr VS 13.6p
. \}
. el \{\
. if (\\n[S] == 12) \{\
. nr PS 12z
. nr PS-SS 12z
. nr PS-SH 14.4z
. nr VS 14.5p
. \}
. \}
. \}
.
. ps \\n[PS]u
. vs \\n[VS]u
. ll \\n[LL]u
.
. nr IN 7.2n
. PD
. nr SN 3n \" the indentation of sub-sub-headings relative to sub-headings
. nr an-level 1
. set-an-margin
. nr an-prevailing-indent \\n[IN]
. nr an-tag-sep 1n
.
. nr an-no-space-flag 0
. nr an-break-flag 0
. nr an-div? 0
.
. ie \\n[cR] \
. an-header
. el \{\
. wh 0 an-header
. wh -1i an-footer
. wh -.5i an-p-footer
.
. if (\\n[nl] > 0) \{\
. ie \\n[C] .bp (\\n[%] + 1)
. el .bp 1
. \}
. \}
..
.
.\" BSD compatibility macros: .AT and .UC
.
.de1 AT
. ds an-extra2 "7th Edition
. if "\\$1"3" .ds an-extra2 "7th Edition
. if "\\$1"4" .ds an-extra2 "System III
. if "\\$1"5" \{\
. ie "\\$2"" .ds an-extra2 "System V
. el .ds an-extra2 "System V Release \\$2
. \}
..
.
.de1 UC
. ds an-extra2 "3rd Berkeley Distribution
. if "\\$1"3" .ds an-extra2 "3rd Berkeley Distribution
. if "\\$1"4" .ds an-extra2 "4th Berkeley Distribution
. if "\\$1"5" .ds an-extra2 "4.2 Berkeley Distribution
. if "\\$1"6" .ds an-extra2 "4.3 Berkeley Distribution
. if "\\$1"7" .ds an-extra2 "4.4 Berkeley Distribution
..
.
.de1 DT
. ta T .5i \" This sets tabs every .5 inches
..
.
.de1 PD
. ie \\n[.$] .nr PD (v;\\$1)
. el .nr PD (.4v >? \n[.V])
..
.
.de1 an-header
. an-init
. ev 1
. ps \\n[PS]u
. vs \\n[VS]u
. lt \\n[LT]u
. ie \\n[an-html] \
. tl ''''
. el \{\
. if !\\n[cR] \
. sp .5i
. tl '\\*[an-title](\\*[an-section])'\\*[an-extra3]'\\*[an-title](\\*[an-section])'
. ie !\\n[cR] \
. sp |1i
. el \
. sp .5i
. \}
. ev
. ns
..
.
.de1 an-footer
' bp
..
.
.af an-page-letter a
.
.de1 an-p-footer
. ev 1
. ps \\n[PS]u
. vs \\n[VS]u
. lt \\n[LT]u
. ie \\n[an-html] \{\
. ds an-page-string
. ds an-extra1
. ds an-extra2
. \}
. el \{\
. ie r X \{\
. if (\\n[%] > \\n[X]) \{\
. nr an-page-letter (\\n[%] - \\n[X])
. ds an-page-string \\n[X]\\n[an-page-letter]
. \}
. \}
. el \{\
. ie \\n[cR] \
. ds an-page-string "\\*[an-title](\\*[an-section])
. el \
. ds an-page-string \\n[%]
. \}
. \}
. ie \\n[D] \{\
. if o .tl '\\*[an-extra2]'\\*[an-extra1]'\\*[an-page-string]'
. if e .tl '\\*[an-page-string]'\\*[an-extra1]'\\*[an-extra2]'
. \}
. el \
. tl '\\*[an-extra2]'\\*[an-extra1]'\\*[an-page-string]'
. ev
..
.
.de1 an-end
. nr % 1
. pl +4v
. fl
. sp 3
. an-p-footer
. pl \\n[nl]u
..
.
.if \n[cR] .em an-end
.
.de1 SH
. sp \\n[PD]u
. nr an-level 1
. set-an-margin
. nr an-prevailing-indent \\n[IN]
. fi
. in \\n[an-margin]u
. ti 0
. HTML-TAG ".NH \\n[an-level]"
. it 1 an-trap
. nr an-no-space-flag 1
. nr an-break-flag 1
. ps \\n[PS-SH]u
. ft B
. ne (2v + 1u)
. if \\n[.$] \&\\$*
..
.
.de1 SS
. sp \\n[PD]u
. nr an-level 1
. set-an-margin
. nr an-prevailing-indent \\n[IN]
. fi
. in \\n[IN]u
. ti \\n[SN]u
. it 1 an-trap
. nr an-no-space-flag 1
. nr an-break-flag 1
. ps \\n[PS-SS]u
. ft B
. ne (2v + 1u)
. if \\n[.$] \&\\$*
..
.
.de1 B
. it 1 an-trap
. ft B
. if \\n[.$] \&\\$*
..
.
.de1 I
. it 1 an-trap
. ft I
. if \\n[.$] \,\\$*\/
..
.
.de1 SM
. it 1 an-trap
. ps -1
. if \\n[.$] \&\\$*
..
.
.de1 SB
. it 1 an-trap
. ps -1
. ft B
. if \\n[.$] \&\\$*
..
.
.de1 TP
. sp \\n[PD]u
. if \\n[.$] .nr an-prevailing-indent (n;\\$1)
. it 1 an-trap
. in 0
. ll -\\n[an-margin]u
. if !\\n[an-div?] .di an-div
. nr an-div? 1
..
.
.de1 an-trap
. ft R
. ps \\n[PS]u
. vs \\n[VS]u
. if \\n[an-break-flag] \{\
. br
. nr an-break-flag 0
. \}
. if \\n[an-no-space-flag] \{\
. ns
. nr an-no-space-flag 0
. \}
. if \\n[an-div?] .an-do-tag
..
.
.de an-do-tag
. nr an-div? 0
. br
. ll
. di
. ie (\\n[dl] + \\n[an-tag-sep] > \\n[an-prevailing-indent]) \{\
. in \\n[an-margin]u
. ne (2v + 1u)
. an-div
. br
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. \}
. el \{\
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. ti -\\n[an-prevailing-indent]u
. chop an-div
. ne (1v + 1u)
\\*[an-div]\\h'|\\n[an-prevailing-indent]u'\c
. \}
..
.
.de an-do-tag-html
. nr an-div? 0
. br
. ll
. di
. ie ((\\n[dl] + \\n[an-tag-sep]) > \\n[an-prevailing-indent]) \{\
. in \\n[an-margin]u
. an-div
. br
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u + \\n[an-tag-sep]u)
. \}
. el \{\
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u + \\n[an-tag-sep]u)
. ti \\n[an-margin]u
. chop an-div
. HTML-TAG-NS ".col 1"
\\*[an-div]\\h'|\\n[an-prevailing-indent]u'\\h'\\n[an-tag-sep]u'\c
. HTML-TAG-NS ".col 2"
. \}
..
.
.de1 LP
. br
. sp \\n[PD]u
. ps \\n[PS]u
. vs \\n[VS]u
. ft R
. in \\n[an-margin]u
. nr an-prevailing-indent \\n[IN]
..
.
.als PP LP
.als P LP
.
.de1 IP
. ie !\\n[.$] \{\
. ps \\n[PS]u
. vs \\n[VS]u
. ft R
. sp \\n[PD]u
. ne (1v + 1u)
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. \}
. el \{\
. ie (\\n[.$] - 1) .TP "\\$2"
. el .TP
\&\\$1
. \}
..
.
.de1 HP
. ps \\n[PS]u
. vs \\n[VS]u
. ft R
. sp \\n[PD]u
. ne (1v + 1u)
. if \\n[.$] .nr an-prevailing-indent (n;\\$1)
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. ti \\n[an-margin]u
..
.
.ds an-empty \" this is referenced to avoid looping on eg .RB ( \\ )
.
.de1 RI
. if \\n[.$] \{\
. ds an-result \&\\$1
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \,\f[I]\\$1\f[R]\/\\$2\\*[an-empty]
. shift 2
. \}
. if \\n[.$] .as an-result \,\f[I]\\$1\f[R]
\\*[an-result]
. \}
..
.
.de1 IR
. if \\n[.$] \{\
. ds an-result \&\f[I]\\$1\f[R]
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \/\\$1\f[I]\,\\$2\f[R]
. shift 2
. \}
. if \\n[.$] .as an-result \/\\$1
\\*[an-result]
. \}
..
.
.de1 IB
. if \\n[.$] \{\
. ds an-result \&\f[I]\\$1
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \/\f[B]\\$1\f[I]\,\\$2\\*[an-empty]
. shift 2
. \}
. if \\n[.$] .as an-result \/\f[B]\\$1
\\*[an-result]
. ft R
. \}
..
.
.de1 BI
. if \\n[.$] \{\
. ds an-result \&\f[B]\\$1
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \,\f[I]\\$1\f[B]\/\\$2\\*[an-empty]
. shift 2
. \}
. if \\n[.$] .as an-result \,\f[I]\\$1
\\*[an-result]
. ft R
. \}
..
.
.de1 RB
. ds an-result \&
. while (\\n[.$] >= 2) \{\
. as an-result \f[R]\\$1\f[B]\\$2\\*[an-empty]
. shift 2
. \}
. if \\n[.$] .as an-result \f[R]\\$1
\\*[an-result]
. ft R
..
.
.de1 BR
. ds an-result \&
. while (\\n[.$] >= 2) \{\
. as an-result \f[B]\\$1\f[R]\\$2\\*[an-empty]
. shift 2
. \}
. if \\n[.$] .as an-result \f[B]\\$1
\\*[an-result]
. ft R
..
.
.de1 RS
. br
. nr an-saved-margin\\n[an-level] \\n[an-margin]
. nr an-saved-prevailing-indent\\n[an-level] \\n[an-prevailing-indent]
. ie \\n[.$] .nr an-margin +(n;\\$1)
. el .nr an-margin +\\n[an-prevailing-indent]
. in \\n[an-margin]u
. nr an-prevailing-indent \\n[IN]
. nr an-level +1
..
.
.de1 RE
. br
. ie \\n[.$] .nr an-level ((;\\$1) ? \\n[an-level])
. nr an-margin \\n[an-saved-margin\\n[an-level]]
. nr an-prevailing-indent \\n[an-saved-prevailing-indent\\n[an-level]]
. in \\n[an-margin]u
..
.
.\" table support
.
.de1 TS
. sp \\n[PD]u
. HTML-IMAGE
..
.
.de1 T&
..
.
.de1 TE
. HTML-IMAGE-END
..
.
.\" dummy equation delimiters
.de1 EQ
. HTML-IMAGE
..
.de1 EN
. HTML-IMAGE-END
..
.
.de1 R
\c
. ie \\n[.$] \{\
. tm `R' is a string (producing the registered sign), not a macro.
. nop \\$*
. \}
. el \{\
. ie c\[rg] \
. nop \[rg]\c
. el \
. nop (Reg.)\c
. \}
..
.
.\" these strings must work in compatibility mode also
.
.ds S \s'\\n(PSu'
.ie c\[tm] .ds Tm \(tm
.el .ds Tm (TM)
.ds lq \(lq
.ds rq \(rq
.
.ie \n[an-html] \{\
. rm an-do-tag
. als an-do-tag an-do-tag-html
.\}
.el .hy 14
.
.\" Load local modifications.
.mso man.local
.
.cp \n[_C]
.
.\" end of an-old.tmac
1.18.1.4/tmac/tty.tmac 0000666 00000002435 15047753021 0010062 0 ustar 00 .\" tty.tmac
.\"
.nr _C \n(.C
.cp 0
.
.nroff
.ta T 0.8i
.
.\" Don't warn about non-existent fonts.
.warn \n[.warn]-(\n[.warn]/131072%2*131072)
.
.po 0
.
.ie c\[pc] \
. tr \[bu]\[pc]
.el \
. if c\[md] \
. tr \[bu]\[md]
.
.fchar \[bu] \z+o
.fchar \[14] 1/4
.fchar \[12] 1/2
.fchar \[34] 3/4
.fchar \[ff] ff
.fchar \[fi] fi
.fchar \[fl] fl
.fchar \[Fi] ffi
.fchar \[Fl] ffl
.fchar \[<-] <-
.fchar \[->] ->
.fchar \[<>] <->
.fchar \[em] --
.fchar \[+-] +-
.fchar \[t+-] +-
.fchar \[co] (C)
.fchar \[<=] <=
.fchar \[>=] >=
.fchar \[!=] !=
.fchar \[==] ==
.fchar \[~=] ~=
.fchar \[sq] []
.fchar \[lh] <=
.fchar \[rh] =>
.fchar \[lA] <=
.fchar \[rA] =>
.fchar \[hA] <=>
.fchar \[rg] (R)
.fchar \[OE] OE
.fchar \[oe] oe
.fchar \[AE] AE
.fchar \[ae] ae
.fchar \[an] -
.fchar \[eu] EUR
.fchar \[Eu] EUR
.
.\" color definitions
.defcolor black rgb #000000
.defcolor red rgb #ff0000
.defcolor green rgb #00ff00
.defcolor blue rgb #0000ff
.defcolor yellow rgb #ffff00
.defcolor magenta rgb #ff00ff
.defcolor cyan rgb #00ffff
.defcolor white rgb #ffffff
.
.cp \n[_C]
.
.ie '\*(.T'cp1047' \
. do mso cp1047.tmac
.el \
. if !'\*(.T'ascii' \
. do mso latin1.tmac
.
.\" If you want the character definitions in tty-char.tmac to be loaded
.\" automatically, remove the `\"' from the next line.
.\"do mso tty-char.tmac
1.18.1.4/tmac/lj4.tmac 0000666 00000000670 15047753021 0007732 0 ustar 00 .\" lj4.tmac
.\"
.nr _C \n(.C
.cp 0
.
.ftr CW CR
.ftr C CR
.ftr CX CBI
.ftr H UR
.ftr HR UR
.ftr HB UB
.ftr HBI UBI
.ftr HI UI
.ftr HO UI
.ftr HX UBI
.
.\" This is designed so that \[ul], \[rn], and \[br] form corners.
.fchar \[br] \Z'\v'.25m'\D'R .04m -1m''
.fchar \[ru] \Z'\v'-.02m'\D'R .54m .04m''\h'.5m'
.fchar \[rn] \Z'\v'-.77m'\D'R .54m .04m''\h'.5m'
.fchar \[ul] \Z'\v'.23m'\D'R .54m .04m''\h'.5m'
.
.cp \n[_C]
.
.do mso latin1.tmac
1.18.1.4/tmac/hyphen.cs 0000666 00000106272 15047753021 0010222 0 ustar 00 %samohl ska-souhl ska-samohl ska
a1^^baa
a1^^b2a
a1^^a3a
a1^^b0a
a1ca
a1ja
a1^^a4a
a1^^b4a
a1^^aca
a1ha
a1cha
a1ka
a1ra
a1da
a1ta
a1na
a1^^bae
a1^^b2e
a1^^a3e
a1^^b0e
a1ce
a1je
a1he
a1che
a1ke
a1re
a1de
a1te
a1ne
a1ri
a1^^bai
a1^^b2i
a1^^a3i
a1^^b0i
a1ci
a1ji
a1di
a1ti
a1ni
a1^^bao
a1^^b2o
a1^^a3o
a1^^b0o
a1co
a1jo
a1^^a4o
a1^^b4o
a1^^aco
a1ho
a1cho
a1ko
a1ro
a1do
a1to
a1no
a1^^bau
a1^^b2u
a1^^a3u
a1^^b0u
a1cu
a1ju
a1^^a4u
a1^^b4u
a1^^acu
a1hu
a1chu
a1ku
a1ru
a1du
a1tu
a1nu
a1hy
a1chy
a1ky
a1ry
a1dy
a1ty
a1ny
a1^^ba^^e1
a1^^b2^^e1
a1^^a3^^e1
a1^^b0^^e1
a1c^^e1
a1j^^e1
a1^^a4^^e1
a1^^b4^^e1
a1^^ac^^e1
a1h^^e1
a1ch^^e1
a1k^^e1
a1r^^e1
a1d^^e1
a1t^^e1
a1n^^e1
a1^^ba^^e9
a1^^b2^^e9
a1^^a3^^e9
a1^^b0^^e9
a1c^^e9
a1j^^e9
a1h^^e9
a1ch^^e9
a1k^^e9
a1r^^e9
a1d^^e9
a1t^^e9
a1n^^e9
a1^^ba^^ed
a1^^b2^^ed
a1^^a3^^ed
a1^^b0^^ed
a1c^^ed
a1j^^ed
a1d^^ed
a1t^^ed
a1n^^ed
a1k^^f3
a1r^^f3
a1d^^f3
a1t^^f3
a1n^^f3
a1h^^fd
a1ch^^fd
a1k^^fd
a1r^^fd
a1d^^fd
a1t^^fd
a1n^^fd
a1d^^a5
a1t^^a5
a1n^^a5
e1^^baa
e1^^b2a
e1^^a3a
e1^^b0a
e1ca
e1ja
e1^^a4a
e1^^b4a
e1^^aca
e1ha
e1cha
e1ka
e1ra
e1da
e1ta
e1na
e1^^bae
e1^^b2e
e1^^a3e
e1^^b0e
e1ce
e1je
e1he
e1che
e1ke
e1re
e1de
e1te
e1ne
e1^^bai
e1^^b2i
e1^^a3i
e1^^b0i
e1ci
e1ji
e1di
e1ti
e1ni
e1^^bao
e1^^b2o
e1^^a3o
e1^^b0o
e1co
e1jo
e1^^a4o
e1^^b4o
e1^^aco
e1ho
e1cho
e1ko
e1ro
e1do
e1to
e1no
e1^^bau
e1^^b2u
e1^^a3u
e1^^b0u
e1cu
e1ju
e1^^a4u
e1^^b4u
e1^^acu
e1hu
e1chu
e1ku
e1ru
e1du
e1tu
e1nu
e1hy
e1chy
e1ky
e1ry
e1dy
e1ty
e1ny
e1^^ba^^e1
e1^^b2^^e1
e1^^a3^^e1
e1^^b0^^e1
e1c^^e1
e1j^^e1
e1h^^e1
e1ch^^e1
e1k^^e1
e1r^^e1
e1d^^e1
e1t^^e1
e1n^^e1
e1^^ba^^e9
e1^^b2^^e9
e1^^a3^^e9
e1^^b0^^e9
e1c^^e9
e1j^^e9
e1h^^e9
e1ch^^e9
e1k^^e9
e1r^^e9
e1d^^e9
e1t^^e9
e1n^^e9
e1^^ba^^ed
e1^^b2^^ed
e1^^a3^^ed
e1^^b0^^ed
e1c^^ed
e1j^^ed
e1d^^ed
e1t^^ed
e1n^^ed
e1h^^fd
e1ch^^fd
e1k^^fd
e1r^^fd
e1d^^fd
e1t^^fd
e1n^^fd
e1d^^a5
e1t^^a5
e1n^^a5
i1^^baa
i1^^b2a
i1^^a3a
i1^^b0a
i1ca
i1ja
i1^^a4a
i1^^b4a
i1^^aca
i1ha
i1cha
i1ka
i1ra
i1da
i1ta
i1na
i1^^bae
i1^^b2e
i1^^a3e
i1^^b0e
i1ce
i1je
i1he
i1che
i1ke
i1re
i1de
i1te
i1ne
i1^^bai
i1^^b2i
i1^^a3i
i1^^b0i
i1ci
i1ji
i1di
i1ti
i1ni
i1^^bao
i1^^b2o
i1^^a3o
i1^^b0o
i1co
i1jo
i1^^a4o
i1^^b4o
i1^^aco
i1ho
i1cho
i1ko
i1ro
i1do
i1to
i1no
i1^^bau
i1^^b2u
i1^^a3u
i1^^b0u
i1cu
i1ju
i1^^a4u
i1^^b4u
i1^^acu
i1hu
i1chu
i1ku
i1ru
i1du
i1tu
i1nu
i1hy
i1chy
i1ky
i1ry
i1dy
i1ty
i1ny
i1^^ba^^e1
i1^^b2^^e1
i1^^a3^^e1
i1^^b0^^e1
i1c^^e1
i1j^^e1
i1^^a4^^e1
i1^^b4^^e1
i1^^ac^^e1
i1h^^e1
i1ch^^e1
i1k^^e1
i1r^^e1
i1d^^e1
i1t^^e1
i1n^^e1
i1^^ba^^e9
i1^^b2^^e9
i1^^a3^^e9
i1^^b0^^e9
i1c^^e9
i1j^^e9
i1h^^e9
i1ch^^e9
i1k^^e9
i1r^^e9
i1d^^e9
i1t^^e9
i1n^^e9
i1^^ba^^ed
i1^^b2^^ed
i1^^a3^^ed
i1^^b0^^ed
i1c^^ed
i1j^^ed
i1d^^ed
i1t^^ed
i1n^^ed
i1k^^f3
i1r^^f3
i1h^^fd
i1ch^^fd
i1k^^fd
i1r^^fd
i1d^^fd
i1t^^fd
i1n^^fd
i1d^^a5
i1t^^a5
i1n^^a5
o1^^baa
o1^^b2a
o1^^a3a
o1^^b0a
o1ca
o1ja
o1^^a4a
o1^^b4a
o1^^aca
o1ha
o1cha
o1ka
o1ra
o1da
o1ta
o1na
o1^^bae
o1^^b2e
o1^^a3e
o1^^b0e
o1ce
o1je
o1he
o1che
o1ke
o1re
o1de
o1te
o1ne
o1^^bai
o1^^b2i
o1^^a3i
o1^^b0i
o1ci
o1ji
o1di
o1ti
o1ni
o1^^bao
o1^^b2o
o1^^a3o
o1^^b0o
o1co
o1jo
o1^^a4o
o1^^b4o
o1^^aco
o1ho
o1cho
o1ko
o1ro
o1do
o1to
o1no
o1^^bau
o1^^b2u
o1^^a3u
o1^^b0u
o1cu
o1ju
o1^^a4u
o1^^b4u
o1^^acu
o1hu
o1chu
o1ku
o1ru
o1du
o1tu
o1nu
o1hy
o1chy
o1ky
o1ry
o1dy
o1ty
o1ny
o1^^ba^^e1
o1^^b2^^e1
o1^^a3^^e1
o1^^b0^^e1
o1c^^e1
o1j^^e1
o1h^^e1
o1ch^^e1
o1k^^e1
o1r^^e1
o1d^^e1
o1t^^e1
o1n^^e1
o1^^ba^^e9
o1^^b2^^e9
o1^^a3^^e9
o1^^b0^^e9
o1c^^e9
o1j^^e9
o1h^^e9
o1ch^^e9
o1k^^e9
o1r^^e9
o1d^^e9
o1t^^e9
o1n^^e9
o1^^ba^^ed
o1^^b2^^ed
o1^^a3^^ed
o1^^b0^^ed
o1c^^ed
o1j^^ed
o1d^^ed
o1t^^ed
o1n^^ed
o1h^^fd
o1ch^^fd
o1k^^fd
o1r^^fd
o1d^^fd
o1t^^fd
o1n^^fd
o1d^^a5
o1t^^a5
o1n^^a5
u1^^baa
u1^^b2a
u1^^a3a
u1^^b0a
u1ca
u1ja
u1^^a4a
u1^^b4a
u1^^aca
u1ha
u1cha
u1ka
u1ra
u1da
u1ta
u1na
u1^^bae
u1^^b2e
u1^^a3e
u1^^b0e
u1ce
u1je
u1he
u1che
u1ke
u1re
u1de
u1te
u1ne
u1^^bai
u1^^b2i
u1^^a3i
u1^^b0i
u1ci
u1ji
u1di
u1ti
u1ni
u1^^bao
u1^^b2o
u1^^a3o
u1^^b0o
u1co
u1jo
u1^^a4o
u1^^b4o
u1^^aco
u1ho
u1cho
u1ko
u1ro
u1do
u1to
u1no
u1^^bau
u1^^b2u
u1^^a3u
u1^^b0u
u1cu
u1ju
u1^^a4u
u1^^b4u
u1^^acu
u1hu
u1chu
u1ku
u1ru
u1du
u1tu
u1nu
u1hy
u1chy
u1ky
u1ry
u1dy
u1ty
u1ny
u1^^ba^^e1
u1^^b2^^e1
u1^^a3^^e1
u1^^b0^^e1
u1c^^e1
u1j^^e1
u1^^a4^^e1
u1^^b4^^e1
u1^^ac^^e1
u1h^^e1
u1ch^^e1
u1k^^e1
u1r^^e1
u1d^^e1
u1t^^e1
u1n^^e1
u1^^ba^^e9
u1^^b2^^e9
u1^^a3^^e9
u1^^b0^^e9
u1c^^e9
u1j^^e9
u1h^^e9
u1ch^^e9
u1k^^e9
u1r^^e9
u1d^^e9
u1t^^e9
u1n^^e9
u1^^ba^^ed
u1^^b2^^ed
u1^^a3^^ed
u1^^b0^^ed
u1c^^ed
u1j^^ed
u1d^^ed
u1t^^ed
u1n^^ed
u1h^^fd
u1ch^^fd
u1k^^fd
u1r^^fd
u1d^^fd
u1t^^fd
u1n^^fd
u1d^^a5
u1t^^a5
u1n^^a5
y1^^baa
y1^^b2a
y1^^a3a
y1^^b0a
y1ca
y1ja
y1ha
y1cha
y1ka
y1ra
y1da
y1ta
y1na
y1^^bae
y1^^b2e
y1^^a3e
y1^^b0e
y1ce
y1je
y1he
y1che
y1ke
y1re
y1de
y1te
y1ne
y1^^bai
y1^^b2i
y1^^a3i
y1^^b0i
y1ci
y1ji
y1di
y1ti
y1ni
y1^^bao
y1^^b2o
y1^^a3o
y1^^b0o
y1co
y1jo
y1^^aco
y1ho
y1cho
y1ko
y1ro
y1do
y1to
y1no
y1^^bau
y1^^b2u
y1^^a3u
y1^^b0u
y1cu
y1ju
y1hu
y1chu
y1ku
y1ru
y1du
y1tu
y1nu
y1hy
y1chy
y1ky
y1ry
y1dy
y1ty
y1ny
y1^^ba^^e1
y1^^b2^^e1
y1^^a3^^e1
y1^^b0^^e1
y1c^^e1
y1j^^e1
y1h^^e1
y1ch^^e1
y1k^^e1
y1r^^e1
y1d^^e1
y1t^^e1
y1n^^e1
y1^^ba^^e9
y1^^b2^^e9
y1^^a3^^e9
y1^^b0^^e9
y1c^^e9
y1j^^e9
y1h^^e9
y1ch^^e9
y1k^^e9
y1r^^e9
y1d^^e9
y1t^^e9
y1n^^e9
y1^^ba^^ed
y1^^b2^^ed
y1^^a3^^ed
y1^^b0^^ed
y1c^^ed
y1j^^ed
y1d^^ed
y1t^^ed
y1n^^ed
y1h^^fd
y1ch^^fd
y1k^^fd
y1r^^fd
y1d^^fd
y1t^^fd
y1n^^fd
y1d^^a5
y1t^^a5
y1n^^a5
^^e11^^baa
^^e11^^b2a
^^e11^^a3a
^^e11^^b0a
^^e11ca
^^e11ja
^^e11^^a4a
^^e11^^b4a
^^e11^^aca
^^e11ha
^^e11cha
^^e11ka
^^e11ra
^^e11da
^^e11ta
^^e11na
^^e11^^bae
^^e11^^b2e
^^e11^^a3e
^^e11^^b0e
^^e11ce
^^e11je
^^e11he
^^e11che
^^e11ke
^^e11re
^^e11de
^^e11te
^^e11ne
^^e11^^bai
^^e11^^b2i
^^e11^^a3i
^^e11^^b0i
^^e11ci
^^e11ji
^^e11di
^^e11ti
^^e11ni
^^e11^^bao
^^e11^^b2o
^^e11^^a3o
^^e11^^b0o
^^e11co
^^e11jo
^^e11^^a4o
^^e11^^b4o
^^e11^^aco
^^e11ho
^^e11cho
^^e11ko
^^e11ro
^^e11do
^^e11to
^^e11no
^^e11^^bau
^^e11^^b2u
^^e11^^a3u
^^e11^^b0u
^^e11cu
^^e11ju
^^e11^^a4u
^^e11^^b4u
^^e11^^acu
^^e11hu
^^e11chu
^^e11ku
^^e11ru
^^e11du
^^e11tu
^^e11nu
^^e11hy
^^e11chy
^^e11ky
^^e11ry
^^e11dy
^^e11ty
^^e11ny
^^e11^^ba^^e1
^^e11^^b2^^e1
^^e11^^a3^^e1
^^e11^^b0^^e1
^^e11c^^e1
^^e11j^^e1
^^e11h^^e1
^^e11ch^^e1
^^e11k^^e1
^^e11r^^e1
^^e11d^^e1
^^e11t^^e1
^^e11n^^e1
^^e11^^ba^^e9
^^e11^^b2^^e9
^^e11^^a3^^e9
^^e11^^b0^^e9
^^e11c^^e9
^^e11j^^e9
^^e11h^^e9
^^e11ch^^e9
^^e11k^^e9
^^e11r^^e9
^^e11d^^e9
^^e11t^^e9
^^e11n^^e9
^^e11^^ba^^ed
^^e11^^b2^^ed
^^e11^^a3^^ed
^^e11^^b0^^ed
^^e11c^^ed
^^e11j^^ed
^^e11d^^ed
^^e11t^^ed
^^e11n^^ed
^^e11h^^fd
^^e11ch^^fd
^^e11k^^fd
^^e11r^^fd
^^e11d^^fd
^^e11t^^fd
^^e11n^^fd
^^e11d^^a5
^^e11t^^a5
^^e11n^^a5
^^e91^^baa
^^e91^^b2a
^^e91^^a3a
^^e91^^b0a
^^e91ca
^^e91ja
^^e91^^a4a
^^e91^^b4a
^^e91^^aca
^^e91ha
^^e91cha
^^e91ka
^^e91ra
^^e91da
^^e91ta
^^e91na
^^e91^^bae
^^e91^^b2e
^^e91^^a3e
^^e91^^b0e
^^e91ce
^^e91je
^^e91he
^^e91che
^^e91ke
^^e91re
^^e91de
^^e91te
^^e91ne
^^e91^^bai
^^e91^^b2i
^^e91^^a3i
^^e91^^b0i
^^e91ci
^^e91ji
^^e91di
^^e91ti
^^e91ni
^^e91^^bao
^^e91^^b2o
^^e91^^a3o
^^e91^^b0o
^^e91co
^^e91jo
^^e91^^a4o
^^e91^^b4o
^^e91ho
^^e91cho
^^e91ko
^^e91ro
^^e91do
^^e91to
^^e91no
^^e91^^bau
^^e91^^b2u
^^e91^^a3u
^^e91^^b0u
^^e91cu
^^e91ju
^^e91^^a4u
^^e91^^b4u
^^e91hu
^^e91chu
^^e91ku
^^e91ru
^^e91du
^^e91tu
^^e91nu
^^e91hy
^^e91chy
^^e91ky
^^e91ry
^^e91dy
^^e91ty
^^e91ny
^^e91^^ba^^e1
^^e91^^b2^^e1
^^e91^^a3^^e1
^^e91^^b0^^e1
^^e91c^^e1
^^e91j^^e1
^^e91h^^e1
^^e91ch^^e1
^^e91k^^e1
^^e91r^^e1
^^e91d^^e1
^^e91t^^e1
^^e91n^^e1
^^e91^^ba^^e9
^^e91^^b2^^e9
^^e91^^a3^^e9
^^e91^^b0^^e9
^^e91c^^e9
^^e91j^^e9
^^e91h^^e9
^^e91ch^^e9
^^e91k^^e9
^^e91r^^e9
^^e91d^^e9
^^e91t^^e9
^^e91n^^e9
^^e91^^ba^^ed
^^e91^^b2^^ed
^^e91^^a3^^ed
^^e91^^b0^^ed
^^e91c^^ed
^^e91j^^ed
^^e91d^^ed
^^e91t^^ed
^^e91n^^ed
^^e91h^^fd
^^e91ch^^fd
^^e91k^^fd
^^e91r^^fd
^^e91d^^fd
^^e91t^^fd
^^e91n^^fd
^^e91d^^a5
^^e91t^^a5
^^e91n^^a5
^^ed1^^baa
^^ed1^^b2a
^^ed1^^a3a
^^ed1^^b0a
^^ed1ca
^^ed1ja
^^ed1^^a4a
^^ed1^^b4a
^^ed1^^aca
^^ed1ha
^^ed1cha
^^ed1ka
^^ed1ra
^^ed1da
^^ed1ta
^^ed1na
^^ed1^^bae
^^ed1^^b2e
^^ed1^^a3e
^^ed1^^b0e
^^ed1ce
^^ed1je
^^ed1he
^^ed1che
^^ed1ke
^^ed1re
^^ed1de
^^ed1te
^^ed1ne
^^ed1^^bai
^^ed1^^b2i
^^ed1^^a3i
^^ed1^^b0i
^^ed1ci
^^ed1ji
^^ed1di
^^ed1ti
^^ed1ni
^^ed1^^bao
^^ed1^^b2o
^^ed1^^a3o
^^ed1^^b0o
^^ed1co
^^ed1jo
^^ed1^^a4o
^^ed1^^b4o
^^ed1^^aco
^^ed1ho
^^ed1cho
^^ed1ko
^^ed1ro
^^ed1do
^^ed1to
^^ed1no
^^ed1^^bau
^^ed1^^b2u
^^ed1^^a3u
^^ed1^^b0u
^^ed1cu
^^ed1ju
^^ed1^^a4u
^^ed1^^b4u
^^ed1^^acu
^^ed1hu
^^ed1chu
^^ed1ku
^^ed1ru
^^ed1du
^^ed1tu
^^ed1nu
^^ed1hy
^^ed1chy
^^ed1ky
^^ed1ry
^^ed1dy
^^ed1ty
^^ed1ny
^^ed1^^ba^^e1
^^ed1^^b2^^e1
^^ed1^^a3^^e1
^^ed1^^b0^^e1
^^ed1c^^e1
^^ed1j^^e1
^^ed1^^a4^^e1
^^ed1^^b4^^e1
^^ed1^^ac^^e1
^^ed1h^^e1
^^ed1ch^^e1
^^ed1k^^e1
^^ed1r^^e1
^^ed1d^^e1
^^ed1t^^e1
^^ed1n^^e1
^^ed1^^ba^^e9
^^ed1^^b2^^e9
^^ed1^^a3^^e9
^^ed1^^b0^^e9
^^ed1c^^e9
^^ed1j^^e9
^^ed1h^^e9
^^ed1ch^^e9
^^ed1k^^e9
^^ed1r^^e9
^^ed1d^^e9
^^ed1t^^e9
^^ed1n^^e9
^^ed1^^ba^^ed
^^ed1^^b2^^ed
^^ed1^^a3^^ed
^^ed1^^b0^^ed
^^ed1c^^ed
^^ed1j^^ed
^^ed1d^^ed
^^ed1t^^ed
^^ed1n^^ed
^^ed1h^^fd
^^ed1ch^^fd
^^ed1k^^fd
^^ed1r^^fd
^^ed1d^^fd
^^ed1t^^fd
^^ed1n^^fd
^^ed1d^^a5
^^ed1t^^a5
^^ed1n^^a5
^^f31^^baa
^^f31da
^^f31do
^^f31du
^^f31ta
^^f31tu
^^f31to
^^f31na
^^f31nu
^^f31no
^^f31^^bae
^^f31^^b0e
^^f31je
^^f31ti
^^f31ni
^^a51^^baa
^^a51^^b2a
^^a51^^a3a
^^a51^^b0a
^^a51ca
^^a51ja
^^a51ha
^^a51cha
^^a51ka
^^a51ra
^^a51da
^^a51ta
^^a51na
^^a51^^bae
^^a51^^b2e
^^a51^^a3e
^^a51^^b0e
^^a51ce
^^a51je
^^a51he
^^a51che
^^a51ke
^^a51re
^^a51de
^^a51te
^^a51ne
^^a51^^bai
^^a51^^b2i
^^a51^^a3i
^^a51^^b0i
^^a51ci
^^a51ji
^^a51di
^^a51ti
^^a51ni
^^a51^^bao
^^a51^^b2o
^^a51^^a3o
^^a51^^b0o
^^a51co
^^a51jo
^^a51ho
^^a51cho
^^a51ko
^^a51ro
^^a51do
^^a51to
^^a51no
^^a51^^bau
^^a51^^b2u
^^a51^^a3u
^^a51^^b0u
^^a51cu
^^a51ju
^^a51hu
^^a51chu
^^a51ku
^^a51ru
^^a51du
^^a51tu
^^a51nu
^^a51hy
^^a51chy
^^a51ky
^^a51ry
^^a51dy
^^a51ty
^^a51ny
^^a51^^ba^^e1
^^a51^^b2^^e1
^^a51^^a3^^e1
^^a51^^b0^^e1
^^a51c^^e1
^^a51j^^e1
^^a51h^^e1
^^a51ch^^e1
^^a51k^^e1
^^a51r^^e1
^^a51d^^e1
^^a51t^^e1
^^a51n^^e1
^^a51^^ba^^e9
^^a51^^b2^^e9
^^a51^^a3^^e9
^^a51^^b0^^e9
^^a51c^^e9
^^a51j^^e9
^^a51ch^^e9
^^a51k^^e9
^^a51r^^e9
^^a51d^^e9
^^a51t^^e9
^^a51n^^e9
^^a51^^ba^^ed
^^a51^^b2^^ed
^^a51^^a3^^ed
^^a51^^b0^^ed
^^a51c^^ed
^^a51j^^ed
^^a51d^^ed
^^a51t^^ed
^^a51n^^ed
^^a51h^^fd
^^a51ch^^fd
^^a51k^^fd
^^a51r^^fd
^^a51d^^fd
^^a51t^^fd
^^a51n^^fd
^^a51d^^a5
^^a51t^^a5
^^a51n^^a5
a1ga
a1ge
a1gi
a1go
a1g^^f3
a1gu
e1ga
e1ge
e1gi
e1go
e1gu
e1g^^e1
i1ga
i1ge
i1gi
i1go
i1gu
i1g^^e1
i1g^^f3
o1ga
o1ge
o1gi
o1go
o1gu
u1ga
u1ge
u1gi
u1gy
u1go
u1gu
a1xa
a1xe
a1xi
a1xo
a1xu
a1x^^f3
e1xa
e1xe
e1xi
e1xo
e1xu
i1xa
i1xe
i1xi
i1xo
i1xu
o1xa
o1xe
o1xi
o1xo
o1xu
^^b71zu
u1z^^b7
^^b71zo
o1z^^b7
^^a51z^^b7
^^b71z^^ed
^^ed1z^^b7
^^f31z^^b7
^^b71zi
i1z^^b7
^^b71z^^e1
^^e11z^^b7
^^e91z^^b7
^^b71ze
e1z^^b7
^^b71za
a1z^^b7
^^fd1z^^b7
^^b71z^^b7
^^b71zy
y1z^^b7
^^b71^^acu
u1^^ac^^b7
^^b71^^aco
o1^^ac^^b7
^^b71^^ac^^ed
^^f31^^ac^^b7
^^b71^^aci
i1^^ac^^b7
^^e11^^ac^^b7
^^e91^^ac^^b7
e1^^ac^^b7
^^b71^^aca
a1^^ac^^b7
^^fd1^^ac^^b7
^^b71vu
u1v^^b7
^^b71vo
o1v^^b7
^^b71v^^a5
^^a51v^^b7
^^b71v^^ed
^^ed1v^^b7
^^b71vi
i1v^^b7
^^e11v^^b7
^^e91v^^b7
^^b71ve
e1v^^b7
^^b71va
a1v^^b7
^^fd1v^^b7
^^b71v^^b7
^^b71vy
y1v^^b7
^^b71^^b4a
^^b71tu
u1t^^b7
^^b71to
o1t^^b7
^^b71t^^a5
^^a51t^^b7
^^b71t^^ed
^^ed1t^^b7
^^f31t^^b7
^^b71ti
i1t^^b7
^^e11t^^b7
^^e91t^^b7
^^b71te
e1t^^b7
^^b71ta
a1t^^b7
^^fd1t^^b7
^^b71t^^b7
^^b71ty
y1t^^b7
^^b71su
u1s^^b7
^^b71so
o1s^^b7
^^a51s^^b7
^^b71s^^ed
^^ed1s^^b7
^^f31s^^b7
^^b71si
i1s^^b7
^^b71s^^e1
^^e11s^^b7
^^e91s^^b7
^^b71se
e1s^^b7
^^b71sa
a1s^^b7
^^fd1s^^b7
^^b71sy
y1s^^b7
^^b71ru
u1r^^b7
^^b71ro
o1r^^b7
^^a51r^^b7
^^ed1r^^b7
^^f31r^^b7
i1r^^b7
^^b71r^^e1
^^e11r^^b7
^^e91r^^b7
^^b71re
e1r^^b7
^^b71ra
a1r^^b7
^^b71r^^fd
^^fd1r^^b7
^^b71r^^b7
^^b71ry
y1r^^b7
u1p^^b7
^^b71po
o1p^^b7
^^b71p^^a5
^^a51p^^b7
^^b71p^^ed
^^ed1p^^b7
i1p^^b7
^^e91p^^b7
^^b71pe
e1p^^b7
a1p^^b7
^^fd1p^^b7
y1p^^b7
u1n^^b7
o1n^^b7
^^b71n^^a5
^^a51n^^b7
^^b71n^^ed
^^ed1n^^b7
^^f31n^^b7
^^b71ni
i1n^^b7
^^e11n^^b7
^^e91n^^b7
^^b71ne
e1n^^b7
^^b71na
a1n^^b7
^^fd1n^^b7
^^b71n^^b7
^^b71ny
y1n^^b7
u1m^^b7
o1m^^b7
^^b71m^^a5
^^a51m^^b7
^^ed1m^^b7
^^f31m^^b7
i1m^^b7
^^e11m^^b7
^^e91m^^b7
e1m^^b7
^^b71ma
a1m^^b7
^^fd1m^^b7
^^b71m^^b7
^^b71my
y1m^^b7
^^b71lu
u1l^^b7
^^b71lo
o1l^^b7
^^a51l^^b7
^^b71l^^ed
^^ed1l^^b7
^^f31l^^b7
^^b71li
i1l^^b7
^^e11l^^b7
^^e91l^^b7
^^b71le
e1l^^b7
^^b71la
a1l^^b7
^^b71l^^fd
^^fd1l^^b7
^^b71l^^b7
^^b71ly
y1l^^b7
u1k^^b7
^^b71ko
o1k^^b7
^^a51k^^b7
^^ed1k^^b7
^^f31k^^b7
i1k^^b7
^^e11k^^b7
^^e91k^^b7
e1k^^b7
^^b71ka
a1k^^b7
^^fd1k^^b7
^^b71ky
y1k^^b7
u1j^^b7
o1j^^b7
^^a51j^^b7
^^b71j^^ed
^^ed1j^^b7
^^f31j^^b7
^^b71ji
i1j^^b7
^^e11j^^b7
^^e91j^^b7
^^b71je
e1j^^b7
^^b71ja
a1j^^b7
^^fd1j^^b7
y1j^^b7
u1h^^b7
o1h^^b7
^^a51h^^b7
^^ed1h^^b7
i1h^^b7
^^b71h^^e1
^^e11h^^b7
^^e91h^^b7
^^b71he
e1h^^b7
^^b71ha
a1h^^b7
^^b71h^^b7
^^b71hy
y1h^^b7
^^e91f^^b7
a1f^^b7
y1f^^b7
^^b71^^bau
u1^^ba^^b7
^^b71^^bao
o1^^ba^^b7
^^a51^^ba^^b7
^^b71^^ba^^ed
^^ed1^^ba^^b7
^^f31^^ba^^b7
^^b71^^bai
i1^^ba^^b7
^^b71^^ba^^e1
^^e11^^ba^^b7
^^e91^^ba^^b7
^^b71^^bae
e1^^ba^^b7
^^b71^^baa
a1^^ba^^b7
^^fd1^^ba^^b7
y1^^ba^^b7
^^b71du
u1d^^b7
^^b71do
o1d^^b7
^^b71d^^a5
^^a51d^^b7
^^ed1d^^b7
^^f31d^^b7
^^b71di
i1d^^b7
^^e11d^^b7
^^e91d^^b7
e1d^^b7
^^b71da
a1d^^b7
^^fd1d^^b7
^^b71dy
y1d^^b7
u1c^^b7
o1c^^b7
^^a51c^^b7
^^b71c^^ed
^^ed1c^^b7
i1c^^b7
^^e11c^^b7
e1c^^b7
a1c^^b7
^^fd1c^^b7
y1c^^b7
u1b^^b7
o1b^^b7
^^b71b^^a5
^^a51b^^b7
^^ed1b^^b7
^^f31b^^b7
i1b^^b7
^^e11b^^b7
^^e91b^^b7
e1b^^b7
^^b71ba
a1b^^b7
^^fd1b^^b7
^^b71by
y1b^^b7
u1^^a3^^b7
o1^^a3^^b7
^^a51^^a3^^b7
^^ed1^^a3^^b7
^^b71^^a3i
i1^^a3^^b7
^^e11^^a3^^b7
^^b71^^a3e
e1^^a3^^b7
a1^^a3^^b7
^^fd1^^a3^^b7
^^b71^^a3y
y1^^a3^^b7
u1^^a4^^b7
o1^^a4^^b7
^^ed1^^a4^^b7
^^e11^^a4^^b7
^^e91^^a4^^b7
e1^^a4^^b7
a1^^a4^^b7
^^b71chu
u1ch^^b7
^^b71cho
o1ch^^b7
^^a51ch^^b7
^^ed1ch^^b7
i1ch^^b7
^^e11ch^^b7
e1ch^^b7
^^b71cha
a1ch^^b7
^^b71ch^^fd
^^fd1ch^^b7
^^b71ch^^b7
^^b71chy
y1ch^^b7
u1^^b0^^b7
o1^^b0^^b7
^^a51^^b0^^b7
^^b71^^b0^^ed
^^ed1^^b0^^b7
^^b71^^b0i
i1^^b0^^b7
^^e11^^b0^^b7
^^e91^^b0^^b7
^^b71^^b0e
e1^^b0^^b7
a1^^b0^^b7
^^fd1^^b0^^b7
y1^^b0^^b7
^^b71^^b2u
u1^^b2^^b7
^^b71^^b2o
o1^^b2^^b7
^^a51^^b2^^b7
^^b71^^b2^^ed
^^ed1^^b2^^b7
^^b71^^b2i
i1^^b2^^b7
^^e11^^b2^^b7
^^e91^^b2^^b7
^^b71^^b2e
e1^^b2^^b7
^^b71^^b2a
a1^^b2^^b7
^^fd1^^b2^^b7
^^b71^^b2^^b7
y1^^b2^^b7
u1bu
u1fu
u1lu
u1mu
u1pu
u1su
u1vu
u1zu
u1bo
u1fo
u1lo
u1mo
u1po
u1so
u1vo
u1zo
u1b^^a5
u1m^^a5
u1p^^a5
u1v^^a5
u1b^^ed
u1f^^ed
u1l^^ed
u1m^^ed
u1p^^ed
u1s^^ed
u1v^^ed
u1z^^ed
u1bi
u1fi
u1li
u1mi
u1pi
u1si
u1vi
u1zi
u1b^^e1
u1f^^e1
u1l^^e1
u1m^^e1
u1p^^e1
u1s^^e1
u1v^^e1
u1z^^e1
u1b^^e9
u1l^^e9
u1m^^e9
u1p^^e9
u1s^^e9
u1v^^e9
u1z^^e9
u1be
u1fe
u1le
u1me
u1pe
u1se
u1ve
u1ze
u1ba
u1fa
u1la
u1ma
u1pa
u1sa
u1va
u1za
u1b^^fd
u1l^^fd
u1m^^fd
u1p^^fd
u1s^^fd
u1v^^fd
u1z^^fd
u1by
u1fy
u1my
u1py
u1sy
u1vy
o1bu
o1fu
o1lu
o1mu
o1pu
o1su
o1vu
o1zu
o1bo
o1fo
o1lo
o1mo
o1po
o1so
o1vo
o1zo
o1b^^a5
o1m^^a5
o1p^^a5
o1v^^a5
o1b^^ed
o1f^^ed
o1l^^ed
o1m^^ed
o1p^^ed
o1s^^ed
o1v^^ed
o1z^^ed
o1f^^f3
o1z^^f3
o1bi
o1fi
o1li
o1mi
o1pi
o1si
o1vi
o1zi
o1b^^e1
o1f^^e1
o1l^^e1
o1m^^e1
o1p^^e1
o1s^^e1
o1v^^e1
o1z^^e1
o1b^^e9
o1f^^e9
o1l^^e9
o1m^^e9
o1p^^e9
o1s^^e9
o1v^^e9
o1z^^e9
o1be
o1fe
o1le
o1me
o1pe
o1se
o1ve
o1ze
o1ba
o1fa
o1la
o1ma
o1pa
o1sa
o1va
o1za
o1b^^fd
o1l^^fd
o1m^^fd
o1p^^fd
o1s^^fd
o1v^^fd
o1z^^fd
o1by
o1ly
o1my
o1py
o1sy
o1vy
o1zy
^^fa1lu
^^fa1su
^^fa1zu
^^fa1bo
^^fa1lo
^^fa1mo
^^fa1po
^^fa1vo
^^fa1b^^a5
^^fa1m^^a5
^^fa1p^^a5
^^fa1v^^a5
^^fa1p^^ed
^^fa1li
^^fa1pi
^^fa1si
^^fa1vi
^^fa1zi
^^fa1le
^^fa1se
^^fa1ze
^^fa1pa
^^fa1sa
^^fa1va
^^fa1by
^^fa1ly
^^fa1my
^^a51bu
^^a51lu
^^a51mu
^^a51pu
^^a51su
^^a51vu
^^a51zu
^^a51bo
^^a51fo
^^a51lo
^^a51mo
^^a51po
^^a51so
^^a51vo
^^a51zo
^^a51m^^a5
^^a51v^^a5
^^a51b^^ed
^^a51l^^ed
^^a51m^^ed
^^a51p^^ed
^^a51s^^ed
^^a51v^^ed
^^a51z^^ed
^^a51li
^^a51mi
^^a51pi
^^a51si
^^a51vi
^^a51zi
^^a51b^^e1
^^a51l^^e1
^^a51m^^e1
^^a51p^^e1
^^a51s^^e1
^^a51v^^e1
^^a51z^^e1
^^a51l^^e9
^^a51m^^e9
^^a51p^^e9
^^a51s^^e9
^^a51v^^e9
^^a51z^^e9
^^a51be
^^a51le
^^a51me
^^a51pe
^^a51se
^^a51ve
^^a51ze
^^a51ba
^^a51la
^^a51ma
^^a51pa
^^a51sa
^^a51va
^^a51za
^^a51l^^fd
^^a51m^^fd
^^a51p^^fd
^^a51s^^fd
^^a51v^^fd
^^a51z^^fd
^^a51by
^^a51ly
^^a51my
^^a51py
^^a51sy
^^a51vy
^^a51zy
^^ed1bu
^^ed1fu
^^ed1lu
^^ed1mu
^^ed1pu
^^ed1su
^^ed1vu
^^ed1zu
^^ed1bo
^^ed1fo
^^ed1lo
^^ed1mo
^^ed1po
^^ed1so
^^ed1vo
^^ed1zo
^^ed1b^^a5
^^ed1m^^a5
^^ed1v^^a5
^^ed1b^^ed
^^ed1l^^ed
^^ed1p^^ed
^^ed1v^^ed
^^ed1z^^ed
^^ed1bi
^^ed1li
^^ed1mi
^^ed1pi
^^ed1si
^^ed1vi
^^ed1zi
^^ed1b^^e1
^^ed1l^^e1
^^ed1m^^e1
^^ed1p^^e1
^^ed1s^^e1
^^ed1v^^e1
^^ed1z^^e1
^^ed1b^^e9
^^ed1l^^e9
^^ed1m^^e9
^^ed1p^^e9
^^ed1s^^e9
^^ed1v^^e9
^^ed1z^^e9
^^ed1be
^^ed1le
^^ed1me
^^ed1pe
^^ed1se
^^ed1ve
^^ed1ze
^^ed1ba
^^ed1la
^^ed1ma
^^ed1pa
^^ed1sa
^^ed1va
^^ed1za
^^ed1l^^fd
^^ed1m^^fd
^^ed1s^^fd
^^ed1v^^fd
^^ed1z^^fd
^^ed1by
^^ed1fy
^^ed1ly
^^ed1my
^^ed1py
^^ed1sy
^^ed1vy
^^ed1zy
^^f31bu
^^f31lu
^^f31mu
^^f31pu
^^f31su
^^f31vu
^^f31zu
^^f31lo
^^f31po
^^f31so
^^f31vo
^^f31zo
^^f31b^^a5
^^f31m^^a5
^^f31v^^a5
^^f31s^^ed
^^f31v^^ed
^^f31z^^ed
^^f31fi
^^f31zi
^^f31l^^e9
^^f31v^^e9
^^f31z^^e9
^^f31le
^^f31me
^^f31ve
^^f31ze
^^f31ba
^^f31fa
^^f31la
^^f31ma
^^f31pa
^^f31sa
^^f31va
^^f31za
^^f31by
^^f31fy
^^f31ly
^^f31my
^^f31py
^^f31sy
^^f31vy
^^f31zy
i1bu
i1lu
i1mu
i1pu
i1su
i1vu
i1zu
i1bo
i1fo
i1lo
i1mo
i1po
i1so
i1vo
i1zo
i1b^^a5
i1m^^a5
i1p^^a5
i1v^^a5
i1b^^ed
i1l^^ed
i1m^^ed
i1p^^ed
i1s^^ed
i1v^^ed
i1z^^ed
i1v^^f3
i1bi
i1fi
i1li
i1mi
i1pi
i1si
i1vi
i1zi
i1b^^e1
i1l^^e1
i1m^^e1
i1p^^e1
i1s^^e1
i1v^^e1
i1z^^e1
i1b^^e9
i1l^^e9
i1m^^e9
i1p^^e9
i1s^^e9
i1v^^e9
i1z^^e9
i1be
i1fe
i1le
i1me
i1pe
i1se
i1ve
i1ze
i1ba
i1fa
i1la
i1ma
i1pa
i1sa
i1va
i1za
i1b^^fd
i1l^^fd
i1m^^fd
i1p^^fd
i1s^^fd
i1v^^fd
i1z^^fd
i1by
i1fy
i1ly
i1my
i1py
i1sy
i1vy
i1zy
^^e11bu
^^e11fu
^^e11lu
^^e11mu
^^e11pu
^^e11su
^^e11vu
^^e11zu
^^e11bo
^^e11lo
^^e11mo
^^e11po
^^e11so
^^e11vo
^^e11zo
^^e11b^^a5
^^e11f^^a5
^^e11m^^a5
^^e11p^^a5
^^e11v^^a5
^^e11b^^ed
^^e11f^^ed
^^e11l^^ed
^^e11m^^ed
^^e11p^^ed
^^e11s^^ed
^^e11v^^ed
^^e11z^^ed
^^e11bi
^^e11fi
^^e11li
^^e11mi
^^e11pi
^^e11si
^^e11vi
^^e11zi
^^e11b^^e1
^^e11l^^e1
^^e11m^^e1
^^e11p^^e1
^^e11s^^e1
^^e11v^^e1
^^e11z^^e1
^^e11b^^e9
^^e11l^^e9
^^e11m^^e9
^^e11p^^e9
^^e11s^^e9
^^e11v^^e9
^^e11z^^e9
^^e11be
^^e11fe
^^e11le
^^e11me
^^e11pe
^^e11se
^^e11ve
^^e11ze
^^e11ba
^^e11fa
^^e11la
^^e11ma
^^e11pa
^^e11sa
^^e11va
^^e11za
^^e11l^^fd
^^e11m^^fd
^^e11p^^fd
^^e11s^^fd
^^e11v^^fd
^^e11z^^fd
^^e11by
^^e11fy
^^e11ly
^^e11my
^^e11py
^^e11sy
^^e11vy
^^e11zy
^^e91bu
^^e91fu
^^e91lu
^^e91mu
^^e91pu
^^e91su
^^e91vu
^^e91zu
^^e91bo
^^e91lo
^^e91mo
^^e91po
^^e91so
^^e91vo
^^e91zo
^^e91m^^a5
^^e91p^^a5
^^e91v^^a5
^^e91fi
^^e91mi
^^e91pi
^^e91si
^^e91vi
^^e91zi
^^e91b^^e1
^^e91v^^e1
^^e91z^^e1
^^e91l^^e9
^^e91fe
^^e91le
^^e91me
^^e91pe
^^e91se
^^e91ve
^^e91ze
^^e91ba
^^e91la
^^e91ma
^^e91pa
^^e91sa
^^e91va
^^e91za
^^e91by
^^e91ly
^^e91my
^^e91sy
^^e91vy
^^e91zy
e1bu
e1fu
e1lu
e1mu
e1pu
e1su
e1vu
e1zu
e1bo
e1fo
e1lo
e1mo
e1po
e1so
e1vo
e1zo
e1b^^a5
e1m^^a5
e1p^^a5
e1v^^a5
e1b^^ed
e1l^^ed
e1m^^ed
e1p^^ed
e1s^^ed
e1v^^ed
e1z^^ed
e1l^^f3
e1z^^f3
e1bi
e1fi
e1li
e1mi
e1pi
e1si
e1vi
e1zi
e1b^^e1
e1f^^e1
e1l^^e1
e1m^^e1
e1p^^e1
e1s^^e1
e1v^^e1
e1z^^e1
e1b^^e9
e1l^^e9
e1m^^e9
e1p^^e9
e1s^^e9
e1v^^e9
e1z^^e9
e1be
e1fe
e1le
e1me
e1pe
e1se
e1ve
e1ze
e1ba
e1fa
e1la
e1ma
e1pa
e1sa
e1va
e1za
e1b^^fd
e1l^^fd
e1m^^fd
e1p^^fd
e1s^^fd
e1v^^fd
e1z^^fd
e1by
e1ly
e1my
e1py
e1sy
e1vy
e1zy
a1bu
a1fu
a1lu
a1mu
a1pu
a1su
a1vu
a1zu
a1bo
a1fo
a1lo
a1mo
a1po
a1so
a1vo
a1zo
a1b^^a5
a1m^^a5
a1p^^a5
a1v^^a5
a1b^^ed
a1f^^ed
a1l^^ed
a1m^^ed
a1p^^ed
a1s^^ed
a1v^^ed
a1z^^ed
a1l^^f3
a1bi
a1fi
a1li
a1mi
a1pi
a1si
a1vi
a1zi
a1b^^e1
a1f^^e1
a1l^^e1
a1m^^e1
a1p^^e1
a1s^^e1
a1v^^e1
a1z^^e1
a1b^^e9
a1f^^e9
a1l^^e9
a1m^^e9
a1p^^e9
a1s^^e9
a1v^^e9
a1z^^e9
a1be
a1fe
a1le
a1me
a1pe
a1se
a1ve
a1ze
a1ba
a1fa
a1la
a1ma
a1pa
a1sa
a1va
a1za
a1b^^fd
a1l^^fd
a1m^^fd
a1p^^fd
a1s^^fd
a1v^^fd
a1z^^fd
a1by
a1fy
a1ly
a1my
a1py
a1sy
a1vy
a1zy
^^fd1bu
^^fd1fu
^^fd1lu
^^fd1mu
^^fd1pu
^^fd1su
^^fd1vu
^^fd1zu
^^fd1bo
^^fd1lo
^^fd1mo
^^fd1po
^^fd1so
^^fd1vo
^^fd1zo
^^fd1b^^a5
^^fd1m^^a5
^^fd1p^^a5
^^fd1v^^a5
^^fd1l^^ed
^^fd1bi
^^fd1li
^^fd1mi
^^fd1pi
^^fd1si
^^fd1vi
^^fd1zi
^^fd1b^^e1
^^fd1l^^e1
^^fd1m^^e1
^^fd1p^^e1
^^fd1s^^e1
^^fd1v^^e1
^^fd1z^^e1
^^fd1z^^e9
^^fd1be
^^fd1le
^^fd1me
^^fd1pe
^^fd1se
^^fd1ve
^^fd1ze
^^fd1ba
^^fd1la
^^fd1ma
^^fd1pa
^^fd1sa
^^fd1va
^^fd1za
^^fd1by
^^fd1ly
^^fd1my
^^fd1py
^^fd1sy
^^fd1vy
^^fd1zy
y1bu
y1fu
y1lu
y1mu
y1pu
y1su
y1vu
y1zu
y1bo
y1lo
y1mo
y1po
y1so
y1vo
y1zo
y1b^^a5
y1m^^a5
y1p^^a5
y1v^^a5
y1b^^ed
y1l^^ed
y1m^^ed
y1p^^ed
y1s^^ed
y1v^^ed
y1z^^ed
y1m^^f3
y1bi
y1fi
y1li
y1mi
y1pi
y1si
y1vi
y1zi
y1b^^e1
y1f^^e1
y1l^^e1
y1m^^e1
y1p^^e1
y1s^^e1
y1v^^e1
y1z^^e1
y1f^^e9
y1l^^e9
y1m^^e9
y1p^^e9
y1s^^e9
y1v^^e9
y1z^^e9
y1be
y1fe
y1le
y1me
y1pe
y1se
y1ve
y1ze
y1ba
y1fa
y1la
y1ma
y1pa
y1sa
y1va
y1za
y1l^^fd
y1m^^fd
y1p^^fd
y1s^^fd
y1v^^fd
y1z^^fd
y1by
y1ly
y1my
y1py
y1sy
y1vy
y1zy
%slabiŸn‚ r a l
v2r1h
vr2hn
vr2hl
vr3hl.
vr2hc
v2r1ch
vr2chn
vr2chl
v2r1k
vr2kn
vr2kl
vr3kl.
v2r1d
vr2dn
vr2dl
v2r1t
vr2tn
vr2tl
vr3tl.
v2r1n
v2r1^^ba
v2r1^^b2
vr2^^b2k
vr2^^b2n
vr2^^b2m
vr2^^b2t
v2r1^^a3
vr2^^a3m
vr2^^a3t
v2r1c
v2r1b
vr2bk
v2r1s
vr2st
vr2s2tv
v2r1z
vr2zn
vr2zl
vr3zl.
s2r1k
sr2kn
sr2kl
sr3kl.
s2r1d
sr2dn
sr2d^^a3
s2r1n
sr2nk
sr2n^^a3
s2r1^^b2
sr2^^b2m
sr2^^b2t
s2r1b
sr2bs
s2r1p
sr2pn
sr2pk
s2r1s
sr2st
s2rs2tk
s2rs2tn
t2r1h
tr2hl
tr3hl.
tr2hn
t2r1n
tr2nk
tr2n^^a3
t2r1^^ba
tr2^^ban
t2r1^^a3
tr2^^a3k
tr2^^a3m
tr2^^a3t
t2r1b
t2r1m
t2r1p
tr2pn
tr2pm
tr2p^^a3
t2r1s
tr2sn
tr2sl
tr3sl.
tr2sk
t2r1v
ch2r1t
chr2tl
chr3tl.
ch2r1^^a3
chr2^^a3m
chr2^^a3t
ch2r1s
chr2st
p2r1ch
pr2chn
pr2chl
pr3chl.
p2r1k
pr2kn
p2r1d
pr2dl
pr3dl.
p2r1t
p2r1n
p2r1^^b2
pr2^^b2k
p2r1^^a3
p2r1c
p2r1v
pr2vn
pr2vk
m2r1d
mr2dl
m2r1k
mr2kl
mr3kl.
mr2kn
m2r1t
mr2tv
mr2tk
mr2tn
m2r1^^b2
mr2^^b2^^b4
mr2^^b2k
m2r1m
mr2ml
m2r1s
mr2sk
m2r1v
mr2vm
mr2vt
m2r1z
mr2zk
mr2zl
mr3zl.
mr2zn
^^a32r1t
^^a3r2tk
^^a3r2tn
^^a3r2tl
^^a3r3tl.
k2r1t
kr2tn
kr2tl
kr2tk
k2r1n
k2r1^^b2
kr2^^b2k
k2r1^^a3
kr2^^a3n
kr2^^a3k
kr2^^a3m
kr2^^a3t
k2r1b
k2r1m
kr2mn
kr2mm
kr2mt
k2r1z
h2r1k
hr2kl
hr3kl.
hr2kn
h2r1d
hr2dl
hr2dn
h2r1n
hr2nc
hr2nk
hr2n^^a3
hr2^^acm
hr2^^act
h2r1^^a3
h2r1b
hr2bk
hr2b1l
h2r1m
h2r1s
hr2st
h2rs2tm
h2r1z
f2r1k
fr2kl
fr2kn
f2r1^^a3
fr2^^a3k
fr2^^a3m
fr2^^a3t
d2r1n
dr2nk
dr2n^^a3
d2r1^^ba
dr2^^bak
dr2^^bam
dr2^^bat
dr2^^bag
d2r1c
dr2cl
dr3cl.
dr2cn
d2r1b
dr2bn
dr2bl
dr3bl.
d2r1s
dr2sn
d2r1v
d2r1z
dr2zn
dr2zl
c2r1^^a3
b2r1k
br2kn
br2kl
b2r1d
b2r1t
br2tn
br2tl
br3tl.
b2r1n
br2nk
b2r1^^ba
br2^^ba^^a4
b2r1^^a3
br2^^a3k
b2r1v
b2r1z
br2zl
br2zk
br2zd
b2r1b
br2bl
z2r1n
zr2nk
k2l1k
v2l1h
vl2hk
vl2h^^a3
v2l1k
v2l1n
vl2nk
v2l1^^a3
vl2^^a3k
v2l1c
h2l1t
hl2tn
hl2tl
hl3tl.
p2l1ch
p2l1k
p2l1n
p2l1^^ba
p2l1^^ac
p2l1s
pl2st
pl2s^^b4
p2l1z
pl2zl
pl2zn
b2l1b
bl2bn
bl2bl
bl3bl.
bl2bc
bl2b^^a3
m2l1s
ml2sn
m2l1^^ba
ml2^^ban
1^^bal.
1^^b2l.
1^^a3l.
1cl.
1hl.
1c2hl.
1dl.
1tl.
1bl.
1ml.
1pl.
1sl.
1vl.
1zl.
1cr.
1hr.
1c2hr.
1kr.
1dr.
1tr.
1br.
1fr.
1mr.
1pr.
1sr.
1vr.
%dvojice souhl sek
.^^ba4
^^ba1^^b2
^^ba1^^a3
^^ba1c
^^ba1^^a4
^^ba1k
^^ba1d
^^ba1t
^^ba1n
^^ba1b
^^ba1l
^^ba1m
^^ba1p
^^ba1v
.^^b24
^^b21^^b2
^^b21^^a3
^^b21c
^^b21^^b4
^^b21ch
^^b21k
^^b21d
^^b21t
^^b21n
^^b21b
^^b21l
^^b21m
^^b21p
^^b21v
.^^a34
^^a31^^a3
^^a31c
^^a31^^b4
^^a31^^ac
^^a31k
^^a31t
^^a31n
^^a31b
^^a31l
^^a31m
^^a31p
^^a31v
.^^b04
^^b01^^a3
^^b01c
^^b01k
^^b01d
^^b01t
^^b01n
^^b01b
^^b01l
^^b01m
^^b01v
.c4
c1k
c1t
c1n
c1l
c1m
c1v
.j4
j1^^b2
j1^^a3
j1c
j1k
j1d
j1t
j1n
j1b
j1f
j1l
j1m
j1p
j1s
j1v
j1z
.^^a44
^^a41c
^^a41k
^^a41t
^^a41m
.^^b44
^^b41c
^^b41h
^^b41ch
^^b41k
^^b41t
^^b41m
^^b41s
^^b41v
.^^ac4
^^ac1c
^^ac1h
^^ac1ch
^^ac1k
^^ac1d
^^ac1t
^^ac1m
^^ac1p
^^ac1z
.h4
h1^^b2
h1^^a3
h1c
h1k
h1d
h1n
h1l
.ch4
4ch.
ch1b
ch1r
ch1t
ch1n
ch1l
ch1m
.k4
k1^^b2
k1^^a3
k1^^b0
k1c
k1ch
k1r
k1t
k1n
k1b
k1l
k1m
k1p
k1s
k1vic
.r4
r1^^b2
r1^^a3
r1c
r1h
r1ch
r1k
r1d
r1t
r1n
r1b
r1l
r1m
r1p
r1s
r1v
r1z
.d4
d1^^ba
d1^^b2
d1^^a3
d1^^b0
d1c
d1^^b4
d1^^ac
d1h
d1ch
d1k
d1n
d1b
d1l
d1m
d1p
d1r
d1s
d1v
.t4
t1^^b2
t1^^a3
t1c
t1ch
t1k
t1r
t1n
t1b
t1f
t1l
t1m
t1p
t1v
.n4
n1^^ba
n1^^b2
n1^^a3
n1c
n1^^a4
n1h
n1ch
n1k
n1r
n1d
n1t
n1n
n1b
n1l
n1p
n1z
.x4
x1c
x1k
x1b
x1f
x1l
x1p
x1n
x1h
x1t
.b4
b1^^ba
b1^^b2
b1^^a3
b1^^b0
b1c
b1h
b1ch
b1k
b1r
b1n
b1f
b1l
b1m
b1s
b1v
b1z
.f4
f1l
f1k
f1s
.l4
l1^^ba
l1^^b2
l1^^a3
l1^^ac
l1c
l1k
l1d
l1t
l1n
l1b
l1m
l1p
l1s
l1v
l1z
.m4
m1^^b2
m1^^a3
m1c
m1ch
m1k
m1r
m1d
m1t
m1n
m1b
m1l
m1p
m1s
m1z
.p4
p1^^a3
p1^^b0
p1c
p1ch
p1k
p1r
p1t
p1n
p1l
.s4
s1^^b2
s1^^a3
s1^^ac
s1c
s1k
s1r
s1t
s1n
s1b
s1l
s1m
s1p
.v4
v1^^b2
v1^^a3
v1^^ac
v1c
v1ch
v1k
v1r
v1d
v1t
v1n
v1b
v1l
v1m
v1p
v1s
.z4
z1^^b2
z1^^a3
z1c
z1k
z1d
z1t
z1b
z1l
z1m
z1n
z1p
z1v
.g4
g1n
g1r
g1m
g1g
d1g
r1g
n1g
j1g
l1g
f1g
s1g
v1g
%v¡cesouhl skov‚ skupiny
b2s1c
b1s2k
b1^^b22t
c2t2n
c1t2v
^^a31s2k
^^a31^^b22t
d1s2k
d1^^b22t
f1g2h
h2^^b02m
j1g2l
j2^^a41m
j1s2k
j1^^b22t
j2s2m
k2t1n
k2t1r
k3t2ri
k2^^a31n
k2^^b02t
l2k2n
l1s2k
l1^^b22t
l2s2t
l1t2r
m2b1d
m1b2r
m2d2l
m2k2l
m2k2n
m1p2l
m2p2t
m1s2k
m1^^b22t
m2s2t
n1g2l.
n2g1l
n2k1c
n2k1l
n2k1r
n2k1t
n2s1f
n1s2k
n1s2t
n2t1g
n2t1k
n2t1n
n2t1s
n2t1v
n2^^a31n
n1^^b22t
p2t1k
p2^^a31n
p2r2s
p1s2k
p1^^b22t
r2d1n
r2k1r
r2k1t
r2m1n
r2p1c
r2p1^^a3
r1s2k
r1s2p
r2t1l
r2t1n
r2v1n
r2z1n
r1^^b22t
s2h2l
s2h2r
s2ch2v
s2k2l
s2k2r
s2k1v
s2m2l
s2m1n
s2p2l
s2p2r
s2t1k
s2t2l
s2t1m
s2t1n
s2t1r
s2t2^^b0
^^b21s2k
t2k2n
t2^^b01k
t2^^b01n
t1s2k
v1s2k
v1^^b22t
v2s2t
v2z2d
v2z2l
v2z2n
v2z2t
v2^^ba2d
z2d2l
z2d1n
z2d2v
z2k2l
z2v2l
^^ba1s2k
^^ba1^^b22t
^^a32t2v
^^ac1s2k
^^ac1^^b22t
^^b22k2l
o^^b2k3l
^^b22t1m
^^b22t1n
^^b22t2v
^^b22^^b41k
%poŸ teŸn¡ skupiny hl sek
.s2t2r
%pýedpony
.be2z1
bez1b2
bez1h2
be3z2ov
be3z2ink
bez1k2
bez1m2
bez1p2
bez1s2
bez1t2
.be3z2e1
.bezec2
.bezej2
.bezel2
.bezes2
.bezest2
.bezez2
blaho1
blahos2
blahop2
boje1
bojes2
bojech2
celo1
celod2
celop2
celos2
celoz2
.^^a3ty^^b01
.^^a3ty^^b0^^a32
.^^a3ty^^b0h2
.^^a3ty^^b0k2
.^^a3ty^^b0s2
.^^a3ty^^b0v2
.daleko1
.dalekoh2
.dalekoz2
.do1
.do^^a32
.doh2
.doj2
.dok2
.do2k3s
.do2k3t
.dom2
.doo1p2
.dop2
.dos2
.dot2
.do^^fa1^^a32
.dov2
.doz2
.do^^ba2
d^^b71
d^^b7k2
d^^b7s2
d^^b7t2
d^^b7v2
dvoj1
dvou1
dvoj^^a32
dvou^^a32
dvojk2
dvouk2
dvojst2r
dvoust3r
jedno1
jednoh2
jednos2
jednot2
jedno2t3k
jedno2t3l
jedno2t3n
jednoz2
kolem1
kolemj2
kolems2
.koso1
.koso^^a32t2v
kro2m1
.kro3m2^^a5
.lec1
.lec2h
.leck2
.leda1k
.leda2s1k2
.mezi1
.mezib2
.mezi^^a32
.mezi2^^a33k
.mezid2
.mezih2
.meziv2
.mimo1s2
.mimo1st2
m^^edsto1d2
m^^edsto1k2
m^^edsto1p2
.mnoho1
.mnohoh2
.mnohos2
.mnoho^^a32
.na1
.nab2
.nac2
.na^^a32
.nah2
.nach2
.naj2
.nak2
.nal2
.nam2
.nap2
.na^^b02
.nas2
.nast2
.na^^b22
.nat2
.nav2
.naz2
.n^^e11
.n^^e1b2
.n^^e1c2
.n^^e1d2
.n^^e12d3h
.n^^e1h2
.n^^e1k2
.n^^e1m2
.n^^e1p2
.n^^e1r2
.n^^e1s2
.n^^e1st2
.n^^e1t2
.n^^e1v2
.na2d1
.na3d2^^a5
.na3d2a
.na3d2^^e1
.na3d2^^ed
.na3d2i
.na3d2u
.na3d2o
.na4d3obl
.na4d3oby^^a3
.na3d2o1smr
.na3d2r
.na4d3rot
.nadch2
.nadh2
.nadk2
.nads2
.nadz2
.na3d2e1
.nadez2
.naded2
.nadej2
.nadeh2
.nadel2
.nadep2
.nade^^b22
.ne1
.neb2
.nec2
.ne^^a32
.ned2
.neg2
.ne2g3l
.neh2
.ne2h1t
.nech2
.ne2ch.
.ne2ch^^b43
.nek2
.ne2kro
.ne2kt
.nel2
.nem2
.nep2
.ner2
.ne2r2v
.ne^^b02
.nes2
.nest2
.ne^^b22
.net2
.nev2
.nez2
.nedo1
.nedob2ra
.nedok2
.nedom2
.nedop2
.nedor2
.nedos2
.nedot2
.nedov2
.nedoz2
.neod1
.neodh2
.neodch2
.neodm2
.neod2ol
.neodp2
.neods2
.neodst2
.neod^^b22
.neodt2
.neodz2
.neod2e1
.neodeb2
.neodeh2
.neodej2
.neodem2
.neodep2
.neodes2
.neode^^b22
.neodez
.neod2^^a5
.nepo1
.nepob2
.nepoc2
.nepof2
.nepog2
.nepoh2
.nepoch2
.nepoj2
.nepok2
.nepom2
.nepo2mp
.nepon2
.nepop2
.nepo2r1t
.nepos2
.nepost2
.nepo^^b22
.nepo2^^b23t
.nepo3^^b24^^b4u
.nepot2
.nepo7u^^a3
.nepo7u1k2
.nepov2
.nepoz2
.nepo2d1
.nepo3d2a
.nepo3d2i
.nepo3d2ob
.nepo3d2u
.nepo3d2^^e1
.nepo3d2^^ed
.nepodh2
.nepodk2
.nepo3d2ot
.nepodp2
.nepo3d2r^^e1^^bad
.nepo3d2ra^^ba
.nepods2
.nepodst2
.nepodv2
.nepo3d2e1
.nepodeb2
.nepodej2
.nepodem2
.nepodep2
.nepodes2
.nepodez2
.nepro1
.neprob2
.neproc2
.nepro^^a32
.neprod2
.neprog2
.neproj2
.neproh2
.neproch2
.neprok2
.neprol2
.neprom2
.neprop2
.nepror2
.nepro^^b02
.nepros2
.neprost2
.nepro^^b22
.neprot2
.neprov2
.neproz2
.nepro^^ba2
.nep^^b0e2d1
.nep^^b0e3d2a
.nep^^b0e3d2^^e1
.nep^^b0e3d2ra
.nep^^b0edk2
.nep^^b0eds2
.nep^^b0edv2
.nep^^b0edz2
.nep^^b0edpo3k2
.nep^^b0e3d2e1
.nep^^b0edej2
.nep^^b0edes2
.nep^^b0edest2
.nep^^b0ede^^b22
.nep^^b0e2s1n
.nep^^b0e1
.nep^^b0eb2
.nep^^b0ec2
.nep^^b0e^^a32
.nep^^b0eh2
.nep^^b0ej2
.nep^^b0ek2
.nep^^b0el2
.nep^^b0em2
.nep^^b0ep2
.nep^^b0er2
.nep^^b0e^^b02
.nep^^b0e^^b22
.nep^^b0et2
.nep^^b0ev2
.nep^^b0ez2
.nep^^b0i1
.nep^^b0ib2
.nep^^b0ic2
.nep^^b0i^^a32
.nep^^b0id2
.nep^^b0ij2
.nep^^b0ih2
.nep^^b0ik2
.nep^^b0il2
.nep^^b0im2
.nep^^b0ip2
.nep^^b0i^^b02
.nep^^b0is2
.nep^^b0ist2
.nep^^b0i^^b22
.nep^^b0it2
.nep^^b0iv2
.nep^^b0iz2
.nero2z1
.nero3zum
.nerozb2
.neroz^^a32
.nerozd2
.nerozh2
.nerozk2
.nerozp2
.nerozs2
.nerozst2
.neroz^^b22
.nerozt2
.nerozv2
.nerozz2
.nero3z2e1
.nerozeb2
.neroze^^a32
.nerozed2
.nerozeh2
.nerozej2
.nerozek2
.nerozel2
.nerozem2
.nerozep2
.nerozer2
.neroze^^b02
.nerozes2
.nerozest2
.neroze^^b22
.nerozet2
.nerozev2
.nerozez2
.nesou1
.nesou^^a32
.nesoud2
.nesouh2
.nesouk2
.nesoum2
.nesous2
.nesoust2
.nesou^^b22
.nesouv2
.nesouz2
.neupo1
.neupos2
.neupot2
.n^^a51k2
.ne2j1
.ne3j2du.
.ne3j2de^^b2.
.ne3j2de.
.ne3j2deme.
.ne3j2dete.
.ne3j2dou.
.ne3j2e
.ne3j2a
.ne3j2sem.
.ne3j2si.
.ne3j2sme.
.ne3j2ste.
.ne3j2sou.
.ne4j3akt
.ne3j2i
.ne3j2^^ed
.nejd2
.nejf2
.nejh2
.nejk2
.nejm2
.nejp2
.nejs2
.nejst2
.nejt2
.nejv2
.nejz2
.nejne1
.nejnep2
.nejnes2
.nejnez2
.ni1k2
.o1
.oh2
.ok2
.ok3t
.okolo1
.okoloj2
.okolos2
.om2
.op2
.op3ti
.op3to
.or2v
.os2l
.os2m
.os3mo
.os2n
.os2p
.os2tu
.os2ty
.os2t^^fd
.os2t2r
.os2v
.o^^b22
.ot2r
.ot3ru
.ov2
.oz2
.o^^ba2
.o2b1d2
.o2b1j
.o2b1k2
.o2b1r
.o3b2ran
.o3b2r^^e1n
.o2b1^^b0
.o2b1s2
.o2b1^^b22
.o2b1t2
.o2b1v2
.o2b1z2
.o2boj1s2
.o2boj1st2r
.o2boj1^^ba
.o2boj1r
.o2boj1n
.obou1
.obous2
.obousm2
.ob2e1
.obe2c1
.obeh2
obej2
obel2
obep2
.obes2
.obest2
.obet2
.obez2
.od1
.odh2
.odch2
.odm2
.od2ol
.odp2
.ods2
.odst2
.od^^b22
.odt2
.odz2
.od2e1
.odeb2
.odeh2
.odej2
.odem2
.odep2
.odes2
.ode^^b22
.odez
.od2^^a5
.ote1v2
.pa1h2r
.pa1k2l
.pa1m2l
.pa1p2r
.pa1t2v
.pa1z2v
.pa4s3tv
.p^^a5ti1
.p^^a5ti^^a32
.p^^a5tih2
.p^^a5tik2
.p^^a5tis2
.p^^a5tiv2
.po1
.pob2
.poc2
.po^^a32
.pof2
.pog2
.poh2
.poch2
.po2int
.poj2
.po2j^^a4
.pok2
.po2ls
.po2l^^b2
.pom2
.po2mp
.pon2
.pop2
.po2rn
.po2r1t
.por2tl
.pos2
.post2
.po^^b22
.po2^^b23t
.po2^^b23^^b4
.po3^^b24t^^a5v
.po3^^b24^^b4u
.pot2
.po7u^^a3
.po7u1k2
.po7uli^^a3
.pov2
.poz2
.po2z3d^^a5
.po2d1
.po3d2a
.po3d2i
.po3d2le.
.po3d2ob
.po4d3obl
.po4d3oboj
.po4d3obo^^a3
.po3d2rob
.po3d2u
.po3d2^^e1
.po3d2^^ed
.podh2
.podk2
.podm2
.po3d2ol
.po3d2ot
.podp2
.po3d2r^^e1^^bad
.po3d2ra^^bai
.pods2
.podst2
.podv2
.po3d2e1
.podeb2
.podej2
.podem2
.podep2
.podes2
.podez2
.polo1o1
.polo1p2
.polo1s2
.pra1
.pras2
.pra2s1k
.pra2s1n
.pra2cn
.pra2^^a3k
.pra2h1n
.pra2h1l
.pra2kt
.pra2^^b2t
.pra2vd
.pro1
.prob2
.proc2
.pro^^a32
.prod2
.prog2
.proj2
.proh2
.proch2
.prok2
.prol2
.prom2
.prop2
.pror2
.pro^^b02
.pros2
.prost2
.pro^^b22
.prot2
.pro2u
.prov2
.proz2
.pro^^ba2
proti1
protik2
protim2
protip2
protis2
protist2
pr^^b71
pr^^b72mk
pr^^b7h2
pr^^b7k2
pr^^b7p2
pr^^b7r2
pr^^b7s2
pr^^b7t2
pr^^b7v2
pr^^b7z
.p^^b0e1
.p^^b0eb2
.p^^b0ec2
.p^^b0e^^a32
.p^^b0eh2
.p^^b0ej2
.p^^b0ek2
.p^^b0el2
.p^^b0em2
.p^^b0ep2
.p^^b0er2
.p^^b0e^^b02
.p^^b0es2
.p^^b0e2s1^^a3
.p^^b0e2sto
.p^^b0e2sn
.p^^b0e^^b22
.p^^b0et2
.p^^b0ev2
.p^^b0ez2
.p^^b0e2d1
.p^^b0e3d2a
.p^^b0e3d2^^e1
.p^^b0e3d2ra
.p^^b0e3d2r^^e1^^bad
.p^^b0edk2
.p^^b0eds2
.p^^b0edv2
.p^^b0edz2
.p^^b0edpo3k2
.p^^b0e3d2e1
.p^^b0edej2
.p^^b0edes2
.p^^b0edest2
.p^^b0ede^^b22
.p^^b0edev2
.p^^b0e3s2n^^edd
.p^^b0e2s1po
.p^^b0e2s1p^^b0
.p^^b0e2s1len
.p^^b0e2s1li
.p^^b0i1
.p^^b0ib2
.p^^b0ic2
.p^^b0i^^a32
.p^^b0id2
.p^^b0ij2
.p^^b0ih2
.p^^b0ik2
.p^^b0il2
.p^^b0im2
.p^^b0ip2
.p^^b0i^^b02
.p^^b0is2
.p^^b0ist2
.p^^b0i^^b22
.p^^b0it2
.p^^b0iv2
.p^^b0iz2
p^^b0^^ed1
p^^b0^^ed2m1n
p^^b0^^edb2
p^^b0^^ed2^^a3k
p^^b0^^ed2^^a3n
p^^b0^^edj2
p^^b0^^edk2
p^^b0^^edm2
p^^b0^^edp2
p^^b0^^eds2
p^^b0^^edst2
p^^b0^^ed^^b22
p^^b0^^edt2
p^^b0^^edv2
p^^b0^^edz2
p^^b71j2d
.ro2z1
.ro3zum
.rozb2
.roz^^a32
.rozd2
.rozh2
.rozk2
.rozp2
.rozs2
.rozst2
.roz^^b22
.rozt2
.rozv2
.rozz2
.ro3z2e1
.rozeb2
.roze^^a32
.rozed2
.rozeh2
.rozej2
.rozek2
.rozel2
.rozem2
.rozep2
.rozer2
.roze^^b02
.rozes2
.rozest2
.roze^^b22
.rozet2
.rozev2
.rozez2
.sd2
.sh2
.sk2
.sp2
.sv2
.se1
.se2dmi
.se2dme
.se2dl
.se2dn
.seb2
.sebe1
.sebek2
.sec2
.se2^^a3
.se3^^a32t
.se2gm
.seg2
.seh2
.se2is1
.sej2
.sek2
.sel2
.sem2
.sep2
.se2p1t
.sep2ta
.serv2
.se2rvis
.se^^b02
.ses2
.se2st
se3st2roj
.se3st2^^b0el
.se^^b22
.set2
.sev2
.se2x1
.sez2
.sou1
.sou^^a32
.soud2
.sou2d3c
.sou2d3n
.souh2
.souj2
.souk2
.soum2
.soup2
.sous2
.soust2
.sou^^b22
.souv2
.souz2
.spolu1
.spolub2
.spolup2
.nespolu1p2
.^^b2esti1
.^^b2esti^^a32
.^^b2estih2
.^^b2estik2
.^^b2estis2
.^^b2estiv2
.tro2j1^^fa
.tro2j1s2
.u1
.ub2
.uc2
.ud2
.uh2
.u2h3l
.u3h4lad
.u3h4l^^edd
.u2h3r
.u3h4rad
.u3h4rab
.u3h4r^^e1
.u4h5r^^e1m.
.u4h5r^^e1ch.
.uch2
.uj2
.uk2
.ul2h
.ul2p
.um2
.up2
.upo1
.upos2
.upot2
.ur2
.ur3b
.ur3^^a3
.u^^b02
.us2
.ust2
.u^^b22
.ut2
.uv2
.uz2
.u2z3b
.u2z3d
.u2z3l
.u2z3m
.u^^ba2
.u2^^ba3^^b2^^ed
^^fa1
^^fac2
^^fa^^a32
^^fa2hl
^^fa3h2lav
^^faj2
^^fak2
^^fap2
^^fas2
^^fa2s3t
^^fas4tn
^^fa3s4tav
^^fa3s4t2r
^^fa3s4t2^^b0
^^fa4s5t3^^b0i
^^fa^^b22
^^fat2
^^fav2
^^fa2z1k
.vk2
.vp2
.vs2
.vst2
.v^^b22
.vt2
.vz2
.ve1
.vec2
.ved2
.v^^a51h2l
.veh2
.ve2jc
.ve2j^^a3
.ve2jp
.ve2kt
.vem2
.ve2n1
.ve2p3^^b0
.vep2
.ve2r
.ve3ri
.ves2
.ve2s3l
.ve2s3m^^ed
.ve2s3n
.ve2s3t
.ve3s4tav
.ve^^b22
.ve2^^b23k
.vet2
.ve2tch
.vev2
.ve2z3
.ve3zl.
.ve2l1b2
.ve2l1k
.ve2l1m
.ve2l1t2
.ve2l2t3l
.vele1
.vele2bn
.veleh2
.veles2
.velest2
.velez2
.vodo1
.vodot2
.vodoz2
.v^^b2e1
.v^^b2e2ch.
.vy1
.vyb2
.vyc2
.vy^^a32
.vyd2
.vy2d1r
.vy3d2rol
.vy3d2r^^e1p
.vy3d2r^^e1s
.vyh2
.vyj2
.vyk2
.vyl2
.vym2
.vyn2
.vyp2
.vyr2
.vy^^b02
.vys2
.vyst2
.vy^^b22
.vy2^^b23^^b2
.vyt2
.vyv2
.vyz2
.v^^fd1
.v^^fd^^a32
.v^^fdh2
.v^^fdk2
.v^^fdm2
.v^^fdp2
.v^^fdr2v
.v^^fds2
.v^^fdst2
.v^^fd^^b22
.v^^fd2^^b23k
.v^^fdt2
.v^^fdv2
.v^^fdz2
.vz1h2
.vz1p2
.vz1t2
.vze1
.vzed2
.vzep2
.vzes2
.vze^^b22
.vzez2
.zd2
.zh2
.zch2
.zk2
.zl2
.zm2
.zp2
.zr2
.zt2
.zv2
.zne1
.znek2
.znem2
.znep2
.zne2rv
.znes2
.zne^^b22
.znet2
.za1
.z3a2larm
.z3akti
.zab2
.za^^a32
.zad2
.zah2
.zach2
.zaj2
.zak2
.zal2
.zam2
.zap2
.zar2
.za^^b02
.zas2
.zast2
.za^^b22
.zat2
.zav2
.zaz2
.zane1
.zaned2
.zanes2
.zane^^b22
.uza1m2
.uza1r2
.uza1v2
.z^^e11
.z^^e1b2
.z^^e1c2
.z^^e1d2
.z^^e1h2
.z^^e1ch2
.z^^e1j2
.z^^e1k2
.nejz^^e11k2
.z^^e1m2
.z^^e1p2
.z^^e1s2
.z^^e1st2
.z^^e1^^b22
.z^^e1t2
.z^^e1v2
.z^^e1z2
.z2e1
.z3e2f
.zed2
.ze2d1n
.zej2
.zem2
.ze2ms
.ze2mn
.zep2
.zes2
.zet2
.zev2
.zez2
z^^b71
%ciz¡ pýedpony
.a1e2ro
.a1d2re
.a1g2no
.a1ch2r
.a1k2l
.a1k2re
.an1es
an3g2l
.an2t1ar
.anti1
.antik2
.antip2
an1t2ro1
.ar2ch1an
.as2pek
.a1s2t
.as3t2r
asym3p2t
.a1t2r
.aus^^b2t2r
.auto1
.abs^^b2t2
.de1f2
.de1g2
.de1k2
.de1p2
.de2p3ta
.de2z1
.di1o
.di1p2
.dis3k2v
dis3k2r
dis3t2r
.di1u
.du1p2l
.epi1
.epig2
.ex1
.exk2
.exp2
.ext2
.ex2o
ex2i1s
.fyto1
.fytop2
.ide1
.ide2n
.in1
.inc2
.inf2
.ing2
.ink2
.ins2
.int2
.inter1
.interp2
.inters2
.kom1p2
.kon3g2
.kon3k2
.kon3s2
.konst2
.kon3t2
.kon3v2
.ko1o
.hyper1
.hypert2
.hypo1
.hypos2
.kata1k2l
.ko1i
.ko1e
.para1
.paraf2
.parag2
.re1
.ref2
.reg2
.re2j1
.rek2
.re2n2d
.re2n2t
.rep2
.re2pti
.res2
.re2sp.
.ret2
.sub1
.super1
.superp2
.supers2
.supra1
.sy1s2t
.te1o1
.topo1g2
.tran2s1
.tran3s2pi
.tran3s2k2r
.tran3s2c
.tri1
.trip2
.tri2^^a3k
.tri2st
.zoo1
.zoop2
.zoos2
%pý¡pony a koncovky
i1ent
ru1ov
3s2t2v^^ed
3s2t2vo.
3s2t2va.
3s2t2vu.
3s2t2ve
3s2tev.
3s2tevn
3s2t2v^^b7m.
3s2t2vy.
3^^bae.
.m4^^bae.
3hle.
c4hle.
3li.
3ly.
3la.
3nout.
3nouti.
i1^^e1n
a1tb
e1tb
i1tb
1t2va.
1t2vy.
1t2v^^a5.
1t2vu.
1t2vou.
1t2ev.
1t2v^^e1m.
1t2v^^e1ch.
1t2vami.
3s2t2v
a4s3t2v
^^e14st3v
3k2rac
3k2rat
3k2r^^e1t.
3k2r^^e1te.
3p2lex
1t2rof
1s2trof
%vìjimky
.a1v2^^b2ak
.atmo1s2f
.ce1d1r
^^a3esko3s4l
^^a3esko3b4r
.e1gyp2t1
.elek1t
.elek3t1r
.elek3t1^^b0
elip1s
elip1t
eu1k2lei1d
.i1h2ned
kladko1s2t2roj
mo^^b0e1p2lav
.pe1t1r
oka1m^^bai
s2t2ran
z2d2rav
z^^b71s2ta
1.18.1.4/tmac/lbp.tmac 0000666 00000000316 15047753021 0010013 0 ustar 00 .\" lbp.tmac
.\"
.nr _C \n(.C
.cp 0
.ftr CW CR
.ftr C CR
.ftr CO CI
.ftr H HR
.ftr HO HI
.ftr HX HBI
.ftr Hr HNR
.ftr Hi HNI
.ftr Hb HNB
.ftr Hx HNBI
.ftr EBI EI
.ftr CBI CI
.cp \n(_C
.
.do mso latin1.tmac
1.18.1.4/tmac/X.tmac 0000666 00000002735 15047753021 0007454 0 ustar 00 .\" X.tmac
.\"
.nr _C \n(.C
.cp 0
.ftr CW CR
.ftr C CR
.ftr CO CI
.ftr CX CBI
.ftr H HR
.ftr HO HI
.ftr HX HBI
.ftr NX NBI
.char \[ru] \D'l .5m 0'
.char \[ul] \v'.25m'\D'l .5m 0'\v'-.25m'
.char \[br] \v'.25m'\D'l 0 -1m'\v'.75m'
.char \[rn] \v'-.75m'\D'l .5m 0'\v'.75m'
.char ~ \v'-.55m'\\s[\\n(.s/2u]\v'.2m'\[ti]\v'-.2m'\s0\v'.55m'
.char ^ \v'-.55m'\\s[\\n(.s/2u]\v'.3m'\[ha]\v'-.3m'\s0\v'.55m'
.fchar \[va] \o'\[ua]\[da]'
.fchar \[em] --
.fchar \[en] \-
.fchar \[fi] fi
.fchar \[fl] fl
.fchar \[ff] ff
.fchar \[Fi] ffi
.fchar \[Fl] ffl
.fchar \[ci] \v'-.25m'\h'.05m'\D'c .5m'\h'.05m'\v'.25m'
.fchar \[sq] \h'.05m'\D'l .5m 0'\D'l 0 -.5m'\D'l -.5m 0'\D'l 0 .5m'\h'.55m'
.fchar \[ga] \Z'\v'-.7m'\D'l .22m .18m''\h'.33m'
.fchar \[dg] \Z'\h'.25m'\v'.15m'\D'l 0 -.8m'\v'.2m'\h'-.195m'\
\D'l .39m 0''\h'.5m'
.fchar \[dd] \Z'\h'.25m'\v'.15m'\D'l 0 -.8m'\v'.2m'\h'-.195m'\
\D'l .39m 0'\v'.4m'\D'l -.39m 0''\h'.5m'
.fchar \[lq] ``
.fchar \[rq] ''
.fchar \[Bq] ,,
.fchar \[OE] O\h'-.25m'E
.fchar \[oe] o\h'-.14m'e
.fchar \[ah] \v'-.55m'\s[\En[.s]/2u]v\s0\v'.55m'
.fchar \[ao] \v'-.55m'\s[\En[.s]*6u/10u]\D'c .25m'\s0\v'.55m'
.fchar \[ho] \s[\En[.s]/2u]\v'.4m'c\v'-.4m'\s0
.fchar \[lh] \[lA]
.fchar \[rh] \[rA]
.fchar \[bq] ,
.fchar \[aq] '
.if '\*[.T]'X100' \
. char \[radicalex] \h'-\w'\[sr]'u'\[radicalex]\h'\w'\[sr]'u'
.if !\n[_C] \
. mso pspic.tmac
.cp \n[_C]
.
.do ie '\[char97]'a' \
. do mso latin1.tmac
.el \
. do mso cp1047.tmac
.
.\" make sure that no blank lines creep in at the end of this file.
1.18.1.4/tmac/mse.tmac 0000666 00000006722 15047753021 0010031 0 ustar 00 .\" $Id: mse.tmac,v 2.1 2000/11/17 04:26:02 jhaegg Exp $
.\"
.\" swedish version of mm
.\" See m.tmac for version-information.
.ds @language se
.mso m.tmac
.ISODATE
.\"
.ds App Bilaga
.ds Lf Figurer
.ds Lt Tabeller
.ds Lx Uppställningar
.ds Le Ekvationer
.\" Page length
.if !r L .nr @pl 28.5c
.\" page width
.if !r W .nr @ll 13c
.\" page offset
.if !r O .nr @po 3.5c
.\" set the above parameters
.ll \n[@ll]u
.po \n[@po]u
.pl \n[@pl]u
.ds Lifg Figur
.ds Litb Tabell
.ds Liex Uppställning
.ds Liec Ekvation
.ds Licon Innehållsförteckning
.ds Qrf Se kapitel \\*[Qrfh], sidan \\*[Qrfp].
.ds Rp Referenser
.ds Letfc Vänliga hälsningar
.ds Letapp Godkänd av:
.ds Letdate datum
.ds Letconf KONFIDENTIELLT
.ds Letsal Till vederbörande:
.ds Letatt ATTENTION:
.ds Letsubj Innehåll:
.ds Letref Refererande till:
.\"
.ds Letns!copy Kopia \" space!
.ds Letns!to " till
.ds Letns!0 Kopia till
.ds Letns!1 Kopia (med att.) till
.ds Letns!2 Kopia (utan att.) till
.ds Letns!3 Att.
.ds Letns!4 Atts.
.ds Letns!5 Enc.
.ds Letns!6 Encs.
.ds Letns!7 Annat försättsblad
.ds Letns!8 Brev till
.ds Letns!9 Dokument till
.ds Letns!10 Kopia (med atts.) till
.ds Letns!11 Kopia (utan atts.) till
.ds Letns!12 Endast abstract till
.ds Letns!13 Hela dokumentet till
.ds Letns!14 CC:
.\"
.ds MO1 januari
.ds MO2 februari
.ds MO3 mars
.ds MO4 april
.ds MO5 maj
.ds MO6 juni
.ds MO7 juli
.ds MO8 augusti
.ds MO9 september
.ds MO10 oktober
.ds MO11 november
.ds MO12 december
.nr pg*footer-size 4\" 1v+footer+even/odd footer+1v
.\"------------------------------------------------
.\" Dokumentnamn
.ds LetDNAMN
.\" Mottagarens datum
.ds LetMDAT Ert datum:
.\" Bilaga
.ds LetBIL Bilaga \"
.\" Kompletteringsuppgift
.ds LetKOMP
.\" Dokumentbeteckning eller dokumentnummer
.ds LetDBET
.\" Beteckning (ärendebeteckning i form av diarienummer e.d.
.ds LetBET Beteckning:
.\" Mottagarens beteckning.
.ds LetMBET Er beteckning:
.\" Antal sidor
.ds LetSIDOR
.\" Svensk standard med högerställd löptext. ---------------------
.de let@init_SVH
.in 4.57c
.ll 17.57c
..
.de let@head_SVH
.rm let@header
.let@print_SV H
..
.de let@sg_SVH
..
.de let@fc_SVH
..
.\" Svensk standard med vänsterställd löptext. ---------------------
.de let@init_SVV
..
.de let@head_SVV
.rm let@header
.let@print_SV V
..
.de let@sg_SVV
..
.de let@fc_SVV
..
.\"--------------------------------
.de let@print_SV
.nf
.\" pos T0 -----------------------------------
.in 0
.sp |3
.if d let@wa-div .let@wa-div
.\"----- addressat
.if '\\$1'V' .if d let@ia-div \{\
. sp |10
. let@ia-div
.\}
.\" pos T4 -----------------------------------
.in 9.14c
.\"----- kompletteringsuppgift
.if d let*lo-KOMP \{\
. sp |2
\\*[let*lo-KOMP]
.\}
.\"----- dokumentnamn
.if d let*lo-DNAMN \{\
. sp |3
\\*[let*lo-DNAMN]
.\}
.\"----- datum
.if d cov*new-date \{\
. sp |5
Datum:
\\*[cov*new-date]
.\}
.\"----- mottagarens datum
.if d let*lo-MDAT \{\
. sp |7
\\*[LetMDAT]
\\*[let*lo-MDAT]
.\}
.\"----- addressat
.if '\\$1'H' .if d let@ia-div \{\
. sp |10
. let@ia-div
.\}
.\" pos T6 -----------------------------------
.in 13.72c
.\"----- mottagarens beteck.
.if d let*lo-MBET \{\
. sp |7
\\*[LetMBET]
\\*[let*lo-MBET]
.\}
.\"----- dokumentbeteck.
.if d let*lo-BET \{\
. sp |3
\\*[LetBET]
\\*[let*lo-BET]
.\}
.\" pos T7 -----------------------------------
.in 16c
.\"----- bilaga
.if d let*lo-BIL \{\
. sp |2
\\*[LetBIL]\\*[let*lo-BIL]
.\}
.\"
.\"----- sidnummer
.sp |3
.ie d let*lo-SIDOR \\n[%] (\\*[let*lo-SIDOR])
.el \\n[%]
.\"
.\" Ta hand om special
.if d TP .TP
.sp |17
..
.\" -----------------------------------
1.18.1.4/tmac/html.tmac 0000666 00000050232 15047753021 0010204 0 ustar 00 .\" html.tmac
.\"
.nr _C \n(.C
.cp 0
.
.nroff
.
.ftr CW CR
.ftr C CR
.ftr CO CI
.ftr CX CBI
.ftr H HR
.ftr HO HI
.ftr HX HBI
.ftr NX NBI
.
.fchar \[fi] fi
.fchar \[fl] fl
.fchar \[ff] ff
.fchar \[Fi] ffi
.fchar \[Fl] ffl
.
.\"
.\" remove hyphenation
.\"
.de hy
..
.de nh
..
.
.\" Now set any characters defined in devps/S but not in devhtml/S to nul --
.\" these are generated by eqn but not used by grohtml. grops generated
.\" images during the alternative pass.
.if !c\[*y] .tr \[*y]
.if !c\[fa] .tr \[fa]
.if !c\[te] .tr \[te]
.if !c\[st] .tr \[st]
.if !c\[=~] .tr \[=~]
.if !c\[*A] .tr \[*A]
.if !c\[*B] .tr \[*B]
.if !c\[*X] .tr \[*X]
.if !c\[*D] .tr \[*D]
.if !c\[*E] .tr \[*E]
.if !c\[*F] .tr \[*F]
.if !c\[*G] .tr \[*G]
.if !c\[*Y] .tr \[*Y]
.if !c\[*I] .tr \[*I]
.if !c\[+h] .tr \[+h]
.if !c\[*K] .tr \[*K]
.if !c\[*L] .tr \[*L]
.if !c\[*M] .tr \[*M]
.if !c\[*N] .tr \[*N]
.if !c\[*O] .tr \[*O]
.if !c\[*P] .tr \[*P]
.if !c\[*H] .tr \[*H]
.if !c\[*R] .tr \[*R]
.if !c\[*S] .tr \[*S]
.if !c\[*T] .tr \[*T]
.if !c\[ts] .tr \[ts]
.if !c\[*W] .tr \[*W]
.if !c\[*C] .tr \[*C]
.if !c\[*Q] .tr \[*Q]
.if !c\[*Z] .tr \[*Z]
.if !c\[3d] .tr \[3d]
.if !c\[tf] .tr \[tf]
.if !c\[pp] .tr \[pp]
.if !c\[radicalex] .tr \[radicalex]
.if !c\[*a] .tr \[*a]
.if !c\[*b] .tr \[*b]
.if !c\[*x] .tr \[*x]
.if !c\[*d] .tr \[*d]
.if !c\[*e] .tr \[*e]
.if !c\[*f] .tr \[*f]
.if !c\[*g] .tr \[*g]
.if !c\[*y] .tr \[*y]
.if !c\[*i] .tr \[*i]
.if !c\[+f] .tr \[+f]
.if !c\[*k] .tr \[*k]
.if !c\[*l] .tr \[*l]
.if !c\[*m] .tr \[*m]
.if !c\[*n] .tr \[*n]
.if !c\[*o] .tr \[*o]
.if !c\[*p] .tr \[*p]
.if !c\[*h] .tr \[*h]
.if !c\[*r] .tr \[*r]
.if !c\[*s] .tr \[*s]
.if !c\[*t] .tr \[*t]
.if !c\[*u] .tr \[*u]
.if !c\[+p] .tr \[+p]
.if !c\[*w] .tr \[*w]
.if !c\[*c] .tr \[*c]
.if !c\[*q] .tr \[*q]
.if !c\[*z] .tr \[*z]
.if !c\[ap] .tr \[ap]
.if !c\[*U] .tr \[*U]
.if !c\[fm] .tr \[fm]
.if !c\[<=] .tr \[<=]
.if !c\[f/] .tr \[f/]
.if !c\[if] .tr \[if]
.if !c\[Fn] .tr \[Fn]
.if !c\[CL] .tr \[CL]
.if !c\[DI] .tr \[DI]
.if !c\[HE] .tr \[HE]
.if !c\[SP] .tr \[SP]
.if !c\[<>] .tr \[<>]
.if !c\[<-] .tr \[<-]
.if !c\[ua] .tr \[ua]
.\" .if !c\[arrowverttp] .tr \[arrowverttp]
.if !c\[->] .tr \[->]
.if !c\[da] .tr \[da]
.\" .if !c\[arrowvertbt] .tr \[arrowvertbt]
.if !c\[de] .tr \[de]
.if !c\[sd] .tr \[sd]
.if !c\[>=] .tr \[>=]
.if !c\[pt] .tr \[pt]
.if !c\[pd] .tr \[pd]
.if !c\[bu] .tr \[bu]
.if !c\[di] .tr \[di]
.if !c\[!=] .tr \[!=]
.if !c\[==] .tr \[==]
.if !c\[~~] .tr \[~~]
.if !c\[~=] .tr \[~=]
.\" .if !c\[arrowvertex] .tr \[arrowvertex]
.if !c\[an] .tr \[an]
.if !c\[CR] .tr \[CR]
.if !c\[Ah] .tr \[Ah]
.if !c\[Im] .tr \[Im]
.if !c\[Re] .tr \[Re]
.if !c\[wp] .tr \[wp]
.if !c\[c*] .tr \[c*]
.if !c\[c+] .tr \[c+]
.if !c\[es] .tr \[es]
.if !c\[ca] .tr \[ca]
.if !c\[cu] .tr \[cu]
.if !c\[sp] .tr \[sp]
.if !c\[ip] .tr \[ip]
.if !c\[nb] .tr \[nb]
.if !c\[sb] .tr \[sb]
.if !c\[ib] .tr \[ib]
.if !c\[mo] .tr \[mo]
.if !c\[nm] .tr \[nm]
.if !c\[/_] .tr \[/_]
.if !c\[gr] .tr \[gr]
.\" .if !c\[product] .tr \[product]
.if !c\[sr] .tr \[sr]
.if !c\[md] .tr \[md]
.if !c\[no] .tr \[no]
.if !c\[AN] .tr \[AN]
.if !c\[OR] .tr \[OR]
.if !c\[hA] .tr \[hA]
.if !c\[lA] .tr \[lA]
.if !c\[uA] .tr \[uA]
.if !c\[rA] .tr \[rA]
.if !c\[dA] .tr \[dA]
.if !c\[lz] .tr \[lz]
.if !c\[la] .tr \[la]
.if !c\[sum] .tr \[sum]
.\" .if !c\[parenlefttp] .tr \[parenlefttp]
.\" .if !c\[parenleftex] .tr \[parenleftex]
.\" .if !c\[parenleftbt] .tr \[parenleftbt]
.\" .if !c\[bracketlefttp] .tr \[bracketlefttp]
.if !c\[lc] .tr \[lc]
.\" .if !c\[bracketleftex] .tr \[bracketleftex]
.\" .if !c\[bracketleftbt] .tr \[bracketleftbt]
.if !c\[lf] .tr \[lf]
.\" .if !c\[bracelefttp] .tr \[bracelefttp]
.if !c\[lt] .tr \[lt]
.\" .if !c\[braceleftmid] .tr \[braceleftmid]
.if !c\[lk] .tr \[lk]
.\" .if !c\[braceleftbt] .tr \[braceleftbt]
.if !c\[lb] .tr \[lb]
.\" .if !c\[braceex] .tr \[braceex]
.\" .if !c\[bracerightex] .tr \[bracerightex]
.\" .if !c\[braceleftex] .tr \[braceleftex]
.\" .if !c\[barex] .tr \[barex]
.if !c\[bv] .tr \[bv]
.if !c\[ra] .tr \[ra]
.if !c\[is] .tr \[is]
.\" .if !c\[parenrighttp] .tr \[parenrighttp]
.\" .if !c\[parenrightex] .tr \[parenrightex]
.\" .if !c\[parenrightbt] .tr \[parenrightbt]
.\" .if !c\[bracketrighttp] .tr \[bracketrighttp]
.if !c\[rc] .tr \[rc]
.\" .if !c\[bracketrightex] .tr \[bracketrightex]
.\" .if !c\[bracketrightbt] .tr \[bracketrightbt]
.if !c\[rf] .tr \[rf]
.\" .if !c\[bracerighttp] .tr \[bracerighttp]
.if !c\[rt] .tr \[rt]
.\" .if !c\[bracerightmid] .tr \[bracerightmid]
.if !c\[rk] .tr \[rk]
.\" .if !c\[bracerightbt] .tr \[bracerightbt]
.if !c\[rb] .tr \[rb]
.
.\" now turn off all headers and footers for ms, me and mm macro sets
.if d EF .EF ''''
.if d EH .EH ''''
.if d OF .OF ''''
.if d OH .OH ''''
.if d ef .ef ''''
.if d of .of ''''
.if d oh .oh ''''
.if d eh .eh ''''
.tl ''''
.
.\" it doesn't make sense to use hyphenation with html, so we turn it off.
.hy 0
.nr HY 0
.
.\" avoid line breaks after hyphen-like characters.
.cflags 0 -\[hy]\[em]\[en]\[shc]
.
.pl 99999
.
.\" now for the color definitions
.\"
.\" html-4.0 colors
.\"
.defcolor white rgb #ffffff
.defcolor fuchsia rgb #ff00ff
.
.\" these colors are compliant with html-3.0 and above
.defcolor aliceblue rgb #eff7ff
.defcolor antiquewhite rgb #f9e8d2
.defcolor antiquewhite1 rgb #feedd6
.defcolor antiquewhite2 rgb #ebdbc5
.defcolor antiquewhite3 rgb #c8b9a6
.defcolor antiquewhite4 rgb #817468
.defcolor aquamarine rgb #43b7ba
.defcolor aquamarine1 rgb #87fdce
.defcolor aquamarine2 rgb #7deabe
.defcolor aquamarine3 rgb #69c69f
.defcolor aquamarine4 rgb #417c64
.defcolor azure rgb #efffff
.defcolor azure2 rgb #deecec
.defcolor azure3 rgb #bcc7c7
.defcolor azure4 rgb #7a7d7d
.defcolor beige rgb #f5f3d7
.defcolor bisque rgb #fde0bc
.defcolor bisque2 rgb #ead0ae
.defcolor bisque3 rgb #c7af92
.defcolor bisque4 rgb #816e59
.defcolor black rgb #000000
.defcolor blanchedalmond rgb #fee8c6
.defcolor blue rgb #0000ff
.defcolor blue1 rgb #1535ff
.defcolor blue2 rgb #1531ec
.defcolor blue3 rgb #1528c7
.defcolor blue4 rgb #151b7e
.defcolor blueviolet rgb #7931df
.defcolor brown rgb #980517
.defcolor brown1 rgb #f63526
.defcolor brown2 rgb #e42d17
.defcolor brown3 rgb #c22217
.defcolor burlywood1 rgb #fcce8e
.defcolor burlywood2 rgb #eabe83
.defcolor burlywood3 rgb #c6a06d
.defcolor burlywood4 rgb #806341
.defcolor cadetblue rgb #578693
.defcolor cadetblue1 rgb #99f3ff
.defcolor cadetblue2 rgb #8ee2ec
.defcolor cadetblue3 rgb #77bfc7
.defcolor cadetblue4 rgb #4c787e
.defcolor chartreuse rgb #8afb17
.defcolor chartreuse2 rgb #7fe817
.defcolor chartreuse3 rgb #6cc417
.defcolor chartreuse4 rgb #437c17
.defcolor chocolate rgb #c85a17
.defcolor coral rgb #f76541
.defcolor coral2 rgb #e55b3c
.defcolor coral3 rgb #c34a2c
.defcolor coral4 rgb #7e2817
.defcolor cornflowerblue rgb #151b8d
.defcolor cornsilk rgb #fff7d7
.defcolor cornsilk2 rgb #ece5c6
.defcolor cornsilk3 rgb #c8c2a7
.defcolor cornsilk4 rgb #817a68
.defcolor cyan rgb #00ffff
.defcolor cyan1 rgb #57feff
.defcolor cyan2 rgb #50ebec
.defcolor cyan3 rgb #46c7c7
.defcolor cyan4 rgb #307d7e
.defcolor darkgoldenrod rgb #af7817
.defcolor darkgoldenrod1 rgb #fbb117
.defcolor darkgoldenrod2 rgb #e8a317
.defcolor darkgoldenrod3 rgb #c58917
.defcolor darkgoldenrod4 rgb #7f5217
.defcolor darkgreen rgb #254117
.defcolor darkkhaki rgb #b7ad59
.defcolor darkolivegreen rgb #4a4117
.defcolor darkolivegreen1 rgb #ccfb5d
.defcolor darkolivegreen2 rgb #bce954
.defcolor darkolivegreen3 rgb #a0c544
.defcolor darkolivegreen4 rgb #667c26
.defcolor darkorange rgb #f88017
.defcolor darkorange1 rgb #f87217
.defcolor darkorange2 rgb #e56717
.defcolor darkorange3 rgb #c35617
.defcolor darkorange4 rgb #7e3117
.defcolor darkorchid rgb #7d1b7e
.defcolor darkorchid1 rgb #b041ff
.defcolor darkorchid2 rgb #a23bec
.defcolor darkorchid3 rgb #8b31c7
.defcolor darkorchid4 rgb #571b7e
.defcolor darksalmon rgb #e18b6b
.defcolor darkseagreen rgb #8bb381
.defcolor darkseagreen1 rgb #c3fdb8
.defcolor darkseagreen2 rgb #b5eaaa
.defcolor darkseagreen3 rgb #99c68e
.defcolor darkseagreen4 rgb #617c58
.defcolor darkslateblue rgb #2b3856
.defcolor darkslategray rgb #25383c
.defcolor darkslategray1 rgb #9afeff
.defcolor darkslategray2 rgb #8eebec
.defcolor darkslategray3 rgb #78c7c7
.defcolor darkslategray4 rgb #4c7d7e
.defcolor darkturquoise rgb #3b9c9c
.defcolor darkviolet rgb #842dce
.defcolor deeppink rgb #f52887
.defcolor deeppink2 rgb #e4287c
.defcolor deeppink3 rgb #c12267
.defcolor deeppink4 rgb #7d053f
.defcolor deepskyblue rgb #3bb9ff
.defcolor deepskyblue2 rgb #38acec
.defcolor deepskyblue3 rgb #3090c7
.defcolor deepskyblue4 rgb #25587e
.defcolor dimgray rgb #463e41
.defcolor dodgerblue rgb #1589ff
.defcolor dodgerblue2 rgb #157dec
.defcolor dodgerblue3 rgb #1569c7
.defcolor dodgerblue4 rgb #153e7e
.defcolor firebrick rgb #800517
.defcolor firebrick1 rgb #f62817
.defcolor firebrick2 rgb #e42217
.defcolor firebrick3 rgb #c11b17
.defcolor floralwhite rgb #fff9ee
.defcolor forestgreen rgb #4e9258
.defcolor gainsboro rgb #d8d9d7
.defcolor ghostwhite rgb #f7f7ff
.defcolor gold rgb #d4a017
.defcolor gold1 rgb #fdd017
.defcolor gold2 rgb #eac117
.defcolor gold3 rgb #c7a317
.defcolor gold4 rgb #806517
.defcolor goldenrod rgb #edda74
.defcolor goldenrod1 rgb #fbb917
.defcolor goldenrod2 rgb #e9ab17
.defcolor goldenrod3 rgb #c68e17
.defcolor goldenrod4 rgb #805817
.defcolor gray rgb #736f6e
.defcolor gray0 rgb #150517
.defcolor gray100 rgb #ffffff
.defcolor gray18 rgb #250517
.defcolor gray21 rgb #2b1b17
.defcolor gray23 rgb #302217
.defcolor gray24 rgb #302226
.defcolor gray25 rgb #342826
.defcolor gray26 rgb #34282c
.defcolor gray27 rgb #382d2c
.defcolor gray28 rgb #3b3131
.defcolor gray29 rgb #3e3535
.defcolor gray30 rgb #413839
.defcolor gray31 rgb #41383c
.defcolor gray32 rgb #463e3f
.defcolor gray34 rgb #4a4344
.defcolor gray35 rgb #4c4646
.defcolor gray36 rgb #4e4848
.defcolor gray37 rgb #504a4b
.defcolor gray38 rgb #544e4f
.defcolor gray39 rgb #565051
.defcolor gray40 rgb #595454
.defcolor gray41 rgb #5c5858
.defcolor gray42 rgb #5f5a59
.defcolor gray43 rgb #625d5d
.defcolor gray44 rgb #646060
.defcolor gray45 rgb #666362
.defcolor gray46 rgb #696565
.defcolor gray47 rgb #6d6968
.defcolor gray48 rgb #6e6a6b
.defcolor gray49 rgb #726e6d
.defcolor gray50 rgb #747170
.defcolor gray51 rgb #787473
.defcolor gray52 rgb #7a7777
.defcolor gray53 rgb #7c7979
.defcolor gray54 rgb #807d7c
.defcolor gray55 rgb #82807e
.defcolor gray56 rgb #858381
.defcolor gray57 rgb #878583
.defcolor gray58 rgb #8b8987
.defcolor gray59 rgb #8d8b89
.defcolor gray60 rgb #8f8e8d
.defcolor gray61 rgb #939190
.defcolor gray62 rgb #959492
.defcolor gray63 rgb #999795
.defcolor gray64 rgb #9a9998
.defcolor gray65 rgb #9e9c9b
.defcolor gray66 rgb #a09f9d
.defcolor gray67 rgb #a3a2a0
.defcolor gray68 rgb #a5a4a3
.defcolor gray69 rgb #a9a8a6
.defcolor gray70 rgb #acaba9
.defcolor gray71 rgb #aeadac
.defcolor gray72 rgb #b1b1af
.defcolor gray73 rgb #b3b3b1
.defcolor gray74 rgb #b7b6b4
.defcolor gray75 rgb #b9b8b6
.defcolor gray76 rgb #bcbbba
.defcolor gray77 rgb #bebebc
.defcolor gray78 rgb #c1c1bf
.defcolor gray79 rgb #c3c4c2
.defcolor gray80 rgb #c7c7c5
.defcolor gray81 rgb #cacac9
.defcolor gray82 rgb #cccccb
.defcolor gray83 rgb #d0cfcf
.defcolor gray84 rgb #d2d2d1
.defcolor gray85 rgb #d5d5d4
.defcolor gray86 rgb #d7d7d7
.defcolor gray87 rgb #dbdbd9
.defcolor gray88 rgb #dddddc
.defcolor gray89 rgb #e0e0e0
.defcolor gray90 rgb #e2e3e1
.defcolor gray91 rgb #e5e6e4
.defcolor gray92 rgb #e8e9e8
.defcolor gray93 rgb #ebebea
.defcolor gray94 rgb #eeeeee
.defcolor gray95 rgb #f0f1f0
.defcolor gray96 rgb #f4f4f3
.defcolor gray97 rgb #f6f6f5
.defcolor gray98 rgb #f9f9fa
.defcolor gray99 rgb #fbfbfb
.defcolor green rgb #00ff00
.defcolor green1 rgb #5ffb17
.defcolor green2 rgb #59e817
.defcolor green3 rgb #4cc417
.defcolor green4 rgb #347c17
.defcolor greenyellow rgb #b1fb17
.defcolor honeydew rgb #f0feee
.defcolor honeydew2 rgb #deebdc
.defcolor honeydew3 rgb #bcc7b9
.defcolor honeydew4 rgb #7a7d74
.defcolor hotpink rgb #f660ab
.defcolor hotpink1 rgb #f665ab
.defcolor hotpink2 rgb #e45e9d
.defcolor hotpink3 rgb #c25283
.defcolor hotpink4 rgb #7d2252
.defcolor indianred rgb #5e2217
.defcolor indianred1 rgb #f75d59
.defcolor indianred2 rgb #e55451
.defcolor indianred3 rgb #c24641
.defcolor indianred4 rgb #7e2217
.defcolor ivory rgb #ffffee
.defcolor ivory2 rgb #ececdc
.defcolor ivory3 rgb #c9c7b9
.defcolor ivory4 rgb #817d74
.defcolor khaki rgb #ada96e
.defcolor khaki1 rgb #fff380
.defcolor khaki2 rgb #ede275
.defcolor khaki3 rgb #c9be62
.defcolor khaki4 rgb #827839
.defcolor lavender rgb #e3e4fa
.defcolor lavenderblush rgb #fdeef4
.defcolor lavenderblush2 rgb #ebdde2
.defcolor lavenderblush3 rgb #c8bbbe
.defcolor lavenderblush4 rgb #817679
.defcolor lawngreen rgb #87f717
.defcolor lemonchiffon rgb #fff8c6
.defcolor lemonchiffon2 rgb #ece5b6
.defcolor lemonchiffon3 rgb #c9c299
.defcolor lemonchiffon4 rgb #827b60
.defcolor lightblue rgb #addfff
.defcolor lightblue1 rgb #bdedff
.defcolor lightblue2 rgb #afdcec
.defcolor lightblue3 rgb #95b9c7
.defcolor lightblue4 rgb #5e767e
.defcolor lightcoral rgb #e77471
.defcolor lightcyan rgb #e0ffff
.defcolor lightcyan2 rgb #cfecec
.defcolor lightcyan3 rgb #afc7c7
.defcolor lightcyan4 rgb #717d7d
.defcolor lightgoldenrod rgb #ecd872
.defcolor lightgoldenrod1 rgb #ffe87c
.defcolor lightgoldenrod2 rgb #ecd672
.defcolor lightgoldenrod3 rgb #c8b560
.defcolor lightgoldenrod4 rgb #817339
.defcolor lightgoldenrodyellow rgb #faf8cc
.defcolor lightpink rgb #faafba
.defcolor lightpink1 rgb #f9a7b0
.defcolor lightpink2 rgb #e799a3
.defcolor lightpink3 rgb #c48189
.defcolor lightpink4 rgb #7f4e52
.defcolor lightsalmon rgb #f9966b
.defcolor lightsalmon2 rgb #e78a61
.defcolor lightsalmon3 rgb #c47451
.defcolor lightsalmon4 rgb #7f462c
.defcolor lightseagreen rgb #3ea99f
.defcolor lightskyblue rgb #82cafa
.defcolor lightskyblue2 rgb #a0cfec
.defcolor lightskyblue3 rgb #87afc7
.defcolor lightskyblue4 rgb #566d7e
.defcolor lightslateblue rgb #736aff
.defcolor lightslategray rgb #6d7b8d
.defcolor lightsteelblue rgb #728fce
.defcolor lightsteelblue1 rgb #c6deff
.defcolor lightsteelblue2 rgb #b7ceec
.defcolor lightsteelblue3 rgb #9aadc7
.defcolor lightsteelblue4 rgb #646d7e
.defcolor lightyellow rgb #fffedc
.defcolor lightyellow2 rgb #edebcb
.defcolor lightyellow3 rgb #c9c7aa
.defcolor lightyellow4 rgb #827d6b
.defcolor limegreen rgb #41a317
.defcolor linen rgb #f9eee2
.defcolor magenta rgb #ff00ff
.defcolor magenta1 rgb #f43eff
.defcolor magenta2 rgb #e238ec
.defcolor magenta3 rgb #c031c7
.defcolor maroon rgb #810541
.defcolor maroon1 rgb #f535aa
.defcolor maroon2 rgb #e3319d
.defcolor maroon3 rgb #c12283
.defcolor maroon4 rgb #7d0552
.defcolor mediumaquamarine rgb #348781
.defcolor mediumblue rgb #152dc6
.defcolor mediumforestgreen rgb #347235
.defcolor mediumgoldenrod rgb #ccb954
.defcolor mediumorchid rgb #b048b5
.defcolor mediumorchid1 rgb #d462ff
.defcolor mediumorchid2 rgb #c45aec
.defcolor mediumorchid3 rgb #a74ac7
.defcolor mediumorchid4 rgb #6a287e
.defcolor mediumpurple rgb #8467d7
.defcolor mediumpurple1 rgb #9e7bff
.defcolor mediumpurple2 rgb #9172ec
.defcolor mediumpurple3 rgb #7a5dc7
.defcolor mediumpurple4 rgb #4e387e
.defcolor mediumseagreen rgb #306754
.defcolor mediumslateblue rgb #5e5a80
.defcolor mediumspringgreen rgb #348017
.defcolor mediumturquoise rgb #48cccd
.defcolor mediumvioletred rgb #ca226b
.defcolor midnightblue rgb #151b54
.defcolor mintcream rgb #f5fff9
.defcolor mistyrose rgb #fde1dd
.defcolor mistyrose2 rgb #ead0cc
.defcolor mistyrose3 rgb #c6afac
.defcolor mistyrose4 rgb #806f6c
.defcolor moccasin rgb #fde0ac
.defcolor navajowhite rgb #fddaa3
.defcolor navajowhite2 rgb #eac995
.defcolor navajowhite3 rgb #c7aa7d
.defcolor navajowhite4 rgb #806a4b
.defcolor navy rgb #150567
.defcolor oldlace rgb #fcf3e2
.defcolor olivedrab rgb #658017
.defcolor olivedrab1 rgb #c3fb17
.defcolor olivedrab2 rgb #b5e917
.defcolor olivedrab3 rgb #99c517
.defcolor olivedrab4 rgb #617c17
.defcolor orange rgb #f87a17
.defcolor orange1 rgb #fa9b17
.defcolor orange2 rgb #e78e17
.defcolor orange3 rgb #c57717
.defcolor orange4 rgb #7f4817
.defcolor orangered rgb #f63817
.defcolor orangered2 rgb #e43117
.defcolor orangered3 rgb #c22817
.defcolor orangered4 rgb #7e0517
.defcolor orchid rgb #e57ded
.defcolor orchid1 rgb #f67dfa
.defcolor orchid2 rgb #e473e7
.defcolor orchid3 rgb #c160c3
.defcolor orchid4 rgb #7d387c
.defcolor palegoldenrod rgb #ede49e
.defcolor palegreen rgb #79d867
.defcolor palegreen1 rgb #a0fc8d
.defcolor palegreen2 rgb #94e981
.defcolor palegreen3 rgb #7dc56c
.defcolor palegreen4 rgb #4e7c41
.defcolor paleturquoise rgb #aeebec
.defcolor paleturquoise1 rgb #bcfeff
.defcolor paleturquoise2 rgb #adebec
.defcolor paleturquoise3 rgb #92c7c7
.defcolor paleturquoise4 rgb #5e7d7e
.defcolor palevioletred rgb #d16587
.defcolor palevioletred1 rgb #f778a1
.defcolor palevioletred2 rgb #e56e94
.defcolor palevioletred3 rgb #c25a7c
.defcolor palevioletred4 rgb #7e354d
.defcolor papayawhip rgb #feeccf
.defcolor peachpuff rgb #fcd5b0
.defcolor peachpuff2 rgb #eac5a3
.defcolor peachpuff3 rgb #c6a688
.defcolor peachpuff4 rgb #806752
.defcolor peru rgb #c57726
.defcolor pink rgb #faafbe
.defcolor pink2 rgb #e7a1b0
.defcolor pink3 rgb #c48793
.defcolor pink4 rgb #7f525d
.defcolor plum rgb #b93b8f
.defcolor plum1 rgb #f9b7ff
.defcolor plum2 rgb #e6a9ec
.defcolor plum3 rgb #c38ec7
.defcolor plum4 rgb #7e587e
.defcolor powderblue rgb #addce3
.defcolor purple rgb #8e35ef
.defcolor purple1 rgb #893bff
.defcolor purple2 rgb #7f38ec
.defcolor purple3 rgb #6c2dc7
.defcolor purple4 rgb #461b7e
.defcolor red rgb #ff0000
.defcolor red1 rgb #f62217
.defcolor red2 rgb #e41b17
.defcolor rosybrown rgb #b38481
.defcolor rosybrown1 rgb #fbbbb9
.defcolor rosybrown2 rgb #e8adaa
.defcolor rosybrown3 rgb #c5908e
.defcolor rosybrown4 rgb #7f5a58
.defcolor royalblue rgb #2b60de
.defcolor royalblue1 rgb #306eff
.defcolor royalblue2 rgb #2b65ec
.defcolor royalblue3 rgb #2554c7
.defcolor royalblue4 rgb #15317e
.defcolor salmon1 rgb #f88158
.defcolor salmon2 rgb #e67451
.defcolor salmon3 rgb #c36241
.defcolor salmon4 rgb #7e3817
.defcolor sandybrown rgb #ee9a4d
.defcolor seagreen rgb #4e8975
.defcolor seagreen1 rgb #6afb92
.defcolor seagreen2 rgb #64e986
.defcolor seagreen3 rgb #54c571
.defcolor seagreen4 rgb #387c44
.defcolor seashell rgb #fef3eb
.defcolor seashell2 rgb #ebe2d9
.defcolor seashell3 rgb #c8bfb6
.defcolor seashell4 rgb #817873
.defcolor sienna rgb #8a4117
.defcolor sienna1 rgb #f87431
.defcolor sienna2 rgb #e66c2c
.defcolor sienna3 rgb #c35817
.defcolor sienna4 rgb #7e3517
.defcolor skyblue rgb #6698ff
.defcolor skyblue1 rgb #82caff
.defcolor skyblue2 rgb #79baec
.defcolor skyblue3 rgb #659ec7
.defcolor skyblue4 rgb #41627e
.defcolor slateblue rgb #737ca1
.defcolor slateblue1 rgb #7369ff
.defcolor slateblue2 rgb #6960ec
.defcolor slateblue3 rgb #574ec7
.defcolor slateblue4 rgb #342d7e
.defcolor slategray rgb #657383
.defcolor slategray1 rgb #c2dfff
.defcolor slategray2 rgb #b4cfec
.defcolor slategray3 rgb #98afc7
.defcolor slategray4 rgb #616d7e
.defcolor snow rgb #fff9fa
.defcolor snow2 rgb #ece7e6
.defcolor snow3 rgb #c8c4c2
.defcolor snow4 rgb #817c7b
.defcolor springgreen rgb #4aa02c
.defcolor springgreen1 rgb #5efb6e
.defcolor springgreen2 rgb #57e964
.defcolor springgreen3 rgb #4cc552
.defcolor springgreen4 rgb #347c2c
.defcolor steelblue rgb #4863a0
.defcolor steelblue1 rgb #5cb3ff
.defcolor steelblue2 rgb #56a5ec
.defcolor steelblue3 rgb #488ac7
.defcolor steelblue4 rgb #2b547e
.defcolor tan rgb #d8af79
.defcolor tan1 rgb #fa9b3c
.defcolor tan2 rgb #e78e35
.defcolor thistle rgb #d2b9d3
.defcolor thistle1 rgb #fcdfff
.defcolor thistle2 rgb #e9cfec
.defcolor thistle3 rgb #c6aec7
.defcolor thistle4 rgb #806d7e
.defcolor tomato rgb #f75431
.defcolor tomato2 rgb #e54c2c
.defcolor tomato3 rgb #c23e17
.defcolor turquoise rgb #43c6db
.defcolor turquoise1 rgb #52f3ff
.defcolor turquoise2 rgb #4ee2ec
.defcolor turquoise3 rgb #43bfc7
.defcolor turquoise4 rgb #30787e
.defcolor violet rgb #8d38c9
.defcolor violetred rgb #e9358a
.defcolor violetred1 rgb #f6358a
.defcolor violetred2 rgb #e4317f
.defcolor violetred3 rgb #c12869
.defcolor violetred4 rgb #7d0541
.defcolor wheat rgb #f3daa9
.defcolor wheat1 rgb #fee4b1
.defcolor wheat2 rgb #ebd3a3
.defcolor wheat3 rgb #c8b189
.defcolor wheat4 rgb #816f54
.defcolor yellow rgb #ffff00
.defcolor yellow1 rgb #fffc17
.defcolor yellowgreen rgb #52d017
.
.cp \n(_C
.
.if !\n(_C \
. mso pspic.tmac
.
.do ie '\[char97]'a' \
. do mso latin1.tmac
.el \
. do mso cp1047.tmac
.
.\" tell grohtml the page offset
.po
.\" end of file, make sure this is the last line
1.18.1.4/tmac/e.tmac 0000666 00000046060 15047753021 0007470 0 ustar 00 .\" @(#)e.tmac 2.31 (Berkeley) 5/21/88
.\" Modified by James Clark for use with groff.
.\"
.\" Copyright (c) 1988 Regents of the University of California.
.\" All rights reserved.
.\"
.\" Redistribution and use in source and binary forms are permitted
.\" provided that this notice is preserved and that due credit is given
.\" to the University of California at Berkeley. The name of the University
.\" may not be used to endorse or promote products derived from this
.\" software without specific prior written permission. This software
.\" is provided ``as is'' without express or implied warranty.
.if !\n(.g .ig
.de @R
.if !r\\$1 .nr \\$1 0
..
.@R pf
.if \n(pf .nx
.if !\n(.g .ig
.de @S
.if !d\\$1 .ds \\$1
..
.@R @
.de @C
.nr _S \\n(.s
.nr _V \\n(.v
.nr _F \\n(.f
.do ds _A \\n[.fam]
.nr _I \\n(.i
.ev \\$1
.ps \\n(_S
.vs \\n(_Vu
.ft \\n(_F
.do @fam \\*(_A
'in \\n(_Iu
.xl \\n($lu
.lt \\n($lu
.rr _S
.rr _V
.rr _F
.rr _I
.ls 1
'ce 0
..
.de @D
.ds |p "\\$3
.nr _d 0
.if "\\$2"C" \
.nr _d 1
.if "\\$2"L" \
.nr _d 2
.if "\\$2"I" \
.nr _d 3
.if "\\$2"M" \
.nr _d 4
.if !\\n(_d \{\
.nr _d \\$1
.ds |p "\\$2
.\}
..
.de @z
.if \n@>1 .tm >> @z, .z=\\n(.z ?a=\\n(?a
.if !"\\n(.z"" \
\{\
.tm Line \\n(c. -- Unclosed block, footnote, or other diversion (\\n(.z)
.di
.ex
.\}
.if \\n(?a \
.bp
.ds bp
.ds @b
.br
.if \n@>1 .tm << @z
..
.ie \n(.g .ds $* \\\\$*
.el .ds $* \\\\$1 \\\\$2 \\\\$3 \\\\$4 \\\\$5 \\\\$6 \\\\$7 \\\\$8 \\\\$9
.de he
.ie !\\n(.$ \
\{\
.rm |4
.rm |5
.\}
.el \
\{\
.ds |4 "\*($*
.ds |5 "\*($*
.\}
..
.de eh
.ie !\\n(.$ \
.rm |4
.el \
.ds |4 "\*($*
..
.de oh
.ie !\\n(.$ \
.rm |5
.el \
.ds |5 "\*($*
..
.de fo
.ie !\\n(.$ \
\{\
.rm |6
.rm |7
.\}
.el \
\{\
.ds |6 "\*($*
.ds |7 "\*($*
.\}
..
.de ef
.ie !\\n(.$ \
.rm |6
.el \
.ds |6 "\*($*
..
.de of
.ie !\\n(.$ \
.rm |7
.el \
.ds |7 "\*($*
..
.de ep
.if \\n(nl>0 \
\{\
.wh 0
.rs
.@b
.\}
..
.de @h
.if \n@>1 .tm >> @h %=\\n% ?a=\\n(?a ?b=\\n(?b ?w=\\n(?w
.if (\\n(.i+\\n(.o)>=\\n(.l \
.tm Line \\n(c. -- Offset + indent exceeds line length
.nr ?h \\n(?H
.nr ?H 0
.nr ?c \\n(?C
.nr ?C 0
.rn |4 |0
.rn |5 |1
.rn |6 |2
.rn |7 |3
.nr _w 0
.nr ?W 0
.nr ?I 1
.ev 2
.rs
.if \\n(hm>0 \
.sp |\\n(hmu
.@t $h
.if \\n(tm<=0 \
.nr tm \n(.Vu
.sp |\\n(tmu
.ev
.mk _k
.if \\n(?n .nm 1
.nr $c 1
.if \n@>4 .tm -- @h >> .ns nl=\\n(nl %=\\n% _k=\\n(_k tm=\\n(tm
.ie \\n(?s \
\{\
.nr ?s 0
.rs
' @b
.\}
.el \
.@n
.if \n@>2 .tm << @h
..
.de @n
.if \n@>3 .tm >> @n nl=\\n(nl %=\\n% ?f=\\n(?f ?o=\\n(?o
.if \\n(bm<=0 \
.nr bm \\n(.Vu
.if (\\n(_w<=\\n($l)&(\\n(?W=0) \
\{\
.nr _b (\\n(ppp*\\n($vu)/200u
.if \\n(_bu>((\\n(bmu-\\n(fmu-((\\n(tpp*\\n($vu)/100u))/2u) \
.nr _b (\\n(ppp*\\n($vu)/100u-\n(.Vu
.nr _b +\\n(bmu
.\}
.nr _B \\n(_bu
.ch @f
.wh -\\n(_bu @f
.nr _b +(\\n(ppp*\\n($vu)/100u
.if \n@>2 .tm @n .p=\\n(.p bm=\\n(bm _b=\\n(_b _B=\\n(_B
.nr ?f 0
.if \\n(?o \
\{\
.(f _
.nf
.|o
.fi
.)f
.rm |o
.\}
.nr ?o 0
.if \\n(?T \
\{\
.nr _i \\n(.i
.in 0
.|h
.in \\n(_iu
.rr _i
.mk #T
.ns
.\}
.if (\\n(?a)&((\\n($c<2):(\\n(?w=0)) \
\{\
.nr ?a 0
.@k |t
.if \\n(?w \
.mk _k
.nr ?w 0
.\}
.os
.$H
.ns
..
.de @f
.if \n@>1 .tm >> @f %=\\n% nl=\\n(nl ?a=\\n(?a ?b=\\n(?b ?f=\\n(?f
.if \n@>2 .nr VL \\n(.pu-\\n(nlu
.if \n@>2 .tm @f bm=\\n(bm _B=\\n(_B _b=\\n(_b .p-nl=\\n(VL
.ec
.if \\n(?T \
\{\
.nr T. 1
.T# 1
.br
.\}
.ev 2
.ce 0
.if \\n(?b \
\{\
.nr ?b 0
.@k |b
.\}
.if \\n(?f \
.@o
.ie \\n($c<\\n($m \
.@c
.el \
.@e
.ev
.if \n@>2 .tm << @f
..
.de @o
.nf
.ls 1
.in 0
.if \n@>2 .tm @o last printed text = \\n(nl placing @r trap at -\\n(_B
.wh -\\n(_Bu @r
.|f
.fi
.if \n@>2 .tm @o triggered @r (?o) = \\n(?o
.if \\n(?o \
\{\
.di
.if \\n(dn=0 \
\{\
.rm |o
.nr ?o 0
.\}
.nr dn \\n(_D
.rr _D
.\}
.rm |f
.ch @r
..
.de @c
.if \n@>2 .tm >> @c %=\\n%
.rs
.sp |\\n(_ku
.@O +\\n($lu+\\n($su
.nr $c +1
.@n
..
.de @e
.if \n@>2 .tm >> @e
.@O \\n(_ou
.rs
.sp |\\n(.pu-\\n(fmu-((\\n(tpp*\\n($vu)/100u)
.@t $f
.nr ?h 0
.bp
..
.de @t
.if !\\n(?h \
\{\
.sz \\n(tp
.@F \\n(tf
.lt \\n(_Lu
.nf
.\\$1
.br
.\}
..
.de $h
.ds |z
.if !\\n(?c \
\{\
.if e .ds |z "\\*(|0
.if o .ds |z "\\*(|1
.\}
.if !\(ts\\*(|z\(ts\(ts \
' tl \\*(|z
.rm |z
..
.de $f
.ds |z
.if \\n(?c \
\{\
.if e .ds |z "\\*(|0
.if o .ds |z "\\*(|1
.\}
.if \(ts\\*(|z\(ts\(ts \
\{\
.if e .ds |z "\\*(|2
.if o .ds |z "\\*(|3
.\}
.if !\(ts\\*(|z\(ts\(ts \
' tl \\*(|z
.rm |z
..
.de @r
.if \n@>3 .tm >> @r .z=\\n(.z ?f=\\n(?f ?a=\\n(?a ?b=\\n(?b _b=\\n(_b
.di |o
.nr ?o 1
.nr _D \\n(dn
.ns
..
.rn bp @b
.de bp
.nr $c \\n($m
.ie \\n(nl>0 \
.@b \\$1
.el \
\{\
.if \\n(.$>0 \
.pn \\$1
.if \\n(?I \
.@h
.\}
.br
.wh 0 @h
..
.rn ll xl
.de ll
.xl \\$1
.lt \\$1
.nr $l \\n(.l
.if (\\n($m<=1):(\\n($l>\\n(_L) \
.nr _L \\n(.l
..
.rn po @O
.de po
.@O \\$1
.nr _o \\n(.o
..
.if !\n(.g .ig
.do rn fam @fam
.do de fam
.do @fam \\$1
.ev 2
.do @fam \\$1
.ev
..
.de hx
.nr ?H 1
..
.de ix
'in \\$1
..
.de bl
.br
.ne \\$1
.rs
.sp \\$1
..
.de n1
.nm 1
.xl -\w'0000'u
.nr ?n 1
..
.de n2
.nm \\$1
.ie \\n(.$ \
.xl -\w'0000'u
.el \
.xl \\n($lu
..
.de pa
.bp \\$1
..
.de ro
.af % i
..
.de ar
.af % 1
..
.de m1
.nr _0 \\n(hmu
.nr hm \\$1v
.nr tm +\\n(hmu-\\n(_0u
.rr _0
..
.de m2
.nr tm \\n(hmu+\\n(tpp+\\$1v
..
.de m3
.nr bm \\n(fmu+\\n(tpp+\\$1v
..
.de m4
.nr _0 \\n(fmu
.nr fm \\$1v
.nr bm +\\n(fmu-\\n(_0u
..
.de sk
.if \\n(.$>0 \
.tm Line \\n(c. -- I cannot skip multiple pages
.nr ?s 1
..
.if !\n(.g .ig
.de re
.ta T 0.5i
..
.if \n(.g .ig
.de re
.ta 0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i
..
.de ba
.ie \\n(.$ \
.nr $i \\$1n
.el \
.nr $i \\n(siu*\\n($0u
..
.de hl
.br
.ie \n(.g .do nr _I \\n[.in]
.el .nr _I \\n(.i
\l'\\n(.lu-\\n(_Iu'
.sp
..
.de pp
.lp \\n(piu
..
.de lp
.@p
.if \\n(.$ \
.ti +\\$1
.nr $p 0 1
..
.de ip
.if (\\n(ii>0)&(\\n(ii<1n) \
.nr ii \\n(iin
.nr _0 \\n(ii
.if \\n(.$>1 \
.nr _0 \\$2n
.@p \\n(_0u
.nr _I \\n(.iu
.in 0
.di |i
\&\\$1
.br
.di
.in \\n(_Iu
.ds |j \\*(|i\\
.if \\w"\\*(|j" \
\{\
.ti -\\n(_0u
.ie \\w"\\*(|j">=\\n(_0 \
\{\
\\*(|j
.br
.\}
.el \\*(|j\h'|\\n(_0u'\c
.\}
.rr _0
.rm |i |j
..
.de np
.if '\\n($p'-1' \
.nr $p 0
.nr $p +1
.@p \w'\0(000)\0'u
.ti -\w'\0(000)\0'u
\0(\\n($p)\h'|\w'\0(000)\0'u'\c
..
.de bu
.br
.if '\\n($p'-1' \
.ns
.nr $p 0-1
.@p \w'\0\(bu\0'u
.ti -\w'\0\(bu\0'u
\0\(bu\0\c
..
.de @p
.if "\\n(.z"|e" .tm Line \\n(c. -- Unmatched continued equation
.in \\n($iu+\\n(pou
.if \\n(.$ \
.in +\\$1n
.ce 0
.fi
.@F \\n(pf
.sz \\n(pp
.sp \\n(psu
.ne \\n(.Lv+\\n(.Vu
.ns
..
.de sh
.fi
.if (\\n(si>0)&(\\n(si<1n) \
.nr si \\n(sin
.ce 0
.@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
.if !"\\$2"_" \
\{\
.ds |n \&\\$2
.$p "\\*(|n" "\\*($n" \\n($0
.$0 "\\*(|n" "\\*($n" \\n($0
.rm |n
.\}
.nr $p 0 1
..
.de @d
.if !""\\$1" \
.nr $0 \\$1
.if \\n($0&(\\n(.$>1) \
.nr $\\n($0 \\$2
.ds $n \&
.ie \\n($0>=1 \
\{\
.if '\\n($1'0' \
.nr $1 1
.if (\\n(.$>=3) .if !"\\$3"-" \
.nr $1 \\$3
.as $n \\n($1
.\}
.el \
.nr $1 0
.ie \\n($0>=2 \
\{\
.if '\\n($2'0' \
.nr $2 1
.if (\\n(.$>=4) .if !"\\$4"-" \
.nr $2 \\$4
.as $n .\\n($2
.\}
.el \
.nr $2 0
.ie \\n($0>=3 \
\{\
.if '\\n($3'0' \
.nr $3 1
.if (\\n(.$>=5) .if !"\\$5"-" \
.nr $3 \\$5
.as $n .\\n($3
.\}
.el \
.nr $3 0
.ie \\n($0>=4 \
\{\
.if '\\n($4'0' \
.nr $4 1
.if (\\n(.$>=6) .if !"\\$6"-" \
.nr $4 \\$6
.as $n .\\n($4
.\}
.el \
.nr $4 0
.ie \\n($0>=5 \
\{\
.if '\\n($5'0' \
.nr $5 1
.if (\\n(.$>=7) .if !"\\$7"-" \
.nr $5 \\$7
.as $n .\\n($5
.\}
.el \
.nr $5 0
.ie \\n($0>=6 \
\{\
.if '\\n($6'0' \
.nr $6 1
.if (\\n(.$>=8) .if !"\\$8"-" \
.nr $6 \\$8
.as $n .\\n($6
.\}
.el \
.nr $6 0
..
.de sx
.ce 0
.ul 0
.nr _0 \\n($0-1
.if \\n(.$ .nr _0 +1
.if \\n(.$ .nr _0 \\$1
.@d \\n(_0
.rr _0
.$p "" "" \\n($0
.nr $p 0 1
..
.de uh
.$p "\\$1"
.$0 "\\$1"
..
.de $p
.if (\\n(si>0)&(\\n(.$>2) \
.nr $i \\$3*\\n(si
.in \\n($iu
.ie !"\\$1\\$2"" \
\{\
.sp \\n(ssu
.ne \\n(.Lv+\\n(.Vu+\\n(psu+((\\n(spp*\\n($vu*\\n(.Lu)/100u)
.ie 0\\$3 \
.ti -(\\n(siu-\\n(sou)
.el \
.ti +\\n(sou
.@F \\n(sf
.sz \\n(sp
.if 0\\$3 \
.$\\$3
.if \w"\\$2">0 \\$2.
.if \w"\\$1">0 \\$1\f1\ \ \&
.\}
.el \
.sp \\n(psu
.@F \\n(pf
.sz \\n(pp
..
.de 2c
.br
.if \\n($m>1 \
.1c
.nr $c 1
.nr $m 2
.if \\n(.$>1 \
.nr $m \\$2
.if \\n(.$>0 \
.nr $s \\$1n
.nr $l (\\n(.l-((\\n($m-1)*\\n($s))/\\n($m
.xl \\n($lu
.mk _k
.ns
..
.de 1c
.br
.nr $c 1
.nr $m 1
.ll \\n(_Lu
.sp |\\n(.hu
.@O \\n(_ou
..
.de bc
.sp 24i
..
.de (z
.if \n@>4 .tm >> (z, .z=\n(.z
.@D 4 \\$1 \\$2
.@(
..
.de )z
.if \n@>4 .tm >> )z, .z=\n(.z
.sp \\n(zsu
.@)
.if \n@>4 .tm -- )z << @), .z=\n(.z
.rr _0
.if !\\n(?b \
.nr dn +(\\n(ppp*\\n($vu)/200u+\\n(zsu
.nr dl -\n(.H
.ie ((\\n(dn+\n(.V)>=\\n(.t):(\\n(?a):((\\n(dl>\\n($l)&(\\n($c>1)) \
\{\
.nr ?a 1
.if (\\n(dl>\\n($l)&(\\n($m>1) \
.nr ?w 1
.ds |x |t
.\}
.el \
\{\
.nr ?b 1
.if (\\n(dl>\\n($l)&(\\n($m>1) \
.nr ?W 1
.nr _b +\\n(dnu
.if \\n(.p-\\n(nl-\n(.V<\\n(_b \
.nr _b \\n(.p-\\n(nl-\n(.V
.ch @f -\\n(_bu
.ds |x |b
.\}
.da \\*(|x
.nf
.ls 1
.nr ?k 1
.if \n@>4 .tm -- )z >> \\*(|x
\!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
.|k
.ec
.if \n@>4 .tm -- )z << \\*(|x, .z=\\n(.z
.nr ?k 0
.rm |k
.da
.in 0
.ls 1
.xl \\n($lu
.ev
.if \n@>4 .tm << )z, .z=\\n(.z
..
.de @k
.if \n@>4 .tm >> @k, $1=\\$1, .z=\\n(.z
.ev 1
.nf
.ls 1
.in 0
.sp \\n(zsu
.\\$1
.ec
.br
.rm \\$1
.ev
..
.de (t
.(z \\$1 \\$2
..
.de )t
.)z \\$1 \\$2
..
.de (b
.br
.@D 3 \\$1 \\$2
.sp \\n(bsu
.@(
..
.de )b
.br
.@)
.if (\\n(bt=0):(\\n(.t<\\n(bt) \
.ne \\n(dnu
.ls 1
.nf
.|k
.ec
.fi
.in 0
.xl \\n($lu
.ev
.rm |k
.sp \\n(bsu+\\n(.Lv-1v
..
.de @(
.if !"\\n(.z"" .tm Line \\n(c. -- Invalid nested keep \\n(.z
.@M
.di |k
\!'rs
..
.de @M
.nr ?k 1
.@C 1
.@F \\n(df
.if \\n($R .@V
.vs \\n(.sp*\\n($Vu/100u
.nf
.if "\\*(|p"F" \
.fi
.if \\n(_d=4 \
.in 0
.if \\n(_d=3 \
\{\
.in +\\n(biu
.xl -\\n(biu
.\}
.if \\n(_d=1 \
.ce 10000
..
.de @)
.br
.if !"\\n(.z"|k" .tm Line \\n(c. -- Close of a keep which has never been opened
.nr ?k 0
.di
.in 0
.ce 0
..
.de (c
.if "\\n(.z"|c" .tm Line \\n(c. -- Nested .(c requests
.di |c
..
.de )c
.if !"\\n(.z"|c" .tm Line \\n(c. -- Unmatched .)c
.br
.di
.if \n@>4 .tm >> .)c .l=\\n(.l .i=\\n(.i $i=\\n($i dl=\\n(dl
.ev 1
.ls 1
.in (\\n(.lu-\\n(.iu-\\n(dlu)/2u
.if \n@>4 .tm -- .)c << .in .l=\\n(.l .i=\\n(.i dl=\\n(dl
.nf
.|c
.ec
.in
.ls
.ev
.rm |c
..
.de (q
.br
.@C 1
.fi
.sp \\n(qsu
.in +\\n(qiu
.xl -\\n(qiu
.sz \\n(qp
..
.de )q
.br
.ev
.sp \\n(qsu+\\n(.Lv-1v
.nr ?k 0
..
.de (l
.br
.sp \\n(bsu
.@D 3 \\$1 \\$2
.@M
..
.de )l
.br
.ev
.sp \\n(bsu+\\n(.Lv-1v
.nr ?k 0
..
.de EQ
.ec
.if !\\n(?e \
\{\
.if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
.@D 1 "\\$1" "\\$2"
.@C 2
.di |e
.\}
.ls 1
.in 0
.nf
..
.de EN
.br
.ie "\\$1"C" \
\{\
.nr ?e 1
.sp \\n(esu
.\}
.el \
\{\
.nr ?e 0
.di
.if \\n(dn \
.@q
.rm |e
.ev
.\}
..
.de @q
.nr _Q \\n(dnu
.ev
.sp \\n(esu
.if !"\\n(.z"" \!.ne \\n(_Qu
.ne \\n(_Qu+\n(.Vu
.@C 2
.if \\n(_d=1 \
.in (\\n(.lu+\\n($iu-\\n(dlu)/2u
.if \\n(_d=2 \
.in \\n($iu
.if \\n(_d=3 \
.in \\n(biu+\\n($iu
.if \\n(_d=4 \
.in 0
.mk _q
.if \n@>1 .tm --@e: _Q=\\n(_Q _q=\\n(_q nl=\\n(nl |p=\\*(|p
.if !"\\*(|p"" \
\{\
.rs
.sp (\\n(_Qu-\\n(.vu)/2u
.tl """\\*(|p"
.rt \\n(_qu
.\}
.|e
.sp |\\n(_qu+\\n(_Qu
.sp \\n(esu+\\n(.Lv-1v
.rr _q
.rr _Q
..
.de TS
.sp \\n(bsu
.@C 1
.fi
.if "\\$1"H" \
\{\
.di |h
.nr ?T 1
.\}
.ls 1
.ch @f -(\\n(_bu+1v)
.if \\n(.p-\\n(_b-1v<=\\n(nl \
.ch @f \\n(nlu+\n(.Vu
..
.de TH
.nr T. 0
.T# 0
.di
.nr _T \\n(?T
.nr ?T 0
.ne \\n(dnu+1v
.nr ?T \\n(_T
.nr _i \\n(.i
.in 0
.|h
.in \\n(_iu
.rr _i
.mk #T
..
.de TE
.nr ?T 0
.ch @f -\\n(_bu
.if \\n(.p-\\n(_b<=\\n(nl \
.ch @f \\n(nlu+\n(.Vu
.ev
.sp \\n(bsu+\\n(.Lv-1v
.re
..
.de T&
..
.de ][
.if \\$1>5 .tm Bad arg to []
.[\\$1
..
.de [0
.(f
.ip "\\*([F.\0"
.if !"\\*([A"" \\*([A,
.if !"\\*([T"" \\f2\\*([T\\f1\c
.if !"\\*([T"" .if !"\\*([O"" ,\
.ie !"\\*([O"" \\*([O
.el .if !"\\*([T"" \&.
.if !"\\*([D"" \\*([D.
.@p
.)f
..
.de [1
.(f
.ip "\\*([F.\0"
\\*([A,
.if !"\\*([T"" \\*(lq\\*([T,\\*(rq
.if "\\*([V"" \\f2\\*([J\\f1,
.if !"\\*([V"" \\f2\\*([J\\f1
.if !"\\*([V"" \\f3\\*([V\\f1\c
.if !"\\*([N"" (\\*([N)\c
.if !"\\*([P"" \
\{\
.ie \\n([P>0 \ pp.\&
.el \ p.\&
\\*([P
.\}
.if !"\\*([I"" .if "\\*([R"" \\*([I,
(\\*([D).
.if !"\\*([O"" \\*([O
.)f
..
.de [2
.(f
.ip "\\*([F.\0"
\\*([A, \\f2\\*([T,\\f1
\\*([I\c
.if !"\\*([C"" , \\*([C\c
(\\*([D).
.if !"\\*([G"" Gov't. ordering no. \\*([G
.if !"\\*([O"" \\*([O
.)f
..
.de [3
.(f
.ip "\\*([F.\0"
\\*([A, \\*(lq\\*([T,\\*(rq
.if !"\\*([P"" pp. \\*([P
in \\f2\\*([B\\f1, \c
.if !"\\*([E"" ed. \\*([E, \c
.if !"\\*([I"" \\*([I\c
.if !"\\*([C"" , \\*([C\c
(\\*([D).
.if !"\\*([O"" \\*([O
.)f
..
.de [4
.(f
.ip "\\*([F.\0"
\\*([A, \\*(lq\\*([T,\\*(rq
\\*([R\c
.if !"\\*([G"" \& (\\*([G)\c
.if !"\\*([I"" , \\*([I\c
.if !"\\*([C"" , \\*([C\c
(\\*([D).
.if !"\\*([O"" \\*([O
.)f
..
.de [5
.(f
.ip "\\*([F.\0"
\\*([A, \\f2\\*([T\\f1,
.ie \\n(TN \\*([M.
.el Bell Laboratories internal memorandum (\\*([D).
.)f
..
.de ]<
.$p References
.lp
.rm (f )f
..
.de ]>
.sp
..
.de ]-
.rm [V [P [A [T [N [C [B [O [R [I [E [D
..
.ie \n(.V<1v \
\{\
.ds [. \s-2\v'-.4m'\f1
.ds .] \v'.4m'\s+2\fP
.\}
.el \
\{\
.ds [. " [
.ds .] ]
.\}
.de IS
.nr g7 \\n(.u
.ls 1
..
.de IF
.if \\n(g7 .fi
.ls
..
.de IE
.if \\n(g7 .fi
.ls
..
.de PS
.sp 0.3
.nr g7 \\$2
.in (u;\\n(.l-\\n(g7>?0/2)
.ne \\$1u
.nr g7 \\n(.u
.ls 1
..
.de PE
.ls
.in
.if \\n(g7 .fi
.sp .6
..
.de GS
.nr g7 (\\n(.lu-\\n(g1u)/2u
.if "\\$1"L" .nr g7 \\n(.iu
.if "\\$1"R" .nr g7 \\n(.lu-\\n(g1u
.in \\n(g7u
.nr g7 \\n(.u
.ls 1
.nf
.ne \\n(g2u
..
.de GE
.GF
.sp .6
..
.de GF
.ls
.in
.if \\n(g7 .fi
..
.de sz
.ps \\$1
.if \\n($r .@v
.vs \\n(.sp*\\n($vu/100u
..
.de @v
.if (1i>=240u)&(1p<=\\n($r)&(\\n($r<=4p) .nr $v \\n($r00/1p
..
.de @V
.if (1i>=240u)&(1p<=\\n($R)&(\\n($R<=4p) .nr $V \\n($R00/1p
..
.de @E
.ie \\n(.f<10 \
.ds _F \\n(.f
.el \
\{\
.ie \\n(.f<100&\n(.g \
.ds _F (\\n(.f
.el \
.ds _F P
.\}
..
.de r
.@E
.ft 1
.if \\n(.$ \&\\$1\f\\*(_F\\$2
..
.de i
.@E
.ft 2
.if \\n(.$ \&\\$1\f\\*(_F\\$2
..
.de b
.@E
.ft 3
.if \\n(.$ \&\\$1\f\\*(_F\\$2
..
.de rb
.@E
.ft 3
.if \\n(.$ \&\\$1\f\\*(_F\\$2
..
.de bi
.@E
.ft 4
.if \\n(.$ \&\\$1\f\\*(_F\\$2
..
.de u
\&\\$1\l'|0\(ul'\\$2
..
.if !\n(.g .ig
.de u
\Z'\\$1'\v'.25m'\D'l \w'\\$1'u 0'\v'-.25m'\\$2
..
.de q
\&\\*(lq\\$1\\*(rq\\$2
..
.de bx
\k~\(br\|\\$1\|\(br\l'|\\n~u\(rn'\l'|\\n~u\(ul'\^\\$2
..
.de sm
\s-1\\$1\\s0\\$2
..
.de @F
.nr ~ \\$1
.if \\n~>0 \
.ft \\n~
.rr ~
..
.de (f
.ec
.if "\\n(.z"|f" .tm Line \\n(c. -- Invalid footnote nesting
.ie "\\n(.z"" \
\{\
.nr _D \\n(dn
.nr _0 1v+\\n(nlu
.ev 2
.da |f
.in 0
.xl \\n($lu-\\n(fuu
.@F \\n(ff
.sz \\n(fp
.vs \\n(.sp*\\n($Vu/100u
.if !\\n(?f \
\{\
.nr _b +1v
.$s
.\}
.br
.if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
\{\
.da
.bc
.if !\\n(?f \
.rm |f
.da |f
.in 0
.xl \\n($lu-\\n(fuu
.@F \\n(ff
.sz \\n(fp
.vs \\n(.sp*\\n($Vu/100u
.if !\\n(?f \
.$s
.br
.\}
.rr _0
.sp \\n(fsu
.nr ?f 1
.fi
.if !"\\$1"_" \
.ti \\n(fiu
.if \n@>2 .tm << (f $f=\\n($f
.\}
.el \
\{\
.ev 2
.in 0
.xl \\n($lu-\\n(fuu
.@F \\n(ff
.sz \\n(fp
.vs \\n(.sp*\\n($Vu/100u
.fi
\!.(f \\$1
\!.@N
.\}
..
.de @N
.ie "\\n(.z"" .nf
.el \!.@N
..
.de )f
.ie "\\n(.z"|f" \
\{\
.if \\n* \
.nr $f +1
.ds * \\*{\\n($f\\*}\k*
.nr * 0
.in 0
.da
.ev
.if \\n(_w<\\n(dl \
.nr _w \\n(dl
.nr _b +\\n(dn
.ch @f -\\n(_bu
.if \\n(.p-\\n(_b<=\\n(nl \
.ch @f \\n(nlu+\n(.Vu
.nr dn \\n(_D
.rr _D
.\}
.el \
\{\
.br
\!.)f
.ev
.\}
..
.@R ff
.if \n(ff<=0 \
.nr ff 1
.@R fp
.if \n(fp<=0 \
.nr fp 8
.de $s
\l'2i'
..
.de (d
.am |d )d
.sp \\n(bsu
..
.de )d
.if \\n# \
.nr $d +1
.ds # [\\n($d]\k#
.rr #
..
.de pd
.|d
.rm |d
.nr $d 1 1
.ds # [1]\k#
..
.nr _x 0 1
.af _x a
.de (x
.if \n@>4 .tm >> (x, .z=\\n(.z
.ds |X x
.if \\n(.$>0 \
.ds |X \\$1
.ie "\\n(.z"" \
.nr _z 0
.el \
.nr _z 1
.@\\n(_z
..
.de @0
.am %\\*(|X )x
.sp \\n(xsu
.ti -\\n(piu
..
.de @1
.if "\\n(_x"z" .nr _x 0
.de =\\n+(_x )x
..
.de )x
.if \n@>4 .tm >> )x, .z=\\n(.z
.ie "\\n(.z"" \
\{\
.ds |x \\n%
.if \\n(.$>0 \
.ds |x \\$1
.if "\\*(|x"_" \
.ig ..
.am %\\*(|X ..
.if \w"\\$2">(\\n(.l-\\n(.i-\\n(.k) \
.ti +\\n(xuu
\\\\a\\\\t\\$2\\*(|x
...
.rm |x
.rm |X
.\}
.el \
\{\
\!.(x \\*(|X
\!\\\\*(=\\n(_x\\\\
\!.)x \\$1 \\$2
\!.rm =\\n(_x
.\}
..
.de xp
.br
.@C 2
.ls 1
.vs \\n(.sp*\\n($Vu/100u
.fi
.in +\\n(piu
.ds |X x
.if \\n(.$>0 \
.ds |X \\$1
.xl -(\\n(xuu+\w'...'u)
.di |x
.%\\*(|X
.br
.di
.rm %\\*(|X
.xl \\n($lu
.rm |X
.ev
.nf
.in 0
.ta \\n(.lu-\\n(xuuR \\n(.luR
.|x
.fi
.in
.rm |x
..
.de +c
.ep
.if \\n(?o:\\n(?a \
\{\
.bp
.rs
.ep
.\}
.nr ?C 1
.nr $f 1 1
.ds * \\*{1\\*}\k*
.if \\n(?R \
.pn 1
.bp
.in \\n($iu
.rs
.ie \\n(.$ \
.$c "\\$1"
.el \
.sp 3
..
.de ++
.nr _0 0
.if "\\$1"C" \
.nr _0 1
.if "\\$1"RC" \
.nr _0 11
.if "\\$1"A" \
.nr _0 2
.if "\\$1"RA" \
.nr _0 12
.if "\\$1"P" \
.nr _0 3
.if "\\$1"B" \
.nr _0 4
.if "\\$1"AB" \
.nr _0 5
.if \\n(_0=0 \
.tm Line \\n(c. -- Bad mode to .++
.nr ?R 0
.if \\n(_0>10 \
.\{
.nr ?R 1
.nr _0 -10
.\}
.nr ch 0 1
.if (\\n(_0=3):(\\n(_0=5) \
.pn 1
.if !\\n(_0=\\n(_M .if \\n(_M=3 \
.pn 1
.ep
.if \\n(_0=1 \
\{\
.af ch 1
.af % 1
.\}
.if \\n(_0=2 \
\{\
.af ch A
.af % 1
.\}
.if \\n(_0=3 \
.af % i
.if \\n(_0=4 \
.af % 1
.if \\n(_0=5 \
.af % 1
.if \\n(.$>1 \
.he \\$2
.nr _M \\n(_0
.rr _0
..
.de $c
.sz 12
.ft 3
.ce 1000
.if \\n(_M<3 \
.nr ch +1
.ie \\n(_M=1 CHAPTER\ \ \\n(ch
.el .if \\n(_M=2 APPENDIX\ \ \\n(ch
.if \w"\\$1" .sp 3-\\n(.L
.if \w"\\$1" \\$1
.if (\\n(_M<3):(\w"\\$1") \
.sp 4-\\n(.L
.ce 0
.ft
.sz
.ie \\n(_M=1 \
.$C Chapter \\n(ch "\\$1"
.el .if \\n(_M=2 \
.$C Appendix \\n(ch "\\$1"
..
.de tp
.hx
.bp
.br
.rs
.pn \\n%
..
.if \n(mo=1 .ds mo January
.if \n(mo=2 .ds mo February
.if \n(mo=3 .ds mo March
.if \n(mo=4 .ds mo April
.if \n(mo=5 .ds mo May
.if \n(mo=6 .ds mo June
.if \n(mo=7 .ds mo July
.if \n(mo=8 .ds mo August
.if \n(mo=9 .ds mo September
.if \n(mo=10 .ds mo October
.if \n(mo=11 .ds mo November
.if \n(mo=12 .ds mo December
.if \n(dw=1 .ds dw Sunday
.if \n(dw=2 .ds dw Monday
.if \n(dw=3 .ds dw Tuesday
.if \n(dw=4 .ds dw Wednesday
.if \n(dw=5 .ds dw Thursday
.if \n(dw=6 .ds dw Friday
.if \n(dw=7 .ds dw Saturday
.nr y2 \n(yr%100
.af y2 00
.nr y4 \n(yr+1900
.ds td \*(mo \n(dy, \n(y4
.rr x
.nr $v \n(.v00+\n(.sp-1/\n(.sp
.nr $V \n($v
.nr hm 4v
.nr tm 7v
.nr bm 6v
.nr fm 3v
.nr tf 3
.nr tp 10
.hy 14
.nr bi 4m
.nr pi 5n
.nr pf 1
.nr pp 10
.nr qi 4n
.nr qp -1
.nr ii 5n
.nr $m 1
.nr $s 4n
.nr sf 3
.nr sp 10
.nr ss 12p
.nr si 0
.@R 0x
.ds { \v'-0.4m'\x'\\n(0x=0*-0.2m'\s-3
.ds } \s0\v'0.4m'
.ds [ \*{
.ds ] \*}
.ds < \v'0.4m'\x'\\n(0x=0*0.2m'\s-3
.ds > \s0\v'-0.4m'
.ds - \(em
.@S |0
.@S |1
.@S |2
.@S |3
.@S $H
.@S $0
.@S $1
.@S $2
.@S $3
.@S $4
.@S $5
.@S $6
.@S $7
.@S $8
.@S $9
.@S ..
.@R po
.@R $0
.@R $i
.@R $p
.@R $r
.@R $R
.@R df
.@R so
.@R fu
.@R bt
.@R *
.@R ?a
.@R ?b
.@R ?C
.@R ?e
.@R ?H
.@R ?I
.@R ?n
.@R ?o
.@R ?R
.@R ?s
.@R ?T
.@R ?W
.@R ?w
.nr fi 0.3i
.nr _o \n(.o
.nr $b 3
.nr ps 0.35v
.if \n(ps<\n(.V .nr ps \n(.V
.nr bs \n(ps
.nr qs \n(ps
.nr zs 1v
.nr xs 0.2v
.nr xu 0.5i
.nr fs 0.2v
.nr es 0.5v
.if \n(es<\n(.V .nr es \n(.V
.wh 0 @h
.nr $l \n(.lu
.nr _L \n(.lu
.nr $c 1
.nr $f 1 1
.ds * \*{1\*}\k*
.nr $d 1 1
.ds # [1]\k#
.nr _M 1
.ds lq \(lq
.ds rq \(rq
.em @z
.ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
.ds #v 0.6m
.ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\(aa\h'|\\n_u'
.ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\(ga\h'|\\n_u'
.ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m)'\v'-\*(#v'\z.\h'0.2m'.\h'|\\n_u'\v'\*(#v'
.ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'^\h'|\\n_u'
.ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'~\h'|\\n_u'
.ds , \k_\h'-(\\n(.wu)',\h'|\\n_u'
.ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\s-4v\s0\v'\*(#v'\h'|\\n_u'
.ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\z\(de\v'0.4n'\h'|\\n_u'
.ds qe \s-2\v'0.45m'\z\(em\v'-0.625m'\z\(em\v'-0.625m'\(em\v'0.8m'\s0\h'-0.1m'\v'-0.05m'\(br\v'0.05m'\h'0.1m'
.ds qa \z\e\h'0.35m'\z\(sl\h'-0.33m'\v'-0.3m'\s-4\(em\s0\v'0.3m'\h'0.15m'
.rm #h #v
.ll 6.0i
.lt 6.0i
.de @U
.tm The \\$1 macro has been removed from this version of the -me macros.
..
.de lo
.@U lo
..
.de th
.@U th
..
.de ac
.@U ac
..
1.18.1.4/tmac/Xps.tmac 0000666 00000002654 15047753021 0010017 0 ustar 00 .\" Xps.tmac
.\"
.do mso ps.tmac
.nr _C \n(.C
.cp 0
.de Xps-char
. char \\$1 \Z"\X'ps: invis'\\$2\X'ps: endinvis'"\\$1
..
.
.Xps-char \[bu] \f[S]\[bu]
.Xps-char \[f/] \f[S]\[f/]
.Xps-char \[em] "\v'-.25m'\h'.05m'\D'l .9m 0'"
.Xps-char \[aq] '
.Xps-char \[bq] ,
.Xps-char \[Bq] ,,
.Xps-char \[lq] ``
.Xps-char \[rq] ''
.Xps-char \[OE] OE
.Xps-char \[oe] oe
.Xps-char \[Fn] \f[S]\[Fn]
.Xps-char \[vS] \o'\[ah]S'
.Xps-char \[vs] \o'\[ah]s'
.Xps-char \[vZ] \o'\[ah]Z'
.Xps-char \[vz] \o'\[ah]z'
.Xps-char \[/L] \o'/L'
.Xps-char \[/l] \o'/l'
.Xps-char \[:Y] \o'\[ad]Y'
.Xps-char \[a"] \[sd]
.Xps-char \[a.] \v'-.6m'.
.Xps-char \[ga] "\Z'\v'-.7m'\D'l .22m .18m''"
.Xps-char \[ab] \v'-.55m'\s[\En[.s]*6u/10u]u\s[0]
.Xps-char \[ah] \v'-.55m'\s[\En[.s]/2u]v\s[0]
.Xps-char \[ao] "\v'-.55m'\s[\En[.s]*6u/10u]\D'c .25m'\s[0]"
.Xps-char \[ho] \s[\En[.s]/2u]\v'.4m'c\s[0]
.Xps-char \[.i] i
.Xps-char \[fo] <
.Xps-char \[fc] >
.Xps-char \[OK] \s[\En[.s]*6u/10u]\e\s[0]/
.Xps-char \[tm] \v'-.3m'\s[\En[.s]*6u/10u]TM\s[0]
.Xps-char \[dd] "\Z'\h'.25m'\v'.15m'\D'l 0 -.8m'\v'.2m'\h'-.195m'\
\D'l .39m 0'\v'.4m'\D'l -.39m 0''"
.Xps-char \[dg] "\Z'\h'.25m'\v'.15m'\D'l 0 -.8m'\v'.2m'\h'-.195m'\
\D'l .39m 0''"
.Xps-char \[en] \-
.Xps-char \[%0] %\s[\En[.s]*6u/10u]\f[I]0
.Xps-char \[lh] \[->]
.Xps-char \[rh] \[<-]
.cp \n[_C]
.
.do ie '\[char97]'a' \
. do mso latin1.tmac
.el \
. do mso cp1047.tmac
.
.\" make sure that no blank lines creep in at the end of this file.
1.18.1.4/tmac/mom.tmac 0000666 00000000041 15047753021 0010021 0 ustar 00 .\" mom.tmac
.\"
.do mso om.tmac
1.18.1.4/tmac/psatk.tmac 0000666 00000002070 15047753021 0010357 0 ustar 00 .\" psatk.tmac
.\"
.\" Implementation of the ATK PB and PE macros for use with groff and grops.
.\" Load this after atk.tmac.
.nr zT 0
.if '\*(.T'ps' .nr zT 1
.nr psatk-unit 1p
.de psatk-defs
ps: mdef 5
/PB {
/saved save def
currentpoint translate
\n[psatk-unit] u -\n[psatk-unit] u scale
userdict begin
/showpage {} def
} bind def
/PE {
end
saved restore
} bind def
/troffadjust {
pop 0
} bind def
..
.de PB
.ne \\$1p
.nr zT \\n(zT>0
\\*[PB\\n(zT]\\
..
.de PE
\\*[PE\\n(zT]\\
..
.ds PB0
.\" The last line before the "'PE" is "\}" rather than ".\}". This
.\" would cause a spurious space to be introduced before any picture
.\" that was the first thing on a line. So we have to catch that and
.\" remove it.
.de PB1
.ev psatk
.fi
.di psatk-mac
\!ps: exec PB
..
.de PE0
\v'-.75m'\
\D'l \\$1p 0'\D'l 0 \\$2p'\D'l -\\$1p 0'\D'l 0 -\\$2p'\
\h'\\$1p'\v'.75m'\x'\\$2p-1m>?0'\c
..
.ds psatk-init \Y[psatk-defs]
.de PE1
\!PE
.di
.di null
.br
.di
.rm null
.ev
\v'-.75m'\
\\*[psatk-init]\Y[psatk-mac]\
\h'\\$1p'\v'.75m'\x'\\$2p-1m>?0'\c
.rm psatk-mac
.if \\n(.P .ds psatk-init
..
1.18.1.4/tmac/mm.tmac 0000666 00000000037 15047753021 0007647 0 ustar 00 .\" mm.tmac
.\"
.do mso m.tmac
1.18.1.4/tmac/mmse.tmac 0000666 00000000043 15047753021 0010174 0 ustar 00 .\" mmse.tmac
.\"
.do mso mse.tmac
1.18.1.4/tmac/m.tmac 0000666 00000226341 15047753021 0007502 0 ustar 00 .\"
.de @revision
.ds RE \\$2
..
.\"
.\" $Id: m.tmac,v 2.15 2002/08/07 23:23:34 wlemb Exp $
.@revision $Revision: 2.15 $
.ig
Copyright (C) 1991-2000 Free Software Foundation, Inc.
mgm is written by Jörgen Hägg
mgm is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 2, or (at your option) any later
version.
mgm is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License along
with groff; see the file COPYING. If not, write to the Free Software
Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
Please send bugreports with examples to jh@axis.com.
Naming convention stolen from mgs.
Local names module*name
Extern names module@name
Env.var environ:name
Index array!index
..
.if !\n(.g .ab These mm macros require groff.
.do if d PH .nx
.if \n(.C .ab The groff mm macros do not work in compatibility mode.
.if (\n[.warn] == 65543) .warn
.\" ######## init #######
.\" Contents level [0:7], contents saved if heading level <= Cl
.nr Cl 2
.\" Eject page between LIST OF XXXX if Cp == 0
.nr Cp 0
.\" Debugflag
.if !r D .nr D 0
.\" Eject after floating display is output [0:1]
.nr De 0
.\" Floating keep output [0;5]
.nr Df 5
.\" space before and after display if == 1 [0:1]
.nr Ds 1
.\" Eject page
.nr Ej 0
.\" Equation label adjust 0=left, 1=right
.nr Eq 0
.\" Em dash string
.ie n .ds EM " --
.el .ds EM \(em
.\" Footnote spacing
.nr Fs 1
.\" H1-H7 heading counters
.nr H1 0 1
.nr H2 0 1
.nr H3 0 1
.nr H4 0 1
.nr H5 0 1
.nr H6 0 1
.nr H7 0 1
.\" Heading break level [0:7]
.nr Hb 2
.\" heading centering level, [0:7]
.nr Hc 0
.\" header format
.ds HF 2 2 2 2 2 2 2
.\" heading temp. indent [0:2]
.\" 0 -> 0 indent, left margin
.\" 1 -> indent to right , like .P 1
.\" 2 -> indent to line up with text part of preceding heading
.nr Hi 1
.\" header pointsize
.ds HP 0 0 0 0 0 0 0
.\" heading space level [0:7]
.nr Hs 2
.\" heading numbering type
.\" 0 -> multiple (1.1.1 ...)
.\" 1 -> single
.nr Ht 0
.\" Unnumbered heading level
.nr Hu 2
.\" hyphenation in body
.\" 0 -> no hyphenation
.\" 1 -> hyphenation 14 on
.nr Hy 0
.\" text for toc, selfexplanatory. Look in the new variable section
.ds Lf LIST OF FIGURES
.nr Lf 1
.ds Lt LIST OF TABLES
.nr Lt 1
.ds Lx LIST OF EXHIBITS
.nr Lx 1
.ds Le LIST OF EQUATIONS
.nr Le 0
.\" List indent, used by .AL
.nr Li 6
.\" List space, if listlevel > Ls then no spacing will occur around lists.
.nr Ls 99
.\" Numbering style [0:5]
.if !r N .nr N 0
.\" numbered paragraphs
.\" 0 == not numbered
.\" 1 == numbered in first level headings.
.nr Np 0
.\" Format of figure,table,exhibit,equation titles.
.\" 0= ". ", 1=" - "
.nr Of 0
.\" Table of contents page numbering style
.nr Oc 0
.\" Page-number, normally same as %.
.nr P 0
.\" paragraph indent
.nr Pi 5
.\" paragraph spacing
.nr Ps 1
.\" paragraph type
.\" 0 == left-justified
.\" 1 == indented .P
.\" 2 == indented .P except after .H, .DE or .LE.
.nr Pt 0
.\" Reference title
.ds Rp REFERENCES
.\" Display indent
.nr Si 5
.\"
.\" Current state of TOC, empty outside TC, inside
.\" it will be set to co,fg,tb,ec,ex or ap.
.ds Tcst
.\"
.ds Tm \(tm
.\"
.\"---------------------------------------------
.\" Internal global variables
.\"
.\" This is for cover macro .MT
.\" .ds @language
.\"
.nr @copy_type 0
.if r C .nr @copy_type \n[C]
.\" >0 if Subject/Date/From should be bold, roman otherwise
.ie n .ds @sdf_font R
.el .ds @sdf_font B
.if \n[@copy_type]=4 \{\
. ls 2
. nr Pi 10
. nr Pt 1
.\}
.\"
.\"
.if r E \{\
. ie \n[E] .ds @sdf_font B
. el .ds @sdf_font R
.\}
.\"
.\" Current pointsize and vertical space, always in points.
.if !r S .nr S 10
.ps \n[S]
.vs \n[S]+2
.\"
.nr @ps \n[.ps]
.nr @vs \n[.v]
.if \n[D]>1 .tm @ps=\n[@ps], @vs=\n[@vs]
.if \n[D]>3 .tm INIT: l:\n[.l] p:\n[.p] o:\n[.o]
.\"
.\" Page length
.if r L \{\
. ie n .pl \n[L]u
. el .pl \n[L]u
.\}
.nr @pl \n[.p]
.\"
.\" page width
.ie r W \{\
. ie n .ll \n[W]u
. el .ll \n[W]u
.\}
.el .ll 6i
.nr @ll \n[.l]
.nr @cur-ll \n[@ll]
.lt \n[@ll]u
.\"
.\" page offset
.ie r O .po \n[O]u
.el \{\
. ie n .po .75i
. el .po .963i
.\}
.\"
.nr @po \n[.o]
.\"
.\" non-zero if escape mechanism is turned off. Used by VERBON/OFF
.nr @verbose-flag 0
.\"---------------------------------------------
.\" New variables
.\"
.\" Appendix name
.ds App APPENDIX
.\" print appendixheader, 0 == don't
.nr Aph 1
.\"
.\" Current appendix text
.ds Apptext
.\" Controls the space before and after static displays if defined.
.\" Lsp is used otherwise
.\" .nr Dsp 1v
.\"
.\" Add a dot after level one heading number if >0
.nr H1dot 1
.\"
.\" header prespace level. If level <= Hps, then two lines will be printed
.\" before the header instead of one.
.nr Hps 1
.\"
.\" These variables controls the number of lines preceding .H.
.\" Hps1 is the number of lines when level > Hps
.nr Hps1 0.5v
.if n .nr Hps1 1v
.\"
.\" Hps2 is the number of lines when level <= Hps
.nr Hps2 1v
.if n .nr Hps2 2v
.\"
.\" Hss is the number of lines (Lsp) after the header.
.nr Hss 1
.\"
.\" H1txt will be updated by .H and .HU, containing the heading text.
.\" Will also be updated in table of contents & friends
.\"
.ds H1txt
.\"
.\" header text for the index
.ds Index INDEX
.\" command to sort the index
.ds Indcmd sort
.\"
.\" flag for mkindex
.if !r Idxf .nr Idxf 0
.\" Change these in the national configuration file
.ds Lifg Figure
.ds Litb TABLE
.ds Liex Exhibit
.ds Liec Equation
.ds Licon CONTENTS
.\" Flag for space between mark and prefix 1==space, 0==no space
.\" Can also be controlled by using '.LI mark 2'
.nr Limsp 1
.\"
.\" Lsp controls the height of an empty line. Normally 0.5v
.\" Normally used for nroff compatibility.
.nr Lsp 0.5v
.if n .nr Lsp 1v
.ds MO1 January
.ds MO2 February
.ds MO3 March
.ds MO4 April
.ds MO5 May
.ds MO6 June
.ds MO7 July
.ds MO8 August
.ds MO9 September
.ds MO10 October
.ds MO11 November
.ds MO12 December
.\" for GETR
.ds Qrf See chapter \\*[Qrfh], page \\*[Qrfp].
.\"
.\" header- and footer-size will only change to the current
.\" if Pgps is > 0.
.nr Pgps 1
.\"
.\" section-page if Sectp > 0
.nr Sectp 0
.if (\n[N]=3):(\n[N]=5) \{\
. nr Sectp 1
. nr Ej 1
.\}
.\" section-figure if Sectf > 0
.nr Sectf 0
.if \n[N]=5 .nr Sectf 1
.\"
.\" argument to .nm in .VERBON.
.ds Verbnm "1
.\" indent for VERBON
.nr Verbin 5n
.\"
.\" Letter section
.\" Formal closing (.FC)
.ds Letfc Yours very truly,
.\"
.\" Approval line
.ds Letapp APPROVED:
.\" Approval date-string
.ds Letdate Date
.\"
.ds LetCN CONFIDENTIAL\" Confidential default
.ds LetSA To Whom It May Concern:\" Salutation default
.ds LetAT ATTENTION:\" Attention string
.ds LetSJ SUBJECT:\" Subject string
.ds LetRN In reference to:\" Reference string
.\"
.\" Copy to (.NS)
.ds Letnsdef 0
.ds Letns!copy Copy \" space!
.ds Letns!to " to
.ds Letns!0 Copy to
.ds Letns!1 Copy (with att.) to
.ds Letns!2 Copy (without att.) to
.ds Letns!3 Att.
.ds Letns!4 Atts.
.ds Letns!5 Enc.
.ds Letns!6 Encs.
.ds Letns!7 Under separate cover
.ds Letns!8 Letter to
.ds Letns!9 Memorandum to
.ds Letns!10 Copy (with atts.) to
.ds Letns!11 Copy (without atts.) to
.ds Letns!12 Abstract Only to
.ds Letns!13 Complete Memorandum to
.ds Letns!14 CC:
.\"
.\" Text printed below the footer. Controlled by @copy_type (C).
.ds Pg_type!0
.ds Pg_type!1 OFFICIAL FILE COPY
.ds Pg_type!2 DATE FILE COPY
.ds Pg_type!3 D\ R\ A\ F\ T
.ds Pg_type!4 D\ R\ A\ F\ T
.\" Max lines in return address
.nr Letwam 14
.\"--------------------------
.\" test for mgm macro. This can be used if the text must test
.\" what macros is used.
.nr .mgm 1
.\"
.\" Due to security problems with groff I had to rewrite
.\" the reference system. It's not as elegant as before, you
.\" have to run groff with '-z -rRef=1' and put stderr into the filename
.\" for .INITR
.\"
.\" Output references to stderr if non-zero
.ie !r Ref \{\
. nr Ref 0
.\}
.el .warn 0
.\"
.\"---------------------------------------------
.\" set local variables.
.ie d @language .mso mm/\*[@language]_locale
.el .mso mm/locale
.\"---------------------------------------------
.if \n[D] .tm Groff mm, version \*[RE].
.\" ####### module init ######
.\" reset all things
.de init@reset
.ie \\n[misc@adjust] 'ad
.el 'na
.ie \\n[Hy] 'hy 14
.el 'nh
'in 0
'ti 0
.ps \\n[@ps]u
.vs \\n[@vs]u
..
.de @warning
'tm WARNING:(\\n[.F]) input line \\n[.c]:\\$*
.if \\n[D] .backtrace
..
.de @error
'tm ******************
'tm ERROR:(\\n[.F]) input line \\n[.c]:\\$*
.if \\n[D] .backtrace
'tm ******************
.ab "Input aborted, syntax error"
..
.de misc@toupper
.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
.br
\\$1
.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
.br
..
.\" ####### module debug #################################
.de debug
'tm \\$1:\\n[.F]:\\n[c.] ll=\\n[.l] vs=\\n[.v] ps=\\n[.s],\\n[.ps] \
in=\\n[.i] fi=\\n[.u] .d=\\n[.d] nl=\\n[nl] pg=\\n[%]
..
.de debug-all
.nr debug*n 1n
.nr debug*m 1m
'tm \\$1:\\n[.F]:\\n[c.] ll=\\n[.l] vs=\\n[.v] ps=\\n[.s] in=\\n[.i]\
ad=\\n[.j] fi=\\n[.u] pl=\\n[.p] page=\\n[%] .o=\\n[.o]
'tm _______ .d=\\n[.d] .f=\\n[.f] .h=\\n[.h] .k=\\n[.k] .n=\\n[.n]\
.p=\\n[.p] .t=\\n[.t] .z=\\n[.z] nl=\\n[nl] dn=\\n[dn] n=\\n[debug*n]
..
.\" ####### module par #################################
.nr par@ind-flag 1 \" indent on following P if Pt=2
.nr hd*last-pos -1
.nr hd*last-hsize -1
.nr par*number 0 1
.af par*number 01
.nr par*number2 0 1
.af par*number2 01
.nr par*num-count 0 1
.af par*num-count 01
.\" reset numbered paragraphs, arg1 = headerlevel
.de par@reset-num
.if \\$1<3 .nr par*num-count 0
.if (\\$1=1)&(\\n[Np]=1) .nr par*number 0
..
.\"------------
.\" paragraph
.de P
.\" skip P if previous heading
.if \\n[D]>2 \{\
. tm Paragraph nl=\\n[nl], last=\\n[hd*last-pos]
. tm Paragraph .k=\\n[.k], hsize=\\n[hd*last-hsize]
.\}
.if !((\\n[nl]=\\n[hd*last-pos]):(\\n[hd*last-hsize]=\\n[.k])) \{\
. if \\n[D]>2 .tm Paragraph set ind-flag=1
. nr par@ind-flag 1
.\}
.\" any collected unprinted text?
.par@doit \\$*
.if \\n[Np] \\n[H1].\\n+[par*number]\ \ \c
..
.\"------------
.de nP
.\" skip P if previous heading
.if \\n[D]>2 \{\
. tm Paragraph nl=\\n[nl], last=\\n[hd*last-pos]
. tm Paragraph .k=\\n[.k], hsize=\\n[hd*last-hsize]
.\}
.if !((\\n[nl]=\\n[hd*last-pos]):(\\n[hd*last-hsize]=\\n[.k])) \{\
. if \\n[D]>2 .tm Paragraph set ind-flag=1
. nr par@ind-flag 1
.\}
.par@doit \\$*
\\n[H2].\\n+[par*number2]\ \ \c
.nr par@ind-flag 1
..
.\"------------
.de par@doit
.SP (u;\\n[Ps]*\\n[Lsp])
.ie \\n[.$] \{\
. if \\$1=1 .ti +\\n[Pi]n
.\}
.el \{\
. if \\n[Pt]=1 .ti +\\n[Pi]n
. if (\\n[Pt]=2)&\\n[par@ind-flag] .ti +\\n[Pi]n
.\}
..
.\" ####### module line #######################################
.de SP
.br
.if !r line*lp\\n[.z] .nr line*lp\\n[.z] 0
.if !r line*ac\\n[.z] .nr line*ac\\n[.z] 0
.ie \\n[.$] .nr line*temp (v;\\$1)
.el .nr line*temp 1v
.\"
.ie \\n[line*lp\\n[.z]]=\\n[.d] \{\
. \" go here if no output since the last .SP
. nr line*output \\n[line*temp]-\\n[line*ac\\n[.z]]
. if \\n[line*output]<0 .nr line*output 0
. nr line*ac\\n[.z] +\\n[line*output]
.\}
.el \{\
. nr line*ac\\n[.z] \\n[line*temp]
. nr line*output \\n[line*temp]
. \" no extra space in the beginning of a page
. if (\\n[.d]<0):(\\n[pg*head-mark]=\\n[.d]) .nr line*output 0
.\}
.if \\n[line*output] .sp \\n[line*output]u
.nr line*lp\\n[.z] \\n[.d]
..
.\" ######## module misc ###############
.nr misc@adjust 14
.de SA
.if \\n[.$] \{\
. if \\$1-1 .@error "SA: bad arg: \\$1"
. nr misc@adjust 0\\$1
.\}
.ie \\n[misc@adjust] 'ad
.el 'na
..
.\"-------------
.\" switch environment, keep all important settings.
.de misc@ev-keep
.nr misc*ll \\n[.l]
.ev \\$1
.ll \\n[misc*ll]u
.lt \\n[misc*ll]u
..
.\"-------------
.\" .misc@push stackname value
.de misc@push
.ie d misc*st-\\$1 .ds misc*st-\\$1 \\$2 \\*[misc*st-\\$1]
.el .ds misc*st-\\$1 \\$2
..
.\"-------------
.\" .misc@pop stackname
.\" value returned in the string misc*pop
.de misc@pop
.misc@pop-set misc*st-\\$1 \\*[misc*st-\\$1]
..
.\"-------------
.de misc@pop-set
.ds misc*st-name \\$1
.shift
.if \\n[.$]<1 .@error "stack \\*[misc*st-name] empty"
.ds misc*pop \\$1
.shift
.ds \\*[misc*st-name] \\$*
..
.\"-------------
.\" .misc@pop-nr stackname varname
.de misc@pop-nr
.misc@pop \\$1
.nr \\$2 \\*[misc*pop]
..
.\"-------------
.\" .misc@pop-ds stackname varname
.de misc@pop-ds
.misc@pop \\$1
.ds \\$2 \\*[misc*pop]
..
.\"-----------
.\" reset tabs
.de TAB
.ta T 5n
..
.\"-------------
.\" .PGFORM linelength [ pagelength [ pageoffset [1]]]
.de PGFORM
.\" Break here to avoid problems with new linesetting of the previous line.
.\" Hope this doesn't break anything else :-)
.\" Don't break if arg_4 is a '1'.
.if \\n[D]>2 .tm PGFORM: \\$*
.if ''\\$4' .br
.if \\n[D]>3 .tm PGFORM: IN l:\\n[.l] p:\\n[.p] o:\\n[.o]
.ie !''\\$1' \{\
. ll \\$1
. nr @ll \\n[.l]
. nr @cur-ll \\n[@ll]
. lt \\n[@ll]u
.\}
.el \{\
. ll \\n[@ll]u
. lt \\n[@ll]u
.\}
.\"
.ie !''\\$2' \{\
. pl \\$2
. nr @pl \\n[.p]
.\}
.el .pl \\n[@pl]u
.\"
.ie !''\\$3' \{\
. po \\$3
. nr @po \\n[.o]
.\}
.el .po \\n[@po]u
.if \\n[D]>3 .tm PGFORM: OUT l:\\n[.l] p:\\n[.p] o:\\n[.o]
.if \\n[D]>2 .tm PGFORM: ll=\\n[@ll], pl=\\n[@pl], po=\\n[@po]
'in 0
.pg@move-trap
.if \\n[D]>2 \{\
. tm Traps:
. ptr
.\}
..
.\"-------------
.\" .MOVE y [[x] linelength]
.\" move to line y, indent to x
.de MOVE
.if !\\n[.$] .@error "MOVE y [x]: no arguments"
.if \\n[nl]<0 \c
.\" move to Y-pos
.sp |(v;\\$1)
.\" calc linelength
.ie \\n[.$]>2 .nr pg*i (n;\\$3)
.el \{\
. ie \\n[.$]>1 .nr pg*i (n;\\n[@ll]u-\\$2)
. el .nr pg*i \\n[@ll]u
.\}
.\" move to X-pos, if any
.if !''\\$2' .po \\$2
.\" set linelength
.ll \\n[pg*i]u
..
.\"-------------
.de SM
.if !\\n[.$] .@error "SM: no arguments"
.if \\n[.$]=1 \s-1\\$1\s0
.if \\n[.$]=2 \s-1\\$1\s0\\$2
.if \\n[.$]=3 \\$1\s-1\\$2\s0\\$3
..
.\"-------------
.nr misc*S-ps \n[@ps]
.nr misc*S-vs \n[@vs]
.nr misc*S-ps1 \n[@ps]
.nr misc*S-vs1 \n[@vs]
.ds misc*a
.ds misc*b
.de S
.ie !\\n[.$] \{\
. ds misc*a P
. ds misc*b P
.\}
.el \{\
. ie \\n[.$]=1 .ds misc*b D
. el \{\
. ie \w@\\$2@=0 .ds misc*b C
. el .ds misc*b \\$2
. \}
. ie \w@\\$1@=0 .ds misc*a C
. el .ds misc*a \\$1
.\}
.\"
.\" set point size
.if !'\\*[misc*a]'C' \{\
. ie '\\*[misc*a]'P' .ps \\n[misc*S-ps]u
. el \{\
. ie '\\*[misc*a]'D' .ps \\n[S]
. el .ps \\*[misc*a]
. if \\n[D]>2 .tm S: .ps \\*[misc*a]
. \}
.\}
.\"
.\" set vertical spacing
.if !'\\*[misc*b]'C' \{\
. ie '\\*[misc*b]'P' .vs \\n[misc*S-vs]u
. el \{\
. ie '\\*[misc*b]'D' .vs \\n[.ps]u+2p
. el .vs \\*[misc*b]
. if \\n[D]>2 .tm S: .vs \\*[misc*b]
. \}
.\}
.nr @ps \\n[.ps]
.nr @vs \\n[.v]
.\"
.if \\n[D]>1 .tm S(\\$*): ma:\\*[misc*a], mb:\\*[misc*b] => ps:\\n[@ps]u, vs:\\n[@vs]u
.nr misc*S-ps \\n[misc*S-ps1]
.nr misc*S-vs \\n[misc*S-vs1]
.nr misc*S-ps1 \\n[@ps]
.nr misc*S-vs1 \\n[@vs]
.pg@move-trap
..
.\"------------
.de HC
.ev 0
.hc \\$1
.ev
.ev 1
.hc \\$1
.ev
.ev 2
.hc \\$1
.ev
..
.\"------------
.de RD
.di misc*rd
'fl
.rd \\$1\t
.br
.di
.ie !''\\$3' \{\
. di misc*rd2
. ds \\$3 "\\*[misc*rd]
. br
. di
.\}
.if !''\\$2' .rn misc*rd \\$2
.rm misc*rd misc*rd2
..
.\"------------
.\" VERBON [flag [pointsize [font]]]
.\" flag
.\" bit function
.\" 0 escape on
.\" 1 add an empty line before verbose text
.\" 2 add an empty line after verbose text
.\" 3 numbered lines (controlled by the string Verbnm)
.\" 4 indent text by the numbervariable Verbin.
.de VERBON
.br
.nr misc*verb 0\\$1
.if (0\\n[misc*verb]%4)/2 .SP \\n[Lsp]u
.misc@ev-keep misc*verb-ev
.nf
.if (0\\n[misc*verb]%16)/8 .nm \\*[Verbnm]
.ie !'\\$3'' .ft \\$3
.el .ft CR
.ie 0\\$2 \{\
. ss \\$2
. ps \\$2
. vs \\$2
.\}
.el .ss 12
.ta T 8u*\w@n@u
.if (0\\n[misc*verb]%32)/16 .in +\\n[Verbin]u
.if 0\\n[misc*verb]%2 \{\
. eo
. nr @verbose-flag 1 \" tell pageheader to set ec/eo
.\}
..
.de VERBOFF
.ec
.br
.if (0\\n[misc*verb]%8)/4 .SP \\n[Lsp]u
.if (0\\n[misc*verb]%16)/8 .nm
.if (0\\n[misc*verb]%32)/16 .in
.ev
.nr @verbose-flag 0
..
.\" ######## module pict #################
.nr pict*width 0
.nr pict*height 0
.nr pict*mode 0
.nr pict*ind 0
.nr pict*id 0 1
.\" I assume that the number variable pict*id is the same
.\" between two runs.
.de PIC
.br
.nr pict*ind 0
.nr pict*box 0
.while \\n[.$]>0 \{\
. if '-B'\\$1' \{\
. nr pict*box 1
. shift
. continue
. \}
. if '-L'\\$1' \{\
. nr pict*mode 0
. shift
. continue
. \}
. if '-R'\\$1' \{\
. nr pict*mode 1
. shift
. continue
. \}
. if '-I'\\$1' \{\
. nr pict*ind (m;\\$2)
. nr pict*mode 2
. shift 2
. continue
. \}
. if '-C'\\$1' \{\
. nr pict*mode 3
. shift
. continue
. \}
. ds pict*f \\$1
. nr pict*id +1
. shift
. if \\n[.$]>0 \{\
. nr pict*width (i;\\$1)
. shift
. \}
. if \\n[.$]>0 \{\
. nr pict*height (i;\\$1)
. shift
. \}
.\}
.\" let mmroff know the filename and id
.if \\n[Ref]>0 \{\
. tm .\\\\" PIC id \\n[pict*id]
. tm .\\\\" PIC file \\*[pict*f]
.\}
.\" these are defined by mmroff in the second pass
.if d pict*file!\\n[pict*id] \{\
. ds pict*f \\*[pict*file!\\n[pict*id]]
. nr pict*llx \\n[pict*llx!\\n[pict*id]]
. nr pict*lly \\n[pict*lly!\\n[pict*id]]
. nr pict*urx \\n[pict*urx!\\n[pict*id]]
. nr pict*ury \\n[pict*ury!\\n[pict*id]]
. \"
. nr pict*w (p;\\n[pict*urx]-\\n[pict*llx])
. if \\n[pict*w]<0 .nr pict*w 0-\\n[pict*w]
. nr pict*h (p;\\n[pict*ury]-\\n[pict*lly])
. if \\n[pict*h]<0 .nr pict*h 0-\\n[pict*h]
. if \\n[pict*width]>0 \{\
. nr pict*rs (u;1000*\\n[pict*width]/\\n[pict*w])
. nr pict*w (u;\\n[pict*w]*\\n[pict*rs]/1000)
. nr pict*h (u;\\n[pict*h]*\\n[pict*rs]/1000)
. \}
. if \\n[pict*height]>0 \{\
. nr pict*rs (u;1000*\\n[pict*height]/\\n[pict*h])
. nr pict*h (u;\\n[pict*h]*\\n[pict*rs]/1000)
. \}
. if '0'\\n[pict*mode]' \{\
. nr pict*in \\n[.i]u
. \}
. if '1'\\n[pict*mode]' \{\
. nr pict*in (u;\\n[.l]-\\n[.i]-\\n[pict*w])
. \}
. if '2'\\n[pict*mode]' \{\
. nr pict*in \\n[pict*ind]u
. \}
. if '3'\\n[pict*mode]' \{\
. nr pict*in (u;(\\n[.l]-\\n[.i]-\\n[pict*w])/2)
. \}
. ds pict*h "
. if \\n[pict*h]>0 .ds pict*h \\n[pict*h]
. \"
. ne \\n[pict*h]u-1v
. \"
. \" these lines are copied and modified from tmac.pspic.
. \" Originally written by James Clark
. br
. ie \\n[pict*box]>0 \{\
\v'-1v'\h'\\n[pict*in]u'\
\Z'\D'p 0 \\n[pict*h]u \\n[pict*w]u 0 0 -\\n[pict*h]u''\
\v'\\n[pict*h]u'\X'ps: import \\*[pict*f] \
\\n[pict*llx] \\n[pict*lly] \
\\n[pict*urx] \\n[pict*ury] \
\\n[pict*w] \\n[pict*h]'
.\}
. el \{\
\v'-1v'\h'\\n[pict*in]u'\
\X'ps: invis'\
\Z'\D'p 0 \\n[pict*h]u \\n[pict*w]u 0 0 -\\n[pict*h]u''\
\X'ps: endinvis'\
\v'\\n[pict*h]u'\X'ps: import \\*[pict*f] \
\\n[pict*llx] \\n[pict*lly] \
\\n[pict*urx] \\n[pict*ury] \
\\n[pict*w] \\n[pict*h]'
. \}
. br
. sp \\n[pict*h]u-1v
.\}
..
.\" external picture
.\" -L left adjust
.de EPIC
.if \\n[.$]<2 .@error "EPIC: Not enough arguments"
.nr pict*adj 0 \" centered
.if '\\$1'-L' \{\
. shift 1 \" left adjust
. nr pict*adj 1
.\}
.if \\n[nl]<0 \&
.nr pict*w \\$1
.nr pict*h \\$2
.ds pict*name "External picture
.if !''$3' .ds pict*name \\$3
.ne \\n[pict*h]u
.sp \\n[pict*h]u-1v
.nr pict*ind 0
.if !\\n[pict*adj] .nr pict*ind (u;(\\n[.l]-\\n[.i]-\\n[pict*w])/2)
.mk
.in +\\n[pict*ind]u
\D'l \\n[pict*w]u 0'\
\D'l 0 -\\n[pict*h]u'\
\D'l -\\n[pict*w]u 0'\
\D'l 0 \\n[pict*h]u'\
\v'-(u;\\n[pict*h]/2)'\
\h'(u;(\\n[pict*w]-\w'\\*[pict*name]'/2))'\\*[pict*name]
.in
.rt
.sp 1v
..
.\" ######## module acc #################
.\"-----------
.\" accents. These are copied from mgs, written by James Clark.
.de acc@over-def
.ds \\$1 \Z'\v'(u;\w'x'*0+\En[rst]-\En[.cht])'\
\h'(u;-\En[skw]+(-\En[.w]-\w'\\$2'/2)+\En[.csk])'\\$2'
..
.de acc@under-def
.ds \\$1 \Z'\v'\En[.cdp]u'\h'(u;-\En[.w]-\w'\\$2'/2)'\\$2'
..
.acc@over-def ` \`
.acc@over-def ' \'
.acc@over-def ^ ^
.acc@over-def ~ ~
.acc@over-def : \(ad
.acc@over-def ; \(ad
.acc@under-def , \(ac
.\" ######## module uni #################
.\" unimplemented macros
.de OK
'tm "OK: not implemented"
..
.de PM
'tm "PM: not implemented"
..
.\" ######## module hd #################
.\" support for usermacro
.nr hd*h1-page 1 \" last page-number for level 1 header.
.nr hd*htype 0
.ds hd*sect-pg
.ds hd*mark
.ds hd*suf-space
.nr hd*need 0
.aln ;0 hd*htype
.als }0 hd*mark
.als }2 hd*suf-space
.aln ;3 hd*need
.\"-------------
.\" .hd@split varable index name val1 val2 ...
.de hd@split
.if \\$2>(\\n[.$]-3) .@error "\\$3 must have at least \\$2 values (\\*[\\$3]).
.nr hd*sp-tmp \\$2+3
.ds \\$1 \\$[\\n[hd*sp-tmp]]
..
.de HU
.H 0 "\\$1"
..
.\"-------------
.de H
.if !r hd*cur-bline .nr hd*cur-bline \\n[nl]
.br
.df@print-float 2\" $$$ could be wrong...
.\" terminate all lists
.LC
.init@reset
.nr hd*level 0\\$1
.nr hd*arg1 0\\$1
.if !\\n[hd*level] .nr hd*level \\n[Hu]
.\"
.\" clear lower counters
.nr hd*i 1 1
.while \\n+[hd*i]<8 .if \\n[hd*level]<\\n[hd*i] .nr H\\n[hd*i] 0 1
.\"
.\" save last text for use in TP
.if \\n[hd*level]=1 .ds H1txt \\$2\\$3
.\"
.\" This is a little fix to be able to get correct H1 heading number
.\" in page headers. Special attention was needed when other formats are used.
.ie !''\\g[H1]' \{\
. ds hd*format \\g[H1]
. af H1 0
. nr H1h \\n[H1] 1
. af H1 \\*[hd*format]
.\}
.el .nr H1h \\n[H1] 1
.if \\n[hd*level]=1 .nr H1h +1
.\"
.\" Check if it's time for new page. Only if text has
.\" appeared before.
.if \\n[Ej]&(\\n[Ej]>=\\n[hd*level])&(\\n[nl]>\\n[hd*cur-bline]) .pg@next-page
.\"
.\" increment current counter
.nr H\\n[hd*level] +1
.\"
.\" update pagenumber if section-page is used
.if (\\n[hd*level]=1)&(\\n[Sectp]>0) .hd@set-page 1
.\"
.\" hd*mark is the text written to the left of the header.
.ds hd*mark \\n[H1].
.\"
.if \\n[hd*level]>1 .as hd*mark \\n[H2]
.\"
.nr hd*i 2 1
.while \\n+[hd*i]<8 .if \\n[hd*level]>(\\n[hd*i]-1) .as hd*mark .\\n[H\\n[hd*i]]
.if \\n[Ht] .ds hd*mark \\n[H\\n[hd*level]].
.\"
.\" special case, no dot after level one heading if not H1dot true
.if (\\n[hd*level]=1)&(\\n[H1dot]=0) .ds hd*mark \\n[H1]
.\"
.as hd*mark \ \ \" add spaces between mark and heading
.if !\\n[hd*arg1] .ds hd*mark\" no mark for unnumbered
.\"
.if \\n[D]>1 .tm At header \\*[hd*mark] "\\$2"
.nr hd*htype 0 \" hd*htype = check break and space
. \" 0 = run-in, 1 = break only, 2 = space
.if \\n[hd*level]<=\\n[Hb] .nr hd*htype 1
.if \\n[hd*level]<=\\n[Hs] .nr hd*htype 2
. \" two spaces if hd*htype == 0
.ie (\\n[hd*htype]=0)&(\w@\\$2@) .ds hd*suf-space " \"
.el .ds hd*suf-space
.nr hd*need 2v \" hd*need = header need space
.\"---------- user macro HX ------------
.\" User exit macro to override numbering.
.\" May change hd*mark (}0), hd*suf-space (}2) and hd*need (;3)
.\" Can also change Hps1/2.
.if d HX .HX \\n[hd*level] \\n[hd*arg1] "\\$2\\$3"
.\"--------------------------------------
.\" pre-space
.ie \\n[hd*level]<=\\n[Hps] .SP (u;\\n[Hps2])
.el .SP (u;\\n[Hps1])
.\"
.par@reset-num \\n[hd*level]\" reset numbered paragraph
.\" start diversion to measure size of header
.di hd*div
\\*[hd*mark]\\$2\\$3\\*[hd*suf-space]
.br
.di
.rm hd*div
.if \\n[hd*htype] .na \" no adjust if run-in
.if \\n[hd*htype]<2 .nr hd*need +\\n[Lsp]u \" add some extra space
.ne \\n[hd*need]u+\\n[dn]u+.5p-1v \" this is the needed space for a header
.\"
.\" size and font calculations
.hd@split hd*font \\n[hd*level] HF \\*[HF]\" get font for this level
.ft \\*[hd*font]\" set new font
.hd@split hd*new-ps \\n[hd*level] HP \\*[HP]\" get point size
.ie (\\*[hd*new-ps]=0):(\w@\\*[hd*new-ps]@=0) \{\
. if \\n[hd*htype] \{\
. if '\\*[hd*font]'3' \{\
. ps -1
. vs -1
. \}
. if '\\*[hd*font]'B' \{\
. ps -1
. vs -1
. \}
. \}
.\}
.el \{\
. ps \\*[hd*new-ps]
. vs \\*[hd*new-ps]+2
.\}
.\"
.\"---------- user macro HY -------------
.\" user macro to reset indents
.if d HY .HY \\n[hd*level] \\n[hd*arg1] "\\$2\\$3"
.\"--------------------------------------
.nr hd*mark-size \w@\\*[hd*mark]@
.if (\\n[hd*level]<=\\n[Hc])&\\n[hd*htype] .ce\" center if level<=Hc
.\"
.\" finally, output the header
\\*[hd*mark]\&\c
.\" and the rest of the header
.ie \\n[hd*htype] \{\
\\$2\\$3
. br
.\}
.el \\$2\\$3\\*[hd*suf-space]\&\c
.ft 1
.\" restore pointsize and vertical size.
.ps \\n[@ps]u
.vs \\n[@vs]u
.\"
.\" table of contents
.if (\\n[hd*level]<=\\n[Cl])&\w@\\$2@ .toc@entry \\n[hd*level] "\\$2"
.\" set adjust to previous value
.SA
.\" do break or space
.if \\n[hd*htype] .br
.if \\n[hd*htype]>1 .SP (u;\\n[Lsp]*\\n[Hss])
.if \\n[hd*htype] \{\
. \" indent if Hi=1 and Pt=1
. if (\\n[Hi]=1)&(\\n[Pt]=1) .ti +\\n[Pi]n
. \" indent size of mark if Hi=2
. if \\n[hd*htype]&(\\n[Hi]>1) .ti +\\n[hd*mark-size]u
.\}
.nr par@ind-flag 0 \" no indent on .P if Pt=2
.\"
.\" check if it is time to reset footnotes
.if (\\n[hd*level]=1)&\\n[ft*clear-at-header] .nr ft*nr 0 1
.\"
.\" check if it is time to reset indexes
.if (\\n[hd*level]=1)&\\n[Sectf] \{\
. nr lix*fg-nr 0 1
. nr lix*tb-nr 0 1
. nr lix*ec-nr 0 1
. nr lix*ex-nr 0 1
.\}
.\"---------- user macro HZ ----------
.if d HZ .HZ \\n[hd*level] \\n[hd*arg1] "\\$2\\$3"
.nr hd*last-pos \\n[nl]
.nr hd*last-hsize \\n[.k]
.nr par@ind-flag 0
..
.\"--------
.de HM
.nr hd*i 0 1
.while \\n+[hd*i]<8 .af H\\n[hd*i] \\$[\\n[hd*i]] 1
..
.\"----------------------
.\" set page-nr, called from header
.\"
.de hd@set-page
.\"
.ie \\n[.$]>0 .nr P \\$1
.el .nr P +1
.\" Set section-page-string
.ds hd*sect-pg \\n[H1]-\\n[P]
.if \\n[Sectp]>1 .if '\\n[H1]'0' .ds hd*sect-pg "
..
.\"########### module pg ####################
.\" set end of text trap
.wh 0 pg@header
.em pg@end-of-text
.\"
.ds pg*header ''- \\nP -''
.ds pg*footer
.if \n[N]=4 .ds pg*header ''''
.if (\n[N]=3):(\n[N]=5) \{\
. ds pg*header ''''
. ds pg*footer ''\\*[hd*sect-pg]''
.\}
.ds pg*even-footer
.ds pg*odd-footer
.ds pg*even-header
.ds pg*odd-header
.\"
.nr pg*top-margin 0
.nr pg*foot-margin 0
.nr pg*block-size 0
.nr pg*footer-size 5v\" 1v+footer+even/odd footer+2v
.nr pg*header-size 7v\" 3v+header+even/odd header+2v
.nr pg*extra-footer-size 0
.nr pg*extra-header-size 0
.nr ft*note-size 0
.nr pg*cur-column 0
.nr pg*cols-per-page 1
.nr pg*cur-po \n[@po]
.nr pg*head-mark 0
.\"
.nr pg*ps \n[@ps]
.nr pg*vs \n[@vs]
.\"-------------------------
.\" footer TRAPS: set, enable and disable
.de pg@set-new-trap
.nr pg*foot-trap \\n[@pl]u-(\\n[pg*block-size]u+\\n[ft*note-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]u+\\n[pg*extra-footer-size]u)
.\"
.if \\n[D]>2 .tm pg*foot-trap \\n[@pl]u-(\\n[pg*block-size]u+\\n[ft*note-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]u+\\n[pg*extra-footer-size]u) = \\n[pg*foot-trap]
.\"
.\" last-pos points to the position of the footer and bottom
.\" block below foot-notes.
.nr pg*last-pos \\n[@pl]u-(\\n[pg*block-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]u)
.if \\n[D]>2 .tm pg*last-pos \\n[@pl]u-(\\n[pg*block-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]u) = \\n[pg*last-pos]
..
.de pg@enable-trap
.wh \\n[pg*foot-trap]u pg@footer
.if \\n[D]>2 .tm pg@enable-trap .t=\\n[.t] nl=\\n[nl]
.if \\n[D]>2 .ptr
..
.de pg@disable-trap
.ch pg@footer
..
.\" move to new trap (if changed).
.de pg@move-trap
.pg@disable-trap
.pg@set-new-trap
.pg@enable-trap
..
.de pg@enable-top-trap
.\" set trap for pageheader.
.nr pg*top-enabled 1
..
.de pg@disable-top-trap
.\" remove trap for pageheader.
.nr pg*top-enabled 0
..
.\" no header on the next page
.de PGNH
.nr pg*top-enabled (-1)
..
.\" set first trap for pagefooter
.pg@enable-top-trap
.pg@set-new-trap
.pg@enable-trap
.\"-------------------------
.\" stop output and begin on next page. Fix footnotes and all that.
.de pg@next-page
.\".debug next-page
.ne 999i \" activate trap
.\" .pg@footer
..
.\"-------------------------
.\" support for PX, TP and EOP.
.als }t pg*header
.als }e pg*even-header
.als }o pg*odd-header
.als TPh pg*header
.als TPeh pg*even-header
.als TPoh pg*odd-header
.\"
.als EOPf pg*footer
.als EOPef pg*even-footer
.als EOPof pg*odd-footer
.\"------------------------------------------------------------
.\" HEADER
.de pg@header
.if \\n[D]>1 .tm Page# \\n[%] (\\n[.F]:\\n[c.])
.if \\n[Idxf] \{\
.tl ''''
.\}
.\" assign current page-number to P
.hd@set-page
.\" reset spacing
.nr line*lp\\n[.z] 0
.nr line*ac\\n[.z] 0
.\"
.\" suppress pageheader if pagenumber == 1 and N == [124]
.if \\n[pg*top-enabled] \{\
.\" must be fixed!!
.\". pg@disable-top-trap
. if \\n[pg*extra-header-size] 'sp \\n[pg*extra-header-size]u
. if \\n[pg*top-margin] 'sp \\n[pg*top-margin]u
. ev pg*tl-ev
. pg@set-env
. ie d let@header .let@header
. el \{\
. ie d TP .TP
. el \{\
' sp 3
. ie ((\\n[%]=1)&((\\n[N]=1):(\\n[N]=2))) .sp
. el .tl \\*[pg*header]
. ie o .tl \\*[pg*odd-header]
. el .tl \\*[pg*even-header]
' sp 2
. \}
. \}
. ev
. \" why no-space??
. if d PX \{\
. ns
. PX
. rs
. \}
. \" check for pending footnotes
. ft@check-old
. \"
. \" back to normal text processing
. pg@enable-trap
. \" mark for multicolumn
. nr pg*head-mark \\n[nl]u
. \" reset NCOL pointer at each new page.
. nr pg*last-ncol 0
. \" set multicolumn
. \"
. pg@set-po
. \" print floating displays
. df@print-float 4
. tbl@top-hook
. ns
.\}
.if \\n[pg*top-enabled]<0 .nr pg*top-enabled 1
.nr hd*cur-bline \\n[nl] \" .H needs to know if output has occured
..
.\"---------------------------------------------------------
.\" FOOTER
.de pg@footer
.ec
.if \\n[D]>2 .tm Footer# \\n[%] (\\n[.F]:\\n[c.])
.pg@disable-trap
.\".debug footer
.tbl@bottom-hook
.\" increment pageoffset for MC
.\" move to the exact start of footer.
'sp |\\n[pg*foot-trap]u+1v
.\"
.if \\n[D]>3 .tm FOOTER after .sp
.\" print footnotes
.if d ft*div .ft@print
.\"
.pg@inc-po
.if !\\n[pg*cur-column] .pg@print-footer
.\" next column
.pg@set-po
.pg@enable-trap
.if \\n[@verbose-flag] .eo \" to help VERBON/VERBOFF
..
.\"-------------------------
.de pg@print-footer
.\" jump to the position just below the foot-notes.
'sp |\\n[pg*last-pos]u+1v
.\" check if there are any bottom block
.if d pg*block-div .pg@block
.\"
.\" print the footer and eject new page
.ev pg*tl-ev
.pg@set-env
.\" user defined end-of-page macro
.ie d EOP .EOP
.el \{\
. ie o .tl \\*[pg*odd-footer]
. el .tl \\*[pg*even-footer]
. ie (\\n[%]=1)&(\\n[N]=1) .tl \\*[pg*header]
. el .tl \\*[pg*footer]
. tl ''\\*[Pg_type!\\n[@copy_type]]''
.\}
.ev
.\" be sure that floating displays and footnotes will be
.\" printed at the end of the document.
.ie (\\n[df*fnr]>=\\n[df*o-fnr]):\\n[ft*exist] \{\
. ev ne
' bp
. ev
.\}
.el 'bp
..
.\"-------------------------
.\"
.\" Initialize the title environment
.de pg@set-env
'na
'nh
'in 0
'ti 0
.ie \\n[Pgps] \{\
. ps \\n[@ps]u
. vs \\n[@vs]u
.\}
.el \{\
. ps \\n[pg*ps]u
. vs \\n[pg*vs]u
.\}
.lt \\n[@ll]u
..
.\"-------------------------
.de PH
.ds pg*header "\\$1
.pg@set-new-size
..
.de PF
.ds pg*footer "\\$1
.pg@set-new-size
..
.de OH
.ds pg*odd-header "\\$1
.pg@set-new-size
..
.de EH
.ds pg*even-header "\\$1
.pg@set-new-size
..
.de OF
.ds pg*odd-footer "\\$1
.pg@set-new-size
..
.de EF
.ds pg*even-footer "\\$1
.pg@set-new-size
..
.de pg@clear-hd
.ds pg*even-header
.ds pg*odd-header
.ds pg*header
..
.de pg@clear-ft
.ds pg*even-footer
.ds pg*odd-footer
.ds pg*footer
..
.de pg@set-new-size
.nr pg*ps \\n[@ps]
.nr pg*vs \\n[@vs]
.pg@move-trap
..
.\"-------------------------
.\" end of page processing
.de pg@footnotes
.\".debug footnotes
.\" output footnotes. set trap for block
.\"
..
.\"-------------------------
.\" print bottom block
.de pg@block
.ev pg*block-ev
'nf
'in 0
.ll 100i
.pg*block-div
.br
.ev
..
.\"-------------------------
.\" define bottom block
.de BS
.misc@ev-keep pg*block-ev
.init@reset
.br
.di pg*block-div
..
.\"-------------------------
.de BE
.br
.di
.nr pg*block-size \\n[dn]u
.ev
.pg@move-trap
..
.\"-------------------------
.\" print out all pending text
.de pg@end-of-text
.if \\n[D]>2 .tm ---------- End of text processing ----------------
.df@eot-print
.ref@eot-print
..
.\"-------------------------
.\" set top and bottom margins
.\" -T sets pg*footer-size and pg*header-size instead
.de VM
.ie '\\$1'-T' \{\
. shift
. if \\n[.$]=0 \{\
. nr pg*footer-size 5v
. nr pg*header-size 7v
. \}
. if \\n[.$]>0 .nr pg*header-size (v;\\$1)
. if \\n[.$]>1 .nr pg*footer-size (v;\\$2)
.\}
.el \{\
. if \\n[.$]=0 \{\
. nr pg*extra-footer-size 0
. nr pg*extra-header-size 0
. \}
. if \\n[.$]>0 .nr pg*extra-header-size (v;\\$1)
. if \\n[.$]>1 .nr pg*extra-footer-size (v;\\$2)
. if \\n[D]>2 \{\
. tm extra top \\n[pg*extra-footer-size]
. tm extra bottom \\n[pg*extra-header-size]
. \}
.\}
.pg@move-trap
..
.\"---------------------
.\" multicolumn output.
.de pg@set-po
.if \\n[pg*cols-per-page]>1 \{\
. ll \\n[pg*column-size]u
.\}
..
.de pg@inc-po
.if \\n[pg*cols-per-page]>1 \{\
. ie \\n+[pg*cur-column]>=\\n[pg*cols-per-page] \{\
. nr pg*cur-column 0 1
. nr pg*cur-po \\n[@po]u
. po \\n[@po]u
. ll \\n[@ll]u
. \}
. el \{\
. nr pg*cur-po +(\\n[pg*column-size]u+\\n[pg*column-sep]u)
. po \\n[pg*cur-po]u
' sp |\\n[pg*head-mark]u
. tbl@top-hook
. \}
.\}
..
.\" An argument disables the page-break.
.de 1C
.br
.if \\n[pg*cols-per-page]<=1 .@error "1C: multicolumn mode not active"
.nr pg*cols-per-page 1
.nr pg*column-sep 0
.nr pg*column-size \\n[@ll]
.nr pg*ncol-i \\n[pg*cur-column]\" temp variable
.nr pg*cur-column 0 1
.nr pg*cur-po \\n[@po]u
.PGFORM
.ie !'\\$1'1' .SK
.el \{\
. if d ft*div \{\
. if \\n[pg*ncol-i]>0 \{\
. @warning 1C: footnotes will be messy
. \}
. \}
. if \\n[pg*last-ncol]>0 \{\
. sp |\\n[pg*last-ncol]u
. nr pg*last-ncol 0
. \}
.\}
..
.de 2C
.br
.nr pg*head-mark \\n[nl]u
.if \\n[pg*cols-per-page]>1 .@error "2C: multicolumn mode already active"
.nr pg*cols-per-page 2
.nr pg*column-sep \\n[@ll]/15
.nr pg*column-size (\\n[@ll]u*7)/15
.nr pg*cur-column 0 1
.nr pg*cur-po \\n[@po]u
.ll \\n[pg*column-size]u
.\" .lt \\n[pg*column-size]u
..
.\" MC column-size [ column-separation ]
.de MC
.br
.nr pg*head-mark \\n[nl]u
.if \\n[pg*cols-per-page]>1 .@error "MC: multicolumn mode already active"
.ie ''\\$1' .nr pg*column-size \\n[.l]
.el .nr pg*column-size (n;\\$1)
.ie ''\\$2' .nr pg*column-sep \\n[pg*column-size]/15
.el .nr pg*column-sep (n;\\$2)
.\"
.\" calculate the number of columns/page
.nr pg*cols-per-page 0
.nr pg*i \\n[pg*column-size]
.while \\n[pg*i]<=\\n[.l] \{\
. nr pg*cols-per-page \\n[pg*cols-per-page]+1
. nr pg*i \\n[pg*i]+\\n[pg*column-sep]+\\n[pg*column-size]
.\}
.nr pg*cur-column 0 1
.nr pg*cur-po \\n[@po]u
.ll \\n[pg*column-size]u
.\" .lt \\n[pg*column-size]u
..
.\" begin a new column
.de NCOL
.br
.if \\n[nl]>\\n[pg*last-ncol] .nr pg*last-ncol \\n[nl]
.pg@footer
..
.\" skip pages
.de SK
.br
.bp
.nr pg*i 0 1
.\" force new page by writing something invisible.
.while \\n+[pg*i]<=(0\\$1) \{\
\&
. bp
.\}
..
.\"-------------------------------
.\" MULB width1 space1 width2 space2 width3 space3 ...
.de MULB
.br
.nr pg*i 0 1
.nr pg*mul-x 0 1
.nr pg*mul-ind 0
.nr pg*mul-last 0
.while \\n[.$] \{\
. nr pg*mul!\\n+[pg*i] (n;0\\$1)
. nr pg*muls!\\n[pg*i] (n;0\\$2)
. shift 2
.\}
.nr pg*mul-max-col \\n[pg*i]
.ds pg*mul-fam \\n[.fam]
.nr pg*mul-font \\n[.f]
.ev pg*mul-ev
.ps \\n[@ps]u
.vs \\n[@vs]u
.fam \\*[pg*mul-fam]
.ft \\n[pg*mul-font]
.fi
.hy 14
.di pg*mul-div
.MULN
..
.\"-----------
.de MULN
.if \\n[pg*mul-x]>=\\n[pg*mul-max-col] .@error "MULN: Undefined columnwidth"
.br
.if \\n[.d]>\\n[pg*mul-last] .nr pg*mul-last \\n[.d]
.rt +0
.in \\n[pg*mul-ind]u
.ll (u;\\n[.i]+\\n[pg*mul!\\n+[pg*mul-x]])u
.nr pg*mul-ind +(u;\\n[pg*mul!\\n[pg*mul-x]]+\\n[pg*muls!\\n[pg*mul-x]])
..
.\"-----------
.\" MULE
.de MULE
.br
.if \\n[.d]>\\n[pg*mul-last] .nr pg*mul-last \\n[.d]
.di
.ev
.ne \\n[pg*mul-last]u
.nf
.mk
.pg*mul-div
.rt
.sp \\n[pg*mul-last]u
.fi
..
.\"-----------
.de OP
.br
.ie o .if !\\n[pg*head-mark]=\\n[nl] \{\
. bp +1
. bp +1
.\}
.el .bp
..
.\"########### module footnotes ###################
.nr ft*note-size 0
.nr ft*busy 0
.nr ft*nr 0 1
.nr ft*wide 0
.nr ft*hyphen 0\" hyphenation value
.nr ft*adjust 1\" >0 if adjust true
.nr ft*indent 1\" >0 if text indent true (not imp. $$$)
.nr ft*just 0\" 0=left justification, 1=right (not imp. $$$)
.nr ft*exist 0\" not zero if there are any footnotes to be printed
.nr ft*clear-at-header 0\" >0 if footnotes should be reset at first level head.
.\"
.ds F \v'-.4m'\s-3\\n+[ft*nr]\s0\v'.4m'
.\"
.\"-----------------
.\" init footnote environment
.de ft@init
.\" indentcontrol not implemented $$$
.\" label justification not implemented $$$
'in 0
'fi
.ie \\n[ft*adjust] 'ad
.el 'na
.ie \\n[ft*hyphen] 'hy 14
.el 'hy 0
.ll \\n[@cur-ll]u
.lt \\n[@cur-ll]u
.ps (p;\\n[@ps]u-2)
.vs (p;\\n[@vs]u-1)
..
.\"-----------------
.\" set footnote format
.\" no support for two column processing (yet). $$$
.de FD
.if \\n[.$]=0 .@error "FD: bad arg \\$1"
.ie \\n[.$]=2 .nr ft*clear-at-header 1
.el .nr ft*clear-at-header 0
.\"
.if !'\\$1'' \{\
. ie \\$1>11 .nr ft*format 0
. el .nr ft*format \\$1
. \"
. nr ft*hyphen (\\n[ft*format]%2)*14
. nr ft*format \\n[ft*format]/2
. \"
. nr ft*adjust 1-(\\n[ft*format]%2)
. nr ft*format \\n[ft*format]/2
. \"
. nr ft*indent 1-(\\n[ft*format]%2)
. nr ft*format \\n[ft*format]/2
. \"
. nr ft*just \\n[ft*format]%2
.\}
..
.\"---------------
.\" Footnote and display width control $$$
.de WC
.nr ft*i 0 1
.while \\n+[ft*i]<=\\n[.$] \{\
. ds ft*x \\$[\\n[ft*i]]
. if '\\*[ft*x]'N' \{\
. nr ft*wide 0
. nr ft*first-fn 0
. nr ds*wide 0
. nr ds*float-break 1
. \}
. if '\\*[ft*x]'-WF' .nr ft*wide 0
. if '\\*[ft*x]'WF' .nr ft*wide 1
. if '\\*[ft*x]'-FF' .nr ft*first-fn 0
. if '\\*[ft*x]'FF' .nr ft*first-fn 1
. if '\\*[ft*x]'-WD' \{\
. nr ds*wide 0
. if r ft*df-save \{\
. nr Df \\n[ft*df-save]
. rm ft*df-save
. \}
. \}
. if '\\*[ft*x]'WD' \{\
. nr ds*wide 1
. nr ft*df-save \\n[Df]
. nr Df 4
. \}
. if '\\*[ft*x]'-FB' .nr ds*float-break 0
. if '\\*[ft*x]'FB' .nr ds*float-break 1
. if \\n[D]>1 .tm WC WF=\\n[ft*wide] WD=\\n[ds*wide]
.\}
..
.\"-----------------
.\" begin footnote
.\" Change environment, switch to diversion and print the foot-note mark.
.de FS
.if \\n[ft*busy] .@error "FS: missing FE"
.nr ft*busy 1
.ev ft*ev
.ft@init
.if !\\n[ft*wide] .pg@set-po
.di ft*tmp-div
.nr ft*space (u;\\n[Fs]*\\n[Lsp])
.sp \\n[ft*space]u
.\" print mark
.ie \\n[.$] .ds ft*mark \\$1
.el .ds ft*mark \\n[ft*nr].
\\*[ft*mark]
.in +.75c
.sp -1
.nr ft*exist 1
..
.\"-----------------
.\" init footnote diversion
.de ft@init-footnote
.di ft*div
\l'20n'
.br
.di
.nr ft*note-size \\n[dn]
..
.\"-----------------
.\" end footnote
.\" End the diversion, back to previous environment, and adjust
.\" the trap to the new foot-note size.
.de FE
.nr ft*busy 0
.br
.di
'in 0
'nf
.if \\n[@pl]u<\\n[dn]u .@error "FE: too big footnote"
.if !d ft*div .nr dn +1v
.if \\n[D]>3 .tm FE: foot-trap=\\n[pg*foot-trap] .d=\\n[.d] dn=\\n[dn]
.ie (\\n[pg*foot-trap]u-\\n[.d]u)<\\n[dn]u \{\
. da ft*next-div
. ft*tmp-div
. br
. di
.\}
.el \{\
. if !d ft*div .ft@init-footnote
. da ft*div
. ft*tmp-div
. di
. nr ft*note-size +\\n[dn]
.\}
.rm ft*tmp-div
.ev
.pg@move-trap
..
.\"-----------------
.\" print footnotes, see pg@footer
.de ft@print
.ev ft*print-ev
'nf
'in 0
.ll 100i
.ft*div
.br
.ev
.rm ft*div
.nr ft*note-size 0
.pg@move-trap
..
.\"-----------------
.\" check if any pending footnotes, see pg@header
.de ft@check-old
.if d ft*next-div \{\
. ev ft*ev
. ft@init
. ft@init-footnote
. nf
. in 0
. da ft*div
. ft*next-div
. di
. nr ft*note-size +\\n[dn]
. rm ft*next-div
. ev
. nr ft*exist 0
. pg@move-trap
.\}
..
.\"########### module display ###################
.nr ds*wide 0\" >0 if wide displays wanted
.nr df*fnr 0 1\" floating display counter
.nr df*o-fnr 1\" floating display counter, already printed
.nr ds*snr 0 1\" static display counter
.nr ds*lvl 0 1\" display level
.nr ds*float-busy 0\" >0 if printing float
.nr df*float 0 >0 if previous display was floating
.\"--------------------------------------------
.de DE
.ie \\n[df*float] .df@end \\$@
.el .ds@end \\$@
..
.\"--------------------------------------------
.\" floating display start
.\" nested DF/DE is not allowed.
.de DF
.if \\n[df*float] .@error "DF:nested floating is not allowed. Use DS."
.ds@set-format \\$@
.\"
.nr df*old-ll \\n[.l]
.nr ds*ftmp \\n[.f]
.misc@ev-keep df*ev
.ft \\n[ds*ftmp]
.\"
.init@reset
.di df*div
'in 0
.\"
.ds@set-new-ev \\n[df*old-ll]
.SP \\n[Lsp]u
.nr df*float 1
..
.\"--------------------------------------------
.de df@end
.br
.SP \\n[Lsp]u
.di
.nr df*width!\\n+[df*fnr] \\n[dl]
.nr df*height!\\n[df*fnr] \\n[dn]
.nr df*wide!\\n[df*fnr] \\n[ds*wide]
.nr df*format!\\n[df*fnr] \\n[ds*format]
.ev
.if \\n[D]>2 .tm DF:fnr=\\n[df*fnr] w=\\n[dl] h=\\n[dn] wide=\\n[ds*wide] \
form=\\n[ds*format]
.\" move div to the floating display list
.rn df*div df*fdiv!\\n[df*fnr]
.\"
.nr par@ind-flag 0
.\" print float if queue is empty and the display fits into
.\" the current page
.if ((\\n[df*fnr]>=\\n[df*o-fnr])&(\\n[dn]<\\n[.t])) .df@print-float 1
.nr df*float 0
..
.\"-------------
.\" called by end-of-text
.de df@eot-print
.br
.if \\n[df*o-fnr]<=\\n[df*fnr] \{\
. if \\n[D]>2 .tm Print remaining displays.
.\" still some floats left, make non-empty environment
. misc@ev-keep ne
. init@reset
\c
. df@print-float 3
. ev
.\}
..
.\"---------------
.\" print according to Df and De.
.\" .df@print-float type
.\" type called from
.\" 1 .DE
.\" 2 end of section
.\" 3 end of document
.\" 4 beginning of new page
.\"
.de df@print-float
.if \\n[Df]>5 .@error "Df=\\n[Df], max value is 5"
.if !\\n[ds*float-busy] \{\
. nr ds*float-busy 1
.\" at .DE
. if \\n[D]>3 .tm print-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]]
. \" Df = 1 or 5
. if (\\$1=1)&((\\n[Df]=1):(\\n[Df]=5)) \{\
. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\
. \" Print only new displays.
. if \\n[df*o-fnr]=\\n[df*fnr] \{\
. br
. ds@print-one-float
. \}
. \}
. \}
. \" Df = 3
. if (\\$1=1)&(\\n[Df]=3) \{\
. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\
. br
. ds@print-one-float
. \}
. \}
.\" print all if Df<2 and end of section
. if (\\$1=2)&(\\n[Sectp]>0)&(\\n[Df]<2) \{\
. br
. ds@print-all-floats
. \}
.\" print all if end of document. Where should they go instead?
. if \\$1=3 \{\
. br
. ds@print-all-floats
.\}
.\" new page
. if (\\$1=4)&(\\n[Df]>1) \{\
. if \\n[Df]=2 .ds@print-one-float
. if \\n[Df]=3 .ds@print-one-float
. if \\n[Df]>3 \{\
. ie \\n[De] .ds@print-all-floats
. el .ds@print-this-page
. \}
. \}
. nr ds*float-busy 0
.\}
..
.\"---------------
.\" DF out
.\" print a floating diversion
.de ds@output-float
.nr df*old-ll \\n[.l]
.nr df*old-in \\n[.i]
.ev ds*fev
.nf
.nr df*i \\n[df*o-fnr]
.nr df*f \\n[df*format!\\n[df*i]]
.\"
.in \\n[df*old-in]u
.if \\n[df*f]=1 'in +\\n[Si]n
.if \\n[df*f]>=2 'in 0
.if \\n[df*f]=2 'ce 9999
.if \\n[df*f]=3 'in (u;(\\n[.l]-\\n[df*width!\\n[df*i]])/2)
.if \\n[df*f]=4 'rj 9999
.if \\n[df*f]=5 'in (u;\\n[.l]-\\n[df*width!\\n[df*i]])
.\"
.\"
.df*fdiv!\\n[df*o-fnr]
.\"
.if \\n[df*f]=2 'ce 0
.if \\n[df*f]=4 'rj 0
.ev
.rm df*fdiv!\\n[df*i]
.rm df*height!\\n[df*i]
.rm df*format!\\n[df*i]
.if \\n[df*wide!\\n[df*i]] .nr pg*head-mark \\n[nl]u
.nr df*o-fnr +1
..
.\"---------------
.\" print one floating display if there is one.
.de ds@print-one-float
.if \\n[df*o-fnr]<=\\n[df*fnr] \{\
. if \\n[D]>3 .tm print-one-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]]
. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .pg@next-page
. ds@output-float
. if \\n[De] .pg@next-page
.\}
..
.\"---------------
.\" print all queued floats.
.\" if De>0 do a page eject between the floats.
.de ds@print-all-floats
.while \\n[df*o-fnr]<=\\n[df*fnr] \{\
. if \\n[D]>3 .tm print-all-floats: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]]
. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .pg@next-page
. br
\c
. ds@output-float
. if \\n[De] .pg@next-page
.\}
..
.\"---------------
.\" print as many floats as will fit on the current page
.de ds@print-this-page
.while \\n[df*o-fnr]<=\\n[df*fnr] \{\
. if \\n[D]>3 .tm print-this-page: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]]
. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .break
. ds@output-float
.\}
..
.\"---------------------------------------------------
.\" get format of the display
.de ds@set-format
.ie \\n[.$] \{\
. ie r ds*format!\\$1 .nr ds*format \\n[ds*format!\\$1]
. el .@error "DS/DF:wrong format:\\$1"
.\}
.el .nr ds*format 0
.if \\n[D]>2 .tm set format=\\n[ds*format]
.\" fill or not to fill, that is the...
.nr ds*fill 0
.ie \\n[.$]>1 \{\
. ie r ds*fill!\\$2 .nr ds*fill \\n[ds*fill!\\$2]
. el .@error "\\*[ds*type]:wrong fill:\\$2"
.\}
.if \\n[D]>2 .tm set fill=\\n[ds*fill]
.nr ds*rindent 0
.if \\n[.$]>2 .nr ds*rindent \\$3
.if \\n[D]>2 .tm set indent=\\n[ds*rindent]
..
.\"-----------------------------
.\" .ds@set-new-ev previous-line-length
.de ds@set-new-ev
.ll \\$1u
.lt \\$1u
.if \\n[ds*rindent] \{\
. ll -\\n[ds*rindent]n
. lt -\\n[ds*rindent]n
.\}
.if \\n[ds*wide] \{\
. ll \\n[@ll]u
. lt \\n[@ll]u
.\}
.\"
.ie \\n[ds*fill] 'fi
.el 'nf
..
.\"--------------------------------------------------------
.nr ds*format 0\" dummy value for .En/.EQ
.nr ds*format! 0\" no indent
.nr ds*format!0 0\" no indent
.nr ds*format!L 0\" no indent
.nr ds*format!I 1\" indent
.nr ds*format!1 1\" indent
.nr ds*format!C 2\" center each line
.nr ds*format!2 2\" center each line
.nr ds*format!CB 3\" center as block
.nr ds*format!3 3\" center as block
.nr ds*format!R 4\" right justify each line
.nr ds*format!4 4\" right justify each line
.nr ds*format!RB 5\" right justify as block
.nr ds*format!5 5\" right justify as block
.\"---------------
.nr ds*fill! 0\" no fill
.nr ds*fill!N 0\" no fill
.nr ds*fill!0 0\" no fill
.nr ds*fill!F 1\" fill on
.nr ds*fill!1 1\" fill on
.\"--------------------------------------------
.\" static display start
.\" nested DS/DE is allowed. No limit on depth.
.de DS
.br
.nr XXX \\n[nl]
.nr ds*lvl +1
.ds@set-format \\$@
.\"
.nr ds*old-ll \\n[.l]
.nr ds*old-in \\n[.i]
.misc@push ds-ll \\n[.l]
.misc@push ds-form \\n[ds*format]
.nr ds*i \\n[.i]
.nr ds*ftmp \\n[.f]
.misc@ev-keep ds*ev!\\n+[ds*snr]
.ft \\n[ds*ftmp]
.\"
.init@reset
.\" indent in a diversion doesn't seem like a good idea.
'in 0
.di ds*div!\\n[ds*snr]
.\"
.ds@set-new-ev \\n[ds*old-ll]
.nr df*float 0
..
.\"--------------------------------------------
.de ds@end
.if \\n-[ds*lvl]<0 .@error "DE: no corresponding DS"
.br
.di
.\" **********
.nr ds*width \\n[dl]
.nr ds*height \\n[dn]
.misc@pop-nr ds-ll ds*old-ll
.misc@pop-nr ds-form ds*format
.\"
.\" **********
'nf
.\" calculate needed space
.nr ds*need \\n[ds*height]
.nr ds*i \\n[pg*foot-trap]-\\n[pg*header-size]u-\\n[pg*extra-header-size]u
.if (\\n[ds*height]>\\n[ds*i])&(\\n[.t]<(\\n[ds*i]/2)) .nr ds*need \\n[.t]u+1v
.if (\\n[ds*height]<\\n[ds*i])&(\\n[.t]<(\\n[ds*height])) .nr ds*need \\n[.t]u+1v
.\" Eject page if display will fit one page and
.\" there are less than half of the page left.
.if \\n[ds*need] .ne \\n[ds*need]u
.\"
.\" check if pending equation label
.eq@check \\n[ds*need]
'in \\n[ds*old-in]u
.if \\n[ds*format]=1 'in \\n[ds*old-in]u+\\n[Si]n
.if \\n[ds*format]>=2 'in 0
.if \\n[ds*format]=2 'ce 9999
.if \\n[ds*format]=3 'in (u;(\\n[.l]-\\n[ds*width])/2)
.if \\n[ds*format]=4 'rj 9999
.if \\n[ds*format]=5 'in (u;\\n[.l]-\\n[ds*width])
.\" **********
.\"
.\" Print static display
.nr ds*i \\n[Lsp]
.if r Dsp .nr ds*i \\n[Dsp]
.\"
.if \\n[Ds] .sp \\n[ds*i]u
.ds*div!\\n[ds*snr]
.if \\n[Ds] .sp \\n[ds*i]u
.\"
.if \\n[ds*format]=2 'ce 0
.if \\n[ds*format]=4 'rj 0
.rm ds*div!\\n[ds*snr]
.nr ds*snr -1
.nr par@ind-flag 0
.ev
..
.\"########### module list ###################
.\" .LI text-indent mark-indent pad type [mark [LI-space [LB-space] ] ]
.\"
.nr li*tind 0
.nr li*mind 0
.nr li*pad 0
.nr li*type 0
.ds li*mark 0
.nr li*li-spc 0
.nr li*lvl 0 1
.aln :g li*lvl
.nr li*cur-vpos 0
.\"--------------------------
.\" the major list-begin macro.
.\" If type == -1 a 'break' will occur.
.de LB
.if \\n[.$]<4 .@error "LB: not enough arguments, min 4"
.misc@push cind \\n[.i]
.misc@push tind \\n[li*tind]
.misc@push mind \\n[li*mind]
.misc@push pad \\n[li*pad]
.misc@push type \\n[li*type]
.misc@push li-spc \\n[li*li-spc]
.ds li*mark-list!\\n[li*lvl] \\*[li*mark]
.nr li*lvl +1
.\"
.nr li*tind (n;0\\$1)\" text-indent
.nr li*mind (n;0\\$2)\" mark-indent
.nr li*pad (n;0\\$3)\" pad
.nr li*type 0\\$4\" type
.ds li*mark \\$5\" mark
.ie !'\\$6'' .nr li*li-spc \\$6\" LI-space
.el .nr li*li-spc 1
.ie !'\\$7'' .nr li*lb-spc \\$7\" LB-space
.el .nr li*lb-spc 0
.\" init listcounter
.nr li*cnt!\\n[li*lvl] 0 1
.\" assign format
.af li*cnt!\\n[li*lvl] 1
.if \\n[li*type] .if !'\\*[li*mark]'' .af li*cnt!\\n[li*lvl] \\*[li*mark]
.\"
.if \\n[li*lb-spc] .SP (u;\\n[li*lb-spc]*\\n[Lsp])
.in +\\n[li*tind]u
..
.\"---------------
.de LI
.if \\n[li*lvl]<1 .@error "LI:no lists active"
.if \\n[li*li-spc]&(\\n[Ls]>=\\n[li*lvl]) .SP (u;\\n[li*li-spc]*\\n[Lsp])
.ne 2v
.\"
.ds li*c-mark \\*[li*mark]
.nr li*cnt!\\n[li*lvl] +1
.if \\n[li*type]=1 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]].
.if \\n[li*type]=2 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]])
.if \\n[li*type]=3 .ds li*c-mark (\\n[li*cnt!\\n[li*lvl]])
.if \\n[li*type]=4 .ds li*c-mark [\\n[li*cnt!\\n[li*lvl]]]
.if \\n[li*type]=5 .ds li*c-mark <\\n[li*cnt!\\n[li*lvl]]>
.if \\n[li*type]=6 .ds li*c-mark {\\n[li*cnt!\\n[li*lvl]]}
.if \\n[.$]=1 .ds li*c-mark \\$1
.ie \\n[.$]=2 \{\
. ie (\\$2=2):(\\n[Limsp]=0) .ds li*c-mark \\$1\\*[li*c-mark]
. el .ds li*c-mark \\$1\ \\*[li*c-mark]
.\}
.\"
.\" determine where the text begins
.nr li*text-begin \\n[li*tind]>?\w@\\*[li*c-mark]\ @
.nr x \w@\\*[li*c-mark]\ @
.\"
.\" determine where the mark begin
.ie !\\n[li*pad] .nr li*in \\n[li*mind]
.el .nr li*in \\n[li*text-begin]-\\n[li*pad]-\w@\\*[li*c-mark]@
.if !\\n[li*in] .nr li*in 0
.\"
.ti -\\n[li*tind]u
.\" no indentation if hanging indent
.if (\w@\\*[li*c-mark]@=0)&((\\n[.$]=0):(\w@\\$1@=0)) .nr li*text-begin 0
\Z'\&\h'\\n[li*in]u'\\*[li*c-mark]'\h'\\n[li*text-begin]u'\&\c
.if \\n[li*type]=-1 .br
..
.\"
.\"-------------
.de li@pop
.nr li*lvl -1
.misc@pop-nr cind li*tmp
.in \\n[li*tmp]u
.misc@pop-nr tind li*tind
.misc@pop-nr mind li*mind
.misc@pop-nr pad li*pad
.misc@pop-nr type li*type
.misc@pop-nr li-spc li*li-spc
.ds li*mark \\*[li*mark-list!\\n[li*lvl]]
..
.de LE
.if \\n[li*lvl]<1 .@error "LE:mismatched"
.li@pop
.if '\\$1'1' .SP \\n[Lsp]u
..
.\"-------------
.\" list status clear.
.\" terminate all lists to level i
.de LC
.ie \\n[.$]<1 .nr li*i 0
.el .nr li*i \\$1
.if \\n[li*i]>\\n[li*lvl] .@error "LC: incorrect argument: \\n[li*i] (too big)"
.while \\n[li*lvl]>\\n[li*i] .li@pop
.nr par@ind-flag 0
..
.\"-------------
.de AL
.if \\n[.$]>3 .@error "AL: too many arguments"
.if \\n[D]>2 .tm AL $*
.ie \\n[.$]<=1 .LB \\n[Li] 0 2 1 "\\$1"
.el \{\
. ie \\n[.$]=2 .LB 0\\$2 0 2 1 "\\$1"
. el \{\
. ie !'\\$2'' .LB \\$2 0 2 1 "\\$1" 0 1
. el .LB \\n[Li] 0 2 1 "\\$1" 0 1
. \}
.\}
..
.de ML
.if \\n[.$]>3 .@error "ML: too many arguments"
.if \\n[D]>2 .tm ML $*
.nr li*ml-width \w@\\$1@u+1n
.if \\n[.$]<2 .LB \\n[li*ml-width]u 0 1 0 "\\$1"
.if \\n[.$]=2 .LB 0\\$2 0 1 0 "\\$1"
.if \\n[.$]=3 \{\
. ie '\\$2'' .LB \\n[li*ml-width]u 0 1 0 "\\$1" 0 1
. el .LB \\n[Li] 0 1 0 "\\$1" 0 1
.\}
..
.de VL
.if \\n[D]>2 .tm VL $*
.if \\n[.$]>3 .@error "VL: too many arguments"
.if \\n[.$]<1 .@error "VL: missing text-indent"
.ie \\n[.$]<3 .LB 0\\$1 0\\$2 0 0
.el .LB 0\\$1 0\\$2 0 0 \& 0 1
..
.\" Bullet (for .BL)
.de BL
.if \\n[D]>2 .tm BL $*
.ds BU \s-2\(bu\s0
.if \\n[.$]>2 .@error "BL: too many arguments"
.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \\*[BU]
.if \\n[.$]=1 .LB 0\\$1 0 1 0 \\*[BU]
.if \\n[.$]=2 \{\
. ie '\\$1'' .LB \\n[Pi] 0 1 0 \\*[BU] 0 1
. el .LB 0\\$1 0 1 0 \\*[BU] 0 1
.\}
..
.de DL
.if \\n[D]>2 .tm DL $*
.if \\n[.$]>2 .@error "DL: too many arguments"
.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \(em
.if \\n[.$]=1 .LB 0\\$1 0 1 0 \(em
.if \\n[.$]=2 \{\
. ie '\\$1'' .LB \\n[Pi] 0 1 0 \(em 0 1
. el .LB 0\\$1 0 1 0 \(em 0 1
.\}
..
.de RL
.if \\n[D]>2 .tm RL $*
.if \\n[.$]>2 .@error "RL: too many arguments"
.if \\n[.$]<1 .LB 6 0 2 4
.if \\n[.$]=1 .LB 0\\$1 0 2 4
.if \\n[.$]=2 \{\
. ie '\\$1'' .LB 6 0 2 4 1 0 1
. el .LB 0\\$1 0 2 4 1 0 1
.\}
..
.\" Broken Variable List. As .VL but text begin on the next line
.de BVL
.if \\n[D]>2 .tm BVL $*
.if \\n[.$]>3 .@error "BVL: too many arguments"
.if \\n[.$]<1 .@error "BVL: missing text-indent"
.ie \\n[.$]<3 .LB 0\\$1 0\\$2 0 -1
.el .LB 0\\$1 0\\$2 0 -1 \& 0 1
..
.\" ####### module tbl #######################################
.\" This module is copied from groff_ms and modified for mgm.
.\" Yes, it does not resemble the original anymore :-).
.\" Don't know if I missed something important.
.\" Groff_ms is written by James Clark.
.nr tbl*have-header 0
.nr tbl*header-written 0
.de TS
.br
.if ''\\n[.z]' .SP
.if '\\$1'H' .di tbl*header-div
..
.de tbl@top-hook
.if \\n[tbl*have-header] \{\
. ie \\n[.t]-\\n[tbl*header-ht]-1v .tbl@print-header
. el .sp \\n[.t]u
.\}
..
.de tbl@bottom-hook
.if \\n[tbl*have-header] \{\
. nr T. 1
.\" draw bottom and side lines of boxed tables.
. T#
.\}
.nr tbl*header-written 0
..
.de tbl@print-header
.ev tbl*ev
'nf
.tbl*header-div
.ev
.mk #T
.nr tbl*header-written 1
..
.de TH
.ie '\\n[.z]'tbl*header-div' \{\
. nr T. 0
. T#
. br
. di
. nr tbl*header-ht \\n[dn]
. ne \\n[dn]u+1v
. nr tbl*have-header 1
. ie '\\$1'N' .if !\\n[tbl*header-written] .tbl@print-header
. el .tbl@print-header
.\}
.el .@error ".TH without .TS H"
..
.de TE
.ie '\\n(.z'tbl*header-div' .@error ".TS H but no .TH before .TE"
.el \{\
. nr tbl*have-header 0
.\}
.\" reset tabs
.TAB
..
.de T&
..
.\" ####### module pic #######################################
.de PS
.nr pic*in 0
.br
.SP .5
.ie \\n[.$]<2 .@error "PS: bad arguments. Probably not processed with pic."
.el \{\
. if !\\n[ds*lvl] .ne (u;\\$1)+1v
.\" should be contained between .DS/.DE
.if r ds*format \{\
. if \\n[ds*lvl]&((\\n[ds*format]=2):(\\n[ds*format]=3)) \{\
. nr pic*in \\n[.i]
.\" . in +(u;\\n[.l]-\\n[.i]-\\$2/2)
. \}
. \}
.\}
..
.de PE
.init@reset
.SP .5
..
.\" ####### module eq #######################################
.\"
.nr eq*number 0 1
.ds eq*label
.de EQ
.ds eq*label "\\$1
..
.de eq@check
.if !'\\*[eq*label]'' \{\
. mk
. \" space down to middle of equation
' sp (u;\\$1/2)
. ie (\\n[Eq]%2) \{\
. \" label to the left
\h'|0'\\*[eq*label]
. \}
. el \{\
. \" label to the right
\h'|\\n[.l]u'\\*[eq*label]
. \}
. rt
.\}
.ds eq*label
..
.de EN
..
.\"########### module toc ###################
.\" table of contents
.nr toc*slevel 1
.nr toc*spacing \n[Lsp]u
.nr toc*tlevel 2
.nr toc*tab 0
.\"-----------
.\" Table of contents with friends (module lix)
.de TC
.br
.\" print any pending displays and references
.df@print-float 3
.if \\n[ref*flag] .RP 0 1
.\"
.if \w@\\$1@>0 .nr toc*slevel \\$1
.if \w@\\$2@>0 .nr toc*spacing (u;\\$2*\\n[Lsp])
.if \w@\\$3@>0 .nr toc*tlevel \\$3
.if \w@\\$4@>0 .nr toc*tab \\$4
.if \\n[pg*cols-per-page]>1 .1C
.ds H1txt \\*[Licon]
.ds Tcst co
.pg@clear-hd
.EF ""
.OF ""
.pg@next-page
.\"-------------
.if d Ci .toc@read-Ci \\*[Ci]
.nf
.in 0
.ie \\n[Oc] .hd@set-page 1
.el \{\
. nr toc*pn 1 1
. af toc*pn i
. aln ;g toc*pn
. PF "''\\\\\\\\n[toc*pn]''"
. am pg@header
. nr toc*pn +1
\\..
.\}
.nr toc*i 4 1
.while \\n+[toc*i]<10 \{\
. if !'\\$\\n[toc*i]'' \{\
. ce
\\$\\n[toc*i]
. br
. \}
.\}
.if \\n[.$]<=4 .if d TX .TX
.ie d TY .if \\n[.$]<=4 .TY
.el \{\
. ce
\\*[Licon]
. br
. SP 3
.\}
.if d toc*list .toc*list
.br
.\" print LIST OF XXX
.if d lix*dsfg .lix@print-ds fg FG "\\*[Lf]" \\n[.$]
.if d lix*dstb .lix@print-ds tb TB "\\*[Lt]" \\n[.$]
.if d lix*dsec .lix@print-ds ec EC "\\*[Le]" \\n[.$]
.if d lix*dsex .lix@print-ds ex EX "\\*[Lx]" \\n[.$]
..
.\"-----------
.\" .toc@read-Ci lev1 lev2 lev3 lev4 ... lev7
.de toc@read-Ci
.nr toc*i 0 1
.while \\n+[toc*i]<8 \{\
. nr toc*hl!\\n[toc*i] \\$\\n[toc*i]
.\}
..
.\"-----------
.de toc@entry
.ie \\n[Sectp] \{\
. toc@save \\$1 "\\*[hd*mark]" "\\$2" \\*[hd*sect-pg]
.\}
.el .toc@save \\$1 "\\*[hd*mark]" "\\$2" \\n[%]
..
.als )E toc@entry
.\"-----------
.de toc@save
.\" collect maxsize of mark if string Ci don't exist.
.if !d Ci \{\
. if !r toc*hl!\\$1 .nr toc*hl!\\$1 0
. if \\n[toc*hl!\\$1]<=\w@\\$2@ \{\
. nr toc*hl!\\$1 \w@\\$2@u
. \}
.\}
.am toc*list
.\" .toc@set level headernumber text pagenr
.toc@set \\$1 "\\$2" "\\$3" \\$4
\\..
..
.\"-----------
.\" level mark text pagenumber
.de toc@set
.if \\$1<=\\n[toc*slevel] .SP \\n[toc*spacing]u
.na
.fi
.nr toc*ind 0
.nr toc*i 0 1
.ie d Ci \{\
. nr toc*ind +\\n[toc*hl!\\$1]u
.\}
.el \{\
. while \\n+[toc*i]<\\$1 \{\
. nr toc*ind +\\n[toc*hl!\\n[toc*i]]u
. \}
.\}
.nr toc*text \\n[toc*ind]u+\\n[toc*hl!\\$1]u
.in \\n[toc*text]u
.ti -\\n[toc*hl!\\$1]u
.\"
.\" length of headernum space
.nr toc*i \\n[toc*hl!\\$1]-\w@\\$2@
.\"
.ll \\n[@ll]u-\w@\\$4@u-2m
.ne 2v
.\" ragged right ---------------------------------
.ie \\$1>\\n[toc*tlevel] \{\
\\$2
. sp -1
\\$3\ \ \ \\$4
. br
.\}
.el \{\
. \" unnumbered heading --------------------
. ie '\\$2'' \{\
. in \\n[toc*ind]u
\\$3\h'1m'
. \}
. \" normal heading ------------------------
. el \{\
\\$2
. sp -1
\\$3\h'1m'
. \}
. ll \\n[@ll]u
. sp -1
. nr toc*sep (u;\\n[.l]-\\n[.n]-\\n[.i]-\w@\\$4@)-1m
\h'|\\n[.n]u'\l'\\n[toc*sep]u.'\h'1m'\\$4
.\}
.ll \\n[@ll]u
..
.\"########################### module lix ############################
.\" LIST OF figures, tables, exhibits and equations
.nr lix*fg-nr 0 1
.nr lix*tb-nr 0 1
.nr lix*ec-nr 0 1
.nr lix*ex-nr 0 1
.aln Fg lix*fg-nr
.aln Tb lix*tb-nr
.aln Ec lix*ec-nr
.aln Ex lix*ex-nr
.\"------------
.de FG
.lix@print-line fg Lf \\n+[lix*fg-nr] "\\$1" "\\$2" "\\$3" "\\$4"
..
.de TB
.lix@print-line tb Lt \\n+[lix*tb-nr] "\\$1" "\\$2" "\\$3" "\\$4"
..
.de EC
.lix@print-line ec Le \\n+[lix*ec-nr] "\\$1" "\\$2" "\\$3" "\\$4"
..
.de EX
.lix@print-line ex Lx \\n+[lix*ex-nr] "\\$1" "\\$2" "\\$3" "\\$4"
..
.\"------------
.\" print line with 'figure' in the text
.\" type stringvar number text override flag refname
.de lix@print-line
.ds lix*text "\\$4
.\"
.ie \\n[Sectf] .ds lix*numb \\n[H1]-\\$3
.el .ds lix*numb \\$3
.\"
.ie !\\n[Of] .ds lix*ds-form .\ \ \"
.el .ds lix*ds-form "\ \(em\ \"
.nr lix*in \\n[.i]
.ds lix*label \\*[Li\\$1]\ \\*[lix*numb]\\*[lix*ds-form]
.if !'\\$5'' \{\
. if !0\\$6 .ds lix*label \\*[Li\\$1]\ \\$5\\*[lix*numb]\\*[lix*ds-form]
. if 0\\$6=1 .ds lix*label \\*[Li\\$1]\ \\*[lix*numb]\\$5\\*[lix*ds-form]
. if 0\\$6=2 .ds lix*label \\*[Li\\$1]\ \\$5\\*[lix*ds-form]
.\}
.\" print line if not between DS/DE
.ie \\n[ds*lvl]<1&\\n[df*float]=0 \{\
. lix@print-text "\\*[lix*label]" "\\*[lix*text]" \\$1 \\$2 \\$7
.\}
.el \{\
. lix@embedded-text "\\*[lix*label]" "\\*[lix*text]" \\$1 \\$2 \\$7
.\}
.\"
..
.\"-----------
.\" label text type stringvar refname
.de lix@print-text
.ie \\n[Sectp] .ds lix*pgnr \\*[hd*sect-pg]
.el .ds lix*pgnr \\n[%]
.SP \\n[Lsp]u
.misc@ev-keep lix
.init@reset
.br
.ie (\w@\\$1\\$2@)>(\\n[.l]-\\n[.i]) \{\
. in +\w@\\$1@u
. ti 0
.\}
.el .ce 1
\fB\\$1\fP\\$2
.br
.ev
.\" save line for LIST OF XXX, wth is the width of the label
.if !r lix*wth\\$3 .nr lix*wth\\$3 0
.\" find the maximum width
.if \w@\\*[lix*label]@>\\n[lix*wth\\$3] .nr lix*wth\\$3 \w@\\*[lix*label]@
.if \\n[\\$4] .lix@ds-save \\$3 \\*[lix*pgnr] "\\*[lix*text]" "\\*[lix*label]"
.\" save reference to the figure
.if !'\\$5'' .SETR \\$5 \\*[lix*numb]
..
.\" hide printout until diversion is evaluated
.de lix@embedded-text
\!.ie \\\\n[Sectp] .ds lix*pgnr \\\\*[hd*sect-pg]
\!.el .ds lix*pgnr \\\\n[%]
\!.SP \\\\n[Lsp]u
\!.misc@ev-keep lix
\!.ll \\n[.l]u
\!.init@reset
\!.fi
\!.ie (\w@\\$1\\$2@)>(\\\\n[.l]-\\\\n[.i]) \{\
. in +\w@\\$1@u
\!. ti 0
\!\fB\\$1\fP\\$2
\!.\}
\!.el \{\
. ce 1
\!\fB\\$1\fP\\$2
\!.\}
\!.br
\!.ev
.\" save line for LIST OF XXX, wth is the width of the label
\!.if !r lix*wth\\$3 .nr lix*wth\\$3 0
.\" find the maximum width
\!.if \w@\\*[lix*label]@>\\\\n[lix*wth\\$3] .nr lix*wth\\$3 \w@\\*[lix*label]@
\!.if \\\\n[\\$4] .lix@ds-save \\$3 \\\\*[lix*pgnr] "\\*[lix*text]" "\\*[lix*label]"
.\" save reference to the figure
\!.if !'\\$5'' .SETR \\$5 \\*[lix*numb]
..
.\"------------
.\" print complete list of XXXX
.de lix@print-ds
.\" arg: fg,tb,ec,ex text
.ds H1txt \\$3
.ds Tcst \\$1
.if !\\n[Cp] .pg@next-page
.\" print LIST OF XXXX
.\" execute user-defined macros
.if \\$4<=4 .if d TX\\$2 .TX\\$2
.ie d TY\\$2 .if \\$4<=4 .TY\\$2
.el \{\
. ce
\\$3
. SP 3
.\}
.in \\n[lix*wth\\$1]u
.fi
.lix*ds\\$1
..
.\"------------
.\" save line of list in macro
.de lix@ds-save
.\" type pagenumber text
.am lix*ds\\$1
.lix@dsln \\$1 \\$2 "\\$3" "\\$4" \\$5
\\..
..
.\"------------
.\" print appended macro
.\" lix@dsln type pagenumber text headernr
.de lix@dsln
.nr lix*i \\n[lix*wth\\$1]-\w@\\$4@
.ne 4v
.ll \\n[@ll]u-\w@\\$4@u-\w@\\$2@u-2m
.ti -\\n[lix*wth\\$1]u
\\$4
.sp -1
\\$3\h'1m'
.sp -1
.ll
.nr lix*sep (u;\\n[.l]-\\n[.n]-\\n[.i]-\w@\\$2@)-1m
\h'|\\n[.n]u'\l'\\n[lix*sep]u.'\h'1m'\\$2
.SP \\n[toc*spacing]u
..
.\"########################### module fnt ############################
.\" some font macros.
.de R
.ft R
.ul 0
..
.\"-----------
.de fnt@switch
.ul 0
.ds fnt*tmp
.nr fnt*prev \\n[.f]
.nr fnt*i 2 1
.while \\n+[fnt*i]<=\\n[.$] \{\
. if \\n[fnt*i]>3 .as fnt*tmp \,
. ie (\\n[fnt*i]%2)=1 .as fnt*tmp \\$1\\$[\\n[fnt*i]]
. el .as fnt*tmp \\$2\\$[\\n[fnt*i]]
. if \\n[fnt*i]<\\n[.$] .as fnt*tmp \/
.\}
\&\\*[fnt*tmp]\f[\\n[fnt*prev]]
..
.\"-----------
.de B
.ie \\n[.$] .fnt@switch \fB \f[\\n[.f]] \\$@
.el .ft B
..
.de I
.ie \\n[.$] .fnt@switch \fI \f[\\n[.f]] \\$@
.el .ft I
..
.de IB
.if \\n[.$] .fnt@switch \fI \fB \\$@
..
.de BI
.if \\n[.$] .fnt@switch \fB \fI \\$@
..
.de IR
.if \\n[.$] .fnt@switch \fI \fR \\$@
..
.de RI
.if \\n[.$] .fnt@switch \fR \fI \\$@
..
.de RB
.if \\n[.$] .fnt@switch \fR \fB \\$@
..
.de BR
.if \\n[.$] .fnt@switch \fB \fR \\$@
..
.\"########################### module box ############################
.\" draw a box around some text. Text will be kept on the same page.
.\"
.nr box*ll 0
.\" .B1 and .B2 works like .DS
.de B1
.if \\n[box*ll] .@error "B1: missing B2"
.nr box*ll \\n[.l]
.nr box*ind \\n[.i]
.nr box*hyp \\n[.hy]
.nr box*wid \\n[.l]-\\n[.i]
.\"
.\" jump to new environment.
.ev box*ev
.di box*div
.ps \\n[@ps]u
.vs \\n[@vs]u
.in 1n
.ll (u;\\n[box*wid]-1n)
.hy \\n[.hy]
..
.de B2
.if !\\n[box*ll] .@error "B2: missing B1"
.br
.di
.nr box*height \\n[dn]
.ne \\n[dn]u+1v
.ll \\n[box*ll]u
.in \\n[box*ind]u
.nr box*y-pos \\n[.d]u
.nf
.box*div
.fi
\v'-1v+.25m'\
\D'l \\n[box*wid]u 0'\
\D'l 0 -\\n[box*height]u'\
\D'l -\\n[box*wid]u 0'\
\D'l 0 \\n[box*height]u'
.br
.sp -1
.ev
.sp .20v
.in \\n[box*ind]u
.ll \\n[box*ll]u
.rm box*div
.nr box*ll 0
..
.\"########################### module ref ############################
.nr ref*nr 0 1
.aln :R ref*nr
.nr ref*nr-width 5n
.nr ref*flag 0 \" for end-of-text
.ds Rf \v'-.4m'\s-3[\\n+[ref*nr]]\s0\v'.4m'
.\"
.\" start reference
.\"------------
.de RS
.if !''\\$1' .ds \\$1 \v'-.4m'\s-3[\\n[ref*nr]]\s0\v'.4m'
.nr ref*flag 1
.am ref*mac
.ref@start-print \\n[ref*nr]
\\..
.eo
.am ref*mac RF
..
.\"------------
.de RF
.ec
.am ref*mac
.ref@stop-print
\\..
..
.\"------------
.de ref@start-print
.di ref*div
.in \\n[ref*nr-width]u
.ti -(\w@\\$1.@u+1n)
\\$1.
.sp -1
..
.de ref@stop-print
.br
.di
.ne \\n[dn]u
.ev ref*ev2
.nf
.ref*div
.ev
.rm ref*div
.if \\n[Ls] .SP \\n[Lsp]u
..
.\"-----------
.de RP
.if !d ref*mac .@error "RP: No references!"
.nr ref*i 0\\$2
.if \\n[ref*i]<2 .SK
.SP 2
.ref@print-refs
.if 0\\$1<1 .nr ref*nr 0 1
.if ((\\n[ref*i]=0):(\\n[ref*i]=2)) .SK
..
.\"-----------
.\" called by end-of-text!
.de ref@eot-print
.\".if \\n[ref*flag] \{
.if d ref*mac \{\
. if \\n[D]>2 .tm Print references, called by eot
. nr ref*flag 0
. br
. misc@ev-keep ne
. init@reset
\c
' bp
. ev
. ref@print-refs
.\}
..
.\"-----------
.\" prints the references
.de ref@print-refs
.toc@save 1 "" "\\*[Rp]" \\n[%]
.ce
\fI\\*[Rp]\fP
.sp
.nr ref*ll \\n[.l]
.misc@ev-keep ref*ev
.ll \\n[ref*ll]u
.in 0
.ref*mac
.in
.rm ref*mac
.ev
.nr ref*flag 0 1
..
.\"########################### module app ############################
.\"
.nr app*nr 0 1
.af app*nr A
.nr app*dnr 0 1
.nr app*flag 0
.\"------------
.\" .APP name text
.\" name == "" -> autonumber
.de APP
.\" .if \\n[.$]<2 .@error "APP: too few arguments"
.app@set-ind "\\$1"
.\"
.ds Tcst ap
.ds Apptxt \\$2
.\"
.ie \\n[Aph] .app@header \\*[app*ind] "\\$2"
.el .bp
.app@index "\\*[app*ind]" "\\$2"
..
.\"------------
.\" .APPSK name pages text
.\" name == "" -> autonumber
.de APPSK
.if \\n[.$]<2 .@error "APPSK: too few arguments"
.app@set-ind "\\$1"
.\"
.ds Tcst ap
.ds Apptxt \\$3
.\"
.ie \\n[Aph] .app@header \\*[app*ind] "\\$3"
.el .bp
.app@index "\\*[app*ind]" "\\$3"
.pn +\\$2
..
.\"------------
.de app@set-ind
.ie \w@\\$1@ .ds app*ind \\$1
.el \{\
. if !\\n[app*flag] \{\
. nr H1 0 1
. af H1 A
. af H1h A
. nr app*flag 1
. \}
. ds app*ind \\n+[app*nr]
. nr H1 \\n+[app*dnr]
. nr H1h \\n[app*dnr]
.\}
.\" clear lower counters
.nr app*i 1 1
.while \\n+[app*i]<8 .nr H\\n[app*i] 0 1
..
.\"------------
.de app@index
.toc@save 1 "" "\\*[App] \\$1: \\$2" \\n[%]
..
.\"------------
.\" app@heaer name text
.de app@header
.bp
.SP (u;\\n[Lsp]*4)
.ce 1
\s+4\fB\\*[App]\ \\$1\fP\s0
.SP (u;\\n[Lsp]*2)
.if \w@\\$2@<\\n[.l] .ce 1
\fB\s+2\\$2\s0\fP
.SP (u;\\n[Lsp]*4)
..
.als APPX app@header
.\"########################### module cov ############################
.\" title stored in diversion cov*title
.\" abstract stored in diversion cov*abstract
.\" arg to abstract stored in cov*abs-arg
.\" indent stored in cov*abs-ind
.\" number of authors stored in cov*au
.\" author(s) stored in cov*au!x!y
.\" author(s) title stored in cov*at!x!y
.\" x is the author-index [1-cov*au], y is the argument-index [1-9].
.\" author(s) firm stored in cov*firm
.\" new date (if .ND exists) is stored in cov*new-date
.\"
.\"
.ds cov*abs-name ABSTRACT
.\"
.nr cov*au 0
.de TL
.rm IA IE WA WE LO LT
.if \\n[.$]>0 .ds cov*title-charge-case \\$1
.if \\n[.$]>1 .ds cov*title-file-case \\$2
.pg@disable-top-trap
.eo
.de cov*title AU
..
.\"-------------------
.de cov@title-end
.ec
..
.\"-------------------
.\" .AU name [initials [loc [dept [ext [room [arg [arg [arg]]]]]]]]
.de AU
.cov@title-end
.pg@disable-top-trap
.nr cov*au +1
.nr cov*i 0 1
.ds cov*au!\\n[cov*au]!1
.while \\n[.$]>=\\n+[cov*i] \{\
. ds cov*au!\\n[cov*au]!\\n[cov*i] "\\$[\\n[cov*i]]
.\}
.if (\\n[.$]>=3)&(\w@\\$3@) \{\
. if d cov*location-\\$3] \{\
. ds cov*au!3!\\n[cov*au] \\*[cov*location-\\$3]
. \}
.\}
..
.\"-------------------
.\" .AT title1 [title2 [... [title9] ]]]]
.\" Well, thats all that COVEND look for.
.\" Must appear directly after .AU
.de AT
.if \\n[.$]<1 .@error "AT: no arguments"
.nr cov*i 0 1
.while \\n[.$]>=\\n+[cov*i] \{\
. ds cov*at!\\n[cov*au]!\\n[cov*i] "\\$[\\n[cov*i]]
.\}
..
.\"-------------------
.de AF
.cov@title-end
.ds cov*firm \\$1
..
.de AST
.ds cov*abs-name \\$1
..
.de AS
.pg@disable-top-trap
.if d cov*abstract .@error "AS: only one abstract allowed"
.if !''\\n[.z]' .@error "AS: no diversion allowed (previous .AS?)"
.nr cov*abs-arg 0\\$1
.nr cov*abs-ind (n;0\\$2)
.de cov*abstract AE
..
.de AE
..
.\" fixed for 2000, now uses \n[year].
.de ISODATE
. \" support for ISO-date
. nr cov*mm \\n[mo]
. nr cov*dd \\n[dy]
. af cov*mm 01
. af cov*dd 01
. ie '0'\\$1' \{\
. ds cov*new-date \\*[MO\\n[mo]] \\n[dy], \\n[year]
. \}
. el \{\
. ds cov*new-date \\n[year]-\\n[cov*mm]-\\n[cov*dd]
. \}
..
.ISODATE 0
.als DT cov*new-date
.de ND
.ds cov*new-date \\$1
..
.\" switch to ISO-date if register Iso exist: YYYY-MM-DD
.if r Iso .ISODATE 1
.\"-------------------
.\" save technical numbers.
.de TM
.nr cov*i 0 1
.while \\n[.$]>=\\n+[cov*i] .ds cov*mt-tm!\\n[cov*i] \\$[\\n[cov*i]]
.nr cov*mt-tm-max \\n[.$]
..
.\"-----------------------
.\" cover sheet
.\" the file must have the following last lines (somewhere):
.\" .pg@enable-top-trap
.\" .bp 1
.\" .pg@enable-trap
.ds cov*mt-file!0 0.MT
.ds cov*mt-file!1 0.MT
.ds cov*mt-file!2 0.MT
.ds cov*mt-file!3 0.MT
.ds cov*mt-file!4 4.MT
.ds cov*mt-file!5 5.MT
.ds cov*mt-file!6 0.MT
.\"------------
.de MT
.ie \\n[.$] \{\
. ie d cov*mt-file!\\$1 .ds cov*mt-type \\$1
. el .ds cov*mt-type 6
.\}
.el .ds cov*mt-type 1
.ds cov*mt-addresse "\\$2
.ds cov*mt-type-text "\\$1
.ie d @language .ds cov*str mm/\\*[@language]_
.el .ds cov*str mm/
.mso \\*[cov*str]\\*[cov*mt-file!\\*[cov*mt-type]]
..
.de COVER
.ie !\\n[.$] .ds cov*cov-type ms
.el .ds cov*cov-type \\$1
.pg@disable-top-trap
.ie d @language .ds cov*str mm/\\*[@language]_\\*[cov*cov-type].cov
.el .ds cov*str mm/\\*[cov*cov-type].cov
.mso \\*[cov*str]
..
.\"########################### module qrf ############################
.\" forward and backward reference thru special files.
.\"
.\" check if stderr-method is wanted
.\" This was needed when I discovered that groff was considered unsafe
.\" and groff -U didn't work. It's a workaround like the original
.\" index method, but not in my view elegant enough.
.\"
.\" init reference system
.de INITR
.ds qrf*file \\$1.qrf
.nr qrf*pass 2
.if \\n[D]>1 .tm INITR: source \\*[qrf*file]
.ie \\n[Ref] \{\
. tm .\\\\" Rfilename: \\*[qrf*file]
.\}
.el 'so \\*[qrf*file]
..
.\"---------------
.\" set a reference.
.de SETR
.if \\n[.$]<1 .@error "SETR:reference name missing"
.if !r qrf*pass .tm "SETR: No .INITR in this file"
.if \\n[Ref] \{\
. ds qrf*name qrf*ref-\\$1
. if \\n[D]>2 .tm SETR: ref \\*[qrf*name]=\\*[hd*mark],\\n[%]
. \" heading-number
. ds \\*[qrf*name]-hn \\*[hd*mark]
. \" page-number
. ds \\*[qrf*name]-pn \\n[%]
. \"
. if \\n[Ref] \{\
. tm .ds \\*[qrf*name]-hn \\*[hd*mark]
. tm .ds \\*[qrf*name]-pn \\n[%]
. if !'\\$2'' .tm .ds \\*[qrf*name]-xx \\$2
. \}
.\}
..
.\"---------------
.\" get misc-string
.\" If two arg -> set var. arg to misc-string.
.de GETST
.if \\n[.$]<1 .@error "GETST:reference name missing"
.if !r qrf*pass .tm "GETST: No .INITR in this file"
.ds qrf*name qrf*ref-\\$1
. if d \\*[qrf*name]-xx \{\
. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-xx]
. el \\*[\\*[qrf*name]-xx]\c
. \}
.\}
..
.\"---------------
.\" get header-number
.\" If two arg -> set var. arg to header-number.
.de GETHN
.if \\n[.$]<1 .@error "GETHN:reference name missing"
.if !r qrf*pass .tm "GETHN: No .INITR in this file"
.ds qrf*name qrf*ref-\\$1
.if d \\*[qrf*name]-hn \{\
. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-hn]
. el \\*[\\*[qrf*name]-hn]\c
.\}
..
.\"---------------
.\" get page-number
.\" If two arg -> set var. arg to page-number.
.de GETPN
.if \\n[.$]<1 .@error "GETPN:reference name missing"
.if !r qrf*pass .tm "GETPN: No .INITR in this file"
.ds qrf*name qrf*ref-\\$1
.if d \\*[qrf*name]-pn \{\
. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-pn]
. el \\*[\\*[qrf*name]-pn]\c
.\}
..
.\"----------
.de GETR
.if \\n[.$]<1 .@error "GETR:reference name missing"
.ie !r qrf*pass \{\
. tm "GETR: No .INITR in this file"
.\}
.el \{\
. GETHN \\$1 Qrfh
. GETPN \\$1 Qrfp
\\*[Qrf]
.\}
..
.\"########################### module ind ############################
.\" Support for mgs-style indexing, borrowed from mgs.
.de IX
. tm \\$1\t\\$2\t\\$3\t\\$4 ... \\n[%]
..
.\"--------------------
.\" Another type of index system
.\" INITI type filename [macro]
.de INITI
.if \\n[.$]<1 .@error "INITI:type missing"
.\" ignore if INITI has already been used
.if \\n[.$]>1 \{\
. if d ind*file .@error "INITI:file already set"
. ds ind*file \\$2.ind
. if \\n[D]>1 .tm INITI: source \\*[ind*file]
.\}
.if !d ind*file .@error "INITI:file not specified"
.ds ind*type \\$1
.if \\n[Ref] \{\
. if \\n[.$]>2 .tm .\\\\" Imacro: \\$3
.\}
..
.\"---------------
.de IND
.if !d ind*file .@error "IND: No active INITI"
.if \\n[D]>1 .tm IND: type=\\*[ind*type]
.ds ind*ref
.if '\\*[ind*type]'N' .ds ind*ref \\n[%]
.if '\\*[ind*type]'H' .ds ind*ref \\*[hd*mark]
.if '\\*[ind*type]'B' .ds ind*ref \\*[hd*mark]\t\\n[%]
.if '\\*[ind*ref]'' .@error "IND:wrong index type: \\*[ind*ref]"
.\"
.ds ind*line \\$1
.while \\n[.$]>0 \{\
. shift
. as ind*line \t\\$1
.\}
.as ind*line \\*[ind*ref]
.if \\n[Ref] .tm .\\\\" IND \\*[ind*line]
..
.\" print index
.de INDP
.ie \\n[Ref] .tm .\\\\" Index: \\*[ind*file]
.el \{\
. if !\\n[Cp] .pg@next-page
. \" print INDEX
. \" execute user-defined macros
. if d TXIND .TXIND
. ie d TYIND .TYIND
. el \{\
. SK
. ce
\\*[Index]
. SP 3
. 2C
. nf
. \}
' so \\*[ind*file]
. ie d TZIND .TZIND
. el \{\
. fi
. 1C
. \}
.\}
.rm ind*file
..
.\"########################### module let ############################
.\" Letter macros
.\"------------------------
.\" Formal closing
.de FC
.df@print-float 3
.ie \\n[.$] .ds let*i \\$1
.el .ds let*i \\*[Letfc]
.ie d let*type .let@fc_\\*[let*type] "\\*[let*i]" \\$@
.el .let@mt-closing "\\*[let*i]" \\$@
..
.\"-------
.de let@mt-closing
.ne 5v
.in (u;\\n[.l]/2)
.sp
\\$1
.in
..
.\"------------------------
.\" Signature line
.de SG
.ie d let*type .let*lt-sign \\$@
.el .let*mt-sign \\$@
..
.\"------------------------
.de let*lt-sign
.if !d let@sg_\\*[let*type] .@error "SG: letter type \\*[let*type] undefined"
.df@print-float 3
.nr let*i 0 1
.nr let*j 0
.while \\n+[let*i]<=\\n[let*wa-n] \{\
.if \\n[let*i]=\\n[let*wa-n] .nr let*j 1
.let@sg_\\*[let*type] "\\*[let*wa-name!\\n[let*i]]" "\\*[let*wa-title!\\n[let*i]]" \\n[let*i] \\n[let*j] \\$@
.\}
..
.\"------------------------
.\" Memorandum signature
.de let*mt-sign
.df@print-float 3
.ne \\n[cov*au]u*4v
.ie \\n[.$]>1 .nr let*k 1
.el .nr let*k \\n[cov*au]
.ds let*tmp \\*[cov*au!\\n[let*k]!3]-\\*[cov*au!\\n[let*k]!4]-
.nr let*i 0 1
.while \\n+[let*i]<=\\n[cov*au] \{\
. if \\n[let*i]>1 .as let*tmp /
. as let*tmp \\*[cov*au!\\n[let*k]!2]
.\}
.if !''\\$1' .as let*tmp -\\$1
.in (u;\\n[.l]/2)
.nf
.nr let*i 0 1
.while \\n+[let*i]<=\\n[cov*au] \{\
. SP 3v
. if \\n[let*i]=\\n[let*k] \{\
\Z'\h'-(u;\\n[.l]/2)'\\*[let*tmp]'\c
. \}
\\*[cov*au!\\n[let*i]!1]
.\}
.fi
.in
..
.\"------------------------
.\" Approval signature
.de AV
.ne 6v
.nf
.sp
.ie \\n[.$]<2 \\*[Letapp]
.el .sp
.sp 2
.ie n ______________________________ ______________
.el \D'l 25m 0'\h'4m'\D'l 12m 0'
\Z'\\$1'\h'29m'\f[\\*[@sdf_font]]\\*[Letdate]\fP
.fi
..
.\"------------------------
.\" Letter signature
.de AVL
.ne 6v
.nf
.sp 3
.ie n ______________________________
.el \D'l 25m 0'
\Z'\\$1'
.fi
..
.\"------------------------
.\" Letter type
.\" let@header is called from the header. It is supposed
.\" to remove the alias itself.
.de LT
.rm AF AS AE AT AU CS OK TL MT
.ds let*type BL
.nr Pi 5
.nr Pt 0
.if !''\\$1' .ds let*type \\$1
.if !d let@head_\\*[let*type] .@error "LT: unknown letter type \\$1"
.shift
.als let@header let@head_\\*[let*type]
.let@init_\\*[let*type] \\$@
.if \n[D]>1 .tm Letter type \\*[let*type]
..
.\"-----------
.\" Blocked letter
.de let@init_BL
..
.de let@head_BL
.rm let@header
.let@print-head 1
..
.de let@sg_BL
.ne 5v
.nf
.in (u;\\n[.l]/2)
.sp 3v
\\$1
\\$2
.in
.if \\$4 .sp
.if \w'\\$5'&\\$4 \\$5
.fi
..
.als let@fc_BL let@mt-closing
.\"-----------
.\" Semiblocked letter
.de let@init_SB
.nr Pt 1
..
.de let@head_SB
.rm let@header
.let@print-head 1
..
.als let@sg_SB let@sg_BL
.als let@fc_SB let@mt-closing
.\"-----------
.\" Full-blocked letter
.de let@init_FB
..
.de let@head_FB
.rm let@header
.let@print-head
..
.de let@sg_FB
.ne 5v
.nf
.sp 3v
\\$1
\\$2
.if \\$4 .sp
.if \w'\\$5'&\\$4 \\$5
.fi
..
.de let@fc_FB
.ne 5v
.sp
\\$1
..
.\"-----------
.\" Simplified letter
.de let@init_SP
..
.de let@head_SP
.rm let@header
.let@print-head
..
.de let@sg_SP
.nf
.if \\$3=1 .sp
.sp
.misc@toupper "\\$1, \\$2"
.if \\$4 .sp
.if \w'\\$5'&\\$4 \\$5
.fi
..
.de let@fc_SP
.sp 2
..
.\"--------------------------------------
.\" Print the letter-head
.de let@print-head
.nf
.sp |11
.if '1'\\$1' .in (u;\\n[.l]/2)
.\" ---- WA
.ie d let@wa-div .let@wa-div
.el .sp 3
.\" ---- datum
\\*[cov*new-date]
.sp
.if '1'\\$1' .if !d let*lo-CN .if !d let*lo-RN .sp 2
.\" ---- Confidential
.if d let*lo-CN \{\
. ti 0
. ie !''\\*[let*lo-CN]' \\*[let*lo-CN]
. el \\*[LetCN]
. sp
.\}
.\" ---- Reference
.if d let*lo-RN \{\
\\*[LetRN] \\*[let*lo-RN]
. sp
.\}
.\" ---- IA
.sp
.in 0
.nr let*i 0 1
.while \\n+[let*i]<=\\n[let*ia-n] \{\
\\*[let*ia-name!\\n[let*i]]
\\*[let*ia-title!\\n[let*i]]
.\}
.if d let@ia-div .let@ia-div
.\" ---- Attention
.if d let*lo-AT \{\
. sp
\\*[LetAT] \\*[let*lo-AT]
.\}
.\" ---- Salutation
.if !'\\*[let*type]'SP' .if d let*lo-SA \{\
. sp
. ti 0
. ie !''\\*[let*lo-SA]' \\*[let*lo-SA]
. el \\*[LetSA]
.\}
.\" ---- Subject
.if d let*lo-SJ \{\
. ie '\\*[let*type]'SP' \{\
. sp 2
. misc@toupper \\*[let*lo-SJ]
. sp
. \}
. el \{\
. sp
. if '\\*[let*type]'SB' .ti +5m
\\*[LetSJ] \f[\\*[@sdf_font]]\\*[let*lo-SJ]\fP
. \}
.\}
..
.\"-------------------
.\" .IA [name [title]]
.nr let*ia-n 0 1
.de IA
.if \\n[.$] .ds let*ia-name!\\n+[let*ia-n] \\$1
.if \\n[.$]>1 .ds let*ia-title!\\n[let*ia-n] \\$2
.ev let@ev
.init@reset
'nf
.di let@ia-div
.eo
..
.de IE
.di
.ec
.ev
..
.\"-------------------
.\" .WA [name [title]]
.nr let*wa-n 0 1
.de WA
.if \\n[.$] .ds let*wa-name!\\n+[let*wa-n] \\$1
.if \\n[.$]>1 .ds let*wa-title!\\n[let*wa-n] \\$2
.ev let@ev
.init@reset
'nf
.di let@wa-div
.it \\n[Letwam] let@wa-drain
.eo
..
.\"------
.de let@wa-drain
.it
.di
.di let@wa-junk
..
.\"------
.de WE
.it
.ec
.di
.ev
.if d let@wa-junk .rm let@wa-junk
..
.\"-------------------
.\" Copy to
.de NS
.sp
.ie !''\\$2' .ds let*str \\$1
.el \{\
. ie \\n[.$]>0 \{\
. ie !\w'\\$1' .ds let*str \\*[Letns!\\*[Letnsdef]]
. el \{\
. ie d Letns!\\$1 .ds let*str \\*[Letns!\\$1]
. el .ds let*str \\*[Letns!copy](\\$1)\\*[Letns!to]
. \}
. \}
. el .ds let*str \\*[Letns!\\*[Letnsdef]]
.\}
.ne 2
.nf
\\*[let*str]
..
.de NE
.fi
..
.\"-------------------
.\" Letter options
.de LO
.rm AF AS AE AT AU CS OK TL MT
.if ''\\$1' .@error "LO: missing option"
.if !d Let\\$1 .@error "LO: unknown option (\\$1)"
.ds let*lo-\\$1 \\$2
.if \n[D]>1 .tm Letter option \\$1 \\$2
..
.\"--------------------
.\" Start with a clean slate
.init@reset
1.18.1.4/tmac/trace.tmac 0000666 00000002027 15047753021 0010335 0 ustar 00 .\" trace.tmac
.\"
.\" Load this before a macro package that you want to trace.
.
.nr _C \n(.C
.cp 0
.
.do ds !!sp " \"
.
.eo
.
.rn de !!de
.
.
.!!de de
. do ecs
. ec
. do !!de \$1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** de trace enter: \\$0 \\$@
. el .do tm1 "\*[!!sp]*** trace enter \$1: \\$0 \\$@
. do as !!sp " \"
. do nop \\*[!!\$1]\\
. do substring !!sp 1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
. el .do tm1 "\*[!!sp]*** trace exit \$1: \\$0 \\$@
\..
.
. do ds !!d1 !!\$1
. do ds !!d2 \$2
.
. do ecr
. do dei !!d1 !!d2
..
.
.rn am !!am
.
.!!am am
. do ecs
. ec
. do !!am \$1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** am trace enter: \\$0 \\$@
. el .do tm1 "\*[!!sp]*** am trace enter \$1: \\$0 \\$@
. as !!sp " \"
. do nop \\*[!!\$1]\\
. substring !!sp 1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
. el .do tm1 "\*[!!sp]*** trace exit \$1: \\$0 \\$@
\..
.
. do ds !!a1 !!\$1
. do ds !!a2 \$2
.
. do ecr
. do ami !!a1 !!a2
..
.
.ec
.
.cp \n(_C
.
.\" EOF
1.18.1.4/tmac/man.tmac 0000666 00000000044 15047753021 0010007 0 ustar 00 .\" man.tmac
.\"
.do mso andoc.tmac
1.18.1.4/tmac/s.tmac 0000666 00000107705 15047753021 0007512 0 ustar 00 .\" -*- nroff -*-
.ig
s.tmac
Copyright (C) 1989, 1990, 1991, 1992, 2001, 2002
Free Software Foundation, Inc.
Written by James Clark (jjc@jclark.com)
This file is part of groff.
groff is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 2, or (at your option) any later
version.
groff is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License along
with groff; see the file COPYING. If not, write to the Free Software
Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
..
.if !\n(.g .ab These ms macros require groff.
.if \n(.C \
. ab The groff ms macros do not work in compatibility mode.
.\" Enable warnings (only if none are given on the command line).
.\" You can delete this if you want.
.if (\n[.warn] == 65543) .warn
.\" See if already loaded.
.if r GS .nx
.nr GS 1
.de @error
.tm \\n(.F:\\n(.c: macro error: \\$*
..
.de @warning
.tm \\n(.F:\\n(.c: macro warning: \\$*
..
.de @fatal
.ab \\n(.F:\\n(.c: fatal macro error: \\$*
..
.de @not-implemented
.@error sorry, \\$0 not implemented
.als \\$0 @nop
..
.als TM @not-implemented
.als CT @not-implemented
.de @nop
..
.de @init
.nr PO \\n(.o
.\" a non-empty environment
.ev ne
\c
.ev
.ev nf
'nf
.ev
..
.ds REFERENCES References
.ds ABSTRACT ABSTRACT
.ds TOC Table of Contents
.ds MONTH1 January
.ds MONTH2 February
.ds MONTH3 March
.ds MONTH4 April
.ds MONTH5 May
.ds MONTH6 June
.ds MONTH7 July
.ds MONTH8 August
.ds MONTH9 September
.ds MONTH10 October
.ds MONTH11 November
.ds MONTH12 December
.ds MO \\*[MONTH\n[mo]]
.ds DY \n[dy] \*[MO] \n[year]
.de ND
.if \\n[.$] .ds DY "\\$*
..
.de DA
.if \\n[.$] .ds DY "\\$*
.ds CF \\*[DY]
..
.\" indexing
.de IX
.tm \\$1\t\\$2\t\\$3\t\\$4 ... \\n[PN]
..
.\" print an error message and then try to recover
.de @error-recover
.@error \\$@ (recovering)
.nr *pop-count 0
.while !'\\n(.z'' \{\
. \"@warning automatically terminating diversion \\n(.z
. ie d @div-end!\\n(.z .@div-end!\\n(.z
. el .*div-end-default
. nr *pop-count +1
. \" ensure that we don't loop forever
. if \\n[*pop-count]>20 .@fatal recovery failed
.\}
.while !'\\n[.ev]'0' .ev
.par@reset-env
.par@reset
..
.de *div-end-default
.ds *last-div \\n(.z
.br
.di
.ev nf
.\\*[*last-div]
.ev
..
.\" ****************************
.\" ******** module cov ********
.\" ****************************
.\" Cover sheet and first page.
.de cov*err-not-after-first-page
.@error \\$0 is not allowed after the first page has started
..
.de cov*err-not-before-tl
.@error \\$0 is not allowed before TL
..
.de cov*err-not-again
.@error \\$0 is not allowed more than once
..
.de cov*err-not-after-ab
.@error \\$0 is not allowed after first AB, LP, PP, IP, SH or NH
..
.als AU cov*err-not-before-tl
.als AI cov*err-not-before-tl
.als AB cov*err-not-before-tl
.de cov*first-page-init
.rm cov*first-page-init
.par@init
.als RP cov*err-not-after-first-page
.@init
.ie \\n[cov*rp-format] \{\
. pg@cs-top
. als FS cov*FS
. als FE cov*FE
.\}
.el \{\
. pg@top
. als FS @FS
. als FE @FE
.\}
.wh 0 pg@top
.CHECK-FOOTER-AND-KEEP
..
.wh 0 cov*first-page-init
.\" This handles the case where FS occurs before TL or LP.
.de FS
.br
\\*[FS]\\
..
.nr cov*rp-format 0
.nr cov*rp-no 0
.\" released paper format
.de RP
.nr cov*rp-format 1
.if \\n[.$] .if '\\$1'no' .nr cov*rp-no 1
.pn 0
..
.de TL
.br
.als TL cov*err-not-again
.rn @AB AB
.rn @AU AU
.rn @AI AI
.if !'\*(.T'html' .di cov*tl-div
.par@reset
.ft B
.ps +2
.vs +3p
.ll (u;\\n[LL]*5/6)
.nr cov*n-au 0
.HTML-TAG ".tl"
..
.de @AU
.par@reset
.if !'\\n(.z'' \{\
. br
. di
.\}
.nr cov*n-au +1
.di cov*au-div!\\n[cov*n-au]
.nf
.ft I
.ps \\n[PS]
..
.de @AI
.if !'\*(.T'html' .par@reset
.if !'\\n(.z'' \{\
. br
. di
.\}
.ie !\\n[cov*n-au] .@error AI before AU
.el \{\
. di cov*ai-div!\\n[cov*n-au]
. nf
. ft R
. ps \\n[PS]
.\}
..
.de LP
.if !'\\n[.z]'' \{\
. br
. di
.\}
.br
.cov*ab-init
.cov*print
\\*[\\$0]\\
..
.als IP LP
.als PP LP
.als XP LP
.als QP LP
.als RS LP
.als NH LP
.als SH LP
.als MC LP
.als RT LP
.als XS LP
.de cov*ab-init
.als cov*ab-init @nop
.als LP @LP
.als IP @IP
.als PP @PP
.als XP @XP
.als RT @RT
.als XS @XS
.als SH @SH
.als NH @NH
.als QP @QP
.als RS @RS
.als RE @RE
.als QS @QS
.als QE @QE
.als MC @MC
.als EQ @EQ
.als EN @EN
.als TS @TS
.als AB cov*err-not-after-ab
.als AU par@AU
.als AI par@AI
.als TL par@TL
..
.de @AB
.if !'\\n(.z'' \{\
. br
. di
.\}
.cov*ab-init
.if !'\*(.T'html' .di cov*ab-div
.par@ab-indent
.par@reset
.if !'\\$1'no' \{\
. ft I
. ce 1
\\*[ABSTRACT]
. sp
. ft R
.\}
.ns
.@PP
.if '\*(.T'html' \{\
. cov*tl-au-print
. als cov*tl-au-print @nop
. par@reset-env
. par@reset
. cov*print
.\}
..
.de AE
.ie '\*(.T'html' \{\
. als AE cov*err-not-again
.\}
.el \{\
. ie '\\n(.z'cov*ab-div' \{\
. als AE cov*err-not-again
. br
. di
.\" nr cov*ab-height \\n[dn]
. par@reset-env
. par@reset
. cov*print
. \}
. el .@error AE without AB
.\}
..
.de @div-end!cov*ab-div
.AE
..
.de cov*print
.als cov*print @nop
.ie d cov*tl-div \{\
. ie \\n[cov*rp-format] .cov*rp-print
. el .cov*draft-print
.\}
.el \{\
. if \\n[cov*rp-format] \{\
. @warning RP format but no TL
. bp 1
. als FS @FS
. als FE @FE
. CHECK-FOOTER-AND-KEEP
. \}
. br
.\}
..
.de cov*rp-print
.nr cov*page-length \\n[.p]
.pl 1000i
.cov*tl-au-print
.sp 3
.if d cov*ab-div \{\
. if !'\*(.T'html' . nf
. cov*ab-div
.\}
.sp 3
.par@reset
\\*[DY]
.br
.if \\n[cov*fn-height] \{\
. sp |(u;\\n[cov*page-length]-\\n[FM]\
-\\n[cov*fn-height]-\\n[fn@sep-dist]>?\\n[nl])
. fn@print-sep
. ev nf
. cov*fn-div
. ev
. ie \\n[cov*rp-no] .rm cov*fn-div
. el \{\
. rn cov*fn-div fn@overflow-div
. nr fn@have-overflow 1
. \}
.\}
.als FS @FS
.als FE @FE
.CHECK-FOOTER-AND-KEEP
.\" If anything was printed below where the footer line is normally printed,
.\" then that's an overflow.
.if -\\n[FM]/2+1v+\\n[cov*page-length]<\\n[nl] .@error cover sheet overflow
.pl \\n[cov*page-length]u
.bp 1
.if !\\n[cov*rp-no] .cov*tl-au-print
.rs
.sp 1
..
.de cov*draft-print
.cov*tl-au-print
.if d cov*ab-div \{\
. nf
. sp 2
. cov*ab-div
.\}
.sp 1
..
.de cov*tl-au-print
.par@reset
.nf
.rs
.sp 3
.ce 9999
.if d cov*tl-div .cov*tl-div
.nr cov*i 1
.nr cov*sp 1v
.while \\n[cov*i]<=\\n[cov*n-au] \{\
. sp \\n[cov*sp]u
. cov*au-div!\\n[cov*i]
. ie d cov*ai-div!\\n[cov*i] \{\
. sp .5v
. cov*ai-div!\\n[cov*i]
. nr cov*sp 1v
. \}
. el .nr cov*sp .5v
. nr cov*i +1
.\}
.ce 0
..
.nr cov*fn-height 0
.nr cov*in-fn 0
.\" start of footnote on cover
.de cov*FS
.if \\n[cov*in-fn] \{\
. @error nested FS
. FE
.\}
.nr cov*in-fn 1
.ev fn
.par@reset-env
.da cov*fn-div
.if !\\n[cov*fn-height] .ns
.ie \\n[.$] .FP "\\$1" no
.el .@LP
..
.de @div-end!cov*fn-div
.cov*FE
..
.\" end of footnote on cover
.de cov*FE
.ie '\\n(.z'cov*fn-div' \{\
. br
. ev
. di
. nr cov*in-fn 0
. nr cov*fn-height +\\n[dn]
.\}
.el .@error FE without matching FS
..
.\" ***************************
.\" ******** module pg ********
.\" ***************************
.\" Page-level formatting.
.\" > 0 if we have a footnote on the current page
.nr pg@fn-flag 0
.nr pg@colw 0
.nr pg@fn-colw 0
.nr HM 1i
.nr FM 1i
.ds LF
.ds CF
.ds RF
.ds LH
.ds CH -\\n[PN]-
.ds RH
.ds pg*OH '\\*[LH]'\\*[CH]'\\*[RH]'
.ds pg*EH '\\*[LH]'\\*[CH]'\\*[RH]'
.ds pg*OF '\\*[LF]'\\*[CF]'\\*[RF]'
.ds pg*EF '\\*[LF]'\\*[CF]'\\*[RF]'
.de OH
.ds pg*\\$0 "\\$*
..
.als EH OH
.als OF OH
.als EF OH
.de PT
.ie \\n%=1 .if \\n[pg*P1] .tl \\*[pg*OH]
.el \{\
. ie o .tl \\*[pg*OH]
. el .tl \\*[pg*EH]
.\}
..
.de BT
.ie o .tl \\*[pg*OF]
.el .tl \\*[pg*EF]
..
.nr pg*P1 0
.de P1
.nr pg*P1 1
..
.wh -\n[FM]u pg@bottom
.wh -\n[FM]u/2u pg*footer
.nr MINGW 2n
.nr pg@ncols 1
.de @MC
.if !'\\n(.z'' .error-recover MC while diversion open
.br
.ie \\n[pg@ncols]>1 .pg@super-eject
.el \{\
. \" flush out any floating keeps
. while \\n[kp@tail]>\\n[kp@head] \{\
. rs
. bp
. \}
.\}
.ie !\\n(.$ \{\
. nr pg@colw \\n[LL]*7/15
. nr pg*gutw \\n[LL]-(2*\\n[pg@colw])
. nr pg@ncols 2
.\}
.el \{\
. nr pg@colw (n;\\$1)1 \
. nr pg*gutw \\n[LL]-(\\n[pg@ncols]*\\n[pg@colw])/(\\n[pg@ncols]-1)
. el .nr pg*gutw 0
.\}
.HTML-TAG ".mc \\n[pg@ncols] \\n[pg@colw] \\n[pg*gutw]"
.mk pg*col-top
.ns
.nr pg*col-num 0
.nr pg@fn-colw \\n[pg@colw]*5/6
.par@reset
..
.de 2C
.MC
..
.de 1C
.MC \\n[LL]u
..
.\" top of page macro
.de pg@top
.ch pg*footer -\\n[FM]u/2u
.nr PN \\n%
.nr pg*col-num 0
.nr pg@fn-bottom-margin 0
.nr pg*saved-po \\n[PO]
.po \\n[PO]u
.ev h
.par@reset
.sp (u;\\n[HM]/2)
.PT
.sp |\\n[HM]u
.if d HD .HD
.mk pg@header-bottom
.ev
.mk pg*col-top
.pg*start-col
..
.de pg*start-col
.\" Handle footnote overflow before floating keeps, because the keep
.\" might contain an embedded footnote.
.fn@top-hook
.kp@top-hook
.tbl@top-hook
.ns
..
.de pg@cs-top
.sp \\n[HM]u
.\" move pg@bottom and pg*footer out of the way
.ch pg@bottom \\n[.p]u*2u
.ch pg*footer \\n[.p]u*2u
.ns
..
.de pg@bottom
.tbl@bottom-hook
.if \\n[pg@fn-flag] .fn@bottom-hook
.nr pg*col-num +1
.ie \\n[pg*col-num]<\\n[pg@ncols] .pg*end-col
.el .pg*end-page
..
.de pg*end-col
'sp |\\n[pg*col-top]u
.po (u;\\n[pg*saved-po]+(\\n[pg@colw]+\\n[pg*gutw]*\\n[pg*col-num]))
.\"po +(u;\\n[pg@colw]+\\n[pg*gutw])
.pg*start-col
..
.de pg*end-page
.po \\n[pg*saved-po]u
.\" Make sure we don't exit if there are still floats or footnotes left-over.
.ie \\n[kp@head]<\\n[kp@tail]:\\n[fn@have-overflow] \{\
. \" Switching environments ensures that we don't get an unnecessary
. \" blank line at the top of the page.
. ev ne
' bp
. ev
.\}
.el \{\
. \" If the text has ended and there are no more footnotes or keeps, exit.
. if \\n[pg@text-ended] .ex
. if r pg*next-number \{\
. pn \\n[pg*next-number]
. rr pg*next-number
. if d pg*next-format \{\
. af PN \\*[pg*next-format]
. rm pg*next-format
. \}
. \}
' bp
.\}
..
.\" pg@begin number format
.de pg@begin
.ie \\n[.$]>0 \{\
. nr pg*next-number (;\\$1)
. ie \\n[.$]>1 .ds pg*next-format \\$2
. el .rm pg*next-format
.\}
.el .rr pg*next-number
.pg@super-eject
..
.\" print the footer line
.de pg*footer
.ev h
.par@reset
.BT
.ev
..
.\" flush out any keeps or footnotes
.de pg@super-eject
.br
.if !'\\n(.z'' .@error-recover diversion open while ejecting page
.\" Make sure we stay in the end macro while there is still footnote overflow
.\" left, or floating keeps.
.while \\n[kp@tail]>\\n[kp@head]:\\n[pg@fn-flag] \{\
. rs
. bp
.\}
.bp
..
.nr pg@text-ended 0
.de pg@end-text
.br
.nr pg@text-ended 1
.pg@super-eject
..
.em pg@end-text
.\" ***************************
.\" ******** module fn ********
.\" ***************************
.\" Footnotes.
.nr fn@sep-dist 8p
.ev fn
.\" Round it vertically
.vs \n[fn@sep-dist]u
.nr fn@sep-dist \n[.v]
.ev
.nr fn*text-num 0 1
.nr fn*note-num 0 1
.ds * \\*[par@sup-start]\En+[fn*text-num]\\*[par@sup-end]
.nr fn*open 0
.\" normal FS
.de @FS
.ie \\n[.$] .fn*do-FS "\\$1" no
.el \{\
. ie \\n[fn*text-num]>\\n[fn*note-num] .fn*do-FS \\n+[fn*note-num]
. el .fn*do-FS
.\}
..
.\" Second argument of `no' means don't embellish the first argument.
.de fn*do-FS
.if \\n[fn*open] .@error-recover nested FS
.nr fn*open 1
.if \\n[.u] \{\
. \" Ensure that the first line of the footnote is on the same page
. \" as the reference. I think this is minimal.
. ev fn
. nr fn*need 1v
. ev
. ie \\n[pg@fn-flag] .nr fn*need +\\n[fn:PD]
. el .nr fn*need +\\n[fn@sep-dist]
. ne \\n[fn*need]u+\\n[.V]u>?0
.\}
.ev fn
.par@reset-env
.fn*start-div
.par@reset
.ie \\n[.$] .FP \\$@
.el .@LP
..
.de @FE
.ie !\\n[fn*open] .@error FE without FS
.el \{\
. nr fn*open 0
. br
. ev
. fn*end-div
.\}
..
.nr fn@have-overflow 0
.\" called at the top of each column
.de fn@top-hook
.nr fn*max-width 0
.nr fn*page-bottom-pos 0-\\n[FM]-\\n[pg@fn-bottom-margin]
.ch pg@bottom \\n[fn*page-bottom-pos]u
.if \\n[fn@have-overflow] \{\
. nr fn@have-overflow 0
. fn*start-div
. ev nf
. fn@overflow-div
. ev
. fn*end-div
.\}
..
.\" This is called at the bottom of the column if pg@fn-flag is set.
.de fn@bottom-hook
.nr pg@fn-flag 0
.nr fn@have-overflow 0
.nr fn@bottom-pos \\n[.p]-\\n[FM]-\\n[pg@fn-bottom-margin]+\\n[.v]
.ev fn
.nr fn@bottom-pos -\\n[.v]
.ev
.ie \\n[nl]+\\n[fn@sep-dist]+\n[.V]>\\n[fn@bottom-pos] \{\
. rn fn@div fn@overflow-div
. nr fn@have-overflow 1
.\}
.el \{\
. if \\n[pg@ncols]>1 \
. if \\n[fn*max-width]>\\n[pg@fn-colw] \
. nr pg@fn-bottom-margin \\n[.p]-\\n[FM]-\\n[nl]+1v
. wh \\n[fn@bottom-pos]u fn*catch-overflow
. fn@print-sep
. ev nf
. fn@div
. rm fn@div
. ev
. if '\\n(.z'fn@overflow-div' \{\
. di
. nr fn@have-overflow \\n[dn]>0
. \}
. ch fn*catch-overflow
.\}
..
.de fn*catch-overflow
.di fn@overflow-div
..
.nr fn*embed-count 0
.de @div-end!fn@div
.br
.if '\\n[.ev]'fn' .ev
.fn*end-div
.nr fn*open 0
..
.als @div-end!fn*embed-div @div-end!fn@div
.de fn*start-div
.ie '\\n(.z'' \{\
. da fn@div
. if !\\n[pg@fn-flag] .ns
.\}
.el .di fn*embed-div
..
.de fn*end-div
.ie '\\n(.z'fn@div' \{\
. di
. nr fn*page-bottom-pos -\\n[dn]
. nr fn*max-width \\n[fn*max-width]>?\\n[dl]
. if !\\n[pg@fn-flag] .nr fn*page-bottom-pos -\\n[fn@sep-dist]
. nr pg@fn-flag 1
. nr fn*page-bottom-pos \\n[nl]-\\n[.p]+\n[.V]>?\\n[fn*page-bottom-pos]
. ch pg@bottom \\n[fn*page-bottom-pos]u
.\}
.el \{\
. ie '\\n(.z'fn*embed-div' \{\
. di
. rn fn*embed-div fn*embed-div!\\n[fn*embed-count]
\!. fn*embed-start \\n[fn*embed-count]
. rs
' sp (u;\\n[dn]+\\n[fn@sep-dist]+\\n[.V])
\!. fn*embed-end
. nr fn*embed-count +1
. \}
. el \{\
. ev fn
. @error-recover unclosed diversion within footnote
. \}
.\}
..
.de fn*embed-start
.ie '\\n(.z'' \{\
. fn*start-div
. ev nf
. fn*embed-div!\\$1
. rm fn*embed-div!\\$1
. ev
. fn*end-div
. di fn*null
.\}
.el \{\
\!. fn*embed-start \\$1
. rs
.\}
..
.de fn*embed-end
.ie '\\n(.z'fn*null' \{\
. di
. rm fn*null
.\}
.el \!.fn*embed-end
..
.\" It's important that fn@print-sep use up exactly fn@sep-dist vertical space.
.de fn@print-sep
.ev fn
.in 0
.vs \\n[fn@sep-dist]u
\D'l 1i 0'
.br
.ev
..
.\" ***************************
.\" ******** module kp ********
.\" ***************************
.\" Keeps.
.de KS
.br
.di kp*div
..
.de KF
.if !'\\n(.z'' .@error-recover KF while open diversion
.di kp*fdiv
.ev k
.par@reset-env
.par@reset
..
.de KE
.ie '\\n(.z'kp*div' .kp*end
.el \{\
. ie '\\n(.z'kp*fdiv' .kp*fend
. el .@error KE without KS or KF
.\}
..
.de @div-end!kp*div
.kp*end
..
.de @div-end!kp*fdiv
.kp*fend
..
.de kp*need
.ie '\\n(.z'' .ds@need \\$1
.el \!.kp*need \\$1
..
.\" end non-floating keep
.de kp*end
.br
.di
.kp*need \\n[dn]
.ev nf
.kp*div
.ev
.rm kp*div
..
.\" Floating keeps.
.nr kp@head 0
.nr kp@tail 0
.\" end floating keep
.de kp*fend
.br
.ev
.di
.ie \\n[.t]-(\\n[.k]>0*1v)>\\n[dn] \{\
. br
. ev nf
. kp*fdiv
. rm kp*fdiv
. ev
.\}
.el \{\
. rn kp*fdiv kp*div!\\n[kp@tail]
. nr kp*ht!\\n[kp@tail] 0\\n[dn]
. nr kp@tail +1
.\}
..
.\" top of page processing for KF
.nr kp*doing-top 0
.de kp@top-hook
.if !\\n[kp*doing-top] \{\
. nr kp*doing-top 1
. kp*do-top
. nr kp*doing-top 0
.\}
..
.de kp*do-top
.\" If the first keep won't fit, only force it out if we haven't had a footnote
.\" and we're at the top of the page.
.nr kp*force \\n[pg@fn-flag]=0&(\\n[nl]<=\\n[pg@header-bottom])
.nr kp*fits 1
.while \\n[kp@tail]>\\n[kp@head]&\\n[kp*fits] \{\
. ie \\n[.t]>\\n[kp*ht!\\n[kp@head]]:\\n[kp*force] \{\
. nr kp*force 0
. \" It's important to advance kp@head before bringing
. \" back the keep, so that if the last line of the
. \" last keep springs the bottom of page trap, a new
. \" page will not be started unnecessarily.
. rn kp*div!\\n[kp@head] kp*temp
. nr kp@head +1
. ev nf
. kp*temp
. ev
. rm kp*temp
. \}
. el .nr kp*fits 0
.\}
..
.\" ***************************
.\" ******** module ds ********
.\" ***************************
.\" Displays and non-floating keeps.
.de DE
.ds*end!\\n[\\n[.ev]:ds-type]
.nr \\n[.ev]:ds-type 0
..
.de ds@auto-end
.if \\n[\\n[.ev]:ds-type] \{\
. @error automatically terminating display
. DE
.\}
..
.de @div-end!ds*div
.ie \\n[\\n[.ev]:ds-type] .DE
.el .ds*end!2
..
.de ds*end!0
.@error DE without DS, ID, CD, LD or BD
..
.de LD
.br
.nr \\n[.ev]:ds-type 1
.par@reset
.nf
.sp \\n[DD]u
..
.de ID
.LD
.ie \\n[.$] .in +(n;\\$1)
.el .in +\\n[DI]u
..
.de CD
.LD
.ce 9999
..
.de RD
.LD
.rj 9999
..
.de ds*common-end
.par@reset
.sp \\n[DD]u
..
.als ds*end!1 ds*common-end
.de BD
.LD
.nr \\n[.ev]:ds-type 2
.di ds*div
..
.de ds*end!2
.br
.ie '\\n(.z'ds*div' \{\
. di
. nf
. in (u;\\n[.l]-\\n[dl]/2>?0)
. ds*div
. rm ds*div
. ds*common-end
.\}
.el .@error-recover mismatched DE
..
.de DS
.br
.di ds*div
.ie '\\$1'B' \{\
. LD
. nr \\n[.ev]:ds-type 4
.\}
.el \{\
. ie '\\$1'L' .LD
. el \{\
. ie '\\$1'C' .CD
. el \{\
. ie '\\$1'R' .RD
. el \{\
. ie '\\$1'I' .ID \\$2
. el .ID \\$1
. \}
. \}
. \}
. nr \\n[.ev]:ds-type 3
.\}
..
.de ds@need
.if '\\n(.z'' \{\
. while \\n[.t]<=(\\$1)&(\\n[nl]>\\n[pg@header-bottom]) \{\
. rs
' sp \\n[.t]u
. \}
.\}
..
.de ds*end!3
.br
.ie '\\n(.z'ds*div' \{\
. di
. ds@need \\n[dn]
. ev nf
. ds*div
. ev
. rm ds*div
. ds*common-end
.\}
.el .@error-recover mismatched DE
..
.de ds*end!4
.ie '\\n(.z'ds*div' \{\
. br
. di
. nf
. in (u;\\n[.l]-\\n[dl]/2>?0)
. ds@need \\n[dn]
. ds*div
. rm ds*div
. ds*common-end
.\}
.el .@error-recover mismatched DE
..
.\" ****************************
.\" ******** module par ********
.\" ****************************
.\" Paragraph-level formatting.
.\" Load time initialization.
.de par@load-init
.\" PS and VS might have been set on the command-line
.if !rPS .nr PS 10
.if !rLL .nr LL 6i
.ll \\n[LL]u
.\" don't set LT so that it can be defaulted from LL
.ie rLT .lt \\n[LT]u
.el .lt \\n[LL]u
.ps \\n[PS]
.\" don't set VS so that it can be defaulted from PS
.ie rVS .par*vs \\n[VS]
.el .par*vs \\n[PS]+2
.if dFAM .fam \\*[FAM]
.if !rHY .nr HY 14
.hy \\n[HY]
.TA
.CHECK-FOOTER-AND-KEEP
..
.de par*vs
.\" If it's too big to be in points, treat it as units.
.ie (p;\\$1)>=40p .vs (u;\\$1)
.el .vs (p;\\$1)
..
.de par@ab-indent
.nr 0:li (u;\\n[LL]/12)
.nr 0:ri \\n[0:li]
..
.de par*env-init
.aln \\n[.ev]:PS PS
.aln \\n[.ev]:VS VS
.aln \\n[.ev]:LL LL
.aln \\n[.ev]:MCLL LL
.aln \\n[.ev]:LT LT
.aln \\n[.ev]:MCLT LT
.aln \\n[.ev]:PI PI
.aln \\n[.ev]:PD PD
.ad \\n[par*adj]
.par@reset-env
..
.\" happens when the first page begins
.de par@init
.if !rLT .nr LT \\n[LL]
.if !rFL .nr FL \\n[LL]*5/6
.if !rVS .nr VS \\n[PS]+2
.if !rDI .nr DI .5i
.if !rFPS .nr FPS \\n[PS]-2
.if !rFVS .nr FVS \\n[FPS]+2
.\" don't change environment 0
.ev h
.ps \\n[PS]
.if !rQI .nr QI 5n
.if !rPI .nr PI 5n
.par*vs \\n[VS]
.if !rPD .nr PD .3v>?\n(.V
.if !rDD .nr DD .5v>?\n(.V
.if !rFI .nr FI 2n
.if !rFPD .nr FPD \\n[PD]/2
.ev
.if !dFAM .ds FAM \\n[.fam]
.nr par*adj \\n[.j]
.par*env-init
.ev h
.par*env-init
.ev
.ev fn
.par*env-init
.ev
.ev k
.par*env-init
.ev
.aln 0:MCLL pg@colw
.aln 0:MCLT pg@colw
.aln k:MCLL pg@colw
.aln k:MCLT pg@colw
.aln fn:PS FPS
.aln fn:VS FVS
.aln fn:LL FL
.aln fn:LT FL
.aln fn:PI FI
.aln fn:PD FPD
.aln fn:MCLL pg@fn-colw
.aln fn:MCLT pg@fn-colw
..
.de par@reset-env
.nr \\n[.ev]:il 0
.nr \\n[.ev]:li 0
.nr \\n[.ev]:ri 0
.nr \\n[.ev]:ai \\n[\\n[.ev]:PI]
.nr \\n[.ev]:pli 0
.nr \\n[.ev]:pri 0
.nr \\n[.ev]:ds-type 0
..
.\" par@reset
.de par@reset
.br
.ce 0
.rj 0
.ul 0
.fi
.ie \\n[pg@ncols]>1 \{\
. ll (u;\\n[\\n[.ev]:MCLL]-\\n[\\n[.ev]:ri]-\\n[\\n[.ev]:pri])
. lt \\n[\\n[.ev]:MCLT]u
.\}
.el \{\
. ll (u;\\n[\\n[.ev]:LL]-\\n[\\n[.ev]:ri]-\\n[\\n[.ev]:pri])
. lt \\n[\\n[.ev]:LT]u
.\}
.in (u;\\n[\\n[.ev]:li]+\\n[\\n[.ev]:pli])
.ft 1
.fam \\*[FAM]
.ps \\n[\\n[.ev]:PS]
.par*vs \\n[\\n[.ev]:VS]
.ls 1
.TA
.hy \\n[HY]
..
.de @RT
.nr \\n[.ev]:pli 0
.nr \\n[.ev]:pri 0
.par@reset
..
.\" This can be redefined by the user.
.de TA
.ta T 5n
..
.de par*start
.ds@auto-end
.nr \\n[.ev]:pli \\$1
.nr \\n[.ev]:pri \\$2
.par@reset
.sp \\n[\\n[.ev]:PD]u
.ne 1v+\\n(.Vu
..
.de par@finish
.nr \\n[.ev]:pli 0
.nr \\n[.ev]:pri 0
.par@reset
..
.\" normal LP
.de @LP
.par*start 0 0
.nr \\n[.ev]:ai \\n[\\n[.ev]:PI]
..
.de @PP
.par*start 0 0
.nr \\n[.ev]:ai \\n[\\n[.ev]:PI]
.if !'\*(.T'html' .ti +\\n[\\n[.ev]:ai]u
..
.de @QP
.nr \\n[.ev]:ai \\n[\\n[.ev]:PI]
.par*start \\n[QI] \\n[QI]
..
.de @XP
.par*start \\n[\\n[.ev]:PI] 0
.ti -\\n[\\n[.ev]:PI]u
..
.de @IP
.if \\n[.$]>1 .nr \\n[.ev]:ai (n;\\$2)
.par*start \\n[\\n[.ev]:ai] 0
.if !'\\$1'' \{\
. \" Divert the label so as to freeze any spaces.
. di par*label
. par*push-tag-env
\&\\$1
. par*pop-tag-env
. di
. chop par*label
. ti -\\n[\\n[.ev]:ai]u
. ie \\n[dl]+1n<=\\n[\\n[.ev]:ai] \\*[par*label]\h'|\\n[\\n[.ev]:ai]u'\c
. el \{\
\\*[par*label]
. br
. \}
. rm par*label
.\}
..
.de @IP-html
.if \\n[.$]>1 .nr \\n[.ev]:ai (n;\\$2)
.par*start \\n[\\n[.ev]:ai] 0
.if !'\\$1'' \{\
. \" Divert the label so as to freeze any spaces.
. di par*label
. par*push-tag-env
\&\\$1
. par*pop-tag-env
. di
. chop par*label
. ti -\\n[\\n[.ev]:ai]u
. ie \\n[dl]+1n<=\\n[\\n[.ev]:ai] \{\
. HTML-TAG-NS ".col 1"
\\$1\h'|\\n[\\n[.ev]:ai]u'\c
. HTML-TAG-NS ".col 2"
. \}
. el \{\
\\$1
. br
. \}
. rm par*label
.\}
..
.\" We don't want margin characters to be attached when we divert
.\" the tag. Since there's no way to save and restore the current
.\" margin character, we have to switch to a new environment, taking
.\" what we need of the old environment with us.
.de par*push-tag-env
.nr par*saved-font \\n[.f]
.nr par*saved-size \\n[.s]z
.nr par*saved-ss \\n[.ss]
.ds par*saved-fam \\n[.fam]
.ev par
.nf
.TA
.ft \\n[par*saved-font]
.ps \\n[par*saved-size]u
.ss \\n[par*saved-ss]
.fam \\*[par*saved-fam]
..
.de par*pop-tag-env
.ev
..
.de @RS
.br
.nr \\n[.ev]:li!\\n[\\n[.ev]:il] \\n[\\n[.ev]:li]
.nr \\n[.ev]:ri!\\n[\\n[.ev]:il] \\n[\\n[.ev]:ri]
.nr \\n[.ev]:ai!\\n[\\n[.ev]:il] \\n[\\n[.ev]:ai]
.nr \\n[.ev]:pli!\\n[\\n[.ev]:il] \\n[\\n[.ev]:pli]
.nr \\n[.ev]:pri!\\n[\\n[.ev]:il] \\n[\\n[.ev]:pri]
.nr \\n[.ev]:il +1
.nr \\n[.ev]:li +\\n[\\n[.ev]:ai]
.nr \\n[.ev]:ai \\n[\\n[.ev]:PI]
.par@reset
..
.de @RE
.br
.ie \\n[\\n[.ev]:il] \{\
. nr \\n[.ev]:il -1
. nr \\n[.ev]:ai \\n[\\n[.ev]:ai!\\n[\\n[.ev]:il]]
. nr \\n[.ev]:li \\n[\\n[.ev]:li!\\n[\\n[.ev]:il]]
. nr \\n[.ev]:ri \\n[\\n[.ev]:ri!\\n[\\n[.ev]:il]]
. nr \\n[.ev]:pli \\n[\\n[.ev]:pli!\\n[\\n[.ev]:il]]
. nr \\n[.ev]:pri \\n[\\n[.ev]:pri!\\n[\\n[.ev]:il]]
.\}
.el .@error unbalanced \\$0
.par@reset
..
.de @QS
.br
.nr \\n[.ev]:li!\\n[\\n[.ev]:il] \\n[\\n[.ev]:li]
.nr \\n[.ev]:ri!\\n[\\n[.ev]:il] \\n[\\n[.ev]:ri]
.nr \\n[.ev]:ai!\\n[\\n[.ev]:il] \\n[\\n[.ev]:ai]
.nr \\n[.ev]:pli!\\n[\\n[.ev]:il] \\n[\\n[.ev]:pli]
.nr \\n[.ev]:pri!\\n[\\n[.ev]:il] \\n[\\n[.ev]:pri]
.nr \\n[.ev]:il +1
.nr \\n[.ev]:li +\\n[QI]
.nr \\n[.ev]:ri +\\n[QI]
.nr \\n[.ev]:ai \\n[\\n[.ev]:PI]
.par@reset
..
.als @QE @RE
.\" start boxed text
.de B1
.br
.HTML-IMAGE
.di par*box-div
.nr \\n[.ev]:li +1n
.nr \\n[.ev]:ri +1n
.nr par*box-in \\n[.in]
.\" remember what 1n is, just in case the point size changes
.nr par*box-n 1n
.in +1n
.ll -1n
.lt -1n
.ti \\n[par*box-in]u+1n
..
.de @div-end!par*box-div
.B2
..
.\" end boxed text
.\" Postpone the drawing of the box until we're in the top-level diversion,
.\" in case there's a footnote inside the box.
.de B2
.ie '\\n(.z'par*box-div' \{\
. br
. if \n[.V]>.25m .sp
. di
. if \n[.V]>.25m .sp
. ds@need \\n[dn]
. par*box-mark-top
. ev nf
. par*box-div
. ev
. nr \\n[.ev]:ri -\\n[par*box-n]
. nr \\n[.ev]:li -\\n[par*box-n]
. in -\\n[par*box-n]u
. ll +\\n[par*box-n]u
. lt +\\n[par*box-n]u
. par*box-draw \\n[.i]u \\n[.l]u-(\\n[.H]u==1n*1n)
.\}
.el .@error B2 without B1
.HTML-IMAGE-END
..
.de par*box-mark-top
.ie '\\n[.z]'' \{\
. rs
. mk par*box-top
.\}
.el \!.par*box-mark-top
..
.de par*box-draw
.ie '\\n[.z]'' \{\
. nr par*box-in \\n[.i]
. nr par*box-ll \\n[.l]
. nr par*box-vpt \\n[.vpt]
. nr par*box-ad \\n[.j]
. ad l
. vpt 0
. in \\$1
. ll \\$2
\v'-1v+.25m'\
\D'l (u;\\n[.l]-\\n[.i]) 0'\
\D'l 0 |\\n[par*box-top]u'\
\D'l -(u;\\n[.l]-\\n[.i]) 0'\
\D'l 0 -|\\n[par*box-top]u'
. br
. sp -1
. in \\n[par*box-in]u
. ll \\n[par*box-ll]u
. vpt \\n[par*box-vpt]
. ad \\n[par*box-ad]
.\}
.el \!.par*box-draw \\$1 \\$2
..
.de @SH
.par@finish
.\" Keep together the heading and the first two lines of the next paragraph.
.ne 3v+\\n[\\n[.ev]:PD]u+\\n(.Vu
.sp 1
.ft B
.HTML-TAG ".SH 1"
..
.\" TL, AU, and AI are aliased to these in cov*ab-init.
.de par@TL
.par@finish
.sp 1
.ft B
.ps +2
.vs +3p
.ce 9999
.HTML-TAG ".tl"
..
.de par@AU
.par@finish
.sp 1
.ft I
.ce 9999
..
.de par@AI
.par@finish
.sp .5
.ce 9999
..
.\" In paragraph macros.
.de NL
.ps \\n[\\n[.ev]:PS]
..
.de SM
.ps -2
..
.de LG
.ps +2
..
.de R
.ft R
..
.\" par*define-font-macro macro font
.de par*define-font-macro
.de \\$1
.ie \\\\n[.$] \{\
. nr par*prev-font \\\\n[.f]
\&\\\\$3\f[\\$2]\\\\$1\f[\\\\n[par*prev-font]]\\\\$2
.\}
.el .ft \\$2
\\..
..
.par*define-font-macro B B
.par*define-font-macro I I
.par*define-font-macro BI BI
.par*define-font-macro CW CR
.\" underline a word
.de UL
\Z'\\$1'\v'.25m'\D'l \w'\\$1'u 0'\v'-.25m'\\$2
..
.\" box a word
.de BX
.nr par*bxw \w'\\$1'+.4m
\Z'\v'.25m'\D'l 0 -1m'\D'l \\n[par*bxw]u 0'\D'l 0 1m'\D'l -\\n[par*bxw]u 0''\
\Z'\h'.2m'\\$1'\
\h'\\n[par*bxw]u'
..
.\" The first time UX is used, put a registered mark after it.
.ds par*ux-rg \(rg
.de UX
\s[\\n[.s]*8u/10u]UNIX\s0\\$1\\*[par*ux-rg]
.ds par*ux-rg
..
.ds par@sup-start \v'-.9m\s'\En[.s]*7u/10u'+.7m'
.als { par@sup-start
.ds par@sup-end \v'-.7m\s0+.9m'
.als } par@sup-end
.\" footnote paragraphs
.\" FF is the footnote format
.nr FF 0
.\" This can be redefined. It gets a second argument of `no' if the first
.\" argument was supplied by the user, rather than automatically.
.de FP
.br
.if !d par*fp!\\n[FF] \{\
. @error unknown footnote format `\\n[FF]'
. nr FF 0
.\}
.ie '\\$2'no' .par*fp!\\n[FF]-no "\\$1"
.el .par*fp!\\n[FF] "\\$1"
..
.de par*fp!0
.@PP
\&\\*[par@sup-start]\\$1\\*[par@sup-end]\ \c
..
.de par*fp!0-no
.@PP
\&\\$1\ \c
..
.de par*fp!1
.@PP
\&\\$1.\ \c
..
.de par*fp!1-no
.@PP
\&\\$1\ \c
..
.de par*fp!2
.@LP
\&\\$1.\ \c
..
.de par*fp!2-no
.@LP
\&\\$1\ \c
..
.de par*fp!3
.@IP "\\$1." (u;\\n[\\n[.ev]:PI]*2)
..
.de par*fp!3-no
.@IP "\\$1" (u;\\n[\\n[.ev]:PI]*2)
..
.\" ***************************
.\" ******** module nh ********
.\" ***************************
.\" Numbered headings.
.\" nh*hl is the level of the last heading
.nr nh*hl 0
.\" numbered heading
.de @NH
.HTML-TAG ".NH \\$1"
.ie '\\$1'S' \{\
. shift
. nr nh*hl 0
. while \\n[.$] \{\
. nr nh*hl +1
. nr H\\n[nh*hl] 0\\$1
. shift
. \}
. if !\\n[nh*hl] \{\
. nr H1 1
. nr nh*hl 1
. @error missing arguments to .NH S
. \}
.\}
.el \{\
. nr nh*ohl \\n[nh*hl]
. ie \\n[.$] \{\
. nr nh*hl 0\\$1
. ie \\n[nh*hl]<=0 \{\
. nr nh*ohl 0
. nr nh*hl 1
. \}
. el \{\
. if \\n[nh*hl]-\\n[nh*ohl]>1 \
. @warning .NH \\n[nh*ohl] followed by .NH \\n[nh*hl]
. \}
. \}
. el .nr nh*hl 1
. while \\n[nh*hl]>\\n[nh*ohl] \{\
. nr nh*ohl +1
. nr H\\n[nh*ohl] 0
. \}
. nr H\\n[nh*hl] +1
.\}
.ds SN
.nr nh*i 0
.while \\n[nh*i]<\\n[nh*hl] \{\
. nr nh*i +1
. as SN \\n[H\\n[nh*i]].
.\}
.SH
\\*[SN]
..
.\" ****************************
.\" ******** module toc ********
.\" ****************************
.\" Table of contents generation.
.de @XS
.da toc*div
.ev h
.ie \\n[.$] .XA "\\$1"
.el .XA
..
.de @div-end!toc*div
.XE
..
.de XA
.ie '\\n(.z'toc*div' \{\
. if d toc*num .toc*end-entry
. ie \\n[.$] \{\
. ie '\\$1'no' .ds toc*num
. el .ds toc*num "\\$1
. \}
. el .ds toc*num \\n[PN]
. br
. par@reset
. na
. ll -8n
. in (n;0\\$2)
.\}
.el .@error XA without XS
..
.de XE
.ie '\\n(.z'toc*div' \{\
. if d toc*num .toc*end-entry
. ev
. di
.\}
.el .@error XS without XE
..
.de toc*end-entry
\\a\\t\\*[toc*num]
.br
.rm toc*num
..
.de PX
.1C
.if !'\\$1'no' \{\
. ce 1
. ps \\n[PS]+2
. ft B
\\*[TOC]
. ft
. ps
.\}
.nf
.char \[toc*leader-char] .\h'1m'
.lc \[toc*leader-char]
.ta (u;\\n[.l]-\\n[.i]-\w'000') (u;\\n[.l]-\\n[.i])R
.sp 2
.toc*div
.par@reset
..
.\" print the table of contents on page i
.de TC
.P1
.pg@begin 1 i
.PX \\$1
..
.\" ****************************
.\" ******** module eqn ********
.\" ****************************
.\" Eqn support.
.de EQ
..
.de EN
..
.de @EQ
.br
.ds eqn*num "\\$2
.ie '\\$1'L' .nr eqn*type 0
.el \{\
. ie '\\$1'I' .nr eqn*type 1
. el \{\
. nr eqn*type 2
. if !'\\$1'C' .ds eqn*num "\\$1
. \}
.\}
.di eqn*div
.in 0
.if \\n[eqn*type]=0 .HTML-IMAGE-LEFT
.if \\n[eqn*type]=1 \{\
. if '\*(.T'html' .RS
. HTML-IMAGE-INLINE
.\}
.if \\n[eqn*type]=2 .HTML-IMAGE
.if !'\*(.T'html' .nf
..
.de @div-end!eqn*div
.@EN
..
.\" Note that geqn mark and lineup work correctly in centered equations.
.de @EN
.ie !'\\n(.z'eqn*div' .@error-recover mismatched EN
.el \{\
. br
. di
. nr eqn*have-num 0
. if !'\\*[eqn*num]'' .nr eqn*have-num 1
. ie \\n[dl]:\\n[eqn*have-num] \{\
. if !'\*(.T'html' .sp \\n[DD]u
. par@reset
. ds eqn*tabs \\n[.tabs]
. nf
. ie \\n[dl] \{\
.\" --fixme-- this really should not be necessary
.\" and indicates that there is extra space creeping into
.\" an equation when ps4html is enabled..
. ie r ps4html .ds@need \\n[dn]u-1v+\n[.V]u+1i
. el .ds@need \\n[dn]u-1v+\n[.V]u
. chop eqn*div
. ie \\n[eqn*type]=0 \{\
. ta (u;\\n[.l]-\\n[.i])R
\\*[eqn*div]\t\\*[eqn*num]
. \}
. el \{\
. ie \\n[eqn*type]=1 .ta \\n[DI]u \
(u;\\n[.l]-\\n[.i])R
. el .ta (u;\\n[.l]-\\n[.i]/2)C \
(u;\\n[.l]-\\n[.i])R
\t\\*[eqn*div]\t\\*[eqn*num]
. \}
. \}
. el \{\
. ta (u;\\n[.l]-\\n[.i])R
\t\\*[eqn*num]
. \}
. if !'\*(.T'html' .sp \\n[DD]u
. ta \\*[eqn*tabs]
. \}
. el \{
.\" must terminate empty equations in html and ps4html as they contain
.\" the HTML-IMAGE-END suppression nodes
. if \\n[dl] .chop eqn*div
. if '\*(.T'html' \\*[eqn*div]
. if r ps4html \\*[eqn*div]
. \}
. if !'\*(.T'html' .fi
. if \\n[eqn*type]=0 .HTML-IMAGE-END
. if \\n[eqn*type]=1 \{\
. HTML-IMAGE-END
. if '\*(.T'html' .RE
. \}
. if \\n[eqn*type]=2 .HTML-IMAGE-END
.\}
..
.\" ****************************
.\" ******** module tbl ********
.\" ****************************
.\" Tbl support.
.nr tbl*have-header 0
.\" This gets called if TS occurs before the first paragraph.
.de TS
.LP
.\" cov*ab-init aliases TS to @TS
\\*[TS]\\
..
.de @TS
.sp \\n[DD]u
.\" .if !'\*(.T'html' .sp \\n[DD]u
.if '\\$1'H' .di tbl*header-div
.HTML-IMAGE
..
.de tbl@top-hook
.if \\n[tbl*have-header] \{\
. ie \\n[.t]-\\n[tbl*header-ht]-1v .tbl*print-header
. el .sp \\n[.t]u
.\}
..
.de tbl*print-header
.ev nf
.tbl*header-div
.ev
.mk #T
..
.de TH
.ie '\\n[.z]'tbl*header-div' \{\
. nr T. 0
. T#
. br
. di
. ie \\n[dn]+\\n[FM]+\\n[HM]+2v>=\\n[.p] \{\
. @error ridiculously long table header
. ds@need \\n[dn]
. tbl*print-header
. \}
. el \{\
. nr tbl*header-ht \\n[dn]
. ds@need \\n[dn]u+1v
. tbl*print-header
. nr tbl*have-header 1
. \}
.\}
.el .@error-recover .TH without .TS H
..
.de @div-end!tbl*header-div
.TH
.TE
..
.de TE
.ie '\\n(.z'tbl*header-div' .@error-recover .TS H but no .TH before .TE
.el \{\
. nr tbl*have-header 0
. if !'\*(.T'html' .sp \\n[DD]u
.\}
. HTML-IMAGE-END
.\" reset tabs
.TA
..
.de tbl@bottom-hook
.if \\n[tbl*have-header] \{\
. nr T. 1
. T#
.\}
..
.de T&
..
.\" ****************************
.\" ******** module pic ********
.\" ****************************
.\" Pic support.
.\" PS height width
.de PS
.br
.sp \\n[DD]u
.ie \\n[.$]<2 .@error bad arguments to PS (not preprocessed with pic?)
.el \{\
. ds@need (u;\\$1)+1v
. in +(u;\\n[.l]-\\n[.i]-\\$2/2>?0)
.\}
.HTML-IMAGE
..
.de PE
.HTML-IMAGE-END
.par@reset
.sp \\n[DD]u+.5m
..
.\" ****************************
.\" ******** module ref ********
.\" ****************************
.\" Refer support.
.de ]-
.rm [A [B [C [D [E [G [I [J [N [O [P [Q [R [S [T [V
.rm ref*string
..
.\" Other
.ds ref*spec!0 Q A T1 S V N P I C D O
.\" Journal article
.ds ref*spec!1 Q A T2 J S V N P I C D O
.\" Book
.ds ref*spec!2 Q A T1 S V P I C D O
.\" Article within book
.ds ref*spec!3 Q A T2 B E S V P I C D O
.\" Tech report
.ds ref*spec!4 Q A T2 R G P I C D O
.\" ][ type
.de ][
.if r [T \{\
. als [T1 [T
. als [T2 [T
.\}
.ie d ref*spec!\\$1 .ref*build \\*[ref*spec!\\$1]
.el \{\
. @error unknown reference type `\\$1'
. ref*build \\*[ref*spec!0]
.\}
.ref*print
.rm ref*string
.rm [F [T1 [T2
..
.\" start of reference number
.ds [. \\*[par@sup-start]
.\" end of reference number
.ds .] \\*[par@sup-end]
.\" period before reference
.ds <. .
.\" period after reference
.ds >. \" empty
.\" comma before reference
.ds <, ,
.\" comma after reference
.ds >, \" empty
.\" start collected references
.de ]<
.als ref*print ref*end-print
.SH
\&\\*[REFERENCES]
.par@reset
..
.\" end collected references
.de ]>
.par@finish
.als ref*print ref*normal-print
..
.de ref*normal-print
.ie d [F .FS "\\*([.\\*([F\\*(.]"
.el .FS \&
\\*[ref*string]
.FE
..
.de ref*end-print
.ie d [F .IP "\\*([F."
.el .XP
\\*[ref*string]
..
.als ref*print ref*normal-print
.de ref*build
.rm ref*string ref*post-punct
.nr ref*suppress-period 1
.while \\n[.$] \{\
. if d [\\$1 \{\
. ie d ref*add-\\$1 .ref*add-\\$1
. el .ref*add-dflt \\$1
. \}
. shift
.\}
.\" now add a final period
.ie d ref*string \{\
. if !\\n[ref*suppress-period] .as ref*string .
. if d ref*post-punct \{\
. as ref*string "\\*[ref*post-punct]
. rm ref*post-punct
. \}
.\}
.el .ds ref*string
..
.de ref*add-T1
.ref*field T , "\fI" "" "\fP"
.if r [T .nr ref*suppress-period \\n([T
..
.de ref*add-T2
.ref*field T , "\\*Q" "" "\\*U"
.if r [T .nr ref*suppress-period \\n([T
..
.de ref*add-P
.ie \\n([P>0 .ref*field P , "pp. "
.el .ref*field P , "p. "
..
.de ref*add-J
.ref*field J , \fI "" \fP
..
.de ref*add-D
.ref*field D "" ( )
..
.de ref*add-E
.ref*field E , "ed. "
..
.de ref*add-G
.ref*field G "" ( )
..
.de ref*add-B
.ref*field B "" "in \fI" "" \fP
..
.de ref*add-O
.ref*field O .
.ie r [O .nr ref*suppress-period \\n([O
.el .nr ref*suppress-period 1
..
.de ref*add-A
.ref*field A ,
.if r [A .nr ref*suppress-period \\n([A
..
.de ref*add-dflt
.ref*field \\$1 ,
..
.\" First argument is the field letter.
.\" Second argument is the punctuation character to use to separate this field
.\" from the previous field.
.\" Third argument is a string with which to prefix this field.
.\" Fourth argument is a string with which to postfix this field.
.\" Fifth argument is a string to add after the punctuation character supplied
.\" by the next field.
.de ref*field
.if d ref*string \{\
. ie d ref*post-punct \{\
. as ref*string "\\$2\\*[ref*post-punct] \"
. rm ref*post-punct
. \}
. el .as ref*string "\\$2 \"
.\}
.as ref*string "\\$3\\*([\\$1\\$4
.if \\n[.$]>4 .ds ref*post-punct "\\$5
.nr ref*suppress-period 0
..
.\" ****************************
.\" ******** module acc ********
.\" ****************************
.\" Accents and special characters.
.ds Q \(lq
.ds U \(rq
.ds - \(em
.\" Characters
.\" The idea of this definition is for the top of the 3 to be at the x-height.
.if !c\[yogh] .char \[yogh] \Z'\v'\w'x'*0-\En[rst]u'\s[\En[.s]*8u/10u]\
\v'\w'3'*0+\En[rst]u'3\s0'\h'\w'\s[\En[.s]*8u/10u]3'u'
.\" Accents
.de acc*over-def
.ds \\$1 \Z'\v'(u;\w'x'*0+\En[rst]-\En[.cht])'\
\h'(u;-\En[skw]+(-\En[.w]-\w'\\$2'/2)+\En[.csk])'\\$2'
..
.de acc*under-def
.ds \\$1 \Z'\v'\En[.cdp]u'\h'(u;-\En[.w]-\w'\\$2'/2)'\\$2'
..
.de acc*slash-def
.ds \\$1 \Z'\h'(u;-\En[.w]-\w'\\$2'/2)'\
\v'(u;\En[.cdp]-\En[.cht]+\En[rst]+\En[rsb]/2)'\\$2'
..
.de acc*prefix-def
.ds \\$1 \Z'\h'(u;\w'x'-\w'\\$2'/2)'\\$2'
..
.acc*prefix-def ' \'
.acc*prefix-def ` \`
.acc*prefix-def ^ ^
.acc*prefix-def , \(ac
.acc*prefix-def : \(ad
.acc*prefix-def ~ ~
.\" improved accent marks
.de AM
.acc*over-def ' \'
.acc*over-def ` \`
.acc*over-def ^ ^
.acc*over-def ~ ~
.acc*over-def : \(ad
.acc*over-def v \(ah
.acc*over-def _ \(a-
.acc*over-def o \(ao
.acc*under-def , \(ac
.acc*under-def . \s[\En[.s]*8u/10u]\v'.2m'.\v'-.2m'\s0
.acc*under-def hook \(ho
.acc*slash-def / /
.char \[hooko] o\\\\*[hook]
.ds q \[hooko]
.ds 3 \[yogh]
.ds D- \(-D\" Icelandic uppercase eth
.ds d- \(Sd\" Icelandic lowercase eth
.ds Th \(TP\" Icelandic uppercase thorn
.ds th \(Tp\" Icelandic lowercase thorn
.ds 8 \(ss\" German double s
.ds Ae \(AE\" AE ligature
.ds ae \(ae\" ae ligature
.ds Oe \(OE\" OE ligature
.ds oe \(oe\" oe ligature
.ds ? \(r?\" upside down ?
.ds ! \(r!\" upside down !
..
.de CHECK-FOOTER-AND-KEEP
.\" it might be better to als FS -> B1 and FE -> B2
.\" however this produced wierd results, so I've moved back to a more reliable
.\" but less interesting solution --fixme--
. if '\*(.T'html' \{\
. rm KF
. als KF KS
. rm FS
. de FS
. br
. HTML-IMAGE
\\..
. rm FE
. de FE
. br
. HTML-IMAGE-END
\\..
. \}
. if r ps4html \{\
. rm FS
. de FS
. br
. HTML-IMAGE
\\..
. rm FE
. de FE
. br
. HTML-IMAGE-END
\\..
. \}
..
.par@load-init
.if '\*(.T'html' \{\
. rm @IP
. als @IP @IP-html
.\}
.\" Make sure that no blank lines creep in at the end of this file.
1.18.1.4/tmac/cp1047.tmac 0000666 00000005353 15047753021 0010162 0 ustar 00 .\" cp1047.tmac
.\"
.nr _C \n(.C
.cp 0
.de cp1047-tr
. if c\\$2 .if !c\\$1 .trin \\$1\\$2
..
.
.cp1047-tr \[char66] \[^a]
.cp1047-tr \[char67] \[:a]
.cp1047-tr \[char68] \[`a]
.cp1047-tr \[char69] \['a]
.cp1047-tr \[char70] \[~a]
.cp1047-tr \[char71] \[oa]
.cp1047-tr \[char72] \[,c]
.cp1047-tr \[char73] \[~n]
.cp1047-tr \[char74] \[ct]
.cp1047-tr \[char81] \['e]
.cp1047-tr \[char82] \[^e]
.cp1047-tr \[char83] \[:e]
.cp1047-tr \[char84] \[`e]
.cp1047-tr \[char85] \['i]
.cp1047-tr \[char86] \[^i]
.cp1047-tr \[char87] \[:i]
.cp1047-tr \[char88] \[`i]
.cp1047-tr \[char89] \[ss]
.cp1047-tr \[char98] \[^A]
.cp1047-tr \[char99] \[:A]
.cp1047-tr \[char100] \[`A]
.cp1047-tr \[char101] \['A]
.cp1047-tr \[char102] \[~A]
.cp1047-tr \[char103] \[oA]
.cp1047-tr \[char104] \[,C]
.cp1047-tr \[char105] \[~N]
.cp1047-tr \[char106] \[bb]
.cp1047-tr \[char112] \[/o]
.cp1047-tr \[char113] \['E]
.cp1047-tr \[char114] \[^E]
.cp1047-tr \[char115] \[:E]
.cp1047-tr \[char116] \[`E]
.cp1047-tr \[char117] \['I]
.cp1047-tr \[char118] \[^I]
.cp1047-tr \[char119] \[:I]
.cp1047-tr \[char120] \[`I]
.cp1047-tr \[char128] \[/O]
.cp1047-tr \[char138] \[Fo]
.cp1047-tr \[char139] \[Fc]
.cp1047-tr \[char140] \[Sd]
.cp1047-tr \[char141] \['y]
.cp1047-tr \[char142] \[Tp]
.cp1047-tr \[char143] \[t+-]
.cp1047-tr \[char144] \[de]
.cp1047-tr \[char154] \[Of]
.cp1047-tr \[char155] \[Om]
.cp1047-tr \[char156] \[ae]
.cp1047-tr \[char157] \[ac]
.cp1047-tr \[char158] \[AE]
.cp1047-tr \[char159] \[Cs]
.cp1047-tr \[char160] \[mc]
.cp1047-tr \[char170] \[r!]
.cp1047-tr \[char171] \[r?]
.cp1047-tr \[char172] \[-D]
.cp1047-tr \[char174] \[TP]
.cp1047-tr \[char175] \[rg]
.cp1047-tr \[char176] \[no]
.cp1047-tr \[char177] \[Po]
.cp1047-tr \[char178] \[Ye]
.cp1047-tr \[char179] \[pc]
.cp1047-tr \[char180] \[co]
.cp1047-tr \[char181] \[sc]
.cp1047-tr \[char182] \[ps]
.cp1047-tr \[char183] \[14]
.cp1047-tr \[char184] \[12]
.cp1047-tr \[char185] \[34]
.cp1047-tr \[char186] \['Y]
.cp1047-tr \[char187] \[ad]
.cp1047-tr \[char188] \[a-]
.cp1047-tr \[char190] \[aa]
.cp1047-tr \[char191] \[tmu]
.\" The soft-hyphen character is only an input character
.tr \[char202]\%
.cp1047-tr \[char203] \[^o]
.cp1047-tr \[char204] \[:o]
.cp1047-tr \[char205] \[`o]
.cp1047-tr \[char206] \['o]
.cp1047-tr \[char207] \[~o]
.cp1047-tr \[char218] \[S1]
.cp1047-tr \[char219] \[^u]
.cp1047-tr \[char220] \[:u]
.cp1047-tr \[char221] \[`u]
.cp1047-tr \[char222] \['u]
.cp1047-tr \[char223] \[:y]
.cp1047-tr \[char225] \[tdi]
.cp1047-tr \[char234] \[S2]
.cp1047-tr \[char235] \[^O]
.cp1047-tr \[char236] \[:O]
.cp1047-tr \[char237] \[`O]
.cp1047-tr \[char238] \['O]
.cp1047-tr \[char239] \[~O]
.cp1047-tr \[char250] \[S3]
.cp1047-tr \[char251] \[^U]
.cp1047-tr \[char252] \[:U]
.cp1047-tr \[char253] \[`U]
.cp1047-tr \[char254] \['U]
.cp \n(_C
1.18.1.4/tmac/a4.tmac 0000666 00000000503 15047753021 0007540 0 ustar 00 .\" a4.tmac
.\"
.\" Set up groff for A4 paper. Must be called before any other macro
.\" package. For correct PS output, you must also set the
.\" `paperlength' keyword in devps/DESC to 841890 in case groff hasn't
.\" guessed it correctly during configuration.
.
.pl 29.7c
.ll 21c-2i
.
.\" for ms
.if !rLL .nr LL \n[.l]u
1.18.1.4/tmac/psold.tmac 0000666 00000003416 15047753021 0010363 0 ustar 00 .\" psold.tmac
.\"
.\" In newer PostScript printers, text fonts contain all ISO Latin-1
.\" characters. The font description files that comes with groff match
.\" these fonts. The text fonts in older PostScript printers are missing
.\" some of these characters. This file prevents those characters from
.\" being used. This will allow the PostScript output to be printed on
.\" such old printers.
.nr _C \n(.C
.cp 0
.\" Define an accented character.
.de ps-achar
.\" Note that character definitions are always interpreted with
.\" compatibility mode off.
.char \\$1 \\$3\
\k[acc]\
\h'(u;-\w'\\$2'-\w'\\$3'/2+\\\\n[skw]+(\w'x'*0)-\\\\n[skw])'\
\v'(u;\w'x'*0+\\\\n[rst]+(\w'\\$3'*0)-\\\\n[rst])'\
\\$2\
\v'(u;\w'x'*0-\\\\n[rst]+(\w'\\$3'*0)+\\\\n[rst])'\
\h'|\\\\n[acc]u'
.ie '\\$3'\(.i' .hcode \\$1i
.el .hcode \\$1\\$3
..
.ps-achar \['y] \(aa y
.ps-achar \['Y] \(aa Y
.char \[12] \v'-.7m\s[\\n(.s*6u/10u]+.7m'1\v'-.7m\s0+.7m'\
\(f/\s[\\n(.s*6u/10u]2\s0
.char \[14] \v'-.7m\s[\\n(.s*6u/10u]+.7m'1\v'-.7m\s0+.7m'\
\(f/\s[\\n(.s*6u/10u]4\s0
.char \[34] \v'-.7m\s[\\n(.s*6u/10u]+.7m'3\v'-.7m\s0+.7m'\
\(f/\s[\\n(.s*6u/10u]4\s0
.char \[S1] \v'-.2m'\s-31\s+3\v'+.2m'
.char \[S2] \v'-.2m'\s-32\s+3\v'+.2m'
.char \[S3] \v'-.2m'\s-33\s+3\v'+.2m'
.char \[bb] |
.char \[de] \fS\(de
.char \[-D] \Z'\v'-.1m'-'D
.char \[TP] \
I\h'-.25m'\v'-.33m'\s'\En(.s*6u/10u'\v'.33m'D\v'-.33m'\s0\v'.33m'
.char \[Sd] \Z'\v'-.3m'\h'.2m'-'\(pd
.char \[Tp] \zlp
.tr \[char166]\[bb]
.tr \[char176]\[de]
.tr \[char177]\[+-]
.tr \[char178]\[S2]
.tr \[char179]\[S3]
.tr \[char181]\[mc]
.tr \[char185]\[S1]
.tr \[char188]\[14]
.tr \[char189]\[12]
.tr \[char190]\[34]
.tr \[char208]\[-D]
.tr \[char215]\[mu]
.tr \[char221]\['Y]
.tr \[char222]\[TP]
.tr \[char240]\[Sd]
.tr \[char247]\[di]
.tr \[char253]\['y]
.tr \[char254]\[Tp]
.cp \n(_C
1.18.1.4/tmac/mdoc.tmac 0000666 00000000043 15047753021 0010155 0 ustar 00 .\" mdoc.tmac
.\"
.do mso doc.tmac
1.18.1.4/tmac/mm/ms.cov 0000666 00000002447 15047753021 0010140 0 ustar 00 .\"------------
.\" $Id: ms.cov,v 2.0 2000/09/14 03:40:25 jhaegg Exp $
.\" Cover sheet. Mostly like ms cover.
.\"------------
.de cov@print-title
.in 0
.misc@ev-keep cov*ev
.init@reset
.ad c
.hy 0
.fi
.B
.cov*title
.br
.ad b
.R
.ev
..
.\"------------
.de cov@print-authors
.SP
.nr cov*i 0 1
.while \\n+[cov*i]<=\\n[cov*au] \{\
. ce
\fI\\*[cov*au!\\n[cov*i]!1]\fP
. nr cov*j 0 1
. while \\n+[cov*j]<=9 \{\
. if d cov*at!\\n[cov*i]!\\n[cov*j] \{\
. if \w'\\*[cov*at!\\n[cov*i]!\\n[cov*j]]' \{\
. ce
\s-1\\*[cov*at!\\n[cov*i]!\\n[cov*j]]\s0
. .\}
. \}
. \}
.\}
..
.\"------------
.de cov@print-firm
.SP .5
.ce
\\*[cov*firm]
..
.\"------------
.de cov@print-abstract
.SP 2
.if d cov*abstract \{\
. misc@ev-keep cov*ev
. init@reset
. if \\n[cov*abs-ind]>0 \{\
. in +\\n[cov*abs-ind]u
. ll -\\n[cov*abs-ind]u
. \}
. ce
\fI\\$1\fP
. SP 1.5
. fi
. cov*abstract
. br
. ev
.\}
..
.\"------------
.de cov@print-date
.SP 2
\f[\\*[@sdf_font]]\\*[cov*new-date]\fP
..
.\"-----------------
.de COVEND
.br
.if d cov*default-firm .if !d cov*firm .ds cov*firm \\*[cov*default-firm]
.sp |4.2c
.cov@print-title
.cov@print-authors
.cov@print-firm
.cov@print-abstract \\*[cov*abs-name]
.cov@print-date
.pg@enable-top-trap
.bp 1
.pg@enable-trap
.if d cov*abs-arg .if \\n[cov*abs-arg] \{\
. cov@print-abstract ABSTRACT
. SP 2
.\}
..
1.18.1.4/tmac/mm/5.MT 0000666 00000001127 15047753021 0007410 0 ustar 00 .\"------------
.\" $Id: 5.MT,v 2.0 2000/09/14 03:40:25 jhaegg Exp $
.\" Cover sheet. Memorandum type 5
.\"------------
.nr cov*mt0-ind 1.1c
.de cov@print-title
.B
.ll 9c
.fi
.cov*title
.R
.ll
.nf
.if d cov*title-charge-case \fBCharge Case \\*[cov*title-charge-case]\fP
.if d cov*title-file-case \fBFile Case \\*[cov*title-file-case]\fP
.fi
..
.\"------------
.de cov@print-date
.rj 1
\f[\\*[@sdf_font]]\\*[cov*new-date]\fP
.br
..
.\"------------
.if !d cov*mt-printed \{\
. SP 1.9c
. cov@print-title
. SP 1.2c
. cov@print-date
. SP 3
. pg@enable-top-trap
. pg@enable-trap
. ds cov*mt-printed
.\}
1.18.1.4/tmac/mm/0.MT 0000666 00000004631 15047753021 0007406 0 ustar 00 .\"------------
.\" $Id: 0.MT,v 2.0 2000/09/14 03:40:25 jhaegg Exp $
.\" Cover sheet. Memorandum type 0-3 and "string".
.\"------------
.if !r Au .nr Au 1
.nr cov*mt0-ind 1.1c
.de cov@print-title
.MOVE 4.8c 1.5c
.S 8
subject:
.sp -1.1
.S
.PGFORM
.ft \\*[@sdf_font]
.ll 9c
.fi
.cov*title
.ft
.ll
.nf
.if d cov*title-charge-case \fBCharge Case \\*[cov*title-charge-case]\fP
.if d cov*title-file-case \fBFile Case \\*[cov*title-file-case]\fP
.fi
..
.\"------------
.de cov@print-authors
.MOVE 5.7c 13.3c
.nf
.S 8
\\$1:
.br
.S
.sp -1
.in 0.8c
.ft \\*[@sdf_font]
.nr cov*i 0 1
.while \\n+[cov*i]<=\\n[cov*au] \{\
. cov@print-au1 \\n[cov*i] 1
. if \\n[Au] \{\
. cov@print-au2 \\n[cov*i] 3 4
. cov@print-au2 \\n[cov*i] 6 5
. cov@print-au1 \\n[cov*i] 7
. cov@print-au1 \\n[cov*i] 8
. cov@print-au1 \\n[cov*i] 9
. \}
. if \\n[cov*i]<\\n[cov*au] .SP 1
.\}
.ft
.if r cov*mt-tm-max \{\
. SP 1
. nr cov*i 0 1
. ft \\*[@sdf_font]
TM
. in 1.5c
. sp -1
. while \\n+[cov*i]<\\n[cov*mt-tm-max] \\*[cov*mt-tm!\\n[cov*i]]
. in
. ft
.\}
.fi
.PGFORM
..
.\"------------
.\" index arg1
.de cov@print-au1
.if d cov*au!\\$1!\\$2 \\*[cov*au!\\$1!\\$2]
..
.\"------------
.de cov@print-au2
.\" index arg1 arg2
.if d cov*au!\\$1!\\$2 \\*[cov*au!\\$1!\\$2] \c
.if \\$3=5 .if d cov*au!\\$1!\\$3 x\c
.if d cov*au!\\$1!\\$3 \\*[cov*au!\\$1!\\$3]\c
.br
..
.\"------------
.de cov@print-date
.MOVE 4.8c 13.3c
.S 8
.nf
\\$1:
.br
.S
.sp -1
.in 0.8c
\f[\\*[@sdf_font]]\\*[cov*new-date]\fP
.br
.fi
.PGFORM
..
.\"------------
.de cov@print-firm
.if d cov*firm \{\
. MOVE 2.8c 0 17.7c
. S 18
. rj 1
\fB\\*[cov*firm]\fP
. S
. PGFORM
.\}
..
.\"------------
.de cov@print-abstract
.SP 3
.if d cov*abstract \{\
. misc@ev-keep cov*ev
. if \\n[cov*abs-ind]>0 \{\
. in +\\n[cov*abs-ind]u
. ll -\\n[cov*abs-ind]u
. \}
. ce
\fI\\$1\fP
. SP 1.5
. fi
. cov*abstract
. br
. ev
.\}
..
.\"-----------------
.ds cov*mt0-txt!1 MEMORANDUM FOR FILE
.ds cov*mt0-txt!2 PROGRAMMER'S NOTES
.ds cov*mt0-txt!3 ENGINEER'S NOTES
.if d cov*default-firm .if !d cov*firm .ds cov*firm \\*[cov*default-firm]
.\"
.if !d cov*mt-printed \{\
. cov@print-firm
. cov@print-title subject
. cov@print-date date
. cov@print-authors from
. cov@print-abstract \\*[cov*abs-name]
. SP 3
. if (\*[cov*mt-type]>=1)&(\*[cov*mt-type]<=3) \{\
. ce
\fI\*[cov*mt0-txt!\*[cov*mt-type]]\fP
. SP 1.5
. \}
. if \*[cov*mt-type]=6 \{\
. ce
\fI\*[cov*mt-type-text]\fP
. SP 1.5
. \}
. pg@enable-top-trap
. pg@enable-trap
. ds cov*mt-printed
.\}
1.18.1.4/tmac/mm/se_locale 0000666 00000000000 15047753021 0010640 0 ustar 00 1.18.1.4/tmac/mm/locale 0000666 00000000000 15047753021 0010151 0 ustar 00 1.18.1.4/tmac/mm/se_ms.cov 0000666 00000000141 15047753021 0010614 0 ustar 00 .\" $Id: se_ms.cov,v 2.0 2000/09/14 03:40:25 jhaegg Exp $
.mso mm/ms.cov
.nr cur*abstract-ll 11c
1.18.1.4/tmac/mm/4.MT 0000666 00000002315 15047753021 0007407 0 ustar 00 .\"------------
.\" $Id: 4.MT,v 2.0 2000/09/14 03:40:25 jhaegg Exp $
.\" Cover sheet. Memorandum type 4
.\"------------
.de cov@print-title
.if !d cov*title .@error title (.TL) not defined!
.MOVE 2.4c
.S +4
.ad c
.fi
.B
.cov*title
.br
.S
.R
.ad b
.PGFORM
..
.\"------------
.de cov@print-authors
.SP 0.5
.I
.nr cov*i 0 1
.while \\n+[cov*i]<=\\n[cov*au] \{\
.ce
\\*[cov*au!\\n[cov*i]!1]
.br
.\}
.R
.PGFORM
..
.\"------------
.de cov@print-firm
.if !d cov*firm .@error firm (.AF) not defined!
.SP 0.5
.ce
\\*[cov*firm]
..
.\"------------
.de cov@print-abstract
.SP 2
.if d cov*abstract \{\
. misc@ev-keep cov*ev
. init@reset
. if \\n[cov*abs-ind]>0 \{\
. in +\\n[cov*abs-ind]u
. ll -\\n[cov*abs-ind]u
. \}
. ce
\fI\\*[cov*abs-name]\fP
. SP 2
. fi
. cov*abstract
. br
. ev
.\}
..
.\"-----------------
.if d cov*default-firm .if !d cov*firm .ds cov*firm \\*[cov*default-firm]
.if !d cov*mt-printed \{\
. cov@print-title
. cov@print-authors
. cov@print-firm
. if d cov*abstract \{\
. if !\n[cov*abs-arg] .cov@print-abstract
. \}
. SP 3
. nr hd*cur-bline \n[nl]
. ds cov*mt-printed
. pg@enable-top-trap
. pg@enable-trap
.\}
.de CS
.pg@disable-top-trap
.SK
.cov@print-title
.cov@print-authors
.cov@print-firm
.cov@print-abstract
..
1.18.1.4/tmac/euc-jp.tmac 0000666 00000000250 15047753021 0010416 0 ustar 00 .\" euc-jp.tmac
.\"
.cflags 256 ,:;>}
.cflags 256 ¡¢¡£¡¤¡¥¡¦¡§¡¨¡©¡ª¡Ë¡Í¡Ï¡Ñ¡×¡Ù¡Û¤¡¤£¤¥¤§¤©¤Ã¤ã¤å¤ç¡¼
.cflags 256 ¥¡¥£¥¥¥§¥©¥Ã¥ã¥å¥ç
.cflags 512 ¡Ê¡Ì¡Î¡Ð¡Ö¡Ø¡Ú
.hc ¡¾
1.18.1.4/tmac/troffrc 0000666 00000002301 15047753021 0007754 0 ustar 00 .\" Startup file for troff.
.
.\" This is tested by pic.
.nr 0p 0
.
.\" Use .do here, so that it works with -C.
.\" The groff command defines the .X string if the -X option was given.
.ie r.X .do ds troffrc!ps Xps.tmac
.el .do ds troffrc!ps ps.tmac
.do ds troffrc!dvi dvi.tmac
.do ds troffrc!X75 X.tmac
.do ds troffrc!X75-12 X.tmac
.do ds troffrc!X100 X.tmac
.do ds troffrc!X100-12 X.tmac
.do ds troffrc!ascii tty.tmac
.do ds troffrc!ascii8 tty.tmac
.do ds troffrc!latin1 tty.tmac
.do ds troffrc!nippon tty.tmac
.do ds troffrc!utf8 tty.tmac
.do ds troffrc!cp1047 tty.tmac
.do ds troffrc!lj4 lj4.tmac
.do ds troffrc!lbp lbp.tmac
.do ds troffrc!html www.tmac
.do if d troffrc!\*[.T] \
. do mso \*[troffrc!\*[.T]]
.do rm troffrc!ps troffrc!Xps troffrc!dvi troffrc!X75 troffrc!X75-12 \
troffrc!X100 troffrc!X100-12 troffrc!lj4 troff!lbp troffrc!html
.
.\" test whether we work under EBCDIC
.do ie '\[char97]'a' \
. do tr \[char160]\~
.el \
. do tr \[char65]\~
.
.\" Set the hyphenation language to `us'.
.do hla us
.
.\" Load hyphenation patterns from `hyphen.us' (in the tmac directory).
.do hpf hyphen.us
.
.\" for Japanese hack
.if "\V[LANG]"ja_JP.eucJP" .do mso euc-jp.tmac
.
.\" Don't let blank lines creep in here.
1.18.1.4/tmac/ps.tmac 0000666 00000044667 15047753021 0007701 0 ustar 00 .\" ps.tmac
.\"
.nr _C \n(.C
.cp 0
.
.ftr AX ABI
.ftr KR BMR
.ftr KI BMI
.ftr KB BMB
.ftr KX BMBI
.ftr CW CR
.ftr CO CI
.ftr CX CBI
.ftr H HR
.ftr HO HI
.ftr HX HBI
.ftr Hr HNR
.ftr Hi HNI
.ftr Hb HNB
.ftr Hx HNBI
.ftr NX NBI
.ftr PA PR
.ftr PX PBI
.ftr ZI ZCMI
.ftr C CR
.
.cflags 8 \[an]
.char \[radicalex] \h'-\w'\[sr]'u'\[radicalex]\h'\w'\[sr]'u'
.char \[mo] \h'.08m'\[mo]\h'-.08m'
.char \[nm] \h'.08m'\[nm]\h'-.08m'
.char \[parenlefttp] \[parenlefttp]\h'.016m'
.char \[parenleftbt] \[parenleftbt]\h'.016m'
.char \[parenleftex] \[parenleftex]\h'.016m'
.char \[parenrighttp] \[parenrighttp]\h'.016m'
.char \[parenrightbt] \[parenrightbt]\h'.016m'
.char \[parenrightex] \[parenrightex]\h'.016m'
.
.fchar \[va] \o'\[ua]\[da]'
.fchar \[ci] \v'-.25m'\h'.05m'\D'c .5m'\h'.05m'\v'.25m'
.fchar \[sq] \h'.05m'\D'l .5m 0'\D'l 0 -.5m'\D'l -.5m 0'\D'l 0 .5m'\h'.55m'
.fchar \[ru] \D'l .5m 0'
.fchar \[ul] \v'.25m'\D'l .5m 0'\v'-.25m'
.fchar \[br] \Z'\v'.25m'\D'l 0 -1m''
.fchar \[rn] \v'-.75m'\D'l .5m 0'\v'.75m'
.fchar \[or] \h'.1m'\Z'\D'l 0 -.675m''\h'.1m'
.fchar \[Fi] ffi
.fchar \[Fl] ffl
.fchar \[ff] ff
.fchar \[ij] ij
.fchar \[IJ] IJ
.fchar \[tm] \s-3\v'-.3m'TM\v'+.3m'\s+3
.
.\" pic tests this register to see whether it should use \X'ps:...'
.nr 0p 1
.
.\" now for color definitions
.\"
.\" this is a composite of MIT's X Consortium red/green/blue (rgb) color
.\" specifications, X Consortium version 10.41, 1994.
.defcolor black rgb #000000
.defcolor grey rgb #bebebe
.defcolor dimgrey rgb #696969
.defcolor lightgray rgb #d3d3d3
.defcolor lightslategrey rgb #778899
.defcolor slategray rgb #708090
.defcolor slategray1 rgb #c6e2ff
.defcolor slategray2 rgb #b9d3ee
.defcolor slategray3 rgb #9fb6cd
.defcolor slategray4 rgb #6c7b8b
.defcolor slategrey rgb #708090
.defcolor grey0 rgb #000000
.defcolor grey1 rgb #030303
.defcolor grey2 rgb #050505
.defcolor grey3 rgb #080808
.defcolor grey4 rgb #0a0a0a
.defcolor grey5 rgb #0d0d0d
.defcolor grey6 rgb #0f0f0f
.defcolor grey7 rgb #121212
.defcolor grey8 rgb #141414
.defcolor grey9 rgb #171717
.defcolor grey10 rgb #1a1a1a
.defcolor grey11 rgb #1c1c1c
.defcolor grey12 rgb #1f1f1f
.defcolor grey13 rgb #212121
.defcolor grey14 rgb #242424
.defcolor grey15 rgb #262626
.defcolor grey16 rgb #292929
.defcolor grey17 rgb #2b2b2b
.defcolor grey18 rgb #2e2e2e
.defcolor grey19 rgb #303030
.defcolor grey20 rgb #333333
.defcolor grey21 rgb #363636
.defcolor grey22 rgb #383838
.defcolor grey23 rgb #3b3b3b
.defcolor grey24 rgb #3d3d3d
.defcolor grey25 rgb #404040
.defcolor grey26 rgb #424242
.defcolor grey27 rgb #454545
.defcolor grey28 rgb #474747
.defcolor grey29 rgb #4a4a4a
.defcolor grey30 rgb #4d4d4d
.defcolor grey31 rgb #4f4f4f
.defcolor grey32 rgb #525252
.defcolor grey33 rgb #545454
.defcolor grey34 rgb #575757
.defcolor grey35 rgb #595959
.defcolor grey36 rgb #5c5c5c
.defcolor grey37 rgb #5e5e5e
.defcolor grey38 rgb #616161
.defcolor grey39 rgb #636363
.defcolor grey40 rgb #666666
.defcolor grey41 rgb #696969
.defcolor grey42 rgb #6b6b6b
.defcolor grey43 rgb #6e6e6e
.defcolor grey44 rgb #707070
.defcolor grey45 rgb #737373
.defcolor grey46 rgb #757575
.defcolor grey47 rgb #787878
.defcolor grey48 rgb #7a7a7a
.defcolor grey49 rgb #7d7d7d
.defcolor grey50 rgb #7f7f7f
.defcolor grey51 rgb #828282
.defcolor grey52 rgb #858585
.defcolor grey53 rgb #878787
.defcolor grey54 rgb #8a8a8a
.defcolor grey55 rgb #8c8c8c
.defcolor grey56 rgb #8f8f8f
.defcolor grey57 rgb #919191
.defcolor grey58 rgb #949494
.defcolor grey59 rgb #969696
.defcolor grey60 rgb #999999
.defcolor grey61 rgb #9c9c9c
.defcolor grey62 rgb #9e9e9e
.defcolor grey63 rgb #a1a1a1
.defcolor grey64 rgb #a3a3a3
.defcolor grey65 rgb #a6a6a6
.defcolor grey66 rgb #a8a8a8
.defcolor grey67 rgb #ababab
.defcolor grey68 rgb #adadad
.defcolor grey69 rgb #b0b0b0
.defcolor grey70 rgb #b3b3b3
.defcolor grey71 rgb #b5b5b5
.defcolor grey72 rgb #b8b8b8
.defcolor grey73 rgb #bababa
.defcolor grey74 rgb #bdbdbd
.defcolor grey75 rgb #bfbfbf
.defcolor grey76 rgb #c2c2c2
.defcolor grey77 rgb #c4c4c4
.defcolor grey78 rgb #c7c7c7
.defcolor grey79 rgb #c9c9c9
.defcolor grey80 rgb #cccccc
.defcolor grey81 rgb #cfcfcf
.defcolor grey82 rgb #d1d1d1
.defcolor grey83 rgb #d4d4d4
.defcolor grey84 rgb #d6d6d6
.defcolor grey85 rgb #d9d9d9
.defcolor grey86 rgb #dbdbdb
.defcolor grey87 rgb #dedede
.defcolor grey88 rgb #e0e0e0
.defcolor grey89 rgb #e3e3e3
.defcolor grey90 rgb #e5e5e5
.defcolor grey91 rgb #e8e8e8
.defcolor grey92 rgb #ebebeb
.defcolor grey93 rgb #ededed
.defcolor grey94 rgb #f0f0f0
.defcolor grey95 rgb #f2f2f2
.defcolor grey96 rgb #f5f5f5
.defcolor grey97 rgb #f7f7f7
.defcolor grey98 rgb #fafafa
.defcolor grey99 rgb #fcfcfc
.defcolor grey100 rgb #ffffff
.defcolor aliceblue rgb #f0f8ff
.defcolor blueviolet rgb #8a2be2
.defcolor cadetblue rgb #5f9ea0
.defcolor cadetblue1 rgb #98f5ff
.defcolor cadetblue2 rgb #8ee5ee
.defcolor cadetblue3 rgb #7ac5cd
.defcolor cadetblue4 rgb #53868b
.defcolor cornflowerblue rgb #6495ed
.defcolor darkslateblue rgb #483d8b
.defcolor darkturquoise rgb #00ced1
.defcolor deepskyblue rgb #00bfff
.defcolor deepskyblue1 rgb #00bfff
.defcolor deepskyblue2 rgb #00b2ee
.defcolor deepskyblue3 rgb #009acd
.defcolor deepskyblue4 rgb #00688b
.defcolor dodgerblue rgb #1e90ff
.defcolor dodgerblue1 rgb #1e90ff
.defcolor dodgerblue2 rgb #1c86ee
.defcolor dodgerblue3 rgb #1874cd
.defcolor dodgerblue4 rgb #104e8b
.defcolor lightblue rgb #add8e6
.defcolor lightblue1 rgb #bfefff
.defcolor lightblue2 rgb #b2dfee
.defcolor lightblue3 rgb #9ac0cd
.defcolor lightblue4 rgb #68838b
.defcolor lightcyan rgb #e0ffff
.defcolor lightcyan1 rgb #e0ffff
.defcolor lightcyan2 rgb #d1eeee
.defcolor lightcyan3 rgb #b4cdcd
.defcolor lightcyan4 rgb #7a8b8b
.defcolor lightskyblue rgb #87cefa
.defcolor lightskyblue1 rgb #b0e2ff
.defcolor lightskyblue2 rgb #a4d3ee
.defcolor lightskyblue3 rgb #8db6cd
.defcolor lightskyblue4 rgb #607b8b
.defcolor lightslateblue rgb #8470ff
.defcolor lightsteelblue rgb #b0c4de
.defcolor lightsteelblue1 rgb #cae1ff
.defcolor lightsteelblue2 rgb #bcd2ee
.defcolor lightsteelblue3 rgb #a2b5cd
.defcolor lightsteelblue4 rgb #6e7b8b
.defcolor mediumaquamarine rgb #66cdaa
.defcolor mediumblue rgb #0000cd
.defcolor mediumslateblue rgb #7b68ee
.defcolor mediumturquoise rgb #48d1cc
.defcolor midnightblue rgb #191970
.defcolor navyblue rgb #000080
.defcolor paleturquoise rgb #afeeee
.defcolor paleturquoise1 rgb #bbffff
.defcolor paleturquoise2 rgb #aeeeee
.defcolor paleturquoise3 rgb #96cdcd
.defcolor paleturquoise4 rgb #668b8b
.defcolor powderblue rgb #b0e0e6
.defcolor royalblue rgb #4169e1
.defcolor royalblue1 rgb #4876ff
.defcolor royalblue2 rgb #436eee
.defcolor royalblue3 rgb #3a5fcd
.defcolor royalblue4 rgb #27408b
.defcolor skyblue rgb #87ceeb
.defcolor skyblue1 rgb #87ceff
.defcolor skyblue2 rgb #7ec0ee
.defcolor skyblue3 rgb #6ca6cd
.defcolor skyblue4 rgb #4a708b
.defcolor slateblue rgb #6a5acd
.defcolor slateblue1 rgb #836fff
.defcolor slateblue2 rgb #7a67ee
.defcolor slateblue3 rgb #6959cd
.defcolor slateblue4 rgb #473c8b
.defcolor steelblue rgb #4682b4
.defcolor steelblue1 rgb #63b8ff
.defcolor steelblue2 rgb #5cacee
.defcolor steelblue3 rgb #4f94cd
.defcolor steelblue4 rgb #36648b
.defcolor aquamarine rgb #7fffd4
.defcolor aquamarine1 rgb #7fffd4
.defcolor aquamarine2 rgb #76eec6
.defcolor aquamarine3 rgb #66cdaa
.defcolor aquamarine4 rgb #458b74
.defcolor azure rgb #f0ffff
.defcolor azure1 rgb #f0ffff
.defcolor azure2 rgb #e0eeee
.defcolor azure3 rgb #c1cdcd
.defcolor azure4 rgb #838b8b
.defcolor blue rgb #0000ff
.defcolor blue1 rgb #0000ff
.defcolor blue2 rgb #0000ee
.defcolor blue3 rgb #0000cd
.defcolor blue4 rgb #00008b
.defcolor cyan rgb #00ffff
.defcolor cyan1 rgb #00ffff
.defcolor cyan2 rgb #00eeee
.defcolor cyan3 rgb #00cdcd
.defcolor cyan4 rgb #008b8b
.defcolor navy rgb #000080
.defcolor turquoise rgb #40e0d0
.defcolor turquoise1 rgb #00f5ff
.defcolor turquoise2 rgb #00e5ee
.defcolor turquoise3 rgb #00c5cd
.defcolor turquoise4 rgb #00868b
.defcolor darkslategray rgb #2f4f4f
.defcolor darkslategray1 rgb #97ffff
.defcolor darkslategray2 rgb #8deeee
.defcolor darkslategray3 rgb #79cdcd
.defcolor darkslategray4 rgb #528b8b
.defcolor rosybrown rgb #bc8f8f
.defcolor rosybrown1 rgb #ffc1c1
.defcolor rosybrown2 rgb #eeb4b4
.defcolor rosybrown3 rgb #cd9b9b
.defcolor rosybrown4 rgb #8b6969
.defcolor saddlebrown rgb #8b4513
.defcolor sandybrown rgb #f4a460
.defcolor beige rgb #f5f5dc
.defcolor brown rgb #a52a2a
.defcolor brown1 rgb #ff4040
.defcolor brown2 rgb #ee3b3b
.defcolor brown3 rgb #cd3333
.defcolor brown4 rgb #8b2323
.defcolor burlywood rgb #deb887
.defcolor burlywood1 rgb #ffd39b
.defcolor burlywood2 rgb #eec591
.defcolor burlywood3 rgb #cdaa7d
.defcolor burlywood4 rgb #8b7355
.defcolor chocolate rgb #d2691e
.defcolor chocolate1 rgb #ff7f24
.defcolor chocolate2 rgb #ee7621
.defcolor chocolate3 rgb #cd661d
.defcolor chocolate4 rgb #8b4513
.defcolor peru rgb #cd853f
.defcolor tan rgb #d2b48c
.defcolor tan1 rgb #ffa54f
.defcolor tan2 rgb #ee9a49
.defcolor tan3 rgb #cd853f
.defcolor tan4 rgb #8b5a2b
.defcolor darkgreen rgb #006400
.defcolor darkkhaki rgb #bdb76b
.defcolor darkolivegreen rgb #556b2f
.defcolor darkolivegreen1 rgb #caff70
.defcolor darkolivegreen2 rgb #bcee68
.defcolor darkolivegreen3 rgb #a2cd5a
.defcolor darkolivegreen4 rgb #6e8b3d
.defcolor darkseagreen rgb #8fbc8f
.defcolor darkseagreen1 rgb #c1ffc1
.defcolor darkseagreen2 rgb #b4eeb4
.defcolor darkseagreen3 rgb #9bcd9b
.defcolor darkseagreen4 rgb #698b69
.defcolor forestgreen rgb #228b22
.defcolor greenyellow rgb #adff2f
.defcolor lawngreen rgb #7cfc00
.defcolor lightseagreen rgb #20b2aa
.defcolor limegreen rgb #32cd32
.defcolor mediumseagreen rgb #3cb371
.defcolor mediumspringgreen rgb #00fa9a
.defcolor mintcream rgb #f5fffa
.defcolor olivedrab rgb #6b8e23
.defcolor olivedrab1 rgb #c0ff3e
.defcolor olivedrab2 rgb #b3ee3a
.defcolor olivedrab3 rgb #9acd32
.defcolor olivedrab4 rgb #698b22
.defcolor palegreen rgb #98fb98
.defcolor palegreen1 rgb #9aff9a
.defcolor palegreen2 rgb #90ee90
.defcolor palegreen3 rgb #7ccd7c
.defcolor palegreen4 rgb #548b54
.defcolor seagreen rgb #2e8b57
.defcolor seagreen1 rgb #54ff9f
.defcolor seagreen2 rgb #4eee94
.defcolor seagreen3 rgb #43cd80
.defcolor seagreen4 rgb #2e8b57
.defcolor springgreen rgb #00ff7f
.defcolor springgreen1 rgb #00ff7f
.defcolor springgreen2 rgb #00ee76
.defcolor springgreen3 rgb #00cd66
.defcolor springgreen4 rgb #008b45
.defcolor yellowgreen rgb #9acd32
.defcolor chartreuse rgb #7fff00
.defcolor chartreuse1 rgb #7fff00
.defcolor chartreuse2 rgb #76ee00
.defcolor chartreuse3 rgb #66cd00
.defcolor chartreuse4 rgb #458b00
.defcolor green rgb #00ff00
.defcolor green1 rgb #00ff00
.defcolor green2 rgb #00ee00
.defcolor green3 rgb #00cd00
.defcolor green4 rgb #008b00
.defcolor khaki rgb #f0e68c
.defcolor khaki1 rgb #fff68f
.defcolor khaki2 rgb #eee685
.defcolor khaki3 rgb #cdc673
.defcolor khaki4 rgb #8b864e
.defcolor darkorange rgb #ff8c00
.defcolor darkorange1 rgb #ff7f00
.defcolor darkorange2 rgb #ee7600
.defcolor darkorange3 rgb #cd6600
.defcolor darkorange4 rgb #8b4500
.defcolor darksalmon rgb #e9967a
.defcolor lightcoral rgb #f08080
.defcolor lightsalmon rgb #ffa07a
.defcolor lightsalmon1 rgb #ffa07a
.defcolor lightsalmon2 rgb #ee9572
.defcolor lightsalmon3 rgb #cd8162
.defcolor lightsalmon4 rgb #8b5742
.defcolor peachpuff rgb #ffdab9
.defcolor peachpuff1 rgb #ffdab9
.defcolor peachpuff2 rgb #eecbad
.defcolor peachpuff3 rgb #cdaf95
.defcolor peachpuff4 rgb #8b7765
.defcolor bisque rgb #ffe4c4
.defcolor bisque1 rgb #ffe4c4
.defcolor bisque2 rgb #eed5b7
.defcolor bisque3 rgb #cdb79e
.defcolor bisque4 rgb #8b7d6b
.defcolor coral rgb #ff7f50
.defcolor coral1 rgb #ff7256
.defcolor coral2 rgb #ee6a50
.defcolor coral3 rgb #cd5b45
.defcolor coral4 rgb #8b3e2f
.defcolor honeydew rgb #f0fff0
.defcolor honeydew1 rgb #f0fff0
.defcolor honeydew2 rgb #e0eee0
.defcolor honeydew3 rgb #c1cdc1
.defcolor honeydew4 rgb #838b83
.defcolor orange rgb #ffa500
.defcolor orange1 rgb #ffa500
.defcolor orange2 rgb #ee9a00
.defcolor orange3 rgb #cd8500
.defcolor orange4 rgb #8b5a00
.defcolor salmon rgb #fa8072
.defcolor salmon1 rgb #ff8c69
.defcolor salmon2 rgb #ee8262
.defcolor salmon3 rgb #cd7054
.defcolor salmon4 rgb #8b4c39
.defcolor sienna rgb #a0522d
.defcolor sienna1 rgb #ff8247
.defcolor sienna2 rgb #ee7942
.defcolor sienna3 rgb #cd6839
.defcolor sienna4 rgb #8b4726
.defcolor deeppink rgb #ff1493
.defcolor deeppink1 rgb #ff1493
.defcolor deeppink2 rgb #ee1289
.defcolor deeppink3 rgb #cd1076
.defcolor deeppink4 rgb #8b0a50
.defcolor hotpink rgb #ff69b4
.defcolor hotpink1 rgb #ff6eb4
.defcolor hotpink2 rgb #ee6aa7
.defcolor hotpink3 rgb #cd6090
.defcolor hotpink4 rgb #8b3a62
.defcolor indianred rgb #cd5c5c
.defcolor indianred1 rgb #ff6a6a
.defcolor indianred2 rgb #ee6363
.defcolor indianred3 rgb #cd5555
.defcolor indianred4 rgb #8b3a3a
.defcolor lightpink rgb #ffb6c1
.defcolor lightpink1 rgb #ffaeb9
.defcolor lightpink2 rgb #eea2ad
.defcolor lightpink3 rgb #cd8c95
.defcolor lightpink4 rgb #8b5f65
.defcolor mediumvioletred rgb #c71585
.defcolor mistyrose rgb #ffe4e1
.defcolor mistyrose1 rgb #ffe4e1
.defcolor mistyrose2 rgb #eed5d2
.defcolor mistyrose3 rgb #cdb7b5
.defcolor mistyrose4 rgb #8b7d7b
.defcolor orangered rgb #ff4500
.defcolor orangered1 rgb #ff4500
.defcolor orangered2 rgb #ee4000
.defcolor orangered3 rgb #cd3700
.defcolor orangered4 rgb #8b2500
.defcolor palevioletred rgb #db7093
.defcolor palevioletred1 rgb #ff82ab
.defcolor palevioletred2 rgb #ee799f
.defcolor palevioletred3 rgb #cd6889
.defcolor palevioletred4 rgb #8b475d
.defcolor violetred rgb #d02090
.defcolor violetred1 rgb #ff3e96
.defcolor violetred2 rgb #ee3a8c
.defcolor violetred3 rgb #cd3278
.defcolor violetred4 rgb #8b2252
.defcolor firebrick rgb #b22222
.defcolor firebrick1 rgb #ff3030
.defcolor firebrick2 rgb #ee2c2c
.defcolor firebrick3 rgb #cd2626
.defcolor firebrick4 rgb #8b1a1a
.defcolor pink rgb #ffc0cb
.defcolor pink1 rgb #ffb5c5
.defcolor pink2 rgb #eea9b8
.defcolor pink3 rgb #cd919e
.defcolor pink4 rgb #8b636c
.defcolor red rgb #ff0000
.defcolor red1 rgb #ff0000
.defcolor red2 rgb #ee0000
.defcolor red3 rgb #cd0000
.defcolor red4 rgb #8b0000
.defcolor tomato rgb #ff6347
.defcolor tomato1 rgb #ff6347
.defcolor tomato2 rgb #ee5c42
.defcolor tomato3 rgb #cd4f39
.defcolor tomato4 rgb #8b3626
.defcolor darkorchid rgb #9932cc
.defcolor darkorchid1 rgb #bf3eff
.defcolor darkorchid2 rgb #b23aee
.defcolor darkorchid3 rgb #9a32cd
.defcolor darkorchid4 rgb #68228b
.defcolor darkviolet rgb #9400d3
.defcolor lavenderblush rgb #fff0f5
.defcolor lavenderblush1 rgb #fff0f5
.defcolor lavenderblush2 rgb #eee0e5
.defcolor lavenderblush3 rgb #cdc1c5
.defcolor lavenderblush4 rgb #8b8386
.defcolor mediumorchid rgb #ba55d3
.defcolor mediumorchid1 rgb #e066ff
.defcolor mediumorchid2 rgb #d15fee
.defcolor mediumorchid3 rgb #b452cd
.defcolor mediumorchid4 rgb #7a378b
.defcolor mediumpurple rgb #9370db
.defcolor mediumpurple1 rgb #ab82ff
.defcolor mediumpurple2 rgb #9f79ee
.defcolor mediumpurple3 rgb #8968cd
.defcolor mediumpurple4 rgb #5d478b
.defcolor lavender rgb #e6e6fa
.defcolor magenta rgb #ff00ff
.defcolor magenta1 rgb #ff00ff
.defcolor magenta2 rgb #ee00ee
.defcolor magenta3 rgb #cd00cd
.defcolor magenta4 rgb #8b008b
.defcolor maroon rgb #b03060
.defcolor maroon1 rgb #ff34b3
.defcolor maroon2 rgb #ee30a7
.defcolor maroon3 rgb #cd2990
.defcolor maroon4 rgb #8b1c62
.defcolor orchid rgb #da70d6
.defcolor orchid1 rgb #ff83fa
.defcolor orchid2 rgb #ee7ae9
.defcolor orchid3 rgb #cd69c9
.defcolor orchid4 rgb #8b4789
.defcolor plum rgb #dda0dd
.defcolor plum1 rgb #ffbbff
.defcolor plum2 rgb #eeaeee
.defcolor plum3 rgb #cd96cd
.defcolor plum4 rgb #8b668b
.defcolor purple rgb #a020f0
.defcolor purple1 rgb #9b30ff
.defcolor purple2 rgb #912cee
.defcolor purple3 rgb #7d26cd
.defcolor purple4 rgb #551a8b
.defcolor thistle rgb #d8bfd8
.defcolor thistle1 rgb #ffe1ff
.defcolor thistle2 rgb #eed2ee
.defcolor thistle3 rgb #cdb5cd
.defcolor thistle4 rgb #8b7b8b
.defcolor violet rgb #ee82ee
.defcolor antiquewhite rgb #faebd7
.defcolor antiquewhite1 rgb #ffefdb
.defcolor antiquewhite2 rgb #eedfcc
.defcolor antiquewhite3 rgb #cdc0b0
.defcolor antiquewhite4 rgb #8b8378
.defcolor floralwhite rgb #fffaf0
.defcolor ghostwhite rgb #f8f8ff
.defcolor navajowhite rgb #ffdead
.defcolor navajowhite1 rgb #ffdead
.defcolor navajowhite2 rgb #eecfa1
.defcolor navajowhite3 rgb #cdb38b
.defcolor navajowhite4 rgb #8b795e
.defcolor oldlace rgb #fdf5e6
.defcolor whitesmoke rgb #f5f5f5
.defcolor gainsboro rgb #dcdcdc
.defcolor ivory rgb #fffff0
.defcolor ivory1 rgb #fffff0
.defcolor ivory2 rgb #eeeee0
.defcolor ivory3 rgb #cdcdc1
.defcolor ivory4 rgb #8b8b83
.defcolor linen rgb #faf0e6
.defcolor seashell rgb #fff5ee
.defcolor seashell1 rgb #fff5ee
.defcolor seashell2 rgb #eee5de
.defcolor seashell3 rgb #cdc5bf
.defcolor seashell4 rgb #8b8682
.defcolor snow rgb #fffafa
.defcolor snow1 rgb #fffafa
.defcolor snow2 rgb #eee9e9
.defcolor snow3 rgb #cdc9c9
.defcolor snow4 rgb #8b8989
.defcolor wheat rgb #f5deb3
.defcolor wheat1 rgb #ffe7ba
.defcolor wheat2 rgb #eed8ae
.defcolor wheat3 rgb #cdba96
.defcolor wheat4 rgb #8b7e66
.defcolor white rgb #ffffff
.defcolor blanchedalmond rgb #ffebcd
.defcolor darkgoldenrod rgb #b8860b
.defcolor darkgoldenrod1 rgb #ffb90f
.defcolor darkgoldenrod2 rgb #eead0e
.defcolor darkgoldenrod3 rgb #cd950c
.defcolor darkgoldenrod4 rgb #8b6508
.defcolor lemonchiffon rgb #fffacd
.defcolor lemonchiffon1 rgb #fffacd
.defcolor lemonchiffon2 rgb #eee9bf
.defcolor lemonchiffon3 rgb #cdc9a5
.defcolor lemonchiffon4 rgb #8b8970
.defcolor lightgoldenrod rgb #eedd82
.defcolor lightgoldenrod1 rgb #ffec8b
.defcolor lightgoldenrod2 rgb #eedc82
.defcolor lightgoldenrod3 rgb #cdbe70
.defcolor lightgoldenrod4 rgb #8b814c
.defcolor lightgoldenrodyellow rgb #fafad2
.defcolor lightyellow rgb #ffffe0
.defcolor lightyellow1 rgb #ffffe0
.defcolor lightyellow2 rgb #eeeed1
.defcolor lightyellow3 rgb #cdcdb4
.defcolor lightyellow4 rgb #8b8b7a
.defcolor palegoldenrod rgb #eee8aa
.defcolor papayawhip rgb #ffefd5
.defcolor cornsilk rgb #fff8dc
.defcolor cornsilk1 rgb #fff8dc
.defcolor cornsilk2 rgb #eee8cd
.defcolor cornsilk3 rgb #cdc8b1
.defcolor cornsilk4 rgb #8b8878
.defcolor gold rgb #ffd700
.defcolor gold1 rgb #ffd700
.defcolor gold2 rgb #eec900
.defcolor gold3 rgb #cdad00
.defcolor gold4 rgb #8b7500
.defcolor goldenrod rgb #daa520
.defcolor goldenrod1 rgb #ffc125
.defcolor goldenrod2 rgb #eeb422
.defcolor goldenrod3 rgb #cd9b1d
.defcolor goldenrod4 rgb #8b6914
.defcolor moccasin rgb #ffe4b5
.defcolor yellow rgb #ffff00
.defcolor yellow1 rgb #ffff00
.defcolor yellow2 rgb #eeee00
.defcolor yellow3 rgb #cdcd00
.defcolor yellow4 rgb #8b8b00
.
.cp \n[_C]
.
.if !\n(.C \
. mso pspic.tmac
.
.do ie '\[char97]'a' \
. do mso latin1.tmac
.el \
. do mso cp1047.tmac
.
.\" make sure that no blank lines creep in at the end of this file.
1.18.1.4/tmac/andocj.tmac 0000666 00000000246 15047753021 0010476 0 ustar 00 .\" Load either tmac.an or tmac.doc.
.if !\n(.g .ab These macros require groff.
.de Dd
.rm Dd
.do mso tmac.docj
\\*(Dd\\
..
.de TH
.rm TH
.do mso tmac.an
\\*(TH\\
..
1.18.1.4/tmac/safer.tmac 0000666 00000000304 15047753021 0010333 0 ustar 00 .\" This file is no longer needed; it has been replaced with a built-in
.\" solution.
.\"
.\" It just exists for compatibility reasons with older man programs
.\" which explicitly load this file.
1.18.1.4/tmac/www.tmac 0000666 00000033767 15047753021 0010102 0 ustar 00 .\" www.tmac
.\"
.\" A simple set of macros to provide HTML documents with basic
.\" www functionality. It should work with any macro set.
.\"
.nr _C \n(.C
.cp 0
.
.nr www-html 0
.if '\*[.T]'html' .nr www-html 1
.
.\" set up www-image-template
.\" (cannot do this in html.tmac as the image device must
.\" also know about this string)
.
.if !d www-image-template \
. ds www-image-template
.
.if r ps4html \{\
. \" remove the title command when we are generating images for html
. \" (stops a title accidentally appearing inside an image)
. di www-notitle
. tl ''''
. di
. rm tl
. de tl
. .
.\}
.
.de www-error
. tm \\n[.F]:\\n[.c]: macro error: \\$*
..
.\"
.\" the main auxiliary macro for the HTML interface
.\"
.de HTML
. if \\n[www-html] \{\
. \" the following line makes the vertical mode leave, so to say
. nop \&
. nop \X^html:\\$*^
. \}
..
.\"
.\" an auxiliary macro for HTML (without following space)
.\"
.de HTML-NS
. if \\n[www-html] \
. nop \X^html:\\$*^\c
..
.\"
.\" HX n
.\"
.\" Automatic heading level cut off.
.\"
.\" N is the depth limit of automatically linked headings. So a depth
.\" of 2 would cause grohtml to generate a list of links for `.NH 1' and
.\" `.NH 2' but not for `.NH 3'.
.\"
.de HX
. if \\n[www-html] \
. nop \X^index:\\$*^
..
.\"
.\" BCL foreground background active not-visited visited
.\"
.de BCL
. HTML
..
.\"
.\" BGIMG imagefile
.\"
.de BGIMG
. HTML
..
.\"
.\" URL url description [after]
.\"
.de URL
. ie \\n[www-html] \
. HTML \\$2 \\$3
. el \
. nop \m[blue]\\$2\m[] \%\[la]\f[C]\\$1\f[]\[ra]\\$3
..
.\"
.\" FTP url description [after]
.\"
.\" Same as UTL.
.\"
.als FTP URL
.\"
.\" MTO address description [after]
.\"
.\" ADDRESS is the email address (without the `mailto:' prefix).
.\"
.\" DESCRIPTION is the optional name. If an empty argument is given,
.\" ADDRESS is used instead.
.\"
.\" AFTER is optional stuff printed immediately after ADDRESS
.\" (resp. DESCRIPTION).
.\"
.\" Example:
.\"
.\" Foobar has been written by
.\" .MTO fred@foo.bar "Fredrick Bloggs" .
.\"
.de MTO
. ie \\n[www-html] \{\
. ie '\\$2'' \
. URL mailto:\\$1 \\$1 "\\$3"
. el \
. URL mailto:\\$1 "\\$2" "\\$3"
. \}
. el \{\
. ie '\\$2'' \
. nop \%\m[blue]\f[C]\\$1\f[]\m[]\\$3
. el \
. nop \m[blue]\\$2\m[] \%\[la]\f[C]\\$1\f[]\[ra]\\$3
. \}
..
.\"
.\" TAG name
.\"
.\" Generate an html name NAME.
.\"
.de TAG
. HTML "
. el \{\
. if (\\n[www-level] == 1) \
. nr www-depth \\n[.i]
. nr www-depth +\w'\\*[www-level\\n[www-level]]'u
. \}
..
.\"
.\" ULE
.\"
.\" End an unordered list.
.\"
.de ULE
. ie \\n[www-html] \
. HTML " "
. el \{\
. nr www-depth -\w'\\*[www-level\\n[www-level]]'u
. in \\n[www-depth]
. \}
. www-pop-level
..
.\"
.\" LI
.\"
.\" Insert a list item.
.\"
.de LI
. ie \\n[www-html] \
. HTML ""
. el \{\
. in \\n[www-depth]u
. ti -\w'\\*[www-level\\n[www-level]]'u
. nop \\*[www-level\\n[www-level]]\c
. \}
..
.\"
.\" DC l text [color]
.\"
.\" L is the letter to be dropped and enlarged.
.\"
.\" TEXT is the following text whose height the first letter should not
.\" exceed.
.\"
.\" COLOR is the optional color of the dropped letter (default black).
.\"
.de DC
. ds www-dropcolor black
. if !'\\$3'' \
. ds www-dropcolor \\$3
. ie '\*(.T'html' \{\
. www-make-unique-name
. MPIMG -L \\*[www-unique-name].png "(\\n[.v] * 2u)"
. \}
. el \{\
. ie r ps4html \{\
. www-make-unique-name
. nop \O[5i\\*[www-unique-name].png]\O[1]
. nop \m[\\*[www-dropcolor]]\s[40]\O[3]\\$1\O[4]\s0\m[]
. nop \O[2]\O[1]
. \}
. el \{\
. nr dummy \w'\\$1'u
. nr dcht ((\\n[.v] + \\n[rst]) * \\n[.ps] / \\n[rst])
. char \[dcap] \m[\\*[www-dropcolor]]\s'\\n[dcht]u'\\$1
. nop \v'\\n[.v]u'\\[dcap]\v'-\\n[.v]u'\c
' ti \w'\\[dcap]'u
. \}
. \}
. nop \\$2
..
.\"
.\" now set up TS, TE, EQ, EN default macros
.\"
.do if !d TS .do ds TS HTML-IMAGE
.do if !d TE .do ds TE HTML-IMAGE-END
.do if !d EQ .do ds EQ HTML-IMAGE
.do if !d EN .do ds EN HTML-IMAGE-END
.\"
.\" supplementary macros used by other macro sets
.\"
.\" here are some tags specially for -Tps or -Thtml when invoked by pre-html
.\" to generate png images from postscript.
.\"
.\" HTML-DO-IMAGE - tells troff to issue an image marker which can be
.\" read back by pre-html
.\"
.de HTML-DO-IMAGE
. if r ps4html \
. nop \O[5\\$2\\$1.png]\O[1]\O[3]
. if \\n[www-html] \
. nop \O[5\\$2\\$1.png]\O[0]\O[3]
..
.\"
.\" HTML-IMAGE-END - terminates an image for html
.\"
.de HTML-IMAGE-END
. if r ps4html \
. nop \O[4]\O[2]\O[0]
. if \\n[www-html] \
. nop \O[4]\O[2]\O[1]
..
.
.nr www-png-no 0
.
.\"
.\" www-make-unique-name - generates another unique name in string
.\" `www-unique-name'
.\"
.de www-make-unique-name
. nr www-png-no +1
. ds www-unique-name \\*[www-image-template]\\n[www-png-no]
..
.\"
.\" HTML-IMAGE and friends tell grohtml that this region of text needs
.\" to be rendered as an image.
.\"
.de HTML-IMAGE
. \" generates a centered image
. www-make-unique-name
. HTML-DO-IMAGE \\*[www-unique-name] c
..
.
.de HTML-IMAGE-RIGHT
. www-make-unique-name
. HTML-DO-IMAGE \\*[www-unique-name] r
..
.
.de HTML-IMAGE-LEFT
. www-make-unique-name
. HTML-DO-IMAGE \\*[www-unique-name] l
..
.
.de HTML-IMAGE-INLINE
. www-make-unique-name
. HTML-DO-IMAGE \\*[www-unique-name] i
..
.
.if \n[www-html] \{\
. nh
. nr HY 0
.\}
.if r ps4html .nop \O[0]
.cp \n(_C
.
.\" EOF
1.18.1.4/tmac/tty-char.tmac 0000666 00000011247 15047753021 0010776 0 ustar 00 .\" tty-char.tmac
.\"
.\" This file defines standard troff characters and some groff characters for
.\" use with -Tascii, -Tlatin1, -Tutf8, and -Tcp1047.
.\"
.\" These definitions are chosen so that, as far as possible, they:
.\" - work with all of -Tascii, -Tlatin1, -Tutf8, and -Tcp1047.
.\" - work on devices that display only the last overstruck character
.\" as well as on devices that support overstriking
.\" - represent the character's graphical shape (not its meaning)
.\"
.\" Note that the optical appearance of the definitions contained in this
.\" file is inferior compared to that of the replacement characters defined
.\" in the file tty.tmac.
.\"
.nr _C \n(.C
.cp 0
.
.de tty-char
. if !c\\$1 .char \\$1 "\\$2
..
.
.ie c\[a-] \
. ds tty-rn \[a-]
.el \
. ds tty-rn \v'-1m'_\v'+1m'
.tty-char \[tm] tm
.tty-char \[rn] \*[tty-rn]
.tty-char \[ua] \z|^
.tty-char \[da] \z|v
.tty-char \[sc] S
.tty-char \[ct] \z/c
.tty-char \[dg] \z|-
.tty-char \[dd] \z|=
.tty-char \[ib] (\z=_
.tty-char \[ip] \z=_)
.tty-char \[sb] (=
.tty-char \[sp] =)
.tty-char \[if] oo
.tty-char \[pt] oc
.tty-char \[es] {}
.tty-char \[ca] (^)
.tty-char \[cu] U
.tty-char \[de] o
.tty-char \[di] -:-
.tty-char \[tdi] -:-
.tty-char \[no] ~
.tty-char \[gr] \Z'\*[tty-rn]'V
.tty-char \[is] \z'\z,I
.tty-char \[mo] E
.tty-char \[pd] a
.tty-char \[sr] \e/
.tty-char \[*C] \z_H
.tty-char \[*D] \z_/\z_\e
.tty-char \[*F] \zIO
.tty-char \[*G] |\*[tty-rn]
.tty-char \[*H] \z-O
.tty-char \[*L] /\e
.tty-char \[*P] TT
.tty-char \[*Q] \zIY
.tty-char \[*S] \z_\Z'\*[tty-rn]'>
.tty-char \[*W] \z_O
.if c\[ss] .tty-char \[*b] \[ss]
.tty-char \[*b] B
.tty-char \[*a] a
.tty-char \[*c] \z,E
.tty-char \[*d] d
.tty-char \[*e] e
.tty-char \[*f] \z|o
.tty-char \[+f] \z|o
.tty-char \[*g] y
.tty-char \[*h] \z-0
.tty-char \[+h] \z-0
.tty-char \[*i] i
.tty-char \[*k] k
.tty-char \[*l] \z>\e
.tty-char \[*m] \z,u
.tty-char \[*n] v
.tty-char \[*p] \z-n
.tty-char \[+p] \z-w
.tty-char \[*q] \z|u
.tty-char \[*r] p
.tty-char \[*s] \z-o
.tty-char \[*t] \z~t
.tty-char \[*u] u
.tty-char \[*w] w
.tty-char \[*x] x
.tty-char \[*y] n
.tty-char \[*z] \z,C
.tty-char \[ts] s
.\" Definition of \[ss] should follow that of \[*b].
.tty-char \[ss] B
.tty-char \[c*] \zO\[mu]
.tty-char \[c+] \zO+
.tty-char \[AN] ^
.tty-char \[OR] v
.tty-char \[uA] \z=^
.tty-char \[dA] \z=v
.if c\[md] .tty-char \[pc] \[md]
.if c\[pc] .tty-char \[md] \[pc]
.if c\[pc] .tty-char \[a.] \[pc]
.tty-char \[Im] I
.tty-char \[Re] R
.tty-char \[/L] \z/L
.tty-char \[/l] \z/l
.tty-char \[%0] %o
.tty-char \[ao] o
.tty-char \[a"] """"
.tty-char \[ab] \z'`
.tty-char \[ah] v
.tty-char \[ho] \[ac]
.tty-char \[/_] \z_/
.tty-char \[=~] =~
.tty-char \[Ah] N
.tty-char \[CR] _|
.tty-char \[fa] \z-V
.tty-char \[nm] \z/E
.tty-char \[pp] \z_|
.tty-char \[sd] ''
.tty-char \[st] -)
.tty-char \[te] 3
.if c\[md] .tty-char \[tf] .\[md].
.tty-char \[tf] .:.
.tty-char \[wp] p
.tty-char \[~~] ~~
.tty-char \[Fn] \z,f
.tty-char \[Bq] ,,
.tty-char \[bq] ,
.tty-char \[lz] <>
.\" Latin-1 characters
.tty-char \[r!] \z,i
.tty-char \[Po] \z-L
.tty-char \[Cs] \zox
.tty-char \[Ye] \z=Y
.tty-char \[bb] |
.tty-char \[ad] """"
.tty-char \[Of] \z_a
.tty-char \[Fo] <<
.tty-char \[a-] \*[tty-rn]
.tty-char \[S2] 2
.tty-char \[S3] 3
.tty-char \[ps] 9|
.tty-char \[md] .
.tty-char \[pc] .
.tty-char \[ac] ,
.tty-char \[S1] 1
.tty-char \[Om] \z_o
.tty-char \[Fc] >>
.tty-char \[r?] \z'c
.tty-char \[`A] \z`A
.tty-char \['A] \z'A
.tty-char \[^A] \z^A
.tty-char \[~A] \z~A
.tty-char \[:A] \z"A
.tty-char \[oA] \zoA
.tty-char \[,C] \z,C
.tty-char \[`E] \z`E
.tty-char \['E] \z'E
.tty-char \[^E] \z^E
.tty-char \[:E] \z"E
.tty-char \[`I] \z`I
.tty-char \['I] \z'I
.tty-char \[^I] \z^I
.tty-char \[:I] \z"I
.tty-char \[-D] \z-D
.tty-char \[~N] \z~N
.tty-char \[`O] \z`O
.tty-char \['O] \z'O
.tty-char \[^O] \z^O
.tty-char \[~O] \z~O
.tty-char \[:O] \z"O
.tty-char \[/O] \z/O
.tty-char \[`U] \z`U
.tty-char \['U] \z'U
.tty-char \[^U] \z^U
.tty-char \[:U] \z"U
.tty-char \['Y] \z'Y
.tty-char \[TP] \zIb
.tty-char \[`a] \z`a
.tty-char \['a] \z'a
.tty-char \[^a] \z^a
.tty-char \[~a] \z~a
.tty-char \[:a] \z"a
.tty-char \[oa] \zoa
.tty-char \[,c] \z,c
.tty-char \[`e] \z`e
.tty-char \['e] \z'e
.tty-char \[^e] \z^e
.tty-char \[:e] \z"e
.tty-char \[`i] \z`i
.tty-char \['i] \z'i
.tty-char \[^i] \z^i
.tty-char \[:i] \z"i
.tty-char \[Sd] \z`\z'o
.tty-char \[~n] \z~n
.tty-char \[`o] \z`o
.tty-char \['o] \z'o
.tty-char \[^o] \z^o
.tty-char \[~o] \z~o
.tty-char \[:o] \z"o
.tty-char \[/o] \z/o
.tty-char \[`u] \z`u
.tty-char \['u] \z'u
.tty-char \[^u] \z^u
.tty-char \[:u] \z"u
.tty-char \['y] \z'y
.tty-char \[Tp] \zpb
.tty-char \[:y] \z"y
.\"tty-char \[:y] \ij
.tty-char \[arrowvertex] |
.tty-char \[mc] \z,u
.cp \n[_C]
.
.ie '\*(.T'cp1047' \
. do mso cp1047.tmac
.el \
. do mso latin1.tmac
1.18.1.4/tmac/pic.tmac 0000666 00000000165 15047753021 0010013 0 ustar 00 .\" pic.tmac
.\"
.de PS
.br
.sp .3v
.ne 0\\$1+1v+\n(.Vu
.in \\n(.lu-\\n(.iu-0\\$2/2u>?0
..
.de PE
.in
.sp .3v+.5m
..
1.18.1.4/tmac/mdoc/doc-ditroff 0000666 00000012533 15047753021 0011441 0 ustar 00 .\" Copyright (c) 1991, 1993
.\" The Regents of the University of California. All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-ditroff 8.1 (Berkeley) 06/08/93
.\"
.eo
.if !r C .nr C 0
.if !r D .nr D 0
.if !r cR .nr cR 0
.if !r S .nr S 10
.ec
.ie (\n[S] == 11) \{\
.ps 10.95z
.vs 13.6p
.\}
.el \{ .ie (\n[S] == 12) \{\
.ps 12z
.vs 14.5p
.\}
.el \{\
.ps 10z
.vs 12p
.\}\}
.ds caption-font \f[R]\s[\n[.ps]u]
.ds caption-font2 \f[R]\s[\n[.ps]u]
.ds Ad-font \f[I]\s[\n[.ps]u]
.ds Ar-font \f[CO]\s[\n[.ps]u]
.ds Cm-font \f[CB]\s[\n[.ps]u]
.ds Em-font \f[I]\s[\n[.ps]u]
.ds Er-font \f[C]\s[\n[.ps]u]
.ds Ev-font \f[C]\s[\n[.ps]u]
.ds Fa-font \f[CO]\s[\n[.ps]u]
.ds Fd-font \f[CB]\s[\n[.ps]u]
.ds Fl-font \f[CB]\s[\n[.ps]u]
.ds Fn-font \f[CB]\s[\n[.ps]u]
.ds Ft-font \f[CO]\s[\n[.ps]u]
.ds Ic-font \f[CB]\s[\n[.ps]u]
.ds Li-font \f[C]
.ds Me-font \f[B]\s[\n[.ps]u]
.ds Nm-font \f[CB]\s[\n[.ps]u]
.ds No-font \f[R]\s[\n[.ps]u]
.ds Pa-font \f[C]\s[\n[.ps]u]
.ds Sh-font \f[B]\s[\n[.ps]u]
.ds Sy-font \f[B]\s[\n[.ps]u]
.ds Sx-font \f[B]\s[\n[.ps]u]
.ds Tn-font-shape \f[R]
\# XXX: adapt to discrete LaTeX font sizes
.ds Tn-font-size \s[(\n[.ps]u - 1z)]
.ds Va-font \f[I]\s[\n[.ps]u]
.ds Xr-font \f[C]\s[\n[.ps]u]
.ds left-parenthesis \f[R]\|(\|\f[]\s[\n[.ps]u]
.ds right-parenthesis \f[R]\|)\|\f[]\s[\n[.ps]u]
.ds lp \f[R](\f[]\s[\n[.ps]u]
.ds rp \f[R])\f[]\s[\n[.ps]u]
.ds left-bracket \f[R]\^[\^\f[]\s[\n[.ps]u]
.ds right-bracket \f[R]\^]\f[]\s[\n[.ps]u]
.tr *\[**]
.nr subheader-indent (\w\f[C],u * 5u)
.nr paragraph-space .5v
.nr digit-width \w'\0'u
.nr fixed-width \w\f[C]0
.eo
.nr header-space 0
.nr footer-space 0
.nr display-vertical 0
.de setup-page-layout
.nr header-space .5i
.nr footer-space .5i
.ie r LL \
.ll \n[LL]u
.el \
.ll 6.5i
.ie r LT \
.lt \n[LT]u
.el \
.lt 6.5i
.po 1i
.nr display-vertical .5v
..
.ds left-singlequote \[oq]
.ds right-singlequote \[cq]
.ds <= \[<=]
.ds >= \[>=]
.ds Lq \[lq]
.ds Rq \[rq]
.ds ua \[ua]
.ds aa \[aa]
.ds ga \[ga]
.ds q \[dq]
.ds Pi \[*p]
.ds Ne \[!=]
.ds Le \[<=]
.ds Ge \[>=]
.ds Lt <
.ds Gt >
.ds Pm \[+-]
.ds If \[if]
.ds Na \f[I]NaN\f[]
.ds Ba \f[R]|\f[]
.ds Am &
.nr gX 0
.ds header-string
.de setup-header
.ds header-string "\*[document-title]
.if !"\*[section]"Null" \
.as header-string \|(\*[section])
.wh 0 header
.wh -1.25i footer
.nr nL \n[nl]
.if \n[gX] \
.ds command-name
.br
.if \n[nL] \
.if !\n[C] \
.nr % 1
.nr gX 0
.e@ end-macro
..
.de get-width
.nr width \w\f[C]\$1
.ie (\n[width] >= \n[fixed-width]) \{\
.ie (\n[width] % \n[fixed-width]) \
.nr width ((\n[width] / \n[fixed-width]) + 1)
.el \
.nr width (\n[width] / \n[fixed-width])
.\}
.el \{\
.ie \n[width] \
.nr width 1
.el \
.nr width 0
.\}
..
.de get-arg-width
.nr width \w\f[C]\*[arg\$1]
.ie (\n[width] >= \n[fixed-width]) \{\
.ie (\n[width] % \n[fixed-width]) \
.nr width ((\n[width] / \n[fixed-width]) + 1)
.el \
.nr width (\n[width] / \n[fixed-width])
.\}
.el \{\
.ie \n[width] \
.nr width 1
.el \
.nr width 0
.\}
..
.de Ql
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Ql
.parse-args \$@
.\}
.el \
.tm Usage: .Ql argument ... (#\n[.c])
.\}
.nr reg-Ql (\n[arg-ptr] + 1)
.get-arg-width \n[reg-Ql]
.nr reg-Ql +1
.if (\n[arg-limit] >= \n[reg-Ql]) \
.if (\n[type\n[reg-Ql]] == 2) \
.nr width 3
.ie (\n[width] > 2) \
.Li
.el \{\
.ie \n[arg-ptr] \{\
.ds arg\n[arg-ptr] Li
.nr arg-ptr -1
.\}
.el \{\
.nr reg-Ql \n[arg-limit]
.nr reg-Ql1 (\n[arg-limit] + 1)
.while \n[reg-Ql] \{\
.rn arg\n[reg-Ql] arg\n[reg-Ql1]
.rnn type\n[reg-Ql] type\n[reg-Ql1]
.rn space\n[reg-Ql] space\n[reg-Ql1]
.nr reg-Ql -1
.nr reg-Ql1 -1
.\}
.ds arg1 Li
.nr type1 1
.ds space1
.nr arg-limit +1
.\}
.ds quote-left "\*[left-singlequote]
.ds quote-right "\*[right-singlequote]
.enclose-string
.\}
..
.ec
1.18.1.4/tmac/mdoc/doc-common 0000666 00000046643 15047753021 0011305 0 ustar 00 .\" Copyright (c) 1991, 1993
.\" The Regents of the University of California. All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-common 8.1 (Berkeley) 06/08/93
.\"
.nr %A 1
.nr %B 1
.nr %D 1
.nr %I 1
.nr %J 1
.nr %N 1
.nr %O 1
.nr %P 1
.nr %Q 1
.nr %R 1
.nr %T 1
.nr %V 1
.nr Ac 3
.nr Ad 12n
.nr An 12n
.nr Ao 12n
.nr Ap 2
.nr Aq 12n
.nr Ar 12n
.nr At 1
.nr Bc 3
.nr Bf 8n
.nr Bk 8n
.nr Bl 1
.nr Bo 12n
.nr Bq 12n
.nr Brc 3
.nr Bro 12n
.nr Brq 12n
.nr Bsx 1
.nr Bt 8n
.nr Bx 1
.nr Cd 12n
.nr Cm 10n
.nr D1 8n
.nr Dc 3
.nr Dl 8n
.nr Dt 8n
.nr Do 12n
.nr Dq 12n
.nr Ds 6n
.nr Dv 12n
.nr Ec 3
.nr Ef 8n
.nr Ek 8n
.nr El 1
.nr Em 10n
.nr En 12n
.nr Eo 12n
.nr Eq 12n
.nr Er 17n
.nr Es 12n
.nr Ev 15n
.nr Ex 1
.nr Fa 12n
.nr Fc 3
.nr Fd 12n
.nr Fl 10n
.nr Fn 16n
.nr Fo 16n
.nr Fr 12n
.nr Ft 8n
.nr Fx 1
.nr Ic 10n
.nr In 12n
.nr It 8n
.nr Lb 11n
.nr Li 16n
.nr Lk 6n
.nr Lp 8n
.nr Me 6n
.nr Ms 6n
.nr Mt 6n
.nr Nd 8n
.nr Nm 10n
.nr No 12n
.nr Ns 2
.nr Nx 1
.nr Oc 3
.nr Oo 10n
.nr Op 14n
.nr Os 6n
.nr Ox 1
.nr Pa 32n
.nr Pc 3
.nr Pf 12n
.nr Po 12n
.nr Pp 8n
.nr Pq 12n
.nr Qc 3
.nr Ql 16n
.nr Qo 12n
.nr Qq 12n
.nr Rv 1
.nr Sc 3
.nr Sh 8n
.nr Sm 8n
.nr So 12n
.nr Sq 12n
.nr Ss 8n
.nr St 8n
.nr Sx 16n
.nr Sy 6n
.nr Ta 2
.nr Tn 10n
.nr Ud 8n
.nr Ux 1
.nr Va 12n
.nr Vt 8n
.nr Xc 3
.nr Xo 1
.nr Xr 10n
.ds after-Ao
.ds after-Bo
.ds after-Bro
.ds after-Do
.ds after-Eo
.ds after-Fo
.ds after-Ns
.ds after-Oo
.ds after-Po
.ds after-Qo
.ds after-So
.ds after-Xo
.nr display-indent 6n
.ds soft-space "
.ds hard-space \~
.ds tab \t
.eo
.nr punct. 3
.nr punct, 3
.nr punct: 3
.nr punct; 3
.nr punct( 4
.nr punct) 3
.nr punct[ 4
.nr punct] 3
.nr punct? 3
.nr punct! 3
.ds document-title UNTITLED
.ds volume LOCAL
.ds section Null
.ds volume-operating-system BSD
.nr volume-operating-system-ateol 0
.ds volume-ds-1 General Commands Manual
.ds volume-ds-2 System Calls Manual
.ds volume-ds-3 Library Functions Manual
.ds volume-ds-4 Kernel Interfaces Manual
.ds volume-ds-5 File Formats Manual
.ds volume-ds-6 Games Manual
.ds volume-ds-7 Miscellaneous Information Manual
.ds volume-ds-8 System Manager's Manual
.ds volume-ds-9 Kernel Developer's Manual
.ds volume-ds-USD User's Supplementary Documents
.ds volume-ds-PS1 Programmer's Supplementary Documents
.ds volume-ds-AMD Ancestral Manual Documents
.ds volume-ds-SMM System Manager's Manual
.ds volume-ds-URM User's Reference Manual
.ds volume-ds-PRM Programmer's Manual
.ds volume-ds-KM Kernel Manual
.ds volume-ds-IND Manual Master Index
.ds volume-ds-LOCAL Local Manual
.ds volume-ds-CON Contributed Software Manual
.als volume-ds-MMI volume-ds-IND
.als volume-ds-LOC volume-ds-LOCAL
.ds volume-as-alpha Alpha
.als volume-as-Alpha volume-as-alpha
.ds volume-as-amiga Amiga
.ds volume-as-arc Arc
.ds volume-as-arm26 ARM26
.ds volume-as-arm32 ARM32
.ds volume-as-atari Atari
.ds volume-as-bebox BEbox
.ds volume-as-cobalt Cobalt
.ds volume-as-evbsh3 Evbsh3
.ds volume-as-hp300 HP300
.ds volume-as-hpcmips HPcmips
.ds volume-as-i386 i386
.ds volume-as-luna68k luna68k
.ds volume-as-m68k m68k
.ds volume-as-mac68k mac68k
.ds volume-as-macppc macppc
.ds volume-as-mips MIPS
.ds volume-as-mmeye mmeye
.ds volume-as-mvme68k mvme68k
.ds volume-as-news68k news68k
.ds volume-as-newsmips newsmips
.ds volume-as-next68k next68k
.ds volume-as-ofppc ofppc
.ds volume-as-pc532 pc532
.ds volume-as-pmax pmax
.ds volume-as-powerpc powerpc
.ds volume-as-prep prep
.ds volume-as-sgimips sgimips
.ds volume-as-sh3 sh3
.ds volume-as-sparc SPARC
.ds volume-as-sparc64 sparc64
.ds volume-as-sun3 sun3
.ds volume-as-tahoe Tahoe
.ds volume-as-vax VAX
.ds volume-as-x68k x68k
.de Dt
.ds document-title UNTITLED
.ds volume LOCAL
.ds section Null
.if !"\$1"" \
.ds document-title "\$1
.if !"\$2"" \{\
.ds section \$2
.ie \B\$2 \{\
.if ((\$2 >= 1) & (\$2 <= 9)) \{\
.ie \n[volume-operating-system-ateol] \{\
.ds volume "\*[volume-ds-\$2] \*[volume-operating-system]
.if \A\$3 \{\
.if d volume-as-\$3 \
.as volume "/\*[volume-as-\$3]
.\}\}
.el \{\
.ds volume "\*[volume-operating-system]
.if \A\$3 \{\
.if d volume-as-\$3 \
.as volume "/\*[volume-as-\$3]
.\}
.as volume " \*[volume-ds-\$2]
.\}\}\}
.el \{\
.ie "\$2"unass" .ds volume DRAFT
.el \{ .ie "\$2"draft" .ds volume DRAFT
.el \{ .ie "\$2"paper" .ds volume UNTITLED
.el \
.tm mdoc warning: .Dt: unknown section `\$2' (#\n[.c])
.\}\}
.if \A\$3 \{\
.if d volume-ds-\$3 \
.ds volume "\*[volume-ds-\$3]
.\}\}\}
.if !"\$3"" \
.if "\*[volume]"LOCAL" \
.ds volume \$3
..
.ds operating-system BSD
.ds operating-system-ATT-7 7th\~Edition
.als operating-system-ATT-7th operating-system-ATT-7
.ds operating-system-ATT-3 System\~III
.als operating-system-ATT-III operating-system-ATT-3
.ds operating-system-ATT-V System\~V
.ds operating-system-ATT-V.2 System\~V Release\~2
.ds operating-system-ATT-V.3 System\~V Release\~3
.ds operating-system-ATT-V.4 System\~V Release\~4
.ds operating-system-BSD-3 3rd\~Berkeley Distribution
.ds operating-system-BSD-4 4th\~Berkeley Distribution
.ds operating-system-BSD-4.1 4.1\~Berkeley Distribution
.ds operating-system-BSD-4.2 4.2\~Berkeley Distribution
.ds operating-system-BSD-4.3 4.3\~Berkeley Distribution
.ds operating-system-BSD-4.3T 4.3-Tahoe Berkeley Distribution
.ds operating-system-BSD-4.3R 4.3-Reno Berkeley Distribution
.als operating-system-BSD-4.3t operating-system-BSD-4.3T
.als operating-system-BSD-4.3r operating-system-BSD-4.3R
.ds operating-system-BSD-4.4 4.4BSD
.ds operating-system-NetBSD-0.8 0.8
.ds operating-system-NetBSD-0.8a 0.8A
.ds operating-system-NetBSD-0.9 0.9
.ds operating-system-NetBSD-0.9a 0.9A
.ds operating-system-NetBSD-1.0 1.0
.ds operating-system-NetBSD-1.0a 1.0A
.ds operating-system-NetBSD-1.1 1.1
.ds operating-system-NetBSD-1.2 1.2
.ds operating-system-NetBSD-1.2a 1.2A
.ds operating-system-NetBSD-1.2b 1.2B
.ds operating-system-NetBSD-1.2c 1.2C
.ds operating-system-NetBSD-1.2d 1.2D
.ds operating-system-NetBSD-1.2e 1.2E
.ds operating-system-NetBSD-1.3 1.3
.ds operating-system-NetBSD-1.3a 1.3A
.ds operating-system-NetBSD-1.4 1.4
.ds operating-system-NetBSD-1.5 1.5
.ds operating-system-NetBSD-1.6 1.6
.ds operating-system-FreeBSD-1.0 1.0
.ds operating-system-FreeBSD-1.1 1.1
.ds operating-system-FreeBSD-1.1.5 1.1.5
.ds operating-system-FreeBSD-1.1.5.1 1.1.5.1
.ds operating-system-FreeBSD-2.0 2.0
.ds operating-system-FreeBSD-2.0.5 2.0.5
.ds operating-system-FreeBSD-2.1 2.1
.ds operating-system-FreeBSD-2.1.5 2.1.5
.ds operating-system-FreeBSD-2.1.6 2.1.6
.ds operating-system-FreeBSD-2.1.7 2.1.7
.ds operating-system-FreeBSD-2.2 2.2
.ds operating-system-FreeBSD-2.2.1 2.2.1
.ds operating-system-FreeBSD-2.2.2 2.2.2
.ds operating-system-FreeBSD-2.2.5 2.2.5
.ds operating-system-FreeBSD-2.2.6 2.2.6
.ds operating-system-FreeBSD-2.2.7 2.2.7
.ds operating-system-FreeBSD-2.2.8 2.2.8
.ds operating-system-FreeBSD-3.0 3.0
.ds operating-system-FreeBSD-3.1 3.1
.ds operating-system-FreeBSD-3.2 3.2
.ds operating-system-FreeBSD-3.3 3.3
.ds operating-system-FreeBSD-3.4 3.4
.ds operating-system-FreeBSD-3.5 3.5
.ds operating-system-FreeBSD-4.0 4.0
.ds operating-system-FreeBSD-4.1 4.1
.ds operating-system-FreeBSD-4.1.1 4.1.1
.ds operating-system-FreeBSD-4.2 4.2
.ds operating-system-FreeBSD-4.3 4.3
.ds operating-system-FreeBSD-4.4 4.4
.ds operating-system-FreeBSD-4.5 4.5
.ds operating-system-FreeBSD-4.6 4.6
.ds operating-system-FreeBSD-4.6.2 4.6.2
.ds operating-system-FreeBSD-4.7 4.7
.ds operating-system-FreeBSD-4.8 4.8
.ds operating-system-FreeBSD-5.0 5.0
.de Os
.if "\$1"" \
.return
.ie "\$1"ATT" \{\
.ds operating-system AT&T
.if \A\$2 \{\
.ie d operating-system-ATT-\$2 \
.as operating-system " \*[operating-system-ATT-\$2]
.el \
.as operating-system " UNIX
.\}\}
.el \{ .ie "\$1"BSD" \{\
.if \A\$2 \{\
.ie d operating-system-BSD-\$2 \
.ds operating-system "\*[operating-system-BSD-\$2]
.el \
.tm mdoc warning: .Os: Unknown BSD version `\$2' (#\n[.c])
.\}\}
.el \{ .ie "\$1"FreeBSD" \{\
.ds operating-system FreeBSD
.if \A\$2 \{\
.ie d operating-system-FreeBSD-\$2 \
.as operating-system \~\*[operating-system-FreeBSD-\$2]
.el \
.tm mdoc warning: .Os: Unknown FreeBSD version `\$2' (#\n[.c])
.\}\}
.el \{ .ie "\$1"NetBSD" \{\
.ds operating-system NetBSD
.if \A\$2 \{\
.ie d operating-system-NetBSD-\$2 \
.as operating-system \~\*[operating-system-NetBSD-\$2]
.el \
.tm mdoc warning: .Os: Unknown NetBSD version `\$2' (#\n[.c])
.\}\}
.el \{\
.ds operating-system \$1
.if !"\$2"" \
.as operating-system " \$2
.\}\}\}\}
..
.ds date-string
.ds date-1 January
.ds date-2 February
.ds date-3 March
.ds date-4 April
.ds date-5 May
.ds date-6 June
.ds date-7 July
.ds date-8 August
.ds date-9 September
.ds date-10 October
.ds date-11 November
.ds date-12 December
.de Dd
.if "\*[date-string]"" \
.nr gX 1
.ie \n[.$] \{\
.ie (\n[.$] == 3) \
.ds date-string \$1\~\$2 \$3
.el \{\
.ds date-string "\*[date-\n[mo]]
.as date-string \~\n[dy], \n[year]
.\}
.\}
.el \
.ds date-string Epoch
..
.nr hyphen-flags 12
.de header
.ev env-dh
.setup-page-layout
.if !\n[cR] \
' sp \n[header-space]u
.nr reg-dh \w'\*[caption-font]\*[header-string]\f[]'
.nr reg-dh1 \w'\*[caption-font2]\*[volume]\f[]'
.if (\n[reg-dh] + \n[reg-dh1] + \n[reg-dh] >= \n[.lt]) \{\
.while (\n[reg-dh] + \n[reg-dh1] + \n[reg-dh] >= \n[.lt]) \{\
.substring header-string 0 -2
.nr reg-dh \w'\*[caption-font]\*[header-string]\|.\|.\|.\f[]'
.\}
.as header-string "\|.\|.\|.
.\}
.tl \*[caption-font]\*[header-string]\f[]\*[caption-font2]\*[volume]\f[]\*[caption-font]\*[header-string]\f[]
' sp \n[header-space]u
.ev
..
.de footer
.ie \n[cR] \
' br
.el \{\
.ev caption-enviroment
.setup-page-layout
' sp \n[footer-space]u
.ie \n[D] \{\
.ie o \
.tl %\*[caption-font2]\*[date-string]\f[]\*[caption-font]\*[operating-system]\f[]
.el \
.tl \*[caption-font]\*[operating-system]\f[]\*[caption-font2]\*[date-string]\f[]%
.\}
.el \
.tl \*[caption-font]\*[operating-system]\f[]\*[caption-font2]\*[date-string]\f[]%
' bp
.ev
.\}
..
.de end-macro
.if \n[cR] \
.pl +3v
.fl
.if \n[list-depth] \
.tm mdoc warning: list open at EOF! A .Bl directive has no matching .El
.if \n[cR] \{\
' sp
.tl \*[caption-font]\*[operating-system]\f[]\*[caption-font2]\*[date-string]\f[]\*[caption-font]\*[operating-system]\f[]
.pl \n[nl]u
.\}
..
.de paragraph
.sp \n[paragraph-space]u
.if !\n[cR] \
.ne 2
.ns
..
.als Pp paragraph
.als Lp paragraph
.de LP
.tm Not a \-mdoc command: .LP (#\n[.c])
..
.de PP
.tm Not a \-mdoc command: .PP (#\n[.c])
..
.de pp
.tm Not a \-mdoc command: .pp (#\n[.c])
..
.de SH
.tm Not a \-mdoc command: .SH (#\n[.c])
..
.de Nd
.nop \- \$*
..
.nr in-synopsis-section 0
.nr in-see-also-section 0
.nr in-files-section 0
.nr in-authors-section 0
.de first-parameter
.ds str-dfp "\$1
..
.ds section-name NAME
.ds section-synopsis SYNOPSIS
.ds section-description DESCRIPTION
.ds section-see-also SEE
.ds section-files FILES
.ds section-authors AUTHORS
.de Sh
.ie \n[arg-limit] \{\
.ie "\*[macro-name]"Sh" \{\
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Sh-font]\c
.print-recursive
.\}
.el \{\
.tm Usage: .Sh section_name ... (#\n[.c])
.reset-args
.\}\}
.el \{\
.tm Usage: .Sh not callable by other macros (#\n[.c])
.reset-args
.\}\}
.el \{\
.if !\n[.$] \{\
.tm Usage: .Sh section_name ... (#\n[.c])
.return
.\}
.ds macro-name Sh
.parse-args \$@
.if t \
' ad
.first-parameter \$*
.ie "\*[str-dfp]"\*[section-name]" \{\
.setup-header
' in 0
.\}
.el \{\
.nr in-synopsis-section 0
.nr in-see-also-section 0
.nr in-files-section 0
.nr in-authors-section 0
.ie "\*[str-dfp]"\*[section-synopsis]" \{\
.if t \
.na
.nr in-synopsis-section 1
.nr indent-synopsis 0
.nr indent-synopsis-active 0
.\}
.el \{ .ie "\*[str-dfp]"\*[section-description]" \{\
.nr is-func 0
.nr func-count 0
.nr func-args-processed 0
.nr num-func-args 0
.\}
.el \{ .ie "\*[str-dfp]"\*[section-see-also]" \{\
.if t \
.na
.nr in-see-also-section 1
.\}
.el \{ .ie "\*[str-dfp]"\*[section-files]" \
.nr in-files-section 1
.el .if "\*[str-dfp]"\*[section-authors]" \
.nr in-authors-section 1
.\}\}\}
.in 0
.nr have-author 0
.\}
.setup-page-layout
' sp
.ns
.ta T .5i
.if !\n[cR] \
.ne 3
' fi
.if t \{\
.nr reg-Sh \n[.ss]
.nr reg-Sh1 \n[.sss]
.ss (\n[.ss] * 5 / 3) (\n[.sss] * 5 / 3)
.\}
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Sh-font]\c
.print-recursive
.if t \
.ss \n[reg-Sh] \n[reg-Sh1]
.in +\n[subheader-indent]u
.ns
.\}
..
.de Ss
.ie \n[arg-limit] \{\
.ie "\*[macro-name]"Ss" \{\
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Sh-font]\c
.print-recursive
.\}
.el \{\
.tm Usage: .Ss subsection_name ... (#\n[.c])
.reset-args
.\}\}
.el \{\
.tm Usage: .Ss not callable by other macros (#\n[.c])
.reset-args
.\}\}
.el \{\
.if !\n[.$] \{\
.tm Usage: .Ss subsection_name ... (#\n[.c])
.return
.\}
.ds macro-name Ss
.parse-args \$@
.sp
.if !\n[cR] \
.ne 3
.ti -.25i
.nr reg-Ss \n[.ss]
.nr reg-Ss1 \n[.sss]
.ss (\n[.ss] * 5 / 4) (\n[.sss] * 5 / 4)
.nr arg-ptr +1
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.nop \*[Sh-font]\c
.print-recursive
.ss \n[reg-Ss] \n[reg-Ss1]
.ta T .5i
.if !\n[cR] \
.ne 2
.br
.ns
.\}
..
.de Rd
.tm MDOC GLOBAL REGISTER DUMP
.tm macro-name == `\*[macro-name]'
.tm arg-limit == \n[arg-limit]
.tm num-args == \n[num-args]
.tm arg-ptr == \n[arg-ptr]
.nr reg-Rd 1
.while (\n[reg-Rd] <= \n[arg-limit]) \{\
.tm arg\n[reg-Rd] == `\*[arg\n[reg-Rd]]'
.tm type\n[reg-Rd] == \n[type\n[reg-Rd]]
.tm space\n[reg-Rd] == `\*[space\n[reg-Rd]]'
.nr reg-Rd +1
.\}
.tm curr-font == \n[curr-font]
.tm curr-size == \n[curr-size]
.tm indent-synopsis == \n[indent-synopsis]
.tm indent-synopsis-active == \n[indent-synopsis-active]
.tm have-decl == \n[have-decl]
.tm have-var == \n[have-var]
.tm command-name == `\*[command-name]'
.tm quote-left == `\*[quote-left]'
.tm quote-right == `\*[quote-right]'
.tm nesting-level == \n[nesting-level]
.tm in-list == \n[in-list]
.tm space == `\*[space]'
.tm saved-space == `\*[saved-space]'
.tm space-mode == \n[space-mode]
.tm have-space == \n[have-space]
.tm have-slot == \n[have-slot]
.tm keep-type == \n[keep-type]
.tm display-depth == \n[display-depth]
.tm is-compact == \n[is-compact]
.nr reg-Rd 0
.while (\n[reg-Rd] <= \n[display-depth]) \{\
.tm display-type-stack\n[reg-Rd] == `\*[display-type-stack\n[reg-Rd]]'
.tm display-indent-stack\n[reg-Rd] == \n[display-indent-stack\n[reg-Rd]]
.tm display-ad-stack\n[reg-Rd] == \n[display-ad-stack\n[reg-Rd]]
.tm display-fi-stack\n[reg-Rd] == \n[display-fi-stack\n[reg-Rd]]
.tm display-ft-stack\n[reg-Rd] == \n[display-ft-stack\n[reg-Rd]]
.tm display-ps-stack\n[reg-Rd] == \n[display-ps-stack\n[reg-Rd]]
.nr reg-Rd +1
.\}
.tm fontmode-depth == \n[fontmode-depth]
.nr reg-Rd 1
.while (\n[reg-Rd] <= \n[fontmode-depth]) \{\
.tm fontmode-font-stack\n[reg-Rd] == `\n[fontmode-font-stack\n[reg-Rd]]'
.tm fontmode-size-stack\n[reg-Rd] == `\n[fontmode-size-stack\n[reg-Rd]]'
.nr reg-Rd +1
.\}
.tm list-depth == \n[list-depth]
.nr reg-Rd 1
.while (\n[reg-Rd] <= \n[list-depth]) \{\
.tm list-type-stack\n[reg-Rd] == `\*[list-type-stack\n[reg-Rd]]'
.tm list-have-indent-stack\n[reg-Rd] == \n[list-have-indent-stack\n[reg-Rd]]
.tm list-indent-stack\n[reg-Rd] == \n[list-indent-stack\n[reg-Rd]]
.tm compact-list-stack\n[reg-Rd] == \n[compact-list-stack\n[reg-Rd]]
.tm tag-prefix-stack\n[reg-Rd] == `\*[tag-prefix-stack\n[reg-Rd]]'
.tm tag-width-stack\n[reg-Rd] == `\*[tag-width-stack\n[reg-Rd]]'
.tm list-offset-stack\n[reg-Rd] == \n[list-offset-stack\n[reg-Rd]]
.tm enum-list-count-stack\n[reg-Rd] == \n[enum-list-count-stack\n[reg-Rd]]
.nr reg-Rd +1
.\}
.tm saved-Pa-font == `\*[saved-Pa-font]'
.tm curr-type == \n[curr-type]
.tm curr-arg == `\*[curr-arg]'
.tm diag-list-input-line-count == \n[diag-list-input-line-count]
.tm num-columns == \n[num-columns]
.tm column-indent-width == \n[column-indent-width]
.tm is-func == \n[is-func]
.tm have-old-func == \n[have-old-func]
.tm func-arg-count == \n[func-arg-count]
.tm func-arg == `\*[func-arg]'
.tm num-func-args == \n[num-func-args]
.tm func-args-processed == \n[func-args-processed]
.tm have-func == \n[have-func]
.tm is-reference == \n[is-reference]
.tm reference-count == \n[reference-count]
.tm author-count == \n[author-count]
.nr reg-Rd 0
.while (\n[reg-Rd] <= \n[author-count]) \{\
.tm author-name\n[reg-Rd] == `\*[author-name\n[reg-Rd]]'
.nr reg-Rd +1
.\}
.tm book-count == \n[book-count]
.tm book-name == `\*[book-name]'
.tm date-count == \n[date-count]
.tm date == `\*[date]'
.tm publisher-count == \n[publisher-count]
.tm publisher-name == `\*[publisher-name]'
.tm journal-count == \n[journal-count]
.tm journal-name == `\*[journal-name]'
.tm issue-count == \n[issue-count]
.tm issue-name == `\*[issue-name]'
.tm optional-count == \n[optional-count]
.tm optional-string == `\*[optional-string]'
.tm page-number-count == \n[page-number-count]
.tm page-number-string == `\*[page-number-string]'
.tm corporate-count == \n[corporate-count]
.tm corporate-name == `\*[corporate-name]'
.tm report-count == \n[report-count]
.tm report-name == `\*[report-name]'
.tm reference-title-count == \n[reference-title-count]
.tm reference-title-name == `\*[reference-title-name]'
.tm reference-title-name-for-book == `\*[reference-title-name-for-book]'
.tm volume-count == \n[volume-count]
.tm volume-name == `\*[volume-name]'
.tm have-author == \n[have-author]
.tm document-title == `\*[document-title]'
.tm volume == `\*[volume]'
.tm section == `\*[section]'
.tm operating-system == `\*[operating-system]'
.tm date-string == `\*[date-string]'
.tm header-space == \n[header-space]
.tm footer-space == \n[footer-space]
.tm display-vertical == \n[display-vertical]
.tm header-string == `\*[header-string]'
.tm in-synopsis-section == \n[in-synopsis-section]
.tm in-see-also-section == \n[in-see-also-section]
.tm in-files-section == \n[in-files-section]
.tm in-authors-section == \n[in-authors-section]
.tm END OF GLOBAL REGISTER DUMP
..
.ec
1.18.1.4/tmac/mdoc/doc-syms 0000666 00000036310 15047753021 0010776 0 ustar 00 .\" Copyright (c) 1991, 1993
.\" The Regents of the University of California. All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-syms 8.1 (Berkeley) 06/08/93
.\"
.eo
.de Ux
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-Ux \f[\n[curr-font]]\s[\n[curr-size]u]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name Ux
.parse-args \$@
.\}
.ds arg\n[arg-ptr] \*[Tn-font-size]UNIX\*[str-Ux]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.ds str-Bx-Reno \-Reno
.ds str-Bx-reno \-Reno
.ds str-Bx-Tahoe \-Tahoe
.ds str-Bx-tahoe \-Tahoe
.ds str-Bx-Lite \-Lite
.ds str-Bx-lite \-Lite
.ds str-Bx-Lite2 \-Lite2
.ds str-Bx-lite2 \-Lite2
.de Bx
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-Bx \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-Bx1 \*[Tn-font-size]BSD\*[str-Bx]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name Bx
.parse-args \$@
.\}
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \{\
.ie "\*[arg\n[arg-ptr]]"-alpha" \
.as str-Bx1 " (currently in alpha test)
.el \{ .ie "\*[arg\n[arg-ptr]]"-beta" \
.as str-Bx1 " (currently in beta test)
.el \{ .ie "\*[arg\n[arg-ptr]]"-devel" \
.as str-Bx1 " (currently under development)
.el \{\
.ds str-Bx1 \&\*[arg\n[arg-ptr]]\^\*[Tn-font-size]
.as str-Bx1 BSD\*[str-Bx]
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \{\
.ie (\n[type\n[arg-ptr]] == 2) \{\
.ie d str-Bx-\*[arg\n[arg-ptr]] \
.as str-Bx1 "\*[str-Bx-\*[arg\n[arg-ptr]]]
.el \
.nr arg-ptr -1
.\}
.el \
.nr arg-ptr -1
.\}
.el \
.nr arg-ptr -1
.\}\}\}\}\}
.el \
.nr arg-ptr -1
.\}
.ds arg\n[arg-ptr] "\*[str-Bx1]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.de Ud
.nop \¤tly under development.
..
.ds str-At-32v \&Version\~32V
.as str-At-32v " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v1 \&Version\~1
.as str-At-v1 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v2 \&Version\~2
.as str-At-v2 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v3 \&Version\~3
.as str-At-v3 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v4 \&Version\~4
.as str-At-v4 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v5 \&Version\~5
.as str-At-v5 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v6 \&Version\~6
.as str-At-v6 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-v7 \&Version\~7
.as str-At-v7 " \*[Tn-font-size]AT&T UNIX\*[str-At]
.ds str-At-V \*[Tn-font-size]AT&T\*[str-At] System\~V
.as str-At-V " \*[Tn-font-size]UNIX\*[str-At]
.ds str-At-V.1 \*[Tn-font-size]AT&T\*[str-At] System\~V.1
.as str-At-V.1 " \*[Tn-font-size]UNIX\*[str-At]
.ds str-At-V.2 \*[Tn-font-size]AT&T\*[str-At] System\~V.2
.as str-At-V.2 " \*[Tn-font-size]UNIX\*[str-At]
.ds str-At-V.4 \*[Tn-font-size]AT&T\*[str-At] System\~V.4
.as str-At-V.4 " \*[Tn-font-size]UNIX\*[str-At]
.de At
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-At \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-At1 \*[Tn-font-size]AT&T UNIX\*[str-At]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name At
.parse-args \$@
.\}
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \{\
.ie \A\*[arg\n[arg-ptr]] \{\
.ie d str-At-\*[arg\n[arg-ptr]] \
.ds str-At1 "\*[str-At-\*[arg\n[arg-ptr]]]
.el \{\
.tmc mdoc warning: .At: Unknown AT&T UNIX version
.tm1 " `\*[arg\n[arg-ptr]]' (#\n[.c])
.nr arg-ptr -1
.\}\}
.el \
.nr arg-ptr -1
.\}
.el \
.nr arg-ptr -1
.\}
.ds arg\n[arg-ptr] "\*[str-At1]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.de Fx
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-Fx \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-Fx1 \*[Tn-font-size]\%FreeBSD\*[str-Fx]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name Fx
.parse-args \$@
.\}
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \{\
.ie \A\*[arg\n[arg-ptr]] \{\
.ie d operating-system-FreeBSD-\*[arg\n[arg-ptr]] \
.as str-Fx1 \~\*[operating-system-FreeBSD-\*[arg\n[arg-ptr]]]
.el \{\
.tmc mdoc warning: .Fx: Unknown FreeBSD version
.tm1 " `\*[arg\n[arg-ptr]]' (#\n[.c])
.as str-Fx1 \~\*[arg\n[arg-ptr]]
.\}\}
.el \
.as str-Fx1 \~\*[arg\n[arg-ptr]]
.\}
.el \
.nr arg-ptr -1
.\}
.ds arg\n[arg-ptr] "\*[str-Fx1]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.de Nx
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-Nx \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-Nx1 \*[Tn-font-size]\%N\s[\n[curr-size]u]et
.as str-Nx1 \*[Tn-font-size]BSD\*[str-Nx]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name Nx
.parse-args \$@
.\}
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \{\
.ie \A\*[arg\n[arg-ptr]] \{\
.ie d operating-system-NetBSD-\*[arg\n[arg-ptr]] \
.as str-Nx1 \~\*[operating-system-NetBSD-\*[arg\n[arg-ptr]]]
.el \{\
.tmc mdoc warning: .Nx: Unknown NetBSD version
.tm1 " `\*[arg\n[arg-ptr]]' (#\n[.c])
.as str-Nx1 \~\*[arg\n[arg-ptr]]
.\}\}
.el \
.as str-Nx1 \~\*[arg\n[arg-ptr]]
.\}
.el \
.nr arg-ptr -1
.\}
.ds arg\n[arg-ptr] "\*[str-Nx1]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.de Ox
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-Ox \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-Ox1 \*[Tn-font-size]\%OpenBSD\*[str-Ox]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name Ox
.parse-args \$@
.\}
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \
.as str-Ox1 \~\*[arg\n[arg-ptr]]
.el \
.nr arg-ptr -1
.\}
.ds arg\n[arg-ptr] "\*[str-Ox1]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.de Bsx
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-Bsx \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-Bsx1 \*[Tn-font-size]BSD/OS\*[str-Bsx]
.if !\n[arg-limit] \
.if \n[.$] \{\
.ds macro-name Bsx
.parse-args \$@
.\}
.if (\n[arg-limit] > \n[arg-ptr]) \{\
.nr arg-ptr +1
.ie (\n[type\n[arg-ptr]] == 2) \
.as str-Bsx1 \~\*[arg\n[arg-ptr]]
.el \
.nr arg-ptr -1
.\}
.ds arg\n[arg-ptr] "\*[str-Bsx1]
.nr type\n[arg-ptr] 2
.ds space\n[arg-ptr] "\*[space]
.nr num-args (\n[arg-limit] - \n[arg-ptr])
.nr arg-limit \n[arg-ptr]
.if \n[num-args] \
.parse-space-vector
.print-recursive
..
.de Bt
.nop \&is currently in beta test.
..
.ds Px \*[Tn-font-size]\%POSIX
.ds Ai \*[Tn-font-size]\%ANSI
.ds str-St--ansiC-89 \*[Ai] \*[str-St]X\^3.159-1989
.as str-St--ansiC-89 " (\*[Lq]\)\*[Ai]\~C\*[str-St]\*[Rq])
.als str-St--ansiC str-St--ansiC-89
.ds str-St--isoC \*[Tn-font-size]ISO/IEC\*[str-St] 9899:1990
.as str-St--isoC " (\*[Lq]\*[Tn-font-size]ISO\~C\^89\*[str-St]\*[Rq])
.ds str-St--isoC-99 \*[Tn-font-size]ISO/IEC\*[str-St] 9899:1999
.as str-St--isoC-99 " (\*[Lq]\*[Tn-font-size]ISO\~C\^99\*[str-St]\*[Rq])
.ds str-St--p1003.1 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1
.as str-St--p1003.1 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.1-88 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1-1988
.as str-St--p1003.1-88 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.1-90 \*[Tn-font-size]ISO/IEC\*[str-St] 9945-1:1990
.as str-St--p1003.1-90 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.als str-St--iso9945-1-90 str-St--p1003.1-90
.ds str-St--p1003.1b-93 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1b-1993
.as str-St--p1003.1b-93 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.1c-95 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1c-1995
.as str-St--p1003.1c-95 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.1i-95 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1i-1995
.as str-St--p1003.1i-95 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.1-96 \*[Tn-font-size]ISO/IEC\*[str-St] 9945-1:1996
.as str-St--p1003.1-96 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.als str-St--iso9945-1-96 str-St--p1003.1-96
.ds str-St--p1003.1g-2000 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1g-2000
.as str-St--p1003.1g-2000 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.1-2001 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.1-2001
.as str-St--p1003.1-2001 " (\*[Lq]\)\*[Px]\*[str-St].1\*[Rq])
.ds str-St--p1003.2 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.2
.as str-St--p1003.2 " (\*[Lq]\)\*[Px]\*[str-St].2\*[Rq])
.ds str-St--p1003.2-92 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.2-1992
.as str-St--p1003.2-92 " (\*[Lq]\)\*[Px]\*[str-St].2\*[Rq])
.ds str-St--p1003.2a-92 \*[Tn-font-size]\%IEEE\*[str-St] Std 1003.2a-1992
.as str-St--p1003.2a-92 " (\*[Lq]\)\*[Px]\*[str-St].2\*[Rq])
.ds str-St--iso9945-2-93 \*[Tn-font-size]ISO/IEC\*[str-St] 9945-2:1993
.as str-St--iso9945-2-93 " (\*[Lq]\)\*[Px]\*[str-St].2\*[Rq])
.ds str-St--susv2 Version\~2 of the Single \*[Tn-font-size]UNIX\*[str-St] Specification
.as str-St--susv2 " (\*[Lq]\*[Tn-font-size]SUSv2\*[str-St]\*[Rq])
.ds str-St--svid4 System\~V Interface Definition, Fourth Edition
.as str-St--svid4 " (\*[Lq]\*[Tn-font-size]SVID\*[str-St]\^4\*[Rq])
.ds str-St--xbd5 \*[Tn-font-size]X/Open\*[str-St] System Interface Definitions Issue\~5
.as str-St--xbd5 " (\*[Lq]\*[Tn-font-size]XBD\*[str-St]\^5\*[Rq])
.ds str-St--xcu5 \*[Tn-font-size]X/Open\*[str-St] Commands and Utilities Issue\~5
.as str-St--xcu5 " (\*[Lq]\*[Tn-font-size]XCU\*[str-St]\^5\*[Rq])
.ds str-St--xcurses4.2 \*[Tn-font-size]X/Open\*[str-St] Curses Issue\~4.2
.as str-St--xcurses4.2 " (\*[Lq]\*[Tn-font-size]XCURSES\*[str-St]\^4.2\*[Rq])
.ds str-St--xns5 \*[Tn-font-size]X/Open\*[str-St] Networking Services Issue\~5
.as str-St--xns5 " (\*[Lq]\*[Tn-font-size]XNS\*[str-St]\^5\*[Rq])
.ds str-St--xns5.2 \*[Tn-font-size]X/Open\*[str-St] Networking Services Issue\~5.2
.as str-St--xns5.2 " (\*[Lq]\*[Tn-font-size]XNS\*[str-St]\^5.2\*[Rq])
.ds str-St--xpg3 \*[Tn-font-size]X/Open\*[str-St] Portability Guide Issue\~3
.as str-St--xpg3 " (\*[Lq]\*[Tn-font-size]XPG\*[str-St]\^3\*[Rq])
.ds str-St--xpg4 \*[Tn-font-size]X/Open\*[str-St] Portability Guide Issue\~4
.as str-St--xpg4 " (\*[Lq]\*[Tn-font-size]XPG\*[str-St]\^4\*[Rq])
.ds str-St--xpg4.2 \*[Tn-font-size]X/Open\*[str-St] Portability Guide Issue\~4.2
.as str-St--xpg4.2 " (\*[Lq]\*[Tn-font-size]XPG\*[str-St]\^4.2\*[Rq])
.ds str-St--xsh5 \*[Tn-font-size]X/Open\*[str-St] System Interfaces and Headers Issue\~5
.as str-St--xsh5 " (\*[Lq]\*[Tn-font-size]XSH\*[str-St]\^5\*[Rq])
.ds str-St--ieee754 \*[Tn-font-size]\%IEEE\*[str-St] Std 754-1985
.ds str-St--iso8802-3 \*[Tn-font-size]ISO/IEC\*[str-St] 8802-3:1989
.de St
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name St
.parse-args \$@
.\}
.el \
.St-usage
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.nr curr-font \n[.f]
.nr curr-size \n[.ps]
.ds str-St \f[\n[curr-font]]\s[\n[curr-size]u]
.ds str-St1
.ie \A\*[arg\n[arg-ptr]] \{\
.ie d str-St-\*[arg\n[arg-ptr]] \
.ds str-St1 "\*[str-St-\*[arg\n[arg-ptr]]]
.el \{\
.tmc "mdoc warning: .St: Unknown standard abbreviation
.tm1 " `\*[arg\n[arg-ptr]]' (#\n[.c])
.tm1 " Please refer to the groff_mdoc(7) manpage for a
.tm1 " list of available standard abbreviations.
.\}\}
.el \
.St-usage
.ds arg\n[arg-ptr] "\*[str-St1]
.print-recursive
.\}
.el \{\
.St-usage
.reset-args
.\}
..
.de St-usage
.tm1 "Usage: .St standard (#\n[.c])
.tm1 " Please refer to the groff_mdoc(7) manpage for a list of
.tm1 " available standard abbreviations.
..
.ds str-Lb-libarm32 ARM32 Architecture Library (libarm32, \-larm32)
.ds str-Lb-libc Standard C\~Library (libc, \-lc)
.ds str-Lb-libcompat Compatibility Library (libcompat, \-lcompat)
.ds str-Lb-libcrypt Crypt Library (libcrypt, \-lcrypt)
.ds str-Lb-libcurses Curses Library (libcurses, \-lcurses)
.ds str-Lb-libedit Command Line Editor Library (libedit, \-ledit)
.ds str-Lb-libi386 i386 Architecture Library (libi386, \-li386)
.ds str-Lb-libipsec IPsec Policy Control Library (libipsec, \-lipsec)
.ds str-Lb-libkvm Kernel Data Access Library (libkvm, \-lkvm)
.ds str-Lb-libm Math Library (libm, \-lm)
.ds str-Lb-libmenu Curses Menu Library (libmenu, \-lmenu)
.ds str-Lb-libossaudio OSS Audio Emulation Library (libossaudio, \-lossaudio)
.ds str-Lb-libposix \*[Px] Compatibility Library (libposix, \-lposix)
.ds str-Lb-libresolv DNS Resolver Library (libresolv, \-lresolv)
.ds str-Lb-libtermcap Termcap Access Library (libtermcap, \-ltermcap)
.ds str-Lb-libutil System Utilities Library (libutil, \-lutil)
.ds str-Lb-libz Compression Library (libz, \-lz)
.de Lb
.if !\n[arg-limit] \{\
.ie \n[.$] \{\
.ds macro-name Lb
.parse-args \$@
.\}
.el \
.tm Usage: .Lb library_name ... (#\n[.c])
.\}
.if !\n[arg-limit] \
.return
.nr arg-ptr +1
.ie (\n[arg-limit] >= \n[arg-ptr]) \{\
.ie d str-Lb-\*[arg\n[arg-ptr]] \
.ds str-Lb "\*[str-Lb-\*[arg\n[arg-ptr]]]
.el \{\
.tmc "mdoc warning: .Lb: no description for library
.tm1 " `\*[arg\n[arg-ptr]]' available (#\n[.c])
.ds str-Lb library \*[Lq]\*[arg\n[arg-ptr]]\*[Rq]
.\}
.ds arg\n[arg-ptr] "\*[str-Lb]
.print-recursive
.\}
.el \{\
.tm Usage: .Lb library_name ... (#\n[.c])
.reset-args
.\}
..
.ec
1.18.1.4/tmac/mdoc/docj-nroff 0000666 00000012237 15047753021 0011271 0 ustar 00 .\" Copyright (c) 1991 The Regents of the University of California.
.\" All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-nroff 5.6 (Berkeley) 8/5/91
.\"
.\" tmac.mdoc-nroff
.ds aD \fI
.ds aR \fI
.ds cM \fB
.ds dF \fR
.ds eM \fI
.ds eR \fR
.ds eV \fR
.ds fA \fI
.ds fD \fB
.ds fL \fB
.ds fN \fB
.ds fP \fP
.ds fS
.ds fT \fI
.ds Hs \fR
.ds iC \fB
.ds lI \fR
.ds lP \fR\|(\fP
.ds rP \fR\|)\fP
.ds lp \fR\|(\fP
.ds rp \fR\|)\fP
.ds lB \fR\|[\|\fP
.ds rB \fR\|]\fP
.ds mL \fB
.ds nM \fB
.ds nO \fR
.ds pA \fI
.ds Pu {\ .\ ,\ ;\ :\ (\ )\ [\ ]}
.ds rA \fR
.ds rT \fI
.ds sH \fB
.ds sP
.ds sY \fB
.ds sX \fI
.ds tF \fR
.ds tN
.ds vA \fI
.ds Vs \fR
.ds vT \fB
.ds xR \fR
.nr sI .5i
.nr Ti .5i
.nr cR 1
.nr Pp 1v
.ds lS \0\0
.nr lS \w'\0\0'u
.nr dI 6n
.de pL
.ie \\n(cR .nr Hm 0
.el .nr Hm .5i
.nr Fm .5i
.nr ll 78n
.ll 78n
.nr lt 78n
.lt 78n
.nr po 0i
.po 0i
.nr dV 1v
.ad l
.na
..
.ds <= \&<\&=
.ds >= \&>\&=
.ds Rq ''
.ds Lq ``
.ds ua ^
.ds aa \'
.ds ga \`
.ds sL `
.ds sR '
.ds q \&"
.ds Pi pi
.ds Ne !=
.ds Le <=
.ds Ge >=
.ds Lt <
.ds Gt >
.ds Pm +-
.ds If infinity
.ds Na \fINaN\fP
.ds Ba \fR\&|\fP
.de hK
.nr % 1
.ds hT \\*(dT
.if !"\\*(cH"Null" \{\
. ie !"\\*(gP"Null" .as hT \|(\|\\*(cH\\*(gP\|)
. el .as hT \\|(\\|\\*(cH\\|)
.\}
.if "\\*(cH"Null" .if !"\\*(gP"Null" .as hT \&\|(\|\\*(gP\|)
.ie \\n(cR \{\
. hM
. wh -1v fM
.\}
.el \{\
. wh 0 hM
. wh -1.167i fM
.\}
.if \\n(nl==0:\\n(nl==-1 'bp
.em lM
..
.nr fW \w'0'
.de sW
.nr sW \w\\$1
.ie \\n(sW>=\\n(fW \{\
. ie \\n(sW%\\n(fW .nr sW (\\n(sW/\\n(fW)+1
. el .nr sW \\n(sW/\\n(fW
.\}
.el .nr sW 0
..
.de aW
.nr sW \w\\*(A\\$1
.ie \\n(sW>=\\n(fW \{\
. ie \\n(sW%\\n(fW .nr sW (\\n(sW/\\n(fW)+1
. el .nr sW \\n(sW/\\n(fW
.\}
.el .nr sW 0
..
.de Ql
.if \\n(aC==0 \{\
. ds mN Ql
. ds A1 \\$1
. ds A2 \\$2
. ds A3 \\$3
. ds A4 \\$4
. ds A5 \\$5
. ds A6 \\$6
. ds A7 \\$7
. ds A8 \\$8
. ds A9 \\$9
. nr fV \\n(.$
. fV
.\}
.ds qL \&\\*(sL
.ds qR \&\\*(sR
.En \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.de Sh
.nr nS 0
.nr sE 0
.nr iS 0
.ie "\\$1"NAME" \{\
. hK
' in 0
.\}
.el \{\
. ie "\\$1"̾Á°" \{\
. hK
' in 0
. \}
. el \{\
. ie "\\$1"̾¾Î" \{\
. hK
' in 0
. \}
. el \{\
. nr nS 0
. nr nA 0
. nr nF 0
. nr nT 0
. nr nY 0
. nr aN 0
. nr oT 0
. if "\\$1"SEE" .nr nA 1
. if "\\$1"´ØÏ¢¹àÌÜ" .nr nA 1
. if "\\$1"FILES" .nr nF 1
. if "\\$1"¥Õ¥¡¥¤¥ë" .nr nF 1
. if "\\$1"´ØÏ¢¥Õ¥¡¥¤¥ë" .nr nF 1
. if "\\$1"STANDARDS" .nr nT 1
. if "\\$1"½àµò" .nr nT 1
. if "\\$1"µ¬³Ê" .nr nT 1
. if "\\$1"SYNOPSIS" .nr nS 1
. if "\\$1"½ñ¼°" .nr nS 1
. if "\\$1"DESCRIPTION" \{\
. rr fB
. rr Fb
. ds Fb
. nr fY 0
. nr fZ 0
. \}
. if "\\$1"ÀâÌÀ" \{\
. rr fB
. rr Fb
. ds Fb
. nr fY 0
. nr fZ 0
. \}
. if "\\$1"²òÀâ" \{\
. rr fB
. rr Fb
. ds Fb
. nr fY 0
. nr fZ 0
. \}
. if "\\$1"AUTHORS" .nr nY 1
. if "\\$1"Ãø¼Ô" .nr nY 1
. if "\\$1"ºî¼Ô" .nr nY 1
. in 0
. \}
. \}
.\}
.pL
'sp
.ns
.ta .5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i 6.5i
.if !\\n(cR .ne 3
'fi
\&\\*(sH\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6 \|\\$7 \|\\$8 \|\\$9
\&\fP\s0\&
.in \\n(.iu+\\n(Tiu
.if "\\$1"SEE" .nr sE 1
.ns
..
1.18.1.4/tmac/mdoc/doc-nroff 0000666 00000010367 15047753021 0011121 0 ustar 00 .\" Copyright (c) 1991, 1993
.\" The Regents of the University of California. All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-nroff 8.1 (Berkeley) 06/08/93
.\"
.eo
.if !r D .nr D 0
.if !r cR .nr cR 1
.nr S 10
.nr C 0
.ds caption-font \f[R]
.ds caption-font2 \f[R]
.ds Ad-font \f[I]
.ds Ar-font \f[I]
.ds Cm-font \f[B]
.ds Em-font \f[I]
.ds Er-font \f[R]
.ds Ev-font \f[R]
.ds Fa-font \f[I]
.ds Fd-font \f[B]
.ds Fl-font \f[B]
.ds Fn-font \f[B]
.ds Ft-font \f[I]
.ds Ic-font \f[B]
.ds Li-font \f[R]
.ds Me-font \f[B]
.ds Nm-font \f[B]
.ds No-font \f[R]
.ds Pa-font \f[I]
.ds Sh-font \f[B]
.ds Sy-font \f[B]
.ds Sx-font \f[I]
.ds Tn-font-shape \f[R]
.ds Tn-font-size
.ds Va-font \f[I]
.ds Xr-font \f[R]
.ds left-parenthesis \f[R](\f[]
.ds right-parenthesis \f[R])\f[]
.ds lp \f[R](\f[]
.ds rp \f[R])\f[]
.ds left-bracket \f[R][\f[]
.ds right-bracket \f[R]]\f[]
.nr subheader-indent .5i
.nr paragraph-space 1v
.ec
.nr digit-width \w'\0\0'u
.nr fixed-width \w'0'
.eo
.nr header-space 0
.nr footer-space 0
.nr display-vertical 0
.de setup-page-layout
.ie \n[cR] \
.nr header-space 0
.el \
.nr header-space .5i
.nr footer-space .5i
.ie r LL \
.ll \n[LL]u
.el \
.ll 78n
.ie r LT \
.lt \n[LT]u
.el \
.lt 78n
.po 0i
.nr display-vertical 1v
.ad l
.na
..
.ec
.ds left-singlequote \[oq]
.ds right-singlequote \[cq]
.ds <= \[<=]
.ds >= \[>=]
.ds aa \[aa]
.ds ga \[ga]
.ds q \[dq]
.ds Ne \[!=]
.ds Le \[<=]
.ds Ge \[>=]
.ds Lt <
.ds Gt >
.ds Pm \[+-]
.ds Na \f[I]NaN\f[]
.ds Ba \f[R]|\f[]
.ds Am &
.ie '\*[.T]'utf8' \{\
.ds Rq \[rq]
.ds Lq \[lq]
.ds ua \[ua]
.ds Pi \[*p]
.ds If \[if]
.\}
.el \{\
.ds Rq ''
.ds Lq ``
.ds ua ^
.ds Pi pi
.ds If infinity
.\}
.eo
.ds header-string
.de setup-header
.nr % 1
.ds header-string "\*[document-title]
.if !"\*[section]"Null" \
.as header-string (\*[section])
.ie \n[cR] \
.header
.el \{\
.wh 0 header
.wh -1.167i footer
.\}
.if ((\n[nl] == 0) : (\n[nl] == -1)) \
' bp
.e@ end-macro
..
.de get-width
.nr width \w\$1
.ie (\n[width] >= \n[fixed-width]) \{\
.ie (\n[width] % \n[fixed-width]) \
.nr width ((\n[width] / \n[fixed-width]) + 1)
.el \
.nr width (\n[width] / \n[fixed-width])
.\}
.el \
.nr width 0
..
.de get-arg-width
.nr width \w\*[arg\$1]
.ie (\n[width] >= \n[fixed-width]) \{\
.ie (\n[width] % \n[fixed-width]) \
.nr width ((\n[width] / \n[fixed-width]) + 1)
.el \
.nr width (\n[width] / \n[fixed-width])
.\}
.el \
.nr width 0
..
.de Ql
.if !\n[arg-limit] \{\
.ie \n[.$] \
.ds macro-name Ql
.el \
.tm Usage: .Ql argument ... (#\n[.c])
.\}
.ds quote-left "\*[left-singlequote]
.ds quote-right "\*[right-singlequote]
.enclose-string \$@
..
.ec
1.18.1.4/tmac/mdoc/docj-ditroff 0000666 00000013677 15047753021 0011625 0 ustar 00 .\" Copyright (c) 1991 The Regents of the University of California.
.\" All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-ditroff 5.8 (Berkeley) 8/5/91
.\"
.\" tmac.mdoc-ditroff
.if \n(.g .if !rC .nr C 0
.ds aD \fI\s10
.ds aR \f(CO\s10
.ds cM \f(CB\s10
.ds dF \fR\s10
.ds eM \fI\s10
.ds eR \fC\s10
.ds eV \fC\s10
.ds fA \f(CO\s10
.ds fD \f(CB\s10
.ds fL \f(CB\s10
.ds fN \f(CB\s10
.ds fP \fP\s0
.ds fS \s0
.ds fT \f(CO\s10
.ds Hs \fR\s10
.ds iC \f(CB\s10
.ds lI \fC
.ds lP \fR\|(\|\fP\s10
.ds lp \fR(\fP\s10
.ds rP \fR\|)\|\fP\s10
.ds rp \fR)\fP\s10
.ds lB \fR\^[\^\fP\s10
.ds rB \fR\^]\fP\s10
.ds mL \fB\s10
.ds nM \f(CB\s10
.ds nO \fR\s10
.ds nT \s0
.ds pA \fC\s10
.ds Pu \fR{\ .\ ,\ :\ ;\ (\ )\ [\ ]\ \fR}
.ds rA \fR\s10
.ds rT \f(CO\s10
.ds sH \fB\s10
.ds sP \s0
.ds sY \fB\s10
.ds sX \fR\s10
.ds tF \fR
.ds tN \s9
.ds vA \fI\s10
.ds Vs \fR\s10
.ds vT \f(CB\s10
.ds xR \fC\s10
.tr *\(**
.nr sI \w\fC,u*5
.nr Ti \n(sIu
.nr Pp .5v
.ds lS \0
.nr lS \w'\0'u
.nr dI 6n
.de pL
.nr Hm .5i
.nr Fm .5i
.nr ll 6.5i
.ll 6.5i
.nr lt 6.5i
.lt 6.5i
.nr po 1i
.po 1.i
.nr dV .5v
..
.ds <= \(<=
.ds >= \(>=
.ie \n(.g \{\
. ds Lq \(lq
. ds Rq \(rq
.\}
.el \{\
. ds Lq \&``
. ds Rq \&''
.\}
.ds ua \(ua
.ds aa \(aa
.ds ga \(ga
.ds sR \&'
.ds sL \&`
.ds q \&"
.ds Pi \(*p
.ds Ne \(!=
.ds Le \(<=
.ds Ge \(>=
.ds Lt <
.ds Gt >
.ds Pm \(+-
.ds If \(if
.ds Na \fINaN\fP
.ds Ba \fR\&|\fP
.nr gX 0
.de hK
.ds hT \\*(dT
.if !"\\*(cH"Null" \{\
. ie !"\\*(gP"Null" .as hT \|(\|\\*(cH\\*(gP\|)
. el .as hT \\|(\\|\\*(cH\\|)
.\}
.if "\\*(cH"Null" \{\
. if !"\\*(gP"Null" .as hT \&\|(\|\\*(gP\|)
.\}
.wh 0 hM
.wh -1.25i fM
.nr nL \\n(nl
.ie \\n(gX==1 \{\
. rm n1
. bp
.\}
.el \{\
' bp
.\}
.if \\n(nL>0 \{\
. if !\\nC \{\
. nr % 1
. \}
.\}
.nr gX 0
.em lM
..
.nr fW \w\fC0
.de sW
.nr sW \w\fC\\$1
.ie \\n(sW>=\\n(fW \{\
. ie \\n(sW%\\n(fW .nr sW (\\n(sW/\\n(fW)+1
. el .nr sW \\n(sW/\\n(fW
.\}
.el \{\
. ie \\n(sW>0 .nr sW 1
. el .nr sW 0
.\}
..
.de aW
.nr sW \w\fC\\*(A\\$1
.ie \\n(sW>=\\n(fW \{\
. ie \\n(sW%\\n(fW .nr sW (\\n(sW/\\n(fW)+1
. el .nr sW \\n(sW/\\n(fW
.\}
.el \{\
. ie \\n(sW>0 .nr sW 1
. el .nr sW 0
.\}
..
.de Ql
.if \\n(aC==0 \{\
. ds mN Ql
. ds A1 \\$1
. ds A2 \\$2
. ds A3 \\$3
. ds A4 \\$4
. ds A5 \\$5
. ds A6 \\$6
. ds A7 \\$7
. ds A8 \\$8
. nr fV \\n(.$
. fV
.\}
.nr aP \\n(aP+1
.aW \\n(aP
.nr aP \\n(aP-1
.if \\n(sW>2 .Li
.if \\n(sW<=2 \{\
. if (\\n(aP>0) \{\
. ds A\\n(aP Li
. nr aP \\n(aP -1
. \}
. if (\\n(aP==0) \{\
. rm C0 C1 C2 C3 C4 C5 C6 C7 C8 C9
. rm S1 S2 S3 S4 S5 S6 S7 S8 S9
. rn A8 A9
. rn A7 A8
. rn A6 A7
. rn A5 A6
. rn A4 A5
. rn A3 A4
. rn A2 A3
. rn A1 A2
. ds A1 Li
. nr fV \\n(aC+1
. nr aC 0
. fV
. \}
. ds qL \&\\*(sL
. ds qR \&\\*(sR
. En
.\}
..
.de Sh
.nr nS 0
.nr sE 0
.nr iS 0
'ad
.ie "\\$1"NAME" \{\
. hK
' in 0
.\}
.el \{\
. ie "\\$1"̾Á°" \{\
. hK
' in 0
. \}
. el \{\
. ie "\\$1"̾¾Î" \{\
. hK
' in 0
. \}
. el \{\
. nr nS 0
. nr nA 0
. nr nF 0
. nr nT 0
. nr nY 0
. nr oT 0
. if "\\$1"SYNOPSIS" \{\
. na
. nr nS 1
. \}
. if "\\$1"½ñ¼°" \{\
. na
. nr nS 1
. \}
. if "\\$1"DESCRIPTION" \{\
. nr fY 0
. nr fZ 0
. nr fB 0
. nr Fb 0
. ds Fb
. \}
. if "\\$1"ÀâÌÀ" \{\
. nr fY 0
. nr fZ 0
. nr fB 0
. nr Fb 0
. ds Fb
. \}
. if "\\$1"²òÀâ" \{\
. nr fY 0
. nr fZ 0
. nr fB 0
. nr Fb 0
. ds Fb
. \}
. if "\\$1"SEE" \{\
. nr nA 1
. na
. \}
. if "\\$1"´ØÏ¢¹àÌÜ" \{\
. nr nA 1
. na
. \}
. if "\\$1"FILES" .nr nF 1
. if "\\$1"¥Õ¥¡¥¤¥ë" .nr nF 1
. if "\\$1"´ØÏ¢¥Õ¥¡¥¤¥ë" .nr nF 1
. if "\\$1"STANDARDS" .nr nT 1
. if "\\$1"½àµò" .nr nT 1
. if "\\$1"µ¬³Ê" .nr nT 1
. if "\\$1"AUTHORS" .nr nY 1
. if "\\$1"Ãø¼Ô" .nr nY 1
. if "\\$1"ºî¼Ô" .nr nY 1
. if "\\$1"SEE" .nr sE 1
. if "\\$1"´ØÏ¢¹àÌÜ" .nr sE 1
. in 0
. nr aN 0
. \}
. \}
.\}
.pL
'sp
.ns
.ta .5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i 6.5i
.if !\\n(cR .ne 3
'fi
\&\\*(sH\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6 \|\\$7 \|\\$8 \|\\$9
\&\fP\s0\&
.in \\n(.iu+\\n(Tiu
.ns
..
1.18.1.4/tmac/om.tmac 0000666 00001005272 15047753021 0007660 0 ustar 00 .\" om.tmac
.\"
.\" Mom -- a typesetting/document-processing macro set for groff.
.\"
.\" Copyright (C) 2002 Free Software Foundation, Inc.
.\" Written by Peter Schaffter (df191@ncf.ca)
.\"
.\" This file is part of groff.
.\"
.\" groff is free software; you can redistribute it and/or modify it under
.\" the terms of the GNU General Public License as published by the Free
.\" Software Foundation; either version 2, or (at your option) any later
.\" version.
.\"
.\" groff is distributed in the hope that it will be useful, but WITHOUT ANY
.\" WARRANTY; without even the implied warranty of MERCHANTABILITY or
.\" FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
.\" for more details.
.\"
.\" You should have received a copy of the GNU General Public License along
.\" with groff; see the file COPYING. If not, write to the Free Software
.\" Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
.\"
.
.
\# Version 1.1.4
\# -------------
\#
.if (\n[.x]\n[.y] < 118) \
. ab You need GNU troff version 1.18 or higher to run this version of mom!
\#
\# Inasmuch as possible, macros that turn a feature on or off follow
\# a similar style. Invoking the macro without an argument turns
\# the feature on. Invoking it with any other argument turns it off.
\# Use of the argument OFF is recommended, but not required; users
\# may find other conventions preferable (e.g. NO, X, END, QUIT, etc.).
\#
\# "" in the description of arguments that can be passed
\# to a macro means that any argument turns the feature off.
\#
\# ====================================================================
\#
\# TYPESETTING MACROS, STRINGS, AND ALIASES
\# ========================================
\#
\# +++ALIASES+++
\#
.als ALIAS als \"Alias .als as ALIAS
.als ALIASN aln \"Alias .aln (number registers) as ALIASN
\#
.ALIAS MAC de
.ALIAS BR br
.ALIAS SPACE sp
.ALIAS SP sp
.ALIAS PAGELENGTH pl
.ALIAS NEWPAGE bp
.ALIAS SPREAD brp
.ALIAS STRING ds
\#
\# ALIASES FOR NUMBER REGISTERS
\# ----------------------------
\#
.ALIASN #PT_SIZE .ps \"fractional point size in units
.ALIASN #DIVER_DEPTH dn \"diversion depth
.ALIASN #DIVER_WIDTH dl \"diversion width
.ALIASN #TRAP_DISTANCE .t \"distance to next trap
.ALIASN #LEAD .v \"line space (.vs, not .ls)
.ALIASN #PAGE_LENGTH .p \"page length
.ALIASN #NUM_ARGS .$ \"number of arguments passed to a macro
.ALIASN #INDENT .i \"value of current indent
\#
\# ====================================================================
\#
\# MISCELLANEOUS
\# =============
.cflags 4 /\(en
\#
\# ====================================================================
\#
\# END MACRO FOR LETTERS
\# ---------------------
\# *Arguments:
\# none
\# *Function:
\# The .em macro executed at the end of letters. Turns footers and
\# pagination off, terminates and outputs diversion CLOSING, indented with
\# the author's name underneath.
\#
.MAC ALL_DONE END
. br
. FOOTERS OFF
. PAGINATION OFF
. if \\n[#DOC_TYPE]=4 \{\
. br
. if !'\\n(.z'' \{ .di \}
. IQ CLEAR
. TQ
. TAB_SET 1 \\n[#DOC_L_LENGTH]u/2u \\n[#DOC_L_LENGTH]u/2u LEFT
. ALD \\n[#DOC_LEAD]u*2u
. TAB 1
. if \\n[#CLOSING] \{\
. nf
. CLOSING
. \}
. ALD \\n[#DOC_LEAD]u*3u
. PRINT \\*[$AUTHOR_1]
. \}
.DO_FOOTER
.END
\#
\#
\# =====================================================================
\#
\# +++PAGE LAYOUT+++
\#
\# Macros that control the physical layout of the page: paper size
\# and margins.
\#
\# PAGE WIDTH
\# ----------
\# *Argument:
\#
\# *Function:
\# Stores user supplied page width in register #PAGE_WIDTH.
\# *Notes:
\# #PAGE_WIDTH is used to establish the default LL (and right margin).
\# Requires unit of measure.
\#
.MAC PAGEWIDTH END
. br
. nr #PAGE_WIDTH \\$1
. if !r#L_MARGIN \{ .L_MARGIN \\n(.o \}
. if !r#R_MARGIN \{ .R_MARGIN 1i \}
.END
\#
\#
\# L_MARGIN
\# --------
\# *Argument:
\#
\# *Function:
\# Stores user supplied page offset in register #L_MARGIN.
\# Sets .po to user supplied offset.
\# *Notes:
\# Requires unit of measure.
\#
.MAC L_MARGIN END
. br
. nr #L_MARGIN (\\$1)
. po \\n[#L_MARGIN]u
.END
\#
\#
\# R_MARGIN
\# --------
\# *Argument:
\#
\# *Function:
\# Stores user supplied right margin in register #R_MARGIN.
\# *Notes:
\# This is a pseudo-margin. Right margin is actually a function of
\# line length. The macro calculates line length from the page offset
\# and the value plugged into #R_MARGIN.
\#
\# N.B. -- PAGEWIDTH and L_MARGIN have to be defined before R_MARGIN.
\#
\# Requires unit of measure.
\#
.MAC R_MARGIN END
. br
. nr #R_MARGIN (\\$1)
. ll \\n[#PAGE_WIDTH]u-\\n[#L_MARGIN]u-\\n[#R_MARGIN]u
. ta \\n(.lu
. nr #L_LENGTH \\n(.l
.END
\#
\#
\# T_MARGIN
\# --------
\# *Argument:
\#
\# *Function:
\# Stores the user supplied top margin in register #T_MARGIN.
\# Advances user supplied depth from the top of the page.
\# *Notes:
\# Requires unit of measure.
\#
.MAC T_MARGIN END
. br
. nr #T_MARGIN (\\$1)
. nr #T_MARGIN_SET 1
. if !\\n[#DOCS] \{\
. PRINT \&
. sp |\\n[#T_MARGIN]u-1v
. \}
. wh 0i DO_T_MARGIN
.END
\#
\#
\# B_MARGIN
\# --------
\# *Argument:
\#
\# *Function:
\# Stores the user supplied bottom margin in register #B_MARGIN.
\# *Notes:
\# Requires unit of measure.
\#
.MAC B_MARGIN END
. br
. nr #B_MARGIN (\\$1)
. wh -\\n[#B_MARGIN]u DO_B_MARGIN
.END
\#
\#
\# PAGE
\# ----
\# *Arguments:
\# [pagelength [leftmargin [rightmargin [topmargin [bottommargin]]]]]
\# *Function:
\# Page set-up. Collects arguments and passes them to the appropriate
\# macros.
\# *Notes:
\# All arguments after pagewidth are optional, but must appear
\# in the order given above. (User can fill in as much or as
\# little as desired.)
\#
\# All arguments require a unit of measure.
\#
.MAC PAGE END
. br
. PAGEWIDTH \\$1
. PAGELENGTH \\$2
. ie '\\$3'' \{ .L_MARGIN \\n(.o \}
. el \{ .L_MARGIN \\$3 \}
. ie '\\$4'' \{ .R_MARGIN 1i \}
. el \{ .R_MARGIN \\$4 \}
. if !'\\$5'' \{ .T_MARGIN \\$5 \}
. if !'\\$6'' \{ .B_MARGIN \\$6 \}
.END
\#
\# =====================================================================
\#
\# +++PAGE CONTROL+++
\#
\# Generic macros for breaking pages.
\#
\# DO_T_MARGIN
\# -----------
\# *Argument:
\#
\# *Function:
\# Plants the top margin (set in .PAGE) at the top of each page.
\# *Notes:
\# The trap is set in .PAGE
\#
.MAC DO_T_MARGIN END
. ev 1
. sp |\\n[#T_MARGIN]u-1v
. ev
.END
\#
\#
\# DO_B_MARGIN
\# -----------
\# *Argument:
\#
\# *Function:
\# Plants the bottom margin (set in .PAGE) at the bottom of each page.
\# *Notes:
\# The trap is set in .PAGE.
\#
.MAC DO_B_MARGIN END
.ev 1
. bp
.ev
.END
\#
\# =====================================================================
\#
\# +++GENERAL STYLE MACROS+++
\#
\# Macros that are likely to appear together to define general
\# type style: line length, family, font, point size, and line
\# spacing.
\#
\# LINE LENGTH
\# -----------
\# *Argument:
\#
\# *Function:
\# Stores user supplied line length in register #L_LENGTH.
\# Sets .ll to #L_LENGTHu
\# *Notes:
\# Requires unit of measure.
\#
.MAC LL END
. nr #L_LENGTH (\\$1)
. nr #USER_SET_L_LENGTH 1
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
.END
\#
\#
\# FAMILY
\# ------
\# *Argument:
\#
\# *Function:
\# Stores user supplied font family in string $FAMILY. Sets .fam
\# to $FAMILY.
\#
.MAC FAMILY END
. if \\n[#PRINT_STYLE]=1 \{ .return \}
. if \\n[#IGNORE] \{ .return \}
. ds $FAMILY \\$1
. fam \\*[$FAMILY]
.END
\#
\#
\# FONT
\# ----
\# *Argument:
\# R | I | B | BI
\# *Function:
\# Stores user supplied font in $FONT and sets .ft to $FONT.
\#
.MAC FT END
. if \\n[#PRINT_STYLE]=1 \{\
. ie '\\$1'I' \{\
. if \\n[#UNDERLINE_ITALIC]=1 \{\
. UNDERLINE
. return
. \}
. if \\n[#ITALIC_MEANS_ITALIC]=1 \{\
. ds $FONT \\$1
. ft \\*[$FONT]
. return
. \}
. \}
. el \{ .UNDERLINE OFF \}
. return
. \}
. ds $FONT \\$1
. ft \\*[$FONT]
.END
\#
\#
\# POINT SIZE
\# ----------
\# *Arguments:
\#
\# *Function:
\# Sets point size to user supplied value in scaled points.
\# If #AUTO_LEAD is on, sets .vs to #AUTOLEAD_VALUE+#PT_SIZE.
\# *Notes:
\# Must NOT use a unit of measure.
\#
.MAC PT_SIZE END
. if \\n[#PRINT_STYLE]=1 \{ .return \}
. if \\n[#IGNORE] \{ .return \}
. nr #PT_SIZE_SET 1
. ps \\$1
. if \\n[#AUTO_LEAD] \{\
. ie \\n[#AUTOLEAD_FACTOR] \{ .vs \\n[#PT_SIZE]u*\\n[#AUTOLEAD_VALUE]u/1000u \}
. el \{ .vs \\n[#PT_SIZE]u+\\n[#AUTOLEAD_VALUE]u \}
. \}
. nr #PT_SIZE_IN_UNITS \\n[.ps]
.END
\#
\#
\# LEADING
\# -------
\# *Argument:
\#
\# *Function:
\# Turns off #AUTO_LEAD if it's on.
\# Sets .vs to user supplied value.
\# *Notes:
\# Does not require unit of measure. LEAD automatically turns off AUTOLEAD.
\#
.MAC LS END
. if \\n[#PRINT_STYLE]=1 \{ .return \}
. if \\n[#IGNORE] \{ .return \}
. nr #LEAD_SET 1
. if \\n[#AUTO_LEAD] \{\
. rr #AUTO_LEAD
. rr #AUTOLEAD_FACTOR
. \}
. vs \\$1
. if \\n[#T_MARGIN_SET]=1 \{\
. sp |\\n[#T_MARGIN]u-1v
. rr #T_MARGIN_SET
. \}
.END
\#
\#
\# AUTOLEAD
\# --------
\# *Argument:
\# [FACTOR]
\# *Function:
\# Stores user supplied auto-lead value in register #AUTOLEAD_VALUE.
\# Adds #AUT0LEAD_VALUE to #PT_SIZE when invoked to set leading.
\# All subsequent PT_SIZE requests reset the leading in the same way until
\# AUTOLEAD is turned off.
\# *Notes:
\# With the optional FACTOR argument, the current point size is
\# multiplied by #AUTOLEAD_VALUE instead of the two being added
\# together.
\#
\# When AUTOLEAD is turned off, the leading reverts to the leading value
\# in effect prior to invoking AUTOLEAD.
\#
.MAC AUTOLEAD END
. if \\n[#PRINT_STYLE]=1 \{ .return \}
. if \\n[#IGNORE] \{ .return \}
. nr #AUTO_LEAD 1
. nr #AUTOLEAD_VALUE (p;\\$1)
. ie \\n[#NUM_ARGS]=2 \{\
. if '\\$2'FACTOR' \{\
. nr #AUTOLEAD_FACTOR 1
. vs \\n[#PT_SIZE]u*\\n[#AUTOLEAD_VALUE]u/1000u
. \}
. \}
. el \{\
. vs \\n[#PT_SIZE]u+\\n[#AUTOLEAD_VALUE]u
. \}
. if \\n[#T_MARGIN_SET] \{\
. sp |\\n[#T_MARGIN]u-1v
. rr #T_MARGIN_SET
. \}
.END
\#
\#
\# STRINGS FOR INLINE CONTROL OF GENERAL TYPE STYLE
\# ------------------------------------------------
.ds ROM \EfR
.ds IT \EfI
.ds BD \EfB
.ds BDI \Ef(BI
.ds PREV \EfP
.ds S \Es
\#
\# ADDITIONAL STRINGS
\# ------------------
.ds RULE \El'\En(.lu'
\#
\#
\# =====================================================================
\#
\# +++KERNING+++
\#
\# AUTOMATIC PAIRWISE KERNING
\# --------------------------
\# *Arguments:
\# |
\# *Function:
\# Turns automatic pairwise kerning on or off.
\#
.MAC KERN END
. ie '\\$1'' \{\
. kern
. nr #KERN 1
. \}
. el \{\
. kern 0
. nr #KERN 0
. \}
.END
\#
\#
\# INLINE KERNING AND HORIZONTAL MOVEMENT
\# --------------------------------------
\# *Kerning
\# Inline kerning provides a simple method for users to adjust the
\# amount of space between any two letters. It's predicated on a
\# unit of measure "U", which is 1/36 of the current point size as
\# returned by \n[.ps]. E.g., if the current point size is 18,
\# \n[.ps] returns 18000u, therefore U=500u. Since U remains
\# proportional relative to the current point size, the amount
\# of kerning between two letters as expressed in Us remains
\# visually similar regardless of changes in point size.
\#
\# N.B.--the amount of inline kerning supplied by \*[BU#] or
\# \*[FU#] is added to or subtracted from any kerning that already
\# takes place between two characters when automatic kerning is
\# turned on.
\#
\# In groff v. 1.17.2, it was not possible to pass arguments to macros that
\# were executed with inline escapes, nor thence to evaluate conditional
\# expressions. Consequently, each pseudo-escape \[BU#] had to be defined
\# separately with ".char".
\#
\# As of v. 1.18, one can pass arguments to inline strings/macros,
\# hence it is now possible to do \*[BU #] where #, inline, is the desired
\# number of kern units. The original .char definitions have been left in
\# for backward compatibility with documents created prior to mom-1.1.3c.
\#
\#
.nr #KERN_UNIT 36
.ds BU \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*\\$1u)'
.ds FU \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*\\$1u)'
\#
.ds BU1 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*1u)'
.ds BU2 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*2u)'
.ds BU3 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*3u)'
.ds BU4 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*4u)'
.ds BU5 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*5u)'
.ds BU6 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*6u)'
.ds BU7 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*7u)'
.ds BU8 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*8u)'
.ds BU9 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*9u)'
.ds BU10 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*10u)'
.ds BU11 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*11u)'
.ds BU12 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*12u)'
.ds BU13 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*13u)'
.ds BU14 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*14u)'
.ds BU15 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*15u)'
.ds BU16 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*16u)'
.ds BU17 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*17u)'
.ds BU18 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*18u)'
.ds BU19 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*19u)'
.ds BU20 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*20u)'
.ds BU21 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*21u)'
.ds BU22 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*22u)'
.ds BU23 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*23u)'
.ds BU24 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*24u)'
.ds BU25 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*25u)'
.ds BU26 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*26u)'
.ds BU27 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*27u)'
.ds BU28 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*28u)'
.ds BU29 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*29u)'
.ds BU30 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*30u)'
.ds BU31 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*31u)'
.ds BU32 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*32u)'
.ds BU33 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*33u)'
.ds BU34 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*34u)'
.ds BU35 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*35u)'
.ds BU36 \h'-(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*36u)'
\#
\#
.ds FU1 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*1u)'
.ds FU2 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*2u)'
.ds FU3 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*3u)'
.ds FU4 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*4u)'
.ds FU5 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*5u)'
.ds FU6 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*6u)'
.ds FU7 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*7u)'
.ds FU8 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*8u)'
.ds FU9 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*9u)'
.ds FU10 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*10u)'
.ds FU11 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*11u)'
.ds FU12 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*12u)'
.ds FU13 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*13u)'
.ds FU14 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*14u)'
.ds FU15 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*15u)'
.ds FU16 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*16u)'
.ds FU17 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*17u)'
.ds FU18 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*18u)'
.ds FU19 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*19u)'
.ds FU20 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*20u)'
.ds FU21 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*21u)'
.ds FU22 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*22u)'
.ds FU23 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*23u)'
.ds FU24 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*24u)'
.ds FU25 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*25u)'
.ds FU26 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*26u)'
.ds FU27 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*27u)'
.ds FU28 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*28u)'
.ds FU29 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*29u)'
.ds FU30 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*30u)'
.ds FU31 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*31u)'
.ds FU32 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*32u)'
.ds FU33 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*33u)'
.ds FU34 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*34u)'
.ds FU35 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*35u)'
.ds FU36 \h'(\En[#PT_SIZE]u/\n[#KERN_UNIT]u*36u)'
\#
\#
\# *Horizontal movements
\# BP1...12.75 and FP1...12.75 move backwards or forwards inline by the
\# specified number of points.
\# Left in for backward compatibility with mom-1.1.3c, the preferred
\# methods for inline horizontal movements are now \*[BCK #] and
\# \*[FWD #].
\#
.ds BCK \h'-\\$1\\$2'
.ds FWD \h'\\$1\\$2'
\#
.ds BP.25 \h'-.25'
.ds BP.5 \h'-.5'
.ds BP.75 \h'-.75'
.ds BP1 \h'-1p'
.ds BP1.25 \h'-1.25p'
.ds BP1.5 \h'-1.5p'
.ds BP1.75 \h'-1.75p'
.ds BP2 \h'-2p'
.ds BP2.25 \h'-2.25p'
.ds BP2.5 \h'-2.5p'
.ds BP2.75 \h'-2.75p'
.ds BP3 \h'-3p'
.ds BP3.25 \h'-3.25p'
.ds BP3.5 \h'-3.5p'
.ds BP3.75 \h'-3.75p'
.ds BP4 \h'-4p'
.ds BP4.25 \h'-4.25p'
.ds BP4.5 \h'-4.5p'
.ds BP4.75 \h'-4.75p'
.ds BP5 \h'-5p'
.ds BP5.25 \h'-5.25p'
.ds BP5.5 \h'-5.5p'
.ds BP5.75 \h'-5.75p'
.ds BP6 \h'-6p'
.ds BP6.25 \h'-6.25p'
.ds BP6.5 \h'-6.5p'
.ds BP6.75 \h'-6.75p'
.ds BP7 \h'-7p'
.ds BP7.25 \h'-7.25p'
.ds BP7.5 \h'-7.5p'
.ds BP7.75 \h'-7.75p'
.ds BP8 \h'-8p'
.ds BP8.25 \h'-8.25p'
.ds BP8.5 \h'-8.5p'
.ds BP8.75 \h'-8.75p'
.ds BP9 \h'-9p'
.ds BP9.25 \h'-9.25p'
.ds BP9.5 \h'-9.5p'
.ds BP9.75 \h'-9.75p'
.ds BP10 \h'-10p'
.ds BP10.25 \h'-10.25p'
.ds BP10.5 \h'-10.5p'
.ds BP10.75 \h'-10.75p'
.ds BP11 \h'-11p'
.ds BP11.25 \h'-11.25p'
.ds BP11.5 \h'-11.5p'
.ds BP11.75 \h'-11.75p'
.ds BP12 \h'-12p'
.ds BP12.25 \h'-12.25p'
.ds BP12.5 \h'-12.5p'
.ds BP12.75 \h'-12.75p'
\#
.ds FP.25 \h'.25'
.ds FP.5 \h'.5'
.ds FP.75 \h'.75'
.ds FP1 \h'1p'
.ds FP1.25 \h'1.25p'
.ds FP1.5 \h'1.5p'
.ds FP1.75 \h'1.75p'
.ds FP2 \h'2p'
.ds FP2.25 \h'2.25p'
.ds FP2.5 \h'2.5p'
.ds FP2.75 \h'2.75p'
.ds FP3 \h'3p'
.ds FP3.25 \h'3.25p'
.ds FP3.5 \h'3.5p'
.ds FP3.75 \h'3.75p'
.ds FP4 \h'4p'
.ds FP4.25 \h'4.25p'
.ds FP4.5 \h'4.5p'
.ds FP4.75 \h'4.75p'
.ds FP5 \h'5p'
.ds FP5.25 \h'5.25p'
.ds FP5.5 \h'5.5p'
.ds FP5.75 \h'5.75p'
.ds FP6 \h'6p'
.ds FP6.25 \h'6.25p'
.ds FP6.5 \h'6.5p'
.ds FP6.75 \h'6.75p'
.ds FP7 \h'7p'
.ds FP7.25 \h'7.25p'
.ds FP7.5 \h'7.5p'
.ds FP7.75 \h'7.75p'
.ds FP8 \h'8p'
.ds FP8.25 \h'8.25p'
.ds FP8.5 \h'8.5p'
.ds FP8.75 \h'8.75p'
.ds FP9 \h'9p'
.ds FP9.25 \h'9.25p'
.ds FP9.5 \h'9.5p'
.ds FP9.75 \h'9.75p'
.ds FP10 \h'10p'
.ds FP10.25 \h'10.25p'
.ds FP10.5 \h'10.5p'
.ds FP10.75 \h'10.75p'
.ds FP11 \h'11p'
.ds FP11.25 \h'11.25p'
.ds FP11.5 \h'11.5p'
.ds FP11.75 \h'11.75p'
.ds FP12 \h'12p'
.ds FP12.25 \h'12.25p'
.ds FP12.5 \h'12.5p'
.ds FP12.75 \h'12.75p'
\#
\#
\# WHOLE LINE KERNING (RW and EW)
\# -----------------------------
\# The line kerning macros are special instances of track kerning,
\# used where a complete line needs to be tightened (or relaxed) in
\# order to accomodate or remove one or two more characters
\# than the default justification permits.
\#
\# *Argument:
\#
\# *Function:
\# Invokes .tkf (track kerning) for the current font with
\# 1 as both the upper and lower point size limits, so that
\# the value entered by the user applies regardless of point
\# size. RW ("Reduce Whitespace") reduces the amount of space
\# between all characters by an equal amount. EW ("Extra
\# Whitespace") increases the amount of space.
\# *Notes:
\# Decimal values are acceptable.
\#
\# The groff documentation is a tad confusing about what unit of
\# measure is used in track kerning, only that the width of each
\# character is increased or decreased by the amount(s) passed as
\# arguments to .tkf, and something about linear function of point
\# size. In fact, with the way I've put this macro together, it
\# doesn't matter. All the user needs to know is that a value
\# of one will produce an unacceptably tight or loose line at most
\# text point sizes; therefore, effective use of RW and EW is in
\# the fractional range below 1 (e.g. .25, .5). Given that RW
\# and EW are for massaging type, a certain amount of
\# experimentation and previewing is expected and necessary.
\#
\# \n(.f holds the current font number, which is acceptable to .tkf.
\#
\# RW and EW must be reset to 0 to cancel their effect on
\# subsequent output lines.
\#
.MAC RW END
. if \\n[#BR_AT_LINE_KERN] \{ .br \}
. tkf 1 1 -\\$1 1 -\\$1
. tkf 2 1 -\\$1 1 -\\$1
. tkf 3 1 -\\$1 1 -\\$1
. tkf 4 1 -\\$1 1 -\\$1
.END
\#
\#
.MAC EW END
. if \\n[#BR_AT_LINE_KERN] \{ .br \}
. tkf 1 1 \\$1 1 \\$1
. tkf 2 1 \\$1 1 \\$1
. tkf 3 1 \\$1 1 \\$1
. tkf 4 1 \\$1 1 \\$1
.END
\#
\#
\# BREAK AT LINE KERN
\# ------------------
\# *Arguments:
\# toggle
\# *Function:
\# Enables/disables .br's before .RW and .EW
\# *Notes:
\# Mostly, users will want .br's before any kind of line kerning, but
\# there may be cases where they don't. BR_BEFORE_LINE_KERN is off by
\# default and must be invoked explicitly.
\#
.MAC BR_AT_LINE_KERN END
. ie '\\$1'' \{ .nr #BR_AT_LINE_KERN 1 \}
. el \{ .rr #BR_AT_LINE_KERN \}
.END
\#
\# =====================================================================
\#
\# +++HYPHENATION+++
\#
\# AUTO HYPHENATION
\# ----------------
\# *Arguments:
\# | | DEFAULT
\# or
\# LINES <#> | MARGIN <#> | SPACE <#>
\# *Function:
\# Turns auto hyphenation on or off, resets the hyphenation style
\# to default, or permits the setting of various hyphenation
\# parameters.
\# *Notes:
\# HY ON defaults to .hy 14, i.e. no hyphens after the
\# first two or before the last two characters of a word, and
\# no hyphenation of the last line prior to a trap (e.g.,
\# at the bottom of a page).
\#
\# HY DEFAULT resets the hyphenation style to .hy 14 (see
\# above) if that behaviour is desired after changes have been
\# made to LINES, MARGIN, or SPACE.
\#
\# HY LINES <#> sets the number of allowable consecutive hyphenated lines.
\#
\# HY MARGIN <#> sets the amount of space (ipPcm) allowed at the end
\# of a line in QUAD mode before hyphenation is tripped (e.g. if there's
\# only 6 points left, groff won't try to hyphenate the next word).
\#
\# HY SPACE sets the amount of extra interword space (ipPcm) that can
\# be added in JUSTIFY mode to prevent a line from being hyphenated.
\#
.MAC HY END
. ie '\\$1'' \{\
. hy 14
. nr #HYPHENATE 1
. \}
. el \{\
. if !'\\$1'LINES' \{\
. nh
. nr #HYPHENATE 0
. \}
. if !'\\$1'MARGIN' \{\
. nh
. nr #HYPHENATE 0
. \}
. if !'\\$1'SPACE' \{\
. nh
. nr #HYPHENATE 0
. \}
. if !'\\$1'DEFAULT' \{\
. nh
. nr #HYPHENATE 0
. \}
. if '\\$1'LINES' \{ .hlm \\$2 \}
. if '\\$1'MARGIN' \{ .hym \\$2 \}
. if '\\$1'SPACE' \{ .hys \\$2 \}
. if '\\$1'DEFAULT' \{\
. hlm -1
. hym 0
. hys 0
. \}
. \}
.END
\#
\#
\# HYPHENATION PARAMETERS
\# ----------------------
\# *Arguments:
\# <# of lines> | |
\# *Function:
\# Allows user to specify .HY LINES, MARGIN, and SPACE with a single command.
\#
.MAC HY_SET END
. nr #HY_SET 1
. hlm \\$1
. hym \\$2
. hys \\$3
.END
\#
\# =====================================================================
\#
\# +++VERTICAL SPACING+++
\#
\# ADVANCE LEAD
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #ALD. Adds user supplied lead
\# below current baseline.
\# *Notes:
\# Requires unit of measure ipPcmv.
\#
.MAC ALD END
. nr #ALD (\\$1)
. sp \\n[#ALD]u
.END
\#
\#
\# REVERSE LEAD
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #RLD. Reverses user supplied
\# lead above current baseline.
\# *Notes:
\# Requires unit of measure ipPcmv.
\#
.MAC RLD END
. nr #RLD (\\$1)
. sp -\\n[#RLD]u
.END
\#
\# ALD/RLD STRINGS
\# ---------------
\# The strings \*[ALD.25]...\*[ALD12.75] and their corresponding \*[RLD]
\# forms have been left in for backward compatibility with documents
\# created using mom-1.1.3c or earlier. The prefered methods of advancing
\# and reversing on the page inline are \*[UP #] and \*[DOWN #].
\#
.ds DOWN \v'\\$1\\$2'
.ds UP \v'-\\$1\\$2'
\#
.ds ALD.25 \v'.25p'
.ds ALD.5 \v'.5p'
.ds ALD.75 \v'.75p'
.ds ALD1 \v'1p'
.ds ALD1.25 \v'1.25p'
.ds ALD1.5 \v'1.5p'
.ds ALD1.75 \v'1.75p'
.ds ALD2 \v'2p'
.ds ALD2.25 \v'2.25p'
.ds ALD2.5 \v'2.5p'
.ds ALD2.75 \v'2.75p'
.ds ALD3 \v'3p'
.ds ALD3.25 \v'3.25p'
.ds ALD3.5 \v'3.5p'
.ds ALD3.75 \v'3.75p'
.ds ALD4 \v'4p'
.ds ALD4.25 \v'4.25p'
.ds ALD4.5 \v'4.5p'
.ds ALD4.75 \v'4.75p'
.ds ALD5 \v'5p'
.ds ALD5.25 \v'5.25p'
.ds ALD5.5 \v'5.5p'
.ds ALD5.75 \v'5.75p'
.ds ALD6 \v'6p'
.ds ALD6.25 \v'6.25p'
.ds ALD6.5 \v'6.5p'
.ds ALD6.75 \v'6.75p'
.ds ALD7 \v'7p'
.ds ALD7.25 \v'7.25p'
.ds ALD7.5 \v'7.5p'
.ds ALD7.75 \v'7.75p'
.ds ALD8 \v'8p'
.ds ALD8.25 \v'8.25p'
.ds ALD8.5 \v'8.5p'
.ds ALD8.75 \v'8.75p'
.ds ALD9 \v'9p'
.ds ALD9.25 \v'9.25p'
.ds ALD9.5 \v'9.5p'
.ds ALD9.75 \v'9.75p'
.ds ALD10 \v'10p'
.ds ALD10.25 \v'10.25p'
.ds ALD10.5 \v'10.5p'
.ds ALD10.75 \v'10.75p'
.ds ALD11 \v'11p'
.ds ALD11.25 \v'11.25p'
.ds ALD11.5 \v'11.5p'
.ds ALD11.75 \v'11.75p'
.ds ALD12 \v'12p'
.ds ALD12.25 \v'12.5p'
.ds ALD12.5 \v'12.5p'
.ds ALD12.75 \v'12.75p'
\#
.ds RLD.25 \v'-.25p'
.ds RLD.5 \v'-.5p'
.ds RLD.75 \v'-.75p'
.ds RLD1 \v'-1p'
.ds RLD1.25 \v'-1.25p'
.ds RLD1.5 \v'-1.5p'
.ds RLD1.75 \v'-1.75p'
.ds RLD2 \v'-2p'
.ds RLD2.25 \v'-2.25p'
.ds RLD2.5 \v'-2.5p'
.ds RLD2.75 \v'-2.75p'
.ds RLD3 \v'-3p'
.ds RLD3.25 \v'-3.25p'
.ds RLD3.5 \v'-3.5p'
.ds RLD3.75 \v'-3.75p'
.ds RLD4 \v'-4p'
.ds RLD4.25 \v'-4.25p'
.ds RLD4.5 \v'-4.5p'
.ds RLD4.75 \v'-4.75p'
.ds RLD5 \v'-5p'
.ds RLD5.25 \v'-5.25p'
.ds RLD5.5 \v'-5.5p'
.ds RLD5.75 \v'-5.75p'
.ds RLD6 \v'-6p'
.ds RLD6.25 \v'-6.25p'
.ds RLD6.5 \v'-6.5p'
.ds RLD6.75 \v'-6.75p'
.ds RLD7 \v'-7p'
.ds RLD7.25 \v'-7.25p'
.ds RLD7.5 \v'-7.5p'
.ds RLD7.75 \v'-7.75p'
.ds RLD8 \v'-8p'
.ds RLD8.25 \v'-8.25p'
.ds RLD8.5 \v'-8.5p'
.ds RLD8.75 \v'-8.75p'
.ds RLD9 \v'-9p'
.ds RLD9.25 \v'-9.25p'
.ds RLD9.5 \v'-9.5p'
.ds RLD9.75 \v'-9.75p'
.ds RLD10 \v'-10p'
.ds RLD10.25 \v'-10.25p'
.ds RLD10.5 \v'-10.5p'
.ds RLD10.75 \v'-10.75p'
.ds RLD11 \v'-11p'
.ds RLD11.25 \v'-11.25p'
.ds RLD11.5 \v'-11.5p'
.ds RLD11.75 \v'-11.75p'
.ds RLD12 \v'-12p'
.ds RLD12.25 \v'-12.5p'
.ds RLD12.5 \v'-12.5p'
.ds RLD12.75 \v'-12.75p'
\#
\# =====================================================================
\#
\# +++REFINEMENTS+++
\#
\# AUTOMATIC LIGATURES
\# -------------------
\# *Arguments:
\# |
\# *Function:
\# Turns automatic ligature generation on or off.
\# *Notes:
\# Ligatures may be supplied manually with \(fi, \(fl, etc.
\#
.MAC LIGATURES END
. ie '\\$1'' \{\
. lg
. nr #LIGATURES 1
. \}
. el \{\
. lg 0
. nr #LIGATURES 0
. \}
.END
\#
\#
\# SMARTQUOTES
\# -----------
\# *Arguments:
\# |
\# *Function:
\# Turns smartquotes on or off.
\# *Notes:
\# The " character is read outside the macro when mom is
\# processed. The strings for open/close ($QUOTE#) are then
\# defined in the macro. \N'34' is the ASCII code for ". If
\# incompatibilities arise, find the code for " that applies
\# to your system and plug in that code instead.
\#
.char " \\*[$QUOTE\\n[#OPEN_CLOSE]]\R'#OPEN_CLOSE (1-\\n[#OPEN_CLOSE])'
\#
.MAC SMARTQUOTES END
. ie '\\$1'' \{\
. nr #OPEN_CLOSE 0
. ds $QUOTE0 ``
. ds $QUOTE1 ''
. nr #SMART_QUOTES 1
. \}
. el \{\
. ds $QUOTE0 \\N'34'
. ds $QUOTE1 \\N'34'
. nr #SMART_QUOTES 0
. \}
.END
\#
.ds FOOT \(fm
.ds INCH \(fm\(fm
\#
\# =====================================================================
\#
\# +++LINE BREAKS+++
\#
\# NO-SPACE BREAK
\# --------------
\# *Argument:
\#
\# *Function:
\# Breaks a line without advancing.
\# *Notes:
\# EL is the mnemonic used on older, dedicated typesetting machines
\# to indicate "process the line, then return to the left margin
\# without advancing the galley medium." It stands for End Line.
\#
\# Sadly, EL is only a fake. It will work in all instances EXCEPT
\# when the line to be EL'd is the last line before a footer trap.
\# Use TRAP OFF/TRAP to circumvent this.
\#
.MAC EL END
. br
. sp -1v
.END
\#
\# =====================================================================
\#
\# +++FILLING/QUADDING/JUSTIFYING+++
\#
\# JUSTIFY
\# -------
\# *Argument:
\#
\# *Function:
\# Turns fill on and sets .ad to b.
\# *Notes:
\# Justifies text left and right.
\#
.MAC JUSTIFY END
. if \\n[#TAB_ACTIVE]=0 \{\
. nr #QUAD 1
. ds $RESTORE_QUAD_VALUE \\*[$QUAD_VALUE]
. \}
' ce 0
. QUAD J
. if \\n[#PRINT_STYLE]=1 \{ .QUAD L \}
. nr #FILL 0
.END
\#
\#
\# QUAD
\# ----
\# *Arguments:
\# L | LEFT | R | RIGHT | C | CENTER/CENTRE
\# *Function:
\# Turns fill on and sets .ad to l, r, or c.
\# *Notes:
\# Terminology is a problem here. Some people call quad left
\# left justified, flush left, or flush left/rag right (and the
\# reverse for quad right). Quad center is sometimes called rag
\# both. For our purposes, all "quad" modes mean that groff fill
\# mode is enabled.
\#
.MAC QUAD END
. ds $QUAD_VALUE \\$1
. if \\n[#TAB_ACTIVE]=0 \{\
. nr #QUAD 1
. ds $RESTORE_QUAD_VALUE \\*[$QUAD_VALUE]
. \}
' ce 0
' fi
. if '\\*[$QUAD_VALUE]'L' \{ .ad l \}
. if '\\*[$QUAD_VALUE]'LEFT' \{ .ad l \}
. if '\\*[$QUAD_VALUE]'R' \{ .ad r \}
. if '\\*[$QUAD_VALUE]'RIGHT' \{ .ad r \}
. if '\\*[$QUAD_VALUE]'C' \{ .ad c \}
. if '\\*[$QUAD_VALUE]'CENTER' \{ .ad c \}
. if '\\*[$QUAD_VALUE]'CENTRE' \{ .ad c \}
. if '\\*[$QUAD_VALUE]'J' \{ .ad b \}
. if '\\*[$QUAD_VALUE]'JUSTIFY' \{ .ad b \}
. nr #FILL 0
.END
\#
\#
\# LEFT, RIGHT, AND CENTER
\# -----------------------
\# The purpose of these macros is to allow the user to enter lines
\# of text that will be quadded LRC *without* the user having to
\# enter .BR or .br between lines. For the sake of consistency,
\# all three appear to behave similarly (from the point of view of the user),
\# although the underlying primitives don't. For this reason, LEFT,
\# RIGHT, and CENTER must be followed by .QUAD [L R C J] or .JUSTIFY
\# to restore text to groff fill mode.
\#
\# LEFT
\# ----
\# *Argument:
\#
\# *Function:
\# Turns fill mode off. Allows user to quad lines left without
\# requiring the .BR or .br macro.
\# *Notes:
\# LEFT simply turns fill off. Lines that exceed the current LL will
\# not be broken, simply continued (indefinitely) until a return is
\# encountered. Note that this behaviour differs from the RIGHT and
\# CENTER macros.
\#
.MAC LEFT END
. if \\n[#TAB_ACTIVE]=0 \{\
. rr #QUAD
. ds $RESTORE_QUAD_VALUE LEFT
. \}
. ce 0
. nf
. nr #FILL 1
.END
\#
\#
\# RIGHT
\# -----
\# *Argument:
\#
\# *Function:
\# Turns fill on. Allows user to quad lines right without
\# requiring the .BR or .br macro.
\# *Notes:
\# Lines that exceed the current LL will be broken, with the excess
\# text quadded right.
\#
.MAC RIGHT END
. if \\n[#TAB_ACTIVE]=0 \{\
. rr #QUAD
. ds $RESTORE_QUAD_VALUE RIGHT
. \}
. fi
. rj 100000
. nr #FILL 1
.END
\#
\#
\# CENTER
\# ------
\# *Argument:
\#
\# *Function:
\# Turns fill on. Allows user to center lines without
\# requiring the .BR or .br macro.
\# *Notes:
\# Lines that exceed the current LL will be broken, with the excess
\# text centered.
\#
.MAC CENTER END
. if \\n[#TAB_ACTIVE]=0 \{\
. ds $RESTORE_QUAD_VALUE CENTER
. \}
. fi
. ce 100000
. nr #FILL 1
.END
\#
\# =====================================================================
\#
\# +++TABS+++
\#
\# There are two different kinds of tabs available: typesetting tabs
\# and string tabs.
\#
\# Typesetting tabs are set with TAB_SET, which requires a tab number,
\# an indent (offset) from the left margin and a length (optionally
\# with a quad direction and an instruction to fill lines). After tabs
\# are set with TS, they are called with .TAB <#>, where <#>
\# corresponds to the number passed to TAB_SET as a valid tab number.
\#
\# String tabs allow the user to mark off tab positions inline. Tab
\# indents and lengths are calculated from the beginning and end
\# positions of the marks. Up to 19 string tabs may be created,
\# numbered 1-19. Once created, they are called with .TAB <#>,
\# just like typesetting tabs.
\#
\# Setting up string tabs is a two-step procedure. First, the user
\# enters an input line in which s/he wants to mark off string tabs.
\# The beginning of a tab is marked with \*[ST<#>], where <#> is
\# the desired number of the tab. The end of the the tab is marked
\# with \*[ST<#>X]. All ST's must have a matching STX. String tabs
\# may be nested.
\#
\# Next, the user invokes .ST <#> for every string tab defined, and
\# optionally passes quad information to it. That done, string tabs
\# can be called just like typesetting tabs.
\#
\# String tabs don't preview properly with gxditview. Use gv instead.
\#
\# Strings for string tab inlines
\# ------------------------------
\#
.ds ST1 \Ek[#ST1_OFFSET]
.ds ST2 \Ek[#ST2_OFFSET]
.ds ST3 \Ek[#ST3_OFFSET]
.ds ST4 \Ek[#ST4_OFFSET]
.ds ST5 \Ek[#ST5_OFFSET]
.ds ST6 \Ek[#ST6_OFFSET]
.ds ST7 \Ek[#ST7_OFFSET]
.ds ST8 \Ek[#ST8_OFFSET]
.ds ST9 \Ek[#ST9_OFFSET]
.ds ST10 \Ek[#ST10_OFFSET]
.ds ST11 \Ek[#ST11_OFFSET]
.ds ST12 \Ek[#ST12_OFFSET]
.ds ST13 \Ek[#ST13_OFFSET]
.ds ST14 \Ek[#ST14_OFFSET]
.ds ST15 \Ek[#ST15_OFFSET]
.ds ST16 \Ek[#ST16_OFFSET]
.ds ST17 \Ek[#ST17_OFFSET]
.ds ST18 \Ek[#ST18_OFFSET]
.ds ST19 \Ek[#ST19_OFFSET]
.ds ST1X \Ek[#ST1_MARK]
.ds ST2X \Ek[#ST2_MARK]
.ds ST3X \Ek[#ST3_MARK]
.ds ST4X \Ek[#ST4_MARK]
.ds ST5X \Ek[#ST5_MARK]
.ds ST6X \Ek[#ST6_MARK]
.ds ST7X \Ek[#ST7_MARK]
.ds ST8X \Ek[#ST8_MARK]
.ds ST9X \Ek[#ST9_MARK]
.ds ST10X \Ek[#ST10_MARK]
.ds ST11X \Ek[#ST11_MARK]
.ds ST12X \Ek[#ST12_MARK]
.ds ST13X \Ek[#ST13_MARK]
.ds ST14X \Ek[#ST14_MARK]
.ds ST15X \Ek[#ST15_MARK]
.ds ST16X \Ek[#ST16_MARK]
.ds ST17X \Ek[#ST17_MARK]
.ds ST18X \Ek[#ST18_MARK]
.ds ST19X \Ek[#ST19_MARK]
\#
\#
\# QUAD AND SET STRING TABS
\# ------------------------
\# *Arguments:
\# L | R | C | J [QUAD]
\# *Function:
\# Creates strings $ST<#>_QUAD_DIR and $ST<#>_FILL, then sets up a
\# tab based on the collected information.
\# *Notes:
\# Like TS, ST invoked without a quad direction will default to LEFT.
\# If lines should be filled and quadded, use the optional argument QUAD.
\# N.B. -- indents *must* be turned off before setting string tabs
\# inside .PAD
\#
.MAC ST END
. ds $ST\\$1_QUAD_DIR \\$2
. if \\n[#NUM_ARGS]=3 \{\
. ds $ST\\$1_FILL QUAD
. \}
. nr #ST\\$1_LENGTH \\n[#ST\\$1_MARK]-\\n[#ST\\$1_OFFSET]
. ie \\n[#IN_TAB] \{\
. TAB_SET \\$1 \\n[#ST\\$1_OFFSET]u+\\n[#ST_OFFSET]u \\n[#ST\\$1_LENGTH]u \\*[$ST\\$1_QUAD_DIR] \\*[$ST\\$1_FILL]
. \}
. el \{\
. TAB_SET \\$1 \\n[#ST\\$1_OFFSET]u \\n[#ST\\$1_LENGTH]u \\*[$ST\\$1_QUAD_DIR] \\*[$ST\\$1_FILL]
. \}
.END
\#
\#
\# TAB SET
\# -------
\# *Arguments:
\# <#> ident(ipPcm) length(ipPcm) [L | R | C | J [QUAD]]
\# *Function:
\# Creates macros TAB<#> and TAB <#>, where # is any arbitrary number.
\# TAB# is a typesetting tab (i.e. a tab defined as an indent
\# from the page left offset plus a line length.)
\# *Notes:
\# <#> = arbitrary digit to identify the tab
\# indent = indent from left margin; unit of measure required
\# length = length of tab (unit of measure required; can be
\# \w''u--if more than one word in string, surround
\# with double quotes "\w''"
\# LRCJ = quad for tab (left, right, center, justified)
\# If option QUAD afterwards is not given, quad is line for line
\# (no fill mode), meaning that there's no need for .BR or .br
\# between lines.
\# QUAD = fill tab (so it behaves as if .QUAD LRC or .JUSTIFY
\# had been given).
\#
\# N.B. -- indents *must* be turned off before setting tabs
\#
\# Examples:
\#
\# .TAB_SET 1 2P+6p 12P C
\#
\# means "create a tab numbered 1 that starts 2 picas and 6 points from
\# the left margin, is 12 picas long, and centre each input line."
\#
\# .TAB_SET 1 2P+6P 12P C QUAD
\#
\# means exactly the same thing, except that input lines are joined and
\# the area delimted by the tab filled with centered text.
\#
\# TAB <#> can be called at any time after being set.
\#
\# Tabs are NOT columnar in behaviour. If the text inside a
\# tab runs to several lines, when you call the next tab a break
\# occurs, meaning that the new tab starts one line below the last
\# line in the previous tab. For columnar behaviour, you must
\# use the multi-column macros in addition to tabs.
\#
\# If you want tabs to line up bottom-line to bottom-line (most likely
\# single line tabs), use .TN (provided the tabs are numbered sequentially).
\# Otherwise, you must use .EL then .TAB # if you want them to align.
\#
\# If you want to reset tabs, you must use .TQ before .TAB_SET.
\#
\# Note that indents are turned off automatically whenever a new
\# tab is called with TAB #.
\#
\# Tabs themselves are user-invoked using the TAB macro with a numeric
\# argument, e.g. TAB 1.
\#
\# Generally, in order not to get confused, it's a good idea
\# to make sure all indents are off before setting tabs.
\#
.MAC TAB_SET END
. br
. nr #TAB_NUMBER \\$1
. ds $CURRENT_TAB \\n[#TAB_NUMBER]
. nr #TAB_OFFSET (\\$2)
. nr #TAB_LENGTH (\\$3)
. MAC TAB\\n[#TAB_NUMBER] DONE \"Define TAB macro
. br
. in 0
. nr #TAB_ACTIVE 1
. nr #CURRENT_TAB \\n[#TAB_NUMBER]
. po \\n[#L_MARGIN]u+\\n[#TAB_OFFSET]u
. nr #ST_OFFSET \\n[#TAB_OFFSET]
. nr #TAB_OFFSET\\*[$CURRENT_TAB] \\n[#TAB_OFFSET]
. ll \\n[#TAB_LENGTH]u
. ta \En(.lu
. ie '\\$5'QUAD' \{\
. if '\\$4'L' \{ .QUAD L \}
. if '\\$4'R' \{ .QUAD R \}
. if '\\$4'C' \{ .QUAD C \}
. if '\\$4'J' \{ .JUSTIFY \}
. \}
. el \{\
. if '\\$4'' \{ .LEFT \}
. if '\\$4'L' \{ .LEFT \}
. if '\\$4'R' \{ .RIGHT \}
. if '\\$4'C' \{ .CENTER \}
. if '\\$4'J' \{ .JUSTIFY \}
. \}
.DONE
. rr #TAB_ACTIVE
.END
\#
\#
\# TAB
\# ---
\# *Arguments:
\#
\# *Function:
\# Moves to tab number passed as an argument.
\#
.MAC TAB END
. ds $TAB_NUMBER \\$1
. TAB\\*[$TAB_NUMBER]
. nr #IN_TAB 1
. po \\n[#L_MARGIN]u+\\n[#TAB_OFFSET\\*[$TAB_NUMBER]]u
.END
\#
\#
\# TAB NEXT
\# --------
\# *Argument:
\#
\# *Function:
\# Automagically moves to TAB#+1 on the same line as the last
\# line of the previous tab.
\# *Notes:
\# If the tabs being aligned fall too close to the footer
\# trap, the line entered after .TN will appear on the next page.
\#
.MAC TN END
. br
. nr #NEXT_TAB \\n[#CURRENT_TAB]+1
. TAB\\n[#NEXT_TAB]
. sp -1v
.END
\#
\#
\# TAB QUIT
\# --------
\# *Argument:
\#
\# *Function:
\# Sets #TAB_ACTIVE to "0" (off).
\# Resets left margin to value in effect prior to tabs.
\# Resets line length to value in effect prior to tabs.
\# Checks #QUAD to see if we were in flush or quad mode
\# prior to tabs (0=off, 1=on).
\# Resets QUAD [ L|R|C ], LEFT, RIGHT, CENTER, or JUSTIFY
\# in effect prior to tabs.
\# *Notes:
\# TQ *must* come before setting any new tabs if you want the
\# tabs' indents measured from page left. Otherwise, the tabs'
\# indents are measured from the left margin of the tab you're
\# currently in.
\#
.MAC TQ END
. br
. rr #TAB_ACTIVE
. rr #IN_TAB
. po \\n[#L_MARGIN]u
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. ie \\n[#QUAD] \{\
. ie '\\*[$RESTORE_QUAD_VALUE]'J' \{ .JUSTIFY \}
. el \{ .QUAD \\*[$RESTORE_QUAD_VALUE] \}
. \}
. el \{\
. if '\\*[$RESTORE_QUAD_VALUE]'LEFT' \{ .LEFT \}
. if '\\*[$RESTORE_QUAD_VALUE]'RIGHT' \{ .RIGHT \}
. if '\\*[$RESTORE_QUAD_VALUE]'CENTER' \{ .CENTER \}
. \}
.END
\#
\# =====================================================================
\#
\# +++MISCELLANEOUS USEFUL MACROS AND STRINGS+++
\#
\# UNDERLINE
\# ---------
\# *Arguments:
\# |
\# *Function:
\# When on, underlines all letters, words, and digits in a passage,
\# ignoring punctuation and spaces.
\# *Notes:
\# Only for use when the font family is COURIER, to simulate
\# typewriter-style underlining of italic passages.
\#
.MAC UNDERLINE END
. ie '\\$1'' \{\
. nr #UNDERLINE_ON 1
. char A _A
. char B _B
. char C _C
. char D _D
. char E _E
. char F _F
. char G _G
. char H _H
. char I _I
. char J _J
. char K _K
. char L _L
. char M _M
. char N _N
. char O _O
. char P _P
. char Q _Q
. char R _R
. char S _S
. char T _T
. char U _U
. char V _V
. char W _W
. char X _X
. char Y _Y
. char Z _Z
. char \[`A] _\[`A]
. char \[^A] _\[^A]
. char \['A] _\['A]
. char \[:A] _\[:A]
. char \[oA] _\[oA]
. char \[~A] _\[~A]
. char \[AE] _\[AE]
. char \[`E] _\[`E]
. char \[^E] _\[^E]
. char \['E] _\['E]
. char \[:E] _\[:E]
. char \[`I] _\[`I]
. char \[^I] _\[^I]
. char \['I] _\['I]
. char \[:I] _\[:I]
. char \[`O] _\[`O]
. char \[^O] _\[^O]
. char \['O] _\['O]
. char \[:O] _\[:O]
. char \[~O] _\[~O]
. char \[/O] _\[/O]
. char \[`U] _\[`U]
. char \[^U] _\[^U]
. char \['U] _\['U]
. char \[:U] _\[:U]
. char \[,C] _\[,C]
. char \[-D] _\[-D]
. char \[~N] _\[~N]
. char \[TP] _\[TP]
. char \['Y] _\['Y]
. char \[:Y] _\[:Y]
. char a _a
. char b _b
. char c _c
. char d _d
. char e _e
. char f _f
. char g _g
. char h _h
. char i _i
. char j _j
. char k _k
. char l _l
. char m _m
. char n _n
. char o _o
. char p _p
. char q _q
. char r _r
. char s _s
. char t _t
. char u _u
. char v _v
. char w _w
. char x _x
. char y _y
. char z _z
. char \[`a] _\[`a]
. char \[^a] _\[^a]
. char \['a] _\['a]
. char \[:a] _\[:a]
. char \[oa] _\[oa]
. char \[~a] _\[~a]
. char \[ae] _\[ae]
. char \[`e] _\[`e]
. char \[^e] _\[^e]
. char \['e] _\['e]
. char \[:e] _\[:e]
. char \[`i] _\[`i]
. char \[^i] _\[^i]
. char \['i] _\['i]
. char \[:i] _\[:i]
. char \[`o] _\[`o]
. char \[^o] _\[^o]
. char \['o] _\['o]
. char \[:o] _\[:o]
. char \[~o] _\[~o]
. char \[/o] _\[/o]
. char \[`u] _\[`u]
. char \[^u] _\[^u]
. char \['u] _\['u]
. char \[:u] _\[:u]
. char \[,c] _\[,c]
. char \[Sd] _\[Sd]
. char \[~n] _\[~n]
. char \[Tp] _\[Tp]
. char \['y] _\['y]
. char \[:y] _\[:y]
. char \[ss] _\[ss]
. char ' _'
. char 1 _1
. char 2 _2
. char 3 _3
. char 4 _4
. char 5 _5
. char 6 _6
. char 7 _7
. char 8 _8
. char 9 _9
. char 0 _0
. \}
. el \{\
. nr #UNDERLINE_ON 0
. rchar A B C D E F G H I J K L M N O P Q R S T U V W X Y Z \
a b c d e f g h i j k l m n o p q r s t u v w x y z \
\[`A] \[^A] \['A] \[:A] \[oA] \[~A] \[AE] \[`E] \[^E] \['E] \[:E] \
\[`I] \[^I] \['I] \[:I] \[`O] \[^O] \['O] \[:O] \[~O] \[/O] \[`U] \
\[^U] \['U] \[:U] \[,C] \[-D] \[~N] \[TP] \['Y] \[:Y] \
\[`a] \[^a] \['a] \[:a] \[oa] \[~a] \[ae] \[`e] \[^e] \['e] \[:e] \[`i] \
\[^i] \['i] \[:i] \[`o] \[^o] \['o] \[:o] \[~o] \[/o] \[`u] \[^u] \['u] \
\[:u] \[,c] \[Sd] \[~n] \[Tp] \['y] \[:y] \[ss] \
1 2 3 4 5 6 7 8 9 0
. \}
.END
\#
\#
\# UL/ULX
\# ------
\# *Arguments:
\#
\# *Function:
\# Underscores all letters, words, and digits in a passage,
\# ignoring punctuation and spaces.
\# *Notes:
\# Intended to be called with inline escapes \*[UL] (underline
\# on) and \*[ULX] (underline off). Only works when the font family
\# is COURIER, to simulate typewriter-style underlining of italic
\# passages.
\#
.MAC UL END
\c\R'#UNDERLINE_ON 1'
. char A _A
. char B _B
. char C _C
. char D _D
. char E _E
. char F _F
. char G _G
. char H _H
. char I _I
. char J _J
. char K _K
. char L _L
. char M _M
. char N _N
. char O _O
. char P _P
. char Q _Q
. char R _R
. char S _S
. char T _T
. char U _U
. char V _V
. char W _W
. char X _X
. char Y _Y
. char Z _Z
. char \[`A] _\[`A]
. char \[^A] _\[^A]
. char \['A] _\['A]
. char \[:A] _\[:A]
. char \[oA] _\[oA]
. char \[~A] _\[~A]
. char \[AE] _\[AE]
. char \[`E] _\[`E]
. char \[^E] _\[^E]
. char \['E] _\['E]
. char \[:E] _\[:E]
. char \[`I] _\[`I]
. char \[^I] _\[^I]
. char \['I] _\['I]
. char \[:I] _\[:I]
. char \[`O] _\[`O]
. char \[^O] _\[^O]
. char \['O] _\['O]
. char \[:O] _\[:O]
. char \[~O] _\[~O]
. char \[/O] _\[/O]
. char \[`U] _\[`U]
. char \[^U] _\[^U]
. char \['U] _\['U]
. char \[:U] _\[:U]
. char \[,C] _\[,C]
. char \[-D] _\[-D]
. char \[~N] _\[~N]
. char \[TP] _\[TP]
. char \['Y] _\['Y]
. char \[:Y] _\[:Y]
. char a _a
. char b _b
. char c _c
. char d _d
. char e _e
. char f _f
. char g _g
. char h _h
. char i _i
. char j _j
. char k _k
. char l _l
. char m _m
. char n _n
. char o _o
. char p _p
. char q _q
. char r _r
. char s _s
. char t _t
. char u _u
. char v _v
. char w _w
. char x _x
. char y _y
. char z _z
. char \[`a] _\[`a]
. char \[^a] _\[^a]
. char \['a] _\['a]
. char \[:a] _\[:a]
. char \[oa] _\[oa]
. char \[~a] _\[~a]
. char \[ae] _\[ae]
. char \[`e] _\[`e]
. char \[^e] _\[^e]
. char \['e] _\['e]
. char \[:e] _\[:e]
. char \[`i] _\[`i]
. char \[^i] _\[^i]
. char \['i] _\['i]
. char \[:i] _\[:i]
. char \[`o] _\[`o]
. char \[^o] _\[^o]
. char \['o] _\['o]
. char \[:o] _\[:o]
. char \[~o] _\[~o]
. char \[/o] _\[/o]
. char \[`u] _\[`u]
. char \[^u] _\[^u]
. char \['u] _\['u]
. char \[:u] _\[:u]
. char \[,c] _\[,c]
. char \[Sd] _\[Sd]
. char \[~n] _\[~n]
. char \[Tp] _\[Tp]
. char \['y] _\['y]
. char \[:y] _\[:y]
. char \[ss] _\[ss]
. char ' _'
. char 1 _1
. char 2 _2
. char 3 _3
. char 4 _4
. char 5 _5
. char 6 _6
. char 7 _7
. char 8 _8
. char 9 _9
. char 0 _0
.END
\#
\#
.MAC ULX END
\c\R'#UNDERLINE_ON 0'
. rchar A B C D E F G H I J K L M N O P Q R S T U V W X Y Z \
a b c d e f g h i j k l m n o p q r s t u v w x y z \
\[`A] \[^A] \['A] \[:A] \[oA] \[~A] \[AE] \[`E] \[^E] \['E] \[:E] \
\[`I] \[^I] \['I] \[:I] \[`O] \[^O] \['O] \[:O] \[~O] \[/O] \[`U] \
\[^U] \['U] \[:U] \[,C] \[-D] \[~N] \[TP] \['Y] \[:Y] \
\[`a] \[^a] \['a] \[:a] \[oa] \[~a] \[ae] \[`e] \[^e] \['e] \[:e] \[`i] \
\[^i] \['i] \[:i] \[`o] \[^o] \['o] \[:o] \[~o] \[/o] \[`u] \[^u] \['u] \
\[:u] \[,c] \[Sd] \[~n] \[Tp] \['y] \[:y] \[ss] \
1 2 3 4 5 6 7 8 9 0
.END
\#
\#
\# UNDERSCORE
\# ----------
\# *Arguments:
\# [points below baseline] "text"
\# *Function:
\# Places an underscore 2 points under the string if no lead given,
\# otherwise places underscore under string by user specified amount.
\# *Notes:
\# When using this macro, the string to be underscored must begin
\# with double-quotes ("), regardless of whether it's the sole
\# argument or the second.
\# E.g.:
\# .UNDERSCORE "Text to be underscored
\# or
\# .UNDERSCORE 2p "Text to be underscored
\#
\# All text is underscored (including punctuation and spaces).
\# This is the primary difference between UNDERLINE and UNDERSCORE,
\# aside from the fact the UNDERLINE only works with Courier.
\#
\# UNDERSCORE does not work across line breaks. Each line of
\# text must be entered separately with UNDERSCORE. If the
\# UNDERSCORE begins in the middle of a line and crosses over a
\# break, the portion before the break must be entered in its own
\# UNDERSCORE, as must the portion that comes after the break.
\#
.MAC UNDERSCORE END
. nr #RESTORE_PT_SIZE \\n[#PT_SIZE]
. ie \\n[#NUM_ARGS]=1 \{ \\$1\\s(12\\v'+2p'\\l'|0'\\v'-2p'\\s[\\n[#RESTORE_PT_SIZE]u] \}
. el \{ \\$2\\s(12\\v'+(\\$1)'\\l'|0'\\v'-(\\$1)'\\s[\\n[#RESTORE_PT_SIZE]u] \}
. rr #RESTORE_PT_SIZE
.END
\#
\#
\# DOUBLE UNDERSCORE
\# -----------------
\# *Arguments:
\# [points below baseline] [points distance between rules] "text"
\# *Function:
\# Same as UNDERSCORE, except it produces a double underscore. The default
\# distance between the rules is 2 points.
\# *Notes:
\# The same double-quote requirement as UNDERSCORE.
\#
.MAC UNDERSCORE2 END
. nr #RESTORE_PT_SIZE \\n[#PT_SIZE]
. if \\n[#NUM_ARGS]=1 \{\
. PRINT \\$1\\s(12\\v'+2p'\\l'|0'\\v'+2p'\\l'|0'\\v'-4p'\\s[\\n[#RESTORE_PT_SIZE]u]
. \}
. if \\n[#NUM_ARGS]=2 \{\
. PRINT \\$2\\s(12\\v'+\\$1'\\l'|0'\\v'+2p'\\l'|0'\\v'-(2p+\\$1)'\\s[\\n[#RESTORE_PT_SIZE]u]
. \}
. if \\n[#NUM_ARGS]=3 \{\
. PRINT \\$3\\s(12\\v'+\\$1'\\l'|0'\\v'+\\$2'\\l'|0'\\v'-(\\$2+\\$1)'\\s[\\n[#RESTORE_PT_SIZE]u]
. \}
. rr #RESTORE_PT_SIZE
.END
\#
\#
\# SUPERSCRIPT INLINES
\# -------------------
\# *Function:
\# Prints everything after invocation as superscript.
\# *Notes:
\# \*[SUP] and \*[SUPX] turn superscript on and off respectively.
\# If running type is pseudo-condensed/expanded, invoke the superscript
\# strings as \*[CONDSUP] or \*[EXTSUP] and turn off with \*[CONDSUPX]
\# and \*[EXTSUPX] respectively.
\#
.ds SUP \
\R'#PT_SIZE_IN_UNITS \En[.ps]'\
\R'#SUP_PT_SIZE \En[#PT_SIZE_IN_UNITS]u*6u/10u'\
\s[\En[#PT_SIZE_IN_UNITS]u]\v'-.3m'\s[\En[#SUP_PT_SIZE]u]
\#
.ds SUPX \s[\En[#PT_SIZE_IN_UNITS]u]\v'.3m'
\#
.ds CONDSUP \
\R'#PT_SIZE_IN_UNITS \En[.ps]'\
\R'#SUP_PT_SIZE \En[#PT_SIZE_IN_UNITS]u*6u/10u'\
\s[\En[#PT_SIZE_IN_UNITS]u]\v'-.3m'\s[\En[#SUP_PT_SIZE]u]\E*[COND_FOR_SUP]
\#
.ds CONDSUPX \s[\En[#PT_SIZE_IN_UNITS]u]\v'.3m'\E*[COND]
\#
.ds EXTSUP \
\R'#PT_SIZE_IN_UNITS \En[.ps]'\
\R'#SUP_PT_SIZE \En[#PT_SIZE_IN_UNITS]u*6u/10u'\
\s[\En[#PT_SIZE_IN_UNITS]u]\v'-.3m'\s[\En[#SUP_PT_SIZE]u]\E*[EXT_FOR_SUP]
\#
.ds EXTSUPX \s[\En[#PT_SIZE_IN_UNITS]u]\v'.3m'\E*[EXT]
\#
\#
\# SLANT
\# -----
\#
\# SETSLANT
\# --------
\# *Arguments:
\# | RESET
\# *Function:
\# Modifies register #DEGREES for use with \*[SLANT], or resets
\# it to the default. Defines string \*[SLANTX]
\# *Notes:
\# \*[SLANT] permits pseudo-italicizing of a font in cases where
\# no italic font exists in a particular family.
\#
\# Default # of degrees is 15.
\#
\# Do not use unit of measure with arg to SETSLANT.
\#
\# It may be necessary to adjust the spacing on either side of
\# [SLANT] and [SLANTX].
\#
\# In docs, SLANT carries over from para to para.
\#
.nr #DEGREES 15
.ds SLANT \ER'#SLANT_ON 1'\ES'\En[#DEGREES]'
.ds SLANTX \ER'#SLANT_ON 0'\ES'0'
\#
.MAC SETSLANT END
. ie '\\$1'RESET' \{\
. nr #DEGREES 15
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_SLANT] \{ .return \}
. \}
. ds SLANT \ER'#SLANT_ON 1'\ES'\En[#DEGREES]'
. \}
. el \{\
. nr #DEGREES \\$1
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_SLANT] \{ .return \}
. \}
. ds SLANT \ER'#SLANT_ON 1'\ES'\En[#DEGREES]'
. \}
. ds SLANTX \ER'#SLANT_ON 0'\ES'0'
.END
\#
\#
\# BOLDER
\# ------
\#
\# SETBOLDER
\# ---------
\# *Arguments:
\# | RESET
\# *Function:
\# Modifies register #BOLDER_UNITS for use with \*[BOLDER], or resets
\# it to the default 700 units.
\# *Notes:
\# \*[BOLDER] allows pseudo-emboldening of a font where no bold
\# font exists in a particular family.
\#
\# Default for SETBOLDER is 700 units. Do not use unit of measure
\# with arg to SETBOLDER.
\#
.nr #BOLDER_UNITS 700
\#
.MAC SETBOLDER END
. if \\n[#IGNORE]=1 \{ .return \}
. ie '\\$1'RESET' \{ .nr #BOLDER_UNITS 700 \}
. el \{ .nr #BOLDER_UNITS \\$1 \}
.END
\#
\#
.MAC BOLDER END
\c
.bd \\n(.f \\n[#BOLDER_UNITS]
.END
\#
\#
.MAC BOLDERX END
\c
.bd \\n(.f
.END
\#
\# +++CONDENSE/EXTEND+++
\#
\# CONDENSE/EXTEND
\# ---------------
\# *Arguments:
\#
\# *Function:
\# Stores current point size in z's in #PT_SIZE_IN_UNITS, figures out
\# new point size (for character width) from arg, and defines string
\# COND or EXT, which set the type size to the new character width,
\# and sets the height of type to the value stored in CURRENT_PT_SIZE
\# *Notes:
\# CONDENSE_OR_EXTEND is invoked from the aliases
\# CONDENSE and EXTEND. CONDENSE implies <100, EXTEND
\# implies >100. Do not use a percent sign in the argument.
\#
\# There is no default setting for CONDENSE or EXTEND.
\# 80 is a good approximation of condensed type, 120 is okay
\# for extended.
\#
\# The value set by CONDENSE or EXTEND applies to all
\# subsequent \*[COND] or \*[EXT] escapes until a new value is set.
\#
\# \*[COND] or \*[EXT] must be turned off before all changes of point
\# size and reinvoked afterwards (if so desired). This refers to
\# changes of point size via control lines AND with via inlines.
\#
.MAC CONDENSE_OR_EXTEND END
. if '\\$0'CONDENSE' \{\
. ds $COND_PERCENT \\$1
. if \\n[#PRINT_STYLE]=1 \{\
. rm $COND_PERCENT
. ds $COND_PERCENT 100
. \}
. ds COND \
\R'#PT_SIZE_IN_UNITS \En[.ps]'\
\R'#CONDENSE 1'\
\R'#COND_WIDTH (\En[#PT_SIZE_IN_UNITS]u*\E*[$COND_PERCENT]u)/100'\
\Es[\En[#COND_WIDTH]u]\EH'\En[#PT_SIZE_IN_UNITS]u'
. ds COND_FOR_SUP \
\R'#COND_WIDTH (\En[#SUP_PT_SIZE]u*\E*[$COND_PERCENT]u)/100'\
\Es[\En[#COND_WIDTH]u]\H'\En[#SUP_PT_SIZE]u'
. \}
. if '\\$0'EXTEND' \{\
. ds $EXT_PERCENT \\$1
. if \\n[#PRINT_STYLE]=1 \{\
. rm $EXT_PERCENT
. ds $EXT_PERCENT 100
. \}
. ds EXT \
\R'#PT_SIZE_IN_UNITS \En[.ps]'\
\R'#EXTEND 1'\
\R'#EXT_WIDTH (\En[#PT_SIZE_IN_UNITS]u*\E*[$EXT_PERCENT]u)/100'\
\Es[\En[#EXT_WIDTH]u]\EH'\En[#PT_SIZE_IN_UNITS]u'
. ds EXT_FOR_SUP \
\R'#EXT_WIDTH (\En[#SUP_PT_SIZE]u*\E*[$EXT_PERCENT]u)/100'\
\Es[\En[#EXT_WIDTH]u]\H'\En[#EXT_PT_SIZE]u'
. \}
.END
\#
.ds CONDX \ER'#CONDENSE 0'\Es0\R'#PT_SIZE_IN_UNITS \En[.ps]'\H'\En[#PT_SIZE_IN_UNITS]u'
.ds EXTX \ER'#EXTEND 0'\Es0\R'#PT_SIZE_IN_UNITS \En[.ps]'\H'\En[#PT_SIZE_IN_UNITS]u'
\#
\#
\# +++PAD LINES+++ (insert space)
\#
\# PAD MARKER
\# ----------
\# *Arguments:
\#
\# *Function:
\# Defines string $PAD_MARKER, used in PAD
\# *Notes:
\# $PAD_MARKER is normally # (the pound sign).
\#
.MAC PAD_MARKER END
. ds $PAD_MARKER \\$1
.END
\#
\#
\# PAD
\# ---
\# *Argments:
\# ""
\# *Function:
\# Defines and redefines padding character (default=pound sign unless
\# padding character has been set with PAD_MARKER) several times
\# so that when the string is output at the end of the macro, every #
\# has been converted to an equal-sized amount of padding (blank space)
\# on a line. # is equivalent to CompuGraphic's old .
\# *Notes:
\# String tabs may be marked off during PAD.
\#
.MAC PAD END
. if \\n(.u=1 \{ .nr #FILL_MODE 1 \}
. nf
. if !d$PAD_MARKER \{ .ds $PAD_MARKER # \}
. char \\*[$PAD_MARKER] \R'#PAD_COUNT \En[#PAD_COUNT]+1'
. ds $FAMILY_FOR_PAD \\n[.fam]
. nr #FONT_FOR_PAD \\n(.f
. nr #SIZE_FOR_PAD \\n[.ps]
. ds $PAD_STRING \\$1
. as $PAD_STRING \Ekp
. di PAD_STRING
. fam \\*[$FAMILY_FOR_PAD]
\\f\\n[#FONT_FOR_PAD]\\s[\\n[#SIZE_FOR_PAD]u]\\*[$PAD_STRING]
. br
. di
. char \\*[$PAD_MARKER] \R'#SPACE_TO_END \En(.l-\Enp'\R'#PAD_SPACE \En[#SPACE_TO_END]/\En[#PAD_COUNT]'
. di PAD_STRING
. fam \\*[$FAMILY_FOR_PAD]
\\f\\n[#FONT_FOR_PAD]\\s[\\n[#SIZE_FOR_PAD]u]\\*[$PAD_STRING]
. br
. di
. char \\*[$PAD_MARKER] \h'\En[#PAD_SPACE]u'
. ie \\n[#SILENT] \{\
. SILENT
. fam \\*[$FAMILY_FOR_PAD]
\\f\\n[#FONT_FOR_PAD]\\s[\\n[#SIZE_FOR_PAD]u]\\*[$PAD_STRING]
. br
. SILENT OFF
. \}
. el \{\
. fam \\*[$FAMILY_FOR_PAD]
\\f\\n[#FONT_FOR_PAD]\\s[\\n[#SIZE_FOR_PAD]u]\\*[$PAD_STRING]
. br
. \}
. if \\n[#FILL_MODE]=1 \{\
. fi
. rr #FILL_MODE
. \}
. rr #PAD_COUNT
. rr #SPACE_TO_END
. rr #PAD_SPACE
. rm $PAD_STRING
. rm PAD_STRING
. rchar #
.END
\#
\#
\# +++LEADERS+++
\#
\# The leader mechanism is primitive, but it works. Basically,
\# every macro in this set that includes a line length also sets
\# a single groff tab stop at the right hand end of the line.
\# That way, whenever Ctrl-A is invoked (always at the end of
\# an input line), leader of the correct length gets deposited.
\# Ctrl-A is accessed by the string LEADER (i.e. inline, as
\# \*[LEADER]). Leaders within tabs get their length from the
\# tab line length.
\#
\# SET LEADER CHARACTER
\# --------------------
\# *Arguments:
\#
\# *Function:
\# Set leader character.
\#
.MAC LEADER_CHARACTER END
. lc \\$1
.END
\#
.ds LEADER
\#
\# +++DROP CAPS+++
\#
\# DROP CAP FAMILY
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DC_FAM.
\#
.MAC DROPCAP_FAMILY END
. ds $DC_FAM \\$1
.END
\#
\#
\# DROP CAP FONT
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DC_FT.
\#
.MAC DROPCAP_FONT END
. ds $DC_FT \\$1
.END
\#
\#
\# DROP CAP GUTTER
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #DC_GUT.
\# *Notes:
\# Requires unit of measure. Default is 3p.
\#
.MAC DROPCAP_GUTTER END
. nr #DC_GUT (\\$1)
.END
\#
\#
\# DROP CAP ADJUST
\# ---------------
\# *Argument:
\# <+|- # of points to in/decrease point size of drop cap letter>
\# *Function:
\# Creates or modifies string $DC_ADJUST.
\# *Notes:
\# Despite its best efforts, DROPCAP doesn't always get the point
\# size of the drop cap critically perfect. DROPCAP_ADJUST lets
\# the user add or subtract points (or fractions of points) to
\# get the size right.
\#
\# Requires the + or - sign.
\#
.MAC DROPCAP_ADJUST END
. ds $DC_ADJUST \\$1
.END
\#
\#
\# DROP CAP
\# --------
\# *Arguments:
\# <# of lines> [COND <% to condense> | EXT <% to extend>]
\# *Function:
\# Calculates point size of dropcap based on # of lines passed as
\# arg 2. Sets indent for text based on dropcap width+gutter.
\# Advances and prints dropcap; reverses and prints indented text
\# to bottom of dropcap, then resets indent to left margin (plus
\# any indent that was in effect prior to invoking DROPCAP).
\# *Notes:
\# Drop caps put a strain on on resource-challenged systems.
\#
\# Drop caps when using the doc processing macro PP only work with
\# initial paragraphs (i.e. at doc start, or after heads), only when
\# DROPCAPS comes immediately after PP, and only when the PRINTSTYLE
\# is TYPESET. If these conditions aren't met, DROPCAPS is silently
\# ignored.
\#
\# The COND or EXT argument are processed separately from all
\# other COND or EXT inlines or macros, hence passing COND or
\# EXT has no effect on running type.
\#
.MAC DROPCAP END
. if #IGNORE \{ .return \}
. br
. if \\n[#DOCS] \{\
. if \\n[#PRINT_STYLE]=1 \{ .return \}
. if \\n[#PRINT_STYLE]=2 \{\
. if \\n[#PP_STYLE]=2 \{ .return \}
. if \\n[#PP]>1 \{ .return \}
. ti 0
. \}
. \}
. ds $DROPCAP \\$1
. nr #DC_LINES \\$2-1
. ds $RESTORE_COND \\*[$COND_PERCENT]
. ds $RESTORE_EXT \\*[$EXT_PERCENT]
. if '\\$3'COND' \{ .CONDENSE \\$4 \}
. if '\\$3'EXT' \{ .EXTEND \\$4 \}
. if !r#DC_GUT \{ .nr #DC_GUT (3p) \}
. ds $RESTORE_FAM \\n[.fam]
. nr #RESTORE_FT \\n(.f
. nr #RESTORE_PT_SIZE \\n[#PT_SIZE]
. nr #RESTORE_INDENT \\n(.i
. SIZESPECS
. nr #DC_HEIGHT \\n[#DC_LINES]*\\n[#LEAD]+\\n[#CAP_HEIGHT]
. ie !d$DC_FAM \{ .FAM \\n[.fam] \}
. el \{ .FAM \\*[$DC_FAM] \}
. ie !d$DC_FT \{ .FT \\n(.f \}
. el \{ .FT \\*[$DC_FT] \}
. while \\n[#GET_DC_HEIGHT]<\\n[#DC_HEIGHT] \{\
. ps \\n[#PT_SIZE]u+100u
. SIZESPECS
. nr #GET_DC_HEIGHT \\n[#CAP_HEIGHT]
. \}
. if d$DC_ADJUST \{ .ps \\*[$DC_ADJUST]p \}
. mk x
. sp \\n[#DC_LINES]v
. ie '\\$3'COND' \{ .PRINT \\*[COND]\\*[$DROPCAP]\\*[CONDX] \}
. el \{ .PRINT \\*[$DROPCAP] \}
. if '\\$3'COND' \{ \E*[COND] \}
. if '\\$3'EXT' \{ \E*[EXT] \}
. ie \\n(.i \{ .in +\w'\\*[$DROPCAP]'u+\\n[#DC_GUT]u \}
. el \{ .in \w'\\*[$DROPCAP]'u+\\n[#DC_GUT]u \}
. if '\\$3'COND' \{ \E*[CONDX]\c \}
. if '\\$3'EXT' \{ \E*[EXTX]\c \}
. rt \\nxu
. FAM \\*[$RESTORE_FAM]
. FT \\n[#RESTORE_FT]
. ps \\n[#RESTORE_PT_SIZE]u
. CONDENSE \\*[$RESTORE_COND]
. EXTEND \\*[$RESTORE_EXT]
. ie \\n(.u \{ .wh \\n(.du+\\n[#DC_HEIGHT]u-1v DROPCAP_OFF \}
. el \{ .wh \\n(.du+\\n[#DC_HEIGHT]u DROPCAP_OFF \}
. rm $DROPCAP
. rr #DC_LINES
. rm $RESTORE_COND
. rm $RESTORE_EXT
. rm $RESTORE_FAM
. rr #RESTORE_FT
. rr #RESTORE_PT_SIZE
. rr #RESTORE_INDENT
. rr #DC_HEIGHT
. rr #GET_DC_HEIGHT
. rr x
.END
\#
.MAC DROPCAP_OFF END
' in \\n[#RESTORE_INDENT]u
.END
\#
\#
\# =====================================================================
\#
\# +++WORD AND SENTENCE SPACING+++
\#
\# WORD SPACE CONTROL
\# ------------------
\# *Argument:
\# <+|->wordspace | DEFAULT
\# *Function:
\# Increases or decreases interword space by user supplied amount.
\# If DEFAULT, value is set to 12 (groff default).
\# *Notes:
\# $WS_CONSTANT is the groff default word space.
\# $WS_VAR is the user supplied amount by which to in/decrease word space.
\# $WS is a concatenation of WS_CONSTANT and WS_VAR.
\#
\# Because the user supplied value requires a literal + or - sign,
\# the macro argument is stored in a string.
\#
\# \n[.sss] holds the current sentence space value.
\#
.MAC WS END
. ds $WS_CONSTANT 12
. ds $WS_VAR \\$1
. ie '\\$1'DEFAULT' \{ .ds $WS_VAR +0 \}
. el \{ .ds $WS (\\*[$WS_CONSTANT]\\*[$WS_VAR]) \}
. ie \\n[.sss]=12 \{ .ss \\*[$WS] 12 \}
. el \{\
. ss \\*[$WS] (\\*[$WS]\\*[$SS_VAR])
. SS \\*[$SS_VAR]
. \}
.END
\#
\#
\# SENTENCE SPACE CONTROL
\# ----------------------
\# *Argument:
\# <+-sentencespace> | 0 | DEFAULT
\# *Function:
\# Increases or decreases sentence space by user supplied amount.
\# If 0, sentence spaces are ignored. If DEFAULT, value is
\# set to 12 (groff default).
\# *Notes:
\# Because the user supplied value requires a literal + or - sign,
\# the macro argument is stored in a string.
\#
\# Sentence space applies only to input where sentences are separated
\# by two spaces (and/or, in fill mode [FLUSH L|R|C or JUSTIFY], an EOL).
\# Changing .SS when sentences are separated by only one space has
\# no effect on the space between sentences.
\#
\# \n[.ss] holds the current wordspace value.
\# \n[.sss] holds the current sentence space value.
\#
.MAC SS END
. ie '\\$1'0' \{ .ss \\n[.ss] (\\n[.ss]-\\n[.ss]) \}
. el \{\
. ie '\\$1'DEFAULT' \{ .ss \\n[.ss] \}
. el \{\
. ds $SS_VAR \\$1
. ss \\n[.ss] (0\\*[$SS_VAR])
. \}
. \}
.END
\#
\#
\# =====================================================================
\#
\# +++INDENTS+++
\#
\# There are five styles of indents: left, right, both, temporary,
\# and hanging. Each is set/invoked with a different macro.
\# Indent macros begin with the letter "I", hence .IL means "indent left,"
\# .IR means "indent right," and so on.
\#
\# The first time any of the indent macros is used, it requires an
\# argument--the size of the indent in ipPcm. The size may also
\# be entered using the \w'#' function--very useful for numbered
\# lists using HI). The unit of measure is required. Subsequent
\# invocations don't require the argument; the indent measure remains the
\# same until it's changed by invoking the macro with an argument again.
\#
\# If no indents are in effect, the arguments passed to indent macros are
\# measured from the left and right margins of the page. If a left indent
\# or a right indent is already in effect, the arguments passed to
\# the indent macros are calculated from the current values; in other words,
\# the arguments are additive. If you quit an indent and later return
\# to it, its value will be the value last in effect, unless you pass
\# it an argument. If you do pass an argument, it is added to the last
\# value in effect, unless you cleared the indent with one of
\# .IX macros.
\#
\# Example
\# -------
\#
\# .IL 2P
\# ...some text...
\# .IL 2P
\# ...some text...
\# .IQ
\# ...some text...
\# .IL
\# ...some text...
\#
\# The first .IL 2P indents text 2P from the left margin. The second
\# .IL 2P indents text by an additional 2P, i.e. 4P from the left margin.
\# .IQ turns the indent off. The last .IL (which has no argument)
\# takes its value from the total of all arguments passed to .IL (in
\# this case, 2P and 2P), therefore it indents 2P+2P from the left
\# margin, i.e. 4P. If you wanted the last .IL to indent just 2P,
\# you'd either have to reset the .IL prior to .IQ (.IL -2P), or pass
\# the last .IL the argument 2P.
\#
\# To reverse the sense of an indent added to an indent, you may use
\# negative values.
\#
\# Indents can be turned off individually with ILX, IRX, and IBX.
\# LEFT and RIGHT indents may be combined and manipulated
\# separately, (e.g. you can have an IL of 2P and an IR of 4P
\# operative at the same time, and then change, say, the IL to
\# 4P--thereby left indenting 6P--while the IR remains at 4P.
\#
\# IB automatically turns off IL and IR. They have to be reinvoked
\# again when needed. IL and IR automatically turn IB off; it, too,
\# has to be reinvoked with needed.
\#
\# All indents can be turned off at once with IQ. The ILX, IRX, IBX,
\# and IQ macros simply turn the indents off; the values stored in
\# the respective indent macros (IL, IR, IB) remain in effect. If
\# the user wishes to clear the values, the IX macros should be
\# invoked with the single argument CLEAR. IQ CLEAR clears out
\# the values stored for all indent styles.
\#
\# Indents *must* be turned off before settting string tabs
\# inside PAD. Generally, in order not to get confused, it's a
\# good idea to turn all indents off before setting any tabs.
\#
\# TI and HI are special cases. There's no need to turn them off,
\# since they affect only one line--the first after their
\# invocation. Like the other indent styles, the first time
\# they're invoked, they require a value in iPpcm; each subsequent
\# invocation without an argument will use the same value. To
\# change the value, simply pass a new value. Values for TI and HI
\# are *not* additive.
\#
\# HI presupposes that you already have a left or both indent
\# on. HI will never hang a line outside the left margin of a
\# document. In other words, you must have IL or IB on before you
\# can use HI.
\#
\# INDENT LEFT
\# -----------
\#
.MAC IL END
. if \\n[#INDENT_STYLE_BOTH] \{ .IBX \}
. nr #INDENT_STYLE_LEFT 1
. nr #INDENT_ACTIVE 1
. nr #INDENT_LEFT_ACTIVE 1
. ie '\\$1'' \{\
. br
. in \\n[#L_INDENT]u
. ta \\n(.lu-\\n[#L_INDENT]u
. \}
. el \{\
. br
. nr #L_INDENT +(\\$1)
. in \\n[#L_INDENT]u
. ta \\n(.lu-\\n[#L_INDENT]u
. \}
.END
\#
\#
\# +++INDENT RIGHT+++
\#
.MAC IR END
. if \\n[#INDENT_STYLE_BOTH] \{ .IBX \}
. nr #INDENT_STYLE_RIGHT 1
. nr #INDENT_ACTIVE 1
. nr #INDENT_RIGHT_ACTIVE 1
. ie '\\$1'' \{\
. br
. ie \\n[#TAB_ACTIVE] \{\
. ll \\n(.lu-\\n[#R_INDENT]u
. ta \\n(.lu-\\n[#L_INDENT]u
. \}
. el \{\
. ll \\n[#L_LENGTH]u-\\n[#R_INDENT]u
. ta \\n(.lu-\\n[#L_INDENT]u
. \}
. \}
. el \{\
. br
. nr #R_INDENT +(\\$1)
. ie \\n[#TAB_ACTIVE] \{\
. ll \\n(.lu-\\n[#R_INDENT]u
. ta \\n(.lu-\\n[#L_INDENT]u
. \}
. el \{\
. ll \\n[#L_LENGTH]u-\\n[#R_INDENT]u
. ta \\n(.lu-\\n[#L_INDENT]u
. \}
. \}
.END
\#
\#
\# +++INDENT BOTH+++
\#
.MAC IB END
. if \\n[#INDENT_STYLE_LEFT] \{ .ILX \}
. if \\n[#INDENT_STYLE_RIGHT] \{ .IRX \}
. nr #INDENT_STYLE_BOTH 1
. nr #INDENT_ACTIVE 1
. nr #INDENT_BOTH_ACTIVE 1
. ie '\\$1'' \{\
. br
. in \\n[#BL_INDENT]u
. ie \\n[#TAB_ACTIVE] \{\
. ll \\n(.lu-\\n[#BR_INDENT]u
. ta \\n(.lu-\\n[#BR_INDENT]u
. \}
. el \{\
. ll \\n[#L_LENGTH]u-\\n[#BR_INDENT]u
. ta \\n(.lu-\\n[#BR_INDENT]u
. \}
. \}
. el \{\
. br
. nr #BL_INDENT (\\n[#INDENT]+\\$1)
. ie \\n[#NUM_ARGS]=2 \{ .nr #BR_INDENT +(\\$2) \}
. el \{ .nr #BR_INDENT \\n[#BL_INDENT] \}
. ie \\n[#TAB_ACTIVE] \{\
. in \\n[#BL_INDENT]u
. ll \\n(.lu-\\n[#BR_INDENT]u
. ta \\n(.lu-\\n[#BL_INDENT]u
. \}
. el \{\
. in \\n[#BL_INDENT]u
. ll \\n[#L_LENGTH]u-\\n[#BR_INDENT]u
. ta \\n(.lu-\\n[#BR_INDENT]u
. \}
. \}
.END
\#
\#
\# +++TEMPORARY INDENT+++
\#
.MAC TI END
. br
. ie '\\$1'' \{\
. ti \\n[#T_INDENT]u
. if \\n[#INDENT_LEFT_ACTIVE] \{\
. ti \\n[#T_INDENT]u+\\n[#L_INDENT]u
. \}
. if \\n[#INDENT_BOTH_ACTIVE] \{\
. ti \\n[#T_INDENT]u+\\n[#BL_INDENT]u
. \}
. \}
. el \{\
. nr #T_INDENT (\\$1)
. ti \\n[#T_INDENT]u
. \}
.END
\#
\#
\# +++HANGING INDENT+++
\#
.MAC HI END
. ie '\\$1'' \{ .ti -\\n[#HL_INDENT]u \}
. el \{\
. nr #HL_INDENT (\\$1)
. ti -\\n[#HL_INDENT]u
. \}
.END
\#
\#
\# +++INDENTS OFF+++
\#
.MAC ILX END
. br
. in 0
. rr #INDENT_LEFT_ACTIVE
. if '\\$1'CLEAR' \{\
. rr #L_INDENT
. rr #INDENT_STYLE_LEFT
. \}
.END
\#
\#
.MAC IRX END
. br
. rr #INDENT_RIGHT_ACTIVE
. ie \\n[#TAB_ACTIVE] \{ .TAB\\n[#CURRENT_TAB] \}
. el \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. if '\\$1'CLEAR' \{\
. rr #R_INDENT
. rr #INDENT_STYLE_RIGHT
. \}
.END
\#
\#
.MAC IBX END
. br
. in 0
. rr #INDENT_BOTH_ACTIVE
. ie \\n[#TAB_ACTIVE] \{ .TAB\\n[#CURRENT_TAB] \}
. el \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. if '\\$1'CLEAR' \{\
. rr #BL_INDENT
. rr #BR_INDENT
. rr #INDENT_STYLE_BOTH
. \}
.END
\#
\#
.MAC IX END
. if '\\$0'IX' \{\
. if !\\n[#IX_WARN] \{\
. tm1 "[mom]: Use of .IX is now deprecated. Use .IQ instead.
. tm1 " .IX will continue to behave as before, but to
. tm1 " avoid this message, please update your document.
. nr #IX_WARN 1
. \}
. \}
. br
. in 0
. rr #INDENT_LEFT_ACTIVE
. rr #INDENT_RIGHT_ACTIVE
. rr #INDENT_BOTH_ACTIVE
. if \\n[#INDENT_STYLE_RIGHT] \{\
. ie \\n[#TAB_ACTIVE] \{ .TAB\\n[#CURRENT_TAB] \}
. el \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. \}
. if \\n[#INDENT_STYLE_BOTH] \{\
. ie \\n[#TAB_ACTIVE] \{ .TAB\\n[#CURRENT_TAB] \}
. el \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. \}
. if '\\$1'CLEAR' \{\
. if \\n[#INDENT_STYLE_RIGHT] \{\
. ie \\n[#TAB_ACTIVE] \{ .TAB\\n[#CURRENT_TAB] \}
. el \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. \}
. if \\n[#INDENT_STYLE_BOTH] \{\
. ie \\n[#TAB_ACTIVE] \{ .TAB\\n[#CURRENT_TAB] \}
. el \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. \}
. rr #L_INDENT
. rr #R_INDENT
. rr #BL_INDENT
. rr #BR_INDENT
. rr #T_INDENT
. rr #H_INDENT
. rr #INDENT_STYLE_LEFT
. rr #INDENT_STYLE_RIGHT
. rr #INDENT_STYLE_BOTH
. \}
. rr #INDENT_ACTIVE
.END
\#
\# =====================================================================
\#
\# +++MULTIPLE COLUMNS+++
\#
\# MULTIPLE COLUMNS ON
\# -------------------
\# *Arguments:
\#
\# *Function:
\# Marks the top of a column set
\#
.MAC MCO END
.mk c
.END
\#
\# MULTIPLE COLUMN RETURN
\# ----------------------
\# *Arguments:
\#
\# *Function:
\# Returns to the top of a column set
\#
.MAC MCR END
. sp |\\ncu
.END
\#
\# MULTIPLE COLUMNS OFF
\# --------------------
\# *Arguments:
\# |
\# *Function:
\# Advances to the end of a column set
\# *Notes:
\# With no argument, advances to the next baseline (at the current
\# leading value) beneath the longest column. With an argument
\# (which requires a unit of measure), advances arg distance
\# beneath the baseline of the deepest column. If the argument
\# is zero, advances to the baseline of the deepest column.
\#
.MAC MCX END
. ie '\\$1'' \{\
. TQ
. sp |\\n(.hu
. \}
. el \{\
. nr #MCX_ALD (\\$1)
. TQ
. ie \\n[#MCX_ALD]=0 \{ .sp |\\n(.hu-1v \}
. el \{ .sp |\\n(.hu+\\n[#MCX_ALD]u \}
. rr #MCX_ALD (\\$1)
. \}
.END
\#
\# =====================================================================
\#
\# +++TYPESETTING SUPPORT MACROS+++
\#
\# TRAP
\# ----
\# *Arguments:
\# toggle
\# *Function:
\# Enables/disables traps.
\# *Notes:
\# EL and TN don't function as advertised on the last line before a
\# trap (when they break the preceding line, they spring the trap, and
\# groff won't back up to the line preceding the trap). TRAP is a kludge
\# to get EL and TN work properly on last lines. The user simply enloses
\# the offending lines in TRAP OFF/TRAP.
\#
.MAC TRAP END
. ie '\\$1'' \{ .vpt 1 \}
. el \{ .vpt 0 \}
.END
\#
\#
\# SILENT
\# ------
\# *Arguments:
\# |
\# *Function:
\# Diverts text so that it doesn't print, or turns to function off.
\# *Notes:
\# Useful for setting up autotabs where you don't want the line with
\# the tab marks to print.
\#
\# Also aliased as COMMENT, in case user wants to input a batch of
\# text that doesn't print.
\#
.MAC SILENT END
. nr #SILENT 1
. if \\n[#QUAD] \{ .br \}
. ie '\\$1'' \{ .di NO_FLASH \}
. el \{\
. br
. di
. rm NO_FLASH
. rr #SILENT
. \}
.END
\#
\# PRINT
\# -----
\# *Arguments:
\#
\# *Function:
\# Prints anything. A macro that helps keep my code nicely indented.
\#
.MAC PRINT END
\\$*
.END
\#
\#
\# CAPS
\# ----
\# *Arguments:
\# |
\# *Function:
\# Converts text to caps, or, if OFF, reverts to normal caps/lc.
\#
.MAC CAPS END
. ie '\\$1'' \{\
. tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
. tr à\[`A]
. tr â\[^A]
. tr á\['A]
. tr ä\[:A]
. tr å\[oA]
. tr ã\[~A]
. tr æ\[AE]
. tr è\[`E]
. tr ê\[^E]
. tr é\['E]
. tr ë\[:E]
. tr ì\[`I]
. tr î\[^I]
. tr í\['I]
. tr ï\[:I]
. tr ò\[`O]
. tr ô\[^O]
. tr ó\['O]
. tr ö\[:O]
. tr õ\[~O]
. tr ø\[/O]
. tr ù\[`U]
. tr û\[^U]
. tr ú\['U]
. tr ü\[:U]
. tr ç\[,C]
. tr ð\[-D]
. tr ñ\[~N]
. tr þ\[TP]
. tr ý\['Y]
. tr ÿ\[:Y]
. nr #CAPS_ON 1
. \}
. el \{\
. tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
. tr à\[`a]
. tr â\[^a]
. tr á\['a]
. tr ä\[:a]
. tr å\[oa]
. tr ã\[~a]
. tr æ\[ae]
. tr è\[`e]
. tr ê\[^e]
. tr é\['e]
. tr ë\[:e]
. tr ì\[`i]
. tr î\[^i]
. tr í\['i]
. tr ï\[:i]
. tr ò\[`o]
. tr ô\[^o]
. tr ó\['o]
. tr ö\[:o]
. tr õ\[~o]
. tr ø\[/o]
. tr ù\[`u]
. tr û\[^u]
. tr ú\['u]
. tr ü\[:u]
. tr ç\[,c]
. tr ð\[Sd]
. tr ñ\[~n]
. tr þ\[Tp]
. tr ý\['y]
. tr ÿ\[:y]
. rr #CAPS_ON
. \}
.END
\#
\# SIZESPECS
\# ---------
\# Argument:
\#
\# Function:
\# Gets cap-height, x-height, and descender depth of the
\# current font at the current point size.
\# *Notes:
\# The routine is diverted so it remains invisible to output.
\#
.MAC SIZESPECS END
. di TYPESIZE
E\\R'#CAP_HEIGHT \\n[.cht]'
e\\R'#X_HEIGHT \\n[.cht]'
y\\R'#DESCENDER \\n[.cdp]'
. br
. di
.END
\#
\# =====================================================================
\#
\# +++TYPESETTING ALIASES+++
\#
.ALIAS CENTRE CENTER
.ALIAS COMMENT SILENT
.ALIAS CONDENSE CONDENSE_OR_EXTEND
.ALIAS EXTEND CONDENSE_OR_EXTEND
.ALIAS FAM FAMILY
.ALIAS HYPHENATE HY
.ALIAS HYPHENATION HY
.ALIAS HYSET HY_SET
.ALIAS LIG LIGATURES
.ALIAS IBQ IBX
.ALIAS ILQ ILX
.ALIAS IQ IX
.ALIAS IRQ IRX
.ALIAS PADMARKER PAD_MARKER
.ALIAS TABSET TAB_SET
.ALIAS TB TAB
.ALIAS UNDERSCORE_2 UNDERSCORE2
\#
\#
\# ====================================================================
\#
\# DOCUMENT PROCESSING MACROS, STRINGS AND ALIASES
\# ===============================================
\#
\# +++PAGE DIMENSIONS+++
\#
\# PAPER SIZE
\# ----------
\# *Arguments:
\# LETTER | LEGAL | STATEMENT | TABLOID | LEDGER | FOLIO | QUARTO | 10x14 | EXECUTIVE | A3 | A4 | A5 | B4 | B5
\# *Function:
\# Sets up margins for different paper sizes.
\#
.MAC PAPER END
. ds $PAPER \\$1
. if '\\*[$PAPER]'LETTER' \{\
. PAGEWIDTH 8.5i
. PAGELENGTH 11i
. \}
. if '\\*[$PAPER]'LEGAL' \{\
. PAGEWIDTH 8.5i
. PAGELENGTH 14i
. \}
. if '\\*[$PAPER]'STATEMENT' \{\
. PAGEWIDTH 5.5i
. PAGELENGTH 8.5i
. \}
. if '\\*[$PAPER]'TABLOID' \{\
. PAGEWIDTH 11i
. PAGELENGTH 17i
. \}
. if '\\*[$PAPER]'LEDGER' \{\
. PAGEWIDTH 17i
. PAGELENGTH 11i
. \}
. if '\\*[$PAPER]'FOLIO' \{\
. PAGEWIDTH 8.5i
. PAGELENGTH 13i
. \}
. if '\\*[$PAPER]'QUARTO' \{\
. PAGEWIDTH 610p
. PAGELENGTH 780p
. \}
. if '\\*[$PAPER]'10x14' \{\
. PAGEWIDTH 10i
. PAGELENGTH 14i
. \}
. if '\\*[$PAPER]'EXECUTIVE' \{\
. PAGEWIDTH 7.25i
. PAGELENGTH 10.5i
. \}
. if '\\*[$PAPER]'A3' \{\
. PAGEWIDTH 842p
. PAGELENGTH 1190p
. \}
. if '\\*[$PAPER]'A4' \{\
. PAGEWIDTH 595p
. PAGELENGTH 842p
. \}
. if '\\*[$PAPER]'A5' \{\
. PAGEWIDTH 421p
. PAGELENGTH 595p
. \}
. if '\\*[$PAPER]'B4' \{\
. PAGEWIDTH 709p
. PAGELENGTH 1002p
. \}
. if '\\*[$PAPER]'B5' \{\
. PAGEWIDTH 501p
. PAGELENGTH 709p
. \}
. if !r#L_MARGIN \{ .L_MARGIN \\n(.o \}
. if !r#R_MARGIN \{ .R_MARGIN 1i \}
.END
\#
\#
\# ====================================================================
\#
\# +++PRINTSTYLE -- TYPEWRITE OR TYPESET+++
\#
\# PRINTSTYLE
\# ----------
\# *Arguments:
\# TYPESET | TYPEWRITE [SINGLESPACE]
\# *Function:
\# Sets type specs for typewriter-style or typeset output.
\# *Notes:
\# Number registers: TYPEWRITE=1, TYPESET=2.
\#
.MAC PRINTSTYLE END
. if !d$PAPER \{ .PAPER LETTER \}
. if '\\$1'TYPEWRITE' \{\
. nr #PRINT_STYLE 1
. if !\\n[#DOC_TYPE]=4 \{ .L_MARGIN 6P \}
. if !\\n[#DOC_TYPE]=4 \{ .R_MARGIN 6P \}
. fam C
. ft R
. ps 12
. ie '\\$2'SINGLESPACE' \{\
. nr #SINGLE_SPACE 1
. vs 12
. \}
. el \{ .vs 24 \}
. QUAD L
. HY OFF
. SMARTQUOTES OFF
. if !\\n[#PP_INDENT] \{\
. in 3P \"Set indent
. nr #PP_INDENT \\n(.i \"Read into #PP_INDENT
. in 0 \"Remove indent
. \}
. HDRFTR_RIGHT_CAPS
. nr #BOLDER_UNITS 0
. nr #CONDENSE 0
. nr #EXTEND 0
. rm IT
. rm BD
. rm BDI
. rm PREV
. UNDERLINE_SLANT
. UNDERLINE_ITALIC
. UNDERLINE_QUOTES
. nr #IGNORE_COLUMNS 1
. \}
. if '\\$1'TYPESET' \{\
. nr #PRINT_STYLE 2
. if !\\n[#DOC_TYPE]=4 \{ .L_MARGIN 6P \}
. if !\\n[#DOC_TYPE]=4 \{ .R_MARGIN 6P \}
. FAMILY T
. FT R
. if !\\n[#DOC_TYPE]=4 \{ .PT_SIZE 12.5 \}
. if !\\n[#DOC_TYPE]=4 \{ .LS 16 \}
. JUSTIFY
. HY
. HY_SET 2 36p 1p
. KERN
. LIG
. SS 0
. SMARTQUOTES
. if !\\n[#PP_INDENT] \{\
. in 2m \"Set indent
. nr #PP_INDENT \\n(.i \"Read into #PP_INDENT
. in 0 \"Remove indent
. \}
. HDRFTR_RIGHT_CAPS
. rr #IGNORE_COLUMNS
. \}
.END
\#
\#
\# Macros to control behaviour of PRINTSTYLE TYPEWRITE
\#
\# ITALIC MEANS ITALIC
\# -------------------
\# *Argument:
\#
\# *Function:
\# Instructs TYPEWRITE to treat italics as italics, whether
\# invoked via control lines or inline.
\# *Notes:
\# ITALIC_MEANS_ITALIC and UNDERLINE_ITALIC are mututally exclusive,
\# hence invoking the one automatically turns off the other.
\#
.MAC ITALIC_MEANS_ITALIC END
. if \\n[#PRINT_STYLE]=1 \{\
. nr #ITALIC_MEANS_ITALIC 1
. rr #UNDERLINE_ITALIC
. rm ROM
. rm IT
. rm PREV
. ds ROM \EfR
. ds IT \EfI
. ds PREV \EfR
. \}
.END
\#
\#
\# UNDERLINE ITALIC
\# ----------------
\# *Argument:
\#
\# *Function:
\# Instructs TYPEWRITE to underline italics, whether invoked
\# via control lines or inline.
\# *Notes:
\# UNDERLINE_ITALIC and ITALIC_MEANS_ITALIC are mututally exclusive,
\# hence invoking the one automatically turns off the other.
\#
\# UNDERLINE_ITALIC is the default for TYPEWRITE.
\#
.MAC UNDERLINE_ITALIC END
. if \\n[#PRINT_STYLE]=1 \{\
. nr #UNDERLINE_ITALIC 1
. rr #ITALIC_MEANS_ITALIC
. rm ROM
. rm IT
. rm PREV
. ds ROM \E*[ULX]
. ds IT \E*[UL]
. ds PREV \E*[ULX]
. \}
.END
\#
\#
\# UNDERLINE SLANT
\# ---------------
\# *Arguments:
\# |
\# *Function:
\# Instructs TYPEWRITE to underline occurences of \*[SLANT], or
\# turns feature off.
\# *Notes:
\# Users may want \*[SLANT] to mean slant in TYPEWRITE, although
\# most of the time, \*[SLANT] most likely means the user wanted
\# italic but didn't have it, ergo the need to tell TYPEWRITE to
\# treat \*[SLANT] as italic (i.e. underlined).
\#
\# UNDERLINE_SLANT and SLANT_MEANS_SLANT are mututally exclusive,
\# hence invoking the one automatically turns off the other.
\#
\# UNDERLINE_SLANT is the default for TYPEWRITE.
\#
.MAC UNDERLINE_SLANT END
. if \\n[#PRINT_STYLE]=1 \{\
. rr #SLANT_MEANS_SLANT
. nr #UNDERLINE_SLANT 1
. rm SLANT
. rm SLANTX
. ds SLANT \ER'#SLANT_ON 1'\E*[UL]
. ds SLANTX \ER'#SLANT_ON 0'\E*[ULX]
. \}
.END
\#
\#
.MAC SLANT_MEANS_SLANT END
. if \\n[#PRINT_STYLE]=1 \{\
. rr #UNDERLINE_SLANT
. nr #SLANT_MEANS_SLANT 1
. rm SLANT
. rm SLANTX
. ds SLANT \ER'#SLANT_ON 1'\ES'\En[#DEGREES]'
. ds SLANTX \ER'#SLANT_ON 0'\ES'0'
. \}
.END
\#
\#
.MAC IGNORE_COLUMNS END
. if \\n[#PRINT_STYLE]=1 \{ .nr #NO_COLUMNS 1 \}
.END
\#
\#
\# ====================================================================
\#
\# +++COPY STYLE -- DRAFT OR FINAL+++
\#
\# COPY STYLE
\# ----------
\# *Arguments:
\# DRAFT | FINAL
\# *Function:
\# Sets registers that are used to determine what to put
\# in the default header, and how to number pages.
\# *Notes:
\# DOCTYPE must come before COPYSTYLE.
\#
.MAC COPYSTYLE END
. ds $COPY_STYLE \\$1
. if '\\*[$COPY_STYLE]'DRAFT' \{\
. nr #COPY_STYLE 1
. if !r#DRAFT \{ .DRAFT 1 \}
. \}
. if '\\*[$COPY_STYLE]'FINAL' \{ .nr #COPY_STYLE 2 \}
. if !d$CHAPTER_STRING \{ .CHAPTER_STRING "Chapter" \}
. if !d$DRAFT_STRING \{ .DRAFT_STRING "Draft" \}
. if !d$REVISION_STRING \{ .REVISION_STRING "Rev." \}
\# Default
. if \\n[#DOC_TYPE]=1 \{\
. ie \\n[#COPY_STYLE]=1 \{\
. ie \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. el \{ .PAGENUM_STYLE roman \}
. if \\n[#USER_DEF_HDRFTR_CENTER]=0 \{\
. ie \\n[#DRAFT_WITH_PAGENUM] \{\
. ds $HDRFTR_CENTER
. \}
. el \{\
. ie !\\n[#REVISION] \{\
. ds $HDRFTR_CENTER \
\\*[$DRAFT_STRING] \\n[#DRAFT]
. \}
. el \{\
. ds $HDRFTR_CENTER \
\\*[$DRAFT_STRING] \\n[#DRAFT], \
\\*[$REVISION_STRING] \\n[#REVISION]
. \}
. \}
. \}
. \}
. el \{\
. ie \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. el \{ .PAGENUM_STYLE DIGIT \}
. if \\n[#USER_DEF_HDRFTR_CENTER]=0 \{ .ds $HDRFTR_CENTER \}
. \}
. \}
\# Chapter
. if \\n[#DOC_TYPE]=2 \{\
. ie \\n[#COPY_STYLE]=1 \{\
. ie \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. el \{ .PAGENUM_STYLE roman \}
. if \\n[#USER_DEF_HDRFTR_CENTER]=0 \{\
. ie \\n[#DRAFT_WITH_PAGENUM] \{\
. ie '\\*[$CHAPTER]'' \{ .ds $HDRFTR_CENTER \\*[$CHAPTER_STRING] \\*[$CHAPTER] \}
. el \{ .ds $HDRFTR_CENTER \\*[$CHAPTER_STRING] \}
. \}
. el \{\
. ie !\\n[#REVISION] \{\
. ie '\\*[$CHAPTER]'' \{\
. ds $HDRFTR_CENTER \
\\*[$CHAPTER_STRING], \
\\*[$DRAFT_STRING] \\n[#DRAFT]
. \}
. el \{\
. ds $HDRFTR_CENTER \
\\*[$CHAPTER_STRING] \\*[$CHAPTER], \
\\*[$DRAFT_STRING] \\n[#DRAFT]
. \}
. \}
. el \{\
. ie '\\*[$CHAPTER]'' \{\
. el \{\
\\*[$CHAPTER_STRING], \
\\*[$DRAFT_STRING] \\n[#DRAFT], \
\\*[$REVISION_STRING] \\n[#REVISION]
. \}
. ds $HDRFTR_CENTER \
\\*[$CHAPTER_STRING] \\*[$CHAPTER], \
\\*[$DRAFT_STRING] \\n[#DRAFT], \
\\*[$REVISION_STRING] \\n[#REVISION]
. \}
. \}
. \}
. \}
. \}
. el \{\
. if \\n[#USER_DEF_HDRFTR_CENTER]=0 \{\
. ie \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. el \{ .PAGENUM_STYLE DIGIT \}
. ie '\\*[$CHAPTER]'' \{ .ds $HDRFTR_CENTER \\*[$CHAPTER_STRING] \}
. el \{ .ds $HDRFTR_CENTER \\*[$CHAPTER_STRING] \\*[$CHAPTER] \}
. \}
. \}
. \}
\# Named
. if \\n[#DOC_TYPE]=3 \{\
. ie \\n[#COPY_STYLE]=1 \{\
. ie \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. el \{ .PAGENUM_STYLE roman \}
. ie \\n[#DRAFT_WITH_PAGENUM] \{\
. ds $HDRFTR_CENTER \\*[$DOC_TYPE]
. \}
. el \{\
. if \\n[#USER_DEF_HDRFTR_CENTER]=0 \{\
. ie !\\n[#REVISION] \{\
. ds $HDRFTR_CENTER \
\\*[$DOC_TYPE], \
\\*[$DRAFT_STRING] \\n[#DRAFT]
. \}
. el \{\
. ds $HDRFTR_CENTER \
\\*[$DOC_TYPE], \
\\*[$DRAFT_STRING] \\n[#DRAFT], \
\\*[$REVISION_STRING] \\n[#REVISION]
. \}
. \}
. \}
. \}
. el \{\
. if \\n[#USER_DEF_HDRFTR_CENTER]=0 \{\
. ie \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. el \{ .PAGENUM_STYLE DIGIT \}
. ds $HDRFTR_CENTER \\*[$DOC_TYPE]
. \}
. \}
. \}
.END
\#
\# ====================================================================
\#
\# +++COLLECT DOC INFO -- STRINGS AND NUMBER REGISTERS+++
\#
\# *Arguments:
\# various string/register arguments
\# *Function:
\# Collect information about documents.
\#
.MAC TITLE END \"Document title
. ds $TITLE \\$1
.END
\#
\#
.MAC SUBTITLE END \"Document sub-title
. ds $SUBTITLE \\$1
.END
\#
\#
.MAC CHAPTER END \"If document is a chapter, the chapter number
. ds $CHAPTER \\$1
.END
\#
\#
.MAC DRAFT END \"Draft number
. nr #DRAFT \\$1
.END
\#
\#
.MAC REVISION END \"Revision number
. nr #REVISION \\$1
.END
\#
\#
.MAC DRAFT_WITH_PAGENUMBER END \"Attach draft/revision strings to page number
. nr #DRAFT_WITH_PAGENUM 1
.END
\#
\#
.MAC AUTHOR END \"Author. Use "..." with this macro.
. nr #AUTHOR_NUM -1 1
. while \\n[#NUM_ARGS]>\\n[#AUTHOR_NUM] \{\
. ds $AUTHOR_\\n+[#AUTHOR_NUM] \\$\\n[#AUTHOR_NUM]
. \}
. nr #NUM_AUTHORS \\n[#NUM_ARGS]%2 \"Use mod 2 to test if odd or even # of authors
. ie \\n[#NUM_AUTHORS]=1 \{ .nr #AUTHOR_LINES 0 \}
. el \{ .nr #AUTHOR_LINES 1 \}
.END
\#
\#
.MAC PAGENUMBER END \"Page # that appears on page one.
. nr #n%_AT_PAGENUM_SET \\n%
. nr #PAGE_NUM_ADJ \\$1-\\n[#n%_AT_PAGENUM_SET]
. rr #n%_AT_PAGENUM_SET
. nr #PAGE_NUM_SET 1
.END
\#
\# ====================================================================
\#
\# +++TYPE OF DOCUMENT+++
\#
\# DOCUMENT TYPE
\# -------------
\# *Argument:
\# DEFAULT | CHAPTER | NAMED " | LETTER
\# *Function:
\# Creates strings and sets registers for document types.
\# *Notes:
\# Number registers: DEFAULT=1, CHAPTER=2, NAMED=3, LETTER=4
\#
.MAC DOCTYPE END
. if '\\$1'DEFAULT' \{\
. nr #DOC_TYPE 1
. \}
. if '\\$1'CHAPTER' \{\
. nr #DOC_TYPE 2
. \}
. if '\\$1'NAMED' \{\
. ds $DOC_TYPE \\$2
. nr #DOC_TYPE 3
. \}
. if '\\$1'LETTER' \{\
. nr #DOC_TYPE 4
. L_MARGIN 1.125i
. R_MARGIN 1.125i
. PT_SIZE 12
. LS 13.5
. DOCHEADER OFF
. PARA_INDENT 3m
. INDENT_FIRST_PARAS
. PARA_SPACE
. ds $SUITE \En[#SUITE]
. HEADER_MARGIN 3P+6p
. HEADER_GAP 3P
. FOOTERS
. FOOTER_RULE OFF
. FOOTER_LEFT ""
. FOOTER_CENTER ""
. FOOTER_RIGHT_SIZE +0
. FOOTER_RIGHT ".../\E*[$SUITE]
. FOOTER_ON_FIRST_PAGE
. em ALL_DONE
. \}
.END
\#
\# +++LETTER MACROS+++
\#
\# DATE
\# ----
\# *Arguments:
\#
\# *Function:
\# Stores date string in string $DATE.
\#
.MAC DATE END
. nr #DATE 1
. di DATE
. RIGHT
.END
\#
\#
\# TO
\# --
\# *Arguments:
\#
\# *Function:
\# Stores "to" info in diversion TO_ADDRESS.
\#
.MAC TO END
. if !'\\n(.z'' \{ .di \}
. nr #TO 1
. di TO_ADDRESS
. LEFT
.END
\#
\#
\# FROM
\# ----
\# *Arguments:
\#
\# *Function:
\# Stores "from" info in diversion FROM_ADDRESS.
\#
.MAC FROM END
. if !'\\n(.z'' \{ .di \}
. nr #FROM 1
. di FROM_ADDRESS
. LEFT
.END
\#
\#
\# GREETING
\# --------
\# *Arguments:
\#
\# *Function:
\# Stores greeting in string $GREETING.
\#
.MAC GREETING END
. if !'\\n(.z'' \{ .di \}
. nr #GREETING 1
. di GREETING
. LEFT
.END
\#
\#
\# CLOSING
\# -------
\# *Arguments:
\#
\# *Function:
\# Stores greeting in string $CLOSING.
\#
.MAC CLOSING END
. br
. nr #CLOSING 1
. di CLOSING
.END
\#
\#
\# NO SUITE
\# --------
\# *Arguments:
\#
\# *Function:
\# Redefines $SUITE to blank so that a suite number doesn't
\# appear at the bottom of letter pages.
\#
.MAC NO_SUITE END
. FOOTER_RIGHT ""
.END
\#
\# ====================================================================
\#
\# +++DEFAULTS+++
\#
\# DEFAULTS
\# --------
\# *Arguments:
\#
\# *Function:
\# Sets up defaults if no values are entered prior to START.
\# *Notes:
\# The defaults for $CHAPTER_STRING, $DRAFT_STRING, and
\# $REVISION_STRING are in the COPYSTYLE macro.
\#
.MAC DEFAULTS END
. if !d$PAPER \{ .PAPER LETTER \}
. if !\\n[#DOC_TYPE] \{ .DOCTYPE DEFAULT \}
. if \\n[#PAGENUM_STYLE_SET] \{ .PAGENUM_STYLE \\*[$PAGENUM_STYLE] \}
. if !\\n[#COPY_STYLE] \{ .COPYSTYLE FINAL \}
. if \\n[#DRAFT_WITH_PAGENUM] \{ .COPYSTYLE \\*[$COPY_STYLE] \}
. if \\n[#DOC_TYPE]=4 \{\
. if !\\n[#USER_SET_L_LENGTH] \{\
. R_MARGIN \\n[#R_MARGIN]u
. rr #USER_SET_L_LENGTH
. \}
. if \\n[#PRINT_STYLE]=1 \{ .PRINTSTYLE TYPEWRITE SINGLESPACE \}
. \}
. if \\n[#COPY_STYLE]=1 \{\
. COPYSTYLE DRAFT
. PAGENUMBER 1
. \}
. if !r#DOC_HEADER \{ .DOCHEADER \}
. if !r#HEADERS_ON \{ .HEADERS \}
. if !r#PAGINATE \{ .PAGINATE \}
. if \\n[#FOOTERS_ON] \{\
. HEADERS OFF
. if \\n[#PAGE_NUM_POS_SET]=0 \{ .PAGENUM_POS TOP CENTER \}
. \}
. if !r#HEADER_MARGIN \{ .HEADER_MARGIN 4P+6p \}
. if !r#HEADER_GAP \{ .HEADER_GAP 3P \}
. if \\n[#FOOTERS_ON] \{\
. if \\n[#PAGINATE]=0 \{\
. if !r#T_MARGIN \{ .T_MARGIN 6P \}
. \}
. \}
. if \\n[#HEADERS_ON]=0 \{\
. if \\n[#FOOTERS_ON]=0 \{\
. if !r#T_MARGIN \{ .T_MARGIN 6P \}
. \}
. \}
. if !r#T_MARGIN \{ .T_MARGIN \\n[#HEADER_MARGIN]+\\n[#HEADER_GAP] \}
. if !r#DOCHEADER_ADVANCE \{ .DOCHEADER_ADVANCE \\n[#T_MARGIN] \}
. if !r#FOOTER_MARGIN \{ .FOOTER_MARGIN 3P \}
. if !r#FOOTER_GAP \{ .FOOTER_GAP 3P \}
. if !r#B_MARGIN \{ .B_MARGIN \\n[#FOOTER_MARGIN]u+\\n[#FOOTER_GAP]u \}
. if !r#HDRFTR_RULE_GAP \{\
. if \\n[#HEADERS_ON] \{ .HDRFTR_RULE_GAP 4p \}
. if \\n[#FOOTERS_ON] \{ .HDRFTR_RULE_GAP 4p \}
. \}
. if !r#HDRFTR_RULE \{ .HDRFTR_RULE \}
. if !r#PAGE_NUM_SET \{ .PAGENUMBER 1 \}
. ie r#ADJ_DOC_LEAD \{ . \}
. el \{ .DOC_LEAD_ADJUST \}
\# Read in number registers and strings for type parameters
. nr #DOC_L_MARGIN \\n[#L_MARGIN]
. nr #DOC_L_LENGTH \\n[#L_LENGTH]
. nr #DOC_R_MARGIN \\n[#PAGE_WIDTH]-(\\n[#DOC_L_MARGIN]+\\n[#L_LENGTH])
. ds $DOC_FAM \\*[$FAMILY]
. nr #DOC_PT_SIZE \\n[#PT_SIZE]
. nr #DOC_LEAD \\n[#LEAD]
. ds $DOC_QUAD \\*[$QUAD_VALUE]
. ds $PP_FT \\*[$FONT]
\# Counters
. nr #PP 0
. nr #FN_NUMBER 0 1
. nr #EN_NUMBER 0 1
. nr #FN_COUNT_FOR_COLS 0 1
. RESET_HEAD_NUMBER
. RESET_SUBHEAD_NUMBER
. RESET_PARAHEAD_NUMBER
\# General style defaults for both PRINTSTYLEs
. nr #PP_STYLE 1
. PARA_INDENT \\n[#PP_INDENT]u
. if !d$HDRFTR_FAM \{ .HDRFTR_FAMILY \\*[$DOC_FAM] \}
. if !d$HDRFTR_SIZE_CHANGE \{ .HDRFTR_SIZE +0 \}
. if !d$PAGE_NUM_FAM \{ .PAGENUM_FAMILY \\*[$DOC_FAM] \}
. if !d$PAGE_NUM_FT \{ .PAGENUM_FONT R \}
. if !d$PAGE_NUM_SIZE_CHANGE \{ .PAGENUM_SIZE +0 \}
. if !r#PAGE_NUM_POS_SET \{ .PAGENUM_POS BOTTOM CENTER \}
. ie \\n[#PAGE_NUM_HYPHENS_SET] \{\
. if \\n[#PAGE_NUM_HYPHENS]=0 \{ .PAGENUM_HYPHENS OFF \}
. if \\n[#PAGE_NUM_HYPHENS]=1 \{ .PAGENUM_HYPHENS \}
. \}
. el \{ .PAGENUM_HYPHENS \}
. if !d$HEAD_QUAD \{ .HEAD_QUAD CENTER \}
. if !r#HEAD_CAPS \{ .HEAD_CAPS \}
. if !r#HEAD_UNDERLINE \{ .HEAD_UNDERLINE \}
. if !d$SH_QUAD \{ .SUBHEAD_QUAD LEFT \}
. if !r#HDRFTR_RIGHT_CAPS \{ .HDRFTR_RIGHT_CAPS \}
. if \\n[#HDRFTR_RIGHT_CAPS]=0 \{\
. if !d$HDRFTR_RIGHT_SIZE_CHANGE \{ .HDRFTR_RIGHT_SIZE +0 \}
. \}
. if !d$FN_FAM \{ .FOOTNOTE_FAMILY \\*[$DOC_FAM] \}
. if !d$FN_FT \{ .FOOTNOTE_FONT R \}
. if !d$FN_QUAD \{ .FOOTNOTE_QUAD \\*[$DOC_QUAD] \}
. if !r#FN_RULE \{ .FOOTNOTE_RULE \}
. if !r#FN_MARKERS \{ .FOOTNOTE_MARKERS \}
. if !r#FN_MARKER_STYLE \{ .FOOTNOTE_MARKER_STYLE STAR \}
. if !d$EN_FAM \{ .ENDNOTE_FAMILY \\*[$DOC_FAM] \}
. if !d$EN_FN \{ .ENDNOTE_FONT R \}
. if !d$EN_QUAD \{ .ENDNOTE_QUAD \\*[$DOC_QUAD] \}
. if !d$EN_STRING \{ .ENDNOTE_STRING "ENDNOTES" \}
. if !d$EN_STRING_FAM \{ .ENDNOTE_STRING_FAMILY \\*[$DOC_FAM] \}
. if !d$EN_STRING_QUAD \{ .ENDNOTE_STRING_QUAD CENTER \}
. if !r#EN_STRING_UNDERSCORE \{ .ENDNOTE_STRING_UNDERSCORE 2 \}
. if !d$EN_TITLE \{\
. ie \\n[#DOC_TYPE]=2 \{\
. ie '\\*[$CHAPTER]'' \{ .ENDNOTE_TITLE "\\*[$CHAPTER_STRING]" \}
. el \{ .ENDNOTE_TITLE "\\*[$CHAPTER_STRING] \\*[$CHAPTER]" \}
. \}
. el \{ .ENDNOTE_TITLE "\\*[$TITLE]" \}
. \}
. if !d$EN_TITLE_FAM \{ .ENDNOTE_TITLE_FAM \\*[$DOC_FAM] \}
. if !d$EN_TITLE_QUAD \{ .ENDNOTE_TITLE_QUAD LEFT \}
. if !r#EN_TITLE_UNDERSCORE \{ .ENDNOTE_TITLE_UNDERSCORE \}
. if !d$EN_NUMBER_FAM \{ .ENDNOTE_NUMBER_FAMILY \\*[$DOC_FAM] \}
. if !r#EN_NUMBERS_ALIGN_LEFT \{\
. if !r#EN_NUMBERS_ALIGN_RIGHT \{ .ENDNOTE_NUMBERS_ALIGN_RIGHT 2 \}
. \}
\# String defaults for both PRINTSTYLEs
. if !d$ATTRIBUTE_STRING \{ .ATTRIBUTE_STRING "by" \}
. if \\n[#USER_DEF_HDRFTR_LEFT]=0 \{ .ds $HDRFTR_LEFT \\*[$AUTHOR_1] \}
. rr #USER_DEF_HDRFTR_LEFT
. if \\n[#USER_DEF_HDRFTR_RIGHT]=0 \{ .ds $HDRFTR_RIGHT \\*[$TITLE] \}
. rr #USER_DEF_HDRFTR_RIGHT
. if !d$FINIS_STRING \{ .FINIS_STRING "END" \}
\# Defaults for printstyle TYPEWRITE
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_QUOTES]=1 \{ .UNDERLINE_QUOTES \}
. if \\n[#UNDERLINE_QUOTES]=0 \{ .UNDERLINE_QUOTES OFF \}
. if !r#Q_OFFSET_VALUE \{ .QUOTE_INDENT 2 \}
. if !r#EPI_OFFSET_VALUE \{ .EPIGRAPH_INDENT 2 \}
. if !d$LINEBREAK_CHAR \{ .LINEBREAK_CHAR * 3 2p \}
. if !d$FN_SIZE_CHANGE \{ .FOOTNOTE_SIZE +0 \}
. if !r#FN_RULE_LENGTH \{ .FOOTNOTE_RULE_LENGTH 2i \}
. if !r#FN_RULE_ADJ \{ .FOOTNOTE_RULE_ADJ 6p \}
. if !r#SLANT_MEANS_SLANT \{\
. ie \\n[#UNDERLINE_SLANT]=1 \{ .UNDERLINE_SLANT \}
. el \{ .UNDERLINE_SLANT OFF \}
. \}
. if !r#PH_INDENT \{ .PARAHEAD_INDENT \\n[#PP_INDENT]u/2u \}
. if !r#EN_PP_INDENT \{ .ENDNOTE_PARA_INDENT \\n[#PP_INDENT] \}
. \}
\# Defaults for printstyle TYPESET
. if \\n[#PRINT_STYLE]=2 \{\
. if !#DOCHEADER_LEAD \{ .DOCHEADER_LEAD +0 \}
. if !d$TITLE_FAM \{ .TITLE_FAMILY \\*[$DOC_FAM] \}
. if !d$TITLE_FT \{ .TITLE_FONT B \}
. if !d$TITLE_SIZE_CHANGE \{\
. ie \\n[#DOC_TYPE]=2 \{ .TITLE_SIZE +4 \}
. el \{ .TITLE_SIZE +3.5 \}
. \}
. if !d$SUBTITLE_FAM \{ .SUBTITLE_FAMILY \\*[$DOC_FAM] \}
. if !d$SUBTITLE_FT \{ .SUBTITLE_FONT R \}
. if !d$SUBTITLE_SIZE_CHANGE \{ .SUBTITLE_SIZE +0 \}
. if !d$AUTHOR_FAM \{ .AUTHOR_FAMILY \\*[$DOC_FAM] \}
. if !d$AUTHOR_FT \{ .AUTHOR_FONT I \}
. if !d$AUTHOR_SIZE_CHANGE \{ .AUTHOR_SIZE +0 \}
. if !d$DOCTYPE_FAM \{ .DOCTYPE_FAMILY \\*[$DOC_FAM] \}
. if !d$DOCTYPE_FT \{ .DOCTYPE_FONT BI \}
. if !d$DOCTYPE_SIZE_CHANGE \{ .DOCTYPE_SIZE +3 \}
. if !d$HDRFTR_LEFT_FAM \{ .HDRFTR_LEFT_FAMILY \\*[$DOC_FAM] \}
. if !d$HDRFTR_LEFT_FT \{ .HDRFTR_LEFT_FONT R \}
. if \\n[#HDRFTR_LEFT_CAPS] \{\
. if !d$HDRFTR_LEFT_SIZE_CHANGE \{ .HDRFTR_LEFT_SIZE -2 \}
. \}
. if !d$HDRFTR_LEFT_SIZE_CHANGE \{ .HDRFTR_LEFT_SIZE -.5 \}
. if !d$HDRFTR_CENTER_FAM \{ .HDRFTR_CENTER_FAMILY \\*[$DOC_FAM] \}
. if !d$HDRFTR_CENTER_FT \{ .HDRFTR_CENTER_FONT I \}
. if \\n[#HDRFTR_CENTER_CAPS] \{\
. if !d$HDRFTR_CENTER_SIZE_CHANGE \{ .HDRFTR_CENTER_SIZE -2 \}
. \}
. if !d$HDRFTR_CENTER_SIZE_CHANGE \{ .HDRFTR_CENTER_SIZE -.5 \}
. if !d$HDRFTR_RIGHT_FAM \{ .HDRFTR_RIGHT_FAMILY \\*[$DOC_FAM] \}
. if !d$HDRFTR_RIGHT_FT \{ .HDRFTR_RIGHT_FONT R \}
. if \\n[#HDRFTR_RIGHT_CAPS] \{\
. if !d$HDRFTR_RIGHT_SIZE_CHANGE \{ .HDRFTR_RIGHT_SIZE -2 \}
. \}
. if !d$HDRFTR_RIGHT_SIZE_CHANGE \{ .HDRFTR_RIGHT_SIZE -.5 \}
. if !d$HEAD_FAM \{ .HEAD_FAMILY \\*[$DOC_FAM] \}
. if !d$HEAD_FT \{ .HEAD_FONT B \}
. if !d$HEAD_SIZE_CHANGE \{ .HEAD_SIZE +1 \}
. if !r#HEAD_SPACE \{ .HEAD_SPACE \}
. if !d$SH_FAM \{ .SUBHEAD_FAMILY \\*[$DOC_FAM] \}
. if !d$SH_FT \{ .SUBHEAD_FONT B \}
. if !d$SH_SIZE_CHANGE \{ .SUBHEAD_SIZE +.5 \}
. if !d$PH_FAM \{ .PARAHEAD_FAMILY \\*[$DOC_FAM] \}
. if !d$PH_FT \{ .PARAHEAD_FONT BI \}
. if !d$PH_SIZE_CHANGE \{ .PARAHEAD_SIZE -.25 \}
. if !r#PH_INDENT \{ .PARAHEAD_INDENT \\n[#PP_INDENT]u/2u \}
. if !d$QUOTE_FAM \{ .QUOTE_FAMILY \\*[$DOC_FAM] \}
. if !d$QUOTE_FT \{ .QUOTE_FONT I \}
. if !d$QUOTE_SIZE_CHANGE \{ .QUOTE_SIZE +0 \}
. if !r#Q_OFFSET_VALUE \{ .QUOTE_INDENT 3 \}
. if !d$BQUOTE_FAM \{ .BLOCKQUOTE_FAMILY \\*[$DOC_FAM] \}
. if !d$BQUOTE_FT \{ .BLOCKQUOTE_FONT R \}
. if !d$BQUOTE_SIZE_CHANGE \{ .BLOCKQUOTE_SIZE -1 \}
. if !d$BQUOTE_QUAD \{ .BLOCKQUOTE_QUAD LEFT \}
. if !d$EPI_FAM \{ .EPIGRAPH_FAMILY \\*[$DOC_FAM] \}
. if !d$EPI_FT \{ .EPIGRAPH_FONT R \}
. if !d$EPI_SIZE_CHANGE \{ .EPIGRAPH_SIZE -1.5 \}
. if !r#EPI_AUTOLEAD \{ .EPIGRAPH_AUTOLEAD 2 \}
. if !d$EPI_QUAD \{ .EPIGRAPH_QUAD \\*[$DOC_QUAD] \}
. if !r#EPI_OFFSET_VALUE \{ .EPIGRAPH_INDENT 3 \}
. if !d$LINEBREAK_CHAR \{ .LINEBREAK_CHAR * 3 3p \}
. if !r#FN_RULE_LENGTH \{ .FOOTNOTE_RULE_LENGTH 4P \}
. if !r#FN_RULE_ADJ \{ .FOOTNOTE_RULE_ADJ 3p \}
. if !d$FN_SIZE_CHANGE \{ .FOOTNOTE_SIZE -2 \}
. if !r#FN_AUTOLEAD \{ .FOOTNOTE_AUTOLEAD 2 \}
. if !r#EN_PS \{ .ENDNOTE_PT_SIZE \\n[#DOC_PT_SIZE]u \}
. if !r#EN_LEAD \{ .ENDNOTE_LEAD 13.5p \}
. if !d$EN_STRING_FT \{ .ENDNOTE_STRING_FONT B \}
. if !d$EN_STRING_SIZE_CHANGE \{ .ENDNOTE_STRING_SIZE +1 \}
. if !d$EN_TITLE_FT \{ .ENDNOTE_TITLE_FONT B \}
. if !d$EN_TITLE_SIZE_CHANGE \{ .ENDNOTE_TITLE_SIZE 0 \}
. if !d$EN_NUMBER_FT \{ .ENDNOTE_NUMBER_FONT B \}
. if !$EN_NUMBER_SIZE_CHANGE \{ .ENDNOTE_NUMBER_SIZE 0 \}
. if !r#EN_PP_INDENT \{ .ENDNOTE_PARA_INDENT 1.5m \}
. \}
. TRAPS
. if \\n[#PRINT_STYLE]=1 \{ .nr #IGNORE 1 \}
.END
\#
\# ====================================================================
\#
\# +++START THE DOCUMENT+++
\#
\# THE START MACRO
\# ---------------
\# *Arguments:
\#
\# *Function:
\# Reads in default document style parameters and any parameter
\# the user has changed before issuing START.
\# Using the information gathered in the opening macros,
\# prints appropriate title (or chapter #), subtitle, author
\# and document type (if appropriate).
\# *Notes:
\# The .PRINT \& (zero-width character) is required to get the
\# subsequent .sp request to work as advertised.
\#
\# The overall document line length, family, and point-size
\# are stored in #DOC_L_LENGTH, $DOC_FAM, and #DOC_PT_SIZE for
\# use in the HEADER and FOOTER macros.
\#
.MAC START END
. if !\\n[#PRINT_STYLE] \{\
. PRINTSTYLE TYPEWRITE
. PRINT \&
. po 6P
. ll 39P
. ta \\n(.lu
. sp |1i-1v
. CENTER
. PRINT "You neglected to enter a PRINTSTYLE"
. fl
. ab PRINTSTYLE missing
. \}
. nr #DOCS 1
. DEFAULTS
. if \\n[#COLLATE] \{\
. COPYSTYLE \\*[$COPY_STYLE]
. nr #HEADERS_ON \\n[#HEADER_STATE]
. if \\n[#PAGE_NUM_V_POS]=1 \{ .nr #PAGINATE \\n[#PAGINATION_STATE] \}
. sp |\\n[#HEADER_MARGIN]u
. PRINT \&
. \}
\#
. if \\n[#PRINT_PAGENUM_ON_PAGE_1] \{\
. sp |\\n[#HEADER_MARGIN]u
. PRINT_PAGE_NUMBER
. \}
. rr #COLLATE
. rr #PAGINATION_STATE
\#
. ie \\n[#DOC_HEADER]=0 \{\
. PRINT \&
. if \\n[#DOC_TYPE]=4 \{\
. if !'\\n(.z'' \{ .di \}
. \}
. ie r#ADVANCE_FROM_TOP \{ .sp |\\n[#ADVANCE_FROM_TOP]u-1v \}
. el \{ .sp |\\n[#T_MARGIN]u-1v \}
. PP
. nr #PP 0
. rr #DOC_HEADER
. if r#ADVANCE_FROM_TOP \{ .rr #ADVANCE_FROM_TOP \}
. \}
. el \{\
. nr #DOCHEADER_LINES 0 1
. if \\n[#PRINT_STYLE]=2 \{ .LS \\n[#DOC_LEAD]u+\\n[#DOCHEADER_LEAD_ADJ]u \}
. nr #DOCHEADER_LEAD \\n[#LEAD]
\# Default
. if \\n[#DOC_TYPE]=1 \{\
. PRINT \&
. sp |\\n[#DOCHEADER_ADVANCE]u-1v
. ev TITLE
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u*2u \}
. el \{ .vs \\n[#DOC_LEAD]u \}
. CAPS
. if !'\\*[$TITLE]'' \{ .UNDERSCORE "\\*[$TITLE]\}
. CAPS OFF
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$TITLE_FAM]
. FT \\*[$TITLE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$TITLE_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. PRINT \\*[$TITLE]
. \\n+[#DOCHEADER_LINES]
. CAPS OFF
. \}
. ev
. ev SUBTITLE
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if !'\\*[$SUBTITLE]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u*2u \}
. el \{ .vs \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$SUBTITLE_FAM]
. FT \\*[$SUBTITLE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$SUBTITLE_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. \}
. PRINT \\*[$SUBTITLE]
. \\n+[#DOCHEADER_LINES]
. \}
. if '\\*[$SUBTITLE]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. ALD \\n[#DOC_LEAD]u
. \}
. \}
. ev
. ev AUTHOR
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if !'\\*[$AUTHOR_1]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u \}
. el \{ .vs \\n[#DOC_LEAD]u/2u \}
. if !d$SUBTITLE \{\
. ie \\n[#SINGLE_SPACE] \{ .ALD \\n[#DOC_LEAD]u \}
. el \{ .ALD \\n[#DOC_LEAD]u*2u \}
. \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$AUTHOR_FAM]
. FT \\*[$AUTHOR_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$AUTHOR_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. \}
. PRINT \\*[$ATTRIBUTE_STRING]
. \\n+[#DOCHEADER_LINES]
. nr #AUTHORS \\n[#AUTHOR_NUM]
. nr #NEXT_AUTHOR 0 1
. while \\n[#AUTHORS]>\\n[#NEXT_AUTHOR] \{\
. PRINT \\*[$AUTHOR_\\n+[#NEXT_AUTHOR]]
. \\n+[#DOCHEADER_LINES]
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#AUTHOR_LINES]=1 \{\
. ie \\n[#SINGLE_SPACE] \{ .RLD \\n[#DOC_LEAD]u \}
. el \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. \}
. \}
. ev
. \}
\# Chapter
. if \\n[#DOC_TYPE]=2 \{\
. PRINT \&
. sp |\\n[#DOCHEADER_ADVANCE]u-1v
. ev TITLE
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. CENTER
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u*2u \}
. el \{ .vs \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$TITLE_FAM]
. FT \\*[$TITLE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$TITLE_SIZE_CHANGE]
. LS \\n[#DOC_LEAD]u
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. CAPS
. ie '\\*[$CHAPTER]'' \{ .PRINT \\*[$CHAPTER_STRING] \}
. el \{ .PRINT \\*[$CHAPTER_STRING] \\*[$CHAPTER] \}
. CAPS OFF
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie '\\*[$CHAPTER]'' \{ .PRINT \\*[$CHAPTER_STRING] \}
. el \{ .PRINT \\*[$CHAPTER_STRING] \\*[$CHAPTER] \}
. \}
. ev
. \}
\# Named
. if \\n[#DOC_TYPE]=3 \{\
. PRINT \&
. sp |\\n[#DOCHEADER_ADVANCE]u-1v
. ev TITLE
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u*2u \}
. el \{ .vs \\n[#DOC_LEAD]u \}
. CAPS
. if !'\\*[$TITLE]'' \{ .UNDERSCORE "\\*[$TITLE]\}
. CAPS OFF
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$TITLE_FAM]
. FT \\*[$TITLE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$TITLE_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. PRINT \\*[$TITLE]
. \\n+[#DOCHEADER_LINES]
. CAPS OFF
. \}
. ev
. ev SUBTITLE
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if !'\\*[$SUBTITLE]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u*2u \}
. el \{ .vs \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$SUBTITLE_FAM]
. FT \\*[$SUBTITLE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$SUBTITLE_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. \}
. PRINT \\*[$SUBTITLE]
. \\n+[#DOCHEADER_LINES]
. \}
. if '\\*[$SUBTITLE]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. ALD \\n[#DOC_LEAD]u
. \}
. \}
. ev
. ev AUTHOR
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if !'\\*[$AUTHOR_1]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u \}
. el \{ .vs \\n[#DOC_LEAD]u/2u \}
. if !d$SUBTITLE \{\
. ie \\n[#SINGLE_SPACE] \{ .ALD \\n[#DOC_LEAD]u \}
. el \{ .ALD \\n[#DOC_LEAD]u*2u \}
. \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$AUTHOR_FAM]
. FT \\*[$AUTHOR_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$AUTHOR_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. \}
. PRINT \\*[$ATTRIBUTE_STRING]
. \\n+[#DOCHEADER_LINES]
. nr #AUTHORS \\n[#AUTHOR_NUM]
. nr #NEXT_AUTHOR 0 1
. while \\n[#AUTHORS]>\\n[#NEXT_AUTHOR] \{\
. PRINT \\*[$AUTHOR_\\n+[#NEXT_AUTHOR]]
. \\n+[#DOCHEADER_LINES]
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#AUTHOR_LINES]=1 \{\
. ie \\n[#SINGLE_SPACE] \{ .RLD \\n[#DOC_LEAD]u \}
. el \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. \}
. \}
. ev
. ev DOCTYPE
. CENTER
. L_MARGIN \\n[#DOC_L_MARGIN]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. vs \\n[#DOC_LEAD]u
. if '\\*[$AUTHOR_1]'' \{\
. ie !d$SUBTITLE \{\
. ie \\n[#SINGLE_SPACE] \{ .RLD \\n[#DOC_LEAD]u*2u \}
. el \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. el \{\
. ie \\n[#SINGLE_SPACE] \{ .RLD \\n[#DOC_LEAD]u*2u \}
. el \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. \}
. ie \\n[#SINGLE_SPACE] \{ .ALD \\n[#DOC_LEAD]u*2u \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. UNDERSCORE2 "\\*[$DOC_TYPE]
. if \\n[#SINGLE_SPACE] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$DOCTYPE_FAM]
. FT \\*[$DOCTYPE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$DOCTYPE_SIZE_CHANGE]
. LS \\n[#DOCHEADER_LEAD]u
. ALD \\n[#DOCHEADER_LEAD]u
. \\n+[#DOCHEADER_LINES]
. UNDERSCORE "\\*[$DOC_TYPE]
. \\n+[#DOCHEADER_LINES]
. \}
. ev
. \}
. if !\\n[#DOC_TYPE]=4 \{\
. if \\n[#PRINT_STYLE]=2 \{\
. nr #DEPTH_1 \\n[#DOCHEADER_LINES]*\\n[#DOCHEADER_LEAD]
. nr #DEPTH_2 \\n[#DOCHEADER_LINES]*\\n[#DOC_LEAD]
. ie \\n[#DEPTH_1]<\\n[#DEPTH_2] \{\
. nr #DOCHEADER_SPACE_ADJ \\n[#DEPTH_2]-\\n[#DEPTH_1]
. \}
. el \{\
. nr #DOCHEADER_SPACE_ADJ \\n[#DEPTH_1]-\\n[#DEPTH_2]
. \}
. nr #DOCHEADER_EXTRA_SPACE \\n[#DOCHEADER_SPACE_ADJ] \\n[#DOC_LEAD]
. while \\n[#DOCHEADER_EXTRA_SPACE]>\\n[#DOC_LEAD] \{\
. \\n-[#DOCHEADER_EXTRA_SPACE]
. \}
. if \\n[#DOCHEADER_EXTRA_SPACE]>0 \{\
. ie \\n[#DOCHEADER_LEAD_ADJ]<0 \{\
. ALD \\n[#DOCHEADER_EXTRA_SPACE]u
. \}
. el \{ .ALD \\n[#DOC_LEAD]u-\\n[#DOCHEADER_EXTRA_SPACE]u \}
. \}
. \}
. if \\n[#PRINT_STYLE]=1 \{ .ALD \\n[#DOC_LEAD]u \}
. if \\n[#PRINT_STYLE]=2 \{ .ALD \\n[#DOC_LEAD]u*2u \}
. if \\n[#COLUMNS] \{\
. nr #COL_NUM 0 1
. nr #L_LENGTH_FOR_EPI \\n[#L_LENGTH]
. po \\n[#COL_\\n+[#COL_NUM]_L_MARGIN]u
. LL \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. mk dc
. \}
. \}
. \}
. rr #DOCHEADER_LEAD
. rr #DOCHEADER_LEAD_ADJ
. rr #DEPTH_1
. rr #DEPTH_2
. rr #DOCHEADER_ADVANCE
. rr #ADVANCE_FROM_TOP
. rr #DOCHEADER_SPACE_ADJ
. rr #DOCHEADER_LINES
. rr #DOCHEADER_EXTRA_SPACE
. rr #AUTHORS
. rr #NEXT_AUTHOR
. rr #AUTHOR_NUM
. rr #NUM_AUTHORS
. nr #START 1
. nr #START_FOR_FOOTERS 1
.END
\#
\# ====================================================================
\#
\# +++MACROS TO CHANGE SOME DEFAULTS+++
\#
\# DOCUMENT HEADER
\# ---------------
\# *Argument:
\# | [distance to advance from top of page]
\# *Function:
\# Turns printing of document header on or off. If a second argument
\# in units of measure is given, advances that distance from the
\# top of the page without printing the document header.
\# *Notes:
\# Default is on. If the 1st argument is (which turns
\# document headers off), the optional 2nd argument may be given
\# (with a unit of measure).
\#
.MAC DOCHEADER END
. ie '\\$1'' \{ .nr #DOC_HEADER 1 \}
. el \{\
. if !'\\$2'' \{ .nr #ADVANCE_FROM_TOP (\\$2) \}
. nr #DOC_HEADER 0
. \}
.END
\#
\#
\# DOCUMENT HEADER LEADING
\# -----------------------
\# *Arguments:
\# <+|- amount by which to in/decrease leading of doc header>
\# *Function:
\# Stores user supplied lead in/decrease in register #DOCHEADER_LEAD_ADJ.
\# *Notes:
\# A unit of measure must be supplied. Decimal fractions OK.
\# Default is +0, i.e. same as DOC_LEAD.
\#
.MAC DOCHEADER_LEAD END
. nr #DOCHEADER_LEAD_ADJ (\\$1)
.END
\#
\#
\# DOCHEADER ADVANCE
\# -----------------
\# *Arguments:
\#
\# *Function:
\# Creates register #DOCHEADER_ADVANCE, used in START.
\# *Notes:
\# Unit of measure required.
\# Default is same as T_MARGIN.
\#
.MAC DOCHEADER_ADVANCE END
. nr #DOCHEADER_ADVANCE (\\$1)
.END
\#
\#
\# TITLE FAMILY
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $TITLE_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC TITLE_FAMILY END
. ds $TITLE_FAM \\$1
.END
\#
\#
\# TITLE FONT
\# ----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $TITLE_FT.
\# *Notes:
\# Default is bold.
\#
.MAC TITLE_FONT END
. ds $TITLE_FT \\$1
.END
\#
\#
\# TITLE SIZE
\# ----------
\# *Argument:
\# <+|- number of points by which to in/decrease title at start
\# of the document (relative to running text)>
\# *Function:
\# Creates string $TITLE_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign, with no space afterwards.
\# Fractional point sizes are allowed.
\# Default is +3.5 for printstyle TYPESET DEFAULT | STORY | NAMED;
\# 4 for TYPESET CHAPTER; +0 for TYPEWRITE.
\#
.MAC TITLE_SIZE END
. ds $TITLE_SIZE_CHANGE \\$1
.END
\#
\#
\# SUBTITLE FAMILY
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $SUBTITLE_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC SUBTITLE_FAMILY END
. ds $SUBTITLE_FAM \\$1
.END
\#
\#
\# SUBTITLE FONT
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $SUBTITLE_FT.
\# *Notes:
\# Default is same as running text.
\#
.MAC SUBTITLE_FONT END
. ds $SUBTITLE_FT \\$1
.END
\#
\#
\# SUBTITLE SIZE
\# -------------
\# *Argument:
\# <+|- number of points by which to in/decrease subtitle at start
\# of the document (relative to running text)>
\# *Function:
\# Creates or modifies string $SUBTITLE_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign with no space afterwards.
\# Fractional point sizes are allowed.
\# Default is +0.
\#
.MAC SUBTITLE_SIZE END
. ds $SUBTITLE_SIZE_CHANGE \\$1
.END
\#
\#
\# AUTHOR FAMILY
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $AUTHOR_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC AUTHOR_FAMILY END
. ds $AUTHOR_FAM \\$1
.END
\#
\#
\# AUTHOR FONT
\# -----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $AUTHOR_FT.
\# *Notes:
\# Default is italic.
\#
.MAC AUTHOR_FONT END
. ds $AUTHOR_FT \\$1
.END
\#
\#
\# AUTHOR SIZE
\# -----------
\# *Argument:
\# <+|- number of points by which to in/decrease author at start
\# of the document>
\# *Function:
\# Creates or modifies string $AUTHOR_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign with no space afterwards.
\# Fractional point sizes are allowed.
\# Default is same as running text.
\#
.MAC AUTHOR_SIZE END
. ds $AUTHOR_SIZE_CHANGE \\$1
.END
\#
\#
\# DOCTYPE FAMILY
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DOCTYPE_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC DOCTYPE_FAMILY END
. ds $DOCTYPE_FAM \\$1
.END
\#
\#
\# DOCTYPE FONT
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DOCTYPE_FT.
\# *Notes:
\# Default is bold italic.
\#
.MAC DOCTYPE_FONT END
. ds $DOCTYPE_FT \\$1
.END
\#
\#
\# DOCTYPE SIZE
\# -------------
\# *Argument:
\# <+|- number of points by which to in/decrease the document
\# type string (relative to running text)>
\# *Function:
\# Creates or modifies string $DOCTYPE_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign with no space afterwards.
\# Fractional point sizes are allowed.
\# Default is +3 for TYPESET; 0 for TYPEWRITE.
\#
.MAC DOCTYPE_SIZE END
. ds $DOCTYPE_SIZE_CHANGE \\$1
.END
\#
\#
\# DOCUMENT LEFT MARGIN
\# --------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #DOC_L_MARGIN.
\# *Notes:
\# Affects EVERYTHING on the page.
\#
.MAC DOC_LEFT_MARGIN END
. br
. nr #DOC_L_MARGIN (\\$1)
. L_MARGIN \\n[#DOC_L_MARGIN]u
.END
\#
\#
\# DOCUMENT RIGHT MARGIN
\# ---------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #DOC_R_MARGIN.
\# *Notes:
\# Affects EVERYTHING on the page.
\#
.MAC DOC_RIGHT_MARGIN END
. br
. nr #DOC_R_MARGIN (\\$1)
. R_MARGIN \\n[#DOC_R_MARGIN]
. nr #DOC_L_LENGTH \\n[#L_LENGTH]
.END
\#
\#
\# DOCUMENT LINE LENGTH
\# --------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DOC_L_LENGTH.
\# *Notes:
\# Affects EVERYTHING on the page.
\#
.MAC DOC_LINE_LENGTH END
. br
. nr #DOC_L_LENGTH (\\$1)
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
.END
\#
\#
\# DOCUMENT FAMILY
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DOC_FAM.
\# *Notes:
\# Affects everything EXCEPT headers and footers.
\#
.MAC DOC_FAMILY END
. br
. ds $DOC_FAM \\$1
. FAMILY \\*[$DOC_FAM]
. TITLE_FAMILY \\*[$DOC_FAM]
. SUBTITLE_FAMILY \\*[$DOC_FAM]
. AUTHOR_FAMILY \\*[$DOC_FAM]
. DOCTYPE_FAMILY \\*[$DOC_FAM]
. HEAD_FAMILY \\*[$DOC_FAM]
. SUBHEAD_FAMILY \\*[$DOC_FAM]
. QUOTE_FAMILY \\*[$DOC_FAM]
. BLOCKQUOTE_FAMILY \\*[$DOC_FAM]
. EPIGRAPH_FAMILY \\*[$DOC_FAM]
. HDRFTR_FAMILY \\*[$DOC_FAM]
. PAGENUM_FAMILY \\*[$DOC_FAM]
.END
\#
\#
\# DOCUMENT POINT SIZE
\# -------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register $DOC_PT_SIZE.
\# *Notes:
\# DOC_PT_SIZE is the basis for calculating all type sizes in
\# a document.
\#
.MAC DOC_PT_SIZE END
. if \\n[#IGNORE] \{ .return \}
. br
. PT_SIZE \\$1
. nr #DOC_PT_SIZE \\n[#PT_SIZE]
.END
\#
\#
\# DOCUMENT LEAD
\# -------------
\# *Argument:
\# [ADJUST]
\# *Function:
\# Creates or modifies register #DOC_LEAD. If the optional
\# ADJUST argument is given, adjusts leading so that the last
\# line of text falls exactly on #B_MARGIN.
\# *Notes:
\# DOC_LEAD is the basis for calculating all leading changes in
\# a document. Default for TYPESET is 16; 24 for TYPEWRITE.
\#
\# Because the visible bottom or footer margin of a page depends
\# on the overall document lead supplied by the register #DOC_LEAD,
\# DOC_LEAD, in the body of a document, should always be associated
\# with the start of a new page (in other words, just before or
\# just after a manual NEWPAGE).
\#
.MAC DOC_LEAD END
. if \\n[#IGNORE] \{ .return \}
. br
. vs \\$1
. nr #DOC_LEAD \\n[#LEAD]
. if '\\$2'ADJUST' \{ .TRAPS \}
.END
\#
\# ADJUST DOCUMENT LEAD
\# --------------------
\# *Arguments:
\# |
\# *Function:
\# Adjusts document lead so that the last line of text falls exactly
\# on #B_MARGIN.
\#
.MAC DOC_LEAD_ADJUST END
. ie '\\$1'' \{ .nr #ADJ_DOC_LEAD 1 \}
. el \{ .nr #ADJ_DOC_LEAD 0 \}
.END
\#
\#
\# DOCUMENT QUAD
\# -------------
\# *Arguments:
\# L | LEFT | R | RIGHT | C | CENTER | CENTRE | J | JUSTIFY
\# *Function:
\# Creates or modifies string $DOC_QUAD.
\# *Notes:
\# While QUAD (from the typesetting macros) can be used before START
\# to change the default document quad, DOC_QUAD *must* be used after
\# the START macro has been invoked.
\#
\# Default is LEFT for printstyle TYPEWRITE, JUSTIFY for printstyle
\# TYPESET.
\#
.MAC DOC_QUAD END
. ds $DOC_QUAD \\$1
. QUAD \\*[$DOC_QUAD]
.END
\#
\# ====================================================================
\#
\# +++INTERNATIONALIZATION+++
\#
\# ATTRIBUTE STRING
\# ----------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $ATTRIBUTE_STRING.
\# *Notes:
\# Default is "by". A blank string ("") may be used if no
\# attribution is desired.
\#
.MAC ATTRIBUTE_STRING END
. ds $ATTRIBUTE_STRING \\$1
.END
\#
\#
\# CHAPTER STRING
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $CHAPTER_STRING.
\# *Notes:
\# Default is "chapter".
\#
.MAC CHAPTER_STRING END
. ds $CHAPTER_STRING \\$1
.END
\#
\#
\# DRAFT STRING
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $DRAFT_STRING.
\# *Notes:
\# Default is "draft".
\#
.MAC DRAFT_STRING END
. ds $DRAFT_STRING \\$1
.END
\#
\#
\# REVISION STRING
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $REVISION_STRING.
\# *Notes:
\# Default is "revision".
\#
.MAC REVISION_STRING END
. ds $REVISION_STRING \\$1
.END
\#
\#
\# FINIS STRING
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $FINIS_STRING.
\# *Notes:
\# Default is "END".
\#
.MAC FINIS_STRING END
. nr #FINIS 1
. CAPS
. ds $FINIS_STRING \\$1
. CAPS OFF
.END
\#
\# ====================================================================
\#
\# +++RECTO/VERSO+++
\#
\# RECTO_VERSO
\# -----------
\# *Arguments:
\# |
\# *Function:
\# Switches HDRFTR_LEFT and HDRFTR_RIGHT on alternate pages. Also
\# switches page numbers left and right if either is chosen rather
\# than the default centered page numbers. Switches left and right
\# margins if differing values have been entered.
\# *Notes:
\# Default is OFF.
\#
.MAC RECTO_VERSO END
. ie '\\$1'' \{ .nr #RECTO_VERSO 1 \}
. el \{ .nr #RECTO_VERSO 0 \}
.END
\#
\# ====================================================================
\#
\# +++EPIGRAPHS+++
\#
\# EPIGRAPH FAMILY
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $EPI_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC EPIGRAPH_FAMILY END
. ds $EPI_FAM \\$1
.END
\#
\#
\# EPIGRAPH FONT
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $EPI_FT.
\# *Notes:
\# Default is same as running text.
\#
.MAC EPIGRAPH_FONT END
. ds $EPI_FT \\$1
.END
\#
\#
\# EPIGRAPH SIZE
\# -------------
\# *Argument:
\# <-|+ number of points by which to de/increase point size of epigraphs
\# (relative to running text)>
\# *Function:
\# Creates or modifies string $EPI_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a - or + sign with no space afterwards.
\# Fractional point sizes are allowed. Default -1.5 for printstyle
\# TYPESET; +0 for TYPEWRITE.
\#
.MAC EPIGRAPH_SIZE END
. ds $EPI_SIZE_CHANGE \\$1
.END
\#
\#
\# EPIGRAPH QUAD
\# -------------
\# *Arguments:
\# L | LEFT | J | JUSTIFY
\# *Function:
\# Creates or modifies string $EPI_QUAD.
\# *Notes:
\# Default is $DOC_QUAD when BLOCK argument is passed to EPIGRAPH.
\#
.MAC EPIGRAPH_QUAD END
. ds $EPI_QUAD \\$1
.END
\#
\#
\# EPIGRAPH INDENT
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #EPI_OFFSET_VALUE.
\# *Notes:
\# Default is 2 for TYPEWRITE, 3 for TYPESET.
\#
.MAC EPIGRAPH_INDENT END
. nr #EPI_OFFSET_VALUE \\$1
.END
\#
\#
\# EPIGRAPH AUTOLEAD
\# -----------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #EPI_AUTOLEAD.
\# *Notes:
\# Default is 2 (for TYPESET; TYPEWRITE doesn't require this).
\#
.MAC EPIGRAPH_AUTOLEAD END
. nr #EPI_AUTOLEAD \\$1
.END
\#
\#
\# EPIGRAPH
\# --------
\# *Arguments:
\# BLOCK |
\# *Function:
\# Places an epigraph before the document's text, after the
\# document header, or after a HEAD.
\# *Notes:
\# #EPIGRAPH 1 = centered; 2 = block
\#
\# By default, epigraphs are centered, allowing the user
\# to input them on a line per line basis. To change this
\# behaviour, the user can supply the argument BLOCK, which
\# will produce indented, filled text similar to BLOCKQUOTE.
\#
\# If a block epigraph contains more than one para, ALL paras of
\# the epigraph must be preceded by PP. Otherwise, PP is optional.
\#
.MAC EPIGRAPH END
. nr #PP_STYLE 2
. nr #Q_PP 0
. if \\n[#START] \{\
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#AUTHOR_LINES]=1 \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. ie '\\$1'' \{\
. nr #EPIGRAPH 1
. ev EPIGRAPH
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. CHECK_INDENT
. if \\n[#COLUMNS] \{\
. ie \\n[#START] \{\
. ll \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. \}
. CENTER
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. if '\\*[$EPI_FT]'I' \{\
. FT I
. \}
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u \}
. el \{ .vs \\n[#DOC_LEAD]u/2u \}
. nr #EPI_LEAD \\n[#LEAD]
. nr #EPI_LEAD_DIFF \\n[#DOC_LEAD]-\\n[#EPI_LEAD]
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EPI_FAM]
. FT \\*[$EPI_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$EPI_SIZE_CHANGE]
. AUTOLEAD \\n[#EPI_AUTOLEAD]
. nr #EPI_LEAD \\n[#LEAD]
. nr #EPI_LEAD_DIFF \\n[#DOC_LEAD]-\\n[#EPI_LEAD]
. \}
. di EPI_TEXT
. nr #EPI_ACTIVE 1
. \}
. el \{\
. ie '\\$1'BLOCK' \{\
. nr #EPIGRAPH 2
. ev EPIGRAPH
. ie \\n[#START] \{\
. ie \\n[#COLUMNS] \{\
. ll \\n[#L_LENGTH_FOR_EPI]u-(\\n[#PP_INDENT]u*(\\n[#EPI_OFFSET_VALUE]u*2u))
. ta \\n(.lu
. \}
. el \{\
. ll \\n[#L_LENGTH]u-(\\n[#PP_INDENT]u*(\\n[#EPI_OFFSET_VALUE]u*2u))
. ta \\n(.lu
. \}
. \}
. el \{\
. ll \\n[#L_LENGTH]u-(\\n[#PP_INDENT]u*(\\n[#EPI_OFFSET_VALUE]u*2u))
. ta \\n(.lu
. if \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u-(\\n[#PP_INDENT]u*(\\n[#EPI_OFFSET_VALUE]u*2u))
. ta \\n(.lu
. \}
. CHECK_INDENT
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. if '\\*[$EPI_FT]'I' \{\
. FT I
. \}
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u \}
. el \{ .vs \\n[#DOC_LEAD]u/2u \}
. QUAD LEFT
. HY OFF
. nr #EPI_LEAD \\n[#LEAD]
. nr #EPI_LEAD_DIFF \\n[#DOC_LEAD]-\\n[#EPI_LEAD]
. di EPI_TEXT
. nr #EPI_ACTIVE 1
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EPI_FAM]
. FT \\*[$EPI_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$EPI_SIZE_CHANGE]
. AUTOLEAD \\n[#EPI_AUTOLEAD]
. QUAD \\*[$EPI_QUAD]
. HY
. nr #EPI_LEAD \\n[#LEAD]
. nr #EPI_LEAD_DIFF \\n[#DOC_LEAD]-\\n[#EPI_LEAD]
. di EPI_TEXT
. nr #EPI_ACTIVE 1
. \}
. \}
. el \{\
. DO_EPIGRAPH
. \}
. \}
.END
\#
\#
\# DO EPIGRAPH
\# -----------
\# *Arguments:
\#
\# *Function:
\# Ends diversion started in EPIGRAPH. Makes spacing
\# adjustments to compensate for the difference between epigraph
\# leading and overall document leading, so that the bottom of
\# the pages remain flush.
\# *Notes:
\# In addition to its usual place at the beginning of a
\# document, EPIGRAPH may also be used after HEAD.
\#
.MAC DO_EPIGRAPH END
. br
. di
. REMOVE_INDENT
. ev
. nr #EPI_DEPTH \\n[#DIVER_DEPTH]-\\n[#EPI_LEAD]
. nr #EPI_LINES \\n[#EPI_DEPTH]/\\n[#EPI_LEAD]
. ie \\n[#START] \{\
. nr #EPI_WHITESPACE (\\n[#DOC_LEAD]*\\n[#EPI_LINES])-\\n[#EPI_DEPTH]
. while \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{ .nr #EPI_WHITESPACE -\\n[#DOC_LEAD] \}
. RLD \\n[#DOC_LEAD]u
. ie \\n[#PRINT_STYLE]=1 \{\
. if \\n[#EPI_WHITESPACE]=\\n[#DOC_LEAD] \{ .ALD \\n[#EPI_WHITESPACE]u/2u \}
. \}
. el \{\
. if \\n[#EPI_WHITESPACE]<\\n[#DOC_LEAD] \{\
. ALD \\n[#EPI_LEAD_DIFF]u+(\\n[#EPI_WHITESPACE]u/2u)
. \}
. if \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{\
. ALD \\n[#EPI_LEAD_DIFF]u+(\\n[#EPI_WHITESPACE]u/2u)-\\n[#DOC_LEAD]u
. \}
. \}
. \}
. el \{\
. ie \\n[#EPI_DEPTH]<\\n[#TRAP_DISTANCE] \{\
. nr #EPI_FITS 1
. nr #EPI_WHITESPACE (\\n[#DOC_LEAD]*\\n[#EPI_LINES])-\\n[#EPI_DEPTH]
. while \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{ .nr #EPI_WHITESPACE -\\n[#DOC_LEAD] \}
. ie \\n[#PRINT_STYLE]=1 \{\
. if \\n[#EPI_WHITESPACE]=\\n[#DOC_LEAD] \{ .ALD \\n[#EPI_WHITESPACE]u/2u \}
. \}
. el \{\
. if \\n[#EPI_WHITESPACE]<\\n[#DOC_LEAD] \{\
. ALD \\n[#EPI_LEAD_DIFF]u+(\\n[#EPI_WHITESPACE]u/2u)
. \}
. if \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{\
. ALD \\n[#EPI_LEAD_DIFF]u+(\\n[#EPI_WHITESPACE]u/2u)-\\n[#DOC_LEAD]u
. \}
. \}
. \}
. el \{\
. nr #EPI_LINES_TO_TRAP 0 1
. while \\n[#EPI_LEAD]*\\n+[#EPI_LINES_TO_TRAP]<\\n[#TRAP_DISTANCE] \{ .nr #LOOP 1 \}
. nr #EPI_LINES_TO_TRAP -1
. nr #EPI_WHITESPACE (\\n[#EPI_LINES_TO_TRAP]*\\n[#DOC_LEAD])-(\\n[#EPI_LINES_TO_TRAP]*\\n[#EPI_LEAD])
. while \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{ .nr #EPI_WHITESPACE -\\n[#DOC_LEAD] \}
. if \\n[#EPI_WHITESPACE]<\\n[#DOC_LEAD] \{ .ALD \\n[#EPI_WHITESPACE]u \}
. if \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{ .ALD \\n[#EPI_WHITESPACE]u-\\n[#DOC_LEAD]u \}
. \}
. \}
. if \\n[#EPIGRAPH]=1 \{\
. po \\n[#L_MARGIN]u
. if \\n[#COLUMNS] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. \}
. if \\n[#EPIGRAPH]=2 \{\
. nr #EPI_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#EPI_OFFSET_VALUE])
. if \\n[#COLUMNS] \{\
. nr #EPI_OFFSET \\n[#COL_\\n[#COL_NUM]_L_MARGIN]+(\\n[#PP_INDENT]*\\n[#EPI_OFFSET_VALUE])
. \}
. po \\n[#EPI_OFFSET]u
. \}
. nf
. EPI_TEXT
. br
. ie \\n[#START] \{\
. if \\n[#EPI_WHITESPACE]<\\n[#DOC_LEAD] \{\
. ALD \\n[#EPI_WHITESPACE]u/2u
. \}
. if \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{\
. ALD (\\n[#EPI_WHITESPACE]u/2u)-\\n[#DOC_LEAD]u
. \}
. \}
. el \{\
. rr #EPI_ACTIVE
. ie \\n[#EPI_FITS] \{\
. ie \\n[#FN_FOR_EPI] \{\
. nr #EPI_LINES_TO_END 1
. nr #EPI_WHITESPACE (\\n[#EPI_LINES_TO_END]*\\n[#DOC_LEAD])-(\\n[#EPI_LINES_TO_END]*\\n[#EPI_LEAD])
. while \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{ .nr #EPI_WHITESPACE -\\n[#DOC_LEAD] \}
. ALD \\n[#EPI_WHITESPACE]u-(\\n[#DOC_LEAD]u-\\n[#EPI_LEAD]u)
. \}
. el \{\
. ie \\n[#PRINT_STYLE]=1 \{\
. if \\n[#EPI_WHITESPACE]=\\n[#DOC_LEAD] \{ .ALD \\n[#EPI_WHITESPACE]u \}
. \}
. el \{\
. if \\n[#EPI_WHITESPACE]<\\n[#DOC_LEAD] \{\
. ALD \\n[#EPI_WHITESPACE]u/2u
. \}
. if \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{\
. ALD (\\n[#EPI_WHITESPACE]u/2u)-\\n[#DOC_LEAD]u
. \}
. \}
. \}
. \}
. el \{\
. nr #EPI_LINES_TO_END \\n[#EPI_LINES]-\\n[#EPI_LINES_TO_TRAP]
. if \\n[#LOOP] \{. nr #EPI_LINES_TO_END +1 \}
. rr #LOOP
. nr #EPI_WHITESPACE (\\n[#EPI_LINES_TO_END]*\\n[#DOC_LEAD])-(\\n[#EPI_LINES_TO_END]*\\n[#EPI_LEAD])
. while \\n[#EPI_WHITESPACE]>\\n[#DOC_LEAD] \{ .nr #EPI_WHITESPACE -\\n[#DOC_LEAD] \}
. ALD \\n[#EPI_WHITESPACE]u-(\\n[#DOC_LEAD]u-\\n[#EPI_LEAD]u)
. if \\n[#PRINT_STYLE]=1 \{\
. if !\\n[#SINGLE_SPACE] \{\
. nr #EPI_LINES_EVEN \\n[#EPI_LINES_TO_END]%2
. ie \\n[#EPI_LINES_EVEN] \{ .ALD .5v \}
. el \{ .RLD .5v \}
. rr #EPI_LINES_EVEN
. \}
. \}
. \}
. \}
. nr #PP_STYLE 1
. rr #EPI_FITS
. ALD \\n[#DOC_LEAD]u
. QUAD \\*[$DOC_QUAD]
. po \\n[#L_MARGIN]u
. if \\n[#COLUMNS] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. if \\n[#START] \{\
. if \\n[#COLUMNS] \{\
. po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u
. mk dc
. \}
. \}
.END
\#
\# ====================================================================
\#
\# +++FINIS MACRO+++
\#
\# FINIS
\# -----
\# *Arguments:
\#
\# *Function:
\# Deposits --END-- at the end of a document.
\#
.MAC FINIS END
. if \\n[#TAB_ACTIVE] \{ .TQ \}
. if \\n[#INDENT_ACTIVE] \{ .IQ CLEAR \}
. FOOTERS OFF
. PAGINATION OFF
. nr #EM_ADJUST (1m/8)
. if \\n[#COLUMNS] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. ALD \\n[#DOC_LEAD]u
. CENTER
. if \\n[#PRINT_STYLE]=1 \{ .PRINT "--\\*[$FINIS_STRING]--\}
. if \\n[#PRINT_STYLE]=2 \{\
. PRINT "\v'-\\n[#EM_ADJUST]u'\(em\v'+\\n[#EM_ADJUST]u'\\*[$FINIS_STRING]\v'-\\n[#EM_ADJUST]u'\*[FU1]\(em
. \}
.END
\#
\# ====================================================================
\#
\# +++HEADERS/FOOTERS+++
\#
\# Define a string so that the current page number can be incorporated
\# into the strings for hdrftr left, right, and center. NOTE: This is
\# not the same thing as using the shortform # in hdrftr strings.
\#
.ds PAGE# \En[#PAGENUMBER]
\#
\#
\# HDRFTR FAMILY
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC HDRFTR_FAMILY END
. ds $HDRFTR_FAM \\$1
.END
\#
\#
\# HDRFTR SIZE
\# -----------
\# *Argument:
\# <+|-number of points by which to in/decrease point size of
\# header/footers (relative to running text)>
\# *Function:
\# Creates or modifies string $HDRFTR_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed. Default is +0.
\#
\# By default, header/footers print the author .5 points smaller
\# than the base point size of running text, center titles
\# (Chapter, Draft, Revision, etc.) .5 points smaller
\# than running text (in italics), and the document title 2 full
\# points smaller than running text (in caps). The HDRFTR_SIZE
\# macro changes the overall size for all three parts while
\# maintaining the internal size changes.
\#
\# In other words, if the user likes the header/footers but wants
\# them a bit bigger or a bit smaller, s/he should use HDRFTR_SIZE.
\#
.MAC HDRFTR_SIZE END
. ds $HDRFTR_SIZE_CHANGE \\$1
.END
\#
\#
\# HDRFTR RULE GAP
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #HDRFTR_RULE_GAP to hold amount
\# of space between header/footer and header/footer rule.
\# *Notes:
\# Default is 4p.
\#
.MAC HDRFTR_RULE_GAP END
. nr #HDRFTR_RULE_GAP (\\$1)
.END
\#
\#
\# HDRFTR LEFT
\# -----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_LEFT.
\# Creates register #USER_DEF_HDRFTR_LEFT, which, if 1,
\# overrides the $HDRFTR_LEFT string created by default
\# in DEFAULTS.
\# *Notes:
\# Especially useful if doc has more than one author, and a list
\# of authors by last name is desired in header/footers.
\# Default is author.
\#
\# If the argument is the # character, simply prints the current
\# page number.
\#
\# If the user wants to *incorporate* the page number into the string,
\# \*[PAGE#] must be used. For example, if the user wants to put
\# an elipsis before the page number in the string, s/he should use
\# ...\*[PAGE#], not ...#
\#
.MAC HDRFTR_LEFT END
. nr #USER_DEF_HDRFTR_LEFT 1
. ds $HDRFTR_LEFT \\$1
.END
\#
\#
\# HDRFTR LEFT FAMILY
\# ------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_LEFT_FAM.
\#
.MAC HDRFTR_LEFT_FAMILY END
. ds $HDRFTR_LEFT_FAM \\$1
.END
\#
\#
\# HDRFTR LEFT FONT
\# ----------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_LEFT_FT.
\#
.MAC HDRFTR_LEFT_FONT END
. ds $HDRFTR_LEFT_FT \\$1
.END
\#
\#
\# HDRFTR LEFT SIZE
\# ----------------
\# *Argument:
\# <+|- number of points to in/decrease size of left string in
\# header/footers (relative to running text)>
\# *Function:
\# Creates or modifies string HDRFTR_LEFT_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed.
\# Default is -.5 for printstyle TYPESET; if all caps, -2
\# Has no effect in TYPEWRITE.
\#
.MAC HDRFTR_LEFT_SIZE END
. ds $HDRFTR_LEFT_SIZE_CHANGE \\$1
.END
\#
\#
\# HDRFTR LEFT CAPS
\# ----------------
\# *Argument:
\# |
\# *Function:
\# Turns capitalisation of $HDRFTR_LEFT (typically, the author of
\# the document) on or off.
\# *Notes:
\# Default is on.
\#
.MAC HDRFTR_LEFT_CAPS END
. ie '\\$1'' \{\
. nr #HDRFTR_LEFT_CAPS 1
. \}
. el \{\
. nr #HDRFTR_LEFT_CAPS 0
. ds $HDRFTR_RIGHT_SIZE_CHANGE +0
. \}
.END
\#
\#
\# HDRFTR CENTER
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_CENTER.
\# Creates register #USER_DEF_HDRFTR_CENTER, which, if 1,
\# overrides the $HDRFTR_CENTER string created by default
\# in COPYSTYLE.
\# *Notes:
\# Default is document type if DOCTYPE NAMED, Chapter # if DOCTYPE
\# CHAPTER, draft and revision number if COPYSTYLE DRAFT.
\#
\# If the argument is the # character, simply prints the current
\# page number.
\#
\# If the user wants to *incorporate* the page number into the string,
\# \*[PAGE#] must be used. For example, if the user wants to put
\# an elipsis before the page number in the string, s/he should use
\# ...\*[PAGE#], not ...#
\#
.MAC HDRFTR_CENTER END
. nr #USER_DEF_HDRFTR_CENTER 1
. ds $HDRFTR_CENTER \\$1
.END
\#
\#
\# HDRFTR CENTER FAMILY
\# --------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_CENTER_FAM.
\#
.MAC HDRFTR_CENTER_FAMILY END
. ds $HDRFTR_CENTER_FAM \\$1
.END
\#
\#
\# HDRFTR CENTER FONT
\# ------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_CENTER_FT.
\#
.MAC HDRFTR_CENTER_FONT END
. ds $HDRFTR_CENTER_FT \\$1
.END
\#
\#
\# HDRFTR CENTER SIZE
\# ------------------
\# *Argument:
\# <+|- number of points to in/decrease size of centre string in
\# header/footers (relative to header/footer size)>
\# *Function:
\# Creates string HDRFTR_CENTER_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed.
\# Default is -.5 for printstyle TYPESET; if all caps, -2
\# Has no effect in TYPEWRITE.
\#
.MAC HDRFTR_CENTER_SIZE END
. ds $HDRFTR_CENTER_SIZE_CHANGE \\$1
.END
\#
\#
\# HDRFTR CENTER CAPS
\# ------------------
\# *Argument:
\# |
\# *Function:
\# Turns capitalisation of $HDRFTR_CENTER (typically, doctype of
\# the document) on or off.
\# *Notes:
\# Default is on.
\#
.MAC HDRFTR_CENTER_CAPS END
. ie '\\$1'' \{\
. nr #HDRFTR_CENTER_CAPS 1
. \}
. el \{\
. nr #HDRFTR_CENTER_CAPS 0
. ds $HDRFTR_CENTER_SIZE_CHANGE +0
. \}
.END
\#
\#
\# HDRFTR RIGHT
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_RIGHT.
\# Creates register #USER_DEF_HDRFTR_RIGHT, which, if 1,
\# overrides the $HDRFTR_RIGHT string created by default
\# in DEFAULTS.
\# *Notes:
\# Default is document title.
\#
\# If the argument is the # character, simply prints the current
\# page number.
\#
\# If the user wants to *incorporate* the page number into the string,
\# \*[PAGE#] must be used. For example, if the user wants to put
\# an elipsis before the page number in the string, s/he should use
\# ...\*[PAGE#], not ...#
\#
.MAC HDRFTR_RIGHT END
. nr #USER_DEF_HDRFTR_RIGHT 1
. ds $HDRFTR_RIGHT \\$1
.END
\#
\#
\# HDRFTR RIGHT FAMILY
\# -------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_RIGHT_FAM.
\#
.MAC HDRFTR_RIGHT_FAMILY END
. ds $HDRFTR_RIGHT_FAM \\$1
.END
\#
\#
\# HDRFTR RIGHT FONT
\# -----------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HDRFTR_RIGHT_FT.
\#
.MAC HDRFTR_RIGHT_FONT END
. ds $HDRFTR_RIGHT_FT \\$1
.END
\#
\#
\# HDRFTR RIGHT SIZE
\# -----------------
\# *Argument:
\# <+|- number of points to in/decrease size of right string in
\# header/footers (relative to header/footer size)>
\# *Function:
\# Creates or modifies string HDRFTR_RIGHT_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed.
\# Default is -2 for printstyle TYPESET if all caps; otherwise -.5
\# Has no effect in TYPEWRITE.
\#
.MAC HDRFTR_RIGHT_SIZE END
. ds $HDRFTR_RIGHT_SIZE_CHANGE \\$1
.END
\#
\#
\# HDRFTR RIGHT CAPS
\# -----------------
\# *Argument:
\# |
\# *Function:
\# Turns capitalisation of $HDRFTR_RIGHT (typically, the title of
\# the document) on or off.
\# *Notes:
\# Default is on.
\#
.MAC HDRFTR_RIGHT_CAPS END
. ie '\\$1'' \{\
. nr #HDRFTR_RIGHT_CAPS 1
. \}
. el \{\
. nr #HDRFTR_RIGHT_CAPS 0
. ds $HDRFTR_RIGHT_SIZE_CHANGE +0
. \}
.END
\#
\# HDRFTR RULE
\# -----------
\# *Arguments:
\# |
\# *Function:
\# If invoked via the alias HDRFTR_RULE_INTERNAL in HDRFTR, prints a rule
\# under the header/footer. Otherwise, turns HDRFTR_RULE on or off.
\#
.MAC HDRFTR_RULE END \"To print rule under header/over footer.
. ie '\\$0'HDRFTR_RULE_INTERNAL' \{\
. ie \\n[#USERDEF_HDRFTR] \{\
. nr #CAP_HEIGHT_ADJUST \\n[#HDRFTR_HEIGHT]
. PT_SIZE 12
. if \\n[#HEADERS_ON] \{ .ALD \\n[#HDRFTR_RULE_GAP]u \}
. if \\n[#FOOTERS_ON] \{\
. RLD \\n[#HDRFTR_RULE_GAP]u+\\n[#CAP_HEIGHT_ADJUST]u+1p
. \}
. PRINT \\l'\\n[#DOC_L_LENGTH]u'
. br
. \}
. el \{\
. if \\n[#PRINT_STYLE]=1 \{\
. nr #CAP_HEIGHT_ADJUST \\n[#CAP_HEIGHT]
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#LEFT_CAP_HEIGHT]>\\n[#CENTER_CAP_HEIGHT] \{\
. nr #CAP_HEIGHT_ADJUST \\n[#LEFT_CAP_HEIGHT]
. \}
. el \{ .nr #CAP_HEIGHT_ADJUST \\n[#CENTER_CAP_HEIGHT] \}
. ie \\n[#CAP_HEIGHT_ADJUST]>\\n[#RIGHT_CAP_HEIGHT] \{\
. nr #CAP_HEIGHT_ADJUST \\n[#CAP_HEIGHT_ADJUST]
. \}
. el \{ .nr #CAP_HEIGHT_ADJUST \\n[#RIGHT_CAP_HEIGHT] \}
. \}
. PT_SIZE 12
. if \\n[#HEADERS_ON] \{ .ALD \\n[#HDRFTR_RULE_GAP]u \}
. if \\n[#FOOTERS_ON] \{\
. RLD \\n[#LEAD]u*3u+\\n[#HDRFTR_RULE_GAP]u+\\n[#CAP_HEIGHT_ADJUST]u+1p
. \}
. PRINT \\l'\\n[#DOC_L_LENGTH]u'
. br
. \}
. \}
. el \{\
. ie '\\$1'' \{ .nr #HDRFTR_RULE 1 \}
. el \{ .nr #HDRFTR_RULE 0 \}
. \}
.END
\#
\#
.ALIAS HDRFTR_RULE_INTERNAL HDRFTR_RULE
\#
\#
\# HDRFTR PLAIN
\# ------------
\# *Arguments:
\#
\# *Function:
\# Sets the family, font, and point size of all strings in
\# header/footers to the same family and point size as running
\# text. Font for the header/footer becomes roman throughout.
\#
.MAC HDRFTR_PLAIN END
. HDRFTR_FAMILY \\*[$DOC_FAM]
. HDRFTR_PT_SIZE \\n[#DOC_PT_SIZE]
. HDRFTR_LEFT_FAMILY \\*[$DOC_FAM]
. HDRFTR_LEFT_FONT R
. HDRFTR_LEFT_SIZE +0
. HDRFTR_LEFT_CAPS OFF
. HDRFTR_CENTER_FAMILY \\*[$DOC_FAM]
. HDRFTR_CENTER_FONT R
. HDRFTR_CENTER_SIZE +0
. HDRFTR_CENTER_CAPS OFF
. HDRFTR_RIGHT_FAMILY \\*[$DOC_FAM]
. HDRFTR_RIGHT_FONT R
. HDRFTR_RIGHT_SIZE +0
. HDRFTR_RIGHT_CAPS OFF
.END
\#
\#
\# SWITCH HDRFTR
\# -------------
\# *Arguments:
\# |
\# *Function:
\# Creates or modifies register #SWITCH_HDRFTR, used to switch
\# default location of HDRFTR_LEFT and HDRFTR_RIGHT.
\# *Notes:
\# Typically, the author string appears at the left of header/footers,
\# and the title string appears at the right. This switches the
\# location of the two. Useful in conjuction with RECTO_VERSO to
\# tweak switches on alternate pages to come out as the user wishes.
\# The assumption of RECTO_VERSO is that the first page of the document
\# (recto) is odd, and even though it has no header/footer, if it did have one,
\# it would print as AUTHOR...CENTER...TITLE (or whatever strings
\# the user has supplied for HDRFTR_LEFT/RIGHT), meaning that the
\# next page, which does have a header/footer, will come out as
\# TITLE...CENTER...AUTHOR (or whatever strings the user has
\# supplied for HDRFTR_LEFT/RIGHT). SWITCH_HDRFTRS allows the user
\# to get the desired string in the desired place on the desired
\# recto/verso page.
\#
\# Default is OFF.
\#
.MAC SWITCH_HDRFTR END
. ie '\\$1'' \{ .nr #SWITCH_HDRFTR 1 \}
. el \{ .nr #SWITCH_HDRFTR 0 \}
.END
\#
\#
\# USER DEFINED HDRFTR RECTO
\# -------------------------
\# *Arguments:
\# L | LEFT | C | CENTER | CENTER | R | RIGHT
\# *Function:
\# Toggles #USERDEF_HDRFTR on, stores quad as #USERDEF_HDRFTR_RECTO_QUAD,
\# stores string in $USERDEF_HDRFTR_RECTO.
\# *Notes:
\# For use when users don't want 3-part headers/footers, but rather
\# want to design their own headers/footers and need different
\# headers/footers on recto and verso pages.
\#
.MAC HDRFTR_RECTO END
. nr #USERDEF_HDRFTR 1
. if '\\$1'L' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 1 \}
. if '\\$1'LEFT' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 1 \}
. if '\\$1'C' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 2 \}
. if '\\$1'CENTER' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 2 \}
. if '\\$1'CENTRE' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 2 \}
. if '\\$1'R' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 3 \}
. if '\\$1'RIGHT' \{ .nr #USERDEF_HDRFTR_RECTO_QUAD 3 \}
. ds $USERDEF_HDRFTR_RECTO \\$2
.END
\#
\#
\# USER DEFINED HDRFTR VERSO
\# -------------------------
\# *Arguments:
\# L | LEFT | C | CENTER | CENTER | R | RIGHT
\# *Function:
\# Toggles #USERDEF_HDRFTR on, stores quad as #USERDEF_HDRFTR_VERSO_QUAD,
\# stores string in $USERDEF_HDRFTR_VERSO.
\# *Notes:
\# For use when users don't want 3-part headers/footers, but rather
\# want to design their own headers/footers and need different
\# headers/footers on recto and verso pages.
\#
.MAC HDRFTR_VERSO END
. nr #USERDEF_HDRFTR 1
. if '\\$1'L' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 1 \}
. if '\\$1'LEFT' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 1 \}
. if '\\$1'C' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 2 \}
. if '\\$1'CENTER' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 2 \}
. if '\\$1'CENTRE' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 2 \}
. if '\\$1'R' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 3 \}
. if '\\$1'RIGHT' \{ .nr #USERDEF_HDRFTR_VERSO_QUAD 3 \}
. ds $USERDEF_HDRFTR_VERSO \\$2
.END
\#
\#
\# PRINT FOOTER ON FIRST PAGE
\# --------------------------
\# *Arguments:
\# |
\# *Function:
\# Toggles register #PRINT_FOOTER_ON_PAGE_1
\# *Notes:
\# Lets user choose whether to print footer on first
\# page of doc.
\#
.MAC FOOTER_ON_FIRST_PAGE END
. ie '\\$1'' \{ .nr #PRINT_FOOTER_ON_PAGE_1 1 \}
. el \{ .rr #PRINT_FOOTER_ON_PAGE_1 \}
.END
\#
\#
\# PRINT PAGE NUMBER ON FIRST PAGE
\# -------------------------------
\# *Arguments:
\# |
\# *Function:
\# Toggles register #PRINT_PAGENUM_ON_PAGE_1
\# *Notes:
\# Lets user choose whether to print page number on first
\# page of doc and after collate when footers are on or page numbering
\# has been user set at top of page.
\#
.MAC PAGENUM_ON_FIRST_PAGE END
. ie '\\$1'' \{ .nr #PRINT_PAGENUM_ON_PAGE_1 1 \}
. el \{ .rr #PRINT_PAGENUM_ON_PAGE_1 \}
.END
\#
\#
\# PRINT HEADER/FOOTER
\# -------------------
\# *Arguments:
\#
\# *Function:
\# Based on defaults or values entered by user, prints a
\# three-part title at either the top or the bottom of the page.
\# *Notes:
\# Called from within either HEADER or FOOTER.
\#
.MAC PRINT_HDRFTR END
. if \\n[#DOC_TYPE]=4 \{\
. nr #SUITE \En[.pn]
. \}
. if \\n[#FOOTERS_ON] \{\
. if \\n[#START_FOR_FOOTERS] \{\
. rr #START_FOR_FOOTERS
. if !\\n[#PRINT_FOOTER_ON_PAGE_1] \{ .return \}
. \}
. \}
. if \\n[#HEADERS_ON] \{ .vs 0 \}
. if \\n[#USERDEF_HDRFTR] \{\
. PRINT_USERDEF_HDRFTR
. return
. \}
. if \\n[#SWITCH_HDRFTR] \{\
. ds $HDRFTR_TMP_SWITCH \\*[$HDRFTR_LEFT]
. ds $HDRFTR_LEFT \\*[$HDRFTR_RIGHT]
. ds $HDRFTR_RIGHT \\*[$HDRFTR_TMP_SWITCH]
. ds $HDRFTR_TMP_SIZE_CHANGE_SWITCH \\*[$HDRFTR_LEFT_SIZE_CHANGE]
. ds $HDRFTR_LEFT_SIZE_CHANGE \\*[$HDRFTR_RIGHT_SIZE_CHANGE]
. ds $HDRFTR_RIGHT_SIZE_CHANGE \\*[$HDRFTR_TMP_SIZE_CHANGE_SWITCH]
. nr #HDRFTR_TMP_CAPS_SWITCH \\n[#HDRFTR_LEFT_CAPS]
. nr #HDRFTR_LEFT_CAPS \\n[#HDRFTR_RIGHT_CAPS]
. nr #HDRFTR_RIGHT_CAPS \\n[#HDRFTR_TMP_CAPS_SWITCH]
. rr #HDRFTR_TMP_CAPS_SWITCH
. rm $HDRFTR_TMP_SWITCH
. rm $HDRFTR_TMP_SIZE_CHANGE_SWITCH
. nr #SWITCH_HDRFTR 0
. \}
. nr #PAGENUMBER \\n%+\\n[#PAGE_NUM_ADJ]
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #LEFT_CAP_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. if o \{ .RIGHT \}
. if e \{ .LEFT \}
. if \\n[#RECTO_VERSO]=0 \{ .LEFT \}
. if \\n[#HDRFTR_LEFT_CAPS] \{ .CAPS \}
. ie '\\*[$HDRFTR_LEFT]'#' \{\
. PRINT \\n[#PAGENUMBER]
. \}
. el \{\
. ie !'\\*[$HDRFTR_LEFT]'' \{ . PRINT \\*[$HDRFTR_LEFT] \}
. el \{ .PRINT \& \}
. \}
. if \\n[#HDRFTR_LEFT_CAPS] \{ .CAPS OFF \}
. CENTER
. if \\n[#HDRFTR_CENTER_CAPS] \{ .CAPS \}
. ie '\\*[$HDRFTR_CENTER]'#' \{\
. PRINT \\v'-(\\n[#LEAD]u*1u)'\\n[#PAGENUMBER]
. \}
. el \{\
. ie !'\\*[$HDRFTR_CENTER]'' \{ .PRINT \\v'-(\\n[#LEAD]u*1u)'\\*[$HDRFTR_CENTER] \}
. el \{ .PRINT \& \}
. \}
. if \\n[#HDRFTR_CENTER_CAPS] \{ .CAPS OFF \}
. if o \{ .LEFT \}
. if e \{ .RIGHT \}
. if \\n[#RECTO_VERSO]=0 \{ .RIGHT \}
. if \\n[#HDRFTR_RIGHT_CAPS] \{ .CAPS \}
. ie '\\*[$HDRFTR_RIGHT]'#' \{\
. PRINT \\v'-(\\n[#LEAD]u*2u)'\\n[#PAGENUMBER]
. \}
. el \{\
. ie !'\\*[$HDRFTR_RIGHT]'' \{ .PRINT \v'-(\\n[#LEAD]u*2u)'\\*[$HDRFTR_RIGHT] \}
. el \{ .PRINT \& \}
. \}
. if \\n[#HDRFTR_RIGHT_CAPS] \{ .CAPS OFF \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$HDRFTR_LEFT_FAM]
. FT \\*[$HDRFTR_LEFT_FT]
. PT_SIZE \\n[#HDRFTR_PT_SIZE]u\\*[$HDRFTR_LEFT_SIZE_CHANGE]
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #LEFT_CAP_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. if o \{ .LEFT \}
. if e \{ .RIGHT \}
. if \\n[#RECTO_VERSO]=0 \{ .LEFT \}
. if \\n[#HDRFTR_LEFT_CAPS] \{ .CAPS \}
. ie '\\*[$HDRFTR_LEFT]'#' \{ .PRINT \\n[#PAGENUMBER] \}
. el \{\
. ie !'\\*[$HDRFTR_LEFT]'' \{ . PRINT \\*[$HDRFTR_LEFT] \}
. el \{ .PRINT \& \}
. \}
. if \\n[#HDRFTR_LEFT_CAPS] \{ .CAPS OFF \}
. FAMILY \\*[$HDRFTR_CENTER_FAM]
. FT \\*[$HDRFTR_CENTER_FT]
. PT_SIZE \\n[#HDRFTR_PT_SIZE]u\\*[$HDRFTR_CENTER_SIZE_CHANGE]
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #CENTER_CAP_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. CENTER
. if \\n[#HDRFTR_CENTER_CAPS] \{ .CAPS \}
. ie '\\*[$HDRFTR_CENTER]'#' \{\
. PRINT \\v'-(\\n[#LEAD]u*1u)'\\n[#PAGENUMBER]
. \}
. el \{\
. ie !'\\*[$HDRFTR_CENTER]'' \{ .PRINT \\v'-(\\n[#LEAD]u*1u)'\\*[$HDRFTR_CENTER] \}
. el \{ .PRINT \& \}
. \}
. if \\n[#HDRFTR_CENTER_CAPS] \{ .CAPS OFF \}
. FAMILY \\*[$HDRFTR_RIGHT_FAM]
. FT \\*[$HDRFTR_RIGHT_FT]
. PT_SIZE \\n[#HDRFTR_PT_SIZE]u\\*[$HDRFTR_RIGHT_SIZE_CHANGE]
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #RIGHT_CAP_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. if o \{ .RIGHT \}
. if e \{ .LEFT \}
. if \\n[#RECTO_VERSO]=0 \{ .RIGHT \}
. if \\n[#HDRFTR_RIGHT_CAPS] \{ .CAPS \}
. ie '\\*[$HDRFTR_RIGHT]'#' \{\
. PRINT \\v'-(\\n[#LEAD]u*2u)'\\n[#PAGENUMBER]
. \}
. el \{\
. ie !'\\*[$HDRFTR_RIGHT]'' \{ .PRINT \v'-(\\n[#LEAD]u*2u)'\\*[$HDRFTR_RIGHT] \}
. el \{ .PRINT \& \}
. \}
. if \\n[#HDRFTR_RIGHT_CAPS] \{ .CAPS OFF \}
. \}
. if \\n[#HDRFTR_RULE] \{\
. HDRFTR_RULE_INTERNAL
. \}
.END
\#
\#
\# PRINT USER DEFINED HEADER/FOOTER
\# --------------------------------
\# *Arguments:
\#
\# *Function:
\# Based on defaults or values entered by user, prints a single part
\# (i.e. not 3-part) title at either the top or the bottom of the page.
\# *Notes:
\# Called from within PRINT_HDRFTR.
\#
.MAC PRINT_USERDEF_HDRFTR END
. nr #PAGENUMBER \\n%+\\n[#PAGE_NUM_ADJ]
. fc ^ #
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$HDRFTR_FAM]
. FT R
. PT_SIZE \\n[#HDRFTR_PT_SIZE]u
. \}
. ie \\n[#RECTO_VERSO] \{\
. if o \{\
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=1 \{ .LEFT \}
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=2 \{ .CENTER \}
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=3 \{ .RIGHT \}
. PRINT \\*[$USERDEF_HDRFTR_RECTO]
. EL
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #HDRFTR_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. \}
. if e \{\
. ie !'\\*[$USERDEF_HDRFTR_VERSO]'' \{\
. if \\n[#USERDEF_HDRFTR_VERSO_QUAD]=1 \{ .LEFT \}
. if \\n[#USERDEF_HDRFTR_VERSO_QUAD]=2 \{ .CENTER \}
. if \\n[#USERDEF_HDRFTR_VERSO_QUAD]=3 \{ .RIGHT \}
. \}
. PRINT \\*[$USERDEF_HDRFTR_VERSO]
. EL
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #HDRFTR_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. el \{\
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=1 \{ .LEFT \}
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=2 \{ .CENTER \}
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=3 \{ .RIGHT \}
. PRINT \\*[$USERDEF_HDRFTR_RECTO]
. EL
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #HDRFTR_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. \}
. \}
. \}
. el \{\
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=1 \{ .LEFT \}
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=2 \{ .CENTER \}
. if \\n[#USERDEF_HDRFTR_RECTO_QUAD]=3 \{ .RIGHT \}
. PRINT \\*[$USERDEF_HDRFTR_RECTO]
. EL
. if \\n[#FOOTERS_ON] \{\
. di NULL
. SIZESPECS
. nr #HDRFTR_HEIGHT \\n[#CAP_HEIGHT]
. di
. \}
. \}
. fc
. if \\n[#HDRFTR_RULE] \{\
. HDRFTR_RULE_INTERNAL
. \}
.END
\#
\#
\# +++HEADERS+++
\#
\# HEADERS (off or on)
\# -------------------
\# *Arguments:
\# |
\# *Function:
\# Turns headers at the top of the page off or on.
\# *Notes:
\# Default is on.
\#
.MAC HEADERS END
. ie '\\$1'' \{ .nr #HEADERS_ON 1 \}
. el \{ .nr #HEADERS_ON 0 \}
.END
\#
\#
\# HEADER MARGIN
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #HEADER_MARGIN to hold amount
\# of space between top of page and header.
\# *Notes:
\# Requires unit of measure. Default is 4P+6p, measured top-of-page
\# to baseline.
\#
.MAC HEADER_MARGIN END
. nr #HEADER_MARGIN (\\$1)
.END
\#
\#
\# HEADER GAP
\# ----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #HEADER_GAP to hold amount
\# of space between header and running text.
\# *Notes:
\# Default is 1P+6p.
\#
.MAC HEADER_GAP END
. nr #HEADER_GAP (\\$1)
.END
\#
\#
\# HEADER
\# ------
\# *Arguments:
\#
\# *Function:
\# Prints header appropriate to DOC_TYPE, PRINTSTYLE, and COPYSTYLE.
\# *Notes:
\# In order to convert the title string to caps in the header (in the
\# event that the user enters .TITLE in caps/lc), I've used
\# quad left, quad centre, and quad right to arrange the three bits
\# of the header, rather than .tl. This allows the use of the CAPS macro.
\# The downside is that I have to add \\v'-(\\n[#LEAD]u*#) in order
\# for -Tlatin1 output to align the header/footer strings on the baseline.
\# The console output still isn't brilliant, but at least it's
\# comprehensible.
\#
.MAC HEADER END
. PROCESS_FN_LEFTOVER
. nr #FN_COUNT_FOR_COLS 0 1
. if \\n[#RESET_FN_NUMBER] \{ .nr #FN_NUMBER 0 1 \}
. po \\n[#DOC_L_MARGIN]u
. if \\n[#RECTO_VERSO] \{\
. nr #DOC_LR_MARGIN_TMP \\n[#DOC_L_MARGIN]
. DOC_LEFT_MARGIN \\n[#DOC_R_MARGIN]u
. DOC_RIGHT_MARGIN \\n[#DOC_LR_MARGIN_TMP]u
. \}
. ev HEADER
. if \\n[#PRINT_STYLE]=1 \{ .vs 0 \}
. if \\n[#PRINT_STYLE]=2 \{ .LS 0 \}
. sp |\\n[#HEADER_MARGIN]u-1v
. ll \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$HDRFTR_FAM]
. FT R
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$HDRFTR_SIZE_CHANGE]
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12\\*[$HDRFTR_SIZE_CHANGE]
. \}
. nr #HDRFTR_PT_SIZE \\n[#PT_SIZE]
. if \\n[#CAPS_ON] \{\
. nr #CAPS_WAS_ON 1
. CAPS OFF
. \}
. if \\n[#UNDERLINE_ON] \{\
. nr #UNDERLINE_WAS_ON 1
. UNDERLINE OFF
. \}
. ie \\n[#HEADERS_ON] \{\
. PRINT_HDRFTR
. sp |\\n[#T_MARGIN]u-\\n[#DOC_LEAD]u
. \}
. el \{\
. ie \\n[#PAGE_NUM_V_POS]=1 \{\
. ie \\n[#PAGINATE] \{\
. PRINT_PAGE_NUMBER
. sp |\\n[#T_MARGIN]u-\\n[#DOC_LEAD]u
. \}
. el \{ .sp |\\n[#T_MARGIN]u-\\n[#DOC_LEAD]u \}
. \}
. el \{ .sp |\\n[#T_MARGIN]u-\\n[#DOC_LEAD]u \}
. \}
. nr #PAGE_TOP \\n(nl
. ev
. po \\n[#L_MARGIN]u
. if \\n[#RECTO_VERSO] \{\
. nr #L_MARGIN +\\n[#L_MARGIN_DIFF]
. \}
. if \\n[#CAPS_WAS_ON] \{\
. CAPS
. rr #CAPS_WAS_ON
. \}
. if \\n[#UNDERLINE_WAS_ON] \{\
. UNDERLINE
. rr #UNDERLINE_WAS_ON
. \}
. if \\n[#TAB_ACTIVE] \{ .TAB \\n[#CURRENT_TAB] \}
. if \\n[#QUOTE] \{\
. ie \\n[#TAB_ACTIVE] \{ .TAB \\n[#CURRENT_TAB] \}
. el \{\
. nr #Q_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE])
. po \\n[#Q_OFFSET]u
. \}
. \}
. if \\n[#EPIGRAPH] \{\
. ie \\n[#TAB_ACTIVE] \{ .TAB \\n[#CURRENT_TAB] \}
. el \{\
. nr #EPI_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#EPI_OFFSET_VALUE])
. po \\n[#EPI_OFFSET]u
. \}
. \}
. ie \\n[#EPIGRAPH] \{\
. ie !\\n[#EPI_ACTIVE] \{\
. ns
. rr #EPI_ACTIVE
. \}
. el \{\
. ie \\n[#EPI_FITS] \{ .ns \}
. el \{ .ALD \\n[#DOC_LEAD]u-\\n[#EPI_LEAD]u \}
. \}
. \}
. el \{ .ns \}
. ns
. if \\n[#COLUMNS] \{\
. if \\n[#RECTO_VERSO] \{ .COLUMNS \\n[#NUM_COLS] \\n[#GUTTER]u \}
. nr #COL_NUM 0 1
. mk dc
. po \\n[#COL_\\n+[#COL_NUM]_L_MARGIN]u
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. if \\n[#QUOTE] \{\
. po +(\\n[#PP_INDENT]u*\\n[#Q_OFFSET_VALUE]u)
. \}
. if \\n[#EPIGRAPH] \{\
. if \\n[#EPI_ACTIVE] \{\
. ie \\n[#EPI_FITS] \{ . \}
. el \{ .nr dc -\\n[#EPI_LEAD_DIFF] \}
. \}
. po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u+(\\n[#PP_INDENT]u*\\n[#EPI_OFFSET_VALUE]u)
. \}
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#SLANT_ON] \{\
. if \\n[#UNDERLINE_SLANT] \{ .UNDERLINE \}
. \}
. \}
.END
\#
\# ====================================================================
\#
\# +++FOOTERS+++
\#
\# FOOTERS (off or on)
\# -------------------
\# *Arguments:
\# |
\# *Function:
\# Turns footers at the bottom of the page off or on.
\# *Notes:
\# Default is off. If on, page numbers automatically go at
\# the top, centered, unless pagination has been turned off,
\# or the pagenumber position has been changed to left or right.
\#
.MAC FOOTERS END
. ie '\\$1'' \{\
. nr #FOOTERS_ON 1
. PAGE_NUM_POS TOP CENTER
. \}
. el \{ .nr #FOOTERS_ON 0 \}
.END
\#
\#
\# FOOTER MARGIN
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #FOOTER_MARGIN which holds the
\# amount of space to leave between the page number and the bottom
\# of the page.
\# *Notes:
\# Unit of measure required. Default is 3P.
\#
.MAC FOOTER_MARGIN END
. ie \\n%>0 \{ .nr #FOOTER_MARGIN (\\$1) \}
. el \{ . \}
.END
\#
\#
\# FOOTER GAP
\# ----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #FOOTER_GAP which holds the
\# amount of space to leave between running text and the page number.
\# *Notes:
\# Requires unit of measure. Default is 3P. Measured baseline to
\# baseline.
\#
.MAC FOOTER_GAP END
. ie \\n%>0 \{ .nr #FOOTER_GAP (\\$1) \}
. el \{ . \}
.END
\#
\#
\# FOOTER
\# ------
\# *Arguments:
\#
\# *Function:
\# Places footer at bottom of page if #FOOTERS=1, otherwise
\# places page number at bottom of page (if #PAGINATE=1).
\# Page numbers are in arabic or roman according to COPYSTYLE.
\# DRAFT starts the document at page 1 regardless of PAGENUMBER.
\# FINAL respects PAGENUMBER.
\#
.MAC FOOTER END
. ev PAGE_BOTTOM
. nr #L_MARGIN_DIFF \\n[#L_MARGIN]-\\n[#DOC_L_MARGIN]
. if !\\n[#FN_DEFER] \{\
. nr #DIVER_DEPTH 0
. if \\n[#FN_COUNT] \{\
. sp |\\n[#PAGE_LENGTH]u-(\\n[#B_MARGIN]u+\\n[#FN_DEPTH]u)
. po \\n[#DOC_L_MARGIN]u
. if \\n[#COLUMNS] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. nf
. FOOTNOTES
. rm FOOTNOTES
. if '\\n(.z'FN_OVERFLOW' \{\
. di
. nr #FN_OVERFLOW_DEPTH \\n[#DIVER_DEPTH]
. \}
. nr #FN_COUNT 0
. if \\n[#COL_NEXT] \{ .nr #COL_NUM \\n-[#COL_NUM] \}
. \}
. \}
. ie \\n[#COLUMNS] \{\
. ie \\n[#COL_NUM]=\\n[#NUM_COLS] \{ .DO_FOOTER \}
. el \{\
. sp |\\n(dcu
. po \\n[#COL_\\n+[#COL_NUM]_L_MARGIN]u
. PROCESS_FN_LEFTOVER
. if !\\n[#EPIGRAPH] \{ .rr #COL_NEXT \}
. if !\\n[#QUOTE] \{ .rr #COL_NEXT \}
. if \\n[#QUOTE] \{\
. nr #Q_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE])
. if \\n[#COLUMNS] \{ .nr #Q_OFFSET \\n[#COL_\\n[#COL_NUM]_L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE]) \}
. po \\n[#Q_OFFSET]u
. \}
. if \\n[#EPIGRAPH] \{\
. nr #EPI_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#EPI_OFFSET_VALUE])
. if \\n[#COLUMNS] \{ .nr #EPI_OFFSET \\n[#COL_\\n[#COL_NUM]_L_MARGIN]+(\\n[#PP_INDENT]*\\n[#EPI_OFFSET_VALUE]) \}
. po \\n[#EPI_OFFSET]u
. \}
. ie \\n[#EPIGRAPH] \{\
. ie !\\n[#EPI_ACTIVE] \{\
. ns
. rr #EPI_ACTIVE
. \}
. el \{\
. sp |\\n(dcu+(\\n[#DOC_LEAD]u-\\n[#EPI_LEAD]u)
. rr #EPI_ACTIVE
. \}
. \}
. el \{ .ns \}
. ev
. \}
. ns
. \}
. el \{ .DO_FOOTER \}
.END
\#
\#
\# PROCESS FOOTER
\# --------------
\# *Arguments:
\#
\# *Function:
\# Prints footer (page number, or 3-part footer).
\# Resets CAPS and UNDERLINE if they were on.
\#
.MAC DO_FOOTER END
. sp |\\n[#PAGE_LENGTH]u-\\n[#FOOTER_MARGIN]u-1v
. ev FOOTER
. po \\n[#DOC_L_MARGIN]u
. ll \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. FAMILY \\*[$HDRFTR_FAM]
. FT R
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$HDRFTR_SIZE_CHANGE]
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. nr #HDRFTR_PT_SIZE \\n[#PT_SIZE]
. if \\n[#CAPS_ON] \{\
. nr #CAPS_WAS_ON 1
. CAPS OFF
. \}
. if \\n[#UNDERLINE_ON] \{\
. nr #UNDERLINE_WAS_ON 1
. UNDERLINE OFF
. \}
. ie \\n[#FOOTERS_ON] \{\
. PRINT_HDRFTR
. \}
. el \{\
. if \\n[#PAGINATE] \{\
. if \\n[#PAGE_NUM_V_POS]=2 \{ .PRINT_PAGE_NUMBER \}
. \}
. \}
. if \\n[#CAPS_WAS_ON] \{\
. CAPS
. rr #CAPS_WAS_ON
. \}
. if \\n[#UNDERLINE_WAS_ON] \{\
. UNDERLINE
. rr #UNDERLINE_WAS_ON
. \}
. ev
. bp
. ev
.END
\#
\# ====================================================================
\#
\# +++HEADS+++
\#
\# ---Head numbers---
\#
\# NUMBER HEADS
\# ------------
\# *Arguments:
\# |
\# *Function:
\# Toggles register #NUMBER_HEAD; sets incrementing register #HEAD_NUM.
\# *Notes:
\# Default is OFF.
\#
.MAC NUMBER_HEADS END
. ie '\\$1'' \{\
. nr #NUMBER_HEAD 1
. if !\\n[#HEAD_NUM] \{ .nr #HEAD_NUM 0 1 \}
. \}
. el \{ .rr #NUMBER_HEAD \}
.END
\#
\#
\# RESET HEAD NUMBER
\# -----------------
\# *Arguments:
\# |
\# *Function:
\# Resets incrementing register #HEAD_NUM to 1 or, if there's
\# an argument, to user supplied number.
\# *Notes:
\# Also resets subhead and parahead numbers. If this is not
\# desired, subhead and parahead numbers may be reset individually.
\#
.MAC RESET_HEAD_NUMBER END
. ie '\\$1'' \{\
. nr #HEAD_NUM 0 1
. nr #SH_NUM 0 1
. nr #PH_NUM 0 1
. \}
. el \{\
. nr #HEAD_NUM \\$1-1 1
. nr #SH_NUM 0 1
. nr #PH_NUM 0 1
. \}
.END
\#
\#
\# NUMBER SUBHEADS
\# ---------------
\# *Arguments:
\# |
\# *Function:
\# Toggles register #NUMBER_SH; sets incrementing register #SH_NUM.
\# *Notes:
\# Default is OFF.
\#
.MAC NUMBER_SUBHEADS END
. ie '\\$1'' \{\
. nr #NUMBER_SH 1
. if !\\n[#SH_NUM] \{ .nr #SH_NUM 0 1 \}
. \}
. el \{ .rr #NUMBER_SH \}
.END
\#
\#
\# RESET SUBHEAD NUMBER
\# --------------------
\# *Arguments:
\# |
\# *Function:
\# Resets incrementing register #SH_NUM to 1 or, if there's
\# an argument, to user supplied number.
\# *Notes:
\# When the subhead number is reset, it resets the parahead number as
\# well. If this behaviour is not what's wanted, RESET_SUBHEAD_NUMBER
\# allows the user to set the parahead number to whatever s/he desires.
\#
.MAC RESET_SUBHEAD_NUMBER END
. ie '\\$1'' \{ .nr #SH_NUM 0 1 \}
. el \{\
. nr #SH_NUM \\$1-1 1
. nr #PH_NUM 0 1
. \}
.END
\#
\#
\# NUMBER PARAHEADS
\# ----------------
\# *Arguments:
\# |
\# *Function:
\# Toggles register #NUMBER_PH; sets incrementing register #PH_NUM.
\# *Notes:
\# Default is OFF.
\#
.MAC NUMBER_PARAHEADS END
. ie '\\$1'' \{\
. nr #NUMBER_PH 1
. if !\\n[#PH_NUM] \{ .nr #PH_NUM 0 1 \}
. \}
. el \{ .rr #NUMBER_PH \}
.END
\#
\#
\# RESET PARAHEAD NUMBER
\# ---------------------
\# *Arguments:
\# |
\# *Function:
\# Resets incrementing register #PH_NUM to 1 or, if there's
\# an argument, to user supplied number.
\# *Notes:
\# Resetting the parahead number resets the parahead number
\# only.
\#
.MAC RESET_PARAHEAD_NUMBER END
. ie '\\$1'' \{ .nr #PH_NUM 0 1 \}
. el \{ nr #SH_NUM \\$1-1 1 \}
.END
\#
\#
\# ---Main heads---
\#
\# HEAD FAMILY
\# -----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HEAD_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC HEAD_FAMILY END
. ds $HEAD_FAM \\$1
.END
\#
\#
\# HEAD FONT
\# ---------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $HEAD_FT.
\# *Notes:
\# Default is bold.
\#
.MAC HEAD_FONT END
. ds $HEAD_FT \\$1
.END
\#
\#
\# HEAD SIZE
\# ---------
\# *Argument:
\# <+|- number of points by which to in/decrease point size of
\# section titles (relative to running text)>
\# *Function:
\# Creates or modifies string $HEAD_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a - or + sign with no space afterwards.
\# Fractional point sizes are allowed.
\# Default +1 for printstyle TYPESET; +0 for TYPEWRITE.
\#
.MAC HEAD_SIZE END
. ds $HEAD_SIZE_CHANGE \\$1
.END
\#
\#
\# HEAD QUAD
\# ---------
\# *Arguments:
\# L | LEFT | R | RIGHT | C | CENTER | CENTRE
\# *Function:
\# Creates or modifies string $HEAD_QUAD.
\# *Notes:
\# Default is CENTER.
\#
.MAC HEAD_QUAD END
. ds $HEAD_QUAD \\$1
.END
\#
\#
\# HEAD CAPS
\# ---------
\# *Arguments:
\# |
\# *Function:
\# Creates or modifies register #HEAD_CAPS.
\# *Notes:
\# Default is on.
\#
.MAC HEAD_CAPS END
. ie '\\$1'' \{ .nr #HEAD_CAPS 1 \}
. el \{ .nr #HEAD_CAPS 0 \}
.END
\#
\#
\# HEAD SPACE
\# ----------
\# *Arguments:
\# |
\# *Function:
\# Creates register #HEAD_SPACE, which toggles whether the space
\# before heads is 1 extra line space ("off") or 2 ("on"). Used only
\# in PRINTSTYLE TYPESET.
\# *Notes:
\# Default is on.
\#
.MAC HEAD_SPACE END
. ie '\\$1'' \{ .nr #HEAD_SPACE 1 \}
. el \{ .nr #HEAD_SPACE 0 \}
.END
\#
\#
\# HEAD UNDERLINE
\# --------------
\# *Arguments:
\# |
\# *Function:
\# Creates or modifies register #HEAD_UNDERLINE.
\# *Notes:
\# Default is on.
\#
.MAC HEAD_UNDERLINE END
. ie '\\$1'' \{ .nr #HEAD_UNDERLINE 1 \}
. el \{ .nr #HEAD_UNDERLINE 0 \}
.END
\#
\#
\# MAIN HEAD
\# ---------
\# *Arguments:
\# "text of main head" ["text of main head"] ...
\# *Function:
\# In TYPEWRITE, prints main heads centered, all caps, underlined.
\# In TYPESET, prints bold main heads 1 point larger than running
\# text, all caps, underlined.
\# *Notes:
\# The HEAD macro requires that double-quotes (") surround
\# each line of text.
\#
.MAC HEAD END
. br
. nr #ARG_NUM 0 1
. nr #HEAD 1
. ev HEAD
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. if \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. CHECK_INDENT
. QUAD \\*[$HEAD_QUAD]
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. vs \\n[#DOC_LEAD]u
. UNDERLINE OFF
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$HEAD_FAM]
. FT \\*[$HEAD_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$HEAD_SIZE_CHANGE]
. LS \\n[#DOC_LEAD]u
. \}
. if r#QUOTE \{ .rr #QUOTE \}
. if r#EPIGRAPH \{ .rr #EPIGRAPH \}
. if \\n[#PRINT_STYLE]=1 \{ .ne 3 \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#HEAD_SPACE] \{ .ne 5 \}
. el \{ .ne 3 \}
. \}
. ie \\n[#START] \{\
. if \\n[#DOC_HEADER]=0 \{ . \}
. \}
. el \{\
. if \\n[#PRINT_STYLE]=1 \{\
. if !\\n[#LINEBREAK] \{\
. ALD \\n[#DOC_LEAD]u
. if \\n[#SINGLE_SPACE] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#PP_SPACE] \{\
. ie \\n[#END_QUOTE] \{ . \}
. el \{\
. if !\\n[#LINEBREAK] \{\
. if \\n[#HEAD_SPACE] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. \}
. el \{\
. ie \\n[#HEAD_SPACE] \{ .ALD \\n[#DOC_LEAD]u*2u \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#END_QUOTE] \{\
. if !\\n[#Q_FITS] \{\
. RLD \\n[#DOC_LEAD]u
. if \\n[#PP_ACTIVE] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#Q_AT_TOP] \{\
. RLD \\n[#DOC_LEAD]u
. if \\n[#Q_AT_TOP] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. if \\n[#LINEBREAK] \{\
. if \\n[#HEAD_SPACE] \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. \}
. \}
. if \\n[#HEAD_CAPS] \{ .CAPS \}
. while \\n[#ARG_NUM]<\\n[#NUM_ARGS] \{\
. ie \\n[#NUMBER_HEAD] \{\
. ie \\n[#ARG_NUM]=0 \{\
. br
. ie \\n[#HEAD_UNDERLINE]=0 \{ .PRINT "\\n+[#HEAD_NUM].\0\\$[\\n+[#ARG_NUM]]\}
. el \{ .UNDERSCORE "\\n+[#HEAD_NUM].\0\\$[\\n+[#ARG_NUM]]\}
. br
. \}
. el \{\
. br
. ie \\n[#HEAD_UNDERLINE]=0 \{ .PRINT "\\$[\\n+[#ARG_NUM]]\}
. el \{ .UNDERSCORE "\\$[\\n+[#ARG_NUM]]\}
. br
. \}
. \}
. el \{\
. br
. ie \\n[#HEAD_UNDERLINE]=0 \{ .PRINT "\\$[\\n+[#ARG_NUM]]\}
. el \{ .UNDERSCORE "\\$[\\n+[#ARG_NUM]]\}
. br
. \}
. \}
. REMOVE_INDENT
. CAPS OFF
. ev
. ALD \\n[#DOC_LEAD]u
. RESET_SUBHEAD_NUMBER
. RESET_PARAHEAD_NUMBER
. if r#START \{ .rr #START \}
. if r#EPIGRAPH \{ .rr #EPIGRAPH \}
. if r#QUOTE \{ .rr #QUOTE \}
. if r#Q_FITS \{ .rr #Q_FITS \}
. if r#END_QUOTE \{ .rr #END_QUOTE \}
. if r#LINEBREAK \{ .rr #LINEBREAK \}
. if r#Q_AT_TOP \{ .rr #Q_AT_TOP \}
. if r#PP_ACTIVE \{ .rr #PP_ACTIVE \}
. rr #ARG_NUM
. nr #PP 0
.END
\#
\#
\# ---Subheads---
\#
\# SUBHEAD FAMILY
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $SH_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC SUBHEAD_FAMILY END
. ds $SH_FAM \\$1
.END
\#
\#
\# SUBHEAD FONT
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $SH_FT.
\# *Notes:
\# Default is bold.
\#
.MAC SUBHEAD_FONT END
. ds $SH_FT \\$1
.END
\#
\#
\# SUBHEAD SIZE
\# ------------
\# *Argument:
\# <+|- number of points by which to in/decrease point size of subheads
\# (relative to running text)>
\# *Function:
\# Creates or modifies string $SH_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed.
\# Default is +.5 for printstyle TYPESET; +0 for TYPEWRITE.
\#
.MAC SUBHEAD_SIZE END
. ds $SH_SIZE_CHANGE \\$1
.END
\#
\#
\# SUBHEAD QUAD
\# ------------
\# *Argument:
\# L | LEFT | R | RIGHT | C | CENTER | CENTRE
\# *Function:
\# Creates or modifies string $SH_QUAD.
\# *Notes:
\# Default is LEFT for both TYPESET and TYPEWRITE.
\#
.MAC SUBHEAD_QUAD END
. ds $SH_QUAD \\$1
.END
\#
\#
\# SUBHEAD
\# -------
\# *Arguments:
\# "text of subhead" ["text of subhead"] ...
\# *Function:
\# In TYPEWRITE, prints subheads underlined.
\# In TYPESET, prints subheads bold, .5 points larger than running
\# text.
\# In both styles, a line space precedes the subhead, and a small
\# amount of lead comes after.
\# *Notes:
\# As with the HEAD macro, double-quotes (") must surround
\# each line of text.
\#
.MAC SUBHEAD END
. br
. nr #ARG_NUM 0 1
. if r#QUOTE \{ .rr #QUOTE \}
. if r#Q_AT_TOP \{ .rr #Q_AT_TOP \}
. ev SUBHEAD
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
. if \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. CHECK_INDENT
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. vs \\n[#DOC_LEAD]u
. QUAD \\*[$SH_QUAD]
. UNDERLINE OFF
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$SH_FAM]
. FT \\*[$SH_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$SH_SIZE_CHANGE]
. LS \\n[#DOC_LEAD]u
. QUAD \\*[$SH_QUAD]
. \}
. if \\n[#PRINT_STYLE]=1 \{ .nr #SH_LEAD_ADJUST \\n[#LEAD]/5 \}
. if \\n[#PRINT_STYLE]=2 \{ .nr #SH_LEAD_ADJUST \\n[#LEAD]/8 \}
. ie \\n[#START] \{ . \}
. el \{\
. ie ( \\n[#TRAP_DISTANCE] < (\\n[#DOC_LEAD]u*2u) ) \{\
. ie \\n[#COLUMNS] \{ .COL_NEXT \}
. el \{ .bp \}
. \}
. el \{\
. ie \\n[#HEAD]=1 \{ . \}
. el \{\
. if \\n[#PRINT_STYLE]=1 \{\
. if !\\n[#LINEBREAK] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#PP_SPACE]=1 \{\
. ie !\\n[#LINEBREAK] \{ .ALD \\n[#DOC_LEAD]u \}
. el \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. el \{\
. if !\\n[#LINEBREAK] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. \}
. \}
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. while \\n[#ARG_NUM]<\\n[#NUM_ARGS] \{\
. ie \\n[#NUMBER_SH] \{\
. ie \\n[#ARG_NUM]=0 \{\
. ie \\n[#NUMBER_HEAD] \{\
. br
. UNDERSCORE "\v'-\\n[#SH_LEAD_ADJUST]u'\\n[#HEAD_NUM].\\n+[#SH_NUM]\0\\$[\\n+[#ARG_NUM]]
. br
. \}
. el \{\
. br
. UNDERSCORE "\v'-\\n[#SH_LEAD_ADJUST]u'\\n+[#SH_NUM].\0\\$[\\n+[#ARG_NUM]]
. br
. \}
. \}
. el \{\
. br
. ie \\n[#HEAD_UNDERLINE]=0 \{ .PRINT "\v'-\\n[#SH_LEAD_ADJUST]u'\\$[\\n+[#ARG_NUM]]\}
. el \{ .UNDERSCORE "\v'-\\n[#SH_LEAD_ADJUST]u'\\$[\\n+[#ARG_NUM]]\}
. br
. \}
. \}
. el \{\
. br
. UNDERSCORE "\v'-\\n[#SH_LEAD_ADJUST]u'\\$[\\n+[#ARG_NUM]]
. br
. \}
. \}
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#SINGLE_SPACE] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#PP_SPACE]=0 \{\
. while \\n[#ARG_NUM]<\\n[#NUM_ARGS] \{\
. ie \\n[#NUMBER_SH] \{\
. ie \\n[#ARG_NUM]=0 \{\
. ie \\n[#NUMBER_HEAD] \{\
. br
. PRINT "\v'-\\n[#SH_LEAD_ADJUST]u'\\n[#HEAD_NUM].\\n+[#SH_NUM]\0\\$[\\n+[#ARG_NUM]]
. br
. \}
. el \{\
. br
. PRINT "\v'-\\n[#SH_LEAD_ADJUST]u'\\n+[#SH_NUM].\0\\$[\\n+[#ARG_NUM]]
. br
. \}
. \}
. el \{\
. br
. PRINT "\\v'-\\n[#SH_LEAD_ADJUST]u'\\$[\\n+[#ARG_NUM]]
. br
. \}
. \}
. el \{\
. br
. PRINT "\\v'-\\n[#SH_LEAD_ADJUST]u'\\$[\\n+[#ARG_NUM]]
. br
. \}
. \}
. \}
. el \{\
. ALD \\n[#DOC_LEAD]u
. if \\n[#HEAD]=1 \{ .RLD \\n[#DOC_LEAD]u \}
. if \\n[#END_QUOTE] \{ .RLD \\n[#DOC_LEAD]u \}
. if \\n[#EPIGRAPH] \{ .RLD \\n[#DOC_LEAD]u \}
. while \\n[#ARG_NUM]<\\n[#NUM_ARGS] \{\
. PRINT "\\$[\\n+[#ARG_NUM]]
. \}
. ALD \\n[#DOC_LEAD]u
. \}
. \}
. REMOVE_INDENT
. ev
. RESET_PARAHEAD_NUMBER
. if r#START \{ .rr #START \}
. if r#EPIGRAPH \{ .rr #EPIGRAPH \}
. if r#Q_FITS \{ .rr #Q_FITS \}
. if r#END_QUOTE \{ .rr #END_QUOTE \}
. if r#LINEBREAK \{ .rr #LINEBREAK \}
. nr #PP 0
. nr #HEAD 2
.END
\#
\# ---Paragraph heads---
\#
\# PARAHEAD FAMILY
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $PH_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC PARAHEAD_FAMILY END
. ds $PH_FAM \\$1
.END
\#
\#
\# PARAHEAD FONT
\# -------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $PH_FT.
\# *Notes:
\# Default is bold italic for TYPESET; underlined for TYPEWRITE.
\#
.MAC PARAHEAD_FONT END
. ds $PH_FT \\$1
.END
\#
\#
\# PARAHEAD SIZE
\# -------------
\# *Argument:
\# <+|- number of points by which to in/decrease point size of subheads
\# (relative to running text)>
\# *Function:
\# Creates or modifies string $PH_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed. No unit of measure, please.
\# Default is +.5 for printstyle TYPESET; +0 for TYPEWRITE.
\#
.MAC PARAHEAD_SIZE END
. ds $PH_SIZE_CHANGE \\$1
.END
\#
\#
\# PARAHEAD INDENT
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #PH_INDENT.
\# *Notes:
\# Default is 1/2 #PP_INDENT for TYPESET and TYPEWRITE.
\#
.MAC PARAHEAD_INDENT END
. nr #PH_INDENT (\\$1)
.END
\#
\#
\# PARAHEAD
\# --------
\# *Arguments:
\# ""
\# *Function:
\# Deposits a paragraph head at the start and into the body of a
\# paragraph.
\# *Notes:
\# PARAHEAD *must* come after PP.
\#
.MAC PARAHEAD END
. if \\n[#SLANT_ON] \{\
. nr #SLANT_WAS_ON 1
\E*[SLANTX]
. \}
. ie \\n[#PP]=1 \{\
. if \\n[#INDENT_FIRST_PARAS] \{\
. ti \\n[#PH_INDENT]u
. \}
. \}
. el \{ .ti \\n[#PH_INDENT]u \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. UNDERLINE OFF
. ie \\n[#NUMBER_PH] \{\
. if \\n[#NUMBER_HEAD] \{\
. ie \\n[#NUMBER_SH] \{\
. UNDERSCORE "\R'#NUMBERED 1'\\n[#HEAD_NUM].\\n[#SH_NUM].\\n+[#PH_NUM].\\ \\$1"
\0
. \}
. el \{\
. UNDERSCORE "\R'#NUMBERED 1'\\n[#HEAD_NUM].\\n+[#PH_NUM].\\ \\$1
\0
. \}
. \}
. ie \\n[#NUMBER_SH] \{\
. if !\\n[#NUMBERED] \{\
. UNDERSCORE "\\n[#SH_NUM].\\n+[#PH_NUM].\\ \\$1
\0
. \}
. \}
. el \{\
. if !\\n[#NUMBERED] \{\
. UNDERSCORE "\\n+[#PH_NUM].\\ \\$1
\0
. \}
. \}
. \}
. el \{\
. UNDERSCORE "\\$1
\0
. \}
. if \\n[#SLANT_WAS_ON] \{\
. if \\n[#UNDERLINE_SLANT] \{ .UNDERLINE \}
. if \\n[#SLANT_MEANS_SLANT] \{\
\E*[SLANT]\c
. \}
. rr #SLANT_WAS_ON
. \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAM \\*[$PH_FAM]
. FT \\*[$PH_FT]
. PT_SIZE \\*[$PH_SIZE_CHANGE]
. ie \\n[#NUMBER_PH] \{\
. if \\n[#NUMBER_HEAD] \{\
. ie \\n[#NUMBER_SH] \{\
. PRINT "\R'#NUMBERED 1'\\n[#HEAD_NUM].\\n[#SH_NUM].\\n+[#PH_NUM].\0\\$1\h'.6m'\c"
. \}
. el \{\
. PRINT "\R'#NUMBERED 1'\\n[#HEAD_NUM].\\n+[#PH_NUM].\0\\$1\h'.6m'\c"
. \}
. \}
. ie \\n[#NUMBER_SH] \{\
. if !\\n[#NUMBERED] \{\
. PRINT "\\n[#SH_NUM].\\n+[#PH_NUM].\0\\$1\h'.6m'\c"
. \}
. \}
. el \{\
. if !\\n[#NUMBERED] \{\
. PRINT "\\n+[#PH_NUM].\0\\$1\h'.6m'\c"
. \}
. \}
. \}
. el \{\
. PRINT "\\$1\h'.6m'\c"
. \}
. FAMILY \\*[$DOC_FAM]
. FT \\*[$PP_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u
. if \\n[#SLANT_WAS_ON] \{\
. rr #SLANT_WAS_ON 1
\E*[SLANT]\c
. \}
. \}
. rr #NUMBERED
.END
\#
\#
\# ====================================================================
\#
\# +++LINE BREAKS+++
\#
\# LINEBREAK CHARACTER
\# -------------------
\# *Arguments:
\# [character] [iterations] [vertical adjustment]
\# *Function:
\# Allows user to specify a line break character and the number
\# of times to repeat it horiontally.
\# *Notes:
\# Without an argument, LINEBREAK_CHAR will deposit a blank line.
\#
\# Vertical adjustment requires a unit of measure (most likely
\# "p"), and has to be preceded by +|-
\#
.MAC LINEBREAK_CHAR END
. nr #REPEAT 1
. ds $LINEBREAK_CHAR \\$1
. ds $LINEBREAK_CHAR_V_ADJ \\$3
. if '\\*[$LINEBREAK_CHAR_V_ADJ]'' \{\
. ds $LINEBREAK_CHAR_V_ADJ +0
. \}
. while \\$2>\\n[#REPEAT] \{\
. as $LINEBREAK_CHAR "\\ \\$1
. nr #REPEAT \\n[#REPEAT]+1
. \}
. rr #REPEAT
.END
\#
\#
\# LINE BREAK
\# ----------
\# *Arguments:
\#
\# *Function:
\# Deposits line break character.
\# *Notes:
\# If $LINEBREAK_CHAR is blank, simply advances 2 line spaces.
\#
.MAC LINEBREAK END
. if r#Q_AT_TOP \{ .rr #Q_AT_TOP \}
. po \\n[#DOC_L_MARGIN]u
. ie '\\*[$LINEBREAK_CHAR]'' \{ .ALD \\n[#DOC_LEAD]u*2 \}
. el \{\
. if \\n[#PRINT_STYLE]=1 \{\
. ie \\n[#END_QUOTE] \{ . \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#END_QUOTE] \{ . \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. CENTER
. PRINT \\v'\\*[$LINEBREAK_CHAR_V_ADJ]'\\*[$LINEBREAK_CHAR]\\v'\\*[$LINEBREAK_CHAR_V_ADJ]'
. if \\n[#PRINT_STYLE]=1 \{ .ALD \\n[#DOC_LEAD]u \}
. if \\n[#PRINT_STYLE]=2 \{ .ALD \\n[#DOC_LEAD]u \}
. QUAD \\*[$DOC_QUAD]
. \}
. nr #LINEBREAK 1
. if r#QUOTE \{ .rr #QUOTE \}
. if r#END_QUOTE \{ .rr #END_QUOTE \}
. nr #PP 0
.END
\#
\# ====================================================================
\#
\# +++PARAGRAPHS+++
\#
\# PARAGRAPH FONT
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $PP_FT.
\# *Notes:
\# Affects all paragraphs.
\#
.MAC PP_FONT END
. if \\n[#IGNORE] \{ .return \}
. br
. ds $PP_FT \\$1
. FT \\*[$PP_FT]
.END
\#
\#
\# PARAGRAPH INDENT
\# ----------------
\# *Argument:
\#
\# *Function:
\# Allows user to change the default para indent. The change will
\# affect the indent of QUOTEs and BLOCKQUOTEs as well.
\# *Notes:
\# Default for printstyle TYPEWRITE is 1/2-inch. Default for
\# printstyle TYPESET is 2 ems. The defaults are set in
\# PRINTSTYLE, not DEFAULTS.
\#
.MAC PARA_INDENT END
. nr #PP_INDENT (\\$1)
.END
\#
\#
\# INDENT FIRST PARAGRAPHS
\# -----------------------
\# *Arguments:
\# |
\# *Function:
\# By default, the first para of a document, as well as the first
\# paras of blockquotes and block-style epigraphs are not indented.
\# When invoked, this macro will indent all paras.
\# *Notes:
\# Default is OFF.
\#
.MAC INDENT_FIRST_PARAS END
. ie '\\$1'' \{ .nr #INDENT_FIRST_PARAS 1 \}
. el \{ .rr #INDENT_FIRST_PARAS \}
.END
\#
\#
\# INTER-PARAGRAPH SPACING
\# -----------------------
\# *Arguments:
\# |
\# *Function:
\# Adds a line space between paragraphs in body text. Block quotes
\# are unaffected.
\# *Notes:
\# Default is OFF. PARA_SPACE ON is not recommended for use
\# with PRINTSTYLE TYPEWRITE.
\#
.MAC PARA_SPACE END
. ie '\\$1'' \{ .nr #PP_SPACE 1 \}
. el \{ .rr #PP_SPACE \}
.END
\#
\#
\# PARAGRAPH
\# ---------
\# *Arguments:
\#
\# *Function:
\# Figures out what to do with paragraphs under differing conditions.
\# *Notes:
\# For the time being, there's no automatic widow/orphan control.
\# Controlling them isn't just a matter of establishing an arbitrary
\# number of lines needed for a para, since groff doesn't then
\# handle single line paragraphs gracefully. Usually, the whole
\# page needs to be tweaked.
\#
\# Note the use of transparent line break (\!.br) to get
\# PP to work within blockquotes and epigraphs.
\#
\# PP_STYLE 1 = regular paras; 2 = blockquotes, epigraphs
\#
.MAC PP END
. br
. if \\n[#DOC_TYPE]=4 \{\
. if !'\\n(.z'' \{ .di \}
. if \\n[#DATE] \{\
. nf
. DATE
. QUAD \\*[$DOC_QUAD]
. ALD \\n[#DOC_LEAD]u*2u
. rr #DATE
. \}
. if \\n[#TO] \{\
. nf
. TO_ADDRESS
. ALD \\n[#DOC_LEAD]u
. rr #TO
. \}
. if \\n[#FROM] \{\
. nf
. FROM_ADDRESS
. ALD \\n[#DOC_LEAD]u
. rr #FROM
. \}
. if \\n[#GREETING] \{\
. nf
. GREETING
. ALD \\n[#DOC_LEAD]u
. rr #GREETING
. \}
. \}
. rr #PP_ACTIVE
. if r#Q_AT_TOP \{ .rr #Q_AT_TOP \}
. if \\n[#PP_STYLE]=1 \{\
. if \\n[#ENDNOTE] \{\
. nr #RESET_PARA_SPACE \\n[#PP_SPACE]
. ie \\n[#EN_PP_SPACE] \{ .PARA_SPACE \}
. el \{ .PARA_SPACE OFF \}
. \}
. br
. if !\\n[#ENDNOTE] \{ .po \\n[#L_MARGIN]u \}
. if \\n[#COLUMNS] \{\
. if !\\n[#ENDNOTE] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. \}
. if \\n[#TAB_ACTIVE] \{ .TAB \\n[#CURRENT_TAB] \}
. ie \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. vs \\n[#DOC_LEAD]u
. QUAD \\*[$DOC_QUAD]
. UNDERLINE OFF
. if \\n[#SLANT_ON] \{\
. if \\n[#UNDERLINE_SLANT] \{ .UNDERLINE \}
. \}
. \}
. el \{\
. ie \\n[#ENDNOTE] \{\
. FAMILY \\*[$EN_FAM]
. FT \\*[$EN_FT]
. PT_SIZE \\n[#EN_PS]u
. LS \\n[#DOC_LEAD]u
. QUAD \\*[$EN_QUAD]
. \}
. el \{\
. FAMILY \\*[$DOC_FAM]
. FT \\*[$PP_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u
. LS \\n[#DOC_LEAD]u
. QUAD \\*[$DOC_QUAD]
. \}
. \}
. ie \\n[#PP]=0 \{\
. if \\n[#INDENT_FIRST_PARAS] \{\
. ie \\n[#INDENT_ACTIVE] \{ .ti \\n[#INDENT]u+\\n[#PP_INDENT]u \}
. el \{ .ti \\n[#PP_INDENT]u \}
. if '\\n(.z'END_NOTES' \{\
. ti \\n[#EN_PP_INDENT]u+\\n[#EN_TEXT_INDENT]u
. \}
. \}
. if r#END_QUOTE \{\
. if \\n[#END_QUOTE] \{\
. if !\\n[#LINEBREAK] \{\
. ie \\n[#INDENT_ACTIVE] \{ .ti \\n[#INDENT]u+\\n[#PP_INDENT]u \}
. el \{ .ti \\n[#PP_INDENT]u \}
. if '\\n(.z'END_NOTES' \{\
. ti \\n[#EN_PP_INDENT]u+\\n[#EN_TEXT_INDENT]u
. \}
. \}
. \}
. \}
. \}
. el \{\
. br
. if \\n[#PP_SPACE] \{\
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#END_QUOTE] \{\
. rr #END_QUOTE
. \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. ie \\n[#INDENT_ACTIVE] \{ .ti \\n[#INDENT]u+\\n[#PP_INDENT]u \}
. el \{ .ti \\n[#PP_INDENT]u \}
. if '\\n(.z'END_NOTES' \{\
. ti \\n[#EN_PP_INDENT]u+\\n[#EN_TEXT_INDENT]u
. \}
. \}
. if r#START \{ .rr #START \}
. if r#QUOTE \{ .rr #QUOTE \}
. if r#END_QUOTE \{ .rr #END_QUOTE \}
. if r#HEAD \{ .rr #HEAD \}
. if r#EPIGRAPH \{ .rr #EPIGRAPH \}
. if r#Q_FITS \{ .rr #Q_FITS \}
. if r#LINEBREAK \{ .rr #LINEBREAK \}
. if \\n[#ENDNOTE] \{\
. ie \\n[#RESET_PARA_SPACE] \{ .PARA_SPACE \}
. el \{ .PARA_SPACE OFF \}
. \}
. if \\n[#CONDENSE] \{\
\E*[COND]\c
. \}
. if \\n[#EXTEND]=1 \{\
\E*[EXT]\c
. \}
. nr #PP +1
. \}
. if \\n[#PP_STYLE]=2 \{\
\!. br
. if \\n[#BROKEN_QUOTE] \{\
. ie \\n(nl=\\n[#PAGE_TOP] \{ .nr #Q_PP 1 \}
. el \{ .nr #Q_PP 0 \}
. rr #BROKEN_QUOTE
. \}
. ie \\n[#Q_PP]=0 \{\
. if \\n[#INDENT_FIRST_PARAS] \{\
. ti \\n[#PP_INDENT]u/2u
. \}
. if \\n[#ENDNOTE] \{\
. ie \\n[#INDENT_FIRSTS] \{ .ti \\n[#PP_INDENT]u/2u \}
. el \{ .ti 0 \}
. \}
. \}
. el \{\
. ti \\n[#PP_INDENT]u/2u
. \}
. if \\n[#CONDENSE] \{\
\E*[COND]\c
. \}
. if \\n[#EXTEND]=1 \{\
\E*[EXT]\c
. \}
. nr #Q_PP +1
. \}
. nr #PP_ACTIVE 1
.END
\#
\# ====================================================================
\#
\# +++QUOTES+++
\#
\# ---Line for line (poetic) quotes---
\#
\# QUOTE FAMILY
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $QUOTE_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC QUOTE_FAMILY END
. ds $QUOTE_FAM \\$1
.END
\#
\#
\# QUOTE FONT
\# ----------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $QUOTE_FT.
\# *Notes:
\# Default is italic for TYPESET.
\#
.MAC QUOTE_FONT END
. ds $QUOTE_FT \\$1
.END
\#
\#
\# QUOTE SIZE
\# ----------
\# *Argument:
\# <-|+ number of points by which to de/increase point size of
\# line for line quotes (relative to running text)>
\# *Function:
\# Creates or modifies string $QUOTE_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a - or + sign with no space afterwards.
\# Fractional point sizes are allowed.
\# Default is +0.
\#
.MAC QUOTE_SIZE END
. ds $QUOTE_SIZE_CHANGE \\$1
.END
\#
\#
\# UNDERLINE QUOTES
\# ----------------
\# *Arguments:
\# |
\# *Function:
\# Creates or modifies register #UNDERLINE_QUOTES (toggle).
\# If on, line for line quotes are underlined when printstyle
\# is TYPEWRITE.
\# *Notes:
\# Default is ON for printstyle TYPEWRITE.
\#
.MAC UNDERLINE_QUOTES END
. ie '\\$1'' \{ .nr #UNDERLINE_QUOTES 1 \}
. el \{ .rr #UNDERLINE_QUOTES \}
.END
\#
\#
\# QUOTE INDENT
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies register #Q_OFFSET_VALUE.
\# *Notes:
\# Default is 3 for typeset; 2 for typewrite
\#
.MAC QUOTE_INDENT END
. nr #Q_OFFSET_VALUE \\$1
.END
\#
\#
\# ALWAYS FULLSPACE QUOTES
\# -----------------------
\# *Arguments:
\# |
\# *Function:
\# Toggles register #FULLSPACE_QUOTES.
\# *Notes:
\# If user doesn't like the default 1/2 line space above and below
\# quotes, s/he can turn it off here. Has no effect in TYPEWRITE.
\#
.MAC ALWAYS_FULLSPACE_QUOTES END
. if '\\$1'' \{ .nr #FULLSPACE_QUOTES 1 \}
. el \{ .rr #FULLSPACE_QUOTES \}
.END
\#
\#
\# QUOTE
\# -----
\# *Arguments:
\# |
\# *Function:
\# Indents quoted text on a line for line basis, or turns QUOTE off.
\# *Notes:
\# Owing to the need to bottom align TYPESET pages, quoted text gets
\# diverted so its depth can be measured (in DO_QUOTE) for determining
\# how much space to put before and after.
\#
.MAC QUOTE END
. br
\# **Uncomment the next line to prevent orphaned quote lines.
\#. ne 1
. ie '\\$1'' \{\
. ev QUOTE
. nr #QUOTE 1
. di P_QUOTE
. ll \\n[#L_LENGTH]u-(\\n[#PP_INDENT]u*\\n[#Q_OFFSET_VALUE]u)
. ta \\n(.lu
. if \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u-(\\n[#PP_INDENT]u*\\n[#Q_OFFSET_VALUE]u)
. ta \\n(.lu
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. vs \\n[#DOC_LEAD]u
. LEFT
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$QUOTE_FAM]
. FT \\*[$QUOTE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$QUOTE_SIZE_CHANGE]
. LS \\n[#DOC_LEAD]u
. LEFT
. \}
. nr #Q_TOP \\n(nl
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_QUOTES] \{\
. FT I
. \}
. \}
. \}
. el \{ .DO_QUOTE \}
.END
\#
\#
\# ---Blockquotes---
\#
\# BLOCKQUOTE FAMILY
\# -----------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $BQUOTE_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC BLOCKQUOTE_FAMILY END
. ds $BQUOTE_FAM \\$1
.END
\#
\#
\# BLOCKQUOTE FONT
\# ---------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $BQUOTE_FT.
\# *Notes:
\# Default is same as running text.
\#
.MAC BLOCKQUOTE_FONT END
. ds $BQUOTE_FT \\$1
.END
\#
\#
\# BLOCKQUOTE SIZE
\# ---------------
\# *Argument:
\# <-|+ number of points by which to de/increase point size of blockquotes
\# (relative to running text)>
\# *Function:
\# Creates or modifies string $BQUOTE_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a - or + sign with no space afterwards.
\# Fractional point sizes are allowed.
\# Default is -1 for printstyle TYPESET; +0 for TYPEWRITE.
\#
.MAC BLOCKQUOTE_SIZE END
. ds $BQUOTE_SIZE_CHANGE \\$1
.END
\#
\#
\# BLOCKQUOTE QUAD
\# ---------------
\# *Arguments:
\#
\# *Function:
\# Creates or modifies string $BQUOTE_QUAD.
\# *Notes:
\# Default is LEFT.
\#
.MAC BLOCKQUOTE_QUAD END
. ds $BQUOTE_QUAD \\$1
.END
\#
\#
\# BLOCKQUOTE
\# ----------
\# *Arguments:
\# |
\# *Function:
\# Indents quoted text in fill mode and shortens line length
\# accordingly, or turns BLOCKQUOTE off.
\# *Notes:
\# Owing to the need to bottom align TYPESET pages, quoted text gets
\# diverted so its depth can be measured (in DO_QUOTE) for determining
\# how much space to put before and after.
\#
\# .PP after blockquote is optional if there's only one para,
\# but REQUIRED if there's more than one.
\#
.MAC BLOCKQUOTE END
. br
. ie '\\$1'' \{\
. ev BLOCKQUOTE
. nr #QUOTE 2
. nr #PP_STYLE 2
. nr #Q_PP 0
. di B_QUOTE
. ll \\n[#L_LENGTH]u-(\\n[#PP_INDENT]u*(\\n[#Q_OFFSET_VALUE]u*2u))
. if \\n[#ENDNOTE] \{\
. if \\n[#EN_NUMBERS_ALIGN_RIGHT] \{\
. ll \\n[#RESET_L_LENGTH]u-\\n[#EN_TEXT_INDENT]u-(\\n[#EN_PP_INDENT]u*(\\n[#Q_OFFSET_VALUE]u*2u))
. \}
. if \\n[#EN_NUMBERS_ALIGN_LEFT] \{\
. ll \\n[#L_LENGTH]u-(\\n[#EN_PP_INDENT]u*(\\n[#Q_OFFSET_VALUE]u*2u))
. \}
. \}
. ta \\n(.lu
. CHECK_INDENT
. if \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u-(\\n[#PP_INDENT]u*(\\n[#Q_OFFSET_VALUE]u*2u))
. if \\n[#ENDNOTE] \{\
. if \\n[#EN_NUMBERS_ALIGN_RIGHT] \{\
. ll \\n[#RESET_L_LENGTH]u-\\n[#EN_TEXT_INDENT]u-(\\n[#EN_PP_INDENT]u*(\\n[#Q_OFFSET_VALUE]u*2u))
. \}
. if \\n[#EN_NUMBERS_ALIGN_LEFT] \{\
. ll \\n[#COL_L_LENGTH]u-(\\n[#EN_PP_INDENT]u*(\\n[#Q_OFFSET_VALUE]u*2u))
. \}
. \}
. ta \\n(.lu
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. vs \\n[#DOC_LEAD]u
. QUAD LEFT
. HY OFF
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$BQUOTE_FAM]
. FT \\*[$BQUOTE_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$BQUOTE_SIZE_CHANGE]
. LS \\n[#DOC_LEAD]u
. if \\n[#ENDNOTE] \{\
. PT_SIZE \\n[#EN_PS]u\\*[$BQUOTE_SIZE_CHANGE]
. \}
. QUAD \\*[$BQUOTE_QUAD]
. HY
. \}
. nr #Q_TOP \\n(nl
. if \\n[#INDENT_FIRST_PARAS] \{\
. ie !\\n[#ENDNOTE] \{\
. if \\n[#PRINT_STYLE]=1 \{ .ti \\n[#PP_INDENT]u/2u \}
. if \\n[#PRINT_STYLE]=2 \{ .ti \\n[#PP_INDENT]u/2u \}
. \}
. el \{\
. if \\n[#INDENT_FIRSTS]=1 \{\
. if \\n[#PRINT_STYLE]=1 \{ .ti \\n[#EN_PP_INDENT]u/2u \}
. if \\n[#PRINT_STYLE]=2 \{ .ti \\n[#EN_PP_INDENT]u/2u \}
. \}
. \}
. \}
. \}
. el \{ .DO_QUOTE \}
.END
\#
\#
\# DO QUOTE
\# --------
\# *Arguments:
\#
\# *Function:
\# Ends the diversion P_QUOTE or B_QUOTE. Spaces them according to
\# PRINT_STYLE, whether there's inter-paragraph spacing, and page
\# position. TYPEWRITE treats spacing the same way in all circumstance
\# (viz. an extra line space). TYPESET puts in only half
\# line spaces if the entire quote plus 1 line of body under the quote
\# fits on the the page; otherwise it puts in a full extra blank
\# line. (This is to ensure the page remains bottom aligned).
\#
.MAC DO_QUOTE END
. di
. REMOVE_INDENT
. ev
\# **Change *1 to *2 in next line to prevent orphans after quotes
. if \\n[#ENDNOTE] \{\
. nr #RESET_QUOTE_SPACING \\n[#FULLSPACE_QUOTES]
. ALWAYS_FULLSPACE_QUOTES
. \}
. nr #Q_DEPTH \\n[#DIVER_DEPTH]+(\\n[#LEAD]*1)
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#START]=1 \{ . \}
. if \\n[#START]=0 \{\
. if !\\n[#LINEBREAK] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. if \\n[#HEAD] \{\
. if \\n[#HEAD]=1 \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#PP_SPACE] \{\
. ie \\n[#HEAD]>0 \{ . \}
. el \{\
. ie \\n[#START] \{ . \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. el \{\
. ie \\n[#Q_DEPTH]<\\n[#TRAP_DISTANCE] \{\
. nr #Q_FITS 1
. ie \\n[#HEAD]=1 \{ . \}
. el \{\
. ie \\n[#START] \{ . \}
. el \{\
. ie \\n[#FULLSPACE_QUOTES] \{\
. ALD \\n[#DOC_LEAD]u
. \}
. el \{ .ALD \\n[#DOC_LEAD]u/2u \}
. \}
. \}
. \}
. el \{\
. rr #Q_FITS
. ie r#HEAD \{\
. if \\n[#HEAD]=1 \{ . \}
. \}
. el \{ .ALD \\n[#EN_LEAD]u \}
. \}
. \}
. \}
. nr #Q_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE])
. if \\n[#COLUMNS] \{\
. nr #Q_OFFSET \\n[#COL_\\n[#COL_NUM]_L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE])
. \}
. if !\\n[#ENDNOTE] \{ .po \\n[#Q_OFFSET]u \}
. if \\n[#ENDNOTE] \{\
. in +\\n[#EN_PP_INDENT]u*\\n[#Q_OFFSET_VALUE]u
. \}
. if \\n[#QUOTE]=1 \{\
. nf
. P_QUOTE
. if !\\n[#START] \{ .rr #QUOTE \}
. \}
. if \\n[#QUOTE]=2 \{\
. nf
. B_QUOTE
. \}
. if \\n[#PRINT_STYLE]=1 \{\
. ALD \\n[#DOC_LEAD]u
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#START] \{\
. ie \\n[#PP_SPACE] \{ . \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. el \{\
. ie \\n[#PP_SPACE] \{ . \}
. el \{\
. ie \\n[#HEAD]=1 \{ .ALD \\n[#DOC_LEAD]u \}
. el \{\
. ie \\n[#Q_FITS] \{\
. ie \\n[#Q_TOP]=\\n[#PAGE_TOP] \{\
. nr #Q_AT_TOP 1
. ALD \\n[#DOC_LEAD]u
. \}
. el \{\
. ie \\n[#FULLSPACE_QUOTES] \{ .ALD \\n[#DOC_LEAD]u \}
. el \{ .ALD \\n[#DOC_LEAD]u/2u \}
. \}
. \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. \}
. \}
. if \\n[#ENDNOTE] \{ .nr #FULLSPACE_QUOTES \\n[#RESET_QUOTE_SPACING] \}
. if r#HEAD \{ .rr #HEAD \}
. if r#EPIGRAPH \{ .rr #EPIGRAPH \}
. rr #Q_PP
. rr #LINEBREAK
. nr #PP_STYLE 1
. nr #END_QUOTE 1
. if !\\n[#ENDNOTE] \{ .po \\n[#L_MARGIN]u \}
. if \\n[#ENDNOTE] \{\
. in \\n[#EN_TEXT_INDENT]u
. \}
. if \\n[#COLUMNS] \{\
. if !\\n[#ENDNOTE] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. if \\n[#ENDNOTE] \{\
. in \\n[#EN_TEXT_INDENT]u
. \}
. \}
. ie !\\n[#ENDNOTE] \{\
. nr #RESET_PP_INDENT \\n[#PP_INDENT]
. PARA_INDENT 0
. PP
. PARA_INDENT \\n[#RESET_PP_INDENT]u
. QUAD \\*[$DOC_QUAD]
. \}
. el \{\
. nr #RESET_EN_PP_INDENT \\n[#EN_PP_INDENT]
. ENDNOTE_PARA_INDENT 0
. PP
. ENDNOTE_PARA_INDENT \\n[#RESET_EN_PP_INDENT]u
. QUAD \\*[EN_QUAD]
. \}
.END
\#
\# ====================================================================
\#
\# BREAK QUOTE
\# -----------
\# *Arguments:
\#
\# *Function:
\# Ends the diversion P_QUOTE or B_QUOTE, breaks to a new
\# page, and reinvokes BLOCKQUOTE.
\# *Notes:
\# Because quotes go into a diversion before they're output,
\# footnotes in quotes that cross pages behave erratically. The footnote
\# isn't processed until the diversion ends, hence the footnote
\# marker in the quote isn't always correct for the new page (it's
\# picked up from the old one). BREAK_QUOTE is a workaround for
\# this problem.
\#
.MAC BREAK_QUOTE END
. br
. di
. nr #BROKEN_QUOTE 1
. REMOVE_INDENT
. ev
. nr #Q_DEPTH \\n[#DIVER_DEPTH]+(\\n[#LEAD]*1)
. if \\n[#PRINT_STYLE]=1 \{\
. if !\\n[#LINEBREAK] \{ .ALD \\n[#DOC_LEAD]u \}
. if \\n[#HEAD] \{\
. if \\n[#HEAD]=1 \{ .RLD \\n[#DOC_LEAD]u \}
. \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. ie \\n[#PP_SPACE] \{\
. ie \\n[#HEAD]=1 \{ . \}
. el \{\
. if !\\n[#LINEBREAK] \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. el \{\
. rr #Q_FITS
. ie r#HEAD \{\
. if \\n[#HEAD]=1 \{ . \}
. \}
. el \{ .ALD \\n[#DOC_LEAD]u \}
. \}
. \}
. nr #Q_OFFSET \\n[#L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE])
. if \\n[#COLUMNS] \{ .nr #Q_OFFSET \\n[#COL_\\n[#COL_NUM]_L_MARGIN]+(\\n[#PP_INDENT]*\\n[#Q_OFFSET_VALUE]) \}
. po \\n[#Q_OFFSET]u
. if \\n[#QUOTE]=1 \{\
. nf
. P_QUOTE
. if !\\n[#START] \{ .rr #QUOTE \}
. \}
. if \\n[#QUOTE]=2 \{\
. nf
. B_QUOTE
. \}
. if r#HEAD \{ .rr #HEAD \}
. if r#EPIGRAPH \{ .rr #EPIGRAPH \}
. rr #Q_PP
. rr #LINEBREAK
. nr #PP_STYLE 1
. nr #END_QUOTE 1
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_QUOTES] \{\
. UNDERLINE OFF
. \}
. \}
. po \\n[#L_MARGIN]u
. if \\n[#COLUMNS] \{ .po \\n[#COL_\\n[#COL_NUM]_L_MARGIN]u \}
. QUAD \\*[$DOC_QUAD]
. sp |\\n[#PAGE_LENGTH]u \" To trip footer/header
. BLOCKQUOTE
.END
\#
\# ====================================================================
\#
\# +++PAGINATION+++
\#
\# PAGINATE
\# --------
\# *Arguments:
\# |
\# *Function:
\# Turns page numbering off or on.
\# *Notes:
\# Page numbering is on by default with .PAPER.
\# Default is on.
\#
.MAC PAGINATE END
. ie '\\$1'' \{ .nr #PAGINATE 1 \}
. el \{ .nr #PAGINATE 0 \}
.END
\#
\#
\# PAGENUMBER FAMILY
\# -----------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $PAGE_NUM_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC PAGENUM_FAMILY END
. ds $PAGE_NUM_FAM \\$1
.END
\#
\#
\# PAGE NUMBER FONT
\# ----------------
\# *Arguments:
\#
\# *Function:
\# Creates or modifies string $PAGE_NUM_FT.
\# *Notes:
\# Default is same as running text.
\#
.MAC PAGENUM_FONT END
. ds $PAGE_NUM_FT \\$1
.END
\#
\#
\# PAGE NUMBER SIZE
\# ----------------
\# *Argument:
\# <+|- number of points by which to in/decrease point size of
\# page numbers (relative to running text)>
\# *Function:
\# Creates or modifies string $PAGE_NUM_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign with no space afterward.
\# Fractional point sizes are allowed.
\# Default is +0.
\#
.MAC PAGENUM_SIZE END
. ds $PAGE_NUM_SIZE_CHANGE \\$1
.END
\#
\#
\# PAGE NUMBER FORMAT
\# ------------------
\# *Arguments:
\# DIGIT | ROMAN | roman | ALPHA | alpha
\# *Function:
\# Assigns user entered format to #PAGENUMBER.
\#
.MAC PAGENUM_STYLE END
. nr #PAGENUM_STYLE_SET 1
. if '\\$1'DIGIT' \{\
. ds $PAGENUM_STYLE \\$1
. af #PAGENUMBER 1
. \}
. if '\\$1'ROMAN' \{\
. ds $PAGENUM_STYLE \\$1
. af #PAGENUMBER I
. \}
. if '\\$1'roman' \{\
. ds $PAGENUM_STYLE \\$1
. af #PAGENUMBER i
. \}
. if '\\$1'ALPHA' \{\
. ds $PAGENUM_STYLE \\$1
. af #PAGENUMBER A
. \}
. if '\\$1'alpha' \{\
. ds $PAGENUM_STYLE \\$1
. af #PAGENUMBER a
. \}
.END
\#
\#
\# HYPHENS AROUND PAGE NUMBERS
\# ---------------------------
\# *Arguments:
\# |
\# *Function:
\# Creates or modifies register #PAGE_NUM_HYPHENS.
\# Used to dis/enable hyphens on either side of page numbers.
\# *Notes:
\# Default is on.
\#
.MAC PAGENUM_HYPHENS END
. nr #PAGE_NUM_HYPHENS_SET 1
. ie '\\$1'' \{ .nr #PAGE_NUM_HYPHENS 1 \}
. el \{ .rr #PAGE_NUM_HYPHENS \}
.END
\#
\#
\# PAGENUMBER POSITION
\# -------------------
\# *Arguments:
\# TOP | BOTTOM LEFT | CENTER | RIGHT
\# *Function:
\# Creates or modifies various PAGE_NUM_H | V_POS registers.
\# Used to position page numbers.
\# *Notes:
\# Default is center/bottom.
\#
.MAC PAGENUM_POS END
. nr #PAGE_NUM_POS_SET 1
. if '\\$1'TOP' \{ .nr #PAGE_NUM_V_POS 1 \}
. if '\\$1'BOTTOM' \{ .nr #PAGE_NUM_V_POS 2 \}
. if '\\$2'LEFT' \{ .nr #PAGE_NUM_H_POS 1 \}
. if '\\$2'CENTER' \{ .nr #PAGE_NUM_H_POS 2 \}
. if '\\$2'CENTRE' \{ .nr #PAGE_NUM_H_POS 2 \}
. if '\\$2'RIGHT' \{ .nr #PAGE_NUM_H_POS 3 \}
.END
\#
\#
\# PRINT PAGE NUMBER
\# -----------------
\# *Arguments:
\#
\# *Function:
\# Prints page number if PAGEINATE=1.
\#
.MAC PRINT_PAGE_NUMBER END
. ev PAGENUMBER
. po \\n[#DOC_L_MARGIN]u
. ll \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. FAMILY \\*[$PAGE_NUM_FAM]
. FT \\*[$PAGE_NUM_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$PAGE_NUM_SIZE_CHANGE]
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. if \\n[#PAGE_NUM_V_POS]=1 \{ .vs 0 \}
. if o \{\
. ie \\n[#PAGE_NUM_H_POS]=1 \{ .LEFT \}
. el \{ .RIGHT \}
. \}
. if e \{\
. ie \\n[#PAGE_NUM_H_POS]=1 \{ .RIGHT \}
. el \{ .LEFT \}
. \}
. if \\n[#PAGE_NUM_H_POS]=2 \{.CENTER \}
. if \\n[#RECTO_VERSO]=0 \{\
. if \\n[#PAGE_NUM_H_POS]=1 \{ .LEFT \}
. if \\n[#PAGE_NUM_H_POS]=2 \{ .CENTER \}
. if \\n[#PAGE_NUM_H_POS]=3 \{ .RIGHT \}
. \}
. nr #PAGENUMBER \\n%+\\n[#PAGE_NUM_ADJ]
. ie \\n[#DRAFT_WITH_PAGENUM] \{\
. ie !\\n[#REVISION] \{ .PRINT "\\*[$DRAFT_STRING] \\n[#DRAFT] / \\n[#PAGENUMBER]" \}
. el \{ .PRINT "\\*[$DRAFT_STRING] \\n[#DRAFT], \\*[$REVISION_STRING] \\n[#REVISION] / \\n[#PAGENUMBER]" \}
. \}
. el \{\
. ie \\n[#PAGE_NUM_HYPHENS] \{ .PRINT "- \\n[#PAGENUMBER] -" \}
. el \{ .PRINT "\\n[#PAGENUMBER]" \}
. \}
. ev
.END
\#
\# ====================================================================
\#
\# +++FOOTNOTES+++
\#
\# FOOTNOTE FAMILY
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $FN_FAM.
\# *Notes:
\# Default is same as running text.
\#
.MAC FOOTNOTE_FAMILY END
. ds $FN_FAM \\$1
.END
\#
\#
\# FOOTNOTE FONT
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $FN_FT.
\# *Notes:
\# Default is roman.
\#
.MAC FOOTNOTE_FONT END
. ds $FN_FT \\$1
.END
\#
\#
\# FOOTNOTE SIZE
\# ------------
\# *Argument:
\# <+|- number of points by which to in/decrease point size of footnotes
\# (relative to running text)>
\# *Function:
\# Creates or modifies string $FN_SIZE_CHANGE.
\# *Notes:
\# Must be preceded by a +|- sign. No space afterwards.
\# Fractional point sizes are allowed.
\# Default is -2 for printstyle TYPESET; +0 for TYPEWRITE.
\#
.MAC FOOTNOTE_SIZE END
. ds $FN_SIZE_CHANGE \\$1
.END
\#
\#
\# FOOTNOTE AUTOLEAD
\# -----------------
\# *Arguments:
\#
\# *Function:
\# Creates or modifies register #FN_AUTOLEAD.
\# *Notes:
\# Default is #DOC_LEAD/2 for TYPEWRITE; 2 for TYPESET
\#
.MAC FOOTNOTE_AUTOLEAD END
. nr #FN_AUTOLEAD \\$1
.END
\#
\#
\# FOOTNOTE QUAD
\# -------------
\# *Arguments:
\#
\# *Function:
\# Creates or modifies string $FN_QUAD.
\# *Notes:
\# Default is same as running text.
\#
.MAC FOOTNOTE_QUAD END
. ds $FN_QUAD \\$1
.END
\#
\#
\# FOOTNOTE MARKERS
\# ----------------
\# *Arguments:
\# |
\# *Function:
\# Turns generation of footnote markers on or off.
\# *Notes:
\# Default is on.
\#
.MAC FOOTNOTE_MARKERS END
. ie '\\$1'' \{ .nr #FN_MARKERS 1 \}
. el \{ .nr #FN_MARKERS 0 \}
.END
\#
\#
\# FOOTNOTE MARKER STYLE
\# ---------------------
\# *Arguments:
\# STAR | NUMBER
\# *Function:
\# Sets register #FN_MARKER_STYLE, used in FOOTNOTE to determine
\# the style of footnote markers.
\# *Notes:
\# 1=STAR; 2=NUMBER. Default is STAR.
\#
.MAC FOOTNOTE_MARKER_STYLE END
. if '\\$1'STAR' \{\
. nr #FN_MARKER_STYLE 1
. \}
. if '\\$1'NUMBER' \{\
. nr #FN_MARKER_STYLE 2
. \}
.END
\#
\#
\# RESET FOOTNOTE NUMBER
\# ---------------------
\# *Arguments:
\# | PAGE
\# *Function:
\# Resets register #FN_NUMBER to 1. If argument is PAGE, creates
\# toggle #RESET_FN_NUMBER which is checked in HEADER. If 1,
\# numbered footnotes on every page start at 1.
\#
.MAC RESET_FOOTNOTE_NUMBER END
. ie '\\$1'' \{ .nr #FN_NUMBER 0 1 \}
. el \{ .nr #RESET_FN_NUMBER 1 \}
.END
\#
\#
\# FOOTNOTE RULE LENGTH
\# --------------------
\# *Arguments:
\#
\# *Function:
\# Creates or modifies registers #FN_RULE_LENGTH.
\# *Notes:
\# Requires unit of measure (iPpcm).
\# Default is 4P for both PRINTSTYLEs.
\#
.MAC FOOTNOTE_RULE_LENGTH END
. nr #FN_RULE_LENGTH (\\$1)
.END
\#
\#
\# FOOTNOTE_RULE_ADJ
\# -----------------
\# *Arguments:
\#
\# *Function:
\# Creates or modifies register #FN_RULE_ADJ.
\# *Notes:
\# Default is 3p for both TYPESTYLES.
\#
\# Requires unit of measure.
\#
.MAC FOOTNOTE_RULE_ADJ END
. nr #FN_RULE_ADJ (\\$1)
.END
\#
\#
\# FOOTNOTE RULE
\# -------------
\# *Arguments:
\# |
\# *Function:
\# Turns printing of footnote separator rule on or off. If invoked as
\# PRINT_FOOTNOTE_RULE, prints footnote separator rule.
\# *Notes:
\# Default is on.
\#
\# Invoked in FOOTNOTE (as PRINT_FOOTNOTE_RULE) as 1st line of a footnote
\# if the footnote number (#FN_COUNT) is 1.
\#
.MAC FOOTNOTE_RULE END
. ie '\\$0'PRINT_FOOTNOTE_RULE' \{\
. if \\n[#FN_RULE]=0 \{ .RLD 1v \}
\!. PT_SIZE 12 \"Not sure why these have to be transparently embedded, but they do.
. RLD 1v
. LEFT
. PRINT \\v'-\\n[#FN_RULE_ADJ]u'\\l'\\n[#FN_RULE_LENGTH]u'\\v'+\\n[#FN_RULE_ADJ]u'
\!. PT_SIZE \\n[#DOC_PT_SIZE]u\\*$[FN_SIZE_CHANGE]
. QUAD \\*[$FN_QUAD]
. \}
. el \{\
. ie '\\$1'' \{ .nr #FN_RULE 1 \}
. el \{ .nr #FN_RULE 0 \}
. \}
.END
\#
\#
\# FOOTNOTE
\# --------
\# *Arguments:
\# | INDENT L|LEFT|R|RIGHT|B|BOTH > |
\# *Function:
\# Begins collecting and diverting footnote text if no argument
\# given. Otherwise, ends diversion FOOTNOTES, measures footnote
\# depth, and sets footnote trap.
\# *Notes:
\# The input line preceding a footnote call MUST terminate with \c
\# or the footnote marker will be spaced away from the word it
\# should be joined to.
\#
\# If FOOTNOTES is invoked with INDENT, the footnote will
\# be indented. An indent style and an indent value must be given.
\# Subsequent footnotes will NOT be indented; INDENT must be given
\# for each footnote the user wants indented.
\#
.MAC FOOTNOTE END
. ie '\\$1'' \{\
. if \\n[#FN_MARKERS] \{\
. if \\n[#CONDENSE] \{ \*[CONDX]\c \}
. if \\n[#EXTEND] \{ \*[EXTX]\c \}
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_ON] \{\
. nr #UNDERLINE_WAS_ON 1
. UNDERLINE OFF
. \}
. \}
. if !\\n[#NO_FN_MARKER] \{\
. if \\n[#FN_MARKER_STYLE]=1 \{\
. ie \\n[#FN_COUNT_FOR_COLS] \{\
. if \\n[#FN_COUNT_FOR_COLS]=0 \{ .PRINT \*[BU3]* \}
. if \\n[#FN_COUNT_FOR_COLS]=1 \{ .PRINT \*[BU3]\(dg \}
. if \\n[#FN_COUNT_FOR_COLS]=2 \{ .PRINT \*[BU3]** \}
. if \\n[#FN_COUNT_FOR_COLS]=3 \{ .PRINT \*[BU3]\(dg\(dg \}
. if \\n[#FN_COUNT_FOR_COLS]=4 \{ .PRINT \*[BU3]*** \}
. if \\n[#FN_COUNT_FOR_COLS]=5 \{ .PRINT \*[BU3]\(dg\(dg\(dg \}
. if \\n[#FN_COUNT_FOR_COLS]=6 \{ .PRINT \*[BU3]**** \}
. if \\n[#FN_COUNT_FOR_COLS]=7 \{ .PRINT \*[BU3]\(dg\(dg\(dg\(dg \}
. if \\n[#FN_COUNT_FOR_COLS]=8 \{ .PRINT \*[BU3]***** \}
. if \\n[#FN_COUNT_FOR_COLS]=9 \{ .PRINT \*[BU3]\(dg\(dg\(dg\(dg\(dg \}
. \}
. el \{\
. if \\n[#FN_COUNT]=0 \{ .PRINT \*[BU3]* \}
. if \\n[#FN_COUNT]=1 \{ .PRINT \*[BU3]\(dg \}
. if \\n[#FN_COUNT]=2 \{ .PRINT \*[BU3]** \}
. if \\n[#FN_COUNT]=3 \{ .PRINT \*[BU3]\(dg\(dg \}
. if \\n[#FN_COUNT]=4 \{ .PRINT \*[BU3]*** \}
. if \\n[#FN_COUNT]=5 \{ .PRINT \*[BU3]\(dg\(dg\(dg \}
. if \\n[#FN_COUNT]=6 \{ .PRINT \*[BU3]**** \}
. if \\n[#FN_COUNT]=7 \{ .PRINT \*[BU3]\(dg\(dg\(dg\(dg \}
. if \\n[#FN_COUNT]=8 \{ .PRINT \*[BU3]***** \}
. if \\n[#FN_COUNT]=9 \{ .PRINT \*[BU3]\(dg\(dg\(dg\(dg\(dg\(dg \}
. \}
. \}
. if \\n[#FN_MARKER_STYLE]=2 \{\
. if \\n[#PRINT_STYLE]=1 \{ .PRINT "\s-2\v'-\\n[#DOC_LEAD]u/5u'\\n+[#FN_NUMBER]\v'+\\n[#DOC_LEAD]u/5u'\s+2" \}
. if \\n[#PRINT_STYLE]=2 \{ .PRINT "\*[SUP]\\n+[#FN_NUMBER]\*[SUPX]" \}
. \}
. \}
. \}
. nr #SPACE_REMAINING \\n[#PAGE_LENGTH]-\\n[#B_MARGIN]-(\\n(nl+1v)
. nr #PP_STYLE_PREV \\n[#PP_STYLE]
. nr #PP_STYLE 2
. if \\n[#INDENT_FIRST_PARAS] \{ .nr #INDENT_FIRSTS 1 \}
. INDENT_FIRST_PARAS
. ev FOOTNOTES
. ll \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if \\n[#COLUMNS] \{\
. ll \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. if \\n[#FN_R_INDENT] \{\
. ll -\\n[#FN_R_INDENT]u
. ta \\n(.lu
. \}
. if \\n[#FN_BR_INDENT] \{\
. ll -\\n[#FN_BR_INDENT]u
. ta \\n(.lu
. \}
. FAMILY \\*[$FN_FAM]
. FT \\*[$FN_FT]
. PT_SIZE \\n[#DOC_PT_SIZE]u\\*[$FN_SIZE_CHANGE]
. AUTOLEAD \\n[#FN_AUTOLEAD]
. QUAD \\*[$FN_QUAD]
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. ie \\n[#SINGLE_SPACE] \{ .vs \\n[#DOC_LEAD]u \}
. el \{ .vs \\n[#DOC_LEAD]u/2u \}
. QUAD LEFT
. HY OFF
. \}
. nr #FN_LEAD \\n[#LEAD]
. da FOOTNOTES
. if \\n[#EPIGRAPH] \{ .nr #FN_FOR_EPI 1 \}
. if \\n[#FN_DEFER_SPACE] \{\
. if \\n[#FN_MARKER_STYLE]=1 \{ .ALD 1v \}
. if \\n[#RESET_FN_NUMBER] \{ .ALD 1v \}
. rr #FN_DEFER_SPACE
. \}
. if \\n+[#FN_COUNT]=1 \{\
. if !\\n[#FN_DEPTH] \{\
. if \\n[#PRINT_STYLE]=1 \{ .ALD \\n[#DOC_LEAD]u \}
. ie \\n[#FN_RULE] \{ .PRINT_FOOTNOTE_RULE \}
. el \{ .ALD 1v \}
. \}
. \}
. if \\n[#FN_MARKERS] \{\
. if !\\n[#NO_FN_MARKER] \{\
. if \\n[#FN_MARKER_STYLE]=1 \{\
. ie \\n+[#FN_COUNT_FOR_COLS] \{\
. if \\n[#FN_COUNT_FOR_COLS]=1 \{ .PRINT *\c \}
. if \\n[#FN_COUNT_FOR_COLS]=2 \{ .PRINT \(dg\c \}
. if \\n[#FN_COUNT_FOR_COLS]=3 \{ .PRINT **\c \}
. if \\n[#FN_COUNT_FOR_COLS]=4 \{ .PRINT \(dg\(dg\c \}
. if \\n[#FN_COUNT_FOR_COLS]=5 \{ .PRINT ***\c \}
. if \\n[#FN_COUNT_FOR_COLS]=6 \{ .PRINT \(dg\(dg\(dg\c \}
. if \\n[#FN_COUNT_FOR_COLS]=7 \{ .PRINT ****\c \}
. if \\n[#FN_COUNT_FOR_COLS]=8 \{ .PRINT \(dg\(dg\(dg\(dg\c \}
. if \\n[#FN_COUNT_FOR_COLS]=9 \{ .PRINT *****\c \}
. if \\n[#FN_COUNT_FOR_COLS]=10 \{ .PRINT \(dg\(dg\(dg\(dg\(dg\c \}
. \}
. el \{\
. if \\n[#FN_COUNT]=1 \{ .PRINT *\c \}
. if \\n[#FN_COUNT]=2 \{ .PRINT \(dg\c \}
. if \\n[#FN_COUNT]=3 \{ .PRINT **\c \}
. if \\n[#FN_COUNT]=4 \{ .PRINT \(dg\(dg\c \}
. if \\n[#FN_COUNT]=5 \{ .PRINT ***\c \}
. if \\n[#FN_COUNT]=6 \{ .PRINT \(dg\(dg\(dg\c \}
. if \\n[#FN_COUNT]=7 \{ .PRINT ****\c \}
. if \\n[#FN_COUNT]=8 \{ .PRINT \(dg\(dg\(dg\(dg\c \}
. if \\n[#FN_COUNT]=9 \{ .PRINT *****\c \}
. if \\n[#FN_COUNT]=10 \{ .PRINT \(dg\(dg\(dg\(dg\(dg\c \}
. \}
. \}
. if \\n[#FN_MARKER_STYLE]=2 \{\
. if \\n[#PRINT_STYLE]=1 \{ .PRINT "(\\n[#FN_NUMBER])\c" \}
. if \\n[#PRINT_STYLE]=2 \{ .PRINT "\*[SUP]\\n[#FN_NUMBER]\*[SUPX]\c" \}
. \}
. \}
. \}
. \}
. el \{\
. ie '\\$1'INDENT' \{\
. ev FOOTNOTES
. if '\\$2'L' \{ .in (\\$3) \}
. if '\\$2'LEFT' \{ .in (\\$3) \}
. if '\\$2'R' \{ .nr #FN_R_INDENT (\\$3) \}
. if '\\$2'RIGHT' \{ .nr #FN_R_INDENT (\\$3) \}
. if '\\$2'B' \{\
. nr #FN_BL_INDENT (\\$3)
. ie '\\$4'' \{ .nr #FN_BR_INDENT \\n[#FN_BL_INDENT] \}
. el \{ .nr #FN_BR_INDENT (\\$4) \}
. in \\n[#FN_BL_INDENT]u
. \}
. if '\\$2'BOTH' \{\
. nr #FN_BL_INDENT (\\$3)
. ie '\\$4'' \{ .nr #FN_BR_INDENT \\n[#FN_BL_INDENT] \}
. el \{ .nr #FN_BR_INDENT (\\$4) \}
. in \\n[#FN_BL_INDENT]u
. \}
. ev
. FOOTNOTE
. \}
. el \{\
. br
. di
. in 0 \"Turn off indent possibly set by FOOTNOTE INDENT...
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_WAS_ON] \{\
. UNDERLINE
. rr #UNDERLINE_WAS_ON
. \}
. \}
. ev
. rr #FN_R_INDENT
. rr #FN_BR_INDENT
. nr #PP_STYLE \\n[#PP_STYLE_PREV]
. if !\\n[#INDENT_FIRSTS] \{ .INDENT_FIRST_PARAS OFF \}
. rr #INDENT_FIRSTS
. nr #FN_DEPTH +\\n[#DIVER_DEPTH]
. if \\n[#FN_DEFER] \{\
. nr #FN_DEFER_SPACE 1
. rr #FN_DEFER
. \}
. if \\n[#FN_DEPTH]>\\n[#SPACE_REMAINING] \{\
. ie \\n[#SPACE_REMAINING]<(\\n[#LEAD]*2) \{ .nr #FN_DEFER 1 \}
. el \{\
. nr #FN_LINES 0 1
. while (\\n+[#FN_LINES]*\\n[#FN_LEAD])<\\n[#SPACE_REMAINING] \{\
. nr #FN_DEPTH (\\n[#FN_LINES]*\\n[#FN_LEAD])
. \}
. \}
. \}
. nr #VARIABLE_FOOTER_POS -\\n[#DIVER_DEPTH]
. if \\n[#FN_COUNT]=1 \{ .nr #VARIABLE_FOOTER_POS -1v \}
. \}
. ch FOOTER \\n[#VARIABLE_FOOTER_POS]u
. if (\\n(nl+1v)>(\\n[#PAGE_LENGTH]+\\n[#VARIABLE_FOOTER_POS]) \{\
. ch FOOTER \\n(nlu+1v
. \}
. if \\n[#FN_DEFER] \{\
. nr #VARIABLE_FOOTER_POS 0-\\n[#B_MARGIN]u
. ch FOOTER \\n[#VARIABLE_FOOTER_POS]u
. \}
. \}
. nr #NO_FN_MARKER 0
.END
\#
\#
.MAC FN_OVERFLOW_TRAP END
. if \\n[#FN_COUNT] \{\
. di FN_OVERFLOW
. \}
.END
\#
\#
.MAC DIVERT_FN_LEFTOVER END
. nr #NO_FN_MARKER 1
. nr #OVERFLOW 1
. FOOTNOTE
. nf
. FN_OVERFLOW
. FOOTNOTE OFF
. rr #FN_OVERFLOW_DEPTH
.END
\#
\#
.MAC PROCESS_FN_LEFTOVER END
. if !\\n[#FN_DEFER] \{\
. nr #FN_COUNT 0 1
. nr #FN_DEPTH 0
. nr #VARIABLE_FOOTER_POS 0-\\n[#B_MARGIN]
. \}
. if \\n[#FN_DEFER] \{\
. nr #VARIABLE_FOOTER_POS -(\\n[#FN_DEPTH]+\\n[#DOC_LEAD])
. \}
. nr #SPACE_REMAINING 0
. ch FOOTER -\\n[#B_MARGIN]u
. if \\n[#FN_DEFER] \{\
. nr #NO_FN_MARKER 1
. da FOOTNOTES
. di
. FOOTNOTE
. nf
. FOOTNOTE OFF
. \}
. if !\\n[#FN_DEFER] \{\
. if \\n[#FN_OVERFLOW_DEPTH] \{\
. DIVERT_FN_LEFTOVER
. \}
. \}
. nr #FN_COUNT 0 1
.END
\#
\#
\# ====================================================================
\#
\# +++ENDNOTES+++
\#
\# When endnotes are output, the spacing between the notes is always 1
\# extra linespace. This can have bottom margin consequences. If this
\# doesn't bother you, don't worry about it. If it does bother you, and
\# you want to adjust the spacing between any two endnotes (as they're
\# output), make the spacing adjustments (.ALD/.RLD) at the *end* of
\# endnotes (i.e. just before .ENDNOTE OFF), not at the top.
\#
\# Endnotes must be output manually with .ENDNOTES. This allows user
\# the flexibility to output endnotes at the end of each collated
\# document, or to output them at the end of the entire document.
\#
\# ENDNOTE FAMILY
\# --------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $EN_FAM.
\# *Notes:
\# Default is same as running text in body of document.
\#
.MAC ENDNOTE_FAMILY END
. ds $EN_FAM \\$1
.END
\#
\#
\# ENDNOTE FONT
\# ------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $EN_FT.
\# *Notes:
\# Default is roman.
\#
.MAC ENDNOTE_FONT END
. ds $EN_FT \\$1
.END
\#
\#
\# ENDNOTE POINT SIZE
\# ------------------
\# *Argument:
\#
\# *Function:
\# Creates or modifies string $EN_STRING.
\# *Notes:
\# Default is "ENDNOTES"
\#
.MAC ENDNOTE_STRING END
. ds $EN_STRING \\$1
.END
\#
\#
\# ENDNOTE STRING FAMILY
\# ---------------------
\# *Argument:
\# <family to use for endnote string>
\# *Function:
\# Creates or modifies string $EN_STRING_FAM.
\# *Notes:
\# Default is same as running text in body of document.
\#
.MAC ENDNOTE_STRING_FAMILY END
. ds $EN_STRING_FAM \\$1
.END
\#
\#
\# ENDNOTE STRING FONT
\# -------------------
\# *Argument:
\# <font to use for endnote string>
\# *Function:
\# Creates or modifies string $EN_FT.
\# *Notes:
\# Default is BOLD for TYPEWRITE; roman for TYPESET
\#
.MAC ENDNOTE_STRING_FONT END
. ds $EN_STRING_FT \\$1
.END
\#
\#
\# ENDNOTE STRING SIZE
\# -------------------
\# *Argument:
\# <+|- number of points by which to in/decrease endnote string
\# (relative to base endnote size)>
\# *Function:
\# Creates or modifies string $EN_STRING_SIZE_CHANGE.
\# *Notes:
\# Default is +1 for TYPESET.
\#
.MAC ENDNOTE_STRING_SIZE END \"Default for TYPESET is +1
. ds $EN_STRING_SIZE_CHANGE \\$1
.END
\#
\#
\# ENDNOTE STRING QUAD
\# -------------------
\# *Argument:
\# LEFT | L | CENTER | C | RIGHT | R
\# *Function:
\# Creates or modifies string $EN_STRING_QUAD.
\# *Notes:
\# Default is centered.
\#
.MAC ENDNOTE_STRING_QUAD END
. ds $EN_STRING_QUAD \\$1
.END
\#
\#
\# ENDNOTE STRING UNDERSCORE
\# -------------------------
\# *Arguments:
\# toggle | 2
\# *Function:
\# Turns underscoring of endnote main title on or off. If the argument
\# is the digit "2", turns on double-underscoring.
\# *Notes:
\# Default is double-underscored.
\#
.MAC ENDNOTE_STRING_UNDERSCORE END
. ie '\\$1'' \{ .nr #EN_STRING_UNDERSCORE 1 \}
. el \{\
. ie '\\$1'2' \{ .nr #EN_STRING_UNDERSCORE 2 \}
. el \{ .rr #EN_STRING_UNDERSCORE \}
. \}
.END
\#
\#
\# ENDNOTE TITLE
\# -------------
\# *Argument:
\# <string that appears before the first endnote pertaining to any document>
\# *Function:
\# Creates string $EN_TITLE_STRING.
\# *Notes:
\# Default is the document title, or, if doc is a chapter, "Chapter #"
\#
.MAC ENDNOTE_TITLE END
. ds $EN_TITLE \\$1
.END
\#
\#
\# ENDNOTE TITLE FAMILY
\# --------------------
\# *Argument:
\# <family to use for endnote title>
\# *Function:
\# Creates string $EN_TITLE_FAM.
\# *Notes:
\# Default is same as running text of document.
\#
.MAC ENDNOTE_TITLE_FAMILY END
. ds $EN_TITLE_FAM \\$1
.END
\#
\#
\# ENDNOTE TITLE FONT
\# ------------------
\# *Argument:
\# <font to use for endnote title>
\# *Function:
\# Creates string $EN_TITLE_FT.
\# *Notes:
\# Default is bold for TYPESET; roman for TYPEWRITE.
\#
.MAC ENDNOTE_TITLE_FONT END
. ds $EN_TITLE_FT \\$1
.END
\#
\#
\# ENDNOTE TITLE SIZE
\# ------------------
\# *Argument:
\# <+|- number of points by which to in/decrease endnote title
\# (relative to base endnote size)>
\# *Function:
\# Creates string $EN_TITLE_SIZE_CHANGE.
\# *Notes:
\# Default is 0 (i.e. title same size as text of endnotes).
\#
.MAC ENDNOTE_TITLE_SIZE END
. ds $EN_TITLE_SIZE_CHANGE \\$1
.END
\#
\#
\# ENDNOTE TITLE QUAD
\# ------------------
\# *Argument:
\# <quad direction of endnote title>
\# *Function:
\# Creates string $EN_TITLE_QUAD.
\# *Notes:
\# Default is left.
\#
.MAC ENDNOTE_TITLE_QUAD END
. ds $EN_TITLE_QUAD \\$1
.END
\#
\#
\# ENDNOTE TITLE UNDERSCORE
\# ------------------------
\# *Argument:
\# toggle
\# *Function:
\# Creates or removes register #EN_TITLE_UNDERSCORE.
\# *Notes:
\# Default is to underscore the endnote titles.
\#
.MAC ENDNOTE_TITLE_UNDERSCORE END
. ie '\\$1'' \{ .nr #EN_TITLE_UNDERSCORE 1 \}
. el \{ .rr #EN_TITLE_UNDERSCORE \}
.END
\#
\#
\# ENDNOTE NUMBER FAMILY
\# ---------------------
\# *Argument:
\# <family to use for endnote numbers on endnotes page>
\# *Function:
\# Creates string $EN_NUMBER_FAM.
\# *Notes:
\# Default is same as running text of document.
\#
\# Family, font, and size of endnote numbers applies only to the
\# numbers as they appear on the endnotes page(s). The superscript
\# numbers that appear in running text are unaffected.
\#
.MAC ENDNOTE_NUMBER_FAMILY END
. ds $EN_NUMBER_FAM \\$1
.END
\#
\#
\# ENDNOTE NUMBER FONT
\# -------------------
\# *Argument:
\# <font to use for endnote numbers on endnotes page>
\# *Function:
\# Creates string $EN_NUMBER_FT.
\# *Notes:
\# Default is bold for TYPESET; roman for TYPEWRITE.
\#
\# Family, font, and size of endnote numbers applies only to the
\# numbers as they appear on the endnotes page(s). The superscript
\# numbers that appear in running text are unaffected.
\#
.MAC ENDNOTE_NUMBER_FONT END \"Default for TYPESET is bold
. ds $EN_NUMBER_FT \\$1
.END
\#
\#
\# ENDNOTE NUMBER SIZE
\# -------------------
\# *Argument:
\# <+|- number of points by which to in/decrease endnote numbers
\# (relative to base endnote size)>
\# *Function:
\# Creates string $EN_NUMBER_SIZE_CHANGE.
\# *Notes:
\# Default is 0.
\#
\# Family, font, and size of endnote numbers applies only to the
\# numbers as they appear on the endnotes page(s). The superscript
\# numbers that appear in running text are unaffected.
\#
.MAC ENDNOTE_NUMBER_SIZE END \"Default for TYPESET is 0
. ds $EN_NUMBER_SIZE_CHANGE \\$1
.END
\#
\#
\# ENDNOTE NUMBERS ALIGN RIGHT
\# ---------------------------
\# *Argument:
\# <max. number of digit placeholders that will appear in endnotes>
\# *Function:
\# Toggles register #EN_NUMBERS_ALIGN_RIGHT on; creates register
\# #EN_NUMBER_PLACEHOLDERS.
\# *Notes:
\# Default is for footnote numbers to be right aligned to 2 placeholders.
\#
.MAC ENDNOTE_NUMBERS_ALIGN_RIGHT END
. rr #EN_NUMBERS_ALIGN_LEFT
. nr #EN_NUMBERS_ALIGN_RIGHT 1
. nr #EN_NUMBER_PLACEHOLDERS \\$1
.END
\#
\#
\# ENDNOTE NUMBERS ALIGN LEFT
\# --------------------------
\# *Argument:
\# none
\# *Function:
\# Toggles register #EN_NUMBERS_ALIGN_LEFT on.
\# *Notes:
\# Default is for footnote numbers to be right aligned to 2 placeholders
\# (i.e. not left aligned).
\#
.MAC ENDNOTE_NUMBERS_ALIGN_LEFT END
. rr #EN_NUMBERS_ALIGN_RIGHT
. nr #EN_NUMBERS_ALIGN_LEFT 1
.END
\#
\#
\# ENDNOTE PARAGRAPH INDENT
\# ------------------------
\# *Argument:
\# <first line indent of paras subsequent to 1st in endnotes>
\# *Function:
\# Creates register #EN_PP_INDENT for use in .PP.
\# *Notes:
\# Requires a unit of measure.
\#
\# Default is 1.5m for TYPESET; same indent as PARA_INDENT for TYPEWRITE.
\#
.MAC ENDNOTE_PARA_INDENT END
. nr #EN_PP_INDENT (\\$1)
.END
\#
\#
\# ENDNOTE PARAGRAPH SPACE
\# -----------------------
\# *Argument:
\# toggle
\# *Function:
\# Creates toggle register #EN_PP_SPACE for use in .PP.
\# *Notes:
\# Like PARA_SPACE. Default is not to space endnote paras.
\#
.MAC ENDNOTE_PARA_SPACE END
. ie '\\$1'' \{ .nr #EN_PP_SPACE 1 \}
. el \{ .rr #EN_PP_SPACE \}
.END
\#
\#
\# ENDNOTE
\# -------
\# *Argument:
\# toggle
\# *Function:
\# Places superscript endnote number in text, then collects and
\# processes endnote in diversion END_NOTES.
\# *Notes:
\# \c must be appended to the word immediately preceding .ENDNOTE.
\#
.MAC ENDNOTE END
. ie '\\$1'' \{\
. nr #ENDNOTE 1
. if \\n[#CONDENSE] \{ \*[CONDX]\c \}
. if \\n[#EXTEND] \{ \*[EXTX]\c \}
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_ON] \{\
. nr #UNDERLINE_WAS_ON 1
. UNDERLINE OFF
. \}
. if \\n[#SLANT_ON] \{\
. nr #SLANT_WAS_ON 1
\*[SLANTX]\c
. \}
. PRINT "\s-2\v'-\\n[#DOC_LEAD]u/5u'\\n+[#EN_NUMBER]\v'+\\n[#DOC_LEAD]u/5u'\s+2"
. \}
. if \\n[#PRINT_STYLE]=2 \{ .PRINT "\*[SUP]\\n+[#EN_NUMBER]\*[SUPX]" \}
. nr #RESTORE_DOC_LEAD \\n[#DOC_LEAD]
. nr #PP_STYLE_PREV \\n[#PP_STYLE]
. nr #PP_STYLE 1
. if \\n[#INDENT_FIRST_PARAS] \{ .nr #INDENT_FIRSTS 1 \}
. INDENT_FIRST_PARAS
. ev EN
. da END_NOTES
. nr #NO_TRAP_RESET 1
. if \\n[#PRINT_STYLE]=2 \{ .DOC_LEAD \\n[#EN_LEAD]u ADJUST \}
. rr #NO_TRAP_RESET
. vs \\n[#DOC_LEAD]u
. LL \\n[#DOC_L_LENGTH]u
. ta \\n(.lu
. if \\n[#COLUMNS] \{\
. LL \\n[#COL_L_LENGTH]u
. ta \\n(.lu
. \}
. if \\n[#EN_NUMBER]=1 \{\
\!. ne 3
. if !'\\*[$EN_STRING]'' \{ .sp \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EN_TITLE_FAM]
. FT \\*[$EN_TITLE_FT]
. PT_SIZE \\n[#EN_PS]u\\*[$EN_TITLE_SIZE_CHANGE]
. \}
. if !'\\*[$EN_TITLE]'' \{\
. if '\\*[$EN_TITLE_QUAD]'L' \{ .LEFT \}
. if '\\*[$EN_TITLE_QUAD]'LEFT' \{ .LEFT \}
. if '\\*[$EN_TITLE_QUAD]'C' \{ .CENTER \}
. if '\\*[$EN_TITLE_QUAD]'CENTER' \{ .CENTER \}
. if '\\*[$EN_TITLE_QUAD]'CENTRE' \{ .CENTER \}
. if '\\*[$EN_TITLE_QUAD]'R' \{ .RIGHT \}
. if '\\*[$EN_TITLE_QUAD]'RIGHT' \{ .RIGHT \}
. ie \\n[#EN_TITLE_UNDERSCORE] \{\
. UNDERSCORE "\\*[$EN_TITLE]
. \}
. el \{\
. PRINT "\\*[$EN_TITLE]
. \}
. \}
. \}
. ie \\n[#EN_NUMBERS_ALIGN_RIGHT] \{\
. ie \\n[#EN_NUMBER]=1 \{\
. if !'\\*[$EN_TITLE]'' \{ .sp \}
. \}
. el \{ .sp \}
\!. TRAP OFF
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EN_NUMBER_FAM]
. FT \\*[$EN_NUMBER_FT]
. PT_SIZE \\n[#EN_PS]u\\*[$EN_NUMBER_SIZE_CHANGE]
. \}
. nr #RESET_L_LENGTH \\n(.l
. nr #EN_NUMBER_L_LENGTH \w'\0'*\\n[#EN_NUMBER_PLACEHOLDERS]+\w'.'
. ll \\n[#EN_NUMBER_L_LENGTH]u
. RIGHT
\En[#EN_NUMBER].
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EN_FAM]
. FT \\*[$EN_FT]
. PT_SIZE \\n[#EN_PS]u
. \}
. EL
. ll \\n[#RESET_L_LENGTH]u
. in \\n[#EN_NUMBER_L_LENGTH]u+\w'.\0'u
. nr #EN_TEXT_INDENT \\n(.i
. QUAD \\*[$EN_QUAD]
\!. TRAP
. \}
. el \{\
. ie \\n[#EN_NUMBER]=1 \{\
. if !'\\*[$EN_TITLE]'' \{ .sp \}
. \}
. el \{ .sp \}
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EN_NUMBER_FAM]
. FT \\*[$EN_NUMBER_FT]
. PT_SIZE \\n[#EN_PS]u\\*[$EN_NUMBER_SIZE_CHANGE]
. \}
. QUAD \\*[$EN_QUAD]
\En[#EN_NUMBER].\0\c
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EN_FAM]
. FT \\*[$EN_FT]
. PT_SIZE \\n[#EN_PS]u
. \}
. \}
. \}
. el \{\
. br
. if \\n[#EN_NUMBERS_ALIGN_RIGHT] \{\
. in 0
. \}
. di
. DOC_LEAD \\n[#RESTORE_DOC_LEAD]u
. nr #PP_STYLE \\n[#PP_STYLE_PREV]
. if !\\n[#INDENT_FIRSTS] \{ .INDENT_FIRST_PARAS OFF \}
. rr #INDENT_FIRSTS
. rr #ENDNOTE
. ev
. if \\n[#PRINT_STYLE]=1 \{\
. if \\n[#UNDERLINE_WAS_ON] \{\
. rr #UNDERLINE_WAS_ON
. UNDERLINE
. \}
. \}
. if \\n[#SLANT_WAS_ON] \{\
. rr #SLANT_WAS_ON
\*[SLANT]\c
. \}
. \}
.END
\#
\#
\# ENDNOTES
\# --------
\# *Arguments:
\# none
\# *Function:
\# Sets new document leading from #EN_LEAD, breaks to a new page,
\# sets up an endnotes page based on registers and strings associated
\# with endnotes, then outputs diversion END_NOTES.
\#
.MAC ENDNOTES END
. if \\n[#DOC_TYPE]=2 \{\
. ie \\n[#EN_HDRFTR_CENTER]=1 \{ . \}
. el \{ .HDRFTR_CENTER \}
. \}
. NEWPAGE
. nr #RESTORE_DOC_LEAD \\n[#DOC_LEAD]
. if \\n[#PRINT_STYLE]=2 \{ .DOC_LEAD \\n[#EN_LEAD]u ADJUST \}
. if \\n[#SLANT_ON] \{\
\*[SLANTX]\c
. \}
. if !'\\*[$EN_STRING]'' \{\
. if \\n[#PRINT_STYLE]=1 \{\
. fam C
. ft R
. ps 12
. \}
. if \\n[#PRINT_STYLE]=2 \{\
. FAMILY \\*[$EN_STRING_FAM]
. FT \\*[$EN_STRING_FT]
. PT_SIZE \\n[#EN_PS]u\\*[$EN_STRING_SIZE_CHANGE]
. \}
. if '\\*[$EN_STRING_QUAD]'L' \{ .LEFT \}
. if '\\*[$EN_STRING_QUAD]'LEFT' \{ .LEFT \}
. if '\\*[$EN_STRING_QUAD]'C' \{ .CENTER \}
. if '\\*[$EN_STRING_QUAD]'CENTER' \{ .CENTER \}
. if '\\*[$EN_STRING_QUAD]'CENTRE' \{ .CENTER \}
. if '\\*[$EN_STRING_QUAD]'R' \{ .RIGHT \}
. if '\\*[$EN_STRING_QUAD]'RIGHT' \{ .RIGHT \}
. EL
. ie \\n[#EN_STRING_UNDERSCORE] \{\
. ie \\n[#EN_STRING_UNDERSCORE]=2 \{\
. UNDERSCORE2 "\\*[$EN_STRING]
. \}
. el \{\
. UNDERSCORE "\\*[$EN_STRING]
. \}
. \}
. el \{\
. PRINT "\\*[$EN_STRING]
. \}
. \}
. ev EN
. nf
. vs \\n[#DOC_LEAD]u
. END_NOTES
. br
. ev
. rm END_NOTES
. DOC_LEAD \\n[#RESTORE_DOC_LEAD]u
.END
\#
\# ====================================================================
\#
\# +++COLUMNS+++
\#
\# COLUMNS
\# -------
\# *Arguments:
\# <number of columns> <width of gutters>
\# *Function:
\# Creates registers associated with setting docs in columns.
\# Calculates column line lengths and offsets
\# *Notes:
\# COLUMNS, if used, s/b the last macro invoked before START.
\#
.MAC COLUMNS END
. if \\n[#IGNORE_COLUMNS]=1 \{ .return \}
. nr #COLUMNS 1
. nr #NUM_COLS \\$1
. nr #GUTTER (\\$2)
. nr #COL_L_LENGTH \\n[#L_LENGTH]-(\\n[#GUTTER]*(\\n[#NUM_COLS]-1))/\\n[#NUM_COLS]
. nr #COL_TOTAL 0 \\n[#COL_L_LENGTH]+\\n[#GUTTER]
. nr #COL_NUM 0 1
. while !\\n[#COL_NUM]=\\n[#NUM_COLS] \{\
. nr #COL_\\n+[#COL_NUM]_L_MARGIN \\n[#L_MARGIN]+\\n[#COL_TOTAL]
. nr #COL_TOTAL \\n+[#COL_TOTAL]
. \}
. rr #COL_TOTAL
. rr #COL_NUM
.END
\#
\#
\# NEXT COLUMN
\# -----------
\# *Arguments:
\# <none>
\# *Function:
\# Breaks current column and moves to next column.
\# If current column is the last on the page, breaks
\# to a new page.
\#
.MAC COL_NEXT END
. if \\n[#COLUMNS] \{\
. nr #COL_NEXT 1
. ie '\\$0'COL_NEXT' \{ .br \}
. el \{\
. brp
. RLD 1v
. \}
. ie \\n[#COL_NUM]=\\n[#NUM_COLS] \{\
. bp
. \}
. el \{ .FOOTER \}
. \}
.END
\#
\# ====================================================================
\#
\# +++DOCUMENT PROCESSING MISC AND SUPPORT MACROS+++
\#
\# COLLATE
\# -------
\# *Arguments:
\# <none>
\# *Function:
\# Turns headers off (if on) and saves header state, sets register
\# #COLLATE to 1 (toggle), and breaks to a new page.
\# *Notes:
\# COLLATE exists primarily to allow putting multiple chapters in
\# a single file, although it can be used for any document type. After
\# COLLATE, any of the macros that normally precede START may be
\# used, and should behave as expected.
\#
\# N.B.--the START macro *must* be used after COLLATE (and any other
\# macros that alter mom's behaviour).
\#
.MAC COLLATE END
. nr #COLLATE 1
. nr #HEADER_STATE \\n[#HEADERS_ON]
. HEADERS OFF
. if \\n[#PAGE_NUM_V_POS]=1 \{\
. nr #PAGINATION_STATE \\n[#PAGINATE]
. PAGINATION OFF
. \}
. IQ CLEAR
. TQ
. LL \\n[#DOC_L_LENGTH]u
. QUAD $DOC_QUAD
. LS \\n[#DOC_LEAD]u
\*[SLANTX]
\*[CONDX]
\*[EXTX]
' NEWPAGE
. rr #PAGENUM_STYLE_SET
. rm $EN_TITLE
.END
\#
\#
\# SET TRAPS FOR HEADERS/FOOTERS/FOOTNOTES
\# ---------------------------------------
\# *Arguments:
\# <none>
\# *Function:
\# Sets header/footer/footnotes/etc... traps.
\# Calculates the number of lines that actually fit on a
\# page based on #B_MARGIN and resets page bottom trap to coincide
\# with the depth of that number of lines , or, if #ADJ_DOC_LEAD=1,
\# adjusts #DOC_LEAD so that the last line of text on a page falls
\# exactly on #B_MARGIN.
\#
.MAC TRAPS END
\# *Remove all header/footer traps
. if !\\n[#NO_TRAP_RESET] \{\
. ch DO_T_MARGIN
. ch DO_B_MARGIN
. ch HEADER
. ch FOOTER
\# *Plant header trap
. wh 0 HEADER
. \}
\# *Adjust lead so last line of text falls on B_MARGIN,...
. ie \\n[#ADJ_DOC_LEAD] \{\
. nr #LINES_PER_PAGE 0 1
. nr #DOC_LEAD_ADJ 0 1
. nr #DEPTH_TO_B_MARGIN \\n[#PAGE_LENGTH]-\\n[#B_MARGIN]-1v
. while \\n[#T_MARGIN]+(\\n[#DOC_LEAD]*\\n+[#LINES_PER_PAGE])<\\n[#DEPTH_TO_B_MARGIN] \{ . \}
. nr #LINES_PER_PAGE -1
. while \\n[#T_MARGIN]+(\\n[#DOC_LEAD]+\\n+[#DOC_LEAD_ADJ]*\\n[#LINES_PER_PAGE])<\\n[#DEPTH_TO_B_MARGIN] \{ . \}
. DOC_LEAD \\n[#DOC_LEAD]u+\\n[#DOC_LEAD_ADJ]u
. \}
\# *...or calculate new B_MARGIN based on # of lines (at #DOC_LEAD) that fit
\# *on the page.
. el \{\
. nr #LINES_PER_PAGE 0 1
. nr #DEPTH_TO_B_MARGIN \\n[#PAGE_LENGTH]-\\n[#B_MARGIN]-1v
. while \\n[#T_MARGIN]+(\\n[#DOC_LEAD]*\\n+[#LINES_PER_PAGE])<\\n[#DEPTH_TO_B_MARGIN] \{ . \}
. nr #B_MARGIN \\n[#PAGE_LENGTH]-(\\n[#T_MARGIN]+(\\n[#DOC_LEAD]*\\n[#LINES_PER_PAGE]))
. \}
\# *Set footer and footnote overflow traps
. if !\\n[#NO_TRAP_RESET] \{\
. nr #FN_COUNT 0 1
. nr #SPACE_REMAINING 0
. nr #FN_DEPTH 0
. nr #VARIABLE_FOOTER_POS 0-\\n[#B_MARGIN]u
. wh 12i FOOTER
. wh -\\n[#B_MARGIN]u FN_OVERFLOW_TRAP
. ch FOOTER -\\n[#B_MARGIN]u
. \}
.END
\#
\#
\# CHECK INDENT
\# ------------
\# *Arguments:
\# <none>
\# *Function:
\# Adds left, right, or both indent values to document elements
\# like heads and subheads that are processed in environments.
\#
.MAC CHECK_INDENT END
. if \\n[#INDENT_LEFT_ACTIVE] \{\
. in \\n[#L_INDENT]u
. if \\n[#QUOTE] \{\
. in -\\n[#L_INDENT]u \"Because you added an indent in 2nd line of macro
. ll -\\n[#L_INDENT]u
. ta \\n(.lu
. \}
. if \\n[#EPIGRAPH] \{\
. in -\\n[#L_INDENT]u
. ll -\\n[#L_INDENT]u
. ta \\n(.lu
. \}
. \}
. if \\n[#INDENT_RIGHT_ACTIVE] \{\
. ll -\\n[#R_INDENT]u
. ta \\n(.lu
. \}
. if \\n[#INDENT_BOTH_ACTIVE] \{\
. in \\n[#BL_INDENT]u
. ll -\\n[#BR_INDENT]u
. ta \\n(.lu
. if \\n[#QUOTE] \{\
. in -\\n[#BL_INDENT]u
. ie \\n[#BR_INDENT]=\\n[#BL_INDENT] \{\
. ll -\\n[#BR_INDENT]u
. ta \\n(.lu
. \}
. el \{\
. ll -(\\n[#BR_INDENT]u/2u)
. ta \\n(.lu
. \}
. \}
. if \\n[#EPIGRAPH] \{\
. in -\\n[#BL_INDENT]u
. ie \\n[#BR_INDENT]=\\n[#BL_INDENT] \{\
. ll -\\n[#BR_INDENT]u
. ta \\n(.lu
. \}
. el \{\
. ll -(\\n[#BR_INDENT]u/2u)
. ta \\n(.lu
. \}
. \}
. \}
.END
\#
\#
\# REMOVE INDENT
\# -------------
\# *Arguments:
\# <none>
\# *Function:
\# Removes left, right, or both indent values from document elements
\# like heads and subheads that are processed in environments.
\#
.MAC REMOVE_INDENT END
. in 0
. ll \\n[#L_LENGTH]u
. ta \\n(.lu
.END
\#
\#
\#
\#
\# ====================================================================
\#
\# +++DOCUMENT PROCESSING ALIASES+++
\#
\# Aliases to make life easier for users: synonyms, short forms
\# and alternate spellings.
\#
\# Macros
\# ------
.ALIAS BREAK_BLOCKQUOTE BREAK_QUOTE
.ALIAS BREAK_CITATION BREAK_QUOTE
.ALIAS BREAK_CITE BREAK_QUOTE
.ALIAS CITATION BLOCKQUOTE
.ALIAS CITE BLOCKQUOTE
.ALIAS DOC_R_MARGIN DOC_RIGHT_MARGIN
.ALIAS DOC_L_MARGIN DOC_LEFT_MARGIN
.ALIAS DOC_L_LENGTH DOC_LINE_LENGTH
.ALIAS DOC_RMARGIN DOC_RIGHT_MARGIN
.ALIAS DOC_LMARGIN DOC_LEFT_MARGIN
.ALIAS DOC_LLENGTH DOC_LINE_LENGTH
.ALIAS DOC_FAM DOC_FAMILY
.ALIAS FILL QUAD
.ALIAS PP_FT PP_FONT
.ALIAS DOC_PS DOC_PT_SIZE
.ALIAS DOC_LS DOC_LEAD
.ALIAS PAGENUM PAGENUMBER
.ALIAS PAGINATION PAGINATE
\#
\# HEADER and FOOTER aliases for HDRFTR macros.
\#
.ALIAS ENDNOTES_HEADER_CENTER ENDNOTES_HDRFTR_CENTER
.ALIAS HEADER_FAMILY HDRFTR_FAMILY
.ALIAS HEADER_FAM HDRFTR_FAMILY
.ALIAS HEADER_SIZE HDRFTR_SIZE
.ALIAS HEADER_PLAIN HDRFTR_PLAIN
.ALIAS HEADER_RULE_GAP HDRFTR_RULE_GAP
.ALIAS HEADER_RULE HDRFTR_RULE
.ALIAS HEADER_LEFT HDRFTR_LEFT
.ALIAS HEADER_LEFT_FAMILY HDRFTR_LEFT_FAMILY
.ALIAS HEADER_LEFT_FAM HDRFTR_LEFT_FAMILY
.ALIAS HEADER_LEFT_FONT HDRFTR_LEFT_FONT
.ALIAS HEADER_LEFT_FT HDRFTR_LEFT_FONT
.ALIAS HEADER_LEFT_SIZE HDRFTR_LEFT_SIZE
.ALIAS HEADER_LEFT_PS HDRFTR_LEFT_SIZE
.ALIAS HEADER_LEFT_CAPS HDRFTR_LEFT_CAPS
.ALIAS HEADER_CENTER HDRFTR_CENTER
.ALIAS HEADER_CENTRE HDRFTR_CENTER
.ALIAS HEADER_CENTER_FAMILY HDRFTR_CENTER_FAMILY
.ALIAS HEADER_CENTRE_FAMILY HDRFTR_CENTER_FAMILY
.ALIAS HEADER_CENTER_FAM HDRFTR_CENTER_FAMILY
.ALIAS HEADER_CENTRE_FAM HDRFTR_CENTER_FAMILY
.ALIAS HEADER_CENTER_FONT HDRFTR_CENTER_FONT
.ALIAS HEADER_CENTRE_FONT HDRFTR_CENTER_FONT
.ALIAS HEADER_CENTER_FT HDRFTR_CENTER_FONT
.ALIAS HEADER_CENTRE_FT HDRFTR_CENTER_FONT
.ALIAS HEADER_CENTER_SIZE HDRFTR_CENTER_SIZE
.ALIAS HEADER_CENTRE_SIZE HDRFTR_CENTER_SIZE
.ALIAS HEADER_CENTER_PS HDRFTR_CENTER_SIZE
.ALIAS HEADER_CENTRE_PS HDRFTR_CENTER_SIZE
.ALIAS HEADER_CENTER_CAPS HDRFTR_CENTER_CAPS
.ALIAS HEADER_CENTRE_CAPS HDRFTR_CENTER_CAPS
.ALIAS HEADER_RIGHT HDRFTR_RIGHT
.ALIAS HEADER_RIGHT_FAMILY HDRFTR_RIGHT_FAMILY
.ALIAS HEADER_RIGHT_FAM HDRFTR_RIGHT_FAMILY
.ALIAS HEADER_RIGHT_FONT HDRFTR_RIGHT_FONT
.ALIAS HEADER_RIGHT_FT HDRFTR_RIGHT_FONT
.ALIAS HEADER_RIGHT_SIZE HDRFTR_RIGHT_SIZE
.ALIAS HEADER_RIGHT_PS HDRFTR_RIGHT_SIZE
.ALIAS HEADER_RIGHT_CAPS HDRFTR_RIGHT_CAPS
.ALIAS HEADER_RECTO HDRFTR_RECTO
.ALIAS HEADER_VERSO HDRFTR_VERSO
.ALIAS ENDNOTES_FOOTER_CENTER ENDNOTES_HDRFTR_CENTER
.ALIAS FOOTER_FAMILY HDRFTR_FAMILY
.ALIAS FOOTER_FAM HDRFTR_FAMILY
.ALIAS FOOTER_SIZE HDRFTR_SIZE
.ALIAS FOOTER_PLAIN HDRFTR_PLAIN
.ALIAS FOOTER_RULE_GAP HDRFTR_RULE_GAP
.ALIAS FOOTER_RULE HDRFTR_RULE
.ALIAS FOOTER_LEFT HDRFTR_LEFT
.ALIAS FOOTER_LEFT_FAMILY HDRFTR_LEFT_FAMILY
.ALIAS FOOTER_LEFT_FAM HDRFTR_LEFT_FAMILY
.ALIAS FOOTER_LEFT_FONT HDRFTR_LEFT_FONT
.ALIAS FOOTER_LEFT_FT HDRFTR_LEFT_FONT
.ALIAS FOOTER_LEFT_SIZE HDRFTR_LEFT_SIZE
.ALIAS FOOTER_LEFT_PS HDRFTR_LEFT_SIZE
.ALIAS FOOTER_LEFT_CAPS HDRFTR_LEFT_CAPS
.ALIAS FOOTER_CENTER HDRFTR_CENTER
.ALIAS FOOTER_CENTRE HDRFTR_CENTER
.ALIAS FOOTER_CENTER_FAMILY HDRFTR_CENTER_FAMILY
.ALIAS FOOTER_CENTRE_FAMILY HDRFTR_CENTER_FAMILY
.ALIAS FOOTER_CENTER_FAM HDRFTR_CENTER_FAMILY
.ALIAS FOOTER_CENTRE_FAM HDRFTR_CENTER_FAMILY
.ALIAS FOOTER_CENTER_FONT HDRFTR_CENTER_FONT
.ALIAS FOOTER_CENTRE_FONT HDRFTR_CENTER_FONT
.ALIAS FOOTER_CENTER_FT HDRFTR_CENTER_FONT
.ALIAS FOOTER_CENTRE_FT HDRFTR_CENTER_FONT
.ALIAS FOOTER_CENTER_SIZE HDRFTR_CENTER_SIZE
.ALIAS FOOTER_CENTRE_SIZE HDRFTR_CENTER_SIZE
.ALIAS FOOTER_CENTER_PS HDRFTR_CENTER_SIZE
.ALIAS FOOTER_CENTRE_PS HDRFTR_CENTER_SIZE
.ALIAS FOOTER_CENTER_CAPS HDRFTR_CENTER_CAPS
.ALIAS FOOTER_CENTRE_CAPS HDRFTR_CENTER_CAPS
.ALIAS FOOTER_RIGHT HDRFTR_RIGHT
.ALIAS FOOTER_RIGHT_FAMILY HDRFTR_RIGHT_FAMILY
.ALIAS FOOTER_RIGHT_FAM HDRFTR_RIGHT_FAMILY
.ALIAS FOOTER_RIGHT_FONT HDRFTR_RIGHT_FONT
.ALIAS FOOTER_RIGHT_FT HDRFTR_RIGHT_FONT
.ALIAS FOOTER_RIGHT_SIZE HDRFTR_RIGHT_SIZE
.ALIAS FOOTER_RIGHT_PS HDRFTR_RIGHT_SIZE
.ALIAS FOOTER_RIGHT_CAPS HDRFTR_RIGHT_CAPS
.ALIAS FOOTER_RECTO HDRFTR_RECTO
.ALIAS FOOTER_VERSO HDRFTR_VERSO
.ALIAS SWITCH_HEADERS SWITCH_HDRFTR
.ALIAS SWITCH_FOOTERS SWITCH_HDRFTR
\#
\# SUPPORT ALIASES
\#
.ALIAS COL_BREAK COL_NEXT
.ALIAS PRINT_FOOTNOTE_RULE FOOTNOTE_RULE
1.18.1.4/tmac/latin1.tmac 0000666 00000005400 15047753021 0010425 0 ustar 00 .\" latin1.tmac
.\"
.nr _C \n(.C
.cp 0
.de latin1-tr
. if c\\$2 .if !c\\$1 .trin \\$1\\$2
..
.
.latin1-tr \[char161] \[r!]
.latin1-tr \[char162] \[ct]
.latin1-tr \[char163] \[Po]
.latin1-tr \[char164] \[Cs]
.latin1-tr \[char165] \[Ye]
.latin1-tr \[char166] \[bb]
.latin1-tr \[char167] \[sc]
.latin1-tr \[char168] \[ad]
.latin1-tr \[char169] \[co]
.latin1-tr \[char170] \[Of]
.latin1-tr \[char171] \[Fo]
.latin1-tr \[char172] \[no]
.\" The soft-hyphen character is only an input character
.tr \[char173]\%
.latin1-tr \[char174] \[rg]
.latin1-tr \[char175] \[a-]
.latin1-tr \[char176] \[de]
.latin1-tr \[char177] \[t+-]
.latin1-tr \[char178] \[S2]
.latin1-tr \[char179] \[S3]
.latin1-tr \[char180] \[aa]
.latin1-tr \[char181] \[mc]
.latin1-tr \[char182] \[ps]
.latin1-tr \[char183] \[pc]
.latin1-tr \[char184] \[ac]
.latin1-tr \[char185] \[S1]
.latin1-tr \[char186] \[Om]
.latin1-tr \[char187] \[Fc]
.latin1-tr \[char188] \[14]
.latin1-tr \[char189] \[12]
.latin1-tr \[char190] \[34]
.latin1-tr \[char191] \[r?]
.latin1-tr \[char192] \[`A]
.latin1-tr \[char193] \['A]
.latin1-tr \[char194] \[^A]
.latin1-tr \[char195] \[~A]
.latin1-tr \[char196] \[:A]
.latin1-tr \[char197] \[oA]
.latin1-tr \[char198] \[AE]
.latin1-tr \[char199] \[,C]
.latin1-tr \[char200] \[`E]
.latin1-tr \[char201] \['E]
.latin1-tr \[char202] \[^E]
.latin1-tr \[char203] \[:E]
.latin1-tr \[char204] \[`I]
.latin1-tr \[char205] \['I]
.latin1-tr \[char206] \[^I]
.latin1-tr \[char207] \[:I]
.latin1-tr \[char208] \[-D]
.latin1-tr \[char209] \[~N]
.latin1-tr \[char210] \[`O]
.latin1-tr \[char211] \['O]
.latin1-tr \[char212] \[^O]
.latin1-tr \[char213] \[~O]
.latin1-tr \[char214] \[:O]
.latin1-tr \[char215] \[tmu]
.latin1-tr \[char216] \[/O]
.latin1-tr \[char217] \[`U]
.latin1-tr \[char218] \['U]
.latin1-tr \[char219] \[^U]
.latin1-tr \[char220] \[:U]
.latin1-tr \[char221] \['Y]
.latin1-tr \[char222] \[TP]
.latin1-tr \[char223] \[ss]
.latin1-tr \[char224] \[`a]
.latin1-tr \[char225] \['a]
.latin1-tr \[char226] \[^a]
.latin1-tr \[char227] \[~a]
.latin1-tr \[char228] \[:a]
.latin1-tr \[char229] \[oa]
.latin1-tr \[char230] \[ae]
.latin1-tr \[char231] \[,c]
.latin1-tr \[char232] \[`e]
.latin1-tr \[char233] \['e]
.latin1-tr \[char234] \[^e]
.latin1-tr \[char235] \[:e]
.latin1-tr \[char236] \[`i]
.latin1-tr \[char237] \['i]
.latin1-tr \[char238] \[^i]
.latin1-tr \[char239] \[:i]
.latin1-tr \[char240] \[Sd]
.latin1-tr \[char241] \[~n]
.latin1-tr \[char242] \[`o]
.latin1-tr \[char243] \['o]
.latin1-tr \[char244] \[^o]
.latin1-tr \[char245] \[~o]
.latin1-tr \[char246] \[:o]
.latin1-tr \[char247] \[tdi]
.latin1-tr \[char248] \[/o]
.latin1-tr \[char249] \[`u]
.latin1-tr \[char250] \['u]
.latin1-tr \[char251] \[^u]
.latin1-tr \[char252] \[:u]
.latin1-tr \[char253] \['y]
.latin1-tr \[char254] \[Tp]
.latin1-tr \[char255] \[:y]
.cp \n[_C]
1.18.1.4/tmac/doc-old.tmac 0000666 00000107125 15047753021 0010565 0 ustar 00 .\"
.\" Copyright (c) 1990 The Regents of the University of California.
.\" All rights reserved.
.\"
.\" Redistribution and use in source and binary forms, with or without
.\" modification, are permitted provided that the following conditions
.\" are met:
.\" 1. Redistributions of source code must retain the above copyright
.\" notice, this list of conditions and the following disclaimer.
.\" 2. Redistributions in binary form must reproduce the above copyright
.\" notice, this list of conditions and the following disclaimer in the
.\" documentation and/or other materials provided with the distribution.
.\" 3. All advertising materials mentioning features or use of this software
.\" must display the following acknowledgement:
.\" This product includes software developed by the University of
.\" California, Berkeley and its contributors.
.\" 4. Neither the name of the University nor the names of its contributors
.\" may be used to endorse or promote products derived from this software
.\" without specific prior written permission.
.\"
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
.\" SUCH DAMAGE.
.\"
.\" @(#)doc-old.tmac 5.2 (Berkeley) 3/13/91
.\" Slightly modified by jjc@jclark.com to work with groff as well.
.\"
.\" Assume nroff on crt's only if cR==1
.if n .nr cR 1
.\" STRING CONSTANTS
.\" DITROFF
.if t \{\
.\" Address Style
.ds aD \fI
.\" Argument Reference Style
.ds aR \f(CO
.\" Interactive Comand Modifier (flag)
.ds cM \f(CB
.\" Emphasis (in the English sense - usually italics)
.ds eM \fI
.\" Errno Style
.ds eR \fC
.\" Environment Variable Style
.ds eV \fC
.\" Command Line Flag Style
.ds fL \f(CB
.\" Header String Style
.ds Hs \fR
.\" Interactive Command Style
.ds iC \f(CB
.\" Literal Style
.ds lI \fC
.\" Left Parenthesis Style
.ds lP \fR\|(\|\fP
.\" Right Parenthesis Style
.ds rP \fR\|)\|\fP
.\" Options Open Bracket Style
.ds lB \fR\^[\^\fP
.\" Options Open Bracket Style
.ds rB \fR\^]\fP
.\" Name (subject of manpage) Style
.ds nM \f(CB
.\" Pathname Style
.ds pA \fC
.\" Accepted punctuation string for -mdoc syntax
.ds Pu \fR[.,:;(\^)[\^]\fR]
.\" Section Header Style
.ds Sp \s12\fB
.\" .ds sT \s-2\fR
.\" Symbolic Emphasis (boldface)
.ds sY \f(CB
.\" Generic Variable Style
.ds vA \fI
.\" Volume Title Style
.ds Vs \fR
.\" Cross Reference STyle (man page only)
.ds xR \fC
.\" Math *
.tr *\(**
.\}
.\" NROFF
.if n \{\
.\" Address Style
.ds aD \fI
.\" Argument Reference Style
.ds aR \fI
.\" Interactive Command Modifier (flag)
.ds cM \fB
.\" Emphasis (in the English sense - usually italics)
.ds eM \fI
.\" Errno Style
.ds eR \fR
.\" Environment Variable Style
.ds eV \fR
.\" Command Line Flag Style
.ds fL \fB
.\" Header String Style
.ds Hs \fR
.\" Interactive Command Style
.ds iC \fB
.\" Literal Style
.ds lI \fR
.\" Left Parenthesis Style
.ds lP \fR\|(\fP
.\" Right Parenthesis Style
.ds rP \fR\|)\fP
.\" Options Open Bracket Style
.ds lB \fR\|[\|\fP
.\" Options Open Bracket Style
.ds rB \fR\|]\fP
.\" Name (subject of manpage) Style
.ds nM \fB
.\" Pathname Style
.ds pA \fI
.\" Accepted punctuation string for -mdoc syntax
.ds Pu [.,;:()[]]
.\" Section Header Style
.ds Sp \s12\fB
.\" .ds sT \s-2\fR
.\" .ds sT \s-2\fR
.\" Symbol, Mode or Mask Style
.ds sY \fB
.\" Generic Variable Style
.ds vA \fI
.\" Volume Title Style
.ds Vs \fR
.\" Cross Reference Style (man page only)
.ds xR \fR
.\}
.\" INDENTS - Subheaders(sI), Text(Ti) between Section Headers and Subsects
.if t \{\
. nr sI \w'\fC,'u*5
. nr Ti \n(sIu
.\}
.if n \{\
. nr sI .5i
. nr Ti .5i
.\}
.\" Flags for macros names which are used only for .Ds
.nr dI 6n
.nr dC 1
.nr dL 1
.nr dR 1
.\" INDENT WIDTHS (for Lists)
.\" Width Needed for Address Tag (indented amount)
.nr Ad 12n
.\" Angle Quote Width
.nr Aq 12n
.\" Width Needed for Argument
.nr Ar 12n
.\" Width Needed for Column offset
.nr Cl 15n
.\" Width neeeded for Interactive Command Modifier
.nr Cm 10n
.\" Width Needed for Complex Expressions
.nr Cx 20n
.\" Indent Width Needed for Display (right and left margins)
.nr Ds 6n
.\" Double Quote Width
.nr Dq 12n
.\" tI is dependent on Ds and used by .Dp
.nr tI \n(Dsu
.\" Width Needed for Display
.nr Em 10n
.\" Width Needed for Errno Types
.nr Er 15n
.\" Width Needed for Environment Variables
.nr Ev 15n
.\" Width Needed for Example Indent
.nr Ex 10n
.\" Width Needed for Flag
.nr Fl 10n
.\" Width Needed for Function
.nr Fn 16n
.\" Width neeeded for Interactive Command Name
.nr Ic 10n
.\" Width Needed for Constant
.nr Li 16n
.\" Width Needed for Math Symbol ? not sure if needed
.nr Ms 6n
.\" Width Needed for Name
.nr Nm 10n
.\" Width Needed for Option Begin
.nr Ob 14n
.\" Width Needed for Option End
.nr Oe 14n
.\" Width Needed for Option (one line)
.nr Op 14n
.\" Width Needed for Pathname
.nr Pa 32n
.\" Parenthesis Quote Width
.nr Pq 12n
.\" Single Quote Width
.nr Sq 12n
.\" Width Needed for Symbols, Modes or Masks
.nr Sy 6n
.\" Width needed for default or unknown text width
.nr Tx 22n
.\" Width Needed for Generic Variable
.nr Va 12n
.\" Width Needed for Cross Reference, should the cross ref be annotated.
.nr Xr 10n
.\" PARAGRAPH SPACE
.if t \{\
. nr Pp .5v
.\}
.if n \{\
. nr Pp 1v
.\}
.\" PAGE LAYOUT
.\" .Li Tagged Paragraph Style - zero if break on oversized tag
.\" one if add em space and continue filling line.
.nr tP 0
.\" Page Layout Macro
.de pL
.\" DITROFF
.ie t \{\
.\" Header Margin
. nr Hm .5i
.\" Footer Margin
. nr Fm .5i
.\" Line length
. nr ll 5.5i
.\" Line length
. ll 5.5i
.\" Title length
. nr lt 5.5i
.\" Title length
. lt 5.5i
.\" Page offset
. nr po 1.56i
.\" Page offset
. po 1.56i
.\" Vertical space distance (from Section headers/Lists/Subsections)
. nr vV .5v
.\" em space
. ds tP \|\|\|\|\|\|
.\}
.el \{\
.\" Line length
. nr ll 78n
. ll 78n
.\" Title length
. nr lt 78n
.\" Title length
. lt 78n
.\" Page offset
. nr po 0i
.\" Page offset
. po 0i
.\" Vertical space distance (from Section headers/Lists/Subsections)
. nr vV 1v
.\" em space
. ds tP \0\0
.\" Test for crt
. ie \\n(cR .nr Hm 0
. el .nr Hm .5i
.\" Footer Margin
. nr Fm .5i
.\}
..
.\" Adjustment mode
.if n \{\
.ad l
.na
..
.\}
.\" PREDEFINED STRINGS
.if t \{\
. ds <= \(<=
. ds >= \(>=
. ds Lq \&``
. ds Rq \&''
. ds ua \(ua
. ds aa \(aa
. ds ga \(ga
. ds sR \(aa
. ds sL \(ga
.\}
.if n \{\
. ds <= \&<\&=
. ds >= \&>\&=
. ds Rq ''
. ds Lq ``
. ds ua ^
. ds aa '
. ds ga `
. ds sL `
. ds sR '
.\}
.\" Note: The distances from the bottom or top of the page are set
.\" in headers (macro .hK): to -1.25 for troff, and -1.167 for nroff
.\" bottoms, and top is 0.
.\"
.\" .Dt Document/manpage_title section/chapter volume
.\" The \{ and \} is necessary as roff doesn't nest if-elses
.\" properly, especially with .ds.
.\" TODO: separate Dt into Dt, Ch and Vt for supp docs.
.de Dt
.ds dT UNTITLED
.ds vT Local
.ds cH Null
.\" Volume and Section Number or Chapter Number
.if !"\\$1"" .ds dT \\$1
.if !"\\$2"" \{\
. ds cH \\$2
. if "\\$3"" \{\
. \" Volume Title if none given
. if \\$2>=1 .if \\$2<=8 \{\
. ds vT UNIX Reference Manual
. if \\$2>1 .if \\$2<6 .ds vT UNIX Programmer's Manual
. if "\\$2"8" .ds vT UNIX System Manager's Manual
. \}
. if "\\$2"unass" .ds vT DRAFT
. if "\\$2"draft" .ds vT DRAFT
. if "\\$2"paper" .ds vT Null
. \}
.\}
.if !"\\$3"" \{\
. \" Volume Title if given
. if "\\$3"USD" .ds vT UNIX User's Supplementary Documents
. if "\\$3"PS1" .ds vT UNIX Programmers's Supplementary Documents
. if "\\$3"AMD" .ds vT UNIX Ancestral Manual Documents
. if "\\$3"SMM" .ds vT UNIX System Manager's Manual
. if "\\$3"URM" .ds vT UNIX Reference Manual
. if "\\$3"PRM" .ds vT UNIX Programmers's Manual
. if "\\$3"IND" .ds vT UNIX Manual Master Index
. if "\\$3"CON" .ds vT UNIX Contributed Software Manual
. if "\\$3"IMP" .ds vT UNIX Implementation Notes
. if "\\$3"HOW" .ds vT UNIX How Pocket Manual
. if "\\$3"LOCAL" .ds vT UNIX Local Manual
. if "\\*(vT"Local" .ds vT \\$3
.\}
..
.\"
.\" .Os Operating System/Standard and Release or Version Number
.\"
.de Os
.ds oS Null
.if "\\$1"" \{\
. ds oS \fIBSD Experimental\fP
.\" . ds oS (\fIBag o' Bits\fP)
.\}
.if "\\$2"" \{\
. ds o1 Non-Null
.\}
.if "\\$1"ATT" \{\
. ds oS AT&T
. if "\\$2"" .as oS \0UNIX
. if "\\$2"7th" .as oS \07th Edition
. if "\\$2"7" .as oS \07th Edition
. if "\\$2"III" .as oS \0System III
. if "\\$2"3" .as oS \0System III
. if "\\$2"V" .as oS \0System V
. if "\\$2"V.2" .as oS \0System V Release 2
. if "\\$2"V.3" .as oS \0System V Release 3
. if "\\$2"V.4" .as oS \0System V Release 4
.\}
.if "\\$1"BSD" \{\
. if "\\$2"3" .ds oS 3rd Berkeley Distribution
. if "\\$2"4" .ds oS 4th Berkeley Distribution
. if "\\$2"4.1" .ds oS 4.1 Berkeley Distribution
. if "\\$2"4.2" .ds oS 4.2 Berkeley Distribution
. if "\\$2"4.3" .ds oS 4.3 Berkeley Distribution
. if "\\$2"4.3+" .ds oS 4.3+tahoe Berkeley Distribution
.\}
.if "\\*(oS"Null" .ds oS \\$1
.if "\\*(o1"Non-Null" .as oS \0\\$2
.rm o1
..
.\"
.\" Standards
.\"
.\" .de St
.\" .ds sT Null
.\" .if "\\$1"POSIX" \{\
.\" . ds sT IEEE Standard POSIX
.\" . if \\$2 .as sT \0\\$2
.\" .\}
.\" .if "\\$1"ANSI" \{\
.\" . ds sT ANSI Standard
.\" . if \\$2 .as sT \0\\$2
.\" .\}
.\" .if "\\$1"ISO" \{\
.\" . ds sT ISO Standard
.\" . if \\$2 .as sT \0\\$2
.\" .\}
.\" .if "\\*(sT"Null" .ds sR \\$3
.\" ..
.\"
.\" .de Gp
.\" .ie !"\\$1"" .ds gP \&\\$1 \\$2 \\$3 \\$4 \\$5
.\" .el .ds gP Null
.\" ..
.\"
.\"
.de Dd
.nr aa 0
.ie \\n(.$>0 \{\
. ie \\n(.$<4 \{\
. ds dD \\$1 \\$2 \\$3
. \}
. el .tm Usage: .Dd Month Day, Year (e.g July 4, 1977).
.\}
.el \{\
. ds dD Epoch
.\}
..
.\"
.\" House Keeping Macro - Make sense of dT, cH, vT, sT, gP and dS
.\" TODO: Try to get else's for efficiency
.\" TODO: GET RID OF .wh -1.167i (its in v7)
.\"
.\"
.de hK
.nr % 1
.ds hT \\*(dT
.if !"\\*(cH"Null" \{\
. ie !"\\*(gP"Null" .as hT \|(\|\\*(cH\\*(gP\|)
. el .as hT \\|(\\|\\*(cH\\|)
.\}
.if "\\*(cH"Null" .if !"\\*(gP"Null" .as hT \&\|(\|\\*(gP\|)
.if t \{\
. wh 0 hM
. wh -1.25i fM
.\}
.if n \{\
. ie \\n(cR \{\
. hM
. wh -0v fM
. \}
. el \{\
. wh 0 hM
. wh -1.167i fM
. \}
.\}
.if n \{\
. if \\n(nl==0:\\n(nl==-1 'bp
.\}
.if t 'bp
.em lM
..
.\" Header Macro
.\"
.de hM
.ev 1
.pL
.if !\\n(cR 'sp \\n(Hmu
.tl @\\*(Hs\\*(hT\fP@\\*(Vs\\*(vT\fP@\\*(Hs\\*(hT\fP@
'sp \\n(Hmu
.ev
..
.\"
.de fM
.ev 1
.pL
.if !\\n(cR \{\
' sp \\n(Fmu
. tl @\\*(Hs\\*(oS\fP@\\*(Vs\\*(dD\fP@%@
' bp
.\}
.if \\n(cR \{\
.\" . tl @\\*(Hs\\*(oS\fP@\\*(Vs\\*(dD\fP@%@
.\" ' bp
.\}
.ev
..
.de lM
.fl
.if \\n(cR \{\
. fM
. pl \\n(nlu
.\}
..
.de Pp
.sp \\n(Ppu
.ne 2
.ns
..
.de Lp
.Pp
..
.de LP
.tm Not a \-mdoc command: .LP
..
.de PP
.tm Not a \-mdoc command: .PP
..
.de pp
.tm Not a \-mdoc command: .pp
..
.de Co
.tm Not a \-mdoc command: .Co
..
.nr z. 1
.nr z, 1
.nr z: 1
.nr z; 1
.nr z) 1
.nr z( 1
.nr z[ 1
.nr z] 1
.\" This is disgusting, troff not parse if stmt properly
.nr z1 0
.nr z2 0
.nr z3 0
.nr z4 0
.nr z5 0
.nr z6 0
.nr z7 0
.nr z8 0
.nr z9 0
.nr z0 0
.nr z# 0
.\"
.de Ad
.ie \\n(.$==0 \{\
. tm Usage: .Ad address [...] \\*(Pu
.\}
.el \{\
. ds sV \\*(aD
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.\" Command Line Argument Macro
.\"
.de Ar
.ie \\n(.$==0 \{\
. ie !"\\*(iM"" .as f1 \&[\|\\*(aRfile\ ...\fP\|]
. el \&[\|\\*(aRfile\ ...\fP\|]
.\}
.el \{\
. ds sV \\*(aR
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Em
.ie \\n(.$==0 \{\
. tm Usage: .Em text ... \\*(Pu
.\}
.el \{\
. ds sV \\*(eM
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Er
.ie \\n(.$==0 \{\
. tm Usage: .Er ERRNOTYPE ... \\*(Pu
. \}
.el \{\
. ds sV \\*(eR
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Ev
.ie \\n(.$==0 \{\
. tm Usage: .Ev ENVIRONMENT_VARIABLE(s) ... \\*(Pu
. \}
.el \{\
. ds sV \\*(eV
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.\" Flag Name Macro
.\"
.de Fl
.ie \\n(.$==0 \{\
. ie !"\\*(iM"" .as f1 \&\\*(fL\-\fP
. el \&\\*(fL\-\fP
.\}
.el \{\
. nr rZ 0
. sW \\$1
. if (\\n(sW==1&\\n(.$==1) .rZ \\$1
. ds sV \\*(fL
. nr cF \\n(.f
. ie \\n(rZ \{\
. ie "\\*(iM"" .ds f1 \&\\*(sV\-\f\\n(cF\\$1
. el \&\\*(sV\-\f\\n(cF\\$1
. \}
. el \{\
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. fB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
. \}
.\}
..
.\" Interactive Commands Macro
.\"
.de Ic
.ie \\n(.$==0 \{\
. tm Usage: .Ic Interactive Commands(s) ... \\*(Pu
.\}
.el \{\
. ds sV \\*(iC
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.\" Interactive Command Modifiers (flags)
.\"
.de Cm
.ie \\n(.$==0 \{\
. tm Usage: .Cm Interactive Command Modifier(s) ... \\*(Pu
.\}
.el \{\
. ds sV \\*(cM
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Li
.ie \\n(.$==0 \{\
. tm Usage: .Li literal ... \\*(Pu
. \}
.el \{\
. ds sV \\*(lI
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\" If in nroff or any other case where the default font
.\" is constant width, and literal means zilch, single quote instead.
.ie n \{\
.de Ql
. ie \\n(.$==0 \{\
. tm Usage: .Ql literal ... \\*(Pu
. \}
. el \{\
. Sq \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
..
.\}
.el \{\
.de Ql
. ie \\n(.$==0 \{\
. tm Usage: .Ql literal ... \\*(Pu
. \}
. el \{\
. Li \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
..
.\}
.\"
.de Nm
.ie \\n(.$==0 \{\
. if "\\*(n1"" .tm Usage: .Nm Name(s) ... \\*(Pu
. ie !"\\*(iM"" .as f1 \&\\*(nM\\*(n1\\$1\fP
. el \&\\*(nM\\*(n1\\$1\fP
.\}
.el \{\
. ds sV \\*(nM
. nr cF \\n(.f
. if \\n(nS \{\
. rs
. in -\\n(iSu
. ie \\n(nS>1 .br
. el \{\
. sW \\$1
. nr iS ((\\n(sW+1)*\\n(fW)u
. \}
. in +\\n(iSu
. ti -\\n(iSu
. nr nS \\n(nS+1
. \}
. if "\\*(n1"" .ds n1 \\$1
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Pa
.ie \\n(.$==0 \{\
\&\\*(pA~\fP
.\}
.el \{\
. ds sV \\*(pA
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Sy
.ie \\n(.$==0 \{\
. tm Usage: .Sy Symbolic Text ... \\*(Pu
. \}
.el \{\
. ds sV \\*(sY
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Ms
.ie \\n(.$==0 \{\
. tm Usage: .Ms Math Symbol ... \\*(Pu
. \}
.el \{\
. ds sV \\*(sY
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de Va
.ie \\n(.$==0 \{\
. tm Usage: .Va variable_name(s) ... \\*(Pu
.\}
.el \{\
. ds sV \\*(vA
. nr cF \\n(.f
. ie "\\*(iM"" .ds f1 \&\\*(sV
. el .as f1 \&\\*(sV
. nB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
.\}
..
.\"
.de nB
.hy 0
.if \\n(.$==0 .tm Usage error: called with empty arguments (empty quotes)?
.ie \\n(.$>1 \{\
. rZ \\$1
. ie \\n(rZ .as f1 \&\f\\n(cF\\$1\fP
. el .as f1 \&\\$1
. rZ \\$2
. if !\\n(rZ \{\
. ie !"\\*(iM""\{\
.\" I surrender
. if "\\*(iM"Tp" .as f1 \&\ \&
. if "\\*(iM"Dp" .as f1 \&\ \&
. if "\\*(iM"Op" .as f1 \&\ \&
. if "\\*(iM"Cx" .as f1 \&\ \&
. if "\\*(iM"Dq" .as f1 \& \&
. if "\\*(iM"Sq" .as f1 \& \&
. if "\\*(iM"Pq" .as f1 \& \&
. if "\\*(iM"Aq" .as f1 \& \&
. \}
. el .as f1 \& \&
. \}
. nB \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.\}
.el \{\
. rZ \\$1
. ie \\n(rZ .as f1 \&\f\\n(cF\\$1
. el .as f1 \&\\$1\f\\n(cF
. if "\\*(iM"" \{\&\\*(f1
. ds f1
. \}
. hy
.\}
..
.de fB
.hy 0
.if \\n(.$==0 .tm Usage error: called with empty arguments (empty quotes)?
.ie \\n(.$>1 \{\
. rZ \\$1
. ie \\n(rZ .as f1 \&\f\\n(cF\\$1\fP
. el \{\
. ie "\\$1"-" .as f1 \&\-\-
. el .as f1 \&\-\\$1
. \}
. rZ \\$2
. if !\\n(rZ \{\
. ie !"\\*(iM""\{\
.\" I surrender
. if "\\*(iM"Tp" .as f1 \&\ \&
. if "\\*(iM"Dp" .as f1 \&\ \&
. if "\\*(iM"Op" .as f1 \&\ \&
. if "\\*(iM"Cx" .as f1 \&\ \&
. if "\\*(iM"Dq" .as f1 \& \&
. if "\\*(iM"Sq" .as f1 \& \&
. if "\\*(iM"Pq" .as f1 \& \&
. if "\\*(iM"Aq" .as f1 \& \&
. \}
. el .as f1 \& \&
. \}
. fB \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.\}
.el \{\
. rZ \\$1
. ie \\n(rZ .as f1 \&\f\\n(cF\\$1
. el \{\
. ie "\\$1"-" .as f1 \&\-\-\f\\n(cF
. el .as f1 \&\-\\$1\f\\n(cF
. \}
. if "\\*(iM"" \{\&\\*(f1
. ds f1
. \}
. hy
.\}
..
.\"
.\" Single quoted Items
.\" eF, sB g[0-9] and f2
.de Sq
.nr eF 0
.ie \\n(.$==0 \{\
. ie "\\*(iM"" \&\\*(sL\&\\*sR
. el .as f1 \&\\*(sL\&\\*(sR
.\}
.el \{\
. ie "\\*(iM"" \{\
. ds f1 \&\\*(sL
. ds iM Sq
. \}
. el .as f1 \&\\*(sL
. sB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ie \\n(eF>0 .\\*(g1 \\*(g2 \\*(g3 \\*(g4 \\*(g5 \\*(g6 \\*(g7 \\*(g8
. el .as f1 \\*(g0
. as f1 \\*(sR
. if !"\\*(f2"" .as f1 \\*(f2
. if "\\*(iM"Sq" \{\
\&\\*(f1
. ds f1
. ds iM
. \}
. ds f2
. rm g0 g1 g2 g3 g4 g5 g6 g7 g8 g9
. nr eF 0
.\}
..
.\"
.\" Double quoted Items
.de Dq
.nr Ef 0
.ie \\n(.$==0 \{\
. ie "\\*(iM"" \&\\*(Lq\&\\*(Rq
. el .as f1 \&\\*(Lq\&\\*(Rq
.\}
.el \{\
. ie "\\*(iM"" \{\
. ds f1 \&\\*(Lq
. ds iM Dq
. \}
. el .as f1 \&\\*(Lq
. Sb \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ie \\n(Ef>0 .\\*(k1 \\*(k2 \\*(k3 \\*(k4 \\*(k5 \\*(k6 \\*(k7 \\*(k8
. el .as f1 \\*(k0
. as f1 \\*(Rq
. if !"\\*(f4"" .as f1 \\*(f4
. if "\\*(iM"Dq" \{\
\&\\*(f1
. ds f1
. ds iM
. \}
. ds f4
. rm k0 k1 k2 k3 k4 k5 k6 k7 k8 k9
. nr Ef 0
.\}
..
.\"
.\" Parenthesis quoted Items
.de Pq
.nr pQ 0
.ie \\n(.$==0 \{\
. ie "\\*(iM"" \&(\&)
. el .as f1 \&(\&)
.\}
.el \{\
. ie "\\*(iM"" \{\
. ds f1 \&(
. ds iM Pq
. \}
. el .as f1 \&(
. pB \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ie \\n(pQ>0 .\\*(y1 \\*(y2 \\*(y3 \\*(y4 \\*(y5 \\*(y6 \\*(y7 \\*(y8
. el .as f1 \\*(y0
. as f1 \&)
. if !"\\*(f3"" .as f1 \\*(f3
. if "\\*(iM"Pq" \{\
\&\\*(f1
. ds f1
. ds iM
. \}
. ds f3
. rm y0 y1 y2 y3 y4 y5 y6 y7 y8 y9
. nr pQ 0
.\}
..
.\" eF, sB g[0-9] and f2
.de sB
.hy 0
.ie \\n(.$==0 .tm Sick Logic: macro sB
.el \{\
. ie \\n(eF>=1 .nr eF \\n(eF+1
. el \{\
. mN \\$1
. if \\n(mN .nr eF \\n(eF+1
. \}
. rZ \\$1
. ie \\n(rZ .as f2 \\$1
. el \{\
. ie \\n(eF<1 .as g\\n(eF \\$1
. el .as g\\n(eF \\$1
. \}
. if \\n(.$>1 \{\
. rZ \\$2
. if \\n(rZ==0 \{\
. if \\n(eF<1 \{\
. as g\\n(eF \& \&
. \}
. \}
. sB \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
.\}
..
.de Sb
.hy 0
.ie \\n(.$==0 .tm Sick Logic: macro Sb
.el \{\
. ie \\n(Ef>=1 .nr Ef \\n(Ef+1
. el \{\
. mN \\$1
. if \\n(mN .nr Ef \\n(Ef+1
. \}
. rZ \\$1
. ie \\n(rZ .as f4 \\$1
. el \{\
. ie \\n(Ef<1 .as k\\n(Ef \\$1
. el .as k\\n(Ef \\$1
. \}
. if \\n(.$>1 \{\
. rZ \\$2
. if \\n(rZ==0 \{\
. if \\n(Ef<1 \{\
. as k\\n(Ef \& \&
. \}
. \}
. Sb \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
.\}
..
.de pB
.hy 0
.ie \\n(.$==0 .tm Sick Logic: macro pB
.el \{\
. ie \\n(pQ>=1 .nr pQ \\n(pQ+1
. el \{\
. mN \\$1
. if \\n(mN .nr pQ \\n(pQ+1
. \}
. rZ \\$1
. ie \\n(rZ .as f3 \\$1
. el \{\
. ie \\n(pQ<1 .as y\\n(pQ \\$1
. el .as y\\n(pQ \\$1
. \}
. if \\n(.$>1 \{\
. rZ \\$2
. if \\n(rZ==0 \{\
. if \\n(pQ<1 \{\
. as y\\n(pQ \& \&
. \}
. \}
. pB \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
.\}
..
.de aQ
.hy 0
.ie \\n(.$==0 .tm Bad Syntax: .Aq
.el \{\
. ie \\n(aQ>=1 .nr aQ \\n(aQ+1
. el \{\
. mN \\$1
. if \\n(mN .nr aQ \\n(aQ+1
. \}
. rZ \\$1
. ie \\n(rZ .as aZ \\$1
. el \{\
. ie \\n(aQ<1 .as a\\n(aQ \\$1
. el .as a\\n(aQ \\$1
. \}
. if \\n(.$>1 \{\
. rZ \\$2
. if \\n(rZ==0 \{\
. if \\n(aQ<1 \{\
. as a\\n(aQ \& \&
. \}
. \}
. aQ \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
.\}
..
.\" Angle Bracket Quoted Items
.de Aq
.nr aQ 0
.ie \\n(.$==0 \{\
. ie "\\*(iM"" \&<\&>
. el .as f1 \&<\&>
.\}
.el \{\
. ie "\\*(iM"" \{\
. ds f1 \&<
. ds iM Aq
. \}
. el .as f1 \&<
. aQ \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
. ie \\n(aQ>0 .\\*(a1 \\*(a2 \\*(a3 \\*(a4 \\*(a5 \\*(a6 \\*(a7 \\*(a8
. el .as f1 \\*(a0
. as f1 \&>
. if !"\\*(aZ"" .as f1 \\*(aZ
. if "\\*(iM"Aq" \{\
\&\\*(f1
. ds f1
. ds iM
. \}
. ds aZ
. rm a0 a1 a2 a3 a4 a5 a6 a7 a8
. nr aQ 0
.\}
..
.\" macro Name test, return macro register value if true
.if \n(.g .ig
.de mN
.nr mN 0
.sW \\$1
.if \\n(sW==2 \{\
. if \\n(\\$1 .nr mN \\n(\\$1
.\}
..
.if !\n(.g .ig
.de mN
.nr mN 0
.if \A'\\$1' \{\
. sW \\$1
. if \\n(sW==2 \{\
. if \\n(\\$1 .nr mN \\n(\\$1
. \}
.\}
..
.\" Punctuation test (using z registers), return 1 if true
.if \n(.g .ig
.de rZ
.nr rZ 0
.sW \\$1
.if \\n(sW==1 \{\
. if \\n(z\\$1==1 \{\
. nr rZ 1
. \}
.\}
..
.if !\n(.g .ig
.de rZ
.nr rZ 0
.if \A'\\$1' \{\
. sW \\$1
. if \\n(sW==1 \{\
. if \\n(z\\$1==1 \{\
. nr rZ 1
. \}
. \}
.\}
..
.\"
.\" sW returns number of characters in a string
.if t \{\
.nr fW \w'\fC,'
.de sW
.nr sW \w'\fC\\$1'
.\}
.if n \{\
.nr fW \w'0'
.de sW
.nr sW \w'\\$1'
.\}
.ie \\n(sW>=\\n(fW \{\
. ie \\n(sW%\\n(fW .nr sW (\\n(sW/\\n(fW)+1
. el .nr sW \\n(sW/\\n(fW
.\}
.el .nr sW 0
..
.\" Option Expression -
.\" TODO - add line overflow check (right!)
.nr eP 0
.ds e1
.nr oE 0
.nr hP 0
.ds hP
.nr Ep 0
.de Op
.hy 0
.if "\\*(iM"" \{\
. ds iM Op
. ds f1 \&
.\}
.as f1 \&\\*(lB
.\" .tm Op: \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.dO \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.ie !"\\$1"Cx" .oE
.el .nr oE \\n(oE+1
..
.\"
.\" just for mike, with every bite of garlic in mind (oops, i mean burp).
.\" dO: go dOwn an argument vector and test each argument to see if
.\" a macro name or punctuation. stash in respective place along
.\" with its arguments.
.nr oO 0
.nr oP 0
.nr aO 0
.de dO
.mN \\$1
.ie \\n(mN \{\
. if \\n(oP \{\
. if \\n(hP \{\
. nr oZ 1
. oZ
. Oz
. \}
. if \\n(e1==1 \{\
.\\*(e1 \\*(e2 \\*(e3 \\*(e4 \\*(e5 \\*(e6 \\*(e7 \\*(e8 \\*(e9
. \}
. uO
. if !(\\n(oO:\\n(aO) .as f1 \& \&
. \}
. ie "\\$1"Op" \{\
. as f1 \&\\*(lB
. nr aO \\n(aO+1
. \}
. el \{\
. nr eP \\n(eP+1
. ds e\\n(eP \\$1
. nr e\\n(eP 1
. \}
.\}
.el \{\
.\" .tm dO: $1: \\$1: eP \\n(eP e[\\n(eP]: \\*(e\\n(ePEE
. rZ \\$1
. ie \\n(rZ \{\
.\" .tm dO:rZ: $1: \\$1: eP \\n(eP e[\\n(eP]: \\*(e\\n(eP
. nr hP \\n(hP+1
. ds h\\n(hP \\$1
. \}
. el \{\
.\" .tm dO:word $1: \\$1: eP \\n(eP e[\\n(eP]: \\*(e\\n(ePEE
. if \\n(eP==0:\\n(e\\n(eP==1 .nr eP \\n(eP+1
. if \\n(eZ .as e\\n(eP \& \&
. as e\\n(eP " \&\\$1
.\" . ds e\\n(eP \&\\$1
. nr eZ \\n(eZ+1
. \}
.\}
.nr oP 1
.ie \\n(.$>1 \{\
. dO \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.\}
.el \{\
. ie \\n(e1 \{\
.\\*(e1 \\*(e2 \\*(e3 \\*(e4 \\*(e5 \\*(e6 \\*(e7 \\*(e8 \\*(e9
. \}
. el \{\
. as f1 \\*(e1
. \}
.\}
..
.\" handle old style arguments such as the arg -Idir
.\" in adb, .Oo is a toggle.
.de Oo
.ie \\n(oO .nr oO 0
.el .nr oO 1
..
.\" stash punctuation
.de oZ
.if \\n(hP>=\\n(oZ \{\
. nr eP \\n(eP+1
. ds e\\n(eP \\*(h\\n(oZ
. nr oZ \\n(oZ+1
. oZ
.\}
..
.\" clean up punctuation vector
.de Oz
.if \\n(hP>0 \{\
. rm h\\n(hP
. nr hP \\n(hP-1
. Oz
.\}
..
.\" uO: go back up created vector cleaning it up along the way
.de uO
.if \\n(eP>0 \{\
. rm e\\n(eP
. rr e\\n(eP
. nr eP \\n(eP-1
. nr oP 0
. nr eZ 0
. uO
.\}
..
.\" option end
.de oE
.uO
.ie \\n(hP \{\
. as f1 \\*(rB\\*(h1\\*(h2\\*(h3
. Oz
. nr oZ 0
.\}
.el \{\
. as f1 \\*(rB
.\}
.ie "\\*(iM"Op" \{\
. if \\n(aO .aO
.if t \{\
. if (\\n(.lu-\\n(.ku-\\n(.ou-(2*\\n(fWu))<\w'\fC\\*(f1'u .br
.\}
.if n \{\
. nr aa \w'\\*(f1'u
.\" . nr qq \\n(.lu-\\n(.ku-\\n(.ou
.\" \&aa == \\n(aa, f1==\\*(f1, qq==\\n(qq
. if (\\n(.lu-\\n(.ku-\\n(.ou-\\n(aau)<=(8*\\n(fWu) .br
.\}
\&\\*(f1
. ds iM
. ds f1
. hy
.\}
.el .nr oE \\n(oE-1
..
.de aO
.as f1 \\*(rB
.nr aO \\n(aO-1
.if \\n(aO >0 .aO
..
.\"
.de Xr
.if \\n(.$<=1 \{\
. ie \\n(.$==1 \{\
. if !"\\*(iM"" .as f1 \&\\*(xR\\$1\fP
. if "\\*(iM"" \&\\*(xR\\$1\fP
. \}
. el .tm Xr Usage: .Xr manpage_name [section#] \\*(Pu
.\}
.if \\n(.$==2 \{\
. rZ \\$2
. ie "\\*(iM"" \{\
. ie \\n(rZ \&\\*(xR\\$1\fP\\$2
. el \&\\*(xR\\$1\fP(\\$2)
. \}
. el \{\
. ie \\n(rZ .as f1 \&\\*(xR\\$1\fP\\$2
. el .as f1 \&\\*(xR\\$1\fP(\\$2)
. \}
.\}
.if \\n(.$>=3 \{\
. rZ \\$2
. ie \\n(rZ \{\
. ie !"\\*(iM"" .as f1 \&\\*(xR\\$1\fP\\$2\\$3\\$4\\$5\\$6\\$7\\$8
. el \&\\*(xR\\$1\fP\\$2\\$3\\$4\\$5\\$6\\$7\\$8
. \}
. el \{\
. rZ \\$3
. ie \\n(rZ \{\
. if !"\\*(iM"" \{\
. as f1 \&\\*(xR\\$1\fP(\\$2)\\$3\\$4\\$5\\$6\\$7\\$8
. \}
. if "\\*(iM"" \{\
\&\\*(xR\\$1\fP(\\$2)\\$3\\$4\\$5\\$6\\$7\\$8
. \}
. \}
. el \{\
. tm rZ = \\n(rZ the arg is \\$3
. tm Xr-XX Usage: .Xr manpage_name [section#] \\*(Pu
. \}
. \}
.\}
..
.\"
.\"
.de Ex
.tm Ex defunct, Use .Dl: \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.\" Display (one) Line of text.
.de Dl
.ie "\\*(iM"" \{\
' ta .5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i 6.5i
. in \\n(.iu+\\n(Dsu
. mN \\$1
. ie \\n(mN .\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. el \{\
. nr cF \\n(.f
.\" Literal font is none specified
\&\\*(lI\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. ft \\n(cF
. \}
. in \\n(.iu-\\n(Dsu
.\}
.el \{\
. mN \\$1
. ie \\n(mN .\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
. el \{\
. nr cF \\n(.f
. ds f1 \&\\*(lI\\&\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
. as f1 \&\f\\n(cF
. \}
.\}
..
.\"
.\"
.\" user set Tagged Paragraph Width (used in both Dp and Tp)
.de Tw
.ie \\n(.$==0 \{\
. nr aa 0
.\}
.el \{\
. mN \\$1
. ie \\n(sW>2 \{\
. nr tW (\\n(sW+3)*\\n(fWu)
. \}
. el \{\
. ie \\n(mN .nr tW \\n(mN
. el .nr tW \\$1
. \}
. nr tF 1
.\}
..
.\"
.de Dw
.Tw \\$1
..
.\"
.de Di
.ie \\n(.$==0 \{\
. nr tI \\n(Dsu
.\}
.el \{\
. sW \\$1
. if \\n(sW>=2 \{\
. nr tI \\$1u
. \}
. if \\n(sW<2 \{\
. if "\\$1"L" \{\
. nr tI 0
. \}
. \}
.\}
..
.\" tagged paragraph
.\" initialize baby stack variables
.nr np 0
.nr p1 0
.ds s\n(np
.\"
.de Tp
.ie "\\$1"" .pE p s np
.el \{\
. ds iM Tp
. mN \\$1
. ie \\n(tF \{\
. ds tC Tw
. nr tC 1
. nr tF 0
. \}
. el \{\
. if !"Tw"\\*(s\\n(np" \{\
. ie \\n(mN \{\
. ds tC \\$1
. nr tW \\n(mN
. \}
. el \{\
. ds tC Tx
. nr tW \\n(Tx
. \}
. if !"\\*(tC"\\*(s\\n(np" .nr tC 1
. \}
. \}
. sp \\n(vVu
. if !\\n(cR .ne 2
. if \\n(tC \{\
. nr np \\n(np+1
. nr p\\n(np \\n(tW
. ds s\\n(np \\*(tC
. nr tC 0
. ds tC
. in \\n(.iu+\\n(p\\n(npu
. \}
. ie \\n(mN \{\
. ds f1
. \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. if !"\\$1"Cx" .pT st p np
. \}
. el \{\
. br
. ev 1
. fi
. di Td
\&\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. br
. di
. ev
. na
. ds tD \\*(Td\\
. pT di p np
. \}
.\}
..
.\"
.\"
.\" Complex Expression Macro
.\"
.\" TODO: add length across line boundary check (like Li)
.de Cx
.hy 0
.ie \\n(.$==0 \{\
. if "\\*(iM"Cx" \{\
. ds iM
. if \\n(oE .oE
\&\\*(f1
. ds f1
. \}
. if "\\*(iM"Tp" .pT st p np
. if "\\*(iM"Dp" .pT st q mp
.\}
.el \{\
. if "\\*(iM"" \{\
. ds iM Cx
. ds f1 \&
. \}
. mN \\$1
.\" Here are the args: `\\$1' `\\$2' `\\$3' `\\$4'
. ie \\n(mN .\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. el \{\
. as f1 \&\\$1
. if \\n(.$>1 .Cx \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
.\}
..
.\" Prefix string in default font to content specified string
.de Pf
.Cx \\$1
.\\$2 \\$3 \\$4 \\$5
.Cx
..
.\" Suffix string in default font to content specified string
.de Sf
.Cx \\$1 \\$2
.Cx \\$3
.Cx
..
.\" Simple Option Begin
.de Ob
.hy 0
.ie "\\*(iM"" \{\
. ev 2
. fi
. di oB
.\}
.el \{\
.tm shouldn't be here
. as f1 \&[
. mN \\$1
. ie \\n(mN .\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. el \{\
. as f1 \&\\$1
. if \\n(.$>1 .Oc \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
.\}
..
.de Oc
.as f1 \&\\$1
.if \\n(.$>1 .Oc \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.de Oe
.hy 0
.ie "\\*(iM"" \{\
. br
. di
. ev
. ds bO \\*(oB\\
\&[\\*(bO\&]
.\}
.el \{\
. as f1 \&]
.\}
..
.\" White space for Cx
.de Ws
.Cx \&\ \&
..
.\" tagged paragraph
.\" initialize baby stack variables
.nr mp 0
.nr q1 0
.ds r\n(np
.\"
.\" Complex Dp tag
.de Dc
.Dp Cx \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
..
.\" Complex Tp tag
.de Tc
.Tp Cx \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
..
.\" Tag with a flag and an argument with a space
.de Ta
.if "\\$2"" \{\
. Tp Fl \\$1
.\}
.el \{\
. Tp Fl \\$1
. Cx \&\ \&
. Ar \\$2 \\$3
. Cx
.\}
..
.de Da
.Dp Cx Fl \\$1
.Ws
.Ar \\$2 \\$3
.Cx
..
.de To
.Tp Cx Fl \\$1
.Ar \\$2 \\$3
.Cx
..
.de Do
.Dp Cx Fl \\$1
.Ar \\$2 \\$3
.Cx
..
.\" Blended tag toggle
.de Bt
.ie \\n(tP==0 .nr tP 1
.el .nr tP 0
..
.\" Bullet paragraph
.de Bu
.Tp Sy \&\(bu
..
.\" Display tagged paragraph
.de Dp
.ie "\\$1"" \{\
. pE q r mp
. sp \\n(vVu
.\}
.el \{\
. ds iM Dp
. mN \\$1
. ie \\n(tF \{\
. ds tC Tw
. nr tC 1
. nr tF 0
. \}
. el \{\
. if !"Tw"\\*(r\\n(mp" \{\
. ie \\n(mN \{\
. ds tC \\$1
. nr tW \\n(mN
. \}
. el \{\
. ds tC Tx
. nr tW \\n(Tx
. \}
. if !"\\*(tC"\\*(r\\n(mp" .nr tC 1
. \}
. \}
. if !\\n(cR .ne 2
. if \\n(tC \{\
. nr mp \\n(mp+1
. nr q\\n(mp \\n(tW
. ds r\\n(mp \\*(tC
. nr tC 0
. ds tC
. ie \\n(tIu==\\n(Dsu .nr i\\n(mp \\n(Dsu
. el \{\
. nr i\\n(mp \\n(tIu
. nr tI \\n(Dsu
. \}
. in \\n(.iu+\\n(i\\n(mpu
. sp \\n(vVu
. in \\n(.iu+\\n(\\q\\n(mpu
. \}
. ie \\n(mN \{\
. \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. if !"\\$1"Cx" .pT st q mp
. \}
. el \{\
. br
. ev 1
. fi
. di Td
\&\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. br
. di
. ev
. na
. ds tD \\*(Td\\
. pT di q mp
. \}
.\}
..
.\"
.\" .pE number_stack string_stack counter
.de pE
.ie "\\$3"mp" \{\
. in \\n(.iu-(\\n(\\$1\\n(\\$3u)-(\\n(i\\n(mpu)
. rr i\\n(mp
.\}
.el .in \\n(.iu-\\n(\\$1\\n(\\$3u
.\" .in \\n(.iu-\\n(\\$1\\n(\\$3u
.if \\n(\\$3<=0 .tm Extraneous call .Tp or .Dp
.rr \\$1\\n(\\$3
.rm \\$2\\n(\\$3
.nr \\$3 \\n(\\$3-1
.ds iM
..
.\"
.\" .pT [st or di] number_stack counter
.de pT
.ie "\\$1"st" \{\
. nr bb \\n(\\$2\\n(\\$3u
. ti -\\n(bbu
. ie (\\n(\\$2\\n(\\$3u-2n)<=\w'\\*(f1'u \{\&\\*(f1\\*(tP
. if \\n(tP==0 .br
. \}
. el \\*(f1\h'|\\n(\\$2\\n(\\$3u'\c
.\}
.el \{\
. ti -\\n(\\$2\\n(\\$3u
. ie (\\n(\\$2\\n(\\$3u-2n)<=\\n(dlu \{\&\\*(tD\\*(tP
. if !\\n(tP .br
. \}
. el \\*(tD\h'|\\n(\\$2\\n(\\$3u'\c
. if t 'ad
.\}
. ds iM
. ds f1
'fi
..
.\"
.\" The new SH
.\"
.de Sh
.\" set Sh state off, check for list state before calling indent (.In)
.nr nS 0
.nr sE 0
.ie "\\$1"NAME" \{\
.\" name state on, housekeep (headers & footers)
. hK
' in 0
.\}
.el \{\
. if "\\$1"SYNOPSIS" .nr nS 1
. in 0
.\}
.pL
'sp
.ns
.ta .5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i 6.5i
.if !\\n(cR .ne 3
'fi
\&\fB\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6 \|\\$7 \|\\$8 \|\\$9
\&\fP\&
.in \\n(.iu+\\n(Tiu
.if "\\$1"SEE" .nr sE 1
.ns
..
.\"
.\" Nd minus sign for an en dash used in .Sh Name
.de Nd
\&\-\& \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.de Ss
.sp
.ti -.25i
\&\fB\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6 \|\\$7 \|\\$8 \|\\$9
\&\fP\&
.ta .5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i 6.5i
.if !\\n(cR .ne 2
.br
..
.\" .if "\\$1"Ss" .in \\n(.iu+\\n(sIu
.\"..
.\"
.\"
.\" Column Macro
.\"
.hy 0
.de Cw
.ie \\n(.$==0 \{\
. br
. in \\n(.iu-\\n(eWu
. ta .5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i 6.5i
.\}
.el \{\
. Pp
. if \\n(.$==1 \{\
. ta \w'\\$1 'u
. nr eW \w'\\$1 'u
' in \\n(.iu+\\n(eWu
. \}
. if \\n(.$==2 \{\
. ta \w'\\$1 'u +\w'\\$2 'u
. nr eW \w'\\$1 'u+\w'\\$2 'u
' in \\n(.iu+\\n(eWu
. \}
. if \\n(.$==3 \{\
. ta \w'\\$1 'u +\w'\\$2 'u +\w'\\$3 'u
. nr eW \w'\\$1 'u+\w'\\$2 'u+\w'\\$3 'u
' in \\n(.iu+\\n(eWu
. \}
. if \\n(.$==4 \{\
. ta \w'\\$1 'u +\w'\\$2 'u +\w'\\$3 'u +\w'\\$4 'u
. nr eW \w'\\$1 'u+\w'\\$2 'u+\w'\\$3 'u +\w'\\$4 'u
' in \\n(.iu+\\n(eWu
. \}
. if \\n(.$==5 \{\
.ta \w'\\$1 'u +\w'\\$2 'u +\w'\\$3 'u +\w'\\$4 'u +\w'\\$5 'u
.nr eW \w'\\$1 'u +\w'\\$2 'u +\w'\\$3 'u +\w'\\$4 'u +\w'\\$5 'u
' in \\n(.iu+\\n(eWu
. \}
.\}
..
.de Cl
.ti -\\n(eWu
.mN \\$1
.ie \\n(mN .\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.el \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.nr dQ 0
.de Ds
.ie !"\\$1"" \{\
. mN d\\$1
. if \\n(mN \{\
. nr dQ \\n(dQ+1
. d\\$1
. \}
.\}
.el .br
.nf
..
.de Df
.ie !"\\$1"" \{\
. mN d\\$1
. if \\n(mN \{\
. nr dQ \\n(dQ+1
. d\\$1
. \}
.\}
.el .br
..
.de Dn
\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
.nf
..
.de dI
.nr d\\n(dQ \\n(dIu
.in \\n(.iu+\\n(dIu
..
.de dC
.nr d\\n(dQ (\\n(.l-\\n(.i)/4u
.in \\n(.iu+\\n(d\\n(dQu
..
.de dR
.nr d\\n(dQ (\\n(.l/3)u
.in \\n(.iu+\\n(d\\n(dQu
..
.de dL
.nr aa 0
..
.de De
.br
.if \\n(d\\n(dQ \{\
. in \\n(.iu-\\n(d\\n(dQu
. rr d\\n(dQ
. nr dQ \\n(dQ-1
.\}
.fi
..
.\"
.de Fn
.ie \\n(.$==0 \{\
. tm Usage: .Fn function_name function_arg(s) ... \\*(Pu
.\}
.el \{\
. nr cF \\n(.f
. ie \\n(.$==1 .ds f1 \&\\*(nM\\$1\fP\\*(lP\fP\\*(rP\fP
. el \{\
. ds f1 \\*(nM\\$1\fP\\*(lP
. nr aa 0
. rC \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
. \}
. if "\\*(iM"" \{\\&\\*(f1
. ds f1
. \}
.\}
..
.\"
.de rC
.rZ \\$1
.ie \\n(rZ \{\
. as f1 \f\\n(cF\\*(rP\f\\n(cF\\$1\\$2\\$3\\$4\\$5\\$6\\$7
.\}
.el \{\
. ie \\n(aa .as f1 \fP, \\*(aR\\$1
. el .as f1 \\*(aR\\$1
. nr aa 1
. ie \\n(.$>1 .rC \\$2 \\$3 \\$4 \\$5 \\$6 \\$7
. el .as f1 \fP\\*(rP\fP
.\}
..
1.18.1.4/tmac/ms.tmac 0000666 00000000037 15047753021 0007655 0 ustar 00 .\" ms.tmac
.\"
.do mso s.tmac
1.18.1.4/tmac/me.tmac 0000666 00000000037 15047753021 0007637 0 ustar 00 .\" me.tmac
.\"
.do mso e.tmac
1.18.1.4/eign 0000666 00000001154 15047753021 0006312 0 ustar 00 a
i
the
to
of
and
in
is
it
for
that
if
you
this
be
on
with
not
have
are
or
as
from
can
but
by
at
an
will
no
all
was
do
there
my
one
so
we
they
what
would
any
which
about
get
your
use
some
me
then
name
like
out
when
up
time
other
more
only
just
end
also
know
how
new
should
been
than
them
he
who
make
may
people
these
now
their
here
into
first
could
way
had
see
work
well
were
two
very
where
while
us
because
good
same
even
much
most
many
such
long
his
over
last
since
right
before
our
without
too
those
why
must
part
being
current
back
still
go
point
value
each
did
both
true
off
say
another
state
might
under
start
try
1.18.1.4/groffer/version.sh 0000666 00000002654 15047753021 0011126 0 ustar 00 #! /bin/sh
# groffer - display groff files
# Source file position: <groff-source>/contrib/groffer/version.sh
# Installed position: <prefix>/lib/groff/groffer/version.sh
# Copyright (C) 2001,2002,2003,2004,2005,2006
# Free Software Foundation, Inc.
# Written by Bernd Warken
# This file is part of `groffer', which is part of `groff'.
# `groff' is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
# `groff' is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with `groff'; see the files COPYING and LICENSE in the top
# directory of the `groff' source. If not, write to the Free Software
# Foundation, 51 Franklin St - Fifth Floor, Boston, MA 02110-1301,
# USA.
########################################################################
export _PROGRAM_VERSION;
export _LAST_UPDATE;
_PROGRAM_VERSION='0.9.31';
_LAST_UPDATE='11 Oct 2006';
# this setting of the groff version is only used before make is run,
# otherwise @VERSION@ will set it, see groffer.sh.
export _GROFF_VERSION_PRESET;
_GROFF_VERSION_PRESET='1.19.3preset';
1.18.1.4/groffer/groffer2.sh 0000666 00000541776 15047753021 0011172 0 ustar 00 #! /bin/sh
# groffer - display groff files
# Source file position: <groff-source>/contrib/groffer/groffer2.sh
# Installed position: <prefix>/lib/groff/groffer/groffer2.sh
# This file should not be run independently. It is called by
# `groffer.sh' in the source or by the installed `groffer' program.
# Copyright (C) 2001,2002,2003,2004,2005,2006
# Free Software Foundation, Inc.
# Written by Bernd Warken
# Last update: 5 Oct 2006
# This file is part of `groffer', which is part of `groff'.
# `groff' is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
# `groff' is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with `groff'; see the files COPYING and LICENSE in the top
# directory of the `groff' source. If not, write to the Free Software
# Foundation, 51 Franklin St - Fifth Floor, Boston, MA 02110-1301,
# USA.
########################################################################
# Test of rudimentary shell functionality
########################################################################
########################################################################
# Test of `unset'
#
export _UNSET;
export _foo;
_foo=bar;
_res="$(unset _foo 2>&1)";
if unset _foo >${_NULL_DEV} 2>&1 && \
test _"${_res}"_ = __ && test _"${_foo}"_ = __
then
_UNSET='unset';
eval "${_UNSET}" _foo;
eval "${_UNSET}" _res;
else
_UNSET=':';
fi;
########################################################################
# Test of `test'.
#
if test a = a && test a != b && test -f "${_GROFFER_SH}"
then
:;
else
echo '"test" did not work.' >&2;
exit "${_ERROR}";
fi;
########################################################################
# Test of `echo' and the `$()' construct.
#
if echo '' >${_NULL_DEV}
then
:;
else
echo '"echo" did not work.' >&2;
exit "${_ERROR}";
fi;
if test _"$(t1="$(echo te)" &&
t2="$(echo '')" &&
t3="$(echo 'st')" &&
echo "${t1}${t2}${t3}")"_ \
!= _test_
then
echo 'The "$()" construct did not work' >&2;
exit "${_ERROR}";
fi;
########################################################################
# Test of sed program; test in groffer.sh is not valid here.
#
if test _"$(echo xTesTx \
| sed -n -e 's/^.\([Tt]e*x*sTT*\).*$/\1/p' \
| sed -e 's|T|t|g')"_ != _test_
then
echo 'The sed program did not work.' >&2;
exit "${_ERROR}";
fi;
########################################################################
# Test of `cat'.
#
if test _"$(echo test | cat)"_ != _test_
then
error 'Test of "cat" command failed.';
fi;
########################################################################
# Test of function definitions.
#
_t_e_s_t_f_u_n_c_()
{
return 0;
}
_test_func()
{
echo test;
}
if _t_e_s_t_f_u_n_c_ 2>${_NULL_DEV} && \
test _"$(_test_func 2>${_NULL_DEV})"_ = _test_
then
:;
else
echo 'Shell '"${_SHELL}"' does not support function definitions.' >&2;
exit "${_ERROR}";
fi;
########################################################################
# landmark (<text>)
#
# Print <text> to standard error as a debugging aid.
#
# Globals: $_DEBUG_LM
#
landmark()
{
if test _"${_DEBUG_LM}"_ = _yes_
then
echo "LM: $*" >&2;
fi;
} # landmark()
########################################################################
# test for compression.
#
export _HAS_COMPRESSION;
export _HAS_BZIP;
if test _"$(echo 'test' | gzip -c -d -f - 2>${_NULL_DEV})"_ = _test_
then
_HAS_COMPRESSION='yes';
if echo 'test' | bzip2 -c 2>${_NULL_DEV} | bzip2 -t 2>${_NULL_DEV} \
&& test _"$(echo 'test' | bzip2 -c 2>${_NULL_DEV} \
| bzip2 -d -c 2>${_NULL_DEV})"_ \
= _test_
then
_HAS_BZIP='yes';
else
_HAS_BZIP='no';
fi;
else
_HAS_COMPRESSION='no';
_HAS_BZIP='no';
fi;
########################################################################
# debug - diagnostic messages
########################################################################
export _DEBUG_FUNC_CHECK;
if test _"${_BEFORE_MAKE}"_ = _yes_
then
_DEBUG_FUNC_CHECK='yes';
else
_DEBUG_FUNC_CHECK='no';
fi;
_DEBUG_FUNC_CHECK='no'; # disable function checking
#_DEBUG_FUNC_CHECK='yes'; # enable function checking
export _DEBUG_STACKS;
_DEBUG_STACKS='no'; # disable stack output in each function
#_DEBUG_STACKS='yes'; # enable stack output in each function
export _DEBUG_USER_WITH_STACK;
_DEBUG_USER_WITH_STACK='no'; # disable stack dump in error_user()
#_DEBUG_USER_WITH_STACK='yes'; # enable stack dump in error_user()
export _DEBUG_LM;
_DEBUG_LM='no'; # disable landmark messages
#_DEBUG_LM='yes'; # enable landmark messages
export _DEBUG_KEEP_FILES;
_DEBUG_KEEP_FILES='no' # disable file keeping in temporary dir
#_DEBUG_KEEP_FILES='yes' # enable file keeping in temporary dir
export _DEBUG_PRINT_PARAMS;
_DEBUG_PRINT_PARAMS='no'; # disable printing of all parameters
#_DEBUG_PRINT_PARAMS='yes'; # enable printing of all parameters
export _DEBUG_PRINT_SHELL;
_DEBUG_PRINT_SHELL='no'; # disable printing of the shell name
#_DEBUG_PRINT_SHELL='yes'; # enable printing of the shell name
export _DEBUG_PRINT_TMPDIR;
_DEBUG_PRINT_TMPDIR='no'; # disable printing of the temporary dir
#_DEBUG_PRINT_TMPDIR='yes'; # enable printing of the temporary dir
export _DEBUG_PRINT_FILENAMES;
_DEBUG_PRINT_FILENAMES='no'; # disable printing of the found file names
#_DEBUG_PRINT_FILENAMES='yes'; # enable printing of the found file names
# determine all --debug* options
case " $*" in
*\ --deb*|*\ --d*-*)
# --debug-* options
d=' --debug-all --debug-filenames --debug-func --debug-not-func '\
'--debug-keep --debug-lm --debug-params --debug-shell --debug-stacks '\
'--debug-tmpdir --debug-user ';
# non-debug options with scheme --d*-*
n=' --do-nothing --default-modes --dvi-viewer --dvi-viewer-tty ';
for i
do
case "$i" in
--deb|--debu|--debug)
_DEBUG_FUNC_CHECK='yes';
# _DEBUG_STACKS='yes';
_DEBUG_USER_WITH_STACK='yes';
# _DEBUG_LM='yes';
_DEBUG_KEEP_FILES='yes';
_DEBUG_PRINT_PARAMS='yes';
_DEBUG_PRINT_SHELL='yes';
_DEBUG_PRINT_TMPDIR='yes';
_DEBUG_PRINT_FILENAMES='yes';
continue;
;;
--d*-*)
# before `-'
b="$(echo x"$i" | sed -e 's/^x--\([^-]*\)-.*$/\1/')";
# after `-'
a="$(echo x"$i" | sed -e 's/^x--[^-]*-\(.*\)$/\1/')";
;;
*)
continue;
;;
esac;
case "$n" in
*\ --$b*-$a*)
continue;
;;
esac;
case "$d" in
*\ --$b*-$a*)
case "$a" in
f|s) # double --debug-* options
continue;
;;
esac;
# extract whole word of double abbreviation
s="$(cat <<EOF | sed -n -e 's/^.* \(--'"$b"'[^ -]*-'"$a"'[^ ]*\) .*/\1/p'
$d
EOF
)"
case "$s" in
'') continue; ;;
--debug-all)
_DEBUG_FUNC_CHECK='yes';
_DEBUG_STACKS='yes';
_DEBUG_USER_WITH_STACK='yes';
_DEBUG_LM='yes';
_DEBUG_KEEP_FILES='yes';
_DEBUG_PRINT_PARAMS='yes';
_DEBUG_PRINT_SHELL='yes';
_DEBUG_PRINT_TMPDIR='yes';
_DEBUG_PRINT_FILENAMES='yes';
_DEBUG_PRINT_FILENAMES='yes';
;;
--debug-filenames)
_DEBUG_PRINT_FILENAMES='yes';
;;
--debug-func)
_DEBUG_FUNC_CHECK='yes';
;;
--debug-not-func)
_DEBUG_FUNC_CHECK='no';
_DEBUG_STACKS='no';
_DEBUG_USER_WITH_STACK='no';
;;
--debug-keep)
_DEBUG_PRINT_TMPDIR='yes';
_DEBUG_KEEP_FILES='yes';
;;
--debug-lm)
_DEBUG_LM='yes';
;;
--debug-params)
_DEBUG_PRINT_PARAMS='yes';
;;
--debug-shell)
_DEBUG_PRINT_SHELL='yes';
;;
--debug-stacks)
_DEBUG_STACKS='yes';
;;
--debug-tmpdir)
_DEBUG_PRINT_TMPDIR='yes';
;;
--debug-user)
_DEBUG_USER_WITH_STACK='yes';
;;
esac;
;;
esac;
done
;;
esac;
if test _"${_DEBUG_STACKS}"_ = _yes_ || \
test _"${_DEBUG_USER_WITH_STACK}"_ = _yes_
then
_DEBUG_FUNC_CHECK='yes';
fi
if test _"${_DEBUG_PRINT_PARAMS}"_ = _yes_
then
echo "parameters: $@" >&2;
fi;
if test _"${_DEBUG_PRINT_SHELL}"_ = _yes_
then
if test _"${_SHELL}"_ = __
then
if test _"${POSIXLY_CORRECT}"_ = _y_
then
echo 'shell: bash as /bin/sh (none specified)' >&2;
else
echo 'shell: /bin/sh (none specified)' >&2;
fi;
else
echo "shell: ${_SHELL}" >&2;
fi;
fi;
########################################################################
# Environment Variables
########################################################################
landmark "1: environment variables";
# Environment variables that exist only for this file start with an
# underscore letter. Global variables to this file are written in
# upper case letters, e.g. $_GLOBAL_VARIABLE; temporary variables
# start with an underline and use only lower case letters and
# underlines, e.g. $_local_variable.
# [A-Z]* system variables, e.g. $MANPATH
# _[A-Z_]* global file variables, e.g. $_MAN_PATH
# _[a-z_]* temporary variables, e.g. $_manpath
# Due to incompatibilities of the `ash' shell, the name of loop
# variables in `for' must be a single character.
# [a-z] local loop variables, e.g. $i
# In functions, other writings are used for variables. As some shells
# do not support the `local' command a unique prefix in lower case is
# constructed for each function, most are the abbreviation of the
# function name. All variable names start with this prefix.
# ${prefix}_[a-z_]* variable name in a function, e.g. $msm_modes
########################################################################
# read-only variables (global to this file)
########################################################################
# function return values; `0' means ok; other values are error codes
export _BAD;
export _GOOD;
export _NO;
export _OK;
export _YES;
_GOOD='0'; # return ok
_BAD='1'; # return negatively, error code `1'
# $_ERROR was already defined as `7' in groffer.sh.
_NO="${_BAD}";
_YES="${_GOOD}";
_OK="${_GOOD}";
# quasi-functions, call with `eval', e.g `eval "${return_ok}"'
export return_ok;
export return_good;
export return_bad;
export return_yes;
export return_no;
export return_error;
export return_var;
return_ok="func_pop; return ${_OK}";
return_good="func_pop; return ${_GOOD}";
return_bad="func_pop; return ${_BAD}";
return_yes="func_pop; return ${_YES}";
return_no="func_pop; return ${_NO}";
return_error="func_pop; return ${_ERROR}";
return_var="func_pop; return"; # add number, e.g. `eval "${return_var} $n'
export _DEFAULT_MODES;
_DEFAULT_MODES="'pdf' 'html' 'ps' 'x' 'dvi' 'tty'";
export _DEFAULT_RESOLUTION;
_DEFAULT_RESOLUTION='75';
export _DEFAULT_TTY_DEVICE;
_DEFAULT_TTY_DEVICE='latin1';
# _VIEWER_* viewer programs for different modes constructed as lists
export _VIEWER_DVI_TTY; # viewer program for dvi mode in tty
export _VIEWER_DVI_X; # viewer program for dvi mode in X
export _VIEWER_HTML_TTY; # viewer program for html mode in tty
export _VIEWER_HTML_X; # viewer program for html mode in X
export _VIEWER_PDF_TTY; # viewer program for pdf mode in tty
export _VIEWER_PDF_X; # viewer program for pdf mode in X
export _VIEWER_PS_TTY; # viewer program for ps mode in tty
export _VIEWER_PS_X; # viewer program for ps mode in X
export _VIEWER_TTY_TTY; # viewer program for X/x mode in tty
export _VIEWER_TTY_X; # viewer program for X/x mode in X
export _VIEWER_X_TTY; # viewer program for X/x mode in tty
export _VIEWER_X_X; # viewer program for X/x mode in X
_VIEWER_DVI_TTY="";
_VIEWER_DVI_X="'kdvi' 'xdvi' 'dvilx'";
_VIEWER_HTML_TTY="'lynx' 'w3m'";
_VIEWER_HTML_X="'konqueror' 'epiphany' 'mozilla-firefox' 'firefox' 'mozilla' \
'netscape' 'galeon' 'opera' 'amaya' 'arena' 'mosaic'";
_VIEWER_PDF_TTY="";
_VIEWER_PDF_X="'kpdf' 'acroread' 'evince' 'xpdf -z 150' 'gpdf' \
'kghostview --scale 1.45' 'ggv'";
_VIEWER_PS_TTY="";
_VIEWER_PS_X="'kpdf' 'kghostview --scale 1.45' 'evince' 'ggv' 'gv' \
'ghostview' 'gs_x11,gs'";
_VIEWER_TTY_TTY="'less -r -R' 'more' 'pager'";
_VIEWER_TTY_X="'xless'";
_VIEWER_X_TTY="";
_VIEWER_X_X="'gxditview' 'xditview'";
# Search automatically in standard sections `1' to `8', and in the
# traditional sections `9', `n', and `o'. On many systems, there
# exist even more sections, mostly containing a set of man pages
# special to a specific program package. These aren't searched for
# automatically, but must be specified on the command line.
export _MAN_AUTO_SEC_LIST;
_MAN_AUTO_SEC_LIST="'1' '2' '3' '4' '5' '6' '7' '8' '9' 'n' 'o'";
export _MAN_AUTO_SEC_CHARS;
_MAN_AUTO_SEC_CHARS='[123456789no]';
export _SPACE_SED;
_SPACE_SED='['"${_SP}${_TAB}"']';
export _SPACE_CASE;
_SPACE_CASE='[\'"${_SP}"'\'"${_TAB}"']';
export _PROCESS_ID; # for shutting down the program
_PROCESS_ID="$$";
export _START_DIR; # directory at start time of the script
_START_DIR="$(pwd)";
############ the command line options of the involved programs
#
# The naming scheme for the options environment names is
# $_OPTS_<prog>_<length>[_<argspec>]
#
# <prog>: program name GROFFER, GROFF, or CMDLINE (for all
# command line options)
# <length>: LONG (long options) or SHORT (single character options)
# <argspec>: ARG for options with argument, NA for no argument;
# without _<argspec> both the ones with and without arg.
#
# Each option that takes an argument must be specified with a
# trailing : (colon).
# exports
export _OPTS_GROFFER_SHORT_NA;
export _OPTS_GROFFER_SHORT_ARG;
export _OPTS_GROFFER_LONG_NA;
export _OPTS_GROFFER_LONG_ARG;
export _OPTS_GROFF_SHORT_NA;
export _OPTS_GROFF_SHORT_ARG;
export _OPTS_GROFF_LONG_NA;
export _OPTS_GROFF_LONG_ARG;
export _OPTS_X_SHORT_ARG;
export _OPTS_X_SHORT_NA;
export _OPTS_X_LONG_ARG;
export _OPTS_X_LONG_NA;
export _OPTS_MAN_SHORT_ARG;
export _OPTS_MAN_SHORT_NA;
export _OPTS_MAN_LONG_ARG;
export _OPTS_MAN_LONG_NA;
export _OPTS_MANOPT_SHORT_ARG;
export _OPTS_MANOPT_SHORT_NA;
export _OPTS_MANOPT_LONG_ARG;
export _OPTS_MANOPT_LONG_NA;
export _OPTS_CMDLINE_SHORT_NA;
export _OPTS_CMDLINE_SHORT_ARG;
export _OPTS_CMDLINE_LONG_NA;
export _OPTS_CMDLINE_LONG_ARG;
###### groffer native options
_OPTS_GROFFER_SHORT_NA="'h' 'Q' 'v' 'V' 'X' 'Z'";
_OPTS_GROFFER_SHORT_ARG="'T'";
_OPTS_GROFFER_LONG_NA="'auto' \
'apropos' 'apropos-data' 'apropos-devel' 'apropos-progs' \
'debug' 'debug-all' 'debug-filenames' \
'debug-func' 'debug-not-func' 'debug-keep' 'debug-lm' \
'debug-params' 'debug-shell' 'debug-stacks' 'debug-tmpdir' 'debug-user' \
'default' 'do-nothing' 'dvi' 'groff' 'help' 'intermediate-output' 'html' \
'man' 'no-location' 'no-man' 'no-special' 'pdf' 'ps' 'rv' 'source' \
'text' 'to-stdout' 'text-device' 'tty' 'tty-device' \
'version' 'whatis' 'www' 'x' 'X'";
_OPTS_GROFFER_LONG_ARG="\
'default-modes' 'device' 'dvi-viewer' 'dvi-viewer-tty' 'extension' 'fg' \
'fn' 'font' 'foreground' 'html-viewer' 'html-viewer-tty' 'mode' \
'pdf-viewer' 'pdf-viewer-tty' 'print' 'ps-viewer' 'ps-viewer-tty' 'shell' \
'title' 'tty-viewer' 'tty-viewer-tty' 'www-viewer' 'www-viewer-tty' \
'x-viewer' 'x-viewer-tty' 'X-viewer' 'X-viewer-tty'";
##### groffer options inhereted from groff
_OPTS_GROFF_SHORT_NA="'a' 'b' 'c' 'C' 'e' 'E' 'g' 'G' 'i' 'k' 'l' 'N' 'p' \
'R' 's' 'S' 't' 'U' 'z'";
_OPTS_GROFF_SHORT_ARG="'d' 'f' 'F' 'I' 'L' 'm' 'M' 'n' 'o' 'P' 'r' \
'w' 'W'";
_OPTS_GROFF_LONG_NA="";
_OPTS_GROFF_LONG_ARG="";
##### groffer options inhereted from the X Window toolkit
_OPTS_X_SHORT_NA="";
_OPTS_X_SHORT_ARG="";
_OPTS_X_LONG_NA="'iconic' 'rv'";
_OPTS_X_LONG_ARG="'background' 'bd' 'bg' 'bordercolor' 'borderwidth' \
'bw' 'display' 'fg' 'fn' 'font' 'foreground' 'ft' 'geometry' \
'resolution' 'title' 'xrm'";
###### groffer options inherited from man
_OPTS_MAN_SHORT_NA="";
_OPTS_MAN_SHORT_ARG="";
_OPTS_MAN_LONG_NA="'all' 'ascii' 'catman' 'ditroff' \
'local-file' 'location' 'troff' 'update' 'where'";
_OPTS_MAN_LONG_ARG="'locale' 'manpath' \
'pager' 'preprocessor' 'prompt' 'sections' 'systems' 'troff-device'";
###### additional options for parsing $MANOPT only
_OPTS_MANOPT_SHORT_NA="'7' 'a' 'c' 'd' 'D' 'f' 'h' 'k' 'l' 't' 'u' \
'V' 'w' 'Z'";
_OPTS_MANOPT_SHORT_ARG="'e' 'L' 'm' 'M' 'p' 'P' 'r' 'S' 'T'";
_OPTS_MANOPT_LONG_NA="${_OPTS_MAN_LONG_NA} \
'apropos' 'debug' 'default' 'help' 'html' 'ignore-case' 'location-cat' \
'match-case' 'troff' 'update' 'version' 'whatis' 'where' 'where-cat'";
_OPTS_MANOPT_LONG_ARG="${_OPTS_MAN_LONG_NA} \
'config_file' 'encoding' 'extension' 'locale'";
###### collections of command line options
_OPTS_CMDLINE_SHORT_NA="${_OPTS_GROFFER_SHORT_NA} \
${_OPTS_GROFF_SHORT_NA} ${_OPTS_X_SHORT_NA} ${_OPTS_MAN_SHORT_NA}";
_OPTS_CMDLINE_SHORT_ARG="${_OPTS_GROFFER_SHORT_ARG} \
${_OPTS_GROFF_SHORT_ARG} ${_OPTS_X_SHORT_ARG} ${_OPTS_MAN_SHORT_ARG}";
_OPTS_CMDLINE_LONG_NA="${_OPTS_GROFFER_LONG_NA} \
${_OPTS_GROFF_LONG_NA} ${_OPTS_X_LONG_NA} ${_OPTS_MAN_LONG_NA}";
_OPTS_CMDLINE_LONG_ARG="${_OPTS_GROFFER_LONG_ARG} \
${_OPTS_GROFF_LONG_ARG} ${_OPTS_MAN_LONG_ARG} ${_OPTS_X_LONG_ARG}";
########################################################################
# read-write variables (global to this file)
########################################################################
export _ALL_PARAMS; # All options and file name parameters
export _ADDOPTS_GROFF; # Transp. options for groff (`eval').
export _APROPOS_PROG; # Program to run apropos.
export _APROPOS_SECTIONS; # Sections for different --apropos-*.
export _DISPLAY_MODE; # Display mode.
export _DISPLAY_PROG; # Viewer program to be used for display.
export _DISPLAY_ARGS; # X resources for the viewer program.
export _FILE_NR; # number for temporary `,file,*'
export _FILEARGS; # Stores filespec parameters.
export _FILESPEC_ARG; # Stores the actual filespec parameter.
export _FILESPEC_IS_MAN; # filespec is for searching a man page
export _FUNC_STACK; # Store debugging information.
export _MACRO_PACKAGES; # groff's macro packages.
export _MACRO_PKG; # Macro package for each found file.
export _NO_FILESPECS; # Yes, if there are no filespec arguments.
export _OUTPUT_FILE_NAME; # output generated, see main_set_res..()
export _REG_TITLE_LIST; # Processed file names.
export _SOELIM_R; # option -r for soelim
export _SPECIAL_FILESPEC; # Filespec ran for apropos or whatis.
export _SPECIAL_SETUP; # Test on setup for apropos or whatis.
export _VIEWER_BACKGROUND; # viewer shall be run in the background or not
# _MAN_* finally used configuration of man searching
export _MAN_ALL; # search all man pages per filespec
export _MAN_ENABLE; # enable search for man pages
export _MAN_EXT; # extension for man pages
export _MAN_FORCE; # force file parameter to be man pages
export _MAN_IS_SETUP; # setup man variables only once
export _MAN_LANG; # language for man pages
export _MAN_LANG2; # language for man pages
export _MAN_PATH; # search path for man pages as a list
export _MAN_SEC; # sections for man pages; sep. `:'
export _MAN_SEC_CHARS; # sections for man pages as [] construct
export _MAN_SEC_LIST; # sections for man pages as a list
export _MAN_SYS; # system names for man pages as a list
# _MANOPT_* as parsed from $MANOPT
export _MANOPT_ALL; # $MANOPT --all
export _MANOPT_EXTENSION; # $MANOPT --extension
export _MANOPT_LANG; # $MANOPT --locale
export _MANOPT_PATH; # $MANOPT --manpath
export _MANOPT_PAGER; # $MANOPT --pager
export _MANOPT_SEC; # $MANOPT --sections
export _MANOPT_SYS; # $MANOPT --systems
# variables for mode pdf
export _PDF_DID_NOT_WORK;
export _PDF_HAS_GS;
export _PDF_HAS_PS2PDF;
# _OPT_* as parsed from groffer command line
export _OPT_ALL; # display all suitable man pages
export _OPT_APROPOS; # call `apropos' program
export _OPT_BD; # set border color in some modes
export _OPT_BG; # set background color in some modes
export _OPT_BW; # set border width in some modes
export _OPT_DEFAULT_MODES; # `,'-list of modes when no mode given
export _OPT_DEVICE; # device option
export _OPT_DO_NOTHING; # do nothing in main_display()
export _OPT_DISPLAY; # set X display
export _OPT_EXTENSION; # set extension for man page search
export _OPT_FG; # set foreground color in some modes
export _OPT_FN; # set font in some modes
export _OPT_GEOMETRY; # set size and position of viewer in X
export _OPT_ICONIC; # -iconic option for X viewers
export _OPT_LANG; # set language for man pages
export _OPT_MODE; # values: X, tty, Q, Z, ""
export _OPT_MANPATH; # manual setting of path for man-pages
export _OPT_PAGER; # specify paging program for tty mode
export _OPT_RESOLUTION; # set X resolution in dpi
export _OPT_RV; # reverse fore- and background colors
export _OPT_SECTIONS; # sections for man page search
export _OPT_STDOUT; # print mode file to standard output
export _OPT_SYSTEMS; # man pages of different OS's
export _OPT_TITLE; # title for gxditview window
export _OPT_TEXT_DEVICE; # set device for tty mode
export _OPT_V; # groff option -V
export _OPT_VIEWER_DVI; # viewer program for dvi mode
export _OPT_VIEWER_HTML; # viewer program for html mode
export _OPT_VIEWER_PDF; # viewer program for pdf mode
export _OPT_VIEWER_PS; # viewer program for ps mode
export _OPT_VIEWER_X; # viewer program for x mode
export _OPT_WHATIS; # print the man description
export _OPT_XRM; # specify X resource
export _OPT_Z; # groff option -Z
# _TMP_* temporary directory and files
export _TMP_DIR; # groffer directory for temporary files
export _TMP_CAT; # stores concatenation of everything
export _TMP_MAN; # stores find of man path
export _TMP_MANSPEC; # filters man pages with filespec
export _TMP_STDIN; # stores stdin, if any
# these variables are preset in section `Preset' after the rudim. test
########################################################################
# Preset and reset of read-write global variables
########################################################################
# For variables that can be reset by option `--default', see reset().
_FILE_NR=0;
_FILEARGS='';
_MACRO_PACKAGES="'-man' '-mdoc' '-me' '-mm' '-mom' '-ms'";
_SPECIAL_FILESPEC='no';
_SPECIAL_SETUP='no';
# _TMP_* temporary files
_TMP_DIR='';
_TMP_CAT='';
_TMP_MAN='';
_TMP_CONF='';
_TMP_STDIN='';
# variables for mode pdf
_PDF_DID_NOT_WORK='no';
_PDF_HAS_GS='no';
_PDF_HAS_PS2PDF='no';
# option -r for soelim
if echo -n '' | soelim -r 2>${_NULL_DEV} >${_NULL_DEV}
then
_SOELIM_R='-r';
else
_SOELIM_R='';
fi;
########################################################################
# reset ()
#
# Reset the variables that can be affected by options to their default.
#
reset()
{
if test "$#" -ne 0
then
error "reset() does not have arguments.";
fi;
_ADDOPTS_GROFF='';
_APROPOS_PROG='';
_APROPOS_SECTIONS='';
_DISPLAY_ARGS='';
_DISPLAY_MODE='';
_DISPLAY_PROG='';
_MACRO_PKG='';
_NO_FILESPECS='';
_REG_TITLE_LIST='';
# _MAN_* finally used configuration of man searching
_MAN_ALL='no';
_MAN_ENABLE='yes'; # do search for man-pages
_MAN_EXT='';
_MAN_FORCE='no'; # first local file, then search man page
_MAN_IS_SETUP='no';
_MAN_LANG='';
_MAN_LANG2='';
_MAN_PATH='';
_MAN_SEC='';
_MAN_SEC_CHARS='';
_MAN_SEC_LIST='';
_MAN_SYS='';
# _MANOPT_* as parsed from $MANOPT
_MANOPT_ALL='no';
_MANOPT_EXTENSION='';
_MANOPT_LANG='';
_MANOPT_PATH='';
_MANOPT_PAGER='';
_MANOPT_SEC='';
_MANOPT_SYS='';
# _OPT_* as parsed from groffer command line
_OPT_ALL='no';
_OPT_APROPOS='no';
_OPT_BD='';
_OPT_BG='';
_OPT_BW='';
_OPT_DEFAULT_MODES='';
_OPT_DEVICE='';
_OPT_DISPLAY='';
_OPT_DO_NOTHING='no';
_OPT_EXTENSION='';
_OPT_FG='';
_OPT_FN='';
_OPT_GEOMETRY='';
_OPT_ICONIC='no';
_OPT_LANG='';
_OPT_MODE='';
_OPT_MANPATH='';
_OPT_PAGER='';
_OPT_RESOLUTION='';
_OPT_RV='no';
_OPT_SECTIONS='';
_OPT_SYSTEMS='';
_OPT_STDOUT='no';
_OPT_TITLE='';
_OPT_TEXT_DEVICE='';
_OPT_V='no';
_OPT_VIEWER_DVI='';
_OPT_VIEWER_PDF='';
_OPT_VIEWER_PS='';
_OPT_VIEWER_HTML='';
_OPT_VIEWER_X='';
_OPT_WHATIS='no';
_OPT_XRM='';
_OPT_Z='no';
_VIEWER_BACKGROUND='no';
}
reset;
########################################################################
# Preliminary functions for error handling
########################################################################
landmark "2: preliminary functions";
# These functions do not have a func-check frame. Basically they could be
# moved to the functions in alphabetical order.
##############
# echo1 (<text>*)
#
# Output to stdout with final line break.
#
# Arguments : arbitrary text including `-'.
#
echo1()
{
cat <<EOF
$@
EOF
} # echo1()
##############
# echo2 (<text>*)
#
# Output to stderr with final line break.
#
# Arguments : arbitrary text including `-'.
#
echo2()
{
cat >&2 <<EOF
$@
EOF
} # echo2()
##############
# clean_up ()
#
# Clean up at exit.
#
cu_already='no';
clean_up()
{
cd "${_START_DIR}" >"${_NULL_DEV}" 2>&1;
if test _${_DEBUG_KEEP_FILES}_ = _yes_
then
if test _"$cu_already"_ = _yes_
then
eval "${return_ok}";
fi;
cu_already=yes;
echo2 "Kept temporary directory ${_TMP_DIR}."
else
if test _"${_TMP_DIR}"_ != __
then
if test -e "${_TMP_DIR}"
then
rm -f -r "${_TMP_DIR}" >${_NULL_DEV} 2>&1;
fi;
fi;
fi;
eval "${return_ok}";
} # clean_up()
#############
# diag (text>*)
#
# Output a diagnostic message to stderr.
#
diag()
{
echo2 '>>>>>'"$*";
} # diag()
#############
# error (<text>*)
#
# Print an error message to standard error, print the function stack,
# exit with an error condition. The argument should contain the name
# of the function from which it was called. This is for system errors.
#
error()
{
case "$#" in
1) echo2 'groffer error: '"$1"; ;;
*) echo2 'groffer error: wrong number of arguments in error().'; ;;
esac;
func_stack_dump;
if test _"${_TMP_DIR}"_ != __ && test -d "${_TMP_DIR}"
then
: >"${_TMP_DIR}"/,error;
fi;
exit "${_ERROR}";
} # error()
#############
# error_user (<text>*)
#
# Print an error message to standard error; exit with an error condition.
# The error is supposed to be produced by the user. So the funtion stack
# is omitted.
#
error_user()
{
case "$#" in
1)
echo2 'groffer error: '"$1";
;;
*)
echo2 'groffer error: wrong number of arguments in error_user().';
;;
esac;
if test _"${_DEBUG_USER_WITH_STACK}"_ = _yes_
then
func_stack_dump;
fi;
if test _"${_TMP_DIR}"_ != __ && test -d "${_TMP_DIR}"
then
: >"${_TMP_DIR}"/,error;
fi;
exit "${_ERROR}";
} # error_user()
#############
# exit_test ()
#
# Test whether the former command ended with error(). Exit again.
#
# Globals: $_ERROR
#
exit_test()
{
if test "$?" = "${_ERROR}"
then
exit ${_ERROR};
fi;
if test _"${_TMP_DIR}"_ != __ && test -f "${_TMP_DIR}"/,error
then
exit ${_ERROR};
fi;
} # exit_test()
########################################################################
# Definition of normal Functions in alphabetical order
########################################################################
landmark "3: functions";
########################################################################
# apropos_filespec ()
#
# Compose temporary file for filspec.
#
# Globals: in: $_OPT_APROPOS, $_SPECIAL_SETUP, $_FILESPEC_ARG,
# $_APROPOS_PROG, $_APROPOS_SECTIONS, $_OPT_SECTIONS
# out: $_SPECIAL_FILESPEC
#
# Variable prefix: af
#
apropos_filespec()
{
func_check apropos_filespec '=' 0 "$@";
if obj _OPT_APROPOS is_yes
then
if obj _SPECIAL_SETUP is_not_yes
then
error 'apropos_filespec(): apropos_setup() must be run first.';
fi;
_SPECIAL_FILESPEC='yes';
if obj _NO_FILESPECS is_yes
then
to_tmp_line '.SH no filespec';
eval "${_APROPOS_PROG}" | sed -e 's/^/\\\&/' >>"${_TMP_CAT}";
eval "${return_ok}";
fi;
eval to_tmp_line \
"'.SH $(echo1 "${_FILESPEC_ARG}" | sed 's/[^\\]-/\\-/g')'";
exit_test;
if obj _APROPOS_SECTIONS is_empty
then
if obj _OPT_SECTIONS is_empty
then
s='^.*(..*).*$';
else
s='^.*(['"$(echo1 "${_OPT_SECTIONS}" | sed -e 's/://g')"']';
fi;
else
s='^.*(['"${_APROPOS_SECTIONS}"']';
fi;
### apropos_filespec()
af_filespec="$(echo1 "${_FILESPEC_ARG}" | sed -e '
s,/,\\/,g
s/\./\\./g
')";
eval "${_APROPOS_PROG}" "'${_FILESPEC_ARG}'" | \
sed -n -e '
/^'"${af_filespec}"': /s/^\(.*\)$/\\\&\1/p
/'"$s"'/p
' | \
sort |\
sed -e '
s/^\(.*(..*).*\) *- *\(.*\)$/\.br\n\.TP 15\n\.BR \"\1\"\n\\\&\2/
' >>"${_TMP_CAT}";
eval ${_UNSET} af_filespec;
eval "${return_ok}";
else
eval "${return_bad}";
fi;
} # apropos_filespec()
########################################################################
# apropos_setup ()
#
# Setup for the --apropos* options, just 2 global variables are set.
#
# Globals: in: $_OPT_APROPOS
# out: $_SPECIAL_SETUP, $_APROPOS_PROG
#
apropos_setup()
{
func_check apropos_setup '=' 0 "$@";
if obj _OPT_APROPOS is_yes
then
if is_prog apropos
then
_APROPOS_PROG='apropos';
elif is_prog man
then
if man --apropos man >${_NULL_DEV} 2>${_NULL_DEV}
then
_APROPOS_PROG='man --apropos';
elif man -k man >${_NULL_DEV} 2>${_NULL_DEV}
then
_APROPOS_PROG='man -k';
fi;
fi;
if obj _APROPOS_PROG is_empty
then
error 'apropos_setup(): no apropos program available.';
fi;
to_tmp_line '.TH GROFFER APROPOS';
_SPECIAL_SETUP='yes';
if obj _OPT_TITLE is_empty
then
_OPT_TITLE='apropos';
fi;
eval "${return_ok}";
else
eval "${return_bad}";
fi;
} # apropos_setup()
########################################################################
# base_name (<path>)
#
# Get the file name part of <path>, i.e. delete everything up to last
# `/' from the beginning of <path>. Remove final slashes, too, to get
# a non-empty output. The output is constructed according the shell
# program `basename'.
#
# Arguments : 1
# Output : the file name part (without slashes)
#
# Variable prefix: bn
#
base_name()
{
func_check base_name = 1 "$@";
bn_name="$1";
case "${bn_name}" in
*/)
# delete all final slashes
bn_name="$(echo1 "${bn_name}" | sed -e 's|//*$||')";
exit_test;
;;
esac;
case "${bn_name}" in
'')
eval ${_UNSET} bn_name;
eval "${return_bad}";
;;
/)
# this is like `basename' does
echo1 '/';
;;
*/*)
# delete everything before and including the last slash `/'.
echo1 "${bn_name}" | sed -e 's|^.*//*\([^/]*\)$|\1|';
;;
*)
obj bn_name echo1;
;;
esac;
eval ${_UNSET} bn_name;
eval "${return_ok}";
} # base_name()
########################################################################
# cat_z (<file>)
#
# Decompress if possible or just print <file> to standard output.
# gzip, bzip2, and .Z decompression is supported.
#
# Arguments: 1, a file name.
# Output: the content of <file>, possibly decompressed.
#
cat_z()
{
func_check cat_z = 1 "$@";
case "$1" in
'')
error 'cat_z(): empty file name.';
;;
'-')
error 'cat_z(): for standard input use save_stdin().';
;;
esac;
if is_file "$1"
then
:;
else
error 'cat_z(): argument $1 is not a file.';
fi;
if test -s "$1"
then
:;
else
eval "${return_ok}";
fi;
if obj _HAS_COMPRESSION is_yes
then
if obj _HAS_BZIP is_yes
then
# test whether being compressed with bz2
if bzip2 -t "$1" 2>${_NULL_DEV}
then
bzip2 -c -d "$1" 2>${_NULL_DEV};
eval "${return_ok}";
fi;
fi;
# if not compressed gzip acts like `cat'
gzip -c -d -f "$1" 2>${_NULL_DEV};
else
cat "$1";
fi;
eval "${return_ok}";
} # cat_z()
########################################################################
# clean_up ()
#
# Do the final cleaning up before exiting; used by the trap calls.
#
# defined above
########################################################################
# diag (<text>*)
#
# Print marked message to standard error; useful for debugging.
#
# defined above
########################################################################
landmark '4: dir_name()*';
########################################################################
#######################################################################
# dir_name (<name>)
#
# Get the directory name of <name>. The output is constructed
# according to the shell program `dirname'.
#
# Arguments : 1
# Output : the directory part of <name>
#
# Variable prefix: dn
#
dir_name()
{
func_check dir_name = 1 "$@";
obj_from_output dn_name dir_name_chop "$1";
case "${dn_name}" in
''|.)
echo1 '.';
;;
/)
echo1 '/';
;;
*/*)
echo1 "$(echo1 "${dn_name}" | sed 's#/*[^/][^/]*$##')";
;;
*)
echo1 "${dn_name}";
;;
esac;
eval "${return_ok}";
} # dir_name()
#######################################################################
# dir_name_append (<dir> <name>)
#
# Append `name' to `dir' with clean handling of `/'.
#
# Arguments : 2
# Output : the generated new directory name <dir>/<name>
#
dir_name_append()
{
func_check dir_name_append = 2 "$@";
if is_empty "$1"
then
echo1 "$2";
elif is_empty "$2"
then
echo1 "$1";
else
dir_name_chop "$1"/"$2";
fi;
eval "${return_ok}";
} # dir_name_append()
########################################################################
# dir_name_chop (<name>)
#
# Remove unnecessary slashes from directory name.
#
# Argument: 1, a directory name.
# Output: path without double, or trailing slashes.
#
# Variable prefix: dc
#
dir_name_chop()
{
func_check dir_name_chop = 1 "$@";
# replace all multiple slashes by a single slash `/'.
dc_res="$(echo1 "$1" | sed -e 's|///*|/|g')";
exit_test;
case "${dc_res}" in
?*/)
# remove trailing slash '/';
echo1 "${dc_res}" | sed -e 's|/$||';
;;
*)
obj dc_res echo1
;;
esac;
eval ${_UNSET} dc_res;
eval "${return_ok}";
} # dir_name_chop()
########################################################################
# do_nothing ()
#
# Dummy function that does nothing.
#
do_nothing()
{
eval return "${_OK}";
} # do_nothing()
########################################################################
# echo1 (<text>*)
#
# Print to standard output with final line break.
#
# defined above
########################################################################
# echo2 (<text>*)
#
# Print to standard error with final line break.
#
# defined above
########################################################################
# error (<text>*)
#
# Print error message and exit with error code.
#
# defined above
########################################################################
# exit_test ()
#
# Test whether the former command ended with error(). Exit again.
#
# defined above
if test _"${_DEBUG_FUNC_CHECK}"_ = _yes_
then
#############
# func_check (<func_name> <rel_op> <nr_args> "$@")
#
# This is called at the first line of each function. It checks the
# number of arguments of function <func_name> and registers the
# function call to _FUNC_STACK.
#
# Arguments: >=3
# <func_name>: name of the calling function.
# <rel_op>: a relational operator: = != < > <= >=
# <nr_args>: number of arguments to be checked against <operator>
# "$@": the arguments of the calling function.
#
# Variable prefix: fc
#
func_check()
{
if test "$#" -lt 3
then
error 'func_check() needs at least 3 arguments.';
fi;
fc_fname="$1";
case "$3" in
1)
fc_nargs="$3";
fc_s='';
;;
0|[2-9])
fc_nargs="$3";
fc_s='s';
;;
*)
error "func_check(): third argument must be a digit.";
;;
esac;
### func_check()
case "$2" in
'='|'-eq')
fc_op='-eq';
fc_comp='exactly';
;;
'>='|'-ge')
fc_op='-ge';
fc_comp='at least';
;;
'<='|'-le')
fc_op='-le';
fc_comp='at most';
;;
'<'|'-lt')
fc_op='-lt';
fc_comp='less than';
;;
'>'|'-gt')
fc_op='-gt';
fc_comp='more than';
;;
'!='|'-ne')
fc_op='-ne';
fc_comp='not';
;;
### func_check()
*)
error \
'func_check(): second argument is not a relational operator.';
;;
esac;
shift;
shift;
shift;
if test "$#" "${fc_op}" "${fc_nargs}"
then
do_nothing;
else
error "func_check(): \
${fc_fname}"'() needs '"${fc_comp} ${fc_nargs}"' argument'"${fc_s}"'.';
fi;
func_push "${fc_fname}";
if test _"${_DEBUG_STACKS}"_ = _yes_
then
echo2 '+++ '"${fc_fname} $@";
echo2 '>>> '"${_FUNC_STACK}";
fi;
eval ${_UNSET} fc_comp;
eval ${_UNSET} fc_fname;
eval ${_UNSET} fc_nargs;
eval ${_UNSET} fc_op;
eval ${_UNSET} fc_s;
} # func_check()
#############
# func_pop ()
#
# Retrieve the top element from the function stack. This is called
# by every return variable in each function.
#
# The stack elements are separated by `!'; the popped element is
# identical to the original element, except that all `!' characters
# were removed.
#
# Arguments: 1
#
func_pop()
{
if test "$#" -ne 0
then
error 'func_pop() does not have arguments.';
fi;
case "${_FUNC_STACK}" in
'')
if test _"${_DEBUG_STACKS}"_ = _yes_
then
error 'func_pop(): stack is empty.';
fi;
;;
*!*)
# split at first bang `!'.
_FUNC_STACK="$(echo1 "${_FUNC_STACK}" | sed -e 's/^[^!]*!//')";
exit_test;
;;
*)
_FUNC_STACK='';
;;
esac;
if test _"${_DEBUG_STACKS}"_ = _yes_
then
echo2 '<<< '"${_FUNC_STACK}";
fi;
} # func_pop()
#############
# func_push (<element>)
#
# Store another element to the function stack. This is called by
# func_check() at the beginning of each function.
#
# The stack elements are separated by `!'; if <element> contains a `!'
# it is removed first.
#
# Arguments: 1
#
# Variable prefix: fp
#
func_push()
{
if test "$#" -ne 1
then
error 'func_push() needs 1 argument.';
fi;
case "$1" in
*'!'*)
# remove all bangs `!'.
fp_element="$(echo1 "$1" | sed -e 's/!//g')";
exit_test;
;;
*)
fp_element="$1";
;;
esac;
if test _"${_FUNC_STACK}"_ = __
then
_FUNC_STACK="${fp_element}";
else
_FUNC_STACK="${fp_element}!${_FUNC_STACK}";
fi;
eval ${_UNSET} fp_element;
} # func_push()
#############
# func_stack_dump ()
#
# Print the content of the function stack. Ignore the arguments.
#
func_stack_dump()
{
diag 'call stack(): '"${_FUNC_STACK}";
} # func_stack_dump()
else # $_DEBUG_FUNC_CHECK is not `yes'
func_check() { return; }
func_pop() { return; }
func_push() { return; }
func_stack_dump() { return; }
fi; # test of $_DEBUG_FUNC_CHECK
########################################################################
# get_first_essential (<arg>*)
#
# Retrieve first non-empty argument.
#
# Return : `1' if all arguments are empty, `0' if found.
# Output : the retrieved non-empty argument.
#
# Variable prefix: gfe
#
get_first_essential()
{
func_check get_first_essential '>=' 0 "$@";
if is_equal "$#" 0
then
eval "${return_ok}";
fi;
for i
do
gfe_var="$i";
if obj gfe_var is_not_empty
then
obj gfe_var echo1;
eval ${_UNSET} gfe_var;
eval "${return_ok}";
fi;
done;
eval ${_UNSET} gfe_var;
eval "${return_bad}";
} # get_first_essential()
########################################################################
landmark '5: is_*()';
########################################################################
########################################################################
# is_dir (<name>)
#
# Test whether `name' is a readable directory.
#
# Arguments : 1
# Return : `0' if arg1 is a directory, `1' otherwise.
#
is_dir()
{
func_check is_dir '=' 1 "$@";
if is_not_empty "$1" && test -d "$1" && test -r "$1"
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_dir()
########################################################################
# is_empty (<string>)
#
# Test whether <string> is empty.
#
# Arguments : <=1
# Return : `0' if arg1 is empty or does not exist, `1' otherwise.
#
is_empty()
{
func_check is_empty '=' 1 "$@";
if test _"$1"_ = __
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_empty()
########################################################################
# is_empty_file (<file_name>)
#
# Test whether <file_name> is an empty existing file.
#
# Arguments : <=1
# Return :
# `0' if arg1 is an empty existing file
# `1' otherwise
#
is_empty_file()
{
func_check is_empty_file '=' 1 "$@";
if is_file "$1"
then
if test -s "$1"
then
eval "${return_no}";
else
eval "${return_yes}";
fi;
fi;
eval "${return_no}";
} # is_empty_file()
########################################################################
# is_equal (<string1> <string2>)
#
# Test whether <string1> is equal to <string2>.
#
# Arguments : 2
# Return : `0' both arguments are equal strings, `1' otherwise.
#
is_equal()
{
func_check is_equal '=' 2 "$@";
if test _"$1"_ = _"$2"_
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_equal()
########################################################################
# is_existing (<name>)
#
# Test whether <name> is an existing file or directory. Solaris 2.5 does
# not have `test -e'.
#
# Arguments : 1
# Return : `0' if arg1 exists, `1' otherwise.
#
is_existing()
{
func_check is_existing '=' 1 "$@";
if is_empty "$1"
then
eval "${return_no}";
fi;
if test -f "$1" || test -d "$1" || test -c "$1"
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_existing()
########################################################################
# is_file (<name>)
#
# Test whether <name> is a readable file.
#
# Arguments : 1
# Return : `0' if arg1 is a readable file, `1' otherwise.
#
is_file()
{
func_check is_file '=' 1 "$@";
if is_not_empty "$1" && test -f "$1" && test -r "$1"
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_file()
########################################################################
# is_greater_than (<integer1> <integer2>)
#
# Test whether <integer1> is greater than <integer2>.
#
# Arguments : 2
# Return : `0' if <integer1> is a greater integer than <integer2>,
# `1' otherwise.
#
is_greater_than()
{
func_check is_greater_than '=' 2 "$@";
if is_integer "$1" && is_integer "$2" && test "$1" -gt "$2"
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_greater_than()
########################################################################
# is_integer (<string>)
#
# Test whether `string' is an integer.
#
# Arguments : 1
# Return : `0' if argument is an integer, `1' otherwise.
#
is_integer()
{
func_check is_integer '=' 1 "$@";
if is_equal "$(echo1 "$1" | sed -n -e '
s/^[0-9][0-9]*$/ok/p
s/^[-+][0-9][0-9]*$/ok/p
')" 'ok'
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_integer()
########################################################################
# is_not_empty_file (<file_name>)
#
# Test whether <file_name> is a non-empty existing file.
#
# Arguments : <=1
# Return :
# `0' if arg1 is a non-empty existing file
# `1' otherwise
#
is_not_empty_file()
{
func_check is_not_empty_file '=' 1 "$@";
if is_file "$1" && test -s "$1"
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_not_empty_file()
########################################################################
# is_not_dir (<name>)
#
# Test whether <name> is not a readable directory.
#
# Arguments : 1
# Return : `0' if arg1 is a directory, `1' otherwise.
#
is_not_dir()
{
func_check is_not_dir '=' 1 "$@";
if is_dir "$1"
then
eval "${return_no}";
fi;
eval "${return_yes}";
} # is_not_dir()
########################################################################
# is_not_empty (<string>)
#
# Test whether <string> is not empty.
#
# Arguments : <=1
# Return : `0' if arg1 exists and is not empty, `1' otherwise.
#
is_not_empty()
{
func_check is_not_empty '=' 1 "$@";
if is_empty "$1"
then
eval "${return_no}";
fi;
eval "${return_yes}";
} # is_not_empty()
########################################################################
# is_not_equal (<string1> <string2>)
#
# Test whether <string1> differs from <string2>.
#
# Arguments : 2
#
is_not_equal()
{
func_check is_not_equal '=' 2 "$@";
if is_equal "$1" "$2"
then
eval "${return_no}";
fi
eval "${return_yes}";
} # is_not_equal()
########################################################################
# is_not_file (<filename>)
#
# Test whether <filename> is a not readable file.
#
# Arguments : 1 (empty allowed)
#
is_not_file()
{
func_check is_not_file '=' 1 "$@";
if is_file "$1"
then
eval "${return_no}";
fi;
eval "${return_yes}";
} # is_not_file()
########################################################################
# is_not_prog (<program>)
#
# Verify that <program> is not a command in $PATH.
#
# Arguments : 1, <program> can have spaces and arguments.
#
is_not_prog()
{
func_check is_not_prog '=' 1 "$@";
if where_is_prog "$1" >${_NULL_DEV}
then
eval "${return_no}";
fi;
eval "${return_yes}";
} # is_not_prog()
########################################################################
# is_not_writable (<name>)
#
# Test whether <name> is not a writable file or directory.
#
# Arguments : >=1 (empty allowed), more args are ignored
#
is_not_writable()
{
func_check is_not_writable '>=' 1 "$@";
if is_writable "$1"
then
eval "${return_no}";
fi;
eval "${return_yes}";
} # is_not_writable()
########################################################################
# is_not_X ()
#
# Test whether the script is not running in X Window by checking $DISPLAY.
#
is_not_X()
{
func_check is_not_X '=' 0 "$@";
if obj DISPLAY is_empty
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_not_X()
########################################################################
# is_not_yes (<string>)
#
# Test whether <string> is not `yes'.
#
# Arguments : 1
#
is_not_yes()
{
func_check is_not_yes = 1 "$@";
if is_yes "$1"
then
eval "${return_no}";
fi;
eval "${return_yes}";
} # is_not_yes()
########################################################################
# is_prog (<name>)
#
# Determine whether <name> is a program in $PATH.
#
# Arguments : 1, <program> can have spaces and arguments.
#
is_prog()
{
func_check is_prog '=' 1 "$@";
if where_is_prog "$1" >${_NULL_DEV}
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_prog()
########################################################################
# is_writable (<name>)
#
# Test whether <name> is a writable file or directory.
#
# Arguments : >=1 (empty allowed), more args are ignored
#
is_writable()
{
func_check is_writable '>=' 1 "$@";
if is_empty "$1"
then
eval "${return_no}";
fi;
if test -r "$1"
then
if test -w "$1"
then
eval "${return_yes}";
fi;
fi;
eval "${return_no}";
} # is_writable()
########################################################################
# is_X ()
#
# Test whether the script is running in X Window by checking $DISPLAY.
#
is_X()
{
func_check is_X '=' 0 "$@";
if obj DISPLAY is_not_empty
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_X()
########################################################################
# is_yes (<string>)
#
# Test whether <string> has value `yes'.
#
# Return : `0' if arg1 is `yes', `1' otherwise.
#
is_yes()
{
func_check is_yes '=' 1 "$@";
if is_equal "$1" 'yes'
then
eval "${return_yes}";
fi;
eval "${return_no}";
} # is_yes()
########################################################################
# landmark ()
#
# Print debugging information on standard error if $_DEBUG_LM is `yes'.
#
# Globals: $_DEBUG_LM
#
# Defined in section `Debugging functions'.
########################################################################
# leave ([<code>])
#
# Clean exit without an error or with error <code>.
#
leave()
{
clean_up;
if test $# = 0
then
exit "${_OK}";
else
exit "$1";
fi;
} # leave()
########################################################################
landmark '6: list_*()';
########################################################################
#
# `list' is an object class that represents an array or list. Its
# data consists of space-separated single-quoted elements. So a list
# has the form "'first' 'second' '...' 'last'". See list_append() for
# more details on the list structure. The array elements of `list'
# can be get by `eval set x "$list"; shift`.
########################################################################
# list_append (<list> <element>...)
#
# Add one or more elements to an existing list. <list> may also be
# empty.
#
# Arguments: >=2
# <list>: a variable name for a list of single-quoted elements
# <element>: some sequence of characters.
# Output: none, but $<list> is set to
# if <list> is empty: "'<element>' '...'"
# otherwise: "$list '<element>' ..."
#
# Variable prefix: la
#
list_append()
{
func_check list_append '>=' 2 "$@";
la_name="$1";
eval la_list='"${'"$1"'}"';
shift;
for s
do
la_s="$s";
case "${la_s}" in
*\'*)
# escape each single quote by replacing each
# "'" (squote) by "'\''" (squote bslash squote squote);
# note that the backslash must be doubled in the following `sed'
la_element="$(echo1 "${la_s}" | sed -e 's/'"${_SQ}"'/&\\&&/g')";
exit_test;
;;
'')
la_element="";
;;
*)
la_element="${la_s}";
;;
esac;
### list_append()
if obj la_list is_empty
then
la_list="'${la_element}'";
else
la_list="${la_list} '${la_element}'";
fi;
done;
eval "${la_name}"='"${la_list}"';
eval ${_UNSET} la_element;
eval ${_UNSET} la_list;
eval ${_UNSET} la_name;
eval ${_UNSET} la_s;
eval "${return_ok}";
} # list_append()
########################################################################
# list_from_cmdline (<pre_name_of_opt_lists> [<cmdline_arg>...])
#
# Transform command line arguments into a normalized form.
#
# Options, option arguments, and file parameters are identified and
# output each as a single-quoted argument of its own. Options and
# file parameters are separated by a '--' argument.
#
# Arguments: >=1
# <pre_name>: common part of a set of 4 environment variable names:
# $<pre_name>_SHORT_NA: list of short options without an arg.
# $<pre_name>_SHORT_ARG: list of short options that have an arg.
# $<pre_name>_LONG_NA: list of long options without an arg.
# $<pre_name>_LONG_ARG: list of long options that have an arg.
# <cmdline_arg>...: the arguments from a command line, such as "$@",
# the content of a variable, or direct arguments.
#
# Output: ['-[-]opt' ['optarg']]... '--' ['filename']...
#
# Example:
# list_from_cmdline PRE -a f1 -bcarg --lon=larg f2 low larg2
# PRE_SHORT_NA="'a' 'b'"
# PRE_SHORT_ARG="'c' 'd'"
# PRE_LONG_NA="'help' 'version'"
# PRE_LONG_ARG="'longer' 'lower'"
# This will result in printing:
# '-a' '-b' '-c' 'arg' '--longer' 'larg' '--lower' 'larg2' '--' 'f1' 'f2'
#
# Use this function in the following way:
# eval set x "$(list_from_cmdline PRE_NAME "$@")";
# shift;
# while test "$1" != '--'; do
# case "$1" in
# ...
# esac;
# shift;
# done;
# shift; #skip '--'
# # all positional parameters ("$@") left are file name parameters.
#
# Variable prefix: lfc
#
list_from_cmdline()
{
func_check list_from_cmdline '>=' 1 "$@";
# short options, no argument
obj_from_output lfc_short_n obj_data "$1"_SHORT_NA;
# short options, with argument
obj_from_output lfc_short_a obj_data "$1"_SHORT_ARG;
# long options, no argument
obj_from_output lfc_long_n obj_data "$1"_LONG_NA;
# long options, with argument
obj_from_output lfc_long_a obj_data "$1"_LONG_ARG;
if obj lfc_short_n is_empty
then
error 'list_from_cmdline(): no $'"$1"'_SHORT_NA options.';
fi;
if obj lfc_short_a is_empty
then
error 'list_from_cmdline(): no $'"$1"'_SHORT_ARG options.';
fi;
if obj lfc_long_n is_empty
then
error 'list_from_cmdline(): no $'"$1"'_LONG_NA options.';
fi;
if obj lfc_long_a is_empty
then
error 'list_from_cmdline(): no $'"$1"'_LONG_ARG options.';
fi;
shift;
if is_equal "$#" 0
then
echo1 "'--'"
eval ${_UNSET} lfc_fparams;
eval ${_UNSET} lfc_short_a;
eval ${_UNSET} lfc_short_n;
### list_from_cmdline()
eval ${_UNSET} lfc_long_a;
eval ${_UNSET} lfc_long_n;
eval ${_UNSET} lfc_result;
eval "${return_ok}";
fi;
lfc_fparams='';
lfc_result='';
while is_greater_than "$#" 0
do
lfc_arg="$1";
shift;
case "${lfc_arg}" in
--) break; ;;
--*=*)
# delete leading '--';
lfc_with_equal="$(echo1 "${lfc_arg}" | sed -e 's/^--//')";
# extract option by deleting from the first '=' to the end
lfc_abbrev="$(echo1 "${lfc_with_equal}" | \
sed -e 's/^\([^=]*\)=.*$/\1/')";
obj_from_output lfc_opt \
list_single_from_abbrev lfc_long_a "${lfc_abbrev}";
if obj lfc_opt is_empty
then
error_user "--${lfc_abbrev} is not an option.";
else
# get the option argument by deleting up to first `='
lfc_optarg="$(echo1 "${lfc_with_equal}" | sed -e 's/^[^=]*=//')";
exit_test;
list_append lfc_result "--${lfc_opt}" "${lfc_optarg}";
continue;
fi;
### list_from_cmdline()
;;
--*)
# delete leading '--';
lfc_abbrev="$(echo1 "${lfc_arg}" | sed -e 's/^--//')";
if list_has lfc_long_n "${lfc_abbrev}"
then
lfc_opt="${lfc_abbrev}";
else
obj_from_output lfc_opt \
list_single_from_abbrev lfc_long_n "${lfc_abbrev}";
if obj lfc_opt is_not_empty && is_not_equal "$#" 0
then
obj_from_output a \
list_single_from_abbrev lfc_long_a "${lfc_abbrev}";
if obj a is_not_empty
then
error_user "The abbreviation ${lfc_arg} \
has multiple options: --${lfc_opt} and --${a}.";
fi;
fi;
fi; # if list_has lfc_long_n "${lfc_abbrev}"
if obj lfc_opt is_not_empty
then
# long option, no argument
list_append lfc_result "--${lfc_opt}";
continue;
fi;
obj_from_output lfc_opt \
list_single_from_abbrev lfc_long_a "${lfc_abbrev}";
if obj lfc_opt is_not_empty
then
### list_from_cmdline()
# long option with argument
if is_equal "$#" 0
then
error_user "no argument for option --${lfc_opt}."
fi;
list_append lfc_result "--${lfc_opt}" "$1";
shift;
continue;
fi; # if obj lfc_opt is_not_empty
error_user "${lfc_arg} is not an option.";
;;
-?*) # short option (cluster)
# delete leading `-';
lfc_rest="$(echo1 "${lfc_arg}" | sed -e 's/^-//')";
exit_test;
while obj lfc_rest is_not_empty
do
# get next short option from cluster (first char of $lfc_rest)
lfc_optchar="$(echo1 "${lfc_rest}" | sed -e 's/^\(.\).*$/\1/')";
# remove first character from ${lfc_rest};
lfc_rest="$(echo1 "${lfc_rest}" | sed -e 's/^.//')";
exit_test;
if list_has lfc_short_n "${lfc_optchar}"
then
list_append lfc_result "-${lfc_optchar}";
continue;
elif list_has lfc_short_a "${lfc_optchar}"
then
if obj lfc_rest is_empty
then
if is_greater_than "$#" 0
then
### list_from_cmdline()
list_append lfc_result "-${lfc_optchar}" "$1";
shift;
continue;
else
error_user "no argument for option -${lfc_optchar}.";
fi;
else # rest is the argument
list_append lfc_result "-${lfc_optchar}" "${lfc_rest}";
lfc_rest='';
continue;
fi; # if obj lfc_rest is_empty
else
error_user "unknown option -${lfc_optchar}.";
fi; # if list_has lfc_short_n "${lfc_optchar}"
done; # while obj lfc_rest is_not_empty
;;
*)
# Here, $lfc_arg is not an option, so a file parameter.
list_append lfc_fparams "${lfc_arg}";
# Ignore the strange POSIX option handling to end option
# parsing after the first file name argument. To reuse it, do
# a `break' here if $POSIXLY_CORRECT of `bash' is not empty.
# When `bash' is called as `sh' $POSIXLY_CORRECT is set
# automatically to `y'.
;;
esac; # case "${lfc_arg}" in
done; # while is_greater_than "$#" 0
list_append lfc_result '--';
if obj lfc_fparams is_not_empty
then
lfc_result="${lfc_result} ${lfc_fparams}";
fi;
### list_from_cmdline()
if is_greater_than "$#" 0
then
list_append lfc_result "$@";
fi;
obj lfc_result echo1;
eval ${_UNSET} lfc_abbrev;
eval ${_UNSET} lfc_fparams;
eval ${_UNSET} lfc_short_a;
eval ${_UNSET} lfc_short_n;
eval ${_UNSET} lfc_long_a;
eval ${_UNSET} lfc_long_n;
eval ${_UNSET} lfc_result;
eval ${_UNSET} lfc_arg;
eval ${_UNSET} lfc_opt;
eval ${_UNSET} lfc_opt_arg;
eval ${_UNSET} lfc_opt_char;
eval ${_UNSET} lfc_with_equal;
eval ${_UNSET} lfc_rest;
eval "${return_ok}";
} # list_from_cmdline()
########################################################################
# list_from_cmdline_with_minus (<pre_name_of_opt_lists> [<cmdline_arg>...])
#
# Transform command line arguments into a normalized form with a double
# abbreviation before and after an internal `-' sign.
#
# Options, option arguments, and file parameters are identified and
# output each as a single-quoted argument of its own. Options and
# file parameters are separated by a `--' argument.
#
# Arguments: >=1
# <pre_name>: common part of a set of 4 environment variable names:
# $<pre_name>_SHORT_NA: list of short options without an arg.
# $<pre_name>_SHORT_ARG: list of short options that have an arg.
# $<pre_name>_LONG_NA: list of long options without an arg.
# $<pre_name>_LONG_ARG: list of long options that have an arg.
# <cmdline_arg>...: the arguments from a command line, such as "$@",
# the content of a variable, or direct arguments.
#
# Output: ['-[-]opt' ['optarg']]... '--' ['filename']...
#
# Example:
# list_from_cmdline PRE -a f1 -bcarg --lon=larg --h-n f2 low larg2
# PRE_SHORT_NA="'a' 'b'"
# PRE_SHORT_ARG="'c' 'd'"
# PRE_LONG_NA="'help' 'version' 'hi-non-arg'"
# PRE_LONG_ARG="'long-arg' 'low-arg'"
# This will result in printing:
# '-a' '-b' '-c' 'arg' '--long-arg' 'larg' '--hi-non-arg' \
# '--low-arg' 'larg2' '--' 'f1' 'f2'
#
# Use this function in the following way:
# eval set x "$(list_from_cmdline_with_minus PRE_NAME "$@")";
# shift;
# while test "$1" != '--'; do
# case "$1" in
# ...
# esac;
# shift;
# done;
# shift; #skip '--'
# # all positional parameters ("$@") left are file name parameters.
#
# Variable prefix: lfcwm
#
list_from_cmdline_with_minus()
{
func_check list_from_cmdline_with_minus '>=' 1 "$@";
# short options, no argument
obj_from_output lfcwm_short_n obj_data "$1"_SHORT_NA;
# short options, with argument
obj_from_output lfcwm_short_a obj_data "$1"_SHORT_ARG;
# long options, no argument
obj_from_output lfcwm_long_n obj_data "$1"_LONG_NA;
# long options, with argument
obj_from_output lfcwm_long_a obj_data "$1"_LONG_ARG;
if obj lfcwm_short_n is_empty
then
error 'list_from_cmdline(): no $'"$1"'_SHORT_NA options.';
fi;
if obj lfcwm_short_a is_empty
then
error 'list_from_cmdline(): no $'"$1"'_SHORT_ARG options.';
fi;
if obj lfcwm_long_n is_empty
then
error 'list_from_cmdline(): no $'"$1"'_LONG_NA options.';
fi;
if obj lfcwm_long_a is_empty
then
error 'list_from_cmdline(): no $'"$1"'_LONG_ARG options.';
fi;
shift;
if is_equal "$#" 0
then
echo1 "'--'";
eval ${_UNSET} lfcwm_short_a;
eval ${_UNSET} lfcwm_short_n;
### list_from_cmdline_with_minus()
eval ${_UNSET} lfcwm_long_a;
eval ${_UNSET} lfcwm_long_n;
eval "${return_ok}";
fi;
obj_from_output lfcwm_long_both lists_combine lfcwm_long_a lfcwm_long_n;
lfcwm_fparams='';
lfcwm_result='';
while is_greater_than "$#" 0 # command line arguments
do
lfcwm_arg="$1";
shift;
lfcwm_optarg='';
case "${lfcwm_arg}" in
--)
break;
;;
--*=*)
# delete leading '--';
lfcwm_with_equal="$(echo1 "${lfcwm_arg}" | sed -e 's/^--//')";
# extract option by deleting from the first '=' to the end
lfcwm_abbrev="$(echo1 "${lfcwm_with_equal}" | \
sed -e 's/^\([^=]*\)=.*$/\1/')";
# extract option argument by deleting up to the first '='
lfcwm_optarg="$(echo1 "${lfcwm_with_equal}" | \
sed -e 's/^[^=]*=\(.*\)$/\1/')";
### list_from_cmdline_with_minus()
if list_has lfcwm_long_a "${lfcwm_abbrev}"
then
lfcwm_opt="${lfcwm_abbrev}";
else
obj_from_output lfcwm_opt \
_search_abbrev lfcwm_long_a "${lfcwm_abbrev}";
fi;
list_append lfcwm_result "--${lfcwm_opt}" "${lfcwm_optarg}";
continue;
;;
--*)
# delete leading '--';
lfcwm_abbrev="$(echo1 "${lfcwm_arg}" | sed -e 's/^--//')";
if list_has lfcwm_long_both "${lfcwm_abbrev}"
then
lfcwm_opt="${lfcwm_abbrev}";
else
obj_from_output lfcwm_opt \
_search_abbrev lfcwm_long_both "${lfcwm_abbrev}";
fi;
### list_from_cmdline_with_minus()
if list_has lfcwm_long_a "${lfcwm_opt}"
then
if is_equal "$#" 0
then
error_user "Option ${lfcwm_opt} needs an argument.";
fi;
lfcwm_optarg="$1";
shift;
list_append lfcwm_result "--${lfcwm_opt}" "${lfcwm_optarg}";
else
list_append lfcwm_result "--${lfcwm_opt}";
fi;
continue;
;;
-?*) # short option (cluster)
# delete leading '-';
lfcwm_rest="$(echo1 "${lfcwm_arg}" | sed -e 's/^-//')";
while obj lfcwm_rest is_not_empty
do
# get next short option from cluster (first char of $lfcwm_rest)
lfcwm_optchar="$(echo1 "${lfcwm_rest}" | sed -e 's/^\(.\).*$/\1/')";
# remove first character from ${lfcwm_rest};
lfcwm_rest="$(echo1 "${lfcwm_rest}" | sed -e 's/^.//')";
if list_has lfcwm_short_n "${lfcwm_optchar}"
then
list_append lfcwm_result "-${lfcwm_optchar}";
continue;
elif list_has lfcwm_short_a "${lfcwm_optchar}"
then
if obj lfcwm_rest is_empty
then
if is_greater_than "$#" 0
then
### list_from_cmdline_with_minus()
list_append lfcwm_result "-${lfcwm_optchar}" "$1";
shift;
continue;
else
error_user "no argument for option -${lfcwm_optchar}.";
fi;
else # rest is the argument
list_append lfcwm_result "-${lfcwm_optchar}" "${lfcwm_rest}";
lfcwm_rest='';
continue;
fi; # if obj lfcwm_rest is_empty
else
error_user "unknown option -${lfcwm_optchar}.";
fi; # if list_has lfcwm_short_n "${lfcwm_optchar}"
done; # while obj lfcwm_rest is_not_empty
;;
*)
# Here, $lfcwm_arg is not an option, so a file parameter.
list_append lfcwm_fparams "${lfcwm_arg}";
# Ignore the strange POSIX option handling to end option
# parsing after the first file name argument. To reuse it, do
# a `break' here if $POSIXLY_CORRECT of `bash' is not empty.
# When `bash' is called as `sh' $POSIXLY_CORRECT is set
# automatically to `y'.
;;
esac;
done;
list_append lfcwm_result '--';
if obj lfcwm_fparams is_not_empty
then
lfcwm_result="${lfcwm_result} ${lfcwm_fparams}";
fi;
### list_from_cmdline_with_minus()
if is_greater_than "$#" 0
then
list_append lfcwm_result "$@";
fi;
obj lfcwm_result echo1;
eval ${_UNSET} lfcwm_abbrev;
eval ${_UNSET} lfcwm_fparams;
eval ${_UNSET} lfcwm_short_a;
eval ${_UNSET} lfcwm_short_n;
eval ${_UNSET} lfcwm_long_a;
eval ${_UNSET} lfcwm_long_both;
eval ${_UNSET} lfcwm_long_n;
eval ${_UNSET} lfcwm_result;
eval ${_UNSET} lfcwm_arg;
eval ${_UNSET} lfcwm_opt;
eval ${_UNSET} lfcwm_optarg;
eval ${_UNSET} lfcwm_optchar;
eval ${_UNSET} lfcwm_with_equal;
eval ${_UNSET} lfcwm_rest;
eval "${return_ok}";
} # list_from_cmdline_with_minus()
# _search_abbrev (<list> <abbrev>)
#
# Check whether <list> has an element constructed from the abbreviation
# <abbrev>. All `-' in <abbrev> are replaced by `-*'. This construction
# is searched first with `<construction>[^-]*'. If there is more than a
# single element an error is created. If none is found `<construction>*'
# is searched. Again an error is created for several results.
# This function was constructed from the former function
# list_single_from_abbrev().
#
# This is a local function of list_from_cmdline_with_minus().
#
# Arguments: 2
# <list>: a variable name for a list of single-quoted elements
# <abbrev>: some sequence of characters.
#
# Output: the found element (always not empty), error when none found.
#
# Variable prefix: _sa
#
_search_abbrev()
{
func_check _search_abbrev '=' 2 "$@";
eval _sa_list='"${'$1'}"';
if obj _sa_list is_empty
then
error "_search_abbrev(): list is empty.";
fi;
_sa_abbrev="$2";
if obj _sa_abbrev is_empty
then
error "_search_abbrev(): abbreviation argument is empty.";
fi;
_sa_case="$(echo1 "${_sa_abbrev}" | sed -e 's/-/\*-/g')";
_sa_opt='';
case " ${_sa_list}" in
*\ \'${_sa_case}*) # list has the abbreviation
_sa_m1='';
_sa_m2='';
_sa_nm='';
eval set x "${_sa_list}";
shift;
for i # over the option list
do
_sa_i="$i";
### _search_abbrev() of list_from_cmdline_with_minus()
case "${_sa_i}" in
${_sa_case}*-*)
if obj _sa_m1 is_empty
then
_sa_m1="${_sa_i}";
continue;
fi;
_sa_m2="${_sa_i}";
continue;
;;
${_sa_case}*)
if obj _sa_nm is_empty
then
_sa_nm="${_sa_i}";
continue;
fi;
error_user "The abbreviation --${_sa_abbrev} has multiple options "\
"--${_sa_nm} and --${_sa_i}.";
;;
esac;
done;
if obj _sa_nm is_empty
then
if obj _sa_m2 is_not_empty
then
error_user "The abbreviation --${_sa_abbrev} has multiple options "\
"--${_sa_m1} and --${_sa_m2}.";
fi;
### _search_abbrev() of list_from_cmdline_with_minus()
if obj _sa_m1 is_not_empty
then
_sa_opt="${_sa_m1}";
fi;
else
_sa_opt="${_sa_nm}";
fi;
;;
esac;
if obj _sa_opt is_empty
then
error_user "--${_sa_abbrev} is not an option.";
fi;
obj _sa_opt echo1;
eval "${_UNSET}" _sa_abbrev;
eval "${_UNSET}" _sa_case;
eval "${_UNSET}" _sa_i;
eval "${_UNSET}" _sa_list;
eval "${_UNSET}" _sa_m1;
eval "${_UNSET}" _sa_m2;
eval "${_UNSET}" _sa_nm;
eval "${_UNSET}" _sa_opt;
eval "${return_ok}";
} # _search_abbrev() of list_from_cmdline_with_minus()
########################################################################
# list_from_file (<list_name> <file_name>)
#
# Extrect the lines from <file_name> and store them as elements to list
# <list_name>.
#
# Arguments: 2
# <list_name>: a variable name for output, a list of single-quoted elts
# <file_name>: the name of an existing file
#
# Variable prefix: lff
#
list_from_file()
{
func_check list_from_file '=' 2 "$@";
if is_not_file "$2"
then
eval "${return_bad}";
fi;
lff_n="$(wc -l "$2" | eval sed -e "'s/^[ ${_TAB}]*\([0-9]\+\).*$/\1/'")";
eval "$1"="''";
if obj lff_n is_equal 0
then
eval "${return_good}";
fi;
lff_i=0;
while obj lff_i is_not_equal "${lff_n}"
do
lff_i="$(expr "${lff_i}" + 1)";
list_append "$1" "$(eval sed -n -e "'${lff_i}p
${lff_i}q'" "'$2'")";
done;
eval "${_UNSET}" lff_i;
eval "${_UNSET}" lff_n;
eval "${return_good}";
} # list_from_file()
########################################################################
# list_from_split (<string> <separator_char>)
#
# Split <string> by <separator_char> into a list, omitting the separator.
#
# Arguments: 2: a <string> that is to be split into parts divided by
# character <separator_char>
# Output: the resulting list string
#
# Variable prefix: lfs
#
list_from_split()
{
func_check list_from_split = 2 "$@";
if is_empty "$1"
then
eval "${return_ok}";
fi;
case "$2" in
?)
lfs_splitter="$2";
;;
'\:')
lfs_splitter=':';
;;
*)
error "list_from_split(): split argument $2 must be a single character.";
;;
esac;
lfs_list='';
lfs_rest="$1";
while :
do
case "${lfs_rest}" in
*${lfs_splitter}*)
case "${lfs_splitter}" in
/)
lfs_elt="$(echo1 ${lfs_rest} | sed -e \
's|^\([^'"${lfs_splitter}"']*\)'"${lfs_splitter}"'.*|\1|')";
lfs_rest="$(echo1 ${lfs_rest} | sed -e \
's|^[^'"${lfs_splitter}"']*'"${lfs_splitter}"'\(.*\)$|\1|')";
;;
*)
### list_from_split()
lfs_elt="$(echo1 ${lfs_rest} | sed -e \
's/^\([^'"${lfs_splitter}"']*\)'"${lfs_splitter}"'.*/\1/')";
lfs_rest="$(echo1 ${lfs_rest} | sed -e \
's/^[^'"${lfs_splitter}"']*'"${lfs_splitter}"'\(.*\)$/\1/')";
;;
esac;
list_append lfs_list "${lfs_elt}"
continue;
;;
*)
list_append lfs_list "${lfs_rest}"
break
;;
esac;
done
echo1 "${lfs_list}";
eval ${_UNSET} lfs_elt;
eval ${_UNSET} lfs_list;
eval ${_UNSET} lfs_rest;
eval ${_UNSET} lfs_splitter;
eval "${return_ok}";
} # list_from_split()
########################################################################
# list_has (<list-name> <element>)
#
# Test whether the list <list-name> has the element <element>.
#
# Arguments: 2
# <list_name>: a variable name for a list of single-quoted elements
# <element>: some sequence of characters.
#
# Variable prefix: lh
#
list_has()
{
func_check list_has = 2 "$@";
eval lh_list='"${'$1'}"';
if obj lh_list is_empty
then
eval "${_UNSET}" lh_list;
eval "${return_no}";
fi;
case "$2" in
\'*\') lh_element=" $2 "; ;;
*) lh_element=" '$2' "; ;;
esac;
if string_contains " ${lh_list} " "${lh_element}"
then
eval "${_UNSET}" lh_list;
eval "${_UNSET}" lh_element;
eval "${return_yes}";
else
eval "${_UNSET}" lh_list;
eval "${_UNSET}" lh_element;
eval "${return_no}";
fi;
} # list_has()
########################################################################
# list_has_abbrev (<list_var> <abbrev>)
#
# Test whether the list of <list_var> has an element starting with
# <abbrev>.
#
# Arguments: 2
# <list_var>: a variable name for a list of single-quoted elements
# <abbrev>: some sequence of characters.
#
# Variable prefix: lha
#
list_has_abbrev()
{
func_check list_has_abbrev '=' 2 "$@";
eval lha_list='"${'$1'}"';
if obj lha_list is_empty
then
eval "${_UNSET}" lha_list;
eval "${return_no}";
fi;
case "$2" in
\'*)
lha_element="$(echo1 "$2" | sed -e 's/'"${_SQ}"'$//')";
;;
*)
lha_element="'$2";
;;
esac;
if string_contains " ${lha_list}" " ${lha_element}"
then
eval "${_UNSET}" lha_list;
eval "${_UNSET}" lha_element;
eval "${return_yes}";
else
eval "${_UNSET}" lha_list;
eval "${_UNSET}" lha_element;
eval "${return_no}";
fi;
eval "${return_ok}";
} # list_has_abbrev()
########################################################################
# list_has_not (<list> <element>)
#
# Test whether <list> has no <element>.
#
# Arguments: 2
# <list>: a space-separated list of single-quoted elements.
# <element>: some sequence of characters.
#
# Variable prefix: lhn
#
list_has_not()
{
func_check list_has_not = 2 "$@";
eval lhn_list='"${'$1'}"';
if obj lhn_list is_empty
then
eval "${_UNSET}" lhn_list;
eval "${return_yes}";
fi;
case "$2" in
\'*\') lhn_element=" $2 "; ;;
*) lhn_element=" '$2' "; ;;
esac;
if string_contains " ${lhn_list} " "${lhn_element}"
then
eval "${_UNSET}" lhn_list;
eval "${_UNSET}" lhn_element;
eval "${return_no}";
else
eval "${_UNSET}" lhn_list;
eval "${_UNSET}" lhn_element;
eval "${return_yes}";
fi;
} # list_has_not()
########################################################################
# list_single_from_abbrev (<list-var> <abbrev>)
#
# Check whether the list has an element starting with <abbrev>. If
# there are more than a single element an error is raised.
#
# Arguments: 2
# <list-var>: a variable name for a list of single-quoted elements
# <abbrev>: some sequence of characters.
#
# Output: the found element.
#
# Variable prefix: lsfa
#
list_single_from_abbrev()
{
func_check list_single_from_abbrev '=' 2 "$@";
eval lsfa_list='"${'$1'}"';
if obj lsfa_list is_empty
then
eval "${_UNSET}" lsfa_list;
eval "${return_no}";
fi;
lsfa_abbrev="$2";
if list_has lsfa_list "${lsfa_abbrev}"
then
obj lsfa_abbrev echo1;
eval "${_UNSET}" lsfa_abbrev;
eval "${_UNSET}" lsfa_list;
eval "${return_yes}";
fi;
if list_has_abbrev lsfa_list "${lsfa_abbrev}"
then
lsfa_element='';
eval set x "${lsfa_list}";
shift;
### list_single_from_abbrev()
for i
do
case "$i" in
${lsfa_abbrev}*)
if obj lsfa_element is_not_empty
then
error_user "The abbreviation --${lsfa_abbrev} \
has multiple options: --${lsfa_element} and --${i}.";
fi;
lsfa_element="$i";
;;
esac;
done;
obj lsfa_element echo1;
eval "${_UNSET}" lsfa_abbrev;
eval "${_UNSET}" lsfa_element;
eval "${_UNSET}" lsfa_list;
eval "${return_yes}";
else
eval "${_UNSET}" lsfa_abbrev;
eval "${_UNSET}" lsfa_element;
eval "${_UNSET}" lsfa_list;
eval "${return_no}";
fi;
} # list_single_from_abbrev()
########################################################################
# list_uniq (<list>)
#
# Generate a list with only unique elements.
#
# Output: the corrected list
#
# Variable prefix: lu
#
list_uniq()
{
func_check list_uniq '=' 1 "$@";
if is_empty "$1"
then
eval "${return_ok}";
fi;
eval a='"${'"$1"'}"';
if obj a is_empty
then
eval "${return_ok}";
fi;
eval set x "$a";
shift;
lu_list='';
for i
do
lu_i="$i";
if list_has lu_list "${lu_i}"
then
continue;
else
list_append lu_list ${lu_i};
fi;
done;
obj lu_list echo1;
eval "${_UNSET}" lu_i;
eval "${_UNSET}" lu_list;
eval "${return_ok}";
} # list_uniq()
########################################################################
# lists_combine (<list1> <list2> ...)
#
# Combine several lists to a single list. All arguments are list names.
#
# Output: the combined list
#
# Variable prefix: lc
#
lists_combine()
{
func_check lists_combine '>=' 2 "$@";
lc_list='';
for i
do
eval lc_arg='"${'"$i"'}"';
case "${lc_arg}" in
'') :; ;;
"'"*"'")
if obj lc_list is_empty
then
lc_list="${lc_arg}";
else
lc_list="${lc_list} ${lc_arg}";
fi;
;;
*)
error 'lists_combine(): $'"$i"' is not a list.';
;;
esac;
done;
obj lc_list echo1;
eval "${_UNSET}" lc_arg;
eval "${_UNSET}" lc_list;
eval "${return_ok}";
} # lists_combine()
########################################################################
landmark '7: man_*()';
########################################################################
########################################################################
# Information on the search of man pages in groffer
# The search of man pages is based on a set of directories. That
# starts with the so-called man path. This is determined in function
# man_setup() either by the command-line option --manpath, by $MANOPT,
# or by $MANPATH. There is also a program `manpath'. If all of this
# does not work a man path is created from $PATH with function
# manpath_set_from_path(). We now have a set of existing directories
# for the search of man pages; usually they end with `/man'.
# The directory set of the man path can be changed in 2 ways. If
# operating system names are given in $SYSTEM or by --systems on the
# command-line all man path directory will be appended by these names.
# The appended system names replace the original man path; but if no
# system name is set, the original man path is kept. In `groffer',
# this is done by the function manpath_add_lang_sys() in man_setup().
# The next addition for directories is the language. It is specified
# by --locale or by one of the environment variables $LC_ALL,
# $LC_MESSAGES, and $LANG. The language name of `C' or `POSIX' means
# the return to the default language (usually English); this deletes
# former language specifications. The language name and its
# abbreviation with 2 characters is appended to the man page
# directories. But these new arising directories are added to the man
# page, they do not replace it such as the system names did. This is
# done by function manpath_add_lang_sys() in man_setup() as well.
# Now we have the basic set of directories for the search of man pages
# for given filespec arguments. The real directories with the man
# page source files are gotten by appending `man<section>' to each
# directory, where section is a single character of the form
# `[1-9on]'.
# There you find files named according to the form
# <name>.<section>[<extension>][<compression>], where `[]' means
# optional this time. <name> is the name of the man page; <section>
# is the single character from the last paragraphe; the optional
# <extension> consists of some letters denoting special aspects for
# the section; and the optional <compression> is something like `.gz',
# `.Z', or `.bz2', meaning that the file is compressed.
# If name, section. and extension are specified on the command-line
# the file of the form <name>.<section><extension> with or without
# <compression> are handled. The first one found according to the
# directory set for the section is shown.
# If just name and section are specified on the command-line then
# first <name>.<section> with or without <compression> are searched.
# If no matching file was found, <name>.<section><extension> with or
# without <compression> are searched for all possible extensions.
# If only name is specified on the command-line then the section
# directories are searched by and by, starting with section `1', until
# a file is matched.
# The function man_is_man() determines all suitable man files for a
# command-line argument, while man_get() searches the single matching
# file for display.
########################################################################
# man_get (<man-name> [<section> [<extension>]])
#
# Write a man page to the temporary file.
#
# Globals in: $_TMP_MANSPEC, $_MAN_SEC_CHARS, $_MAN_EXT, $_MAN_ALL
#
# Arguments: 1, 2, or 3
#
# Variable prefix: mg
#
man_get()
{
func_check man_get '>=' 1 "$@";
if obj _TMP_MANSPEC is_empty
then
error 'man_get(): man_is_man() must be run first on '"$*".;
fi;
mg_name="$1";
mg_sec="$2";
if is_empty "$2"
then
mg_sec="${_MAN_SEC_CHARS}"; # take care it is not a single section
fi;
mg_ext="$3";
if is_empty "$3"
then
mg_ext="${_MAN_EXT}";
fi;
if obj _TMP_MANSPEC is_not_equal "${_TMP_DIR}/,man:$1:${mg_sec}${mg_ext}"
then
error 'man_get(): $_TMP_MANSPEC does not suit to the arguments '"$*".;
fi;
### man_get()
if obj _MAN_ALL is_yes
then
list_from_file mg_list "${_TMP_MANSPEC}";
eval set x ${mg_list};
shift;
mg_ok='no';
mg_list='';
for f
do
mg_f="$f";
if list_has mg_list "${mg_f}"
then
continue;
else
list_append mg_list "${mg_f}";
fi;
### man_get()
if obj mg_f is_file
then
to_tmp "${mg_f}" && mg_ok='yes';
fi;
done;
if obj mg_ok is_yes
then
register_title man:"${mg_name}";
fi;
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
else # $_MAN_ALL is not 'yes'
if is_empty "$2"
then # no section from command line
if obj _MAN_SEC_LIST is_empty
then
m="${_MAN_AUTO_SEC_LIST}"; # list of all sections
else
m="${_MAN_SEC_LIST}"; # from --sections
fi;
### man_get()
for s in $(eval set x $m; shift; echo1 "$@")
do
mg_s="$s";
list_from_file mg_list "${_TMP_MANSPEC}";
eval set x ${mg_list};
shift;
if obj mg_ext is_empty
then
for f
do
mg_f="$f";
case "${mg_f}" in
*/man"${mg_s}"/"${mg_name}"."${mg_s}"|*/man"${mg_s}"/"${mg_name}"."${mg_s}".*)
if obj mg_f is_file
then
to_tmp "${mg_f}" && register_title "${mg_name}(${mg_s})";
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_s;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
fi;
;;
esac; # "$mg_f"
done; # for f
fi; # mg_ext is_empty
### man_get()
for f
do
mg_f="$f";
case "${mg_f}" in
*/man"${mg_s}"/"${mg_name}"."${mg_s}""${mg_ext}"*)
if obj mg_f is_file
then
to_tmp "${mg_f}" && register_title "${mg_name}(${mg_s})";
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_s;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
fi;
;;
esac; # "$mg_f"
done; # for f
done; # for s
else # $mg_sec is not empty, do with section
list_from_file mg_list "${_TMP_MANSPEC}";
eval set x ${mg_list};
shift;
if obj mg_ext is_empty
then
for f
do
mg_f="$f";
### man_get()
case "${mg_f}" in
*/man"${mg_sec}"/"${mg_name}"."${mg_sec}"|\
*/man"${mg_sec}"/"${mg_name}"."${mg_sec}".*)
if obj mg_f is_file
then
obj mg_f to_tmp && \
register_title "${mg_name}(${mg_sec})";
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_s;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
fi;
;;
esac;
done; # for f
for f
do
mg_f="$f";
### man_get()
case "${mg_f}" in
*/man"${mg_sec}"/"${mg_name}"."${mg_sec}"*)
if obj mg_f is_file
then
obj mg_f to_tmp && \
register_title "${mg_name}(${mg_sec})";
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_s;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
fi;
;;
esac;
done; # for f
else # mg_ext is not empty
for f
do
mg_f="$f";
### man_get()
case "${mg_f}" in
*/man"${mg_sec}"/"${mg_name}"."${mg_sec}""${mg_ext}"|\
*/man"${mg_sec}"/"${mg_name}"."${mg_sec}""${mg_ext}".*)
if obj mg_f is_file
then
obj mg_f to_tmp && \
register_title "${mg_name}(${mg_sec}${mg_ext})";
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_s;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
fi;
;;
esac;
done; # for f
for f
do
mg_f="$f";
### man_get()
case "${mg_f}" in
*/man"${mg_sec}"/"${mg_name}"."${mg_sec}""${mg_ext}"*)
if obj mg_f is_file
then
obj mg_f to_tmp && \
register_title "${mg_name}(${mg_sec}${mg_ext})";
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_s;
eval ${_UNSET} mg_sec;
eval "${return_ok}";
fi;
;;
esac;
done; # for f
fi;
fi; # $mg_sec
fi; # $_MAN_ALL
eval ${_UNSET} mg_ext;
eval ${_UNSET} mg_f;
eval ${_UNSET} mg_list;
eval ${_UNSET} mg_name;
eval ${_UNSET} mg_sec;
eval ${_UNSET} mg_s;
eval "${return_ok}";
} # man_get()
########################################################################
# man_is_man (<man-name> [<section> [<extension>]])
#
# Test whether <man-name> exists as man page.
#
# Globals: in: $_TMP_MAN, $_MAN_SEC_CHARS, $_TMP_DIR, $_MAN_EXT,
# $_MAN_AUTO_SEC_CHARS
# out: $_TMP_MANSPEC
#
# Arguments: 1, 2, or 3
#
# Variable prefix: mim
#
man_is_man()
{
func_check man_is_man '>=' 1 "$@";
if is_empty "$1"
then
_TMP_MANSPEC='';
eval "${return_no}";
fi;
if obj _TMP_DIR is_empty
then
error 'man_is_man(): main_init() must be run first.';
fi;
if obj _MAN_IS_SETUP is_not_yes
then
error 'man_is_man(): man_setup() must be run first.';
fi;
mim_sec="$2";
if is_empty "$2"
then
mim_sec="${_MAN_SEC_CHARS}";
fi;
if is_empty "$3"
then
mim_ext="${_MAN_EXT}";
else
mim_ext="$3";
fi;
_TMP_MANSPEC="${_TMP_DIR}/,man:$1:${mim_sec}${mim_ext}";
### man_is_man()
if obj _TMP_MANSPEC is_not_file
then
if obj mim_sec is_empty
then
m="${_MAN_AUTO_SEC_CHARS}";
eval grep "'/man$m/$1\.$m${mim_ext}'" \
"${_TMP_MAN}" > "${_TMP_MANSPEC}";
else
eval grep "'/man${mim_sec}/$1\.${mim_sec}${mim_ext}'" \
"${_TMP_MAN}" > "${_TMP_MANSPEC}";
fi;
fi;
eval ${_UNSET} mim_ext;
eval ${_UNSET} mim_sec;
if obj _TMP_MANSPEC is_empty_file
then
rm_file_with_debug "${_TMP_MANSPEC}";
eval "${return_no}";
else
eval "${return_yes}";
fi;
} # man_is_man()
########################################################################
# man_setup ()
#
# Setup the variables $_MAN_* needed for man page searching.
#
# Globals:
# in: $_OPT_*, $_MANOPT_*, $LANG, $LC_MESSAGES, $LC_ALL,
# $MANPATH, $MANSEC, $PAGER, $SYSTEM, $MANOPT.
# out: $_MAN_PATH, $_MAN_LANG, $_MAN_SYS, $_MAN_LANG, $_MAN_LANG2,
# $_MAN_SEC, $_MAN_ALL, $_TMP_MAN
# in/out: $_MAN_ENABLE
#
# The precedence for the variables related to `man' is that of GNU
# `man', i.e.
#
# $LANG; overridden by
# $LC_MESSAGES; overridden by
# $LC_ALL; this has the same precedence as
# $MANPATH, $MANSEC, $PAGER, $SYSTEM; overridden by
# $MANOPT; overridden by
# the groffer command line options.
#
# $MANROFFSEQ is ignored because grog determines the preprocessors.
#
# Variable prefix: ms
#
man_setup()
{
func_check man_setup '=' 0 "$@";
if obj _MAN_IS_SETUP is_yes
then
eval "${return_ok}";
fi;
_MAN_IS_SETUP='yes';
if obj _MAN_ENABLE is_not_yes
then
eval "${return_ok}";
fi;
# determine basic path for man pages
obj_from_output ms_path \
get_first_essential "${_OPT_MANPATH}" "${_MANOPT_PATH}" "${MANPATH}";
if obj ms_path is_empty && is_prog 'manpath'
then
obj_from_output ms_path manpath 2>${_NULL_DEV}; # not always available
fi;
if obj ms_path is_empty
then
manpath_set_from_path;
else
obj_from_output _MAN_PATH path_list "${ms_path}";
fi;
if obj _MAN_PATH is_empty
then
_MAN_ENABLE="no";
echo2 "man_setup(): man path is empty";
eval ${_UNSET} ms_path;
eval "${return_ok}";
fi;
obj_from_output _MAN_PATH list_uniq _MAN_PATH;
### man_setup()
if obj _MAN_ALL is_not_yes
then
if obj _OPT_ALL is_yes || obj _MANOPT_ALL is_yes
then
_MAN_ALL='yes';
else
_MAN_ALL='no';
fi;
fi;
ms_sys="$(get_first_essential \
"${_OPT_SYSTEMS}" "${_MANOPT_SYS}" "${SYSTEM}")";
if obj ms_sys is_not_empty
then
obj_from_output _MAN_SYS list_from_split "${ms_sys}" ',';
fi;
obj_from_output ms_lang get_first_essential \
"${_OPT_LANG}" "${LC_ALL}" "${LC_MESSAGES}" "${LANG}";
case "${ms_lang}" in
C|POSIX)
_MAN_LANG="";
_MAN_LANG2="";
;;
?)
_MAN_LANG="${ms_lang}";
_MAN_LANG2="";
;;
??)
_MAN_LANG="${ms_lang}";
_MAN_LANG2="${ms_lang}";
;;
### man_setup()
*)
_MAN_LANG="${ms_lang}";
# get first two characters of $ms_lang
_MAN_LANG2="$(echo1 "${ms_lang}" | sed -e 's/^\(..\).*$/\1/')";
exit_test;
;;
esac;
# from now on, use only $_MAN_LANG*, forget about $_OPT_LANG, $LC_*.
manpath_add_lang_sys;
obj_from_output _MAN_PATH list_uniq _MAN_PATH;
obj_from_output _MAN_SEC get_first_essential \
"${_OPT_SECTIONS}" "${_MANOPT_SEC}" "${MANSEC}";
_MAN_SEC_LIST="";
_MAN_SEC_CHARS="";
case "${_MAN_SEC}" in
*:*)
eval set x "$(list_from_split "${_MAN_SEC}" :)";
shift;
for s
do
if list_has _MAN_AUTO_SEC_LIST "$s"
then
list_append _MAN_SEC_LIST "$s";
_MAN_SEC_CHARS="${_MAN_SEC_CHARS}$s";
fi;
done
if obj _MAN_SEC_CHARS is_not_empty
then
_MAN_SEC_CHARS="[${_MAN_SEC_CHARS}]";
fi;
;;
*)
if list_has _MAN_AUTO_SEC_LIST "${_MAN_SEC}"
then
list_append _MAN_SEC_LIST "${_MAN_SEC}";
_MAN_SEC_CHARS="[${_MAN_SEC}]";
fi;
;;
esac;
### man_setup()
obj_from_output _MAN_EXT get_first_essential \
"${_OPT_EXTENSION}" "${_MANOPT_EXTENSION}" "${EXTENSION}";
_TMP_MAN="$(tmp_create man)";
eval set x "${_MAN_PATH}";
shift;
if is_not_equal "$#" 0
then
for i
do
for j in "$i"/man*
do
find "$j" >>"${_TMP_MAN}";
done
done;
fi;
eval ${_UNSET} ms_lang;
eval ${_UNSET} ms_list;
eval ${_UNSET} ms_path;
eval ${_UNSET} ms_sys;
eval "${return_ok}";
} # man_setup()
########################################################################
landmark '8: manpath_*()';
########################################################################
########################################################################
# manpath_add_lang_sys ()
#
# Add language and operating system specific directories to man path.
#
# Arguments : 0
# Output : none
# Globals:
# in: $_MAN_SYS: a list of names of operating systems.
# $_MAN_LANG and $_MAN_LANG2: each a single name
# in/out: $_MAN_PATH: list of directories which shall have the `man?'
# subdirectories.
#
# Variable prefix: mals
#
manpath_add_lang_sys()
{
func_check manpath_add_lang_sys '=' 0 "$@";
if obj _MAN_PATH is_empty
then
eval "${return_ok}";
fi;
if obj _MAN_SYS is_empty
then
mals_mp="${_MAN_PATH}";
else
mals_mp='';
eval set x "${_MAN_SYS}";
shift;
for s
do
_manpath_add_sys "$s";
done;
fi;
if obj mals_mp is_not_empty
then
mals_lang_path='';
if is_equal "$_MAN_LANG" "$_MAN_LANG2"
then
mals_man_lang2='';
else
mals_man_lang2="${_MAN_LANG2}";
fi;
for i in "${_MAN_LANG}" "${mals_man_lang2}"
do
if obj i is_empty
then
continue;
fi;
### manpath_add_lang_sys()
mals_lang="$i";
eval set x "${mals_mp}";
shift;
for p
do
obj_from_output mals_dir dir_name_append "${p}" "${mals_lang}";
if obj mals_dir is_dir
then
list_append mals_lang_path "${mals_dir}";
fi;
done;
done;
obj_from_output mals_mp lists_combine mals_lang_path mals_mp;
fi;
_MAN_PATH="${mals_mp}";
eval ${_UNSET} mals_dir;
eval ${_UNSET} mals_lang;
eval ${_UNSET} mals_lang_path;
eval ${_UNSET} mals_man_lang2;
eval ${_UNSET} mals_mp;
eval "${return_ok}";
} # manpath_add_lang_sys()
# _manpath_add_sys (<system>)
#
# Append the existing subdirectories <system> of man path directories to
# the list $mals_mp.
#
# Local function to manpath_add_lang_sys().
#
# Argument: 1, a operating system name (for appending to a man path
# directory)
#
# Globals in: $_MAN_PATH
# Globals in/out: $mals_mp
#
# Variable prefix: _mas
#
_manpath_add_sys()
{
func_check _manpath_add_sys '=' 1 "$@";
case "$1" in
'')
:;
;;
man)
obj_from_output mals_mp lists_combine mals_mp _MAN_PATH;
;;
*)
_mas_sys="$1";
eval set x "${_MAN_PATH}";
shift;
for p
do
obj_from_output _mas_dir dir_name_append "${p}" "${_mas_sys}";
if obj _mas_dir is_dir
then
list_append mals_mp "${_mas_dir}";
fi;
done;
;;
esac;
eval ${_UNSET} _mas_dir;
eval ${_UNSET} _mas_sys;
eval "${return_ok}";
} # _manpath_add_sys() of manpath_add_lang_sys()
########################################################################
# manpath_set_from_path ()
#
# Determine basic search path for man pages from $PATH.
#
# Return: `0' if a valid man path was retrieved.
# Output: none
# Globals:
# in: $PATH
# out: $_MAN_PATH
#
# Variable prefix: msfp
#
manpath_set_from_path()
{
func_check manpath_set_from_path '=' 0 "$@";
msfp_manpath='';
# get a basic man path from $PATH
if obj PATH is_not_empty
then
# delete the final `/bin' part
p="$(echo1 "${PATH}" | sed -e 's|//*bin/*:|:|g')";
obj_from_output msfp_list path_list "$p";
# append some default directories
for b in /usr/local /usr/local /usr /usr \
/usr/X11R6 /usr/openwin \
/opt /opt/gnome /opt/kde
do
msfp_base="$b";
if list_has_not msfp_list "${msfp_base}" && obj msfp_base is_dir
then
list_append msfp_list "${msfp_base}";
fi;
done;
eval set x "${msfp_list}";
shift;
for d
do
# including empty for former `/bin'.
msfp_base="$d";
for e in /share/man /share/MAN /man /MAN
do
msfp_mandir="${msfp_base}$e";
if obj msfp_mandir is_dir
then
list_append msfp_manpath "${msfp_mandir}";
fi;
done;
done;
fi;
_MAN_PATH="${msfp_manpath}";
eval ${_UNSET} msfp_base;
eval ${_UNSET} msfp_list;
eval ${_UNSET} msfp_mandir;
eval ${_UNSET} msfp_manpath;
eval "${return_ok}";
} # manpath_set_from_path()
########################################################################
landmark '9: obj_*()';
########################################################################
########################################################################
# obj (<object> <call_name> <arg>...)
#
# This works like a method (object function) call for an object.
# Run "<call_name> $<object> <arg> ...".
#
# The first argument represents an object name whose data is given as
# first argument to <call_name>().
#
# Argument: >=2
# <object>: variable name
# <call_name>: a program or function name
#
# Variable prefix: o
#
obj()
{
func_check obj '>=' 2 "$@";
eval o_arg1='"${'$1'}"';
if is_empty "$2"
then
error "obj(): function name is empty."
else
o_func="$2";
fi;
shift;
shift;
eval "${o_func}"' "${o_arg1}" "$@"';
n="$?";
eval ${_UNSET} o_arg1;
eval ${_UNSET} o_func;
eval "${return_var} $n";
} # obj()
########################################################################
# obj_data (<object>)
#
# Print the data of <object>, i.e. the content of $<object>.
# For possible later extensions.
#
# Arguments: 1
# <object>: a variable name
# Output: the data of <object>
#
# Variable prefix: od
#
obj_data()
{
func_check obj_data '=' 1 "$@";
if is_empty "$1"
then
error "obj_data(): object name is empty."
fi;
eval od_res='"${'"$1"'}"';
obj od_res echo1;
eval ${_UNSET} od_res;
eval "${return_ok}";
} # obj_data()
########################################################################
# obj_from_output (<object> <call_name> <arg>...)
#
# Run '$<object>="$(<call_name> <arg>...)"' to set the result of a
# function call to a global variable. Variables are not stored.
#
# Arguments: >=2
# <object>: a variable name
# <call_name>: the name of a function or program
# <arg>: optional argument to <call_name>
# Output: none
#
# Variable prefix: ofo
#
obj_from_output()
{
func_check obj_from_output '>=' 2 "$@";
if is_empty "$1"
then
error "obj_from_output(): variable name is empty.";
fi;
if is_empty "$2"
then
error "obj_from_output(): function name is empty."
fi;
ofo_result_name="$1";
shift;
ofo_return=0;
if is_equal "$#" 0
then
eval "${ofo_result_name}"'=""';
else
ofo_list='';
for i
do
list_append ofo_list "$i";
done;
eval "${ofo_result_name}"'="$('"${ofo_list}"')"';
ofo_return="$?";
exit_test;
fi;
r="${ofo_return}";
eval ${_UNSET} ofo_list;
eval ${_UNSET} ofo_return;
eval ${_UNSET} ofo_result_name;
eval "${return_var} $r";
} # obj_from_output()
########################################################################
# obj_set (<object> <data>)
#
# Set the data of <object>, i.e. call "$<object>=<data>".
#
# Arguments: 2
# <object>: a variable name
# <data>: a string
# Output:: none
#
obj_set()
{
func_check obj_set '=' 2 "$@";
if is_empty "$1"
then
error "obj_set(): object name is empty."
fi;
eval "$1"='"$2"';
eval "${return_ok}";
} # obj_set()
########################################################################
# path_chop (<path>)
#
# Remove unnecessary colons from path.
#
# Argument: 1, a colon separated path.
# Output: path without leading, double, or trailing colons.
#
path_chop()
{
func_check path_chop = 1 "$@";
# replace multiple colons by a single colon `:'
# remove leading and trailing colons
echo1 "$1" | sed -e '
s/^:*//
s/:::*/:/g
s/:*$//
';
eval "${return_ok}";
} # path_chop()
########################################################################
# path_clean (<path>)
#
# Remove non-existing directories from a colon-separated list.
#
# Argument: 1, a colon separated path.
# Output: colon-separated list of existing directories.
#
# Variable prefix: pc
#
path_clean()
{
func_check path_clean = 1 "$@";
if is_not_equal "$#" 1
then
error 'path_clean() needs 1 argument.';
fi;
pc_arg="$1";
eval set x "$(path_list "${pc_arg}")";
exit_test;
shift;
pc_res="";
for i
do
pc_i="$i";
if obj pc_i is_not_empty \
&& obj pc_res path_not_contains "${pc_i}" \
&& obj pc_i is_dir
then
case "${pc_i}" in
?*/)
pc_res="${pc_res}:$(dir_name_chop "${pc_i}")";
exit_test;
;;
*)
pc_res="${pc_res}:${pc_i}";
;;
esac;
fi;
done;
path_chop "${pc_res}";
eval ${_UNSET} pc_arg;
eval ${_UNSET} pc_i;
eval ${_UNSET} pc_res;
eval "${return_ok}";
} # path_clean()
########################################################################
# path_contains (<path> <dir>)
#
# Test whether <dir> is contained in <path>, a list separated by `:'.
#
# Arguments : 2
# Return : `0' if arg2 is substring of arg1, `1' otherwise.
#
path_contains()
{
func_check path_contains = 2 "$@";
case ":$1:" in
*:${2}:*)
eval "${return_yes}";
;;
*)
eval "${return_no}";
;;
esac;
eval "${return_ok}";
} # path_contains()
########################################################################
# path_not_contains (<path> <dir>)
#
# Test whether <dir> is not contained in colon separated <path>.
#
# Arguments : 2
#
path_not_contains()
{
func_check path_not_contains = 2 "$@";
if path_contains "$1" "$2"
then
eval "${return_no}";
else
eval "${return_yes}";
fi;
eval "${return_ok}";
} # path_not_contains()
########################################################################
# path_list (<path>)
#
# From a `:' separated path generate a list with unique elements.
#
# Arguments: 1: a colon-separated path
# Output: the resulting list, process it with `eval set'
#
# Variable prefix: pl
#
path_list()
{
func_check path_list = 1 "$@";
eval set x "$(list_from_split "$1" '\:')";
shift;
pl_list='';
for e
do
pl_elt="$e";
if list_has pl_list "${pl_elt}"
then
continue;
else
list_append pl_list "${pl_elt}";
fi;
done;
obj pl_list echo1;
eval ${_UNSET} pl_elt;
eval ${_UNSET} pl_list;
eval "${return_ok}";
} # path_list()
########################################################################
landmark '10: register_*()';
########################################################################
########################################################################
# register_file (<filename>)
#
# Write a found file and register the title element.
#
# Arguments: 1: a file name
# Output: none
#
register_file()
{
func_check register_file = 1 "$@";
if is_empty "$1"
then
error 'register_file(): file name is empty';
fi;
if is_equal "$1" '-'
then
to_tmp "${_TMP_STDIN}" && register_title 'stdin';
else
to_tmp "$1" && register_title "$1";
exit_test;
fi;
eval "${return_ok}";
} # register_file()
########################################################################
# register_title (<filespec>)
#
# Create title element from <filespec> and append to $_REG_TITLE_LIST.
# Basename is created.
#
# Globals: $_REG_TITLE_LIST (rw)
#
# Variable prefix: rt
#
register_title()
{
func_check register_title '=' 1 "$@";
if is_empty "$1"
then
eval "${return_ok}";
fi;
if obj _DEBUG_PRINT_FILENAMES is_yes
then
if is_equal "$1" 'stdin'
then
echo2 "file: standard input";
else
if obj _FILESPEC_IS_MAN is_yes
then
echo2 "file title: $1";
else
echo2 "file: $1";
fi;
fi;
fi;
case "${_REG_TITLE_LIST}" in
*\ *\ *\ *)
eval "${return_ok}";
;;
esac;
# remove directory part
obj_from_output rt_title base_name "$1";
# replace space characters by `_'
rt_title="$(echo1 "${rt_title}" | sed -e 's/[ ]/_/g')";
# remove extension `.bz2'
rt_title="$(echo1 "${rt_title}" | sed -e 's/\.bz2$//')";
# remove extension `.gz'
rt_title="$(echo1 "${rt_title}" | sed -e 's/\.gz$//')";
# remove extension `.Z'
rt_title="$(echo1 "${rt_title}" | sed -e 's/\.Z$//')";
if obj rt_title is_empty
then
eval ${_UNSET} rt_title;
eval "${return_ok}";
fi;
list_append _REG_TITLE_LIST "${rt_title}";
eval ${_UNSET} rt_title;
eval "${return_ok}";
} # register_title()
########################################################################
# reset ()
#
# Reset the variables that can be affected by options to their default.
#
#
# Defined in section `Preset' after the rudimentary shell tests.
########################################################################
# rm_file (<file_name>)
#
# Remove file.
#
rm_file()
{
func_check rm_file '=' 1 "$@";
if is_file "$1"
then
rm -f "$1" >${_NULL_DEV} 2>&1;
fi;
if is_existing "$1"
then
eval "${return_bad}";
else
eval "${return_good}";
fi;
} # rm_file()
########################################################################
# rm_file_with_debug (<file_name>)
#
# Remove file if $_DEBUG_KEEP_FILES allows it.
#
# Globals: $_DEBUG_KEEP_FILES
#
rm_file_with_debug()
{
func_check rm_file_with_debug '=' 1 "$@";
if obj _DEBUG_KEEP_FILES is_not_yes
then
if is_file "$1"
then
rm -f "$1" >${_NULL_DEV} 2>&1;
fi;
fi;
if is_existing "$1"
then
eval "${return_bad}";
else
eval "${return_good}";
fi;
} # rm_file_with_debug()
########################################################################
# rm_tree (<dir_name>)
#
# Remove a file or a complete directory tree.
#
# Globals: $_DEBUG_KEEP_FILES
#
rm_tree()
{
func_check rm_tree '=' 1 "$@";
if is_existing "$1"
then
rm -f -r "$1" >${_NULL_DEV} 2>&1;
fi;
if is_existing "$1"
then
eval "${return_bad}";
else
eval "${return_good}";
fi;
} # rm_tree()
########################################################################
# save_stdin ()
#
# Store standard input to temporary file (with decompression).
#
# Variable prefix: ss
#
if obj _HAS_COMPRESSION is_yes
then
save_stdin()
{
func_check save_stdin '=' 0 "$@";
ss_f="${_TMP_DIR}"/INPUT;
cat >"${ss_f}";
cat_z "${ss_f}" >"${_TMP_STDIN}";
rm_file "${ss_f}";
eval ${_UNSET} ss_f;
eval "${return_ok}";
} # save_stdin()
else # no compression
save_stdin()
{
func_check save_stdin '=' 0 "$@";
cat >"${_TMP_STDIN}";
eval "${return_ok}";
} # save_stdin()
fi;
########################################################################
# special_filespec ()
#
# Handle special modes like whatis and apropos. Run their filespec
# functions if suitable.
#
# Globals: in: $_OPT_APROPOS, $_OPT_WHATIS, $_SPECIAL_SETUP
# out: $_SPECIAL_FILESPEC (internal)
#
special_filespec()
{
func_check special_filespec '=' 0 "$@";
if obj _OPT_APROPOS is_not_yes && obj _OPT_WHATIS is_not_yes
then
eval "${return_bad}";
fi;
if obj _OPT_APROPOS is_yes && obj _OPT_WHATIS is_yes
then
error \
'special_filespec(): $_OPT_APROPOS and $_OPT_WHATIS are both "yes"';
fi;
if obj _SPECIAL_SETUP is_not_yes
then
error 'special_filespec(): setup for apropos or whatis must be run first.';
fi;
if apropos_filespec || whatis_filespec;
then
eval "${return_ok}";
else
eval "${return_bad}";
fi;
} # special_filespec()
########################################################################
# special_setup ()
#
# Handle special modes like whatis and apropos. Run their setup
# functions if suitable.
#
special_setup()
{
func_check special_setup '=' 0 "$@";
if obj _OPT_APROPOS is_yes && obj _OPT_WHATIS is_yes
then
error \
'special_setup(): $_OPT_APROPOS and $_OPT_WHATIS are both "yes"';
fi;
if apropos_setup || whatis_setup
then
eval "${return_ok}";
else
eval "${return_bad}";
fi;
} # special_setup()
########################################################################
landmark '11: stack_*()';
########################################################################
########################################################################
# string_contains (<string> <part>)
#
# Test whether <part> is contained in <string>.
#
# Arguments : 2 text arguments.
# Return : `0' if arg2 is substring of arg1, `1' otherwise.
#
string_contains()
{
func_check string_contains '=' 2 "$@";
case "$1" in
*${2}*)
eval "${return_yes}";
;;
*)
eval "${return_no}";
;;
esac;
eval "${return_ok}";
} # string_contains()
########################################################################
# string_not_contains (<string> <part>)
#
# Test whether <part> is not substring of <string>.
#
# Arguments : 2 text arguments.
# Return : `0' if arg2 is substring of arg1, `1' otherwise.
#
string_not_contains()
{
func_check string_not_contains '=' 2 "$@";
if string_contains "$1" "$2"
then
eval "${return_no}";
else
eval "${return_yes}";
fi;
eval "${return_ok}";
} # string_not_contains()
########################################################################
landmark '12: tmp_*()';
########################################################################
########################################################################
# tmp_cat ()
#
# Output the temporary cat file (the concatenation of all input).
#
tmp_cat()
{
func_check tmp_cat '=' 0 "$@";
cat "${_TMP_CAT}";
eval "${return_var}" "$?";
} # tmp_cat()
########################################################################
# tmp_create (<suffix>?)
#
# Create temporary file. The generated name is `,' followed by
# <suffix>.
#
# Argument: 0 or 1
#
# Globals: $_TMP_DIR
#
# Output : name of created file
#
# Variable prefix: tc
#
tmp_create()
{
func_check tmp_create '<=' 1 "$@";
if obj _TMP_DIR is_empty || obj _TMP_DIR is_not_dir
then
error 'tmp_create(): there is no temporary directory.';
else
# the output file does not have `,' as first character, so these are
# different names from the output file.
tc_tmp="${_TMP_DIR}/,$1";
obj tc_tmp rm_file;
: >"${tc_tmp}"
obj tc_tmp echo1;
fi;
eval ${_UNSET} tc_tmp;
eval "${return_ok}";
} # tmp_create()
########################################################################
# to_tmp (<filename>)
#
# Print file (decompressed) to the temporary cat file.
#
# Variable prefix: tt
#
to_tmp()
{
func_check to_tmp '=' 1 "$@";
if obj _TMP_CAT is_empty
then
error 'to_tmp(): $_TMP_CAT is not yet set';
fi;
tt_1="$1";
tt_so_nr=0; # number for temporary `,so,*,*'
if is_file "${tt_1}"
then
tt_dir="$(dir_name "${tt_1}")";
if obj _OPT_WHATIS is_yes
then
whatis_filename "${tt_1}" >>"${_TMP_CAT}";
else
_FILE_NR="$(expr ${_FILE_NR} + 1)";
tt_file="${_TMP_DIR}/,file${_FILE_NR}";
if obj _FILESPEC_IS_MAN is_yes
then
if obj _DEBUG_PRINT_FILENAMES is_yes
then
echo2 "file: ${tt_1}";
fi;
tt_tmp="${_TMP_DIR}/,tmp";
cat_z "${tt_1}" >"${tt_file}";
grep '^\.[ ]*so[ ]' "${tt_file}" |
sed -e 's/^\.[ ]*so[ ]*//' >"${tt_tmp}";
list_from_file tt_list "${tt_tmp}";
eval set x ${tt_list};
shift;
for i in "$@"
do
tt_i="$i";
tt_so_nr="$(expr ${tt_so_nr} + 1)";
tt_sofile="${_TMP_DIR}/,so${_FILE_NR}_${tt_so_nr}";
tt_sofiles="${tt_sofiles} ${tt_sofile}";
_do_man_so "${tt_i}";
done;
rm_file "${tt_tmp}";
mv "${tt_file}" "${tt_tmp}";
cat "${tt_tmp}" | soelim -I "${tt_dir}" ${_SOELIM_R} >"${tt_file}";
for f in ${tt_sofiles}
do
rm_file_with_debug $f;
done;
rm_file "${tt_tmp}";
else # $_FILESPEC_IS_MAN ist not yes
cat_z "${tt_1}" | soelim -I "${tt_dir}" ${_SOELIM_R} >"${tt_file}";
fi;
### to_tmp()
obj_from_output tt_grog grog "${tt_file}";
case " ${tt_grog} " in
*\ -m*)
eval set x "$(echo1 " ${tt_grog} " | sed -e '
s/'"${_TAB}"'/ /g
s/ */ /g
s/ -m / -m/g
s/ -mm\([^ ]\)/ -m\1/g
')";
shift;
for i
do
tt_i="$i";
case "${tt_i}" in
-m*)
if list_has _MACRO_PACKAGES "${tt_i}"
then
case "${_MACRO_PKG}" in
'')
_MACRO_PKG="${tt_i}";
;;
${tt_i})
:;
;;
-m*)
echo2 "Ignore ${tt_1} because it needs ${tt_i} instead "\
"of ${_MACRO_PKG}."
rm_file_with_debug "${tt_file}";
eval ${_UNSET} tt_1;
eval ${_UNSET} tt_dir;
eval ${_UNSET} tt_file;
eval ${_UNSET} tt_grog;
eval ${_UNSET} tt_i;
eval ${_UNSET} tt_so_nr;
eval ${_UNSET} tt_sofile;
eval ${_UNSET} tt_sofiles;
eval ${_UNSET} tt_sofound;
eval ${_UNSET} tt_list;
eval ${_UNSET} tt_tmp;
eval "${return_bad}";
;;
### to_tmp()
*)
error \
'to_tmp(): $_MACRO_PKG does not start with -m: '"${_MACRO_PKG}";
;;
esac;
fi;
;;
esac;
done;
;;
esac;
cat "${tt_file}" >>"${_TMP_CAT}";
rm_file_with_debug "${tt_file}";
fi;
else
error "to_tmp(): could not read file \`${tt_1}'.";
fi;
eval ${_UNSET} tt_1;
eval ${_UNSET} tt_dir;
eval ${_UNSET} tt_file;
eval ${_UNSET} tt_grog;
eval ${_UNSET} tt_i;
eval ${_UNSET} tt_so_nr;
eval ${_UNSET} tt_sofile;
eval ${_UNSET} tt_sofiles;
eval ${_UNSET} tt_sofound;
eval ${_UNSET} tt_list;
eval ${_UNSET} tt_tmp;
eval "${return_ok}";
} # to_tmp()
#############
# _do_man_so (<so_arg>)
#
# Handle single .so file name for man pages.
#
# Local function to to_tmp().
#
# Globals from to_tmp(): $tt_tmp, $tt_sofile, $tt_file
# Globals: $_TMP_MAN
#
# Variable prefix: dms
#
_do_man_so() {
func_check _do_man_so '=' 1 "$@";
_dms_so="$1"; # evt. with `\ '
_dms_soname="$(echo $1 | sed -e 's/\\[ ]/ /g')"; # without `\ '
case "${_dms_soname}" in
/*) # absolute path
if test -f "${_dms_soname}"
then
eval "${return_ok}";
fi;
if test -f "${_dms_soname}"'.gz'
then
_dms_sofound="${_dms_soname}"'.gz';
elif test -f "${_dms_soname}"'.Z'
then
_dms_sofound="${_dms_soname}"'.Z';
elif test -f "${_dms_soname}"'.bz2'
then
_dms_sofound="${_dms_soname}"'.bz2';
else
eval ${_UNSET} _dms_so;
eval ${_UNSET} _dms_soname;
eval "${return_ok}";
fi;
;;
### _do_man_so() of to_tmp()
*) # relative to man path
eval grep "'/${_dms_soname}\$'" "${_TMP_MAN}" >"${tt_tmp}";
if is_empty_file "${tt_tmp}"
then
eval grep "'/${_dms_soname}.gz\$'" "${_TMP_MAN}" >"${tt_tmp}";
if is_empty_file "${tt_tmp}"
then
eval grep "'/${_dms_soname}.Z\$'" "${_TMP_MAN}" >"${tt_tmp}";
if is_empty_file "${tt_tmp}"
then
eval grep "'/${_dms_soname}.bz2\$'" "${_TMP_MAN}" >"${tt_tmp}";
fi;
fi;
fi;
if is_empty_file "${tt_tmp}"
then
eval "${return_ok}";
fi;
_dms_done='no';
list_from_file _dms_list "${tt_tmp}";
eval set x ${_dms_list};
shift;
for i
do
_dms_sofound="$i";
if obj _dms_sofound is_empty
then
continue;
fi;
_dms_done='yes';
break;
done;
### _do_man_so() of to_tmp()
if obj _dms_done is_not_yes
then
eval ${_UNSET} _dms_done;
eval ${_UNSET} _dms_sofound;
eval "${return_ok}";
fi;
;;
esac;
if obj _DEBUG_PRINT_FILENAMES is_yes
then
echo2 "file from .so: ${_dms_so}";
fi;
cat_z "${_dms_sofound}" >"${tt_sofile}";
_dms_esc="$(echo ${_dms_so} | sed -e 's/\\/\\\\/g')";
cat "${tt_file}" | eval sed -e \
"'s#^\\.[ ]*so[ ]*\(${_dms_so}\|${_dms_esc}\|${_dms_soname}\)[ ]*\$'"\
"'#.so ${tt_sofile}#'" \
>"${tt_tmp}";
rm_file "${tt_file}";
mv "${tt_tmp}" "${tt_file}";
eval ${_UNSET} _dms_done;
eval ${_UNSET} _dms_esc;
eval ${_UNSET} _dms_so;
eval ${_UNSET} _dms_sofound;
eval ${_UNSET} _dms_soname;
eval "${return_ok}";
} # _do_man_so() of to_tmp()
########################################################################
# to_tmp_line (<text>...)
#
# Print single line with <text> to the temporary cat file.
#
to_tmp_line()
{
func_check to_tmp_line '>=' 1 "$@";
if obj _TMP_CAT is_empty
then
error 'to_tmp_line(): $_TMP_CAT is not yet set';
fi;
echo1 "$*" >>"${_TMP_CAT}";
eval "${return_ok}";
} # to_tmp_line()
########################################################################
# trap_set
#
# Call function on signal 0.
#
trap_set()
{
func_check trap_set '=' 0 "$@";
trap 'clean_up' 0 2>${_NULL_DEV} || :;
eval "${return_ok}";
} # trap_set()
########################################################################
# trap_unset ()
#
# Disable trap on signal 0.
#
trap_unset()
{
func_check trap_unset '=' 0 "$@";
trap '' 0 2>${_NULL_DEV} || :;
eval "${return_ok}";
} # trap_unset()
########################################################################
# usage ()
#
# Print usage information to standard output; for groffer option --help.
#
usage()
{
func_check usage = 0 "$@";
echo;
version;
cat <<EOF
Usage: groffer [option]... [filespec]...
Display roff files, standard input, and/or Unix manual pages with a X
Window viewer or in several text modes. All input is decompressed
on-the-fly with all formats that gzip can handle.
"filespec" is one of
"filename" name of a readable file
"-" for standard input
"man:name(n)" man page "name" in section "n"
"man:name.n" man page "name" in section "n"
"man:name" man page "name" in first section found
"name(n)" man page "name" in section "n"
"name.n" man page "name" in section "n"
"n name" man page "name" in section "n"
"name" man page "name" in first section found
where `section' is a single character out of [1-9on], optionally followed
by some more letters that are called the `extension'.
-h --help print this usage message.
-T --device=name pass to groff using output device "name".
-v --version print version information.
-V display the groff execution pipe instead of formatting.
-X display with "gxditview" using groff -X.
-Z --ditroff --intermediate-output
generate groff intermediate output without
post-processing and viewing, like groff -Z.
All other short options are interpreted as "groff" formatting options.
The most important groffer long options are
--apropos=name start man's "apropos" program for "name".
--apropos-data=name
"apropos" for "name" in man's data sections 4, 5, 7.
--apropos-devel=name
"apropos" for "name" in development sections 2, 3, 9.
--apropos-progs=name
"apropos" for "name" in man's program sections 1, 6, 8.
--auto choose mode automatically from the default mode list.
--default reset all options to the default value.
--default-modes=mode1,mode2,...
set sequence of automatically tried modes.
--dvi display in a viewer for TeX device independent format.
--dvi-viewer=prog choose the viewer program for dvi mode.
--groff process like groff, disable viewing features.
--help display this helping output.
--html display in a web browser.
--html-viewer=program
choose a web browser for html mode.
--man check file parameters first whether they are man pages.
--mode=auto|dvi|groff|html|pdf|ps|source|text|tty|www|x|X
choose display mode.
--no-man disable man-page facility.
--no-special disable --all, --apropos*, and --whatis
--pager=program preset the paging program for tty mode.
--pdf display in a PDF viewer.
--pdf-viewer=prog choose the viewer program for pdf mode.
--ps display in a Postscript viewer.
--ps-viewer=prog choose the viewer program for ps mode.
--shell=program specify a shell under which to run groffer2.sh.
--source output as roff source.
--text output in a text device without a pager.
--to-stdout output the content of the mode file without display.
--tty display with a pager on text terminal even when in X.
--tty-viewer=prog select a pager for tty mode; same as --pager.
--whatis display the file name and description of man pages
--www same as --html.
--www-viewer=prog same as --html-viewer
--x --X display with "gxditview" using an X* device.
--x-viewer=prog choose viewer program for x mode (X mode).
--X-viewer=prog same as "--xviewer".
The usual X Windows toolkit options transformed into GNU long options:
--background=color, --bd=size, --bg=color, --bordercolor=color,
--borderwidth=size, --bw=size, --display=Xdisplay, --fg=color,
--fn=font, --font=font, --foreground=color, --geometry=geom, --iconic,
--resolution=dpi, --rv, --title=text, --xrm=resource
Long options of GNU "man":
--all, --ascii, --ditroff, --extension=suffix, --locale=language,
--local-file=name, --location, --manpath=dir1:dir2:...,
--sections=s1:s2:..., --systems=s1,s2,..., --where, ...
Development options that are not useful for normal usage:
--debug, --debug-all, --debug-filenames, --debug-func, --debug-not-func,
--debug-keep, --debug-lm, --debug-params, --debug-shell, --debug-stacks,
--debug-tmpdir, --debug-user, --do-nothing, --print=text, --shell=prog
EOF
eval "${return_ok}";
} # usage()
########################################################################
# version ()
#
# Print version information to standard output.
# For groffer option --version.
#
version()
{
func_check version = 0 "$@";
y="$(echo "${_LAST_UPDATE}" | sed -e 's/^.* //')";
cat <<EOF
groffer ${_PROGRAM_VERSION} of ${_LAST_UPDATE} (shell version)
is part of groff version ${_GROFF_VERSION}.
Copyright (C) $y Free Software Foundation, Inc.
GNU groff and groffer come with ABSOLUTELY NO WARRANTY.
You may redistribute copies of groff and its subprograms
under the terms of the GNU General Public License.
EOF
eval "${return_ok}";
} # version()
########################################################################
# warning (<string>)
#
# Print warning to stderr.
#
warning()
{
echo2 "warning: $*";
} # warning()
########################################################################
# whatis_filename (<filename>)
#
# Interpret <filename> as a man page and display its `whatis'
# information as a fragment written in the groff language.
#
# Globals: in: $_OPT_WHATIS, $_SPECIAL_SETUP, $_SPECIAL_FILESPEC,
# $_FILESPEC_ARG
#
# Variable prefix: wf
#
whatis_filename()
{
func_check whatis_filename = 1 "$@";
if obj _OPT_WHATIS is_not_yes
then
error 'whatis_filename(): $_OPT_WHATIS is not yes.';
fi;
if obj _SPECIAL_SETUP is_not_yes
then
error \
'whatis_filename(): setup for whatis whatis_setup() must be run first.';
fi;
if obj _SPECIAL_FILESPEC is_not_yes
then
error 'whatis_filename(): whatis_filespec() must be run first.';
fi;
wf_arg="$1";
if obj wf_arg is_not_file
then
error "whatis_filename(): argument is not a readable file."
fi;
wf_dot='^\.'"${_SPACE_SED}"'*';
### whatis_filename()
if obj _FILESPEC_ARG is_equal '-'
then
wf_arg='stdin';
fi;
cat <<EOF
\f[CR]${wf_arg}\f[]:
.br
EOF
# get the parts of the file name
wf_name="$(base_name $1)";
wf_section="$(echo1 $1 | sed -n -e '
s|^.*/man\('"${_MAN_AUTO_SEC_CHARS}"'\).*$|\1|p
')";
if obj wf_section is_not_empty
then
case "${wf_name}" in
*.${wf_section}*)
s='yes';
;;
*)
s='';
wf_section='';
;;
### whatis_filename()
esac
if obj s is_yes
then
wf_name="$(echo1 ${wf_name} | sed -e '
s/^\(.*\)\.'${wf_section}'.*$/\1/
')";
fi;
fi;
# traditional man style; grep the line containing `.TH' macro, if any
wf_res="$(cat_z "$1" | sed -e '
/'"${wf_dot}"'TH /p
d
')";
exit_test;
if obj wf_res is_not_empty
then # traditional man style
# get the first line after the first `.SH' macro, by
# - delete up to first .SH;
# - print all lines before the next .SH;
# - quit.
wf_res="$(cat_z "$1" | sed -n -e '
1,/'"${wf_dot}"'SH/d
/'"${wf_dot}"'SH/q
p
')";
if obj wf_section is_not_empty
then
case "${wf_res}" in
${wf_name}${_SPACE_CASE}*-${_SPACE_CASE}*)
s='yes';
;;
### whatis_filename()
*)
s='';
;;
esac;
if obj s is_yes
then
wf_res="$(obj wf_res echo1 | sed -e '
s/^'"${wf_name}${_SPACE_SED}"'[^-]*-'"${_SPACE_SED}"'*\(.*\)$/'"${wf_name}"' ('"${wf_section}"') \\[em] \1/
')";
fi;
fi;
obj wf_res echo1;
echo;
eval ${_UNSET} wf_arg;
eval ${_UNSET} wf_dot;
eval ${_UNSET} wf_name;
eval ${_UNSET} wf_res;
eval ${_UNSET} wf_section;
eval "${return_ok}";
fi;
# mdoc style (BSD doc); grep the line containing `.Nd' macro, if any
wf_res="$(cat_z "$1" | sed -n -e '/'"${wf_dot}"'Nd /s///p')";
exit_test;
if obj wf_res is_not_empty
then # BSD doc style
if obj wf_section is_not_empty
then
wf_res="$(obj wf_res echo1 | sed -n -e '
s/^\(.*\)$/'"${wf_name}"' ('"${wf_section}"') \\[em] \1/p
')";
fi;
### whatis_filename()
obj wf_res echo1;
echo;
eval ${_UNSET} wf_arg;
eval ${_UNSET} wf_dot;
eval ${_UNSET} wf_name;
eval ${_UNSET} wf_res;
eval ${_UNSET} wf_section;
eval "${return_ok}";
fi;
echo1 'is not a man page';
echo;
eval ${_UNSET} wf_arg;
eval ${_UNSET} wf_dot;
eval ${_UNSET} wf_name;
eval ${_UNSET} wf_res;
eval ${_UNSET} wf_section;
eval "${return_bad}";
} # whatis_filename()
########################################################################
# whatis_filespec ()
#
# Print the filespec name as .SH to the temporary cat file.
#
# Globals: in: $_OPT_WHATIS, $_SPECIAL_SETUP
# out: $_SPECIAL_FILESPEC
#
whatis_filespec()
{
func_check whatis_filespec '=' 0 "$@";
if obj _OPT_WHATIS is_yes
then
if obj _SPECIAL_SETUP is_not_yes
then
error 'whatis_filespec(): whatis_setup() must be run first.';
fi;
_SPECIAL_FILESPEC='yes';
eval to_tmp_line \
"'.SH $(echo1 "${_FILESPEC_ARG}" | sed 's/[^\\]-/\\-/g')'";
exit_test;
eval "${return_ok}";
else
eval "${return_bad}";
fi;
} # whatis_filespec()
########################################################################
# whatis_setup ()
#
# Print the whatis header to the temporary cat file; this is the setup
# for whatis.
#
# Globals: in: $_OPT_WHATIS
# out: $_SPECIAL_SETUP
#
whatis_setup()
{
func_check whatis_setup '=' 0 "$@";
if obj _OPT_WHATIS is_yes
then
to_tmp_line '.TH GROFFER WHATIS';
_SPECIAL_SETUP='yes';
if obj _OPT_TITLE is_empty
then
_OPT_TITLE='whatis';
fi;
eval "${return_ok}";
else
eval "${return_bad}";
fi;
} # whatis_setup()
########################################################################
# where_is_prog (<program>)
#
# Output path of a program and the given arguments if in $PATH.
#
# Arguments : 1, <program> can have spaces and arguments.
# Output : list of 2 elements: prog name (with directory) and arguments
# Return : `0' if arg1 is a program in $PATH, `1' otherwise.
#
# Variable prefix: wip
#
where_is_prog()
{
func_check where_is_prog '=' 1 "$@";
if is_empty "$1"
then
eval "${return_bad}";
fi;
# Remove disturbing multiple spaces and tabs
wip_1="$(echo1 "$1" | sed -e 's/[ ][ ]*/ /g' | \
sed -e 's/\(\\\)* / /g' | sed -e 's/^ //' | sed -e 's/ $//')";
wip_noarg="$(echo1 "${wip_1}" | sed -e 's/ -.*$//')";
exit_test;
if obj wip_noarg is_empty
then
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_noarg;
eval "${return_bad}";
fi;
case "${wip_1}" in
*\ -*)
wip_args="$(echo1 "${wip_1}" |
eval sed -e "'s#^${wip_noarg} ##'")";
exit_test;
;;
*)
wip_args='';
;;
esac;
wip_result='';
### where_is_prog()
if test -f "${wip_noarg}" && test -x "${wip_noarg}"
then
list_append wip_result "${wip_noarg}" "${wip_args}";
exit_test;
obj wip_result echo1;
exit_test;
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_args;
eval ${_UNSET} wip_noarg;
eval ${_UNSET} wip_result;
eval "${return_ok}";
fi;
# test whether $wip_noarg has directory, so it is not tested with $PATH
case "${wip_noarg}" in
*/*)
# now $wip_noarg (with /) is not an executable file
# test name with space
obj_from_output wip_name base_name "${wip_noarg}";
obj_from_output wip_dir dir_name "${wip_noarg}";
case "${wip_name}" in
*\ *)
wip_base="$(echo1 "${wip_name}" | sed -e 's/ .*$//')";
exit_test;
obj_from_output wip_file dir_name_append "${wip_dir}" "${wip_base}";
exit_test;
### where_is_prog()
if test -f "${wip_file}" && test -x "${wip_file}"
then
wip_baseargs="$(echo1 "${wip_name}" |
eval sed -e "'s#^${wip_base} ##'")";
exit_test;
if obj wip_args is_empty
then
wip_args="${wip_baseargs}";
else
wip_args="${wip_baseargs} ${wip_args}";
fi;
list_append wip_result "${wip_file}" "${wip_args}";
exit_test;
obj wip_result echo1;
exit_test;
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_args;
eval ${_UNSET} wip_base;
eval ${_UNSET} wip_baseargs;
eval ${_UNSET} wip_dir;
eval ${_UNSET} wip_file;
eval ${_UNSET} wip_name;
eval ${_UNSET} wip_noarg;
eval ${_UNSET} wip_result;
eval "${return_ok}";
fi; # test ${wip_file}
;;
esac; # end of test name with space
### where_is_prog()
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_args;
eval ${_UNSET} wip_base;
eval ${_UNSET} wip_dir;
eval ${_UNSET} wip_name;
eval ${_UNSET} wip_noarg;
eval ${_UNSET} wip_result;
eval "${return_bad}";
;;
esac; # test of $wip_noarg on path with directory
# now $wip_noarg does not have a /, so it is checked with $PATH.
eval set x "$(path_list "${PATH}")";
exit_test;
shift;
# test path with $win_noarg, evt. with spaces
for d
do
wip_dir="$d";
obj_from_output wip_file dir_name_append "${wip_dir}" "${wip_noarg}";
### where_is_prog()
# test $win_file on executable file
if test -f "${wip_file}" && test -x "${wip_file}"
then
list_append wip_result "${wip_file}" "${wip_args}";
exit_test;
obj wip_result echo1;
exit_test;
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_dir;
eval ${_UNSET} wip_file;
eval ${_UNSET} wip_noarg;
eval ${_UNSET} wip_result;
eval "${return_ok}";
fi; # test $win_file on executable file
done; # test path with $win_prog with spaces
case "${wip_noarg}" in
*\ *)
# test on path with base name without space
wip_base="$(echo1 "${wip_noarg}" | sed -e 's/^\([^ ]*\) .*$/\1/')";
exit_test;
for d
do
wip_dir="$d";
obj_from_output wip_file dir_name_append "${wip_dir}" "${wip_base}";
exit_test;
### where_is_prog()
# test $win_file on executable file
if test -f "${wip_file}" && test -x "${wip_file}"
then
wip_baseargs="$(echo1 "${wip_noarg}" |
sed -e 's/[^ ]* \(.*\)$/\1/')";
exit_test;
if obj wip_args is_empty
then
wip_args="${wip_baseargs}";
else
wip_args="${wip_args} ${wip_baseargs}";
fi;
list_append wip_result "${wip_file}" "${wip_args}";
exit_test;
obj wip_result echo1;
exit_test;
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_args;
eval ${_UNSET} wip_base;
eval ${_UNSET} wip_baseargs;
eval ${_UNSET} wip_dir;
eval ${_UNSET} wip_file;
eval ${_UNSET} wip_name;
eval ${_UNSET} wip_noarg;
eval ${_UNSET} wip_result;
eval "${return_ok}";
fi; # test of $wip_file on executable file
done; # test path with base name without space
### where_is_prog()
;;
esac; # test of $wip_noarg on space
eval ${_UNSET} wip_1;
eval ${_UNSET} wip_args;
eval ${_UNSET} wip_base;
eval ${_UNSET} wip_baseargs;
eval ${_UNSET} wip_dir;
eval ${_UNSET} wip_file;
eval ${_UNSET} wip_name;
eval ${_UNSET} wip_noarg;
eval ${_UNSET} wip_result;
eval "${return_bad}";
} # where_is_prog()
########################################################################
# main* Functions
########################################################################
# The main area contains the following parts:
# - main_init(): initialize temporary files and set exit trap
# - main_parse_MANOPT(): parse $MANOPT
# - main_parse_args(): argument parsing
# - main_set_mode (): determine the display mode
# - main_do_fileargs(): process filespec arguments
# - main_set_resources(): setup X resources
# - main_display(): do the displaying
# - main(): the main function that calls all main_*()
#######################################################################
# main_init ()
#
# Set exit trap and create temporary directory and some temporary files.
#
# Globals: $_TMP_DIR, $_TMP_CAT, $_TMP_STDIN
#
# Variable prefix: mi
#
main_init()
{
func_check main_init = 0 "$@";
# call clean_up() on shell termination.
trap_set;
# create temporary directory
umask 0077;
_TMP_DIR='';
for d in "${GROFF_TMPDIR}" "${TMPDIR}" "${TMP}" "${TEMP}" \
"${TEMPDIR}" "${HOME}"'/tmp' '/tmp' "${HOME}" '.'
do
mi_dir="$d";
if obj mi_dir is_empty || obj mi_dir is_not_dir || \
obj mi_dir is_not_writable
then
continue;
fi;
case "${mi_dir}" in
*/)
_TMP_DIR="${mi_dir}";
;;
*)
_TMP_DIR="${mi_dir}"'/';
;;
esac;
_TMP_DIR="${_TMP_DIR}groffer${_PROCESS_ID}";
if obj _TMP_DIR rm_tree
then
:
else
mi_tdir_="${_TMP_DIR}"_;
mi_n=1;
mi_tdir_n="${mi_tdir_}${mi_n}";
### main_init()
while obj mi_tdir_n is_existing
do
if obj mi_tdir_n rm_tree
then
# directory could not be removed
mi_n="$(expr "${mi_n}" + 1)";
mi_tdir_n="${mi_tdir_}${mi_n}";
continue;
fi;
done;
_TMP_DIR="${mi_tdir_n}";
fi;
eval mkdir "${_TMP_DIR}";
if is_not_equal "$?" 0
then
obj _TMP_DIR rm_tree;
_TMP_DIR='';
continue;
fi;
if obj _TMP_DIR is_dir && obj _TMP_DIR is_writable
then
# $_TMP_DIR can now be used as temporary directory
break;
fi;
obj _TMP_DIR rm_tree;
_TMP_DIR='';
continue;
done;
if obj _TMP_DIR is_empty
then
error "main_init(): \
Couldn't create a directory for storing temporary files.";
fi;
### main_init()
if obj _DEBUG_PRINT_TMPDIR is_yes
then
echo2 "temporary directory: ${_TMP_DIR}";
fi;
obj_from_output _TMP_CAT tmp_create groffer_cat;
obj_from_output _TMP_STDIN tmp_create groffer_input;
eval ${_UNSET} mi_dir;
eval ${_UNSET} mi_n;
eval ${_UNSET} mi_tdir_;
eval ${_UNSET} mi_tdir_n;
eval "${return_ok}";
} # main_init()
########################################################################
# main_parse_MANOPT ()
#
# Parse $MANOPT to retrieve man options, but only if it is a non-empty
# string; found man arguments can be overwritten by the command line.
#
# Globals:
# in: $MANOPT, $_OPTS_MANOPT_*
# out: $_MANOPT_*
#
# Variable prefix: mpm
#
main_parse_MANOPT()
{
func_check main_parse_MANOPT = 0 "$@";
if obj MANOPT is_not_empty
then
# Delete leading and final spaces
MANOPT="$(echo1 "${MANOPT}" | sed -e '
s/^'"${_SPACE_SED}"'*//
s/'"${_SPACE_SED}"'*$//
')";
exit_test;
fi;
if obj MANOPT is_empty
then
eval "${return_ok}";
fi;
mpm_list='';
# add arguments in $MANOPT by mapping them to groffer options
eval set x "$(list_from_cmdline _OPTS_MANOPT "${MANOPT}")";
exit_test;
shift;
until test "$#" -le 0 || is_equal "$1" '--'
do
mpm_opt="$1";
shift;
case "${mpm_opt}" in
-7|--ascii)
list_append mpm_list '--ascii';
;;
-a|--all)
list_append mpm_list '--all';
;;
### main_parse_MANOPT()
-c|--catman)
do_nothing;
shift;
;;
-d|--debug)
do_nothing;
;;
-D|--default)
# undo all man options so far
mpm_list='';
;;
-e|--extension)
list_append mpm_list '--extension';
shift;
;;
-f|--whatis)
list_append mpm_list '--whatis';
shift;
;;
-h|--help)
do_nothing;
;;
-k|--apropos)
# groffer's --apropos takes an argument, but man's does not, so
do_nothing;
;;
-l|--local-file)
do_nothing;
;;
-L|--locale)
list_append mpm_list '--locale' "$1";
shift;
;;
### main_parse_MANOPT()
-m|--systems)
list_append mpm_list '--systems' "$1";
shift;
;;
-M|--manpath)
list_append mpm_list '--manpath' "$1";
shift;
;;
-p|--preprocessor)
do_nothing;
shift;
;;
-P|--pager)
list_append mpm_list '--pager' "$1";
shift;
;;
-r|--prompt)
do_nothing;
shift;
;;
-S|--sections)
list_append mpm_list '--sections' "$1";
shift;
;;
-t|--troff)
do_nothing;
;;
-T|--device)
list_append mpm_list '-T' "$1";
shift;
;;
### main_parse_MANOPT()
-u|--update)
do_nothing;
;;
-V|--version)
do_nothing;
;;
-w|--where|--location)
list_append mpm_list '--location';
;;
-Z|--ditroff)
do_nothing;
;;
# ignore all other options
esac;
done;
# prepend $mpm_list to the command line
if obj mpm_list is_not_empty
then
eval set x "${mpm_list}" '"$@"';
shift;
fi;
eval ${_UNSET} mpm_list;
eval ${_UNSET} mpm_opt;
eval "${return_ok}";
} # main_parse_MANOPT()
########################################################################
# main_parse_args (<command_line_args>*)
#
# Parse arguments; process options and filespec parameters.
#
# Arguments: pass the command line arguments unaltered.
# Globals:
# in: $_OPTS_*
# out: $_OPT_*, $_ADDOPTS, $_FILEARGS
#
# Variable prefix: mpa
#
main_parse_args()
{
func_check main_parse_args '>=' 0 "$@";
obj_from_output _ALL_PARAMS list_from_cmdline_with_minus _OPTS_CMDLINE "$@";
if obj _DEBUG_PRINT_PARAMS is_yes
then
echo2 "parameters: ${_ALL_PARAMS}";
fi;
eval set x "${_ALL_PARAMS}";
shift;
# By the call of `eval', unnecessary quoting was removed. So the
# positional shell parameters ($1, $2, ...) are now guaranteed to
# represent an option or an argument to the previous option, if any;
# then a `--' argument for separating options and
# parameters; followed by the filespec parameters if any.
# Note, the existence of arguments to options has already been checked.
# So a check for `$#' or `--' should not be done for arguments.
until test "$#" -le 0 || is_equal "$1" '--'
do
mpa_opt="$1"; # $mpa_opt is fed into the option handler
shift;
case "${mpa_opt}" in
-h|--help)
usage;
leave;
;;
-Q|--source) # output source code (`Quellcode').
_OPT_MODE='source';
;;
### main_parse_args()
-T|--device|--troff-device) # device; arg
_OPT_DEVICE="$1";
_check_device_with_mode;
shift;
;;
-v|--version)
version;
leave;
;;
-V)
_OPT_V='yes';
;;
-Z|--ditroff|--intermediate-output) # groff intermediate output
_OPT_Z='yes';
;;
-X)
_OPT_MODE=X;
;;
-?)
# delete leading `-'
mpa_optchar="$(echo1 "${mpa_opt}" | sed -e 's/^-//')";
exit_test;
if list_has _OPTS_GROFF_SHORT_NA "${mpa_optchar}"
then
list_append _ADDOPTS_GROFF "${mpa_opt}";
elif list_has _OPTS_GROFF_SHORT_ARG "${mpa_optchar}"
then
list_append _ADDOPTS_GROFF "${mpa_opt}" "$1";
shift;
### main_parse_args()
else
error "main_parse_args(): Unknown option : \`$1'";
fi;
;;
--all)
_OPT_ALL='yes';
;;
--apropos) # run `apropos'
_OPT_APROPOS='yes';
_APROPOS_SECTIONS='';
_OPT_WHATIS='no';
;;
--apropos-data) # run `apropos' for data sections
_OPT_APROPOS='yes';
_APROPOS_SECTIONS='457';
_OPT_WHATIS='no';
;;
--apropos-devel) # run `apropos' for development sections
_OPT_APROPOS='yes';
_APROPOS_SECTIONS='239';
_OPT_WHATIS='no';
;;
--apropos-progs) # run `apropos' for program sections
_OPT_APROPOS='yes';
_APROPOS_SECTIONS='168';
_OPT_WHATIS='no';
;;
### main_parse_args()
--ascii)
list_append _ADDOPTS_GROFF '-mtty-char';
if obj _OPT_MODE is_empty
then
_OPT_MODE='text';
fi;
;;
--auto) # the default automatic mode
_OPT_MODE='';
;;
--bd|--bordercolor) # border color for viewers, arg;
_OPT_BD="$1";
shift;
;;
--bg|--backgroud) # background color for viewers, arg;
_OPT_BG="$1";
shift;
;;
--bw|--borderwidth) # border width for viewers, arg;
_OPT_BW="$1";
shift;
;;
--debug|--debug-all|--debug-filenames|--debug-func|--debug-not-func|\
--debug-keep|--debug-lm|--debug-params|--debug-shell|--debug-stacks|\
--debug-tmpdir|--debug-user)
# debug is handled at the beginning
:;
;;
--default) # reset variables to default
reset;
;;
### main_parse_args()
--default-modes) # sequence of modes in auto mode; arg
_OPT_DEFAULT_MODES="$1";
shift;
;;
--display) # set X display, arg
_OPT_DISPLAY="$1";
shift;
;;
--do-nothing)
_OPT_DO_NOTHING='yes';
;;
--dvi)
_OPT_MODE='dvi';
;;
--dvi-viewer|--dvi-viewer-tty) # viewer program for dvi mode; arg
_OPT_VIEWER_DVI="$1";
shift;
;;
--extension) # the extension for man pages, arg
_OPT_EXTENSION="$1";
shift;
;;
### main_parse_args()
--fg|--foreground) # foreground color for viewers, arg;
_OPT_FG="$1";
shift;
;;
--fn|--ft|--font) # set font for viewers, arg;
_OPT_FN="$1";
shift;
;;
--geometry) # window geometry for viewers, arg;
_OPT_GEOMETRY="$1";
shift;
;;
--groff)
_OPT_MODE='groff';
;;
--html|--www) # display with web browser
_OPT_MODE=html;
;;
--html-viewer|--www-viewer|--html-viewer-tty|--www-viewer-tty)
# viewer program for html mode; arg
_OPT_VIEWER_HTML="$1";
shift;
;;
--iconic) # start viewers as icons
_OPT_ICONIC='yes';
;;
### main_parse_args()
--locale) # set language for man pages, arg
# argument is xx[_territory[.codeset[@modifier]]] (ISO 639,...)
_OPT_LANG="$1";
shift;
;;
--local-file) # force local files; same as `--no-man'
_MAN_FORCE='no';
_MAN_ENABLE='no';
;;
--location|--where) # print file locations to stderr
_DEBUG_PRINT_FILENAMES='yes';
;;
--man) # force all file params to be man pages
_MAN_ENABLE='yes';
_MAN_FORCE='yes';
;;
--manpath) # specify search path for man pages, arg
# arg is colon-separated list of directories
_OPT_MANPATH="$1";
shift;
;;
--mode) # display mode
mpa_arg="$1";
shift;
case "${mpa_arg}" in
auto|'') # search mode automatically among default
_OPT_MODE='';
;;
groff) # pass input to plain groff
_OPT_MODE='groff';
;;
### main_parse_args()
html|www) # display with a web browser
_OPT_MODE='html';
;;
dvi) # display with xdvi viewer
_OPT_MODE='dvi';
;;
pdf) # display with PDF viewer
_OPT_MODE='pdf';
;;
ps) # display with Postscript viewer
_OPT_MODE='ps';
;;
text) # output on terminal
_OPT_MODE='text';
;;
tty) # output on terminal
_OPT_MODE='tty';
;;
X|x) # output on X roff viewer
_OPT_MODE='x';
;;
### main_parse_args()
Q|source) # display source code
_OPT_MODE="source";
;;
*)
error "main_parse_args(): unknown mode ${mpa_arg}";
;;
esac;
;;
--no-location) # disable former call to `--location'
_DEBUG_PRINT_FILENAMES='no';
;;
--no-man) # disable search for man pages
# the same as --local-file
_MAN_FORCE='no';
_MAN_ENABLE='no';
;;
--no-special) # disable some special former calls
_OPT_ALL='no'
_OPT_APROPOS='no'
_OPT_WHATIS='no'
;;
--pager|--tty-viewer|--tty-viewer-tty)
# set paging program for tty mode, arg
_OPT_PAGER="$1";
shift;
;;
--pdf)
_OPT_MODE='pdf';
;;
### main_parse_args()
--pdf-viewer|--pdf-viewer-tty) # viewer program for pdf mode; arg
_OPT_VIEWER_PDF="$1";
shift;
;;
--print) # for argument test
echo2 "$1";
shift;
;;
--ps)
_OPT_MODE='ps';
;;
--ps-viewer|--ps-viewer-tty) # viewer program for ps mode; arg
_OPT_VIEWER_PS="$1";
shift;
;;
### main_parse_args()
--resolution) # set resolution for X devices, arg
mpa_arg="$1";
shift;
case "${mpa_arg}" in
75|75dpi)
mpa_dpi=75;
;;
100|100dpi)
mpa_dpi=100;
;;
*)
error "main_parse_args(): \
only resoutions of 75 or 100 dpi are supported";
;;
esac;
_OPT_RESOLUTION="${mpa_dpi}";
;;
--rv)
_OPT_RV='yes';
;;
--sections) # specify sections for man pages, arg
# arg is colon-separated list of section names
_OPT_SECTIONS="$1";
shift;
;;
--shell)
# already done during the first run; so ignore the argument
shift;
;;
### main_parse_args()
--systems) # man pages for different OS's, arg
# argument is a comma-separated list
_OPT_SYSTEMS="$1";
shift;
;;
--text) # text mode without pager
_OPT_MODE=text;
;;
--title) # title for X viewers; arg
if is_not_empty "$1"
then
list_append _OPT_TITLE "$1";
fi;
shift;
;;
--to-stdout) # print mode file without display
_OPT_STDOUT='yes';
;;
--tty) # tty mode, text with pager
_OPT_MODE=tty;
;;
--text-device|--tty-device) # device for tty mode; arg
_OPT_TEXT_DEVICE="$1";
shift;
;;
--whatis)
_OPT_WHATIS='yes';
_OPT_APROPOS='no';
;;
--X|--x)
_OPT_MODE=x;
;;
### main_parse_args()
--xrm) # pass X resource string, arg;
list_append _OPT_XRM "$1";
shift;
;;
--x-viewer|--X-viewer|--x-viewer-tty|--X-viewer-tty)
# viewer program for x mode; arg
_OPT_VIEWER_X="$1";
shift;
;;
*)
error 'main_parse_args(): unknown option '"\`${mpa_opt}'.";
;;
esac;
done;
shift; # remove `--' argument
if obj _OPT_WHATIS is_yes
then
_MAN_ALL='yes';
_APROPOS_SECTIONS='';
fi;
if obj _OPT_DO_NOTHING is_yes
then
leave;
fi;
### main_parse_args()
case "$_OPT_DEFAULT_MODES" in
'') :; ;;
*,*)
obj_from_output _OPT_DEFAULT_MODES \
obj _OPT_DEFAULT_MODES list_from_split ',';
;;
*) :; ;;
esac;
# Remaining arguments are file names (filespecs).
# Save them to list $_FILEARGS
if is_equal "$#" 0
then # use "-" for standard input
_NO_FILESPECS='yes';
set x '-';
shift;
fi;
_FILEARGS='';
list_append _FILEARGS "$@";
# $_FILEARGS must be retrieved with `eval set x "$_FILEARGS"; shift;'
eval ${_UNSET} mpa_arg;
eval ${_UNSET} mpa_dpi;
eval ${_UNSET} mpa_opt;
eval ${_UNSET} mpa_optchar;
eval "${return_ok}";
} # main_parse_args()
# Called from main_parse_args() because double `case' is not possible.
# Globals: $_OPT_DEVICE, $_OPT_MODE
_check_device_with_mode()
{
func_check _check_device_with_mode = 0 "$@";
case "${_OPT_DEVICE}" in
dvi)
_OPT_MODE=dvi;
eval "${return_ok}";
;;
html)
_OPT_MODE=html;
eval "${return_ok}";
;;
lbp|lj4)
_OPT_MODE=groff;
eval "${return_ok}";
;;
ps)
_OPT_MODE=ps;
eval "${return_ok}";
;;
ascii|cp1047|latin1|utf8)
if obj _OPT_MODE is_not_equal text
then
_OPT_MODE=tty; # default text mode
fi;
eval "${return_ok}";
;;
X*)
_OPT_MODE=x;
eval "${return_ok}";
;;
*) # unknown device, go to groff mode
_OPT_MODE=groff;
eval "${return_ok}";
;;
esac;
eval "${return_error}";
} # _check_device_with_mode() of main_parse_args()
########################################################################
# main_set_mode ()
#
# Determine the display mode and the corresponding viewer program.
#
# Globals:
# in: $DISPLAY, $_OPT_MODE, $_OPT_DEVICE
# out: $_DISPLAY_MODE
#
# Variable prefix: msm
#
main_set_mode()
{
func_check main_set_mode = 0 "$@";
# set display
if obj _OPT_DISPLAY is_not_empty
then
DISPLAY="${_OPT_DISPLAY}";
fi;
if obj _OPT_V is_yes
then
list_append _ADDOPTS_GROFF '-V';
fi;
if obj _OPT_Z is_yes
then
_DISPLAY_MODE='groff';
list_append _ADDOPTS_GROFF '-Z';
fi;
if obj _OPT_MODE is_equal 'groff'
then
_DISPLAY_MODE='groff';
fi;
if obj _DISPLAY_MODE is_equal 'groff'
then
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
fi;
### main_set_mode()
case "${_OPT_MODE}" in
'') # automatic mode
case "${_OPT_DEVICE}" in
X*)
if is_not_X
then
error_user "no X display found for device ${_OPT_DEVICE}";
fi;
_DISPLAY_MODE='x';
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
ascii|cp1047|latin1|utf8)
if obj _DISPLAY_MODE is_not_equal 'text'
then
_DISPLAY_MODE='tty';
fi;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
### main_set_mode()
esac;
if is_not_X
then
_DISPLAY_MODE='tty';
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
fi;
if obj _OPT_DEFAULT_MODES is_empty
then
msm_modes="${_DEFAULT_MODES}";
else
msm_modes="${_OPT_DEFAULT_MODES}";
fi;
;;
source)
_DISPLAY_MODE='source';
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
text)
_DISPLAY_MODE='text';
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
tty)
_DISPLAY_MODE='tty';
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
### main_set_mode()
html)
_DISPLAY_MODE='html';
msm_modes="${_OPT_MODE}";
;;
*) # display mode was given
msm_modes="${_OPT_MODE}";
;;
esac;
eval set x "${msm_modes}";
shift;
while is_greater_than "$#" 0
do
msm_1="$1";
shift;
_VIEWER_BACKGROUND='no';
case "${msm_1}" in
dvi)
_get_prog_args DVI;
if is_not_equal "$?" 0
then
continue;
fi;
if obj _DISPLAY_PROG is_empty
then
if is_equal "$#" 0
then
error 'main_set_mode(): No viewer for dvi mode available.';
else
continue;
fi;
fi;
### main_set_mode()
_DISPLAY_MODE="dvi";
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
html)
_get_prog_args HTML;
if is_not_equal "$?" 0
then
continue;
fi;
if obj _DISPLAY_PROG is_empty
then
if is_equal "$#" 0
then
error 'main_set_mode(): No viewer for html mode available.';
else
continue;
fi;
fi;
### main_set_mode()
_DISPLAY_MODE=html;
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
pdf)
if obj _PDF_DID_NOT_WORK is_yes
then
if is_equal "$#" 0
then
error 'main_set_mode(): pdf mode did not work.';
else
continue;
fi;
fi;
if obj _PDF_HAS_PS2PDF is_not_yes
then
if is_prog ps2pdf
then
_PDF_HAS_PS2PDF='yes';
fi;
fi;
if obj _PDF_HAS_GS is_not_yes
then
if is_prog gs
then
_PDF_HAS_GS='yes';
fi;
fi;
_get_prog_args PDF;
if is_not_equal "$?" 0
then
_PDF_DID_NOT_WORK='yes';
continue;
fi;
if obj _DISPLAY_PROG is_empty
then
_PDF_DID_NOT_WORK='yes';
if is_equal "$#" 0
then
error 'main_set_mode(): No viewer for pdf mode available.';
else
continue;
fi;
fi;
_DISPLAY_MODE="pdf";
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
### main_set_mode()
ps)
_get_prog_args PS;
if is_not_equal "$?" 0
then
continue;
fi;
if obj _DISPLAY_PROG is_empty
then
if is_equal "$#" 0
then
error 'main_set_mode(): No viewer for ps mode available.';
else
continue;
fi;
fi;
_DISPLAY_MODE="ps";
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
text)
_DISPLAY_MODE='text';
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
### main_set_mode()
tty)
_DISPLAY_MODE='tty';
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
x)
_get_prog_args x;
if is_not_equal "$?" 0
then
continue;
fi;
if obj _DISPLAY_PROG is_empty
then
if is_equal "$#" 0
then
error 'main_set_mode(): No viewer for x mode available.';
else
continue;
fi;
fi;
_DISPLAY_MODE='x';
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
### main_set_mode()
X)
_DISPLAY_MODE='X';
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
eval "${return_ok}";
;;
esac;
done;
eval ${_UNSET} msm_1;
eval ${_UNSET} msm_modes;
eval ${_UNSET} msm_viewers;
error_user "No suitable display mode found.";
} # main_set_mode()
# _get_prog_args (<MODE>)
#
# Simplification for loop in main_set_mode().
#
# Globals in/out: $_VIEWER_BACKGROUND
# Globals in : $_OPT_VIEWER_<MODE>, $_VIEWER_<MODE>_X, $_VIEWER_<MODE>_TTY
#
# Variable prefix: _gpa
#
_get_prog_args()
{
func_check _get_prog_args '=' 1 "$@";
x="$(echo1 $1 | tr [a-z] [A-Z])";
eval _gpa_opt='"${_OPT_VIEWER_'"$x"'}"';
_gpa_xlist=_VIEWER_"$x"_X;
_gpa_ttylist=_VIEWER_"$x"_TTY;
if obj _gpa_opt is_empty
then
_VIEWER_BACKGROUND='no';
if is_X
then
_get_first_prog "${_gpa_xlist}";
x="$?";
if is_equal "$x" 0
then
_VIEWER_BACKGROUND='yes';
fi;
else
_get_first_prog "${_gpa_ttylist}";
x="$?";
fi;
exit_test;
eval ${_UNSET} _gpa_opt;
eval ${_UNSET} _gpa_prog;
eval ${_UNSET} _gpa_ttylist;
eval ${_UNSET} _gpa_xlist;
eval "${return_var} $x";
### _get_prog_args() of main_set_mode()
else # $_gpa_opt is not empty
obj_from_output _gpa_prog where_is_prog "${_gpa_opt}";
if is_not_equal "$?" 0 || obj _gpa_prog is_empty
then
exit_test;
echo2 "_get_prog_args(): '${_gpa_opt}' is not an existing program.";
eval ${_UNSET} _gpa_opt;
eval ${_UNSET} _gpa_prog;
eval ${_UNSET} _gpa_ttylist;
eval ${_UNSET} _gpa_xlist;
eval "${return_bad}";
fi;
exit_test;
# $_gpa_prog from opt is an existing program
### _get_prog_args() of main_set_mode()
if is_X
then
eval _check_prog_on_list ${_gpa_prog} ${_gpa_xlist};
if is_equal "$?" 0
then
_VIEWER_BACKGROUND='yes';
else
_VIEWER_BACKGROUND='no';
eval _check_prog_on_list ${_gpa_prog} ${_gpa_ttylist};
fi;
else # is not X
_VIEWER_BACKGROUND='no';
eval _check_prog_on_list ${_gpa_prog} ${_gpa_ttylist};
fi; # is_X
fi; # test of $_gpa_opt
eval ${_UNSET} _gpa_opt;
eval ${_UNSET} _gpa_prog;
eval ${_UNSET} _gpa_ttylist;
eval ${_UNSET} _gpa_xlist;
eval "${return_good}";
} # _get_prog_args() of main_set_mode()
# _get_first_prog (<prog_list_name>)
#
# Retrieve from the elements of the list in the argument the first
# existing program in $PATH.
#
# Local function for main_set_mode().
#
# Return : `1' if none found, `0' if found.
# Output : none
#
# Variable prefix: _gfp
#
_get_first_prog()
{
func_check _get_first_prog '=' 1 "$@";
eval x='"${'"$1"'}"';
eval set x "$x";
shift;
for i
do
_gfp_i="$i";
if obj _gfp_i is_empty
then
continue;
fi;
obj_from_output _gfp_result where_is_prog "${_gfp_i}";
if is_equal "$?" 0 && obj _gfp_result is_not_empty
then
exit_test;
eval set x ${_gfp_result};
shift;
_DISPLAY_PROG="$1";
_DISPLAY_ARGS="$2";
eval ${_UNSET} _gfp_i;
eval ${_UNSET} _gfp_result;
eval "${return_good}";
fi;
exit_test;
done;
eval ${_UNSET} _gfp_i;
eval ${_UNSET} _gfp_result;
eval "${return_bad}";
} # _get_first_prog() of main_set_mode()
# _check_prog_on_list (<prog> <args> <prog_list_name>)
#
# Check whether the content of <prog> is in the list <prog_list_name>.
# The globals are set correspondingly.
#
# Local function for main_set_mode().
#
# Arguments: 3
#
# Return : `1' if not a part of the list, `0' if found in the list.
# Output : none
#
# Globals in : $_VIEWER_<MODE>_X, $_VIEWER_<MODE>_TTY
# Globals in/out: $_DISPLAY_PROG, $_DISPLAY_ARGS
#
# Variable prefix: _cpol
#
_check_prog_on_list()
{
func_check _check_prog_on_list '=' 3 "$@";
_DISPLAY_PROG="$1";
_DISPLAY_ARGS="$2";
eval _cpol_3='"${'"$3"'}"';
eval set x "${_cpol_3}";
shift;
eval ${_UNSET} _cpol_3;
for i
do
_cpol_i="$i";
obj_from_output _cpol_list where_is_prog "${_cpol_i}";
if is_not_equal "$?" 0 || obj _cpol_list is_empty
then
exit_test;
continue;
fi;
exit_test;
_cpol_prog="$(eval set x ${_cpol_list}; shift; echo1 "$1")";
if is_not_equal "${_DISPLAY_PROG}" "${_cpol_prog}"
then
exit_test;
continue;
fi;
exit_test;
### _check_prog_on_list() of main_set_mode()
# equal, prog found
_cpol_args="$(eval set x ${_cpol_list}; shift; echo1 "$2")";
eval ${_UNSET} _cpol_list;
if obj _cpol_args is_not_empty
then
if obj _DISPLAY_ARGS is_empty
then
_DISPLAY_ARGS="${_cpol_args}";
else
_DISPLAY_ARGS="${_cpol_args} ${_DISPLAY_ARGS}";
fi;
fi;
eval ${_UNSET} _cpol_i;
eval ${_UNSET} _cpol_args;
eval ${_UNSET} _cpol_prog;
eval "${return_good}";
done; # for vars in list
# prog was not in the list
eval ${_UNSET} _cpol_i;
eval ${_UNSET} _cpol_args;
eval ${_UNSET} _cpol_list;
eval ${_UNSET} _cpol_prog;
eval "${return_bad}";
} # _check_prog_on_list() of main_set_mode()
#######################################################################
# main_do_fileargs ()
#
# Process filespec arguments.
#
# Globals:
# in: $_FILEARGS (process with `eval set x "$_FILEARGS"; shift;')
#
# Variable prefix: mdfa
#
main_do_fileargs()
{
func_check main_do_fileargs = 0 "$@";
special_setup;
if obj _OPT_APROPOS is_yes
then
if obj _NO_FILESPECS is_yes
then
apropos_filespec;
eval "${return_ok}";
fi;
else
if list_has _FILEARGS '-'
then
save_stdin;
fi;
fi;
eval set x "${_FILEARGS}";
shift;
eval ${_UNSET} _FILEARGS;
### main_do_fileargs()
while is_greater_than "$#" 0
do
mdfa_filespec="$1";
_FILESPEC_ARG="$1";
shift;
_FILESPEC_IS_MAN='no';
_TMP_MANSPEC='';
_SPECIAL_FILESPEC='no';
case "${mdfa_filespec}" in
'')
continue;
;;
esac;
# check for file
case "${mdfa_filespec}" in
'-')
special_filespec;
if obj _OPT_APROPOS is_yes
then
continue;
fi;
register_file '-';
continue;
;;
### main_do_fileargs()
*/*)
special_filespec;
if obj _OPT_APROPOS is_yes
then
continue;
fi;
if obj mdfa_filespec is_file
then
obj mdfa_filespec register_file;
else
echo2 "The argument ${mdfa_filespec} is not a file.";
fi;
continue;
;;
*)
if obj _OPT_APROPOS is_yes
then
special_filespec;
continue;
fi;
# check whether filespec is an existing file
if obj _MAN_FORCE is_not_yes
then
if obj mdfa_filespec is_file
then
special_filespec;
obj mdfa_filespec register_file;
continue;
fi;
fi;
;;
esac;
### main_do_fileargs()
# now it must be a man page pattern
if obj _MACRO_PKG is_not_empty && obj _MACRO_PKG is_not_equal '-man'
then
echo2 "${mdfa_filespec} is not a file, man pages are ignored "\
"due to ${_MACRO_PKG}.";
continue;
fi;
# check for man page
if obj _MAN_ENABLE is_not_yes
then
echo2 "The argument ${mdfa_filespec} is not a file.";
continue;
fi;
if obj _MAN_FORCE is_yes
then
mdfa_errmsg='is not a man page.';
else
mdfa_errmsg='is neither a file nor a man page.';
fi;
### main_do_fileargs()
man_setup;
_FILESPEC_IS_MAN='yes';
# test filespec with `man:...' or `...(...)' on man page
mdfa_name='';
mdfa_section='';
mdfa_ext='';
mdfa_names="${mdfa_filespec}";
case "${mdfa_filespec}" in
man:*)
mdfa_names="${mdfa_names} "\
"$(obj mdfa_filespec echo1 | sed -e 's/^man://')";
;;
esac;
mdfa_continue='no';
for i in ${mdfa_names}
do
mdfa_i=$i;
if obj mdfa_i man_is_man
then
special_filespec;
obj mdfa_i man_get;
mdfa_continue='yes';
break;
fi;
case "${mdfa_i}" in
*\(${_MAN_AUTO_SEC_CHARS}*\))
mdfa_section="$(obj mdfa_i echo1 | sed -e 's/^[^(]*(\(.\).*)$/\1/')";
mdfa_name="$(obj mdfa_i echo1 | sed -e 's/^\([^(]*\)(.*)$/\1/')";
mdfa_ext="$(obj mdfa_i echo1 | sed -e 's/^[^(]*(.\(.*\))$/\1/')";
if man_is_man "${mdfa_name}" "${mdfa_section}" "${mdfa_ext}"
then
special_filespec;
man_get "${mdfa_name}" "${mdfa_section}" "${mdfa_ext}";
mdfa_continue='yes';
break;
fi;
;;
*.${_MAN_AUTO_SEC_CHARS}*)
mdfa_name="$(obj mdfa_i echo1 | \
sed -e 's/^\(.*\)\.'"${_MAN_AUTO_SEC_CHARS}"'.*$/\1/')";
mdfa_section="$(obj mdfa_i echo1 | \
sed -e 's/^.*\.\('"${_MAN_AUTO_SEC_CHARS}"'\).*$/\1/')";
mdfa_ext="$(obj mdfa_i echo1 | \
sed -e 's/^.*\.'"${_MAN_AUTO_SEC_CHARS}"'\(.*\)$/\1/')";
if man_is_man "${mdfa_name}" "${mdfa_section}" "${mdfa_ext}"
then
special_filespec;
man_get "${mdfa_name}" "${mdfa_section}" "${mdfa_ext}";
mdfa_continue='yes';
break;
fi;
;;
esac;
done;
if obj mdfa_continue is_yes
then
continue;
fi;
### main_do_fileargs()
# check on "s name", where "s" is a section with or without an extension
if is_not_empty "$1"
then
mdfa_name="$1";
case "${mdfa_filespec}" in
${_MAN_AUTO_SEC_CHARS})
mdfa_section="${mdfa_filespec}";
mdfa_ext='';
;;
${_MAN_AUTO_SEC_CHARS}*)
mdfa_section="$(echo1 "${mdfa_filespec}" | \
sed -e 's/^\(.\).*$/\1/')";
mdfa_ext="$(echo1 "${mdfa_filespec}" | \
sed -e 's/^.\(.*\)$/\1/')";
;;
*)
echo2 "${mdfa_filespec} ${mdfa_errmsg}";
continue;
;;
esac;
shift;
if man_is_man "${mdfa_name}" "${mdfa_section}" "${mdfa_ext}"
then
_FILESPEC_ARG="${mdfa_filespec} ${mdfa_name}";
special_filespec;
man_get "${mdfa_name}" "${mdfa_section}" "${mdfa_ext}";
continue;
else
echo2 "No man page for ${mdfa_name} with section ${mdfa_filespec}.";
continue;
fi;
fi;
### main_do_fileargs()
echo2 "${mdfa_filespec} ${mdfa_errmsg}";
continue;
done;
obj _TMP_STDIN rm_file_with_debug;
eval ${_UNSET} mdfa_filespec;
eval ${_UNSET} mdfa_i;
eval ${_UNSET} mdfa_name;
eval ${_UNSET} mdfa_names;
eval "${return_ok}";
} # main_do_fileargs()
########################################################################
# main_set_resources ()
#
# Determine options for setting X resources with $_DISPLAY_PROG.
#
# Globals: $_DISPLAY_PROG, $_OUTPUT_FILE_NAME
#
# Variable prefix: msr
#
main_set_resources()
{
func_check main_set_resources = 0 "$@";
# $msr_prog viewer program
# $msr_rl resource list
for f in ${_TMP_DIR}/,man*
do
rm_file_with_debug $f;
done;
obj_from_output msr_title \
get_first_essential "${_OPT_TITLE}" "${_REG_TITLE_LIST}";
_OUTPUT_FILE_NAME='';
eval set x "${msr_title}";
shift;
until is_equal "$#" 0
do
msr_n="$1";
case "${msr_n}" in
'')
continue;
;;
,*)
msr_n="$(echo1 "$1" | sed -e 's/^,,*//')";
exit_test;
;;
esac;
if obj msr_n is_empty
then
continue;
fi;
if obj _OUTPUT_FILE_NAME is_not_empty
then
_OUTPUT_FILE_NAME="${_OUTPUT_FILE_NAME}"',';
fi;
_OUTPUT_FILE_NAME="${_OUTPUT_FILE_NAME}${msr_n}";
shift;
done; # until $# is 0
### main_set_resources()
case "${_OUTPUT_FILE_NAME}" in
'')
_OUTPUT_FILE_NAME='-';
;;
,*)
error "main_set_resources(): ${_OUTPUT_FILE_NAME} starts with a comma.";
;;
esac;
_OUTPUT_FILE_NAME="${_TMP_DIR}/${_OUTPUT_FILE_NAME}";
if obj _DISPLAY_PROG is_empty
then # for example, for groff mode
_DISPLAY_ARGS='';
eval ${_UNSET} msr_n;
eval ${_UNSET} msr_prog;
eval ${_UNSET} msr_rl;
eval ${_UNSET} msr_title;
eval "${return_ok}";
fi;
eval set x "${_DISPLAY_PROG}";
shift;
obj_from_output msr_prog base_name "$1";
shift;
if is_greater_than $# 0
then
if obj _DISPLAY_ARGS is_empty
then
_DISPLAY_ARGS="$*";
else
_DISPLAY_ARGS="$* ${_DISPLAY_ARGS}";
fi;
fi;
### main_set_resources()
msr_rl='';
if obj _OPT_BD is_not_empty
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-bd' "${_OPT_BD}";
;;
esac;
fi;
if obj _OPT_BG is_not_empty
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-bg' "${_OPT_BG}";
;;
kghostview)
list_append msr_rl '--bg' "${_OPT_BG}";
;;
xpdf)
list_append msr_rl '-papercolor' "${_OPT_BG}";
;;
esac;
fi;
if obj _OPT_BW is_not_empty
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
_list_append msr_rl '-bw' "${_OPT_BW}";
;;
esac;
fi;
### main_set_resources()
if obj _OPT_FG is_not_empty
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-fg' "${_OPT_FG}";
;;
kghostview)
list_append msr_rl '--fg' "${_OPT_FG}";
;;
esac;
fi;
if is_not_empty "${_OPT_FN}"
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-fn' "${_OPT_FN}";
;;
kghostview)
list_append msr_rl '--fn' "${_OPT_FN}";
;;
esac;
fi;
if is_not_empty "${_OPT_GEOMETRY}"
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi|xpdf)
list_append msr_rl '-geometry' "${_OPT_GEOMETRY}";
;;
kghostview)
list_append msr_rl '--geometry' "${_OPT_GEOMETRY}";
;;
esac;
fi;
### main_set_resources()
if is_empty "${_OPT_RESOLUTION}"
then
_OPT_RESOLUTION="${_DEFAULT_RESOLUTION}";
case "${msr_prog}" in
gxditview|xditview)
list_append msr_rl '-resolution' "${_DEFAULT_RESOLUTION}";
;;
xpdf)
case "${_DISPLAY_PROG}" in
*-z*)
:;
;;
*) # if xpdf does not have option -z
case "${_DEFAULT_RESOLUTION}" in
75)
# 72dpi is '100'
list_append msr_rl '-z' '104';
;;
100)
list_append msr_rl '-z' '139';
;;
esac;
;;
esac;
;;
esac;
else
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-resolution' "${_OPT_RESOLUTION}";
;;
xpdf)
case "${_DISPLAY_PROG}" in
*-z*)
:;
;;
*) # if xpdf does not have option -z
case "${_OPT_RESOLUTION}" in
75)
list_append msr_rl '-z' '104';
# '100' corresponds to 72dpi
;;
### main_set_resources()
100)
list_append msr_rl '-z' '139';
;;
esac;
;;
esac;
;;
esac;
fi;
if is_yes "${_OPT_ICONIC}"
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-iconic';
;;
esac;
fi;
if is_yes "${_OPT_RV}"
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi)
list_append msr_rl '-rv';
;;
esac;
fi;
if is_not_empty "${_OPT_XRM}"
then
case "${msr_prog}" in
ghostview|gv|gxditview|xditview|xdvi|xpdf)
eval set x "${_OPT_XRM}";
shift;
for i
do
list_append msr_rl '-xrm' "$i";
done;
### main_set_resources()
;;
esac;
fi;
if is_not_empty "${msr_title}"
then
case "${msr_prog}" in
gxditview|xditview)
list_append msr_rl '-title' "${msr_title}";
;;
esac;
fi;
if obj _DISPLAY_ARGS is_empty
then
_DISPLAY_ARGS="${msr_rl}";
else
_DISPLAY_ARGS="${msr_l} ${_DISPLAY_ARGS}";
fi;
eval ${_UNSET} msr_n;
eval ${_UNSET} msr_prog;
eval ${_UNSET} msr_rl;
eval ${_UNSET} msr_title;
eval "${return_ok}";
} # main_set_resources
########################################################################
# main_display ()
#
# Do the actual display of the whole thing.
#
# Globals:
# in: $_DISPLAY_MODE, $_OPT_DEVICE, $_ADDOPTS_GROFF,
# $_TMP_CAT, $_OPT_PAGER, $_MANOPT_PAGER, $_OUTPUT_FILE_NAME
#
# Variable prefix: md
#
main_display()
{
func_check main_display = 0 "$@";
export md_addopts;
export md_groggy;
export md_modefile;
if obj _TMP_CAT is_empty_file
then
echo2 'groffer: empty input.';
clean_up;
eval "${return_ok}";
fi;
md_modefile="${_OUTPUT_FILE_NAME}";
# go to the temporary directory to be able to access internal data files
cd "${_TMP_DIR}" >"${_NULL_DEV}" 2>&1;
case "${_DISPLAY_MODE}" in
groff)
if obj _OPT_DEVICE is_not_empty
then
_ADDOPTS_GROFF="${_ADDOPTS_GROFF} -T${_OPT_DEVICE}";
fi;
md_groggy="$(tmp_cat | eval grog)";
exit_test;
_do_opt_V;
### main_display()
obj md_modefile rm_file;
mv "${_TMP_CAT}" "${md_modefile}";
trap_unset;
cat "${md_modefile}" | \
{
trap_set;
eval "${md_groggy}" "${_ADDOPTS_GROFF}";
} &
;;
text|tty)
case "${_OPT_DEVICE}" in
'')
obj_from_output md_device \
get_first_essential "${_OPT_TEXT_DEVICE}" "${_DEFAULT_TTY_DEVICE}";
;;
ascii|cp1047|latin1|utf8)
md_device="${_OPT_DEVICE}";
;;
*)
warning "main_display(): \
wrong device for ${_DISPLAY_MODE} mode: ${_OPT_DEVICE}";
;;
esac;
md_addopts="${_ADDOPTS_GROFF}";
md_groggy="$(tmp_cat | grog -T${md_device})";
exit_test;
if obj _DISPLAY_MODE is_equal 'text'
then
_do_opt_V;
tmp_cat | eval "${md_groggy}" "${md_addopts}";
else # $_DISPLAY_MODE is 'tty'
### main_display()
md_pager='';
for p in "${_OPT_PAGER}" "${_MANOPT_PAGER}" "${PAGER}"
do
if obj p is_empty
then
continue;
fi;
obj_from_output md_pager where_is_prog "$p";
if is_not_equal "$?" 0 || obj md_pager is_empty
then
md_pager='';
continue;
fi;
eval set x $md_pager;
shift;
case "$1" in
*/less)
if is_empty "$2"
then
md_pager="$1"' -r -R';
else
md_pager="$1"' -r -R '"$2";
fi;
;;
### main_display()
*)
if is_empty "$2"
then
md_pager="$1";
else
md_pager="$1 $2";
fi;
;;
esac;
break;
done;
if obj md_pager is_empty
then
eval set x ${_VIEWER_TTY_TTY} ${_VIEWER_TTY_X} 'cat';
shift;
# that is: 'less -r -R' 'more' 'pager' 'xless' 'cat'
for p
do
if obj p is_empty
then
continue;
fi;
md_p="$p";
if is_prog "${md_p}"
then
md_pager="${md_p}";
break;
fi;
done;
fi;
### main_display()
if obj md_pager is_empty
then
error 'main_display(): no pager program found for tty mode';
fi;
_do_opt_V;
tmp_cat | eval "${md_groggy}" "${md_addopts}" | \
eval "${md_pager}";
fi; # $_DISPLAY_MODE
clean_up;
;; # text|tty)
source)
tmp_cat;
clean_up;
;;
#### viewer modes
### main_display()
dvi)
case "${_OPT_DEVICE}" in
''|dvi) do_nothing; ;;
*)
warning "main_display(): \
wrong device for ${_DISPLAY_MODE} mode: ${_OPT_DEVICE}"
;;
esac;
md_modefile="${md_modefile}".dvi;
md_groggy="$(tmp_cat | grog -Tdvi)";
exit_test;
_do_display;
;;
html)
case "${_OPT_DEVICE}" in
''|html) do_nothing; ;;
*)
warning "main_display(): \
wrong device for ${_DISPLAY_MODE} mode: ${_OPT_DEVICE}";
;;
esac;
md_modefile="${md_modefile}".html;
md_groggy="$(tmp_cat | grog -Thtml)";
exit_test;
_do_display;
;;
### main_display()
pdf)
case "${_OPT_DEVICE}" in
''|ps)
do_nothing;
;;
*)
warning "main_display(): \
wrong device for ${_DISPLAY_MODE} mode: ${_OPT_DEVICE}";
;;
esac;
md_groggy="$(tmp_cat | grog -Tps)";
exit_test;
_do_display _make_pdf;
;;
ps)
case "${_OPT_DEVICE}" in
''|ps)
do_nothing;
;;
*)
warning "main_display(): \
wrong device for ${_DISPLAY_MODE} mode: ${_OPT_DEVICE}";
;;
esac;
md_modefile="${md_modefile}".ps;
md_groggy="$(tmp_cat | grog -Tps)";
exit_test;
_do_display;
;;
### main_display()
x)
case "${_OPT_DEVICE}" in
X*)
md_device="${_OPT_DEVICE}"
;;
*)
case "${_OPT_RESOLUTION}" in
100)
md_device='X100';
if obj _OPT_GEOMETRY is_empty
then
case "${_DISPLAY_PROG}" in
gxditview|xditview)
# add width of 800dpi for resolution of 100dpi to the args
list_append _DISPLAY_ARGS '-geometry' '800';
;;
esac;
fi;
;;
*)
md_device='X75-12';
;;
esac
esac;
md_groggy="$(tmp_cat | grog -T${md_device} -Z)";
exit_test;
_do_display;
;;
### main_display()
X)
case "${_OPT_DEVICE}" in
'')
md_groggy="$(tmp_cat | grog -X)";
exit_test;
;;
X*|dvi|html|lbp|lj4|ps)
# these devices work with
md_groggy="$(tmp_cat | grog -T"${_OPT_DEVICE}" -X)";
exit_test;
;;
*)
warning "main_display(): \
wrong device for ${_DISPLAY_MODE} mode: ${_OPT_DEVICE}";
md_groggy="$(tmp_cat | grog -Z)";
exit_test;
;;
esac;
_do_display;
;;
*)
error "main_display(): unknown mode \`${_DISPLAY_MODE}'";
;;
esac;
eval ${_UNSET} md_addopts;
eval ${_UNSET} md_device;
eval ${_UNSET} md_groggy;
eval ${_UNSET} md_modefile;
eval ${_UNSET} md_p;
eval ${_UNSET} md_pager;
eval "${return_ok}";
} # main_display()
########################
# _do_display ([<prog>])
#
# Perform the generation of the output and view the result. If an
# argument is given interpret it as a function name that is called in
# the midst (actually only for `pdf').
#
# Globals: $md_modefile, $md_groggy (from main_display())
#
_do_display()
{
func_check _do_display '>=' 0 "$@";
_do_opt_V;
if obj _DISPLAY_PROG is_empty
then
trap_unset;
{
trap_set;
eval "${md_groggy}" "${_ADDOPTS_GROFF}" "${_TMP_CAT}";
} &
else
obj md_modefile rm_file;
cat "${_TMP_CAT}" | \
eval "${md_groggy}" "${_ADDOPTS_GROFF}" > "${md_modefile}";
if obj md_modefile is_empty_file
then
echo2 '_do_display(): empty output.';
clean_up;
exit;
fi;
if is_not_empty "$1"
then
eval "$1";
fi;
### _do_display() of main_display()
obj _TMP_CAT rm_file_with_debug;
if obj _OPT_STDOUT is_yes
then
cat "${md_modefile}";
clean_up;
exit;
fi;
if obj _VIEWER_BACKGROUND is_not_yes # for programs that run on tty
then
eval "'${_DISPLAY_PROG}'" ${_DISPLAY_ARGS} "\"${md_modefile}\"";
else
trap_unset;
{
trap_set;
eval "${_DISPLAY_PROG}" ${_DISPLAY_ARGS} "\"${md_modefile}\"";
} &
fi;
fi;
eval "${return_ok}";
} # _do_display() of main_display()
#############
# _do_opt_V ()
#
# Check on option `-V'; if set print the corresponding output and leave.
#
# Globals: $_ALL_PARAMS, $_ADDOPTS_GROFF, $_DISPLAY_MODE, $_DISPLAY_PROG,
# $_DISPLAY_ARGS, $md_groggy, $md_modefile
#
# Variable prefix: _doV
#
_do_opt_V()
{
func_check _do_opt_V '=' 0 "$@";
if obj _OPT_V is_yes
then
_OPT_V='no';
echo1 "Parameters: ${_ALL_PARAMS}";
echo1 "Display mode: ${_DISPLAY_MODE}";
echo1 "Output file: ${md_modefile}";
echo1 "Display prog: ${_DISPLAY_PROG} ${_DISPLAY_ARGS}";
a="$(eval echo1 "'${_ADDOPTS_GROFF}'")";
exit_test;
echo1 "Output of grog: ${md_groggy} $a";
_doV_res="$(eval "${md_groggy}" "${_ADDOPTS_GROFF}")";
exit_test;
echo1 "groff -V: ${_doV_res}"
leave;
fi;
eval "${return_ok}";
} # _do_opt_V() of main_display()
##############
# _make_pdf ()
#
# Transform to pdf format; for pdf mode in _do_display().
#
# Globals: $md_modefile (from main_display())
#
# Variable prefix: _mp
#
_make_pdf()
{
func_check _make_pdf '=' 0 "$@";
_mp_psfile="${md_modefile}";
md_modefile="${md_modefile}.pdf";
obj md_modefile rm_file;
if obj _PDF_HAS_PS2PDF is_yes && ps2pdf "${_mp_psfile}" "${md_modefile}";
then
:;
elif obj _PDF_HAS_GS is_yes && gs -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite \
-sOutputFile="${md_modefile}" -c save pop -f "${_mp_psfile}";
then
:;
else
_PDF_DID_NOT_WORK='yes';
echo2 '_make_pdf(): Could not transform into pdf format. '\
'The Postscript mode (ps) is used instead.';
_OPT_MODE='ps';
main_set_mode;
main_set_resources;
main_display;
exit;
fi;
obj _mp_psfile rm_file_with_debug;
eval ${_UNSET} _mp_psfile;
eval "${return_ok}";
} # _make_pdf() of main_display()
########################################################################
# main (<command_line_args>*)
#
# The main function for groffer.
#
# Arguments:
#
main()
{
func_check main '>=' 0 "$@";
# Do not change the sequence of the following functions!
landmark '13: main_init()';
main_init;
landmark '14: main_parse_MANOPT()';
main_parse_MANOPT;
landmark '15: main_parse_args()';
main_parse_args "$@";
landmark '16: main_set_mode()';
main_set_mode;
landmark '17: main_do_fileargs()';
main_do_fileargs;
landmark '18: main_set_resources()';
main_set_resources;
landmark '19: main_display()';
main_display;
eval "${return_ok}";
}
########################################################################
main "$@";