\cos \left(x + \varepsilon\right) - \cos x
\begin{array}{l}
\mathbf{if}\;\varepsilon \leq -0.0024476897834141763 \lor \neg \left(\varepsilon \leq 0.0027524678397060076\right):\\
\;\;\;\;\cos x \cdot \cos \varepsilon - \mathsf{fma}\left(\sin \varepsilon, \sin x, \cos x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\cos x, \mathsf{fma}\left(0.041666666666666664, {\varepsilon}^{4}, \left(\varepsilon \cdot \varepsilon\right) \cdot -0.5\right), \sin x \cdot \left(0.16666666666666666 \cdot {\varepsilon}^{3} - \varepsilon\right)\right)\\
\end{array}
(FPCore (x eps) :precision binary64 (- (cos (+ x eps)) (cos x)))
(FPCore (x eps)
:precision binary64
(if (or (<= eps -0.0024476897834141763) (not (<= eps 0.0027524678397060076)))
(- (* (cos x) (cos eps)) (fma (sin eps) (sin x) (cos x)))
(fma
(cos x)
(fma 0.041666666666666664 (pow eps 4.0) (* (* eps eps) -0.5))
(* (sin x) (- (* 0.16666666666666666 (pow eps 3.0)) eps)))))double code(double x, double eps) {
return cos(x + eps) - cos(x);
}
double code(double x, double eps) {
double tmp;
if ((eps <= -0.0024476897834141763) || !(eps <= 0.0027524678397060076)) {
tmp = (cos(x) * cos(eps)) - fma(sin(eps), sin(x), cos(x));
} else {
tmp = fma(cos(x), fma(0.041666666666666664, pow(eps, 4.0), ((eps * eps) * -0.5)), (sin(x) * ((0.16666666666666666 * pow(eps, 3.0)) - eps)));
}
return tmp;
}



Bits error versus x



Bits error versus eps
if eps < -0.00244768978341417627 or 0.002752467839706008 < eps Initial program 30.4
Applied cos-sum_binary640.8
Applied associate--l-_binary640.9
Simplified0.8
if -0.00244768978341417627 < eps < 0.002752467839706008Initial program 49.4
Applied diff-cos_binary6437.8
Simplified0.6
Applied associate-*r*_binary640.6
Taylor expanded in eps around 0 0.2
Simplified0.2
Final simplification0.5
herbie shell --seed 2022081
(FPCore (x eps)
:name "2cos (problem 3.3.5)"
:precision binary64
(- (cos (+ x eps)) (cos x)))