From 81247e70e590431469336f9c6bd53aa065710cc7 Mon Sep 17 00:00:00 2001 From: Adam Kazimierz Sieradzan Date: Tue, 17 Jun 2014 14:18:21 -0400 Subject: [PATCH] wylacznie diagnostyki --- .gitignore | 3 +++ source/unres/src_MD-M/energy_p_new_barrier.F | 4 ++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/.gitignore b/.gitignore index d5a5c53..035c785 100644 --- a/.gitignore +++ b/.gitignore @@ -12,6 +12,9 @@ cinfo.f # ignore build dir build/ build2/ +build_prere/ +period_build/ +period_build2/ # latex files in documentation doc/*/*.aux 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 d4e2092..20abf7d 100644 --- a/source/unres/src_MD-M/energy_p_new_barrier.F +++ b/source/unres/src_MD-M/energy_p_new_barrier.F @@ -710,7 +710,7 @@ c enddo do i=1,4*nres glocbuf(i)=gloc(i,icg) enddo -#define DEBUG +c#define DEBUG #ifdef DEBUG write (iout,*) "gloc_sc before reduce" do i=1,nres @@ -719,7 +719,7 @@ c enddo enddo enddo #endif -#undef DEBUG +c#undef DEBUG do i=1,nres do j=1,3 gloc_scbuf(j,i)=gloc_sc(j,i,icg) -- 1.7.9.5