pic: use troff drawing commands for filling objects
[troff.git] / home / tmac / tmac.an
blobdc6eefaf30ae716ce2c86b4a772d3c52ff504704
1 .fp 1 R LucidaSans
2 .fp 2 I LucidaSansI
3 .fp 3 B LucidaSansB
4 .fp 5 L LucidaCW
5 .if n .uf 4
6 .if n .bd 3
7 .if n .rm bd
8 '''\"   PWB Manual Entry Macros - 1.36 of 11/11/80
9 '''\"   Nroff/Troff Version     @(#)1.36
10 '''\"  Option -rs1 short (9") pages
11 '''\"  Option -rp# set no. of first page, put no. of pgs. on stderr
12 '''\"  Option -rd1 give modified date instead of printed date
13 ... temporary fixes for neat manual printing...
14 .deth
15 .tmwrong version of man entry macros - use -man6
16 .ab\a
18 .ifn .ds Tm \uTM\d
19 .ift .ds Tm \v'-0.5m'\s-4TM\s+4\v'0.5m'
20 .de}E
21 .}f
22 .in\\n()Ru+\\n(INu
23 .ll\\n(LLu
24 .lt\\n(LLu
25 .pl\\n()Lu
27 .deDT
28 .ift .ta 3.6m 7.2m 10.8m 14.4m 18m 21.6m 25.2m 28.8m 32.4m 36m 39.6m 43.2m 46.8m
29 .ifn .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n
31 .de HY
32 .hy14
34 .de}f
35 .ift .vs \\n()Vp
36 .ps\\n()S
37 .ft1
39 .de}H
40 .ev1
41 .}C
42 .}E
43 .ie\\n()s 'sp |2v
44 .el'sp |3v
45 .".ps\\n()S-1
46 .tl \a\\*(]H\a\\*(]L\a\\*(]H\a
47 .ft1
48 .ps\\n()S
49 .ie\\n()s 'sp 1.5v
50 .el'sp 3v
51 .ev
52 .ns
53 .if \\n(CL .2C
55 .de}F
56 .ev1
57 .}E
58 .if\\n()s 'sp |\\n(.pu-1v-1p
59 .if\\n()t 'sp |\\n(.pu-3v
60 .ifn 'sp |\\n(.pu-4v
61 .ift .tl \a\a%\a\a
62 .ev
63 'bp
65 .ifn .ig
66 .de}C
67 .if "\\*(.T"aps"\{\
68 .       po0i
69 .       lt7.5i
70 .       if\\n()s .tl \a\l\a0.25i\a\a\a\l\a0.25i\a\h\a1i\a\l\a0.25i\a\a
71 .       if\\n()t .tl \a\l\a0.25i\a\a\a\l\a0.25i\a\a
72 .       lt
73 .       po\}
75 .de}M
76 .}N
77 .wh-.5p }C
78 .ll\\n(LLu
79 .}P
81 .de}K
82 .}N
83 .pl1
84 .ll\\n(LLu
86 .de}P
87 .nr )P \\n%+1-\\np
88 .if \\nq .tm \\n(.F \\n()P \\np
89 .bp
90 .if \\nq .nr p \\n%
92 .deTH
93 .PD
94 .nrIN \\n()Mu
95 .ift .ds ]H \\$1\^(\^\\$2\^)
96 .ifn .ds ]H \\$1(\\$2)
97 .if\\n()s .ds ]D
98 .if\\n()t .ds ]D Plan 9
99 .ifn .ds ]D Plan 9
100 .ds]L
101 .if!\a\\$3\a\a .ds ]L (\^\\$3\^)
102 .if!\a\\$4\a\a .ds ]D \\$4
103 .wh0 }H
104 .wh-\\n(:mu }F
105 .em}M
106 .if\\n(nl .}P
107 .nr)I \\n()Mu
108 .nr)R 0
111 .ifn \{.na
112 .nh\}
113 .ift \{.bd S 3 3
114 .HY \}
115 \X\ahtml <B>\a
116 \X\ahtml [<A HREF="/sys/man/index.html">manual index</A>]\a
117 \X\ahtml [<A HREF="/sys/man/\\$2/INDEX.html">section index</A>]\a
118 \X\ahtml </B>\a
120 .deSH
122 .}X 0 "\\$1"
123 .nr)E 2
124 \&\X\ahtml <H4>\a\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6\X\ahtml </H4>\a
126 .deSS
128 .}X 3n "" ""
129 .nr)E 2
130 \X\ahtml <H4>\a\&\\$1 \|\\$2 \|\\$3 \|\\$4 \|\\$5 \|\\$6\X\ahtml </H4>\a
132 .de}X
134 .ti\\$1
135 .sp\\n(PDu
136 .ne1.1v
137 .nr)R 0
139 '''ss12
140 '''if\a\\$2\aSYNOPSIS\a .ss 18
141 .it1 }N
142 .if!\a\\$3\a\a .SM
143 .ft 3
145 .de}2
146 .nr)E 0
148 .nr)I \\n()Mu
150 .ft1
152 .deSM
154 .ps\\n()S-1
155 .if!\a\\$1\a\a \&\\$1
156 .if!\a\\$2\a\a \&\\$2
157 .if!\a\\$3\a\a \&\\$3
158 .if!\a\\$4\a\a \&\\$4
159 .if!\a\\$5\a\a \&\\$5
160 .if!\a\\$6\a\a \&\\$6
161 .if!\a\\$1\a\a .ps \\n()S
162 .if\a\\$1\a\a .it 1 }N
165 .deI
167 .ft2
168 .it1 }N
169 .if!\a\\$1\a\a \&\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
172 .deB
174 .it1 }N
175 .ie!\a\\$1\a\a \%\&\f5\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
176 .el .ft5
179 .deL
181 .it1 }N
182 .ift \{.ie!\a\\$1\a\a \%\&\f5\\$1 \\$2 \\$3 \\$4 \\$5 \\$6
183 .el .ft5 \}
184 .ifn \{.ft5
185 .if!\a\\$1\a\a \{.ie\a\\$2\a\a `\\$1'
186 .el .ie\a\\$3\a\a `\\$1 \\$2'
187 .el .ie\a\\$4\a\a `\\$1 \\$2 \\$3'
188 .el .ie\a\\$5\a\a `\\$1 \\$2 \\$3 \\$4'
189 .el .ie\a\\$6\a\a `\\$1 \\$2 \\$3 \\$4 \\$5'
190 .el `\\$1 \\$2 \\$3 \\$4 \\$5 \\$6'\}\}
193 .deRI
195 .}S 1 2 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
199 .deIR
201 .}S 2 1 \& "\X\ahtml manref start \\$1 \\$2\a\\$1" "\\$2\X\ahtml manref end \\$1 \\$2\a" "\\$3" "\\$4" "\\$5" "\\$6"
205 .deIB
207 .ift .}S 2 5 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
208 .ifn .}S 2 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
212 .deRB
214 .ift .}S 1 5 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
215 .ifn .}S 1 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
219 .deBR
221 .ift .}S 5 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
222 .ifn .}S 1 1 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
226 .deBI
228 .ift .}S 5 2 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
229 .ifn .}S 1 2 \%\& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
233 .de LR
235 .ift \%\&\f5\\$1\f1\\$2
236 .ifn \%`\\$1'\\$2
239 .de RL
241 .ift \%\&\f1\\$1\\f5\\$2\\f1\\$3
242 .ifn \%\\$1`\\$2'\\$3
245 .de}S
246 .ds]F
247 .if\a\\$1\a2\a .if !\a\\$5\a\a .ds ]F \^
248 .if\a\\$2\a2\a .if !\a\\$5\a\a .ds ]F \^
249 .ie!\a\\$4\a\a .}S \\$2 \\$1 "\\$3\f\\$1\\$4\\*(]F" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
250 .el\\$3
253 .deEX
254 .ift .ft5
257 .deEE
258 .ft1
261 .de}p
262 .sp\\n(PDu
263 .ne1.1v
265 .nr)I \\n()Mu
268 .dePP  \"indirect PP so we can attach html - see tmac.anhtml
271 .deP
274 .deLP
277 .dePD
278 .ift .nr PD .4v
279 .ifn .nr PD 1v
280 .if!\a\\$1\a\a .nr PD \\$1v
282 .deHP
283 .sp\\n(PDu
284 .ne1.1v
285 .if!\a\\$1\a\a .nr )I \\$1n
286 .ll\\n(LLu
287 .in\\n()Ru+\\n(INu+\\n()Iu
288 .ti\\n()Ru+\\n(INu
291 .deIP
292 .ie!\a\\$1\a\a \{.TP "\\$2"
293 \&\\$1\}
294 .el\{.sp\\n(PDu
295 .ne1.1v
296 .if!\a\\$2\a\a .nr )I \\$2n
298 .ll\\n(LLu
299 .in\\n()Ru+\\n(INu+\\n()Iu
300 .lg\}
302 .deTP
303 .if!\a\\$1\a\a \{.nr )I \\$1n
304 .if\a\\$1\a0\a .nr )I \\n()M\}
305 .sp\\n(PDu
306 .ne1.1v
307 .in\\n()Ru
308 .lg0
310 .it1 }N
311 .nr)E 1
312 .di]B
314 .deTF
315 .IP "" "\w'\f5\\$1\ \ \fP'u"
316 .PD0
318 .de}1
319 .ds]X \&\\*(]B\\
320 .rm]B
321 .nr)E 0
322 .if!\a\\$1\a\a .nr )I \\$1n
324 .ll\\n(LLu
325 .in\\n()Ru+\\n(INu+\\n()Iu
326 .ti\\n(INu
327 .ie!\\n()Iu+\\n()Ru-\w\a\\*(]X\au-3p \{\\*(]X
328 .br\}
329 .el\\*(]X\h\a|\\n()Iu+\\n()Ru\a\c
333 .de}N
334 .if\\n()E .br
335 .if\a\\n()E\a1\a .di
336 .if\a\\n()E\a0\a .}f
337 .if\a\\n()E\a1\a .}1
338 .if\a\\n()E\a2\a .}2
340 .deRS
341 .nr]\\n+()p \\n()I
342 .nr)\\n()p \\n()R
343 .ie!\a\\$1\a\a .nr )R +\\$1n
344 .el.nr )R +\\n()I
345 .nr)I \\n()Mu
348 .deRE
349 .if!\a\\$1\a\a \{.ie \a\\$1\a0\a .nr )p 1 1
350 .el.nr )p \\$1 1 \}
351 .ds]i \\*(]I\\n()p
352 .ds]r \\*(]R\\n()p
353 .nr)I \\*(]i
354 .nr)R \\*(]r
355 .if\\n()p .nr )p -1
358 '''\"   .2C begin 2-column display, by diversion
359 '''\"   CC=amount of text that will fit on page
360 '''\"   CL=1 multicolumn in effect, else 0
361 '''\"   CI saved indent
362 '''\"   CB contains diverted text
363 .de 2C
364 .ne 2
366 .nr CC \\n(.t/1v*2v
367 .nr CI \\n(IN
368 .nr IN 0
369 .di CB
370 .nr CL 1
372 .dt \\n(CCu C1
374 '''\"   .1C return to 1-column
375 .de 1C
376 .nr CL 0
380 '''\"   end of diversion, at end of page or return to 1-column
381 '''\"   CC=pos of nominal column end
382 .de C1
384 \!.C3
386 .if \\n(dn \{.nr CC \\n(dnu/2u+\\n(nlu
387 .wh \\n(CCu C2
390 .nr IN \\n(CIu
392 .CB \}
394 '''\"   end of first column retrieved from diversion
395 '''\"   CC=pos of actual column end
396 .de C2
397 .wh \\n(CCu
398 .mk CC
399 .po +(\\n(LLu/2u)u
401 .if \\n(dn>1v .ns
403 '''\"   end of second column
404 .de C3
406 .po -(\\n(LLu/2u)u
407 .if \\n(CC>\\n(nl .sp |\\n(CCu
408 .ne 2
410 .dePM
411 .if\a\\$1\a\a .nr !K 0
412 .if\w\a\\$1\a \{\
413 .ie\a\\$1\aP\a .nr !K 1
414 .el.ie \a\\$1\aBP\a .nr !K 3
415 .el.ie \a\\$1\aBR\a .nr !K 4
416 .el.nr !K 2 \}
417 .if\\n(!K .wh -(\\n(:mu+5v) )G
419 .de)G
420 .if\\n(!K 'sp 2v
421 .ie\\n(!K=1 \{\
422 .iet .bd1 3
423 .el.bd1 0
424 .tl\a\aPRIVATE\a\a
425 .bd1
426 .tl\a\aThis information should not be disclosed to unauthorized persons.\a\a
427 .tl\a\aIt is meant solely for use by authorized Bell System employees.\a\a \}
428 .el.ie \\n(!K=3 \{\
429 .iet .bd1 3
430 .el.bd1 0
431 .tl\a\aBELL LABORATORIES PROPRIETARY\a\a
432 .bd1
433 .tl\a\aNot for use or disclosure outside Bell Laboratories except by\a\a
434 .tl\a\awritten approval of the director of the distributing organization.\a\a \}
435 .el.ie \\n(!K=4 \{\
436 .iet .bd1 3
437 .el.bd1 0
438 .tl\a\aBELL LABORATORIES RESTRICTED\a\a
439 .bd1
440 .tl\a\aThe information herein is meant solely for use by authorized\a\a
441 .tl\a\aBell Laboratories employees and is not to be disclosed to others.\a\a \}
442 .el.if \\n(!K=2 \{\
443 .iet .bd1 3
444 .el.bd1 0
445 .tl\a\aNOTICE\a\a
446 .bd1
447 .tl\a\aNot for use or disclosure outside the\a\a
448 .tl\a\aBell System except under written agreement.\a\a \}
450 .\" end of macros
452 .\" choose page dimensions
453 .nr)s 0
454 .ift .if \ns .nr )s 1
455 .nr)t 0
456 .ift .if !\ns .nr )t 1
457 .if\n()s \{.nr )L 9i
458 .nrLL 4.75i
459 .nr)O .75i
460 .nr)S 8
461 .nr)V 9 \}
462 .if\n()t \{.nr )L 11i
463 .nrLL 6.5i
464 .nr)O 1i
465 .nr)S 9
466 .nr)V 11 \}
467 .ift \{.ds R ®
468 .dsS \s\n()S
469 ..\}
470 .ifn \{.ie \nL<=0 .nr )L 11i
471 .el \{.nr )L \nLu
472 .nr V 0\}
473 .nrLL 6.5i
474 .nr)O .463i
475 .if '\*(.T'think' \{.nrLL 80n
476 .nr)O 0\}
477 .if '\*(.T'thinksmall' \{.nrLL 142n
478 .vs 9p
479 .nr)O 0\}
480 .dsR (Reg.)
481 .dsS
482 ..\}
483 .if\nT .nr LL 80n
484 .if\nV>1 \{
485 .nrLL 82n
486 .nr)L 84v
487 .rmul \}
489 .nr)p 0 1
490 .ds]I \\\\n(]
491 .ds]R \\\\n()
492 .if\a\nd\a0\a .nr m \n(mo-1
493 .if\a\nm\a0\a .ds ]m January
494 .if\a\nm\a1\a .ds ]m February
495 .if\a\nm\a2\a .ds ]m March
496 .if\a\nm\a3\a .ds ]m April
497 .if\a\nm\a4\a .ds ]m May
498 .if\a\nm\a5\a .ds ]m June
499 .if\a\nm\a6\a .ds ]m July
500 .if\a\nm\a7\a .ds ]m August
501 .if\a\nm\a8\a .ds ]m September
502 .if\a\nm\a9\a .ds ]m October
503 .if\a\nm\a10\a .ds ]m November
504 .if\a\nm\a11\a .ds ]m December
505 .ifn \{.nr m \nm+1
506 .nr yD (\n(yr%100
507 .af yD 01
508 .ie\nd .ds ]W (last mod. \nm/\nd/\ny)
509 .el.ds ]W (printed \n(mo/\n(dy/\n(yD)
510 ..\}
511 .if\n()s .ds ]W
512 .if\n()t \{.ie \nd .ds ]W \*(]m \nd, 20\ny
513 .el.ds ]W \*(]m \n(dy, 20\n(yr
514 ..\}
516 .\" set page dimensions
517 .pl\n()Lu
518 .ll\n(LLu
519 .lt\n(LLu
520 .po\n()Ou
522 .ift .tr \``\''
524 .if\n()s .nr :m 3.5v
525 .if\n()t .nr :m 6v
526 .ifn .nr :m 7v
527 .ift .nr )M 3.6m
528 .ifn .nr )M 5n
529 .em}K
530 .nr q \np
531 .if!\np .nr p 1
532 .pn \np