From 7180c40754369f4b461806feaabb33a53dd10951 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Fri, 5 Feb 2021 14:03:18 -0500 Subject: [PATCH] Fix the source of a bounds error in JT4 decoder. (Why was this not a problem in v2.3?) --- lib/sync4.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/sync4.f90 b/lib/sync4.f90 index 9bfe6c60b..3d2974f64 100644 --- a/lib/sync4.f90 +++ b/lib/sync4.f90 @@ -85,7 +85,7 @@ subroutine sync4(dat,jz,ntol,nfqso,mode,mode4,minwidth,dtx,dfx,snrx, & enddo if(syncbest.lt.-1.e29) go to 900 ccfred=red - call pctile(ccfred(iaa:ibb),ibb-iaa+1,45,base) + call pctile(ccfred(ia:ib),ib-ia+1,45,base) ccfred=ccfred-base dfx=ipk*df