\frac{1 - \tan x \cdot \tan x}{1 + \tan x \cdot \tan x}\frac{\sqrt{1} + \tan x}{\frac{1 + \tan x \cdot \tan x}{1 - \tan x \cdot \tan x} \cdot \left(\sqrt{1} + \tan x\right)}double f(double x) {
double r13236 = 1.0;
double r13237 = x;
double r13238 = tan(r13237);
double r13239 = r13238 * r13238;
double r13240 = r13236 - r13239;
double r13241 = r13236 + r13239;
double r13242 = r13240 / r13241;
return r13242;
}
double f(double x) {
double r13243 = 1.0;
double r13244 = sqrt(r13243);
double r13245 = x;
double r13246 = tan(r13245);
double r13247 = r13244 + r13246;
double r13248 = r13246 * r13246;
double r13249 = r13243 + r13248;
double r13250 = r13243 - r13248;
double r13251 = r13249 / r13250;
double r13252 = r13251 * r13247;
double r13253 = r13247 / r13252;
return r13253;
}



Bits error versus x
Results
Initial program 0.3
rmApplied add-sqr-sqrt0.3
Applied difference-of-squares0.4
Applied associate-/l*0.4
rmApplied flip--0.4
Applied associate-/r/0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019353
(FPCore (x)
:name "Trigonometry B"
:precision binary64
(/ (- 1 (* (tan x) (tan x))) (+ 1 (* (tan x) (tan x)))))