Trailing-Edge
-
PDP-10 Archives
-
decuslib10-04
-
43,50325/gtx.beg
There are no other files named gtx.beg in the archive.
! File: GTX.BEG
!
! This work was supported by the Advanced Research
! Projects Agency of the Office of the Secretary of
! Defense (F44620-73-C-0074) and is monitored by the
! Air Force Office of Scientific Research.
! File: GTX.BEG
!
! This work was supported by the Advanced Research
! Projects Agency of the Office of the Secretary of
! Defense (F44620-73-C-0074) and is monitored by the
! Air Force Office of Scientific Research.
!
!
!
! THIS IS THE BEGIN FILE FOR GT FIELDS
!
!
!
!--------------------------------------------------------------------
! GRAPH TABLE FIELDS.
MACRO
! ****** NOTE: ADDITIONAL BITS ARE DEFINED IN DTC.BEG
GTLDF =0,30,6$,
OCCF =0,24,6$,
GTHREAD =0,0,18$,
LABELF =0,0,18$,
CSPARENT =1,18,18$,
CSTHREAD =1,0,18$,
XGTLDF =2,30,6$,
ABCF =2,18,12$,
LONF =2,18,18$,
FONF =2,0,18$,
PCSTHREAD =2,0,18$,
DTDELETE =3,0,9$,
COMPLEXITY =3,0,18$,
RUCOMPL =3,0,9$,
CSCOMPL =3,9,9$,
FLOLSTF =3,0,18$,
CRLEVEL =4,0,18$,
INNEROMEGENT =4,18,18$,
FPARENT =5,18,18$,
FSTHREAD =5,0,18$,
STATE =5,0,36$,
MKLEVEL =6,18,18$,
ENDOFPCS =6,0,18$,
LABELTF =6,18,18$,
LABELFF =6,0,18$,
LABELW =6,0,36$,
! NOTE LABELW MUST ENCOMPASS LABELTF AND LABELFF
BITGF =7,18,18$,
MUSTGENCODE =7,35,1$,
DONTUNLINK =7,34,1$,
ENABIT =7,34,1$,
ISCOMBIT =7,34,1$,
OMEGABIT =7,33,1$,
OLDRCMTF =7,33,1$,
RHOBIT =7,32,1$,
ADDCOPIED =7,32,1$,
MAXRHOBIT =7,31,1$,
COPIED =7,31,1$,
CSP =7,30,1$,
CODED =7,30,1$,
BOGUSBIT =7,29,1$,
CORCSEF =7,29,1$,
FP =7,28,1$,
PURGEBIT =7,27,1$,
TPATH =7,26,1$,
CHPDFR =7,26,1$,
BOUND =7,25,1$,
JM =7,26,1$,
MM =7,25,1$,
RM =7,24,1$,
! NOTE JM,MM,RM MUST BE IN THE ABOVE ORDER AND CONTIGUOUS
JMMM =7,25,2$,
RMMM =7,24,2$,
JRMMBITS =7,24,3$,
ALPHABIT =7,23,1$,
CHIBIT =7,22,1$,
FLOLSTBIT =7,21,1$,
PRLGBIT =7,20,1$,
XOPF =7,20,1$,
PSLGBIT =7,19,1$,
CXBITS =7,19,8$,
DELAYED =7,18,1$,
NODEX =7,11,7$,
NODESIZEF =7,0,11$,
OPERAND(N) =OPRNDOFFSET+(N),0,36$,
XOPERAND(N) =OPRNDOFFSET+(N),0,23$,
DOTTEDTHING =OPERAND(0)$,
STOREDINTHING =OPERAND(0)$,
OPR1 =OPERAND(0)$,
XOPR1 =XOPERAND(0)$,
OPR1OF1 =OPERAND(0)$,
OPR2 =OPERAND(1)$,
XOPR2 =XOPERAND(1)$,
OPR3 =OPERAND(2)$,
XOPR3 =XOPERAND(2)$,
OPR4 =OPERAND(3)$,
XOPR4 =XOPERAND(3)$,
OPR5 =OPERAND(4)$,
OPR6 =OPERAND(5)$,
OPR7 =OPERAND(6)$;
BIND
BASEGTNODESIZE=8,
OPRNDOFFSET=BASEGTNODESIZE;
STRUCTURE GTVEC[I,J,K]=GT[@.GTVEC,.I,.J,.K];