|
|
1.1 ! root 1: .nr _0 \n(c. ! 2: .\" @(#)sh.me 2.4 3/27/86 ! 3: .\" %beginstrip% ! 4: .de sh \" *** section heading ! 5: .fi ! 6: .if (\\n(si>0)&(\\n(si<1n) \ ! 7: . nr si \\n(sin ! 8: .ce 0 ! 9: .@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 ! 10: .if !"\\$2"_" \ ! 11: \{\ ! 12: . ds |n \&\\$2 ! 13: . $p "\\*(|n" "\\*($n" \\n($0 ! 14: . $0 "\\*(|n" "\\*($n" \\n($0 ! 15: . rm |n ! 16: .\} ! 17: .nr $p 0 1 \" reset .np count ! 18: .. ! 19: .de @d \" --- change section depth ! 20: .if !""\\$1" \ ! 21: . nr $0 \\$1 ! 22: .if \\n($0&(\\n(.$>1) \ ! 23: . nr $\\n($0 \\$2 ! 24: .ds $n \&\" ! 25: .ie \\n($0>=1 \ ! 26: \{\ ! 27: . if '\\n($1'0' \ ! 28: . nr $1 1 ! 29: . if (\\n(.$>=3) .if !"\\$3"-" \ ! 30: . nr $1 \\$3 ! 31: . as $n \\n($1 ! 32: .\} ! 33: .el \ ! 34: . nr $1 0 ! 35: .ie \\n($0>=2 \ ! 36: \{\ ! 37: . if '\\n($2'0' \ ! 38: . nr $2 1 ! 39: . if (\\n(.$>=4) .if !"\\$4"-" \ ! 40: . nr $2 \\$4 ! 41: . as $n .\\n($2 ! 42: .\} ! 43: .el \ ! 44: . nr $2 0 ! 45: .ie \\n($0>=3 \ ! 46: \{\ ! 47: . if '\\n($3'0' \ ! 48: . nr $3 1 ! 49: . if (\\n(.$>=5) .if !"\\$5"-" \ ! 50: . nr $3 \\$5 ! 51: . as $n .\\n($3 ! 52: .\} ! 53: .el \ ! 54: . nr $3 0 ! 55: .ie \\n($0>=4 \ ! 56: \{\ ! 57: . if '\\n($4'0' \ ! 58: . nr $4 1 ! 59: . if (\\n(.$>=6) .if !"\\$6"-" \ ! 60: . nr $4 \\$6 ! 61: . as $n .\\n($4 ! 62: .\} ! 63: .el \ ! 64: . nr $4 0 ! 65: .ie \\n($0>=5 \ ! 66: \{\ ! 67: . if '\\n($5'0' \ ! 68: . nr $5 1 ! 69: . if (\\n(.$>=7) .if !"\\$7"-" \ ! 70: . nr $5 \\$7 ! 71: . as $n .\\n($5 ! 72: .\} ! 73: .el \ ! 74: . nr $5 0 ! 75: .ie \\n($0>=6 \ ! 76: \{\ ! 77: . if '\\n($6'0' \ ! 78: . nr $6 1 ! 79: . if (\\n(.$>=8) .if !"\\$8"-" \ ! 80: . nr $6 \\$8 ! 81: . as $n .\\n($6 ! 82: .\} ! 83: .el \ ! 84: . nr $6 0 ! 85: .. ! 86: .de sx \" *** heading up, no increment (2.1.1 -> 2.1) ! 87: .ce 0 ! 88: .ul 0 ! 89: .nr _0 \\n($0-1 ! 90: .if \\n(.$ .nr _0 +1 ! 91: .if \\n(.$ .nr _0 \\$1 ! 92: .@d \\n(_0 ! 93: .rr _0 ! 94: .$p "" "" \\n($0 ! 95: .nr $p 0 1 \" reset .np count ! 96: .. ! 97: .de uh \" *** unnumbered section heading ! 98: .$p "\\$1" ! 99: .$0 "\\$1" ! 100: .. ! 101: .if \n(sf<=0 \ ! 102: . nr sf 8 \" section font -- Times Bold ! 103: .if \n(sp<=0 \ ! 104: . nr sp 10 \" section title pointsize ! 105: .if \n(ss<=0 \ ! 106: . nr ss 12p \" section prespacing ! 107: .if \n(si<=0 \ ! 108: . nr si 0 \" section indent ! 109: .nr c. \n(_0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.