
(FPCore (x y z) :precision binary64 (/ (- (+ (* x x) (* y y)) (* z z)) (* y 2.0)))
double code(double x, double y, double z) {
return (((x * x) + (y * y)) - (z * z)) / (y * 2.0);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = (((x * x) + (y * y)) - (z * z)) / (y * 2.0d0)
end function
public static double code(double x, double y, double z) {
return (((x * x) + (y * y)) - (z * z)) / (y * 2.0);
}
def code(x, y, z): return (((x * x) + (y * y)) - (z * z)) / (y * 2.0)
function code(x, y, z) return Float64(Float64(Float64(Float64(x * x) + Float64(y * y)) - Float64(z * z)) / Float64(y * 2.0)) end
function tmp = code(x, y, z) tmp = (((x * x) + (y * y)) - (z * z)) / (y * 2.0); 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]
\begin{array}{l}
\\
\frac{\left(x \cdot x + y \cdot y\right) - z \cdot z}{y \cdot 2}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (/ (- (+ (* x x) (* y y)) (* z z)) (* y 2.0)))
double code(double x, double y, double z) {
return (((x * x) + (y * y)) - (z * z)) / (y * 2.0);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = (((x * x) + (y * y)) - (z * z)) / (y * 2.0d0)
end function
public static double code(double x, double y, double z) {
return (((x * x) + (y * y)) - (z * z)) / (y * 2.0);
}
def code(x, y, z): return (((x * x) + (y * y)) - (z * z)) / (y * 2.0)
function code(x, y, z) return Float64(Float64(Float64(Float64(x * x) + Float64(y * y)) - Float64(z * z)) / Float64(y * 2.0)) end
function tmp = code(x, y, z) tmp = (((x * x) + (y * y)) - (z * z)) / (y * 2.0); 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]
\begin{array}{l}
\\
\frac{\left(x \cdot x + y \cdot y\right) - z \cdot z}{y \cdot 2}
\end{array}
(FPCore (x y z) :precision binary64 (* 0.5 (+ y (/ (+ z x) (/ y (- x z))))))
double code(double x, double y, double z) {
return 0.5 * (y + ((z + x) / (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 = 0.5d0 * (y + ((z + x) / (y / (x - z))))
end function
public static double code(double x, double y, double z) {
return 0.5 * (y + ((z + x) / (y / (x - z))));
}
def code(x, y, z): return 0.5 * (y + ((z + x) / (y / (x - z))))
function code(x, y, z) return Float64(0.5 * Float64(y + Float64(Float64(z + x) / Float64(y / Float64(x - z))))) end
function tmp = code(x, y, z) tmp = 0.5 * (y + ((z + x) / (y / (x - z)))); end
code[x_, y_, z_] := N[(0.5 * N[(y + N[(N[(z + x), $MachinePrecision] / N[(y / N[(x - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \left(y + \frac{z + x}{\frac{y}{x - z}}\right)
\end{array}
Initial program 71.1%
add-sqr-sqrt71.1%
difference-of-squares73.5%
hypot-def74.7%
hypot-def75.9%
Applied egg-rr75.9%
Taylor expanded in y around 0 63.5%
distribute-lft-out63.5%
distribute-lft-out63.5%
+-commutative63.5%
associate-/l*69.7%
+-commutative69.7%
Simplified69.7%
Taylor expanded in y around 0 89.9%
associate-/l*99.9%
+-commutative99.9%
Simplified99.9%
Final simplification99.9%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* -0.5 (* z (/ (+ z x) y)))))
(if (<= y 5.8e-200)
t_0
(if (<= y 4e-145)
(* x (* x (/ 0.5 y)))
(if (<= y 2.4e-44)
t_0
(if (<= y 3e+94) (* (/ x y) (/ x 2.0)) (* 0.5 y)))))))
double code(double x, double y, double z) {
double t_0 = -0.5 * (z * ((z + x) / y));
double tmp;
if (y <= 5.8e-200) {
tmp = t_0;
} else if (y <= 4e-145) {
tmp = x * (x * (0.5 / y));
} else if (y <= 2.4e-44) {
tmp = t_0;
} else if (y <= 3e+94) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: tmp
t_0 = (-0.5d0) * (z * ((z + x) / y))
if (y <= 5.8d-200) then
tmp = t_0
else if (y <= 4d-145) then
tmp = x * (x * (0.5d0 / y))
else if (y <= 2.4d-44) then
tmp = t_0
else if (y <= 3d+94) then
tmp = (x / y) * (x / 2.0d0)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = -0.5 * (z * ((z + x) / y));
double tmp;
if (y <= 5.8e-200) {
tmp = t_0;
} else if (y <= 4e-145) {
tmp = x * (x * (0.5 / y));
} else if (y <= 2.4e-44) {
tmp = t_0;
} else if (y <= 3e+94) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): t_0 = -0.5 * (z * ((z + x) / y)) tmp = 0 if y <= 5.8e-200: tmp = t_0 elif y <= 4e-145: tmp = x * (x * (0.5 / y)) elif y <= 2.4e-44: tmp = t_0 elif y <= 3e+94: tmp = (x / y) * (x / 2.0) else: tmp = 0.5 * y return tmp
function code(x, y, z) t_0 = Float64(-0.5 * Float64(z * Float64(Float64(z + x) / y))) tmp = 0.0 if (y <= 5.8e-200) tmp = t_0; elseif (y <= 4e-145) tmp = Float64(x * Float64(x * Float64(0.5 / y))); elseif (y <= 2.4e-44) tmp = t_0; elseif (y <= 3e+94) tmp = Float64(Float64(x / y) * Float64(x / 2.0)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) t_0 = -0.5 * (z * ((z + x) / y)); tmp = 0.0; if (y <= 5.8e-200) tmp = t_0; elseif (y <= 4e-145) tmp = x * (x * (0.5 / y)); elseif (y <= 2.4e-44) tmp = t_0; elseif (y <= 3e+94) tmp = (x / y) * (x / 2.0); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(-0.5 * N[(z * N[(N[(z + x), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[y, 5.8e-200], t$95$0, If[LessEqual[y, 4e-145], N[(x * N[(x * N[(0.5 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 2.4e-44], t$95$0, If[LessEqual[y, 3e+94], N[(N[(x / y), $MachinePrecision] * N[(x / 2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := -0.5 \cdot \left(z \cdot \frac{z + x}{y}\right)\\
\mathbf{if}\;y \leq 5.8 \cdot 10^{-200}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y \leq 4 \cdot 10^{-145}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.5}{y}\right)\\
\mathbf{elif}\;y \leq 2.4 \cdot 10^{-44}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y \leq 3 \cdot 10^{+94}:\\
\;\;\;\;\frac{x}{y} \cdot \frac{x}{2}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 5.8e-200 or 3.99999999999999966e-145 < y < 2.40000000000000009e-44Initial program 76.8%
add-sqr-sqrt76.8%
difference-of-squares79.6%
hypot-def80.8%
hypot-def82.0%
Applied egg-rr82.0%
Taylor expanded in y around 0 66.9%
associate-/l*69.7%
+-commutative69.7%
Simplified69.7%
Taylor expanded in x around 0 40.3%
associate-*r/40.3%
neg-mul-140.3%
Simplified40.3%
Taylor expanded in y around 0 39.3%
+-commutative39.3%
associate-*r/42.0%
Simplified42.0%
if 5.8e-200 < y < 3.99999999999999966e-145Initial program 89.5%
Taylor expanded in x around inf 43.1%
div-inv43.1%
*-commutative43.1%
associate-/r*43.1%
metadata-eval43.1%
unpow243.1%
associate-*l*43.1%
Applied egg-rr43.1%
if 2.40000000000000009e-44 < y < 3.0000000000000001e94Initial program 91.1%
Taylor expanded in x around inf 35.6%
unpow235.6%
times-frac44.4%
Applied egg-rr44.4%
if 3.0000000000000001e94 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification49.2%
(FPCore (x y z)
:precision binary64
(if (<= y 1.05e-199)
(* -0.5 (/ z (/ y (+ z x))))
(if (<= y 1.1e-146)
(* x (* x (/ 0.5 y)))
(if (<= y 3.2e-47)
(* -0.5 (* z (/ (+ z x) y)))
(if (<= y 4e+93) (* (/ x y) (/ x 2.0)) (* 0.5 y))))))
double code(double x, double y, double z) {
double tmp;
if (y <= 1.05e-199) {
tmp = -0.5 * (z / (y / (z + x)));
} else if (y <= 1.1e-146) {
tmp = x * (x * (0.5 / y));
} else if (y <= 3.2e-47) {
tmp = -0.5 * (z * ((z + x) / y));
} else if (y <= 4e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 1.05d-199) then
tmp = (-0.5d0) * (z / (y / (z + x)))
else if (y <= 1.1d-146) then
tmp = x * (x * (0.5d0 / y))
else if (y <= 3.2d-47) then
tmp = (-0.5d0) * (z * ((z + x) / y))
else if (y <= 4d+93) then
tmp = (x / y) * (x / 2.0d0)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 1.05e-199) {
tmp = -0.5 * (z / (y / (z + x)));
} else if (y <= 1.1e-146) {
tmp = x * (x * (0.5 / y));
} else if (y <= 3.2e-47) {
tmp = -0.5 * (z * ((z + x) / y));
} else if (y <= 4e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 1.05e-199: tmp = -0.5 * (z / (y / (z + x))) elif y <= 1.1e-146: tmp = x * (x * (0.5 / y)) elif y <= 3.2e-47: tmp = -0.5 * (z * ((z + x) / y)) elif y <= 4e+93: tmp = (x / y) * (x / 2.0) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 1.05e-199) tmp = Float64(-0.5 * Float64(z / Float64(y / Float64(z + x)))); elseif (y <= 1.1e-146) tmp = Float64(x * Float64(x * Float64(0.5 / y))); elseif (y <= 3.2e-47) tmp = Float64(-0.5 * Float64(z * Float64(Float64(z + x) / y))); elseif (y <= 4e+93) tmp = Float64(Float64(x / y) * Float64(x / 2.0)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 1.05e-199) tmp = -0.5 * (z / (y / (z + x))); elseif (y <= 1.1e-146) tmp = x * (x * (0.5 / y)); elseif (y <= 3.2e-47) tmp = -0.5 * (z * ((z + x) / y)); elseif (y <= 4e+93) tmp = (x / y) * (x / 2.0); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 1.05e-199], N[(-0.5 * N[(z / N[(y / N[(z + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.1e-146], N[(x * N[(x * N[(0.5 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 3.2e-47], N[(-0.5 * N[(z * N[(N[(z + x), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 4e+93], N[(N[(x / y), $MachinePrecision] * N[(x / 2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 1.05 \cdot 10^{-199}:\\
\;\;\;\;-0.5 \cdot \frac{z}{\frac{y}{z + x}}\\
\mathbf{elif}\;y \leq 1.1 \cdot 10^{-146}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.5}{y}\right)\\
\mathbf{elif}\;y \leq 3.2 \cdot 10^{-47}:\\
\;\;\;\;-0.5 \cdot \left(z \cdot \frac{z + x}{y}\right)\\
\mathbf{elif}\;y \leq 4 \cdot 10^{+93}:\\
\;\;\;\;\frac{x}{y} \cdot \frac{x}{2}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 1.05000000000000001e-199Initial program 74.6%
add-sqr-sqrt74.6%
difference-of-squares77.0%
hypot-def78.3%
hypot-def79.7%
Applied egg-rr79.7%
Taylor expanded in y around 0 64.6%
associate-/l*67.8%
+-commutative67.8%
Simplified67.8%
Taylor expanded in x around 0 39.2%
associate-*r/39.2%
neg-mul-139.2%
Simplified39.2%
Taylor expanded in y around 0 38.1%
associate-/l*40.5%
+-commutative40.5%
Simplified40.5%
if 1.05000000000000001e-199 < y < 1.1e-146Initial program 89.5%
Taylor expanded in x around inf 43.1%
div-inv43.1%
*-commutative43.1%
associate-/r*43.1%
metadata-eval43.1%
unpow243.1%
associate-*l*43.1%
Applied egg-rr43.1%
if 1.1e-146 < y < 3.1999999999999999e-47Initial program 94.4%
add-sqr-sqrt94.4%
difference-of-squares99.7%
hypot-def99.7%
hypot-def99.7%
Applied egg-rr99.7%
Taylor expanded in y around 0 84.4%
associate-/l*84.4%
+-commutative84.4%
Simplified84.4%
Taylor expanded in x around 0 49.0%
associate-*r/49.0%
neg-mul-149.0%
Simplified49.0%
Taylor expanded in y around 0 49.0%
+-commutative49.0%
associate-*r/54.1%
Simplified54.1%
if 3.1999999999999999e-47 < y < 4.00000000000000017e93Initial program 91.1%
Taylor expanded in x around inf 35.6%
unpow235.6%
times-frac44.4%
Applied egg-rr44.4%
if 4.00000000000000017e93 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification49.2%
(FPCore (x y z)
:precision binary64
(if (<= y 3.7e-199)
(* -0.5 (/ (* z (+ z x)) y))
(if (<= y 1.45e-146)
(* x (* x (/ 0.5 y)))
(if (<= y 6e-46)
(* -0.5 (* z (/ (+ z x) y)))
(if (<= y 2.5e+93) (* (/ x y) (/ x 2.0)) (* 0.5 y))))))
double code(double x, double y, double z) {
double tmp;
if (y <= 3.7e-199) {
tmp = -0.5 * ((z * (z + x)) / y);
} else if (y <= 1.45e-146) {
tmp = x * (x * (0.5 / y));
} else if (y <= 6e-46) {
tmp = -0.5 * (z * ((z + x) / y));
} else if (y <= 2.5e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 3.7d-199) then
tmp = (-0.5d0) * ((z * (z + x)) / y)
else if (y <= 1.45d-146) then
tmp = x * (x * (0.5d0 / y))
else if (y <= 6d-46) then
tmp = (-0.5d0) * (z * ((z + x) / y))
else if (y <= 2.5d+93) then
tmp = (x / y) * (x / 2.0d0)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 3.7e-199) {
tmp = -0.5 * ((z * (z + x)) / y);
} else if (y <= 1.45e-146) {
tmp = x * (x * (0.5 / y));
} else if (y <= 6e-46) {
tmp = -0.5 * (z * ((z + x) / y));
} else if (y <= 2.5e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 3.7e-199: tmp = -0.5 * ((z * (z + x)) / y) elif y <= 1.45e-146: tmp = x * (x * (0.5 / y)) elif y <= 6e-46: tmp = -0.5 * (z * ((z + x) / y)) elif y <= 2.5e+93: tmp = (x / y) * (x / 2.0) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 3.7e-199) tmp = Float64(-0.5 * Float64(Float64(z * Float64(z + x)) / y)); elseif (y <= 1.45e-146) tmp = Float64(x * Float64(x * Float64(0.5 / y))); elseif (y <= 6e-46) tmp = Float64(-0.5 * Float64(z * Float64(Float64(z + x) / y))); elseif (y <= 2.5e+93) tmp = Float64(Float64(x / y) * Float64(x / 2.0)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 3.7e-199) tmp = -0.5 * ((z * (z + x)) / y); elseif (y <= 1.45e-146) tmp = x * (x * (0.5 / y)); elseif (y <= 6e-46) tmp = -0.5 * (z * ((z + x) / y)); elseif (y <= 2.5e+93) tmp = (x / y) * (x / 2.0); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 3.7e-199], N[(-0.5 * N[(N[(z * N[(z + x), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.45e-146], N[(x * N[(x * N[(0.5 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 6e-46], N[(-0.5 * N[(z * N[(N[(z + x), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 2.5e+93], N[(N[(x / y), $MachinePrecision] * N[(x / 2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 3.7 \cdot 10^{-199}:\\
\;\;\;\;-0.5 \cdot \frac{z \cdot \left(z + x\right)}{y}\\
\mathbf{elif}\;y \leq 1.45 \cdot 10^{-146}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.5}{y}\right)\\
\mathbf{elif}\;y \leq 6 \cdot 10^{-46}:\\
\;\;\;\;-0.5 \cdot \left(z \cdot \frac{z + x}{y}\right)\\
\mathbf{elif}\;y \leq 2.5 \cdot 10^{+93}:\\
\;\;\;\;\frac{x}{y} \cdot \frac{x}{2}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 3.69999999999999999e-199Initial program 74.6%
add-sqr-sqrt74.6%
difference-of-squares77.0%
hypot-def78.3%
hypot-def79.7%
Applied egg-rr79.7%
Taylor expanded in y around 0 64.6%
associate-/l*67.8%
+-commutative67.8%
Simplified67.8%
Taylor expanded in x around 0 39.2%
associate-*r/39.2%
neg-mul-139.2%
Simplified39.2%
Taylor expanded in y around 0 38.1%
if 3.69999999999999999e-199 < y < 1.45000000000000005e-146Initial program 89.5%
Taylor expanded in x around inf 43.1%
div-inv43.1%
*-commutative43.1%
associate-/r*43.1%
metadata-eval43.1%
unpow243.1%
associate-*l*43.1%
Applied egg-rr43.1%
if 1.45000000000000005e-146 < y < 5.99999999999999975e-46Initial program 94.4%
add-sqr-sqrt94.4%
difference-of-squares99.7%
hypot-def99.7%
hypot-def99.7%
Applied egg-rr99.7%
Taylor expanded in y around 0 84.4%
associate-/l*84.4%
+-commutative84.4%
Simplified84.4%
Taylor expanded in x around 0 49.0%
associate-*r/49.0%
neg-mul-149.0%
Simplified49.0%
Taylor expanded in y around 0 49.0%
+-commutative49.0%
associate-*r/54.1%
Simplified54.1%
if 5.99999999999999975e-46 < y < 2.5000000000000001e93Initial program 91.1%
Taylor expanded in x around inf 35.6%
unpow235.6%
times-frac44.4%
Applied egg-rr44.4%
if 2.5000000000000001e93 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification47.9%
(FPCore (x y z)
:precision binary64
(if (<= y 3.1e-264)
(/ x (* 2.0 (/ y x)))
(if (<= y 1.75e-241)
(* 0.5 (/ (- x) (/ y z)))
(if (<= y 2.3e+93) (* (/ x y) (/ x 2.0)) (* 0.5 y)))))
double code(double x, double y, double z) {
double tmp;
if (y <= 3.1e-264) {
tmp = x / (2.0 * (y / x));
} else if (y <= 1.75e-241) {
tmp = 0.5 * (-x / (y / z));
} else if (y <= 2.3e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 3.1d-264) then
tmp = x / (2.0d0 * (y / x))
else if (y <= 1.75d-241) then
tmp = 0.5d0 * (-x / (y / z))
else if (y <= 2.3d+93) then
tmp = (x / y) * (x / 2.0d0)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 3.1e-264) {
tmp = x / (2.0 * (y / x));
} else if (y <= 1.75e-241) {
tmp = 0.5 * (-x / (y / z));
} else if (y <= 2.3e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 3.1e-264: tmp = x / (2.0 * (y / x)) elif y <= 1.75e-241: tmp = 0.5 * (-x / (y / z)) elif y <= 2.3e+93: tmp = (x / y) * (x / 2.0) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 3.1e-264) tmp = Float64(x / Float64(2.0 * Float64(y / x))); elseif (y <= 1.75e-241) tmp = Float64(0.5 * Float64(Float64(-x) / Float64(y / z))); elseif (y <= 2.3e+93) tmp = Float64(Float64(x / y) * Float64(x / 2.0)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 3.1e-264) tmp = x / (2.0 * (y / x)); elseif (y <= 1.75e-241) tmp = 0.5 * (-x / (y / z)); elseif (y <= 2.3e+93) tmp = (x / y) * (x / 2.0); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 3.1e-264], N[(x / N[(2.0 * N[(y / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.75e-241], N[(0.5 * N[((-x) / N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 2.3e+93], N[(N[(x / y), $MachinePrecision] * N[(x / 2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 3.1 \cdot 10^{-264}:\\
\;\;\;\;\frac{x}{2 \cdot \frac{y}{x}}\\
\mathbf{elif}\;y \leq 1.75 \cdot 10^{-241}:\\
\;\;\;\;0.5 \cdot \frac{-x}{\frac{y}{z}}\\
\mathbf{elif}\;y \leq 2.3 \cdot 10^{+93}:\\
\;\;\;\;\frac{x}{y} \cdot \frac{x}{2}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 3.1000000000000002e-264Initial program 73.1%
Taylor expanded in x around inf 32.2%
unpow232.2%
times-frac34.4%
Applied egg-rr34.4%
clear-num34.4%
frac-times34.4%
*-un-lft-identity34.4%
Applied egg-rr34.4%
if 3.1000000000000002e-264 < y < 1.7499999999999999e-241Initial program 100.0%
add-sqr-sqrt100.0%
difference-of-squares100.0%
hypot-def100.0%
hypot-def100.0%
Applied egg-rr100.0%
Taylor expanded in y around 0 100.0%
associate-/l*100.0%
+-commutative100.0%
Simplified100.0%
Taylor expanded in x around 0 100.0%
associate-*r/100.0%
neg-mul-1100.0%
Simplified100.0%
Taylor expanded in z around 0 27.2%
mul-1-neg27.2%
associate-/l*51.0%
Simplified51.0%
if 1.7499999999999999e-241 < y < 2.3000000000000002e93Initial program 91.1%
Taylor expanded in x around inf 40.1%
unpow240.1%
times-frac42.9%
Applied egg-rr42.9%
if 2.3000000000000002e93 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification45.3%
(FPCore (x y z) :precision binary64 (if (<= y 9.2e-48) (/ (/ (+ y z) (/ (- y) z)) 2.0) (if (<= y 3.3e+93) (* (/ x y) (/ x 2.0)) (* 0.5 y))))
double code(double x, double y, double z) {
double tmp;
if (y <= 9.2e-48) {
tmp = ((y + z) / (-y / z)) / 2.0;
} else if (y <= 3.3e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 9.2d-48) then
tmp = ((y + z) / (-y / z)) / 2.0d0
else if (y <= 3.3d+93) then
tmp = (x / y) * (x / 2.0d0)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 9.2e-48) {
tmp = ((y + z) / (-y / z)) / 2.0;
} else if (y <= 3.3e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 9.2e-48: tmp = ((y + z) / (-y / z)) / 2.0 elif y <= 3.3e+93: tmp = (x / y) * (x / 2.0) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 9.2e-48) tmp = Float64(Float64(Float64(y + z) / Float64(Float64(-y) / z)) / 2.0); elseif (y <= 3.3e+93) tmp = Float64(Float64(x / y) * Float64(x / 2.0)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 9.2e-48) tmp = ((y + z) / (-y / z)) / 2.0; elseif (y <= 3.3e+93) tmp = (x / y) * (x / 2.0); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 9.2e-48], N[(N[(N[(y + z), $MachinePrecision] / N[((-y) / z), $MachinePrecision]), $MachinePrecision] / 2.0), $MachinePrecision], If[LessEqual[y, 3.3e+93], N[(N[(x / y), $MachinePrecision] * N[(x / 2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 9.2 \cdot 10^{-48}:\\
\;\;\;\;\frac{\frac{y + z}{\frac{-y}{z}}}{2}\\
\mathbf{elif}\;y \leq 3.3 \cdot 10^{+93}:\\
\;\;\;\;\frac{x}{y} \cdot \frac{x}{2}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 9.2000000000000003e-48Initial program 78.1%
div-sub74.4%
sub-neg74.4%
div-inv74.3%
add-sqr-sqrt74.3%
pow274.3%
hypot-def74.3%
*-commutative74.3%
associate-/r*74.3%
metadata-eval74.3%
div-inv74.3%
pow274.3%
*-commutative74.3%
associate-/r*74.3%
metadata-eval74.3%
Applied egg-rr74.3%
sub-neg74.3%
distribute-rgt-out--78.1%
Simplified78.1%
*-commutative78.1%
associate-*r/78.1%
associate-/l*78.1%
div-inv78.1%
metadata-eval78.1%
unpow278.1%
unpow278.1%
difference-of-squares83.3%
times-frac99.9%
associate-*r/99.9%
Applied egg-rr99.9%
Taylor expanded in x around 0 50.8%
associate-/l*65.8%
Simplified65.8%
Taylor expanded in y around 0 37.9%
associate-*r/37.9%
mul-1-neg37.9%
Simplified37.9%
if 9.2000000000000003e-48 < y < 3.30000000000000009e93Initial program 91.1%
Taylor expanded in x around inf 35.6%
unpow235.6%
times-frac44.4%
Applied egg-rr44.4%
if 3.30000000000000009e93 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification46.2%
(FPCore (x y z) :precision binary64 (if (<= y 3.1e+94) (* 0.5 (/ (* (+ z x) (- x z)) y)) (* 0.5 y)))
double code(double x, double y, double z) {
double tmp;
if (y <= 3.1e+94) {
tmp = 0.5 * (((z + x) * (x - z)) / y);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 3.1d+94) then
tmp = 0.5d0 * (((z + x) * (x - z)) / y)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 3.1e+94) {
tmp = 0.5 * (((z + x) * (x - z)) / y);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 3.1e+94: tmp = 0.5 * (((z + x) * (x - z)) / y) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 3.1e+94) tmp = Float64(0.5 * Float64(Float64(Float64(z + x) * Float64(x - z)) / y)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 3.1e+94) tmp = 0.5 * (((z + x) * (x - z)) / y); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 3.1e+94], N[(0.5 * N[(N[(N[(z + x), $MachinePrecision] * N[(x - z), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 3.1 \cdot 10^{+94}:\\
\;\;\;\;0.5 \cdot \frac{\left(z + x\right) \cdot \left(x - z\right)}{y}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 3.09999999999999991e94Initial program 79.4%
add-sqr-sqrt79.4%
difference-of-squares82.1%
hypot-def83.1%
hypot-def84.1%
Applied egg-rr84.1%
Taylor expanded in y around 0 67.6%
if 3.09999999999999991e94 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification69.7%
(FPCore (x y z) :precision binary64 (if (<= y 2.25e+51) (* 0.5 (/ (* (+ z x) (- x z)) y)) (* 0.5 (/ (+ y z) (/ y (- y z))))))
double code(double x, double y, double z) {
double tmp;
if (y <= 2.25e+51) {
tmp = 0.5 * (((z + x) * (x - z)) / y);
} else {
tmp = 0.5 * ((y + z) / (y / (y - z)));
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 2.25d+51) then
tmp = 0.5d0 * (((z + x) * (x - z)) / y)
else
tmp = 0.5d0 * ((y + z) / (y / (y - z)))
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 2.25e+51) {
tmp = 0.5 * (((z + x) * (x - z)) / y);
} else {
tmp = 0.5 * ((y + z) / (y / (y - z)));
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 2.25e+51: tmp = 0.5 * (((z + x) * (x - z)) / y) else: tmp = 0.5 * ((y + z) / (y / (y - z))) return tmp
function code(x, y, z) tmp = 0.0 if (y <= 2.25e+51) tmp = Float64(0.5 * Float64(Float64(Float64(z + x) * Float64(x - z)) / y)); else tmp = Float64(0.5 * Float64(Float64(y + z) / Float64(y / Float64(y - z)))); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 2.25e+51) tmp = 0.5 * (((z + x) * (x - z)) / y); else tmp = 0.5 * ((y + z) / (y / (y - z))); end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 2.25e+51], N[(0.5 * N[(N[(N[(z + x), $MachinePrecision] * N[(x - z), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[(N[(y + z), $MachinePrecision] / N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 2.25 \cdot 10^{+51}:\\
\;\;\;\;0.5 \cdot \frac{\left(z + x\right) \cdot \left(x - z\right)}{y}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{y + z}{\frac{y}{y - z}}\\
\end{array}
\end{array}
if y < 2.25e51Initial program 79.4%
add-sqr-sqrt79.4%
difference-of-squares82.2%
hypot-def83.2%
hypot-def84.2%
Applied egg-rr84.2%
Taylor expanded in y around 0 68.9%
if 2.25e51 < y Initial program 43.7%
add-sqr-sqrt43.7%
difference-of-squares44.4%
hypot-def46.2%
hypot-def48.1%
Applied egg-rr48.1%
Taylor expanded in x around 0 39.8%
associate-/l*83.8%
Simplified83.8%
Final simplification72.4%
(FPCore (x y z) :precision binary64 (if (<= y 2.85e+97) (* 0.5 (/ (+ z x) (/ y (- x z)))) (* 0.5 (/ (+ y z) (/ y (- y z))))))
double code(double x, double y, double z) {
double tmp;
if (y <= 2.85e+97) {
tmp = 0.5 * ((z + x) / (y / (x - z)));
} else {
tmp = 0.5 * ((y + z) / (y / (y - z)));
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 2.85d+97) then
tmp = 0.5d0 * ((z + x) / (y / (x - z)))
else
tmp = 0.5d0 * ((y + z) / (y / (y - z)))
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 2.85e+97) {
tmp = 0.5 * ((z + x) / (y / (x - z)));
} else {
tmp = 0.5 * ((y + z) / (y / (y - z)));
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 2.85e+97: tmp = 0.5 * ((z + x) / (y / (x - z))) else: tmp = 0.5 * ((y + z) / (y / (y - z))) return tmp
function code(x, y, z) tmp = 0.0 if (y <= 2.85e+97) tmp = Float64(0.5 * Float64(Float64(z + x) / Float64(y / Float64(x - z)))); else tmp = Float64(0.5 * Float64(Float64(y + z) / Float64(y / Float64(y - z)))); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 2.85e+97) tmp = 0.5 * ((z + x) / (y / (x - z))); else tmp = 0.5 * ((y + z) / (y / (y - z))); end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 2.85e+97], N[(0.5 * N[(N[(z + x), $MachinePrecision] / N[(y / N[(x - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[(N[(y + z), $MachinePrecision] / N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 2.85 \cdot 10^{+97}:\\
\;\;\;\;0.5 \cdot \frac{z + x}{\frac{y}{x - z}}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{y + z}{\frac{y}{y - z}}\\
\end{array}
\end{array}
if y < 2.8500000000000001e97Initial program 79.6%
add-sqr-sqrt79.6%
difference-of-squares82.3%
hypot-def83.3%
hypot-def84.2%
Applied egg-rr84.2%
Taylor expanded in y around 0 67.5%
associate-/l*70.6%
+-commutative70.6%
Simplified70.6%
if 2.8500000000000001e97 < y Initial program 33.3%
add-sqr-sqrt33.3%
difference-of-squares34.2%
hypot-def36.4%
hypot-def38.8%
Applied egg-rr38.8%
Taylor expanded in x around 0 34.7%
associate-/l*89.9%
Simplified89.9%
Final simplification74.2%
(FPCore (x y z) :precision binary64 (if (<= y 2.6e+93) (* x (* x (/ 0.5 y))) (* 0.5 y)))
double code(double x, double y, double z) {
double tmp;
if (y <= 2.6e+93) {
tmp = x * (x * (0.5 / y));
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 2.6d+93) then
tmp = x * (x * (0.5d0 / y))
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 2.6e+93) {
tmp = x * (x * (0.5 / y));
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 2.6e+93: tmp = x * (x * (0.5 / y)) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 2.6e+93) tmp = Float64(x * Float64(x * Float64(0.5 / y))); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 2.6e+93) tmp = x * (x * (0.5 / y)); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 2.6e+93], N[(x * N[(x * N[(0.5 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 2.6 \cdot 10^{+93}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.5}{y}\right)\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 2.6e93Initial program 79.4%
Taylor expanded in x around inf 34.2%
div-inv34.2%
*-commutative34.2%
associate-/r*34.2%
metadata-eval34.2%
unpow234.2%
associate-*l*36.5%
Applied egg-rr36.5%
if 2.6e93 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification44.5%
(FPCore (x y z) :precision binary64 (if (<= y 3.1e+93) (* (/ x y) (/ x 2.0)) (* 0.5 y)))
double code(double x, double y, double z) {
double tmp;
if (y <= 3.1e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= 3.1d+93) then
tmp = (x / y) * (x / 2.0d0)
else
tmp = 0.5d0 * y
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= 3.1e+93) {
tmp = (x / y) * (x / 2.0);
} else {
tmp = 0.5 * y;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= 3.1e+93: tmp = (x / y) * (x / 2.0) else: tmp = 0.5 * y return tmp
function code(x, y, z) tmp = 0.0 if (y <= 3.1e+93) tmp = Float64(Float64(x / y) * Float64(x / 2.0)); else tmp = Float64(0.5 * y); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= 3.1e+93) tmp = (x / y) * (x / 2.0); else tmp = 0.5 * y; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, 3.1e+93], N[(N[(x / y), $MachinePrecision] * N[(x / 2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq 3.1 \cdot 10^{+93}:\\
\;\;\;\;\frac{x}{y} \cdot \frac{x}{2}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot y\\
\end{array}
\end{array}
if y < 3.10000000000000019e93Initial program 79.4%
Taylor expanded in x around inf 34.2%
unpow234.2%
times-frac36.5%
Applied egg-rr36.5%
if 3.10000000000000019e93 < y Initial program 36.1%
Taylor expanded in y around inf 78.4%
Final simplification44.5%
(FPCore (x y z) :precision binary64 (* 0.5 y))
double code(double x, double y, double z) {
return 0.5 * y;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = 0.5d0 * y
end function
public static double code(double x, double y, double z) {
return 0.5 * y;
}
def code(x, y, z): return 0.5 * y
function code(x, y, z) return Float64(0.5 * y) end
function tmp = code(x, y, z) tmp = 0.5 * y; end
code[x_, y_, z_] := N[(0.5 * y), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot y
\end{array}
Initial program 71.1%
Taylor expanded in y around inf 40.0%
Final simplification40.0%
(FPCore (x y z) :precision binary64 (- (* y 0.5) (* (* (/ 0.5 y) (+ z x)) (- z x))))
double code(double x, double y, double z) {
return (y * 0.5) - (((0.5 / y) * (z + x)) * (z - x));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = (y * 0.5d0) - (((0.5d0 / y) * (z + x)) * (z - x))
end function
public static double code(double x, double y, double z) {
return (y * 0.5) - (((0.5 / y) * (z + x)) * (z - x));
}
def code(x, y, z): return (y * 0.5) - (((0.5 / y) * (z + x)) * (z - x))
function code(x, y, z) return Float64(Float64(y * 0.5) - Float64(Float64(Float64(0.5 / y) * Float64(z + x)) * Float64(z - x))) end
function tmp = code(x, y, z) tmp = (y * 0.5) - (((0.5 / y) * (z + x)) * (z - x)); end
code[x_, y_, z_] := N[(N[(y * 0.5), $MachinePrecision] - N[(N[(N[(0.5 / y), $MachinePrecision] * N[(z + x), $MachinePrecision]), $MachinePrecision] * N[(z - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
y \cdot 0.5 - \left(\frac{0.5}{y} \cdot \left(z + x\right)\right) \cdot \left(z - x\right)
\end{array}
herbie shell --seed 2024020
(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)))