*COMDECK CONSTR 
          CONTROL NOLIST;    #CONSTR# 
 $BEGIN   # CONSTRUCT TRACE # 
  ARRAY CONSTR [0:FDTCP] S(1);  #CONSTRUCT NAMES #
    BEGIN 
 ITEM CONSTRNAME C(0,0,10) =  [ 
 "EO$S  " , "ANY   " , "NULL  " , "NOT   " , "AND   " , 
 "DO    " , "ELSE  " , "DEFNAM" , "THEN  " , "OR    " , 
 "DEFMAC" , "TERM  " , "END   " , "STSNAM" , "BEGIN " , 
 "UND   " , "CONTRL" , "SPBEGN" , "SPEND " , "NOTERM" , 
 "BADSTR" , "BADCOM" , "DINT  " , "ARRAY " , "ITEM  " , 
 "STATUS" , "PROC  " , "FUNC  " , "ENTRY " , "DEF   " , 
 "SWITCH" , "PRGM  " , "XREF  " , "XDEF  " , "COMMON" , 
 "BASED " , "LABEL " , "FPRC  " , "FALSE " , "TRUE  " , 
 "LOC   " , "ABS   " , "LNO   " , "STLNAM" , "LAN   " , 
 "LOR   " , "LXR   " , "LIM   " , "COMNAM" , "LQ    " , 
 "LQV   " , "LS    " , "EQ    " , "NQ    " , "GR    " , 
 "GQ    " , "WHILE " , "UNTIL " , "STEP  " , "IF    " , 
 "SWINAM" , "PRCNAM" , "LABNAM" , "ITMNAM" , "FNCNAM" , 
 "BARNAM" , "ARRNAM" , "AITNAM" , "RETURN" , "STOP  " , 
 "TEST  " , "FOR   " , "GOTO  " , "RPOINT" , "ODIGIT" , 
 "DDIGIT" , "LPAREN" , "POSLBL" , "OXHEAD" , "LETTER" , 
 "FUNNY " , "BLANK " , "QUOTE " , "PRIME " , "LPOINT" , 
 "LSQUA0" , "RSQUA0" , "RPAREN" , "LPARE0" , "PLTR  " , 
 "PLUS  " , "MINUS " , "SLASH0" , "COLO  " , "DOT   " , 
 "SEMI  " , "COMMA " , "IPDFP " , "DFMLHP" , "DFMLQQ" , 
 "DFMEXP" , "DFMLPP" , "DFMBAD" , "DFMLPQ" , "DFMLPL" , 
 "CSH   " , "DSTRHD" , "FASTFR" , "MODULE" , "IPD   " , 
 "CONDSK" , "RCBODY" , "RETOP " , "STATU2" , "ITEM2 " , 
 "ARRAY2" , "SLASH " , "COLON " , "LPARE2" , "SEMI2 " , 
 "SIGN  " , "SSDH  " , "SSDT  " , "SWDDCN" , "SWTOP " , 
 "POSLB2" , "END2  " , "BEGIN2" , "EQUALS" , "STAR  " , 
 "CONSHD" , "COMMO2" , "XDEC  " , "PRGM2 " , "SWITC2" , 
 "CONDHD" , "CONDAT" , "CONDAD" , "CONTST" , "CONDHB" , 
 "CONDHC" , "CONDST" , "DEF2  " , "AFUNC " , "ENTRY2" , 
 "IDECHD" , "AIDHD " , "IBAD  " , "IDECSG" , "IDECPT" , 
 "IDECD " , "IDECS " , "IDECC " , "IDECCL" , "IDECPH" , 
 "SIDECP" , "ADECHD" , "ADTOP " , "ABAD  " , "ARRDEC" , 
 "ADBLHD" , "ADBND " , "SABLH " , "BP    " , "LAYOUT" , 
 "LAYOUL" , "ADECSG" , "AIDEC " , "AIDTOP" , "AIBAD " , 
 "AIDD  " , "AIDS  " , "AIPWT " , "AIDAU " , "AIDAUD" , 
 "AIDAUF" , "AIDAUG" , "AIDSEG" , "AIPWTD" , "AIPSET" , 
 "AIBODY" , "AIPBOT" , "PSETV " , "PSETS " , "COMDHD" , 
 "COMDSG" , "COMDEC" , "COMDLT" , "CXBDEC" , "XDECD " , 
 "XDECLT" , "PHTOP " , "FDECHD" , "LBDH  " , "SWITDH" , 
 "SWDECH" , "BASDEC" , "BASDLT" , "CXBDLT" , "ENTDEC" , 
 "PDECHD" , "SSDTSN" , "SWPART" , "SWITDB" , "SDECHD" , 
 "SDECPT" , "SDECSG" , "DDECHD" , "DDECB " , "DPARLH" , 
 "DPART " , "PDH   " , "PDBODY" , "FUNC2 " , "DEC   " , 
 "ARIDLT" , "BASED2" , "BAD   " , "LABEL2" , "FPRC2 " , 
 "CONTR2" , "CDEC  " , "THEN2 " , "PROC2 " , "DO2   " , 
 "ELSE2 " , "TERM2 " , "DICON " , "DDECSG" , "DMACSG" , 
 "SSDTLC" , "CSP2  " , "PHEAD " , "PDECTP" , "FVLPRT" , 
 "PHSEG " , "FVLPRH" , "FPART " , "FPARLH" , "FHEAD " , 
 "FHDCL " , "FBAD  " , "FHDC  " , "FHDS  " , "FHD   " , 
 "FHSEG " , "FDECTP" , "FPDB  " , "FPDH  " , "LBDB  " , 
 "BFHEAD" , "PFHEAD" , "UNDNAM" , "LSQUAR" , "BOP   " , 
 "CONST " , "BASDLH" , "XDECLH" , "COMDLH" , "CXBDLH" , 
 "ELSE3 " , "PFUNC " , "TERM3 " , "BEGIN3" , "THEN3 " , 
 "DO3   " , "SEMI3 " , "BFUNCZ" , "AX    " , "END3  " , 
 "ARIREF" , "AOP   " , "LPARE3" , "AOPND " , "BFTAX " , 
 "AFBODY" , "PARLST" , "LFBODY" , "SUBLT " , "SUBLST" , 
 "AREREF" , "PARLT " , "BOPND " , "BFUNC " , "STHEAD" , 
 "PRGTOP" , "SINK  " , "PROG  " , "TERM4 " , "END4  " , 
 "SEMI4 " , "SPTOP " , "ELSE4 " , "BEGIN4" , "BEGHED" , 
 "FORHED" , "IFHED " , "IFLSHD" , "IFSTAT" , "PRCRFP" , 
 "ABSTMT" , "STMT  " , "CSPDEC" , "FIF   " , "PRCREF" , 
 "GOTOS " , "TESTS " , "REPL  " , "FIS   " , "FISSS " , 
 "FLDO  " , "XDIGIT" , "DECNAM" , "DESCR " , "RSQUAR" , 
 "SCHEAD" , "RPARE2" , "COMMA2" , "SSDTLP" , "RCHEAD" , 
 "REHEAD" , "CSHP  " , "ARIDLH" , "DSTR  " , "SCBODY" , 
 "AFHD  " , "SSWPT " , "LFHD  " , "FUNTIL" , "IFX   " , 
 "SSTH  " , "SIMBX " , "TESTN " , "INDV  " , "FWHILE" , 
 "SBX   " , "THEN4 " , "RELOP " , "DO4   " , "SHAZAM" , 
 "FSTEP " , "SWISUB" , "EXCH  " , "BX    " , "FNCRFP" , 
 "ARIRFP" , "SWIRFP" , "SWIREF" , "LRELT " , "ARERFP" , 
 "SAX   " , "BFTOP " , "PARLHD" , "PBOP  " , "SUBLHD" , 
 "PARS  " , "BFUNCT" , "TAG   " , "PAOP  " , "
  "]; #DUMMY LAST ENTRY # 
    END 
 $END 
          CONTROL LIST;      #CONSTR# 
