Change to symspec() was not a good idea.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3273 ab8295b8-cf94-4d9e-aec4-7959e3be5d79

lib/symspec.f90

@@ -86,8 +86,8 @@ subroutine symspec(k,ntrperiod,nsps,ingain,nb,nbslider,pxdb,s,red,    &
   peaklimit=sigmas*max(10.0,rms)
   px=0.
 
-!  nwindow=2
-  nwindow=0                                    !### No windowing ###
+  nwindow=2
+!  nwindow=0                                    !### No windowing ###
   kstep1=NFFT1
   if(nwindow.ne.0) kstep1=NFFT1/2
   fac=2.0/NFFT1
@@ -97,11 +97,11 @@ subroutine symspec(k,ntrperiod,nsps,ingain,nb,nbslider,pxdb,s,red,    &
      do i=1,NFFT1
         x0(i)=gain*id2(k1+i)
      enddo
-!     call timf2(x0,k,NFFT1,nwindow,nb,peaklimit,x1,   &
-!          slimit,lstrong,px,nzap)
+     call timf2(x0,k,NFFT1,nwindow,nb,peaklimit,x1,   &
+          slimit,lstrong,px,nzap)
 
 ! Mix at 1500 Hz, lowpass at +/-750 Hz, and downsample to 1500 Hz complex.
-     x2(106:105+kstep1)=x0(1:kstep1)
+     x2(106:105+kstep1)=x1(1:kstep1)
      call fil3(x2,kstep1+105,c0(k8+1),n2)
      x2(1:105)=x1(kstep1-104:kstep1)   !Save 105 trailing samples
      k1=k1+kstep1
@@ -152,7 +152,6 @@ subroutine symspec(k,ntrperiod,nsps,ingain,nb,nbslider,pxdb,s,red,    &
   call pctile(ssum,iz,npct,xmed1)
   fac1=fac00/max(xmed1,0.006*ihsym)
   savg(1:iz)=fac1*ssum(1:iz)
-  savg(iz+1:iz+20)=savg(iz)
   call redsync(ss,ntrperiod,ihsym,iz,red)
 
   return

mainwindow.cpp

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