From 80ece75da609adc3f1c50be282312750b541015e Mon Sep 17 00:00:00 2001
From: Joe Taylor <k1jt@arrl.org>
Date: Fri, 6 Mar 2015 19:44:46 +0000
Subject: [PATCH] Remove calls to timer() around the "flatten" loop in filbig.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@5017 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 lib/filbig.f90 | 2 --
 1 file changed, 2 deletions(-)

diff --git a/lib/filbig.f90 b/lib/filbig.f90
index e959b87ff..bb1ea52a0 100644
--- a/lib/filbig.f90
+++ b/lib/filbig.f90
@@ -78,7 +78,6 @@ subroutine filbig(dd,npts,f0,newdat,c4a,n4,sq0)
      call fftwf_execute_dft_r2c(plan1,rca,ca)
      call timer('FFTbig  ',1)
 
-     call timer('flatten ',0)
      ib=0
      do j=1,NSZ
         ia=ib+1
@@ -86,7 +85,6 @@ subroutine filbig(dd,npts,f0,newdat,c4a,n4,sq0)
         fac=sqrt(min(30.0,1.0/ref(j)))
         ca(ia:ib)=fac*conjg(ca(ia:ib))
      enddo
-     call timer('flatten ',1)
      newdat=0
   endif