w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-08-31 20:27:51 -04:00
Code Issues Packages Projects Releases Wiki Activity

Correct a flaw in decoder(); do some code cleanup.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3127 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2013-04-03 20:42:12 +00:00
parent dc49b627c2
commit aaf43ad071
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lib/decoder.f90
View File

@ -66,6 +66,7 @@ subroutine decoder(ss,c0)
kstep=nsps/2 kstep=nsps/2
tstep=kstep/12000.0 tstep=kstep/12000.0
idf=ntol/df3 + 0.999
do nqd=1,0,-1 do nqd=1,0,-1
if(nqd.eq.1) then if(nqd.eq.1) then
@ -81,7 +82,7 @@ subroutine decoder(ss,c0)
call timer('sync9 ',1) call timer('sync9 ',1)
ccfok=.false. ccfok=.false.
ccfok(max(ipk-1,1):min(ipk+1,NSMAX))=.true. ccfok(max(ipk-idf,1):min(ipk+idf,NSMAX))=.true.
if(nqd.eq.1) then if(nqd.eq.1) then
ia1=ia ia1=ia
ib1=ib ib1=ib

1
lib/jt9a.F90
View File

@ -85,7 +85,6 @@ subroutine jt9c(ss,savg,c0,id2,nparams0)
npatience=1 npatience=1
call flush(6) call flush(6)
nstandalone=0
if(sum(nparams).ne.0) call decoder(ss,c0) if(sum(nparams).ne.0) call decoder(ss,c0)
return return

2
mainwindow.cpp
View File

@ -1,4 +1,4 @@
//------------------------------------------------------------- MainWindow //-------------------------------------------------------------- MainWindow
#include "mainwindow.h" #include "mainwindow.h"
#include "ui_mainwindow.h" #include "ui_mainwindow.h"
#include "devsetup.h" #include "devsetup.h"