w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-24 10:22:26 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix and re-enable polyfit SNR.

Browse Source
This commit is contained in:
Steve Franke 2018-09-26 08:29:01 -05:00
parent 669d54197d
commit 13b5cc479b
1 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
lib/ft8/ft8b_2.f90
View File

@ -335,13 +335,16 @@ subroutine ft8b_2(dd0,newdat,nQSOProgress,nfqso,nftx,ndepth,lapon,lapcqonly, &
xnoi=xnoi+s8(ios,i)**2 xnoi=xnoi+s8(ios,i)**2
enddo enddo
xsnr=0.001 xsnr=0.001
if(xnoi.gt.0 .and. xnoi.lt.xsig) xsnr=xsig/xnoi-1.0 xsnr2=0.001
! if(.not.nagain) then arg=xsig/xnoi-1.0
! xbase=10**(xbase/10.0) if(arg.gt.0.1) xsnr=arg
! arg=xsig/xbase/3.6e6-1.0 arg=xsig/xbase/2.8e6-1.0
! if(arg.gt.0.1) xsnr=arg if(arg.gt.0.1) xsnr2=arg
! endif
xsnr=10.0*log10(xsnr)-27.0 xsnr=10.0*log10(xsnr)-27.0
xsnr2=10.0*log10(xsnr2)-27.0
if(.not.nagain) then
xsnr=xsnr2
endif
if(xsnr .lt. -24.0) xsnr=-24.0 if(xsnr .lt. -24.0) xsnr=-24.0
return return