From 4dd8dd456f4501f535efb462cd49c6d0d0035f77 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 16 Jan 2023 12:36:33 -0500
Subject: [PATCH] Don't reset newdat=0 in libq65/filbig.f90 !!

---
 q65w/libq65/filbig.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/q65w/libq65/filbig.f90 b/q65w/libq65/filbig.f90
index 5683eeb95..4a265d2df 100644
--- a/q65w/libq65/filbig.f90
+++ b/q65w/libq65/filbig.f90
@@ -84,7 +84,7 @@ subroutine filbig(dd,nmax,f0,newdat,nfsample,c4a,n4)
      call timer('FFTbig  ',0)
      call sfftw_execute(plan1)
      call timer('FFTbig  ',1)
-     newdat=0
+!###     newdat=0
   endif
 
 ! NB: f0 is the frequency at which we want our filter centered.