Falkner and Boettcher, Appendix B, 2

Average Error: 0.0 → 0.0

Time: 2.3s

Precision: binary64

Math

\[\left(\frac{\sqrt{2}}{4} \cdot \sqrt{1 - 3 \cdot \left(v \cdot v\right)}\right) \cdot \left(1 - v \cdot v\right) \]

↓

\[\left(\left(-0.25 \cdot \mathsf{fma}\left(v, v, -1\right)\right) \cdot \sqrt{2}\right) \cdot \sqrt{\mathsf{fma}\left(v, v \cdot -3, 1\right)} \]

FPCore

(FPCore (v)
 :precision binary64
 (* (* (/ (sqrt 2.0) 4.0) (sqrt (- 1.0 (* 3.0 (* v v))))) (- 1.0 (* v v))))

↓

(FPCore (v)
 :precision binary64
 (* (* (* -0.25 (fma v v -1.0)) (sqrt 2.0)) (sqrt (fma v (* v -3.0) 1.0))))

C

double code(double v) {
	return ((sqrt(2.0) / 4.0) * sqrt((1.0 - (3.0 * (v * v))))) * (1.0 - (v * v));
}

↓

double code(double v) {
	return ((-0.25 * fma(v, v, -1.0)) * sqrt(2.0)) * sqrt(fma(v, (v * -3.0), 1.0));
}

Error

Bits error versus v

Derivation

1. Initial program 0.0

   \[\left(\frac{\sqrt{2}}{4} \cdot \sqrt{1 - 3 \cdot \left(v \cdot v\right)}\right) \cdot \left(1 - v \cdot v\right) \]

2. Simplified 0.0

   \[\leadsto \color{blue}{\sqrt{2} \cdot \left(\sqrt{\mathsf{fma}\left(v, v \cdot -3, 1\right)} \cdot \left(-0.25 \cdot \mathsf{fma}\left(v, v, -1\right)\right)\right)} \]

3. Applied egg-rr 0.0

   \[\leadsto \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(\left(-0.25 \cdot \mathsf{fma}\left(v, v, -1\right)\right) \cdot \sqrt{2 \cdot \mathsf{fma}\left(v, v \cdot -3, 1\right)}\right)\right)} \]

4. Applied egg-rr 0.0

   \[\leadsto \color{blue}{\left(\left(-0.25 \cdot \mathsf{fma}\left(v, v, -1\right)\right) \cdot \sqrt{2}\right) \cdot \sqrt{\mathsf{fma}\left(v, v \cdot -3, 1\right)}} \]

5. Final simplification 0.0

   \[\leadsto \left(\left(-0.25 \cdot \mathsf{fma}\left(v, v, -1\right)\right) \cdot \sqrt{2}\right) \cdot \sqrt{\mathsf{fma}\left(v, v \cdot -3, 1\right)} \]

Reproduce

herbie shell --seed 2022130 
(FPCore (v)
  :name "Falkner and Boettcher, Appendix B, 2"
  :precision binary64
  (* (* (/ (sqrt 2.0) 4.0) (sqrt (- 1.0 (* 3.0 (* v v))))) (- 1.0 (* v v))))