Google
 

Trailing-Edge - PDP-10 Archives - BB-H580C-SB_1981 - tables.unv
There are 15 other files named tables.unv in the archive. Click here to see a list.
x
,5C@P C,,KQ HC,,M8Q FC,,kQ $DC,tk :IT	AK%A==<POINT 1,B-1,C>C,u 5yL	AK%A==<P9AOINT D-C+1,B-1,D>D-C+1,B-1C,v;2 ;	X	AK%A==AK%B	AK%A==AKC,v|R ;I\	AK%A==B-1	AK%A==BC/$!1 P	
		XLIST
		AKTB.C
		LIST
KTB.C
		LISTC/$#Q p`

	RADIXq	10

IFN ANS74,q <
	D.PNTR	AKTTABq@,AK

	AK.ITM	FLq`K,1,1,17
	AK.ITMr	DLK,1,18,35

	r AK.FLG	DUP,2,0
>r@

	RADIX	8



	RADIX	8

C;fP C;uP G,H`Q $HG,M8Q HG,iQ $HG-ZQ DG-J7Q 4G-h6Q $<G-}:Q FG.)Q $HG.;VQ HGtk 7a>	CD%A==<POINT 1,B-1,C>Gu *I	CD%A==<P/qOINT D-C+1,B-1,D>D-C+1,B-1Gv;2 8!B	CD%A==CD%B	CD%A==CDGv|R 8aF	CD%A==B-1	CD%A==BG$!1 O)|
		XLIST
		CDTB.C
		LIST
DTB.C
		LISTG$#Q k~v

	RADIXk 	10

	D.PNTR	CDk@TAB,CD

	CD.ITMk`	NAM,1,3,17
	CD.lITM	SNL,1,18,35
l 
	CD.FLG	OUT,2,0l@
	CD.ITM	INT,2,0l`,1
	CD.ITM	LIN,2m,16,28	;LINE NUMBm ER

	CD.ITM	RDLm@,3,0,17

	CD.ITm`M	DC,6,0,17

IFnN ANS74,<
	CD.ITn M	FDL,9,0,17
	CDn@.ITM	DUP,9,18,35
>
	RADIX	8

>
	RADIX	8

G<,H:Q $HG<-h6Q $<G<-mVQ HG<tk )	H	CO%A==<POINT 1,B-1,C>G<u %C	CO%A==<P(9OINT D-C+1,B-1,D>D-C+1,B-1G<v;2 )IL	CO%A==CO%B	CO%A==COG<v|R *	P	CO%A==B-1	CO%A==BG?$!1 KI^
		XLIST
		COTB.C
		LIST
OTB.C
		LISTG?$#Q T@}0

	RADIXT`	10

	D.PNTR COUNTAB,CO

	CO.ITU M	NAM,1,3,17

	U@CO.ITM	DAT,2,0,17U`
	CO.ITM	NVL,2,1V8,35

	RADIX	8



	RADIX	8

	XLIST
a
	DEFINE B.ITM 
!(ITMID,WRDNO,LFTB
AIT,RTBIT),<
		XL
`IST
B.'ITMID::	A>B17
		LIST
	>	

	DEFINEDB.FLGN(F,<
		XLIST
		B .ITM	FLGID,WRDNO,@BITNO,BITNO
		LI`ST
	>	

	DEFINE	B.SME	(ID1,ID2 )<
		XLIST
		B@.'ID1==:B.'ID2
`		LIST
	>	

	DEFINE	B.WRD	(ITM@ID,WRDNO)<
		XLI`ST
		B.'ITMID==:WRDNO-1
		LIST
	>	

	LIST
I,SQ $HI,,WQ $HI,-}Q <I,;Q DI,<Q I,HyQ 6$I,I1Q I,I3Q 4I,I8Q HI,IYQ I,KQ $I,LQ 
I,LQQ I,YQ 8I,\YQ "I,^Q $HI,h5Q 0I,h6Q 6I,lqQ 0I-Q  I-YQ HI-,zQ *I-9<Q $$I-JyQ 
I-K@Q 4I-KQQ PI-KqQ HI-LQ .I-LqQ &I-MVQ <I-h6Q $<I-iQ I-kqQ *<I-xqQ (I-xtQ $HI.
1Q I.xQ $HI.(YQ 2I.)Q I.)Q I.)Q .I.)9Q 0I.,Q HI.8sQ &I.8zQ ,I.9wQ >I.;Q I.;VQ HI.;wQ HI.<qQ (I.=1Q :I.>6Q BI.>9Q @I.\sQ $I.h6Q $HI.jQ I/\Q HItk Ym	DA%A==<POINT 1,B-1,C>Iu A:	DA%A==<P!OINT D-C+1,B-1,D>D-C+1,B-1Iv;2 q	DA%A==DA%B	DA%A==DAIv|R Yu	DA%A==B-1	DA%A==BI$!1 I)L
		XLIST
		DATB.C
		LIST
ATB.C
		LISTI$#Q <|n

	RADIX< 	10

	D.PNTR	DA<@TTAB,DA

	DA.IT<`M	NAM,1,3,17
	DA=.ITM	SNL,1,18,35

	DA.ITM	VAL,2,=@0,17
	DA.SME	ARG=`,VAL
	DA.ITM	LOC>,2,18,35

	DA.I> TM	POP,3,0,17
	D>@A.SME	BRO,POP
	D>`A.ITM	SON,3,18,35?

	DA.ITM	LVL,4? ,0,5
	DA.ITM	RES?@,4,6,11
	DA.FLG	?`LPC,4,12
	DA.FLG@	RBE,4,13
	DA.IT@ M	USG,4,14,17
	D@@A.ITM	RPW,4,18,35@`

	DA.ITM	CLA,5A,0,1
	DA.FLG	SYLA ,5,2
	DA.FLG	SYRA@,5,3
	DA.FLG	SGNA`,5,4
	DA.FLG	BWZB,5,5
	DA.FLG	SUBB ,5,6
	DA.FLG	EDTB@,5,7
	DA.FLG	FALB`,5,8
	DA.FLG	DEFC,5,9
	DA.FLG	RBSC ,5,10
	DA.FLG	FAC@K,5,11
	DA.FLG	RC`DS,5,12
	DA.FLG	DSCT,5,13
	DA.FLGD 	JST,5,14
	DA.FLD@G	SSC,5,15
	DA.FD`LG	LSC,5,16
	DA.EITM	SCF,5,15,16
E@	DA.FLG	DLL,5,17
	DA.FLG	ERR,5,18E`
	DA.FLG	IDX,5,1F9
	DA.FLG	RDF,5,F 20
	DA.FLG	PIC,5F@,21
	DA.FLG	DFS,F`5,22
	DA.FLG	DRCG,5,23
IFN ANS68,G <
	DA.FLG	LRC,5,G@24
>
IFN ANS74,G`<
	DA.FLG	DEB,5,H24
>
	DA.FLG	SLH L,5,25
	DA.FLG	PH@WA,5,26
	DA.FLG	H`VHL,5,27
	DA.FLGI	RDH,5,28
	DA.FLI G	LKS,5,29
	DA.FI@LG	DPR,5,30
	DA.I`ITM	NDP,5,31,35
J
	DA.ITM	EXS,6,0J ,17
	DA.ITM	INS,J@6,18,35

	DA.ITJ`M	NOC,7,0,14
	DAK.FLG	OCC,7,15
	DK A.ITM	LN,7,16,28
	DA.ITM	CP,7,29,K`35
	DA.ITM	LNC,7L,16,35

	DA.ITML 	OCH,8,0,17
	DA.L@ITM	DEP,8,18,35
L`
	DA.ITM	DCR,9,0M,8
	DA.ITM	KEY,9M ,9,17
	DA.ITM	XBM@Y,9,18,35

	DA.M`ITM	FSC,10,6,11

	RADIX	8


I,WQ "I,H:Q $DI,M8Q <I-Q FI-K@Q $4I.
VQ HItk BI	DB%A==<POINT 1,B-1,C>Iu >!J	DB%A==<P9!OINT D-C+1,B-1,D>D-C+1,B-1Iv;2 C		DB%A==DB%B	DB%A==DBIv|R CI	DB%A==B-1	DB%A==BI$!1 S	
		XLIST
		DBTB.C
		LIST
BTB.C
		LISTI$#Q s,

	RADIXs 	10

IFN ANS74,s@<
	D.PNTR	DEBTABs`,DB

	DB.ITM	DAtT,1,1,17
	DB.FLGt 	ARO,1,18
	DB.ITt@M	DUP,1,21,35

t`	DB.FLG	IDP,2,0
u	DB.ITM	LN,2,5,17u 
	DB.ITM	PRM,2,1u@8,35
>
	RADIX	8

>
	RADIX	8K`,86Q >K`,;ZQ $
K`,[ZQ @K`-Q HK`-RQ DK`-h6Q $<K`-lYQ FK`.
2Q BK`tk #Q	EX%A==<POINT 1,B-1,C>K`u 9y	EX%A==<POINT D-C+1,B-1,D>D-C+1,B-1K`v;2 $!	EX%A==EX%B	EX%A==EXK`v|R $Q%	EX%A==B-1	EX%A==BKc$!1 J	R
		XLIST
		EXTB.C
		LIST
XTB.C
		LISTKc$#Q N }

	RADIXN@	10

	D.PNTR	EXN`TTAB,EX

	EX.ITOM	NAM,1,3,17

	O EX.FLG	NRS,2,0
	O@EX.FLG	IND,2,1
	O`EX.FLG	PID,2,2
	PEX.FLG	ENT,2,3
	P EX.FLG	CAL,2,4
	P@EX.ITM	CNT,2,15,1P`7
	EX.ITM	HLD,2,Q18,35

	RADIX	8



	RADIX	8M$,qQ $M$,uQ HM$,xQ M$,Q DM$,Q 8M$,yQ .M$,Q PM$,Q $HM$,Q 4M$,+Q (0M$,+ Q 2M$,:pQ H
M$,:qQ $H
M$,:xQ 0M$,<Q M$,<QQ 8 
M$,I1Q $HM$,IYQ 4M$,LQQ FM$,LVQ HM$,LrQ 6M$,[ZQ 6M$,\VQ 8
M$,\YQ HM$,h6Q >M$,hYQ (@M$,hxQ 
M$,iQ .M$,kQ P
M$,kQ 4
M$-WQ >M$-wQ :M$-VQ 2
M$->2Q,M$-H1QHM$-H:Q,$HM$-HVQ$@M$-HtQ$HM$-HxQ<HM$-K@Q64M$-KQQ$PM$-KqQ HM$-LQ $HM$-LVQ HM$-LYQ 00M$-[Q FM$-\YQ $0M$-h6Q $<M$-hSQ <M$-iQ $M$-m6Q $H
M$.WQ $HM$.	7Q H
M$.	WQ $HM$.	YQ $H
M$.	ZQ HM$.
;Q H
M$.yQ $M$.
WQ HM$.
wQ *M$.(zQ $@M$.)Q <
M$.)9Q 2M$.*|Q HM$.+Q FM$.+)Q BM$.+9Q (M$.,Q 8M$.,Q H	M$.,QQ 0M$.-Q H	M$.86Q $HM$.8PQ $HM$.9Q HM$.:|Q $HM$.<Q H	M$.<PQ $HM$.h6Q HM$.iQ HM$.j2Q $HM$.kQ 4M$.lQ $H	M$.yPQ HM$tk a.	FI%A==<POINT 1,B-1,C>M$u *	FI%A==<P!OINT D-C+1,B-1,D>D-C+1,B-1M$v;2 !2	FI%A==FI%B	FI%A==FIM$v|R a6	FI%A==B-1	FI%A==BM'$!1 HIF
		XLIST
		FITB.C
		LIST
ITB.C
		LISTM'$#Q  {\

	RADIX@	10

	D.PNTR	FI`LTAB,FI

	FI.ITM	NAM,1,3,17

	 FI.FLG	MLT,2,0
	@FI.ITM	RCT,2,2,17`
	FI.ITM	OFT,2,18,35

	FI.ITM	F BS,3,0,15
	FI.IT@M	LN,3,16,28
	FI`.ITM	CP,3,29,35
	FI.ITM	LNC,3,16, 35

	FI.ITM	LRS@,4,0,11
	FI.ITM	`NDV,4,12,17
	FI.ITM	VAL,4,18,35
 
IFN ANS68,<
	F@I.ITM	NFL,5,0,4
`>
IFN ANS74,<
	FI.ITM	FAM,5,3,4
>
	FI.ITM	ERM,5@,5,7
	FI.ITM	IRM`,5,8,10
	FI.ITM	 POS,5,12,17
	FI.  ITM	NXT,5,18,35
 @
	FI.ITM	LBL,6,2 `,3
	FI.FLG	INO,6!,4
	FI.FLG	OUO,6! ,5
	FI.FLG	IOO,6!@,6
	FI.FLG	ADV,6!`,7
	FI.FLG	DSD,6",8
	FI.FLG	VLR,6" ,9
	FI.FLG	RER,6"@,10
	FI.FLG	RRC,"`6,11
	FI.FLG	FDD#,6,12
	FI.FLG	OP# T,6,13
	FI.FLG	P#@SN,6,14
	FI.FLG	#`RMS,6,15
	FI.ITM$	ACC,6,16,17
	FI$ .SME	ORG,ACC
	FI$@.ITM	ACK,6,18,35

	FI.ITM	NBF,7,%0,5
	FI.ITM	MRS,% 7,6,17
	FI.ITM	D%@RL,7,18,35

IFN%` ANS74,<
	FI.ITM&	ALK,8,0,17
>
	& FI.ITM	SDL,8,18,3&@5

	FI.ITM	VID,&`9,0,17
	FI.ITM	V'DW,9,18,35

	FI' .ITM	SAL,10,0,17
	FI.SME	SBA,SAL
	FI.ITM	ERR,10,1(8,35

IFN ANS68( ,<

	FI.ITM	BBR(@,11,0,17
	FI.ITM(`	BBF,11,18,35

)	FI.ITM	ABR,12,0,) 17
	FI.ITM	ABF,1)@2,18,35

	FI.IT)`M	BER,13,0,17
	F*I.ITM	BEF,13,18,3* 5

	FI.ITM	AER,*@14,0,17
	FI.ITM	*`AEF,14,18,35
>
+
IFN ANS74,<

+ 	FI.ITM	LCP,11,18+@,35

	FI.ITM	LP+`P,12,0,17
	FI.IT,M	WFA,12,18,35
, 
	FI.ITM	LAT,13,0,@,17
	FI.ITM	LAB,,`13,18,35

	FI.I-TM	DEB,14,0,17
	- FI.ITM	LCI,14,18,-@35
>

	FI.ITM	-`SRA,15,0,17
	FI..ITM	LRL,15,18,35

	FI.FLG	DRC,16.@,0
	FI.FLG	ADR,1.`6,1
	FI.FLG	RM2,/16,2
	FI.ITM	RD,/ 16,3,5
	FI.ITM	R/@P,16,6,7
	FI.FLG/`	ENT,16,8
	FI.FL0G	DFR,16,9
	FI.F0 LG	BM,16,10
	FI.0@FLG	CKP,16,11
	F0`I.FLG	AKS,16,12
1	FI.FLG	KYE,16,131 
	FI.ITM	LOC,16,1@18,35

	FI.ITM	1`SKY,17,0,17
	FI.2ITM	RKY,17,18,35

IFN ANS74,<
	2@FI.FLG	RLC,18,0
2`>
	FI.ITM	BLF,183,4,15
IFN ANS74,3 <
	FI.ITM	ALN,183@,16,28
	FI.ITM	A3`LC,18,16,35
	FI.4ITM	ACP,18,29,35
>

	FI.ITM	VPP4@,19,0,17
	FI.ITM4`	RPG,19,18,35

5	FI.ITM	OWA,20,0,5 8
	FI.ITM	OTA,205@,9,17
	FI.ITM	RT5`C,20,18,35
	FI.S6ME	SPT,RTC

	FI6 .ITM	PFS,21,0,17
	FI.ITM	PEN,21,16`8,35

	FI.ITM	P7AC,22,0,17
	FI.I7 TM	PIV,22,18,35
7@
	FI.ITM	PBN,23,7`0,17
	FI.ITM	PRN8,23,18,35

	FI.8 ITM	PFN,24,0,17
8@	FI.ITM	PFT,24,188`,35

IFN ANS74,9<
	FI.ITM	CKB,259 ,0,17
	FI.ITM	CK9@A,25,18,35
>

9`	FI.ITM	CRC,26,0,:7
	FI.ITM	FLN,26: ,16,28
	FI.ITM	F:@LC,26,16,35
	FI.:`ITM	FCP,26,29,35

	FI.ITM	NUM,27; ,0,17
;	FI.ITM	X;@XX,27,18,35

	RADIX	8



	RM0,<Q M0,I1Q 8M0-K@Q 4M0-KQQ PM0-h6Q (<M0-kQ 
M0-x6Q >M0-y7Q :M0-ywQ <M0-|Q BM0.RQ FM0.yQ M0.
WQ HM0.0Q &M0.)Q $M0.86Q @M0.<Q DM0tk 0q	FL%A==<POINT 1,B-1,C>M0u 0V	FL%A==<P*iOINT D-C+1,B-1,D>D-C+1,B-1M0v;2 11	FL%A==FL%B	FL%A==FLM0v|R 1q	FL%A==B-1	FL%A==BM3$!1 Mip
		XLIST
		FLTB.C
		LIST
LTB.C
		LISTM3$#Q ]`~

	RADIX^	10

	D.PNTR	FL^ OTAB,FL

	FL.FL^@G	PND,1,0
	FL.FL^`G	SPF,1,1
	FL.FL_G	OPF,1,2
	FL.FL_ G	SAL,1,3
	FL.FL_@G	OAL,1,4
	FL.FL_`G	OGO,1,5
	FL.FL`G	OEN,1,6
IFN AN` S74,<
	FL.FLG	DE`@B,1,7
>
	FL.FLG``	QUA,1,16
	FL.FLaG	RDC,1,17
	FL.Ia TM	PRO,1,18,35
a@
	FL.ITM	NAM,2,1,a`15
	FL.ITM	NLC,2b,1,35
	FL.ITM	LNb ,2,16,28
	FL.ITMb@	LNC,2,16,35
	FLb`.ITM	CP,2,29,35
c	FL.SME	POS,CP

	RADIX	8


Q0,:2Q HQ0,;rQ 6$Q0,<Q Q0,hrQ 6$Q0-K@Q 4Q0-KQQ PQ0-KUQ HQ0-h6Q (<Q0.6Q $$Q0.)Q $DQ0tk +A\	HL%A==<POINT 1,B-1,C>Q0u 'q&	HL%A==<PaOINT D-C+1,B-1,D>D-C+1,B-1Q0v;2 ,`	HL%A==HL%B	HL%A==HLQ0v|R ,Ad	HL%A==B-1	HL%A==BQ3$!1 L)d
		XLIST
		HLTB.C
		LIST
LTB.C
		LISTQ3$#Q V@}X

	RADIXV`	10

	D.PNTR HLWDTAB,HL

	HL.ITW M	NAM,1,1,15
	HLW@.ITM	LNC,1,16,35
	HL.ITM	LN,1,16,X28
	HL.ITM	CP,1,X 29,35
	HL.ITM	RDX@,1,1,17	; [415] RX`D LINK FOR TYPE 1Y4
	HL.ITM	CID,1,Y 18,35	; [415] CIDY@ LEVEL FOR TYPE 1Y`4

	HL.ITM	COD,Z2,0,8
	HL.ITM	QAZ L,2,9,17
	HL.ITMZ@	LNK,2,18,35
	HLZ`.ITM	FCD,2,0,8;	;[FULL CODE

	RADIX	8



	RADY$,QY8Y$,hqQHY$,iqQ4Y$-ZQ2Y$-htQ$Y$-kQA6Y$.T D-C+1,B-1,D>D-C+1,B-1Y$v;2 &q7	LI%A==LI%B	LI%A==LIY$v|R '1;	LI%A==B-1	LI%A==BY'$!1 JiX
		XLIST
		LITB.C
		LIST
ITB.C
		LISTY'$#Q Q@} 

	RADIXQ`	10

	D.PNTR	LIRTTAB,LI

	LI.FLR G	PUR,1,6
	LI.FLR@G	ALL,1,7
	LI.FLR`G	NLT,1,8
	LI.FLSG	FGC,1,9
	LI.FLS G	INT,1,10
	LI.IS@TM	NCH,1,11,17
	S`LI.ITM	FCC,1,18,3T5

	RADIX	8



	RADIX	8

[;$#Q o 

	RADIXo@	10

	D.PNTR	MNo`TAB,MN

	MN.ITMp	NAM,1,3,17
	MN.p ITM	SNL,1,18,35

	RADIX	8


]2N= !
NLIST1	A
NLIST1	A]2N= a
		DEFINE	A%B<
		XLIST
		A.B
		LIST
>	;END OF DEFINE A%'TPE.
FINEaH,Q aH,YQ 
aH,qQ $HaH,YQ 
aH,I1Q $HaH,I3Q aH,IRQ aH,M8P aH,^Q aH,kQ HaH,{[Q $HaH-LqQ $HaH-YQ aH-h6Q $<aH.
SQ HaH.
TQ aH.)RQ aH.91QRaH.9TQ HaH.;VQuHaH.M:QaH/<P3!OINT D-C+1,B-1,D>D-C+1,B-1aHv;2 4Y%	PR%A==PR%B	PR%A==PRaHv|R 5)	PR%A==B-1	PR%A==BaK$!1 NIv
		XLIST
		PRTB.C
		LIST
RTB.C
		LISTaK$#Q c@~T

	RADIXc`	10

	D.PNTR	PRdOTAB,PR

	PR.ITd M	NAM,1,3,17
	PRd@.ITM	SNL,1,18,35

	PR.ITM	LSC,2,e0,17
	PR.ITM	GNWe ,2,0,17
	PR.ITM	e@PRF,2,18,35

	Pe`R.ITM	AOB,3,0,17
	PR.ITM	PRI,3,18f ,24
	PR.FLG	SEC,f@3,25
	PR.FLG	EXRf`,3,26
	PR.FLG	DEgF,3,27
	PR.FLG	Ag LT,3,28
	PR.FLG	g@ARS,3,29
	PR.FLGg`	ANR,3,30
	PR.FLhG	RFD,3,31
	PR.Fh LG	DFD,3,32
	PR.h@FLG	MDF,3,33
	PRh`.FLG	TUT,3,34

i	PR.ITM	XTW,4,0,1i 7
	PR.ITM	FLO,4,i@18,35

IFN ANS7i`4,<
	PR.WRD	DUP,j5
	PR.ITM	DEB,5,j 0,17
	PR.ITM	SFIj@,5,18,35
>

	RADIX	8



	Re8* Q $He8*e@Q He8tk E)	RN%A==<POINT 1,B-1,C>e8u >at	RN%A==<P>AOINT D-C+1,B-1,D>D-C+1,B-1e8v;2 EY-	RN%A==RN%B	RN%A==RNe8v|R F1	RN%A==B-1	RN%A==Be;$!1 Si 
		XLIST
		RNTB.C
		LIST
NTB.C
		LISTe;$#Q v8
	RADIX	1v 0
	D.PNTR	RENTABv@,RN
	RN.ITM	01,1v`,0,17
	RN.ITM	66w,1,18,35
	RADIX 8
,35
	RADIX e\,*zQ $He\,,WQ (@e\,9SQ He\,9VQ $$e\,:Q $He\,:2Q $He\,;rQ He\,;vQ $$e\,<Q e\,H:Q He\,HtQ $He\,hZQ He\,iQ $e\,ixQ He\,j6Q $He\,kQQ ,e\,y7Q .e\,z9Q $He\,|Q 0e\-H`Q $He\-HrQ De\-IQ $e\-J7Q 6$e\-K@Q 4e\-KQQ Pe\-h6Q $<e\-htQ He\-kQ @e\-ltQ He\-nQ $e\.3Q 6$e\.`Q He\.	YQ He\.
Q 6$e\.
Q $He\.)Q $<e\.)2Q $He\.)9Q $He\.)YQ He\.*Q $He\.,sQ 4e\.,tQ 2e\.,zQ 2e\.,zQ &e\.-zQ He\.86Q He\.8;Q He\.8rQ <e\.;Q He\.=8Q $He\.N8Q 6
e\.\Q $He\.\rQ He\tk <)b	RW%A==<POINT 1,B-1,C>e\u 59`	RW%A==<P<	OINT D-C+1,B-1,D>D-C+1,B-1e\v;2 =h	RW%A==RW%B	RW%A==RWe\v|R =Al	RW%A==B-1	RW%A==Be_$!0 Pi
		XLIST
		RWTB.A
		LIST
WTB.A
		LISTe_$!1 QI
		XLIST
		RWTB.B
		LIST
WTB.B
		LISTe_$!1 R)
		XLIST
		RWTB.C
		LIST
WTB.C
		LISTe_$#P w@D

	RADIXw`	10

	D.PNTR RPxWTAB,RW


	
x 
	RW.ITM	NAM,1,3,x@17;	NAMTAB LINK

	RADIX	8


e_$#Q yZ

	RADIXy!	10

	D.PNTR	RPy@WTAB,RW

	RW.ITy`M	SAM,1,18,35

z	RW.ITM	BRO,2,0,1z 5
	RW.ITM	LN,2,1z@6,28
	RW.ITM	CP,z`2,29,35
	RW.ITM	{LNC,2,16,35

	R{ W.ITM	FIL,3,0,17
	RW.ITM	FGP,3,18{`,35

	RW.ITM	LC|,4,0,17
	RW.ITM	| PC,4,18,35

	RW|@.ITM	PHL,5,0,8
	|`RW.ITM	CFL,5,9,17}
	RW.ITM	FDE,5,1} 8,26
	RW.ITM	LDE}@,5,27,35

	RW.I}`TM	PAG,6,0,8
	RW~.ITM	RWT,6,18,35

	RW.ITM	RHR,7,~@0,17
	RW.ITM	RFR~`,7,18,35

	RW.ITM	PHR,8,0,17
	R W.ITM	PFR,8,18,35@

	RW.ITM	GIR,9`,0,17
	RW.ITM	COD,9,18,35

	RW. ITM	CID,10,0,17
@	RW.ITM	NCI,10,18`,35

	RW.ITM	BKT,11,0,17
	RW.IT M	FBT,11,18,35
@

	

	RW.ITM	R`DL,1,3,17
	RW.SME	DAT,SAM

	RW. ITM	LCD,2,0,1
	R@W.ITM	NLC,2,2,3
`	RW.ITM	SCD,2,4,5
	RW.ITM	TYP,2,6 ,8
	RW.ITM	NSI,2@,18,35

	RW.ITM`	LIN,3,0,8
	RW.ITM	COL,3,9,17
	R W.ITM	NXT,3,18,26@

	RW.SME	RES,L`C
	RW.SME	SLK,PC

	RW.ITM	UPN,5 ,0,17
	RW.ITM	US@E,5,18,35

	RW.`ITM	SUP,6,0,17

	;WORDS 7 THRU 2 5 ARE USED TO STO@RE THE SOURCE ITE`M
	; (ALLOW FOR 3 SUBSCRIPTS WITH  ADDITIVES)
	; (@SEE P.MAC, SYMBOL` .RWSRC )

	

	RW.ITM	DCI,1,0, 17
	RW.SME	SAV,S@AM

	RW.ITM	CHG`,2,0,17
	RW.FLG		RSF,2,9
	RW.FLG		 RSI,2,10
	RW.ITM	@	RST,2,9,10
	RW.	`FLG	GPI,2,11
	RW
.FLG	GEN,2,12
	R
 W.FLG	FNC,2,13
	
@RW.FLG	RSU,2,16

`	RW.SME	CFG,NSI

	RW.SME	REE,FIL 

	RADIX	8



	RADIX	8

e_$#Q a^

	RWTB.A
	RWTB.B

.kL,;ZQ $0kL.
WQ HkL.N8Q 0$kL/	US%A==<POINT 1,B-1,C>kLu -j	US%A==<P-!OINT D-C+1,B-1,D>D-C+1,B-1kLv;2 .qw	US%A==US%B	US%A==USkLv|R /1{	US%A==B-1	US%A==BkO$!1 M	j
		XLIST
		USTB.C
		LIST
STB.C
		LISTkO$#Q [@}j

	RADIX[`	10

	D.PNTR	US\ETAB,US

	US.IT\ M	TYP,1,3,11
	US\@.FLG	XTR,1,17
	U\`S.ITM	PRO,1,18,35]

	US.ITM	CNT,2] ,6,17

	RADIX	8



	RADIX	8S@P >}{woP