1 long double C = 2;
2 long double U = 1;
3 long double Y2 = 3;
4 long double Y1 = 1;
5 long double X, Y, Z, T, R, S;
main()6 main ()
7 {
8   X = (C + U) * Y2;
9   Y = C - U - U;
10   Z = C + U + U;
11   T = (C - U) * Y1;
12   X = X - (Z + U);
13   R = Y * Y1;
14   S = Z * Y2;
15   T = T - Y;
16   Y = (U - Y) + R;
17   Z = S - (Z + U + U);
18   R = (Y2 + U) * Y1;
19   Y1 = Y2 * Y1;
20   R = R - Y2;
21   Y1 = Y1 - 0.5L;
22   if (Z != 6)
23     abort ();
24   exit (0);
25 }
26