w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-29 04:42:28 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix an off-by-1 bug introduced in the previous commit.

Browse Source
This commit is contained in:
Joe Taylor 2021-01-03 11:18:14 -05:00
parent 04b22ce250
commit a02cbabb99
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/qra/q65/q65_sync.f90
View File

@ -167,7 +167,7 @@ subroutine q65_sync(nutc,iwave,ntrperiod,mode_q65,codewords,ncw,nsps, &
endif endif
n=n+1 n=n+1
if(j.ge.1 .and. j.le.jz) then 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) s3(i-64,n)=s1(i+i1,j)
enddo enddo
endif endif