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



Bits error versus r



Bits error versus a



Bits error versus b
Results
Initial program 15.2
rmApplied cos-sum_binary640.3
rmApplied div-inv_binary640.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2020220
(FPCore (r a b)
:name "rsin A"
:precision binary64
(/ (* r (sin b)) (cos (+ a b))))