From 09815826e2358b4a8f5843b9717f377622b9a971 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Fri, 20 Nov 2020 15:16:23 -0500 Subject: [PATCH] For Q65 with QSOprogress=3, reduce npasses to 2 (iaptype=3, 4 only); reduce APmast from 78 to 75 bits. --- lib/q65_decode.f90 | 1 - lib/qra/q65/q65_ap.f90 | 2 +- 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90 index 9f49868ca..347621026 100644 --- a/lib/q65_decode.f90 +++ b/lib/q65_decode.f90 @@ -120,7 +120,6 @@ contains where(apsym0.eq.-1) apsym0=0 npasses=2 - if(nQSOprogress.eq.3 .or.nQSOprogress.eq.4) npasses=4 if(nQSOprogress.eq.5) npasses=3 if(lapcqonly) npasses=1 iaptype=0 diff --git a/lib/qra/q65/q65_ap.f90 b/lib/qra/q65/q65_ap.f90 index b335153c3..6c56cd2f5 100644 --- a/lib/qra/q65/q65_ap.f90 +++ b/lib/qra/q65/q65_ap.f90 @@ -147,7 +147,7 @@ subroutine q65_ap(nQSOprogress,ipass,ncontest,lapcqonly,iaptype, & apmask=0 if(ncontest.le.5 .or. (ncontest.eq.7.and.iaptype.eq.6)) then apmask(1:78)=1 !MyCall, HisCall, RRR|73|RR73 - apmask(59:66)=0 !Reduce the rate of false decodes + apmask(72:74)=0 !Check for , RRR, RR73, 73 apsymbols(1:58)=apsym0 if(iaptype.eq.4) apsymbols(59:77)=mrrr if(iaptype.eq.5) apsymbols(59:77)=m73