void f_alpha(int n_pts, int n_exp, float X[], float Q_d,
float alpha);

void rvfft(float X[], unsigned long int n);