first introduction of valence constrains - not working yet
[unres.git] / source / unres / src_MD-M / COMMON.TORCNSTR
1       integer ndih_constr,idih_constr(maxdih_constr),ntheta_constr,
2      & itheta_constr(maxdih_constr)
3       integer ndih_nconstr,idih_nconstr(maxdih_constr)
4       integer idihconstr_start,idihconstr_end,ithetaconstr_start,
5      & ithetaconstr_end
6       double precision phi0(maxdih_constr),drange(maxdih_constr),
7      & ftors(maxdih_constr),theta_constr0(maxdih_constr),
8      & theta_drange(maxdih_constr),for_thet_constr(maxdih_constr)
9       common /torcnstr/ phi0,drange,ftors,ndih_constr,idih_constr,
10      &  ndih_nconstr,idih_nconstr,idihconstr_start,idihconstr_end