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