r \cdot \frac{\sin b}{\cos \left(a + b\right)}\frac{\sin b}{\cos a \cdot \cos b - \sqrt[3]{\left(\left(\sin a \cdot \sin b\right) \cdot \left(\sin a \cdot \sin b\right)\right) \cdot \left(\sin a \cdot \sin b\right)}} \cdot rdouble f(double r, double a, double b) {
double r725725 = r;
double r725726 = b;
double r725727 = sin(r725726);
double r725728 = a;
double r725729 = r725728 + r725726;
double r725730 = cos(r725729);
double r725731 = r725727 / r725730;
double r725732 = r725725 * r725731;
return r725732;
}
double f(double r, double a, double b) {
double r725733 = b;
double r725734 = sin(r725733);
double r725735 = a;
double r725736 = cos(r725735);
double r725737 = cos(r725733);
double r725738 = r725736 * r725737;
double r725739 = sin(r725735);
double r725740 = r725739 * r725734;
double r725741 = r725740 * r725740;
double r725742 = r725741 * r725740;
double r725743 = cbrt(r725742);
double r725744 = r725738 - r725743;
double r725745 = r725734 / r725744;
double r725746 = r;
double r725747 = r725745 * r725746;
return r725747;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.1
rmApplied cos-sum0.3
rmApplied associate-*r/0.3
rmApplied *-un-lft-identity0.3
Applied times-frac0.3
Simplified0.3
rmApplied add-cbrt-cube0.4
Applied add-cbrt-cube0.4
Applied cbrt-unprod0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019151
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))