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 r16104 = r;
double r16105 = b;
double r16106 = sin(r16105);
double r16107 = a;
double r16108 = r16107 + r16105;
double r16109 = cos(r16108);
double r16110 = r16106 / r16109;
double r16111 = r16104 * r16110;
return r16111;
}
double f(double r, double a, double b) {
double r16112 = r;
double r16113 = b;
double r16114 = cos(r16113);
double r16115 = a;
double r16116 = cos(r16115);
double r16117 = r16114 * r16116;
double r16118 = sin(r16115);
double r16119 = sin(r16113);
double r16120 = r16118 * r16119;
double r16121 = r16117 - r16120;
double r16122 = r16121 / r16119;
double r16123 = r16112 / r16122;
return r16123;
}



Bits error versus r



Bits error versus a



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