\frac{1 - \tan x \cdot \tan x}{1 + \tan x \cdot \tan x}\frac{1 - \frac{\tan x \cdot \sin x}{\cos x}}{1 + \frac{\tan x \cdot \sin x}{\cos x}}double f(double x) {
double r1552967 = 1.0;
double r1552968 = x;
double r1552969 = tan(r1552968);
double r1552970 = r1552969 * r1552969;
double r1552971 = r1552967 - r1552970;
double r1552972 = r1552967 + r1552970;
double r1552973 = r1552971 / r1552972;
return r1552973;
}
double f(double x) {
double r1552974 = 1.0;
double r1552975 = x;
double r1552976 = tan(r1552975);
double r1552977 = sin(r1552975);
double r1552978 = r1552976 * r1552977;
double r1552979 = cos(r1552975);
double r1552980 = r1552978 / r1552979;
double r1552981 = r1552974 - r1552980;
double r1552982 = r1552974 + r1552980;
double r1552983 = r1552981 / r1552982;
return r1552983;
}



Bits error versus x
Results
Initial program 0.3
rmApplied tan-quot0.4
Applied associate-*r/0.4
rmApplied tan-quot0.4
Applied associate-*l/0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019112
(FPCore (x)
:name "Trigonometry B"
(/ (- 1 (* (tan x) (tan x))) (+ 1 (* (tan x) (tan x)))))