diff --git a/lib/qra/q65/q65_sync.f90 b/lib/qra/q65/q65_sync.f90
index e04069689..48ca0a727 100644
--- a/lib/qra/q65/q65_sync.f90
+++ b/lib/qra/q65/q65_sync.f90
@@ -167,7 +167,7 @@ subroutine q65_sync(nutc,iwave,ntrperiod,mode_q65,codewords,ncw,nsps,   &
      endif
      n=n+1
      if(j.ge.1 .and. j.le.jz) then
-        do i=0,LL
+        do i=0,LL-1
            s3(i-64,n)=s1(i+i1,j)
         enddo
      endif