emd_complex.c

经验模式分解源码 学习希尔波特黄变换的参考程序 源于Internet网络

/*
* G. Rilling, last modification: 3.2007
* [e-mail]
*
* code based on a student project by T. Boustane and G. Quellec, 11.03.2004
* supervised by P. Chainais (ISIMA - LIMOS - Universite Blaise Pascal - Clermont II
* email : [e-mail]).
*/

double CREAL(complex_data_t c){return c.r;}
double CIMAG(complex_data_t c){return c.i;}
double CABS(complex_data_t c){return sqrt((c.r)*(c.r)+(c.i)*(c.i));}
double crealeiphi(double phi,complex_data_t c){return cos(phi)*c.r-sin(phi)*c.i;}