      PARAMETER(MDIM=4000,MAXNPW=MDIM*8)
      PARAMETER(LMNATM=35,LMNKAT=35)
