r \cdot \frac{\sin b}{\cos \left(a + b\right)}r \cdot \frac{\sin b}{\mathsf{fma}\left(\cos a, \cos b, -\mathsf{expm1}\left(\mathsf{log1p}\left(\sin a \cdot \sin b\right)\right)\right)}double code(double r, double a, double b) {
return ((double) (r * ((double) (((double) sin(b)) / ((double) cos(((double) (a + b))))))));
}
double code(double r, double a, double b) {
return ((double) (r * ((double) (((double) sin(b)) / ((double) fma(((double) cos(a)), ((double) cos(b)), ((double) -(((double) expm1(((double) log1p(((double) (((double) sin(a)) * ((double) sin(b))))))))))))))));
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.4
rmApplied cos-sum0.3
rmApplied fma-neg0.3
rmApplied expm1-log1p-u0.3
Final simplification0.3
herbie shell --seed 2020121 +o rules:numerics
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
:precision binary64
(* r (/ (sin b) (cos (+ a b)))))