Add calls to timer().

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3470 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2013-07-09 16:22:25 +00:00
parent c2c2b752d9
commit 1881cc1bb1
3 changed files with 19 additions and 1 deletions

View File

@ -23,7 +23,9 @@ subroutine downsam9(id2,npts8,nsps8,newdat,nspsd,fpk,c2,nz2)
x1(i)=fac*id2(i)
enddo
x1(npts:nfft1-1)=0. !Zero the rest of x1
call timer('fft_forw',0)
call four2a(c1,nfft1,1,-1,0) !Forward FFT, r2c
call timer('fft_forw',1)
nadd=1.0/df1
s=0.
@ -45,7 +47,9 @@ subroutine downsam9(id2,npts8,nsps8,newdat,nspsd,fpk,c2,nz2)
nw=100
ia=max(1,nf-nw)
ib=min(5000,nf+nw)
call timer('pctile_1',0)
call pctile(s(ia),ib-ia+1,40,avenoise)
call timer('pctile_1',1)
fac=sqrt(1.0/avenoise)
do i=0,nfft2-1
@ -53,7 +57,9 @@ subroutine downsam9(id2,npts8,nsps8,newdat,nspsd,fpk,c2,nz2)
if(i.gt.nh2) j=j-nfft2
c2(i)=fac*c1(j)
enddo
call timer('fft_back',0)
call four2a(c2,nfft2,1,1,1) !FFT back to time domain
call timer('fft_back',1)
nz2=8*npts8/ndown
return

View File

@ -15,24 +15,36 @@ subroutine softsym(id2,npts8,nsps8,newdat,fpk,syncpk,snrdb,xdt, &
ndown=nsps8/nspsd
! Mix, low-pass filter, and downsample to 16 samples per symbol
call timer('downsam9',0)
call downsam9(id2,npts8,nsps8,newdat,nspsd,fpk,c2,nz2)
call timer('downsam9',1)
call timer('peakdt9 ',0)
call peakdt9(c2,nz2,nsps8,nspsd,c3,nz3,xdt) !Find DT
call timer('peakdt9 ',1)
fsample=1500.0/ndown
a=0.
call timer('afc9 ',0)
call afc9(c3,nz3,fsample,a,syncpk) !Find deltaF, fDot, fDDot
call timer('afc9 ',1)
freq=fpk - a(1)
drift=-2.0*a(2)
call timer('twkfreq ',0)
call twkfreq(c3,c5,nz3,fsample,a) !Correct for delta f, f1, f2 ==> a(1:3)
call timer('twkfreq ',1)
! Compute soft symbols (in scrambled order)
call timer('symspec2',0)
call symspec2(c5,nz3,nsps8,nspsd,fsample,freq,drift,snrdb,schk, &
i1SoftSymbolsScrambled)
call timer('symspec2',1)
! Remove interleaving
call timer('interlv9',0)
call interleave9(i1SoftSymbolsScrambled,-1,i1SoftSymbols)
call timer('interlv9',1)
return
end subroutine softsym

View File

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