*COMDECK SYMC5
          CONTROL NOLIST;    #SYMC5#
DEF CMPAR1#6 #;    #BITS PER BYTE#                                       MIS
DEF CMPAR2#5 #;    #ONE LESS# 
DEF CMPAR3#60#;    #WORD# 
DEF CMPAR4#30#;    #HALF# 
DEF CMPAR5#15#;    #QUARTER#
DEF CMPAR6#54#;    #LAST BYTE#
DEF CMPAR7#45#;    #3/4#
DEF CMPAR8#15#;    #BALANCE#
DEF CMPAR9#8 #;    #NUMBER OF WORDS PER CARD - 1#                        MIS
DEF CMPR10#63#;    #CHARACTER SET LESS 1# 
DEF CMPR11#1 #;    #ID WORD BOUNDS# 
DEF CMPR12#10#;    #BYTES/WORD# 
DEF CMPR13#23#;    #CHARACTER BUFFER BOUND# 
DEF CMPR14#6 #;    #LAST IMAGE WORD#
DEF CMPR15#4 #;    #LOADER NAME LENGTH -1#
DEF CMPR16#1 #;    #PRESET FILE DP CONST SIZE#
DEF CMPR17#18#;    #LARGEST NBIT LESS THAN FULL WORD#                    MIS
  
  
# PARAMETERS DESCRIBING TARGET MACHINE  # 
DEF IGRLEN#60#; 
DEF RELLEN#60#; 
DEF DBLLEN#60#; 
DEF IGRMAX#60#; 
DEF DBLMAX#60#; 
DEF RELMAX#60#; 
DEF BYTSIZ#6#;
DEF NBYTWD#10#; 
DEF NBYTDW#10#; 
DEF NAUPWD#1#;
  
  
#ENTRY SIZES# 
DEF  ARRWDS   #TABL$W#; 
DEF  BPRWDS   #BPAR$W#; 
DEF  CNSWDS   #CONS$W#; 
DEF  COMWDS   #COMM$W#; 
DEF  DATWDS   #DATA$W#; 
DEF  DEFWDS   # DEF$W#; 
DEF  DUMWDS   #DUMY$W#; 
DEF  FNCWDS   #FUNC$W#; 
DEF  FPRWDS   #FPAR$W#; 
DEF  INSWDS   #INSC$W#; 
DEF  LABWDS   #LABL$W#; 
DEF  PRCWDS   #PROC$W#; 
DEF  PRGWDS   #PROG$W#; 
DEF  SCNWDS   #SCON$W#; 
DEF  SDTWDS   #TITM$W#; 
DEF  SLCWDS   # SLC$W#; 
DEF  STLWDS   #STSL$W#; 
DEF  SWCWDS   #SWCH$W#; 
DEF  TMPWDS   #TEMP$W#; 
  
  
  
#    CAPACITY DEFINITIONS     # 
DEF  CHRLEN   #240  #;   #CHARACTER STRING LENGTH#
DEF  CSTCP    #599  #;   #CONSTRUCT STRING# 
DEF  CSTKCP   #300  #;   #CHARACTER STACK        #
DEF  IDLEN    #12   #;   #NAME LENGTH#
DEF  LOOPCP   #63   #;   #LOOP CONTROL TABLE# 
DEF  NBRKLV   #100  #;   #BRACKET LEVEL TABLE#
DEF  NDIMAX   #100  #;   #NUMBER ARRAY DIMENSIONS#
DEF  NDLTR    #10   #;   #UPPER BOUND OF DESCRIPTOR TABLE#               MIS
DEF  NPRLST   #25   #;   #PARAMETER LIST TABLE# 
DEF  NRAIRR   #10   #;   #NUMBER RECOVERABLE ARRAY ITEM ERRORS# 
DEF  NSCPLV   #100  #;   #SCOPE LEVEL TABLE#
DEF  NSSWPT   #256  #;   #NUMBER OF HIGHEST STATUS SWITCH PT# 
DEF  PRBUP    #100  #;   #SIZE OF PRESET FILE BUFFER#                    MIS
DEF  TNTMAX   #65535#;   #TOTAL NUMBER ARRAY ENTRIES# 
DEF  WENTMAX  #2047 #;   #ARRAY ENTRY-SIZE#;
DEF  NDMAX    #7    #;   #NUMBER OF ARRAY DIMENSIONS# 
DEF  WMAX     #20   #;   #CODE CONTROL PUSHDOWN#
DEF  WRDMAX   #50   #;
  
#MISCELLANEOUS DEFINITIONS# 
DEF  BLKSIZ   #ZBLKSZ#;  #TRANSIENT SPACE BLOCK SIZE# 
DEF  CSOFST   #2    #;   #CONSTRUCT STRING ENTRY SIZE#
DEF  EJECT    #EJECTP#;       XREF PROC EJECTP;   #FOR CONTROL EJECT# 
DEF  SUICLS   #QCLAS"TITM"#;  #CLLS DATA ON 360#
DEF  TOPAOP   #QOP"ABS"#;     #ARITH OPERATOR TABLE#
DEF  TOPTYP   #QTYPE"QTYPE$"#; #TYPE CONVERSION TABLE#
DEF  $INSLB   #QFNBR"NULL"#;  #INTRINSIC TABLE LOW BOUND# 
DEF  $INSHB   #QFNBR"QFNBR$"#;#INTRINSIC TABLE HI  BOUND# 
DEF FALKPK#(0,0,18)#; 
DEF FAIXPK#(0,42,18)#;
DEF FASCPK#(0,18,18)#;
DEF CRDN#CRDNO#;    #SOURCE LINE NUMBER#
DEF NMCSTR#NCSR#;     #ITEM EQUIVALENCE FOR CLAS"NAME" ENTRIES# 
DEF BLANKW#"          "#; 
DEF MAXDIAGPAGE        #1199#;     # (NUMBER OF BITS IN VECTOR) - 1    #
DEF NUMDIAGWRDS        #19#;       # (NUMBER OF WORDS IN BIT VECTOR)-1 #
  
#DLTR POSITIONS#
DEF DLTRB #3#;                                    #DLTR POSITION, B#
DEF DLTRC #4#;                                    #DLTR POSITION, C#
DEF DLTRS #5#;                                    #DLTR POSITION, S#
DEF DLTRP #6#;                                    #DLTR POSITION, P#
DEF DLTRO #7#;                                    #DLTR POSITION, O#
DEF DLTRX #8#;                                    #DLTR POSITION, X#
DEF DLTRU #9#;                                    #DLTR POSITION, U#     MIS
  
  
#NAMES AND LENGTHS OF SLCS# 
DEF CODNAM #"CODSLC"#;   #CODE SLC NAME#
DEF CODNML     #6#;      #6#
DEF  DATNAM    #"DATSLC"#;    #DATA SC NAME#
DEF  DATNML    #6#; 
DEF  XTRNAM    #"XTRSLC"#;    #XTRN SLC NAME# 
DEF  XTRNML    #6#; 
DEF ADCNAM     #"ADCSLC"#;                   #ADCON SLC ANME# 
DEF  ADCNML    #6#; 
  
  
#ITEM POSITIONS#
DEF  F18#(0,   00,18)#; 
DEF  M18#(0,   18,18)#; 
DEF  L18#(0,   42,18)#; 
  
*CALL SCMAC 
          CONTROL NOLIST;    #SYMC5#
  
  
*CALL SYMPL 
          CONTROL NOLIST;    #SYMC5#
  
  
  
*CALL CRDCOM
          CONTROL NOLIST;    #SYMC5#
*CALL MACEXPN 
          CONTROL NOLIST;    #SYMC5#
          CONTROL LIST;      #SYMC5#
