\frac{1}{x} - \frac{1}{\tan x}0.022222222222222223 \cdot {x}^{3} + \left(0.0021164021164021165 \cdot {x}^{5} + \sqrt{\sqrt{\sqrt{0.3333333333333333}}} \cdot \left(\left(x \cdot {\left(\sqrt{0.3333333333333333}\right)}^{1.5}\right) \cdot \sqrt{\sqrt{\sqrt{0.3333333333333333}}}\right)\right)(FPCore (x) :precision binary64 (- (/ 1.0 x) (/ 1.0 (tan x))))
(FPCore (x)
:precision binary64
(+
(* 0.022222222222222223 (pow x 3.0))
(+
(* 0.0021164021164021165 (pow x 5.0))
(*
(sqrt (sqrt (sqrt 0.3333333333333333)))
(*
(* x (pow (sqrt 0.3333333333333333) 1.5))
(sqrt (sqrt (sqrt 0.3333333333333333))))))))double code(double x) {
return (1.0 / x) - (1.0 / tan(x));
}
double code(double x) {
return (0.022222222222222223 * pow(x, 3.0)) + ((0.0021164021164021165 * pow(x, 5.0)) + (sqrt(sqrt(sqrt(0.3333333333333333))) * ((x * pow(sqrt(0.3333333333333333), 1.5)) * sqrt(sqrt(sqrt(0.3333333333333333))))));
}




Bits error versus x
Results
| Original | 59.8 |
|---|---|
| Target | 0.1 |
| Herbie | 0.4 |
Initial program 59.8
Taylor expanded around 0 0.4
Simplified0.4
rmApplied add-sqr-sqrt_binary640.4
Applied associate-*r*_binary640.7
rmApplied add-sqr-sqrt_binary640.7
Applied associate-*r*_binary640.5
Simplified0.5
rmApplied add-sqr-sqrt_binary640.5
Applied associate-*r*_binary640.4
Final simplification0.4
herbie shell --seed 2020233
(FPCore (x)
:name "invcot (example 3.9)"
:precision binary64
:pre (and (< -0.026 x) (< x 0.026))
:herbie-target
(if (< (fabs x) 0.026) (* (/ x 3.0) (+ 1.0 (/ (* x x) 15.0))) (- (/ 1.0 x) (/ 1.0 (tan x))))
(- (/ 1.0 x) (/ 1.0 (tan x))))