Google
 

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_3_19910112 - monitor/prolog.unv
There are 52 other files named prolog.unv in the archive. Click here to see a list.
x
,S	Y@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@ ItJSP 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 0#~

LK DEV0!LKK,SLOW,LLCAL,DE0@VL0K
;LK BTLKK,F0`AST,LLCAL,BTL0K
1;LK DMPLKK,FAST,L1 LCAL,DMPL0K
;LK 1@FELKK,FAST,LLCAL,1`FEL0K
;LK IDVLKK2,FAST,LLCAL,IDVL02 K
;LK NCPLKK,FAS2@T,LLCAL,NCPL0K
;2`LK OUTLKK,FAST,LL3CAL,OUTL0K
;LK N3 ODLKK,FAST,LLCAL,3@NODL0K
;LK LLLLK3`K,FAST,LLCAL,LLLL40K
;LK STRLKK,SL4 OW,LLCAL,STRL0K
4@;LK LPTLKK,FAST,L4`LCAL,0
;LK MTALK5K,FAST,LLCAL,0
;5 LK CDPLKK,FAST,LL5@CAL,CDPL0K
;LK C5`DRLKK,FAST,LLCAL,6CDRL0K
;LK MTALK6 K,FAST,LLCAL,0
;6@LK PLTLKK,FAST,LL6`CAL,0
;LK PTPLKK7,FAST,LLCAL,PTPL07 K
;LK PTRLKK,FAS7@T,LLCAL,PTRL0K
;7`LK FGLKK,FAST,LLC8AL,FGL0K
;LK SNP8 LKK,FAST,LLCAL,SN8@PL0K
;LK USGLKK,8`FAST,LLCAL,USGL0K9
;LK ACTLKK,FAST9 ,LLCAL,ACTL0K
;L9@K ASCLKK,FAST,LLC9`AL,ASCL0K
;LK GO:KLKK,FAST,LLCAL,G: OKL0K
;LK TIMLKK:@,FAST,LLCAL,TIML0:`K
;LK CRJLKK,FAS;T,LLCAL,CRJL0K
;; LK LDTLKK,FAST,LL;@CAL,LDTL0K
;LK J;`STLKK,FAST,LLCAL,<JSTL0K
;LK DRCLK< K,FAST,LLCAL,DRCL<@0K
;LK JFNLKK,FA<`ST,LLCAL,JFNL0K
=;LK FILLKK,FAST,L= LCAL,FILL0K
LK E=@NQLKK,SLOW,GLLBAL=`,ENQL0K
LK PIDLK>K,SLOW,GLLBAL,PID> L0K
;LK JSFLKK,F>@AST,LLCAL,JSFL0K
;LK JBCLKK,FAST,?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 CN<d@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>=  $D
	IFN FTS@HOW,..LOC==.

`
DEFINE	WORD(NAM,NUMB<1>),<
	IFN  <..MSK>,<..OFF==.@.OFF+1> 

	..MS`K==0		
	FIELDM(NAM,<.FWORD>)	

 	..MSK==0		
	..O@FF==..OFF+NUMB	
`
>

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

>
`
DEFINE	FILLER(NUM),<
	..FLG==PO S(..MSK)
	IFE ..@MSK,<..FLG==-1>
`	IFG <^D<NUM>-<^D35-..FLG>>,<PRINT X ?FILL TOO BIG I@N A STRUCTURE>
`	...MSK==MASK.(^D<NUM>,<..FLG+^D<N UM>>)
	IFN FTSHO@W,<
	  PHASE ..O`FF
	  EXP ...MSK
	>
	..MSK==..M SK!...MSK
>

@

DEFINE	HWORD(n`am),<
	..FLG==0		
	IFE ..MSK&.LH ALF,<FIELDM(nam,.@LHALF)
			  ..FL`G==1>
	IFE ..FLG,<..MSK==..MSK!.L HALF
		   IFE ..@MSK&.RHALF,<FIELD`M(nam,.RHALF)
				     ..FLG==1>
		   IFE ..FLG,<@NXTWRD
			      `FIELDM(nam,.LHALF) >
		  >
>

 
DEFINE	FIELD(NA@M,SIZ,POS),<
	..`FLG==0		

	IFB <POS>,<IFB <SIZ>, <
	  ...MSK==.RT@MSK(<<^-<<..MSK>>`>>) 
	  IFE ...MSK,<..OFF==..OFF+ 1 
	    ..MSK==0@		
	    ...MSK==`-1
	  >
	  FIEL DM(NAM,<...MSK>)	  
	 @..FLG==-1		
	>>

	IFNB <SI `Z>,<.SIZ==^D<SIZ>!> 

	IFNB <POS>! ,<		
	  FIELDM(N!@AM,MASK.(.SIZ,POS!`)) 
	  ..FLG==-1"		
	  ..BITS==MA" SK.(.SIZ,POS) 
	"@>

	IFE ..FLG,<"`IFGE <^D<.SIZ>-^D#36>,< 
	  WORD(N# AM,<^D<.SIZ>/^D36#@>) 
	  IFN <<^D<#`.SIZ>-<^D<.SIZ>/^$D36>*^D36>>,<	
	$     FIELD(...,<<^$@D<.SIZ>-<^D<.SIZ>$`/^D36>*^D36>>) 
%	  >

	  ..FLG=% =-1		
	>>

	IF%@E ..FLG,<		
	  .%`.BITS==MASK.(^D<.&SIZ>,<^D<.SIZ>-1>& ) 

	  REPEAT <&@^D36-^D<.SIZ>+1>,&`< 
	    IFE ..FL'G,<	
	      IFE ' <..BITS&..MSK>,< '@
			..MSK==..MSK'`!..BITS 
		..FLG(==-1 
	       > ( 

	    IFE ..FL(@G,..BITS==..BITS_(`<-1> 
	    >
	 ) >

	IFE ..FLG,) <		
	  ..BITS==M)@ASK.(^D<.SIZ>,<^D)`<.SIZ>-1>) 
	  .*.OFF==..OFF+1	
	*   ..MSK==..BITS		*@
	>

	MSKSTR(*`A'NAM,\..OFFC,..+BITS) 
	A.'NAM=+ =..OFF
	IFN FTSH+@OW,<
	  PHASE	A+`.'NAM
	  EXP	A',NAM
	>>

	..OL, D==..BITS		
	...,@OLD==..BITS		

,`>

DEFINE	BIT(N-AM),<
	..BITS==L- FTBT.(..OLD)	

-@	IFE ..BITS,<PRIN-`TX ?NO ROOM FOR B.IT IN LAST FIELD>. 

	A%'NAM==..B.@ITS_<-<^D35-POS(..`..OLD)>> 
	A.'N/AM==..OFF		

	M/ SKSTR(A'NAM,\..O/@FFC,..BITS) 
	I/`FN FTSHOW,<
	  P0HASE ..OFF
	  EX0 P A'NAM
	>

	0@..OLD==..OLD&<^-<0`..BITS>> 

>
1
DEFINE	FIELDM(NA1 M,MASK),<
	IFN M1@ASK&..MSK,<	
	  1`..MSK==0		
	  ..2OFF==..OFF+1
	> 

	..MSK==..MSK!2@MASK	

	MSKSTR(2`A'NAM,\..OFFC,M3ASK) 
	A.'NAM==3 ..OFF
	IFN FTSHO3@W,<
	  PHASE	A.3`'NAM
	  EXP	A'N4AM
	>
>

DEFI4 NE ENDSTR(LENNAM<4@LEN>,LSTNAM<LST>)4`,<

	IFN ..MSK,5<..OFF==..OFF+1> 5 

	A.'LSTNAM==5@..OFF	

	IFN FT5`SHOW,DEPHASE

	6..LOK==..LOK+1
	6 IFN ..LOK,<PRINTX6@ ? MISSING BEGSTR6`>

	IF2,<
	  I7FDEF ...MSK,<SUPP7 RESS ...MSK>
	  7@IFDEF ..BITS,<SUP7`PRESS ..BITS>
	 8 IFDEF .SIZ,<SUPP8 RESS .SIZ>
	  IF8@DEF ..MSK,<SUPPRE8`SS ..MSK>
	  IFD9EF ..OFF,<SUPPRES9 S ..OFF>
	  IFDE9@F ..FLG,<SUPPRESS9` ..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,NXTWARD,FILLER,HWORD,FA IELD,BIT,FIELDM
A@
	A.'LENNAM==..A`OFF-B
	IFN FTSHBOW,<RELOC ..LOC>>B 



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

	CIFDEF ..LOK,<IFL C ..LOK,<PRINTX ? NC@EW BEGSTR WITHOUTC` ENDSTR>>

	..LOK==-1


	..L$!$!0$#BEG
	  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` &q;* 
   IF2,&Q<..NRGS==0
	IRP &1F,<
	  .CKLC1 (&F)
	  ..NRGS=..3ANRGS+1>	
4 IFG3` ..NRGS-BUGMXR,<
	  PRINTX %TOO M4 ANY LOCATIONS IN 4@DEFINITION OF BUG4`A B>>
    CONC5K$ (A,B,,,<F>,5 <E>,SAME,H,I) 
    E,H,I) 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 a9>
	IFB <AaY>,<CALL @[B]>
	axIFNB <A>,<CALL @[A,,B]>
LL @G
e4 '"8JSP CX,BLOCK0JSP CX,BLOG
e4  'A"<JSP CX,BLOCK1JSP CX,BLOG
e9("@JSPQCX,BLOCKEJSPCX,BLOGE  p2GE` p:GFX  p6GF[` p>GFh  p4GFk` p<Gd[@P Gt(P Gt)P GuyP Gw
VQ  GY@Q GKu ,"`
	NOSKD1
	AOSpSCAILKD1 ,A"d
	CALL CFSULL
	CALL CFGEm6P ?GF)P#|GF+ P#|G"]Z )A"L
	CALL CKINT0
	CALL CKG"uyS aY
	CONO PIay,PICHOF+1B<28+A>
   +1B<28+A>G"u{@ b9
	CONOPIbY,PICHON+1B<28+A>ICHON+1B<28+A>G&Y@Q  G'\Q G/:=P  G/	VP G2.7P G2~9P G3
	CONO PI`Y,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 7a=	

  IF28,<
   IFDIF <G>8 <SAME>,<		
     8@IFDIF <E>,<G>,<8`
	PRINTX %Option9al data in B dis9 agrees with defin9@ition of B>

9`
	LALL
	  ;BUGA: B, F
	       : SALL
   >>
IF1,:@<SYN B,TAGSAV   :` 		
PURGE B			
SYN TAGSAV,B			; 
PURGE TAGSAV>		;@	

IFDIF <A><H;`LT>,<		
	.PSECT <RSDAT		
k:	IFB < <I>,<EXP 0>	
	I<@FNB <I>,<EXP I><` 
	.ENDPS			
>	=			

IFB <H>,<= 
	XCT [
	B:: 	=@		
	  IFIDN <A>=`<HLT>,<
	     IF>E <<CURPSX-PXRESC> D>*<CURPSX-PXSWAP>@CD>>,<
		 JSR @X>`BUGHLT>
	     IF?N <<CURPSX-PXRESC? D>*<CURPSX-PXSWAP?@CD>>,<
		 JSR BU?`GHLT>
	  >
	@ I@FDIF <A><HLT>,<
	     IFE <<CURP@@SX-PXRESCD>*<CURP@`SX-PXSWAPCD>>,<
A		 PUSHJ P,@XBGCA A>
	     IFN <<CA@URPSX-PXRESCD>*<CA`URPSX-PXSWAPCD>>,B<
		 PUSHJ P,BGCB A>
	B@EXP k		
	  >
	  DOLOC0 B`<E>	
		SIXBIT /CB/
	  ]
>
IFNC B <H>,<
	JRST [C@
	       XCT [
C`	       B:: 			
	         IFIDN D <A><HLT>,<
		  D@ IFE <<CURPSX-PXRD`ESCD>*<CURPSX-PXSEWAPCD>>,<
		@   E    JSR @XBUGHLT>
		   IFN <<CURPSE`X-PXRESCD>*<CURPSFX-PXSWAPCD>>,<
	F 	       JSR BUGHLF@T>
		 >
	      F`   IFDIF <A><HLTG>,<
		   IFE <<CG URPSX-PXRESCD>*<CG@URPSX-PXSWAPCD>>,G`<
		       PUSHJH P,@XBGCA>
		  H  IFN <<CURPSX-PXRH@ESCD>*<CURPSX-PXSH`WAPCD>>,<
		    I   PUSHJ P,BGCA>I 
		 EXP k		
		I@ >
	         DOLI`OC0 <E>	
	     J          SIXBIT J /B/
	         ]J@
	       JRST HJ` ]		

>
IFDIF K<A><HLT>,<IF2,<	K 	
	.XCREF k		
K@	PURGE k		
>>		K`		
	XLIST
	.PSELCT BGSTR
j:!	ASL CIZ \F\
	.ENDPSL@ BGSTR
	.PSECT BL`GPTR
  IFE FTNSPMSRV,<
  IF1,<	0	M 		
	0
	%ST1=MSEM@C1		
	%ST1=SYMSEM`C		
	%ST1=XCDSECN
	PURGE %ST1>
 N  IF2,< IFE <<CURPN@SX-PXRESCD>*<CURPN`SX-PXSWAPCD>>,<
O	XWD XCDSEC,B>
O 	IFN <<CURPSX-PXRO@ESCD>*<CURPSX-PXSO`WAPCD>>,<
	XWD MPSEC1,B>
	XWD SYP MSEC,j
	.XCREF P@j
	PURGE j>
 P` >
  IFN FTNSPSRQV,<
  IF1,<	0>		Q 	
  IF2,<	XWD BQ@,j
	.XCREF j
Q`	PURGE j>
  >
R	.ENDPS BGPTR
	LIST
 BGPTR
	LG?QMG?YQG?[Q ,G?X@PGBpPRGC@PGCN-,FiD6.CPYRT%198835SCGJwUQ @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` m	f
   IF1,<	Q
	IFG B-15,<PRIpANTX ?**INVALID REkDEFINITION OF AC IB**>
	IFL B-1,h<PRINTX ?**INVALI
D REDEFINITION OF
( AC B**>
	A=B
H
	PURGE B,B
	
hDEFINE B<%B%>>EFINE B<%B%>>I6= np'
	A==<-1oB<C>+1B<C-D>> o0
	IF1,<IFDEF %AoP,<PRINTX ?A ALREopADY DEFINED>>
	DpEFINE %A (OP,AC,p0Y,MSK)<
	$A==<ZpP 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 RA=
	IRP A,<DOLOC2 A> A,I>exh SA=
	Z A
   
	Z A
 I>exi S=
	DOLOC1 (A)
	DOLOC1 I>lQ xI>u\`Q I>v9`Q I?0 ai(6
   DEFIN{YE A (NAM,SIZ)<
{9	NAM=:..PC
	..PC|=..PC+SIZ>
   DE!FINE SA (NAM,SIZA)<
	NAM==:..PC
a	..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 CY,
	A=:..PCyC
	..PC=..PC+B
	..PC=..PC+BIR(2 !!`
    IFNBA <A>,<
	IFIW![M`OVEI T1,A
		RET]>
    IFB <A>,<
	 IFIW!R>
,IRLx !bIFIW!AIRI7P IRK@P IR:x a!V	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 a!n
	JSP CX,$EAENT
	JSP CX,K92 #A"JSP CX,ECSKD0JSP CX,ECSK3-9P K7] a!@
	IFNB <AB>,<
	JRST [	 B
	   IFNB <A>,@<MOVEI T1,A>
		`JRST EMRET0]>
	IFB <AB>,<
	JRST EMRET0>
	JRSK:
+Q  K:$`Q  K:&= hi70-H

	IFN .i!.MSK,<..OFF==..OFi@F+1> 

	RN.B==i`..OFF	

	IFN FTjSHOW,DEPHASE

	j ..LOK==..LOK+1
	j@IFN ..LOK,<PRINTXj` ? MISSING BEGSTRk>

	IF2,<
	  Ik FDEF ...MSK,<SUPPk@RESS ...MSK>
	  k`IFDEF ..BITS,<SUPlPRESS ..BITS>
	 l  IFDEF .SIZ,<SUPPl@RESS .SIZ>
	  IFl`DEF ..MSK,<SUPPREmSS ..MSK>
	  IFDm EF ..OFF,<SUPPRESm@S ..OFF>
	  IFDEm`F ..FLG,<SUPPRESSn ..FLG>
	  IFDEFn  ..LOK,<SUPPRESS n@..LOK>
	  IFDEF n`..LOC,<SUPPRESS .o.LOC>
	  IFDEF .o .OLD,<SUPPRESS ..o@OLD>
	  IFDEF ..o`.OLD,<SUPPRESS ..p.OLD>
	>

	IF1p ,<
	  IFDEF ...Mp@SK,<.XCREF ...MSKp`>
	  IFDEF ..BITqS,<.XCREF ..BITS>q 
	  IFDEF .SIZ,<q@.XCREF .SIZ>
	  q`IFDEF ..MSK,<.XCRrEF ..MSK>
	  IFDr EF ..FLG,<.XCREF r@..FLG>
	  IFDEF r`..OFF,<.XCREF ..OsFF>
	  IFDEF ..Ls OK,<.XCREF ..LOK>s@
	  IFDEF ..LOC,s`<.XCREF ..LOC>
	t  IFDEF ..OLD,<.Xt CREF ..OLD>
	  It@FDEF ...OLD,<.XCRt`EF ...OLD>
	>
u
	PURGE WORD,NXTWu RD,FILLER,HWORD,Fu@IELD,BIT,FIELDM
u`
	RN.A==..OFF-0v
	IFN FTSHOW,<RELOC..LOC>W,<RE	JmJfLENPCJhLSTPBK;
	ERJMP a
a:!
RJMP KK`Q KK+8 A!F
	JRST [	aMOVEI T1,A
		JRST B],A
		JRKK:=P KK-k a!j
	JRST [	B
		IFDIF <A>, <>,<MOVEI A,A>
		JRST ERUNLD]
Kb5HZQ ~Kbd[@P Kc8ZQ Kc<`P Kc8ZQ xKc  7yC
   IF2,<8
	IRP A,<
	IFN88DEF A,<EXTERN A
	SUPPRE A>>>Kc$`P @Kc$i@P  Kc%,qP Kc%` !r
	IRP A,<
	EXTERN A>,Kc&9@Q Kc&I@P @Kc'	@Q Kc'Q xL@ M@P M,QQ M,I6Q M,J9Q @M- M-KSQ M-iP$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
tKP$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/. #Y#
	IFIDN <#yB><L>,<A==<D>B$17>
	IFIDN <B><$8R>,<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 $" AOS QSKED"AOS 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` n)>rIFN CTSFLG,IFN CTSFLGMR"5VP MR$XZP MR'@ mi>nIFN DYNFLG,IFN DYNFLGMREzP MRE[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 $y/
	IFIDN <%B><L>,<A==:<D>%8B17>
	IFIDN <B>%X<R>,<A==:D>
	M%xSKSTR (A,C,A)KSTR (A,C,A)O2d(6Q  O:Ti@Q @O?I3 Z!
	OPDEF ZAA [<B>]
	INTERN AB>]
	INTERNON~	 [
	OPDEF [!A [B]
	INTERN A
	.NODDT A OR};  A!
	SKIPGE aCX,GTOKPR+A	;SEE IF NEED TO VERIF Y IT
	SKIPA			;Y@ES. DO VERIFICATI`ON CODE THEN
	TXNN CX,SF%DOK		;IF  DEFAULT, NEED TO@ VERIFY
	CALL [	`JUMPGE CX,[MOVEI T1,GOKER2 ;IF DEN Y
			   RETSKP] @;INDICATE SUCH
	`	ADJSP P,4	;ALLOC	ATE STACK
		DMOV	 EM T1,-3(P)		;SAV	@E TEMPS
		DMOVEM	` T3,-1(P)
		PUSH
 P,[0]
		..GOKN=
 =1
		IRP B,<
	
@	..GOKN=..GOKN+1
`
		PUSH P,B>
		MOVEI T3,..GOKN
 		MOVEI T1,A
		@MOVEI T2,1-..GOKN`(P)
		IFB <D>,<
SETZ T4,>
		IFNB
  <D>,<MOVEI T4,
@D>
		CALL GETOKM
`		;CALL MONITOR R
		MJRSTT[-2-..GOK
			DMOVE T3,-1-..GOKN(P)
			ADJS P P,-..GOKN-4	;RE@SET STACK
			RET`SKP] 
		DMOVE T1,-3-..GOKN(P)	;RE STORE AC'S
		DMO@VE T3,-1-..GOKN(P`)
		ADJSP P,-..GOKN-4	;RESET STAC K
		RET]		
	 SK@IPA		
	IFNB <C>`,<JRST C> 
	IFB <C>,<ITERR ()>
C>,<ITERR()>Q*+uQQ-VQ%Q-]7Q Q.
   IFNB %!<A>,<
	MOVEI 2,%@A>
	JSP CX,EDMSH
	JSPCX,EDMSQ&kQ @Q2$`P Q3$`Q QZ.)@Q @QqP S@Z;P SDh@P'SDi`Q ~SDkP$SDkP SE@Q SE@Q SF9Q xS]@ ]!
   IFN KLFLG,<
	A>N KSP ]a
   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 A (
	JSP CX,aIMCLL0
	IFB <B>,<A>
	IFNB <B>,<B,,A>
-@>S6kQ @S6l;rP S7:P S:$;rP S:$@P 	S:MHu -$			;Initia-!lize lock blocks
	PUSH P,T1
	PUS-`H P,T2
	IFNB <B.>,<MOVE T2,B>
	. HRRZ T1,[A]
	MO.@VE T1,LCKTAB(T1)	.`	;Get address of /lock block
	IFNB/  <B>,<ADD T1,T2>/@
	SETOM LOKWRD(T/`1)		;Initialize l@pock
	SETOM LOKFR@QK(T1)		; And fork@1
	SETZM LOKCNT(TAI1)		; And count oAhf times locked
	BSETZM LOKHLD(T1)	B(	;TURN OFF QUICK BHLOCKING
	MOVE T2Bh,[A]			;Get flagCs and index
	MOVC(EM T2,LOKFLG(T1)	CH	; and store
	POChP 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{PSN 
	CONO PI^A,PISPIR+1B<28+A>ISPIR+1B<28+A>SR.,@ A! 
   IFNB a<B>,<
	JRST [	B
     IFNB <A> ,<MOVEI T1,A>
	@	JSP T2,ITRAP1]>
   IFB <B>,<
     IFNB <A>,<
 	JSP T2,[MOVEI T1@,A
		JRST ITRAP`1]>
     IFB <A>,<
	JSP T2,ITRAP1>>JSP T2,ITRASR.. A!$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 ^i&

	..TRR==_	10		
	RADIX 8
	_(..NV==0			
	IRP _HA,<
	  .TRV1 (_hA)>		
	JSP CX,.J`SSET##		
    IFB`( <B>,< ..NV+1,,0`H >
    IFNB <B>`h,< ..NV+1,,B >
a	RADIX ..TRR		
	a(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 D,#
	A=:..PD9C
	..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 @W2Q W2K@P W2%@P'W25I`P W3HSP W3
@P'W3L@QxW3%K@QxWB U
	MOVSI 9A,B		;A/ (MONITXOR START ADDRESS,x,USER A 0)
	XCT 4,[BLT A,17]	;C8OPY FROM MONITOR XMEMORY TO USER AS
	POYUSER AYw
+zP  YKxP Y, H
	Di 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 *A"X
	AOSE A*a
	IFB <B>,<
	 + CBLK1	>
	IFNB <B>,<
	  B> <Y>=qQ @Y>\;ZP Y>\kP Y>\lRP Y>\lUP Y>]P Y>]P Y>]0 D)%@
IFNB <ADI>,<
    IFGE A,Dh<
d:	PUSH P,T1
	PUSH P,T2
	IFNE(B <C>,<MOVE T1,EHC
		    ADD T1,LEhCKTAB+<777777&A>F
	>			;END OF IFF(NB
	IFB <C>,<MOFHVE T1,LCKTAB+<777Fh777&A>>
	CSKED
	AOSE (T1)
	IFBG( <B>,<CBLKE>
	IGHFNB <B>,<
	IFNSGhK.
	   ECSKED
	H   POP P,T2
	   H(POP P,T1
	   SKIHHPA
	   JRST d		Hh;THIS LINE IS FORI B CODE THAT
		I(		; BELIEVES THISIH IS THE LOCK PC
Ih	   B
	   JRST Jg
	ENDIF.
	>		J(	;END OF IFNB
	MJHOVEI T1,777777&AJh	;GET NAME OF LOCKK
	MOVE T1,LCKTAK(B(T1)	;GET IT'S DKHATA BASE
	MOVE TKh2,FORKX		;GET CURLRENT FORK
	MOVEML( T2,LOKFRK(T1)	;SLHAVE IT IN DATA BALhSE
	POP P,T2
	PMOP P,T1
g:
   M( >				;END OF IFGMHE
    IFL A,<
Mhe:	PUSH P,T1
	PNUSH P,T2
	IFB <N(C>,<SETZ T2,>
	INHFNB <C>,<MOVE T2Nh,C>
	MOVE T1,[OA]
	CALL GETLOK
	 IFB <B>,<CBLKOH1>
	 IFNB <B>,<Oh
	 IFNSK.
	    PPOP P,T2
	    POP(P P,T1
	    SKIPPHA
	    JRST e		Ph;THIS LINE IS FORQ B CODE THAT
		Q(		; BELIEVES THISQH IS THE LOCK PC
Qh	    B
	    JRSRT h
	 ENDIF.
	R( >			;END OF IFNBRH
	POP P,T2
	POPRh P,T1
h:
    >S				;END OF IFL
S(>				;END OF IFNBSH
IFB <A>,<
f:Sh	PUSH P,T1
	PUSHT P,T2
	SETZ T2,
	MOVE T1,C
	CATHLL LOKTYP
	 IFB Th<B>,<CBLK1>
	 IUFNB <B>,<
	 IFNU(SK.
	    POP P,TUH2
	Uh  POP P,T1
	    SKIPA
	   V JRST f		;THIS LV(INE IS FOR B CODVHE THAT
				; BELVhIEVES THIS IS THEW LOCK PC
	    BW(
	    JRST i
	WH ENDIF.
	>			;ENWhD OF IFNB
	POP PX,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@ Lh4f<<<1<A>>-1>B<B>><A>>[8@ M(4j<1B<<A>-1>-1B<B>><A>-1[D^P [ERP [EH`P [EM`P [EiP [F8hP 
%QP[HSP@[-mK07700)[-m}yoJSPNCX,MENT0JSPCX,MEN[N;9$A"$JSPCX,EDMS0JSPCX,EDM[$,-Q[$,JQL[$-1Q [$-\sQ [$.(wQ  [$.)YQ @[$.8tQ @[$/
`Q @[NHSP [N^= T5-
	A==C	T0	
	IF1,<IFDEF %TPA,<PRINTX ?A ALRTpEADY DEFINED>>
	UDEFINE %A (OP,ACU0,Y,MSK)<
	$A==<UPZ 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] \A
   IFNDE\aF A,<
	A==B> A,<
	A==B>]8 [a
   IFNDE\F A,<
	A==:B>A,<
	A==:B>]<`P@]<`P]<jbQ]=(BQF]=i@Qw]>i@P]&=`P]3'P]3-9PS]6d[@P]7'QSx]74Q]:CX,NOSKD0JSP CX,NOS]?L@P']?%XqQ ]BMI;P ]H +a
	.PSECT +9NRVAR
	IFB <B>,+X<
A::	BLOCK 1>
	IFNB <B>,<
A,::	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 ~_t<tP _tK7Q  _tM(Q _tM2Q _t\YQ @_u
`P'_uH1Q _uYqP _unP'_v
[Q xv:Q xv[P v|QQ ~`Q x
@Q _.Mm )"HXCT INTDFFXCT INTDFF_/9 "A"JSP CX,OKSK11JSP CX,OKS_/92 !A"
JSP 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 &"0JSP 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 a6~`Q a>ti@Q a? ^H5t<^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 &A"4JSP CX,SCHEDRJSP CX,SCHelz pPe\S p@e
I@Q  e`P e}:P et@P ei9Q e,{P e9 .9
	.ENDPS
	CURPSX==PRESCD
   IFB <A><
	./PSECT RSCOD
   >/8
   IFIDN <A><I/XNIT><
	.PSECT IN/xCOD
   >
   IFI0DN <A><SEC0><
	08.PSECT SZCOD
   >
T SZCOD
   eM -Yo
	.ENDPS
	.PSECT RSDAT
	.PSECT RSDAT
ekP!e
{P e  ,~e$(2 !!R
	IFNB <AAB>,<
	JRST [	`B
	   IFNB <A>,<MOVEI T1,A>
		 RET]>
	IFB <AB>,<
	RET><ABe$\Y !2
	IFNB <!AB>,<
	JRST [	@B
	   IFNB <A>,`<MOVEI T1,A>
		JRST MRETNE]>
	I FB <AB>,<
	JRST MRETNE>
	JRSe&:xTKPjJRST 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 &9;
	.PSECT &YRSVAR
	IFB <B>,&x<
A::	BLOCK 1>
	IFNB <B>,<
A'8::	BLOCK B>
	.ENDPS RSVAR
	.EeL,|WQ @eL.9(Q @eNEI7P eNH 'yU
	.PSECT (RSDAT
A::	IRP (8B,<
	B
	>
	IF(XNB <C>,<
	IFG <(x<C>-<.-A>>,<BLO)CK <C>-<.-A>>
)8	IFG <.-A-<C>>,)X<IF2,<PRINTX %DEF)xINITION OF A EXC*EEDS WORD COUNT
*8>>
	>			;END OF *XIFNB

	.ENDPS
NB

	.ENDPS
eO{`Q xeO@P'eO%I7P eSN	@Q eZ`P eZ.)@Q f@t[Z !!r
	JSP CX,$S0ENT
	JSP CX,fGD= f>C
  IFE CUf9RPSX-PXRESCD,<
	fXTORESCD
	A
	TOfxXRESCD
  >
  IFgE CURPSX-PXSWAPCDg8,<
	TOSWAPCD
	gXA
	TOXSWAPCD
  gx>
  IFN <<CURPSXh-PXRESCD>*<CURPSXh8-PXSWAPCD>>,<
	A
  >
>,<
	g4\ 	xJSP CX,SAVPJSP CX,SAVg4\ 	JSP CX,SAVPQJSP CX,SAVg4\  I|JSP CX,SAVQJSP CX,SAVg4] IJSP 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$  KA,^
	A==:..KaPC
	..PC=..PC+B
	..PC=..PC+Bg[Z  A"CALL SE0CALCALL SE0CAg
86  "CALL SECALECALL SECALg
[ZA!|CALL SECALLCALL SECALgLQ gyYQ `g
	1B0+FLD
(A,SEBOFS)+FLD(eiB,SEBTYP)+<Z C>,SEBTYP)+<Z C>gN8Q g
{P g:=Q g&y cYD
	LOAD CXc9,VMADR,A
	TXO CcX,PGLPCS		;SAY LOhIAD 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+$  Dy,)
	A==:..EPC
	..PC=..PC+B
	..PC=..PC+Bg.,L{Pg.N\P"g2~pQ@g3-9Pg65I`P{g7]A@JRSTgSKMRTNJRSTQSKMRTg@,(:Q@g@,IYQNg@,[Q9g@,kQg@-{Q9gC$,@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
PgR]^gP gRv,`Q gR|l`P$gSg a
	MOVEI 9A,B		;A/ (USER XA 0,,MONITOR STAxRT ADDRESS)
	XCT 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 ~gSJ7Q gSK9Q gSN8Q gSX`Q xgSYQ gS\`Q xgSP'gS@P'gWjbQ @g^r ,Yi
	.ENDPS
	.PSECT NRCOD
	-CURPSX==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 Uy=+
	TSTMS0
	XJRST .+1
	XWDU9 MSEC1,a
	RESCD
a:!

	RESCDi?x8 ^9=w
	TSTMS0
	XJRST .+1
	XWD^x MSEC1,a
	SWAPCD
a:!
	SWAPCi?F)9 _9=
	TSTMS0
	XJRST .+1
	a
	XRESCD
a:!
	XRESCD
a:!
i?F=p `9>
	TSTMS0
	XJRST .+1
	a
	XSWAPCD
a:!
XSWAPCD
a:!
iJl9P iJl;rP iJv9@Q  iKSQ @iK=Q  iNrQ xiNr Q xiO%Z *"PSKIPE PSIBWSKIPE PSIBiO%\h a!x
   IFN SEC0SW,<		
	JSPCX,$TSMS0>	JSPCiPt=PiPti P iPuH4P iPuXqP iPv
	SALL
	3.DIRECT FLBLST
O38URTTL==SIXBIT /A3X/		
	TITLE AC
IFB <B>,<ENTRY 4$A
	$A==:0>
I48FNB <B>,<ENTRY $4XB
	$B==:0>
	S4xEARCH MONSYM,MACS5YM
	CPYRT			
	.58XCMSY			
	.PSECT5X RSCOD
	CURPSX==5xPRESCD
6IF2,<
	SEARCH GLOBS		
	GGLOBS			
	PUR6XGE GGLOBS		
   >6x
	DEFINE TNXEND 7<
	XLIST
LA...78.:	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 EY,-CALL ULKMD0CALL ULKMDk2| Yg
	..STR0 y(..ULDB,A,B,C).ULDB,A,B,C)k6|I@Q k6~i  	@
	XCTU [MOVE A,B]TU [Mk6~i6 YE
	XCTU [MOVEM A,B]U [Mk:*` a	
	JRST ACHR##
	JRST Ak:d[@P k:e9@P  k:exu +A"\
	SETOM A
	SETOM k:ezu XI%r
IFNB <AXi>,<
    IFGE A,Y<
	PUSH P,T1
	IY(FNB <B>,<	MOVE TYH1,B
			ADD T1,LYhCKTAB+<777777&A>Z
>
	IFB <B>,<MZ(OVE T1,LCKTAB+<77ZH7777&A>>
	SETOMZh (T1)
	ECSKED
	[POP P,T1>
    IF[(L A,<
	PUSH P,T[H1
	PUSH P,T2
	I[hFB <B>,<SETZ T2,\>
	IFNB <B>,<MO\(VE T2,B>
	MOVE \HT1,[A]
	CALL RE\hLLOK
	POP P,T2
]	POP P,T1>>
IFB ](<A>,<
	PUSH P,T]H1
	PUSH P,T2
	S]hETO T2,
	MOVE T1^,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; 	<



	S)PCSAV(.SAV11,<1>)H
	SPCSAV(.SAV22,h<2>)
	SPCSAV(.SAV33,<3>)
	SPCSAV((.SAV44,<4>)
	SPHCSAV(.SAV12,<1,2>h)
	SPCSAV(.SAV13,<1,2,3>)
	SPCSA(V(.SAV34,<3,4>)
H	SPCSAV(.SAV24,<2h,3,4>)
	SPCSAV(SAVT,<1,2,3,4>)
	(SPCSAV(.SAV1,<5>)H
	SPCSAV(.SAV2,<h5,6>)
	SPCSAV(.SAV3,<5,6,7>)
	SP(CSAV(.SAV4,<5,6,7H,<^D8>>)
	SPCSAVh(SAVP,<<^D8>,<^D9>,<^D10>,<^D11>,<(^D12>,<^D13>>)
	HSPCSAV(SAVPQ,<5,6h,7,<^D8>,<^D9>,<^D10>,<^D11>,<^D12(>,<^D13>>)
	SPCSHAV(.SAVP1,<<^D8>>)
AVP1,<<^D8>>kO%|@  9
	..STR0  Y(..UDPB,A,B,C).UDPB,A,B,C)m
:P m`P  m9@Q mI@P  m3-9P m6
L@Q mB=k`Q ~mL-J1Q @mL-MPQ  mNK@P mN,;WQ xo:$`Q @oBpP oJ5 poK  pDoK$`Q q$LG m>i<A+<RSKP-RSKP>>A+<RSKP-q
fK: +Hq
fM6 +Bq
fM:+Jq
	EA.ENT
	IFB <A>,<CALL bx@[B]>
	IFNB <Ac>,<CALL @[A,,B]>
LL @[A,,B]q
	EA.ENT
	IFB <A>,<XJRSTe8 [B]>
	IFNB <AeX>,<XJRST [A,,B]>
RST [A,,B]q$+: +Bq$-  +Fq$-: +Nq$`Q q&P +Hq&]  +Xqv@ >eXA
q
y Q @q+ cY>#
	EA.ENT
	IFB <B>,<JSP dA,@[C]>
	IFNB <d8B>,<JSP A,@[B,,C]>
A,@[B,q:-m jy>c
	SWAPCD
IFB <B>,<A: XCk8ALLRET (,XA)>
IkXFNB <B>,<A:: XCkxALLRET (,XA)>
	lXSWAPCD
XA:
.Il8F A,INTERNAL,<INTERNAL XA>
INqB$Qq?qB~:+HqC
	RESCD
iIFB <B>,<A: XCAi8LLRET (,XA)>
IFiXNB <B>,<A:: XCAixLLRET (,XA)>
	XjRESCD
XA:
.IF j8A,INTERNAL,<INTERNAL XA>
INTEqJ.8r 0y
	.ENDPS
	.PSECT XRCOD
	18CURPSX==PXRESCD
RPSX==PXRESCD
qO< 1y
	.ENDPS
	.PSECT XNCOD
	28CURPSX==PXSWAPCD
PSX==PXSWAPCD
	$ABFLG=B=<Z ADRBRK>		
	B8A (<B>,ADRBRKC,D)B>,ADRBRKC,K{ C
	$ABLOW=C!=<Z ADRBRK>		
	C@A (<B>,ADRBRKC,D)B>,ADRBRKC,\ D	$
	$ABUPP=D)=<Z ADRBUP>		
	DHA (<B>,ADRBUPC,D)B>,ADRBUPC,; ,!:d
	$ACCLS=,A=<Z 2>		
	A (<B>,2C,D)A (<I7 z/S
	$ACLEN=z1=<Z 0>		
	A (<B>,0C,D)A (<h6 .Y:w
	$ACNAM=.y=<Z 4>		
	A (<B>,4C,D)A (<
	$ACPTR=.=<Z 3>		
	A (<B>,3C,D)A (<+ y(	
	$ACRLFF==<Z STS>		
	A (<B>,STSC,D): zy/Y
	$ACSHR={=<Z 1>		
	A (<B>,1C,D)A (<I@ )[
	$ACTF==9<Z F>		
	A (<B>,FC,D)A (<BIS -y*q
	$ACTFF=.=<Z F1>		
	A (<B>,F1C,D) (<M Y)
	$ACTTF=y=<Z F>		
	A (<B>,FC,D)A (<N8 y1/M
	$ACTYP=yQ=<Z 0>		
	A (<B>,0C,D)A (<h6 {a/b
	$ACVAL=|=<Z .ACVAL>		
	| A (<B>,.ACVALC,D)B>,.ACVALC,$.: eQF/
	$ADBYT=eq=<Z 1>		
	A (<B>,1C,D)A (<$D, IyQ
	$ADD18=J=<Z 1>		
	A (<B>,1C,D)A (<$DK JaX
	$ADD27=K=<Z 1>		
	A (<B>,1C,D)A (<%W ;ab
	$ADIRN=<=<Z ALOC1>		
	A<  (<B>,ALOC1C,D)B>,ALOC1C,D%I7 dqF)
	$ADLEN=e=<Z 0>		
	A (<B>,0C,D)A (<EI7 gqFA
	$AHLEN=h=<Z 0>		
	A (<B>,0C,D)A (<T9 LYDg
	$AJCDA=Ly=<Z 2>		
	A (<B>,2C,D)A (<T<z M9Dm
	$AJCST=MY=<Z 2>		
	A (<B>,2C,D)A (<Tk KqDa
	$AJFLG=L=<Z 1>		
	A (<B>,1C,D)A (<U)W PQE
	$AJJFN=Pq=<Z 5>		
	A (<B>,5C,D)A (<UH: BiDr
	$AJLAT=N!=<Z 3>		
	A (<B>,3C,D)A (<UI7 J!DT
	$AJLEN=JA=<Z 0>		
	A (<B>,0C,D)A (<UJ7 NiDx
	$AJLIN=O	=<Z 4>		
	A (<B>,4C,D)A (<U[r K	DZ
	$AJMOD=K)=<Z 1>		
	A (<B>,1C,D)A (<U\u OIE
	$AJMSK=Q9=<Z 11>		
	A (<B>,11C,D) (<V
W OqE
	$AJPRO=P=<Z 5>		
	A (<B>,5C,D)A (<d=r :YY
	$ALCWD=:y=<Z ALOC1>		
	A; (<B>,ALOC1C,D)B>,ALOC1C,Dex| si 
	$ALOCX=t	=<Z SPT>		
	A (<B>,SPTC,D)(l)s $y*)
	$AMBGF=%=<Z F1>		
	A (<B>,F1C,D) (<-6 =ICn
	$APBUL==i=<Z 12>		
	A (<B>,12C,D) (<; .ABv
	$APCLR=.a=<Z 1>		
	A (<B>,1C,D)A (<<U /1B}
	$APCRJ=/Q=<Z 1>		
	A (<B>,1C,D)A (<[v 2C
	$APEOM=2!=<Z 1>		
	A (<B>,1C,D)A (<2 51D,
	$APIAD=EA=<Z 21>		
	A (<B>,21C,D) (<6 F	D2
	$APIAL=F)=<Z 22>		
	A (<B>,22C,D) (<X IADN
	$APIBP=Ia=<Z 24>		
	A (<B>,24C,D) (<z GyDA
	$APICT=H=<Z 23>		
	A (<B>,23C,D) (< HYDG
	$APIHT=Hy=<Z 23>		
	A (<B>,23C,D) (<W GD;
	$APINO=G1=<Z 23>		
	A (<B>,23C,D) (<)W ?C{
	$APJFN=?1=<Z 13>		
	A (<B>,13C,D) (<+q >1Cu
	$APJOB=>Q=<Z 13>		
	A (<B>,13C,D) (<H: :C`
	$APLAT=<=<Z 11>		
	A (<B>,11C,D) (<HX 91CM
	$APLBP=9Q=<Z 5>		
	A (<B>,5C,D)A (<I7 &B3
	$APLEN=&1=<Z 0>		
	A (<B>,0C,D)A (<L 8ICF
	$APLPS=8i=<Z 4>		
	A (<B>,4C,D)A (<h1 -QBo
	$APNAB=-q=<Z 1>		
	A (<B>,1C,D)A (<hX oiBE
	$APNBP=(Q=<Z 1>		
	A (<B>,1C,D)A (<hv ,aBh
	$APNCL=-=<Z 1>		
	A (<B>,1C,D)A (<j1 )!BL
	$APNIB=)A=<Z 1>		
	A (<B>,1C,D)A (<j7 +qBa
	$APNIO=,=<Z 1>		
	A (<B>,1C,D)A (<j9 5QC/
	$APNIR=5q=<Z 1>		
	A (<B>,1C,D)A (<kr +BZ
	$APNOD=+!=<Z 1>		
	A (<B>,1C,D)A (<kz 61C5
	$APNOT=6Q=<Z 1>		
	A (<B>,1C,D)A (<lT *BS
	$APNRI=*1=<Z 1>		
	A (<B>,1C,D)A (<lW 3aC 
	$APNRO=4=<Z 1>		
	A (<B>,1C,D)A (<lx 7C;
	$APNSP=79=<Z 2>		
	A (<B>,2C,D)A (<x2 !C@
	$APOAD=8=<Z 3>		
	A (<B>,3C,D)A (<xU <iCh
	$APOBJ==	=<Z 12>		
	A (<B>,12C,D) (<xY AAD
	$APOBS=Aa=<Z 15>		
	A (<B>,15C,D) (<xz @aD
	$APOCT=A=<Z 15>		
	A (<B>,15C,D) (<} 2qC
	$APOTO=3=<Z 1>		
	A (<B>,1C,D)A (<	9 0!C
	$APPER=0A=<Z 1>		
	A (<B>,1C,D)A (<)0 ;C[
	$APREA=;9=<Z 10>		
	A (<B>,10C,D) (<* ei0
	$APRHO=f	=<Z >		
	A (<B>,C,D)A (<B+7 d!$
	$APRMO=dA=<Z >		
	A (<B>,C,D)A (<B+; e	*
	$APRMVRe)==<Z >		
	A (<B>,C,D)A (<+V fI6
	$APRNM=fi=<Z >		
	A (<B>,C,D)A (<B:0 @9D
	$APSIA=B)=<Z 16>		
	A (<B>,16C,D) (<:1 CD
	$APSIB=C1=<Z 17>		
	A (<B>,17C,D) (<:1 DYD'
	$APSIC=Dy=<Z 20>		
	A (<B>,20C,D) (<:: CyD!
	$APSIT=D=<Z 20>		
	A (<B>,20C,D) (<:< :9CU
	$APSIX=:Y=<Z 6>		
	A (<B>,6C,D)A (<= 'aB@
	$APSTS=(=<Z 1>		
	A (<B>,1C,D)A (<N 4QC'
	$APTXF=4q=<Z 1>		
	A (<B>,1C,D)A (<N8 &yB9
	$APTYP='=<Z 1>		
	A (<B>,1C,D)A (<xq 1C
	$APWCC=11=<Z 1>		
	A (<B>,1C,D)A (<2 <AC
	$APXAD=?y=<Z 14>		
	A (<B>,14C,D) (<
} :3U
	$ARPSZ=:1=<Z .FBBBT>		
	:PA (<B>,.FBBBTC,D)B>,.FBBBTC,L Bq4
	$ARTP1=C=<Z .FBTP1>		
	C0A (<B>,.FBTP1C,D)B>,.FBTP1C,L	 F44
	$ARTP2=F!=<Z .FBTP2>		
	F@A (<B>,.FBTP2C,D)B>,.FBTP2C,y@ t'"
	$ASGF==t!<Z STS>		
	A (<B>,STSC,D)(<yI []
	$ASGF2=[9=<Z FILST1>		
	[XA (<B>,FILST1C,D)B>,FILST1C,H3 Y)
	$ASTAF=y=<Z F>		
	A (<B>,FC,D)A (<I@ s'
	$ASTF==s1<Z STS>		
	A (<B>,STSC,D)(<$Y |	?d
	$ATABR=|)=<Z .ATMST>		
	|HA (<B>,.ATMSTC,D)B>,.ATMSTC,$- IAf
	$ATBTN=i=<Z 6>		
	A (<B>,6C,D)A (<$.\ zy?[
	$ATBZY={=<Z .ATMST>		
	{8A (<B>,.ATMSTC,D)B>,.ATMSTC,$;x va?8
	$ATCOP=w=<Z 3>		
	A (<B>,3C,D)A (<$<U AM
	$ATCRJ=1=<Z .ATUST>		
	PA (<B>,.ATUSTC,D)B>,.ATUSTC,$H8 uy?1
	$ATDAP=v=<Z 2>		
	A (<B>,2C,D)A (<$I; $IB&
	$ATDEV=$i=<Z 16>		
	A(<B>,16C,D) (<$J 
	$ATDHT==<Z .ATUST>		
	0A (<B>,.ATUSTC,D)B>,.ATUSTC,$[v y@#
	$ATEOM==<Z .ATMST>		
	8A (<B>,.ATMSTC,D)B>,.ATMSTC,$m6 AA 
	$ATFUL=a=<Z .ATUST>		
	A (<B>,.ATUSTC,D)B>,.ATUSTC,$} ~)?v
	$ATGTD=~I=<Z .ATMST>		
	~hA(<B>,.ATMSTC,D)B>,.ATMSTC,%
	$ATHTN=I=<Z 6>		
	A (<B>,6C,D)A (<%2 wAB
	$ATIAD= A=<Z 11>		
	A (<B>,11C,D) (<%X !)B

	$ATIBP=!I=<Z 12>		
	A (<B>,12C,D) (<%z yAy
	$ATICT==<Z 10>		
	A (<B>,10C,D) (<%)W oI?+
	$ATJFN=u1=<Z 1>		
	A (<B>,1C,D)A (<%HX #AB
	$ATLBP=#a=<Z 15>		
	A (<B>,15C,D) (<%I "YB
	$ATLDP="y=<Z 14>		
	A (<B>,14C,D) (<%I7 tI?&
	$ATLEN=ti=<Z 0>		
	A (<B>,0C,D)A (<%JS p	B
	$ATLJF="=<Z 13>		
	A (<B>,13C,D) (<%Z2 qA;
	$ATMIE==<Z .ATUST>		
	0A (<B>,.ATUSTC,D)B>,.ATUSTC,%\z wi?B
	$ATMST=x	=<Z .ATMST>		
	x(A (<B>,.ATMSTC,D)B>,.ATMSTC,%h; !A
	$ATNAV=A=<Z .ATUST>		
	`A (<B>,.ATUSTC,D)B>,.ATUSTC,%i !AV
	$ATNDP=A=<Z .ATUST>		
	`A (<B>,.ATUSTC,D)B>,.ATUSTC,%j7 yi?R
	$ATNIO=z	=<Z .ATMST>		
	z(A (<B>,.ATMSTC,D)B>,.ATMSTC,%lT }?m
	$ATNRH=}9=<Z .ATMST>		
	}XA (<B>,.ATMSTC,D)B>,.ATMSTC,%xz YA
	$ATOCT=y=<Z 10>		
	A (<B>,10C,D) (<%yV 1A
	$ATOFL=Q=<Z .ATUST>		
	pA (<B>,.ATUSTC,D)B>,.ATUSTC,%| 	9@a
	$ATOPN=q=<Z .ATUST>		
	
A (<B>,.ATUSTC,D)B>,.ATUSTC,&)5 aA2
	$ATREJ==<Z .ATUST>		
	 A (<B>,.ATUSTC,D)B>,.ATUSTC,&)S 29+
	$ATRFF=2Y=<Z F1>		
	A (<B>,F1C,D) (<&*8 i@
	$ATRIP=	=<Z .ATMST>		
	(A (<B>,.ATMSTC,D)B>,.ATMSTC,&+ 9?
	$ATRLD=Y=<Z .ATMST>		
	xA (<B>,.ATMSTC,D)B>,.ATMSTC,&8t o)?I
	$ATSCH=xy=<Z .ATMST>		
	yA (<B>,.ATMSTC,D)B>,.ATMSTC,&99 !A^
	$ATSER=A=<Z .ATUST>		
	`A (<B>,.ATUSTC,D)B>,.ATUSTC,&:< %1B-
	$ATSIX=%Q=<Z 20>		
	A (<B>,20C,D) (<&= AD
	$ATSTF=!=<Z .ATUST>		
	@A (<B>,.ATUSTC,D)B>,.ATUSTC,&= 	Y@Q
	$ATSTR=	y=<Z .ATMST>		
	
A (<B>,.ATMSTC,D)B>,.ATMSTC,&Hv 
a@j
	$ATTCL=ST>		
	(<B>,.ATUSTC,D)B>,.ATUSTC,&N @|
	$ATTXF=!=<Z .ATUST>		
	@A (<B>,.ATUSTC,D)B>,.ATUSTC,&X4 Y@
	$ATUAH=y=<Z .ATMST>		
	A (<B>,.ATMSTC,D)B>,.ATMSTC,&[R A
	$ATUND=1=<Z .ATUST>		
	PA (<B>,.ATUSTC,D)B>,.ATUSTC,&[Y QA)
	$ATUNS=q=<Z .ATUST>		
	A (<B>,.ATUSTC,D)B>,.ATUSTC,&\T I@
	$ATURH=i=<Z .ATMST>		
	A (<B>,.ATMSTC,D)B>,.ATMSTC,&\z 
a@Z
	$ATUST==<Z .ATUST>		
	 A (<B>,.ATUSTC,D)B>,.ATUSTC,&] As
	$ATUTN=1=<Z 7>		
	A (<B>,7C,D)A (<'	Y 9@G
	$ATXFR=Y=<Z .ATMST>		
	xA (<B>,.ATMSTC,D)B>,.ATMSTC,'1 @5
	$ATXMC=9=<Z .ATMST>		
	XA (<B>,.ATMSTC,D)B>,.ATMSTC,'s 	@,
	$ATXOF=)=<Z .ATMST>		
	HA (<B>,.ATMSTC,D)B>,.ATMSTC,'
: )@>
	$ATXQU=I=<Z .ATMST>		
	hA (<B>,.ATMSTC,D)B>,.ATMSTC,4.: gF;
	$AVBYT=g1=<Z 1>		
	A (<B>,1C,D)A (<5I7 f1F5
	$AVLEN=fQ=<Z 0>		
	A (<B>,0C,D)A (<
M IK
	$BADT==I9<Z 0>		
	A (<B>,0C,D)A (<B
IY Bq
	$BATFR=C=<Z BATFRE>		
	C0A (<B>,BATFREC,D)B>,BATFREC,
KQ GY?
	$BATNB=Gy=<Z 0>		
	A (<B>,0C,D)A (<
]I7 *Q:W
	$BKLEN=*q=<Z 0>		
	A (<B>,0C,D)A (<
^N8 )q:Q
	$BKTYP=*=<Z 0>		
	A (<B>,0C,D)A (<
e9@ tq')
	$BLKF==u<Z STS>		
	A (<B>,STSC,D)(<
e; oi/
	$BLKLENp	==<Z 0>		
	A (<B>,0C,D)A (<
e= n).t
	$BLKTYPnI==<Z 0>		
	A (<B>,0C,D)A (<
e=R o	.z
	$BLKVERo)==<Z 0>		
	A (<B>,0C,D)A (<<B gQ}
	$BSCR%=o1=<Z FKSWP>		
	AoP (<B>,FKSWPC,D)B>,FKSWPC,D<Y n)v
	$BSCRSKnI==<Z FKSWP(FX)>		nh
	A (<B>,FKSWP(FX)C,D)FKSWPlb eAl
	$BSNS%=m!=<Z FKSWP>		
	Am@ (<B>,FKSWPC,D)B>,FKSWPC,Dlu le
	$BSNSK=l9=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(lz xyK
	$BSNST=y=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(m r!R
	$BSNT%=z=<Z FKSWP>		
	Az  (<B>,FKSWPC,D)B>,FKSWPC,D}B pA
	$BSOV%=wq=<Z FKSWP>		
	Ax (<B>,FKSWPC,D)B>,FKSWPC,D}Y vi:
	$BSOVRDw	==<Z FKSWP(FX)>		w(
	A (<B>,FKSWP(FX)C,D)FKSWP< n0
	$BSSP%=ua=<Z FKSWP>		
	Av (<B>,FKSWPC,D)B>,FKSWPC,D< tY)
	$BSSPQ=ty=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(} c1[
	$BSWT%=k=<Z FKSWP>		
	Ak0 (<B>,FKSWPC,D)B>,FKSWPC,D} j	T
	$BSWTB=j)=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP($lI D%
	$BTFR2=D9=<Z BATFRE+HBLEN>DX		
	A (<B>,BATFRE+HBLENC,D)%z 9Q*
	$BTHCT=E!=<Z 2>		
	A (<B>,2C,D)A (<%;V H9E
	$BTKNM=HY=<Z 0>		
	A (<B>,0C,D)A (<%Xi FQ9
	$BTMC2=Fq=<Z HBLEN+3>		
	GA (<B>,HBLEN+3C,D)>,HBLEN+3%Xz Ei0
	$BTMCT=F	=<Z 3>		
	A (<B>,3C,D)A (<6+3 
I(V
	$CFRMF=
i=<Z F>		
	A (<B>,FC,D)A (<7
R m)n
	$CFXRD=mI=<Z @CST0X>		
	mhA (<B>,@CST0XC,D)B>,@CST0XC,L-3 :c
	$CIBUF=L=<Z CIFRKF>		
	L0A (<B>,CIFRKFC,D)B>,CIFRKFC,N)8 Lyk
	$CIREP=M=<Z CIFRKF>		
	M8A (<B>,CIFRKFC,D)B>,CIFRKFC,|.: ])El
	$COBYT=]I=<Z 1>		
	A (<B>,1C,D)A (<}I7 ZyEY
	$COLEN=[=<Z 0>		
	A (<B>,0C,D)A (<}KU ZYEq
	$COLNK=^=<Z 2>		
	A (<B>,2C,D)A (<~
8 ^YEw
	$COPIP=^y=<Z 3>		
	A (<B>,3C,D)A (<~2 \IEf
	$COQUE=\i=<Z 1>		
	A (<B>,1C,D)A (<~)6 [aE`
	$COREL=\=<Z 1>		
	A (<B>,1C,D)A (<n Y(
	$CRNXT=y=<Z STS>		
	A (<B>,STSC,D)(= (#
	$CRSTUF9==<Z STS>		
	A (<B>,STSC,D)H3 iyS
	$CSTAGEj==<Z @CST0X>		
	j8A (<B>,@CST0XC,D)B>,@CST0XCK qq
	$CSTLDAr==<Z @CST3X>		
	r0A (<B>,@CST3XC,D)B>,@CST3XCKs pi

	$CSTOFKq	==<Z @CST3X>		
	q(A (<B>,@CST3XC,D)B>,@CST3XCL iQt
	$CSTPSTn)==<Z @CST0X>		
	nHA (<B>,@CST0XC,D)B>,@CST0XC|Q i	d
	$CSWRB=l)=<Z @CST0X>		
	lHA (<B>,@CST0XC,D)B>,@CST0XC,.,z e)5
	$CURSTRRI==<Z STRINF>		
	RiA (<B>,STRINFC,D)B>,STRINFC.-1 c)6
	$CURUC=cI=<Z STRINF>		
	chA (<B>,STRINFC,D)B>,STRINFC,H9 -	:j
	$DATASZ-)==<Z 2>		
	A (<B>,2C,D)A (<=9 KI4`
	$DCCUR=Ki=<Z DCNCNT>		
	LA (<B>,DCNCNTC,D)B>,DCNCNTC,X< QI5
	$DCMAX=Qi=<Z DCNCNT>		
	RA (<B>,DCNCNTC,D)B>,DCNCNTC,.i@ Y)7
	$DEVF==y<Z F>		
	A (<B>,FC,D)A (<B.m y)a
	$DEVTF==<Z F>		
	A (<B>,FC,D)A (<6= @9,
	$DFSTF=@Y=<Z F1>		
	A (<B>,F1C,D) (<LV OA
	$DIAFL=Oa=<Z JOBNAM>		
	PA (<B>,JOBNAMC,D)B>,JOBNAMC,L.: RyE
	$DIBYT=S=<Z 1>		
	A (<B>,1C,D)A (<MI7 RE
	$DILEN=R9=<Z 0>		
	A (<B>,0C,D)A (<MKU QyE
	$DILNK=Sa=<Z 2>		
	A (<B>,2C,D)A (<N)@ 9)=
	$DIRF==Y<Z F>		
	A (<B>,FC,D)A (<BN)S +Y*_
	$DIRFF=+y=<Z F1>		
	A (<B>,F1C,D) (<N)x 2a;
	$DIRGP=3=<Z 3>		
	A (<B>,3C,D)A (<N+ S)5
	$DIRLA=SI=<Z 0>		
	A (<B>,0C,D)A (<N+V 1y;
	$DIRNM=2=<Z 3>		
	A (<B>,3C,D)A (<N+s V	54
	$DIROFNV)==<Z DROFN>		
	VHA (<B>,DROFNC,D)B>,DROFNC,N,s 5	+*
	$DIRSF=5)=<Z F1>		
	A (<B>,F1C,D) (<N- Y)g
	$DIRTF=y=<Z F>		
	A (<B>,FC,D)A (<N. **S
	$DIRXF=*9=<Z F1>		
	A (<B>,F1C,D) (<|.: XIEF
	$DOBYT=Xi=<Z 1>		
	A (<B>,1C,D)A (<|[v U)E,
	$DOEOM=UI=<Z 1>		
	A (<B>,1C,D)A (<}I7 TAE&
	$DOLEN=Ta=<Z 0>		
	A (<B>,0C,D)A (<}k9 !EK
	$DONMS=Y1=<Z 2>		
	A (<B>,2C,D)A (<}ls YyEQ
	$DONSG=Z=<Z 3>		
	A (<B>,3C,D)A (<~2 VyE9
	$DOQUE=W=<Z 1>		
	A (<B>,1C,D)A (<~)6 VE3
	$DOREL=V1=<Z 1>		
	A (<B>,1C,D)A (<~93 WaE@
	$DOSEG=X=<Z 1>		
	A (<B>,1C,D)A (<z eA..
	$DRACT=ea=<Z 27>		
	A (<B>,27C,D) (<=3 dY.'
	$DRCUG=dy=<Z 26>		
	A (<B>,26C,D) (<H: _q.
	$DRDAT=`=<Z 21>		
	A (<B>,21C,D) (<HU Y1-M
	$DRDBK=YQ=<Z 11>		
	A (<B>,11C,D) (<Hp [i-`
	$DRDCA=\	=<Z 14>		
	A (<B>,14C,D) (<IR g.;
	$DRDFE=g1=<Z 31>		
	A (<B>,31C,D) (<Ix aA.
	$DRDGP=aa=<Z 23>		
	A (<B>,23C,D) (<KR f).4
	$DRDNE=fI=<Z 30>		
	A (<B>,30C,D) (<L UA-.
	$DRDPW=Ua=<Z 7>		
	A (<B>,7C,D)A (<hZ TY-'
	$DRFBT=Ty=<Z 6>		
	A(<B>,6C,D)A (<iQ Q-
	$DRFFB=Q9=<Z .DRFFB>		
	QXA (<B>,.DRFFBC,D)B>,.DRFFBC,m Sq-!
	$DRFTP=T=<Z 5>		
	A (<B>,5C,D)A (< Ni,x
	$DRHLN=O	=<Z 0>		
	A (<B>,0C,D)A (<IR T	5$
	$DRLFDBT)==<Z DROFN>		
	THA (<B>,DROFNC,D)B>,DROFNC,J8 Z-S
	$DRLIQ=Z9=<Z 12>		
	A (<B>,12C,D) (<Kx [-Z
	$DRLOQ=[!=<Z 13>		
	A (<B>,13C,D) (<[r _	-z
	$DRMOD=_)=<Z 20>		
	A (<B>,20C,D) (<h6 \Q-g
	$DRNAM=\q=<Z 15>		
	A (<B>,15C,D) (<m6 P1-
	$DRNUM=PQ=<Z 1>		
	A (<B>,1C,D)A (<z ky.a
	$DRPCU=l=<Z 36>		
	A (<B>,36C,D) (<	 iA.N
	$DRPDT=ia=<Z 34>		
	A (<B>,34C,D) (<	2 j).T
	$DRPED=jI=<Z 35>		
	A (<B>,35C,D) (<	; hY.G
	$DRPEV=hy=<Z 33>		
	A (<B>,33C,D) (<	x Wi-@
	$DRPGP=X	=<Z 10>		
	A (<B>,10C,D) (<: lY.g
	$DRPMU=ly=<Z 36>		
	A (<B>,36C,D) (<{ W	-:
	$DRPOW=W)=<Z 10>		
	A (<B>,10C,D) (<
 mA.n
	$DRPPN=ma=<Z 37>		
	A (<B>,37C,D) (<
Z V)-4
	$DRPRT=VI=<Z 10>		
	A (<B>,10C,D) (<
[ ^!-t
	$DRPRV=^A=<Z 17>		
	A (<B>,17C,D) (<
{ ]9-m
	$DRPSW=]Y=<Z 16>		
	A (<B>,16C,D) (<
	$DRPUD=k1=<Z 36>		
	A (<B>,36C,D) (<
	$DRPWL=Xi=<Z 10>		
	A (<B>,10C,D) (<+P gy.A
	$DRRNA=h=<Z 32>		
	A (<B>,32C,D) (<+s U	5,
	$DRROF=U)=<Z DROFN>		
	AUH (<B>,DROFNC,D)B>,DROFNC,D, OQ,
	$DRRPN=Oq=<Z 1>		
	A (<B>,1C,D)A (<8Z R!-
	$DRSBT=RA=<Z 3>		
	A (<B>,3C,D)A (<9 c	.
	$DRSDC=c)=<Z 25>		
	A (<B>,25C,D) (<9 cq.!
	$DRSDM=d=<Z 25>		
	A (<B>,25C,D) (<91 \ 
	$DRSEC=!=<Z >		
	A (<B>,C,D)A (<B= S	-
	$DRSTP=S)=<Z 4>		
	A (<B>,4C,D)A (<LU a 
	$DRTRK==<Z >		
	A (<B>,C,D)A (<BN8 M),l
	$DRTYP=MI=<Z 0>		
	A (<B>,0C,D)A (<Y b).
	$DRUDT=bI=<Z 24>		
	A (<B>,24C,D) (<Yx `Y.
	$DRUGP=`y=<Z 22>		
	A (<B>,22C,D) (<i9 N	,r
	$DRVER=N)=<Z 0>		
	A (<B>,0C,D)A (<tI@ wA'>
	$ENDF==wa<Z STS>		
	A (<B>,STSC,D)(<|i@ pA'
	$EOFF==pa<Z STS>		
	A(<B>,STSC,D)(<)@ q1'
	$ERRF==qQ<Z STS>		
	A (<B>,STSC,D)(<EI7 xI/F
	$EXLEN=xi=<Z 0>		
	A (<B>,0C,D)A (<FI@ y)I
	$EXTF==<Z F>		
	A (<B>,FC,D)A (<BFIS ,9*e
	$EXTFF=,Y=<Z F1>		
	A (<B>,F1C,D) (<FLs 6i+8
	$EXTSF=7	=<Z F1>		
	A (<B>,F1C,D) (<FM )s
	$EXTTF=9=<Z F>		
	A (<B>,FC,D)A (<FN =i+p
	$EXTXF=>	=<Z F1>		
	A (<B>,F1C,D) (<FN8 wi/@
	$EXTYP=x	=<Z 0>		
	A (<B>,0C,D)A (<z  A2
	$FBACT= a=<Z .FBACT>		
	!A (<B>,.FBACTC,D)B>,.FBACTC, 	1<
	$FBADR=)=<Z .FBADR>		
	HA (<B>,.FBADRC,D)B>,.FBADRC,Q 91
	$FBARC=Y=<Z .FBCTL>		
	xA (<B>,.FBCTLC,D)B>,.FBCTLC, !1^
	$FBAT0=A=<Z .FBUSE>		
	`A (<B>,.FBUSEC,D)B>,.FBUSEC,: )1f
	$FBAUT=I=<Z .FBAUT>		
	hA (<B>,.FBAUTC,D)B>,.FBAUTC,(Z /!2~
	$FBBBT=/A=<Z .FBBBT>		
	/`A (<B>,.FBBBTC,D)B>,.FBBBTC,*h ,	2d
	$FBBK0=,)=<Z .FBBK0>		
	,HA (<B>,.FBBK0C,D)B>,.FBBK0C,*h -2m
	$FBBK1=-1=<Z .FBBK1>		
	-PA (<B>,.FBBK1C,D)B>,.FBBK1C,*i .2u
	$FBBK2=.9=<Z .FBBK2>		
	.XA (<B>,.FBBK2C,D)B>,.FBBK2C,,} "Q2
	$FBBSZ="q=<Z .FBBYV>		
	#A (<B>,.FBBYVC,D)B>,.FBBYVC,<R 1M
	$FBCRE=9=<Z .FBCRE>		
	XA (<B>,.FBCREC,D)B>,.FBCREC,<[ &i2:
	$FBCRV='	=<Z .FBCRV>		
	'(A (<B>,.FBCRVC,D)B>,.FBCRVC,I6 
Y0Y
	$FBDEL=
y=<Z .FBCTL>		
	A (<B>,.FBCTLC,D)B>,.FBCTLC,J9 0}
	$FBDIR=9=<Z .FBCTL>		
	XA (<B>,.FBCTLC,D)B>,.FBCTLC,LW 91
	$FBDRN=Y=<Z .FBDRN>		
	xA (<B>,.FBDRNC,D)B>,.FBDRNC,^ 14
	$FBEXL=!=<Z .FBEXL>		
	@A (<B>,.FBEXLC,D)B>,.FBEXLC,^ ?Y4
	$FBEXT=?y=<Z .FBEXT>		
	@A (<B>,.FBEXTC,D)B>,.FBEXTC,i: Ai4
	$FBFET=B	=<Z .FBFET>		
	B(A (<B>,.FBFETC,D)B>,.FBFETC,k 907
	$FBFLG=Y=<Z .FBCTL>		
	xA (<B>,.FBCTLC,D)B>,.FBCTLC,y7 91w
	$FBGEN=Y=<Z .FBGEN>		
	xA (<B>,.FBGENC,D)B>,.FBGENC,{V =I3p
	$FBGNL==i=<Z .FBGNL>		
	>A (<B>,.FBGNLC,D)B>,.FBGNLC,{Y !I2
	$FBGNR=!i=<Z .FBBYV>		
	"A (<B>,.FBBYVC,D)B>,.FBBYVC,[ I1
	$FBINV=i=<Z .FBCTL>		
	A (<B>,.FBCTLC,D)B>,.FBCTLC,I7 10/
	$FBLEN=Q=<Z .FBHDR>		
	pA (<B>,.FBHDRC,D)B>,.FBHDRC,KS 
y0k
	$FBLNG=TL>		
	(<B>,.FBCTLC,D)B>,.FBCTLC,Mh !1V
	$FBLW0=A=<Z .FBUSE>		
	`A (<B>,.FBUSEC,D)B>,.FBUSEC,My 11o
	$FBLWR=Q=<Z .FBLWR>		
	pA (<B>,.FBLWRC,D)B>,.FBLWRC,[r #Y2!
	$FBMOD=#y=<Z .FBBYV>		
	$A (<B>,.FBBYVC,D)B>,.FBBYVC,h6 >Q3y
	$FBNAM=>q=<Z .FBNAM>		
	?A (<B>,.FBNAMC,D)B>,.FBNAMC,i Y1)
	$FBNDL=y=<Z .FBCTL>		
	A (<B>,.FBCTLC,D)B>,.FBCTLC,i: ;93_
	$FBNET=;Y=<Z .FBNET>		
	;xA (<B>,.FBNETC,D)B>,.FBNETC,i< 	I0P
	$FBNEX=	i=<Z .FBCTL>		
	
A (<B>,.FBCTLC,D)B>,.FBCTLC,kr )1
	$FBNOD=I=<Z .FBCTL>		
	hA (<B>,.FBCTLC,D)B>,.FBCTLC,l $Y2)
	$FBNPG=$y=<Z .FBBYV>		
	%A (<B>,.FBBYVC,D)B>,.FBBYVC,lS +2\
	$FBNRF=+!=<Z .FBCNT>		
	+@A (<B>,.FBCNTC,D)B>,.FBCNTC,my *2T
	$FBNWR=*!=<Z .FBCNT>		
	*@A (<B>,.FBCNTC,D)B>,.FBCNTC,n i0b
	$FBNXF=
	=<Z .FBCTL>		
	
(A (<B>,.FBCTLC,D)B>,.FBCTLC,yS Y1!
	$FBOFF=y=<Z .FBCTL>		
	A (<B>,.FBCTLC,D)B>,.FBCTLC,
V 90G
	$FBPRM=Y=<Z .FBCTL>		
	xA (<B>,.FBCTLC,D)B>,.FBCTLC,
Z 1E
	$FBPRT=1=<Z .FBPRT>		
	PA (<B>,.FBPRTC,D)B>,.FBPRTC,)3 (y2K
	$FBREF=)=<Z .FBREF>		
	)8A (<B>,.FBREFC,D)B>,.FBREFC,: 	0t
	$FBSHT=)=<Z .FBCTL>		
	HA (<B>,.FBCTLC,D)B>,.FBCTLC,:= %a22
	$FBSIZ=&=<Z .FBSIZ>		
	& A (<B>,.FBSIZC,D)B>,.FBSIZC,I @a4

	$FBTDT=A=<Z .FBTDT>		
	A A (<B>,.FBTDTC,D)B>,.FBTDTC,K8 M0>
	$FBTMP=I=<Z .FBCTL>		
	hA (<B>,.FBCTLC,D)B>,.FBCTLC,N8 10
	$FBTYP=Q=<Z .FBHDR>		
	pA (<B>,.FBHDRC,D)B>,.FBHDRC,\{ <A3h
	$FBUSW=<a=<Z .FBUSW>		
	=A (<B>,.FBUSWC,D)B>,.FBUSWC,i9 10'
	$FBVER=Q=<Z .FBHDR>		
	pA (<B>,.FBHDRC,D)B>,.FBHDRC,|Z 'q2C
	$FBWRT=(=<Z .FBWRT>		
	(0A (<B>,.FBWRTC,D)B>,.FBWRTC,MI }'k
	$FILDUD}9==<Z STS>		
	A (<B>,STSC,D)MI@ 	)*
	$FILF==)<Z F>		
	A (<B>,FC,D)A (<BMJ7 }y'q
	$FILINP~==<Z STS>		
	A (<B>,STSC,D)MKW ZU
	$FILNO=Z1=<Z FILST1>		
	ZPA (<B>,FILST1C,D)B>,FILST1C,MKz ~Y'w
	$FILOUP~y==<Z STS>		
	A (<B>,STSC,D)Z) 8aJ
	$FK2DT=9=<Z @FKSTA2(FX)>	9 	
	A (<B>,@FKSTA2(FX)C,D)KS\U -!n
	$FKABK=-A=<Z FKINT>		
	A-` (<B>,FKINTC,D)B>,FKINTC,D\r 
Qi
	$FKAGE=
q=<Z FKNR(FX)>		
	A (<B>,FKNR(FX)C,D),FKNR(FX\): a)
	$FKBET=aI=<Z FKPT(FX)>		
ah	A (<B>,FKPT(FX)C,D),FKPT(FX\+ Cq9
	$FKBL%=fq=<Z FKSWP>		
	Ag (<B>,FKSWPC,D)B>,FKSWPC,D\+ ei2
	$FKBLK=f	=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(\+ A(
	$FKBLP=a=<Z FKBSPW(FX)>		
	A (<B>,FKBSPW(FX)C,D)KBSP\,b kq
	$FKBS%=sQ=<Z FKSWP>		
	Asp (<B>,FKSWPC,D)B>,FKSWPC,D\,t rI
	$FKBSHFri==<Z FKSWP(FX)>		s
	A (<B>,FKSWP(FX)C,D)FKSWP\;W 5
	$FKCNN=1=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(\;\ Y
	$FKCNX=	=<Z FKCNO>		
	A( (<B>,FKCNOC,D)B>,FKCNOC,D\<t y
	$FKCSIZ==<Z FKWSP(FX)>		8
	A (<B>,FKWSP(FX)C,D)FKWSP\YY 'yC
	$FKEFR=(=<Z FKINT>		
	A(8 (<B>,FKINTC,D)B>,FKINTC,D\k ]m
	$FKFLG=]1=<Z FKQ2(FX)>		
]P	A (<B>,FKQ2(FX)C,D),FKQ2(FX\lH #Y!
	$FKFR1=#y=<Z FKINT>		
	A$ (<B>,FKINTC,D)B>,FKINTC,D\lI $a*
	$FKFR2=%=<Z FKINT>		
	A%  (<B>,FKINTC,D)B>,FKINTC,D\lP &q;
	$FKFRA='=<Z FKINT>		
	A'0 (<B>,FKINTC,D)B>,FKINTC,D\lU %i2
	$FKFRJ=&	=<Z FKINT>		
	A&( (<B>,FKINTC,D)B>,FKINTC,D\l] )L
	$FKFRZ=)!=<Z FKINT>		
	A)@ (<B>,FKINTC,D)B>,FKINTC,D\{ QI
	$FKGL%=9=<Z FKSWP>		
	AX (<B>,FKSWPC,D)B>,FKSWPC,D\{v A 
	$FKGOLNa==<Z FKBSPW(FX)>		
	A (<B>,FKBSPW(FX)C,D)KBS]
z 9
	$FKHST=Y=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]B 9qJ
	$FKIB%=i=<Z FKSWP>		
	Ai  (<B>,FKSWPC,D)B>,FKSWPC,D]T p9
	$FKIBH=pY=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]Y gyC
	$FKIBS=h=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]\ ;
	$FKIBX==<Z FKINTB>		
	8A (<B>,FKINTBC,D)B>,FKINTBC,]w *	T
	$FKICO=*)=<Z FKINT>		
	A*H (<B>,FKINTC,D)B>,FKINTC,D] /!~
	$FKIDP=/A=<Z FKINT>		
	A/` (<B>,FKINTC,D)B>,FKINTC,D] ia
	$FKIH%=qA=<Z FKSWP>		
	Aq` (<B>,FKSWPC,D)B>,FKSWPC,D]3 )n
	$FKIIF=I=<Z FKINT>		
	Ah (<B>,FKINTC,D)B>,FKINTC,D]Z ,e
	$FKIJT=,9=<Z FKINT>		
	A,X (<B>,FKINTC,D)B>,FKINTC,D] "Q
	$FKILO="q=<Z FKINT>		
	A# (<B>,FKINTC,D)B>,FKINTC,D]\ D
	$FKINX=!=<Z FKINT>		
	A@ (<B>,FKINTC,D)B>,FKINTC,D]q 0!
	$FKISC=0A=<Z FKINT>		
	A0` (<B>,FKINTC,D)B>,FKINTC,D] 1w
	$FKIT1=Q=<Z FKINT>		
	Ap (<B>,FKINTC,D)B>,FKINTC,D]	 9
	$FKIT2=Y=<Z FKINT>		
	Ax (<B>,FKINTC,D)B>,FKINTC,D] +]
	$FKITL=+1=<Z FKINT>		
	A+P (<B>,FKINTC,D)B>,FKINTC,D]z !I
	$FKIWT=!i=<Z FKINT>		
	A" (<B>,FKINTC,D)B>,FKINTC,D](W QI
	$FKJBN=q=<Z FKJOB(FX)>		
	A (<B>,FKJOB(FX)C,D)FKJOB(]+b vAO
	$FKJO%=	Y=<Z FKJOB>		
	A	x (<B>,FKJOBC,D)B>,FKJOBC,D]+| t1.
	$FKJOX=I=<Z FKJOB>		
	Ah (<B>,FKJOBC,D)B>,FKJOBC,D], i+
	$FKJP%==<Z FKCNO>		
	A0 (<B>,FKCNOC,D)B>,FKCNOC,D], %
	$FKJPT=1=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(],b 	>
	$FKJS%=I=<Z FKJOB>		
	Ah (<B>,FKJOBC,D)B>,FKJOBC,D],q I8
	$FKJSB=i=<Z FKJOB(FX)>		
	A (<B>,FKJOB(FX)C,D)FKJOB(]- :IX
	$FKJTN=:i=<Z FKJTQ>		
	A; (<B>,FKJTQC,D)B>,FKJTQC,D]- ;Qa
	$FKJTP=;q=<Z FKJTQ>		
	A< (<B>,FKJTQC,D)B>,FKJTQC,D]:6 ~!v
	$FKKIL=~A=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]; xQ|
	$FKKL%=)=<Z FKSWP>		
	AH (<B>,FKSWPC,D)B>,FKSWPC,D][X ^u
	$FKMNQ=^9=<Z FKQ2(FX)>		
^X	A (<B>,FKQ2(FX)C,D),FKQ2(FX]hB )P
	$FKNB%=9i=<Z FKNBW>		
	A: (<B>,FKNBWC,D)B>,FKNBWC,D]l\ 
AX
	$FKNRX=
a=<Z FKNR>		
	A (<B>,FKNRC,D)<B>,FKNRC,D)]m [\
	$FKNTC=[!=<Z FKQ2>		
	A [@(<B>,FKQ2C,D)<B>,FKQ2C,D)]mq 

	$FKNWCE!==<Z FKWSP(FX)>		@
	A (<B>,FKWSP(FX)C,D)FKWSP]ms ]
	$FKNWF=9=<Z FKINT>		
	AX (<B>,FKINTC,D)B>,FKINTC,D]mu !f
	$FKNWJ=A=<Z FKINT>		
	A` (<B>,FKINTC,D)B>,FKINTC,D]yv 1
	$FKOGL=Q=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(^	| PI
	$FKPGX=Pi=<Z FKPGS>		
	AQ (<B>,FKPGSC,D)B>,FKPGSC,D^
T .!v
	$FKPRI=.A=<Z FKINT>		
	A.` (<B>,FKINTC,D)B>,FKINTC,D^
b N
	$FKPS%=Ri=<Z FKPGS>		
	AS (<B>,FKPGSC,D)B>,FKPGSC,D^
h 	L
	$FKPS0=)=<Z FKINT>		
	AH (<B>,FKINTC,D)B>,FKINTC,D^
h U
	$FKPS1=1=<Z FKINT>		
	AP (<B>,FKINTC,D)B>,FKINTC,D^
i 
	$FKPS2=1=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(^
q Qi
	$FKPSB=R	=<Z FKPGS(FX)>		
	A (<B>,FKPGS(FX)C,D)FKPGS(^
	$FKPTD=X	=<Z FKPGST>		
	X(A(<B>,FKPGSTC,D)B>,FKPGSTC,^
	$FKPTR=W=<Z FKPGST>		
	WA(<B>,FKPGSTC,D)B>,FKPGSTC,^
	$FKPTX=V=<Z FKPGST>		
	V A (<B>,FKPGSTC,D)B>,FKPGSTC,^\ YyS
	$FKQ2X=Z=<Z FKQ2>		
	A Z8(<B>,FKQ2C,D)<B>,FKQ2C,D)^@ _!~
	$FKQN==_A<Z FKQ2(FX)>		
	_`A (<B>,FKQ2(FX)C,D),FKQ2(FX)^ XqK
	$FKQTM=Y=<Z FKQ1(FX)>		
Y0	A (<B>,FKQ1(FX)C,D),FKQ1(FX^< |yk
	$FKSPL=}=<Z FKSWP>		
	A}8 (<B>,FKSWPC,D)B>,FKSWPC,D^=	 79?
	$FKST2=7Y=<Z FKSTA2>		
	7xA (<B>,FKSTA2C,D)B>,FKSTA2C,^= 617
	$FKSTD=6Q=<Z FKSTAT>		
	6pA (<B>,FKSTATC,D)B>,FKSTATC,^= 5).
	$FKSTR=5I=<Z FKSTAT>		
	5hA (<B>,FKSTATC,D)B>,FKSTATC,^= 4)&
	$FKSTX=4I=<Z FKSTAT>		
	4hA (<B>,FKSTATC,D)B>,FKSTATC,^=9  A
	$FKSUS= a=<Z FKINT>		
	A! (<B>,FKINTC,D)B>,FKINTC,D^=| b1
	$FKSWX=bQ=<Z FKSWP>		
	Abp (<B>,FKSWPC,D)B>,FKSWPC,D^J6 <Yi
	$FKTIM=<y=<Z FKTIME>		
	=A (<B>,FKTIMEC,D)B>,FKTIMEC,^\ :1)
	$FKUP%=Ty=<Z FKPGS>		
	AU (<B>,FKPGSC,D)B>,FKPGSC,D^\ Sq#
	$FKUPT=T=<Z FKPGS(FX)>		
	A (<B>,FKPGS(FX)C,D)FKPGS(^|b SI(
	$FKWS%=da=<Z FKSWP>		
	Ae (<B>,FKSWPC,D)B>,FKSWPC,D^|v cY!
	$FKWSL=cy=<Z FKSWP(FX)>		
	A(<B>,FKSWP(FX)C,D)FKSWP(^|y 
	$FKWSS=(FX)>		
	A (<B>,FKNR(FX)C,D),FKNR(FX^|| Yy
	$FKWSX=y=<Z FKWSP>		
	A (<B>,FKWSPC,D)B>,FKWSPC,D^} `!
	$FKWTL=`A=<Z FKQ2(FX)>		
``	A (<B>,FKQ2(FX)C,D),FKQ2(FX_3 I`
	$FKXAGEi==<Z FKNR(FX)>		

	A (<B>,FKNR(FX)C,D),FKNR(Fd iqS
	$FLATL=j=<Z FILDNM>		
	j0A (<B>,FILDNMC,D)B>,FILDNMC,d, U-
	$FLBPO=U9=<Z FILBYT>		
	UXA (<B>,FILBYTC,D)B>,FILBYTC,d,} V!6
	$FLBSZ=VA=<Z FILBYT>		
	V`A (<B>,FILBYTC,D)B>,FILBYTC,dJ9 hqK
	$FLDIR=i=<Z FILDNM>		
	i0A (<B>,FILDNMC,D)B>,FILDNMC,dK9 o	|
	$FLDMS=o)=<Z FILMS1>		
	oHA (<B>,FILMS1C,D)B>,FILMS1C,dKW giB
	$FLDNO=h	=<Z FILDDN>		
	h(A (<B>,FILDDNC,D)B>,FILDDNC,dLq fi:
	$FLDSB=g	=<Z FILDDN>		
	g(A (<B>,FILDDNC,D)B>,FILDDNC,dM ]Ap
	$FLDTB=]a=<Z FILDEV>		
	^A (<B>,FILDEVC,D)B>,FILDEVC,dM\ q	

	$FLDVX=q)=<Z FILIDX>		
	qHA (<B>,FILIDXC,D)B>,FILIDXC,d[9 r
	$FLEMS=r1=<Z FILMS2>		
	rPA (<B>,FILMS2C,D)B>,FILMS2C,d\q kyc
	$FLESB=l=<Z FILNEN>		
	l8A (<B>,FILNENC,D)B>,FILNENC,dhw ^Ix
	$FLFCO=^i=<Z FILNLP>		
	_A (<B>,FILNLPC,D)B>,FILNLPC,eKQ cY!
	$FLLNC=cy=<Z FILLNM>		
	dA (<B>,FILLNMC,D)B>,FILLNMC,eKU u!.
	$FLLNK=uA=<Z FILNND>		
	u`A (<B>,FILNNDC,D)B>,FILNNDC,e[r NQL
	$FLMOD=Y)=<Z FILSTS>		
	YHA (<B>,FILSTSC,D)B>,FILSTSC,e\ da*
	$FLMPC=e=<Z FILLFW>		
	e A (<B>,FILLFWC,D)B>,FILLFWC,ek9 p	
	$FLNMS=p)=<Z FILMS1>		
	pHA (<B>,FILMS1C,D)B>,FILMS1C,ekr v!6
	$FLNOD=vA=<Z FILNND>		
	v`A (<B>,FILNNDC,D)B>,FILNNDC,elq jy[
	$FLNSB=k=<Z FILNEN>		
	k8A (<B>,FILNENC,D)B>,FILNENC,f t%
	$FLP0==t9<Z FILCOD>		
	AtX (<B>,FILCODC,D)B>,FILCODC,f	w W)>
	$FLPGN=WI=<Z FILWND>		
	WhA(<B>,FILWNDC,D)B>,FILWNDC,f
	$FLPTN=`q=<Z FILOFN>		
	aA(<B>,FILOFNC,D)B>,FILOFNC,f
	$FLPTT=aq=<Z FILOFN>		
	bA (<B>,FILOFNC,D)B>,FILOFNC,f99 _I
	$FLSES=_i=<Z FILNLP>		
	`A (<B>,FILNLPC,D)B>,FILNLPC,fLq T%
	$FLTSB=T1=<Z FILTMP>		
	TPA (<B>,FILTMPC,D)B>,FILTMPC,fLr S
	$FLTSD=S1=<Z FILTMP>		
	SPA (<B>,FILTMPC,D)B>,FILTMPC,fM ea2
	$FLTTW=f=<Z FILLFW>		
	f A (<B>,FILLFWC,D)B>,FILLFWC,fN bY
	$FLTXT=by=<Z FILLNM>		
	cA (<B>,FILLNMC,D)B>,FILLNMC,fX` s
	$FLUC==s9<Z FILCOD>		
	AsX (<B>,FILCODC,D)B>,FILCODC,fkW nt
	$FLVNO=n!=<Z FILVER>		
	n@A (<B>,FILVERC,D)B>,FILVERC,f| X)F
	$FLWPG=XI=<Z FILWND>		
	XhA (<B>,FILWNDC,D)B>,FILWNDC,9@ z'S
	$FRKF==z1<Z STS>		
	A (<B>,STSC,D)(<= ':=
	$FRKTTY'1==<Z CTTAB>		
	'PA (<B>,CTTABC,D)B>,CTTABC,I7 A0
	$FRLEN=a=<Z 0>		
	A (<B>,0C,D)A (<iQ )0
	$FRNFB=I=<Z .FRNFB>		
	hA (<B>,.FRNFBC,D)B>,.FRNFBC,|z (
	$FROSTF9==<Z STS>		
	A (<B>,STSC,D)N8 0
	$FRTYP=!=<Z 0>		
	A (<B>,0C,D)A (<i9 a0
	$FRVER==<Z 0>		
	A (<B>,0C,D)A (<Dz <	+b
	$FXACT=<)=<Z F1>		
	A (<B>,F1C,D) (<F
Z ;+[
	$FXPRT=;9=<Z F1>		
	A (<B>,F1C,D) (<FK8 <y+i
	$FXTMP===<Z F1>		
	A (<B>,F1C,D) (<u)S 3)+
	$GNJFF=3I=<Z F1>		
	A (<B>,F1C,D) (<"L)V N9w
	$HIBFL=NY=<Z JOBNAM>		
	NxA (<B>,JOBNAMC,D)B>,JOBNAMC,"dI@ 9'}
	$HLDF==Y<Z STS>		
	A (<B>,STSC,D)(<"fI@ ua'0
	$HLTF==v<Z STS>		
	A (<B>,STSC,D)(<#4\S 99+M
	$HVERF=9Y=<Z F1>		
	A (<B>,F1C,D) (<&'	Q f)64
	$IDXFB=fI=<Z 0>		
	A (<B>,0C,D)A (<&'	S ai6
	$IDXFG=b	=<Z 1>		
	A (<B>,1C,D)A (<&'	V d)6&
	$IDXFLGdI==<Z STRINF>		
	dhA (<B>,STRINFC,D)B>,STRINFC&'
1 gi6@
	$IDXIB=h	=<Z 1>		
	A (<B>,1C,D)A (<&'
; bI6
	$IDXIV=bi=<Z 1>		
	A (<B>,1C,D)A (<&'
r g	6:
	$IDXSD=g)=<Z 0>		
	A (<B>,0C,D)A (<&<K 	(r
	$IGDLF=)=<Z F>		
	A (<B>,FC,D)A (<&=S >Y+w
	$IGIVF=>y=<Z F1>		
	A (<B>,F1C,D) (<&d,} _aF
	$ILBSZ=`=<Z ILSIZE>		
	` A (<B>,ILSIZEC,D)B>,ILSIZEC,&dL} `aF

	$ILDSZ=a=<Z ILSIZE>		
	a A (<B>,ILSIZEC,D)B>,ILSIZEC,&e}: bqF
	$ILOUT=c=<Z ILMISC>		
	c0A (<B>,ILMISCC,D)B>,ILMISCC,&f93 cqF#
	$ILSEG=d=<Z ILMISC>		
	d0A (<B>,ILMISCC,D)B>,ILMISCC,&fi1 _9F
	$ILVEC=ai=<Z ILNSPV>		
	bA (<B>,ILNSPVC,D)B>,ILNSPVC,&}[r b	&
	$IOMODEb)==<Z STS>		
	A (<B>,STSC,D)'	w 	yQ
	$IPPGN=
=<Z >		
	A (<B>,C,D)A (<B*^ Nq{
	$JBMX==O<Z JBFLAG>		
	AO0 (<B>,JBFLAGC,D)B>,JBFLAGC,*DH Oq
	$JBT20=P=<Z JBFLAG>		
	P0A (<B>,JBFLAGC,D)B>,JBFLAGC,*IU =Yq
	$JBTFK==y=<Z JOBPT>		
	A> (<B>,JOBPTC,D)B>,JOBPTC,D*M >az
	$JBTTY=?=<Z JOBPT>		
	A?  (<B>,JOBPTC,D)B>,JOBPTC,D*5h3 i)
	$JFNAF=	=<Z F>		
	A (<B>,FC,D)A (<*5i@ y(y
	$JFNF==<Z F>		
	A (<B>,FC,D)A (<B*5lR )#
	$JFNRD=9=<Z F>		
	A (<B>,FC,D)A (<*5m1 {y('
	$JFNUB=y=<Z STS>		
	A (<B>,STSC,D)(*|,Z ?i
	$JOBRTP@	==<Z JOBRTL>		
	@(A (<B>,JOBRTLC,D)B>,JOBRTLC+ ]	5l
	$JSADN=])=<Z JSADIR>		
	]HA (<B>,JSADIRC,D)B>,JSADIRC,+< LI4h
	$JSAMX=Li=<Z JSATCT>		
	MA (<B>,JSATCTC,D)B>,JSATCTC,+W MI4p
	$JSANO=Mi=<Z JSATCT>		
	NA (<B>,JSATCTC,D)B>,JSATCTC,+(: J!V
	$JSBAT=JA=<Z JBFLAG>		
	J`A (<B>,JBFLAGC,D)B>,JBFLAGC,+9 a	4x
	$JSCDF=a)=<Z JSBCDS>		
	OA (<B>,JSBCDSC,D)B>,JSBCDSC,+9 `	6
	$JSCDS=`)=<Z JSBCDS>		
	`HA (<B>,JSBCDSC,D)B>,JSBCDSC,+IY 89M
	$JSDFS=I1=<Z JBFLAG>		
	IPA (<B>,JBFLAGC,D)B>,JBFLAGC,+J9 _	5|
	$JSDIR=_)=<Z JSBSDN>		
	_HA (<B>,JSBSDNC,D)B>,JSBSDNC,+[ K1_
	$JSELO=KQ=<Z JBFLAG>		
	KpA (<B>,JBFLAGC,D)B>,JBFLAGC,+k LAh
	$JSFLO=La=<Z JBFLAG>		
	MA (<B>,JBFLAGC,D)B>,JBFLAGC,+k: \	5d
	$JSFMT=\)=<Z JSFKMT>		
	\HA (<B>,JSFKMTC,D)B>,JSFKMTC,+|X [	5\
	$JSGRP=[)=<Z JSGRPS>		
	[HA (<B>,JSGRPSC,D)B>,JSGRPSC,+Xt X	5D
	$JSMCI=X)=<Z JSSTRF>		
	XHA (<B>,JSSTRFC,D)B>,JSSTRFC,+] G=
	$JSMTD=G9=<Z JSMTA1>		
	GXA (<B>,JSMTA1C,D)B>,JSMTA1C,+] F5
	$JSMTM=F1=<Z JSMTA1>		
	FPA (<B>,JSMTA1C,D)B>,JSMTA1C,+] H!F
	$JSMTP=HA=<Z JSMTA1>		
	H`A (<B>,JSMTA1C,D)B>,JSMTA1C,+] E	,
	$JSMTR=E)=<Z JSMTA1>		
	EHA (<B>,JSMTA1C,D)B>,JSMTA1C,+{ MQq
	$JSOLO=Mq=<Z JBFLAG>		
	NA (<B>,JBFLAGC,D)B>,JBFLAGC,+9 W	5<
	$JSSDM=W)=<Z JSSTRF>		
	WHA (<B>,JSSTRFC,D)B>,JSSTRFC,+= vI5R
	$JSSTN=Z	=<Z JSSTRF>		
	Z(A (<B>,JSSTRFC,D)B>,JSSTRFC,+X` ^	5t
	$JSUC==^)<Z JSBSDN>		
	A^H (<B>,JSBSDNC,D)B>,JSBSDNC,+v Y	5L
	$JSXCL=Y)=<Z JSSTRF>		
	YHA (<B>,JSSTRFC,D)B>,JSSTRFC,+$lU J!,V
	$JTFRK=JA=<Z JTTFK>		
	AJ` (<B>,JTTFKC,D)B>,JTTFKC,D+%8 F,5
	$JTIMP=F9=<Z JTBMN>		
	AFX (<B>,JTBMNC,D)B>,JTBMNC,D+%+W I!,N
	$JTJNO=IA=<Z KIMUU1+1>		
I`	A (<B>,KIMUU1+1C,D),KIMUU1++%Xw G!,>
	$JTMCN=GA=<Z JTMNW>		
	AG` (<B>,JTMNWC,D)B>,JTMNWC,D+%[T H!,F
	$JTMNI=HA=<Z JTMNW>		
	AH` (<B>,JTMNWC,D)B>,JTMNWC,D-z 5a32
	$K01ST=6=<Z .FBBBT>		
	6 A (<B>,.FBBBTC,D)B>,.FBBBTC,-^ 4Q3)
	$K0EXM=4q=<Z .FBBBT>		
	5A (<B>,.FBBBTC,D)B>,.FBBBTC,-h9 3A3 
	$K0NAR=3a=<Z .FBBBT>		
	4A (<B>,.FBBBTC,D)B>,.FBBBTC,-i 213
	$K0NDL=2Q=<Z .FBBBT>		
	2pA (<B>,.FBBBTC,D)B>,.FBBBTC,-(9 La3
	$K0RAR=01=<Z .FBBBT>		
	0PA (<B>,.FBBBTC,D)B>,.FBBBTC,-)V 83D
	$K0RFL=8!=<Z .FBBBT>		
	8@A (<B>,.FBBBTC,D)B>,.FBBBTC,-*; 1!3
	$K0RIV=1A=<Z .FBBBT>		
	1`A (<B>,.FBBBTC,D)B>,.FBBBTC,-,w 93M
	$K0RSN=91=<Z .FBBBT>		
	9PA (<B>,.FBBBTC,D)B>,.FBBBTC,-|W 6q3;
	$K0WRN=7=<Z .FBBBT>		
	70A (<B>,.FBBBTC,D)B>,.FBBBTC,./S /9*}
	$KEYFF=/Y=<Z F1>		
	A (<B>,F1C,D) (<.dJ9 q1?
	$KLDIR=qQ=<Z .KLDIR>		
	qpA (<B>,.KLDIRC,D)B>,.KLDIRC,.f: s9?
	$KLSHR=sY=<Z .KLSHR>		
	sxA (<B>,.KLSHRC,D)B>,.KLSHRC,.f= p1?
	$KLSTR=pQ=<Z .KLDIR>		
	ppA (<B>,.KLDIRC,D)B>,.KLDIRC,.fK r9?
	$KLTLN=rY=<Z .KLSHR>		
	rxA (<B>,.KLSHRC,D)B>,.KLSHRC,25n 9(
	$LFNXT=Y=<Z STS>		
	A (<B>,STSC,D)(2uXw w)<
	$LNMCNTwI==<Z 0>		
	A (<B>,0C,D)A (<2uZ2 x	B
	$LNMIDXx)==<Z 0>		
	A (<B>,0C,D)A (<2u[ yQO
	$LNMLNKyq==<Z 1>		
	A (<B>,1C,D)A (<2u\ z1U
	$LNMPNTzQ==<Z 1>		
	A (<B>,1C,D)A (<2u\z xiH
	$LNMSTPy	==<Z 0>		
	A (<B>,0C,D)A (<2v= Wq=C
	$LNSTA=X=<Z DNASTA>		
	X0A (<B>,DNASTAC,D)B>,DNASTAC,2}is oQ&
	$LONGF=oq=<Z STS>		
	A (<B>,STSC,D)(34\S :)+T
	$LVERF=:I=<Z F1>		
	A (<B>,F1C,D) (<7$: $*#
	$MTCHF=$9=<Z F1>		
	A (<B>,F1C,D) (<:
8s
	$NACCF=
	A(<B>,FC,D)A (<:
	$NAMCN=VA=<Z >		
	A(<B>,C,D)A (<B:
	$NAMEF=rA=<Z STS>		
	A(<B>,STSC,D)(:
	$NAMF==9<Z F>		
	A(<B>,FC,D)A (<B:
	$NAMSF=6=<Z F1>		
	A(<B>,F1C,D) (<:
	$NAMTF=Y=<Z F>		
	A(<B>,FC,D)A (<:
	$NAMXF=+=<Z F1>		
	A (<B>,F1C,D) (<:,y@ &9*5
	$NEGF==&Y<Z F1>		
	A (<B>,F1C,D) (<:.y@ 0+
	$NEWF==09<Z F1>		
	A (<B>,F1C,D) (<:.{S y(A
	$NEWNF==<Z F>		
	A (<B>,FC,D)A (<:.}S 0y+	
	$NEWVF=1=<Z F1>		
	A (<B>,F1C,D) (<:mI7 v/3
	$NMLEN=v9=<Z 0>		
	A (<B>,0C,D)A (<:nN8 u9/-
	$NMTYP=uY=<Z 0>		
	A (<B>,0C,D)A (<:nh6 w/:
	$NMVAL=w!=<Z 1>		
	A (<B>,1C,D)A (<:t3 "Y*
	$NNAMF="y=<Z F>		
	A (<B>,FC,D)A (<:|I3 !y*
	$NODEF="=<Z F>		
	A (<B>,FC,D)A (<:}n mq&q
	$NONXF=n=<Z STS>		
	A (<B>,STSC,D)(:~= PI5
	$NOSTR=Pi=<Z STRWRD>		
	QA (<B>,STRWRDC,D)B>,STRWRDC,;X` (Y*G
	$NREC==(y<Z F1>		
	A (<B>,F1C,D) (<;Xh )9*M
	$NREC1=)Y=<Z F1>		
	A (<B>,F1C,D) (<;Z 9(-
	$NSPNULY==<Z STS>		
	A (<B>,STSC,D);-YS .Y*w
	$NUMFF=.y=<Z F1>		
	A (<B>,F1C,D) (<;4\S #9*
	$NVERF=#Y=<Z F>		
	A (<B>,FC,D)A (<;>I@ na&x
	$NWTF==o<Z STS>		
	A (<B>,STSC,D)(<>I@ %Y*/
	$OCTF==%y<Z F1>		
	A (<B>,F1C,D) (<>%Q <aj
	$ODIRC===<Z ALOC1>		
	A=  (<B>,ALOC1C,D)B>,ALOC1C,D>5hQ A

	$OFNBC=A!=<Z OFNLEN>		
	A@A (<B>,OFNLENC,D)B>,OFNLENC,>5hY ?y
	$OFNBSZ@==<Z OFNLEN>		
	@8A (<B>,OFNLENC,D)B>,OFNLENC>5hy 1
	$OFNCSHQ==<Z SPTO2>		
	pA (<B>,SPTO2C,D)B>,SPTO2C,>5j %
	$OFNHS=9=<Z OFNHST>		
	XA (<B>,OFNHSTC,D)B>,OFNHSTC,>5k3 1
	$OFNMGBQ==<Z SPTO2>		
	pA (<B>,SPTO2C,D)B>,SPTO2C,>5k\ -
	$OFNNXT9==<Z OFNHSE>		
	XA (<B>,OFNHSEC,D)B>,OFNHSEC>5l !6
	$OFNPRVA==<Z OFNHSE>		
	`A (<B>,OFNHSEC,D)B>,OFNHSEC>5lt uI0
	$OFNSHCui==<Z SPTO>		
	Av (<B>,SPTOC,D)<B>,SPTOC,D)>5| w1?
	$OFOPC=wQ=<Z SPTO2>		
	Awp (<B>,SPTO2C,D)B>,SPTO2C,D>dKS i(H
	$OLDNF=		=<Z F>		
	A (<B>,FC,D)A (<?i@ iA&N
	$OPNF==ia<Z STS>		
	A (<B>,STSC,D)(<?p ml
	$ORG==<m!Z FILVER>		
	A m@(<B>,FILVERC,D)B>,FILVERC,D?LS I)
	$OSTRF=i=<Z F>		
	A (<B>,FC,D)A (<?.L 	(:
	$OUTPF=)=<Z F>		
	A (<B>,FC,D)A (<B
}1 cy@
	$PAGUBAgi==<Z KIPGWD>		
	hA (<B>,KIPGWDC,D)B>,KIPGWDCB; h1&E
	$PASLSNhY==<Z STS>		
	A (<B>,STSC,D)B7	S 1Y+
	$PFXFF=1y=<Z F1>		
	A (<B>,F1C,D) (<B=IZ =ir
	$PGLFT=>	=<Z ALOC2>		
	A>((<B>,ALOC2C,D)B>,ALOC2C,DB>
	$PGPTR=?=<Z ALOC2>		
	A?0 (<B>,ALOC2C,D)B>,ALOC2C,DBGs ))
	$PHYOF=I=<Z F>		
	A (<B>,FC,D)A (<BL+8 \	d
	$PIBMP=\)=<Z FKQ2(FX)>		
\H	A (<B>,FKQ2(FX)C,D),FKQ2(FXBe8w o)~
	$PLKCNToI==<Z @CST1X>		
	ohA (<B>,@CST1XC,D)B>,@CST1XCB}iS 	Y(O
	$PONFF=	y=<Z F>		
	A (<B>,FC,D)A (<Cn |Yg
	$PRFXL=|y=<Z 0>		
	A (<B>,0C,D)A (<Cn {[
	$PRFXS={1=<Z 0>		
	A (<B>,0C,D)A (<Cn {qa
	$PRFXV=|=<Z 0>		
	A (<B>,0C,D)A (<CI@ 9)U
	$PRTF==Y<Z F>		
	A (<B>,FC,D)A (<BCIS -*k
	$PRTFF=-9=<Z F1>		
	A (<B>,F1C,D) (<CM  9*
	$PRTTF= Y=<Z F>		
	A (<B>,FC,D)A (<C] R	
	$PSUTPSR)==<Z PSBITS>		
	RHA (<B>,PSBITSC,D)B>,PSBITSCC
t Q

	$PSXSIRQ!==<Z PSBITS>		
	Q@A (<B>,PSBITSC,D)B>,PSBITSCJ, j1&U
	$READF=jQ=<Z STS>		
	A (<B>,STSC,D)(J,9@ (
	$RECF==9<Z STS>		
	A (<B>,STSC,D)(<Je	S 9)
	$RLHFF=Y=<Z F>		
	A (<B>,FC,D)A (<Jtq Q8
	$RNACC=q=<Z 5>		
	A (<B>,5C,D)A (<JtI@ m&j
	$RNDF==m!<Z STS>		
	A (<B>,STSC,D)(<JuI7 y7N
	$RNLEN=ya=<Z 0>		
	A (<B>,0C,D)A (<Jukr ~7r
	$RNNOD=~!=<Z 2>		
	A (<B>,2C,D)A (<Jun {a7`
	$RNNXT=|=<Z 1>		
	A (<B>,1C,D)A (<Jv9 a8
	$RNPAS==<Z 4>		
	A (<B>,4C,D)A (<JvN8 wQ7?
	$RNTYP=wq=<Z 0>		
	A (<B>,0C,D)A (<Jv\y ~q7y
	$RNUSR==<Z 3>		
	A (<B>,3C,D)A (<Jvi9 x17E
	$RNVER=xQ=<Z 0>		
	A (<B>,0C,D)A (<Kw ():D
	$RSPOO=(I=<Z 0>		
	A (<B>,0C,D)A (<K:= )	:J
	$RSSIZ=))=<Z 0>		
	A (<B>,0C,D)A (<K' 
)(d
	$RTYPF=
I=<Z F>		
	A (<B>,FC,D)A (<K4\S 8I+F
	$RVERF=8i=<Z F1>		
	A (<B>,F1C,D) (<N	1 ]Y=o
	$SBHEB=]y=<Z 3>		
	A (<B>,3C,D)A (<N8W \	=b
	$SBSBN=\)=<Z 3>		
	A (<B>,3C,D)A (<N8w Y=M
	$SBSCN=Y9=<Z SBSTYP>		
	YXA (<B>,SBSTYPC,D)B>,SBSTYPC,N<q \q=i
	$SBSSB=]=<Z 3>		
	A (<B>,3C,D)A (<N<| [!=\
	$SBSSY=[A=<Z 3>		
	A (<B>,3C,D)A (<N= Z=U
	$SBSTP=Z9=<Z SBSTYP>		
	ZXA (<B>,SBSTYPC,D)B>,SBSTYPC,N+ {qc
	$SCBLK%|==<Z FKSWP>		
	|0A (<B>,FKSWPC,D)B>,FKSWPC,N= U=:
	$SCSTA=W	=<Z DNASTA>		
	W(A (<B>,DNASTAC,D)B>,DNASTAC,Nx5 ziZ
	$SCWAK%{	==<Z FKSWP>		
	{(A (<B>,FKSWPC,D)B>,FKSWPC,NFI@ y)1
	$SHTF==<Z F>		
	A (<B>,FC,D)A (<BNL gQ&?
	$SIADR=gq=<Z >		
	A (<B>,C,D)A (<BNMI; fa&8
	$SILEV=g=<Z >		
	A (<B>,C,D)A (<BNNi9 bI&1
	$SIVER=f=<Z >		
	A (<B>,C,D)A (<BNO)@ y!'L
	$SIZF==yA<Z STS>		
	A (<B>,STSC,D)(<N] i'W
	$SKIPBYzy==<Z STS>		
	A (<B>,STSC,D)OHr y1O
	$SPTCDOyQ==<Z SPTO2>		
	ypA (<B>,SPTO2C,D)B>,SPTO2C,OHz 9
	$SPTCT=Y=<Z >		
	A (<B>,C,D)A (<BOI {1_
	$SPTDSF{Q==<Z SPTO2>		
	{pA (<B>,SPTO2C,D)B>,SPTO2C,OIW x1G
	$SPTFO=xQ=<Z SPTO2>		
	Axp (<B>,SPTO2C,D)B>,SPTO2C,DOIY |1g
	$SPTFR=|Q=<Z SPTO2>		
	A|p (<B>,SPTO2C,D)B>,SPTO2C,DOK9 1
	$SPTMR=Q=<Z SPTO2>		
	Ap (<B>,SPTO2C,D)B>,SPTO2C,DOKP ~1w
	$SPTNA=~Q=<Z SPTO2>		
	A~p (<B>,SPTO2C,D)B>,SPTO2C,DOLs z1W
	$SPTSFDzQ==<Z SPTO2>		
	zpA (<B>,SPTO2C,D)B>,SPTO2C,OLt tQ'
	$SPTSHCtq==<Z SPT>		
	A (<B>,SPTC,D)OLy }1o
	$SPTSR=}Q=<Z SPTO2>		
	A}p (<B>,SPTO2C,D)B>,SPTO2C,DOLz 1
	$SPTST=Q=<Z SPTO2>		
	Ap (<B>,SPTO2C,D)B>,SPTO2C,DON qI
	$SPTX==	<Z >		
	A (<B>,C,D)A (<B>O$S A),

	$STARF=AI=<Z F1>		
	A (<B>,F1C,D) (<O$,` 8]
	$STBS==9<Z SDBSTS>		
	AX (<B>,SDBSTSC,D)B>,SDBSTSC,O$<R y8;
	$STCRD==<Z SDBSTS>		
	8A (<B>,SDBSTSC,D)B>,SDBSTSC,O$J9 I8 
	$STDIS=i=<Z SDBSTS>		
	A (<B>,SDBSTSC,D)B>,SDBSTSC,O$Kv Y8)
	$STDOM=y=<Z SDBSTS>		
	A (<B>,SDBSTSC,D)B>,SDBSTSC,O$\ B,
	$STEPF=B9=<Z F1>		
	A (<B>,F1C,D) (<O$^ 	8M
	$STEXL=	9=<Z SDBSTS>		
		XA (<B>,SDBSTSC,D)B>,SDBSTSC,O$x2 w	C
	$STGADR1==<Z >		
	A (<B>,C,D)A (<O% 	8D
	$STIDX=)=<Z SDBSTS>		
	HA (<B>,SDBSTSC,D)B>,SDBSTSC,O%lY i82
	$STNRS=	=<Z SDBSTS>		
	(A (<B>,SDBSTSC,D)B>,SDBSTSC,O%yY 
8U
	$STOFS=
9=<Z SDBSTS>		
	
XA (<B>,SDBSTSC,D)B>,SDBSTSC,O&
` eI8
	$STPS==w)<Z SDBSTS>		
	Ay (<B>,SDBSTSC,D)B>,SDBSTSC,O&  \Ah
	$STR==<\aZ FILDEV>		
	A ](<B>,FILDEVC,D)B>,FILDEVC,DO&(H 9M
	$STRB0=1=<Z SDBBT0>		
	PA (<B>,SDBBT0C,D)B>,SDBBT0C,O&(H 9U
	$STRB1=9=<Z SDBBT1>		
	XA (<B>,SDBBT1C,D)B>,SDBBT1C,O&(Z q9+
	$STRBTB==<Z SDBBTB>		
	0A (<B>,SDBBTBC,D)B>,SDBBTBCO&(\ Y9
	$STRBXBy==<Z SDBBXB>		
	A (<B>,SDBBXBC,D)B>,SDBBXBCO&(| 	9D
	$STRCYL)==<Z SDBCYL>		
	HA (<B>,SDBCYLC,D)B>,SDBCYLCO&)@ 'y*A
	$STRF==(<Z F1>		
	A (<B>,F1C,D) (<O&)Q y93
	$STRFC==<Z SDBFRC>		
	8A (<B>,SDBFRCC,D)B>,SDBFRCC,O&)V OI5
	$STRFLGOi==<Z STRWRD>		
	PA (<B>,STRWRDC,D)B>,STRWRDCO&)Y i9"
	$STRFSS	==<Z SDBFSS>		
	(A (<B>,SDBFSSC,D)B>,SDBFSSCO&*2 A8x
	$STRIDXa==<Z SDBIDX>		
	A (<B>,SDBIDXC,D)B>,SDBIDXCO&*Q 
98g
	$STRJB=
Y=<Z SDBSTS>		
	
xA (<B>,SDBSTSC,D)B>,SDBSTSC,O&+ 9<
	$STRLCA!==<Z SDBLCA>		
	@A (<B>,SDBLCAC,D)B>,SDBLCACO&+ I9
	$STRLDNi==<Z SDBLDN>		
	A (<B>,SDBLDNC,D)B>,SDBLDNCO&+  A:
	$STRLK= a=<Z SDBFLK>		
	!A (<B>,SDBFLKC,D)B>,SDBFLKC,O&+1 !I:
	$STRMC=!i=<Z SDBCNT>		
	"A (<B>,SDBCNTC,D)B>,SDBCNTC,O&+4 #Q:!
	$STRMI=#q=<Z SDBPUC>		
	$A (<B>,SDBPUCC,D)B>,SDBPUCC,O&+P NI4U
	$STRNAMNi==<Z SDBNAM>		
	JXA (<B>,SDBNAMC,D)B>,SDBNAMCO&+Y a9
	$STRNSS==<Z SDBNSS>		
	 A (<B>,SDBNSSC,D)B>,SDBNSSCO&+Z K)1-
	$STRNUML!==<Z SDBNUM>		
	YA (<B>,SDBNUMC,D)B>,SDBNUMCO&+s "I:
	$STROF="i=<Z SDBCNT>		
	#A(<B>,SDBCNTC,D)B>,SDBCNTC,O&,R 
	$STRRDOIDX>		
	A (<B>,SDBIDXC,D)B>,SDBIDXCO&,\ Q9	
	$STRRXBq==<Z SDBRXB>		
	A (<B>,SDBRXBC,D)B>,SDBRXBCO&,s 4+#
	$STRSF=49=<Z F1>		
	A (<B>,F1C,D) (<O&,t I94O
	$STRSIZIY==<Z SDBSIZ>		
	IxA (<B>,SDBSIZC,D)B>,SDBSIZCO&,z vi7R
	$STRSTS;==<Z SDBSTS>		
	z!A (<B>,SDBSTSC,D)B>,SDBSTSCO&- )9f
	$STRTMRI==<Z SDBTMR>		
	hA (<B>,SDBTMRC,D)B>,SDBTMRCO&- !9^
	$STRTYPA==<Z SDBTYP>		
	`A (<B>,SDBTYPC,D)B>,SDBTYPCO&-1 99w
	$STRUC=Y=<Z SDBFLK>		
	xA (<B>,SDBFLKC,D)B>,SDBFLKC,O&-2 19o
	$STRUDBQ==<Z SDBUDB>		
	pA (<B>,SDBUDBC,D)B>,SDBUDBCO&-9 A:
	$STRUS=a=<Z SDBFLK>		
	 A (<B>,SDBFLKC,D)B>,SDBFLKC,O&. i)4
	$STRX==vI<Z SPTO>		
	A (<B>,SPTOC,D)OF= 1;
	$SXSTR=11=<Z 2>		
	A (<B>,2C,D)A (<OMX2 s)/
	$SYMAD=sI=<Z .SYMAD>		
	shA (<B>,.SYMADC,D)B>,.SYMADC,OMY q1/
	$SYMDN=qQ=<Z 0>		
	A (<B>,0C,D)A (<OMY: r!/
	$SYMET=rA=<Z .SYMAD>		
	r`A (<B>,.SYMADC,D)B>,.SYMADC,OM] pQ/
	$SYMTY=pq=<Z 0>		
	A (<B>,0C,D)A (<OM]V t1/'
	$SYMVL=tQ=<Z .SYMVL>		
	tpA (<B>,.SYMVLC,D)B>,.SYMVLC,R{S ?I+~
	$TCONF=?i=<Z F1>		
	A (<B>,F1C,D) (<R5d  Cq4#
	$TFN1==D<Z .FBSS1>		
	AD0 (<B>,.FBSS1C,D)B>,.FBSS1C,R5d@ G4<
	$TFN2==G!<Z .FBSS2>		
	AG@ (<B>,.FBSS2C,D)B>,.FBSS2C,RMXt Y 
	$TIMCHNy==<Z 2>		
	A (<B>,2C,D)A (<RMXw @q
	$TIMCNTA==<Z JOBRTL>		
	A0A (<B>,JOBRTLC,D)B>,JOBRTLCRMYY 	z
	$TIMFRK)==<Z 2>		
	A (<B>,2C,D)A (<RMZW q 
	$TIMJOB==<Z 2>		
	A (<B>,2C,D)A (<RMZw A 
	$TIMKNLa==<Z 3>		
	A (<B>,3C,D)A (<RM[ }An
	$TIMLNK}a==<Z 0>		
	A (<B>,0C,D)A (<RM] ~)t
	$TIMTIM~I==<Z 1>		
	A (<B>,1C,D)A (<Rn	S 9(]
	$TMPFF=Y=<Z F>		
	A (<B>,FC,D)A (<Rn
	$TMPTF=!9=<Z F>		
	A (<B>,FC,D)A (<SXr 1!
	$TRMCD=1A=<Z FKINT>		
	A1` (<B>,FKINTC,D)B>,FKINTC,DSXw 3A
	$TRMCOD3a==<Z >		
	A (<B>,C,D)A (<Sls x1'E
	$TRNSF=xQ=<Z STS>		
	A (<B>,STSC,D)(Sd  Dy4+
	$TSN1==E<Z .FBSS1>		
	AE8 (<B>,.FBSS1C,D)B>,.FBSS1C,Sd@ H	4D
	$TSN2==H)<Z .FBSS2>		
	AHH (<B>,.FBSS2C,D)B>,.FBSS2C,VuI7 }I/n
	$UNLEN=}i=<Z 0>		
	A (<B>,0C,D)A (<VuJs '*;
	$UNLKF='9=<Z F1>		
	A (<B>,F1C,D) (<Vv: ~1/u
	$UNSHR=~Q=<Z 1>		
	A (<B>,1C,D)A (<VvN8 |i/h
	$UNTYP=}	=<Z 0>		
	A (<B>,0C,D)A (<Vvh6 /{
	$UNVAL=9=<Z 2>		
	A (<B>,2C,D)A (<W
hw bq&
	$UQFCN=c=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLEN=dY=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLJI=cy=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLNK=eA=<Z 1>		
	A (<B>,1C,D)A (<W)x 0);
	$USRGP=0I=<Z 2>		
	A (<B>,2C,D)A (<W+V /A:~
	$USRNM=/a=<Z 2>		
	A (<B>,2C,D)A (<Z.)@ Y)O
	$VERF==y<Z F>		
	A (<B>,FC,D)A (<BZ.,s 7Y+?
	$VERSF=7y=<Z F1>		
	A (<B>,F1C,D) (<Z.- y)y
	$VERTF==<Z F>		
	A (<B>,FC,D)A (<^tI@ vQ'7
	$WNDF==vq<Z STS>		
	A (<B>,STSC,D)(<_I@ k!&\
	$WRTF==kA<Z STS>		
	A (<B>,STSC,D)(<bI@ l&c
	$XCTF==l1<Z STS>		
	A (<B>,STSC,D)(<b<r k)^
	$XGAGE=kI=<Z @CST0X>		
	khA (<B>,@CST0XC,D)B>,@CST0XC,cH: +9:]
	$XPDAT=+Y=<Z 1>		
	A (<B>,1C,D)A (<cH3 |9'e
	$XQTAF=|Y=<Z STS>		
	A (<B>,STSC,D)(8u{P :P :5I`Q :ex`P(:ez`P :n:`P :|i@P :}IP ;0P ;,L !
	..TSIZ !9(..PST,C)
	.CAS!XE ..PST,<<
	  XC!xTU [MOVEM A,B]>",<
	  XCTU [HRRM"8 A,B]>,<
	  XC"XTU [HRLM A,B]>,"x<
	  XCTBMU [DPB# A,[POINTR (B,C)]]>>NTR (B,;-I y
	..TSIZ (..PST,C)
	.CAS8E ..PST,<<
	  XCXTU [MOVE A,B]>,x<
	  XCTU [HRRZ A,B]>,<
	  XCT8U [HLRZ A,B]>,<X
	  XCTBMU [LDB xA,[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 5a;.
	.CKLC2 (A)
	.CKLC2 ]Hi 6!;:
   IFB <6AB>,<PRINTX % Dat6`a item A in BUG'7TYP TAG has no de7 scriptor.>
    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