#					FILE= CSTR.RAT  FOR RATFOR
   COMMON/CSTR/ LASTS, LASTR, STRPTR(NUMSTR), TABLES(MAXSTR)
      INTEGER LASTS		# LAST ENTRY IN STRPTR; INIT=0
      INTEGER LASTR		# LAST CHAR IN TABLES; INIT=0
      INTEGER STRPTR		# POINTERS TO START OF ENTRIES IN TABLES
      CHARACTER TABLES	# STRING NAMES AND THEIR DEFINITIONS