\cos \left(x + \varepsilon\right) - \cos x
\begin{array}{l}
\mathbf{if}\;\varepsilon \leq -3717.87781626488 \lor \neg \left(\varepsilon \leq 0.00018308574124161137\right):\\
\;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\
\mathbf{else}:\\
\;\;\;\;\left(-2 \cdot \sin \left(\frac{\varepsilon}{2}\right)\right) \cdot \sin \left(\frac{\varepsilon + x \cdot 2}{2}\right)\\
\end{array}
(FPCore (x eps) :precision binary64 (- (cos (+ x eps)) (cos x)))
(FPCore (x eps) :precision binary64 (if (or (<= eps -3717.87781626488) (not (<= eps 0.00018308574124161137))) (- (- (* (cos x) (cos eps)) (* (sin x) (sin eps))) (cos x)) (* (* -2.0 (sin (/ eps 2.0))) (sin (/ (+ eps (* x 2.0)) 2.0)))))
double code(double x, double eps) {
return cos(x + eps) - cos(x);
}
double code(double x, double eps) {
double tmp;
if ((eps <= -3717.87781626488) || !(eps <= 0.00018308574124161137)) {
tmp = ((cos(x) * cos(eps)) - (sin(x) * sin(eps))) - cos(x);
} else {
tmp = (-2.0 * sin(eps / 2.0)) * sin((eps + (x * 2.0)) / 2.0);
}
return tmp;
}



Bits error versus x



Bits error versus eps
Results
if eps < -3717.87781626488004 or 1.8308574124161137e-4 < eps Initial program 29.8
Applied cos-sum_binary640.8
if -3717.87781626488004 < eps < 1.8308574124161137e-4Initial program 48.4
Applied diff-cos_binary6436.5
Simplified0.9
Applied associate-*r*_binary640.9
Taylor expanded in x around 0 0.9
Final simplification0.8
herbie shell --seed 2021275
(FPCore (x eps)
:name "2cos (problem 3.3.5)"
:precision binary64
(- (cos (+ x eps)) (cos x)))