







      INTEGER      MAXSTK, NUMSTK
      PARAMETER    (MAXSTK = 100)

      CHARACTER*10 DBGSTK(MAXSTK)

      COMMON      /DBGSTK0/
     +             DBGSTK

      COMMON      /DBGSTK1/
     +             NUMSTK
