\frac{x - \sin x}{x - \tan x}\begin{array}{l}
\mathbf{if}\;x \leq -0.028939001950817302:\\
\;\;\;\;\sqrt[3]{{\left(\frac{x - \sin x}{x - \tan x}\right)}^{3}}\\
\mathbf{elif}\;x \leq 0.02800543700756853:\\
\;\;\;\;\left(x \cdot x\right) \cdot 0.225 - \left(0.009642857142857142 \cdot {x}^{4} + 0.5\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{x - \tan x}{x - \sin x}}\\
\end{array}(FPCore (x) :precision binary64 (/ (- x (sin x)) (- x (tan x))))
(FPCore (x)
:precision binary64
(if (<= x -0.028939001950817302)
(cbrt (pow (/ (- x (sin x)) (- x (tan x))) 3.0))
(if (<= x 0.02800543700756853)
(- (* (* x x) 0.225) (+ (* 0.009642857142857142 (pow x 4.0)) 0.5))
(/ 1.0 (/ (- x (tan x)) (- x (sin x)))))))double code(double x) {
return (((double) (x - ((double) sin(x)))) / ((double) (x - ((double) tan(x)))));
}
double code(double x) {
double tmp;
if ((x <= -0.028939001950817302)) {
tmp = ((double) cbrt(((double) pow((((double) (x - ((double) sin(x)))) / ((double) (x - ((double) tan(x))))), 3.0))));
} else {
double tmp_1;
if ((x <= 0.02800543700756853)) {
tmp_1 = ((double) (((double) (((double) (x * x)) * 0.225)) - ((double) (((double) (0.009642857142857142 * ((double) pow(x, 4.0)))) + 0.5))));
} else {
tmp_1 = (1.0 / (((double) (x - ((double) tan(x)))) / ((double) (x - ((double) sin(x))))));
}
tmp = tmp_1;
}
return tmp;
}



Bits error versus x
Results
if x < -0.0289390019508173023Initial program 0.1
rmApplied add-cbrt-cube_binary6441.4
Applied add-cbrt-cube_binary6442.6
Applied cbrt-undiv_binary6442.6
Simplified0.1
if -0.0289390019508173023 < x < 0.02800543700756853Initial program 63.1
Taylor expanded around 0 0.0
Simplified0.0
if 0.02800543700756853 < x Initial program 0.0
rmApplied clear-num_binary640.0
Final simplification0.0
herbie shell --seed 2020219
(FPCore (x)
:name "sintan (problem 3.4.5)"
:precision binary64
(/ (- x (sin x)) (- x (tan x))))