r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{r}{\frac{\cos b \cdot \cos a - \sin a \cdot \sin b}{\sin b}}double f(double r, double a, double b) {
double r17475 = r;
double r17476 = b;
double r17477 = sin(r17476);
double r17478 = a;
double r17479 = r17478 + r17476;
double r17480 = cos(r17479);
double r17481 = r17477 / r17480;
double r17482 = r17475 * r17481;
return r17482;
}
double f(double r, double a, double b) {
double r17483 = r;
double r17484 = b;
double r17485 = cos(r17484);
double r17486 = a;
double r17487 = cos(r17486);
double r17488 = r17485 * r17487;
double r17489 = sin(r17486);
double r17490 = sin(r17484);
double r17491 = r17489 * r17490;
double r17492 = r17488 - r17491;
double r17493 = r17492 / r17490;
double r17494 = r17483 / r17493;
return r17494;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.3
rmApplied cos-sum0.3
rmApplied add-cbrt-cube0.4
Applied add-cbrt-cube0.4
Applied cbrt-unprod0.4
Simplified0.4
rmApplied *-un-lft-identity0.4
Applied associate-*l*0.4
Simplified0.3
rmApplied associate-/l*0.4
Final simplification0.4
herbie shell --seed 2020056
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
:precision binary64
(* r (/ (sin b) (cos (+ a b)))))