![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tmac.an CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [MW Coherent from dump] / coherent / f / usr / lib|
Return to tmac.an CVS log | Up to [MW Coherent from dump] / coherent / f / usr / lib |
1.1 ! root 1: .\" /usr/lib/tmac.an 10/12/83 V1.2 ! 2: .\" COHERENT manual nroff macro package ! 3: .\" Copyright (c) 1981-1990 by Mark Williams Company, Chicago. ! 4: .\" All rights reserved. May not be copied or disclosed without permission. ! 5: .\" New macros added by fwb to support Lexicon files, 4/21/1990. ! 6: .\" ! 7: .\" environment usage: ! 8: .\" 0 input-line-count traps for argument collecting ! 9: .\" 1 input-line-count traps for font macros ! 10: .\" 2 indentation-free diversion processing ! 11: .\" global regs: ! 12: .\" cP current page number ! 13: .\" pD interparagraph distance ! 14: .\" *P pointer to "*" stack ! 15: .\" =P pointer to "=" stack ! 16: .\" global strings: ! 17: .\" tH the header title ! 18: .\" tF the footer title ! 19: .\" stack usage: ! 20: .\" * holds the prevailing indent value for that level ! 21: .\" = holds the increment of indentation taken for that level ! 22: .\" ! 23: . ! 24: . ! 25: .\" ! 26: .\" ! 27: .\" user-called macros ! 28: .\" ! 29: . the header macro ! 30: .de CO ! 31: COHERENT ! 32: .. ! 33: .de TH ! 34: .wh 0 ! 35: .if \\n(nl .bp 0 ! 36: .nr pN 0 1 ! 37: .Rr ! 38: .ds tH "'\fB\\$1\fP'\\$4'\fB\\$1\fP'" ! 39: .ds tF "'COHERENT \\$3 Manual'\\$2'Page \\\\n+(pN'" ! 40: .in 0 ! 41: .he ! 42: .wh 0 he ! 43: .. ! 44: . slug that describes function. Under Lexicon macros, does lots of stuff ! 45: .de PC ! 46: .if \\n(.$ \\$1 ! 47: .. ! 48: .de TL ! 49: .tm tmac.an: there is no such macro `.TL'; please use `.TH' ! 50: .ab ! 51: .. ! 52: . section heading ! 53: .de SH ! 54: .br ! 55: .sp \\n(pDu ! 56: .Rr ! 57: .Pr ! 58: .fi ! 59: .in 0 ! 60: .ne 3 ! 61: .ft B ! 62: .it 1 S- ! 63: .if \\n(.$ .Xa \\n(.$ "*** \\$1 ***" "*** \\$2 ***" "*** \\$3 ***" "\\$4" "\\$5" "\\$6" ! 64: .. ! 65: . subsection heading ! 66: .de SS ! 67: .br ! 68: .sp \\n(pDu ! 69: .Rr ! 70: .Pr ! 71: .fi ! 72: .in 5n ! 73: .ne 3 ! 74: .ft B ! 75: .it 1 S- ! 76: .if \\n(.$ .Xa \\n(.$ "*** \\$1 ***" "*** \\$2 ***" "*** \\$3 ***" "\\$4" "\\$5" "\\$6" ! 77: .. ! 78: . begin paragraph ! 79: .de PP ! 80: .Np ! 81: .nr *\\n(*P 5n ! 82: .nr *\\n+(*P 5n ! 83: .nr =\\n+(=P 0 ! 84: .ns ! 85: .. ! 86: .de DS \" Indented display (sleazy version) ! 87: .LP ! 88: .sp ! 89: .nf ! 90: .ne 5 ! 91: .in +5n ! 92: .. ! 93: .de DE \" End display ! 94: .in -5n ! 95: .ne 0 ! 96: .LP ! 97: .sp ! 98: .. ! 99: .de MS \" Machine-specific start (will take list of machines) ! 100: .. ! 101: .de ME \" Machine-specific end ! 102: .. ! 103: . begin left-justified (block) paragraph ! 104: .de LP ! 105: .Np ! 106: .nr *\\n(*P 5n ! 107: .nr *\\n+(*P 5n ! 108: .nr =\\n+(=P 0 ! 109: .ns ! 110: .. ! 111: . begin hanging paragraph ! 112: .de HP ! 113: .Np ! 114: .nr {c \\n(*\\n(*P ! 115: .if \\n(.$ \{\ ! 116: .nr {c \\$1n ! 117: .nr *\\n(*P \\n({c\} ! 118: .nr *\\n+(*P \\n({c ! 119: .nr =\\n+(=P \\n({c ! 120: .in +\\n({cu ! 121: .ti -\\n({cu ! 122: .ns ! 123: .. ! 124: . begin indented paragraph ! 125: .de IP ! 126: .Np ! 127: .nr {c \\n(*\\n(*P ! 128: .if \\n(.$>1 \{\ ! 129: .nr {c \\$2n ! 130: .nr *\\n(*P \\n({c\} ! 131: .nr *\\n+(*P \\n({c ! 132: .nr =\\n+(=P \\n({c ! 133: .in +\\n({cu ! 134: .ti -\\n({cu ! 135: .if \\n(.$ .ds {a "\\$1 ! 136: .if !\\n(.$ .ds {a ! 137: \&\\*({a ! 138: .if \\n({c-\w'\\*({a'<1m .br ! 139: .if \\n({c-\w'\\*({a'>=1m \h'|\\n(.i'\c ! 140: .ns ! 141: .. ! 142: . display within an indented paragraph ! 143: .de ID ! 144: .sp ! 145: .nf ! 146: .ft L ! 147: .. ! 148: .de IE ! 149: .sp ! 150: .fi ! 151: .ft R ! 152: .. ! 153: . begin tagged paragraph ! 154: .de TP ! 155: .Np ! 156: .nr {c \\n(*\\n(*P ! 157: .if \\n(.$ \{\ ! 158: .nr {c \\$1n ! 159: .nr *\\n(*P \\n({c\} ! 160: .nr *\\n+(*P \\n({c ! 161: .nr =\\n+(=P \\n({c ! 162: .in +\\n({cu ! 163: .ti -\\n({cu ! 164: .ev 2 ! 165: .di {b ! 166: .it 1 T- ! 167: .. ! 168: . begin relative indent ! 169: .de RS ! 170: .nr {c \\n(*\\n(*P ! 171: .if \\n(.$ \{\ ! 172: .nr {c \\$1n ! 173: .nr *\\n(*P \\n({c\} ! 174: .nr *\\n+(*P \\n({c ! 175: .nr *\\n+(*P \\n({c ! 176: .nr {c -\\n(=\\n(=P ! 177: .nr =\\n+(=P \\n({c ! 178: .nr =\\n+(=P 0 ! 179: .in +\\n({cu ! 180: .. ! 181: . end relative indent ! 182: .de RE ! 183: .nr *P -2 1 ! 184: .in -\\n(=\\n(=Pu ! 185: .in -\\n(=\\n-(=Pu ! 186: .nr =P -1 1 ! 187: .. ! 188: . begin help ! 189: .de HS ! 190: .ig HE ! 191: .. ! 192: . end help ! 193: .de HE ! 194: .. ! 195: . bold font ! 196: .de B ! 197: .if \\n(.$>0 \\fB\\$1\\fP ! 198: .if \\n(.$=0 .ft B ! 199: .. ! 200: . bold/italic fonts ! 201: .de BI ! 202: .Af B I \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 203: .. ! 204: . bold/roman fonts ! 205: .de BR ! 206: .Af B R \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 207: .. ! 208: .de R ! 209: .if \\n(.$>0 \\fR\\$1\\fP ! 210: .if \\n(.$=0 .ft R ! 211: .. ! 212: . italic font ! 213: .de I ! 214: .if \\n(.$>0 \\fI\\$1\\fP ! 215: .if \\n(.$=0 .ft I ! 216: .. ! 217: . italic/bold fonts ! 218: .de IB ! 219: .Af I B \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 220: .. ! 221: . italic/roman fonts ! 222: .de IR ! 223: .Af I R \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 224: .. ! 225: . roman/bold fonts ! 226: .de RB ! 227: .Af R B \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 228: .. ! 229: . roman/italic fonts ! 230: .de RI ! 231: .Af R I \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 232: .. ! 233: . set default tabs ! 234: .de DT ! 235: .if \\n(.$ .ta \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 ! 236: .if !\\n(.$ .ta 5 10 15 20 25 30 ! 237: .. ! 238: . set interparagraph distance ! 239: .de PD ! 240: .if \\n(.$ .nr pD \\$1v ! 241: .if !\\n(.$ .nr pD 1v ! 242: .. ! 243: . small letters ! 244: .de SM ! 245: .Xa \\n(.$ "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" ! 246: .. ! 247: .\" ! 248: .\" internal macros ! 249: .\" ! 250: .de II \" Index invisible ! 251: .if \nG=0 .tm %\\$1=\\n# ! 252: .. ! 253: .de S- \" cleanup .SH ! 254: .br ! 255: .ft P ! 256: .in 5n ! 257: .ns ! 258: .. ! 259: .de Np \" new paragraph ! 260: .in -\\n(=\\n(=Pu ! 261: .nr *P -1 1 ! 262: .nr =P -1 1 ! 263: .sp \\n(pDu ! 264: .ne 2 ! 265: .ft R ! 266: .fi ! 267: .. ! 268: .de T- \" cleanup .TP ! 269: .br ! 270: .di ! 271: .ev ! 272: .{b ! 273: .if \\n(*\\n(*P-\\n(dl<1m .br ! 274: .if \\n(*\\n(*P-\\n(dl>=1m \h'|\\n(.i'\c ! 275: .. ! 276: .de Pf \" set previous font ! 277: .br ! 278: .di ! 279: .ev ! 280: .{e ! 281: .. ! 282: .de Af \" alternating fonts ! 283: .if \\$3>1 \f\\$1\\$4\fP\f\\$2\\$5\fP ! 284: .if \\$3>3 \f\\$1\\$6\fP\f\\$2\\$7\fP ! 285: .if \\$3>5 \f\\$1\\$8\fP\f\\$2\\$9\fP ! 286: .. ! 287: .de Xa \" expand arguments ! 288: .if \\$1>0 \&\\$2 ! 289: .if \\$1>1 \&\\$3 ! 290: .if \\$1>2 \&\\$4 ! 291: .if \\$1>3 \&\\$5 ! 292: .if \\$1>4 \&\\$6 ! 293: .if \\$1>5 \&\\$7 ! 294: .. ! 295: .de Rr \" reset regs ! 296: .nr pD 1v ! 297: .nr *P 1 1 ! 298: .af *P a ! 299: .nr =P 1 1 ! 300: .af =P a ! 301: .nr *a 5n ! 302: .nr =a 0 ! 303: .. ! 304: .de Pr \" push top reg on each stack ! 305: .nr {d \\n(*\\n(*P ! 306: .nr *\\n+(*P \\n({d ! 307: .nr {d \\n(=\\n(=P ! 308: .nr =\\n+(=P \\n({d ! 309: .. ! 310: .de he \" the header ! 311: 'sp 2 ! 312: .tl \\*(tH ! 313: 'sp 3 ! 314: .. ! 315: .de fo \" the footer ! 316: 'sp 2 ! 317: .tl \\*(tF ! 318: 'bp ! 319: .. ! 320: .\" ! 321: .\" general initialization ! 322: .\" ! 323: .wh -5 fo ! 324: .ds - -
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.