\frac{x - \sin x}{x - \tan x}\begin{array}{l}
\mathbf{if}\;x \leq -0.023947268971373566:\\
\;\;\;\;\frac{x - \sin x}{x - \tan x}\\
\mathbf{elif}\;x \leq 0.029551278348766707:\\
\;\;\;\;\left(\left(x \cdot x\right) \cdot 0.225 - 0.5\right) - 0.009642857142857142 \cdot {x}^{4}\\
\mathbf{else}:\\
\;\;\;\;\frac{x - \sin x}{x - \tan x}\\
\end{array}(FPCore (x) :precision binary64 (/ (- x (sin x)) (- x (tan x))))
(FPCore (x)
:precision binary64
(if (<= x -0.023947268971373566)
(/ (- x (sin x)) (- x (tan x)))
(if (<= x 0.029551278348766707)
(- (- (* (* x x) 0.225) 0.5) (* 0.009642857142857142 (pow x 4.0)))
(/ (- x (sin x)) (- x (tan x))))))double code(double x) {
return (x - sin(x)) / (x - tan(x));
}
double code(double x) {
double tmp;
if (x <= -0.023947268971373566) {
tmp = (x - sin(x)) / (x - tan(x));
} else if (x <= 0.029551278348766707) {
tmp = (((x * x) * 0.225) - 0.5) - (0.009642857142857142 * pow(x, 4.0));
} else {
tmp = (x - sin(x)) / (x - tan(x));
}
return tmp;
}



Bits error versus x
Results
if x < -0.023947268971373566 or 0.0295512783487667068 < x Initial program 0.0
if -0.023947268971373566 < x < 0.0295512783487667068Initial program 63.3
Taylor expanded around 0 0.0
Simplified0.0
rmApplied associate--r+_binary640.0
Final simplification0.0
herbie shell --seed 2020273
(FPCore (x)
:name "sintan (problem 3.4.5)"
:precision binary64
(/ (- x (sin x)) (- x (tan x))))