|
|
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
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.