w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-02-03 09:44:24 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix an off-by-one error.

Browse Source
This commit is contained in:
Steve Franke 2019-01-30 19:19:38 -06:00
parent 9f909b6b1b
commit fdb84c0e63
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/ft4/sync4d.f90
View File

@ -35,9 +35,9 @@ subroutine sync4d(cd0,i0,ctwk,itwk,sync)
sync=0
i1=i0 !four Costas arrays
i2=i0+33*NSS-1
i3=i0+66*NSS-1
i4=i0+99*NSS-1
i2=i0+33*NSS
i3=i0+66*NSS
i4=i0+99*NSS
csync2=csync
if(itwk.eq.1) csync2=ctwk*csync2 !Tweak the frequency
if(i1.ge.0 .and. i1+4*NSS-1.le.NP-1) z1=sum(cd0(i1:i1+4*NSS-1)*conjg(csync2))