Annotation of cci/usr/src/usr.lib/tmac/me/index.me, revision 1.1.1.1

1.1       root        1: .nr _0 \n(c.
                      2: .\"    @(#)index.me    2.8     3/19/81
                      3: .\" This version has had comments stripped.
                      4: .de (x
                      5: .ds |X x
                      6: .if \\n(.$>0 \
                      7: .      ds |X \\$1
                      8: .\" please note these cases MUST be in this order
                      9: .ie !"\\n(.z"" \
                     10: \{\
                     11: .      ev 2                    \" if in a diversion, save & process later
                     12: \!.(x \\*(|X
                     13: .rm |X
                     14: .\}
                     15: .el \
                     16: \{\
                     17: .      am %\\*(|X )x
                     18: .      sp \\n(xsu
                     19: .      ti -\\n(piu
                     20: .\}
                     21: ..
                     22: .de )x                 \" *** end index entry
                     23: .ie "\\n(.z"" \
                     24: \{\
                     25: .      ds |x \\n%
                     26: .      if \\n(.$>0 \
                     27: .              ds |x \\$1
                     28: .      if "\\*(|x"_" \
                     29: .              ig ..
                     30: .      am %\\*(|X ..
                     31: .      if \w"\\$2">(\\n(.l-\\n(.i-\\n(.k) \
                     32: .              ti +\\n(xuu
                     33: \\\\a\\\\t\\$2\\*(|x
                     34: ...
                     35: .      rm |x
                     36: .      rm |X
                     37: .\}
                     38: .el \
                     39: \{\
                     40: \!.)x \\$1 \\$2
                     41: .      br                      \" if in a diversion, save & process later
                     42: .      ev
                     43: .\}
                     44: ..
                     45: .de xp                 \" *** print the index
                     46: .br
                     47: .@C 2
                     48: .ls 1
                     49: .vs \\n(.su*\\n($Ru
                     50: .fi
                     51: .in +\\n(piu
                     52: .ds |X x
                     53: .if \\n(.$>0 \
                     54: .      ds |X \\$1
                     55: .xl -(\\n(xuu+\w'...'u)
                     56: .di |x
                     57: .%\\*(|X
                     58: .br
                     59: .di
                     60: .rm %\\*(|X
                     61: .xl \\n($lu
                     62: .rm |X
                     63: .ev
                     64: .nf
                     65: .in 0
                     66: .ta \\n(.lu-\\n(xuuR \\n(.luR
                     67: .|x
                     68: .fi
                     69: .in
                     70: .rm |x
                     71: ..
                     72: .if \n(xu<=0 \
                     73: .      nr xu 0.5i              \" index undent
                     74: .nr c. \n(_0

unix.superglobalmegacorp.com

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