\frac{x - \sin x}{x - \tan x}\begin{array}{l}
\mathbf{if}\;x \leq -0.033413605152308526 \lor \neg \left(x \leq 0.03654414618884699\right):\\
\;\;\;\;\frac{x - \sin x}{x - \sqrt[3]{\tan x} \cdot \left(\sqrt[3]{\tan x} \cdot \sqrt[3]{\tan x}\right)}\\
\mathbf{else}:\\
\;\;\;\;0.225 \cdot {x}^{2} - \left(0.009642857142857142 \cdot {x}^{4} + 0.5\right)\\
\end{array}(FPCore (x) :precision binary64 (/ (- x (sin x)) (- x (tan x))))
(FPCore (x) :precision binary64 (if (or (<= x -0.033413605152308526) (not (<= x 0.03654414618884699))) (/ (- x (sin x)) (- x (* (cbrt (tan x)) (* (cbrt (tan x)) (cbrt (tan x)))))) (- (* 0.225 (pow x 2.0)) (+ (* 0.009642857142857142 (pow x 4.0)) 0.5))))
double code(double x) {
return (x - sin(x)) / (x - tan(x));
}
double code(double x) {
double tmp;
if ((x <= -0.033413605152308526) || !(x <= 0.03654414618884699)) {
tmp = (x - sin(x)) / (x - (cbrt(tan(x)) * (cbrt(tan(x)) * cbrt(tan(x)))));
} else {
tmp = (0.225 * pow(x, 2.0)) - ((0.009642857142857142 * pow(x, 4.0)) + 0.5);
}
return tmp;
}



Bits error versus x
Results
if x < -0.033413605152308526 or 0.036544146188846993 < x Initial program 0.0
rmApplied add-cube-cbrt_binary640.1
Applied cancel-sign-sub-inv_binary640.1
if -0.033413605152308526 < x < 0.036544146188846993Initial program 63.1
Taylor expanded around 0 0.0
Final simplification0.0
herbie shell --seed 2021015
(FPCore (x)
:name "sintan (problem 3.4.5)"
:precision binary64
(/ (- x (sin x)) (- x (tan x))))