\frac{r \cdot \sin b}{\cos \left(a + b\right)}r \cdot \frac{\sin b}{\cos b \cdot \cos a - \sin a \cdot \sin b}double f(double r, double a, double b) {
double r17275 = r;
double r17276 = b;
double r17277 = sin(r17276);
double r17278 = r17275 * r17277;
double r17279 = a;
double r17280 = r17279 + r17276;
double r17281 = cos(r17280);
double r17282 = r17278 / r17281;
return r17282;
}
double f(double r, double a, double b) {
double r17283 = r;
double r17284 = b;
double r17285 = sin(r17284);
double r17286 = cos(r17284);
double r17287 = a;
double r17288 = cos(r17287);
double r17289 = r17286 * r17288;
double r17290 = sin(r17287);
double r17291 = r17290 * r17285;
double r17292 = r17289 - r17291;
double r17293 = r17285 / r17292;
double r17294 = r17283 * r17293;
return r17294;
}



Bits error versus r



Bits error versus a



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