X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2Fenergy_p_new.F;h=c7c2c2fc2ecc6a22d63bf95679950ec88a4c3aab;hb=249fceea00b8557c7ac38ee380fec0405b431ab2;hp=d6ea982a8e5822a08a9dcbbafd48fabb07476f06;hpb=b8ec0a4f4ecc17116db05f773b29c0b909126ebc;p=unres.git

diff --git a/source/cluster/wham/src-M/energy_p_new.F b/source/cluster/wham/src-M/energy_p_new.F
index d6ea982..c7c2c2f 100644
--- a/source/cluster/wham/src-M/energy_p_new.F
+++ b/source/cluster/wham/src-M/energy_p_new.F
@@ -3045,7 +3045,7 @@ c          write (iout,*) i,vbld(i),vbldp0,diff,AKP*diff*diff
         endif
 
       enddo
-      estr=0.5d0*AKP*estr
+      estr=0.5d0*AKP*estr+estr1
 c
 c 09/18/07 AL: multimodal bond potential based on AM1 CA-SC PMF's included
 c