debug off
authorAdam Sieradzan <adasko@piasek4.chem.univ.gda.pl>
Thu, 21 Apr 2016 08:27:22 +0000 (10:27 +0200)
committerAdam Sieradzan <adasko@piasek4.chem.univ.gda.pl>
Thu, 21 Apr 2016 08:27:22 +0000 (10:27 +0200)
source/unres/src_MD-M/energy_p_new_barrier.F

index 934bfb9..03bc765 100644 (file)
@@ -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