mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-28 12:22:32 -04:00
Remove unnecessary test on ja.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@2721 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
5ba4ce474f
commit
ee55b12e8f
@ -109,7 +109,6 @@ subroutine symspec(k,ntrperiod,nsps,ingain,nb,nbslider,pxdb,s,red, &
|
|||||||
if(rms.gt.0.0) pxdb=20.0*log10(rms)
|
if(rms.gt.0.0) pxdb=20.0*log10(rms)
|
||||||
if(pxdb.gt.60.0) pxdb=60.0
|
if(pxdb.gt.60.0) pxdb=60.0
|
||||||
|
|
||||||
if(ja.gt.0) then
|
|
||||||
do i=0,nfft3-1 !Copy data into cx
|
do i=0,nfft3-1 !Copy data into cx
|
||||||
cx(i)=0.
|
cx(i)=0.
|
||||||
j=ja+i-(nfft3-1)
|
j=ja+i-(nfft3-1)
|
||||||
@ -133,7 +132,6 @@ subroutine symspec(k,ntrperiod,nsps,ingain,nb,nbslider,pxdb,s,red, &
|
|||||||
ssum(i)=ssum(i) + sx
|
ssum(i)=ssum(i) + sx
|
||||||
s(i)=sx
|
s(i)=sx
|
||||||
enddo
|
enddo
|
||||||
endif
|
|
||||||
|
|
||||||
999 continue
|
999 continue
|
||||||
|
|
||||||
|
@ -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"
|
||||||
|
Loading…
x
Reference in New Issue
Block a user