r \cdot \frac{\sin b}{\cos \left(a + b\right)}\sin b \cdot \frac{r}{\cos a \cdot \cos b - \sqrt[3]{\left(\left(\sin b \cdot \sin a\right) \cdot \left(\sin b \cdot \sin a\right)\right) \cdot \left(\sin b \cdot \sin a\right)}}double f(double r, double a, double b) {
double r1004065 = r;
double r1004066 = b;
double r1004067 = sin(r1004066);
double r1004068 = a;
double r1004069 = r1004068 + r1004066;
double r1004070 = cos(r1004069);
double r1004071 = r1004067 / r1004070;
double r1004072 = r1004065 * r1004071;
return r1004072;
}
double f(double r, double a, double b) {
double r1004073 = b;
double r1004074 = sin(r1004073);
double r1004075 = r;
double r1004076 = a;
double r1004077 = cos(r1004076);
double r1004078 = cos(r1004073);
double r1004079 = r1004077 * r1004078;
double r1004080 = sin(r1004076);
double r1004081 = r1004074 * r1004080;
double r1004082 = r1004081 * r1004081;
double r1004083 = r1004082 * r1004081;
double r1004084 = cbrt(r1004083);
double r1004085 = r1004079 - r1004084;
double r1004086 = r1004075 / r1004085;
double r1004087 = r1004074 * r1004086;
return r1004087;
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 14.5
rmApplied cos-sum0.3
Taylor expanded around -inf 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 2019158
(FPCore (r a b)
:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))