59#if !defined(FFTW_NO_Complex) && defined(_Complex_I) && defined(complex) && defined(I)
60# define FFTW_DEFINE_COMPLEX(R, C) typedef R _Complex C
62# define FFTW_DEFINE_COMPLEX(R, C) typedef R C[2]
65#define FFTW_CONCAT(prefix, name) prefix ## name
66#define FFTW_MANGLE_DOUBLE(name) FFTW_CONCAT(fftw_, name)
67#define FFTW_MANGLE_FLOAT(name) FFTW_CONCAT(fftwf_, name)
68#define FFTW_MANGLE_LONG_DOUBLE(name) FFTW_CONCAT(fftwl_, name)
69#define FFTW_MANGLE_QUAD(name) FFTW_CONCAT(fftwq_, name)
80#if defined(FFTW_DLL) && (defined(_WIN32) || defined(__WIN32__))
82# if defined(COMPILING_FFTW)
83# define FFTW_EXTERN extern __declspec(dllexport)
85# define FFTW_EXTERN extern __declspec(dllimport)
88# define FFTW_EXTERN extern
91enum fftw_r2r_kind_do_not_use_me {
92 FFTW_R2HC=0, FFTW_HC2R=1, FFTW_DHT=2,
93 FFTW_REDFT00=3, FFTW_REDFT01=4, FFTW_REDFT10=5, FFTW_REDFT11=6,
94 FFTW_RODFT00=7, FFTW_RODFT01=8, FFTW_RODFT10=9, FFTW_RODFT11=10
110typedef void (*fftw_write_char_func_do_not_use_me)(
char c,
void *);
111typedef int (*fftw_read_char_func_do_not_use_me)(
void *);
122#define FFTW_DEFINE_API(X, R, C) \
124FFTW_DEFINE_COMPLEX(R, C); \
126typedef struct X(plan_s) *X(plan); \
128typedef struct fftw_iodim_do_not_use_me X(iodim); \
129typedef struct fftw_iodim64_do_not_use_me X(iodim64); \
131typedef enum fftw_r2r_kind_do_not_use_me X(r2r_kind); \
133typedef fftw_write_char_func_do_not_use_me X(write_char_func); \
134typedef fftw_read_char_func_do_not_use_me X(read_char_func); \
136FFTW_EXTERN void X(execute)(const X(plan) p); \
138FFTW_EXTERN X(plan) X(plan_dft)(int rank, const int *n, \
139 C *in, C *out, int sign, unsigned flags); \
141FFTW_EXTERN X(plan) X(plan_dft_1d)(int n, C *in, C *out, int sign, \
143FFTW_EXTERN X(plan) X(plan_dft_2d)(int n0, int n1, \
144 C *in, C *out, int sign, unsigned flags); \
145FFTW_EXTERN X(plan) X(plan_dft_3d)(int n0, int n1, int n2, \
146 C *in, C *out, int sign, unsigned flags); \
148FFTW_EXTERN X(plan) X(plan_many_dft)(int rank, const int *n, \
150 C *in, const int *inembed, \
151 int istride, int idist, \
152 C *out, const int *onembed, \
153 int ostride, int odist, \
154 int sign, unsigned flags); \
156FFTW_EXTERN X(plan) X(plan_guru_dft)(int rank, const X(iodim) *dims, \
158 const X(iodim) *howmany_dims, \
160 int sign, unsigned flags); \
161FFTW_EXTERN X(plan) X(plan_guru_split_dft)(int rank, const X(iodim) *dims, \
163 const X(iodim) *howmany_dims, \
164 R *ri, R *ii, R *ro, R *io, \
167FFTW_EXTERN X(plan) X(plan_guru64_dft)(int rank, \
168 const X(iodim64) *dims, \
170 const X(iodim64) *howmany_dims, \
172 int sign, unsigned flags); \
173FFTW_EXTERN X(plan) X(plan_guru64_split_dft)(int rank, \
174 const X(iodim64) *dims, \
176 const X(iodim64) *howmany_dims, \
177 R *ri, R *ii, R *ro, R *io, \
180FFTW_EXTERN void X(execute_dft)(const X(plan) p, C *in, C *out); \
181FFTW_EXTERN void X(execute_split_dft)(const X(plan) p, R *ri, R *ii, \
184FFTW_EXTERN X(plan) X(plan_many_dft_r2c)(int rank, const int *n, \
186 R *in, const int *inembed, \
187 int istride, int idist, \
188 C *out, const int *onembed, \
189 int ostride, int odist, \
192FFTW_EXTERN X(plan) X(plan_dft_r2c)(int rank, const int *n, \
193 R *in, C *out, unsigned flags); \
195FFTW_EXTERN X(plan) X(plan_dft_r2c_1d)(int n,R *in,C *out,unsigned flags); \
196FFTW_EXTERN X(plan) X(plan_dft_r2c_2d)(int n0, int n1, \
197 R *in, C *out, unsigned flags); \
198FFTW_EXTERN X(plan) X(plan_dft_r2c_3d)(int n0, int n1, \
200 R *in, C *out, unsigned flags); \
203FFTW_EXTERN X(plan) X(plan_many_dft_c2r)(int rank, const int *n, \
205 C *in, const int *inembed, \
206 int istride, int idist, \
207 R *out, const int *onembed, \
208 int ostride, int odist, \
211FFTW_EXTERN X(plan) X(plan_dft_c2r)(int rank, const int *n, \
212 C *in, R *out, unsigned flags); \
214FFTW_EXTERN X(plan) X(plan_dft_c2r_1d)(int n,C *in,R *out,unsigned flags); \
215FFTW_EXTERN X(plan) X(plan_dft_c2r_2d)(int n0, int n1, \
216 C *in, R *out, unsigned flags); \
217FFTW_EXTERN X(plan) X(plan_dft_c2r_3d)(int n0, int n1, \
219 C *in, R *out, unsigned flags); \
221FFTW_EXTERN X(plan) X(plan_guru_dft_r2c)(int rank, const X(iodim) *dims, \
223 const X(iodim) *howmany_dims, \
226FFTW_EXTERN X(plan) X(plan_guru_dft_c2r)(int rank, const X(iodim) *dims, \
228 const X(iodim) *howmany_dims, \
232FFTW_EXTERN X(plan) X(plan_guru_split_dft_r2c)( \
233 int rank, const X(iodim) *dims, \
235 const X(iodim) *howmany_dims, \
236 R *in, R *ro, R *io, \
238FFTW_EXTERN X(plan) X(plan_guru_split_dft_c2r)( \
239 int rank, const X(iodim) *dims, \
241 const X(iodim) *howmany_dims, \
242 R *ri, R *ii, R *out, \
245FFTW_EXTERN X(plan) X(plan_guru64_dft_r2c)(int rank, \
246 const X(iodim64) *dims, \
248 const X(iodim64) *howmany_dims, \
251FFTW_EXTERN X(plan) X(plan_guru64_dft_c2r)(int rank, \
252 const X(iodim64) *dims, \
254 const X(iodim64) *howmany_dims, \
258FFTW_EXTERN X(plan) X(plan_guru64_split_dft_r2c)( \
259 int rank, const X(iodim64) *dims, \
261 const X(iodim64) *howmany_dims, \
262 R *in, R *ro, R *io, \
264FFTW_EXTERN X(plan) X(plan_guru64_split_dft_c2r)( \
265 int rank, const X(iodim64) *dims, \
267 const X(iodim64) *howmany_dims, \
268 R *ri, R *ii, R *out, \
271FFTW_EXTERN void X(execute_dft_r2c)(const X(plan) p, R *in, C *out); \
272FFTW_EXTERN void X(execute_dft_c2r)(const X(plan) p, C *in, R *out); \
274FFTW_EXTERN void X(execute_split_dft_r2c)(const X(plan) p, \
275 R *in, R *ro, R *io); \
276FFTW_EXTERN void X(execute_split_dft_c2r)(const X(plan) p, \
277 R *ri, R *ii, R *out); \
279FFTW_EXTERN X(plan) X(plan_many_r2r)(int rank, const int *n, \
281 R *in, const int *inembed, \
282 int istride, int idist, \
283 R *out, const int *onembed, \
284 int ostride, int odist, \
285 const X(r2r_kind) *kind, unsigned flags); \
287FFTW_EXTERN X(plan) X(plan_r2r)(int rank, const int *n, R *in, R *out, \
288 const X(r2r_kind) *kind, unsigned flags); \
290FFTW_EXTERN X(plan) X(plan_r2r_1d)(int n, R *in, R *out, \
291 X(r2r_kind) kind, unsigned flags); \
292FFTW_EXTERN X(plan) X(plan_r2r_2d)(int n0, int n1, R *in, R *out, \
293 X(r2r_kind) kind0, X(r2r_kind) kind1, \
295FFTW_EXTERN X(plan) X(plan_r2r_3d)(int n0, int n1, int n2, \
296 R *in, R *out, X(r2r_kind) kind0, \
297 X(r2r_kind) kind1, X(r2r_kind) kind2, \
300FFTW_EXTERN X(plan) X(plan_guru_r2r)(int rank, const X(iodim) *dims, \
302 const X(iodim) *howmany_dims, \
304 const X(r2r_kind) *kind, unsigned flags); \
306FFTW_EXTERN X(plan) X(plan_guru64_r2r)(int rank, const X(iodim64) *dims, \
308 const X(iodim64) *howmany_dims, \
310 const X(r2r_kind) *kind, unsigned flags); \
312FFTW_EXTERN void X(execute_r2r)(const X(plan) p, R *in, R *out); \
314FFTW_EXTERN void X(destroy_plan)(X(plan) p); \
315FFTW_EXTERN void X(forget_wisdom)(void); \
316FFTW_EXTERN void X(cleanup)(void); \
318FFTW_EXTERN void X(set_timelimit)(double t); \
320FFTW_EXTERN void X(plan_with_nthreads)(int nthreads); \
321FFTW_EXTERN int X(init_threads)(void); \
322FFTW_EXTERN void X(cleanup_threads)(void); \
323FFTW_EXTERN void X(make_planner_thread_safe)(void); \
325FFTW_EXTERN int X(export_wisdom_to_filename)(const char *filename); \
326FFTW_EXTERN void X(export_wisdom_to_file)(FILE *output_file); \
327FFTW_EXTERN char *X(export_wisdom_to_string)(void); \
328FFTW_EXTERN void X(export_wisdom)(X(write_char_func) write_char, \
330FFTW_EXTERN int X(import_system_wisdom)(void); \
331FFTW_EXTERN int X(import_wisdom_from_filename)(const char *filename); \
332FFTW_EXTERN int X(import_wisdom_from_file)(FILE *input_file); \
333FFTW_EXTERN int X(import_wisdom_from_string)(const char *input_string); \
334FFTW_EXTERN int X(import_wisdom)(X(read_char_func) read_char, void *data); \
336FFTW_EXTERN void X(fprint_plan)(const X(plan) p, FILE *output_file); \
337FFTW_EXTERN void X(print_plan)(const X(plan) p); \
338FFTW_EXTERN char *X(sprint_plan)(const X(plan) p); \
340FFTW_EXTERN void *X(malloc)(size_t n); \
341FFTW_EXTERN R *X(alloc_real)(size_t n); \
342FFTW_EXTERN C *X(alloc_complex)(size_t n); \
343FFTW_EXTERN void X(free)(void *p); \
345FFTW_EXTERN void X(flops)(const X(plan) p, \
346 double *add, double *mul, double *fmas); \
347FFTW_EXTERN double X(estimate_cost)(const X(plan) p); \
348FFTW_EXTERN double X(cost)(const X(plan) p); \
350FFTW_EXTERN int X(alignment_of)(R *p); \
351FFTW_EXTERN const char X(version)[]; \
352FFTW_EXTERN const char X(cc)[]; \
353FFTW_EXTERN const char X(codelet_optim)[];
358FFTW_DEFINE_API(FFTW_MANGLE_DOUBLE,
double, fftw_complex)
359FFTW_DEFINE_API(FFTW_MANGLE_FLOAT,
float, fftwf_complex)
360FFTW_DEFINE_API(FFTW_MANGLE_LONG_DOUBLE,
long double, fftwl_complex)
364#if (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 6)) \
365 && !(defined(__ICC) || defined(__INTEL_COMPILER) || defined(__CUDACC__) || defined(__PGI)) \
366 && (defined(__i386__) || defined(__x86_64__) || defined(__ia64__))
367# if !defined(FFTW_NO_Complex) && defined(_Complex_I) && defined(complex) && defined(I)
373# undef FFTW_DEFINE_COMPLEX
374# define FFTW_DEFINE_COMPLEX(R, C) typedef _Complex float __attribute__((mode(TC))) C
376FFTW_DEFINE_API(FFTW_MANGLE_QUAD, __float128, fftwq_complex)
379#define FFTW_FORWARD (-1)
380#define FFTW_BACKWARD (+1)
382#define FFTW_NO_TIMELIMIT (-1.0)
385#define FFTW_MEASURE (0U)
386#define FFTW_DESTROY_INPUT (1U << 0)
387#define FFTW_UNALIGNED (1U << 1)
388#define FFTW_CONSERVE_MEMORY (1U << 2)
389#define FFTW_EXHAUSTIVE (1U << 3)
390#define FFTW_PRESERVE_INPUT (1U << 4)
391#define FFTW_PATIENT (1U << 5)
392#define FFTW_ESTIMATE (1U << 6)
393#define FFTW_WISDOM_ONLY (1U << 21)
396#define FFTW_ESTIMATE_PATIENT (1U << 7)
397#define FFTW_BELIEVE_PCOST (1U << 8)
398#define FFTW_NO_DFT_R2HC (1U << 9)
399#define FFTW_NO_NONTHREADED (1U << 10)
400#define FFTW_NO_BUFFERING (1U << 11)
401#define FFTW_NO_INDIRECT_OP (1U << 12)
402#define FFTW_ALLOW_LARGE_GENERIC (1U << 13)
403#define FFTW_NO_RANK_SPLITS (1U << 14)
404#define FFTW_NO_VRANK_SPLITS (1U << 15)
405#define FFTW_NO_VRECURSE (1U << 16)
406#define FFTW_NO_SIMD (1U << 17)
407#define FFTW_NO_SLOW (1U << 18)
408#define FFTW_NO_FIXED_RADIX_LARGE_N (1U << 19)
409#define FFTW_ALLOW_PRUNING (1U << 20)