From 0fef707118cc111a656839a614355b705a997094 Mon Sep 17 00:00:00 2001
From: Steve Franke <s.j.franke@icloud.com>
Date: Thu, 21 Mar 2019 13:27:10 -0500
Subject: [PATCH] Widen candidate frequency offset window to f0=[10,4990] Hz.

---
 lib/ft4/ft4_decode.f90 | 5 ++---
 lib/ft4/ft4d.f90       | 4 ++--
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/lib/ft4/ft4_decode.f90 b/lib/ft4/ft4_decode.f90
index f62569343..63cc6753e 100644
--- a/lib/ft4/ft4_decode.f90
+++ b/lib/ft4/ft4_decode.f90
@@ -183,7 +183,7 @@ subroutine ft4_decode(cdatetime0,tbuf,nfa,nfb,nQSOProgress,ncontest,nfqso, &
    do icand=1,ncand
       f0=candidate(1,icand)
       snr=candidate(3,icand)-1.0
-      if( f0.le.375.0 .or. f0.ge.(5000.0-375.0) ) cycle
+      if( f0.le.10.0 .or. f0.ge.4990.0 ) cycle
       call clockit('ft4_down',0)
       call ft4_downsample(iwave,f0,cd2)  !Downsample from 512 to 32 Sa/Symbol
       call clockit('ft4_down',1)
@@ -232,9 +232,8 @@ subroutine ft4_decode(cdatetime0,tbuf,nfa,nfb,nQSOProgress,ncontest,nfqso, &
          enddo
       enddo
       f0=f0+real(idfbest)
+      if( f0.le.10.0 .or. f0.ge.4990.0 ) cycle
 
-!f0=1500
-!ibest=219
       call clockit('ft4down ',0)
       call ft4_downsample(iwave,f0,cb) !Final downsample with corrected f0
       call clockit('ft4down ',1)
diff --git a/lib/ft4/ft4d.f90 b/lib/ft4/ft4d.f90
index 7725992df..f8e6dab71 100644
--- a/lib/ft4/ft4d.f90
+++ b/lib/ft4/ft4d.f90
@@ -43,8 +43,8 @@ program ft4d
       read(arg,*) nQSOProgress 
       iarg=iarg+2
    endif
-   nfa=0
-   nfb=4224
+   nfa=10
+   nfb=4990
    ndecodes=0
    nfqso=1500
    mycall="K9AN"