mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-03-22 12:08:43 -04:00
Best (and simplest) performance is with FFTW npatience=0 and no threading.
This commit is contained in:
parent
42f322e461
commit
f93d846c22
@ -14,7 +14,7 @@ subroutine fftbig(dd,nmax)
|
||||
logical first
|
||||
common/cacb/ca
|
||||
equivalence (rfilt,cfilt)
|
||||
data first/.true./,npatience/1/
|
||||
data first/.true./,npatience/0/
|
||||
save
|
||||
|
||||
if(nmax.lt.0) go to 900
|
||||
|
@ -16,9 +16,5 @@ subroutine ftninit
|
||||
open(17,file=appd//'/red.dat',status='unknown')
|
||||
open(19,file=appd//'/livecq.txt',status='unknown')
|
||||
|
||||
iret=fftwf_init_threads() !Initialize FFTW threading
|
||||
! Default to 1 thread, but use nthreads for the big ones
|
||||
call fftwf_plan_with_nthreads(1)
|
||||
|
||||
return
|
||||
end subroutine ftninit
|
||||
|
Loading…
Reference in New Issue
Block a user