\tan \left(x + \varepsilon\right) - \tan x
\begin{array}{l}
\mathbf{if}\;\varepsilon \le -5.547819297283335504428332134194072043683 \cdot 10^{-27}:\\
\;\;\;\;\frac{\cos x \cdot \left(\tan \varepsilon + \tan x\right) - \left(1 - \tan x \cdot \tan \varepsilon\right) \cdot \sin x}{\left(1 - \tan x \cdot \tan \varepsilon\right) \cdot \cos x}\\
\mathbf{elif}\;\varepsilon \le 3.432024878078755517709005585063122603554 \cdot 10^{-26}:\\
\;\;\;\;\mathsf{fma}\left(x \cdot \varepsilon, x + \varepsilon, \varepsilon\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{{\left(\tan \varepsilon\right)}^{3} + {\left(\tan x\right)}^{3}}{\mathsf{fma}\left(\tan \varepsilon - \tan x, \tan \varepsilon, \tan x \cdot \tan x\right) \cdot \left(1 - \tan x \cdot \tan \varepsilon\right)} - \tan x\\
\end{array}double f(double x, double eps) {
double r5545330 = x;
double r5545331 = eps;
double r5545332 = r5545330 + r5545331;
double r5545333 = tan(r5545332);
double r5545334 = tan(r5545330);
double r5545335 = r5545333 - r5545334;
return r5545335;
}
double f(double x, double eps) {
double r5545336 = eps;
double r5545337 = -5.5478192972833355e-27;
bool r5545338 = r5545336 <= r5545337;
double r5545339 = x;
double r5545340 = cos(r5545339);
double r5545341 = tan(r5545336);
double r5545342 = tan(r5545339);
double r5545343 = r5545341 + r5545342;
double r5545344 = r5545340 * r5545343;
double r5545345 = 1.0;
double r5545346 = r5545342 * r5545341;
double r5545347 = r5545345 - r5545346;
double r5545348 = sin(r5545339);
double r5545349 = r5545347 * r5545348;
double r5545350 = r5545344 - r5545349;
double r5545351 = r5545347 * r5545340;
double r5545352 = r5545350 / r5545351;
double r5545353 = 3.4320248780787555e-26;
bool r5545354 = r5545336 <= r5545353;
double r5545355 = r5545339 * r5545336;
double r5545356 = r5545339 + r5545336;
double r5545357 = fma(r5545355, r5545356, r5545336);
double r5545358 = 3.0;
double r5545359 = pow(r5545341, r5545358);
double r5545360 = pow(r5545342, r5545358);
double r5545361 = r5545359 + r5545360;
double r5545362 = r5545341 - r5545342;
double r5545363 = r5545342 * r5545342;
double r5545364 = fma(r5545362, r5545341, r5545363);
double r5545365 = r5545364 * r5545347;
double r5545366 = r5545361 / r5545365;
double r5545367 = r5545366 - r5545342;
double r5545368 = r5545354 ? r5545357 : r5545367;
double r5545369 = r5545338 ? r5545352 : r5545368;
return r5545369;
}




Bits error versus x




Bits error versus eps
| Original | 36.8 |
|---|---|
| Target | 15.1 |
| Herbie | 15.4 |
if eps < -5.5478192972833355e-27Initial program 29.4
rmApplied tan-quot29.2
Applied tan-sum1.6
Applied frac-sub1.7
if -5.5478192972833355e-27 < eps < 3.4320248780787555e-26Initial program 45.1
Taylor expanded around 0 31.4
Simplified31.2
if 3.4320248780787555e-26 < eps Initial program 30.1
rmApplied tan-sum1.9
rmApplied flip3-+2.1
Applied associate-/l/2.1
Simplified2.1
Final simplification15.4
herbie shell --seed 2019172 +o rules:numerics
(FPCore (x eps)
:name "2tan (problem 3.3.2)"
:herbie-target
(/ (sin eps) (* (cos x) (cos (+ x eps))))
(- (tan (+ x eps)) (tan x)))