1  long double
       2  f (d, i)
       3       long double d;
       4       int i;
       5  {
       6    long double e;
       7  
       8    d = -d;
       9    e = d;
      10    if (i == 1)
      11      d *= 2;
      12    d -= e * d;
      13    d -= e * d;
      14    d -= e * d;
      15    d -= e * d;
      16    d -= e * d;
      17    return d;
      18  }
      19  
      20  main ()
      21  {
      22    if (! (int) (f (2.0L, 1)))
      23      abort ();
      24    exit (0);
      25  }