X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2FCOMMON.SBRIDGE;h=6319416b1f3a77f87037fd871b690a5057482b32;hb=c1b8e24ad8ccf66d0617b0055089ea0c1193840d;hp=91dd2cdd14f97c1bdf2823153f539c97dafc07f5;hpb=57a36a1183cb12334e9bc9ceacabbf038729d459;p=unres.git diff --git a/source/unres/src_MD/COMMON.SBRIDGE b/source/unres/src_MD/COMMON.SBRIDGE index 91dd2cd..6319416 100644 --- a/source/unres/src_MD/COMMON.SBRIDGE +++ b/source/unres/src_MD/COMMON.SBRIDGE @@ -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