(FPCore (x y z) :precision binary64 (- (+ (- (* x y) (* y y)) (* y y)) (* y z)))
(FPCore (x y z) :precision binary64 (* y (- x z)))
double code(double x, double y, double z) {
return (((x * y) - (y * y)) + (y * y)) - (y * z);
}
double code(double x, double y, double z) {
return y * (x - z);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = (((x * y) - (y * y)) + (y * y)) - (y * z)
end function
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = y * (x - z)
end function
public static double code(double x, double y, double z) {
return (((x * y) - (y * y)) + (y * y)) - (y * z);
}
public static double code(double x, double y, double z) {
return y * (x - z);
}
def code(x, y, z): return (((x * y) - (y * y)) + (y * y)) - (y * z)
def code(x, y, z): return y * (x - z)
function code(x, y, z) return Float64(Float64(Float64(Float64(x * y) - Float64(y * y)) + Float64(y * y)) - Float64(y * z)) end
function code(x, y, z) return Float64(y * Float64(x - z)) end
function tmp = code(x, y, z) tmp = (((x * y) - (y * y)) + (y * y)) - (y * z); end
function tmp = code(x, y, z) tmp = y * (x - z); end
code[x_, y_, z_] := N[(N[(N[(N[(x * y), $MachinePrecision] - N[(y * y), $MachinePrecision]), $MachinePrecision] + N[(y * y), $MachinePrecision]), $MachinePrecision] - N[(y * z), $MachinePrecision]), $MachinePrecision]
code[x_, y_, z_] := N[(y * N[(x - z), $MachinePrecision]), $MachinePrecision]
\left(\left(x \cdot y - y \cdot y\right) + y \cdot y\right) - y \cdot z
y \cdot \left(x - z\right)




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 13.4 |
|---|---|
| Target | 0.0 |
| Herbie | 0.0 |
Initial program 13.4
Simplified0.0
Final simplification0.0
herbie shell --seed 2022150
(FPCore (x y z)
:name "Linear.Quaternion:$c/ from linear-1.19.1.3, D"
:precision binary64
:herbie-target
(* (- x z) y)
(- (+ (- (* x y) (* y y)) (* y y)) (* y z)))