Fix a bug in jt65_decode: crash when Rx Freq is set too close to upper freq limit on waterfall.

2020-11-21 10:12:46 -05:00 · 2020-11-21 10:12:46 -05:00 · 8e4ed9b3be
parent 6da4be174c
commit 8e4ed9b3be
1 changed files with 1 additions and 0 deletions
--- a/lib/jt65_decode.f90
+++ b/lib/jt65_decode.f90
@ -179,6 +179,7 @@ contains
          ia=max(1,nint((nfa-100)/df))
          ib=min(NSZ,nint((nfb+100)/df))
          nz=ib-ia+1
+          if(nz.lt.50) go to 900
          call lorentzian(savg(ia),nz,a)
          baseline=a(1)
          amp=a(2)