\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 r16774 = r;
double r16775 = b;
double r16776 = sin(r16775);
double r16777 = r16774 * r16776;
double r16778 = a;
double r16779 = r16778 + r16775;
double r16780 = cos(r16779);
double r16781 = r16777 / r16780;
return r16781;
}
double f(double r, double a, double b) {
double r16782 = r;
double r16783 = b;
double r16784 = sin(r16783);
double r16785 = cos(r16783);
double r16786 = a;
double r16787 = cos(r16786);
double r16788 = r16785 * r16787;
double r16789 = sin(r16786);
double r16790 = r16789 * r16784;
double r16791 = r16788 - r16790;
double r16792 = r16784 / r16791;
double r16793 = r16782 * r16792;
return r16793;
}



Bits error versus r



Bits error versus a



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