(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) (/ (- z x) y) (- 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), ((z - x) / y), -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(z + x), Float64(Float64(z - x) / y), 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[(z + x), $MachinePrecision] * N[(N[(z - x), $MachinePrecision] / y), $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(z + x, \frac{z - x}{y}, -y\right)




Bits error versus x




Bits error versus y




Bits error versus z
| Original | 28.3 |
|---|---|
| Target | 0.2 |
| Herbie | 0.2 |
Initial program 28.3
Simplified12.4
Applied *-un-lft-identity_binary6412.4
Applied difference-of-squares_binary6412.4
Applied times-frac_binary640.2
Applied fma-neg_binary640.2
Final simplification0.2
herbie shell --seed 2022130
(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)))