\frac{x - \sin x}{x - \tan x}\frac{x - \sin x}{x - \tan x}(FPCore (x) :precision binary64 (/ (- x (sin x)) (- x (tan x))))
(FPCore (x) :precision binary64 (/ (- x (sin x)) (- x (tan x))))
double code(double x) {
return (x - sin(x)) / (x - tan(x));
}
double code(double x) {
return (x - sin(x)) / (x - tan(x));
}



Bits error versus x
Results
Initial program 31.5
Simplified31.5
Final simplification31.5
herbie shell --seed 2021023
(FPCore (x)
:name "sintan (problem 3.4.5)"
:precision binary64
(/ (- x (sin x)) (- x (tan x))))