mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-10 14:23:31 -05:00
Fix a minor flaw in the "flip" logic.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6667 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
a402645e75
commit
abb5364581
@ -36,9 +36,9 @@ subroutine decode65a(dd,npts,newdat,nqd,f0,nflip,mode65,ntrials, &
|
|||||||
a=0.
|
a=0.
|
||||||
a(1)=xdf
|
a(1)=xdf
|
||||||
nflip=0
|
nflip=0
|
||||||
go to 900
|
|
||||||
endif
|
endif
|
||||||
endif
|
endif
|
||||||
|
if(nflip.eq.0) go to 900
|
||||||
|
|
||||||
! Find best DF, drift, curvature, and DT. Start by downsampling to 344.53125 Hz
|
! Find best DF, drift, curvature, and DT. Start by downsampling to 344.53125 Hz
|
||||||
call timer('fil6521 ',0)
|
call timer('fil6521 ',0)
|
||||||
|
@ -174,6 +174,7 @@ contains
|
|||||||
mode65=2**nsubmode
|
mode65=2**nsubmode
|
||||||
nflip=1
|
nflip=1
|
||||||
nqd=0
|
nqd=0
|
||||||
|
decoded=' '
|
||||||
decoded0=""
|
decoded0=""
|
||||||
freq0=0.
|
freq0=0.
|
||||||
prtavg=.false.
|
prtavg=.false.
|
||||||
@ -191,6 +192,7 @@ contains
|
|||||||
flip=ca(icand)%flip
|
flip=ca(icand)%flip
|
||||||
nflip=flip
|
nflip=flip
|
||||||
endif
|
endif
|
||||||
|
if(sync1.lt.float(minsync)) nflip=0
|
||||||
if(ipass.eq.1) ntry65a=ntry65a + 1
|
if(ipass.eq.1) ntry65a=ntry65a + 1
|
||||||
if(ipass.eq.2) ntry65b=ntry65b + 1
|
if(ipass.eq.2) ntry65b=ntry65b + 1
|
||||||
call timer('decod65a',0)
|
call timer('decod65a',0)
|
||||||
|
Loading…
Reference in New Issue
Block a user