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

Remove diagnostic prints.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3272 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor
2013-05-15 19:13:31 +00:00
parent 9d30c88a6f
commit 1fc406b8a0
3 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/decoder.f90
+3 -3
View File
@@ -141,8 +141,8 @@ subroutine decoder(ss,c0,nstandalone)
nsnr=nint(snrdb)
ndrift=nint(drift/df3)
write(38,3002) nutc,nsnr,i,freq,ccfred(i),schk,nlim,msg
3002 format(i4.4,i5,i6,f8.1,2f6.1,i9,2x,a22)
write(38,3002) nutc,nqd,nsnr,i,freq,ccfred(i),schk,nlim,msg
3002 format(i4.4,i2,i5,i6,f8.1,2f6.1,i9,2x,a22)
if(msg.ne.' ') then
if(nqd.eq.0) ndecodes0=ndecodes0+1
@@ -163,7 +163,7 @@ subroutine decoder(ss,c0,nstandalone)
call flush(6)
endif
else
write(38,3002) nutc,-99,i,freq,ccfred(i),schk,0
write(38,3002) nutc,nqd,-99,i,freq,ccfred(i),schk,0
endif
endif
enddo