![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to osdd.src CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff / macros.d|
Return to osdd.src CVS log | Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff / macros.d |
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.