\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 r16154 = r;
double r16155 = b;
double r16156 = sin(r16155);
double r16157 = r16154 * r16156;
double r16158 = a;
double r16159 = r16158 + r16155;
double r16160 = cos(r16159);
double r16161 = r16157 / r16160;
return r16161;
}
double f(double r, double a, double b) {
double r16162 = r;
double r16163 = b;
double r16164 = sin(r16163);
double r16165 = cos(r16163);
double r16166 = a;
double r16167 = cos(r16166);
double r16168 = r16165 * r16167;
double r16169 = sin(r16166);
double r16170 = r16169 * r16164;
double r16171 = r16168 - r16170;
double r16172 = r16164 / r16171;
double r16173 = r16162 * r16172;
return r16173;
}



Bits error versus r



Bits error versus a



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