From 8ce9f91fb6f3d1aec95faec3b1cac610cb49dbb1 Mon Sep 17 00:00:00 2001 From: Joe Taylor <k1jt@arrl.org> Date: Sat, 14 Jan 2006 19:44:53 +0000 Subject: [PATCH] Corrected the zero-data test in spec2d.f. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/trunk@105 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- spec2d.f | 8 ++++---- wsjt.py | 2 +- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/spec2d.f b/spec2d.f index c0df82ac5..47611ccfd 100644 --- a/spec2d.f +++ b/spec2d.f @@ -44,10 +44,6 @@ C Accumulate average spectrum for the whole file. psavg0(i) = psavg0(i)+ real(c(i))**2 + imag(c(i))**2 enddo enddo - if(sum.eq.0.0) then - sigma=-999. - go to 999 - endif C Normalize and save a copy of psavg0 for plotting. Roll off the C spectrum at 300 and 3000 Hz. @@ -77,6 +73,10 @@ C Compute an average spectrum from the weakest 25% of time slices. do i=6,59 sum=sum+ps2(i) enddo + if(sum.eq.0.0) then + sigma=-999. + go to 999 + endif C Compute a smoothed spectrum without local peaks, and find its max. smaxx=0. diff --git a/wsjt.py b/wsjt.py index 4fd987e84..89c940248 100644 --- a/wsjt.py +++ b/wsjt.py @@ -1,4 +1,4 @@ -#------------------------------------------------------------- WSJT +#-------------------------------------------------------------- WSJT from Tkinter import * from tkFileDialog import * import Pmw