C ctitla.inc
C Titles Common
C
      INTEGER NTITLE,MXTITL,TITMAX,TITMODE
      PARAMETER (MXTITL=256,TITMAX=STRING_SIZE)
      CHARACTER*(TITMAX) TITLE(MXTITL)
C
      COMMON/TITLE/ NTITLE,TITMODE
      COMMON/CTITLE/ TITLE
      SAVE /TITLE/
      SAVE /CTITLE/