\cos \left(x + \varepsilon\right) - \cos x
\begin{array}{l}
\mathbf{if}\;\varepsilon \le -2.6231847589922844 \cdot 10^{-6}:\\
\;\;\;\;\cos x \cdot \cos \varepsilon - \left(\sqrt[3]{{\left(\sin x \cdot \sin \varepsilon\right)}^{3}} + \cos x\right)\\
\mathbf{elif}\;\varepsilon \le 1.4423632138238029 \cdot 10^{-25}:\\
\;\;\;\;\varepsilon \cdot \left(\left(\frac{1}{6} \cdot {x}^{3} - x\right) - \varepsilon \cdot \frac{1}{2}\right)\\
\mathbf{else}:\\
\;\;\;\;\cos x \cdot \cos \varepsilon - \sqrt[3]{{\left(\sin x \cdot \sin \varepsilon + \cos x\right)}^{3}}\\
\end{array}double code(double x, double eps) {
return ((double) (((double) cos(((double) (x + eps)))) - ((double) cos(x))));
}
double code(double x, double eps) {
double VAR;
if ((eps <= -2.6231847589922844e-06)) {
VAR = ((double) (((double) (((double) cos(x)) * ((double) cos(eps)))) - ((double) (((double) cbrt(((double) pow(((double) (((double) sin(x)) * ((double) sin(eps)))), 3.0)))) + ((double) cos(x))))));
} else {
double VAR_1;
if ((eps <= 1.4423632138238029e-25)) {
VAR_1 = ((double) (eps * ((double) (((double) (((double) (0.16666666666666666 * ((double) pow(x, 3.0)))) - x)) - ((double) (eps * 0.5))))));
} else {
VAR_1 = ((double) (((double) (((double) cos(x)) * ((double) cos(eps)))) - ((double) cbrt(((double) pow(((double) (((double) (((double) sin(x)) * ((double) sin(eps)))) + ((double) cos(x)))), 3.0))))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x



Bits error versus eps
Results
if eps < -2.6231847589922844e-6Initial program 30.3
rmApplied cos-sum0.9
Applied associate--l-0.9
rmApplied add-cbrt-cube1.0
Applied add-cbrt-cube1.0
Applied cbrt-unprod1.0
Simplified1.0
if -2.6231847589922844e-6 < eps < 1.4423632138238029e-25Initial program 48.8
Taylor expanded around 0 31.7
Simplified31.7
if 1.4423632138238029e-25 < eps Initial program 31.8
rmApplied cos-sum3.8
Applied associate--l-3.8
rmApplied add-cbrt-cube4.0
Simplified3.9
Final simplification16.3
herbie shell --seed 2020161
(FPCore (x eps)
:name "2cos (problem 3.3.5)"
:precision binary64
(- (cos (+ x eps)) (cos x)))