From 5d097b8c2b4ad394821da8ec6718421145265de8 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sun, 9 May 2021 16:35:12 -0400 Subject: [PATCH] Improved JT65 decoding performance when input signal level is well above "normal". --- map65/libm65/map65a.f90 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/map65/libm65/map65a.f90 b/map65/libm65/map65a.f90 index e45aec9ef..8886b61d8 100644 --- a/map65/libm65/map65a.f90 +++ b/map65/libm65/map65a.f90 @@ -125,7 +125,8 @@ subroutine map65a(dd,ss,savg,newdat,nutc,fcenter,ntol,idphi,nfa,nfb, & if(nqd.lt.2) then ! Look for JT65 sync patterns and shorthand square-wave patterns. call timer('ccf65 ',0) - ssmax=smax + ! ssmax=smax + ssmax=1.e30 call ccf65(ss(1,1,i),nhsym,ssmax,sync1,ipol,jpz,dt, & flipk,syncshort,snr2,ipol2,dt2) call timer('ccf65 ',1)