\frac{r \cdot \sin b}{\cos \left(a + b\right)}r \cdot \frac{\sin b}{\cos a \cdot \cos b - \log \left(e^{\sin b \cdot \sin a}\right)}(FPCore (r a b) :precision binary64 (/ (* r (sin b)) (cos (+ a b))))
(FPCore (r a b) :precision binary64 (* r (/ (sin b) (- (* (cos a) (cos b)) (log (exp (* (sin b) (sin a))))))))
double code(double r, double a, double b) {
return (((double) (r * ((double) sin(b)))) / ((double) cos(((double) (a + b)))));
}
double code(double r, double a, double b) {
return ((double) (r * (((double) sin(b)) / ((double) (((double) (((double) cos(a)) * ((double) cos(b)))) - ((double) log(((double) exp(((double) (((double) sin(b)) * ((double) sin(a)))))))))))));
}



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.4
rmApplied cos-sum_binary640.3
rmApplied *-un-lft-identity_binary640.3
Applied times-frac_binary640.3
Simplified0.3
rmApplied add-log-exp_binary640.4
Final simplification0.4
herbie shell --seed 2020210
(FPCore (r a b)
:name "rsin A"
:precision binary64
(/ (* r (sin b)) (cos (+ a b))))