x + \left(\tan \left(y + z\right) - \tan a\right)
x + \frac{\frac{\left(\tan y \cdot \tan y - \tan z \cdot \tan z\right) \cdot \cos a}{\tan y - \tan z} - \left(1 - \tan y \cdot \tan z\right) \cdot \sin a}{\left(1 - \tan y \cdot \tan z\right) \cdot \cos a}double f(double x, double y, double z, double a) {
double r221362 = x;
double r221363 = y;
double r221364 = z;
double r221365 = r221363 + r221364;
double r221366 = tan(r221365);
double r221367 = a;
double r221368 = tan(r221367);
double r221369 = r221366 - r221368;
double r221370 = r221362 + r221369;
return r221370;
}
double f(double x, double y, double z, double a) {
double r221371 = x;
double r221372 = y;
double r221373 = tan(r221372);
double r221374 = r221373 * r221373;
double r221375 = z;
double r221376 = tan(r221375);
double r221377 = r221376 * r221376;
double r221378 = r221374 - r221377;
double r221379 = a;
double r221380 = cos(r221379);
double r221381 = r221378 * r221380;
double r221382 = r221373 - r221376;
double r221383 = r221381 / r221382;
double r221384 = 1.0;
double r221385 = r221373 * r221376;
double r221386 = r221384 - r221385;
double r221387 = sin(r221379);
double r221388 = r221386 * r221387;
double r221389 = r221383 - r221388;
double r221390 = r221386 * r221380;
double r221391 = r221389 / r221390;
double r221392 = r221371 + r221391;
return r221392;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus a
Results
Initial program 13.1
rmApplied tan-quot13.1
Applied tan-sum0.2
Applied frac-sub0.2
rmApplied flip-+0.2
Applied associate-*l/0.2
Final simplification0.2
herbie shell --seed 2019354 +o rules:numerics
(FPCore (x y z a)
:name "(+ x (- (tan (+ y z)) (tan a)))"
:precision binary64
:pre (and (or (== x 0.0) (<= 0.5884142 x 505.5909)) (or (<= -1.796658e+308 y -9.425585e-310) (<= 1.284938e-309 y 1.7512240000000001e+308)) (or (<= -1.7767070000000002e+308 z -8.599796e-310) (<= 3.293145e-311 z 1.725154e+308)) (or (<= -1.796658e+308 a -9.425585e-310) (<= 1.284938e-309 a 1.7512240000000001e+308)))
(+ x (- (tan (+ y z)) (tan a))))