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

FT8: Make the Fast decode setting Faster.

Browse Source
This commit is contained in:
Steven Franke 2020-06-09 09:38:48 -05:00
parent 573a7c55d4
commit 29d4b4c359
2 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/ft8/ft8b.f90
View File

@ -403,14 +403,12 @@ subroutine ft8b(dd0,newdat,nQSOProgress,nfqso,nftx,ndepth,nzhsym,lapon, &
dmin=0.0
norder=2
maxosd=2
if(ndepth.lt.3) maxosd=1
if(abs(nfqso-f1).le.napwid .or. abs(nftx-f1).le.napwid .or. ncontest.eq.7) then
if(ndepth.eq.2) maxosd=1
if(ndepth.eq.1) maxosd=-1
if(ndepth.ge.2 .and. &
(abs(nfqso-f1).le.napwid .or. abs(nftx-f1).le.napwid .or. ncontest.eq.7)) then
maxosd=2
endif
if(nagain) then
norder=3
maxosd=1
endif
call timer('dec174_91 ',0)
Keff=91
call decode174_91(llrz,Keff,maxosd,norder,apmask,message91,cw, &

3
lib/ft8_decode.f90
View File

@ -132,6 +132,7 @@ contains
! ndepth=2: subtraction, 3 passes, bp+osd (no subtract refinement)
! ndepth=3: subtraction, 3 passes, bp+osd
npass=3
if(ndepth.eq.1) npass=2
do ipass=1,npass
newdat=.true.
syncmin=1.3
@ -148,7 +149,7 @@ contains
elseif(ipass.eq.3) then
if((ndecodes-n2).eq.0) cycle
lsubtract=.true.
ndeep=3
ndeep=ndepth
endif
call timer('sync8 ',0)
maxc=MAXCAND