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



Bits error versus x
Results
Initial program 31.6
Applied flip--_binary6431.8
Simplified16.2
Applied associate-/r*_binary6415.5
Simplified0.1
Applied associate-/l*_binary640.1
Final simplification0.1
herbie shell --seed 2021280
(FPCore (x)
:name "cos2 (problem 3.4.1)"
:precision binary64
(/ (- 1.0 (cos x)) (* x x)))