From 53f062c9f923bc5419c87d7023100fe34fbcf5af Mon Sep 17 00:00:00 2001 From: Pavel Demin Date: Thu, 14 Feb 2019 20:57:18 +0100 Subject: [PATCH] filter out empty callsigns --- ft8d.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ft8d.f90 b/ft8d.f90 index 1628181..b1935cb 100644 --- a/ft8d.f90 +++ b/ft8d.f90 @@ -71,7 +71,7 @@ program ft8d nsnr=nint(xsnr) xdt=xdt-0.5 hd=nharderrors+dmin - if(nbadcrc.eq.0.and.msgcall(1:1).ne.'<') then + if(nbadcrc.eq.0.and.msgcall(1:1).ne.' '.and.msgcall(1:1).ne.'<') then ldupe=.false. do id=1,ndecodes if(msg37.eq.allmessages(id).and.nsnr.le.allsnrs(id)) ldupe=.true.