1  
       2  int 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  }