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



Bits error versus x
Results
Initial program 31.3
Applied flip--_binary6431.4
Simplified15.8
Taylor expanded in x around inf 15.7
Simplified0.1
Applied clear-num_binary640.1
Final simplification0.1
herbie shell --seed 2022104
(FPCore (x)
:name "cos2 (problem 3.4.1)"
:precision binary64
(/ (- 1.0 (cos x)) (* x x)))