r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{r}{-\left(\cos a \cdot \cos b - \sin a \cdot \sin b\right)} \cdot \left(-\sin b\right)double 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 14.9
rmApplied cos-sum0.3
rmApplied clear-num0.4
Applied un-div-inv0.4
rmApplied frac-2neg0.4
Applied associate-/r/0.3
Final simplification0.3
herbie shell --seed 2020078
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
:precision binary64
(* r (/ (sin b) (cos (+ a b)))))