
(FPCore (x y z) :precision binary64 (+ x (/ y (- (* 1.1283791670955126 (exp z)) (* x y)))))
double code(double x, double y, double z) {
return x + (y / ((1.1283791670955126 * exp(z)) - (x * y)));
}
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 / ((1.1283791670955126d0 * exp(z)) - (x * y)))
end function
public static double code(double x, double y, double z) {
return x + (y / ((1.1283791670955126 * Math.exp(z)) - (x * y)));
}
def code(x, y, z): return x + (y / ((1.1283791670955126 * math.exp(z)) - (x * y)))
function code(x, y, z) return Float64(x + Float64(y / Float64(Float64(1.1283791670955126 * exp(z)) - Float64(x * y)))) end
function tmp = code(x, y, z) tmp = x + (y / ((1.1283791670955126 * exp(z)) - (x * y))); end
code[x_, y_, z_] := N[(x + N[(y / N[(N[(1.1283791670955126 * N[Exp[z], $MachinePrecision]), $MachinePrecision] - N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{y}{1.1283791670955126 \cdot e^{z} - x \cdot y}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 9 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (+ x (/ y (- (* 1.1283791670955126 (exp z)) (* x y)))))
double code(double x, double y, double z) {
return x + (y / ((1.1283791670955126 * exp(z)) - (x * y)));
}
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 / ((1.1283791670955126d0 * exp(z)) - (x * y)))
end function
public static double code(double x, double y, double z) {
return x + (y / ((1.1283791670955126 * Math.exp(z)) - (x * y)));
}
def code(x, y, z): return x + (y / ((1.1283791670955126 * math.exp(z)) - (x * y)))
function code(x, y, z) return Float64(x + Float64(y / Float64(Float64(1.1283791670955126 * exp(z)) - Float64(x * y)))) end
function tmp = code(x, y, z) tmp = x + (y / ((1.1283791670955126 * exp(z)) - (x * y))); end
code[x_, y_, z_] := N[(x + N[(y / N[(N[(1.1283791670955126 * N[Exp[z], $MachinePrecision]), $MachinePrecision] - N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{y}{1.1283791670955126 \cdot e^{z} - x \cdot y}
\end{array}
(FPCore (x y z)
:precision binary64
(if (<= (exp z) 0.0)
(+ x (/ -1.0 x))
(if (<= (exp z) 1.000000000001)
(+ x (/ y (- (+ 1.1283791670955126 (* 1.1283791670955126 z)) (* x y))))
x)))
double code(double x, double y, double z) {
double tmp;
if (exp(z) <= 0.0) {
tmp = x + (-1.0 / x);
} else if (exp(z) <= 1.000000000001) {
tmp = x + (y / ((1.1283791670955126 + (1.1283791670955126 * z)) - (x * y)));
} else {
tmp = x;
}
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 (exp(z) <= 0.0d0) then
tmp = x + ((-1.0d0) / x)
else if (exp(z) <= 1.000000000001d0) then
tmp = x + (y / ((1.1283791670955126d0 + (1.1283791670955126d0 * z)) - (x * y)))
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (Math.exp(z) <= 0.0) {
tmp = x + (-1.0 / x);
} else if (Math.exp(z) <= 1.000000000001) {
tmp = x + (y / ((1.1283791670955126 + (1.1283791670955126 * z)) - (x * y)));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if math.exp(z) <= 0.0: tmp = x + (-1.0 / x) elif math.exp(z) <= 1.000000000001: tmp = x + (y / ((1.1283791670955126 + (1.1283791670955126 * z)) - (x * y))) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if (exp(z) <= 0.0) tmp = Float64(x + Float64(-1.0 / x)); elseif (exp(z) <= 1.000000000001) tmp = Float64(x + Float64(y / Float64(Float64(1.1283791670955126 + Float64(1.1283791670955126 * z)) - Float64(x * y)))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (exp(z) <= 0.0) tmp = x + (-1.0 / x); elseif (exp(z) <= 1.000000000001) tmp = x + (y / ((1.1283791670955126 + (1.1283791670955126 * z)) - (x * y))); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[N[Exp[z], $MachinePrecision], 0.0], N[(x + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision], If[LessEqual[N[Exp[z], $MachinePrecision], 1.000000000001], N[(x + N[(y / N[(N[(1.1283791670955126 + N[(1.1283791670955126 * z), $MachinePrecision]), $MachinePrecision] - N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{z} \leq 0:\\
\;\;\;\;x + \frac{-1}{x}\\
\mathbf{elif}\;e^{z} \leq 1.000000000001:\\
\;\;\;\;x + \frac{y}{\left(1.1283791670955126 + 1.1283791670955126 \cdot z\right) - x \cdot y}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if (exp.f64 z) < 0.0Initial program 82.1%
*-lft-identity82.1%
associate-/l*82.3%
div-sub82.3%
associate-*r/82.3%
/-rgt-identity82.3%
metadata-eval82.3%
associate-/l*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*82.3%
associate-*r*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in y around inf 100.0%
if 0.0 < (exp.f64 z) < 1.0000000000010001Initial program 99.9%
Taylor expanded in z around 0 99.9%
if 1.0000000000010001 < (exp.f64 z) Initial program 94.1%
*-lft-identity94.1%
associate-/l*94.1%
div-sub94.1%
associate-*r/94.1%
/-rgt-identity94.1%
metadata-eval94.1%
associate-/l*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*94.1%
associate-*r*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 68.2%
Taylor expanded in y around 0 56.4%
*-commutative56.4%
Simplified56.4%
Taylor expanded in x around inf 100.0%
Final simplification100.0%
(FPCore (x y z) :precision binary64 (+ x (/ 1.0 (- (* 1.1283791670955126 (/ (exp z) y)) x))))
double code(double x, double y, double z) {
return x + (1.0 / ((1.1283791670955126 * (exp(z) / y)) - x));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + (1.0d0 / ((1.1283791670955126d0 * (exp(z) / y)) - x))
end function
public static double code(double x, double y, double z) {
return x + (1.0 / ((1.1283791670955126 * (Math.exp(z) / y)) - x));
}
def code(x, y, z): return x + (1.0 / ((1.1283791670955126 * (math.exp(z) / y)) - x))
function code(x, y, z) return Float64(x + Float64(1.0 / Float64(Float64(1.1283791670955126 * Float64(exp(z) / y)) - x))) end
function tmp = code(x, y, z) tmp = x + (1.0 / ((1.1283791670955126 * (exp(z) / y)) - x)); end
code[x_, y_, z_] := N[(x + N[(1.0 / N[(N[(1.1283791670955126 * N[(N[Exp[z], $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision] - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{1}{1.1283791670955126 \cdot \frac{e^{z}}{y} - x}
\end{array}
Initial program 94.3%
*-lft-identity94.3%
associate-/l*94.3%
div-sub94.3%
associate-*r/94.3%
/-rgt-identity94.3%
metadata-eval94.3%
associate-/l*94.3%
*-commutative94.3%
neg-mul-194.3%
associate-/l*94.3%
associate-*r*94.3%
*-commutative94.3%
neg-mul-194.3%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Final simplification99.9%
(FPCore (x y z)
:precision binary64
(if (<= z -340.0)
(+ x (/ -1.0 x))
(if (<= z 1.35e-12)
(+ x (/ 1.0 (- (/ (+ 1.1283791670955126 (* 1.1283791670955126 z)) y) x)))
x)))
double code(double x, double y, double z) {
double tmp;
if (z <= -340.0) {
tmp = x + (-1.0 / x);
} else if (z <= 1.35e-12) {
tmp = x + (1.0 / (((1.1283791670955126 + (1.1283791670955126 * z)) / y) - x));
} else {
tmp = x;
}
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 (z <= (-340.0d0)) then
tmp = x + ((-1.0d0) / x)
else if (z <= 1.35d-12) then
tmp = x + (1.0d0 / (((1.1283791670955126d0 + (1.1283791670955126d0 * z)) / y) - x))
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (z <= -340.0) {
tmp = x + (-1.0 / x);
} else if (z <= 1.35e-12) {
tmp = x + (1.0 / (((1.1283791670955126 + (1.1283791670955126 * z)) / y) - x));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if z <= -340.0: tmp = x + (-1.0 / x) elif z <= 1.35e-12: tmp = x + (1.0 / (((1.1283791670955126 + (1.1283791670955126 * z)) / y) - x)) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if (z <= -340.0) tmp = Float64(x + Float64(-1.0 / x)); elseif (z <= 1.35e-12) tmp = Float64(x + Float64(1.0 / Float64(Float64(Float64(1.1283791670955126 + Float64(1.1283791670955126 * z)) / y) - x))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (z <= -340.0) tmp = x + (-1.0 / x); elseif (z <= 1.35e-12) tmp = x + (1.0 / (((1.1283791670955126 + (1.1283791670955126 * z)) / y) - x)); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[z, -340.0], N[(x + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.35e-12], N[(x + N[(1.0 / N[(N[(N[(1.1283791670955126 + N[(1.1283791670955126 * z), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision] - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -340:\\
\;\;\;\;x + \frac{-1}{x}\\
\mathbf{elif}\;z \leq 1.35 \cdot 10^{-12}:\\
\;\;\;\;x + \frac{1}{\frac{1.1283791670955126 + 1.1283791670955126 \cdot z}{y} - x}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -340Initial program 82.1%
*-lft-identity82.1%
associate-/l*82.3%
div-sub82.3%
associate-*r/82.3%
/-rgt-identity82.3%
metadata-eval82.3%
associate-/l*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*82.3%
associate-*r*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in y around inf 100.0%
if -340 < z < 1.3499999999999999e-12Initial program 99.9%
*-lft-identity99.9%
associate-/l*99.9%
div-sub99.9%
associate-*r/99.9%
/-rgt-identity99.9%
metadata-eval99.9%
associate-/l*99.9%
*-commutative99.9%
neg-mul-199.9%
associate-/l*99.9%
associate-*r*99.9%
*-commutative99.9%
neg-mul-199.9%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in z around 0 99.9%
Taylor expanded in y around 0 99.9%
if 1.3499999999999999e-12 < z Initial program 94.1%
*-lft-identity94.1%
associate-/l*94.1%
div-sub94.1%
associate-*r/94.1%
/-rgt-identity94.1%
metadata-eval94.1%
associate-/l*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*94.1%
associate-*r*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 68.2%
Taylor expanded in y around 0 56.4%
*-commutative56.4%
Simplified56.4%
Taylor expanded in x around inf 100.0%
Final simplification99.9%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (+ x (/ -1.0 x))) (t_1 (+ x (* y 0.8862269254527579))))
(if (<= z -56.0)
t_0
(if (<= z -4.3e-201)
t_1
(if (<= z 8.2e-212) t_0 (if (<= z 1.22e-152) t_1 x))))))
double code(double x, double y, double z) {
double t_0 = x + (-1.0 / x);
double t_1 = x + (y * 0.8862269254527579);
double tmp;
if (z <= -56.0) {
tmp = t_0;
} else if (z <= -4.3e-201) {
tmp = t_1;
} else if (z <= 8.2e-212) {
tmp = t_0;
} else if (z <= 1.22e-152) {
tmp = t_1;
} else {
tmp = x;
}
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) :: t_1
real(8) :: tmp
t_0 = x + ((-1.0d0) / x)
t_1 = x + (y * 0.8862269254527579d0)
if (z <= (-56.0d0)) then
tmp = t_0
else if (z <= (-4.3d-201)) then
tmp = t_1
else if (z <= 8.2d-212) then
tmp = t_0
else if (z <= 1.22d-152) then
tmp = t_1
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = x + (-1.0 / x);
double t_1 = x + (y * 0.8862269254527579);
double tmp;
if (z <= -56.0) {
tmp = t_0;
} else if (z <= -4.3e-201) {
tmp = t_1;
} else if (z <= 8.2e-212) {
tmp = t_0;
} else if (z <= 1.22e-152) {
tmp = t_1;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): t_0 = x + (-1.0 / x) t_1 = x + (y * 0.8862269254527579) tmp = 0 if z <= -56.0: tmp = t_0 elif z <= -4.3e-201: tmp = t_1 elif z <= 8.2e-212: tmp = t_0 elif z <= 1.22e-152: tmp = t_1 else: tmp = x return tmp
function code(x, y, z) t_0 = Float64(x + Float64(-1.0 / x)) t_1 = Float64(x + Float64(y * 0.8862269254527579)) tmp = 0.0 if (z <= -56.0) tmp = t_0; elseif (z <= -4.3e-201) tmp = t_1; elseif (z <= 8.2e-212) tmp = t_0; elseif (z <= 1.22e-152) tmp = t_1; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) t_0 = x + (-1.0 / x); t_1 = x + (y * 0.8862269254527579); tmp = 0.0; if (z <= -56.0) tmp = t_0; elseif (z <= -4.3e-201) tmp = t_1; elseif (z <= 8.2e-212) tmp = t_0; elseif (z <= 1.22e-152) tmp = t_1; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(x + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(x + N[(y * 0.8862269254527579), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -56.0], t$95$0, If[LessEqual[z, -4.3e-201], t$95$1, If[LessEqual[z, 8.2e-212], t$95$0, If[LessEqual[z, 1.22e-152], t$95$1, x]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x + \frac{-1}{x}\\
t_1 := x + y \cdot 0.8862269254527579\\
\mathbf{if}\;z \leq -56:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -4.3 \cdot 10^{-201}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 8.2 \cdot 10^{-212}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq 1.22 \cdot 10^{-152}:\\
\;\;\;\;t_1\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -56 or -4.2999999999999997e-201 < z < 8.20000000000000028e-212Initial program 89.7%
*-lft-identity89.7%
associate-/l*89.8%
div-sub89.8%
associate-*r/89.8%
/-rgt-identity89.8%
metadata-eval89.8%
associate-/l*89.8%
*-commutative89.8%
neg-mul-189.8%
associate-/l*89.8%
associate-*r*89.8%
*-commutative89.8%
neg-mul-189.8%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in y around inf 89.5%
if -56 < z < -4.2999999999999997e-201 or 8.20000000000000028e-212 < z < 1.22000000000000009e-152Initial program 99.9%
*-lft-identity99.9%
associate-/l*99.8%
div-sub99.8%
associate-*r/99.8%
/-rgt-identity99.8%
metadata-eval99.8%
associate-/l*99.8%
*-commutative99.8%
neg-mul-199.8%
associate-/l*99.8%
associate-*r*99.8%
*-commutative99.8%
neg-mul-199.8%
associate-/l*99.8%
*-inverses99.8%
/-rgt-identity99.8%
Simplified99.8%
Taylor expanded in z around 0 99.8%
Taylor expanded in y around 0 87.8%
*-commutative87.8%
Simplified87.8%
if 1.22000000000000009e-152 < z Initial program 95.7%
*-lft-identity95.7%
associate-/l*95.7%
div-sub95.7%
associate-*r/95.7%
/-rgt-identity95.7%
metadata-eval95.7%
associate-/l*95.7%
*-commutative95.7%
neg-mul-195.7%
associate-/l*95.7%
associate-*r*95.7%
*-commutative95.7%
neg-mul-195.7%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 76.6%
Taylor expanded in y around 0 57.9%
*-commutative57.9%
Simplified57.9%
Taylor expanded in x around inf 93.4%
Final simplification90.5%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (+ x (/ -1.0 x))) (t_1 (+ x (/ y 1.1283791670955126))))
(if (<= z -59.0)
t_0
(if (<= z -3.4e-201)
t_1
(if (<= z 1.75e-203) t_0 (if (<= z 1.72e-155) t_1 x))))))
double code(double x, double y, double z) {
double t_0 = x + (-1.0 / x);
double t_1 = x + (y / 1.1283791670955126);
double tmp;
if (z <= -59.0) {
tmp = t_0;
} else if (z <= -3.4e-201) {
tmp = t_1;
} else if (z <= 1.75e-203) {
tmp = t_0;
} else if (z <= 1.72e-155) {
tmp = t_1;
} else {
tmp = x;
}
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) :: t_1
real(8) :: tmp
t_0 = x + ((-1.0d0) / x)
t_1 = x + (y / 1.1283791670955126d0)
if (z <= (-59.0d0)) then
tmp = t_0
else if (z <= (-3.4d-201)) then
tmp = t_1
else if (z <= 1.75d-203) then
tmp = t_0
else if (z <= 1.72d-155) then
tmp = t_1
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = x + (-1.0 / x);
double t_1 = x + (y / 1.1283791670955126);
double tmp;
if (z <= -59.0) {
tmp = t_0;
} else if (z <= -3.4e-201) {
tmp = t_1;
} else if (z <= 1.75e-203) {
tmp = t_0;
} else if (z <= 1.72e-155) {
tmp = t_1;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): t_0 = x + (-1.0 / x) t_1 = x + (y / 1.1283791670955126) tmp = 0 if z <= -59.0: tmp = t_0 elif z <= -3.4e-201: tmp = t_1 elif z <= 1.75e-203: tmp = t_0 elif z <= 1.72e-155: tmp = t_1 else: tmp = x return tmp
function code(x, y, z) t_0 = Float64(x + Float64(-1.0 / x)) t_1 = Float64(x + Float64(y / 1.1283791670955126)) tmp = 0.0 if (z <= -59.0) tmp = t_0; elseif (z <= -3.4e-201) tmp = t_1; elseif (z <= 1.75e-203) tmp = t_0; elseif (z <= 1.72e-155) tmp = t_1; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) t_0 = x + (-1.0 / x); t_1 = x + (y / 1.1283791670955126); tmp = 0.0; if (z <= -59.0) tmp = t_0; elseif (z <= -3.4e-201) tmp = t_1; elseif (z <= 1.75e-203) tmp = t_0; elseif (z <= 1.72e-155) tmp = t_1; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(x + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(x + N[(y / 1.1283791670955126), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -59.0], t$95$0, If[LessEqual[z, -3.4e-201], t$95$1, If[LessEqual[z, 1.75e-203], t$95$0, If[LessEqual[z, 1.72e-155], t$95$1, x]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x + \frac{-1}{x}\\
t_1 := x + \frac{y}{1.1283791670955126}\\
\mathbf{if}\;z \leq -59:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -3.4 \cdot 10^{-201}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 1.75 \cdot 10^{-203}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq 1.72 \cdot 10^{-155}:\\
\;\;\;\;t_1\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -59 or -3.39999999999999985e-201 < z < 1.7500000000000001e-203Initial program 89.7%
*-lft-identity89.7%
associate-/l*89.8%
div-sub89.8%
associate-*r/89.8%
/-rgt-identity89.8%
metadata-eval89.8%
associate-/l*89.8%
*-commutative89.8%
neg-mul-189.8%
associate-/l*89.8%
associate-*r*89.8%
*-commutative89.8%
neg-mul-189.8%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in y around inf 89.5%
if -59 < z < -3.39999999999999985e-201 or 1.7500000000000001e-203 < z < 1.71999999999999991e-155Initial program 99.9%
*-lft-identity99.9%
associate-/l*99.8%
div-sub99.8%
associate-*r/99.8%
/-rgt-identity99.8%
metadata-eval99.8%
associate-/l*99.8%
*-commutative99.8%
neg-mul-199.8%
associate-/l*99.8%
associate-*r*99.8%
*-commutative99.8%
neg-mul-199.8%
associate-/l*99.8%
*-inverses99.8%
/-rgt-identity99.8%
Simplified99.8%
Taylor expanded in z around 0 99.8%
Taylor expanded in y around 0 87.8%
*-commutative87.8%
Simplified87.8%
metadata-eval87.8%
div-inv87.9%
Applied egg-rr87.9%
if 1.71999999999999991e-155 < z Initial program 95.7%
*-lft-identity95.7%
associate-/l*95.7%
div-sub95.7%
associate-*r/95.7%
/-rgt-identity95.7%
metadata-eval95.7%
associate-/l*95.7%
*-commutative95.7%
neg-mul-195.7%
associate-/l*95.7%
associate-*r*95.7%
*-commutative95.7%
neg-mul-195.7%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 76.6%
Taylor expanded in y around 0 57.9%
*-commutative57.9%
Simplified57.9%
Taylor expanded in x around inf 93.4%
Final simplification90.6%
(FPCore (x y z) :precision binary64 (if (<= z -140.0) (+ x (/ -1.0 x)) (if (<= z 1.35e-12) (+ x (/ 1.0 (- (/ 1.1283791670955126 y) x))) x)))
double code(double x, double y, double z) {
double tmp;
if (z <= -140.0) {
tmp = x + (-1.0 / x);
} else if (z <= 1.35e-12) {
tmp = x + (1.0 / ((1.1283791670955126 / y) - x));
} else {
tmp = x;
}
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 (z <= (-140.0d0)) then
tmp = x + ((-1.0d0) / x)
else if (z <= 1.35d-12) then
tmp = x + (1.0d0 / ((1.1283791670955126d0 / y) - x))
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (z <= -140.0) {
tmp = x + (-1.0 / x);
} else if (z <= 1.35e-12) {
tmp = x + (1.0 / ((1.1283791670955126 / y) - x));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if z <= -140.0: tmp = x + (-1.0 / x) elif z <= 1.35e-12: tmp = x + (1.0 / ((1.1283791670955126 / y) - x)) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if (z <= -140.0) tmp = Float64(x + Float64(-1.0 / x)); elseif (z <= 1.35e-12) tmp = Float64(x + Float64(1.0 / Float64(Float64(1.1283791670955126 / y) - x))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (z <= -140.0) tmp = x + (-1.0 / x); elseif (z <= 1.35e-12) tmp = x + (1.0 / ((1.1283791670955126 / y) - x)); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[z, -140.0], N[(x + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.35e-12], N[(x + N[(1.0 / N[(N[(1.1283791670955126 / y), $MachinePrecision] - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -140:\\
\;\;\;\;x + \frac{-1}{x}\\
\mathbf{elif}\;z \leq 1.35 \cdot 10^{-12}:\\
\;\;\;\;x + \frac{1}{\frac{1.1283791670955126}{y} - x}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -140Initial program 82.1%
*-lft-identity82.1%
associate-/l*82.3%
div-sub82.3%
associate-*r/82.3%
/-rgt-identity82.3%
metadata-eval82.3%
associate-/l*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*82.3%
associate-*r*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in y around inf 100.0%
if -140 < z < 1.3499999999999999e-12Initial program 99.9%
*-lft-identity99.9%
associate-/l*99.9%
div-sub99.9%
associate-*r/99.9%
/-rgt-identity99.9%
metadata-eval99.9%
associate-/l*99.9%
*-commutative99.9%
neg-mul-199.9%
associate-/l*99.9%
associate-*r*99.9%
*-commutative99.9%
neg-mul-199.9%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in z around 0 99.8%
if 1.3499999999999999e-12 < z Initial program 94.1%
*-lft-identity94.1%
associate-/l*94.1%
div-sub94.1%
associate-*r/94.1%
/-rgt-identity94.1%
metadata-eval94.1%
associate-/l*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*94.1%
associate-*r*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 68.2%
Taylor expanded in y around 0 56.4%
*-commutative56.4%
Simplified56.4%
Taylor expanded in x around inf 100.0%
Final simplification99.9%
(FPCore (x y z) :precision binary64 (if (<= z -195.0) (+ x (/ -1.0 x)) (if (<= z 1.35e-12) (+ x (/ y (- 1.1283791670955126 (* x y)))) x)))
double code(double x, double y, double z) {
double tmp;
if (z <= -195.0) {
tmp = x + (-1.0 / x);
} else if (z <= 1.35e-12) {
tmp = x + (y / (1.1283791670955126 - (x * y)));
} else {
tmp = x;
}
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 (z <= (-195.0d0)) then
tmp = x + ((-1.0d0) / x)
else if (z <= 1.35d-12) then
tmp = x + (y / (1.1283791670955126d0 - (x * y)))
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (z <= -195.0) {
tmp = x + (-1.0 / x);
} else if (z <= 1.35e-12) {
tmp = x + (y / (1.1283791670955126 - (x * y)));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if z <= -195.0: tmp = x + (-1.0 / x) elif z <= 1.35e-12: tmp = x + (y / (1.1283791670955126 - (x * y))) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if (z <= -195.0) tmp = Float64(x + Float64(-1.0 / x)); elseif (z <= 1.35e-12) tmp = Float64(x + Float64(y / Float64(1.1283791670955126 - Float64(x * y)))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (z <= -195.0) tmp = x + (-1.0 / x); elseif (z <= 1.35e-12) tmp = x + (y / (1.1283791670955126 - (x * y))); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[z, -195.0], N[(x + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.35e-12], N[(x + N[(y / N[(1.1283791670955126 - N[(x * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -195:\\
\;\;\;\;x + \frac{-1}{x}\\
\mathbf{elif}\;z \leq 1.35 \cdot 10^{-12}:\\
\;\;\;\;x + \frac{y}{1.1283791670955126 - x \cdot y}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -195Initial program 82.1%
*-lft-identity82.1%
associate-/l*82.3%
div-sub82.3%
associate-*r/82.3%
/-rgt-identity82.3%
metadata-eval82.3%
associate-/l*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*82.3%
associate-*r*82.3%
*-commutative82.3%
neg-mul-182.3%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in y around inf 100.0%
if -195 < z < 1.3499999999999999e-12Initial program 99.9%
Taylor expanded in z around 0 99.8%
*-commutative99.8%
Simplified99.8%
if 1.3499999999999999e-12 < z Initial program 94.1%
*-lft-identity94.1%
associate-/l*94.1%
div-sub94.1%
associate-*r/94.1%
/-rgt-identity94.1%
metadata-eval94.1%
associate-/l*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*94.1%
associate-*r*94.1%
*-commutative94.1%
neg-mul-194.1%
associate-/l*100.0%
*-inverses100.0%
/-rgt-identity100.0%
Simplified100.0%
Taylor expanded in z around 0 68.2%
Taylor expanded in y around 0 56.4%
*-commutative56.4%
Simplified56.4%
Taylor expanded in x around inf 100.0%
Final simplification99.9%
(FPCore (x y z) :precision binary64 (if (<= y -1.6e+37) x (if (<= y 4.7e+42) (+ x (* y 0.8862269254527579)) x)))
double code(double x, double y, double z) {
double tmp;
if (y <= -1.6e+37) {
tmp = x;
} else if (y <= 4.7e+42) {
tmp = x + (y * 0.8862269254527579);
} else {
tmp = x;
}
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.6d+37)) then
tmp = x
else if (y <= 4.7d+42) then
tmp = x + (y * 0.8862269254527579d0)
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= -1.6e+37) {
tmp = x;
} else if (y <= 4.7e+42) {
tmp = x + (y * 0.8862269254527579);
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= -1.6e+37: tmp = x elif y <= 4.7e+42: tmp = x + (y * 0.8862269254527579) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if (y <= -1.6e+37) tmp = x; elseif (y <= 4.7e+42) tmp = Float64(x + Float64(y * 0.8862269254527579)); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= -1.6e+37) tmp = x; elseif (y <= 4.7e+42) tmp = x + (y * 0.8862269254527579); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, -1.6e+37], x, If[LessEqual[y, 4.7e+42], N[(x + N[(y * 0.8862269254527579), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -1.6 \cdot 10^{+37}:\\
\;\;\;\;x\\
\mathbf{elif}\;y \leq 4.7 \cdot 10^{+42}:\\
\;\;\;\;x + y \cdot 0.8862269254527579\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if y < -1.60000000000000007e37 or 4.69999999999999986e42 < y Initial program 96.0%
*-lft-identity96.0%
associate-/l*96.0%
div-sub96.0%
associate-*r/96.0%
/-rgt-identity96.0%
metadata-eval96.0%
associate-/l*96.0%
*-commutative96.0%
neg-mul-196.0%
associate-/l*96.0%
associate-*r*96.0%
*-commutative96.0%
neg-mul-196.0%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in z around 0 82.6%
Taylor expanded in y around 0 34.2%
*-commutative34.2%
Simplified34.2%
Taylor expanded in x around inf 72.5%
if -1.60000000000000007e37 < y < 4.69999999999999986e42Initial program 93.1%
*-lft-identity93.1%
associate-/l*93.1%
div-sub93.1%
associate-*r/93.1%
/-rgt-identity93.1%
metadata-eval93.1%
associate-/l*93.1%
*-commutative93.1%
neg-mul-193.1%
associate-/l*93.1%
associate-*r*93.1%
*-commutative93.1%
neg-mul-193.1%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in z around 0 82.7%
Taylor expanded in y around 0 82.5%
*-commutative82.5%
Simplified82.5%
Final simplification78.5%
(FPCore (x y z) :precision binary64 x)
double code(double x, double y, double z) {
return x;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x
end function
public static double code(double x, double y, double z) {
return x;
}
def code(x, y, z): return x
function code(x, y, z) return x end
function tmp = code(x, y, z) tmp = x; end
code[x_, y_, z_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 94.3%
*-lft-identity94.3%
associate-/l*94.3%
div-sub94.3%
associate-*r/94.3%
/-rgt-identity94.3%
metadata-eval94.3%
associate-/l*94.3%
*-commutative94.3%
neg-mul-194.3%
associate-/l*94.3%
associate-*r*94.3%
*-commutative94.3%
neg-mul-194.3%
associate-/l*99.9%
*-inverses99.9%
/-rgt-identity99.9%
Simplified99.9%
Taylor expanded in z around 0 82.6%
Taylor expanded in y around 0 63.2%
*-commutative63.2%
Simplified63.2%
Taylor expanded in x around inf 73.0%
Final simplification73.0%
(FPCore (x y z) :precision binary64 (+ x (/ 1.0 (- (* (/ 1.1283791670955126 y) (exp z)) x))))
double code(double x, double y, double z) {
return x + (1.0 / (((1.1283791670955126 / y) * exp(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 = x + (1.0d0 / (((1.1283791670955126d0 / y) * exp(z)) - x))
end function
public static double code(double x, double y, double z) {
return x + (1.0 / (((1.1283791670955126 / y) * Math.exp(z)) - x));
}
def code(x, y, z): return x + (1.0 / (((1.1283791670955126 / y) * math.exp(z)) - x))
function code(x, y, z) return Float64(x + Float64(1.0 / Float64(Float64(Float64(1.1283791670955126 / y) * exp(z)) - x))) end
function tmp = code(x, y, z) tmp = x + (1.0 / (((1.1283791670955126 / y) * exp(z)) - x)); end
code[x_, y_, z_] := N[(x + N[(1.0 / N[(N[(N[(1.1283791670955126 / y), $MachinePrecision] * N[Exp[z], $MachinePrecision]), $MachinePrecision] - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{1}{\frac{1.1283791670955126}{y} \cdot e^{z} - x}
\end{array}
herbie shell --seed 2023334
(FPCore (x y z)
:name "Numeric.SpecFunctions:invErfc from math-functions-0.1.5.2, A"
:precision binary64
:herbie-target
(+ x (/ 1.0 (- (* (/ 1.1283791670955126 y) (exp z)) x)))
(+ x (/ y (- (* 1.1283791670955126 (exp z)) (* x y)))))