2018-10-25 17:25:39 +00:00
|
|
|
#ifndef DSPL_INTERNAL_H
|
|
|
|
#define DSPL_INTERNAL_H
|
|
|
|
|
|
|
|
|
|
|
|
#define DSPL_FARROW_LAGRANGE_COEFF 0.16666666666666666666666666666667
|
|
|
|
|
|
|
|
#define DSPL_RAND_MOD_X1 2147483647
|
|
|
|
#define DSPL_RAND_MOD_X2 2145483479
|
|
|
|
|
|
|
|
|
|
|
|
void transpose(double* a, int n, int m, double* b);
|
|
|
|
void transpose_cmplx(complex_t* a, int n, int m, complex_t* b);
|
|
|
|
void transpose_hermite(complex_t* a, int n, int m, complex_t* b);
|
|
|
|
|
|
|
|
int fft_bit_reverse(complex_t* x, complex_t* y, int n, int p2);
|
|
|
|
int fft_dit(fft_t *pfft, int n, complex_t* y);
|
|
|
|
void fft_dit_krn(complex_t *x0, complex_t *x1, complex_t *w, int n,
|
|
|
|
complex_t *y0, complex_t *y1);
|
|
|
|
|
|
|
|
int fft_p2(int n);
|
2018-12-10 20:37:31 +00:00
|
|
|
|
|
|
|
|
2018-10-25 17:25:39 +00:00
|
|
|
void dft2 (complex_t *x, complex_t* y);
|
|
|
|
|
2018-12-10 20:37:31 +00:00
|
|
|
#define DFT3_W 0.866025403784439
|
|
|
|
void dft3 (complex_t *x, complex_t* y);
|
|
|
|
|
|
|
|
void dft4 (complex_t *x, complex_t* y);
|
|
|
|
|
|
|
|
#define DFT5_W1 -1.250000000000000
|
|
|
|
#define DFT5_W2 0.559016994374947
|
|
|
|
#define DFT5_W3 1.538841768587630
|
|
|
|
#define DFT5_W4 0.587785252292473
|
|
|
|
#define DFT5_W5 0.363271264002680
|
|
|
|
void dft5 (complex_t *x, complex_t* y);
|
|
|
|
|
|
|
|
#define DFT7_W1 -1.166666666666666518636930
|
|
|
|
#define DFT7_W2 0.790156468525400224045541
|
|
|
|
#define DFT7_W3 0.055854267289647742400494
|
|
|
|
#define DFT7_W4 0.734302201235752405317214
|
|
|
|
#define DFT7_W5 -0.440958551844098378680314
|
|
|
|
#define DFT7_W6 -0.340872930623931369442658
|
|
|
|
#define DFT7_W7 0.533969360337725240661655
|
|
|
|
#define DFT7_W8 -0.874842290961656665615465
|
|
|
|
void dft7 (complex_t *x, complex_t* y);
|
|
|
|
|
|
|
|
#define DFT16_W1 0.923879532511287
|
|
|
|
#define DFT16_W2 0.382683432365090
|
|
|
|
#define DFT16_W3 0.707106781186548
|
|
|
|
void dft16 (complex_t *x, complex_t* y);
|
|
|
|
|
|
|
|
void transpose16x16(complex_t *x, complex_t* y);
|
|
|
|
|
|
|
|
|
|
|
|
|
2018-10-25 17:25:39 +00:00
|
|
|
#endif
|
|
|
|
|