\frac{1}{x} - \frac{1}{\tan x}\mathsf{fma}\left({x}^{5}, \frac{2}{945}, \frac{x}{\frac{\mathsf{fma}\left(\frac{1}{3} - x \cdot \left(\frac{1}{45} \cdot x\right), \frac{1}{3}, \left(x \cdot \left(\frac{1}{45} \cdot x\right)\right) \cdot \left(x \cdot \left(\frac{1}{45} \cdot x\right)\right)\right)}{\mathsf{fma}\left(x \cdot \left(\frac{1}{45} \cdot x\right), \left(x \cdot \left(\frac{1}{45} \cdot x\right)\right) \cdot \left(x \cdot \left(\frac{1}{45} \cdot x\right)\right), \frac{1}{27}\right)}}\right)double f(double x) {
double r2162870 = 1.0;
double r2162871 = x;
double r2162872 = r2162870 / r2162871;
double r2162873 = tan(r2162871);
double r2162874 = r2162870 / r2162873;
double r2162875 = r2162872 - r2162874;
return r2162875;
}
double f(double x) {
double r2162876 = x;
double r2162877 = 5.0;
double r2162878 = pow(r2162876, r2162877);
double r2162879 = 0.0021164021164021165;
double r2162880 = 0.3333333333333333;
double r2162881 = 0.022222222222222223;
double r2162882 = r2162881 * r2162876;
double r2162883 = r2162876 * r2162882;
double r2162884 = r2162880 - r2162883;
double r2162885 = r2162883 * r2162883;
double r2162886 = fma(r2162884, r2162880, r2162885);
double r2162887 = 0.037037037037037035;
double r2162888 = fma(r2162883, r2162885, r2162887);
double r2162889 = r2162886 / r2162888;
double r2162890 = r2162876 / r2162889;
double r2162891 = fma(r2162878, r2162879, r2162890);
return r2162891;
}




Bits error versus x
| Original | 60.0 |
|---|---|
| Target | 0.1 |
| Herbie | 0.0 |
Initial program 60.0
Taylor expanded around 0 0.3
Simplified0.3
rmApplied flip3-+1.2
Applied associate-*r/1.1
Simplified0.3
rmApplied associate-/l*0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2019141 +o rules:numerics
(FPCore (x)
:name "invcot (example 3.9)"
: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))))