From f421ca57b7432a48b6554c133300fcb7bdc6567f Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Fri, 18 Dec 2015 21:36:49 +0000 Subject: [PATCH] Use sync rather than nsync, for better resolution. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6298 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/stats.f90 | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) diff --git a/lib/stats.f90 b/lib/stats.f90 index a9b962f7b..3a099116c 100644 --- a/lib/stats.f90 +++ b/lib/stats.f90 @@ -31,16 +31,17 @@ program stats nbadsync=0 do iline=1,999999 - read(10,1010,end=100) nutc,nsync,nsnr,dt,nfreq,ncandidates,nhard, & + read(10,1010,end=100) nutc,sync,nsnr,dt,nfreq,ncandidates,nhard, & ntotal,ntry,naggressive,nft,nqual,decoded -1010 format(i4.4,i3,i4,f6.2,i5,i7,i3,i4,i8,i3,i2,i5,1x,a22) - ndfreq=9999 - do ifreq=600,2400,200 - n=abs(nfreq-ifreq) - if(n.lt.ndfreq) ndfreq=n - enddo +1010 format(i4.4,f6.2,i4,f6.2,i5,i7,i3,i4,i8,i3,i2,i5,1x,a22) +! ndfreq=9999 +! do ifreq=600,2400,200 +! n=abs(nfreq-ifreq) +! if(n.lt.ndfreq) ndfreq=n +! enddo + ndfreq=abs(nfreq-1500) - if(nsync.ge.3 .and. abs(dt).le.ttol .and. ndfreq.le.nftol) then + if(sync.ge.1.0 .and. abs(dt).le.ttol .and. ndfreq.le.nftol) then nsynced=nsynced+1 else nbadsync=nbadsync+1