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 r17440 = r;
double r17441 = b;
double r17442 = sin(r17441);
double r17443 = a;
double r17444 = r17443 + r17441;
double r17445 = cos(r17444);
double r17446 = r17442 / r17445;
double r17447 = r17440 * r17446;
return r17447;
}
double f(double r, double a, double b) {
double r17448 = r;
double r17449 = b;
double r17450 = cos(r17449);
double r17451 = a;
double r17452 = cos(r17451);
double r17453 = r17450 * r17452;
double r17454 = sin(r17451);
double r17455 = sin(r17449);
double r17456 = r17454 * r17455;
double r17457 = r17453 - r17456;
double r17458 = r17457 / r17455;
double r17459 = r17448 / r17458;
return r17459;
}



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)))))