![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to vmca.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 vmca.src CVS log | Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff / macros.d |
1.1 root 1: '''\" PWB View Graph and Slide Macros - 1.9 of @(#)vmca.src 1.9
2: '''\" Nroff/Troff Version @(#)1.9
3: ''\" For Tektronix 4014 scope, use "... troff -rX1 -t..." and pipe into tc.
4: ''\" Macro names used: )I )P )V )Z )e )g )j )m )t )z A AD B BR C CE D DF
5: ''\" FI HY I NA NF NH NX S SH SP SW Sh SO Sw T TA
6: ''\" TI U VH VS VW Vh Vw
7: ''\" String names used: )B )C )D )F )N )Y )f ]A ]B ]C ]D Tm
8: ''\" Number register names used: )A )E )G )H )J )K )L )M )O )Q )R )S )T
9: ''\" )U )W )X )a )b )c )d )i )k )l )n )o )p )q )r )s )u )v
10: ''\" )w )x )y ]a ]b ]c ]d ]x X
11: ''\" names of the form )? not used: none
12: ''\" names of the form ]? USED: ]A ]B ]C ]D ]a ]b ]c ]d ]x
13: '''\" Tm: Trademark indicator
14: .if n .ds Tm \uTM\d
15: .if t .ds Tm \v'-0.5m'\s-4TM\s+4\v'0.5m'
16: '\" FOIL-SIZE DEFINITION MACROS
17: '\" .VS - foil start (V_iew graph: 7 * 7 S_quare) E-7351 or E-7351-R
18: .de VS
19: .)j\" clean-up, a "troff -a" advisory, and a fresh start
20: .nr )K 0i\" left margin bias
21: .nr )L 0i\" cross-hair bias
22: .nr )U 8i\" page length minus 1.5 inches
23: .nr )X 18\" default point size
24: .nr )H 0\" high flag
25: .nr )W 0\" wide flag
26: .nr )O 0i\" 35mm slide cut offset
27: .nr )M 0\" 35mm slide flag
28: .if !\\n(.$ .)V
29: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
30: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
31: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
32: ..
33: '\" .Vh - foil start (V_iew graph: 5 wide * 7 h_igh) E-7351-A
34: .de Vh
35: .)j
36: .nr )K 0.9i
37: .nr )L 1i
38: .nr )U 8i
39: .nr )X 14
40: .nr )H 1
41: .nr )W 0
42: .nr )O 0.2i
43: .nr )M 0
44: .if !\\n(.$ .)V
45: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
46: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
47: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
48: ..
49: '\" .Sh - foil start (S_lide [35mm]: 5 wide * 7 h_igh) E-7351-A
50: .de Sh
51: .)j
52: .nr )K 1.1i
53: .nr )L 1i
54: .nr )U 8i
55: .nr )X 14
56: .nr )H 1
57: .nr )W 0
58: .nr )O 0.2i
59: .nr )M 1
60: .if !\\n(.$ .)V
61: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
62: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
63: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
64: ..
65: '\" .Vw - foil start (V_iew graph: 7 w_ide * 5 high) E-7351-B
66: .de Vw
67: .)j
68: .nr )K 0i
69: .nr )L 0i
70: .nr )U 6i
71: .nr )X 14
72: .nr )H 0
73: .nr )W 1
74: .nr )O 0.2i
75: .nr )M 0
76: .if !\\n(.$ .)V
77: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
78: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
79: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
80: ..
81: '\" .Sw - foil start (S_lide [35mm]: 7 w_ide * 5 high) E-7351-B
82: .de Sw
83: .)j
84: .nr )K 0i
85: .nr )L 0i
86: .nr )U 6i
87: .nr )X 14
88: .nr )H 0
89: .nr )W 1
90: .nr )O 0.2i
91: .nr )M 1
92: .if !\\n(.$ .)V
93: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
94: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
95: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
96: ..
97: '\" .VH - foil start (V_iew graph: 7 wide * 9 H_igh) E-8814
98: .de VH
99: .)j
100: .nr )K 0i
101: .nr )L 0i
102: .nr )U 10i
103: .nr )X 18
104: .nr )H 1
105: .nr )W 0
106: .nr )O 0.5i
107: .nr )M 0
108: .if !\\n(.$ .)V
109: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
110: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
111: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
112: ..
113: '\" .SH - foil start (S_lide [35mm]: 7 wide * 9 H_igh) E-8814
114: .de SH
115: .)j
116: .nr )K 0.5i
117: .nr )L 0i
118: .nr )U 10i
119: .nr )X 18
120: .nr )H 1
121: .nr )W 0
122: .nr )O 0.5i
123: .nr )M 1
124: .if !\\n(.$ .)V
125: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
126: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
127: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
128: ..
129: '\" .VW - foil start (V_iew graph: 9 W_ide * 7 high) E-8814
130: .de VW
131: .)j
132: .nr )K 0i\" (This one produces foils that are
133: .nr )L 0i\" 7 * 5.44 inches, and therefore must
134: .nr )U 6.44i\" be enlarged to 9 * 7 before use.)
135: .nr )X 14
136: .nr )H 0
137: .nr )W 1
138: .nr )O 0.4i
139: .nr )M 0
140: .if !\\n(.$ .)V
141: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
142: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
143: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
144: ..
145: '\" .SW - foil start (S_lide [35mm]: 9 W_ide * 7 high) E-8814
146: .de SW
147: .)j
148: .nr )K 0i\" (This one produces foils that are
149: .nr )L 0i\" 7 * 5.44 inches, and therefore must
150: .nr )U 6.44i\" be enlarged to 9 * 7 before use.)
151: .nr )X 14
152: .nr )H 0
153: .nr )W 1
154: .nr )O 0.4i
155: .nr )M 1
156: .if !\\n(.$ .)V
157: .if \\n(.$ .if !\\n(.$-1 .)V "\\$1"
158: .if \\n(.$-1 .if !\\n(.$-2 .)V "\\$1" "\\$2"
159: .if \\n(.$-2 .)V "\\$1" "\\$2" "\\$3"
160: ..
161: .de )V\" common part of foil start macro
162: .fc\" in case tbl left them on
163: .wh 0i\" remove page shortener trap
164: .if \\nX .wh -0.5i\" remove Tek scope trap
165: .nr )o 0u
166: .if \\n()i .nr )o 10p
167: .nr )U +\\n()ou
168: .pl \\n()Uu+1.5i\" set page length
169: .if \\nX .if \\n(.pu-\\n()Gu .pl \\n()Gu
170: .na
171: .fi
172: .nh
173: .lg 0
174: .ta 0.5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i
175: .ce 0
176: .in 0i
177: .ll 7.54i
178: .po 0i\" start off clean
179: .lt 7.68i\" this overflows on purpose
180: .if \\n()i .)t "'\(da cut \(da''\(da cut \(da'" 1
181: .nr )i 0\" reset first foil flag
182: .)t "'\l'0.38i'''\l'0.38i''" 1\" put out cut marks
183: .sp 0.5v
184: .po 0.48i
185: .lt 7.06i
186: .if \\n(.$-1 .ds )N "\\$2
187: .if \\n(.$-2 .ds )Y "\\$3
188: .tl @@@\\*()Y@
189: .tl @@@\\*()N@
190: .if \\n(.$ .tl @@@\\*()F \\$1@
191: .if !\\n(.$ .tl @@@\\*()F %@
192: .po
193: .sp |0.68i+\\n()ou
194: .po 0.51i+\\n()Lu+\\n()Ou
195: .lt 7.03i-\\n()Lu-\\n()Lu-\\n()Ou-\\n()Ou
196: .if \\n()H .)t "'|''|'"
197: .po
198: .sp |1i+\\n()Ou+\\n()ou
199: .if !\\n(.A .)e \" force to left margin
200: .po 0.1i
201: .lt 7.54i\" this overflows on purpose
202: .if \\n()W .)t "'_''_'"
203: .po
204: .sp |1i+\\n()ou
205: .if !\\n(.A .)e \" force to left margin
206: .po 0.48i+\\n()Lu
207: .lt 7.06i-\\n()Lu-\\n()Lu
208: .tl @+@@+@
209: .sp -3p
210: .if \\n()M .if \\n()W .sp \\n()Ou
211: .po
212: .nr )J \\n()Uu
213: .if \\n()M .if \\n()W .nr )J \\n()Uu-\\n()Ou
214: .nr )E \\n()Ju\" set trap for end of foil
215: .wh \\n()Eu )Z\" plant end trap
216: .S \\n()X 6i-\\n()Ku-\\n()Ku
217: .I "" A no-space
218: .sp .5v\" so it's independent of .DV
219: .nr )n \\n(nlu
220: ..
221: .de )Z\" end foil
222: .wh \\n()Eu\" remove end trap to avoid infinite loop
223: .nr )w 0\" set overflow flag
224: .ev 1
225: .)g
226: 'sp |\\n()Uu
227: .if !\\n(.A .)e \" force to left margin
228: .po 0.48i+\\n()Lu
229: .lt 7.06i-\\n()Lu-\\n()Lu
230: .tl @+@@+@
231: .po
232: 'sp |\\n()Uu-\\n()Ou
233: .if !\\n(.A .)e \" force to left margin
234: .po 0.1i
235: .lt 7.54i\" this overflows on purpose
236: .if \\n()W .)t "'_''_'"
237: .po
238: 'sp |\\n()Uu+0.32i
239: .po 0.51i+\\n()Lu+\\n()Ou
240: .lt 7.03i-\\n()Lu-\\n()Lu-\\n()Ou-\\n()Ou
241: .if \\n()H .)t "'|''|'"
242: .po
243: .if !\\n()H 'sp 1v
244: 'sp 1v
245: .ev
246: .if \\nX .pl \\n()Gu
247: .if \\nX .wh -0.5i )m\" plant Tek scope overflow flag
248: .wh 0i )P\" shorten page for overflow
249: ..
250: .de )m\" page break for Tek scope
251: .bp
252: ..
253: .de )z\" end of last foil (called by .em)
254: .pl \\n(.pu+2i\" to avoid the .em effect
255: .br
256: .if \\n()i \{ .ps 10
257: . lt 6i
258: . tl @@*** No input or no ``foil start'' macro in input.@@ \}
259: .if !\\n()i \{ .nr )x \\n(.vu+\\n()Eu-\\n(nlu/\\n(.vu
260: . nr )v \\n()w
261: . sp |\\n(.pu-2.8i\" force a trap to )Z if no overflow
262: . if \\nX .wh -0.5i\" remove Tek trap, if any
263: . if \\nX .pl \\n(.pu+2i\" avoid .em effect
264: \&\" force out any garbage
265: . br
266: . )g
267: . po 0i\" for the last time
268: . ll 6i
269: . ce 0
270: . in 0i
271: . if \\n(.A .sp -1.1v
272: . if \\n(.A .sp 0.1v
273: . if \\n(.A .if \\n()v ==> Approximately \\n()x blank line(s) \
274: left to bottom of previous foil.
275: . if \\n(.A .if !\\n()v ==> *** Previous foil full; \
276: check for overflow.
277: . sp |\\n(.pu-2i
278: . lt 7.68i\" this overflows on purpose
279: . )t "'\l'0.38i'''\l'0.38i''" 1\" put out cut marks
280: . )t "'\(ua cut \(ua''\(ua cut \(ua'" 1 \}
281: ..
282: .de )t\" for cut marks invisible in "troff -a" mode
283: .if !\\n(.A .if \\n(.$-1 .)e
284: .if !\\n(.A .tl \\$1
285: ..
286: .de )e\" force to left margin
287: .po 0i\" this macro gets around a
288: .lt 1i\" typesetter ugly.
289: .tl '~'''
290: 'sp -1v
291: .po
292: .lt
293: ..
294: .de )P\" page shortener
295: .pl 2i
296: .if \\nX .pl \\n()Gu
297: ..
298: .de )j\" clean-up and defaults
299: .br
300: .if \\n()i .if \\n(nl \{ .ps 10
301: . lt 6i
302: . tl @@*** Text before ``foil start'' macro in input.@@ \}
303: .if !\\n()i \{ .nr )x \\n(.vu+\\n()Eu-\\n(nlu/\\n(.vu
304: . nr )v \\n()w
305: . sp |\\n(.pu-0.8i
306: \&\" force out any garbage
307: . br \}
308: .)g
309: .if !\\n()i \{ .po 0i
310: . ll 6i
311: . ce 0
312: . in 0i
313: . if \\n(.A .sp -1.1v
314: . if \\n(.A .sp 0.1v
315: . if \\n(.A .if \\n()v ==> Approximately \\n()x blank line(s) \
316: left to bottom of previous foil.
317: . if \\n(.A .if !\\n()v ==> *** Previous foil full; \
318: check for overflow.
319: . br
320: . ll
321: . po \}
322: .if \\n(nl .bp
323: .nr )w 1\" reset overflow flag
324: ..
325: .de )g\" default setter
326: .ft \\*()f
327: .cs \\*()f
328: .ps 8
329: .vs 10p
330: .ss 16
331: .tr ~
332: ..
333: '\" FORMATTING MACROS
334: '\" .T - large, centered title
335: .de T
336: .br
337: .if \\n(nlu-\\n()nu .sp .5v
338: .nr ]a \\n(.s\" save prevailing current & previous point sizes
339: .ps
340: .nr ]b \\n(.s
341: .ps
342: .nr )u \\n(.iu\" save prevailing indent
343: .in 0i
344: .ps +4
345: .ce
346: \&\\$1
347: .in \\n()uu\" restore prevailing indent
348: .ps \\n(]b\" restore prevailing current & previous point sizes
349: .ps \\n(]a
350: .sp .5v
351: .nr )n \\n(nlu
352: ..
353: '\" .S - point size, spacing, line length, margins, & indents
354: .de S
355: .if !\w@\\$1@ .ps\" if arg1 null, use previous ps;
356: .if \w@\\$1@ .if !\\$1+1 .ps \\$1\" if arg1<0, use as decr. on current ps;
357: .if \w@\\$1@ .if \\$1 .nr )y \\n(.s\" save current ps;
358: .if \w@\\$1@ .if \\$1 .nr )y \\$1\" if arg1>0, use as incr. on current ps,
359: '\" or as new ps;
360: .if \w@\\$1@ .if \\$1-99 .nr )y \\n()X\" if arg1>99, use default ps;
361: .if \w@\\$1@ .if \\$1 .ps \\n()y\" set new ps;
362: '\" if arg1=0, don't change ps.
363: .vs \\n(.sp*5u/4u
364: .ss 16
365: .nr )a 1i+\\n()Ku\" first level (left margin)
366: .nr ]c \\n(.s\" save prevailing current & previous point sizes
367: .ps
368: .nr ]d \\n(.s
369: .ps
370: .if \\n(.s-35 .nr )A \\n(.s-\\n()Q-\\n()Q-\\n()Q-\\n()Q
371: .if \\n(.s-19 .if !\\n(.s-35 .nr )A \\n(.s-\\n()Q-\\n()Q
372: .if !\\n(.s-19 .nr )A \\n(.s-\\n()Q
373: .ps \\n()A
374: .nr )b \w@\\*()B~@u\" second level indent for normal case (large bullet)
375: .ps
376: .if \\n(.s-35 .nr )A \\n(.s-\\n()R-\\n()R-\\n()R-\\n()R
377: .if \\n(.s-19 .if !\\n(.s-35 .nr )A \\n(.s-\\n()R-\\n()R
378: .if !\\n(.s-19 .nr )A \\n(.s-\\n()R
379: .ps \\n()A
380: .nr )c \\n()bu+\w@\\*()C~@u\" 3rd level indent for normal case (dash)
381: .ps
382: .if \\n(.s-35 .nr )A \\n(.s-\\n()S-\\n()S-\\n()S-\\n()S
383: .if \\n(.s-19 .if !\\n(.s-35 .nr )A \\n(.s-\\n()S-\\n()S
384: .if !\\n(.s-19 .nr )A \\n(.s-\\n()S
385: .ps \\n()A
386: .nr )d \\n()cu+\w@\\*()D~@u\" 4th level ind. for normal case (small bullet)
387: .ps \\n(]d\" restore prevailing current & previous point sizes
388: .ps \\n(]c
389: '\" TROUBLE if arg2<8u or arg2>7
390: .if \\n(.$-1 .nr )u \\$2\" default for arg2 is inches
391: .if \\n(.$-1 .if !\\n()uu-7u .nr )p \\$2i\" arg2 not dimensioned
392: .if \\n(.$-1 .if \\n()uu-7u .nr )p \\$2\" arg2 dimensioned
393: .nr )q \\n()pu-0i\" change the "0i" to pull in B right margin
394: .nr )r \\n()qu-0i\" change the "0i" to pull in C right margin
395: .nr )s \\n()ru-0i\" change the "0i" to pull in D right margin
396: .nr )T \\n(.sp*5u/4u\" try to protect bottom margin
397: .nr )E \\n()Ju-\\n()Tu\" move up end of foil trap
398: .ch )Z \\n()Eu
399: ..
400: '\" .I - indent for levels .A, .B, .C, & .D
401: .de I
402: .if !\w@\\$1@u .nr )k 0i
403: .if \w@\\$1@u .if !\\$1 .nr )u 0i-\\$1\" arg1 default is inches
404: .if \w@\\$1@u .if \\$1 .nr )u \\$1\" TROUBLE if arg1<8u or arg1>7
405: .if \w@\\$1@u .if !\\n()uu-7u .nr )k \\$1i\" arg1 not dimensioned
406: .if \w@\\$1@u .if \\n()uu-7u .nr )k \\$1\" arg1 dimensioned
407: .if \\n(.$-1 .A \\$3\" force to new left margin
408: '\" suppress space if \\$3 not null.
409: ..
410: '\" .A - first level (left margin)
411: .de A
412: .br
413: .if !\\n(.$ .if \\n(nlu-\\n()nu .sp \\*(]Au
414: .nr )n \\n(nlu
415: .po \\n()au
416: .in 0u+\\n()ku
417: .ll \\n()pu
418: .lt \\n()pu
419: ..
420: '\" .B - second level (normally large bullet)
421: .de B
422: .br
423: .if \\n(nlu-\\n()nu .sp \\*(]Bu
424: .nr )n \\n(nlu
425: .in \\n()bu+\\n()ku
426: .ll \\n()qu
427: .lt \\n()qu
428: .nr )l 0
429: .nr ]x \\n()bu\" set standard stub outdent amount
430: .if !\\n(.$ .)I \\*()B -\\n()Q
431: .if \\n(.$ .if !\\n(.$-1 .)I "\\$1" -0
432: .if \\n(.$-1 .if \\$2-99 .)I "\\$1~\|" -\\n()Q
433: .if \\n(.$-1 .if !\\$2-99 .nr )l 1
434: .if \\n(.$-1 .if !\\$2-99 .)I "\\$1" "\\$2"
435: ..
436: '\" .C - third level (normally em dash)
437: .de C
438: .br
439: .if \\n(nlu-\\n()nu .sp \\*(]Cu
440: .nr )n \\n(nlu
441: .in \\n()cu+\\n()ku
442: .ll \\n()ru
443: .lt \\n()ru
444: .nr )l 0
445: .nr ]x \\n()cu-\\n()bu\" set standard stub outdent amount
446: .if !\\n(.$ .)I \\*()C -\\n()R
447: .if \\n(.$ .if !\\n(.$-1 .)I "\\$1" -0
448: .if \\n(.$-1 .if \\$2-99 .)I "\\$1~\|" -\\n()R
449: .if \\n(.$-1 .if !\\$2-99 .nr )l 1
450: .if \\n(.$-1 .if !\\$2-99 .)I "\\$1" "\\$2"
451: ..
452: '\" .D - fourth level (normally small bullet)
453: .de D
454: .br
455: .if \\n(nlu-\\n()nu .sp \\*(]Du
456: .nr )n \\n(nlu
457: .in \\n()du+\\n()ku
458: .ll \\n()su
459: .lt \\n()su
460: .nr )l 0
461: .nr ]x \\n()du-\\n()cu\" set standard stub outdent amount
462: .if !\\n(.$ .)I \\*()D -\\n()S
463: .if \\n(.$ .if !\\n(.$-1 .)I "\\$1" -0
464: .if \\n(.$-1 .if \\$2-99 .)I "\\$1~\|" -\\n()S
465: .if \\n(.$-1 .if !\\$2-99 .nr )l 1
466: .if \\n(.$-1 .if !\\$2-99 .)I "\\$1" "\\$2"
467: ..
468: .de )I\" common part of level macros
469: .nr ]a \\n(.s\" save prevailing current & previous point sizes
470: .ps
471: .nr ]b \\n(.s
472: .ps
473: .if !\\n()l .if \\n(.s-35 .nr )A \\n(.s+\\$2+\\$2+\\$2+\\$2
474: .if !\\n()l .if \\n(.s-19 .if !\\n(.s-35 .nr )A \\n(.s+\\$2+\\$2
475: .if !\\n()l .if !\\n(.s-19 .nr )A \\n(.s+\\$2
476: .if \\n()l .nr )A \\n(.s+\\$2
477: .ps \\n()A
478: .ti -\w@\\$1~@u
479: \&\\$1~\&\c
480: .ps \\n(]b\" restore prevailing current & previous point sizes
481: .ps \\n(]a
482: ..
483: '\" .U - underline first of two concatenated strings
484: .de U
485: .if !\w@\\$[email protected] \&\\$1\v'.55m'\l'|0\(hy'\v'-.55m'\\$2
486: .if \w@\\$[email protected] \&\\$1\v'.09m'\l'|0\(ul'\v'-.09m'\\$2
487: ..
488: '\" .DV - default vertical pre-spacing
489: '\" Only dimensioned args!!
490: .de DV
491: .if \w@\\$1@ .ds ]A \\$1
492: .if \w@\\$2@ .ds ]B \\$2
493: .if \w@\\$3@ .ds ]C \\$3
494: .if \w@\\$4@ .ds ]D \\$4
495: ..
496: '\" .DF - default fonts
497: .de DF
498: .if \\n(.$-1 .ds )f "\\$2
499: .if \\n(.$-1 .fp \\$1 \\$2
500: .if \\n(.$-1 .ft \\$2
501: .if \\n(.$-3 .fp \\$3 \\$4
502: .if \\n(.$-5 .fp \\$5 \\$6
503: .if \\n(.$-7 .fp \\$7 \\$8
504: ..
505: '\" UPPER-CASE SYNONYMS FOR TROFF REQUESTS
506: '\" .SP
507: .de SP
508: .sp \\$1
509: ..
510: '\" .BR
511: .de BR
512: .br
513: ..
514: '\" .TA
515: .de TA
516: 'ta \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
517: ..
518: '\" .CE
519: .de CE
520: .ce \\$1
521: ..
522: '\" .TI
523: .de TI
524: .ti \\$1
525: ..
526: '\" .FI
527: .de FI
528: .fi
529: ..
530: '\" .NF
531: .de NF
532: .nf
533: ..
534: '\" .AD
535: .de AD
536: 'ad \\$1
537: ..
538: '\" .NA
539: .de NA
540: 'na
541: ..
542: '\" .HY
543: .de HY
544: 'hy \\$1
545: ..
546: '\" .NH
547: .de NH
548: 'nh
549: ..
550: '\" .SO
551: .de SO
552: 'so \\$1
553: ..
554: '\" .NX
555: .de NX
556: 'nx \\$1
557: ..
558: .ds )F \(bs FOIL
559: .if \n(.A .ds )F FOIL
560: .ds )N BTL
561: .ds )Y \n(mo/\n(dy/\n(yr
562: .ds )B \(bu~\|
563: .ds )C \(em~\|
564: .ds )D \(bu~\|
565: .ds ]A .5v\" level A pre-space
566: .ds ]B .5v\" level B pre-space
567: .ds ]C .5v\" level C pre-space
568: .ds ]D 0v\" level D pre-space
569: .nr )G 11i-7.5p\" page length for Tek scope
570: .nr )Q 2\" second level reduction
571: .nr )R 2\" third level reduction
572: .nr )S 4\" fourth level reduction
573: .nr )i 1\" first foil flag
574: .nr )w 0\" previous foil overflow flag (set=0)
575: .em )z \" plant an EOF trap
576: .DF 1 G\" set default font
577: '\" End of view graph & slide macros
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.