modyfication for tube

[unres.git] / source / unres / src_MD-M / MD_A-MTS.F

diff --git a/source/unres/src_MD-M/MD_A-MTS.F b/source/unres/src_MD-M/MD_A-MTS.F
index 2635a2f..3a45231 100644 (file)
--- a/source/unres/src_MD-M/MD_A-MTS.F
+++ b/source/unres/src_MD-M/MD_A-MTS.F
@@ -1653,6 +1653,7 @@ c Removing the velocity of the center of mass
 #endif
       call zerograd
       call etotal(potEcomp)
+      call enerprint(potEcomp)
       if (large) call enerprint(potEcomp)
 #ifdef TIMING_ENE
 #ifdef MPI