c
c     maxstring = size of string heap
c     string = string heap
c     nstring = next available byte in string
c
      parameter (maxstring=20000)
      common / kstrings / strings, nstring
      character *(maxstring) strings