// prove.c
# include "alfa.h"

nc Nc (double x, double y)
{nc z={x,y}; return z;}

void Prova ()
{double x=1.0005;
double a[4096];
int k; for (k=0;k<4096;k++) a[k]=1;
double w=Valicreale(a,4096,x);
printf("%.2f\n",w);
nc z=Nc(2,1),u;
nc coeff[]={Nc(3,0),Nc(5,0),Nc(1,0),Nc(2,0),
  Nc(7,0),Nc(6,0),Nc(2,0),Nc(2,0)};
u=Valic(coeff,8,z);
printf("%.2f %.2f\n",u.x,u.y);}