r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{\sin b \cdot r}{\cos b \cdot \cos a - \sin b \cdot \sin a}double f(double r, double a, double b) {
double r28873 = r;
double r28874 = b;
double r28875 = sin(r28874);
double r28876 = a;
double r28877 = r28876 + r28874;
double r28878 = cos(r28877);
double r28879 = r28875 / r28878;
double r28880 = r28873 * r28879;
return r28880;
}
double f(double r, double a, double b) {
double r28881 = b;
double r28882 = sin(r28881);
double r28883 = r;
double r28884 = r28882 * r28883;
double r28885 = cos(r28881);
double r28886 = a;
double r28887 = cos(r28886);
double r28888 = r28885 * r28887;
double r28889 = sin(r28886);
double r28890 = r28882 * r28889;
double r28891 = r28888 - r28890;
double r28892 = r28884 / r28891;
return r28892;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.3
Simplified15.3
rmApplied cos-sum0.3
Simplified0.3
Simplified0.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
Final simplification0.3
herbie shell --seed 2019179
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))