
(FPCore (x y z t) :precision binary64 (* (/ (- x y) (- z y)) t))
double code(double x, double y, double z, double t) {
return ((x - y) / (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) / (z - y)) * t
end function
public static double code(double x, double y, double z, double t) {
return ((x - y) / (z - y)) * t;
}
def code(x, y, z, t): return ((x - y) / (z - y)) * t
function code(x, y, z, t) return Float64(Float64(Float64(x - y) / Float64(z - y)) * t) end
function tmp = code(x, y, z, t) tmp = ((x - y) / (z - y)) * t; end
code[x_, y_, z_, t_] := N[(N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision] * t), $MachinePrecision]
\begin{array}{l}
\\
\frac{x - y}{z - y} \cdot t
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 15 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t) :precision binary64 (* (/ (- x y) (- z y)) t))
double code(double x, double y, double z, double t) {
return ((x - y) / (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) / (z - y)) * t
end function
public static double code(double x, double y, double z, double t) {
return ((x - y) / (z - y)) * t;
}
def code(x, y, z, t): return ((x - y) / (z - y)) * t
function code(x, y, z, t) return Float64(Float64(Float64(x - y) / Float64(z - y)) * t) end
function tmp = code(x, y, z, t) tmp = ((x - y) / (z - y)) * t; end
code[x_, y_, z_, t_] := N[(N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision] * t), $MachinePrecision]
\begin{array}{l}
\\
\frac{x - y}{z - y} \cdot t
\end{array}
(FPCore (x y z t) :precision binary64 (fma (/ x (- z y)) t (* t (/ y (- y z)))))
double code(double x, double y, double z, double t) {
return fma((x / (z - y)), t, (t * (y / (y - z))));
}
function code(x, y, z, t) return fma(Float64(x / Float64(z - y)), t, Float64(t * Float64(y / Float64(y - z)))) end
code[x_, y_, z_, t_] := N[(N[(x / N[(z - y), $MachinePrecision]), $MachinePrecision] * t + N[(t * N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(\frac{x}{z - y}, t, t \cdot \frac{y}{y - z}\right)
\end{array}
Initial program 97.7%
lift--.f64N/A
lift--.f64N/A
div-invN/A
lift--.f64N/A
flip3--N/A
clear-numN/A
associate-*r*N/A
*-commutativeN/A
associate-*l*N/A
*-commutativeN/A
clear-numN/A
flip3--N/A
lift--.f64N/A
associate-*r*N/A
div-invN/A
Applied egg-rr97.7%
Final simplification97.7%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* x (/ t (- z y)))))
(if (<= t_1 -1e-61)
t_2
(if (<= t_1 -2e-138)
(- (* t (/ y z)))
(if (<= t_1 0.95)
(* t (/ x z))
(if (<= t_1 2.5) (fma t (/ z y) t) t_2))))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = x * (t / (z - y));
double tmp;
if (t_1 <= -1e-61) {
tmp = t_2;
} else if (t_1 <= -2e-138) {
tmp = -(t * (y / z));
} else if (t_1 <= 0.95) {
tmp = t * (x / z);
} else if (t_1 <= 2.5) {
tmp = fma(t, (z / y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(x * Float64(t / Float64(z - y))) tmp = 0.0 if (t_1 <= -1e-61) tmp = t_2; elseif (t_1 <= -2e-138) tmp = Float64(-Float64(t * Float64(y / z))); elseif (t_1 <= 0.95) tmp = Float64(t * Float64(x / z)); elseif (t_1 <= 2.5) tmp = fma(t, Float64(z / y), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(x * N[(t / N[(z - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -1e-61], t$95$2, If[LessEqual[t$95$1, -2e-138], (-N[(t * N[(y / z), $MachinePrecision]), $MachinePrecision]), If[LessEqual[t$95$1, 0.95], N[(t * N[(x / z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2.5], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := x \cdot \frac{t}{z - y}\\
\mathbf{if}\;t\_1 \leq -1 \cdot 10^{-61}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq -2 \cdot 10^{-138}:\\
\;\;\;\;-t \cdot \frac{y}{z}\\
\mathbf{elif}\;t\_1 \leq 0.95:\\
\;\;\;\;t \cdot \frac{x}{z}\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < -1e-61 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 98.8%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6493.7
Simplified93.7%
lift--.f64N/A
associate-*l/N/A
associate-/l*N/A
lower-*.f64N/A
lower-/.f6486.7
Applied egg-rr86.7%
if -1e-61 < (/.f64 (-.f64 x y) (-.f64 z y)) < -2.00000000000000013e-138Initial program 99.8%
Taylor expanded in z around inf
lower-/.f64N/A
lower--.f6499.8
Simplified99.8%
Taylor expanded in x around 0
mul-1-negN/A
lower-neg.f6477.0
Simplified77.0%
if -2.00000000000000013e-138 < (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996Initial program 92.7%
Taylor expanded in y around 0
lower-/.f6468.9
Simplified68.9%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6481.4
Simplified81.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6498.2
Simplified98.2%
Final simplification85.4%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* (/ x (- z y)) t)))
(if (<= t_1 -5000000000.0)
t_2
(if (<= t_1 0.95)
(* t (/ (- x y) z))
(if (<= t_1 2.5) (fma t (/ (- z x) y) t) t_2)))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = (x / (z - y)) * t;
double tmp;
if (t_1 <= -5000000000.0) {
tmp = t_2;
} else if (t_1 <= 0.95) {
tmp = t * ((x - y) / z);
} else if (t_1 <= 2.5) {
tmp = fma(t, ((z - x) / y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(Float64(x / Float64(z - y)) * t) tmp = 0.0 if (t_1 <= -5000000000.0) tmp = t_2; elseif (t_1 <= 0.95) tmp = Float64(t * Float64(Float64(x - y) / z)); elseif (t_1 <= 2.5) tmp = fma(t, Float64(Float64(z - x) / y), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x / N[(z - y), $MachinePrecision]), $MachinePrecision] * t), $MachinePrecision]}, If[LessEqual[t$95$1, -5000000000.0], t$95$2, If[LessEqual[t$95$1, 0.95], N[(t * N[(N[(x - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2.5], N[(t * N[(N[(z - x), $MachinePrecision] / y), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := \frac{x}{z - y} \cdot t\\
\mathbf{if}\;t\_1 \leq -5000000000:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 0.95:\\
\;\;\;\;t \cdot \frac{x - y}{z}\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z - x}{y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < -5e9 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 98.6%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6496.3
Simplified96.3%
if -5e9 < (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996Initial program 94.7%
Taylor expanded in z around inf
lower-/.f64N/A
lower--.f6493.7
Simplified93.7%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in y around inf
associate--l+N/A
distribute-lft-out--N/A
div-subN/A
+-commutativeN/A
mul-1-negN/A
distribute-lft-out--N/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-fma.f64N/A
Simplified100.0%
Final simplification96.6%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* (/ x (- z y)) t)))
(if (<= t_1 -5000000000.0)
t_2
(if (<= t_1 0.95)
(* t (/ (- x y) z))
(if (<= t_1 2.5) (fma t (/ x (- y)) t) t_2)))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = (x / (z - y)) * t;
double tmp;
if (t_1 <= -5000000000.0) {
tmp = t_2;
} else if (t_1 <= 0.95) {
tmp = t * ((x - y) / z);
} else if (t_1 <= 2.5) {
tmp = fma(t, (x / -y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(Float64(x / Float64(z - y)) * t) tmp = 0.0 if (t_1 <= -5000000000.0) tmp = t_2; elseif (t_1 <= 0.95) tmp = Float64(t * Float64(Float64(x - y) / z)); elseif (t_1 <= 2.5) tmp = fma(t, Float64(x / Float64(-y)), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x / N[(z - y), $MachinePrecision]), $MachinePrecision] * t), $MachinePrecision]}, If[LessEqual[t$95$1, -5000000000.0], t$95$2, If[LessEqual[t$95$1, 0.95], N[(t * N[(N[(x - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2.5], N[(t * N[(x / (-y)), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := \frac{x}{z - y} \cdot t\\
\mathbf{if}\;t\_1 \leq -5000000000:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 0.95:\\
\;\;\;\;t \cdot \frac{x - y}{z}\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{x}{-y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < -5e9 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 98.6%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6496.3
Simplified96.3%
if -5e9 < (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996Initial program 94.7%
Taylor expanded in z around inf
lower-/.f64N/A
lower--.f6493.7
Simplified93.7%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in z around 0
associate-/l*N/A
associate-*r*N/A
div-subN/A
sub-negN/A
*-inversesN/A
metadata-evalN/A
distribute-lft-inN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-inN/A
mul-1-negN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
*-commutativeN/A
neg-mul-1N/A
remove-double-negN/A
lower-fma.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
lower-neg.f6499.0
Simplified99.0%
Final simplification96.3%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* (/ x (- z y)) t)))
(if (<= t_1 -5000000000.0)
t_2
(if (<= t_1 0.95)
(* t (/ (- x y) z))
(if (<= t_1 2.0) (fma t (/ z y) t) t_2)))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = (x / (z - y)) * t;
double tmp;
if (t_1 <= -5000000000.0) {
tmp = t_2;
} else if (t_1 <= 0.95) {
tmp = t * ((x - y) / z);
} else if (t_1 <= 2.0) {
tmp = fma(t, (z / y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(Float64(x / Float64(z - y)) * t) tmp = 0.0 if (t_1 <= -5000000000.0) tmp = t_2; elseif (t_1 <= 0.95) tmp = Float64(t * Float64(Float64(x - y) / z)); elseif (t_1 <= 2.0) tmp = fma(t, Float64(z / y), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x / N[(z - y), $MachinePrecision]), $MachinePrecision] * t), $MachinePrecision]}, If[LessEqual[t$95$1, -5000000000.0], t$95$2, If[LessEqual[t$95$1, 0.95], N[(t * N[(N[(x - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2.0], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := \frac{x}{z - y} \cdot t\\
\mathbf{if}\;t\_1 \leq -5000000000:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 0.95:\\
\;\;\;\;t \cdot \frac{x - y}{z}\\
\mathbf{elif}\;t\_1 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < -5e9 or 2 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 98.6%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6495.4
Simplified95.4%
if -5e9 < (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996Initial program 94.7%
Taylor expanded in z around inf
lower-/.f64N/A
lower--.f6493.7
Simplified93.7%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6482.4
Simplified82.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6499.2
Simplified99.2%
Final simplification96.0%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* (/ x (- z y)) t)))
(if (<= t_1 -2e-6)
t_2
(if (<= t_1 0.95)
(* (- x y) (/ t z))
(if (<= t_1 2.0) (fma t (/ z y) t) t_2)))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = (x / (z - y)) * t;
double tmp;
if (t_1 <= -2e-6) {
tmp = t_2;
} else if (t_1 <= 0.95) {
tmp = (x - y) * (t / z);
} else if (t_1 <= 2.0) {
tmp = fma(t, (z / y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(Float64(x / Float64(z - y)) * t) tmp = 0.0 if (t_1 <= -2e-6) tmp = t_2; elseif (t_1 <= 0.95) tmp = Float64(Float64(x - y) * Float64(t / z)); elseif (t_1 <= 2.0) tmp = fma(t, Float64(z / y), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x / N[(z - y), $MachinePrecision]), $MachinePrecision] * t), $MachinePrecision]}, If[LessEqual[t$95$1, -2e-6], t$95$2, If[LessEqual[t$95$1, 0.95], N[(N[(x - y), $MachinePrecision] * N[(t / z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2.0], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := \frac{x}{z - y} \cdot t\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{-6}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 0.95:\\
\;\;\;\;\left(x - y\right) \cdot \frac{t}{z}\\
\mathbf{elif}\;t\_1 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < -1.99999999999999991e-6 or 2 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 98.7%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6495.5
Simplified95.5%
if -1.99999999999999991e-6 < (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996Initial program 94.6%
Taylor expanded in z around inf
*-commutativeN/A
associate-/l*N/A
lower-*.f64N/A
lower--.f64N/A
lower-/.f6487.3
Simplified87.3%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6482.4
Simplified82.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6499.2
Simplified99.2%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* x (/ t (- z y)))))
(if (<= t_1 -5000000000.0)
t_2
(if (<= t_1 0.95)
(* (- x y) (/ t z))
(if (<= t_1 2.5) (fma t (/ z y) t) t_2)))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = x * (t / (z - y));
double tmp;
if (t_1 <= -5000000000.0) {
tmp = t_2;
} else if (t_1 <= 0.95) {
tmp = (x - y) * (t / z);
} else if (t_1 <= 2.5) {
tmp = fma(t, (z / y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(x * Float64(t / Float64(z - y))) tmp = 0.0 if (t_1 <= -5000000000.0) tmp = t_2; elseif (t_1 <= 0.95) tmp = Float64(Float64(x - y) * Float64(t / z)); elseif (t_1 <= 2.5) tmp = fma(t, Float64(z / y), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(x * N[(t / N[(z - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -5000000000.0], t$95$2, If[LessEqual[t$95$1, 0.95], N[(N[(x - y), $MachinePrecision] * N[(t / z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2.5], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := x \cdot \frac{t}{z - y}\\
\mathbf{if}\;t\_1 \leq -5000000000:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 0.95:\\
\;\;\;\;\left(x - y\right) \cdot \frac{t}{z}\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < -5e9 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 98.6%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6496.3
Simplified96.3%
lift--.f64N/A
associate-*l/N/A
associate-/l*N/A
lower-*.f64N/A
lower-/.f6490.6
Applied egg-rr90.6%
if -5e9 < (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996Initial program 94.7%
Taylor expanded in z around inf
*-commutativeN/A
associate-/l*N/A
lower-*.f64N/A
lower--.f64N/A
lower-/.f6485.6
Simplified85.6%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6481.4
Simplified81.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6498.2
Simplified98.2%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* t (/ x z))))
(if (<= t_1 0.95)
t_2
(if (<= t_1 2.5)
(fma t (/ z y) t)
(if (<= t_1 4e+30) t_2 (* t (/ x (- y))))))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = t * (x / z);
double tmp;
if (t_1 <= 0.95) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = fma(t, (z / y), t);
} else if (t_1 <= 4e+30) {
tmp = t_2;
} else {
tmp = t * (x / -y);
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(t * Float64(x / z)) tmp = 0.0 if (t_1 <= 0.95) tmp = t_2; elseif (t_1 <= 2.5) tmp = fma(t, Float64(z / y), t); elseif (t_1 <= 4e+30) tmp = t_2; else tmp = Float64(t * Float64(x / Float64(-y))); end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(t * N[(x / z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, 0.95], t$95$2, If[LessEqual[t$95$1, 2.5], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], If[LessEqual[t$95$1, 4e+30], t$95$2, N[(t * N[(x / (-y)), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := t \cdot \frac{x}{z}\\
\mathbf{if}\;t\_1 \leq 0.95:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{elif}\;t\_1 \leq 4 \cdot 10^{+30}:\\
\;\;\;\;t\_2\\
\mathbf{else}:\\
\;\;\;\;t \cdot \frac{x}{-y}\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) < 4.0000000000000001e30Initial program 96.0%
Taylor expanded in y around 0
lower-/.f6461.2
Simplified61.2%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6481.4
Simplified81.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6498.2
Simplified98.2%
if 4.0000000000000001e30 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 99.8%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6499.8
Simplified99.8%
Taylor expanded in z around 0
mul-1-negN/A
distribute-neg-frac2N/A
mul-1-negN/A
lower-/.f64N/A
mul-1-negN/A
lower-neg.f6470.3
Simplified70.3%
Final simplification74.1%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (/ (- x y) (- z y))) (t_2 (* t (/ x z))))
(if (<= t_1 0.95)
t_2
(if (<= t_1 2.5)
(fma t (/ z y) t)
(if (<= t_1 4e+30) t_2 (* x (/ t (- y))))))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = t * (x / z);
double tmp;
if (t_1 <= 0.95) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = fma(t, (z / y), t);
} else if (t_1 <= 4e+30) {
tmp = t_2;
} else {
tmp = x * (t / -y);
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(t * Float64(x / z)) tmp = 0.0 if (t_1 <= 0.95) tmp = t_2; elseif (t_1 <= 2.5) tmp = fma(t, Float64(z / y), t); elseif (t_1 <= 4e+30) tmp = t_2; else tmp = Float64(x * Float64(t / Float64(-y))); end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(t * N[(x / z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, 0.95], t$95$2, If[LessEqual[t$95$1, 2.5], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], If[LessEqual[t$95$1, 4e+30], t$95$2, N[(x * N[(t / (-y)), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := t \cdot \frac{x}{z}\\
\mathbf{if}\;t\_1 \leq 0.95:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{elif}\;t\_1 \leq 4 \cdot 10^{+30}:\\
\;\;\;\;t\_2\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{t}{-y}\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) < 4.0000000000000001e30Initial program 96.0%
Taylor expanded in y around 0
lower-/.f6461.2
Simplified61.2%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6481.4
Simplified81.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6498.2
Simplified98.2%
if 4.0000000000000001e30 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 99.8%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6499.8
Simplified99.8%
lift--.f64N/A
associate-*l/N/A
associate-/l*N/A
lower-*.f64N/A
lower-/.f6495.9
Applied egg-rr95.9%
Taylor expanded in z around 0
associate-*r/N/A
lower-/.f64N/A
mul-1-negN/A
lower-neg.f6470.1
Simplified70.1%
Final simplification74.1%
(FPCore (x y z t) :precision binary64 (let* ((t_1 (/ (- x y) (- z y))) (t_2 (* t (/ x z)))) (if (<= t_1 0.95) t_2 (if (<= t_1 2.5) (fma t (/ z y) t) t_2))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = t * (x / z);
double tmp;
if (t_1 <= 0.95) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = fma(t, (z / y), t);
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(t * Float64(x / z)) tmp = 0.0 if (t_1 <= 0.95) tmp = t_2; elseif (t_1 <= 2.5) tmp = fma(t, Float64(z / y), t); else tmp = t_2; end return tmp end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(t * N[(x / z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, 0.95], t$95$2, If[LessEqual[t$95$1, 2.5], N[(t * N[(z / y), $MachinePrecision] + t), $MachinePrecision], t$95$2]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := t \cdot \frac{x}{z}\\
\mathbf{if}\;t\_1 \leq 0.95:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;\mathsf{fma}\left(t, \frac{z}{y}, t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 96.6%
Taylor expanded in y around 0
lower-/.f6457.9
Simplified57.9%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in x around 0
mul-1-negN/A
*-commutativeN/A
associate-/l*N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
lower-*.f64N/A
mul-1-negN/A
distribute-neg-frac2N/A
lower-/.f64N/A
sub-negN/A
+-commutativeN/A
distribute-neg-inN/A
remove-double-negN/A
lower-+.f64N/A
lower-neg.f6481.4
Simplified81.4%
Taylor expanded in y around inf
+-commutativeN/A
associate-/l*N/A
lower-fma.f64N/A
lower-/.f6498.2
Simplified98.2%
Final simplification70.9%
(FPCore (x y z t) :precision binary64 (let* ((t_1 (/ (- x y) (- z y))) (t_2 (* t (/ x z)))) (if (<= t_1 0.95) t_2 (if (<= t_1 2.5) t t_2))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = t * (x / z);
double tmp;
if (t_1 <= 0.95) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = t;
} else {
tmp = t_2;
}
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) :: t_1
real(8) :: t_2
real(8) :: tmp
t_1 = (x - y) / (z - y)
t_2 = t * (x / z)
if (t_1 <= 0.95d0) then
tmp = t_2
else if (t_1 <= 2.5d0) then
tmp = t
else
tmp = t_2
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = t * (x / z);
double tmp;
if (t_1 <= 0.95) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = t;
} else {
tmp = t_2;
}
return tmp;
}
def code(x, y, z, t): t_1 = (x - y) / (z - y) t_2 = t * (x / z) tmp = 0 if t_1 <= 0.95: tmp = t_2 elif t_1 <= 2.5: tmp = t else: tmp = t_2 return tmp
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(t * Float64(x / z)) tmp = 0.0 if (t_1 <= 0.95) tmp = t_2; elseif (t_1 <= 2.5) tmp = t; else tmp = t_2; end return tmp end
function tmp_2 = code(x, y, z, t) t_1 = (x - y) / (z - y); t_2 = t * (x / z); tmp = 0.0; if (t_1 <= 0.95) tmp = t_2; elseif (t_1 <= 2.5) tmp = t; else tmp = t_2; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(t * N[(x / z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, 0.95], t$95$2, If[LessEqual[t$95$1, 2.5], t, t$95$2]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := t \cdot \frac{x}{z}\\
\mathbf{if}\;t\_1 \leq 0.95:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;t\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < 0.94999999999999996 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 96.6%
Taylor expanded in y around 0
lower-/.f6457.9
Simplified57.9%
if 0.94999999999999996 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in y around inf
Simplified97.2%
*-lft-identity97.2
Applied egg-rr97.2%
Final simplification70.6%
(FPCore (x y z t) :precision binary64 (let* ((t_1 (/ (- x y) (- z y))) (t_2 (* x (/ t z)))) (if (<= t_1 0.001) t_2 (if (<= t_1 2.5) t t_2))))
double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = x * (t / z);
double tmp;
if (t_1 <= 0.001) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = t;
} else {
tmp = t_2;
}
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) :: t_1
real(8) :: t_2
real(8) :: tmp
t_1 = (x - y) / (z - y)
t_2 = x * (t / z)
if (t_1 <= 0.001d0) then
tmp = t_2
else if (t_1 <= 2.5d0) then
tmp = t
else
tmp = t_2
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double t_1 = (x - y) / (z - y);
double t_2 = x * (t / z);
double tmp;
if (t_1 <= 0.001) {
tmp = t_2;
} else if (t_1 <= 2.5) {
tmp = t;
} else {
tmp = t_2;
}
return tmp;
}
def code(x, y, z, t): t_1 = (x - y) / (z - y) t_2 = x * (t / z) tmp = 0 if t_1 <= 0.001: tmp = t_2 elif t_1 <= 2.5: tmp = t else: tmp = t_2 return tmp
function code(x, y, z, t) t_1 = Float64(Float64(x - y) / Float64(z - y)) t_2 = Float64(x * Float64(t / z)) tmp = 0.0 if (t_1 <= 0.001) tmp = t_2; elseif (t_1 <= 2.5) tmp = t; else tmp = t_2; end return tmp end
function tmp_2 = code(x, y, z, t) t_1 = (x - y) / (z - y); t_2 = x * (t / z); tmp = 0.0; if (t_1 <= 0.001) tmp = t_2; elseif (t_1 <= 2.5) tmp = t; else tmp = t_2; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(x * N[(t / z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, 0.001], t$95$2, If[LessEqual[t$95$1, 2.5], t, t$95$2]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{x - y}{z - y}\\
t_2 := x \cdot \frac{t}{z}\\
\mathbf{if}\;t\_1 \leq 0.001:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 2.5:\\
\;\;\;\;t\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (/.f64 (-.f64 x y) (-.f64 z y)) < 1e-3 or 2.5 < (/.f64 (-.f64 x y) (-.f64 z y)) Initial program 96.6%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f6478.9
Simplified78.9%
lift--.f64N/A
associate-*l/N/A
associate-/l*N/A
lower-*.f64N/A
lower-/.f6475.0
Applied egg-rr75.0%
Taylor expanded in z around inf
lower-/.f6454.8
Simplified54.8%
if 1e-3 < (/.f64 (-.f64 x y) (-.f64 z y)) < 2.5Initial program 99.9%
Taylor expanded in y around inf
Simplified96.4%
*-lft-identity96.4
Applied egg-rr96.4%
(FPCore (x y z t) :precision binary64 (* t (+ (/ x (- z y)) (/ y (- y z)))))
double code(double x, double y, double z, double t) {
return t * ((x / (z - y)) + (y / (y - 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 = t * ((x / (z - y)) + (y / (y - z)))
end function
public static double code(double x, double y, double z, double t) {
return t * ((x / (z - y)) + (y / (y - z)));
}
def code(x, y, z, t): return t * ((x / (z - y)) + (y / (y - z)))
function code(x, y, z, t) return Float64(t * Float64(Float64(x / Float64(z - y)) + Float64(y / Float64(y - z)))) end
function tmp = code(x, y, z, t) tmp = t * ((x / (z - y)) + (y / (y - z))); end
code[x_, y_, z_, t_] := N[(t * N[(N[(x / N[(z - y), $MachinePrecision]), $MachinePrecision] + N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
t \cdot \left(\frac{x}{z - y} + \frac{y}{y - z}\right)
\end{array}
Initial program 97.7%
lift--.f64N/A
div-subN/A
lower--.f64N/A
lower-/.f64N/A
lower-/.f6497.7
Applied egg-rr97.7%
Final simplification97.7%
(FPCore (x y z t) :precision binary64 (* t (/ (- x y) (- z y))))
double code(double x, double y, double z, double t) {
return t * ((x - y) / (z - 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 = t * ((x - y) / (z - y))
end function
public static double code(double x, double y, double z, double t) {
return t * ((x - y) / (z - y));
}
def code(x, y, z, t): return t * ((x - y) / (z - y))
function code(x, y, z, t) return Float64(t * Float64(Float64(x - y) / Float64(z - y))) end
function tmp = code(x, y, z, t) tmp = t * ((x - y) / (z - y)); end
code[x_, y_, z_, t_] := N[(t * N[(N[(x - y), $MachinePrecision] / N[(z - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
t \cdot \frac{x - y}{z - y}
\end{array}
Initial program 97.7%
Final simplification97.7%
(FPCore (x y z t) :precision binary64 t)
double code(double x, double y, double z, double t) {
return 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 = t
end function
public static double code(double x, double y, double z, double t) {
return t;
}
def code(x, y, z, t): return t
function code(x, y, z, t) return t end
function tmp = code(x, y, z, t) tmp = t; end
code[x_, y_, z_, t_] := t
\begin{array}{l}
\\
t
\end{array}
Initial program 97.7%
Taylor expanded in y around inf
Simplified34.7%
*-lft-identity34.7
Applied egg-rr34.7%
(FPCore (x y z t) :precision binary64 (/ t (/ (- z y) (- x y))))
double code(double x, double y, double z, double t) {
return t / ((z - y) / (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 = t / ((z - y) / (x - y))
end function
public static double code(double x, double y, double z, double t) {
return t / ((z - y) / (x - y));
}
def code(x, y, z, t): return t / ((z - y) / (x - y))
function code(x, y, z, t) return Float64(t / Float64(Float64(z - y) / Float64(x - y))) end
function tmp = code(x, y, z, t) tmp = t / ((z - y) / (x - y)); end
code[x_, y_, z_, t_] := N[(t / N[(N[(z - y), $MachinePrecision] / N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{t}{\frac{z - y}{x - y}}
\end{array}
herbie shell --seed 2024207
(FPCore (x y z t)
:name "Numeric.Signal.Multichannel:$cput from hsignal-0.2.7.1"
:precision binary64
:alt
(! :herbie-platform default (/ t (/ (- z y) (- x y))))
(* (/ (- x y) (- z y)) t))