From: Adam Sieradzan <adasko@piasek4.chem.univ.gda.pl>
Date: Thu, 21 Apr 2016 08:27:22 +0000 (+0200)
Subject: debug off
X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=commitdiff_plain;h=f7c3c8c85f9f16c7005cbf0fa71246247a9317c5

debug off
---

diff --git a/source/unres/src_MD-M/energy_p_new_barrier.F b/source/unres/src_MD-M/energy_p_new_barrier.F
index 934bfb9..03bc765 100644
--- a/source/unres/src_MD-M/energy_p_new_barrier.F
+++ b/source/unres/src_MD-M/energy_p_new_barrier.F
@@ -475,11 +475,11 @@ cMS$ATTRIBUTES C ::  proc_proc
         time00=MPI_Wtime()
         call MPI_Reduce(enebuff(0),energia(0),n_ene+1,
      &    MPI_DOUBLE_PRECISION,MPI_SUM,king,FG_COMM,IERR)
-C#ifdef DEBUG
+#ifdef DEBUG
         write (iout,*) "energies after REDUCE"
         call enerprint(energia)
         call flush(iout)
-C#endif
+#endif
         time_Reduce=time_Reduce+MPI_Wtime()-time00
       endif
       if (fg_rank.eq.0) then