X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Funres.F90;h=4a8e7a6d8700f8991088fc2817b9004b7e6efffb;hb=532215c67bc6381096ff9494a83f507c4d2474b9;hp=bc9da96f40633ee77a53baf6c8a0e789bce0c8e3;hpb=817262c16c50ae5848d85d1162e4977c700e1b6f;p=unres4.git

diff --git a/source/unres/unres.F90 b/source/unres/unres.F90
index bc9da96..4a8e7a6 100644
--- a/source/unres/unres.F90
+++ b/source/unres/unres.F90
@@ -818,6 +818,7 @@
       call cartprint
       call intout
       icall=1
+      write (iout,*) "before etotal"
       call etotal(energy_(0))
       etot = energy_(0)
       call enerprint(energy_(0))