X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FMD_A-MTS.F;h=d3c3cb0f025943c6d805ccc08c32bd13175f6900;hb=0ac1bcd8b990ecd894389f050d7a1740558f7960;hp=6c6fb143c6ddb18cdde3ba4dac20bbcbc9411f9a;hpb=7de287b19e3beab2ae63a3eda10cbad8b600e87f;p=unres.git

diff --git a/source/unres/src_MD-M/MD_A-MTS.F b/source/unres/src_MD-M/MD_A-MTS.F
index 6c6fb14..d3c3cb0 100644
--- a/source/unres/src_MD-M/MD_A-MTS.F
+++ b/source/unres/src_MD-M/MD_A-MTS.F
@@ -1605,7 +1605,7 @@ c Removing the velocity of the center of mass
       call chainbuild_cart
       call kinetic(EK)
       if (tbf) then
-        call verlet_bath(EK)
+        call verlet_bath
       endif	  
       kinetic_T=2.0d0/(dimen3*Rb)*EK
       if(me.eq.king.or..not.out1file)then