int store_standard_gammas ( int n )
{
double re_gamma[n];
double im_gamma[n];
int i;
for(i=0; i<n; i++)
random_complex(&re_gamma[i],&im_gamma[i]);
store_standard_gamma(n,re_gamma,im_gamma);
}
int new_slices ( int k, int n )
{
int i,j,fail;
double r[2];
for(i=0; i<k; i++)
for(j=0; j<n+1; j++)
{
random_complex(&r[0],&r[1]);
fail = _ada_use_c2phc(43,&i,&j,r); /* assign coefficient */
}
return fail;
}
