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.