From 3aef19d91efb8ea74e4f54a02885ff3af0be1128 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sat, 6 Oct 2012 01:09:43 +0000 Subject: [PATCH] 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 --- lib/jt9.f90 | 12 ++++++++++++ mainwindow.cpp | 2 +- 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/lib/jt9.f90 b/lib/jt9.f90 index 663f196b4..2be912a6f 100644 --- a/lib/jt9.f90 +++ b/lib/jt9.f90 @@ -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 diff --git a/mainwindow.cpp b/mainwindow.cpp index 4724e2ff0..5dc3f045e 100644 --- a/mainwindow.cpp +++ b/mainwindow.cpp @@ -1,4 +1,4 @@ -//-------------------------------------------------------------- MainWindow +//--------------------------------------------------------------- MainWindow #include "mainwindow.h" #include "ui_mainwindow.h" #include "devsetup.h"