Google
 

Trailing-Edge - PDP-10 Archives - BB-H506E-SM - cobol/build/tables.unv
There are 15 other files named tables.unv in the archive. Click here to see a list.
x
,5D@P C,,KQ HC,,M8Q FC,,kQ $DC,tk 5s)	AK%A==<POINT 1,B-1,C>C,u 0@s 	AK%A==<P4OINT D-C+1,B-1,D>D-C+1,B-1C,v;2 5Ps-	AK%A==AK%B	AK%A==AKC,v|R 6s1	AK%A==B-1	AK%A==BC/$!1 JXtW
		XLIST
		AKTB.C
		LIST
KTB.C
		LISTC/$#Q 

	RADIX

IFN ANS74,
	D.PNTR	AKTTAB

	AK.ITM	FL
	AK.ITM1,18,35

	HAK.FLG	DUP,2,0
>h

	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 2(s	CD%A==<POINT 1,B-1,C>Gu %rS	CD%A==<P*8OINT D-C+1,B-1,D>D-C+1,B-1Gv;2 2hs	CD%A==CD%B	CD%A==CDGv|R 3(s	CD%A==B-1	CD%A==BG$!1 IxtQ
		XLIST
		CDTB.C
		LIST
DTB.C
		LISTG$#Q 

	RADIX

	D.PNTR	CD

	CD.ITM1,3,17
	CD.M	SNL,1,18,35
fH
	CD.FLG	OUT,2,0
	CD.ITM	INT,2,0
	CD.ITM	LIN,2E NUMB

	CD.ITM	RDL

	CD.IT,6,0,17

IFN ANS74,<
	CD.ITL,9,0,17
	CDITM	DUP,9,18,35
>
	RADIX	8

>
	RADIX	8

G<,H:Q $HG<-h6Q $<G<-mVQ HG<tk #Pr	CO%A==<POINT 1,B-1,C>G<u Xr	CO%A==<P#OINT D-C+1,B-1,D>D-C+1,B-1G<v;2 $r!	CO%A==CO%B	CO%A==COG<v|R $Pr%	CO%A==B-1	CO%A==BG?$!1 Ft3
		XLIST
		COTB.C
		LIST
OTB.C
		LISTG?$#Q 

	RADIX

	D.PNTRCCO

	CO.ITM,1,3,17

	hCO.ITM	DAT,2,0,17
	CO.ITM	NVL,2,1

	RADIX	8



	RADIX	8Hpl
	XLIST
(
	DEFINE B.ITM h(ITMID,WRDNO,LFTBIT,RTBIT),<
		XL(IST
B.'ITMID::	HB%'ITMID+<TA>B17h
		LIST
	>	

	DEFINE B.FLG (F(LGID,WRDNO,BITNO)H,<
		XLIST
		Bh.ITM	FLGID,WRDNO,	BITNO,BITNO
		LI	(ST
	>	

	DEFIN	HE	B.SME	(ID1,ID2	h)<
		XLIST
		B
.'ID1==:B.'ID2

(		LIST
	>	

	D
HEFINE	B.WRD	(ITMID,WRDNO)<
		XLI
		B.'ITMID==
		LIST
	>	

	LIST
I,SQ $HI,,WQ $HI,-}Q <I,;Q DI,<Q I,HyQ 4(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  qB	DA%A==<POINT 1,B-1,C>Iu q	DA%A==<PhOINT D-C+1,B-1,D>D-C+1,B-1Iv;2 `qF	DA%A==DA%B	DA%A==DAIv|R  qJ	DA%A==B-1	DA%A==BI$!1 Cxt!
		XLIST
		DATB.C
		LIST
ATB.C
		LISTI$#Q 

	RADIX

	D.PNTR	DA

	DA.ITM,1,3,17
	DAITM	SNL,1,18,35

	DA.ITM	VAL,2,
	DA.SME	ARG
	DA.ITM	LOC

	DA.IPOP,3,0,17
	DA.SME	BRO,POP
	DA.ITM	SON,3,18,35

	DA.ITM	LVL,4
	DA.ITM	RES
	DA.FLG	12
	DA.FLG4,13
	DA.ITG,4,14,17
	DA.ITM	RPW,4,18,35

	DA.ITM	CLA,5
	DA.FLG	SYL
	DA.FLG	SYR
	DA.FLG	SGN
	DA.FLG	BWZ
	DA.FLG	SUB
	DA.FLG	EDT
	DA.FLG	FAL
	DA.FLG	DEF
	DA.FLG	RBS
	DA.FLG	FA
	DA.FLG	R
	DA.FLG	13
	DA.FLG5,14
	DA.FLC,5,15
	DA.FLSC,5,16
	DA.M	SCF,5,15,16
>(	DA.FLG	DLL,5,17
	DA.FLG	ERR,5,18
	DA.FLG	IDX,5,1
	DA.FLG	RDF,5,
	DA.FLG	PIC,5
	DA.FLG	DFS,
	DA.FLG	DRC
IFN ANS68,
	DA.FLG	LRC,5,
>
IFN ANS74,
	DA.FLG	DEB,5,
>
	DA.FLG	SL
	DA.FLG	P
	DA.FLG	27
	DA.FLG5,28
	DA.FLS,5,29
	DA.FDPR,5,30
	DA.M	NDP,5,31,35
C
	DA.ITM	EXS,6,0
	DA.ITM	INS,

	DA.ITC,7,0,14
	DAFLG	OCC,7,15
	DA.ITM	LN,7,16,28
	DA.ITM	CP,7,29,
	DA.ITM	LNC,7

	DA.ITM8,0,17
	DA.M	DEP,8,18,35
EhIFE ANS74,<
	DA.M	DCR,9,0,8
	DA.ITM	KEY,9,9,17
>;[1346]
IFN7AN<
	DA.ITM	DC
	DA.ITM	10,17
>;[16]
	DA.ITM	XBY

	DA.IFSC,10,6,11

	RADIX	8


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

	RADIX

IFN ANS74,
	D.PNTR	DEBTAB

	DB.ITM	DA
	DB.FLG1,18
	DB.ITP,1,21,35

o	DB.FLG	IDP,2,0
o(	DB.ITM	LN,2,5,17
	DB.ITM	PRM,2,1
>
	RADIX	8

>
	RADIX	8K`,86Q >K`,;ZQ $
K`,[ZQ @K`-Q HK`-RQ DK`-h6Q $<K`-lYQ FK`.
2Q BK`tk qq	EX%A==<POINT 1,B-1,C>K`u qN	EX%A==<P`OINT D-C+1,B-1,D>D-C+1,B-1K`v;2 Xqu	EX%A==EX%B	EX%A==EXK`v|R qy	EX%A==B-1	EX%A==BKc$!1 DXt'
		XLIST
		EXTB.C
		LIST
XTB.C
		LISTKc$#Q 

	RADIX

	D.PNTR	EX

	EX.ITM,1,3,17

	HEX.FLG	NRS,2,0
	hEX.FLG	IND,2,1
	EX.FLG	PID,2,2
	(EX.FLG	ENT,2,3
	HEX.FLG	CAL,2,4
	hEX.ITM	CNT,2,15,1
	EX.ITM	HLD,2,

	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 (q	FI%A==<POINT 1,B-1,C>M$u Hp~	FI%A==<PhOINT D-C+1,B-1,D>D-C+1,B-1M$v;2 hq	FI%A==FI%B	FI%A==FIM$v|R (q
	FI%A==B-1	FI%A==BM'$!1 Ct
		XLIST
		FITB.C
		LIST
ITB.C
		LISTM'$#Q 

	RADIX

	D.PNTR	FI

	FI.ITM,1,3,17

	(FI.FLG	MLT,2,0
	HFI.ITM	RCT,2,2,17
	FI.ITM	OFT,2,1

	FI.ITM	F15
	FI.IT,3,16,28
	FIITM	CP,3,29,35
	FI.ITM	LNC,3,16,

	FI.ITM	LRS
	FI.ITM	12,17
	FI.M	VAL,4,18,35
(
IFN ANS68,<
	FI.ITM	NFL,5,0,4
h>
IFN ANS74,<
	FI.ITM	FAM,5,3,4
>
	FI.ITM	ERM,5
	FI.ITM	IRM
	FI.ITM	12,17
	FI.M	NXT,5,18,35
H
	FI.ITM	LBL,6,2
	FI.FLG	INO,6
	FI.FLG	OUO,6
	FI.FLG	IOO,6
	FI.FLG	ADV,6
	FI.FLG	DSD,6
	FI.FLG	VLR,6
	FI.FLG	RER,6
	FI.FLG	RRC,
	FI.FLG	FDD
	FI.FLG	OP
	FI.FLG	P
	FI.FLG	15
	FI.ITM6,16,17
	FISME	ORG,ACC
	FIITM	ACK,6,18,35

	FI.ITM	NBF,7,
	FI.ITM	MRS,
	FI.ITM	D,35

IFNANS74,<
	FI.ITM8,0,17
>
	(FI.ITM	SDL,8,18,3

	FI.ITM	VID,
	FI.ITM	V,35

	FIITM	SAL,10,0,17
	FI.SME	SBA,SAL
	FI.ITM	ERR,10,1

IFN<ANS68

	FI.ITM	BBR
	FI.ITM11,18,35

"	FI.ITM	ABR,12,0,
	FI.ITM	ABF,1

	FI.ITR,13,0,17
	FI.ITM	BEF,13,18,3

	FI.ITM	AER,
	FI.ITM	,18,35
>
$
IFN ANS74,<

$(	FI.ITM	LCP,11,18

	FI.ITM	LP7
	FI.ITA,12,18,35
%(
	FI.ITM	LAT,13,0
	FI.ITM	LAB,

	FI.IDEB,14,0,17
	(FI.ITM	LCI,14,18,
>

	FI.ITM	,0,17
	FI.M	LRL,15,18,35

	FI.FLG	DRC,16
	FI.FLG	ADR,1
	FI.FLG	RM2,
	FI.ITM	RD,
	FI.ITM	R7
	FI.FLG16,8
	FI.FLR,16,9
	FI.FBM,16,10
	FI.G	CKP,16,11
	FI.FLG	AKS,16,12
*	FI.FLG	KYE,16,13
	FI.ITM	LOC,16,

	FI.ITM	,0,17
	FI.M	RKY,17,18,35

IFN ANS74,<
	HFI.FLG	RLC,18,0
+h>
	FI.ITM	BLF,18
IFN ANS74,
	FI.ITM	ALN,18
	FI.ITM	A6,35
	FI.M	ACP,18,29,35
>

	FI.ITM	VPP
	FI.ITM19,18,35

.	FI.ITM	OWA,20,0,
	FI.ITM	OTA,20
	FI.ITM	RT35
	FI.SSPT,RTC

	FIITM	PFS,21,0,17
	FI.ITM	PEN,21,1

	FI.ITM	P,17
	FI.IPIV,22,18,35
0H
	FI.ITM	PBN,23,
	FI.ITM	PRN

	FI.M	PFN,24,0,17
1H	FI.ITM	PFT,24,18

IFN ANS74,
	FI.ITM	CKB,25
	FI.ITM	CK35
>

2h	FI.ITM	CRC,26,0,
	FI.ITM	FLN,26
	FI.ITM	F6,35
	FI.M	FCP,26,29,35

	FI.ITM	NUM,27
;	FI.ITM	X,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 +8r[	FL%A==<POINT 1,B-1,C>M0u *Xr+	FL%A==<P%0OINT D-C+1,B-1,D>D-C+1,B-1M0v;2 +xr_	FL%A==FL%B	FL%A==FLM0v|R ,8rc	FL%A==B-1	FL%A==BM3$!1 H8tE
		XLIST
		FLTB.C
		LIST
LTB.C
		LISTM3$#Q 

	RADIX

	D.PNTR	FL

	FL.FLD,1,0
	FL.FLF,1,1
	FL.FLF,1,2
	FL.FLL,1,3
	FL.FLL,1,4
	FL.FLO,1,5
	FL.FLN,1,6
IFN7AN<
	FL.FLG	DE
>
	FL.FLG1,16
	FL.FLC,1,17
	FL.IPRO,1,18,35
[h
	FL.ITM	NAM,2,1,
	FL.ITM	NLC,2
	FL.ITM	LN
	FL.ITM2,16,35
	FLITM	CP,2,29,35
](	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 &r0	HL%A==<POINT 1,B-1,C>Q0u "8pz	HL%A==<P(OINT D-C+1,B-1,D>D-C+1,B-1Q0v;2 &Hr4	HL%A==HL%B	HL%A==HLQ0v|R 'r8	HL%A==B-1	HL%A==BQ3$!1 Fxt9
		XLIST
		HLTB.C
		LIST
LTB.C
		LISTQ3$#Q 

	RADIX

	D.PNTRHHL

	HL.ITM,1,1,15
	HLITM	LNC,1,16,35
	HL.ITM	LN,1,16,
	HL.ITM	CP,1,
	HL.ITM	RD;R[415] R
	HL.ITM	CID,1,]PCID

	HL.ITM	COD,
	HL.ITM	QA
	HL.ITM2,18,35
	HLITM	FCD,2,0,8;	;

	RADIX	8



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

	RADIX

	D.PNTR	LI

	LI.FLR,1,6
	LI.FLL,1,7
	LI.FLT,1,8
	LI.FLC,1,9
	LI.FLT,1,10
	LI.INCH,1,11,17
	LI.ITM	FCC,1,18,3

	RADIX	8



	RADIX	8

[;$#Q

	RADIX

	D.PNTR	MN

	MN.ITM1,3,17
	MN.M	SNL,1,18,35

	RADIX	8


]2N= hp^NLIST1	A`NLIST1	A]2N= 
(ph
		DEFINE
H	A%B<
		XLIST
h
		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-hOINT D-C+1,B-1,D>D-C+1,B-1aHv;2 / rz	PR%A==PR%B	PR%A==PRaHv|R /`r~	PR%A==B-1	PR%A==BaK$!1 ItK
		XLIST
		PRTB.C
		LIST
RTB.C
		LISTaK$#Q 

	RADIX

	D.PNTR	PR

	PR.ITM,1,3,17
	PRITM	SNL,1,18,35

	PR.ITM	LSC,2,
	PR.ITM	GNW
	PR.ITM	18,35

	PR.ITM	AOB,3,0,17
	PR.ITM	PRI,3,18
	PR.FLG	SEC,
	PR.FLG	EXR
	PR.FLG	DE
	PR.FLG	A
	PR.FLG	29
	PR.FLG3,30
	PR.FLD,3,31
	PR.FDFD,3,32
	PR.G	MDF,3,33
	PRFLG	TUT,3,34

c(	PR.ITM	XTW,4,0,1
	PR.ITM	FLO,4,

IFN,ANS7
	PR.WRD	DUP,
	PR.ITM	DEB,5,
	PR.ITM	SFI
>

	RADIX	8



	Re8* Q $He8*e@Q He8tk ?hs~	RN%A==<POINT 1,B-1,C>e8u 9(sF	RN%A==<P8hOINT D-C+1,B-1,D>D-C+1,B-1e8v;2 @(t	RN%A==RN%B	RN%A==RNe8v|R @ht	RN%A==B-1	RN%A==Be;$!1 N8tu
		XLIST
		RNTB.C
		LIST
NTB.C
		LISTe;$#Q 

	RADIX	1
	D.PNTR	RENTAB
	RN.ITM	01,1
	RN.ITM	66
	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 $De\.)2Q $He\.)9Q $He\.)YQ He\.*Q 2e\.*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 6ps7	RW%A==<POINT 1,B-1,C>e\u 0s5	RW%A==<P6POINT D-C+1,B-1,D>D-C+1,B-1e\v;2 7Hs<	RW%A==RW%B	RW%A==RWe\v|R 8s@	RW%A==B-1	RW%A==Be_$!0 K8t]
		XLIST
		RWTB.A
		LIST
WTB.A
		LISTe_$!1 Ltc
		XLIST
		RWTB.B
		LIST
WTB.B
		LISTe_$!1 Lxti
		XLIST
		RWTB.C
		LIST
WTB.C
		LISTe$#P 

	RADIX

	D.PNTRRRP


	
rH
	RW.ITM	NAM,1,3,K

	RADIX	8


e($#Q

	RADIX

	D.PNTR	RP

	RW.ITM,1,18,35

t(	RW.ITM	BRO,2,0,1
	RW.ITM	LN,2,1
	RW.ITM	CP,
	RW.ITM	16,35

	RW.ITM	FIL,3,0,17
	RW.ITM	FGP,3,18

	RW.ITM	LC
	RW.ITM	8,35

	RWITM	PHL,5,0,8
	RW.ITM	CFL,5,9,17
	RW.ITM	FDE,5,1
	RW.ITM	LDE

	RW.IPAG,6,0,8
	RWFLG	RHL,6,10
	RW.ITM	RWT,6,18,35

	RW.ITM	RHR,7
	RW.ITM	RF5

	RW.M	PHR,8,0,17
	hRW.ITM	PFR,8,18,3

	RW.ITM	GIR,
	RW.ITM	C,35

	RWITM	CID,10,0,17
	RW.ITM	NCI,10,1

	RW.ITM	B,17
	RW.IFBT,11,18,35
|

	

	RW.ITM	1,17
	RW.SDAT,SAM

	RWITM	LCD,2,0,1
	RW.ITM	NLC,2,2,3
	RW.ITM	SCD,2,4,
	RW.ITM	TYP,2,
	RW.ITM	NSI,

	RW.ITN,3,0,8
	RW.M	COL,3,9,17
	hRW.ITM	NXT,3,18,2

	RW.SME	RES,
	RW.SME	SLK,P

	RW.ITM	UPN,
	RW.ITM	USE,5,18,35

	RW(.ITM	SUP,6,0,17
H
	;WORDS 7 THRU h25 ARE USED TO STORE THE SOURCE IT(EM
	; (ALLOW FORH 3 SUBSCRIPTS WIThH ADDITIVES)
	; (SEE P.MAC, SYMBO(L .RWSRC )

	
H
	RW.ITM	DCI,1,0h,17
	RW.SME	SAV,SAM

	RW.ITM	CH(G,2,0,17
	RW.FLGH	RSF,2,9
	RW.FLGh	RSI,2,10
	RW.ITM	RST,2,9,10
	RW(.FLG	GPI,2,11
	RHW.FLG	GEN,2,12
	hRW.FLG	FNC,2,13
	RW.FLG	RSU,2,16
	RW.SME	CFG,NSI

	RW.SME	REE,FIhL

	RADIX	8



	RADIX	8

e_$#Q (p2

	RWTB.A
	RWTB.B

.kL,;ZQ $0kL.
WQ HkL.N8Q 0$kL/	US%A==<POINT 1,B-1,C>kLu 'Hr>	US%A==<P'hOINT D-C+1,B-1,D>D-C+1,B-1kLv;2 )8rK	US%A==US%B	US%A==USkLv|R )xrO	US%A==B-1	US%A==BkO$!1 GXt?
		XLIST
		USTB.C
		LIST
STB.C
		LISTkO$#Q 

	RADIX

	D.PNTR	US

	US.ITP,1,3,11
	USFLG	XTR,1,17
	US.ITM	PRO,1,18,35

	US.ITM	CNT,2

	RADIX	8



	RADIX	8S@P >}{woP 
COPYRIGHT (C) 1985 BY DIGITAL EQUIPMENT CORPORATION, MAYNARD MASS.
ALL RIGHTS RESERVED.