38     kiss_fftr_cfg st = NULL;  in kiss_fftr_alloc()  local
53         st = (kiss_fftr_cfg) KISS_FFT_MALLOC (memneeded);  in kiss_fftr_alloc()
56             st = (kiss_fftr_cfg) mem;  in kiss_fftr_alloc()
59     if (!st)  in kiss_fftr_alloc()
62     st->substate = (kiss_fft_cfg) (st + 1); /*just beyond kiss_fftr_state struct */  in kiss_fftr_alloc()
63     st->tmpbuf = (kiss_fft_cpx *) (((char *) st->substate) + subsize);  in kiss_fftr_alloc()
64     st->super_twiddles = st->tmpbuf + nfft;  in kiss_fftr_alloc()
65     kiss_fft_alloc(nfft, inverse_fft, st->substate, &subsize);  in kiss_fftr_alloc()
72         kf_cexp (st->super_twiddles+i,phase);  in kiss_fftr_alloc()
74     return st;  in kiss_fftr_alloc()
77 void kiss_fftr(kiss_fftr_cfg st,const kiss_fft_scalar *timedata,kiss_fft_cpx *freqdata)  in kiss_fftr()  argument
83     if ( st->substate->inverse) {  in kiss_fftr()
92     ncfft = st->substate->nfft;  in kiss_fftr()
95     kiss_fft( st->substate , (const kiss_fft_cpx*)timedata, st->tmpbuf );  in kiss_fftr()
106     tdc.r = st->tmpbuf[0].r;  in kiss_fftr()
107     tdc.i = st->tmpbuf[0].i;  in kiss_fftr()
120         fpk    = st->tmpbuf[k];   in kiss_fftr()
121         fpnk.r =   st->tmpbuf[ncfft-k].r;  in kiss_fftr()
122         fpnk.i = - st->tmpbuf[ncfft-k].i;  in kiss_fftr()
128         C_MUL( tw , f2k , st->super_twiddles[k-1]);  in kiss_fftr()
137 void kiss_fftri(kiss_fftr_cfg st,const kiss_fft_cpx *freqdata,kiss_fft_scalar *timedata)  in kiss_fftri()  argument
142     if (st->substate->inverse == 0) {  in kiss_fftri()
151     ncfft = st->substate->nfft;  in kiss_fftri()
153     st->tmpbuf[0].r = freqdata[0].r + freqdata[ncfft].r;  in kiss_fftri()
154     st->tmpbuf[0].i = freqdata[0].r - freqdata[ncfft].r;  in kiss_fftri()
155     C_FIXDIV(st->tmpbuf[0],2);  in kiss_fftri()
167         C_MUL (fok, tmp, st->super_twiddles[k-1]);  in kiss_fftri()
168         C_ADD (st->tmpbuf[k],     fek, fok);  in kiss_fftri()
169         C_SUB (st->tmpbuf[ncfft - k], fek, fok);  in kiss_fftri()
171         st->tmpbuf[ncfft - k].i *= _mm_set1_ps(-1.0);  in kiss_fftri()
173         st->tmpbuf[ncfft - k].i *= -1;  in kiss_fftri()
176     kiss_fft (st->substate, st->tmpbuf, (kiss_fft_cpx *) timedata);  in kiss_fftri()