![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tmac.e CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / usr.lib / me|
Return to tmac.e CVS log | Up to [CSRG BSD Unix] / 43BSD / usr.lib / me |
1.1 ! root 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: .\"* current address: * ! 11: .\"* Britton-Lee, Inc. * ! 12: .\"* 1919 Addison Street Suite 105 * ! 13: .\"* Berkeley, California 94704 * ! 14: .\"* * ! 15: .\"* VERSION 2.28 First Release: 11 Sept 1978 * ! 16: .\"* See file \*(||/revisions for revision history * ! 17: .\"* * ! 18: .\"* Documentation is available. * ! 19: .\"* * ! 20: .\"********************************************************************** ! 21: .\" ! 22: .\" @(#)tmac.e 2.28 5/12/86 ! 23: .\" %beginstrip% ! 24: .\" ! 25: .\" Code on .de commands: ! 26: .\" *** a user interface macro. ! 27: .\" &&& a user interface macro which is redefined ! 28: .\" when used to be the real thing. ! 29: .\" $$$ a macro which may be redefined by the user ! 30: .\" to provide variant functions. ! 31: .\" --- an internal macro. ! 32: .\" ! 33: .if !\n(.V .tm You are using the wrong version of NROFF/TROFF!! ! 34: .if !\n(.V .tm This macro package works only on the version seven ! 35: .if !\n(.V .tm release of NROFF and TROFF. ! 36: .if !\n(.V .ex ! 37: .if \n(pf \ ! 38: . nx \*(||/null.me ! 39: .\" *** INTERNAL GP MACROS *** ! 40: .de @C \" --- change ev's, taking info with us ! 41: .nr _S \\n(.s ! 42: .nr _V \\n(.v ! 43: .nr _F \\n(.f ! 44: .nr _I \\n(.i ! 45: .ev \\$1 ! 46: .ps \\n(_S ! 47: .vs \\n(_Vu ! 48: .ft \\n(_F ! 49: 'in \\n(_Iu ! 50: .xl \\n($lu ! 51: .lt \\n($lu ! 52: .rr _S ! 53: .rr _V ! 54: .rr _F ! 55: .rr _I ! 56: .ls 1 ! 57: 'ce 0 ! 58: .. ! 59: .de @D \" --- determine display type (Indent, Left, Center) ! 60: .ds |p "\\$3 ! 61: .nr _d \\$1 ! 62: .ie "\\$2"C" \ ! 63: . nr _d 1 ! 64: .el .ie "\\$2"L" \ ! 65: . nr _d 2 ! 66: .el .ie "\\$2"I" \ ! 67: . nr _d 3 ! 68: .el .ie "\\$2"M" \ ! 69: . nr _d 4 ! 70: .el \ ! 71: . ds |p "\\$2 ! 72: .. ! 73: .de @z \" --- end macro ! 74: .if \n@>1 .tm >> @z, .z=\\n(.z ?a=\\n(?a ! 75: .if !"\\n(.z"" \ ! 76: \{\ ! 77: . tm Line \\n(c. -- Unclosed block, footnote, or other diversion (\\n(.z) ! 78: . di ! 79: . ex ! 80: .\} ! 81: .if \\n(?a \ ! 82: . bp \" force out final table ! 83: .rm bp ! 84: .rm @b\" \" don't start another page ! 85: .if t \ ! 86: . wh -1p @m ! 87: .br ! 88: .if \n@>1 .tm << @z ! 89: .. ! 90: .de @I \" --- initialize processor ! 91: .rm th ! 92: .rm ac ! 93: .rm lo ! 94: .rm sc ! 95: .rm @I ! 96: .. ! 97: .\" *** STANDARD HEADERS AND FOOTERS *** ! 98: .de he \" *** define header ! 99: .ie !\\n(.$ \ ! 100: \{\ ! 101: . rm |4 ! 102: . rm |5 ! 103: .\} ! 104: .el \ ! 105: \{\ ! 106: . ds |4 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 107: . ds |5 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 108: .\} ! 109: .. ! 110: .de eh \" *** define even header ! 111: .ie !\\n(.$ \ ! 112: . rm |4 ! 113: .el \ ! 114: . ds |4 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 115: .. ! 116: .de oh \" *** define odd header ! 117: .ie !\\n(.$ \ ! 118: . rm |5 ! 119: .el \ ! 120: . ds |5 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 121: .. ! 122: .de fo \" *** define footer ! 123: .ie !\\n(.$ \ ! 124: \{\ ! 125: . rm |6 ! 126: . rm |7 ! 127: .\} ! 128: .el \ ! 129: \{\ ! 130: . ds |6 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 131: . ds |7 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 132: .\} ! 133: .. ! 134: .de ef \" *** define even foot ! 135: .ie !\\n(.$ \ ! 136: . rm |6 ! 137: .el \ ! 138: . ds |6 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 139: .. ! 140: .de of \" *** define odd footer ! 141: .ie !\\n(.$ \ ! 142: . rm |7 ! 143: .el \ ! 144: . ds |7 "\\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 ! 145: .. ! 146: .de ep \" *** end page (must always be followed by a .bp) ! 147: .if \\n(nl>0 \ ! 148: \{\ ! 149: . wh 0 ! 150: . rs ! 151: . @b ! 152: .\} ! 153: .. ! 154: .\" *** INTERNAL HEADER AND FOOTER MACROS *** ! 155: .de @h \" --- header ! 156: .if \n@>1 .tm >> @h %=\\n% ?a=\\n(?a ?b=\\n(?b ?w=\\n(?w ! 157: .if (\\n(.i+\\n(.o)>=\\n(.l \ ! 158: . tm Line \\n(c. -- Offset + indent exceeds line length ! 159: .if t .if (\\n(.l+\\n(.o)>7.75i \ ! 160: . tm Line \\n(c. -- Offset + line length exceeds paper width ! 161: .\" initialize a pile of junk ! 162: .nr ?h \\n(?H \" transfer "next page" to "this page" ! 163: .rr ?H ! 164: .nr ?c \\n(?C ! 165: .rr ?C ! 166: .rn |4 |0 ! 167: .rn |5 |1 ! 168: .rn |6 |2 ! 169: .rn |7 |3 ! 170: .nr _w 0 \" reset max footnote width ! 171: .nr ?W 0 \" no wide floats this page (yet) ! 172: .nr ?I 1 ! 173: .\" begin actual header stuff ! 174: .ev 2 ! 175: .rs ! 176: .if t .@m \" output cut mark ! 177: .if \\n(hm>0 \ ! 178: . sp |\\n(hmu \" move to header position ! 179: .@t $h \" output header title ! 180: .if \\n(tm<=0 \ ! 181: . nr tm \n(.Vu ! 182: .sp |\\n(tmu \" move to top of text ! 183: .ev ! 184: .mk _k \" for columned output ! 185: .if \\n(?n .nm 1 \" restore line numbering if n1 mode ! 186: .nr $c 1 \" set first column ! 187: .if \n@>4 .tm -- @h >> .ns nl=\\n(nl %=\\n% _k=\\n(_k tm=\\n(tm ! 188: .ie \\n(?s \ ! 189: \{\ ! 190: . rr ?s ! 191: . rs ! 192: ' @b ! 193: .\} ! 194: .el \ ! 195: . @n \" begin the column ! 196: .if \n@>2 .tm << @h ! 197: .. ! 198: .if \nv=2 \ ! 199: \{\ ! 200: . de @m \" --- output cut mark (only on C/A/T-style) ! 201: . @O 0 ! 202: . lt 7.5i ! 203: . tl '\(rn''\(rn' ! 204: . @O ! 205: . lt ! 206: .. ! 207: .\} ! 208: .de @n \" --- new column or page ! 209: .if \n@>3 .tm >> @n nl=\\n(nl %=\\n% ?f=\\n(?f ?o=\\n(?o ! 210: .if \\n(bm<=0 \ ! 211: . nr bm \\n(.Vu ! 212: .if (\\n(_w<=\\n($l)&(\\n(?W=0) \ ! 213: \{\ ! 214: . nr _b (\\n(ppu*\\n($ru)/2u \" compute fudge factor (must be < 1P) ! 215: . if \\n(_bu>((\\n(bmu-\\n(fmu-(\\n(tpu*\\n($ru))/2u) \ ! 216: . nr _b (\\n(ppu*\\n($ru)-\n(.Vu ! 217: . nr _b +\\n(bmu ! 218: .\} ! 219: .nr _B \\n(_bu ! 220: .ch @f ! 221: .wh -\\n(_bu @f ! 222: .nr _b +(\\n(ppu*\\n($ru) \" add 1 paragraph v in case of sweep past ! 223: .if \n@>2 .tm @n .p=\\n(.p bm=\\n(bm _b=\\n(_b _B=\\n(_B ! 224: .nr ?f 0 \" reset footnote flag ! 225: .if \\n(?o \ ! 226: \{\ ! 227: . (f _ \" reprocess footnotes which run off page ! 228: . nf ! 229: . |o ! 230: . fi ! 231: . )f ! 232: . rm |o ! 233: .\} ! 234: .nr ?o 0 ! 235: .if \\n(?T \ ! 236: \{\ ! 237: . nr _i \\n(.i ! 238: . in \\n($iu ! 239: . |h \" output the table header ! 240: . in \\n(_iu ! 241: . rr _i ! 242: . mk #T \" for tbl commands ! 243: . ns ! 244: .\} ! 245: .if (\\n(?a)&((\\n($c<2):(\\n(?w=0)) \ ! 246: \{\ ! 247: . nr ?a 0 \" output floating keep ! 248: . @k |t ! 249: . if \\n(?w \ ! 250: . mk _k \" don't overstrike wide keeps ! 251: . nr ?w 0 ! 252: .\} ! 253: .os ! 254: .$H \" special column header macro ! 255: .ns ! 256: .. ! 257: .de @f \" --- footer ! 258: .if \n@>1 .tm >> @f %=\\n% nl=\\n(nl ?a=\\n(?a ?b=\\n(?b ?f=\\n(?f ! 259: .if \n@>2 .nr VL \\n(.pu-\\n(nlu ! 260: .if \n@>2 .tm @f bm=\\n(bm _B=\\n(_B _b=\\n(_b .p-nl=\\n(VL ! 261: .ec ! 262: .if \\n(?T \ ! 263: \{\ ! 264: . nr T. 1 \" for tbl commands (to output bottom line) ! 265: . T# 1 \" output the sides and bottom lines ! 266: . br ! 267: .\} ! 268: .ev 2 ! 269: .ce 0 ! 270: .if \\n(?b \ ! 271: \{\ ! 272: . nr ?b 0 ! 273: . @k |b\" \" output bottom of page tables ! 274: .\} ! 275: .if \\n(?f \ ! 276: . @o \" output footnote if present ! 277: .ie \\n($c<\\n($m \ ! 278: . @c \" handle new column ! 279: .el \ ! 280: . @e \" new page ! 281: .ev ! 282: .if \n@>2 .tm << @f ! 283: .. ! 284: .de @o \" --- output footnote ! 285: .nf ! 286: .ls 1 ! 287: .in 0 ! 288: .if \n@>2 .tm @o last printed text = \\n(nl placing @r trap at -\\n(_B ! 289: .wh -\\n(_Bu @r ! 290: .|f ! 291: .fi ! 292: .if \n@>2 .tm @o triggered @r (?o) = \\n(?o ! 293: .if \\n(?o \ ! 294: \{\ ! 295: . di \" just in case triggered @r ! 296: . if \\n(dn=0 \ ! 297: \{\ ! 298: . rm |o ! 299: . nr ?o 0 ! 300: . \} ! 301: . nr dn \\n(_D ! 302: . rr _D ! 303: .\} ! 304: .rm |f ! 305: .ch @r ! 306: .. ! 307: .de @c \" --- new column ! 308: .if \n@>2 .tm >> @c %=\\n% ! 309: .rs ! 310: .sp |\\n(_ku ! 311: .@O +\\n($lu+\\n($su ! 312: .nr $c +1 ! 313: .@n ! 314: .. ! 315: .de @e \" --- end page ! 316: .if \n@>2 .tm >> @e ! 317: .@O \\n(_ou ! 318: .rs ! 319: .sp |\\n(.pu-\\n(fmu-(\\n(tpu*\\n($ru) \" move to footer position ! 320: .@t $f \" output footer title ! 321: .nr ?h 0 ! 322: .bp ! 323: .. ! 324: .de @t \" --- output header or footer title ! 325: .if !\\n(?h \ ! 326: \{\ ! 327: . sz \\n(tp \" set header/footer type fonts, etc. ! 328: . @F \\n(tf ! 329: . lt \\n(_Lu \" make title span entire page ! 330: . nf ! 331: . \\$1 ! 332: . br ! 333: .\} ! 334: .. ! 335: .de $h \" $$$ print header ! 336: .rm |z ! 337: .if !\\n(?c \ ! 338: \{\ ! 339: . if e .ds |z "\\*(|0 ! 340: . if o .ds |z "\\*(|1 ! 341: .\} ! 342: .if !\(ts\\*(|z\(ts\(ts \ ! 343: ' tl \\*(|z ! 344: .rm |z ! 345: .. ! 346: .de $f \" $$$ print footer ! 347: .rm |z ! 348: .if \\n(?c \ ! 349: \{\ ! 350: . if e .ds |z "\\*(|0 ! 351: . if o .ds |z "\\*(|1 ! 352: .\} ! 353: .if \(ts\\*(|z\(ts\(ts \ ! 354: \{\ ! 355: . if e .ds |z "\\*(|2 ! 356: . if o .ds |z "\\*(|3 ! 357: .\} ! 358: .if !\(ts\\*(|z\(ts\(ts \ ! 359: ' tl \\*(|z ! 360: .rm |z ! 361: .. ! 362: .de @r \" --- reprocess overflow footnotes ! 363: .if \n@>3 .tm >> @r .z=\\n(.z ?f=\\n(?f ?a=\\n(?a ?b=\\n(?b _b=\\n(_b ! 364: .di |o \" save overflow footnote ! 365: .nr ?o 1 ! 366: .nr _D \\n(dn ! 367: .ns ! 368: .. ! 369: .\" *** COMMANDS WITH VARIANT DEFINITIONS *** ! 370: .rn bp @b \" --- begin page ! 371: .de bp \" *** begin new page (overrides columns) ! 372: .nr $c \\n($m \" force new page, not new column ! 373: .ie \\n(nl>0 \ ! 374: . @b \\$1 ! 375: .el \ ! 376: \{\ ! 377: . if \\n(.$>0 \ ! 378: . pn \\$1 ! 379: . if \\n(?I \ ! 380: . @h \" 'spring' the header trap ! 381: .\} ! 382: .br ! 383: .wh 0 @h \" reset header ! 384: .. ! 385: .rn ll xl \" *** special line length (local) ! 386: .de ll \" *** line length (global to environments) ! 387: .xl \\$1 ! 388: .lt \\$1 ! 389: .nr $l \\n(.l ! 390: .if (\\n($m<=1):(\\n($l>\\n(_L) \ ! 391: . nr _L \\n(.l ! 392: .. ! 393: .rn po @O \" --- local page offset ! 394: .de po \" *** page offset ! 395: .@O \\$1 ! 396: .nr _o \\n(.o ! 397: .. ! 398: .\" *** MISCELLANEOUS ROFF COMMANDS *** ! 399: .de hx \" *** suppress headers and footers next page ! 400: .nr ?H 1 ! 401: .. ! 402: .de ix \" *** indent, no break ! 403: 'in \\$1 ! 404: .. ! 405: .de bl \" *** contiguous blank lines ! 406: .br ! 407: .ne \\$1 ! 408: .rs ! 409: .sp \\$1 ! 410: .. ! 411: .de n1 \" *** line numbering 1 ! 412: .nm 1 ! 413: .xl -\w'0000'u ! 414: .nr ?n 1 ! 415: .. ! 416: .de n2 \" *** line numbering 2 ! 417: .nm \\$1 ! 418: .ie \\n(.$ \ ! 419: . xl -\w'0000'u ! 420: .el \ ! 421: . xl \\n($lu ! 422: .. ! 423: .de pa \" *** new page ! 424: .bp \\$1 ! 425: .. ! 426: .de ro \" *** roman page numbers ! 427: .af % i ! 428: .. ! 429: .de ar \" *** arabic page numbers ! 430: .af % 1 ! 431: .. ! 432: .de m1 \" *** position one space ! 433: .nr _0 \\n(hmu ! 434: .nr hm \\$1v ! 435: .nr tm +\\n(hmu-\\n(_0u ! 436: .rr _0 ! 437: .. ! 438: .de m2 \" *** position two space ! 439: .nr tm \\n(hmu+\\n(tpp+\\$1v ! 440: .. ! 441: .de m3 \" *** position three space ! 442: .nr bm \\n(fmu+\\n(tpp+\\$1v ! 443: .. ! 444: .de m4 \" *** position four space ! 445: .nr _0 \\n(fmu ! 446: .nr fm \\$1v ! 447: .nr bm +\\n(fmu-\\n(_0u ! 448: .. ! 449: .de sk \" *** leave a blank page (next page) ! 450: .if \\n(.$>0 \ ! 451: . tm Line \\n(c. -- I cannot skip multiple pages ! 452: .nr ?s 1 ! 453: .. ! 454: .\" *** MISCELLANEOUS USER SUPPORT COMMANDS *** ! 455: .de re \" *** reset tabs (TROFF defines 15 stops default) ! 456: .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 ! 457: .. ! 458: .if t .ig ! 459: .de re \" *** reset tabs (NROFF version) ! 460: .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 ! 461: .. ! 462: .de ba \" *** set base indent ! 463: .ie \\n(.$ \ ! 464: . nr $i \\$1n ! 465: .el \ ! 466: . nr $i \\n(siu*\\n($0u ! 467: .. ! 468: .de hl \" *** draw horizontal line ! 469: .br ! 470: \l'\\n(.lu-\\n(.iu' ! 471: .sp ! 472: .. ! 473: .\" *** PARAGRAPHING *** ! 474: .de pp \" *** paragraph ! 475: .lp \\n(piu ! 476: .. ! 477: .de lp \" *** left aligned paragraph ! 478: .@p ! 479: .if \\n(.$ \ ! 480: . ti +\\$1 ! 481: .nr $p 0 1 ! 482: .. ! 483: .de ip \" *** indented paragraph w/ optional tag ! 484: .if (\\n(ii>0)&(\\n(ii<1n) \ ! 485: . nr ii \\n(iin ! 486: .nr _0 \\n(ii ! 487: .if \\n(.$>1 \ ! 488: . nr _0 \\$2n ! 489: .@p \\n(_0u ! 490: .if \\w"\\$1" \ ! 491: \{\ ! 492: . ti -\\n(_0u ! 493: . ie \\w"\\$1">=\\n(_0 \ ! 494: \{\ ! 495: \&\\$1 ! 496: . br ! 497: . \} ! 498: . el \&\\$1\h'|\\n(_0u'\c ! 499: .\} ! 500: .rr _0 ! 501: .. ! 502: .de np \" *** numbered paragraph ! 503: .if \\n($p<0 \ ! 504: . nr $p 0 \" reset number after .bu ! 505: .nr $p +1 \" increment paragraph number ! 506: .@p \w'\0(000)\0'u ! 507: .ti -\w'\0(000)\0'u ! 508: \0(\\n($p)\h'|\w'\0(000)\0'u'\c ! 509: .. ! 510: .de bu \" *** bulleted paragraph ! 511: .br ! 512: .if \\n($p<0 \ ! 513: . ns \" don't space between .bu paragraphs ! 514: .nr $p 0-1 \" mark "bulleted paragraph" mode ! 515: .@p \w'\0\(bu\0'u ! 516: .ti -\w'\0\(bu\0'u ! 517: \0\(bu\0\c ! 518: .. ! 519: .de @p \" --- initialize for paragraph ! 520: .@I \" initialize macro processor ! 521: .if "\\n(.z"|e" .tm Line \\n(c. -- Unmatched continued equation ! 522: .in \\n($iu+\\n(pou ! 523: .if \\n(.$ \ ! 524: . in +\\$1n ! 525: .ce 0 ! 526: .fi ! 527: .@F \\n(pf ! 528: .sz \\n(pp ! 529: .sp \\n(psu ! 530: .ne \\n(.Lv+\\n(.Vu ! 531: .ns ! 532: .. ! 533: .\" *** SECTION HEADINGS *** ! 534: .de sh \" &&& section heading ! 535: .rn sh @T ! 536: .so \\*(||/sh.me ! 537: .sh "\\$1" "\\$2" \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 ! 538: .rm @T ! 539: .. ! 540: .de $p \" $$$ print section heading ! 541: .if (\\n(si>0)&(\\n(.$>2) \ ! 542: . nr $i \\$3*\\n(si ! 543: .in \\n($iu ! 544: .ie !"\\$1\\$2"" \ ! 545: \{\ ! 546: . sp \\n(ssu \" one of them is non-null ! 547: . ne \\n(.Lv+\\n(.Vu+\\n(psu+(\\n(spu*\\n($ru*\\n(.Lu) ! 548: . ie \\n(.$>2 \ ! 549: . ti -(\\n(siu-\\n(sou) ! 550: . el \ ! 551: . ti +\\n(sou ! 552: . @F \\n(sf ! 553: . sz \\n(sp ! 554: . if \\$3>0 \ ! 555: . $\\$3 ! 556: . if \w"\\$2">0 \\$2. ! 557: . if \w"\\$1">0 \\$1\f1\ \ \& ! 558: .\} ! 559: .el \ ! 560: . sp \\n(psu ! 561: .@F \\n(pf ! 562: .sz \\n(pp ! 563: .. ! 564: .de uh \" *** unnumbered section heading ! 565: .rn uh @T ! 566: .so \\*(||/sh.me ! 567: .uh "\\$1" ! 568: .rm @T ! 569: .. ! 570: .\" *** COLUMNNED OUTPUT *** ! 571: .de 2c \" *** double columned output ! 572: .br ! 573: .if \\n($m>1 \ ! 574: . 1c \" revert to 1c if already 2c ! 575: .nr $c 1 ! 576: .nr $m 2 ! 577: .if \\n(.$>1 \ ! 578: . nr $m \\$2 ! 579: .if \\n(.$>0 \ ! 580: . nr $s \\$1n \" param 1: column seperation ! 581: .nr $l (\\n(.l-((\\n($m-1)*\\n($s))/\\n($m ! 582: .xl \\n($lu ! 583: .mk _k ! 584: .ns ! 585: .. ! 586: .de 1c \" *** single columned output ! 587: .br ! 588: .nr $c 1 ! 589: .nr $m 1 ! 590: .ll \\n(_Lu \" return to normal output ! 591: .sp |\\n(.hu ! 592: .@O \\n(_ou ! 593: .. ! 594: .de bc \" *** begin column ! 595: .sp 24i ! 596: .. ! 597: .\" *** FLOATING TABLES AND NONFLOATING BLOCKS *** ! 598: .de (z \" &&& begin floating keep ! 599: .rn (z @V ! 600: .so \\*(||/float.me ! 601: .(z \\$1 \\$2 ! 602: .rm @V ! 603: .. ! 604: .de )z \" &&& end floating keep ! 605: .tm Line \\n(c. -- unmatched .)z ! 606: .. ! 607: .de (t \" XXX temp ref to (z ! 608: .(z \\$1 \\$2 ! 609: .. ! 610: .de )t \" XXX temp ref to )t ! 611: .)z \\$1 \\$2 ! 612: .. ! 613: .de (b \" *** begin block ! 614: .br ! 615: .@D 3 \\$1 \\$2 ! 616: .sp \\n(bsu ! 617: .@( ! 618: .. ! 619: .de )b \" *** end block ! 620: .br ! 621: .@) ! 622: .if (\\n(bt=0):(\\n(.t<\\n(bt) \ ! 623: . ne \\n(dnu \" make it all on one page ! 624: .ls 1 ! 625: .nf ! 626: .|k ! 627: .ec ! 628: .fi ! 629: .in 0 ! 630: .xl \\n($lu ! 631: .ev ! 632: .rm |k ! 633: .sp \\n(bsu+\\n(.Lv-1v ! 634: .. ! 635: .de @( \" --- begin keep ! 636: .if !"\\n(.z"" .tm Line \\n(c. -- Illegal nested keep \\n(.z ! 637: .@M ! 638: .di |k ! 639: \!'rs ! 640: .. ! 641: .de @M \" --- set modes for display ! 642: .nr ?k 1 ! 643: .@C 1 ! 644: .@F \\n(df ! 645: .vs \\n(.su*\\n($Ru ! 646: .nf ! 647: .if "\\*(|p"F" \ ! 648: . fi \" set fill mode if "F" parameter ! 649: .if \\n(_d=4 \ ! 650: . in 0 ! 651: .if \\n(_d=3 \ ! 652: \{\ ! 653: . in +\\n(biu ! 654: . xl -\\n(biu ! 655: .\} ! 656: .if \\n(_d=1 \ ! 657: . ce 10000 ! 658: .. ! 659: .de @) \" --- end keep ! 660: .br ! 661: .if !"\\n(.z"|k" .tm Line \\n(c. -- Close of a keep which has never been opened ! 662: .nr ?k 0 ! 663: .di ! 664: .in 0 ! 665: .ce 0 ! 666: .. ! 667: .de (c \" *** begin block centered text ! 668: .if "\\n(.z"|c" .tm Line \\n(c. -- Nested .(c requests ! 669: .di |c ! 670: .. ! 671: .de )c \" *** end block centered text ! 672: .if !"\\n(.z"|c" .tm Line \\n(c. -- Unmatched .)c ! 673: .br \" force out final line ! 674: .di ! 675: .if \n@>4 .tm >> .)c .l=\\n(.l .i=\\n(.i $i=\\n($i dl=\\n(dl ! 676: .ev 1 ! 677: .ls 1 ! 678: .in (\\n(.lu-\\n(.iu-\\n(dlu)/2u ! 679: .if \n@>4 .tm -- .)c << .in .l=\\n(.l .i=\\n(.i dl=\\n(dl ! 680: .nf ! 681: .|c ! 682: .ec ! 683: .in ! 684: .ls ! 685: .ev ! 686: .rm |c ! 687: .. ! 688: .\" *** BLOCK QUOTES (OR WHATEVER) AND LISTS *** ! 689: .de (q \" *** begin block quote ! 690: .br ! 691: .@C 1 ! 692: .fi ! 693: .sp \\n(qsu ! 694: .in +\\n(qiu ! 695: .xl -\\n(qiu ! 696: .sz \\n(qp ! 697: .. ! 698: .de )q \" *** end block quote ! 699: .br ! 700: .ev ! 701: .sp \\n(qsu+\\n(.Lv-1v ! 702: .nr ?k 0 ! 703: .. ! 704: .de (l \" *** begin list ! 705: .br ! 706: .sp \\n(bsu ! 707: .@D 3 \\$1 \\$2 ! 708: .@M ! 709: .. ! 710: .de )l \" *** end list ! 711: .br ! 712: .ev ! 713: .sp \\n(bsu+\\n(.Lv-1v ! 714: .nr ?k 0 ! 715: .. ! 716: .\" *** PREPROCESSOR SUPPORT *** ! 717: .\" ! 718: .\" EQN ! 719: .\" ! 720: .de EQ \" &&& begin equation ! 721: .rn EQ @T ! 722: .so \\*(||/eqn.me ! 723: .EQ \\$1 \\$2 ! 724: .rm @T ! 725: .. ! 726: .\" ! 727: .\" TBL ! 728: .\" ! 729: .de TS \" &&& begin table ! 730: .rn TS @W ! 731: .so \\*(||/tbl.me ! 732: .TS \\$1 \\$2 ! 733: .rm @W ! 734: .. ! 735: .\" ! 736: .\" REFER ! 737: .\" ! 738: .de ]- \" &&& initialize reference ! 739: .rn ]- @] ! 740: .so \\*(||/refer.me ! 741: .]- ! 742: .rm @] ! 743: .. ! 744: .de ]< \" &&& initialize reference ! 745: .rn ]< @] ! 746: .so \\*(||/refer.me ! 747: .]< ! 748: .rm @] ! 749: .. ! 750: .if n .ds [. " [ ! 751: .if t .ds [. \s-2\v'-.4m'\f1 ! 752: .if n .ds .] ] ! 753: .if t .ds .] \v'.4m'\s+2\fP ! 754: .if n .ds <. " ! 755: .if t .ds <. . ! 756: .if n .ds >. . ! 757: .if t .ds >. " ! 758: .\" ! 759: .\" IDEAL ! 760: .\" ! 761: .de IS \" *** start ideal picture ! 762: .nr g7 \\n(.u ! 763: .ls 1 ! 764: .. ! 765: .de IF ! 766: .if \\n(g7 .fi ! 767: .ls ! 768: .. ! 769: .de IE \" *** end ideal picture ! 770: .if \\n(g7 .fi ! 771: .ls ! 772: .. ! 773: .\" ! 774: .\" PIC ! 775: .\" ! 776: .de PS \" *** start picture: $1=height, $2=width in units ! 777: .if t \ ! 778: . sp 0.3 ! 779: .in (\\n(.lu-\\$2u)/2u ! 780: .ne \\$1u ! 781: .nr g7 \\n(.u ! 782: .ls 1 ! 783: .. ! 784: .de PE \" *** end picture ! 785: .ls ! 786: .in ! 787: .if \\n(g7 .fi ! 788: .if t .sp .6 ! 789: .. ! 790: .\" ! 791: .\" GREMLIN ! 792: .\" ! 793: .de GS \" *** start gremlin picture ! 794: .nr g7 (\\n(.lu-\\n(g1u)/2u ! 795: .if "\\$1"L" .nr g7 \\n(.iu ! 796: .if "\\$1"R" .nr g7 \\n(.lu-\\n(g1u ! 797: .in \\n(g7u ! 798: .nr g7 \\n(.u ! 799: .ls 1 ! 800: .nf ! 801: .ne \\n(g2u ! 802: .. ! 803: .de GE \" *** end gremlin picture ! 804: .GF ! 805: .if t .sp .6 ! 806: .. ! 807: .de GF \" *** finish gremlin picture; stay at top ! 808: .ls ! 809: .in ! 810: .if \\n(g7 .fi ! 811: .. ! 812: .\" *** FONT AIDS *** ! 813: .de sz \" *** set point size and vertical spacing ! 814: .ps \\$1 ! 815: .vs \\n(.su*\\n($ru \" default vs at pointsize + 20% ! 816: .bd S B \\n(.su/3u ! 817: .. ! 818: .de r \" *** enter roman font ! 819: .nr _F \\n(.f ! 820: .ul 0 ! 821: .ft 1 ! 822: .if \\n(.$ \&\\$1\f\\n(_F\\$2 ! 823: .rr _F ! 824: .. ! 825: .de i \" *** enter italic ! 826: .nr _F \\n(.f ! 827: .ul 0 ! 828: .ft 2 ! 829: .if \\n(.$ \&\\$1\f\\n(_F\\$2 ! 830: .rr _F ! 831: .. ! 832: .de b \" *** enter boldface (underline in NROFF) ! 833: .nr _F \\n(.f ! 834: .ul 0 ! 835: .ft \\n($b ! 836: .if \\n(.$ \&\\$1\f\\n(_F\\$2 ! 837: .rr _F ! 838: .. ! 839: .de rb \" *** enter real boldface (not underlined in NROFF) ! 840: .nr _F \\n(.f ! 841: .ul 0 ! 842: .ft 3 ! 843: .if \\n(.$ \&\\$1\f\\n(_F\\$2 ! 844: .rr _F ! 845: .. ! 846: .de u \" *** enter underlined word ! 847: \&\\$1\l'|0\(ul'\\$2 ! 848: .. ! 849: .de q \" *** enter quoted word ! 850: \&\\*(lq\\$1\\*(rq\\$2 ! 851: .. ! 852: .de bi \" *** enter word in bold italics ! 853: .ft 2 ! 854: .ie t \&\k~\\$1\h'|\\n~u+(\\w' 'u/4u)'\\$1\fP\\$2 ! 855: .el \&\\$1\fP\\$2 ! 856: .. ! 857: .de bx \" *** enter boxed word ! 858: .ie \\n($T \&\f2\\$1\fP\\$2 ! 859: .el \k~\(br\|\\$1\|\(br\l'|\\n~u\(rn'\l'|\\n~u\(ul'\^\\$2 ! 860: .. ! 861: .de sm \" *** print in smaller font ! 862: \s-1\\$1\\s0\\$2 ! 863: .. ! 864: .de @F \" --- change font (8 -> underlined, 0 -> no change) ! 865: .nr ~ \\$1 ! 866: .if \\n~>0 \ ! 867: \{\ ! 868: . ul 0 ! 869: . if \\n~>4 \ ! 870: . nr ~ \\n($b ! 871: . ft \\n~ ! 872: .\} ! 873: .rr ~ ! 874: .. ! 875: .\" *** FOOTNOTING *** ! 876: .de (f \" &&& begin footnote ! 877: .rn (f @U ! 878: .so \\*(||/footnote.me ! 879: .(f \\$1 \\$2 ! 880: .rm @U ! 881: .. ! 882: .de )f \" &&& end footnote ! 883: .tm Line \\n(c. -- unmatched .)f ! 884: .. ! 885: .de $s \" $$$ footnote separator ! 886: \l'2i' ! 887: .if n \ ! 888: . sp 0.3 ! 889: .. ! 890: .\" *** DELAYED TEXT *** ! 891: .de (d \" &&& begin delayed text ! 892: .rn (d @U ! 893: .so \\*(||/deltext.me ! 894: .(d \\$1 \\$2 ! 895: .rm @U ! 896: .. ! 897: .de )d \" &&& end delayed text ! 898: .tm Line \\n(c. -- unmatched .)d ! 899: .. ! 900: .\" *** INDEXES (TABLE OF CONTENTS) *** ! 901: .de (x \" &&& begin index ! 902: .rn (x @U ! 903: .so \\*(||/index.me ! 904: .(x \\$1 \\$2 ! 905: .rm @U ! 906: .. ! 907: .de )x \" &&& end index entry ! 908: .tm Line \\n(c. -- unmatched .)x ! 909: .. ! 910: .\" *** STUFF FOR "STANDARD" PAPERS *** ! 911: .de th \" *** set "thesis" mode ! 912: .so \\*(||/thesis.me ! 913: .rm th ! 914: .. ! 915: .de +c \" *** begin chapter ! 916: .ep \" force out footnotes ! 917: .if \\n(?o:\\n(?a \ ! 918: \{\ ! 919: . bp \" force out a table or more footnote ! 920: . rs ! 921: . ep ! 922: .\} ! 923: .nr ?C 1 ! 924: .nr $f 1 1 ! 925: .ds * \\*[1\\*]\k* ! 926: .if \\n(?R \ ! 927: . pn 1 ! 928: .bp ! 929: .in \\n($iu \" reset the indent ! 930: .rs ! 931: .ie \\n(.$ \ ! 932: . $c "\\$1" ! 933: .el \ ! 934: . sp 3 ! 935: .. ! 936: .de ++ \" *** declare chapter type ! 937: .nr _0 0 ! 938: .if "\\$1"C" \ ! 939: . nr _0 1 \" chapter ! 940: .if "\\$1"RC" \ ! 941: . nr _0 11 \" renumbered chapter ! 942: .if "\\$1"A" \ ! 943: . nr _0 2 \" appendix ! 944: .if "\\$1"RA" \ ! 945: . nr _0 12 \" renumbered appendix ! 946: .if "\\$1"P" \ ! 947: . nr _0 3 \" preliminary material ! 948: .if "\\$1"B" \ ! 949: . nr _0 4 \" bibliographic material ! 950: .if "\\$1"AB" \ ! 951: . nr _0 5 \" abstract ! 952: .if \\n(_0=0 \ ! 953: . tm Line \\n(c. -- Bad mode to .++ ! 954: .nr ?R 0 ! 955: .if \\n(_0>10 \ ! 956: .\{ ! 957: . nr ?R 1 ! 958: . nr _0 -10 ! 959: .\} ! 960: .nr ch 0 1 ! 961: .if (\\n(_0=3):(\\n(_0=5) \ ! 962: . pn 1 \" must do before .ep ! 963: .ep \" end page for correct page number types ! 964: .if \\n(_0=1 \ ! 965: \{\ ! 966: . af ch 1 ! 967: . af % 1 ! 968: .\} ! 969: .if \\n(_0=2 \ ! 970: \{\ ! 971: . af ch A ! 972: . af % 1 ! 973: .\} ! 974: .if \\n(_0=3 \ ! 975: . af % i ! 976: .if \\n(_0=4 \ ! 977: . af % 1 ! 978: .if \\n(_0=5 \ ! 979: . af % 1 ! 980: .if \\n(.$>1 \ ! 981: . he \\$2 ! 982: .if !\\n(_0=\\n(_M .if \\n(_M=3 \ ! 983: . pn 1 ! 984: .nr _M \\n(_0 ! 985: .rr _0 ! 986: .. ! 987: .de $c \" $$$ print chapter title ! 988: .sz 12 ! 989: .ft B ! 990: .ce 1000 ! 991: .if \\n(_M<3 \ ! 992: . nr ch +1 ! 993: .ie \\n(_M=1 CHAPTER\ \ \\n(ch ! 994: .el .if \\n(_M=2 APPENDIX\ \ \\n(ch ! 995: .if \w"\\$1" .sp 3-\\n(.L ! 996: .if \w"\\$1" \\$1 ! 997: .if (\\n(_M<3):(\w"\\$1") \ ! 998: . sp 4-\\n(.L ! 999: .ce 0 ! 1000: .ft ! 1001: .sz ! 1002: .ie \\n(_M=1 \ ! 1003: . $C Chapter \\n(ch "\\$1" ! 1004: .el .if \\n(_M=2 \ ! 1005: . $C Appendix \\n(ch "\\$1" ! 1006: .. ! 1007: .de tp \" *** title page ! 1008: .hx ! 1009: .bp ! 1010: .br ! 1011: .rs ! 1012: .pn \\n% ! 1013: .. ! 1014: .de ac \" *** setup for ACM photo-ready paper ! 1015: .rn ac @T ! 1016: .so \\*(||/acm.me ! 1017: .ac "\\$1" "\\$2" ! 1018: .rm @T ! 1019: .. ! 1020: .de lo \" *** pull in the set of local macros ! 1021: .\" all these macros should be named "*X", where X is any letter ! 1022: .so \\*(||/local.me ! 1023: .rm lo ! 1024: .. ! 1025: .de lh \" *** letterhead ! 1026: .so \\*(||/letterhead.me ! 1027: .. ! 1028: .\" *** DATES *** ! 1029: .if \n(mo=1 .ds mo January ! 1030: .if \n(mo=2 .ds mo February ! 1031: .if \n(mo=3 .ds mo March ! 1032: .if \n(mo=4 .ds mo April ! 1033: .if \n(mo=5 .ds mo May ! 1034: .if \n(mo=6 .ds mo June ! 1035: .if \n(mo=7 .ds mo July ! 1036: .if \n(mo=8 .ds mo August ! 1037: .if \n(mo=9 .ds mo September ! 1038: .if \n(mo=10 .ds mo October ! 1039: .if \n(mo=11 .ds mo November ! 1040: .if \n(mo=12 .ds mo December ! 1041: .if \n(dw=1 .ds dw Sunday ! 1042: .if \n(dw=2 .ds dw Monday ! 1043: .if \n(dw=3 .ds dw Tuesday ! 1044: .if \n(dw=4 .ds dw Wednesday ! 1045: .if \n(dw=5 .ds dw Thursday ! 1046: .if \n(dw=6 .ds dw Friday ! 1047: .if \n(dw=7 .ds dw Saturday ! 1048: .ds td \*(mo \n(dy, 19\n(yr ! 1049: .\" *** PARAMETRIC INITIALIZATIONS *** ! 1050: .if (1m<0.1i)&(\nx!=0) \ ! 1051: . vs 9p \" for 12-pitch DTC terminals ! 1052: .rr x ! 1053: .nr $r \n(.v/\n(.s \" ratio of vs to ps for .sz request ! 1054: .nr $R \n($r \" ratio for displays & footnotes ! 1055: .nr hm 4v \" header margin ! 1056: .nr tm 7v \" top margin ! 1057: .nr bm 6v \" bottom margin ! 1058: .nr fm 3v \" footer margin ! 1059: .nr tf 3 \" title font: (real) Times Bold ! 1060: .nr tp 10 \" title point size ! 1061: .hy 14 ! 1062: .nr bi 4m \" indent for blocks ! 1063: .nr pi 5n \" indent for paragraphs ! 1064: .nr pf 1 \" normal text font ! 1065: .nr pp 10 \" normal text point size ! 1066: .nr qi 4n \" indent for quotes ! 1067: .nr qp -1 \" down one point ! 1068: .nr ii 5n \" indent for .ip's and .np's ! 1069: .nr $m 1 \" max number of columns ! 1070: .nr $s 4n \" column separation ! 1071: .ds || /usr/lib/me ! 1072: .if \n@>0 .ds || . ! 1073: .bd S B 3 ! 1074: .\" *** OTHER INITIALIZATION *** ! 1075: .ds [ \u\x'-0.25v' ! 1076: .ds ] \d ! 1077: .ds < \d\x'0.25v' ! 1078: .ds > \u ! 1079: .ds - -- ! 1080: .if t \ ! 1081: \{\ ! 1082: . ds [ \v'-0.4m'\x'-0.2m'\s-3 ! 1083: . ds ] \s0\v'0.4m' ! 1084: . ds < \v'0.4m'\x'0.2m'\s-3 ! 1085: . ds > \s0\v'-0.4m' ! 1086: . ds - \(em ! 1087: . nr fi 0.3i ! 1088: .\} ! 1089: .if n \ ! 1090: \{\ ! 1091: . nr fi 3n ! 1092: .\} ! 1093: .nr _o \n(.o ! 1094: .if n .po 1i ! 1095: .if \n(.V=1v \ ! 1096: . nr $T 2 ! 1097: .if n .if \n(.T=0 \ ! 1098: . nr $T 1 ! 1099: .if \nv=2 \ ! 1100: \{\ ! 1101: . nr $T 0 ! 1102: . po -0.5i \" make ugly line on LHS on C/A/T typesetters ! 1103: .\} ! 1104: .if \n($T \ ! 1105: \{\ ! 1106: . if \n($T=1 \ ! 1107: . po 0 ! 1108: . ds [ [ ! 1109: . ds ] ] ! 1110: . ds < < ! 1111: . ds > > ! 1112: .\} ! 1113: .nr $b \nb \" figure the real font 8 font ! 1114: .rr b ! 1115: .if \n($b=0 \ ! 1116: \{\ ! 1117: . if n .nr $b 2 \" italic ! 1118: . if t .nr $b 3 \" bold ! 1119: .\} ! 1120: .nr ps 0.5v \" paragraph pre/post spacing ! 1121: .if \n($T \ ! 1122: . nr ps 1v ! 1123: .if t .nr ps 0.35v ! 1124: .nr bs \n(ps \" block pre/post spacing ! 1125: .nr qs \n(ps \" quote pre/post spacing ! 1126: .nr zs 1v \" float-block pre/postspacing ! 1127: .nr xs 0.2v \" index prespacing ! 1128: .nr fs 0.2v \" footnote prespacing ! 1129: .if \n($T \ ! 1130: . nr fs 0 ! 1131: .if n .nr es 1v \" equation pre/postspacing ! 1132: .if t .nr es 0.5v ! 1133: .wh 0 @h \" set header ! 1134: .nr $l \n(.lu \" line length ! 1135: .nr _L \n(.lu \" line length of page ! 1136: .nr $c 1 \" current column number ! 1137: .nr $f 1 1 \" footnote number ! 1138: .ds * \*[1\*]\k*\" \" footnote "name" ! 1139: .nr $d 1 1 \" delayed text number ! 1140: .ds # [1]\k#\" \" delayed text "name" ! 1141: .nr _M 1 \" chapter mode is chapter ! 1142: .ds lq \&"\" \" left quote ! 1143: .ds rq \&"\" \" right quote ! 1144: .if t \ ! 1145: . ds lq `` ! 1146: .if t \ ! 1147: . ds rq '' ! 1148: .em @z ! 1149: .\" *** FOREIGN LETTERS AND SPECIAL CHARACTERS *** ! 1150: .de sc \" *** define special characters ! 1151: .so \\*(||/chars.me ! 1152: .rm sc ! 1153: .. ! 1154: .ll 6.0i ! 1155: .lt 6.0i
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.