\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 r1108379 = 1.0;
double r1108380 = x;
double r1108381 = tan(r1108380);
double r1108382 = r1108381 * r1108381;
double r1108383 = r1108379 - r1108382;
double r1108384 = r1108379 + r1108382;
double r1108385 = r1108383 / r1108384;
return r1108385;
}
double f(double x) {
double r1108386 = 1.0;
double r1108387 = x;
double r1108388 = tan(r1108387);
double r1108389 = sin(r1108387);
double r1108390 = r1108388 * r1108389;
double r1108391 = cos(r1108387);
double r1108392 = r1108390 / r1108391;
double r1108393 = r1108386 - r1108392;
double r1108394 = r1108386 + r1108392;
double r1108395 = r1108393 / r1108394;
return r1108395;
}



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