\frac{r \cdot \sin b}{\cos \left(a + b\right)}\frac{r}{\frac{\cos a}{\tan b} - \sin a}(FPCore (r a b) :precision binary64 (/ (* r (sin b)) (cos (+ a b))))
(FPCore (r a b) :precision binary64 (/ r (- (/ (cos a) (tan b)) (sin a))))
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) / tan(b)) - sin(a));
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.5
rmApplied cos-sum_binary64_5570.4
rmApplied associate-/l*_binary64_3680.4
Simplified0.4
rmApplied associate-/l*_binary64_3680.4
rmApplied quot-tan_binary64_5830.4
Final simplification0.4
herbie shell --seed 2020289
(FPCore (r a b)
:name "rsin A"
:precision binary64
(/ (* r (sin b)) (cos (+ a b))))