X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fparmread.F;fp=source%2Funres%2Fsrc_MD-M%2Fparmread.F;h=c881425f9d6fd9d765060de2f24f5f7fbabd7812;hb=2095e643aafa2fb192e066e69e5ca3b1a59c2727;hp=574552cdf0ff69012b920b1c3ee8bfd0da988e9a;hpb=7ac044004baeac41c3c91c38a1b3c3546287e624;p=unres.git

diff --git a/source/unres/src_MD-M/parmread.F b/source/unres/src_MD-M/parmread.F
index 574552c..c881425 100644
--- a/source/unres/src_MD-M/parmread.F
+++ b/source/unres/src_MD-M/parmread.F
@@ -949,14 +949,14 @@ c        B2(1,-i)  =b(2)
 c        B2(2,-i)  =-b(4)
         B1tilde(1,i) = b(3,i)
         B1tilde(2,i) =-b(5,i)
-        B1tilde(1,-i) =-b(3,i)
-        B1tilde(2,-i) =b(5,i)
+C        B1tilde(1,-i) =-b(3,i)
+C        B1tilde(2,-i) =b(5,i)
         b1tilde(1,i)=0.0d0
         b1tilde(2,i)=0.0d0
         B2(1,i)  = b(2,i)
         B2(2,i)  = b(4,i)
-        B2(1,-i)  =b(2,i)
-        B2(2,-i)  =-b(4,i)
+C        B2(1,-i)  =b(2,i)
+C        B2(2,-i)  =-b(4,i)
 
 c        b2(1,i)=0.0d0
 c        b2(2,i)=0.0d0