\frac{1}{x} - \frac{1}{\tan x}0.02222222222222222307030925492199457949027 \cdot {x}^{3} + \left(0.002116402116402116544841005563171165704262 \cdot {x}^{5} + 0.3333333333333333148296162562473909929395 \cdot x\right)double f(double x) {
double r75387 = 1.0;
double r75388 = x;
double r75389 = r75387 / r75388;
double r75390 = tan(r75388);
double r75391 = r75387 / r75390;
double r75392 = r75389 - r75391;
return r75392;
}
double f(double x) {
double r75393 = 0.022222222222222223;
double r75394 = x;
double r75395 = 3.0;
double r75396 = pow(r75394, r75395);
double r75397 = r75393 * r75396;
double r75398 = 0.0021164021164021165;
double r75399 = 5.0;
double r75400 = pow(r75394, r75399);
double r75401 = r75398 * r75400;
double r75402 = 0.3333333333333333;
double r75403 = r75402 * r75394;
double r75404 = r75401 + r75403;
double r75405 = r75397 + r75404;
return r75405;
}




Bits error versus x
Results
| Original | 60.0 |
|---|---|
| Target | 0.1 |
| Herbie | 0.3 |
Initial program 60.0
Taylor expanded around 0 0.3
Final simplification0.3
herbie shell --seed 2020001
(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))))