mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-22 12:23:37 -05:00
Remove spurious invocation of thresh variable.
This commit is contained in:
parent
479dc1113f
commit
bac3cc7471
@ -788,7 +788,6 @@ contains
|
||||
iploc=ia+im(1)-1 !Index of CCF peak
|
||||
pval=s2(iploc) !Peak value
|
||||
if(pval.lt.minsync) exit
|
||||
if(s2(iploc).gt.thresh) then !Is this a possible candidate?
|
||||
do i=-3,+3 !Remove 0.9 of a model CCF at
|
||||
k=iploc+2*hmod*i !this frequency from s2()
|
||||
if(k.ge.ia .and. k.le.ib) then
|
||||
@ -798,7 +797,6 @@ contains
|
||||
ncand=ncand+1
|
||||
candidates(ncand,1)=df2*iploc !Candidate frequency
|
||||
candidates(ncand,2)=pval !Rough estimate of SNR
|
||||
endif
|
||||
enddo
|
||||
|
||||
return
|
||||
|
Loading…
Reference in New Issue
Block a user