poprawka w triss
[unres.git] / source / unres / src_MD / COMMON.SBRIDGE
index 91dd2cd..6319416 100644 (file)
@@ -1,4 +1,5 @@
-      double precision ss_depth,ebr,d0cm,akcm,akth,akct,v1ss,v2ss,v3ss
+      double precision ss_depth,ebr,d0cm,akcm,akth,akct,v1ss,v2ss,v3ss,
+     &atriss,btriss,ctriss,dtriss
       integer ns,nss,nfree,iss
       common /sbridge/ ss_depth,ebr,d0cm,akcm,akth,akct,v1ss,v2ss,v3ss,
      & ns,nss,nfree,iss(maxss)
@@ -14,4 +15,4 @@
       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)
+     &  Ht,dyn_ss,dyn_ss_mask(maxres),atriss,btriss,ctriss,dtriss