r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{\sin b \cdot r}{\cos a \cdot \cos b - \sin a \cdot \sin b}double f(double r, double a, double b) {
double r17533 = r;
double r17534 = b;
double r17535 = sin(r17534);
double r17536 = a;
double r17537 = r17536 + r17534;
double r17538 = cos(r17537);
double r17539 = r17535 / r17538;
double r17540 = r17533 * r17539;
return r17540;
}
double f(double r, double a, double b) {
double r17541 = b;
double r17542 = sin(r17541);
double r17543 = r;
double r17544 = r17542 * r17543;
double r17545 = a;
double r17546 = cos(r17545);
double r17547 = cos(r17541);
double r17548 = r17546 * r17547;
double r17549 = sin(r17545);
double r17550 = r17549 * r17542;
double r17551 = r17548 - r17550;
double r17552 = r17544 / r17551;
return r17552;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.1
rmApplied cos-sum0.3
rmApplied div-inv0.4
rmApplied un-div-inv0.3
Applied associate-*r/0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2020001 +o rules:numerics
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
:precision binary64
(* r (/ (sin b) (cos (+ a b)))))