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



Bits error versus x



Bits error versus eps
if eps < -0.0027738346999691818 or 0.0028458237945856038 < eps Initial program 29.7
Applied cos-sum_binary640.8
Applied associate--l-_binary640.9
Simplified0.8
if -0.0027738346999691818 < eps < 0.0028458237945856038Initial program 49.9
Applied diff-cos_binary6438.0
Simplified0.7
Applied log1p-expm1-u_binary640.7
Simplified0.7
Taylor expanded in eps around 0 0.2
Simplified0.2
Final simplification0.5
herbie shell --seed 2021344
(FPCore (x eps)
:name "2cos (problem 3.3.5)"
:precision binary64
(- (cos (+ x eps)) (cos x)))