r \cdot \frac{\sin b}{\cos \left(a + b\right)}r \cdot \frac{1}{\frac{\cos b}{\frac{\sin b}{\cos a}} - \sin a}double f(double r, double a, double b) {
double r17905 = r;
double r17906 = b;
double r17907 = sin(r17906);
double r17908 = a;
double r17909 = r17908 + r17906;
double r17910 = cos(r17909);
double r17911 = r17907 / r17910;
double r17912 = r17905 * r17911;
return r17912;
}
double f(double r, double a, double b) {
double r17913 = r;
double r17914 = 1.0;
double r17915 = b;
double r17916 = cos(r17915);
double r17917 = sin(r17915);
double r17918 = a;
double r17919 = cos(r17918);
double r17920 = r17917 / r17919;
double r17921 = r17916 / r17920;
double r17922 = sin(r17918);
double r17923 = r17921 - r17922;
double r17924 = r17914 / r17923;
double r17925 = r17913 * r17924;
return r17925;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 14.8
rmApplied cos-sum0.3
rmApplied clear-num0.4
Simplified0.4
rmApplied associate-/l*0.4
Final simplification0.4
herbie shell --seed 2020046
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
:precision binary64
(* r (/ (sin b) (cos (+ a b)))))