\frac{1 - \cos x}{x \cdot x}\begin{array}{l}
\mathbf{if}\;x \le -0.029842379482625983:\\
\;\;\;\;\frac{1}{x \cdot \frac{x}{1 - \cos x}}\\
\mathbf{elif}\;x \le 0.0366604219404516665:\\
\;\;\;\;\left({x}^{4} \cdot \frac{1}{720} + \frac{1}{2}\right) + x \cdot \left(x \cdot \frac{-1}{24}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x \cdot x} - \frac{\cos x}{x \cdot x}\\
\end{array}double code(double x) {
return ((double) (((double) (1.0 - ((double) cos(x)))) / ((double) (x * x))));
}
double code(double x) {
double VAR;
if ((x <= -0.029842379482625983)) {
VAR = ((double) (1.0 / ((double) (x * ((double) (x / ((double) (1.0 - ((double) cos(x))))))))));
} else {
double VAR_1;
if ((x <= 0.036660421940451667)) {
VAR_1 = ((double) (((double) (((double) (((double) pow(x, 4.0)) * 0.001388888888888889)) + 0.5)) + ((double) (x * ((double) (x * -0.041666666666666664))))));
} else {
VAR_1 = ((double) (((double) (1.0 / ((double) (x * x)))) - ((double) (((double) cos(x)) / ((double) (x * x))))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x
Results
if x < -0.029842379482625983Initial program 1.0
rmApplied clear-num1.0
Simplified1.0
if -0.029842379482625983 < x < 0.0366604219404516665Initial program 62.4
Taylor expanded around 0 0.0
Simplified0.0
rmApplied associate-+r+0.0
if 0.0366604219404516665 < x Initial program 1.2
rmApplied div-sub1.2
Final simplification0.6
herbie shell --seed 2020184
(FPCore (x)
:name "cos2 (problem 3.4.1)"
:precision binary64
(/ (- 1.0 (cos x)) (* x x)))