19 USE iso_c_binding,
ONLY: c_null_ptr,&
25 PUBLIC :: fft_plan_type
29 INTEGER :: fft_type = -1
31 LOGICAL :: trans = .false., fft_in_place = .false., valid = .false., separated_plans = .false.
32 INTEGER :: n = -1, m = -1
33 INTEGER,
DIMENSION(3) :: n_3d = -1
36 TYPE(C_PTR) :: fftw_plan = c_null_ptr
44 TYPE(C_PTR) :: fftw_plan_nx = c_null_ptr, fftw_plan_ny = c_null_ptr, fftw_plan_nz = c_null_ptr
46 TYPE(C_PTR) :: fftw_plan_nx_r = c_null_ptr, fftw_plan_ny_r = c_null_ptr, fftw_plan_nz_r = c_null_ptr
48 END TYPE fft_plan_type
Type to store data about a (1D or 3D) FFT, including FFTW plan.