2022-05-27 10:33:06 +05:30
|
|
|
!--------------------------------------------------------------------------------------------------
|
|
|
|
|
!> @author Martin Diehl, KU Leuven
|
|
|
|
|
!> @brief Wrap FFTW3 into a module.
|
|
|
|
|
!--------------------------------------------------------------------------------------------------
|
|
|
|
|
module FFTW3
|
|
|
|
|
use, intrinsic :: ISO_C_binding
|
|
|
|
|
|
2022-06-22 02:16:54 +05:30
|
|
|
implicit none(type,external)
|
2022-05-27 10:33:06 +05:30
|
|
|
public
|
|
|
|
|
|
|
|
|
|
include 'fftw3-mpi.f03'
|
|
|
|
|
|
|
|
|
|
end module FFTW3
|
