X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.TORCNSTR;h=845c44df6244d87418e9838895e9e54d972ad0bb;hb=29c2a95f7c3afbc83690ae6148c805a3572dc3fd;hp=4d77fc664e087ba307b07807c1c4101a9a966d0f;hpb=42b30ef61fe3a8077aee8292bd43e4de4e6b8522;p=unres.git diff --git a/source/unres/src_MD-M/COMMON.TORCNSTR b/source/unres/src_MD-M/COMMON.TORCNSTR index 4d77fc6..845c44d 100644 --- a/source/unres/src_MD-M/COMMON.TORCNSTR +++ b/source/unres/src_MD-M/COMMON.TORCNSTR @@ -6,5 +6,9 @@ double precision phi0(maxdih_constr),drange(maxdih_constr), & ftors(maxdih_constr),theta_constr0(maxdih_constr), & theta_drange(maxdih_constr),for_thet_constr(maxdih_constr) - common /torcnstr/ phi0,drange,ftors,ndih_constr,idih_constr, - & ndih_nconstr,idih_nconstr,idihconstr_start,idihconstr_end + common /torcnstr/ phi0,drange,ftors,theta_constr0,theta_drange, + & for_thet_constr, + & ndih_constr,idih_constr, + & ndih_nconstr,idih_nconstr,idihconstr_start,idihconstr_end, + & ntheta_constr,itheta_constr,ithetaconstr_start, + & ithetaconstr_end