
(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 3 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}
NOTE: x should be positive before calling this function NOTE: y should be positive before calling this function NOTE: z should be positive before calling this function NOTE: x, y, and z should be sorted in increasing order before calling this function. (FPCore (x y z) :precision binary64 (hypot y z))
x = abs(x);
y = abs(y);
z = abs(z);
assert(x < y && y < z);
double code(double x, double y, double z) {
return hypot(y, z);
}
x = Math.abs(x);
y = Math.abs(y);
z = Math.abs(z);
assert x < y && y < z;
public static double code(double x, double y, double z) {
return Math.hypot(y, z);
}
x = abs(x) y = abs(y) z = abs(z) [x, y, z] = sort([x, y, z]) def code(x, y, z): return math.hypot(y, z)
x = abs(x) y = abs(y) z = abs(z) x, y, z = sort([x, y, z]) function code(x, y, z) return hypot(y, z) end
x = abs(x)
y = abs(y)
z = abs(z)
x, y, z = num2cell(sort([x, y, z])){:}
function tmp = code(x, y, z)
tmp = hypot(y, z);
end
NOTE: x should be positive before calling this function NOTE: y should be positive before calling this function NOTE: z should be positive before calling this function NOTE: x, y, and z should be sorted in increasing order before calling this function. code[x_, y_, z_] := N[Sqrt[y ^ 2 + z ^ 2], $MachinePrecision]
\begin{array}{l}
x = |x|\\
y = |y|\\
z = |z|\\
[x, y, z] = \mathsf{sort}([x, y, z])\\
\\
\mathsf{hypot}\left(y, z\right)
\end{array}
Initial program 42.5%
Taylor expanded in x around 0 29.6%
unpow229.6%
unpow229.6%
hypot-def68.2%
Simplified68.2%
Final simplification68.2%
NOTE: x should be positive before calling this function NOTE: y should be positive before calling this function NOTE: z should be positive before calling this function NOTE: x, y, and z should be sorted in increasing order before calling this function. (FPCore (x y z) :precision binary64 (+ z (* 0.5 (* y (/ y z)))))
x = abs(x);
y = abs(y);
z = abs(z);
assert(x < y && y < z);
double code(double x, double y, double z) {
return z + (0.5 * (y * (y / z)));
}
NOTE: x should be positive before calling this function
NOTE: y should be positive before calling this function
NOTE: z should be positive before calling this function
NOTE: x, y, and z should be sorted in increasing order before calling this function.
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = z + (0.5d0 * (y * (y / z)))
end function
x = Math.abs(x);
y = Math.abs(y);
z = Math.abs(z);
assert x < y && y < z;
public static double code(double x, double y, double z) {
return z + (0.5 * (y * (y / z)));
}
x = abs(x) y = abs(y) z = abs(z) [x, y, z] = sort([x, y, z]) def code(x, y, z): return z + (0.5 * (y * (y / z)))
x = abs(x) y = abs(y) z = abs(z) x, y, z = sort([x, y, z]) function code(x, y, z) return Float64(z + Float64(0.5 * Float64(y * Float64(y / z)))) end
x = abs(x)
y = abs(y)
z = abs(z)
x, y, z = num2cell(sort([x, y, z])){:}
function tmp = code(x, y, z)
tmp = z + (0.5 * (y * (y / z)));
end
NOTE: x should be positive before calling this function NOTE: y should be positive before calling this function NOTE: z should be positive before calling this function NOTE: x, y, and z should be sorted in increasing order before calling this function. code[x_, y_, z_] := N[(z + N[(0.5 * N[(y * N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
x = |x|\\
y = |y|\\
z = |z|\\
[x, y, z] = \mathsf{sort}([x, y, z])\\
\\
z + 0.5 \cdot \left(y \cdot \frac{y}{z}\right)
\end{array}
Initial program 42.5%
Taylor expanded in z around inf 16.9%
+-commutative16.9%
unpow216.9%
unpow216.9%
Simplified16.9%
Taylor expanded in y around inf 17.7%
unpow217.7%
associate-/l*19.6%
associate-/r/19.6%
Simplified19.6%
Final simplification19.6%
NOTE: x should be positive before calling this function NOTE: y should be positive before calling this function NOTE: z should be positive before calling this function NOTE: x, y, and z should be sorted in increasing order before calling this function. (FPCore (x y z) :precision binary64 z)
x = abs(x);
y = abs(y);
z = abs(z);
assert(x < y && y < z);
double code(double x, double y, double z) {
return z;
}
NOTE: x should be positive before calling this function
NOTE: y should be positive before calling this function
NOTE: z should be positive before calling this function
NOTE: x, y, and z should be sorted in increasing order before calling this function.
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
x = Math.abs(x);
y = Math.abs(y);
z = Math.abs(z);
assert x < y && y < z;
public static double code(double x, double y, double z) {
return z;
}
x = abs(x) y = abs(y) z = abs(z) [x, y, z] = sort([x, y, z]) def code(x, y, z): return z
x = abs(x) y = abs(y) z = abs(z) x, y, z = sort([x, y, z]) function code(x, y, z) return z end
x = abs(x)
y = abs(y)
z = abs(z)
x, y, z = num2cell(sort([x, y, z])){:}
function tmp = code(x, y, z)
tmp = z;
end
NOTE: x should be positive before calling this function NOTE: y should be positive before calling this function NOTE: z should be positive before calling this function NOTE: x, y, and z should be sorted in increasing order before calling this function. code[x_, y_, z_] := z
\begin{array}{l}
x = |x|\\
y = |y|\\
z = |z|\\
[x, y, z] = \mathsf{sort}([x, y, z])\\
\\
z
\end{array}
Initial program 42.5%
Taylor expanded in z around inf 19.0%
Final simplification19.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 2023285
(FPCore (x y z)
:name "bug366 (missed optimization)"
:precision binary64
:herbie-target
(hypot x (hypot y z))
(sqrt (+ (* x x) (+ (* y y) (* z z)))))