From 994e00c5d20a27fd21106549300d30bb11d5d9f6 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Mon, 1 Nov 2021 10:22:41 -0400 Subject: [PATCH] Adjust the and-correction numbers for averaged Q65 decodes. --- lib/qra/q65/q65.f90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/qra/q65/q65.f90 b/lib/qra/q65/q65.f90 index 0d9d09d16..b0ed85d8d 100644 --- a/lib/qra/q65/q65.f90 +++ b/lib/qra/q65/q65.f90 @@ -785,9 +785,9 @@ subroutine q65_snr(dat4,dtdec,f0dec,mode_q65,nused,snr2) sig_area=sum(spec(ia+nsum:ib-nsum)-1.0) w_equiv=sig_area/(smax-1.0) snr2=db(max(1.0,sig_area)) - db(2500.0/df) - if(nused.eq.2) snr2=snr2 - 2.0 - if(nused.eq.3) snr2=snr2 - 2.9 - if(nused.ge.4) snr2=snr2 - 3.5 + if(nused.eq.2) snr2=snr2 - 1.5 + if(nused.eq.3) snr2=snr2 - 2.4 + if(nused.ge.4) snr2=snr2 - 3.0 return end subroutine q65_snr