1 .de CZ
2 .br
3 .if !"\\$1"" \\$1
4 .br
5 .if !"\\$2"" \\$2
6 .br
7 .if !"\\$3"" \\$3
8 .br
9 .if !"\\$4"" \\$4
10 .br
11 .if !"\\$5"" \\$5
12 .br
13 .if !"\\$6"" \\$6
14 .br
15 .if !"\\$7"" \\$7
16 .br
17 .if !"\\$8"" \\$8
18 .br
19 .if !"\\$9"" \\$9
20 ..
21 .ds AZ \f(HBA\h'-.2m'T\h'-.15m'\s-3&\s0\h'-.15m'T\fP
22 .	\"S1 - tm style 
23 .de S1
24 .br
25 .sp |.5i
26 .ta 4.75i 5.25i
27 .ll 80
28 .ps 36
29 .br
30 .ie !'\*(Lb'' \t\(Lb\h'-.53i'\fH\s10Bell Laboratories
31 .el \t\(L1\s16\v'-.8'\\*(AZ\v'.8'\h'-\w'\\*(AZ'u'\fH\s10Bell Laboratories
32 .br
33 .sp 2
34 .ps 12
35 .br
36 .nr SJ \\n(.j
37 .na
38 .br
39 .ps 8
40 .vs 12p
41 .sp 2v
42 .mk
43 .ll
44 .ll 4.0i
45 Subject:
46 .ft 3
47 .br
48 .rt
49 .in +\w'Subject: 'u
50 .ps
51 '''\".nf
52 .fi
53 .hy 0
54 .WT
55 .hy 14
56 .ft 1
57 .br
58 .fi
59 .in 0
60 .vs 10
61 .if \\n(MC>0 \\s8Work Program- \\*(X1\\s10
62 .if \\n(MG>0 --\\s8 File- \\*(F1\\s10
63 .br
64 .if \\n(MC>1 \\s8\\h'\\w'Work Program- 'u'\\*(X2\\s10
65 .if \\n(MG>1 \\h'\\w'--\\s8 File- 'u'\\s8\\*(F2\\s10
66 .br
67 .if \\n(MC>2 \\s8\\h'\\w'Work Program- 'u'\\*(X3\\s10
68 .if \\n(MG>2 \\h'\\w'--\\s8 File- 'u'\\s8\\*(F3\\s10
69 .br
70 .if \\n(MC>3 \\s8\\h'\\w'Work Program- 'u'\\*(X4\\s10
71 .if \\n(MG>3 \\h'\\w'--\\s8 File- 'u'\\s8\\*(F4\\s10
72 .br
73 .if \\n(MC>4 \\s8\\h'\\w'Work Program- 'u'\\*(X5\\s10
74 .if \\n(MG>4 \\h'\\w'--\\s8 File- 'u'\\s8\\*(F5\\s10
75 .br
76 .if \\n(TO>0 \{\
77 .ps 8
78 .nf
79 .sp
80 To:
81 .in +\w'Subject: 'u
82 .sp -1v
83 .ps
84 .nf
85 .1T
86 .in \}
87 .vs
88 .rt
89 .ll 6.5i
90 .in 5.10i
91 .ps 8
92 .ti -6n
93 .ta 6n
94 date:\t\\s\\n(PS\\f3\\*(DY
95 .sp
96 .ft 1
97 .ps 8
98 .mk
99 .ti -6n
100 from:
101 .ps
102 .br
103 .rt
104 .nf
105 .ft 3
106 .A1
107 .if \\n(TO>0 \{\
108 \\*(D1
109 \\*(1L
110 .br \}
111 .if \\n(NA>1 .A2
112 .if \\n(NA>2 .A3
113 .if \\n(NA>3 .A4
114 .if \\n(NA>4 .A5
115 .if \\n(NA>5 .A6
116 .if \\n(NA>6 .A7
117 .if \\n(NA>7 .A8
118 .if \\n(NA>8 .A9
119 .ft 1
120 .sp
121 .mk
122 .ps 8
123 .ti -6n
124 .ft 1
125 .if \\n(IM=0 .if \\n(MM .if "\\*(MQ"" \{\
126 .if \\n(MN=0 .ds MQ TM:
127 .if \\n(MN=1 .ds MQ MF:
128 .if \\n(MN=2 .ds MQ MR:
129 .if \\n(MN=3 .ds MQ EN:\}
130 \\*(MQ
131 .br
132 .ti \\n(.iu
133 .rt
134 .ps
135 .ft 3
136 .hy 0
137 .ll 20i
138 .ll 7.75i-\\n(.ou
139 .fi
140 .na
141 .if \\n(MM .CZ \\*(MN
142 .\" ditched .CZ
143 .hy 14
144 .nf
145 .ft 1
146 .ll \\n(LLu
147 .in
148 .sp |\\n(.hu
149 .if \\n(IM=0 .sp
150 .ad \\n(SJ
151 .ce
152 .ft 2
153 .if \\n(IM=0 \\*(QF
154 .ft 1
155 .ce 0
156 .if \\n(IM=0 .sp
157 .fi
158 ..
159 .de TL
160 .br
161 .di WT
162 ..
163 .de AB
164 .br
165 .di
166 .rm WT TL AB AU
167 ..
168 .de AU
169 ..
170 .nr YE 1