1long double
2f (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
20main ()
21{
22 if (! (int) (f (2.0L, 1)))
23 abort ();
24 exit (0);
25}
26