From e4ba9f25fd57219ea25efaf08e88bc7945c779c9 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Thu, 14 Feb 2019 15:21:01 -0500 Subject: [PATCH] Process one more 3456-sample chunk in ft4d. --- lib/ft4/ft4d.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/ft4/ft4d.f90 b/lib/ft4/ft4d.f90 index b2c827995..d7583f3cc 100644 --- a/lib/ft4/ft4d.f90 +++ b/lib/ft4/ft4d.f90 @@ -43,7 +43,7 @@ program ft4d iarg=iarg+2 endif nfa=0 - nfb=4200 + nfb=4224 ncontest=4 ndecodes=0 nfqso=1500 @@ -60,7 +60,7 @@ program ft4d close(10) cdatetime=infile(1:13)//'.000' - nsteps=npts/3456 + nsteps=(npts-60000)/3456 + 1 do n=1,nsteps i0=(n-1)*3456 + 1 call ft4_decode(cdatetime,0.0,nfa,nfb,nQSOProgress,ncontest, &