w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2026-06-25 04:53:17 -04:00
Code Issues Packages Projects Releases Wiki Activity

Updates for compliance with gcc v10 and squash some warnings

Browse Source
This commit is contained in:
Bill Somerville
2020-05-07 14:57:05 +01:00
parent 268deb31fb
commit cf6893e56b
6 changed files with 17 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/ft4/ft4_downsample.f90
+1 -1
View File
@@ -31,7 +31,7 @@ subroutine ft4_downsample(dd,newdata,f0,c)
if(newdata) then
x=dd
call four2a(x,NMAX,1,-1,0) !r2c FFT to freq domain
call four2a(cx,NMAX,1,-1,0) !r2c FFT to freq domain
endif
i0=nint(f0/df)
c1=0.