Reject a7 decodes of the form "CQ <std_call>" with no grid.

This commit is contained in:
Joe Taylor 2022-02-15 16:28:19 -05:00
parent 2545103ba5
commit 5dc70b18db
1 changed files with 1 additions and 0 deletions

View File

@ -369,6 +369,7 @@ subroutine ft8_a7d(dd0,newdat,call_1,call_2,grid4,xdt,f1,nharderrors,dmin, &
!3041 format(i3,2f7.1,f7.2,f7.1,1x,a)
if(dmin.gt.100.0 .or. dmin2/dmin.lt.1.3) nharderrors=-1
msg37=msgbest
if(msg37(1:3).eq.'CQ ' .and. std_2 .and. grid4.eq.' ') nharderrors=-1
return
end subroutine ft8_a7d