integer Max_Parm
      integer MaxQ,MaxQ1
      integer MaxR,MaxT_h
      integer MaxSlice
<<<<<<< HEAD
      parameter (Max_Parm=128)
=======
      parameter (Max_Parm=1)
>>>>>>> e183793... Added src_MD-M-newcorr (Adasko's source) and src-NEWSC of WHAM (with Momo's SCSC potentials)
      parameter (MaxQ=4,MaxQ1=MaxQ+2)
      parameter(MaxR=1,MaxT_h=32)
      parameter(MaxSlice=40)
      integer MaxN
      parameter (MaxN=100)
      integer MaxPrintConf
      parameter (MaxPrintConf=1000)
      integer Max_GridT
      parameter (Max_GridT=400)