1  /* { dg-do compile } */
       2  /* { dg-require-effective-target vect_double } */
       3  
       4  void test(double data[16][16])
       5  {
       6    for (int i = 0; i < 16; i++)
       7      {
       8        for (int j = 0; j < i; j+=4)
       9  	{
      10  	  data[i][j] *= data[i][j];
      11  	  data[i][j+1] *= data[i][j+1];
      12  	  data[i][j+2] *= data[i][j+2];
      13  	  data[i][j+3] *= data[i][j+3];
      14  	}
      15      }
      16  }
      17  
      18  /* { dg-final { scan-tree-dump "Loop contains only SLP stmts" "vect" } } */
      19  /* { dg-final { scan-tree-dump "ectorized 1 loops" "vect" } } */