typedef struct FCOMPLEX {float r,i;} fcomplex;

extern float Cmod();
extern fcomplex Cadd();
extern fcomplex Csub();
extern fcomplex Cmul();
extern fcomplex Complex();
extern fcomplex Conjg();
extern fcomplex Cdiv();
extern float Cabs();
extern fcomplex Csqrt();
extern fcomplex RCmul();
extern fcomplex RCdiv();