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

Remove an incorrect cdat=0.

Browse Source
This commit is contained in:
Joe Taylor 2024-01-31 13:03:21 -05:00
parent cc005bf69b
commit 9d882e01e5
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lib/superfox/gen_sfox.f90
View File

@ -44,7 +44,6 @@ subroutine gen_sfox(idat,f0,fsample,syncwidth,cdat,clo)
! Sync waveform ! Sync waveform
a1=f0 + syncwidth/2.0 !Frequency at midpoint of sync waveform a1=f0 + syncwidth/2.0 !Frequency at midpoint of sync waveform
a2=2.0*syncwidth/tsync !Frequency drift rate a2=2.0*syncwidth/tsync !Frequency drift rate
cdat=0.
do i=1,nsync do i=1,nsync
j=j+1 j=j+1
if(i.eq.nsync/2+1) a2=-a2 !Reverse sign of drift at midpoint if(i.eq.nsync/2+1) a2=-a2 !Reverse sign of drift at midpoint