PDP-10 Archive: new-subsys/prolog.unv from bb-h137e-bm_tops20_v6_1

Trailing-Edge - PDP-10 Archives - bb-h137e-bm_tops20_v6_1_instl - new-subsys/prolog.unv

There are 52 other files named prolog.unv in the archive. Click here to see a list.

x
,Q	M@P BP C
& Q C
&pQ C
5I`Q ~C
6.BQ C
L`Q C
e}`Q C-PQ C.

Q CL`Q `Cd[@P Ct Q CL@Q CISP C@ K1L[JSP CX,ACSAV0JSP CX,ACSC

@Q C$`P C$i@P C%RQ @C&I@P C'Q xC4Q CP'C"P'C"%`Q C$P CN+@Q xCT, `Cd[@P'C*bQ C\uQ Ci3P C:P Ch6Q C-\uQ `C.|XP `C"$P C"d[@P'C*H Q xC*=P'C*5I`Q xC*Tk@P'C*dQ C*d[@P'C*e@Q C*myQ ~C*n:`Q C++`Q xC+@P C2yQ C2ezy ka_\

LK DEVlLKK,SLOW,LLCAL,DEl VL0K
;LK BTLKK,Fl@AST,LLCAL,BTL0K
l`;LK DMPLKK,FAST,LmLCAL,DMPL0K
;LK m FELKK,FAST,LLCAL,m@FEL0K
;LK IDVLKKm`,FAST,LLCAL,IDVL0nK
;LK NCPLKK,FASn T,LLCAL,NCPL0K
;n@LK OUTLKK,FAST,LLn`CAL,OUTL0K
;LK NoODLKK,FAST,LLCAL,o NODL0K
;LK LLLLKo@K,FAST,LLCAL,LLLLo`0K
;LK STRLKK,SLpOW,LLCAL,STRL0K
p ;LK LPTLKK,FAST,Lp@LCAL,0
;LK MTALKp`K,FAST,LLCAL,0
;qLK CDPLKK,FAST,LLq CAL,CDPL0K
;LK Cq@DRLKK,FAST,LLCAL,q`CDRL0K
;LK MTALKrK,FAST,LLCAL,0
;r LK PLTLKK,FAST,LLr@CAL,0
;LK PTPLKKr`,FAST,LLCAL,PTPL0sK
;LK PTRLKK,FASs T,LLCAL,PTRL0K
;s@LK FGLKK,FAST,LLCs`AL,FGL0K
;LK SNPtLKK,FAST,LLCAL,SNt PL0K
;LK USGLKK,t@FAST,LLCAL,USGL0Kt`
;LK ACTLKK,FASTu,LLCAL,ACTL0K
;Lu K ASCLKK,FAST,LLCu@AL,ASCL0K
;LK GOu`KLKK,FAST,LLCAL,GvOKL0K
;LK TIMLKKv ,FAST,LLCAL,TIML0v@K
;LK CRJLKK,FASv`T,LLCAL,CRJL0K
;wLK LDTLKK,FAST,LLw CAL,LDTL0K
;LK Jw@STLKK,FAST,LLCAL,w`JSTL0K
;LK DRCLKxK,FAST,LLCAL,DRCLx 0K
;LK JFNLKK,FAx@ST,LLCAL,JFNL0K
x`;LK FILLKK,FAST,LyLCAL,FILL0K
LK Ey NQLKK,SLOW,GLLBALy@,ENQL0K
LK PIDLKy`K,SLOW,GLLBAL,PIDzL0K
;LK JSFLKK,Fz AST,LLCAL,JSFL0K
;LK JBCLKK,FAST,z`LLCAL,JBCL0K
;LK{ SFRLKK,FAST,LLCA{ L,SFRL0K
;LK JFR{@LKK,FAST,LLCAL,JFRL0K
,LLCAL,JFC2|>Q|C3-9PUC6y@P"C@,;Q @C@,<UQ C@,[vQ'@C@-h1Q pC@-hXQ pC@-hvQ C@-j1Q C@-j7Q xC@-krQ C@-lTQ C@-lWQ C@-}Q  C@.	9Q C@.NQ C@.xqQ CB[P'CBL@Q @CB*@Q  CB-{ Q @CBLQ CBLQ CBL,Q CBL=Q xCBM

`Q CBt@Q pCBt,Q pCBt;Q CBu@Q CBu`Q xCBu@P'pCBuyQ CBu}P CBv* Q CBv+`Q CBv<Q CB|Q CB|*@Q xCB|,`P'CB|=Q xCB~K`Q  CC\@Q CCP CC:P CCX P'CC`P'pCC pCC[`Q `CC]YQ xCCk P CC Q CC@Q CC`P'CCQ xCCQ CCL`Q xCC'	@Q CC'Q pCC<8`Q CCDQ CH*zQ CH,^Q CH-h9Q CH-iQ CH.

}P'CH.(9Q  CH.)VQ @CH.*;Q CH.,wQ 8CH.|WQ  CK>@P'CK& Q CK&@Q CN<`Q CO$@Q CO$`Q CP,YQ CP,.\Q  CP,<UQ CP,JQ CP,[vQ CP,m6Q @CP,}Q CP-Z2Q CP-h;Q CP-iQ CP-j7Q ?@CP-lTQ CP-yVQ CP-|Q @CP.)5Q CP.*8Q  CP.+Q CP.8tQ @CP.99P'CP.=Q CP.HvQ  CP.NQ CP.X4Q @CP.[RQ CP.[YQ  CP.\TQ CP/	YQ CP/1Q  CP/sQ 8CP/

:Q CR

,@QCRK@QxCR.QRCR|QCR*@QCR$QKCR$]@QCR%QICRL=QLxCRM]rPCRTk@Q	CRd,QCRdLQiCRd[@P'CRe)@QCRmQCRn=QCRt@QCRtLQCRu`Q?@CRv*QCR|=P'CR|MrPCR|kQCR~@Q@CS@P@E$+P E$+P ?E$;rP ?E$l@Q xE$lRP E%h6P E%h@Q `E>= 8$GI
	IFN FTSXHOW,..LOC==.

x
DEFINE	WORD(NAM,NUMB<1>),<
	IFN 8<..MSK>,<..OFF==.X.OFF+1> 

	..MSxK==0		
	FIELDM(NAM,<.FWORD>)	

8	..MSK==0		
	..OXFF==..OFF+NUMB	
x
>

DEFINE	NXTWRD(NUMB<1>),<
	8..MSK==0
	..OFF=X..OFF+NUMB

>
x
DEFINE	FILLER(NUM),<
	..FLG==PO8S(..MSK)
	IFE ..XMSK,<..FLG==-1>
x	IFG <^D<NUM>-<^D35-..FLG>>,<PRINT8X ?FILL TOO BIG IXN A STRUCTURE>
x	...MSK==MASK.(^D<NUM>,<..FLG+^D<N8UM>>)
	IFN FTSHOXW,<
	  PHASE ..OxFF
	  EXP ...MSK
	>
	..MSK==..M8SK!...MSK
>

X

DEFINE	HWORD(nxam),<
	..FLG==0		
	IFE ..MSK&.LH8ALF,<FIELDM(nam,.XLHALF)
			  ..FLxG==1>
	IFE ..FLG ,<..MSK==..MSK!.L 8HALF
		   IFE .. XMSK&.RHALF,<FIELD xM(nam,.RHALF)
		!		     ..FLG==1>
		   IFE ..FLG,<!XNXTWRD
			      !xFIELDM(nam,.LHALF") >
		  >
>

"8
DEFINE	FIELD(NA"XM,SIZ,POS),<
	.."xFLG==0		

	IFB #<POS>,<IFB <SIZ>,#8<
	  ...MSK==.RT#XMSK(<<^-<<..MSK>>#x>>) 
	  IFE ...M$SK,<..OFF==..OFF+$81 
	    ..MSK==0$X		
	    ...MSK==$x-1
	  >
	  FIEL%DM(NAM,<...MSK>)	%8
	%X..FLG==-1		
	>>

	IFNB <SI%xZ>,<.SIZ==^D<SIZ>&> 

	IFNB <POS>&8,<		
	  FIELDM(N&XAM,MASK.(.SIZ,POS&x)) 
	  ..FLG==-1'		
	  ..BITS==MA'8SK.(.SIZ,POS) 
	'X>

	IFE ..FLG,<'xIFGE <^D<.SIZ>-^D(36>,< 
	  WORD(N(8AM,<^D<.SIZ>/^D36(X>) 
	  IFN <<^D<(x.SIZ>-<^D<.SIZ>/^)D36>*^D36>>,<	
	)8    FIELD(...,<<^)XD<.SIZ>-<^D<.SIZ>)x/^D36>*^D36>>) 
*	  >

	  ..FLG=*8=-1		
	>>

	IF*XE ..FLG,<		
	  .*x.BITS==MASK.(^D<.+SIZ>,<^D<.SIZ>-1>+8) 

	  REPEAT <+X^D36-^D<.SIZ>+1>,+x< 
	    IFE ..FL,G,<	
	      IFE ,8<..BITS&..MSK>,< ,X
			..MSK==..MSK,x!..BITS 
		..FLG-==-1 
	       > -8

	    IFE ..FL-XG,..BITS==..BITS_-x<-1> 
	    >
	 . >

	IFE ..FLG,.8<		
	  ..BITS==M.XASK.(^D<.SIZ>,<^D.x<.SIZ>-1>) 
	  ./.OFF==..OFF+1	
	/8  ..MSK==..BITS		/X
	>

	MSKSTR(/xA'NAM,\..OFFC,..0BITS) 
	A.'NAM=08=..OFF
	IFN FTSH0XOW,<
	  PHASE	A0x.'NAM
	  EXP	A'1NAM
	>>

	..OL18D==..BITS		
	...1XOLD==..BITS		

1x>

DEFINE	BIT(N2AM),<
	..BITS==L28FTBT.(..OLD)	

2X	IFE ..BITS,<PRIN2xTX ?NO ROOM FOR B3IT IN LAST FIELD>38

	A%'NAM==..B3XITS_<-<^D35-POS(.3x..OLD)>> 
	A.'N4AM==..OFF		

	M48SKSTR(A'NAM,\..O4XFFC,..BITS) 
	I4xFN FTSHOW,<
	  P5HASE ..OFF
	  EX58P A'NAM
	>

	5X..OLD==..OLD&<^-<5x..BITS>> 

>
6
DEFINE	FIELDM(NA68M,MASK),<
	IFN M6XASK&..MSK,<	
	  6x..MSK==0		
	  ..7OFF==..OFF+1
	>8

	..MSK==..MSK!7XMASK	

	MSKSTR(7xA'NAM,\..OFFC,M8ASK) 
	A.'NAM==88..OFF
	IFN FTSHO8XW,<
	  PHASE	A.8x'NAM
	  EXP	A'N9AM
	>
>

DEFI98NE ENDSTR(LENNAM<9XLEN>,LSTNAM<LST>)9x,<

	IFN ..MSK,:<..OFF==..OFF+1> :8

	A.'LSTNAM==:X..OFF	

	IFN FT:xSHOW,DEPHASE

	;..LOK==..LOK+1
	;8IFN ..LOK,<PRINTX;X ? MISSING BEGSTR;x>

	IF2,<
	  I<FDEF ...MSK,<SUPP<8RESS ...MSK>
	  <XIFDEF ..BITS,<SUP<xPRESS ..BITS>
	 = IFDEF .SIZ,<SUPP=8RESS .SIZ>
	  IF=XDEF ..MSK,<SUPPRE=xSS ..MSK>
	  IFD>EF ..OFF,<SUPPRES>8S ..OFF>
	  IFDE>XF ..FLG,<SUPPRESS>x ..FLG>
	  IFDEF? ..LOK,<SUPPRESS ?8..LOK>
	  IFDEF ?X..LOC,<SUPPRESS .?x.LOC>
	  IFDEF .@.OLD,<SUPPRESS ..@8OLD>
	  IFDEF ..@X.OLD,<SUPPRESS ..@x.OLD>
	>

	IF1A,<
	  IFDEF ...MA8SK,<.XCREF ...MSKAX>
	  IFDEF ..BITAxS,<.XCREF ..BITS>B
	  IFDEF .SIZ,<B8.XCREF .SIZ>
	  BXIFDEF ..MSK,<.XCRBxEF ..MSK>
	  IFDCEF ..FLG,<.XCREF C8..FLG>
	  IFDEF CX..OFF,<.XCREF ..OCxFF>
	  IFDEF ..LDOK,<.XCREF ..LOK>D8
	  IFDEF ..LOC,DX<.XCREF ..LOC>
	Dx  IFDEF ..OLD,<.XECREF ..OLD>
	  IE8FDEF ...OLD,<.XCREXEF ...OLD>
	>
Ex
	PURGE WORD,NXTWFRD,FILLER,HWORD,FF8IELD,BIT,FIELDM
FX
	A.'LENNAM==..FxOFF-B
	IFN FTSHGOW,<RELOC ..LOC>>G8



	..MSK==0GX		
	..OFF==B		
	A.D==B	

	HIFDEF ..LOK,<IFL H8..LOK,<PRINTX ? NHXEW BEGSTR WITHOUTHx ENDSTR>>

	..LOK==-1


	..L$J$K0$MBEG
	  E&t@P E.d[@P'E/'Q xE2Mj`P E2\`Q E2]I7P E2^N8Q xE2^i9P'pE>~IVP CE?.IP EN! Q EN,uQ ENv1 Q ENv:`Q ENv=Q ENvA Q EN~a Q EN~lRQ EO Q  EO

 Q  EO>A Q EO>H@Q EP-rQ  EP.,Q @ERyQ q|?ER6$@Q xERD=Q xER]k P'ERd[@P ERl4@Q ERl=Q ERo

}P EV9` ^Ivg
   IF2,<^)..NRGS==0
	IRP ^	F,<
	  .CKLC1 (]iF)
	  ..NRGS=..NkRGS+1>	
    IFG k8..NRGS-BUGMXR,<
kX	  PRINTX %TOO MAkxNY LOCATIONS IN DlEFINITION OF BUGl8A B>>
    CONCKlX$ (A,B,,,<F>,<lxE>,SAME,H)
    ,SAME,H)
   EV=^P EW$;2P 9EW$;rP @EW$LZP 5EW$\P AEW$\YP BEW$kP AEW%I7P @EW%KP AEW%]7P 5EW&	yP AEW&
P BEW&.P 4EW&=P CEW&[P BEW&j9P BE_*:Q FP Ge@ ,GeLR +GeN y5
	IFB <A1>,<CALL @[B]>
	PIFNB <A>,<CALL @[A,,B]>
LL @G
e4 ba^JSP CX,BLOCK0JSP CX,BLOG
e4  c!^JSP CX,BLOCK1JSP CX,BLOG
e9ca^JSPQCX,BLOCKEJSPCX,BLOGE  p2GE` p:GFX  p6GF[` p>GFh  p4GFk` p<Gd[@P Gt(P Gt)P GuyP Gw

VQ  GY@Q GKu ga^>
	NOSKD1
	AOSpSCAILKD1 h!^B
	CALL CFSULL
	CALL CFGEm6P ?GF)P#|GF+ P#|G"]Z e!^*
	CALL CKINT0
	CALL CKG"uyS  QJ
	CONO PI q,PICHOF+1B<28+A>
+1B<28+A>G"u{@ !1J
	CONOPI!Q,PICHON+1B<28+A>ICHON+1B<28+A>G&Y@Q  G'\Q G/:=P  G/	VP G2~9P G3
	CONO PIQ,PICPIR+1B<28+A>ICPIR+1B<28+A>G>P'G>$P G>d[@P'G>ej`Q G>lH:P G>n)wP G>t:b o9x5

  IF2,oY<
   IFDIF <G><oxSAME>,<		
p8  IpFDIF <E>,<G>,<
	PRINTX %OptionapXl data in B disapxgrees with definiqtion of B>


q8	LALL
	  ;BUGA qXB, F
	       SqxALL
   >>
IF1,<rSYN B,TAGSAV    r8		
PURGE B			
rXSYN TAGSAV,B			
PURGE TAGSAV>			s
IFB <H>,<
	XCs8T [
	B:: 			
	sX  IFIDN <A><HLT>sx,<
	     IFE <<CtURPSX-PXRESCD>*<Ct8URPSX-PXSWAPCD>>,tX<
		 JSR @XBUGHLtxT>
	     IFN <<CuURPSX-PXRESCD>*<Cu8URPSX-PXSWAPCD>>,uX<
		 JSR BUGHLT>ux
	  >
	  IFDIF v<A><HLT>,<
	   v8  IFE <<CURPSX-PXvXRESCD>*<CURPSX-PXvxSWAPCD>>,<
		 PUwSHJ P,@XBGCA>
	w8     IFN <<CURPSXwX-PXRESCD>*<CURPSXwx-PXSWAPCD>>,<
		x PUSHJ P,BGCA>
x8	  >
	  DOLOC0 <xXE>	
		SIXBIT /xxB/
	  ]
>
IFNBy <H>,<
	JRST [
	       XCT [
	yX       B:: 			
yx	         IFIDN <zA><HLT>,<
		   z8IFE <<CURPSX-PXREzXSCD>*<CURPSX-PXSWzxAPCD>>,<
		     {  JSR @XBUGHLT>
{8		   IFN <<CURPSX{X-PXRESCD>*<CURPSX{x-PXSWAPCD>>,<
		|       JSR BUGHLT|8>
		 >
	       |X  IFDIF <A><HLT>|x,<
		   IFE <<CU}RPSX-PXRESCD>*<CU}8RPSX-PXSWAPCD>>,<}X
		       PUSHJ }xP,@XBGCA>
		   ~IFN <<CURPSX-PXRE~8SCD>*<CURPSX-PXSW~XAPCD>>,<
		    ~x  PUSHJ P,BGCA>
		 >
	         8DOLOC0 <E>	
	  X             SIXBxIT /B/
	         ]
	       JRST8 H ]		

>
	XLXIST
	.PSECT BGSTxR
i:!	ASCIZ \F\
	.ENDPS BGSTR
	.PSECT BGPTR
 X IFE FTNSPSRV,<
x  IF1,<	0			
	0
	%ST1=MSEC1		
	8%ST1=SYMSEC		
	%XST1=XCDSEC
	PURGxE %ST1>
  IF2,< IFE <<CURPSX-PXRE8SCD>*<CURPSX-PXSWXAPCD>>,<
	XWD XCxDSEC,B>
	IFN <<CURPSX-PXRESCD>*<8CURPSX-PXSWAPCD>>X,<
	XWD MSEC1,Bx>
	XWD SYMSEC,i
	.XCREF i
	PU8RGE i>
  >
  IXFN FTNSPSRV,<
  xIF1,<	0>			
  IF2,<	XWD B,i
	.8XCREF i
	PURGE Xi>
  >
	.ENDPS BGPTR
	LIST
G?QMG?YQG?[Q ,G?X@PGBpPRGC@PGCN-,{!Z.CPYRT%198535SCGGJwUQ @GO&

zP GO&8;Q @GO>(@P$GS+P GS<}P GSkP GW=P#GWX`Q xG`@ Gk

HSP HP I$}Q I

,9@Q I

,;@Q I

.)Q  I\@P'I%WP I5I`P IlQ xI

QP IRP IyWP IJ6P ILWP IY`P I4` (LM
   IF1,<F9
	IFG B-15,<PRI/)NTX ?**INVALID RE)iDEFINITION OF AC H1B**>
	IFL B-1,HP<PRINTX ?**INVALIHpD REDEFINITION OFI AC B**>
	A=BI0
	PURGE B,B
	IPDEFINE B<%B%>>EFINE B<%B%>>I6= `h&
	A==<-1aB<C>+1B<C-D>> a(
	IF1,<IFDEF %AaH,<PRINTX ?A ALREahADY DEFINED>>
	DbEFINE %A (OP,AC,b(Y,MSK)<
	$A==<ZbH B>		
	OP (<AC>,B'Y,MSK)><AC>Id@P I4`P$I5JuQ @I6I@P II@Q  I&

kQ  I&P'I&$P I&d[@P'I&ej`Q I'`P"I'i@P @I'|Q I'H Q I'k Q I'yWP#I'9@Q I'I@P I'	@P I3:P I3-9P I3D:P I7P I7yP I9

{P I>P'I>=Q |

I>$P I>-{ Q @I>d[@P'I>exh x9
	IRP A,<DOLOC2 A> A,I>exh xA
	Z A
   
	Z A
 I>exi Yx=
	DOLOC1 (A)
	DOLOC1 I>lQ xI>u\`Q I>v9`Q I?0 Id
   DEFIN79E A (NAM,SIZ)<
7	NAM=:..PC
	..PC7y=..PC+SIZ>
   DEBFINE SA (NAM,SIZB!)<
	NAM==:..PC
BA	..PC=..PC+SIZ>
   ..PC==B

I?Y Q I?[Q  I?Y`Q xI@,9@P I@,;@P I@.)P IC@P 
IJ

=QIJY`QIJ$QIJ$*`QIJ$8PQIJ$iQIJ$|QIJ%iQIJ&IJl:P IJmx@Q IJmyQ IJo

}P  IJt Q IJv[ P'IK= Q xIKMQ IKYQ IK]@P'IK|P `IK] P'IK}`P'pIK@Q IK-Q IK-@Q IK=`Q IKYQ IK{P IKh Q IKy@P$IK@Q xIK-Q IKH`P'IKK Q xIKX`P IKLQ IK&*`P'`IK'Q xIK,MQ IK,|Q IK4\@P'pIN\@Q @IN\:P IN]h@Q  IN^=qQ INl@P IR

:P IR 9g}
	A=:..PYC
	..PC=..PC+B
	..PC=..PC+BIR(2 W]>
    IFNBW! <A>,<
	IFIW![MW@OVEI T1,A
		RETW`]>
    IFB <A>,<
	 IFIW!R>
,IRLx ]@IFIW!AIRI7P IRK@P IR:x VA]4	IFIW!RSKP	IFIW!RSKPIRP$IR$:P IR*P @IR*P BIR* P DIR*0P FIR,99P IR,YP  IR,YP  IR,Y9P IR,[8P 	IR,\P 
IR-[WP IR.	@P @IR.
(P IR.
2P IR.

[P!IR.99P IR.=`P IR.IP IR.IP IR.I9P IR5I`P IS4uP IS6+P IS69P IS699P IS6KP IS6KP IX-|Q I_*:Q @IftkP Kt[Z YA]L
	JSP CX,$EAENT
	JSP CX,K92 _!]zJSP CX,ECSKD0JSP CX,ECSK3-9P K7] RA]
	IFNB <RaAB>,<
	JRST [	SB
	   IFNB <A>,S <MOVEI T1,A>
		S@JRST EMRET0]>
	IS`FB <AB>,<
	JRST EMRET0>
	JRSK:

+Q  K:$`Q  K:&= #Is ah

	IFN .$.MSK,<..OFF==..OF$ F+1> 

	RN.B==$@..OFF	

	IFN FT$`SHOW,DEPHASE

	%..LOK==..LOK+1
	% IFN ..LOK,<PRINTX%@ ? MISSING BEGSTR%`>

	IF2,<
	  I&FDEF ...MSK,<SUPP& RESS ...MSK>
	  &@IFDEF ..BITS,<SUP&`PRESS ..BITS>
	 ' IFDEF .SIZ,<SUPP' RESS .SIZ>
	  IF'@DEF ..MSK,<SUPPRE'`SS ..MSK>
	  IFD(EF ..OFF,<SUPPRES( S ..OFF>
	  IFDE(@F ..FLG,<SUPPRESS(` ..FLG>
	  IFDEF) ..LOK,<SUPPRESS ) ..LOK>
	  IFDEF )@..LOC,<SUPPRESS .)`.LOC>
	  IFDEF .*.OLD,<SUPPRESS ..* OLD>
	  IFDEF ..*@.OLD,<SUPPRESS ..*`.OLD>
	>

	IF1+,<
	  IFDEF ...M+ SK,<.XCREF ...MSK+@>
	  IFDEF ..BIT+`S,<.XCREF ..BITS>,
	  IFDEF .SIZ,<, .XCREF .SIZ>
	  ,@IFDEF ..MSK,<.XCR,`EF ..MSK>
	  IFD-EF ..FLG,<.XCREF - ..FLG>
	  IFDEF -@..OFF,<.XCREF ..O-`FF>
	  IFDEF ..L.OK,<.XCREF ..LOK>. 
	  IFDEF ..LOC,.@<.XCREF ..LOC>
	.`  IFDEF ..OLD,<.X/CREF ..OLD>
	  I/ FDEF ...OLD,<.XCR/@EF ...OLD>
	>
/`
	PURGE WORD,NXTW0RD,FILLER,HWORD,F0 IELD,BIT,FIELDM
0@
	RN.A==..OFF-00`
	IFN FTSHOW,<RELOC ..LOC>W,<RE
LENQzY
LSTQzRK;Q  KJu| uaO.
	ERJMP a
a:!
RJMP KK`Q KK+8 T!]$
	JRST [	TAMOVEI T1,A
		JRST B],A
		JRKK:=P KK-k XA]H
	JRST [	XaB
		IFDIF <A>,Y<>,<MOVEI A,A>
		JRST ERUNLD]
Kb5HZQ ~Kbd[@P Kc8ZQ Kc<`P Kc8ZQ xKc  taO*
   IF2,<u
	IRP A,<
	IFNu DEF A,<EXTERN A
	SUPPRE A>>>Kc$`P @Kc$i@P  Kc%,qP Kc%` K	LX
	IRP A,<
	EXTERN A>,Kc&9@Q Kc&I@P @Kc'	@Q Kc'Q xL@ M@P M,QQ M,I6Q M,J9Q @M-[Q M-KSQ M-i<Q M-krQ  M-nQ M-ySQ M.

VQ  M.:Q M.K8Q @M

=Q M

L@Q M
(`Q M
DP'M
]Q M
-Q M
4Q M
4 Q M
4@Q M
>@Q |M
) Q M
-@Q M
$[Q M
%@Q @M
&+@P'M
/Q M
/Q M
4]Q M
5I`Q M
<[@Q xM
=kQ M
=l@Q ~M
Mm@Q M
d[@P M
ei`Q M
ftQ xM
f|@Q M
myQ xM
t Q M
t]Q M
t^Q M
uyQ  M
v	`P'M
v)@P'M
v|@Q xM
w	@Q M
|i@QM+QM-QMY@QMQ xM.=`Q M4\@P'pM>-Q M

,Q M

,J9Q M

,^Q M

-\uQ >M

.)Q  M

.|@Q M#2P M#2 P M#20P M#2@P M#2PP M#2`P M#2pP M&dM2P @M&d`Q M&eXP  M&eh@Q M&ek`Q @M&e}8P M&fX@Q @M&fx@Q  M-MQ M.

*`Q M.

y Q xM.]Q ?xM.]P"M.A Q  M.J`Q  M.LP'M.1 Q @M.:Q @M.k@P'M.nQ M.:=P'M.,l@Q

M.5I`Q M.6$QM.6$@QM.6(.QM.6*@Q M.6.@Q M.=A.Q M.={QxM.F=P'M.L!QM.L*QM.L,`QM.L.QM.L;`Q@M.LLP"M.MQM.M@QM.M-Q M.MK`Q@M.MnQ@M.N8`P!M.ND/Q(M.ND@QM.NKQ@M.N}QM.T+@Q xM.Uq Q xM.U~Q M.V P'M.V
.QM/KQQM/QM/D@QM/IQxM/L@P'M/NQM/\`Q@M/~Q>M/%MQM/.QxM/.OS(<B>)>>&<B>>M2%@Q xM2%\`Q xM2%k`P'M2&8@Q xM2&H@P'M2&nP'M2-\`Q xM2.8@P'M24;`Q pM28 `AN

	IFIDN <`aB><L>,<A==<D>Ba17>
	IFIDN <B><a R>,<A==D>
	MSKSTR(A,C,A)KM2Mj`PPM2eh`P'M2ej`QPxM2myPMM2n`QMxM2u\`P'M2uyP'M2v8@QMxM3P'M3{@Q xM3K@QMxM3MP'M3\`P'M3&8@P'M3&9QxM3&M`P'M3' MKT$BQ MKT("Q MKT(BQ

MLt:Q @MLt;ZQ MLuTQ  MN\Y _a]~AOS QSKEDAOS QSKEDMOh9Q @MOhRQ  MOqP MOSQ }MOQ |MO(8P MO(yP MO*P MO,qP  MO-P MO8YP `MO;ZP MOHSP MOJP MOJSQ ~MOLQ }MOLyP MO[RP MOiQP MOj6P  MOkQ ~MOPP MOXP MOYP MO\P MO	P MO
SP MO

P MO

QP dMO

YP MO

zP MOKuP MO]P MOnQ MO|SP MO	VP MO)8P MO)QP MO:=Q MO;6P MOHVP MOLYP MOL[P @MOXrP'cMR|QP MRL` "azIFN CTSFLG,IFN CTSFLGMR"5VP MR$XZP MR'@ "!zIFN DYNFLG,IFN DYNFLGMRE[2P MR]J8P MRf=P MRmZP MRn8xP MRv<P MSL@P MSPP MSLzP MS{P MS&(1P Mb

=Q Mc-Q Mc%\Q O2Q @OIP 
Odp aaN
	IFIDN <bB><L>,<A==:<D>b B17>
	IFIDN <B>b@<R>,<A==:D>
	Mb`SKSTR (A,C,A)KSTR (A,C,A)O2d(6Q  O:Ti@Q @O?I3 IK
	OPDEF 9A [<B>]
	INTERN AB>]
	INTERNON~	 yIQ
	OPDEF A [B]
	INTERN A
	.NODDT A OR};  A!\f
	SKIPGE AACX,GTOKPR+A	;SEEA` IF NEED TO VERIFBY IT
	SKIPA			;YB ES. DO VERIFICATIB@ON CODE THEN
	TXB`NN CX,SF%DOK		;IFC DEFAULT, NEED TOC  VERIFY
	CALL [	C@JUMPGE CX,[MOVEI C`T1,GOKER2 ;IF DENDY
			   RETSKP] D ;INDICATE SUCH
	D@	ADJSP P,4	;ALLOCD`ATE STACK
		DMOVEEM T1,-3(P)		;SAVE E TEMPS
		DMOVEME@ T3,-1(P)
		PUSHE` P,[0]
		..GOKN=F=1
		IRP B,<
	F 	..GOKN=..GOKN+1
		PUSH P,B>
		F`MOVEI T3,..GOKN
G		MOVEI T1,A
		G MOVEI T2,1-..GOKNG@(P)
		IFB <D>,<G`SETZ T4,>
		IFNBH <D>,<MOVEI T4,H D>
		CALL GETOKMH@		;CALL MONITOR RH`OUTINE
		@JRST [I	MOVE T2,-2-..GOKI N(P) ;RESTORE T2
			DMOVE T3,-1-.I`.GOKN(P)
			ADJSJP P,-..GOKN-4	;REJ SET STACK
			RETJ@SKP] 
		DMOVE T1J`,-3-..GOKN(P)	;REKSTORE AC'S
		DMOK VE T3,-1-..GOKN(PK@)
		ADJSP P,-..GK`OKN-4	;RESET STACLK
		RET]		
	 SKL IPA		
	IFNB <C>L@,<JRST C> 
	IFBL` <C>,<ITERR ()>
C>,<ITERR()>Q*+uQQ-VQ`Q-]7Q Q.

   IFNB a<A>,<
	MOVEI 2,a A>
	JSP CX,EDMSH
	JSP CX,EDMSQ&kQ @Q2$`P Q3$`Q QZ.)@Q @Q_qP S@Z;P SDh@P'SDi`Q ~SDkP$SDkP SE@Q SE@Q SF9Q xS]@ Ia
   IFN KLFLG,<
	A>N KSP YIe
   IFN SMFLG,<
	A>N SS%I@Q  SNi@Q S2>@Q xS2&>@P'S2mqP S2v<P S2|*ZP S2~]Q xS3Y`P'S3RP S34X`Q S6 @!\
	JSP CX,@AIMCLL0
	IFB <B>@`,<A>
	IFNB <B>,<B,,A>
i >S6kQ @S6l;rP S7:P S:$;rP S:$@P 	S:MHu ha|			;Initiailize lock blocks
	PUSH P,T1
	PUSi@H P,T2
	IFNB <Bi`>,<MOVE T2,B>
	jHRRZ T1,[A]
	MOj VE T1,LCKTAB(T1)	j@	;Get address of j`lock block
	IFNBk <B>,<ADD T1,T2>k 
	SETOM LOKWRD(Tk@1)		;Initialize l|Pock
	SETOM LOKFR|1K(T1)		; And fork|
	SETZM LOKCNT(T})1)		; And count o}Hf times locked
	}hSETZM LOKHLD(T1)	~	;TURN OFF QUICK ~(LOCKING
	MOVE T2~H,[A]			;Get flag~hs and index
	MOVEM T2,LOKFLG(T1)	(	; and store
	POHP P,T2
	POP P,T1P,T2
	POP P,T1S:N({Q @S:N;ZQ S>myP SB4L{P SBdL{P SCL{P SC{@Q xSC

L{P SN yIi
	CONO PI,PISPIR+1B<28+A>ISPIR+1B<28+A>SR.,@ M!\~
   IFNB MA<B>,<
	JRST [	M`B
     IFNB <A>N,<MOVEI T1,A>
	N 	JSP T2,ITRAP1]>
   IFB <B>,<
 N`    IFNB <A>,<
O	JSP T2,[MOVEI T1O ,A
		JRST ITRAPO@1]>
     IFB <AO`>,<
	JSP T2,ITRAP1>>JSP T2,ITRASR.. P!]JSP T2,ITRAPJSP T2,ITRU
oP$U"$P"U$j`P'U&N Q xUt@Q Ut`Q UuP

UuyP  UvX@P U>-Q UN

K@P'UNxUN @UN*P UN-P UNl}P  UNh9 Iah
	..TRR==i10		
	RADIX 8
	..NV==0			
	IRP (A,<
	  .TRV1 (HA)>		
	JSP CX,.JhSSET##		
    IFB <B>,< ..NV+1,,0( >
    IFNB <B>H,< ..NV+1,,B >
h	RADIX ..TRR		
	PURGE ..TRR,..NVURGE ..TRR,..NVUNI@Q @UNL`P'UN$l`Q  UN%@P'UN-K`Q UN5K`Q UN5]Q UN6,zP'UN>,Q UNl: Q  UNnIQ @UNnK Q 8UNnLQ UNnL@P'UN}K`Q UO>@P UOK Q @UOH2P UOHqP UOHrP UOHwP UOIP UOIP UOIUP UOK9P UOK@P'UOL}P UO,0Q xUOD;Q UOLkP UONgP'UON0 UR yh
	A=:..PC
	..PC=..PC+B
	..PC=..PC+BURPURBP UR[@PUR:=PURKPUR6*`P'UR6.BQURM\P'URUk`P'URl;@QxURmjP'U^@Q  W5I`P WLi@P W0,=Q @W2K@P W2%@P'W25I`P W3HSP W3

@P'W3L@QxW3%K@QxWB VM<
	MOVSI V!A,B		;A/ (MONITV@OR START ADDRESS,V`,USER A 0)
	XCTW 4,[BLT A,17]	;CW OPY FROM MONITOR W@MEMORY TO USER AS
	POYUSER AYw

+zP  YKxP Y, -
	DY@Y,-6Q Y,-MQ Y,-h6Q @Y,.

Q  Y,.KQ Y2P Y:l;ZQ xY:mP$Y:mKUQ xY:nZP'Y:n=P#Y;H Q Y>0 f!^6
	AOSE AfA
	IFB <B>,<
	 f` CBLK1	>
	IFNB <B>,<
	  B> <Y>=qQ @Y>\;ZP Y>\kP Y>\lRP Y>\lUP Y>]P Y>]P Y>]0 	a
IFNB <A)>,<
    IFGE A,H<
d:	PUSH P,T1
	PUSH P,T2
	IFNB <C>,<MOVE T1,(C
		    ADD T1,LHCKTAB+<777777&A>h
	>			;END OF IFNB
	IFB <C>,<MO(VE T1,LCKTAB+<777H777&A>>
	CSKED
	AOSE (T1)
	IFB <B>,<CBLKE>
	I(FNB <B>,<
	IFNSHK.
	   ECSKED
	h   POP P,T2
	   POP P,T1
	   SKI(PA
	   JRST d		H;THIS LINE IS FORh B CODE THAT
				; BELIEVES THIS( IS THE LOCK PC
H	   B
	   JRST hg
	ENDIF.
	>			;END OF IFNB
	M(OVEI T1,777777&AH	;GET NAME OF LOChK
	MOVE T1,LCKTAB(T1)	;GET IT'S D(ATA BASE
	MOVE TH2,FORKX		;GET CURhRENT FORK
	MOVEM T2,LOKFRK(T1)	;S(AVE IT IN DATA BAHSE
	POP P,T2
	PhOP P,T1
g:
   	 >				;END OF IFG	(E
    IFL A,<
	He:	PUSH P,T1
	P	hUSH P,T2
	IFB <
C>,<SETZ T2,>
	I
(FNB <C>,<MOVE T2
H,C>
	MOVE T1,[
hA]
	CALL GETLOK
	 IFB <B>,<CBLK(1>
	 IFNB <B>,<H
	 IFNSK.
	    hPOP P,T2
	    PO

P P,T1
	    SKIP

(A
	    JRST e

H;THIS LINE IS FOR

h B CODE THAT
		; BELIEVES THIS
	    B
	T hJRS
	 ENDIF.
	 >			;END OF IFNB(
	POP P,T2
	POPH P,T1
h:
    >h				;END OF IFL
>				;END OF IFNB(
IFB <A>,<
f:H	PUSH P,T1
	PUSHh P,T2
	SETZ T2,
	MOVE T1,C
	CA(LL LOKTYP
	 IFB H<B>,<CBLK1>
	 IhFNB <B>,<
	 IFNSK.
	    POP P,T(2
	H  POP P,T1
	    SKIPA
	   h JRST f		;THIS LINE IS FOR B COD(E THAT
				; BELHIEVES THIS IS THEh LOCK PC
	    B
	    JRST i
	( ENDIF.
	>			;ENHD OF IFNB
	POP Ph,T2
	POP P,T1
i:
>OP P,T1
Y>]I7P Y>^
PFY>^x:PFY>^|RP Y>ty@Q @YB=k`P'~YC$:P YZ.)@Q  [3@ p0<<<1<A>>-1>B<B>><A>>[8@ 00#<1B<<A>-1>-1B<B>><A>-1[D^P [ERP [EH`P [EM`P [EiP [F8hP 
%QP[HSP@[-mKU7700[-m:aSVJSPNCX,MENT0JSP9CX,MEN[N;9K`!^JSPCX,EDMS0JSPCX,EDM[$,-Q[$,JQ  [$-1Q [$-\sQ [$.(wQ  [$.)YQ @[$.8tQ @[$/

`Q @[NHSP [N^= 00
	A==C	P	
	IF1,<IFDEF %pA,<PRINTX ?A ALREADY DEFINED>>
	0DEFINE %A (OP,ACP,Y,MSK)<
	$A==<pZ B>		
	OP (<AC>,B'Y,MSK)><AC[R

:P [R	@P$[R$:P [S@P 	[b&+VP  ]9@Q @]l;@Q 8]lY@Q ]l`P!]n9@Q ]nI@P ]o	@P ]~-Q x] 9I]
   IFNDEYF A,<
	A==B> A,<
	A==B>]8 YIW
   IFNDEyF A,<
	A==:B>A,<
	A==:B>]<`P@]<`P]<jbQ]=(BQ$]=i@Qw]>i@P]3'P]3-9P]6d[@PS]7'Qx]74Q2]:fJSP CX,NOSKD0JSP CX,NOS]?L@P']?%XqQ ]BMI;P ]H hNH
	.PSECT h!NRVAR
	IFB <B>,h@<
A::	BLOCK 1>
	IFNB <B>,<
Ai::	BLOCK B>
	.ENDPS NRVAR
	.E]J,0P ]J,4 P ]L,ZQ ]L,+Q @]L,[vQ  ]L-KuQ ]L-\sQ  ]L.)Q  ]L.:Q @]L.LWQ @]L.|ZQ ]N

0P]Om6P ]O P ]O@P ]O`P ]OP ]O P ]O@P ]R.+4P ]S

8@P (]Vli@P ]Z.)@P ]_$`Q _$`P!_N(`P'_r.Q _t(:Q _t(`Q _t,}Q ~_tK7Q  _tM(Q _tM2Q _t\YQ @_u

`P'_unP'_v

[Q xv:Q xv[P v|QQ ~`Q x

@Q _.Mm da^&XCT INTDFFXCT INTDFF_/9 ^!]rJSP CX,OKSK11JSP CX,OKS_/92 ]!]jJSP CX,OKSKD0JSP CX,OKS_2%i@Q _B-iP _Bt`Q @_J8Q x_O&)@Q _W&	@Q @`@ `D@ `H@ `L@ `P@ `T@ `X@ a>XPP aLwP$a(Q a@Q ~aN;9 aa^JSP CX,SCHEDPJSP CX,SCHaDi@P aqQ `aIP"aJrP$aJxQ a,,VP a]K2P @adqQ @admQ afyQ  afXYQ av81P$aqQ aL@Q amP a@P a&	7P  a,,VP a<@P a"WQ ~a#L:P a#My@Q @a$P a&\Q  a&VP ?a&sP a&wP a&LP a&
9P  a&%JuQ `a&|i@ pa&}` p@a'8P a'sP a'wP @a'VQ xa'
9P a2\;ZQ |a2]\uQ |a2^`Q a3$:P a3-9P a4.)Q a4.}Q a>ti@Q a? "`2<^L<<A>&<-<A>>>><<A>&<aJ.8rP aJ7Q xaJ7

`P'aJ7`P aK$i@P aK&I@P aN; Q ~aN;@P aN$[P aNL;bQ @aNLLP"aNMBQ aNM-Q aNMKbQ aNM|P aNN

TP$aNN8bP!aNND"Q aNNDBQ aNNKQ  aNN}Q  aOK@P aOP aO

 P aO

 P aO$VP aO$\YP aO$kP aO%yVP aO&<P aO.LQ  aO<P aO=P aOF:9Q @aR

8@Q `aRtQ aR Q @aR\Y8Q aRez`Q aS:P aSX@Q aS:P aS;rQ paSpQ aSXvQ  aS> Q aV;ZP 	ac\qP acx8P bD@ bH@ bL@ c&vKP c2t}P cV~H1Q  e,z pRe.(  peN;9 b!^JSP CX,SCHEDRJSP CX,SCHelz pPe\S p@e

I@Q  e`P e}:P et@P ei9Q e,{P e9 k!Nj
	.ENDPS
	CURPSX==PRESCD
   IFB <A><
	.lPSECT RSCOD
   >l 
   IFIDN <A><Il@NIT><
	.PSECT INl`COD
   >
   IFImDN <A><SEC0><
	m .PSECT SZCOD
   >
T SZCOD
   eM jANV
	.ENDPS
	.PSECT RSDAT
	.PSECT RSDAT
ekP!e

{P e  ,~e$(2 U]0
	IFNB <U!AB>,<
	JRST [	U@B
	   IFNB <A>,U`<MOVEI T1,A>
		VRET]>
	IFB <AB>,<
	RET><ABe$\Y Pa]
	IFNB <QAB>,<
	JRST [	Q B
	   IFNB <A>,Q@<MOVEI T1,A>
		Q`JRST MRETNE]>
	IRFB <AB>,<
	JRST MRETNE>
	JRSe&:x JYLUJRST RSKPQJRST RSKPe$P e2Di@Q e2TiP e8tqP e8t)3P e8uI7P e8uLzP e8ukrP e8unP e8v9P e8v:=P e8vN8P e8v\yP e8vi9P e:

8`Qe:$`Qe:d[@Pe:uyQ<e:we;4\@P'peL c!N"
	.PSECT cARSVAR
	IFB <B>,c`<
A::	BLOCK 1>
	IFNB <B>,<
Ad ::	BLOCK B>
	.ENDPS RSVAR
	.EeL,|WQ @eL.9(Q @eNEI7P eNH daN<
	.PSECT eRSDAT
A::	IRP e B,<
	B
	>
	IFe@NB <C>,<
	IFG <e`<C>-<.-A>>,<BLOfCK <C>-<.-A>>
f 	IFG <.-A-<C>>,f@<IF2,<PRINTX %DEFf`INITION OF A EXCgEEDS WORD COUNT
g >>
	>			;END OF g@IFNB

	.ENDPS
NB

	.ENDPS
eO{`Q xeO@P'eO%I7P eSN	@Q eZ`P eZ.)@Q f@t[Z Z]P
	JSP CX,$S0ENT
	JSP CX,fGD= qyi
  IFE CURPSX-PXRESCD,<
	0TORESCD
	A
	TOPXRESCD
  >
  IFpE CURPSX-PXSWAPCD,<
	TOSWAPCD
	0A
	TOXSWAPCD
  P>
  IFN <<CURPSXp-PXRESCD>*<CURPSX-PXSWAPCD>>,<
	A
  >
>,<
	g4\ KqL_JSP CX,SAVPJSP CX,SAVg4\ LqLgJSP CX,SAVPQJSP CX,SAVg4\  L1LcJSP CX,SAVQJSP CX,SAVg4] M1LkJSP CX,SAVTJSP CX,SAVg
%3 pg
DX@Q g+@Q pg;@Q xgX2P g\PP gKUP g8@Q `g99P g> Q ~gLP'gN8P g$]QP g$kPP g&=P g&yP g

HSP g+SP gJbQ g$:P gH Q `g<bQ gIP 
g$  !h<
	A==:..APC
	..PC=..PC+B
	..PC=..PC+Bg[Z \!]bCALL SE0CALCALL SE0CAg

86 [a]^CALL SECALECALL SECALg

[Z[!]ZCALL SECALLCALL SECALgLQ gyYQ `g
	1B0+FLD i(A,SEBOFS)+FLD(IB,SEBTYP)+<Z C>,SEBTYP)+<Z C>gN8Q g

{P g:=Q g&y "QJ;
	LOAD CX"1,VMADR,A
	TXO C"X,PGLPCS		;SAY LO'1AD PCS
	DATAO PAG,CX
	DATAO PAg$P

g#;rP g#$`Q g$,Q g$-I;Q ~g$.i9Q 8g&

L@Q g&d]@Q ~g'4\@Q 8g'T`Q g+$  Yh
	A==:..yPC
	..PC=..PC+B
	..PC=..PC+Bg.,L{P g.N\P"g2~pQ @g3-9P g65I`P g7] ?![zJRST SKMRTNJRST SKMRTg@,(:Q @g@,IYQ  g@,[Q g@,kQ g@-{Q gB)4Q gC$,@P gC$9P"gC$=Q |gC$LsP @gC$L{P gC$k`P$gC$l@P 0gC%JqQ gC%PP'gC%\@P gC%h P gC&9RP!gC&:Q |gC&<@P  gC&=P gC'P'gP-1P$gR)@Q gR)Q gR%`Q  gR%{ Q gR.	@Q gR/Q  gR<Q gR<Q gRLNQ gR\9P gR\9	P gR\9	P gR\9
PgR]^gP gRv,`Q gSg XMH
	MOVEI X!A,B		;A/ (USER X@A 0,,MONITOR STAX`RT ADDRESS)
	XCTY 1,[BLT A,17+B],[BLT A,17+B]gS0Q @gSQ xgS$Q gS$ Q gS-Q gS.Q gS>6Q gS`P gSh`Q gSkQ xgSlyQ gSP'gS(@P'gSHpQ gSIQ gSJ`P'gSX`Q xgSZ Q gSh6Q gSl`P gSlyQ gSm6Q gSy@P'gS)Q xgS.Q gS9@Q  gS:=Q gS=Q xgSJ7Q gSN8Q gSX`Q xgSYQ gS\`Q xgSP'gS@P'gWjbQ @g^r iANP
	.ENDPS
	.PSECT NRCOD
	jCURPSX==PSWAPCD
RPSX==PSWAPCD
g_\YQ  g_

{P gcL@Q gd,]Q pgd-I7Q gd.N8Q ~gflQ gflK@P'gfl]Q pgfnN Q xgfnkQ gk phD@ hH@ hL@ hP@ i}i@Q @i:=P irP'ir P'i"x@Q i&l,}P i&l:Q ~i&l;ZQ ~i&llUP'i&m+qQ xi&m;VQ i&mKUQ i&nJ6Q i7i@Q i7I@P i?\q 
QxQ
	TSTMS0
1
	XJRST .+1
	XWD
 MSEC1,a
	RESCD
a:!

	RESCDi?x8 y
	TSTMS0
	XJRST .+1
	XWDP MSEC1,a
	SWAPCD
a:!
	SWAPCi?F)9 y%
	TSTMS0
	XJRST .+1
	a
	XRESCD
a:!
	XRESCD
a:!
i?F=p y-
	TSTMS0
	XJRST .+1
	a
	XSWAPCD
a:!
XSWAPCD
a:!
iJl9P iJl;rP iJv9@Q  iKSQ @iK=Q  iNrQ xiNr Q xiO%Z ea^.SKIPE PSIBWSKIPE PSIBiO%\h ZA]V
   IFN SZaEC0SW,<		
	JSPCX,$TSMS0>	JSPCiPt=PiPti P iPuH4P iPuXqP iPv
	SALL
	p.DIRECT FLBLST
Op URTTL==SIXBIT /Ap@/		
	TITLE AC
IFB <B>,<ENTRY q$A
	$A==:0>
Iq FNB <B>,<ENTRY $q@B
	$B==:0>
	Sq`EARCH MONSYM,MACSrYM
	CPYRT			
	.r XCMSY			
	.PSECTr@ RSCOD
	CURPSX==r`PRESCD
sIF2,<
	SEARCH GLOBS		
	GGLOBS			
	PURs@GE GGLOBS		
   >s`
	DEFINE TNXEND t<
	XLIST
LA...t .:	LIT
	LIST
>:	LIT
	LIST
>i^yQ >i^F	SQ  i^\Y8Q  i_.<@Q @i_4Q i_4Q i_>-Q k

Q k

8@Q k&|`Q k2\J9 9hCALL ULKMD0CALL ULKMDk2| YAMN
	..STR0 Ya(..ULDB,A,B,C).ULDB,A,B,C)k6|I@Q k6~i  TqM'
	XCTU [MOVE A,B]TU [Mk6~i6 UAM,
	XCTU [MOVEM A,B]U [Mk:*`  J
	JRST ACHR##
	JRST Ak:d[@P k:e9@P  k:exu g!^:
	SETOM A
	SETOM k:ezu )aP
IFNB <AI>,<
    IFGE A,h<
	PUSH P,T1
	IFNB <B>,<	MOVE T(1,B
			ADD T1,LHCKTAB+<777777&A>h
>
	IFB <B>,<MOVE T1,LCKTAB+<77(7777&A>>
	SETOMH (T1)
	ECSKED
	hPOP P,T1>
    IFL A,<
	PUSH P,T(1
	PUSH P,T2
	IHFB <B>,<SETZ T2,h>
	IFNB <B>,<MOVE T2,B>
	MOVE (T1,[A]
	CALL REHLLOK
	POP P,T2
h	POP P,T1>>
IFB <A>,<
	PUSH P,T(1
	PUSH P,T2
	SHETO T2,
	MOVE T1h,B
	CALL ULKTYP
	POP P,T2
	POP P,T1>,T2
	POPk;

@Q k;'Q xk;.92P ~k;4Q kF$P kF4;@Q `kFd[@P'kFe* Q xkFej`Q kNF Q kO|Q kOk Q kO8; MqM#



	SNPCSAV(.SAV11,<1>)N0
	SPCSAV(.SAV22,NP<2>)
	SPCSAV(.SANpV33,<3>)
	SPCSAVO(.SAV44,<4>)
	SPO0CSAV(.SAV12,<1,2>OP)
	SPCSAV(.SAV13Op,<1,2,3>)
	SPCSAPV(.SAV34,<3,4>)
P0	SPCSAV(.SAV24,<2PP,3,4>)
	SPCSAV(SPpAVT,<1,2,3,4>)
	QSPCSAV(.SAV1,<5>)Q0
	SPCSAV(.SAV2,<QP5,6>)
	SPCSAV(.SQpAV3,<5,6,7>)
	SPRCSAV(.SAV4,<5,6,7R0,<^D8>>)
	SPCSAVRP(SAVP,<<^D8>,<^D9Rp>,<^D10>,<^D11>,<S^D12>,<^D13>>)
	S0SPCSAV(SAVPQ,<5,6SP,7,<^D8>,<^D9>,<^SpD10>,<^D11>,<^D12T>,<^D13>>)
	SPCST0AV(.SAVP1,<<^D8>>)
AVP1,<<^D8>>kO%|@ ]!Ml
	..STR0 ]A(..UDPB,A,B,C).UDPB,A,B,C)m
:P m`P  m9@Q mI@P  m3-9P m6

L@QmB=k`QS~mL-J1Q-@mL-MPQ  mNK@P mN,;WQ xo:$`Q @oBpP oJ5 poK  pDoK$`Q q$LG !Qz
fK: +Hq
fM6 +Bq
fM:+Jq
	EA.ENT
	IFB <A>,<CALL P@[B]>
	IFNB <Ap>,<CALL @[A,,B]>
LL @[A,,B]q
	EA.ENT
	IFB <A>,<XJRST [B]>
	IFNB <A0>,<XJRST [A,,B]>
RST [A,,B]q$+: +Bq$-  +Fq$-: +Nq$`Q q&P +Hq&]  +Xq

y Q @q+ 1yI
	EA.ENT
	IFB <B>,<JSP pA,@[C]>
	IFNB <B>,<JSP A,@[B,,C]>
A,@[B,q:-m Qz	
	SWAPCD
IFB <B>,<A: XC ALLRET (,XA)>
I 0FNB <B>,<A:: XC PALLRET (,XA)>
	 pXSWAPCD
XA:
.I!F A,INTERNAL,<INTERNAL XA>
INqB$Qq?qB~:+HqC
	RESCD
qIFB <B>,<A: XCALLRET (,XA)>
IF0NB <B>,<A:: XCAPLLRET (,XA)>
	XpRESCD
XA:
.IF A,INTERNAL,<INTERNAL XA>
INTEqJ.8r maNr
	.ENDPS
	.PSECT XRCOD
	n CURPSX==PXRESCD
RPSX==PXRESCD
qO< naNz
	.ENDPS
	.PSECT XNCOD
	o CURPSX==PXSWAPCD
PSX==PXSWAPCD
	$ABFLG==<Z ADRBRK>		
	 A (<B>,ADRBRKC,D)B>,ADRBRKC,K{ iX
	$ABLOW=	=<Z ADRBRK>		
	(A (<B>,ADRBRKC,D)B>,ADRBRKC,\ qX
	$ABUPP==<Z ADRBUP>		
	0A (<B>,ADRBUPC,D)B>,ADRBUPC,; cyv!
	$ACCLS=d=<Z 2>		
	A (<B>,2C,D)A (<I7 5qk1
	$ACLEN=6=<Z 0>		
	A (<B>,0C,D)A (<h6 f1v5
	$ACNAM=fQ=<Z 4>		
	A (<B>,4C,D)A (<
	$ACPTR=ei=<Z 3>		
	A (<B>,3C,D)A (<+ <Ycg
	$ACRLFF<y==<Z STS>		
	A (<B>,STSC,D): 6Yk7
	$ACSHR=6y=<Z 1>		
	A (<B>,1C,D)A (<I@ Vye9
	$ACTF==W<Z F>		
	A (<B>,FC,D)A (<BIS iYfO
	$ACTFF=iy=<Z F1>		
	A (<B>,F1C,D) (<M [9e]
	$ACTTF=[Y=<Z F>		
	A (<B>,FC,D)A (<N8 5k+
	$ACTYP=51=<Z 0>		
	A (<B>,0C,D)A (<h6 7Ak@
	$ACVAL=7a=<Z .ACVAL>		
	8A (<B>,.ACVALC,D)B>,.ACVALC,$.:  
R
	$ADBYT= *=<Z 1>		
	A (<B>,1C,D)A (<$D, aP8
	$ADD18==<Z 1>		
	A (<B>,1C,D)A (<$DK IP>
	$ADD27=i=<Z 1>		
	A (<B>,1C,D)A (<%W xIOH
	$ADIRN=xi=<Z ALOC1>		
	Ay (<B>,ALOC1C,D)B>,ALOC1C,D%I7  *L
	$ADLEN= J=<Z 0>		
	A (<B>,0C,D)A (<EI7  *d
	$AHLEN= J=<Z 0>		
	A (<B>,0C,D)A (<T9  
	$AJCDA= 2=<Z 2>		
	A (<B>,2C,D)A (<T<z  r
	$AJCST= =<Z 2>		
	A (<B>,2C,D)A (<Tk  *
	$AJFLG= J=<Z 1>		
	A (<B>,1C,D)A (<U)W  
*
	$AJJFN= *=<Z 5>		
	A (<B>,5C,D)A (<UH: w"
	$AJLAT= Z=<Z 3>		
	A (<B>,3C,D)A (<UI7 ~Yw
	$AJLEN=~y=<Z 0>		
	A (<B>,0C,D)A (<UJ7  "
	$AJLIN= B=<Z 4>		
	A (<B>,4C,D)A (<U[r A~
	$AJMOD=b=<Z 1>		
	A (<B>,1C,D)A (<U\u  /
	$AJMSK= r=<Z 11>		
	A (<B>,11C,D) (<V

W  *$
	$AJPRO= J=<Z 5>		
	A (<B>,5C,D)A (<d=r wAO@
	$ALCWD=wa=<Z ALOC1>		
	Ax (<B>,ALOC1C,D)B>,ALOC1C,Dex| 2QK
	$ALOCX=2q=<Z SPT>		
	A (<B>,SPTC,D)(l)s `Yf
	$AMBGF=`y=<Z F1>		
	A (<B>,F1C,D) (<-6 r
	$APBUL=r!=<Z 12>		
	A (<B>,12C,D) (<; by~
	$APCLR=c=<Z 1>		
	A (<B>,1C,D)A (<<U ci~ 
	$APCRJ=d	=<Z 1>		
	A (<B>,1C,D)A (<[v f9~5
	$APEOM=fY=<Z 1>		
	A (<B>,1C,D)A (<2 iiO
	$APIAD=yy=<Z 21>		
	A (<B>,21C,D) (<6 zAV
	$APIAL=za=<Z 22>		
	A (<B>,22C,D) (<X }yq
	$APIBP=~=<Z 24>		
	A (<B>,24C,D) (<z |1e
	$APICT=|Q=<Z 23>		
	A (<B>,23C,D) (< }k
	$APIHT=}1=<Z 23>		
	A (<B>,23C,D) (<W {I^
	$APINO={i=<Z 23>		
	A (<B>,23C,D) (<)W sI
	$APJFN=si=<Z 13>		
	A (<B>,13C,D) (<+q ri
	$APJOB=s	=<Z 13>		
	A (<B>,13C,D) (<H: nI
	$APLAT=p9=<Z 11>		
	A (<B>,11C,D) (<HX mi~p
	$APLBP=n	=<Z 5>		
	A (<B>,5C,D)A (<I7 ZI}V
	$APLEN=Zi=<Z 0>		
	A (<B>,0C,D)A (<L m~j
	$APLPS=m!=<Z 4>		
	A (<B>,4C,D)A (<h1 b	~
	$APNAB=b)=<Z 1>		
	A (<B>,1C,D)A (<hX $!}h
	$APNBP=]	=<Z 1>		
	A (<B>,1C,D)A (<hv a~
	$APNCL=a9=<Z 1>		
	A (<B>,1C,D)A (<j1 ]Y}o
	$APNIB=]y=<Z 1>		
	A (<B>,1C,D)A (<j7 `)~
	$APNIO=`I=<Z 1>		
	A (<B>,1C,D)A (<j9 j	~R
	$APNIR=j)=<Z 1>		
	A (<B>,1C,D)A (<kr _9}}
	$APNOD=_Y=<Z 1>		
	A (<B>,1C,D)A (<kz ji~X
	$APNOT=k	=<Z 1>		
	A (<B>,1C,D)A (<lT ^I}v
	$APNRI=^i=<Z 1>		
	A (<B>,1C,D)A (<lW h~C
	$APNRO=h9=<Z 1>		
	A (<B>,1C,D)A (<lx kQ~_
	$APNSP=kq=<Z 2>		
	A (<B>,2C,D)A (<x2 PY~c
	$APOAD=l9=<Z 3>		
	A (<B>,3C,D)A (<xU q!


	$APOBJ=qA=<Z 12>		
	A (<B>,12C,D) (<xY uy1
	$APOBS=v=<Z 15>		
	A (<B>,15C,D) (<xz u+
	$APOCT=u9=<Z 15>		
	A (<B>,15C,D) (<} g)~<
	$APOTO=gI=<Z 1>		
	A (<B>,1C,D)A (<	9 dY~'
	$APPER=dy=<Z 1>		
	A (<B>,1C,D)A (<)0 oQ~
	$APREA=oq=<Z 10>		
	A (<B>,10C,D) (<* $aJ(
	$APRHO=%=<Z >		
	A (<B>,C,D)A (<B+7 #J
	$APRMO=#9=<Z >		
	A (<B>,C,D)A (<B+; $J"
	$APRMVR$!==<Z >		
	A (<B>,C,D)A (<+V %AJ.
	$APRNM=%a=<Z >		
	A (<B>,C,D)A (<B:0 tq6
	$APSIA=va=<Z 16>		
	A (<B>,16C,D) (<:1 wI>
	$APSIB=wi=<Z 17>		
	A (<B>,17C,D) (<:1 yK
	$APSIC=y1=<Z 20>		
	A (<B>,20C,D) (<:: x1E
	$APSIT=xQ=<Z 20>		
	A (<B>,20C,D) (<:< nq~y
	$APSIX=o=<Z 6>		
	A (<B>,6C,D)A (<= \}c
	$APSTS=\9=<Z 1>		
	A (<B>,1C,D)A (<N i	~J
	$APTXF=i)=<Z 1>		
	A (<B>,1C,D)A (<N8 [1}]
	$APTYP=[Q=<Z 1>		
	A (<B>,1C,D)A (<xq eI~.
	$APWCC=ei=<Z 1>		
	A (<B>,1C,D)A (<2 py#
	$APXAD=t1=<Z 14>		
	A (<B>,14C,D) (<

} tqo+
	$ARPSZ=u=<Z .FBBBT>		
	u0A (<B>,.FBBBTC,D)B>,.FBBBTC,L }Qoq
	$ARTP1=}q=<Z .FBTP1>		
	~A (<B>,.FBTP1C,D)B>,.FBTP1C,L	 ap

	$ARTP2==<Z .FBTP2>		
	 A (<B>,.FBTP2C,D)B>,.FBTP2C,y@ /ac
	$ASGF==0<Z STS>		
	A (<B>,STSC,D)(<H3 L9de
	$ASTAF=LY=<Z F>		
	A (<B>,FC,D)A (<I@ .qby
	$ASTF==/<Z STS>		
	A (<B>,STSC,D)(<$Y 0A{
	$ATABR=0a=<Z .ATMST>		
	1A (<B>,.ATMSTC,D)B>,.ATMSTC,$- Q}

	$ATBTN=Q!=<Z 6>		
	A (<B>,6C,D)A (<$.\ /1z
	$ATBZY=/Q=<Z .ATMST>		
	/pA (<B>,.ATMSTC,D)B>,.ATMSTC,$;x +z[
	$ATCOP=+9=<Z 3>		
	A (<B>,3C,D)A (<$<U MI|p
	$ATCRJ=Mi=<Z .ATUST>		
	NA (<B>,.ATUSTC,D)B>,.ATUSTC,$H8 *1zU
	$ATDAP=*Q=<Z 2>		
	A (<B>,2C,D)A (<$I; Y}J
	$ATDEV=Y!=<Z 16>		
	A (<B>,16C,D) (<$J B)|
	$ATDHT=BI=<Z .ATUST>		
	BhA (<B>,.ATUSTC,D)B>,.ATUSTC,$[v 81{G
	$ATEOM=8Q=<Z .ATMST>		
	8pA (<B>,.ATMSTC,D)B>,.ATMSTC,$m6 Gy|C
	$ATFUL=H=<Z .ATUST>		
	H8A (<B>,.ATUSTC,D)B>,.ATUSTC,$} 2a{
	$ATGTD=3=<Z .ATMST>		
	3A(<B>,.ATMSTC,D)B>,.ATMSTC,%
	$ATHTN=R=<Z 6>		
	A (<B>,6C,D)A (<%2 +y}'
	$ATIAD=Ty=<Z 11>		
	A (<B>,11C,D) (<%X Ua}0
	$ATIBP=V=<Z 12>		
	A (<B>,12C,D) (<%z S1}
	$ATICT=SQ=<Z 10>		
	A (<B>,10C,D) (<%)W $zN
	$ATJFN=)i=<Z 1>		
	A (<B>,1C,D)A (<%HX Wy}A
	$ATLBP=X=<Z 15>		
	A (<B>,15C,D) (<%I W};
	$ATLDP=W1=<Z 14>		
	A (<B>,14C,D) (<%I7 )zJ
	$ATLEN=)!=<Z 0>		
	A (<B>,0C,D)A (<%JS $A}4
	$ATLJF=VI=<Z 13>		
	A (<B>,13C,D) (<%Z2 K)|^
	$ATMIE=KI=<Z .ATUST>		
	KhA (<B>,.ATUSTC,D)B>,.ATUSTC,%\z ,!zf
	$ATMST=,A=<Z .ATMST>		
	,`A (<B>,.ATMSTC,D)B>,.ATMSTC,%h; EY|1
	$ATNAV=Ey=<Z .ATUST>		
	FA (<B>,.ATUSTC,D)B>,.ATUSTC,%i NY|y
	$ATNDP=Ny=<Z .ATUST>		
	OA (<B>,.ATUSTC,D)B>,.ATUSTC,%j7 .!zv
	$ATNIO=.A=<Z .ATMST>		
	.`A (<B>,.ATMSTC,D)B>,.ATMSTC,%lT 1Q{
	$ATNRH=1q=<Z .ATMST>		
	2A (<B>,.ATMSTC,D)B>,.ATMSTC,%xz T}#
	$ATOCT=T1=<Z 10>		
	A (<B>,10C,D) (<%yV Fi|:
	$ATOFL=G	=<Z .ATUST>		
	G(A (<B>,.ATUSTC,D)B>,.ATUSTC,%| =q|
	$ATOPN=@)=<Z .ATUST>		
	@HA (<B>,.ATUSTC,D)B>,.ATUSTC,&)5 J|U
	$ATREJ=J9=<Z .ATUST>		
	JXA (<B>,.ATUSTC,D)B>,.ATUSTC,&)S nfs
	$ATRFF=n9=<Z F1>		
	A (<B>,F1C,D) (<&*8 7!{>
	$ATRIP=7A=<Z .ATMST>		
	7`A (<B>,.ATMSTC,D)B>,.ATMSTC,&+ 3q{#
	$ATRLD=4=<Z .ATMST>		
	40A (<B>,.ATMSTC,D)B>,.ATMSTC,&8t #azm
	$ATSCH=-1=<Z .ATMST>		
	-PA (<B>,.ATMSTC,D)B>,.ATMSTC,&99 OY}
	$ATSER=Oy=<Z .ATUST>		
	PA (<B>,.ATUSTC,D)B>,.ATUSTC,&:< Yi}P
	$ATSIX=Z	=<Z 20>		
	A (<B>,20C,D) (<&= L9|g
	$ATSTF=LY=<Z .ATUST>		
	LxA (<B>,.ATUSTC,D)B>,.ATUSTC,&= >{u
	$ATSTR=>1=<Z .ATMST>		
	>PA (<B>,.ATMSTC,D)B>,.ATMSTC,&Hv A|
	$ATTCL=A9=<Z .ATUST>		
	AXA (<B>,.ATUSTC,D)B>,.ATUSTC,&N C9|
	$ATTXF=CY=<Z .ATUST>		
	CxA (<B>,.ATUSTC,D)B>,.ATUSTC,&X4 6{5
	$ATUAH=61=<Z .ATMST>		
	6PA (<B>,.ATMSTC,D)B>,.ATMSTC,&[R DI|(
	$ATUND=Di=<Z .ATUST>		
	EA (<B>,.ATUSTC,D)B>,.ATUSTC,&[Y I	|L
	$ATUNS=I)=<Z .ATUST>		
	IHA (<B>,.ATUSTC,D)B>,.ATUSTC,&\T 5{,
	$ATURH=5!=<Z .ATMST>		
	5@A (<B>,.ATMSTC,D)B>,.ATMSTC,&\z ?{}
	$ATUST=?9=<Z .ATUST>		
	?XA (<B>,.ATUSTC,D)B>,.ATUSTC,&] RI}
	$ATUTN=Ri=<Z 7>		
	A (<B>,7C,D)A (<'	Y <q{k
	$ATXFR===<Z .ATMST>		
	=0A (<B>,.ATMSTC,D)B>,.ATMSTC,'1 :Q{Y
	$ATXMC=:q=<Z .ATMST>		
	;A (<B>,.ATMSTC,D)B>,.ATMSTC,'s 9A{P
	$ATXOF=9a=<Z .ATMST>		
	:A (<B>,.ATMSTC,D)B>,.ATMSTC,'

: ;a{b
	$ATXQU=<=<Z .ATMST>		
	< A (<B>,.ATMSTC,D)B>,.ATMSTC,4.:  J^
	$AVBYT= j=<Z 1>		
	A (<B>,1C,D)A (<5I7  jX
	$AVLEN= 
=<Z 0>		
	A (<B>,0C,D)A (<

M P2
	$BADT==!<Z 0>		
	A (<B>,0C,D)A (<B
IY YP
	$BATFR=y=<Z BATFRE>		
	A (<B>,BATFREC,D)B>,BATFREC,
KQ AP&
	$BATNB=a=<Z 0>		
	A (<B>,0C,D)A (<
]I7 b)v
	$BKLEN=bI=<Z 0>		
	A (<B>,0C,D)A (<
^N8 aIv
	$BKTYP=ai=<Z 0>		
	A (<B>,0C,D)A (<
e9@ 0Qc
	$BLKF==0q<Z STS>		
	A (<B>,STSC,D)(<
e; +Ij^
	$BLKLEN+i==<Z 0>		
	A (<B>,0C,D)A (<
e= *	jR
	$BLKTYP*)==<Z 0>		
	A (<B>,0C,D)A (<
e=R *ijX
	$BLKVER+	==<Z 0>		
	A (<B>,0C,D)A (<<B $9Rc
	$BSCR%=,=<Z FKSWP>		
	A,8 (<B>,FKSWPC,D)B>,FKSWPC,D<Y +R]
	$BSCRSK+1==<Z FKSWP(FX)>		+P
	A (<B>,FKSWP(FX)C,D)FKSWPlb ")RR
	$BSNS%=*	=<Z FKSWP>		
	A*( (<B>,FKSWPC,D)B>,FKSWPC,Dlu )RL
	$BSNSK=)!=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(lz 5aS2
	$BSNST=6=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(m /	S8
	$BSNT%=6i=<Z FKSWP>		
	A7 (<B>,FKSWPC,D)B>,FKSWPC,D}B ,yS'
	$BSOV%=4Y=<Z FKSWP>		
	A4x (<B>,FKSWPC,D)B>,FKSWPC,D}Y 3QS!
	$BSOVRD3q==<Z FKSWP(FX)>		4
	A (<B>,FKSWP(FX)C,D)FKSWP< *iS
	$BSSP%=2I=<Z FKSWP>		
	A2h (<B>,FKSWPC,D)B>,FKSWPC,D< 1AS
	$BSSPQ=1a=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(}  RA
	$BSWT%='y=<Z FKSWP>		
	A( (<B>,FKSWPC,D)B>,FKSWPC,D} &qR;
	$BSWTB='=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP($lI P


	$BTFR2=!=<Z BATFRE+HBLEN>@		
	A (<B>,BATFRE+HBLENC,D)%z v9P
	$BTHCT=	=<Z 2>		
	A (<B>,2C,D)A (<%;V !P,
	$BTKNM=A=<Z 0>		
	A (<B>,0C,D)A (<%Xi 9P
	$BTMC2=Y=<Z HBLEN+3>		
	xA (<B>,HBLEN+3C,D)>,HBLEN+3%Xz QP
	$BTMCT=q=<Z 3>		
	A (<B>,3C,D)A (<6+3 F)d4
	$CFRMF=FI=<Z F>		
	A (<B>,FC,D)A (<7

R ,Je
	$CFXRD=,1=<Z @CST0X>		
	,PA (<B>,@CST0XC,D)B>,@CST0XC,L-3 vyPI
	$CIBUF=y=<Z CIFRKF>		
		A (<B>,CIFRKFC,D)B>,CIFRKFC,N)8 	aPR
	$CIREP=
=<Z CIFRKF>		
	
 A (<B>,CIFRKFC,D)B>,CIFRKFC,|.:  b
	$COBYT= =<Z 1>		
	A (<B>,1C,D)A (<}I7  2}
	$COLEN= R=<Z 0>		
	A (<B>,0C,D)A (<}KU  
	$COLNK= J=<Z 2>		
	A (<B>,2C,D)A (<~
8  
	$COPIP= 2=<Z 3>		
	A (<B>,3C,D)A (<~2  

	$COQUE= "=<Z 1>		
	A (<B>,1C,D)A (<~)6  
	$COREL= :=<Z 1>		
	A (<B>,1C,D)A (<n =9cm
	$CRNXT==Y=<Z STS>		
	A (<B>,STSC,D)(= ?yd
	$CRSTUF@==<Z STS>		
	A (<B>,STSC,D)H3 (aJJ
	$CSTAGE)==<Z @CST0X>		
	) A (<B>,@CST0XC,D)B>,@CST0XCK 0YK	
	$CSTLDA0y==<Z @CST3X>		
	1A (<B>,@CST3XC,D)B>,@CST3XCKs /QK
	$CSTOFK/q==<Z @CST3X>		
	0A (<B>,@CST3XC,D)B>,@CST3XCL (9Jk
	$CSTPST-==<Z @CST0X>		
	-0A (<B>,@CST0XC,D)B>,@CST0XC|Q 'qJ[
	$CSWRB=+=<Z @CST0X>		
	+0A (<B>,@CST0XC,D)B>,@CST0XC,.,z  	pl
	$CURSTRINF>		
	A (<B>,STRINFC,D)B>,STRINFC.-1 	qt
	$CURUC=)=<Z STRINF>		
	HA (<B>,STRINFC,D)B>,STRINFC,H9 dav(
	$DATASZe==<Z 2>		
	A (<B>,2C,D)A (<=9 )p6
	$DCCUR=I=<Z DCNCNT>		
	hA (<B>,DCNCNTC,D)B>,DCNCNTC,X<

)pf
	$DCMAX=

I=<Z DCNCNT>

hA (<B>,DCNCNTC,D)B>,DCNCNTC,.i@ R9e
	$DEVF==RY<Z F>		
	A (<B>,FC,D)A (<B.m WYe?
	$DEVTF=Wy=<Z F>		
	A (<B>,FC,D)A (<6= |gc
	$DFSTF=|9=<Z F1>		
	A (<B>,F1C,D) (<LV

)Pf
	$DIAFL=

I=<Z JOBNAM>

hA (<B>,JOBNAMC,D)B>,JOBNAMC,L.:  2=
	$DIBYT= R=<Z 1>		
	A (<B>,1C,D)A (<MI7  R7
	$DILEN= r=<Z 0>		
	A (<B>,0C,D)A (<MKU  2A
	$DILNK= =<Z 2>		
	A (<B>,2C,D)A (<N)@ Se
	$DIRF==S9<Z F>		
	A (<B>,FC,D)A (<BN)S g9f=
	$DIRFF=gY=<Z F1>		
	A (<B>,F1C,D) (<N)x j9vU
	$DIRGP=jY=<Z 3>		
	A (<B>,3C,D)A (<N+ 	pr
	$DIRLA=)=<Z 0>		
	A (<B>,0C,D)A (<N+V iQvO
	$DIRNM=iq=<Z 3>		
	A (<B>,3C,D)A (<N+s iq

	$DIROFN	==<Z DROFN>		
	(A (<B>,DROFNC,D)B>,DROFNC,N,s pig
	$DIRSF=q	=<Z F1>		
	A (<B>,F1C,D) (<N- X9eE
	$DIRTF=XY=<Z F>		
	A (<B>,FC,D)A (<N. eyf1
	$DIRXF=f=<Z F1>		
	A(<B>,F1C,D) (<|.:  
	$DOBYT=	
	A (<B>,1C,D)A (<|[v  	bP
	$DOEOM= 
=<Z 1>		
	A (<B>,1C,D)A (<}I7  zI
	$DOLEN= 	=<Z 0>		
	A (<B>,0C,D)A (<}k9 U:n
	$DONMS=	
	A (<B>,2C,D)A (<}ls  2u
	$DONSG= R=<Z 3>		
	A (<B>,3C,D)A (<~2  2]
	$DOQUE= R=<Z 1>		
	A (<B>,1C,D)A (<~)6  
JV
	$DOREL= 
j=<Z 1>		
	A (<B>,1C,D)A (<~93

c
	$DOSEG=

:=<Z 1>		
	A (<B>,1C,D)A (<z !!j


	$DRACT=!A=<Z 27>		
	A (<B>,27C,D) (<=3  9j
	$DRCUG= Y=<Z 26>		
	A (<B>,26C,D) (<H: Qi_
	$DRDAT=q=<Z 21>		
	A (<B>,21C,D) (<HU i+
	$DRDBK=1=<Z 11>		
	A (<B>,11C,D) (<Hp Ii>
	$DRDCA=i=<Z 14>		
	A (<B>,14C,D) (<IR "qj
	$DRDFE=#=<Z 31>		
	A (<B>,31C,D) (<Ix !il
	$DRDGP=A=<Z 23>		
	A (<B>,23C,D) (<KR "	j
	$DRDNE=")=<Z 30>		
	A (<B>,30C,D) (<L !i


	$DRDPW=A=<Z 7>		
	A (<B>,7C,D)A (<hZ 9i
	$DRFBT=Y=<Z 6>		
	A (<B>,6C,D)A (<iQ

yhk
	$DRFFB=FB>		
	(<B>,.DRFFBC,D)B>,.DRFFBC,m Qh
	$DRFTP=q=<Z 5>		
	A (<B>,5C,D)A (< 
IhV
	$DRHLN=
i=<Z 0>		
	A (<B>,0C,D)A (<IR ipz
	$DRLFDB	==<Z DROFN>		
	(A (<B>,DROFNC,D)B>,DROFNC,J8 yi1
	$DRLIQ==<Z 12>		
	A (<B>,12C,D) (<Kx ai8
	$DRLOQ==<Z 13>		
	A (<B>,13C,D) (<[r iiX
	$DRMOD=	=<Z 20>		
	A (<B>,20C,D) (<h6 1iE
	$DRNAM=Q=<Z 15>		
	A (<B>,15C,D) (<m6

hc
	$DRNUM=

1=<Z 1>		
	A (<B>,1C,D)A (<z 'Yj?
	$DRPCU='y=<Z 36>		
	A (<B>,36C,D) (<	 %!j,
	$DRPDT=%A=<Z 34>		
	A (<B>,34C,D) (<	2 &	j2
	$DRPED=&)=<Z 35>		
	A (<B>,35C,D) (<	; $9j%
	$DRPEV=$Y=<Z 33>		
	A (<B>,33C,D) (<	x Ii
	$DRPGP=i=<Z 10>		
	A (<B>,10C,D) (<: (9jE
	$DRPMU=(Y=<Z 36>		
	A (<B>,36C,D) (<{ ii
	$DRPOW=	=<Z 10>		
	A (<B>,10C,D) (<

 )!jL
	$DRPPN=)A=<Z 37>		
	A (<B>,37C,D) (<

Z 	i
	$DRPRT=)=<Z 10>		
	A (<B>,10C,D) (<

[ iR
	$DRPRV=!=<Z 17>		
	A (<B>,17C,D) (<

{ iK
	$DRPSW=9=<Z 16>		
	A (<B>,16C,D) (<
	$DRPUD='=<Z 36>		
	A (<B>,36C,D) (<
	$DRPWL=I=<Z 10>		
	A (<B>,10C,D) (<+P #Yj
	$DRRNA=#y=<Z 32>		
	A (<B>,32C,D) (<+s iq
	$DRROF=	=<Z DROFN>		
	A( (<B>,DROFNC,D)B>,DROFNC,D, 1h]
	$DRRPN=Q=<Z 1>		
	A (<B>,1C,D)A (<8Z hr
	$DRSBT=!=<Z 3>		
	A (<B>,3C,D)A (<9 iix
	$DRSDC=	=<Z 25>		
	A (<B>,25C,D) (<9 Qi
	$DRSDM=q=<Z 25>		
	A (<B>,25C,D) (<91 y[p
	$DRSEC=>=<Z >		
	A (<B>,C,D)A (<B= ihx
	$DRSTP=	=<Z 4>		
	A (<B>,4C,D)A (<LU >A[v
	$DRTRK=>a=<Z >		
	A (<B>,C,D)A (<BN8 		hJ
	$DRTYP=	)=<Z 0>		
	A (<B>,0C,D)A (<Y 	ir
	$DRUDT=)=<Z 24>		
	A (<B>,24C,D) (<Yx 9ie
	$DRUGP=Y=<Z 22>		
	A (<B>,22C,D) (<i9 	ihP
	$DRVER=
	=<Z 0>		
	A (<B>,0C,D)A (<tI@ 3!c
	$ENDF==3A<Z STS>		
	A (<B>,STSC,D)(<|i@ ,!bd
	$EOFF==,A<Z STS>		
	A (<B>,STSC,D)(<)@ -bk
	$ERRF==-1<Z STS>		
	A (<B>,STSC,D)(<EI7 4)k$
	$EXLEN=4I=<Z 0>		
	A (<B>,0C,D)A (<FI@ TYe'
	$EXTF==Ty<Z F>		
	A (<B>,FC,D)A (<BFIS hfC
	$EXTFF=h9=<Z F1>		
	A (<B>,F1C,D) (<FLs rIg
	$EXTSF=ri=<Z F1>		
	A (<B>,F1C,D) (<FM YyeQ
	$EXTTF=Z=<Z F>		
	A (<B>,FC,D)A (<FN yIgN
	$EXTXF=yi=<Z F1>		
	A (<B>,F1C,D) (<FN8 3Ik
	$EXTYP=3i=<Z 0>		
	A (<B>,0C,D)A (<z [!m^
	$FBACT=[A=<Z .FBACT>		
	[`A (<B>,.FBACTC,D)B>,.FBACTC, Qim
	$FBADR=R	=<Z .FBADR>		
	R(A (<B>,.FBADRC,D)B>,.FBADRC,Q Mlm
	$FBARC=M9=<Z .FBCTL>		
	MXA (<B>,.FBCTLC,D)B>,.FBCTLC, Vm4
	$FBAT0=V!=<Z .FBUSE>		
	V@A (<B>,.FBUSEC,D)B>,.FBUSEC,: W	m<
	$FBAUT=W)=<Z .FBAUT>		
	WHA (<B>,.FBAUTC,D)B>,.FBAUTC,(Z jnT
	$FBBBT=j!=<Z .FBBBT>		
	j@A (<B>,.FBBBTC,D)B>,.FBBBTC,*h fin:
	$FBBK0=g	=<Z .FBBK0>		
	g(A (<B>,.FBBK0C,D)B>,.FBBK0C,*h gqnC
	$FBBK1=h=<Z .FBBK1>		
	h0A (<B>,.FBBK1C,D)B>,.FBBK1C,*i hynK
	$FBBK2=i=<Z .FBBK2>		
	i8A (<B>,.FBBK2C,D)B>,.FBBK2C,,} ]1mo
	$FBBSZ=]Q=<Z .FBBYV>		
	]pA (<B>,.FBBYVC,D)B>,.FBBYVC,<R Sym#
	$FBCRE=T=<Z .FBCRE>		
	T8A (<B>,.FBCREC,D)B>,.FBCREC,<[ aIn
	$FBCRV=ai=<Z .FBCRV>		
	bA (<B>,.FBCRVC,D)B>,.FBCRVC,I6 F9l7
	$FBDEL=FY=<Z .FBCTL>		
	FxA (<B>,.FBCTLC,D)B>,.FBCTLC,J9 Jyl[
	$FBDIR=K=<Z .FBCTL>		
	K8A (<B>,.FBCTLC,D)B>,.FBCTLC,LW ZmU
	$FBDRN=Z9=<Z .FBDRN>		
	ZXA (<B>,.FBDRNC,D)B>,.FBDRNC,^ Pam

	$FBEXL=Q=<Z .FBEXL>		
	Q A (<B>,.FBEXLC,D)B>,.FBEXLC,^ z9oW
	$FBEXT=zY=<Z .FBEXT>		
	zxA (<B>,.FBEXTC,D)B>,.FBEXTC,i: |Ioh
	$FBFET=|i=<Z .FBFET>		
	}A (<B>,.FBFETC,D)B>,.FBFETC,k Bl
	$FBFLG=B9=<Z .FBCTL>		
	BXA (<B>,.FBCTLC,D)B>,.FBCTLC,y7 YmM
	$FBGEN=Y9=<Z .FBGEN>		
	YXA (<B>,.FBGENC,D)B>,.FBGENC,{V x)oF
	$FBGNL=xI=<Z .FBGNL>		
	xhA (<B>,.FBGNLC,D)B>,.FBGNLC,{Y \)mf
	$FBGNR=\I=<Z .FBBYV>		
	\hA (<B>,.FBBYVC,D)B>,.FBBYVC,[ N)lv
	$FBINV=NI=<Z .FBCTL>		
	NhA (<B>,.FBCTLC,D)B>,.FBCTLC,I7 Al
	$FBLEN=A1=<Z .FBHDR>		
	APA (<B>,.FBHDRC,D)B>,.FBHDRC,KS HYlI
	$FBLNG=Hy=<Z .FBCTL>		
	IA (<B>,.FBCTLC,D)B>,.FBCTLC,Mh Um,
	$FBLW0=U!=<Z .FBUSE>		
	U@A (<B>,.FBUSEC,D)B>,.FBUSEC,My XmE
	$FBLWR=X1=<Z .FBLWR>		
	XPA (<B>,.FBLWRC,D)B>,.FBLWRC,[r ^9mw
	$FBMOD=^Y=<Z .FBBYV>		
	^xA (<B>,.FBBYVC,D)B>,.FBBYVC,h6 y1oO
	$FBNAM=yQ=<Z .FBNAM>		
	ypA (<B>,.FBNAMC,D)B>,.FBNAMC,i: vo5
	$FBNET=v9=<Z .FBNET>		
	vXA (<B>,.FBNETC,D)B>,.FBNETC,i< E)l.
	$FBNEX=EI=<Z .FBCTL>		
	EhA (<B>,.FBCTLC,D)B>,.FBCTLC,kr L	ld
	$FBNOD=L)=<Z .FBCTL>		
	LHA (<B>,.FBCTLC,D)B>,.FBCTLC,l _9m
	$FBNPG=_Y=<Z .FBBYV>		
	_xA (<B>,.FBBYVC,D)B>,.FBBYVC,lS ean2
	$FBNRF=f=<Z .FBCNT>		
	f A (<B>,.FBCNTC,D)B>,.FBCNTC,my dan*
	$FBNWR=e=<Z .FBCNT>		
	e A (<B>,.FBCNTC,D)B>,.FBCNTC,n GIl@
	$FBNXF=Gi=<Z .FBCTL>		
	HA (<B>,.FBCTLC,D)B>,.FBCTLC,yS O9l
	$FBOFF=OY=<Z .FBCTL>		
	OxA (<B>,.FBCTLC,D)B>,.FBCTLC,

V Dl%
	$FBPRM=D9=<Z .FBCTL>		
	DXA (<B>,.FBCTLC,D)B>,.FBCTLC,

Z Rqm
	$FBPRT=S=<Z .FBPRT>		
	S0A (<B>,.FBPRTC,D)B>,.FBPRTC,)3 cYn!
	$FBREF=cy=<Z .FBREF>		
	dA (<B>,.FBREFC,D)B>,.FBREFC,: IilR
	$FBSHT=J	=<Z .FBCTL>		
	J(A (<B>,.FBCTLC,D)B>,.FBCTLC,:= `An
	$FBSIZ=`a=<Z .FBSIZ>		
	aA (<B>,.FBSIZC,D)B>,.FBSIZC,I {Ao`
	$FBTDT={a=<Z .FBTDT>		
	|A (<B>,.FBTDTC,D)B>,.FBTDTC,K8 al
	$FBTMP=C)=<Z .FBCTL>		
	CHA (<B>,.FBCTLC,D)B>,.FBCTLC,N8 ?k}
	$FBTYP=?1=<Z .FBHDR>		
	?PA (<B>,.FBHDRC,D)B>,.FBHDRC,\{ w!o>
	$FBUSW=wA=<Z .FBUSW>		
	w`A (<B>,.FBUSWC,D)B>,.FBUSWC,i9 @l
	$FBVER=@1=<Z .FBHDR>		
	@PA (<B>,.FBHDRC,D)B>,.FBHDRC,|Z bQn
	$FBWRT=bq=<Z .FBWRT>		
	cA (<B>,.FBWRTC,D)B>,.FBWRTC,MI 8ycI
	$FILDUD9==<Z STS>		
	A (<B>,STSC,D)MI@ Pie
	$FILF==Q	<Z F>		
	A (<B>,FC,D)A (<BMJ7 9YcO
	$FILINP9y==<Z STS>		
	A (<B>,STSC,D)MKW yY;
	$FILNO==<Z FILST1>		
	8A (<B>,FILST1C,D)B>,FILST1C,MKz :9cU
	$FILOUP:Y==<Z STS>		
	A (<B>,STSC,D)Z) uIW0
	$FK2DT=ui=<Z @FKSTA2(FX)>	v	
	A (<B>,@FKSTA2(FX)C,D)KS\U j	VT
	$FKABK=j)=<Z FKINT>		
	AjH (<B>,FKINTC,D)B>,FKINTC,D\r I9TO
	$FKAGE=IY=<Z FKNR(FX)>		
Ix	A (<B>,FKNR(FX)C,D),FKNR(FX\): Qu
	$FKBET=1=<Z FKPT(FX)>		
P	A (<B>,FKPT(FX)C,D),FKPT(FX\+ YR
	$FKBL%=#Y=<Z FKSWP>		
	A#x (<B>,FKSWPC,D)B>,FKSWPC,D\+ "QR
	$FKBLK="q=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(\+ A)T
	$FKBLP=AI=<Z FKBSPW(FX)>		Ah
	A (<B>,FKBSPW(FX)C,D)KBSP\,b (YS
	$FKBS%=09=<Z FKSWP>		
	A0X (<B>,FKSWPC,D)B>,FKSWPC,D\,t /1R
	$FKBSHF/Q==<Z FKSWP(FX)>		/p
	A (<B>,FKSWP(FX)C,D)FKSWP\;W RyU
	$FKCNN=S=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(\;\ LATy
	$FKCNX=Nq=<Z FKCNO>		
	AO (<B>,FKCNOC,D)B>,FKCNOC,D\<t LaTj
	$FKCSIZM==<Z FKWSP(FX)>		M 
	A (<B>,FKWSP(FX)C,D)FKWSP\YY daV*
	$FKEFR=e=<Z FKINT>		
	Ae  (<B>,FKINTC,D)B>,FKINTC,D\k yQS
	$FKFLG==<Z FKQ2(FX)>		
8	A (<B>,FKQ2(FX)C,D),FKQ2(FX\lH `AV
	$FKFR1=`a=<Z FKINT>		
	Aa (<B>,FKINTC,D)B>,FKINTC,D\lI aIV
	$FKFR2=ai=<Z FKINT>		
	Ab (<B>,FKINTC,D)B>,FKINTC,D\lP cYV!
	$FKFRA=cy=<Z FKINT>		
	Ad (<B>,FKINTC,D)B>,FKINTC,D\lU bQV
	$FKFRJ=bq=<Z FKINT>		
	Ac (<B>,FKINTC,D)B>,FKINTC,D\l] eiV2
	$FKFRZ=f	=<Z FKINT>		
	Af( (<B>,FKINTC,D)B>,FKINTC,D\{ 1St
	$FKGL%=>!=<Z FKSWP>		
	A>@ (<B>,FKSWPC,D)B>,FKSWPC,D\{v @)T
	$FKGOLN@I==<Z FKBSPW(FX)>	@h	
	A (<B>,FKBSPW(FX)C,D)KBS]

z ?!S~
	$FKHST=?A=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]B vYR0
	$FKIB%=%i=<Z FKSWP>		
	A& (<B>,FKSWPC,D)B>,FKSWPC,D]T -!Rn
	$FKIBH=-A=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]Y $aR*
	$FKIBS=%=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]\ ?U"
	$FKIBX=T=<Z FKINTB>		
	T A (<B>,FKINTBC,D)B>,FKINTBC,]w fqV;
	$FKICO=g=<Z FKINT>		
	Ag0 (<B>,FKINTC,D)B>,FKINTC,D] l	Vd
	$FKIDP=l)=<Z FKINT>		
	AlH (<B>,FKINTC,D)B>,FKINTC,D] &IRt
	$FKIH%=.)=<Z FKSWP>		
	A.H (<B>,FKSWPC,D)B>,FKSWPC,D]3 ZUU
	$FKIIF=Z1=<Z FKINT>		
	AZP (<B>,FKINTC,D)B>,FKINTC,D]Z iVL
	$FKIJT=i!=<Z FKINT>		
	Ai@ (<B>,FKINTC,D)B>,FKINTC,D] _9U
	$FKILO=_Y=<Z FKINT>		
	A_x (<B>,FKINTC,D)B>,FKINTC,D]\ TiU*
	$FKINX=U	=<Z FKINT>		
	AU( (<B>,FKINTC,D)B>,FKINTC,D]q m	Vl
	$FKISC=m)=<Z FKINT>		
	AmH (<B>,FKINTC,D)B>,FKINTC,D] [U]
	$FKIT1=[9=<Z FKINT>		
	A[X (<B>,FKINTC,D)B>,FKINTC,D]	 \!Uf
	$FKIT2=\A=<Z FKINT>		
	A\` (<B>,FKINTC,D)B>,FKINTC,D] gyVC
	$FKITL=h=<Z FKINT>		
	Ah8 (<B>,FKINTC,D)B>,FKINTC,D]z ^1Uw
	$FKIWT=^Q=<Z FKINT>		
	A^p (<B>,FKINTC,D)B>,FKINTC,D](W E9T/
	$FKJBN=EY=<Z FKJOB(FX)>		
	A (<B>,FKJOB(FX)C,D)FKJOB(]+b 3)T6
	$FKJO%=FA=<Z FKJOB>		
	AF` (<B>,FKJOBC,D)B>,FKJOBC,D]+| 1T
	$FKJOX=B1=<Z FKJOB>		
	ABP (<B>,FKJOBC,D)B>,FKJOBC,D], OQU
	$FKJP%=Qy=<Z FKCNO>		
	AR (<B>,FKCNOC,D)B>,FKCNOC,D], PyU
	$FKJPT=Q=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(],b <qT%
	$FKJS%=D1=<Z FKJOB>		
	ADP (<B>,FKJOBC,D)B>,FKJOBC,D],q C1T
	$FKJSB=CQ=<Z FKJOB(FX)>		
	A (<B>,FKJOB(FX)C,D)FKJOB(]- w1W?
	$FKJTN=wQ=<Z FKJTQ>		
	Awp (<B>,FKJTQC,D)B>,FKJTQC,D]- x9WG
	$FKJTP=xY=<Z FKJTQ>		
	Axx (<B>,FKJTQC,D)B>,FKJTQC,D]:6 ;	S\
	$FKKIL=;)=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]; 59Sc
	$FKKL%=<=<Z FKSWP>		
	A<0 (<B>,FKSWPC,D)B>,FKSWPC,D][X Q\
	$FKMNQ=!=<Z FKQ2(FX)>		
@	A (<B>,FKQ2(FX)C,D),FKQ2(FX]hB EW7
	$FKNB%=vQ=<Z FKNBW>		
	Avp (<B>,FKNBWC,D)B>,FKNBWC,D]l\ G)T>
	$FKNRX=GI=<Z FKNR>		
	A Gh(<B>,FKNRC,D)<B>,FKNRC,D)]m iQB
	$FKNTC=	=<Z FKQ2>		
	A ((<B>,FKQ2C,D)<B>,FKQ2C,D)]mq MiTr
	$FKNWCEN	==<Z FKWSP(FX)>		N(
	A (<B>,FKWSP(FX)C,D)FKWSP]ms XUD
	$FKNWF=X!=<Z FKINT>		
	AX@ (<B>,FKINTC,D)B>,FKINTC,D]mu Y	UL
	$FKNWJ=Y)=<Z FKINT>		
	AYH (<B>,FKINTC,D)B>,FKINTC,D]yv =Sm
	$FKOGL==9=<Z FKSWP(FX)>		
	A(<B>,FKSWP(FX)C,D)FKSWP(^	| 
	$FKPGX=S>		
	AB>,FKPGSC,D)B>,FKPGSC,D^

T k	V\
	$FKPRI=k)=<Z FKINT>		
	AkH (<B>,FKINTC,D)B>,FKINTC,D^

b 
yP
	$FKPS%=Q=<Z FKPGS>		
	Ap (<B>,FKPGSC,D)B>,FKPGSC,D^

h UqU3
	$FKPS0=V=<Z FKINT>		
	AV0 (<B>,FKINTC,D)B>,FKINTC,D^

h VyU;
	$FKPS1=W=<Z FKINT>		
	AW8 (<B>,FKINTC,D)B>,FKINTC,D^

i OyU
	$FKPS2=P=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(^

q QPy
	$FKPSB=q=<Z FKPGS(FX)>		
	A (<B>,FKPGS(FX)C,D)FKPGS(^
	$FKPTD=q=<Z FKPGST>		
	A(<B>,FKPGSTC,D)B>,FKPGSTC,^
	$FKPTR=i=<Z FKPGST>		
	A(<B>,FKPGSTC,D)B>,FKPGSTC,^
	$FKPTX=i=<Z FKPGST>		
	A (<B>,FKPGSTC,D)B>,FKPGSTC,^\ aQ:
	$FKQ2X==<Z FKQ2>		
	A  (<B>,FKQ2C,D)<B>,FKQ2C,D)^@ 	Qd
	$FKQN==)<Z FKQ2(FX)>		
	HA (<B>,FKQ2(FX)C,D),FKQ2(FX)^ YQ1
	$FKQTM=y=<Z FKQ1(FX)>		
	A (<B>,FKQ1(FX)C,D),FKQ1(FX^< 9aSR
	$FKSPL=:=<Z FKSWP>		
	A:  (<B>,FKSWPC,D)B>,FKSWPC,D^=	 t!W&
	$FKST2=tA=<Z FKSTA2>		
	t`A (<B>,FKSTA2C,D)B>,FKSTA2C,^= sW
	$FKSTD=s9=<Z FKSTAT>		
	sXA (<B>,FKSTATC,D)B>,FKSTATC,^= rW
	$FKSTR=r1=<Z FKSTAT>		
	rPA (<B>,FKSTATC,D)B>,FKSTATC,^= qW
	$FKSTX=q1=<Z FKSTAT>		
	qPA (<B>,FKSTATC,D)B>,FKSTATC,^=9 ])Un
	$FKSUS=]I=<Z FKINT>		
	A]h (<B>,FKINTC,D)B>,FKINTC,D^=| Q}
	$FKSWX=9=<Z FKSWP>		
	AX (<B>,FKSWPC,D)B>,FKSWPC,D^J6 yAWP
	$FKTIM=ya=<Z FKTIME>		
	zA (<B>,FKTIMEC,D)B>,FKTIMEC,^\ wQ
	$FKUP%=a=<Z FKPGS>		
	A (<B>,FKPGSC,D)B>,FKPGSC,D^\ YQ	
	$FKUPT=y=<Z FKPGS(FX)>		
	A (<B>,FKPGS(FX)C,D)FKPGS(^|b 1R
	$FKWS%=!I=<Z FKSWP>		
	A!h (<B>,FKSWPC,D)B>,FKSWPC,D^|v  AR
	$FKWSL= a=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(^|y J9TW
	$FKWSS=JY=<Z FKNR(FX)>		
Jx	A (<B>,FKNR(FX)C,D),FKNR(FX^|| KAT`
	$FKWSX=Ka=<Z FKWSP>		
	AL (<B>,FKWSPC,D)B>,FKWSPC,D^} 	Ql
	$FKWTL=)=<Z FKQ2(FX)>		
H	A (<B>,FKQ2(FX)C,D),FKQ2(FX_3 H1TG
	$FKXAGEHQ==<Z FKNR(FX)>		
	A (<B>,FKNR(FX)C,D),FKNR(Fd %QZ1
	$FLATL=%q=<Z FILDNM>		
	&A (<B>,FILDNMC,D)B>,FILDNMC,d, Y
	$FLBPO=!=<Z FILBYT>		
	@A (<B>,FILBYTC,D)B>,FILBYTC,d,} 	Y
	$FLBSZ=)=<Z FILBYT>		
	HA (<B>,FILBYTC,D)B>,FILBYTC,dJ9 $QZ)
	$FLDIR=$q=<Z FILDNM>		
	%A (<B>,FILDNMC,D)B>,FILDNMC,dK9 *iZZ
	$FLDMS=+	=<Z FILMS1>		
	+(A (<B>,FILMS1C,D)B>,FILMS1C,dKW #IZ 
	$FLDNO=#i=<Z FILDDN>		
	$A (<B>,FILDDNC,D)B>,FILDDNC,dLq "IZ
	$FLDSB="i=<Z FILDDN>		
	#A (<B>,FILDDNC,D)B>,FILDDNC,dM !YN
	$FLDTB=A=<Z FILDEV>		
	`A (<B>,FILDEVC,D)B>,FILDEVC,dM\ ,iZj
	$FLDVX=-	=<Z FILIDX>		
	-(A (<B>,FILIDXC,D)B>,FILIDXC,d[9 -qZs
	$FLEMS=.=<Z FILMS2>		
	.0A (<B>,FILMS2C,D)B>,FILMS2C,d\q 'YZA
	$FLESB='y=<Z FILNEN>		
	(A (<B>,FILNENC,D)B>,FILNENC,dhw )YV
	$FLFCO=I=<Z FILNLP>		
	hA (<B>,FILNLPC,D)B>,FILNLPC,eKQ 9Y
	$FLLNC=Y=<Z FILLNM>		
	xA (<B>,FILLNMC,D)B>,FILLNMC,eKU 1[


	$FLLNK=1!=<Z FILNND>		
	1@A (<B>,FILNNDC,D)B>,FILNNDC,e[r 9Y3
	$FLMOD==<Z FILSTS>		
	0A (<B>,FILSTSC,D)B>,FILSTSC,e\  AZ
	$FLMPC= a=<Z FILLFW>		
	!A (<B>,FILLFWC,D)B>,FILLFWC,ek9 +iZb
	$FLNMS=,	=<Z FILMS1>		
	,(A (<B>,FILMS1C,D)B>,FILMS1C,ekr 2[
	$FLNOD=2!=<Z FILNND>		
	2@A (<B>,FILNNDC,D)B>,FILNNDC,elq &YZ9
	$FLNSB=&y=<Z FILNEN>		
	'A (<B>,FILNENC,D)B>,FILNENC,f /y[
	$FLP0==0<Z FILCOD>		
	A08 (<B>,FILCODC,D)B>,FILCODC,f	w Y%
	$FLPGN=1=<Z FILWND>		
	PA(<B>,FILWNDC,D)B>,FILWNDC,f
	$FLPTN=Q=<Z FILOFN>		
	pA(<B>,FILOFNC,D)B>,FILOFNC,f
	$FLPTT=Q=<Z FILOFN>		
	pA (<B>,FILOFNC,D)B>,FILOFNC,f99 )Y^
	$FLSES=I=<Z FILNLP>		
	hA (<B>,FILNLPC,D)B>,FILNLPC,fLq yY
	$FLTSB==<Z FILTMP>		
	8A (<B>,FILTMPC,D)B>,FILTMPC,fLr yY
	$FLTSD==<Z FILTMP>		
	8A (<B>,FILTMPC,D)B>,FILTMPC,fM !AZ
	$FLTTW=!a=<Z FILLFW>		
	"A (<B>,FILLFWC,D)B>,FILLFWC,fN 9Yw
	$FLTXT=Y=<Z FILLNM>		
	xA (<B>,FILLNMC,D)B>,FILLNMC,fX` .yZ{
	$FLUC==/<Z FILCOD>		
	A/8 (<B>,FILCODC,D)B>,FILCODC,fkW )aZR
	$FLVNO=*=<Z FILVER>		
	* A (<B>,FILVERC,D)B>,FILVERC,f| Y-
	$FLWPG=1=<Z FILWND>		
	PA (<B>,FILWNDC,D)B>,FILWNDC,9@ 5qc1
	$FRKF==6<Z STS>		
	A (<B>,STSC,D)(<= ^iuz
	$FRKTTY_	==<Z CTTAB>		
	_(A (<B>,CTTABC,D)B>,CTTABC,I7 =!kl
	$FRLEN==A=<Z 0>		
	A (<B>,0C,D)A (<iQ >	kt
	$FRNFB=>)=<Z .FRNFB>		
	>HA (<B>,.FRNFBC,D)B>,.FRNFBC,|z >ycy
	$FROSTF?==<Z STS>		
	A (<B>,STSC,D)N8 ;ak`
	$FRTYP=<=<Z 0>		
	A (<B>,0C,D)A (<i9 <Akf
	$FRVER=<a=<Z 0>		
	A (<B>,0C,D)A (<Dz wig@
	$FXACT=x	=<Z F1>		
	A (<B>,F1C,D) (<F

Z vyg9
	$FXPRT=w=<Z F1>		
	A (<B>,F1C,D) (<FK8 xYgG
	$FXTMP=xy=<Z F1>		
	A (<B>,F1C,D) (<u)S o	fz
	$GNJFF=o)=<Z F1>		
	A (<B>,F1C,D) (<"L)V !P^
	$HIBFL=A=<Z JOBNAM>		
	`A (<B>,JOBNAMC,D)B>,JOBNAMC,"dI@ ;c[
	$HLDF==;9<Z STS>		
	A (<B>,STSC,D)(<"fI@ 1Ac
	$HLTF==1a<Z STS>		
	A (<B>,STSC,D)(<#4\S ug+
	$HVERF=u9=<Z F1>		
	A (<B>,F1C,D) (<&'	Q !	r

	$IDXFB=!)=<Z 0>		
	A (<B>,0C,D)A (<&'	S Iqf
	$IDXFG=i=<Z 1>		
	A (<B>,1C,D)A (<&'	V 	q|
	$IDXFLG)==<Z STRINF>		
	HA (<B>,STRINFC,D)B>,STRINFC&'
1 "Ir
	$IDXIB="i=<Z 1>		
	A (<B>,1C,D)A (<&'
; )ql
	$IDXIV=I=<Z 1>		
	A (<B>,1C,D)A (<&'

r !ir
	$IDXSD="	=<Z 0>		
	A (<B>,0C,D)A (<&<K IidP
	$IGDLF=J	=<Z F>		
	A (<B>,FC,D)A (<&=S z9gU
	$IGIVF=zY=<Z F1>		
	A (<B>,F1C,D) (<&d,}  %
	$ILBSZ= :=<Z ILSIZE>		
	 XA (<B>,ILSIZEC,D)B>,ILSIZEC,&dL}  -
	$ILDSZ= :=<Z ILSIZE>		
	 XA (<B>,ILSIZEC,D)B>,ILSIZEC,&e}:  *>
	$ILOUT= J=<Z ILMISC>		
	 hA (<B>,ILMISCC,D)B>,ILMISCC,&f93  *F
	$ILSEG= J=<Z ILMISC>		
	 hA (<B>,ILMISCC,D)B>,ILMISCC,&fi1  r4
	$ILVEC= "=<Z ILNSPV>		
	 @A (<B>,ILNSPVC,D)B>,ILNSPVC,&}[r iap
	$IOMODE	==<Z STS>		
	A (<B>,STSC,D)'	w FaL8
	$IPPGN=G=<Z >		
	A (<B>,C,D)A (<B*^ YXa
	$JBMX==y<Z JBFLAG>		
	A

 (<B>,JBFLAGC,D)B>,JBFLAGC,*DH

YXi
	$JBT20=

y=<Z JBFLAG>		
	(<B>,JBFLAGC,D)B>,JBFLAGC,*IU zAWX
	$JBTFK=za=<Z JOBPT>		
	A{ (<B>,JOBPTC,D)B>,JOBPTC,D*M {IW`
	$JBTTY={i=<Z JOBPT>		
	A| (<B>,JOBPTC,D)B>,JOBPTC,D*5h3 KId^
	$JFNAF=Ki=<Z F>		
	A (<B>,FC,D)A (<*5i@ JYdW
	$JFNF==Jy<Z F>		
	A (<B>,FC,D)A (<B*5lR Oye
	$JFNRD=P=<Z F>		
	A (<B>,FC,D)A (<*5m1 7Yd
	$JFNUB=@Y=<Z STS>		
	A (<B>,STSC,D)(*|,Z |QWi
	$JOBRTP|q==<Z JOBRTL>		
	}A (<B>,JOBRTLC,D)B>,JOBRTLC+ iqB
	$JSADN=	=<Z JSADIR>		
	(A (<B>,JSADIRC,D)B>,JSADIRC,+< )p>
	$JSAMX=I=<Z JSATCT>		
	hA (<B>,JSATCTC,D)B>,JSATCTC,+W )pF
	$JSANO=I=<Z JSATCT>		
	hA (<B>,JSATCTC,D)B>,JSATCTC,+(: 	X<
	$JSBAT=)=<Z JBFLAG>		
	HA (<B>,JBFLAGC,D)B>,JBFLAGC,+9 ipN
	$JSCDF=	=<Z JSBCDS>		
		hA (<B>,JSBCDSC,D)B>,JSBCDSC,+9 iqZ
	$JSCDS=	=<Z JSBCDS>		
	(A (<B>,JSBCDSC,D)B>,JSBCDSC,+IY u!X3
	$JSDFS==<Z JBFLAG>		
	8A (<B>,JBFLAGC,D)B>,JBFLAGC,+J9 iqR
	$JSDIR=	=<Z JSBSDN>		
	(A (<B>,JSBSDNC,D)B>,JSBSDNC,+[ XE
	$JSELO=9=<Z JBFLAG>		
	XA (<B>,JBFLAGC,D)B>,JBFLAGC,+k 	)XN
	$JSFLO=	I=<Z JBFLAG>		
		hA (<B>,JBFLAGC,D)B>,JBFLAGC,+k: iq:
	$JSFMT=	=<Z JSFKMT>		
	(A (<B>,JSFKMTC,D)B>,JSFKMTC,+|X iq2
	$JSGRP=	=<Z JSGRPS>		
	(A (<B>,JSGRPSC,D)B>,JSGRPSC,+Xt iq
	$JSMCI=	=<Z JSSTRF>		
	(A (<B>,JSSTRFC,D)B>,JSSTRFC,+] X$
	$JSMTD=!=<Z JSMTA1>		
	@A (<B>,JSMTA1C,D)B>,JSMTA1C,+] yX
	$JSMTM==<Z JSMTA1>		
	8A (<B>,JSMTA1C,D)B>,JSMTA1C,+] 	X,
	$JSMTP=)=<Z JSMTA1>		
	HA (<B>,JSMTA1C,D)B>,JSMTA1C,+] qX
	$JSMTR==<Z JSMTA1>		
	0A (<B>,JSMTA1C,D)B>,JSMTA1C,+{ 
9XW
	$JSOLO=
Y=<Z JBFLAG>		
	
xA (<B>,JBFLAGC,D)B>,JBFLAGC,+9 iq
	$JSSDM=	=<Z JSSTRF>		
	(A (<B>,JSSTRFC,D)B>,JSSTRFC,+= 1)q(
	$JSSTN=i=<Z JSSTRF>		
	A (<B>,JSSTRFC,D)B>,JSSTRFC,+X` iqJ
	$JSUC==	<Z JSBSDN>		
	A( (<B>,JSBSDNC,D)B>,JSBSDNC,+v iq"
	$JSXCL=	=<Z JSSTRF>		
	(A (<B>,JSSTRFC,D)B>,JSSTRFC,+$lU h4
	$JTFRK=!=<Z JTTFK>		
	A@ (<B>,JTTFKC,D)B>,JTTFKC,D+%8 yh
	$JTIMP==<Z JTBMN>		
	A8 (<B>,JTBMNC,D)B>,JTBMNC,D+%+W h,
	$JTJNO=!=<Z KIMUU1+1>		
@	A (<B>,KIMUU1+1C,D),KIMUU1++%Xw h
	$JTMCN=!=<Z JTMNW>		
	A@ (<B>,JTMNWC,D)B>,JTMNWC,D+%[T h$
	$JTMNI=!=<Z JTMNW>		
	A@ (<B>,JTMNWC,D)B>,JTMNWC,D-z pAo
	$K01ST=pa=<Z .FBBBT>		
	qA (<B>,.FBBBTC,D)B>,.FBBBTC,-^ o1n
	$K0EXM=oQ=<Z .FBBBT>		
	opA (<B>,.FBBBTC,D)B>,.FBBBTC,-h9 n!nv
	$K0NAR=nA=<Z .FBBBT>		
	n`A (<B>,.FBBBTC,D)B>,.FBBBTC,-i mnm
	$K0NDL=m1=<Z .FBBBT>		
	mPA (<B>,.FBBBTC,D)B>,.FBBBTC,-(9 n[
	$K0RAR=k=<Z .FBBBT>		
	k0A (<B>,.FBBBTC,D)B>,.FBBBTC,-)V rao
	$K0RFL=s=<Z .FBBBT>		
	s A (<B>,.FBBBTC,D)B>,.FBBBTC,-*; lnd
	$K0RIV=l!=<Z .FBBBT>		
	l@A (<B>,.FBBBTC,D)B>,.FBBBTC,-,w sqo#
	$K0RSN=t=<Z .FBBBT>		
	t0A (<B>,.FBBBTC,D)B>,.FBBBTC,-|W qQo
	$K0WRN=qq=<Z .FBBBT>		
	rA (<B>,.FBBBTC,D)B>,.FBBBTC,./S kf[
	$KEYFF=k9=<Z F1>		
	A (<B>,F1C,D) (<.dJ9 %iz2
	$KLDIR=&	=<Z .KLDIR>		
	&(A (<B>,.KLDIRC,D)B>,.KLDIRC,.f: 'qzC
	$KLSHR=(=<Z .KLSHR>		
	(0A (<B>,.KLSHRC,D)B>,.KLSHRC,.f= $iz*
	$KLSTR=%	=<Z .KLDIR>		
	%(A (<B>,.KLDIRC,D)B>,.KLDIRC,.fK &qz;
	$KLTLN='=<Z .KLSHR>		
	'0A (<B>,.KLSHRC,D)B>,.KLSHRC,25n >cs
	$LFNXT=>9=<Z STS>		
	A (<B>,STSC,D)(2uXw 3	[
	$LNMCNT3)==<Z 0>		
	A (<B>,0C,D)A (<2uZ2 3i[ 
	$LNMIDX4	==<Z 0>		
	A (<B>,0C,D)A (<2u[ 51[-
	$LNMLNK5Q==<Z 1>		
	A (<B>,1C,D)A (<2u\ 6[3
	$LNMPNT61==<Z 1>		
	A (<B>,1C,D)A (<2u\z 4I[&
	$LNMSTP4i==<Z 0>		
	A (<B>,0C,D)A (<2v=

Ixh
	$LNSTA=

i=<Z DNASTA>		
	(<B>,DNASTAC,D)B>,DNASTAC,2}is +1b]
	$LONGF=+Q=<Z STS>		
	A (<B>,STSC,D)(34\S v	g2
	$LVERF=v)=<Z F1>		
	A (<B>,F1C,D) (<7$: _yf
	$MTCHF=`=<Z F1>		
	A (<B>,F1C,D) (<:

8s HydI
	$NACCF=I=<Z F>		
	A(<B>,FC,D)A (<:
yxY
	$NAMCN==<Z >		
	A(<B>,C,D)A (<B:
	$NAMEF=.!=<Z STS>		
	A(<B>,STSC,D)(:
	$NAMF==T<Z F>		
	A(<B>,FC,D)A (<B:
	$NAMSF=qy=<Z F1>		
	A(<B>,F1C,D) (<:
	$NAMTF=Y9=<Z F>		
	A(<B>,FC,D)A (<:
	$NAMXF=fy=<Z F1>		
	A (<B>,F1C,D) (<:,y@ bf
	$NEGF==b9<Z F1>		
	A (<B>,F1C,D) (<:.y@ kyfa
	$NEWF==l<Z F1>		
	A (<B>,F1C,D) (<:.{S CYd
	$NEWNF=Cy=<Z F>		
	A (<B>,FC,D)A (<:.}S lYfg
	$NEWVF=ly=<Z F1>		
	A (<B>,F1C,D) (<:mI7 1yk
	$NMLEN=2=<Z 0>		
	A (<B>,0C,D)A (<:nN8 1k
	$NMTYP=19=<Z 0>		
	A (<B>,0C,D)A (<:nh6 2ak
	$NMVAL=3=<Z 1>		
	A (<B>,1C,D)A (<:t3 ^9eu
	$NNAMF=^Y=<Z F>		
	A (<B>,FC,D)A (<:|I3 ]Yeo
	$NODEF=]y=<Z F>		
	A (<B>,FC,D)A (<:}n )QbO
	$NONXF=)q=<Z STS>		
	A (<B>,STSC,D)(:~= )p^
	$NOSTR=I=<Z STRWRD>		
	hA (<B>,STRWRDC,D)B>,STRWRDC,;X` d9f%
	$NREC==dY<Z F1>		
	A (<B>,F1C,D) (<;Xh ef+
	$NREC1=e9=<Z F1>		
	A (<B>,F1C,D) (<;Z Ad
	$NSPNULA9==<Z STS>		
	A (<B>,STSC,D);-YS j9fU
	$NUMFF=jY=<Z F1>		
	A (<B>,F1C,D) (<;4\S _e{
	$NVERF=_9=<Z F>		
	A (<B>,FC,D)A (<;>I@ *AbV
	$NWTF==*a<Z STS>		
	A(<B>,STSC,D)(<>I@ a9f
	$OCTF==aY<Z F1>		
	A (<B>,F1C,D) (<>%Q yIOP
	$ODIRC=yi=<Z ALOC1>		
	Az (<B>,ALOC1C,D)B>,ALOC1C,D>5hQ }iOr
	$OFNBC=~	=<Z OFNLEN>		
	~(A (<B>,OFNLENC,D)B>,OFNLENC,>5hY |aOj
	$OFNBSZ}==<Z OFNLEN>		
	} A (<B>,OFNLENC,D)B>,OFNLENC>5j AL


	$OFNHS=A!=<Z OFNHST>		
	A@A (<B>,OFNHSTC,D)B>,OFNHSTC,>5k\ BL
	$OFNNXTB!==<Z OFNHSE>		
	B@A (<B>,OFNHSEC,D)B>,OFNHSEC>5l C	L
	$OFNPRVC)==<Z OFNHSE>		
	CHA (<B>,OFNHSEC,D)B>,OFNHSEC>5lt 41K'
	$OFNSHC4Q==<Z SPTO>		
	A4p (<B>,SPTOC,D)<B>,SPTOC,D)>5| 6K5
	$OFOPC=69=<Z SPTO2>		
	A6X (<B>,SPTO2C,D)B>,SPTO2C,D>dKS DId&
	$OLDNF=Di=<Z F>		
	A (<B>,FC,D)A (<?i@ %!b,
	$OPNF==%A<Z STS>		
	A (<B>,STSC,D)(<?p (aZJ
	$ORG==<)Z FILVER>		
	A ) (<B>,FILVERC,D)B>,FILVERC,D?LS M)dl
	$OSTRF=MI=<Z F>		
	A (<B>,FC,D)A (<?.L Bid
	$OUTPF=C	=<Z F>		
	A (<B>,FC,D)A (<B

}1 "qJ7
	$PAGUBA&Q==<Z KIPGWD>		
	&pA (<B>,KIPGWDC,D)B>,KIPGWDCB; $b#
	$PASLSN$9==<Z STS>		
	A (<B>,STSC,D)B7	S m9fm
	$PFXFF=mY=<Z F1>		
	A (<B>,F1C,D) (<B=IZ zQOY
	$PGLFT=zq=<Z ALOC2>		
	A{(<B>,ALOC2C,D)B>,ALOC2C,DB>
	$PGPTR={y=<Z ALOC2>		
	A| (<B>,ALOC2C,D)B>,ALOC2C,DBGs O	dz
	$PHYOF=O)=<Z F>		
	A (<B>,FC,D)A (<BL+8 qQK
	$PIBMP==<Z FKQ2(FX)>		
0	A (<B>,FKQ2(FX)C,D),FKQ2(FXBe8w .Ju
	$PLKCNT.1==<Z @CST1X>		
	.PA (<B>,@CST1XC,D)B>,@CST1XCB}iS E9d-
	$PONFF=EY=<Z F>		
	A (<B>,FC,D)A (<Cn 89[E
	$PRFXL=8Y=<Z 0>		
	A (<B>,0C,D)A (<Cn 6q[9
	$PRFXS=7=<Z 0>		
	A (<B>,0C,D)A (<Cn 7Q[?
	$PRFXV=7q=<Z 0>		
	A (<B>,0C,D)A (<CI@ Ve3
	$PRTF==V9<Z F>		
	A (<B>,FC,D)A (<BCIS hyfI
	$PRTFF=i=<Z F1>		
	A (<B>,F1C,D) (<CM \ec
	$PRTTF=\9=<Z F>		
	A (<B>,FC,D)A (<C] qX{
	$PSUTPS==<Z PSBITS>		
	0A (<B>,PSBITSC,D)B>,PSBITSCC

t
	$PSXSIR	==<Z PSBITS>		
	(A (<B>,PSBITSC,D)B>,PSBITSCJ, &b3
	$READF=&1=<Z STS>		
	A (<B>,STSC,D)(J,9@ ;yca
	$RECF==<<Z STS>		
	A (<B>,STSC,D)(<Je	S Nds
	$RLHFF=N9=<Z F>		
	A (<B>,FC,D)A (<Jtq ;1s]
	$RNACC=;Q=<Z 5>		
	A (<B>,5C,D)A (<JtI@ (abH
	$RNDF==)<Z STS>		
	A (<B>,STSC,D)(<JuI7 3qs$
	$RNLEN=4A=<Z 0>		
	A (<B>,0C,D)A (<Jukr 8asH
	$RNNOD=9=<Z 2>		
	A (<B>,2C,D)A (<Jun 6As6
	$RNNXT=6a=<Z 1>		
	A (<B>,1C,D)A (<Jv9 :AsV
	$RNPAS=:a=<Z 4>		
	A (<B>,4C,D)A (<JvN8 21s
	$RNTYP=2Q=<Z 0>		
	A (<B>,0C,D)A (<Jv\y 9QsO
	$RNUSR=9q=<Z 3>		
	A (<B>,3C,D)A (<Jvi9 3s
	$RNVER=31=<Z 0>		
	A (<B>,0C,D)A (<Kw `v
	$RSPOO=`!=<Z 0>		
	A (<B>,0C,D)A (<K:= `av
	$RSSIZ=a=<Z 0>		
	A (<B>,0C,D)A (<K' H	dB
	$RTYPF=H)=<Z F>		
	A (<B>,FC,D)A (<K4\S t)g$
	$RVERF=tI=<Z F1>		
	A (<B>,F1C,D) (<N	1 1y
	$SBHEB=Q=<Z 3>		
	A (<B>,3C,D)A (<N8W ay
	$SBSBN==<Z 3>		
	A(<B>,3C,D)A (<N8w 
	$SBSCN==<Z SBSTYP>		
	0A (<B>,SBSTYPC,D)B>,SBSTYPC,N<q Iy
	$SBSSB=i=<Z 3>		
	A (<B>,3C,D)A (<N<| yy
	$SBSSY==<Z 3>		
	A (<B>,3C,D)A (<N= qx{
	$SBSTP==<Z SBSTYP>		
	0A (<B>,SBSTYPC,D)B>,SBSTYPC,N+ 8YSI
	$SCBLK%8y==<Z FKSWP>		
	9A (<B>,FKSWPC,D)B>,FKSWPC,N= 	qx`
	$SCSTA=a=<Z DNASTA>

A (<B>,DNASTAC,D)B>,DNASTAC,Nx5 7QSA
	$SCWAK%7q==<Z FKSWP>		
	8A (<B>,FKSWPC,D)B>,FKSWPC,NFI@ QYe
	$SHTF==Qy<Z F>		
	A (<B>,FC,D)A (<BNL #1b
	$SIADR=#Q=<Z >		
	A (<B>,C,D)A (<BNMI; "Ab
	$SILEV="a=<Z >		
	A (<B>,C,D)A (<BNNi9 )b
	$SIVER=!q=<Z >		
	A (<B>,C,D)A (<BNO)@ 5c*
	$SIZF==5!<Z STS>		
	A (<B>,STSC,D)(<N] $yc5
	$SKIPBY6Y==<Z STS>		
	A (<B>,STSC,D)OHr 8KE
	$SPTCDO89==<Z SPTO2>		
	8XA (<B>,SPTO2C,D)B>,SPTO2C,OHz @!L
	$SPTCT=@A=<Z >		
	A (<B>,C,D)A (<BOI :KU
	$SPTDSF:9==<Z SPTO2>		
	:XA (<B>,SPTO2C,D)B>,SPTO2C,OIW 7K=
	$SPTFO=79=<Z SPTO2>		
	A7X (<B>,SPTO2C,D)B>,SPTO2C,DOIY ;K]
	$SPTFR=;9=<Z SPTO2>		
	A;X (<B>,SPTO2C,D)B>,SPTO2C,DOK9 >Ku
	$SPTMR=>9=<Z SPTO2>		
	A>X (<B>,SPTO2C,D)B>,SPTO2C,DOKP =Km
	$SPTNA==9=<Z SPTO2>		
	A=X (<B>,SPTO2C,D)B>,SPTO2C,DOLs 9KM
	$SPTSFD99==<Z SPTO2>		
	9XA (<B>,SPTO2C,D)B>,SPTO2C,OLt 39K
	$SPTSHC3Y==<Z SPT>		
	A (<B>,SPTC,D)OLy <Ke
	$SPTSR=<9=<Z SPTO2>		
	A<X (<B>,SPTO2C,D)B>,SPTO2C,DOLz ?K}
	$SPTST=?9=<Z SPTO2>		
	A?X (<B>,SPTO2C,D)B>,SPTO2C,DON EYL/
	$SPTX==Ey<Z >		
	A (<B>,C,D)A (<B>O$S }	gj
	$STARF=})=<Z F1>		
	A (<B>,F1C,D) (<O$<R AYt
	$STCRD=Ay=<Z SDBSTS>		
	BA (<B>,SDBSTSC,D)B>,SDBSTSC,O$J9 >)sv
	$STDIS=>I=<Z SDBSTS>		
	>hA (<B>,SDBSTSC,D)B>,SDBSTSC,O$Kv ?9s
	$STDOM=?Y=<Z SDBSTS>		
	?xA (<B>,SDBSTSC,D)B>,SDBSTSC,O$\ }ygq
	$STEPF=~=<Z F1>		
	A (<B>,F1C,D) (<O$^ Cyt#
	$STEXL=D=<Z SDBSTS>		
	D8A (<B>,SDBSTSC,D)B>,SDBSTSC,O$x2 5qL)
	$STGADRE==<Z >		
	A (<B>,C,D)A (<O% Bit
	$STIDX=C	=<Z SDBSTS>		
	C(A (<B>,SDBSTSC,D)B>,SDBSTSC,O%lY @It
	$STNRS=@i=<Z SDBSTS>		
	AA (<B>,SDBSTSC,D)B>,SDBSTSC,O&

`  )sm
	$STPS==2	<Z SDBSTS>		
	A=Y (<B>,SDBSTSC,D)B>,SDBSTSC,O&  !YF
	$STR==<AZ FILDEV>		
	A `(<B>,FILDEVC,D)B>,FILDEVC,DO&(H Qqu
	$STRB0=R=<Z SDBBT0>		
	R0A (<B>,SDBBT0C,D)B>,SDBBT0C,O&(H Ryu
	$STRB1=S=<Z SDBBT1>		
	S8A (<B>,SDBBT1C,D)B>,SDBBT1C,O&(Z MQtq
	$STRBTBMq==<Z SDBBTB>		
	NA (<B>,SDBBTBC,D)B>,SDBBTBCO&(\ J9tW
	$STRBXBJY==<Z SDBBXB>		
	JxA (<B>,SDBBXBC,D)B>,SDBBXBCO&(| Piu

	$STRCYLQ	==<Z SDBCYL>		
	Q(A (<B>,SDBCYLC,D)B>,SDBCYLCO&)@ cYf
	$STRF==cy<Z F1>		
	A (<B>,F1C,D) (<O&)Q NYty
	$STRFC=Ny=<Z SDBFRC>		
	OA (<B>,SDBFRCC,D)B>,SDBFRCC,O&)V 
)pV
	$STRFLG
I==<Z STRWRD>		
	
hA (<B>,STRWRDC,D)B>,STRWRDCO&)Y LIth
	$STRFSSLi==<Z SDBFSS>		
	MA (<B>,SDBFSSC,D)B>,SDBFSSCO&*2 G!t>
	$STRIDXGA==<Z SDBIDX>		
	G`A (<B>,SDBIDXC,D)B>,SDBIDXCO&*Q Et-
	$STRJB=E9=<Z SDBSTS>		
	EXA (<B>,SDBSTSC,D)B>,SDBSTSC,O&+ Oau
	$STRLCAP==<Z SDBLCA>		
	P A (<B>,SDBLCAC,D)B>,SDBLCACO&+ H)tF
	$STRLDNHI==<Z SDBLDN>		
	HhA (<B>,SDBLDNC,D)B>,SDBLDNCO&+ XuE
	$STRLK=X9=<Z SDBFLK>		
	XXA (<B>,SDBFLKC,D)B>,SDBFLKC,O&+1 Y!uN
	$STRMC=YA=<Z SDBCNT>		
	Y`A (<B>,SDBCNTC,D)B>,SDBCNTC,O&+4 [)u^
	$STRMI=[I=<Z SDBPUC>		
	[hA (<B>,SDBPUCC,D)B>,SDBPUCC,O&+P 	)p+
	$STRNAM	I==<Z SDBNAM>		
	8A (<B>,SDBNAMC,D)B>,SDBNAMCO&+Y KAt`
	$STRNSSKa==<Z SDBNSS>		
	LA (<B>,SDBNSSC,D)B>,SDBNSSCO&+Z 	m
	$STRNUMA==<Z SDBNUM>		
	P9A (<B>,SDBNUMC,D)B>,SDBNUMCO&+s Z!uV
	$STROF=ZA=<Z SDBCNT>		
	Z`A (<B>,SDBCNTC,D)B>,SDBCNTC,O&,R F!t6
	$STRRDOFA==<Z SDBIDX>		
	F`A (<B>,SDBIDXC,D)B>,SDBIDXCO&,\ I1tO
	$STRRXBIQ==<Z SDBRXB>		
	IpA (<B>,SDBRXBC,D)B>,SDBRXBCO&,s oyg
	$STRSF=p=<Z F1>		
	A (<B>,F1C,D) (<O&,t p%
	$STRSIZ9==<Z SDBSIZ>		
	XA (<B>,SDBSIZC,D)B>,SDBSIZCO&,z 1Is(
	$STRSTSuq==<Z SDBSTS>		
	5A (<B>,SDBSTSC,D)B>,SDBSTSCO&- Tu$
	$STRTYPT!==<Z SDBTYP>		
	T@A (<B>,SDBTYPC,D)B>,SDBTYPCO&-1 Vu5
	$STRUC=V1=<Z SDBFLK>		
	VPA (<B>,SDBFLKC,D)B>,SDBFLKC,O&-2 U	u,
	$STRUDBU)==<Z SDBUDB>		
	UHA (<B>,SDBUDBC,D)B>,SDBUDBCO&-9 Wu=
	$STRUS=W9=<Z SDBFLK>		
	WXA (<B>,SDBFLKC,D)B>,SDBFLKC,O&. +qK+
	$STRX==51<Z SPTO>		
	A (<B>,SPTOC,D)OF= hivH
	$SXSTR=i	=<Z 2>		
	A (<B>,2C,D)A (<OMX2 /	j|
	$SYMAD=/)=<Z .SYMAD>		
	/HA (<B>,.SYMADC,D)B>,.SYMADC,OMY -jk
	$SYMDN=-1=<Z 0>		
	A (<B>,0C,D)A (<OMY: .jt
	$SYMET=.!=<Z .SYMAD>		
	.@A (<B>,.SYMADC,D)B>,.SYMADC,OM] ,1je
	$SYMTY=,Q=<Z 0>		
	A (<B>,0C,D)A (<OM]V 0k
	$SYMVL=01=<Z .SYMVL>		
	0PA (<B>,.SYMVLC,D)B>,.SYMVLC,R{S {)g\
	$TCONF={I=<Z F1>		
	A (<B>,F1C,D) (<R5d  ~Qoy
	$TFN1==~q<Z .FBSS1>		
	A (<B>,.FBSS1C,D)B>,.FBSS1C,R5d@ ap
	$TFN2==<Z .FBSS2>		
	A  (<B>,.FBSS2C,D)B>,.FBSS2C,RMXt <9[e
	$TIMCHN<Y==<Z 2>		
	A (<B>,2C,D)A (<RMXw }YWq
	$TIMCNT}y==<Z JOBRTL>		
	~A (<B>,JOBRTLC,D)B>,JOBRTLCRMYY :i[X
	$TIMFRK;	==<Z 2>		
	A (<B>,2C,D)A (<RMZW ;Q[_
	$TIMJOB;q==<Z 2>		
	A (<B>,2C,D)A (<RMZw =![l
	$TIMKNL=A==<Z 3>		
	A (<B>,3C,D)A (<RM[ 9![L
	$TIMLNK9A==<Z 0>		
	A (<B>,0C,D)A (<RM] :	[R
	$TIMTIM:)==<Z 1>		
	A (<B>,1C,D)A (<Rn	S Gd;
	$TMPFF=G9=<Z F>		
	A (<B>,FC,D)A (<Rn
	$TMPTF=]=<Z F>		
	A (<B>,FC,D)A (<SXr n	Vt
	$TRMCD=n)=<Z FKINT>		
	AnH (<B>,FKINTC,D)B>,FKINTC,DSXw p)W
	$TRMCODpI==<Z >		
	A (<B>,C,D)A (<Sls 4c#
	$TRNSF=41=<Z STS>		
	A (<B>,STSC,D)(Sd  Yp
	$TSN1==y<Z .FBSS1>		
	A (<B>,.FBSS1C,D)B>,.FBSS1C,Sd@ ip
	$TSN2==	<Z .FBSS2>		
	A( (<B>,.FBSS2C,D)B>,.FBSS2C,VuI7 9)kL
	$UNLEN=9I=<Z 0>		
	A (<B>,0C,D)A (<VuJs byf
	$UNLKF=c=<Z F1>		
	A (<B>,F1C,D) (<Vv: :kS
	$UNSHR=:1=<Z 1>		
	A (<B>,1C,D)A (<VvN8 8IkF
	$UNTYP=8i=<Z 0>		
	A (<B>,0C,D)A (<Vvh6 :ykY
	$UNVAL=;=<Z 2>		
	A (<B>,2C,D)A (<W

hw Qaw
	$UQFCN=q=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLEN= 9=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLJI=Y=<Z 0>		
	A(<B>,0C,D)A (<W

	$UQLNK=!!=<Z 1>		
	A (<B>,1C,D)A (<W)x hvB
	$USRGP=h!=<Z 2>		
	A (<B>,2C,D)A (<W+V gv;
	$USRNM=g9=<Z 2>		
	A (<B>,2C,D)A (<Z.)@ U9e-
	$VERF==UY<Z F>		
	A (<B>,FC,D)A (<BZ.,s s9g
	$VERSF=sY=<Z F1>		
	A (<B>,F1C,D) (<Z.- ZYeW
	$VERTF=Zy=<Z F>		
	A (<B>,FC,D)A (<^tI@ 21c
	$WNDF==2Q<Z STS>		
	A (<B>,STSC,D)(<_I@ 'b:
	$WRTF=='!<Z STS>		
	A (<B>,STSC,D)(<bI@ 'qbA
	$XCTF==(<Z STS>		
	A (<B>,STSC,D)(<b<r *JU
	$XGAGE=*1=<Z @CST0X>		
	*PA (<B>,@CST0XC,D)B>,@CST0XC,cH: cv
	$XPDAT=c1=<Z 1>		
	A (<B>,1C,D)A (<cH3 8cC
	$XQTAF=89=<Z STS>		
	A (<B>,STSC,D)(8u{P :P :5I`Q :ex`P(:ez`P :n:`P :|i@P :}IP ;0P ;,L ^N
	..TSIZ ^!(..PST,C)
	.CAS^@E ..PST,<<
	  XC^`TU [MOVEM A,B]>_,<
	  XCTU [HRRM_  A,B]>,<
	  XC_@TU [HRLM A,B]>,_`<
	  XCTBMU [DPB` A,[POINTR (B,C)]]>>NTR (B,;-I ZaMf
	..TSIZ [(..PST,C)
	.CAS[ E ..PST,<<
	  XC[@TU [MOVE A,B]>,[`<
	  XCTU [HRRZ \A,B]>,<
	  XCT\ U [HLRZ A,B]>,<\@
	  XCTBMU [LDB \`A,[POINTR (B,C)]]>>NTR (B,Ch6P T:P UzP V;P P ;xP H8P %HuP %\zP &\zP 4RP 4zP 4VP 4VP 4zP 48P 5{P 5|P 5|P 5|P 5|P ]Hh m9vk
	.CKLC2 (A)
	.CKLC2 ]Hi myvw
   IFB <nB>,<PRINTX % Datn8a item A in BUG'nXTYP TAG has no denxscriptor.>
    criptor.>
    S@P $-P %;P %J2P &hrP %	6P &uP &(uP &8uP &9VP 4uP 
4*{P 4HSP 4HWP 4YP 4\rP 4iP 5P 	5P 5

[P 
5

rPH5;PHP 5IP 5JP 5LP 5MP

5MSP

5\sP 6-P 69P 6<P 	6=P 6=P 6KP 6KvP 6KwP 7	7P 7sP 7wP MP  MP iQP 49SP 4i3P 4iRP @4jP 4j8P 4kP  4k\P 4kvP 4lrP $zP %h6P &[YP KHP

,9P ,=P ,JP ,KP ,KP ,i P -LP P iQP =|RQ &'P .dJ9P .diP .diyP .eIP .enP .f:P .fMPP 6

pP 6

rP 6

wP 6

yP ;)YP ;:P ;;P ;;RP ;<ZP ;H:P ;J9P ;LqP ;	P ;

zP ;4P ;QP ;ZP ;\4P ;\7P ;xRP ;xUP ;yP ;{7P ;{uP ;|P ;}:P ;

{P ;)P ;*P;*7P<;+P^;+wP;,yP;-P;:7P ;=P ;>[P ;LWP ;LwP ;\yP CkP I*	P I*

0PNO2PO<RPO=yPO$H:P~O%I7PO&P%~SLP%~SLIxP%~SLJ9P$`SLKVP%~SL^P$SLhZP$@SLiP$ SLlRP$ SLyP$`SM

tP%~SMH1P$@SMh6P$SMm6P%~SN+PP$SN>6P$SNYxP%~SN[VP%~SN[YP$SN}9P%~VtIRP [iyP [MPP [MPP >}{woP