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

cosmetic change.

Browse Source
This commit is contained in:
Steven Franke 2020-06-15 17:25:30 -05:00
parent 76566aca7b
commit 68747a5e12
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/ft8/ft8b.f90
View File

@ -403,8 +403,8 @@ 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.eq.2) maxosd=0 if(ndepth.eq.1) maxosd=-1 ! BP only
if(ndepth.eq.1) maxosd=-1 if(ndepth.eq.2) maxosd=0 ! uncoupled BP+OSD
if(ndepth.eq.3 .and. & if(ndepth.eq.3 .and. &
(abs(nfqso-f1).le.napwid .or. abs(nftx-f1).le.napwid .or. ncontest.eq.7)) then (abs(nfqso-f1).le.napwid .or. abs(nftx-f1).le.napwid .or. ncontest.eq.7)) then
maxosd=2 maxosd=2