\frac{1 - \cos x}{x \cdot x}\begin{array}{l}
\mathbf{if}\;x \le -0.02817374883090965551057927029887650860474 \lor \neg \left(x \le 0.03027878116855447360178388294116302859038\right):\\
\;\;\;\;\frac{1}{x} \cdot \frac{1}{\frac{\left(\cos x \cdot \left(1 + \cos x\right) + 1 \cdot 1\right) \cdot x}{{1}^{3} - {\left(\cos x\right)}^{3}}}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{720} \cdot {x}^{4} + \frac{1}{2}\right) - \frac{1}{24} \cdot {x}^{2}\\
\end{array}double f(double x) {
double r21807 = 1.0;
double r21808 = x;
double r21809 = cos(r21808);
double r21810 = r21807 - r21809;
double r21811 = r21808 * r21808;
double r21812 = r21810 / r21811;
return r21812;
}
double f(double x) {
double r21813 = x;
double r21814 = -0.028173748830909656;
bool r21815 = r21813 <= r21814;
double r21816 = 0.030278781168554474;
bool r21817 = r21813 <= r21816;
double r21818 = !r21817;
bool r21819 = r21815 || r21818;
double r21820 = 1.0;
double r21821 = r21820 / r21813;
double r21822 = cos(r21813);
double r21823 = 1.0;
double r21824 = r21823 + r21822;
double r21825 = r21822 * r21824;
double r21826 = r21823 * r21823;
double r21827 = r21825 + r21826;
double r21828 = r21827 * r21813;
double r21829 = 3.0;
double r21830 = pow(r21823, r21829);
double r21831 = pow(r21822, r21829);
double r21832 = r21830 - r21831;
double r21833 = r21828 / r21832;
double r21834 = r21820 / r21833;
double r21835 = r21821 * r21834;
double r21836 = 0.001388888888888889;
double r21837 = 4.0;
double r21838 = pow(r21813, r21837);
double r21839 = r21836 * r21838;
double r21840 = 0.5;
double r21841 = r21839 + r21840;
double r21842 = 0.041666666666666664;
double r21843 = 2.0;
double r21844 = pow(r21813, r21843);
double r21845 = r21842 * r21844;
double r21846 = r21841 - r21845;
double r21847 = r21819 ? r21835 : r21846;
return r21847;
}



Bits error versus x
Results
if x < -0.028173748830909656 or 0.030278781168554474 < x Initial program 1.0
rmApplied *-un-lft-identity1.0
Applied times-frac0.5
rmApplied flip3--0.5
Applied associate-/l/0.5
Simplified0.5
rmApplied clear-num0.6
if -0.028173748830909656 < x < 0.030278781168554474Initial program 62.3
Taylor expanded around 0 0.0
Final simplification0.3
herbie shell --seed 2019325
(FPCore (x)
:name "cos2 (problem 3.4.1)"
:precision binary64
(/ (- 1 (cos x)) (* x x)))