w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-17 09:31:59 -05:00
Code Issues Packages Projects Releases Wiki Activity

I was too strict on the sync2 and width limits. This is much better for QRA64E!

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7407 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2016-12-19 20:14:31 +00:00
parent 7dbcc1ba4a
commit d9f120c967
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/qra64a.f90
View File

@ -64,7 +64,7 @@ subroutine qra64a(dd,npts,nutc,nf1,nf2,nfqso,ntol,mode64,minsync,ndepth, &
call sync64(c00,nf1,nf2,nfqso,ntol,mode64,dtx,f0,jpk0,sync,sync2,width) call sync64(c00,nf1,nf2,nfqso,ntol,mode64,dtx,f0,jpk0,sync,sync2,width)
call timer('sync64 ',1) call timer('sync64 ',1)
nfreq=nint(f0) nfreq=nint(f0)
if((sync-3.4).lt.float(minsync) .or. sync2.lt.-2.0 .or.width.gt.240.0) go to 900 if((sync-3.4).lt.float(minsync) .or. sync2.lt.-5.0 .or.width.gt.340.0) go to 900
a=0. a=0.
a(1)=-f0 a(1)=-f0
npts2=npts/2 npts2=npts/2