\frac{1 - \tan x \cdot \tan x}{1 + \tan x \cdot \tan x}\frac{1 - \frac{1}{\frac{\cos x}{\tan x \cdot \sin x}}}{1 + \frac{\sqrt[3]{{\left(\sin x\right)}^{6}}}{{\left(\cos x\right)}^{2}}}double f(double x) {
double r20072 = 1.0;
double r20073 = x;
double r20074 = tan(r20073);
double r20075 = r20074 * r20074;
double r20076 = r20072 - r20075;
double r20077 = r20072 + r20075;
double r20078 = r20076 / r20077;
return r20078;
}
double f(double x) {
double r20079 = 1.0;
double r20080 = 1.0;
double r20081 = x;
double r20082 = cos(r20081);
double r20083 = tan(r20081);
double r20084 = sin(r20081);
double r20085 = r20083 * r20084;
double r20086 = r20082 / r20085;
double r20087 = r20080 / r20086;
double r20088 = r20079 - r20087;
double r20089 = 6.0;
double r20090 = pow(r20084, r20089);
double r20091 = cbrt(r20090);
double r20092 = 2.0;
double r20093 = pow(r20082, r20092);
double r20094 = r20091 / r20093;
double r20095 = r20079 + r20094;
double r20096 = r20088 / r20095;
return r20096;
}



Bits error versus x
Results
Initial program 0.3
rmApplied tan-quot0.4
Applied associate-*r/0.4
rmApplied clear-num0.4
rmApplied tan-quot0.4
Applied tan-quot0.4
Applied frac-times0.4
Simplified0.4
Simplified0.4
rmApplied add-cbrt-cube0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019325
(FPCore (x)
:name "Trigonometry B"
:precision binary64
(/ (- 1 (* (tan x) (tan x))) (+ 1 (* (tan x) (tan x)))))