(FPCore (x y z) :precision binary64 (/ (- (+ (* x x) (* y y)) (* z z)) (* y 2.0)))
(FPCore (x y z) :precision binary64 (* -0.5 (fma (/ (+ z x) y) (- z x) (- y))))
double code(double x, double y, double z) {
return (((x * x) + (y * y)) - (z * z)) / (y * 2.0);
}
double code(double x, double y, double z) {
return -0.5 * fma(((z + x) / y), (z - x), -y);
}
function code(x, y, z) return Float64(Float64(Float64(Float64(x * x) + Float64(y * y)) - Float64(z * z)) / Float64(y * 2.0)) end
function code(x, y, z) return Float64(-0.5 * fma(Float64(Float64(z + x) / y), Float64(z - x), Float64(-y))) end
code[x_, y_, z_] := N[(N[(N[(N[(x * x), $MachinePrecision] + N[(y * y), $MachinePrecision]), $MachinePrecision] - N[(z * z), $MachinePrecision]), $MachinePrecision] / N[(y * 2.0), $MachinePrecision]), $MachinePrecision]
code[x_, y_, z_] := N[(-0.5 * N[(N[(N[(z + x), $MachinePrecision] / y), $MachinePrecision] * N[(z - x), $MachinePrecision] + (-y)), $MachinePrecision]), $MachinePrecision]
\frac{\left(x \cdot x + y \cdot y\right) - z \cdot z}{y \cdot 2}
-0.5 \cdot \mathsf{fma}\left(\frac{z + x}{y}, z - x, -y\right)




Bits error versus x




Bits error versus y




Bits error versus z
| Original | 28.2 |
|---|---|
| Target | 0.2 |
| Herbie | 0.1 |
Initial program 28.2
Simplified12.8
Applied difference-of-squares_binary6412.8
Applied associate-/l*_binary640.1
Applied associate-/r/_binary640.1
Applied fma-neg_binary640.1
Final simplification0.1
herbie shell --seed 2022131
(FPCore (x y z)
:name "Diagrams.TwoD.Apollonian:initialConfig from diagrams-contrib-1.3.0.5, A"
:precision binary64
:herbie-target
(- (* y 0.5) (* (* (/ 0.5 y) (+ z x)) (- z x)))
(/ (- (+ (* x x) (* y y)) (* z z)) (* y 2.0)))