integer ns,nss,nfree,iss
common /sbridge/ ss_depth,ebr,d0cm,akcm,akth,akct,v1ss,v2ss,v3ss,
& ns,nss,nfree,iss(maxss)
- double precision dhpb,dhpb1,forcon
- integer ihpb,jhpb,nhpb,idssb,jdssb
+ double precision dhpb,dhpb1,forcon,fordepth
+ integer ihpb,jhpb,nhpb,idssb,jdssb,ibecarb
common /links/ dhpb(maxdim),dhpb1(maxdim),forcon(maxdim),
+ & fordepth(maxdim),
& ihpb(maxdim),jhpb(maxdim),nhpb
double precision weidis
common /restraints/ weidis
common /links_split/ link_start,link_end
double precision Ht,dyn_ssbond_ij,dtriss,atriss,btriss,ctriss
logical dyn_ss,dyn_ss_mask
- common /dyn_ssbond/ dtriss,atriss,btriss,ctriss,
+ common /dyn_ssbond/ dtriss,atriss,btriss,ctriss,Ht,
& dyn_ssbond_ij(maxres,maxres),
- & idssb(maxdim),jdssb(maxdim),
- & Ht,dyn_ss,dyn_ss_mask(maxres)
+ & idssb(maxdim),jdssb(maxdim),ibecarb(maxdim)
+ common /dyn_ss_logic/
+ & dyn_ss,dyn_ss_mask(maxres)