Commit | Line | Data |
---|---|---|
5ca035fc BJ |
1 | .nr _0 \n(.c |
2 | .\"********************************************************************** | |
3 | .\"* * | |
4 | .\"* ****** - M E N R O F F / T R O F F M A C R O S ****** * | |
5 | .\"* * | |
6 | .\"* Produced for your edification and enjoyment by: * | |
7 | .\"* Eric Allman * | |
8 | .\"* Electronics Research Laboratory * | |
9 | .\"* U.C. Berkeley. * | |
10 | .\"* * | |
11 | .\"* VERSION 1.1 First Release: 11 Sept 1978 * | |
12 | .\"* See file \*(||/revisions for revision history * | |
13 | .\"* * | |
14 | .\"* Documentation is available. * | |
15 | .\"* * | |
16 | .\"********************************************************************** | |
17 | .\" This version has had comments stripped; an unstripped version is available. | |
18 | .if !\n(.V .tm You are using the wrong version of NROFF/TROFF!! | |
19 | .if !\n(.V .tm This macro package works only on the version seven | |
20 | .if !\n(.V .tm release of NROFF and TROFF. | |
21 | .if !\n(.V .ex | |
22 | .if \n(pf \ | |
23 | . nx \*(||/null.me | |
24 | .de @C | |
25 | .nr _S \\n(.s | |
26 | .nr _V \\n(.v | |
27 | .nr _F \\n(.f | |
28 | .nr _I \\n(.i | |
29 | .ev \\$1 | |
30 | .ps \\n(_Su | |
31 | .vs \\n(_Vu | |
32 | .ft \\n(_F | |
33 | 'in \\n(_Iu | |
34 | .xl \\n($lu | |
35 | .lt \\n($lu | |
36 | .rr _S | |
37 | .rr _V | |
38 | .rr _F | |
39 | .rr _I | |
40 | .ls 1 | |
41 | 'ce 0 | |
42 | .. | |
43 | .de @D | |
44 | .ds |p "\\$3 | |
45 | .nr _d \\$1 | |
46 | .ie "\\$2"C" \ | |
47 | . nr _d 1 | |
48 | .el .ie "\\$2"L" \ | |
49 | . nr _d 2 | |
50 | .el .ie "\\$2"I" \ | |
51 | . nr _d 3 | |
52 | .el .ie "\\$2"M" \ | |
53 | . nr _d 4 | |
54 | .el \ | |
55 | . ds |p "\\$2 | |
56 | .. | |
57 | .de @z | |
58 | .if !"\\n(.z"" \ | |
59 | \{\ | |
60 | . tm Line \\n(c. -- Unclosed block, footnote, or other diversion (\\n(.z) | |
61 | . di | |
62 | . ex | |
63 | .\} | |
64 | .if \\n(?a \ | |
65 | . bp | |
66 | .rm bp | |
67 | .rm @b | |
68 | .if t \ | |
69 | . wh -1p @m | |
70 | .br | |
71 | .. | |
72 | .de @I | |
73 | .rm th | |
74 | .rm ac | |
75 | .rm lo | |
76 | .rm sc | |
77 | .rm @I | |
78 | .. | |
79 | .de he | |
80 | .ie !\\n(.$ \ | |
81 | \{\ | |
82 | . rm |4 | |
83 | . rm |5 | |
84 | .\} | |
85 | .el \ | |
86 | \{\ | |
87 | . ds |4 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
88 | . ds |5 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
89 | .\} | |
90 | .. | |
91 | .de eh | |
92 | .ie !\\n(.$ \ | |
93 | . rm |4 | |
94 | .el \ | |
95 | . ds |4 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
96 | .. | |
97 | .de oh | |
98 | .ie !\\n(.$ \ | |
99 | . rm |5 | |
100 | .el \ | |
101 | . ds |5 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
102 | .. | |
103 | .de fo | |
104 | .ie !\\n(.$ \ | |
105 | \{\ | |
106 | . rm |6 | |
107 | . rm |7 | |
108 | .\} | |
109 | .el \ | |
110 | \{\ | |
111 | . ds |6 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
112 | . ds |7 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
113 | .\} | |
114 | .. | |
115 | .de ef | |
116 | .ie !\\n(.$ \ | |
117 | . rm |6 | |
118 | .el \ | |
119 | . ds |6 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
120 | .. | |
121 | .de of | |
122 | .ie !\\n(.$ \ | |
123 | . rm |7 | |
124 | .el \ | |
125 | . ds |7 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 | |
126 | .. | |
127 | .de ep | |
128 | .if \\n(nl>0 \ | |
129 | \{\ | |
130 | . wh 0 | |
131 | . rs | |
132 | . @b | |
133 | .\} | |
134 | .. | |
135 | .de @h | |
136 | .if \n@>0 .tm >> @h %=\\n% ?a=\\n(?a ?b=\\n(?b | |
137 | .if (\\n(.i+\\n(.o)>=\\n(.l \ | |
138 | . tm Line \\n(c. -- Offset + indent exceeds line length | |
139 | .if t .if (\\n(.l+\\n(.o)>7.75i \ | |
140 | . tm Line \\n(c. -- Offset + line length exceeds paper width | |
141 | .nr ?h \\n(?H | |
142 | .rr ?H | |
143 | .nr ?c \\n(?C | |
144 | .rr ?C | |
145 | .rn |4 |0 | |
146 | .rn |5 |1 | |
147 | .rn |6 |2 | |
148 | .rn |7 |3 | |
149 | .nr _w 0 | |
150 | .nr ?I 1 | |
151 | .ev 2 | |
152 | .rs | |
153 | .if t .@m | |
154 | .if \\n(hm>0 \ | |
155 | . sp |\\n(hmu | |
156 | .if \\n($T=2 \\!. | |
157 | .@t $h | |
158 | .if \\n(tm<=0 \ | |
159 | . nr tm \n(.Vu | |
160 | .sp |\\n(tmu | |
161 | .ev | |
162 | .mk _k | |
163 | .if \\n(?n .nm 1 | |
164 | .nr $c 1 | |
165 | .if \n@>4 .tm -- @h >> .ns nl=\\n(nl %=\\n% _k=\\n(_k tm=\\n(tm | |
166 | .ie \\n(?s \ | |
167 | \{\ | |
168 | . rr ?s | |
169 | . rs | |
170 | ' @b | |
171 | .\} | |
172 | .el \ | |
173 | . @n | |
174 | .if \n@>1 .tm << @h | |
175 | .. | |
176 | .de @m | |
177 | .@O 0 | |
178 | .lt 7.5i | |
179 | .tl '\(rn''\(rn' | |
180 | .@O | |
181 | .lt | |
182 | .. | |
183 | .de @n | |
184 | .if \n@>3 .tm >> @n nl=\\n(nl %=\\n% ?f=\\n(?f ?o=\\n(?o | |
185 | .if \\n(bm<=0 \ | |
186 | . nr bm \\n(.Vu | |
187 | .if \\n(_w<=\\n($l \ | |
188 | \{\ | |
189 | . nr _b (\\n(ppu*\\n($ru)/2u | |
190 | . if \\n(_bu>((\\n(bmu-\\n(fmu-(\\n(tpu*\\n($ru))/2u) \ | |
191 | . nr _b (\\n(ppu*\\n($ru)-\n(.Vu | |
192 | . nr _b +\\n(bmu | |
193 | .\} | |
194 | .nr _B \\n(_bu | |
195 | .ch @f | |
196 | .wh -\\n(_bu @f | |
197 | .nr ?f 0 | |
198 | .if \\n(?o \ | |
199 | \{\ | |
200 | . (f | |
201 | . nf | |
202 | . |o | |
203 | . fi | |
204 | . )f | |
205 | . rm |o | |
206 | .\} | |
207 | .nr ?o 0 | |
208 | .if \\n(?T \ | |
209 | \{\ | |
210 | . nr _i \\n(.i | |
211 | . in \\n($iu | |
212 | . |h | |
213 | . in \\n(_iu | |
214 | . rr _i | |
215 | . mk #T | |
216 | . ns | |
217 | .\} | |
218 | .if \\n(?a \ | |
219 | \{\ | |
220 | . nr ?a 0 | |
221 | . @k |t | |
222 | .\} | |
223 | .os | |
224 | .$H | |
225 | .ns | |
226 | .. | |
227 | .de @f | |
228 | .if \n@>0 .tm >> @f %=\\n% nl=\\n(nl ?a=\\n(?a ?b=\\n(?b | |
229 | .ec | |
230 | .if \\n(?T \ | |
231 | \{\ | |
232 | . nr T. 1 | |
233 | . T# 1 | |
234 | . br | |
235 | .\} | |
236 | .ev 2 | |
237 | .ce 0 | |
238 | .if \\n(?b \ | |
239 | \{\ | |
240 | . nr ?b 0 | |
241 | . @k |b | |
242 | .\} | |
243 | .if \\n(?f \ | |
244 | . @o | |
245 | .ie \\n($c<\\n($m \ | |
246 | . @c | |
247 | .el \ | |
248 | . @e | |
249 | .ev | |
250 | .if \n@>2 .tm << @f | |
251 | .. | |
252 | .de @o | |
253 | .nf | |
254 | .ls 1 | |
255 | .in 0 | |
256 | .wh -\\n(_Bu @r | |
257 | .|f | |
258 | .fi | |
259 | .if \\n(?o \ | |
260 | . di | |
261 | . if \\n(dn=0 \ | |
262 | \{\ | |
263 | . rm |o | |
264 | . nr ?o 0 | |
265 | . \} | |
266 | . nr dn \\n(_D | |
267 | . rr _D | |
268 | .\} | |
269 | .rm |f | |
270 | .ch @r | |
271 | .. | |
272 | .de @c | |
273 | .if \n@>2 .tm >> @c %=\\n% | |
274 | .rs | |
275 | .sp |\\n(_ku | |
276 | .@O +\\n($lu+\\n($su | |
277 | .nr $c +1 | |
278 | .@n | |
279 | .. | |
280 | .de @e | |
281 | .if \n@>2 .tm >> @e | |
282 | .@O \\n(_ou | |
283 | .rs | |
284 | .sp |\\n(.pu-\\n(fmu-(\\n(tpu*\\n($ru) | |
285 | .@t $f | |
286 | .nr ?h 0 | |
287 | .bp | |
288 | .. | |
289 | .de @t | |
290 | .if !\\n(?h \ | |
291 | \{\ | |
292 | . sz \\n(tp | |
293 | . @F \\n(tf | |
294 | . lt \\n(_Lu | |
295 | . nf | |
296 | . \\$1 | |
297 | . br | |
298 | .\} | |
299 | .. | |
300 | .de $h | |
301 | .rm |z | |
302 | .if !\\n(?c \ | |
303 | \{\ | |
304 | . if e .ds |z "\\*(|0 | |
305 | . if o .ds |z "\\*(|1 | |
306 | .\} | |
307 | .if !\(ts\\*(|z\(ts\(ts \ | |
308 | ' tl \\*(|z | |
309 | .rm |z | |
310 | .. | |
311 | .de $f | |
312 | .rm |z | |
313 | .if \\n(?c \ | |
314 | \{\ | |
315 | . if e .ds |z "\\*(|0 | |
316 | . if o .ds |z "\\*(|1 | |
317 | .\} | |
318 | .if \(ts\\*(|z\(ts\(ts \ | |
319 | \{\ | |
320 | . if e .ds |z "\\*(|2 | |
321 | . if o .ds |z "\\*(|3 | |
322 | .\} | |
323 | .if !\(ts\\*(|z\(ts\(ts \ | |
324 | ' tl \\*(|z | |
325 | .rm |z | |
326 | .. | |
327 | .de @r | |
328 | .if \n@>3 .tm >> @r .z=\\n(.z ?f=\\n(?f ?a=\\n(?a ?b=\\n(?b _b=\\n(_b | |
329 | .di |o | |
330 | .nr ?o 1 | |
331 | .nr _D \\n(dn | |
332 | .ns | |
333 | .. | |
334 | .rn bp @b | |
335 | .de bp | |
336 | .nr $c \\n($m | |
337 | .ie \\n(nl>0 \ | |
338 | . @b \\$1 | |
339 | .el \ | |
340 | \{\ | |
341 | . if \\n(.$>0 \ | |
342 | . pn \\$1 | |
343 | . if \\n(?I \ | |
344 | . @h | |
345 | .\} | |
346 | .br | |
347 | .wh 0 @h | |
348 | .. | |
349 | .rn ll xl | |
350 | .de ll | |
351 | .xl \\$1 | |
352 | .lt \\$1 | |
353 | .nr $l \\n(.l | |
354 | .if (\\n($m<=1):(\\n($l>\\n(_L) \ | |
355 | . nr _L \\n(.l | |
356 | .. | |
357 | .rn po @O | |
358 | .de po | |
359 | .@O \\$1 | |
360 | .nr _o \\n(.o | |
361 | .. | |
362 | .de hx | |
363 | .nr ?H 1 | |
364 | .. | |
365 | .de ix | |
366 | 'in \\$1 | |
367 | .. | |
368 | .de bl | |
369 | .br | |
370 | .ne \\$1 | |
371 | .rs | |
372 | .sp \\$1 | |
373 | .. | |
374 | .de n1 | |
375 | .nm 1 | |
376 | .xl -\w'0000'u | |
377 | .nr ?n 1 | |
378 | .. | |
379 | .de n2 | |
380 | .nm \\$1 | |
381 | .ie \\n(.$ \ | |
382 | . xl -\w'0000'u | |
383 | .el \ | |
384 | . xl \\n($lu | |
385 | .. | |
386 | .de pa | |
387 | .bp \\$1 | |
388 | .. | |
389 | .de ro | |
390 | .af % i | |
391 | .. | |
392 | .de ar | |
393 | .af % 1 | |
394 | .. | |
395 | .de m1 | |
396 | .nr _0 \\n(hmu | |
397 | .nr hm \\$1v | |
398 | .nr tm +\\n(hmu-\\n(_0u | |
399 | .rr _0 | |
400 | .. | |
401 | .de m2 | |
402 | .nr tm \\n(hmu+\\n(tpp+\\$1v | |
403 | .. | |
404 | .de m3 | |
405 | .nr bm \\n(fmu+\\n(tpp+\\$1v | |
406 | .. | |
407 | .de m4 | |
408 | .nr _0 \\n(fmu | |
409 | .nr fm \\$1v | |
410 | .nr bm +\\n(fmu-\\n(_0u | |
411 | .. | |
412 | .de sk | |
413 | .if \\n(.$>0 \ | |
414 | . tm Line \\n(c. -- I cannot skip multiple pages | |
415 | .nr ?s 1 | |
416 | .. | |
417 | .de re | |
418 | .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 | |
419 | .. | |
420 | .if t .ig | |
421 | .de re | |
422 | .ta 0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i +0.8i | |
423 | .. | |
424 | .de ba | |
425 | .ie \\n(.$ \ | |
426 | . nr $i \\$1n | |
427 | .el \ | |
428 | . nr $i \\n(siu*\\n($0u | |
429 | .. | |
430 | .de hl | |
431 | .br | |
432 | \l'\\n(.lu-\\n(.iu' | |
433 | .sp | |
434 | .. | |
435 | .de pp | |
436 | .lp \\n(piu | |
437 | .. | |
438 | .de lp | |
439 | .@p | |
440 | .if \\n(.$ \ | |
441 | . ti +\\$1 | |
442 | .nr $p 0 1 | |
443 | .. | |
444 | .de ip | |
445 | .if (\\n(ii>0)&(\\n(ii<1n) \ | |
446 | . nr ii \\n(iin | |
447 | .nr _0 \\n(ii | |
448 | .if \\n(.$>1 \ | |
449 | . nr _0 \\$2n | |
450 | .@p \\n(_0u | |
451 | .if \\w'\\$1' \ | |
452 | \{\ | |
453 | . ti -\\n(_0u | |
454 | \&\\$1\h'|\\n(_0u'\c | |
455 | .\} | |
456 | .rr _0 | |
457 | .. | |
458 | .de np | |
459 | .nr $p +1 | |
460 | .ip (\\n($p) | |
461 | .. | |
462 | .de @p | |
463 | .@I | |
464 | .if "\\n(.z"|e" .tm Line \\n(c. -- Unmatched continued equation | |
465 | .in \\n($iu+\\n(pou | |
466 | .if \\n(.$ \ | |
467 | . in +\\$1n | |
468 | .ce 0 | |
469 | .fi | |
470 | .@F \\n(pf | |
471 | .sz \\n(ppu | |
472 | .sp \\n(psu | |
473 | .ne \\n(.Lv+\\n(.Vu | |
474 | .ns | |
475 | .. | |
476 | .de sh | |
477 | .rn sh @T | |
478 | .so \\*(||/sh.me | |
479 | .sh "\\$1" "\\$2" \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 | |
480 | .rm @T | |
481 | .. | |
482 | .de $p | |
483 | .if (\\n(si>0)&(\\n(.$>2) \ | |
484 | . nr $i \\$3*\\n(si | |
485 | .in \\n($iu | |
486 | .ie !"\\$1\\$2"" \ | |
487 | \{\ | |
488 | . sp \\n(ssu | |
489 | . ne \\n(.Lv+\\n(.Vu+\\n(psu+(\\n(spu*\\n($ru*\\n(.Lu) | |
490 | . ie \\n(.$>2 \ | |
491 | . ti -(\\n(siu-\\n(sou) | |
492 | . el \ | |
493 | . ti +\\n(sou | |
494 | . @F \\n(sf | |
495 | . sz \\n(spu | |
496 | . if \\$3>0 \ | |
497 | . $\\$3 | |
498 | . if \w"\\$2">0 \\$2. | |
499 | . if \w"\\$1">0 \\$1\f1\ \ \" | |
500 | .\} | |
501 | .el \ | |
502 | . sp \\n(psu | |
503 | .@F \\n(pf | |
504 | .sz \\n(ppu | |
505 | .. | |
506 | .de uh | |
507 | .rn uh @T | |
508 | .so \\*(||/sh.me | |
509 | .uh "\\$1" | |
510 | .rm @T | |
511 | .. | |
512 | .de 2c | |
513 | .br | |
514 | .if \\n($m>1 \ | |
515 | . 1c | |
516 | .nr $c 1 | |
517 | .nr $m 2 | |
518 | .if \\n(.$>1 \ | |
519 | . nr $m \\$2 | |
520 | .if \\n(.$>0 \ | |
521 | . nr $s \\$1n | |
522 | .nr $l (\\n(.l-((\\n($m-1)*\\n($s))/\\n($m | |
523 | .xl \\n($lu | |
524 | .mk _k | |
525 | .ns | |
526 | .. | |
527 | .de 1c | |
528 | .br | |
529 | .nr $c 1 | |
530 | .nr $m 1 | |
531 | .ll \\n(_Lu | |
532 | .sp |\\n(.hu | |
533 | .@O \\n(_ou | |
534 | .. | |
535 | .de bc | |
536 | .sp 24i | |
537 | .. | |
538 | .de (z | |
539 | .rn (z @T | |
540 | .so \\*(||/float.me | |
541 | .(z \\$1 \\$2 | |
542 | .rm @T | |
543 | .. | |
544 | .de )z | |
545 | .tm Line \\n(c. -- unmatched .)z | |
546 | .. | |
547 | .de (t | |
548 | .(z \\$1 \\$2 | |
549 | .. | |
550 | .de )t | |
551 | .)z \\$1 \\$2 | |
552 | .. | |
553 | .de (b | |
554 | .br | |
555 | .@D 3 \\$1 \\$2 | |
556 | .sp \\n(bsu | |
557 | .@( | |
558 | .. | |
559 | .de )b | |
560 | .br | |
561 | .@) | |
562 | .if (\\n(bt=0):(\\n(.t<\\n(bt) \ | |
563 | . ne \\n(dnu | |
564 | .ls 1 | |
565 | .nf | |
566 | .|k | |
567 | .ec | |
568 | .fi | |
569 | .in 0 | |
570 | .xl \\n($lu | |
571 | .ev | |
572 | .rm |k | |
573 | .sp \\n(bsu+\\n(.Lv-1v | |
574 | .. | |
575 | .de @( | |
576 | .if !"\\n(.z"" .tm Line \\n(c. -- Illegal nested keep \\n(.z | |
577 | .@M | |
578 | .di |k | |
579 | \!'rs | |
580 | .. | |
581 | .de @M | |
582 | .nr ?k 1 | |
583 | .@C 1 | |
584 | .@F \\n(df | |
585 | .vs \\n(.su*\\n($Ru | |
586 | .nf | |
587 | .if "\\*(|p"F" \ | |
588 | . fi | |
589 | .if \\n(_d=4 \ | |
590 | . in 0 | |
591 | .if \\n(_d=3 \ | |
592 | \{\ | |
593 | . in +\\n(biu | |
594 | . xl -\\n(biu | |
595 | .\} | |
596 | .if \\n(_d=1 \ | |
597 | . ce 10000 | |
598 | .. | |
599 | .de @) | |
600 | .br | |
601 | .if !"\\n(.z"|k" .tm Line \\n(c. -- Close of a keep which has never been opened | |
602 | .nr ?k 0 | |
603 | .di | |
604 | .in 0 | |
605 | .ce 0 | |
606 | .. | |
607 | .de (c | |
608 | .if "\\n(.z"|c" .tm Line \\n(c. -- Nested .(c requests | |
609 | .di |c | |
610 | .. | |
611 | .de )c | |
612 | .if !"\\n(.z"|c" .tm Line \\n(c. -- Unmatched .)c | |
613 | .di | |
614 | .if \n@>4 .tm >> .)c .l=\\n(.l .i=\\n(.i $i=\\n($i dl=\\n(dl | |
615 | .ev 1 | |
616 | .ls 1 | |
617 | .in (\\n(.lu-\\n(.iu-\\n(dlu)/2u | |
618 | .if \n@>4 .tm -- .)c << .in .l=\\n(.l .i=\\n(.i dl=\\n(dl | |
619 | .nf | |
620 | .|c | |
621 | .ec | |
622 | .in | |
623 | .ls | |
624 | .ev | |
625 | .rm |c | |
626 | .. | |
627 | .de (q | |
628 | .br | |
629 | .@C 1 | |
630 | .fi | |
631 | .sp \\n(qsu | |
632 | .in +\\n(qiu | |
633 | .xl -\\n(qiu | |
634 | .sz \\n(qp | |
635 | .. | |
636 | .de )q | |
637 | .br | |
638 | .ev | |
639 | .sp \\n(qsu+\\n(.Lv-1v | |
640 | .nr ?k 0 | |
641 | .. | |
642 | .de (l | |
643 | .br | |
644 | .sp \\n(bsu | |
645 | .@D 3 \\$1 \\$2 | |
646 | .@M | |
647 | .. | |
648 | .de )l | |
649 | .br | |
650 | .ev | |
651 | .sp \\n(bsu+\\n(.Lv-1v | |
652 | .nr ?k 0 | |
653 | .. | |
654 | .de EQ | |
655 | .rn EQ @T | |
656 | .so \\*(||/eqn.me | |
657 | .EQ \\$1 \\$2 | |
658 | .rm @T | |
659 | .. | |
660 | .de TS | |
661 | .rn TS @T | |
662 | .so \\*(||/tbl.me | |
663 | .TS \\$1 \\$2 | |
664 | .rm @T | |
665 | .. | |
666 | .de sz | |
667 | .ps \\$1 | |
668 | .vs \\n(.su*\\n($ru | |
669 | .bd S B \\n(.su/3u | |
670 | .. | |
671 | .de r | |
672 | .nr _F \\n(.f | |
673 | .ul 0 | |
674 | .ft 1 | |
675 | .if \\n(.$ \&\\$1\f\\n(_F\\$2 | |
676 | .rr _F | |
677 | .. | |
678 | .de i | |
679 | .nr _F \\n(.f | |
680 | .ul 0 | |
681 | .ft 2 | |
682 | .if \\n(.$ \&\\$1\f\\n(_F\\$2 | |
683 | .rr _F | |
684 | .. | |
685 | .de b | |
686 | .nr _F \\n(.f | |
687 | .ul 0 | |
688 | .ie t \ | |
689 | . ft 3 | |
690 | .el \ | |
691 | . ul 10000 | |
692 | .if \\n(.$ \&\\$1\f\\n(_F\\$2 | |
693 | .if \\n(.$ \ | |
694 | . ul 0 | |
695 | .rr _F | |
696 | .. | |
697 | .de rb | |
698 | .nr _F \\n(.f | |
699 | .ul 0 | |
700 | .ft 3 | |
701 | .if \\n(.$ \&\\$1\f\\n(_F\\$2 | |
702 | .rr _F | |
703 | .. | |
704 | .de u | |
705 | \&\\$1\l'|0\(ul'\\$2 | |
706 | .. | |
707 | .de q | |
708 | \&\\*(lq\\$1\\*(rq\\$2 | |
709 | .. | |
710 | .de bi | |
711 | .ft 2 | |
712 | .ie t \&\k~\\$1\h'|\\n~u+(\\n(.su/3u)'\\$1\fP\\$2 | |
713 | .el \&\\$1\fP\\$2 | |
714 | .. | |
715 | .de bx | |
716 | .ie \\n($T \&\f2\\$1\fP\\$2 | |
717 | .el \k~\(br\|\\$1\|\(br\l'|\\n~u\(rn'\l'|\\n~u\(ul'\^\\$2 | |
718 | .. | |
719 | .de @F | |
720 | .nr ~ \\$1 | |
721 | .if \\n~>0 \ | |
722 | \{\ | |
723 | . ul 0 | |
724 | . ie \\n~>4 \ | |
725 | \{\ | |
726 | . if n .ul 10000 | |
727 | . if t .ft 3 | |
728 | . \} | |
729 | . el \ | |
730 | . ft \\n~ | |
731 | .\} | |
732 | .rr ~ | |
733 | .. | |
734 | .de (f | |
735 | .rn (f @T | |
736 | .so \\*(||/footnote.me | |
737 | .(f \\$1 \\$2 | |
738 | .rm @T | |
739 | .. | |
740 | .de )f | |
741 | .tm Line \\n(c. -- unmatched .)f | |
742 | .. | |
743 | .de $s | |
744 | \l'2i' | |
745 | .if n \ | |
746 | . sp 0.3 | |
747 | .. | |
748 | .de (d | |
749 | .rn (d @T | |
750 | .so \\*(||/deltext.me | |
751 | .(d \\$1 \\$2 | |
752 | .rm @T | |
753 | .. | |
754 | .de )d | |
755 | .tm Line \\n(c. -- unmatched .)d | |
756 | .. | |
757 | .de (x | |
758 | .rn (x @T | |
759 | .so \\*(||/index.me | |
760 | .(x \\$1 \\$2 | |
761 | .rm @T | |
762 | .. | |
763 | .de )x | |
764 | .tm Line \\n(c. -- unmatched .)x | |
765 | .. | |
766 | .de th | |
767 | .so \\*(||/thesis.me | |
768 | .rm th | |
769 | .. | |
770 | .de +c | |
771 | .ep | |
772 | .if \\n(?o:\\n(?a \ | |
773 | \{\ | |
774 | . bp | |
775 | . rs | |
776 | . ep | |
777 | .\} | |
778 | .nr ?C 1 | |
779 | .nr $f 1 1 | |
780 | .ds * \\*[1\\*]\k* | |
781 | .if \\n(?R \ | |
782 | . pn 1 | |
783 | .bp | |
784 | .in \\n($iu | |
785 | .rs | |
786 | .ie \\n(.$ \ | |
787 | . $c "\\$1" | |
788 | .el \ | |
789 | . sp 3 | |
790 | .. | |
791 | .de ++ | |
792 | .nr _0 0 | |
793 | .if "\\$1"C" \ | |
794 | . nr _0 1 | |
795 | .if "\\$1"RC" \ | |
796 | . nr _0 11 | |
797 | .if "\\$1"A" \ | |
798 | . nr _0 2 | |
799 | .if "\\$1"RA" \ | |
800 | . nr _0 12 | |
801 | .if "\\$1"P" \ | |
802 | . nr _0 3 | |
803 | .if "\\$1"B" \ | |
804 | . nr _0 4 | |
805 | .if "\\$1"AB" \ | |
806 | . nr _0 5 | |
807 | .if \\n(_0=0 \ | |
808 | . tm Line \\n(c. -- Bad mode to .++ | |
809 | .nr ?R 0 | |
810 | .if \\n(_0>10 \ | |
811 | .\{ | |
812 | . nr ?R 1 | |
813 | . nr _0 -10 | |
814 | .\} | |
815 | .nr ch 0 1 | |
816 | .if (\\n(_0=3):(\\n(_0=5) \ | |
817 | . pn 1 | |
818 | .ep | |
819 | .if \\n(_0=1 \ | |
820 | \{\ | |
821 | . af ch 1 | |
822 | . af % 1 | |
823 | .\} | |
824 | .if \\n(_0=2 \ | |
825 | \{\ | |
826 | . af ch A | |
827 | . af % 1 | |
828 | .\} | |
829 | .if \\n(_0=3 \ | |
830 | . af % i | |
831 | .if \\n(_0=4 \ | |
832 | . af % 1 | |
833 | .if \\n(_0=5 \ | |
834 | . af % 1 | |
835 | .if \\n(.$>1 \ | |
836 | . he \\$2 | |
837 | .if !\\n(_0=\\n(_M .if \\n(_M=3 \ | |
838 | . pn 1 | |
839 | .nr _M \\n(_0 | |
840 | .rr _0 | |
841 | .. | |
842 | .de $c | |
843 | .sz 12 | |
844 | .ft B | |
845 | .ce 1000 | |
846 | .if \\n(_M<3 \ | |
847 | . nr ch +1 | |
848 | .ie \\n(_M=1 CHAPTER\ \ \\n(ch | |
849 | .el .if \\n(_M=2 APPENDIX\ \ \\n(ch | |
850 | .if \w"\\$1" .sp 3-\\n(.L | |
851 | .if \w"\\$1" \\$1 | |
852 | .if (\\n(_M<3):(\w"\\$1") \ | |
853 | . sp 4-\\n(.L | |
854 | .ce 0 | |
855 | .ft | |
856 | .sz | |
857 | .ie \\n(_M=1 \ | |
858 | . $C Chapter \\n(ch "\\$1" | |
859 | .el .if \\n(_M=2 \ | |
860 | . $C Appendix \\n(ch "\\$1" | |
861 | .. | |
862 | .de tp | |
863 | .hx | |
864 | .bp | |
865 | .br | |
866 | .rs | |
867 | .pn \\n% | |
868 | .. | |
869 | .de ac | |
870 | .rn ac @T | |
871 | .so \\*(||/acm.me | |
872 | .ac "\\$1" "\\$2" | |
873 | .rm @T | |
874 | .. | |
875 | .de lo | |
876 | .so \\*(||/local.me | |
877 | .rm lo | |
878 | .. | |
879 | .if \n(mo=1 .ds mo January | |
880 | .if \n(mo=2 .ds mo February | |
881 | .if \n(mo=3 .ds mo March | |
882 | .if \n(mo=4 .ds mo April | |
883 | .if \n(mo=5 .ds mo May | |
884 | .if \n(mo=6 .ds mo June | |
885 | .if \n(mo=7 .ds mo July | |
886 | .if \n(mo=8 .ds mo August | |
887 | .if \n(mo=9 .ds mo September | |
888 | .if \n(mo=10 .ds mo October | |
889 | .if \n(mo=11 .ds mo November | |
890 | .if \n(mo=12 .ds mo December | |
891 | .if \n(dw=1 .ds dw Sunday | |
892 | .if \n(dw=2 .ds dw Monday | |
893 | .if \n(dw=3 .ds dw Tuesday | |
894 | .if \n(dw=4 .ds dw Wednesday | |
895 | .if \n(dw=5 .ds dw Thursday | |
896 | .if \n(dw=6 .ds dw Friday | |
897 | .if \n(dw=7 .ds dw Saturday | |
898 | .ds td \*(mo \n(dy, 19\n(yr | |
899 | .if (1m<0.1i)&(\nx!=0) \ | |
900 | . vs 9p | |
901 | .rr x | |
902 | .nr $r \n(.v/\n(.s | |
903 | .nr $R \n($r | |
904 | .nr hm 4v | |
905 | .nr tm 7v | |
906 | .nr bm 6v | |
907 | .nr fm 3v | |
908 | .nr tf 3 | |
909 | .nr tp 10 | |
910 | .hy 14 | |
911 | .nr bi 4n | |
912 | .nr pi 5n | |
913 | .nr pf 1 | |
914 | .nr pp 10 | |
915 | .nr qi 4n | |
916 | .nr qp -1 | |
917 | .nr ii 5n | |
918 | .nr $m 1 | |
919 | .nr $s 4n | |
920 | .ds || /usr/lib/me | |
921 | .if \n@>0 .ds || . | |
922 | .bd S B 3 | |
923 | .ds [ \u | |
924 | .ds ] \d | |
925 | .ds < \d | |
926 | .ds > \u | |
927 | .ds - -- | |
928 | .if t \ | |
929 | \{\ | |
930 | . ds [ \v'-0.4m'\s-3 | |
931 | . ds ] \s0\v'0.4m' | |
932 | . ds < \v'0.4m'\s-3 | |
933 | . ds > \s0\v'-0.4m' | |
934 | . ds - \- | |
935 | .\} | |
936 | .nr _o \n(.o | |
937 | .if n .po 1i | |
938 | .if \n(.V=1v \ | |
939 | . nr $T 2 | |
940 | .if \n(.T=0 \ | |
941 | . nr $T 1 | |
942 | .if t \ | |
943 | \{\ | |
944 | . nr $T 0 | |
945 | . po -0.5i | |
946 | .\} | |
947 | .if \n($T \ | |
948 | \{\ | |
949 | . if \n($T=1 \ | |
950 | . po 0 | |
951 | . ds [ [ | |
952 | . ds ] ] | |
953 | . ds < < | |
954 | . ds > > | |
955 | .\} | |
956 | .nr ps 0.5v | |
957 | .if \n($T \ | |
958 | . nr ps 1v | |
959 | .if t .nr ps 0.35v | |
960 | .nr bs \n(ps | |
961 | .nr qs \n(ps | |
962 | .nr zs 1v | |
963 | .nr xs 0.2v | |
964 | .nr fs 0.2v | |
965 | .if \n($T \ | |
966 | . nr fs 0 | |
967 | .if n .nr es 1v | |
968 | .if t .nr es 0.5v | |
969 | .wh 0 @h | |
970 | .nr $l \n(.lu | |
971 | .nr _L \n(.lu | |
972 | .nr $c 1 | |
973 | .nr $f 1 1 | |
974 | .ds * \*[1\*]\k*\" | |
975 | .nr $d 1 1 | |
976 | .ds # [1]\k#\" | |
977 | .nr _M 1 | |
978 | .ds lq \&"\" | |
979 | .ds rq \&"\" | |
980 | .if t \ | |
981 | . ds lq `` | |
982 | .if t \ | |
983 | . ds rq '' | |
984 | .em @z | |
985 | .de sc | |
986 | .so \\*(||/chars.me | |
987 | .rm sc | |
988 | .. | |
989 | .ll 6.0i | |
990 | .lt 6.0i |