
(FPCore (x y z) :precision binary64 (sqrt (+ (* x x) (+ (* y y) (* z z)))))
double code(double x, double y, double z) {
return sqrt(((x * x) + ((y * y) + (z * z))));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = sqrt(((x * x) + ((y * y) + (z * z))))
end function
public static double code(double x, double y, double z) {
return Math.sqrt(((x * x) + ((y * y) + (z * z))));
}
def code(x, y, z): return math.sqrt(((x * x) + ((y * y) + (z * z))))
function code(x, y, z) return sqrt(Float64(Float64(x * x) + Float64(Float64(y * y) + Float64(z * z)))) end
function tmp = code(x, y, z) tmp = sqrt(((x * x) + ((y * y) + (z * z)))); end
code[x_, y_, z_] := N[Sqrt[N[(N[(x * x), $MachinePrecision] + N[(N[(y * y), $MachinePrecision] + N[(z * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x \cdot x + \left(y \cdot y + z \cdot z\right)}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 2 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (sqrt (+ (* x x) (+ (* y y) (* z z)))))
double code(double x, double y, double z) {
return sqrt(((x * x) + ((y * y) + (z * z))));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = sqrt(((x * x) + ((y * y) + (z * z))))
end function
public static double code(double x, double y, double z) {
return Math.sqrt(((x * x) + ((y * y) + (z * z))));
}
def code(x, y, z): return math.sqrt(((x * x) + ((y * y) + (z * z))))
function code(x, y, z) return sqrt(Float64(Float64(x * x) + Float64(Float64(y * y) + Float64(z * z)))) end
function tmp = code(x, y, z) tmp = sqrt(((x * x) + ((y * y) + (z * z)))); end
code[x_, y_, z_] := N[Sqrt[N[(N[(x * x), $MachinePrecision] + N[(N[(y * y), $MachinePrecision] + N[(z * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x \cdot x + \left(y \cdot y + z \cdot z\right)}
\end{array}
(FPCore (x y z) :precision binary64 (hypot (hypot y x) z))
double code(double x, double y, double z) {
return hypot(hypot(y, x), z);
}
public static double code(double x, double y, double z) {
return Math.hypot(Math.hypot(y, x), z);
}
def code(x, y, z): return math.hypot(math.hypot(y, x), z)
function code(x, y, z) return hypot(hypot(y, x), z) end
function tmp = code(x, y, z) tmp = hypot(hypot(y, x), z); end
code[x_, y_, z_] := N[Sqrt[N[Sqrt[y ^ 2 + x ^ 2], $MachinePrecision] ^ 2 + z ^ 2], $MachinePrecision]
\begin{array}{l}
\\
\mathsf{hypot}\left(\mathsf{hypot}\left(y, x\right), z\right)
\end{array}
Initial program 43.5%
associate-+r+43.5%
+-commutative43.5%
associate-+r+43.5%
Simplified43.5%
associate-+r+43.5%
add-sqr-sqrt43.5%
hypot-define55.1%
hypot-define100.0%
Applied egg-rr100.0%
Final simplification100.0%
(FPCore (x y z) :precision binary64 z)
double code(double x, double y, double z) {
return z;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = z
end function
public static double code(double x, double y, double z) {
return z;
}
def code(x, y, z): return z
function code(x, y, z) return z end
function tmp = code(x, y, z) tmp = z; end
code[x_, y_, z_] := z
\begin{array}{l}
\\
z
\end{array}
Initial program 43.5%
associate-+r+43.5%
+-commutative43.5%
associate-+r+43.5%
Simplified43.5%
Taylor expanded in z around inf 21.0%
Final simplification21.0%
(FPCore (x y z) :precision binary64 (hypot x (hypot y z)))
double code(double x, double y, double z) {
return hypot(x, hypot(y, z));
}
public static double code(double x, double y, double z) {
return Math.hypot(x, Math.hypot(y, z));
}
def code(x, y, z): return math.hypot(x, math.hypot(y, z))
function code(x, y, z) return hypot(x, hypot(y, z)) end
function tmp = code(x, y, z) tmp = hypot(x, hypot(y, z)); end
code[x_, y_, z_] := N[Sqrt[x ^ 2 + N[Sqrt[y ^ 2 + z ^ 2], $MachinePrecision] ^ 2], $MachinePrecision]
\begin{array}{l}
\\
\mathsf{hypot}\left(x, \mathsf{hypot}\left(y, z\right)\right)
\end{array}
herbie shell --seed 2024048
(FPCore (x y z)
:name "bug366 (missed optimization)"
:precision binary64
:alt
(hypot x (hypot y z))
(sqrt (+ (* x x) (+ (* y y) (* z z)))))