\frac{r \cdot \sin b}{\cos \left(a + b\right)}\frac{\sin b}{\cos a \cdot \cos b - \log \left(e^{\sin a \cdot \sin b}\right)} \cdot rdouble f(double r, double a, double b) {
double r1005163 = r;
double r1005164 = b;
double r1005165 = sin(r1005164);
double r1005166 = r1005163 * r1005165;
double r1005167 = a;
double r1005168 = r1005167 + r1005164;
double r1005169 = cos(r1005168);
double r1005170 = r1005166 / r1005169;
return r1005170;
}
double f(double r, double a, double b) {
double r1005171 = b;
double r1005172 = sin(r1005171);
double r1005173 = a;
double r1005174 = cos(r1005173);
double r1005175 = cos(r1005171);
double r1005176 = r1005174 * r1005175;
double r1005177 = sin(r1005173);
double r1005178 = r1005177 * r1005172;
double r1005179 = exp(r1005178);
double r1005180 = log(r1005179);
double r1005181 = r1005176 - r1005180;
double r1005182 = r1005172 / r1005181;
double r1005183 = r;
double r1005184 = r1005182 * r1005183;
return r1005184;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.5
rmApplied cos-sum0.3
rmApplied *-un-lft-identity0.3
Applied times-frac0.3
Simplified0.3
rmApplied add-log-exp0.4
Final simplification0.4
herbie shell --seed 2019174 +o rules:numerics
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), A"
(/ (* r (sin b)) (cos (+ a b))))