w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-22 04:11:16 -05:00
Code Issues Packages Projects Releases Wiki Activity

For now, at least, revert to NFILT=4000 in subtractft8.f90.

Browse Source
This commit is contained in:
Joe Taylor 2022-01-08 14:20:55 -05:00
parent 99861082f2
commit 500e565d77
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/subtractft8.f90
View File

@ -8,7 +8,7 @@ subroutine subtractft8(dd0,itone,f0,dt,lrefinedt)
! Subtract : dd(t) = dd(t) - 2*REAL{cref*cfilt} ! Subtract : dd(t) = dd(t) - 2*REAL{cref*cfilt}
parameter (NMAX=15*12000,NFRAME=1920*79) parameter (NMAX=15*12000,NFRAME=1920*79)
parameter (NFFT=NMAX,NFILT=6500) parameter (NFFT=NMAX,NFILT=4000)
real dd(NMAX),dd0(NMAX) real dd(NMAX),dd0(NMAX)
real window(-NFILT/2:NFILT/2) real window(-NFILT/2:NFILT/2)
real x(NFFT+2) real x(NFFT+2)