'\"#ident	"@(#)ucbtroff:troff.d/tmac.d/xps	1.1"
'\"		PROPRIETARY NOTICE (Combined)
'\"
'\"This source code is unpublished proprietary information
'\"constituting, or derived under license from AT&T's UNIX(r) System V.
'\"In addition, portions of such source code were derived from Berkeley
'\"4.3 BSD under license from the Regents of the University of
'\"California.
'\"
'\"
'\"
'\"		Copyright Notice 
'\"
'\"Notice of copyright on this source code product does not indicate 
'\"publication.
'\"
'\"	(c) 1986,1987,1988,1989  Sun Microsystems, Inc
'\"	(c) 1983,1984,1985,1986,1987,1988,1989  AT&T.
'\"	          All rights reserved.
.\" @(#)ex 4.5 88/04/11 SMI; Sun's new look macros
.ds // /usr/ucblib/doctools/tmac/
.	\" IZ - initialize (before text begins)
.de IZ
.nr FM 1i
.nr YY -\\n(FMu
.nr XX 0 1
.nr IP 0
.nr PI 4n
.nr QI 5n
.nr FI 2n
.nr I0 \\n(PIu		\" indent for .IP
.nr GI 0i		\" global indent
.nr PL 3		\" page layout 3=FULL
.nr GU 0i		\" global gutter
.nr GL 7.25i		\" global line length
.na
.nr PS 11
.ps \\n(PSp
.nr VS 13
.vs \\n(VSp
.if n .nr PD 1v
.if t .nr PD .5v
.if n .nr DD 1v
.if t .nr DD .5v
.nr dP 1		\" delta point size for .LS
.nr dV 1		\" delta vertical spacing for .LS
.nr cH 1		\" clear header
.nr hS 0		\" header style: 0=no line, 1=line
.nr ML 3v
.nr IR 0		\" indent level counter
.nr TB 0
.nr SJ \\n(.j		\" adjust mode
.po .75i
.if \\nO .po \\nOu	\" page offset from command line
.nr PO \\n(.ou
.nr LL 7.25i
.ll \\n(LLu
.nr LT \\n(LLu
.lt \\n(LTu
.ev 1
.na
.nr FL 7i
.in 0
.ps 8
.vs 10p
.ev
.wh 0 PN			\" new page trap
.wh -\\n(FMu FO			\" footer trap
.ch FO 16i			\" footnote trap
.wh -\\n(FMu FX
.ch FO -\\n(FMu
.wh -(\\n(FMu/2u-9p)-.25i BT	\" bottom title trap
.in \\n(GIu			\" set position of left text margin
.br
.nr YE 1
.di
.ce 0
.nr KI 0
.hy 14
.fi
..
.	\" RT - reset (at new paragraph)
.de RT
.if !\\n(IK .if !\\n(IF .if !\\n(IX .if !\\n(BE .di
.ce 0
.ul 0
.if \\n(QP \{\
.	ll +\\n(QIu
.	in -\\n(QIu
.	nr QP -1
.\}
.if \\n(NX<=1 .ll \\n(LLu
.if !\\n(IF \{\
.	ps \\n(PS
.	if \\n(VS>=40 .vs \\n(VSu
.	if \\n(VS<=39 .vs \\n(VSp
.\}
.if !\\n(IP .nr I0 \\n(PIu
.if \\n(IP \{\
.	in -\\n(I\\n(IRu
.	if \\n(PL=1 .if \\n(.i<2.25i .in 2.25i
.	nr IP -1
.	if \\n(IK \{\
.		ev 0
.		in -\\n(I\\n(IRu
.		if \\n(PL=1 .if \\n(.i<2.25i .in 2.25i
.		ev
.	\}
.\}
.ft 1
.TA
.fi
.hy 14
.ad l
.if t .na
..
.	\" TA - set default tabs
.de TA
.if n .ta 8n 16n 24n 32n 40n 48n 56n 64n 72n 80n
.if t .ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n 70n 75n
..
.	\" PL - page layout: RIGHT=1 LEFT=2 FULL=3
.de PL
.RT
.if \\$1RIGHT \{\
.	nr PL 1
.	nr GI 2.25i
.	nr GU .25i
.	in 2.25i
.	nr LL 7.25i
.	nr FL 5i
.\}
.if \\$1LEFT \{\
.	nr PL 2
.	nr GI 0
.	nr GU .25i
.	in 0
.	nr LL 5i
.	nr FL 5i
.\}
.if \\$1FULL \{\
.	nr PL 3
.	nr GI 0
.	nr GU 0
.	in 0
.	nr LL 7.25i
.	nr FL 7i
.\}
.ll \\n(LLu
.if !\\$1RIGHT .if !\\$1LEFT .if !\\$1FULL \{\
.	tm Error: line \\n(.c: page layout specified as \\$1
.	PL RIGHT
.\}
..
.	\" DN - document name
.de DN
.if \\nF .if \\*(Dn .tm .IE\tDOCUMENT\t\\$1
.ds Dn \\$1
..
.	\" RV - revision
.de RV
.ds Rv \\$1
..
.	\" PA - part no.
.de PA
.ds Pa \\$1
..
.	\" RL - release
.de RL
.ds Rl \\$1
..
.	\" PD - paragraph depth
.de PD
.if t .nr PD .5v
.if n .nr PD 1v
.if !\\$1 .nr PD \\$1v
..
.	\" PP - regular paragraph
.de PP
.RT
.nr # 0 1
.sp \\n(PDu
.ne 1.1
.ti +\\n(PIu
..
.	\" LP - left paragraph
.de LP
.RT
.nr # 0 1
.sp \\n(PDu
.ne 1.1
.ti \\n(.iu
..
.	\" IP - indented paragraph
.de IP
.RT
.sp \\n(PDu
.ne 1.1
.if !\\n(IP .nr IP +1
.if \\n(.$-1 .nr I\\n(IR \\$2n
.in +\\n(I\\n(IRu
.ta \\n(I\\n(IRu
.if \\n(.$ \{\
.ds HT \&\\$1\ \ 
.ti -\\n(I\\n(IRu
\\*(HT\t\c
.if \w\\*(HTu>(\\n(I\\n(IRu) .br
.\}
..
.	\" XP - exdented paragraph
.de XP
.RT
.sp \\n(PDu
.ne 1.1
.if !\\n(IP .nr IP +1
.in +\\n(I\\n(IRu
.ti -\\n(I\\n(IRu
..
.	\" QP - quote paragraph
.de QP
.ti \\n(.iu
.RT
.sp \\n(PDu
.ne 1.1
.nr QP 1
.in +\\n(QIu
.ll -\\n(QIu
.ti \\n(.iu
..
.	\" BP - bullet paragraph
.de BP
.IP \\*(SQ
..
.	\" NP - numbered paragraph
.de NP
.IP \\n+#.
..
.	\" UH - unnumbered header: $1=level, $2=text
.	\" 	C=chapter, M=chapter no TOC, [23]=levels same as [HS]
.de UH
.RT
.nh
.if '\\$1'C' .nr nS 1
.if '\\$1'M' .nr nS 1
.if '\\$1'H' .nr nS 2
.if '\\$1'S' .nr nS 3
.if \\$1>0 .nr nS \\$1
.		\" Major Chapter style Heading
.if \\n(nS=1 \{\
.	nr OH 0
.	nr EH 0
.	nr cH 1
.	ie \\np \{\
.		bp \\np
.		nr p 0
.	\}
.	el \{\
.		if o .bp +2
.		if e .bp
.	\}
.	nr cH 0
.	nr OH 1
.	nr EH 1
.	if !\\n(OF .if !\\n(EF .af PN i
.	if !\\n(OF .OF ''\- \\\\\\\\n(PN \-''
.	if !\\n(EF .EF ''\- \\\\\\\\n(PN \-''
.	rs
.	sp |9i-\\n(.vu
.	ps 128
\!!gsave 0.99 setgray
.	if \\n(PL=1 \h'3.25i'\(su
.	if \\n(PL>1 \h'5.5i'\(su
.	fl
\!!grestore
.	br
.	ps
.	if \\n(PL=1 .GB \\n(.ou+\\n(GIu \\n(.ou+\\n(LLu
.	if \\n(PL=2 .GB \\n(.ou \\n(.ou+\\n(LLu
.	if \\n(PL=3 .GB \\n(.ou \\n(.ou+\\n(LLu
.	sp |2i-\\n(.vu
\s22\D'l \\n(LLu-\\n(GIu 0'\s0
.	br
.	if \\n(PL=1 .ad r
.	if \\n(PL=2 .ad l
.	if \\n(PL=3 .ad l
.	ps 22
.	vs 26
.	sp |2.5i-4p-5.5p
\&\\$2
.	br
.	ps
.	vs
.	sp |3.5i-3p-4p
.	in \\n(GIu
.	ad l
.	EH \\$2 \(em \fIContinued\fP
.	OH \\$2 \(em \fIContinued\fP
.	nr cH 0
.	ns
.\}
.if \\n(nS>1 \{\
.	ne .5i
.	if \\n(nS=2 .ft B
.	if \\n(nS=3 .ft R
.	if \\n(nS=3 .if \\nM=3 .ft BI
.	if \\n(nS=4 .if \\nM=3 .ft I
.	sp .375i-1v
.	mk H#
.	in 0
.	if \\n(PL=1 .ll \\n(GIu-\\n(GUu
.	if \\n(PL=2 .ll \\n(GLu
.	if \\n(PL=2 .in \\n(LLu+\\n(GUu
.	fi
\&\\$2
.	mk B#
.	in \\n(GIu
.	ll \\n(LLu
.	hy 14
.	if !\\n(PL=3 .sp |\\n(H#u-\\n(PDu
.	R
.\}
.nr PN \\n%
.if \\nF .if '\\$1'C' .if \\n(IK \!.tm .CE U 1 "\\$2" \\\\n(PN \\n(H1
.if \\nF .if '\\$1'C' .if !\\n(IK  .tm .CE U 1 "\\$2" \\n(PN \\n(H1
.nr fM 0
.if '\\$1'CONTENTS' .nr fM 1
.if '\\$1'TABLES' .nr fM 1
.if '\\$1'FIGURES' .nr fM 1
.if '\\$1'INDEX' .nr fM 1
.if \\n(fM \{\
.	LP
.	PL RIGHT
.	nr PN \\n%
.	if !\\nH .EF ''\- \\\\\\\\n(PN \-''
.	if !\\nH .OF ''\- \\\\\\\\n(PN \-''
.	if \\nH .EF ''''
.	if \\nH .OF ''''
.	if !\\nP .pn 1
.	if !\\nP .nr % 1
.	if \\nP .pn \\nP+1
.	if \\nP .nr % \\nP
.	if \\nP .nr PN \\nP
.	nr P 0
.	if '\\$1'CONTENTS' .ds hD Contents
.	if '\\$1'TABLES' .ds hD Tables
.	if '\\$1'FIGURES' .ds hD Figures
.	if '\\$1'INDEX' .ds hD Index
.	EH \\*(hD \(em \fIContinued\fP
.	OH \\*(hD \(em \fIContinued\fP
.	nr cH 0
.	ps 11
.	nr PS 11
.	vs 15
.	nr VS 15
.	ne 1i+2v
.	if '\\$1'INDEX' \{\
.		PL FULL
.		if \\nF .tm .CE U 1 "\fBIndex\f1" \\n(PN \\n(H1
.		if \\nF .nr PG 1
.		in 0
.		nr GI 0 \}
.	if !\\nH \{\
.		rs
.					\" Lay down logo
.		sp |9i-\\n(.vu
.		ps 128
\!!gsave 0.99 setgray
.		if  '\\$1'INDEX' \h'5.5i'\(su
.		if !'\\$1'INDEX' \h'3.25i'\(su
.		fl
\!!grestore
.		ps
.		sp |2i-\\n(.vu
.		if  '\\$1'INDEX' .GB \\n(.ou \\n(.ou+\\n(LLu
.		if  '\\$1'INDEX' \s22\D'l 7.25i 0'\s0
.		if !'\\$1'INDEX' .GB \\n(.ou+\\n(GIu \\n(.ou+\\n(LLu
.		if !'\\$1'INDEX' \s22\D'l 5.0i 0'\s0
.		br
.		if  '\\$1'INDEX' .ad l
.		if !'\\$1'INDEX' .ad r
.		ps 22
.		vs 26
.		sp |2.5i-4p-5.5p
\&\\*(hD
.		br
.		ps
.		vs
.		sp |3.375i-3p-4p
.		in \\n(GIu
.		ad l
.		nf
.		ps 11
.		nr PS 11
.		vs 15
.		nr VS 15
.		af PN i
.		if '\\$1'INDEX' \{\
.			ps 9
.			nr PS 9
.			vs 11
.			nr VS 11
.			af PN 1
.			2C \}
.	\}
.\}
..
.	\" TL - title
.de TL
.ds BU \0\0\0\0
.ch FO 16i
.ch FX 17i
.sp |10i-3.1v
.ti 0
.\"\s36\l'7.25i'\s0
\s22\D'l 7.25i 0'\s0
.br
.tl '''\s12Sun Microsystems, Inc. \\*(BU 2550 Garcia Avenue \\*(BU Mountain View, CA 94043 \\*(BU 415-960-1300\s0'
.sp -.5
.ti 0
\s6\D'l 7.25i 0'\s0
.br
.if \\*(Rl .sp
.ps 11
.if !\\*(Pa .tl Part No: \\*(Pa
.if !\\*(Rv .tl \\*(Rv
.if !\\*(Rl .tl \\*(Rl
.br
.ch FO -\\n(FMu
.ch FX -\\n(FMu
.sp |1.6i
.ti 0
\s22\^\(su \fBs\^u\^n\h'-\w's\^u\^n'u'\s9\v'.7m'\fH\s6microsystems\fR\v'-3m'\(rg
.sp |2i-\\n(.vu
.ti 0
.GB \\n(.ou 8i
\s22\D'l 7.25i 0'
.sp |2.5i-4p-5.5p
.ad r
.ps 22
.vs 26
..
.	\" CR - copyright
.de CR
.bp
.LP
.rs
.sp |8.67i
.ce
.ie \\n(.$ Copyright \(co \\$1 by Sun Microsystems, Inc.
.el Copyright \(co 1988 by Sun Microsystems, Inc.
.sp .5
This publication is protected by Federal Copyright Law,
with all rights reserved.
No part of this publication may be reproduced,
stored in a retrieval system,
translated, transcribed, or transmitted,
in any form, or by any means
manual, electric, electronic, electromagnetic,
mechanical, chemical, optical, or otherwise,
without prior explicit written permission from Sun Microsystems.
.sp |1i
.LP
.nf
..
.	\" H - header: $1=level, $2=text
.	\"	C=chapter, A=appendix, [2-4]=levels
.de H
.RT
.nh
.nr NS \\$1
.if '\\$1'C' .nr NS 1
.if '\\$1'A' .nr NS 1
.if '\\$1'A' .if !\\n(aP \{\
.	nr aP 1
.	nr H1 0
.	af H1 A
.\} 
.if '\\$1'TINY' \{\
.	nr NS 1
.	nr M 2
.	if !\\$3 .nr M 3	\" arg 3 goes above gray line
.\}
.		\" chapter/appendix
.if \\n(NS=1 \{\
.	if \\nC .nr H1 \\nC-1
.	if (\\n(nl<=1.25i) .if !\\nM .if o .pn +2	\" skip for halftitles
.	if (\\n(nl<=1.25i) .if  \\nM .if o .pn +0	\" don't skip page #s
.	if e \{\
.		if  \\nM .pn +1
.		if !\\nM .pn +3
.	\}
.	if (\\n(nl>1.25i) .if !\\nM .if o .pn +4
.	if (\\n(nl>1.25i) .if  \\nM .if o .pn +2
.	if !\\n(hS .if !\\nP .pn 3		\" start of document proper
.	if !\\n(hS .if !\\nP .if \\nM .pn 1
.	if \\nP .pn \\nP
.	nr P 0
.	nr cH 1
.	rs
.	bp
.	af PN 1
.	nr cH 0
.	if \\nF .nr PG 1
.	nr C 0
.	nr T1 0			\" table counter
.	nr F1 0			\" figure counter
.\}
.nr H\\n(NS +1
.if !\\n(hS \{\
.	nr hS 1
.	nr EF 1
.	nr OF 1
.	af PN 1
.\}
.if !\\n(NS-4 .nr H5 0
.if !\\n(NS-3 .nr H4 0
.if !\\n(NS-2 .nr H3 0
.if !\\n(NS-1 .nr H2 0
.		\" chapter/appendix
.if \\n(NS=1 \{\
.	ie \\n(aP .ds hS Appendix \\n(H1 \(em \\$2
.	el .ds hS Chapter \\n(H1 \(em \\$2
. 	if \\nM>1 .ds hS \\$2
.	OH \s9\\\\\\\\*(hS\s0\h'.25i'\s11\\\\\\\\n(PN\s0
.	EH \s11\\\\\\\\n(PN\s0\h'.25i'\s9\\*(Dn\s0
\\&
.	sp |1.875i-\\n(.vu
.	ps 48
.	if \\nM<2 .tl '''\\n(H1'
.	if \\nM=3 .tl '''\\$3'
.	ps
.	sp |2i-\\n(.vu
.	in \\n(GIu
.	if \\n(PL=1 .GB \\n(.ou+\\n(GIu \\n(.ou+\\n(LLu
.	if \\n(PL=2 .GB \\n(.ou \\n(.ou+\\n(LLu
.	if \\n(PL=3 .GB \\n(.ou \\n(.ou+\\n(LLu
\s22\D'l (\\n(LLu-\\n(GIu) 0'\s0
.	sp |2.5i-4p-5.5p
.	ad r
.	ps 22
.	vs 26
\&\\$2
.	sp |3.5i-3p-4p
.	ps
.	vs
.	in \\n(GIu
.	ad l
.	ns
.	nr cP 1
.\}
.		\" level [2345]
.if \\n(NS>1 \{\
.	ne 1i
.	if !\\n(IK \{\
.		if \\n(nlu>\\n(L#u .sp .375i-1v
.		if \\n(B#>0 .if \\n(B#u>=\\n(nlu .sp |\\n(B#u+.25i+1v
.		nr B# 0 \}
.	if \\n(IK \{\
.		if \\n(nlu>\\n(L# .sp .375i-1v
.		if \\n(B#<=\\n(.d .if \\n(B#>0 .sp |\\n(B#u+.25i+1v 
.		nr B# 0 \}
.	fi
.	in 0
.	if \\n(PL=1 .ll \\n(GIu-\\n(GUu
.	if \\n(PL=2 .ll \\n(GLu
.	if \\n(PL=2 .in \\n(LLu+\\n(GUu
.	mk H#
.	if \\n(NS=2 \{\
.		ft B
.		ps +1
.		ds SN \\n(H1.\\n(H2.
.		if \\nM>1 .ds SN \\n(H2.
.		in +\w\\*(SN\ \ u
.		ti -\w\\*(SN\ \ u
\&\\*(SN\ \ \\$2
.		ps -1
.		R \}
.	if \\n(NS=3 \{\
.		ft B
\&\\$2
.		R \}
.	if \\n(NS>=4 \{\
.		ft R
.		if \\n(HI .ft I
\&\\$2
. 		\}
.	if !\\n(IK .mk B#
.	if \\n(IK .mk K#
.	in \\n(GIu
.	ll \\n(LLu
.	if \\n(PL<3 .sp |\\n(H#u-\\n(PDu 
.\}
.nr PN \\n%
.hy 14
.if \\nF .if '\\$1'C' .if !\\n(IK  .tm .CE C 1 "\\$2" \\n(PN \\n(H1
.if \\nF .if '\\$1'C' .if \\n(IK \!.tm .CE C 1 "\\$2" \\\\n(PN \\n(H1
.if \\nF .if '\\$1'A' .if !\\n(IK  .tm .CE A 1 "\\$2" \\n(PN \\n(H1
.if \\nF .if '\\$1'A' .if \\n(IK \!.tm .CE A 1 "\\$2" \\\\n(PN \\n(H1
.if \\nF .if '\\$1'1' .if !\\n(IK  .tm .CE C 1 "\\$2" \\n(PN \\n(H1
.if \\nF .if '\\$1'1' .if \\n(IK \!.tm .CE C 1 "\\$2" \\\\n(PN \\n(H1
.if \\nF .if \\n(NS>1 .if !\\n(IK  .tm .CE N \\n(NS "\\$2" \\n(PN \\n(H1 \\n(H2
.if \\nF .if \\n(NS>1 .if \\n(IK \!.tm .CE N \\n(NS "\\$2" \\\\n(PN \\n(H1 \\n(H2
..
.	\" TF - print TN or FN
.de TF
.nr TF \\n(.f
.nr TX \\n(.s
.if \\n(PL=1 \{\
.	ta \\n(GIu-\\n(GUuR \\n(GIu 
.	ti 0
	\&\s11\\*(tS\t\fI\&\\$1\f\\n(TF\\s\\n(TX
.\}
.if \\n(PL=2 \{\
.	ta \\n(LLuR \\n(LLu+\\n(GUu 
.	nf
	\&\s11\fI\&\\$1\f\\n(TF\t\&\\*(tS\\s\\n(TX
.	fi
.\}
.if \\n(PL=3 \{\
.	ta 2iR 2.25i
.	ti 0
	\&\s11\\*(tS\t\fI\&\\$1\f\\n(TF\\s\\n(TX
.\}
..
.	\" TN - table name
.de TN
.nr T1 +1
.ll \\n(LLu
.ds tH \\$1
.ds tS Table \\n(H1-\\n(T1
.if \\nM>1 .ds tS Table \\n(T1
.if !\\n(IK \{\
.	if \\n(nlu>\\n(L#u .sp 1v
.	if \\n(B#>0 .if \\n(B#u>=\\n(nlu .sp |\\n(B#u+2v
.	nr B# 0
.\}
.if \\n(IK \{\
.	sp 1v
.	ie \\n(K# \{\
.		sp |\\n(K#u+2v
.		nr K# 0 \}
.	el \{\
.		if \\n(B#u>=\\n(nlu .sp (\\n(B#u-\\n(nlu+1v)u
.		nr B# 0 \}
.\}
.ne 2i
.TF "\\*(tH"
.if \\nF .if \\n(IK \!.tm .CE T 1 "\\$1" \\\\n(PN \\n(H1 \\n(T1
.if \\nF .if !\\n(IK .tm .CE T 1 "\\$1" \\n(PN \\n(H1 \\n(T1
..
.	\" TC - table continued (multi-page)
.de TC
.if !\\n(tC \{\
.	as tH \(em Continued
.	nr tC 1
.\}
.TF "\\*(tH"
.sp \\n(PDu
..
.	\" FN - figure name
.de FN
.nr F1 +1
.ll \\n(LLu
.ds tS Figure \\n(H1-\\n(F1
.if \\nM>1 .ds tS Figure \\n(F1
.sp 1v
.TF "\\$1"
.if \\nF .if \\n(IK \!.tm .CE F 1 "\\$1" \\\\n(PN \\n(H1 \\n(F1
.if \\nF .if !\\n(IK .tm .CE F 1 "\\$1" \\n(PN \\n(H1 \\n(F1
..
.	\" NS - note start
.de NS
.if \\n(.$ \{\
.	nr mN 1
.	LP
.	if \\$1NOTE .ds mS \fINOTE
.	if \\$1CAUTION .ds mS \fBCAUTION
.	if \\$1WARNING .ds mS \f(BIWARNING
.	if \\n(B#>0 .if (\\n(B#u+.25i+1v)>=\\n(nlu .sp |\\n(B#u+.25i+1v
.	nr B# 0
.	ta \\n(GIu-\\n(GUuR \\n(GIu-\w'\ 'u
.	ti 0
.	ie !\\*(mS \t\&\\*(mS\t
.	el \t\&\\$1\t
'	in \\n(GIu
.	rm mS
.\}
.if !\\n(.$ \{\
.	nr mN 0
.	sp .375i-1v
.	mk H#
.	ft H
.	ps 9
.	vs 10
.	if \\n(PL=1 .in 0
.	if \\n(PL=1 .ll \\n(GIu-\\n(GUu
.	if \\n(PL=2 .ll \\n(GLu
.	if \\n(PL=2 .in \\n(LLu+\\n(GUu
.\}
..
.	\" NE - note end
.de NE
.if \\n(mN=1 .RT
.if \\n(mN=0 \{\
.	if \\n(H#>\\n(nl .nr H# \\n(L#
.	mk B#
.	br
.	ft 1
.	ps \\n(PSp
.	vs \\n(VSp
.	sp |\\n(H#u-\\n(PDu-2p		\" 2p because of 10pt in .NS
.	in \\n(GIu
.	ll \\n(LLu
.\}
..
.	\" CE - table of contents entry
.de CE
.rn CE @T
.so \*(//ex.toc
.CE "\\$1" "\\$2" "\\$3" "\\$4" "\\$5" "\\$6" "\\$7" "\\$8" "\\$9"
.rm @T
..
.	\" BS - box start
.de BS
.nr BI \\n(.i
.sp \\n(PDu
.nr GS 0
.if \\n(.$ \{\
.	if  \\$1GRAY .nr GS 1
.	if !\\$1GRAY .in +\\$1n
.	if \\n(.$-1 .in +\\$2n \}
.mk U#
..
.	\" BE - box end
.de BE
.if !\\n(GS \{\
.nr DI \\n(.i
.in \\n(GIu
.mk D#
\h'1n'\c
\D'l (\\n(LLu-\\n(GIu-2n) 0'\c
\D'a 0 -1n 1n 0'\c
\D'l 0 -(\\n(D#u-\\n(U#u)'\c
\D'a -1n 0 0 -1n'\c
\D'l -(\\n(LLu-\\n(GIu-2n) 0'\c
\D'a 0 1n -1n 0'\c
\D'l 0 (\\n(D#u-\\n(U#u)'\c
\D'a 1n 0 0 1n' \}
.rr U# D#
.rs
.sp \\n(PDu
.if \\n(GS .sp \\n(PDu
.nr GS 0
.in \\n(BIu
..
.	\" GS - draw gray scale box
.de GS
.mk D#
.nr r 1n
.nr x1 (\\n(GIu+\\n(.ou+1n)
.nr y1 \\n(D#u+\\n(.vu
\!!\\n(x1 \\n(y1 moveto
.nr x1 \\n(LLu+\\n(.ou
.nr y1 \\n(D#u+\\n(.vu
.nr x2 \\n(LLu+\\n(.ou
.nr y2 \\n(D#u+\\n(.vu-1n
\!!\\n(x1 \\n(y1 \\n(x2 \\n(y2 \\nr arcto
\!!4 {pop} repeat
.nr x1 \\n(LLu+\\n(.ou
.nr y1 \\n(U#u-\\n(VSp+3n
.nr x2 \\n(LLu+\\n(.ou-1n
.nr y2 \\n(U#u-\\n(VSp+3n
\!!\\n(x1 \\n(y1 \\n(x2 \\n(y2 \\nr arcto
\!!4 {pop} repeat
.nr x1 (\\n(GIu+\\n(.ou)
.nr y1 \\n(U#u-\\n(VSp+3n
.nr x2 (\\n(GIu+\\n(.ou)
.nr y2 \\n(U#u-\\n(VSp+4n
\!!\\n(x1 \\n(y1 \\n(x2 \\n(y2 \\nr arcto
\!!4 {pop} repeat
.nr x1 (\\n(GIu+\\n(.ou)
.nr y1 \\n(D#u+\\n(.vu
.nr x2 (\\n(GIu+\\n(.ou+1n)
.nr y2 \\n(D#u+\\n(.vu
\!!\\n(x1 \\n(y1 \\n(x2 \\n(y2 \\nr arcto
\!!4 {pop} repeat
\!!gsave 0.99 setgray fill grestore stroke
..
.	\" XS - example start
.de XS
.ie \\$1no .ID \\$2 1
.el .DS I \\$1 1
.nr PQ \\n(.f
.ft L
.ps 9p
.vs 11p
.nr @ \\w'x'u*4
.if \\n(.$=2 .if !\\$1no .nr @ \\w'x'u*\\$2
.if \\n(.$=3 .nr @ \\w'x'u*\\$3
.ta \\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u
..
.	\" XE - example end
.de XE
.LE
..
.	\" LS - listing start
.de LS
.ie \\$1no .ID \\$2 1
.el .DS I \\$1 1
.nr PQ \\n(.f
.ft L
.ps -\\n(dP
.vs -\\n(dV
.nr @ \\w'x'u*4
.if \\n(.$=2 .if !\\$1no .nr @ \\w'x'u*\\$2
.if \\n(.$=3 .nr @ \\w'x'u*\\$3
.ta \\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u +\\n@u
..
.	\" LE - listing end
.de LE
.ft \\n(PQ
.ps \\n(PS
.if \\n(VS>=40 .vs \\n(VSu
.if \\n(VS<=39 .vs \\n(VSp
.DE
..
.	\" DS - display with keep (L=left I=indent C=center B=block)
.de DS
.KS
.nf
.\\$1D \\$2 \\$1
.ft 1
.ps \\n(PS
.if \\n(VS>=40 .vs \\n(VSu
.if \\n(VS<=39 .vs \\n(VSp
..
.de D
.ID \\$1
..
.	\" ID - indented display no keep
.de ID
.XD
.if t .in +.5i
.if n .in +8
.if \\n(.$ .if !\\$1I .if !\\$1 \{\
.	in \\n(OIu
.	in +\\$1n
.\}
..
.	\" LD - left display no keep
.de LD
.XD
..
.	\" CD - centered display no keep
.de CD
.XD
.ce 999
..
.	\" XD - real display macro
.de XD
.nf
.nr OI \\n(.i
.sp \\n(DDu
..
.	\" DE - end display of any kind
.de DE
.ce 0
.if \\n(BD .DF
.nr BD 0
.in \\n(OIu
.KE
.if !\\n(U# .sp \\n(DDu
.fi
..
.	\" BD - block display: center entire block
.de BD
.XD
.nr BD 1
.nf
.in \\n(OIu
.di DD
..
.	\" DF - finish block display
.de DF
.di
.if \\n(dl>\\n(BD .nr BD \\n(dl
.if \\n(BD<\\n(.l .in (\\n(.lu-\\n(BDu)/2u
.nr EI \\n(.l-\\n(.i
.ta \\n(EIuR
.DD
.in \\n(OIu
..
.	\" KS - begin regular keep
.de KS
.nr KN \\n(.u
.if !\\n(IK .if !\\n(IF .KQ
.nr IK +1
..
.	\" KQ - real keep processor
.de KQ
.br
.nr KI \\n(.i
.ev 2
.TA
.br
.in \\n(KIu
.ps \\n(PS
.if \\n(VS>=40 .vs \\n(VSu
.if \\n(VS<=39 .vs \\n(VSp
.ll \\n(LLu
.lt \\n(LTu
.if \\n(NX>1 .ll \\n(CWu
.if \\n(NX>1 .lt \\n(CWu
.di KK
.nr TB 0
..
.	\" KF - begin floating keep
.de KF
.nr KN \\n(.u
.if !\\n(IK .FQ
.nr IK +1
..
.	\" FQ - real floating keep processor
.de FQ
.nr KI \\n(.i
.ev 2
.TA
.br
.in \\n(KIu
.ps \\n(PS
.if \\n(VS>=40 .vs \\n(VSu
.if \\n(VS<=39 .vs \\n(VSp
.ll \\n(LLu
.lt \\n(LTu
.if \\n(NX>1 .ll \\n(CWu
.if \\n(NX>1 .lt \\n(CWu
.di KK
.nr TB 1
..
.	\" KE - end keep
.de KE
.if \\n(IK .if !\\n(IK-1 .if !\\n(IF .RQ
.if \\n(IK .nr IK -1
..
.	\" RQ - real keep release
.de RQ
.br
.di
.nr NF 0
.nr DN \\n(dn
.if \\n(dn-\\n(.t .nr NF 1
.if \\n(TC .nr NF 1
.if \\n(NF .if !\\n(TB .sp 200
.if !\\n(NF .if \\n(TB .nr TB 0
.nf
.rs
.nr TC 5
.in 0
.ls 1
.if !\\n(TB \{\
.	ev
.	br
.	if \\n(GS .sp \\n(DNu
.	if \\n(GS .GS
.	if \\n(GS .sp |\\n(U#u
.	ev 2
.	KK
.\}
.ls
.ce 0
.if !\\n(TB .rm KK
.if \\n(TB .da KJ
.if \\n(TB \!.KD \\n(dn
.if \\n(TB .KK
.if \\n(TB .di
.nr TC \\n(TB
.if \\n(KN .fi
.in
.ev
..
.	\" PS - picture start: $1=height, $2=width
.de PS
.br
.if \\n(PL>1 .in \\n(.iu+((\\n(.lu-\\n(.iu-\\$2u)/2u)
.if \\n(PL=1 .if \\n(U# .in \\n(.iu+((\\n(.lu-\\n(.iu-\\$2u)/2u)
.ne \\$1u
.nr PF \\n(.f
.nr PX \\n(.s
..
.	\" PE - picture end
.de PE
.ps \\n(PX
.ft \\n(PF
.if \\n(PL>1 .in
.if \\n(PL=1 .if \\n(U# .in
.sp \\n(DDu
..
.	\" CP - copy PostScript
.	\"	$1 pathname of PostScript file
.	\"	$2 vertical space	default: 1.0i
.	\"	$3 relative indent	default: 0
.	\"	$4 figure name		default: not printed
.	\"	$5 scale x		default: 1.0
.	\"	$6 scale y		default: 1.0
.	\"	$7 rotation angle	default: 0
.de CP
.br
.ie !\\$2 .nr tY \\$2
.el             .nr tY 1.0i
.ie !\\$3 .nr tX \\$3
.el             .nr tX 0.0i
.ie !\\$4 .nr z 6v
.el             .nr z 0v
.if (\\n(tYu+1v)>(\\n(.tu-\\nz) \{\
.	bp
.	br
.	rs
.\}
.rs
.br
.ie !\\n(.z \{\
\!.mk P#
\!.nr t \\\\n(P#u
.\}
.el \{\
\\kx
.nr t \\n(nlu
.\}
.sp \\n(tYu
.ie !\\$5 .ds sX \\$5
.el             .ds sX 1.0
.ie !\\$6 .ds sY \\$6
.el             .ds sY 1.0
.ie !\\$7 .ds sR \\$7
.el             .ds sR 0
.ie !\\n(.z \{\
\!\\kx
\!.nr x \\\\n(.o+\\\\n(.i+\\\\nx+\\n(tXu
\!.mk P#
\!.nr y \\\\n(P#u
\!\!!/DOCHEIGHT \\\\nt \\\\ny sub 1.0 \\\\*(sY div mul def
\!\!!/DOCSTATE save def
\!\!!\\\\nx \\\\ny translate
\!\!!\\*(sX 8 mul \\*(sY -8 mul scale
\!\!!\\*(sR rotate
\!\!!/showpage {} def
\!.fl
\!.sy sed 's/^/!/' \\$1
\!\!!DOCSTATE restore
.\}
.el \{\
\\kx
.nr x \\n(.o+\\n(.i+\\nx+\\n(tXu
.mk P#
.nr y \\n(P#u
\!!/DOCHEIGHT \\nt \\ny sub 1.0 \\*(sY div mul def
\!!/DOCSTATE save def
\!!\\nx \\ny translate
\!!\\*(sX 8 mul \\*(sY -8 mul scale
\!!\\*(sR rotate
\!!/showpage {} def
.fl
.sy sed 's/^/!/' \\$1
\!!DOCSTATE restore
.\}
.rr P# sR t x y z sX sY tX tY
.if !\\$4 .FN "\\$4"
..
.	\" SD - screen dump (PostScript)
.de SD
.if  \\n(IK \!.mk P#
.if !\\n(IK .mk P#
.if  \\n(IK \!\!!save initmatrix
.if !\\n(IK \!!save initmatrix
.if  \\$3 .nr x \\n(GIu+\\n(.ou
.if !\\$3 .nr x \\n(.ou+\\$3
.if  \\$4 .if  \\n(IK \!.nr y 11i-\\\\n(P#u
.if  \\$4 .if !\\n(IK .nr y 11i-\\n(P#u
.if !\\$4 .nr y 11i-\\$4
.if  \\n(IK \!\!!\\nx 72 mul 720 div \\\\ny 72 mul 720 div translate
.if !\\n(IK \!!\\nx 72 mul 720 div \\ny 72 mul 720 div translate
.if  \\$5 .if  \\n(IK \!\!!0 rotate
.if  \\$5 .if !\\n(IK \!!0 rotate
.if !\\$5 .if  \\n(IK \!\!!\\$5 rotate
.if !\\$5 .if !\\n(IK \!!\\$5 rotate
.if  \\$2 .if  \\n(IK \!\!!2 2 scale
.if  \\$2 .if !\\n(IK \!!2 2 scale
.if !\\$2 .if  \\n(IK \!\!!\\$2 \\$2 scale
.if !\\$2 .if !\\n(IK \!!\\$2 \\$2 scale
.if  \\n(IK \!\!x I \\$1
.if !\\n(IK \!x I \\$1
.if  \\n(IK \!\!!restore
.if !\\n(IK \!!restore
.rr P# x y
..
.	\" KD - keep redivert
.de KD
.nr KM 0
.if \\n(.zKJ .nr KM 1
.if \\n(KM \!.KD \\$1
.if !\\n(KM .if \\n(.t<\\$1 .di KJ
..
.	\" EM - end macro (process leftover keep)
.de EM
.rr iL
.rm iC
.br
.if !\\n(TB .if t .wh -1p CM
.if \\n(TB \{\
\&\c
'	bp
.	PN
.	ch CM 160
.\}
.if \\nF \{\
.	nr P \\n%
.	if o .nr P +2
.	if e .nr P +1
.	nr F 2
.\}
..
.de XK
.nr TD 1
.nf
.ls 1
.in 0
.rn KJ KL
.KL
.rm KL
.if \\n(.zKJ .di
.nr TB 0
.if \\n(.zKJ .nr TB 1
.br
.in
.ls
.fi
.nr TD 0
..
.	\" PN - new page
.de PN
.if !\\n(LT .nr LT \\n(LLu
.if \\n(FM+\\n(HM>=\\n(.p \{\
.	tm HM + FM longer than page
.	ab
.\}
.if !\\n(HM .nr HM 1.0625i
.if o .po \\n(POu
.if e .po \\n(POu-\\n(GUu
.	\" if a page with header & line
.if !\\n(cH \{\
.	nr PF \\n(.f
.	nr PX \\n(.s
.	ft 1
.	ps \\n(PS
'	sp |.75i-.125i
.	PT
'	sp |.75i-.0625i
.	lt \\n(GLu
.	tl \s6\D'l \\n(GLu 0'\s0
.	lt \\n(LTu
.	ps \\n(PX
.	ft \\n(PF
'	sp .375i
.\}
.if \\n(cH 'sp .75i 
.mk L#
.nr B# 0
.nr XX 0 1
.nr YY 0-\\n(FMu
.ch FO 16i
.ch FX 17i
.ch FO -\\n(FMu
.ch FX \\n(.pu-\\n(FMu
.if \\n(MF .FV
.nr MF 0
.mk
. \".os
.ev 1
.if !\\n(TD .if \\n(TC<5 .XK
.nr TC 0
.ev
.nr TQ \\n(.i
.nr TK \\n(.u
.if \\n(IT \{\
.	in 0
.	nf
.	if \\n(T1 .TC
.	TT
.	in \\n(TQu
.	if \\n(TK .fi
.\}
.ns
.mk #T
.if \\n(U# \{\
.	mk U#
.	in \\n(DIu
.\}
..
.	\" PT - page titles
.de PT
.lt \\n(LTu
.pc %
.nr PN \\n%
.nr PT \\n%
.if \\n(PT>1 .if \\n(OH .if o .tl \\*(O1
.if \\n(PT>1 .if \\n(EH .if e .tl \\*(E2
.lt \\n(.lu
..
.	\" OH - odd page header
.de OH
.nr OH 1
.if !\\n(.$ .nr OH 0
.ds O1 \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.	\" EH - even page header
.de EH
.nr EH 1
.if !\\n(.$ .nr EH 0
.ds E2 \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.	\" FO - footer
.de FO
.rn FO FZ
.if \\n(U# .if !\\n(IK \{\
.	BE
.	mk U#
.\}
.if \\n(IT .nr T. 1
.if \\n(IT .if !\\n(FC .T# 1
.if \\n(IT .br
.nr FC +1
.if \\n(NX<2 .nr WF 0
.nr dn 0
.if \\n(FC<=1 .if \\n(XX .XF
.rn FZ FO
.nr MF 0
.if \\n(dn .nr MF 1
.if !\\n(WF .nr YY 0-\\n(FMu
.if !\\n(WF .ch FO \\n(YYu
.if !\\n(dn .nr WF 0
.if \\n(FC<=1 .if !\\n(XX \{\
.	if \\n(NX>1 .RC
.	if \\n(NX<2 'bp
.\}
.nr FC -1
.if \\n(ML .ne \\n(MLu
..
.	\" BT - bottom title
.de BT
.if \\n(PG .tm .SE PAGINATE NEW-PAGE \\n%
.nr PF \\n(.f
.nr PX \\n(.s
.lt \\n(LTu
.ie \\n(hS .if \\n(OF \{\
.	if !\\n(cP .rm Pn
.	if \\n(cP .ds Pn \\n(PN
.	nr cP 0
.	if \\nM<3 .ds @@ \h'2.25i-\w'\(su 'u'
.	tl \s22\\*(@@\(su \&\fBs\^u\^n\h'-\w's\^u\^n'u'\s9\v'.7m'\fH\s6microsystems\s9\fR\v'-.7m'\\*(Pn\h'1.4i'\\*(Rv
.\}
.el \{\
.	ft 1
.	ps 9
.	nr PN \\n%
.	if \\n(OF .if o .tl \\*(O3
.	if \\n(EF .if e .tl \\*(E4
.\}
.ft \\n(PF
.ps \\n(PX
.if \\nF=2 .tm \\nP
..
.	\" OF - odd page footer
.de OF
.nr OF 1
.if !\\n(.$ .nr OF 0
.ds O3 \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.	\" EF - even page footer
.de EF
.nr EF 1
.if !\\n(.$ .nr EF 0
.ds E4 \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
..
.	\" 2C - double column
.de 2C
.MC
..
.	\" 1C - single column
.de 1C
.MC \\n(LLu
.hy 14
..
.	\" MC - multiple columns: $1=column width
.de MC
.nr L1 \\n(LL*7/15
.if \\n(.$ .nr L1 \\$1n
.nr NQ \\n(LL/\\n(L1
.if \\n(NQ<1 .nr NQ 1
.if \\n(NQ>2 .if (\\n(LL%\\n(L1)=0 .nr NQ -1
.if !\\n(NX .nr NX 1
.if !\\n(NX=\\n(NQ \{\
.	RT
.	if \\n(NX>1 .bp
.	mk
.	nr NC 1
.	po \\n(POu
.\}
.if \\n(NQ>1 .hy 12
.nr NX \\n(NQ
.nr CW \\n(L1
.ll \\n(CWu
.nr FL \\n(CWu
.if \\n(NX>1 .nr GW (\\n(LL-(\\n(NX*\\n(CW))/(\\n(NX-1)
.nr RO \\n(CW+\\n(GW
.ns
..
.de RC
.if \\n(NC>=\\n(NX .C2
.if \\n(NC<\\n(NX .C1
.nr NC \\n(ND
.	\" For the indexer: handle continued primary index terms
.	\" that span across columns or pages.
.if \\n(iL>0 .if !\\*(iC \{\
.	if \\n(.i>0 .ti -\\n(.i
\\*(iC
.	ti -4
.\}
..
.de C1
.rt
.po +\\n(ROu
.nr ND \\n(NC+1
.nr XX 0 1
.if \\n(MF .FV
.ch FX \\n(.pu-\\n(FMu
.ev 1
.if \\n(TB .XK
.nr TC 0
.ev
.nr TQ \\n(.i
.if \\n(IT .in 0
.if \\n(IT .TT
.if \\n(IT .in \\n(TQu
.mk #T
.ns
..
.de C2
.po \\n(POu
'bp
.nr ND 1
..
.	\" RS - right shift
.de RS
.nr IS \\n(IP
.RT
.nr IP \\n(IS
.if \\n(IP .in +\\n(I\\n(IRu
.nr IR +1
.nr I\\n(IR \\n(PIu
.in +\\n(I\\n(IRu
..
.	\" RE - retreat left
.de RE
.nr IS \\n(IP
.RT
.nr IP \\n(IS
.if \\n(IR .nr IR -1
.if \\n(IP<=0 .in -\\n(I\\n(IRu
..
.	\" I - italic font
.de I
.nr PQ \\n(.f
.if t .ft 2
.ie \\$1 .if n .ul 999
.el .if n .ul 1
.if t .if !\\$1 \{\
.	ie '\\*(.T'psc' \&\f\\n(PQ\\$3\fI\\$1\f\\n(PQ\\$2
.	el \&\f\\n(PQ\\$3\fI\\$1\|\f\\n(PQ\\$2
.\}
.if n .if \\n(.$=1 \&\\$1
.if n .if \\n(.$>2 \&\\$3\c
.if n .if \\n(.$>1 \&\\$1\c
.if n .if \\n(.$>1 \&\\$2
..
.	\" B - bold font
.de B
.nr PQ \\n(.f
.if t .ft 3
.ie \\$1 .if n .ul 999
.el .if n .ul 1
.if t .if !\\$1 \&\f\\n(PQ\\$3\fB\\$1\f\\n(PQ\\$2
.if n .if \\n(.$=1 \&\\$1
.if n .if \\n(.$>2 \&\\$3\c
.if n .if \\n(.$>1 \&\\$1\c
.if n .if \\n(.$>1 \&\\$2
..
.	\" R - Roman font
.de R
.if n .ul 0
.ft 1
..
.	\" L - listing font
.de L
.nr PQ \\n(.f
.ie \\$1 .if n .ul 999
.el .if n .ul 1
.if t .if !\\$1 \&\f\\n(PQ\\$3\fL\\$1\f\\n(PQ\\$2
.if n .if \\n(.$=1 \&\\$1
.if n .if \\n(.$>2 \&\\$3\c
.if n .if \\n(.$>1 \&\\$1\c
.if n .if \\n(.$>1 \&\\$2
..
.	\" LB - bold listing font
.de LB
.nr PQ \\n(.f
.ie \\$1 .if n .ul 999
.el .if n .ul 1
.if t .if !\\$1 \&\f\\n(PQ\\$3\f(LB\\$1\f\\n(PQ\\$2
.if n .if \\n(.$=1 \&\\$1
.if n .if \\n(.$>2 \&\\$3\c
.if n .if \\n(.$>1 \&\\$1\c
.if n .if \\n(.$>1 \&\\$2
..
.	\" LX - listing font with index
.de LX
.L "\\$1" "\\$2" "\\$3"
.IX "\\$1" "" "\fL\\$1\f1"
..
.	\" UL - underline in troff
.de UL
.if t \\$1\l'|0\(ul'\\$2
.if n .I \\$1 \\$2
..
.	\" SM - smaller
.de SM
.if !\\$1 \&\\$3\&\s-1\\$1\s+1\&\\$2
.if \\$1 .ps -1
..
.	\" LG - larger
.de LG
.if !\\$1 \&\\$3\&\s+1\\$1\s-1\&\\$2
.if \\$1 .ps +1
..
.	\" NL - normal
.de NL
.ps \\n(PS
..
.	\" combos
.de RI
\&\fR\\$1\fI\\$2\^\fR\\$3\fI\\$4\^\fR\\$5\fI\\$6\^\fR\\$7\fI\\$8\^\fR\\$9
..
.de RB
\&\fR\\$1\fB\\$2\fR\\$3\fB\\$4\fR\\$5\fB\\$6\fR\\$7\fB\\$8\fR\\$9
..
.de IR
\&\fI\\$1\^\fR\\$2\fI\\$3\^\fR\\$4\fI\\$5\^\fR\\$6\fI\\$7\^\fR\\$8\fI\\$9\^\fR
..
.de IB
\&\fI\\$1\^\fB\\$2\fI\\$3\^\fB\\$4\fI\\$5\^\fB\\$6\fI\\$7\^\fB\\$8\fI\\$9\^\fR
..
.de BR
\&\fB\\$1\fR\\$2\fB\\$3\fR\\$4\fB\\$5\fR\\$6\fB\\$7\fR\\$8\fB\\$9\fR
..
.de BI
\&\fB\\$1\fI\\$2\^\fB\\$3\fI\\$4\^\fB\\$5\fI\\$6\^\fB\\$7\fI\\$8\^\fB\\$9\fR
..
.	\" \** - numbered footnote
.ds * \\*([.\\n+*\\*(.]
.	\" FS - footnote start
.de FS
'ce 0
.di
.ev 1
.ll \\n(FLu
.in 0
.da FF
.br
.if \\n(IF .tm Nested footnote
.nr IF 1
.if !\\n+(XX-1 \{\
.	if n _________________________
.	if t \D'l 3i 0'
.br \}
.if !\\n(MF .if !\\n(.$ .if \\n* .FP \\n*
.if !\\n(MF .if \\n(.$ .FP \\$1 no
..
.	\" FE - footnote end
.de FE
.br
.in \\n(GIu
.nr IF 0
.di
.ev
.if !\\n(XX-1 .nr dn +\\n(.v
.nr YY -\\n(dn
.if !\\n(NX .nr WF 1
.if \\n(dl>\\n(CW .nr WF 1
.if (\\n(nl+\\n(.v)<=(\\n(.p+\\n(YY) .ch FO \\n(YYu
.if (\\n(nl+\\n(.v)>(\\n(.p+\\n(YY) \{\
.	if \\n(nl>(\\n(HM+1.5v) .ch FO \\n(nlu+\\n(.vu
.	if \\n(nl+\\n(FM+1v>\\n(.p .ch FX \\n(.pu-\\n(FMu+2v
.	if \\n(nl<=(\\n(HM+1.5v) .ch FO \\n(HMu+(4u*\\n(.vu)
.\}
..
.	\" FP - footnote paragraph
.de FP
.sp \\n(PDu/2u
.if \\n(FF<2 .ti \\n(FIu
.if \\n(FF=3 \{\
.	in \\n(FIu*2u
.	ta \\n(FIu*2u
.	ti 0
.\}
.if !\\n(FF \{\
.	ie "\\$2"no" \\$1\0\c
.	el \\*([.\\$1\\*(.]\0\c
.\}
.if \\n(FF .if \\n(FF<3 \{\
.	ie "\\$2"no" \\$1\0\c
.	el \\$1.\0\c
.\}
.if \\n(FF=3 \{\
.	ie "\\$2"no" \\$1\t\c
.	el \\$1.\t\c
.\}
..
.	\" FV - get leftover footnote from previous page
.de FV
.FS
.nf
.ls 1
.FY
.ls
.fi
.FE
..
.	\" FX - divert leftover footnote for next page
.de FX
.if \\n(XX \{\
'	in 0
.	di FY
.	ns
.\}
..
.	\" XF - actually print footnote
.de XF
.if \\n(nlu+1v>(\\n(.pu-\\n(FMu) .ch FX \\n(nlu+1.9v
.ev 1
.nf
.ls 1
.in \\n(GIu
.FF
.rm FF
.nr XX 0 1
.br
.ls
.di
.fi
.ev
..
.	\" TX - title xref
.de TX
.rn TX @T
.so \*(//tx.map
.TX \\$1 \\$2
.rm @T
..
.	\" TS - source file for tbl
.de TS
.rn TS @T
.so \*(//exp.tbl
.TS \\$1 \\$2
.rm @T
..
.	\" EQ - source file for eqn
.de EQ
.rn EQ @T
.so \*(//exp.eqn
.EQ \\$1 \\$2
.rm @T
..
.	\" ]- - source file for refer
.de ]-
.rn ]- @T
.so \*(//exp.ref
.]-
.rm @T
..
.	\" [< - for refer -s or -e
.de ]<
.rn ]< @T
.so \*(//exp.ref
.]<
.rm @T
..
.if \n(.V>19 .ds [. \f1[
.if \n(.V>19 .ds .] ]\fP
.if \n(.V<20 .ds [. \f1\s-2\v'-.4m'
.if \n(.V<20 .ds .] \v'.4m'\s+2\fP
.ds <. .
.ds <, ,
.if n .ds Q \&"
.if n .ds U \&"
.if n .ds - \%--
.if t .ds Q \(lq
.if t .ds U \(rq
.if t .ds - \(em
.ds SQ \s6\v'-1p'\(sq\v'1p'\s0
.	\" old bad accent marks
.ds ' \h'\w'e'u/5'\z\'\h'-\w'e'u/5'
.ds ` \h'\w'e'u/5'\z\`\h'-\w'e'u/5'
.ds ^ \h'\w'o'u/10'\z^\h'-\w'e'u/10'
.ds , \h'\w'c'u/5'\z,\h'-\w'e'u/5'
.ds : \h'\w'u'u/5'\z"\h'-\w'e'u/5'
.ds ~ \h'\w'n'u/10'\z~\h'-\w'e'u/10'
.ds C \h'\w'c'u/5'\v'-.6m'\s-4\zv\s+4\v'.6m'\h'-\w'c'u/5'
.	\" AM - new bad accent marks
.de AM
.so \*(//exp.acc
..
.	\" BX - word in box
.de BX
.if n \(br\\kA\|\\$1\|\\kB\(br\v'-1v'\h'|\\nBu'\l'|\\nAu'\v'1v'\l'|\\nAu'
.if t \{\
.	ie \\*(.Tpsc \(br\\$1\|\(br\h'-.5n'\l'|0\(rn'\l'|0\(ul'
.	el \(br\|\\$1\|\(br\l'|0\(rn'\l'|0\(ul'
.\}
..
.	\" B1 - square box start
.de B1
.nr BI \\n(.i
.sp \\n(PDu
.mk U#
..
.	\" B2 - square box end
.de B2
.nr DI \\n(.i
.in \\n(GIu
.mk D#
.ps -3
\D'l (\\n(LLu-\\n(GIu) 0'\c
\D'l 0 -(\\n(D#u-\\n(U#u+3n)'\c
\D'l -(\\n(LLu-\\n(GIu) 0'\c
\D'l 0 (\\n(D#u-\\n(U#u+3n)'
.ps +3
.rr U# D#
.rs
.sp \\n(PDu
.in \\n(BIu
..
.	\" LZ - Draw a goody with a lozenge around it
.de LZ
.nr WW \w\|\s-1\\$1\s+1\|u
.if !\\$3 \&\\$3\^\c
\%\h'.5n'\|\s-1\\$1\s+1\|\h'|0+.5n'\v'0.1v'\c
\D'l \\n(WWu 0'\c
\D'a 0 -15u 15u 0'\c
\D'l 0 -(\\n(.vu-.6v)'\c
\D'a -15u 0 0 -15u'\c
\D'l -\\n(WWu 0'\c
\D'a 0 15u -15u 0'\c
\D'l 0 \\n(.vu-.6v)'\c
\D'a 15u 0 0 15u'\v'-0.1v'\c
.if \\$2 \h'\\n(WWu+.5n'
.if !\\$2 \h'\\n(WWu'\ \\$2
.rr WW
..
.	\" XR - xref macro
.de XR
\&$1 $2 $3 $4 $5 $6 $7 $8 $9
..
.	\" IX - Make an Index Entry
.	\" $1 and $2: primary and secondary collating terms
.	\" $3 and $4: primary and secondary printing terms
.	\" $5 and $6: PAGE specifications or PRINT field
.de IX
.if \\nF .if !\\n(IK .tm .IE\tENTRY\t\\$1\t\\$2\t\\$3\t\\$4\t\\$5\t\\$6\t\\n(PN
.if \\nF .if \\n(IK \!.tm .IE\tENTRY\t\\$1\t\\$2\t\\$3\t\\$4\t\\$5\t\\$6\t\\\\n(PN
..
.	\" UX - UNIX macro
.de UX
.ie \\n(UX \s-1UNIX\s0\\$1
.el \{\
\s-1UNIX\s0\\$1\(dg
.FS \(dg
\s-1UNIX\s0 is a registered trademark of AT&T.
.FE
.nr UX 1
.\}
..
.	\" GB - gray bar under line
.de GB
.nr x \\$1
.nr x2 (\\$2)-(\\$1)/10
.mk P#
.nr y \\n(P#u+1v
\!!gsave
\!! \\nx H
\!! \\ny V
\!! \\n(x2 0 rlineto
\!! 0 -9 rlineto
\!! -\\n(x2 0 rlineto
\!! closepath 0.7 setgray fill
\!!grestore
.rr x y x2 P#
..
.co
.if \n(mo-0 .ds MO January
.if \n(mo-1 .ds MO February
.if \n(mo-2 .ds MO March
.if \n(mo-3 .ds MO April
.if \n(mo-4 .ds MO May
.if \n(mo-5 .ds MO June
.if \n(mo-6 .ds MO July
.if \n(mo-7 .ds MO August
.if \n(mo-8 .ds MO September
.if \n(mo-9 .ds MO October
.if \n(mo-10 .ds MO November
.if \n(mo-11 .ds MO December
.ds DY \n(dy \*(MO 19\n(yr
.nr * 0 1
.IZ
.em EM
.rm IZ //
