1
2int f(_Complex double *a, unsigned int n)
3{
4  unsigned int i;
5  for(i = 0; i< n; i++)
6    {
7      a[i] = __real__ a[i+1] + __real__ a[i];
8    }
9}
10