1  /* { dg-do compile } */
       2  
       3  float bessel_Kn_scaled_small_x(int n)
       4  {
       5    int k;
       6    float k_term, sum1;
       7    for(k=1; k<=n-1; k++)
       8    {
       9      k_term *= -1/(k * (n-k));
      10      sum1 += k_term;
      11    }
      12    return sum1;
      13  }
      14