Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-03 - decus/20-0078/rts/simmcr.unv
There are 6 other files named simmcr.unv in the archive. Click here to see a list.
x
(4U@P EJ,` `GB@$GB@@$GB@$GB&@@$GB*@$GBtP@$GC@@$GC0@$GC@$GN@$GN-`@$	GN.@$GN. @$	GN.0@$GN.P@$AGN=p@$GNt@$GOP@$GO@$
GO@$
GO @$GO0@$GO`@$GOp@$GOt@$DI {`J
$$DEF==0|
IFE <^DC-^D36>| ,<DEFINE A(XB,O)|@=
<$%W==B
IFNB|` <O>,<$%W==B+<O>}
>
IFE <$$USE-3} >,<LI $$$VAL
$$U}@SE==1>
$F $%W(XB}`)>
$$DEF==1>
IF~E <^DC-^D18>,<IF~ E <^DD-^D17>,
<~@
DEFINE A(XB,O)~`=<
$%W==B
IFNB <O>,<$%W==B+<O> >
IFE <$$USE-3>,@<LI $$$VAL
$$USE`==1>
IFE $$USE,<$F $%W(XB)>
IFE  <$$USE-1>,<$L $%W@(XB)>
IFE <$$USE`-2>,<PRINTX OPD-OPR NESTING ERROR> 
$$USE==2>
$$DE@F==1>
IFE <^DD-`^D35>,
<DEFINE A(XB,O)=<
$%W== B
IFNB <O>,<$%W=@=B+<O>>
IFE <$$`USE-3>,<LI $$$VAL
$$USE==1>
IFE  $$USE,<$F $%W(XB)@>
IFE <$$USE-1>,`<$R $%W(XB)>
IFE <$$USE-2>,<PRINT X OPD-OPR NESTING@ ERROR>
$$USE==2`>
$$DEF==1>
>
IFE $$DEF,<
DEFI NE A(XB,O)=<
$%@W==B
IFNB <O>,<`$%W==B+<O>>
IFE <$$USE-3>,<LI $$ $VAL
$$USE==1>
@IFE $$USE,<$F $%W`(XB)>
IFE <$$USE-1>,<$B [$A O(XB )]-$$RELO($$BAS)>@
IFE <$$USE-2>,<`PRINTX INVALID USE OF FIELD>
$$US E==2>
$$DEF==1>
OPDEF $A [POINT` C,B,D]
$A==	$A
%A==^DD
I	 FE <^DC-1>,<DSW (A,B,D)>
IH  \
A%S==B@
A%V==D
DEFINE A%F=<C>
IO8 X

IFL <^ D36-^DC>,<$$E(<T@OO BIG BIT NO>)>
IFE ^D36-^DC,<
 IFB <D>,<DEFIN E A(ACC)=<
	IFE@ <%OP%-2>,<$$E(<I`LL SWITCH NAME>)>
	IFN <%OP%-2>,< 
	 IFE <%OP%-3>,@<%OP3 777777>
	 `IFE <%OP%-4>,<%OP3>
	IFL <%OP%-2 >,<%OP4 B(ACC)>
			%OP%==2>>>
 `IFNB <D>,<DEFINE A=<
	IFE <%OP% -2>,<$$E(<ILL SWI@TCH NAME>)>
	IFN` <%OP%-2>,<
	 IFE <%OP%-3>,<%OP3  D,777777>
	 IFE@ <%OP%-4>,<%OP3 `D,>
	IFL <%OP%-2>,<%OP4 B(D)>
		     %OP%==2>>@>>
IFGE	^D35-^D`C,<
	VA==1BC
IFE	^DC,<
	CA= =377777777777>
I@FN	^DC,<
	CA==`-1*VA-1>
IFGE ^D17-^DC,<
	CA= =CA_-^D18
	VA=@=VA_-^D18>

DE`FINE	$$TES1(X,Y,Z)<

IFGE	^D17-^ DC,<
IFB <Z>,<D@EFINE A(ACC)<
I`FE <%OP%-1>,<%OP1  Y>
IFE %OP%,<%O  P1 X>
IFE <%OP%- @2>,<$$E(<ILL SWIT `CH NAME>)>
IFGE !<%OP%-3>,<IFB <AC! C>,<%OP1 Y>
	IFN!@B <ACC>,<%OP1 ACC!`,Y>>
IFL<%OP%-2>",<%OP3 B(ACC)>
" %OP%==2>>
IFNB <"@Z>,<DEFINE A=<
"`IFE <%OP%-1>,<%OP#1 Y>
IFE %OP%,<%# OP1 X>
IFE <%OP%#@-2>,<$$E(<ILL SWI#`TCH NAME>)>
IFGE$ <%OP%-3>,<%OP1 Z$ ,Y>
IFL <%OP%-2>$@,<%OP3 B(Z)>
%O$`P%==2>>>

IFL ^%D17-^DC,<
IFB <% D>,<DEFINE A(AC%@C)<
IFE %OP%-1,<%`%OP2 Y>
IFE %OP%&,<%OP2 X>
IFE <%& OP%-2>,<$$E(<ILL &@SWITCH NAME>)>
I&`FGE <%OP%-3>,<IFB' <ACC>,<%OP2 Y>
' 	IFNB <ACC>,<%OP2'@ ACC,Y>>
IFL <%O'`P%-2>,<%OP3 B(AC(C)>
%OP%==2>>
I( FNB <D>,<DEFINE (@A=<
IFE <%OP%-1(`>,<%OP2 Y>
IFE %)OP%,<%OP2 X>
IFE)  <%OP%-2>,<$$E(<I)@LL SWITCH NAME>)>)`
IFGE <%OP%-3>,<*%OP2 Z,Y>
IFL <%* OP%-2>,<%OP3 B(Z*@)>
%OP%==2>>
>*`
>
	$$TES1(\CA,+\VA,D)
	PURGE VA,CA
>
IVlM6@@$?S>p@$7S> @$DS>@@$<S>H @$GS>{ @$BS>0@$ES>$`@$1S>$a1@$/S>$a2@$3S>- @$<S>.)@@$FS>5@$S>51@$S>52@$!S>L0@$3S>L`@$5S>Lp@$6S>M@$4S>M`@$#S>Ma1@$!S>Ma2@$&S>N @$5S>N@@$6S>e@$4S>e`@$@S>f@$=S>f@@$;S>t @$ES>|0@$8S>|`@$:S>|p@$7S>}@$8S>~@$;S>~ @$9S>~@@$:S>~P@$(S>~Q1@$&S>~Q2@$*S>@$9S?`@$,S?a1@$*S?a2@$/S? @$FS?@$=[
0@ [0@ [@@ [I@ [@ [@ [@@ [p@ [y@ [/@ [/	@ [e@ [e@@ [e`@ [ei@ [@ [ @ [@ 
[@ 	[@ 	[@ [@ [$@ 
[%@&a-@$A.@$M`@$Mf@$@Mh`@$HMi@$GMj`@$Bd@@$H@ & @$C.P@$Ca"`@$
a"60@$
a"6`@$a#@@ )bP c
~[RP cDRP c$;wP c$N7P c$^P c$kVP c%wP c&ltP c$nP 0c;XRP cG,9P cJ,h9P cK&9(P cN~(rP cZN-P cj
0P cj P cjP cjP cj@P cj%`P cj%m@ cj& P cj. P ck P ck$PP ck&@P ckD P ckN0P e%@ e& @ e. @ eE@ eEp@ ee@ etP@ eup@ ep@ e@ e-`@ eS\Y  eS1 
Yxl

X (CSCA)	?P        
X (CSSNu8)        
X@(CSS      
X`(CS        
X(CA)        
X (SES)        
X@(CSEP)        
X` (CSQU)	
X(CSSB    
X (CSS      
X@(CS        
X`(CN)        
             
X (CSRA)        
X@ (CSSA)        
`
X(PHFV)       
X (PHFA)      
X@(PHFM)     
`          
X(PHFT)   
X (PHFS)  
X@(PHCV) 

X`(CPN      
X(CP        
X (CD)        
X@(XDA)	
X`(CPCA) 
X(CPCD)  
X (CPCI    
X@(CPE      
X`(CP,S)     
X(CS,,S)     

X  (OCEP)        
 @X (OCIN,2)	
X`(OP,L)      

X (TXBL,3,S)     
X@(TXGC,,S)     
X`(TXCY,,S)    
X(TXGI,,S)   
X (TXGR,,S)  
X@(TXLT,,S)	
X (TXMN,,S)	
X` (TXPF,,S)	
X(TC,,S)	
X (TXPX
X@(TXPI,,S
X`(TXST,3,S)	
X (TXSE,,S)	
X (TXSU,3,S)	
X (XRE)	
X@(TXVA,3
X`(TXGF,,S)	
X (TXPR,,S)	

%Y (IOFI,,,1)	
Y (IOIN,,S,1)	
Y@(OOU,,S,1)	
Y`(IF,,S,1)	
Y(IO,S,1)	
X (IOI)	
X@(IOLI,,
X`(IOII,,S)	
X (IOIR,,S)	
X (IOIF,,S)	
X (IT,,S)	
X@(IOIG
X`(IOBO,,S
X(IOOG,,S)	
X (IOOC,,S)	
X (IOOI,,S)	
X@(IO,S)	
X`(IOOR,
X(IOOF,,S)
X (IOOT,,S)	
) X (IOLT,,S)	
X@(OOP,,S)	
X`(IOC)	
X(IOEJ,,
X (IOSP,,S)	
X (IOLP,,S)	
*@
X`(MAAC,L,,ACOS.
X(DUMDUM,L)
X (MAAS,L,,ASIN.
X@(DUMDUM,L)
X`(MAAT,L,,ATAN.
X(MAATD,L,,D
X (MACI,L
X@(MACL,L)		
X`(MACO,L,,COS.
X(MACOD,L,,D
X (MACH,L,
X@(DUMD
X`(MAEX,L,
X(MAEXDXP.)
X (MAL,,ALOG.)	
X@(MALND,L,,DLOG.)
X(MASI,L,,SIN.)
X (MASID,L,,DS
X@(MASH,L,,
X`(DUMDU
X(MASQ,L,,
X (MASQDQRT.)
X@(MA,L,,TAN.)	
X`(DUMDUM,L)
X(MAL,,TANH.)	
X (DUMDUM,L)
X@(MAL,,EXP3.)	
X`(MALL,L,,DEXP3.)	
X (MARI,L,,EXP2
X@(MALI,L,,D


X`(RI,L,S)	
X(RDDS)	
X (RDER,
X@(RDHI,L,
X`(RDLI,L,S)
X(RDNE,L,S)	
X (RDNO,L,S)	
X  (RDPO,L,S)	
X@(DRA,L,S)	
X`(RDL,S)	
X(RDHO	

X (SAGC
X@(SAAR,3)	

Y`(SSST,L,S)	
Y (SSLG,L,S)	
6Y (SSLK,L,S)	
Y (SSHD,L,S)	
X@(SC,L,S)	
X`(SSPS)	
X(SSOU,
X (SSFO,L,
X@(SSPC,L,S)
X`(SSIT,L,S)	
X (SSFT,L,S)	
X (SSLT,L,S)	
X (SCL,L,S)	
X@(SSL,S)	
X`(SSEY	
X(SSPV,L

X (SUAC,L
Y@(SUSI,L,S)	
Y (SUPS,L,S)	
9`Y (SUMA,L,S)	
X(SUHO,L,S)	
X (SA,L,S)	
X@(SUWS)	
X`(SUCA,
X(SUAM,L,
X (SUEV,L,S)
X@(SUNE,L,S

X`(YFADR
X(YFARG,L)
X (YFAR2,L)	
< 
X (YXA1,L)
X@(XA2,L)
X`(YXA3,
X (YXA4,L)
X (YXA5,L)
X (YXA
X@(YXA7,L)
X (YXA10,L)
X`(XA11,L)
X(YXA1
X (PHPT,L)	
X (FOREX)	
X@(ORER)	
X`(OCIN8
X (IOLN)	
?X (CSEU)	
X (OCE
X@(OCINK,2)	
X (IOCOM,2)	
X` (OCUU)	
X(OCTR
		
X (CSSW0)
X (IOCB)	
X@(OCS)	
X`(IONB)	
X (IORB)	
X(IRF)	
X (OCIND,
X (IOCLA)	
A@X (OCLD)	
X (OCINC,3)	
]?	k)1eVu@ Dh0
	IFDEF .EDIRECTIVE,<.DIRECE(TIVE .NOBIN>
	UNEHIVERSAL	A    DEEhCsystem-10/20 SIMFULA RTS %4(300)  A RTS %4(300)  g @$>g<0@$>g
%%%%%1==Ph0
IRP A,<
A==Q%%%%%1
%%%%%1==<%%%%%1+1>>gN@ gN@@ gN/@ gN5p@ gN6@@ gND@@ gNN@@ gNdp@ gNe0@ gNf@@ gN~P@ gO0@ gO@@ gO`@ gO0@ gO@@ gV
0@ gV@ !gV.`@ "gVEp@ gVl@ gVtP@ "gW@  gW0@ gW@ gW<@  ib@@$ib@$ib$@$ib<0@$ib<`@$ib=@$ib> @$ibf@@$ibm`@$ic0@$ic`@$ic@$ic @$ic@$icP@$icP@$ic@@$icP@$ic4@$ig) 	=hKs
X <ZDN,Z	>BI,ZBP,ZCL,ZPB,ZT	>0E,ZTT,ZAR,ZAC,ZER,ZDR,ZYS,ZXB>m-A `mK$=9P mK$YP `mK&\P mNM\ZP p 	>Pl
IFIDN <L	<(>,<B>,<
A=%%%%	<H%1
%%%%%1=<%%%%%	=(1+1>
>
IFDIF<L,<
A=%%%%
%%%%%2=<%%%%%2+1>
>LIq@ q@ q&
0@ qJ
0@ qJ
4 @ qN
0@ qR
0@ q^
4 P q^
4@Pr 
IFIDN<L,<X (A,L,
IFDIF<<L>,<
A%B=%%%%%2
%%%%%2=%%%%%2+Z
A=%%%%%2-Z
IFNB%<D>,<%%%2+<D
A%E=%%%%%2
>j
0Pcj s
L@@ #s$@@ $s)`@ #s|2@ s|h2@ s~2@ sb
@ $sb
@ (sb
 @ (sb
@@ )sb
 @ %sb
0@ %sb
@@ &sb
P@ &sb
`@ 'sb
p@ 'uY@ O:ZDNTYPu\`P u]@P uh1 	w`OP
$%W==1
	xIFNB <B>,<$%W==1	x +<B>>
IFE <$$US	x@E-3>,<LI $$$VAL
	x`$$USE==1>
IFE $$	yUSE,<$F $%W(A)>
IFE <$$USE-1>,<$	y@L $%W(A)>
IFE <	y`$$USE-2>,<PRINTX 	zOPD-OPR NESTING ERROR>
$$USE==2u=P 	}@Ot$%W==2
IF	}`NB <B>,<$%W==2+<	~B>
>
IFE <$$US	~ E-3>,<LI $$$VAL
	~@$$USE==1>
$F $%W(A)u(6 	zPOg
$%W==1
	zpIFNB <B>,<$%W==1	{+<B>>
IFE <$$US	{0E-3>,<LI $$$VAL
	{P$$USE==1>
IFE $$	{pUSE,<$F $%W(A)>
IFE <$$USE-1>,<$	|0R $%W(A)>
IFE <	|P$$USE-2>,<PRINTX 	|pOPD-OPR NESTING ERROR>
$$USE==2u 
Pxe
$%W==0
QIFNB <B>,<$%W==0
Q8+<B>>
IFE <$$US
QXE-3>,<LI $$$VAL
Qx$$USE==1>
IFE $$
RUSE,<$F $%W(A)>
R8
IFE <$$USE-1>,<$
RXR $%W(A)>
IFE <
Rx$$USE-2>,<PRINTX 
SOPD-OPR NESTING ERROR>
$$USE==2uM 
J(dg
$%W==0
JIFNB <B>,<$%W==0
K8+<B>>
IFE <$$US
KE-3>,<LI $$$VAL
	P0$$USE==1>
IFE $$
I8USE,<$F $%W(A)>
IX
IFE <$$USE-1>,<$
KxB [$ZAPDTP B(A)
L]-$$RELO($$BAS)>
L8
IFE <$$USE-2>,<P
LXRINTX INVALID USE
Lx OF FIELD>
$$USE==2Xd	k%ZQXMuXV 
MHe
$%W==0
MhIFNB <B>,<$%W==0
N+<B>>
IFE <$$US
N(E-3>,<LI $$$VAL
NH$$USE==1>
IFE $$
NhUSE,<$F $%W(A)>
O
IFE <$$USE-1>,<$
O(B [$ZAPEBL B(A)
OH]-$$RELO($$BAS)>
Oh
IFE <$$USE-2>,<P
PRINTX INVALID USE
P( OF FIELD>
$$USE==2cjPum 
FXdI
IFE <%OP
Fx%-1>,<%OP1 400000
G>
IFE %OP%,<%OP1
G8 377777>
IFE <%O
GXP%-2>,<$$E(<ILL S
GxWITCH NAME>)>
IF
HGE <%OP%-3>,<IFB 
H8<A>,<%OP1 400000
HX>
	IFNB <A>,<%O
HxP1 A,400000>>
I
IFL<%OP%-2>,<%OP3 0(A)>
%OP%==2uyY 
She0
$%W==0
TIFNB <B>,<$%W==0
T(+<B>>
IFE <$$US
THE-3>,<LI $$$VAL
Th$$USE==1>
IFE $$
UUSE,<$F $%W(A)>
U(
IFE <$$USE-1>,<$
UHR $%W(A)>
IFE <
Uh$$USE-2>,<PRINTX 
VOPD-OPR NESTING ERROR>
$$USE==2u,: 
VXeI
$%W==-1
Vx
IFNB <B>,<$%W==
W-1+<B>>
IFE <$$
W8USE-3>,<LI $$$VAL
WX
$$USE==1>
IFE 
Wx$$USE,<$F $%W(A)
X>
IFE <$$USE-1>,
X8<$R $%W(A)>
IFE
XX <$$USE-2>,<PRINT
XxX OPD-OPR NESTING
Y ERROR>
$$USE==2TPu,T]uY@ OwZDNTYPu\`P u]@P u(2 
 P$%W==2
IF
@NB <B>,<$%W==2+<
`B>
>
IFE <$$US
E-3>,<LI $$$VAL

 $$USE==1>
$F $%W(A)uKx 
`Q$%W==-2
I
FNB <B>,<$%W==-2
 +<B>
>
IFE <$$
@USE-3>,<LI $$$VAL
`
$$USE==1>
$F $%W(A)qJ
0uI7 	0P
$%W==1
	PIFNB <B>,<$%W==1	p+<B>>
IFE <$$US
E-3>,<LI $$$VAL

0$$USE==1>
IFE $$
PUSE,<$F $%W(A)>
p
IFE <$$USE-1>,<$
R $%W(A)>
IFE <
0$$USE-2>,<PRINTX 
POPD-OPR NESTING ERROR>
$$USE==2uK{ 
@Pt$%W==2
IF
`NB <B>,<$%W==2+<
B>
>
IFE <$$US
 E-3>,<LI $$$VAL

@$$USE==1>
$F $%W(A)Pcj u=1 
 PP
$%W==3

@IFNB <B>,<$%W==3
`+<B>>
IFE <$$US
E-3>,<LI $$$VAL

 $$USE==1>
IFE $$
@USE,<$F $%W(A)>
`
IFE <$$USE-1>,<$
	B [$ZARSUB B(A)
	 ]-$$RELO($$BAS)>
	@
IFE <$$USE-2>,<P
	`RINTX INVALID USE

 OF FIELD>
$$USE==2uN8 
pP5
$%W==3

IFNB <B>,<$%W==3
0+<B>>
IFE <$$US
PE-3>,<LI $$$VAL

p$$USE==1>
IFE $$
USE,<$F $%W(A)>
0
IFE <$$USE-1>,<$
PB [$ZARTYP B(A)
p]-$$RELO($$BAS)>

IFE <$$USE-2>,<P
0RINTX INVALID USE
P OF FIELD>
$$USE==2u\ 
Q$%W==3
IF
0NB <B>,<$%W==3+<
PB>
>
IFE <$$US
pE-3>,<LI $$$VAL

$$USE==1>
$F $%W(A)PeS\Yu, 

PPg
$%W==3


pIFNB <B>,<$%W==3
+<B>>
IFE <$$US
0E-3>,<LI $$$VAL

P$$USE==1>
IFE $$
pUSE,<$F $%W(A)>

IFE <$$USE-1>,<$
0R $%W(A)>
IFE <
P$$USE-2>,<PRINTX 
pOPD-OPR NESTING ERROR>
$$USE==2u
HY@ NZDNTYPu
H\`P u
H]@P u
L+V 	c0N1
$%W==1
	cPIFNB <B>,<$%W==1	cp+<B>>
IFE <$$US	dE-3>,<LI $$$VAL
	d0$$USE==1>
IFE $$	dPUSE,<$F $%W(A)>
IFE <$$USE-1>,<$	eB [$ZBIBNM B(A)	e0]-$$RELO($$BAS)>
IFE <$$USE-2>,<P	epRINTX INVALID USE	f OF FIELD>
$$USE==2u
O, 	f`NH
$%W==1
	gIFNB <B>,<$%W==1	g +<B>>
IFE <$$US	g@E-3>,<LI $$$VAL
	g`$$USE==1>
IFE $$	hUSE,<$F $%W(A)>
IFE <$$USE-1>,<$	h@R $%W(A)>
IFE <	h`$$USE-2>,<PRINTX 	iOPD-OPR NESTING ERROR>
$$USE==2uY@ Y<Llxu\`P u]@P uxt 
`"
$%W==-3
x
IFNB <B>,<$%W==
H-3+<B>>
IFE <$$
(USE-3>,<LI $$$VAL

$$USE==1>
IFE 
H$$USE,<$F $%W(A)
>
IFE <$$USE-1>,
(<$B [$ZCPGCI B(
HA)]-$$RELO($$BAS)
h>
IFE <$$USE-2>,
<PRINTX INVALID U
(SE OF FIELD>
$$USE==2	j.+Yzu0 |_i$%W==-2
I|8FNB <B>,<$%W==-2|X+<B>
>
IFE <$$|xUSE-3>,<LI $$$VAL}
$$USE==1>
$F $%W(A)j-8QQu9 }H`
IFE <%OP}h%-1>,<%OP1 400000~>
IFE %OP%,<%OP1~( 377777>
IFE <%O~HP%-2>,<$$E(<ILL S~hWITCH NAME>)>
IFGE <%OP%-3>,<IFB (<A>,<%OP1 400000H>
	IFNB <A>,<%OhP1 A,400000>>
I
FL<%OP%-2>,<%OP3 
(-3(A)>
%OP%==2E OF FIELD>
$$Uu
V y_\
$%W==-1
IFNB <B>,<$%W==yH-1+<B>>
IFE <$$yhUSE-3>,<LI $$$VALz
$$USE==1>
IFE z($$USE,<$F $%W(A)zH>
IFE <$$USE-1>,zh<$R $%W(A)>
IFE{ <$$USE-2>,<PRINT{(X OPD-OPR NESTING{H ERROR>
$$USE==2QOi	j
>POiu
X`9
IFE <%OP
x%-1>,<%OP1 20000>

IFE %OP%,<%OP1 
8757777>
IFE <%OP
X%-2>,<$$E(<ILL SW
xITCH NAME>)>
IFG
E <%OP%-3>,<IFB <
8A>,<%OP1 20000>
X
	IFNB <A>,<%OP1
x A,20000>>
IFL<
%OP%-2>,<%OP3 -3(A)>
%OP%==2 Uu8V ux_C
$%W==-1
IFNB <B>,<$%W==v8-1+<B>>
IFE <$$vXUSE-3>,<LI $$$VALvx
$$USE==1>
IFE w$$USE,<$F $%W(A)w8>
IFE <$$USE-1>,wX<$L $%W(A)>
IFEwx <$$USE-2>,<PRINTxX OPD-OPR NESTINGx8 ERROR>
$$USE==2Q\uS \`Pu= 
(`W
$%W==-3

IFNB <B>,<$%W==
	8-3+<B>>
IFE <$$
	USE-3>,<LI $$$VAL	Q
$$USE==1>
IFE 
8$$USE,<$F $%W(A)
X>
IFE <$$USE-1>,
	x<$B [$ZCPSTA B(
A)]-$$RELO($$BAS)
8>
IFE <$$USE-2>,
X<PRINTX INVALID U
xSE OF FIELD>
$$USE==2	k(VQ]uj2 
`q$%W==-5
I
8FNB <B>,<$%W==-5
X+<B>
>
IFE <$$
xUSE-3>,<LI $$$VAL

$$USE==1>
$F $%W(A)k$XtQQ[u(x 
H`d$%W==-4
I
hFNB <B>,<$%W==-4
+<B>
>
IFE <$$
(USE-3>,<LI $$$VAL
H
$$USE==1>
$F $%W(A)knQUu(9 
J TZ$%W==0
IF
J@NB <B>,<$%W==0+<
J`B>
>
IFE <$$US
KE-3>,<LI $$$VAL

K $$USE==1>
$F $%W(A)RKutI:u, 
KpTg$%W==1
IF
LNB <B>,<$%W==1+<
L0B>
>
IFE <$$US
LPE-3>,<LI $$$VAL

Lp$$USE==1>
$F $%W(A)O-u(Tud+V 
APT
$%W==1

ApIFNB <B>,<$%W==1
B+<B>>
IFE <$$US
B0E-3>,<LI $$$VAL

BP$$USE==1>
IFE $$
BpUSE,<$F $%W(A)>
C
IFE <$$USE-1>,<$
C0R $%W(A)>
IFE <
CP$$USE-2>,<PRINTX 
CpOPD-OPR NESTING ERROR>
$$USE==2ud82 
D@T6
$%W==0

D`IFNB <B>,<$%W==0
E+<B>>
IFE <$$US
E E-3>,<LI $$$VAL

E@$$USE==1>
IFE $$
E`USE,<$F $%W(A)>
F
IFE <$$USE-1>,<$
F L $%W(A)>
IFE <
F@$$USE-2>,<PRINTX 
F`OPD-OPR NESTING ERROR>
$$USE==2ug(T 
G0TM
$%W==0

GPIFNB <B>,<$%W==0
Gp+<B>>
IFE <$$US
HE-3>,<LI $$$VAL

H0$$USE==1>
IFE $$
HPUSE,<$F $%W(A)>
Hp
IFE <$$USE-1>,<$
IR $%W(A)>
IFE <
I0$$USE-2>,<PRINTX 
IPOPD-OPR NESTING ERROR>
$$USE==2uty 	V`ME
IFE <%OP	V@%-1>,<%OP1 100000	V >
IFE %OP%,<%OP1	WP 677777>
IFE <%O	W0P%-2>,<$$E(<ILL S	SPWITCH NAME>)>
IF	UPGE <%OP%-3>,<IFB 	Up<A>,<%OP1 100000	X>
	IFNB <A>,<%O	X0P1 A,100000>>
I	XPFL<%OP%-2>,<%OP3 0(A)>
%OP%==2ut;R 	@L
$%W==0
	@0IFNB <B>,<$%W==0	@P+<B>>
IFE <$$US	@pE-3>,<LI $$$VAL
	A$$USE==1>
IFE $$	A@USE,<$F $%W(A)>
IFE <$$USE-1>,<$	BB [$ZDNCND B(A)	B ]-$$RELO($$BAS)>
IFE <$$USE-2>,<P	B`RINTX INVALID USE	C OF FIELD>
$$USE==2utI: 	C0L/
IFE <%OP	CP%-1>,<%OP1 400000	Cp>
IFE %OP%,<%OP1	D 377777>
IFE <%O	D0P%-2>,<$$E(<ILL S	DPWITCH NAME>)>
IF	DpGE <%OP%-3>,<IFB 	E<A>,<%OP1 400000	E0>
	IFNB <A>,<%O	EPP1 A,400000>>
I	EpFL<%OP%-2>,<%OP3 0(A)>
%OP%==2uu9 	ZM_
IFE <%OP	Y`%-1>,<%OP1 40000>	Y@
IFE %OP%,<%OP1 	Zp737777>
IFE <%OP	ZP%-2>,<$$E(<ILL SW	S0ITCH NAME>)>
IFG	XpE <%OP%-3>,<IFB <	YA>,<%OP1 40000>
	IFNB <A>,<%OP1	[P A,40000>>
IFL<	[p%OP%-2>,<%OP3 0(A)>
%OP%==2USEuuKU 	` N
$%W==0
	`@IFNB <B>,<$%W==0	``+<B>>
IFE <$$US	aE-3>,<LI $$$VAL
	a $$USE==1>
IFE $$	a@USE,<$F $%W(A)>
IFE <$$USE-1>,<$	bR $%W(A)>
IFE <	b $$USE-2>,<PRINTX 	b@OPD-OPR NESTING ERROR>
$$USE==2uvI9 	G M+
IFE <%OP	G%-1>,<%OP1 200000	F`>
IFE %OP%,<%OP1	T0 577777>
IFE <%O	TP%-2>,<$$E(<ILL S	SpWITCH NAME>)>
IF	FGE <%OP%-3>,<IFB 	F0<A>,<%OP1 200000	Tp>
	IFNB <A>,<%O	UP1 A,200000>>
I	U0FL<%OP%-2>,<%OP3 0(A)>
%OP%==2uvN8 	]M}
$%W==0
	\`IFNB <B>,<$%W==0	^+<B>>
IFE <$$US	]pE-3>,<LI $$$VAL
	S$$USE==1>
IFE $$	\USE,<$F $%W(A)>
IFE <$$USE-1>,<$	^PB [$ZDNTYP B(A)	^p]-$$RELO($$BAS)>
IFE <$$USE-2>,<P	_0RINTX INVALID USE	_P OF FIELD>
$$USE==2S@P >}{wouXT 
ZPUg
$%W==1

ZpIFNB <B>,<$%W==1
[+<B>>
IFE <$$US
[0E-3>,<LI $$$VAL

[P$$USE==1>
IFE $$
[pUSE,<$F $%W(A)>
\
IFE <$$USE-1>,<$
\0R $%W(A)>
IFE <
\P$$USE-2>,<PRINTX 
\pOPD-OPR NESTING ERROR>
$$USE==2u(T 
W`UP
$%W==0

XIFNB <B>,<$%W==0
X +<B>>
IFE <$$US
X@E-3>,<LI $$$VAL

X`$$USE==1>
IFE $$
YUSE,<$F $%W(A)>
Y 
IFE <$$USE-1>,<$
Y@R $%W(A)>
IFE <
Y`$$USE-2>,<PRINTX 
ZOPD-OPR NESTING ERROR>
$$USE==2u, 
TpU9
$%W==0

UIFNB <B>,<$%W==0
U0+<B>>
IFE <$$US
UPE-3>,<LI $$$VAL

Up$$USE==1>
IFE $$
VUSE,<$F $%W(A)>
V0
IFE <$$USE-1>,<$
VPL $%W(A)>
IFE <
Vp$$USE-2>,<PRINTX 
WOPD-OPR NESTING ERROR>
$$USE==2uY@ NKZDNTYPu\`P u]@P uR 	r`O*
$%W==-1
IFNB <B>,<$%W==	s -1+<B>>
IFE <$$	s@USE-3>,<LI $$$VAL	s`
$$USE==1>
IFE 	t$$USE,<$F $%W(A)	t >
IFE <$$USE-1>,	t@<$R $%W(A)>
IFE	t` <$$USE-2>,<PRINT	uX OPD-OPR NESTING	u  ERROR>
$$USE==2uI7 	l`Nx
$%W==1
	mIFNB <B>,<$%W==1	m +<B>>
IFE <$$US	m@E-3>,<LI $$$VAL
	m`$$USE==1>
IFE $$	nUSE,<$F $%W(A)>
IFE <$$USE-1>,<$	n@R $%W(A)>
IFE <	n`$$USE-2>,<PRINTX 	oOPD-OPR NESTING ERROR>
$$USE==2u(1 	ipNa
$%W==1
	jIFNB <B>,<$%W==1	j0+<B>>
IFE <$$US	jPE-3>,<LI $$$VAL
	jp$$USE==1>
IFE $$	kUSE,<$F $%W(A)>
IFE <$$USE-1>,<$	kPL $%W(A)>
IFE <	kp$$USE-2>,<PRINTX 	lOPD-OPR NESTING ERROR>
$$USE==2u(T 	oPO
$%W==-1
IFNB <B>,<$%W==	p-1+<B>>
IFE <$$	p0USE-3>,<LI $$$VAL	pP
$$USE==1>
IFE 	pp$$USE,<$F $%W(A)	q>
IFE <$$USE-1>,	q0<$L $%W(A)>
IFE	qP <$$USE-2>,<PRINT	qpX OPD-OPR NESTING	r ERROR>
$$USE==2u, 	upO7$%W==-2
I	vFNB <B>,<$%W==-2	v0+<B>
>
IFE <$$	vPUSE-3>,<LI $$$VAL	vp
$$USE==1>
$F $%W(A)u(T 
;pSq
$%W==0

<IFNB <B>,<$%W==0
<0+<B>>
IFE <$$US
<PE-3>,<LI $$$VAL

<p$$USE==1>
IFE $$
=USE,<$F $%W(A)>
=0
IFE <$$USE-1>,<$
=PR $%W(A)>
IFE <
=p$$USE-2>,<PRINTX 
>OPD-OPR NESTING ERROR>
$$USE==2u,y 
9SZ
$%W==0

9 IFNB <B>,<$%W==0
9@+<B>>
IFE <$$US
9`E-3>,<LI $$$VAL

:$$USE==1>
IFE $$
: USE,<$F $%W(A)>
:@
IFE <$$USE-1>,<$
:`L $%W(A)>
IFE <
;$$USE-2>,<PRINTX 
; OPD-OPR NESTING ERROR>
$$USE==2u5yY 
3 S,
$%W==0

3@IFNB <B>,<$%W==0
3`+<B>>
IFE <$$US
4E-3>,<LI $$$VAL

4 $$USE==1>
IFE $$
4@USE,<$F $%W(A)>
4`
IFE <$$USE-1>,<$
5L $%W(A)>
IFE <
5 $$USE-2>,<PRINTX 
5@OPD-OPR NESTING ERROR>
$$USE==2u7(T 
6SC
$%W==0

60IFNB <B>,<$%W==0
6P+<B>>
IFE <$$US
6pE-3>,<LI $$$VAL

7$$USE==1>
IFE $$
70USE,<$F $%W(A)>
7P
IFE <$$USE-1>,<$
7pR $%W(A)>
IFE <
8$$USE-2>,<PRINTX 
80OPD-OPR NESTING ERROR>
$$USE==2uY@ YbZDNTYP>Yu\`P u]@P uI7 `Yx
$%W==1
IFNB <B>,<$%W==1 +<B>>
IFE <$$US@E-3>,<LI $$$VAL
`$$USE==1>
IFE $$USE,<$F $%W(A)>
IFE <$$USE-1>,<$@R $%W(A)>
IFE <`$$USE-2>,<PRINTX OPD-OPR NESTING ERROR>
$$USE==2u)9 "@Z&
$%W==2
"`IFNB <B>,<$%W==2#+<B>>
IFE <$$US# E-3>,<LI $$$VAL
#@$$USE==1>
IFE $$#`USE,<$F $%W(A)>
IFE <$$USE-1>,<$$ R $%W(A)>
IFE <$@$$USE-2>,<PRINTX $`OPD-OPR NESTING ERROR>
$$USE==2u); PZ
$%W==2
pIFNB <B>,<$%W==2 +<B>>
IFE <$$US 0E-3>,<LI $$$VAL
 P$$USE==1>
IFE $$ pUSE,<$F $%W(A)>
IFE <$$USE-1>,<$!0L $%W(A)>
IFE <!P$$USE-2>,<PRINTX !pOPD-OPR NESTING ERROR>
$$USE==2u-H %(Z2$%W==3
IF%HNB <B>,<$%W==3+<%hB>
>
IFE <$$US&E-3>,<LI $$$VAL
&($$USE==1>
$F $%W(A)u0Y@ XeIXu0\`P u0]@P u6J6 88[K$%W==3
IF8XNB <B>,<$%W==3+<8xB>
>
IFE <$$US9E-3>,<LI $$$VAL
98$$USE==1>
$F $%W(A)-u(TS]u7(V 'ZK
$%W==0
'8IFNB <B>,<$%W==0'X+<B>>
IFE <$$US'xE-3>,<LI $$$VAL
($$USE==1>
IFE $$(8USE,<$F $%W(A)>
IFE <$$USE-1>,<$(xL $%W(A)>
IFE <)$$USE-2>,<PRINTX )8OPD-OPR NESTING ERROR>
$$USE==2u7(t 5H[>
$%W==2
5hIFNB <B>,<$%W==26+<B>>
IFE <$$US6(E-3>,<LI $$$VAL
6H$$USE==1>
IFE $$6hUSE,<$F $%W(A)>
IFE <$$USE-1>,<$7(R $%W(A)>
IFE <7H$$USE-2>,<PRINTX 7hOPD-OPR NESTING ERROR>
$$USE==2u7)9 2X['
$%W==2
2xIFNB <B>,<$%W==23+<B>>
IFE <$$US38E-3>,<LI $$$VAL
3X$$USE==1>
IFE $$3xUSE,<$F $%W(A)>
IFE <$$USE-1>,<$48L $%W(A)>
IFE <4X$$USE-2>,<PRINTX 4xOPD-OPR NESTING ERROR>
$$USE==2u7+ ,xZy
$%W==1
-IFNB <B>,<$%W==1-8+<B>>
IFE <$$US-XE-3>,<LI $$$VAL
-x$$USE==1>
IFE $$.USE,<$F $%W(A)>
IFE <$$USE-1>,<$.XL $%W(A)>
IFE <.x$$USE-2>,<PRINTX /OPD-OPR NESTING ERROR>
$$USE==2u7, *Zb
$%W==0
*(IFNB <B>,<$%W==0*H+<B>>
IFE <$$US*hE-3>,<LI $$$VAL
+$$USE==1>
IFE $$+(USE,<$F $%W(A)>
IFE <$$USE-1>,<$+hR $%W(A)>
IFE <,$$USE-2>,<PRINTX ,(OPD-OPR NESTING ERROR>
$$USE==2u7,V /h[
$%W==1
0IFNB <B>,<$%W==10(+<B>>
IFE <$$US0HE-3>,<LI $$$VAL
0h$$USE==1>
IFE $$1USE,<$F $%W(A)>
IFE <$$USE-1>,<$1HR $%W(A)>
IFE <1h$$USE-2>,<PRINTX 2OPD-OPR NESTING ERROR>
$$USE==2ud 
zPWg
$%W==1

zpIFNB <B>,<$%W==1
{+<B>>
IFE <$$US
{0E-3>,<LI $$$VAL

{P$$USE==1>
IFE $$
{pUSE,<$F $%W(A)>
|
IFE <$$USE-1>,<$
|0R $%W(A)>
IFE <
|P$$USE-2>,<PRINTX 
|pOPD-OPR NESTING ERROR>
$$USE==2udr 
hVo
$%W==0

gpIFNB <B>,<$%W==0
kP+<B>>
IFE <$$US
kpE-3>,<LI $$$VAL

l$$USE==1>
IFE $$
l0USE,<$F $%W(A)>
lP
IFE <$$USE-1>,<$
lpB [$ZFLAKD B(A)
m]-$$RELO($$BAS)>
m0
IFE <$$USE-2>,<P
mPRINTX INVALID USE
mp OF FIELD>
$$USE==2ud 
`pV
$%W==0

`PIFNB <B>,<$%W==0
b+<B>>
IFE <$$US
a`E-3>,<LI $$$VAL
	Rp$$USE==1>
IFE $$
`USE,<$F $%W(A)>
` 
IFE <$$USE-1>,<$
b@B [$ZFLATP B(A)
b`]-$$RELO($$BAS)>
c
IFE <$$USE-2>,<P
c RINTX INVALID USE
c@ OF FIELD>
$$USE==2ud;[ 
n W
IFE <%OP
n@%-1>,<%OP1 20>
I
n`FE %OP%,<%OP1 777
o757>
IFE <%OP%-2
o >,<$$E(<ILL SWITC
o@H NAME>)>
IFGE <
o`%OP%-3>,<IFB <A>
p,<%OP1 20>
	IFNB
p  <A>,<%OP1 A,20
p@>>
IFL<%OP%-2>,<
p`%OP3 0(A)>
%OP%==2 INVALID USEud= `X4
$%W==0
IFNB <B>,<$%W==0 +<B>>
IFE <$$US@E-3>,<LI $$$VAL
`$$USE==1>
IFE $$USE,<$F $%W(A)>
IFE <$$USE-1>,<$@B [$ZFLCTP B(A)`]-$$RELO($$BAS)>
IFE <$$USE-2>,<P RINTX INVALID USE@ OF FIELD>
$$USE==2Y@QuR(\`udM 
dV7
$%W==0

d0IFNB <B>,<$%W==0
dP+<B>>
IFE <$$US
dpE-3>,<LI $$$VAL

e$$USE==1>
IFE $$
e0USE,<$F $%W(A)>
eP
IFE <$$USE-1>,<$
epB [$ZFLDTP B(A)
f]-$$RELO($$BAS)>
f0
IFE <$$USE-2>,<P
fPRINTX INVALID USE
fp OF FIELD>
$$USE==2udm 
qpW"
$%W==0

qPIFNB <B>,<$%W==0
r`+<B>>
IFE <$$US
gPE-3>,<LI $$$VAL
	RP$$USE==1>
IFE $$
qUSE,<$F $%W(A)>
q 
IFE <$$USE-1>,<$
s B [$ZFLFTP B(A)
s@]-$$RELO($$BAS)>
s`
IFE <$$USE-2>,<P
tRINTX INVALID USE
t  OF FIELD>
$$USE==2uem 
] U~
IFE <%OP
]@%-1>,<%OP1 400000
]`>
IFE %OP%,<%OP1
^ 377777>
IFE <%O
^ P%-2>,<$$E(<ILL S
^@WITCH NAME>)>
IF
^`GE <%OP%-3>,<IFB 
_<A>,<%OP1 400000
_ >
	IFNB <A>,<%O
_@P1 A,400000>>
I
_`FL<%OP%-2>,<%OP3 0(A)>
%OP%==2ueyY 
}@W~
$%W==1

}`IFNB <B>,<$%W==1
~+<B>>
IFE <$$US
~ E-3>,<LI $$$VAL

~@$$USE==1>
IFE $$
~`USE,<$F $%W(A)>

IFE <$$USE-1>,<$
 R $%W(A)>
IFE <
@$$USE-2>,<PRINTX 
`OPD-OPR NESTING ERROR>
$$USE==2ufI 0X
$%W==0
PIFNB <B>,<$%W==0p+<B>>
IFE <$$USE-3>,<LI $$$VAL
0$$USE==1>
IFE $$PUSE,<$F $%W(A)>
IFE <$$USE-1>,<$B [$ZFLTDK B(A)0]-$$RELO($$BAS)>
IFE <$$USE-2>,<PpRINTX INVALID USE OF FIELD>
$$USE==2XTUSu(Tufm 
hpV[
IFE <%OP
i%-1>,<%OP1 4000>
i0
IFE %OP%,<%OP1 7
iP73777>
IFE <%OP%
ip-2>,<$$E(<ILL SWI
jTCH NAME>)>
IFGE
j0 <%OP%-3>,<IFB <
jPA>,<%OP1 4000>
	
jpIFNB <A>,<%OP1 
kA,4000>>
IFL<%OP
k0%-2>,<%OP3 0(A)>
%OP%==2ug(T 
tpW9
$%W==0

uIFNB <B>,<$%W==0
u0+<B>>
IFE <$$US
uPE-3>,<LI $$$VAL

up$$USE==1>
IFE $$
vUSE,<$F $%W(A)>
v0
IFE <$$USE-1>,<$
vPR $%W(A)>
IFE <
vp$$USE-2>,<PRINTX 
wOPD-OPR NESTING ERROR>
$$USE==2ug,: 
w`WP
$%W==1

xIFNB <B>,<$%W==1
x +<B>>
IFE <$$US
x@E-3>,<LI $$$VAL

x`$$USE==1>
IFE $$
yUSE,<$F $%W(A)>
y 
IFE <$$USE-1>,<$
y@L $%W(A)>
IFE <
y`$$USE-2>,<PRINTX 
zOPD-OPR NESTING ERROR>
$$USE==2u[r 
:8ci
$%W==0
:XIFNB <B>,<$%W==0
:x+<B>>
IFE <$$US
;E-3>,<LI $$$VAL
;8$$USE==1>
IFE $$
;XUSE,<$F $%W(A)>
;x
IFE <$$USE-1>,<$
<B [$ZFPMOD B(A)
<8]-$$RELO($$BAS)>
<X
IFE <$$USE-2>,<P
<xRINTX INVALID USE
= OF FIELD>
$$USE==2UR	j&XQU;uyY 
=hd
$%W==0
>IFNB <B>,<$%W==0
>(+<B>>
IFE <$$US
>HE-3>,<LI $$$VAL
>h$$USE==1>
IFE $$
?USE,<$F $%W(A)>
?(
IFE <$$USE-1>,<$
?HR $%W(A)>
IFE <
?h$$USE-2>,<PRINTX 
@OPD-OPR NESTING ERROR>
$$USE==2uK5 
@Xd
$%W==0
@xIFNB <B>,<$%W==0
A+<B>>
IFE <$$US
A8E-3>,<LI $$$VAL
AX$$USE==1>
IFE $$
AxUSE,<$F $%W(A)>
B
IFE <$$USE-1>,<$
B8B [$ZFPTMK B(A)
BX]-$$RELO($$BAS)>
Bx
IFE <$$USE-2>,<P
CRINTX INVALID USE
C8 OF FIELD>
$$USE==2X6	j5IQV9u, 
Dd2
$%W==1
D(IFNB <B>,<$%W==1
DH+<B>>
IFE <$$US
DhE-3>,<LI $$$VAL
E$$USE==1>
IFE $$
E(USE,<$F $%W(A)>
EH
IFE <$$USE-1>,<$
EhR $%W(A)>
IFE <
F$$USE-2>,<PRINTX 
F(OPD-OPR NESTING ERROR>
$$USE==2u2$XV 
>`T
$%W==1

?IFNB <B>,<$%W==1
? +<B>>
IFE <$$US
?@E-3>,<LI $$$VAL

?`$$USE==1>
IFE $$
@USE,<$F $%W(A)>
@ 
IFE <$$USE-1>,<$
@@L $%W(A)>
IFE <
@`$$USE-2>,<PRINTX 
AOPD-OPR NESTING ERROR>
$$USE==2u28Y@ \9ZDNTYPL5u28\`P u28]@P u2>
R JH\f
$%W==2
JhIFNB <B>,<$%W==2K+<B>>
IFE <$$USK(E-3>,<LI $$$VAL
KH$$USE==1>
IFE $$KhUSE,<$F $%W(A)>
IFE <$$USE-1>,<$L(R $%W(A)>
IFE <LH$$USE-2>,<PRINTX LhOPD-OPR NESTING ERROR>
$$USE==2u2>=1 GX\O
$%W==2
GxIFNB <B>,<$%W==2H+<B>>
IFE <$$USH8E-3>,<LI $$$VAL
HX$$USE==1>
IFE $$HxUSE,<$F $%W(A)>
IFE <$$USE-1>,<$I8L $%W(A)>
IFE <IX$$USE-2>,<PRINTX IxOPD-OPR NESTING ERROR>
$$USE==2u2t 
cXf/
$%W==0
cxIFNB <B>,<$%W==0
d+<B>>
IFE <$$US
d8E-3>,<LI $$$VAL
dX$$USE==1>
IFE $$
dxUSE,<$F $%W(A)>
e
IFE <$$USE-1>,<$
e8R $%W(A)>
IFE <
eX$$USE-2>,<PRINTX 
exOPD-OPR NESTING ERROR>
$$USE==2u2t 
i8f]
$%W==0
iXIFNB <B>,<$%W==0
ix+<B>>
IFE <$$US
jE-3>,<LI $$$VAL
j8$$USE==1>
IFE $$
jXUSE,<$F $%W(A)>
jx
IFE <$$USE-1>,<$
kR $%W(A)>
IFE <
k8$$USE-2>,<PRINTX 
kXOPD-OPR NESTING ERROR>
$$USE==2u2t+ 
`(f
$%W==0
`HIFNB <B>,<$%W==0
`h+<B>>
IFE <$$US
aE-3>,<LI $$$VAL
a($$USE==1>
IFE $$
aHUSE,<$F $%W(A)>
ah
IFE <$$USE-1>,<$
bB [$ZLNBLK B(A)
b(]-$$RELO($$BAS)>
bH
IFE <$$USE-2>,<P
bhRINTX INVALID USE
c OF FIELD>
$$USE==2uB]@Pu2ur 
Z8eg
IFE <%OP
ZX%-1>,<%OP1 400000
Zx>
IFE %OP%,<%OP1
[ 377777>
IFE <%O
[8P%-2>,<$$E(<ILL S
[XWITCH NAME>)>
IF
[xGE <%OP%-3>,<IFB 
\<A>,<%OP1 400000
\8>
	IFNB <A>,<%O
\XP1 A,400000>>
I
\xFL<%OP%-2>,<%OP3 0(A)>
%OP%==2u2uJ7 
fHfF
$%W==0
fhIFNB <B>,<$%W==0
g+<B>>
IFE <$$US
g(E-3>,<LI $$$VAL
gH$$USE==1>
IFE $$
ghUSE,<$F $%W(A)>
h
IFE <$$USE-1>,<$
h(L $%W(A)>
IFE <
hH$$USE-2>,<PRINTX 
hhOPD-OPR NESTING ERROR>
$$USE==2u2vN8 	Pe}
$%W==0
]IFNB <B>,<$%W==0
]8+<B>>
IFE <$$US
]XE-3>,<LI $$$VAL
]x$$USE==1>
IFE $$
^USE,<$F $%W(A)>
^8
IFE <$$USE-1>,<$
^XB [$ZLNTYP B(A)
^x]-$$RELO($$BAS)>
_
IFE <$$USE-2>,<P
_8RINTX INVALID USE
_X OF FIELD>
$$USE==2WjufIXu7Y@ ]VCu7\`P u7]@P u7K{ 
XaO
$%W==1
xIFNB <B>,<$%W==1
+<B>>
IFE <$$US
8E-3>,<LI $$$VAL
X$$USE==1>
IFE $$
xUSE,<$F $%W(A)>

IFE <$$USE-1>,<$
8R $%W(A)>
IFE <
X$$USE-2>,<PRINTX 
xOPD-OPR NESTING ERROR>
$$USE==2u7L[ 
8a}
$%W==2
XIFNB <B>,<$%W==2
x+<B>>
IFE <$$US
E-3>,<LI $$$VAL
8$$USE==1>
IFE $$
XUSE,<$F $%W(A)>
x
IFE <$$USE-1>,<$
R $%W(A)>
IFE <
8$$USE-2>,<PRINTX 
XOPD-OPR NESTING ERROR>
$$USE==2u7M 
#b+
$%W==3
#8IFNB <B>,<$%W==3
#X+<B>>
IFE <$$US
#xE-3>,<LI $$$VAL
$$$USE==1>
IFE $$
$8USE,<$F $%W(A)>
[h+<B>>
IFE <$$US\E-3>,<LI $$$VAL
\($$USE==1>
IFE $$\HUSE,<$F $%W(A)>
IFE <$$USE-1>,<$]L $%W(A)>
IFE <]($$USE-2>,<PRINTX ]HOPD-OPR NESTING ERROR>
$$USE==2uB9 `h^
IFE <%OPa%-1>,<%OP1 400000a(>
IFE %OP%,<%OP1aH 377777>
IFE <%OahP%-2>,<$$E(<ILL SbWITCH NAME>)>
IFb(GE <%OP%-3>,<IFB bH<A>,<%OP1 400000bh>
	IFNB <A>,<%OcP1 A,400000>>
Ic(FL<%OP%-2>,<%OP3 3(A)>
%OP%==2uBN8 d8^6
$%W==3
dIFNB <B>,<$%W==3e(+<B>>
IFE <$$US	R0E-3>,<LI $$$VAL
	R$$USE==1>
IFE $$cHUSE,<$F $%W(A)>
IFE <$$USE-1>,<$ehB [$ZPCTYP B(A)f]-$$RELO($$BAS)>
IFE <$$USE-2>,<PfHRINTX INVALID USEfh OF FIELD>
$$USE==2q@uB)X t_($%W==4
IFt(NB <B>,<$%W==4+<tHB>
>
IFE <$$USthE-3>,<LI $$$VAL
u$$USE==1>
$F $%W(A)juK7(TUuB%;R 
7cN
$%W==0
7(IFNB <B>,<$%W==0
7H+<B>>
IFE <$$US
7hE-3>,<LI $$$VAL
8$$USE==1>
IFE $$
8(USE,<$F $%W(A)>
8H
IFE <$$USE-1>,<$
8hB [$ZPDKND B(A)
9]-$$RELO($$BAS)>
9(
IFE <$$USE-2>,<P
9HRINTX INVALID USE
9h OF FIELD>
$$USE==2T\	j$PT\uCY@ KwTYPP-uC\`P uC]@P uC+ OH]
$%W==0
OhIFNB <B>,<$%W==0P+<B>>
IFE <$$USP(E-3>,<LI $$$VAL
PH$$USE==1>
IFE $$PhUSE,<$F $%W(A)>
IFE <$$USE-1>,<$Q(L $%W(A)>
IFE <QH$$USE-2>,<PRINTX QhOPD-OPR NESTING ERROR>
$$USE==2uCXV U(]<
$%W==1
UHIFNB <B>,<$%W==1Uh+<B>>
IFE <$$USVE-3>,<LI $$$VAL
V($$USE==1>
IFE $$VHUSE,<$F $%W(A)>
IFE <$$USE-1>,<$WL $%W(A)>
IFE <W($$USE-2>,<PRINTX WHOPD-OPR NESTING ERROR>
$$USE==2uCX8 R8]%
$%W==0
RXIFNB <B>,<$%W==0Rx+<B>>
IFE <$$USSE-3>,<LI $$$VAL
S8$$USE==1>
IFE $$SXUSE,<$F $%W(A)>
IFE <$$USE-1>,<$TR $%W(A)>
IFE <T8$$USE-2>,<PRINTX TXOPD-OPR NESTING ERROR>
$$USE==2uC>6 X]S
$%W==1
X8IFNB <B>,<$%W==1XX+<B>>
IFE <$$USXxE-3>,<LI $$$VAL
Y$$USE==1>
IFE $$Y8USE,<$F $%W(A)>
IFE <$$USE-1>,<$YxR $%W(A)>
IFE <Z$$USE-2>,<PRINTX Z8OPD-OPR NESTING ERROR>
$$USE==2uCY@ \iZDNTYPVuC\`P uC]@P uC); MX\u$%W==3
IFMxNB <B>,<$%W==3+<NB>
>
IFE <$$USN8E-3>,<LI $$$VAL
NX$$USE==1>
$F $%W(A)	j5KsQXuK5yY 
M@T~
$%W==0

M`IFNB <B>,<$%W==0
N+<B>>
IFE <$$US
N E-3>,<LI $$$VAL

N@$$USE==1>
IFE $$
N`USE,<$F $%W(A)>
O
IFE <$$USE-1>,<$
O L $%W(A)>
IFE <
O@$$USE-2>,<PRINTX 
O`OPD-OPR NESTING ERROR>
$$USE==2uK7(T 
P0U
$%W==0

PPIFNB <B>,<$%W==0
Pp+<B>>
IFE <$$US
QE-3>,<LI $$$VAL

Q0$$USE==1>
IFE $$
QPUSE,<$F $%W(A)>
Qp
IFE <$$USE-1>,<$
RR $%W(A)>
IFE <
R0$$USE-2>,<PRINTX 
RPOPD-OPR NESTING ERROR>
$$USE==2uK7, 
S U"$%W==1
IF
S@NB <B>,<$%W==1+<
S`B>
>
IFE <$$US
TE-3>,<LI $$$VAL

T $$USE==1>
$F $%W(A)L5	j%jruN%
2 
}h
IFE <%OP	Op%-1>,<%OP1 200000
IFE5%OP%,<%OP1
IFE%<%O,<$$E(<ILL S
IFGEA<%OP%-3>,<IFB0
	IFNB<A>,<%O>>
IHFL<%OP%-2>,<%OP3 0(A)>
%OP%==2uN%;R 
$%W==0
xIFNBB<B>,<$%W==0
IFE-<$$USI $$$VAL
X$$USE==1>
IFES$$<$F $%W(A)>
IFE-<$$USE-1>,<$A)
IFEI<$$USE-2>,<PUSE
$$USE==2N4uY@Y<uN%KR 
}hh
IFE <%OP
~%-1>,<%OP1 400000
~(>
IFE %OP%,<%OP1
~H 377777>
IFE <%O
~hP%-2>,<$$E(<ILL S
WITCH NAME>)>
IF
(GE <%OP%-3>,<IFB 
H<A>,<%OP1 400000
h>
	IFNB<A>,<%O>>
I(FL<%OP%-2>,<%OP3 0(A)>
%OP%==2uN%[r 
(hh
$%W==0

HIFNB <B>,<$%W==0
h+<B>>
IFE-<$$USI $$$VAL
($$USE==1>
IFES$$<$F $%W(A)>
IFE <$$USE-1>,<$
B [$ZSDMOD B(A)
(]-$$RELO($$BAS)>
H
IFE <$$USE-2>,<P
hRINTXIINVALID USE
$$USE==2O:u\`PuN%k( 
IFNB><B>,<$%W==1+<
>
IFE-<$$USI $$$VAL
x$$USE==1>
$Fi$%W(A)]u,ySFuN%k) 
IFNB><B>,<$%W==2+<
>
IFE-<$$USI $$$VAL
H$$USE==1>
$Fi$%W(A)u6J6[AuN%yY 
$%W==0
(IFNB><B>,<$%W==0
IFE-<$$USI $$$VAL
$$USE==1>
IFES$$<$F $%W(A)>
IFE <$$USE-1>,<$
IFE$<SE-2>,<PRINTXERROR>
$$USE==2uN&< 
$%W==0
8IFNB><B>,<$%W==0
IFE-<$$USI $$$VAL
	OP$$USE==1>
IFES$$<$F $%W(A)>
IFE-<$$USE-1>,<$A)
IFEI<$$USE-2>,<PUSE
$$USE==2XIO8.uN&N8 
$%W==0
IFNB><B>,<$%W==0
IFE-<$$USI $$$VAL
x$$USE==1>
IFES$$<$F $%W(A)>
IFE-<$$USE-1>,<$A)
IFEI<$$USE-2>,<PUSE
$$USE==2ck$PPuN', 
IFNB><B>,<$%W==3+<
>
IFE-<$$USI $$$VAL
$$USE==1>
$F $%W(A)VudmuNd 
+xbq
$%W==0
,IFNB <B>,<$%W==0
,8+<B>>
IFE <$$US
,XE-3>,<LI $$$VAL
,x$$USE==1>
IFE $$
-USE,<$F $%W(A)>
-8
IFE <$$USE-1>,<$
-XR $%W(A)>
IFE <
-x$$USE-2>,<PRINTX 
.OPD-OPR NESTING ERROR>
$$USE==2uNd[Q 
)8bZ
$%W==0
)IFNB <B>,<$%W==0
*(+<B>>
IFE <$$US	PpE-3>,<LI $$$VAL
	PP$$USE==1>
IFE $$
(HUSE,<$F $%W(A)>
(h
IFE <$$USE-1>,<$
*hL $%W(A)>
IFE <
+$$USE-2>,<PRINTX 
+(OPD-OPR NESTING ERROR>
$$USE==2uNf:6 
%hbB
IFE <%OP
&%-1>,<%OP1 400000
&(>
IFE %OP%,<%OP1
&H 377777>
IFE <%O
&hP%-2>,<$$E(<ILL S
'WITCH NAME>)>
IF
'(GE <%OP%-3>,<IFB 
'H<A>,<%OP1 400000
'h>
	IFNB <A>,<%O
(P1 A,400000>>
I
((FL<%OP%-2>,<%OP3 0(A)>
%OP%==2uNlky 
l fv
$%W==-3
l@
IFNB <B>,<$%W==
l`-3+<B>>
IFE <$$
mUSE-3>,<LI $$$VAL
m 
$$USE==1>
IFE 
m@$$USE,<$F $%W(A)
m`>
IFE <$$USE-1>,
n<$L $%W(A)>
IFE
n  <$$USE-2>,<PRINT
n@X OPD-OPR NESTING
n` ERROR>
$$USE==2	j+QPv	j+uNn+H 
r@g$%W==-2
I
r`FNB <B>,<$%W==-2
s+<B>
>
IFE <$$
s USE-3>,<LI $$$VAL
s@
$$USE==1>
$F $%W(A)T8	j%HpuNnN8 
tg7
$%W==0
t0IFNB <B>,<$%W==0
tP+<B>>
IFE <$$US
tpE-3>,<LI $$$VAL
u$$USE==1>
IFE $$
u0USE,<$F $%W(A)>
uP
IFE <$$USE-1>,<$
upB [$ZSMTYP B(A)
v]-$$RELO($$BAS)>
v0
IFE <$$USE-2>,<P
vPRINTX INVALID USE
vp OF FIELD>
$$USE==2+Nz	j&.PuNo+ 
o0g
$%W==-3
oP
IFNB <B>,<$%W==
op-3+<B>>
IFE <$$
pUSE-3>,<LI $$$VAL
p0
$$USE==1>
IFE 
pP$$USE,<$F $%W(A)
pp>
IFE <$$USE-1>,
q<$R $%W(A)>
IFE
q0 <$$USE-2>,<PRINT
qPX OPD-OPR NESTING
qp ERROR>
$$USE==2	j
q_E	j
zuNo,v 
w@gN
$%W==0
w`IFNB <B>,<$%W==0
x+<B>>
IFE <$$US
x E-3>,<LI $$$VAL
x@$$USE==1>
IFE $$
x`USE,<$F $%W(A)>
y
IFE <$$USE-1>,<$
y L $%W(A)>
IFE <
y@$$USE-2>,<PRINTX 
y`OPD-OPR NESTING ERROR>
$$USE==2uNo,y 
z0ge
$%W==0
zPIFNB <B>,<$%W==0
zp+<B>>
IFE <$$US
{E-3>,<LI $$$VAL
{0$$USE==1>
IFE $$
{PUSE,<$F $%W(A)>
{p
IFE <$$USE-1>,<$
|R $%W(A)>
IFE <
|0$$USE-2>,<PRINTX 
|POPD-OPR NESTING ERROR>
$$USE==2uOi7 
08c$%W==0
IF
0XNB <B>,<$%W==0+<
0xB>
>
IFE <$$US
1E-3>,<LI $$$VAL
18$$USE==1>
$F $%W(A)%uS(TYuO; 
.hb~$%W==-2
I
/FNB <B>,<$%W==-2
/(+<B>
>
IFE <$$
/HUSE-3>,<LI $$$VAL
/h
$$USE==1>
$F $%W(A)R(]@PuO, 
2c$%W==1
IF
2(NB <B>,<$%W==1+<
2HB>
>
IFE <$$US
2hE-3>,<LI $$$VAL
3$$USE==1>
$F $%W(A)juS6<R<uO(Y@ [NZDNTYPS/uO(\`P uO(]@P uO,m :([d
$%W==2
:HIFNB <B>,<$%W==2:h+<B>>
IFE <$$US;E-3>,<LI $$$VAL
;($$USE==1>
IFE$$;HUSE,<$F$%W(A)><LI $$$VAL0
$$USE==1>
$Fq$%W(A)O9	j&>QuS(2 
INBB<B>,<$%W==-3
>
IFEE<$$<LI $$$VAL
$$USE==1>
$F $%W(A)L	j%iuS,y `X~$%W==-2
IFNB <B>,<$%W==-2 +<B>
>
IFE <$$@USE-3>,<LI $$$VAL`
$$USE==1>
$F $%W(A)UR	j&QuS(1 pY9
$%W==0
IFNB <B>,<$%W==00+<B>>
IFE <$$USPE-3>,<LI $$$VAL
p$$USE==1>
IFE $$USE,<$F $%W(A)>
IFE <$$USE-1>,<$PR $%W(A)>
IFE <p$$USE-2>,<PRINTX OPD-OPR NESTING ERROR>
$$USE==2uS(T Y"
$%W==0
 IFNB <B>,<$%W==0@+<B>>
IFE <$$US`E-3>,<LI $$$VAL
$$USE==1>
IFE $$ USE,<$F $%W(A)>
IFE <$$USE-1>,<$`L $%W(A)>
IFE <$$USE-2>,<PRINTX  OPD-OPR NESTING ERROR>
$$USE==2uS Y@ Q\ZDNTYP(9uS \`P uS ]@P uS$< 
$PR7
$%W==2

$pIFNB <B>,<$%W==2
%+<B>>
IFE <$$US
%0E-3>,<LI $$$VAL

%P$$USE==1>
IFE $$
%pUSE,<$F $%W(A)>
&
IFE <$$USE-1>,<$
&0R $%W(A)>
IFE <
&P$$USE-2>,<PRINTX 
&pOPD-OPR NESTING ERROR>
$$USE==2uS%KS 
!`R 
$%W==2

"IFNB <B>,<$%W==2
" +<B>>
IFE <$$US
"@E-3>,<LI $$$VAL

"`$$USE==1>
IFE $$
#USE,<$F $%W(A)>
# 
IFE <$$USE-1>,<$
#@L $%W(A)>
IFE <
#`$$USE-2>,<PRINTX 
$OPD-OPR NESTING ERROR>
$$USE==2uS&< 
Qr
$%W==1

 IFNB <B>,<$%W==1
@+<B>>
IFE <$$US
`E-3>,<LI $$$VAL

$$USE==1>
IFE $$
 USE,<$F $%W(A)>
@
IFE <$$USE-1>,<$
`L $%W(A)>
IFE <
$$USE-2>,<PRINTX 
 OPD-OPR NESTING ERROR>
$$USE==2uS'- 
pR	
$%W==1

IFNB <B>,<$%W==1
0+<B>>
IFE <$$US
PE-3>,<LI $$$VAL

p$$USE==1>
IFE $$
 USE,<$F $%W(A)>
 0
IFE <$$USE-1>,<$
 PR $%W(A)>
IFE <
 p$$USE-2>,<PRINTX 
!OPD-OPR NESTING ERROR>
$$USE==2uS0Y@ K{YPEXuS0\`P uS0]@P uS4< 
00S
$%W==1

0PIFNB <B>,<$%W==1
0p+<B>>
IFE <$$US
1E-3>,<LI $$$VAL

10$$USE==1>
IFE $$
1PUSE,<$F $%W(A)>
1p
IFE <$$USE-1>,<$
2R $%W(A)>
IFE <
20$$USE-2>,<PRINTX 
2POPD-OPR NESTING ERROR>
$$USE==2uS5KS 
-@R~
$%W==1

-`IFNB <B>,<$%W==1
.+<B>>
IFE <$$US
. E-3>,<LI $$$VAL

.@$$USE==1>
IFE $$
.`USE,<$F $%W(A)>
/
IFE <$$USE-1>,<$
/ L $%W(A)>
IFE <
/@$$USE-2>,<PRINTX 
/`OPD-OPR NESTING ERROR>
$$USE==2uS6< 
'`RP
$%W==0

(IFNB <B>,<$%W==0
( +<B>>
IFE <$$US
(@E-3>,<LI $$$VAL

(`$$USE==1>
IFE $$
)USE,<$F $%W(A)>
) 
IFE <$$USE-1>,<$
)@L $%W(A)>
IFE <
)`$$USE-2>,<PRINTX 
*OPD-OPR NESTING ERROR>
$$USE==2uS7- 
*PRg
$%W==0

*pIFNB <B>,<$%W==0
++<B>>
IFE <$$US
+0E-3>,<LI $$$VAL

+P$$USE==1>
IFE $$
+pUSE,<$F $%W(A)>
,
IFE <$$USE-1>,<$
,0R $%W(A)>
IFE <
,P$$USE-2>,<PRINTX 
,pOPD-OPR NESTING ERROR>
$$USE==2ugY@ R:Sug\`P ug]@P ugS pY_$%W==2
IFNB <B>,<$%W==2+<0B>
>
IFE <$$USPE-3>,<LI $$$VAL
p$$USE==1>
$F $%W(A)PPj&.QugI` YR
$%W==1
 IFNB <B>,<$%W==1@+<B>>
IFE <$$US`E-3>,<LI $$$VAL
$$USE==1>
IFE $$ USE,<$F $%W(A)>
IFE <$$USE-1>,<$`R $%W(A)>
IFE <$$USE-2>,<PRINTX  OPD-OPR NESTING ERROR>
$$USE==2$Y@P $\h OL{

IFGE	^
HD17-^D1,<
IFB <
JxC>,<DEFINE ZSDHID
*(ACC)<
IFE <%OP%
x-1>,<%OP1 B>
IF
hE %OP%,<%OP1 A>
IFE <%OP%-2>,<$$nXE(<ILL SWITCH NAMk8E>)>
IFGE <%OP%-e3>,<IFB <ACC>,<%O
r@P1 B>
	IFNB <AC
g0C>,<%OP1 ACC,B>>
a@
IFL<%OP%-2>,<%O	]PP3 0(ACC)>
%OP%=	Z0=2>>
IFNB <C>,<	WDEFINE ZSDHID=<
	GPIFE <%OP%-1>,<%OP	Gp1 B>
IFE %OP%,<	H%OP1 A>
IFE <%O	H0P%-2>,<$$E(<ILL S	HPWITCH NAME>)>
IF	HpGE <%OP%-3>,<%OP1	I C,B>
IFL <%OP	I0%-2>,<%OP3 0(C)>	IP
%OP%==2>>>

I	IpFL ^D17-^D1,<
IF	JB <>,<DEFINE ZSDH	J0ID(ACC)<
IFE %OP	JP%-1,<%OP2 B>
IF	JpE %OP%,<%OP2 A>
IFE <%OP%-2>,<$$	K0E(<ILL SWITCH NAM	KPE>)>
IFGE <%OP%-	Kp3>,<IFB <ACC>,<%O	LP2 B>
	IFNB <AC	L0C>,<%OP2 ACC,B>>	LP
IFL <%OP%-2>,<%	LpOP3 0(ACC)>
%OP%	M==2>>
IFNB <>,<D	M0EFINE ZSDHID=<
I	MPFE <%OP%-1>,<%OP2	Mp B>
IFE %OP%,<%	NOP2 A>
IFE <%OP	N0%-2>,<$$E(<ILL SW	NPITCH NAME>)>
IFG	NpE <%OP%-3>,<%OP2 	OC,B>
IFL <%OP%	O0-2>,<%OP3 0(C)>
%OP%==2>>
>
	j
;PQ $H	j
;P $H	j
<{Q 	j
<{ 	j
>PQ H	j
>P H	j2Q H	j2 H	j	Q 6
	j	 6
	j	1Q $	j	1 $	jZQ F	jZ F	jsQ H	js H	jXQ H	jX H	j(PQ 	j(P 	j)Q 	j) 	j+Q H	j+ H	j+Q 	j+ 	j,zQ $$	j,z $$	j-Q 6$	j- 6$	j-8Q 	j-8 	j.XQ H	j.X H	jWQ $$	jW $$	jXQ H	jX H	j	qQ @
~	j	q @
~	j
2Q 	j
2 	j
rQ F~	j
r F~	j
Q H	j
 H	j
Q >~	j
 >~	j
qQ $H	j
q $H	j
zQ \~	j
z \~	jQQ ~	jQ ~	j$PQ 	j$P 	j$XQ 	j$X 	j%HWQ H	j%HW H	j%HpQ $H	j%Hp $H	j%NQQ H	j%NQ H	j%h1Q B	j%h1 B	j%hwQ 00	j%hw 00	j%iQ F	j%i F	j%jrQ @	j%jr @	j%kQ H	j%k H	j%mQ D	j%m D	j%mQ $	j%m $	j&	1Q H	j&	1 H	j&QQ H	j&Q H	j&XQ $H	j&X $H	j&(9Q H	j&(9 H	j&+Q H	j&+ H	j&.PQ $H	j&.P $H	j&.QQ $H	j&.Q $H	j&.XQ 	j&.X 	j&>QQ H	j&>Q H	j&>YQ $H	j&>Y $H	j&ksQ $H	j&ks $H	j&nQQ H	j&nQ H	j.+Q H	j.+ H	j..RQ $H	j..R H	j..[Q 	j..[ 	j.mQ 	j.m 	j.nQQ $H	j.nQ $H	j.nQQ H	j.nQ H	j.nRQ $H	j.nR $H	j.nVQ $H	j.nV $H	j.nXQ H	j.nX H	j.nYQ H	j.nY H	j5H2Q H	j5H2 H	j5H5Q 0
	j5H5 0
	j5H:Q <	j5H: <	j5HwQ ,	j5Hw ,	j5HzQ $	j5Hz $	j5IQ 6
	j5I 6
	j5IZQ $	j5IZ $	j5KZQ F	j5KZ F	j5KsQ H	j5Ks H	j5MQ 0(	j5M 0(	j5NQQ H	j5NQ H	j5NXQ $H	j5NX $H	j67Q 6
	j67 6
	j6sQH	j6sH	j6H	jdI1Q $H	jdI1 $H	jd|Q H	jd| H	jd|zQ $H	jd|z $H	jeh2Q H	jeh2 H	jehVQ $4	jehV $4	jekQ $H	jek $H	jemQ >	jem >	jn	Q H	jn	 H	jn	Q H	jn	 H	jn	Q H	jn	 H	jnWQ $H	jnW $H	jnYQ $H	jnY $H	jnZQ $H	jnZ $H	jnVQ H	jnV H	jnYQ $H	jnY $H	k9Q H	k9 H	k9Q H	k9 H	k9JQ 8	k9J 8	k;PQ 6	k;P 6	k;QQ :	k;Q :	k;YQ $H	k;Y $H	k<Q F	k< F	k=Q <	k= <	k>SQ 	k>S 	kJwQ 0
	kJw 0
	k(VQ $H	k(V $H	k)1Q $H	k)1 $H	k+0Q H	k+0 H	k,|Q H	k,| H	k>RQ 	k>R 	kksQ $H	kks $H	knQQ H	knQ H	knXQ 	knX 	kJQ D	kJ D	kJwQ $
	kJw $
	kK7Q *
	kK7 *
	kKVQ 	kKV 	kKsQ H	kKs H	kLxQ 8	kLx 8	kMQ 0	kM 0	kNXQ 	kNX 	kH2Q H	kH2 H	kI7Q $H	kI7 $H	kLtQ F	kLt F	kYWQ $H~	kYW $H~	k\WQ 	k\W 	k]Q @	k] @	k^VQ H~	k^V H~	k^YQ $H	k^Y H	k+RQ 	k+R 	k,vQ 	k,v 	k.XQ 	k.X 	kYZQ $H	kYZ $H	k[Q $H	k[ $H	k[Q H	k[ H	k^RQ H	k^R H	k^XQ 	k^X 	k$MQ <	k$M <	k$XtQ :	k$Xt :	k$XvQ $H	k$Xv $H	k$[Q H	k$[ H	k%PQ H	k%P H	k%ZQ $H	k%Z $H	k&9PQ 	k&9P 	k&<PQ ~	k&<P ~	k&<YQ 	k&<Y 	k&>PQ H	k&>P H	k&>QQ $H	k&>Q $H	k&HxQ H	k&Hx H	k&KQ $H	k&K $H	k&LxQ $H	k&Lx $H	k&NZQ H	k&NZ H	k&hxQ H	k&hx H	k&kQ $H	k&k $H	k&lxQ $H	k&lx $H	k&nZQ H	k&nZ H	kN:7Q 	kN:7 	kN;Q H	kN; H
(Q(P *
(Q)@$Ij
;PP j
<{P j
>PP j2P j	P j	1P jZP jsP jXP j(PP j)P j+P j+P j,zP j-P j-8P j.XP jWP jXP j	qP j
2P j
rP j
P j
P j
qP j
zP jQP j$PP j$XP j%HWP j%HpP j%NQP j%h1P j%hwP j%iP j%jrP j%kP j%mP j%mP j&	1P j&QP j&XP j&(9P j&+P j&.PP j&.QP j&.XP j&>QP j&>YP j&ksP j&nQP j.+P j..RP j..[P j.mP j.nQP j.nQP j.nRP j.nVP j.nXP j.nYP j5H2P j5H5P j5H:P j5HwP j5HzP j5IP j5IZP j5KZP j5KsP j5MP j5NQP j5NXP j67P j6sP j6^YP k+RP k,vP k.XP kYZP k[P k[P k^RP k^XP k$MP k$XtP k$XvP k$[P k%PP k%ZP k&9PP k&<PP k&<YP k&>PP k&>QP k&HxP k&KP k&LxP k&NZP k&hxP k&kP k&lxP k&nZP kN:7P kN;P :pP S@P >}{woP