From 4684df897c3f032fe3e1a36ecaf3bc8da2ce28e3 Mon Sep 17 00:00:00 2001
From: Steven Franke <s.j.franke@icloud.com>
Date: Tue, 20 Sep 2016 20:47:29 +0000
Subject: [PATCH] Remove diagnostic write.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7103 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 lib/mskrtd.f90 | 1 -
 1 file changed, 1 deletion(-)

diff --git a/lib/mskrtd.f90 b/lib/mskrtd.f90
index 8df5439a8..bd3f8a5fd 100644
--- a/lib/mskrtd.f90
+++ b/lib/mskrtd.f90
@@ -143,7 +143,6 @@ subroutine mskrtd(id2,nutc0,tsec,ntol,line)
            call msk144decodeframe(ct,msgreceived,nsuccess)
 
            if(nsuccess .gt. 0) then
-write(*,*) nsuccess,msgreceived
              write(line,1020) nutc0,nsnr,tsec,nint(fest),msgreceived,char(0)
 1020         format(i6.6,i4,f5.1,i5,' ^ ',a22,a1)
              goto 999