r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{r \cdot \sin b}{\cos a \cdot \cos b - \sin a \cdot \sin b}double f(double r, double a, double b) {
double r26699 = r;
double r26700 = b;
double r26701 = sin(r26700);
double r26702 = a;
double r26703 = r26702 + r26700;
double r26704 = cos(r26703);
double r26705 = r26701 / r26704;
double r26706 = r26699 * r26705;
return r26706;
}
double f(double r, double a, double b) {
double r26707 = r;
double r26708 = b;
double r26709 = sin(r26708);
double r26710 = r26707 * r26709;
double r26711 = a;
double r26712 = cos(r26711);
double r26713 = cos(r26708);
double r26714 = r26712 * r26713;
double r26715 = sin(r26711);
double r26716 = r26715 * r26709;
double r26717 = r26714 - r26716;
double r26718 = r26710 / r26717;
return r26718;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 14.8
Simplified14.8
rmApplied cos-sum0.3
Simplified0.3
Simplified0.3
rmApplied associate-*r/0.3
Simplified0.3
rmApplied *-un-lft-identity0.3
Applied times-frac0.3
Simplified0.3
rmApplied associate-*r/0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019195
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))