w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-11-03 13:30:52 -05:00
Code Issues Packages Projects Releases Wiki Activity

Merge branch 'superfox' of bitbucket.org:k1jt/wsjtx into superfox

Browse Source
This commit is contained in:
Joe Taylor 2024-02-19 14:33:04 -05:00
commit cc6e7b1c16
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/ft8/watterson.f90
View File

@ -24,7 +24,7 @@ subroutine watterson(c,npts,nsig,fs,delay,fspread)
do i=0,npts-1 do i=0,npts-1
f=i*df f=i*df
if(i.gt.npts/2) f=(i-npts)*df if(i.gt.npts/2) f=(i-npts)*df
x=(f/(0.707*fspread))**2 x=(f/fspread)**2
a=0. a=0.
if(x.le.50.0) then if(x.le.50.0) then
a=exp(-x) a=exp(-x)