w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2026-06-04 06:54:47 -04:00
Code Issues Packages Projects Releases Wiki Activity

Code cleanup.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@2752 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor
2012-11-19 18:49:21 +00:00
parent 561acda6f7
commit 87897dc7de
2 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/decoder.f90
+1 -2
View File
@@ -94,8 +94,7 @@ subroutine decoder(ntrSeconds,ndepth,nRxLog,c00)
df8=1500.0/(nsps/8)
sbest=0.
10 continue
ii=maxloc(ccfred(ia:ib))
10 ii=maxloc(ccfred(ia:ib))
i=ii(1) + ia - 1
f=(i-1)*df3
if((i.eq.ipk .or. ccfred(i).ge.3.0) .and. abs(f-fgood).gt.10.0*df8) then