|
|
1.1 ! root 1: '''\" OSDD document format (used with mm macros) ! 2: '''\" @(#)osdd.src 1.4 ! 3: .)K \" kill MT macros ! 4: .nr %y 2 \" print Notice by default ! 5: .nr P 1 \" start with page 2 (TOC is p. 1) ! 6: .nr Cl 3 \" put first 3 levels in TOC ! 7: .nr Cp 1 \" put List of Figs on TOC page ! 8: .nr Cs 1 \" indicates text (rather than TOC page) ! 9: .nr Fp 1 \" frame page option retained for TMAS compatibility ! 10: .nr Np 1 \" use numbered paragraphs ! 11: .nr Of 1 \" use dash for figure captions ! 12: .nr Oc 1 \" use Arabic numbers on TOC pages ! 13: .tr ~ ! 14: .tc ~ ! 15: .hc ^ ! 16: .ds <1 " (cont'd)\" for use on continued figure pages ! 17: .ds Sc \" override string (second arg) for .FG ! 18: .ds H1 AAA-BBBBB-CC\" document number ! 19: .ds H2 n\" section number ! 20: .ds H3 n\" issue number ! 21: .ds H4 (date) ! 22: .ds H5 (rating) ! 23: .HM 1 1 A 1 1 ! 24: .ds HF 3 1 2 2 1 2 ! 25: .ds Lf FIGURES\" title for List of Figures ! 26: .nr Ht 1 ! 27: .nr Pt 0 ! 28: .nr Hb 5 ! 29: .nr Hs 5 ! 30: .nr Di 1 \" presume document index is being made separately ! 31: .EF "'Page \\\\nP'''" ! 32: .OF "'''Page \\\\nP'" ! 33: .am )h ! 34: .BS \" must be cleared each page after figure captions printed with BS/BE ! 35: .BE ! 36: .. ! 37: .de HX ! 38: .if (\\$1=2):(\\$1=4):(\\$1=5) .ds }0\" make heading levels unnumbered ! 39: .. ! 40: .de TP ! 41: .if \\n(Cs=0 \{\ ! 42: .tl 'BELL LABORATORIES''\\*(H1' ! 43: .if \w'\\*(H2' .tl '''Section \\*(H2' ! 44: .if \w'\\*(H3' .tl '''Issue \\*(H3' ! 45: .if \\n(Di=0 \{\ ! 46: . tl '''\\*(H4' ! 47: . tl '''\\*(H5' \} ! 48: .tl ''OPERATIONS SYSTEMS'' \} ! 49: .if \\n(Cs=1 \{\ ! 50: . ie (\\nP%2)=0 \{\ ! 51: . tl '\\*(H1''' ! 52: . tl 'Section \\*(H2''' ! 53: . tl 'Issue \\*(H3''' \} ! 54: . el \{\ ! 55: . tl '''\\*(H1' ! 56: . tl '''Section \\*(H2' ! 57: . tl '''Issue \\*(H3' \} ! 58: .sp 3v \} ! 59: .if \\n(Cs=0 .nr Cs 1 ! 60: .. ! 61: .de TY ! 62: .nf ! 63: .{a ! 64: .sp 3v ! 65: .cu 1 ! 66: .tl 'CONTENTS''Page No.' ! 67: .cu 0 ! 68: .fi ! 69: .BS ! 70: .if \\n(Di=1 .nr %y 0 ! 71: .if \\n(%y=2 .[A ! 72: .if \\n(%y=1 .[B ! 73: .BE ! 74: .. ! 75: .de Tc ! 76: .br ! 77: .BS 1 ! 78: .if (\\n(%y)&(\\n(:E) .sp 2v\" if there is already BS/BE space first ! 79: .if \\n(%y=2 .[A ! 80: .if \\n(%y=1 .[B ! 81: .BE ! 82: .di {a ! 83: \!.ce 99 ! 84: .nf ! 85: .. ! 86: .de Td ! 87: \!.br ! 88: \!.ce0 ! 89: .fi ! 90: .br ! 91: .di ! 92: .nr Cs 0 ! 93: .TC 7 1 7 ! 94: .. ! 95: .de [B ! 96: .ce 99 ! 97: PRIVATE ! 98: .sp 1v ! 99: The information contained herein ! 100: should not be disclosed to unauthorized ! 101: persons. It is meant solely for use by ! 102: authorized Bell System employees. ! 103: .ce 0 ! 104: .. ! 105: .de [A ! 106: .ce ! 107: NOTICE ! 108: .sp 1v ! 109: .ce 2 ! 110: Not for use or disclosure outside the ! 111: Bell System except under written agreement. ! 112: .. ! 113: .de [F ! 114: .SK ! 115: .rs ! 116: .sp 30v-\\n(nlu ! 117: .ce ! 118: \\$5 ! 119: .ce0 ! 120: .BS ! 121: .)F \\$3 \\$6 \\$4 "\\*(Tt\\*(<1" \\*(Sc ! 122: .BE ! 123: .nr %c \\$1+1 ! 124: .if \\$2-\\$1 .[F \\n(%c \\$2 \\$3 \\$4 "\\$5" \\$6 ! 125: .. ! 126: '''\" for compatibility with TMAS, .Fg takes 5 args as follows: ! 127: '''\" .Fg page-count figure-caption comment unused override ! 128: '''\" Fp flag = 0 suppresses printing of additional figure pages ! 129: .de Fg ! 130: .SK ! 131: .rs ! 132: .sp 30v-\\n(nlu ! 133: .ce ! 134: \\$3 ! 135: .ce0 ! 136: .br ! 137: .ds Sc \\$5 ! 138: .BS ! 139: .FG "\\$2" \\*(Sc ! 140: .BE ! 141: .ds Tt \\$2 ! 142: .ie (\\$1>1)&(\\n(Fp>0) .[F 2 \\$1 Figure \\n(Fg "\\$3" -1 ! 143: .el \{\ ! 144: . de [h ! 145: . nr P +\\$1 ! 146: . rm [h ! 147: \\.. ! 148: . if \\$1>1 \{\ ! 149: . nr %h (\\$1-1) ! 150: . am )h ! 151: . [h \\n(%h ! 152: \\.. \} \} ! 153: .. ! 154: .de PM ! 155: .ie !\w'\\$1' .nr %y 0 ! 156: .el \{\ ! 157: . if '\\$1'N' .nr %y 2 ! 158: . if '\\$1'P' .nr %y 1 \} ! 159: .. ! 160: '''\" This version of BS/BE takes arg, .BS 1, to append to old ! 161: '''\" BS/BE block. It's used to put figure caption and disclaimer ! 162: '''\" on same page. It has problem that if new BS/BE won't fit on ! 163: '''\" current page then nothing comes out until next page where ! 164: '''\" standard BS/BE puts old version on current page. ! 165: .de BS ! 166: .ev1 ! 167: .)R ! 168: .ie 0\\$1 \{ .rn >D >K ! 169: . da >K \} ! 170: . el \{\ ! 171: . nr :E 0 ! 172: . di >K \} ! 173: .. ! 174: .de BE ! 175: .br ! 176: .di ! 177: .)R ! 178: .ev ! 179: .nr :U \\n(dnu+\\n(:Eu\"how big is new tail block + old if appended to ! 180: .nr :E \\n(dnu\"save current size in case later appended to ! 181: .if (\\n(:Uu+\\n(:Mu)>(\\n(.pu-\\n(nlu-.5v) .SK\"new page if bigger than where we are now ! 182: .ch )n -(\\n(:Mu+\\n(:Uu)\"move footnote diverter trap ! 183: .nr :o +(\\n(:Uu-\\n(:Tu) ! 184: .nr :O +(\\n(:Uu-\\n(:Tu) ! 185: .ch )f -\\n(:ou\"move footer trap ! 186: .nr :m \\n(:Mu+\\n(:Uu\"new place for footer to reside ! 187: .rn >K >D ! 188: .ch >B -(\\n(:Mu+\\n(:Uu-1v) \"plant trap for tail mode expander ! 189: .nr :T \\n(:Uu\"save size of current tail block ! 190: ..
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.