\tan \left(x + \varepsilon\right) - \tan x
\begin{array}{l}
\mathbf{if}\;\varepsilon \leq -8.944935459056774 \cdot 10^{-23}:\\
\;\;\;\;\frac{\left(\tan x + \tan \varepsilon\right) \cdot \frac{\tan x + \tan \varepsilon}{\left(1 - \tan x \cdot \tan \varepsilon\right) \cdot \left(1 - \tan x \cdot \tan \varepsilon\right)} - \tan x \cdot \tan x}{\tan x + \frac{\tan x + \tan \varepsilon}{1 - \tan x \cdot \tan \varepsilon}}\\
\mathbf{elif}\;\varepsilon \leq 7.958520989490561 \cdot 10^{-111}:\\
\;\;\;\;\varepsilon + x \cdot \left(\varepsilon \cdot \left(\varepsilon + x\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\sin x \cdot \cos \varepsilon + \cos x \cdot \sin \varepsilon}{\left(1 - \tan x \cdot \tan \varepsilon\right) \cdot \left(\cos \varepsilon \cdot \cos x\right)} - \tan x\\
\end{array}double code(double x, double eps) {
return ((double) (((double) tan(((double) (x + eps)))) - ((double) tan(x))));
}
double code(double x, double eps) {
double VAR;
if ((eps <= -8.944935459056774e-23)) {
VAR = (((double) (((double) (((double) (((double) tan(x)) + ((double) tan(eps)))) * (((double) (((double) tan(x)) + ((double) tan(eps)))) / ((double) (((double) (1.0 - ((double) (((double) tan(x)) * ((double) tan(eps)))))) * ((double) (1.0 - ((double) (((double) tan(x)) * ((double) tan(eps))))))))))) - ((double) (((double) tan(x)) * ((double) tan(x)))))) / ((double) (((double) tan(x)) + (((double) (((double) tan(x)) + ((double) tan(eps)))) / ((double) (1.0 - ((double) (((double) tan(x)) * ((double) tan(eps))))))))));
} else {
double VAR_1;
if ((eps <= 7.958520989490561e-111)) {
VAR_1 = ((double) (eps + ((double) (x * ((double) (eps * ((double) (eps + x))))))));
} else {
VAR_1 = ((double) ((((double) (((double) (((double) sin(x)) * ((double) cos(eps)))) + ((double) (((double) cos(x)) * ((double) sin(eps)))))) / ((double) (((double) (1.0 - ((double) (((double) tan(x)) * ((double) tan(eps)))))) * ((double) (((double) cos(eps)) * ((double) cos(x))))))) - ((double) tan(x))));
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus x




Bits error versus eps
Results
| Original | 36.8 |
|---|---|
| Target | 15.5 |
| Herbie | 15.1 |
if eps < -8.9449354590567743e-23Initial program 31.3
rmApplied tan-sum1.6
rmApplied flip--1.7
Simplified1.8
Simplified1.8
if -8.9449354590567743e-23 < eps < 7.9585209894905614e-111Initial program 46.1
Taylor expanded around 0 30.4
Simplified30.2
if 7.9585209894905614e-111 < eps Initial program 30.6
rmApplied tan-sum8.2
rmApplied tan-quot8.3
Applied tan-quot8.3
Applied frac-add8.3
Applied associate-/l/8.3
Final simplification15.1
herbie shell --seed 2020196
(FPCore (x eps)
:name "2tan (problem 3.3.2)"
:precision binary64
:herbie-target
(/ (sin eps) (* (cos x) (cos (+ x eps))))
(- (tan (+ x eps)) (tan x)))