w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-25 13:48:42 -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 committed by Bill Somerville
parent c9f384bf2a
commit fb60ec0be5
No known key found for this signature in database
GPG Key ID: D864B06D1E81618F
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 dmin=0.0
norder=2 norder=2
maxosd=2 maxosd=2
if(ndepth.lt.3) maxosd=1 if(ndepth.eq.2) maxosd=1
if(abs(nfqso-f1).le.napwid .or. abs(nftx-f1).le.napwid .or. ncontest.eq.7) then 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 maxosd=2
endif endif
if(nagain) then
norder=3
maxosd=1
endif
call timer('dec174_91 ',0) call timer('dec174_91 ',0)
Keff=91 Keff=91
call decode174_91(llrz,Keff,maxosd,norder,apmask,message91,cw, & 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=2: subtraction, 3 passes, bp+osd (no subtract refinement)
! ndepth=3: subtraction, 3 passes, bp+osd ! ndepth=3: subtraction, 3 passes, bp+osd
npass=3 npass=3
if(ndepth.eq.1) npass=2
do ipass=1,npass do ipass=1,npass
newdat=.true. newdat=.true.
syncmin=1.3 syncmin=1.3
@ -148,7 +149,7 @@ contains
elseif(ipass.eq.3) then elseif(ipass.eq.3) then
if((ndecodes-n2).eq.0) cycle if((ndecodes-n2).eq.0) cycle
lsubtract=.true. lsubtract=.true.
ndeep=3 ndeep=ndepth
endif endif
call timer('sync8 ',0) call timer('sync8 ',0)
maxc=MAXCAND maxc=MAXCAND