1 long long f(a)2 f (a) 3 double a; 4 { 5 double b; 6 unsigned long long v; 7 8 b = a / 2.0; 9 v = (unsigned) b; 10 a -= (double) v; 11 return v; 12 } 13