\frac{1 - \tan x \cdot \tan x}{1 + \tan x \cdot \tan x}\left(\sqrt{1} + \tan x\right) \cdot \frac{\frac{1 - \tan x \cdot \tan x}{\sqrt{1} + \tan x}}{\mathsf{fma}\left(\tan x, \tan x, 1\right)}double f(double x) {
double r12312 = 1.0;
double r12313 = x;
double r12314 = tan(r12313);
double r12315 = r12314 * r12314;
double r12316 = r12312 - r12315;
double r12317 = r12312 + r12315;
double r12318 = r12316 / r12317;
return r12318;
}
double f(double x) {
double r12319 = 1.0;
double r12320 = sqrt(r12319);
double r12321 = x;
double r12322 = tan(r12321);
double r12323 = r12320 + r12322;
double r12324 = r12322 * r12322;
double r12325 = r12319 - r12324;
double r12326 = r12325 / r12323;
double r12327 = fma(r12322, r12322, r12319);
double r12328 = r12326 / r12327;
double r12329 = r12323 * r12328;
return r12329;
}



Bits error versus x
Initial program 0.3
rmApplied *-un-lft-identity0.3
Applied add-sqr-sqrt0.3
Applied difference-of-squares0.3
Applied times-frac0.4
Simplified0.4
Simplified0.4
rmApplied flip--0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2020047 +o rules:numerics
(FPCore (x)
:name "Trigonometry B"
:precision binary64
(/ (- 1 (* (tan x) (tan x))) (+ 1 (* (tan x) (tan x)))))