dyn_ss writing pdb and ihpb cleaning

[unres.git] / source / unres / src_MD / COMMON.SBRIDGE

diff --git a/source/unres/src_MD/COMMON.SBRIDGE b/source/unres/src_MD/COMMON.SBRIDGE
index b608908..91dd2cd 100644 (file)
--- a/source/unres/src_MD/COMMON.SBRIDGE
+++ b/source/unres/src_MD/COMMON.SBRIDGE
@@ -3,7 +3,7 @@
       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
+      integer ihpb,jhpb,nhpb,idssb,jdssb
       common /links/ dhpb(maxdim),dhpb1(maxdim),forcon(maxdim),
      & ihpb(maxdim),jhpb(maxdim),ibecarb(maxdim),nhpb
       double precision weidis
@@ -13,4 +13,5 @@
       double precision Ht,dyn_ssbond_ij
       logical dyn_ss,dyn_ss_mask
       common /dyn_ssbond/ dyn_ssbond_ij(maxres,maxres),
+     &  idssb(maxdim),jdssb(maxdim),
      &  Ht,dyn_ss,dyn_ss_mask(maxres)