w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-25 05:38:46 -05:00
Code Issues Packages Projects Releases Wiki Activity

Revert "Make sure that ncand is correct even when the number of candidates has been limited."

Browse Source 
This reverts commit e78f1abced.
This commit is contained in:
Joe Taylor 2020-06-20 14:17:34 -04:00
parent 066d2585bc
commit 17d1bc92dc
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/fst280_decode.f90
View File

@ -442,10 +442,9 @@ contains
call pctile(s2(ia:ib),ib-ia+1,30,base)
s2=s2/base
thresh=1.4
thresh=1.25
ncand=0
candidates=0
if(ia.lt.3) ia=3
if(ib.gt.18000-2) ib=18000-2
do i=ia,ib
@ -466,8 +465,7 @@ contains
snr_cand(1:ncand)=candidates(1:ncand,2)
call indexx(snr_cand,ncand,indx)
nmax=5
ncand=min(ncand,nmax)
do i=1,ncand
do i=1,min(ncand,nmax)
j=indx(ncand+1-i)
candidates0(i,1:4)=candidates(j,1:4)
enddo