<![CDATA[
#include <stdio.h>
#include <numeric.h>
#define NC 6
#define ND 3
int main() {
int i,j,k;
double c[NC]={1.0,-5.0,10.0,-10.0,5.0,-1.0};
double complex z=complex(0.1,1),val;
val = cpolyeval(c,z);
printf("z = %f function value = %f\n",z,val);
}
]]>
<![CDATA[
z = complex(0.100000,1.000000) function value = complex(2.199510,-3.819500)
]]>