\frac{1}{x} - \frac{1}{\tan x}0.0222222222222222231 \cdot {x}^{3} + \left(0.00211640211640211654 \cdot {x}^{5} + 0.333333333333333315 \cdot x\right)double f(double x) {
double r103364 = 1.0;
double r103365 = x;
double r103366 = r103364 / r103365;
double r103367 = tan(r103365);
double r103368 = r103364 / r103367;
double r103369 = r103366 - r103368;
return r103369;
}
double f(double x) {
double r103370 = 0.022222222222222223;
double r103371 = x;
double r103372 = 3.0;
double r103373 = pow(r103371, r103372);
double r103374 = r103370 * r103373;
double r103375 = 0.0021164021164021165;
double r103376 = 5.0;
double r103377 = pow(r103371, r103376);
double r103378 = r103375 * r103377;
double r103379 = 0.3333333333333333;
double r103380 = r103379 * r103371;
double r103381 = r103378 + r103380;
double r103382 = r103374 + r103381;
return r103382;
}




Bits error versus x
Results
| Original | 59.9 |
|---|---|
| Target | 0.1 |
| Herbie | 0.3 |
Initial program 59.9
Taylor expanded around 0 0.3
Final simplification0.3
herbie shell --seed 2020047
(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) (+ 1 (/ (* x x) 15))) (- (/ 1 x) (/ 1 (tan x))))
(- (/ 1 x) (/ 1 (tan x))))