Integer Nmax
      parameter(Nmax=6)