integer         maxm
      integer              incred
      common /psize/  maxm,incred