X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2FCOMMON.SBRIDGE;h=953b380946f3f472373f96cecd6808b773887b84;hb=0fd0917d91fb152387bfe8f062fea2141d691aef;hp=4cc80c8bc2ce8066517c3aec37ddff40a0d75e90;hpb=466d1f3cb409d6efa414d799bbb381206d7c2c9c;p=unres.git diff --git a/source/unres/src_CSA/COMMON.SBRIDGE b/source/unres/src_CSA/COMMON.SBRIDGE index 4cc80c8..953b380 100644 --- a/source/unres/src_CSA/COMMON.SBRIDGE +++ b/source/unres/src_CSA/COMMON.SBRIDGE @@ -4,8 +4,8 @@ & ns,nss,nfree,iss(maxss) double precision dhpb,forcon integer ihpb,jhpb,nhpb - common /links/ dhpb(maxdim),forcon(maxdim),ihpb(maxdim), - & jhpb(maxdim),nhpb + common /links/ dhpb(maxdim),dhpb1(maxdim),forcon(maxdim), + & ihpb(maxdim),jhpb(maxdim),ibecarb(maxdim),nhpb double precision weidis common /restraints/ weidis integer link_start,link_end