From 500e565d77d20a3717978c7d1581944fe9036cba Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Sat, 8 Jan 2022 14:20:55 -0500
Subject: [PATCH] For now, at least, revert to NFILT=4000 in subtractft8.f90.

---
 lib/ft8/subtractft8.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/ft8/subtractft8.f90 b/lib/ft8/subtractft8.f90
index 7d6084875..40657e7e7 100644
--- a/lib/ft8/subtractft8.f90
+++ b/lib/ft8/subtractft8.f90
@@ -8,7 +8,7 @@ subroutine subtractft8(dd0,itone,f0,dt,lrefinedt)
 ! Subtract         : dd(t)    = dd(t) - 2*REAL{cref*cfilt}
 
   parameter (NMAX=15*12000,NFRAME=1920*79)
-  parameter (NFFT=NMAX,NFILT=6500)
+  parameter (NFFT=NMAX,NFILT=4000)
   real dd(NMAX),dd0(NMAX)
   real window(-NFILT/2:NFILT/2)
   real x(NFFT+2)