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



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 13.9
rmApplied cos-sum0.3
rmApplied clear-num0.4
rmApplied associate-/r/0.4
Applied associate-*r*0.4
Simplified0.3
Final simplification0.3
herbie shell --seed 2020066 +o rules:numerics
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
:precision binary64
(* r (/ (sin b) (cos (+ a b)))))