From a3c65d72bbebf6679bf5f726561ffc3aad051084 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sun, 27 Aug 2017 12:26:37 +0000 Subject: [PATCH] Fix the 'Start=0 ==> S/N = -24 dB' problem. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@8037 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/fsk4hf/baseline.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/fsk4hf/baseline.f90 b/lib/fsk4hf/baseline.f90 index fac3f2ccb..035f9ab4b 100644 --- a/lib/fsk4hf/baseline.f90 +++ b/lib/fsk4hf/baseline.f90 @@ -12,7 +12,7 @@ subroutine baseline(s,nfa,nfb,sbase) data nseg/10/,npct/10/ df=12000.0/3840.0 !3.125 Hz - ia=nint(nfa/df) + ia=max(1,nint(nfa/df)) ib=nint(nfb/df) do i=ia,ib s(i)=10.0*log10(s(i)) !Convert to dB scale