1  /* { dg-options "-O2" } */
       2  
       3  double test_vector (float **data, int rows, int cols, int vqrows,double epsilon, int maxiter,int **mean, int *map)
       4  {
       5      int i, j, r, it;
       6      double sqerr, prev_sqerr=0, t;
       7      unsigned int *sel;
       8      int *count;
       9      for (it = 0;; it++) 
      10      {
      11          if ((sqerr == 0.0) || (it >= maxiter-1) ||((it > 0) && ( ((prev_sqerr - sqerr) / prev_sqerr) < epsilon )) )
      12              for (i = 0; i < vqrows; i++) 
      13              {
      14                  for (j = 0; j < cols; j++)
      15                      mean[i][j] = 0.0;
      16                  count[i] = 0;
      17              }
      18      }
      19  }