Correct the data in c0(). Decoder now works! (These corrections should

really be made in symspec...)


git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@2652 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2012-10-06 01:09:43 +00:00
parent 5be113d122
commit d3a25404a8
2 changed files with 13 additions and 1 deletions

View File

@ -90,6 +90,18 @@ program jt9
10 continue
! Fix up the data in c0()
twopi=8.0*atan(1.0)
phi=0.
dphi=twopi*500.0/1500.0
do i=1,npts8
phi=phi+dphi
if(phi.gt.twopi) phi=phi-twopi
if(phi.lt.-twopi) phi=phi+twopi
c0(i)=cmplx(aimag(c0(i)),real(c0(i)))*cmplx(cos(phi),sin(phi))
enddo
! Now do the decoding
nutc=nutc0
nstandalone=1
call sync9(ss,tstep,f0a,df3,fpk) !Find sig, get rough freq

View File

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