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

cosmetic change.

Browse Source
This commit is contained in:
Steven Franke 2020-06-15 17:25:30 -05:00 committed by Bill Somerville
parent 72a1a03db1
commit 2eca4001a0
No known key found for this signature in database
GPG Key ID: D864B06D1E81618F
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
norder=2
maxosd=2
if(ndepth.eq.2) maxosd=0
if(ndepth.eq.1) maxosd=-1
if(ndepth.eq.1) maxosd=-1 ! BP only
if(ndepth.eq.2) maxosd=0 ! uncoupled BP+OSD
if(ndepth.eq.3 .and. &
(abs(nfqso-f1).le.napwid .or. abs(nftx-f1).le.napwid .or. ncontest.eq.7)) then
maxosd=2