
(FPCore (x y z t) :precision binary64 (+ (/ x y) (/ (+ 2.0 (* (* z 2.0) (- 1.0 t))) (* t z))))
double code(double x, double y, double z, double t) {
return (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (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 / y) + ((2.0d0 + ((z * 2.0d0) * (1.0d0 - t))) / (t * z))
end function
public static double code(double x, double y, double z, double t) {
return (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (t * z));
}
def code(x, y, z, t): return (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (t * z))
function code(x, y, z, t) return Float64(Float64(x / y) + Float64(Float64(2.0 + Float64(Float64(z * 2.0) * Float64(1.0 - t))) / Float64(t * z))) end
function tmp = code(x, y, z, t) tmp = (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (t * z)); end
code[x_, y_, z_, t_] := N[(N[(x / y), $MachinePrecision] + N[(N[(2.0 + N[(N[(z * 2.0), $MachinePrecision] * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(t * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{x}{y} + \frac{2 + \left(z \cdot 2\right) \cdot \left(1 - t\right)}{t \cdot z}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t) :precision binary64 (+ (/ x y) (/ (+ 2.0 (* (* z 2.0) (- 1.0 t))) (* t z))))
double code(double x, double y, double z, double t) {
return (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (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 / y) + ((2.0d0 + ((z * 2.0d0) * (1.0d0 - t))) / (t * z))
end function
public static double code(double x, double y, double z, double t) {
return (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (t * z));
}
def code(x, y, z, t): return (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (t * z))
function code(x, y, z, t) return Float64(Float64(x / y) + Float64(Float64(2.0 + Float64(Float64(z * 2.0) * Float64(1.0 - t))) / Float64(t * z))) end
function tmp = code(x, y, z, t) tmp = (x / y) + ((2.0 + ((z * 2.0) * (1.0 - t))) / (t * z)); end
code[x_, y_, z_, t_] := N[(N[(x / y), $MachinePrecision] + N[(N[(2.0 + N[(N[(z * 2.0), $MachinePrecision] * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(t * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{x}{y} + \frac{2 + \left(z \cdot 2\right) \cdot \left(1 - t\right)}{t \cdot z}
\end{array}
(FPCore (x y z t) :precision binary64 (fma (/ 2.0 t) (- (/ (+ 1.0 z) z) t) (/ x y)))
double code(double x, double y, double z, double t) {
return fma((2.0 / t), (((1.0 + z) / z) - t), (x / y));
}
function code(x, y, z, t) return fma(Float64(2.0 / t), Float64(Float64(Float64(1.0 + z) / z) - t), Float64(x / y)) end
code[x_, y_, z_, t_] := N[(N[(2.0 / t), $MachinePrecision] * N[(N[(N[(1.0 + z), $MachinePrecision] / z), $MachinePrecision] - t), $MachinePrecision] + N[(x / y), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(\frac{2}{t}, \frac{1 + z}{z} - t, \frac{x}{y}\right)
\end{array}
Initial program 86.2%
Taylor expanded in x around 0
associate-+r+N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
metadata-evalN/A
associate-*r/N/A
associate-/r*N/A
associate-*r/N/A
metadata-evalN/A
associate-*r*N/A
associate-*l/N/A
distribute-rgt-outN/A
lower-fma.f64N/A
Applied rewrites99.0%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ 2.0 (* t z)))
(t_2 (+ (/ x y) -2.0))
(t_3 (/ (+ 2.0 (* (* z 2.0) (- 1.0 t))) (* t z))))
(if (<= t_3 -5e+181)
t_1
(if (<= t_3 1e+144)
t_2
(if (<= t_3 4e+289) (/ 2.0 t) (if (<= t_3 INFINITY) t_1 t_2))))))
double code(double x, double y, double z, double t) {
double t_1 = 2.0 / (t * z);
double t_2 = (x / y) + -2.0;
double t_3 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z);
double tmp;
if (t_3 <= -5e+181) {
tmp = t_1;
} else if (t_3 <= 1e+144) {
tmp = t_2;
} else if (t_3 <= 4e+289) {
tmp = 2.0 / t;
} else if (t_3 <= ((double) INFINITY)) {
tmp = t_1;
} else {
tmp = t_2;
}
return tmp;
}
public static double code(double x, double y, double z, double t) {
double t_1 = 2.0 / (t * z);
double t_2 = (x / y) + -2.0;
double t_3 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z);
double tmp;
if (t_3 <= -5e+181) {
tmp = t_1;
} else if (t_3 <= 1e+144) {
tmp = t_2;
} else if (t_3 <= 4e+289) {
tmp = 2.0 / t;
} else if (t_3 <= Double.POSITIVE_INFINITY) {
tmp = t_1;
} else {
tmp = t_2;
}
return tmp;
}
def code(x, y, z, t): t_1 = 2.0 / (t * z) t_2 = (x / y) + -2.0 t_3 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z) tmp = 0 if t_3 <= -5e+181: tmp = t_1 elif t_3 <= 1e+144: tmp = t_2 elif t_3 <= 4e+289: tmp = 2.0 / t elif t_3 <= math.inf: tmp = t_1 else: tmp = t_2 return tmp
function code(x, y, z, t) t_1 = Float64(2.0 / Float64(t * z)) t_2 = Float64(Float64(x / y) + -2.0) t_3 = Float64(Float64(2.0 + Float64(Float64(z * 2.0) * Float64(1.0 - t))) / Float64(t * z)) tmp = 0.0 if (t_3 <= -5e+181) tmp = t_1; elseif (t_3 <= 1e+144) tmp = t_2; elseif (t_3 <= 4e+289) tmp = Float64(2.0 / t); elseif (t_3 <= Inf) tmp = t_1; else tmp = t_2; end return tmp end
function tmp_2 = code(x, y, z, t) t_1 = 2.0 / (t * z); t_2 = (x / y) + -2.0; t_3 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z); tmp = 0.0; if (t_3 <= -5e+181) tmp = t_1; elseif (t_3 <= 1e+144) tmp = t_2; elseif (t_3 <= 4e+289) tmp = 2.0 / t; elseif (t_3 <= Inf) tmp = t_1; else tmp = t_2; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(2.0 / N[(t * z), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x / y), $MachinePrecision] + -2.0), $MachinePrecision]}, Block[{t$95$3 = N[(N[(2.0 + N[(N[(z * 2.0), $MachinePrecision] * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(t * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$3, -5e+181], t$95$1, If[LessEqual[t$95$3, 1e+144], t$95$2, If[LessEqual[t$95$3, 4e+289], N[(2.0 / t), $MachinePrecision], If[LessEqual[t$95$3, Infinity], t$95$1, t$95$2]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{2}{t \cdot z}\\
t_2 := \frac{x}{y} + -2\\
t_3 := \frac{2 + \left(z \cdot 2\right) \cdot \left(1 - t\right)}{t \cdot z}\\
\mathbf{if}\;t\_3 \leq -5 \cdot 10^{+181}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_3 \leq 10^{+144}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_3 \leq 4 \cdot 10^{+289}:\\
\;\;\;\;\frac{2}{t}\\
\mathbf{elif}\;t\_3 \leq \infty:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < -5.0000000000000003e181 or 4.0000000000000002e289 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < +inf.0Initial program 96.7%
Taylor expanded in x around 0
associate-+r+N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
metadata-evalN/A
associate-*r/N/A
associate-/r*N/A
associate-*r/N/A
metadata-evalN/A
associate-*r*N/A
associate-*l/N/A
distribute-rgt-outN/A
lower-fma.f64N/A
Applied rewrites96.6%
Taylor expanded in z around 0
lower-/.f64N/A
lower-*.f6475.9
Applied rewrites75.9%
if -5.0000000000000003e181 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < 1.00000000000000002e144 or +inf.0 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) Initial program 79.4%
Taylor expanded in t around inf
Applied rewrites75.7%
if 1.00000000000000002e144 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < 4.0000000000000002e289Initial program 99.7%
Taylor expanded in t around 0
lower-/.f64N/A
metadata-evalN/A
*-inversesN/A
associate-/l*N/A
associate-*r/N/A
metadata-evalN/A
div-addN/A
+-commutativeN/A
fp-cancel-sign-sub-invN/A
metadata-evalN/A
div-subN/A
metadata-evalN/A
associate-*r/N/A
associate-*l/N/A
metadata-evalN/A
associate-*r/N/A
associate-*l*N/A
lft-mult-inverseN/A
metadata-evalN/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6483.8
Applied rewrites83.8%
Taylor expanded in z around 0
Applied rewrites26.1%
Taylor expanded in z around inf
Applied rewrites58.1%
(FPCore (x y z t) :precision binary64 (if (or (<= (/ x y) -1.55e+54) (not (<= (/ x y) 2.4e+28))) (fma (pow t -1.0) 2.0 (/ x y)) (- -2.0 (/ (- (/ -2.0 z) 2.0) t))))
double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -1.55e+54) || !((x / y) <= 2.4e+28)) {
tmp = fma(pow(t, -1.0), 2.0, (x / y));
} else {
tmp = -2.0 - (((-2.0 / z) - 2.0) / t);
}
return tmp;
}
function code(x, y, z, t) tmp = 0.0 if ((Float64(x / y) <= -1.55e+54) || !(Float64(x / y) <= 2.4e+28)) tmp = fma((t ^ -1.0), 2.0, Float64(x / y)); else tmp = Float64(-2.0 - Float64(Float64(Float64(-2.0 / z) - 2.0) / t)); end return tmp end
code[x_, y_, z_, t_] := If[Or[LessEqual[N[(x / y), $MachinePrecision], -1.55e+54], N[Not[LessEqual[N[(x / y), $MachinePrecision], 2.4e+28]], $MachinePrecision]], N[(N[Power[t, -1.0], $MachinePrecision] * 2.0 + N[(x / y), $MachinePrecision]), $MachinePrecision], N[(-2.0 - N[(N[(N[(-2.0 / z), $MachinePrecision] - 2.0), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -1.55 \cdot 10^{+54} \lor \neg \left(\frac{x}{y} \leq 2.4 \cdot 10^{+28}\right):\\
\;\;\;\;\mathsf{fma}\left({t}^{-1}, 2, \frac{x}{y}\right)\\
\mathbf{else}:\\
\;\;\;\;-2 - \frac{\frac{-2}{z} - 2}{t}\\
\end{array}
\end{array}
if (/.f64 x y) < -1.55e54 or 2.39999999999999981e28 < (/.f64 x y) Initial program 86.6%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6482.3
Applied rewrites82.3%
Taylor expanded in t around 0
Applied rewrites82.3%
if -1.55e54 < (/.f64 x y) < 2.39999999999999981e28Initial program 85.9%
Taylor expanded in x around 0
associate-+r+N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
metadata-evalN/A
associate-*r/N/A
associate-/r*N/A
associate-*r/N/A
metadata-evalN/A
associate-*r*N/A
associate-*l/N/A
distribute-rgt-outN/A
lower-fma.f64N/A
Applied rewrites99.7%
Taylor expanded in x around 0
associate-*r/N/A
*-commutativeN/A
associate-/r*N/A
associate-/l*N/A
div-add-revN/A
distribute-lft-outN/A
+-commutativeN/A
associate--l+N/A
+-commutativeN/A
count-2-revN/A
Applied rewrites97.5%
Final simplification90.0%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (+ 2.0 (* (* z 2.0) (- 1.0 t))) (* t z))))
(if (or (<= t_1 -5e+29) (not (or (<= t_1 5e+101) (not (<= t_1 INFINITY)))))
(/ (- (/ 2.0 z) -2.0) t)
(+ (/ x y) -2.0))))
double code(double x, double y, double z, double t) {
double t_1 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z);
double tmp;
if ((t_1 <= -5e+29) || !((t_1 <= 5e+101) || !(t_1 <= ((double) INFINITY)))) {
tmp = ((2.0 / z) - -2.0) / t;
} else {
tmp = (x / y) + -2.0;
}
return tmp;
}
public static double code(double x, double y, double z, double t) {
double t_1 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z);
double tmp;
if ((t_1 <= -5e+29) || !((t_1 <= 5e+101) || !(t_1 <= Double.POSITIVE_INFINITY))) {
tmp = ((2.0 / z) - -2.0) / t;
} else {
tmp = (x / y) + -2.0;
}
return tmp;
}
def code(x, y, z, t): t_1 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z) tmp = 0 if (t_1 <= -5e+29) or not ((t_1 <= 5e+101) or not (t_1 <= math.inf)): tmp = ((2.0 / z) - -2.0) / t else: tmp = (x / y) + -2.0 return tmp
function code(x, y, z, t) t_1 = Float64(Float64(2.0 + Float64(Float64(z * 2.0) * Float64(1.0 - t))) / Float64(t * z)) tmp = 0.0 if ((t_1 <= -5e+29) || !((t_1 <= 5e+101) || !(t_1 <= Inf))) tmp = Float64(Float64(Float64(2.0 / z) - -2.0) / t); else tmp = Float64(Float64(x / y) + -2.0); end return tmp end
function tmp_2 = code(x, y, z, t) t_1 = (2.0 + ((z * 2.0) * (1.0 - t))) / (t * z); tmp = 0.0; if ((t_1 <= -5e+29) || ~(((t_1 <= 5e+101) || ~((t_1 <= Inf))))) tmp = ((2.0 / z) - -2.0) / t; else tmp = (x / y) + -2.0; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(2.0 + N[(N[(z * 2.0), $MachinePrecision] * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(t * z), $MachinePrecision]), $MachinePrecision]}, If[Or[LessEqual[t$95$1, -5e+29], N[Not[Or[LessEqual[t$95$1, 5e+101], N[Not[LessEqual[t$95$1, Infinity]], $MachinePrecision]]], $MachinePrecision]], N[(N[(N[(2.0 / z), $MachinePrecision] - -2.0), $MachinePrecision] / t), $MachinePrecision], N[(N[(x / y), $MachinePrecision] + -2.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{2 + \left(z \cdot 2\right) \cdot \left(1 - t\right)}{t \cdot z}\\
\mathbf{if}\;t\_1 \leq -5 \cdot 10^{+29} \lor \neg \left(t\_1 \leq 5 \cdot 10^{+101} \lor \neg \left(t\_1 \leq \infty\right)\right):\\
\;\;\;\;\frac{\frac{2}{z} - -2}{t}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{y} + -2\\
\end{array}
\end{array}
if (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < -5.0000000000000001e29 or 4.99999999999999989e101 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < +inf.0Initial program 98.4%
Taylor expanded in t around 0
lower-/.f64N/A
metadata-evalN/A
*-inversesN/A
associate-/l*N/A
associate-*r/N/A
metadata-evalN/A
div-addN/A
+-commutativeN/A
fp-cancel-sign-sub-invN/A
metadata-evalN/A
div-subN/A
metadata-evalN/A
associate-*r/N/A
associate-*l/N/A
metadata-evalN/A
associate-*r/N/A
associate-*l*N/A
lft-mult-inverseN/A
metadata-evalN/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6478.3
Applied rewrites78.3%
if -5.0000000000000001e29 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) < 4.99999999999999989e101 or +inf.0 < (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 z #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) t))) (*.f64 t z)) Initial program 72.0%
Taylor expanded in t around inf
Applied rewrites88.1%
Final simplification82.8%
(FPCore (x y z t)
:precision binary64
(if (<= (/ x y) -1e+57)
(+ (/ x y) (/ 2.0 (* t z)))
(if (<= (/ x y) 5e-10)
(/ (fma (- 1.0 t) 2.0 (/ 2.0 z)) t)
(+ (/ x y) (/ (/ (fma z 2.0 2.0) t) z)))))
double code(double x, double y, double z, double t) {
double tmp;
if ((x / y) <= -1e+57) {
tmp = (x / y) + (2.0 / (t * z));
} else if ((x / y) <= 5e-10) {
tmp = fma((1.0 - t), 2.0, (2.0 / z)) / t;
} else {
tmp = (x / y) + ((fma(z, 2.0, 2.0) / t) / z);
}
return tmp;
}
function code(x, y, z, t) tmp = 0.0 if (Float64(x / y) <= -1e+57) tmp = Float64(Float64(x / y) + Float64(2.0 / Float64(t * z))); elseif (Float64(x / y) <= 5e-10) tmp = Float64(fma(Float64(1.0 - t), 2.0, Float64(2.0 / z)) / t); else tmp = Float64(Float64(x / y) + Float64(Float64(fma(z, 2.0, 2.0) / t) / z)); end return tmp end
code[x_, y_, z_, t_] := If[LessEqual[N[(x / y), $MachinePrecision], -1e+57], N[(N[(x / y), $MachinePrecision] + N[(2.0 / N[(t * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[N[(x / y), $MachinePrecision], 5e-10], N[(N[(N[(1.0 - t), $MachinePrecision] * 2.0 + N[(2.0 / z), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision], N[(N[(x / y), $MachinePrecision] + N[(N[(N[(z * 2.0 + 2.0), $MachinePrecision] / t), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -1 \cdot 10^{+57}:\\
\;\;\;\;\frac{x}{y} + \frac{2}{t \cdot z}\\
\mathbf{elif}\;\frac{x}{y} \leq 5 \cdot 10^{-10}:\\
\;\;\;\;\frac{\mathsf{fma}\left(1 - t, 2, \frac{2}{z}\right)}{t}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{y} + \frac{\frac{\mathsf{fma}\left(z, 2, 2\right)}{t}}{z}\\
\end{array}
\end{array}
if (/.f64 x y) < -1.00000000000000005e57Initial program 87.7%
Taylor expanded in z around 0
Applied rewrites95.6%
if -1.00000000000000005e57 < (/.f64 x y) < 5.00000000000000031e-10Initial program 85.5%
Taylor expanded in x around 0
associate-*r/N/A
*-commutativeN/A
associate-/r*N/A
associate-/l*N/A
div-add-revN/A
lower-/.f64N/A
*-commutativeN/A
lower-fma.f64N/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6497.7
Applied rewrites97.7%
if 5.00000000000000031e-10 < (/.f64 x y) Initial program 86.1%
lift-/.f64N/A
lift-*.f64N/A
associate-/r*N/A
lower-/.f64N/A
lower-/.f6478.9
lift-+.f64N/A
+-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6478.9
Applied rewrites78.9%
Taylor expanded in t around 0
Applied rewrites89.6%
(FPCore (x y z t) :precision binary64 (if (or (<= (/ x y) -1e+57) (not (<= (/ x y) 4e+26))) (+ (/ x y) (/ 2.0 (* t z))) (/ (fma (- 1.0 t) 2.0 (/ 2.0 z)) t)))
double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -1e+57) || !((x / y) <= 4e+26)) {
tmp = (x / y) + (2.0 / (t * z));
} else {
tmp = fma((1.0 - t), 2.0, (2.0 / z)) / t;
}
return tmp;
}
function code(x, y, z, t) tmp = 0.0 if ((Float64(x / y) <= -1e+57) || !(Float64(x / y) <= 4e+26)) tmp = Float64(Float64(x / y) + Float64(2.0 / Float64(t * z))); else tmp = Float64(fma(Float64(1.0 - t), 2.0, Float64(2.0 / z)) / t); end return tmp end
code[x_, y_, z_, t_] := If[Or[LessEqual[N[(x / y), $MachinePrecision], -1e+57], N[Not[LessEqual[N[(x / y), $MachinePrecision], 4e+26]], $MachinePrecision]], N[(N[(x / y), $MachinePrecision] + N[(2.0 / N[(t * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 - t), $MachinePrecision] * 2.0 + N[(2.0 / z), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -1 \cdot 10^{+57} \lor \neg \left(\frac{x}{y} \leq 4 \cdot 10^{+26}\right):\\
\;\;\;\;\frac{x}{y} + \frac{2}{t \cdot z}\\
\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(1 - t, 2, \frac{2}{z}\right)}{t}\\
\end{array}
\end{array}
if (/.f64 x y) < -1.00000000000000005e57 or 4.00000000000000019e26 < (/.f64 x y) Initial program 86.4%
Taylor expanded in z around 0
Applied rewrites90.4%
if -1.00000000000000005e57 < (/.f64 x y) < 4.00000000000000019e26Initial program 86.0%
Taylor expanded in x around 0
associate-*r/N/A
*-commutativeN/A
associate-/r*N/A
associate-/l*N/A
div-add-revN/A
lower-/.f64N/A
*-commutativeN/A
lower-fma.f64N/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6497.3
Applied rewrites97.3%
Final simplification93.9%
(FPCore (x y z t) :precision binary64 (if (or (<= (/ x y) -3.4e+55) (not (<= (/ x y) 2.2e+27))) (+ (/ x y) (/ 2.0 (* t z))) (- -2.0 (/ (- (/ -2.0 z) 2.0) t))))
double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -3.4e+55) || !((x / y) <= 2.2e+27)) {
tmp = (x / y) + (2.0 / (t * z));
} else {
tmp = -2.0 - (((-2.0 / 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 (((x / y) <= (-3.4d+55)) .or. (.not. ((x / y) <= 2.2d+27))) then
tmp = (x / y) + (2.0d0 / (t * z))
else
tmp = (-2.0d0) - ((((-2.0d0) / 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 (((x / y) <= -3.4e+55) || !((x / y) <= 2.2e+27)) {
tmp = (x / y) + (2.0 / (t * z));
} else {
tmp = -2.0 - (((-2.0 / z) - 2.0) / t);
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if ((x / y) <= -3.4e+55) or not ((x / y) <= 2.2e+27): tmp = (x / y) + (2.0 / (t * z)) else: tmp = -2.0 - (((-2.0 / z) - 2.0) / t) return tmp
function code(x, y, z, t) tmp = 0.0 if ((Float64(x / y) <= -3.4e+55) || !(Float64(x / y) <= 2.2e+27)) tmp = Float64(Float64(x / y) + Float64(2.0 / Float64(t * z))); else tmp = Float64(-2.0 - Float64(Float64(Float64(-2.0 / z) - 2.0) / t)); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (((x / y) <= -3.4e+55) || ~(((x / y) <= 2.2e+27))) tmp = (x / y) + (2.0 / (t * z)); else tmp = -2.0 - (((-2.0 / z) - 2.0) / t); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[N[(x / y), $MachinePrecision], -3.4e+55], N[Not[LessEqual[N[(x / y), $MachinePrecision], 2.2e+27]], $MachinePrecision]], N[(N[(x / y), $MachinePrecision] + N[(2.0 / N[(t * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(-2.0 - N[(N[(N[(-2.0 / z), $MachinePrecision] - 2.0), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -3.4 \cdot 10^{+55} \lor \neg \left(\frac{x}{y} \leq 2.2 \cdot 10^{+27}\right):\\
\;\;\;\;\frac{x}{y} + \frac{2}{t \cdot z}\\
\mathbf{else}:\\
\;\;\;\;-2 - \frac{\frac{-2}{z} - 2}{t}\\
\end{array}
\end{array}
if (/.f64 x y) < -3.3999999999999998e55 or 2.1999999999999999e27 < (/.f64 x y) Initial program 86.4%
Taylor expanded in z around 0
Applied rewrites90.4%
if -3.3999999999999998e55 < (/.f64 x y) < 2.1999999999999999e27Initial program 86.0%
Taylor expanded in x around 0
associate-+r+N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
metadata-evalN/A
associate-*r/N/A
associate-/r*N/A
associate-*r/N/A
metadata-evalN/A
associate-*r*N/A
associate-*l/N/A
distribute-rgt-outN/A
lower-fma.f64N/A
Applied rewrites99.7%
Taylor expanded in x around 0
associate-*r/N/A
*-commutativeN/A
associate-/r*N/A
associate-/l*N/A
div-add-revN/A
distribute-lft-outN/A
+-commutativeN/A
associate--l+N/A
+-commutativeN/A
count-2-revN/A
Applied rewrites97.3%
Final simplification93.9%
(FPCore (x y z t) :precision binary64 (if (or (<= (/ x y) -1.42e+89) (not (<= (/ x y) 1.05e+30))) (/ x y) (- -2.0 (/ (- (/ -2.0 z) 2.0) t))))
double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -1.42e+89) || !((x / y) <= 1.05e+30)) {
tmp = x / y;
} else {
tmp = -2.0 - (((-2.0 / 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 (((x / y) <= (-1.42d+89)) .or. (.not. ((x / y) <= 1.05d+30))) then
tmp = x / y
else
tmp = (-2.0d0) - ((((-2.0d0) / 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 (((x / y) <= -1.42e+89) || !((x / y) <= 1.05e+30)) {
tmp = x / y;
} else {
tmp = -2.0 - (((-2.0 / z) - 2.0) / t);
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if ((x / y) <= -1.42e+89) or not ((x / y) <= 1.05e+30): tmp = x / y else: tmp = -2.0 - (((-2.0 / z) - 2.0) / t) return tmp
function code(x, y, z, t) tmp = 0.0 if ((Float64(x / y) <= -1.42e+89) || !(Float64(x / y) <= 1.05e+30)) tmp = Float64(x / y); else tmp = Float64(-2.0 - Float64(Float64(Float64(-2.0 / z) - 2.0) / t)); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (((x / y) <= -1.42e+89) || ~(((x / y) <= 1.05e+30))) tmp = x / y; else tmp = -2.0 - (((-2.0 / z) - 2.0) / t); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[N[(x / y), $MachinePrecision], -1.42e+89], N[Not[LessEqual[N[(x / y), $MachinePrecision], 1.05e+30]], $MachinePrecision]], N[(x / y), $MachinePrecision], N[(-2.0 - N[(N[(N[(-2.0 / z), $MachinePrecision] - 2.0), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -1.42 \cdot 10^{+89} \lor \neg \left(\frac{x}{y} \leq 1.05 \cdot 10^{+30}\right):\\
\;\;\;\;\frac{x}{y}\\
\mathbf{else}:\\
\;\;\;\;-2 - \frac{\frac{-2}{z} - 2}{t}\\
\end{array}
\end{array}
if (/.f64 x y) < -1.42e89 or 1.05e30 < (/.f64 x y) Initial program 87.4%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6483.7
Applied rewrites83.7%
Applied rewrites83.3%
Taylor expanded in x around inf
Applied rewrites75.3%
if -1.42e89 < (/.f64 x y) < 1.05e30Initial program 85.1%
Taylor expanded in x around 0
associate-+r+N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
metadata-evalN/A
associate-*r/N/A
associate-/r*N/A
associate-*r/N/A
metadata-evalN/A
associate-*r*N/A
associate-*l/N/A
distribute-rgt-outN/A
lower-fma.f64N/A
Applied rewrites99.7%
Taylor expanded in x around 0
associate-*r/N/A
*-commutativeN/A
associate-/r*N/A
associate-/l*N/A
div-add-revN/A
distribute-lft-outN/A
+-commutativeN/A
associate--l+N/A
+-commutativeN/A
count-2-revN/A
Applied rewrites95.3%
Final simplification85.9%
(FPCore (x y z t) :precision binary64 (if (or (<= z -4.8e-16) (not (<= z 4.2e-5))) (fma (/ (- 1.0 t) t) 2.0 (/ x y)) (/ (fma (- (/ x y) 2.0) t (- (/ 2.0 z) -2.0)) t)))
double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -4.8e-16) || !(z <= 4.2e-5)) {
tmp = fma(((1.0 - t) / t), 2.0, (x / y));
} else {
tmp = fma(((x / y) - 2.0), t, ((2.0 / z) - -2.0)) / t;
}
return tmp;
}
function code(x, y, z, t) tmp = 0.0 if ((z <= -4.8e-16) || !(z <= 4.2e-5)) tmp = fma(Float64(Float64(1.0 - t) / t), 2.0, Float64(x / y)); else tmp = Float64(fma(Float64(Float64(x / y) - 2.0), t, Float64(Float64(2.0 / z) - -2.0)) / t); end return tmp end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -4.8e-16], N[Not[LessEqual[z, 4.2e-5]], $MachinePrecision]], N[(N[(N[(1.0 - t), $MachinePrecision] / t), $MachinePrecision] * 2.0 + N[(x / y), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(x / y), $MachinePrecision] - 2.0), $MachinePrecision] * t + N[(N[(2.0 / z), $MachinePrecision] - -2.0), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -4.8 \cdot 10^{-16} \lor \neg \left(z \leq 4.2 \cdot 10^{-5}\right):\\
\;\;\;\;\mathsf{fma}\left(\frac{1 - t}{t}, 2, \frac{x}{y}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{x}{y} - 2, t, \frac{2}{z} - -2\right)}{t}\\
\end{array}
\end{array}
if z < -4.8000000000000001e-16 or 4.19999999999999977e-5 < z Initial program 74.9%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6499.1
Applied rewrites99.1%
if -4.8000000000000001e-16 < z < 4.19999999999999977e-5Initial program 98.3%
Taylor expanded in t around 0
lower-/.f64N/A
Applied rewrites94.5%
Final simplification96.9%
(FPCore (x y z t) :precision binary64 (if (or (<= (/ x y) -3.4e+55) (not (<= (/ x y) 2.2e+27))) (/ x y) (- (/ 2.0 t) 2.0)))
double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -3.4e+55) || !((x / y) <= 2.2e+27)) {
tmp = x / y;
} else {
tmp = (2.0 / t) - 2.0;
}
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 (((x / y) <= (-3.4d+55)) .or. (.not. ((x / y) <= 2.2d+27))) then
tmp = x / y
else
tmp = (2.0d0 / t) - 2.0d0
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -3.4e+55) || !((x / y) <= 2.2e+27)) {
tmp = x / y;
} else {
tmp = (2.0 / t) - 2.0;
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if ((x / y) <= -3.4e+55) or not ((x / y) <= 2.2e+27): tmp = x / y else: tmp = (2.0 / t) - 2.0 return tmp
function code(x, y, z, t) tmp = 0.0 if ((Float64(x / y) <= -3.4e+55) || !(Float64(x / y) <= 2.2e+27)) tmp = Float64(x / y); else tmp = Float64(Float64(2.0 / t) - 2.0); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (((x / y) <= -3.4e+55) || ~(((x / y) <= 2.2e+27))) tmp = x / y; else tmp = (2.0 / t) - 2.0; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[N[(x / y), $MachinePrecision], -3.4e+55], N[Not[LessEqual[N[(x / y), $MachinePrecision], 2.2e+27]], $MachinePrecision]], N[(x / y), $MachinePrecision], N[(N[(2.0 / t), $MachinePrecision] - 2.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -3.4 \cdot 10^{+55} \lor \neg \left(\frac{x}{y} \leq 2.2 \cdot 10^{+27}\right):\\
\;\;\;\;\frac{x}{y}\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{t} - 2\\
\end{array}
\end{array}
if (/.f64 x y) < -3.3999999999999998e55 or 2.1999999999999999e27 < (/.f64 x y) Initial program 86.4%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6482.2
Applied rewrites82.2%
Applied rewrites82.5%
Taylor expanded in x around inf
Applied rewrites74.1%
if -3.3999999999999998e55 < (/.f64 x y) < 2.1999999999999999e27Initial program 86.0%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6459.9
Applied rewrites59.9%
Taylor expanded in x around 0
Applied rewrites57.9%
Final simplification65.9%
(FPCore (x y z t) :precision binary64 (if (or (<= (/ x y) -3.2e+55) (not (<= (/ x y) 2.2e+27))) (/ x y) (/ 2.0 t)))
double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -3.2e+55) || !((x / y) <= 2.2e+27)) {
tmp = x / y;
} else {
tmp = 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 (((x / y) <= (-3.2d+55)) .or. (.not. ((x / y) <= 2.2d+27))) then
tmp = x / y
else
tmp = 2.0d0 / t
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (((x / y) <= -3.2e+55) || !((x / y) <= 2.2e+27)) {
tmp = x / y;
} else {
tmp = 2.0 / t;
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if ((x / y) <= -3.2e+55) or not ((x / y) <= 2.2e+27): tmp = x / y else: tmp = 2.0 / t return tmp
function code(x, y, z, t) tmp = 0.0 if ((Float64(x / y) <= -3.2e+55) || !(Float64(x / y) <= 2.2e+27)) tmp = Float64(x / y); else tmp = Float64(2.0 / t); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (((x / y) <= -3.2e+55) || ~(((x / y) <= 2.2e+27))) tmp = x / y; else tmp = 2.0 / t; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[N[(x / y), $MachinePrecision], -3.2e+55], N[Not[LessEqual[N[(x / y), $MachinePrecision], 2.2e+27]], $MachinePrecision]], N[(x / y), $MachinePrecision], N[(2.0 / t), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{y} \leq -3.2 \cdot 10^{+55} \lor \neg \left(\frac{x}{y} \leq 2.2 \cdot 10^{+27}\right):\\
\;\;\;\;\frac{x}{y}\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{t}\\
\end{array}
\end{array}
if (/.f64 x y) < -3.2000000000000003e55 or 2.1999999999999999e27 < (/.f64 x y) Initial program 86.4%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6482.2
Applied rewrites82.2%
Applied rewrites82.5%
Taylor expanded in x around inf
Applied rewrites74.1%
if -3.2000000000000003e55 < (/.f64 x y) < 2.1999999999999999e27Initial program 86.0%
Taylor expanded in t around 0
lower-/.f64N/A
metadata-evalN/A
*-inversesN/A
associate-/l*N/A
associate-*r/N/A
metadata-evalN/A
div-addN/A
+-commutativeN/A
fp-cancel-sign-sub-invN/A
metadata-evalN/A
div-subN/A
metadata-evalN/A
associate-*r/N/A
associate-*l/N/A
metadata-evalN/A
associate-*r/N/A
associate-*l*N/A
lft-mult-inverseN/A
metadata-evalN/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6464.7
Applied rewrites64.7%
Taylor expanded in z around 0
Applied rewrites40.7%
Taylor expanded in z around inf
Applied rewrites26.2%
Final simplification49.8%
(FPCore (x y z t) :precision binary64 (/ x y))
double code(double x, double y, double z, double t) {
return x / y;
}
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
end function
public static double code(double x, double y, double z, double t) {
return x / y;
}
def code(x, y, z, t): return x / y
function code(x, y, z, t) return Float64(x / y) end
function tmp = code(x, y, z, t) tmp = x / y; end
code[x_, y_, z_, t_] := N[(x / y), $MachinePrecision]
\begin{array}{l}
\\
\frac{x}{y}
\end{array}
Initial program 86.2%
Taylor expanded in z around inf
*-commutativeN/A
lower-fma.f64N/A
lower-/.f64N/A
lower--.f64N/A
lower-/.f6470.9
Applied rewrites70.9%
Applied rewrites67.8%
Taylor expanded in x around inf
Applied rewrites38.7%
Final simplification38.7%
(FPCore (x y z t) :precision binary64 (- (/ (+ (/ 2.0 z) 2.0) t) (- 2.0 (/ x y))))
double code(double x, double y, double z, double t) {
return (((2.0 / z) + 2.0) / t) - (2.0 - (x / y));
}
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 = (((2.0d0 / z) + 2.0d0) / t) - (2.0d0 - (x / y))
end function
public static double code(double x, double y, double z, double t) {
return (((2.0 / z) + 2.0) / t) - (2.0 - (x / y));
}
def code(x, y, z, t): return (((2.0 / z) + 2.0) / t) - (2.0 - (x / y))
function code(x, y, z, t) return Float64(Float64(Float64(Float64(2.0 / z) + 2.0) / t) - Float64(2.0 - Float64(x / y))) end
function tmp = code(x, y, z, t) tmp = (((2.0 / z) + 2.0) / t) - (2.0 - (x / y)); end
code[x_, y_, z_, t_] := N[(N[(N[(N[(2.0 / z), $MachinePrecision] + 2.0), $MachinePrecision] / t), $MachinePrecision] - N[(2.0 - N[(x / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{2}{z} + 2}{t} - \left(2 - \frac{x}{y}\right)
\end{array}
herbie shell --seed 2024326
(FPCore (x y z t)
:name "Data.HashTable.ST.Basic:computeOverhead from hashtables-1.2.0.2"
:precision binary64
:alt
(! :herbie-platform default (- (/ (+ (/ 2 z) 2) t) (- 2 (/ x y))))
(+ (/ x y) (/ (+ 2.0 (* (* z 2.0) (- 1.0 t))) (* t z))))