\frac{x - \sin x}{x - \tan x}\begin{array}{l}
\mathbf{if}\;x \le -0.0271582929915708572:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{x - \tan x}{x}, \sin x, -\left(x - \tan x\right)\right)}{\frac{x - \tan x}{x} \cdot \left(-\left(x - \tan x\right)\right)}\\
\mathbf{elif}\;x \le 0.0255064208901601384:\\
\;\;\;\;\mathsf{fma}\left(\frac{9}{40}, {x}^{2}, -\mathsf{fma}\left(\frac{27}{2800}, {x}^{4}, \frac{1}{2}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x - \tan x} - \frac{\sin x}{x - \tan x}\\
\end{array}double code(double x) {
return ((x - sin(x)) / (x - tan(x)));
}
double code(double x) {
double VAR;
if ((x <= -0.027158292991570857)) {
VAR = (fma(((x - tan(x)) / x), sin(x), -(x - tan(x))) / (((x - tan(x)) / x) * -(x - tan(x))));
} else {
double VAR_1;
if ((x <= 0.02550642089016014)) {
VAR_1 = fma(0.225, pow(x, 2.0), -fma(0.009642857142857142, pow(x, 4.0), 0.5));
} else {
VAR_1 = ((x / (x - tan(x))) - (sin(x) / (x - tan(x))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x
Results
if x < -0.027158292991570857Initial program 0.0
rmApplied div-sub0.1
rmApplied frac-2neg0.1
Applied clear-num0.1
Applied frac-sub0.1
Simplified0.1
if -0.027158292991570857 < x < 0.02550642089016014Initial program 63.1
Taylor expanded around 0 0.0
Simplified0.0
if 0.02550642089016014 < x Initial program 0.1
rmApplied div-sub0.1
Final simplification0.0
herbie shell --seed 2020071 +o rules:numerics
(FPCore (x)
:name "sintan (problem 3.4.5)"
:precision binary64
(/ (- x (sin x)) (- x (tan x))))