emd_complex.c

来自「2007版EMD(经验模态分解)完整程序」· C语言 代码 · 共 14 行

/*
* 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;}