\frac{1 - \cos x}{x \cdot x}\frac{\frac{\tan \left(\frac{x}{2}\right)}{x} \cdot \sin x}{x}double f(double x) {
double r1013401 = 1.0;
double r1013402 = x;
double r1013403 = cos(r1013402);
double r1013404 = r1013401 - r1013403;
double r1013405 = r1013402 * r1013402;
double r1013406 = r1013404 / r1013405;
return r1013406;
}
double f(double x) {
double r1013407 = x;
double r1013408 = 2.0;
double r1013409 = r1013407 / r1013408;
double r1013410 = tan(r1013409);
double r1013411 = r1013410 / r1013407;
double r1013412 = sin(r1013407);
double r1013413 = r1013411 * r1013412;
double r1013414 = r1013413 / r1013407;
return r1013414;
}



Bits error versus x
Results
Initial program 30.9
rmApplied flip--31.1
Simplified15.8
rmApplied *-un-lft-identity15.8
Applied *-un-lft-identity15.8
Applied distribute-lft-out15.8
Applied times-frac15.8
Applied times-frac0.3
Simplified0.3
Simplified0.1
rmApplied associate-*l/0.1
Final simplification0.1
herbie shell --seed 2019138 +o rules:numerics
(FPCore (x)
:name "cos2 (problem 3.4.1)"
(/ (- 1 (cos x)) (* x x)))