Annotation of researchv10no/cmd/troff/ancient.nroff/macros.d/tmac.s, revision 1.1.1.1

1.1       root        1: .lg 0
                      2: .\"    RT -  reset everything to normal state
                      3: .de RT
                      4: .if !\\n(1T .BG
                      5: .ce 0
                      6: .if !\\n(IK .if !\\n(IF .if !\\n(IX .if !\\n(BE .di
                      7: .ul 0
                      8: .if \\n(QP \{\
                      9: .      ll +\\n(QIu
                     10: .      in -\\n(QIu
                     11: .      nr QP -1\}
                     12: .if \\n(NX<=1 .if \\n(AJ=0 .ll \\n(LLu
                     13: .if \\n(IF=0 \{\
                     14: .      ps \\n(PS
                     15: .      if \\n(VS>=41 .vs \\n(VSu
                     16: .      if \\n(VS<=40 .vs \\n(VSp\}
                     17: .if \\n(IP .in \\n(I\\n(IRu
                     18: .if \\n(IP=0 .if \\n(IR=0 \{\
                     19: .nr I1 \\n(PIu
                     20: .nr I2 0
                     21: .nr I3 0
                     22: .nr I4 0
                     23: .nr I5 0
                     24: .nr J0 0
                     25: .nr J1 0
                     26: .nr J2 0
                     27: .nr J3 0
                     28: .nr J4 0
                     29: .nr J5 0\}
                     30: .if \\n(IP .nr IP -1
                     31: .ft 1
                     32: .bd 1
                     33: .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n 70n 75n 80n
                     34: .fi
                     35: ..
                     36: .      \"IZ - initialization
                     37: .de IZ
                     38: .so /usr/lib/tmac/tmac.sdisp
                     39: .nr TN 0
                     40: .em EM
                     41: . \"  ACCENTS  say \*'e or \*`e to get e acute or e grave
                     42: .ds ' \h'\w'e'u*4/10'\z\(aa\h'-\w'e'u*4/10'
                     43: .ds ` \h'\w'e'u*4/10'\z\(ga\h'-\w'e'u*4/10'
                     44: . \"  UMLAUT  \*:u, etc.
                     45: .if t .ds : \\v'-0.6m'\\h'(1u-(\\\\n(.fu%2u))*0.13m+0.06m'\\z.\\h'0.2m'\\z.\\h'-((1u-(\\\\n(.fu%2u))*0.13m+0.26m)'\\v'0.6m'
                     46: .if n .ds : \z"
                     47: . \" TILDE and CIRCUMFLEX
                     48: .ds ^ \\\\k:\\h'-\\\\n(.fu+1u/2u*2u+\\\\n(.fu-1u*0.13m+0.06m'\\z^\\h'|\\\\n:u'
                     49: .ds ~ \\\\k:\\h'-\\\\n(.fu+1u/2u*2u+\\\\n(.fu-1u*0.13m+0.06m'\\z~\\h'|\\\\n:u'
                     50: .      \" czech v symbol
                     51: .ds C \\\\k:\\\\h'+\\\\w'e'u/4u'\\\\v'-0.6m'\\\\s6v\\\\s0\\\\v'0.6m'\\\\h'|\\\\n:u'
                     52: .ds v \\\\k:\\\\h'+\\\\w'e'u/4u'\\\\v'-0.6m'\\\\s6v\\\\s0\\\\v'0.6m'\\\\h'|\\\\n:u'
                     53: .              \" cedilla
                     54: .ds , \\\\k:\\\\h'\\\\w'c'u*0.4u'\\\\z,\\\\h'|\\\\n:u'
                     55: .so /usr/lib/tmac/tmac.srefs
                     56: .if n .ds [. [
                     57: .if t .ds [. \s-2\v'-.4m'\f1
                     58: .if n .ds .] ]
                     59: .if t .ds .] \v'.4m'\s+2\fP
                     60: .if n .ds [o ""
                     61: .if n .ds [c ""
                     62: .if t .ds [o ``
                     63: .if t .ds [c ''
                     64: .ch FO \\n(YYu
                     65: .if \\n(FM=0 .nr FM 1i
                     66: .nr YY -\\n(FMu
                     67: .nr XX 0 1
                     68: .nr IP 0
                     69: .nr PI 5n
                     70: .if t .nr DV .5v
                     71: .if n .nr DV 1v
                     72: .nr QI 5n
                     73: .nr I0 \\n(PIu
                     74: .nr PS 10
                     75: .nr VS 12
                     76: .if !\\n(PD .if n .nr PD 1v
                     77: .if t .if !\\n(PD .nr PD 0.3v
                     78: .nr ML 3v
                     79: .ps \\n(PS
                     80: .if \\n(VS>=41 .vs \\n(VSu
                     81: .if \\n(VS<=40 .vs \\n(VSp
                     82: .nr IR 0
                     83: .nr I0 0
                     84: .nr I1 \\n(PIu
                     85: .nr TB 0
                     86: .nr SJ \\n(.j
                     87: .nr LL 6i
                     88: .ll \\n(LLu
                     89: .nr LT \\n(.l
                     90: .lt \\n(LTu
                     91: .ev 1
                     92: .nr FL \\n(LLu*11u/12u
                     93: .ll \\n(FLu
                     94: .ps 8
                     95: .vs 10p
                     96: .ev
                     97: .if \\*(CH .ds CH "\(hy \\\\n(PN \(hy
                     98: .wh 0 NP
                     99: .wh -\\n(FMu FO
                    100: .ch FO 16i
                    101: .wh -\\n(FMu FX
                    102: .ch FO -\\n(FMu
                    103: .if t .wh -\\n(FMu/2u BT
                    104: .if n .wh -\\n(FMu/2u-1v BT
                    105: .nr CW 0-1
                    106: .nr GW 0-1
                    107: ..
                    108: .de TM
                    109: .if \\n(IM=0 .if \\n(MN=0 .pn 0
                    110: .so /usr/lib/tmac/tmac.scover
                    111: .if \\n(IM=0 .if \\n(MN=0 .rm IM
                    112: .if \\n(IM=0 .if \\n(MN=0 .rm MF
                    113: .if \\n(IM=0 .if \\n(MN=0 .rm MR
                    114: .if n .if \\n(.T=0 .pi /usr/bin/col
                    115: .nr ST 1
                    116: .ds QF MEMORANDUM FOR FILE
                    117: .br
                    118: .ds MN \\$1
                    119: .if !"\\$1"" .nr MM 1
                    120: .if !"\\$2"" .nr MC 1
                    121: .if !"\\$3"" .nr MG 1
                    122: .nr TN 1
                    123: .if \\n(.$-1 .ds CA \\$2
                    124: .if \\n(.$-2 .ds CC \\$3
                    125: .rm RP
                    126: .rm S0
                    127: .rm S2
                    128: .rm AX
                    129: ..
                    130: .              \" IM - internal memorandum
                    131: .de IM
                    132: .nr IM 1
                    133: .TM "\\$1" "\\$2" "\\$3"
                    134: .rm QF
                    135: .RA
                    136: .rm RA
                    137: .rm RP
                    138: .rm MF
                    139: .rm MR
                    140: ..
                    141: .              \" MF - memorandum for file.
                    142: .de MF
                    143: .nr MN 1
                    144: .TM "\\$1" "\\$2" "\\$3"
                    145: .rm MR
                    146: .rm IM
                    147: .RA
                    148: .rm RA
                    149: .rm RP
                    150: .rm TM
                    151: ..
                    152: .              \" MR - memo for record
                    153: .de MR
                    154: .nr MN 2
                    155: .TM "\\$1" "\\$2" "\\$3"
                    156: .ds QF MEMORANDUM FOR RECORD
                    157: .rm MF
                    158: .RA
                    159: .rm RA
                    160: .rm RP
                    161: .rm IM
                    162: .rm TM
                    163: ..
                    164: .de EG
                    165: .nr MN 3
                    166: .TM "\\$1" "\\$2" "\\$3"
                    167: .ds QF ENGINEER'S NOTES
                    168: .rm MF
                    169: .rm RP
                    170: .rm IM
                    171: .RA
                    172: .rm RA
                    173: .rm TM
                    174: ..
                    175: .      \" LT - letter
                    176: .de LT
                    177: .nr PO .6i
                    178: .po 0.6i
                    179: .if n .nr PO 1.1i
                    180: .if n .po 1.1i
                    181: .LP
                    182: .rs
                    183: .if n .sp 1i
                    184: .if t .sp 1.10i
                    185: .ll 8i
                    186: .if n .in 4.55i
                    187: .if t .in 4.85i
                    188: .if "\\$1"X" \{.br
                    189: .in 3.5i
                    190: Bell Laboratories
                    191: .br
                    192: 600 Mountain Avenue
                    193: .br
                    194: Murray Hill, NJ 07974
                    195: .ds pn 3000
                    196: .sy whois `who am i | awk '{print $1}' ` | sed 's/.*\([0-9][0-9][0-9][0-9]\)[^0-9]*$/.ds pn \1/' >/tmp/tplk1
                    197: .br
                    198: .di qq
                    199: .so /tmp/tplk1
                    200: .br
                    201: .di
                    202: .rm qq \" toss output just in case not .ds
                    203: .sy rm /tmp/tplk1
                    204: .br
                    205: 201-582-\\*(pn
                    206: .sp
                    207: .br\}
                    208: \\*(DY
                    209: .ll
                    210: .in 0
                    211: .br
                    212: .if t .sp 3
                    213: .if n .sp
                    214: .nf
                    215: .if n .na
                    216: .rm CF
                    217: ..
                    218: .de OK
                    219: .br
                    220: .di
                    221: .di OD
                    222: ..
                    223: .de RP
                    224: .nr ST 2
                    225: .pn 0
                    226: .rm SG
                    227: .rm CS
                    228: .rm TM
                    229: .rm QF
                    230: .rm IM
                    231: .rm MR
                    232: .rm MF
                    233: .rm EG
                    234: .br
                    235: ..
                    236: .de TR \" Comp. Sci. Tech Rept series.
                    237: .nr ST 3
                    238: .pn 0
                    239: .ds MN \\$1
                    240: .rm SG
                    241: .rm CS
                    242: .rm TM
                    243: .rm QF
                    244: .rm IM
                    245: .rm MR
                    246: .rm MF
                    247: .rm EG
                    248: .br
                    249: ..
                    250: .      \"TL - title and initialization
                    251: .de TL
                    252: .br
                    253: .nr TV 1
                    254: .if \\n(IM>0 .rm CS
                    255: .if \\n(MN>0 .rm CS
                    256: .ME
                    257: .rm ME
                    258: .di WT
                    259: .na
                    260: .fi
                    261: .ll 5.0i
                    262: .if n .if \\n(TN .ll 29
                    263: .if t .if \\n(TN .ll 3.5i
                    264: .ft 3
                    265: .ps \\n(PS
                    266: .if !\\n(TN .ps +2
                    267: .if !\\n(TN .vs \\n(.s+2
                    268: .if !\\n(TN .rm CS
                    269: .hy 0
                    270: ..
                    271: .de TX
                    272: .rs
                    273: .sp .5i
                    274: .ce 1000
                    275: .if n .ul 1000
                    276: .ps 12
                    277: .ft 3
                    278: .vs 15p
                    279: .ne 4
                    280: .hy 0
                    281: .WT
                    282: .hy 14
                    283: .ce 0
                    284: .ul 0
                    285: ..
                    286: .      \"      AU - author(s)
                    287: .de AU
                    288: .nr AV 1
                    289: .ad \\n(SJ
                    290: .br
                    291: .di
                    292: .br
                    293: .nf
                    294: .nr NA +1
                    295: .ds R\\n(NA \\$1
                    296: .ds E\\n(NA \\$2
                    297: .di A\\n(NA
                    298: .ll \\n(LLu
                    299: .if t .if \\n(TN=0 .ft 2
                    300: .if \\n(TN=0 .if n .ft 1
                    301: .if \\n(TN>0 .ft 3
                    302: .if \\n(TN .if n .ll 16
                    303: .if t .if \\n(TN .ll 1.4i
                    304: .ps 10
                    305: ..
                    306: .de AX
                    307: .ft 1
                    308: .rs
                    309: .ce 1000
                    310: .if n .ul 0
                    311: .ps 10
                    312: .vs 12p
                    313: .if n .sp 2
                    314: .if t .sp
                    315: .A1
                    316: .if n .sp 
                    317: .if t .sp 0.5
                    318: .ns
                    319: .I1
                    320: .if \\n(NA-1 .if n .sp 2
                    321: .if t .if \\n(NA-1 .sp
                    322: .A2
                    323: .if \\n(NA-1 .if n .sp
                    324: .if t .if \\n(NA-1 .sp 0.5
                    325: .ns
                    326: .I2
                    327: .if t .if \\n(NA-2 .sp
                    328: .if \\n(NA-2 .if n .sp 2
                    329: .A3
                    330: .if t .if \\n(NA-2 .sp 0.5
                    331: .if \\n(NA-2 .if n .sp
                    332: .ns
                    333: .I3
                    334: .if t .if \\n(NA-3 .sp
                    335: .if \\n(NA-3 .if n .sp 2
                    336: .A4
                    337: .if t .if \\n(NA-3 .sp 0.5
                    338: .if \\n(NA-3 .if n .sp
                    339: .ns
                    340: .I4
                    341: .if t .if \\n(NA-4 .sp
                    342: .if \\n(NA-4 .if n .sp 2
                    343: .A5
                    344: .if \\n(NA-4 .if n .sp
                    345: .if t .if \\n(NA-4 .sp 0.5
                    346: .ns
                    347: .I5
                    348: .if t .if \\n(NA-5 .sp
                    349: .if \\n(NA-5 .if n .sp 2
                    350: .A6
                    351: .if \\n(NA-5 .if n .sp
                    352: .if t .if \\n(NA-5 .sp 0.5
                    353: .ns
                    354: .I6
                    355: .if t .if \\n(NA-6 .sp
                    356: .if \\n(NA-6 .if n .sp 2
                    357: .A7
                    358: .if \\n(NA-6 .if n .sp
                    359: .if t .if \\n(NA-6 .sp 0.5
                    360: .ns
                    361: .I7
                    362: .if t .if \\n(NA-7 .sp
                    363: .if \\n(NA-7 .if n .sp 2
                    364: .A8
                    365: .if \\n(NA-7 .if n .sp
                    366: .if t .if \\n(NA-7 .sp 0.5
                    367: .ns
                    368: .I8
                    369: .if t .if \\n(NA-8 .sp
                    370: .if \\n(NA-8 .if n .sp 2
                    371: .A9
                    372: .if \\n(NA-8 .if n .sp
                    373: .if t .if \\n(NA-8 .sp 0.5
                    374: .ns
                    375: .I9
                    376: ..
                    377: .      \"AI - authors institution
                    378: .de AI
                    379: .br
                    380: .ft 1
                    381: .di
                    382: .di I\\n(NA
                    383: .nf
                    384: ..
                    385: .      \"AB - begin an abstract
                    386: .de AB
                    387: .br
                    388: .di
                    389: .ul 0
                    390: .ce 0
                    391: .nr 1T 1
                    392: .nr IK 1
                    393: .nr KI 1
                    394: .di WB
                    395: .rs
                    396: .nr AJ 1
                    397: .ce 1
                    398: .ft 2
                    399: .if n .ul
                    400: .ll \\n(LLu
                    401: .if \\n(.$=0 ABSTRACT
                    402: .if \\n(.$>0 .if !"\\$1"-" .if !"\\$1"no"  \\$1
                    403: .if \\n(.$=0 .sp
                    404: .if \\n(.$>0 .if !"\\$1"-" .if !"\\$1"no" .sp
                    405: .hy 14
                    406: .ul 0
                    407: .ce 0
                    408: .fi
                    409: .ft 1
                    410: .nr OJ \\n(.i
                    411: .in +\\n(.lu/12u
                    412: .ll -\\n(.lu/12u
                    413: .br
                    414: .ps \\n(PS
                    415: .if \\n(VS>=41 .vs \\n(VSu
                    416: .if \\n(VS<=40 .vs \\n(VSp
                    417: .ti +\\n(PIu
                    418: ..
                    419: .      \"AE - end of an abstract
                    420: .de AE
                    421: .br
                    422: .di
                    423: .ll \\n(LLu
                    424: .ps \\n(PS
                    425: .if \\n(VS>=41 .vs \\n(VSu
                    426: .if \\n(VS<=40 .vs \\n(VSp
                    427: .nr 1T 0
                    428: .nr IK 0
                    429: .in \\n(OJu
                    430: .nr AJ 0
                    431: .di
                    432: .ce 0
                    433: .if \\n(ST=2 .SY
                    434: .if \\n(ST<3 .rm SY
                    435: ..
                    436: .      \"S2 - release paper style
                    437: .      \"SY - cover sheet of released paper
                    438: .de SY
                    439: .ll \\n(LLu
                    440: .ns
                    441: .if \\n(TV .TX
                    442: .if \\n(AV .AX
                    443: .rs
                    444: .ce 0
                    445: .nf
                    446: .sp 3
                    447: .ls 1
                    448: .pn 2
                    449: .WB
                    450: .ls 
                    451: .sp 3v
                    452: \\*(DY
                    453: .sp |9i
                    454: .if \\n(FP>0 .FA
                    455: .FG
                    456: .if \\n(GA=1 .nr GA 2
                    457: .fi
                    458: ..
                    459: .      \"S2 - first text page, released paper format
                    460: .de S2
                    461: .ce 0
                    462: .br
                    463: .SY
                    464: .rm SY
                    465: .bp 1
                    466: .if \\n(TV .TX
                    467: .if \\n(AV .AX
                    468: .rs
                    469: .ce 0
                    470: .ft 1
                    471: .ad \\n(SJ
                    472: ..
                    473: .      \"S0- mike lesk conserve paper style
                    474: .de S0
                    475: .ce 0
                    476: .br
                    477: .ll \\n(LLu
                    478: .if \\n(TV+\\n(AV>0 .ns
                    479: .if \\n(TV .TX
                    480: .if \\n(AV .AX
                    481: .if \\n(TV+\\n(AV>0 .rs
                    482: .ce 0
                    483: .if \\n(TV>0 .sp 2
                    484: .ls 1
                    485: .if \\n(FP>0 \{\
                    486: .      FJ
                    487: .      nf
                    488: .      FG
                    489: .      fi
                    490: .      FK
                    491: .      nr FP 0\}
                    492: .nf
                    493: .WB
                    494: .ls
                    495: .fi
                    496: .ad \\n(SJ
                    497: ..
                    498: .      \"S3 - CSTR style
                    499: .de S3
                    500: .rs
                    501: .sp |2.25i
                    502: .ce 1000
                    503: .I1
                    504: .if \\n(NA>1 .sp .5
                    505: .if \\n(NA>1 .I2
                    506: .if \\n(NA>2 .sp .5
                    507: .if \\n(NA>2 .I3
                    508: .if \\n(NA>3 .sp .5
                    509: .if \\n(NA>3 .I4
                    510: .if \\n(NA>4 .sp .5
                    511: .if \\n(NA>4 .I5
                    512: .if \\n(NA>5 .sp .5
                    513: .if \\n(NA>5 .I6
                    514: .if \\n(NA>6 .sp .5
                    515: .if \\n(NA>6 .I7
                    516: .if \\n(NA>7 .sp .5
                    517: .if \\n(NA>7 .I8
                    518: .if \\n(NA>8 .sp .5
                    519: .if \\n(NA>8 .I9
                    520: .sp |4i
                    521: .      \"check how long title is: can space extra .25 inch if short
                    522: .di EZ
                    523: .WT
                    524: .di
                    525: .if \\n(dn<1.5v .if \\n(NA=1 .sp .25i
                    526: .ft 1
                    527: Computing Science Technical Report No. \\*(MN
                    528: .sp
                    529: .if t .ft 3
                    530: .if n .ul 100
                    531: .ps 12
                    532: .vs 15p
                    533: .hy 0
                    534: .WT
                    535: .hy 14
                    536: .ft 1
                    537: .if n .ul 0
                    538: .ps 10
                    539: .vs 12p
                    540: .sp
                    541: .ft 1
                    542: .A1
                    543: .A2
                    544: .A3
                    545: .A4
                    546: .A5
                    547: .A6
                    548: .A7
                    549: .A8
                    550: .A9
                    551: .ce 0
                    552: .sp |8.5i
                    553: .ce 0
                    554: \\*(DY
                    555: .DZ
                    556: .bp 0
                    557: .ft 1
                    558: .S2
                    559: ..
                    560: .      \"SG - signature
                    561: .de SG
                    562: .br
                    563: .KS
                    564: .in +2u*\\n(.lu/3u
                    565: .sp 4
                    566: .A1
                    567: .if \\n(NA-1 .sp 4
                    568: .A2
                    569: .if \\n(NA-2 .sp 4
                    570: .A3
                    571: .if \\n(NA-3 .sp 4
                    572: .A4
                    573: .if \\n(NA-4 .sp 4
                    574: .A5
                    575: .if \\n(NA>5 .sp 4
                    576: .A6
                    577: .if \\n(NA>6 .sp 4
                    578: .A7
                    579: .if \\n(NA>7 .sp 4
                    580: .A8
                    581: .if \\n(NA>8 .sp 4
                    582: .A9
                    583: .in
                    584: .nf
                    585: .sp -1
                    586: .if \\n(.$>=1 \\$1
                    587: .if \\n(.$>=2 \\$2
                    588: .if \\n(.$>=3 \\$3
                    589: .if \\n(.$>=4 \\$4
                    590: .if \\n(.$>=5 \\$5
                    591: .if \\n(.$>=6 \\$6
                    592: .if \\n(.$>=7 \\$7
                    593: .if \\n(.$>=8 \\$8
                    594: .if \\n(.$>=9 \\$9
                    595: .fi
                    596: .br
                    597: .KE
                    598: ..
                    599: .      \"Tables.  TS - table start, TE - table end
                    600: .de TS
                    601: .br
                    602: .if !\\n(1T .RT
                    603: .ul 0
                    604: .ti \\n(.iu
                    605: .if t .sp 0.5
                    606: .if n .sp
                    607: .if \\$1H .TQ
                    608: .nr IX 1
                    609: ..
                    610: .de TQ
                    611: .di TT
                    612: .nr IT 1
                    613: ..
                    614: .de TH
                    615: .if \\n(.d>0.5v .nr T. 0
                    616: .if \\n(.d>0.5v .T# 0
                    617: .di
                    618: .nr TQ \\n(.i
                    619: .nr HT 1
                    620: .in 0
                    621: .mk #a
                    622: .mk #b
                    623: .mk #c
                    624: .mk #d
                    625: .mk #e
                    626: .mk #f
                    627: .TT
                    628: .in \\n(TQu
                    629: .mk #T
                    630: ..
                    631: .de TE
                    632: .nr IX 0
                    633: .if \\n(IT>0 .if \\n(HT=0 .di
                    634: .if \\n(IT>0 .if \\n(HT=0 .nr EF \\n(.u
                    635: .if \\n(IT>0 .if \\n(HT=0 .nf
                    636: .if \\n(IT>0 .if \\n(HT=0 .TT
                    637: .if \\n(IT>0 .if \\n(HT=0 .if \\n(EF>0 .fi
                    638: .nr IT 0
                    639: .nr HT 0
                    640: .if n .sp 1
                    641: .if t .sp 0.5
                    642: .rm a+ b+ c+ d+ e+ f+ g+ h+ i+ j+ k+ l+ n+ m+
                    643: .rr 32 33 34 35 36 37 38 40 79 80 81 82
                    644: .rr a| b| c| d| e| f| g| h| i| j| k| l| m|
                    645: .rr a- b- c- d- e- f- g- h- i- j- k- l- m-
                    646: ..
                    647: .so /usr/lib/tmac/tmac.skeep
                    648: .de EQ  \"equation, breakout and display
                    649: .nr EF \\n(.u
                    650: .rm EE
                    651: .nr LE 1       \" 1 is center
                    652: .ds EL \\$1
                    653: .if "\\$1"L" .ds EL \\$2
                    654: .if "\\$1"L" .nr LE 0
                    655: .if "\\$1"C" .ds EL \\$2
                    656: .if "\\$1"R" .ds EL \\$2
                    657: .if "\\$1"R" .nr LE 2 \" 2 is right adjust
                    658: .if "\\$1"I" .nr LE 0
                    659: .if "\\$1"I" .ds EE \\h'|10n'
                    660: .if "\\$1"I" .if !"\\$3"" .ds EE \\h'\\$3'
                    661: .if "\\$1"I" .ds EL \\$2
                    662: .if \\n(YE>0 .nf
                    663: .di EZ
                    664: ..
                    665: .de EN  \" end of a displayed equation
                    666: .br
                    667: .di
                    668: .rm EZ
                    669: .nr ZN \\n(dn
                    670: .if \\n(ZN>0 .if \\n(YE=0 .LP
                    671: .if \\n(ZN=0 .if !"\\*(EL"" .nr ZN 1
                    672: .if t .if "\\n(.z"" .if \\n(ZN>0 .if !\\n(nl=\\n(PE .sp .5
                    673: .if "\\n(.z"" .if \\n(ZN>0 .if !\\n(nl=\\n(PE .if n .sp 1
                    674: .if t .if !"\\n(.z"" .if \\n(ZN>0 .if !\\n(.d=\\n(PE .sp .5
                    675: .if !"\\n(.z"" .if \\n(ZN>0 .if !\\n(.d=\\n(PE .if n .sp 1
                    676: 'pc
                    677: .if \\n(BD>0 .nr LE 0 \" can't mean centering in this case.
                    678: .if \\n(MK>0 .if \\n(LE=1 .ds EE \\h'|10n'
                    679: .if \\n(MK>0 .nr LE 0 \" don't center if mark/lineup
                    680: 'lt \\n(.lu
                    681: .if \\n(EP=0 .if \\n(ZN>0 .if \\n(LE=1 .tl \(ts\(ts\\*(10\(ts\\*(EL\(ts
                    682: .if \\n(EP=0 .if \\n(ZN>0 .if \\n(LE=2 .tl \(ts\(ts\(ts\\*(10\\*(EL\(ts
                    683: .if \\n(EP=0 .if \\n(ZN>0 .if \\n(LE=0 .if \\n(BD=0 .tl \(ts\\*(EE\\*(10\(ts\(ts\\*(EL\(ts
                    684: .if \\n(EP=0 .if \\n(ZN>0 .if \\n(LE=0 .if \\n(BD>0 .if \\n(BD<\\w\(ts\\*(10\(ts .nr BD \\w\(ts\\*(10\(ts
                    685: .if \\n(EP=0 .if \\n(ZN>0 .if \\n(LE=0 .if \\n(BD>0 \!\\*(10\\t\\*(EL
                    686: .if \\n(EP>0 .if \\n(ZN>0 .if \\n(LE=1 .tl \(ts\\*(EL\(ts\\*(10\(ts\(ts
                    687: .if \\n(EP>0 .if \\n(ZN>0 .if \\n(LE=2 .tl \(ts\\*(EL\(ts\(ts\\*(10\(ts
                    688: .if \\n(EP>0 .if \\n(ZN>0 .if \\n(LE=0 .if \\n(BD=0 .tl \(ts\\*(EL\\*(EE\\*(10\(ts\(ts\(ts
                    689: .if \\n(EP>0 .if \\n(ZN>0 .if \\n(LE=0 .if \\n(BD>0 .if \\n(BD<\\w\(ts\\*(10\(ts .nr BD \\w\(ts\\*(10\(ts
                    690: .if \\n(EP>0 .if \\n(ZN>0 .if \\n(LE=0 .if \\n(BD>0 \!\\h'-\\\\n(.iu'\\*(EL\\h'|0'\\*(10
                    691: .\".di EZ \" GCOS patch
                    692: .\"\\*(10 \" GCOS patch
                    693: .\".br \" GCOS patch
                    694: .\".di \" GCOS patch
                    695: .\".rm EZ \" GCOS patch
                    696: 'lt \\n(LLu
                    697: 'pc %
                    698: .if \\n(YE>0 .if \\n(EF>0 .fi
                    699: .rm EL 10 11 12 13 14 15 16 17 18 19 20 21 22 23
                    700: .rr 10 11 12 13 14 15 16 17 18 19 20 21 22 23
                    701: .if t .if \\n(ZN>0 .sp .5
                    702: .if \\n(ZN>0 .if n .sp
                    703: .if "\\n(.z"" .nr PE \\n(nl
                    704: .if !"\\n(.z"" .nr PE \\n(.d
                    705: ..
                    706: .de PS \" start picture (bwk)
                    707: .      \" $1 is height, $2 is width in units
                    708: .if t .sp .3
                    709: .in (\\n(.lu-\\$2u)/2u
                    710: .ne \\$1u
                    711: ..
                    712: .de PE \" end of picture
                    713: .in
                    714: .if t .sp .6
                    715: ..
                    716: .de ME
                    717: .nr SJ \\n(.j
                    718: .if \\n(LL>0 .nr LT \\n(LL
                    719: .nr YE 1
                    720: .if \\n(PO=0 .nr PO \\n(.o
                    721: .if \\n(mo-0 .ds MO January
                    722: .if \\n(mo-1 .ds MO February
                    723: .if \\n(mo-2 .ds MO March
                    724: .if \\n(mo-3 .ds MO April
                    725: .if \\n(mo-4 .ds MO May
                    726: .if \\n(mo-5 .ds MO June
                    727: .if \\n(mo-6 .ds MO July
                    728: .if \\n(mo-7 .ds MO August
                    729: .if \\n(mo-8 .ds MO September
                    730: .if \\n(mo-9 .ds MO October
                    731: .if \\n(mo-10 .ds MO November
                    732: .if \\n(mo-11 .ds MO December
                    733: .if \\n(dw-0 .ds DW Sunday
                    734: .if \\n(dw-1 .ds DW Monday
                    735: .if \\n(dw-2 .ds DW Tuesday
                    736: .if \\n(dw-3 .ds DW Wednesday
                    737: .if \\n(dw-4 .ds DW Thursday
                    738: .if \\n(dw-5 .ds DW Friday
                    739: .if \\n(dw-6 .ds DW Saturday
                    740: .if "\\*(DY"" .ds DY \\*(MO \\n(dy, 19\\n(yr
                    741: .if "\\*(CF"" .if n .ds CF "\\*(DY
                    742: ..
                    743: .      \"EM end up macro - process left over keep-release
                    744: .de EM
                    745: .br
                    746: .if \\n(AJ>0 .tm Syntax error: no .AE
                    747: .if t .if \\n(TB=0 .wh -1p CM
                    748: .if \\n(TB \&\c
                    749: .if \\n(TB 'bp
                    750: .if \\n(TB .NP
                    751: .if \\n(TB .ch CM 160
                    752: ..
                    753: .      \"NP new page
                    754: .de NP
                    755: .if \\n(FM+\\n(HM>=\\n(.p .tm Margins bigger than page length.
                    756: .if \\n(FM+\\n(HM>=\\n(.p .ab
                    757: .if \\n(FM+\\n(HM>=\\n(.p .ex
                    758: .if t .CM
                    759: .if \\n(HM=0 .nr HM 1i
                    760: 'sp \\n(HMu/2u
                    761: .ev 1
                    762: .nr PX \\n(.s
                    763: .nr PF \\n(.f
                    764: .nr PV \\n(.v
                    765: .lt \\n(LTu
                    766: .ps \\n(PS
                    767: .vs \\n(PS+2
                    768: .ft 1
                    769: .if \\n(PO>0 .po \\n(POu
                    770: .PT
                    771: .ps \\n(PX
                    772: .vs \\n(PVu
                    773: .ft \\n(PF
                    774: .ev
                    775: 'sp |\\n(HMu
                    776: .nr XX 0 1
                    777: .nr YY 0-\\n(FMu
                    778: .ch FO 16i
                    779: .ch FX 17i
                    780: .ch FO \\n(.pu-\\n(FMu
                    781: .ch FX \\n(.pu-\\n(FMu
                    782: .if \\n(MF .FV
                    783: .nr MF 0
                    784: .mk
                    785: .os
                    786: .ev 1
                    787: .if \\n(TD=0 .if \\n(TC<5  .XK
                    788: .nr TC 0
                    789: .ns
                    790: .ev
                    791: .nr TQ \\n(.i
                    792: .nr TK \\n(.u
                    793: .if \\n(IT>0 \{\
                    794: .      in 0
                    795: .      nf
                    796: .      TT
                    797: .      in \\n(TQu
                    798: .      if \\n(TK .fi\
                    799: \}
                    800: .mk #T
                    801: ....if t .if \\n(.o+\\n(LL>7.75i .tm Offset + line length exceeds 7.75 inches, too wide
                    802: ..
                    803: .de XK
                    804: .nr TD 1
                    805: .nf
                    806: .ls 1
                    807: .in 0
                    808: .rn KJ KL
                    809: .KL
                    810: .rm KL
                    811: .if "\\n(.z"KJ" .di
                    812: .nr TB 0
                    813: .if "\\n(.z"KJ" .nr TB 1
                    814: .br
                    815: .in
                    816: .ls
                    817: .fi
                    818: .if (\\n(nl+1v)>(\\n(.p-\\n(FM) .if \\n(NX>1 .RC
                    819: .if (\\n(nl+1v)>(\\n(.p-\\n(FM) .if \\n(NX<1 .bp
                    820: .nr TD 0
                    821: ..
                    822: .de KD
                    823: .nr KM 0
                    824: .if "\\n(.z"" .if \\$2>0 .if \\n(nl>\\n(HM .if (\\n(nl+1v)<(\\n(.p-\\n(FM) .di KJ
                    825: .if "\\n(.z"" .if \\n(nl>\\n(HM .if \\$2>0 .sp 15i \" full page figure must have new page
                    826: .if "\\n(.z"" .if \\n(nl>\\n(HM .if \\$2=0 .if (\\n(nl+1v)>(\\n(.p-\\n(FM) .sp 15i
                    827: .if "\\n(.z"KJ" .nr KM 1 \" KM is 1 if in a rediversion of keeps
                    828: .if \\n(KM>0 \!.KD \\$1 \\$2
                    829: .nr KR \\n(.t
                    830: .if \\n(nl<=\\n(HM .nr KR 32767
                    831: .if \\n(KM=0 .if \\n(KR<\\$1 .di KJ
                    832: .if \\n(KM=0 .if \\n(KR<\\$1 .nr KM 1
                    833: .if \\n(KM=0 .if \\$2>0 .if (\\n(nl+1v)>(\\n(.p-\\n(FM) .sp 15i
                    834: .rs
                    835: .if \\n(KM=0 .if \\$2>0 .sp \\n(.tu-\\$1u
                    836: ..
                    837: .de PT
                    838: .lt \\n(LLu
                    839: .pc %
                    840: .nr PN \\n%
                    841: .if \\n%-1 .tl '\\*(LH'\\*(CH'\\*(RH'
                    842: .lt \\n(.lu
                    843: ..
                    844: .      \"FO - footer of page
                    845: .de FO
                    846: .rn FO FZ
                    847: .if \\n(K1>0 .tm This memo has a multi-page cover sheet.  You are
                    848: .if \\n(K1>0 .tm rebuked in the name of the Committee on Technical Memoranda.
                    849: .if \\n(IT>0 .nr T. 1
                    850: .if \\n(IT>0 .if \\n(FC=0  .T# 1
                    851: .if \\n(IT>0 .br
                    852: .nr FC +1
                    853: .if \\n(NX<2 .nr WF 0
                    854: .nr dn 0
                    855: .if \\n(FC<=1 .if \\n(XX .XF
                    856: .rn FZ FO
                    857: .nr MF 0
                    858: .if \\n(dn  .nr MF 1
                    859: .if !\\n(WF .nr YY 0-\\n(FMu
                    860: .if !\\n(WF .ch FO \\n(YYu
                    861: .if !\\n(dn .nr WF 0
                    862: .if \\n(FC<=1 .if \\n(XX=0  .if \\n(NX>1 .RC
                    863: .if \\n(FC<=1 .if \\n(XX=0  .if \\n(NX<1 'bp
                    864: .nr FC -1
                    865: .if \\n(ML>0 .ne \\n(MLu
                    866: ..
                    867: .      \"2C - begin double column
                    868: .de 2C
                    869: .MC \" default MC is double column
                    870: ..
                    871: .de MC \" multiple columns- arg is line length
                    872: .nr L1 \\n(LL*7/15
                    873: .if \\n(CW>=0 .nr L1 \\n(CWu
                    874: .if \\n(.$>0 .nr L1 \\$1n
                    875: .if \\n(GW>=0 .nr GW \\n(GWu
                    876: .if \\n(.$>1 .nr GW \\$1n
                    877: .nr NQ \\n(LL/\\n(L1
                    878: .if \\n(NQ<1 .nr NQ 1
                    879: .if \\n(NQ>2 .if (\\n(LL%\\n(L1)=0 .nr NQ -1
                    880: .if \\n(1T=0 \{\
                    881: .      BG
                    882: .      if n .sp 4
                    883: .      if t .sp 2\}
                    884: .if \\n(NX=0 .nr NX 1
                    885: .if !\\n(NX=\\n(NQ \{\
                    886: .      RT
                    887: .      if \\n(NX>1 .bp
                    888: .      mk
                    889: .      nr NC 1
                    890: .      po \\n(POu\}
                    891: .if \\n(NQ>1 .hy 14
                    892: .nr NX \\n(NQ
                    893: .if \\n(NX>1 .nr CW \\n(L1
                    894: .ll \\n(L1u
                    895: .nr FL \\n(L1u*11u/12u
                    896: .if \\n(NX>1 .if \\n(GW<0 .nr GW (\\n(LL-(\\n(NX*\\n(L1))/(\\n(NX-1)
                    897: .nr RO \\n(L1+\\n(GW
                    898: .ns
                    899: ..
                    900: .de RC
                    901: .ie \\n(NC>=\\n(NX .C2
                    902: .el .C1
                    903: ..
                    904: .de C1
                    905: .rt
                    906: .po +\\n(ROu
                    907: .nr NC +1
                    908: .if \\n(NC>\\n(NX .nr NC 1
                    909: .nr XX 0 1
                    910: .nr YY 0-\\n(FMu
                    911: .if \\n(MF .FV
                    912: .ch FX \\n(.pu-\\n(FMu
                    913: .ev 1
                    914: .if \\n(TB .XK
                    915: .nr TC 0
                    916: .ev
                    917: .nr TQ \\n(.i
                    918: .if \\n(IT>0 .in 0
                    919: .if \\n(IT>0 .TT
                    920: .if \\n(IT>0 .in \\n(TQu
                    921: .mk #T
                    922: .ns
                    923: ..
                    924: .de C2
                    925: .po \\n(POu
                    926: .nr NC +1
                    927: .if \\n(NC>\\n(NX .nr NC 1
                    928: 'bp
                    929: ..
                    930: .      \"1C - return to single column format
                    931: .de 1C
                    932: .MC \\n(LLu
                    933: .hy 14
                    934: ..
                    935: .      \".de R3
                    936: .      \".pl 102
                    937: .      \".nr LT \\n(.l
                    938: .      \"..
                    939: .de MH
                    940: Bell Laboratories
                    941: Murray Hill, New Jersey 07974
                    942: ..
                    943: .de PY
                    944: Bell Laboratories
                    945: Piscataway, New Jersey 08854
                    946: ..
                    947: .de BT
                    948: .nr PX \\n(.s
                    949: .nr PF \\n(.f
                    950: .ft 1
                    951: .ps \\n(PS
                    952: 'lt \\n(LTu
                    953: .po \\n(POu
                    954: .if \\n%>0 .tl \(ts\\*(LF\(ts\\*(CF\(ts\\*(RF\(ts
                    955: .ft \\n(PF
                    956: .ps \\n(PX
                    957: ..
                    958: .      \"PP - paragraph
                    959: .de PP
                    960: .RT
                    961: .if \\n(1T .sp \\n(PDu
                    962: .ti +\\n(PIu
                    963: ..
                    964: .      \"SH - (unnumbered) section heading
                    965: .de SH
                    966: .ti \\n(.iu
                    967: .RT
                    968: .if \\n(1T .sp 1
                    969: .if !\\n(1T .BG
                    970: .RT
                    971: .ne 4
                    972: .ft 3
                    973: .if n .ul 1000
                    974: ..
                    975: .      \"NH - numbered heading
                    976: .de NH
                    977: .RT
                    978: .if \\n(1T .sp 1
                    979: .if !\\n(1T .BG
                    980: .RT
                    981: .ne 4
                    982: .ft 3
                    983: .if n .ul 1000
                    984: .nr NS \\$1
                    985: .if !\\n(.$ .nr NS 1
                    986: .if !\\n(NS .nr NS 1
                    987: .nr H\\n(NS +1
                    988: .if !\\n(NS-4 .nr H5 0
                    989: .if !\\n(NS-3 .nr H4 0
                    990: .if !\\n(NS-2 .nr H3 0
                    991: .if !\\n(NS-1 .nr H2 0
                    992: .if !\\$1 .if \\n(.$ .nr H1 1
                    993: .ds SN \\n(H1.
                    994: .ti \\n(.iu
                    995: .if \\n(NS-1 .as SN \\n(H2.
                    996: .if \\n(NS-2 .as SN \\n(H3.
                    997: .if \\n(NS-3 .as SN \\n(H4.
                    998: .if \\n(NS-4 .as SN \\n(H5.
                    999: \\*(SN
                   1000: ..
                   1001: .      \"BG - begin, execute at first PP
                   1002: .de BG
                   1003: .br
                   1004: .ME
                   1005: .rm ME
                   1006: .di
                   1007: .ce 0
                   1008: .nr KI 0
                   1009: .hy 14
                   1010: .nr 1T 1
                   1011: .S\\n(ST
                   1012: .rm S0
                   1013: .rm S1
                   1014: .rm S2
                   1015: .rm S3
                   1016: .rm OD
                   1017: .rm OK
                   1018: .rm TX
                   1019: .rm AX
                   1020: .rm WT
                   1021: .rm CS
                   1022: .rm TM
                   1023: .rm IM
                   1024: .rm MF
                   1025: .rm MR
                   1026: .rm RP
                   1027: .rm I1
                   1028: .rm I2
                   1029: .rm I3
                   1030: .rm I4
                   1031: .rm I5
                   1032: .rm CB
                   1033: .rm E1
                   1034: .rm E2
                   1035: .de TL
                   1036: .ft 3
                   1037: .sp
                   1038: .if n .ul 100
                   1039: .ce 100
                   1040: .ps +2
                   1041: \\..
                   1042: .de AU
                   1043: .ft 2
                   1044: .if n .ul 0
                   1045: .ce 100
                   1046: .sp
                   1047: .NL
                   1048: \\..
                   1049: .de AI
                   1050: .ft 1
                   1051: .ce 100
                   1052: .if n .ul 0
                   1053: .if n .sp
                   1054: .if t .sp .5
                   1055: .NL
                   1056: \\..
                   1057: .RA
                   1058: .rm RA
                   1059: .rn FJ FS
                   1060: .rn FK FE
                   1061: .nf
                   1062: .ev 1
                   1063: .ps \\n(PS-2
                   1064: .vs \\n(.s+2p
                   1065: .ev
                   1066: .if \\n(KG=0 .nr FP 0 
                   1067: .if \\n(GA>1 .if \\n(KG=0 .nr GA 0 \" next UNIX must be flagged.
                   1068: .nr KG 0 
                   1069: .if \\n(FP>0 .FS
                   1070: .if \\n(FP>0 .FG
                   1071: .if \\n(FP>0 .FE
                   1072: .br
                   1073: .if \\n(TV>0 .if n .sp 2
                   1074: .if t .if \\n(TV>0 .sp 1
                   1075: .fi
                   1076: .ll \\n(LLu
                   1077: .ev 1
                   1078: .nr FL \\n(LLu*11u/12u
                   1079: .ll \\n(FLu
                   1080: .ev
                   1081: ..
                   1082: .de RA \"redefine abstract macros
                   1083: .de AB
                   1084: .br
                   1085: .if !\\n(1T .BG
                   1086: .ce 1
                   1087: .sp 1
                   1088: .if \\n(.$=0 ABSTRACT
                   1089: .if \\n(.$>0 .if !"\\$1"-" .if !"\\$1"no"  \\$1
                   1090: .if \\n(.$=0 .sp
                   1091: .if \\n(.$>0 .if !"\\$1"-" .if !"\\$1"no" .sp
                   1092: .sp 1
                   1093: .nr AJ 1
                   1094: .in +\\n(.lu/12u
                   1095: .ll -\\n(.lu/12u
                   1096: .RT
                   1097: \\..
                   1098: .de AE
                   1099: .nr AJ 0
                   1100: .br
                   1101: .in 0
                   1102: .ll \\n(LLu
                   1103: .if \\n(VS>=41 .vs \\n(VSu
                   1104: .if \\n(VS<=40 .vs \\n(VSp
                   1105: \\..
                   1106: ..
                   1107: .      \"IP - indented paragraph
                   1108: .de IP
                   1109: .RT
                   1110: .if !\\n(IP .nr IP +1
                   1111: .if \\n(ID>0 .sp \\n(IDu
                   1112: .if \\n(ID=0 .sp \\n(PDu
                   1113: .nr IU \\n(IR+1
                   1114: .if \\n(.$>1 .nr I\\n(IU \\$2n+\\n(I\\n(IRu
                   1115: .if \\n(I\\n(IU=0 .nr I\\n(IU \\n(PIu+\\n(I\\n(IRu
                   1116: .in \\n(I\\n(IUu
                   1117: .nr TY \\n(TZ-\\n(.i
                   1118: .nr JQ \\n(I\\n(IU-\\n(I\\n(IR
                   1119: .ta \\n(JQu \\n(TYuR
                   1120: .if \\n(.$>0 \{\
                   1121: .ti \\n(I\\n(IRu
                   1122: \&\\$1\t\c\}
                   1123: ..
                   1124: .      \"LP - left aligned (block) paragraph
                   1125: .de LP
                   1126: .ti \\n(.iu
                   1127: .RT
                   1128: .if \\n(1T .sp \\n(PDu
                   1129: ..
                   1130: .de QP
                   1131: .ti \\n(.iu
                   1132: .RT
                   1133: .if \\n(1T .sp \\n(PDu
                   1134: .ne 1.1
                   1135: .nr QP 1
                   1136: .in +\\n(QIu
                   1137: .ll -\\n(QIu
                   1138: .ti \\n(.iu
                   1139: ..
                   1140: .      \"IE - synonym for .LP
                   1141: .de IE
                   1142: .LP
                   1143: ..
                   1144: .de XP
                   1145: .RT
                   1146: .if !\\n(IP .nr IP +1
                   1147: .sp \\n(PDu
                   1148: .ne 3
                   1149: .nr IU \\n(IR+1
                   1150: .if \\n(.$=3 .nr JQ \\$3n
                   1151: .if \\n(.$=4 .nr JQ \\$4n
                   1152: .if \\n(.$>2 .nr I\\n(IU \\n(I\\n(IR+\\n(JQ
                   1153: .if \\n(I\\n(IU=0 .nr I\\n(IU \\n(I\\n(IR+\\n(PI
                   1154: .if \\n(J\\n(IR=0 .nr J\\n(IR (\\n(I\\n(IR+\\n(I\\n(IU)/2
                   1155: .nr JQ \\n(J\\n(IR-\\n(I\\n(IR
                   1156: .if \\n(.$=4 .nr JQ \\$3n
                   1157: .in \\n(I\\n(IUu
                   1158: .nr JK \\n(I\\n(IU-\\n(I\\n(IR
                   1159: .ta \\n(JQu \\n(JKu
                   1160: .ti \\n(I\\n(IRu
                   1161: \0\\$1\t\\$2\t\c
                   1162: ..
                   1163: .      \"RS - prepare for double indenting
                   1164: .de RS
                   1165: .nr IS \\n(IP
                   1166: .RT
                   1167: .nr IP \\n(IS
                   1168: .nr IU \\n(IR
                   1169: .nr IR +1
                   1170: .if \\n(I\\n(IR=0 .nr I\\n(IR \\n(I\\n(IU+\\n(PIu
                   1171: .in \\n(I\\n(IRu
                   1172: .nr TY \\n(TZ-\\n(.i
                   1173: .ta \\n(TYuR
                   1174: ..
                   1175: .      \"RE - retreat to the left
                   1176: .de RE
                   1177: .nr IS \\n(IP
                   1178: .RT
                   1179: .nr IP \\n(IS
                   1180: .if \\n(IR>0 .nr IR -1
                   1181: .in \\n(I\\n(IRu
                   1182: ..
                   1183: .de TC
                   1184: .nr TZ \\n(.lu
                   1185: .if \\n(.$ .nr TZ \\$1n
                   1186: .ta \\n(TZuR
                   1187: ..
                   1188: .de TD
                   1189: .LP
                   1190: .nr TZ 0
                   1191: ..
                   1192: .      \"CM - cut mark
                   1193: .de CM
                   1194: .po 0
                   1195: .lt 7.6i
                   1196: .ft 1
                   1197: .ps 10
                   1198: .vs 4p
                   1199: .tl '--''--'
                   1200: .po
                   1201: .vs
                   1202: .lt
                   1203: .ps
                   1204: .ft
                   1205: ..
                   1206: .      \"B - bold font
                   1207: .de B
                   1208: .nr PQ \\n(.f
                   1209: .if t .ft 3
                   1210: .if "\\$1"" .if n .ul 1000
                   1211: .if !"\\$1"" .if n .ul 1
                   1212: .if t .if !"\\$1"" \&\\$1\\f\\n(PQ\\$2
                   1213: .if n .if \\n(.$=1 \&\\$1
                   1214: .if n .if \\n(.$>1 \&\\$1\\c
                   1215: .if n .if \\n(.$>1 \\&\\$2
                   1216: ..
                   1217: .de BI \" bold italic -- only on 202
                   1218: .nr PQ \\n(.f
                   1219: .if t .ft 4
                   1220: .if "\\$1"" .if n .ul 1000
                   1221: .if !"\\$1"" .if n .ul 1
                   1222: .if t .if !"\\$1"" \&\\$1\\f\\n(PQ\\$2
                   1223: .if n .if \\n(.$=1 \&\\$1
                   1224: .if n .if \\n(.$>1 \&\\$1\\c
                   1225: .if n .if \\n(.$>1 \\&\\$2
                   1226: ..
                   1227: .      \"R - Roman font
                   1228: .de R
                   1229: .nr PQ \\n(.f
                   1230: .ft 1
                   1231: .if \\n(.$>0 \&\\$1\\f\\n(PQ\\$2
                   1232: .if \\n(.$=0 .if n .ul 0
                   1233: ..
                   1234: .      \"I - italic font
                   1235: .de I
                   1236: .nr PQ \\n(.f
                   1237: .if t .ft 2
                   1238: .if "\\$1"" .if n .ul 1000
                   1239: .if !"\\$1"" .if n .ul 1
                   1240: .if t .if !"\\$1"" \&\\$1\^\\f\\n(PQ\\$2
                   1241: .if n .if \\n(.$=1 \&\\$1
                   1242: .if n .if \\n(.$>1 \&\\$1\\c
                   1243: .if n .if \\n(.$>1 \\&\\$2
                   1244: ..
                   1245: .      \"TA - tabs set in ens or chars
                   1246: .de TA
                   1247: .ta \\$1n \\$2n \\$3n \\$4n \\$5n \\$6n \\$7n \\$8n \\$9n
                   1248: ..
                   1249: .      \"SM - make smaller size
                   1250: .de SM
                   1251: .if \\n(.$>0 \&\\$3\s-2\\$1\s0\\$2
                   1252: .if \\n(.$=0 .ps -2
                   1253: ..
                   1254: .      \"LG - make larger size
                   1255: .de LG
                   1256: .ps +2
                   1257: ..
                   1258: .      \"NL - return to normal size
                   1259: .de NL
                   1260: .ps \\n(PS
                   1261: ..
                   1262: .      \"DA - force date; ND - no date or new date.
                   1263: .de DA
                   1264: .if \\n(.$ .ds DY \\$1 \\$2 \\$3 \\$4
                   1265: .ds CF \\*(DY
                   1266: ..
                   1267: .de ND
                   1268: .ME
                   1269: .rm ME
                   1270: .ds DY \\$1 \\$2 \\$3 \\$4
                   1271: .rm CF
                   1272: ..
                   1273: .de FN
                   1274: .FS
                   1275: ..
                   1276: .      \"FS - begin footnote
                   1277: .de FJ
                   1278: 'ce 0
                   1279: .nr IA \\n(IP
                   1280: .nr IB \\n(.i
                   1281: .ev1
                   1282: .ll \\n(FLu
                   1283: .da FF
                   1284: .br
                   1285: .if \\n(IF>0 .tm Footnote within footnote-illegal.
                   1286: .if \\n(IF>0 .ab
                   1287: .nr IF 1
                   1288: .if !\\n+(XX-1 .FA
                   1289: ..
                   1290: .      \"FE - footnote end
                   1291: .de FK
                   1292: .br
                   1293: .in 0
                   1294: .nr IF 0
                   1295: .di
                   1296: .ev
                   1297: .if !\\n(XX-1 .nr dn +\\n(.v
                   1298: .nr YY -\\n(dn
                   1299: .if \\n(NX=0 .nr WF 1
                   1300: .if \\n(dl>\\n(CW .nr WF 1
                   1301: .if (\\n(nl+\\n(.v)<=(\\n(.p+\\n(YY) .ch FO \\n(YYu
                   1302: .if (\\n(nl+\\n(.v)>(\\n(.p+\\n(YY) .if \\n(nl>(\\n(HM+1.5v) .ch FO \\n(nlu+\\n(.vu
                   1303: .if (\\n(nl+\\n(.v)>(\\n(.p+\\n(YY) .if \\n(nl+\\n(FM+1v>\\n(.p .ch FX \\n(.pu-\\n(FMu+2v
                   1304: .if (\\n(nl+\\n(.v)>(\\n(.p+\\n(YY) .if \\n(nl<=(\\n(HM+1.5v) .ch FO \\n(HMu+(4u*\\n(.vu)
                   1305: .nr IP \\n(IA
                   1306: 'in \\n(IBu
                   1307: ..
                   1308: .\"    First page footer.
                   1309: .de FS
                   1310: .ev1
                   1311: .br
                   1312: .ll \\n(FLu
                   1313: .da FG
                   1314: ..
                   1315: .de FE
                   1316: .br
                   1317: .di
                   1318: .nr FP \\n(dn
                   1319: .if \\n(1T=0 .nr KG 1 \"not in abstract repeat next page.
                   1320: .if "\\n(.z"OD" .nr KG 0 \" if in OK, don't repeat.
                   1321: .ev
                   1322: ..
                   1323: .de FA
                   1324: .if n __________________________
                   1325: .if t \l'1i'
                   1326: .br
                   1327: ..
                   1328: .de FV
                   1329: .FS
                   1330: .nf
                   1331: .ls 1
                   1332: .FY
                   1333: .ls
                   1334: .fi
                   1335: .FE
                   1336: ..
                   1337: .de FX
                   1338: .if \\n(XX>0 .di FY
                   1339: .if \\n(XX>0 .ns
                   1340: ..
                   1341: .de XF
                   1342: .if \\n(nlu+1v>(\\n(.pu-\\n(FMu) .ch FX \\n(nlu+1.9v
                   1343: .ev1
                   1344: .nf
                   1345: .ls 1
                   1346: .FF
                   1347: .rm FF
                   1348: .nr XX 0 1
                   1349: .br
                   1350: .ls
                   1351: .di
                   1352: .fi
                   1353: .ev
                   1354: ..
                   1355: .de FL
                   1356: .ev1
                   1357: .nr FL \\$1n
                   1358: .ll \\$1
                   1359: .ev
                   1360: ..
                   1361: .de HO
                   1362: Bell Laboratories
                   1363: Holmdel, New Jersey 07733
                   1364: ..
                   1365: .de WH
                   1366: Bell Laboratories
                   1367: Whippany, New Jersey 07981
                   1368: ..
                   1369: .de IH
                   1370: Bell Laboratories
                   1371: Naperville, Illinois 60540
                   1372: ..
                   1373: .de UL \" underline argument, don't italicize
                   1374: .if t \\$1\l'|0\(ul'\\$2
                   1375: .if n .I "\\$1" "\\$2"
                   1376: ..
                   1377: .de UX
                   1378: .ie \\n(GA>0 \\$2\s-1UNIX\s0\\$1
                   1379: .el \{\
                   1380: .if n \\$2UNIX\\$1*
                   1381: .if t \\$2\s-1UNIX\\s0\\$1\\f1\(dg\\fP
                   1382: .FS
                   1383: .if n * UNIX
                   1384: .if t \(dg UNIX
                   1385: .ie \\$3=1 is a Footnote of Bell Laboratories.
                   1386: .el is a Trademark of Bell Laboratories.
                   1387: .FE
                   1388: .nr GA 1\}
                   1389: ..
                   1390: .de US
                   1391: the
                   1392: .UX
                   1393: operating system
                   1394: ..
                   1395: .de QS
                   1396: .br
                   1397: .LP
                   1398: .in +\\n(QIu
                   1399: .ll -\\n(QIu
                   1400: ..
                   1401: .de QE
                   1402: .br
                   1403: .ll +\\n(QIu
                   1404: .in -\\n(QIu
                   1405: .LP
                   1406: ..
                   1407: .de B1 \" begin boxed stuff
                   1408: .br
                   1409: .di BB
                   1410: .nr BC 0
                   1411: .if "\\$1"C" .nr BC 1
                   1412: .nr BE 1
                   1413: ..
                   1414: .de B2 \" end boxed stuff
                   1415: .br
                   1416: .nr BI 1n
                   1417: .if \\n(.$>0 .nr BI \\$1n
                   1418: .di
                   1419: .nr BE 0
                   1420: .nr BW \\n(dl
                   1421: .nr BH \\n(dn
                   1422: .ne \\n(BHu+\\n(.Vu
                   1423: .nr BQ \\n(.j
                   1424: .nf
                   1425: .ti 0
                   1426: .if \\n(BC>0 .in +(\\n(.lu-\\n(BWu)/2u
                   1427: .in +\\n(BIu
                   1428: .ls 1
                   1429: .BB
                   1430: .ls
                   1431: .in -\\n(BIu
                   1432: .nr BW +2*\\n(BI
                   1433: .sp -1
                   1434: \l'\\n(BWu\(ul'\L'-\\n(BHu'\l'|0\(ul'\h'|0'\L'\\n(BHu'
                   1435: .if \\n(BC>0 .in -(\\n(.lu-\\n(BWu)/2u
                   1436: .if \\n(BQ .fi
                   1437: .br
                   1438: ..
                   1439: .de AT
                   1440: .nf
                   1441: .sp
                   1442: .ne 2
                   1443: Attached:
                   1444: ..
                   1445: .de CT
                   1446: .nf
                   1447: .sp
                   1448: .ne 2
                   1449: .ie \\n(.$ Copy to \\$1:
                   1450: .el Copy to:
                   1451: ..
                   1452: .de BX
                   1453: .if t \(br\|\\$1\|\(br\l'|0\(rn'\l'|0\(ul'
                   1454: .if n \(br\\kA\|\\$1\|\\kB\(br\v'-1v'\h'|\\nBu'\l'|\\nAu'\v'1v'\l'|\\nAu'
                   1455: ..
                   1456: .IZ
                   1457: .rm IZ
                   1458: .de [
                   1459: [
                   1460: ..
                   1461: .de ]
                   1462: ]
                   1463: ..

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.