\frac{1 - \tan x \cdot \tan x}{1 + \tan x \cdot \tan x}\frac{1 - \sqrt[3]{{\left(\tan x\right)}^{6}}}{1 + \sqrt[3]{{\left(\tan x\right)}^{6}}}double f(double x) {
double r11788 = 1.0;
double r11789 = x;
double r11790 = tan(r11789);
double r11791 = r11790 * r11790;
double r11792 = r11788 - r11791;
double r11793 = r11788 + r11791;
double r11794 = r11792 / r11793;
return r11794;
}
double f(double x) {
double r11795 = 1.0;
double r11796 = x;
double r11797 = tan(r11796);
double r11798 = 6.0;
double r11799 = pow(r11797, r11798);
double r11800 = cbrt(r11799);
double r11801 = r11795 - r11800;
double r11802 = r11795 + r11800;
double r11803 = r11801 / r11802;
return r11803;
}



Bits error versus x
Results
Initial program 0.3
rmApplied add-cbrt-cube0.5
Applied add-cbrt-cube0.6
Applied cbrt-unprod0.5
Simplified0.5
rmApplied add-cbrt-cube0.5
Applied add-cbrt-cube0.5
Applied cbrt-unprod0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2020065 +o rules:numerics
(FPCore (x)
:name "Trigonometry B"
:precision binary64
(/ (- 1 (* (tan x) (tan x))) (+ 1 (* (tan x) (tan x)))))