
(FPCore (x y z t) :precision binary64 (- x (/ (* (* y 2.0) z) (- (* (* z 2.0) z) (* y t)))))
double code(double x, double y, double z, double t) {
return x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t)));
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = x - (((y * 2.0d0) * z) / (((z * 2.0d0) * z) - (y * t)))
end function
public static double code(double x, double y, double z, double t) {
return x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t)));
}
def code(x, y, z, t): return x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t)))
function code(x, y, z, t) return Float64(x - Float64(Float64(Float64(y * 2.0) * z) / Float64(Float64(Float64(z * 2.0) * z) - Float64(y * t)))) end
function tmp = code(x, y, z, t) tmp = x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t))); end
code[x_, y_, z_, t_] := N[(x - N[(N[(N[(y * 2.0), $MachinePrecision] * z), $MachinePrecision] / N[(N[(N[(z * 2.0), $MachinePrecision] * z), $MachinePrecision] - N[(y * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x - \frac{\left(y \cdot 2\right) \cdot z}{\left(z \cdot 2\right) \cdot z - y \cdot t}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 5 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t) :precision binary64 (- x (/ (* (* y 2.0) z) (- (* (* z 2.0) z) (* y t)))))
double code(double x, double y, double z, double t) {
return x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t)));
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = x - (((y * 2.0d0) * z) / (((z * 2.0d0) * z) - (y * t)))
end function
public static double code(double x, double y, double z, double t) {
return x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t)));
}
def code(x, y, z, t): return x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t)))
function code(x, y, z, t) return Float64(x - Float64(Float64(Float64(y * 2.0) * z) / Float64(Float64(Float64(z * 2.0) * z) - Float64(y * t)))) end
function tmp = code(x, y, z, t) tmp = x - (((y * 2.0) * z) / (((z * 2.0) * z) - (y * t))); end
code[x_, y_, z_, t_] := N[(x - N[(N[(N[(y * 2.0), $MachinePrecision] * z), $MachinePrecision] / N[(N[(N[(z * 2.0), $MachinePrecision] * z), $MachinePrecision] - N[(y * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x - \frac{\left(y \cdot 2\right) \cdot z}{\left(z \cdot 2\right) \cdot z - y \cdot t}
\end{array}
(FPCore (x y z t) :precision binary64 (+ x (/ -2.0 (- (* z (/ 2.0 y)) (/ t z)))))
double code(double x, double y, double z, double t) {
return x + (-2.0 / ((z * (2.0 / y)) - (t / z)));
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = x + ((-2.0d0) / ((z * (2.0d0 / y)) - (t / z)))
end function
public static double code(double x, double y, double z, double t) {
return x + (-2.0 / ((z * (2.0 / y)) - (t / z)));
}
def code(x, y, z, t): return x + (-2.0 / ((z * (2.0 / y)) - (t / z)))
function code(x, y, z, t) return Float64(x + Float64(-2.0 / Float64(Float64(z * Float64(2.0 / y)) - Float64(t / z)))) end
function tmp = code(x, y, z, t) tmp = x + (-2.0 / ((z * (2.0 / y)) - (t / z))); end
code[x_, y_, z_, t_] := N[(x + N[(-2.0 / N[(N[(z * N[(2.0 / y), $MachinePrecision]), $MachinePrecision] - N[(t / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{-2}{z \cdot \frac{2}{y} - \frac{t}{z}}
\end{array}
Initial program 82.1%
sub-neg82.1%
associate-/l*88.5%
*-commutative88.5%
associate-/l*88.8%
distribute-neg-frac88.8%
metadata-eval88.8%
associate-/l/82.5%
div-sub74.7%
times-frac89.5%
*-inverses89.5%
*-rgt-identity89.5%
*-commutative89.5%
associate-*l/89.5%
*-commutative89.5%
times-frac99.8%
*-inverses99.8%
*-lft-identity99.8%
Simplified99.8%
Final simplification99.8%
(FPCore (x y z t) :precision binary64 (if (or (<= z -6e-27) (not (<= z 8.6e+47))) (- x (/ y z)) (+ x (* z (/ 2.0 t)))))
double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e-27) || !(z <= 8.6e+47)) {
tmp = x - (y / z);
} else {
tmp = x + (z * (2.0 / t));
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if ((z <= (-6d-27)) .or. (.not. (z <= 8.6d+47))) then
tmp = x - (y / z)
else
tmp = x + (z * (2.0d0 / t))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e-27) || !(z <= 8.6e+47)) {
tmp = x - (y / z);
} else {
tmp = x + (z * (2.0 / t));
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if (z <= -6e-27) or not (z <= 8.6e+47): tmp = x - (y / z) else: tmp = x + (z * (2.0 / t)) return tmp
function code(x, y, z, t) tmp = 0.0 if ((z <= -6e-27) || !(z <= 8.6e+47)) tmp = Float64(x - Float64(y / z)); else tmp = Float64(x + Float64(z * Float64(2.0 / t))); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if ((z <= -6e-27) || ~((z <= 8.6e+47))) tmp = x - (y / z); else tmp = x + (z * (2.0 / t)); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -6e-27], N[Not[LessEqual[z, 8.6e+47]], $MachinePrecision]], N[(x - N[(y / z), $MachinePrecision]), $MachinePrecision], N[(x + N[(z * N[(2.0 / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -6 \cdot 10^{-27} \lor \neg \left(z \leq 8.6 \cdot 10^{+47}\right):\\
\;\;\;\;x - \frac{y}{z}\\
\mathbf{else}:\\
\;\;\;\;x + z \cdot \frac{2}{t}\\
\end{array}
\end{array}
if z < -6.0000000000000002e-27 or 8.59999999999999989e47 < z Initial program 68.7%
sub-neg68.7%
associate-/l*82.2%
*-commutative82.2%
associate-/l*82.2%
distribute-neg-frac82.2%
metadata-eval82.2%
associate-/l/68.7%
div-sub68.6%
times-frac86.1%
*-inverses86.1%
*-rgt-identity86.1%
*-commutative86.1%
associate-*l/86.1%
*-commutative86.1%
times-frac99.8%
*-inverses99.8%
*-lft-identity99.8%
Simplified99.8%
Taylor expanded in z around inf 87.6%
+-commutative87.6%
mul-1-neg87.6%
sub-neg87.6%
Simplified87.6%
if -6.0000000000000002e-27 < z < 8.59999999999999989e47Initial program 92.9%
sub-neg92.9%
associate-/l*93.5%
distribute-neg-frac93.5%
associate-/r/95.1%
distribute-rgt-neg-in95.1%
metadata-eval95.1%
associate-*l*95.1%
Simplified95.1%
Taylor expanded in y around inf 90.7%
Final simplification89.3%
(FPCore (x y z t) :precision binary64 (if (or (<= z -6e-27) (not (<= z 4.15e+46))) (- x (/ y z)) (- x (/ z (* t -0.5)))))
double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e-27) || !(z <= 4.15e+46)) {
tmp = x - (y / z);
} else {
tmp = x - (z / (t * -0.5));
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if ((z <= (-6d-27)) .or. (.not. (z <= 4.15d+46))) then
tmp = x - (y / z)
else
tmp = x - (z / (t * (-0.5d0)))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e-27) || !(z <= 4.15e+46)) {
tmp = x - (y / z);
} else {
tmp = x - (z / (t * -0.5));
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if (z <= -6e-27) or not (z <= 4.15e+46): tmp = x - (y / z) else: tmp = x - (z / (t * -0.5)) return tmp
function code(x, y, z, t) tmp = 0.0 if ((z <= -6e-27) || !(z <= 4.15e+46)) tmp = Float64(x - Float64(y / z)); else tmp = Float64(x - Float64(z / Float64(t * -0.5))); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if ((z <= -6e-27) || ~((z <= 4.15e+46))) tmp = x - (y / z); else tmp = x - (z / (t * -0.5)); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -6e-27], N[Not[LessEqual[z, 4.15e+46]], $MachinePrecision]], N[(x - N[(y / z), $MachinePrecision]), $MachinePrecision], N[(x - N[(z / N[(t * -0.5), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -6 \cdot 10^{-27} \lor \neg \left(z \leq 4.15 \cdot 10^{+46}\right):\\
\;\;\;\;x - \frac{y}{z}\\
\mathbf{else}:\\
\;\;\;\;x - \frac{z}{t \cdot -0.5}\\
\end{array}
\end{array}
if z < -6.0000000000000002e-27 or 4.14999999999999976e46 < z Initial program 68.7%
sub-neg68.7%
associate-/l*82.2%
*-commutative82.2%
associate-/l*82.2%
distribute-neg-frac82.2%
metadata-eval82.2%
associate-/l/68.7%
div-sub68.6%
times-frac86.1%
*-inverses86.1%
*-rgt-identity86.1%
*-commutative86.1%
associate-*l/86.1%
*-commutative86.1%
times-frac99.8%
*-inverses99.8%
*-lft-identity99.8%
Simplified99.8%
Taylor expanded in z around inf 87.6%
+-commutative87.6%
mul-1-neg87.6%
sub-neg87.6%
Simplified87.6%
if -6.0000000000000002e-27 < z < 4.14999999999999976e46Initial program 92.9%
*-commutative92.9%
associate-/l*95.1%
div-sub95.1%
sub-neg95.1%
*-commutative95.1%
associate-*l*95.1%
*-commutative95.1%
times-frac95.1%
metadata-eval95.1%
*-lft-identity95.1%
associate-*r/97.2%
fma-def97.1%
associate-/r*97.8%
distribute-neg-frac97.8%
*-commutative97.8%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 90.7%
*-commutative90.7%
Simplified90.7%
Final simplification89.3%
(FPCore (x y z t) :precision binary64 (if (or (<= z -6e-27) (not (<= z 9.2e+47))) (- x (/ y z)) x))
double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e-27) || !(z <= 9.2e+47)) {
tmp = x - (y / z);
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if ((z <= (-6d-27)) .or. (.not. (z <= 9.2d+47))) then
tmp = x - (y / z)
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e-27) || !(z <= 9.2e+47)) {
tmp = x - (y / z);
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if (z <= -6e-27) or not (z <= 9.2e+47): tmp = x - (y / z) else: tmp = x return tmp
function code(x, y, z, t) tmp = 0.0 if ((z <= -6e-27) || !(z <= 9.2e+47)) tmp = Float64(x - Float64(y / z)); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if ((z <= -6e-27) || ~((z <= 9.2e+47))) tmp = x - (y / z); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -6e-27], N[Not[LessEqual[z, 9.2e+47]], $MachinePrecision]], N[(x - N[(y / z), $MachinePrecision]), $MachinePrecision], x]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -6 \cdot 10^{-27} \lor \neg \left(z \leq 9.2 \cdot 10^{+47}\right):\\
\;\;\;\;x - \frac{y}{z}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -6.0000000000000002e-27 or 9.1999999999999994e47 < z Initial program 68.7%
sub-neg68.7%
associate-/l*82.2%
*-commutative82.2%
associate-/l*82.2%
distribute-neg-frac82.2%
metadata-eval82.2%
associate-/l/68.7%
div-sub68.6%
times-frac86.1%
*-inverses86.1%
*-rgt-identity86.1%
*-commutative86.1%
associate-*l/86.1%
*-commutative86.1%
times-frac99.8%
*-inverses99.8%
*-lft-identity99.8%
Simplified99.8%
Taylor expanded in z around inf 87.6%
+-commutative87.6%
mul-1-neg87.6%
sub-neg87.6%
Simplified87.6%
if -6.0000000000000002e-27 < z < 9.1999999999999994e47Initial program 92.9%
sub-neg92.9%
associate-/l*93.5%
*-commutative93.5%
associate-/l*94.2%
distribute-neg-frac94.2%
metadata-eval94.2%
associate-/l/93.6%
div-sub79.5%
times-frac92.2%
*-inverses92.2%
*-rgt-identity92.2%
*-commutative92.2%
associate-*l/92.2%
*-commutative92.2%
times-frac99.9%
*-inverses99.9%
*-lft-identity99.9%
Simplified99.9%
Taylor expanded in x around inf 84.5%
Final simplification85.9%
(FPCore (x y z t) :precision binary64 x)
double code(double x, double y, double z, double t) {
return x;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = x
end function
public static double code(double x, double y, double z, double t) {
return x;
}
def code(x, y, z, t): return x
function code(x, y, z, t) return x end
function tmp = code(x, y, z, t) tmp = x; end
code[x_, y_, z_, t_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 82.1%
sub-neg82.1%
associate-/l*88.5%
*-commutative88.5%
associate-/l*88.8%
distribute-neg-frac88.8%
metadata-eval88.8%
associate-/l/82.5%
div-sub74.7%
times-frac89.5%
*-inverses89.5%
*-rgt-identity89.5%
*-commutative89.5%
associate-*l/89.5%
*-commutative89.5%
times-frac99.8%
*-inverses99.8%
*-lft-identity99.8%
Simplified99.8%
Taylor expanded in x around inf 76.4%
Final simplification76.4%
(FPCore (x y z t) :precision binary64 (- x (/ 1.0 (- (/ z y) (/ (/ t 2.0) z)))))
double code(double x, double y, double z, double t) {
return x - (1.0 / ((z / y) - ((t / 2.0) / z)));
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = x - (1.0d0 / ((z / y) - ((t / 2.0d0) / z)))
end function
public static double code(double x, double y, double z, double t) {
return x - (1.0 / ((z / y) - ((t / 2.0) / z)));
}
def code(x, y, z, t): return x - (1.0 / ((z / y) - ((t / 2.0) / z)))
function code(x, y, z, t) return Float64(x - Float64(1.0 / Float64(Float64(z / y) - Float64(Float64(t / 2.0) / z)))) end
function tmp = code(x, y, z, t) tmp = x - (1.0 / ((z / y) - ((t / 2.0) / z))); end
code[x_, y_, z_, t_] := N[(x - N[(1.0 / N[(N[(z / y), $MachinePrecision] - N[(N[(t / 2.0), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x - \frac{1}{\frac{z}{y} - \frac{\frac{t}{2}}{z}}
\end{array}
herbie shell --seed 2023257
(FPCore (x y z t)
:name "Numeric.AD.Rank1.Halley:findZero from ad-4.2.4"
:precision binary64
:herbie-target
(- x (/ 1.0 (- (/ z y) (/ (/ t 2.0) z))))
(- x (/ (* (* y 2.0) z) (- (* (* z 2.0) z) (* y t)))))