PDP-10 Archive: 6-1-monitor/prolog.unv from SRI_NIC_PERM_SRC_1

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_1_19910112 - 6-1-monitor/prolog.unv

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

x
,5	R@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@ bAJSP 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 q!

LK DEVLKK,SLOW,LLCAL,DE0VL0K
;LK BTLKK,FPAST,LLCAL,BTL0K
p;LK DMPLKK,FAST,LLCAL,DMPL0K
;LK 0FELKK,FAST,LLCAL,PFEL0K
;LK IDVLKKp,FAST,LLCAL,IDVL0K
;LK NCPLKK,FAS0T,LLCAL,NCPL0K
;PLK OUTLKK,FAST,LLpCAL,OUTL0K
;LK NODLKK,FAST,LLCAL,0NODL0K
;LK LLLLKPK,FAST,LLCAL,LLLLp0K
;LK STRLKK,SLOW,LLCAL,STRL0K
0;LK LPTLKK,FAST,LPLCAL,0
;LK MTALKpK,FAST,LLCAL,0
;LK CDPLKK,FAST,LL0CAL,CDPL0K
;LK CPDRLKK,FAST,LLCAL,pCDRL0K
;LK MTALK	K,FAST,LLCAL,0
;	0LK PLTLKK,FAST,LL	PCAL,0
;LK PTPLKK	p,FAST,LLCAL,PTPL0
K
;LK PTRLKK,FAS
0T,LLCAL,PTRL0K
;
PLK FGLKK,FAST,LLC
pAL,FGL0K
;LK SNPLKK,FAST,LLCAL,SN0PL0K
;LK USGLKK,PFAST,LLCAL,USGL0Kp
;LK ACTLKK,FAST

,LLCAL,ACTL0K
;L

0K ASCLKK,FAST,LLC

PAL,ASCL0K
;LK GO

pKLKK,FAST,LLCAL,G
;LKATIMLKKL,TIML0
;LKLCRJLKK,FAS
;LK LDTLKK,FAST,LL0CAL,LDTL0K
;LK JPSTLKK,FAST,LLCAL,pJSTL0K
;LK DRCLKK,FAST,LLCAL,DRCL00K
;LK JFNLKK,FAPST,LLCAL,JFNL0K
p;LK FILLKK,FAST,LLCAL,FILL0K
LK E0NQLKK,SLOW,GLLBALP,ENQL0K
LK PIDLKpK,SLOW,GLLBAL,PIDL0K
;LK JSFLKK,F0AST,LLCAL,JSFL0K
;LK JBCLKK,FAST,pLLCAL,JBCL0K
;LK SFRLKK,FAST,LLCA0L,SFRL0K
;LK JFRPLKK,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>= P#A80
	IFN FTSpHOW,..LOC==.


DEFINE	WORD(NAM,0NUMB<1>),<
	IFN P<..MSK>,<..OFF==.p.OFF+1> 

	..MSK==0		
	FIELDM(N0AM,<.FWORD>)	

P	..MSK==0		
	..OpFF==..OFF+NUMB	
	
>

DEFINE	NXT	0WRD(NUMB<1>),<
		P..MSK==0
	..OFF=	p..OFF+NUMB

>


DEFINE	FILLER(N
0UM),<
	..FLG==PO
PS(..MSK)
	IFE ..
pMSK,<..FLG==-1>
	IFG <^D<NUM>-<^D035-..FLG>>,<PRINTPX ?FILL TOO BIG IpN A STRUCTURE>

	...MSK==MASK.(^D

0<NUM>,<..FLG+^D<N

PUM>>)
	IFN FTSHO

pW,<
	FFPHASE ..O
	  EXP ...MSK
	>
	..MSK==..M
>



DEFINE	HWORD(nam),<
	..FLG==0	0	
	IFE ..MSK&.LHPALF,<FIELDM(nam,.pLHALF)
			  ..FLG==1>
	IFE ..FLG0,<..MSK==..MSK!.LPHALF
		   IFE ..pMSK&.RHALF,<FIELDM(nam,.RHALF)
		0		     ..FLG==1>
		   IFE ..FLG,<pNXTWRD
			      FIELDM(nam,.LHALF0) >
		  >
>

P
DEFINE	FIELD(NApM,SIZ,POS),<
	..FLG==0		

	IFB 0<POS>,<IFB <SIZ>,P<
	  ...MSK==.RTpMSK(<<^-<<..MSK>>>>) 
	  IFE ...M0SK,<..OFF==..OFF+P1 
	    ..MSK==0p		
	    ...MSK==-1
	  >
	  FIEL0DM(NAM,<...MSK>)	P
	p..FLG==-1		
	>>

	IFNB <SIZ>,<.SIZ==^D<SIZ>0> 

	IFNB <POS>P,<		
	  FIELDM(NpAM,MASK.(.SIZ,POS)) 
	  ..FLG==-10		
	  ..BITS==MAPSK.(.SIZ,POS) 
	p>

	IFE ..FLG,<IFGE <^D<.SIZ>-^D036>,< 
	  WORD(NPAM,<^D<.SIZ>/^D36p>) 
	  IFN <<^D<.SIZ>-<^D<.SIZ>/^0D36>*^D36>>,<	
	P    FIELD(...,<<^pD<.SIZ>-<^D<.SIZ>/^D36>*^D36>>) 
0	  >

	  ..FLG=P=-1		
	>>

	IFpE ..FLG,<		
	  ..BITS==MASK.(^D<.0SIZ>,<^D<.SIZ>-1>P) 

	  REPEAT <p^D36-^D<.SIZ>+1>,< 
	    IFE ..FL0G,<	
	      IFE P<..BITS&..MSK>,< p
			..MSK==..MSK!..BITS 
		..FLG0==-1 
	       > P

	    IFE ..FLpG,..BITS==..BITS_<-1> 
	    >
	 0 >

	IFE ..FLG,P<		
	  ..BITS==MpASK.(^D<.SIZ>,<^D<.SIZ>-1>) 
	  .0.OFF==..OFF+1	
	P  ..MSK==..BITS		p
	>

	MSKSTR(A'NAM,\..OFFC,..0BITS) 
	A.'NAM=P=..OFF
	IFN FTSHpOW,<
	  PHASE	A .'NAM
	  EXP	A' 0NAM
	>>

	..OL PD==..BITS		
	... pOLD==..BITS		

!>

DEFINE	BIT(N!0AM),<
	..BITS==L!PFTBT.(..OLD)	

!p	IFE ..BITS,<PRIN"TX ?NO ROOM FOR B"0IT IN LAST FIELD>"P

	A%'NAM==..B"pITS_<-<^D35-POS(.#..OLD)>> 
	A.'N#0AM==..OFF		

	M#PSKSTR(A'NAM,\..O#pFFC,..BITS) 
	I$FN FTSHOW,<
	  P$0HASE ..OFF
	  EX$PP A'NAM
	>

	$p..OLD==..OLD&<^-<%..BITS>> 

>
%0
DEFINE	FIELDM(NA%PM,MASK),<
	IFN M%pASK&..MSK,<	
	  &..MSK==0		
	  ..&0OFF==..OFF+1
	>P

	..MSK==..MSK!&pMASK	

	MSKSTR('A'NAM,\..OFFC,M'0ASK) 
	A.'NAM=='P..OFF
	IFN FTSHO'pW,<
	  PHASE	A.('NAM
	  EXP	A'N(0AM
	>
>

DEFI(PNE ENDSTR(LENNAM<(pLEN>,LSTNAM<LST>)),<

	IFN ..MSK,)0<..OFF==..OFF+1> )P

	A.'LSTNAM==)p..OFF	

	IFN FT*SHOW,DEPHASE

	*0..LOK==..LOK+1
	*PIFN ..LOK,<PRINTX*p ? MISSING BEGSTR+>

	IF2,<
	  I+0FDEF ...MSK,<SUPP+PRESS ...MSK>
	  +pIFDEF ..BITS,<SUP,PRESS ..BITS>
	 ,0 IFDEF .SIZ,<SUPP,PRESS .SIZ>
	  IF,pDEF ..MSK,<SUPPRE-SS ..MSK>
	  IFD-0EF ..OFF,<SUPPRES-PS ..OFF>
	  IFDE-pF ..FLG,<SUPPRESS. ..FLG>
	  IFDEF.0 ..LOK,<SUPPRESS .P..LOK>
	  IFDEF .p..LOC,<SUPPRESS ./.LOC>
	  IFDEF ./0.OLD,<SUPPRESS ../POLD>
	  IFDEF ../p.OLD,<SUPPRESS ..0.OLD>
	>

	IF100,<
	  IFDEF ...M0PSK,<.XCREF ...MSK0p>
	  IFDEF ..BIT1S,<.XCREF ..BITS>10
	  IFDEF .SIZ,<1P.XCREF .SIZ>
	  1pIFDEF ..MSK,<.XCR2EF ..MSK>
	  IFD20EF ..FLG,<.XCREF 2P..FLG>
	  IFDEF 2p..OFF,<.XCREF ..O3FF>
	  IFDEF ..L30OK,<.XCREF ..LOK>3P
	  IFDEF ..LOC,3p<.XCREF ..LOC>
	4  IFDEF ..OLD,<.X40CREF ..OLD>
	  I4PFDEF ...OLD,<.XCR4pEF ...OLD>
	>
5
	PURGE WORD,NXTW50RD,FILLER,HWORD,F5PIELD,BIT,FIELDM
5p
	A.'LENNAM==..6OFF-B
	IFN FTSH60OW,<RELOC ..LOC>>6P



	..MSK==06p		
	..OFF==B		
	A.D==B	

	70IFDEF ..LOK,<IFL 7P..LOK,<PRINTX ? N7pEW BEGSTR WITHOUT8 ENDSTR>>

	..LOK==-1


	..L#D#D0#FBEG
	  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` vY8(
   IF2,<v9..NRGS==0
	IRP vF,<
	  .CKLC1 (uyF)
	  ..NRGS=..N)RGS+1>	
    IFG H..NRGS-BUGMXR,<
h	  PRINTX %TOO MANY LOCATIONS IN D(EFINITION OF BUGHA B>>
    CONCKh$ (A,B,,,<F>,<E>,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 .!:v
	IFB <A.A>,<CALL @[B]>
	.`IFNB <A>,<CALL @[A,,B]>
LL @G
e4 yqOJSP CX,BLOCK0JSP CX,BLOG
e4  z1SJSP CX,BLOCK1JSP CX,BLOG
e9zqWJSPQCX,BLOCKEJSPCX,BLOGE  p2GE` p:GFX  p6GF[` p>GFh  p4GFk` p<Gd[@P Gt(P Gt)P GuyP Gw

VQ  GY@Q GKu ~qw
	NOSKD1
	AOSpSCAILKD1 1{
	CALL CFSULL
	CALL CFGEm6P ?GF)P#|GF+ P#|G"]Z |1c
	CALL CKINT0
	CALL CKG"uyS 5a0
	CONO PI6,PICHOF+1B<28+A>
   +1B<28+A>G"u{@ 6A6
	CONOPI6a,PICHON+1B<28+A>ICHON+1B<28+A>G&Y@Q  G'\Q G/:=P  G/	VP G2~9P G3
	CONO PI4a,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 I9v

  IF2,i<
   IFDIF <G><SAME>,<		
H  I(FDIF <E>,<G>,<
	PRINTX %Optionahl data in B disa	grees with defini	(tion of B>


	H	LALL
	  ;BUGA 	hB, F
	       S
ALL
   >>
IF1,<
(SYN B,TAGSAV    
H		
PURGE B			

hSYN TAGSAV,B			
PURGE TAGSAV>			(
IFB <H>,<
	XCHT [
	B:: 			
	h  IFIDN <A><HLT>

,<
	     IFE <<C

(URPSX-PXRESCD>*<C

HURPSX-PXSWAPCD>>,

h<
		>JSR @XBUGHL
	URPSXIFNR<<C>*<C
		 JSR BUGHLT>
	  >
	  IFDIF (<A><HLT>,<
	   H  IFE <<CURPSX-PXhRESCD>*<CURPSX-PXSWAPCD>>,<
		 PU(SHJ P,@XBGCA>
	H     IFN <<CURPSXh-PXRESCD>*<CURPSX-PXSWAPCD>>,<
		( PUSHJ P,BGCA>
H	  >
	  DOLOC0 <hE>	
		SIXBIT /B/
	  ]
>
IFNB( <H>,<
	JRST [
	       XCT [
	h       B:: 			
	         IFIDN <(A><HLT>,<
		   HIFE <<CURPSX-PXREhSCD>*<CURPSX-PXSWAPCD>>,<
		     (  JSR @XBUGHLT>
H		   IFN <<CURPSXh-PXRESCD>*<CURPSX-PXSWAPCD>>,<
		(       JSR BUGHLTH>
		 >
	       h  IFDIF <A><HLT>,<
		   IFE <<CU(RPSX-PXRESCD>*<CUHRPSX-PXSWAPCD>>,<h
		       PUSHJ P,@XBGCA>
		   (IFN <<CURPSX-PXREHSCD>*<CURPSX-PXSWhAPCD>>,<
		(      PUSHJ P,BGCA>
		 >
	         HDOLOC0 <E>	
	  h             SIXBIT /B/
	       (  ]
	       JRSTH H ]		

>
	XLhIST
	.PSECT BGSTR
i:!	ASCIZ \F(\
	.ENDPS BGSTR
	.PSECT BGPTR
 h IFE FTNSPSRV,<
  IF1,<	0			
	0(
	%ST1=MSEC1		
	H%ST1=SYMSEC		
	%hST1=XCDSEC
	PURGE %ST1>
  IF2,< (IFE <<CURPSX-PXREHSCD>*<CURPSX-PXSWhAPCD>>,<
	XWD XCDSEC,B>
	IFN <<(CURPSX-PXRESCD>*<HCURPSX-PXSWAPCD>>h,<
	XWD MSEC1,B>
	XWD SYMSEC,i(
	.XCREF i
	PUHRGE i>
  >
  IhFN FTNSPSRV,<
  IF1,<	0>			
  IF(2,<	XWD B,i
	.HXCREF i
	PURGE hi>
  >
	.ENDPS BGPTR
	LIST
G?QMG?YQG?[Q ,G?X@PGBpPRGC@PGCN-,1A.CPYRT%198535SC99GJwUQ @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` A
   IF1,<]I
	IFG B-15,<PRID9NTX ?**INVALID RE>yDEFINITION OF AC _AB**>
	IFL B-1,_`<PRINTX ?**INVALI`D REDEFINITION OF`  AC B**>
	A=B`@
	PURGE B,B
	``DEFINE B<%B%>>EFINE B<%B%>>I6= bP&#
	A==<-1bpB<C>+1B<C-D>> c
	IF1,<IFDEF %Ac0,<PRINTX ?A ALREcPADY DEFINED>>
	DcpEFINE %A (OP,AC,dY,MSK)<
	$A==<Zd0 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 )9z
	IRP A,<DOLOC2 A> A,I>exh  ):
	Z A
   
	Z A
 I>exi i9~
	DOLOC1 (A)
	DOLOC1 I>lQ xI>u\`Q I>v9`Q I?0 4Y%M
   DEFINNIE A (NAM,SIZ)<
N)	NAM=:..PC
	..PCO	=..PC+SIZ>
   DEYFINE SA (NAM,SIZY1)<
	NAM==:..PC
YQ	..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 I)6
	A=:..PiC
	..PC=..PC+B
	..PC=..PC+BIR(2 nw
    IFNBn1 <A>,<
	IFIW![MnPOVEI T1,A
		RETnp]>
    IFB <A>,<
	 IFIW!R>
,IRLx yIFIW!AIRI7P IRK@P IR:x mQm	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 pQ
	JSP CX,$EAENT
	JSP CX,K92 v13JSP CX,ECSKD0JSP CX,ECSK3-9P K7] iQW
	IFNB <iqAB>,<
	JRST [	jB
	   IFNB <A>,j0<MOVEI T1,A>
		jPJRST EMRET0]>
	IjpFB <AB>,<
	JRST EMRET0>
	JRSK:

+Q  K:$`Q  K:&= ;Y4Gyx

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

	RN.B==<P..OFF	

	IFN FT<pSHOW,DEPHASE

	=..LOK==..LOK+1
	=0IFN ..LOK,<PRINTX=P ? MISSING BEGSTR=p>

	IF2,<
	  I>FDEF ...MSK,<SUPP>0RESS ...MSK>
	  >PIFDEF ..BITS,<SUP>pPRESS ..BITS>
	 ? IFDEF .SIZ,<SUPP?0RESS .SIZ>
	  IF?PDEF ..MSK,<SUPPRE?pSS ..MSK>
	  IFD@EF ..OFF,<SUPPRES@0S ..OFF>
	  IFDE@PF ..FLG,<SUPPRESS@p ..FLG>
	  IFDEFA ..LOK,<SUPPRESS A0..LOK>
	  IFDEF AP..LOC,<SUPPRESS .Ap.LOC>
	  IFDEF .B.OLD,<SUPPRESS ..B0OLD>
	  IFDEF ..BP.OLD,<SUPPRESS ..Bp.OLD>
	>

	IF1C,<
	  IFDEF ...MC0SK,<.XCREF ...MSKCP>
	  IFDEF ..BITCpS,<.XCREF ..BITS>D
	  IFDEF .SIZ,<D0.XCREF .SIZ>
	  DPIFDEF ..MSK,<.XCRDpEF ..MSK>
	  IFDEEF ..FLG,<.XCREF E0..FLG>
	  IFDEF EP..OFF,<.XCREF ..OEpFF>
	  IFDEF ..LFOK,<.XCREF ..LOK>F0
	  IFDEF ..LOC,FP<.XCREF ..LOC>
	Fp  IFDEF ..OLD,<.XGCREF ..OLD>
	  IG0FDEF ...OLD,<.XCRGPEF ...OLD>
	>
Gp
	PURGE WORD,NXTWHRD,FILLER,HWORD,FH0IELD,BIT,FIELDM
HP
	RN.A==..OFF-0Hp
	IFN FTSHOW,<RELOC..LOC>W,<RE	GPGILENPGKLSTPK;

qg
	ERJMP a
a:!
RJMP KK`Q KK+8 k1]
	JRST [	kQMOVEI T1,A
		JRST B],A
		JRKK:=P KK-k oQ
	JRST [	oqB
		IFDIF <A>,p<>,<MOVEI A,A>
		JRST ERUNLD]
Kb5HZQ ~Kbd[@P Kc8ZQ Kc<`P Kc8ZQ xKc  qc
   IF2,<


	IRP A,<
	IFN

0DEF A,<EXTERN A
	SUPPRE A>>>Kc$`P @Kc$i@P  Kc%,qP Kc%` b
	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-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/.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 wQC
	IFIDN <wqB><L>,<A==<D>Bx17>
	IFIDN <B><x0R>,<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 vq7AOS QSKED9AOS 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` :q;WIFN CTSFLG,IFN CTSFLGMR"5VP MR$XZP MR'@ :1;SIFN 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 xqO
	IFIDN <yB><L>,<A==:<D>y0B17>
	IFIDN <B>yP<R>,<A==:D>
	MypSKSTR (A,C,A)KSTR (A,C,A)O2d(6Q  O:Ti@Q @O?I3 .)
t
	OPDEF .IA [<B>]
	INTERN AB>]
	INTERNON~	 /	
z
	OPDEF /)A [B]
	INTERN A
	.NODDT A OR};  X1
	SKIPGE XQCX,GTOKPR+A	;SEEXp IF NEED TO VERIFYY IT
	SKIPA			;YY0ES. DO VERIFICATIYPON CODE THEN
	TXYpNN CX,SF%DOK		;IFZ DEFAULT, NEED TOZ0 VERIFY
	CALL [	ZPJUMPGE CX,[MOVEI ZpT1,GOKER2 ;IF DEN[Y
			   RETSKP] [0;INDICATE SUCH
	[P	ADJSP P,4	;ALLOC[pATE STACK
		DMOV\EM T1,-3(P)		;SAV\0E TEMPS
		DMOVEM\P T3,-1(P)
		PUSH\p P,[0]
		..GOKN=]=1
		IRP B,<
	]0	..GOKN=..GOKN+1
		PUSH P,B>
		]pMOVEI T3,..GOKN
^		MOVEI T1,A
		^0MOVEI T2,1-..GOKN^P(P)
		IFB <D>,<^pSETZ T4,>
		IFNB_ <D>,<MOVEI T4,_0D>
		CALL GETOKM_P		;CALL MONITOR R_pOUTINE
		PJRST [`	MOVE T2,-2-..GOK`0N(P) ;RESTORE T2
			DMOVE T3,-1-.`p.GOKN(P)
			ADJSaP P,-..GOKN-4	;REa0SET STACK
			RETaPSKP] 
		DMOVE T1ap,-3-..GOKN(P)	;REbSTORE AC'S
		DMOb0VE T3,-1-..GOKN(PbP)
		ADJSP P,-..GbpOKN-4	;RESET STACcK
		RET]		
	 SKc0IPA		
	IFNB <C>cP,<JRST C> 
	IFBcp <C>,<ITERR ()>
C>,<ITERR()>Q*+uQQ-VQwQ-]7Q Q.
   IFNB x<A>,<
	MOVEI 2,x0A>
	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]@ 1)

   IFN KLFLG,<
	A>N KSP 1i
   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 W1?
	JSP CX,WQIMCLL0
	IFB <B>Wp,<A>
	IFNB <B>,<B,,A>
0>S6kQ @S6l;rP S7:P S:$;rP S:$@P 	S:MHu q!5			;Initialize lock blocks
	PUSH P,T1
	PUSPH P,T2
	IFNB <Bp>,<MOVE T2,B>
	HRRZ T1,[A]
	MO0VE T1,LCKTAB(T1)	P	;Get address of plock block
	IFNB <B>,<ADD T1,T2>0
	SETOM LOKWRD(TP1)		;Initialize l`ock
	SETOM LOKFRAK(T1)		; And fork!
	SETZM LOKCNT(T91)		; And count oXf times locked
	xSETZM LOKHLD(T1)		;TURN OFF QUICK 8LOCKING
	MOVE T2X,[A]			;Get flagxs and index
	MOVEM T2,LOKFLG(T1)	8	; and store
	POXP 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 3	
	CONO PI2),PISPIR+1B<28+A>ISPIR+1B<28+A>SR.,@ d17
   IFNB dQ<B>,<
	JRST [	dpB
     IFNB <A>e,<MOVEI T1,A>
	e0	JSP T2,ITRAP1]>
   IFB <B>,<
 ep    IFNB <A>,<
f	JSP T2,[MOVEI T1f0,A
		JRST ITRAPfP1]>
     IFB <Afp>,<
	JSP T2,ITRAP1>>JSP T2,ITRASR.. g1;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 1Y#!
	..TRR==1y10		
	RADIX 8
	2..NV==0			
	IRP 28A,<
	  .TRV1 (2XA)>		
	JSP CX,.J2xSSET##		
    IFB3 <B>,< ..NV+1,,038 >
    IFNB <B>3X,< ..NV+1,,B >
3x	RADIX ..TRR		
	4PURGE ..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 	):
	A=:..P)C
	..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 mu
	MOVSI m1A,B		;A/ (MONITmPOR START ADDRESS,mp,USER A 0)
	XCTn 4,[BLT A,17]	;Cn0OPY FROM MONITOR nPMEMORY TO USER AS
	POYUSER AYw

+zP  YKxP Y, Dn
	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 }1o
	AOSE A}Q
	IFB <B>,<
	 }p CBLK1	>
	IFNB <B>,<
	  B> <Y>=qQ @Y>\;ZP Y>\kP Y>\lRP Y>\lUP Y>]P Y>]P Y>]0 "W
IFNB <A9>,<
    IFGE A,X<
d:	PUSH P,T1
	PUSH P,T2
	IFNB <C>,<MOVE T1,8C
		    ADD T1,LXCKTAB+<777777&A>x
	>			;END OF IFNB
	IFB <C>,<MO8VE T1,LCKTAB+<777X777&A>>
	CSKED
	AOSE (T1)
	IFB <B>,<CBLKE>
	I8FNB <B>,<
	IFNSXK.
	   ECSKED
	x   POP P,T2
	   POP P,T1
	   SKI8PA
	   JRST d		X;THIS LINE IS FORx B CODE THAT
				; BELIEVES THIS8 IS THE LOCK PC
X	   B
	   JRST xg
	ENDIF.
	>			;END OF IFNB
	M8OVEI T1,777777&AX	;GET NAME OF LOCxK
	MOVE T1,LCKTAB(T1)	;GET IT'S D8ATA BASE
	MOVE TX2,FORKX		;GET CURxRENT FORK
	MOVEM T2,LOKFRK(T1)	;S8AVE IT IN DATA BAXSE
	POP P,T2
	PxOP P,T1
g:
     >				;END OF IFG 8E
    IFL A,<
 Xe:	PUSH P,T1
	P xUSH P,T2
	IFB <!C>,<SETZ T2,>
	I!8FNB <C>,<MOVE T2!X,C>
	MOVE T1,[!xA]
	CALL GETLOK
	 IFB <B>,<CBLK"81>
	 IFNB <B>,<"X
	 IFNSK.
	    "xPOP P,T2
	    PO#P P,T1
	    SKIP#8A
	    JRST e		#X;THIS LINE IS FOR#x B CODE THAT
		$		; BELIEVES THIS$8 IS THE LOCK PC
$X	    B
	    JRS$xT h
	 ENDIF.
	% >			;END OF IFNB%8
	POP P,T2
	POP%X P,T1
h:
    >%x				;END OF IFL
&>				;END OF IFNB&8
IFB <A>,<
f:&X	PUSH P,T1
	PUSH&x P,T2
	SETZ T2,
	MOVE T1,C
	CA'8LL LOKTYP
	 IFB 'X<B>,<CBLK1>
	 I'xFNB <B>,<
	 IFN(SK.
	    POP P,T(82
	(X  POP P,T1
	    SKIPA
	   (x JRST f		;THIS L)INE IS FOR B COD)8E THAT
				; BEL)XIEVES THIS IS THE)x LOCK PC
	    B*
	    JRST i
	*8 ENDIF.
	>			;EN*XD OF IFNB
	POP P*x,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@ 8 3B<<<1<A>>-1>B<B>><A>>[8@ 8`3F<1B<<A>-1>-1B<B>><A>-1[D^P [ERP [EH`P [EM`P [EiP [F8hP 
%QP[HSP@[-mKL7700o[-mQqJSPNCX,MENT0JSP9CX,MEN[N;9Kw1;JSPCX,EDMS0JSPCX,EDM[$,-Q[$,JQ  [$-1Q [$-\sQ [$.(wQ  [$.)YQ @[$.8tQ @[$/

`Q @[NHSP [N^= ?@4
	A==C	?`	
	IF1,<IFDEF %@A,<PRINTX ?A ALR@ EADY DEFINED>>
	@@DEFINE %A (OP,AC@`,Y,MSK)<
	$A==<AZ 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] 0I
   IFNDE0iF A,<
	A==B> A,<
	A==B>]8 /i
   IFNDE0	F A,<
	A==:B>A,<
	A==:B>]<`P@]<`P]<jbQ]=(BQ]]=i@Qw]>i@P]3'P]3-9P]6d[@PS]7'Qx]74Q2]:JSP CX,NOSKD0JSP CX,NOS]?L@P']?%XqQ ]BMI;P ]H 
	.PSECT 1NRVAR
	IFB <B>,P<
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 {q_XCT INTDFFXCT INTDFF_/9 u1+JSP CX,OKSK11JSP CX,OKS_/92 t1#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 xqGJSP 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? J4P<^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 	aW=`P ac\qP acx8P bD@ bH@ bL@ c&vKP c2t}P cV~H1Q  e,z pRe.(  peN;9 y1KJSP CX,SCHEDRJSP CX,SCHelz pPe\S p@e

I@Q  e`P e}:P et@P ei9Q e,{P e9 1#
	.ENDPS
	CURPSX==PRESCD
   IFB <A><
	.PSECT RSCOD
   >0
   IFIDN <A><IPNIT><
	.PSECT INpCOD
   >
   IFIDN <A><SEC0><
	0.PSECT SZCOD
   >
T SZCOD
   eM Q
	.ENDPS
	.PSECT RSDAT
	.PSECT RSDAT
ekP!e

{P e  ,~e$(2 li
	IFNB <l1AB>,<
	JRST [	lPB
	   IFNB <A>,lp<MOVEI T1,A>
		mRET]>
	IFB <AB>,<
	RET><ABe$\Y gqI
	IFNB <hAB>,<
	JRST [	h0B
	   IFNB <A>,hP<MOVEI T1,A>
		hpJRST MRETNE]>
	IiFB <AB>,<
	JRST MRETNE>
	JRSe&:x aiJRST RSKP
JRST 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 z1[
	.PSECT zQRSVAR
	IFB <B>,zp<
A::	BLOCK 1>
	IFNB <B>,<
A{0::	BLOCK B>
	.ENDPS RSVAR
	.EeL,|WQ @eL.9(Q @eNEI7P eNH {qu
	.PSECT |RSDAT
A::	IRP |0B,<
	B
	>
	IF|PNB <C>,<
	IFG <|p<C>-<.-A>>,<BLO}CK <C>-<.-A>>
}0	IFG <.-A-<C>>,}P<IF2,<PRINTX %DEF}pINITION OF A EXC~EEDS WORD COUNT
~0>>
	>			;END OF ~PIFNB

	.ENDPS
NB

	.ENDPS
eO{`Q xeO@P'eO%I7P eSN	@Q eZ`P eZ.)@Q f@t[Z q	
	JSP CX,$S0ENT
	JSP CX,fGD= 3;*
  IFE CU3!RPSX-PXRESCD,<
	3@TORESCD
	A
	TO3`XRESCD
  >
  IF4E CURPSX-PXSWAPCD4 ,<
	TOSWAPCD
	4@A
	TOXSWAPCD
  4`>
  IFN <<CURPSX5-PXRESCD>*<CURPSX5 -PXSWAPCD>>,<
	A
  >
>,<
	g4\ cJSP CX,SAVPJSP CX,SAVg4\ d JSP CX,SAVPQJSP CX,SAVg4\  cAJSP CX,SAVQJSP CX,SAVg4] dA$JSP 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$  1)u
	A==:..QPC
	..PC=..PC+B
	..PC=..PC+Bg[Z s1CALL SE0CALCALL SE0CAg

86 rqCALL SECALECALL SECALg

[Zr1CALL SECALLCALL SECALgLQ gyYQ `g
	1B0+FLD8y(A,SEBOFS)+FLD(-YB,SEBTYP)+<Z C>,SEBTYP)+<Z C>gN8Q g

{P g:=Q g&y 7ad
	LOAD CX7A,VMADR,A
	TXO C7!X,PGLPCS		;SAY LO<AAD 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+$  i)@
	A==:..	PC
	..PC=..PC+B
	..PC=..PC+Bg.,L{Pg.N\P"g2~pQ@g3-9P{g65I`Pg7]V13JRSTSKMRTNJRSTgSKMRTg@,(:Q@g@,IYQRg@,[Q9g@,kQg@-{Q 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
PgR]^gP gRv,`Q gSg o
	MOVEI o1A,B		;A/ (USER oPA 0,,MONITOR STAopRT ADDRESS)
	XCTp 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 Q	
	.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 "a:
	TSTMS0
	XJRST .+1
	XWD"! MSEC1,a
	RESCD
a:!

	RESCDi?x8 +!:^
	TSTMS0
	XJRST .+1
	XWD+` MSEC1,a
	SWAPCD
a:!
	SWAPCi?F)9 ,!:f
	TSTMS0
	XJRST .+1
	a
	XRESCD
a:!
	XRESCD
a:!
i?F=p -!:n
	TSTMS0
	XJRST .+1
	a
	XSWAPCD
a:!
XSWAPCD
a:!
iJl9P iJl;rP iJv9@Q  iKSQ @iK=Q  iNrQ xiNr Q xiO%Z |qgSKIPE PSIBWSKIPE PSIBiO%\h qQ
   IFN SqqEC0SW,<		
	JSPCX,$TSMS0>	JSPCiPt=PiPti P iPuH4P iPuXqP iPv
	SALL
	.DIRECT FLBLST
O0URTTL==SIXBIT /AP/		
	TITLE AC
IFB <B>,<ENTRY $A
	$A==:0>
I0FNB <B>,<ENTRY $PB
	$B==:0>
	SpEARCH MONSYM,MACS	YM
	CPYRT			
	.	0XCMSY			
	.PSECT	P RSCOD
	CURPSX==	pPRESCD
  IF2,<

	SEARCH GLOBS		
0
	GGLOBS			
	PUR
PGE GGLOBS		
   >
p
	DEFINE TNXEND <
	XLIST
LA...0.:	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 I)DCALL ULKMD0CALL ULKMDk2| pQ
	..STR0 pq(..ULDB,A,B,C).ULDB,A,B,C)k6|I@Q k6~i  l`
	XCTU [MOVE A,B]TU [Mk6~i6 lQe
	XCTU [MOVEM A,B]U [Mk:*` 5!*
	JRST ACHR##
	JRST Ak:d[@P k:e9@P  k:exu ~1s
	SETOM A
	SETOM k:ezu +9#	
IFNB <A+Y>,<
    IFGE A,+x<
	PUSH P,T1
	I,FNB <B>,<	MOVE T,81,B
			ADD T1,L,XCKTAB+<777777&A>,x
>
	IFB <B>,<M-OVE T1,LCKTAB+<77-87777&A>>
	SETOM-X (T1)
	ECSKED
	-xPOP P,T1>
    IF.L A,<
	PUSH P,T.81
	PUSH P,T2
	I.XFB <B>,<SETZ T2,.x>
	IFNB <B>,<MO/VE T2,B>
	MOVE /8T1,[A]
	CALL RE/XLLOK
	POP P,T2
/x	POP P,T1>>
IFB 0<A>,<
	PUSH P,T081
	PUSH P,T2
	S0XETO T2,
	MOVE T10x,B
	CALL ULKTYP1
	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; e\



	Se!PCSAV(.SAV11,<1>)e@
	SPCSAV(.SAV22,e`<2>)
	SPCSAV(.SAfV33,<3>)
	SPCSAVf (.SAV44,<4>)
	SPf@CSAV(.SAV12,<1,2>f`)
	SPCSAV(.SAV13g,<1,2,3>)
	SPCSAg V(.SAV34,<3,4>)
g@	SPCSAV(.SAV24,<2g`,3,4>)
	SPCSAV(ShAVT,<1,2,3,4>)
	h SPCSAV(.SAV1,<5>)h@
	SPCSAV(.SAV2,<h`5,6>)
	SPCSAV(.SiAV3,<5,6,7>)
	SPi CSAV(.SAV4,<5,6,7i@,<^D8>>)
	SPCSAVi`(SAVP,<<^D8>,<^D9j>,<^D10>,<^D11>,<j ^D12>,<^D13>>)
	j@SPCSAV(SAVPQ,<5,6j`,7,<^D8>,<^D9>,<^kD10>,<^D11>,<^D12k >,<^D13>>)
	SPCSk@AV(.SAVP1,<<^D8>>)
AVP1,<<^D8>>kO%|@ t1%
	..STR0 tQ(..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 9a;N<A+<RSKP-RSKP>>A+<RSKP-q
fK: +Hq
fM6 +Bq
fM:+Jq
	EA.ENT
	IFB <A>,<CALL /`@[B]>
	IFNB <A0>,<CALL @[A,,B]>
LL @[A,,B]q
	EA.ENT
	IFB <A>,<XJRST2  [B]>
	IFNB <A2@>,<XJRST [A,,B]>
RST [A,,B]q$+: +Bq$-  +Fq$-: +Nq$`Q q&P +Hq&]  +Xq

y Q @q+ 0A;

	EA.ENT
	IFB <B>,<JSP 1A,@[C]>
	IFNB <1 B>,<JSP A,@[B,,C]>
A,@[B,q:-m 7a;J
	SWAPCD
IFB <B>,<A: XC8 ALLRET (,XA)>
I8@FNB <B>,<A:: XC8`ALLRET (,XA)>
	9XSWAPCD
XA:
.I9 F A,INTERNAL,<INTERNAL XA>
INqB$Qq?qB~:+HqC
	RESCD
6IFB <B>,<A: XCA6 LLRET (,XA)>
IF6@NB <B>,<A:: XCA6`LLRET (,XA)>
	X7RESCD
XA:
.IF 7 A,INTERNAL,<INTERNAL XA>
INTEqJ.8r q+
	.ENDPS
	.PSECT XRCOD
	0CURPSX==PXRESCD
RPSX==PXRESCD
qO< q3
	.ENDPS
	.PSECT XNCOD
	0CURPSX==PXSWAPCD
PSX==PXSWAPCD
	$ABFLG==<Z ADRBRK>		
	0A (<B>,ADRBRKC,D)B>,ADRBRKC,K{ y;
	$ABLOW==<Z ADRBRK>		
	8A (<B>,ADRBRKC,D)B>,ADRBRKC,\ D
	$ABUPP=!=<Z ADRBUP>		
	@A (<B>,ADRBUPC,D)B>,ADRBUPC,; |	7b
	$ACCLS=|)=<Z 2>		
	A (<B>,2C,D)A (<I7 M,j
	$ACLEN=M!=<Z 0>		
	A (<B>,0C,D)A (<h6 ~A7v
	$ACNAM=~a=<Z 4>		
	A (<B>,4C,D)A (<
	$ACPTR=}y=<Z 3>		
	A (<B>,3C,D)A (<+ Si% 
	$ACRLFFT	==<Z STS>		
	A (<B>,STSC,D): Mi,p
	$ACSHR=N	=<Z 1>		
	A (<B>,1C,D)A (<I@ n	&r
	$ACTF==n)<Z F>		
	A (<B>,FC,D)A (<BIS i(
	$ACTFF=	=<Z F1>		
	A (<B>,F1C,D) (<M rI'
	$ACTTF=ri=<Z F>		
	A (<B>,FC,D)A (<N8 L!,d
	$ACTYP=LA=<Z 0>		
	A (<B>,0C,D)A (<h6 NQ,y
	$ACVAL=Nq=<Z .ACVAL>		
	OA (<B>,.ACVALC,D)B>,.ACVALC,$.: 2C
	$ADBYT=29=<Z 1>		
	A (<B>,1C,D)A (<$D, qq
	$ADD18==<Z 1>		
	A (<B>,1C,D)A (<$DK Yw
	$ADD27=y=<Z 1>		
	A (<B>,1C,D)A (<%W Y
	$ADIRN=y=<Z ALOC1>		
	A (<B>,ALOC1C,D)B>,ALOC1C,D%I7 19C
	$ADLEN=1Y=<Z 0>		
	A (<B>,0C,D)A (<EI7 49C%
	$AHLEN=4Y=<Z 0>		
	A (<B>,0C,D)A (<T9 !AL
	$AJCDA=A=<Z 2>		
	A (<B>,2C,D)A (<T<z AR
	$AJCST=!=<Z 2>		
	A (<B>,2C,D)A (<Tk 9AE
	$AJFLG=Y=<Z 1>		
	A (<B>,1C,D)A (<U)W Ak
	$AJJFN=9=<Z 5>		
	A (<B>,5C,D)A (<UH: 1AV
	$AJLAT=i=<Z 3>		
	A (<B>,3C,D)A (<UI7 iA8
	$AJLEN=	=<Z 0>		
	A (<B>,0C,D)A (<UJ7 1A]
	$AJLIN=Q=<Z 4>		
	A (<B>,4C,D)A (<U[r QA?
	$AJMOD=q=<Z 1>		
	A (<B>,1C,D)A (<U\u Ap
	$AJMSK==<Z 11>		
	A (<B>,11C,D) (<V

W 9Ae
	$AJPRO=Y=<Z 5>		
	A (<B>,5C,D)A (<d=r Qy
	$ALCWD=q=<Z ALOC1>		
	A (<B>,ALOC1C,D)B>,ALOC1C,Dex| Ga

@
	$ALOCX=H=<Z SPT>		
	A (<B>,SPTC,D)(l)s wi'@
	$AMBGF=x	=<Z F1>		
	A (<B>,F1C,D) (<-6 
@S
	$APBUL=
1=<Z 12>		
	A (<B>,12C,D) (<; {	?Z
	$APCLR={)=<Z 1>		
	A (<B>,1C,D)A (<<U {y?a
	$APCRJ=|=<Z 1>		
	A (<B>,1C,D)A (<[v ~I?v
	$APEOM=~i=<Z 1>		
	A (<B>,1C,D)A (<2 yA
	$APIAD=	=<Z 21>		
	A (<B>,21C,D) (<6 QA
	$APIAL=q=<Z 22>		
	A (<B>,22C,D) (<X 	A2
	$APIBP=)=<Z 24>		
	A (<B>,24C,D) (<z AA&
	$APICT=a=<Z 23>		
	A (<B>,23C,D) (< !A,
	$APIHT=A=<Z 23>		
	A (<B>,23C,D) (<W YA
	$APINO=y=<Z 23>		
	A (<B>,23C,D) (<)W Y@_
	$APJFN=y=<Z 13>		
	A (<B>,13C,D) (<+q 
y@Y
	$APJOB==<Z 13>		
	A (<B>,13C,D) (<H: Y@D
	$APLAT=I=<Z 11>		
	A (<B>,11C,D) (<HX y@1
	$APLBP==<Z 5>		
	A (<B>,5C,D)A (<I7 rY?
	$APLEN=ry=<Z 0>		
	A (<B>,0C,D)A (<L @+
	$APLPS=1=<Z 4>		
	A (<B>,4C,D)A (<h1 z?S
	$APNAB=z9=<Z 1>		
	A (<B>,1C,D)A (<hX <1?)
	$APNBP=u=<Z 1>		
	A (<B>,1C,D)A (<hv y)?L
	$APNCL=yI=<Z 1>		
	A (<B>,1C,D)A (<j1 ui?0
	$APNIB=v	=<Z 1>		
	A (<B>,1C,D)A (<j7 x9?E
	$APNIO=xY=<Z 1>		
	A (<B>,1C,D)A (<j9 @
	$APNIR=9=<Z 1>		
	A (<B>,1C,D)A (<kr wI?>
	$APNOD=wi=<Z 1>		
	A (<B>,1C,D)A (<kz y@
	$APNOT==<Z 1>		
	A (<B>,1C,D)A (<lT vY?7
	$APNRI=vy=<Z 1>		
	A (<B>,1C,D)A (<lW )@
	$APNRO=I=<Z 1>		
	A (<B>,1C,D)A (<lx a@ 
	$APNSP==<Z 2>		
	A (<B>,2C,D)A (<x2 hi@$
	$APOAD=I=<Z 3>		
	A (<B>,3C,D)A (<xU 	1@M
	$APOBJ=	Q=<Z 12>		
	A (<B>,12C,D) (<xY 	@r
	$APOBS=)=<Z 15>		
	A(<B>,15C,D) (<xz 
	$APOCT=	
	A (<B>,15C,D) (<} 9?}
	$APOTO=Y=<Z 1>		
	A (<B>,1C,D)A (<	9 |i?h
	$APPER=}	=<Z 1>		
	A (<B>,1C,D)A (<)0 a@@
	$APREA==<Z 10>		
	A (<B>,10C,D) (<* 9qQ
	$APRHO=:=<Z >		
	A (<B>,C,D)A (<B+7 8)D
	$APRMO=8I=<Z >		
	A (<B>,C,D)A (<B+; 9K
	$APRMVR91==<Z >		
	A (<B>,C,D)A (<+V :QW
	$APRNM=:q=<Z >		
	A(<B>,C,D)A (<B:0 
	$APSIA=q=<Z 16>		
	A (<B>,16C,D) (<:1 Y@
	$APSIB=y=<Z 17>		
	A (<B>,17C,D) (<:1 !A


	$APSIC=A=<Z 20>		
	A (<B>,20C,D) (<:: AA
	$APSIT=a=<Z 20>		
	A (<B>,20C,D) (<:< @:
	$APSIX=!=<Z 6>		
	A (<B>,6C,D)A (<= t)?$
	$APSTS=tI=<Z 1>		
	A (<B>,1C,D)A (<N @
	$APTXF=9=<Z 1>		
	A (<B>,1C,D)A (<N8 sA?
	$APTYP=sa=<Z 1>		
	A (<B>,1C,D)A (<xq }Y?o
	$APWCC=}y=<Z 1>		
	A (<B>,1C,D)A (<2 		@d
	$APXAD=

A=<Z 14>		
	A (<B>,14C,D) (<

}
	$ARPSZ=BT>		
	(<B>,.FBBBTC,D)B>,.FBBBTC,L a12
	$ARTP1==<Z .FBTP1>		
	 A (<B>,.FBTP1C,D)B>,.FBTP1C,L	 q1K
	$ARTP2==<Z .FBTP2>		
	0A (<B>,.FBTP2C,D)B>,.FBTP2C,y@ Fq$9
	$ASGF==G<Z STS>		
	A (<B>,STSC,D)(<H3 cI&
	$ASTAF=ci=<Z F>		
	A (<B>,FC,D)A (<I@ F$2
	$ASTF==F!<Z STS>		
	A (<B>,STSC,D)(<$Y HQ<I
	$ATABR=Hq=<Z .ATMST>		
	IA (<B>,.ATMSTC,D)B>,.ATMSTC,$- i>K
	$ATBTN=i1=<Z 6>		
	A (<B>,6C,D)A (<$.\ GA<@
	$ATBZY=Ga=<Z .ATMST>		
	HA (<B>,.ATMSTC,D)B>,.ATMSTC,$;x C)<
	$ATCOP=CI=<Z 3>		
	A (<B>,3C,D)A (<$<U eY>1
	$ATCRJ=ey=<Z .ATUST>		
	fA (<B>,.ATUSTC,D)B>,.ATUSTC,$H8 BA<
	$ATDAP=Ba=<Z 2>		
	A (<B>,2C,D)A (<$I; q?
	$ATDEV=q1=<Z 16>		
	A (<B>,16C,D) (<$J Z9=W
	$ATDHT=ZY=<Z .ATUST>		
	ZxA (<B>,.ATUSTC,D)B>,.ATUSTC,$[v PA=
	$ATEOM=Pa=<Z .ATMST>		
	QA (<B>,.ATMSTC,D)B>,.ATMSTC,$m6 `	>
	$ATFUL=`)=<Z .ATUST>		
	`HA (<B>,.ATUSTC,D)B>,.ATUSTC,$} Jq<[
	$ATGTD=K=<Z .ATMST>		
	K0A(<B>,.ATMSTC,D)B>,.ATMSTC,%
	$ATHTN=j=<Z 6>		
	A (<B>,6C,D)A (<%2 D	>h
	$ATIAD=m	=<Z 11>		
	A (<B>,11C,D) (<%X mq>q
	$ATIBP=n=<Z 12>		
	A (<B>,12C,D) (<%z kA>^
	$ATICT=ka=<Z 10>		
	A (<B>,10C,D) (<%)W <<
	$ATJFN=Ay=<Z 1>		
	A (<B>,1C,D)A (<%HX p	?
	$ATLBP=p)=<Z 15>		
	A (<B>,15C,D) (<%I o!>|
	$ATLDP=oA=<Z 14>		
	A (<B>,14C,D) (<%I7 A<
	$ATLEN=A1=<Z 0>		
	A (<B>,0C,D)A (<%JS <Q>u
	$ATLJF=nY=<Z 13>		
	A (<B>,13C,D) (<%Z2 c9>
	$ATMIE=cY=<Z .ATUST>		
	cxA (<B>,.ATUSTC,D)B>,.ATUSTC,%\z D1<'
	$ATMST=DQ=<Z .ATMST>		
	DpA (<B>,.ATMSTC,D)B>,.ATMSTC,%h; ]i=r
	$ATNAV=^	=<Z .ATUST>		
	^(A (<B>,.ATUSTC,D)B>,.ATUSTC,%i fi>:
	$ATNDP=g	=<Z .ATUST>		
	g(A (<B>,.ATUSTC,D)B>,.ATUSTC,%j7 F1<7
	$ATNIO=FQ=<Z .ATMST>		
	FpA (<B>,.ATMSTC,D)B>,.ATMSTC,%lT Ia<R
	$ATNRH=J=<Z .ATMST>		
	J A (<B>,.ATMSTC,D)B>,.ATMSTC,%xz l!>d
	$ATOCT=lA=<Z 10>		
	A (<B>,10C,D) (<%yV ^y={
	$ATOFL=_=<Z .ATUST>		
	_8A (<B>,.ATUSTC,D)B>,.ATUSTC,%| V=E
	$ATOPN=X9=<Z .ATUST>		
	XXA (<B>,.ATUSTC,D)B>,.ATUSTC,&)5 b)>
	$ATREJ=bI=<Z .ATUST>		
	bhA (<B>,.ATUSTC,D)B>,.ATUSTC,&)S )(,
	$ATRFF=I=<Z F1>		
	A (<B>,F1C,D) (<&*8 O1<
	$ATRIP=OQ=<Z .ATMST>		
	OpA (<B>,.ATMSTC,D)B>,.ATMSTC,&+ L<d
	$ATRLD=L!=<Z .ATMST>		
	L@A (<B>,.ATMSTC,D)B>,.ATMSTC,&8t ;q<.
	$ATSCH=EA=<Z .ATMST>		
	E`A (<B>,.ATMSTC,D)B>,.ATMSTC,&99 gi>B
	$ATSER=h	=<Z .ATUST>		
	h(A (<B>,.ATUSTC,D)B>,.ATUSTC,&:< qy?
	$ATSIX=r=<Z 20>		
	A (<B>,20C,D) (<&= dI>(
	$ATSTF=di=<Z .ATUST>		
	eA (<B>,.ATUSTC,D)B>,.ATUSTC,&= V!=6
	$ATSTR=VA=<Z .ATMST>		
	V`A (<B>,.ATMSTC,D)B>,.ATMSTC,&Hv Y)=N
	$ATTCL=YI=<Z .ATUST>		
	YhA (<B>,.ATUSTC,D)B>,.ATUSTC,&N [I=`
	$ATTXF=[i=<Z .ATUST>		
	\A (<B>,.ATUSTC,D)B>,.ATUSTC,&X4 N!<v
	$ATUAH=NA=<Z .ATMST>		
	N`A (<B>,.ATMSTC,D)B>,.ATMSTC,&[R \Y=i
	$ATUND=\y=<Z .ATUST>		
	]A (<B>,.ATUSTC,D)B>,.ATUSTC,&[Y a>
	$ATUNS=a9=<Z .ATUST>		
	aXA (<B>,.ATUSTC,D)B>,.ATUSTC,&\T M<m
	$ATURH=M1=<Z .ATMST>		
	MPA (<B>,.ATMSTC,D)B>,.ATMSTC,&\z W)=>
	$ATUST=WI=<Z .ATUST>		
	WhA (<B>,.ATUSTC,D)B>,.ATUSTC,&] jY>W
	$ATUTN=jy=<Z 7>		
	A (<B>,7C,D)A (<'	Y U=,
	$ATXFR=U!=<Z .ATMST>		
	U@A (<B>,.ATMSTC,D)B>,.ATMSTC,'1 Ra=
	$ATXMC=S=<Z .ATMST>		
	S A (<B>,.ATMSTC,D)B>,.ATMSTC,'s QQ=
	$ATXOF=Qq=<Z .ATMST>		
	RA (<B>,.ATMSTC,D)B>,.ATMSTC,'

: Sq=#
	$ATXQU=T=<Z .ATMST>		
	T0A (<B>,.ATMSTC,D)B>,.ATMSTC,4.: 3YC
	$AVBYT=3y=<Z 1>		
	A (<B>,1C,D)A (<5I7 2yC
	$AVLEN=3=<Z 0>		
	A (<B>,0C,D)A (<

M k
	$BADT==1<Z 0>		
	A (<B>,0C,D)A (<B
IY i:
	$BATFR=	=<Z BATFRE>		
	(A (<B>,BATFREC,D)B>,BATFREC,
KQ Q_
	$BATNB=q=<Z 0>		
	A (<B>,0C,D)A (<
]I7 z97U
	$BKLEN=zY=<Z 0>		
	A (<B>,0C,D)A (<
^N8 yY7O
	$BKTYP=yy=<Z 0>		
	A (<B>,0C,D)A (<
e9@ Ga$@
	$BLKF==H<Z STS>		
	A (<B>,STSC,D)(<
e; BY,
	$BLKLENBy==<Z 0>		
	A (<B>,0C,D)A (<
e= A,
	$BLKTYPA9==<Z 0>		
	A (<B>,0C,D)A (<
e=R Ay,
	$BLKVERB==<Z 0>		
	A (<B>,0C,D)A (<<B ;I
	$BSCR%=C)=<Z FKSWP>		
	ACH (<B>,FKSWPC,D)B>,FKSWPC,D<Y B!
	$BSCRSKBA==<Z FKSWP(FX)>		B`
	A (<B>,FKSWP(FX)C,D)FKSWPlb 99
	$BSNS%=A=<Z FKSWP>		
	AA8 (<B>,FKSWPC,D)B>,FKSWPC,Dlu @
	$BSNSK=@1=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(lz Lqk
	$BSNST=M=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(m Fq
	$BSNT%=My=<Z FKSWP>		
	AN (<B>,FKSWPC,D)B>,FKSWPC,D}B D	`
	$BSOV%=Ki=<Z FKSWP>		
	AL (<B>,FKSWPC,D)B>,FKSWPC,D}Y JaZ
	$BSOVRDK==<Z FKSWP(FX)>		K 
	A (<B>,FKSWP(FX)C,D)FKSWP< AyO
	$BSSP%=IY=<Z FKSWP>		
	AIx (<B>,FKSWPC,D)B>,FKSWPC,D< HQI
	$BSSPQ=Hq=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(} 7)z
	$BSWT%=?	=<Z FKSWP>		
	A?( (<B>,FKSWPC,D)B>,FKSWPC,D} >t
	$BSWTB=>!=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP($lI E
	$BTFR2=1=<Z BATFRE+HBLEN>P		
	A(<B>,BATFRE+HBLENC,D)%z 
	$BTHCT==<Z 2>		
	A (<B>,2C,D)A (<%;V 1e
	$BTKNM=Q=<Z 0>		
	A (<B>,0C,D)A (<%Xi IX
	$BTMC2=i=<Z HBLEN+3>		
	A (<B>,HBLEN+3C,D)>,HBLEN+3%Xz aP
	$BTMCT==<Z 3>		
	A (<B>,3C,D)A (<6+3 ]9%m
	$CFRMF=]Y=<Z F>		
	A (<B>,FC,D)A (<7

R A!


	$CFXRD=AA=<Z @CST0X>		
	A`A (<B>,@CST0XC,D)B>,@CST0XC,L-3 	
	$CIBUF= 	=<Z CIFRKF>		
	 (A (<B>,CIFRKFC,D)B>,CIFRKFC,N)8  q
	$CIREP=!=<Z CIFRKF>		
	!0A (<B>,CIFRKFC,D)B>,CIFRKFC,|.: )qBQ
	$COBYT=*=<Z 1>		
	A (<B>,1C,D)A (<}I7 'AB>
	$COLEN='a=<Z 0>		
	A (<B>,0C,D)A (<}KU '!BU
	$COLNK=*Y=<Z 2>		
	A (<B>,2C,D)A (<~
8 +!B\
	$COPIP=+A=<Z 3>		
	A (<B>,3C,D)A (<~2 )BK
	$COQUE=)1=<Z 1>		
	A (<B>,1C,D)A (<~)6 ()BD
	$COREL=(I=<Z 1>		
	A (<B>,1C,D)A (<n TI%&
	$CRNXT=Ti=<Z STS>		
	A (<B>,STSC,D)(= W	%:
	$CRSTUFW)==<Z STS>		
	A (<B>,STSC,D)H3 =qs
	$CSTAGE>==<Z @CST0X>		
	>0A (<B>,@CST0XC,D)B>,@CST0XCK Ei

2
	$CSTLDAF	==<Z @CST3X>		
	F(A (<B>,@CST3XC,D)B>,@CST3XCKs Da

*
	$CSTOFKE==<Z @CST3X>		
	E A (<B>,@CST3XC,D)B>,@CST3XCL =I


	$CSTPSTB!==<Z @CST0X>		
	B@A (<B>,@CST0XC,D)B>,@CST0XC|Q =


	$CSWRB=@!=<Z @CST0X>		
	@@A (<B>,@CST0XC,D)B>,@CST0XC,.,z 82-
	$CURSTR%9==<Z STRINF>		
	%YA (<B>,STRINFC,D)B>,STRINFC.-1 635
	$CURUC=69=<Z STRINF>		
	6XA (<B>,STRINFC,D)B>,STRINFC,H9 |q7i
	$DATASZ}==<Z 2>		
	A (<B>,2C,D)A (<=9 91w
	$DCCUR=Y=<Z DCNCNT>		
	xA (<B>,DCNCNTC,D)B>,DCNCNTC,X< $92'
	$DCMAX=$Y=<Z DCNCNT>		
	$xA (<B>,DCNCNTC,D)B>,DCNCNTC,.i@ iI&N
	$DEVF==ii<Z F>		
	A (<B>,FC,D)A (<B.m ni&x
	$DEVTF=o	=<Z F>		
	A (<B>,FC,D)A (<6= ))
	$DFSTF=I=<Z F1>		
	A (<B>,F1C,D) (<LV #9
	$DIAFL=#Y=<Z JOBNAM>		
	#xA (<B>,JOBNAMC,D)B>,JOBNAMC,L.: AA~
	$DIBYT=a=<Z 1>		
	A (<B>,1C,D)A (<MI7 aAx
	$DILEN==<Z 0>		
	A (<B>,0C,D)A (<MKU AB
	$DILNK= )=<Z 2>		
	A (<B>,2C,D)A (<N)@ j)&T
	$DIRF==jI<Z F>		
	A (<B>,FC,D)A (<BN)S ~I'v
	$DIRFF=~i=<Z F1>		
	A (<B>,F1C,D) (<N)x I8
	$DIRGP=i=<Z 3>		
	A (<B>,3C,D)A (<N+ &23
	$DIRLA=&9=<Z 0>		
	A (<B>,0C,D)A (<N+V a8
	$DIRNM==<Z 3>		
	A (<B>,3C,D)A (<N+s (y2K
	$DIROFN)==<Z DROFN>		
	)8A (<B>,DROFNC,D)B>,DROFNC,N,s y(A
	$DIRSF==<Z F1>		
	A (<B>,F1C,D) (<N- oI&~
	$DIRTF=oi=<Z F>		
	A (<B>,FC,D)A (<N. }	'j
	$DIRXF=})=<Z F1>		
	A (<B>,F1C,D) (<|.: %B+
	$DOBYT=%1=<Z 1>		
	A (<B>,1C,D)A (<|[v !qB
	$DOEOM="=<Z 1>		
	A (<B>,1C,D)A (<}I7 !	B

	$DOLEN=!)=<Z 0>		
	A (<B>,0C,D)A (<}k9 mIB/
	$DONMS=%y=<Z 2>		
	A (<B>,2C,D)A (<}ls &AB6
	$DONSG=&a=<Z 3>		
	A (<B>,3C,D)A (<~2 #AB
	$DOQUE=#a=<Z 1>		
	A (<B>,1C,D)A (<~)6 "YB
	$DOREL="y=<Z 1>		
	A (<B>,1C,D)A (<~93 $)B$
	$DOSEG=$I=<Z 1>		
	A (<B>,1C,D)A (<z 81+E
	$DRACT=8Q=<Z 27>		
	A (<B>,27C,D) (<=3 7I+>
	$DRCUG=7i=<Z 26>		
	A (<B>,26C,D) (<H: 2a+
	$DRDAT=3=<Z 21>		
	A (<B>,21C,D) (<HU ,!*d
	$DRDBK=,A=<Z 11>		
	A (<B>,11C,D) (<Hp .Y*w
	$DRDCA=.y=<Z 14>		
	A (<B>,14C,D) (<IR :+R
	$DRDFE=:!=<Z 31>		
	A (<B>,31C,D) (<Ix 41+%
	$DRDGP=4Q=<Z 23>		
	A (<B>,23C,D) (<KR 9+K
	$DRDNE=99=<Z 30>		
	A (<B>,30C,D) (<L (1*E
	$DRDPW=(Q=<Z 7>		
	A (<B>,7C,D)A (<hZ 'I*>
	$DRFBT='i=<Z 6>		
	A (<B>,6C,D)A (<iQ $	*$
	$DRFFB=$)=<Z .DRFFB>		
	$HA (<B>,.DRFFBC,D)B>,.DRFFBC,m &a*8
	$DRFTP='=<Z 5>		
	A (<B>,5C,D)A (< !Y*
	$DRHLN=!y=<Z 0>		
	A (<B>,0C,D)A (<IR &y2;
	$DRLFDB'==<Z DROFN>		
	'8A (<B>,DROFNC,D)B>,DROFNC,J8 -	*j
	$DRLIQ=-)=<Z 12>		
	A (<B>,12C,D) (<Kx -q*q
	$DRLOQ=.=<Z 13>		
	A (<B>,13C,D) (<[r 1y+
	$DRMOD=2=<Z 20>		
	A (<B>,20C,D) (<h6 /A*~
	$DRNAM=/a=<Z 15>		
	A (<B>,15C,D) (<m6 #!*
	$DRNUM=#A=<Z 1>		
	A (<B>,1C,D)A (<z >i+x
	$DRPCU=?	=<Z 36>		
	A (<B>,36C,D) (<	 <1+e
	$DRPDT=<Q=<Z 34>		
	A (<B>,34C,D) (<	2 =+k
	$DRPED==9=<Z 35>		
	A (<B>,35C,D) (<	; ;I+^
	$DRPEV=;i=<Z 33>		
	A (<B>,33C,D) (<	x *Y*W
	$DRPGP=*y=<Z 10>		
	A (<B>,10C,D) (<: ?I+~
	$DRPMU=?i=<Z 36>		
	A (<B>,36C,D) (<{ )y*Q
	$DRPOW=*=<Z 10>		
	A (<B>,10C,D) (<

 @1,
	$DRPPN=@Q=<Z 37>		
	A (<B>,37C,D) (<

Z )*K
	$DRPRT=)9=<Z 10>		
	A (<B>,10C,D) (<

[ 1+
	$DRPRV=11=<Z 17>		
	A (<B>,17C,D) (<

{ 0)+
	$DRPSW=0I=<Z 16>		
	A (<B>,16C,D) (<
	$DRPUD=>!=<Z 36>		
	A (<B>,36C,D) (<
	$DRPWL=+Y=<Z 10>		
	A (<B>,10C,D) (<+P :i+X
	$DRRNA=;	=<Z 32>		
	A (<B>,32C,D) (<+s 'y2C
	$DRROF=(=<Z DROFN>		
	A(8 (<B>,DROFNC,D)B>,DROFNC,D, "A*
	$DRRPN="a=<Z 1>		
	A (<B>,1C,D)A (<8Z %*+
	$DRSBT=%1=<Z 3>		
	A (<B>,3C,D)A (<9 5y+1
	$DRSDC=6=<Z 25>		
	A (<B>,25C,D) (<9 6a+8
	$DRSDM=7=<Z 25>		
	A (<B>,25C,D) (<91 /	)
	$DRSEC=U=<Z >		
	A (<B>,C,D)A (<B= %y*1
	$DRSTP=&=<Z 4>		
	A (<B>,4C,D)A (<LU UQ/
	$DRTRK=Uq=<Z >		
	A (<B>,C,D)A (<BN8  *
	$DRTYP= 9=<Z 0>		
	A (<B>,0C,D)A (<Y 5++
	$DRUDT=59=<Z 24>		
	A (<B>,24C,D) (<Yx 3I+
	$DRUGP=3i=<Z 22>		
	A (<B>,22C,D) (<i9  y*	
	$DRVER=!=<Z 0>		
	A (<B>,0C,D)A (<tI@ J1$U
	$ENDF==JQ<Z STS>		
	A (<B>,STSC,D)(<|i@ C1$
	$EOFF==CQ<Z STS>		
	A (<B>,STSC,D)(<)@ D!$$
	$ERRF==DA<Z STS>		
	A (<B>,STSC,D)(<EI7 K9,]
	$EXLEN=KY=<Z 0>		
	A (<B>,0C,D)A (<FI@ ki&`
	$EXTF==l	<Z F>		
	A (<B>,FC,D)A (<BFIS )'|
	$EXTFF=I=<Z F1>		
	A (<B>,F1C,D) (<FLs 	Y(O
	$EXTSF=	y=<Z F1>		
	A (<B>,F1C,D) (<FM q	'

	$EXTTF=q)=<Z F>		
	A (<B>,FC,D)A (<FN Y)
	$EXTXF=y=<Z F1>		
	A (<B>,F1C,D) (<FN8 JY,W
	$EXTYP=Jy=<Z 0>		
	A (<B>,0C,D)A (<z s1/
	$FBACT=sQ=<Z .FBACT>		
	spA (<B>,.FBACTC,D)B>,.FBACTC, iy.S
	$FBADR=j=<Z .FBADR>		
	j8A (<B>,.FBADRC,D)B>,.FBADRC,Q d).&
	$FBARC=dI=<Z .FBCTL>		
	dhA (<B>,.FBCTLC,D)B>,.FBCTLC, n.u
	$FBAT0=n1=<Z .FBUSE>		
	nPA (<B>,.FBUSEC,D)B>,.FBUSEC,: o.}
	$FBAUT=o9=<Z .FBAUT>		
	oXA (<B>,.FBAUTC,D)B>,.FBAUTC,(Z 0
	$FBBBT=1=<Z .FBBBT>		
	PA (<B>,.FBBBTC,D)B>,.FBBBTC,*h ~y/{
	$FBBK0==<Z .FBBK0>		
	8A (<B>,.FBBK0C,D)B>,.FBBK0C,*h 0
	$FBBK1=!=<Z .FBBK1>		
	@A (<B>,.FBBK1C,D)B>,.FBBK1C,*i 	0


	$FBBK2=)=<Z .FBBK2>		
	HA (<B>,.FBBK2C,D)B>,.FBBK2C,,} uA/0
	$FBBSZ=ua=<Z .FBBYV>		
	vA (<B>,.FBBYVC,D)B>,.FBBYVC,<R l	.d
	$FBCRE=l)=<Z .FBCRE>		
	lHA (<B>,.FBCREC,D)B>,.FBCREC,<[ yY/Q
	$FBCRV=yy=<Z .FBCRV>		
	zA (<B>,.FBCRVC,D)B>,.FBCRVC,I6 ]I-p
	$FBDEL=]i=<Z .FBCTL>		
	^A (<B>,.FBCTLC,D)B>,.FBCTLC,J9 b	.
	$FBDIR=b)=<Z .FBCTL>		
	bHA (<B>,.FBCTLC,D)B>,.FBCTLC,LW r)/
	$FBDRN=rI=<Z .FBDRN>		
	rhA (<B>,.FBDRNC,D)B>,.FBDRNC,^ hq.K
	$FBEXL=i=<Z .FBEXL>		
	i0A (<B>,.FBEXLC,D)B>,.FBEXLC,^ I1
	$FBEXT=i=<Z .FBEXT>		
	A (<B>,.FBEXTC,D)B>,.FBEXTC,i: Y1)
	$FBFET=y=<Z .FBFET>		
	A (<B>,.FBFETC,D)B>,.FBFETC,k Y)-N
	$FBFLG=YI=<Z .FBCTL>		
	YhA (<B>,.FBCTLC,D)B>,.FBCTLC,y7 q)/
	$FBGEN=qI=<Z .FBGEN>		
	qhA (<B>,.FBGENC,D)B>,.FBGENC,{V 91
	$FBGNL=Y=<Z .FBGNL>		
	xA (<B>,.FBGNLC,D)B>,.FBGNLC,{Y t9/'
	$FBGNR=tY=<Z .FBBYV>		
	txA (<B>,.FBBYVC,D)B>,.FBBYVC,[ e9./
	$FBINV=eY=<Z .FBCTL>		
	exA (<B>,.FBCTLC,D)B>,.FBCTLC,I7 X!-F
	$FBLEN=XA=<Z .FBHDR>		
	X`A (<B>,.FBHDRC,D)B>,.FBHDRC,KS _i.
	$FBLNG=`	=<Z .FBCTL>		
	`(A (<B>,.FBCTLC,D)B>,.FBCTLC,Mh m.m
	$FBLW0=m1=<Z .FBUSE>		
	mPA (<B>,.FBUSEC,D)B>,.FBUSEC,My p!/
	$FBLWR=pA=<Z .FBLWR>		
	p`A (<B>,.FBLWRC,D)B>,.FBLWRC,[r vI/8
	$FBMOD=vi=<Z .FBBYV>		
	wA (<B>,.FBBYVC,D)B>,.FBBYVC,h6 A1
	$FBNAM=a=<Z .FBNAM>		
	A (<B>,.FBNAMC,D)B>,.FBNAMC,i gI.@
	$FBNDL=gi=<Z .FBCTL>		
	hA (<B>,.FBCTLC,D)B>,.FBCTLC,i: )0v
	$FBNET=I=<Z .FBNET>		
	hA (<B>,.FBNETC,D)B>,.FBNETC,i< \9-g
	$FBNEX=\Y=<Z .FBCTL>		
	\xA (<B>,.FBCTLC,D)B>,.FBCTLC,kr c.
	$FBNOD=c9=<Z .FBCTL>		
	cXA (<B>,.FBCTLC,D)B>,.FBCTLC,l wI/@
	$FBNPG=wi=<Z .FBBYV>		
	xA (<B>,.FBBYVC,D)B>,.FBBYVC,lS }q/s
	$FBNRF=~=<Z .FBCNT>		
	~0A (<B>,.FBCNTC,D)B>,.FBCNTC,my |q/k
	$FBNWR=}=<Z .FBCNT>		
	}0A (<B>,.FBCNTC,D)B>,.FBCNTC,n ^Y-y
	$FBNXF=^y=<Z .FBCTL>		
	_A (<B>,.FBCTLC,D)B>,.FBCTLC,yS fI.8
	$FBOFF=fi=<Z .FBCTL>		
	gA (<B>,.FBCTLC,D)B>,.FBCTLC,

V [)-^
	$FBPRM=[I=<Z .FBCTL>		
	[hA (<B>,.FBCTLC,D)B>,.FBCTLC,

Z k.\
	$FBPRT=k!=<Z .FBPRT>		
	k@A (<B>,.FBPRTC,D)B>,.FBPRTC,)3 {i/b
	$FBREF=|	=<Z .FBREF>		
	|(A (<B>,.FBREFC,D)B>,.FBREFC,: `y.
	$FBSHT=a=<Z .FBCTL>		
	a8A (<B>,.FBCTLC,D)B>,.FBCTLC,:= xQ/I
	$FBSIZ=xq=<Z .FBSIZ>		
	yA (<B>,.FBSIZC,D)B>,.FBSIZC,I Q1!
	$FBTDT=q=<Z .FBTDT>		
	A (<B>,.FBTDTC,D)B>,.FBTDTC,K8 q-U
	$FBTMP=Z9=<Z .FBCTL>		
	ZXA (<B>,.FBCTLC,D)B>,.FBCTLC,N8 V!-6
	$FBTYP=VA=<Z .FBHDR>		
	V`A (<B>,.FBHDRC,D)B>,.FBHDRC,\{ 10
	$FBUSW=Q=<Z .FBUSW>		
	pA (<B>,.FBUSWC,D)B>,.FBUSWC,i9 W!->
	$FBVER=WA=<Z .FBHDR>		
	W`A (<B>,.FBHDRC,D)B>,.FBHDRC,|Z za/Z
	$FBWRT={=<Z .FBWRT>		
	{ A (<B>,.FBWRTC,D)B>,.FBWRTC,MI P	%
	$FILDUDP)==<Z STS>		
	A (<B>,STSC,D)MI@ gy&A
	$FILF==h<Z F>		
	A (<B>,FC,D)A (<BMJ7 Pi%
	$FILINPQ	==<Z STS>		
	A (<B>,STSC,D)MKW .	t
	$FILNO=.)=<Z FILST1>		
	.HA (<B>,FILST1C,D)B>,FILST1C,MKz QI%
	$FILOUPQi==<Z STS>		
	A (<B>,STSC,D)Z)

Yi
	$FK2DT=

y=<Z @FKSTA2(FX)>	
	A(<B>,@FKSTA2(FX)C,D)KS\U 
	$FKABK=9=<Z FKINT>		
	AX (<B>,FKINTC,D)B>,FKINTC,D\r `I
	$FKAGE=`i=<Z FKNR(FX)>		
a	A (<B>,FKNR(FX)C,D),FKNR(FX\): 5!.
	$FKBET=5A=<Z FKPT(FX)>		
5`	A (<B>,FKPT(FX)C,D),FKPT(FX\+ iX
	$FKBL%=:i=<Z FKSWP>		
	A; (<B>,FKSWPC,D)B>,FKSWPC,D\+ 9aR
	$FKBLK=:=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(\+ X9G
	$FKBLP=XY=<Z FKBSPW(FX)>		Xx
	A (<B>,FKBSPW(FX)C,D)KBSP\,b ?i>
	$FKBS%=GI=<Z FKSWP>		
	AGh (<B>,FKSWPC,D)B>,FKSWPC,D\,t FA8
	$FKBSHFFa==<Z FKSWP(FX)>		G
	A (<B>,FKSWP(FX)C,D)FKSWP\;W j	T
	$FKCNN=j)=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(\;\ cQ2
	$FKCNX=f=<Z FKCNO>		
	Af  (<B>,FKCNOC,D)B>,FKCNOC,D\<t cq#
	$FKCSIZd==<Z FKWSP(FX)>		d0
	A (<B>,FKWSP(FX)C,D)FKWSP\YY {qc
	$FKEFR=|=<Z FKINT>		
	A|0 (<B>,FKINTC,D)B>,FKINTC,D\k 1


	$FKFLG=1)=<Z FKQ2(FX)>		
1H	A (<B>,FKQ2(FX)C,D),FKQ2(FX\lH wQA
	$FKFR1=wq=<Z FKINT>		
	Ax (<B>,FKINTC,D)B>,FKINTC,D\lI xYI
	$FKFR2=xy=<Z FKINT>		
	Ay (<B>,FKINTC,D)B>,FKINTC,D\lP ziZ
	$FKFRA={	=<Z FKINT>		
	A{( (<B>,FKINTC,D)B>,FKINTC,D\lU yaR
	$FKFRJ=z=<Z FKINT>		
	Az  (<B>,FKINTC,D)B>,FKINTC,D\l] |yk
	$FKFRZ=}=<Z FKINT>		
	A}8 (<B>,FKINTC,D)B>,FKINTC,D\{ %A-
	$FKGL%=U1=<Z FKSWP>		
	AUP (<B>,FKSWPC,D)B>,FKSWPC,D\{v W9?
	$FKGOLNWY==<Z FKBSPW(FX)>	Wx	
	A (<B>,FKBSPW(FX)C,D)KBS]

z V17
	$FKHST=VQ=<Z FKSWP(FX)>		
	A(<B>,FKSWP(FX)C,D)FKSWP(]B 
	$FKIB%=<y=<Z FKSWP>		
	A= (<B>,FKSWPC,D)B>,FKSWPC,D]T D1'
	$FKIBH=DQ=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]Y ;qc
	$FKIBS=<=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]\ V[
	$FKIBX=k=<Z FKINTB>		
	k0A (<B>,FKINTBC,D)B>,FKINTBC,]w ~t
	$FKICO=~!=<Z FKINT>		
	A~@ (<B>,FKINTC,D)B>,FKINTC,D] 
	$FKIDP=9=<Z FKINT>		
	AX (<B>,FKINTC,D)B>,FKINTC,D] =Y-
	$FKIH%=E9=<Z FKSWP>		
	AEX (<B>,FKSWPC,D)B>,FKSWPC,D]3 q!
	$FKIIF=qA=<Z FKINT>		
	Aq` (<B>,FKINTC,D)B>,FKINTC,D]Z 
	$FKIJT=1=<Z FKINT>		
	AP (<B>,FKINTC,D)B>,FKINTC,D] vI8
	$FKILO=vi=<Z FKINT>		
	Aw (<B>,FKINTC,D)B>,FKINTC,D]\ kyc
	$FKINX=l=<Z FKINT>		
	Al8 (<B>,FKINTC,D)B>,FKINTC,D]q %
	$FKISC=9=<Z FKINT>		
	AX (<B>,FKINTC,D)B>,FKINTC,D] r)
	$FKIT1=rI=<Z FKINT>		
	Arh (<B>,FKINTC,D)B>,FKINTC,D]	 s1
	$FKIT2=sQ=<Z FKINT>		
	Asp (<B>,FKINTC,D)B>,FKINTC,D] 	|
	$FKITL=)=<Z FKINT>		
	AH (<B>,FKINTC,D)B>,FKINTC,D]z uA0
	$FKIWT=ua=<Z FKINT>		
	Av (<B>,FKINTC,D)B>,FKINTC,D](W \Ih
	$FKJBN=\i=<Z FKJOB(FX)>		
	A (<B>,FKJOB(FX)C,D)FKJOB(]+b J9o
	$FKJO%=]Q=<Z FKJOB>		
	A]p (<B>,FKJOBC,D)B>,FKJOBC,D]+| H)N
	$FKJOX=YA=<Z FKJOB>		
	AY` (<B>,FKJOBC,D)B>,FKJOBC,D], faJ
	$FKJP%=i	=<Z FKCNO>		
	Ai( (<B>,FKCNOC,D)B>,FKCNOC,D], h	D
	$FKJPT=h)=<Z FKCNO(FX)>		
	A (<B>,FKCNO(FX)C,D)FKCNO(],b T^
	$FKJS%=[A=<Z FKJOB>		
	A[` (<B>,FKJOBC,D)B>,FKJOBC,D],q ZAX
	$FKJSB=Za=<Z FKJOB(FX)>		
	A (<B>,FKJOB(FX)C,D)FKJOB(]- Ax
	$FKJTN=a=<Z FKJTQ>		
	A (<B>,FKJTQC,D)B>,FKJTQC,D]- I
	$FKJTP=i=<Z FKJTQ>		
	A (<B>,FKJTQC,D)B>,FKJTQC,D]:6 R
	$FKKIL=R9=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(]; LI
	$FKKL%=S!=<Z FKSWP>		
	AS@ (<B>,FKSWPC,D)B>,FKSWPC,D][X 2
	$FKMNQ=21=<Z FKQ2(FX)>		
2P	A (<B>,FKQ2(FX)C,D),FKQ2(FX]hB \!p
	$FKNB%=W>		
	A (<B>,FKNBWC,D)B>,FKNBWC,D]l\ ^9w
	$FKNRX=^Y=<Z FKNR>		
	A ^x(<B>,FKNRC,D)<B>,FKNRC,D)]m .y{
	$FKNTC=/=<Z FKQ2>		
	A /8(<B>,FKQ2C,D)<B>,FKQ2C,D)]mq dy+
	$FKNWCEe==<Z FKWSP(FX)>		e8
	A (<B>,FKWSP(FX)C,D)FKWSP]ms o}
	$FKNWF=o1=<Z FKINT>		
	AoP (<B>,FKINTC,D)B>,FKINTC,D]mu p
	$FKNWJ=p9=<Z FKINT>		
	ApX (<B>,FKINTC,D)B>,FKINTC,D]yv T)&
	$FKOGL=TI=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(^	| $A(
	$FKPGX=$a=<Z FKPGS>		
	A% (<B>,FKPGSC,D)B>,FKPGSC,D^

T 
	$FKPRI=9=<Z FKINT>		
	AX (<B>,FKINTC,D)B>,FKINTC,D^

b "	8
	$FKPS%=&a=<Z FKPGS>		
	A' (<B>,FKPGSC,D)B>,FKPGSC,D^

h ml
	$FKPS0=m!=<Z FKINT>		
	Am@ (<B>,FKINTC,D)B>,FKINTC,D^

h n	t
	$FKPS1=n)=<Z FKINT>		
	AnH (<B>,FKINTC,D)B>,FKINTC,D^

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

q %a2
	$FKPSB=&=<Z FKPGS(FX)>		
	A (<B>,FKPGS(FX)C,D)FKPGS(^
	$FKPTD=,=<Z FKPGST>		
	,A(<B>,FKPGSTC,D)B>,FKPGSTC,^
	$FKPTR=*y=<Z FKPGST>		
	+A(<B>,FKPGSTC,D)B>,FKPGSTC,^
	$FKPTX=)y=<Z FKPGST>		
	*A (<B>,FKPGSTC,D)B>,FKPGSTC,^\ -qs
	$FKQ2X=.=<Z FKQ2>		
	A .0(<B>,FKQ2C,D)<B>,FKQ2C,D)^@ 3
	$FKQN==39<Z FKQ2(FX)>		
	3XA (<B>,FKQ2(FX)C,D),FKQ2(FX)^ ,ij
	$FKQTM=-	=<Z FKQ1(FX)>		
-(	A (<B>,FKQ1(FX)C,D),FKQ1(FX^< Pq
	$FKSPL=Q=<Z FKSWP>		
	AQ0 (<B>,FKSWPC,D)B>,FKSWPC,D^=	 1_
	$FKST2=Q=<Z FKSTA2>		
	pA (<B>,FKSTA2C,D)B>,FKSTA2C,^= 
)V
	$FKSTD=
I=<Z FKSTAT>		
	
hA (<B>,FKSTATC,D)B>,FKSTATC,^= 	!N
	$FKSTR=	A=<Z FKSTAT>		
		`A (<B>,FKSTATC,D)B>,FKSTATC,^= !F
	$FKSTX=A=<Z FKSTAT>		
	`A (<B>,FKSTATC,D)B>,FKSTATC,^=9 t9'
	$FKSUS=tY=<Z FKINT>		
	Atx (<B>,FKINTC,D)B>,FKINTC,D^=| 6)6
	$FKSWX=6I=<Z FKSWP>		
	A6h (<B>,FKSWPC,D)B>,FKSWPC,D^J6 Q	
	$FKTIM=q=<Z FKTIME>		
	A (<B>,FKTIMEC,D)B>,FKTIMEC,^\ )I
	$FKUP%=(q=<Z FKPGS>		
	A) (<B>,FKPGSC,D)B>,FKPGSC,D^\ 'iB
	$FKUPT=(	=<Z FKPGS(FX)>		
	A (<B>,FKPGS(FX)C,D)FKPGS(^|b 'AG
	$FKWS%=8Y=<Z FKSWP>		
	A8x (<B>,FKSWPC,D)B>,FKSWPC,D^|v 7QA
	$FKWSL=7q=<Z FKSWP(FX)>		
	A (<B>,FKSWP(FX)C,D)FKSWP(^|y aI
	$FKWSS=ai=<Z FKNR(FX)>		
b	A (<B>,FKNR(FX)C,D),FKNR(FX^|| bQ
	$FKWSX=bq=<Z FKWSP>		
	Ac (<B>,FKWSPC,D)B>,FKWSPC,D^} 4%
	$FKWTL=49=<Z FKQ2(FX)>		
4X	A (<B>,FKQ2(FX)C,D),FKQ2(FX_3 _A
	$FKXAGEa==<Z FKNR(FX)>		
	A (<B>,FKNR(FX)C,D),FKNR(Fd <aj
	$FLATL===<Z FILDNM>		
	= A (<B>,FILDNMC,D)B>,FILDNMC,d, )M
	$FLBPO=)1=<Z FILBYT>		
	)PA (<B>,FILBYTC,D)B>,FILBYTC,d,} *U
	$FLBSZ=*9=<Z FILBYT>		
	*XA (<B>,FILBYTC,D)B>,FILBYTC,dJ9 ;ab
	$FLDIR=<=<Z FILDNM>		
	< A (<B>,FILDNMC,D)B>,FILDNMC,dK9 Ay
	$FLDMS=B=<Z FILMS1>		
	B8A (<B>,FILMS1C,D)B>,FILMS1C,dKW :YY
	$FLDNO=:y=<Z FILDDN>		
	;A (<B>,FILDDNC,D)B>,FILDDNC,dLq 9YQ
	$FLDSB=9y=<Z FILDDN>		
	:A (<B>,FILDDNC,D)B>,FILDDNC,dM 01
	$FLDTB=0Q=<Z FILDEV>		
	0pA (<B>,FILDEVC,D)B>,FILDEVC,dM\ Cy#
	$FLDVX=D=<Z FILIDX>		
	D8A (<B>,FILIDXC,D)B>,FILIDXC,d[9 E,
	$FLEMS=E!=<Z FILMS2>		
	E@A (<B>,FILMS2C,D)B>,FILMS2C,d\q >iz
	$FLESB=?	=<Z FILNEN>		
	?(A (<B>,FILNENC,D)B>,FILNENC,dhw 19
	$FLFCO=1Y=<Z FILNLP>		
	1xA (<B>,FILNLPC,D)B>,FILNLPC,eKQ 6I8
	$FLLNC=6i=<Z FILLNM>		
	7A (<B>,FILLNMC,D)B>,FILLNMC,eKU HE
	$FLLNK=H1=<Z FILNND>		
	HPA (<B>,FILNNDC,D)B>,FILNNDC,e[r "Il
	$FLMOD=-!=<Z FILSTS>		
	-@A (<B>,FILSTSC,D)B>,FILSTSC,e\ 7QA
	$FLMPC=7q=<Z FILLFW>		
	8A (<B>,FILLFWC,D)B>,FILLFWC,ek9 By
	$FLNMS=C=<Z FILMS1>		
	C8A (<B>,FILMS1C,D)B>,FILMS1C,ekr IM
	$FLNOD=I1=<Z FILNND>		
	IPA (<B>,FILNNDC,D)B>,FILNNDC,elq =ir
	$FLNSB=>	=<Z FILNEN>		
	>(A (<B>,FILNENC,D)B>,FILNENC,f G	<
	$FLP0==G)<Z FILCOD>		
	AGH (<B>,FILCODC,D)B>,FILCODC,f	w +!^
	$FLPGN=+A=<Z FILWND>		
	+`A(<B>,FILWNDC,D)B>,FILWNDC,f
	$FLPTN=3a=<Z FILOFN>		
	4A(<B>,FILOFNC,D)B>,FILOFNC,f
	$FLPTT=4a=<Z FILOFN>		
	5A (<B>,FILOFNC,D)B>,FILOFNC,f99 29
	$FLSES=2Y=<Z FILNLP>		
	2xA (<B>,FILNLPC,D)B>,FILNLPC,fLq (	D
	$FLTSB=()=<Z FILTMP>		
	(HA (<B>,FILTMPC,D)B>,FILTMPC,fLr '	<
	$FLTSD=')=<Z FILTMP>		
	'HA (<B>,FILTMPC,D)B>,FILTMPC,fM 8QI
	$FLTTW=8q=<Z FILLFW>		
	9A (<B>,FILLFWC,D)B>,FILLFWC,fN 5I0
	$FLTXT=5i=<Z FILLNM>		
	6A (<B>,FILLNMC,D)B>,FILLNMC,fX` F	4
	$FLUC==F)<Z FILCOD>		
	AFH (<B>,FILCODC,D)B>,FILCODC,fkW @q
	$FLVNO=A=<Z FILVER>		
	A0A (<B>,FILVERC,D)B>,FILVERC,f| ,!f
	$FLWPG=,A=<Z FILWND>		
	,`A (<B>,FILWNDC,D)B>,FILWNDC,9@ M$j
	$FRKF==M!<Z STS>		
	A (<B>,STSC,D)(<= vy7;
	$FRKTTYw==<Z CTTAB>		
	w8A (<B>,CTTABC,D)B>,CTTABC,I7 T1-%
	$FRLEN=TQ=<Z 0>		
	A (<B>,0C,D)A (<iQ U--
	$FRNFB=U9=<Z .FRNFB>		
	UXA (<B>,.FRNFBC,D)B>,.FRNFBC,|z V	%2
	$FROSTFV)==<Z STS>		
	A (<B>,STSC,D)N8 Rq-
	$FRTYP=S=<Z 0>		
	A (<B>,0C,D)A (<i9 SQ-
	$FRVER=Sq=<Z 0>		
	A (<B>,0C,D)A (<Dz y(y
	$FXACT==<Z F1>		
	A (<B>,F1C,D) (<F

Z 	(r
	$FXPRT=)=<Z F1>		
	A (<B>,F1C,D) (<FK8 i)
	$FXTMP=	=<Z F1>		
	A (<B>,F1C,D) (<u)S (3
	$GNJFF=9=<Z F1>		
	A (<B>,F1C,D) (<"L)V "1
	$HIBFL="Q=<Z JOBNAM>		
	"pA (<B>,JOBNAMC,D)B>,JOBNAMC,"dI@ R)%
	$HLDF==RI<Z STS>		
	A (<B>,STSC,D)(<"fI@ HQ$G
	$HLTF==Hq<Z STS>		
	A (<B>,STSC,D)(<#4\S

)(d
	$HVERF=

I=<Z F1>		
	A (<B>,F1C,D) (<&'	Q 93K
	$IDXFB=99=<Z 0>		
	A (<B>,0C,D)A (<&'	S 4Y3'
	$IDXFG=4y=<Z 1>		
	A (<B>,1C,D)A (<&'	V 73=
	$IDXFLG79==<Z STRINF>		
	7XA (<B>,STRINFC,D)B>,STRINFC&'
1 :Y3W
	$IDXIB=:y=<Z 1>		
	A (<B>,1C,D)A (<&'
; 593-
	$IDXIV=5Y=<Z 1>		
	A (<B>,1C,D)A (<&'

r 9y3Q
	$IDXSD=:=<Z 0>		
	A (<B>,0C,D)A (<&<K `y&	
	$IGDLF=a=<Z F>		
	A (<B>,FC,D)A (<&=S I)
	$IGIVF=i=<Z F1>		
	A (<B>,F1C,D) (<&d,} ,)Bf
	$ILBSZ=,I=<Z ILSIZE>		
	,hA (<B>,ILSIZEC,D)B>,ILSIZEC,&dL} -)Bn
	$ILDSZ=-I=<Z ILSIZE>		
	-hA (<B>,ILSIZEC,D)B>,ILSIZEC,&e}: /9B
	$ILOUT=/Y=<Z ILMISC>		
	/xA (<B>,ILMISCC,D)B>,ILMISCC,&f93 09C
	$ILSEG=0Y=<Z ILMISC>		
	0xA (<B>,ILMISCC,D)B>,ILMISCC,&fi1 ,Bu
	$ILVEC=.1=<Z ILNSPV>		
	.PA (<B>,ILNSPVC,D)B>,ILNSPVC,&}[r 4y#)
	$IOMODE5==<Z STS>		
	A(<B>,STSC,D)'	w ]q
	$IPPGN=^=<Z >		
	A (<B>,C,D)A (<B*^ "i
	$JBMX==#	<Z JBFLAG>		
	A#( (<B>,JBFLAGC,D)B>,JBFLAGC,*DH #i"
	$JBT20=$	=<Z JBFLAG>		
	$(A (<B>,JBFLAGC,D)B>,JBFLAGC,*IU Q
	$JBTFK=q=<Z JOBPT>		
	A (<B>,JOBPTC,D)B>,JOBPTC,D*M Y
	$JBTTY=y=<Z JOBPT>		
	A (<B>,JOBPTC,D)B>,JOBPTC,D*5h3 bY&
	$JFNAF=by=<Z F>		
	A (<B>,FC,D)A (<*5i@ ai&
	$JFNF==b	<Z F>		
	A (<B>,FC,D)A (<B*5lR g	&:
	$JFNRD=g)=<Z F>		
	A (<B>,FC,D)A (<*5m1 Ni%>
	$JFNUB=Wi=<Z STS>		
	A (<B>,STSC,D)(*|,Z a"
	$JOBRTP==<Z JOBRTL>		
	 A (<B>,JOBRTLC,D)B>,JOBRTLC+ /y3
	$JSADN=0=<Z JSADIR>		
	08A (<B>,JSADIRC,D)B>,JSADIRC,+< 91
	$JSAMX=Y=<Z JSATCT>		
	xA (<B>,JSATCTC,D)B>,JSATCTC,+W  92
	$JSANO= Y=<Z JSATCT>		
	 xA (<B>,JSATCTC,D)B>,JSATCTC,+(: u
	$JSBAT=9=<Z JBFLAG>		
	XA (<B>,JBFLAGC,D)B>,JBFLAGC,+9 3y2
	$JSCDF=4=<Z JSBCDS>		
	!xA (<B>,JSBCDSC,D)B>,JSBCDSC,+9 2y3
	$JSCDS=3=<Z JSBCDS>		
	38A (<B>,JSBCDSC,D)B>,JSBCDSC,+IY

1l
	$JSDFS=)=<Z JBFLAG>		
	HA (<B>,JBFLAGC,D)B>,JBFLAGC,+J9 1y3
	$JSDIR=2=<Z JSBSDN>		
	28A (<B>,JSBSDNC,D)B>,JSBSDNC,+[ )~
	$JSELO=I=<Z JBFLAG>		
	hA (<B>,JBFLAGC,D)B>,JBFLAGC,+k  9
	$JSFLO= Y=<Z JBFLAG>		
	 xA (<B>,JBFLAGC,D)B>,JBFLAGC,+k: .y2{
	$JSFMT=/=<Z JSFKMT>		
	/8A (<B>,JSFKMTC,D)B>,JSFKMTC,+|X -y2s
	$JSGRP=.=<Z JSGRPS>		
	.8A (<B>,JSGRPSC,D)B>,JSGRPSC,+Xt *y2[
	$JSMCI=+=<Z JSSTRF>		
	+8A (<B>,JSSTRFC,D)B>,JSSTRFC,+] ]
	$JSMTD=1=<Z JSMTA1>		
	PA (<B>,JSMTA1C,D)B>,JSMTA1C,+] 	T
	$JSMTM=)=<Z JSMTA1>		
	HA (<B>,JSMTA1C,D)B>,JSMTA1C,+] e
	$JSMTP=9=<Z JSMTA1>		
	XA (<B>,JSMTA1C,D)B>,JSMTA1C,+] L
	$JSMTR=!=<Z JSMTA1>		
	@A (<B>,JSMTA1C,D)B>,JSMTA1C,+{ !I
	$JSOLO=!i=<Z JBFLAG>		
	"A (<B>,JBFLAGC,D)B>,JBFLAGC,+9 )y2S
	$JSSDM=*=<Z JSSTRF>		
	*8A (<B>,JSSTRFC,D)B>,JSSTRFC,+= I92i
	$JSSTN=,y=<Z JSSTRF>		
	-A (<B>,JSSTRFC,D)B>,JSSTRFC,+X` 0y3
	$JSUC==1<Z JSBSDN>		
	A18 (<B>,JSBSDNC,D)B>,JSBSDNC,+v +y2c
	$JSXCL=,=<Z JSSTRF>		
	,8A (<B>,JSSTRFC,D)B>,JSSTRFC,+$lU )m
	$JTFRK=1=<Z JTTFK>		
	AP (<B>,JTTFKC,D)B>,JTTFKC,D+%8 	)L
	$JTIMP=)=<Z JTBMN>		
	AH (<B>,JTBMNC,D)B>,JTBMNC,D+%+W )e
	$JTJNO=1=<Z KIMUU1+1>		
P	A (<B>,KIMUU1+1C,D),KIMUU1++%Xw )U
	$JTMCN=1=<Z JTMNW>		
	AP (<B>,JTMNWC,D)B>,JTMNWC,D+%[T )]
	$JTMNI=1=<Z JTMNW>		
	AP (<B>,JTMNWC,D)B>,JTMNWC,D-z Q0I
	$K01ST=q=<Z .FBBBT>		
		A (<B>,.FBBBTC,D)B>,.FBBBTC,-^ A0@
	$K0EXM=a=<Z .FBBBT>		
	A (<B>,.FBBBTC,D)B>,.FBBBTC,-h9 107
	$K0NAR=Q=<Z .FBBBT>		
	pA (<B>,.FBBBTC,D)B>,.FBBBTC,-i !0.
	$K0NDL=A=<Z .FBBBT>		
	`A (<B>,.FBBBTC,D)B>,.FBBBTC,-(9 Q0
	$K0RAR=!=<Z .FBBBT>		
	@A (<B>,.FBBBTC,D)B>,.FBBBTC,-)V 
q0[
	$K0RFL==<Z .FBBBT>		
	0A (<B>,.FBBBTC,D)B>,.FBBBTC,-*; 0%
	$K0RIV=1=<Z .FBBBT>		
	PA (<B>,.FBBBTC,D)B>,.FBBBTC,-,w

0d
	$K0RSN=

!=<Z .FBBBT>

@A (<B>,.FBBBTC,D)B>,.FBBBTC,-|W 	a0R
	$K0WRN=
=<Z .FBBBT>		
	
 A (<B>,.FBBBTC,D)B>,.FBBBTC,./S )(
	$KEYFF=I=<Z F1>		
	A (<B>,F1C,D) (<.dJ9 =y;s
	$KLDIR=>=<Z .KLDIR>		
	>8A (<B>,.KLDIRC,D)B>,.KLDIRC,.f: @<
	$KLSHR=@!=<Z .KLSHR>		
	@@A (<B>,.KLSHRC,D)B>,.KLSHRC,.f= <y;k
	$KLSTR===<Z .KLDIR>		
	=8A (<B>,.KLDIRC,D)B>,.KLDIRC,.fK ?;|
	$KLTLN=?!=<Z .KLSHR>		
	?@A (<B>,.KLSHRC,D)B>,.KLSHRC,25n U)%,
	$LFNXT=UI=<Z STS>		
	A (<B>,STSC,D)(2uXw JS
	$LNMCNTJ9==<Z 0>		
	A (<B>,0C,D)A (<2uZ2 JyY
	$LNMIDXK==<Z 0>		
	A (<B>,0C,D)A (<2u[ LAf
	$LNMLNKLa==<Z 1>		
	A (<B>,1C,D)A (<2u\ M!l
	$LNMPNTMA==<Z 1>		
	A (<B>,1C,D)A (<2u\z KY_
	$LNMSTPKy==<Z 0>		
	A (<B>,0C,D)A (<2v= $Y:)
	$LNSTA=$y=<Z DNASTA>		
	%A (<B>,DNASTAC,D)B>,DNASTAC,2}is BA$
	$LONGF=Ba=<Z STS>		
	A(<B>,STSC,D)(34\S 
	$LVERF=	
	A (<B>,F1C,D) (<7$: w	':
	$MTCHF=w)=<Z F1>		
	A (<B>,F1C,D) (<:

8s `	&
	$NACCF=`)=<Z F>		
	A(<B>,FC,D)A (<:
	$NAMCN=#)=<Z >		
	A(<B>,C,D)A (<B:
	$NAMEF=E1=<Z STS>		
	A(<B>,STSC,D)(:
	$NAMF==k)<Z F>		
	A(<B>,FC,D)A (<B:
	$NAMSF=		=<Z F1>		
	A(<B>,F1C,D) (<:
	$NAMTF=pI=<Z F>		
	A(<B>,FC,D)A (<:
	$NAMXF=~	=<Z F1>		
	A (<B>,F1C,D) (<:,y@ y)'L
	$NEGF==yI<Z F1>		
	A (<B>,F1C,D) (<:.y@ 	(
	$NEWF==)<Z F1>		
	A (<B>,F1C,D) (<:.{S Zi%X
	$NEWNF=[	=<Z F>		
	A (<B>,FC,D)A (<:.}S i( 
	$NEWVF=	=<Z F1>		
	A (<B>,F1C,D) (<:mI7 I	,J
	$NMLEN=I)=<Z 0>		
	A (<B>,0C,D)A (<:nN8 H),D
	$NMTYP=HI=<Z 0>		
	A (<B>,0C,D)A (<:nh6 Iq,Q
	$NMVAL=J=<Z 1>		
	A (<B>,1C,D)A (<:t3 uI'.
	$NNAMF=ui=<Z F>		
	A (<B>,FC,D)A (<:|I3 ti'(
	$NODEF=u	=<Z F>		
	A (<B>,FC,D)A (<:}n @a$
	$NONXF=A=<Z STS>		
	A (<B>,STSC,D)(:~= #92
	$NOSTR=#Y=<Z STRWRD>		
	#xA (<B>,STRWRDC,D)B>,STRWRDC,;X` {I'^
	$NREC=={i<Z F1>		
	A (<B>,F1C,D) (<;Xh |)'d
	$NREC1=|I=<Z F1>		
	A (<B>,F1C,D) (<;Z X)%D
	$NSPNULXI==<Z STS>		
	A (<B>,STSC,D);-YS I(
	$NUMFF=i=<Z F1>		
	A (<B>,F1C,D) (<;4\S v)'4
	$NVERF=vI=<Z F>		
	A (<B>,FC,D)A (<;>I@ AQ$
	$NWTF==Aq<Z STS>		
	A (<B>,STSC,D)(<>I@ xI'F
	$OCTF==xi<Z F1>		
	A (<B>,F1C,D) (<>%Q Y	
	$ODIRC=y=<Z ALOC1>		
	A (<B>,ALOC1C,D)B>,ALOC1C,D>5hQ y+
	$OFNBC==<Z OFNLEN>		
	8A (<B>,OFNLENC,D)B>,OFNLENC,>5hY q#
	$OFNBSZ==<Z OFNLEN>		
	0A (<B>,OFNLENC,D)B>,OFNLENC>5hy T)
	$OFNCSHTI==<Z SPTO2>		
	ThA (<B>,SPTO2C,D)B>,SPTO2C,>5j X
	$OFNHS=X1=<Z OFNHST>		
	XPA (<B>,OFNHSTC,D)B>,OFNHSTC,>5k3 U)
	$OFNMGBUI==<Z SPTO2>		
	UhA (<B>,SPTO2C,D)B>,SPTO2C,>5k\ Y
	$OFNNXTY1==<Z OFNHSE>		
	YPA (<B>,OFNHSEC,D)B>,OFNHSEC>5l Z
	$OFNPRVZ9==<Z OFNHSE>		
	ZXA (<B>,OFNHSEC,D)B>,OFNHSEC>5lt IA

P
	$OFNSHCIa==<Z SPTO>		
	AJ (<B>,SPTOC,D)<B>,SPTOC,D)>5| K)

^
	$OFOPC=KI=<Z SPTO2>		
	AKh (<B>,SPTO2C,D)B>,SPTO2C,D>dKS [Y%_
	$OLDNF=[y=<Z F>		
	A (<B>,FC,D)A (<?i@ <1#e
	$OPNF==<Q<Z STS>		
	A (<B>,STSC,D)(<?p ?q
	$ORG==<@Z FILVER>		
	A @0(<B>,FILVERC,D)B>,FILVERC,D?LS d9&%
	$OSTRF=dY=<Z F>		
	A (<B>,FC,D)A (<?.L Yy%Q
	$OUTPF=Z=<Z F>		
	A (<B>,FC,D)A (<B

}1 8`
	$PAGUBA;a==<Z KIPGWD>		
	<A (<B>,KIPGWDC,D)B>,KIPGWDCB; ;!#\
	$PASLSN;I==<Z STS>		
	A (<B>,STSC,D)B7	S I(&
	$PFXFF=i=<Z F1>		
	A (<B>,F1C,D) (<B=IZ a
	$PGLFT==<Z ALOC2>		
	A(<B>,ALOC2C,D)B>,ALOC2C,DB>
	$PGPTR=	=<Z ALOC2>		
	A( (<B>,ALOC2C,D)B>,ALOC2C,DBGs f&3
	$PHYOF=f9=<Z F>		
	A (<B>,FC,D)A (<BL+8 0
	$PIBMP=0!=<Z FKQ2(FX)>		
0@	A (<B>,FKQ2(FX)C,D),FKQ2(FXBe8w C!


	$PLKCNTCA==<Z @CST1X>		
	C`A (<B>,@CST1XC,D)B>,@CST1XCB}iS \I%f
	$PONFF=\i=<Z F>		
	A (<B>,FC,D)A (<Cn OI~
	$PRFXL=Oi=<Z 0>		
	A (<B>,0C,D)A (<Cn Nr
	$PRFXS=N!=<Z 0>		
	A (<B>,0C,D)A (<Cn Nax
	$PRFXV=O=<Z 0>		
	A (<B>,0C,D)A (<CI@ m)&l
	$PRTF==mI<Z F>		
	A (<B>,FC,D)A (<BCIS 	(
	$PRTFF=)=<Z F1>		
	A (<B>,F1C,D) (<CM s)'
	$PRTTF=sI=<Z F>		
	A (<B>,FC,D)A (<C] &4
	$PSUTPS&!==<Z PSBITS>		
	&@A (<B>,PSBITSC,D)B>,PSBITSCC

t $y+
	$PSXSIR%==<Z PSBITS>		
	%8A (<B>,PSBITSC,D)B>,PSBITSCJ, =!#l
	$READF==A=<Z STS>		
	A (<B>,STSC,D)(J,9@ S	%
	$RECF==S)<Z STS>		
	A (<B>,STSC,D)(<Je	S e)&,
	$RLHFF=eI=<Z F>		
	A (<B>,FC,D)A (<Jtq SA5
	$RNACC=Sa=<Z 5>		
	A (<B>,5C,D)A (<JtI@ ?q$
	$RNDF==@<Z STS>		
	A (<B>,STSC,D)(<JuI7 L4e
	$RNLEN=LQ=<Z 0>		
	A (<B>,0C,D)A (<Jukr Pq5	
	$RNNOD=Q=<Z 2>		
	A (<B>,2C,D)A (<Jun NQ4w
	$RNNXT=Nq=<Z 1>		
	A (<B>,1C,D)A (<Jv9 RQ5
	$RNPAS=Rq=<Z 4>		
	A (<B>,4C,D)A (<JvN8 JA4V
	$RNTYP=Ja=<Z 0>		
	A (<B>,0C,D)A (<Jv\y Qa5
	$RNUSR=R=<Z 3>		
	A (<B>,3C,D)A (<Jvi9 K!4\
	$RNVER=KA=<Z 0>		
	A (<B>,0C,D)A (<Kw x7C
	$RSPOO=x1=<Z 0>		
	A (<B>,0C,D)A (<K:= xq7I
	$RSSIZ=y=<Z 0>		
	A (<B>,0C,D)A (<K' _%{
	$RTYPF=_9=<Z F>		
	A (<B>,FC,D)A (<K4\S 9(]
	$RVERF=Y=<Z F1>		
	A (<B>,F1C,D) (<N	1 *A:V
	$SBHEB=*a=<Z 3>		
	A (<B>,3C,D)A (<N8W (q:I
	$SBSBN=)=<Z 3>		
	A (<B>,3C,D)A (<N8w &:4
	$SBSCN=&!=<Z SBSTYP>		
	&@A (<B>,SBSTYPC,D)B>,SBSTYPC,N<q )Y:O
	$SBSSB=)y=<Z 3>		
	A (<B>,3C,D)A (<N<| (	:B
	$SBSSY=()=<Z 3>		
	A (<B>,3C,D)A (<N= ':<
	$SBSTP='!=<Z SBSTYP>		
	'@A (<B>,SBSTYPC,D)B>,SBSTYPC,N+ Oi
	$SCBLK%P	==<Z FKSWP>		
	P(A (<B>,FKSWPC,D)B>,FKSWPC,N= ":!
	$SCSTA=#q=<Z DNASTA>		
	$A (<B>,DNASTAC,D)B>,DNASTAC,Nx5 Naz
	$SCWAK%O==<Z FKSWP>		
	O A (<B>,FKSWPC,D)B>,FKSWPC,NFI@ hi&H
	$SHTF==i	<Z F>		
	A (<B>,FC,D)A (<BNL :A#V
	$SIADR=:a=<Z >		
	A (<B>,C,D)A (<BNMI; 9Q#O
	$SILEV=9q=<Z >		
	A (<B>,C,D)A (<BNNi9 59#H
	$SIVER=9=<Z >		
	A (<B>,C,D)A (<BNO)@ L$c
	$SIZF==L1<Z STS>		
	A (<B>,STSC,D)(<N] <	$n
	$SKIPBYMi==<Z STS>		
	A (<B>,STSC,D)OHr M)

n
	$SPTCDOMI==<Z SPTO2>		
	MhA (<B>,SPTO2C,D)B>,SPTO2C,OHz W1
	$SPTCT=WQ=<Z >		
	A (<B>,C,D)A (<BOI O)

~
	$SPTDSFOI==<Z SPTO2>		
	OhA (<B>,SPTO2C,D)B>,SPTO2C,OIW L)

f
	$SPTFO=LI=<Z SPTO2>		
	ALh (<B>,SPTO2C,D)B>,SPTO2C,DOIY P)
	$SPTFR=PI=<Z SPTO2>		
	APh (<B>,SPTO2C,D)B>,SPTO2C,DOK9 S)
	$SPTMR=SI=<Z SPTO2>		
	ASh (<B>,SPTO2C,D)B>,SPTO2C,DOKP R)
	$SPTNA=RI=<Z SPTO2>		
	ARh (<B>,SPTO2C,D)B>,SPTO2C,DOLs N)

v
	$SPTSFDNI==<Z SPTO2>		
	NhA (<B>,SPTO2C,D)B>,SPTO2C,OLt HI

F
	$SPTSHCHi==<Z SPT>		
	A(<B>,SPTC,D)OLy Q)
	$SPTSR=QI=<Z SPTO2>		
	AQh (<B>,SPTO2C,D)B>,SPTO2C,DOLz V)
	$SPTST=VI=<Z SPTO2>		
	AVh (<B>,SPTO2C,D)B>,SPTO2C,DON \i
	$SPTX==]	<Z >		
	A (<B>,C,D)A (<B>O$S )#
	$STARF=9=<Z F1>		
	A (<B>,F1C,D) (<O$<R Yi5R
	$STCRD=Z	=<Z SDBSTS>		
	Z(A (<B>,SDBSTSC,D)B>,SDBSTSC,O$J9 V957
	$STDIS=VY=<Z SDBSTS>		
	VxA (<B>,SDBSTSC,D)B>,SDBSTSC,O$Kv WI5@
	$STDOM=Wi=<Z SDBSTS>		
	XA (<B>,SDBSTSC,D)B>,SDBSTSC,O$\ 	)*
	$STEPF=)=<Z F1>		
	A (<B>,F1C,D) (<O$^ \	5d
	$STEXL=\)=<Z SDBSTS>		
	\HA (<B>,SDBSTSC,D)B>,SDBSTSC,O$x2 K
	$STGADR\)==<Z >		
	A (<B>,C,D)A (<O% Zy5[
	$STIDX=[=<Z SDBSTS>		
	[8A (<B>,SDBSTSC,D)B>,SDBSTSC,O%lY XY5I
	$STNRS=Xy=<Z SDBSTS>		
	YA (<B>,SDBSTSC,D)B>,SDBSTSC,O&

` 895.
	$STPS==J<Z SDBSTS>		
	AUi (<B>,SDBSTSC,D)B>,SDBSTSC,O&  /1
	$STR==</QZ FILDEV>		
	A /p(<B>,FILDEVC,D)B>,FILDEVC,DO&(H j6T
	$STRB0=j!=<Z SDBBT0>		
	j@A (<B>,SDBBT0C,D)B>,SDBBT0C,O&(H k	6\
	$STRB1=k)=<Z SDBBT1>		
	kHA (<B>,SDBBT1C,D)B>,SDBBT1C,O&(Z ea62
	$STRBTBf==<Z SDBBTB>		
	f A (<B>,SDBBTBC,D)B>,SDBBTBCO&(\ bI6
	$STRBXBbi==<Z SDBBXB>		
	cA (<B>,SDBBXBC,D)B>,SDBBXBCO&(| hy6K
	$STRCYLi==<Z SDBCYL>		
	i8A (<B>,SDBCYLC,D)B>,SDBCYLCO&)@ zi'X
	$STRF=={	<Z F1>		
	A (<B>,F1C,D) (<O&)Q fi6:
	$STRFC=g	=<Z SDBFRC>		
	g(A (<B>,SDBFRCC,D)B>,SDBFRCC,O&)V "92
	$STRFLG"Y==<Z STRWRD>		
	"xA (<B>,STRWRDC,D)B>,STRWRDCO&)Y dY6)
	$STRFSSdy==<Z SDBFSS>		
	eA (<B>,SDBFSSC,D)B>,SDBFSSCO&*2 _15
	$STRIDX_Q==<Z SDBIDX>		
	_pA (<B>,SDBIDXC,D)B>,SDBIDXCO&*Q ])5n
	$STRJB=]I=<Z SDBSTS>		
	]hA (<B>,SDBSTSC,D)B>,SDBSTSC,O&+ gq6C
	$STRLCAh==<Z SDBLCA>		
	h0A (<B>,SDBLCAC,D)B>,SDBLCACO&+ `96
	$STRLDN`Y==<Z SDBLDN>		
	`xA (<B>,SDBLDNC,D)B>,SDBLDNCO&+ p)7
	$STRLK=pI=<Z SDBFLK>		
	phA (<B>,SDBFLKC,D)B>,SDBFLKC,O&+1 q17
	$STRMC=qQ=<Z SDBCNT>		
	qpA (<B>,SDBCNTC,D)B>,SDBCNTC,O&+4 s97
	$STRMI=sY=<Z SDBPUC>		
	sxA (<B>,SDBPUCC,D)B>,SDBPUCC,O&+P !91l
	$STRNAM!Y==<Z SDBNAM>		
	HA (<B>,SDBNAMC,D)B>,SDBNAMCO&+Y cQ6!
	$STRNSScq==<Z SDBNSS>		
	dA (<B>,SDBNSSC,D)B>,SDBNSSCO&+Z .D
	$STRNUM==<Z SDBNUM>		
	hIA (<B>,SDBNUMC,D)B>,SDBNUMCO&+s r17
	$STROF=rQ=<Z SDBCNT>		
	rpA (<B>,SDBCNTC,D)B>,SDBCNTC,O&,R ^15w
	$STRRDO^Q==<Z SDBIDX>		
	^pA (<B>,SDBIDXC,D)B>,SDBIDXCO&,\ aA6
	$STRRXBaa==<Z SDBRXB>		
	bA (<B>,SDBRXBC,D)B>,SDBRXBCO&,s 	(:
	$STRSF=)=<Z F1>		
	A (<B>,F1C,D) (<O&,t )1f
	$STRSIZI==<Z SDBSIZ>		
	hA (<B>,SDBSIZC,D)B>,SDBSIZCO&,z IY4i
	$STRSTS==<Z SDBSTS>		
	MA (<B>,SDBSTSC,D)B>,SDBSTSCO&- l6e
	$STRTYPl1==<Z SDBTYP>		
	lPA (<B>,SDBTYPC,D)B>,SDBTYPCO&-1 n!6v
	$STRUC=nA=<Z SDBFLK>		
	n`A (<B>,SDBFLKC,D)B>,SDBFLKC,O&-2 m6m
	$STRUDBm9==<Z SDBUDB>		
	mXA (<B>,SDBUDBC,D)B>,SDBUDBCO&-9 o)6~
	$STRUS=oI=<Z SDBFLK>		
	ohA (<B>,SDBFLKC,D)B>,SDBFLKC,O&. =!

T
	$STRX==JA<Z SPTO>		
	A (<B>,SPTOC,D)OF= y8	
	$SXSTR==<Z 2>		
	A (<B>,2C,D)A (<OMX2 F,5
	$SYMAD=F9=<Z .SYMAD>		
	FXA (<B>,.SYMADC,D)B>,.SYMADC,OMY D!,$
	$SYMDN=DA=<Z 0>		
	A (<B>,0C,D)A (<OMY: E,-
	$SYMET=E1=<Z .SYMAD>		
	EPA (<B>,.SYMADC,D)B>,.SYMADC,OM] CA,
	$SYMTY=Ca=<Z 0>		
	A (<B>,0C,D)A (<OM]V G!,>
	$SYMVL=GA=<Z .SYMVL>		
	G`A (<B>,.SYMVLC,D)B>,.SYMVLC,R{S 9)
	$TCONF=Y=<Z F1>		
	A (<B>,F1C,D) (<R5d  a1:
	$TFN1==<Z .FBSS1>		
	A  (<B>,.FBSS1C,D)B>,.FBSS1C,R5d@ q1S
	$TFN2==<Z .FBSS2>		
	A0 (<B>,.FBSS2C,D)B>,.FBSS2C,RMXt SI
	$TIMCHNSi==<Z 2>		
	A (<B>,2C,D)A (<RMXw i*
	$TIMCNT	==<Z JOBRTL>		
	(A (<B>,JOBRTLC,D)B>,JOBRTLCRMYY Qy
	$TIMFRKR==<Z 2>		
	A (<B>,2C,D)A (<RMZW Ra
	$TIMJOBS==<Z 2>		
	A (<B>,2C,D)A (<RMZw T1%
	$TIMKNLTQ==<Z 3>		
	A (<B>,3C,D)A (<RM[ P1
	$TIMLNKPQ==<Z 0>		
	A (<B>,0C,D)A (<RM] Q
	$TIMTIMQ9==<Z 1>		
	A (<B>,1C,D)A (<Rn	S ^)%t
	$TMPFF=^I=<Z F>		
	A (<B>,FC,D)A (<Rn
	$TMPTF=t)=<Z F>		
	A (<B>,FC,D)A (<SXr -
	$TRMCD=9=<Z FKINT>		
	AX (<B>,FKINTC,D)B>,FKINTC,DSXw 9=
	$TRMCODY==<Z >		
	A (<B>,C,D)A (<Sls K!$\
	$TRNSF=KA=<Z STS>		
	A (<B>,STSC,D)(Sd  i1B
	$TSN1==	<Z .FBSS1>		
	A( (<B>,.FBSS1C,D)B>,.FBSS1C,Sd@ y1[
	$TSN2==<Z .FBSS2>		
	A8 (<B>,.FBSS2C,D)B>,.FBSS2C,VuI7 P9-
	$UNLEN=PY=<Z 0>		
	A (<B>,0C,D)A (<VuJs z	'R
	$UNLKF=z)=<Z F1>		
	A (<B>,F1C,D) (<Vv: Q!-


	$UNSHR=QA=<Z 1>		
	A (<B>,1C,D)A (<VvN8 OY,
	$UNTYP=Oy=<Z 0>		
	A (<B>,0C,D)A (<Vvh6 R	-
	$UNVAL=R)=<Z 2>		
	A (<B>,2C,D)A (<W

hw 5a#0
	$UQFCN=6=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLEN=7I=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLJI=6i=<Z 0>		
	A(<B>,0C,D)A (<W
	$UQLNK=81=<Z 1>		
	A (<B>,1C,D)A (<W)x 8
	$USRGP=1=<Z 2>		
	A (<B>,2C,D)A (<W+V )7|
	$USRNM=I=<Z 2>		
	A (<B>,2C,D)A (<Z.)@ lI&f
	$VERF==li<Z F>		
	A (<B>,FC,D)A (<BZ.,s 
I(V
	$VERSF=
i=<Z F1>		
	A (<B>,F1C,D) (<Z.- qi'
	$VERTF=r	=<Z F>		
	A (<B>,FC,D)A (<^tI@ IA$N
	$WNDF==Ia<Z STS>		
	A (<B>,STSC,D)(<_I@ >#s
	$WRTF==>1<Z STS>		
	A (<B>,STSC,D)(<bI@ ?#z
	$XCTF==?!<Z STS>		
	A (<B>,STSC,D)(<b<r ?!~
	$XGAGE=?A=<Z @CST0X>		
	?`A (<B>,@CST0XC,D)B>,@CST0XC,cH: {!7\
	$XPDAT={A=<Z 1>		
	A (<B>,1C,D)A (<cH3 O)$|
	$XQTAF=OI=<Z STS>		
	A (<B>,STSC,D)(8u{P :P :5I`Q :ex`P(:ez`P :n:`P :|i@P :}IP ;0P ;,L u9
	..TSIZ u1(..PST,C)
	.CASuPE ..PST,<<
	  XCupTU [MOVEM A,B]>v,<
	  XCTU [HRRMv0 A,B]>,<
	  XCvPTU [HRLM A,B]>,vp<
	  XCTBMU [DPBw A,[POINTR (B,C)]]>>NTR (B,;-I qq
	..TSIZ r(..PST,C)
	.CASr0E ..PST,<<
	  XCrPTU [MOVE A,B]>,rp<
	  XCTU [HRRZ sA,B]>,<
	  XCTs0U [HLRZ A,B]>,<sP
	  XCTBMU [LDB spA,[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 I8,
	.CKLC2 (A)
	.CKLC2 ]Hi 	88
   IFB <)B>,<PRINTX % DatHa item A in BUG'hTYP TAG has no descriptor.>
    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