1  /* { dg-do run } */
       2  /* { dg-options "-O2 -mavx512f" } */
       3  /* { dg-require-effective-target avx512f } */
       4  
       5  #include "avx512f-check.h"
       6  
       7  #include "avx512f-helper.h"
       8  
       9  #define SIZE (128 / 64)
      10  #include "avx512f-mask-type.h"
      11  
      12  static void
      13  calc_sub (double *r, double *s1, double *s2)
      14  {
      15    r[0] = s1[0] - s2[0];
      16    r[1] = s1[1];
      17  }
      18  
      19  void
      20  avx512f_test (void)
      21  {
      22    int i, sign;
      23    union128d res1, res2, res3, res4, res5, src1, src2;
      24    MASK_TYPE mask = MASK_VALUE;
      25    double res_ref[SIZE];
      26  
      27    sign = -1;
      28    for (i = 0; i < SIZE; i++)
      29      {
      30        src1.a[i] = 1.5 + 34.67 * i * sign;
      31        src2.a[i] = -22.17 * i * sign + 1.0;
      32        sign = sign * -1;
      33      }
      34    for (i = 0; i < SIZE; i++)
      35      {
      36        res1.a[i] = DEFAULT_VALUE;
      37        res4.a[i] = DEFAULT_VALUE;
      38      }
      39  
      40    res1.x = _mm_mask_sub_sd (res1.x, mask, src1.x, src2.x);
      41    res2.x = _mm_maskz_sub_sd (mask, src1.x, src2.x);
      42    res3.x = _mm_sub_round_sd (src1.x, src2.x, _MM_FROUND_NO_EXC);
      43    res4.x = _mm_mask_sub_round_sd (res4.x, mask, src1.x, src2.x, _MM_FROUND_NO_EXC);
      44    res5.x = _mm_maskz_sub_round_sd (mask, src1.x, src2.x, _MM_FROUND_NO_EXC);
      45  
      46    calc_sub (res_ref, src1.a, src2.a);
      47  
      48    MASK_MERGE (d) (res_ref, mask, 1);
      49    if (check_union128d (res1, res_ref))
      50      abort ();
      51  
      52    MASK_ZERO (d) (res_ref, mask, 1);
      53    if (check_union128d (res2, res_ref))
      54      abort ();
      55  
      56    calc_sub (res_ref, src1.a, src2.a);
      57  
      58    if (check_union128d (res3, res_ref))
      59      abort();
      60    
      61    MASK_MERGE (d) (res_ref, mask, 1);
      62    if (check_union128d (res4, res_ref))
      63      abort ();
      64  
      65    MASK_ZERO (d) (res_ref, mask, 1);
      66    if (check_union128d (res5, res_ref))
      67      abort ();
      68  }
      69