r*sin(b)/cos(a+b), A

Average Error: 15.1 → 0.3

Time: 6.1s

Precision: 64

Math

\[\frac{r \cdot \sin b}{\cos \left(a + b\right)}\]

↓

\[r \cdot \frac{\sin b}{\cos a \cdot \cos b - \sin a \cdot \sin b}\]

C

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) / ((cos(a) * cos(b)) - (sin(a) * sin(b)))));
}

Error

Bits error versus r

Bits error versus a

Bits error versus b

Derivation

1. Initial program 15.1

   \[\frac{r \cdot \sin b}{\cos \left(a + b\right)}\]
2. Using strategy rm

3. Applied cos-sum 0.3

   \[\leadsto \frac{r \cdot \sin b}{\color{blue}{\cos a \cdot \cos b - \sin a \cdot \sin b}}\]
4. Using strategy rm

5. Applied div-inv 0.4

   \[\leadsto \color{blue}{\left(r \cdot \sin b\right) \cdot \frac{1}{\cos a \cdot \cos b - \sin a \cdot \sin b}}\]
6. Using strategy rm

7. Applied associate-*l* 0.4

   \[\leadsto \color{blue}{r \cdot \left(\sin b \cdot \frac{1}{\cos a \cdot \cos b - \sin a \cdot \sin b}\right)}\]

8. Simplified 0.3

   \[\leadsto r \cdot \color{blue}{\frac{\sin b}{\cos a \cdot \cos b - \sin a \cdot \sin b}}\]

9. Final simplification 0.3

   \[\leadsto r \cdot \frac{\sin b}{\cos a \cdot \cos b - \sin a \cdot \sin b}\]

Reproduce

herbie shell --seed 2020075 
(FPCore (r a b)
  :name "r*sin(b)/cos(a+b), A"
  :precision binary64
  (/ (* r (sin b)) (cos (+ a b))))