PDP-10 Archive: tables.unv from BB-H580C-SB

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 /i~	AK%A==<POINT 1,B-1,C>C,u +v	AK%A==<P.aOINT D-C+1,B-1,D>D-C+1,B-1C,v;2 0)	AK%A==AK%B	AK%A==AKC,v|R 0i	AK%A==B-1	AK%A==BC/$!1 E),
		XLIST
		AKTB.C
		LIST
KTB.C
		LISTC/$#Q f~>

	RADIXf 	10

IFN ANS74,f@<
	D.PNTR	AKTTABf`,AK

	AK.ITM	FLgK,1,1,17
	AK.ITMg 	DLK,1,18,35

	g@AK.FLG	DUP,2,0
>g`

	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 -h	CD%A==<POINT 1,B-1,C>Gu i)	CD%A==<P%OINT D-C+1,B-1,D>D-C+1,B-1Gv;2 -Al	CD%A==CD%B	CD%A==CDGv|R .p	CD%A==B-1	CD%A==BG$!1 DI&
		XLIST
		CDTB.C
		LIST
DTB.C
		LISTG$#Q ` ~ 

	RADIX`@	10

	D.PNTR	CD``TAB,CD

	CD.ITMa	NAM,1,3,17
	CD.a ITM	SNL,1,18,35
a@
	CD.FLG	OUT,2,0a`
	CD.ITM	INT,2,0b,1
	CD.ITM	LIN,2b ,16,28	;LINE NUMBb@ER

	CD.ITM	RDLb`,3,0,17

	CD.ITcM	DC,6,0,17

IFc N ANS74,<
	CD.ITc@M	FDL,9,0,17
	CDc`.ITM	DUP,9,18,35
>
	RADIX	8

>
	RADIX	8

G<,H:Q $HG<-h6Q $<G<-mVQ HG<tk )r	CO%A==<POINT 1,B-1,C>G<u 1m	CO%A==<PYOINT D-C+1,B-1,D>D-C+1,B-1G<v;2 iv	CO%A==CO%B	CO%A==COG<v|R )z	CO%A==B-1	CO%A==BG?$!1 @i
		XLIST
		COTB.C
		LIST
OTB.C
		LISTG?$#Q I`|Z

	RADIXJ	10

	D.PNTR COJ NTAB,CO

	CO.ITJ@M	NAM,1,3,17

	J`CO.ITM	DAT,2,0,17K
	CO.ITM	NVL,2,1K 8,35

	RADIX	8



	RADIX	8!B
	XLIST

	DEFINE B.ITM A(ITMID,WRDNO,LFTBaIT,RTBIT),<
		XLIST
B.'ITMID::	 B%'ITMID+<TA>B17@
		LIST
	>	

`	DEFINE B.FLG (FLGID,WRDNO,BITNO) ,<
		XLIST
		B@.ITM	FLGID,WRDNO,`BITNO,BITNO
		LIST
	>	

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

	D EFINE	B.WRD	(ITM`ID,WRDNO)<
		XLIST
		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 y	DA%A==<POINT 1,B-1,C>Iu 	ad	DA%A==<P

AOINT D-C+1,B-1,D>D-C+1,B-1Iv;2 9	DA%A==DA%B	DA%A==DAIv|R y	DA%A==B-1	DA%A==BI$!1 >Iv
		XLIST
		DATB.C
		LIST
ATB.C
		LISTI$#Q 1 |

	RADIX1@	10

	D.PNTR	DA1`TTAB,DA

	DA.IT2M	NAM,1,3,17
	DA2 .ITM	SNL,1,18,35

	DA.ITM	VAL,2,2`0,17
	DA.SME	ARG3,VAL
	DA.ITM	LOC3 ,2,18,35

	DA.I3@TM	POP,3,0,17
	D3`A.SME	BRO,POP
	D4A.ITM	SON,3,18,354 

	DA.ITM	LVL,44@,0,5
	DA.ITM	RES4`,4,6,11
	DA.FLG	5LPC,4,12
	DA.FLG5 	RBE,4,13
	DA.IT5@M	USG,4,14,17
	D5`A.ITM	RPW,4,18,356

	DA.ITM	CLA,56 ,0,1
	DA.FLG	SYL6@,5,2
	DA.FLG	SYR6`,5,3
	DA.FLG	SGN7,5,4
	DA.FLG	BWZ7 ,5,5
	DA.FLG	SUB7@,5,6
	DA.FLG	EDT7`,5,7
	DA.FLG	FAL8,5,8
	DA.FLG	DEF8 ,5,9
	DA.FLG	RBS8@,5,10
	DA.FLG	FA8`K,5,11
	DA.FLG	R9DS,5,12
	DA.FLG	9 SCT,5,13
	DA.FLG9@	JST,5,14
	DA.FL9`G	SSC,5,15
	DA.F:LG	LSC,5,16
	DA.: ITM	SCF,5,15,16
:@	DA.FLG	DLL,5,17
	DA.FLG	ERR,5,18;
	DA.FLG	IDX,5,1; 9
	DA.FLG	RDF,5,;@20
	DA.FLG	PIC,5;`,21
	DA.FLG	DFS,<5,22
	DA.FLG	DRC< ,5,23
IFN ANS68,<@<
	DA.FLG	LRC,5,<`24
>
IFN ANS74,=<
	DA.FLG	DEB,5,= 24
>
	DA.FLG	SL=@L,5,25
	DA.FLG	P=`WA,5,26
	DA.FLG	>VHL,5,27
	DA.FLG> 	RDH,5,28
	DA.FL>@G	LKS,5,29
	DA.F>`LG	DPR,5,30
	DA.?ITM	NDP,5,31,35
? 
	DA.ITM	EXS,6,0?@,17
	DA.ITM	INS,?`6,18,35

	DA.IT@M	NOC,7,0,14
	DA@ .FLG	OCC,7,15
	D@@A.ITM	LN,7,16,28
	DA.ITM	CP,7,29,A35
	DA.ITM	LNC,7A ,16,35

	DA.ITMA@	OCH,8,0,17
	DA.A`ITM	DEP,8,18,35
B
	DA.ITM	DCR,9,0B ,8
	DA.ITM	KEY,9B@,9,17
	DA.ITM	XBB`Y,9,18,35

	DA.CITM	FSC,10,6,11

	RADIX	8


I,WQ "I,H:Q $DI,M8Q <I-Q FI-K@Q $4I.

VQ HItk 7i>	DB%A==<POINT 1,B-1,C>Iu 3At	DB%A==<P.AOINT D-C+1,B-1,D>D-C+1,B-1Iv;2 8)B	DB%A==DB%B	DB%A==DBIv|R 8iF	DB%A==B-1	DB%A==BI$!1 H)D
		XLIST
		DBTB.C
		LIST
BTB.C
		LISTI$#Q h ~V

	RADIXh@	10

IFN ANS74,h`<
	D.PNTR	DEBTABi,DB

	DB.ITM	DAi T,1,1,17
	DB.FLGi@	ARO,1,18
	DB.ITi`M	DUP,1,21,35

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

>
	RADIX	8K`,86Q >K`,;ZQ $

K`,[ZQ @K`-Q HK`-RQ DK`-h6Q $<K`-lYQ FK`.
2Q BK`tk qG	EX%A==<POINT 1,B-1,C>K`u Y#	EX%A==<P9OINT D-C+1,B-1,D>D-C+1,B-1K`v;2 1K	EX%A==EX%B	EX%A==EXK`v|R qO	EX%A==B-1	EX%A==BKc$!1 ?)|
		XLIST
		EXTB.C
		LIST
XTB.C
		LISTKc$#Q C@|2

	RADIXC`	10

	D.PNTR	EXDTTAB,EX

	EX.ITD M	NAM,1,3,17

	D@EX.FLG	NRS,2,0
	D`EX.FLG	IND,2,1
	EEX.FLG	PID,2,2
	E EX.FLG	ENT,2,3
	E@EX.FLG	CAL,2,4
	E`EX.ITM	CNT,2,15,1F7
	EX.ITM	HLD,2,F 18,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 X	FI%A==<POINT 1,B-1,C>M$u 
!T	FI%A==<P
AOINT D-C+1,B-1,D>D-C+1,B-1M$v;2 A\	FI%A==FI%B	FI%A==FIM$v|R

`	FI%A==B-1	FI%A==BM'$!1 =ip
		XLIST
		FITB.C
		LIST
ITB.C
		LISTM'$#Q @{

	RADIX`	10

	D.PNTR	FILTAB,FI

	FI.IT M	NAM,1,3,17

	@FI.FLG	MLT,2,0
	`FI.ITM	RCT,2,2,17
	FI.ITM	OFT,2,1 8,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.ITM	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.FL% G	DFR,16,9
	FI.F%@LG	BM,16,10
	FI.%`FLG	CKP,16,11
	F&I.FLG	AKS,16,12
& 	FI.FLG	KYE,16,13&@
	FI.ITM	LOC,16,&`18,35

	FI.ITM	'SKY,17,0,17
	FI.' ITM	RKY,17,18,35

IFN ANS74,<
	'`FI.FLG	RLC,18,0
(>
	FI.ITM	BLF,18( ,4,15
IFN ANS74,(@<
	FI.ITM	ALN,18(`,16,28
	FI.ITM	A)LC,18,16,35
	FI.) ITM	ACP,18,29,35
>

	FI.ITM	VPP)`,19,0,17
	FI.ITM*	RPG,19,18,35

* 	FI.ITM	OWA,20,0,*@8
	FI.ITM	OTA,20*`,9,17
	FI.ITM	RT+C,20,18,35
	FI.S+ ME	SPT,RTC

	FI+@.ITM	PFS,21,0,17
	FI.ITM	PEN,21,1,8,35

	FI.ITM	P, AC,22,0,17
	FI.I,@TM	PIV,22,18,35
,`
	FI.ITM	PBN,23,-0,17
	FI.ITM	PRN- ,23,18,35

	FI.-@ITM	PFN,24,0,17
-`	FI.ITM	PFT,24,18.,35

IFN ANS74,. <
	FI.ITM	CKB,25.@,0,17
	FI.ITM	CK.`A,25,18,35
>

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

	FI.ITM	NUM,270@,0,17
;	FI.ITM	X0`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 &1	FL%A==<POINT 1,B-1,C>M0u %1	FL%A==<P 	OINT D-C+1,B-1,D>D-C+1,B-1M0v;2 &Q5	FL%A==FL%B	FL%A==FLM0v|R '9	FL%A==B-1	FL%A==BM3$!1 C	
		XLIST
		FLTB.C
		LIST
LTB.C
		LISTM3$#Q S}B

	RADIXS 	10

	D.PNTR	FLS@OTAB,FL

	FL.FLS`G	PND,1,0
	FL.FLTG	SPF,1,1
	FL.FLT G	OPF,1,2
	FL.FLT@G	SAL,1,3
	FL.FLT`G	OAL,1,4
	FL.FLUG	OGO,1,5
	FL.FLU G	OEN,1,6
IFN ANU@S74,<
	FL.FLG	DEU`B,1,7
>
	FL.FLGV	QUA,1,16
	FL.FLV G	RDC,1,17
	FL.IV@TM	PRO,1,18,35
V`
	FL.ITM	NAM,2,1,W15
	FL.ITM	NLC,2W ,1,35
	FL.ITM	LNW@,2,16,28
	FL.ITMW`	LNC,2,16,35
	FLX.ITM	CP,2,29,35
X 	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 P	HL%A==<P
OINT D-C+1,B-1,D>D-C+1,B-1Q0v;2 !!
	HL%A==HL%B	HL%A==HLQ0v|R !a	HL%A==B-1	HL%A==BQ3$!1 AI
		XLIST
		HLTB.C
		LIST
LTB.C
		LISTQ3$#Q K`}

	RADIXL	10

	D.PNTR HLL DTAB,HL

	HL.ITL@M	NAM,1,1,15
	HLL`.ITM	LNC,1,16,35
	HL.ITM	LN,1,16,M 28
	HL.ITM	CP,1,M@29,35
	HL.ITM	RDM`,1,1,17	; [415] RND LINK FOR TYPE 1N 4
	HL.ITM	CID,1,N@18,35	; [415] CIDN` LEVEL FOR TYPE 1O4

	HL.ITM	COD,O 2,0,8
	HL.ITM	QAO@L,2,9,17
	HL.ITMO`	LNK,2,18,35
	HLP.ITM	FCD,2,0,8;	;P FULL CODE

	RADIX	8



	RADY$,QY8Y$,hqQHY$,iqQ4Y$-ZQ2Y$-htQ$Y$-kQA6Y$.

aOINT D-C+1,B-1,D>D-C+1,B-1Y$v;2 a	LI%A==LI%B	LI%A==LIY$v|R Qe	LI%A==B-1	LI%A==BY'$!1 @	
		XLIST
		LITB.C
		LIST
ITB.C
		LISTY'$#Q F`|J

	RADIXG	10

	D.PNTR	LIG TTAB,LI

	LI.FLG@G	PUR,1,6
	LI.FLG`G	ALL,1,7
	LI.FLHG	NLT,1,8
	LI.FLH G	FGC,1,9
	LI.FLH@G	INT,1,10
	LI.IH`TM	NCH,1,11,17
	ILI.ITM	FCC,1,18,3I 5

	RADIX	8



	RADIX	8

[;$#Q d@~,

	RADIXd`	10

	D.PNTR	MNeTAB,MN

	MN.ITMe 	NAM,1,3,17
	MN.e@ITM	SNL,1,18,35

	RADIX	8


]2N= A4NLIST1	A6NLIST1	A]2N= >
		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/<P(AOINT D-C+1,B-1,D>D-C+1,B-1aHv;2 )yO	PR%A==PR%B	PR%A==PRaHv|R *9S	PR%A==B-1	PR%A==BaK$!1 Ci 
		XLIST
		PRTB.C
		LIST
RTB.C
		LISTaK$#Q X`}~

	RADIXY	10

	D.PNTR	PRY OTAB,PR

	PR.ITY@M	NAM,1,3,17
	PRY`.ITM	SNL,1,18,35

	PR.ITM	LSC,2,Z 0,17
	PR.ITM	GNWZ@,2,0,17
	PR.ITM	Z`PRF,2,18,35

	P[R.ITM	AOB,3,0,17
	PR.ITM	PRI,3,18[@,24
	PR.FLG	SEC,[`3,25
	PR.FLG	EXR\,3,26
	PR.FLG	DE\ F,3,27
	PR.FLG	A\@LT,3,28
	PR.FLG	\`ARS,3,29
	PR.FLG]	ANR,3,30
	PR.FL] G	RFD,3,31
	PR.F]@LG	DFD,3,32
	PR.]`FLG	MDF,3,33
	PR^.FLG	TUT,3,34

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

IFN ANS7_4,<
	PR.WRD	DUP,_ 5
	PR.ITM	DEB,5,_@0,17
	PR.ITM	SFI_`,5,18,35
>

	RADIX	8



	Re8* Q $He8*e@Q He8tk :9S	RN%A==<POINT 1,B-1,C>e8u 4	RN%A==<P3aOINT D-C+1,B-1,D>D-C+1,B-1e8v;2 :yW	RN%A==RN%B	RN%A==RNe8v|R ;9[	RN%A==B-1	RN%A==Be;$!1 I	J
		XLIST
		RNTB.C
		LIST
NTB.C
		LISTe;$#Q k ~b
	RADIX	1k@0
	D.PNTR	RENTABk`,RN
	RN.ITM	01,1l,0,17
	RN.ITM	66l ,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 1I

	RW%A==<POINT 1,B-1,C>e\u *Y
	RW%A==<P1)OINT D-C+1,B-1,D>D-C+1,B-1e\v;2 2!	RW%A==RW%B	RW%A==RWe\v|R 2a	RW%A==B-1	RW%A==Be_$!0 F	2
		XLIST
		RWTB.A
		LIST
WTB.A
		LISTe_$!1 Fi8
		XLIST
		RWTB.B
		LIST
WTB.B
		LISTe_$!1 GI>
		XLIST
		RWTB.C
		LIST
WTB.C
		LISTe_$#P l`~n

	RADIXm	10

	D.PNTR RPm WTAB,RW


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

	RADIX	8


e_$#Q n!

	RADIXnA	10

	D.PNTR	RPn`WTAB,RW

	RW.IToM	SAM,1,18,35

o 	RW.ITM	BRO,2,0,1o@5
	RW.ITM	LN,2,1o`6,28
	RW.ITM	CP,p2,29,35
	RW.ITM	p LNC,2,16,35

	Rp@W.ITM	FIL,3,0,17
	RW.ITM	FGP,3,18q,35

	RW.ITM	LCq ,4,0,17
	RW.ITM	q@PC,4,18,35

	RWq`.ITM	PHL,5,0,8
	rRW.ITM	CFL,5,9,17r 
	RW.ITM	FDE,5,1r@8,26
	RW.ITM	LDEr`,5,27,35

	RW.IsTM	PAG,6,0,8
	RWs .ITM	RWT,6,18,35

	RW.ITM	RHR,7,s`0,17
	RW.ITM	RFRt,7,18,35

	RW.It TM	PHR,8,0,17
	Rt@W.ITM	PFR,8,18,35t`

	RW.ITM	GIR,9u,0,17
	RW.ITM	COu D,9,18,35

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

	RW.ITM	BKv T,11,0,17
	RW.ITv@M	FBT,11,18,35
v`

	

	RW.ITM	RwDL,1,3,17
	RW.SMw E	DAT,SAM

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

	RW.ITMy	LIN,3,0,8
	RW.Iy TM	COL,3,9,17
	Ry@W.ITM	NXT,3,18,26y`

	RW.SME	RES,LzC
	RW.SME	SLK,PCz 

	RW.ITM	UPN,5z@,0,17
	RW.ITM	USz`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 

	RWTB.A
	RWTB.B

.kL,;ZQ $0kL.

WQ HkL.N8Q 0$kL/	US%A==<POINT 1,B-1,C>kLu "!	US%A==<P"AOINT D-C+1,B-1,D>D-C+1,B-1kLv;2 $!	US%A==US%B	US%A==USkLv|R $Q%	US%A==B-1	US%A==BkO$!1 B)
		XLIST
		USTB.C
		LIST
STB.C
		LISTkO$#Q P`}

	RADIXQ	10

	D.PNTR	USQ ETAB,US

	US.ITQ@M	TYP,1,3,11
	USQ`.FLG	XTR,1,17
	URS.ITM	PRO,1,18,35R 

	US.ITM	CNT,2R@,6,17

	RADIX	8



	RADIX	8S@P >}{woP