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

Use norder=3 at the QSO frequency.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7745 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2017-06-28 15:34:38 +00:00
parent 43295f018d
commit 3658e32d57
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lib/fsk4hf/ft8b.f90
View File

@ -1,4 +1,4 @@
subroutine ft8b(s,f1,xdt,nharderrors,dmin,nbadcrc,message) subroutine ft8b(s,nfqso,f1,xdt,nharderrors,dmin,nbadcrc,message)
include 'ft8_params.f90' include 'ft8_params.f90'
parameter(NRECENT=10) parameter(NRECENT=10)
@ -12,6 +12,7 @@ subroutine ft8b(s,f1,xdt,nharderrors,dmin,nbadcrc,message)
max_iterations=40 max_iterations=40
norder=2 norder=2
if(abs(nfqso-f1).lt.10.0) norder=3
tstep=0.5*NSPS/12000.0 tstep=0.5*NSPS/12000.0
df=12000.0/NFFT1 df=12000.0/NFFT1

2
lib/ft8_decode.f90
View File

@ -54,7 +54,7 @@ contains
xdt=candidate(2,icand) xdt=candidate(2,icand)
nsnr=min(99,nint(10.0*log10(sync) - 25.5)) !### empirical ### nsnr=min(99,nint(10.0*log10(sync) - 25.5)) !### empirical ###
call timer('ft8b ',0) call timer('ft8b ',0)
call ft8b(s,f1,xdt,nharderrors,dmin,nbadcrc,message) call ft8b(s,nfqso,f1,xdt,nharderrors,dmin,nbadcrc,message)
call timer('ft8b ',1) call timer('ft8b ',1)
if (associated(this%callback)) call this%callback(sync,nsnr,xdt, & if (associated(this%callback)) call this%callback(sync,nsnr,xdt, &
f1,nbadcrc,message) f1,nbadcrc,message)