\frac{1 - \tan x \cdot \tan x}{1 + \tan x \cdot \tan x}\frac{\log \left(e^{\sqrt{1} + \tan x}\right) \cdot \left(\sqrt{1} - \tan x\right)}{1 + \tan x \cdot \tan x}double f(double x) {
double r12480 = 1.0;
double r12481 = x;
double r12482 = tan(r12481);
double r12483 = r12482 * r12482;
double r12484 = r12480 - r12483;
double r12485 = r12480 + r12483;
double r12486 = r12484 / r12485;
return r12486;
}
double f(double x) {
double r12487 = 1.0;
double r12488 = sqrt(r12487);
double r12489 = x;
double r12490 = tan(r12489);
double r12491 = r12488 + r12490;
double r12492 = exp(r12491);
double r12493 = log(r12492);
double r12494 = r12488 - r12490;
double r12495 = r12493 * r12494;
double r12496 = r12490 * r12490;
double r12497 = r12487 + r12496;
double r12498 = r12495 / r12497;
return r12498;
}



Bits error versus x
Results
Initial program 0.3
rmApplied add-sqr-sqrt0.3
Applied difference-of-squares0.4
rmApplied add-log-exp0.4
Applied add-log-exp0.4
Applied sum-log0.5
Simplified0.4
Final simplification0.4
herbie shell --seed 2020057
(FPCore (x)
:name "Trigonometry B"
:precision binary64
(/ (- 1 (* (tan x) (tan x))) (+ 1 (* (tan x) (tan x)))))