Remove diagnostic write to LU 83.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7382 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2016-12-15 18:46:30 +00:00
parent d3ee8af01b
commit 4a132c59ee
1 changed files with 0 additions and 4 deletions

View File

@ -150,9 +150,5 @@ subroutine qra64a(dd,npts,nutc,nf1,nf2,nfqso,ntol,mode64,minsync,ndepth, &
endif
call timer('qra64a ',1)
write(83,4001) nutc,sync,sync2,b90,width,b90/width,nsnr,dtx,nfreq,decoded,nft-100
4001 format(i4.4,5f6.1,i4,f6.2,i5,1x,a22,i3)
return
end subroutine qra64a