********************************************************************************
* Settings for the program of united-residue peptide simulation in real space  *
*                                                                              *
*                -------  As of 6/23/01 -----------                            *
*                                                                              *
********************************************************************************
C Max. number of processors.
      integer maxprocs
      parameter (maxprocs=2048)
C Max. number of fine-grain processors
      integer max_fg_procs
c      parameter (max_fg_procs=16)
      parameter (max_fg_procs=256)
!      parameter (max_fg_procs=1024)
C Max. number of coarse-grain processors
      integer max_cg_procs
c      parameter (max_cg_procs=maxprocs)
      parameter (max_cg_procs=192)
C Max. number of OpenMP threads for one fine-grain process
      integer max_fg_threads
      parameter (max_fg_threads=24)
C Minimum number of items in a single chunk to process sequentially.
C Smaller chunks will be merged into a non-sequential chunk,
      integer simd_seq_cutoff
      parameter (simd_seq_cutoff=3)
C Max. number of AA residues
      integer maxres
!      parameter (maxres=155000)
!      parameter (maxres=1770000)
      parameter (maxres=2000)
C !!!
      double precision r_buff_list
!      parameter (r_buff_list=5.0)
      parameter (r_buff_list=0.5)
C Max. number of AA residues per chain
      integer maxres_chain
      parameter (maxres_chain=1200)
C Max. number of cysteines and other bridging residues
      integer max_cyst
      parameter (max_cyst=100)
C Appr. max. number of interaction sites
      integer maxres2,maxres6,maxres2_chain,mmaxres2_chain
      parameter (maxres2=2*maxres,maxres6=6*maxres)
      parameter (maxres2_chain=2*maxres_chain,
     &           mmaxres2_chain=maxres2_chain*(maxres2_chain+1)/2)
c      integer mmaxres2
c      parameter (mmaxres2=(maxres2*(maxres2+1)/2))
C Max number of symetric chains
      integer maxchain
      parameter (maxchain=1000)
      integer maxperm
!      parameter (maxperm=5040) 
!      parameter (maxperm=3628800) 
      parameter (maxperm=6) 
C Max. number of variables
      integer maxvar
      parameter (maxvar=6*maxres)
C Max. number of groups of interactions that a given SC is involved in
      integer maxint_gr
      parameter (maxint_gr=2)
C Max. number of derivatives of virtual-bond and side-chain vectors in theta
C or phi.
      integer maxdim
      parameter (maxdim=(maxres_chain-1)*(maxres_chain-2)/2)
c      parameter (maxdim=(maxres-1)*(maxres-2)/2)
C Max. number of NMR distance restraints
      integer maxdim_nmr
      parameter (maxdim_nmr=30000)
C Max. number of SC contacts
      integer maxcont
      parameter (maxcont=12*maxres)
C Max. number of contacts per residue
      integer maxconts
      parameter (maxconts=maxres)
c      parameter (maxconts=50)
C Max. number of NMR parameters
      integer maxnmr
      parameter (maxnmr=21)
C Max. number of NMR proton types
      integer maxnmrType
      parameter (maxnmrType=12)
C Max. number of XLINK parameters
      integer maxxlink
      parameter (maxxlink=20)
C Max. number of interactions within cutoff per residue
      integer maxint_res
      parameter (maxint_res=250)
C Max. number od residues within distance cufoff from a given residue to 
C     include in template-based/contact distance restraints.
      integer maxcont_res
      parameter (maxcont_res=200)
C Max. number of distance/contact-distance restraints
      integer maxdim_cont
      parameter (maxdim_cont=maxres*maxcont_res)
C Number of AA types (at present only natural AA's will be handled
      integer ntyp,ntyp1
      parameter (ntyp=24,ntyp1=ntyp+1)
C Max. number of types of dihedral angles & multiplicity of torsional barriers
C and the number of terms in double torsionals
      integer maxtor,maxterm,maxlor,maxtermd_1,maxtermd_2,maxtor_kcc,
     & maxval_kcc
      parameter (maxtor=4,maxterm=10,maxlor=3,maxtermd_1=8,maxtermd_2=8)
      parameter (maxtor_kcc=6,maxval_kcc=6)
c Max number of new valence-angle (only) terms 
      integer maxang_kcc
      parameter (maxang_kcc=36)
C Max. number of residue types and parameters in expressions for 
C virtual-bond angle bending potentials
      integer maxthetyp,maxthetyp1,maxtheterm,maxtheterm2,maxtheterm3,
     &  maxsingle,maxdouble,mmaxtheterm
      parameter (maxthetyp=3,maxthetyp1=maxthetyp+1,maxtheterm=20,
     & maxtheterm2=6,maxtheterm3=4,maxsingle=6,maxdouble=4,
     & mmaxtheterm=maxtheterm)
c Max number of torsional terms in SCCOR
      integer maxterm_sccor
      parameter (maxterm_sccor=6)
C Max. number of lobes in SC distribution
      integer maxlob
      parameter (maxlob=4)
C Max. number of S-S bridges and other links
      integer maxss
c      parameter (maxss=20)
      parameter (maxss=max_cyst*(max_cyst-1)/2)
C Max. number of dihedral angle constraints
      integer maxdih_constr
      parameter (maxdih_constr=maxres)
C Max. number of patterns in the pattern database
      integer maxseq
      parameter (maxseq=10)
C Max. number of residues in a peptide in the database
      integer maxres_base
      parameter (maxres_base=10)
C Max. number of threading attempts
      integer maxthread
      parameter (maxthread=20)
C Max. number of move types in MCM
      integer maxmovetype
      parameter (maxmovetype=4)
C Max. number of stored confs. in MC/MCM simulation
      integer maxsave
      parameter (maxsave=20)
C Max. number of energy intervals
      integer max_ene
      parameter (max_ene=10)
C Max. number of conformations in Master's cache array
      integer max_cache
      parameter (max_cache=10)
C Max. number of conformations in the pool
      integer max_pool
      parameter (max_pool=10)
C Number of energy components
      integer n_ene,n_ene2
      parameter (n_ene=31,n_ene2=2*n_ene)
C Number of threads in deformation
      integer max_thread,max_thread2
      parameter (max_thread=4,max_thread2=2*max_thread)     
C Number of structures to compare at t=0
      integer max_threadss,max_threadss2
      parameter (max_threadss=8,max_threadss2=2*max_threadss)
C Maxmimum number of angles per residue
      integer mxang
      parameter (mxang=4)
C Maximum number of groups of angles
      integer mxgr
      parameter (mxgr=2*maxres)
C Maximum number of chains
      integer mxch
      parameter (mxch=1)
C Maximum number of generated conformations
      integer mxio
      parameter (mxio=2)
C Maximum number of n7 generated conformations
      integer mxio2
      parameter (mxio2=2)
C Maximum number of moves (n1-n8)
      integer mxmv
      parameter (mxmv=18)
C Maximum number of seed
      integer max_seed
      parameter (max_seed=1)
C Maximum number of timesteps for which stochastic MD matrices can be stored
      integer maxflag_stoch
      parameter (maxflag_stoch=0)
C Maximum number of backbone fragments in restraining
      integer maxfrag_back
      parameter (maxfrag_back=4)
C Maximum number of SC local term fitting function coefficiants
      integer maxsccoef
      parameter (maxsccoef=65)
C Maximum number of terms in SC bond-stretching potential
      integer maxbondterm
      parameter (maxbondterm=3)
C Maximum number of replica temperatures
      integer max_rep
      parameter (max_rep=max_cg_procs)
C Maximum number of replica multiplexing
      integer max_remd_m
      parameter (max_remd_m=64)
C Maximum number of sets in umbrella sampling
      integer max_set
      parameter (max_set=16)
C Maximum number of multiplexing of an umbrella set
      integer max_mult_set
      parameter (max_mult_set=2)
C Maximum number of conformation stored in cache on each CPU before sending
C to master; depends on nstex / ntwx ratio
      integer max_cache_traj
      parameter (max_cache_traj=1)
C Maximum number of bins in SAXS restraints
      integer MaxSAXS
      parameter (MaxSAXS=1000)
C Maximum number of templates in homology-modeling restraints
      integer max_template
      parameter(max_template=50)
c Maximum number of clusters of templates containing same fragments
      integer maxclust
      parameter(maxclust=1000)
