From: Adam Kazimierz Sieradzan Date: Tue, 17 Jun 2014 18:18:21 +0000 (-0400) Subject: wylacznie diagnostyki X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=commitdiff_plain;h=81247e70e590431469336f9c6bd53aa065710cc7;p=unres.git wylacznie diagnostyki --- 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)