IAPLNT"=100 ;AP FOR GC
ITPLNT"=100 ;TP FOR GC
PLNT"=300. ;PDL FOR USER PROCESS
+PDLGRO==10000 ;AMOUNT TO GROW A PDL THAT LOSES
;LOCATIONS OF VARIOUS STORAGE AREAS
.GLOBAL ILVAL,CALER,CALER1,ER1ARG,SPECBIND,SPECSTORE,WRONGT,ERRTMA
.GLOBAL IDVAL,EVECTO,EUVECT,CHARGS,BCKTRK,CELL
.GLOBAL PDLBUF,MESS,FACTI,ITRUTH,FLFLG,PDLOSS,AGC
-.GLOBAL PGROW,TPGROW,PDLGRO,SPCSTE,CNTIN2
+.GLOBAL PGROW,TPGROW,SPCSTE,CNTIN2
.INSRT MUDDLE >
.INSRT MUDDLE >
-PDLGRO==10000 ;AMOUNT TO GROW A PDL THAT LOSES
NINT==72. ;MAXIMUM NUMBER OF INTERRUPTS POSSIBLE
;SET UP LOCATION 42 TO POINT TO TSINT