\frac{1 - \cos x}{x \cdot x}\frac{\sin x}{\frac{x}{\frac{\tan \left(\frac{x}{2}\right)}{x}}}(FPCore (x) :precision binary64 (/ (- 1.0 (cos x)) (* x x)))
(FPCore (x) :precision binary64 (/ (sin x) (/ x (/ (tan (/ x 2.0)) x))))
double code(double x) {
return (1.0 - cos(x)) / (x * x);
}
double code(double x) {
return sin(x) / (x / (tan(x / 2.0) / x));
}



Bits error versus x
Results
Initial program 31.7
rmApplied flip--_binary6431.8
Simplified15.9
rmApplied *-un-lft-identity_binary6415.9
Applied times-frac_binary6415.9
Applied associate-/l*_binary6416.1
Simplified0.4
Final simplification0.4
herbie shell --seed 2020233
(FPCore (x)
:name "cos2 (problem 3.4.1)"
:precision binary64
(/ (- 1.0 (cos x)) (* x x)))