Leave global FFTW3 clean up to main programs

2026-06-02 22:14:56 -04:00 · 2021-01-26 21:34:10 +00:00
parent 33db1ec63e
commit bd02e367f2
1 changed files with 0 additions and 1 deletions
@@ -107,7 +107,6 @@ subroutine four2a(a,nfft,ndim,isign,iform)
        !$omp end critical(fftw)
     end if
  enddo
-  call fftwf_cleanup()
  nplan=0
  !$omp end critical(four2a)