w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-21 19:55:20 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix several comments.

Browse Source
This commit is contained in:
Joe Taylor 2021-06-08 11:16:26 -04:00
parent b7cb4ae9a6
commit dac2414da5
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lib/q65_decode.f90
View File

@ -148,13 +148,14 @@ contains
nused=1 nused=1
iavg=0 iavg=0
call timer('q65_dec0',0) call timer('q65_dec0',0)
! Call top-level routine in q65 module: establish sync and try for a q3 decode. ! Call top-level routine in q65 module: establish sync and try for a
! q3 of q0 decode.
call q65_dec0(iavg,nutc,iwave,ntrperiod,nfqso,ntol,ndepth,lclearave, & call q65_dec0(iavg,nutc,iwave,ntrperiod,nfqso,ntol,ndepth,lclearave, &
emedelay,xdt,f0,snr1,width,dat4,snr2,idec) emedelay,xdt,f0,snr1,width,dat4,snr2,idec)
call timer('q65_dec0',1) call timer('q65_dec0',1)
if(idec.ge.0) then if(idec.ge.0) then
dtdec=xdt !We have a list-decode result at nfqso dtdec=xdt !We have a q3 or q0 decode at nfqso
f0dec=f0 f0dec=f0
go to 100 go to 100
endif endif