x + \left(\tan \left(y + z\right) - \tan a\right)
x + \left(\frac{\sin y}{\cos y \cdot \left(1 - \sin z \cdot \frac{\sin y}{\cos y \cdot \cos z}\right)} + \left(\frac{\sin z}{\cos z \cdot \left(1 - \frac{\sin z}{\cos y} \cdot \frac{\sin y}{\cos z}\right)} - \frac{\sin a}{\cos a}\right)\right)(FPCore (x y z a) :precision binary64 (+ x (- (tan (+ y z)) (tan a))))
(FPCore (x y z a)
:precision binary64
(+
x
(+
(/ (sin y) (* (cos y) (- 1.0 (* (sin z) (/ (sin y) (* (cos y) (cos z)))))))
(-
(/ (sin z) (* (cos z) (- 1.0 (* (/ (sin z) (cos y)) (/ (sin y) (cos z))))))
(/ (sin a) (cos a))))))double code(double x, double y, double z, double a) {
return ((double) (x + ((double) (((double) tan(((double) (y + z)))) - ((double) tan(a))))));
}
double code(double x, double y, double z, double a) {
return ((double) (x + ((double) ((((double) sin(y)) / ((double) (((double) cos(y)) * ((double) (1.0 - ((double) (((double) sin(z)) * (((double) sin(y)) / ((double) (((double) cos(y)) * ((double) cos(z)))))))))))) + ((double) ((((double) sin(z)) / ((double) (((double) cos(z)) * ((double) (1.0 - ((double) ((((double) sin(z)) / ((double) cos(y))) * (((double) sin(y)) / ((double) cos(z)))))))))) - (((double) sin(a)) / ((double) cos(a)))))))));
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus a
Results
Initial program Error: 13.3 bits
rmApplied tan-sumError: 0.2 bits
Taylor expanded around inf Error: 0.2 bits
SimplifiedError: 0.2 bits
rmApplied *-un-lft-identityError: 0.2 bits
Applied times-fracError: 0.2 bits
Applied associate-*r*Error: 0.2 bits
SimplifiedError: 0.2 bits
Final simplificationError: 0.2 bits
herbie shell --seed 2020204
(FPCore (x y z a)
:name "tan-example"
: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))))