![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tmac.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [MW Coherent from dump] / coherent / a / usr / lib|
Return to tmac.s CVS log | Up to [MW Coherent from dump] / coherent / a / usr / lib |
1.1 ! root 1: .\" /usr/lib/tmac.s 4/16/91 ! 2: .de It \" Done at initialization ! 3: .po 1i ! 4: .wh 0 Hd ! 5: .nr Ft 0-\\n(FM ! 6: .wh -\\n(FMu Fo ! 7: .wh -\\n(FMu Fx ! 8: .nr Ps \\n(PS ! 9: .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n 70n 75n 80n 85n 90n ! 10: .ds Xx **GOK** ! 11: .if \n(mo=1 .ds Xx January ! 12: .if \n(mo=2 .ds Xx February ! 13: .if \n(mo=3 .ds Xx March ! 14: .if \n(mo=4 .ds Xx April ! 15: .if \n(mo=5 .ds Xx May ! 16: .if \n(mo=6 .ds Xx June ! 17: .if \n(mo=7 .ds Xx July ! 18: .if \n(mo=8 .ds Xx August ! 19: .if \n(mo=9 .ds Xx September ! 20: .if \n(mo=10 .ds Xx October ! 21: .if \n(mo=11 .ds Xx November ! 22: .if \n(mo=12 .ds Xx December ! 23: .ds Ds "\\*(Xx \\n(dy, 19\\n(yr" ! 24: .. ! 25: .de Rt \" Reset everything to normal state ! 26: .ce 0 ! 27: .if \\n(Di \{\ ! 28: .di ! 29: .nr Di 0 ! 30: .nf ! 31: .Tl ! 32: . \} ! 33: .fi ! 34: .ps \\n(Ps ! 35: .vs \\n(VSu ! 36: .ft R ! 37: .if \\n(Il \{\ ! 38: .nr Il 0 ! 39: .in -\\n(Iku ! 40: . \} ! 41: .if \\n(Qn \{\ ! 42: .nr Qn -1 ! 43: .in -\\n(Qdu ! 44: .ll +\\n(Qdu ! 45: . \} ! 46: .. ! 47: .de Hd \" Header trap ! 48: 'nr PN \\n% ! 49: 'sp \\n(HMu/2u-1v ! 50: 'ft R ! 51: 'PT ! 52: 'ft P ! 53: 'sp \\n(HMu/2u ! 54: 'if \\n(Kf \{\ ! 55: 'nr Kf 0 ! 56: 'ev 1 ! 57: 'nf ! 58: 'Kd ! 59: 'rm Kd ! 60: 'ev ! 61: . \} ! 62: .nr Fn 0 \" Clear footnote count ! 63: .ch Fo -\\n(FMu ! 64: .if \\n(Fh .Fv \" And put out overflow ! 65: .. ! 66: .de Fo \" Footer trap ! 67: .nr dn 0 ! 68: .if \\n(Fn \{\ ! 69: .ev 1 ! 70: .nf ! 71: .Fn ! 72: .rm Fn ! 73: .if "\\n(.z"Fe" .di ! 74: .di ! 75: .nr Fn 0 ! 76: .ev ! 77: .if \\n(dn .nr Fh 1 ! 78: . \} ! 79: 'sp \\n(FMu/2u ! 80: 'ft R ! 81: 'BT ! 82: 'ft P ! 83: 'bp ! 84: .. ! 85: .de CD \" Centred display ! 86: .ce 10000 ! 87: .. ! 88: .de LD \" Left display ! 89: .nf ! 90: .. ! 91: .de ID \" Indented display ! 92: .in +.5i ! 93: .nf ! 94: .nr Bi 1 ! 95: .. ! 96: .de BD \" Block centred display ! 97: .nr Bd 1 ! 98: .nf ! 99: .. ! 100: .de PP \" Start new paragraph ! 101: .Rt ! 102: .sp \\n(PDu ! 103: .ne 5 ! 104: .ti \\n(PIu ! 105: .. ! 106: .de LP \" Left paragraph ! 107: .Rt ! 108: .ne 5 ! 109: .sp ! 110: .. ! 111: .de IP ! 112: .LP ! 113: .if \\n(.$>1 .nr Ik \\$2n ! 114: .nr Il 1 ! 115: .in +\\n(Iku ! 116: .ti -\\n(Iku ! 117: \\$1\h'\\n(Iku-\\w`\\$1`u'\\c ! 118: .. ! 119: .de QS \" Start quoted paragraph ! 120: .sp ! 121: .ft R ! 122: .in +\\n(PIu ! 123: .ll -\\n(PIu*2u ! 124: .. ! 125: .de QP \" Quoted paragraph ! 126: .PP ! 127: .nr Qn 1 ! 128: .. ! 129: .de QE \" End quoted paragraph ! 130: .sp ! 131: .ft P ! 132: .in -\\n(PIu ! 133: .ll +\\n(PIu*2u ! 134: .. ! 135: .de RS \" Start relative indent ! 136: .in +\\n(Iku ! 137: .. ! 138: .de RE \" End relative indent ! 139: .in -\\n(Iku ! 140: .. ! 141: . \" Title page and headings ! 142: .de TL \" Main title ! 143: .nr Di 1 \" Diverted ! 144: .di Tl ! 145: .sp ! 146: .ce 1000 ! 147: .ps \\n(PS+2 ! 148: .ft B ! 149: .. ! 150: .de AU \" Author ! 151: .if !\\n(Di .da Tl ! 152: .nr Di 1 ! 153: .sp ! 154: .ce 1000 ! 155: .ps \\n(PS ! 156: .ft R ! 157: .. ! 158: .de AI \" Author's institution ! 159: .if !\\n(Di .da Tl ! 160: .nr Di 1 ! 161: .sp ! 162: .ce 1000 ! 163: .ps \\n(PS ! 164: .ft R ! 165: .. ! 166: .de AB \" Begin abstract ! 167: .if \\n(Di \{\ ! 168: .sp ! 169: .ce 0 ! 170: .ps \\n(PS ! 171: .ft R ! 172: .di ! 173: .nf ! 174: .Tl ! 175: .fi ! 176: .nr Di 0 ! 177: . \} ! 178: .sp ! 179: .ce ! 180: \fIABSTRACT\fP ! 181: .ll -.5i ! 182: .in +.5i ! 183: .. ! 184: .de AE \" End abstract ! 185: .ll +.5i ! 186: .in -.5i ! 187: .sp .5i ! 188: .ce 1000 ! 189: \\*(Ds ! 190: .ce 0 ! 191: .sp .5i ! 192: .sp ! 193: .. ! 194: .de ND \" New (or No) Date ! 195: .ds Ds \\$1 ! 196: .. ! 197: .de DA \" Supply date ! 198: .ds Ds \\$1 ! 199: .. ! 200: .de SH \" Sub-heading ! 201: .Rt ! 202: .sp ! 203: .ft B ! 204: .. ! 205: .de NH \" Numbered section heading ! 206: .Rt ! 207: .sp ! 208: .ft B ! 209: .nr Xx 1 ! 210: .if \\n(.$>0 .nr Xx \\$1 ! 211: .if \\n(Xx<5 .nr @5 0 ! 212: .if \\n(Xx<4 .nr @4 0 ! 213: .if \\n(Xx<3 .nr @3 0 ! 214: .if \\n(Xx<2 .nr @2 0 ! 215: .if \\n(Xx<1 .nr @1 0 ! 216: .if \\n(Xx=0 .nr Xx 1 ! 217: .if \\n(Xx>5 .tm NH level too large ! 218: .nr @\\n(Xx +1 ! 219: .ds Yy \\n(@1 ! 220: .if \\n(Xx=1 .as Yy . ! 221: .if \\n(Xx>1 .as Yy .\\n(@2 ! 222: .if \\n(Xx>2 .as Yy .\\n(@3 ! 223: .if \\n(Xx>3 .as Yy .\\n(@4 ! 224: .if \\n(Xx>4 .as Yy .\\n(@5 ! 225: \\*(Yy ! 226: .. ! 227: .de PT \" Page title ! 228: 'tl '\\*(LT'\\*(CT'\\*(RT' ! 229: .. ! 230: .de BT \" Bottom title ! 231: 'tl '\\*(LF'\\*(CF'\\*(RF' ! 232: .. ! 233: . \" Sizes and fonts ! 234: .de NL \" Normal size ! 235: .if \\n(.$>0 \s\\n(Ps\\$1\s0 ! 236: .if \\n(.$=0 .nr Ps \\n(Ps ! 237: .. ! 238: .de SM \" Smaller size ! 239: .if \\n(.$>0 \s-2\\$1\s0 ! 240: .if \\n(.$=0 .nr Ps \\n(Ps-2 ! 241: .. ! 242: .de LG \" Larger size ! 243: .if \\n(.$>0 \s+2\\$1\s0 ! 244: .if \\n(.$=0 .nr Ps \\n(Ps+2 ! 245: .. ! 246: .de UL \" Underline ! 247: \\$1\l'|0\(ul' ! 248: .. ! 249: .de B \" Bold face font ! 250: .if \\n(.$>0 \\fB\\$1\\fP ! 251: .if \\n(.$=0 .ft B ! 252: .. ! 253: .de I \" Italic font ! 254: .if \\n(.$>0 \\fI\\$1\\fP ! 255: .if \\n(.$=0 .ft I ! 256: .. ! 257: .de R \" Roman font ! 258: .if \\n(.$>0 \\fR\\$1\\fP ! 259: .if \\n(.$=0 .ft R ! 260: .. ! 261: .de BX \" Draw a box ! 262: \(br\|\\$1\|\(br\l'|0\(rn'\l'|0\(ul' ! 263: .. ! 264: .de DS \" Display start ! 265: .if \\n(.$=0 .ds Xx LD ! 266: .if \\n(.$>0 .ds Xx \\$1D ! 267: .KS ! 268: .\\*(Xx ! 269: .. ! 270: .de DE \" Display end ! 271: .ce 0 ! 272: .nr Xx 0u ! 273: .if \\n(Bi \{\ ! 274: .nr Xx -.5i ! 275: .nr Bi 0 ! 276: . \} ! 277: .if \\n(Bd \{\ ! 278: .nr Bd 0 ! 279: .di ! 280: .nr Xx (\\n(.lu-\\n(dlu)/2u ! 281: .in +\\n(Xxu ! 282: .da Kd ! 283: . \} ! 284: .KE ! 285: .in -\\n(Xxu ! 286: .. ! 287: .de KS \" Start keep ! 288: .nr Kf 0 ! 289: .Ks ! 290: .. ! 291: .de KF \" Start floating keep ! 292: .nr Kf 1 ! 293: .Ks ! 294: .. ! 295: .de Ks \" Internal version of KS/KF ! 296: .br ! 297: .ev 1 ! 298: .fi ! 299: .da Kd ! 300: .. ! 301: .de KE \" End keep ! 302: .br ! 303: .di ! 304: .if !\\n(Kf \{\ ! 305: .if \\n(dn>=\\n(.t .bp ! 306: .nf ! 307: .Kd ! 308: .rm Kd ! 309: . \} ! 310: .ev ! 311: .. ! 312: .de TS \" Table start ! 313: .tm No tables yet. ! 314: .. ! 315: .de TE \" Table end ! 316: .. ! 317: .de EQ \" Equation ! 318: .tm No equations yet. ! 319: .. ! 320: . \" Footnotes ! 321: .de FS \" Footnote start ! 322: .da Fn ! 323: .ev 1 ! 324: .ll \\n(FLu ! 325: .if \\n+(Fn=1 .Fs ! 326: .fi ! 327: .. ! 328: .de FE \" Footnote end ! 329: .br ! 330: .nr Fv \\n(.v ! 331: .ev ! 332: .di ! 333: .nr Ft -\\n(dn ! 334: .if \\n(Fn=1 .nr Ft -(\\n(.v-\\n(Fv) ! 335: .ch Fo \\n(Ftu ! 336: .if (\\n(nl+1v)>(\\n(.p+\\n(Ft) .ch Fo \\n(nlu+1v ! 337: .. ! 338: .de Fs \" Put out separator ! 339: \l'1i' ! 340: .br ! 341: .. ! 342: .de Fv \" Catch footnote overflow ! 343: .nr Fv 0 ! 344: .FS ! 345: .nf ! 346: .Fe ! 347: .FE ! 348: .. ! 349: .de Fx \" Divert extra stuff ! 350: .if \\n(Fn .di Fe ! 351: .. ! 352: .de TA \" Set tabs in ens ! 353: .ta \\$1n \\$2n \\$3n \\$4n \\$5n \\$6n \\$7n \\$8n \\$9n ! 354: .. ! 355: .nr PS 10u \" Default pointsize ! 356: .nr VS 12p \" Vertical spacing ! 357: .nr LL 6i \" Line length ! 358: .nr LT 6i \" Length of title ! 359: .nr PD \n(VSu*3/10 \" Paragraph spacing ! 360: .nr PD 1v ! 361: .if \n(PDu<\n(.V .nr PD \n(.V ! 362: .nr PI 5n \" Paragraph indent ! 363: .nr FL 11u*\n(LLu/12u \" Footnote length ! 364: .nr CW 7u*\n(LLu/15u \" Column width ! 365: .nr GW \n(LLu/15u \" Gutter width ! 366: .nr PO 26i/27i \" Page offset ! 367: .nr HM 1i \" Top margin ! 368: .nr FM 1i \" Bottom margin ! 369: .nr Qd \n(PI \" Quoted indent difference ! 370: .nr Ik 5n \" .IP default indent ! 371: .nr Fn 0 1 \" Footnote count ! 372: .ds CF "- \\n(PN -" ! 373: .ds - \(mi ! 374: .ds ' \z\(aa ! 375: .ds ` \z\(ga ! 376: .ds : \z: ! 377: .ds ^ \z^ ! 378: .ds ~ \z~ ! 379: .ds C \z^ ! 380: .ds , \z, ! 381: .It ! 382: .\" end of /usr/lib/tmac.s
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.