'''\" @(#)dcs:csmacros 1.35 11/20/87 '''\" cover sheet macro version 112087 '''\" registers '''\" a - abstract continuation flag - 0 (no), >0 (yes - number of overflow pages) '''\" b - mercury selections counter '''\" c - distribution continuation flag - 0 (no), 1 (yes) '''\" d - distribution length calculation flag - 0 (no), 1 (yes) '''\" e - complete copy basic distribution length '''\" g - complete copy overflow distribution length '''\" h - cover sheet basic distribution length '''\" i - cover sheet overflow distribution length '''\" j - scratch '''\" k - keyword flag - 0 (none), 1 (some) '''\" l - number of vertical units per line - troff and nroff '''\" m - memorandum type flag - 1 TM, 2 IM, 3 TC '''\" n - document number counter '''\" o - title flag - 0 (no), 1 (yes - vertical size of title diversion) '''\" p - proprietary notice flag - 0 (none), 1 (default notice), 2(BR) '''\" q - scratch '''\" r - security flag - 0 (no), 1 (yes) '''\" s - software flag - 0 (no), 1 (yes) '''\" t - mark title position '''\" u - author count '''\" v - scratch '''\" w - scratch '''\" x - mark scratch position '''\" y - mark scratch position '''\" z - mark scratch position '''\" ra - release to AT&T flag - 0 (no decision), 1 (yes), 2 (no) '''\" an - length abstract footnote diversion '''\" fn - length footnote diversion '''\" as - "in abstract" flag - 0 (no), 1 (yes) '''\" ds - "in display" flag - 0 (no), 1 (yes) '''\" fs - "in footnote" flag - 0 (no), 1 (yes) '''\" bd - block center display flag - 0 (no), 1 (yes) '''\" dv - device flag - 0 (default), 1 (APS-5), 2 (i10), 3 (xerox), 4 (i300), 5 (qms1200), 6 (postscript) '''\" lp - lines per page (nroff - xerox) '''\" tp - total pages (decimal) '''\" tc - total pages (in small roman) '''\" qq - total pages in document '''\" np - page number this page (decimal) '''\" nc - page number this page (in small roman) '''\" la - vertical size of abstract diversion '''\" a1 - vertical size of page 1 portion of abstract '''\" a2 - vertical size of overflow page portion of abstract '''\" ar - vertical size remainder of abstract '''\" fi - save current fill/no-fill (.u) '''\" in - save current indent (.i) '''\" si - standard indent - ens (for paragraphs, displays & equations) '''\" ps - initial point size (.s) '''\" ts - temp point size (only in S macro) '''\" vs - initial vertical spacing (.v) '''\" tv - temp vertical spacing (only in S macro) '''\" b1, b2 - scratch calculations '''\" m1 - mark scratch position '''\" :b, :c, :d, :e - scratch (lists only) '''\" :h - SA macro only '''\" ls - nested list level (lists only) '''\" dt - display type (displays & equations) '''\" fc - filing case flag '''\" wp - work project number flag '''\" en - entity flag - 1 (BL), 2 (IS), 3 (TI), 4 (CH) '''\" lg - AT&T logo flag - 0 (not defined), 1 (defined) '''\" strings '''\" a) - mercury info '''\" b) - mercury info '''\" c) - mercury info '''\" e) - equation label '''\" k) - keywords '''\" n) - first document number '''\" o) - proprietary classification heading '''\" p) - proprietary string 1 '''\" q) - " " 2 '''\" r) - " " 3 '''\" s) - timestamp string '''\" t) - memo type (TM, IM, TC) '''\" u) - trailing s if multiple author '''\" v) - trailing s if multiple document number '''\" w) - trailing s if multiple filing case '''\" x) - trailing s if multiple work project number '''\" y) - used in lists '''\" z) - used in lists '''\" a( - '''\" e( - earlier document number '''\" m( - authors 1-3 sig '''\" n( - authors 4-6 sig '''\" o( - authors 7-9 sig '''\" p( - authors 10-12 sig '''\" r( - responsible person '''\" s( - S software string '''\" t( - memo type ("for Technical Memorandum", etc.) '''\" Tm - trademark '''\" lG - AT&T logo '''\" 10 - used in equations '''\" ve - csmacros version '''\" e1,e2,e3,e4 - entity info '''\" diversions '''\" aS - abstract '''\" aV - author info section '''\" cA - complete copy addressee primary '''\" cO - complete copy addressee overflow '''\" cZ - complete copy addressee lost overflow '''\" dA - cover sheet addressee primary '''\" dO - cover sheet addressee overflow '''\" dZ - cover sheet addressee lost overflow '''\" dM - document number info '''\" dS - display '''\" eQ - equation '''\" fB - filing case info '''\" tI - title '''\" wO - work project number info '''\" aN - abstract footnote '''\" fN - footnote '''\" '''\" macros to collect information '''\" aC - AT&T company '''\" tS - timestamp '''\" TL - title '''\" AU - author '''\" FS - footnote start '''\" FE - footnote end '''\" AS - abstract start '''\" AE - abstract end '''\" OK - keyword info '''\" MT - document type '''\" dN - document number info '''\" eD - earlier document number '''\" fC - filing case '''\" fD - full date '''\" wP - work project info '''\" mE - mercury selections (7 argument version) '''\" mC - mercury codes (three argument version) '''\" Mc - mercury codes (one argument version) '''\" PM - proprietary marking '''\" gS - government security '''\" rA - release to AT&T employees (superceded by fA) '''\" fA - future AT&T distribution (supercedes rA) '''\" sF - software-related '''\" cC - complete copy addressee list start '''\" cD - complete copy overflow '''\" cS - cover sheet only addressee list start '''\" cT - cover sheet only overflow '''\" zZ - complete copy lost overflow '''\" wW - cover sheet lost overflow '''\" cE - addressee list end '''\" macros to help format document '''\" B - change to bold font '''\" I - change to italic font '''\" R - change to roman font '''\" S - set point size and vertical spacing '''\" sP - space 1 vertical space '''\" P - paragraph '''\" HC - set hyphenation indicator '''\" iN - font and size re-initialization '''\" DS - display start '''\" DE - display end '''\" EQ - equation start '''\" EN - equation end '''\" VL - variable-item list '''\" ML - marked list '''\" LI - list item '''\" LE - list end '''\" hD - header '''\" fO - footer '''\" yY - abstract overflow '''\" aT - abstract overflow trap '''\" tK - thick lines '''\" bE - empty box '''\" bX - box with X '''\" tH - title heading '''\" cH - continuation header '''\" dH - distribution list headers '''\" eP - eject distribution continuation page '''\" cP - continuation page '''\" tP - compute pages and diversion lengths '''\" t1 - " " '''\" dL - compute basic distribution length '''\" CS - output cover sheet '''\" initialization '''\" .ie '\*(.T'qms' \{\ .fp 1 R .fp 2 I .fp 3 B .fp 4 S \} .el \{\ .fp 1 H .fp 2 HI .fp 3 HB .fp 4 HX \} '''\" registers .nr a 0 1 .nr b 0 1 .nr c 0 .nr d 0 .nr e 0 .nr g 0 .nr h 6 .nr i 0 .nr j 0 .nr k 0 .nr m 0 .nr n 0 1 .nr o 0 .nr p 1 .nr q 0 .nr r 0 .nr s 0 .nr t 0 .nr u 0 1 .nr v 0 .nr w 0 .nr x 0 .nr y 0 .nr z 0 .nr an 0 .nr fn 0 .nr as 0 .nr ds 0 .nr fs 0 .nr bd 0 .nr tp 0 .nr tc 0 .af tc i .nr np 2 .nr nc 2 .af nc i .nr la 0 .nr a1 0 .nr a2 0 .nr ar 0 .nr fi 0 .nr in 0 .nr :b 0 .nr :c 0 .nr :d 0 .nr :e 0 .nr :h 0 .nr ls 0 1 .nr dt 0 .nr fc 0 1 .nr wp 0 1 .nr en 1 .nr lg 0 .nr ra 0 '''\" initialize lines per page .nr lp 66 '''\" initialize device register .nr dv 0 .if '\*(.T'aps' .nr dv 1 .if '\*(.T'i10' .nr dv 2 .if '\*(.T'X97.tim10p' .nr dv 3 .if '\*(.T'X97.tim12p' .nr dv 3 .if '\*(.T'X97.ti10p' .nr dv 3 .if '\*(.T'X97.ti12p' .nr dv 3 .if '\*(.T'i300' .nr dv 4 .if '\*(.T'qms' .nr dv 5 .if '\*(.T'post' .nr dv 6 '''\" initialize units per vertical space .if t .nr l 120 .if \n(dv=2 .nr l 40 .if \n(dv=3 .nr l 50 .if \n(dv=5 .nr l 50 .if n .nr l 40 '''\" initialize standard indent .nr si 5 '''\" diversions .di aV .di .di dM .di .di cA .di .di cO .di .di dA .di .di dO .di .di fB .di .di wO .di '''\" initialize AT&T logo '''\" eventually substitute LH for Lb (DWB 2) .ie \n(dv=5 .ds lG \s10\f(ATx\fP\f\\nv\fP\s0 .el .ds lG \s36\(Lb\s0 '''\" initialize entity strings .ds e1 "AT&T-BL .ds e2 "AT&T .ds e3 "AT&T BELL LABORATORIES .ds e4 "Department Head '''\" initialize trademark symbol string .if t .ds Tm \v'-0.5m'\s-4TM\s+4\v'0.5m' .if n .ds Tm \uTM\d '''\" initialize timestamp string .ds s) 0 '''\" initialize responsible person string .ds r( 0 '''\" initialize earlier document number string .ds e( 0 '''\" initialize csmacro version string .ds ve MCS (11/20/87) '''\" initialize point size, vertical space & indent .nr ps 10 .ps \\n(ps .nr vs 12 .if t .vs \\n(vsp .in 0 '''\" '''\" macros to collect information '''\" .de aC \" macro for AT&T company (entity) . \" set en=1 if BL (default) . \" set en=2 if IS . \" set en=3 if TI . \" set en=4 if CH (Corporate Headquarters) .if '\\$1'BL' .nr en 1 .if '\\$1'IS' .nr en 2 .if '\\$1'TI' .nr en 3 .if '\\$1'CH' .nr en 4 .if \\n(en=1 \{\ .ds e1 "AT&T-BL .ds e2 "AT&T .ds e3 "AT&T BELL LABORATORIES .ds e4 "Department Head .br\} .if \\n(en=2 \{\ .ds e1 "AT&T-IS .ds e2 "AT&T .ds e3 "AT&T INFORMATION SYSTEMS .ds e4 "Department Head .br\} .if \\n(en=3 \{\ .ds e1 "AT&T Technologies, Inc. .ds e2 "AT&T .ds e3 "AT&T TECHNOLOGIES, INC. .ds e4 "Manager .br\} .if \\n(en=4 \{\ .ds e1 "AT&T .ds e2 "AT&T .ds e3 " AT&T .ds e4 "Department Head .br \} .rm aC .. .de tS \" macro for timestamp '''\" if timestamp string=0, store arg #1 if non-empty. .if '\\*(s)'0' \{\ .if !'\\$1'' \{\ .ie '\\$2'1' .ds s) "D R A F T .el .ds s) "Timestamp: \\$1 \} \} .. .de TL \" macro for title .if \\nu>0 \{\ .tm ERROR: coversheet file set up incorrectly - document title must be supplied before author .ab \} .br .fi .ie !'\\n(.F'' \{\ . sy /usr/lib/tmac/timestamp \\n(.F>/tmp/tp\\n($$ . so /tmp/tp\\n($$ . sy rm /tmp/tp\\n($$ . br \} \" don't remove br - gets around troff bug .ie '\\$1'' \{\ . ie '\\n(.F'' .tm Coversheet not sent to library - input is standard in . el .ie '\\n(.F'-' .tm Coversheet not sent to library - input is standard input . el \{\ . nr aa 1 . ds x( "Mailing Label \} \} .el .ds x( \\s+2DRAFT\\s-2 .ll 6.0i '''\" diversion for title .di tI .rm TL .. .de AU \" macro for author info '''\" don't count author unless non-empty .if !\\$1 .nr u \\n+u .if \\nu=1 \{\ .br '''\" end title diversion on first author .di .nr o \\n(dn .ll .nf \} .ta 0.3i 2.6i 3.0i 4.0i 5.4i .br '''\" append to author list .da aV \\$1 \\$3 \\$6 \\$5 \\$7 .br .da '''\" end append; info for signature lines .if \\nu=1 .ds m( \\$1 .if \\nu=2 .as m( \\$1 .if \\nu=3 .as m( \\$1 .if \\nu=4 .ds n( \\$1 .if \\nu=5 .as n( \\$1 .if \\nu=6 .as n( \\$1 .if \\nu=7 .ds o( \\$1 .if \\nu=8 .as o( \\$1 .if \\nu=9 .as o( \\$1 .if \\nu=10 .ds p( \\$1 .if \\nu=11 .as p( \\$1 .if \\nu=12 .as p( \\$1 .. .de rP \" macro for responsible person .if !'\\$1'' .ds r( \\$1 .rm rP .. .de FS \" macro for footnote start .if \\n(fs>0 \{\ .tm Footnote within footnote - illegal. .FE \} .if \\n(ds>0 \{\ .tm Footnote within display - illegal. .FE \} .nr fs 1 .ev 1 .br .ll 6.4i .ps 8 .if t .vs 10p .fi .ie \\n(as>0 .da aN .el \{\ .da fN .if \\n(fn=0 \{\ .br .if n __________ .if t \l'1i' .br \} \} .if \\n(.$=1 \\$1 .. .de FE \" macro for footnote end .br .da .ie \\n(as>0 .nr an \\n(dn+\\n(an .el .nr fn \\n(dn+\\n(fn .ev .nr fs 0 .. .de AS \" macro for abstract info .nr as 1 .br .fi .ll 7.0i .ta 0.5i 1.0i 1.5i .di aS .rm AS .. .de AE \" macro for end of abstract info .br .di .nr la \\n(dn .iN .if \\n(an>0 \{\ .br .da aS .br .if n __________ .if t \l'1i' .br .aN .rm aN .br .da .nr la \\n(la+\\n(dn \} .iN .rm iN .ll .nf .nr as 0 .rm DS DE EQ EN VL ML LI LE .rm dS eQ .rm B I R S sP P .rm FS FE AE .. .de OK \" macro for keyword info .ds k) .if !\\$1 .as k) \\$1 .if !\\$2 .as k); \\$2 .if !\\$3 .as k); \\$3 .if !\\$4 .as k); \\$4 .if !\\$5 .as k); \\$5 .if !\\$6 .as k); \\$6 .if !\\$7 .as k); \\$7 .if !\\$8 .as k); \\$8 .if !\\$9 .as k); \\$9 '''\" set k flag if we have some keywords .ie !\\*(k) .nr k 1 .el .nr k 0 .rm OK .. .de MT \" macro for document type .if '\\$1'1' \{\ .nr m 1 .ds t) TM .ds t( "for Technical Memorandum \} .if '\\$1'2' \{\ .nr m 2 .ds t) IM .ds t( "for Internal Memorandum \} .if '\\$1'3' \{\ .nr m 3 .ds t) TC .ds t( "for Technical Correspondence \} .rm MT .. .de dN \" macro for document number info .ie \\ns=1 .ds s( S .el .ds s( .ta 0.8i .br .da dM .if !'\\$1'' \{\ \\$1\\*(t)\\*(s( .nr n \\n+n '''\" \" save first document number .if \\nn=1 .ds n) \\$1\\*(t)\\*(s( \} .br .da .. .de fC \" macro for filing case info .ta 3.5i .br .da fB .if !'\\$1'' \{\ .nr fc \\n+(fc \\$1 \} .br .da .. .de fD \" macro for full date info .if !'\\$1'' .fC \\$1 \" use .fC macro underneath .. .de wP \" macro for work project info .ta 5.5i .br .da wO .if !'\\$1'' \{\ .nr wp \\n+(wp \\$1 \} .br .da .. .de mC \" macro for mercury selections - three argument version .if !'\\$1'' .Mc \\$1 .if !'\\$2'' .Mc \\$2 .if !'\\$3'' .Mc \\$3 .. .de Mc \" macro for mercury selections - one argument .ds c) .if \\nb<3 \{\ .ie '\\$1'CHM' .ds c) " CHM - Chemistry and Materials .el .ie '\\$1'chm' .ds c) " CHM - Chemistry and Materials .el .ie '\\$1'CMM' .ds c) " CMM - Communications .el .ie '\\$1'cmm' .ds c) " CMM - Communications .el .ie '\\$1'CMP' .ds c) " CMP - Computing .el .ie '\\$1'cmp' .ds c) " CMP - Computing .el .ie '\\$1'ELC' .ds c) " ELC - Electronics .el .ie '\\$1'elc' .ds c) " ELC - Electronics .el .ie '\\$1'LFS' .ds c) " LFS - Life Sciences .el .ie '\\$1'lfs' .ds c) " LFS - Life Sciences .el .ie '\\$1'MAN' .ds c) " MAN - Manufacturing .el .ie '\\$1'man' .ds c) " MAN - Manufacturing .el .ie '\\$1'MAS' .ds c) " MAS - Mathematics and Statistics .el .ie '\\$1'mas' .ds c) " MAS - Mathematics and Statistics .el .ie '\\$1'MKT' .ds c) " MKT - Marketing .el .ie '\\$1'mkt' .ds c) " MKT - Marketing .el .ie '\\$1'PHY' .ds c) " PHY - Physics .el .ie '\\$1'phy' .ds c) " PHY - Physics .el .ie '\\$1'STD' .ds c) " STD - Standards .el .if '\\$1'std' .ds c) " STD - Standards .ie '\\*(c)'' .tm ERROR: \\$1 - unknown mercury selection .el \{\ .nr b \\n+b .if t .as a) \\*(c) .if n \{\ .ie \\nb=3 \{\ .rn a) b) .ds a) \\*(c) \} .el .as a) \\*(c)\}\}\} .. .de mE \" macro for mercury selections .ds a) .ds b) .ds c) '''\" either 'y' or '1' arguments honored .nr q 0 .if '\\$1'y' .nr q 1 .if '\\$1'1' .nr q 1 .if \\nq=1 \{\ .as a) " CHM - Chemistry and Materials .nr b \\n+b \} .nr q 0 .if '\\$2'y' .nr q 1 .if '\\$2'1' .nr q 1 .if \\nq=1 \{\ .as a) " CMM - Communications .nr b \\n+b .if n \{\ .if \\nb=2 .rn a) b) \} \} .nr q 0 .if '\\$3'y' .nr q 1 .if '\\$3'1' .nr q 1 .if \\nq=1 \{\ .as a) " CMP - Computing .nr b \\n+b .if t \{\ .if \\nb=3 .rn a) b) \} .if n \{\ .if \\nb=2 .rn a) b) \} \} .nr q 0 .if '\\$4'y' .nr q 1 .if '\\$4'1' .nr q 1 .if \\nq=1 \{\ .as a) " ELC - Electronics .nr b \\n+b .if t \{\ .if \\nb=3 .rn a) b) \} .if n \{\ .if \\nb=4 \{\ .rn b) c) .rn a) b) \} .if \\nb=2 .rn a) b) \} \} .nr q 0 .if '\\$5'y' .nr q 1 .if '\\$5'1' .nr q 1 .if \\nq=1 \{\ .as a) " LFS - Life Sciences .nr b \\n+b .if t \{\ .if \\nb=3 .rn a) b) \} .if n \{\ .if \\nb=4 \{\ .rn b) c) .rn a) b) \} .if \\nb=2 .rn a) b) \} \} .nr q 0 .if '\\$6'y' .nr q 1 .if '\\$6'1' .nr q 1 .if \\nq=1 \{\ .as a) " MAS - Mathematics and Statistics .nr b \\n+b .if t \{\ .if \\nb=3 .rn a) b) \} .if n \{\ .if \\nb=4 \{\ .rn b) c) .rn a) b) \} .if \\nb=2 .rn a) b) \} \} .if \\nb<6 \{\ .nr q 0 .if '\\$7'y' .nr q 1 .if '\\$7'1' .nr q 1 .if \\nq=1 \{\ .as a) " PHY - Physics .nr b \\n+b .if t \{\ .if \\nb=3 .rn a) b) \} .if n \{\ .if \\nb=4 \{\ .rn b) c) .rn a) b) \} .if \\nb=2 .rn a) b) \} \} \} .if t \{\ .if \\nb=3 .rn b) a) \} .if n \{\ .if \\nb=4 \{\ .rn b) a) .rn c) b) \} .if \\nb=2 .rn b) a) \} .rm mE .. .de eD \" macro for earlier document number .if !'\\$1'' .ds e( \\$1 .rm eD .. .de PM \" macro for proprietary marking . \" arg 1 - RS or BR or IR or TR or R - restricted .if '\\$1'RS' .nr p 2 .if '\\$1'BR' .nr p 2 .if '\\$1'IR' .nr p 2 .if '\\$1'TR' .nr p 2 .if '\\$1'R' .nr p 2 .rm PM .. .de gS \" macro for government security classified .nr r 1 .rm gS .. .de rA \" macros for release to AT&T employees . \" superceded by .fA macro 072087 .nr ra 1 .rm rA .. .de fA \" macro for future AT&T distribution . \" arg 1 = 'y' or 'Y' or 'n' or 'N' .if '\\$1'y' .nr ra 1 .if '\\$1'Y' .nr ra 1 .if '\\$1'n' .nr ra 2 .if '\\$1'N' .nr ra 2 .rm fA .. .de sF \" macro for software-related document .nr s 1 .rm sF .. .de cI .rm cI .. .de dL \" macro for calculating basic distribution length '''\" call once only - from .cC, .cS, or .CS .if \\nd=0 \{\ .nr d 1 '''\" calculate space considerations '''\" basic distribution length - to be tailored - set e and h .if \\nr=0 .nr e \\ne+2 .if \\nu<=3 .nr e \\ne+3 .if \\nu<=6 .nr e \\ne+3 .if \\nu<=9 .nr e \\ne+3 .if \\nn<=3 .nr e \\ne+2 .if \\nn<=6 .nr e \\ne+2 .if \\nn<=9 .nr e \\ne+2 '''\" nroff: if p=2, 1 extra line under Org Approval .if n .if \\np=2 .nr e \\ne-1 '''\" Future AT&T Distribution handling .if ((\\n(ra<2)&(\\np=2)) \{\ .nr ra 2 .tm WARNING: Future AT&T Distribution by ITDS - PROPRIETARY (RESTRICTED) document MAY NOT BE RELEASED without appropriate approval for each request; coversheet has been modified accordingly\} .if \\n(ra=0 \{\ .tm WARNING: Future AT&T Distribution by ITDS: missing or invalid .fA macro; indicate desired action by checking yes or no box on page 2 of coversheet; next time include .fA macro with y or n argument \} '''\" at least 3 lines for Future AT&T Distribution section (more for nroff negative and ra=0) '''\" \" next 2 lines for yes/no boxes; remove when .fA macro becomes mandatory .if t .if \\n(ra=0 .nr e \\ne-4 .if n .if \\n(ra=0 .nr e \\ne-5 .if \\n(ra=1 .nr e \\ne-3 .if t .if \\n(ra=2 .nr e \\ne-3 .if n .if \\n(ra=2 .nr e \\ne-4 '''\" increment number on next two lines to drop text lower on page 2 .if t .nr e \\ne+27 .if n .nr e \\ne+24 .if n \{\ '''\" if page 2 text changes, change values in next 3 lines .if \\ne<4 \{\ .tm ERROR: insufficient space to format cover sheet; use "docsend -Taps" \ for APS-5, "docsend -Ti10" for imagen, or "docsend -TX97" - \ or use stockroom cover sheet .ab \} .ie \\ne<8 .nr e 0 .el .nr e \\ne-7 \} .nr h \\ne .br \} .rm dL .. .de cC \" macro for handling complete copy addressees .dL .ta 2.0i .nf .br .ie \\ne>0 \{\ .da cA .dt \\nev cD \} .el .da cO .rm cC .. .de cD \" macro for handling complete copy address overflow .ta 2.0i .br .da .da cO .ie \\n(ar>0 .dt \\n(arv zZ .el .dt 55 zZ .. .de zZ .br .da .ie \\n(dn>0 .nr g (\\n(dn)/\\nl+4 .da cZ .. .de cS \" macro for handling cover sheet only addresses .dL .ta 2.0i .nf .br .ie \\nh>0 \{\ .da dA .dt \\nhv cT \} .el .da dO .rm cS .. .de cT \" macro for handling cover sheet address overflow .ta 2.0i .br .da .da dO .ie \\n(ar>0 .dt \\n(arv wW .el .dt 55 wW .. .de wW .br .da .ie \\n(dn>0 .nr i (\\n(dn)/\\nl+4 .da dZ .. .de cE \" macro for ending all distribution diversions .br .if "\\n(.z"cA" \{\ .nr g 0 .rm cD \} .if "\\n(.z"cO" \{\ .nr g -1 .rm cD \} .if "\\n(.z"cZ" \{\ .nr g -2 .rm cD \} .if "\\n(.z"dA" \{\ .nr i 0 .rm cT \} .if "\\n(.z"dO" \{\ .nr i -1 .rm cT \} .if "\\n(.z"dZ" \{\ .nr i -2 .rm cT \} .da .if \\ng=-1 \{\ .ie \\n(dn>0 .nr g (\\n(dn)/\\nl+4 .el .nr g 0 \} .if \\ni=-1 \{\ .ie \\n(dn>0 .nr i (\\n(dn)/\\nl+4 .el .nr i 0 \} .. '''\" '''\" macros to help format document '''\" .deB .ie\\n(.$ .nr ;G \\n(.f .el.ft 3 .if\\n(.$ .if !\\n(.$-2 \&\f3\\$1\fP\\$2 .if\\n(.$-2 \{.ds }i .if\\n(.f2 .ds }i \^ .ds}I \&\f3\\$1\fP\\$2\\*(}i 'br\} .if\\n(.$-2 .if !\\n(.$-4 \\*(}I\f3\\$3\fP\\$4 .if\\n(.$-4 .if !\\n(.$-6 \\*(}I\f3\\$3\fP\\$4\\*(}i\f3\\$5\fP\\$6 .if\\n(.$ .ft \\n(;G .. .deI .ie\\n(.$ .nr ;G \\n(.f .el.ft 2 .if\\n(.$ .if !\\n(.$-1 \&\f2\\$1 .if\\n(.$-1 \{.ds }i \^ .if\\n(.f2 .ds }i .ds}I \& .if\w\\$1 .ds }I \&\f2\\$1\fP\\*(}i 'br\} .if\\n(.$-1 .if !\\n(.$-3 \\*(}I\\$2\f2\\$3 .if\\n(.$-3 .if !\\n(.$-5 \\*(}I\\$2\f2\\$3\fP\\*(}i\\$4\f2\\$5 .if\\n(.$-5 \\*(}I\\$2\f2\\$3\fP\\*(}i\\$4\f2\\$5\fP\\*(}i\\$6 .if\\n(.$ .ft \\n(;G .. .deRI .nr;G \\n(.f .}S 1 2 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" .. .deRB .nr;G \\n(.f .}S 1 3 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" .. .deIR .nr;G \\n(.f .}S 2 1 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" .. .deIB .nr;G \\n(.f .}S 2 3 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" .. .deBR .nr;G \\n(.f .}S 3 1 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" .. .deBI .nr;G \\n(.f .}S 3 2 \& "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" .. .de}S .ds}i .if\\$12 .if !\\$5 .ds }i\^ .ie!\\$4 .}S \\$2 \\$1 "\\$3\f\\$1\\$4\\*(}i" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9" .el\\$3 .ft\\n(;G .. .deR .ft1 .ul0 .. .de S \" set point size and vertical spacing .ie \\n(.$=0 \{\ .ps .if t .vs \} .el \{\ .ie \w\(ts\\$1\(ts \{\ .ie 0\\$1-99 .nr ts \\n(ps .el .nr ts \\$1 \} .el .nr ts \\n(.s .ps \\n(ts .if \\n(.$=1 .if t \{\ .nr tv \\n(.s+2 .vs \\n(tvp \} .if \\n(.$>1 .if t \{\ .ie \w\(ts\\$2\(ts \{\ .ie 0\\$2-99 .nr tv \\n(.s+2 .el .nr tv \\$2 \} .el .nr tv \\n(.v .vs \\n(tvp \} \} .. .de sP \" space 1 blank line (vertical space) .if n .sp 1 .if t .sp 0.5 .. .de P \" paragraph - (default - left-adjusted) . \" arg #1=0 - left-adjusted . \" arg #1=1 - indent standard amount .ne 1.1 .sP .if (\\n(.$>0)&(0\\$1=1) .ti +\\n(sin .. .de HC \" set hyphenation indicator .ev0 .hc\\$1 .ev .ev1 .hc\\$1 .ev .ev2 .hc\\$1 .ev .. .de SA \" macro for right-adjustment .if \\n(.$ \{\ .if \\$1-1 .tm ERROR: SA: bad arg:\\$1 .nr :h 0\\$1 \} 'na .if \\n(:h 'ad .. .de iN \" macro for font and size re-initialization .ft 1 .ps \\n(ps .if t .vs \\n(vsp .. .de DS \" macro for display start .if \\n(ds>0 \{\ .tm Display within display - illegal. .DE \} .if \\n(fs>0 \{\ .tm Display within footnote - illegal. .FE \} .nr in \\n(.i .nr fi \\n(.u .br .ev 2 .br .ll 7.0i .nf .in \\n(inu .sP .if \\n(.$>1 \{\ .if '\\$2'F' .nr dt 4 .if '\\$2'1' .nr dt 4 .if \\n(dt=4 .fi \} .if \\n(.$>2 .ll-0\\$3 .nr dt 0 .nr bd 0 .if '\\$1'I' .nr dt 1 .if '\\$1'1' .nr dt 1 .if \\n(dt=1 .in \\n(sin .if '\\$1'C' .nr dt 2 .if '\\$1'2' .nr dt 2 .if \\n(dt=2 .ce 1000 .if '\\$1'CB' .nr dt 3 .if '\\$1'3' .nr dt 3 .if \\n(dt=3 \{\ .nr bd 1 .di dS \} .nr ds 1 .. .de DE \" macro for display end .br .ie \\n(ds=0 .tm DE: no active DS .el \{\ .ce 0 .if \\n(bd>0 \{\ .di .if \\n(dl>\\n(bd .nr bd \\n(dl .if \\n(bd<\\n(.l .in (\\n(.lu-\\n(bdu)/2u .nr dt \\n(.l-\\n(.i .ta \\n(dtuR .dS .br \} .nr bd 0 .nr ds 0 .nr dt 0 .ev .in \\n(inu .sP .ie \\n(fi=0 .nf .el .fi \} .. .de EQ \" macro for equation start .ds e) \\$1 .di eQ .. .de EN \" macro for equation end \!.br .br .di .lt \\n(.lu .pc .if \w\(ts\\*(10\\*(e)\(ts \{\ .ie \\n(bd>0 \{\ .if \\n(bd<\w\(ts\\*(10\(ts .nr bd \w\(ts\\*(10\(ts \!\\*(10\h'\\\\n(.lu-\w\(ts\\*(10\\*(e)u\(ts-\\\\n(.iu'\\*(e) .br \} .el .ie \\n(dt=2 .tl \(ts\(ts\\*(10\(ts\\*(e)\(ts .el .ie \\n(dt=1 .tl \(ts\h'\\n(sin'\\*(10\(ts\(ts\\*(e)\(ts .el .if \\n(dt=0 .tl \(ts\\*(10\(ts\(ts\\*(e)\(ts 'br\} .pc% .lt .. .de VL \" macro for variable-item lists .if \\n(ls>0 \{\ .tm VL: lists may not be nested .LE \} .ie \\n(.$<1 .tm ERROR: VL: text-indent not defined .el \{\ .nr in \\n(.i .nr :b \\n(.iu+0\\$1n .nr :c \\n(.iu+0\\$2n .ds y) \& .ie \\n(.$=3 .nr :d 1 .el .nr :d 0 .if \\n(:d=1 .sP .fi .nr ls +1 .br \} .. .de ML \" macro for marked list .if \\n(ls>0 \{\ .tm ML: lists may not be nexted .LE \} .ie \\n(.$<1 .tm ML: mark not defined .el \{\ .nr in \\n(.i .ds y) \\$1 .ie (\\n(.$>1)&(\\$2>0) .nr :b \\n(.iu+0\\$2n .el .nr :b \\n(.iu+\w\(ts\\*(y)\(tsu+1n .nr :c \\n(:bu-1n-\w\(ts\\*(y)\(tsu .ie \\n(.$=3 .nr :d 1 .el .nr :d 0 .if \\n(:d=1 .sP .fi .in \\n(:bu .nr ls +1 .br \} .. .de BL \" macro for bullet list - using marked list .ie \\n(.$=2 .ML \\(bu \\$1 \\$2 .el .ie \\n(.$=1 .ML \\(bu \\$1 .el .ML \\(bu .. .de LI \" macro for list item .ie \\n(ls=0 .tm LI: no active lists .el \{\ .ds z) \\*(y) .if \\n(.$=1 .ds z) \\$1 .if \\n(.$=2 .ds z) \\$1\&\\*(z) .if \\n(:d=0 .sP .in \\n(:bu .ti \\n(:cu .nr :e \w\(ts\\*(z)\(ts \\*(z)\h'\\n(:bu-\\n(:cu-\\n(:eu'\c \} .. .de LE \" macro for list end .ie \\n(ls=0 .tm LE: no active list .el \{\ .br .nr ls -1 'in \\n(inu 'ti \\n(inu .if \\n(.$>0 .sP \} .. .de hD \" header macro '''\" page offset 0.6i .po 0.6i .if t 'sp|0.2i .if n 'sp|1 .. .de fO \" footer macro .if t .pl 11.0i .if n .pl \\n(lp 'bp .. .de yY \" macro for abstract overflow - line -1 .aT .rm yY .. .de aT \" macro for abstract overflow trap . \" register a counts overflow pages .if \\na>0 \{\ .ft 2 .ce (continued) .ft 1 \} .if t .pl 11.0i .if n .pl \\n(lp .nr a \\n+a .rn aT xX 'bp .rn xX aT .if n .wh -2 aT .if t .wh -0.35i aT .cH .tH .if t 'sp 0.05i .ce .ft 3 Abstract (continued) .ft 1 .in 0.2i 'sp 1 .. .de tK \" macro for thick lines .ps 24 \l'7.5i' .ps .. .de bE \" macro for empty box .ps 12 .if t \\(sq .if n [ ] .ps .. .de bX \" macro for box with x .ps 12 .if t \\o'\(mu\(sq' .if n [x] .ps .. .de tH \" macro for Title heading and text . \" called from aT and eP and CS .tK .if t 'sp 0.05i '''\" mark t - Title heading .mk t .ft 3 Title: .ft 'sp|\\ntu .in 0.7i .tI .in 0 .ta 0.5i .nr q \\no/\\nl .ie \\nq>2 'sp|\\ntu+\\nq .el 'sp|\\ntu+2 .tK . \" m1 - mark end of title section - save .mk m1 .. .de cH \" macro for abstract or distribution list continuation header . \" called from aT and eP . \" calculate this page number .nr np \\n(np+1 .nf .in 0 .ft 3 .if t .ta 4.80i .if n .ta 3.75i .nr tc \\n(tp .nr nc \\n(np \\*(n)\f2 (page \\n(nc of \\n(tc) .ft1 .if t 'sp 0.1i .. .de dH \" macro for distribution list headers . \" called from cP and CS .ft 3 .ta 1.0i 4.75i \\$1 \\$2 .if t .sp 0.05i .ft 1 .ta 0.5i 1.0i .. .de eP \" macro for ejecting distribution continuation page . \" called from cP 'bp .wh 0 hD '''\" put out continuation page header & title section .cH .tH .. .de cP \" macro for continuation (distribution list) page . \" called from CS . \" if any distribution overflow will fit before next trap, set v=2 .ie \\nv<=\\n(.t .nr v 1 .el .nr v 0 .if \\nv=1 .if \\nw<=\\n(.t .nr v 2 . \" check whether continuation page needs to be ejected .in 0 .if \\nc=1 \{\ . \" - if no abstract overflow .if \\na=0 .eP .if \\na>0 \{\ . \" - or if abstract overflow - but not enough room for list overflow .ie \\nv<2 .eP . \" just a thick line if abstract overflow AND enough room for list .el .tK \} .ie \\ne=0 \{\ .if \\ng>4 .if \\ni>4 .dH "Complete Copy" "Cover Sheet Only" .if \\ng>4 .if !\\ni>4 .dH "Complete Copy" "" .if !\\ng>4 .if \\ni>4 .dH "" "Cover Sheet Only" \} .el \{\ .if \\ng>4 .if \\ni>4 .dH "Complete Copy (continued)" "Cover Sheet Only (continued)" .if \\ng>4 .if !\\ni>4 .dH "Complete Copy (continued)" "" .if !\\ng>4 .if \\ni>4 .dH "" "Cover Sheet Only (continued)" \} .mk z .nr q \\n(.t/\\nl '''\" put out complete copy list overflow .in 0.2i .cO .in 0 .rm cO .mk x .sp|\\nzu .in 4.0i '''\" put out cover sheet list overflow .dO .rm dO .mk y .in 0 .if \\nx-\\ny .sp|\\nxu .tK \} .. .de tP \" macro to compute total pages and diversion lengths '''\" calculate vert. units needed to handle cc overflow (if any) .ie \\ng>4 .nr v (\\ng)*\\nl .el .nr v 0 '''\" also for cs overflow (if any) .ie \\ni>4 .nr w (\\ni)*\\nl .el .nr w 0 .ie \\nv>\\nw .nr j \\nv .el .nr j \\nw . \" set c=1 if either g or i >0 .if \\ng>4 .nr c 1 .if \\ni>4 .nr c 1 . \" calculate total pages in job (default 2) .nr tp 2 . \" a1 - page 1 portion abstract (units) .nr a1 \\nyu-\\nxu-1v .ie \\n(la>\\n(a1 \{\ . \" ar - remainder abstract (units) .nr ar \\n(la-\\n(a1 .nr tp \\n(tp+1 . \" a2 - available continuation page space . \" m1 is mark after thick line following title/date . \" 2v are lines for Abstract (continued) and one blank line .if t .nr a2 11.0i-\\n(m1-2v .if n .nr a2 \\n(lpv-\\n(m1-2v .t1 \} .el .if \\nc>0 .nr tp \\n(tp+1 .. .de t1 .ie \\n(ar>\\n(a2 \{\ .nr ar \\n(ar-\\n(a2 .nr tp \\n(tp+1 .t1 \} .el .if \\n(ar+\\nj>\\n(a2 .nr tp \\n(tp+1 .. '''\" '''\" main macro to handle output of cover sheet '''\" .de CS .if \\nu=0 \{\ .tm ERROR: author must be supplied .ab \} .if \\no=0 \{\ .tm ERROR: document title must be supplied .ab \} .if \\nm=0 \{\ .tm ERROR: memorandum type undefined or unknown .ab \} .if \\nm=1 .if \\nb=0 \{\ .tm ERROR: must have at least one mercury classification with technical memorandum .ab \} .if \\nn=0 \{\ .tm ERROR: document number must be supplied .ab \} .if \\n(la=0 .if \\nm<3 \{\ .tm ERROR: abstract must be supplied for technical and internal memoranda .ab \} .if \\nb>3 \{\ .tm ERROR: no more than 3 mercury classifications may be selected .ab \} .if \\n(fc=0 \{\ .if \\n(en<3 \{\ .tm ERROR: filing case must be supplied .ab \} .if \\n(en=3 \{\ .tm ERROR: full date must be supplied .ab \}\} .if \\n(wp=0 \{\ .tm ERROR: work project number must be supplied .ab \} .dL .ll 7.5i .iN .if \\n(nl .bp .in 0 .hD '''\" put out 1 blank line where timestamp used to be .sp1 .if t .sp 0.05i .nf .ps 16 .ft 3 .if t .ta 4.85i .if \\n(dv=2 .ta 4.5i .if n .ta 5.35i . \" put out page 1 heading '''\" if AT&T logo not defined, put out AT&T string '''\" also put out memorandum type .ie ((\\n(dv=5)) \{\ .ie '\f(AT'' .nr lg 0 .el .nr lg 1 \} .el \{\ .ie '\*(lG'' .nr lg 0 .el .nr lg 1 \} .ie ((\\n(lg=0)) \{\ \\*(e2 Document Cover Sheet .wh 0 hD .if t .sp 0.1i .if t .ti 4.65i .if \\n(dv=2 \{\ .if \\nm=1 .ti 3.95i .if \\nm=2 .ti 4.20i .if \\nm=3 .ti 3.55i \} .if n .ti 5.15i \\*(t( \} .el \{\ Document Cover Sheet .wh 0 hD .if t .sp 0.1i .ie \\n(dv=2 \{\ .if \\nm=1 .ta 0.25i 3.95i .if \\nm=2 .ta 0.25i 4.20i .if \\nm=3 .ta 0.25 3.55i \} .el .ie \\n(dv=3 \{\ .if \\nm=1 .ta 0.25i 4.60i .if \\nm=2 .ta 0.25i 4.70i .if \\nm=3 .ta 0.25 4.50i \} .el .ie \\n(dv=4 \{\ .if \\nm=1 .ta 0.25i 4.625i .if \\nm=2 .ta 0.25i 4.70i .if \\nm=3 .ta 0.25 4.50i \} .el .ie \\n(dv=5 \{\ .ft P .nr v \n(.f .ft P .if \\nm=1 .ta 0.25i 3.22i .if \\nm=2 .ta 0.25i 3.41i .if \\nm=3 .ta 0.25i 3.10i \} .el .ie \\n(dv=6 \{\ .if \\nm=1 .ta 0.25i 4.625i .if \\nm=2 .ta 0.25i 4.725i .if \\nm=3 .ta 0.25i 4.475i \} .el .ta 0.25i 4.55i \\*(lG \\*(t( \} .ft .ps 10 .tH .if t .sp 0.05i .ft 3 .ie \\nu>1 .ds u) s .el .ds u) .if !\\n(en=3 \{\ .ta 0.5i 2.75i 4.0i 4.7i Author\\*(u) Location Ext. Company (if other than \\*(e1) .br \} .if \\n(en=3 \{\ .ta 0.5i 2.75i 4.0i 5.0i Author\\*(u) Location Ext. Company (if other than .if t \\*(e3) .if n \\*(e3) .br \} .ft '''\" output author info .aV .if !'\\*(r('0' \{\ .ta 0.3i 2.6i \\*(r( (Responsible \\*(e1 Person)\} .rm aV AU .tK .if t .sp 0.05i .ft 3 .ie \\nn>1 .ds v) s .el .ds v) .ie \\n(fc>1 .ds w) s .el .ds w) .ie \\n(wp>1 .ds x) s .el .ds x) .ta 1.0i 3.3i 5.55i .if \\n(en=1 \{\ Document No\\*(v). Filing Case No\\*(w). Project No\\*(x). .br \} .if \\n(en=2 \{\ Document No\\*(v). Filing Case No\\*(w). Project No\\*(x). .br \} .if \\n(en=3 \{\ .if t .ta 1.0i 3.4i 4.7i .if n .ta 1.0i 3.4i 4.5i Document No\\*(v). Full Date Time Charge (or Project Code) No\\*(x). .br \} .if \\n(en=4 \{\ .if t .ta 1.0i 3.4i 5.2i .if n .ta 1.0i 3.4i 5.0i Document No\\*(v). Filing Case No\\*(w). Time Charge (or Case) No\\*(x). .br \} .ft .if t .sp 0.05i .mk t '''\" output document number .dM .rm dN dM .mk x .sp|\\ntu '''\" output filing case info (or full date) .fB .rm fB fC .mk y .sp|\\ntu '''\" output work project number info .wO .rm wO wP .mk z .if \\ny>\\nx .nr x \\ny .if \\nz>\\nx .nr x \\nz .sp|\\nxu .tK '''\" output keywords if they exist .if \\nk>0 \{\ .ft 3 Keywords: .ft .if t .sp 0.05i .in 0.2i .fi \\*(k) .nf .in 0 .tK \} '''\" output mercury info if it exists .if \\nb>0 \{\ .ft 3 MERCURY Announcement Bulletin Sections .ft .if t \{\ .sp 0.05i .ta 0.6i 3.1i 5.6i .ps 8 \\*(a) .ps \} .if n \{\ .ta 0.5i 4.1i .if \\nb>2 \\*(b) \\*(a) .ps \} .tK \} .ps 10 .ft 3 Abstract .ft 1 .mk x .if t \{\ .nr b1 \\nx/\\n(.v+1 .nr b2 (\\n(b1*\\n(.v)-\\nx .sp \\n(b2u .mk x \} '''\" calculate position (19v includes 2v to print version at bottom of page) '''\" followed by timestamp and 1v line .nr y \\n(lpv-19v-\\n(fnu .sp|\\nyu .sp -1 .tP '''\" handle abstract page 1 continuation .ie \\n(la>\\n(a1 \{\ .ce .ft2 (continued on page iii) .ft1 .br \} .el .sp1 .tK .ps 8 .if t .vs 10p .nr z 0 .ie !'\\$3'' .nr z \\$3 .el \{\ .if !'\\$1'' .nr z \\nz+\\$1 .if !'\\$2'' .nr z \\nz+\\$2 .nr z \\nz+\\n(tp\} .nr qq \\nz .tm Total Pages = \\nz .ie '\*(.T'X97.tim10p'\{\ Total Pages (including document cover sheet): \\s+2\\nz\\s-2 .if !\\*(e('0' \{\ Supersedes or amends document number \\*(e(. \} .el .sp1 \} .el \{\ \f3Total Pages\f1 (including document cover sheet): \\s+2\\nz\\s-2 .if !'\\*(e('0' \{\ \f3Supersedes\f1 or amends document number \\*(e(. \} .el .sp1 \} .ps .if t .vs .if \\n(fn>0 \{\ .br .fN .rm fN .br \} .mk z .if t .sp 0.67i .if n .sp 4 '''\" output proprietary notice if it exists .if \\np=1 \{\ .ds o) AT&T \- PROPRIETARY .ds p) "Use pursuant to Company Instructions .ds q) .ds r) .ft 2 .if n .ti 14 .if t .ti 1.65i \\*(o) .ft .if n .ti 5 .if t .ti 1.25i \\*(p) \} .if \\np=2 \{\ .ds o) AT&T \- PROPRIETARY (RESTRICTED) .ds p) "Solely for authorized persons having a need to know .ds q) "pursuant to Company Instructions .ft 2 .if n .ti 10 .if t .ti 1.25i \\*(o) .ft .if n .ti 0 .if t .ti 0.875i \\*(p) .if n .ti 10 .if t .ti 1.375i \\*(q) \} '''\" output csmacros version .sp |\\nzu+11v .ta 5.35i \\s8\\*(ve\\s0 '''\" put out timestamp (if non-empty) and company identifier .ie !'\\*(s)'0' \{\ \\s8\\*(s)\\s0 \\*(e3 \} .el " \\*(e3 .sp|\\nzu .sp1 .ft 3 .ti 5.25i Mailing Label .ft .sp|\\nxu .in 0.2i .nf '''\" abstract .if !\\n(la=\\n(a1 \{\ .if n .wh -1 yY .if t .wh -0.25i yY \} .pl \\nyu .ta 0.5i 1.0i 1.5i 2.0i 2.5i '''\" output the abstract .aS .rm aS .if \\n(la=\\n(a1 .sp-1 .rn aT xX .if t .wh -0.25i fO .if n .wh -1 fO '''\" output continuation page .cP 'bp .ft 1 .in 0 .wh 0 hD .nf .ft 3 .if n .ta 3.75i .if t .ta 5.00i .if \n(dv=2 .ta 4.5i .nr tc \\n(tp Initial Distribution Specifications \\*(n)\f2 (page ii of \\n(tc)\f3 .ft 1 .tK .if \\ne>0 \{\ .dH " Complete Copy" " Cover Sheet Only" .mk z '''\" put out complete copy list .in 0.2i .cA .in 0 .rm cA .if !\\ng=0 \{\ .ft 2 .ti 1.25i (continued) .ft 1 \} .sp|\\nzu .in 4.0i '''\" put out cover sheet list .dA .rm dA .if !\\ni=0 \{\ .ft 2 .ti 4.75i (continued) .ft 1 \} .in 0 '''\" starter space value - then tailor according to basic distribution length .sp|5 .sp \\ne .tK \} '''\" put out security section if selected .if \\nr=1 \{\ \f3Government Security Classified\f1 .ft 1 .if t .sp -0.05i .tK \} \f3Future AT&T Distribution by ITDS\f1 .if \\n(ra>0 \{\ .ti 0.5i .if t .sp 0.05i .ie \\n(ra=2 \{\ .if t \f3DO NOT RELEASE\f1 to any AT&T employee without appropriate approval for each request. .if n \{\ \f3DO NOT RELEASE\f1 to any AT&T employee without appropriate approval .br .ti 1.0i for each request.\}\} .el \{\ \f3RELEASE\f1 to any AT&T employee (excluding contract employees). .br \}\} '''\" next 41 lines for yes/no boxes; remove when .fA macro becomes mandatory .if \\n(ra=0 \{\ .if t \{\ .mk z .ti 0.1i .bE .sp|\\nzu .ti 0.25i Yes, \f3RELEASE\f1 to any AT&T employee (excluding .sp|\\nzu .ti 4.1i .bE .sp|\\nzu .ti 4.25i No, \f3DO NOT RELEASE\f1 to any AT&T employee .mk z .ti 0.35i contract employees). .sp|\\nzu .ti 4.35i without obtaining appropriate approval.\} .if n \{\ .mk z .ti 0.1i .bE .sp|\\nzu .ti 0.4i Yes, \f3RELEASE\f1 to any AT&T employee .sp|\\nzu .ti 4.1i .bE .sp|\\nzu .ti 4.4i No, \f3DO NOT RELEASE\f1 to any AT&T .mk z .ti 0.5i (except contract employees). .ti 4.5i .sp|\\nzu employee without obtaining .ti 4.5i appropriate approval.\}\} .if t .sp -0.05i .tK .ft 3 Author Signature\\*(u) .ft 1 .sp1 .ta 2.625i 5.25i \l'2.25i' \l'2.25i' \l'2.25i' .ta 0.25i 2.875i 5.5i \\*(m( .if \\nu>3 \{\ .sp1 .ta 2.635i 5.25i \l'2.25i' \l'2.25i' \l'2.25i' .ta 0.25i 2.875i 5.5i \\*(n( \} .if \\nu>6 \{\ .sp1 .ta 2.635i 5.25i \l'2.25i' \l'2.25i' \l'2.25i' .ta 0.25i 2.875i 5.5i \\*(o( \} .if \\nu>9 \{\ .sp1 .ta 2.635i 5.25i \l'2.25i' \l'2.25i' \l'2.25i' .ta 0.25i 2.875i 5.5i \\*(p( \} .if t .sp -0.1i .tK '''\" output organizational approval section .ie \\np>1 \{\ .if t \{\ \f3Organizational Approval\f1 (\\*(e4 approval \f3required\f1 for \f2\\*(o)\f1.) \} .if n \{\ \f3Organizational Approval\f1 .ti 0.5i \\*(e4 approval \f3required\f1 for \f2\\*(o)\f1. \} .br \} .el \{\ \f3Organizational Approval\f1 (Optional) \} .sp 1 .ta 2.625i 5.25i \l'2.25i' \l'2.25i' \l'2.25i' .if \\nn>3 \{\ .sp1 \l'2.25i' \l'2.25i' \l'2.25i' \} .if \\nn>6 \{\ .sp 1 \l'2.25i' \l'2.25i' \l'2.25i' \} .if \\nn>9 \{\ .sp 1 \l'2.25i' \l'2.25i' \l'2.25i' \} .tK '''\" recipient section always output .ft 3 For Use by Recipient of Cover Sheet: .ft 1 .if t \{\ .ps-3 .vs-4 .sp1 .mk z Computing network users may order copies via the \f2library -1\f1 command; for information, type \f2man library\f1 after the UNIX prompt. .sp1 .rn fo xx Otherwise: Enter PAN if AT&T-BL (or SS# if non-AT&T-BL). \l'1.5i' Return this sheet to any ITDS location. .sp|\\nzu .in 4.0i Internal Technical Document Service .sp1 .ta 1i 2i 3i ( ) AK 2H-28 ( ) IH 7M-103 ( ) DR 2F-19 ( ) NW-ITDS ( ) ALC 1B-102 ( ) MV 3L-19 ( ) INH 1C-114 ( ) PR 5-2120 ( ) CB 30-2011 ( ) WH 3E-204 ( ) IW 2Z-156 ( ) HO 4F-112 ( ) MT 3B-117 .br \} .if n \{\ Computing network users may order copies via the \f2library -1\f1 command; for information, type \f2man library\f1 after the UNIX prompt. Otherwise: .sp1 .rn fo xx 1 Enter PAN if AT&T-BL (or SS# if .mk z non-AT&T-BL). \l'2.0i' 2 Return this sheet to any ITDS location. .sp|\\nzu .in 4.0i Internal Technical Document Service .sp1 .ta 1.75i .if \\n(en=1 \{\ ( ) AK 2H-28 ( ) IH 7L-101 ( ) ALC 1B-102 ( ) MV 3L-19 ( ) CB 30-2011 ( ) WH 3E-204 ( ) HO 4F-112 \} .if \\n(en=2 \{\ ( ) DR 2F-19 ( ) INH 1C-114 ( ) IW 2Z-156 ( ) MT 3B-117 \} .if \\n(en=3 \{\ ( ) NW-ITDS \} .if \\n(en=4 \{\ ( ) PR5-2120 \} .br \} .in .ps .vs .rr a b c e g h i j k .rr l m n o p q r s t .rr u v w x y z .rr an fn as ds fs bd dv lp .rr tp np la a1 a2 ar fi .rr in si ps ts vs tv b1 b2 m1 .rr :b :c :d :e ls dt fc wp .rm a) b) c) e) k) n) o) p) q) .rm r) s) t) u) v) w) x) y) z) .rm a( b( m( n( o( p( s( t( .rm tc nc Tm 10 ve .rm hD fO aT tK bE bX tH cH .rm dH eP cP tP t1 CS tI tS cE ..