1 '\" Copyright (c) 1984 AT&T
2 '\" All Rights Reserved
3 '\"#ident "@(#)macros:mmt.src 16.47a"
27 .if
\a\*(]S
\a\a .ds ]S \s14\f3\*(}Z\fP\s0
30 .dsF \v'-.4m'\s-3\\n+(:p\s0\v'.4m'
34 .dsLx LIST OF EXHIBITS
35 .dsLe LIST OF EQUATIONS
37 .dsRf \v'-.4m'\s-3[\\n+(:R]\s0\v'.4m'
39 .dsTm \v'-0.5m'\s-4TM\s+4\v'0.5m'
93 .if\w
\a\\$2
\a .rn }w \\$2
97 .ie\\n(.$ .nr ;G \\n(.f
99 .if\\n(.$ .if !\\n(.$-2 \&\f3\\$1\fP\\$2
101 .if
\a\\n(.f
\a2
\a .ds }i \^
102 .ds}I \&\f3\\$1\fP\\$2\\*(}i
104 .if\\n(.$-2 .if !\\n(.$-4 \\*(}I\f3\\$3\fP\\$4
105 .if\\n(.$-4 .if !\\n(.$-6 \\*(}I\f3\\$3\fP\\$4\\*(}i\f3\\$5\fP\\$6
109 .ie\\n(.$ .nr ;G \\n(.f
111 .if\\n(.$ .if !\\n(.$-1 \&\f2\\$1
112 .if\\n(.$-1 \{.ds }i \^
113 .if
\a\\n(.f
\a2
\a .ds }i
115 .if\w
\a\\$1
\a .ds }I \&\f2\\$1\fP\\*(}i
117 .if\\n(.$-1 .if !\\n(.$-3 \\*(}I\\$2\f2\\$3
118 .if\\n(.$-3 .if !\\n(.$-5 \\*(}I\\$2\f2\\$3\fP\\*(}i\\$4\f2\\$5
119 .if\\n(.$-5 \\*(}I\\$2\f2\\$3\fP\\*(}i\\$4\f2\\$5\fP\\*(}i\\$6
124 .}S 1 2 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
128 .}S 1 3 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
132 .}S 2 1 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
136 .}S 2 3 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
140 .}S 3 1 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
144 .}S 3 2 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6"
148 .if
\a\\$1
\a2
\a .if !
\a\\$5
\a\a .ds }i\^
149 .ie!
\a\\$4
\a\a .}S \\$2 \\$1 "\\$3\f\\$1\\$4\\*(}i" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
154 .ie\\n(.$-2 \&\\$1\s-1\\$2\s0\\$3
173 .if\w
\a\\*(10\\*(}E
\a \{\
175 .ie\\n(:Y>0 \{.if \\n(:Y<\w
\a\\*(10
\a .nr :Y \w
\a\\*(10
\a
176 \!\\*(10\h'\\\\n(.lu-\w
\a\\*(10\\*(]E
\au-\\\\n(.iu'\\*(]E
178 .el.ie \\n(:B=2 .tl \(ts\(ts\\*(10\(ts\\*(]E\(ts
179 .el.ie \\n(:B=1 .tl \(ts\h'\\n(Sin'\\*(10\(ts\(ts\\*(]E\(ts
180 .el.if \\n(:B=0 .tl \(ts\\*(10\(ts\(ts\\*(]E\(ts
183 .ie\\n(:Y>0 \{.if \\n(:Y<\w
\a\\*(10
\a .nr :Y \w
\a\\*(10
\a
184 \!\\\\h'-\\\\n(.iu'\\*(]E\\\\h'\\\\n(.iu-\\w
\a\\*(]E
\au'\\*(10
186 .el.ie \\n(:B=2 .tl \(ts\\*(]E\(ts\\*(10\(ts\(ts
187 .el.ie \\n(:B=1 .tl \(ts\h'\\n(Sin'\\*(]E\(ts\(ts\\*(10\(ts
188 .el.if \\n(:B=0 .tl \(ts\\*(]E\(ts\(ts\\*(10\(ts
207 .if\\n(:F .)D "H:missing FE"
208 .if\\n(:y .)D "H:missing DE"
209 .if!\\n(.$ .)D "H:missing arg"
212 .if\w
\a\\$1
\a-\w'0'u .nr ;0 1
213 .if\\n(;0 .)D "H:bad arg:\\$1"
218 .if!0\\$1 .nr ;1 \\n(Hu
219 .if!\\n(;1 .)D "H:bad arg:\\$1"
220 .if2-\\n(;1 .nr H2 0 1
221 .if3-\\n(;1 .nr H3 0 1
222 .if4-\\n(;1 .nr H4 0 1
223 .if5-\\n(;1 .nr H5 0 1
224 .if6-\\n(;1 .nr H6 0 1
225 .if7-\\n(;1 .nr H7 0 1
226 .if2-\\n(;1 \{.if \\n(:S .)w
227 .if\\n(:C .nr :p 0 1 \}
230 .if\\n(;1-1 .nr H\\n(;1 +1
231 .if!\\n(;1-1 \{.nr :u 1
233 .if\\n(;1-1 .if (\\n(Ej+1-\\n(;1)&(\\n(;L\{\
236 .if\\n(;1-1 .if (\\n(Ej+1-\\n(;1)&(\\n(nl-\\n(:J) \{.if \\n(;C .nr ;C 2
238 .if!\\n(;1-1 \{.if (\\n(Ej+\\n(:S)&(\\n(nl-\\n(:J) \{.if \\n(;C .nr ;C 2
240 .if!\\n(:u-1 .nr H1 +1
241 .if(\\n(:u=1)&(\\n(:S=1) .nr P 1 \}
244 .if0\\$1-1 .as }0 \\n(H2
245 .if0\\$1-2 .as }0 .\\n(H3
246 .if0\\$1-3 .as }0 .\\n(H4
247 .if0\\$1-4 .as }0 .\\n(H5
248 .if0\\$1-5 .as }0 .\\n(H6
249 .if0\\$1-6 .as }0 .\\n(H7
250 .if\\n(Ht \{.)I \\n(;1 \\n(H1 \\n(H2 \\n(H3 \\n(H4 \\n(H5 \\n(H6 \\n(H7
256 .if!\\n(;1-\\n(Hb .nr ;0 1
257 .if!\\n(;1-\\n(Hs .nr ;0 2
259 .if!\\n(;0 .if \w
\a\\$2
\a .ds }2 "
261 .HX \\n(;1 0\\$1 "\\$2\\$3"
264 .if(\\$1=1)&(\\n(Np=1) .nr !4 0
266 \&\\*(}0\\$2\\$3\\*(}2
270 .if\\n(;0-1 .nr ;3 +.5v
271 .ne\\n(;3u+\\n(dnu+.5p-1v
272 .HY \\n(;1 0\\$1 "\\$2\\$3"
280 .if((\\*(}3=0):(\w
\a\\*(}3
\a>0))&(\\n(;3=3)&(\\n(;0>0) .ps -1
281 .if!
\a\\*(}3
\a\a .if !
\a\\*(}3
\a0
\a .ps \\*(}3
283 .if\\n(;0 \{.in+\\n(;2u
286 .if!\\n(;1-\\n(Hc .if \\n(;0 .ce
289 .if!\\n(;0 \&\\$2\\$3\\*(}2\&\c
293 .if!\\n(;1-\\n(Cl .if \w
\a\\$2
\a .)E \\$1 "\\$2"
297 .if\\n(;0*\\n(Hi*\\n(Pt .if !\\n(Hi-1+\\n(Pt-1 .ti+\\n(Pin
298 .if0\\$1*\\n(;0 .if \\n(Hi-1 .ti\\n(;2u
302 .if(\\$1=1)&(\\nN=5) \{\
307 .HZ \\n(;1 0\\$1 "\\$2\\$3"
319 .if!\\n(.$ .)D "HU:missing arg"
323 .if4-\\n(.$ .)D "LB:missing arg(s)"
324 .)L 0\\$1n 0\\$2n 0\\$3n "\\$4" "\\$5" "\\$6" "\\$7"
327 .if\\n(:g>5 .)D "LB:too many nested lists"
329 .if!\\n+(:g-1 .ds ]b \\n(.i
335 .if!\w
\a\\$6
\a .nr :f 1
337 .if!\w
\a\\$5
\a \{.ds ]g \&
341 .if0\\$4 .af :a \\$5 1
342 .if(\\n(:g<=\\n(Ls)&(0\\$7) .SP .5
349 .if\\n(:g-0\\$1 .LC 0\\$1
352 .if(\\n(:I>1)&(\\n(nl-\\n(:J) .nr :I 0
354 .ie\\n(:g<1 .)D "LE:mismatched"
356 .if(\\n(:g<=\\n(Ls)&(\\n(.$>0) .SP .5
360 .if!\\n(:g .)D "LI:no lists active"
361 .if(\\n(:g<=\\n(Ls)&(\\n(:f>0) .SP .5
363 .if(\\n(:f)&(\\n(:D<1) .ne1v+.5p
365 .if\\n(:e .ds }0 \\n+(:a.
366 .if\\n(:e-1 .ds }0 \\n(:a)
367 .if\\n(:e-2 .ds }0 (\\n(:a)
368 .if\\n(:e-3 .ds }0 [\\n(:a]
369 .if\\n(:e-4 .ds }0 <\\n(:a>
370 .if\\n(:e-5 .ds }0 {\\n(:a}
371 .if\\n(.$-1 .ds }0 \\$1\ \\*(}0
372 .if\\n(.$=1 .ds }0 \\$1
375 .if\\n(:d .nr ;1 \\n(:bu-\\n(:du-\\n(;0u
377 .nr;0 \\n(:bu-\\n(;1u-\\n(;0u
379 .if!\\n(;0 .nr ;0 \w
\a \au
380 .if\w
\a\\*(}0
\a \&\\*(}0\h
\a\\n(;0u
\a\&\c
384 .if!\\n(.$-1 .)L \\n(Lin 0 2n 1 "\\$1"
385 .if\\n(.$-1 .if !\\n(.$-2 .LB 0\\$2 0 2 1 "\\$1"
386 .if\\n(.$-2 .if !\w
\a\\$2
\a .)L \\n(Lin 0 2n 1 "\\$1" 0 1
387 .if\\n(.$-2 .if \w
\a\\$2
\a .LB 0\\$2 0 2 1 "\\$1" 0 1
390 .if\\n(.$<1 .)L \\n(Pin 0 1n 0 \\*(BU
391 .if\\n(.$=1 .LB 0\\$1 0 1 0 \\*(BU
392 .if\\n(.$>1 \{.ie !\w
\a\\$1
\a .)L \\n(Pin 0 1n 0 \\*(BU 0 1
393 .el.LB 0\\$1 0 1 0 \\*(BU 0 1 \}
396 .if\\n(.$<1 .)L \\n(Pin 0 1n 0 \(em
397 .if\\n(.$=1 .LB 0\\$1 0 1 0 \(em
398 .if\\n(.$>1 \{.ie !\w
\a\\$1
\a .)L \\n(Pin 0 1n 0 \(em 0 1
399 .el.LB 0\\$1 0 1 0 \(em 0 1 \}
402 .if\\n(.$<1 .)D "ML:missing arg"
403 .nr;0 \w
\a\\$1
\au/3u/\\n(.su+1u
404 .ie\\n(.$<2 .LB \\n(;0 0 1 0 "\\$1"
405 .el.if \\n(.$<3 .LB 0\\$2 0 1 0 "\\$1"
406 .if\\n(.$>2 \{.ie !\w
\a\\$2
\a .LB \\n(;0 0 1 0 "\\$1" 0 1
407 .el.LB 0\\$2 0 1 0 "\\$1" 0 1 \}
410 .if\\n(.$<1 .LB 6 0 2 4
411 .if\\n(.$=1 .LB 0\\$1 0 2 4
412 .if\\n(.$>1 \{.ie !\w
\a\\$1
\a .LB 6 0 2 4 1 0 1
413 .el.LB 0\\$1 0 2 4 1 0 1 \}
416 .if\\n(.$<1 .)D "VL:missing arg"
417 .ie\\n(.$<3 .LB 0\\$1 0\\$2 0 0
418 .el.LB 0\\$1 0\\$2 0 0 \& 0 1
421 .if!(((\\n(!D=\\n(nl):(\\n(!D=(\\n(nl-.5v)))&(\\n(!Z=\\n(.k)&(\\n(Np=0)) \{\
426 .if!\\n(:D .ne 1v+.5p
427 .ie!\\n(;1-\\n(:J .nr ;2 \\n(;2-\\n(:J
428 .el.nr ;2 \\n(nl-\\n(:J
430 .if\\n(.$>0&(0\\$1) .ti+\\n(Pin
432 .if\\n(Pt=1 .ti+\\n(Pin
433 .if\\n(Pt>1&(\\n(:I) .ti+\\n(Pin
434 .if\\n(Pt>1&(\\n(:I=0)&(\\n(:J>0) .ti+\\n(Pin \}
448 .wh\\n(.du+\\n(.L+\\n(.L
450 .ch)p \\n(.du+\\n(.L+\\n(.L
453 \\n(H2.\\n+(!5\h'|6n'\\c
456 .if!\\n(:Q .nr :Q \\nS
457 .if!\\n(.$ .nr ;0 \\n(:Q
458 .if\\n(.$ .if !\w
\a\\$1
\a \{\
475 .nr;0 \\$1 \}\}\}\}\}
476 .if0\\$1-99 .nr ;0 \\nS
477 .if!\\n(;0 .)D "S:bad arg \\$1"
482 .if!\\n(!Q .nr !Q \\nS+2
490 .if\\n(.$-1 .if !\w
\a\\$2
\a \{\
507 .nr;7 \\$2 \}\}\}\}\}
508 .if0\\$2-99 .nr ;7 \\n(.s+2
509 .if!\\n(;7 .)D "S:bad arg \\$2"
521 .if\\n(.$ \{.if \\$1-1 .)D "SA:bad arg:\\$1"
532 .if\\n(;9+1 .SK \\n(;9
543 .el.ie !'\\n(.z'' .)S \\$1
546 .if\\n(.$ .nr ;4 \\$1v
547 .if!(\\n(nl=\\n(:N) .nr :A 0
549 .if\\n(;4 \{.sp\\n(;4u
555 .if!'\\n(.z'\\*(}D' .rr ;D ;E
557 .if\\n(.$ .nr ;4 \\$1v
558 .if!(\\n(.d=\\n(;D) .nr ;E 0
560 .if\\n(;4 \{.sp\\n(;4u
566 .if(\\n(:D=0)&(\\n(Ds>0) .SP
569 .wh\\n(nlu+\\n(.tu-2v #f
574 .if\\n(.du>0.5v \{.nr T. 0
580 .if\\n(;T .if !
\a\\$1
\aN
\a .nr ;T 0
595 .if(\\n(:D=0)&(\\n(Ds>0) .SP
596 .if(\\n(;A>0)&(\\n(;B=0) \{.br
598 .)D "TE: used TS H but no TH" \}
602 .rma+ b+ c+ d+ e+ f+ g+ h+ i+ j+ k+ l+ n+ m+
603 .rr32 33 34 35 36 37 38 40 79 80 81 82
604 .rra| b| c| d| e| f| g| h| i| j| k| l| m|
605 .rra- b- c- d- e- f- g- h- i- j- k- l- m-
630 .if\\n(:e .af :a \\*(]g
634 .ds\\$3 \\$5 \\$6 \\$7 \\$8 \\$9
643 ERROR:(\\n(.F)input line \\n(.c:\\$1
646 .tm********************
647 .tmERROR:(\\n(.F)input line \\n(.c:\\$1
648 .tm********************
653 .ie\\nN=5 .)F TABLE 1 \\n+(Tb "\\$1" "\\n(H1-" 0
654 .el.)F TABLE 1 \\n+(Tb "\\$1" "\\$2" 0\\$3
658 .ie\\nN=5 .)F Equation 2 \\n+(Ec "\\$1" "\\n(H1-" 0
659 .el.)F Equation 2 \\n+(Ec "\\$1" "\\$2" 0\\$3
663 .ie\\nN=5 .)F Exhibit 3 \\n+(Ex "\\$1" "\\n(H1-" 0
664 .el.)F Exhibit 3 \\n+(Ex "\\$1" "\\$2" 0\\$3
668 .ie\\nN=5 .)F Figure 0 \\n+(Fg "\\$1" "\\n(H1-" 0
669 .el.)F Figure 0 \\n+(Fg "\\$1" "\\$2" 0\\$3
676 .if\\n(;0 .ds }0 \\$5\\$3
677 .if\\n(;1*\\n(;0 .ds }0 \\$3\\$5
678 .if\\n(;1-1*\\n(;0 .ds }0 \\$5
680 .ie(\w
\a\\$4
\a)&(\\n(Of=0) .as }0 .\ \
681 .el.if \\n(Of .as }0 " -\
684 .nr;1 \\n(.lu-\\n(;0u-\w
\a\\$4
\au+1u
685 .if(\\n(:B<2)&(\\n(;1>0) \{\
701 .if(\\n(Lf=1&(\\$2=0)):(\\n(Lt=1&(\\$2=1)):\
702 (\\n(Le=1&(\\$2=2)):(\\n(Lx=1&(\\$2=3)) \{\
704 .if\\n(:S .ds }3 \\n(H1
708 \!\\!.if \\$2=\\\\\\\\\\\\\\\\$1 .)T 1 1 "\\*(}0" "\\$4" \\\\\\\\nP \\*(}3
713 \!.if \\$2=\\\\\\\\$1 .)T 1 1 "\\*(}0" "\\$4" \\\\nP \\*(}3
718 .if\\$2=\\\\$1 .)T 1 1 "\\*(}0" "\\$4" \\nP \\*(}3
728 .if\\n(:S .ds }3 \\n(H1
730 .)T \\n(;1 \\$1 "\\*(}0" "\\$2" \\nP \\*(}3
735 .if\w
\a\\$6
\a .nr ;0 +\w'-'u+\w
\a\\$6
\au
736 .if\\n(;0-\\n(:a .nr :a \\n(;0
737 .)I \\$1 \\n(H1 \\n(H2 \\n(H3 \\n(H4 \\n(H5 \\n(H6 \\n(H7
738 .if\w
\a\\$3
\a-\\*(}3 .nr H\\$1 \w
\a\\$3
\a
741 .if!0\\$1-\\n(:b .sp\\n(:cu*.5v
749 .if\\n(.$-5 .ds }3 \\$6\(hy\\$5
750 .nr:e \\n(:au-\w
\a\\*(}3
\au+2n
751 .ds}3 \h
\a\\n(:eu
\a\\*(}3
754 .if\\n(;0 .as }y \h
\a\\n(;0u
\a
755 .if2-0\\$1 .as }y "\\$3
756 .if0\\$1-1 .ds }y "\\$3\\*(}y
765 .if!0\\$1-\\n(:d .if !\\n(:f \\*(}y\\$4\\\\f3\\a\\\\fP\\*(}3
766 .if!0\\$1-\\n(:d .if \\n(:f \\*(}y\\$4\\t\\*(}3
767 .if0\\$1-\\n(:d \\*(}y\\$4\\*(}3
813 .rm)E )F DE DF DS FD FE FG FS H HU TB
814 .if!\\nP-1 .if \\nN .if !\\nN-1 .rn }t }b
815 .if!\\nP-1 .if \\nN .if !\\nN-1 .nr N 0
825 .ds}b ''- \\\\n(;g -''
833 .if\\n(;C .ll \\n(:Lu
844 .if\\n(;C .ll \\n(:lu
847 .if\w
\a\\$1
\a .nr :b 0\\$1
849 .if\w
\a\\$2
\a .nr :c 0\\$2
851 .if\w
\a\\$3
\a .nr :d 0\\$3
853 .if\w
\a\\$4
\a .nr :f 0\\$4
872 .ds}0 \\n(H1 \\n(H2 \\n(H3 \\n(H4 \\n(H5 \\n(H6 \\n(H7
879 .if!\w'\\*(Ci' .ds Ci 0 \\n(H1 \\n(H2 \\n(H3 \\n(H4 \\n(H5 \\n(H6
880 .ds}2 \\n(H1 \\n(H2 \\n(H3 \\n(H4 \\n(H5 \\n(H6 \\n(H7
885 .if(\\n(Lf=1)&(\\n(!0>0) .)Z "\\*(Lf" 0
886 .if(\\n(Lt=1)&(\\n(!1>0) .)Z "\\*(Lt" 1
887 .if(\\n(Lx=1)&(\\n(!3>0) .)Z "\\*(Lx" 3
888 .if(\\n(Le=1)&(\\n(!2>0) .)Z "\\*(Le" 2
919 .if(\\n(;z>0)&(\\n(Au>0) .sp
921 .if\\n(Au>0 \{.if \w
\a\\$3
\a .ie
\a\\$3
\aHP
\a HP\ \&\c
924 .if\w
\a\\$3
\a .if !\w
\a\\$4
\a \&
925 .if\w
\a\\$6
\a \\$6\ \&\c
927 .if\w
\a\\$6
\a .if !\w
\a\\$5
\a \&
938 .if!\\n(:V .ds }v \\$3-\\$4-\\$2
939 .if\\n(:V .as }v /\\$2
951 .if'\\$3'AL' .ds }L }B
952 .if'\\$3'ALC' .ds }L }B
953 .if'\\$3'CP' .ds }L PY
954 .if'\\$3'FJ' .ds }L HO
955 .if'\\$3'HK' .ds }L HL
956 .if'\\$3'HOH' .ds }L HO
957 .if'\\$3'HOH' .nr :H 1
958 .if'\\$3'HP' .ds }L }A
959 .if'\\$3'HR' .ds }L RR
960 .if'\\$3'INH' .ds }L }I
961 .if'\\$3'IW' .ds }L IH
962 .if'\\$3'IX' .ds }L IH
963 .if'\\$3'LC' .ds }L WV
964 .if'\\$3'LZ' .ds }L }K
965 .if'\\$3'MO' .ds }L }M
966 .if'\\$3'MT' .ds }L RR
967 .if'\\$3'PK' .ds }L }P
968 .if'\\$3'RD' .ds }L }E
969 .if'\\$3'RR' .ds }L PY
970 .if'\\$3'SF' .ds }L CP
971 .if'\\$3'SZ' .ds }L }F
972 .if'\\$3'WI' .ds }L }W
982 .if\\\\n(:2 .if \\n(:H \\\\*(}H
983 .if\\\\n(:2 \\\\*(\\*(}L
996 .if(\w'\\*(>1')&(\w'\\*(>2') \{\
997 .ie'\\*(>1'\\*(>2' \{\
999 Work Project No. and Filing Case \\*(>1
1003 Work Project No. \\*(>1
1007 .if(\w'\\*(>1'=0):(\w'\\*(>2'=0) \{\
1009 - Work\ Project\ No.\ \\*(>1
1011 .el.ie \w'\\*(>2' \{\
1084 .if\\n(:t=1 .nr ;s \\n(:s
1086 .if\\n(.$-1 .nr :3 0\\$2n
1094 .ll0u-2u*\\n(:3u+\\nWu
1098 .el.ie '\\$3'AD' ADDENDUM
1114 .if\\n(:t=1 .nr :s \\n(;s
1122 .rmTL TM OK AS AE AF AU
1128 .ie\w
\a\\$1
\au<2n .if !0\\$1=4 .if \\n(.$=2 .ds ]n \\$2
1129 .el.if \\n(.$=2 .ds ]n \\$2
1131 .if\\n(.$ .if \w
\a\\$1
\au-\w'0'u .>6 "\\$1"
1132 .if\\n(.$ .nr ;y 0\\$1
1133 .if\\n(.$ .if !\\n(;y .>6 ""
1134 .if\\n(.$ .if \\n(;y-4 .>x
1135 .if\\n(.$ .if \\n(;y-3 .>5 "\\$2"
1136 .if\\n(.$ .if \\n(;y-2 .>6 "ADMINISTRATIVE MEMORANDUM"
1137 .if\\n(.$ .if \\n(;y-1 .>6 "INTERNAL MEMORANDUM"
1138 .if\\n(.$ .if \\n(;y .>6 "TECHNICAL MEMORANDUM"
1142 .ta.5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i
1158 PRIVATE\h'-\w'PRIVATE'u'\l'\w'PRIVATE'u'
1174 .if\\n(:2u-\\n(nlu .sp |\\n(:2u
1187 PRIVATE\h'-\w'PRIVATE'u'\l'\w'PRIVATE'u'
1190 .ie!(\\nA=3) \t\\*(]S
1191 .el.if \w
\a\\*(}Z
\a \t\s16\f3\\*(}Z\fP\s0
1195 \!.po -\w'\s8subject:\s0'u+1n
1229 .if\\n(:9u-\\n(;zu-2v-\\n(;xv .sp \\n(:9u-\\n(;zu-2v-\\n(;xv
1258 'if!\\n(.pu-\\n(nlu-.5p-\\n(:ou 'nr :o \\n(.pu-\\n(nlu-.5p
1259 'if!\\n(:ou-\\n(:mu 'nr :o \\n(:mu
1262 .tmWARNING: Approved ITDS Document Cover Sheet not available with this package.
1276 .if!\\n(.$ TECHNICAL MEMORANDUM
1277 .if\\n(.$ .if \w
\a\\$1
\a \\$1
1292 PRIVATE\h'-\w'PRIVATE'u'\l'\w'PRIVATE'u'
1296 .ds}A "South Plainfield, New Jersey 07080
1297 .ds}B "Allentown, Pennsylvania 18103
1298 .ds}E "Reading, Pennsylvania 19604
1299 .ds}F "Springfield, New Jersey 07081
1300 .ds}H "Crawford Hill Laboratory
1301 .ds}I "Indianapolis, Indiana 46250
1302 .ds}K "Lincroft, New Jersey 07738
1303 .ds}M "Morristown, New Jersey 07960
1304 .ds}P "Parsippany, New Jersey 07054
1305 .ds}W "Ward Hill, Massachusetts 01830
1306 .dsAK "Norcross, Georgia 30071
1307 .dsCB "Columbus, Ohio 43213
1308 .dsCH "Chester, New Jersey 07930
1309 .dsCP "Summit, New Jersey 07901
1310 .dsDR "Denver, Colorado 80234
1311 .dsHL "Short Hills, New Jersey 07078
1312 .dsHO "Holmdel, New Jersey 07733
1313 .dsIH "Naperville, Illinois 60566
1314 .dsIN "Indianapolis, Indiana 46206
1315 .dsMH "Murray Hill, New Jersey 07974
1316 .dsMV "North Andover, Massachusetts 01845
1317 .dsPY "Piscataway, New Jersey 08854
1318 .dsRR "Middletown, New Jersey 07748
1319 .dsWB "West Long Branch, New Jersey 07764
1320 .dsWH "Whippany, New Jersey 07981
1321 .dsWV "Warren, New Jersey 07060
1342 .if\w
\a\\$1
\a .nr :2 1
1349 .if!\\n(:2 .if \\n(:H \\*(}H
1353 .if\\n(;3 .if !\\n(:t .in +\\n(:3u
1354 .if\\n(;3 .if !\\n(:t .>3
1355 .if\\n(;3 .if !\\n(:t .in -\\n(:3u
1356 .if\\n(;3 .if !\\n(:t .sp
1360 .rm)Y >6 PY MH WH HO RR }H WB }A }B }E HL }I
1361 .rmAK CP CH CB DR IN IH MV WV SG )N )M
1375 .ie(\\n(;F=5)&(\\n(:D) .)D "check WA, WE, IA, IE, LT sequence"
1376 .el.if \\n(:D .ie !\\n(:t=2 .)D "check TL, AU, AS, AE, MT sequence"
1377 .el.)D "check TL, AU, AS, AE, NS, NE, MT sequence"
1378 .rm)X )Y >T >x >z >1 >2 >3 >4 >5 >6 >7 >8 >9 }z
1379 .rr;x ;y ;z :D :1 :2 :3 :9 ;0 ;1 ;2 ;3
1380 .rmTL AU TM AF AS AE OK
1385 \!.tm WARNING: Approved ITDS Document Cover Sheet not available with this package.
1399 \!.if \\n(:2=0 .sp.5v
1400 \!.if \\n(:2=0 \\*(}Z
1401 \!.if \\n(:2=0 .if \\n(:H \\*(}H
1402 \!.if \\n(:2=0 \\*(}z
1419 .nr;c \\n(.pu-\\n(dnu-8v
1421 \!.ie \\n(;cu-\\\\n(nlu .sp \\n(;cu-\\\\n(nlu
1437 .if!\\nP-1 .if \\nN .if !\\nN-1 .rn }t }b
1438 .if!\\nP-1 .if \\nN .if !\\nN-1 .nr N 0
1457 .ta.5i 1i 1.5i 2i 2.5i 3i 3.5i 4i 4.5i 5i 5.5i 6i
1475 .elYours very truly, \}
1479 .elYours very truly, \} \}
1483 .elYours very truly, \}
1488 .if\\n(:F .)D "SG:missing FE"
1489 .if\\n(:y .)D "SG:missing DE"
1501 .if\\n(;F<3 .in (\\n(.lu/2u)
1503 .if\w
\a\\*(}9
\a \\*(}9 \}
1507 .traAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
1508 .ie\w
\a\\*(}9
\a \\*(}8, \\*(}9
1510 .traabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz\}
1515 .if!\\n(:V .)D "SG:no authors"
1516 .if\w
\a\\$1
\a .as }v -\\$1
1538 .if\w
\a\\$1
\au-\w'\0\0'u .nr ;0 50
1539 .if\\n(;0 .ds }4 "Copy (with att.) to
1540 .if\\n(;0-1 .ds }4 "Copy (without att.) to
1541 .if\\n(;0-2 .ds }4 "Att.
1542 .if\\n(;0-3 .ds }4 "Atts.
1543 .if\\n(;0-4 .ds }4 "Enc.
1544 .if\\n(;0-5 .ds }4 "Encs.
1545 .if\\n(;0-6 .ds }4 "U.S.C.
1546 .if\\n(;0-7 .ds }4 "Letter to
1547 .if\\n(;0-8 .ds }4 "Memorandum to
1548 .if\\n(;0-9 .ds }4 "Copy (with atts.) to
1549 .if\\n(;0-10 .ds }4 "Copy (without atts.) to
1550 .if\\n(;0-11 .ds }4 "Abstract only to
1551 .if\\n(;0-12 .ds }4 "Complete memorandum to
1552 .if\\n(;0-13 .ds }4 "Copy (\\$1) to
1553 .if\\n(.$-1 .ds }4 \&\\$1
1555 .if!\\n(!N .ds }5 \\*(}4
1558 .if\\n(!N .if !\\n(;F .sp
1581 .ie!\\n(;C See next page
1584 .nr!U \\n(;0>=\\n(.tu
1586 .ie!\\n(;C .ds ]w Continued next page
1587 .el.ds ]w Continued next column
1588 .ds]x \\\\*(}4\ \-\ contd.
1589 .ch)f -(\\n(:ou+1v) \}
1613 \l'3i'\h'.3i\l'1.5i'
1614 \\$1\h'|4i-(\w'Da'u)'Date
1619 .if!\\n(.$ .)D "ND:missing arg"
1624 .if\w
\a\\n(}Z
\a .nr A 3 '
1637 .if\\n(:Z \{.nr P \\n%
1639 .if\\n(:u*\\n(:S .nr P 1
1640 .if\\n(:u=1 \{.nr H1 +1
1655 .if\\n(;d=0&\\n(:z>0 \{\
1658 'el'if \\n(Df>1 ')z \}
1663 .if!((\\n(!C=\\n(.h)&(\\n(!B=0)) .mk ;m
1665 .if\\n(;A>0 \{.nr ;h \\n(.i
1672 .if!
\a\\*(]x
\a\a \\*(]x
1675 .if!
\a\\*(]w
\a\a \\*(]w
1679 'nr;y \\n(.pu-\\n(nlu-\\n(:mu
1680 'if\\n(:s \{'ie \\n(;y-4v .)o
1690 .ie
\a\\*(]w
\a\a 'ch )f -\\n(:ou
1691 .el'ch )f -(\\n(:ou+1v)
1720 .ie(\\n(Pv=1)&(\\n(;P>1) 'sp 2
1723 PRIVATE\h'-\w'PRIVATE'u'\l'\w'PRIVATE'u'
1726 .if!\\n(;P-1 .if \\nN 'sp
1727 .if!\\n(;P-1 .if \\n(:S .tl \\*(}t
1728 .if!\\n(;P-1 .if !\\nN .tl \\*(}t
1729 .if\\n(;P-1 .ie \w'\\*(]n' .tl '\\*(]n - \\nP'''
1731 'if!\\n(;P%2 'tl \\*(}e
1732 'if\\n(;P%2 'tl \\*(}o
1736 .ie
\a\\$1
\a\a . nr ;t 0
1737 .el.ie
\a\\$1
\aPM6
\a . nr ;t 6
1738 .el.ie
\a\\$1
\aILL
\a . nr ;t 5
1739 .el.ie
\a\\$1
\aPM5
\a . nr ;t 5
1740 .el.ie
\a\\$1
\aRS
\a . nr ;t 4
1741 .el.ie
\a\\$1
\aPM4
\a . nr ;t 4
1742 .el.ie
\a\\$1
\aCP
\a . nr ;t 3
1743 .el.ie
\a\\$1
\aPM3
\a . nr ;t 3
1744 .el.ie
\a\\$1
\aRG
\a . nr ;t 2
1745 .el.ie
\a\\$1
\aPM2
\a . nr ;t 2
1754 \!. tl
\a\a\\*(]m
\a\a
1755 \!. tl
\a\a\\*(]o
\a\a
1756 \!. tl
\a\a\\*(]p
\a\a
1757 \!. tl
\a\a\\*(]q
\a\a
1761 \!. tl
\a\a\\*(]i
\a\a
1762 \!. tl
\a\a\\*(]j
\a\a
1763 \!. tl
\a\a\\*(]k
\a\a
1764 \!. tl
\a\a\\*(]l
\a\a
1768 \!. tl
\a\a\\*(]U
\a\a
1769 \!. tl
\a\a\\*(]V
\a\a
1770 \!. tl
\a\a\\*(]W
\a\a
1771 \!. tl
\a\a\\*(]X
\a\a
1775 \!. tl
\a\a\\*(]I
\a\a
1776 \!. tl
\a\a\\*(]J
\a\a
1777 \!. tl
\a\a\\*(]K
\a\a
1778 \!. tl
\a\a\\*(]L
\a\a
1782 \!. tl
\a\a\\*(]A
\a\a
1783 \!. tl
\a\a\\*(]F
\a\a
1784 \!. tl
\a\a\\*(]G
\a\a
1785 \!. tl
\a\a\\*(]H
\a\a
1789 \!. tl
\a\a\\*(]M
\a\a
1790 \!. tl
\a\a\\*(]O
\a\a
1791 \!. tl
\a\a\\*(]Q
\a\a
1792 \!. tl
\a\a\\*(]R
\a\a
1810 .ie!\\n(;P%2 .tl \\*(}f
1813 .ie\\nN=1 .tl \\*(}t
1834 'if\\n(;d=0&\\n(:z>0 \{\
1837 'el'if \\n(Df>1 ')z \}
1840 .if\\n(;A>0 \{.nr ;h \\n(.i
1847 .if\\n(;C&\\n(;a=1&\\n(!K=1 'wh \\n(!Eu+1v )a
1854 .if!\\n(.$ .nr ;l \\n(.lu*8u/17u
1855 .if!\\n(.$ .nr ;o \\n(.lu*9u/17u
1856 .if\\n(.$ .nr ;l \\$1u*1.3n
1857 .if\\n(.$ .nr ;o \\nWu-\\n(;lu
1873 .if\\n(;C>1 .sp |\\n(.hu
1897 .ie
\a\\$1
\aN
\a \{.nr ;a 0
1901 .el.ie
\a\\$1
\aWD
\a .nr ;a 1
1902 .el.ie
\a\\$1
\aWF
\a .nr ;b 1
1903 .el.ie
\a\\$1
\aFF
\a .nr ;j 1
1904 .el.ie
\a\\$1
\aFB
\a .nr ;p 1
1905 .el.ie
\a\\$1
\a-WD
\a .nr ;a 0
1906 .el.ie
\a\\$1
\a-WF
\a .nr ;b 0
1907 .el.ie
\a\\$1
\a-FF
\a .nr ;j 0
1908 .el.ie
\a\\$1
\a-FB
\a .nr ;p 0
1909 .el')D "WC: unknown option"
1910 .if\\n(.$ .WC \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
1923 .if(\\n(;l>0)&(\\n(;C=0) \{\
1932 .ie\\n(;W=1 .nr W \\n(;lu
1933 .el.if \\n(;W=2 .nr W \\n(:Lu
1953 .ie0\\$1>=0 .nr !X 0\\$1
1971 .ie(\\n(dn=0)&(0\\$2=0) \{\
1976 .ie0\\$2>0 .nr ?\\$1 0\\$2
1977 .el.nr ?\\$1 \\n(dn \}
1979 .nr:U \\n(?1+\\n(?2+\\n(?3+\\n(?4+\\n(?5+1v
1980 .if(\\n(:Uu+\\n(:Mu)>(\\n(.pu-\\n(nlu-.5v) .SK
1982 .nr:o +(\\n(:Uu-\\n(?0u)
1985 .nr:m \\n(:Mu+\\n(:Uu
1990 .if\\n(:F .)D "FS:missing FE"
1992 .if\\n(:y .)D "FS:missing DE"
1998 .ie(\\n(;C>0)&((\\n(;b=1):((\\n(;j=1)&(\\n(!F=1))) \{\
2001 .el.if ((\\n(;C=0)&(\\n(;j=1)&(\\n(!F=2)) .>N
2013 'if\\n(.$ 'ds }y \\$1\
2014 'if!\\n(.$ 'ds }y \\*(]y.\
2015 'if\\n(:k \\*(}y\&\c
2016 'if!\\n(:k 'nr ;v \w
\a\0\0.\
\a
2017 'if!\\n(:k 'nr ;u \w
\a\\*(}y
\a
2018 'if!\\n(:k 'in +\\n(;vu
2019 'if!\\n(:k 'if !\\n(:l 'ti -\\n(;vu
2020 'if!\\n(:k 'if !\\n(:l 'if !\\n(;u-\\n(;v \\*(}y\h
\a\\n(;vu-\\n(;uu
\a\&\c
2021 'if!\\n(:k 'if !\\n(:l 'if \\n(;u-\\n(;v \\*(}y\&\c
2022 'if!\\n(:k 'if \\n(:l 'if \\n(;v-\\n(;u 'ti -\\n(;uu
2023 'if!\\n(:k 'if \\n(:l 'if !\\n(;v-\\n(;u 'ti -\\n(;vu
2024 'if!\\n(:k 'if \\n(:l \\*(}y\&\c
2027 .if!\\n(:F .)D "FE:no FS active"
2031 .if\\n(;c .nr :D \\n(;c
2048 .if!((\\n%=0)*(\\n(:D=3)*(\\n(:t=1):(\\n(;X)) \{\
2059 .if!((\\n%=0)*(\\n(:D=3)*(\\n(:t=1):(\\n(;X)) \{\
2060 .if!((\\n(!A=1):((\\n(;C=2)&(\\n(!F=1))) \{\
2061 'if!\\n(:s-1 'nr dn +4v+.5p
2064 'if!\\n(.pu-\\n(nlu-.5p-\\n(:ou 'nr :o \\n(.pu-\\n(nlu-.5p
2065 'if!\\n(:ou-\\n(:mu 'nr :o \\n(:mu
2070 .ie(\\n(!F=1)&(\\n(;C=1) \{\
2078 'nr;5 \\n(.pu-\\n(:ou+.5p
2079 .if!\\n(!H 'if \\n(;5u>\\n(nlu 'sp |\\n(;5u+.5p
2080 'nr;5 \\n(.pu-\\n(nlu-1v-\\n(:mu
2084 .ie\\n(:n=0 \{.ie \n(.A=0 \l'72p'
2086 .el\{.ie \n(.A=0 \l
\a\\n(.lu
\a
2087 .el_____________________________ \}
2090 .if\\n(!A .wh (\\n(nlu-2v) )Q
2101 .if\\n(dn=1v .nr dn 0
2106 .if\\n(dn=0 .rr !F \}
2162 'if\\n(.$ 'nr ;z \\$1
2163 'if\\n(;z-11 'nr ;z 0
2164 'if\\n(;z-7 'nr :l 1
2165 'if\\n(;z-7 'nr ;z -8
2166 'if\\n(;z-3 'nr :k 1
2167 'if\\n(;z-3 'nr ;z -4
2168 'if\\n(;z-1 'nr :j 1
2169 'if\\n(;z-1 'nr ;z -2
2171 'if\\n(.$-1 .nr :C 1
2176 .)J "\\$1" "\\$2" "\\$3"
2181 .)J "\\$1" "\\$2" "\\$3"
2187 .if\\n(:D>1 \{.ie \\n(:t=0 .)D "DS:illegal inside TL or AS"
2188 .el.)D "DF:illegal inside TL or AS" \}
2189 .if\\n(:F \{.ie \\n(:t=0 .)D "DS:missing FE"
2190 .el.)D "DF:missing FE"
2192 .if\\n(:y \{.ie \\n(:t=0 .)D "DS:missing DE"
2193 .el.)D "DF:missing DE"
2196 .if(\\n(;C>0)&(\\n(;a=1) .>W
2197 .if(\\n(;C=2&\\n(;a=1)&\\n(!K 'bp
2203 .if
\a\\$1
\aL
\a .nr ;z 0
2204 .if
\a\\$1
\aI
\a .nr ;z 1
2205 .if
\a\\$1
\aC
\a .nr ;z 2
2206 .if
\a\\$1
\aCB
\a .nr ;z 3
2207 .if\\n(;z>3 .nr ;z 3
2209 .if\\n(:t=0 .if \\n(;z<2 .ll -\\n(;iu
2210 .if\\n(;z=1 .in +\\n(Sin
2211 .if\\n(;z=2 \{.ce 9999
2213 .if\\n(:B=3 \{.nr :Y 1
2218 .if
\a\\$2
\aN
\a .nr ;z 0
2219 .if
\a\\$2
\aF
\a .nr ;z 1
2226 .if!((\\n(;C=2)&(\\n(!\\n(;w=1)) \{\
2235 .if\\n(!\\n(;w=1 .nr !B 1
2244 .if\\n(nl>\\n(:J .nr :I 0 \}
2257 .ie(\\nC=4):(\\nC=5) .nr ;Q 2
2259 .if(\\n(:I=2):(\\n(;z+\\n(;pv+\\n(;Qv<\\n(.t):\
2260 ((\\n(;z>(\\n(.p-\\n(;r-\\n(:m))&(\\n(nl<(\\n(.p-\\n(;r-\\n(:o/2u+\\n(;r))) \{\
2261 'ie\\n(:I<2 .if \\n(;p .br
2262 'el.if \\n(:Ju<\\n(nlu .if \\n(;p .br
2268 'if\\n(:v=\\n(:z \{\
2281 'if\\n+(:z>25 ')D "DF: too many displays"
2286 .if(\\n(;C>0)&(\\n(;a=0) .nr !\\n(;w 2
2288 'if!((\\n(;C>0)&(\\n(!\\n(;w=1)) 'if (\\n(:z=1)&((\\n(Df%2=1):(\\n(Df>5)) ')y
2295 'ie\\n(:v>\\n(:z ')s
2305 .if\\n(:t>1 .in -\\n(;iu
2312 .if\\n(nl>\\n(:J .nr :I 0 \}
2322 .if(\\n(:0>=\\n(.t)&((\\n(:0<(\\n(.p-\\n(;r-\\n(:m)):\
2323 (\\n(nl>(\\n(.p-\\n(;r-\\n(:o/2u+\\n(;r))) \{\
2329 .if!\\n(:y .)D "DE:no DS or DF active"
2333 .if\\n(dl>\\n(:Y .nr :Y \\n(dl
2334 .if\\n(:Y<\\n(.l .in (\\n(.lu-\\n(:Yu)/2u
2351 .if\\n(:t-1 .nr ;x -2
2371 .if\\n(;R=2 .)D "RS:missing RF"
2374 .if\\n(.$ .ds \\$1 \v'-.4m'\s-3[\\n(:R]\s0\v'.4m'
2379 'ti-\w
\a\\*(]r.\
\au
2386 .if!(\\n(;R=2) .)D "RF: no RS active"
2389 \!.if \\\\n(Ls .sp .5
2396 .if\\n(;R=2 .)D "RP: missing RF"
2399 .if!(0\\$1) .nr :R 0 1
2401 .ie(0\\$2=2):(0\\$2=3) \{\
2416 .)T 1 0 "" "\\*(Rp" \\nP
2424 .if(0\\$2=0):(0\\$2=2) .SK
2438 .if(\\n(;C>0)&(\\n(:z>0) 'bp
2441 'nr:0 \\n(.pu-\\n(nlu-\\n(:ou
2442 'if\\n(:s 'if (\\n(:0<=0):((\\n(;C=2)&(\\n(!F=1)) 'nr ;x 1
2451 .nr!J \\n(.pu-\\n(dnu-\\n(:mu-4v
2452 .ie\\n(!J>\\n(nlu .ch )f \\n(!Ju
2459 .rm2C AF AS AE AT AU AV CS OK TC TL TM MT
2487 .rm2C AF AS AE AT AU AV CS OK TC TL TM MT
2488 .ie
\a\\$1
\a\a .)D "Required argument missing"
2489 .el.ie
\a\\$1
\aSA
\a \{\
2491 .ie\w
\a\\$2
\a .ds }a \\$2
2492 .el.ds }a To Whom It May Concern:\}
2493 .el.ie
\a\\$1
\aAT
\a \{\
2494 .ds}j ATTENTION: \\$2
2496 .el.ie
\a\\$1
\aRN
\a \{\
2497 .ds}k In reference to: \\$2
2499 .el.ie
\a\\$1
\aCN
\a \{\
2501 .ie\w
\a\\$2
\a .ds }l \\$2
2502 .el.ds }l CONFIDENTIAL \}
2503 .el.ie
\a\\$1
\aSJ
\a \{\
2506 .el.)D "LO argument not recognized"
2515 .el. ie
\a\\$1
\aBL
\a . (1
2516 .el.ie
\a\\$1
\aSB
\a . (2
2517 .el.ie
\a\\$1
\aFB
\a . (3
2518 .el.ie
\a\\$1
\aSP
\a . (4
2519 .el.)D "LT argument not recognized."
2540 .ie(\\n(!9:\\n(!6) .sp 2
2543 .if\w
\a\\*(}6
\a \\*(}6
2544 .if\w
\a\\*(}7
\a \\*(}7
2576 .ie(\\n(!9:\\n(!6) .sp 2
2579 .if\w
\a\\*(}6
\a \\*(}6
2580 .if\w
\a\\*(}7
\a \\*(}7
2611 .ie(\\n!9:\\n!6) .sp 2
2613 .if\w
\a\\*(}6
\a \\*(}6
2614 .if\w
\a\\*(}7
\a \\*(}7
2644 .ie(\\n!9:\\n!6) .sp 2
2646 .if\w
\a\\*(}6
\a \\*(}6
2647 .if\w
\a\\*(}7
\a \\*(}7
2655 .traAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
2658 .traabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
2664 .ie
\a\\$1
\aWA
\a .nr !8 1
2665 .el.ie
\a\\$1
\aWE
\a \{\
2666 .ie\\n(!8=1 .nr !8 2
2667 .el.)D "WA macro missing"\}
2668 .el.ie
\a\\$1
\aIA
\a \{\
2669 .ie\\n(!8=2 .nr !8 3
2670 .el.)D "WA or WE macro missing"\}
2671 .el.ie
\a\\$1
\aIE
\a \{\
2672 .ie\\n(!8=3 .nr !8 4
2673 .el.)D "WA, WE, or IA macro missing"\}
2674 .el.if
\a\\$1
\aLT
\a \{\
2675 .ie\\n(!8=4 .nr !8 0
2676 .el.)D "WA, WE, or IE macro missing"\}
2718 .if
\a\*(]Z
\aMM DEFINED
\a \{\
2719 .tmERROR: MM package read twice
2725 .if!\w'\gO' .nr O 1.3i
2731 .if\n(mo-0 .ds DT January
2732 .if\n(mo-1 .ds DT February
2733 .if\n(mo-2 .ds DT March
2734 .if\n(mo-3 .ds DT April
2735 .if\n(mo-4 .ds DT May
2736 .if\n(mo-5 .ds DT June
2737 .if\n(mo-6 .ds DT July
2738 .if\n(mo-7 .ds DT August
2739 .if\n(mo-8 .ds DT September
2740 .if\n(mo-9 .ds DT October
2741 .if\n(mo-10 .ds DT November
2742 .if\n(mo-11 .ds DT December
2743 .asDT " \n(dy, 20\n(yr
2761 .if\nC=3 \{.ds ]C
\a\aD\ R\ A\ F\ T
\a\a
2762 .PF "''\\\\*(DT'' \}
2763 .if\nC=4 \{.ds ]C
\a\aD\ R\ A\ F\ T
\a\a
2769 .if\nC=2 .ds ]C ''DATE FILE COPY''
2770 .if\nC=1 .ds ]C ''OFFICIAL FILE COPY''
2771 .if(\nN=3):(\nN=5) \{.nr :S 1
2772 .PF "''\\\\n(H1-\\\\nP''"
2776 .if\nD .PH "'\\*(RE line # \\\\n(.c'- \\\\nP -''
2779 .ds` \\k:\h
\a-\\n(.wu*8u/10u
\a\h
\a\\n(.fu/2u*2u+1u-\\n(.fu*.2m
\a\(ga\h
\a|\\n:u
\a
2780 .ds' \\k:\h
\a-\\n(.wu*8u/10u
\a\h
\a\\n(.fu/2u*2u+1u-\\n(.fu*.2m+.07m
\a\(aa\h
\a|\\n:u
\a
2781 .ds^ \\k:\h
\a-\\n(.wu*8u/10u
\a\h
\a\\n(.fu/2u*2u+1u-\\n(.fu*.15m-.07m
\a\
2782 \h
\a\\n(.fu-1u/2u*.02m
\a^\h
\a|\\n:u
\a
2783 .ds~ \\k:\h
\a-\\n(.wu*8u/10u
\a\h
\a\\n(.fu/2u*2u+1u-\\n(.fu*.2m-.07m
\a\
2784 \h
\a\\n(.fu-1u/2u*.05m
\a~\h
\a|\\n:u
\a
2785 .ds, \\k:\h
\a-\\n(.wu*85u/100u
\a\v
\a.07m
\a,\v
\a-.07m
\a\h
\a|\\n:u
\a
2786 .ds: \\k:\h
\a-\\n(.wu*85u/100u
\a\h
\a\\n(.fu/2u*2u+1u-\\n(.fu*3u*.06m
\a\
2787 \h
\a3u-\\n(.fu/2u*.05m-.1m
\a\
2788 \v
\a-.6m
\a\z.\h
\a\\n(.fu-1u/2u*.05m+.2m
\a.\v
\a.6m
\a\h
\a|\\n:u
\a
2789 .ds; \\k:\h
\a-\\n(.wu*75u/100u
\a\h
\a\\n(.fu/2u*2u+1u-\\n(.fu*3u*.09m
\a\
2790 \h
\a3u-\\n(.fu/2u*.06m-.15m
\a\h
\a\\n(.fu-1u/2u*.04m
\a\
2791 \v
\a-.85m
\a\z.\h
\a.3m
\a.\v
\a.85m
\a\h
\a|\\n:u
\a
2792 .if!
\a\*(.T
\aaps
\a .rm )k