Oops! Fix def'n of contingent xmed in sync9.f90.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@2710 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
2012-10-31 19:21:46 +00:00 · 2012-10-31 19:21:46 +00:00 · b7633f3a11
parent 08c1567516
commit b7633f3a11
4 changed files with 4 additions and 3 deletions
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@ -76,6 +76,7 @@ subroutine decoder(ntrSeconds,ndepth,nRxLog,c0)
        snr=10.0*log10(ccfred(i)) - 10.0*log10(2500.0/df3) + 2.0
        sync=ccfred(i) - 2.0
        if(sync.lt.0.0) sync=0.0
+        print*,f,ccfred(i),sync,snr,msg
        nsync=sync
        if(nsync.gt.10) nsync=10
        nsnr=nint(snr)
--- a/lib/sync9.f90
+++ b/lib/sync9.f90
@ -45,7 +45,7 @@ subroutine sync9(ss,tstep,df3,ntol,nfqso,ccfred,ia,ib,ipkbest)
  enddo

  call pctile(ccfred(ia),ib-ia+1,50,xmed)
-  if(xmed.le.1.0) xmed=1.0
+  if(xmed.le.0.0) xmed=1.0
  ccfred=ccfred/xmed

  return
--- a/mainwindow.cpp
+++ b/mainwindow.cpp
@ -1,4 +1,4 @@
-//--------------------------------------------------------------- MainWindow
+//-------------------------------------------------------------- MainWindow
 #include "mainwindow.h"
 #include "ui_mainwindow.h"
 #include "devsetup.h"
--- a/wsjtx.iss
+++ b/wsjtx.iss
@ -1,6 +1,6 @@
 [Setup]
 AppName=wsjtx
-AppVerName=wsjtx Version 0.2 r2708
+AppVerName=wsjtx Version 0.2 r2709
 AppCopyright=Copyright (C) 2001-2012 by Joe Taylor, K1JT
 DefaultDirName=c:\wsjtx
 DefaultGroupName=wsjtx