r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{r}{\cos a \cdot \frac{\cos b}{\sin b} - \sin a}double f(double r, double a, double b) {
double r968458 = r;
double r968459 = b;
double r968460 = sin(r968459);
double r968461 = a;
double r968462 = r968461 + r968459;
double r968463 = cos(r968462);
double r968464 = r968460 / r968463;
double r968465 = r968458 * r968464;
return r968465;
}
double f(double r, double a, double b) {
double r968466 = r;
double r968467 = a;
double r968468 = cos(r968467);
double r968469 = b;
double r968470 = cos(r968469);
double r968471 = sin(r968469);
double r968472 = r968470 / r968471;
double r968473 = r968468 * r968472;
double r968474 = sin(r968467);
double r968475 = r968473 - r968474;
double r968476 = r968466 / r968475;
return r968476;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 14.9
rmApplied cos-sum0.3
rmApplied *-un-lft-identity0.3
Applied associate-*l*0.3
Simplified0.4
rmApplied associate-/r/0.4
Final simplification0.4
herbie shell --seed 2019169
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))