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

2025-04-21 18:59:00 -04:00 · 2024-02-19 14:33:04 -05:00 · 2024-02-19 14:33:04 -05:00 · cc6e7b1c16
commit cc6e7b1c16
parent 2a95463c80 2346145fba
1 changed files with 1 additions and 1 deletions
--- a/lib/ft8/watterson.f90
+++ b/lib/ft8/watterson.f90
@ -24,7 +24,7 @@ subroutine watterson(c,npts,nsig,fs,delay,fspread)
     do i=0,npts-1
        f=i*df
        if(i.gt.npts/2) f=(i-npts)*df
-        x=(f/(0.707*fspread))**2
+        x=(f/fspread)**2
        a=0.
        if(x.le.50.0) then
           a=exp(-x)