parameter (nxpaw=50000)
      parameter (ncolum=3)